[公告]繪圖軟體修改

[helldeathscyt]

因為最後修正的傳不上來,我把要修改的打出來,請 評審 使用者 自行修改

1 GRAPH: GOSUB 10:A=2:KW=1: GOTO 15
72 GOSUB 620: GOSUB 600
73 IF K=27 THEN 75 ELSE IF K=13 THEN 100 ELSE IF K=113 THEN 76 ELSE IF K=119 THEN 78
170 O=125: WRITE #1,-25: LOCATE 5,14: PRINT "STOP!";: FOR I=1 TO 1000: NEXT I
171 LOCATE 5,14: PRINT " (空5格) ";: GOTO 70
225 IF A=-25 THEN 270 ELSE IF A<0 THEN 226 ELSE GOTO 227
270 WRITE #1,-25: GOTO 280
342 IF A=-25 THEN 390 ELSE IF A<0 THEN 343 ELSE GOTO 344
343 TY=ABS(A): INPUT #2,A
390 FOR I=1 TO 1000: NEXT I
430 INPUT #1,A: IF A=-25 THEN 489 ELSE IF A<0 THEN 435 ELSE GOTO 440
489 PRINT "STOP!"
600 IF K=97 AND KW=1 THEN 601 ELSE IF K=97 AND KW=2 THEN 610 ELSE GOTO 650
601 KW=2: GOTO 650
610 KW=1: GOTO 650
620 IF KW=1 THEN 630 ELSE GOTO 640
630 DRAW X+1,Y,2: DRAW X-1,Y,2: DRAW X,Y+1,2: DRAW X,Y-1,2: GOTO 650
640 DRAW X,Y,2
650 RETURN

加上這些就完成了,粗體字是行號

[robin]

哇...不會吧...這次評審真命苦^~^|||

[helldeathscyt]

沒辦法啊~
我有寫好
但是無法上傳

大地旅法師也寫了一個很好玩的遊戲,也不能上傳

[robin]

你們所謂傳不上來是說傳不到Mowd的站還是小哈傳不到電腦?

[helldeathscyt]

無法傳到電腦
傳出來都是亂數

[helldeathscyt]

感謝冰浩及Robin的幫忙,完整版成功上傳,不用修改了