Change bug status in 2006/toledo2 + download files

On another look I believe it to be a typo of the author that the prompt
should be 'A>'. I believe it should be what it is which is '>'. Still
there appears there might be a problem but because I am not sure of this
I changed it to possible bug. The problem or possible problem is that
the use of DDT.COM seems to not work but this might be not enough
information from the author or it might be a misunderstanding or
something else entirely.

I also downloaded the files that were referred to in the author's
remarks and added them to the repo. The ones from the SOURCE/ directory
are in the entry directory too as those might be required (though the
use might also be the possible or actual bug described above). This was
done to make it easier to use but also as part of one of the issues on
GitHub.

2006/toledo2/.gitignore

@@ -1,28 +1,4 @@
-A
-ADVENTUR/
-B
-BASICS/
-C
-CPM64.COM
-DBASEII/
-GAMES/
-KAYPROII.ZIP
-KERMIT/
-MASTER/
-MFDISK/
-MODEM7/
-PRO8/
-SOURCE/
-THE-WORD/
-TINKER/
-WS33-1/
-WS33-2/
-WS33-KPR/
-WS33/
 toledo2
 toledo2.alt
-DDT.COM
-*.COM
-*.ASM
 toledo2.orig
 prog.orig

2006/toledo2/DBASEII/MISSING.TXT

