Advertisement
Guest User

Untitled

a guest
Nov 15th, 2019
136
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.22 KB | None | 0 0
  1. ;5_3 前判定
  2. PRG START
  3. RPUSH
  4. ;
  5. LAD GR1,1
  6. LOOP CPA GR1,=8
  7. JPL FIN
  8. LD GR2,='0'
  9. ADDA GR2,GR1
  10. ST GR2,CNT
  11. OUT BUF,LEN
  12. ADDA GR1,=1
  13. JUMP LOOP
  14. ;
  15. FIN RPOP
  16. RET
  17. LEN DC 9
  18. BUF DC 'Count = '
  19. CNT DC ' '
  20. END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement