home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / mbug / mbug144.arc / EASE16.LBR / EASEOVL.ZZ0 / EASEOVL.Z80
Text File  |  1979-12-31  |  3KB  |  139 lines
  1. ;   This can be overlayed onto EASE.COM after you make any changes you want.
  2. ; Assemble it as a .HEX file and overlay it using MLOAD.
  3. ;   This was an idea that Jay Sage put in an earlier version of the 
  4. ; EASE library.
  5.  
  6. ;    IT IS NOT NECESSARY!
  7. ;    It is just a convenient way to update EASE.
  8.  
  9. ;=============================================================================
  10. ;
  11. ;        D E F I N I T I O N S    S E C T I O N
  12. ;
  13. ;=============================================================================
  14.  
  15. version    equ    16
  16.  
  17. no    equ    0
  18. yes    equ    0ffh
  19.  
  20. ;=============================================================================
  21. ;
  22. ;        S T A N D A R D    P R O G R A M    H E A D E R
  23. ;
  24. ;=============================================================================
  25.  
  26. ENTRY:
  27.     jp    START
  28.     defb    'Z3ENV'
  29.     defb    3        ; Type-3 environment
  30. ENVADDR:
  31.     dw    0f300h
  32.     dw    ENTRY
  33.     defb    version
  34.  
  35.                 ; To go to the Error Handler, just
  36.                 ;   go to START with error flag set.
  37.  
  38. ;=============================================================================
  39. ;
  40. ;        C O N F I G U R A T I O N    A R E A
  41. ;
  42. ;=============================================================================
  43.  
  44. NAME:    db    'EASE    VAR'            ; Command history file
  45.  
  46. WIDTH:    dw    80                ; Length of line
  47.  
  48. TOOSHORT:
  49.     dw    02                ; Don't store in history 
  50.                         ;   if shorter than...
  51. GOBEGFLG:                    ; Go to the start of a
  52.     db    yes                ;  recalled command?
  53.  
  54. BEEPFLG:                    ; Beep on ERROR?
  55.     db    yes
  56.  
  57. SMARTSAV:                    ; Discard unchanged recalled 
  58.     db    no                ;  commands?
  59.  
  60. NOP1:    db    0                ; Future expansion
  61. NOP34:    dw    0
  62.  
  63. TABLE:    db    [[LASTCASE - VECTOR] / 3]    ; Number of cases
  64.     dw    BEEP                ; Default case ring bell
  65.  
  66. VECTOR:    db    'Q'
  67.     ds    2        ;    SHIFTED        ; Meta Key
  68.     db    'D'
  69.     ds    2        ;    FCHR        ; Right Char
  70.     db    'S'
  71.     ds    2        ;    BCHR        ; Left Char
  72.     db    'E'
  73.     ds    2        ;    UP        ; Up line
  74.     db    'X'
  75.     ds    2        ;    DOWN        ; Down line
  76.     db    'A'
  77.     ds    2        ;    MBWORD        ; Left word
  78.     db    'F'
  79.     ds    2        ;    MFWORD        ; Right word
  80.     db    'S'+80h
  81.     ds    2        ;    GOBOLN        ; Start of line
  82.     db    'D'+80h
  83.     ds    2        ;    GOEOLN        ; End of line
  84.     db    'G'
  85.     ds    2        ;    FDEL        ; Del char right
  86.     db    'H'
  87.     ds    2        ;    DELCHR        ; Del char left
  88.     db    127
  89.     ds    2        ;    DELCHR        ; Del char left
  90.     db    'T'
  91.     ds    2        ;    FDWORD        ; Del word right
  92.     db    127 + 80h
  93.     ds    2        ;    BDWORD        ; Del word left
  94.     db    'R'
  95.     ds    2        ;    CMDKILL        ; Kill to semi-colon
  96.     db    'Y'+80h
  97.     ds    2        ;    DELTOEND    ; Delete to end of line
  98.     db    'Y'
  99.     ds    2        ;    DELLIN        ; Delete line
  100.     db    'U'
  101.     ds    2        ;    UNDO        ; Reinsert deleted text
  102.     db    'B'
  103.     ds    2        ;    BACKLINE    ; Back in history shell
  104.     db    'N'
  105.     ds    2        ;    NEXTLINE    ; Forward in history shell
  106.     db    'O'
  107.     ds    2        ;    BSEARCH        ; Search for first char
  108.     db    'V'
  109.     ds    2        ;    TOGLIN        ; Toggle insert
  110.     db    'I'
  111.     ds    2        ;    ITAB        ; Insert Tab char
  112.     db    'P'
  113.     ds    2        ;    QINSERT        ; Insert any char
  114.     db    'W'
  115.     ds    2        ;    REPLOT        ; Redraw line
  116.     db    'C'
  117.     ds    2        ;    WARM        ; Warm Boot
  118.     db    'M'
  119.     ds    2        ;    DONE        ; End edit
  120.     db    '_'+80h
  121.     ds    2        ;    QUITSH        ; End EASE
  122. LASTCASE:
  123. PUNC:    db    ',.:!#%^&<>[]{}()_+-=`~/\|; ',tab
  124. PUNCLEN    equ    $ - PUNC
  125. ;=============================================================================
  126. ;
  127. ;        M A I N    C O D E    S E C T I O N
  128. ;
  129. ;=============================================================================
  130.  
  131. start:
  132.     end
  133.   C O D E    S E C T I O N
  134. ;
  135. ;=============================================================================
  136.  
  137. start:
  138.     end
  139.