@@ -0,0 +1,135 @@
+
+ MISSING          MISSING            MISSING         MISSING         MISSING
+Adams, Susan             Edmunds, Susie            Magee, Sharon                              
+Andersen, Carol          Elliot, Bonnie            Mahan, Marcus             
+Anderson, Betty Jo       Ellis, Robert             Markussen, Einer          
+Anderson, Bill           Evans, James              Martin, Judy              
+Arnold, Lois                                       Martin, Larry           
+Avila, Edward            Fisher, Charles           Martin, Phil           
+Ayers, Deanna            Fleming, Billie           Martin, Terri          
+                         Fleming, Bonnie           Matthews, Allen        
+Baines, Sharon           Flores, Grace             McCabe, Ray             
+Bales, Bob               Ford, Nancy               McClain, Phyllis       
+Barden, Gary             Franze, Brent             McCusker, Marianne      
+Barnes, Bruce            Frendandes, Marlyene      McDonald, Jerry         
+Barnett, Lyn                                       McKee, Greg              
+Barstow, Dennis          Galman, Jean              McKenna, Terry           
+Beck, Michael            Garcia, Kathy VonDuring   McKennon, Trudy        
+Bishop, Russell          Garner, Joan              Means, Kathie              
+Blodgett, Eleanor        Gilles, Darlene           Meyer, Ellen           
+Blount, Mike             Giordano, Ben             Middleton, Elaine       
+Boirun, Sharon           Graham, Bill              Miller, Janet          
+Bowyer, Dennis N.        Greene, Albert            Mills, Tom             
+Brandon, Pamela          Greene, James             Minich, Marilyn        
+Bretz, Timothy           Grover, Doug              Mirabal, Robert        
+Brinton, Linda                                     Montavon, Vicky Garvey 
+Brooks, Maureen          Haechner, Virginia        Moormann, Mary         
+Bryan, Jerald            Haley, Ted                Mueller, Bob           
+Burdette, Melinda        Hall, Larry                                      
+Burge, Ron               Halloran, Lana            Newton, Archie         
+Burnette, Suzanne        Hankins, James            Newtson, Lila             
+                         Hanson, Craig             Nichols, Terry         
+Cable, William           Hart, Donald                                     
+Callum, Susie            Hiestand, Mike            Oliver, Mike           
+Calvert, Keith           Higgens, Jeanne           Orlowski, Christine     
+Card, Ronald             Hoffman, Dennis                                  
+Chase, Manetta           Holman, Candy             Pederson, Kelly        
+Chisholm, Neil           Hoskins, Susan            Perry, John            
+Christopher, Bob         Huff, Roberta             Pinkstaff, Bob         
+Cifarelli, Ed            Huth, Greg                                       
+Cleare, Carol            Hyman, Nancy              Raines, Don            
+Coates, Jim              Hynes, Tom                Ramsey, Patty          
+Corey, Steve                                       Reagan, John           
+Courson, Judy            Johnson, Donna            Reynolds, Frances        
+Creamer, Russell         Johnson, Judith           Robben, Sheila           
+Crook, Ken               Johnson, Laura            Robinson, Linda        
+Crothers, Brian          Johnson, William          Ross, John                 
+Crowson, Connie          Jones, Brenda McCollough  Rowe, Ted                
+Cullum, Pat              Jones, Cynthia            Rowell, Wendy           
+Curran, Alberta          Jones, Edith              Rowland, Donna          
+                         Jones, Linda              Rutledge, Randy        
+Dalton, Patty                                                             
+Danis, Jeff              Keating, Donald           Sanders, Jim           
+Darrigan, Patty          Kephart, Carol            Sanders, Linda         
+Davis, Bob               Kingston, Victoria        Sanford, Sue           
+DeBaca, Daniel           Kuebler, Cheryl           Schaffer, Kathy        
+DeMey, Mike                                        Schaub, Pam            
+Dias, Birdie             Lang, Jim                 Schroeder, Bob         
+Dickerson, Norma         Lewis, Peggy Doutre       Schulte, Ann               
+Dobson, Ziona            Locklear, Alan            Schultz, Sandy          
+Drafts, Danny            Logan, Linda              Schumacher, Roxann      
+Duffy, Happy             Loomis, Scott             Scott, John            
+Duncan, Betty            Lorentz, William          Seward, Kathleen        
+Dunn, Jim                Lowry, Byron              Shand, Linda Anderson      
+                                      
+
+
+
+
+ MISSING          MISSING            MISSING         MISSING         MISSING
+Sheckells, Charles                    Valdivia, Carmen            
+Silvey, Maxine                        Vanderliden, John           
+Simon, Bob                            Vaughan, James              
+Skelton, Susan                        Vaughn, Connie              
+Slavinski, Joanne                     Villa, Emma                 
+Sloan, Linda                                                      
+Smelser, Steve                        Wachsman, Camelia           
+Sonsag, Leona                         Walters, Frances            
+Sowells, Loraine                      Warman, Chadwick            
+Spears, Joyce                         Webber, Mike                
+Stevens, Barbara                      Webster, Dick               
+Stewart, Peggy                        Westerly, John              
+Stitt, James                          Whary, Penney               
+Stokes, Stephens                      Wheeler, Gary               
+Stuart, Jacquelyn                     Whiddon, Susan              
+Swayze, Ed                            White, Lawrence             
+Swinson, Sheryl                       Whiting, Bill               
+                                      Wiener, Bruce               
+Tackwell, Harold                      Wilkason, Sharon            
+Taylor, Carolyn                       Williams, Janet             
+Taylor, Pattie                        Williams, Rae               
+Thomas, Linda                         Williams, Roy               
+Thomas, Stephanie                     Wilson, John                
+Thompson, Carol                       Wilson, Kent                
+Thompson, Sandra                      Wood, Larry                 
+Tomkinson, Linda                      Woodruff, Craig             
+Topping, Patty                        Wyant, Gorden               
+Towner, Marilyn                       Wyman, Judy                 
+Trabalka, Michael                                                 
+T'Sas, Joyce                          Youngblood, Barbara         
+                                                                  
+                                      Ziarnick, Jacqueline        
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+

2006/toledo2/DBASEII/PRINTE.CMD

@@ -0,0 +1,48 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+@ 1,1 SAY 'PROFESSION'
+@ 1,30 SAY 'EDUCATION'
+@ 1,85 SAY 'EMPLOYERS'
+@ 1,140 SAY 'OUTLOOK'
+DO WHILE .NOT. EOF
+@ 1,1 SAY NAME
+@ 2,30 SAY EDUCATION
+@ 2,85 SAY EMPLOYERS
+@ 2,130 SAY OUTLOOK
+*
+*
+*
+ERASE
+SKIP
+ENDDO
+
+
+
+
+
+
+
+
+
+th generally predicted                            40hr, expec. otgeneral employer benefits                          Mechanic

2006/toledo2/GAMES/DUMP.ASM

