Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-1


				PAGE	60,132				   ;AN000;
				NAME	SELECT				   ;AN000;
				TITLE	INPUT.ASM - DOS SELECT.EXE	   ;AN000;
				SUBTTL	input.asm			   ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				;
				;	INPUT.ASM:  Copyright 1988 Microsoft
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
									;
 0000				DATA	SEGMENT BYTE PUBLIC 'DATA'      ;AN000; Define Dummy data segment
					PUBLIC	WR_ICBVEC		;AN000;
					PUBLIC	KD_BACKSPACE		;AN000;
									;
					INCLUDE PCEQUATE.INC		;AN000;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCSCRRD option bit equates (SRD_OPT1)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	SRD_INITIAL    EQU  0000000000000001B	     ;AN000;initialize SCB and filespec buff
 = 0002                      C	SRD_READONE    EQU  0000000000000010B	     ;AN000;read field specified by SRD_ID
 = 0004                      C	SRD_APPEND     EQU  0000000000000100B	     ;AN000;match field ID are issued new ID
 = 0008                      C	SRD_READALL    EQU  0000000000001000B	     ;AN000;read all FLDS in specified file
 = 0010                      C	SRD_ALLOCRES   EQU  0000000000010000B	     ;AN000;allocate reserved PCSLCTP space
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCSCRRD error bit equates (SRD_ERROR)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	SRD_BUFSIZE    EQU  0000000000000001B	     ;AN000;buffer size is too small
 = 0002                      C	SRD_NOFIELDS   EQU  0000000000000010B	     ;AN000;file does not contain fields
 = 0004                      C	SRD_NOTCASFILE EQU  0000000000000100B	     ;AN000;file object list does not exist
 = 0008                      C	SRD_FIELDSFULL EQU  0000000000001000B	     ;AN000;max num FLDS read into SCB vect
 = 0010                      C	SRD_NOINITIAL  EQU  0000000000010000B	     ;AN000;make initialize call first
 = 0020                      C	SRD_NOFIELDID  EQU  0000000000100000B	     ;AN000;specified field ID not found
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCHLPRD option bit equates (HRD_OPT1)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	HRD_TOPIC      EQU  0000000000000001B	      ;AN000;process help TOPIC(S) index
 = 0002                      C	HRD_TEXT       EQU  0000000000000010B	      ;AN000;process HELP or ERROR text
 = 0004                      C	HRD_DISPID     EQU  0000000000000100B	      ;AN000;display unique id on topic list
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCHLPRD error bit equates (HRD_ERROR)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	HRD_BUFSIZE    EQU  0000000000000001B	      ;AN000;buffer size is too small
 = 0002                      C	HRD_NOHLPOBJ   EQU  0000000000000010B	      ;AN000;file does not contain helps
 = 0004                      C	HRD_NOOBJLST   EQU  0000000000000100B	      ;AN000;file object list does not exist
 = 0008                      C	HRD_NOHELPID   EQU  0000000000001000B	      ;AN000;requested id was not found
 = 0010                      C	HRD_NOTCASFILE EQU  0000000000010000B	      ;AN000;not a valid cas file
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-2
input.asm			   ;AN000;                                      

			     C	;
			     C	; PCSTRST equates
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	SSC_TBSL       EQU  0000000000000001B	     ;AN000;use two byte string length
 = 0002                      C	SSC_PTSB       EQU  0000000000000010B	     ;AN000;pointer points to string buffer
 = 0004                      C	SSC_VTSAO      EQU  0000000000000100B	     ;AN000;vector table is string addr only
 = 0008                      C	SSC_VTASO      EQU  0000000000001000B	     ;AN000;vector table addr is seg:offset
 = 0010                      C	SSC_SLSB       EQU  0000000000010000B	     ;AN000;string length is in string buffer
 = 0020                      C	SSC_SBTC       EQU  0000000000100000B	     ;AN000;string buffer has term. character
 = 0001                      C	SSC_VTE        EQU  1			     ;AN000;error in vector table
 = 0002                      C	SSC_SBE        EQU  2			     ;AN000;error in string buffer
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCSLCTP Option word one (SCB_OPT1)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	SCB_UC	       EQU  0000000000000001B	     ;AN000;upper case option
 = 0002                      C	SCB_WRAP       EQU  0000000000000010B	     ;AN000;wrap option
 = 0004                      C	SCB_FRBF       EQU  0000000000000100B	     ;AN000;force return before first option
 = 0008                      C	SCB_FRAL       EQU  0000000000001000B	     ;AN000;force return after last option
 = 0010                      C	SCB_LL	       EQU  0000000000010000B	     ;AN000;lock line
 = 0020                      C	SCB_UKS        EQU  0000000000100000B	     ;AN000;use keystroke
 = 0040                      C	SCB_RD	       EQU  0000000001000000B	     ;AN000;return after display option
 = 0080                      C	SCB_RUK        EQU  0000000010000000B	     ;AN000;return unused keys option
 = 0100                      C	SCB_UI	       EQU  0000000100000000B	     ;AN000;use index option
 = 0200                      C	SCB_TRN        EQU  0000001000000000B	     ;AN000;translate character
 = 0400                      C	SCB_MON        EQU  0000010000000000B	     ;AN000;convert to upper case monocasing
 = 0800                      C	SCB_DBCS       EQU  0000100000000000B	     ;AN000;check for double byte chars
 = 1000                      C	SCB_TBL        EQU  0001000000000000B	     ;AN000;use given DBCS range table
 = 2000                      C	SCB_DCHECK     EQU  0010000000000000B	     ;AN000;display check mark characters
 = 4000                      C	SCB_DACTIVE    EQU  0100000000000000B	     ;AN000;display active string indicators
 = 8000                      C	SCB_DPOINT     EQU  1000000000000000B	     ;AN000;display selection pointer string
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCSLCTP Option word two (SCB_OPT2)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	SCB_CS	       EQU  0000000000000001B	     ;AN000;clear screen on entry option
 = 0002                      C	SCB_ROTN       EQU  0000000000000010B	     ;AN000;reset option to normal on return
 = 0004                      C	SCB_UET        EQU  0000000000000100B	     ;AN000;use existing text option
 = 0008                      C	SCB_CFO        EQU  0000000000001000B	     ;AN000;cursor follows option
 = 0010                      C	SCB_LCOX       EQU  0000000000010000B	     ;AN000;leave cursor on exit
 = 0020                      C	SCB_IPAGE      EQU  0000000000100000B	     ;AN000;instant paging
 = 0040                      C	SCB_PM1        EQU  0000000001000000B	     ;AN000;paging is minus one line
 = 0080                      C	SCB_UIND       EQU  0000000010000000B	     ;AN000;display up, dn, lf, rg indicators
 = 0100                      C	SCB_UNCA       EQU  0000000100000000B	     ;AN000;use normal color array
 = 0200                      C	SCB_DYN        EQU  0000001000000000B	     ;AN000;option array is dynamicly created
 = 0400                      C	SCB_LANDR      EQU  0000010000000000B	     ;AN000;left and right scrolling active
 = 0800                      C	SCB_CPHY       EQU  0000100000000000B	     ;AN000;color array is physical attributs
 = 1000                      C	SCB_NUML       EQU  0001000000000000B	     ;AN000;generate num list in opt strings
 = 2000                      C	SCB_SKIP       EQU  0010000000000000B	     ;AN000;skip inactive option strings
 = 4000                      C	SCB_SHIGH      EQU  0100000000000000B	     ;AN000;highlight the selected opt strgs
 = 8000                      C	SCB_AHIGH      EQU  1000000000000000B	     ;AN000;highlight the active option strgs
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-3
input.asm			   ;AN000;                                      

			     C	; PCSLCTP Option word three (SCB_OPT3)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	SCB_SELACT     EQU  0000000000000001B	     ;AN000;allow selection of inactive elem
 = 0002                      C	SCB_SELEXC     EQU  0000000000000010B	     ;AN000;exclusive selection of one elemet
 = 0004                      C	SCB_EXCSING    EQU  0000000000000100B	     ;AN000;one element is always selected
 = 0008                      C	SCB_NUMUIND    EQU  0000000000001000B	     ;AN000;display line number count
 = 0010                      C	SCB_CHIGH      EQU  0000000000010000B	     ;AN000;hilight cursored and selected stg
 = 0020                      C	SCB_NUMS       EQU  0000000000100000B	     ;AN000;auto 0-9 number selection
 = 0040                      C	SCB_FINDE      EQU  0000000001000000B	     ;AN000;auto character search
 = 0080                      C	SCB_RELUIND    EQU  0000000010000000B	     ;AN000;rel row/col used w/dirct indicato
 = 0100                      C	SCB_RELSCR     EQU  0000000100000000B	     ;AN000;rel row/col used w/scroll field
 = 0200                      C	SCB_LVBOVR     EQU  0000001000000000B	     ;AN000;use video buffer seg:off override
 = 0400                      C	SCB_FM	       EQU  0000010000000000B	     ;AN000;make call to dynamic format rout
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCSLCTP Select Array Option (SCB_SELSEG:SCB_SELOFF)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	SCB_SELECTON   EQU  0000000000000001B	     ;AN000;element selected
 = 0002                      C	SCB_ACTIVEON   EQU  0000000000000010B	     ;AN000;element active
 = 0004                      C	SCB_SKIPON     EQU  0000000000000100B	     ;AN000;element should be skipped
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCINCHA option equates (INC_OPT)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	INC_KWAIT      EQU  0000000000000001B	     ;keystroke
 = 0002                      C	INC_UTRAN      EQU  0000000000000010B	     ;translate keys using user table
 = 0004                      C	INC_UDBCS      EQU  0000000000000100B	     ;DBCS processed using user table
 = 0008                      C	INC_DDBCS      EQU  0000000000001000B	     ;DBCS processed using DOS table
 = 0010                      C	INC_UMONO      EQU  0000000000010000B	     ;monocase keys using user table
 = 0020                      C	INC_AMONO      EQU  0000000000100000B	     ;monocase keys using USA algorithm
 = 0040                      C	INC_RSCAN      EQU  0000000001000000B	     ;return scan codes for norm chars
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCINCHA option equates (INC_STAT)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	INC_KFND       EQU  0000000000000001B	     ;AN000;character found in buffer
 = 0002                      C	INC_DBCS       EQU  0000000000000010B	     ;AN000;character found is double byte
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCCLRRD error bit equates (CRD_ERROR)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	CRD_BUFSIZE	EQU  0000000000000001B	     ;AN000;buffer size is too small
 = 0002                      C	CRD_NOCOLORS	EQU  0000000000000010B	     ;AN000;file does not contain colors
 = 0004                      C	CRD_NOTCASFILE	EQU  0000000000000100B	     ;AN000;file object list does not exist
 = 0008                      C	CRD_IDNOTFOUND	EQU  0000000000001000B	     ;AN000;color index ID not found
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCPANRD option bit equates (PRD_OPT1)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	PRD_INITIAL    EQU  0000000000000001B	     ;AN000;initialize PCB and filespec buff
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-4
input.asm			   ;AN000;                                      

 = 0002                      C	PRD_READONE    EQU  0000000000000010B	     ;AN000;read pan specified by PRD_ID
 = 0004                      C	PRD_APPEND     EQU  0000000000000100B	     ;AN000;match pans ID are issued new ID
 = 0008                      C	PRD_READALL    EQU  0000000000001000B	     ;AN000;read all pans in specified file
 = 0010                      C	PRD_SIZEMALL   EQU  0000000000010000B	     ;AN000;reserve space for panel sizing
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCPANRD error bit equates (PRD_ERROR)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	PRD_BUFSIZE    EQU  0000000000000001B	     ;AN000;buffer size is too small
 = 0002                      C	PRD_NOPANELS   EQU  0000000000000010B	     ;AN000;file does not contain panels
 = 0004                      C	PRD_NOTCASFILE EQU  0000000000000100B	     ;AN000;file object list does not exist
 = 0008                      C	PRD_PANELSFULL EQU  0000000000001000B	     ;AN000;max num pans read into PCB vect
 = 0010                      C	PRD_NOINITIAL  EQU  0000000000010000B	     ;AN000;make initialize call first
 = 0020                      C	PRD_NOPANELID  EQU  0000000000100000B	     ;AN000;specified panel ID not found
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCDISPQ option equates (QM_OPT1)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	QM_INIT        EQU  0000000000000001B	     ;AN000;Initialize working buffer
 = 0002                      C	QM_PUSHCHD     EQU  0000000000000010B	     ;AN000;Add child number
 = 0004                      C	QM_RVMCHD      EQU  0000000000000100B	     ;AN000;Remove specific child number
 = 0008                      C	QM_POPCHD      EQU  0000000000001000B	     ;AN000;Pop (n) number of child cur queue
 = 0010                      C	QM_PUSHPAN     EQU  0000000000010000B	     ;AN000;Add panel number
 = 0020                      C	QM_RVMPAN      EQU  0000000000100000B	     ;AN000;Remove specific panel number
 = 0040                      C	QM_POPPAN      EQU  0000000001000000B	     ;AN000;Pop (n) number of panls cur queue
 = 0080                      C	QM_PUSHCQU     EQU  0000000010000000B	     ;AN000;Push current child queue
 = 0100                      C	QM_POPCQU      EQU  0000000100000000B	     ;AN000;Pop last child queue
 = 0200                      C	QM_PUSHPQU     EQU  0000001000000000B	     ;AN000;Push current panel queue
 = 0400                      C	QM_POPPQU      EQU  0000010000000000B	     ;AN000;Pop last panel queue pushed
 = 0800                      C	QM_CLSCHD      EQU  0000100000000000B	     ;AN000;Clear current child queue.
 = 1000                      C	QM_CLSPAN      EQU  0001000000000000B	     ;AN000;Clear current panel queue.
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	; PCDISPQ option equates (QM_OPT2)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	QM_BREAKON     EQU  0000000000000001B	     ;AN000;break option is on
 = 0002                      C	QM_BREAKOFF    EQU  0000000000000010B	     ;AN000;break option is off
 = 0004                      C	QM_SRFON       EQU  0000000000000100B	     ;AN000;selected refresh option is on
 = 0008                      C	QM_SRFOFF      EQU  0000000000001000B	     ;AN000;selected refresh option is off
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCDISPQ error equates (QM_ERROR)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	QM_ERRMP       EQU  0000000000000001B	     ;AN000;max number of panels added
 = 0002                      C	QM_ERRMC       EQU  0000000000000010B	     ;AN000;max number of childs added
 = 0004                      C	QM_ERRMPQ      EQU  0000000000000100B	     ;AN000;max number of panel queues pushed
 = 0008                      C	QM_ERRMCQ      EQU  0000000000001000B	     ;AN000;max number of child queues pushed
 = 0010                      C	QM_ERROP       EQU  0000000000010000B	     ;AN000;max number of panel queues popped
 = 0020                      C	QM_ERROC       EQU  0000000000100000B	     ;AN000;max number of child queues popped
 = 0040                      C	QM_ERRBU       EQU  0000000001000000B	     ;AN000;inadequate buffer size avail
 = 0080                      C	QM_ERRPN       EQU  0000000010000000B	     ;AN000;specified panel not found
 = 0100                      C	QM_ERRCN       EQU  0000000100000000B	     ;AN000;specified child not found
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-5
input.asm			   ;AN000;                                      

			     C	;
			     C	; PCPANEL option bit equates (PM_OPT1)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	PM_RF	       EQU  0000000000000001B	     ;AN000;do not refresh display
 = 0002                      C	PM_SRF	       EQU  0000000000000010B	     ;AN000;selective PVB refresh from LVB
 = 0004                      C	PM_BK	       EQU  0000000000000100B	     ;AN000;panel break function active
 = 0008                      C	PM_CL	       EQU  0000000000001000B	     ;AN000;initialize LVB to base char/attr
 = 0010                      C	PM_DOA	       EQU  0000000000010000B	     ;AN000;display childs in active parent
 = 0020                      C	PM_DOV	       EQU  0000000000100000B	     ;AN000;use child row, col, color overrid
 = 0040                      C	PM_DOQ	       EQU  0000000001000000B	     ;AN000;disp all child in parent chd tabl
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCPANEL error equates for (PM_ERROR)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	PM_PANPDQ      EQU  0000000000000001B	     ;AN000;invalid parent PDQ or start num
 = 0002                      C	PM_PCBVEC      EQU  0000000000000010B	     ;AN000;invalid PCB vector entry found
 = 0004                      C	PM_UNKNPANS    EQU  0000000000000100B	     ;AN000;unknown panel source found
 = 0008                      C	PM_CHDTAB      EQU  0000000000001000B	     ;AN000;set error with child table
 = 0010                      C	PM_COLORX      EQU  0000000000010000B	     ;AN000;panel's color index out of range
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCPANEL Parent and Child Display Queue option bit equates (PT_OPT)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	PT_BK	       EQU  0000000000000001B	     ;AN000;panel break on
 = 0002                      C	PT_SRF	       EQU  0000000000000010B	     ;AN000;selective refresh of panel to PVB
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCPANEL Panel Control Block option equates for individual panels (PCB_OPT1)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	PCB_CRE        EQU  0000000000000001B	     ;AN000;Create panel from scratch
 = 0002                      C	PCB_CMP        EQU  0000000000000010B	     ;AN000;Use compress text form in memory
 = 0004                      C	PCB_EXP        EQU  0000000000000100B	     ;AN000;Use expanded text form in memory
 = 0008                      C	PCB_MXP        EQU  0000000000001000B	     ;AN000;Use mixed text/attr form in memoy
 = 0010                      C	PCB_LB	       EQU  0000000000010000B	     ;AN000;Use logical border
 = 0020                      C	PCB_ASZ        EQU  0000000000100000B	     ;AN000;Allow sizing of panel
 = 0040                      C	PCB_ASC        EQU  0000000001000000B	     ;AN000;Allow scrolling of panel
 = 0080                      C	PCB_LAB        EQU  0000000010000000B	     ;AN000;Use the defined panel label
 = 0100                      C	PCB_DTB        EQU  0000000100000000B	     ;AN000;Draw top border (graphics only)
 = 0200                      C	PCB_DBB        EQU  0000001000000000B	     ;AN000;Draw bottom border (graphic only)
 = 0400                      C	PCB_DLB        EQU  0000010000000000B	     ;AN000;Draw left border (graphics only)
 = 0800                      C	PCB_DRB        EQU  0000100000000000B	     ;AN000;Draw right border (graphics only)
 = 1000                      C	PCB_DSHADOW    EQU  0001000000000000B	     ;AN000;Draw shadow (graphics only)
 = 2000                      C	PCB_PELCOORD   EQU  0010000000000000B	     ;AN000;row/col in pel coordinates (grap)
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCINSTR option bit equates (INS_OPT)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	INS_FKS        EQU  0000000000000001B	     ;AN000;find keystroke
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCGVIDO Status equates (GV_STAT1)
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-6
input.asm			   ;AN000;                                      

			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	GV_TV	       EQU  0000000000000001B	     ;AN000;TopView is present
 = 0002                      C	GV_CGA	       EQU  0000000000000010B	     ;AN000;CGA is present
 = 0004                      C	GV_EGA	       EQU  0000000000000100B	     ;AN000;EGA is present
 = 0008                      C	GV_PGA	       EQU  0000000000001000B	     ;AN000;PGA is present
 = 0010                      C	GV_MGA	       EQU  0000000000010000B	     ;AN000;MGA is present
 = 0020                      C	GV_EGAA        EQU  0000000000100000B	     ;AN000;EGA is active card
 = 0040                      C	GV_CGAA        EQU  0000000001000000B	     ;AN000;CGA is active card
 = 0080                      C	GV_EGACM       EQU  0000000010000000B	     ;AN000;EGA is set to monochrome
 = 0100                      C	GV_PGAEM       EQU  0000000100000000B	     ;AN000;PGA is in color emulation mode
 = 0200                      C	GV_HS	       EQU  0000001000000000B	     ;AN000;display requires sync check 1=Y
 = 0400                      C	GV_64K	       EQU  0000010000000000B	     ;AN000; 64K memory on EGA card
 = 0800                      C	GV_128K        EQU  0000100000000000B	     ;AN000;128K memory on EGA card
 = 1000                      C	GV_192K        EQU  0001000000000000B	     ;AN000;192K memory on EGA card
 = 2000                      C	GV_256K        EQU  0010000000000000B	     ;AN000;256K memory on EGA card
 = 4000                      C	GV_UM	       EQU  0100000000000000B	     ;AN000;error unknown moniter or config
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCGVIDO Status equates (GV_STAT2)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	GV_TVW	       EQU  0000000000000001B	     ;AN000;App is 'well behaved' under TV
 = 0002                      C	GV_P5140       EQU  0000000000000010B	     ;AN000;P12 with LCD
 = 0004                      C	GV_P5153       EQU  0000000000000100B	     ;AN000;P12 with color
 = 0008                      C	GV_P5151       EQU  0000000000001000B	     ;AN000;P12 with monochrome
 = 0010                      C	GV_COLOR       EQU  0000000000010000B	     ;AN000;color mode
 = 0020                      C	GV_TEXTGRAPH   EQU  0000000000100000B	     ;AN000;graphics mode
 = 0040                      C	GV_MONOP       EQU  0000000001000000B	     ;AN000;monochrome adapter is primary
 = 0080                      C	GV_CGAP        EQU  0000000010000000B	     ;AN000;CGA adapter is primary card
 = 0100                      C	GV_EGAP        EQU  0000000100000000B	     ;AN000;EGA adapter is primary card
 = 0200                      C	GV_TURBOP      EQU  0000001000000000B	     ;AN000;Turbo graphics adapter is primary
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCINPUT option equates.
			     C	;
			     C	;
			     C	; PCINPUT Option equates (IN_OPT)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	IN_UTRAN       EQU  0000000000000001B	     ;AN000;translate keys using user table
 = 0002                      C	IN_ADBCS       EQU  0000000000000010B	     ;AN000;DBCS option active
 = 0004                      C	IN_UDBCS       EQU  0000000000000100B	     ;AN000;DBCS processed using user table
 = 0008                      C	IN_DDBCS       EQU  0000000000001000B	     ;AN000;DBCS processed using DOS table
 = 0010                      C	IN_UMONO       EQU  0000000000010000B	     ;AN000;monocase keys using user table
 = 0020                      C	IN_AMONO       EQU  0000000000100000B	     ;AN000;monocase keys using USA algorithm
 = 0040                      C	IN_LICBX       EQU  0000000001000000B	     ;AN000;load ICB off:seg and exit
 = 0080                      C	IN_LVBOV       EQU  0000000010000000B	     ;AN000;use video buffer seg:off override
			     C						     ;
 = 0001                      C	IN_RANG        EQU  0000000000000001B	     ;AN000;ICB ID out of vector range
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; Input Field Control Block Equates
			     C	;
			     C	; ICB_OPT1  Option word one equates
			     C	;
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-7
input.asm			   ;AN000;                                      

			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	ICB_ECL 	EQU  0000000000000001B	      ;AN000;set specified color on entry
 = 0002                      C	ICB_XCL 	EQU  0000000000000010B	      ;AN000;set specified color on exit
 = 0004                      C	ICB_USC 	EQU  0000000000000100B	      ;AN000;use color attribute string
 = 0008                      C	ICB_BEN 	EQU  0000000000001000B	      ;AN000;display entry delimiters
 = 0010                      C	ICB_BEX 	EQU  0000000000010000B	      ;AN000;display exit delimiters
 = 0020                      C	ICB_BOX 	EQU  0000000000100000B	      ;AN000;display border delimiters
 = 0040                      C	ICB_MUS 	EQU  0000000001000000B	      ;AN000;plus and minus display active
 = 0080                      C	ICB_SMU 	EQU  0000000010000000B	      ;AN000;starting default is negative
 = 0100                      C	ICB_OUT 	EQU  0000000100000000B	      ;AN000;display default and accept input
 = 0200                      C	ICB_CLR 	EQU  0000001000000000B	      ;AN000;clear default on first entry
 = 0400                      C	ICB_PSW 	EQU  0000010000000000B	      ;AN000;password
 = 0800                      C	ICB_RJU 	EQU  0000100000000000B	      ;AN000;right justification is activated
 = 1000                      C	ICB_SWK 	EQU  0001000000000000B	      ;AN000;switch entry dir key active
 = 2000                      C	ICB_RTA 	EQU  0010000000000000B	      ;AN000;right arrow editing
 = 4000                      C	ICB_LFA 	EQU  0100000000000000B	      ;AN000;left arrow editing
 = 8000                      C	ICB_BKS 	EQU  1000000000000000B	      ;AN000;backspace editing
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; ICB_OPT2  Option word two equates
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	ICB_INS 	EQU  0000000000000001B	      ;AN000;insert key editing
 = 0002                      C	ICB_DEL 	EQU  0000000000000010B	      ;AN000;delete key editing
 = 0004                      C	ICB_HOM 	EQU  0000000000000100B	      ;AN000;home key editing
 = 0008                      C	ICB_CTE 	EQU  0000000000001000B	      ;AN000;control + end key editing
 = 0010                      C	ICB_END 	EQU  0000000000010000B	      ;AN000;end key editing
 = 0020                      C	ICB_AXC 	EQU  0000000000100000B	      ;AN000;auto enter on cursor
 = 0040                      C	ICB_AXD 	EQU  0000000001000000B	      ;AN000;auto enter on data
 = 0080                      C	ICB_CSW 	EQU  0000000010000000B	      ;AN000;wrap the cursor end to end
 = 0100                      C	ICB_UPC 	EQU  0000000100000000B	      ;AN000;lower case to upper conversion
 = 0200                      C	ICB_UFK 	EQU  0000001000000000B	      ;AN000;use supplied keystroke as 1 key
 = 0400                      C	ICB_UDO 	EQU  0000010000000000B	      ;AN000;undo key replaces default
 = 0800                      C	ICB_TSD 	EQU  0000100000000000B	      ;AN000;thousands separators during inpu
 = 1000                      C	ICB_TSA 	EQU  0001000000000000B	      ;AN000;thousands separators after entry
 = 2000                      C	ICB_TSR 	EQU  0010000000000000B	      ;AN000;return thousand separators
 = 4000                      C	ICB_PAD 	EQU  0100000000000000B	      ;AN000;pad zeros to precision
 = 8000                      C	ICB_WRP 	EQU  1000000000000000B	      ;AN000;word wrap in windowed field
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; ICB_OPT3  Option word three equates
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	ICB_WIN        EQU  0000000000000001B	     ;AN000;windowing wrap of field
 = 0002                      C	ICB_WAE        EQU  0000000000000010B	     ;AN000;up and down arrow editing
 = 0004                      C	ICB_TBX        EQU  0000000000000100B	     ;AN000;exit if arrows reach top/bottom
 = 0008                      C	ICB_HOR        EQU  0000000000001000B	     ;AN000;horizontial windowing
 = 0010                      C	ICB_WHM        EQU  0000000000010000B	     ;AN000;full window Home key
 = 0020                      C	ICB_WEN        EQU  0000000000100000B	     ;AN000;full window End key
 = 0040                      C	ICB_WCE        EQU  0000000001000000B	     ;AN000;full window Ctrl-End key
 = 0080                      C	ICB_WDL        EQU  0000000010000000B	     ;AN000;full window Delete key
 = 0100                      C	ICB_WAR        EQU  0000000100000000B	     ;AN000;full window arrow keys
 = 0200                      C	ICB_WBS        EQU  0000001000000000B	     ;AN000;full window backspace key
 = 0400                      C	ICB_FGS        EQU  0000010000000000B	     ;AN000;use the ICB_STATUS status values
 = 0800                      C	ICB_SCR        EQU  0000100000000000B	     ;AN000;display of scroll flag active
 = 1000                      C	ICB_NUM        EQU  0001000000000000B	     ;AN000;display of numlock flag active
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-8
input.asm			   ;AN000;                                      

 = 2000                      C	ICB_CAP        EQU  0010000000000000B	     ;AN000;display of caps flag active
 = 4000                      C	ICB_FIN        EQU  0100000000000000B	     ;AN000;display of insert flag active
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; ICB_STATUS status word equates
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	ICB_SDEF       EQU  0000000000000001B	     ;AN000;default value changed
 = 0002                      C	ICB_SMUS       EQU  0000000000000010B	     ;AN000;minus sign active
 = 0004                      C	ICB_SPUS       EQU  0000000000000100B	     ;AN000;plus sign active
 = 0008                      C	ICB_STRU       EQU  0000000000001000B	     ;AN000;default value was truncated
 = 0010                      C	ICB_SSCR       EQU  0000000000010000B	     ;AN000;scroll lock flag on at exit/entry
 = 0020                      C	ICB_SNUM       EQU  0000000000100000B	     ;AN000;num lock flag on at exit/entry
 = 0040                      C	ICB_SCAP       EQU  0000000001000000B	     ;AN000;caps lock flag on at exit/entry
 = 0080                      C	ICB_SINS       EQU  0000000010000000B	     ;AN000;insert flag on at exit/entry
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCWWRAP option bit equates (WWP_OPT1)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	WWP_LEFTJUST   EQU  0000000000000001B	     ;AN000;process with left straight edge
 = 0002                      C	WWP_RIGHTJUST  EQU  0000000000000010B	     ;AN000;process with right straight edge
 = 0004                      C	WWP_LEFTNRIGHT EQU  0000000000000100B	     ;AN000;process with left and right edge
 = 0008                      C	WWP_HYPHEN     EQU  0000000000001000B	     ;AN000;hyphenate word(s)
 = 0010                      C	WWP_DESTBUFFER EQU  0000000000010000B	     ;AN000;Use specified destination buffer
 = 0020                      C	WWP_SRCBUFFER  EQU  0000000000100000B	     ;AN000;Use the same buf as the text
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; PCWWRAP error bit equates (WWP_ERROR)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	WWP_BUFSIZE    EQU  0000000000000001B	     ;AN000;buffer size is too small
 = 0002                      C	WWP_DUPSYMBOL  EQU  0000000000000010B	     ;AN000;WWP_HYSMBOL and WWP_SRCHYSMB
			     C						     ; are set to same character
 = 0004                      C	WWP_LONGWORD   EQU  0000000000000100B	     ;AN000;word is longer than WWP_WIDTH
 = 0008                      C	WWP_NOBUFFER   EQU  0000000000001000B	     ;AN000;no address to src or dest buf
 = 0010                      C	WWP_NOJUSTOPT  EQU  0000000000010000B	     ;AN000;no justification option was set
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; Help options (WR_HLPOPT, WR_HLPPAN, WR_HLPDIS)
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 0001                      C	HLP_CONT       EQU  0000000000000001B	     ;AN000;contextual help
 = 0002                      C	HLP_KEYS       EQU  0000000000000010B	     ;AN000;keys help
 = 0004                      C	HLP_HELP       EQU  0000000000000100B	     ;AN000;help-on-help
 = 0008                      C	HLP_INDX       EQU  0000000000001000B	     ;AN000;help index
 = 0010                      C	HLP_OVER       EQU  0000000000010000B	     ;AN000;help row and column overrides
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
			     C	;
			     C	; Internal equates
			     C	;
			     C	;
			     C	; Internal keystroke equates
			     C	;
			     C	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 = 4800                      C	UPARROW        EQU  72*256		     ;AN000;up arrow
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-9
input.asm			   ;AN000;                                      

 = 5000                      C	DNARROW        EQU  80*256		     ;AN000;down arrow
 = 4B00                      C	LFARROW        EQU  75*256		     ;AN000;left arrow
 = 4D00                      C	RTARROW        EQU  77*256		     ;AN000;right arrow
 = 0049                      C	PGUP	       EQU  73			     ;AN000;
 = 0051                      C	PGDN	       EQU  81			     ;AN000;
 = 001B                      C	ESCAPE	       EQU  27			     ;AN000;
 = 000D                      C	ENTER	       EQU  13			     ;AN000;
 = 0020                      C	SPACE	       EQU  32			     ;AN000;
 = 0009                      C	TAB	       EQU   9			     ;AN000;
 = 003B                      C	F1	       EQU  59			     ;AN000;
 = 003C                      C	F2	       EQU  60			     ;AN000;
 = 003D                      C	F3	       EQU  61			     ;AN000;
 = 003E                      C	F4	       EQU  62			     ;AN000;
 = 003F                      C	F5	       EQU  63			     ;AN000;
 = 0040                      C	F6	       EQU  64			     ;AN000;
 = 0041                      C	F7	       EQU  65			     ;AN000;
 = 0042                      C	F8	       EQU  66			     ;AN000;
 = 0043                      C	F9	       EQU  67			     ;AN000;
 = 0044                      C	F10	       EQU  68			     ;AN000;
									;
 = 01B8				SND_FREQ       EQU  440 		;AN000;    ;frequency of error beep
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; Input Field Control Block Vector
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0000  ---- R 007C R		WR_ICBVEC DW DATA,WR_ICB1   ;AN000;ICB	1 segment,offset   STR_DOS_LOC
 0004  ---- R 0105 R			DW   DATA,WR_ICB2   ;AN000;ICB	2 segment,offset   STR_EXT_PARMS
 0008  ---- R 0163 R			DW   DATA,WR_ICB3   ;AN000;ICB	3 segment,offset   STR_DOS_PATH
 000C  ---- R 01EE R			DW   DATA,WR_ICB4   ;AN000;ICB	4 segment,offset   STR_DOS_APPEND
 0010  ---- R 024C R			DW   DATA,WR_ICB5   ;AN000;ICB	5 segment,offset   STR_DOS_PROMPT
 0014  ---- R 02D9 R			DW   DATA,WR_ICB6   ;AN000;ICB	6 segment,offset   STR_SHELL
 0018  ---- R 0337 R			DW   DATA,WR_ICB7   ;AN000;ICB	7 segment,offset   STR_KSAM
 001C  ---- R 0395 R			DW   DATA,WR_ICB8   ;AN000;ICB	8 segment,offset   STR_FASTOPEN
 0020  ---- R 03F3 R			DW   DATA,WR_ICB9   ;AN000;ICB	9 segment,offset   STR_SHARE
 0024  ---- R 0451 R			DW   DATA,WR_ICB10  ;AN000;ICB 10 segment,offset   STR_GRAPHICS
 0028  ---- R 04D8 R			DW   DATA,WR_ICB11  ;AN000;ICB 11 segment,offset   STR_XMAEM
 002C  ---- R 0536 R			DW   DATA,WR_ICB12  ;AN000;ICB 12 segment,offset   STR_XMA2EMS
 0030  ---- R 0594 R			DW   DATA,WR_ICB13  ;AN000;ICB 13 segment,offset   STR_VDISK
 0034  ---- R 05F2 R			DW   DATA,WR_ICB14  ;AN000;ICB 14 segment,offset   STR_BREAK
 0038  ---- R 0657 R			DW   DATA,WR_ICB15  ;AN000;ICB 15 segment,offset   STR_BUFFERS
 003C  ---- R 06BE R			DW   DATA,WR_ICB16  ;AN000;ICB 16 segment,offset   STR_DOS_APPEND_P JW
 0040  ---- R 071C R			DW   DATA,WR_ICB17  ;AN000;ICB 17 segment,offset   STR_FCBS
 0044  ---- R 0783 R			DW   DATA,WR_ICB18  ;AN000;ICB 18 segment,offset   STR_FILES
 0048  ---- R 07E1 R			DW   DATA,WR_ICB19  ;AN000;ICB 19 segment,offset   STR_LASTDRIVE
 004C  ---- R 084A R			DW   DATA,WR_ICB20  ;AN000;ICB 20 segment,offset   STR_STACKS
 0050  ---- R 08A8 R			DW   DATA,WR_ICB21  ;AN000;ICB 21 segment,offset   STR_VERIFY
 0054  ---- R 0906 R			DW   DATA,WR_ICB22  ;AN000;ICB 23 segment,offset   NUM_PRINTER
 0058  ---- R 096A R			DW   DATA,WR_ICB23  ;AN000;ICB 23 segment,offset   NUM_EXT_DISK
 005C  ---- R 09CC R			DW   DATA,WR_ICB24  ;AN000;ICB 24 segment,offset   NUM_YEAR
 0060  ---- R 0A2A R			DW   DATA,WR_ICB25  ;AN000;ICB 25 segment,offset   NUM_MONTH
 0064  ---- R 0A88 R			DW   DATA,WR_ICB26  ;AN000;ICB 26 segment,offset   NUM_DAY
 0068  ---- R 0AE6 R			DW   DATA,WR_ICB27  ;AN000;ICB 27 segment,offset   NUM_HOUR
 006C  ---- R 0B44 R			DW   DATA,WR_ICB28  ;AN000;ICB 28 segment,offset   NUM_MINUTE
 0070  ---- R 0BA2 R			DW   DATA,WR_ICB29  ;AN000;ICB 29 segment,offset   NUM_SECOND
 0074  ---- R 0C00 R			DW   DATA,WR_ICB30  ;AN000;ICB 29 segment,offset   DEF_CP
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-10
input.asm			   ;AN000;                                      

 0078  ---- R 0C63 R			DW   DATA,WR_ICB31  ;AN000;ICB 29 segment,offset   SWISS_KEYB
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 1   STR_DOS_LOC
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 007C  E008			WR_ICB1        DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 007E  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0080  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
 0082  0000				       DW   0			     ;AN000;option word four
 0084  0008				       DW   8			  ;AN000;**;upper left corner field row
 0086  0021				       DW   33			  ;AN000;**;upper left corner field column
 0088  0028				       DW   40			  ;AN000;**;number of chars before wrapping
 008A  0001				       DW   1			     ;AN000;color index number assigned
 008C  0000				       DW   0			     ;AN000;default change/minus status
 008E  0001				       DW   1			  ;AN000;**;cursor character pos in field
 0090  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 0092  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0094  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0096  0000				       DW   0			     ;AN000;length of data entered into fld
 0098  0028				       DW   40			     ;AC069;SEH  ;AN000;**;length of input field
 009A  0000				       DW   0			  ;AN000;??;offset of input field
 009C  0000				       DW   0			  ;AN000;??;segment of input field
 009E  0000				       DW   0			     ;AN000;offset of color attribute buffer
 00A0  0000				       DW   0			     ;AN000;segment of color attr buffer
 00A2  0000				       DW   0			     ;AN000;length of field's default value
 00A4  0000				       DW   0			     ;AN000;offset field's default value
 00A6  0000				       DW   0			     ;AN000;segment field's default value
 00A8  0000				       DW   0			     ;AN000;length of return string
 00AA  0000				       DW   0			     ;AN000;offset of return string
 00AC  0000				       DW   0			     ;AN000;segment of return string
 00AE  002B				       DW   WR_PATH_CHAR_LEN	     ;AN000;length of allow chars
 00B0  00DA R				       DW   WR_PATH_CHAR	     ;AN000;offset of allow chars
 00B2  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 00B4  0000				       DW   0			     ;AN000;length of skip chars
 00B6  0000				       DW   0			     ;AN000;offset of skip chars
 00B8  0000				       DW   0			     ;AN000;segment of skip chars
 00BA  0000				       DW   0			     ;AN000;length of allow once chars
 00BC  0000				       DW   0			     ;AN000;offset of allow once chars
 00BE  0000				       DW   0			     ;AN000;segment of allow once chars
 00C0  0002				       DW   2			     ;AN000;precision of decimal point
 00C2  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 00C4  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 00C6  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 00C8  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 00CA  0000				       DW   0			     ;AN000;beginning row of minus and plus
 00CC  0000				       DW   0			     ;AN000;beginning col of minus & plus
 00CE  0000				       DW   0			     ;AN000;length of minus sign string
 00D0  0000				       DW   0			     ;AN000;offset of minus sign string
 00D2  0000				       DW   0			     ;AN000;segment of minus sign string
 00D4  0000				       DW   0			     ;AN000;length of plus sign string
 00D6  0000				       DW   0			     ;AN000;offset of plus sign string
 00D8  0000				       DW   0			     ;AN000;segment of plus sign string
									     ;
 00DA  27 2C 30 2D 39 2C	WR_PATH_CHAR  DB   "'",',0-9,,a-z,,A-Z,,',080h,'-',0FEh,', $!"#%&()-.@\`_{}~^,,,' ;AN000;
       2C 61 2D 7A 2C 2C	
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-11
input.asm			   ;AN000;                                      

       41 2D 5A 2C 2C 80	
       2D FE 2C 20 24 21	
       22 23 25 26 28 29	
       2D 2E 40 5C 60 5F	
       7B 7D 7E 5E 2C 2C	
       2C			
 = 002B				WR_PATH_CHAR_LEN  EQU ($-WR_PATH_CHAR)	     ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 2  STR_EXT_PARMS
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0105  E008			WR_ICB2        DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 0107  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0109  03B8				       DW   ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS  ;AN000;option word three
 010B  0000				       DW   0			     ;AN000;option word four
 010D  0007				       DW   7			  ;AN000;**;upper left corner field row
 010F  002C				       DW   44			  ;AN000;**;upper left corner field column
 0111  004B				       DW   75 ;;AN000;35		  ;**;number of chars before wrapping
 0113  0001				       DW   1			     ;AN000;color index number assigned
 0115  0000				       DW   0			     ;AN000;default change/minus status
 0117  0001				       DW   1			  ;AN000;**;cursor character pos in field
 0119  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 011B  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 011D  0000				       DW   0			     ;AN000;ASCII code of the key returned
 011F  0000				       DW   0			     ;AN000;length of data entered into fld
 0121  0000				       DW   0			  ;AN000;**;length of input field
 0123  0000				       DW   0			  ;AN000;??;offset of input field
 0125  0000				       DW   0			  ;AN000;??;segment of input field
 0127  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0129  0000				       DW   0			     ;AN000;segment of color attr buffer
 012B  0000				       DW   0			     ;AN000;length of field's default value
 012D  0000				       DW   0			     ;AN000;offset field's default value
 012F  0000				       DW   0			     ;AN000;segment field's default value
 0131  0000				       DW   0			     ;AN000;length of return string
 0133  0000				       DW   0			     ;AN000;offset of return string
 0135  0000				       DW   0			     ;AN000;segment of return string
 0137  0005				       DW   WR_ALLOW_CHAR_LEN	     ;AN000;length of allow chars
 0139  0CE1 R				       DW   WR_ALLOW_CHAR	     ;AN000;offset of allow chars
 013B  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 013D  0000				       DW   0			     ;AN000;length of skip chars
 013F  0000				       DW   0			     ;AN000;offset of skip chars
 0141  0000				       DW   0			     ;AN000;segment of skip chars
 0143  0000				       DW   0			     ;AN000;length of allow once chars
 0145  0000				       DW   0			     ;AN000;offset of allow once chars
 0147  0000				       DW   0			     ;AN000;segment of allow once chars
 0149  0002				       DW   2			     ;AN000;precision of decimal point
 014B  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 014D  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 014F  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0151  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0153  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0155  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0157  0000				       DW   0			     ;AN000;length of minus sign string
 0159  0000				       DW   0			     ;AN000;offset of minus sign string
 015B  0000				       DW   0			     ;AN000;segment of minus sign string
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-12
input.asm			   ;AN000;                                      

 015D  0000				       DW   0			     ;AN000;length of plus sign string
 015F  0000				       DW   0			     ;AN000;offset of plus sign string
 0161  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 3  STR_DOS_PATH
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0163  E008			WR_ICB3        DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 0165  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0167  03B8				       DW   ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS  ;AN000;option word three
 0169  0000				       DW   0			     ;AN000;option word four
 016B  0008				       DW   8			  ;AN000;**;upper left corner field row
 016D  001E				       DW   30			  ;AN000;**;upper left corner field column
 016F  0028				       DW   40			  ;AN000;**;number of chars before wrapping
 0171  0001				       DW   1			     ;AN000;color index number assigned
 0173  0000				       DW   0			     ;AN000;default change/minus status
 0175  0001				       DW   1			  ;AN000;**;cursor character pos in field
 0177  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 0179  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 017B  0000				       DW   0			     ;AN000;ASCII code of the key returned
 017D  0000				       DW   0			     ;AN000;length of data entered into fld
 017F  0000				       DW   0			  ;AN000;**;length of input field
 0181  0000				       DW   0			  ;AN000;??;offset of input field
 0183  0000				       DW   0			  ;AN000;??;segment of input field
 0185  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0187  0000				       DW   0			     ;AN000;segment of color attr buffer
 0189  0000				       DW   0			     ;AN000;length of field's default value
 018B  0000				       DW   0			     ;AN000;offset field's default value
 018D  0000				       DW   0			     ;AN000;segment field's default value
 018F  0000				       DW   0			     ;AN000;length of return string
 0191  0000				       DW   0			     ;AN000;offset of return string
 0193  0000				       DW   0			     ;AN000;segment of return string
 0195  002D				       DW   WR_APPEND_CHAR_LEN	      ;AN000;length of allow chars
 0197  01C1 R				       DW   WR_APPEND_CHAR	      ;AN000;offset of allow chars
 0199  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 019B  0000				       DW   0			     ;AN000;length of skip chars
 019D  0000				       DW   0			     ;AN000;offset of skip chars
 019F  0000				       DW   0			     ;AN000;segment of skip chars
 01A1  0000				       DW   0			     ;AN000;length of allow once chars
 01A3  0000				       DW   0			     ;AN000;offset of allow once chars
 01A5  0000				       DW   0			     ;AN000;segment of allow once chars
 01A7  0002				       DW   2			     ;AN000;precision of decimal point
 01A9  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 01AB  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 01AD  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 01AF  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 01B1  0000				       DW   0			     ;AN000;beginning row of minus and plus
 01B3  0000				       DW   0			     ;AN000;beginning col of minus & plus
 01B5  0000				       DW   0			     ;AN000;length of minus sign string
 01B7  0000				       DW   0			     ;AN000;offset of minus sign string
 01B9  0000				       DW   0			     ;AN000;segment of minus sign string
 01BB  0000				       DW   0			     ;AN000;length of plus sign string
 01BD  0000				       DW   0			     ;AN000;offset of plus sign string
 01BF  0000				       DW   0			     ;AN000;segment of plus sign string
									     ;;;
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-13
input.asm			   ;AN000;                                      

									       ;
 01C1  27 2C 30 2D 39 2C	WR_APPEND_CHAR	DB   "'",',0-9,,a-z,,A-Z,,',080h,'-',0FEh,', ;$!"#%&()-.:@\`_{}~^,,,' ;AN000;
       2C 61 2D 7A 2C 2C	
       41 2D 5A 2C 2C 80	
       2D FE 2C 20 3B 24	
       21 22 23 25 26 28	
       29 2D 2E 3A 40 5C	
       60 5F 7B 7D 7E 5E	
       2C 2C 2C			
 = 002D				WR_APPEND_CHAR_LEN  EQU ($-WR_APPEND_CHAR)     ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 4  STR_DOS_APPEND
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 01EE  E008			WR_ICB4        DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 01F0  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 01F2  03B8				       DW   ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS  ;AN000;option word three
 01F4  0000				       DW   0			     ;AN000;option word four
 01F6  000C				       DW   12			  ;AN000;**;upper left corner field row
 01F8  001E				       DW   30			  ;AN000;**;upper left corner field column
 01FA  0028				       DW   40			  ;AN000;**;number of chars before wrapping
 01FC  0001				       DW   1			     ;AN000;color index number assigned
 01FE  0000				       DW   0			     ;AN000;default change/minus status
 0200  0001				       DW   1			  ;AN000;**;cursor character pos in field
 0202  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 0204  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0206  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0208  0000				       DW   0			     ;AN000;length of data entered into fld
 020A  0000				       DW   0			  ;AN000;**;length of input field
 020C  0000				       DW   0			  ;AN000;??;offset of input field
 020E  0000				       DW   0			  ;AN000;??;segment of input field
 0210  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0212  0000				       DW   0			     ;AN000;segment of color attr buffer
 0214  0000				       DW   0			     ;AN000;length of field's default value
 0216  0000				       DW   0			     ;AN000;offset field's default value
 0218  0000				       DW   0			     ;AN000;segment field's default value
 021A  0000				       DW   0			     ;AN000;length of return string
 021C  0000				       DW   0			     ;AN000;offset of return string
 021E  0000				       DW   0			     ;AN000;segment of return string
 0220  002D				       DW   WR_APPEND_CHAR_LEN	      ;AN000;length of allow chars
 0222  01C1 R				       DW   WR_APPEND_CHAR	      ;AN000;offset of allow chars
 0224  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0226  0000				       DW   0			     ;AN000;length of skip chars
 0228  0000				       DW   0			     ;AN000;offset of skip chars
 022A  0000				       DW   0			     ;AN000;segment of skip chars
 022C  0000				       DW   0			     ;AN000;length of allow once chars
 022E  0000				       DW   0			     ;AN000;offset of allow once chars
 0230  0000				       DW   0			     ;AN000;segment of allow once chars
 0232  0002				       DW   2			     ;AN000;precision of decimal point
 0234  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0236  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0238  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 023A  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 023C  0000				       DW   0			     ;AN000;beginning row of minus and plus
 023E  0000				       DW   0			     ;AN000;beginning col of minus & plus
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-14
input.asm			   ;AN000;                                      

 0240  0000				       DW   0			     ;AN000;length of minus sign string
 0242  0000				       DW   0			     ;AN000;offset of minus sign string
 0244  0000				       DW   0			     ;AN000;segment of minus sign string
 0246  0000				       DW   0			     ;AN000;length of plus sign string
 0248  0000				       DW   0			     ;AN000;offset of plus sign string
 024A  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 5  STR_DOS_PROMPT
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 024C  E008			WR_ICB5        DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 024E  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0250  03B8				       DW   ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS  ;AN000;option word three
 0252  0000				       DW   0			     ;AN000;option word four
 0254  000F				       DW   15			  ;AN000;**;upper left corner field row
 0256  001E				       DW   30			  ;AN000;**;upper left corner field column
 0258  001E				       DW   30			  ;AN000;**;number of chars before wrapping
 025A  0001				       DW   1			     ;AN000;color index number assigned
 025C  0000				       DW   0			     ;AN000;default change/minus status
 025E  0001				       DW   1			  ;AN000;**;cursor character pos in field
 0260  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 0262  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0264  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0266  0000				       DW   0			     ;AN000;length of data entered into fld
 0268  0000				       DW   0			  ;AN000;**;length of input field
 026A  0000				       DW   0			  ;AN000;??;offset of input field
 026C  0000				       DW   0			  ;AN000;??;segment of input field
 026E  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0270  0000				       DW   0			     ;AN000;segment of color attr buffer
 0272  0000				       DW   0			     ;AN000;length of field's default value
 0274  0000				       DW   0			     ;AN000;offset field's default value
 0276  0000				       DW   0			     ;AN000;segment field's default value
 0278  0000				       DW   0			     ;AN000;length of return string
 027A  0000				       DW   0			     ;AN000;offset of return string
 027C  0000				       DW   0			     ;AN000;segment of return string
 027E  002F				       DW   WR_PROMPT_CHAR_LEN	      ;AN000;length of allow chars
 0280  02AA R				       DW   WR_PROMPT_CHAR	      ;AN000;offset of allow chars
 0282  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0284  0000				       DW   0			     ;AN000;length of skip chars
 0286  0000				       DW   0			     ;AN000;offset of skip chars
 0288  0000				       DW   0			     ;AN000;segment of skip chars
 028A  0000				       DW   0			     ;AN000;length of allow once chars
 028C  0000				       DW   0			     ;AN000;offset of allow once chars
 028E  0000				       DW   0			     ;AN000;segment of allow once chars
 0290  0002				       DW   2			     ;AN000;precision of decimal point
 0292  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0294  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0296  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0298  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 029A  0000				       DW   0			     ;AN000;beginning row of minus and plus
 029C  0000				       DW   0			     ;AN000;beginning col of minus & plus
 029E  0000				       DW   0			     ;AN000;length of minus sign string
 02A0  0000				       DW   0			     ;AN000;offset of minus sign string
 02A2  0000				       DW   0			     ;AN000;segment of minus sign string
 02A4  0000				       DW   0			     ;AN000;length of plus sign string
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-15
input.asm			   ;AN000;                                      

 02A6  0000				       DW   0			     ;AN000;offset of plus sign string
 02A8  0000				       DW   0			     ;AN000;segment of plus sign string
									     ;;;;;;;;;;;;;
											 ;
 02AA  27 2C 30 2D 39 2C	WR_PROMPT_CHAR	DB   "'",',0-9,,a-z,,A-Z,,',080h,'-',0FFh,',\/ $!"#%()*+-.;@`[]_{}~,,,' ;AN000;
       2C 61 2D 7A 2C 2C	
       41 2D 5A 2C 2C 80	
       2D FF 2C 5C 2F 20	
       24 21 22 23 25 28	
       29 2A 2B 2D 2E 3B	
       40 60 5B 5D 5F 7B	
       7D 7E 2C 2C 2C		
 = 002F				WR_PROMPT_CHAR_LEN  EQU ($-WR_PROMPT_CHAR)		 ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 6  STR_SHELL
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 02D9  E008			WR_ICB6        DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 02DB  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 02DD  03B8				       DW   ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS  ;AN000;option word three
 02DF  0000				       DW   0			     ;AN000;option word four
 02E1  0008				       DW   8			  ;AN000;**;upper left corner field row
 02E3  0026				       DW   38			  ;AN000;**;upper left corner field column
 02E5  000F				       DW   15			  ;AN000;**;number of chars before wrapping
 02E7  0001				       DW   1			     ;AN000;color index number assigned
 02E9  0000				       DW   0			     ;AN000;default change/minus status
 02EB  0001				       DW   1			  ;AN000;**;cursor character pos in field
 02ED  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 02EF  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 02F1  0000				       DW   0			     ;AN000;ASCII code of the key returned
 02F3  0000				       DW   0			     ;AN000;length of data entered into fld
 02F5  0000				       DW   0			  ;AN000;**;length of input field
 02F7  0000				       DW   0			  ;AN000;??;offset of input field
 02F9  0000				       DW   0			  ;AN000;??;segment of input field
 02FB  0000				       DW   0			     ;AN000;offset of color attribute buffer
 02FD  0000				       DW   0			     ;AN000;segment of color attr buffer
 02FF  0000				       DW   0			     ;AN000;length of field's default value
 0301  0000				       DW   0			     ;AN000;offset field's default value
 0303  0000				       DW   0			     ;AN000;segment field's default value
 0305  0000				       DW   0			     ;AN000;length of return string
 0307  0000				       DW   0			     ;AN000;offset of return string
 0309  0000				       DW   0			     ;AN000;segment of return string
 030B  0005				       DW   WR_ALLOW_CHAR_LEN	     ;AN000;length of allow chars
 030D  0CE1 R				       DW   WR_ALLOW_CHAR	     ;AN000;offset of allow chars
 030F  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0311  0000				       DW   0			     ;AN000;length of skip chars
 0313  0000				       DW   0			     ;AN000;offset of skip chars
 0315  0000				       DW   0			     ;AN000;segment of skip chars
 0317  0000				       DW   0			     ;AN000;length of allow once chars
 0319  0000				       DW   0			     ;AN000;offset of allow once chars
 031B  0000				       DW   0			     ;AN000;segment of allow once chars
 031D  0002				       DW   2			     ;AN000;precision of decimal point
 031F  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0321  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0323  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-16
