Listing of file='MENU.BAS;02' on disk='vmedia/ncc_15-sector.ccvf'
10 PLOT 12,3,0,12,14:X= 20:POKE 33278,0 20 PRINT SPC( X);"1. 3DCOST GRAPH" 25 PRINT 30 PRINT SPC( X);"2. 3D DESIGN" 35 PRINT 40 PRINT SPC( X);"3. DRAGON" 45 PRINT 50 PRINT SPC( X);"4. CUBE - ROTATING 3D CUBE" 55 PRINT 60 PRINT SPC( X);"5. HAMMER - REAL TIME ANIMATION" 70 PLOT 6,4,2,0,0,242,127,0,127,127,0,127,0,0,255 80 PLOT 2,250,0,83,127,250,0,102,127,255,6,2 85 PLOT 15,31,3,13,8:PRINT "DO NOT USE THE RETURN KEY" 90 PLOT 15,14,3,10,3:PRINT "ENTER THE NUMBER OF YOUR CHOICE ? " 95 PLOT 15,3,64,7 100 A= PEEK (33278) 105 PLOT 6,4,2,0,0,242,0,127,255,6,2 110 IF A= 0THEN 100 120 IF A< 49OR A> 53THEN POKE 33278,0:GOTO 95 130 A= A- 48 200 PLOT 3,5,8,14,6,3,31 210 FOR B= 1TO 25:PRINT A;:NEXT B 225 FOR B= 1TO 1000:NEXT B 227 PLOT 6,2,15,12 230 ON AGOTO 300,310,320,330,340 300 LOAD "3DCOST":RUN 310 LOAD "DESIGN":RUN 320 LOAD "DRAGON":RUN 330 LOAD "CUBE":RUN 340 LOAD "HAMMER":RUN