(14)0,0,78,23,1225,12,50,13,1W"OOTING RO-ERM 128 -14" FOR A=1TO3:FORL=1TO80:SYS52684,L,1:NEXTL:NEXTA :REM ROUNDUP FORL=0TO100:SYS52684,L,35:FORX=1TO3:NEXTX:NEXTL :REM CURTAINL08:52684,L,23:X150:X:L : SWIPE 1C 52684,8,9 : SMALLER CHARACTERSR "PRO0",8