5 lines
163 B
QBasic
Raw Normal View History

2020-12-27 14:28:04 -05:00
1HGR:HTAB11:?"ANNUNCIATOR3 TEST":FORI=0TO159:C=C+1:IFC>7THENC=0
2HCOLOR=C:HPLOT0,ITO279,I:NEXT
3POKE49246,0:FORI=1TO1000:NEXT:POKE49247,1:FORI=1TO1000:NEXT:GOTO3