Listing of file='CPMTRM.ASM;01' on disk='vmedia/terminal-sector.ccvf'
### Disk Sector 53 ### 00: 0d 0a 0d 0a 0d 0a 3b 4d 4f 44 45 4d 20 43 4f 4e ......;MODEM CON 10: 54 52 4f 4c 20 50 41 43 4b 41 47 45 20 20 2d 20 TROL PACKAGE - 20: 20 20 20 20 20 20 54 45 52 4d 49 4e 41 4c 20 50 TERMINAL P 30: 52 4f 43 45 53 53 4f 52 0d 0a 0d 0a 0d 0a 0d 0a ROCESSOR........ 40: 42 4f 4f 54 20 20 20 20 45 51 55 20 20 20 20 20 BOOT EQU 50: 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 60: 3b 53 59 53 54 45 4d 20 57 41 52 4d 20 42 4f 4f ;SYSTEM WARM BOO 70: 54 0d 0a 42 44 4f 53 20 20 20 20 45 51 55 20 20 T..BDOS EQU ### Disk Sector 54 ### 00: 20 20 20 35 20 20 20 20 20 20 20 20 20 20 20 20 5 10: 20 20 20 3b 42 44 4f 53 20 45 4e 54 52 59 20 50 ;BDOS ENTRY P 20: 4f 49 4e 54 0d 0a 46 43 42 20 20 20 20 20 45 51 OINT..FCB EQ 30: 55 20 20 20 20 20 30 35 43 48 20 20 20 20 20 20 U 05CH 40: 20 20 20 20 20 20 3b 46 49 4c 45 20 43 4f 4e 54 ;FILE CONT 50: 52 4f 4c 20 42 4c 4f 43 4b 0d 0a 54 42 55 46 46 ROL BLOCK..TBUFF 60: 20 20 20 45 51 55 20 20 20 20 20 30 38 30 48 20 EQU 080H 70: 20 20 20 20 20 20 20 20 20 20 20 3b 44 49 53 4b ;DISK ### Disk Sector 55 ### 00: 20 42 55 46 46 45 52 0d 0a 3b 0d 0a 4d 53 54 41 BUFFER..;..MSTA 10: 54 20 20 20 45 51 55 20 20 20 20 20 30 35 48 20 T EQU 05H 20: 20 20 20 20 20 20 20 20 20 20 20 20 3b 4d 4f 44 ;MOD 30: 45 4d 20 53 54 41 54 55 53 20 50 4f 52 54 0d 0a EM STATUS PORT.. 40: 4d 44 41 54 41 20 20 20 45 51 55 20 20 20 20 20 MDATA EQU 50: 30 34 48 20 20 20 20 20 20 20 20 20 20 20 20 20 04H 60: 3b 4d 4f 44 45 4d 20 44 41 54 41 20 50 4f 52 54 ;MODEM DATA PORT 70: 0d 0a 4d 41 53 4b 49 20 20 20 45 51 55 20 20 20 ..MASKI EQU ### Disk Sector 56 ### 00: 20 20 30 32 48 20 20 20 20 20 20 20 20 20 20 20 02H 10: 20 20 3b 4d 4f 44 45 4d 20 49 4e 50 55 54 20 52 ;MODEM INPUT R 20: 45 41 44 59 20 4d 41 53 4b 0d 0a 4d 41 53 4b 4f EADY MASK..MASKO 30: 20 20 20 45 51 55 20 20 20 20 20 30 31 48 20 20 EQU 01H 40: 20 20 20 20 20 20 20 20 20 20 20 3b 4d 4f 44 45 ;MODE 50: 4d 20 4f 55 54 50 55 54 20 52 45 41 44 59 20 4d M OUTPUT READY M 60: 41 53 4b 0d 0a 3b 0d 0a 43 54 4c 43 48 20 20 20 ASK..;..CTLCH 70: 45 51 55 20 20 20 20 20 30 30 48 20 20 20 20 20 EQU 00H ### Disk Sector 57 ### 00: 20 20 20 20 20 20 20 20 3b 43 4f 4d 4d 41 4e 44 ;COMMAND 10: 20 4d 4f 44 45 20 43 48 41 52 41 43 54 45 52 20 MODE CHARACTER 20: 28 20 30 20 3d 20 4e 55 4c 4c 20 29 0d 0a 3b 0d ( 0 = NULL )..;. 30: 0a 20 20 20 20 20 20 20 20 4f 52 47 20 20 20 20 . ORG 40: 20 30 31 30 30 48 20 20 20 20 20 20 20 20 20 20 0100H 50: 20 3b 47 4f 4f 44 20 46 4f 52 20 43 50 4d 20 54 ;GOOD FOR CPM T 60: 50 41 0d 0a 20 20 20 20 20 20 20 20 4a 4d 50 20 PA.. JMP 70: 20 20 20 20 53 54 41 52 54 20 20 20 20 20 20 20 START ### Disk Sector 58 ### 00: 20 20 20 20 3b 4e 4f 57 20 47 4f 20 42 45 47 49 ;NOW GO BEGI 10: 4e 0d 0a 53 54 4d 53 47 20 20 20 44 42 20 20 20 N..STMSG DB 20: 20 20 20 27 3e 3e 20 54 45 52 4d 49 4e 41 4c 20 '>> TERMINAL 30: 50 52 4f 47 52 41 4d 20 2d 20 56 45 52 53 49 4f PROGRAM - VERSIO 40: 4e 20 32 2e 30 27 2c 31 33 2c 31 30 2c 30 0d 0a N 2.0',13,10,0.. 50: 43 42 55 46 46 20 20 20 44 42 20 20 20 20 20 20 CBUFF DB 60: 30 30 48 0d 0a 20 20 20 20 20 20 20 20 4f 52 47 00H.. ORG 70: 20 20 20 20 20 30 32 30 30 48 0d 0a 53 54 41 43 0200H..STAC ### Disk Sector 59 ### 00: 4b 20 20 20 44 42 20 20 20 20 20 20 30 0d 0a 3b K DB 0..; 10: 0d 0a 53 54 41 52 54 20 20 20 4e 4f 50 20 20 20 ..START NOP 20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30: 20 20 3b 4d 4f 44 45 4d 20 49 4e 49 54 49 41 4c ;MODEM INITIAL 40: 49 5a 41 54 49 4f 4e 0d 0a 20 20 20 20 20 20 20 IZATION.. 50: 20 4e 4f 50 20 20 20 20 20 20 20 20 20 20 20 20 NOP 60: 20 20 20 20 20 20 20 20 20 3b 54 48 45 20 56 41 ;THE VA 70: 52 49 4f 55 53 20 55 41 52 54 53 20 41 52 45 0d RIOUS UARTS ARE. ### Disk Sector 60 ### 00: 0a 20 20 20 20 20 20 20 20 4e 4f 50 20 20 20 20 . NOP 10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20: 20 3b 49 4e 49 54 49 41 4c 49 53 45 44 20 48 45 ;INITIALISED HE 30: 52 45 0d 0a 20 20 20 20 20 20 20 20 4e 4f 50 0d RE.. NOP. 40: 0a 20 20 20 20 20 20 20 20 4e 4f 50 0d 0a 20 20 . NOP.. 50: 20 20 20 20 20 20 4e 4f 50 0d 0a 3b 0d 0a 20 20 NOP..;.. 60: 20 20 20 20 20 20 4c 48 4c 44 20 20 20 20 30 31 LHLD 01 70: 48 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 47 H ;G ### Disk Sector 61 ### 00: 45 54 20 57 41 52 4d 20 42 4f 4f 54 20 41 44 44 ET WARM BOOT ADD 10: 52 45 53 53 20 41 53 20 42 41 53 45 20 4f 46 20 RESS AS BASE OF 20: 42 49 4f 53 20 2b 20 33 0d 0a 20 20 20 20 20 20 BIOS + 3.. 30: 20 20 4c 58 49 20 20 20 20 20 44 2c 33 0d 0a 20 LXI D,3.. 40: 20 20 20 20 20 20 20 44 41 44 20 20 20 20 20 44 DAD D 50: 0d 0a 20 20 20 20 20 20 20 20 53 48 4c 44 20 20 .. SHLD 60: 20 20 43 53 49 4e 2b 31 20 20 20 20 20 20 20 20 CSIN+1 70: 20 20 3b 53 45 54 20 43 4f 4e 53 4f 4c 45 20 53 ;SET CONSOLE S ### Disk Sector 62 ### 00: 54 41 54 55 53 20 43 48 45 43 4b 20 41 44 44 52 TATUS CHECK ADDR 10: 45 53 53 0d 0a 20 20 20 20 20 20 20 20 44 41 44 ESS.. DAD 20: 20 20 20 20 20 44 0d 0a 20 20 20 20 20 20 20 20 D.. 30: 53 48 4c 44 20 20 20 20 43 44 49 4e 2b 31 20 20 SHLD CDIN+1 40: 20 20 20 20 20 20 20 20 3b 53 45 54 20 43 4f 4e ;SET CON 50: 53 4f 4c 45 20 49 4e 50 55 54 20 41 44 44 52 45 SOLE INPUT ADDRE 60: 53 53 0d 0a 20 20 20 20 20 20 20 20 4c 58 49 20 SS.. LXI 70: 20 20 20 20 48 2c 53 54 4d 53 47 20 20 20 20 20 H,STMSG ### Disk Sector 63 ### 00: 20 20 20 20 3b 53 41 59 20 48 45 4c 4c 4f 0d 0a ;SAY HELLO.. 10: 20 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 CALL 20: 50 4d 53 47 0d 0a 20 20 20 20 20 20 20 20 4c 48 PMSG.. LH 30: 4c 44 20 20 20 20 36 20 20 20 20 20 20 20 20 20 LD 6 40: 20 20 20 20 20 20 3b 47 45 54 20 42 44 4f 53 20 ;GET BDOS 50: 41 44 44 52 45 53 53 0d 0a 20 20 20 20 20 20 20 ADDRESS.. 60: 20 4c 58 49 20 20 20 20 20 44 2c 2d 39 30 36 48 LXI D,-906H 70: 20 20 20 20 20 20 20 20 20 3b 42 41 43 4b 20 4f ;BACK O ### Disk Sector 64 ### 00: 46 46 20 54 4f 20 42 45 47 49 4e 4e 49 4e 47 20 FF TO BEGINNING 10: 4f 46 20 43 43 50 0d 0a 20 20 20 20 20 20 20 20 OF CCP.. 20: 44 41 44 20 20 20 20 20 44 0d 0a 20 20 20 20 20 DAD D.. 30: 20 20 20 53 48 4c 44 20 20 20 20 48 49 41 44 44 SHLD HIADD 40: 52 20 20 20 20 20 20 20 20 20 20 3b 4b 45 45 50 R ;KEEP 50: 20 54 52 41 43 4b 20 4f 46 20 55 50 50 45 52 20 TRACK OF UPPER 60: 4c 49 4d 49 54 0d 0a 3b 0d 0a 3b 20 20 20 20 20 LIMIT..;..; 70: 20 20 54 48 45 20 4d 41 49 4e 20 4c 4f 4f 50 20 THE MAIN LOOP ### Disk Sector 65 ### 00: 57 48 45 52 45 20 41 4c 4c 20 54 48 45 20 57 4f WHERE ALL THE WO 10: 52 4b 20 49 53 20 44 4f 4e 45 0d 0a 3b 0d 0a 54 RK IS DONE..;..T 20: 45 52 4d 20 20 20 20 4c 58 49 20 20 20 20 20 53 ERM LXI S 30: 50 2c 53 54 41 43 4b 0d 0a 20 20 20 20 20 20 20 P,STACK.. 40: 20 58 52 41 20 20 20 20 20 41 0d 0a 20 20 20 20 XRA A.. 50: 20 20 20 20 53 54 41 20 20 20 20 20 4d 4f 44 45 STA MODE 60: 53 57 0d 0a 20 20 20 20 20 20 20 20 43 41 4c 4c SW.. CALL 70: 20 20 20 20 43 43 52 4c 46 0d 0a 20 20 20 20 20 CCRLF.. ### Disk Sector 66 ### 00: 20 20 20 43 41 4c 4c 20 20 20 20 4d 4f 44 49 4e CALL MODIN 10: 50 20 20 20 20 20 20 20 20 20 20 3b 43 4c 45 41 P ;CLEA 20: 52 20 54 48 45 20 42 55 46 46 45 52 0d 0a 54 45 R THE BUFFER..TE 30: 52 4d 41 20 20 20 43 41 4c 4c 20 20 20 20 43 53 RMA CALL CS 40: 49 4e 20 20 20 20 20 20 20 20 20 20 20 20 3b 57 IN ;W 50: 41 49 54 20 46 4f 52 20 41 4e 59 20 49 4e 50 55 AIT FOR ANY INPU 60: 54 0d 0a 20 20 20 20 20 20 20 20 4a 4e 5a 20 20 T.. JNZ 70: 20 20 20 54 45 52 4d 4f 0d 0a 20 20 20 20 20 20 TERMO.. ### Disk Sector 67 ### 00: 20 20 43 41 4c 4c 20 20 20 20 42 53 49 4e 0d 0a CALL BSIN.. 10: 0d 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 20 20 20 ............. 20: 20 20 20 20 20 4a 4e 5a 20 20 20 20 20 54 45 52 JNZ TER 30: 4d 53 0d 0a 0d 0a 20 20 20 20 20 20 20 20 43 41 MS.... CA 40: 4c 4c 20 20 20 20 4d 4f 44 45 4d 53 0d 0a 20 20 LL MODEMS.. 50: 20 20 20 20 20 20 4a 5a 20 20 20 20 20 20 54 45 JZ TE 60: 52 4d 41 0d 0a 54 45 52 4d 49 20 20 20 43 41 4c RMA..TERMI CAL 70: 4c 20 20 20 20 4d 4f 44 49 4e 50 20 20 20 20 20 L MODINP ### Disk Sector 68 ### 00: 20 20 20 20 20 3b 47 45 54 20 4d 4f 44 45 4d 20 ;GET MODEM 10: 49 4e 50 55 54 0d 0a 20 20 20 20 20 20 20 20 4f INPUT.. O 20: 52 41 20 20 20 20 20 41 20 20 20 20 20 20 20 20 RA A 30: 20 20 20 20 20 20 20 3b 49 47 4e 4f 52 45 20 4e ;IGNORE N 40: 55 4c 4c 53 0d 0a 20 20 20 20 20 20 20 20 4a 5a ULLS.. JZ 50: 20 20 20 20 20 20 54 45 52 4d 41 0d 0a 20 20 20 TERMA.. 60: 20 20 20 20 20 4d 4f 56 20 20 20 20 20 43 2c 41 MOV C,A 70: 0d 0a 20 20 20 20 20 20 20 20 4c 44 41 20 20 20 .. LDA ### Disk Sector 69 ### 00: 20 20 4d 4f 44 45 53 57 20 20 20 20 20 20 20 20 MODESW 10: 20 20 3b 43 48 45 43 4b 20 46 4f 52 20 52 45 43 ;CHECK FOR REC 20: 45 49 56 45 0d 0a 20 20 20 20 20 20 20 20 43 50 EIVE.. CP 30: 49 20 20 20 20 20 32 0d 0a 20 20 20 20 20 20 20 I 2.. 40: 20 43 5a 20 20 20 20 20 20 42 44 4f 55 54 20 20 CZ BDOUT 50: 20 20 20 20 20 20 20 20 20 3b 43 48 41 52 20 54 ;CHAR T 60: 4f 20 42 55 46 46 45 52 0d 0a 20 20 20 20 20 20 O BUFFER.. 70: 20 20 43 41 4c 4c 20 20 20 20 43 4f 55 54 20 20 CALL COUT ### Disk Sector 70 ### 00: 20 20 20 20 20 20 20 20 20 20 3b 4f 55 54 50 55 ;OUTPU 10: 54 20 54 4f 20 43 4f 4e 53 4f 4c 45 0d 0a 20 20 T TO CONSOLE.. 20: 20 20 20 20 20 20 4a 4d 50 20 20 20 20 20 54 45 JMP TE 30: 52 4d 41 0d 0a 54 45 52 4d 53 20 20 20 43 41 4c RMA..TERMS CAL 40: 4c 20 20 20 20 42 44 49 4e 20 20 20 20 20 20 20 L BDIN 50: 20 20 20 20 20 3b 47 45 54 20 42 55 46 46 45 52 ;GET BUFFER 60: 20 43 48 41 52 41 43 54 45 52 0d 0a 20 20 20 20 CHARACTER.. 70: 20 20 20 20 4a 4d 50 20 20 20 20 20 54 45 52 4d JMP TERM ### Disk Sector 71 ### 00: 4f 41 20 20 20 20 20 20 20 20 20 20 3b 53 45 4e OA ;SEN 10: 44 20 49 54 20 4f 55 54 0d 0a 54 45 52 4d 4f 20 D IT OUT..TERMO 20: 20 20 43 41 4c 4c 20 20 20 20 43 44 49 4e 20 20 CALL CDIN 30: 20 20 20 20 20 20 20 20 20 20 3b 47 45 54 20 43 ;GET C 40: 4f 4e 53 4f 4c 45 20 44 41 54 41 20 49 4e 50 55 ONSOLE DATA INPU 50: 54 0d 0a 54 45 52 4d 4f 41 20 20 4d 4f 56 20 20 T..TERMOA MOV 60: 20 20 20 43 2c 41 0d 0a 20 20 20 20 20 20 20 20 C,A.. 70: 43 41 4c 4c 20 20 20 20 4d 4f 44 45 4d 4f 20 20 CALL MODEMO ### Disk Sector 72 ### 00: 20 20 20 20 20 20 20 20 3b 53 45 4e 44 20 49 54 ;SEND IT 10: 20 4f 55 54 20 4d 4f 44 45 4d 0d 0a 20 20 20 20 OUT MODEM.. 20: 20 20 20 20 4c 44 41 20 20 20 20 20 45 43 48 4f LDA ECHO 30: 53 57 20 20 20 20 20 20 20 20 20 20 3b 57 41 4e SW ;WAN 40: 54 20 54 4f 20 53 45 45 20 57 48 41 54 53 20 47 T TO SEE WHATS G 50: 4f 49 4e 47 20 4f 4e 0d 0a 20 20 20 20 20 20 20 OING ON.. 60: 20 41 4e 49 20 20 20 20 20 31 0d 0a 20 20 20 20 ANI 1.. 70: 20 20 20 20 43 4e 5a 20 20 20 20 20 43 4f 55 54 CNZ COUT ### Disk Sector 73 ### 00: 0d 0a 20 20 20 20 20 20 20 20 4d 4f 56 20 20 20 .. MOV 10: 20 20 41 2c 43 0d 0a 20 20 20 20 20 20 20 20 43 A,C.. C 20: 50 49 20 20 20 20 20 30 44 48 0d 0a 20 20 20 20 PI 0DH.. 30: 20 20 20 20 4a 4e 5a 20 20 20 20 20 54 45 52 4d JNZ TERM 40: 41 0d 0a 20 20 20 20 20 20 20 20 4c 44 41 20 20 A.. LDA 50: 20 20 20 43 52 4c 46 53 57 20 20 20 20 20 20 20 CRLFSW 60: 20 20 20 3b 41 44 44 20 4c 46 20 49 46 20 43 52 ;ADD LF IF CR 70: 20 26 20 41 55 54 4f 20 4c 46 0d 0a 20 20 20 20 & AUTO LF.. ### Disk Sector 74 ### 00: 20 20 20 20 41 4e 49 20 20 20 20 20 31 0d 0a 20 ANI 1.. 10: 20 20 20 20 20 20 20 4a 5a 20 20 20 20 20 20 54 JZ T 20: 45 52 4d 41 0d 0a 20 20 20 20 20 20 20 20 4d 56 ERMA.. MV 30: 49 20 20 20 20 20 41 2c 30 41 48 0d 0a 20 20 20 I A,0AH.. 40: 20 20 20 20 20 4a 4d 50 20 20 20 20 20 54 45 52 JMP TER 50: 4d 4f 41 0d 0a 3b 0d 0a 4d 4f 44 45 4d 53 20 20 MOA..;..MODEMS 60: 49 4e 20 20 20 20 20 20 4d 53 54 41 54 20 20 20 IN MSTAT 70: 20 20 20 20 20 20 20 20 3b 47 45 54 20 4d 4f 44 ;GET MOD ### Disk Sector 75 ### 00: 45 4d 20 53 54 41 54 55 53 0d 0a 20 20 20 20 20 EM STATUS.. 10: 20 20 20 4e 4f 50 20 20 20 20 20 20 20 20 20 20 NOP 20: 20 20 20 20 20 20 20 20 20 20 20 3b 28 43 4d 41 ;(CMA 30: 20 49 46 20 41 43 54 49 56 45 20 4c 4f 57 29 0d IF ACTIVE LOW). 40: 0a 4d 52 44 59 31 20 20 20 41 4e 49 20 20 20 20 .MRDY1 ANI 50: 20 4d 41 53 4b 49 20 20 20 20 20 20 20 20 20 20 MASKI 60: 20 3b 4d 41 53 4b 20 46 4f 52 20 52 45 43 45 49 ;MASK FOR RECEI 70: 56 45 20 42 49 54 0d 0a 20 20 20 20 20 20 20 20 VE BIT.. ### Disk Sector 76 ### 00: 4d 56 49 20 20 20 20 20 41 2c 30 20 20 20 20 20 MVI A,0 10: 20 20 20 20 20 20 20 20 3b 41 53 53 55 4d 45 20 ;ASSUME 20: 4e 4f 54 20 52 45 41 44 59 0d 0a 20 20 20 20 20 NOT READY.. 30: 20 20 20 52 5a 20 20 20 20 20 20 20 20 20 20 20 RZ 40: 20 20 20 20 20 20 20 20 20 20 20 3b 5a 45 52 4f ;ZERO 50: 20 46 4c 41 47 20 53 45 54 20 2d 20 4e 4f 54 20 FLAG SET - NOT 60: 52 45 41 44 59 0d 0a 20 20 20 20 20 20 20 20 43 READY.. C 70: 4d 41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 MA ### Disk Sector 77 ### 00: 20 20 20 20 20 20 20 3b 46 46 20 3d 20 52 45 41 ;FF = REA 10: 44 59 20 54 4f 20 43 50 4d 0d 0a 20 20 20 20 20 DY TO CPM.. 20: 20 20 20 52 45 54 0d 0a 3b 0d 0a 4d 4f 44 45 4d RET..;..MODEM 30: 49 20 20 43 41 4c 4c 20 20 20 20 4d 4f 44 45 4d I CALL MODEM 40: 53 20 20 20 20 20 20 20 20 20 20 3b 47 4f 20 47 S ;GO G 50: 45 54 20 49 4e 50 55 54 20 53 54 41 54 55 53 0d ET INPUT STATUS. 60: 0a 20 20 20 20 20 20 20 20 4a 5a 20 20 20 20 20 . JZ 70: 20 4d 4f 44 45 4d 49 20 20 20 20 20 20 20 20 20 MODEMI ### Disk Sector 78 ### 00: 20 3b 57 41 49 54 20 46 4f 52 20 52 45 50 4c 59 ;WAIT FOR REPLY 10: 0d 0a 4d 4f 44 49 4e 50 20 20 49 4e 20 20 20 20 ..MODINP IN 20: 20 20 4d 44 41 54 41 20 20 20 20 20 20 20 20 20 MDATA 30: 20 20 3b 47 45 54 20 4d 4f 44 45 4d 20 43 48 41 ;GET MODEM CHA 40: 52 41 43 54 45 52 0d 0a 20 20 20 20 20 20 20 20 RACTER.. 50: 41 4e 49 20 20 20 20 20 30 37 46 48 20 20 20 20 ANI 07FH 60: 20 20 20 20 20 20 20 20 3b 53 54 52 49 50 20 50 ;STRIP P 70: 41 52 49 54 59 20 42 49 54 0d 0a 20 20 20 20 20 ARITY BIT.. ### Disk Sector 79 ### 00: 20 20 20 52 45 54 0d 0a 0d 0a 4d 4f 44 45 4d 4f RET....MODEMO 10: 20 20 49 4e 20 20 20 20 20 20 4d 53 54 41 54 20 IN MSTAT 20: 20 20 20 20 20 20 20 20 20 20 3b 47 45 54 20 4d ;GET M 30: 4f 44 45 4d 20 53 54 41 54 55 53 0d 0a 20 20 20 ODEM STATUS.. 40: 20 20 20 20 20 4e 4f 50 20 20 20 20 20 20 20 20 NOP 50: 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 28 43 ;(C 60: 4d 41 20 49 46 20 41 43 54 49 56 45 20 4c 4f 57 MA IF ACTIVE LOW 70: 29 0d 0a 4d 54 42 45 31 20 20 20 41 4e 49 20 20 )..MTBE1 ANI ### Disk Sector 80 ### 00: 20 20 20 4d 41 53 4b 4f 20 20 20 20 20 20 20 20 MASKO 10: 20 20 20 3b 4d 41 53 4b 20 46 4f 52 20 53 45 4e ;MASK FOR SEN 20: 44 20 42 49 54 0d 0a 20 20 20 20 20 20 20 20 4a D BIT.. J 30: 5a 20 20 20 20 20 20 4d 4f 44 45 4d 4f 20 20 20 Z MODEMO 40: 20 20 20 20 20 20 20 3b 57 41 49 54 20 46 4f 52 ;WAIT FOR 50: 20 52 45 41 44 59 0d 0a 20 20 20 20 20 20 20 20 READY.. 60: 4d 4f 56 20 20 20 20 20 41 2c 43 20 20 20 20 20 MOV A,C 70: 20 20 20 20 20 20 20 20 3b 47 45 54 20 43 48 41 ;GET CHA ### Disk Sector 81 ### 00: 52 41 43 54 45 52 20 54 4f 20 4f 55 54 50 55 54 RACTER TO OUTPUT 10: 0d 0a 4d 44 41 54 41 4f 20 20 4f 55 54 20 20 20 ..MDATAO OUT 20: 20 20 4d 44 41 54 41 20 20 20 20 20 20 20 20 20 MDATA 30: 20 20 3b 4f 55 54 50 55 54 20 54 4f 20 4d 4f 44 ;OUTPUT TO MOD 40: 45 4d 0d 0a 20 20 20 20 20 20 20 20 43 50 49 20 EM.. CPI 50: 20 20 20 20 30 44 48 20 20 20 20 20 20 20 20 20 0DH 60: 20 20 20 20 3b 4e 45 45 44 20 44 45 4c 41 59 20 ;NEED DELAY 70: 49 53 20 43 52 4c 46 0d 0a 20 20 20 20 20 20 20 IS CRLF.. ### Disk Sector 82 ### 00: 20 52 4e 43 0d 0a 20 20 20 20 20 20 20 20 43 41 RNC.. CA 10: 4c 4c 20 20 20 20 44 45 4c 41 59 0d 0a 20 20 20 LL DELAY.. 20: 20 20 20 20 20 43 41 4c 4c 20 20 20 20 44 45 4c CALL DEL 30: 41 59 0d 0a 0d 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a AY.............. 40: 0a 20 20 20 20 20 20 20 20 52 45 54 0d 0a 3b 0d . RET..;. 50: 0a 3b 20 20 20 20 20 20 20 43 48 45 43 4b 20 46 .; CHECK F 60: 4f 52 20 41 4e 59 20 49 4e 50 55 54 20 4f 4e 20 OR ANY INPUT ON 70: 43 4f 4e 53 4f 4c 45 20 4f 52 20 4d 4f 44 45 4d CONSOLE OR MODEM ### Disk Sector 83 ### 00: 20 4f 52 20 53 45 4e 44 20 42 55 46 46 45 52 0d OR SEND BUFFER. 10: 0a 0d 0a 42 53 49 4e 20 20 20 20 4c 44 41 20 20 ...BSIN LDA 20: 20 20 20 4d 4f 44 45 53 57 20 20 20 20 20 20 20 MODESW 30: 20 20 20 3b 53 45 4e 44 20 42 55 46 46 45 52 20 ;SEND BUFFER 40: 52 45 41 44 59 0d 0a 20 20 20 20 20 20 20 20 41 READY.. A 50: 4e 49 20 20 20 20 20 31 0d 0a 20 20 20 20 20 20 NI 1.. 60: 20 20 4d 56 49 20 20 20 20 20 41 2c 30 0d 0a 20 MVI A,0.. 70: 20 20 20 20 20 20 20 52 5a 0d 0a 20 20 20 20 20 RZ.. ### Disk Sector 84 ### 00: 20 20 20 43 4d 41 0d 0a 20 20 20 20 20 20 20 20 CMA.. 10: 52 45 54 0d 0a 0d 0a 43 53 49 4e 20 20 20 20 43 RET....CSIN C 20: 41 4c 4c 20 20 20 20 30 44 41 30 36 48 20 20 20 ALL 0DA06H 30: 20 20 20 20 20 20 20 3b 46 49 58 20 54 4f 20 50 ;FIX TO P 40: 4f 49 4e 54 20 54 4f 20 42 49 4f 53 20 43 4f 4e OINT TO BIOS CON 50: 53 4f 4c 45 20 53 54 41 54 55 53 0d 0a 20 20 20 SOLE STATUS.. 60: 20 20 20 20 20 4f 52 41 20 20 20 20 20 41 20 20 ORA A 70: 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 30 30 ;00 ### Disk Sector 85 ### 00: 20 3d 20 4e 4f 54 20 52 45 41 44 59 20 20 46 46 = NOT READY FF 10: 20 3d 20 52 45 41 44 59 0d 0a 20 20 20 20 20 20 = READY.. 20: 20 20 52 45 54 20 20 20 20 20 20 20 20 20 20 20 RET 30: 20 20 20 20 20 20 20 20 20 20 3b 52 45 54 55 52 ;RETUR 40: 4e 20 46 52 4f 4d 20 43 4f 4e 53 54 2e 0d 0a 0d N FROM CONST.... 50: 0a 0d 0a 3b 52 45 41 44 20 41 20 43 48 41 52 41 ...;READ A CHARA 60: 43 54 45 52 20 46 52 4f 4d 20 53 45 4e 44 20 42 CTER FROM SEND B 70: 55 46 46 45 52 0d 0a 3b 0d 0a 42 44 49 4e 20 20 UFFER..;..BDIN ### Disk Sector 86 ### 00: 20 20 43 41 4c 4c 20 20 20 20 44 45 4c 41 59 0d CALL DELAY. 10: 0a 20 20 20 20 20 20 20 20 4c 48 4c 44 20 20 20 . LHLD 20: 20 43 55 52 50 54 52 20 20 20 20 20 20 20 20 20 CURPTR 30: 20 3b 47 45 54 20 43 55 52 52 45 4e 54 20 50 4f ;GET CURRENT PO 40: 49 4e 54 45 52 20 54 4f 20 42 55 46 46 45 52 0d INTER TO BUFFER. 50: 0a 20 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 . MOV 60: 20 41 2c 48 0d 0a 20 20 20 20 20 20 20 20 44 43 A,H.. DC 70: 52 20 20 20 20 20 41 0d 0a 20 20 20 20 20 20 20 R A.. ### Disk Sector 87 ### 00: 20 43 5a 20 20 20 20 20 20 52 44 4e 58 54 0d 0a CZ RDNXT.. 10: 20 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 MOV 20: 41 2c 4d 0d 0a 20 20 20 20 20 20 20 20 49 4e 58 A,M.. INX 30: 20 20 20 20 20 48 0d 0a 20 20 20 20 20 20 20 20 H.. 40: 53 48 4c 44 20 20 20 20 43 55 52 50 54 52 0d 0a SHLD CURPTR.. 50: 20 20 20 20 20 20 20 20 43 50 49 20 20 20 20 20 CPI 60: 30 31 41 48 20 20 20 20 20 20 20 20 20 20 20 20 01AH 70: 3b 49 53 20 49 54 20 45 4f 46 0d 0a 20 20 20 20 ;IS IT EOF.. ### Disk Sector 88 ### 00: 20 20 20 20 4a 5a 20 20 20 20 20 20 43 4c 4f 53 JZ CLOS 10: 45 53 0d 0a 20 20 20 20 20 20 20 20 52 45 54 0d ES.. RET. 20: 0a 3b 0d 0a 44 45 4c 41 59 20 20 20 50 55 53 48 .;..DELAY PUSH 30: 20 20 20 20 48 0d 0a 20 20 20 20 20 20 20 20 4c H.. L 40: 48 4c 44 20 20 20 20 53 4f 53 4c 4f 57 20 20 20 HLD SOSLOW 50: 20 20 20 20 20 20 20 3b 55 53 45 44 20 54 4f 20 ;USED TO 60: 53 4c 4f 57 20 44 4f 57 4e 20 54 48 49 4e 47 53 SLOW DOWN THINGS 70: 0d 0a 44 45 4c 41 59 31 20 20 58 54 48 4c 0d 0a ..DELAY1 XTHL.. ### Disk Sector 89 ### 00: 20 20 20 20 20 20 20 20 58 54 48 4c 0d 0a 20 20 XTHL.. 10: 20 20 20 20 20 20 44 43 52 20 20 20 20 20 4c 0d DCR L. 20: 0a 20 20 20 20 20 20 20 20 4a 4e 5a 20 20 20 20 . JNZ 30: 20 44 45 4c 41 59 31 0d 0a 20 20 20 20 20 20 20 DELAY1.. 40: 20 44 43 52 20 20 20 20 20 48 0d 0a 20 20 20 20 DCR H.. 50: 20 20 20 20 4a 4e 5a 20 20 20 20 20 44 45 4c 41 JNZ DELA 60: 59 31 0d 0a 20 20 20 20 20 20 20 20 50 4f 50 20 Y1.. POP 70: 20 20 20 20 48 0d 0a 20 20 20 20 20 20 20 20 52 H.. R ### Disk Sector 90 ### 00: 45 54 0d 0a 3b 0d 0a 52 44 4e 58 54 20 20 20 4c ET..;..RDNXT L 10: 58 49 20 20 20 20 20 44 2c 46 43 42 20 20 20 20 XI D,FCB 20: 20 20 20 20 20 20 20 3b 52 45 41 44 20 4e 45 58 ;READ NEX 30: 54 20 52 45 43 4f 52 44 0d 0a 20 20 20 20 20 20 T RECORD.. 40: 20 20 4d 56 49 20 20 20 20 20 43 2c 30 31 34 48 MVI C,014H 50: 0d 0a 20 20 20 20 20 20 20 20 43 41 4c 4c 20 20 .. CALL 60: 20 20 42 44 4f 53 0d 0a 20 20 20 20 20 20 20 20 BDOS.. 70: 4c 58 49 20 20 20 20 20 48 2c 54 42 55 46 46 0d LXI H,TBUFF. ### Disk Sector 91 ### 00: 0a 20 20 20 20 20 20 20 20 53 48 4c 44 20 20 20 . SHLD 10: 20 43 55 52 50 54 52 0d 0a 20 20 20 20 20 20 20 CURPTR.. 20: 20 4f 52 41 20 20 20 20 20 41 20 20 20 20 20 20 ORA A 30: 20 20 20 20 20 20 20 20 20 3b 43 48 45 43 4b 20 ;CHECK 40: 46 4f 52 20 47 4f 4f 44 20 52 45 41 44 0d 0a 20 FOR GOOD READ.. 50: 20 20 20 20 20 20 20 52 5a 0d 0a 20 20 20 20 20 RZ.. 60: 20 20 20 4d 56 49 20 20 20 20 20 4d 2c 30 31 41 MVI M,01A 70: 48 0d 0a 20 20 20 20 20 20 20 20 52 45 54 0d 0a H.. RET.. ### Disk Sector 92 ### 00: 0d 0a 43 4c 4f 53 45 53 20 20 58 52 41 20 20 20 ..CLOSES XRA 10: 20 20 41 0d 0a 20 20 20 20 20 20 20 20 53 54 41 A.. STA 20: 20 20 20 20 20 4d 4f 44 45 53 57 0d 0a 20 20 20 MODESW.. 30: 20 20 20 20 20 43 41 4c 4c 20 20 20 20 46 43 4c CALL FCL 40: 4f 53 45 0d 0a 0d 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a OSE............. 50: 0a 0a 20 20 20 20 20 20 20 20 4d 56 49 20 20 20 .. MVI 60: 20 20 41 2c 30 31 41 48 0d 0a 20 20 20 20 20 20 A,01AH.. 70: 20 20 52 45 54 0d 0a 43 44 49 4e 20 20 20 20 43 RET..CDIN C ### Disk Sector 93 ### 00: 41 4c 4c 20 20 20 20 30 44 41 30 39 48 20 20 20 ALL 0DA09H 10: 20 20 20 20 20 20 20 3b 46 49 58 20 54 4f 20 50 ;FIX TO P 20: 4f 49 4e 54 20 54 4f 20 42 49 4f 53 20 43 4f 4e OINT TO BIOS CON 30: 53 4f 4c 45 20 49 4e 50 55 54 0d 0a 20 20 20 20 SOLE INPUT.. 40: 20 20 20 20 43 50 49 20 20 20 20 20 43 54 4c 43 CPI CTLC 50: 48 20 20 20 20 20 20 20 20 20 20 20 3b 4c 4f 4f H ;LOO 60: 4b 20 46 4f 52 20 43 4f 4d 4d 41 4e 44 20 28 43 K FOR COMMAND (C 70: 54 4c 2d 40 29 0d 0a 20 20 20 20 20 20 20 20 4a TL-@).. J ### Disk Sector 94 ### 00: 5a 20 20 20 20 20 20 43 4f 4d 4d 41 4e 44 0d 0a Z COMMAND.. 10: 20 20 20 20 20 20 20 20 43 50 49 20 20 20 20 20 CPI 20: 30 45 31 48 20 20 20 20 20 20 20 20 20 20 20 20 0E1H 30: 3b 36 31 48 20 3d 20 4c 4f 57 45 52 20 43 41 53 ;61H = LOWER CAS 40: 45 20 46 4f 4c 44 20 45 31 48 20 3d 20 4e 4f 20 E FOLD E1H = NO 50: 46 4f 4c 44 0d 0a 55 50 43 53 57 20 20 20 45 51 FOLD..UPCSW EQ 60: 55 20 20 20 20 20 24 2d 31 0d 0a 20 20 20 20 20 U $-1.. 70: 20 20 20 52 43 0d 0a 20 20 20 20 20 20 20 20 43 RC.. C ### Disk Sector 95 ### 00: 50 49 20 20 20 20 20 30 37 42 48 0d 0a 20 20 20 PI 07BH.. 10: 20 20 20 20 20 52 4e 43 0d 0a 20 20 20 20 20 20 RNC.. 20: 20 20 41 4e 49 20 20 20 20 20 30 35 46 48 20 20 ANI 05FH 30: 20 20 20 20 20 20 20 20 20 20 3b 46 4f 52 43 45 ;FORCE 40: 20 54 4f 20 55 50 50 45 52 20 43 41 53 45 0d 0a TO UPPER CASE.. 50: 20 20 20 20 20 20 20 20 52 45 54 0d 0a 3b 0d 0a RET..;.. 60: 3b 20 20 20 20 20 20 20 43 4f 4e 53 4f 4c 45 20 ; CONSOLE 70: 43 4f 4d 4d 41 4e 44 20 50 52 4f 43 45 53 53 4f COMMAND PROCESSO ### Disk Sector 96 ### 00: 52 0d 0a 43 4f 4d 4d 41 4e 44 20 4c 58 49 20 20 R..COMMAND LXI 10: 20 20 20 48 2c 43 4f 4d 4d 53 47 0d 0a 20 20 20 H,COMMSG.. 20: 20 20 20 20 20 43 41 4c 4c 20 20 20 20 50 4d 53 CALL PMS 30: 47 0d 0a 20 20 20 20 20 20 20 20 43 41 4c 4c 20 G.. CALL 40: 20 20 20 43 44 49 4e 20 20 20 20 20 20 20 20 20 CDIN 50: 20 20 20 3b 47 45 54 20 43 4f 4d 4d 41 4e 44 0d ;GET COMMAND. 60: 0a 20 20 20 20 20 20 20 20 50 55 53 48 20 20 20 . PUSH 70: 20 50 53 57 20 20 20 20 20 20 20 20 20 20 20 20 PSW ### Disk Sector 97 ### 00: 20 3b 53 41 56 45 20 54 48 45 20 43 4f 4d 4d 41 ;SAVE THE COMMA 10: 4e 44 0d 0a 20 20 20 20 20 20 20 20 4d 4f 56 20 ND.. MOV 20: 20 20 20 20 43 2c 41 0d 0a 20 20 20 20 20 20 20 C,A.. 30: 20 43 41 4c 4c 20 20 20 20 43 4f 55 54 20 20 20 CALL COUT 40: 20 20 20 20 20 20 20 20 20 3b 45 43 48 4f 20 43 ;ECHO C 50: 4f 4d 4d 41 4e 44 0d 0a 20 20 20 20 20 20 20 20 OMMAND.. 60: 50 4f 50 20 20 20 20 20 50 53 57 0d 0a 20 20 20 POP PSW.. 70: 20 20 20 20 20 43 50 49 20 20 20 20 20 27 43 27 CPI 'C' ### Disk Sector 98 ### 00: 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 46 4f ;FO 10: 52 43 45 20 43 4c 4f 53 45 20 46 49 4c 45 53 0d RCE CLOSE FILES. 20: 0a 20 20 20 20 20 20 20 20 4a 5a 20 20 20 20 20 . JZ 30: 20 43 4c 4f 53 45 46 0d 0a 20 20 20 20 20 20 20 CLOSEF.. 40: 20 43 50 49 20 20 20 20 20 27 44 27 20 20 20 20 CPI 'D' 50: 20 20 20 20 20 20 20 20 20 3b 43 48 41 4e 47 45 ;CHANGE 60: 20 44 45 4c 41 59 0d 0a 20 20 20 20 20 20 20 20 DELAY.. 70: 4a 5a 20 20 20 20 20 20 4e 45 57 44 45 4c 41 0d JZ NEWDELA. ### Disk Sector 99 ### 00: 0a 20 20 20 20 20 20 20 20 43 50 49 20 20 20 20 . CPI 10: 20 27 45 27 20 20 20 20 20 20 20 20 20 20 20 20 'E' 20: 20 3b 54 4f 20 53 45 45 20 49 54 20 41 54 20 54 ;TO SEE IT AT T 30: 48 49 53 20 54 45 52 4d 49 4e 41 4c 2c 20 45 43 HIS TERMINAL, EC 40: 48 4f 0d 0a 20 20 20 20 20 20 20 20 4a 5a 20 20 HO.. JZ 50: 20 20 20 20 45 43 48 4f 0d 0a 20 20 20 20 20 20 ECHO.. 60: 20 20 43 50 49 20 20 20 20 20 27 4c 27 20 20 20 CPI 'L' 70: 20 20 20 20 20 20 20 20 20 20 3b 54 4f 47 47 4c ;TOGGL ### Disk Sector 100 ### 00: 45 20 41 55 54 4f 20 4c 49 4e 45 46 45 45 44 20 E AUTO LINEFEED 10: 53 57 49 54 43 48 0d 0a 20 20 20 20 20 20 20 20 SWITCH.. 20: 4a 5a 20 20 20 20 20 20 41 55 54 4f 4c 0d 0a 20 JZ AUTOL.. 30: 20 20 20 20 20 20 20 43 50 49 20 20 20 20 20 27 CPI ' 40: 50 27 20 20 20 20 20 20 20 20 20 20 20 20 20 3b P' ; 50: 50 52 49 4e 54 20 41 4e 59 54 48 49 4e 47 20 41 PRINT ANYTHING A 60: 54 20 54 45 52 4d 49 4e 41 4c 0d 0a 20 20 20 20 T TERMINAL.. 70: 20 20 20 20 4a 5a 20 20 20 20 20 20 54 4c 49 53 JZ TLIS ### Disk Sector 101 ### 00: 54 0d 0a 20 20 20 20 20 20 20 20 43 50 49 20 20 T.. CPI 10: 20 20 20 27 51 27 20 20 20 20 20 20 20 20 20 20 'Q' 20: 20 20 20 3b 51 55 49 54 20 41 4e 44 20 52 45 54 ;QUIT AND RET 30: 55 52 4e 20 54 4f 20 43 50 2f 4d 0d 0a 20 20 20 URN TO CP/M.. 40: 20 20 20 20 20 4a 5a 20 20 20 20 20 20 51 55 49 JZ QUI 50: 54 0d 0a 20 20 20 20 20 20 20 20 43 50 49 20 20 T.. CPI 60: 20 20 20 27 53 27 20 20 20 20 20 20 20 20 20 20 'S' 70: 20 20 20 3b 53 45 4e 44 20 3c 46 49 4c 45 3e 2e ;SEND <FILE>. ### Disk Sector 102 ### 00: 3c 45 58 54 3e 0d 0a 20 20 20 20 20 20 20 20 4a <EXT>.. J 10: 5a 20 20 20 20 20 20 53 45 4e 44 0d 0a 20 20 20 Z SEND.. 20: 20 20 20 20 20 43 50 49 20 20 20 20 20 27 52 27 CPI 'R' 30: 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 52 45 ;RE 40: 43 45 49 56 45 20 3c 46 49 4c 45 3e 2e 3c 45 58 CEIVE <FILE>.<EX 50: 54 3e 0d 0a 20 20 20 20 20 20 20 20 4a 5a 20 20 T>.. JZ 60: 20 20 20 20 52 45 43 56 0d 0a 20 20 20 20 20 20 RECV.. 70: 20 20 43 50 49 20 20 20 20 20 27 55 27 20 20 20 CPI 'U' ### Disk Sector 103 ### 00: 20 20 20 20 20 20 20 20 20 20 3b 55 50 50 45 52 ;UPPER 10: 20 43 41 53 45 20 54 4f 47 47 4c 45 0d 0a 20 20 CASE TOGGLE.. 20: 20 20 20 20 20 20 4a 5a 20 20 20 20 20 20 55 50 JZ UP 30: 43 41 53 45 0d 0a 42 41 44 43 4d 44 20 20 4c 58 CASE..BADCMD LX 40: 49 20 20 20 20 20 48 2c 42 41 44 43 4d 53 47 0d I H,BADCMSG. 50: 0a 20 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 . CALL 60: 20 50 4d 53 47 0d 0a 20 20 20 20 20 20 20 20 4a PMSG.. J 70: 4d 50 20 20 20 20 20 43 44 49 4e 0d 0a 3b 0d 0a MP CDIN..;.. ### Disk Sector 104 ### 00: 51 55 49 54 20 20 20 20 4c 58 49 20 20 20 20 20 QUIT LXI 10: 48 2c 51 4d 53 47 0d 0a 20 20 20 20 20 20 20 20 H,QMSG.. 20: 43 41 4c 4c 20 20 20 20 50 4d 53 47 0d 0a 20 20 CALL PMSG.. 30: 20 20 20 20 20 20 4c 44 41 20 20 20 20 20 4d 4f LDA MO 40: 44 45 53 57 20 20 20 20 20 20 20 20 20 20 3b 53 DESW ;S 50: 45 45 20 49 46 20 41 4e 59 20 46 49 4c 45 53 20 EE IF ANY FILES 60: 4f 50 45 4e 0d 0a 20 20 20 20 20 20 20 20 43 50 OPEN.. CP 70: 49 20 20 20 20 20 31 20 20 20 20 20 20 20 20 20 I 1 ### Disk Sector 105 ### 00: 20 20 20 20 20 20 3b 20 30 20 3d 20 4e 4f 4e 45 ; 0 = NONE 10: 20 20 31 20 3d 20 53 45 4e 44 49 4e 47 20 20 20 1 = SENDING 20: 32 20 3d 20 52 45 43 45 49 56 49 4e 47 0d 0a 20 2 = RECEIVING.. 30: 20 20 20 20 20 20 20 4a 43 20 20 20 20 20 20 42 JC B 40: 4f 4f 54 0d 0a 20 20 20 20 20 20 20 20 4a 4e 5a OOT.. JNZ 50: 20 20 20 20 20 51 43 4c 4f 53 52 0d 0a 20 20 20 QCLOSR.. 60: 20 20 20 20 20 43 41 4c 4c 20 20 20 20 46 43 4c CALL FCL 70: 4f 53 45 0d 0a 20 20 20 20 20 20 20 20 4a 4d 50 OSE.. JMP ### Disk Sector 106 ### 00: 20 20 20 20 20 42 4f 4f 54 20 20 20 20 20 20 20 BOOT 10: 20 20 20 20 20 3b 4e 4f 57 20 52 45 42 4f 4f 54 ;NOW REBOOT 20: 0d 0a 3b 0d 0a 51 43 4c 4f 53 52 20 20 43 41 4c ..;..QCLOSR CAL 30: 4c 20 20 20 20 43 4c 4f 53 45 52 0d 0a 20 20 20 L CLOSER.. 40: 20 20 20 20 20 4a 4d 50 20 20 20 20 20 42 4f 4f JMP BOO 50: 54 0d 0a 0d 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a T............... 60: 3b 0d 0a 43 4c 4f 53 45 46 20 20 4c 58 49 20 20 ;..CLOSEF LXI 70: 20 20 20 48 2c 43 4d 53 47 0d 0a 20 20 20 20 20 H,CMSG.. ### Disk Sector 107 ### 00: 20 20 20 43 41 4c 4c 20 20 20 20 50 4d 53 47 0d CALL PMSG. 10: 0a 0d 0a 20 20 20 20 20 20 20 20 4c 44 41 20 20 ... LDA 20: 20 20 20 4d 4f 44 45 53 57 0d 0a 20 20 20 20 20 MODESW.. 30: 20 20 20 43 50 49 20 20 20 20 20 31 0d 0a 20 20 CPI 1.. 40: 20 20 20 20 20 20 4a 43 20 20 20 20 20 20 42 41 JC BA 50: 44 43 4d 44 0d 0a 20 20 20 20 20 20 20 20 4a 4e DCMD.. JN 60: 5a 20 20 20 20 20 43 4c 4f 53 45 52 0d 0a 20 20 Z CLOSER.. 70: 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 46 43 CALL FC ### Disk Sector 108 ### 00: 4c 4f 53 45 0d 0a 20 20 20 20 20 20 20 20 4a 4d LOSE.. JM 10: 50 20 20 20 20 20 54 45 52 4d 0d 0a 3b 0d 0a 4e P TERM..;..N 20: 45 57 44 45 4c 41 20 4c 58 49 20 20 20 20 20 48 EWDELA LXI H 30: 2c 44 4d 53 47 20 20 20 20 20 20 20 20 20 20 3b ,DMSG ; 40: 43 48 41 4e 47 45 20 44 45 4c 41 59 20 53 50 45 CHANGE DELAY SPE 50: 45 44 0d 0a 20 20 20 20 20 20 20 20 43 41 4c 4c ED.. CALL 60: 20 20 20 20 50 4d 53 47 0d 0a 20 20 20 20 20 20 PMSG.. 70: 20 20 4c 48 4c 44 20 20 20 20 53 4f 53 4c 4f 57 LHLD SOSLOW ### Disk Sector 109 ### 00: 0d 0a 20 20 20 20 20 20 20 20 49 4e 52 20 20 20 .. INR 10: 20 20 48 0d 0a 20 20 20 20 20 20 20 20 53 48 4c H.. SHL 20: 44 20 20 20 20 53 4f 53 4c 4f 57 0d 0a 20 20 20 D SOSLOW.. 30: 20 20 20 20 20 4a 4d 50 20 20 20 20 20 54 45 52 JMP TER 40: 4d 41 0d 0a 3b 0d 0a 45 43 48 4f 20 20 20 20 4c MA..;..ECHO L 50: 58 49 20 20 20 20 20 48 2c 45 43 4d 53 47 0d 0a XI H,ECMSG.. 60: 20 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 CALL 70: 50 4d 53 47 0d 0a 20 20 20 20 20 20 20 20 4c 44 PMSG.. LD ### Disk Sector 110 ### 00: 41 20 20 20 20 20 45 43 48 4f 53 57 0d 0a 20 20 A ECHOSW.. 10: 20 20 20 20 20 20 58 52 49 20 20 20 20 20 31 0d XRI 1. 20: 0a 20 20 20 20 20 20 20 20 53 54 41 20 20 20 20 . STA 30: 20 45 43 48 4f 53 57 0d 0a 20 20 20 20 20 20 20 ECHOSW.. 40: 20 4a 4d 50 20 20 20 20 20 54 45 52 4d 41 0d 0a JMP TERMA.. 50: 3b 0d 0a 41 55 54 4f 4c 20 20 20 4c 58 49 20 20 ;..AUTOL LXI 60: 20 20 20 48 2c 4c 46 4d 53 47 0d 0a 20 20 20 20 H,LFMSG.. 70: 20 20 20 20 43 41 4c 4c 20 20 20 20 50 4d 53 47 CALL PMSG ### Disk Sector 111 ### 00: 0d 0a 20 20 20 20 20 20 20 20 4c 44 41 20 20 20 .. LDA 10: 20 20 43 52 4c 46 53 57 0d 0a 20 20 20 20 20 20 CRLFSW.. 20: 20 20 58 52 49 20 20 20 20 20 31 0d 0a 20 20 20 XRI 1.. 30: 20 20 20 20 20 53 54 41 20 20 20 20 20 43 52 4c STA CRL 40: 46 53 57 0d 0a 20 20 20 20 20 20 20 20 4a 4d 50 FSW.. JMP 50: 20 20 20 20 20 54 45 52 4d 41 0d 0a 3b 0d 0a 54 TERMA..;..T 60: 4c 49 53 54 20 20 20 4c 58 49 20 20 20 20 20 48 LIST LXI H 70: 2c 50 46 4d 53 47 0d 0a 20 20 20 20 20 20 20 20 ,PFMSG.. ### Disk Sector 112 ### 00: 43 41 4c 4c 20 20 20 20 50 4d 53 47 0d 0a 20 20 CALL PMSG.. 10: 20 20 20 20 20 20 4c 44 41 20 20 20 20 20 50 52 LDA PR 20: 54 53 57 20 20 20 20 20 20 20 20 20 20 20 3b 54 TSW ;T 30: 4f 47 47 4c 45 20 54 48 45 20 50 52 49 4e 54 20 OGGLE THE PRINT 40: 53 57 49 54 43 48 0d 0a 20 20 20 20 20 20 20 20 SWITCH.. 50: 58 52 49 20 20 20 20 20 31 0d 0a 20 20 20 20 20 XRI 1.. 60: 20 20 20 53 54 41 20 20 20 20 20 50 52 54 53 57 STA PRTSW 70: 0d 0a 20 20 20 20 20 20 20 20 4a 4d 50 20 20 20 .. JMP ### Disk Sector 113 ### 00: 20 20 54 45 52 4d 41 0d 0a 3b 0d 0a 3b 0d 0a 3b TERMA..;..;..; 10: 20 20 20 20 20 20 20 57 52 49 54 45 20 41 20 43 WRITE A C 20: 48 41 52 41 43 54 45 52 20 54 4f 20 54 48 45 20 HARACTER TO THE 30: 43 4f 4e 53 4f 4c 45 20 44 45 56 49 43 45 20 41 CONSOLE DEVICE A 40: 4e 44 20 4d 4f 44 45 4d 0d 0a 3b 0d 0a 0d 0a 50 ND MODEM..;....P 50: 4d 53 47 20 20 20 20 4d 4f 56 20 20 20 20 20 43 MSG MOV C 60: 2c 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 3b ,M ; 70: 50 52 49 4e 54 20 4d 53 47 20 41 54 20 28 48 4c PRINT MSG AT (HL ### Disk Sector 114 ### 00: 29 20 54 4f 20 30 30 0d 0a 20 20 20 20 20 20 20 ) TO 00.. 10: 20 49 4e 58 20 20 20 20 20 48 0d 0a 20 20 20 20 INX H.. 20: 20 20 20 20 4d 4f 56 20 20 20 20 20 41 2c 43 0d MOV A,C. 30: 0a 20 20 20 20 20 20 20 20 4f 52 41 20 20 20 20 . ORA 40: 20 41 0d 0a 20 20 20 20 20 20 20 20 52 5a 0d 0a A.. RZ.. 50: 20 20 20 20 20 20 20 20 50 55 53 48 20 20 20 20 PUSH 60: 48 0d 0a 20 20 20 20 20 20 20 20 43 41 4c 4c 20 H.. CALL 70: 20 20 20 43 4f 55 54 0d 0a 20 20 20 20 20 20 20 COUT.. ### Disk Sector 115 ### 00: 20 50 4f 50 20 20 20 20 20 48 0d 0a 20 20 20 20 POP H.. 10: 20 20 20 20 4a 4d 50 20 20 20 20 20 50 4d 53 47 JMP PMSG 20: 0d 0a 0d 0a 43 43 52 4c 46 20 20 20 4d 56 49 20 ....CCRLF MVI 30: 20 20 20 20 43 2c 30 44 48 0d 0a 0d 0a 0a 0a 0a C,0DH....... 40: 0a 0a 0a 0a 0a 0a 0a 0a 20 20 20 20 20 20 20 20 ........ 50: 43 41 4c 4c 20 20 20 20 43 4f 55 54 0d 0a 20 20 CALL COUT.. 60: 20 20 20 20 20 20 4d 56 49 20 20 20 20 20 43 2c MVI C, 70: 30 41 48 0d 0a 43 4f 55 54 20 20 20 20 50 55 53 0AH..COUT PUS ### Disk Sector 116 ### 00: 48 20 20 20 20 42 0d 0a 20 20 20 20 20 20 20 20 H B.. 10: 50 55 53 48 20 20 20 20 44 0d 0a 20 20 20 20 20 PUSH D.. 20: 20 20 20 50 55 53 48 20 20 20 20 48 0d 0a 20 20 PUSH H.. 30: 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 41 2c MOV A, 40: 43 0d 0a 20 20 20 20 20 20 20 20 43 50 49 20 20 C.. CPI 50: 20 20 20 27 20 27 0d 0a 20 20 20 20 20 20 20 20 ' '.. 60: 4a 4e 5a 20 20 20 20 20 43 4f 55 54 4f 4b 0d 0a JNZ COUTOK.. 70: 20 20 20 20 20 20 20 20 43 50 49 20 20 20 20 20 CPI ### Disk Sector 117 ### 00: 30 38 48 20 20 20 20 20 20 20 20 20 20 20 20 20 08H 10: 3b 42 41 43 4b 53 50 41 43 45 0d 0a 20 20 20 20 ;BACKSPACE.. 20: 20 20 20 20 4a 5a 20 20 20 20 20 20 43 4f 55 54 JZ COUT 30: 4f 4b 0d 0a 20 20 20 20 20 20 20 20 43 50 49 20 OK.. CPI 40: 20 20 20 20 30 44 48 20 20 20 20 20 20 20 20 20 0DH 50: 20 20 20 20 3b 43 41 52 52 49 41 47 45 20 52 45 ;CARRIAGE RE 60: 54 55 52 4e 0d 0a 20 20 20 20 20 20 20 20 4a 5a TURN.. JZ 70: 20 20 20 20 20 20 43 4f 55 54 4f 4b 0d 0a 20 20 COUTOK.. ### Disk Sector 118 ### 00: 20 20 20 20 20 20 43 50 49 20 20 20 20 20 30 41 CPI 0A 10: 48 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 4c H ;L 20: 49 4e 45 20 46 45 45 44 0d 0a 20 20 20 20 20 20 INE FEED.. 30: 20 20 4a 5a 20 20 20 20 20 20 43 4f 55 54 4f 4b JZ COUTOK 40: 0d 0a 20 20 20 20 20 20 20 20 43 50 49 20 20 20 .. CPI 50: 20 20 30 39 48 20 20 20 20 20 20 20 20 20 20 20 09H 60: 20 20 3b 54 41 42 0d 0a 20 20 20 20 20 20 20 20 ;TAB.. 70: 4a 5a 20 20 20 20 20 20 43 4f 55 54 4f 4b 0d 0a JZ COUTOK.. ### Disk Sector 119 ### 00: 20 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 MOV 10: 42 2c 43 0d 0a 20 20 20 20 20 20 20 20 4d 56 49 B,C.. MVI 20: 20 20 20 20 20 43 2c 27 5e 27 0d 0a 20 20 20 20 C,'^'.. 30: 20 20 20 20 43 41 4c 4c 20 20 20 20 43 4f 55 54 CALL COUT 40: 0d 0a 20 20 20 20 20 20 20 20 4d 4f 56 20 20 20 .. MOV 50: 20 20 41 2c 42 0d 0a 20 20 20 20 20 20 20 20 4f A,B.. O 60: 52 49 20 20 20 20 20 34 30 48 0d 0a 20 20 20 20 RI 40H.. 70: 20 20 20 20 4d 4f 56 20 20 20 20 20 43 2c 41 0d MOV C,A. ### Disk Sector 120 ### 00: 0a 43 4f 55 54 4f 4b 20 20 4d 4f 56 20 20 20 20 .COUTOK MOV 10: 20 45 2c 43 0d 0a 20 20 20 20 20 20 20 20 4d 56 E,C.. MV 20: 49 20 20 20 20 20 43 2c 32 20 20 20 20 20 20 20 I C,2 30: 20 20 20 20 20 20 3b 57 52 49 54 45 20 54 4f 20 ;WRITE TO 40: 43 4f 4e 53 4f 4c 45 0d 0a 20 20 20 20 20 20 20 CONSOLE.. 50: 20 43 41 4c 4c 20 20 20 20 42 44 4f 53 0d 0a 20 CALL BDOS.. 60: 20 20 20 20 20 20 20 50 4f 50 20 20 20 20 20 48 POP H 70: 0d 0a 20 20 20 20 20 20 20 20 50 4f 50 20 20 20 .. POP ### Disk Sector 121 ### 00: 20 20 44 0d 0a 20 20 20 20 20 20 20 20 50 4f 50 D.. POP 10: 20 20 20 20 20 42 0d 0a 20 20 20 20 20 20 20 20 B.. 20: 4c 44 41 20 20 20 20 20 50 52 54 53 57 20 20 20 LDA PRTSW 30: 20 20 20 20 20 20 20 20 3b 43 48 45 43 4b 20 46 ;CHECK F 40: 4f 52 20 50 52 49 4e 54 20 45 43 48 4f 0d 0a 20 OR PRINT ECHO.. 50: 20 20 20 20 20 20 20 41 4e 49 20 20 20 20 20 31 ANI 1 60: 0d 0a 20 20 20 20 20 20 20 20 52 5a 0d 0a 50 4c .. RZ..PL 70: 49 53 54 20 20 20 50 55 53 48 20 20 20 20 42 0d IST PUSH B. ### Disk Sector 122 ### 00: 0a 20 20 20 20 20 20 20 20 50 55 53 48 20 20 20 . PUSH 10: 20 44 0d 0a 20 20 20 20 20 20 20 20 50 55 53 48 D.. PUSH 20: 20 20 20 20 48 0d 0a 20 20 20 20 20 20 20 20 4d H.. M 30: 4f 56 20 20 20 20 20 45 2c 43 0d 0a 20 20 20 20 OV E,C.. 40: 20 20 20 20 4d 56 49 20 20 20 20 20 43 2c 35 0d MVI C,5. 50: 0a 20 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 . CALL 60: 20 42 44 4f 53 0d 0a 20 20 20 20 20 20 20 20 50 BDOS.. P 70: 4f 50 20 20 20 20 20 48 0d 0a 20 20 20 20 20 20 OP H.. ### Disk Sector 123 ### 00: 20 20 50 4f 50 20 20 20 20 20 44 0d 0a 20 20 20 POP D.. 10: 20 20 20 20 20 50 4f 50 20 20 20 20 20 42 0d 0a POP B.. 20: 20 20 20 20 20 20 20 20 52 45 54 0d 0a 0d 0a 42 RET....B 30: 44 4f 55 54 20 20 20 4c 48 4c 44 20 20 20 20 43 DOUT LHLD C 40: 55 52 50 54 52 20 20 20 20 20 20 20 20 20 20 3b URPTR ; 50: 46 49 4c 4c 20 54 48 45 20 42 55 46 46 45 52 0d FILL THE BUFFER. 60: 0a 20 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 . MOV 70: 20 4d 2c 43 0d 0a 20 20 20 20 20 20 20 20 49 4e M,C.. IN ### Disk Sector 124 ### 00: 58 20 20 20 20 20 48 0d 0a 20 20 20 20 20 20 20 X H.. 10: 20 4c 44 41 20 20 20 20 20 48 49 4d 45 4d 0d 0a LDA HIMEM.. 20: 20 20 20 20 20 20 20 20 43 4d 50 20 20 20 20 20 CMP 30: 48 0d 0a 20 20 20 20 20 20 20 20 4a 43 20 20 20 H.. JC 40: 20 20 20 42 44 4f 55 54 43 0d 0a 20 20 20 20 20 BDOUTC.. 50: 20 20 20 53 48 4c 44 20 20 20 20 43 55 52 50 54 SHLD CURPT 60: 52 0d 0a 20 20 20 20 20 20 20 20 4d 4f 56 20 20 R.. MOV 70: 20 20 20 41 2c 43 0d 0a 20 20 20 20 20 20 20 20 A,C.. ### Disk Sector 125 ### 00: 43 50 49 20 20 20 20 20 31 41 48 20 20 20 20 20 CPI 1AH 10: 20 20 20 20 20 20 20 20 3b 49 53 20 49 54 20 45 ;IS IT E 20: 4f 46 0d 0a 20 20 20 20 20 20 20 20 52 4e 5a 0d OF.. RNZ. 30: 0a 42 44 4f 55 54 43 20 20 43 41 4c 4c 20 20 20 .BDOUTC CALL 40: 20 43 4c 4f 53 45 52 0d 0a 20 20 20 20 20 20 20 CLOSER.. 50: 20 4a 4d 50 20 20 20 20 20 54 45 52 4d 0d 0a 0d JMP TERM... 60: 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 0d 0a 43 4c ..............CL 70: 4f 53 45 52 20 20 4c 48 4c 44 20 20 20 20 43 55 OSER LHLD CU ### Disk Sector 126 ### 00: 52 50 54 52 0d 0a 20 20 20 20 20 20 20 20 4d 56 RPTR.. MV 10: 49 20 20 20 20 20 4d 2c 31 41 48 20 20 20 20 20 I M,1AH 20: 20 20 20 20 20 20 3b 4d 41 4b 45 20 53 55 52 45 ;MAKE SURE 30: 20 4f 46 20 45 4f 46 0d 0a 20 20 20 20 20 20 20 OF EOF.. 40: 20 4c 58 49 20 20 20 20 20 48 2c 46 42 55 46 46 LXI H,FBUFF 50: 0d 0a 20 20 20 20 20 20 20 20 53 48 4c 44 20 20 .. SHLD 60: 20 20 43 55 52 50 54 52 0d 0a 57 52 54 4e 58 54 CURPTR..WRTNXT 70: 20 20 43 41 4c 4c 20 20 20 20 42 4c 44 52 45 43 CALL BLDREC ### Disk Sector 127 ### 00: 0d 0a 20 20 20 20 20 20 20 20 43 41 4c 4c 20 20 .. CALL 10: 20 20 57 52 54 52 45 43 0d 0a 20 20 20 20 20 20 WRTREC.. 20: 20 20 4a 4e 5a 20 20 20 20 20 46 43 4c 4f 53 45 JNZ FCLOSE 30: 0d 0a 20 20 20 20 20 20 20 20 4c 48 4c 44 20 20 .. LHLD 40: 20 20 43 55 52 50 54 52 0d 0a 20 20 20 20 20 20 CURPTR.. 50: 20 20 4d 4f 56 20 20 20 20 20 41 2c 4d 0d 0a 20 MOV A,M.. 60: 20 20 20 20 20 20 20 43 50 49 20 20 20 20 20 31 CPI 1 70: 41 48 0d 0a 20 20 20 20 20 20 20 20 4a 4e 5a 20 AH.. JNZ ### Disk Sector 128 ### 00: 20 20 20 20 57 52 54 4e 58 54 0d 0a 46 43 4c 4f WRTNXT..FCLO 10: 53 45 20 20 4d 56 49 20 20 20 20 20 43 2c 31 36 SE MVI C,16 20: 20 20 20 20 20 20 20 20 20 20 20 20 3b 43 4c 4f ;CLO 30: 53 45 20 46 49 4c 45 0d 0a 20 20 20 20 20 20 20 SE FILE.. 40: 20 4c 58 49 20 20 20 20 20 44 2c 46 43 42 0d 0a LXI D,FCB.. 50: 20 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 CALL 60: 42 44 4f 53 0d 0a 20 20 20 20 20 20 20 20 4c 58 BDOS.. LX 70: 49 20 20 20 20 20 48 2c 43 4c 4d 53 47 0d 0a 20 I H,CLMSG.. ### Disk Sector 129 ### 00: 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 50 CALL P 10: 4d 53 47 0d 0a 20 20 20 20 20 20 20 20 52 45 54 MSG.. RET 20: 0d 0a 0d 0a 42 4c 44 52 45 43 20 20 4c 58 49 20 ....BLDREC LXI 30: 20 20 20 20 44 2c 54 42 55 46 46 0d 0a 20 20 20 D,TBUFF.. 40: 20 20 20 20 20 4d 56 49 20 20 20 20 20 42 2c 38 MVI B,8 50: 30 48 0d 0a 0d 0a 42 4c 44 44 55 50 20 20 4c 48 0H....BLDDUP LH 60: 4c 44 20 20 20 20 43 55 52 50 54 52 0d 0a 20 20 LD CURPTR.. 70: 20 20 20 20 20 20 4d 4f 56 20 20 20 20 20 41 2c MOV A, ### Disk Sector 130 ### 00: 4d 0d 0a 20 20 20 20 20 20 20 20 53 54 41 58 20 M.. STAX 10: 20 20 20 44 0d 0a 20 20 20 20 20 20 20 20 43 50 D.. CP 20: 49 20 20 20 20 20 31 41 48 0d 0a 20 20 20 20 20 I 1AH.. 30: 20 20 20 52 5a 0d 0a 20 20 20 20 20 20 20 20 49 RZ.. I 40: 4e 58 20 20 20 20 20 48 0d 0a 20 20 20 20 20 20 NX H.. 50: 20 20 53 48 4c 44 20 20 20 20 43 55 52 50 54 52 SHLD CURPTR 60: 0d 0a 20 20 20 20 20 20 20 20 49 4e 58 20 20 20 .. INX 70: 20 20 44 0d 0a 20 20 20 20 20 20 20 20 44 43 52 D.. DCR ### Disk Sector 131 ### 00: 20 20 20 20 20 42 0d 0a 20 20 20 20 20 20 20 20 B.. 10: 4a 4e 5a 20 20 20 20 20 42 4c 44 44 55 50 0d 0a JNZ BLDDUP.. 20: 20 20 20 20 20 20 20 20 52 45 54 0d 0a 0d 0a 57 RET....W 30: 52 54 52 45 43 20 20 4c 58 49 20 20 20 20 20 44 RTREC LXI D 40: 2c 46 43 42 0d 0a 20 20 20 20 20 20 20 20 4d 56 ,FCB.. MV 50: 49 20 20 20 20 20 43 2c 32 31 20 20 20 20 20 20 I C,21 60: 20 20 20 20 20 20 3b 57 52 49 54 45 20 41 20 52 ;WRITE A R 70: 45 43 4f 52 44 0d 0a 20 20 20 20 20 20 20 20 43 ECORD.. C ### Disk Sector 132 ### 00: 41 4c 4c 20 20 20 20 42 44 4f 53 0d 0a 20 20 20 ALL BDOS.. 10: 20 20 20 20 20 4f 52 41 20 20 20 20 20 41 20 20 ORA A 20: 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 53 55 ;SU 30: 43 43 45 53 53 46 55 4c 20 57 52 49 54 45 0d 0a CCESSFUL WRITE.. 40: 20 20 20 20 20 20 20 20 52 45 54 0d 0a 0d 0a 0d RET..... 50: 0a 55 50 43 41 53 45 20 20 4c 58 49 20 20 20 20 .UPCASE LXI 60: 20 48 2c 55 4d 53 47 0d 0a 20 20 20 20 20 20 20 H,UMSG.. 70: 20 43 41 4c 4c 20 20 20 20 50 4d 53 47 0d 0a 20 CALL PMSG.. ### Disk Sector 133 ### 00: 20 20 20 20 20 20 20 4c 44 41 20 20 20 20 20 55 LDA U 10: 50 43 53 57 0d 0a 20 20 20 20 20 20 20 20 58 52 PCSW.. XR 20: 49 20 20 20 20 20 38 30 48 0d 0a 20 20 20 20 20 I 80H.. 30: 20 20 20 53 54 41 20 20 20 20 20 55 50 43 53 57 STA UPCSW 40: 0d 0a 20 20 20 20 20 20 20 20 4a 4d 50 20 20 20 .. JMP 50: 20 20 43 44 49 4e 0d 0a 0d 0a 0d 0a 47 45 54 46 CDIN......GETF 60: 49 4c 20 20 4c 58 49 20 20 20 20 20 48 2c 46 43 IL LXI H,FC 70: 42 0d 0a 20 20 20 20 20 20 20 20 4d 56 49 20 20 B.. MVI ### Disk Sector 134 ### 00: 20 20 20 42 2c 33 33 0d 0a 47 54 46 4c 30 30 20 B,33..GTFL00 10: 20 4d 56 49 20 20 20 20 20 4d 2c 30 0d 0a 20 20 MVI M,0.. 20: 20 20 20 20 20 20 49 4e 58 20 20 20 20 20 48 0d INX H. 30: 0a 20 20 20 20 20 20 20 20 44 43 52 20 20 20 20 . DCR 40: 20 42 0d 0a 0d 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a B.............. 50: 0a 20 20 20 20 20 20 20 20 4a 4e 5a 20 20 20 20 . JNZ 60: 20 47 54 46 4c 30 30 0d 0a 20 20 20 20 20 20 20 GTFL00.. 70: 20 4d 56 49 20 20 20 20 20 42 2c 31 31 0d 0a 20 MVI B,11.. ### Disk Sector 135 ### 00: 20 20 20 20 20 20 20 4c 58 49 20 20 20 20 20 48 LXI H 10: 2c 46 43 42 2b 31 0d 0a 47 54 46 4c 30 31 20 20 ,FCB+1..GTFL01 20: 4d 56 49 20 20 20 20 20 4d 2c 27 20 27 0d 0a 20 MVI M,' '.. 30: 20 20 20 20 20 20 20 49 4e 58 20 20 20 20 20 48 INX H 40: 0d 0a 20 20 20 20 20 20 20 20 44 43 52 20 20 20 .. DCR 50: 20 20 42 0d 0a 20 20 20 20 20 20 20 20 4a 4e 5a B.. JNZ 60: 20 20 20 20 20 47 54 46 4c 30 31 0d 0a 20 20 20 GTFL01.. 70: 20 20 20 20 20 4c 58 49 20 20 20 20 20 48 2c 35 LXI H,5 ### Disk Sector 136 ### 00: 30 48 20 20 20 20 20 20 20 20 20 20 20 3b 53 45 0H ;SE 10: 54 20 42 55 46 46 20 4c 45 4e 20 41 4e 44 20 43 T BUFF LEN AND C 20: 4f 4e 54 45 4e 54 0d 0a 20 20 20 20 20 20 20 20 ONTENT.. 30: 53 48 4c 44 20 20 20 20 43 42 55 46 46 0d 0a 0d SHLD CBUFF... 40: 0a 20 20 20 20 20 20 20 20 4c 58 49 20 20 20 20 . LXI 50: 20 44 2c 43 42 55 46 46 0d 0a 20 20 20 20 20 20 D,CBUFF.. 60: 20 20 4d 56 49 20 20 20 20 20 43 2c 31 30 20 20 MVI C,10 70: 20 20 20 20 20 20 20 20 20 20 3b 52 45 41 44 20 ;READ ### Disk Sector 137 ### 00: 49 4e 50 55 54 20 42 55 46 46 45 52 0d 0a 20 20 INPUT BUFFER.. 10: 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 42 44 CALL BD 20: 4f 53 0d 0a 20 20 20 20 20 20 20 20 4c 44 41 20 OS.. LDA 30: 20 20 20 20 43 42 55 46 46 2b 31 0d 0a 20 20 20 CBUFF+1.. 40: 20 20 20 20 20 4c 58 49 20 20 20 20 20 44 2c 43 LXI D,C 50: 42 55 46 46 2b 32 0d 0a 20 20 20 20 20 20 20 20 BUFF+2.. 60: 4d 4f 56 20 20 20 20 20 42 2c 41 20 20 20 20 20 MOV B,A 70: 20 20 20 20 20 20 20 20 3b 47 45 54 20 42 55 46 ;GET BUF ### Disk Sector 138 ### 00: 46 45 52 20 4c 45 4e 47 54 48 0d 0a 20 20 20 20 FER LENGTH.. 10: 20 20 20 20 43 50 49 20 20 20 20 20 31 35 20 20 CPI 15 20: 20 20 20 20 20 20 20 20 20 20 20 20 3b 31 34 20 ;14 30: 49 53 20 4d 41 58 0d 0a 20 20 20 20 20 20 20 20 IS MAX.. 40: 4a 4e 43 20 20 20 20 20 45 52 4f 50 45 4e 0d 0a JNC EROPEN.. 50: 20 20 20 20 20 20 20 20 43 50 49 20 20 20 20 20 CPI 60: 31 0d 0a 20 20 20 20 20 20 20 20 4a 43 20 20 20 1.. JC 70: 20 20 20 45 52 4f 50 45 4e 0d 0a 20 20 20 20 20 EROPEN.. ### Disk Sector 139 ### 00: 20 20 20 4a 5a 20 20 20 20 20 20 47 54 46 4c 31 JZ GTFL1 10: 0d 0a 20 20 20 20 20 20 20 20 4c 48 4c 44 20 20 .. LHLD 20: 20 20 43 42 55 46 46 2b 32 20 20 20 20 20 20 20 CBUFF+2 30: 20 20 3b 47 45 54 20 49 53 54 20 54 57 4f 20 43 ;GET IST TWO C 40: 48 41 52 41 43 54 45 52 53 0d 0a 20 20 20 20 20 HARACTERS.. 50: 20 20 20 4d 4f 56 20 20 20 20 20 41 2c 48 0d 0a MOV A,H.. 60: 20 20 20 20 20 20 20 20 43 50 49 20 20 20 20 20 CPI 70: 27 3a 27 0d 0a 20 20 20 20 20 20 20 20 4a 4e 5a ':'.. JNZ ### Disk Sector 140 ### 00: 20 20 20 20 20 47 54 46 4c 31 0d 0a 20 20 20 20 GTFL1.. 10: 20 20 20 20 4d 56 49 20 20 20 20 20 44 2c 30 0d MVI D,0. 20: 0a 20 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 . MOV 30: 20 41 2c 4c 0d 0a 20 20 20 20 20 20 20 20 41 4e A,L.. AN 40: 49 20 20 20 20 20 35 46 48 20 20 20 20 20 20 20 I 5FH 50: 20 20 20 20 20 20 3b 46 4f 52 43 45 20 54 4f 20 ;FORCE TO 60: 55 50 50 45 52 20 43 41 53 45 0d 0a 20 20 20 20 UPPER CASE.. 70: 20 20 20 20 4d 56 49 20 20 20 20 20 45 2c 30 20 MVI E,0 ### Disk Sector 141 ### 00: 20 20 20 20 20 20 20 20 20 20 20 20 3b 41 53 53 ;ASS 10: 55 4d 45 20 44 52 49 56 45 20 41 0d 0a 20 20 20 UME DRIVE A.. 20: 20 20 20 20 20 43 50 49 20 20 20 20 20 27 42 27 CPI 'B' 30: 0d 0a 20 20 20 20 20 20 20 20 4a 4e 5a 20 20 20 .. JNZ 40: 20 20 47 54 46 4c 30 0d 0a 20 20 20 20 20 20 20 GTFL0.. 50: 20 4d 56 49 20 20 20 20 20 45 2c 31 20 20 20 20 MVI E,1 60: 20 20 20 20 20 20 20 20 20 3b 53 45 54 20 46 4f ;SET FO 70: 52 20 44 52 49 56 45 20 42 3a 0d 0a 47 54 46 4c R DRIVE B:..GTFL ### Disk Sector 142 ### 00: 30 20 20 20 4d 56 49 20 20 20 20 20 43 2c 31 34 0 MVI C,14 10: 20 20 20 20 20 20 20 20 20 20 20 20 3b 53 45 4c ;SEL 20: 45 43 54 20 44 49 53 4b 20 44 52 49 56 45 0d 0a ECT DISK DRIVE.. 30: 20 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 CALL 40: 42 44 4f 53 0d 0a 20 20 20 20 20 20 20 20 4c 44 BDOS.. LD 50: 41 20 20 20 20 20 43 42 55 46 46 2b 31 0d 0a 20 A CBUFF+1.. 60: 20 20 20 20 20 20 20 44 43 52 20 20 20 20 20 41 DCR A 70: 0d 0a 20 20 20 20 20 20 20 20 44 43 52 20 20 20 .. DCR ### Disk Sector 143 ### 00: 20 20 41 0d 0a 20 20 20 20 20 20 20 20 4d 4f 56 A.. MOV 10: 20 20 20 20 20 42 2c 41 0d 0a 20 20 20 20 20 20 B,A.. 20: 20 20 4c 58 49 20 20 20 20 20 44 2c 43 42 55 46 LXI D,CBUF 30: 46 2b 34 0d 0a 47 54 46 4c 31 20 20 20 4c 58 49 F+4..GTFL1 LXI 40: 20 20 20 20 20 48 2c 46 43 42 2b 31 0d 0a 20 20 H,FCB+1.. 50: 20 20 20 20 20 20 4d 56 49 20 20 20 20 20 43 2c MVI C, 60: 39 0d 0a 47 54 46 4c 41 20 20 20 4c 44 41 58 20 9..GTFLA LDAX 70: 20 20 20 44 0d 0a 20 20 20 20 20 20 20 20 49 4e D.. IN ### Disk Sector 144 ### 00: 58 20 20 20 20 20 44 0d 0a 20 20 20 20 20 20 20 X D.. 10: 20 43 50 49 20 20 20 20 20 27 2e 27 0d 0a 20 20 CPI '.'.. 20: 20 20 20 20 20 20 4a 5a 20 20 20 20 20 20 47 54 JZ GT 30: 46 4c 42 0d 0a 20 20 20 20 20 20 20 20 4d 4f 56 FLB.. MOV 40: 20 20 20 20 20 4d 2c 41 0d 0a 20 20 20 20 20 20 M,A.. 50: 20 20 49 4e 58 20 20 20 20 20 48 0d 0a 20 20 20 INX H.. 60: 20 20 20 20 20 44 43 52 20 20 20 20 20 42 0d 0a DCR B.. 70: 20 20 20 20 20 20 20 20 4a 5a 20 20 20 20 20 20 JZ ### Disk Sector 145 ### 00: 47 54 46 4c 39 0d 0a 20 20 20 20 20 20 20 20 44 GTFL9.. D 10: 43 52 20 20 20 20 20 43 0d 0a 20 20 20 20 20 20 CR C.. 20: 20 20 4a 4e 5a 20 20 20 20 20 47 54 46 4c 41 0d JNZ GTFLA. 30: 0a 20 20 20 20 20 20 20 20 4a 4d 50 20 20 20 20 . JMP 40: 20 45 52 4f 50 45 4e 0d 0a 47 54 46 4c 42 20 20 EROPEN..GTFLB 50: 20 4c 58 49 20 20 20 20 20 48 2c 46 43 42 2b 39 LXI H,FCB+9 60: 0d 0a 20 20 20 20 20 20 20 20 4d 56 49 20 20 20 .. MVI 70: 20 20 43 2c 33 0d 0a 0d 0a 0a 0a 0a 0a 0a 0a 0a C,3........... ### Disk Sector 146 ### 00: 0a 0a 0a 0a 47 54 46 4c 43 20 20 20 4c 44 41 58 ....GTFLC LDAX 10: 20 20 20 20 44 0d 0a 20 20 20 20 20 20 20 20 49 D.. I 20: 4e 58 20 20 20 20 20 44 0d 0a 20 20 20 20 20 20 NX D.. 30: 20 20 4d 4f 56 20 20 20 20 20 4d 2c 41 0d 0a 20 MOV M,A.. 40: 20 20 20 20 20 20 20 49 4e 58 20 20 20 20 20 48 INX H 50: 0d 0a 20 20 20 20 20 20 20 20 44 43 52 20 20 20 .. DCR 60: 20 20 42 0d 0a 20 20 20 20 20 20 20 20 4a 5a 20 B.. JZ 70: 20 20 20 20 20 47 54 46 4c 39 0d 0a 20 20 20 20 GTFL9.. ### Disk Sector 147 ### 00: 20 20 20 20 44 43 52 20 20 20 20 20 43 0d 0a 20 DCR C.. 10: 20 20 20 20 20 20 20 4a 4e 5a 20 20 20 20 20 47 JNZ G 20: 54 46 4c 43 0d 0a 47 54 46 4c 39 20 20 20 4c 58 TFLC..GTFL9 LX 30: 49 20 20 20 20 20 48 2c 46 43 42 2b 31 0d 0a 20 I H,FCB+1.. 40: 20 20 20 20 20 20 20 4d 56 49 20 20 20 20 20 43 MVI C 50: 2c 31 31 0d 0a 47 54 46 4c 44 20 20 20 4d 4f 56 ,11..GTFLD MOV 60: 20 20 20 20 20 41 2c 4d 0d 0a 20 20 20 20 20 20 A,M.. 70: 20 20 43 50 49 20 20 20 20 20 27 20 27 0d 0a 20 CPI ' '.. ### Disk Sector 148 ### 00: 20 20 20 20 20 20 20 4a 43 20 20 20 20 20 20 45 JC E 10: 52 4f 50 45 4e 0d 0a 20 20 20 20 20 20 20 20 4a ROPEN.. J 20: 5a 20 20 20 20 20 20 47 54 46 4c 45 0d 0a 20 20 Z GTFLE.. 30: 20 20 20 20 20 20 43 50 49 20 20 20 20 20 27 30 CPI '0 40: 27 0d 0a 20 20 20 20 20 20 20 20 4a 43 20 20 20 '.. JC 50: 20 20 20 45 52 4f 50 45 4e 0d 0a 20 20 20 20 20 EROPEN.. 60: 20 20 20 43 50 49 20 20 20 20 20 27 3a 27 0d 0a CPI ':'.. 70: 20 20 20 20 20 20 20 20 4a 43 20 20 20 20 20 20 JC ### Disk Sector 149 ### 00: 47 54 46 4c 45 0d 0a 20 20 20 20 20 20 20 20 43 GTFLE.. C 10: 50 49 20 20 20 20 20 27 41 27 0d 0a 20 20 20 20 PI 'A'.. 20: 20 20 20 20 4a 43 20 20 20 20 20 20 45 52 4f 50 JC EROP 30: 45 4e 0d 0a 20 20 20 20 20 20 20 20 43 50 49 20 EN.. CPI 40: 20 20 20 20 27 5a 27 2b 31 0d 0a 20 20 20 20 20 'Z'+1.. 50: 20 20 20 4a 43 20 20 20 20 20 20 47 54 46 4c 45 JC GTFLE 60: 0d 0a 20 20 20 20 20 20 20 20 43 50 49 20 20 20 .. CPI 70: 20 20 36 31 48 0d 0a 20 20 20 20 20 20 20 20 4a 61H.. J ### Disk Sector 150 ### 00: 43 20 20 20 20 20 20 45 52 4f 50 45 4e 0d 0a 20 C EROPEN.. 10: 20 20 20 20 20 20 20 43 50 49 20 20 20 20 20 37 CPI 7 20: 42 48 0d 0a 20 20 20 20 20 20 20 20 4a 4e 43 20 BH.. JNC 30: 20 20 20 20 45 52 4f 50 45 4e 0d 0a 20 20 20 20 EROPEN.. 40: 20 20 20 20 41 4e 49 20 20 20 20 20 35 46 48 0d ANI 5FH. 50: 0a 20 20 20 20 20 20 20 20 4d 4f 56 20 20 20 20 . MOV 60: 20 4d 2c 41 0d 0a 47 54 46 4c 45 20 20 20 49 4e M,A..GTFLE IN 70: 58 20 20 20 20 20 48 0d 0a 20 20 20 20 20 20 20 X H.. ### Disk Sector 151 ### 00: 20 44 43 52 20 20 20 20 20 43 0d 0a 20 20 20 20 DCR C.. 10: 20 20 20 20 4a 4e 5a 20 20 20 20 20 47 54 46 4c JNZ GTFL 20: 44 0d 0a 20 20 20 20 20 20 20 20 43 41 4c 4c 20 D.. CALL 30: 20 20 20 43 43 52 4c 46 0d 0a 20 20 20 20 20 20 CCRLF.. 40: 20 20 52 45 54 0d 0a 0d 0a 4d 41 4b 46 49 4c 20 RET....MAKFIL 50: 20 4c 58 49 20 20 20 20 20 44 2c 46 43 42 0d 0a LXI D,FCB.. 60: 20 20 20 20 20 20 20 20 4d 56 49 20 20 20 20 20 MVI 70: 43 2c 32 32 20 20 20 20 20 20 20 20 20 20 20 20 C,22 ### Disk Sector 152 ### 00: 3b 4d 41 4b 45 20 46 49 4c 45 0d 0a 20 20 20 20 ;MAKE FILE.. 10: 20 20 20 20 43 41 4c 4c 20 20 20 20 42 44 4f 53 CALL BDOS 20: 0d 0a 20 20 20 20 20 20 20 20 43 50 49 20 20 20 .. CPI 30: 20 20 32 35 35 0d 0a 20 20 20 20 20 20 20 20 4a 255.. J 40: 5a 20 20 20 20 20 20 45 52 4f 50 45 4e 0d 0a 46 Z EROPEN..F 50: 4f 50 45 4e 20 20 20 4c 58 49 20 20 20 20 20 44 OPEN LXI D 60: 2c 46 43 42 0d 0a 20 20 20 20 20 20 20 20 4d 56 ,FCB.. MV 70: 49 20 20 20 20 20 43 2c 31 35 20 20 20 20 20 20 I C,15 ### Disk Sector 153 ### 00: 20 20 20 20 20 20 3b 4f 50 45 4e 20 46 49 4c 45 ;OPEN FILE 10: 0d 0a 20 20 20 20 20 20 20 20 43 41 4c 4c 20 20 .. CALL 20: 20 20 42 44 4f 53 0d 0a 20 20 20 20 20 20 20 20 BDOS.. 30: 4c 58 49 20 20 20 20 20 48 2c 54 42 55 46 46 0d LXI H,TBUFF. 40: 0a 20 20 20 20 20 20 20 20 53 48 4c 44 20 20 20 . SHLD 50: 20 43 55 52 50 54 52 0d 0a 20 20 20 20 20 20 20 CURPTR.. 60: 20 43 50 49 20 20 20 20 20 32 35 35 0d 0a 20 20 CPI 255.. 70: 20 20 20 20 20 20 52 4e 5a 0d 0a 20 20 20 20 20 RNZ.. ### Disk Sector 154 ### 00: 20 20 20 4c 44 41 20 20 20 20 20 4d 4f 44 45 53 LDA MODES 10: 57 0d 0a 20 20 20 20 20 20 20 20 43 50 49 20 20 W.. CPI 20: 20 20 20 32 0d 0a 20 20 20 20 20 20 20 20 4a 5a 2.. JZ 30: 20 20 20 20 20 20 4d 41 4b 46 49 4c 0d 0a 45 52 MAKFIL..ER 40: 4f 50 45 4e 20 20 4c 58 49 20 20 20 20 20 48 2c OPEN LXI H, 50: 4f 50 4d 53 47 0d 0a 20 20 20 20 20 20 20 20 43 OPMSG.. C 60: 41 4c 4c 20 20 20 20 50 4d 53 47 0d 0a 20 20 20 ALL PMSG.. 70: 20 20 20 20 20 43 41 4c 4c 20 20 20 20 42 41 44 CALL BAD ### Disk Sector 155 ### 00: 43 4d 44 0d 0a 20 20 20 20 20 20 20 20 4a 4d 50 CMD.. JMP 10: 20 20 20 20 20 54 45 52 4d 0d 0a 0d 0a 0d 0a 0a TERM....... 20: 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 52 45 43 56 20 20 ..........RECV 30: 20 20 4c 58 49 20 20 20 20 20 48 2c 52 4d 53 47 LXI H,RMSG 40: 0d 0a 20 20 20 20 20 20 20 20 43 41 4c 4c 20 20 .. CALL 50: 20 20 50 4d 53 47 0d 0a 20 20 20 20 20 20 20 20 PMSG.. 60: 4c 44 41 20 20 20 20 20 4d 4f 44 45 53 57 0d 0a LDA MODESW.. 70: 20 20 20 20 20 20 20 20 4f 52 41 20 20 20 20 20 ORA ### Disk Sector 156 ### 00: 41 0d 0a 20 20 20 20 20 20 20 20 4a 4e 5a 20 20 A.. JNZ 10: 20 20 20 42 41 44 43 4d 44 0d 0a 20 20 20 20 20 BADCMD.. 20: 20 20 20 4d 56 49 20 20 20 20 20 41 2c 32 0d 0a MVI A,2.. 30: 20 20 20 20 20 20 20 20 53 54 41 20 20 20 20 20 STA 40: 4d 4f 44 45 53 57 0d 0a 20 20 20 20 20 20 20 20 MODESW.. 50: 4c 58 49 20 20 20 20 20 48 2c 44 53 4b 4d 53 47 LXI H,DSKMSG 60: 0d 0a 20 20 20 20 20 20 20 20 43 41 4c 4c 20 20 .. CALL 70: 20 20 50 4d 53 47 0d 0a 20 20 20 20 20 20 20 20 PMSG.. ### Disk Sector 157 ### 00: 43 41 4c 4c 20 20 20 20 47 45 54 46 49 4c 0d 0a CALL GETFIL.. 10: 20 20 20 20 20 20 20 20 43 41 4c 4c 20 20 20 20 CALL 20: 46 4f 50 45 4e 0d 0a 20 20 20 20 20 20 20 20 4d FOPEN.. M 30: 56 49 20 20 20 20 20 41 2c 31 41 48 0d 0a 20 20 VI A,1AH.. 40: 20 20 20 20 20 20 4c 58 49 20 20 20 20 20 48 2c LXI H, 50: 46 42 55 46 46 0d 0a 20 20 20 20 20 20 20 20 4d FBUFF.. M 60: 4f 56 20 20 20 20 20 4d 2c 41 0d 0a 20 20 20 20 OV M,A.. 70: 20 20 20 20 53 48 4c 44 20 20 20 20 43 55 52 50 SHLD CURP ### Disk Sector 158 ### 00: 54 52 0d 0a 20 20 20 20 20 20 20 20 4a 4d 50 20 TR.. JMP 10: 20 20 20 20 54 45 52 4d 41 0d 0a 0d 0a 53 45 4e TERMA....SEN 20: 44 20 20 20 20 4c 58 49 20 20 20 20 20 48 2c 53 D LXI H,S 30: 4d 53 47 0d 0a 20 20 20 20 20 20 20 20 43 41 4c MSG.. CAL 40: 4c 20 20 20 20 50 4d 53 47 0d 0a 20 20 20 20 20 L PMSG.. 50: 20 20 20 4c 44 41 20 20 20 20 20 4d 4f 44 45 53 LDA MODES 60: 57 0d 0a 20 20 20 20 20 20 20 20 4f 52 41 20 20 W.. ORA 70: 20 20 20 41 0d 0a 20 20 20 20 20 20 20 20 4a 4e A.. JN ### Disk Sector 159 ### 00: 5a 20 20 20 20 20 42 41 44 43 4d 44 0d 0a 20 20 Z BADCMD.. 10: 20 20 20 20 20 20 4d 56 49 20 20 20 20 20 41 2c MVI A, 20: 31 0d 0a 20 20 20 20 20 20 20 20 53 54 41 20 20 1.. STA 30: 20 20 20 4d 4f 44 45 53 57 0d 0a 20 20 20 20 20 MODESW.. 40: 20 20 20 4c 58 49 20 20 20 20 20 48 2c 44 53 4b LXI H,DSK 50: 4d 53 47 0d 0a 20 20 20 20 20 20 20 20 43 41 4c MSG.. CAL 60: 4c 20 20 20 20 50 4d 53 47 0d 0a 20 20 20 20 20 L PMSG.. 70: 20 20 20 43 41 4c 4c 20 20 20 20 47 45 54 46 49 CALL GETFI ### Disk Sector 160 ### 00: 4c 0d 0a 20 20 20 20 20 20 20 20 43 41 4c 4c 20 L.. CALL 10: 20 20 20 46 4f 50 45 4e 0d 0a 20 20 20 20 20 20 FOPEN.. 20: 20 20 4c 58 49 20 20 20 20 20 44 2c 46 43 42 0d LXI D,FCB. 30: 0a 20 20 20 20 20 20 20 20 4d 56 49 20 20 20 20 . MVI 40: 20 43 2c 32 30 20 20 20 20 20 20 20 20 20 20 20 C,20 50: 20 3b 52 45 41 44 20 46 49 52 53 54 20 52 45 43 ;READ FIRST REC 60: 4f 52 44 0d 0a 20 20 20 20 20 20 20 20 43 41 4c ORD.. CAL 70: 4c 20 20 20 20 42 44 4f 53 0d 0a 20 20 20 20 20 L BDOS.. ### Disk Sector 161 ### 00: 20 20 20 4f 52 41 20 20 20 20 20 41 0d 0a 20 20 ORA A.. 10: 20 20 20 20 20 20 4a 4e 5a 20 20 20 20 20 45 52 JNZ ER 20: 4f 50 45 4e 0d 0a 20 20 20 20 20 20 20 20 4a 4d OPEN.. JM 30: 50 20 20 20 20 20 54 45 52 4d 41 0d 0a 3b 0d 0a P TERMA..;.. 40: 50 52 54 53 57 20 20 20 44 42 20 20 20 20 20 20 PRTSW DB 50: 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 60: 3b 20 30 20 3d 20 4e 4f 20 20 31 20 3d 20 50 52 ; 0 = NO 1 = PR 70: 49 4e 54 20 4f 4e 0d 0a 43 52 4c 46 53 57 20 20 INT ON..CRLFSW ### Disk Sector 162 ### 00: 44 42 20 20 20 20 20 20 30 20 20 20 20 20 20 20 DB 0 10: 20 20 20 20 20 20 20 20 3b 20 30 20 3d 20 4e 4f ; 0 = NO 20: 20 41 55 54 4f 20 4c 46 20 20 20 31 20 3d 20 41 AUTO LF 1 = A 30: 55 54 4f 20 4c 46 0d 0a 45 43 48 4f 53 57 20 20 UTO LF..ECHOSW 40: 44 42 20 20 20 20 20 20 30 20 20 20 20 20 20 20 DB 0 50: 20 20 20 20 20 20 20 20 3b 20 30 20 3d 20 4e 4f ; 0 = NO 60: 20 45 43 48 4f 20 20 20 20 20 20 31 20 3d 20 45 ECHO 1 = E 70: 43 48 4f 0d 0a 4d 4f 44 45 53 57 20 20 44 42 20 CHO..MODESW DB ### Disk Sector 163 ### 00: 20 20 20 20 20 30 20 20 20 20 20 20 20 20 20 20 0 10: 20 20 20 20 20 3b 20 30 20 3d 20 4e 4f 20 54 52 ; 0 = NO TR 20: 41 4e 53 20 20 20 20 20 31 20 3d 20 53 45 4e 44 ANS 1 = SEND 30: 20 20 20 32 20 3d 20 52 45 43 45 49 56 45 0d 0a 2 = RECEIVE.. 40: 53 4f 53 4c 4f 57 20 20 44 57 20 20 20 20 20 20 SOSLOW DW 50: 31 30 30 48 20 20 20 20 20 20 20 20 20 20 20 20 100H 60: 3b 20 55 53 45 44 20 54 4f 20 53 4c 4f 57 20 44 ; USED TO SLOW D 70: 4f 57 4e 20 42 55 46 46 45 52 20 53 45 4e 44 0d OWN BUFFER SEND. ### Disk Sector 164 ### 00: 0a 3b 0d 0a 43 55 52 50 54 52 20 20 44 57 20 20 .;..CURPTR DW 10: 20 20 20 20 30 20 20 20 20 20 20 20 20 20 20 20 0 20: 20 20 20 20 3b 43 55 52 52 45 4e 54 20 50 4f 53 ;CURRENT POS 30: 49 54 49 4f 4e 20 49 4e 20 42 55 46 46 45 52 0d ITION IN BUFFER. 40: 0a 43 4f 4d 4d 53 47 20 20 44 42 20 20 20 20 20 .COMMSG DB 50: 20 31 33 2c 31 30 2c 27 3e 3e 20 43 4c 4f 53 45 13,10,'>> CLOSE 60: 2c 20 44 45 4c 41 59 2c 20 45 43 48 4f 2c 20 4c , DELAY, ECHO, L 70: 49 4e 45 46 45 45 44 2c 20 27 0d 0a 20 20 20 20 INEFEED, '.. ### Disk Sector 165 ### 00: 20 20 20 20 44 42 20 20 20 20 20 20 27 50 52 49 DB 'PRI 10: 4e 54 2c 20 51 55 49 54 2c 20 53 45 4e 44 2c 20 NT, QUIT, SEND, 20: 52 45 43 45 49 56 45 2c 20 55 50 50 45 52 43 41 RECEIVE, UPPERCA 30: 53 45 27 0d 0a 20 20 20 20 20 20 20 20 44 42 20 SE'.. DB 40: 20 20 20 20 20 31 33 2c 31 30 2c 27 3e 3e 20 27 13,10,'>> ' 50: 2c 30 0d 0a 43 4d 53 47 20 20 20 20 44 42 20 20 ,0..CMSG DB 60: 20 20 20 20 27 4c 4f 53 45 20 46 49 4c 45 53 27 'LOSE FILES' 70: 2c 31 33 2c 31 30 2c 30 0d 0a 44 4d 53 47 20 20 ,13,10,0..DMSG ### Disk Sector 166 ### 00: 20 20 44 42 20 20 20 20 20 20 27 45 4c 41 59 20 DB 'ELAY 10: 46 41 43 54 4f 52 20 42 55 4d 50 45 44 20 42 59 FACTOR BUMPED BY 20: 20 4f 4e 45 27 2c 31 33 2c 31 30 2c 30 0d 0a 45 ONE',13,10,0..E 30: 43 4d 53 47 20 20 20 44 42 20 20 20 20 20 20 27 CMSG DB ' 40: 43 48 4f 20 54 4f 47 47 4c 45 27 2c 31 33 2c 31 CHO TOGGLE',13,1 50: 30 2c 30 0d 0a 4c 46 4d 53 47 20 20 20 44 42 20 0,0..LFMSG DB 60: 20 20 20 20 20 27 49 4e 45 20 46 45 45 44 20 28 'INE FEED ( 70: 41 55 54 4f 4d 41 54 49 43 29 20 54 4f 47 47 4c AUTOMATIC) TOGGL ### Disk Sector 167 ### 00: 45 27 2c 31 33 2c 31 30 2c 30 0d 0a 50 46 4d 53 E',13,10,0..PFMS 10: 47 20 20 20 44 42 20 20 20 20 20 20 27 52 49 4e G DB 'RIN 20: 54 20 54 4f 47 47 4c 45 27 2c 31 33 2c 31 30 2c T TOGGLE',13,10, 30: 30 0d 0a 51 4d 53 47 20 20 20 20 44 42 20 20 20 0..QMSG DB 40: 20 20 20 27 55 49 54 27 2c 31 33 2c 31 30 2c 30 'UIT',13,10,0 50: 0d 0a 53 4d 53 47 20 20 20 20 44 42 20 20 20 20 ..SMSG DB 60: 20 20 27 45 4e 44 20 27 2c 30 0d 0a 44 53 4b 4d 'END ',0..DSKM 70: 53 47 20 20 44 42 20 20 20 20 20 20 27 5b 3c 44 SG DB '[<D ### Disk Sector 168 ### 00: 49 53 4b 3e 3a 5d 3c 46 49 4c 45 4e 41 4d 45 3e ISK>:]<FILENAME> 10: 5b 2e 3c 45 58 54 3e 5d 20 27 2c 30 0d 0a 52 4d [.<EXT>] ',0..RM 20: 53 47 20 20 20 20 44 42 20 20 20 20 20 20 27 45 SG DB 'E 30: 43 45 49 56 45 20 27 2c 30 0d 0a 0d 0a 0a 0a 0a CEIVE ',0....... 40: 0a 0a 0a 0a 0a 0a 0a 0a 55 4d 53 47 20 20 20 20 ........UMSG 50: 44 42 20 20 20 20 20 20 27 50 50 45 52 20 43 41 DB 'PPER CA 60: 53 45 20 4c 4f 43 4b 20 54 4f 47 47 4c 45 27 2c SE LOCK TOGGLE', 70: 31 33 2c 31 30 2c 30 0d 0a 42 41 44 43 4d 53 47 13,10,0..BADCMSG ### Disk Sector 169 ### 00: 20 44 42 20 20 20 20 20 20 27 20 3f 3f 3f 3f 20 DB ' ???? 10: 2d 20 49 4e 56 41 4c 49 44 20 43 4f 4d 4d 41 4e - INVALID COMMAN 20: 44 27 2c 31 33 2c 31 30 2c 30 0d 0a 43 4c 4d 53 D',13,10,0..CLMS 30: 47 e0 5f 02 02 02 02 02 8a 9a 62 8a 82 62 3a 6a G._.......b..b:j 40: 6a 6a 02 32 25 31 15 81 4e 4f 57 20 43 4c 4f 53 jj.2%1..NOW CLOS 50: 45 44 20 2d 2d 2d 27 2c 31 33 2c 31 30 2c 30 0d ED ---',13,10,0. 60: 0a 4f 50 4d 53 47 20 20 20 44 42 20 20 20 20 20 .OPMSG DB 70: 20 31 33 2c 31 30 2c 27 2a 2a 2a 20 df 09 00 55 13,10,'*** ...U ### Disk Sector 170 ### 00: 4f 50 45 4e 20 45 52 52 4f 52 20 2a 2a 2a 27 2c OPEN ERROR ***', 10: 31 33 2c 31 30 2c 30 0d 0a 3b 0d 0a 48 49 41 44 13,10,0..;..HIAD 20: 44 52 20 20 44 42 20 20 20 20 20 20 30 20 20 20 DR DB 0 30: 20 20 20 20 20 20 20 20 20 20 20 20 3b 44 57 20 ;DW 40: 41 44 44 52 45 53 53 20 4f 46 20 48 49 47 48 20 ADDRESS OF HIGH 50: 4d 45 4d 4f 52 59 0d 0a 48 49 4d 45 4d 20 20 20 MEMORY..HIMEM 60: 44 42 20 20 20 20 20 20 30 20 20 20 20 20 20 20 DB 0 70: 20 20 20 20 20 20 20 20 3b 48 49 20 42 59 54 45 ;HI BYTE ### Disk Sector 171 ### 00: 20 4f 46 20 48 49 41 44 44 52 0d 0a 46 42 55 46 OF HIADDR..FBUF 10: 46 20 20 20 44 42 20 20 20 20 20 20 30 31 41 48 F DB 01AH 20: 20 20 20 20 20 20 20 20 20 20 20 20 3b 42 55 46 ;BUF 30: 46 45 52 20 41 52 45 41 0d 0a 20 20 20 20 20 20 FER AREA.. 40: 20 20 45 4e 44 0d 0a 0d 0a 0d 0a 41 3e 00 00 00 END......A>... 50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................ 60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................ 70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................