home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / CPM / UTILS / ARC-LBR / NULUTERM.ASM < prev    next >
Assembly Source File  |  2000-06-30  |  3KB  |  105 lines
  1. ;    NULUTERM.ASM    11/01/85
  2. ;
  3. ;    For NULU.COM Version 1.5
  4. ;
  5. ;    The NULU.DOC contains the information to patch NULU.COM
  6. ;    using DDT and the save command.  An easier way is to use
  7. ;    this routine and MLOADxx.COM.  Set the various items as
  8. ;    desired and assemble with ASM or MAC to obtain a hex file.
  9. ;    Then use MLOAD as follows:
  10. ;
  11. ;        MLOAD NEWFILE.COM=OLDFILE.COM,NULUTERM
  12. ;
  13. ;    NOTE: NULUTERM is the hex file NULUTERM.HEX.  The file
  14. ;    type extension is not necessary.
  15. ;
  16. ;        Keith W. Antcliff
  17. ;        P.O. Box 906
  18. ;        Mead, WA 99021
  19. ;        Northwest GodBout/CompuPro RCP/M (509) 624-6799
  20. ;        S.M.U.G. (509) 624-7321
  21. ;
  22. ; **************************************************************
  23. ; * 11/01/85    Revised for Version 1.5 (mm)
  24. ; * 01/25/85    Revised for Version 1.1 (kwa)                  *
  25. ; * 12/02/84    Added EQU's for Patch ORG's (kwa)              *
  26. ; **************************************************************
  27. ;
  28. ;    See NULU.DOC for further information on the following values.
  29. ;
  30. ;
  31. true    equ    01h
  32. false    equ    00h
  33. ;
  34. patch1    equ    00163h    ;Number of Characters etc.
  35. patch2    equ    00167h    ;Number of Open Files etc.
  36. patch3    equ    0019ch    ;BDOS Vector
  37. patch4    equ    0021ch    ;Some Toggles and Storage Area
  38. patch5    equ    0024ch    ;Terminal Control Area
  39. patch6    equ    0026fh    ;Number of Lines for LST
  40. patch7    equ    00271h    ;Printer Initialization Area
  41. ;
  42.  
  43. nl    equ    03    ;Nesting Level for NCF files
  44.  
  45.      org    patch1
  46.  
  47.     db    80    ;Number of Characters each line can contain 
  48.     db    80    ;Number of Visible Characters/Line
  49.  
  50.      org    patch2
  51.  
  52.     db    04h+nl    ;Number of Open Files Allowed
  53.     dw    0ch+nl    ;Number of Relocatable Tasks
  54.     db    16    ;Number of Contiguously numbered drives
  55.     db    32    ;Number of Contiguous User Areas
  56.  
  57.      org    patch3
  58.  
  59.     dw    5    ;BDOS vector (See Doc)
  60.  
  61.      org    patch4
  62.  
  63.     db    false    ;NULU Read/Only
  64.     db    false    ;Exit like LU on command tail
  65.     db    true    ;BRIEF mode OFF
  66.     db    true    ;Allow ESC,RET from PROMPT etc.
  67.     db    nl    ;Nesting Level for NCF files
  68. ;
  69. ;    The following 39 bytes can be used to store any
  70. ;    valid NULU operators.  See NULU.DOC for details
  71. ;
  72.     db    '-O',0,0,0,0,0,0,0,0
  73.     db    0,0,0,0,0,0,0,0,0,0
  74.     db    0,0,0,0,0,0,0,0,0,0
  75.     db    0,0,0,0,0,0,0,0,0
  76.     db    0            ;Terminator...Do Not Change
  77.  
  78. ;
  79. ;    The following routines are for a TeleVideo 950 terminal.
  80. ;    Change to suit your terminal.  Use This Format:
  81. ;
  82. ;    ID byte,Number of Bytes,byte,byte,byte,byte,byte  ;7 bytes total
  83. ;    Do Not Change The ID Byte
  84. ;
  85.      org    patch5
  86.  
  87.     db    1,2,27,41,0,0,0        ;Background Mode ON
  88.     db    2,2,27,40,0,0,0        ;Background Mode OFF
  89.     db    3,3,27,71,56,0,0    ;Underline ON
  90.     db    4,3,27,71,48,0,0    ;Underline OFF
  91.     db    6,1,26,0,0,0,0        ;Clear Screen
  92.  
  93.      org    patch6
  94.  
  95.     db    60    ;Number of lines/page for LST
  96.             ;0 to supress page formatting
  97.  
  98. ;    Number of Bytes,byte,byte,byte,byte,byte,byte    ;6 bytes total
  99. ;
  100.      org    patch7
  101.  
  102.     db    0,0,0,0,0,0        ;Initialize Printer
  103. ng
  104.  
  105. ;    Num