Compucolor.org – Virtual Media

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

100 CLEAR 100
1260 IF PEEK (41060)+ PEEK (41160)+ PEEK (41260)= 542THEN 1320
1270 PLOT  12,8:PRINT :PRINT :PRINT :PRINT :PRINT
1280 PRINT TAB( 10);"LOADING    + R U N    PROGRAM"
1290 IF PEEK (41060)+ PEEK (41160)+ PEEK (41260)= 542THEN 1320
1300 PLOT 27,4
1310 PRINT "RUN PRTRUN.PRG;01"
1320 PRINT :PLOT  14:PRINT TAB( 20)"+ R U N IS LOADED"
1330 FOR I= 1TO 1500:NEXT I
1340 PLOT 27,19
1350 END