input.asm			   ;AN000;                                      

 0325  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0327  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0329  0000				       DW   0			     ;AN000;beginning col of minus & plus
 032B  0000				       DW   0			     ;AN000;length of minus sign string
 032D  0000				       DW   0			     ;AN000;offset of minus sign string
 032F  0000				       DW   0			     ;AN000;segment of minus sign string
 0331  0000				       DW   0			     ;AN000;length of plus sign string
 0333  0000				       DW   0			     ;AN000;offset of plus sign string
 0335  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 7  STR_KSAM
				;
				;	This field will not be used with the shipped version
				;	of SELECT.  
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0337  E008			WR_ICB7        DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 0339  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 033B  03B8				       DW   ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS  ;AN000;option word three
 033D  0000				       DW   0			     ;AN000;option word four
 033F  0007				       DW   7			  ;AN000;**;upper left corner field row
 0341  0024				       DW   36			  ;AN000;**;upper left corner field column
 0343  0028				       DW   40			  ;AN000;**;number of chars before wrapping
 0345  0001				       DW   1			     ;AN000;color index number assigned
 0347  0000				       DW   0			     ;AN000;default change/minus status
 0349  0001				       DW   1			  ;AN000;**;cursor character pos in field
 034B  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 034D  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 034F  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0351  0000				       DW   0			     ;AN000;length of data entered into fld
 0353  0000				       DW   0			  ;AN000;**;length of input field
 0355  0000				       DW   0			  ;AN000;??;offset of input field
 0357  0000				       DW   0			  ;AN000;??;segment of input field
 0359  0000				       DW   0			     ;AN000;offset of color attribute buffer
 035B  0000				       DW   0			     ;AN000;segment of color attr buffer
 035D  0000				       DW   0			     ;AN000;length of field's default value
 035F  0000				       DW   0			     ;AN000;offset field's default value
 0361  0000				       DW   0			     ;AN000;segment field's default value
 0363  0000				       DW   0			     ;AN000;length of return string
 0365  0000				       DW   0			     ;AN000;offset of return string
 0367  0000				       DW   0			     ;AN000;segment of return string
 0369  0005				       DW   WR_ALLOW_CHAR_LEN	     ;AN000;length of allow chars
 036B  0CE1 R				       DW   WR_ALLOW_CHAR	     ;AN000;offset of allow chars
 036D  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 036F  0000				       DW   0			     ;AN000;length of skip chars
 0371  0000				       DW   0			     ;AN000;offset of skip chars
 0373  0000				       DW   0			     ;AN000;segment of skip chars
 0375  0000				       DW   0			     ;AN000;length of allow once chars
 0377  0000				       DW   0			     ;AN000;offset of allow once chars
 0379  0000				       DW   0			     ;AN000;segment of allow once chars
 037B  0002				       DW   2			     ;AN000;precision of decimal point
 037D  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 037F  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0381  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0383  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-17
