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 / EDITOR / VEDIT.IZF / VEDIT.INF
Text File  |  2000-06-30  |  6KB  |  109 lines
  1. If you seen the Ads for VEDIT and noticed the multi-file windowing claims
  2. you may have wondered what good is it!  Shown below are several different
  3. window configurations.  The first one shows how it can be used to compare
  4. files.  In the example are two revisions of a MEX overlay.  
  5.  
  6. VEDIT has a lot of other nice features:
  7.  
  8. - extensive macro (script file) capability
  9. - keyboard macros
  10. - small size
  11. - fast loading
  12. - comprehensive install program with COMPLETE keyboard redefinition.
  13.  
  14. and more.
  15.  
  16. Left and Right.....
  17.  
  18.  
  19.      MORE   LINE:  513  COL:  1   file: C:MXH-AP57.Z80                         
  20. =WINDOW @===============================WINDOW Z===============================
  21. | CHNGPORT:                            | CHNGPORT:                             
  22. |         LD      A,(INTFLG)      ; get|         LD      A,(INTFLG)      ; Get 
  23. |         OR      A               ; tes|         OR      A               ; Test
  24. |         JR      Z,NOTINT        ; go |         LD      A,(PARSV)       ; Get 
  25. |         CALL    INTON           ; tur|         JR      Z,NOINT         ; Go d
  26. |         LD      A,(PARSV)       ; get|                                 ;     
  27. |         OR      09H             ; req|         AND     11111101B       ; Enab
  28. |         JR      DOIT            ; go |         JR      DOIT            ;     
  29. | NOTINT: CALL    INTOFF          ; tur|                                 ;     
  30. |         LD      A,(PARSV)       ; get| NOINT:  OR      00000010B       ; Disa
  31. |         OR      0BH             ; w/o| DOIT:   LD      (CMDSV),A       ; Save
  32. | DOIT:   LD      (CMDSV),A       ; sav|         CALL    WR$MODCMDP      ; Send
  33. |         CALL    WR$MODCMDP      ; sen|         PUSH    HL              ;     
  34. |         PUSH    HL                   |         LD      HL,BAUDSV       ;     
  35. |         LD      HL,BAUDSV            |         LD      A,(WRDSV)       ;     
  36. |         LD      A,(WRDSV)            |         OR      (HL)            ;     
  37. |         OR      (HL)                 |         LD      (CTLSV),A       ; And 
  38. |         LD      (CTLSV),A       ; ...|         POP     HL              ;     
  39. |         POP     HL                   |         JP      WR$MODCTLP      ; Now 
  40. |         JP      WR$MODCTLP      ; now|                                 ;     
  41.  
  42.  
  43. Up and Down.....
  44.  
  45.      MORE   LINE:    1  COL:  1                                             EZ 
  46. =WINDOW @======================================================================
  47.  ; parity, and stop bit parameters of ACIA.                                    
  48.  ;                                                                             
  49.  CHNGPORT:                                                                     
  50.          LD      A,(INTFLG)      ; get the INT flag                            
  51.          OR      A               ; test it                                     
  52.          JR      Z,NOTINT        ; go do non-INT stuff                         
  53.          CALL    INTON           ; turn int on                                 
  54.          LD      A,(PARSV)       ; get current parity byte                     
  55.          OR      09H             ; req'd for int                               
  56.          JR      DOIT            ; go set up w/int                             
  57. =WINDOW Z======================================================================
  58.  CHNGPORT:                                                                     
  59.          LD      A,(INTFLG)      ; Get the INT flag                            
  60.          OR      A               ; Test it                                     
  61.          LD      A,(PARSV)       ; Get current parity byte                     
  62.          JR      Z,NOINT         ; Go do non-INT stuff                         
  63.                                  ;                                             
  64.          AND     11111101B       ; Enable recv int's                           
  65.          JR      DOIT            ;                                             
  66.                                  ;                                             
  67.  NOINT:  OR      00000010B       ;
  68.  
  69.  
  70. And finally..... mixed!
  71.  
  72.  
  73.      MORE   LINE:   16  COL:  1                                             EB 
  74. =WINDOW @===============================WINDOW Z===============================
  75. | ADDLF:  DB      NO      ; No=no LF af| CHNGPORT:                             
  76. |                         ; terminal mo|         LD      A,(INTFLG)      ; Get 
  77. | TOGLF:  DB      YES     ; Yes=allow t|         OR      A               ; Test
  78. | TRNLOG: DB      NO      ; Yes=allow t|         LD      A,(PARSV)       ; Get 
  79. |                         ; Write logon|         JR      Z,NOINT         ; Go d
  80. | SAVCCP: DB      NO      ; Yes=do not |                                 ;     
  81. | LOCNXT: DB      NO      ; Yes=local c=WINDOW B===============================
  82. |                         ; No=not loca| CLOCK:  DB      XTAL * 12             
  83. | TOGLOC: DB      YES     ; Yes=allow t| MSPEED: DB      5       ; this is now 
  84. =WINDOW A==============================| BYTDLY: DB      5       ; Default time
  85. | ;                                    |                         ; terminal mod
  86. | MDSNDB  EQU     10H                  |                         ; 0=0 delay, 1
  87. | MDSNDR  EQU     10H                  | CRDLY:  DB      9       ; End-of-line 
  88. | MDRCVB  EQU     08H                  |                         ; mode file tr
  89. | MDRCVR  EQU     08H                  |                         ; 0=0 delay, 1
  90. | ;                                    | COLUMS: DB      5       ; Number of di
  91. | BRKMSK  EQU     0CH             ; Mas| SETFL:  DB      YES     ; Yes=user-def
  92. | DISCB   EQU     0AH             ; Com| SCRTST: DB      YES     ; Yes=if home 
  93. | ;................................    =WINDOW $===============================
  94. |                                      |COMMAND:                               
  95. |                               
  96.  
  97. VEDIT is available from Compuview. It is available is three versions for CP/M
  98. at a currently special price:
  99.  
  100. v1.4  Single File, no windows:      $49
  101. v2.32 Multi File, no windows:       $79
  102. v2.33 Multi File, w/windows:        $95
  103.  
  104. Upgrade to v2.33                    $60
  105.  
  106. CompuView  313-996-1299
  107.  
  108. I'm not affiliated with them.... just an enthused user!   -Jim Lill
  109.