1 頁 (共 1 頁)

[公告]繪圖軟體修改

發表於 : 2003-08-18 6:14 PM
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

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

發表於 : 2003-08-18 10:04 PM
robin
哇...不會吧...這次評審真命苦^~^|||

發表於 : 2003-08-19 2:43 PM
helldeathscyt
沒辦法啊~
我有寫好
但是無法上傳

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

發表於 : 2003-08-20 8:00 PM
robin
你們所謂傳不上來是說傳不到Mowd的站還是小哈傳不到電腦?

發表於 : 2003-08-20 9:59 PM
helldeathscyt
無法傳到電腦
傳出來都是亂數

發表於 : 2003-08-22 11:37 PM
helldeathscyt
感謝冰浩及Robin的幫忙,完整版成功上傳,不用修改了