ドッペル 2011-06-09 18:18 a
★0★ 650 pv
先駆者の方もいますし、ハイロウよりも劣るので、結果だけ。
781250枚入手まで
33.1961日
21741コイン
儲けは22879枚/日
プログラムはハイロウの使いまわしなので雑です。
10 RANDOMIZE
15 LET X=0
17 LET S=0
18 LET N=7
19 LET Z=0
20 LET X=X+1
30 LET D=1
40 LET P=0
50 LET C=0
60 LET A=RND
70 LET P=P+1
71 IF C=0 THEN
72 LET Z=Z+1
73 END IF
100 IF A<1/3 THEN
110 LET C=C+1
120 IF C=N THEN
130 LET S=S+D
140 IF X=10000 THEN
141 GOTO 2500
142 ELSE
143 GOTO 20
144 END IF
150 ELSE
160 GOTO 60
170 END IF
180 ELSE
2000 LET C=0
2010 IF P>98 THEN
2020 LET D=D+1
2030 LET P=0
2035 END IF
2040 GOTO 60
2120 END IF
2500 PRINT S/X
2600 PRINT Z/X
2700 PRINT ((5^N*X)-Z)*10/S
3000 END