9510 S=54296:FORT=0TO10:FORJ=5TO15STEP5:POKES,J:POKES,0
9520 FORD=0TO60:NEXT:NEXT:FORD=0TO100:NEXT:NEXT