' // read diagnostics (optional but can help debug problems)
Dim x As Byte = tft.readcommand8(tft.ILI9488_RDMODE,0)
Log("Display Power Mode: 0x",BytetoHexa(x))
x = tft.readcommand8(tft.ILI9488_RDMADCTL,0)
Log("MADCTL Mode: 0x",BytetoHexa(x))
x = tft.readcommand8(tft.ILI9488_RDPIXFMT,0)
Log("Pixel Format: 0x",BytetoHexa(x))
x = tft.readcommand8(tft.ILI9488_RDIMGFMT,0)
Log("Image Format: 0x",BytetoHexa(x))
x = tft.readcommand8(tft.ILI9488_RDSELFDIAG,0)
Log("Self Diagnostic: 0x", BytetoHexa(x))