大昔のコンピュータグラフィックス@クスクス

50 ：ナイコンさん：03/02/22 16:56.net

100 CLS 3
110 CLEAR
120 WITDH 80,25
130 CONSOLE 0,25,0,1
140 COLOR 7,,,2
150 '
160 FOR I=0 TO 100
170 X = RND * 640
180 Y = RND * 480
190 C = RND * 15+1
200 LINE -(X,Y),C
210 NEXT I
220 END