rate 1.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110
  1. # rate
  2. *pl '<right><img src="images/casino/stavkaru.jpg"></right>'
  3. *nl
  4. *p 'What will be put?'
  5. act 'Red / Black':
  6. cla
  7. act 'Red':
  8. kh = 1
  9. gt 'result'
  10. end
  11. act 'Black':
  12. kh = 2
  13. gt 'result'
  14. end
  15. end
  16. act 'Even / Odd':
  17. cla
  18. act 'Even':
  19. chnch = 1
  20. gt 'result'
  21. end
  22. act 'Odd':
  23. chnch = 2
  24. gt 'result'
  25. end
  26. end
  27. act 'Small / Large':
  28. cla
  29. act 'Small:1-18':
  30. mb = 1
  31. gt 'result'
  32. end
  33. act 'Large:19-36':
  34. mb = 2
  35. gt 'result'
  36. end
  37. end
  38. act 'Dozen':
  39. cla
  40. act 'first dozen:1-12':
  41. du = 1
  42. gt 'result'
  43. end
  44. act 'Two Dozen:13-24':
  45. du = 2
  46. gt 'result'
  47. end
  48. act 'third dozen:25-36':
  49. du = 3
  50. gt 'result'
  51. end
  52. end
  53. act 'Series':
  54. cla
  55. act 'first row:1, 4, 7, 10, 13, 16, 19, 22, 25, 28, 31, 34':
  56. series = 1
  57. gt 'result'
  58. end
  59. act 'second row 2, 5, 8, 11, 14, 17, 20, 23, 26, 29, 32, 35':
  60. series = 2
  61. gt 'result'
  62. end
  63. act 'third row:3, 6, 9, 12, 15, 18, 21, 24, 27, 30, 33, 36':
  64. series = 3
  65. gt 'result'
  66. end
  67. end
  68. act 'Number':
  69. chi = input 'Enter a number from 0-36'
  70. if chi < 0 and chi > 36:
  71. msg 'Said that it was only from 0 to 36'
  72. gt 'rate'
  73. end
  74. gt 'result'
  75. end
  76. act 'Nothing':gt 'amrul'
  77. kh = 0
  78. chnch = 0
  79. mb = 0
  80. du = 0
  81. series = 0
  82. chi = 100
  83. clr
  84. gs 'stat'
  85. set minut += 5
  86. --- rate ---------------------------------