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 / ZCPR33 / A-R / RCPPEEP.LBR / RPEEP.DZC / RPEEP.DOC
Text File  |  2000-06-30  |  4KB  |  88 lines

  1. ;=============================================================================
  2. ;
  3. ;        P E E P    C O M M A N D
  4. ;
  5. ;============================================================================
  6.  
  7. ; +++++++    NOT an official RCP segment for Z33RCP.Z80
  8. ;        This is a hacker's module intended to work with Z33RCP.
  9.  
  10. ; Command:    PEEP
  11. ; Function:    Text File Browser and Lister
  12. ; Comments:    The CRT protocol has to be hard coded into this module.
  13. ;        If the TCAP were used, PEEP would not be practical.
  14. ;        PEEPSECURE equate determines where the file is loaded.
  15. ; Author:     Rob Friefeld, 4607 Colorado St., Long Beach, CA 213-434-7338
  16. ; Date:        23 Aug 1987 Version 1.0
  17.  
  18. ;----------------------------------------------------------------------------
  19. ; Usage:    Hands rest on the home row of keys.  Left hand moves ahead
  20. ;        through text, right hand moves back.
  21. ;                                                            ---
  22. ;                                              Go To Marker | 0 |
  23. ;                                                            ---
  24. ;                      Read More                     Init    Set    Print
  25. ;                  (if memory full)                 Printer Marker (from mark)
  26. ;                         ---                         ---    ---    ---
  27. ;                        | R |                       | I |  | O |  | P |
  28. ;                         ---                         ---    ---    ---
  29. ;    ---    ---    ---    ---    ---    ---    ---    ---    ---    ---
  30. ;   | A |  | S |  | D |  | F |  | G |  | H |  | J |  | K |  | L |  | ; |
  31. ;    ---    ---    ---    ---    ---    ---    ---    ---    ---    ---
  32. ;    End   Scan   Next   Next    Find   Rpt    Prev   Prev  R/Scan  Top
  33. ;  Screen         Line  Screen         Find   Screen  Line         Screen
  34. ;
  35. ;
  36. ;  X - Exit   <sp> - Hop 10 lines   <cr> - Next Screen (F)  </,?> - File Name
  37. ;----------------------------------------------------------------------------
  38.  
  39. The text movement commands should be self-demonstrating.  I hope with a
  40. minute or two practice, they become easy enough to use.
  41.  
  42. If the entire file will not fit in memory, a message is printed.  The 'R'
  43. command will then read in the next TPA sized chunk of the file with one
  44. screen of overlap.  If there is no more to be read, you can start over at
  45. the beginning.
  46.  
  47. The 'O' command sets a place marker to the top of the current screen.  You can
  48. return to it with a '0'.  The marker is also used as the start of the block
  49. to be listed with the 'P' command.  The end of the block is the bottom of the
  50. current screen.  A prompt will ask if you really want to do a listing to
  51. 1) give you a chance to recover from an accidental key strike, 2) make sure
  52. the printer is on, 3) think one last time about where the marker is:  it
  53. is initialized to the start of the text.  A printer initialization string
  54. can be installed if desired.
  55.  
  56. Sorry about not using the TCAP video.  Aside from the problem of no "insert
  57. line" sequence, the access routines would make PEEP unwieldy.  (Since I only
  58. have one terminal, I prefer to customize the routine rather than do without.)
  59.  
  60. The CRT requirements are:
  61.  
  62.     COMMAND        DEFAULT
  63.     -------        -------
  64.     CLS        1A
  65.     EREOL        ESC,'T'
  66.     GOTOXY        ESC,'=',row+32,col+32
  67.     INSERT LINE    ESC,'E'
  68.     HOME CURSOR    1E
  69.     STAND OUT    ESC,')'        ;optional
  70.     STAND END    ESC,'('        ;optional
  71.  
  72. The source file contains instructions for setting up the video sequences.
  73.  
  74. ;
  75. ; PEEP EQUATES
  76. ;
  77.  
  78. PEEPGO    EQU    NO        ; Insert jump instruction to PEEP at 100h
  79.  
  80. The text is normally read into the TPA at 100h.  If an object file were
  81. read, (the display would be garbage), one could exit and execute the file
  82. with a GO command.  If there is some reason to avoid this possibility,
  83. PEEPGO    EQU  YES  inserts a jump instruction to the PEEP code in the RCP
  84. and then reads the text to 103h and above.  So a GO will only restart PEEP.
  85.  
  86.  
  87. END PEEP.DOCtion to the PEEP code in the RCP
  88. and then reads the