home *** CD-ROM | disk | FTP | other *** search
- 10 A = 1
- 20 PRINT "--------------"
- 30 A = A + 1
- 40 IF A < 500 GOTO 20 ELSE 60
- 50 B = 1
- 60 PRINT "--------------"
- 70 B = B + 1
- 80 IF B < 500 GOTO 60 ELSE 100
- 90 C = 1
- 100 PRINT "--------------"
- 110 C = C + 1
- 120 IF C < 500 GOTO 100 ELSE 140
- 130 d = 1
- 140 PRINT "--------------"
- 150 d = d + 1
- 160 IF d < 500 GOTO 140 ELSE 180
- 170 E = 1
- 180 PRINT "______________"
- 190 E = E + 1
- 200 IF E < 500 GOTO 180 ELSE 210
- 210 F = 1
- 220 PRINT "______________"
- 230 F = F + 1
- 240 IF F < 500 GOTO 220 ELSE 260
- 250 G = 1
- 260 PRINT "______________"
- 270 G = G + 1
- 280 IF G < 500 GOTO 260 ELSE 300
- 290 H = 1
- 300 PRINT "______________"
- 310 H = H + 1
- 320 IF H < 500 GOTO 300 ELSE 340
- 330 I = 1
- 340 PRINT "______________"
- 350 I = I + 1
- 360 IF I < 500 GOTO 340 ELSE 380
- 370 J = 1
- 380 PRINT "______________"
- 390 J = J + 1
- 400 IF J < 500 GOTO 380 ELSE 420
- 410 K = 1
- 420 PRINT "______________"
- 430 K = K + 1
- 440 IF K < 500 GOTO 420 ELSE 460
- 450 L = 1
- 460 PRINT "--------------"
- 470 L = L + 1
- 480 IF L < 500 GOTO 460 ELSE 500
- 490 M = 1
- 500 PRINT "______________"
- 510 M = M + 1
- 520 IF M < 500 GOTO 500 ELSE 540
- 530 N = 1
- 540 PRINT "______________"
- 550 N = N + 1
- 560 IF N < 500 GOTO 540 ELSE 580
- 570 O = 1
- 580 PRINT "______________"
- 590 O = O + 1
- 600 IF O < 500 GOTO 580 ELSE 610
- 610 END
-
-
-