isar.s 259 B

123456789101112131415
  1. .sect .text; .sect .rom; .sect .data; .sect .bss
  2. .sect .text
  3. .define .isar
  4. .isar:
  5. pop cx
  6. pop ax
  7. cmp ax,2
  8. .extern .unknown
  9. jne .unknown
  10. pop bx ! descriptor address
  11. pop ax ! index
  12. push cx
  13. .extern .sar2
  14. jmp .sar2