Advertisement
Guest User

Untitled

a guest
Jan 17th, 2019
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.66 KB | None | 0 0
  1. SOB PROGRAM
  2. SOB INT1
  3. SOB INT2
  4. SOB INT3
  5. SOB INT4
  6. PROGRAM: WPR 1
  7. ODE ST32
  8. SOZ END
  9. ODE ST65
  10. SOM PROGRAM
  11. ODE ST26
  12. SOM PRINT
  13. SOB PROGRAM
  14. PRINT: DOD ST26
  15. DOD ST97
  16. WYP 2
  17. SOB PROGRAM
  18. END: STP
  19. INT1: CZM MASK
  20. MAS 15
  21. DNS
  22. POB MASK
  23. DNS
  24. POB CNT
  25. DNS
  26. POB CHAR
  27. DNS
  28.  
  29. POB X
  30. LOOP: ODE ST1
  31. SOM ENDL
  32. LAD CNT
  33. POB ST49
  34. LAD CHAR
  35. WYP 2
  36. POB CNT
  37. POB CHAR
  38. SOB LOOP
  39. END: MAS 15
  40.  
  41.  
  42.  
  43.  
  44. PZS
  45. MSK MASK
  46. PWR
  47. INT2: CZM MASK2
  48. MAS 7
  49. DNS
  50. POB X
  51. LOOP1: ODE ST1
  52. SOM END2
  53. LAD Z
  54. POB ST50
  55. WYP 2
  56. POB Z
  57. SOB LOOP1
  58. END2: PZS
  59. MSK MASK2
  60. PWR
  61. INT3: CZM MASK3
  62. MAS 4
  63. DNS
  64. POB X
  65. LOOP3: ODE ST1
  66. SOM END3
  67. LAD K
  68. POB ST51
  69. WYP 2
  70. LAD K
  71. SOB LOOP3
  72. END3: PZS
  73. MSK MASK3
  74. PWR
  75. INT4: CZM MASK4
  76. MAS 1
  77. DNS
  78. POB X
  79. LOOP4: ODE ST1
  80. SOM END4
  81. LAD J
  82. POB ST52
  83. WYP 2
  84. POB J
  85. SOB LOOP4
  86. END4: PZS
  87. MSK MASK4
  88. PWR
  89. X: RST 3
  90. ST1: RST 1
  91. ST32: RST 32
  92. ST97: RST 97
  93. ST26: RST 26
  94. ST49: RST 49
  95. ST50: RST 50
  96. ST51: RST 51
  97. ST52: RST 52
  98. ST65: RST 65
  99. MASK: RPA
  100. MASK1: RPA
  101. MASK2: RPA
  102. MASK3: RPA
  103. MASK4: RPA
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement