123456789101112131415161718192021222324252627282930313233343536373839404142434445 |
- # authors1
- *pl 'Rules of the game are very simple:toss a coin 10 rubles and pull lever. jackpot 100 thousand rubles.'
- *p '<center><img src="images/casino/avt.jpg"></center>'
- act 'pull the lever':
- if money >= 10:
- x_10 = rand(1, 1000)
- set money -= 10
- if x_10 = 1000:
- set money += 100000
- msg 'You won the jackpot! Congratulations!'
- end
- if x_10<1000 and x_10 >= 850:
- set money += 20
- msg 'Congratulations, you win 20 rubles'
- end
- if x_10 >= 500 and x_10 < 850:
- set money += 10
- msg 'congratulations, you win 10 rubles'
- end
- if x_10 < 500:
- set minut = minut+10
- msg 'Alas you lose, try again'
- end
- clr
- gt 'authors1'
- else
- msg 'And how are you going to play without money? Come back when you find the necessary amount'
- gt 'authors1'
- end
- end
- act 'Back to the hall':gt 'igravt'
- clr
- gs 'stat'
- set minut = minut + 10
- !!pl 'In the bag:<<money>> RUB.'
- --- authors1 ---------------------------------
|