wait.s 218 B

1234567891011121314151617
  1. .define _wait
  2. .sect .text
  3. .sect .rom
  4. .sect .data
  5. .sect .bss
  6. .extern _wait
  7. .sect .text
  8. _wait: move.w #0x7,d0
  9. move.l 4(sp),a0
  10. trap #0
  11. bcs cerror
  12. tst.l 4(sp)
  13. beq 1f
  14. move.l 4(sp),a0
  15. move.w d1,(a0)
  16. 1:
  17. rts