mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-11-20 03:35:24 +00:00
5 lines
163 B
QBasic
5 lines
163 B
QBasic
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
|
|
|