authors1 883 B

123456789101112131415161718192021222324252627282930313233343536373839
  1. # authors1
  2. clr
  3. minut += 10
  4. gs 'stat'
  5. '<center><img src="images/casino/avt.jpg"></center>'
  6. 'Rules of the game are very simple:toss a coin 10 <b>₽</b> and pull lever. jackpot 100,000 <b>₽</b>.'
  7. act 'Pull the lever':
  8. if money >= 10:
  9. clr
  10. money -= 10
  11. x_10 = rand(1, 1000)
  12. if x_10 = 1000:
  13. money += 100000
  14. msg 'You won the jackpot! Congratulations!'
  15. elseif x_10 < 1000 and x_10 >= 850:
  16. money += 20
  17. msg 'Congratulations, you have won 20 <b>₽</b>'
  18. elseif x_10 >= 500 and x_10 < 850:
  19. money += 10
  20. msg 'congratulations, you have won 10 <b>₽</b>'
  21. elseif x_10 < 500:
  22. minut += 10
  23. msg 'Alas you lose, try again'
  24. end
  25. gt 'authors1'
  26. else
  27. msg 'And how are you going to play without money? Come back when you find the necessary amount'
  28. gt 'authors1'
  29. end
  30. end
  31. act 'Back to the hall':gt 'igravt'
  32. --- authors1 ---------------------------------