input.asm			   ;AN000;                                      

 0385  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0387  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0389  0000				       DW   0			     ;AN000;length of minus sign string
 038B  0000				       DW   0			     ;AN000;offset of minus sign string
 038D  0000				       DW   0			     ;AN000;segment of minus sign string
 038F  0000				       DW   0			     ;AN000;length of plus sign string
 0391  0000				       DW   0			     ;AN000;offset of plus sign string
 0393  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 8  STR_FASTOPEN
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0395  E008			WR_ICB8        DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 0397  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0399  03B8				       DW   ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS  ;AN000;option word three
 039B  0000				       DW   0			     ;AN000;option word four
 039D  0008				       DW   8			  ;AN000;**;upper left corner field row
 039F  0028				       DW   40			  ;AN000;**;upper left corner field column
 03A1  0028				       DW   40			  ;AN000;**;number of chars before wrapping
 03A3  0001				       DW   1			     ;AN000;color index number assigned
 03A5  0000				       DW   0			     ;AN000;default change/minus status
 03A7  0001				       DW   1			  ;AN000;**;cursor character pos in field
 03A9  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 03AB  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 03AD  0000				       DW   0			     ;AN000;ASCII code of the key returned
 03AF  0000				       DW   0			     ;AN000;length of data entered into fld
 03B1  0000				       DW   0			  ;AN000;**;length of input field
 03B3  0000				       DW   0			  ;AN000;??;offset of input field
 03B5  0000				       DW   0			  ;AN000;??;segment of input field
 03B7  0000				       DW   0			     ;AN000;offset of color attribute buffer
 03B9  0000				       DW   0			     ;AN000;segment of color attr buffer
 03BB  0000				       DW   0			     ;AN000;length of field's default value
 03BD  0000				       DW   0			     ;AN000;offset field's default value
 03BF  0000				       DW   0			     ;AN000;segment field's default value
 03C1  0000				       DW   0			     ;AN000;length of return string
 03C3  0000				       DW   0			     ;AN000;offset of return string
 03C5  0000				       DW   0			     ;AN000;segment of return string
 03C7  0005				       DW   WR_ALLOW_CHAR_LEN	     ;AN000;length of allow chars
 03C9  0CE1 R				       DW   WR_ALLOW_CHAR	     ;AN000;offset of allow chars
 03CB  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 03CD  0000				       DW   0			     ;AN000;length of skip chars
 03CF  0000				       DW   0			     ;AN000;offset of skip chars
 03D1  0000				       DW   0			     ;AN000;segment of skip chars
 03D3  0000				       DW   0			     ;AN000;length of allow once chars
 03D5  0000				       DW   0			     ;AN000;offset of allow once chars
 03D7  0000				       DW   0			     ;AN000;segment of allow once chars
 03D9  0002				       DW   2			     ;AN000;precision of decimal point
 03DB  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 03DD  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 03DF  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 03E1  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 03E3  0000				       DW   0			     ;AN000;beginning row of minus and plus
 03E5  0000				       DW   0			     ;AN000;beginning col of minus & plus
 03E7  0000				       DW   0			     ;AN000;length of minus sign string
 03E9  0000				       DW   0			     ;AN000;offset of minus sign string
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-18
input.asm			   ;AN000;                                      

 03EB  0000				       DW   0			     ;AN000;segment of minus sign string
 03ED  0000				       DW   0			     ;AN000;length of plus sign string
 03EF  0000				       DW   0			     ;AN000;offset of plus sign string
 03F1  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 9  STR_SHARE
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 03F3  E008			WR_ICB9        DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 03F5  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 03F7  0008				       DW   ICB_HOR		     ;AC069;SEH  ;AN000;option word three
 03F9  0000				       DW   0			     ;AN000;option word four
 03FB  0008				       DW   8			  ;AN000;**;upper left corner field row
 03FD  0024				       DW   36			  ;AN000;**;upper left corner field column
 03FF  0028				       DW   40			  ;AN000;**;number of chars before wrapping
 0401  0001				       DW   1			     ;AN000;color index number assigned
 0403  0000				       DW   0			     ;AN000;default change/minus status
 0405  0001				       DW   1			  ;AN000;**;cursor character pos in field
 0407  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 0409  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 040B  0000				       DW   0			     ;AN000;ASCII code of the key returned
 040D  0000				       DW   0			     ;AN000;length of data entered into fld
 040F  0028				       DW   40			     ;AC069;SEH  ;AN000;**;length of input field
 0411  0000				       DW   0			  ;AN000;??;offset of input field
 0413  0000				       DW   0			  ;AN000;??;segment of input field
 0415  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0417  0000				       DW   0			     ;AN000;segment of color attr buffer
 0419  0000				       DW   0			     ;AN000;length of field's default value
 041B  0000				       DW   0			     ;AN000;offset field's default value
 041D  0000				       DW   0			     ;AN000;segment field's default value
 041F  0000				       DW   0			     ;AN000;length of return string
 0421  0000				       DW   0			     ;AN000;offset of return string
 0423  0000				       DW   0			     ;AN000;segment of return string
 0425  0005				       DW   WR_ALLOW_CHAR_LEN	     ;AN000;length of allow chars
 0427  0CE1 R				       DW   WR_ALLOW_CHAR	     ;AN000;offset of allow chars
 0429  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 042B  0000				       DW   0			     ;AN000;length of skip chars
 042D  0000				       DW   0			     ;AN000;offset of skip chars
 042F  0000				       DW   0			     ;AN000;segment of skip chars
 0431  0000				       DW   0			     ;AN000;length of allow once chars
 0433  0000				       DW   0			     ;AN000;offset of allow once chars
 0435  0000				       DW   0			     ;AN000;segment of allow once chars
 0437  0002				       DW   2			     ;AN000;precision of decimal point
 0439  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 043B  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 043D  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 043F  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0441  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0443  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0445  0000				       DW   0			     ;AN000;length of minus sign string
 0447  0000				       DW   0			     ;AN000;offset of minus sign string
 0449  0000				       DW   0			     ;AN000;segment of minus sign string
 044B  0000				       DW   0			     ;AN000;length of plus sign string
 044D  0000				       DW   0			     ;AN000;offset of plus sign string
 044F  0000				       DW   0			     ;AN000;segment of plus sign string
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-19
input.asm			   ;AN000;                                      

				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 10  STR_GRAPHICS
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0451  E008			WR_ICB10       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 0453  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0455  03B8				       DW   ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS  ;AN000;option word three
 0457  0000				       DW   0			     ;AN000;option word four
 0459  0008				       DW   8			  ;AN000;**;upper left corner field row
 045B  0022				       DW   34			  ;AN000;**;upper left corner field column
 045D  0028				       DW   40			  ;AN000;**;number of chars before wrapping
 045F  0001				       DW   1			     ;AN000;color index number assigned
 0461  0000				       DW   0			     ;AN000;default change/minus status
 0463  0001				       DW   1			  ;AN000;**;cursor character pos in field
 0465  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 0467  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0469  0000				       DW   0			     ;AN000;ASCII code of the key returned
 046B  0000				       DW   0			     ;AN000;length of data entered into fld
 046D  0000				       DW   0			  ;AN000;**;length of input field
 046F  0000				       DW   0			  ;AN000;??;offset of input field
 0471  0000				       DW   0			  ;AN000;??;segment of input field
 0473  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0475  0000				       DW   0			     ;AN000;segment of color attr buffer
 0477  0000				       DW   0			     ;AN000;length of field's default value
 0479  0000				       DW   0			     ;AN000;offset field's default value
 047B  0000				       DW   0			     ;AN000;segment field's default value
 047D  0000				       DW   0			     ;AN000;length of return string
 047F  0000				       DW   0			     ;AN000;offset of return string
 0481  0000				       DW   0			     ;AN000;segment of return string
 0483  0029				       DW   WR_GRAPHIC_CHAR_LEN        ;AN000;length of allow chars
 0485  04AF R				       DW   WR_GRAPHIC_CHAR	       ;AN000;offset of allow chars
 0487  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0489  0000				       DW   0			     ;AN000;length of skip chars
 048B  0000				       DW   0			     ;AN000;offset of skip chars
 048D  0000				       DW   0			     ;AN000;segment of skip chars
 048F  0000				       DW   0			     ;AN000;length of allow once chars
 0491  0000				       DW   0			     ;AN000;offset of allow once chars
 0493  0000				       DW   0			     ;AN000;segment of allow once chars
 0495  0002				       DW   2			     ;AN000;precision of decimal point
 0497  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0499  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 049B  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 049D  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 049F  0000				       DW   0			     ;AN000;beginning row of minus and plus
 04A1  0000				       DW   0			     ;AN000;beginning col of minus & plus
 04A3  0000				       DW   0			     ;AN000;length of minus sign string
 04A5  0000				       DW   0			     ;AN000;offset of minus sign string
 04A7  0000				       DW   0			     ;AN000;segment of minus sign string
 04A9  0000				       DW   0			     ;AN000;length of plus sign string
 04AB  0000				       DW   0			     ;AN000;offset of plus sign string
 04AD  0000				       DW   0			     ;AN000;segment of plus sign string
 04AF  27 2C 30 2D 39 2C	WR_GRAPHIC_CHAR  DB   "'",',0-9,,a-z,,A-Z,\ !"#%()*+-.;@`[]_{}~/,,,' ;AN000;
       2C 61 2D 7A 2C 2C	
       41 2D 5A 2C 5C 20	
       21 22 23 25 28 29	
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-20
input.asm			   ;AN000;                                      

       2A 2B 2D 2E 3B 40	
       60 5B 5D 5F 7B 7D	
       7E 2F 2C 2C 2C		
 = 0029				WR_GRAPHIC_CHAR_LEN  EQU ($-WR_GRAPHIC_CHAR)		 ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 11  STR_XMAEM
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 04D8  E008			WR_ICB11       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 04DA  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 04DC  03B8				       DW   ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS  ;AN000;option word three
 04DE  0000				       DW   0			     ;AN000;option word four
 04E0  0008				       DW   8			  ;AN000;**;upper left corner field row
 04E2  0024				       DW   36			  ;AN000;**;upper left corner field column
 04E4  0028				       DW   40			  ;AN000;**;number of chars before wrapping
 04E6  0001				       DW   1			     ;AN000;color index number assigned
 04E8  0000				       DW   0			     ;AN000;default change/minus status
 04EA  0001				       DW   1			  ;AN000;**;cursor character pos in field
 04EC  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 04EE  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 04F0  0000				       DW   0			     ;AN000;ASCII code of the key returned
 04F2  0000				       DW   0			     ;AN000;length of data entered into fld
 04F4  0000				       DW   0			  ;AN000;**;length of input field
 04F6  0000				       DW   0			  ;AN000;??;offset of input field
 04F8  0000				       DW   0			  ;AN000;??;segment of input field
 04FA  0000				       DW   0			     ;AN000;offset of color attribute buffer
 04FC  0000				       DW   0			     ;AN000;segment of color attr buffer
 04FE  0000				       DW   0			     ;AN000;length of field's default value
 0500  0000				       DW   0			     ;AN000;offset field's default value
 0502  0000				       DW   0			     ;AN000;segment field's default value
 0504  0000				       DW   0			     ;AN000;length of return string
 0506  0000				       DW   0			     ;AN000;offset of return string
 0508  0000				       DW   0			     ;AN000;segment of return string
 050A  0005				       DW   WR_ALLOW_CHAR_LEN	     ;AN000;length of allow chars
 050C  0CE1 R				       DW   WR_ALLOW_CHAR	     ;AN000;offset of allow chars
 050E  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0510  0000				       DW   0			     ;AN000;length of skip chars
 0512  0000				       DW   0			     ;AN000;offset of skip chars
 0514  0000				       DW   0			     ;AN000;segment of skip chars
 0516  0000				       DW   0			     ;AN000;length of allow once chars
 0518  0000				       DW   0			     ;AN000;offset of allow once chars
 051A  0000				       DW   0			     ;AN000;segment of allow once chars
 051C  0002				       DW   2			     ;AN000;precision of decimal point
 051E  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0520  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0522  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0524  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0526  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0528  0000				       DW   0			     ;AN000;beginning col of minus & plus
 052A  0000				       DW   0			     ;AN000;length of minus sign string
 052C  0000				       DW   0			     ;AN000;offset of minus sign string
 052E  0000				       DW   0			     ;AN000;segment of minus sign string
 0530  0000				       DW   0			     ;AN000;length of plus sign string
 0532  0000				       DW   0			     ;AN000;offset of plus sign string
 0534  0000				       DW   0			     ;AN000;segment of plus sign string
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-21
input.asm			   ;AN000;                                      

				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 12  STR_XMA2EMS
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0536  E008			WR_ICB12       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 0538  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 053A  03B8				       DW   ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS  ;AN000;option word three
 053C  0000				       DW   0			     ;AN000;option word four
 053E  000B				       DW   11			  ;AN000;**;upper left corner field row
 0540  0024				       DW   36			  ;AN000;**;upper left corner field column
 0542  0028				       DW   40			  ;AN000;**;number of chars before wrapping
 0544  0001				       DW   1			     ;AN000;color index number assigned
 0546  0000				       DW   0			     ;AN000;default change/minus status
 0548  0001				       DW   1			  ;AN000;**;cursor character pos in field
 054A  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 054C  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 054E  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0550  0000				       DW   0			     ;AN000;length of data entered into fld
 0552  0000				       DW   0			  ;AN000;**;length of input field
 0554  0000				       DW   0			  ;AN000;??;offset of input field
 0556  0000				       DW   0			  ;AN000;??;segment of input field
 0558  0000				       DW   0			     ;AN000;offset of color attribute buffer
 055A  0000				       DW   0			     ;AN000;segment of color attr buffer
 055C  0000				       DW   0			     ;AN000;length of field's default value
 055E  0000				       DW   0			     ;AN000;offset field's default value
 0560  0000				       DW   0			     ;AN000;segment field's default value
 0562  0000				       DW   0			     ;AN000;length of return string
 0564  0000				       DW   0			     ;AN000;offset of return string
 0566  0000				       DW   0			     ;AN000;segment of return string
 0568  0005				       DW   WR_ALLOW_CHAR_LEN	     ;AN000;length of allow chars
 056A  0CE1 R				       DW   WR_ALLOW_CHAR	     ;AN000;offset of allow chars
 056C  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 056E  0000				       DW   0			     ;AN000;length of skip chars
 0570  0000				       DW   0			     ;AN000;offset of skip chars
 0572  0000				       DW   0			     ;AN000;segment of skip chars
 0574  0000				       DW   0			     ;AN000;length of allow once chars
 0576  0000				       DW   0			     ;AN000;offset of allow once chars
 0578  0000				       DW   0			     ;AN000;segment of allow once chars
 057A  0002				       DW   2			     ;AN000;precision of decimal point
 057C  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 057E  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0580  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0582  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0584  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0586  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0588  0000				       DW   0			     ;AN000;length of minus sign string
 058A  0000				       DW   0			     ;AN000;offset of minus sign string
 058C  0000				       DW   0			     ;AN000;segment of minus sign string
 058E  0000				       DW   0			     ;AN000;length of plus sign string
 0590  0000				       DW   0			     ;AN000;offset of plus sign string
 0592  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 13  STR_VDISK
				;
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-22
input.asm			   ;AN000;                                      

				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0594  E008			WR_ICB13       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 0596  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0598  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
 059A  0000				       DW   0			     ;AN000;option word four
 059C  0008				       DW   8			  ;AN000;**;upper left corner field row
 059E  0024				       DW   36			  ;AN000;**;upper left corner field column
 05A0  0028				       DW   40			  ;AN000;**;number of chars before wrapping
 05A2  0001				       DW   1			     ;AN000;color index number assigned
 05A4  0000				       DW   0			     ;AN000;default change/minus status
 05A6  0001				       DW   1			  ;AN000;**;cursor character pos in field
 05A8  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 05AA  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 05AC  0000				       DW   0			     ;AN000;ASCII code of the key returned
 05AE  0000				       DW   0			     ;AN000;length of data entered into fld
 05B0  0028				       DW   40			     ;AC069;SEH  ;AN000;**;length of input field
 05B2  0000				       DW   0			  ;AN000;??;offset of input field
 05B4  0000				       DW   0			  ;AN000;??;segment of input field
 05B6  0000				       DW   0			     ;AN000;offset of color attribute buffer
 05B8  0000				       DW   0			     ;AN000;segment of color attr buffer
 05BA  0000				       DW   0			     ;AN000;length of field's default value
 05BC  0000				       DW   0			     ;AN000;offset field's default value
 05BE  0000				       DW   0			     ;AN000;segment field's default value
 05C0  0000				       DW   0			     ;AN000;length of return string
 05C2  0000				       DW   0			     ;AN000;offset of return string
 05C4  0000				       DW   0			     ;AN000;segment of return string
 05C6  0005				       DW   WR_ALLOW_CHAR_LEN	     ;AN000;length of allow chars
 05C8  0CE1 R				       DW   WR_ALLOW_CHAR	     ;AN000;offset of allow chars
 05CA  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 05CC  0000				       DW   0			     ;AN000;length of skip chars
 05CE  0000				       DW   0			     ;AN000;offset of skip chars
 05D0  0000				       DW   0			     ;AN000;segment of skip chars
 05D2  0000				       DW   0			     ;AN000;length of allow once chars
 05D4  0000				       DW   0			     ;AN000;offset of allow once chars
 05D6  0000				       DW   0			     ;AN000;segment of allow once chars
 05D8  0002				       DW   2			     ;AN000;precision of decimal point
 05DA  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 05DC  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 05DE  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 05E0  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 05E2  0000				       DW   0			     ;AN000;beginning row of minus and plus
 05E4  0000				       DW   0			     ;AN000;beginning col of minus & plus
 05E6  0000				       DW   0			     ;AN000;length of minus sign string
 05E8  0000				       DW   0			     ;AN000;offset of minus sign string
 05EA  0000				       DW   0			     ;AN000;segment of minus sign string
 05EC  0000				       DW   0			     ;AN000;length of plus sign string
 05EE  0000				       DW   0			     ;AN000;offset of plus sign string
 05F0  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 14  STR_BREAK
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 05F2  E008			WR_ICB14       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;;AN000;;+ICB_CLR  ;option word one
 05F4  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 05F6  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-23
