Compucolor.org – Virtual Media

Listing of file='MUSWIG.BAS;01' on disk='vmedia/berts_bar-sector.ccvf'

1 PLOT 3,64,0:REM  BERT MUSTACHE WIGGLING PROGRAM
2 PLOT 27,4:PRINT "LOA BERT.DSP":PLOT 27,27
3 POKE 30362,196:POKE 30366,76:POKE 30572,51:FOR Q= 1TO 25:NEXT Q
4 POKE 30362,200:POKE 30366,140:POKE 30572,17:FOR Q= 1TO 25:NEXT Q
5 GOTO 3
6 END