Subversion Repositories vg_z80_sbc

VECTOR GRAPHIC 00K CP/M - VERSION 2.22 H
:1019F0000000FE04D0326A206FE5CD721A21532018
:101A0000118D1778326E20B72803215C2001090060



SYSGEN  COMSUBMIT  COM
STAT    COM)BCDPIP     COM:EFGHFORMAT  COMIBACKUP  COM


CONSTRUCTING 00K CP/M - VERSION 2.22 H$
WHICH DRIVES SHOULD BE SINGLE-SIDED ($): $
VECTOR GRAPHIC 00K CP/M - VERSION 2.22 H
READY FOR "SYSGEN" OR "SAVE 00 CPM00.COM"


:1019F0000000FE04D0326A206FE5CD721A21532018
:101A0000118D1778326E20B72803215C2001090060


CONSTRUCTING 00K CP/M - VERSION 2.22 P$
WHICH DRIVES SHOULD BE SINGLE-SIDED ($): $
VECTOR GRAPHIC 00K CP/M - VERSION 2.22 P
READY FOR "PUTSYS8" OR "SAVE 00 CPM00.COM"



"-






*-"
"

6*
"
*
â*
2
2
w#w#"(
*/+"
!0
og"
"&
"*
",
`i"*
:
*(
"X
##"
",
*
"&
͙
*
*"
2
!*"
Ϳ
ù#̈́:*X
2S
`i"Z
U9Ç9!^
F :
!g
!^
T
"V
#:"

BIOS located at  Top of memory at 

Press ESC or SPACE key to interrupt test
or CONTROL C to reboot CP/M at any time. 


Owned by Microsoft
Memory size BYTES FREE
BASIC - REVISION 4.51
VECTOR GRAPHIC SYSTEMS 
COPYRIGHT (C) 1977 MICROSOFT
which starts above this program and ends at BIOS.
"CR" to continue test - "ESC", "SP" or "^C" to stop 

Starting address (Hex or "CR") 
Re-enter, starting address must be at least 

Ending address   (Hex or "CR") 

