cuu.s 576 B

12345678910111213141516171819202122232425262728293031323334353637
  1. .sect .text; .sect .rom; .sect .data; .sect .bss
  2. .define .ciu
  3. .define .cui
  4. .define .cuu
  5. .sect .text
  6. .ciu:
  7. .cui:
  8. .cuu:
  9. pop bx ! return address
  10. ! pop cx, dest. size
  11. ! pop dx, source size
  12. ! ax is low word of source
  13. cmp dx,cx
  14. je 8f
  15. cmp dx,2
  16. je 1f
  17. cmp dx,4
  18. jne 9f
  19. cmp cx,2
  20. jne 9f
  21. pop dx
  22. 8:
  23. jmp bx
  24. 1:
  25. cmp cx,4
  26. jne 9f
  27. xor dx,dx
  28. push dx
  29. jmp bx
  30. 9:
  31. push ax ! to help debugging ?
  32. .extern EILLINS
  33. .extern .fat
  34. mov ax,EILLINS
  35. push ax
  36. jmp .fat