'
'
'  How to use palette
'
'
CLS : SCREEN 13
'
'
' Rotate the next three variables from 0 to 1
' for the different colors (the "bigs", in order)
'
' 0, 0, 0  =  Blank
' 0, 1, 0  =  Green
' 0, 1, 1  =  Yellow
' 0, 0, 1  =  Red
' 1, 0, 1  =  Purple
' 1, 1, 0  =  Cyan
' 1, 0, 0  =  Blue
' 1, 1, 1  =  Greys
'
bluebig = 0: greenbig = 1: redbig = 0

red = 0
green = 0
blue = 0

FOR i = 30 TO 92
 red = red + redbig
 green = green + greenbig
 blue = blue + bluebig
 PALETTE i, 65536 * INT(blue) + 256 * INT(green) + INT(red)
NEXT i

FOR t = 1 TO 62
 CIRCLE (160, 100), t, t + 29
NEXT t