Advertisement
Gouchnox

[TI Basic] RNG game

Apr 7th, 2015
254
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.92 KB | None | 0 0
  1. 0 → S
  2. Lbl J
  3. 0 → Y
  4. If S=20 or S=40 or S=60 or S=80
  5. Then
  6. Disp "_*_DIFFICULTY_*","_*_INCREASED!_*"
  7. End
  8. Lbl G
  9. If S≥20
  10. Then
  11. randInt(1,15)→X
  12. Else
  13. randInt(1,13)→X
  14. End
  15. If S≥40
  16. ThenrandInt(1,3)→Z
  17. Else
  18. 5→Z
  19. End
  20. If S≥60
  21. Then
  22. randInt(1,3)→T
  23. Else
  24. 5→T
  25. End
  26. If T=1
  27. Then
  28. 2→T
  29. Else
  30. 1→T
  31. End
  32. If U>1
  33. Then
  34. randInt(1,4)→U
  35. Else
  36. 5→U
  37. randInt(1,9)→X
  38. End
  39. End
  40.  
  41. If X=1 and Z>1 and T<2
  42. Then
  43. Disp "000000001"
  44. End
  45. If X=1 and Z=1 and T<2
  46. Then
  47. Disp "_______100000000"
  48. End
  49. If X=1 and T=2 and Z>1
  50. Then
  51. Disp "000000002"
  52. End
  53. If X=1 and Z=1 and T=2
  54. Then
  55. Disp "_______200000000"
  56. End
  57.  
  58. If X=2 and Z>1 and T<2
  59. Then
  60. Disp "000000010"
  61. End
  62. If X=2 and Z=1 and T<2
  63. Then
  64. Disp "_______010000000"
  65. End
  66. If X=2 and T=2 and Z>1
  67. Then
  68. Disp "000000020"
  69. End
  70. If X=2 and Z=1 and T=2
  71. Then
  72. Disp "_______020000000"
  73. End
  74.  
  75. If X=3 and Z>1 and T<2
  76. Then
  77. Disp "000000100"
  78. End
  79. If X=3 and Z=1 and T<2
  80. Then
  81. Disp "_______001000000"
  82. End
  83. If X=3 and T=2 and Z>1
  84. Then
  85. Disp "000000200"
  86. End
  87. If X=3 and Z=1 and T=2
  88. Then
  89. Disp "_______002000000"
  90. End
  91.  
  92. If X=4 and Z>1 and T<2
  93. Then
  94. Disp "000001000"
  95. End
  96. If X=4 and Z=1 and T<2
  97. Then
  98. Disp "_______000100000"
  99. End
  100. If X=4 and T=2 and Z>1
  101. Then
  102. Disp "000002000"
  103. End
  104. If X=4 and Z=1 and T=2
  105. Then
  106. Disp "_______000200000"
  107. End
  108.  
  109. If X=5 and Z>1 and T<2
  110. Then
  111. Disp "000010000"
  112. End
  113. If X=5 and Z=1 and T<2
  114. Then
  115. Disp "_______000010000"
  116. End
  117. If X=5 and T=2 and Z>1
  118. Then
  119. Disp "000020000"
  120. End
  121. If X=5 and Z=1 and T=2
  122. Then
  123. Disp "_______000020000"
  124. End
  125.  
  126. If X=6 and Z>1 and T<2
  127. Then
  128. Disp "000100000"
  129. End
  130. If X=6 and Z=1 and T<2
  131. Then
  132. Disp "_______000001000"
  133. End
  134. If X=6 and T=2 and Z>1
  135. Then
  136. Disp "000200000"
  137. End
  138. If X=6 and Z=1 and T=2
  139. Then
  140. Disp "_______000002000"
  141. End
  142.  
  143. If X=7 and Z>1 and T<2
  144. Then
  145. Disp "001000000"
  146. End
  147. If X=7 and Z=1 and T<2
  148. Then
  149. Disp "_______000000100"
  150. End
  151. If X=7 and T=2 and Z>1
  152. Then
  153. Disp "002000000"
  154. End
  155. If X=7 and Z=1 and T=2
  156. Then
  157. Disp "_______000000200"
  158. End
  159.  
  160. If X=8 and Z>1 and T<2
  161. Then
  162. Disp "010000000"
  163. End
  164. If X=8 and Z=1 and T<2
  165. Then
  166. Disp "_______000000010"
  167. End
  168. If X=8 and T=2 and Z>1
  169. Then
  170. Disp "020000000"
  171. End
  172. If X=8 and Z=1 and T=2
  173. Then
  174. Disp "_______000000020"
  175. End
  176.  
  177. If X=9 and Z>1 and T<2
  178. Then
  179. Disp "100000000"
  180. End
  181. If X=9 and Z=1 and T<2
  182. Then
  183. Disp "_______000000001"
  184. End
  185. If X=9 and T=2 and Z>1
  186. Then
  187. Disp "200000000"
  188. End
  189. If X=9 and Z=1 and T=2
  190. Then
  191. Disp "_______000000002"
  192. End
  193.  
  194. If X=10
  195. Then
  196. Disp "______________+1"
  197. Y+1→Y
  198. Goto G
  199. End
  200. If X=11
  201. Then
  202. Disp "______________-1"
  203. Y-1→Y
  204. Goto G
  205. End
  206. If X=12
  207. Then
  208. Disp "______________+2"
  209. Y+2→Y
  210. Goto G
  211. End
  212. If X=13
  213. Then
  214. Disp "______________-2"
  215. Y-2→Y
  216. Goto G
  217. End
  218. If X=14
  219. Then
  220. Disp "______________+3"
  221. Y+3→Y
  222. Goto G
  223. End
  224. If X=15
  225. Then
  226. Disp "______________-3"
  227. Y-3→Y
  228. Goto G
  229. End
  230. If U=1
  231. Then
  232. 10XT→V
  233. Goto G
  234. End
  235.  
  236. Prompt A
  237. If A=XT+Y+V
  238. Then
  239. 0→Y
  240. 0→V
  241. S+1→S
  242. Goto J
  243. Else
  244. Disp "_-=-_FAILED_-=-"
  245. Disp S
  246. 0→S
  247. 0→Y
  248. 0→V
  249. End
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement