534_amrul 569 B

12345678910111213141516171819202122232425262728293031323334353637383940
  1. # amrul
  2. *pl 'You leaned over the table.'
  3. *p '<center><img src="images/casino/amrul.jpg"></center>'
  4. act 'IPod':
  5. st_1 = input 'Enter the amount'
  6. if money < st_1:
  7. msg 'You have enough money'
  8. gt 'roulette'
  9. end
  10. if st_1 < 0:
  11. msg 'Wrong, try again'
  12. gt 'amrul'
  13. end
  14. if st_1 > 1000:
  15. msg 'The maximum rate of 1000 rubles'
  16. gt 'amrul'
  17. end
  18. set money -= st_1
  19. gt 'rate'
  20. end
  21. act 'move away from the table':gt 'roulette'
  22. kh = 0
  23. chnch = 0
  24. mb = 0
  25. du = 0
  26. series = 0
  27. chi = 100
  28. x_rul = 100
  29. clr
  30. gs 'stat'
  31. set minut += 5
  32. --- amrul ---------------------------------