read `Bitcoin.txt`:

q:=1/5:
N:=200:
M:=10000:


for n from 1 to 20 do
print(``):
print(`--------------------------------------`):
print(``):
gu:=BAsimS(n,q,N,M):
if gu<>FAIL then
print(`This is  a simulation of a two Phase, Soccer game, alias bitcoin attack`):
print(`where the Good Guys Team first scores`, n, `goals. `):
print(``):
print(`with the probability of success for the bad guy`,  q):
print(`and the bad guy declared a loser if he is`, N, `behind. `):
print(`run `, M, `times `):




print(`The theoretical probability is`, gu[1][2]):

print(`The empirical prob. of success in this run is`, gu[1][1]):

print(`The theoretical (conditional) expected duration is`, gu[2][2]):

print(`The empircal (conditional) expected duration is`, gu[2][1]):


print(`Note that the standard deviation of the (conditional) duration (in case of success) of a single game is`, gu[3]):

else
 print(FAIL):
fi:

od:
quit: