ひたすら何かのソースコードを公開するスレ (157ﾚｽ)

ひたすら何かのソースコードを公開するスレ http://mevius.5ch.net/test/read.cgi/unix/1057999285/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞

---

16: 名無しさん＠お腹いっぱい。 [sage] 03/07/12 21:48 160 *A 170 M=0:N= RND 6 180 LOCATE 19,2:PRINT "[";G$(N);"]" 190 *B 200 IF K$<>"" FOR J=0 TO W*8:NEXT 210 LOCATE X,Y:PRINT G$(M(X,Y)) 220 K$= INKEY$ 230 SWITCH K$ 240 CASE "4":IF X>0 LET X=X-1 250 CASE "6":IF X<16 LET X=X+1 260 CASE "8":IF Y>0 LET Y=Y-1 270 CASE "2":IF Y<5 LET Y=Y+1 280 CASE " ":IF M(X,Y)<7 LOCATE X,Y:PRINT G$(N):BEEP 1,200,20:M(X,Y)=N:M=1 290 ENDSWITCH 300 FOR J=0 TO W:NEXT 310 LOCATE X,Y:PRINT "ﾛ" 320 C=(C+1) MOD T 330 IF C=0 GOSUB *C 340 IF M=1 GOTO *A ELSE *B http://mevius.5ch.net/test/read.cgi/unix/1057999285/16

---

ﾒﾓ帳

(0/65535文字)

---

上下前次1-新書関写板覧索設栞歴

---

あと 141 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.004s