home *** CD-ROM | disk | FTP | other *** search
- ; title 'disk7 -- cp/m-80 file manipulation program'
-
- VERS EQU 7$7 ;version number..
- MONTH EQU 01 ;..month..
- DAY EQU 05 ;..day..
- YEAR EQU 84 ;..and year.
-
- ; copyright (c) 1984 by frank gaude'. all rights reserved. monetary
- ; gain not permitted under any circumstance by individual, partnership,
- ; or corporation, without written permission from copyright assignee,
- ; echelon, inc., los altos hills, ca.
-
- ; 'disk7' is based on common ideas presented in 'cleanup', 'wash', and
- ; 'sweep', written by ward christensen, michael karas, and robert fisher
- ; respectively. existence of these programs generated impetus for
- ; writing 'disk7'.
-
- ; a single-screen menu is provided after entering 'disk7' followed by
- ; cursor return. wildcard filenames and optional drive declaration are
- ; permitted. disk7 [d:]*.asm shows only 'asm' files on [selected] or
- ; current drive. pressing any other than a command key causes the menu
- ; to reappear. narrow osborne-1 type crt screens are handled if osborne
- ; equate is set true before assembly. full error trapping and command
- ; cancellation recovery are provided. cancellation occurs by entering a
- ; <return>, if no other entry has been made and execution has not begun.
- ; command line prompts report incorrect operator responses and if hard-
- ; ware problems exist.
-
- ; display is circular, single-file columnar, with crt console cursor
- ; moved 'forward' with <space> or <return>, and 'reverse' with 'b' or
- ; <backspace>. drive remaining storage in kilobytes is automatically
- ; displayed whenever disks are logged-in or menu recalled. if a user
- ; area with no files is logged-in, new 'dir'ectory prompt is presented;
- ; here, option to exit program is also offered. the term 'dir'ectory
- ; refers to 'drive/user area'.
-
- ; command functions of 'disk7' are:
-
- ; c - copy file to another drive/user with automatic 'crc' verifi-
- ; cation. format is --> new 'dir'ectory: 'd[nn]<return>' where
- ; 'd' is drive and 'n' is optional user area. a 'colon' after
- ; the drive or user area is optional. d, d:, dn, dn:, dnn, dnn:
- ; are all valid entries. (system reset occurs for disk change.)
- ; prompts to erase already existing file on destination drive or
- ; in another user area.
- ; d - delete file from disk, prompts for certainty.
- ; g - go to a filename. prompts for name, wildcards permitted such
- ; as (fn.*).
- ; j - jump 'forward' 22 file names. used to quickly scan through
- ; lengthy disk directories.
- ; l - file length (size) in kilobytes, rounded up to next disk
- ; allocation block.
- ; n - new 'dir'ectory, login new drive/user for display and reset
- ; system for disk changes. format is same as 'c' for copy.
- ; m - mass copy of tagged files to another drive/user area. auto-
- ; erase occurs if file(s) already exist(s). prompts for desired
- ; drive/user area as with 'c' and 'n'. mass copy function can
- ; be repeated without re-tagging files. simply enter 'm' again
- ; to copy previously tagged files to another drive/user area.
- ; (entering 'm' without any files tagged causes cursor to move
- ; to directory beginning.)
- ; p - print text file to cp/m list device (printer), <ctrl-c> or
- ; <esc> cancels. full pagination provided. filename printed at
- ; top of each page, blank lines inserted at page boundaries.
- ; r - rename file on current disk, only cp/m convention names
- ; permitted.
- ; s - stat of disk, storage remaining on requested drive in
- ; kilobytes.
- ; t - tag file for inclusion for mass copy to another drive/user
- ; area. file remains tagged until either a disk login or 'u' is
- ; used to untag it. a '*' marker is placed on tagged filename
- ; cursor line as a reminder file is tagged for mass copy. tag-
- ; ged file size is shown, totals accumulated and presented in
- ; parentheses.
- ; u - untag file previously tagged for mass copy. 'u' can be used
- ; to move cursor 'forward' for quick untagging of files. log-
- ; ging-in drive again with 'l' also quickly untags all files.
- ; v - view text file on console, with pagination and single-line
- ; turn-up. <crtl-c> or <esc> cancels function. only 'ascii'
- ; characters processed. single-line menu shown top of first
- ; page.
- ; x - exit to cp/m (to ccp without rebooting, or optionally warmboot
- ; if program assembled with 'warmboot' equate set true.) <esc>
- ; also exits to cp/m.
-
- ; 'disk7' is an alternative to 'pip' and 'sweep'. conveniently, it can
- ; be added as a subroutine to application programs that require file
- ; manipulation but without returning to the cp/m operating system.
- ; 'disk7' loads fast and copies files at near theoretical speed using
- ; an 8-bit 'crc' table-driven ccitt recommended routine. a compact menu
- ; makes operation essentially self-documenting. disk7.com occupies a
- ; few bytes less than 4k for z80 assembly, a few over for 8080.
-
- ; installation requires setting maximum allowed drive (maxdr) to be
- ; logged-in or copied to, z80 or 8080 CPU, and deciding to warmboot or
- ; not on returning to cp/m. these equate options plus several others
- ; begin at program 'starting definitions' below. assemble using dri
- ; 'mac.com'.
-
- ; disk7 works with cp/m 2.2 (and above) with 24k or more of ram. file
- ; copy functions are faster with larger amounts of ram.
-
- ; please report bugs noted or improvements incorporated to frank gaude'
- ; at 10925 stonebrook drive, los altos hills, ca 94022. telephone is
- ; 415/941-2219, 6pm to 10pm daily, pacific time.