2009-02-05から1日間の記事一覧
とりあえず版を作ってみました。 10:WAIT 2:Y=0:Z=0:T=0:K$="":GOSUB 500:GOTO 100 20:IF E=1 GOSUB 500 30:IF R=1 LET T=Z:Z=Y:Y=X:GOSUB 500 40:IF P=0 LET X=X*10+V:GOTO 100 50:X=X+V*0.1^P:P=P+1 100:PRINT X 110:K$=INKEY$ 120:IF K$="" GOTO 100 130:…
とりあえず版を作ってみました。 10:WAIT 2:Y=0:Z=0:T=0:K$="":GOSUB 500:GOTO 100 20:IF E=1 GOSUB 500 30:IF R=1 LET T=Z:Z=Y:Y=X:GOSUB 500 40:IF P=0 LET X=X*10+V:GOTO 100 50:X=X+V*0.1^P:P=P+1 100:PRINT X 110:K$=INKEY$ 120:IF K$="" GOTO 100 130:…