MEMR Rasmussen Memory Test - Version 2.2
Input error - Retype 4 hex digits 
Fast complement test from 0 to 
Bit stuck high or low test 
Adjacent bits shorted test 
Checkerboard pattern test 
Walking bit  left test 
Walking bit right test 
Random number test - Cycle: 
M1 cycle test - 4K block: 
Test series completeLOCATION  SHOULD BE           WAS
$Switched to 8080 processor.
j
$Some failure detected.
$  OK
$  ERROR **** crc expected:$ found:$
$Switched to 8080 processor.
p
&o"~
>2}
2w
2y
2x
:w
W:w
q#:v
`i
">2w

Owned by Microsoft
 Bytes freeBASIC - Version 5.211
Copyright 1981 (C) Vector Graphic

Owned by Microsoft
 Bytes freeBASIC - Version 5.211
Copyright 1981 (C) Vector Graphic
o
z
C

THIS PROCEDURE ONLY WORKS ON VECTOR GRAPHIC VERSION 2
CPM SYSTEMS CONFIGURED FOR MINI-FLOPPY DRIVES$
MINI FLOPPY FORMAT - VERSION 1.5$

DRIVE TO FORMAT ($) :$

FORMATTING DRIVE A AS $ SIDED.
$SINGLE$DOUBLE$FORMAT COMPLETE

(R) RETURN TO SYSTEM   (F) FORMAT ANOTHER DISK


$
THIS PROCEDURE ONLY WORKS ON VECTOR GRAPHIC MINI-FLOPPY
CP/M 2 SYSTEMS OF 48K IN SIZE OR GREATER$
FLOPPY BACKUP - VERSION 1.5$

SOURCE DRIVE - $    DESTINATION DRIVE - $


(R) RETURN TO SYSTEM  (B) EXECUTE BACKUP AGAIN

USER CONFIGURATION FOR VECTOR GRAPHIC SYSTEMS - VERSION 2.92
$

Parallel I/O for -             (A) Bitstreamer I or II
                               (B) ZCB single board computer

Select one of the above :$-----------
Set drive steprate: (F) = Fast, (S) = Slow

PHYSICAL UNIT 0: $-----------
               (C)  Centronics   (D)  System printer
               (E)  No printer

Select one of the above :$Enable auto-page on non-console list output ? (Y/N) :$-----------
Auto command specification -  (A)  Execute on cold boot
Compare verify and write checksums: (E) = enable, (D) = disable: $-----------
Read before/after write: (E) = enable, (D) = disable: $System printer prom not installed.$
$--------
                         (B)  Execute on warm boot
                              (C)  Execute on both
                              (D)  Clear auto command

Select one of the above :$Enter auto command :$-----------
Compare verify and write checksums: (E) = enable, (D) = disable: $-----------
Read before/after write: (E) = enable, (D) = disable: $System printer prom not installed.$
$--------
$Changes made permanent$THIS PROGRAM ONLY WORKS WITH VECTOR GRAPHIC CP/M 2







     

       

(C) CONTINUE FORMAT, WITH NEXT SECTOR
(R) RETRY FORMAT, WITH SAME SECTOR$
FORMAT COMPLETE.
INITDSK8  Ver. 1.1
Copyright (C) 1981
Vector Graphic Inc.

(1) FORMAT ENTIRE DISK
(2) FORMAT LOGICAL DRIVE "A"
(3) FORMAT LOGICAL DRIVE "B"
(5) FORMAT LOGICAL DRIVE "D"

SELECT ONE OF ABOVE: $
$
FORMAT ERROR.$
ERROR ON: HEAD $  TRACK $  SECTOR $

the section of file contained in the bad block will be moved to a good section
of the disk.

  Two options may be specified while testing a file.  The "$A" (Auto-rewrite)
This operation should be performed for every disk after it has been
formatted and the system has been configured.  All reclaimed blocks will
VERSION ERROR- Not a VECTOR GRAPHIC system.$
RESTORE ERROR- Track 0 not found.$
TIMEOUT ERROR- on seek complete.$
SELECT ERROR- Controller not jumpered for hard disk.$
TIMEOUT ERROR- Controller loss of sync.$
"$E" (Edit) option will allow the user to edit the file information contained
in the bad sector before rewriting it to disk or relocating it to a different
part of the disk.  Both options may be used simultaneously.

bad disk space.

  The "$A" (Auto-rewrite) option may be incorporated with this mode as a
time saving device.  If this option is chosen, the program will automa-
ERROR - NOT SUPPORTED UNDER THIS CP/M VERSION

  This program is a dual purpose utility to test and reclaim files and disk
SELECT ERROR- Write fault detected.$
TIMEOUT ERROR- on controller busy.$
READ/WRITE ERROR.$
PUTSYS8   Ver. 1.2
ERROR - ILLEGAL DRIVE



  RECLAIM filename.typ $AE or RECLAIM x:filename.typ $AE

  In the event that an unambiguous filename is specified, RECLAIM will only
test the disk blocks containing that file.  Any bad blocks encounterd may
CP/M 2.21 release 4 or newer.

  1) RECLAIM x:$A

  Typing "RECLAIM" followed by a drive name (x), will test the entire file
space of the designated disk.  If an error is encountered the user may
Vector Graphic Inc.

   0) ... 256 ENTRIES
   1) ... 512 ENTRIES
   2) ... 768 ENTRIES
   3) ... 1024 ENTRIES
SELECT DIRECTORY SIZE FOR SYSTEM (RETURN FOR NO CHANGE): $
DESTINATION DRIVE NAME (OR RETURN TO REBOOT): $
VECTOR GRAPHIC DISK RECLAIMER - VER. 1.1

ERROR - CAN T OPEN TEMP FILE
TEST COMPLETE
TEST COMPLETE
ERROR - ILLEGAL FILE NAME
ERROR - DIRECTORY I/O ERROR
OT FOUND
ERROR - FILE IS READ ONLY
ERROR - CAN T OPEN TRANSFER FILE
VECTOR GRAPHIC FILE RECLAIMER - VER. 1.1

FATAL ERROR IN DISK DIRECTORY
*** WARNING - FILES WITH EIGHT CHARACTER FILENAMES WILL NOT BE COPIED ***
$      O MANY FLOPPIES STORE - Version 3.1
Copyright (C) 1981, Vector Graphic Inc.
ͣ!
   z
!"w
Copyright (C) 1981, Vector Graphic Inc.
"w
#"w
*w
V
Copyright (C) 1981, Vector Graphic Inc.
500 North Ventu Park Road, Thousand Oaks, CA  91320-0534
$INSERT FIRST FLOPPY DISK AND PRESS RETURN$        .   FILE NOT FOUND$INSERT NEXT FLOPPY WITH "8
PAD-CHAR to define the pad character to use
PADDING to define the number of PAD-CHAR to use
START-OF-PACKET to define the start of packet character
FILE-MODE for outgoing files
FLOW-CONTROL to set XON/XOFF flow control
IBM mode: parity and turn around handling
INCOMPLETE-FILE disposition
LOCAL-ECHO (half-duplex)
LOGGING of terminal sessions
PAUSE to wait for a little time
PRINT a file to the printer
QUIT to CP/M
RECEIVE file from host
REMOTE to send commands to a remote server
RENAME to rename a CP/M file
SEND file to host
SET a parameter
SHOW the parameters
STATUS of Kermit
PARITY for communication line
PORT to communicate on
PRINTER copy control
RECEIVE parameters
SEND parameters
SPEED of communication line
TAC interface support
TERMINAL to set a terminal type
TIMER control
USER to set a user number
TAKE commands from a file
TRANSMIT file to host (in connect state)
TYPE a file to the console
$ISTATUS$USTAY$XTAKE$   TRANSMIT$(<TYPE$GCVERSION$
BREAK to send a break to the host
BYE to host (LOGOUT) and exit to CP/M
CONNECT to host on selected port
COPY to copy a CP/M file
DIRECTORY of current used Micro-disk
ERASE a CP/M file
BACKUP (rename) existing files
1-CHARACTER-CHECKSUM
2-CHARACTER-CHECKSUM
BLOCK-CHECK-TYPE for error detection
BUFFER-SIZE for multi-sector buffering
COLLISION to specify action for filename conflicts
DEBUG message control
DEFAULT-DISK to receive data
DIRECTORY-FILE-SIZE when displaying directories
FINISH running Kermit on the host
GET a file from the host
HELP by giving this message
INPUT to make the micro wait for a string from the host
LOG the terminal sessions to a file
LOGOUT the host
OVERWRITE existing files
ON to enable TAC trap
OFF to disable TAC trap
DUMB - only printable characters passed to terminal
OFF - all characters passed to terminal
QUIET - display nothing during transfers
REGULAR - normal display for transfers
o







*  USER CONFIGURATION MODULE FOR VECTOR GRAPHIC
*  DISK SYSTEMS AND CP/M 2.2X
*  COPYRIGHT (C) 1979,1980,1981 VECTOR GRAPHIC INC.
*  LAST REVISION DATE: 08/14/81
*
*  This module contains the source code for the user configuration
                JMP     PUNCH           ;USER PHYSICAL PUNCH
                JMP     READER          ;USER PHYSICAL READER
*
*  ROUTINES IN ORDER OF JUMP TABLE
*
COLDBOOT        EQU     $
*
                IFT     TIMESHARE
*
                LXI     H,INITFLAG      ;POINT TO PRINTER INIT FLAG
                MOV     A,M
                ORA     A
*                                       1 = ON, 0 = OFF
*               BIT  7                  AUTOMATIC PAGING FLAG
*                                       1 = ON, 0 = OFF
*
*  TEMPORARY    STORAGE
*  - PLACED AT BEGINNING TO KEEP POSITION CONSTANT, RELATIVE
*    TO BEGINNING OF USER AREA
*
*
*  DEFINITION OPTIONS
*
*  PRINTER CONFIGURATIONS (ONE ONLY)
*
C.PINH          EQU     0                ;INHIBIT PRINTER, SEND LIST TO CONSOLE
C.PTTY          EQU     1               ;USE TTY DRIVER
C.PQUM          EQU     2               ;USE QUME DRIVER
C.PCEN          EQU     4               ;USE CENTRONICS DRIVER
SER.DATA        EQU     BS.BASE+4       ;SERIAL DATA PORT
SER.STAT        EQU     BS.BASE+5       ;SERIAL STATUS/COMMAND PORT
PAR.PORT        EQU     BS.BASE+6       ;PARALLEL STATUS/DATA PORT (I/O)
PAR.CNTL        EQU     BS.BASE+6       ;PARALLEL CONTROL PORT (ZCB)
*  sections.
*
*     (1)       Defining the user option and printer configuration
*               byte.
*     (2)       Source code for the different printer drivers.
*
                MVI     M,0FFH          ;ELSE SET FLAG AND PERFORM INIT
*
                ENDIF
*
                MVI     A,89H           ;INIT BYTE FOR 8255
                OUT     PAR.INIT        ;(ZCB PARALLEL)
COLDBOOT10      CALL    USRSETUP        ;GET PRINTER CODE
                RZ                      ;NO PRINTER - SKIP INIT
PAGEPOS         DB      00              ;PAGE POSITION - THIRD BYTE
PAGESIZE        DB      0,0,0,0         ;FORM SIZE DECLARATION
USRCONF2        DB      80H             ;SET FOR ZCB BOARD
*
* A DESCRIPTION OF USRCONF2:
*
*               BITS 0 - 6              RESERVED
*               BIT  7                  I/O BOARD FLAG
*
C.APGE          EQU     80H             ;AUTOMATIC PAGING OF LIST OUTPUT
*
*  SPECIFY CONFIGURATION BYTE BY SELECTING (ADDING) OPTIONS AS REQUIRED
*
USRCONF         DB      C.PINH          ;DEFAULT AT NO PRINTER
*
* A DESCRIPTION OF USRCONF:
*
PAR.STAT        EQU     BS.BASE+8       ;PARALLEL STATUS PORT (ZCB)
PAR.INIT        EQU     BS.BASE+9       ;PARALLEL INITIALIZATION PORT (ZCB)
EXT.PRT         EQU     0EC00H          ;EXTERNAL PRINTER INIT ENTRY
*                                       ;- DATA AT EXT.PRT+3
*                                       ;- STATUS AT EXT.PRT+6
*
                IFT     TIMESHARE

*  Vector Graphic CP/M 2 users documentation.
*
***********************************************************************
*
                TITLE   USER CONFIGURATION AREA
*
*  DEFINE WHERE THE USER AREA BEGINS BY REQUESTING THE SYSTEM SIZE
                JNC     EXT.PRT         ;INITIALIZE EXTERNAL PRINTER
                CPI     C.PCEN          ;CHECK FOR CENTRONICS
                JRZ     COLDBOOT20      ;SPECIAL IF CENTRONICS
                                        ;OTHERWISE - ASSUME SERIAL
*
*  INITIALIZE BITSTREAMER USART - ONLY NECESSARY ON COLD START
*
*
***********************************************************************
*
*  BEGIN ENTRY JUMP TABLE
*
                JMP     COLDBOOT        ;USER BOOT BOOT INITIALIZE
                JMP     WARMBOOT        ;USER WARM BOOT INITIALIZE
                JMP     LISTSTATUS      ;LIST STATUS REQUEST
*               BIT  3                  COLD BOOT PROMPT INHIBIT
*                                       1 = INHIBIT, 0 = PERFORM
*               BIT  4                  CONSOLE TO PRINTER INHIBIT
*                                       1 = INHIBIT, 0 = PERFORM
*               BIT  5                  COLD BOOT AUTO COMMAND FLAG
*                                       1 = ON, 0 = OFF
INITFLAG        EQU     0FF19H          ;PRINTER INIT FLAG
*
                ENDIF
*
                ORG     USERAREA        ;BEGIN EXECUTABLE CODE
*
***********************************************************************
*
*  DEFINE THE SYSTEM OPTION AND PRINTER CONFIGURATION BYTE
*
MEMSIZE         REQ     'SYSTEM SIZE (IN K BYTES): '
TIMESHARE       REQ     'TIMESHARE SYSTEM (0=NO, 1=YES): '
*
USERAREA        EQU     MEMSIZE*1024-300H
*
BS.BASE         EQU     2               ;BITSTREAMER 2 BASE ADDRESS
COM.DATA        EQU     BS.BASE+2       ;COMMUNICATIONS DATA
                LXI     B,0600H+SER.STAT;GET READY TO SEND 6 BYTES
INITLOOP        OUTI
                XTHL                    ;SHORT DELAY FOR 6MHz USARTS
                XTHL
                JRNZ    INITLOOP
                RET
*
COLDBOOT20      MVI     A,80H           ;STROBE IS BIT 7 (I/O)
                MOV     A,C
                OUT     COM.DATA
                RET
*
*  LOGICAL READER INPUT
*  SETUP FOR DATA COMMUNICATIONS
*  INITIALIZATION IS RESPONSIBILITY OF SYSTEM MONITOR
*
READER          IN      COM.STAT        ;GET STATUS
                BIT     1,A
                JRZ     READER
                IN      COM.DATA        ;GET DATA
                XTHL
                INR     A
                OUT     PAR.CNTL        ;SET STROBE HIGH AGAIN
                RET
LISTDATA20      OUT     SER.DATA        ;SEND IT OUT
                CPI     0AH             ;LINEFEED ?
                RNZ                     ;NO MORE ATTENTION
                MOV     A,B             ;GET SAVED USERCONF
                CPI     C.PQUM
                RNZ                     ;ALL DONE WITH STANDARD
*  NOTE: REGISTER 'C' IS UNCHANGED
*
LISTDATA        CALL    LISTSTATUS      ;GET PRINTER STATUS
                ORA     A
                JRZ     LISTDATA        ;WAIT UNTIL READY
                CALL    USRSETUP        ;SET POINTER,GET PRINTER CODE
                MOV     B,A             ;SAVE PRINTER CODE
                DCR     A               ;0 = NOT READY
                RET                     ;FF = READY
LISTSTATUS20    IN      SER.STAT        ;GET SERIAL STATUS
                ANI     1
                DCR     A               ;0 = NOT READY
                CMA                     ;FF = READY
                RET
*
*  LIST OUTPUT SECTION
*  NOTE: REGISTER 'C' IS UNCHANGED
*
                JRZ     COLDBOOT30
                RLC                     ;STROBE IS BIT 0 (ZCB)
COLDBOOT30      OUT     PAR.CNTL
                RET
*
SERINIT         DB      0,0,0           ;RESET USART
                DB      40H,0CEH,27H    ;MODE AND COMMAND
*
* WARM BOOT ROUTINE
*
WARMBOOT        RET                     ;OPEN FOR NOW
*
*  STATUS OF LIST DEVICE
*
                RET
*
USRSETUP        LXI     H,USRCONF2      ;SET MEMORY POINTER
                LDA     USRCONF         ;GET CONFIG BYTE 1
                ANI     07H             ;CLEAR OUT THE PRINTER CODE
                RET
*
                FILL    USERAREA+256-$,0 ;CLEAR REMAINING SPACE
*
                ORA     A
                JRZ     LISTDATA30      ;LOOP UNTIL READY
                MVI     A,3             ;END OF TEXT CHARACTER
                OUT     SER.DATA        ;SEND IT OUT
LISTDATA40      IN      SER.STAT        ;WAIT FOR ACKNOWLEGE
                BIT     1,A
                JRZ     LISTDATA40
                IN      SER.DATA
                RES     7,A
                JNC     EXT.PRT+3       ;EXTERNAL ROUTINE (CHAR IN C)
                CPI     C.PCEN          ;CENTRONICS PRINTER ?
                MOV     A,C             ;MOVE IN CHARACTER
                JRNZ    LISTDATA20      ;ASSUME SERIAL
                BIT     7,M             ;ZCB OR I/O ?
                JRNZ    LISTDATA10      ;JUMP IF ZCB
                SET     7,A             ;SET STROBE
                OUT     PAR.PORT
                MOV     A,C
                LXI     H,PAGEPOS       ;POSITION ON PAGE
                CPI     0CH             ;FORMFEED ?
                JRZ     LISTOUT20       ;CLEAR PAGEPOS AND RETURN
LISTOUT10       CPI     0AH             ;CARRIAGE RETURN
                RNZ                     ;NO SPECIAL ATTENTION
                INR     M
                LDA     LINECOUNT       ;GET CURRENT SIZE
 STATUS OF LIST DEVICE IN (A)
*    00 - PRINTER IS NOT READY FOR CHARACTER
*    FF - CHARACTER CAN BE SENT TO THE PRINTER
*  NOTE: REGISTER 'C' IS UNCHANGED
*
LISTSTATUS      CALL    USRSETUP        ;SET POINTER,GET PRINTER CODE
                JRNZ    LISTDATA40      ;CONTINUE WAITING
                RET
*
*  LOGICAL PUNCH OUPUT
*  SETUP FOR DATA COMMUNICATIONS
*  INITIALIZATION IS RESPONSIBILITY OF SYSTEM MONITOR
*
PUNCH           IN      COM.STAT        ;GET STATUS
                BIT     0,A
                OUT     PAR.PORT        ;PULSED OUTPUT
                XTHL                    ;PULSE WIDTH DELAY
                XTHL
                SET     7,A             ;SET STROBE AGAIN
                OUT     PAR.PORT
                RET
LISTDATA10      OUT     PAR.DATA        ;SEND IT OUT
                XRA     A
                OUT     PAR.CNTL        ;STROBE SET LOW (LATCH DATA)
                RNC
                LDA     USRCONF         ;GET CONFIGURATION BYTE
                ANI     C.APGE          ;CHECK FOR AUTO PAGING
LISTOUT20       MVI     M,0             ;CLEAR PAGEPOS
                RZ                      ;RETURN IF NOT ACTIVE
                MVI     C,0CH           ;FORM FEED PRINTER
                                        ;FALL THRU TO LISTDATA ROUTINE
*
                JNC     EXT.PRT+6       ;CHECK EXTERNAL PRINTER
                CPI     C.PCEN          ;CHECK FOR CENTRONICS
                JRNZ    LISTSTATUS20    ;ASSUME SERIAL
                IN      PAR.STAT        ;GET STATUS (ZCB)
                BIT     7,M             ;ZCB OR I/O BOARD ?
                JRNZ    LISTSTATUS10    ;INPUT IS VALID
                IN      PAR.PORT        ;GET STATUS (I/O)
*  USER CONFIGURATION MODULE FOR THE VECTOR GRAPHIC CP/M 2.0 SYSTEMS
*  COPYRIGHT (C) 1979 VECTOR GRAPHIC INC.
*
*  THIS MODULE IS SETUP FOR THE USER WHO WANTS TO WRITE HIS OWN USER I/O
*    "00" - DEVICE (PRINTER) IS NOT READY FOR CHARACTER
*    "FF" - CHARACTER CAN BE SENT TO THE DEVICE (PRINTER)
*
LISTSTATUS      EQU     $
                XRA     A               ;IF NOTHING ELSE PRESENT
                RET
*
*  BEGIN ENTRY JUMP TABLE - THIS CANNOT BE CHANGED
*
                JMP     COLDBOOT        ;USER BOOT BOOT INITIALIZE
                JMP     WARMBOOT        ;USER WARM BOOT INITIALIZE
                JMP     LISTSTATUS      ;LIST STATUS REQUEST
                JMP     LISTOUT         ;USER LIST OUTPUT
                JMP     PUNCH           ;USER PHYSICAL PUNCH
*   THE FIRST TWO BEING THE NUMBER OF LINES PER PAGE AND THE PAGE
*   POSITION.  IF THIS AREA IS USED BY A CUSTOM DRIVER IT IS SUGGESTED
*   THAT THE RELATIVE POSITIONS (FROM THE BEGINNING OF THE USER AREA)
PAR.CNTL        EQU     BS.BASE+6       ;PARALLEL CONTROL PORT (ZCB)
PAR.DATA        EQU     BS.BASE+7       ;PARALLEL DATA PORT (ZCB)
PAR.STAT        EQU     BS.BASE+8       ;PARALLEL STATUS PORT (ZCB)
*  USERAREA.  8 BYTES ARE RESERVED FOR TEMPORARY STORAGE AND 18 ARE
*  RESERVED FOR THE JUMP TABLE, LEAVING 230 BYTES FOR THE USER'S CUSTOM
*  DRIVERS.  SOME SYSTEM PORT DEFINITIONS WERE PROVIDED TO AID IN THE
*  PHYSICAL DEVICE WHEN READY (A CALL TO THE "LISTSTATUS" ROUTINE
*  COULD GIVE YOU THIS INFORMATION).
*
LISTOUT         EQU     $
                RET
*
*  THE PUNCH ROUTINE IS SIMILAR TO THE LISTOUT ROUTINE
*  THE CHARACTER IS PASSED IN THE (C) REGISTER
*
*
*  THE USER COLD BOOT IS CALLED WHEN THE SYSTEM IS COLD STARTED.
*  IT MAY CONTAIN CODE TO INITIALIZE PRINTER DRIVERS, USARTS ETC.
*
COLDBOOT        EQU     $
                RET
*
*   WITH FUTURE CP/M SOFTWARE RELEASES FROM VECTOR GRAPHIC.
*
PAGESIZE        DB      56              ;PAGE SIZE - SECOND BYTE
PAGEPOS         DB      00              ;PAGE POSITION - THIRD BYTE
EXT.PRT         EQU     0EC00H          ;EXTERNAL PRINTER INIT ENTRY
                                        ;DATA AT EXT.PRT+3
                                        ;DATA AT EXT.PRT+6
*
                ORG     USERAREA        ;BEGIN CODE
*
***********************************************************************
*
 I/O BOARD.
*
***********************************************************************
*
*  DEFINE WHERE THE USER AREA BEGINS BY REQUESTING THE SYSTEM SIZE
*
MEMSIZE         REQ     'SYSTEM SIZE (IN K BYTES) :'
*
                RET
*
*  THE READER ROUTINE RETURNS WITH A CHARACTER IN THE (A) REGISTER
*  WHEN AVAILABLE.  THE MOST SIGNIFICANT BIT OF THE CHARACTER
*  SHOULD BE RESET BEFORE RETURNING.  THE END-OF-FILE CONDITION IS
*  BY EITHER A JUMP TO THE WARM START ENTRY AT ADDRESS ZERO OR
*  WHEN A CONTROL(C) IS TYPED BY THE USER.
*
WARMBOOT        EQU     $
                RET
*
*  THIS ROUTINE SHOULD RETURN THE STATUS OF THE CURRENT LIST DEVICE
*
USRCONF2        DB      0
*
***********************************************************************
*
*   THE BIOS EXPECTS THE USERAREA JUMP TABLE TO BE OFFSET 8 BYTES IN,
*   FROM THE BEGINNING OF THE USER AREA.
*
                ORG     USERAREA+8      ;THIS CANNOT BE CHANGED
*  (LEASE SIGNIFICANT BIT IS SET TO NON-ZERO, DIRECTING ALL LIST
*  OUTPUT THROUGH THE USER JUMP TABLE)
*
C.APGE          EQU     80H   ;AUTOMATIC PAGING OF LIST OUTPUT
*
USRCONF         DB      1               ;DEFINE AT NON-ZERO
*
*
BS.BASE         EQU     2               ;BITSTREAMER 2 BASE ADDRESS
COM.DATA        EQU     BS.BASE+2       ;COMMUNICATIONS DATA
COM.STAT        EQU     BS.BASE+3       ;COMMUNICATIONS STATUS
SER.DATA        EQU     BS.BASE+4       ;SERIAL DATA PORT
SER.STAT        EQU     BS.BASE+5       ;SERIAL STATUS/COMMAND PORT
*
READER          EQU     $
                MVI     A,1AH           ;EOF - IF NOTHING ELSE PRESENT
                RES     7,A             ;RESET MOST SIGNIFICANT BIT
                RET
*
;
OPENOK: ;OPEN OPERATION OK, SET BUFFER INDEX TO END
        MVI     A,80H
        STA     IBP     ;SET BUFFER POINTER TO 80H
;       HL CONTAINS NEXT ADDRESS TO PRINT
        LXI     H,0     ;START WITH 0000
;
GLOOP:
        PUSH    H       ;SAVE LINE POSITION
        CALL    GNB
CR      EQU     0DH     ;CARRIAGE RETURN
LF      EQU     0AH     ;LINE FEED
;
;       FILE CONTROL BLOCK DEFINITIONS
FCBDN   EQU     FCB+0   ;DISK NAME
FCBFN   EQU     FCB+1   ;FILE NAME
FCBFT   EQU     FCB+9   ;DISK FILE TYPE (3 CHARACTERS)
FCBRL   EQU     FCB+12  ;FILE'S CURRENT REEL NUMBER
        JC      FINIS   ;CARRY SET BY GNB IF END FILE
        MOV     B,A
;       PRINT HEX VALUES
;       CHECK FOR LINE FOLD
        MOV     A,L
        ANI     0FH     ;CHECK LOW 4 BITS
        JNZ     NONUM
;       PRINT LINE NUMBER
        CALL    CRLF
;
;       CHECK FOR BREAK KEY
        CALL    BREAK
FCBCR   EQU     FCB+32  ;CURRENT (NEXT) RECORD NUMBER (0 TO 127)
FCBLN   EQU     FCB+33  ;FCB LENGTH
;
;       SET UP STACK
        LXI     H,0
        DAD     SP
;       ENTRY STACK POINTER IN HL FROM THE CCP
        SHLD    OLDSP
;
;       COPYRIGHT (C) 1975, 1976, 1977, 1978
;       DIGITAL RESEARCH
;       BOX 579, PACIFIC GROVE
;       CALIFORNIA, 93950
;
        ORG     100H
BDOS    EQU     0005H   ;DOS ENTRY POINT
CONS    EQU     1       ;READ CONSOLE
        RRC             ;INTO CARRY
        JC      FINIS   ;DON'T PRINT ANY MORE
;
        MOV     A,H
        CALL    PHEX
        MOV     A,L
        CALL    PHEX
NONUM:
        INX     H       ;TO NEXT LINE NUMBER
        MVI     A,' '
        CALL    PCHAR
        MOV     A,B
        CALL    PHEX
        JMP     GLOOP
;
FINIS:
;       END OF DUMP, RETURN TO CCP
        LXI     SP,STKTOP
;       READ AND PRINT SUCCESSIVE BUFFERS
        CALL    SETUP   ;SET UP INPUT FILE
        CPI     255     ;255 IF FILE NOT PRESENT
        JNZ     OPENOK  ;SKIP IF OPEN IS OK
;
;       FILE NOT THERE, GIVE ERROR MESSAGE AND RETURN
        LXI     D,OPNMSG
        CALL    ERR
PRINTF  EQU     9       ;BUFFER PRINT ENTRY
BRKF    EQU     11      ;BREAK KEY FUNCTION (TRUE IF CHAR READY)
OPENF   EQU     15      ;FILE OPEN
READF   EQU     20      ;READ FUNCTION
;
FCB     EQU     5CH     ;FILE CONTROL BLOCK ADDRESS
BUFF    EQU     80H     ;INPUT DISK BUFFER ADDRESS
;
        CALL    CRLF
        LHLD    OLDSP
        SPHL
;       STACK POINTER CONTAINS CCP'S STACK LOCATION
        RET             ;TO THE CCP
;
;
;       SUBROUTINES
;
BREAK:  ;CHECK BREAK KEY (ACTUALLY ANY KEY WILL DO)
        PUSH    H
        PUSH    D
        PUSH    B       ;ENVIRONMENT SAVED
        MVI     C,READF
        CALL    BDOS
        POP     B
        POP     D
        POP     H
        RET
;
;       FIXED MESSAGE AREA
SIGNON: DT      'FILE DUMP VERSION 1.4$'
OPNMSG: DB      CR,LF
        DT      'NO INPUT FILE PRESENT ON DISK$'

;       VARIABLE AREA
IBP:    DS      2       ;INPUT BUFFER POINTER
        JNZ     G0
;       READ ANOTHER BUFFER
;
;
        CALL    DISKR
        ORA     A       ;ZERO VALUE IF READ OK
        JZ      G0      ;FOR ANOTHER BYTE
;       END OF DATA, RETURN WITH CARRY SET FOR EOF
        STC
        RET
;
G0:     ;READ THE BYTE AT BUFF+REG A
        MOV     E,A     ;LS BYTE OF BUFFER INDEX
        CALL    BDOS
        POP     B
        POP     D
        POP     H       ;ENVIRONMENT RESTORED
        RET
;
PCHAR:  ;PRINT A CHARACTER
        PUSH    H
        PUSH    D
        PUSH    B       ;SAVED
        MVI     C,TYPEF
        MOV     E,A
        CALL    BDOS
        POP     B
        POP     D
        POP     H       ;RESTORED
        RET
;
CRLF:
        MVI     A,CR
        CALL    PCHAR
;
;       STACK AREA
        DS      64      ;RESERVE 32 LEVEL STACK
STKTOP:
;
PNMSG:        DB      CR,LF
        DT      'NO INPUT FILE PRESENT ON DISK$'

;       VARIABLE AREA
IBP:    DS      2       ;INPUT BUFFER POINTER
        INR     A       ;INDEX=INDEX+1
        STA     IBP     ;BACK TO MEMORY
;       POINTER IS INCREMENTED
;       SAVE THE CURRENT FILE ADDRESS
        LXI     H,BUFF
        DAD     D
;       ABSOLUTE CHARACTER ADDRESS IS IN HL
        MOV     A,M
;       BYTE IS IN THE ACCUMULATOR
        ORA     A       ;RESET CARRY BIT
F
        CALL    PCHAR
        RET
;
;
PNIB:   ;PRINT NIBBLE IN REG A
        ANI     0FH     ;LOW 4 BITS
        CPI     10
        JNC     P10
;       LESS THAN OR EQUAL TO 9
        ADI     '0'
        JMP     PRN
;
;       GREATER OR EQUAL TO 10
P10:    ADI     'A'-10
PRN:    CALL    PCHAR
        RET
;
PHEX:   ;PRINT HEX CHAR IN REG A
;
SETUP:  ;SET UP FILE 
;       OPEN THE FILE FOR INPUT
        XRA     A       ;ZERO TO ACCUM
        STA     FCBCR   ;CLEAR CURRENT RECORD
;
        LXI     D,FCB
        MVI     C,OPENF
        CALL    BDOS
;       255 IN ACCUM IF OPEN ERROR
        RET
;
DISKR:  ;READ DISK FILE RECORD
        PUSH    H
        PUSH    D
        PUSH    B
        RRC
        RRC
        RRC
        RRC
        CALL    PNIB    ;PRINT NIBBLE
        POP     PSW
        CALL    PNIB
        RET
;
ERR:    ;PRINT ERROR MESSAGE
;       D,E ADDRESSES MESSAGE ENDING WITH "$"
        MVI     C,PRINTF        ;PRINT BUFFER FUNCTION
        CALL    BDOS
        RET
;
;
GNB:    ;GET NEXT BYTE
        LDA     IBP
:100110001B0111F301CD9C01C351013E803213023A
:10012000210000E5CDA201E1DA5101477DE60FC2D1
:100130004401CD7201CD59010FDA51017CCD8F01FF
:100140007DCD8F01233E20CD650178CD8F01C32366
0100   005D =   FCBFN    EQU   FCB+1   ;FILE NAME
0100   0065 =   FCBFT    EQU   FCB+9   ;DISK FILE TYPE (3 CHARACTERS)
0100   0068 =   FCBRL    EQU   FCB+12  ;FILE'S CURRENT REEL NUMBER
0100   0002 =   TYPEF    EQU   2       ;TYPE FUNCTION
0100   0009 =   PRINTF   EQU   9       ;BUFFER PRINT ENTRY
0100   000B =   BRKF     EQU   11      ;BREAK KEY FUNCTION (TRUE IF CHAR READY)
:1001600000C1D1E1C9E5D5C50E025FCD0500C1D101
:10017000E1C93E0DCD65013E0ACD6501C9E60FFE20
:100180000AD28901C630C38B01C637CD6501C9F5D6
:100190000F0F0F0FCD7D01F1CD7D01C90E09CD05EA
:1001A00000C93A1302FE80C2B301CDCE01B7CAB373
0100   007C =   FCBCR    EQU   FCB+32  ;CURRENT (NEXT) RECORD NUMBER (0 TO 127)
0100   007D =   FCBLN    EQU   FCB+33  ;FCB LENGTH
0100            ;
0100            ;        SET UP STACK
0100   0014 =   READF    EQU   20      ;READ FUNCTION
0100            ;
0100   005C =   FCB      EQU   5CH     ;FILE CONTROL BLOCK ADDRESS
0100   0080 =   BUFF     EQU   80H     ;INPUT DISK BUFFER ADDRESS
0100            ;

0000            ;        FILE DUMP PROGRAM, READS AN INPUT FILE AND PRINTS IN HEX
0000            ;
0000            ;        COPYRIGHT (C) 1975, 1976, 1977, 1978
16003C321302218000197EB757
:1001C000C9AF327C00115C000E0FCD0500C9E5D52A
:1001D000C5115C000E14CD0500C1D1E1C946494CE2
:1001E000452044554D502056455253494F4E2031DD
:1001F0002E34240D0A4E4F20494E50555420464966
:100200004C452050524553454E54204F4E204449B2
0103 39                  DAD   SP
0104            ;        ENTRY STACK POINTER IN HL FROM THE CCP
0104 221502              SHLD  OLDSP
0107            ;        SET SP TO LOCAL STACK AREA (RESTORED AT FINIS)
0107 315702              LXI   SP,STKTOP
0100   000D =   CR       EQU   0DH     ;CARRIAGE RETURN
0100   000A =   LF       EQU   0AH     ;LINE FEED
0100            ;
0100            ;        FILE CONTROL BLOCK DEFINITIONS
0000            ;        BOX 579, PACIFIC GROVE
0000            ;        CALIFORNIA, 93950
0000            ;
0000                     ORG   100H
0100   0005 =   BDOS     EQU   0005H   ;DOS ENTRY POINT
:0000000000
52044554D502056455253494F4E2031DD
:1001F0002E34240D0A4E4F20494E50555420464966
:100200004C452050524553454E54204F4E204449B2
010A CDC101              CALL  SETUP   ;SET UP INPUT FILE
010D FEFF                CPI   255     ;255 IF FILE NOT PRESENT
010F C21B01              JNZ   OPENOK  ;SKIP IF OPEN IS OK

0168 0E02                MVI   C,TYPEF
016A 5F                  MOV   E,A
016B CD0500              CALL  BDOS
016E C1                  POP   B
016F D1                  POP   D
0170 E1                  POP   H       ;RESTORED
0159            ;
0159            ;        SUBROUTINES
0159            ;
0159            BREAK:   ;CHECK BREAK KEY (ACTUALLY ANY KEY WILL DO)
0159 E5                  PUSH  H
015A D5                  PUSH  D
0140 7D                  MOV   A,L
0141 CD8F01              CALL  PHEX
0144            NONUM:
0144 23                  INX   H       ;TO NEXT LINE NUMBER
0145 3E20                MVI   A,' '
0128 DA5101              JC    FINIS   ;CARRY SET BY GNB IF END FILE
012B 47                  MOV   B,A
012C            ;        PRINT HEX VALUES
012C            ;        CHECK FOR LINE FOLD
0112            ;        FILE NOT THERE, GIVE ERROR MESSAGE AND RETURN
0112 11F301              LXI   D,OPNMSG
0115 CD9C01              CALL  ERR
0118 C35101              JMP   FINIS   ;TO RETURN
011B            ;
0172            ;
0172            CRLF:
0172 3E0D                MVI   A,CR
0174 CD6501              CALL  PCHAR
0177 3E0A                MVI   A,LF
0179 CD6501              CALL  PCHAR
017C C9                  RET
015C 0E0B                MVI   C,BRKF
015E CD0500              CALL  BDOS
0161 C1                  POP   B
0162 D1                  POP   D
0163 E1                  POP   H       ;ENVIRONMENT RESTORED
014A 78                  MOV   A,B
014B CD8F01              CALL  PHEX
014E C32301              JMP   GLOOP
0151            ;
0151            FINIS:
0151            ;        END OF DUMP, RETURN TO CCP
012D E60F                ANI   0FH     ;CHECK LOW 4 BITS
012F C24401              JNZ   NONUM
0132            ;        PRINT LINE NUMBER
0132 CD7201              CALL  CRLF
0135            ;
0135            ;        CHECK FOR BREAK KEY
PERATION OK, SET BUFFER INDEX TO END
011B 3E80                MVI   A,80H
011D 321302              STA   IBP     ;SET BUFFER POINTER TO 80H
0120            ;        HL CONTAINS NEXT ADDRESS TO PRINT
017D            ;
017D            PNIB:    ;PRINT NIBBLE IN REG A
017D E60F                ANI   0FH     ;LOW 4 BITS
017F FE0A                CPI   10
0181 D28901              JNC   P10
0184            ;        LESS THAN OR EQUAL TO 9
0165            ;
0165            PCHAR:   ;PRINT A CHARACTER
0165 E5                  PUSH  H
0166 D5                  PUSH  D
0167 C5                  PUSH  B       ;SAVED
0151 CD7201              CALL  CRLF
0154 2A1502              LHLD  OLDSP
0157 F9                  SPHL
0158            ;        STACK POINTER CONTAINS CCP'S STACK LOCATION
0158 C9                  RET           ;TO THE CCP
0138            ;        ACCUM LSB = 1 IF CHARACTER READY
0138 0F                  RRC           ;INTO CARRY
0139 DA5101              JC    FINIS   ;DON'T PRINT ANY MORE
013C            ;
013C 7C                  MOV   A,H
0123            ;
0123            GLOOP:
0123 E5                  PUSH  H       ;SAVE LINE POSITION
                                                                  PAGE 2

0124 CDA201              CALL  GNB
0186 C38B01              JMP   PRN
0189            ;
0189            ;        GREATER OR EQUAL TO 10
0189 C637       P10:     ADI   'A'-10
018B CD6501     PRN:     CALL  PCHAR
018E C9                  RET
018F            ;
01F3 0D0A       OPNMSG:  DB    CR,LF
01F5 4E4F2049            DT    'NO INPUT FILE PRESENT ON DISK$'
01F9 4E505554    
01FD 2046494C    
0201 45205052    
0205 4553454E    
0209 54204F4E    
020D 20444953    
01CA CD0500              CALL  BDOS
01CD            ;        255 IN ACCUM IF OPEN ERROR
01CD C9                  RET
01CE            ;
01CE            DISKR:   ;READ DISK FILE RECORD
01CE E5                  PUSH  H
01BA            ;        POINTER IS INCREMENTED
01BA            ;        SAVE THE CURRENT FILE ADDRESS
01BA 218000              LXI   H,BUFF
01BD 19                  DAD   D
01A7 C2B301              JNZ   G0
01AA            ;        READ ANOTHER BUFFER
01AA            ;
01AA            ;
01AA CDCE01              CALL  DISKR
01AD B7                  ORA   A       ;ZERO VALUE IF READ OK
018F F5                  PUSH  PSW
0190 0F                  RRC
0191 0F                  RRC
0192 0F                  RRC
0193 0F                  RRC

0211 4B24        
0213            
0213            ;        VARIABLE AREA
0213            IBP:     DS    2       ;INPUT BUFFER POINTER
0215            OLDSP:   DS    2       ;ENTRY SP VALUE FROM CCP
01D0 C5                  PUSH  B
01D1 115C00              LXI   D,FCB
01D4 0E14                MVI   C,READF
01D6 CD0500              CALL  BDOS
01D9 C1                  POP   B
01DA D1                  POP   D
01BE 7E                  MOV   A,M
01BF            ;        BYTE IS IN THE ACCUMULATOR
01BF B7                  ORA   A       ;RESET CARRY BIT
01C0 C9                  RET
01C1            ;
                                                                  PAGE 4

01B1            ;        END OF DATA, RETURN WITH CARRY SET FOR EOF
01B1 37                  STC
01B2 C9                  RET

0197 F1                  POP   PSW
0198 CD7D01              CALL  PNIB
019B C9                  RET
019C            ;
019C            ERR:     ;PRINT ERROR MESSAGE
019C            ;        D,E ADDRESSES MESSAGE ENDING WITH "$"
0217            ;        STACK AREA
0217                     DS    64      ;RESERVE 32 LEVEL STACK
0257            STKTOP:
0257            ;
01DC C9                  RET
01DD            ;
01DD            ;        FIXED MESSAGE AREA
01DD 46494C45   SIGNON:  DT    'FILE DUMP VERSION 1.4$'
01E1 2044554D    
01E5 50205645    
01E9 5253494F    
01ED 4E20312E    
01C1            ;        OPEN THE FILE FOR INPUT
01C1 AF                  XRA   A       ;ZERO TO ACCUM
01C2 327C00              STA   FCBCR   ;CLEAR CURRENT RECORD
01C5            ;
01C5 115C00              LXI   D,FCB
01B3            G0:      ;READ THE BYTE AT BUFF+REG A
01B3 5F                  MOV   E,A     ;LS BYTE OF BUFFER INDEX
01B4 1600                MVI   D,0     ;DOUBLE PRECISION INDEX TO DE
01B6 3C                  INR   A       ;INDEX=INDEX+1
019E CD0500              CALL  BDOS
01A1 C9                  RET
01A2            ;
01A2            ;
01A2            GNB:     ;GET NEXT BYTE
01A2 3A1302              LDA   IBP

VECTOR GRAPHIC SIMULATING DEBUGGER VS. 1.0

               3000 TO 8000 FOR A 48K SYSTEM
                3000 TO A000 FOR A 56K SYSTEM.

***********************************************

*             SYSTEM MEMORY MAP               *

*                 RAM=O                       *

*                 PROM=X                      *

*                 NOTHING=.                   *
W(V)P ...... WRITE PLATTER (VERIFY) | W(V)D ..... WRITE DISK (VERIFY)
MEM   ...... MEMORY TEST             

PRESS RETURN TO CONTINUE- $****************  COMMAND HELPSCREEN FOR DUAL-MODE UTILITY  ****************

C .......... CURRENT PARAMETERS     | D ......... DUMP BUFFER CONTENTS
E .......... ENABLE ERROR REPORTS   | H ......... STEP THE HEAD VALUE
have been backed up before proceeding.

F .......... FILL THE DATA BUFFER   | P ......... PROGRAM BUFFER

------------------------------ FILL PATTERNS -------------------------------
T .......... STEP THE TRACK VALUE   | Z ......... RESTORE THEN RE-SEEK
+ .......... SET DIRECTION TO IN    | - .......... SET DIRECTION TO OUT

P3 ......... ALL ZEROS              | P4 ........ ALL ONES
P5 ......... 10101010 (0AAH)        | P6 ........ 01010101 (055H)
P7 ......... STANDARD FORMAT (0E5H) | P8 ........ SPECIAL FILL

SO ......... SEEK ONLY (RANDOMLY)   | SR ........ SEEK AND READ (RANDOMLY)
RS ......... READ CURRENT SECTOR    | RT ........ READ CURRENT TRACK
RP ......... READ CURRENT PLATTER   | RD ........ READ ENTIRE DISK

---------------------------- INTERRUPT COMMANDS ----------------------------
ESC ........ GO TO SYSTEM MONITOR   | ^C ........ GO TO CP/M
SPACE ...... GO TO PARAMETER INPUT  | ? ......... DISPLAY HELPSCREEN

COPYRIGHT (C) 1981,82  VECTOR GRAPHIC INC.
VERSION 1.8$            WARNING

This program may change data on your disk.
CD - change default directory for remote server operations
COPY - copy files on a remote system
DELETE - delete files on a remote system
DIRECTORY - list a directory on a remote system
FINISH - stop a remote server
HELP - get help from a remote server
HOST - execute a command on a remote system
KERMIT - tell a remote server to execute a Kermit command
LOGIN - send user-identification to a remote server
MESSAGE - send a message to a remote system user
RENAME - rename files on a remote system
SET - set remote server parameters
SPACE - show disk-usage on a remote system
STATUS - Get status of a remote server
RECORD-LENGTH for a remote server
REPLACE file attribute handling for a remote server
TYPE of files for a remote server$FIXED$FFVARIABLE$VV
BLOCK-CHECK-TYPE for a remote server
FILE parameters for a remote server
ASK about existing files on a remote system
APPEND to existing files on a remote system
BACKUP (rename) existing files on a remote system
DISCARD new versions of existing files on a remote system
RECEIVE parameters for a remote server
REPLACE file attribute handling for a remote server
RETRY maximum for a remote server
SERVER-TIMEOUT interval for a remote server$
BLOCK-SIZE$';   COLLISION$5;
RENAME new versions of existing files on a remote system$DISCARD$00KEEP$11
DISCARD KEEP$  CONVERTED$00LITERAL$11
CONVERTED       LITERAL$PRESERVE$00DEFAULT$11
PRESERVE        DEFAULT$BINARY$11TEXT$00
BLOCK-SIZE of files for a remote server
COLLISION action on filename conflicts for a remote server
INCOMPLETE file disposition for a remote server
NAMES translation of files for a remote server

II$ binary$
Display file size on DIRECTORY command$
IBM flag$
Disposition for incomplete files is$ discard$ keep$
File warning$
Printer copy$
Logging to $ is$ suspended$
SEND start-of-pkt char  ^$
RECEIVE start-of-pkt char  ^$
 suspended]
$
[Logging resumed]
$
[Transmission Aborted. Connected normally to remote host,
 type $

[Automatically receiving; type ^C to abort]

$

 * * * Press any key to continue * * * 

$
Type the new escape character:  $
le to $
[Closing the log file]$
[Connected to remote host.  Type $C to return;
 type $? for command list]
$
[Connection closed, back at micro]$Control-$ Not implemented.$ (Not implemented)
$Interrupted$              Directory for drive nnx:
$
 receive initiate
$?Unable to receive file name
$?Unable to receive end of file
$?Unable to receive data
$?Disk full
$?Directory full
$?Unable to receive an acknowledgement from the host
$
?Unable to find file
$?Unable to rename file$
$
RECEIVE packet length  $
Escape char: $
Multi-sector buffering at $ of a maximum of $
Transmit protocol char: $
Block check type: $-character$
File COLLISION:  $
Parity: $none$mark$space$odd$even$
Port in use is: $
C intercept character:  $
Give the start-of-packet character: $
Type the new padding character: $
R Send the same line again$
Q  Suspend logging
R  Resume logging$
?  This message
C  Close the connection
0  (zero) Transmit a NULL
as $K bytes free
$
File(s) erased$

[Transmitting file to host:
 1. Lines automatically sent, and wait for possible reply
 2. CONTROL-C aborts transfer
 3. If transfer hangs, try a return to continue
        
?Unable to tell host that the session is finished$
?Unable to tell host to logout$
?Kermit has not been configured for a target system$
?Consistency check on configuration failed$
?Error writing to log file
$
?Invalid user number$

[XOFF sent to host]
[XON sent to host]
rminate (not SET)$
Timer$
Current TACTrap Status/Intercept Character:  $
Current user number:  $
Debugging$
Current default disk: $               $
?Source and destination files the same$
?File not found$
?Program error:  Invalid COMND call$
 on/off
S  Status of the connection$
Typing another $ will send it to the host

Command>$
Transmitting a file$
Autoreceive is$
Local echo$ on$ off$
Flow control$
Terminal display is $REGULAR$QUIET$
Terminal emulation is $

.
$R to send the same line again,
   or type $C to abort transmission.]
$
[Transmission done. Connected normally to remote host,
 type $Sending...$Receiving...$Warning: eighth bit cannot be sent$
For help, type ? at any point in a command$
arameter$
?Invalid BUFFER-SIZE parameter$
?Invalid packet length (too long)$
?Invalid Checktype$
?Too many retries$
?Failed to exchange parameters$
?Failed to receive input string in alloted time$
$
?Unrecognized command$
?Illegal CP/M file specification$
?Wild-cards not allowed in file specification$
?Invalid user number$

New file: $
Password: $
Account: $
New name: $
Message: $

     
$configured for $ with $]

Number of packets:
Number of retries:
File name:$


Rpack:

                $$
$ $$
c*
c*
c*
c*
̀
̀
7Rn
$BRUN.COM too large
Binary copy <file name> from host environment. L = use lower case for name.

Examples
READ bdos.mac        copy BDOS.MAC to BDOS.MAC
READ bdos.mac L      copy bdos.mac to BDOS.MAC
$No more directory space available.
$File does not exist.
$File is empty.
$Could not create directory entry.
$Disk full.
$Read from "$" and write to "$".
$No file matches "$SIMH required.
READ a:bdos.mac      copy BDOS.MAC to A:
READ a:*.com         copy all .COM files to A:
READ src/bdos.mac    copy SRC/BDOS.MAC to BDOS.MAC
READ src/a:bdos.mac  copy SRC/BDOS.MAC to BDOS.MAC on A:
 from directory SRC
READ src/*.MAC L     copy all .mac files from directory src
READ src/a:test.*    copy all TEST.* files from directory SRC to A:
$


kB written.
$
READ V-2.23 (01-Mar-08) SIMH Interface VXXX
$Need SIMH Interface V003 or above for wild card support.
$Macintosh OS 9 has no wild card support.
Copy <file name> to host environment. Default is text, B for binary, T for Text

Examples
WRITE BDOS.MAC      copy BDOS.MAC as text file
WRITE PIP.COM B     copy PIP.COM as binary file
WRITE TEST.DAT T    copy TEST.DAT as text file
WRITE *.COM         copy all files matching *.COM as binary files
WRITE SRC/BDOS.MAC  copy BDOS.MAC to directory SRC as a text file
 to directory COM as binary files
$

For SIMH. Copyright 2008 by Peter Schorn, peter.schorn@acm.org

kB written ($Binary).
$Text).
$
$File does not exist.
$
Could not create file.
$SIMH required.
$$.125$.25$.375$.5$.625$.75$.875$
Switched to binary mode.
$
End Of File (0x1A) not in last record - maybe a binary file.
$Write "$" to "$".
$  OK
$  ERROR **** crc expected:$ found:$
$All tests successful.
$Some failure detected.
$Switched to 8080 processor.
p
$  OK
$  ERROR **** crc expected:$ found:$
$All tests successful.
$Some failure detected.