@@ -0,0 +1,215 @@
+;	FILE DUMP PROGRAM, READS AN INPUT FILE AND PRINTS IN HEX
+;
+;	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
+TYPEF	EQU	2	;TYPE FUNCTION
+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
+;
+;	NON GRAPHIC CHARACTERS
+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
+FCBRC	EQU	FCB+15	;FILE'S RECORD COUNT (0 TO 128)
+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
+;	SET SP TO LOCAL STACK AREA (RESTORED AT FINIS)
+	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
+	JMP	FINIS	;TO RETURN
+;
+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
+	POP	H	;RECALL LINE POSITION
+	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
+;	ACCUM LSB = 1 IF CHARACTER READY
+	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
+;	(NOTE THAT A JMP TO 0000H REBOOTS)
+	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,BRKF
+	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
+	MVI	A,LF
+	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
+	PUSH	PSW
+	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
+	CPI	80H
+	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
+	MVI	D,0	;DOUBLE PRECISION INDEX TO DE
+	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
+	RET
+;
+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
+	LXI	D,FCB
+	MVI	C,READF
+	CALL	BDOS
+	POP B! POP D! POP H
+	RET
+;
+;	FIXED MESSAGE AREA
+SIGNON:	DB	'FILE DUMP VERSION 1.4$'
+OPNMSG:	DB	CR,LF,'NO INPUT FILE PRESENT ON DISK$'
+
+;	VARIABLE AREA
+IBP:	DS	2	;INPUT BUFFER POINTER
+OLDSP:	DS	2	;ENTRY SP VALUE FROM CCP
+;
+;	STACK AREA
+	DS	64	;RESERVE 32 LEVEL STACK
+STKTOP:
+;
+	END
+

2006/toledo2/KBIOS.ASM

@@ -0,0 +1,274 @@
+title KAYPRO CBIOS for CP/M 2.2
+;###############################################################
+;##      KAYPRO         CBIOS for CP/M 2.2                    ##
+;##      Copyright (C) 1982 By Non-Linear Systems, Inc.       ##
+;##      No warranty is made, expressed or implied.           ##
+;###############################################################
+;##	Last Update: july 7,1982	[001]		      ##
+;##		by  jim nickerson
+;##		changes:				      ##
+;##		 -allow redefinition of kpd in cbios          ##
+;##		 -change to allow test of serial on liststatus##
+;##		 -default ul1: to tty on list		      ##
+;###############################################################
+
+	.Z80			; Z80 CPU
+msize	equ	64		; system memory size in k
+vers	equ	22		; CP/M version number
+bias	equ	(msize-20)*1024	; bias for systems larger than 20k
+ccp	equ	3400H+bias	; start of CCP
+bdos	equ	ccp+806H	; start of BDOS (The resident portion of CP/M)
+bios	equ	ccp+1600H	; start of Basic I/O Subsystem (BIOS)
+cpml	equ	bios-ccp	; length of CP/M system in bytes (less BIOS)
+nsects	equ	cpml/128	; length of CP/M system in sectors (less BIOS)
+trksec	equ	40		; sectors/track
+
+bitport	equ	1CH		; status/control bit maped port
+iobyte	equ	3		; logical to physical map
+rom	equ	00000H		; base of rom
+ram	equ	0FC00H		; scratch ram
+dmaadr	equ	ram+14H		; dma address
+
+	jp	boot		; arrive here from cold start
+	jp	wboot		; arrive here for warm start
+	jp	const		; console status return in A FF=ready, 00=not
+	jp	conin		; console char in
+	jp	conout		; console char out
+	jp	list		; listing char out
+	jp	punch		; punch char out
+	jp	reader		; reader char in
+	jp	home		; move to track 0 on selected disk drive
+	jp	seldsk		; select disk drive
+	jp	settrk		; set track #
+	jp	setsec		; set sector #
+	jp	setdma		; set DMA address
+	jp	read		; read selected sector
+	jp	write		; write selected sector
+	jp	listst		; list status (Ready to print a char)
+	jp	sectran		; sector translate
+ioconfig: defb	10000001B	; initial value for i/o byte (may be patched)
+wrtsafe: defb	0		; write safe flage 0=false
+vtab:	defb	11, 10, 8, 12	; vector pad xlate table ^k ^j ^h ^l
+	defb	'0', '1', '2', '3'
+	defb	'4', '5', '6', '7'
+	defb	'8', '9', '-', ','
+	defb	0DH, '.'
+subttl Cold and Warm boot entry points
+page
+; Cold boot entry point, set up system pointers and pass control to the CCP
+boot:	call	diskint
+	xor	a		; clear system disk number
+	ld	(4),a
+	ld	a,(ioconfig)	; init value for i/o byte
+	ld	(iobyte),a
+	call	print
+	defb	1AH, 0DH, 0AH
+	defb	'KAYPRO II '
+	defb	0DH, 0AH
+	DEFB	  msize/10+'0', msize mod 10+'0'
+	defb	'k CP/M v '
+	defb	vers/10+'0', '.', vers mod 10+'0'
+	defb	0DH, 0AH, 00H
+
+goccp:	ld	a,0C3H		; set up CP/M jumps to bdos and wboot
+
+	ld	hl,bios+3	; wboot entry point
+	ld	(0),a
+	ld	(1),hl
+
+	ld	hl,bdos		; entry point to bdos
+	ld	(5),a
+	ld	(6),hl
+
+	ld	a,(4)		; last logical disk unit used
+	ld	c,a		; pass to ccp to select
+	jp	ccp		; pass control to ccp
+
+; Warm boot entry point, re-load the CCP and BDOS
+wboot:	call	diskint
+	call	print
+	defb	0DH, 0AH, 'Warm Boot', 0DH, 0AH, 00H
+wb0:	ld	sp,100H		; re-set stack
+	ld	c,0		; select drive A:
+	call	seldsk
+	ld	bc,0		; set track
+	call	settrk
+	ld	hl,ccp		; first memory location to load
+	ld	(dmaadr),hl
+	ld	bc,nsects*256+1
+wb1:	push	bc		; save sector count and current sector
+	call	setsec		; select sector
+	call	read
+	pop	bc
+	or	a
+	jr	nz,wb0		; oops, error on warm boot
+	ld	hl,(dmaadr)	; update dma address for next sector
+	ld	de,128		; new dma address
+	add	hl,de
+	ld	(dmaadr),hl
+	dec	b
+	jp	z,goccp		; done loading
+	inc	c		; bump sector count
+	ld	a,trksec	; on to next track?
+	cp	c
+	jp	nz,wb1
+	ld	c,16		; first sector on next track
+	push	bc		; save counters
+	ld	c,1
+	call	settrk		; set track
+	pop	bc
+	jr	wb1
+subttl logical to physical devices CON:, PUN:, RDR:, and LST:
+page
+; logical devices are con: rdr: pun: and lst:
+; physical devices are:
+;	crt:	video and kbd
+;	tty:	serial
+;	lpt:	centronics
+;	ul1:	serial with cts as busy
+;	pun:	same as ul1
+;
+;con:	tty, crt
+;rdr:	tty
+;pun:	tty, pun
+;lst:	tty, crt, lpt, ul1
+
+const:	ld	a,(iobyte)	; get i/o byte
+	and	03H		; strip to con bits
+	ld	hl,rom+33H	; serial status
+	jp	z,callrom
+	ld	hl,rom+2AH	; assume CRT
+	jp	callrom
+
+conin:	in	a,(bitport)	; turn disk off
+	bit	6,a
+	ld	hl,rom+27H	; disk off routine
+	call	z,callrom
+	ld	a,(iobyte)
+	and	03H		; check i/o byte
+	ld	hl,rom+36H	; serial input
+	jp	z,callrom
+	ld	hl,rom+2DH	; assume input from kbd
+	call	callrom		; go get char
+	or	a
+	ret	p		; msb not set
+;	and	03H		; form table index to vtab
+	AND	01FH		;FORM TABLE INDEX TO VTAB
+	ld	hl,vtab
+	ld	c,a
+	ld	b,0
+	add	hl,bc
+	ld	a,(hl)		; pick up xlated character
+	ret
+
+conout: ld	a,(iobyte)	; check i/o byte
+	and	03H
+	ld	hl,rom+39H	; serial output
+	jp	z,callrom
+	ld	hl,rom+45H	; assume video
+	jp	callrom
+
+reader:	ld	hl, rom+36H	; serial input
+	jp	callrom
+
+;punch:	ld	a,(iobyte)	; check i/o byte
+;	and	30H
+;	ld	hl,rom+39H	; serial punch
+;	jp	z,callrom
+;	ld	hl, rom+42H	; serial with cts as busy
+;	jp	callrom
+punch:
+	ld	hl,rom+39h	;serial punch
+	jp	callrom
+;
+
+list:	ld	a,(iobyte)
+	and	0C0H		; check i/o byte
+	ld	hl,rom+39H	;  serial
+	jp	z,callrom
+	ld	hl,rom+3FH	; centronics
+	cp	80H
+	jp	z,callrom
+	ld	hl,rom+45H	; video
+	cp	40H
+	jp	z,callrom
+;	ld	hl, rom+42H	; assume serial with cts as busy
+	ld	hl, rom+39h	;ul1: default to serial
+	jp	callrom
+
+listst:	ld	a,(iobyte)	; check i/o byte
+	and	0C0H
+	ld	hl,rom+42H	; serial
+	jp	z,callrom
+	ld	hl,rom+3CH	; centronics
+	cp	80H
+	jp	z,callrom
+	xor	a		; 0=ready
+	ret
+subttl Disk I/O and ROM dispatch
+page
+diskint:ld	hl,rom+03H	; re-set disk software sub-system
+	jr	callrom
+
+home:	ld	hl,rom+0CH	; home disk drive rom routine
+	jr	callrom
+
+seldsk:	ld	hl,rom+0FH	; select disk drive
+	jr	callrom
+
+settrk:	ld	hl,rom+12H	; seek track
+	jr	callrom
+
+setsec:	ld	hl,rom+15H	; set sector number
+	jr	callrom
+
+setdma:	ld	hl,rom+18H	; set dma address
+	jr	callrom
+
+read:	ld	hl,rom+1BH	; read a logical sector
+	jr	callrom
+
+write:	ld	hl,rom+1EH	; write a logical sector
+	ld	a,(wrtsafe)	; write safe flag
+	or	a		; true or false
+	jr	z,callrom	; normal operation
+	ld	c,1		; directory write code (forces write op)
+	jr	callrom
+
+sectran:ld	hl,rom+21H	; xlate logical to physical sector
+	jr	callrom
+
+callrom:exx			; save cp/m arguments
+	in	a,(bitport)	; turn rom on
+	set	7,a
+	out	(bitport),a	
+	ld	(savsp),sp	; save current stack (may be under rom)
+	ld	sp,stack	; set a local stack
+	ld	de,biosret	; rom to "RET" here
+	push	de
+	exx			; restore cp/m arguments and call loc
+	jp	(hl)		; to rom routine specified in hl
+biosret:ex	af,af'		; save reg A
+	ld	sp,(savsp)	; restore stack
+	in	a,(bitport)	; off the rom
+	res	7,a
+	out	(bitport),a
+	ex	af,af'		; restore reg A
+	ret			; done with rom routine
+
+print:
+	ex	(sp),hl	; pop return address, points to text to print
+	ld	a,(hl)	; get a byte of text, stop on zero byte
+	inc	hl
+	ex	(sp),hl	; save new return address
+	or	a	; is it a zero byte?
+	ret	z
+	ld	c,a	; no, so print it
+	call	conout
+	jr	print
+
+savsp:	defs	2	; current spact pointer during rom call
+stack	equ	bios+512 ; a local stack
+
+	end
+

