' VicII-ish Color Theme by Charlie Veniot
' ' This program exported from BASIC Anywhere Machine (Version [5.2.3].[2023.08.08.01.01]) on 2023.08.25 at 17:30 (Coordinated Universal Time)

' based on http://unusedino.de/ec64/technical/misc/vic656x/colors/ by Robert 'Bob' Yannes
' slightly adjusted to accommodate aging eyeballs

' * * * RUNTIME PROPERTIES * * *
' Enable Image Smoothing: OFF
' ASCII Character Set: C64-ish ASCII Character Set
' Color of extra space on sides of console window: #A89AF1

SCREEN 12
HEIGHT 25 : WIDTH 40
PALETTE  0, _RGB2BGR(_RGB(0,0,0))       ' Black
PALETTE  1, _RGB2BGR(_RGB(255,255,255)) ' White
PALETTE  2, _RGB2BGR(_RGB(144,55,43))   ' Red
PALETTE  3, _RGB2BGR(_RGB(112,164,178)) ' Cyan
PALETTE  4, _RGB2BGR(_RGB(111,61,134))  ' Purple
PALETTE  5, _RGB2BGR(_RGB(88,141,67))   ' Green
PALETTE  6, _RGB2BGR(_RGB(53,40,121))   ' Blue
PALETTE  7, _RGB2BGR(_RGB(184,199,111)) ' Yellow
PALETTE  8, _RGB2BGR(_RGB(151,119,77))  ' Orange
PALETTE  9, _RGB2BGR(_RGB(67,57,0))     ' Brown
PALETTE 10, _RGB2BGR(_RGB(254,203,189)) ' Light Red
PALETTE 11, _RGB2BGR(_RGB(78,78,78))    ' Dark Grey
PALETTE 12, _RGB2BGR(_RGB(108,108,108)) ' Grey
PALETTE 13, _RGB2BGR(_RGB(194,250,172)) ' Light Green
PALETTE 14, _RGB2BGR(_RGB(168,154,241)) ' Light Blue
PALETTE 15, _RGB2BGR(_RGB(149,149,149)) ' Light Grey

f = 14 : b = 6
COLOR f, b
CLS
again:
    COLOR f, b
    PRINT "HELLO";
    f = (f + 1) : IF f = 16 THEN f = 0
_DELAY 0.1 : GOTO again