input.asm			   ;AN000;                                      

 05F8  0000				       DW   0			     ;AN000;option word four
 05FA  0008				       DW   8			     ;AN000;**;upper left corner field row
 05FC  001A				       DW   26			     ;AN000;**;upper left corner field column
 05FE  0003				       DW   3			     ;AN000;**;number of chars before wrapping
 0600  0001				       DW   1			     ;AN000;color index number assigned
 0602  0000				       DW   0			     ;AN000;default change/minus status
 0604  0001				       DW   1			     ;AN000;**;cursor character pos in field
 0606  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 0608  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 060A  0000				       DW   0			     ;AN000;ASCII code of the key returned
 060C  0000				       DW   0			     ;AN000;length of data entered into fld
 060E  0003				       DW   3			     ;AC069;SEH ;AN000;**;length of input field
 0610  0000				       DW   0			     ;AN000;??;offset of input field
 0612  0000				       DW   0			  ;AN000;??;segment of input field
 0614  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0616  0000				       DW   0			     ;AN000;segment of color attr buffer
 0618  0000				       DW   0			     ;AN000;length of field's default value
 061A  0000				       DW   0			     ;AN000;offset field's default value
 061C  0000				       DW   0			     ;AN000;segment field's default value
 061E  0000				       DW   0			     ;AN000;length of return string
 0620  0000				       DW   0			     ;AN000;offset of return string
 0622  0000				       DW   0			     ;AN000;segment of return string
 0624  0007				       DW   WR_ON_OFF_CHAR_LEN	      ;AN000;length of allow chars
 0626  0650 R				       DW   WR_ON_OFF_CHAR	      ;AN000;offset of allow chars
 0628  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 062A  0000				       DW   0			     ;AN000;length of skip chars
 062C  0000				       DW   0			     ;AN000;offset of skip chars
 062E  0000				       DW   0			     ;AN000;segment of skip chars
 0630  0000				       DW   0			     ;AN000;length of allow once chars
 0632  0000				       DW   0			     ;AN000;offset of allow once chars
 0634  0000				       DW   0			     ;AN000;segment of allow once chars
 0636  0002				       DW   2			     ;AN000;precision of decimal point
 0638  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 063A  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 063C  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 063E  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0640  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0642  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0644  0000				       DW   0			     ;AN000;length of minus sign string
 0646  0000				       DW   0			     ;AN000;offset of minus sign string
 0648  0000				       DW   0			     ;AN000;segment of minus sign string
 064A  0000				       DW   0			     ;AN000;length of plus sign string
 064C  0000				       DW   0			     ;AN000;offset of plus sign string
 064E  0000				       DW   0			     ;AN000;segment of plus sign string
 0650  20 4F 46 4E 6F 66	WR_ON_OFF_CHAR	DB   ' OFNofn'               ;AN000;
       6E			
 = 0007				WR_ON_OFF_CHAR_LEN  EQU ($-WR_ON_OFF_CHAR)   ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 15  STR_BUFFERS
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0657  E008			WR_ICB15       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 0659  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 065B  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
 065D  0000				       DW   0			     ;AN000;option word four
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-24
input.asm			   ;AN000;                                      

 065F  0009				       DW   9			     ;AN000;**;upper left corner field row
 0661  001A				       DW   26			     ;AN000;**;upper left corner field column
 0663  0007				       DW   7			     ;AN000;**;number of chars before wrapping
 0665  0001				       DW   1			     ;AN000;color index number assigned
 0667  0000				       DW   0			     ;AN000;default change/minus status
 0669  0001				       DW   1			     ;AN000;**;cursor character pos in field
 066B  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 066D  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 066F  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0671  0000				       DW   0			     ;AN000;length of data entered into fld
 0673  0007				       DW   7			     ;AC069;SEH ;AN000;**;length of input field
 0675  0000				       DW   0			     ;AN000;??;offset of input field
 0677  0000				       DW   0			     ;AN000;??;segment of input field
 0679  0000				       DW   0			     ;AN000;offset of color attribute buffer
 067B  0000				       DW   0			     ;AN000;segment of color attr buffer
 067D  0000				       DW   0			     ;AN000;length of field's default value
 067F  0000				       DW   0			     ;AN000;offset field's default value
 0681  0000				       DW   0			     ;AN000;segment field's default value
 0683  0000				       DW   0			     ;AN000;length of return string
 0685  0000				       DW   0			     ;AN000;offset of return string
 0687  0000				       DW   0			     ;AN000;segment of return string
 0689  0009				       DW   WR_BUFFERS_LEN	     ;AN000;length of allow chars
 068B  06B5 R				       DW   WR_BUFFERS		     ;AN000;offset of allow chars
 068D  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 068F  0000				       DW   0			     ;AN000;length of skip chars
 0691  0000				       DW   0			     ;AN000;offset of skip chars
 0693  0000				       DW   0			     ;AN000;segment of skip chars
 0695  0000				       DW   0			     ;AN000;length of allow once chars
 0697  0000				       DW   0			     ;AN000;offset of allow once chars
 0699  0000				       DW   0			     ;AN000;segment of allow once chars
 069B  0002				       DW   2			     ;AN000;precision of decimal point
 069D  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 069F  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 06A1  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 06A3  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 06A5  0000				       DW   0			     ;AN000;beginning row of minus and plus
 06A7  0000				       DW   0			     ;AN000;beginning col of minus & plus
 06A9  0000				       DW   0			     ;AN000;length of minus sign string
 06AB  0000				       DW   0			     ;AN000;offset of minus sign string
 06AD  0000				       DW   0			     ;AN000;segment of minus sign string
 06AF  0000				       DW   0			     ;AN000;length of plus sign string
 06B1  0000				       DW   0			     ;AN000;offset of plus sign string
 06B3  0000				       DW   0			     ;AN000;segment of plus sign string
									     ;
 06B5  20 2C 30 2D 39 2C	WR_BUFFERS     DB   ' ,0-9,,,,'              ;AN000;
       2C 2C 2C			
 = 0009				WR_BUFFERS_LEN EQU  $-WR_BUFFERS	     ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 16  STR_DOS_APPEND_P   formerly STR_CPSW	   ;AC000;JW
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 06BE  E008			WR_ICB16       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 06C0  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 06C2  03B8				       DW   ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS  ;AN000;option word three
 06C4  0000				       DW   0			     ;AN000;option word four
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-25
input.asm			   ;AN000;                                      

 06C6  000B				       DW   11			  ;AN000;**;upper left corner field row
 06C8  001E				       DW   30			  ;AN000;**;upper left corner field column
 06CA  0028				       DW   40			  ;AN000;**;number of chars before wrapping
 06CC  0001				       DW   1			     ;AN000;color index number assigned
 06CE  0000				       DW   0			     ;AN000;default change/minus status
 06D0  0001				       DW   1			  ;AN000;**;cursor character pos in field
 06D2  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 06D4  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 06D6  0000				       DW   0			     ;AN000;ASCII code of the key returned
 06D8  0000				       DW   0			     ;AN000;length of data entered into fld
 06DA  0000				       DW   0			  ;AN000;**;length of input field
 06DC  0000				       DW   0			  ;AN000;??;offset of input field
 06DE  0000				       DW   0			  ;AN000;??;segment of input field
 06E0  0000				       DW   0			     ;AN000;offset of color attribute buffer
 06E2  0000				       DW   0			     ;AN000;segment of color attr buffer
 06E4  0000				       DW   0			     ;AN000;length of field's default value
 06E6  0000				       DW   0			     ;AN000;offset field's default value
 06E8  0000				       DW   0			     ;AN000;segment field's default value
 06EA  0000				       DW   0			     ;AN000;length of return string
 06EC  0000				       DW   0			     ;AN000;offset of return string
 06EE  0000				       DW   0			     ;AN000;segment of return string
 06F0  0005				       DW   WR_ALLOW_CHAR_LEN	     ;AN000;length of allow chars
 06F2  0CE1 R				       DW   WR_ALLOW_CHAR	     ;AN000;offset of allow chars
 06F4  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 06F6  0000				       DW   0			     ;AN000;length of skip chars
 06F8  0000				       DW   0			     ;AN000;offset of skip chars
 06FA  0000				       DW   0			     ;AN000;segment of skip chars
 06FC  0000				       DW   0			     ;AN000;length of allow once chars
 06FE  0000				       DW   0			     ;AN000;offset of allow once chars
 0700  0000				       DW   0			     ;AN000;segment of allow once chars
 0702  0002				       DW   2			     ;AN000;precision of decimal point
 0704  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0706  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0708  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 070A  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 070C  0000				       DW   0			     ;AN000;beginning row of minus and plus
 070E  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0710  0000				       DW   0			     ;AN000;length of minus sign string
 0712  0000				       DW   0			     ;AN000;offset of minus sign string
 0714  0000				       DW   0			     ;AN000;segment of minus sign string
 0716  0000				       DW   0			     ;AN000;length of plus sign string
 0718  0000				       DW   0			     ;AN000;offset of plus sign string
 071A  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 17  STR_FCBS
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 071C  E008			WR_ICB17       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 071E  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0720  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
 0722  0000				       DW   0			     ;AN000;option word four
 0724  000A				       DW   10	;AC000;JW	     ;**;upper left corner field row
 0726  001A				       DW   26			     ;AN000;**;upper left corner field column
 0728  0007				       DW   7			     ;AN000;**;number of chars before wrapping
 072A  0001				       DW   1			     ;AN000;color index number assigned
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-26
input.asm			   ;AN000;                                      

 072C  0000				       DW   0			     ;AN000;default change/minus status
 072E  0001				       DW   1			     ;AN000;**;cursor character pos in field
 0730  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 0732  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0734  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0736  0000				       DW   0			     ;AN000;length of data entered into fld
 0738  0007				       DW   7			     ;AC069;SEH ;AN000;**;length of input field
 073A  0000				       DW   0			  ;AN000;??;offset of input field
 073C  0000				       DW   0			  ;AN000;??;segment of input field
 073E  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0740  0000				       DW   0			     ;AN000;segment of color attr buffer
 0742  0000				       DW   0			     ;AN000;length of field's default value
 0744  0000				       DW   0			     ;AN000;offset field's default value
 0746  0000				       DW   0			     ;AN000;segment field's default value
 0748  0000				       DW   0			     ;AN000;length of return string
 074A  0000				       DW   0			     ;AN000;offset of return string
 074C  0000				       DW   0			     ;AN000;segment of return string
 074E  0009				       DW   WR_FCBS_LEN 	    ;AN000;length of allow chars
 0750  077A R				       DW   WR_FCBS		    ;AN000;offset of allow chars
 0752  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0754  0000				       DW   0			     ;AN000;length of skip chars
 0756  0000				       DW   0			     ;AN000;offset of skip chars
 0758  0000				       DW   0			     ;AN000;segment of skip chars
 075A  0000				       DW   0			     ;AN000;length of allow once chars
 075C  0000				       DW   0			     ;AN000;offset of allow once chars
 075E  0000				       DW   0			     ;AN000;segment of allow once chars
 0760  0002				       DW   2			     ;AN000;precision of decimal point
 0762  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0764  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0766  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0768  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 076A  0000				       DW   0			     ;AN000;beginning row of minus and plus
 076C  0000				       DW   0			     ;AN000;beginning col of minus & plus
 076E  0000				       DW   0			     ;AN000;length of minus sign string
 0770  0000				       DW   0			     ;AN000;offset of minus sign string
 0772  0000				       DW   0			     ;AN000;segment of minus sign string
 0774  0000				       DW   0			     ;AN000;length of plus sign string
 0776  0000				       DW   0			     ;AN000;offset of plus sign string
 0778  0000				       DW   0			     ;AN000;segment of plus sign string
									     ;
 077A  20 2C 30 2D 39 2C	WR_FCBS        DB   ' ,0-9,,,,'              ;AN000;
       2C 2C 2C			
 = 0009				WR_FCBS_LEN    EQU  ($-WR_FCBS) 	     ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 18  STR_FILES
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0783  E008			WR_ICB18       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 0785  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0787  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
 0789  0000				       DW   0			     ;AN000;option word four
 078B  000B				       DW   11	 ;AC000;JW	     ;**;upper left corner field row
 078D  001A				       DW   26			     ;AN000;**;upper left corner field column
 078F  0003				       DW   3			     ;AN000;**;number of chars before wrapping
 0791  0001				       DW   1			     ;AN000;color index number assigned
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-27
input.asm			   ;AN000;                                      

 0793  0000				       DW   0			     ;AN000;default change/minus status
 0795  0001				       DW   1			     ;AN000;**;cursor character pos in field
 0797  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 0799  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 079B  0000				       DW   0			     ;AN000;ASCII code of the key returned
 079D  0000				       DW   0			     ;AN000;length of data entered into fld
 079F  0003				       DW   3			     ;AC069;SEH ;AN000;**;length of input field
 07A1  0000				       DW   0			     ;AN000;??;offset of input field
 07A3  0000				       DW   0			     ;AN000;??;segment of input field
 07A5  0000				       DW   0			     ;AN000;offset of color attribute buffer
 07A7  0000				       DW   0			     ;AN000;segment of color attr buffer
 07A9  0000				       DW   0			     ;AN000;length of field's default value
 07AB  0000				       DW   0			     ;AN000;offset field's default value
 07AD  0000				       DW   0			     ;AN000;segment field's default value
 07AF  0000				       DW   0			     ;AN000;length of return string
 07B1  0000				       DW   0			     ;AN000;offset of return string
 07B3  0000				       DW   0			     ;AN000;segment of return string
 07B5  0009				       DW   WR_BUFFERS_LEN	    ;AN000;length of allow chars
 07B7  06B5 R				       DW   WR_BUFFERS		    ;AN000;offset of allow chars
 07B9  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 07BB  0000				       DW   0			     ;AN000;length of skip chars
 07BD  0000				       DW   0			     ;AN000;offset of skip chars
 07BF  0000				       DW   0			     ;AN000;segment of skip chars
 07C1  0000				       DW   0			     ;AN000;length of allow once chars
 07C3  0000				       DW   0			     ;AN000;offset of allow once chars
 07C5  0000				       DW   0			     ;AN000;segment of allow once chars
 07C7  0002				       DW   2			     ;AN000;precision of decimal point
 07C9  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 07CB  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 07CD  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 07CF  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 07D1  0000				       DW   0			     ;AN000;beginning row of minus and plus
 07D3  0000				       DW   0			     ;AN000;beginning col of minus & plus
 07D5  0000				       DW   0			     ;AN000;length of minus sign string
 07D7  0000				       DW   0			     ;AN000;offset of minus sign string
 07D9  0000				       DW   0			     ;AN000;segment of minus sign string
 07DB  0000				       DW   0			     ;AN000;length of plus sign string
 07DD  0000				       DW   0			     ;AN000;offset of plus sign string
 07DF  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 19  STR_LASTDRIVE
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 07E1  E008			WR_ICB19       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 07E3  0182				       DW   ICB_DEL+ICB_UPC+ICB_CSW  ;AN000;option word two
 07E5  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
 07E7  0000				       DW   0			     ;AN000;option word four
 07E9  000C				       DW   12 ;AC000;JW	     ;**;upper left corner field row
 07EB  001A				       DW   26			     ;AN000;**;upper left corner field column
 07ED  0001				       DW   1			     ;AN000;**;number of chars before wrapping
 07EF  0001				       DW   1			     ;AN000;color index number assigned
 07F1  0000				       DW   0			     ;AN000;default change/minus status
 07F3  0001				       DW   1			     ;AN000;**;cursor character pos in field
 07F5  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 07F7  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-28
input.asm			   ;AN000;                                      

 07F9  0000				       DW   0			     ;AN000;ASCII code of the key returned
 07FB  0000				       DW   0			     ;AN000;length of data entered into fld
 07FD  0001				       DW   1			     ;AC069;SEH ;AN000;**;length of input field
 07FF  0000				       DW   0			     ;AN000;??;offset of input field
 0801  0000				       DW   0			     ;AN000;??;segment of input field
 0803  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0805  0000				       DW   0			     ;AN000;segment of color attr buffer
 0807  0000				       DW   0			     ;AN000;length of field's default value
 0809  0000				       DW   0			     ;AN000;offset field's default value
 080B  0000				       DW   0			     ;AN000;segment field's default value
 080D  0000				       DW   0			     ;AN000;length of return string
 080F  0000				       DW   0			     ;AN000;offset of return string
 0811  0000				       DW   0			     ;AN000;segment of return string
 0813  000B				       DW   WR_ASCII_CHAR_LEN	     ;AN000;length of allow chars
 0815  083F R				       DW   WR_ASCII_CHAR	     ;AN000;offset of allow chars
 0817  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0819  0000				       DW   0			     ;AN000;length of skip chars
 081B  0000				       DW   0			     ;AN000;offset of skip chars
 081D  0000				       DW   0			     ;AN000;segment of skip chars
 081F  0000				       DW   0			     ;AN000;length of allow once chars
 0821  0000				       DW   0			     ;AN000;offset of allow once chars
 0823  0000				       DW   0			     ;AN000;segment of allow once chars
 0825  0002				       DW   2			     ;AN000;precision of decimal point
 0827  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0829  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 082B  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 082D  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 082F  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0831  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0833  0000				       DW   0			     ;AN000;length of minus sign string
 0835  0000				       DW   0			     ;AN000;offset of minus sign string
 0837  0000				       DW   0			     ;AN000;segment of minus sign string
 0839  0000				       DW   0			     ;AN000;length of plus sign string
 083B  0000				       DW   0			     ;AN000;offset of plus sign string
 083D  0000				       DW   0			     ;AN000;segment of plus sign string
 083F  20 2C 61 2D 7A 2C	WR_ASCII_CHAR  DB   ' ,a-z,,A-Z,'            ;AN000;
       2C 41 2D 5A 2C		
 = 000B				WR_ASCII_CHAR_LEN  EQU ($-WR_ASCII_CHAR)     ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 20  STR_STACKS
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 084A  E008			WR_ICB20       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 084C  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 084E  0008				       DW   ICB_HOR		    ;AC069;SEH ;AN000;option word three
 0850  0000				       DW   0			     ;AN000;option word four
 0852  000D				       DW   13	 ;AC000;JW	     ;**;upper left corner field row
 0854  001A				       DW   26			     ;AN000;**;upper left corner field column
 0856  0006				       DW   6			     ;AN000;**;number of chars before wrapping
 0858  0001				       DW   1			     ;AN000;color index number assigned
 085A  0000				       DW   0			     ;AN000;default change/minus status
 085C  0001				       DW   1			     ;AN000;**;cursor character pos in field
 085E  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 0860  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0862  0000				       DW   0			     ;AN000;ASCII code of the key returned
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-29
input.asm			   ;AN000;                                      

 0864  0000				       DW   0			     ;AN000;length of data entered into fld
 0866  0006				       DW   6			     ;AC069;SEH ;AN000;**;length of input field
 0868  0000				       DW   0			     ;AN000;??;offset of input field
 086A  0000				       DW   0			     ;AN000;??;segment of input field
 086C  0000				       DW   0			     ;AN000;offset of color attribute buffer
 086E  0000				       DW   0			     ;AN000;segment of color attr buffer
 0870  0000				       DW   0			     ;AN000;length of field's default value
 0872  0000				       DW   0			     ;AN000;offset field's default value
 0874  0000				       DW   0			     ;AN000;segment field's default value
 0876  0000				       DW   0			     ;AN000;length of return string
 0878  0000				       DW   0			     ;AN000;offset of return string
 087A  0000				       DW   0			     ;AN000;segment of return string
 087C  0009				       DW   WR_FCBS_LEN 	    ;AN000;length of allow chars
 087E  077A R				       DW   WR_FCBS		    ;AN000;offset of allow chars
 0880  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0882  0000				       DW   0			     ;AN000;length of skip chars
 0884  0000				       DW   0			     ;AN000;offset of skip chars
 0886  0000				       DW   0			     ;AN000;segment of skip chars
 0888  0000				       DW   0			     ;AN000;length of allow once chars
 088A  0000				       DW   0			     ;AN000;offset of allow once chars
 088C  0000				       DW   0			     ;AN000;segment of allow once chars
 088E  0002				       DW   2			     ;AN000;precision of decimal point
 0890  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0892  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0894  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0896  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0898  0000				       DW   0			     ;AN000;beginning row of minus and plus
 089A  0000				       DW   0			     ;AN000;beginning col of minus & plus
 089C  0000				       DW   0			     ;AN000;length of minus sign string
 089E  0000				       DW   0			     ;AN000;offset of minus sign string
 08A0  0000				       DW   0			     ;AN000;segment of minus sign string
 08A2  0000				       DW   0			     ;AN000;length of plus sign string
 08A4  0000				       DW   0			     ;AN000;offset of plus sign string
 08A6  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 21  STR_VERIFY
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 08A8  E008			WR_ICB21       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS   ;;AN000;+ICB_CLR	;option word one
 08AA  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 08AC  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
 08AE  0000				       DW   0			     ;AN000;option word four
 08B0  000E				       DW   14	;AC000;JW	     ;**;upper left corner field row
 08B2  001A				       DW   26			     ;AN000;**;upper left corner field column
 08B4  0003				       DW   3			     ;AN000;**;number of chars before wrapping
 08B6  0001				       DW   1			     ;AN000;color index number assigned
 08B8  0000				       DW   0			     ;AN000;default change/minus status
 08BA  0001				       DW   1			     ;AN000;**;cursor character pos in field
 08BC  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 08BE  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 08C0  0000				       DW   0			     ;AN000;ASCII code of the key returned
 08C2  0000				       DW   0			     ;AN000;length of data entered into fld
 08C4  0003				       DW   3			     ;AC069;SEH ;AN000;**;length of input field
 08C6  0000				       DW   0			     ;AN000;??;offset of input field
 08C8  0000				       DW   0			     ;AN000;??;segment of input field
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-30
input.asm			   ;AN000;                                      

 08CA  0000				       DW   0			     ;AN000;offset of color attribute buffer
 08CC  0000				       DW   0			     ;AN000;segment of color attr buffer
 08CE  0000				       DW   0			     ;AN000;length of field's default value
 08D0  0000				       DW   0			     ;AN000;offset field's default value
 08D2  0000				       DW   0			     ;AN000;segment field's default value
 08D4  0000				       DW   0			     ;AN000;length of return string
 08D6  0000				       DW   0			     ;AN000;offset of return string
 08D8  0000				       DW   0			     ;AN000;segment of return string
 08DA  0007				       DW   WR_ON_OFF_CHAR_LEN	      ;AN000;length of allow chars
 08DC  0650 R				       DW   WR_ON_OFF_CHAR	      ;AN000;offset of allow chars
 08DE  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 08E0  0000				       DW   0			     ;AN000;length of skip chars
 08E2  0000				       DW   0			     ;AN000;offset of skip chars
 08E4  0000				       DW   0			     ;AN000;segment of skip chars
 08E6  0000				       DW   0			     ;AN000;length of allow once chars
 08E8  0000				       DW   0			     ;AN000;offset of allow once chars
 08EA  0000				       DW   0			     ;AN000;segment of allow once chars
 08EC  0002				       DW   2			     ;AN000;precision of decimal point
 08EE  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 08F0  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 08F2  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 08F4  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 08F6  0000				       DW   0			     ;AN000;beginning row of minus and plus
 08F8  0000				       DW   0			     ;AN000;beginning col of minus & plus
 08FA  0000				       DW   0			     ;AN000;length of minus sign string
 08FC  0000				       DW   0			     ;AN000;offset of minus sign string
 08FE  0000				       DW   0			     ;AN000;segment of minus sign string
 0900  0000				       DW   0			     ;AN000;length of plus sign string
 0902  0000				       DW   0			     ;AN000;offset of plus sign string
 0904  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 22  NUM_PRINTER
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0906  E008			WR_ICB22       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 0908  0082				       DW   ICB_DEL+ICB_CSW	     ;AN000;option word two
 090A  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
 090C  0000				       DW   0			     ;AN000;option word four
 090E  0006				       DW   6			     ;AN000;**;upper left corner field row
 0910  0032				       DW   50			     ;AN000;**;upper left corner field column
 0912  0001				       DW   1			     ;AN000;**;number of chars before wrapping
 0914  0001				       DW   1			     ;AN000;color index number assigned
 0916  0000				       DW   0			     ;AN000;default change/minus status
 0918  0001				       DW   1			     ;AN000;**;cursor character pos in field
 091A  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 091C  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 091E  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0920  0000				       DW   0			     ;AN000;length of data entered into fld
 0922  0001				       DW   1			     ;AC069;SEH ;AN000;**;length of input field
 0924  0000				       DW   0			     ;AN000;??;offset of input field
 0926  0000				       DW   0			     ;AN000;??;segment of input field
 0928  0000				       DW   0			     ;AN000;offset of color attribute buffer
 092A  0000				       DW   0			     ;AN000;segment of color attr buffer
 092C  0000				       DW   0			     ;AN000;length of field's default value
 092E  0000				       DW   0			     ;AN000;offset field's default value
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-31
input.asm			   ;AN000;                                      

 0930  0000				       DW   0			     ;AN000;segment field's default value
 0932  0000				       DW   0			     ;AN000;length of return string
 0934  0000				       DW   0			     ;AN000;offset of return string
 0936  0000				       DW   0			     ;AN000;segment of return string
 0938  0006				       DW   WR_NUM_PTR_LEN	     ;AN000;length of allow chars
 093A  0964 R				       DW   WR_NUM_PTR		     ;AN000;offset of allow chars
 093C  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 093E  0000				       DW   0			     ;AN000;length of skip chars
 0940  0000				       DW   0			     ;AN000;offset of skip chars
 0942  0000				       DW   0			     ;AN000;segment of skip chars
 0944  0000				       DW   0			     ;AN000;length of allow once chars
 0946  0000				       DW   0			     ;AN000;offset of allow once chars
 0948  0000				       DW   0			     ;AN000;segment of allow once chars
 094A  0002				       DW   2			     ;AN000;precision of decimal point
 094C  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 094E  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0950  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0952  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0954  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0956  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0958  0000				       DW   0			     ;AN000;length of minus sign string
 095A  0000				       DW   0			     ;AN000;offset of minus sign string
 095C  0000				       DW   0			     ;AN000;segment of minus sign string
 095E  0000				       DW   0			     ;AN000;length of plus sign string
 0960  0000				       DW   0			     ;AN000;offset of plus sign string
 0962  0000				       DW   0			     ;AN000;segment of plus sign string
									     ;
 0964  20 2C 30 2D 37 2C	WR_NUM_PTR     DB   ' ,0-7,'                 ;AN000;
 = 0006				WR_NUM_PTR_LEN EQU ($-WR_NUM_PTR)	     ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 23  NUM_EXT_DISK
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 096A  E008			WR_ICB23       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
 096C  0082				       DW   ICB_DEL+ICB_CSW	     ;AN000;option word two
 096E  0000				       DW   0			     ;AN000;option word three
 0970  0000				       DW   0			     ;AN000;option word four
 0972  0005				       DW   5			  ;AN000;**;upper left corner field row
 0974  0037				       DW   55			  ;AN000;**;upper left corner field column
 0976  0001				       DW   1			  ;AN000;**;number of chars before wrapping
 0978  0001				       DW   1			     ;AN000;color index number assigned
 097A  0000				       DW   0			     ;AN000;default change/minus status
 097C  0001				       DW   1			  ;AN000;**;cursor character pos in field
 097E  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 0980  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0982  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0984  0000				       DW   0			     ;AN000;length of data entered into fld
 0986  0000				       DW   0			  ;AN000;**;length of input field
 0988  0000				       DW   0			  ;AN000;??;offset of input field
 098A  0000				       DW   0			  ;AN000;??;segment of input field
 098C  0000				       DW   0			     ;AN000;offset of color attribute buffer
 098E  0000				       DW   0			     ;AN000;segment of color attr buffer
 0990  0000				       DW   0			     ;AN000;length of field's default value
 0992  0000				       DW   0			     ;AN000;offset field's default value
 0994  0000				       DW   0			     ;AN000;segment field's default value
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-32
input.asm			   ;AN000;                                      

 0996  0000				       DW   0			     ;AN000;length of return string
 0998  0000				       DW   0			     ;AN000;offset of return string
 099A  0000				       DW   0			     ;AN000;segment of return string
 099C  0004				       DW   WR_NUM_EXT_LEN	     ;AN000;length of allow chars
 099E  09C8 R				       DW   WR_NUM_EXT		     ;AN000;offset of allow chars
 09A0  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 09A2  0000				       DW   0			     ;AN000;length of skip chars
 09A4  0000				       DW   0			     ;AN000;offset of skip chars
 09A6  0000				       DW   0			     ;AN000;segment of skip chars
 09A8  0000				       DW   0			     ;AN000;length of allow once chars
 09AA  0000				       DW   0			     ;AN000;offset of allow once chars
 09AC  0000				       DW   0			     ;AN000;segment of allow once chars
 09AE  0002				       DW   2			     ;AN000;precision of decimal point
 09B0  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 09B2  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 09B4  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 09B6  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 09B8  0000				       DW   0			     ;AN000;beginning row of minus and plus
 09BA  0000				       DW   0			     ;AN000;beginning col of minus & plus
 09BC  0000				       DW   0			     ;AN000;length of minus sign string
 09BE  0000				       DW   0			     ;AN000;offset of minus sign string
 09C0  0000				       DW   0			     ;AN000;segment of minus sign string
 09C2  0000				       DW   0			     ;AN000;length of plus sign string
 09C4  0000				       DW   0			     ;AN000;offset of plus sign string
 09C6  0000				       DW   0			     ;AN000;segment of plus sign string
									     ;
 09C8  20 30 31 32		WR_NUM_EXT     DB   ' 012'                   ;AN000;
 = 0004				WR_NUM_EXT_LEN EQU ($-WR_NUM_EXT)	     ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 24  NUM_YEAR
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 09CC  E008			WR_ICB24       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;;AN000; +ICB_CLR  ;option word one
 09CE  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 09D0  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
 09D2  0000				       DW   0			     ;AN000;option word four
 09D4  0006				       DW   6			     ;AN000;**;upper left corner field row
 09D6  0018				       DW   24			     ;AN000;**;upper left corner field column
 09D8  0004				       DW   4			     ;AN000;**;number of chars before wrapping
 09DA  0001				       DW   1			     ;AN000;color index number assigned
 09DC  0000				       DW   0			     ;AN000;default change/minus status
 09DE  0001				       DW   1			     ;AN000;**;cursor character pos in field
 09E0  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 09E2  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 09E4  0000				       DW   0			     ;AN000;ASCII code of the key returned
 09E6  0000				       DW   0			     ;AN000;length of data entered into fld
 09E8  0004				       DW   4			     ;AC069;SEH ;AN000;**;length of input field
 09EA  0000				       DW   0			     ;AN000;??;offset of input field
 09EC  0000				       DW   0			     ;AN000;??;segment of input field
 09EE  0000				       DW   0			     ;AN000;offset of color attribute buffer
 09F0  0000				       DW   0			     ;AN000;segment of color attr buffer
 09F2  0000				       DW   0			     ;AN000;length of field's default value
 09F4  0000				       DW   0			     ;AN000;offset field's default value
 09F6  0000				       DW   0			     ;AN000;segment field's default value
 09F8  0000				       DW   0			     ;AN000;length of return string
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-33
input.asm			   ;AN000;                                      

 09FA  0000				       DW   0			     ;AN000;offset of return string
 09FC  0000				       DW   0			     ;AN000;segment of return string
 09FE  0006				       DW   WR_ALLOW_NUM_LEN	     ;AN000;length of allow chars
 0A00  0CE6 R				       DW   WR_ALLOW_NUM	     ;AN000;offset of allow chars
 0A02  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0A04  0000				       DW   0			     ;AN000;length of skip chars
 0A06  0000				       DW   0			     ;AN000;offset of skip chars
 0A08  0000				       DW   0			     ;AN000;segment of skip chars
 0A0A  0000				       DW   0			     ;AN000;length of allow once chars
 0A0C  0000				       DW   0			     ;AN000;offset of allow once chars
 0A0E  0000				       DW   0			     ;AN000;segment of allow once chars
 0A10  0002				       DW   2			     ;AN000;precision of decimal point
 0A12  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0A14  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0A16  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0A18  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0A1A  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0A1C  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0A1E  0000				       DW   0			     ;AN000;length of minus sign string
 0A20  0000				       DW   0			     ;AN000;offset of minus sign string
 0A22  0000				       DW   0			     ;AN000;segment of minus sign string
 0A24  0000				       DW   0			     ;AN000;length of plus sign string
 0A26  0000				       DW   0			     ;AN000;offset of plus sign string
 0A28  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 25  NUM_MONTH
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0A2A  E008			WR_ICB25       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS  ;;AN000;+ICB_CLR  ;option word one
 0A2C  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0A2E  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
 0A30  0000				       DW   0			     ;AN000;option word four
 0A32  0008				       DW   8			     ;AN000;**;upper left corner field row
 0A34  0018				       DW   24			     ;AN000;**;upper left corner field column
 0A36  0002				       DW   2			     ;AN000;**;number of chars before wrapping
 0A38  0001				       DW   1			     ;AN000;color index number assigned
 0A3A  0000				       DW   0			     ;AN000;default change/minus status
 0A3C  0001				       DW   1			     ;AN000;**;cursor character pos in field
 0A3E  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 0A40  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0A42  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0A44  0000				       DW   0			     ;AN000;length of data entered into fld
 0A46  0002				       DW   2			     ;AC069;SEH ;AN000;**;length of input field
 0A48  0000				       DW   0			     ;AN000;??;offset of input field
 0A4A  0000				       DW   0			     ;AN000;??;segment of input field
 0A4C  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0A4E  0000				       DW   0			     ;AN000;segment of color attr buffer
 0A50  0000				       DW   0			     ;AN000;length of field's default value
 0A52  0000				       DW   0			     ;AN000;offset field's default value
 0A54  0000				       DW   0			     ;AN000;segment field's default value
 0A56  0000				       DW   0			     ;AN000;length of return string
 0A58  0000				       DW   0			     ;AN000;offset of return string
 0A5A  0000				       DW   0			     ;AN000;segment of return string
 0A5C  0006				       DW   WR_ALLOW_NUM_LEN	     ;AN000;length of allow chars
 0A5E  0CE6 R				       DW   WR_ALLOW_NUM	     ;AN000;offset of allow chars
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-34
input.asm			   ;AN000;                                      

 0A60  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0A62  0000				       DW   0			     ;AN000;length of skip chars
 0A64  0000				       DW   0			     ;AN000;offset of skip chars
 0A66  0000				       DW   0			     ;AN000;segment of skip chars
 0A68  0000				       DW   0			     ;AN000;length of allow once chars
 0A6A  0000				       DW   0			     ;AN000;offset of allow once chars
 0A6C  0000				       DW   0			     ;AN000;segment of allow once chars
 0A6E  0002				       DW   2			     ;AN000;precision of decimal point
 0A70  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0A72  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0A74  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0A76  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0A78  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0A7A  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0A7C  0000				       DW   0			     ;AN000;length of minus sign string
 0A7E  0000				       DW   0			     ;AN000;offset of minus sign string
 0A80  0000				       DW   0			     ;AN000;segment of minus sign string
 0A82  0000				       DW   0			     ;AN000;length of plus sign string
 0A84  0000				       DW   0			     ;AN000;offset of plus sign string
 0A86  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 26  NUM_DAY
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0A88  E008			WR_ICB26       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS  ;;AN000;+ICB_CLR  ;option word one
 0A8A  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0A8C  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
 0A8E  0000				       DW   0			     ;AN000;option word four
 0A90  000A				       DW   10			     ;AN000;**;upper left corner field row
 0A92  0018				       DW   24			     ;AN000;**;upper left corner field column
 0A94  0002				       DW   2			     ;AN000;**;number of chars before wrapping
 0A96  0001				       DW   1			     ;AN000;color index number assigned
 0A98  0000				       DW   0			     ;AN000;default change/minus status
 0A9A  0001				       DW   1			     ;AN000;**;cursor character pos in field
 0A9C  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 0A9E  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0AA0  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0AA2  0000				       DW   0			     ;AN000;length of data entered into fld
 0AA4  0002				       DW   2			     ;AC069;SEH ;AN000;**;length of input field
 0AA6  0000				       DW   0			     ;AN000;??;offset of input field
 0AA8  0000				       DW   0			     ;AN000;??;segment of input field
 0AAA  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0AAC  0000				       DW   0			     ;AN000;segment of color attr buffer
 0AAE  0000				       DW   0			     ;AN000;length of field's default value
 0AB0  0000				       DW   0			     ;AN000;offset field's default value
 0AB2  0000				       DW   0			     ;AN000;segment field's default value
 0AB4  0000				       DW   0			     ;AN000;length of return string
 0AB6  0000				       DW   0			     ;AN000;offset of return string
 0AB8  0000				       DW   0			     ;AN000;segment of return string
 0ABA  0006				       DW   WR_ALLOW_NUM_LEN	     ;AN000;length of allow chars
 0ABC  0CE6 R				       DW   WR_ALLOW_NUM	     ;AN000;offset of allow chars
 0ABE  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0AC0  0000				       DW   0			     ;AN000;length of skip chars
 0AC2  0000				       DW   0			     ;AN000;offset of skip chars
 0AC4  0000				       DW   0			     ;AN000;segment of skip chars
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-35
input.asm			   ;AN000;                                      

 0AC6  0000				       DW   0			     ;AN000;length of allow once chars
 0AC8  0000				       DW   0			     ;AN000;offset of allow once chars
 0ACA  0000				       DW   0			     ;AN000;segment of allow once chars
 0ACC  0002				       DW   2			     ;AN000;precision of decimal point
 0ACE  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0AD0  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0AD2  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0AD4  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0AD6  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0AD8  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0ADA  0000				       DW   0			     ;AN000;length of minus sign string
 0ADC  0000				       DW   0			     ;AN000;offset of minus sign string
 0ADE  0000				       DW   0			     ;AN000;segment of minus sign string
 0AE0  0000				       DW   0			     ;AN000;length of plus sign string
 0AE2  0000				       DW   0			     ;AN000;offset of plus sign string
 0AE4  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 27  NUM_HOUR
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0AE6  E008			WR_ICB27       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS  ;;AN000;+ICB_CLR  ;option word one
 0AE8  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0AEA  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
 0AEC  0000				       DW   0			     ;AN000;option word four
 0AEE  0010				       DW   16			     ;AN000;**;upper left corner field row
 0AF0  0018				       DW   24			     ;AN000;**;upper left corner field column
 0AF2  0002				       DW   2			     ;AN000;**;number of chars before wrapping
 0AF4  0001				       DW   1			     ;AN000;color index number assigned
 0AF6  0000				       DW   0			     ;AN000;default change/minus status
 0AF8  0001				       DW   1			     ;AN000;**;cursor character pos in field
 0AFA  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 0AFC  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0AFE  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0B00  0000				       DW   0			     ;AN000;length of data entered into fld
 0B02  0002				       DW   2			     ;AC069;SEH ;AN000;**;length of input field
 0B04  0000				       DW   0			     ;AN000;??;offset of input field
 0B06  0000				       DW   0			     ;AN000;??;segment of input field
 0B08  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0B0A  0000				       DW   0			     ;AN000;segment of color attr buffer
 0B0C  0000				       DW   0			     ;AN000;length of field's default value
 0B0E  0000				       DW   0			     ;AN000;offset field's default value
 0B10  0000				       DW   0			     ;AN000;segment field's default value
 0B12  0000				       DW   0			     ;AN000;length of return string
 0B14  0000				       DW   0			     ;AN000;offset of return string
 0B16  0000				       DW   0			     ;AN000;segment of return string
 0B18  0006				       DW   WR_ALLOW_NUM_LEN	     ;AN000;length of allow chars
 0B1A  0CE6 R				       DW   WR_ALLOW_NUM	     ;AN000;offset of allow chars
 0B1C  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0B1E  0000				       DW   0			     ;AN000;length of skip chars
 0B20  0000				       DW   0			     ;AN000;offset of skip chars
 0B22  0000				       DW   0			     ;AN000;segment of skip chars
 0B24  0000				       DW   0			     ;AN000;length of allow once chars
 0B26  0000				       DW   0			     ;AN000;offset of allow once chars
 0B28  0000				       DW   0			     ;AN000;segment of allow once chars
 0B2A  0002				       DW   2			     ;AN000;precision of decimal point
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-36
input.asm			   ;AN000;                                      

 0B2C  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0B2E  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0B30  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0B32  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0B34  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0B36  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0B38  0000				       DW   0			     ;AN000;length of minus sign string
 0B3A  0000				       DW   0			     ;AN000;offset of minus sign string
 0B3C  0000				       DW   0			     ;AN000;segment of minus sign string
 0B3E  0000				       DW   0			     ;AN000;length of plus sign string
 0B40  0000				       DW   0			     ;AN000;offset of plus sign string
 0B42  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 28  NUM_MINUTE
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0B44  E008			WR_ICB28       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS  ;;AN000;+ICB_CLR  ;option word one
 0B46  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0B48  0008				       DW   ICB_HOR		     ;AC069;SEH ;AN000;option word three
 0B4A  0000				       DW   0			     ;AN000;option word four
 0B4C  0012				       DW   18			     ;AN000;**;upper left corner field row
 0B4E  0018				       DW   24			     ;AN000;**;upper left corner field column
 0B50  0002				       DW   2			     ;AN000;**;number of chars before wrapping
 0B52  0001				       DW   1			     ;AN000;color index number assigned
 0B54  0000				       DW   0			     ;AN000;default change/minus status
 0B56  0001				       DW   1			     ;AN000;**;cursor character pos in field
 0B58  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 0B5A  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0B5C  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0B5E  0000				       DW   0			     ;AN000;length of data entered into fld
 0B60  0002				       DW   2			     ;AC069;SEH ;AN000;**;length of input field
 0B62  0000				       DW   0			     ;AN000;??;offset of input field
 0B64  0000				       DW   0			     ;AN000;??;segment of input field
 0B66  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0B68  0000				       DW   0			     ;AN000;segment of color attr buffer
 0B6A  0000				       DW   0			     ;AN000;length of field's default value
 0B6C  0000				       DW   0			     ;AN000;offset field's default value
 0B6E  0000				       DW   0			     ;AN000;segment field's default value
 0B70  0000				       DW   0			     ;AN000;length of return string
 0B72  0000				       DW   0			     ;AN000;offset of return string
 0B74  0000				       DW   0			     ;AN000;segment of return string
 0B76  0006				       DW   WR_ALLOW_NUM_LEN	     ;AN000;length of allow chars
 0B78  0CE6 R				       DW   WR_ALLOW_NUM	     ;AN000;offset of allow chars
 0B7A  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0B7C  0000				       DW   0			     ;AN000;length of skip chars
 0B7E  0000				       DW   0			     ;AN000;offset of skip chars
 0B80  0000				       DW   0			     ;AN000;segment of skip chars
 0B82  0000				       DW   0			     ;AN000;length of allow once chars
 0B84  0000				       DW   0			     ;AN000;offset of allow once chars
 0B86  0000				       DW   0			     ;AN000;segment of allow once chars
 0B88  0002				       DW   2			     ;AN000;precision of decimal point
 0B8A  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0B8C  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0B8E  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0B90  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-37
input.asm			   ;AN000;                                      

 0B92  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0B94  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0B96  0000				       DW   0			     ;AN000;length of minus sign string
 0B98  0000				       DW   0			     ;AN000;offset of minus sign string
 0B9A  0000				       DW   0			     ;AN000;segment of minus sign string
 0B9C  0000				       DW   0			     ;AN000;length of plus sign string
 0B9E  0000				       DW   0			     ;AN000;offset of plus sign string
 0BA0  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 29  NUM_SECOND
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0BA2  E008			WR_ICB29       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;;AN000;+ICB_CLR ;option word one
 0BA4  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0BA6  0008				       DW   ICB_HOR		     ;AC0O69;SEH ;AN000;option word three
 0BA8  0000				       DW   0			     ;AN000;option word four
 0BAA  0014				       DW   20			     ;AN000;**;upper left corner field row
 0BAC  0018				       DW   24			     ;AN000;**;upper left corner field column
 0BAE  0002				       DW   2			     ;AN000;**;number of chars before wrapping
 0BB0  0001				       DW   1			     ;AN000;color index number assigned
 0BB2  0000				       DW   0			     ;AN000;default change/minus status
 0BB4  0001				       DW   1			     ;AN000;**;cursor character pos in field
 0BB6  0001				       DW   1			     ;AN000;**;NEW ADD Hor scroll support
 0BB8  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0BBA  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0BBC  0000				       DW   0			     ;AN000;length of data entered into fld
 0BBE  0002				       DW   2			     ;AC069;SEH ;AN000;**;length of input field
 0BC0  0000				       DW   0			     ;AN000;??;offset of input field
 0BC2  0000				       DW   0			     ;AN000;??;segment of input field
 0BC4  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0BC6  0000				       DW   0			     ;AN000;segment of color attr buffer
 0BC8  0000				       DW   0			     ;AN000;length of field's default value
 0BCA  0000				       DW   0			     ;AN000;offset field's default value
 0BCC  0000				       DW   0			     ;AN000;segment field's default value
 0BCE  0000				       DW   0			     ;AN000;length of return string
 0BD0  0000				       DW   0			     ;AN000;offset of return string
 0BD2  0000				       DW   0			     ;AN000;segment of return string
 0BD4  0006				       DW   WR_ALLOW_NUM_LEN	     ;AN000;length of allow chars
 0BD6  0CE6 R				       DW   WR_ALLOW_NUM	     ;AN000;offset of allow chars
 0BD8  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0BDA  0000				       DW   0			     ;AN000;length of skip chars
 0BDC  0000				       DW   0			     ;AN000;offset of skip chars
 0BDE  0000				       DW   0			     ;AN000;segment of skip chars
 0BE0  0000				       DW   0			     ;AN000;length of allow once chars
 0BE2  0000				       DW   0			     ;AN000;offset of allow once chars
 0BE4  0000				       DW   0			     ;AN000;segment of allow once chars
 0BE6  0002				       DW   2			     ;AN000;precision of decimal point
 0BE8  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0BEA  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0BEC  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0BEE  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0BF0  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0BF2  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0BF4  0000				       DW   0			     ;AN000;length of minus sign string
 0BF6  0000				       DW   0			     ;AN000;offset of minus sign string
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-38
input.asm			   ;AN000;                                      

 0BF8  0000				       DW   0			     ;AN000;segment of minus sign string
 0BFA  0000				       DW   0			     ;AN000;length of plus sign string
 0BFC  0000				       DW   0			     ;AN000;offset of plus sign string
 0BFE  0000				       DW   0			     ;AN000;segment of plus sign string
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 30 PRIMARY_CP
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0C00  E008			WR_ICB30       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS  ;;AN000;+ICB_CLR ;option word one
 0C02  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0C04  0001				       DW   ICB_WIN  ;AN000;option word three
 0C06  0000				       DW   0			     ;AN000;option word four
 0C08  0014				       DW   20			  ;AN000;**;upper left corner field row
 0C0A  0018				       DW   24			  ;AN000;**;upper left corner field column
 0C0C  0002				       DW   2			  ;AN000;**;number of chars before wrapping
 0C0E  0001				       DW   1			     ;AN000;color index number assigned
 0C10  0000				       DW   0			     ;AN000;default change/minus status
 0C12  0001				       DW   1			  ;AN000;**;cursor character pos in field
 0C14  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 0C16  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0C18  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0C1A  0000				       DW   0			     ;AN000;length of data entered into fld
 0C1C  0000				       DW   0			  ;AN000;**;length of input field
 0C1E  0000				       DW   0			  ;AN000;??;offset of input field
 0C20  0000				       DW   0			  ;AN000;??;segment of input field
 0C22  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0C24  0000				       DW   0			     ;AN000;segment of color attr buffer
 0C26  0005				       DW   ICB_DEFBUF30_L+2	     ;AN000;length of field's default value
 0C28  0C5E R				       DW   ICB_DEFBUF30	     ;AN000;offset field's default value
 0C2A  ---- R				       DW   DATA		     ;AN000;segment field's default value
 0C2C  0000				       DW   0			     ;AN000;length of return string
 0C2E  0000				       DW   0			     ;AN000;offset of return string
 0C30  0000				       DW   0			     ;AN000;segment of return string
 0C32  0006				       DW   WR_ALLOW_NUM_LEN	     ;AN000;length of allow chars
 0C34  0CE6 R				       DW   WR_ALLOW_NUM	     ;AN000;offset of allow chars
 0C36  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0C38  0000				       DW   0			     ;AN000;length of skip chars
 0C3A  0000				       DW   0			     ;AN000;offset of skip chars
 0C3C  0000				       DW   0			     ;AN000;segment of skip chars
 0C3E  0000				       DW   0			     ;AN000;length of allow once chars
 0C40  0000				       DW   0			     ;AN000;offset of allow once chars
 0C42  0000				       DW   0			     ;AN000;segment of allow once chars
 0C44  0002				       DW   2			     ;AN000;precision of decimal point
 0C46  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0C48  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0C4A  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0C4C  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0C4E  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0C50  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0C52  0000				       DW   0			     ;AN000;length of minus sign string
 0C54  0000				       DW   0			     ;AN000;offset of minus sign string
 0C56  0000				       DW   0			     ;AN000;segment of minus sign string
 0C58  0000				       DW   0			     ;AN000;length of plus sign string
 0C5A  0000				       DW   0			     ;AN000;offset of plus sign string
 0C5C  0000				       DW   0			     ;AN000;segment of plus sign string
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-39
input.asm			   ;AN000;                                      

									     ;
 0C5E  0003			ICB_DEFBUF30   DW   ICB_DEFBUF30_L	     ;AN000;Define default buffer ASCIIN
 0C60  38 35 30				       DB   '850'                    ;AN000;Define default buffer
 = 0003				ICB_DEFBUF30_L EQU  $-ICB_DEFBUF30-2	     ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; ICB 31 COUNTRY_LANG
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0C63  E008			WR_ICB31       DW   ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS  ;;AN000;+ICB_CLR ;option word one
 0C65  0117				       DW   ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC   ;AN000;option word two
 0C67  0001				       DW   ICB_WIN ;AN000;option word three
 0C69  0000				       DW   0			     ;AN000;option word four
 0C6B  0014				       DW   20			  ;AN000;**;upper left corner field row
 0C6D  0018				       DW   24			  ;AN000;**;upper left corner field column
 0C6F  0002				       DW   2			  ;AN000;**;number of chars before wrapping
 0C71  0001				       DW   1			     ;AN000;color index number assigned
 0C73  0000				       DW   0			     ;AN000;default change/minus status
 0C75  0001				       DW   1			  ;AN000;**;cursor character pos in field
 0C77  0001				       DW   1			  ;AN000;**;NEW ADD Hor scroll support
 0C79  01B8				       DW   SND_FREQ		     ;AN000;frequency of error beep
 0C7B  0000				       DW   0			     ;AN000;ASCII code of the key returned
 0C7D  0000				       DW   0			     ;AN000;length of data entered into fld
 0C7F  0000				       DW   0			  ;AN000;**;length of input field
 0C81  0000				       DW   0			  ;AN000;??;offset of input field
 0C83  0000				       DW   0			  ;AN000;??;segment of input field
 0C85  0000				       DW   0			     ;AN000;offset of color attribute buffer
 0C87  0000				       DW   0			     ;AN000;segment of color attr buffer
 0C89  0004				       DW   ICB_DEFBUF31_L+2	  ;AN000;??;length of field's default value
 0C8B  0CC1 R				       DW   ICB_DEFBUF31	  ;AN000;??;offset field's default value
 0C8D  ---- R				       DW   DATA		  ;AN000;??;segment field's default value
 0C8F  0000				       DW   0			     ;AN000;length of return string
 0C91  0000				       DW   0			     ;AN000;offset of return string
 0C93  0000				       DW   0			     ;AN000;segment of return string
 0C95  0006				       DW   WR_ALLOW_NUM_LEN	     ;AN000;length of allow chars
 0C97  0CE6 R				       DW   WR_ALLOW_NUM	     ;AN000;offset of allow chars
 0C99  ---- R				       DW   DATA		     ;AN000;segment of allow chars
 0C9B  0000				       DW   0			     ;AN000;length of skip chars
 0C9D  0000				       DW   0			     ;AN000;offset of skip chars
 0C9F  0000				       DW   0			     ;AN000;segment of skip chars
 0CA1  0000				       DW   0			     ;AN000;length of allow once chars
 0CA3  0000				       DW   0			     ;AN000;offset of allow once chars
 0CA5  0000				       DW   0			     ;AN000;segment of allow once chars
 0CA7  0002				       DW   2			     ;AN000;precision of decimal point
 0CA9  0000				       DW   0			     ;AN000;low numeric range (low intrgr)
 0CAB  0000				       DW   0			     ;AN000;low numeric range (high intrgr)
 0CAD  0000				       DW   0			     ;AN000;high numeric range (low intrgr)
 0CAF  0000				       DW   0			     ;AN000;high numeric range (high intrgr)
 0CB1  0000				       DW   0			     ;AN000;beginning row of minus and plus
 0CB3  0000				       DW   0			     ;AN000;beginning col of minus & plus
 0CB5  0000				       DW   0			     ;AN000;length of minus sign string
 0CB7  0000				       DW   0			     ;AN000;offset of minus sign string
 0CB9  0000				       DW   0			     ;AN000;segment of minus sign string
 0CBB  0000				       DW   0			     ;AN000;length of plus sign string
 0CBD  0000				       DW   0			     ;AN000;offset of plus sign string
 0CBF  0000				       DW   0			     ;AN000;segment of plus sign string
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Page     1-40
input.asm			   ;AN000;                                      

									     ;
 0CC1  0002			ICB_DEFBUF31   DW   ICB_DEFBUF31_L	     ;AN000;Define default buffer ASCIIN
 0CC3  53 47				       DB   'SG'                     ;AN000;
 = 0002				ICB_DEFBUF31_L EQU  $-ICB_DEFBUF31-2	     ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; Table of Key Definitions
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0CC5  08 00			KD_BACKSPACE   DB   8,0 		     ;AN000;ASCII backspace
 0CC7  00 3B			KD_UNDOKEY     DB   0,59		     ;AN000;ASCII code replace default key
 0CC9  00 3C			KD_SWCHKEY     DB   0,60		     ;AN000;ASCII code switch char direction
 0CCB  00 53			KD_DEL	       DB   0,83		     ;AN000;extended ASCII delete key
 0CCD  00 75			KD_CTRLEND     DB   0,117		     ;AN000;extended ASCII Control-End key
 0CCF  00 47			KD_HOME        DB   0,71		     ;AN000;extended ASCII home key
 0CD1  00 4F			KD_END	       DB   0,79		     ;AN000;extended ASCII end key
 0CD3  00 52			KD_INS	       DB   0,82		     ;AN000;extended ASCII insert key
 0CD5  00 4B			KD_LARROW      DB   0,75		     ;AN000;extended ASCII left arrow
 0CD7  00 4D			KD_RARROW      DB   0,77		     ;AN000;extended ASCII right arrow
 0CD9  00 48			KD_UARROW      DB   0,72		     ;AN000;extended ASCII up arrow
 0CDB  00 50			KD_DARROW      DB   0,80		     ;AN000;extended ASCII down arrow
 0CDD  2D 00			KD_MINUS       DB   45,0		     ;AN000;ASCII minus sign
 0CDF  2B 00			KD_PLUS        DB   43,0		     ;AN000;ASCII plus sign
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
				;
				; Define Buffers and Strings
				;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0CE1  2C 20 2D FE 2C		WR_ALLOW_CHAR  DB   ', -',0FEh,','                  ;AN000;
 = 0005				WR_ALLOW_CHAR_LEN  EQU ($-WR_ALLOW_CHAR)     ;AN000;
 0CE6  20 2C 30 2D 39 2C	WR_ALLOW_NUM   DB   ' ,0-9,'                 ;AN000;
 = 0006				WR_ALLOW_NUM_LEN   EQU ($-WR_ALLOW_NUM)      ;AN000;
				;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 0CEC				DATA	ENDS				     ;AN000;
					END				     ;AN000;
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Symbols-1


