Advertisement
Guest User

Untitled

a guest
Jan 23rd, 2018
64
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.94 KB | None | 0 0
  1. SOB loop1
  2. //--------------------------------------------------------------
  3. begin: WPR 1
  4.  
  5. ODE sp
  6. SOZ spc
  7. DOD sp
  8.  
  9. ODE kr
  10. SOZ end
  11. DOD kr
  12.  
  13. ODE zero
  14. SOM rsign2
  15. DOD zero
  16.  
  17. ODE fiei
  18. SOM number
  19. DOD fiei
  20.  
  21. ODE A
  22. SOM rsign1
  23. DOD A
  24.  
  25. ODE z1
  26. SOM big
  27. DOD z1
  28.  
  29. ODE A1
  30. SOM rsign3
  31. DOD A1
  32.  
  33. ODE z5
  34. SOM small
  35. DOD z5
  36.  
  37. SOB begin
  38. //--------------------------------------------------------------
  39. spc: DOD sp
  40. WYP 2
  41. SOB loop
  42.  
  43. loop: WPR 1
  44.  
  45. ODE sp
  46. SOZ spc1
  47. DOD sp
  48.  
  49. ODE kr
  50. SOZ end
  51. DOD kr
  52.  
  53. ODE zero
  54. SOM rsign21
  55. DOD zero
  56.  
  57. ODE fiei
  58. SOM number
  59. DOD fiei
  60.  
  61. ODE A
  62. SOM rsign11
  63. DOD A
  64.  
  65. ODE z1
  66. SOM big1
  67. DOD z1
  68.  
  69. ODE A1
  70. SOM rsign31
  71. DOD A1
  72.  
  73. ODE z5
  74. SOM small1
  75. DOD z5
  76.  
  77. SOB loop
  78.  
  79. loop1: WPR 1
  80. //--------------------------------------------------------------
  81. ODE sp
  82. SOZ spc
  83. DOD sp
  84.  
  85. ODE kr
  86. SOZ end
  87. DOD kr
  88.  
  89. ODE zero
  90. SOM rsign211
  91. DOD zero
  92.  
  93. ODE fiei
  94. SOM number
  95. DOD fiei
  96.  
  97. ODE A
  98. SOM rsign111
  99. DOD A
  100.  
  101. ODE z1
  102. SOM big1
  103. DOD z1
  104.  
  105. ODE A1
  106. SOM rsign311
  107. DOD A1
  108.  
  109. ODE z5
  110. SOM small1
  111. DOD z5
  112.  
  113. SOB loop1
  114.  
  115. //
  116.  
  117. number: DOD fiei
  118. WYP 2
  119. SOB begin
  120.  
  121. small: DOD z5
  122. WYP 2
  123. SOB begin
  124.  
  125. small1: DOD z5
  126. ODE sp
  127. WYP 2
  128. SOB begin
  129.  
  130. big: DOD z1
  131. DOD sp
  132. WYP 2
  133. SOB begin
  134.  
  135. big1: DOD z1
  136. WYP 2
  137. SOB begin
  138.  
  139.  
  140. rsign3: DOD A1
  141. SOB begin
  142.  
  143. rsign31: DOD A1
  144. SOB begin
  145.  
  146. rsign311: DOD A1
  147. SOB loop1
  148.  
  149. rsign2: DOD zero
  150. SOB begin
  151.  
  152. rsign21: DOD zero
  153. SOB loop
  154.  
  155. rsign211: DOD zero
  156. SOB loop1
  157.  
  158. rsign1: DOD A
  159. SOB begin
  160.  
  161. rsign11: DOD A
  162. SOB loop
  163.  
  164. rsign111: DOD A
  165. SOB loop1
  166.  
  167. spc1: DOD sp
  168. WYP 2
  169. SOB loop
  170.  
  171. end: DOD kr
  172. WYP 2
  173. STP
  174.  
  175.  
  176. z5: RST 123
  177. A1: RST 97
  178. fiei: RST 58
  179. zero: RST 48
  180. A: RST 65
  181. sp: RST 32
  182. kr: RST 46
  183. z1: RST 91
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement