dsub6.mac 459 B

12345678910111213141516171819202122232425262728293031323334
  1. radix 10
  2. extern L0001
  3. extern L0002
  4. extern SYMNAM
  5. extern SYMVAL
  6. extern SYMFNC
  7. extern SYMPRP
  8. extern L0003
  9. extern L0004
  10. extern ARG1
  11. extern ARG2
  12. extern ARG3
  13. extern ARG4
  14. extern ARG5
  15. extern ARG6
  16. extern ARG7
  17. extern ARG8
  18. extern ARG9
  19. extern ARG10
  20. extern ARG11
  21. extern ARG12
  22. extern ARG13
  23. extern ARG14
  24. extern ARG15
  25. BNDSTK: block 2001
  26. intern BNDSTK
  27. L1005: BNDSTK+0
  28. intern L1005
  29. L1006: BNDSTK+1999
  30. intern L1006
  31. L1007: BNDSTK+0
  32. intern L1007
  33. end