Segments and Groups:

                N a m e         	Length	 Align	Combine Class

DATA . . . . . . . . . . . . . .  	0CEC	BYTE	PUBLIC	'DATA'

Symbols:            

                N a m e         	Type	 Value	 Attr

CRD_BUFSIZE  . . . . . . . . . .  	NUMBER	0001	
CRD_IDNOTFOUND . . . . . . . . .  	NUMBER	0008	
CRD_NOCOLORS . . . . . . . . . .  	NUMBER	0002	
CRD_NOTCASFILE . . . . . . . . .  	NUMBER	0004	

DNARROW  . . . . . . . . . . . .  	NUMBER	5000	

ENTER  . . . . . . . . . . . . .  	NUMBER	000D	
ESCAPE . . . . . . . . . . . . .  	NUMBER	001B	

F1 . . . . . . . . . . . . . . .  	NUMBER	003B	
F10  . . . . . . . . . . . . . .  	NUMBER	0044	
F2 . . . . . . . . . . . . . . .  	NUMBER	003C	
F3 . . . . . . . . . . . . . . .  	NUMBER	003D	
F4 . . . . . . . . . . . . . . .  	NUMBER	003E	
F5 . . . . . . . . . . . . . . .  	NUMBER	003F	
F6 . . . . . . . . . . . . . . .  	NUMBER	0040	
F7 . . . . . . . . . . . . . . .  	NUMBER	0041	
F8 . . . . . . . . . . . . . . .  	NUMBER	0042	
F9 . . . . . . . . . . . . . . .  	NUMBER	0043	

GV_128K  . . . . . . . . . . . .  	NUMBER	0800	
GV_192K  . . . . . . . . . . . .  	NUMBER	1000	
GV_256K  . . . . . . . . . . . .  	NUMBER	2000	
GV_64K . . . . . . . . . . . . .  	NUMBER	0400	
GV_CGA . . . . . . . . . . . . .  	NUMBER	0002	
GV_CGAA  . . . . . . . . . . . .  	NUMBER	0040	
GV_CGAP  . . . . . . . . . . . .  	NUMBER	0080	
GV_COLOR . . . . . . . . . . . .  	NUMBER	0010	
GV_EGA . . . . . . . . . . . . .  	NUMBER	0004	
GV_EGAA  . . . . . . . . . . . .  	NUMBER	0020	
GV_EGACM . . . . . . . . . . . .  	NUMBER	0080	
GV_EGAP  . . . . . . . . . . . .  	NUMBER	0100	
GV_HS  . . . . . . . . . . . . .  	NUMBER	0200	
GV_MGA . . . . . . . . . . . . .  	NUMBER	0010	
GV_MONOP . . . . . . . . . . . .  	NUMBER	0040	
GV_P5140 . . . . . . . . . . . .  	NUMBER	0002	
GV_P5151 . . . . . . . . . . . .  	NUMBER	0008	
GV_P5153 . . . . . . . . . . . .  	NUMBER	0004	
GV_PGA . . . . . . . . . . . . .  	NUMBER	0008	
GV_PGAEM . . . . . . . . . . . .  	NUMBER	0100	
GV_TEXTGRAPH . . . . . . . . . .  	NUMBER	0020	
GV_TURBOP  . . . . . . . . . . .  	NUMBER	0200	
GV_TV  . . . . . . . . . . . . .  	NUMBER	0001	
GV_TVW . . . . . . . . . . . . .  	NUMBER	0001	
GV_UM  . . . . . . . . . . . . .  	NUMBER	4000	
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Symbols-2



HLP_CONT . . . . . . . . . . . .  	NUMBER	0001	
HLP_HELP . . . . . . . . . . . .  	NUMBER	0004	
HLP_INDX . . . . . . . . . . . .  	NUMBER	0008	
HLP_KEYS . . . . . . . . . . . .  	NUMBER	0002	
HLP_OVER . . . . . . . . . . . .  	NUMBER	0010	
HRD_BUFSIZE  . . . . . . . . . .  	NUMBER	0001	
HRD_DISPID . . . . . . . . . . .  	NUMBER	0004	
HRD_NOHELPID . . . . . . . . . .  	NUMBER	0008	
HRD_NOHLPOBJ . . . . . . . . . .  	NUMBER	0002	
HRD_NOOBJLST . . . . . . . . . .  	NUMBER	0004	
HRD_NOTCASFILE . . . . . . . . .  	NUMBER	0010	
HRD_TEXT . . . . . . . . . . . .  	NUMBER	0002	
HRD_TOPIC  . . . . . . . . . . .  	NUMBER	0001	

ICB_AXC  . . . . . . . . . . . .  	NUMBER	0020	
ICB_AXD  . . . . . . . . . . . .  	NUMBER	0040	
ICB_BEN  . . . . . . . . . . . .  	NUMBER	0008	
ICB_BEX  . . . . . . . . . . . .  	NUMBER	0010	
ICB_BKS  . . . . . . . . . . . .  	NUMBER	8000	
ICB_BOX  . . . . . . . . . . . .  	NUMBER	0020	
ICB_CAP  . . . . . . . . . . . .  	NUMBER	2000	
ICB_CLR  . . . . . . . . . . . .  	NUMBER	0200	
ICB_CSW  . . . . . . . . . . . .  	NUMBER	0080	
ICB_CTE  . . . . . . . . . . . .  	NUMBER	0008	
ICB_DEFBUF30 . . . . . . . . . .  	L WORD	0C5E	DATA
ICB_DEFBUF30_L . . . . . . . . .  	NUMBER	0003	
ICB_DEFBUF31 . . . . . . . . . .  	L WORD	0CC1	DATA
ICB_DEFBUF31_L . . . . . . . . .  	NUMBER	0002	
ICB_DEL  . . . . . . . . . . . .  	NUMBER	0002	
ICB_ECL  . . . . . . . . . . . .  	NUMBER	0001	
ICB_END  . . . . . . . . . . . .  	NUMBER	0010	
ICB_FGS  . . . . . . . . . . . .  	NUMBER	0400	
ICB_FIN  . . . . . . . . . . . .  	NUMBER	4000	
ICB_HOM  . . . . . . . . . . . .  	NUMBER	0004	
ICB_HOR  . . . . . . . . . . . .  	NUMBER	0008	
ICB_INS  . . . . . . . . . . . .  	NUMBER	0001	
ICB_LFA  . . . . . . . . . . . .  	NUMBER	4000	
ICB_MUS  . . . . . . . . . . . .  	NUMBER	0040	
ICB_NUM  . . . . . . . . . . . .  	NUMBER	1000	
ICB_OUT  . . . . . . . . . . . .  	NUMBER	0100	
ICB_PAD  . . . . . . . . . . . .  	NUMBER	4000	
ICB_PSW  . . . . . . . . . . . .  	NUMBER	0400	
ICB_RJU  . . . . . . . . . . . .  	NUMBER	0800	
ICB_RTA  . . . . . . . . . . . .  	NUMBER	2000	
ICB_SCAP . . . . . . . . . . . .  	NUMBER	0040	
ICB_SCR  . . . . . . . . . . . .  	NUMBER	0800	
ICB_SDEF . . . . . . . . . . . .  	NUMBER	0001	
ICB_SINS . . . . . . . . . . . .  	NUMBER	0080	
ICB_SMU  . . . . . . . . . . . .  	NUMBER	0080	
ICB_SMUS . . . . . . . . . . . .  	NUMBER	0002	
ICB_SNUM . . . . . . . . . . . .  	NUMBER	0020	
ICB_SPUS . . . . . . . . . . . .  	NUMBER	0004	
ICB_SSCR . . . . . . . . . . . .  	NUMBER	0010	
ICB_STRU . . . . . . . . . . . .  	NUMBER	0008	
ICB_SWK  . . . . . . . . . . . .  	NUMBER	1000	
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Symbols-3


