Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;5_3 前判定
- PRG START
- RPUSH
- ;
- LAD GR1,1
- LOOP CPA GR1,=8
- JPL FIN
- LD GR2,='0'
- ADDA GR2,GR1
- ST GR2,CNT
- OUT BUF,LEN
- ADDA GR1,=1
- JUMP LOOP
- ;
- FIN RPOP
- RET
- LEN DC 9
- BUF DC 'Count = '
- CNT DC ' '
- END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement