僕の作った意味なしプログラムみて!!!


1 CLS
2 FOR I=0 TO 5000
3 RANDOMIZE:CCC=INT(RND*6)+1
4 COLOR CCC
5 X=X+1:IF X=79 THEN X=1:Y=Y+1:IF Y=25 THEN Y=1
6 LOCATE X,Y:PRINT "17けたのけ〜さんき"
7 NEXT I
8 FOR I=0 TO 1000:NEXT I
10 CLS
100 COLOR 3:INPUT "",A#
110 COLOR 4:INPUT "",B$
120 COLOR 5:INPUT "",C#
125 COLOR 6
130 IF B$="+" THEN GOSUB *H
131 IF B$="-" THEN GOSUB *J
132 IF B$="*" THEN GOSUB *K
133 IF B$="/" THEN GOSUB *L
135 GOTO 100

140 *H
150 AAA#=A#+C#
160 PRINT AAA#
170 RETURN