ICB_TBX  . . . . . . . . . . . .  	NUMBER	0004	
ICB_TSA  . . . . . . . . . . . .  	NUMBER	1000	
ICB_TSD  . . . . . . . . . . . .  	NUMBER	0800	
ICB_TSR  . . . . . . . . . . . .  	NUMBER	2000	
ICB_UDO  . . . . . . . . . . . .  	NUMBER	0400	
ICB_UFK  . . . . . . . . . . . .  	NUMBER	0200	
ICB_UPC  . . . . . . . . . . . .  	NUMBER	0100	
ICB_USC  . . . . . . . . . . . .  	NUMBER	0004	
ICB_WAE  . . . . . . . . . . . .  	NUMBER	0002	
ICB_WAR  . . . . . . . . . . . .  	NUMBER	0100	
ICB_WBS  . . . . . . . . . . . .  	NUMBER	0200	
ICB_WCE  . . . . . . . . . . . .  	NUMBER	0040	
ICB_WDL  . . . . . . . . . . . .  	NUMBER	0080	
ICB_WEN  . . . . . . . . . . . .  	NUMBER	0020	
ICB_WHM  . . . . . . . . . . . .  	NUMBER	0010	
ICB_WIN  . . . . . . . . . . . .  	NUMBER	0001	
ICB_WRP  . . . . . . . . . . . .  	NUMBER	8000	
ICB_XCL  . . . . . . . . . . . .  	NUMBER	0002	
INC_AMONO  . . . . . . . . . . .  	NUMBER	0020	
INC_DBCS . . . . . . . . . . . .  	NUMBER	0002	
INC_DDBCS  . . . . . . . . . . .  	NUMBER	0008	
INC_KFND . . . . . . . . . . . .  	NUMBER	0001	
INC_KWAIT  . . . . . . . . . . .  	NUMBER	0001	
INC_RSCAN  . . . . . . . . . . .  	NUMBER	0040	
INC_UDBCS  . . . . . . . . . . .  	NUMBER	0004	
INC_UMONO  . . . . . . . . . . .  	NUMBER	0010	
INC_UTRAN  . . . . . . . . . . .  	NUMBER	0002	
INS_FKS  . . . . . . . . . . . .  	NUMBER	0001	
IN_ADBCS . . . . . . . . . . . .  	NUMBER	0002	
IN_AMONO . . . . . . . . . . . .  	NUMBER	0020	
IN_DDBCS . . . . . . . . . . . .  	NUMBER	0008	
IN_LICBX . . . . . . . . . . . .  	NUMBER	0040	
IN_LVBOV . . . . . . . . . . . .  	NUMBER	0080	
IN_RANG  . . . . . . . . . . . .  	NUMBER	0001	
IN_UDBCS . . . . . . . . . . . .  	NUMBER	0004	
IN_UMONO . . . . . . . . . . . .  	NUMBER	0010	
IN_UTRAN . . . . . . . . . . . .  	NUMBER	0001	

KD_BACKSPACE . . . . . . . . . .  	L BYTE	0CC5	DATA	Global
KD_CTRLEND . . . . . . . . . . .  	L BYTE	0CCD	DATA
KD_DARROW  . . . . . . . . . . .  	L BYTE	0CDB	DATA
KD_DEL . . . . . . . . . . . . .  	L BYTE	0CCB	DATA
KD_END . . . . . . . . . . . . .  	L BYTE	0CD1	DATA
KD_HOME  . . . . . . . . . . . .  	L BYTE	0CCF	DATA
KD_INS . . . . . . . . . . . . .  	L BYTE	0CD3	DATA
KD_LARROW  . . . . . . . . . . .  	L BYTE	0CD5	DATA
KD_MINUS . . . . . . . . . . . .  	L BYTE	0CDD	DATA
KD_PLUS  . . . . . . . . . . . .  	L BYTE	0CDF	DATA
KD_RARROW  . . . . . . . . . . .  	L BYTE	0CD7	DATA
KD_SWCHKEY . . . . . . . . . . .  	L BYTE	0CC9	DATA
KD_UARROW  . . . . . . . . . . .  	L BYTE	0CD9	DATA
KD_UNDOKEY . . . . . . . . . . .  	L BYTE	0CC7	DATA

LFARROW  . . . . . . . . . . . .  	NUMBER	4B00	

PCB_ASC  . . . . . . . . . . . .  	NUMBER	0040	
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Symbols-4


PCB_ASZ  . . . . . . . . . . . .  	NUMBER	0020	
PCB_CMP  . . . . . . . . . . . .  	NUMBER	0002	
PCB_CRE  . . . . . . . . . . . .  	NUMBER	0001	
PCB_DBB  . . . . . . . . . . . .  	NUMBER	0200	
PCB_DLB  . . . . . . . . . . . .  	NUMBER	0400	
PCB_DRB  . . . . . . . . . . . .  	NUMBER	0800	
PCB_DSHADOW  . . . . . . . . . .  	NUMBER	1000	
PCB_DTB  . . . . . . . . . . . .  	NUMBER	0100	
PCB_EXP  . . . . . . . . . . . .  	NUMBER	0004	
PCB_LAB  . . . . . . . . . . . .  	NUMBER	0080	
PCB_LB . . . . . . . . . . . . .  	NUMBER	0010	
PCB_MXP  . . . . . . . . . . . .  	NUMBER	0008	
PCB_PELCOORD . . . . . . . . . .  	NUMBER	2000	
PGDN . . . . . . . . . . . . . .  	NUMBER	0051	
PGUP . . . . . . . . . . . . . .  	NUMBER	0049	
PM_BK  . . . . . . . . . . . . .  	NUMBER	0004	
PM_CHDTAB  . . . . . . . . . . .  	NUMBER	0008	
PM_CL  . . . . . . . . . . . . .  	NUMBER	0008	
PM_COLORX  . . . . . . . . . . .  	NUMBER	0010	
PM_DOA . . . . . . . . . . . . .  	NUMBER	0010	
PM_DOQ . . . . . . . . . . . . .  	NUMBER	0040	
PM_DOV . . . . . . . . . . . . .  	NUMBER	0020	
PM_PANPDQ  . . . . . . . . . . .  	NUMBER	0001	
PM_PCBVEC  . . . . . . . . . . .  	NUMBER	0002	
PM_RF  . . . . . . . . . . . . .  	NUMBER	0001	
PM_SRF . . . . . . . . . . . . .  	NUMBER	0002	
PM_UNKNPANS  . . . . . . . . . .  	NUMBER	0004	
PRD_APPEND . . . . . . . . . . .  	NUMBER	0004	
PRD_BUFSIZE  . . . . . . . . . .  	NUMBER	0001	
PRD_INITIAL  . . . . . . . . . .  	NUMBER	0001	
PRD_NOINITIAL  . . . . . . . . .  	NUMBER	0010	
PRD_NOPANELID  . . . . . . . . .  	NUMBER	0020	
PRD_NOPANELS . . . . . . . . . .  	NUMBER	0002	
PRD_NOTCASFILE . . . . . . . . .  	NUMBER	0004	
PRD_PANELSFULL . . . . . . . . .  	NUMBER	0008	
PRD_READALL  . . . . . . . . . .  	NUMBER	0008	
PRD_READONE  . . . . . . . . . .  	NUMBER	0002	
PRD_SIZEMALL . . . . . . . . . .  	NUMBER	0010	
PT_BK  . . . . . . . . . . . . .  	NUMBER	0001	
PT_SRF . . . . . . . . . . . . .  	NUMBER	0002	

QM_BREAKOFF  . . . . . . . . . .  	NUMBER	0002	
QM_BREAKON . . . . . . . . . . .  	NUMBER	0001	
QM_CLSCHD  . . . . . . . . . . .  	NUMBER	0800	
QM_CLSPAN  . . . . . . . . . . .  	NUMBER	1000	
QM_ERRBU . . . . . . . . . . . .  	NUMBER	0040	
QM_ERRCN . . . . . . . . . . . .  	NUMBER	0100	
QM_ERRMC . . . . . . . . . . . .  	NUMBER	0002	
QM_ERRMCQ  . . . . . . . . . . .  	NUMBER	0008	
QM_ERRMP . . . . . . . . . . . .  	NUMBER	0001	
QM_ERRMPQ  . . . . . . . . . . .  	NUMBER	0004	
QM_ERROC . . . . . . . . . . . .  	NUMBER	0020	
QM_ERROP . . . . . . . . . . . .  	NUMBER	0010	
QM_ERRPN . . . . . . . . . . . .  	NUMBER	0080	
QM_INIT  . . . . . . . . . . . .  	NUMBER	0001	
QM_POPCHD  . . . . . . . . . . .  	NUMBER	0008	
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Symbols-5


QM_POPCQU  . . . . . . . . . . .  	NUMBER	0100	
QM_POPPAN  . . . . . . . . . . .  	NUMBER	0040	
QM_POPPQU  . . . . . . . . . . .  	NUMBER	0400	
QM_PUSHCHD . . . . . . . . . . .  	NUMBER	0002	
QM_PUSHCQU . . . . . . . . . . .  	NUMBER	0080	
QM_PUSHPAN . . . . . . . . . . .  	NUMBER	0010	
QM_PUSHPQU . . . . . . . . . . .  	NUMBER	0200	
QM_RVMCHD  . . . . . . . . . . .  	NUMBER	0004	
QM_RVMPAN  . . . . . . . . . . .  	NUMBER	0020	
QM_SRFOFF  . . . . . . . . . . .  	NUMBER	0008	
QM_SRFON . . . . . . . . . . . .  	NUMBER	0004	

RTARROW  . . . . . . . . . . . .  	NUMBER	4D00	

SCB_ACTIVEON . . . . . . . . . .  	NUMBER	0002	
SCB_AHIGH  . . . . . . . . . . .  	NUMBER	8000	
SCB_CFO  . . . . . . . . . . . .  	NUMBER	0008	
SCB_CHIGH  . . . . . . . . . . .  	NUMBER	0010	
SCB_CPHY . . . . . . . . . . . .  	NUMBER	0800	
SCB_CS . . . . . . . . . . . . .  	NUMBER	0001	
SCB_DACTIVE  . . . . . . . . . .  	NUMBER	4000	
SCB_DBCS . . . . . . . . . . . .  	NUMBER	0800	
SCB_DCHECK . . . . . . . . . . .  	NUMBER	2000	
SCB_DPOINT . . . . . . . . . . .  	NUMBER	8000	
SCB_DYN  . . . . . . . . . . . .  	NUMBER	0200	
SCB_EXCSING  . . . . . . . . . .  	NUMBER	0004	
SCB_FINDE  . . . . . . . . . . .  	NUMBER	0040	
SCB_FM . . . . . . . . . . . . .  	NUMBER	0400	
SCB_FRAL . . . . . . . . . . . .  	NUMBER	0008	
SCB_FRBF . . . . . . . . . . . .  	NUMBER	0004	
SCB_IPAGE  . . . . . . . . . . .  	NUMBER	0020	
SCB_LANDR  . . . . . . . . . . .  	NUMBER	0400	
SCB_LCOX . . . . . . . . . . . .  	NUMBER	0010	
SCB_LL . . . . . . . . . . . . .  	NUMBER	0010	
SCB_LVBOVR . . . . . . . . . . .  	NUMBER	0200	
SCB_MON  . . . . . . . . . . . .  	NUMBER	0400	
SCB_NUML . . . . . . . . . . . .  	NUMBER	1000	
SCB_NUMS . . . . . . . . . . . .  	NUMBER	0020	
SCB_NUMUIND  . . . . . . . . . .  	NUMBER	0008	
SCB_PM1  . . . . . . . . . . . .  	NUMBER	0040	
SCB_RD . . . . . . . . . . . . .  	NUMBER	0040	
SCB_RELSCR . . . . . . . . . . .  	NUMBER	0100	
SCB_RELUIND  . . . . . . . . . .  	NUMBER	0080	
SCB_ROTN . . . . . . . . . . . .  	NUMBER	0002	
SCB_RUK  . . . . . . . . . . . .  	NUMBER	0080	
SCB_SELACT . . . . . . . . . . .  	NUMBER	0001	
SCB_SELECTON . . . . . . . . . .  	NUMBER	0001	
SCB_SELEXC . . . . . . . . . . .  	NUMBER	0002	
SCB_SHIGH  . . . . . . . . . . .  	NUMBER	4000	
SCB_SKIP . . . . . . . . . . . .  	NUMBER	2000	
SCB_SKIPON . . . . . . . . . . .  	NUMBER	0004	
SCB_TBL  . . . . . . . . . . . .  	NUMBER	1000	
SCB_TRN  . . . . . . . . . . . .  	NUMBER	0200	
SCB_UC . . . . . . . . . . . . .  	NUMBER	0001	
SCB_UET  . . . . . . . . . . . .  	NUMBER	0004	
SCB_UI . . . . . . . . . . . . .  	NUMBER	0100	
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Symbols-6


SCB_UIND . . . . . . . . . . . .  	NUMBER	0080	
SCB_UKS  . . . . . . . . . . . .  	NUMBER	0020	
SCB_UNCA . . . . . . . . . . . .  	NUMBER	0100	
SCB_WRAP . . . . . . . . . . . .  	NUMBER	0002	
SND_FREQ . . . . . . . . . . . .  	NUMBER	01B8	
SPACE  . . . . . . . . . . . . .  	NUMBER	0020	
SRD_ALLOCRES . . . . . . . . . .  	NUMBER	0010	
SRD_APPEND . . . . . . . . . . .  	NUMBER	0004	
SRD_BUFSIZE  . . . . . . . . . .  	NUMBER	0001	
SRD_FIELDSFULL . . . . . . . . .  	NUMBER	0008	
SRD_INITIAL  . . . . . . . . . .  	NUMBER	0001	
SRD_NOFIELDID  . . . . . . . . .  	NUMBER	0020	
SRD_NOFIELDS . . . . . . . . . .  	NUMBER	0002	
SRD_NOINITIAL  . . . . . . . . .  	NUMBER	0010	
SRD_NOTCASFILE . . . . . . . . .  	NUMBER	0004	
SRD_READALL  . . . . . . . . . .  	NUMBER	0008	
SRD_READONE  . . . . . . . . . .  	NUMBER	0002	
SSC_PTSB . . . . . . . . . . . .  	NUMBER	0002	
SSC_SBE  . . . . . . . . . . . .  	NUMBER	0002	
SSC_SBTC . . . . . . . . . . . .  	NUMBER	0020	
SSC_SLSB . . . . . . . . . . . .  	NUMBER	0010	
SSC_TBSL . . . . . . . . . . . .  	NUMBER	0001	
SSC_VTASO  . . . . . . . . . . .  	NUMBER	0008	
SSC_VTE  . . . . . . . . . . . .  	NUMBER	0001	
SSC_VTSAO  . . . . . . . . . . .  	NUMBER	0004	

TAB  . . . . . . . . . . . . . .  	NUMBER	0009	

UPARROW  . . . . . . . . . . . .  	NUMBER	4800	

WR_ALLOW_CHAR  . . . . . . . . .  	L BYTE	0CE1	DATA
WR_ALLOW_CHAR_LEN  . . . . . . .  	NUMBER	0005	
WR_ALLOW_NUM . . . . . . . . . .  	L BYTE	0CE6	DATA
WR_ALLOW_NUM_LEN . . . . . . . .  	NUMBER	0006	
WR_APPEND_CHAR . . . . . . . . .  	L BYTE	01C1	DATA
WR_APPEND_CHAR_LEN . . . . . . .  	NUMBER	002D	
WR_ASCII_CHAR  . . . . . . . . .  	L BYTE	083F	DATA
WR_ASCII_CHAR_LEN  . . . . . . .  	NUMBER	000B	
WR_BUFFERS . . . . . . . . . . .  	L BYTE	06B5	DATA
WR_BUFFERS_LEN . . . . . . . . .  	NUMBER	0009	
WR_FCBS  . . . . . . . . . . . .  	L BYTE	077A	DATA
WR_FCBS_LEN  . . . . . . . . . .  	NUMBER	0009	
WR_GRAPHIC_CHAR  . . . . . . . .  	L BYTE	04AF	DATA
WR_GRAPHIC_CHAR_LEN  . . . . . .  	NUMBER	0029	
WR_ICB1  . . . . . . . . . . . .  	L WORD	007C	DATA
WR_ICB10 . . . . . . . . . . . .  	L WORD	0451	DATA
WR_ICB11 . . . . . . . . . . . .  	L WORD	04D8	DATA
WR_ICB12 . . . . . . . . . . . .  	L WORD	0536	DATA
WR_ICB13 . . . . . . . . . . . .  	L WORD	0594	DATA
WR_ICB14 . . . . . . . . . . . .  	L WORD	05F2	DATA
WR_ICB15 . . . . . . . . . . . .  	L WORD	0657	DATA
WR_ICB16 . . . . . . . . . . . .  	L WORD	06BE	DATA
WR_ICB17 . . . . . . . . . . . .  	L WORD	071C	DATA
WR_ICB18 . . . . . . . . . . . .  	L WORD	0783	DATA
WR_ICB19 . . . . . . . . . . . .  	L WORD	07E1	DATA
WR_ICB2  . . . . . . . . . . . .  	L WORD	0105	DATA
Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32
INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Symbols-7


WR_ICB20 . . . . . . . . . . . .  	L WORD	084A	DATA
WR_ICB21 . . . . . . . . . . . .  	L WORD	08A8	DATA
WR_ICB22 . . . . . . . . . . . .  	L WORD	0906	DATA
WR_ICB23 . . . . . . . . . . . .  	L WORD	096A	DATA
WR_ICB24 . . . . . . . . . . . .  	L WORD	09CC	DATA
WR_ICB25 . . . . . . . . . . . .  	L WORD	0A2A	DATA
WR_ICB26 . . . . . . . . . . . .  	L WORD	0A88	DATA
WR_ICB27 . . . . . . . . . . . .  	L WORD	0AE6	DATA
WR_ICB28 . . . . . . . . . . . .  	L WORD	0B44	DATA
WR_ICB29 . . . . . . . . . . . .  	L WORD	0BA2	DATA
WR_ICB3  . . . . . . . . . . . .  	L WORD	0163	DATA
WR_ICB30 . . . . . . . . . . . .  	L WORD	0C00	DATA
WR_ICB31 . . . . . . . . . . . .  	L WORD	0C63	DATA
WR_ICB4  . . . . . . . . . . . .  	L WORD	01EE	DATA
WR_ICB5  . . . . . . . . . . . .  	L WORD	024C	DATA
WR_ICB6  . . . . . . . . . . . .  	L WORD	02D9	DATA
WR_ICB7  . . . . . . . . . . . .  	L WORD	0337	DATA
WR_ICB8  . . . . . . . . . . . .  	L WORD	0395	DATA
WR_ICB9  . . . . . . . . . . . .  	L WORD	03F3	DATA
WR_ICBVEC  . . . . . . . . . . .  	L WORD	0000	DATA	Global
WR_NUM_EXT . . . . . . . . . . .  	L BYTE	09C8	DATA
WR_NUM_EXT_LEN . . . . . . . . .  	NUMBER	0004	
WR_NUM_PTR . . . . . . . . . . .  	L BYTE	0964	DATA
WR_NUM_PTR_LEN . . . . . . . . .  	NUMBER	0006	
WR_ON_OFF_CHAR . . . . . . . . .  	L BYTE	0650	DATA
WR_ON_OFF_CHAR_LEN . . . . . . .  	NUMBER	0007	
WR_PATH_CHAR . . . . . . . . . .  	L BYTE	00DA	DATA
WR_PATH_CHAR_LEN . . . . . . . .  	NUMBER	002B	
WR_PROMPT_CHAR . . . . . . . . .  	L BYTE	02AA	DATA
WR_PROMPT_CHAR_LEN . . . . . . .  	NUMBER	002F	
WWP_BUFSIZE  . . . . . . . . . .  	NUMBER	0001	
WWP_DESTBUFFER . . . . . . . . .  	NUMBER	0010	
WWP_DUPSYMBOL  . . . . . . . . .  	NUMBER	0002	
WWP_HYPHEN . . . . . . . . . . .  	NUMBER	0008	
WWP_LEFTJUST . . . . . . . . . .  	NUMBER	0001	
WWP_LEFTNRIGHT . . . . . . . . .  	NUMBER	0004	
WWP_LONGWORD . . . . . . . . . .  	NUMBER	0004	
WWP_NOBUFFER . . . . . . . . . .  	NUMBER	0008	
WWP_NOJUSTOPT  . . . . . . . . .  	NUMBER	0010	
WWP_RIGHTJUST  . . . . . . . . .  	NUMBER	0002	
WWP_SRCBUFFER  . . . . . . . . .  	NUMBER	0020	

@CPU . . . . . . . . . . . . . .  	TEXT  0101h		
@FILENAME  . . . . . . . . . . .  	TEXT  input		
@VERSION . . . . . . . . . . . .  	TEXT  510		

Microsoft (R) Macro Assembler Version 5.10                  5/17/24 09:44:32

INPUT.ASM - DOS SELECT.EXE	   ;AN000;                       Symbols-8






   2188 Source  Lines
   2188 Total   Lines
    358 Symbols

  47078 + 178551 Bytes symbol space free

      0 Warning Errors
      0 Severe  Errors