2006/toledo2/KERMIT/ATEST.DOC

@@ -0,0 +1,122 @@
+
+
+
+        FROM:  Robert N. Barry                                30 May 1986
+
+        SUBJECT: WEEKLY ACTIVITY REPORT (27 - 30 May 1986)
+
+
+        TO: ENMD/Steve Chase
+
+
+        1®  TSF-IFDAPS: 
+
+        1.±  É  aí preparinç á datá baså oæ thå TSF-IFDAPÓ  documentó  tï �
+        control my review of those documents.
+
+        2.  IFAST I&M Developement
+
+        2.1  MSIP Adaptation Task:
+
+        2.1.±  É havå prepareä mù evaluatioî oæ thå SETÁ performance®   É �
+        trieä tï givå theí crediô foò gettinç thå tasë IOÃ donå oî  time¬ �
+        buô flaggeä thå areaó theù neeä tï correct®   Theù treaô planninç �
+        aó   somethinç   onlù  donå  insidå  aî  individual'ó  heaä   anä �
+        documentatioî aó somethinç thå AÆ requires®   É wilì turî iô intï �
+        ENMÄ oî ² Junå 1986.
+
+        2.1.²    (REPEAT©  É aí pressinç VERAÃ tï producå  thå  equipmenô �
+        lisô ASAP.
+
+        2.²  Oî CSÃ Tasks:
+          Thå  CSÃ plant-in-place-recordó tasë waó extendeä tï finisè thå �
+        missinç drawingó anä tï supporô ENVS(Rallis© untiì theù caî cuô á �
+        task directive. 
+
+        2.3  Transition and Turnover:
+
+        2.3.±  (REPEAT© Mr®  Reaveò haó askeä thå QÁ personnel¬ ENRMQ¬ tï �
+        definå thå remaininç itemó undeò thå Timå Shareä Computeò Compleø �
+        Transitioî  anä  Turnoveò Plan®   Thå remaininç  itemó  areº  O&Í �
+        Procedures¬  PIPRó  Datá  Communications¬  anä Finaì  Revie÷  anä �
+        Inspection.
+
+        2.3.²   (REPEAT©  É  havå requesteä Mr®  Reaveò (aó  onå  oæ  hió �
+        remaininç  ENMÄ  tasks©  tï  completå thå  finaì  transitioî  anä �
+        turnoveò  plaî froí ENMÄ tï ENVÓ - ASAP®   VERAÃ ió verù latå  iî �
+        providinç  thå MSIÐ Adaptatioî Tasë equipmenô lisô  requireä  foò �
+        thå Finaì T&Ô Plan.
+
+        2.3.³   É  aí  helpinç Capô Rallió resolvå questionó  aó  tï  thå �
+        configuration rationale and inventory of the ADPE.
+
+        2.´    É  aí preparinç á drafô oæ thå performancå evaluatioî  foò �
+        Toí Chovaî anä Mikå Reaver®  Requireä bù µ Junå 1986.
+
+        2.¶   (REPEAT©  É  havå  tï revie÷ thå  ne÷  versioî  oæ  thå  Bµ �
+        specificatioî foò thå Simulatioî Models®  Duå withiî 1µ days.
+
Š
+
+                                        1
+
+
+
+        Barry's 30 May 1986 WAR (con.)
+
+        Coming Week and Future Work:
+
+        1.   On-going tasks at TSF:
+
+        1.±  Revie÷ TSF-IFDAPÓ specificatioî documentó provideä bù Stevå �
+        Chase.
+        1.²   Meeô witè Capô Keusseyaî anä establisè á  learninç  procesó �
+        with him.
+        1.3  Prepare for TDY to Lompoc on 2 June, Status Review.
+
+        2®    É  wilì   attempô  tï takå á numbeò  oæ  traininç  classes®  �
+        Becauså  oæ thå lacë oæ manpoweò iî thå IFASÔ I&Í Development¬  É �
+        haä tï misó traininç opportunitieó oveò thå lasô siø years.
+
+        3®   Supportinç IFASÔ oî á aó needeä basis¬ limiteä tï onlù itemó �
+        requireä  tï  smootè thå transitioî anä  turnover®   Thió  cominç �
+        weeë  wilì  bå á significanô loaä becauså oæ thå  contractoò  anä �
+        Reaver'ó  anä Chovan'ó evaluationó required®   É wilì bå askeä bù �
+        ENVÓ tï helð understanä thå currenô ADPÅ configuration.
+
+        4®    Leavå Planneä - A/Ì oæ á littlå oveò ³ weeks¬  1¶ dayó froí �
+        thå  1¶ Junå 198¶ througè ¸ Julù 1986®  É wilì bacë ¹ Julù  1986®  �
+        Summeò  Vacatioî trið tï thå Canadiaî World'ó Fair®   É  neeä  tï �
+        know who wants me to call in and answer questions.
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+                                        2
+

2006/toledo2/KERMIT/KAYVT52.KEY

@@ -0,0 +1,30 @@
+-----------------------------------------
+|         |         |         |         |
+|  UP     | DOWN    | LEFT    | RIGHT   |
+| REPLACE | SECT    | APPEND  | SPECINS |
+|         |         |         |         |
+-----------------------------------------
+
+
+-----------------------------------------
+|         |         |         |         |
+|  PAGE   | FNDNXT  | DEL W   |  GOLD   |
+| COMMAND |  FIND   | UND W   |         |
+|         |         |         |         |
+-----------------------------------------
+|         |         |         |         |
+| ADVANCE | BACKUP  | DEL C   | DEL L   |
+| BOTTOM  |  TOP    | UND C   | UND L   |
+|         |         |         |         |
+-----------------------------------------
+|         |         |         |         |
+|  WORD   |  EOL    |  CUT    |         |
+| CHNGCASE| DEL EOL | PASTE   |         |
+|         |         |         | ENTER   |
+-------------------------------  SUBS   |
+|                   |         |         |
+|      LINE         | SELECT  |         |
+|    OPEN LINE      | RESET   |         |
+|                   |         |         |
+-----------------------------------------
+