DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦667944afc⟧ 

    Length: 136404 (0x214d4)
    Notes: pts_type(SC)
    Names: »W:INIT.SC«

Derivation

└─⟦f45ea3bc3⟧ Bits:30009713 Philips computer tape "WSM"
    └─⟦this⟧ »WSM:INTO/W:INIT.SC«

PTS(SC)

 IDENT W:INIT W,REL=2.3,850901,870155940230 




**********************************************************************
**                                                                  **
**  W:INIT            LATEST UPDATING:  1985-09-01 BY: CJ           **
**                                                                  **
**  DESCRIPTION:      WSM INTERPRETER INITIAL MODULE WITH           **
**                    THINGS POSSIBLE FOR THE USER TO ALTER.        **
**                                                                  **
**                    0. NORMAL INTERPRETER OR MINI                 **
**                    .  INTERPRETER FOR FILEHANDLING ONLY.         **
**                    1. SIZES OF:                                  **
**                    .  - WSM WORK ITEMS                           **
**                    .  - DYNAMIC FIELDS DATA AREA                 **
**                    .  - SECTION SEQUENCE TABLE                   **
**                    .  - PARAMETER BLOCK BUFFER                   **
**                    .  - INPUT (KEY BOARD) BUFFER                 **
**                    .  - OUTPUT (DISPLAY/PRINTER) BUFFER          **
**                    .  - WSM BASIC WORK AREA                      **
**                    2. DEVICE PARAMETERS:                         **
**                    .  - FILE CODES                               **
**                    .  - CURSOR MODE                              **
**                    .  - FILLER ECHO CHARACTER                    **
**                    .  - ONE OR TWO MESSAGE LINES                 **
**                    3. KEY CODES & KEY TABLES.                    **
**                    4. SYSTEM MESSAGES.                           **
**                    5. SIZE OF WSM MEMORY BUFFER POOL.            **
**                    6. WSM FILE HANDLER.                          **
**                    7. INCLUDED WSM INSTRUCTIONS.                 **
**                    8. INCLUDED WSM VALIDATION STATEMENTS         **
**                    .  AND OPERATORS.                             **
**                    .  EXTERNAL FUNCTION CALLS.                   **
**                    9. USER DEFINED SUBROUTINES                   **
**                    - CALLED FROM THE APPLICATION                 **
**                    - CALLED FROM WSM TO MODIFY PBLK BUFFER       **
**                                                                  **
**                                                                  **
**                                                                  **
	EJECT
**                                                                  **
**                                                                  **
**                                                                  **
**                    10. OPTION TO EXCLUDE DECIMAL POINT OR COMMA  **
**                    .  IN NUMERIC DATA RETURNED TO APPLICATION.   **
**                    11. BASIC DEBUGGER FOR WSM VALIDATION.        **
**                                                                  **
**                    NOTE: VALUES MUST BE IN ACCORDANCE WITH       **
**                    .     SYSGEN (FILE CODES, BUFFER SIZES).      **
**********************************************************************
	EJECT


** HIST:


**
**  1985-09-01 /CJ REL 2.3 -> ACTION-CENTRE 
**  1985-03-01 /CJ IRL OF REL 2.2 FOR TOSS 13.2 
**  1984-11-13 /TS IRL OF REL 2.2 FOR TOSS 13.1 
**  1984-10-02 /TS EXTEND IC ECB WITH CW2. REQUIRED BYE TOSS-DGH. 
**  1984-03-19 /GB  ADJUST FOR HANDLING OF THE '/5C' CHARACTER
**  1984-02-07 /ME  INITIALIZE SCREEN BACKGROUND TO BLACK FOR ALL 
**                  TYPE OF VDU:S EXCEPT 6391 (VD82). 
**  1983-09-25 /ME  DELAY IF WORK STATION IS NOT OPERABLE.
**  1983-05-04 /TS  EQU:S UPDATED 
**  1983-04-27 /TS  SET AUTO SWITCH ACTIVE AS DEFAULT 
**  1983-04-11 /TS  INCLUDE BASIC DEBUGGER AND ADJUST USERKEYS. 
**  1983-03-28 /TS  BASIC READ ON SYSTEM LINE.
**                  AND MSG LINE EQU CHANGED TO DATA. 
**  1983-03-02 /GB   ADJUST W:INIT TO WSMGEN REL 2
**  1983-01-20 /TS   SET STANDARD KEYCHECK BITMAP 
**  1983-01-18 /TS   CALL USER ASS ROUTINE
**  1982-11-26 /TS   DECIMAL POINT OPTION & DATA TABLE W:UFTB.. 
**  1982-11-26 /TS   .. & INITIATE W:KTB1.
**  1982-11-12 /ME   BASIC DEBUGGER OPTION ADDED. 
**  1982-10-11 /ME   EXTENDED NO OF POOL UNITS. 
**  1982-10-06 /ME   ABSENCE OF WSM WORK ITEMS HANDLED. 
**  1982-09-10 /TS   FUNCTION CODE FOR GET FIELD PARAMETERS...
**  1982-09-10 /TS   ..ADDED TO WSMTAB. 
**  1982-06-15 /GM   ORDER OF PARAMETERS CHANGED. 
**  1982-06-14 /TS   TWO MESSAGE LINES. 
**  1982-04-22 /ME   TUP & TDOWN IMPLEMENTED. 
**  1982-03-30 /ME   POSSIBILITY TO CALL USER-
**             /     DEFINED SUBROUTINES IMPLEMENTED. 
**  1982-03-16 /ME   WSM BASIC DIVISION ADDED.
**  1982-03-01 /ME   WSM BASIC MULTIPLICATION ADDED.
**  1981-12-21 /GM   VD82/83 ADAPTIONS. 
**  1981-12-04 /ME   FUNC & VAL.STMT & VAL. OP TAB:S INC. 
**  1981-10-19 /GM   VALIDATION ERROR ADDED 
**  1981-10-15 /GM   READ SCREEN SIZE LKM IMPLEMENTED 
**  1981-09-18 /ME   FILE HANDLER TASK IMPLEMENTED
**  1981-09-08 /ME   SCREEN EQUATES MOVED FROM W:EQU
**  1981-08-04 /ME   SEPARATION OF I/O-BUFFER 
**  1981-08-04 /ME   BUFFER SIZES MOVED FROM W:EQU
**  1981-07-10 /ME   SOME KEYS ADDED... 
**  1981-06-30 /ME   CHANGED SEQUENCE IN EXTERNAL EQUATES 
**  1981-06-26 /ME   W:KMP INCLUDED IN W:INIT 
**  1981-06-18 /GM   WSM POOL MOVED TO W:KMP. 
**  1981-05-27 /ME   CHANGED LAYOUT OF WWI-AREA 
**  1981-05-25 /ME   CREATION OF W:INIT 
**  23 MAR 81 /GM    CREATION OF W:KMP
	EJECT

	ENTRY	W:INIT 
	ENTRY	S:GTAB	DESCRIPTOR USED BY SYSLOD 
	ENTRY	W:ICFC	INTERTASK COMM. FILE CODES
	ENTRY	W:DYFC	DISPLAY FILE CODES
	ENTRY	W:CUMO	DISPLAY CURSOR MODE 
	ENTRY	W:BZFC	BUZZER FILE CODE
	ENTRY	W:ECHO 
	ENTRY	W:KTB1 
	ENTRY	W:KT1V 
	ENTRY	W:KTB2 
	ENTRY	W:KTB3 
	ENTRY	W:KTB4 
	ENTRY	W:KTB5 
	ENTRY	W:KTB6 
	ENTRY	W:SM01 
	ENTRY	W:SM02 
	ENTRY	W:SM03 
	ENTRY	W:SM04 
	ENTRY	W:SM05 
	ENTRY	W:SM5C 
	ENTRY	W:SM5S 
	ENTRY	W:SM5F 
	ENTRY	S:POOL	
	ENTRY	S:POLA	
	ENTRY	S:FILT	
	ENTRY	S:POLF	
	ENTRY	S:FORD 
	ENTRY	WSMTAB	WSM FUNCTIONS 
	ENTRY	W:VALA	VALIDATION LANGUAGE 
	ENTRY	W:STMT	VALIDATION LANGUAGE STATEMENTS
	ENTRY	W:OPER	VALIDATION LANGUAGE OPERATORS 
	ENTRY	W:FHCA	-> TO WSM FILE HANDLER CODE 
	ENTRY	W:DSPA	-> TO DISPLAY WRITING/CLEARING ROUTINE
	ENTRY	W:USRU	USERDEFINED ASS. ROUTINE
	ENTRY	W:PBUF	          " 
	ENTRY	W:BUGG	BASIC DEBUGGER
	ENTRY	W:NUMP	PACKOPTION FOR NUM DATA 
	ENTRY	W:UFTB	TABLE FOR EXTERNAL FUNCTION CALLS 
	EJECT

**********************************************************************
**                    EXTERNAL TO:                                  **
**                    WSM INTERPRETER MAIN LOOP.                    **
**********************************************************************

	EXTRN	W:STRT 

**********************************************************************
**                    EXTERNAL TO:                                  **
**                    FILE HANDLER TASK.                            **
**********************************************************************

	EXTRN	WD:FIL	FILE-HANDLER TASK 

**********************************************************************
**                    EXTERNALS TO:                                 **
**                    WSM FUNCTIONS.                                **
**********************************************************************

	EXTRN	W:OPEN	WOPEN 
	EXTRN	W:ATCH	WATTCH
	EXTRN	W:RCIV	WRCIVE
	EXTRN	W:MSG	WMSG 
	EXTRN	W:SEND	WSEND 
	EXTRN	W:PRNT	WPRINT
	EXTRN	W:CLOSE	WCLOSE 
	EXTRN	W:SAVE	WSAVE 
	EXTRN	W:DLET	WDLETE
	EXTRN	W:FATR	WFATTR
	EXTRN	W:CODE	WCODE 
	EXTRN	W:FID	WFID 
	EXTRN	W:GTPM	GET FIELD PARAMETERS
	EXTRN	W:ENDR 
	EJECT
**********************************************************************
**                    EXTERNALS TO:                                 **
**                    WSM VALIDATION LANGUAGE - STATEMENTS.         **
**********************************************************************

	EXTRN	W:VEVA	VALIDATION EVALUATION MAIN ROUTINE

	EXTRN	W:V000	ALPHANUM ASSIGNMENT 
	EXTRN	W:V002	NUM ASSIGNMENT
	EXTRN	W:V004	GO TO/GOTO
	EXTRN	W:V006	IF...THEN LIN NO
	EXTRN	W:V008	IF...THEN STATEMENT 
	EXTRN	W:V00A	ON...GO TO/GOTO LINE NO 
	EXTRN	W:V00C	CALL
	EXTRN	W:V00E	SECT
	EXTRN	W:V010	ATTR
	EXTRN	W:V012	STOP
	EXTRN	W:V014	EXIT
	EXTRN	W:V016	ERR 
	EXTRN	W:V018	WARN
	EXTRN	W:V01A	REM 
	EXTRN	W:V01C	EMPTY STATEMENTS

**********************************************************************
**                    EXTERNALS TO:                                 **
**                    WSM VALIDATION LANGUAGE - OPERATORS.          **
**********************************************************************

	EXTRN	W:CMP	RELATIONAL OPERATORS 

	EXTRN	W:OP0E	CONCATENATE 
	EXTRN	W:OP0F	SUBSTRING 
	EXTRN	W:OP10	STR 
	EXTRN	W:OP11	MAKE POSITIVE 
	EXTRN	W:OP12	NEGATE
	EXTRN	W:OP13	ADD 
	EXTRN	W:OP14	SUBTRACT
	EXTRN	W:OP15	DIVIDE
	EXTRN	W:OP16	MULTIPLY
	EXTRN	W:OP17	ABS 
	EXTRN	W:OP18	INT 
	EXTRN	W:OP19	SGN 
	EXTRN	W:OP1A	TIM 
	EXTRN	W:OP1B	DAY 
	EXTRN	W:OP1C	SYS 
	EXTRN	W:OP1D	LEN 
	EXTRN	W:OP1E	NUM 
	EXTRN	W:OP1F	DAT 
	EXTRN	W:OP20	CDV 
	EXTRN	W:OP21	POS 
	EXTRN	W:EXP5	DUMMY ENTRY IN W:EXPR 
	EJECT
**********************************************************************
**                                                                  **
**                    EXTERNAL TO WSM BASIC LANGUAGE DEBUGGER       **
**                                                                  **
**********************************************************************

	EXTRN	W:BBUG 

**********************************************************************
**                    EXTERNAL:                                     **
**                    WRITE/ERASE DISPLAY ROUTINE                   **
**********************************************************************

	EXTRN	W:WDSP 



**********************************************************************
**                    EXTERNAL:                                     **
**                    ROUTINES TO PACK NUMERIC DATA                 **
**                    WITH AND WITHOUT DECIMAL POINT OR COMMA.      **
**********************************************************************

	EXTRN	W:NPA2 
	EXTRN	W:NPA3 
	EJECT

**********************************************************************
**                    EXTERNAL FUNCTION CALLS:                      **
**                    ASSEMBLERROUTINES CALLED FROM THE VALIDATION  **
**                    AND LINKED WITH WSM.                          **
**********************************************************************

	EXTRN	UF00 
	EXTRN	UF01 
	EXTRN	UF02 
	EXTRN	UF03 
	EXTRN	UF04 
	EXTRN	UF05 
	EXTRN	UF06 
	EXTRN	UF07 
	EXTRN	UF08 
	EXTRN	UF09 
	EXTRN	UF10 
	EXTRN	UF11 
	EXTRN	UF12 
	EXTRN	UF13 
	EXTRN	UF14 
	EXTRN	UF15 
	EXTRN	UF16 
	EXTRN	UF17 
	EXTRN	UF18 
	EXTRN	UF19 
	EXTRN	UF20 
	EXTRN	UF21 
	EXTRN	UF22 
	EXTRN	UF23 
	EXTRN	UF24 
	EXTRN	UF25 
	EXTRN	UF26 
	EXTRN	UF27 
	EXTRN	UF28 
	EXTRN	UF29 
	EXTRN	UF30 
	EXTRN	UF31 
	EXTRN	UF32 
	EXTRN	UF33 
	EXTRN	UF34 
	EXTRN	UF35 
	EXTRN	UF36 
	EXTRN	UF37 
	EXTRN	UF38 
	EXTRN	UF39 
	EXTRN	UF40 
	EXTRN	UF41 
	EXTRN	UF42 
	EXTRN	UF43 
	EXTRN	UF44 
	EXTRN	UF45 
	EXTRN	UF46 
	EXTRN	UF47 
	EXTRN	UF48 
	EXTRN	UF49 
	EXTRN	UF50 
	EXTRN	UF51 
	EXTRN	UF52 
	EXTRN	UF53 
	EXTRN	UF54 
	EXTRN	UF55 
	EXTRN	UF56 
	EXTRN	UF57 
	EXTRN	UF58 
	EXTRN	UF59 
	EXTRN	UF60 
	EXTRN	UF61 
	EXTRN	UF62 
	EXTRN	UF63 
	EXTRN	UF64 
	EXTRN	UF65 
	EXTRN	UF66 
	EXTRN	UF67 
	EXTRN	UF68 
	EXTRN	UF69 
	EXTRN	UF70 
	EXTRN	UF71 
	EXTRN	UF72 
	EXTRN	UF73 
	EXTRN	UF74 
	EXTRN	UF75 
	EXTRN	UF76 
	EXTRN	UF77 
	EXTRN	UF78 
	EXTRN	UF79 
	EXTRN	UF80 
	EXTRN	UF81 
	EXTRN	UF82 
	EXTRN	UF83 
	EXTRN	UF84 
	EXTRN	UF85 
	EXTRN	UF86 
	EXTRN	UF87 
	EXTRN	UF88 
	EXTRN	UF89 
	EXTRN	UF90 
	EXTRN	UF91 
	EXTRN	UF92 
	EXTRN	UF93 
	EXTRN	UF94 
	EXTRN	UF95 
	EXTRN	UF96 
	EXTRN	UF97 
	EXTRN	UF98 
	EXTRN	UF99 
	EJECT

**********************************************************************
**                    EXTERNAL:                                     **
**                    USERDEFINED ASSEMBLER ROUTINE LINKED WITH     **
**                    WSM.                                          **
**                    REPLACE EXTERNALS BELOW WITH NAME OF THE      **
**                    ASSEMBLER ROUTINE                             **
**********************************************************************

	EXTRN	Q:S902 
	EXTRN	Q:S904 
	EJECT

	NLIST		GLOBAL EQUATES (SEE W:EQU)
	EJECT




****************************************
** LATEST UPDATING: 1983-05-04  BY: TS *
****************************************
	EJECT
**
**  WSM FUNCTION CODES
**

WOPEN	EQU	/0000 
WATTCH	EQU	/0100
WRCIVE	EQU	/0200
*UNPCK   EQU       -
WMSG	EQU	/0300
WSEND	EQU	/0400 
WPRINT	EQU	/0500
WCLOSE	EQU	/0600
WSAVE	EQU	/0700 
WDLETE	EQU	/0800
WFATTR	EQU	/0900
WCODE	EQU	/0A00 
WFID	EQU	/0B00
 EJECT

**
**  WSM SYSTEM PARAMETERS 
**

TFP	EQU	1	CONDITIONAL ASSEMBLY FOR TFP PACKAGE
CPU	EQU	857 

POLSIZ	EQU	248	SIZE OF POOL UNITS IN THE POOL 
POLDIS	EQU	6	USER DISPLACEMENT IN POOL-UNITS
PADLEN	EQU	12	LENGTS OF POOL-ADM-DATA 
FIDSIZ	EQU	4	SIZE OF FIELD IDENTITY 

** SCRSIZ & EKOCHR MOVED 1981-09-07 TO W:INIT **

**
**  OPTIONAL DEVICES
**

PRTDEV	EQU	12	=12 IF PRINT DEVICE IN SYSTEM, ELSE =0
INPDEV	EQU	0	=12 IF OTHER INPUT DEVICE THAN KEYBOARD ...
			... IN SYSTEM, ELSE =0 

**
**  BUFFER SIZES
**

** MOVED 1981-08-04 TO W:INIT **
	EJECT

**
**  DISPLACEMENTS IN ECB
**

ECB:FC	EQU	0
ECB:BA	EQU	2
ECB:RL	EQU	4
ECB:EL	EQU	6
ECB:RC	EQU	8
ECB:CW	EQU	10 
	EJECT

**
**  ORDERS TO THE POOL & FILE HANDLER 
**

PF:RD	EQU	/01	READ
PF:GET	EQU	/02	GET
PF:SCH	EQU	/04	SEARCH 
PF:WRT	EQU	/05	WRITE
PF:CLO	EQU	/08	CLO
PF:OFR	EQU	/10	LOCK 
PF:RLS	EQU	/20	RELEASE
PF:DLT	EQU	/40	DELETE 
PF:OPN	EQU	/80	OPEN 
NEXT	EQU	/0100	NEXT 
PREV	EQU	/0200	PREVIOUS 
INDEX	EQU	/0400	BY INDEX
ALL	EQU	/0800	ALL ON LRU QUE
NOWAIT	EQU	/1000	USED FOR READ WITH NOWAIT
	EJECT
**
**  DISPLACEMENTS IN THE POOL & FILE HANDLER COM. AREA
**

PF:BF1	EQU	0	ADDRESS TO BUFFER 1
PF:BF2	EQU	PF:BF1+2	ADDRESS TO BUFFER 2 
PF:TYP	EQU	PF:BF2+3	TYPE OF DATA
PF:NAM	EQU	PF:TYP+1	IDENTIFICATION
**
**           THIS PART OF THE COM. AREA IS THE ECB
**
PF:ECB	EQU	PF:NAM+6	START OF THE ECB
PF:FNR	EQU	PF:ECB+1	FILE NUMBER 
PF:IOB	EQU	PF:FNR+1	ADDRESS TO THE I/O-BUFFER 
PF:RLN	EQU	PF:IOB+2	REQUESTED LENGTH
PF:ELN	EQU	PF:RLN+2	EFFECTIVE LENGTH
PF:RET	EQU	PF:ELN+2	RETURN CODE 
PF:CW1	EQU	PF:RET+2	CONTROL WORD 1
PF:CW2	EQU	PF:CW1+2	CONTROL WORD 2
**
**           THIS PART OF THE COM. AREA IS FOR THE FPB
**
PF:FIL	EQU	PF:CW2+2	THE FILE NAME 
PF:VOL	EQU	PF:FIL+8	THE VOLUME NAME 
PF:RN1	EQU	PF:VOL+6	RECNO 1 
PF:RN2	EQU	PF:RN1+2	RECNO 2 
PF:END	EQU	PF:RN2+2 
	EJECT
**
** LAYOUT OF POOL-FREE-SPACE AREA 
**
PP:CON	EQU	0	NO OF FREE UNITS IN THIS AREA
PP:LEN	EQU	PP:CON+2	LENGTH OF THIS AREA 
PP:NAM	EQU	PP:LEN+2	NAME OF THIS AREA 
PP:BIT	EQU	PP:NAM+2	FREE-SPACE INDICATOR BITS 
**
	EJECT
**
** LAYOUT OF FREE-SPACE ON DISC 
**
DS:TYP	EQU	0	TYPE = "FS"
DS:LK1	EQU	DS:TYP+2	LINK FORWARD  1 
DS:LK2	EQU	DS:LK1+2	 -  "  -      2 
DS:NUM	EQU	DS:LK2+2	NUMBER OF RECORDS 
DS:NOF	EQU	DS:NUM+2	NUMBER OF FREE RECORDS
DS:FI1	EQU	DS:NOF+2	FIRST REL.RECNO 
DS:FI2	EQU	DS:FI1+2	 USED AS REC.BASE 
DS:REL	EQU	DS:FI2+2	RELATIV FR.SP.REC.
DS:PTR	EQU	DS:REL+1	FREE-SPACE POINTERS 

DS:RLN	EQU	256	RECORD LENGTH
**
**  POOL-ADMINSTRATION DATA 
**
PA:TYP	EQU	0	TYPE OF DATA IN THE UNIT 
PA:IDE	EQU	PA:TYP+1	NAME OF DATA
PA:FIL	EQU	PA:IDE+6	FILE NUMBER 
PA:NUM	EQU	PA:FIL+1	NUMBER OF USERS 
PA:SEG	EQU	PA:NUM+1	SEGMENT NUMBER
PA:UNI	EQU	PA:SEG+1	POOL-UNIT 
PA:LNK	EQU	PA:UNI+1	LINK TO NEXT
	EJECT
**
**  FILE-TABLE LAYOUT 
**
PT:FIL	EQU	0	FILENAME 
PT:VOL	EQU	PT:FIL+8	VOLUME NAME 
PT:FC	EQU	PT:VOL+6	FILE CODE
PT:CON	EQU	PT:FC+1	COMPULSURY COUNTER 
PT:OC	EQU	PT:CON+1	OPEN/CLOSE BYTE
PT:ACT	EQU	PT:OC+1	ACTIVE COUNTER 
PT:LEN	EQU	18	LENGTH OF ONE ENTRY 
PT:END	EQU	72	LENGT OF FILE-TABLE 

**
**  ORDER-DATA LAYOUT 
**
PO:ORD	EQU	0	ORDER
PO:TYP	EQU	PO:ORD+2	TYPE + NAME 
PO:FIL	EQU	PO:TYP+7	FILE TABLE NO. (0-3)
PO:LNK	EQU	PO:FIL+1	LINK TO NEXT ORDER
PO:LEN	EQU	12	LENGTH OF ONE ORDER 
PO:STA	EQU	4	START OF ORDERS
PO:END	EQU	256	LENGTH OF ORDER-TABLE
PO:RDY	EQU	/8000	ORDER EXECUTED 
PO:DLY	EQU	1	DELAY TIME 
	EJECT

**
**  KEYBOARD ECB AND PARAMETER BLOCK FOR ADVANCED READ
**

KB:CW2	EQU	ECB:CW+2 
KB:PBL	EQU	KB:CW2+2	PARAMETER BLOCK LENGTH
KB:EKO	EQU	KB:PBL+1	ECHO CHARACTER (/00 => ORDINARY ECHO) 
KB:PW	EQU	KB:EKO+1	PARAMETER WORD 
KB:CUR	EQU	KB:PW+2	CURSOR POSITION WORD 
KB:SHB	EQU	KB:CUR+2	SHIFT BUFFER BYTE 
KB:CND	EQU	KB:SHB+1	CURRENT # DECIMALS
KB:PL	EQU	KB:CND+1	PICTURE LENGTH 
KB:CNI	EQU	KB:PL+1	CURRENT # INTEGERS OR CHARACTERS 
KB:IL	EQU	KB:CNI+1	INPUT LENGTH 
KB:POS	EQU	KB:IL+1	POSITION IN FIELD
KB:PNT	EQU	KB:POS+1	DECIMAL POINT STATUS WORD 
KB:MNI	EQU	KB:PNT+2	MAX # INTEGERS
KB:MND	EQU	KB:MNI+1	MAX # DECIMALS
KB:END	EQU	KB:MND+1 
	EJECT

**
**  WS:TCA
**  WSM TASK CONTROL AREA 
**

TC:TID	EQU	0	WSM TASK ID
TC:FC	EQU	TC:TID+2	PREVIOUS FUNCTION CODE 
TC:SCR	EQU	TC:FC+1	BITS FOR WATTCH, WRCIVE ETC.:
			BIT 0: 
			- DURING WRCIVE: 
			.    = 1 IF INPUT BUFFER CHANGED BY DUPLICATION
			.        OR VALIDATION OR IF MINUS KEY USED
			BIT 1: 
			- DURING WRCIVE: 
			.    = 1 IF NEGATIVE INPUT 
			BIT 2: 
			- DURING WRCIVE: 
			.    = 1 IF FIELDLIST FIELD NOT IN SECTION 
			BIT 3: 
			- DURING WRCIVE: 
			.    = 1 IF PB BUFFER IS FULL
			*******
			BIT 4: 
			- DURING WRCIVE: 
			.    = 1 IF VALIDATION AFTER ENTER KEY 
			BIT 5: 
			- DURING WATTCH: 
			.    = 1 IF WANTED SECTION IS BEFORE ... 
			.        ATTACHED SECTION IN SST 
			BIT 6 = 1 IF WATTCH WITHOUT DISPLAY
			BIT 7 =1 IF WANTED PAGE IS ON SCREEN 
	EJECT

TC:MSC	EQU	TC:FC+2	MISCELLANEOUS: 
			BIT 0-1: 
			-   NOT USED 
			*******
			BIT  2:
			-    =1 IF LOOP DETECTOR RUNNING 
			BIT  3:
			-    =1 IF BASIC DEBUGGER ON 
			BIT  4:
			-    =1 IF WMSG ON HELP LINE 
			BIT  5:
			-    =1 IF WMSG ON ERROR LINE
			BIT  6:
			-   =1 IF ERROR MSG ON ERROR LINE
			BIT  7:
			-   =1 IF EXT.PROMPT OR GUID. MSG
			.       OR WMSG ON HLP LINE OR SEC,FUN 
			BIT  8:
			-   = 1 IF ALL KEY USED
			BIT  9:
			-   = 1 IF CORRECTION AFTER ERROR HANDLING 
			BIT 10:
			-   = 1 IF LKM BLOCKING ON CURRENT SUBSCREEN 
			.     ( <=> CURSOR OFF ) 
			BIT 11:
			-   = 1 IF BLACK BACKGROUND
			*******
			BIT 12:
			-   = 1 IF VD82/83 (8 SUBSCREENS,
			.                   1 SYSTEM LINE) 
			BIT 13:
			-   NOT USED 
			BIT 14:
			-   = 1 IF PD85 ETC (ONE-LINE DISPLAYS)
			BIT 15:
			-   = 1 IF AUTO SKIP/DUP FLAG IS ON

	EJECT
** INFORMATION ABOUT TWO MESSAGELINES: ** 

TC:MSG	EQU	TC:MSC+2	SEE W:MESS AND W:MESG IN W:INIT 

** SUBSCREEN INFORMATION: **

TC:SZE	EQU	TC:MSG+2	SIZE OF SUBSCREEN 1 
TC:SIZ	EQU	TC:SZE+2	CURRENT SCREEN/SUBSCREEN SIZE 
TC:SUS	EQU	TC:SIZ+2	CURRENT SUBSCREEN NO. 
TC:LIN	EQU	TC:SUS+2	1:ST FREE LINE ON CURR. SCREEN/SUBSCREEN
			... FOLLOWED BY 1:ST FREE LINE OF
			... 9 SUBSCREENS 
TC:FRD	EQU	TC:LIN+11	DISPL. TO BE ADDED TO 1:ST FREE LINE 
			... WHEN HAVING SECTIONS ON MSG LINE ON OTHER
			... DISPLAYS THAN VD82 (RIGHT BYTE REQ.) 

** CURRENT FORMAT DEF INFORMATION: ** 

TC:FDC	EQU	TC:FRD+1	ADDR. TO FORMAT DEFINITION CODE 

** SST INFORMATION: **

TC:SST	EQU	TC:FDC+2	0. ADDR. TO 1:ST BYTE AFTER SST 
			2. "     "  CURRENT SECTION IN SST 
			4. "     "  LAST SECTION IN SST
			6. LARGEST SECTION SEQUENCE NUMBER IN USE
			8. SST ADDR. OF SECTION ON MSG LINE

** CURRENT SECTION INFORMATION: **

TC:FSC	EQU	TC:SST+10	ADDR. TO FORMAT SECTION CODE 
TC:CFC	EQU	TC:FSC+2	"     "  CURRENT DYN. FIELD CODE
			"     "  "       "    "     "    (REL) 
TC:DFD	EQU	TC:CFC+4	"     "  1:ST BYTE IN DFD 
TC:CFD	EQU	TC:DFD+2	ADDR. TO CURRENT DYN. FIELD DATA
TC:CFX	EQU	TC:CFD+2	INDEX OF CURRENT DYN. FIELD 
TC:KY1	EQU	TC:CFX+2	ADDRESS TO KEYTABLE 1.
TC:KTV	EQU	TC:KY1+2	ADDRESS TO BITMASK FOR KEYCHECKS

	EJECT
** WWI:S, ECB:S, BUFFER:S AND STACK: ** 

TC:CN1	EQU	TC:KTV+2	LOOP COUNTER SECTION LEVEL
TC:CN2	EQU	TC:CN1+2	LOOP COUNTER FIELD LEVEL
TC:IIE	EQU	TC:CN2+2	ADDR TO 1ST BYTE AFTER INPUT BUFFER 
TC:WWI	EQU	TC:IIE+2	ADDR. TO WWI:S, EQUAL TO ...
TC:IOE	EQU	TC:WWI	ADDR TO 1ST BYTE AFTER OUTPUT BUFFER
TC:STK	EQU	TC:IOE+2	ADDR TO THE STACK, WS:STK 
TC:PFB	EQU	TC:STK+2	POOL & FILE HANDLER COM. AREA ... 
TC:FIL	EQU	TC:PFB+PF:ECB	... INCLUDING DISC FILE PARAMETERS 
TC:IC	EQU	TC:PFB+PF:END	INTERTASK COM. ECB
TC:KB	EQU	TC:IC+14	KEYBOARD  ECB
TC:EKO	EQU	TC:KB+KB:END	ECHO DEVICE ECB 
TC:PRT	EQU	TC:EKO+PRTDEV	PRINT DEVICE ECB 
TC:INP	EQU	TC:PRT+INPDEV	OTHER INPUT DEVICE ECB 
	EJECT

**
**  WSM PARAMETER BLOCK 
**

PB:FC	EQU	TC:INP+12	WSM FUNCTION CODE 
PB:FOR	EQU	PB:FC+2	CURRENT FORMAT DEFINITION NAME 
PB:SEC	EQU	PB:FOR+6	CURRENT FORMAT SECTION NAME 
PB:SSN	EQU	PB:SEC+6	CURRENT SECTION SEQUENCE NUMBER 
PB:SUS	EQU	PB:SSN+2	CURRENT SUBSCREEN 
PB:INP	EQU	PB:SUS+1	INPUT ALLOWED, =0 IF YES, =1 IF NO
PB:FID	EQU	PB:INP+1	CURRENT FIELD IDENTITY
PB:FNO	EQU	PB:FID+4	FIELD NUMBER
PB:RC	EQU	PB:FNO+2	RETURN CODE
PB:KID	EQU	PB:RC+2	KEY ID 1 & 2 
PB:XIT	EQU	PB:KID+4	EXIT ROUTINE NUMBER 
PB:EBL	EQU	PB:XIT+2	EFFECTIVE LENGTH OF BUFFER CONTENTS 
PB:MBL	EQU	PB:EBL+4	MAXIMUM LENGTH OF BUFFER CONTENTS 
PB:BLO	EQU	PB:MBL+2	TYPE OF BUFFER LAYOUT 
PB:PRFC	EQU	PB:BLO+1	PRINTER DEVICE FILE CODE 
PB:BUF	EQU	PB:PRFC+1	PARAMETER BLOCK BUFFER 
	EJECT

**
**  DISPLACEMENTS IN SECTION SEQUENCE TABLE ELEMENTS
**

*                 0                     SECTION DFD ADDRESS 
SS:DFD	EQU	2	SECTION DFD SIZE 
SS:SCR	EQU	SS:DFD+2	SECTION ON SCREEN INDICATION
SS:TYP	EQU	SS:SCR+1	SECTION TYPE
SS:SS	EQU	SS:SCR+2	SUBSCREEN & SECTION SEQUENCE NO. 
SS:LIN	EQU	SS:SS+2	(SUB-)SCREEN START LINE & NO. OF LINES 
			1:ST & LAST+1 LINE SHOWN 
SS:CFX	EQU	SS:LIN+4	CURRENT DYNAMIC FIELD INDEX 
SS:SEC	EQU	SS:CFX+2	SECTION NAME
SS:LEN	EQU	SS:SEC+6	LENGTH OF SST ELEMENT 


**
** DISPLACEMENTS IN WSM WORK ITEMS OVERHEAD 
**

WWI:NF	EQU	0	NO OF FAST CHOISE SECTION WWI:S
WWI:LF	EQU	WWI:NF+1	LENGTH OF ONE FAST CHOISE SECT WWI
WWI:NN	EQU	WWI:LF+1	NO OF NUMERIC WWI:S 
WWI:LN	EQU	WWI:NN+1	LENGTH OF ONE NUMERIC WWI 
WWI:AN	EQU	WWI:LN+1	ADDRESS TO FIRST NUMERIC WWI
WWI:NA	EQU	WWI:AN+2	NO OF ALPHANUMERIC WWI:S
WWI:LA	EQU	WWI:NA+1	LENGTH OF ONE ALPHANUMERIC WWI
WWI:AA	EQU	WWI:LA+1	ADDRESS TO FIRST ALPHANUMERIC WWI 
WWI:LO	EQU	WWI:AA+2	LENGTH OF WWI OVERHEAD
	EJECT

**
**  FORMAT DEFINITION CODE
**

FD:FOR	EQU	0	FORMAT DEFINITION NAME 
FD:ISN	EQU	FD:FOR+6	INTIAL SECTION NAME 
FD:DSK	EQU	FD:ISN+6	# DISC SECTORS (BITS 0-7) 
FD:FCS	EQU	FD:DSK+4	LIST OF FAST CHOICE SECTION NAMES 
	EJECT

**
**  FORMAT SECTION CODE 
**

**  SECTION TYPES 

RWS	EQU	1	REMOVABLE WITH SCROLLING
RWP	EQU	2	REMOVABLE WITH PAGING 
FIX	EQU	4	FIXED 
FOB	EQU	RWS	FIXED ON BOTTOM LINES OF SCREEN 
FONP	EQU	RWP	FIXED ON TOP OF NEW PAGE 
TEMP	EQU	8	TEMPORARY
SECMSK	EQU	/F	MASK ISOLATING TYPE BITS

**  SECTION OVERHEAD

SO:SEC	EQU	0	SECTION NAME 
SO:PSW	EQU	SO:SEC+6	( PASSWORD )
SO:DSK	EQU	SO:PSW+6	NO. OF DISC SECTORS 
SO:ONO	EQU	SO:PSW+7	OBJECT CODE VERSION 
SO:VNO	EQU	SO:DSK+4	SECTION VERSION NO. & TYPE
SO:SIZ	EQU	SO:VNO+2	DEFINED SECTION SIZE, ROWS & COLUMNS, AND ... 
			... EFFECTIVE SECTION SIZE 
SO:DFD	EQU	SO:SIZ+4	DFD SIZE
SO:SFC	EQU	SO:DFD+2	REL. ADDR TO STATIC FIELDS
SO:PP	EQU	SO:SFC+2	"    "    "  PICTURE POOL
SO:DFC	EQU	SO:PP+2	"    "    "  DYNAMIC FIELDS
SO:NDF	EQU	SO:DFC+2	DEC POINT OR COMMA & NO. OF DYN. FIELDS 
SO:BGA	EQU	SO:NDF+4	BACKGROUND DEFAULT ATTRIBUTES 
SO:SFA	EQU	SO:BGA+1	STATIC FIELD DEFAULT ATTRIBUTES 
SO:DFA	EQU	SO:SFA+1	DYN. FIELD DEFAULT ATTRIBUTES 
SO:MES	EQU	SO:DFA+4	DEFAULT GUIDING MESSAGE 
	EJECT

**  STATIC FIELDS 

SF:DEC	EQU	/1F	LARGEST DECORATION BYTE
SF:SPA	EQU	/80	COMPRESSED SPACES
SF:DF	EQU	/FB	DYNAMIC FIELDS
SF:HL	EQU	/FC	HEADER LINES
SF:EOL	EQU	/FD	END OF LINE
SF:EOS	EQU	/FE	END OF SECTION 
SF:EOP	EQU	/FF	END OF POOL UNIT 
	EJECT

**  DYNAMIC FIELDS

			DYNAMIC FIELD TABLE DISPLACEMENTS

DF:FID	EQU	0	FIELD IDENTITY 
DF:COD	EQU	DF:FID+4	FIELD CODE ADDR: POOL & REL POOL ADDR 
DF:DAT	EQU	DF:COD+2	FIELD DATA DISPL. EXCL. TEMP. DECORATIONS ETC.
DF:TLN	EQU	DF:DAT+2	FIELD TABLE ELEMENT LENGTH

			DYNAMIC FIELD CODE DISPLACEMENTS 

DF:ALN	EQU	0	ATTRIBUTE AREA LENGTH INCL. OPTIONAL PARTS 
DF:SCR	EQU	DF:ALN+2	REL. POSITION IN SECTION
DF:FLN	EQU	DF:SCR+2	MAX. EFFECTIVE & EDITED LENGTH
DF:TYP	EQU	DF:FLN+2	NUM- & ALPHANUM DEPENDANT INFORMATION 
DF:INP	EQU	DF:TYP+2	BITS CONCERNING INPUT HANDLING
DF:DEC	EQU	DF:INP+2	DECORATION BITS 
DF:OPT	EQU	DF:DEC+2	START OF OPTIONAL PART

			OPTIONS: 

DF:VAL	EQU	1	VALIDATION 
DF:ACC	EQU	2	ACCUMULATION 
DF:DUP	EQU	3	DUPLICATION ORIGIN 
DF:AM	EQU	4	APPLICATION MESSAGE 
DF:IFC	EQU	5	FILE CODE, OTHER INPUT DEVICE
DF:DEF	EQU	6	DEFAULT VALUE
DF:OUT	EQU	7	OUTPUT PRINT POSITION
DF:GM	EQU	15	GUIDING MESSAGE
	EJECT

**********************************************************************
**                WSM VALIDATION STATEMENT TYPES                    **
**********************************************************************

VS:ALE	EQU	/00	ALPHANUM LET EXCL. LET 
VS:ALI	EQU	/01	ALPHANUM LET INCL. LET 
VS:NLE	EQU	/02	NUMERIC  LET EXCL. LET 
VS:NLI	EQU	/03	NUMERIC  LET INCL. LET 
VS:GO	EQU	/04	GO TO 
VS:GOT	EQU	/05	GOTO 
VS:IFL	EQU	/06	IF <REL. EXPR.> THEN LINENO
VS:IFS	EQU	/08	IF <REL. EXPR.> THEN STATEMENT 
VS:OGO	EQU	/0A	ON <EXPR.> GO TO LINENUMBERS 
VS:OGT	EQU	/0B	ON <EXPR.> GOTO  LINENUMBERS 
VS:CAL	EQU	/0C	CALL 
VS:SEC	EQU	/0E	SECT 
VS:ATT	EQU	/10	ATTR 
VS:STO	EQU	/12	STOP 
VS:EXI	EQU	/14	EXIT 
VS:ERR	EQU	/16	ERR
VS:WAR	EQU	/18	WARN 
VS:REM	EQU	/1A	REM
VS:EMP	EQU	/0C	EMPTY
	EJECT

**********************************************************************
**                VALIDATION OPERATOR EQUATES                       **
**********************************************************************

VO:EEX	EQU	1	END OF EXPRESSION
VO:AEQ	EQU	2	= , ALPHANUMERIC COMPARISON
VO:AGE	EQU	3	>=, "
VO:AGT	EQU	4	> , "
VO:ALE	EQU	5	<=, "
VO:ALT	EQU	6	< , "
VO:ANE	EQU	7	<>, "
VO:NEQ	EQU	8	= , NUMERIC COMPARISON 
VO:NGE	EQU	9	>=, "
VO:NGT	EQU	/0A	> , "
VO:NLE	EQU	/0B	<=, "
VO:NLT	EQU	/0C	< , "
VO:NNE	EQU	/0D	<>, "
VO:CON	EQU	/0E	CONCATENATE
VO:SUS	EQU	/0F	SUBSTRING
VO:STR	EQU	/10	STR FUNCTION 
VO:UPL	EQU	/11	UNARY PLUS 
VO:UMI	EQU	/12	"     MINUS <=> NEGATE 
VO:ADD	EQU	/13	ADD
VO:SUB	EQU	/14	SUBTRACT 
VO:DIV	EQU	/15	DIVIDE 
VO:MUL	EQU	/16	MULTIPLY 
VO:ABS	EQU	/17	ABS FUNCTION 
VO:INT	EQU	/18	INT "
VO:SGN	EQU	/19	SGN "
VO:TIM	EQU	/1A	TIM "
VO:DAY	EQU	/1B	DAY "
VO:SYS	EQU	/1C	SYS "
VO:LEN	EQU	/1D	LEN "
VO:NUM	EQU	/1E	NUM "
VO:DAT	EQU	/1F	DAT "
VO:CDV	EQU	/20	CDV "
VO:POS	EQU	/21	POS "
VO:PAR	EQU	/22	PARANTHESIS
	EJECT

**********************************************************************
**                EQUATES TO THE DIFFERENT KEYTABLES                **
**********************************************************************

**
**  KEYTABLE 1 & 2
**

K1:CUP	EQU	1
K1:CDW	EQU	K1:CUP+1 
K1:TFD	EQU	K1:CDW+1 
K1:TBD	EQU	K1:TFD+1 
K1:PRT	EQU	K1:TBD+1 
K1:LIN	EQU	K1:PRT+1 
K1:HLP	EQU	K1:LIN+1 
K1:ARI	EQU	K1:HLP+1 
K1:ASD	EQU	K1:ARI+1 
K1:CLR	EQU	K1:ASD+1 
K1:SEC	EQU	K1:CLR+1 
K1:CR	EQU	K1:SEC+1
K1:DUP	EQU	K1:CR+1
K1:ENT	EQU	K1:DUP+1 
K1:FUN	EQU	K1:ENT+1 
K1:CAN	EQU	K1:FUN+1 
K1:USR	EQU	K1:CAN+1	K1:USR & ABOVE ARE USER DEFINED KEYS
	EJECT
**
** KEYTABLE 3 
**

K3:INS	EQU	1
K3:DEL	EQU	K3:INS+1 
K3:TFD	EQU	K3:DEL+1 
K3:TBD	EQU	K3:TFD+1 
K3:PRT	EQU	K3:TBD+1 
K3:CLR	EQU	K3:PRT+1 
K3:CAN	EQU	K3:CLR+1 
K3:USR	EQU	K3:CAN+1 

**
** KEYTABLE 4 
**

K4:CLR	EQU	1
K4:ENT	EQU	K4:CLR+1 
K4:CAN	EQU	K4:ENT+1 
K4:USR	EQU	K4:CAN+1 

**
**  KEYTABLE 5 & 6
**

K5:CLR	EQU	1
K5:CAN	EQU	K5:CLR+1 
K5:USR	EQU	K5:CAN+1	K5:USR & ABOVE ARE USER DEFINED KEYS
K6:OV	EQU	K5:CAN+1
K6:USR	EQU	K6:OV+1	K6:USR & ABOVE ARE USER DEFINED KEYS 
	EJECT
BYTE2	FORM	8,8
BIT16	FORM	1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
	LIST 





**********************************************************************
**                    THIS IS THE START OF THE AREA COMPRISING      **
**                    APPLICATION DEPENDANT DATA.                   **
**********************************************************************

**********************************************************************
**                    0. MINI INTERPRETER FOR FILE HANDLING ONLY.   **
**********************************************************************
	EJECT

**********************************************************************
**                                                                  **
**                    WSM INTERPRETER FOR FILE HANDLING ONLY        **
**                                                                  **
**		IT IS POSSIBLE TO MAKE A WSM INTERPRETER FOR
**		WSM FILE HANDLING ONLY. 
**
**		THIS IS INTERESTING TO HAVE IN E.G. THE 6911
**		OF A SYSTEM CONSISTING OF A 6911 WITH DISK
**		AND VD83:S. 
**
**		THIS INTERPRETER CAN BE GENERATED BY TAKING THE 
**		FOLLOWING ACTIONS:
**
**	A)	UNDER POINT 1 (DEFINITION OF DATA AREA SIZES) 
**		SET ALL PARAMETERS ALLOWED TO ALTER EXCEPT PBBUF
**		TO 0 (ZERO). SET PBBUF TO 256.
**	B)	UNDER POINT 2 KEEP THE DEFAULT VALUES.
**	C)	UNDER POINTS 3 AND 4
**		DELETE ALL LINES. 
**	D)	UNDER POINT 5 (WSM MEMORY BUFFER POOL)
**		DEFINE A POOL BIG ENOUGH TO HOUSE THE LARGEST 
**		FORMAT SECTION IN YOUR SYSTEM TOGETHER WITH 
**		ONE FORMAT DEFINITION (1 FORMAT DEF.= 1 POOL UNIT). 
**	E)	UNDER POINT 6 KEEP THE DEFAULT VALUES.
**	F)	UNDER POINT 7 (WSM INSTRUCTION SELECTION) 
**		EXCLUDE ALL INSTRUCTIONS EXCEPT WOPEN, WCLOSE 
**		AND WCODE AND/OR WSAVE. 
**	G)	UNDER POINT 8 (VALIDATION .... SELECTION) 
**		EXCLUDE THE COMPLETE VALIDATION.
**	H)	UNDER POINT 9 KEEP THE DEFAULT VALUES.
**	I)	UNDER POINT 10 AND 11 
**		DELETE ALL LINES
**
	EJECT
**
**	J)	REPLACE 0 (ZERO) BELOW WITH 1 (ONE).
**                        A 
**                        ! 
**		--------- 
**		! 
**		V 
X:WDSP	EQU	0
**
**		THE FILE HANDLER TASK "FW" AND AT LEAST ONE 
**		ORDINARY WSM TASK MUST BE CONFIGURATED. 
**                                                                  **
**********************************************************************

**********************************************************************
**                    EQUATES FOR WSMGEN                            **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
	NLIST
XWDSP	EQU	X:WDSP
	IFT	XWDSP=0
WDSP	EQU	1
	XIF
	NLIST
	IFT	XWDSP=1
WDSP	EQU	0
	XIF
	EJECT












**********************************************************************
**                    1. DEFINITION OF DATA AREA SIZES:             **
**********************************************************************
	EJECT

**********************************************************************
**                                                                  **
**                    WSM DATA AREA SIZES.                          **
**                    THE VALUES ARE APPLICATION DEPENDANT AND      **
**                    SHOULD BE ESTIMATED FOR ONLY  O N E  TASK.    **
**                                                                  **

X:INOF	EQU	9	NUMBER OF FAST CHOICE SECTIONS ( <10 ) 
X:IFCS	EQU	54	SIZE OF FAST CHOICE SECTIONS AREA 
			( = NO OF FAST CHOICE SECTIONS * 6 ) 

X:INON	EQU	10	NUMBER OF NUMERIC WSM WORK ITEMS
X:INUM	EQU	100	SIZE OF NUMERIC WORK ITEMS AREA
			( = NO OF ITEMS * SIZE OF ONE ITEM ) 

X:INOA	EQU	10	NUMBER OF ALPHANUM WSM WORK ITEMS 
X:IALP	EQU	100	SIZE OF ALPHANUM WORK ITEMS AREA 
			( = NO OF ITEMS * SIZE OF ONE ITEM ) 

X:TDFD	EQU	3000	SECTION DEPENDENT AREA. 
			THIS AREA IS SHARED BY THE TWO 
			FOLLOWING TABLES, ONE STARTING FROM
			THE TOP, THE OTHER FROM THE BOTTOM:

			1. SECTION SEQUENCE TABLE ( SST ) :
			EACH SECTION THAT IS ATTACHED BETWEEN
			OPEN AND CLOSE REQUIRES 20 BYTES.

			2. DYNAMIC FIELDS DATA AREA ( DFD ) :
			EACH DYN. FIELD IN EACH SECTION IN SST 
			NEEDS NO. OF CHAR.S IN FIELD + 1 BYTE+ 
			+ 1 BYTE FOR THE SIGN OF NUMERIC FIELDS. 

			ESTIMATE FOR "WORST CASE" !

	EJECT

X:BBUF	EQU	256	WSM PARAMETER BLOCK BUFFER SIZE

X:NBUF	EQU	100	INPUT (KEY BOARD) BUFFER SIZE (>=6)

X:TBUF	EQU	100	OUTPUT (DISPLAY/PRINTER) BUFFER SIZE 
			THE OUTPUT BUFFER IS ALSO USED AS
			WSM BASIC WORK AREA
**                                                                  **
**********************************************************************

**********************************************************************
**                    EQUATES FOR WSMGEN                            **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
	NLIST
XINOF	EQU	X:INOF
WWINOF	EQU	XINOF
XIFCS	EQU	X:IFCS
WWIFCS	EQU	XIFCS
XINON	EQU	X:INON
WWINON	EQU	XINON
XINUM	EQU	X:INUM
WWINUM	EQU	XINUM
XINOA	EQU	X:INOA
WWINOA	EQU	XINOA
XIALP	EQU	X:IALP
WWIALP	EQU	XIALP
XTDFD	EQU	X:TDFD
SSTDFD	EQU	XTDFD
XBBUF	EQU	X:BBUF
PBBUF	EQU	XBBUF 
XNBUF	EQU	X:NBUF
INBUF	EQU	XNBUF 
XTBUF	EQU	X:TBUF
OUTBUF	EQU	XTBUF
	LIST 
	EJECT

**********************************************************************
**                    INTERNAL EQUATES                              **
**                    (MUST NOT BE ALTERED BY THE USER)             **
**********************************************************************
	NLIST

STKSIZ	EQU	200	WSM STACK SIZE, NO. OF BYTES 
WWIWK1	EQU	WWI:LO+WWIFCS	OVERHEAD + FAST CHOISE SECTIONS
WWIWK2	EQU	WWINUM+WWIALP	NUMERIC + ALPHANUMERIC WWI:S 
WWISIZ	EQU	WWIWK1+WWIWK2	TOTAL SIZE OF WWI AREA 
TCSIZ1	EQU	PB:BUF-TC:TID	TCA + PAR. BLOCK 
TCSIZ2	EQU	PBBUF+INBUF	PAR. BLOCK BUFFER + INPUT BUFFER 
TCSIZ3	EQU	OUTBUF+WWISIZ
TCSIZ4	EQU	SSTDFD 
TCSIZ5	EQU	TCSIZ4+STKSIZ	DFD+SST+STACK
TCSIZ6	EQU	TCSIZ1+TCSIZ2	TCA+PBLOCK+PBLBUF+INBUF
TCSIZ7	EQU	TCSIZ3+TCSIZ5	OUTBUF+WWI+DFD+SST+STACK 
WRKSIZ	EQU	TCSIZ6+TCSIZ7	TOTAL SIZE OF WORK AREA
WWIFCL	EQU	6	LEHGTH OF ONE FAST CHOISE SECT WI
MSGLIN	EQU	/02	BIT MASK WHEN MESSAGE LINE OVERLAPS
			... OTHER LINE 
VD82	EQU	/08	BIT MASK WHEN VD82/83 IS USED
	LIST 

S:GTAB   EQU      * 
**********************************************************************
**                                                                  **
**  S:GTAB            PROGRAM DESCRIPTOR FOR SYSLOD                 **
**                    (MUST NOT BE ALTERED BY THE USER)             **
**                                                                  **
**********************************************************************
	NLIST

SGAPPT	DATA	APPSTA	POINTER TO APPLICATION TABLE 
SGPGMT	DATA	'AS'	PROGRAM TYPE ('AS' = ASSEMBLER)
	DATA	0,0,0,0	NOT USED
APPSTA	DATA	W:INIT	APPLICATION START ADDRESS
APPERR	DATA	0	APPL. ERROR HANDLING (0 = NOT USED) 
APPWRK	DATA	WRKSIZ
	EJECT

**********************************************************************
**                                                                  **
**	SEE POINT 0. 
**
**	ADDRESS TO ROUTINE REWRITING 
**	OR ERASING ALL SUBSCREENS USED BY ONE TASK.
**	ZERO IF INTERPRETER WITH FILE HANDLER
**	ONLY.
**                                                                  **
**********************************************************************

	IFT	WDSP=1 
W:DSPA	DATA	W:WDSP
	XIF
	IFF	WDSP=1 
W:DSPA	DATA	0 
	XIF
	LIST 
	EJECT










**********************************************************************
**                    2. DEVICE PARAMETERS:                         **
**********************************************************************
	EJECT

**********************************************************************
**                                                                  **
**                    DEVICE FILE-CODES                             **
**                    THESE CODES CAN BE ALTERED BY THE USER.       **
**

X:KB	EQU	/20	KEY BOARD INPUT
X:BZFC	EQU	/4F	KEY BOARD BUZZER (OUTPUT)
			DISPLAY OUTPUT:
X:DYFC	EQU	/58	  SYSTEM LINE
X:DYFD	EQU	/50	  SCREEN OR ...
			  1ST LOGICAL SCREEN 
X:ICFC	EQU	/D0	INTERTASK INPUT
X:ICFD	EQU	/D1	INTERTASK OUTPUT 

**
** NOTE: KB BUZZER FILE CODE = 0 => SCREEN BUZZER IS USED.
**       OTHER BUZZER FILE CODE  => KB BUZZER IS USED WITH THE HELP 
**                                  OF DRDI01 AND THIS FILE CODE. 
**                                  IF KEYBOARD BUZZER REQUESTS FAIL
**                                  THE SCREEN BUZZER IS TRIED. 
**       DRKB04 USES THE KB BUZZER IF A KB WITH BUZZER IS USED. ON OTHER
**       KB:S THE DISPLAY BUZZER IS TRIED.     ( WITHOUT USING DRDI01! )
**
** NOTE: SYSTEM LINE FILE CODE HAS RELEVANCE ONLY ON VD82/83:S. 
**       ON OTHER DISPLAYS THE LAST SCREEN LINE IS USED.
**
** NOTE: LOGICAL SCREENS ON VD82/83:S SHOULD HAVE FILE CODES IN 
**       SEQUENCE STARTING WITH THE ONE SPECIFIED ABOVE.
**
** NOTE: PRINTER FILE CODE IS INPUT FROM THE APPLICATION AT RUN-TIME !
**       (SEE WSM PARAMETER BLOCK DESCRIPTION). 
**                                                                  **
**********************************************************************

**********************************************************************
**                    EQUATES FOR WSMGEN                            **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
	NLIST
KB	EQU	X:KB 
W:BZFC	EQU	*
	DATA	X:BZFC	KEY BOARD BUZZER (OUTPUT)
	NLIST
XDYFC	EQU	X:DYFC
XDYFD	EQU	X:DYFD
			- LEFT BYTE = SYSTEM LINE
W:DYFC	EQU	*
	BYTE2	XDYFC,XDYFD	DISPLAY OUTPUT:
	NLIST
			- RIGHT BYTE = SCREEN OR ... 
			-              1:ST LOGICAL SCREEN 
XICFC	EQU	X:ICFC
XICFD	EQU	X:ICFD
W:ICFC	BYTE2	XICFC,XICFD
	LIST 

	EJECT

**********************************************************************
**                                                                  **
**                    CURSOR MODE.                                  **
**                    THIS WORD DEFINES THE LAYOUT OF THE CURSOR    **
**                                                                  **

			1 & 3 => INVERSED BLOCK, BLINKING
			2     => INVERSED BLOCK, STEADY
			4     => UNDERLINE, STEADY 
			5     => UNDERLINE, BLINKING 
			6     => INVISIBLE 
X:CUMO	EQU	2

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

**********************************************************************
**                    EQUATES FOR WSMGEN                            **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
	NLIST
XCUMO	EQU	X:CUMO

W:CUMO	EQU	*
	DATA	XCUMO 
	EJECT

**********************************************************************
**                                                                  **
**                    FILLER ECHO CHARACTER.                        **
**                    THIS CHARACTER WILL BE ECHOED INSTEAD OF      **
**                    INPUT CHAR. WHEN PICTURE CODE "*" IS USED     **
**                                                                  **

X:ECHO	EQU	'*'

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

**********************************************************************
**                    EQUATES FOR WSMGEN                            **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
	NLIST
XECHO	EQU	X:ECHO
W:ECHO	BYTE2	XECHO,XECHO
	LIST 

	EJECT
**********************************************************************
**                                                                  **
**                    ONE OR TWO MESSAGE LINES.                     **
**                                                                  **
**   ONE MESSAGE LINE IS DEFAULT. 
**   IT IS POSSIBLE TO USE TWO MESSAGE LINES. WHEN DOING THIS 
**   THEY ARE REFERRED TO AS THE HELP AND THE ERROR LINE AND
**   CONTAIN THE FOLLOWING MESSAGES:
**
**  -THE HELP LINE
**       EXTENDED PROMPT MESSAGES, GUIDING MESSAGES (HELP) ,
**       SECTION/FUNCTION INPUT AND WMSG. 
**
**  -THE ERROR LINE 
**       ERRORS (MUST ENTER,MUST FILL AND VALIDATION ERRORS), 
**       WMSG,SECTION ON MESSAGE LINE AND WSM BASIC ERRORS. 
**
**   IF TWO MESSAGELINES ARE USED THEN SET THE BITS BELOW 
**   FOR VD 82/83 AND/OR OTHER VDU:S RESPECTIVELY 
**   IF ONE MESSAGELINE IS USED KEEP DEFAULT VALUES.
**                                                                  **
**                                                                  **
**********************************************************************
	EJECT
**********************************************************************
**                                                                  **
**                    VD 82/83                                      **
**                                                                  **
**


X:MES1	EQU	0	ONE OR TWO MESSAGELINES
X:MES2	EQU	0	IMMEDIATE OR DELAYED ERASE OF ERRORMESSAGE 

**
**   TWO MESSAGE LINES: 
**
**   SET THE FOLLOWING BITS ABOVE:
**
**   X:MES1=0        INDICATES ONE MESSAGELINE
**   X:MES1=1        INDICATES TWO MESSAGE LINES
**   X:MES2=0        INDICATES THAT ERRORMESSAGES ARE ERASED
**                   WHEN ACKNOWLEDGING THE MESSAGE 
**   X:MES2=1        INDICATES THAT ERRORMESSAGES ARE ERASED
**                   AFTER CORRECTION OF THE ERROR (DELAYED ERASE). 
**   X:HLFC          SHALL CONTAIN THE SUBSCREEN FILECODE 
**                   OF THE HELP LINE. THE FILECODE OF THE
**                   ERROR LINE IS ALWAYS = /58 (SYSTEM LINE).
**
**                                                                  **
**                                                                  **
**********************************************************************

**********************************************************************
**                    EQUATES FOR WSMGEN                            **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
	NLIST
	IFT	X:MES1=0 
X:HLFC	EQU	0	HELPLINE FILECODE IRRELEVANT WHEN ONE MESSAGELINE
	XIF
	NLIST
	IFT	X:MES1=1 
X:HLFC	EQU	/57	HELPLINE FILECODE DEFAULT =/57 
	XIF
	NLIST
XMESS1	EQU	X:MES1 
XMESS2	EQU	X:MES2 
XHLPFC	EQU	X:HLFC 
BYTMES	FORM	1,1,6=0,8 
W:MESS	BYTMES	XMESS1,XMESS2,XHLPFC
	LIST 
	EJECT
**********************************************************************
**                                                                  **
**                    OTHER VDU:S THAN VD82/83                      **
**                                                                  **
**

X:MEG1	EQU	0	ONE OR TWO MESSAGELINES
X:MEG2	EQU	0	IMMEDIATE OR DELAYED ERASE OF ERROMESSAGE
X:MEG3	EQU	0	ORDER BETWEEN ERROR- AND HELPLINE ON THE LAST TWO LINES


**
**   TWO MESSAGE LINES: 
**
**   SET THE FOLLOWING BITS ABOVE:
**
**   X:MEG1=0       INDICATES ONE MESSGAELINE 
**   X:MEG1=1       INDICATES TWO MESSAGELINES
**   X:MEG2=0       INDICATES THAT ERRORMESSAGES ARE ERASED WHEN
**                  ACKNOWLEDGING THE MESSAGE 
**   X:MEG2=1       INDICATES THAT ERRORMESSAGES ARE ERASED AFTER 
**                  CORRECTION OF THE ERROR (DELAYED ERASE) 
**   X:MEG3=0       LAST LINE BUT ONE = ERRORLINE,
**                  LAST LINE = HELPLINE. 
**   X:MEG3=1       LAST LINE BUT ONE = HELPLINE, 
**                  LAST LINE = ERRORLINE.
**
**                                                                  **
**                                                                  **
**********************************************************************

**********************************************************************
**                    EQUATES FOR WSMGEN                            **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
	NLIST
XMESG1	EQU	X:MEG1 
XMESG2	EQU	X:MEG2 
XMESG3	EQU	X:MEG3 
BYTMEG	FORM	1,1,13=0,1
W:MESG	BYTMEG	XMESG1,XMESG2,XMESG3
	LIST 
	EJECT










**********************************************************************
**                    3. DEFINITION OF KEY CODES AND KEY TABLES:    **
**********************************************************************
	IFT	XWDSP=0
	EJECT

**********************************************************************
**                                                                  **
**                    KEYS HANDLED IN THE WSM INTERPRETER.          **
**                    THESE KEY CODES MIGHT BE ALTERED BY THE USER  **
**                                                                  **

	XIF
NOKEY	EQU	/EE 
	IFT	XWDSP=0
CLR	EQU	/8F	CLEAR/RECALL
TFD	EQU	/8C	TABULATION FORWARD
TBD	EQU	/8B	TABULATION BACKWARD 
CR	EQU	/0D	CARRIAGE RETURN
HLP	EQU	/94	HELP
ENT	EQU	/80	ENTER 
CAN	EQU	/91	CANCEL
PRT	EQU	/98	PRINT 
SEC	EQU	/8E	SECTION 
OV	EQU	/8D	OVERRIDE VALIDATION
DUP	EQU	/90	DUPLICATE 
ASD	EQU	/92	AUTO SKIP/DUP/BYPASS
FUN	EQU	/93	FUNCTION SELECTION
TUP	EQU	/88	TABULATION UPWARD 
TDW	EQU	/82	TABULATION DOWNWARD 

**                                                                  **
**********************************************************************
	EJECT

**********************************************************************
**                                                                  **
**                    KEYS THAT ARE NOT YET HANDLED IN THE WSM      **
**                    INTERPRETER. WHEN IMPLEMENTED THESE KEYS      **
**                    WILL ALSO BE POSSIBLE TO ALTER.               **
**                                                                  **

ARI	EQU	NOKEY	ARITHMETICS 	/??
LIN	EQU	NOKEY	LINE 	/81 

**                                                                  **
**********************************************************************
	EJECT

**********************************************************************
**                                                                  **
**                    INFORMATION ON KEYS HANDLED IN DRKB04         **
**                    NOTE: THESE CODES ARE REQUIRED BY DRKB04.     **
**                    .     *****           ********                **
**                                                                  **

INS	EQU	/0F	INSERT
DEL	EQU	/0E	DELETE
CFD	EQU	/10	CURSOR FORWARD
CBD	EQU	/09	CURSOR BACKWARD 
BSP	EQU	/08	BACKSPACE 
ERA	EQU	/05	ERASE REST OF FIELD 
MIN	EQU	/2D	MINUS AS NUMERIC EOI-KEY
ALLKEY	EQU	/03	ALL. ONLY THE COMBINATIONS:
			-   ALL + CFD
			-   ALL + CBD
			ARE SUPPORTED. 
			ON VD82/83:
SUP	EQU	/11	SCROLL UP 
SDWN	EQU	/12	SCROLL DOWN
SLFT	EQU	/13	SCROLL LEFT
SRGT	EQU	/14	SCROLL RIGHT 

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


**********************************************************************
**                    EQUATES FOR WSMGEN                            **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
	NLIST
CLR01	EQU	CLR 
CLR1	EQU	CLR01
TFD01	EQU	TFD 
TFD1	EQU	TFD01
TFD02	EQU	TFD 
TFD2	EQU	TFD02
TBD01	EQU	TBD 
TBD1	EQU	TBD01
TBD02	EQU	TBD 
TBD2	EQU	TBD02
CR01	EQU	CR 
CR1	EQU	CR01
CR02	EQU	CR 
CR2	EQU	CR02
HLP01	EQU	HLP 
HLP1	EQU	HLP01
HLP02	EQU	HLP 
HLP2	EQU	HLP02
ENT01	EQU	ENT 
ENT1	EQU	ENT01
ENT02	EQU	ENT 
ENT2	EQU	ENT02
CAN01	EQU	CAN 
CAN1	EQU	CAN01
CAN02	EQU	CAN 
CAN2	EQU	CAN02
PRT01	EQU	PRT 
PRT1	EQU	PRT01
PRT02	EQU	PRT 
PRT2	EQU	PRT02
SEC01	EQU	SEC 
SEC1	EQU	SEC01
SEC02	EQU	SEC 
SEC2	EQU	SEC02
DUP01	EQU	DUP 
DUP1	EQU	DUP01
ASD01	EQU	ASD 
ASD1	EQU	ASD01
FUN01	EQU	FUN 
FUN1	EQU	FUN01
FUN02	EQU	FUN 
FUN2	EQU	FUN02
TUP01	EQU	TUP 
TUP1	EQU	TUP01
TUP02	EQU	TUP 
TUP2	EQU	TUP02
TDW01	EQU	TDW 
TDW1	EQU	TDW01
TDW02	EQU	TDW 
TDW2	EQU	TDW02
ARI01	EQU	ARI 
ARI1	EQU	ARI01
ARI02	EQU	ARI 
ARI2	EQU	ARI02
LIN01	EQU	LIN 
LIN1	EQU	LIN01
INS03	EQU	INS 
INS3	EQU	INS03
DEL03	EQU	DEL 
DEL3	EQU	DEL03
TFD03	EQU	TFD 
TFD3	EQU	TFD03
TBD03	EQU	TBD 
TBD3	EQU	TBD03
PRT03	EQU	PRT 
PRT3	EQU	PRT03
CLR03	EQU	CLR 
CLR3	EQU	CLR03
CAN03	EQU	CAN 
CAN3	EQU	CAN03
CLR04	EQU	CLR 
CLR4	EQU	CLR04
ENT04	EQU	ENT 
ENT4	EQU	ENT04
CAN04	EQU	CAN 
CAN4	EQU	CAN04
CLR05	EQU	CLR 
CLR5	EQU	CLR05
CAN05	EQU	CAN 
CAN5	EQU	CAN05
CLR06	EQU	CLR 
CLR6	EQU	CLR06
CAN06	EQU	CAN 
CAN6	EQU	CAN06
OV06	EQU	OV 
OV6	EQU	OV06
UKEY	EQU	0
X:UKEY	EQU	UKEY 
UK01	EQU	NOKEY
UK02	EQU	NOKEY
UK03	EQU	NOKEY
UK04	EQU	NOKEY
UK05	EQU	NOKEY
UK06	EQU	NOKEY
UK07	EQU	NOKEY
UK08	EQU	NOKEY
UK09	EQU	NOKEY
UK10	EQU	NOKEY
UK11	EQU	NOKEY
UK12	EQU	NOKEY
UK13	EQU	NOKEY
UK14	EQU	NOKEY
UK15	EQU	NOKEY
UK16	EQU	NOKEY
UK17	EQU	NOKEY
UK18	EQU	NOKEY
UK19	EQU	NOKEY
UK20	EQU	NOKEY
UK21	EQU	NOKEY
UK22	EQU	NOKEY
UK23	EQU	NOKEY
UK24	EQU	NOKEY
UK25	EQU	NOKEY
UK011	EQU	UK01
UK012	EQU	UK01
UK021	EQU	UK02
UK022	EQU	UK02
UK031	EQU	UK03
UK032	EQU	UK03
UK041	EQU	UK04
UK042	EQU	UK04
UK051	EQU	UK05
UK052	EQU	UK05
UK061	EQU	UK06
UK062	EQU	UK06
UK071	EQU	UK07
UK072	EQU	UK07
UK081	EQU	UK08
UK082	EQU	UK08
UK091	EQU	UK09
UK092	EQU	UK09
UK101	EQU	UK10
UK102	EQU	UK10
UK111	EQU	UK11
UK112	EQU	UK11
UK121	EQU	UK12
UK122	EQU	UK12
UK131	EQU	UK13
UK132	EQU	UK13
UK141	EQU	UK14
UK142	EQU	UK14
UK151	EQU	UK15
UK152	EQU	UK15
UK161	EQU	UK16
UK162	EQU	UK16
UK171	EQU	UK17
UK172	EQU	UK17
UK181	EQU	UK18
UK182	EQU	UK18
UK191	EQU	UK19
UK192	EQU	UK19
UK201	EQU	UK20
UK202	EQU	UK20
UK211	EQU	UK21
UK212	EQU	UK21
UK221	EQU	UK22
UK222	EQU	UK22
UK231	EQU	UK23
UK232	EQU	UK23
UK241	EQU	UK24
UK242	EQU	UK24
UK251	EQU	UK25
UK252	EQU	UK25
U011	EQU	UK011
U012	EQU	UK012
U021	EQU	UK021
U022	EQU	UK022
U031	EQU	UK031
U032	EQU	UK032
U041	EQU	UK041
U042	EQU	UK042
U051	EQU	UK051
U052	EQU	UK052
U061	EQU	UK061
U062	EQU	UK062
U071	EQU	UK071
U072	EQU	UK072
U081	EQU	UK081
U082	EQU	UK082
U091	EQU	UK091
U092	EQU	UK092
U101	EQU	UK101
U102	EQU	UK102
U111	EQU	UK111
U112	EQU	UK112
U121	EQU	UK121
U122	EQU	UK122
U131	EQU	UK131
U132	EQU	UK132
U141	EQU	UK141
U142	EQU	UK142
U151	EQU	UK151
U152	EQU	UK152
U161	EQU	UK161
U162	EQU	UK162
U171	EQU	UK171
U172	EQU	UK172
U181	EQU	UK181
U182	EQU	UK182
U191	EQU	UK191
U192	EQU	UK192
U201	EQU	UK201
U202	EQU	UK202
U211	EQU	UK211
U212	EQU	UK212
U221	EQU	UK221
U222	EQU	UK222
U231	EQU	UK231
U232	EQU	UK232
U241	EQU	UK241
U242	EQU	UK242
U251	EQU	UK251
U252	EQU	UK252
	LIST 
	EJECT

	XIF
W:KTB1   EQU      * 
	IFT	XWDSP=0
**********************************************************************
**                                                                  **
**  W:KTB1            KEYTABLE 1. USED IN:                          **
**                    1. NORMAL READ IN NOT PROTECTED DYN FIELDS.   **
**                                                                  **
**                    KEYTABLE 1 CAN BE CHANGED BY THE USER.        **
**                    WHEN DOING THIS REMEMBER:                     **
**                                                                  **
**                    1. USER KEYS MUST BE ADDED TO THE END         **
**                    .  OF THE KEYTABLE.                           **
**                    2. THE ORDER OF THE FIRST 16 KEYS MUST NOT    **
**                    .  BE ALTERED.                                **
**                    3. KEYS HANDLED BY WSM BUT NOT USED IN YOUR   **
**                    .  SYSTEM SHOULD BE SET TO NOKEY IN THE KEY   **
**                    .  CODE LIST ABOVE.                           **
**                                                                  **
**********************************************************************

**********************************************************************
**                    KEY TABLE FORMS                               **
**                    (MUST NOT BE ALTERED BY THE USER)             **
**********************************************************************

	XIF
	NLIST
KT08	FORM	8,8,8,8,8,8,8,8 
KT07	FORM	8,8,8,8,8,8,8,8=NOKEY 
KT06	FORM	8,8,8,8,8,8 
KT05	FORM	8,8,8,8,8,8=NOKEY 
KT04	FORM	8,8,8,8 
KT03	FORM	8,8,8,8=NOKEY 
KT02	FORM	8,8 
KT01	FORM	8,8=NOKEY 
	LIST 
	IFT	XWDSP=0
	EJECT

**********************************************************************
**                                                                  **
**	NUMBER OF KEYS. INCREMENT THIS NUMBER WITH AS
**		!        MANY KEYS AS YOU WANT TO ADD.
**		! 
**		V 
KTB1L	EQU	16+X:UKEY 

	KT08	KTB1L,TUP1,TDW1,TFD1,TBD1,PRT1,LIN1,HLP1
	KT08	ARI1,ASD1,CLR1,SEC1,CR1,DUP1,ENT1,FUN1
	KT02	CAN1,U011 
**	   A	   A
**	   !	   !
**	   !	   ADD HERE YOUR KEY CODES WITH COMMAS
**	   !	   IN BETWEEN.
**	   ! 
**	   INCREMENT THIS DIGIT WITH AS MANY KEYS AS YOU WANT
**	   TO ADD. 
**
**	IF MORE THAN 7 EXTRA KEYS ARE NEEDED, INCREMENT WITH 7 
**	AND ADD 7 KEYS TO THIS LINE. THEN CONTINUE WITH A NEW
**	LINE OF THE FOLLOWING LAYOUT (EXCLUDING THE *) : 

*	KT0X	K1,K2,...,KX 

**	WHERE X DENOTES THE NUMBER OF KEYS ON THE LINE.
**
**	A KEY IS EXCLUDED BY REPLACING ITS EQUATE BY THE EQUATE
**	NOKEY. 
**
**********************************************************************
	EJECT

**********************************************************************
**                    COND. ASSEMBLY FOR WSMGEN                     **
**********************************************************************
	IFF	X:UKEY=0 
	IFF	X:UKEY=1 
	KT02	U021,U031 
	IFF	X:UKEY=2 
	IFF	X:UKEY=3 
	KT02	U041,U051 
	IFF	X:UKEY=4 
	IFF	X:UKEY=5 
	KT02	U061,U071 
	IFF	X:UKEY=6 
	IFF	X:UKEY=7 
	KT02	U081,U091 
	IFF	X:UKEY=8 
	IFF	X:UKEY=9 
	KT02	U101,U111 
	IFF	X:UKEY=10
	IFF	X:UKEY=11
	KT02	U121,U131 
	IFF	X:UKEY=12
	IFF	X:UKEY=13
	KT02	U141,U151 
	IFF	X:UKEY=14
	IFF	X:UKEY=15
	KT02	U161,U171 
	IFF	X:UKEY=16
	IFF	X:UKEY=17
	KT02	U181,U191 
	IFF	X:UKEY=18
	IFF	X:UKEY=19
	KT02	U201,U211 
	IFF	X:UKEY=20
	IFF	X:UKEY=21
	KT02	U221,U231 
	IFF	X:UKEY=22
	IFF	X:UKEY=23
	KT02	U241,U251 
	XIF
	IFT	XWDSP=0
	EJECT
**	KEYVALIDATION-BITMAP:
**
**	IT IS POSSIBLE TO SELECT WHETHER "MUST ENTER" CHECKS,
**	"MUST FILL" CHECKS AND VALIDATIONS SHOULD BE EXECUTED
**	BEFORE THE FUNCTION OF THE END-OF-ITEM KEY IS PERFORMED
**	OR NOT.
**
**	IN THE BITMAP BELOW
**		CTU  ,CTD  ,CTF  ,...,CCA    CORRESPOND TO THE KEYS 
**		TUP1 ,TDW1 ,TFD1 ,...,CAN1   IN W:KTB1 ( OR TO THE KEYS 
**		NOKEY,NOKEY,TFD2 ,...,CAN2   IN W:KTB2 ). 
**
**		C1,C2,...C25 DEFINE 25 POSSIBLE USER KEYS.
**
**	THE CHECKS ARE PERFORMED IF THE BIT IN THE FOLLOWING BIT 
**	MAP CORRESPONDING WITH THE USED FUNCTION KEY IS SET: 
**
**	AS DEFAULT THE FOLLOWING BITS ARE SET: 
**	CTF,CTB,CAS,CSE,CCR,CDU,CEN AND CFU  I.E THE KEYS
**	TFD,TBD,ASD,SEC,CR,DUP,ENT AND FUN  WILL GIVE
**	VALIDATION ETC.
**
**	IF ANOTHER KEY PATTERN IS REQUIRED, THEN CHANGE THE
**	CORRESPONDING BITPOSITIONS TO "0" OR "1".
**
	NLIST
KTU	EQU	0 
KTD	EQU	0 
KTF	EQU	1 
KTB	EQU	1 
KPR	EQU	0 
KLI	EQU	0 
KHL	EQU	0 
KAR	EQU	0 
KAS	EQU	1 
KCL	EQU	0 
KSE	EQU	1 
KCR	EQU	1 
KDU	EQU	1 
KEN	EQU	1 
KFU	EQU	1 
KCA	EQU	0 
K1	EQU	0
K2	EQU	0
K3	EQU	0
K4	EQU	0
K5	EQU	0
K6	EQU	0
K7	EQU	0
K8	EQU	0
K9	EQU	0
K10	EQU	0 
K11	EQU	0 
K12	EQU	0 
K13	EQU	0 
K14	EQU	0 
K15	EQU	0 
K16	EQU	0 
K17	EQU	0 
K18	EQU	0 
K19	EQU	0 
K20	EQU	0 
K21	EQU	0 
K22	EQU	0 
K23	EQU	0 
K24	EQU	0 
K25	EQU	0 
CTU	EQU	KTU 
CTD	EQU	KTD 
CTF	EQU	KTF 
CTB	EQU	KTB 
CPR	EQU	KPR 
CLI	EQU	KLI 
CHL	EQU	KHL 
CAR	EQU	KAR 
CAS	EQU	KAS 
CCL	EQU	KCL 
CSE	EQU	KSE 
CCR	EQU	KCR 
CDU	EQU	KDU 
CEN	EQU	KEN 
CFU	EQU	KFU 
CCA	EQU	KCA 
C1	EQU	K1 
C2	EQU	K2 
C3	EQU	K3 
C4	EQU	K4 
C5	EQU	K5 
C6	EQU	K6 
C7	EQU	K7 
C8	EQU	K8 
C9	EQU	K9 
C10	EQU	K10 
C11	EQU	K11 
C12	EQU	K12 
C13	EQU	K13 
C14	EQU	K14 
C15	EQU	K15 
C16	EQU	K16 
C17	EQU	K17 
C18	EQU	K18 
C19	EQU	K19 
C20	EQU	K20 
C21	EQU	K21 
C22	EQU	K22 
C23	EQU	K23 
C24	EQU	K24 
C25	EQU	K25 
	LIST 

**	B I T M A P :

	XIF
W:KT1V	EQU	*
	IFT	XWDSP=0
	BIT16	0,CTU,CTD,CTF,CTB,CPR,CLI,CHL,CAR,CAS,CCL,CSE,CCR,CDU,CEN,CFU
	BIT16	CCA,C1,C2,C3,C4,C5,C6,C7,C8,C9,C10,C11,C12,C13,C14,C15 
	BIT16	C16,C17,C18,C19,C20,C21,C22,C23,C24,C25,0,0,0,0,0
**
**
	EJECT
**
**	NOTE: LIN AND ARI ARE NOT IMPLEMENTED. 
**
**	NOTE: AFTER HLP, CLR AND CAN CHECKS ARE NEVER PERFORMED. 
**
**	NOTE: THE ASD BIT SHOULD BE SET LIKE THE TFD BIT. ( BY 
**	      TURNING ON THE AUTO S/D/B SWITCH AT A FIELD WITH 
**	      E.G. THE AUTO SKIP ATTRIBUTE SET INPUT TO THAT 
**	      FIELD WILL BE TERMINATED. )
**
**	NOTE: ALTHOUGH THE CURRENT END-OF-ITEM KEY BIT IS SET
**	      A FIELD IS VALIDATED ONLY IF IT IS MODIFIED AND NOT EMPTY OR 
**	      IF IT HAS THE MANDATORY VALIDATION ATTRIBUTE SET.
**                                                                  **
**********************************************************************

	EJECT

	XIF
W:KTB2   EQU      * 
	IFT	XWDSP=0
**********************************************************************
**                                                                  **
**  W:KTB2            KEYTABLE 2. USED IN:                          **
**                    1. NORMAL READ IN PROTECTED DYN FIELDS.       **
**                                                                  **
**                    KEYTABLE 2 CAN BE ALTERED BY THE USER IN THE  **
**                    SAME WAY AS KEYTABLE 1.                       **
**                                                                  **
**********************************************************************

KTB2L	EQU	KTB1L 
	KT08	KTB2L,TUP2,TDW2,TFD2,TBD2,PRT2,NOKEY,HLP2 
	KT08	ARI2,NOKEY,NOKEY,SEC2,CR2,NOKEY,ENT2,FUN2 
	KT02	CAN2,U012 


**********************************************************************
**                    COND. ASSEMBLY FOR WSMGEN                     **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
	IFF	X:UKEY=0 
	IFF	X:UKEY=1 
	KT02	U022,U032 
	IFF	X:UKEY=2 
	IFF	X:UKEY=3 
	KT02	U042,U052 
	IFF	X:UKEY=4 
	IFF	X:UKEY=5 
	KT02	U062,U072 
	IFF	X:UKEY=6 
	IFF	X:UKEY=7 
	KT02	U082,U092 
	IFF	X:UKEY=8 
	IFF	X:UKEY=9 
	KT02	U102,U112 
	IFF	X:UKEY=10
	IFF	X:UKEY=11
	KT02	U122,U132 
	IFF	X:UKEY=12
	IFF	X:UKEY=13
	KT02	U142,U152 
	IFF	X:UKEY=14
	IFF	X:UKEY=15
	KT02	U162,U172 
	IFF	X:UKEY=16
	IFF	X:UKEY=17
	KT02	U182,U192 
	IFF	X:UKEY=18
	IFF	X:UKEY=19
	KT02	U202,U212 
	IFF	X:UKEY=20
	IFF	X:UKEY=21
	KT02	U222,U232 
	IFF	X:UKEY=22
	IFF	X:UKEY=23
	KT02	U242,U252 
	XIF
	IFT	XWDSP=0
	EJECT

	XIF
W:KTB3   EQU      * 
	IFT	XWDSP=0
**********************************************************************
**                                                                  **
**  W:KTB3            KEYTABLE 3. USED IN:                          **
**                    1. 1:ST READ AFTER SECTION KEY STROKE.        **
**                    NOTE:                                         **
**                    1. THE NUMBER OF KEYS MUST NOT BE ALTERED.    **
**                    2. KEYS CAN BE REPLACED BY OTHER KEYS OR      **
**                    BE EXCLUDED.                                  **
**                    3. TO EXCLUDE A KEY THE EQUATE NOKEY          **
**                    SHOULD BE USED.                               **
**                    4. ONLY THE POSITION IN THE KEY TABLE         **
**                    DETERMINE THE FUNCTION OF THE KEY.            **
**                                                                  **
**********************************************************************

KTB3L	EQU	7 
	KT08	KTB3L,INS3,DEL3,TFD3,TBD3,PRT3,CLR3,CAN3

	XIF
W:KTB4   EQU      * 
	IFT	XWDSP=0
**********************************************************************
**                                                                  **
**  W:KTB4            KEYTABLE 4. USED IN:                          **
**                    1. SECOND READ AFTER SECTION KEY STROKE       **
**                    2. 1:ST READ AFTER FUNCTION KEY STROKE.       **
**                    NOTE: SEE W:KTB3.                             **
**                                                                  **
**********************************************************************

KTB4L	EQU	3 
	KT04	KTB4L,CLR4,ENT4,CAN4
	EJECT

	XIF
W:KTB5   EQU      * 
	IFT	XWDSP=0
**********************************************************************
**                                                                  **
**  W:KTB5            KEYTABLE 5. USED IN:                          **
**                    ERROR  SITUATIONS.                            **
**                    NOTE: SEE W:KTB3.                             **
**                                                                  **
**********************************************************************

KTB5L	EQU	2 
	KT03	KTB5L,CLR5,CAN5 

	XIF
W:KTB6   EQU      * 
	IFT	XWDSP=0
**********************************************************************
**                                                                  **
**  W:KTB6            KEYTABLE 6.USED IN:                           **
**                    WARNING SITUATIONS.                           **
**                    NOTE: SEE W:KTB3.                             **
**                                                                  **
**********************************************************************

KTB6L	EQU	3 
	KT04	KTB6L,CLR6,CAN6,OV6 
	XIF
	EJECT










**********************************************************************
**                    4. DEFINITION OF SYSTEM MESSAGES:             **
**********************************************************************
	IFT	XWDSP=0
	EJECT

W:SM     EQU      * 
**********************************************************************
**                                                                  **
**  W:SM              WSM SYSTEM MESSAGES.                          **
**                                                                  **
**                    ALL 5 MESSAGES CAN BE CHANGED OR TRANSLATED   **
**                    BY THE USER.                                  **
**                    JUST REPLACE THE TEXTS WITHIN 'BLIPS'.        **
**                                                                  **
**********************************************************************


**********************************************************************
**                    EQUATES FOR WSMGEN                            **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
	NLIST
X:SM01	EQU	0
XSM01	EQU	X:SM01
X:SM02	EQU	0
XSM02	EQU	X:SM02
X:SM03	EQU	0
XSM03	EQU	X:SM03
X:SM04	EQU	0
XSM04	EQU	X:SM04
X:SM05	EQU	0
XSM05	EQU	X:SM05
X:SM5C	EQU	0
XSM5C	EQU	X:SM5C
X:SM5S	EQU	0
XSM5S	EQU	X:SM5S
	LIST 


	XIF
W:SM01	EQU	*	EMTPY MANDATORY FIELD FOUND
	IFT	XWDSP=0
	DATA	SM01E-W:SM01	***************************
	IFT	XSM01=0
	DATA	'MANDATORY FIELD' 
	XIF
	IFT	XWDSP=0
	IFF	XSM01=0
	DATA	SM01R01 
	IFF	XSM01=1
	DATA	SM01R02 
	IFF	XSM01=2
	DATA	SM01R03 
	IFF	XSM01=3
	DATA	SM01R04 
	IFF	XSM01=4
	DATA	SM01R04 
	IFF	XSM01=5
	DATA	SM01R05 
	IFF	XSM01=6
	DATA	SM01R06 
	IFF	XSM01=7
	DATA	SM01R07 
	IFF	XSM01=8
	DATA	SM01R08 
	IFF	XSM01=9
	DATA	SM01R09 
	IFF	XSM01=10 
	DATA	SM01R10 
	IFF	XSM01=11 
	DATA	SM01R11 
	IFF	XSM01=12 
	DATA	SM01R12 
	IFF	XSM01=13 
	DATA	SM01R13 
	IFF	XSM01=14 
	DATA	SM01R14 
	IFF	XSM01=15 
	DATA	SM01R15 
	XIF
SM01E	EQU	* 
W:SM02	EQU	*	NOT FULL MUST FILL FIELD FOUND 
	IFT	XWDSP=0
	DATA	SM02E-W:SM02	****************************** 
	IFT	XSM02=0
	DATA	'DIGITS OR CHAR.S MISSING'
	XIF
	IFT	XWDSP=0
	IFF	XSM02=0
	DATA	SM02R01 
	IFF	XSM02=1
	DATA	SM02R02 
	IFF	XSM02=2
	DATA	SM02R03 
	IFF	XSM02=3
	DATA	SM02R04 
	IFF	XSM02=4
	DATA	SM02R04 
	IFF	XSM02=5
	DATA	SM02R05 
	IFF	XSM02=6
	DATA	SM02R06 
	IFF	XSM02=7
	DATA	SM02R07 
	IFF	XSM02=8
	DATA	SM02R08 
	IFF	XSM02=9
	DATA	SM02R09 
	IFF	XSM02=10 
	DATA	SM02R10 
	IFF	XSM02=11 
	DATA	SM02R11 
	IFF	XSM02=12 
	DATA	SM02R12 
	IFF	XSM02=13 
	DATA	SM02R13 
	IFF	XSM02=14 
	DATA	SM02R14 
	IFF	XSM02=15 
	DATA	SM02R15 
	XIF
SM02E	EQU	* 
	EJECT

W:SM03	EQU	*	SHOWN AFTER FUNCTION-KEY STROKE
	IFT	XWDSP=0
	DATA	SM03E-W:SM03	*******************************
	IFT	XSM03=0
	DATA	'F:'
	XIF
	IFT	XWDSP=0
	IFF	XSM03=0
	DATA	SM03R01 
	IFF	XSM03=1
	DATA	SM03R02 
	IFF	XSM03=2
	DATA	SM03R03 
	IFF	XSM03=3
	DATA	SM03R04 
	IFF	XSM03=4
	DATA	SM03R04 
	IFF	XSM03=5
	DATA	SM03R05 
	IFF	XSM03=6
	DATA	SM03R06 
	IFF	XSM03=7
	DATA	SM03R07 
	IFF	XSM03=8
	DATA	SM03R08 
	IFF	XSM03=9
	DATA	SM03R09 
	IFF	XSM03=10 
	DATA	SM03R10 
	IFF	XSM03=11 
	DATA	SM03R11 
	IFF	XSM03=12 
	DATA	SM03R12 
	IFF	XSM03=13 
	DATA	SM03R13 
	IFF	XSM03=14 
	DATA	SM03R14 
	IFF	XSM03=15 
	DATA	SM03R15 
	XIF
SM03E	EQU	* 

W:SM04	EQU	*	SHOWN AFTER SECTION-KEY STROKE 
	IFT	XWDSP=0
	DATA	SM04E-W:SM04	****************************** 
	IFT	XSM04=0
	DATA	'S:'
	XIF
	IFT	XWDSP=0
	IFF	XSM04=0
	DATA	SM04R01 
	IFF	XSM04=1
	DATA	SM04R02 
	IFF	XSM04=2
	DATA	SM04R03 
	IFF	XSM04=3
	DATA	SM04R04 
	IFF	XSM04=4
	DATA	SM04R04 
	IFF	XSM04=5
	DATA	SM04R05 
	IFF	XSM04=6
	DATA	SM04R06 
	IFF	XSM04=7
	DATA	SM04R07 
	IFF	XSM04=8
	DATA	SM04R08 
	IFF	XSM04=9
	DATA	SM04R09 
	IFF	XSM04=10 
	DATA	SM04R10 
	IFF	XSM04=11 
	DATA	SM04R11 
	IFF	XSM04=12 
	DATA	SM04R12 
	IFF	XSM04=13 
	DATA	SM04R13 
	IFF	XSM04=14 
	DATA	SM04R14 
	IFF	XSM04=15 
	DATA	SM04R15 
	XIF
SM04E	EQU	* 
W:SM05	EQU	*	SHOWN AFTER WSM BASIC ERROR
	IFT	XWDSP=0
	DATA	SM05E-W:SM05	***************************
	DATA	/1E1E	- LOW INTENSITY 
	IFT	XSM05=0
	DATA	'WSM BASIC ERR:'
	XIF
	IFT	XWDSP=0
	IFF	XSM05=0
	DATA	SM05R01 
	IFF	XSM05=1
	DATA	SM05R02 
	IFF	XSM05=2
	DATA	SM05R03 
	IFF	XSM05=3
	DATA	SM05R04 
	IFF	XSM05=4
	DATA	SM05R04 
	IFF	XSM05=5
	DATA	SM05R05 
	IFF	XSM05=6
	DATA	SM05R06 
	IFF	XSM05=7
	DATA	SM05R07 
	IFF	XSM05=8
	DATA	SM05R08 
	IFF	XSM05=9
	DATA	SM05R09 
	IFF	XSM05=10 
	DATA	SM05R10 
	IFF	XSM05=11 
	DATA	SM05R11 
	IFF	XSM05=12 
	DATA	SM05R12 
	IFF	XSM05=13 
	DATA	SM05R13 
	IFF	XSM05=14 
	DATA	SM05R14 
	IFF	XSM05=15 
	DATA	SM05R15 
	XIF
	IFT	XWDSP=0
	DATA	/1F1C	- HIGH INTENSITY,REVERSE
	EJECT

	XIF
W:SM5C	EQU	*
	IFT	XWDSP=0
	DATA	0	RESERVED FOR WSM BASIC ERROR CODE 
	DATA	/1E1D	- LOW INTENSITY,NORMAL
	IFT	XSM5C=0
	DATA	'  S:'
	XIF
	IFT	XWDSP=0
	IFF	XSM5C=0
	DATA	'  '
	DATA	SM5CR01 
	IFF	XSM5C=1
	DATA	
	DATA	SM5CR02 
	IFF	XSM5C=2
	DATA	
	DATA	SM5CR03 
	IFF	XSM5C=3
	DATA	
	DATA	SM5CR04 
	IFF	XSM5C=4
	DATA	
	DATA	SM5CR04 
	IFF	XSM5C=5
	DATA	
	DATA	SM5CR05 
	IFF	XSM5C=6
	DATA	
	DATA	SM5CR06 
	IFF	XSM5C=7
	DATA	
	DATA	SM5CR07 
	IFF	XSM5C=8
	DATA	
	DATA	SM5CR08 
	IFF	XSM5C=9
	DATA	
	DATA	SM5CR09 
	IFF	XSM5C=10 
	DATA	
	DATA	SM5CR10 
	IFF	XSM5C=11 
	DATA	
	DATA	SM5CR11 
	IFF	XSM5C=12 
	DATA	
	DATA	SM5CR12 
	IFF	XSM5C=13 
	DATA	
	DATA	SM5CR13 
	IFF	XSM5C=14 
	DATA	
	DATA	SM5CR14 
	IFF	XSM5C=15 
	DATA	
	DATA	SM5CR15 
	XIF
	IFT	XWDSP=0
	DATA	/1F1C	- HIGH INTENSITY,REVERSE
	XIF
W:SM5S	EQU	*
	IFT	XWDSP=0
	DATA	0,0,0	RESERVED FOR SECTION NAME 
	DATA	/1E1D	- LOW INTESITY,NORMAL 
	IFT	XSM5S=0
	DATA	'  F:'
	XIF
	IFT	XWDSP=0
	IFF	XSM5S=0
	DATA	'  '
	DATA	SM5SR01 
	IFF	XSM5S=1
	DATA	
	DATA	SM5SR02 
	IFF	XSM5S=2
	DATA	
	DATA	SM5SR03 
	IFF	XSM5S=3
	DATA	
	DATA	SM5SR04 
	IFF	XSM5S=4
	DATA	
	DATA	SM5SR04 
	IFF	XSM5S=5
	DATA	
	DATA	SM5SR05 
	IFF	XSM5S=6
	DATA	
	DATA	SM5SR06 
	IFF	XSM5S=7
	DATA	
	DATA	SM5SR07 
	IFF	XSM5S=8
	DATA	
	DATA	SM5SR08 
	IFF	XSM5S=9
	DATA	
	DATA	SM5SR09 
	IFF	XSM5S=10 
	DATA	
	DATA	SM5SR10 
	IFF	XSM5S=11 
	DATA	
	DATA	SM5SR11 
	IFF	XSM5S=12 
	DATA	
	DATA	SM5SR12 
	IFF	XSM5S=13 
	DATA	
	DATA	SM5SR13 
	IFF	XSM5S=14 
	DATA	
	DATA	SM5SR14 
	IFF	XSM5S=15 
	DATA	
	DATA	SM5SR15 
	XIF
	IFT	XWDSP=0
	DATA	/1F1C	- HIGH INTESITY,REVERSE 
	XIF
W:SM5F	EQU	*
	IFT	XWDSP=0
	DATA	0	RESERVED FOR NAME OF DYNAMIC
	DATA	0	... FIELD WHERE ERROR OCCURRED
	DATA	/1D1D	- NORMAL IMAGE
SM05E	EQU	* 
	XIF
	EJECT










**********************************************************************
**                    5. DEFINITION OF POOL SIZE:                   **
**********************************************************************
	EJECT
**********************************************************************
**                                                                  **
**                    WSM MEMORY BUFFER POOL                        **
**                                                                  **
**		4 LINES SHOULD BE ALTERED TO GET THE DESIRED
**		POOL SIZE. AS AN EXAMPLE A POOL SIZE OF 10
**		POOL UNITS IS USED. 
**		ASSUME A SIZE OF N POOL UNITS IS WANTED.
**		THEN: 
**
**		LINE 1: 
**		! DEFINE N             ( 25 ) 
**		! 
**		V 
X:OLNO	EQU	25 
**
**		LINE 2: 
**		! RESERVE N*128 WORDS  ( 25*128 => 3200 ) 
**		! 
**		V 
X:POOL	EQU	3200 
**
**		LINE 3: 
**		! RESERVE N*6 WORDS    ( 25*6   =>  150 ) 
**		! 
**		V 
X:OLAD	EQU	150
**
**
**
**
	EJECT

**
**
**********************************************************************
**                    EQUATES FOR WSMGEN                            **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
	NLIST
POOLNO	EQU	X:OLNO 
POOL	RES	X:POOL 
POOLAD	RES	X:OLAD 
	LIST 
****NLIST 
POOLFS	EQU	*
	DATA	POOLNO,FSEND-POOLFS,'B1'
****LIST
**
**
**
**		LINE 4: 
**		! DEFINE M WORDS WHERE M EQUALS THE INTEGER PART OF 
**		! (N+15)/16.           ( M=INT((25+15)/16)=2 )
**		! 
**		! IN THESE WORDS, SET THE N FIRST BITS TO 1 AND THE 
**		! FOLLOWING BITS TO 0 (ZERO). 
**		! 
**		V 
X:NMSK	EQU	2	TOTAL NUMBER OF WORDS (M)
X:PMSK	EQU	/FF80	LAST WORD (OF M) 
**
**
	EJECT

**
**
**********************************************************************
**                    COND. ASSEMBLY FOR WSMGEN                     **
**********************************************************************
	NLIST
XNMASK	EQU	X:NMSK 
XPMASK	EQU	X:PMSK 
	LIST 
	IFT	XNMASK=16
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	XIF
	IFT	XNMASK=15
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF 
	XIF
	IFT	XNMASK=14
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF,/FFFF,/FFFF 
	XIF
	IFT	XNMASK=13
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF,/FFFF 
	XIF
	IFT	XNMASK=12
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF 
	XIF
	IFT	XNMASK=11
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	XIF
	IFT	XNMASK=10
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF 
	XIF
	IFT	XNMASK=9 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF,/FFFF,/FFFF 
	XIF
	IFT	XNMASK=8 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF,/FFFF 
	XIF
	IFT	XNMASK=7 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	DATA	/FFFF 
	XIF
	IFT	XNMASK=6 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF,/FFFF 
	XIF
	IFT	XNMASK=5 
	DATA	/FFFF,/FFFF,/FFFF,/FFFF 
	XIF
	IFT	XNMASK=4 
	DATA	/FFFF,/FFFF,/FFFF 
	XIF
	IFT	XNMASK=3 
	DATA	/FFFF,/FFFF 
	XIF
	IFT	XNMASK=2 
	DATA	/FFFF 
	XIF
	DATA	XPMASK
**
**
**
**
****NLIST 
FSEND	DATA	0,0
****LIST
	EJECT











**********************************************************************
**                    6. FILE HANDLING:                             **
**********************************************************************
	EJECT

**********************************************************************
**                                                                  **
**                    WSM INTERPRETER WITHOUT FILE HANDLER          **
**                                                                  **
**		THE WSM FILE HANDLER IS A SEPARATE PART OF
**		THE WSM INTERPRETER AND ALSO A SEPARATE 
**		TASK. 
**		
**		IN INTELLIGENT WORKSTATIONS (E.G. VD83) WITH
**		NO FILES THE FILE HANDLER SHOULD BE EXCLUDED. 
**		
**		THIS IS DONE BY REPLACING  0 (ZERO)  BELOW WITH 
**		1 (ONE).	A
**			!
**		----------------------- 
**		! 
**		V 
X:FHCA	EQU	0
**		
**		THE FILE HANDLER TASK "FW" MUST ALSO BE 
**		DELETED FROM THE CONFIGURATION FILE.
**                                                                  **
**********************************************************************

**********************************************************************
**                    EQUATES FOR WSMGEN                            **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
	NLIST
XFHCA	EQU	X:FHCA
	LIST 
	IFT	XFHCA=0
W:FHCA	DATA	WD:FIL
	XIF
	IFT	XFHCA=1
W:FHCA	DATA	0 
	XIF
	EJECT


**********************************************************************
**                    POOL & FILE HANDLER POINTERS.                 **
**                    (MUST NOT BE CHANGED.)                        **
**********************************************************************
	NLIST

FILTAB	RES	36 
FORDER	RES	128	ORDER-DATA TO FILE-HANDLER 

S:POOL	DATA	POOL	-> POOL START
S:POLA	DATA	POOLAD	-> POOL ADMINISTRATION DATA
S:FILT	DATA	FILTAB	-> FILE TABLE
S:POLF	DATA	POOLFS	-> POOL FREE SPACE VECTOR
S:FORD	DATA	FORDER	-> ORDER-DATA TO FILE-HANDLER
	LIST 
	EJECT










**********************************************************************
**                    7. WSM INSTRUCTION SELECTION:                 **
**********************************************************************
	EJECT

WSMTAB   EQU      * 
**********************************************************************
**                                                                  **
**  WSMTAB            WSM INSTRUCTIONS - BRANCH TABLE               **
**                                                                  **
**  TO EXCLUDE INSTRUCTIONS NOT IN USE IN YOUR SYSTEM,
**  REPLACE LABELS CORRESPONDING WITH EXCLUDED INSTRUCTIONS BY W:ENDR!
**            A                                    A
**            !                                    !
**            -------                      ---------
**                  !                      !
**                  V                      V

	IFT	XWDSP=0
	DATA	W:OPEN	WOPEN
	DATA	W:ATCH	WATTCH 
	DATA	W:RCIV	WRCIVE 
	DATA	W:MSG	WMSG
	DATA	W:SEND	WSEND
	DATA	W:PRNT	WPRINT 
	DATA	W:CLOSE	WCLOSE
	DATA	W:SAVE	WSAVE
	DATA	W:DLET	WDLETE 
	DATA	W:FATR	WFATTR 
	DATA	W:CODE	WCODE
	DATA	W:FID	WFID
	DATA	W:GTPM	GET FIELD PARAMETERS 
	XIF
	IFT	XWDSP=1
	DATA	W:OPEN	WOPEN
 DATA W:ENDR
 DATA W:ENDR
 DATA W:ENDR
 DATA W:ENDR
 DATA W:ENDR
	DATA	W:CLOSE	WCLOSE
	DATA	W:SAVE	WSAVE
 DATA W:ENDR
 DATA W:ENDR
	DATA	W:CODE	WCODE
 DATA W:ENDR
	DATA W:ENDR
	XIF

**                                                                  **
**********************************************************************
	EJECT















**********************************************************************
**                    8. VALIDATION STATEMENT & FUNCTION            **
**                    .  & OPERATOR SELECTION:                      **
**********************************************************************
	EJECT

W:VALA   EQU      * 
**********************************************************************
**                                                                  **
**  W:VALA            VALIDATION LANGUAGE - MAIN ROUTINE.           **
**
**  TO EXCLUDE THE COMPLETE VALIDATION, 
**  REPLACE 1 (ONE) BELOW BY 0 (ZERO) AND DELETE ALL DATA LINES IN
**  VALIDATION STATEMENTS BRANCH TABLE AND VALIDATION OPERATORS 
**  BRANCH TABLE BELOW !
**

X:VEVA	EQU	1

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

**********************************************************************
**                    EQUATES FOR WSMGEN                            **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
	NLIST
XVEVA	EQU	X:VEVA
	IFT	XVEVA=0
	DATA	0 
	XIF
	NLIST

	IFT	XVEVA=1
	DATA	W:VEVA
	XIF
	EJECT

W:STMT   EQU      * 
	IFT	XVEVA=1
**********************************************************************
**                                                                  **
**  W:STMT            VALIDATION STATEMENTS - BRANCH TABLE          **
**
**  TO EXCLUDE VALIDATION STATEMENT TYPES NOT IN USE IN YOUR SYSTEM,
**  REPLACE LABELS CORRESPONDING WITH EXCLUDED STATEMENTS BY W:V01C!
**            A                                    A
**            !                                    !
**            -------                      ---------
**                  !                      !
**                  V                      V

	DATA	W:V000	ALPHANUM ASSIGNMENT
	DATA	W:V002	NUM ASSIGNMENT 
	DATA	W:V004	GO TO/GOTO 
	DATA	W:V006	IF...THEN LIN NO 
	DATA	W:V008	IF...THEN STATEMENT
	DATA	W:V00A	ON...GO TO/GOTO LINE NO
	DATA	W:V00C	CALL 
	DATA	W:V00E	SECT 
	DATA	W:V010	ATTR 
	DATA	W:V012	STOP 
	DATA	W:V014	EXIT 
	DATA	W:V016	ERR
	DATA	W:V018	WARN 
	DATA	W:V01A	REM
	DATA	W:V01C	EMPTY STATEMENT

**                                                                  **
**********************************************************************
	EJECT
**********************************************************************
**                                                                  **
**                    VALIDATION OPERATORS & FUNCTIONS              **
**                    BRANCH TABLES.                                **
**
**  TO EXCLUDE VALIDATION OPERATORS & FUNCTIONS NOT IN USE
**  IN YOUR SYSTEM, 
**  REPLACE LABELS CORRESPONDING WITH EXCLUDED OPERATORS BY W:EXP5! 
**            A                                    A
**            !                                    !
**            -------                      ---------
**                  !                      !
**                  V                      V
	DATA	W:CMP	RELATIONAL OPERATORS
	XIF
W:OPER	EQU	*
	IFT	XVEVA=1
	DATA	W:OP0E	CONCATENATE
	DATA	W:OP0F	SUBSTRING
	DATA	W:OP10	STR
	DATA	W:OP11	MAKE POSITIVE
	DATA	W:OP12	NEGATE 
	DATA	W:OP13	ADD
	DATA	W:OP14	SUBTRACT 
	DATA	W:OP15	DIVIDE 
	DATA	W:OP16	MULTIPLY 
	DATA	W:OP17	ABS
	DATA	W:OP18	INT
	DATA	W:OP19	SGN
	DATA	W:OP1A	TIM
	DATA	W:OP1B	DAY
	DATA	W:OP1C	SYS
	DATA	W:OP1D	LEN
	DATA	W:OP1E	NUM
	DATA	W:OP1F	DAT
	DATA	W:OP20	CDV
	DATA	W:OP21	POS
	DATA	W:EXP5	PARANTHESIS (/22)
**                                                                  **
**********************************************************************
	EJECT




**********************************************************************
**                                                                  **
**                    EXTERNAL FUNCTION CALLS.                      **
**                    DEFINE A NUMBER OF ASSEMBLER ROUTINES         **
**                    THAT CORRESPOND TO CALLS FROM YOUR VALIDATION.**
**                    A CONSECUTIVE TABLE OF ENTRIES                **
**                    STARTING WITH UF00 IS CREATED                 **
**********************************************************************

X:UFNR	EQU	0

**********************************************************************
**                    EQUATES FOR WSMGEN                            **
**                    ( MUST NOT BE ALTERED BY THE USER )           **
**********************************************************************
XUFNR	EQU	X:UFNR
XUFNR2	EQU	XUFNR+XUFNR

	DATA	XUFNR2-2	W:UFTB LENGTH EQUATES MAX UF INDEX * 2 
*			AND IS NEGATIVE (-2) IF NO UF:S ARE DEFINED 
	XIF
W:UFTB	EQU	*
	IFT	XVEVA=1
	IFF	XUFNR=0
	DATA	UF00
	IFF	XUFNR=1
	DATA	UF01
	IFF	XUFNR=2
	DATA	UF02
	IFF	XUFNR=3
	DATA	UF03
	IFF	XUFNR=4
	DATA	UF04
	IFF	XUFNR=5
	DATA	UF05
	IFF	XUFNR=6
	DATA	UF06
	IFF	XUFNR=7
	DATA	UF07
	IFF	XUFNR=8
	DATA	UF08
	IFF	XUFNR=9
	DATA	UF09
	IFF	XUFNR=10 
	DATA	UF10
	IFF	XUFNR=11 
	DATA	UF11
	IFF	XUFNR=12 
	DATA	UF12
	IFF	XUFNR=13 
	DATA	UF13
	IFF	XUFNR=14 
	DATA	UF14
	IFF	XUFNR=15 
	DATA	UF15
	IFF	XUFNR=16 
	DATA	UF16
	IFF	XUFNR=17 
	DATA	UF17
	IFF	XUFNR=18 
	DATA	UF18
	IFF	XUFNR=19 
	DATA	UF19
	IFF	XUFNR=20 
	DATA	UF20
	IFF	XUFNR=21 
	DATA	UF21
	IFF	XUFNR=22 
	DATA	UF22
	IFF	XUFNR=23 
	DATA	UF23
	IFF	XUFNR=24 
	DATA	UF24
	IFF	XUFNR=25 
	DATA	UF25
	IFF	XUFNR=26 
	DATA	UF26
	IFF	XUFNR=27 
	DATA	UF27
	IFF	XUFNR=28 
	DATA	UF28
	IFF	XUFNR=29 
	DATA	UF29
	IFF	XUFNR=30 
	DATA	UF30
	IFF	XUFNR=31 
	DATA	UF31
	IFF	XUFNR=32 
	DATA	UF32
	IFF	XUFNR=33 
	DATA	UF33
	IFF	XUFNR=34 
	DATA	UF34
	IFF	XUFNR=35 
	DATA	UF35
	IFF	XUFNR=36 
	DATA	UF36
	IFF	XUFNR=37 
	DATA	UF37
	IFF	XUFNR=38 
	DATA	UF38
	IFF	XUFNR=39 
	DATA	UF39
	IFF	XUFNR=40 
	DATA	UF40
	IFF	XUFNR=41 
	DATA	UF41
	IFF	XUFNR=42 
	DATA	UF42
	IFF	XUFNR=43 
	DATA	UF43
	IFF	XUFNR=44 
	DATA	UF44
	IFF	XUFNR=45 
	DATA	UF45
	IFF	XUFNR=46 
	DATA	UF46
	IFF	XUFNR=47 
	DATA	UF47
	IFF	XUFNR=48 
	DATA	UF48
	IFF	XUFNR=49 
	DATA	UF49
	IFF	XUFNR=50 
	DATA	UF50
	IFF	XUFNR=51 
	DATA	UF51
	IFF	XUFNR=52 
	DATA	UF52
	IFF	XUFNR=53 
	DATA	UF53
	IFF	XUFNR=54 
	DATA	UF54
	IFF	XUFNR=55 
	DATA	UF55
	IFF	XUFNR=56 
	DATA	UF56
	IFF	XUFNR=57 
	DATA	UF57
	IFF	XUFNR=58 
	DATA	UF58
	IFF	XUFNR=59 
	DATA	UF59
	IFF	XUFNR=60 
	DATA	UF60
	IFF	XUFNR=61 
	DATA	UF61
	IFF	XUFNR=62 
	DATA	UF62
	IFF	XUFNR=63 
	DATA	UF63
	IFF	XUFNR=64 
	DATA	UF64
	IFF	XUFNR=65 
	DATA	UF65
	IFF	XUFNR=66 
	DATA	UF66
	IFF	XUFNR=67 
	DATA	UF67
	IFF	XUFNR=68 
	DATA	UF68
	IFF	XUFNR=69 
	DATA	UF69
	IFF	XUFNR=70 
	DATA	UF70
	IFF	XUFNR=71 
	DATA	UF71
	IFF	XUFNR=72 
	DATA	UF72
	IFF	XUFNR=73 
	DATA	UF73
	IFF	XUFNR=74 
	DATA	UF74
	IFF	XUFNR=75 
	DATA	UF75
	IFF	XUFNR=76 
	DATA	UF76
	IFF	XUFNR=77 
	DATA	UF77
	IFF	XUFNR=78 
	DATA	UF78
	IFF	XUFNR=79 
	DATA	UF79
	IFF	XUFNR=80 
	DATA	UF80
	IFF	XUFNR=81 
	DATA	UF81
	IFF	XUFNR=82 
	DATA	UF82
	IFF	XUFNR=83 
	DATA	UF83
	IFF	XUFNR=84 
	DATA	UF84
	IFF	XUFNR=85 
	DATA	UF85
	IFF	XUFNR=86 
	DATA	UF86
	IFF	XUFNR=87 
	DATA	UF87
	IFF	XUFNR=88 
	DATA	UF88
	IFF	XUFNR=89 
	DATA	UF89
	IFF	XUFNR=90 
	DATA	UF90
	IFF	XUFNR=91 
	DATA	UF91
	IFF	XUFNR=92 
	DATA	UF92
	IFF	XUFNR=93 
	DATA	UF93
	IFF	XUFNR=94 
	DATA	UF94
	IFF	XUFNR=95 
	DATA	UF95
	IFF	XUFNR=96 
	DATA	UF96
	IFF	XUFNR=97 
	DATA	UF97
	IFF	XUFNR=98 
	DATA	UF98
	IFT	XUFNR=99 
	DATA	UF99
	XIF
	EJECT













**********************************************************************
**                    9. USER DEFINED ASSEMBLER ROUTINE LINKED      **
**                    .  WITH THE WSM INTERPRETER:                  **
**********************************************************************
	EJECT

**********************************************************************
**                                                                  **
**                    IT IS POSSIBLE TO LINK AN USERDEFINED         **
**                    ASEMBLER ROUTINE WITH THE WSM INTER-          **
**                    PRETER TO BE CALLED FROM THE APPLICATION OR   **
**                    THE WSM INTERPRETER.                          **
**                    THE LINKING SHOULD BE DONE BY RE-             **
**                    PLACING THE ZERO BELOW WITH THE NAME OF       **
**                    THE ASSEMBLER SUBROUTINE. THIS NAME MUST      **
**                    ALSO BE DEFINED AS EXTERNAL ACCORDING         **
**                    TO "EXTRN"-DECLARATIONS IN THE BEGINNING      **
**                    OF THIS PROGRAM.                              **
**                                                                  **
**                    1. SUBROUTINE CALLED FROM THE APPLICATION     **
**
	NLIST
X:USRU	EQU	0
XUSRU	EQU	X:USRU
	LIST 
	IFT	XUSRU=0
W:USRU	DATA	0 
	XIF
	IFT	XUSRU=1
W:USRU	DATA	Q:S902
	XIF
**                                                                  **
**                    2. SUBROUTINE CALLED FROM WSM INTERPRETER     **
**                    .  DURING A WRCIVE REQUEST E.G TO MODIFY THE  **
**                    .  PBLK BUFFER RETURNED TO THE APPLICATION    **
**
	NLIST
X:PBUF	EQU	0
XPBUF	EQU	X:PBUF
	LIST 
	IFT	XPBUF=0
W:PBUF	DATA	0 
	XIF
	IFT	XPBUF=1
W:PBUF	DATA	Q:S904
	XIF

	EJECT
**                                                                  **
**                    NOTE:                                         **
**                    THIS INTERFACE SHOULD NOT BE MIXED UP WITH    **
**                    THE INTERFACE REQUIRED FOR UF-ROUTINES        **
**                    CALLED FROM WSM BASIC.                        **
**                                                                  **
**                    NOTE:                                         **
**                    THIS INTERFACE IS NOT RECOMMENDED.            **
**                    CONTACT FTS DEVELOPMENT DEPARTMENT BEFORE USE **
**                                                                  **
**********************************************************************
	EJECT















**********************************************************************
**                    10.ROUTINES TO PACK NUMERIC DATA.             **
**********************************************************************
	EJECT



**********************************************************************
**                                                                  **
**                    WHEN PACKING NUMERIC VALUES IN THE            **
**                    PARAMETERBLOCK BUFFER TO BE SENT BACK TO      **
**                    THE APPLICATION IT IS POSSIBLE TO EXCLUDE     **
**                    THE DECIMAL POINT OR COMMA.                   **
**                    THIS IS DONE BY REPLACING THE PACKROUTINE     **
**                    W:NPA2 BELOW WITH W:NPA3.                     **
**                                                                  **
**                                                                  **
**********************************************************************

W:NUMP	EQU	*
	IFT	XWDSP=0
	DATA	W:NPA2
	XIF
	EJECT















**********************************************************************
**                    11.WSM BASIC DEBUGGER.                        **
**********************************************************************

	EJECT
**********************************************************************
**                                                                  **
**                    THE WSM VALIDATION BASIC LANGUAGE DEBUGGER.   **
**                                                                  **
**                    W:BBUG                                        **
**                                                                  **
**                    SET THE DATA WORD BELOW TO ZERO TO            **
**                    EXCLUDE THE DEBUGGER.                         **
**                    SET THE DATA WORD BELOW TO W:BBUG TO          **
**                    INCLUDE THE DEBUGGER.                         **
**                                                                  **
**********************************************************************

W:BUGG	EQU	*
	IFT	XWDSP=0
WBBUG	DATA	0
	XIF
	EJECT















**********************************************************************
**                    THIS IS THE END OF THE AREA COMPRISING        **
**                    APPLICATION DEPENDANT DATA.                   **
**********************************************************************
	EJECT

W:INIT   EQU      * 
**********************************************************************
**                                                                  **
**  W:INIT            WSM INITIAL MODULE                            **
**                                                                  **
**                                                                  **
**  INPUT:            A2 = TASK-ID                                  **
**                    A14 -> APPWRK GENERATED AREA                  **
**                                                                  **
**  OUTPUT:           A13 -> WSM-TCA                                **
**                    A14 -> WSM-STACK                              **
**                    TCA & ECB:S & WWI INITIALIZED                 **
**                                                                  **
**********************************************************************

**********************************************************************
**                    SET A13 -> WSM-TCA                            **
**                    SET A14 -> WSM-STACK                          **
**********************************************************************

	LDR	A13,A14	A13 -> APPWRK = WSM-TCA START
	ADR*	A14,A14	APPWRK LENGTH FROM FIRST WORD 
	SUKL	A14,2	A14 -> "BOTTOM" STACK WORD
	EJECT
**********************************************************************
**                    CHECK IF FILE-HANDLER TASK.                   **
**********************************************************************

	CWK	A2,'FW'	FILE HANDLER TASK ?
	RF(NE)	INIT10	- NO ! 
	LD	A1,W:FHCA	FILE HANDLER IN SYSTEM ?
	RF(Z)	INIT10	- NO !
	ABR	A1	ACTIVATE FILE HANDLER TASK
INIT10	EQU	*


**********************************************************************
**                    SET BUFFER ADDR IN INTERTASK-ECB              **
**********************************************************************

	LDR	A5,A13	A5 -> WSM-TCA 
	ADKL	A5,PB:FC	A5 -> WSM PARAMETER BLOCK START
	ST	A5,TC:IC+ECB:BA,A13	SET BUF. ADDR IN IC-ECB 


**********************************************************************
**                    STORE TASK-ID AND STACK-POINTER IN WS:TCA     **
**********************************************************************
	ST	A2,TC:TID,A13	TASK-ID 
	ST	A14,TC:STK,A13	STACK POINTER
	EJECT
**********************************************************************
**                    INITIALIZE ECB:S                              **
**********************************************************************

	LDK	A1,KB	KEY BOARD FILE CODE
	ST	A1,TC:KB,A13
	LD	A1,W:DYFC	DISPLAY UNIT FILE CODE
	SC	A1,TC:EKO+1,A13 
			PRINTER FILE CODE IS SET IN APPL. !

	LDR	A1,A13	A1 -> WSM-TCA 
	ADKL	A1,PB:BUF+PBBUF	A1 -> INPUT BUFFER START
	ST	A1,TC:KB+ECB:BA,A13	SET BUFFER ADDRESS FOR KB 
	ADKL	A1,INBUF	A1 -> OUTPUT BUFFER START
	ST	A1,TC:IIE,A13	SET 1ST BYTE AFTER INPUT BUFFER 
	ST	A1,TC:EKO+ECB:BA,A13	SET BUFFER ADDRESS FOR EKO 
	ST	A1,TC:PRT+ECB:BA,A13	SET BUFFER ADDRESS FOR PRT 
			IC:ECB-BA IS SET ABOVE ! 
	LDR	A5,A1	A5 -> OUTPUT BUFFER START

	LDR	A1,A13	A1 -> WSM-TCA 
	ADK	A1,TC:KB+KB:PBL	A1 -> KEY BOARD INPUT PAR. BLOCK 
	ST	A1,TC:KB+KB:CW2,A13	STORE IN KB-ECB CONTROL WORD 2
	LDK	A1,KB:END-KB:EKO	A1 := SIZE OF KB PAR. BLOCK 
	SC	A1,TC:KB+KB:PBL,A13	STORE IN KB-ECB 
	EJECT
**********************************************************************
**                    INITIALIZE WSM WORK ITEMS AREA.               **
**                    STORE WWI-ADDRESS IN WS:TCA.                  **
**********************************************************************

			A5 -> OUTPUT BUFFER
	ADKL	A5,OUTBUF	A5 -> 1ST BYTE AFTER OUTPUT BUFFER
	ST	A5,TC:WWI,A13	STORE IN WS:TCA 
	LDK	A2,WWINOF	A2 := NO OF FAST CHOISE SECTIONS 
	SCR	A2,A5	STORE IN WWI-AREA
	LDK	A3,WWIFCL	A3 := LENGTH OF ONE FAST CHOISE SECT WI
	SC	A3,WWI:LF,A5	STORE IN WWI-AREA
	MUR	A3	A2 := LENGTH OF FAST CHOISE SECT AREA 
	ADR	A2,A5	SET A2 -> .... 
	ADK	A2,WWI:LO	...-> NUM WWI-AREA 
	ST	A2,WWI:AN,A5	STORE IN WWI-AREA
	ADKL	A2,WWINUM	A2 -> ALPHANUM WWI-AREA 
	ST	A2,WWI:AA,A5	STORE IN WWI-AREA
	LDK	A3,WWINON	A3 := NO OF NUMERIC WORK ITEMS 
	SC	A3,WWI:NN,A5	STORE IN WWI-AREA
	LDKL	A2,WWINUM	A2 := TOTAL SIZE OF NUM WORK ITEMS
	RF(Z)	INIT20	NO DIVISION BY ZERO!
	DVR	A3	DIVIDE BY NO OF NUM ITEMS 
INIT20	SC	A2,WWI:LN,A5	RESULT, LENGTH OF EACH NUM WORK ITEM,
			IS STORED IN WWI-AREA
	LDK	A3,WWINOA	SAME PROCEDURE FOR ALPHANUM WORK ITEMS ! 
	SC	A3,WWI:NA,A5
	LDKL	A2,WWIALP 
	RF(Z)	INIT25 
	DVR	A3 
INIT25	SC	A2,WWI:LA,A5
	EJECT
**********************************************************************
**                    CALCULATE & STORE DFD-ADDRESS                 **
**********************************************************************

	ADKL	A5,WWISIZ	A5 -> DFD-AREA
	ST	A5,TC:DFD,A13 
**********************************************************************
**                    CALCULATE & STORE SST-ADDRESS                 **
**********************************************************************

	ADKL	A5,SSTDFD	A5 -> 1ST BYTE AFTER SST-AREA 
	ST	A5,TC:SST,A13 


**********************************************************************
**                    SET STANDARD KEY TABLE AND BITMAP             **
**********************************************************************

	LDKL	A5,W:KTB1 
	ST	A5,TC:KY1,A13 
	LDKL	A5,W:KT1V 
	ST	A5,TC:KTV,A13	

	EJECT

**********************************************************************
**                    GET SCREEN SIZE AND TYPE OF VDU               **
**                    AND INFORMATION ABOUT TWO MESSAGE LINES       **
**********************************************************************

INIT35	EQU	*
	LDR	A8,A13	A8 -> DISPLAY ECB 
	ADKL	A8,TC:EKO 
	LDK	A1,2	- SET REQUESTED LENGTH
	ST	A1,ECB:RL,A8
	CM	ECB:CW,A8	LOGICAL SIZE WANTED 
	LDK	A7,/AC	A7 := READ SCREEN SIZE ORDER
	LKM
	DATA	1 
	LD*	A2,ECB:BA,A8	A2 := LOGICAL SCREEN SIZE 
	LD	A3,W:DYFC	MAKE BASIC READ TO FIND OUT 
	ECR	A3,A3	SCREEN TYPE.THE REQUEST IS MADE ON 
	SC	A3,1,A8	SYSTEM LINE 
			MAKE BASIC READ TO FIND OUT IF VD82/83 
	LDK	A7,/81	- A7 := BASIC READ ORDER
	LKM
	DATA	1 
	ECR	A3,A3	 
	SC	A3,1,A8	RETURN FC FOR SUBSCREEN 1 
	LDK	A3,VD82
	LD	A5,W:MESS	INFO ABOUT TWO MSGLINES IF VD82,83
	EJECT

*************************************************************************** 
**                                                                       ** 
**  IF RC IS NOT NEGATIVE (=/8000) AND NOT = ZERO, THE WORK STATION IS   ** 
**  NOT OPERABLE. THIS DEPENDS ON:                                       ** 
**    1. THE WORK STATION IS NOT PRESENT/ON.                             ** 
**    2. THE FIRM-WARE OF THE CONTROL UNIT IS A LITTLE BIT SLOW...       ** 
**  THEREFORE A NEW ATTEMPT TO READ THE WORK STATION IS PERFORMED, AFTER ** 
**  A TASK DELAY. THIS FIRM-WARE ERROR WAS DETECTED 1983-09-09 AT LMO    ** 
**  SWEDEN (BANKDATA / VD82). WHEN REPAIRED, THIS DELAY/RETRY CAN BE     ** 
**  REMOVED.                                                             ** 
**                                                                       ** 
*************************************************************************** 

	LD	A1,ECB:RC,A8	BASIC READ OK -> VD82,83 
	RF(Z)	INIT50	VD82,83 
	RF(N)	INIT40	REQUEST ERROR => VD46/47/81 OR SIMILAR... 
	LDKL	A8,50	RC > 0 => NOT OPERABLE
	LKM		DELAY 50 * 100 MS = 5 SECONDS 
	DATA	6 
	RB	INIT35	AGAIN! 

INIT40	EQU	*
	LD	A5,W:MESG	INFO ABOUT TWO MSGLINES IF NOT VD82,83
	CWK	A2,/0200	TYPE OF VDU:
	RF(NL)	INIT60	ORDINARY VDU (NOT ONELINE) 
	LDK	A3,MSGLIN	ONE LINE DISPLAY 
	LDK	A5,0	TWO MSG LINES IMPOSSIBLE
	LDK	A6,/10	SCREEN BACKGROUND IS BLACK
	RF	INIT55	 
	EJECT
INIT50	EQU	*	VD82,83
	LDK	A6,0	SCREEN BACKGROUND IS WHITE
	CC	A5,W:DYFC	IF FILECODES FOR HELP AND.. 
	RF(NE)	INIT55	..ERRORLINES ARE EQUAL THEN INDICATE.. 
	LDK	A5,0	..ONE MSG LINE IN A5. 
INIT55	EQU	*
	ORS	A3,TC:MSC,A13	SET TYPE OF VDU
	RF	INIT99
INIT60	EQU	*	ORDINARY VDU:S 
	LDK	A6,/10	SCREEN BACKGROUND IS BLACK
	SUKL	A2,/0100	EXCLUDE MSG LINE 
	ANR	A5,A5	TWO MSGLINES?
	RF(NN)	INIT99	NO.. 
	SUKL	A2,/0100	EXCLUDE ONE MORE MSG LINE

INIT99	EQU	*	SET CURRENT SUBSCREEN PAR.S
	LDK	A1,1 
	ST	A1,TC:SUS,A13	- SUBSCREEN NO. 
	SC	A1,TC:LIN,A13	- 1:ST FREE LINE
	ST	A2,TC:SIZ,A13	- SUBSCREEN SIZE
	ST	A2,TC:SZE,A13	SAVE SIZE OF SUBSCREEN 1
	ST	A5,TC:MSG,A13	SAVE INFO ABOUT TWO MSG LINES 
	ADR	A1,A6	ADD INFO ABOUT SCREEN BACKGROUND 
	ORS	A1,TC:MSC,A13	SET AUTO SWITCH ACTIVE 
	ABL	W:STRT	BRANCH TO WSM START ROUTINE 

	END	W:INIT

HexDump

0x00000…00034 (0, 0, 400)    Head {h00=0x0030, h01=0x0050, text=» IDENT W:INIT W,REL=2.3,850901,870155940230 «, t00=0x0000, t01=0x0004}
0x00034…0003c                Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x0003c…00044                Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0040}
0x00044…0004c                Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0048}
0x0004c…00054                Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0050}
0x00054…000a2                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0000, t01=0x0058}
0x000a2…000f0                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0000, t01=0x00a6}
0x000f0…0013e                Head {h00=0x004a, h01=0x0050, text=»**  W:INIT            LATEST UPDATING:  1985-09-01 BY: CJ           **«, t00=0x0000, t01=0x00f4}
0x0013e…0018c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0000, t01=0x0142}
0x0018c…001da                Head {h00=0x004a, h01=0x0050, text=»**  DESCRIPTION:      WSM INTERPRETER INITIAL MODULE WITH           **«, t00=0x0000, t01=0x0190}
0x001da…00228                Head {h00=0x004a, h01=0x0050, text=»**                    THINGS POSSIBLE FOR THE USER TO ALTER.        **«, t00=0x0001, t01=0x004e}
0x00228…00276                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0001, t01=0x009c}
0x00276…002c4                Head {h00=0x004a, h01=0x0050, text=»**                    0. NORMAL INTERPRETER OR MINI                 **«, t00=0x0001, t01=0x00ea}
0x002c4…00312                Head {h00=0x004a, h01=0x0050, text=»**                    .  INTERPRETER FOR FILEHANDLING ONLY.         **«, t00=0x0001, t01=0x0138}
0x00312…00360                Head {h00=0x004a, h01=0x0050, text=»**                    1. SIZES OF:                                  **«, t00=0x0001, t01=0x0186}
0x00360…003ae                Head {h00=0x004a, h01=0x0050, text=»**                    .  - WSM WORK ITEMS                           **«, t00=0x0002, t01=0x0044}
0x003ae…003fc                Head {h00=0x004a, h01=0x0050, text=»**                    .  - DYNAMIC FIELDS DATA AREA                 **«, t00=0x0002, t01=0x0092}
0x003fc…0044a                Head {h00=0x004a, h01=0x0050, text=»**                    .  - SECTION SEQUENCE TABLE                   **«, t00=0x0002, t01=0x00e0}
0x0044a…00498                Head {h00=0x004a, h01=0x0050, text=»**                    .  - PARAMETER BLOCK BUFFER                   **«, t00=0x0002, t01=0x012e}
0x00498…004e6                Head {h00=0x004a, h01=0x0050, text=»**                    .  - INPUT (KEY BOARD) BUFFER                 **«, t00=0x0002, t01=0x017c}
0x004e6…00534                Head {h00=0x004a, h01=0x0050, text=»**                    .  - OUTPUT (DISPLAY/PRINTER) BUFFER          **«, t00=0x0003, t01=0x003a}
0x00534…00582                Head {h00=0x004a, h01=0x0050, text=»**                    .  - WSM BASIC WORK AREA                      **«, t00=0x0003, t01=0x0088}
0x00582…005d0                Head {h00=0x004a, h01=0x0050, text=»**                    2. DEVICE PARAMETERS:                         **«, t00=0x0003, t01=0x00d6}
0x005d0…0061e                Head {h00=0x004a, h01=0x0050, text=»**                    .  - FILE CODES                               **«, t00=0x0003, t01=0x0124}
0x0061e…0066c                Head {h00=0x004a, h01=0x0050, text=»**                    .  - CURSOR MODE                              **«, t00=0x0003, t01=0x0172}
0x0066c…006ba                Head {h00=0x004a, h01=0x0050, text=»**                    .  - FILLER ECHO CHARACTER                    **«, t00=0x0004, t01=0x0030}
0x006ba…00708                Head {h00=0x004a, h01=0x0050, text=»**                    .  - ONE OR TWO MESSAGE LINES                 **«, t00=0x0004, t01=0x007e}
0x00708…00756                Head {h00=0x004a, h01=0x0050, text=»**                    3. KEY CODES & KEY TABLES.                    **«, t00=0x0004, t01=0x00cc}
0x00756…007a4                Head {h00=0x004a, h01=0x0050, text=»**                    4. SYSTEM MESSAGES.                           **«, t00=0x0004, t01=0x011a}
0x007a4…007f2                Head {h00=0x004a, h01=0x0050, text=»**                    5. SIZE OF WSM MEMORY BUFFER POOL.            **«, t00=0x0004, t01=0x0168}
0x007f2…00840                Head {h00=0x004a, h01=0x0050, text=»**                    6. WSM FILE HANDLER.                          **«, t00=0x0005, t01=0x0026}
0x00840…0088e                Head {h00=0x004a, h01=0x0050, text=»**                    7. INCLUDED WSM INSTRUCTIONS.                 **«, t00=0x0005, t01=0x0074}
0x0088e…008dc                Head {h00=0x004a, h01=0x0050, text=»**                    8. INCLUDED WSM VALIDATION STATEMENTS         **«, t00=0x0005, t01=0x00c2}
0x008dc…0092a                Head {h00=0x004a, h01=0x0050, text=»**                    .  AND OPERATORS.                             **«, t00=0x0005, t01=0x0110}
0x0092a…00978                Head {h00=0x004a, h01=0x0050, text=»**                    .  EXTERNAL FUNCTION CALLS.                   **«, t00=0x0005, t01=0x015e}
0x00978…009c6                Head {h00=0x004a, h01=0x0050, text=»**                    9. USER DEFINED SUBROUTINES                   **«, t00=0x0006, t01=0x001c}
0x009c6…00a14                Head {h00=0x004a, h01=0x0050, text=»**                    - CALLED FROM THE APPLICATION                 **«, t00=0x0006, t01=0x006a}
0x00a14…00a62                Head {h00=0x004a, h01=0x0050, text=»**                    - CALLED FROM WSM TO MODIFY PBLK BUFFER       **«, t00=0x0006, t01=0x00b8}
0x00a62…00ab0                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0006, t01=0x0106}
0x00ab0…00afe                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0006, t01=0x0154}
0x00afe…00b4c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0007, t01=0x0012}
0x00b4c…00b5a                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0060}
0x00b5a…00ba8                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0007, t01=0x006e}
0x00ba8…00bf6                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0007, t01=0x00bc}
0x00bf6…00c44                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0007, t01=0x010a}
0x00c44…00c92                Head {h00=0x004a, h01=0x0050, text=»**                    10. OPTION TO EXCLUDE DECIMAL POINT OR COMMA  **«, t00=0x0007, t01=0x0158}
0x00c92…00ce0                Head {h00=0x004a, h01=0x0050, text=»**                    .  IN NUMERIC DATA RETURNED TO APPLICATION.   **«, t00=0x0008, t01=0x0016}
0x00ce0…00d2e                Head {h00=0x004a, h01=0x0050, text=»**                    11. BASIC DEBUGGER FOR WSM VALIDATION.        **«, t00=0x0008, t01=0x0064}
0x00d2e…00d7c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0008, t01=0x00b2}
0x00d7c…00dca                Head {h00=0x004a, h01=0x0050, text=»**                    NOTE: VALUES MUST BE IN ACCORDANCE WITH       **«, t00=0x0008, t01=0x0100}
0x00dca…00e18                Head {h00=0x004a, h01=0x0050, text=»**                    .     SYSGEN (FILE CODES, BUFFER SIZES).      **«, t00=0x0008, t01=0x014e}
0x00e18…00e66                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0009, t01=0x000c}
0x00e66…00e74                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x005a}
0x00e74…00e7c                Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x0068}
0x00e7c…00e84                Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x0070}
0x00e84…00e94                Head {h00=0x000c, h01=0x0050, text=»** HIST:«, t00=0x0009, t01=0x0078}
0x00e94…00e9c                Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x0088}
0x00e9c…00ea4                Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x0090}
0x00ea4…00eae                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0009, t01=0x0098}
0x00eae…00ee2                Head {h00=0x0030, h01=0x0050, text=»**  1985-09-01 /CJ REL 2.3 -> ACTION-CENTRE «, t00=0x0009, t01=0x00a2}
0x00ee2…00f1a                Head {h00=0x0034, h01=0x0050, text=»**  1985-03-01 /CJ IRL OF REL 2.2 FOR TOSS 13.2 «, t00=0x0009, t01=0x00d6}
0x00f1a…00f52                Head {h00=0x0034, h01=0x0050, text=»**  1984-11-13 /TS IRL OF REL 2.2 FOR TOSS 13.1 «, t00=0x0009, t01=0x010e}
0x00f52…00f9c                Head {h00=0x0046, h01=0x0050, text=»**  1984-10-02 /TS EXTEND IC ECB WITH CW2. REQUIRED BYE TOSS-DGH. «, t00=0x0009, t01=0x0146}
0x00f9c…00fe2                Head {h00=0x0042, h01=0x0050, text=»**  1984-03-19 /GB  ADJUST FOR HANDLING OF THE '/5C' CHARACTER«, t00=0x0009, t01=0x0190}
0x00fe2…0102c                Head {h00=0x0046, h01=0x0050, text=»**  1984-02-07 /ME  INITIALIZE SCREEN BACKGROUND TO BLACK FOR ALL «, t00=0x000a, t01=0x0046}
0x0102c…0106a                Head {h00=0x003a, h01=0x0050, text=»**                  TYPE OF VDU:S EXCEPT 6391 (VD82). «, t00=0x000a, t01=0x0090}
0x0106a…010ac                Head {h00=0x003e, h01=0x0050, text=»**  1983-09-25 /ME  DELAY IF WORK STATION IS NOT OPERABLE.«, t00=0x000a, t01=0x00ce}
0x010ac…010d6                Head {h00=0x0026, h01=0x0050, text=»**  1983-05-04 /TS  EQU:S UPDATED «, t00=0x000a, t01=0x0110}
0x010d6…01114                Head {h00=0x003a, h01=0x0050, text=»**  1983-04-27 /TS  SET AUTO SWITCH ACTIVE AS DEFAULT «, t00=0x000a, t01=0x013a}
0x01114…0115c                Head {h00=0x0044, h01=0x0050, text=»**  1983-04-11 /TS  INCLUDE BASIC DEBUGGER AND ADJUST USERKEYS. «, t00=0x000a, t01=0x0178}
0x0115c…01192                Head {h00=0x0032, h01=0x0050, text=»**  1983-03-28 /TS  BASIC READ ON SYSTEM LINE.«, t00=0x000b, t01=0x0030}
0x01192…011d0                Head {h00=0x003a, h01=0x0050, text=»**                  AND MSG LINE EQU CHANGED TO DATA. «, t00=0x000b, t01=0x0066}
0x011d0…0120a                Head {h00=0x0036, h01=0x0050, text=»**  1983-03-02 /GB   ADJUST W:INIT TO WSMGEN REL 2«, t00=0x000b, t01=0x00a4}
0x0120a…01244                Head {h00=0x0036, h01=0x0050, text=»**  1983-01-20 /TS   SET STANDARD KEYCHECK BITMAP «, t00=0x000b, t01=0x00de}
0x01244…01276                Head {h00=0x002e, h01=0x0050, text=»**  1983-01-18 /TS   CALL USER ASS ROUTINE«, t00=0x000b, t01=0x0118}
0x01276…012be                Head {h00=0x0044, h01=0x0050, text=»**  1982-11-26 /TS   DECIMAL POINT OPTION & DATA TABLE W:UFTB.. «, t00=0x000b, t01=0x014a}
0x012be…012f0 (12, 0, 400)   Head {h00=0x002e, h01=0x0050, text=»**  1982-11-26 /TS   .. & INITIATE W:KTB1.«, t00=0x000c, t01=0x0004}
0x012f0…0132a                Head {h00=0x0036, h01=0x0050, text=»**  1982-11-12 /ME   BASIC DEBUGGER OPTION ADDED. «, t00=0x000c, t01=0x0036}
0x0132a…01362                Head {h00=0x0034, h01=0x0050, text=»**  1982-10-11 /ME   EXTENDED NO OF POOL UNITS. «, t00=0x000c, t01=0x0070}
0x01362…013a2                Head {h00=0x003c, h01=0x0050, text=»**  1982-10-06 /ME   ABSENCE OF WSM WORK ITEMS HANDLED. «, t00=0x000c, t01=0x00a8}
0x013a2…013e8                Head {h00=0x0042, h01=0x0050, text=»**  1982-09-10 /TS   FUNCTION CODE FOR GET FIELD PARAMETERS...«, t00=0x000c, t01=0x00e8}
0x013e8…01418                Head {h00=0x002c, h01=0x0050, text=»**  1982-09-10 /TS   ..ADDED TO WSMTAB. «, t00=0x000c, t01=0x012e}
0x01418…01452                Head {h00=0x0036, h01=0x0050, text=»**  1982-06-15 /GM   ORDER OF PARAMETERS CHANGED. «, t00=0x000c, t01=0x015e}
0x01452…01482                Head {h00=0x002c, h01=0x0050, text=»**  1982-06-14 /TS   TWO MESSAGE LINES. «, t00=0x000d, t01=0x0008}
0x01482…014b8                Head {h00=0x0032, h01=0x0050, text=»**  1982-04-22 /ME   TUP & TDOWN IMPLEMENTED. «, t00=0x000d, t01=0x0038}
0x014b8…014ee                Head {h00=0x0032, h01=0x0050, text=»**  1982-03-30 /ME   POSSIBILITY TO CALL USER-«, t00=0x000d, t01=0x006e}
0x014ee…0152c                Head {h00=0x003a, h01=0x0050, text=»**             /     DEFINED SUBROUTINES IMPLEMENTED. «, t00=0x000d, t01=0x00a4}
0x0152c…01562                Head {h00=0x0032, h01=0x0050, text=»**  1982-03-16 /ME   WSM BASIC DIVISION ADDED.«, t00=0x000d, t01=0x00e2}
0x01562…0159e                Head {h00=0x0038, h01=0x0050, text=»**  1982-03-01 /ME   WSM BASIC MULTIPLICATION ADDED.«, t00=0x000d, t01=0x0118}
0x0159e…015ce                Head {h00=0x002c, h01=0x0050, text=»**  1981-12-21 /GM   VD82/83 ADAPTIONS. «, t00=0x000d, t01=0x0154}
0x015ce…01610                Head {h00=0x003e, h01=0x0050, text=»**  1981-12-04 /ME   FUNC & VAL.STMT & VAL. OP TAB:S INC. «, t00=0x000d, t01=0x0184}
0x01610…01644                Head {h00=0x0030, h01=0x0050, text=»**  1981-10-19 /GM   VALIDATION ERROR ADDED «, t00=0x000e, t01=0x0036}
0x01644…01682                Head {h00=0x003a, h01=0x0050, text=»**  1981-10-15 /GM   READ SCREEN SIZE LKM IMPLEMENTED «, t00=0x000e, t01=0x006a}
0x01682…016bc                Head {h00=0x0036, h01=0x0050, text=»**  1981-09-18 /ME   FILE HANDLER TASK IMPLEMENTED«, t00=0x000e, t01=0x00a8}
0x016bc…016f8                Head {h00=0x0038, h01=0x0050, text=»**  1981-09-08 /ME   SCREEN EQUATES MOVED FROM W:EQU«, t00=0x000e, t01=0x00e2}
0x016f8…0172e                Head {h00=0x0032, h01=0x0050, text=»**  1981-08-04 /ME   SEPARATION OF I/O-BUFFER «, t00=0x000e, t01=0x011e}
0x0172e…01768                Head {h00=0x0036, h01=0x0050, text=»**  1981-08-04 /ME   BUFFER SIZES MOVED FROM W:EQU«, t00=0x000e, t01=0x0154}
0x01768…01798                Head {h00=0x002c, h01=0x0050, text=»**  1981-07-10 /ME   SOME KEYS ADDED... «, t00=0x000e, t01=0x018e}
0x01798…017da                Head {h00=0x003e, h01=0x0050, text=»**  1981-06-30 /ME   CHANGED SEQUENCE IN EXTERNAL EQUATES «, t00=0x000f, t01=0x002e}
0x017da…01810                Head {h00=0x0032, h01=0x0050, text=»**  1981-06-26 /ME   W:KMP INCLUDED IN W:INIT «, t00=0x000f, t01=0x0070}
0x01810…01846                Head {h00=0x0032, h01=0x0050, text=»**  1981-06-18 /GM   WSM POOL MOVED TO W:KMP. «, t00=0x000f, t01=0x00a6}
0x01846…0187e                Head {h00=0x0034, h01=0x0050, text=»**  1981-05-27 /ME   CHANGED LAYOUT OF WWI-AREA «, t00=0x000f, t01=0x00dc}
0x0187e…018ae                Head {h00=0x002c, h01=0x0050, text=»**  1981-05-25 /ME   CREATION OF W:INIT «, t00=0x000f, t01=0x0114}
0x018ae…018dc                Head {h00=0x002a, h01=0x0050, text=»**  23 MAR 81 /GM    CREATION OF W:KMP«, t00=0x000f, t01=0x0144}
0x018dc…018ea                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0172}
0x018ea…018f2                Head {h00=0x0004, h01=0x0050, t00=0x000f, t01=0x0180}
0x018f2…01908                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:INIT «, t00=0x000f, t01=0x0188}
0x01908…01938                Head {h00=0x002c, h01=0x0050, text=» ENTRY S:GTAB DESCRIPTOR USED BY SYSLOD «, t00=0x0010, t01=0x000e}
0x01938…01968                Head {h00=0x002c, h01=0x0050, text=» ENTRY W:ICFC INTERTASK COMM. FILE CODES«, t00=0x0010, t01=0x003e}
0x01968…01990                Head {h00=0x0024, h01=0x0050, text=» ENTRY W:DYFC DISPLAY FILE CODES«, t00=0x0010, t01=0x006e}
0x01990…019ba                Head {h00=0x0026, h01=0x0050, text=» ENTRY W:CUMO DISPLAY CURSOR MODE «, t00=0x0010, t01=0x0096}
0x019ba…019e0                Head {h00=0x0022, h01=0x0050, text=» ENTRY W:BZFC BUZZER FILE CODE«, t00=0x0010, t01=0x00c0}
0x019e0…019f6                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:ECHO «, t00=0x0010, t01=0x00e6}
0x019f6…01a0c                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:KTB1 «, t00=0x0010, t01=0x00fc}
0x01a0c…01a22                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:KT1V «, t00=0x0010, t01=0x0112}
0x01a22…01a38                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:KTB2 «, t00=0x0010, t01=0x0128}
0x01a38…01a4e                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:KTB3 «, t00=0x0010, t01=0x013e}
0x01a4e…01a64                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:KTB4 «, t00=0x0010, t01=0x0154}
0x01a64…01a7a                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:KTB5 «, t00=0x0010, t01=0x016a}
0x01a7a…01a90                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:KTB6 «, t00=0x0010, t01=0x0180}
0x01a90…01aa6                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:SM01 «, t00=0x0011, t01=0x0008}
0x01aa6…01abc                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:SM02 «, t00=0x0011, t01=0x001e}
0x01abc…01ad2                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:SM03 «, t00=0x0011, t01=0x0034}
0x01ad2…01ae8                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:SM04 «, t00=0x0011, t01=0x004a}
0x01ae8…01afe                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:SM05 «, t00=0x0011, t01=0x0060}
0x01afe…01b14                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:SM5C «, t00=0x0011, t01=0x0076}
0x01b14…01b2a                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:SM5S «, t00=0x0011, t01=0x008c}
0x01b2a…01b40                Head {h00=0x0012, h01=0x0050, text=» ENTRY W:SM5F «, t00=0x0011, t01=0x00a2}
0x01b40…01b56                Head {h00=0x0012, h01=0x0050, text=» ENTRY S:POOL «, t00=0x0011, t01=0x00b8}
0x01b56…01b6c                Head {h00=0x0012, h01=0x0050, text=» ENTRY S:POLA «, t00=0x0011, t01=0x00ce}
0x01b6c…01b82                Head {h00=0x0012, h01=0x0050, text=» ENTRY S:FILT «, t00=0x0011, t01=0x00e4}
0x01b82…01b98                Head {h00=0x0012, h01=0x0050, text=» ENTRY S:POLF «, t00=0x0011, t01=0x00fa}
0x01b98…01bae                Head {h00=0x0012, h01=0x0050, text=» ENTRY S:FORD «, t00=0x0011, t01=0x0110}
0x01bae…01bd2                Head {h00=0x0020, h01=0x0050, text=» ENTRY WSMTAB WSM FUNCTIONS «, t00=0x0011, t01=0x0126}
0x01bd2…01bfc                Head {h00=0x0026, h01=0x0050, text=» ENTRY W:VALA VALIDATION LANGUAGE «, t00=0x0011, t01=0x014a}
0x01bfc…01c30                Head {h00=0x0030, h01=0x0050, text=» ENTRY W:STMT VALIDATION LANGUAGE STATEMENTS«, t00=0x0011, t01=0x0174}
0x01c30…01c64                Head {h00=0x0030, h01=0x0050, text=» ENTRY W:OPER VALIDATION LANGUAGE OPERATORS «, t00=0x0012, t01=0x0018}
0x01c64…01c96                Head {h00=0x002e, h01=0x0050, text=» ENTRY W:FHCA -> TO WSM FILE HANDLER CODE «, t00=0x0012, t01=0x004c}
0x01c96…01cd2                Head {h00=0x0038, h01=0x0050, text=» ENTRY W:DSPA -> TO DISPLAY WRITING/CLEARING ROUTINE«, t00=0x0012, t01=0x007e}
0x01cd2…01d00                Head {h00=0x002a, h01=0x0050, text=» ENTRY W:USRU USERDEFINED ASS. ROUTINE«, t00=0x0012, t01=0x00ba}
0x01d00…01d22                Head {h00=0x001e, h01=0x0050, text=» ENTRY W:PBUF           " «, t00=0x0012, t01=0x00e8}
0x01d22…01d46                Head {h00=0x0020, h01=0x0050, text=» ENTRY W:BUGG BASIC DEBUGGER«, t00=0x0012, t01=0x010a}
0x01d46…01d74                Head {h00=0x002a, h01=0x0050, text=» ENTRY W:NUMP PACKOPTION FOR NUM DATA «, t00=0x0012, t01=0x012e}
0x01d74…01dac                Head {h00=0x0034, h01=0x0050, text=» ENTRY W:UFTB TABLE FOR EXTERNAL FUNCTION CALLS «, t00=0x0012, t01=0x015c}
0x01dac…01dba (19, 0, 400)   Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0004}
0x01dba…01dc2                Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0012}
0x01dc2…01e10                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0013, t01=0x001a}
0x01e10…01e5e                Head {h00=0x004a, h01=0x0050, text=»**                    EXTERNAL TO:                                  **«, t00=0x0013, t01=0x0068}
0x01e5e…01eac                Head {h00=0x004a, h01=0x0050, text=»**                    WSM INTERPRETER MAIN LOOP.                    **«, t00=0x0013, t01=0x00b6}
0x01eac…01efa                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0013, t01=0x0104}
0x01efa…01f02                Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0152}
0x01f02…01f18                Head {h00=0x0012, h01=0x0050, text=» EXTRN W:STRT «, t00=0x0013, t01=0x015a}
0x01f18…01f20                Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0170}
0x01f20…01f6e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0013, t01=0x0178}
0x01f6e…01fbc                Head {h00=0x004a, h01=0x0050, text=»**                    EXTERNAL TO:                                  **«, t00=0x0014, t01=0x0036}
0x01fbc…0200a                Head {h00=0x004a, h01=0x0050, text=»**                    FILE HANDLER TASK.                            **«, t00=0x0014, t01=0x0084}
0x0200a…02058                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0014, t01=0x00d2}
0x02058…02060                Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0120}
0x02060…02088                Head {h00=0x0024, h01=0x0050, text=» EXTRN WD:FIL FILE-HANDLER TASK «, t00=0x0014, t01=0x0128}
0x02088…02090                Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0150}
0x02090…020de                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0014, t01=0x0158}
0x020de…0212c                Head {h00=0x004a, h01=0x0050, text=»**                    EXTERNALS TO:                                 **«, t00=0x0015, t01=0x0016}
0x0212c…0217a                Head {h00=0x004a, h01=0x0050, text=»**                    WSM FUNCTIONS.                                **«, t00=0x0015, t01=0x0064}
0x0217a…021c8                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0015, t01=0x00b2}
0x021c8…021d0                Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0100}
0x021d0…021ec                Head {h00=0x0018, h01=0x0050, text=» EXTRN W:OPEN WOPEN «, t00=0x0015, t01=0x0108}
0x021ec…02208                Head {h00=0x0018, h01=0x0050, text=» EXTRN W:ATCH WATTCH«, t00=0x0015, t01=0x0124}
0x02208…02224                Head {h00=0x0018, h01=0x0050, text=» EXTRN W:RCIV WRCIVE«, t00=0x0015, t01=0x0140}
0x02224…0223e                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:MSG WMSG «, t00=0x0015, t01=0x015c}
0x0223e…0225a                Head {h00=0x0018, h01=0x0050, text=» EXTRN W:SEND WSEND «, t00=0x0015, t01=0x0176}
0x0225a…02276 (22, 0, 400)   Head {h00=0x0018, h01=0x0050, text=» EXTRN W:PRNT WPRINT«, t00=0x0016, t01=0x0004}
0x02276…02294                Head {h00=0x001a, h01=0x0050, text=» EXTRN W:CLOSE WCLOSE «, t00=0x0016, t01=0x0020}
0x02294…022b0                Head {h00=0x0018, h01=0x0050, text=» EXTRN W:SAVE WSAVE «, t00=0x0016, t01=0x003e}
0x022b0…022cc                Head {h00=0x0018, h01=0x0050, text=» EXTRN W:DLET WDLETE«, t00=0x0016, t01=0x005a}
0x022cc…022e8                Head {h00=0x0018, h01=0x0050, text=» EXTRN W:FATR WFATTR«, t00=0x0016, t01=0x0076}
0x022e8…02304                Head {h00=0x0018, h01=0x0050, text=» EXTRN W:CODE WCODE «, t00=0x0016, t01=0x0092}
0x02304…0231e                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:FID WFID «, t00=0x0016, t01=0x00ae}
0x0231e…02348                Head {h00=0x0026, h01=0x0050, text=» EXTRN W:GTPM GET FIELD PARAMETERS«, t00=0x0016, t01=0x00c8}
0x02348…0235e                Head {h00=0x0012, h01=0x0050, text=» EXTRN W:ENDR «, t00=0x0016, t01=0x00f2}
0x0235e…0236c                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0108}
0x0236c…023ba                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0016, t01=0x0116}
0x023ba…02408                Head {h00=0x004a, h01=0x0050, text=»**                    EXTERNALS TO:                                 **«, t00=0x0016, t01=0x0164}
0x02408…02456                Head {h00=0x004a, h01=0x0050, text=»**                    WSM VALIDATION LANGUAGE - STATEMENTS.         **«, t00=0x0017, t01=0x0022}
0x02456…024a4                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0017, t01=0x0070}
0x024a4…024ac                Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x00be}
0x024ac…024e4                Head {h00=0x0034, h01=0x0050, text=» EXTRN W:VEVA VALIDATION EVALUATION MAIN ROUTINE«, t00=0x0017, t01=0x00c6}
0x024e4…024ec                Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x00fe}
0x024ec…02516                Head {h00=0x0026, h01=0x0050, text=» EXTRN W:V000 ALPHANUM ASSIGNMENT «, t00=0x0017, t01=0x0106}
0x02516…0253a                Head {h00=0x0020, h01=0x0050, text=» EXTRN W:V002 NUM ASSIGNMENT«, t00=0x0017, t01=0x0130}
0x0253a…0255a                Head {h00=0x001c, h01=0x0050, text=» EXTRN W:V004 GO TO/GOTO«, t00=0x0017, t01=0x0154}
0x0255a…02580                Head {h00=0x0022, h01=0x0050, text=» EXTRN W:V006 IF...THEN LIN NO«, t00=0x0017, t01=0x0174}
0x02580…025aa                Head {h00=0x0026, h01=0x0050, text=» EXTRN W:V008 IF...THEN STATEMENT «, t00=0x0018, t01=0x000a}
0x025aa…025d8                Head {h00=0x002a, h01=0x0050, text=» EXTRN W:V00A ON...GO TO/GOTO LINE NO «, t00=0x0018, t01=0x0034}
0x025d8…025f2                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:V00C CALL«, t00=0x0018, t01=0x0062}
0x025f2…0260c                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:V00E SECT«, t00=0x0018, t01=0x007c}
0x0260c…02626                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:V010 ATTR«, t00=0x0018, t01=0x0096}
0x02626…02640                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:V012 STOP«, t00=0x0018, t01=0x00b0}
0x02640…0265a                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:V014 EXIT«, t00=0x0018, t01=0x00ca}
0x0265a…02674                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:V016 ERR «, t00=0x0018, t01=0x00e4}
0x02674…0268e                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:V018 WARN«, t00=0x0018, t01=0x00fe}
0x0268e…026a8                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:V01A REM «, t00=0x0018, t01=0x0118}
0x026a8…026ce                Head {h00=0x0022, h01=0x0050, text=» EXTRN W:V01C EMPTY STATEMENTS«, t00=0x0018, t01=0x0132}
0x026ce…026d6                Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x0158}
0x026d6…02724                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0018, t01=0x0160}
0x02724…02772                Head {h00=0x004a, h01=0x0050, text=»**                    EXTERNALS TO:                                 **«, t00=0x0019, t01=0x001e}
0x02772…027c0                Head {h00=0x004a, h01=0x0050, text=»**                    WSM VALIDATION LANGUAGE - OPERATORS.          **«, t00=0x0019, t01=0x006c}
0x027c0…0280e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0019, t01=0x00ba}
0x0280e…02816                Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0108}
0x02816…02840                Head {h00=0x0026, h01=0x0050, text=» EXTRN W:CMP RELATIONAL OPERATORS «, t00=0x0019, t01=0x0110}
0x02840…02848                Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x013a}
0x02848…0286a                Head {h00=0x001e, h01=0x0050, text=» EXTRN W:OP0E CONCATENATE «, t00=0x0019, t01=0x0142}
0x0286a…0288a                Head {h00=0x001c, h01=0x0050, text=» EXTRN W:OP0F SUBSTRING «, t00=0x0019, t01=0x0164}
0x0288a…028a4                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:OP10 STR «, t00=0x0019, t01=0x0184}
0x028a4…028c8                Head {h00=0x0020, h01=0x0050, text=» EXTRN W:OP11 MAKE POSITIVE «, t00=0x001a, t01=0x000e}
0x028c8…028e4                Head {h00=0x0018, h01=0x0050, text=» EXTRN W:OP12 NEGATE«, t00=0x001a, t01=0x0032}
0x028e4…028fe                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:OP13 ADD «, t00=0x001a, t01=0x004e}
0x028fe…0291c                Head {h00=0x001a, h01=0x0050, text=» EXTRN W:OP14 SUBTRACT«, t00=0x001a, t01=0x0068}
0x0291c…02938                Head {h00=0x0018, h01=0x0050, text=» EXTRN W:OP15 DIVIDE«, t00=0x001a, t01=0x0086}
0x02938…02956                Head {h00=0x001a, h01=0x0050, text=» EXTRN W:OP16 MULTIPLY«, t00=0x001a, t01=0x00a2}
0x02956…02970                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:OP17 ABS «, t00=0x001a, t01=0x00c0}
0x02970…0298a                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:OP18 INT «, t00=0x001a, t01=0x00da}
0x0298a…029a4                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:OP19 SGN «, t00=0x001a, t01=0x00f4}
0x029a4…029be                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:OP1A TIM «, t00=0x001a, t01=0x010e}
0x029be…029d8                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:OP1B DAY «, t00=0x001a, t01=0x0128}
0x029d8…029f2                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:OP1C SYS «, t00=0x001a, t01=0x0142}
0x029f2…02a0c                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:OP1D LEN «, t00=0x001a, t01=0x015c}
0x02a0c…02a26                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:OP1E NUM «, t00=0x001a, t01=0x0176}
0x02a26…02a40                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:OP1F DAT «, t00=0x001a, t01=0x0190}
0x02a40…02a5a                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:OP20 CDV «, t00=0x001b, t01=0x001a}
0x02a5a…02a74                Head {h00=0x0016, h01=0x0050, text=» EXTRN W:OP21 POS «, t00=0x001b, t01=0x0034}
0x02a74…02aa0                Head {h00=0x0028, h01=0x0050, text=» EXTRN W:EXP5 DUMMY ENTRY IN W:EXPR «, t00=0x001b, t01=0x004e}
0x02aa0…02aae                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x007a}
0x02aae…02afc                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x001b, t01=0x0088}
0x02afc…02b4a                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x001b, t01=0x00d6}
0x02b4a…02b98                Head {h00=0x004a, h01=0x0050, text=»**                    EXTERNAL TO WSM BASIC LANGUAGE DEBUGGER       **«, t00=0x001b, t01=0x0124}
0x02b98…02be6                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x001b, t01=0x0172}
0x02be6…02c34                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x001c, t01=0x0030}
0x02c34…02c3c                Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x007e}
0x02c3c…02c52                Head {h00=0x0012, h01=0x0050, text=» EXTRN W:BBUG «, t00=0x001c, t01=0x0086}
0x02c52…02c5a                Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x009c}
0x02c5a…02ca8                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x001c, t01=0x00a4}
0x02ca8…02cf6                Head {h00=0x004a, h01=0x0050, text=»**                    EXTERNAL:                                     **«, t00=0x001c, t01=0x00f2}
0x02cf6…02d44                Head {h00=0x004a, h01=0x0050, text=»**                    WRITE/ERASE DISPLAY ROUTINE                   **«, t00=0x001c, t01=0x0140}
0x02d44…02d92                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x001c, t01=0x018e}
0x02d92…02d9a                Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x004c}
0x02d9a…02db0                Head {h00=0x0012, h01=0x0050, text=» EXTRN W:WDSP «, t00=0x001d, t01=0x0054}
0x02db0…02db8                Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x006a}
0x02db8…02dc0                Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x0072}
0x02dc0…02dc8                Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x007a}
0x02dc8…02e16                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x001d, t01=0x0082}
0x02e16…02e64                Head {h00=0x004a, h01=0x0050, text=»**                    EXTERNAL:                                     **«, t00=0x001d, t01=0x00d0}
0x02e64…02eb2                Head {h00=0x004a, h01=0x0050, text=»**                    ROUTINES TO PACK NUMERIC DATA                 **«, t00=0x001d, t01=0x011e}
0x02eb2…02f00                Head {h00=0x004a, h01=0x0050, text=»**                    WITH AND WITHOUT DECIMAL POINT OR COMMA.      **«, t00=0x001d, t01=0x016c}
0x02f00…02f4e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x001e, t01=0x002a}
0x02f4e…02f56                Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x0078}
0x02f56…02f6c                Head {h00=0x0012, h01=0x0050, text=» EXTRN W:NPA2 «, t00=0x001e, t01=0x0080}
0x02f6c…02f82                Head {h00=0x0012, h01=0x0050, text=» EXTRN W:NPA3 «, t00=0x001e, t01=0x0096}
0x02f82…02f90                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x00ac}
0x02f90…02f98                Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x00ba}
0x02f98…02fe6                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x001e, t01=0x00c2}
0x02fe6…03034                Head {h00=0x004a, h01=0x0050, text=»**                    EXTERNAL FUNCTION CALLS:                      **«, t00=0x001e, t01=0x0110}
0x03034…03082                Head {h00=0x004a, h01=0x0050, text=»**                    ASSEMBLERROUTINES CALLED FROM THE VALIDATION  **«, t00=0x001e, t01=0x015e}
0x03082…030d0                Head {h00=0x004a, h01=0x0050, text=»**                    AND LINKED WITH WSM.                          **«, t00=0x001f, t01=0x001c}
0x030d0…0311e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x001f, t01=0x006a}
0x0311e…03126                Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x00b8}
0x03126…0313a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF00 «, t00=0x001f, t01=0x00c0}
0x0313a…0314e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF01 «, t00=0x001f, t01=0x00d4}
0x0314e…03162                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF02 «, t00=0x001f, t01=0x00e8}
0x03162…03176                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF03 «, t00=0x001f, t01=0x00fc}
0x03176…0318a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF04 «, t00=0x001f, t01=0x0110}
0x0318a…0319e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF05 «, t00=0x001f, t01=0x0124}
0x0319e…031b2                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF06 «, t00=0x001f, t01=0x0138}
0x031b2…031c6                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF07 «, t00=0x001f, t01=0x014c}
0x031c6…031da                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF08 «, t00=0x001f, t01=0x0160}
0x031da…031ee                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF09 «, t00=0x001f, t01=0x0174}
0x031ee…03202                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF10 «, t00=0x001f, t01=0x0188}
0x03202…03216                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF11 «, t00=0x0020, t01=0x000c}
0x03216…0322a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF12 «, t00=0x0020, t01=0x0020}
0x0322a…0323e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF13 «, t00=0x0020, t01=0x0034}
0x0323e…03252                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF14 «, t00=0x0020, t01=0x0048}
0x03252…03266                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF15 «, t00=0x0020, t01=0x005c}
0x03266…0327a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF16 «, t00=0x0020, t01=0x0070}
0x0327a…0328e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF17 «, t00=0x0020, t01=0x0084}
0x0328e…032a2                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF18 «, t00=0x0020, t01=0x0098}
0x032a2…032b6                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF19 «, t00=0x0020, t01=0x00ac}
0x032b6…032ca                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF20 «, t00=0x0020, t01=0x00c0}
0x032ca…032de                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF21 «, t00=0x0020, t01=0x00d4}
0x032de…032f2                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF22 «, t00=0x0020, t01=0x00e8}
0x032f2…03306                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF23 «, t00=0x0020, t01=0x00fc}
0x03306…0331a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF24 «, t00=0x0020, t01=0x0110}
0x0331a…0332e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF25 «, t00=0x0020, t01=0x0124}
0x0332e…03342                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF26 «, t00=0x0020, t01=0x0138}
0x03342…03356                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF27 «, t00=0x0020, t01=0x014c}
0x03356…0336a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF28 «, t00=0x0020, t01=0x0160}
0x0336a…0337e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF29 «, t00=0x0020, t01=0x0174}
0x0337e…03392                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF30 «, t00=0x0020, t01=0x0188}
0x03392…033a6                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF31 «, t00=0x0021, t01=0x000c}
0x033a6…033ba                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF32 «, t00=0x0021, t01=0x0020}
0x033ba…033ce                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF33 «, t00=0x0021, t01=0x0034}
0x033ce…033e2                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF34 «, t00=0x0021, t01=0x0048}
0x033e2…033f6                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF35 «, t00=0x0021, t01=0x005c}
0x033f6…0340a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF36 «, t00=0x0021, t01=0x0070}
0x0340a…0341e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF37 «, t00=0x0021, t01=0x0084}
0x0341e…03432                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF38 «, t00=0x0021, t01=0x0098}
0x03432…03446                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF39 «, t00=0x0021, t01=0x00ac}
0x03446…0345a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF40 «, t00=0x0021, t01=0x00c0}
0x0345a…0346e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF41 «, t00=0x0021, t01=0x00d4}
0x0346e…03482                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF42 «, t00=0x0021, t01=0x00e8}
0x03482…03496                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF43 «, t00=0x0021, t01=0x00fc}
0x03496…034aa                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF44 «, t00=0x0021, t01=0x0110}
0x034aa…034be                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF45 «, t00=0x0021, t01=0x0124}
0x034be…034d2                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF46 «, t00=0x0021, t01=0x0138}
0x034d2…034e6                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF47 «, t00=0x0021, t01=0x014c}
0x034e6…034fa                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF48 «, t00=0x0021, t01=0x0160}
0x034fa…0350e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF49 «, t00=0x0021, t01=0x0174}
0x0350e…03522                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF50 «, t00=0x0021, t01=0x0188}
0x03522…03536                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF51 «, t00=0x0022, t01=0x000c}
0x03536…0354a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF52 «, t00=0x0022, t01=0x0020}
0x0354a…0355e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF53 «, t00=0x0022, t01=0x0034}
0x0355e…03572                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF54 «, t00=0x0022, t01=0x0048}
0x03572…03586                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF55 «, t00=0x0022, t01=0x005c}
0x03586…0359a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF56 «, t00=0x0022, t01=0x0070}
0x0359a…035ae                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF57 «, t00=0x0022, t01=0x0084}
0x035ae…035c2                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF58 «, t00=0x0022, t01=0x0098}
0x035c2…035d6                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF59 «, t00=0x0022, t01=0x00ac}
0x035d6…035ea                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF60 «, t00=0x0022, t01=0x00c0}
0x035ea…035fe                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF61 «, t00=0x0022, t01=0x00d4}
0x035fe…03612                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF62 «, t00=0x0022, t01=0x00e8}
0x03612…03626                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF63 «, t00=0x0022, t01=0x00fc}
0x03626…0363a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF64 «, t00=0x0022, t01=0x0110}
0x0363a…0364e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF65 «, t00=0x0022, t01=0x0124}
0x0364e…03662                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF66 «, t00=0x0022, t01=0x0138}
0x03662…03676                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF67 «, t00=0x0022, t01=0x014c}
0x03676…0368a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF68 «, t00=0x0022, t01=0x0160}
0x0368a…0369e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF69 «, t00=0x0022, t01=0x0174}
0x0369e…036b2                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF70 «, t00=0x0022, t01=0x0188}
0x036b2…036c6                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF71 «, t00=0x0023, t01=0x000c}
0x036c6…036da                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF72 «, t00=0x0023, t01=0x0020}
0x036da…036ee                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF73 «, t00=0x0023, t01=0x0034}
0x036ee…03702                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF74 «, t00=0x0023, t01=0x0048}
0x03702…03716                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF75 «, t00=0x0023, t01=0x005c}
0x03716…0372a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF76 «, t00=0x0023, t01=0x0070}
0x0372a…0373e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF77 «, t00=0x0023, t01=0x0084}
0x0373e…03752                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF78 «, t00=0x0023, t01=0x0098}
0x03752…03766                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF79 «, t00=0x0023, t01=0x00ac}
0x03766…0377a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF80 «, t00=0x0023, t01=0x00c0}
0x0377a…0378e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF81 «, t00=0x0023, t01=0x00d4}
0x0378e…037a2                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF82 «, t00=0x0023, t01=0x00e8}
0x037a2…037b6                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF83 «, t00=0x0023, t01=0x00fc}
0x037b6…037ca                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF84 «, t00=0x0023, t01=0x0110}
0x037ca…037de                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF85 «, t00=0x0023, t01=0x0124}
0x037de…037f2                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF86 «, t00=0x0023, t01=0x0138}
0x037f2…03806                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF87 «, t00=0x0023, t01=0x014c}
0x03806…0381a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF88 «, t00=0x0023, t01=0x0160}
0x0381a…0382e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF89 «, t00=0x0023, t01=0x0174}
0x0382e…03842                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF90 «, t00=0x0023, t01=0x0188}
0x03842…03856                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF91 «, t00=0x0024, t01=0x000c}
0x03856…0386a                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF92 «, t00=0x0024, t01=0x0020}
0x0386a…0387e                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF93 «, t00=0x0024, t01=0x0034}
0x0387e…03892                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF94 «, t00=0x0024, t01=0x0048}
0x03892…038a6                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF95 «, t00=0x0024, t01=0x005c}
0x038a6…038ba                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF96 «, t00=0x0024, t01=0x0070}
0x038ba…038ce                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF97 «, t00=0x0024, t01=0x0084}
0x038ce…038e2                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF98 «, t00=0x0024, t01=0x0098}
0x038e2…038f6                Head {h00=0x0010, h01=0x0050, text=» EXTRN UF99 «, t00=0x0024, t01=0x00ac}
0x038f6…03904                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x00c0}
0x03904…0390c                Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x00ce}
0x0390c…0395a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0024, t01=0x00d6}
0x0395a…039a8                Head {h00=0x004a, h01=0x0050, text=»**                    EXTERNAL:                                     **«, t00=0x0024, t01=0x0124}
0x039a8…039f6                Head {h00=0x004a, h01=0x0050, text=»**                    USERDEFINED ASSEMBLER ROUTINE LINKED WITH     **«, t00=0x0024, t01=0x0172}
0x039f6…03a44                Head {h00=0x004a, h01=0x0050, text=»**                    WSM.                                          **«, t00=0x0025, t01=0x0030}
0x03a44…03a92                Head {h00=0x004a, h01=0x0050, text=»**                    REPLACE EXTERNALS BELOW WITH NAME OF THE      **«, t00=0x0025, t01=0x007e}
0x03a92…03ae0                Head {h00=0x004a, h01=0x0050, text=»**                    ASSEMBLER ROUTINE                             **«, t00=0x0025, t01=0x00cc}
0x03ae0…03b2e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0025, t01=0x011a}
0x03b2e…03b36                Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x0168}
0x03b36…03b4c                Head {h00=0x0012, h01=0x0050, text=» EXTRN Q:S902 «, t00=0x0025, t01=0x0170}
0x03b4c…03b62                Head {h00=0x0012, h01=0x0050, text=» EXTRN Q:S904 «, t00=0x0025, t01=0x0186}
0x03b62…03b70                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x000c}
0x03b70…03b78                Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x001a}
0x03b78…03ba2                Head {h00=0x0026, h01=0x0050, text=» NLIST  GLOBAL EQUATES (SEE W:EQU)«, t00=0x0026, t01=0x0022}
0x03ba2…03bb0                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x004c}
0x03bb0…03bb8                Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x005a}
0x03bb8…03bc0                Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0062}
0x03bc0…03bc8                Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x006a}
0x03bc8…03bd0                Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0072}
0x03bd0…03c00                Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0026, t01=0x007a}
0x03c00…03c30                Head {h00=0x002c, h01=0x0050, text=»** LATEST UPDATING: 1983-05-04  BY: TS *«, t00=0x0026, t01=0x00aa}
0x03c30…03c60                Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0026, t01=0x00da}
0x03c60…03c6e                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x010a}
0x03c6e…03c78                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0026, t01=0x0118}
0x03c78…03c96                Head {h00=0x001a, h01=0x0050, text=»**  WSM FUNCTION CODES«, t00=0x0026, t01=0x0122}
0x03c96…03ca0                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0026, t01=0x0140}
0x03ca0…03ca8                Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x014a}
0x03ca8…03cc0                Head {h00=0x0014, h01=0x0050, text=»WOPEN EQU /0000 «, t00=0x0026, t01=0x0152}
0x03cc0…03cd8                Head {h00=0x0014, h01=0x0050, text=»WATTCH EQU /0100«, t00=0x0026, t01=0x016a}
0x03cd8…03cf0                Head {h00=0x0014, h01=0x0050, text=»WRCIVE EQU /0200«, t00=0x0026, t01=0x0182}
0x03cf0…03d0c                Head {h00=0x0018, h01=0x0050, text=»*UNPCK   EQU       -«, t00=0x0027, t01=0x000a}
0x03d0c…03d22                Head {h00=0x0012, h01=0x0050, text=»WMSG EQU /0300«, t00=0x0027, t01=0x0026}
0x03d22…03d3a                Head {h00=0x0014, h01=0x0050, text=»WSEND EQU /0400 «, t00=0x0027, t01=0x003c}
0x03d3a…03d52                Head {h00=0x0014, h01=0x0050, text=»WPRINT EQU /0500«, t00=0x0027, t01=0x0054}
0x03d52…03d6a                Head {h00=0x0014, h01=0x0050, text=»WCLOSE EQU /0600«, t00=0x0027, t01=0x006c}
0x03d6a…03d82                Head {h00=0x0014, h01=0x0050, text=»WSAVE EQU /0700 «, t00=0x0027, t01=0x0084}
0x03d82…03d9a                Head {h00=0x0014, h01=0x0050, text=»WDLETE EQU /0800«, t00=0x0027, t01=0x009c}
0x03d9a…03db2                Head {h00=0x0014, h01=0x0050, text=»WFATTR EQU /0900«, t00=0x0027, t01=0x00b4}
0x03db2…03dca                Head {h00=0x0014, h01=0x0050, text=»WCODE EQU /0A00 «, t00=0x0027, t01=0x00cc}
0x03dca…03de0                Head {h00=0x0012, h01=0x0050, text=»WFID EQU /0B00«, t00=0x0027, t01=0x00e4}
0x03de0…03dee                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x00fa}
0x03dee…03df6                Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x0108}
0x03df6…03e00                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0027, t01=0x0110}
0x03e00…03e22                Head {h00=0x001e, h01=0x0050, text=»**  WSM SYSTEM PARAMETERS «, t00=0x0027, t01=0x011a}
0x03e22…03e2c                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0027, t01=0x013c}
0x03e2c…03e34                Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x0146}
0x03e34…03e6a                Head {h00=0x0032, h01=0x0050, text=»TFP EQU 1 CONDITIONAL ASSEMBLY FOR TFP PACKAGE«, t00=0x0027, t01=0x014e}
0x03e6a…03e7e                Head {h00=0x0010, h01=0x0050, text=»CPU EQU 857 «, t00=0x0027, t01=0x0184}
0x03e7e…03e86                Head {h00=0x0004, h01=0x0050, t00=0x0028, t01=0x0008}
0x03e86…03ebc                Head {h00=0x0032, h01=0x0050, text=»POLSIZ EQU 248 SIZE OF POOL UNITS IN THE POOL «, t00=0x0028, t01=0x0010}
0x03ebc…03ef0                Head {h00=0x0030, h01=0x0050, text=»POLDIS EQU 6 USER DISPLACEMENT IN POOL-UNITS«, t00=0x0028, t01=0x0046}
0x03ef0…03f1e                Head {h00=0x002a, h01=0x0050, text=»PADLEN EQU 12 LENGTS OF POOL-ADM-DATA «, t00=0x0028, t01=0x007a}
0x03f1e…03f4a                Head {h00=0x0028, h01=0x0050, text=»FIDSIZ EQU 4 SIZE OF FIELD IDENTITY «, t00=0x0028, t01=0x00a8}
0x03f4a…03f52                Head {h00=0x0004, h01=0x0050, t00=0x0028, t01=0x00d4}
0x03f52…03f8a                Head {h00=0x0034, h01=0x0050, text=»** SCRSIZ & EKOCHR MOVED 1981-09-07 TO W:INIT **«, t00=0x0028, t01=0x00dc}
0x03f8a…03f92                Head {h00=0x0004, h01=0x0050, t00=0x0028, t01=0x0114}
0x03f92…03f9c                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0028, t01=0x011c}
0x03f9c…03fb8                Head {h00=0x0018, h01=0x0050, text=»**  OPTIONAL DEVICES«, t00=0x0028, t01=0x0126}
0x03fb8…03fc2                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0028, t01=0x0142}
0x03fc2…03fca                Head {h00=0x0004, h01=0x0050, t00=0x0028, t01=0x014c}
0x03fca…04006                Head {h00=0x0038, h01=0x0050, text=»PRTDEV EQU 12 =12 IF PRINT DEVICE IN SYSTEM, ELSE =0«, t00=0x0028, t01=0x0154}
0x04006…04046                Head {h00=0x003c, h01=0x0050, text=»INPDEV EQU 0 =12 IF OTHER INPUT DEVICE THAN KEYBOARD ...«, t00=0x0028, t01=0x0190}
0x04046…04068                Head {h00=0x001e, h01=0x0050, text=»   ... IN SYSTEM, ELSE =0 «, t00=0x0029, t01=0x0040}
0x04068…04070                Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x0062}
0x04070…0407a                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0029, t01=0x006a}
0x0407a…04092                Head {h00=0x0014, h01=0x0050, text=»**  BUFFER SIZES«, t00=0x0029, t01=0x0074}
0x04092…0409c                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0029, t01=0x008c}
0x0409c…040a4                Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x0096}
0x040a4…040cc                Head {h00=0x0024, h01=0x0050, text=»** MOVED 1981-08-04 TO W:INIT **«, t00=0x0029, t01=0x009e}
0x040cc…040da                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x00c6}
0x040da…040e2                Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x00d4}
0x040e2…040ec                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0029, t01=0x00dc}
0x040ec…0410c                Head {h00=0x001c, h01=0x0050, text=»**  DISPLACEMENTS IN ECB«, t00=0x0029, t01=0x00e6}
0x0410c…04116                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0029, t01=0x0106}
0x04116…0411e                Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x0110}
0x0411e…04132                Head {h00=0x0010, h01=0x0050, text=»ECB:FC EQU 0«, t00=0x0029, t01=0x0118}
0x04132…04146                Head {h00=0x0010, h01=0x0050, text=»ECB:BA EQU 2«, t00=0x0029, t01=0x012c}
0x04146…0415a                Head {h00=0x0010, h01=0x0050, text=»ECB:RL EQU 4«, t00=0x0029, t01=0x0140}
0x0415a…0416e                Head {h00=0x0010, h01=0x0050, text=»ECB:EL EQU 6«, t00=0x0029, t01=0x0154}
0x0416e…04182                Head {h00=0x0010, h01=0x0050, text=»ECB:RC EQU 8«, t00=0x0029, t01=0x0168}
0x04182…04198                Head {h00=0x0012, h01=0x0050, text=»ECB:CW EQU 10 «, t00=0x0029, t01=0x017c}
0x04198…041a6 (42, 0, 400)   Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x0004}
0x041a6…041ae                Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x0012}
0x041ae…041b8                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002a, t01=0x001a}
0x041b8…041e6                Head {h00=0x002a, h01=0x0050, text=»**  ORDERS TO THE POOL & FILE HANDLER «, t00=0x002a, t01=0x0024}
0x041e6…041f0                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002a, t01=0x0052}
0x041f0…041f8                Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x005c}
0x041f8…04212                Head {h00=0x0016, h01=0x0050, text=»PF:RD EQU /01 READ«, t00=0x002a, t01=0x0064}
0x04212…0422c                Head {h00=0x0016, h01=0x0050, text=»PF:GET EQU /02 GET«, t00=0x002a, t01=0x007e}
0x0422c…0424a                Head {h00=0x001a, h01=0x0050, text=»PF:SCH EQU /04 SEARCH «, t00=0x002a, t01=0x0098}
0x0424a…04266                Head {h00=0x0018, h01=0x0050, text=»PF:WRT EQU /05 WRITE«, t00=0x002a, t01=0x00b6}
0x04266…04280                Head {h00=0x0016, h01=0x0050, text=»PF:CLO EQU /08 CLO«, t00=0x002a, t01=0x00d2}
0x04280…0429c                Head {h00=0x0018, h01=0x0050, text=»PF:OFR EQU /10 LOCK «, t00=0x002a, t01=0x00ec}
0x0429c…042ba                Head {h00=0x001a, h01=0x0050, text=»PF:RLS EQU /20 RELEASE«, t00=0x002a, t01=0x0108}
0x042ba…042d8                Head {h00=0x001a, h01=0x0050, text=»PF:DLT EQU /40 DELETE «, t00=0x002a, t01=0x0126}
0x042d8…042f4                Head {h00=0x0018, h01=0x0050, text=»PF:OPN EQU /80 OPEN «, t00=0x002a, t01=0x0144}
0x042f4…04310                Head {h00=0x0018, h01=0x0050, text=»NEXT EQU /0100 NEXT «, t00=0x002a, t01=0x0160}
0x04310…04330                Head {h00=0x001c, h01=0x0050, text=»PREV EQU /0200 PREVIOUS «, t00=0x002a, t01=0x017c}
0x04330…04350                Head {h00=0x001c, h01=0x0050, text=»INDEX EQU /0400 BY INDEX«, t00=0x002b, t01=0x000c}
0x04350…04374                Head {h00=0x0020, h01=0x0050, text=»ALL EQU /0800 ALL ON LRU QUE«, t00=0x002b, t01=0x002c}
0x04374…043a6                Head {h00=0x002e, h01=0x0050, text=»NOWAIT EQU /1000 USED FOR READ WITH NOWAIT«, t00=0x002b, t01=0x0050}
0x043a6…043b4                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0082}
0x043b4…043be                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002b, t01=0x0090}
0x043be…043fc                Head {h00=0x003a, h01=0x0050, text=»**  DISPLACEMENTS IN THE POOL & FILE HANDLER COM. AREA«, t00=0x002b, t01=0x009a}
0x043fc…04406                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002b, t01=0x00d8}
0x04406…0440e                Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x00e2}
0x0440e…04436                Head {h00=0x0024, h01=0x0050, text=»PF:BF1 EQU 0 ADDRESS TO BUFFER 1«, t00=0x002b, t01=0x00ea}
0x04436…04466                Head {h00=0x002c, h01=0x0050, text=»PF:BF2 EQU PF:BF1+2 ADDRESS TO BUFFER 2 «, t00=0x002b, t01=0x0112}
0x04466…0448e                Head {h00=0x0024, h01=0x0050, text=»PF:TYP EQU PF:BF2+3 TYPE OF DATA«, t00=0x002b, t01=0x0142}
0x0448e…044b8                Head {h00=0x0026, h01=0x0050, text=»PF:NAM EQU PF:TYP+1 IDENTIFICATION«, t00=0x002b, t01=0x016a}
0x044b8…044c2 (44, 0, 400)   Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002c, t01=0x0004}
0x044c2…044fc                Head {h00=0x0036, h01=0x0050, text=»**           THIS PART OF THE COM. AREA IS THE ECB«, t00=0x002c, t01=0x000e}
0x044fc…04506                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002c, t01=0x0048}
0x04506…04532                Head {h00=0x0028, h01=0x0050, text=»PF:ECB EQU PF:NAM+6 START OF THE ECB«, t00=0x002c, t01=0x0052}
0x04532…0455a                Head {h00=0x0024, h01=0x0050, text=»PF:FNR EQU PF:ECB+1 FILE NUMBER «, t00=0x002c, t01=0x007e}
0x0455a…04590                Head {h00=0x0032, h01=0x0050, text=»PF:IOB EQU PF:FNR+1 ADDRESS TO THE I/O-BUFFER «, t00=0x002c, t01=0x00a6}
0x04590…045bc                Head {h00=0x0028, h01=0x0050, text=»PF:RLN EQU PF:IOB+2 REQUESTED LENGTH«, t00=0x002c, t01=0x00dc}
0x045bc…045e8                Head {h00=0x0028, h01=0x0050, text=»PF:ELN EQU PF:RLN+2 EFFECTIVE LENGTH«, t00=0x002c, t01=0x0108}
0x045e8…04610                Head {h00=0x0024, h01=0x0050, text=»PF:RET EQU PF:ELN+2 RETURN CODE «, t00=0x002c, t01=0x0134}
0x04610…0463a                Head {h00=0x0026, h01=0x0050, text=»PF:CW1 EQU PF:RET+2 CONTROL WORD 1«, t00=0x002c, t01=0x015c}
0x0463a…04664                Head {h00=0x0026, h01=0x0050, text=»PF:CW2 EQU PF:CW1+2 CONTROL WORD 2«, t00=0x002c, t01=0x0186}
0x04664…0466e                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002d, t01=0x0020}
0x0466e…046ac                Head {h00=0x003a, h01=0x0050, text=»**           THIS PART OF THE COM. AREA IS FOR THE FPB«, t00=0x002d, t01=0x002a}
0x046ac…046b6                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002d, t01=0x0068}
0x046b6…046e0                Head {h00=0x0026, h01=0x0050, text=»PF:FIL EQU PF:CW2+2 THE FILE NAME «, t00=0x002d, t01=0x0072}
0x046e0…0470c                Head {h00=0x0028, h01=0x0050, text=»PF:VOL EQU PF:FIL+8 THE VOLUME NAME «, t00=0x002d, t01=0x009c}
0x0470c…04730                Head {h00=0x0020, h01=0x0050, text=»PF:RN1 EQU PF:VOL+6 RECNO 1 «, t00=0x002d, t01=0x00c8}
0x04730…04754                Head {h00=0x0020, h01=0x0050, text=»PF:RN2 EQU PF:RN1+2 RECNO 2 «, t00=0x002d, t01=0x00ec}
0x04754…04770                Head {h00=0x0018, h01=0x0050, text=»PF:END EQU PF:RN2+2 «, t00=0x002d, t01=0x0110}
0x04770…0477e                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x012c}
0x0477e…04788                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002d, t01=0x013a}
0x04788…047b2                Head {h00=0x0026, h01=0x0050, text=»** LAYOUT OF POOL-FREE-SPACE AREA «, t00=0x002d, t01=0x0144}
0x047b2…047bc                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002d, t01=0x016e}
0x047bc…047ee                Head {h00=0x002e, h01=0x0050, text=»PP:CON EQU 0 NO OF FREE UNITS IN THIS AREA«, t00=0x002d, t01=0x0178}
0x047ee…0481e                Head {h00=0x002c, h01=0x0050, text=»PP:LEN EQU PP:CON+2 LENGTH OF THIS AREA «, t00=0x002e, t01=0x001a}
0x0481e…0484c                Head {h00=0x002a, h01=0x0050, text=»PP:NAM EQU PP:LEN+2 NAME OF THIS AREA «, t00=0x002e, t01=0x004a}
0x0484c…04882                Head {h00=0x0032, h01=0x0050, text=»PP:BIT EQU PP:NAM+2 FREE-SPACE INDICATOR BITS «, t00=0x002e, t01=0x0078}
0x04882…0488c                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002e, t01=0x00ae}
0x0488c…0489a                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x00b8}
0x0489a…048a4                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002e, t01=0x00c6}
0x048a4…048cc                Head {h00=0x0024, h01=0x0050, text=»** LAYOUT OF FREE-SPACE ON DISC «, t00=0x002e, t01=0x00d0}
0x048cc…048d6                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002e, t01=0x00f8}
0x048d6…048f6                Head {h00=0x001c, h01=0x0050, text=»DS:TYP EQU 0 TYPE = "FS"«, t00=0x002e, t01=0x0102}
0x048f6…04922                Head {h00=0x0028, h01=0x0050, text=»DS:LK1 EQU DS:TYP+2 LINK FORWARD  1 «, t00=0x002e, t01=0x0122}
0x04922…0494e                Head {h00=0x0028, h01=0x0050, text=»DS:LK2 EQU DS:LK1+2  -  "  -      2 «, t00=0x002e, t01=0x014e}
0x0494e…0497c                Head {h00=0x002a, h01=0x0050, text=»DS:NUM EQU DS:LK2+2 NUMBER OF RECORDS «, t00=0x002e, t01=0x017a}
0x0497c…049ae                Head {h00=0x002e, h01=0x0050, text=»DS:NOF EQU DS:NUM+2 NUMBER OF FREE RECORDS«, t00=0x002f, t01=0x0018}
0x049ae…049da                Head {h00=0x0028, h01=0x0050, text=»DS:FI1 EQU DS:NOF+2 FIRST REL.RECNO «, t00=0x002f, t01=0x004a}
0x049da…04a08                Head {h00=0x002a, h01=0x0050, text=»DS:FI2 EQU DS:FI1+2  USED AS REC.BASE «, t00=0x002f, t01=0x0076}
0x04a08…04a36                Head {h00=0x002a, h01=0x0050, text=»DS:REL EQU DS:FI2+2 RELATIV FR.SP.REC.«, t00=0x002f, t01=0x00a4}
0x04a36…04a66                Head {h00=0x002c, h01=0x0050, text=»DS:PTR EQU DS:REL+1 FREE-SPACE POINTERS «, t00=0x002f, t01=0x00d2}
0x04a66…04a6e                Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x0102}
0x04a6e…04a92                Head {h00=0x0020, h01=0x0050, text=»DS:RLN EQU 256 RECORD LENGTH«, t00=0x002f, t01=0x010a}
0x04a92…04a9c                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002f, t01=0x012e}
0x04a9c…04ac0                Head {h00=0x0020, h01=0x0050, text=»**  POOL-ADMINSTRATION DATA «, t00=0x002f, t01=0x0138}
0x04ac0…04aca                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x002f, t01=0x015c}
0x04aca…04af8                Head {h00=0x002a, h01=0x0050, text=»PA:TYP EQU 0 TYPE OF DATA IN THE UNIT «, t00=0x002f, t01=0x0166}
0x04af8…04b20 (48, 0, 400)   Head {h00=0x0024, h01=0x0050, text=»PA:IDE EQU PA:TYP+1 NAME OF DATA«, t00=0x0030, t01=0x0004}
0x04b20…04b48                Head {h00=0x0024, h01=0x0050, text=»PA:FIL EQU PA:IDE+6 FILE NUMBER «, t00=0x0030, t01=0x002c}
0x04b48…04b74                Head {h00=0x0028, h01=0x0050, text=»PA:NUM EQU PA:FIL+1 NUMBER OF USERS «, t00=0x0030, t01=0x0054}
0x04b74…04b9e                Head {h00=0x0026, h01=0x0050, text=»PA:SEG EQU PA:NUM+1 SEGMENT NUMBER«, t00=0x0030, t01=0x0080}
0x04b9e…04bc4                Head {h00=0x0022, h01=0x0050, text=»PA:UNI EQU PA:SEG+1 POOL-UNIT «, t00=0x0030, t01=0x00aa}
0x04bc4…04bec                Head {h00=0x0024, h01=0x0050, text=»PA:LNK EQU PA:UNI+1 LINK TO NEXT«, t00=0x0030, t01=0x00d0}
0x04bec…04bfa                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x00f8}
0x04bfa…04c04                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0030, t01=0x0106}
0x04c04…04c22                Head {h00=0x001a, h01=0x0050, text=»**  FILE-TABLE LAYOUT «, t00=0x0030, t01=0x0110}
0x04c22…04c2c                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0030, t01=0x012e}
0x04c2c…04c4a                Head {h00=0x001a, h01=0x0050, text=»PT:FIL EQU 0 FILENAME «, t00=0x0030, t01=0x0138}
0x04c4a…04c72                Head {h00=0x0024, h01=0x0050, text=»PT:VOL EQU PT:FIL+8 VOLUME NAME «, t00=0x0030, t01=0x0156}
0x04c72…04c96                Head {h00=0x0020, h01=0x0050, text=»PT:FC EQU PT:VOL+6 FILE CODE«, t00=0x0030, t01=0x017e}
0x04c96…04cc4                Head {h00=0x002a, h01=0x0050, text=»PT:CON EQU PT:FC+1 COMPULSURY COUNTER «, t00=0x0031, t01=0x0012}
0x04cc4…04cee                Head {h00=0x0026, h01=0x0050, text=»PT:OC EQU PT:CON+1 OPEN/CLOSE BYTE«, t00=0x0031, t01=0x0040}
0x04cee…04d18                Head {h00=0x0026, h01=0x0050, text=»PT:ACT EQU PT:OC+1 ACTIVE COUNTER «, t00=0x0031, t01=0x006a}
0x04d18…04d42                Head {h00=0x0026, h01=0x0050, text=»PT:LEN EQU 18 LENGTH OF ONE ENTRY «, t00=0x0031, t01=0x0094}
0x04d42…04d6c                Head {h00=0x0026, h01=0x0050, text=»PT:END EQU 72 LENGT OF FILE-TABLE «, t00=0x0031, t01=0x00be}
0x04d6c…04d74                Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x00e8}
0x04d74…04d7e                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0031, t01=0x00f0}
0x04d7e…04d9c                Head {h00=0x001a, h01=0x0050, text=»**  ORDER-DATA LAYOUT «, t00=0x0031, t01=0x00fa}
0x04d9c…04da6                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0031, t01=0x0118}
0x04da6…04dc0                Head {h00=0x0016, h01=0x0050, text=»PO:ORD EQU 0 ORDER«, t00=0x0031, t01=0x0122}
0x04dc0…04de8                Head {h00=0x0024, h01=0x0050, text=»PO:TYP EQU PO:ORD+2 TYPE + NAME «, t00=0x0031, t01=0x013c}
0x04de8…04e18                Head {h00=0x002c, h01=0x0050, text=»PO:FIL EQU PO:TYP+7 FILE TABLE NO. (0-3)«, t00=0x0031, t01=0x0164}
0x04e18…04e46 (50, 0, 400)   Head {h00=0x002a, h01=0x0050, text=»PO:LNK EQU PO:FIL+1 LINK TO NEXT ORDER«, t00=0x0032, t01=0x0004}
0x04e46…04e70                Head {h00=0x0026, h01=0x0050, text=»PO:LEN EQU 12 LENGTH OF ONE ORDER «, t00=0x0032, t01=0x0032}
0x04e70…04e94                Head {h00=0x0020, h01=0x0050, text=»PO:STA EQU 4 START OF ORDERS«, t00=0x0032, t01=0x005c}
0x04e94…04ec0                Head {h00=0x0028, h01=0x0050, text=»PO:END EQU 256 LENGTH OF ORDER-TABLE«, t00=0x0032, t01=0x0080}
0x04ec0…04ee8                Head {h00=0x0024, h01=0x0050, text=»PO:RDY EQU /8000 ORDER EXECUTED «, t00=0x0032, t01=0x00ac}
0x04ee8…04f08                Head {h00=0x001c, h01=0x0050, text=»PO:DLY EQU 1 DELAY TIME «, t00=0x0032, t01=0x00d4}
0x04f08…04f16                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x00f4}
0x04f16…04f1e                Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x0102}
0x04f1e…04f28                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0032, t01=0x010a}
0x04f28…04f66                Head {h00=0x003a, h01=0x0050, text=»**  KEYBOARD ECB AND PARAMETER BLOCK FOR ADVANCED READ«, t00=0x0032, t01=0x0114}
0x04f66…04f70                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0032, t01=0x0152}
0x04f70…04f78                Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x015c}
0x04f78…04f94                Head {h00=0x0018, h01=0x0050, text=»KB:CW2 EQU ECB:CW+2 «, t00=0x0032, t01=0x0164}
0x04f94…04fc6                Head {h00=0x002e, h01=0x0050, text=»KB:PBL EQU KB:CW2+2 PARAMETER BLOCK LENGTH«, t00=0x0032, t01=0x0180}
0x04fc6…05008                Head {h00=0x003e, h01=0x0050, text=»KB:EKO EQU KB:PBL+1 ECHO CHARACTER (/00 => ORDINARY ECHO) «, t00=0x0033, t01=0x0022}
0x05008…05032                Head {h00=0x0026, h01=0x0050, text=»KB:PW EQU KB:EKO+1 PARAMETER WORD «, t00=0x0033, t01=0x0064}
0x05032…05062                Head {h00=0x002c, h01=0x0050, text=»KB:CUR EQU KB:PW+2 CURSOR POSITION WORD «, t00=0x0033, t01=0x008e}
0x05062…05090                Head {h00=0x002a, h01=0x0050, text=»KB:SHB EQU KB:CUR+2 SHIFT BUFFER BYTE «, t00=0x0033, t01=0x00be}
0x05090…050be                Head {h00=0x002a, h01=0x0050, text=»KB:CND EQU KB:SHB+1 CURRENT # DECIMALS«, t00=0x0033, t01=0x00ec}
0x050be…050e8                Head {h00=0x0026, h01=0x0050, text=»KB:PL EQU KB:CND+1 PICTURE LENGTH «, t00=0x0033, t01=0x011a}
0x050e8…05124                Head {h00=0x0038, h01=0x0050, text=»KB:CNI EQU KB:PL+1 CURRENT # INTEGERS OR CHARACTERS «, t00=0x0033, t01=0x0144}
0x05124…0514c                Head {h00=0x0024, h01=0x0050, text=»KB:IL EQU KB:CNI+1 INPUT LENGTH «, t00=0x0033, t01=0x0180}
0x0514c…05178                Head {h00=0x0028, h01=0x0050, text=»KB:POS EQU KB:IL+1 POSITION IN FIELD«, t00=0x0034, t01=0x0018}
0x05178…051ae                Head {h00=0x0032, h01=0x0050, text=»KB:PNT EQU KB:POS+1 DECIMAL POINT STATUS WORD «, t00=0x0034, t01=0x0044}
0x051ae…051d8                Head {h00=0x0026, h01=0x0050, text=»KB:MNI EQU KB:PNT+2 MAX # INTEGERS«, t00=0x0034, t01=0x007a}
0x051d8…05202                Head {h00=0x0026, h01=0x0050, text=»KB:MND EQU KB:MNI+1 MAX # DECIMALS«, t00=0x0034, t01=0x00a4}
0x05202…0521e                Head {h00=0x0018, h01=0x0050, text=»KB:END EQU KB:MND+1 «, t00=0x0034, t01=0x00ce}
0x0521e…0522c                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x00ea}
0x0522c…05234                Head {h00=0x0004, h01=0x0050, t00=0x0034, t01=0x00f8}
0x05234…0523e                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0034, t01=0x0100}
0x0523e…05250                Head {h00=0x000e, h01=0x0050, text=»**  WS:TCA«, t00=0x0034, t01=0x010a}
0x05250…05272                Head {h00=0x001e, h01=0x0050, text=»**  WSM TASK CONTROL AREA «, t00=0x0034, t01=0x011c}
0x05272…0527c                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0034, t01=0x013e}
0x0527c…05284                Head {h00=0x0004, h01=0x0050, t00=0x0034, t01=0x0148}
0x05284…052a4                Head {h00=0x001c, h01=0x0050, text=»TC:TID EQU 0 WSM TASK ID«, t00=0x0034, t01=0x0150}
0x052a4…052d6                Head {h00=0x002e, h01=0x0050, text=»TC:FC EQU TC:TID+2 PREVIOUS FUNCTION CODE «, t00=0x0034, t01=0x0170}
0x052d6…0530e                Head {h00=0x0034, h01=0x0050, text=»TC:SCR EQU TC:FC+1 BITS FOR WATTCH, WRCIVE ETC.:«, t00=0x0035, t01=0x0012}
0x0530e…05320                Head {h00=0x000e, h01=0x0050, text=»   BIT 0: «, t00=0x0035, t01=0x004a}
0x05320…0533c                Head {h00=0x0018, h01=0x0050, text=»   - DURING WRCIVE: «, t00=0x0035, t01=0x005c}
0x0533c…05376                Head {h00=0x0036, h01=0x0050, text=»   .    = 1 IF INPUT BUFFER CHANGED BY DUPLICATION«, t00=0x0035, t01=0x0078}
0x05376…053ac                Head {h00=0x0032, h01=0x0050, text=»   .        OR VALIDATION OR IF MINUS KEY USED«, t00=0x0035, t01=0x00b2}
0x053ac…053be                Head {h00=0x000e, h01=0x0050, text=»   BIT 1: «, t00=0x0035, t01=0x00e8}
0x053be…053da                Head {h00=0x0018, h01=0x0050, text=»   - DURING WRCIVE: «, t00=0x0035, t01=0x00fa}
0x053da…05400                Head {h00=0x0022, h01=0x0050, text=»   .    = 1 IF NEGATIVE INPUT «, t00=0x0035, t01=0x0116}
0x05400…05412                Head {h00=0x000e, h01=0x0050, text=»   BIT 2: «, t00=0x0035, t01=0x013c}
0x05412…0542e                Head {h00=0x0018, h01=0x0050, text=»   - DURING WRCIVE: «, t00=0x0035, t01=0x014e}
0x0542e…05464                Head {h00=0x0032, h01=0x0050, text=»   .    = 1 IF FIELDLIST FIELD NOT IN SECTION «, t00=0x0035, t01=0x016a}
0x05464…05476                Head {h00=0x000e, h01=0x0050, text=»   BIT 3: «, t00=0x0036, t01=0x0010}
0x05476…05492                Head {h00=0x0018, h01=0x0050, text=»   - DURING WRCIVE: «, t00=0x0036, t01=0x0022}
0x05492…054ba                Head {h00=0x0024, h01=0x0050, text=»   .    = 1 IF PB BUFFER IS FULL«, t00=0x0036, t01=0x003e}
0x054ba…054cc                Head {h00=0x000e, h01=0x0050, text=»   *******«, t00=0x0036, t01=0x0066}
0x054cc…054de                Head {h00=0x000e, h01=0x0050, text=»   BIT 4: «, t00=0x0036, t01=0x0078}
0x054de…054fa                Head {h00=0x0018, h01=0x0050, text=»   - DURING WRCIVE: «, t00=0x0036, t01=0x008a}
0x054fa…0552c                Head {h00=0x002e, h01=0x0050, text=»   .    = 1 IF VALIDATION AFTER ENTER KEY «, t00=0x0036, t01=0x00a6}
0x0552c…0553e                Head {h00=0x000e, h01=0x0050, text=»   BIT 5: «, t00=0x0036, t01=0x00d8}
0x0553e…0555a                Head {h00=0x0018, h01=0x0050, text=»   - DURING WATTCH: «, t00=0x0036, t01=0x00ea}
0x0555a…0558e                Head {h00=0x0030, h01=0x0050, text=»   .    = 1 IF WANTED SECTION IS BEFORE ... «, t00=0x0036, t01=0x0106}
0x0558e…055ba                Head {h00=0x0028, h01=0x0050, text=»   .        ATTACHED SECTION IN SST «, t00=0x0036, t01=0x013a}
0x055ba…055e8                Head {h00=0x002a, h01=0x0050, text=»   BIT 6 = 1 IF WATTCH WITHOUT DISPLAY«, t00=0x0036, t01=0x0166}
0x055e8…05618 (55, 0, 400)   Head {h00=0x002c, h01=0x0050, text=»   BIT 7 =1 IF WANTED PAGE IS ON SCREEN «, t00=0x0037, t01=0x0004}
0x05618…05626                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x0034}
0x05626…0562e                Head {h00=0x0004, h01=0x0050, t00=0x0037, t01=0x0042}
0x0562e…05658                Head {h00=0x0026, h01=0x0050, text=»TC:MSC EQU TC:FC+2 MISCELLANEOUS: «, t00=0x0037, t01=0x004a}
0x05658…0566c                Head {h00=0x0010, h01=0x0050, text=»   BIT 0-1: «, t00=0x0037, t01=0x0074}
0x0566c…05684                Head {h00=0x0014, h01=0x0050, text=»   -   NOT USED «, t00=0x0037, t01=0x0088}
0x05684…05696                Head {h00=0x000e, h01=0x0050, text=»   *******«, t00=0x0037, t01=0x00a0}
0x05696…056a8                Head {h00=0x000e, h01=0x0050, text=»   BIT  2:«, t00=0x0037, t01=0x00b2}
0x056a8…056d4                Head {h00=0x0028, h01=0x0050, text=»   -    =1 IF LOOP DETECTOR RUNNING «, t00=0x0037, t01=0x00c4}
0x056d4…056e6                Head {h00=0x000e, h01=0x0050, text=»   BIT  3:«, t00=0x0037, t01=0x00f0}
0x056e6…0570e                Head {h00=0x0024, h01=0x0050, text=»   -    =1 IF BASIC DEBUGGER ON «, t00=0x0037, t01=0x0102}
0x0570e…05720                Head {h00=0x000e, h01=0x0050, text=»   BIT  4:«, t00=0x0037, t01=0x012a}
0x05720…05748                Head {h00=0x0024, h01=0x0050, text=»   -    =1 IF WMSG ON HELP LINE «, t00=0x0037, t01=0x013c}
0x05748…0575a                Head {h00=0x000e, h01=0x0050, text=»   BIT  5:«, t00=0x0037, t01=0x0164}
0x0575a…05782                Head {h00=0x0024, h01=0x0050, text=»   -    =1 IF WMSG ON ERROR LINE«, t00=0x0037, t01=0x0176}
0x05782…05794                Head {h00=0x000e, h01=0x0050, text=»   BIT  6:«, t00=0x0038, t01=0x000e}
0x05794…057c0                Head {h00=0x0028, h01=0x0050, text=»   -   =1 IF ERROR MSG ON ERROR LINE«, t00=0x0038, t01=0x0020}
0x057c0…057d2                Head {h00=0x000e, h01=0x0050, text=»   BIT  7:«, t00=0x0038, t01=0x004c}
0x057d2…057fe                Head {h00=0x0028, h01=0x0050, text=»   -   =1 IF EXT.PROMPT OR GUID. MSG«, t00=0x0038, t01=0x005e}
0x057fe…05830                Head {h00=0x002e, h01=0x0050, text=»   .       OR WMSG ON HLP LINE OR SEC,FUN «, t00=0x0038, t01=0x008a}
0x05830…05842                Head {h00=0x000e, h01=0x0050, text=»   BIT  8:«, t00=0x0038, t01=0x00bc}
0x05842…05864                Head {h00=0x001e, h01=0x0050, text=»   -   = 1 IF ALL KEY USED«, t00=0x0038, t01=0x00ce}
0x05864…05876                Head {h00=0x000e, h01=0x0050, text=»   BIT  9:«, t00=0x0038, t01=0x00f0}
0x05876…058ac                Head {h00=0x0032, h01=0x0050, text=»   -   = 1 IF CORRECTION AFTER ERROR HANDLING «, t00=0x0038, t01=0x0102}
0x058ac…058be                Head {h00=0x000e, h01=0x0050, text=»   BIT 10:«, t00=0x0038, t01=0x0138}
0x058be…058f6                Head {h00=0x0034, h01=0x0050, text=»   -   = 1 IF LKM BLOCKING ON CURRENT SUBSCREEN «, t00=0x0038, t01=0x014a}
0x058f6…0591a                Head {h00=0x0020, h01=0x0050, text=»   .     ( <=> CURSOR OFF ) «, t00=0x0038, t01=0x0182}
0x0591a…0592c                Head {h00=0x000e, h01=0x0050, text=»   BIT 11:«, t00=0x0039, t01=0x0016}
0x0592c…05952                Head {h00=0x0022, h01=0x0050, text=»   -   = 1 IF BLACK BACKGROUND«, t00=0x0039, t01=0x0028}
0x05952…05964                Head {h00=0x000e, h01=0x0050, text=»   *******«, t00=0x0039, t01=0x004e}
0x05964…05976                Head {h00=0x000e, h01=0x0050, text=»   BIT 12:«, t00=0x0039, t01=0x0060}
0x05976…059a2                Head {h00=0x0028, h01=0x0050, text=»   -   = 1 IF VD82/83 (8 SUBSCREENS,«, t00=0x0039, t01=0x0072}
0x059a2…059d0                Head {h00=0x002a, h01=0x0050, text=»   .                   1 SYSTEM LINE) «, t00=0x0039, t01=0x009e}
0x059d0…059e2                Head {h00=0x000e, h01=0x0050, text=»   BIT 13:«, t00=0x0039, t01=0x00cc}
0x059e2…059fa                Head {h00=0x0014, h01=0x0050, text=»   -   NOT USED «, t00=0x0039, t01=0x00de}
0x059fa…05a0c                Head {h00=0x000e, h01=0x0050, text=»   BIT 14:«, t00=0x0039, t01=0x00f6}
0x05a0c…05a3e                Head {h00=0x002e, h01=0x0050, text=»   -   = 1 IF PD85 ETC (ONE-LINE DISPLAYS)«, t00=0x0039, t01=0x0108}
0x05a3e…05a50                Head {h00=0x000e, h01=0x0050, text=»   BIT 15:«, t00=0x0039, t01=0x013a}
0x05a50…05a7e                Head {h00=0x002a, h01=0x0050, text=»   -   = 1 IF AUTO SKIP/DUP FLAG IS ON«, t00=0x0039, t01=0x014c}
0x05a7e…05a86                Head {h00=0x0004, h01=0x0050, t00=0x0039, t01=0x017a}
0x05a86…05a94                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x0182}
0x05a94…05ac6                Head {h00=0x002e, h01=0x0050, text=»** INFORMATION ABOUT TWO MESSAGELINES: ** «, t00=0x0039, t01=0x0190}
0x05ac6…05ace                Head {h00=0x0004, h01=0x0050, t00=0x003a, t01=0x0032}
0x05ace…05b0a                Head {h00=0x0038, h01=0x0050, text=»TC:MSG EQU TC:MSC+2 SEE W:MESS AND W:MESG IN W:INIT «, t00=0x003a, t01=0x003a}
0x05b0a…05b12                Head {h00=0x0004, h01=0x0050, t00=0x003a, t01=0x0076}
0x05b12…05b36                Head {h00=0x0020, h01=0x0050, text=»** SUBSCREEN INFORMATION: **«, t00=0x003a, t01=0x007e}
0x05b36…05b3e                Head {h00=0x0004, h01=0x0050, t00=0x003a, t01=0x00a2}
0x05b3e…05b6e                Head {h00=0x002c, h01=0x0050, text=»TC:SZE EQU TC:MSG+2 SIZE OF SUBSCREEN 1 «, t00=0x003a, t01=0x00aa}
0x05b6e…05ba8                Head {h00=0x0036, h01=0x0050, text=»TC:SIZ EQU TC:SZE+2 CURRENT SCREEN/SUBSCREEN SIZE «, t00=0x003a, t01=0x00da}
0x05ba8…05bda                Head {h00=0x002e, h01=0x0050, text=»TC:SUS EQU TC:SIZ+2 CURRENT SUBSCREEN NO. «, t00=0x003a, t01=0x0114}
0x05bda…05c1e                Head {h00=0x0040, h01=0x0050, text=»TC:LIN EQU TC:SUS+2 1:ST FREE LINE ON CURR. SCREEN/SUBSCREEN«, t00=0x003a, t01=0x0146}
0x05c1e…05c4a                Head {h00=0x0028, h01=0x0050, text=»   ... FOLLOWED BY 1:ST FREE LINE OF«, t00=0x003a, t01=0x018a}
0x05c4a…05c66                Head {h00=0x0018, h01=0x0050, text=»   ... 9 SUBSCREENS «, t00=0x003b, t01=0x0026}
0x05c66…05ca8                Head {h00=0x003e, h01=0x0050, text=»TC:FRD EQU TC:LIN+11 DISPL. TO BE ADDED TO 1:ST FREE LINE «, t00=0x003b, t01=0x0042}
0x05ca8…05ce0                Head {h00=0x0034, h01=0x0050, text=»   ... WHEN HAVING SECTIONS ON MSG LINE ON OTHER«, t00=0x003b, t01=0x0084}
0x05ce0…05d14                Head {h00=0x0030, h01=0x0050, text=»   ... DISPLAYS THAN VD82 (RIGHT BYTE REQ.) «, t00=0x003b, t01=0x00bc}
0x05d14…05d1c                Head {h00=0x0004, h01=0x0050, t00=0x003b, t01=0x00f0}
0x05d1c…05d4a                Head {h00=0x002a, h01=0x0050, text=»** CURRENT FORMAT DEF INFORMATION: ** «, t00=0x003b, t01=0x00f8}
0x05d4a…05d52                Head {h00=0x0004, h01=0x0050, t00=0x003b, t01=0x0126}
0x05d52…05d8e                Head {h00=0x0038, h01=0x0050, text=»TC:FDC EQU TC:FRD+1 ADDR. TO FORMAT DEFINITION CODE «, t00=0x003b, t01=0x012e}
0x05d8e…05d96                Head {h00=0x0004, h01=0x0050, t00=0x003b, t01=0x016a}
0x05d96…05db4                Head {h00=0x001a, h01=0x0050, text=»** SST INFORMATION: **«, t00=0x003b, t01=0x0172}
0x05db4…05dbc                Head {h00=0x0004, h01=0x0050, t00=0x003b, t01=0x0190}
0x05dbc…05df8                Head {h00=0x0038, h01=0x0050, text=»TC:SST EQU TC:FDC+2 0. ADDR. TO 1:ST BYTE AFTER SST «, t00=0x003c, t01=0x0008}
0x05df8…05e26                Head {h00=0x002a, h01=0x0050, text=»   2. "     "  CURRENT SECTION IN SST «, t00=0x003c, t01=0x0044}
0x05e26…05e50                Head {h00=0x0026, h01=0x0050, text=»   4. "     "  LAST SECTION IN SST«, t00=0x003c, t01=0x0072}
0x05e50…05e84                Head {h00=0x0030, h01=0x0050, text=»   6. LARGEST SECTION SEQUENCE NUMBER IN USE«, t00=0x003c, t01=0x009c}
0x05e84…05eb2                Head {h00=0x002a, h01=0x0050, text=»   8. SST ADDR. OF SECTION ON MSG LINE«, t00=0x003c, t01=0x00d0}
0x05eb2…05eba                Head {h00=0x0004, h01=0x0050, t00=0x003c, t01=0x00fe}
0x05eba…05ee4                Head {h00=0x0026, h01=0x0050, text=»** CURRENT SECTION INFORMATION: **«, t00=0x003c, t01=0x0106}
0x05ee4…05eec                Head {h00=0x0004, h01=0x0050, t00=0x003c, t01=0x0130}
0x05eec…05f26                Head {h00=0x0036, h01=0x0050, text=»TC:FSC EQU TC:SST+10 ADDR. TO FORMAT SECTION CODE «, t00=0x003c, t01=0x0138}
0x05f26…05f62                Head {h00=0x0038, h01=0x0050, text=»TC:CFC EQU TC:FSC+2 "     "  CURRENT DYN. FIELD CODE«, t00=0x003c, t01=0x0172}
0x05f62…05f94                Head {h00=0x002e, h01=0x0050, text=»   "     "  "       "    "     "    (REL) «, t00=0x003d, t01=0x001e}
0x05f94…05fca                Head {h00=0x0032, h01=0x0050, text=»TC:DFD EQU TC:CFC+4 "     "  1:ST BYTE IN DFD «, t00=0x003d, t01=0x0050}
0x05fca…06006                Head {h00=0x0038, h01=0x0050, text=»TC:CFD EQU TC:DFD+2 ADDR. TO CURRENT DYN. FIELD DATA«, t00=0x003d, t01=0x0086}
0x06006…0603e                Head {h00=0x0034, h01=0x0050, text=»TC:CFX EQU TC:CFD+2 INDEX OF CURRENT DYN. FIELD «, t00=0x003d, t01=0x00c2}
0x0603e…06070                Head {h00=0x002e, h01=0x0050, text=»TC:KY1 EQU TC:CFX+2 ADDRESS TO KEYTABLE 1.«, t00=0x003d, t01=0x00fa}
0x06070…060ac                Head {h00=0x0038, h01=0x0050, text=»TC:KTV EQU TC:KY1+2 ADDRESS TO BITMASK FOR KEYCHECKS«, t00=0x003d, t01=0x012c}
0x060ac…060b4                Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x0168}
0x060b4…060c2                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003d, t01=0x0170}
0x060c2…060f2                Head {h00=0x002c, h01=0x0050, text=»** WWI:S, ECB:S, BUFFER:S AND STACK: ** «, t00=0x003d, t01=0x017e}
0x060f2…060fa                Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x001e}
0x060fa…06130                Head {h00=0x0032, h01=0x0050, text=»TC:CN1 EQU TC:KTV+2 LOOP COUNTER SECTION LEVEL«, t00=0x003e, t01=0x0026}
0x06130…06164                Head {h00=0x0030, h01=0x0050, text=»TC:CN2 EQU TC:CN1+2 LOOP COUNTER FIELD LEVEL«, t00=0x003e, t01=0x005c}
0x06164…061a4                Head {h00=0x003c, h01=0x0050, text=»TC:IIE EQU TC:CN2+2 ADDR TO 1ST BYTE AFTER INPUT BUFFER «, t00=0x003e, t01=0x0090}
0x061a4…061dc                Head {h00=0x0034, h01=0x0050, text=»TC:WWI EQU TC:IIE+2 ADDR. TO WWI:S, EQUAL TO ...«, t00=0x003e, t01=0x00d0}
0x061dc…0621a                Head {h00=0x003a, h01=0x0050, text=»TC:IOE EQU TC:WWI ADDR TO 1ST BYTE AFTER OUTPUT BUFFER«, t00=0x003e, t01=0x0108}
0x0621a…06250                Head {h00=0x0032, h01=0x0050, text=»TC:STK EQU TC:IOE+2 ADDR TO THE STACK, WS:STK «, t00=0x003e, t01=0x0146}
0x06250…0628e                Head {h00=0x003a, h01=0x0050, text=»TC:PFB EQU TC:STK+2 POOL & FILE HANDLER COM. AREA ... «, t00=0x003e, t01=0x017c}
0x0628e…062d2                Head {h00=0x0040, h01=0x0050, text=»TC:FIL EQU TC:PFB+PF:ECB ... INCLUDING DISC FILE PARAMETERS «, t00=0x003f, t01=0x002a}
0x062d2…06304                Head {h00=0x002e, h01=0x0050, text=»TC:IC EQU TC:PFB+PF:END INTERTASK COM. ECB«, t00=0x003f, t01=0x006e}
0x06304…0632c                Head {h00=0x0024, h01=0x0050, text=»TC:KB EQU TC:IC+14 KEYBOARD  ECB«, t00=0x003f, t01=0x00a0}
0x0632c…0635c                Head {h00=0x002c, h01=0x0050, text=»TC:EKO EQU TC:KB+KB:END ECHO DEVICE ECB «, t00=0x003f, t01=0x00c8}
0x0635c…0638e                Head {h00=0x002e, h01=0x0050, text=»TC:PRT EQU TC:EKO+PRTDEV PRINT DEVICE ECB «, t00=0x003f, t01=0x00f8}
0x0638e…063c6                Head {h00=0x0034, h01=0x0050, text=»TC:INP EQU TC:PRT+INPDEV OTHER INPUT DEVICE ECB «, t00=0x003f, t01=0x012a}
0x063c6…063d4                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003f, t01=0x0162}
0x063d4…063dc                Head {h00=0x0004, h01=0x0050, t00=0x003f, t01=0x0170}
0x063dc…063e6                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x003f, t01=0x0178}
0x063e6…06406                Head {h00=0x001c, h01=0x0050, text=»**  WSM PARAMETER BLOCK «, t00=0x003f, t01=0x0182}
0x06406…06410                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0040, t01=0x0012}
0x06410…06418                Head {h00=0x0004, h01=0x0050, t00=0x0040, t01=0x001c}
0x06418…06446                Head {h00=0x002a, h01=0x0050, text=»PB:FC EQU TC:INP+12 WSM FUNCTION CODE «, t00=0x0040, t01=0x0024}
0x06446…06480                Head {h00=0x0036, h01=0x0050, text=»PB:FOR EQU PB:FC+2 CURRENT FORMAT DEFINITION NAME «, t00=0x0040, t01=0x0052}
0x06480…064b8                Head {h00=0x0034, h01=0x0050, text=»PB:SEC EQU PB:FOR+6 CURRENT FORMAT SECTION NAME «, t00=0x0040, t01=0x008c}
0x064b8…064f4                Head {h00=0x0038, h01=0x0050, text=»PB:SSN EQU PB:SEC+6 CURRENT SECTION SEQUENCE NUMBER «, t00=0x0040, t01=0x00c4}
0x064f4…06522                Head {h00=0x002a, h01=0x0050, text=»PB:SUS EQU PB:SSN+2 CURRENT SUBSCREEN «, t00=0x0040, t01=0x0100}
0x06522…06560                Head {h00=0x003a, h01=0x0050, text=»PB:INP EQU PB:SUS+1 INPUT ALLOWED, =0 IF YES, =1 IF NO«, t00=0x0040, t01=0x012e}
0x06560…06592                Head {h00=0x002e, h01=0x0050, text=»PB:FID EQU PB:INP+1 CURRENT FIELD IDENTITY«, t00=0x0040, t01=0x016c}
0x06592…065ba                Head {h00=0x0024, h01=0x0050, text=»PB:FNO EQU PB:FID+4 FIELD NUMBER«, t00=0x0041, t01=0x000e}
0x065ba…065e0                Head {h00=0x0022, h01=0x0050, text=»PB:RC EQU PB:FNO+2 RETURN CODE«, t00=0x0041, t01=0x0036}
0x065e0…06608                Head {h00=0x0024, h01=0x0050, text=»PB:KID EQU PB:RC+2 KEY ID 1 & 2 «, t00=0x0041, t01=0x005c}
0x06608…06638                Head {h00=0x002c, h01=0x0050, text=»PB:XIT EQU PB:KID+4 EXIT ROUTINE NUMBER «, t00=0x0041, t01=0x0084}
0x06638…06678                Head {h00=0x003c, h01=0x0050, text=»PB:EBL EQU PB:XIT+2 EFFECTIVE LENGTH OF BUFFER CONTENTS «, t00=0x0041, t01=0x00b4}
0x06678…066b6                Head {h00=0x003a, h01=0x0050, text=»PB:MBL EQU PB:EBL+4 MAXIMUM LENGTH OF BUFFER CONTENTS «, t00=0x0041, t01=0x00f4}
0x066b6…066e8                Head {h00=0x002e, h01=0x0050, text=»PB:BLO EQU PB:MBL+2 TYPE OF BUFFER LAYOUT «, t00=0x0041, t01=0x0132}
0x066e8…0671e                Head {h00=0x0032, h01=0x0050, text=»PB:PRFC EQU PB:BLO+1 PRINTER DEVICE FILE CODE «, t00=0x0041, t01=0x0164}
0x0671e…06752                Head {h00=0x0030, h01=0x0050, text=»PB:BUF EQU PB:PRFC+1 PARAMETER BLOCK BUFFER «, t00=0x0042, t01=0x000a}
0x06752…06760                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x003e}
0x06760…06768                Head {h00=0x0004, h01=0x0050, t00=0x0042, t01=0x004c}
0x06768…06772                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0042, t01=0x0054}
0x06772…067ae                Head {h00=0x0038, h01=0x0050, text=»**  DISPLACEMENTS IN SECTION SEQUENCE TABLE ELEMENTS«, t00=0x0042, t01=0x005e}
0x067ae…067b8                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0042, t01=0x009a}
0x067b8…067c0                Head {h00=0x0004, h01=0x0050, t00=0x0042, t01=0x00a4}
0x067c0…06804                Head {h00=0x0040, h01=0x0050, text=»*                 0                     SECTION DFD ADDRESS «, t00=0x0042, t01=0x00ac}
0x06804…0682a                Head {h00=0x0022, h01=0x0050, text=»SS:DFD EQU 2 SECTION DFD SIZE «, t00=0x0042, t01=0x00f0}
0x0682a…06862                Head {h00=0x0034, h01=0x0050, text=»SS:SCR EQU SS:DFD+2 SECTION ON SCREEN INDICATION«, t00=0x0042, t01=0x0116}
0x06862…0688a                Head {h00=0x0024, h01=0x0050, text=»SS:TYP EQU SS:SCR+1 SECTION TYPE«, t00=0x0042, t01=0x014e}
0x0688a…068c6                Head {h00=0x0038, h01=0x0050, text=»SS:SS EQU SS:SCR+2 SUBSCREEN & SECTION SEQUENCE NO. «, t00=0x0042, t01=0x0176}
0x068c6…06908                Head {h00=0x003e, h01=0x0050, text=»SS:LIN EQU SS:SS+2 (SUB-)SCREEN START LINE & NO. OF LINES «, t00=0x0043, t01=0x0022}
0x06908…0692c                Head {h00=0x0020, h01=0x0050, text=»   1:ST & LAST+1 LINE SHOWN «, t00=0x0043, t01=0x0064}
0x0692c…06964                Head {h00=0x0034, h01=0x0050, text=»SS:CFX EQU SS:LIN+4 CURRENT DYNAMIC FIELD INDEX «, t00=0x0043, t01=0x0088}
0x06964…0698c                Head {h00=0x0024, h01=0x0050, text=»SS:SEC EQU SS:CFX+2 SECTION NAME«, t00=0x0043, t01=0x00c0}
0x0698c…069be                Head {h00=0x002e, h01=0x0050, text=»SS:LEN EQU SS:SEC+6 LENGTH OF SST ELEMENT «, t00=0x0043, t01=0x00e8}
0x069be…069c6                Head {h00=0x0004, h01=0x0050, t00=0x0043, t01=0x011a}
0x069c6…069ce                Head {h00=0x0004, h01=0x0050, t00=0x0043, t01=0x0122}
0x069ce…069d8                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0043, t01=0x012a}
0x069d8…06a0c                Head {h00=0x0030, h01=0x0050, text=»** DISPLACEMENTS IN WSM WORK ITEMS OVERHEAD «, t00=0x0043, t01=0x0134}
0x06a0c…06a16                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0043, t01=0x0168}
0x06a16…06a1e                Head {h00=0x0004, h01=0x0050, t00=0x0043, t01=0x0172}
0x06a1e…06a52                Head {h00=0x0030, h01=0x0050, text=»WWI:NF EQU 0 NO OF FAST CHOISE SECTION WWI:S«, t00=0x0043, t01=0x017a}
0x06a52…06a90                Head {h00=0x003a, h01=0x0050, text=»WWI:LF EQU WWI:NF+1 LENGTH OF ONE FAST CHOISE SECT WWI«, t00=0x0044, t01=0x001e}
0x06a90…06ac0                Head {h00=0x002c, h01=0x0050, text=»WWI:NN EQU WWI:LF+1 NO OF NUMERIC WWI:S «, t00=0x0044, t01=0x005c}
0x06ac0…06af6                Head {h00=0x0032, h01=0x0050, text=»WWI:LN EQU WWI:NN+1 LENGTH OF ONE NUMERIC WWI «, t00=0x0044, t01=0x008c}
0x06af6…06b2e                Head {h00=0x0034, h01=0x0050, text=»WWI:AN EQU WWI:LN+1 ADDRESS TO FIRST NUMERIC WWI«, t00=0x0044, t01=0x00c2}
0x06b2e…06b62                Head {h00=0x0030, h01=0x0050, text=»WWI:NA EQU WWI:AN+2 NO OF ALPHANUMERIC WWI:S«, t00=0x0044, t01=0x00fa}
0x06b62…06b9c                Head {h00=0x0036, h01=0x0050, text=»WWI:LA EQU WWI:NA+1 LENGTH OF ONE ALPHANUMERIC WWI«, t00=0x0044, t01=0x012e}
0x06b9c…06bda                Head {h00=0x003a, h01=0x0050, text=»WWI:AA EQU WWI:LA+1 ADDRESS TO FIRST ALPHANUMERIC WWI «, t00=0x0044, t01=0x0168}
0x06bda…06c0c                Head {h00=0x002e, h01=0x0050, text=»WWI:LO EQU WWI:AA+2 LENGTH OF WWI OVERHEAD«, t00=0x0045, t01=0x0016}
0x06c0c…06c1a                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0045, t01=0x0048}
0x06c1a…06c22                Head {h00=0x0004, h01=0x0050, t00=0x0045, t01=0x0056}
0x06c22…06c2c                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0045, t01=0x005e}
0x06c2c…06c4e                Head {h00=0x001e, h01=0x0050, text=»**  FORMAT DEFINITION CODE«, t00=0x0045, t01=0x0068}
0x06c4e…06c58                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0045, t01=0x008a}
0x06c58…06c60                Head {h00=0x0004, h01=0x0050, t00=0x0045, t01=0x0094}
0x06c60…06c8c                Head {h00=0x0028, h01=0x0050, text=»FD:FOR EQU 0 FORMAT DEFINITION NAME «, t00=0x0045, t01=0x009c}
0x06c8c…06cbc                Head {h00=0x002c, h01=0x0050, text=»FD:ISN EQU FD:FOR+6 INTIAL SECTION NAME «, t00=0x0045, t01=0x00c8}
0x06cbc…06cf2                Head {h00=0x0032, h01=0x0050, text=»FD:DSK EQU FD:ISN+6 # DISC SECTORS (BITS 0-7) «, t00=0x0045, t01=0x00f8}
0x06cf2…06d30                Head {h00=0x003a, h01=0x0050, text=»FD:FCS EQU FD:DSK+4 LIST OF FAST CHOICE SECTION NAMES «, t00=0x0045, t01=0x012e}
0x06d30…06d3e                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0045, t01=0x016c}
0x06d3e…06d46                Head {h00=0x0004, h01=0x0050, t00=0x0045, t01=0x017a}
0x06d46…06d50                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0045, t01=0x0182}
0x06d50…06d70                Head {h00=0x001c, h01=0x0050, text=»**  FORMAT SECTION CODE «, t00=0x0045, t01=0x018c}
0x06d70…06d7a                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0046, t01=0x001c}
0x06d7a…06d82                Head {h00=0x0004, h01=0x0050, t00=0x0046, t01=0x0026}
0x06d82…06d9c                Head {h00=0x0016, h01=0x0050, text=»**  SECTION TYPES «, t00=0x0046, t01=0x002e}
0x06d9c…06da4                Head {h00=0x0004, h01=0x0050, t00=0x0046, t01=0x0048}
0x06da4…06dce                Head {h00=0x0026, h01=0x0050, text=»RWS EQU 1 REMOVABLE WITH SCROLLING«, t00=0x0046, t01=0x0050}
0x06dce…06df6                Head {h00=0x0024, h01=0x0050, text=»RWP EQU 2 REMOVABLE WITH PAGING «, t00=0x0046, t01=0x007a}
0x06df6…06e0e                Head {h00=0x0014, h01=0x0050, text=»FIX EQU 4 FIXED «, t00=0x0046, t01=0x00a2}
0x06e0e…06e42                Head {h00=0x0030, h01=0x0050, text=»FOB EQU RWS FIXED ON BOTTOM LINES OF SCREEN «, t00=0x0046, t01=0x00ba}
0x06e42…06e70                Head {h00=0x002a, h01=0x0050, text=»FONP EQU RWP FIXED ON TOP OF NEW PAGE «, t00=0x0046, t01=0x00ee}
0x06e70…06e8c                Head {h00=0x0018, h01=0x0050, text=»TEMP EQU 8 TEMPORARY«, t00=0x0046, t01=0x011c}
0x06e8c…06eba                Head {h00=0x002a, h01=0x0050, text=»SECMSK EQU /F MASK ISOLATING TYPE BITS«, t00=0x0046, t01=0x0138}
0x06eba…06ec2                Head {h00=0x0004, h01=0x0050, t00=0x0046, t01=0x0166}
0x06ec2…06ede                Head {h00=0x0018, h01=0x0050, text=»**  SECTION OVERHEAD«, t00=0x0046, t01=0x016e}
0x06ede…06ee6                Head {h00=0x0004, h01=0x0050, t00=0x0046, t01=0x018a}
0x06ee6…06f08 (71, 0, 400)   Head {h00=0x001e, h01=0x0050, text=»SO:SEC EQU 0 SECTION NAME «, t00=0x0047, t01=0x0004}
0x06f08…06f30                Head {h00=0x0024, h01=0x0050, text=»SO:PSW EQU SO:SEC+6 ( PASSWORD )«, t00=0x0047, t01=0x0026}
0x06f30…06f60                Head {h00=0x002c, h01=0x0050, text=»SO:DSK EQU SO:PSW+6 NO. OF DISC SECTORS «, t00=0x0047, t01=0x004e}
0x06f60…06f90                Head {h00=0x002c, h01=0x0050, text=»SO:ONO EQU SO:PSW+7 OBJECT CODE VERSION «, t00=0x0047, t01=0x007e}
0x06f90…06fc6                Head {h00=0x0032, h01=0x0050, text=»SO:VNO EQU SO:DSK+4 SECTION VERSION NO. & TYPE«, t00=0x0047, t01=0x00ae}
0x06fc6…07010                Head {h00=0x0046, h01=0x0050, text=»SO:SIZ EQU SO:VNO+2 DEFINED SECTION SIZE, ROWS & COLUMNS, AND ... «, t00=0x0047, t01=0x00e4}
0x07010…07036                Head {h00=0x0022, h01=0x0050, text=»   ... EFFECTIVE SECTION SIZE «, t00=0x0047, t01=0x012e}
0x07036…0705a                Head {h00=0x0020, h01=0x0050, text=»SO:DFD EQU SO:SIZ+4 DFD SIZE«, t00=0x0047, t01=0x0154}
0x0705a…07090                Head {h00=0x0032, h01=0x0050, text=»SO:SFC EQU SO:DFD+2 REL. ADDR TO STATIC FIELDS«, t00=0x0047, t01=0x0178}
0x07090…070c4                Head {h00=0x0030, h01=0x0050, text=»SO:PP EQU SO:SFC+2 "    "    "  PICTURE POOL«, t00=0x0048, t01=0x001e}
0x070c4…070fa                Head {h00=0x0032, h01=0x0050, text=»SO:DFC EQU SO:PP+2 "    "    "  DYNAMIC FIELDS«, t00=0x0048, t01=0x0052}
0x070fa…0713e                Head {h00=0x0040, h01=0x0050, text=»SO:NDF EQU SO:DFC+2 DEC POINT OR COMMA & NO. OF DYN. FIELDS «, t00=0x0048, t01=0x0088}
0x0713e…07178                Head {h00=0x0036, h01=0x0050, text=»SO:BGA EQU SO:NDF+4 BACKGROUND DEFAULT ATTRIBUTES «, t00=0x0048, t01=0x00cc}
0x07178…071b4                Head {h00=0x0038, h01=0x0050, text=»SO:SFA EQU SO:BGA+1 STATIC FIELD DEFAULT ATTRIBUTES «, t00=0x0048, t01=0x0106}
0x071b4…071ee                Head {h00=0x0036, h01=0x0050, text=»SO:DFA EQU SO:SFA+1 DYN. FIELD DEFAULT ATTRIBUTES «, t00=0x0048, t01=0x0142}
0x071ee…07222                Head {h00=0x0030, h01=0x0050, text=»SO:MES EQU SO:DFA+4 DEFAULT GUIDING MESSAGE «, t00=0x0048, t01=0x017c}
0x07222…07230                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x0020}
0x07230…07238                Head {h00=0x0004, h01=0x0050, t00=0x0049, t01=0x002e}
0x07238…07252                Head {h00=0x0016, h01=0x0050, text=»**  STATIC FIELDS «, t00=0x0049, t01=0x0036}
0x07252…0725a                Head {h00=0x0004, h01=0x0050, t00=0x0049, t01=0x0050}
0x0725a…07288                Head {h00=0x002a, h01=0x0050, text=»SF:DEC EQU /1F LARGEST DECORATION BYTE«, t00=0x0049, t01=0x0058}
0x07288…072b0                Head {h00=0x0024, h01=0x0050, text=»SF:SPA EQU /80 COMPRESSED SPACES«, t00=0x0049, t01=0x0086}
0x072b0…072d4                Head {h00=0x0020, h01=0x0050, text=»SF:DF EQU /FB DYNAMIC FIELDS«, t00=0x0049, t01=0x00ae}
0x072d4…072f6                Head {h00=0x001e, h01=0x0050, text=»SF:HL EQU /FC HEADER LINES«, t00=0x0049, t01=0x00d2}
0x072f6…07318                Head {h00=0x001e, h01=0x0050, text=»SF:EOL EQU /FD END OF LINE«, t00=0x0049, t01=0x00f4}
0x07318…0733e                Head {h00=0x0022, h01=0x0050, text=»SF:EOS EQU /FE END OF SECTION «, t00=0x0049, t01=0x0116}
0x0733e…07366                Head {h00=0x0024, h01=0x0050, text=»SF:EOP EQU /FF END OF POOL UNIT «, t00=0x0049, t01=0x013c}
0x07366…07374                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x0164}
0x07374…0737c                Head {h00=0x0004, h01=0x0050, t00=0x0049, t01=0x0172}
0x0737c…07396                Head {h00=0x0016, h01=0x0050, text=»**  DYNAMIC FIELDS«, t00=0x0049, t01=0x017a}
0x07396…0739e (74, 0, 400)   Head {h00=0x0004, h01=0x0050, t00=0x004a, t01=0x0004}
0x0739e…073ca                Head {h00=0x0028, h01=0x0050, text=»   DYNAMIC FIELD TABLE DISPLACEMENTS«, t00=0x004a, t01=0x000c}
0x073ca…073d2                Head {h00=0x0004, h01=0x0050, t00=0x004a, t01=0x0038}
0x073d2…073f6                Head {h00=0x0020, h01=0x0050, text=»DF:FID EQU 0 FIELD IDENTITY «, t00=0x004a, t01=0x0040}
0x073f6…07438                Head {h00=0x003e, h01=0x0050, text=»DF:COD EQU DF:FID+4 FIELD CODE ADDR: POOL & REL POOL ADDR «, t00=0x004a, t01=0x0064}
0x07438…07482                Head {h00=0x0046, h01=0x0050, text=»DF:DAT EQU DF:COD+2 FIELD DATA DISPL. EXCL. TEMP. DECORATIONS ETC.«, t00=0x004a, t01=0x00a6}
0x07482…074b8                Head {h00=0x0032, h01=0x0050, text=»DF:TLN EQU DF:DAT+2 FIELD TABLE ELEMENT LENGTH«, t00=0x004a, t01=0x00f0}
0x074b8…074c0                Head {h00=0x0004, h01=0x0050, t00=0x004a, t01=0x0126}
0x074c0…074ec                Head {h00=0x0028, h01=0x0050, text=»   DYNAMIC FIELD CODE DISPLACEMENTS «, t00=0x004a, t01=0x012e}
0x074ec…074f4                Head {h00=0x0004, h01=0x0050, t00=0x004a, t01=0x015a}
0x074f4…07534                Head {h00=0x003c, h01=0x0050, text=»DF:ALN EQU 0 ATTRIBUTE AREA LENGTH INCL. OPTIONAL PARTS «, t00=0x004a, t01=0x0162}
0x07534…07568                Head {h00=0x0030, h01=0x0050, text=»DF:SCR EQU DF:ALN+2 REL. POSITION IN SECTION«, t00=0x004b, t01=0x0012}
0x07568…075a2                Head {h00=0x0036, h01=0x0050, text=»DF:FLN EQU DF:SCR+2 MAX. EFFECTIVE & EDITED LENGTH«, t00=0x004b, t01=0x0046}
0x075a2…075e4                Head {h00=0x003e, h01=0x0050, text=»DF:TYP EQU DF:FLN+2 NUM- & ALPHANUM DEPENDANT INFORMATION «, t00=0x004b, t01=0x0080}
0x075e4…0761e                Head {h00=0x0036, h01=0x0050, text=»DF:INP EQU DF:TYP+2 BITS CONCERNING INPUT HANDLING«, t00=0x004b, t01=0x00c2}
0x0761e…0764a                Head {h00=0x0028, h01=0x0050, text=»DF:DEC EQU DF:INP+2 DECORATION BITS «, t00=0x004b, t01=0x00fc}
0x0764a…0767c                Head {h00=0x002e, h01=0x0050, text=»DF:OPT EQU DF:DEC+2 START OF OPTIONAL PART«, t00=0x004b, t01=0x0128}
0x0767c…07684                Head {h00=0x0004, h01=0x0050, t00=0x004b, t01=0x015a}
0x07684…07698                Head {h00=0x0010, h01=0x0050, text=»   OPTIONS: «, t00=0x004b, t01=0x0162}
0x07698…076a0                Head {h00=0x0004, h01=0x0050, t00=0x004b, t01=0x0176}
0x076a0…076c0                Head {h00=0x001c, h01=0x0050, text=»DF:VAL EQU 1 VALIDATION «, t00=0x004b, t01=0x017e}
0x076c0…076e2                Head {h00=0x001e, h01=0x0050, text=»DF:ACC EQU 2 ACCUMULATION «, t00=0x004c, t01=0x000e}
0x076e2…0770a                Head {h00=0x0024, h01=0x0050, text=»DF:DUP EQU 3 DUPLICATION ORIGIN «, t00=0x004c, t01=0x0030}
0x0770a…07732                Head {h00=0x0024, h01=0x0050, text=»DF:AM EQU 4 APPLICATION MESSAGE «, t00=0x004c, t01=0x0058}
0x07732…07764                Head {h00=0x002e, h01=0x0050, text=»DF:IFC EQU 5 FILE CODE, OTHER INPUT DEVICE«, t00=0x004c, t01=0x0080}
0x07764…07786                Head {h00=0x001e, h01=0x0050, text=»DF:DEF EQU 6 DEFAULT VALUE«, t00=0x004c, t01=0x00b2}
0x07786…077b0                Head {h00=0x0026, h01=0x0050, text=»DF:OUT EQU 7 OUTPUT PRINT POSITION«, t00=0x004c, t01=0x00d4}
0x077b0…077d4                Head {h00=0x0020, h01=0x0050, text=»DF:GM EQU 15 GUIDING MESSAGE«, t00=0x004c, t01=0x00fe}
0x077d4…077e2                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x0122}
0x077e2…077ea                Head {h00=0x0004, h01=0x0050, t00=0x004c, t01=0x0130}
0x077ea…07838                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x004c, t01=0x0138}
0x07838…07886                Head {h00=0x004a, h01=0x0050, text=»**                WSM VALIDATION STATEMENT TYPES                    **«, t00=0x004c, t01=0x0186}
0x07886…078d4                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x004d, t01=0x0044}
0x078d4…078dc                Head {h00=0x0004, h01=0x0050, t00=0x004d, t01=0x0092}
0x078dc…0790a                Head {h00=0x002a, h01=0x0050, text=»VS:ALE EQU /00 ALPHANUM LET EXCL. LET «, t00=0x004d, t01=0x009a}
0x0790a…07938                Head {h00=0x002a, h01=0x0050, text=»VS:ALI EQU /01 ALPHANUM LET INCL. LET «, t00=0x004d, t01=0x00c8}
0x07938…07966                Head {h00=0x002a, h01=0x0050, text=»VS:NLE EQU /02 NUMERIC  LET EXCL. LET «, t00=0x004d, t01=0x00f6}
0x07966…07994                Head {h00=0x002a, h01=0x0050, text=»VS:NLI EQU /03 NUMERIC  LET INCL. LET «, t00=0x004d, t01=0x0124}
0x07994…079b0                Head {h00=0x0018, h01=0x0050, text=»VS:GO EQU /04 GO TO «, t00=0x004d, t01=0x0152}
0x079b0…079cc                Head {h00=0x0018, h01=0x0050, text=»VS:GOT EQU /05 GOTO «, t00=0x004d, t01=0x016e}
0x079cc…079fe                Head {h00=0x002e, h01=0x0050, text=»VS:IFL EQU /06 IF <REL. EXPR.> THEN LINENO«, t00=0x004d, t01=0x018a}
0x079fe…07a34                Head {h00=0x0032, h01=0x0050, text=»VS:IFS EQU /08 IF <REL. EXPR.> THEN STATEMENT «, t00=0x004e, t01=0x002c}
0x07a34…07a68                Head {h00=0x0030, h01=0x0050, text=»VS:OGO EQU /0A ON <EXPR.> GO TO LINENUMBERS «, t00=0x004e, t01=0x0062}
0x07a68…07a9c                Head {h00=0x0030, h01=0x0050, text=»VS:OGT EQU /0B ON <EXPR.> GOTO  LINENUMBERS «, t00=0x004e, t01=0x0096}
0x07a9c…07ab8                Head {h00=0x0018, h01=0x0050, text=»VS:CAL EQU /0C CALL «, t00=0x004e, t01=0x00ca}
0x07ab8…07ad4                Head {h00=0x0018, h01=0x0050, text=»VS:SEC EQU /0E SECT «, t00=0x004e, t01=0x00e6}
0x07ad4…07af0                Head {h00=0x0018, h01=0x0050, text=»VS:ATT EQU /10 ATTR «, t00=0x004e, t01=0x0102}
0x07af0…07b0c                Head {h00=0x0018, h01=0x0050, text=»VS:STO EQU /12 STOP «, t00=0x004e, t01=0x011e}
0x07b0c…07b28                Head {h00=0x0018, h01=0x0050, text=»VS:EXI EQU /14 EXIT «, t00=0x004e, t01=0x013a}
0x07b28…07b42                Head {h00=0x0016, h01=0x0050, text=»VS:ERR EQU /16 ERR«, t00=0x004e, t01=0x0156}
0x07b42…07b5e                Head {h00=0x0018, h01=0x0050, text=»VS:WAR EQU /18 WARN «, t00=0x004e, t01=0x0170}
0x07b5e…07b78                Head {h00=0x0016, h01=0x0050, text=»VS:REM EQU /1A REM«, t00=0x004e, t01=0x018c}
0x07b78…07b94                Head {h00=0x0018, h01=0x0050, text=»VS:EMP EQU /0C EMPTY«, t00=0x004f, t01=0x0016}
0x07b94…07ba2                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004f, t01=0x0032}
0x07ba2…07baa                Head {h00=0x0004, h01=0x0050, t00=0x004f, t01=0x0040}
0x07baa…07bf8                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x004f, t01=0x0048}
0x07bf8…07c46                Head {h00=0x004a, h01=0x0050, text=»**                VALIDATION OPERATOR EQUATES                       **«, t00=0x004f, t01=0x0096}
0x07c46…07c94                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x004f, t01=0x00e4}
0x07c94…07c9c                Head {h00=0x0004, h01=0x0050, t00=0x004f, t01=0x0132}
0x07c9c…07cc2                Head {h00=0x0022, h01=0x0050, text=»VO:EEX EQU 1 END OF EXPRESSION«, t00=0x004f, t01=0x013a}
0x07cc2…07cf2                Head {h00=0x002c, h01=0x0050, text=»VO:AEQ EQU 2 = , ALPHANUMERIC COMPARISON«, t00=0x004f, t01=0x0160}
0x07cf2…07d0c                Head {h00=0x0016, h01=0x0050, text=»VO:AGE EQU 3 >=, "«, t00=0x004f, t01=0x0190}
0x07d0c…07d26                Head {h00=0x0016, h01=0x0050, text=»VO:AGT EQU 4 > , "«, t00=0x0050, t01=0x001a}
0x07d26…07d40                Head {h00=0x0016, h01=0x0050, text=»VO:ALE EQU 5 <=, "«, t00=0x0050, t01=0x0034}
0x07d40…07d5a                Head {h00=0x0016, h01=0x0050, text=»VO:ALT EQU 6 < , "«, t00=0x0050, t01=0x004e}
0x07d5a…07d74                Head {h00=0x0016, h01=0x0050, text=»VO:ANE EQU 7 <>, "«, t00=0x0050, t01=0x0068}
0x07d74…07da0                Head {h00=0x0028, h01=0x0050, text=»VO:NEQ EQU 8 = , NUMERIC COMPARISON «, t00=0x0050, t01=0x0082}
0x07da0…07dba                Head {h00=0x0016, h01=0x0050, text=»VO:NGE EQU 9 >=, "«, t00=0x0050, t01=0x00ae}
0x07dba…07dd6                Head {h00=0x0018, h01=0x0050, text=»VO:NGT EQU /0A > , "«, t00=0x0050, t01=0x00c8}
0x07dd6…07df2                Head {h00=0x0018, h01=0x0050, text=»VO:NLE EQU /0B <=, "«, t00=0x0050, t01=0x00e4}
0x07df2…07e0e                Head {h00=0x0018, h01=0x0050, text=»VO:NLT EQU /0C < , "«, t00=0x0050, t01=0x0100}
0x07e0e…07e2a                Head {h00=0x0018, h01=0x0050, text=»VO:NNE EQU /0D <>, "«, t00=0x0050, t01=0x011c}
0x07e2a…07e4c                Head {h00=0x001e, h01=0x0050, text=»VO:CON EQU /0E CONCATENATE«, t00=0x0050, t01=0x0138}
0x07e4c…07e6c                Head {h00=0x001c, h01=0x0050, text=»VO:SUS EQU /0F SUBSTRING«, t00=0x0050, t01=0x015a}
0x07e6c…07e90                Head {h00=0x0020, h01=0x0050, text=»VO:STR EQU /10 STR FUNCTION «, t00=0x0050, t01=0x017a}
0x07e90…07eb2                Head {h00=0x001e, h01=0x0050, text=»VO:UPL EQU /11 UNARY PLUS «, t00=0x0051, t01=0x000e}
0x07eb2…07ee0                Head {h00=0x002a, h01=0x0050, text=»VO:UMI EQU /12 "     MINUS <=> NEGATE «, t00=0x0051, t01=0x0030}
0x07ee0…07efa                Head {h00=0x0016, h01=0x0050, text=»VO:ADD EQU /13 ADD«, t00=0x0051, t01=0x005e}
0x07efa…07f1a                Head {h00=0x001c, h01=0x0050, text=»VO:SUB EQU /14 SUBTRACT «, t00=0x0051, t01=0x0078}
0x07f1a…07f38                Head {h00=0x001a, h01=0x0050, text=»VO:DIV EQU /15 DIVIDE «, t00=0x0051, t01=0x0098}
0x07f38…07f58                Head {h00=0x001c, h01=0x0050, text=»VO:MUL EQU /16 MULTIPLY «, t00=0x0051, t01=0x00b6}
0x07f58…07f7c                Head {h00=0x0020, h01=0x0050, text=»VO:ABS EQU /17 ABS FUNCTION «, t00=0x0051, t01=0x00d6}
0x07f7c…07f98                Head {h00=0x0018, h01=0x0050, text=»VO:INT EQU /18 INT "«, t00=0x0051, t01=0x00fa}
0x07f98…07fb4                Head {h00=0x0018, h01=0x0050, text=»VO:SGN EQU /19 SGN "«, t00=0x0051, t01=0x0116}
0x07fb4…07fd0                Head {h00=0x0018, h01=0x0050, text=»VO:TIM EQU /1A TIM "«, t00=0x0051, t01=0x0132}
0x07fd0…07fec                Head {h00=0x0018, h01=0x0050, text=»VO:DAY EQU /1B DAY "«, t00=0x0051, t01=0x014e}
0x07fec…08008                Head {h00=0x0018, h01=0x0050, text=»VO:SYS EQU /1C SYS "«, t00=0x0051, t01=0x016a}
0x08008…08024                Head {h00=0x0018, h01=0x0050, text=»VO:LEN EQU /1D LEN "«, t00=0x0051, t01=0x0186}
0x08024…08040                Head {h00=0x0018, h01=0x0050, text=»VO:NUM EQU /1E NUM "«, t00=0x0052, t01=0x0012}
0x08040…0805c                Head {h00=0x0018, h01=0x0050, text=»VO:DAT EQU /1F DAT "«, t00=0x0052, t01=0x002e}
0x0805c…08078                Head {h00=0x0018, h01=0x0050, text=»VO:CDV EQU /20 CDV "«, t00=0x0052, t01=0x004a}
0x08078…08094                Head {h00=0x0018, h01=0x0050, text=»VO:POS EQU /21 POS "«, t00=0x0052, t01=0x0066}
0x08094…080b6                Head {h00=0x001e, h01=0x0050, text=»VO:PAR EQU /22 PARANTHESIS«, t00=0x0052, t01=0x0082}
0x080b6…080c4                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0052, t01=0x00a4}
0x080c4…080cc                Head {h00=0x0004, h01=0x0050, t00=0x0052, t01=0x00b2}
0x080cc…0811a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0052, t01=0x00ba}
0x0811a…08168                Head {h00=0x004a, h01=0x0050, text=»**                EQUATES TO THE DIFFERENT KEYTABLES                **«, t00=0x0052, t01=0x0108}
0x08168…081b6                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0052, t01=0x0156}
0x081b6…081be                Head {h00=0x0004, h01=0x0050, t00=0x0053, t01=0x0014}
0x081be…081c8                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0053, t01=0x001c}
0x081c8…081e2                Head {h00=0x0016, h01=0x0050, text=»**  KEYTABLE 1 & 2«, t00=0x0053, t01=0x0026}
0x081e2…081ec                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0053, t01=0x0040}
0x081ec…081f4                Head {h00=0x0004, h01=0x0050, t00=0x0053, t01=0x004a}
0x081f4…08208                Head {h00=0x0010, h01=0x0050, text=»K1:CUP EQU 1«, t00=0x0053, t01=0x0052}
0x08208…08224                Head {h00=0x0018, h01=0x0050, text=»K1:CDW EQU K1:CUP+1 «, t00=0x0053, t01=0x0066}
0x08224…08240                Head {h00=0x0018, h01=0x0050, text=»K1:TFD EQU K1:CDW+1 «, t00=0x0053, t01=0x0082}
0x08240…0825c                Head {h00=0x0018, h01=0x0050, text=»K1:TBD EQU K1:TFD+1 «, t00=0x0053, t01=0x009e}
0x0825c…08278                Head {h00=0x0018, h01=0x0050, text=»K1:PRT EQU K1:TBD+1 «, t00=0x0053, t01=0x00ba}
0x08278…08294                Head {h00=0x0018, h01=0x0050, text=»K1:LIN EQU K1:PRT+1 «, t00=0x0053, t01=0x00d6}
0x08294…082b0                Head {h00=0x0018, h01=0x0050, text=»K1:HLP EQU K1:LIN+1 «, t00=0x0053, t01=0x00f2}
0x082b0…082cc                Head {h00=0x0018, h01=0x0050, text=»K1:ARI EQU K1:HLP+1 «, t00=0x0053, t01=0x010e}
0x082cc…082e8                Head {h00=0x0018, h01=0x0050, text=»K1:ASD EQU K1:ARI+1 «, t00=0x0053, t01=0x012a}
0x082e8…08304                Head {h00=0x0018, h01=0x0050, text=»K1:CLR EQU K1:ASD+1 «, t00=0x0053, t01=0x0146}
0x08304…08320                Head {h00=0x0018, h01=0x0050, text=»K1:SEC EQU K1:CLR+1 «, t00=0x0053, t01=0x0162}
0x08320…0833a                Head {h00=0x0016, h01=0x0050, text=»K1:CR EQU K1:SEC+1«, t00=0x0053, t01=0x017e}
0x0833a…08354                Head {h00=0x0016, h01=0x0050, text=»K1:DUP EQU K1:CR+1«, t00=0x0054, t01=0x0008}
0x08354…08370                Head {h00=0x0018, h01=0x0050, text=»K1:ENT EQU K1:DUP+1 «, t00=0x0054, t01=0x0022}
0x08370…0838c                Head {h00=0x0018, h01=0x0050, text=»K1:FUN EQU K1:ENT+1 «, t00=0x0054, t01=0x003e}
0x0838c…083a8                Head {h00=0x0018, h01=0x0050, text=»K1:CAN EQU K1:FUN+1 «, t00=0x0054, t01=0x005a}
0x083a8…083e8                Head {h00=0x003c, h01=0x0050, text=»K1:USR EQU K1:CAN+1 K1:USR & ABOVE ARE USER DEFINED KEYS«, t00=0x0054, t01=0x0076}
0x083e8…083f6                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0054, t01=0x00b6}
0x083f6…08400                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0054, t01=0x00c4}
0x08400…08416                Head {h00=0x0012, h01=0x0050, text=»** KEYTABLE 3 «, t00=0x0054, t01=0x00ce}
0x08416…08420                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0054, t01=0x00e4}
0x08420…08428                Head {h00=0x0004, h01=0x0050, t00=0x0054, t01=0x00ee}
0x08428…0843c                Head {h00=0x0010, h01=0x0050, text=»K3:INS EQU 1«, t00=0x0054, t01=0x00f6}
0x0843c…08458                Head {h00=0x0018, h01=0x0050, text=»K3:DEL EQU K3:INS+1 «, t00=0x0054, t01=0x010a}
0x08458…08474                Head {h00=0x0018, h01=0x0050, text=»K3:TFD EQU K3:DEL+1 «, t00=0x0054, t01=0x0126}
0x08474…08490                Head {h00=0x0018, h01=0x0050, text=»K3:TBD EQU K3:TFD+1 «, t00=0x0054, t01=0x0142}
0x08490…084ac                Head {h00=0x0018, h01=0x0050, text=»K3:PRT EQU K3:TBD+1 «, t00=0x0054, t01=0x015e}
0x084ac…084c8                Head {h00=0x0018, h01=0x0050, text=»K3:CLR EQU K3:PRT+1 «, t00=0x0054, t01=0x017a}
0x084c8…084e4                Head {h00=0x0018, h01=0x0050, text=»K3:CAN EQU K3:CLR+1 «, t00=0x0055, t01=0x0008}
0x084e4…08500                Head {h00=0x0018, h01=0x0050, text=»K3:USR EQU K3:CAN+1 «, t00=0x0055, t01=0x0024}
0x08500…08508                Head {h00=0x0004, h01=0x0050, t00=0x0055, t01=0x0040}
0x08508…08512                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0055, t01=0x0048}
0x08512…08528                Head {h00=0x0012, h01=0x0050, text=»** KEYTABLE 4 «, t00=0x0055, t01=0x0052}
0x08528…08532                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0055, t01=0x0068}
0x08532…0853a                Head {h00=0x0004, h01=0x0050, t00=0x0055, t01=0x0072}
0x0853a…0854e                Head {h00=0x0010, h01=0x0050, text=»K4:CLR EQU 1«, t00=0x0055, t01=0x007a}
0x0854e…0856a                Head {h00=0x0018, h01=0x0050, text=»K4:ENT EQU K4:CLR+1 «, t00=0x0055, t01=0x008e}
0x0856a…08586                Head {h00=0x0018, h01=0x0050, text=»K4:CAN EQU K4:ENT+1 «, t00=0x0055, t01=0x00aa}
0x08586…085a2                Head {h00=0x0018, h01=0x0050, text=»K4:USR EQU K4:CAN+1 «, t00=0x0055, t01=0x00c6}
0x085a2…085aa                Head {h00=0x0004, h01=0x0050, t00=0x0055, t01=0x00e2}
0x085aa…085b4                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0055, t01=0x00ea}
0x085b4…085ce                Head {h00=0x0016, h01=0x0050, text=»**  KEYTABLE 5 & 6«, t00=0x0055, t01=0x00f4}
0x085ce…085d8                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0055, t01=0x010e}
0x085d8…085e0                Head {h00=0x0004, h01=0x0050, t00=0x0055, t01=0x0118}
0x085e0…085f4                Head {h00=0x0010, h01=0x0050, text=»K5:CLR EQU 1«, t00=0x0055, t01=0x0120}
0x085f4…08610                Head {h00=0x0018, h01=0x0050, text=»K5:CAN EQU K5:CLR+1 «, t00=0x0055, t01=0x0134}
0x08610…08650                Head {h00=0x003c, h01=0x0050, text=»K5:USR EQU K5:CAN+1 K5:USR & ABOVE ARE USER DEFINED KEYS«, t00=0x0055, t01=0x0150}
0x08650…0866a                Head {h00=0x0016, h01=0x0050, text=»K6:OV EQU K5:CAN+1«, t00=0x0055, t01=0x0190}
0x0866a…086aa                Head {h00=0x003c, h01=0x0050, text=»K6:USR EQU K6:OV+1 K6:USR & ABOVE ARE USER DEFINED KEYS «, t00=0x0056, t01=0x001a}
0x086aa…086b8                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0056, t01=0x005a}
0x086b8…086ce                Head {h00=0x0012, h01=0x0050, text=»BYTE2 FORM 8,8«, t00=0x0056, t01=0x0068}
0x086ce…08700                Head {h00=0x002e, h01=0x0050, text=»BIT16 FORM 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1«, t00=0x0056, t01=0x007e}
0x08700…0870e                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x0056, t01=0x00b0}
0x0870e…08716                Head {h00=0x0004, h01=0x0050, t00=0x0056, t01=0x00be}
0x08716…0871e                Head {h00=0x0004, h01=0x0050, t00=0x0056, t01=0x00c6}
0x0871e…08726                Head {h00=0x0004, h01=0x0050, t00=0x0056, t01=0x00ce}
0x08726…0872e                Head {h00=0x0004, h01=0x0050, t00=0x0056, t01=0x00d6}
0x0872e…08736                Head {h00=0x0004, h01=0x0050, t00=0x0056, t01=0x00de}
0x08736…08784                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0056, t01=0x00e6}
0x08784…087d2                Head {h00=0x004a, h01=0x0050, text=»**                    THIS IS THE START OF THE AREA COMPRISING      **«, t00=0x0056, t01=0x0134}
0x087d2…08820                Head {h00=0x004a, h01=0x0050, text=»**                    APPLICATION DEPENDANT DATA.                   **«, t00=0x0056, t01=0x0182}
0x08820…0886e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0057, t01=0x0040}
0x0886e…08876                Head {h00=0x0004, h01=0x0050, t00=0x0057, t01=0x008e}
0x08876…088c4                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0057, t01=0x0096}
0x088c4…08912                Head {h00=0x004a, h01=0x0050, text=»**                    0. MINI INTERPRETER FOR FILE HANDLING ONLY.   **«, t00=0x0057, t01=0x00e4}
0x08912…08960                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0057, t01=0x0132}
0x08960…0896e                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0057, t01=0x0180}
0x0896e…08976                Head {h00=0x0004, h01=0x0050, t00=0x0057, t01=0x018e}
0x08976…089c4                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0058, t01=0x0008}
0x089c4…08a12                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0058, t01=0x0056}
0x08a12…08a60                Head {h00=0x004a, h01=0x0050, text=»**                    WSM INTERPRETER FOR FILE HANDLING ONLY        **«, t00=0x0058, t01=0x00a4}
0x08a60…08aae                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0058, t01=0x00f2}
0x08aae…08ae6                Head {h00=0x0034, h01=0x0050, text=»**  IT IS POSSIBLE TO MAKE A WSM INTERPRETER FOR«, t00=0x0058, t01=0x0140}
0x08ae6…08b0a                Head {h00=0x0020, h01=0x0050, text=»**  WSM FILE HANDLING ONLY. «, t00=0x0058, t01=0x0178}
0x08b0a…08b14                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0059, t01=0x000c}
0x08b14…08b4c                Head {h00=0x0034, h01=0x0050, text=»**  THIS IS INTERESTING TO HAVE IN E.G. THE 6911«, t00=0x0059, t01=0x0016}
0x08b4c…08b82                Head {h00=0x0032, h01=0x0050, text=»**  OF A SYSTEM CONSISTING OF A 6911 WITH DISK«, t00=0x0059, t01=0x004e}
0x08b82…08b9a                Head {h00=0x0014, h01=0x0050, text=»**  AND VD83:S. «, t00=0x0059, t01=0x0084}
0x08b9a…08ba4                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0059, t01=0x009c}
0x08ba4…08be0                Head {h00=0x0038, h01=0x0050, text=»**  THIS INTERPRETER CAN BE GENERATED BY TAKING THE «, t00=0x0059, t01=0x00a6}
0x08be0…08bfe                Head {h00=0x001a, h01=0x0050, text=»**  FOLLOWING ACTIONS:«, t00=0x0059, t01=0x00e2}
0x08bfe…08c08                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0059, t01=0x0100}
0x08c08…08c44                Head {h00=0x0038, h01=0x0050, text=»** A) UNDER POINT 1 (DEFINITION OF DATA AREA SIZES) «, t00=0x0059, t01=0x010a}
0x08c44…08c80                Head {h00=0x0038, h01=0x0050, text=»**  SET ALL PARAMETERS ALLOWED TO ALTER EXCEPT PBBUF«, t00=0x0059, t01=0x0146}
0x08c80…08caa                Head {h00=0x0026, h01=0x0050, text=»**  TO 0 (ZERO). SET PBBUF TO 256.«, t00=0x0059, t01=0x0182}
0x08caa…08cde                Head {h00=0x0030, h01=0x0050, text=»** B) UNDER POINT 2 KEEP THE DEFAULT VALUES.«, t00=0x005a, t01=0x001c}
0x08cde…08d00                Head {h00=0x001e, h01=0x0050, text=»** C) UNDER POINTS 3 AND 4«, t00=0x005a, t01=0x0050}
0x08d00…08d1e                Head {h00=0x001a, h01=0x0050, text=»**  DELETE ALL LINES. «, t00=0x005a, t01=0x0072}
0x08d1e…08d52                Head {h00=0x0030, h01=0x0050, text=»** D) UNDER POINT 5 (WSM MEMORY BUFFER POOL)«, t00=0x005a, t01=0x0090}
0x08d52…08d8c                Head {h00=0x0036, h01=0x0050, text=»**  DEFINE A POOL BIG ENOUGH TO HOUSE THE LARGEST «, t00=0x005a, t01=0x00c4}
0x08d8c…08dc4                Head {h00=0x0034, h01=0x0050, text=»**  FORMAT SECTION IN YOUR SYSTEM TOGETHER WITH «, t00=0x005a, t01=0x00fe}
0x08dc4…08e04                Head {h00=0x003c, h01=0x0050, text=»**  ONE FORMAT DEFINITION (1 FORMAT DEF.= 1 POOL UNIT). «, t00=0x005a, t01=0x0136}
0x08e04…08e38                Head {h00=0x0030, h01=0x0050, text=»** E) UNDER POINT 6 KEEP THE DEFAULT VALUES.«, t00=0x005a, t01=0x0176}
0x08e38…08e70                Head {h00=0x0034, h01=0x0050, text=»** F) UNDER POINT 7 (WSM INSTRUCTION SELECTION) «, t00=0x005b, t01=0x001a}
0x08e70…08eaa                Head {h00=0x0036, h01=0x0050, text=»**  EXCLUDE ALL INSTRUCTIONS EXCEPT WOPEN, WCLOSE «, t00=0x005b, t01=0x0052}
0x08eaa…08ece                Head {h00=0x0020, h01=0x0050, text=»**  AND WCODE AND/OR WSAVE. «, t00=0x005b, t01=0x008c}
0x08ece…08f06                Head {h00=0x0034, h01=0x0050, text=»** G) UNDER POINT 8 (VALIDATION .... SELECTION) «, t00=0x005b, t01=0x00b0}
0x08f06…08f32                Head {h00=0x0028, h01=0x0050, text=»**  EXCLUDE THE COMPLETE VALIDATION.«, t00=0x005b, t01=0x00e8}
0x08f32…08f66                Head {h00=0x0030, h01=0x0050, text=»** H) UNDER POINT 9 KEEP THE DEFAULT VALUES.«, t00=0x005b, t01=0x0114}
0x08f66…08f8a                Head {h00=0x0020, h01=0x0050, text=»** I) UNDER POINT 10 AND 11 «, t00=0x005b, t01=0x0148}
0x08f8a…08fa6                Head {h00=0x0018, h01=0x0050, text=»**  DELETE ALL LINES«, t00=0x005b, t01=0x016c}
0x08fa6…08fb0                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x005b, t01=0x0188}
0x08fb0…08fbe (92, 0, 400)   Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005c, t01=0x0004}
0x08fbe…08fc8                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x005c, t01=0x0012}
0x08fc8…08ffa                Head {h00=0x002e, h01=0x0050, text=»** J) REPLACE 0 (ZERO) BELOW WITH 1 (ONE).«, t00=0x005c, t01=0x001c}
0x08ffa…0901e                Head {h00=0x0020, h01=0x0050, text=»**                        A «, t00=0x005c, t01=0x004e}
0x0901e…09042                Head {h00=0x0020, h01=0x0050, text=»**                        ! «, t00=0x005c, t01=0x0072}
0x09042…09058                Head {h00=0x0012, h01=0x0050, text=»**  --------- «, t00=0x005c, t01=0x0096}
0x09058…09066                Head {h00=0x000a, h01=0x0050, text=»**  ! «, t00=0x005c, t01=0x00ac}
0x09066…09074                Head {h00=0x000a, h01=0x0050, text=»**  V «, t00=0x005c, t01=0x00ba}
0x09074…09088                Head {h00=0x0010, h01=0x0050, text=»X:WDSP EQU 0«, t00=0x005c, t01=0x00c8}
0x09088…09092                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x005c, t01=0x00dc}
0x09092…090ca                Head {h00=0x0034, h01=0x0050, text=»**  THE FILE HANDLER TASK "FW" AND AT LEAST ONE «, t00=0x005c, t01=0x00e6}
0x090ca…090fe                Head {h00=0x0030, h01=0x0050, text=»**  ORDINARY WSM TASK MUST BE CONFIGURATED. «, t00=0x005c, t01=0x011e}
0x090fe…0914c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x005c, t01=0x0152}
0x0914c…0919a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x005d, t01=0x0010}
0x0919a…091a2                Head {h00=0x0004, h01=0x0050, t00=0x005d, t01=0x005e}
0x091a2…091f0                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x005d, t01=0x0066}
0x091f0…0923e                Head {h00=0x004a, h01=0x0050, text=»**                    EQUATES FOR WSMGEN                            **«, t00=0x005d, t01=0x00b4}
0x0923e…0928c                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x005d, t01=0x0102}
0x0928c…092da                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x005d, t01=0x0150}
0x092da…092e8                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x005e, t01=0x000e}
0x092e8…09300                Head {h00=0x0014, h01=0x0050, text=»XWDSP EQU X:WDSP«, t00=0x005e, t01=0x001c}
0x09300…09314                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x005e, t01=0x0034}
0x09314…09326                Head {h00=0x000e, h01=0x0050, text=»WDSP EQU 1«, t00=0x005e, t01=0x0048}
0x09326…09332                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x005a}
0x09332…09340                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x005e, t01=0x0066}
0x09340…09354                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=1«, t00=0x005e, t01=0x0074}
0x09354…09366                Head {h00=0x000e, h01=0x0050, text=»WDSP EQU 0«, t00=0x005e, t01=0x0088}
0x09366…09372                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x009a}
0x09372…09380                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005e, t01=0x00a6}
0x09380…09388                Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x00b4}
0x09388…09390                Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x00bc}
0x09390…09398                Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x00c4}
0x09398…093a0                Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x00cc}
0x093a0…093a8                Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x00d4}
0x093a8…093b0                Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x00dc}
0x093b0…093b8                Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x00e4}
0x093b8…093c0                Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x00ec}
0x093c0…093c8                Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x00f4}
0x093c8…093d0                Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x00fc}
0x093d0…093d8                Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x0104}
0x093d8…093e0                Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x010c}
0x093e0…0942e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x005e, t01=0x0114}
0x0942e…0947c                Head {h00=0x004a, h01=0x0050, text=»**                    1. DEFINITION OF DATA AREA SIZES:             **«, t00=0x005e, t01=0x0162}
0x0947c…094ca                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x005f, t01=0x0020}
0x094ca…094d8                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005f, t01=0x006e}
0x094d8…094e0                Head {h00=0x0004, h01=0x0050, t00=0x005f, t01=0x007c}
0x094e0…0952e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x005f, t01=0x0084}
0x0952e…0957c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x005f, t01=0x00d2}
0x0957c…095ca                Head {h00=0x004a, h01=0x0050, text=»**                    WSM DATA AREA SIZES.                          **«, t00=0x005f, t01=0x0120}
0x095ca…09618                Head {h00=0x004a, h01=0x0050, text=»**                    THE VALUES ARE APPLICATION DEPENDANT AND      **«, t00=0x005f, t01=0x016e}
0x09618…09666                Head {h00=0x004a, h01=0x0050, text=»**                    SHOULD BE ESTIMATED FOR ONLY  O N E  TASK.    **«, t00=0x0060, t01=0x002c}
0x09666…096b4                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0060, t01=0x007a}
0x096b4…096bc                Head {h00=0x0004, h01=0x0050, t00=0x0060, t01=0x00c8}
0x096bc…096f8                Head {h00=0x0038, h01=0x0050, text=»X:INOF EQU 9 NUMBER OF FAST CHOICE SECTIONS ( <10 ) «, t00=0x0060, t01=0x00d0}
0x096f8…09730                Head {h00=0x0034, h01=0x0050, text=»X:IFCS EQU 54 SIZE OF FAST CHOICE SECTIONS AREA «, t00=0x0060, t01=0x010c}
0x09730…09760                Head {h00=0x002c, h01=0x0050, text=»   ( = NO OF FAST CHOICE SECTIONS * 6 ) «, t00=0x0060, t01=0x0144}
0x09760…09768                Head {h00=0x0004, h01=0x0050, t00=0x0060, t01=0x0174}
0x09768…0979e                Head {h00=0x0032, h01=0x0050, text=»X:INON EQU 10 NUMBER OF NUMERIC WSM WORK ITEMS«, t00=0x0060, t01=0x017c}
0x0979e…097d4                Head {h00=0x0032, h01=0x0050, text=»X:INUM EQU 100 SIZE OF NUMERIC WORK ITEMS AREA«, t00=0x0061, t01=0x0022}
0x097d4…09804                Head {h00=0x002c, h01=0x0050, text=»   ( = NO OF ITEMS * SIZE OF ONE ITEM ) «, t00=0x0061, t01=0x0058}
0x09804…0980c                Head {h00=0x0004, h01=0x0050, t00=0x0061, t01=0x0088}
0x0980c…09844                Head {h00=0x0034, h01=0x0050, text=»X:INOA EQU 10 NUMBER OF ALPHANUM WSM WORK ITEMS «, t00=0x0061, t01=0x0090}
0x09844…0987c                Head {h00=0x0034, h01=0x0050, text=»X:IALP EQU 100 SIZE OF ALPHANUM WORK ITEMS AREA «, t00=0x0061, t01=0x00c8}
0x0987c…098ac                Head {h00=0x002c, h01=0x0050, text=»   ( = NO OF ITEMS * SIZE OF ONE ITEM ) «, t00=0x0061, t01=0x0100}
0x098ac…098b4                Head {h00=0x0004, h01=0x0050, t00=0x0061, t01=0x0130}
0x098b4…098e4                Head {h00=0x002c, h01=0x0050, text=»X:TDFD EQU 3000 SECTION DEPENDENT AREA. «, t00=0x0061, t01=0x0138}
0x098e4…0990e                Head {h00=0x0026, h01=0x0050, text=»   THIS AREA IS SHARED BY THE TWO «, t00=0x0061, t01=0x0168}
0x0990e…0993c (98, 0, 400)   Head {h00=0x002a, h01=0x0050, text=»   FOLLOWING TABLES, ONE STARTING FROM«, t00=0x0062, t01=0x0004}
0x0993c…0996a                Head {h00=0x002a, h01=0x0050, text=»   THE TOP, THE OTHER FROM THE BOTTOM:«, t00=0x0062, t01=0x0032}
0x0996a…09972                Head {h00=0x0004, h01=0x0050, t00=0x0062, t01=0x0060}
0x09972…099a0                Head {h00=0x002a, h01=0x0050, text=»   1. SECTION SEQUENCE TABLE ( SST ) :«, t00=0x0062, t01=0x0068}
0x099a0…099d0                Head {h00=0x002c, h01=0x0050, text=»   EACH SECTION THAT IS ATTACHED BETWEEN«, t00=0x0062, t01=0x0096}
0x099d0…099fc                Head {h00=0x0028, h01=0x0050, text=»   OPEN AND CLOSE REQUIRES 20 BYTES.«, t00=0x0062, t01=0x00c6}
0x099fc…09a04                Head {h00=0x0004, h01=0x0050, t00=0x0062, t01=0x00f2}
0x09a04…09a34                Head {h00=0x002c, h01=0x0050, text=»   2. DYNAMIC FIELDS DATA AREA ( DFD ) :«, t00=0x0062, t01=0x00fa}
0x09a34…09a66                Head {h00=0x002e, h01=0x0050, text=»   EACH DYN. FIELD IN EACH SECTION IN SST «, t00=0x0062, t01=0x012a}
0x09a66…09a98                Head {h00=0x002e, h01=0x0050, text=»   NEEDS NO. OF CHAR.S IN FIELD + 1 BYTE+ «, t00=0x0062, t01=0x015c}
0x09a98…09acc                Head {h00=0x0030, h01=0x0050, text=»   + 1 BYTE FOR THE SIGN OF NUMERIC FIELDS. «, t00=0x0062, t01=0x018e}
0x09acc…09ad4                Head {h00=0x0004, h01=0x0050, t00=0x0063, t01=0x0032}
0x09ad4…09afa                Head {h00=0x0022, h01=0x0050, text=»   ESTIMATE FOR "WORST CASE" !«, t00=0x0063, t01=0x003a}
0x09afa…09b02                Head {h00=0x0004, h01=0x0050, t00=0x0063, t01=0x0060}
0x09b02…09b10                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0063, t01=0x0068}
0x09b10…09b18                Head {h00=0x0004, h01=0x0050, t00=0x0063, t01=0x0076}
0x09b18…09b4e                Head {h00=0x0032, h01=0x0050, text=»X:BBUF EQU 256 WSM PARAMETER BLOCK BUFFER SIZE«, t00=0x0063, t01=0x007e}
0x09b4e…09b56                Head {h00=0x0004, h01=0x0050, t00=0x0063, t01=0x00b4}
0x09b56…09b90                Head {h00=0x0036, h01=0x0050, text=»X:NBUF EQU 100 INPUT (KEY BOARD) BUFFER SIZE (>=6)«, t00=0x0063, t01=0x00bc}
0x09b90…09b98                Head {h00=0x0004, h01=0x0050, t00=0x0063, t01=0x00f6}
0x09b98…09bd4                Head {h00=0x0038, h01=0x0050, text=»X:TBUF EQU 100 OUTPUT (DISPLAY/PRINTER) BUFFER SIZE «, t00=0x0063, t01=0x00fe}
0x09bd4…09c00                Head {h00=0x0028, h01=0x0050, text=»   THE OUTPUT BUFFER IS ALSO USED AS«, t00=0x0063, t01=0x013a}
0x09c00…09c1e                Head {h00=0x001a, h01=0x0050, text=»   WSM BASIC WORK AREA«, t00=0x0063, t01=0x0166}
0x09c1e…09c6c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0063, t01=0x0184}
0x09c6c…09cba                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0064, t01=0x0042}
0x09cba…09cc2                Head {h00=0x0004, h01=0x0050, t00=0x0064, t01=0x0090}
0x09cc2…09d10                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0064, t01=0x0098}
0x09d10…09d5e                Head {h00=0x004a, h01=0x0050, text=»**                    EQUATES FOR WSMGEN                            **«, t00=0x0064, t01=0x00e6}
0x09d5e…09dac                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x0064, t01=0x0134}
0x09dac…09dfa                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0064, t01=0x0182}
0x09dfa…09e08                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0065, t01=0x0040}
0x09e08…09e20                Head {h00=0x0014, h01=0x0050, text=»XINOF EQU X:INOF«, t00=0x0065, t01=0x004e}
0x09e20…09e38                Head {h00=0x0014, h01=0x0050, text=»WWINOF EQU XINOF«, t00=0x0065, t01=0x0066}
0x09e38…09e50                Head {h00=0x0014, h01=0x0050, text=»XIFCS EQU X:IFCS«, t00=0x0065, t01=0x007e}
0x09e50…09e68                Head {h00=0x0014, h01=0x0050, text=»WWIFCS EQU XIFCS«, t00=0x0065, t01=0x0096}
0x09e68…09e80                Head {h00=0x0014, h01=0x0050, text=»XINON EQU X:INON«, t00=0x0065, t01=0x00ae}
0x09e80…09e98                Head {h00=0x0014, h01=0x0050, text=»WWINON EQU XINON«, t00=0x0065, t01=0x00c6}
0x09e98…09eb0                Head {h00=0x0014, h01=0x0050, text=»XINUM EQU X:INUM«, t00=0x0065, t01=0x00de}
0x09eb0…09ec8                Head {h00=0x0014, h01=0x0050, text=»WWINUM EQU XINUM«, t00=0x0065, t01=0x00f6}
0x09ec8…09ee0                Head {h00=0x0014, h01=0x0050, text=»XINOA EQU X:INOA«, t00=0x0065, t01=0x010e}
0x09ee0…09ef8                Head {h00=0x0014, h01=0x0050, text=»WWINOA EQU XINOA«, t00=0x0065, t01=0x0126}
0x09ef8…09f10                Head {h00=0x0014, h01=0x0050, text=»XIALP EQU X:IALP«, t00=0x0065, t01=0x013e}
0x09f10…09f28                Head {h00=0x0014, h01=0x0050, text=»WWIALP EQU XIALP«, t00=0x0065, t01=0x0156}
0x09f28…09f40                Head {h00=0x0014, h01=0x0050, text=»XTDFD EQU X:TDFD«, t00=0x0065, t01=0x016e}
0x09f40…09f58                Head {h00=0x0014, h01=0x0050, text=»SSTDFD EQU XTDFD«, t00=0x0065, t01=0x0186}
0x09f58…09f70                Head {h00=0x0014, h01=0x0050, text=»XBBUF EQU X:BBUF«, t00=0x0066, t01=0x000e}
0x09f70…09f88                Head {h00=0x0014, h01=0x0050, text=»PBBUF EQU XBBUF «, t00=0x0066, t01=0x0026}
0x09f88…09fa0                Head {h00=0x0014, h01=0x0050, text=»XNBUF EQU X:NBUF«, t00=0x0066, t01=0x003e}
0x09fa0…09fb8                Head {h00=0x0014, h01=0x0050, text=»INBUF EQU XNBUF «, t00=0x0066, t01=0x0056}
0x09fb8…09fd0                Head {h00=0x0014, h01=0x0050, text=»XTBUF EQU X:TBUF«, t00=0x0066, t01=0x006e}
0x09fd0…09fe8                Head {h00=0x0014, h01=0x0050, text=»OUTBUF EQU XTBUF«, t00=0x0066, t01=0x0086}
0x09fe8…09ff6                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x0066, t01=0x009e}
0x09ff6…0a004                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0066, t01=0x00ac}
0x0a004…0a00c                Head {h00=0x0004, h01=0x0050, t00=0x0066, t01=0x00ba}
0x0a00c…0a05a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0066, t01=0x00c2}
0x0a05a…0a0a8                Head {h00=0x004a, h01=0x0050, text=»**                    INTERNAL EQUATES                              **«, t00=0x0066, t01=0x0110}
0x0a0a8…0a0f6                Head {h00=0x004a, h01=0x0050, text=»**                    (MUST NOT BE ALTERED BY THE USER)             **«, t00=0x0066, t01=0x015e}
0x0a0f6…0a144                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0067, t01=0x001c}
0x0a144…0a152                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0067, t01=0x006a}
0x0a152…0a15a                Head {h00=0x0004, h01=0x0050, t00=0x0067, t01=0x0078}
0x0a15a…0a18e                Head {h00=0x0030, h01=0x0050, text=»STKSIZ EQU 200 WSM STACK SIZE, NO. OF BYTES «, t00=0x0067, t01=0x0080}
0x0a18e…0a1ce                Head {h00=0x003c, h01=0x0050, text=»WWIWK1 EQU WWI:LO+WWIFCS OVERHEAD + FAST CHOISE SECTIONS«, t00=0x0067, t01=0x00b4}
0x0a1ce…0a20c                Head {h00=0x003a, h01=0x0050, text=»WWIWK2 EQU WWINUM+WWIALP NUMERIC + ALPHANUMERIC WWI:S «, t00=0x0067, t01=0x00f4}
0x0a20c…0a244                Head {h00=0x0034, h01=0x0050, text=»WWISIZ EQU WWIWK1+WWIWK2 TOTAL SIZE OF WWI AREA «, t00=0x0067, t01=0x0132}
0x0a244…0a276                Head {h00=0x002e, h01=0x0050, text=»TCSIZ1 EQU PB:BUF-TC:TID TCA + PAR. BLOCK «, t00=0x0067, t01=0x016a}
0x0a276…0a2b6                Head {h00=0x003c, h01=0x0050, text=»TCSIZ2 EQU PBBUF+INBUF PAR. BLOCK BUFFER + INPUT BUFFER «, t00=0x0068, t01=0x000c}
0x0a2b6…0a2d6                Head {h00=0x001c, h01=0x0050, text=»TCSIZ3 EQU OUTBUF+WWISIZ«, t00=0x0068, t01=0x004c}
0x0a2d6…0a2f0                Head {h00=0x0016, h01=0x0050, text=»TCSIZ4 EQU SSTDFD «, t00=0x0068, t01=0x006c}
0x0a2f0…0a31e                Head {h00=0x002a, h01=0x0050, text=»TCSIZ5 EQU TCSIZ4+STKSIZ DFD+SST+STACK«, t00=0x0068, t01=0x0086}
0x0a31e…0a356                Head {h00=0x0034, h01=0x0050, text=»TCSIZ6 EQU TCSIZ1+TCSIZ2 TCA+PBLOCK+PBLBUF+INBUF«, t00=0x0068, t01=0x00b4}
0x0a356…0a390                Head {h00=0x0036, h01=0x0050, text=»TCSIZ7 EQU TCSIZ3+TCSIZ5 OUTBUF+WWI+DFD+SST+STACK «, t00=0x0068, t01=0x00ec}
0x0a390…0a3c8                Head {h00=0x0034, h01=0x0050, text=»WRKSIZ EQU TCSIZ6+TCSIZ7 TOTAL SIZE OF WORK AREA«, t00=0x0068, t01=0x0126}
0x0a3c8…0a3fe                Head {h00=0x0032, h01=0x0050, text=»WWIFCL EQU 6 LEHGTH OF ONE FAST CHOISE SECT WI«, t00=0x0068, t01=0x015e}
0x0a3fe…0a438 (105, 0, 400)  Head {h00=0x0036, h01=0x0050, text=»MSGLIN EQU /02 BIT MASK WHEN MESSAGE LINE OVERLAPS«, t00=0x0069, t01=0x0004}
0x0a438…0a452                Head {h00=0x0016, h01=0x0050, text=»   ... OTHER LINE «, t00=0x0069, t01=0x003e}
0x0a452…0a484                Head {h00=0x002e, h01=0x0050, text=»VD82 EQU /08 BIT MASK WHEN VD82/83 IS USED«, t00=0x0069, t01=0x0058}
0x0a484…0a492                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x0069, t01=0x008a}
0x0a492…0a49a                Head {h00=0x0004, h01=0x0050, t00=0x0069, t01=0x0098}
0x0a49a…0a4b6                Head {h00=0x0018, h01=0x0050, text=»S:GTAB   EQU      * «, t00=0x0069, t01=0x00a0}
0x0a4b6…0a504                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0069, t01=0x00bc}
0x0a504…0a552                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0069, t01=0x010a}
0x0a552…0a5a0                Head {h00=0x004a, h01=0x0050, text=»**  S:GTAB            PROGRAM DESCRIPTOR FOR SYSLOD                 **«, t00=0x0069, t01=0x0158}
0x0a5a0…0a5ee                Head {h00=0x004a, h01=0x0050, text=»**                    (MUST NOT BE ALTERED BY THE USER)             **«, t00=0x006a, t01=0x0016}
0x0a5ee…0a63c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x006a, t01=0x0064}
0x0a63c…0a68a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x006a, t01=0x00b2}
0x0a68a…0a698                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x006a, t01=0x0100}
0x0a698…0a6a0                Head {h00=0x0004, h01=0x0050, t00=0x006a, t01=0x010e}
0x0a6a0…0a6d8                Head {h00=0x0034, h01=0x0050, text=»SGAPPT DATA APPSTA POINTER TO APPLICATION TABLE «, t00=0x006a, t01=0x0116}
0x0a6d8…0a710                Head {h00=0x0034, h01=0x0050, text=»SGPGMT DATA 'AS' PROGRAM TYPE ('AS' = ASSEMBLER)«, t00=0x006a, t01=0x014e}
0x0a710…0a72e                Head {h00=0x001a, h01=0x0050, text=» DATA 0,0,0,0 NOT USED«, t00=0x006a, t01=0x0186}
0x0a72e…0a762                Head {h00=0x0030, h01=0x0050, text=»APPSTA DATA W:INIT APPLICATION START ADDRESS«, t00=0x006b, t01=0x0014}
0x0a762…0a79c                Head {h00=0x0036, h01=0x0050, text=»APPERR DATA 0 APPL. ERROR HANDLING (0 = NOT USED) «, t00=0x006b, t01=0x0048}
0x0a79c…0a7b6                Head {h00=0x0016, h01=0x0050, text=»APPWRK DATA WRKSIZ«, t00=0x006b, t01=0x0082}
0x0a7b6…0a7c4                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006b, t01=0x009c}
0x0a7c4…0a7cc                Head {h00=0x0004, h01=0x0050, t00=0x006b, t01=0x00aa}
0x0a7cc…0a81a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x006b, t01=0x00b2}
0x0a81a…0a868                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x006b, t01=0x0100}
0x0a868…0a880                Head {h00=0x0014, h01=0x0050, text=»** SEE POINT 0. «, t00=0x006b, t01=0x014e}
0x0a880…0a88a                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x006b, t01=0x0166}
0x0a88a…0a8b2                Head {h00=0x0024, h01=0x0050, text=»** ADDRESS TO ROUTINE REWRITING «, t00=0x006b, t01=0x0170}
0x0a8b2…0a8e8                Head {h00=0x0032, h01=0x0050, text=»** OR ERASING ALL SUBSCREENS USED BY ONE TASK.«, t00=0x006c, t01=0x0008}
0x0a8e8…0a918                Head {h00=0x002c, h01=0x0050, text=»** ZERO IF INTERPRETER WITH FILE HANDLER«, t00=0x006c, t01=0x003e}
0x0a918…0a928                Head {h00=0x000c, h01=0x0050, text=»** ONLY.«, t00=0x006c, t01=0x006e}
0x0a928…0a976                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x006c, t01=0x007e}
0x0a976…0a9c4                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x006c, t01=0x00cc}
0x0a9c4…0a9cc                Head {h00=0x0004, h01=0x0050, t00=0x006c, t01=0x011a}
0x0a9cc…0a9e0                Head {h00=0x0010, h01=0x0050, text=» IFT WDSP=1 «, t00=0x006c, t01=0x0122}
0x0a9e0…0a9fa                Head {h00=0x0016, h01=0x0050, text=»W:DSPA DATA W:WDSP«, t00=0x006c, t01=0x0136}
0x0a9fa…0aa06                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x0150}
0x0aa06…0aa1a                Head {h00=0x0010, h01=0x0050, text=» IFF WDSP=1 «, t00=0x006c, t01=0x015c}
0x0aa1a…0aa30                Head {h00=0x0012, h01=0x0050, text=»W:DSPA DATA 0 «, t00=0x006c, t01=0x0170}
0x0aa30…0aa3c                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x0186}
0x0aa3c…0aa4a (109, 0, 400)  Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x006d, t01=0x0004}
0x0aa4a…0aa58                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006d, t01=0x0012}
0x0aa58…0aa60                Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0020}
0x0aa60…0aa68                Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0028}
0x0aa68…0aa70                Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0030}
0x0aa70…0aa78                Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0038}
0x0aa78…0aa80                Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0040}
0x0aa80…0aa88                Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0048}
0x0aa88…0aa90                Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0050}
0x0aa90…0aa98                Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0058}
0x0aa98…0aaa0                Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0060}
0x0aaa0…0aaa8                Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0068}
0x0aaa8…0aaf6                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x006d, t01=0x0070}
0x0aaf6…0ab44                Head {h00=0x004a, h01=0x0050, text=»**                    2. DEVICE PARAMETERS:                         **«, t00=0x006d, t01=0x00be}
0x0ab44…0ab92                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x006d, t01=0x010c}
0x0ab92…0aba0                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006d, t01=0x015a}
0x0aba0…0aba8                Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0168}
0x0aba8…0abf6                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x006d, t01=0x0170}
0x0abf6…0ac44                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x006e, t01=0x002e}
0x0ac44…0ac92                Head {h00=0x004a, h01=0x0050, text=»**                    DEVICE FILE-CODES                             **«, t00=0x006e, t01=0x007c}
0x0ac92…0ace0                Head {h00=0x004a, h01=0x0050, text=»**                    THESE CODES CAN BE ALTERED BY THE USER.       **«, t00=0x006e, t01=0x00ca}
0x0ace0…0acea                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x006e, t01=0x0118}
0x0acea…0acf2                Head {h00=0x0004, h01=0x0050, t00=0x006e, t01=0x0122}
0x0acf2…0ad16                Head {h00=0x0020, h01=0x0050, text=»X:KB EQU /20 KEY BOARD INPUT«, t00=0x006e, t01=0x012a}
0x0ad16…0ad46                Head {h00=0x002c, h01=0x0050, text=»X:BZFC EQU /4F KEY BOARD BUZZER (OUTPUT)«, t00=0x006e, t01=0x014e}
0x0ad46…0ad60                Head {h00=0x0016, h01=0x0050, text=»   DISPLAY OUTPUT:«, t00=0x006e, t01=0x017e}
0x0ad60…0ad84                Head {h00=0x0020, h01=0x0050, text=»X:DYFC EQU /58   SYSTEM LINE«, t00=0x006f, t01=0x0008}
0x0ad84…0adaa                Head {h00=0x0022, h01=0x0050, text=»X:DYFD EQU /50   SCREEN OR ...«, t00=0x006f, t01=0x002c}
0x0adaa…0adca                Head {h00=0x001c, h01=0x0050, text=»     1ST LOGICAL SCREEN «, t00=0x006f, t01=0x0052}
0x0adca…0adf0                Head {h00=0x0022, h01=0x0050, text=»X:ICFC EQU /D0 INTERTASK INPUT«, t00=0x006f, t01=0x0072}
0x0adf0…0ae18                Head {h00=0x0024, h01=0x0050, text=»X:ICFD EQU /D1 INTERTASK OUTPUT «, t00=0x006f, t01=0x0098}
0x0ae18…0ae20                Head {h00=0x0004, h01=0x0050, t00=0x006f, t01=0x00c0}
0x0ae20…0ae2a                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x006f, t01=0x00c8}
0x0ae2a…0ae6c                Head {h00=0x003e, h01=0x0050, text=»** NOTE: KB BUZZER FILE CODE = 0 => SCREEN BUZZER IS USED.«, t00=0x006f, t01=0x00d2}
0x0ae6c…0aeb8                Head {h00=0x0048, h01=0x0050, text=»**       OTHER BUZZER FILE CODE  => KB BUZZER IS USED WITH THE HELP «, t00=0x006f, t01=0x0114}
0x0aeb8…0af02                Head {h00=0x0046, h01=0x0050, text=»**                                  OF DRDI01 AND THIS FILE CODE. «, t00=0x006f, t01=0x0160}
0x0af02…0af4e                Head {h00=0x0048, h01=0x0050, text=»**                                  IF KEYBOARD BUZZER REQUESTS FAIL«, t00=0x0070, t01=0x001a}
0x0af4e…0af96                Head {h00=0x0044, h01=0x0050, text=»**                                  THE SCREEN BUZZER IS TRIED. «, t00=0x0070, t01=0x0066}
0x0af96…0afe6                Head {h00=0x004c, h01=0x0050, text=»**       DRKB04 USES THE KB BUZZER IF A KB WITH BUZZER IS USED. ON OTHER«, t00=0x0070, t01=0x00ae}
0x0afe6…0b036                Head {h00=0x004c, h01=0x0050, text=»**       KB:S THE DISPLAY BUZZER IS TRIED.     ( WITHOUT USING DRDI01! )«, t00=0x0070, t01=0x00fe}
0x0b036…0b040                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0070, t01=0x014e}
0x0b040…0b088                Head {h00=0x0044, h01=0x0050, text=»** NOTE: SYSTEM LINE FILE CODE HAS RELEVANCE ONLY ON VD82/83:S. «, t00=0x0070, t01=0x0158}
0x0b088…0b0c8                Head {h00=0x003c, h01=0x0050, text=»**       ON OTHER DISPLAYS THE LAST SCREEN LINE IS USED.«, t00=0x0071, t01=0x0010}
0x0b0c8…0b0d2                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0071, t01=0x0050}
0x0b0d2…0b11a                Head {h00=0x0044, h01=0x0050, text=»** NOTE: LOGICAL SCREENS ON VD82/83:S SHOULD HAVE FILE CODES IN «, t00=0x0071, t01=0x005a}
0x0b11a…0b15a                Head {h00=0x003c, h01=0x0050, text=»**       SEQUENCE STARTING WITH THE ONE SPECIFIED ABOVE.«, t00=0x0071, t01=0x00a2}
0x0b15a…0b164                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0071, t01=0x00e2}
0x0b164…0b1b2                Head {h00=0x004a, h01=0x0050, text=»** NOTE: PRINTER FILE CODE IS INPUT FROM THE APPLICATION AT RUN-TIME !«, t00=0x0071, t01=0x00ec}
0x0b1b2…0b1ea                Head {h00=0x0034, h01=0x0050, text=»**       (SEE WSM PARAMETER BLOCK DESCRIPTION). «, t00=0x0071, t01=0x013a}
0x0b1ea…0b238                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0071, t01=0x0172}
0x0b238…0b286                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0072, t01=0x0030}
0x0b286…0b28e                Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x007e}
0x0b28e…0b2dc                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0072, t01=0x0086}
0x0b2dc…0b32a                Head {h00=0x004a, h01=0x0050, text=»**                    EQUATES FOR WSMGEN                            **«, t00=0x0072, t01=0x00d4}
0x0b32a…0b378                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x0072, t01=0x0122}
0x0b378…0b3c6                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0072, t01=0x0170}
0x0b3c6…0b3d4                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0073, t01=0x002e}
0x0b3d4…0b3e8                Head {h00=0x0010, h01=0x0050, text=»KB EQU X:KB «, t00=0x0073, t01=0x003c}
0x0b3e8…0b3fc                Head {h00=0x0010, h01=0x0050, text=»W:BZFC EQU *«, t00=0x0073, t01=0x0050}
0x0b3fc…0b42a                Head {h00=0x002a, h01=0x0050, text=» DATA X:BZFC KEY BOARD BUZZER (OUTPUT)«, t00=0x0073, t01=0x0064}
0x0b42a…0b438                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0073, t01=0x0092}
0x0b438…0b450                Head {h00=0x0014, h01=0x0050, text=»XDYFC EQU X:DYFC«, t00=0x0073, t01=0x00a0}
0x0b450…0b468                Head {h00=0x0014, h01=0x0050, text=»XDYFD EQU X:DYFD«, t00=0x0073, t01=0x00b8}
0x0b468…0b48c                Head {h00=0x0020, h01=0x0050, text=»   - LEFT BYTE = SYSTEM LINE«, t00=0x0073, t01=0x00d0}
0x0b48c…0b4a0                Head {h00=0x0010, h01=0x0050, text=»W:DYFC EQU *«, t00=0x0073, t01=0x00f4}
0x0b4a0…0b4ca                Head {h00=0x0026, h01=0x0050, text=» BYTE2 XDYFC,XDYFD DISPLAY OUTPUT:«, t00=0x0073, t01=0x0108}
0x0b4ca…0b4d8                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0073, t01=0x0132}
0x0b4d8…0b500                Head {h00=0x0024, h01=0x0050, text=»   - RIGHT BYTE = SCREEN OR ... «, t00=0x0073, t01=0x0140}
0x0b500…0b52e                Head {h00=0x002a, h01=0x0050, text=»   -              1:ST LOGICAL SCREEN «, t00=0x0073, t01=0x0168}
0x0b52e…0b546                Head {h00=0x0014, h01=0x0050, text=»XICFC EQU X:ICFC«, t00=0x0074, t01=0x0008}
0x0b546…0b55e                Head {h00=0x0014, h01=0x0050, text=»XICFD EQU X:ICFD«, t00=0x0074, t01=0x0020}
0x0b55e…0b57e                Head {h00=0x001c, h01=0x0050, text=»W:ICFC BYTE2 XICFC,XICFD«, t00=0x0074, t01=0x0038}
0x0b57e…0b58c                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x0074, t01=0x0058}
0x0b58c…0b594                Head {h00=0x0004, h01=0x0050, t00=0x0074, t01=0x0066}
0x0b594…0b5a2                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0074, t01=0x006e}
0x0b5a2…0b5aa                Head {h00=0x0004, h01=0x0050, t00=0x0074, t01=0x007c}
0x0b5aa…0b5f8                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0074, t01=0x0084}
0x0b5f8…0b646                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0074, t01=0x00d2}
0x0b646…0b694                Head {h00=0x004a, h01=0x0050, text=»**                    CURSOR MODE.                                  **«, t00=0x0074, t01=0x0120}
0x0b694…0b6e2                Head {h00=0x004a, h01=0x0050, text=»**                    THIS WORD DEFINES THE LAYOUT OF THE CURSOR    **«, t00=0x0074, t01=0x016e}
0x0b6e2…0b730                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0075, t01=0x002c}
0x0b730…0b738                Head {h00=0x0004, h01=0x0050, t00=0x0075, t01=0x007a}
0x0b738…0b764                Head {h00=0x0028, h01=0x0050, text=»   1 & 3 => INVERSED BLOCK, BLINKING«, t00=0x0075, t01=0x0082}
0x0b764…0b78e                Head {h00=0x0026, h01=0x0050, text=»   2     => INVERSED BLOCK, STEADY«, t00=0x0075, t01=0x00ae}
0x0b78e…0b7b4                Head {h00=0x0022, h01=0x0050, text=»   4     => UNDERLINE, STEADY «, t00=0x0075, t01=0x00d8}
0x0b7b4…0b7dc                Head {h00=0x0024, h01=0x0050, text=»   5     => UNDERLINE, BLINKING «, t00=0x0075, t01=0x00fe}
0x0b7dc…0b7fa                Head {h00=0x001a, h01=0x0050, text=»   6     => INVISIBLE «, t00=0x0075, t01=0x0126}
0x0b7fa…0b80e                Head {h00=0x0010, h01=0x0050, text=»X:CUMO EQU 2«, t00=0x0075, t01=0x0144}
0x0b80e…0b816                Head {h00=0x0004, h01=0x0050, t00=0x0075, t01=0x0158}
0x0b816…0b864                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0075, t01=0x0160}
0x0b864…0b8b2                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0076, t01=0x001e}
0x0b8b2…0b8ba                Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x006c}
0x0b8ba…0b908                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0076, t01=0x0074}
0x0b908…0b956                Head {h00=0x004a, h01=0x0050, text=»**                    EQUATES FOR WSMGEN                            **«, t00=0x0076, t01=0x00c2}
0x0b956…0b9a4                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x0076, t01=0x0110}
0x0b9a4…0b9f2                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0076, t01=0x015e}
0x0b9f2…0ba00                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0077, t01=0x001c}
0x0ba00…0ba18                Head {h00=0x0014, h01=0x0050, text=»XCUMO EQU X:CUMO«, t00=0x0077, t01=0x002a}
0x0ba18…0ba20                Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x0042}
0x0ba20…0ba34                Head {h00=0x0010, h01=0x0050, text=»W:CUMO EQU *«, t00=0x0077, t01=0x004a}
0x0ba34…0ba48                Head {h00=0x0010, h01=0x0050, text=» DATA XCUMO «, t00=0x0077, t01=0x005e}
0x0ba48…0ba56                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0077, t01=0x0072}
0x0ba56…0ba5e                Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x0080}
0x0ba5e…0baac                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0077, t01=0x0088}
0x0baac…0bafa                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0077, t01=0x00d6}
0x0bafa…0bb48                Head {h00=0x004a, h01=0x0050, text=»**                    FILLER ECHO CHARACTER.                        **«, t00=0x0077, t01=0x0124}
0x0bb48…0bb96                Head {h00=0x004a, h01=0x0050, text=»**                    THIS CHARACTER WILL BE ECHOED INSTEAD OF      **«, t00=0x0077, t01=0x0172}
0x0bb96…0bbe4                Head {h00=0x004a, h01=0x0050, text=»**                    INPUT CHAR. WHEN PICTURE CODE "*" IS USED     **«, t00=0x0078, t01=0x0030}
0x0bbe4…0bc32                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0078, t01=0x007e}
0x0bc32…0bc3a                Head {h00=0x0004, h01=0x0050, t00=0x0078, t01=0x00cc}
0x0bc3a…0bc50                Head {h00=0x0012, h01=0x0050, text=»X:ECHO EQU '*'«, t00=0x0078, t01=0x00d4}
0x0bc50…0bc58                Head {h00=0x0004, h01=0x0050, t00=0x0078, t01=0x00ea}
0x0bc58…0bca6                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0078, t01=0x00f2}
0x0bca6…0bcf4                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0078, t01=0x0140}
0x0bcf4…0bcfc                Head {h00=0x0004, h01=0x0050, t00=0x0078, t01=0x018e}
0x0bcfc…0bd4a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0079, t01=0x0008}
0x0bd4a…0bd98                Head {h00=0x004a, h01=0x0050, text=»**                    EQUATES FOR WSMGEN                            **«, t00=0x0079, t01=0x0056}
0x0bd98…0bde6                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x0079, t01=0x00a4}
0x0bde6…0be34                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0079, t01=0x00f2}
0x0be34…0be42                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0079, t01=0x0140}
0x0be42…0be5a                Head {h00=0x0014, h01=0x0050, text=»XECHO EQU X:ECHO«, t00=0x0079, t01=0x014e}
0x0be5a…0be7a                Head {h00=0x001c, h01=0x0050, text=»W:ECHO BYTE2 XECHO,XECHO«, t00=0x0079, t01=0x0166}
0x0be7a…0be88                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x0079, t01=0x0186}
0x0be88…0be90 (122, 0, 400)  Head {h00=0x0004, h01=0x0050, t00=0x007a, t01=0x0004}
0x0be90…0be9e                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007a, t01=0x000c}
0x0be9e…0beec                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x007a, t01=0x001a}
0x0beec…0bf3a                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x007a, t01=0x0068}
0x0bf3a…0bf88                Head {h00=0x004a, h01=0x0050, text=»**                    ONE OR TWO MESSAGE LINES.                     **«, t00=0x007a, t01=0x00b6}
0x0bf88…0bfd6                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x007a, t01=0x0104}
0x0bfd6…0c000                Head {h00=0x0026, h01=0x0050, text=»**   ONE MESSAGE LINE IS DEFAULT. «, t00=0x007a, t01=0x0152}
0x0c000…0c046                Head {h00=0x0042, h01=0x0050, text=»**   IT IS POSSIBLE TO USE TWO MESSAGE LINES. WHEN DOING THIS «, t00=0x007a, t01=0x017c}
0x0c046…0c08a                Head {h00=0x0040, h01=0x0050, text=»**   THEY ARE REFERRED TO AS THE HELP AND THE ERROR LINE AND«, t00=0x007b, t01=0x0032}
0x0c08a…0c0b6                Head {h00=0x0028, h01=0x0050, text=»**   CONTAIN THE FOLLOWING MESSAGES:«, t00=0x007b, t01=0x0076}
0x0c0b6…0c0c0                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x007b, t01=0x00a2}
0x0c0c0…0c0da                Head {h00=0x0016, h01=0x0050, text=»**  -THE HELP LINE«, t00=0x007b, t01=0x00ac}
0x0c0da…0c11e                Head {h00=0x0040, h01=0x0050, text=»**       EXTENDED PROMPT MESSAGES, GUIDING MESSAGES (HELP) ,«, t00=0x007b, t01=0x00c6}
0x0c11e…0c150                Head {h00=0x002e, h01=0x0050, text=»**       SECTION/FUNCTION INPUT AND WMSG. «, t00=0x007b, t01=0x010a}
0x0c150…0c15a                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x007b, t01=0x013c}
0x0c15a…0c176                Head {h00=0x0018, h01=0x0050, text=»**  -THE ERROR LINE «, t00=0x007b, t01=0x0146}
0x0c176…0c1bc                Head {h00=0x0042, h01=0x0050, text=»**       ERRORS (MUST ENTER,MUST FILL AND VALIDATION ERRORS), «, t00=0x007b, t01=0x0162}
0x0c1bc…0c200                Head {h00=0x0040, h01=0x0050, text=»**       WMSG,SECTION ON MESSAGE LINE AND WSM BASIC ERRORS. «, t00=0x007c, t01=0x0018}
0x0c200…0c20a                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x007c, t01=0x005c}
0x0c20a…0c24c                Head {h00=0x003e, h01=0x0050, text=»**   IF TWO MESSAGELINES ARE USED THEN SET THE BITS BELOW «, t00=0x007c, t01=0x0066}
0x0c24c…0c286                Head {h00=0x0036, h01=0x0050, text=»**   FOR VD 82/83 AND/OR OTHER VDU:S RESPECTIVELY «, t00=0x007c, t01=0x00a8}
0x0c286…0c2c2                Head {h00=0x0038, h01=0x0050, text=»**   IF ONE MESSAGELINE IS USED KEEP DEFAULT VALUES.«, t00=0x007c, t01=0x00e2}
0x0c2c2…0c310                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x007c, t01=0x011e}
0x0c310…0c35e                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x007c, t01=0x016c}
0x0c35e…0c3ac                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x007d, t01=0x002a}
0x0c3ac…0c3ba                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007d, t01=0x0078}
0x0c3ba…0c408                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x007d, t01=0x0086}
0x0c408…0c456                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x007d, t01=0x00d4}
0x0c456…0c4a4                Head {h00=0x004a, h01=0x0050, text=»**                    VD 82/83                                      **«, t00=0x007d, t01=0x0122}
0x0c4a4…0c4f2                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x007d, t01=0x0170}
0x0c4f2…0c4fc                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x007e, t01=0x002e}
0x0c4fc…0c504                Head {h00=0x0004, h01=0x0050, t00=0x007e, t01=0x0038}
0x0c504…0c50c                Head {h00=0x0004, h01=0x0050, t00=0x007e, t01=0x0040}
0x0c50c…0c538                Head {h00=0x0028, h01=0x0050, text=»X:MES1 EQU 0 ONE OR TWO MESSAGELINES«, t00=0x007e, t01=0x0048}
0x0c538…0c578                Head {h00=0x003c, h01=0x0050, text=»X:MES2 EQU 0 IMMEDIATE OR DELAYED ERASE OF ERRORMESSAGE «, t00=0x007e, t01=0x0074}
0x0c578…0c580                Head {h00=0x0004, h01=0x0050, t00=0x007e, t01=0x00b4}
0x0c580…0c58a                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x007e, t01=0x00bc}
0x0c58a…0c5aa                Head {h00=0x001c, h01=0x0050, text=»**   TWO MESSAGE LINES: «, t00=0x007e, t01=0x00c6}
0x0c5aa…0c5b4                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x007e, t01=0x00e6}
0x0c5b4…0c5de                Head {h00=0x0026, h01=0x0050, text=»**   SET THE FOLLOWING BITS ABOVE:«, t00=0x007e, t01=0x00f0}
0x0c5de…0c5e8                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x007e, t01=0x011a}
0x0c5e8…0c61e                Head {h00=0x0032, h01=0x0050, text=»**   X:MES1=0        INDICATES ONE MESSAGELINE«, t00=0x007e, t01=0x0124}
0x0c61e…0c656                Head {h00=0x0034, h01=0x0050, text=»**   X:MES1=1        INDICATES TWO MESSAGE LINES«, t00=0x007e, t01=0x015a}
0x0c656…0c69a (127, 0, 400)  Head {h00=0x0040, h01=0x0050, text=»**   X:MES2=0        INDICATES THAT ERRORMESSAGES ARE ERASED«, t00=0x007f, t01=0x0004}
0x0c69a…0c6d6                Head {h00=0x0038, h01=0x0050, text=»**                   WHEN ACKNOWLEDGING THE MESSAGE «, t00=0x007f, t01=0x0048}
0x0c6d6…0c71a                Head {h00=0x0040, h01=0x0050, text=»**   X:MES2=1        INDICATES THAT ERRORMESSAGES ARE ERASED«, t00=0x007f, t01=0x0084}
0x0c71a…0c766                Head {h00=0x0048, h01=0x0050, text=»**                   AFTER CORRECTION OF THE ERROR (DELAYED ERASE). «, t00=0x007f, t01=0x00c8}
0x0c766…0c7a8                Head {h00=0x003e, h01=0x0050, text=»**   X:HLFC          SHALL CONTAIN THE SUBSCREEN FILECODE «, t00=0x007f, t01=0x0114}
0x0c7a8…0c7ea                Head {h00=0x003e, h01=0x0050, text=»**                   OF THE HELP LINE. THE FILECODE OF THE«, t00=0x007f, t01=0x0156}
0x0c7ea…0c830                Head {h00=0x0042, h01=0x0050, text=»**                   ERROR LINE IS ALWAYS = /58 (SYSTEM LINE).«, t00=0x0080, t01=0x0008}
0x0c830…0c83a                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0080, t01=0x004e}
0x0c83a…0c888                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0080, t01=0x0058}
0x0c888…0c8d6                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0080, t01=0x00a6}
0x0c8d6…0c924                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0080, t01=0x00f4}
0x0c924…0c92c                Head {h00=0x0004, h01=0x0050, t00=0x0080, t01=0x0142}
0x0c92c…0c97a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0080, t01=0x014a}
0x0c97a…0c9c8                Head {h00=0x004a, h01=0x0050, text=»**                    EQUATES FOR WSMGEN                            **«, t00=0x0081, t01=0x0008}
0x0c9c8…0ca16                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x0081, t01=0x0056}
0x0ca16…0ca64                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0081, t01=0x00a4}
0x0ca64…0ca72                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0081, t01=0x00f2}
0x0ca72…0ca88                Head {h00=0x0012, h01=0x0050, text=» IFT X:MES1=0 «, t00=0x0081, t01=0x0100}
0x0ca88…0cace                Head {h00=0x0042, h01=0x0050, text=»X:HLFC EQU 0 HELPLINE FILECODE IRRELEVANT WHEN ONE MESSAGELINE«, t00=0x0081, t01=0x0116}
0x0cace…0cada                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x015c}
0x0cada…0cae8                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0081, t01=0x0168}
0x0cae8…0cafe                Head {h00=0x0012, h01=0x0050, text=» IFT X:MES1=1 «, t00=0x0081, t01=0x0176}
0x0cafe…0cb34                Head {h00=0x0032, h01=0x0050, text=»X:HLFC EQU /57 HELPLINE FILECODE DEFAULT =/57 «, t00=0x0081, t01=0x018c}
0x0cb34…0cb40                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x0032}
0x0cb40…0cb4e                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0082, t01=0x003e}
0x0cb4e…0cb68                Head {h00=0x0016, h01=0x0050, text=»XMESS1 EQU X:MES1 «, t00=0x0082, t01=0x004c}
0x0cb68…0cb82                Head {h00=0x0016, h01=0x0050, text=»XMESS2 EQU X:MES2 «, t00=0x0082, t01=0x0066}
0x0cb82…0cb9c                Head {h00=0x0016, h01=0x0050, text=»XHLPFC EQU X:HLFC «, t00=0x0082, t01=0x0080}
0x0cb9c…0cbba                Head {h00=0x001a, h01=0x0050, text=»BYTMES FORM 1,1,6=0,8 «, t00=0x0082, t01=0x009a}
0x0cbba…0cbe4                Head {h00=0x0026, h01=0x0050, text=»W:MESS BYTMES XMESS1,XMESS2,XHLPFC«, t00=0x0082, t01=0x00b8}
0x0cbe4…0cbf2                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x0082, t01=0x00e2}
0x0cbf2…0cc00                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0082, t01=0x00f0}
0x0cc00…0cc4e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0082, t01=0x00fe}
0x0cc4e…0cc9c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0082, t01=0x014c}
0x0cc9c…0ccea                Head {h00=0x004a, h01=0x0050, text=»**                    OTHER VDU:S THAN VD82/83                      **«, t00=0x0083, t01=0x000a}
0x0ccea…0cd38                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0083, t01=0x0058}
0x0cd38…0cd42                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0083, t01=0x00a6}
0x0cd42…0cd4a                Head {h00=0x0004, h01=0x0050, t00=0x0083, t01=0x00b0}
0x0cd4a…0cd76                Head {h00=0x0028, h01=0x0050, text=»X:MEG1 EQU 0 ONE OR TWO MESSAGELINES«, t00=0x0083, t01=0x00b8}
0x0cd76…0cdb4                Head {h00=0x003a, h01=0x0050, text=»X:MEG2 EQU 0 IMMEDIATE OR DELAYED ERASE OF ERROMESSAGE«, t00=0x0083, t01=0x00e4}
0x0cdb4…0ce00                Head {h00=0x0048, h01=0x0050, text=»X:MEG3 EQU 0 ORDER BETWEEN ERROR- AND HELPLINE ON THE LAST TWO LINES«, t00=0x0083, t01=0x0122}
0x0ce00…0ce08                Head {h00=0x0004, h01=0x0050, t00=0x0083, t01=0x016e}
0x0ce08…0ce10                Head {h00=0x0004, h01=0x0050, t00=0x0083, t01=0x0176}
0x0ce10…0ce1a                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0083, t01=0x017e}
0x0ce1a…0ce3a                Head {h00=0x001c, h01=0x0050, text=»**   TWO MESSAGE LINES: «, t00=0x0083, t01=0x0188}
0x0ce3a…0ce44                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0084, t01=0x0018}
0x0ce44…0ce6e                Head {h00=0x0026, h01=0x0050, text=»**   SET THE FOLLOWING BITS ABOVE:«, t00=0x0084, t01=0x0022}
0x0ce6e…0ce78                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0084, t01=0x004c}
0x0ce78…0ceae                Head {h00=0x0032, h01=0x0050, text=»**   X:MEG1=0       INDICATES ONE MESSGAELINE «, t00=0x0084, t01=0x0056}
0x0ceae…0cee4                Head {h00=0x0032, h01=0x0050, text=»**   X:MEG1=1       INDICATES TWO MESSAGELINES«, t00=0x0084, t01=0x008c}
0x0cee4…0cf2c                Head {h00=0x0044, h01=0x0050, text=»**   X:MEG2=0       INDICATES THAT ERRORMESSAGES ARE ERASED WHEN«, t00=0x0084, t01=0x00c2}
0x0cf2c…0cf62                Head {h00=0x0032, h01=0x0050, text=»**                  ACKNOWLEDGING THE MESSAGE «, t00=0x0084, t01=0x010a}
0x0cf62…0cfac                Head {h00=0x0046, h01=0x0050, text=»**   X:MEG2=1       INDICATES THAT ERRORMESSAGES ARE ERASED AFTER «, t00=0x0084, t01=0x0140}
0x0cfac…0cff0                Head {h00=0x0040, h01=0x0050, text=»**                  CORRECTION OF THE ERROR (DELAYED ERASE) «, t00=0x0084, t01=0x018a}
0x0cff0…0d02a                Head {h00=0x0036, h01=0x0050, text=»**   X:MEG3=0       LAST LINE BUT ONE = ERRORLINE,«, t00=0x0085, t01=0x003e}
0x0d02a…0d05c                Head {h00=0x002e, h01=0x0050, text=»**                  LAST LINE = HELPLINE. «, t00=0x0085, t01=0x0078}
0x0d05c…0d096                Head {h00=0x0036, h01=0x0050, text=»**   X:MEG3=1       LAST LINE BUT ONE = HELPLINE, «, t00=0x0085, t01=0x00aa}
0x0d096…0d0c8                Head {h00=0x002e, h01=0x0050, text=»**                  LAST LINE = ERRORLINE.«, t00=0x0085, t01=0x00e4}
0x0d0c8…0d0d2                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0085, t01=0x0116}
0x0d0d2…0d120                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0085, t01=0x0120}
0x0d120…0d16e                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0085, t01=0x016e}
0x0d16e…0d1bc                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0086, t01=0x002c}
0x0d1bc…0d1c4                Head {h00=0x0004, h01=0x0050, t00=0x0086, t01=0x007a}
0x0d1c4…0d212                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0086, t01=0x0082}
0x0d212…0d260                Head {h00=0x004a, h01=0x0050, text=»**                    EQUATES FOR WSMGEN                            **«, t00=0x0086, t01=0x00d0}
0x0d260…0d2ae                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x0086, t01=0x011e}
0x0d2ae…0d2fc                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0086, t01=0x016c}
0x0d2fc…0d30a                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0087, t01=0x002a}
0x0d30a…0d324                Head {h00=0x0016, h01=0x0050, text=»XMESG1 EQU X:MEG1 «, t00=0x0087, t01=0x0038}
0x0d324…0d33e                Head {h00=0x0016, h01=0x0050, text=»XMESG2 EQU X:MEG2 «, t00=0x0087, t01=0x0052}
0x0d33e…0d358                Head {h00=0x0016, h01=0x0050, text=»XMESG3 EQU X:MEG3 «, t00=0x0087, t01=0x006c}
0x0d358…0d376                Head {h00=0x001a, h01=0x0050, text=»BYTMEG FORM 1,1,13=0,1«, t00=0x0087, t01=0x0086}
0x0d376…0d3a0                Head {h00=0x0026, h01=0x0050, text=»W:MESG BYTMEG XMESG1,XMESG2,XMESG3«, t00=0x0087, t01=0x00a4}
0x0d3a0…0d3ae                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x0087, t01=0x00ce}
0x0d3ae…0d3bc                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0087, t01=0x00dc}
0x0d3bc…0d3c4                Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x00ea}
0x0d3c4…0d3cc                Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x00f2}
0x0d3cc…0d3d4                Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x00fa}
0x0d3d4…0d3dc                Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x0102}
0x0d3dc…0d3e4                Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x010a}
0x0d3e4…0d3ec                Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x0112}
0x0d3ec…0d3f4                Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x011a}
0x0d3f4…0d3fc                Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x0122}
0x0d3fc…0d404                Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x012a}
0x0d404…0d40c                Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x0132}
0x0d40c…0d45a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0087, t01=0x013a}
0x0d45a…0d4a8                Head {h00=0x004a, h01=0x0050, text=»**                    3. DEFINITION OF KEY CODES AND KEY TABLES:    **«, t00=0x0087, t01=0x0188}
0x0d4a8…0d4f6                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0088, t01=0x0046}
0x0d4f6…0d50a                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x0088, t01=0x0094}
0x0d50a…0d518                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0088, t01=0x00a8}
0x0d518…0d520                Head {h00=0x0004, h01=0x0050, t00=0x0088, t01=0x00b6}
0x0d520…0d56e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0088, t01=0x00be}
0x0d56e…0d5bc                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0088, t01=0x010c}
0x0d5bc…0d60a                Head {h00=0x004a, h01=0x0050, text=»**                    KEYS HANDLED IN THE WSM INTERPRETER.          **«, t00=0x0088, t01=0x015a}
0x0d60a…0d658                Head {h00=0x004a, h01=0x0050, text=»**                    THESE KEY CODES MIGHT BE ALTERED BY THE USER  **«, t00=0x0089, t01=0x0018}
0x0d658…0d6a6                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0089, t01=0x0066}
0x0d6a6…0d6ae                Head {h00=0x0004, h01=0x0050, t00=0x0089, t01=0x00b4}
0x0d6ae…0d6ba                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x00bc}
0x0d6ba…0d6d0                Head {h00=0x0012, h01=0x0050, text=»NOKEY EQU /EE «, t00=0x0089, t01=0x00c8}
0x0d6d0…0d6e4                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x0089, t01=0x00de}
0x0d6e4…0d704                Head {h00=0x001c, h01=0x0050, text=»CLR EQU /8F CLEAR/RECALL«, t00=0x0089, t01=0x00f2}
0x0d704…0d72a                Head {h00=0x0022, h01=0x0050, text=»TFD EQU /8C TABULATION FORWARD«, t00=0x0089, t01=0x0112}
0x0d72a…0d752                Head {h00=0x0024, h01=0x0050, text=»TBD EQU /8B TABULATION BACKWARD «, t00=0x0089, t01=0x0138}
0x0d752…0d774                Head {h00=0x001e, h01=0x0050, text=»CR EQU /0D CARRIAGE RETURN«, t00=0x0089, t01=0x0160}
0x0d774…0d78c                Head {h00=0x0014, h01=0x0050, text=»HLP EQU /94 HELP«, t00=0x0089, t01=0x0182}
0x0d78c…0d7a6                Head {h00=0x0016, h01=0x0050, text=»ENT EQU /80 ENTER «, t00=0x008a, t01=0x000a}
0x0d7a6…0d7c0                Head {h00=0x0016, h01=0x0050, text=»CAN EQU /91 CANCEL«, t00=0x008a, t01=0x0024}
0x0d7c0…0d7da                Head {h00=0x0016, h01=0x0050, text=»PRT EQU /98 PRINT «, t00=0x008a, t01=0x003e}
0x0d7da…0d7f6                Head {h00=0x0018, h01=0x0050, text=»SEC EQU /8E SECTION «, t00=0x008a, t01=0x0058}
0x0d7f6…0d81c                Head {h00=0x0022, h01=0x0050, text=»OV EQU /8D OVERRIDE VALIDATION«, t00=0x008a, t01=0x0074}
0x0d81c…0d83a                Head {h00=0x001a, h01=0x0050, text=»DUP EQU /90 DUPLICATE «, t00=0x008a, t01=0x009a}
0x0d83a…0d862                Head {h00=0x0024, h01=0x0050, text=»ASD EQU /92 AUTO SKIP/DUP/BYPASS«, t00=0x008a, t01=0x00b8}
0x0d862…0d888                Head {h00=0x0022, h01=0x0050, text=»FUN EQU /93 FUNCTION SELECTION«, t00=0x008a, t01=0x00e0}
0x0d888…0d8ae                Head {h00=0x0022, h01=0x0050, text=»TUP EQU /88 TABULATION UPWARD «, t00=0x008a, t01=0x0106}
0x0d8ae…0d8d6                Head {h00=0x0024, h01=0x0050, text=»TDW EQU /82 TABULATION DOWNWARD «, t00=0x008a, t01=0x012c}
0x0d8d6…0d8de                Head {h00=0x0004, h01=0x0050, t00=0x008a, t01=0x0154}
0x0d8de…0d92c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x008a, t01=0x015c}
0x0d92c…0d97a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x008b, t01=0x001a}
0x0d97a…0d988                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008b, t01=0x0068}
0x0d988…0d990                Head {h00=0x0004, h01=0x0050, t00=0x008b, t01=0x0076}
0x0d990…0d9de                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x008b, t01=0x007e}
0x0d9de…0da2c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x008b, t01=0x00cc}
0x0da2c…0da7a                Head {h00=0x004a, h01=0x0050, text=»**                    KEYS THAT ARE NOT YET HANDLED IN THE WSM      **«, t00=0x008b, t01=0x011a}
0x0da7a…0dac8                Head {h00=0x004a, h01=0x0050, text=»**                    INTERPRETER. WHEN IMPLEMENTED THESE KEYS      **«, t00=0x008b, t01=0x0168}
0x0dac8…0db16                Head {h00=0x004a, h01=0x0050, text=»**                    WILL ALSO BE POSSIBLE TO ALTER.               **«, t00=0x008c, t01=0x0026}
0x0db16…0db64                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x008c, t01=0x0074}
0x0db64…0db6c                Head {h00=0x0004, h01=0x0050, t00=0x008c, t01=0x00c2}
0x0db6c…0db92                Head {h00=0x0022, h01=0x0050, text=»ARI EQU NOKEY ARITHMETICS  /??«, t00=0x008c, t01=0x00ca}
0x0db92…0dbb2                Head {h00=0x001c, h01=0x0050, text=»LIN EQU NOKEY LINE  /81 «, t00=0x008c, t01=0x00f0}
0x0dbb2…0dbba                Head {h00=0x0004, h01=0x0050, t00=0x008c, t01=0x0110}
0x0dbba…0dc08                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x008c, t01=0x0118}
0x0dc08…0dc56                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x008c, t01=0x0166}
0x0dc56…0dc64                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008d, t01=0x0024}
0x0dc64…0dc6c                Head {h00=0x0004, h01=0x0050, t00=0x008d, t01=0x0032}
0x0dc6c…0dcba                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x008d, t01=0x003a}
0x0dcba…0dd08                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x008d, t01=0x0088}
0x0dd08…0dd56                Head {h00=0x004a, h01=0x0050, text=»**                    INFORMATION ON KEYS HANDLED IN DRKB04         **«, t00=0x008d, t01=0x00d6}
0x0dd56…0dda4                Head {h00=0x004a, h01=0x0050, text=»**                    NOTE: THESE CODES ARE REQUIRED BY DRKB04.     **«, t00=0x008d, t01=0x0124}
0x0dda4…0ddf2                Head {h00=0x004a, h01=0x0050, text=»**                    .     *****           ********                **«, t00=0x008d, t01=0x0172}
0x0ddf2…0de40                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x008e, t01=0x0030}
0x0de40…0de48                Head {h00=0x0004, h01=0x0050, t00=0x008e, t01=0x007e}
0x0de48…0de62                Head {h00=0x0016, h01=0x0050, text=»INS EQU /0F INSERT«, t00=0x008e, t01=0x0086}
0x0de62…0de7c                Head {h00=0x0016, h01=0x0050, text=»DEL EQU /0E DELETE«, t00=0x008e, t01=0x00a0}
0x0de7c…0de9e                Head {h00=0x001e, h01=0x0050, text=»CFD EQU /10 CURSOR FORWARD«, t00=0x008e, t01=0x00ba}
0x0de9e…0dec2                Head {h00=0x0020, h01=0x0050, text=»CBD EQU /09 CURSOR BACKWARD «, t00=0x008e, t01=0x00dc}
0x0dec2…0dee0                Head {h00=0x001a, h01=0x0050, text=»BSP EQU /08 BACKSPACE «, t00=0x008e, t01=0x0100}
0x0dee0…0df08                Head {h00=0x0024, h01=0x0050, text=»ERA EQU /05 ERASE REST OF FIELD «, t00=0x008e, t01=0x011e}
0x0df08…0df34                Head {h00=0x0028, h01=0x0050, text=»MIN EQU /2D MINUS AS NUMERIC EOI-KEY«, t00=0x008e, t01=0x0146}
0x0df34…0df66                Head {h00=0x002e, h01=0x0050, text=»ALLKEY EQU /03 ALL. ONLY THE COMBINATIONS:«, t00=0x008e, t01=0x0172}
0x0df66…0df7e                Head {h00=0x0014, h01=0x0050, text=»   -   ALL + CFD«, t00=0x008f, t01=0x0014}
0x0df7e…0df96                Head {h00=0x0014, h01=0x0050, text=»   -   ALL + CBD«, t00=0x008f, t01=0x002c}
0x0df96…0dfb0                Head {h00=0x0016, h01=0x0050, text=»   ARE SUPPORTED. «, t00=0x008f, t01=0x0044}
0x0dfb0…0dfc6                Head {h00=0x0012, h01=0x0050, text=»   ON VD82/83:«, t00=0x008f, t01=0x005e}
0x0dfc6…0dfe4                Head {h00=0x001a, h01=0x0050, text=»SUP EQU /11 SCROLL UP «, t00=0x008f, t01=0x0074}
0x0dfe4…0e004                Head {h00=0x001c, h01=0x0050, text=»SDWN EQU /12 SCROLL DOWN«, t00=0x008f, t01=0x0092}
0x0e004…0e024                Head {h00=0x001c, h01=0x0050, text=»SLFT EQU /13 SCROLL LEFT«, t00=0x008f, t01=0x00b2}
0x0e024…0e046                Head {h00=0x001e, h01=0x0050, text=»SRGT EQU /14 SCROLL RIGHT «, t00=0x008f, t01=0x00d2}
0x0e046…0e04e                Head {h00=0x0004, h01=0x0050, t00=0x008f, t01=0x00f4}
0x0e04e…0e09c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x008f, t01=0x00fc}
0x0e09c…0e0ea                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x008f, t01=0x014a}
0x0e0ea…0e0f2                Head {h00=0x0004, h01=0x0050, t00=0x0090, t01=0x0008}
0x0e0f2…0e0fa                Head {h00=0x0004, h01=0x0050, t00=0x0090, t01=0x0010}
0x0e0fa…0e148                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0090, t01=0x0018}
0x0e148…0e196                Head {h00=0x004a, h01=0x0050, text=»**                    EQUATES FOR WSMGEN                            **«, t00=0x0090, t01=0x0066}
0x0e196…0e1e4                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x0090, t01=0x00b4}
0x0e1e4…0e232                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0090, t01=0x0102}
0x0e232…0e240                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0090, t01=0x0150}
0x0e240…0e256                Head {h00=0x0012, h01=0x0050, text=»CLR01 EQU CLR «, t00=0x0090, t01=0x015e}
0x0e256…0e26c                Head {h00=0x0012, h01=0x0050, text=»CLR1 EQU CLR01«, t00=0x0090, t01=0x0174}
0x0e26c…0e282                Head {h00=0x0012, h01=0x0050, text=»TFD01 EQU TFD «, t00=0x0090, t01=0x018a}
0x0e282…0e298                Head {h00=0x0012, h01=0x0050, text=»TFD1 EQU TFD01«, t00=0x0091, t01=0x0010}
0x0e298…0e2ae                Head {h00=0x0012, h01=0x0050, text=»TFD02 EQU TFD «, t00=0x0091, t01=0x0026}
0x0e2ae…0e2c4                Head {h00=0x0012, h01=0x0050, text=»TFD2 EQU TFD02«, t00=0x0091, t01=0x003c}
0x0e2c4…0e2da                Head {h00=0x0012, h01=0x0050, text=»TBD01 EQU TBD «, t00=0x0091, t01=0x0052}
0x0e2da…0e2f0                Head {h00=0x0012, h01=0x0050, text=»TBD1 EQU TBD01«, t00=0x0091, t01=0x0068}
0x0e2f0…0e306                Head {h00=0x0012, h01=0x0050, text=»TBD02 EQU TBD «, t00=0x0091, t01=0x007e}
0x0e306…0e31c                Head {h00=0x0012, h01=0x0050, text=»TBD2 EQU TBD02«, t00=0x0091, t01=0x0094}
0x0e31c…0e330                Head {h00=0x0010, h01=0x0050, text=»CR01 EQU CR «, t00=0x0091, t01=0x00aa}
0x0e330…0e344                Head {h00=0x0010, h01=0x0050, text=»CR1 EQU CR01«, t00=0x0091, t01=0x00be}
0x0e344…0e358                Head {h00=0x0010, h01=0x0050, text=»CR02 EQU CR «, t00=0x0091, t01=0x00d2}
0x0e358…0e36c                Head {h00=0x0010, h01=0x0050, text=»CR2 EQU CR02«, t00=0x0091, t01=0x00e6}
0x0e36c…0e382                Head {h00=0x0012, h01=0x0050, text=»HLP01 EQU HLP «, t00=0x0091, t01=0x00fa}
0x0e382…0e398                Head {h00=0x0012, h01=0x0050, text=»HLP1 EQU HLP01«, t00=0x0091, t01=0x0110}
0x0e398…0e3ae                Head {h00=0x0012, h01=0x0050, text=»HLP02 EQU HLP «, t00=0x0091, t01=0x0126}
0x0e3ae…0e3c4                Head {h00=0x0012, h01=0x0050, text=»HLP2 EQU HLP02«, t00=0x0091, t01=0x013c}
0x0e3c4…0e3da                Head {h00=0x0012, h01=0x0050, text=»ENT01 EQU ENT «, t00=0x0091, t01=0x0152}
0x0e3da…0e3f0                Head {h00=0x0012, h01=0x0050, text=»ENT1 EQU ENT01«, t00=0x0091, t01=0x0168}
0x0e3f0…0e406                Head {h00=0x0012, h01=0x0050, text=»ENT02 EQU ENT «, t00=0x0091, t01=0x017e}
0x0e406…0e41c (146, 0, 400)  Head {h00=0x0012, h01=0x0050, text=»ENT2 EQU ENT02«, t00=0x0092, t01=0x0004}
0x0e41c…0e432                Head {h00=0x0012, h01=0x0050, text=»CAN01 EQU CAN «, t00=0x0092, t01=0x001a}
0x0e432…0e448                Head {h00=0x0012, h01=0x0050, text=»CAN1 EQU CAN01«, t00=0x0092, t01=0x0030}
0x0e448…0e45e                Head {h00=0x0012, h01=0x0050, text=»CAN02 EQU CAN «, t00=0x0092, t01=0x0046}
0x0e45e…0e474                Head {h00=0x0012, h01=0x0050, text=»CAN2 EQU CAN02«, t00=0x0092, t01=0x005c}
0x0e474…0e48a                Head {h00=0x0012, h01=0x0050, text=»PRT01 EQU PRT «, t00=0x0092, t01=0x0072}
0x0e48a…0e4a0                Head {h00=0x0012, h01=0x0050, text=»PRT1 EQU PRT01«, t00=0x0092, t01=0x0088}
0x0e4a0…0e4b6                Head {h00=0x0012, h01=0x0050, text=»PRT02 EQU PRT «, t00=0x0092, t01=0x009e}
0x0e4b6…0e4cc                Head {h00=0x0012, h01=0x0050, text=»PRT2 EQU PRT02«, t00=0x0092, t01=0x00b4}
0x0e4cc…0e4e2                Head {h00=0x0012, h01=0x0050, text=»SEC01 EQU SEC «, t00=0x0092, t01=0x00ca}
0x0e4e2…0e4f8                Head {h00=0x0012, h01=0x0050, text=»SEC1 EQU SEC01«, t00=0x0092, t01=0x00e0}
0x0e4f8…0e50e                Head {h00=0x0012, h01=0x0050, text=»SEC02 EQU SEC «, t00=0x0092, t01=0x00f6}
0x0e50e…0e524                Head {h00=0x0012, h01=0x0050, text=»SEC2 EQU SEC02«, t00=0x0092, t01=0x010c}
0x0e524…0e53a                Head {h00=0x0012, h01=0x0050, text=»DUP01 EQU DUP «, t00=0x0092, t01=0x0122}
0x0e53a…0e550                Head {h00=0x0012, h01=0x0050, text=»DUP1 EQU DUP01«, t00=0x0092, t01=0x0138}
0x0e550…0e566                Head {h00=0x0012, h01=0x0050, text=»ASD01 EQU ASD «, t00=0x0092, t01=0x014e}
0x0e566…0e57c                Head {h00=0x0012, h01=0x0050, text=»ASD1 EQU ASD01«, t00=0x0092, t01=0x0164}
0x0e57c…0e592                Head {h00=0x0012, h01=0x0050, text=»FUN01 EQU FUN «, t00=0x0092, t01=0x017a}
0x0e592…0e5a8                Head {h00=0x0012, h01=0x0050, text=»FUN1 EQU FUN01«, t00=0x0092, t01=0x0190}
0x0e5a8…0e5be                Head {h00=0x0012, h01=0x0050, text=»FUN02 EQU FUN «, t00=0x0093, t01=0x0016}
0x0e5be…0e5d4                Head {h00=0x0012, h01=0x0050, text=»FUN2 EQU FUN02«, t00=0x0093, t01=0x002c}
0x0e5d4…0e5ea                Head {h00=0x0012, h01=0x0050, text=»TUP01 EQU TUP «, t00=0x0093, t01=0x0042}
0x0e5ea…0e600                Head {h00=0x0012, h01=0x0050, text=»TUP1 EQU TUP01«, t00=0x0093, t01=0x0058}
0x0e600…0e616                Head {h00=0x0012, h01=0x0050, text=»TUP02 EQU TUP «, t00=0x0093, t01=0x006e}
0x0e616…0e62c                Head {h00=0x0012, h01=0x0050, text=»TUP2 EQU TUP02«, t00=0x0093, t01=0x0084}
0x0e62c…0e642                Head {h00=0x0012, h01=0x0050, text=»TDW01 EQU TDW «, t00=0x0093, t01=0x009a}
0x0e642…0e658                Head {h00=0x0012, h01=0x0050, text=»TDW1 EQU TDW01«, t00=0x0093, t01=0x00b0}
0x0e658…0e66e                Head {h00=0x0012, h01=0x0050, text=»TDW02 EQU TDW «, t00=0x0093, t01=0x00c6}
0x0e66e…0e684                Head {h00=0x0012, h01=0x0050, text=»TDW2 EQU TDW02«, t00=0x0093, t01=0x00dc}
0x0e684…0e69a                Head {h00=0x0012, h01=0x0050, text=»ARI01 EQU ARI «, t00=0x0093, t01=0x00f2}
0x0e69a…0e6b0                Head {h00=0x0012, h01=0x0050, text=»ARI1 EQU ARI01«, t00=0x0093, t01=0x0108}
0x0e6b0…0e6c6                Head {h00=0x0012, h01=0x0050, text=»ARI02 EQU ARI «, t00=0x0093, t01=0x011e}
0x0e6c6…0e6dc                Head {h00=0x0012, h01=0x0050, text=»ARI2 EQU ARI02«, t00=0x0093, t01=0x0134}
0x0e6dc…0e6f2                Head {h00=0x0012, h01=0x0050, text=»LIN01 EQU LIN «, t00=0x0093, t01=0x014a}
0x0e6f2…0e708                Head {h00=0x0012, h01=0x0050, text=»LIN1 EQU LIN01«, t00=0x0093, t01=0x0160}
0x0e708…0e71e                Head {h00=0x0012, h01=0x0050, text=»INS03 EQU INS «, t00=0x0093, t01=0x0176}
0x0e71e…0e734                Head {h00=0x0012, h01=0x0050, text=»INS3 EQU INS03«, t00=0x0093, t01=0x018c}
0x0e734…0e74a                Head {h00=0x0012, h01=0x0050, text=»DEL03 EQU DEL «, t00=0x0094, t01=0x0012}
0x0e74a…0e760                Head {h00=0x0012, h01=0x0050, text=»DEL3 EQU DEL03«, t00=0x0094, t01=0x0028}
0x0e760…0e776                Head {h00=0x0012, h01=0x0050, text=»TFD03 EQU TFD «, t00=0x0094, t01=0x003e}
0x0e776…0e78c                Head {h00=0x0012, h01=0x0050, text=»TFD3 EQU TFD03«, t00=0x0094, t01=0x0054}
0x0e78c…0e7a2                Head {h00=0x0012, h01=0x0050, text=»TBD03 EQU TBD «, t00=0x0094, t01=0x006a}
0x0e7a2…0e7b8                Head {h00=0x0012, h01=0x0050, text=»TBD3 EQU TBD03«, t00=0x0094, t01=0x0080}
0x0e7b8…0e7ce                Head {h00=0x0012, h01=0x0050, text=»PRT03 EQU PRT «, t00=0x0094, t01=0x0096}
0x0e7ce…0e7e4                Head {h00=0x0012, h01=0x0050, text=»PRT3 EQU PRT03«, t00=0x0094, t01=0x00ac}
0x0e7e4…0e7fa                Head {h00=0x0012, h01=0x0050, text=»CLR03 EQU CLR «, t00=0x0094, t01=0x00c2}
0x0e7fa…0e810                Head {h00=0x0012, h01=0x0050, text=»CLR3 EQU CLR03«, t00=0x0094, t01=0x00d8}
0x0e810…0e826                Head {h00=0x0012, h01=0x0050, text=»CAN03 EQU CAN «, t00=0x0094, t01=0x00ee}
0x0e826…0e83c                Head {h00=0x0012, h01=0x0050, text=»CAN3 EQU CAN03«, t00=0x0094, t01=0x0104}
0x0e83c…0e852                Head {h00=0x0012, h01=0x0050, text=»CLR04 EQU CLR «, t00=0x0094, t01=0x011a}
0x0e852…0e868                Head {h00=0x0012, h01=0x0050, text=»CLR4 EQU CLR04«, t00=0x0094, t01=0x0130}
0x0e868…0e87e                Head {h00=0x0012, h01=0x0050, text=»ENT04 EQU ENT «, t00=0x0094, t01=0x0146}
0x0e87e…0e894                Head {h00=0x0012, h01=0x0050, text=»ENT4 EQU ENT04«, t00=0x0094, t01=0x015c}
0x0e894…0e8aa                Head {h00=0x0012, h01=0x0050, text=»CAN04 EQU CAN «, t00=0x0094, t01=0x0172}
0x0e8aa…0e8c0                Head {h00=0x0012, h01=0x0050, text=»CAN4 EQU CAN04«, t00=0x0094, t01=0x0188}
0x0e8c0…0e8d6                Head {h00=0x0012, h01=0x0050, text=»CLR05 EQU CLR «, t00=0x0095, t01=0x000e}
0x0e8d6…0e8ec                Head {h00=0x0012, h01=0x0050, text=»CLR5 EQU CLR05«, t00=0x0095, t01=0x0024}
0x0e8ec…0e902                Head {h00=0x0012, h01=0x0050, text=»CAN05 EQU CAN «, t00=0x0095, t01=0x003a}
0x0e902…0e918                Head {h00=0x0012, h01=0x0050, text=»CAN5 EQU CAN05«, t00=0x0095, t01=0x0050}
0x0e918…0e92e                Head {h00=0x0012, h01=0x0050, text=»CLR06 EQU CLR «, t00=0x0095, t01=0x0066}
0x0e92e…0e944                Head {h00=0x0012, h01=0x0050, text=»CLR6 EQU CLR06«, t00=0x0095, t01=0x007c}
0x0e944…0e95a                Head {h00=0x0012, h01=0x0050, text=»CAN06 EQU CAN «, t00=0x0095, t01=0x0092}
0x0e95a…0e970                Head {h00=0x0012, h01=0x0050, text=»CAN6 EQU CAN06«, t00=0x0095, t01=0x00a8}
0x0e970…0e984                Head {h00=0x0010, h01=0x0050, text=»OV06 EQU OV «, t00=0x0095, t01=0x00be}
0x0e984…0e998                Head {h00=0x0010, h01=0x0050, text=»OV6 EQU OV06«, t00=0x0095, t01=0x00d2}
0x0e998…0e9aa                Head {h00=0x000e, h01=0x0050, text=»UKEY EQU 0«, t00=0x0095, t01=0x00e6}
0x0e9aa…0e9c2                Head {h00=0x0014, h01=0x0050, text=»X:UKEY EQU UKEY «, t00=0x0095, t01=0x00f8}
0x0e9c2…0e9d8                Head {h00=0x0012, h01=0x0050, text=»UK01 EQU NOKEY«, t00=0x0095, t01=0x0110}
0x0e9d8…0e9ee                Head {h00=0x0012, h01=0x0050, text=»UK02 EQU NOKEY«, t00=0x0095, t01=0x0126}
0x0e9ee…0ea04                Head {h00=0x0012, h01=0x0050, text=»UK03 EQU NOKEY«, t00=0x0095, t01=0x013c}
0x0ea04…0ea1a                Head {h00=0x0012, h01=0x0050, text=»UK04 EQU NOKEY«, t00=0x0095, t01=0x0152}
0x0ea1a…0ea30                Head {h00=0x0012, h01=0x0050, text=»UK05 EQU NOKEY«, t00=0x0095, t01=0x0168}
0x0ea30…0ea46                Head {h00=0x0012, h01=0x0050, text=»UK06 EQU NOKEY«, t00=0x0095, t01=0x017e}
0x0ea46…0ea5c (150, 0, 400)  Head {h00=0x0012, h01=0x0050, text=»UK07 EQU NOKEY«, t00=0x0096, t01=0x0004}
0x0ea5c…0ea72                Head {h00=0x0012, h01=0x0050, text=»UK08 EQU NOKEY«, t00=0x0096, t01=0x001a}
0x0ea72…0ea88                Head {h00=0x0012, h01=0x0050, text=»UK09 EQU NOKEY«, t00=0x0096, t01=0x0030}
0x0ea88…0ea9e                Head {h00=0x0012, h01=0x0050, text=»UK10 EQU NOKEY«, t00=0x0096, t01=0x0046}
0x0ea9e…0eab4                Head {h00=0x0012, h01=0x0050, text=»UK11 EQU NOKEY«, t00=0x0096, t01=0x005c}
0x0eab4…0eaca                Head {h00=0x0012, h01=0x0050, text=»UK12 EQU NOKEY«, t00=0x0096, t01=0x0072}
0x0eaca…0eae0                Head {h00=0x0012, h01=0x0050, text=»UK13 EQU NOKEY«, t00=0x0096, t01=0x0088}
0x0eae0…0eaf6                Head {h00=0x0012, h01=0x0050, text=»UK14 EQU NOKEY«, t00=0x0096, t01=0x009e}
0x0eaf6…0eb0c                Head {h00=0x0012, h01=0x0050, text=»UK15 EQU NOKEY«, t00=0x0096, t01=0x00b4}
0x0eb0c…0eb22                Head {h00=0x0012, h01=0x0050, text=»UK16 EQU NOKEY«, t00=0x0096, t01=0x00ca}
0x0eb22…0eb38                Head {h00=0x0012, h01=0x0050, text=»UK17 EQU NOKEY«, t00=0x0096, t01=0x00e0}
0x0eb38…0eb4e                Head {h00=0x0012, h01=0x0050, text=»UK18 EQU NOKEY«, t00=0x0096, t01=0x00f6}
0x0eb4e…0eb64                Head {h00=0x0012, h01=0x0050, text=»UK19 EQU NOKEY«, t00=0x0096, t01=0x010c}
0x0eb64…0eb7a                Head {h00=0x0012, h01=0x0050, text=»UK20 EQU NOKEY«, t00=0x0096, t01=0x0122}
0x0eb7a…0eb90                Head {h00=0x0012, h01=0x0050, text=»UK21 EQU NOKEY«, t00=0x0096, t01=0x0138}
0x0eb90…0eba6                Head {h00=0x0012, h01=0x0050, text=»UK22 EQU NOKEY«, t00=0x0096, t01=0x014e}
0x0eba6…0ebbc                Head {h00=0x0012, h01=0x0050, text=»UK23 EQU NOKEY«, t00=0x0096, t01=0x0164}
0x0ebbc…0ebd2                Head {h00=0x0012, h01=0x0050, text=»UK24 EQU NOKEY«, t00=0x0096, t01=0x017a}
0x0ebd2…0ebe8                Head {h00=0x0012, h01=0x0050, text=»UK25 EQU NOKEY«, t00=0x0096, t01=0x0190}
0x0ebe8…0ebfe                Head {h00=0x0012, h01=0x0050, text=»UK011 EQU UK01«, t00=0x0097, t01=0x0016}
0x0ebfe…0ec14                Head {h00=0x0012, h01=0x0050, text=»UK012 EQU UK01«, t00=0x0097, t01=0x002c}
0x0ec14…0ec2a                Head {h00=0x0012, h01=0x0050, text=»UK021 EQU UK02«, t00=0x0097, t01=0x0042}
0x0ec2a…0ec40                Head {h00=0x0012, h01=0x0050, text=»UK022 EQU UK02«, t00=0x0097, t01=0x0058}
0x0ec40…0ec56                Head {h00=0x0012, h01=0x0050, text=»UK031 EQU UK03«, t00=0x0097, t01=0x006e}
0x0ec56…0ec6c                Head {h00=0x0012, h01=0x0050, text=»UK032 EQU UK03«, t00=0x0097, t01=0x0084}
0x0ec6c…0ec82                Head {h00=0x0012, h01=0x0050, text=»UK041 EQU UK04«, t00=0x0097, t01=0x009a}
0x0ec82…0ec98                Head {h00=0x0012, h01=0x0050, text=»UK042 EQU UK04«, t00=0x0097, t01=0x00b0}
0x0ec98…0ecae                Head {h00=0x0012, h01=0x0050, text=»UK051 EQU UK05«, t00=0x0097, t01=0x00c6}
0x0ecae…0ecc4                Head {h00=0x0012, h01=0x0050, text=»UK052 EQU UK05«, t00=0x0097, t01=0x00dc}
0x0ecc4…0ecda                Head {h00=0x0012, h01=0x0050, text=»UK061 EQU UK06«, t00=0x0097, t01=0x00f2}
0x0ecda…0ecf0                Head {h00=0x0012, h01=0x0050, text=»UK062 EQU UK06«, t00=0x0097, t01=0x0108}
0x0ecf0…0ed06                Head {h00=0x0012, h01=0x0050, text=»UK071 EQU UK07«, t00=0x0097, t01=0x011e}
0x0ed06…0ed1c                Head {h00=0x0012, h01=0x0050, text=»UK072 EQU UK07«, t00=0x0097, t01=0x0134}
0x0ed1c…0ed32                Head {h00=0x0012, h01=0x0050, text=»UK081 EQU UK08«, t00=0x0097, t01=0x014a}
0x0ed32…0ed48                Head {h00=0x0012, h01=0x0050, text=»UK082 EQU UK08«, t00=0x0097, t01=0x0160}
0x0ed48…0ed5e                Head {h00=0x0012, h01=0x0050, text=»UK091 EQU UK09«, t00=0x0097, t01=0x0176}
0x0ed5e…0ed74                Head {h00=0x0012, h01=0x0050, text=»UK092 EQU UK09«, t00=0x0097, t01=0x018c}
0x0ed74…0ed8a                Head {h00=0x0012, h01=0x0050, text=»UK101 EQU UK10«, t00=0x0098, t01=0x0012}
0x0ed8a…0eda0                Head {h00=0x0012, h01=0x0050, text=»UK102 EQU UK10«, t00=0x0098, t01=0x0028}
0x0eda0…0edb6                Head {h00=0x0012, h01=0x0050, text=»UK111 EQU UK11«, t00=0x0098, t01=0x003e}
0x0edb6…0edcc                Head {h00=0x0012, h01=0x0050, text=»UK112 EQU UK11«, t00=0x0098, t01=0x0054}
0x0edcc…0ede2                Head {h00=0x0012, h01=0x0050, text=»UK121 EQU UK12«, t00=0x0098, t01=0x006a}
0x0ede2…0edf8                Head {h00=0x0012, h01=0x0050, text=»UK122 EQU UK12«, t00=0x0098, t01=0x0080}
0x0edf8…0ee0e                Head {h00=0x0012, h01=0x0050, text=»UK131 EQU UK13«, t00=0x0098, t01=0x0096}
0x0ee0e…0ee24                Head {h00=0x0012, h01=0x0050, text=»UK132 EQU UK13«, t00=0x0098, t01=0x00ac}
0x0ee24…0ee3a                Head {h00=0x0012, h01=0x0050, text=»UK141 EQU UK14«, t00=0x0098, t01=0x00c2}
0x0ee3a…0ee50                Head {h00=0x0012, h01=0x0050, text=»UK142 EQU UK14«, t00=0x0098, t01=0x00d8}
0x0ee50…0ee66                Head {h00=0x0012, h01=0x0050, text=»UK151 EQU UK15«, t00=0x0098, t01=0x00ee}
0x0ee66…0ee7c                Head {h00=0x0012, h01=0x0050, text=»UK152 EQU UK15«, t00=0x0098, t01=0x0104}
0x0ee7c…0ee92                Head {h00=0x0012, h01=0x0050, text=»UK161 EQU UK16«, t00=0x0098, t01=0x011a}
0x0ee92…0eea8                Head {h00=0x0012, h01=0x0050, text=»UK162 EQU UK16«, t00=0x0098, t01=0x0130}
0x0eea8…0eebe                Head {h00=0x0012, h01=0x0050, text=»UK171 EQU UK17«, t00=0x0098, t01=0x0146}
0x0eebe…0eed4                Head {h00=0x0012, h01=0x0050, text=»UK172 EQU UK17«, t00=0x0098, t01=0x015c}
0x0eed4…0eeea                Head {h00=0x0012, h01=0x0050, text=»UK181 EQU UK18«, t00=0x0098, t01=0x0172}
0x0eeea…0ef00                Head {h00=0x0012, h01=0x0050, text=»UK182 EQU UK18«, t00=0x0098, t01=0x0188}
0x0ef00…0ef16                Head {h00=0x0012, h01=0x0050, text=»UK191 EQU UK19«, t00=0x0099, t01=0x000e}
0x0ef16…0ef2c                Head {h00=0x0012, h01=0x0050, text=»UK192 EQU UK19«, t00=0x0099, t01=0x0024}
0x0ef2c…0ef42                Head {h00=0x0012, h01=0x0050, text=»UK201 EQU UK20«, t00=0x0099, t01=0x003a}
0x0ef42…0ef58                Head {h00=0x0012, h01=0x0050, text=»UK202 EQU UK20«, t00=0x0099, t01=0x0050}
0x0ef58…0ef6e                Head {h00=0x0012, h01=0x0050, text=»UK211 EQU UK21«, t00=0x0099, t01=0x0066}
0x0ef6e…0ef84                Head {h00=0x0012, h01=0x0050, text=»UK212 EQU UK21«, t00=0x0099, t01=0x007c}
0x0ef84…0ef9a                Head {h00=0x0012, h01=0x0050, text=»UK221 EQU UK22«, t00=0x0099, t01=0x0092}
0x0ef9a…0efb0                Head {h00=0x0012, h01=0x0050, text=»UK222 EQU UK22«, t00=0x0099, t01=0x00a8}
0x0efb0…0efc6                Head {h00=0x0012, h01=0x0050, text=»UK231 EQU UK23«, t00=0x0099, t01=0x00be}
0x0efc6…0efdc                Head {h00=0x0012, h01=0x0050, text=»UK232 EQU UK23«, t00=0x0099, t01=0x00d4}
0x0efdc…0eff2                Head {h00=0x0012, h01=0x0050, text=»UK241 EQU UK24«, t00=0x0099, t01=0x00ea}
0x0eff2…0f008                Head {h00=0x0012, h01=0x0050, text=»UK242 EQU UK24«, t00=0x0099, t01=0x0100}
0x0f008…0f01e                Head {h00=0x0012, h01=0x0050, text=»UK251 EQU UK25«, t00=0x0099, t01=0x0116}
0x0f01e…0f034                Head {h00=0x0012, h01=0x0050, text=»UK252 EQU UK25«, t00=0x0099, t01=0x012c}
0x0f034…0f04a                Head {h00=0x0012, h01=0x0050, text=»U011 EQU UK011«, t00=0x0099, t01=0x0142}
0x0f04a…0f060                Head {h00=0x0012, h01=0x0050, text=»U012 EQU UK012«, t00=0x0099, t01=0x0158}
0x0f060…0f076                Head {h00=0x0012, h01=0x0050, text=»U021 EQU UK021«, t00=0x0099, t01=0x016e}
0x0f076…0f08c                Head {h00=0x0012, h01=0x0050, text=»U022 EQU UK022«, t00=0x0099, t01=0x0184}
0x0f08c…0f0a2                Head {h00=0x0012, h01=0x0050, text=»U031 EQU UK031«, t00=0x009a, t01=0x000a}
0x0f0a2…0f0b8                Head {h00=0x0012, h01=0x0050, text=»U032 EQU UK032«, t00=0x009a, t01=0x0020}
0x0f0b8…0f0ce                Head {h00=0x0012, h01=0x0050, text=»U041 EQU UK041«, t00=0x009a, t01=0x0036}
0x0f0ce…0f0e4                Head {h00=0x0012, h01=0x0050, text=»U042 EQU UK042«, t00=0x009a, t01=0x004c}
0x0f0e4…0f0fa                Head {h00=0x0012, h01=0x0050, text=»U051 EQU UK051«, t00=0x009a, t01=0x0062}
0x0f0fa…0f110                Head {h00=0x0012, h01=0x0050, text=»U052 EQU UK052«, t00=0x009a, t01=0x0078}
0x0f110…0f126                Head {h00=0x0012, h01=0x0050, text=»U061 EQU UK061«, t00=0x009a, t01=0x008e}
0x0f126…0f13c                Head {h00=0x0012, h01=0x0050, text=»U062 EQU UK062«, t00=0x009a, t01=0x00a4}
0x0f13c…0f152                Head {h00=0x0012, h01=0x0050, text=»U071 EQU UK071«, t00=0x009a, t01=0x00ba}
0x0f152…0f168                Head {h00=0x0012, h01=0x0050, text=»U072 EQU UK072«, t00=0x009a, t01=0x00d0}
0x0f168…0f17e                Head {h00=0x0012, h01=0x0050, text=»U081 EQU UK081«, t00=0x009a, t01=0x00e6}
0x0f17e…0f194                Head {h00=0x0012, h01=0x0050, text=»U082 EQU UK082«, t00=0x009a, t01=0x00fc}
0x0f194…0f1aa                Head {h00=0x0012, h01=0x0050, text=»U091 EQU UK091«, t00=0x009a, t01=0x0112}
0x0f1aa…0f1c0                Head {h00=0x0012, h01=0x0050, text=»U092 EQU UK092«, t00=0x009a, t01=0x0128}
0x0f1c0…0f1d6                Head {h00=0x0012, h01=0x0050, text=»U101 EQU UK101«, t00=0x009a, t01=0x013e}
0x0f1d6…0f1ec                Head {h00=0x0012, h01=0x0050, text=»U102 EQU UK102«, t00=0x009a, t01=0x0154}
0x0f1ec…0f202                Head {h00=0x0012, h01=0x0050, text=»U111 EQU UK111«, t00=0x009a, t01=0x016a}
0x0f202…0f218                Head {h00=0x0012, h01=0x0050, text=»U112 EQU UK112«, t00=0x009a, t01=0x0180}
0x0f218…0f22e                Head {h00=0x0012, h01=0x0050, text=»U121 EQU UK121«, t00=0x009b, t01=0x0008}
0x0f22e…0f244                Head {h00=0x0012, h01=0x0050, text=»U122 EQU UK122«, t00=0x009b, t01=0x001e}
0x0f244…0f25a                Head {h00=0x0012, h01=0x0050, text=»U131 EQU UK131«, t00=0x009b, t01=0x0034}
0x0f25a…0f270                Head {h00=0x0012, h01=0x0050, text=»U132 EQU UK132«, t00=0x009b, t01=0x004a}
0x0f270…0f286                Head {h00=0x0012, h01=0x0050, text=»U141 EQU UK141«, t00=0x009b, t01=0x0060}
0x0f286…0f29c                Head {h00=0x0012, h01=0x0050, text=»U142 EQU UK142«, t00=0x009b, t01=0x0076}
0x0f29c…0f2b2                Head {h00=0x0012, h01=0x0050, text=»U151 EQU UK151«, t00=0x009b, t01=0x008c}
0x0f2b2…0f2c8                Head {h00=0x0012, h01=0x0050, text=»U152 EQU UK152«, t00=0x009b, t01=0x00a2}
0x0f2c8…0f2de                Head {h00=0x0012, h01=0x0050, text=»U161 EQU UK161«, t00=0x009b, t01=0x00b8}
0x0f2de…0f2f4                Head {h00=0x0012, h01=0x0050, text=»U162 EQU UK162«, t00=0x009b, t01=0x00ce}
0x0f2f4…0f30a                Head {h00=0x0012, h01=0x0050, text=»U171 EQU UK171«, t00=0x009b, t01=0x00e4}
0x0f30a…0f320                Head {h00=0x0012, h01=0x0050, text=»U172 EQU UK172«, t00=0x009b, t01=0x00fa}
0x0f320…0f336                Head {h00=0x0012, h01=0x0050, text=»U181 EQU UK181«, t00=0x009b, t01=0x0110}
0x0f336…0f34c                Head {h00=0x0012, h01=0x0050, text=»U182 EQU UK182«, t00=0x009b, t01=0x0126}
0x0f34c…0f362                Head {h00=0x0012, h01=0x0050, text=»U191 EQU UK191«, t00=0x009b, t01=0x013c}
0x0f362…0f378                Head {h00=0x0012, h01=0x0050, text=»U192 EQU UK192«, t00=0x009b, t01=0x0152}
0x0f378…0f38e                Head {h00=0x0012, h01=0x0050, text=»U201 EQU UK201«, t00=0x009b, t01=0x0168}
0x0f38e…0f3a4                Head {h00=0x0012, h01=0x0050, text=»U202 EQU UK202«, t00=0x009b, t01=0x017e}
0x0f3a4…0f3ba (156, 0, 400)  Head {h00=0x0012, h01=0x0050, text=»U211 EQU UK211«, t00=0x009c, t01=0x0004}
0x0f3ba…0f3d0                Head {h00=0x0012, h01=0x0050, text=»U212 EQU UK212«, t00=0x009c, t01=0x001a}
0x0f3d0…0f3e6                Head {h00=0x0012, h01=0x0050, text=»U221 EQU UK221«, t00=0x009c, t01=0x0030}
0x0f3e6…0f3fc                Head {h00=0x0012, h01=0x0050, text=»U222 EQU UK222«, t00=0x009c, t01=0x0046}
0x0f3fc…0f412                Head {h00=0x0012, h01=0x0050, text=»U231 EQU UK231«, t00=0x009c, t01=0x005c}
0x0f412…0f428                Head {h00=0x0012, h01=0x0050, text=»U232 EQU UK232«, t00=0x009c, t01=0x0072}
0x0f428…0f43e                Head {h00=0x0012, h01=0x0050, text=»U241 EQU UK241«, t00=0x009c, t01=0x0088}
0x0f43e…0f454                Head {h00=0x0012, h01=0x0050, text=»U242 EQU UK242«, t00=0x009c, t01=0x009e}
0x0f454…0f46a                Head {h00=0x0012, h01=0x0050, text=»U251 EQU UK251«, t00=0x009c, t01=0x00b4}
0x0f46a…0f480                Head {h00=0x0012, h01=0x0050, text=»U252 EQU UK252«, t00=0x009c, t01=0x00ca}
0x0f480…0f48e                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x009c, t01=0x00e0}
0x0f48e…0f49c                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009c, t01=0x00ee}
0x0f49c…0f4a4                Head {h00=0x0004, h01=0x0050, t00=0x009c, t01=0x00fc}
0x0f4a4…0f4b0                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x0104}
0x0f4b0…0f4cc                Head {h00=0x0018, h01=0x0050, text=»W:KTB1   EQU      * «, t00=0x009c, t01=0x0110}
0x0f4cc…0f4e0                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x009c, t01=0x012c}
0x0f4e0…0f52e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x009c, t01=0x0140}
0x0f52e…0f57c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x009c, t01=0x018e}
0x0f57c…0f5ca                Head {h00=0x004a, h01=0x0050, text=»**  W:KTB1            KEYTABLE 1. USED IN:                          **«, t00=0x009d, t01=0x004c}
0x0f5ca…0f618                Head {h00=0x004a, h01=0x0050, text=»**                    1. NORMAL READ IN NOT PROTECTED DYN FIELDS.   **«, t00=0x009d, t01=0x009a}
0x0f618…0f666                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x009d, t01=0x00e8}
0x0f666…0f6b4                Head {h00=0x004a, h01=0x0050, text=»**                    KEYTABLE 1 CAN BE CHANGED BY THE USER.        **«, t00=0x009d, t01=0x0136}
0x0f6b4…0f702                Head {h00=0x004a, h01=0x0050, text=»**                    WHEN DOING THIS REMEMBER:                     **«, t00=0x009d, t01=0x0184}
0x0f702…0f750                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x009e, t01=0x0042}
0x0f750…0f79e                Head {h00=0x004a, h01=0x0050, text=»**                    1. USER KEYS MUST BE ADDED TO THE END         **«, t00=0x009e, t01=0x0090}
0x0f79e…0f7ec                Head {h00=0x004a, h01=0x0050, text=»**                    .  OF THE KEYTABLE.                           **«, t00=0x009e, t01=0x00de}
0x0f7ec…0f83a                Head {h00=0x004a, h01=0x0050, text=»**                    2. THE ORDER OF THE FIRST 16 KEYS MUST NOT    **«, t00=0x009e, t01=0x012c}
0x0f83a…0f888                Head {h00=0x004a, h01=0x0050, text=»**                    .  BE ALTERED.                                **«, t00=0x009e, t01=0x017a}
0x0f888…0f8d6                Head {h00=0x004a, h01=0x0050, text=»**                    3. KEYS HANDLED BY WSM BUT NOT USED IN YOUR   **«, t00=0x009f, t01=0x0038}
0x0f8d6…0f924                Head {h00=0x004a, h01=0x0050, text=»**                    .  SYSTEM SHOULD BE SET TO NOKEY IN THE KEY   **«, t00=0x009f, t01=0x0086}
0x0f924…0f972                Head {h00=0x004a, h01=0x0050, text=»**                    .  CODE LIST ABOVE.                           **«, t00=0x009f, t01=0x00d4}
0x0f972…0f9c0                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x009f, t01=0x0122}
0x0f9c0…0fa0e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x009f, t01=0x0170}
0x0fa0e…0fa16                Head {h00=0x0004, h01=0x0050, t00=0x00a0, t01=0x002e}
0x0fa16…0fa64                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00a0, t01=0x0036}
0x0fa64…0fab2                Head {h00=0x004a, h01=0x0050, text=»**                    KEY TABLE FORMS                               **«, t00=0x00a0, t01=0x0084}
0x0fab2…0fb00                Head {h00=0x004a, h01=0x0050, text=»**                    (MUST NOT BE ALTERED BY THE USER)             **«, t00=0x00a0, t01=0x00d2}
0x0fb00…0fb4e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00a0, t01=0x0120}
0x0fb4e…0fb56                Head {h00=0x0004, h01=0x0050, t00=0x00a0, t01=0x016e}
0x0fb56…0fb62                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a0, t01=0x0176}
0x0fb62…0fb70                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x00a0, t01=0x0182}
0x0fb70…0fb92                Head {h00=0x001e, h01=0x0050, text=»KT08 FORM 8,8,8,8,8,8,8,8 «, t00=0x00a0, t01=0x0190}
0x0fb92…0fbba                Head {h00=0x0024, h01=0x0050, text=»KT07 FORM 8,8,8,8,8,8,8,8=NOKEY «, t00=0x00a1, t01=0x0022}
0x0fbba…0fbd8                Head {h00=0x001a, h01=0x0050, text=»KT06 FORM 8,8,8,8,8,8 «, t00=0x00a1, t01=0x004a}
0x0fbd8…0fbfc                Head {h00=0x0020, h01=0x0050, text=»KT05 FORM 8,8,8,8,8,8=NOKEY «, t00=0x00a1, t01=0x0068}
0x0fbfc…0fc16                Head {h00=0x0016, h01=0x0050, text=»KT04 FORM 8,8,8,8 «, t00=0x00a1, t01=0x008c}
0x0fc16…0fc36                Head {h00=0x001c, h01=0x0050, text=»KT03 FORM 8,8,8,8=NOKEY «, t00=0x00a1, t01=0x00a6}
0x0fc36…0fc4c                Head {h00=0x0012, h01=0x0050, text=»KT02 FORM 8,8 «, t00=0x00a1, t01=0x00c6}
0x0fc4c…0fc68                Head {h00=0x0018, h01=0x0050, text=»KT01 FORM 8,8=NOKEY «, t00=0x00a1, t01=0x00dc}
0x0fc68…0fc76                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x00a1, t01=0x00f8}
0x0fc76…0fc8a                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00a1, t01=0x0106}
0x0fc8a…0fc98                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a1, t01=0x011a}
0x0fc98…0fca0                Head {h00=0x0004, h01=0x0050, t00=0x00a1, t01=0x0128}
0x0fca0…0fcee                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00a1, t01=0x0130}
0x0fcee…0fd3c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00a1, t01=0x017e}
0x0fd3c…0fd74                Head {h00=0x0034, h01=0x0050, text=»** NUMBER OF KEYS. INCREMENT THIS NUMBER WITH AS«, t00=0x00a2, t01=0x003c}
0x0fd74…0fda6                Head {h00=0x002e, h01=0x0050, text=»**  !        MANY KEYS AS YOU WANT TO ADD.«, t00=0x00a2, t01=0x0074}
0x0fda6…0fdb4                Head {h00=0x000a, h01=0x0050, text=»**  ! «, t00=0x00a2, t01=0x00a6}
0x0fdb4…0fdc2                Head {h00=0x000a, h01=0x0050, text=»**  V «, t00=0x00a2, t01=0x00b4}
0x0fdc2…0fdde                Head {h00=0x0018, h01=0x0050, text=»KTB1L EQU 16+X:UKEY «, t00=0x00a2, t01=0x00c2}
0x0fdde…0fde6                Head {h00=0x0004, h01=0x0050, t00=0x00a2, t01=0x00de}
0x0fde6…0fe1c                Head {h00=0x0032, h01=0x0050, text=» KT08 KTB1L,TUP1,TDW1,TFD1,TBD1,PRT1,LIN1,HLP1«, t00=0x00a2, t01=0x00e6}
0x0fe1c…0fe50                Head {h00=0x0030, h01=0x0050, text=» KT08 ARI1,ASD1,CLR1,SEC1,CR1,DUP1,ENT1,FUN1«, t00=0x00a2, t01=0x011c}
0x0fe50…0fe68                Head {h00=0x0014, h01=0x0050, text=» KT02 CAN1,U011 «, t00=0x00a2, t01=0x0150}
0x0fe68…0fe7c                Head {h00=0x0010, h01=0x0050, text=»**    A    A«, t00=0x00a2, t01=0x0168}
0x0fe7c…0fe90                Head {h00=0x0010, h01=0x0050, text=»**    !    !«, t00=0x00a2, t01=0x017c}
0x0fe90…0fec6                Head {h00=0x0032, h01=0x0050, text=»**    !    ADD HERE YOUR KEY CODES WITH COMMAS«, t00=0x00a2, t01=0x0190}
0x0fec6…0fee4                Head {h00=0x001a, h01=0x0050, text=»**    !    IN BETWEEN.«, t00=0x00a3, t01=0x0036}
0x0fee4…0fef4                Head {h00=0x000c, h01=0x0050, text=»**    ! «, t00=0x00a3, t01=0x0054}
0x0fef4…0ff34                Head {h00=0x003c, h01=0x0050, text=»**    INCREMENT THIS DIGIT WITH AS MANY KEYS AS YOU WANT«, t00=0x00a3, t01=0x0064}
0x0ff34…0ff4a                Head {h00=0x0012, h01=0x0050, text=»**    TO ADD. «, t00=0x00a3, t01=0x00a4}
0x0ff4a…0ff54                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00a3, t01=0x00ba}
0x0ff54…0ff96                Head {h00=0x003e, h01=0x0050, text=»** IF MORE THAN 7 EXTRA KEYS ARE NEEDED, INCREMENT WITH 7 «, t00=0x00a3, t01=0x00c4}
0x0ff96…0ffd6                Head {h00=0x003c, h01=0x0050, text=»** AND ADD 7 KEYS TO THIS LINE. THEN CONTINUE WITH A NEW«, t00=0x00a3, t01=0x0106}
0x0ffd6…10012                Head {h00=0x0038, h01=0x0050, text=»** LINE OF THE FOLLOWING LAYOUT (EXCLUDING THE *) : «, t00=0x00a3, t01=0x0146}
0x10012…1001a                Head {h00=0x0004, h01=0x0050, t00=0x00a3, t01=0x0182}
0x1001a…10036                Head {h00=0x0018, h01=0x0050, text=»* KT0X K1,K2,...,KX «, t00=0x00a3, t01=0x018a}
0x10036…1003e                Head {h00=0x0004, h01=0x0050, t00=0x00a4, t01=0x0016}
0x1003e…10078                Head {h00=0x0036, h01=0x0050, text=»** WHERE X DENOTES THE NUMBER OF KEYS ON THE LINE.«, t00=0x00a4, t01=0x001e}
0x10078…10082                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00a4, t01=0x0058}
0x10082…100c4                Head {h00=0x003e, h01=0x0050, text=»** A KEY IS EXCLUDED BY REPLACING ITS EQUATE BY THE EQUATE«, t00=0x00a4, t01=0x0062}
0x100c4…100d6                Head {h00=0x000e, h01=0x0050, text=»** NOKEY. «, t00=0x00a4, t01=0x00a4}
0x100d6…100e0                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00a4, t01=0x00b6}
0x100e0…1012e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00a4, t01=0x00c0}
0x1012e…1013c                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a4, t01=0x010e}
0x1013c…10144                Head {h00=0x0004, h01=0x0050, t00=0x00a4, t01=0x011c}
0x10144…10192                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00a4, t01=0x0124}
0x10192…101e0                Head {h00=0x004a, h01=0x0050, text=»**                    COND. ASSEMBLY FOR WSMGEN                     **«, t00=0x00a4, t01=0x0172}
0x101e0…1022e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00a5, t01=0x0030}
0x1022e…10244                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=0 «, t00=0x00a5, t01=0x007e}
0x10244…1025a                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=1 «, t00=0x00a5, t01=0x0094}
0x1025a…10272                Head {h00=0x0014, h01=0x0050, text=» KT02 U021,U031 «, t00=0x00a5, t01=0x00aa}
0x10272…10288                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=2 «, t00=0x00a5, t01=0x00c2}
0x10288…1029e                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=3 «, t00=0x00a5, t01=0x00d8}
0x1029e…102b6                Head {h00=0x0014, h01=0x0050, text=» KT02 U041,U051 «, t00=0x00a5, t01=0x00ee}
0x102b6…102cc                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=4 «, t00=0x00a5, t01=0x0106}
0x102cc…102e2                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=5 «, t00=0x00a5, t01=0x011c}
0x102e2…102fa                Head {h00=0x0014, h01=0x0050, text=» KT02 U061,U071 «, t00=0x00a5, t01=0x0132}
0x102fa…10310                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=6 «, t00=0x00a5, t01=0x014a}
0x10310…10326                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=7 «, t00=0x00a5, t01=0x0160}
0x10326…1033e                Head {h00=0x0014, h01=0x0050, text=» KT02 U081,U091 «, t00=0x00a5, t01=0x0176}
0x1033e…10354                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=8 «, t00=0x00a5, t01=0x018e}
0x10354…1036a                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=9 «, t00=0x00a6, t01=0x0014}
0x1036a…10382                Head {h00=0x0014, h01=0x0050, text=» KT02 U101,U111 «, t00=0x00a6, t01=0x002a}
0x10382…10398                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=10«, t00=0x00a6, t01=0x0042}
0x10398…103ae                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=11«, t00=0x00a6, t01=0x0058}
0x103ae…103c6                Head {h00=0x0014, h01=0x0050, text=» KT02 U121,U131 «, t00=0x00a6, t01=0x006e}
0x103c6…103dc                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=12«, t00=0x00a6, t01=0x0086}
0x103dc…103f2                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=13«, t00=0x00a6, t01=0x009c}
0x103f2…1040a                Head {h00=0x0014, h01=0x0050, text=» KT02 U141,U151 «, t00=0x00a6, t01=0x00b2}
0x1040a…10420                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=14«, t00=0x00a6, t01=0x00ca}
0x10420…10436                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=15«, t00=0x00a6, t01=0x00e0}
0x10436…1044e                Head {h00=0x0014, h01=0x0050, text=» KT02 U161,U171 «, t00=0x00a6, t01=0x00f6}
0x1044e…10464                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=16«, t00=0x00a6, t01=0x010e}
0x10464…1047a                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=17«, t00=0x00a6, t01=0x0124}
0x1047a…10492                Head {h00=0x0014, h01=0x0050, text=» KT02 U181,U191 «, t00=0x00a6, t01=0x013a}
0x10492…104a8                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=18«, t00=0x00a6, t01=0x0152}
0x104a8…104be                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=19«, t00=0x00a6, t01=0x0168}
0x104be…104d6                Head {h00=0x0014, h01=0x0050, text=» KT02 U201,U211 «, t00=0x00a6, t01=0x017e}
0x104d6…104ec                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=20«, t00=0x00a7, t01=0x0008}
0x104ec…10502                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=21«, t00=0x00a7, t01=0x001e}
0x10502…1051a                Head {h00=0x0014, h01=0x0050, text=» KT02 U221,U231 «, t00=0x00a7, t01=0x0034}
0x1051a…10530                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=22«, t00=0x00a7, t01=0x004c}
0x10530…10546                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=23«, t00=0x00a7, t01=0x0062}
0x10546…1055e                Head {h00=0x0014, h01=0x0050, text=» KT02 U241,U251 «, t00=0x00a7, t01=0x0078}
0x1055e…1056a                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a7, t01=0x0090}
0x1056a…1057e                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00a7, t01=0x009c}
0x1057e…1058c                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a7, t01=0x00b0}
0x1058c…105ac                Head {h00=0x001c, h01=0x0050, text=»** KEYVALIDATION-BITMAP:«, t00=0x00a7, t01=0x00be}
0x105ac…105b6                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00a7, t01=0x00de}
0x105b6…105f6                Head {h00=0x003c, h01=0x0050, text=»** IT IS POSSIBLE TO SELECT WHETHER "MUST ENTER" CHECKS,«, t00=0x00a7, t01=0x00e8}
0x105f6…10636                Head {h00=0x003c, h01=0x0050, text=»** "MUST FILL" CHECKS AND VALIDATIONS SHOULD BE EXECUTED«, t00=0x00a7, t01=0x0128}
0x10636…10678                Head {h00=0x003e, h01=0x0050, text=»** BEFORE THE FUNCTION OF THE END-OF-ITEM KEY IS PERFORMED«, t00=0x00a7, t01=0x0168}
0x10678…1068a                Head {h00=0x000e, h01=0x0050, text=»** OR NOT.«, t00=0x00a8, t01=0x001a}
0x1068a…10694                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00a8, t01=0x002c}
0x10694…106b2                Head {h00=0x001a, h01=0x0050, text=»** IN THE BITMAP BELOW«, t00=0x00a8, t01=0x0036}
0x106b2…106f2                Head {h00=0x003c, h01=0x0050, text=»**  CTU  ,CTD  ,CTF  ,...,CCA    CORRESPOND TO THE KEYS «, t00=0x00a8, t01=0x0054}
0x106f2…10736                Head {h00=0x0040, h01=0x0050, text=»**  TUP1 ,TDW1 ,TFD1 ,...,CAN1   IN W:KTB1 ( OR TO THE KEYS «, t00=0x00a8, t01=0x0094}
0x10736…1076c                Head {h00=0x0032, h01=0x0050, text=»**  NOKEY,NOKEY,TFD2 ,...,CAN2   IN W:KTB2 ). «, t00=0x00a8, t01=0x00d8}
0x1076c…10776                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00a8, t01=0x010e}
0x10776…107ac                Head {h00=0x0032, h01=0x0050, text=»**  C1,C2,...C25 DEFINE 25 POSSIBLE USER KEYS.«, t00=0x00a8, t01=0x0118}
0x107ac…107b6                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00a8, t01=0x014e}
0x107b6…107fa                Head {h00=0x0040, h01=0x0050, text=»** THE CHECKS ARE PERFORMED IF THE BIT IN THE FOLLOWING BIT «, t00=0x00a8, t01=0x0158}
0x107fa…1083a                Head {h00=0x003c, h01=0x0050, text=»** MAP CORRESPONDING WITH THE USED FUNCTION KEY IS SET: «, t00=0x00a9, t01=0x000c}
0x1083a…10844                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00a9, t01=0x004c}
0x10844…10876                Head {h00=0x002e, h01=0x0050, text=»** AS DEFAULT THE FOLLOWING BITS ARE SET: «, t00=0x00a9, t01=0x0056}
0x10876…108b2                Head {h00=0x0038, h01=0x0050, text=»** CTF,CTB,CAS,CSE,CCR,CDU,CEN AND CFU  I.E THE KEYS«, t00=0x00a9, t01=0x0088}
0x108b2…108ea                Head {h00=0x0034, h01=0x0050, text=»** TFD,TBD,ASD,SEC,CR,DUP,ENT AND FUN  WILL GIVE«, t00=0x00a9, t01=0x00c4}
0x108ea…10904                Head {h00=0x0016, h01=0x0050, text=»** VALIDATION ETC.«, t00=0x00a9, t01=0x00fc}
0x10904…1090e                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00a9, t01=0x0116}
0x1090e…1094c                Head {h00=0x003a, h01=0x0050, text=»** IF ANOTHER KEY PATTERN IS REQUIRED, THEN CHANGE THE«, t00=0x00a9, t01=0x0120}
0x1094c…10980                Head {h00=0x0030, h01=0x0050, text=»** CORRESPONDING BITPOSITIONS TO "0" OR "1".«, t00=0x00a9, t01=0x015e}
0x10980…1098a (170, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00aa, t01=0x0004}
0x1098a…10998                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x00aa, t01=0x000e}
0x10998…109aa                Head {h00=0x000e, h01=0x0050, text=»KTU EQU 0 «, t00=0x00aa, t01=0x001c}
0x109aa…109bc                Head {h00=0x000e, h01=0x0050, text=»KTD EQU 0 «, t00=0x00aa, t01=0x002e}
0x109bc…109ce                Head {h00=0x000e, h01=0x0050, text=»KTF EQU 1 «, t00=0x00aa, t01=0x0040}
0x109ce…109e0                Head {h00=0x000e, h01=0x0050, text=»KTB EQU 1 «, t00=0x00aa, t01=0x0052}
0x109e0…109f2                Head {h00=0x000e, h01=0x0050, text=»KPR EQU 0 «, t00=0x00aa, t01=0x0064}
0x109f2…10a04                Head {h00=0x000e, h01=0x0050, text=»KLI EQU 0 «, t00=0x00aa, t01=0x0076}
0x10a04…10a16                Head {h00=0x000e, h01=0x0050, text=»KHL EQU 0 «, t00=0x00aa, t01=0x0088}
0x10a16…10a28                Head {h00=0x000e, h01=0x0050, text=»KAR EQU 0 «, t00=0x00aa, t01=0x009a}
0x10a28…10a3a                Head {h00=0x000e, h01=0x0050, text=»KAS EQU 1 «, t00=0x00aa, t01=0x00ac}
0x10a3a…10a4c                Head {h00=0x000e, h01=0x0050, text=»KCL EQU 0 «, t00=0x00aa, t01=0x00be}
0x10a4c…10a5e                Head {h00=0x000e, h01=0x0050, text=»KSE EQU 1 «, t00=0x00aa, t01=0x00d0}
0x10a5e…10a70                Head {h00=0x000e, h01=0x0050, text=»KCR EQU 1 «, t00=0x00aa, t01=0x00e2}
0x10a70…10a82                Head {h00=0x000e, h01=0x0050, text=»KDU EQU 1 «, t00=0x00aa, t01=0x00f4}
0x10a82…10a94                Head {h00=0x000e, h01=0x0050, text=»KEN EQU 1 «, t00=0x00aa, t01=0x0106}
0x10a94…10aa6                Head {h00=0x000e, h01=0x0050, text=»KFU EQU 1 «, t00=0x00aa, t01=0x0118}
0x10aa6…10ab8                Head {h00=0x000e, h01=0x0050, text=»KCA EQU 0 «, t00=0x00aa, t01=0x012a}
0x10ab8…10ac8                Head {h00=0x000c, h01=0x0050, text=»K1 EQU 0«, t00=0x00aa, t01=0x013c}
0x10ac8…10ad8                Head {h00=0x000c, h01=0x0050, text=»K2 EQU 0«, t00=0x00aa, t01=0x014c}
0x10ad8…10ae8                Head {h00=0x000c, h01=0x0050, text=»K3 EQU 0«, t00=0x00aa, t01=0x015c}
0x10ae8…10af8                Head {h00=0x000c, h01=0x0050, text=»K4 EQU 0«, t00=0x00aa, t01=0x016c}
0x10af8…10b08                Head {h00=0x000c, h01=0x0050, text=»K5 EQU 0«, t00=0x00aa, t01=0x017c}
0x10b08…10b18                Head {h00=0x000c, h01=0x0050, text=»K6 EQU 0«, t00=0x00aa, t01=0x018c}
0x10b18…10b28                Head {h00=0x000c, h01=0x0050, text=»K7 EQU 0«, t00=0x00ab, t01=0x000c}
0x10b28…10b38                Head {h00=0x000c, h01=0x0050, text=»K8 EQU 0«, t00=0x00ab, t01=0x001c}
0x10b38…10b48                Head {h00=0x000c, h01=0x0050, text=»K9 EQU 0«, t00=0x00ab, t01=0x002c}
0x10b48…10b5a                Head {h00=0x000e, h01=0x0050, text=»K10 EQU 0 «, t00=0x00ab, t01=0x003c}
0x10b5a…10b6c                Head {h00=0x000e, h01=0x0050, text=»K11 EQU 0 «, t00=0x00ab, t01=0x004e}
0x10b6c…10b7e                Head {h00=0x000e, h01=0x0050, text=»K12 EQU 0 «, t00=0x00ab, t01=0x0060}
0x10b7e…10b90                Head {h00=0x000e, h01=0x0050, text=»K13 EQU 0 «, t00=0x00ab, t01=0x0072}
0x10b90…10ba2                Head {h00=0x000e, h01=0x0050, text=»K14 EQU 0 «, t00=0x00ab, t01=0x0084}
0x10ba2…10bb4                Head {h00=0x000e, h01=0x0050, text=»K15 EQU 0 «, t00=0x00ab, t01=0x0096}
0x10bb4…10bc6                Head {h00=0x000e, h01=0x0050, text=»K16 EQU 0 «, t00=0x00ab, t01=0x00a8}
0x10bc6…10bd8                Head {h00=0x000e, h01=0x0050, text=»K17 EQU 0 «, t00=0x00ab, t01=0x00ba}
0x10bd8…10bea                Head {h00=0x000e, h01=0x0050, text=»K18 EQU 0 «, t00=0x00ab, t01=0x00cc}
0x10bea…10bfc                Head {h00=0x000e, h01=0x0050, text=»K19 EQU 0 «, t00=0x00ab, t01=0x00de}
0x10bfc…10c0e                Head {h00=0x000e, h01=0x0050, text=»K20 EQU 0 «, t00=0x00ab, t01=0x00f0}
0x10c0e…10c20                Head {h00=0x000e, h01=0x0050, text=»K21 EQU 0 «, t00=0x00ab, t01=0x0102}
0x10c20…10c32                Head {h00=0x000e, h01=0x0050, text=»K22 EQU 0 «, t00=0x00ab, t01=0x0114}
0x10c32…10c44                Head {h00=0x000e, h01=0x0050, text=»K23 EQU 0 «, t00=0x00ab, t01=0x0126}
0x10c44…10c56                Head {h00=0x000e, h01=0x0050, text=»K24 EQU 0 «, t00=0x00ab, t01=0x0138}
0x10c56…10c68                Head {h00=0x000e, h01=0x0050, text=»K25 EQU 0 «, t00=0x00ab, t01=0x014a}
0x10c68…10c7c                Head {h00=0x0010, h01=0x0050, text=»CTU EQU KTU «, t00=0x00ab, t01=0x015c}
0x10c7c…10c90                Head {h00=0x0010, h01=0x0050, text=»CTD EQU KTD «, t00=0x00ab, t01=0x0170}
0x10c90…10ca4                Head {h00=0x0010, h01=0x0050, text=»CTF EQU KTF «, t00=0x00ab, t01=0x0184}
0x10ca4…10cb8                Head {h00=0x0010, h01=0x0050, text=»CTB EQU KTB «, t00=0x00ac, t01=0x0008}
0x10cb8…10ccc                Head {h00=0x0010, h01=0x0050, text=»CPR EQU KPR «, t00=0x00ac, t01=0x001c}
0x10ccc…10ce0                Head {h00=0x0010, h01=0x0050, text=»CLI EQU KLI «, t00=0x00ac, t01=0x0030}
0x10ce0…10cf4                Head {h00=0x0010, h01=0x0050, text=»CHL EQU KHL «, t00=0x00ac, t01=0x0044}
0x10cf4…10d08                Head {h00=0x0010, h01=0x0050, text=»CAR EQU KAR «, t00=0x00ac, t01=0x0058}
0x10d08…10d1c                Head {h00=0x0010, h01=0x0050, text=»CAS EQU KAS «, t00=0x00ac, t01=0x006c}
0x10d1c…10d30                Head {h00=0x0010, h01=0x0050, text=»CCL EQU KCL «, t00=0x00ac, t01=0x0080}
0x10d30…10d44                Head {h00=0x0010, h01=0x0050, text=»CSE EQU KSE «, t00=0x00ac, t01=0x0094}
0x10d44…10d58                Head {h00=0x0010, h01=0x0050, text=»CCR EQU KCR «, t00=0x00ac, t01=0x00a8}
0x10d58…10d6c                Head {h00=0x0010, h01=0x0050, text=»CDU EQU KDU «, t00=0x00ac, t01=0x00bc}
0x10d6c…10d80                Head {h00=0x0010, h01=0x0050, text=»CEN EQU KEN «, t00=0x00ac, t01=0x00d0}
0x10d80…10d94                Head {h00=0x0010, h01=0x0050, text=»CFU EQU KFU «, t00=0x00ac, t01=0x00e4}
0x10d94…10da8                Head {h00=0x0010, h01=0x0050, text=»CCA EQU KCA «, t00=0x00ac, t01=0x00f8}
0x10da8…10dba                Head {h00=0x000e, h01=0x0050, text=»C1 EQU K1 «, t00=0x00ac, t01=0x010c}
0x10dba…10dcc                Head {h00=0x000e, h01=0x0050, text=»C2 EQU K2 «, t00=0x00ac, t01=0x011e}
0x10dcc…10dde                Head {h00=0x000e, h01=0x0050, text=»C3 EQU K3 «, t00=0x00ac, t01=0x0130}
0x10dde…10df0                Head {h00=0x000e, h01=0x0050, text=»C4 EQU K4 «, t00=0x00ac, t01=0x0142}
0x10df0…10e02                Head {h00=0x000e, h01=0x0050, text=»C5 EQU K5 «, t00=0x00ac, t01=0x0154}
0x10e02…10e14                Head {h00=0x000e, h01=0x0050, text=»C6 EQU K6 «, t00=0x00ac, t01=0x0166}
0x10e14…10e26                Head {h00=0x000e, h01=0x0050, text=»C7 EQU K7 «, t00=0x00ac, t01=0x0178}
0x10e26…10e38                Head {h00=0x000e, h01=0x0050, text=»C8 EQU K8 «, t00=0x00ac, t01=0x018a}
0x10e38…10e4a                Head {h00=0x000e, h01=0x0050, text=»C9 EQU K9 «, t00=0x00ad, t01=0x000c}
0x10e4a…10e5e                Head {h00=0x0010, h01=0x0050, text=»C10 EQU K10 «, t00=0x00ad, t01=0x001e}
0x10e5e…10e72                Head {h00=0x0010, h01=0x0050, text=»C11 EQU K11 «, t00=0x00ad, t01=0x0032}
0x10e72…10e86                Head {h00=0x0010, h01=0x0050, text=»C12 EQU K12 «, t00=0x00ad, t01=0x0046}
0x10e86…10e9a                Head {h00=0x0010, h01=0x0050, text=»C13 EQU K13 «, t00=0x00ad, t01=0x005a}
0x10e9a…10eae                Head {h00=0x0010, h01=0x0050, text=»C14 EQU K14 «, t00=0x00ad, t01=0x006e}
0x10eae…10ec2                Head {h00=0x0010, h01=0x0050, text=»C15 EQU K15 «, t00=0x00ad, t01=0x0082}
0x10ec2…10ed6                Head {h00=0x0010, h01=0x0050, text=»C16 EQU K16 «, t00=0x00ad, t01=0x0096}
0x10ed6…10eea                Head {h00=0x0010, h01=0x0050, text=»C17 EQU K17 «, t00=0x00ad, t01=0x00aa}
0x10eea…10efe                Head {h00=0x0010, h01=0x0050, text=»C18 EQU K18 «, t00=0x00ad, t01=0x00be}
0x10efe…10f12                Head {h00=0x0010, h01=0x0050, text=»C19 EQU K19 «, t00=0x00ad, t01=0x00d2}
0x10f12…10f26                Head {h00=0x0010, h01=0x0050, text=»C20 EQU K20 «, t00=0x00ad, t01=0x00e6}
0x10f26…10f3a                Head {h00=0x0010, h01=0x0050, text=»C21 EQU K21 «, t00=0x00ad, t01=0x00fa}
0x10f3a…10f4e                Head {h00=0x0010, h01=0x0050, text=»C22 EQU K22 «, t00=0x00ad, t01=0x010e}
0x10f4e…10f62                Head {h00=0x0010, h01=0x0050, text=»C23 EQU K23 «, t00=0x00ad, t01=0x0122}
0x10f62…10f76                Head {h00=0x0010, h01=0x0050, text=»C24 EQU K24 «, t00=0x00ad, t01=0x0136}
0x10f76…10f8a                Head {h00=0x0010, h01=0x0050, text=»C25 EQU K25 «, t00=0x00ad, t01=0x014a}
0x10f8a…10f98                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x00ad, t01=0x015e}
0x10f98…10fa0                Head {h00=0x0004, h01=0x0050, t00=0x00ad, t01=0x016c}
0x10fa0…10fb8                Head {h00=0x0014, h01=0x0050, text=»** B I T M A P :«, t00=0x00ad, t01=0x0174}
0x10fb8…10fc0                Head {h00=0x0004, h01=0x0050, t00=0x00ad, t01=0x018c}
0x10fc0…10fcc (174, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ae, t01=0x0004}
0x10fcc…10fe0                Head {h00=0x0010, h01=0x0050, text=»W:KT1V EQU *«, t00=0x00ae, t01=0x0010}
0x10fe0…10ff4                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00ae, t01=0x0024}
0x10ff4…11040                Head {h00=0x0048, h01=0x0050, text=» BIT16 0,CTU,CTD,CTF,CTB,CPR,CLI,CHL,CAR,CAS,CCL,CSE,CCR,CDU,CEN,CFU«, t00=0x00ae, t01=0x0038}
0x11040…11086                Head {h00=0x0042, h01=0x0050, text=» BIT16 CCA,C1,C2,C3,C4,C5,C6,C7,C8,C9,C10,C11,C12,C13,C14,C15 «, t00=0x00ae, t01=0x0084}
0x11086…110c6                Head {h00=0x003c, h01=0x0050, text=» BIT16 C16,C17,C18,C19,C20,C21,C22,C23,C24,C25,0,0,0,0,0«, t00=0x00ae, t01=0x00ca}
0x110c6…110d0                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00ae, t01=0x010a}
0x110d0…110da                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00ae, t01=0x0114}
0x110da…110e8                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ae, t01=0x011e}
0x110e8…110f2                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00ae, t01=0x012c}
0x110f2…11124                Head {h00=0x002e, h01=0x0050, text=»** NOTE: LIN AND ARI ARE NOT IMPLEMENTED. «, t00=0x00ae, t01=0x0136}
0x11124…1112e                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00ae, t01=0x0168}
0x1112e…11172                Head {h00=0x0040, h01=0x0050, text=»** NOTE: AFTER HLP, CLR AND CAN CHECKS ARE NEVER PERFORMED. «, t00=0x00ae, t01=0x0172}
0x11172…1117c                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00af, t01=0x0026}
0x1117c…111be                Head {h00=0x003e, h01=0x0050, text=»** NOTE: THE ASD BIT SHOULD BE SET LIKE THE TFD BIT. ( BY «, t00=0x00af, t01=0x0030}
0x111be…11200                Head {h00=0x003e, h01=0x0050, text=»**       TURNING ON THE AUTO S/D/B SWITCH AT A FIELD WITH «, t00=0x00af, t01=0x0072}
0x11200…11240                Head {h00=0x003c, h01=0x0050, text=»**       E.G. THE AUTO SKIP ATTRIBUTE SET INPUT TO THAT «, t00=0x00af, t01=0x00b4}
0x11240…1126c                Head {h00=0x0028, h01=0x0050, text=»**       FIELD WILL BE TERMINATED. )«, t00=0x00af, t01=0x00f4}
0x1126c…11276                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00af, t01=0x0120}
0x11276…112b6                Head {h00=0x003c, h01=0x0050, text=»** NOTE: ALTHOUGH THE CURRENT END-OF-ITEM KEY BIT IS SET«, t00=0x00af, t01=0x012a}
0x112b6…11304                Head {h00=0x004a, h01=0x0050, text=»**       A FIELD IS VALIDATED ONLY IF IT IS MODIFIED AND NOT EMPTY OR «, t00=0x00af, t01=0x016a}
0x11304…11346                Head {h00=0x003e, h01=0x0050, text=»**       IF IT HAS THE MANDATORY VALIDATION ATTRIBUTE SET.«, t00=0x00b0, t01=0x0028}
0x11346…11394                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00b0, t01=0x006a}
0x11394…113e2                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00b0, t01=0x00b8}
0x113e2…113ea                Head {h00=0x0004, h01=0x0050, t00=0x00b0, t01=0x0106}
0x113ea…113f8                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b0, t01=0x010e}
0x113f8…11400                Head {h00=0x0004, h01=0x0050, t00=0x00b0, t01=0x011c}
0x11400…1140c                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b0, t01=0x0124}
0x1140c…11428                Head {h00=0x0018, h01=0x0050, text=»W:KTB2   EQU      * «, t00=0x00b0, t01=0x0130}
0x11428…1143c                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00b0, t01=0x014c}
0x1143c…1148a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00b0, t01=0x0160}
0x1148a…114d8                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00b1, t01=0x001e}
0x114d8…11526                Head {h00=0x004a, h01=0x0050, text=»**  W:KTB2            KEYTABLE 2. USED IN:                          **«, t00=0x00b1, t01=0x006c}
0x11526…11574                Head {h00=0x004a, h01=0x0050, text=»**                    1. NORMAL READ IN PROTECTED DYN FIELDS.       **«, t00=0x00b1, t01=0x00ba}
0x11574…115c2                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00b1, t01=0x0108}
0x115c2…11610                Head {h00=0x004a, h01=0x0050, text=»**                    KEYTABLE 2 CAN BE ALTERED BY THE USER IN THE  **«, t00=0x00b1, t01=0x0156}
0x11610…1165e                Head {h00=0x004a, h01=0x0050, text=»**                    SAME WAY AS KEYTABLE 1.                       **«, t00=0x00b2, t01=0x0014}
0x1165e…116ac                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00b2, t01=0x0062}
0x116ac…116fa                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00b2, t01=0x00b0}
0x116fa…11702                Head {h00=0x0004, h01=0x0050, t00=0x00b2, t01=0x00fe}
0x11702…1171a                Head {h00=0x0014, h01=0x0050, text=»KTB2L EQU KTB1L «, t00=0x00b2, t01=0x0106}
0x1171a…11752                Head {h00=0x0034, h01=0x0050, text=» KT08 KTB2L,TUP2,TDW2,TFD2,TBD2,PRT2,NOKEY,HLP2 «, t00=0x00b2, t01=0x011e}
0x11752…1178a                Head {h00=0x0034, h01=0x0050, text=» KT08 ARI2,NOKEY,NOKEY,SEC2,CR2,NOKEY,ENT2,FUN2 «, t00=0x00b2, t01=0x0156}
0x1178a…117a2                Head {h00=0x0014, h01=0x0050, text=» KT02 CAN2,U012 «, t00=0x00b2, t01=0x018e}
0x117a2…117aa                Head {h00=0x0004, h01=0x0050, t00=0x00b3, t01=0x0016}
0x117aa…117b2                Head {h00=0x0004, h01=0x0050, t00=0x00b3, t01=0x001e}
0x117b2…11800                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00b3, t01=0x0026}
0x11800…1184e                Head {h00=0x004a, h01=0x0050, text=»**                    COND. ASSEMBLY FOR WSMGEN                     **«, t00=0x00b3, t01=0x0074}
0x1184e…1189c                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x00b3, t01=0x00c2}
0x1189c…118ea                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00b3, t01=0x0110}
0x118ea…11900                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=0 «, t00=0x00b3, t01=0x015e}
0x11900…11916                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=1 «, t00=0x00b3, t01=0x0174}
0x11916…1192e                Head {h00=0x0014, h01=0x0050, text=» KT02 U022,U032 «, t00=0x00b3, t01=0x018a}
0x1192e…11944                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=2 «, t00=0x00b4, t01=0x0012}
0x11944…1195a                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=3 «, t00=0x00b4, t01=0x0028}
0x1195a…11972                Head {h00=0x0014, h01=0x0050, text=» KT02 U042,U052 «, t00=0x00b4, t01=0x003e}
0x11972…11988                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=4 «, t00=0x00b4, t01=0x0056}
0x11988…1199e                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=5 «, t00=0x00b4, t01=0x006c}
0x1199e…119b6                Head {h00=0x0014, h01=0x0050, text=» KT02 U062,U072 «, t00=0x00b4, t01=0x0082}
0x119b6…119cc                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=6 «, t00=0x00b4, t01=0x009a}
0x119cc…119e2                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=7 «, t00=0x00b4, t01=0x00b0}
0x119e2…119fa                Head {h00=0x0014, h01=0x0050, text=» KT02 U082,U092 «, t00=0x00b4, t01=0x00c6}
0x119fa…11a10                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=8 «, t00=0x00b4, t01=0x00de}
0x11a10…11a26                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=9 «, t00=0x00b4, t01=0x00f4}
0x11a26…11a3e                Head {h00=0x0014, h01=0x0050, text=» KT02 U102,U112 «, t00=0x00b4, t01=0x010a}
0x11a3e…11a54                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=10«, t00=0x00b4, t01=0x0122}
0x11a54…11a6a                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=11«, t00=0x00b4, t01=0x0138}
0x11a6a…11a82                Head {h00=0x0014, h01=0x0050, text=» KT02 U122,U132 «, t00=0x00b4, t01=0x014e}
0x11a82…11a98                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=12«, t00=0x00b4, t01=0x0166}
0x11a98…11aae                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=13«, t00=0x00b4, t01=0x017c}
0x11aae…11ac6 (181, 0, 400)  Head {h00=0x0014, h01=0x0050, text=» KT02 U142,U152 «, t00=0x00b5, t01=0x0004}
0x11ac6…11adc                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=14«, t00=0x00b5, t01=0x001c}
0x11adc…11af2                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=15«, t00=0x00b5, t01=0x0032}
0x11af2…11b0a                Head {h00=0x0014, h01=0x0050, text=» KT02 U162,U172 «, t00=0x00b5, t01=0x0048}
0x11b0a…11b20                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=16«, t00=0x00b5, t01=0x0060}
0x11b20…11b36                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=17«, t00=0x00b5, t01=0x0076}
0x11b36…11b4e                Head {h00=0x0014, h01=0x0050, text=» KT02 U182,U192 «, t00=0x00b5, t01=0x008c}
0x11b4e…11b64                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=18«, t00=0x00b5, t01=0x00a4}
0x11b64…11b7a                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=19«, t00=0x00b5, t01=0x00ba}
0x11b7a…11b92                Head {h00=0x0014, h01=0x0050, text=» KT02 U202,U212 «, t00=0x00b5, t01=0x00d0}
0x11b92…11ba8                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=20«, t00=0x00b5, t01=0x00e8}
0x11ba8…11bbe                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=21«, t00=0x00b5, t01=0x00fe}
0x11bbe…11bd6                Head {h00=0x0014, h01=0x0050, text=» KT02 U222,U232 «, t00=0x00b5, t01=0x0114}
0x11bd6…11bec                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=22«, t00=0x00b5, t01=0x012c}
0x11bec…11c02                Head {h00=0x0012, h01=0x0050, text=» IFF X:UKEY=23«, t00=0x00b5, t01=0x0142}
0x11c02…11c1a                Head {h00=0x0014, h01=0x0050, text=» KT02 U242,U252 «, t00=0x00b5, t01=0x0158}
0x11c1a…11c26                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b5, t01=0x0170}
0x11c26…11c3a                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00b5, t01=0x017c}
0x11c3a…11c48                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b5, t01=0x0190}
0x11c48…11c50                Head {h00=0x0004, h01=0x0050, t00=0x00b6, t01=0x000e}
0x11c50…11c5c                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b6, t01=0x0016}
0x11c5c…11c78                Head {h00=0x0018, h01=0x0050, text=»W:KTB3   EQU      * «, t00=0x00b6, t01=0x0022}
0x11c78…11c8c                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00b6, t01=0x003e}
0x11c8c…11cda                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00b6, t01=0x0052}
0x11cda…11d28                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00b6, t01=0x00a0}
0x11d28…11d76                Head {h00=0x004a, h01=0x0050, text=»**  W:KTB3            KEYTABLE 3. USED IN:                          **«, t00=0x00b6, t01=0x00ee}
0x11d76…11dc4                Head {h00=0x004a, h01=0x0050, text=»**                    1. 1:ST READ AFTER SECTION KEY STROKE.        **«, t00=0x00b6, t01=0x013c}
0x11dc4…11e12                Head {h00=0x004a, h01=0x0050, text=»**                    NOTE:                                         **«, t00=0x00b6, t01=0x018a}
0x11e12…11e60                Head {h00=0x004a, h01=0x0050, text=»**                    1. THE NUMBER OF KEYS MUST NOT BE ALTERED.    **«, t00=0x00b7, t01=0x0048}
0x11e60…11eae                Head {h00=0x004a, h01=0x0050, text=»**                    2. KEYS CAN BE REPLACED BY OTHER KEYS OR      **«, t00=0x00b7, t01=0x0096}
0x11eae…11efc                Head {h00=0x004a, h01=0x0050, text=»**                    BE EXCLUDED.                                  **«, t00=0x00b7, t01=0x00e4}
0x11efc…11f4a                Head {h00=0x004a, h01=0x0050, text=»**                    3. TO EXCLUDE A KEY THE EQUATE NOKEY          **«, t00=0x00b7, t01=0x0132}
0x11f4a…11f98                Head {h00=0x004a, h01=0x0050, text=»**                    SHOULD BE USED.                               **«, t00=0x00b7, t01=0x0180}
0x11f98…11fe6                Head {h00=0x004a, h01=0x0050, text=»**                    4. ONLY THE POSITION IN THE KEY TABLE         **«, t00=0x00b8, t01=0x003e}
0x11fe6…12034                Head {h00=0x004a, h01=0x0050, text=»**                    DETERMINE THE FUNCTION OF THE KEY.            **«, t00=0x00b8, t01=0x008c}
0x12034…12082                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00b8, t01=0x00da}
0x12082…120d0                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00b8, t01=0x0128}
0x120d0…120d8                Head {h00=0x0004, h01=0x0050, t00=0x00b8, t01=0x0176}
0x120d8…120ec                Head {h00=0x0010, h01=0x0050, text=»KTB3L EQU 7 «, t00=0x00b8, t01=0x017e}
0x120ec…12122 (185, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» KT08 KTB3L,INS3,DEL3,TFD3,TBD3,PRT3,CLR3,CAN3«, t00=0x00b9, t01=0x0004}
0x12122…1212a                Head {h00=0x0004, h01=0x0050, t00=0x00b9, t01=0x003a}
0x1212a…12136                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b9, t01=0x0042}
0x12136…12152                Head {h00=0x0018, h01=0x0050, text=»W:KTB4   EQU      * «, t00=0x00b9, t01=0x004e}
0x12152…12166                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00b9, t01=0x006a}
0x12166…121b4                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00b9, t01=0x007e}
0x121b4…12202                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00b9, t01=0x00cc}
0x12202…12250                Head {h00=0x004a, h01=0x0050, text=»**  W:KTB4            KEYTABLE 4. USED IN:                          **«, t00=0x00b9, t01=0x011a}
0x12250…1229e                Head {h00=0x004a, h01=0x0050, text=»**                    1. SECOND READ AFTER SECTION KEY STROKE       **«, t00=0x00b9, t01=0x0168}
0x1229e…122ec                Head {h00=0x004a, h01=0x0050, text=»**                    2. 1:ST READ AFTER FUNCTION KEY STROKE.       **«, t00=0x00ba, t01=0x0026}
0x122ec…1233a                Head {h00=0x004a, h01=0x0050, text=»**                    NOTE: SEE W:KTB3.                             **«, t00=0x00ba, t01=0x0074}
0x1233a…12388                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00ba, t01=0x00c2}
0x12388…123d6                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00ba, t01=0x0110}
0x123d6…123de                Head {h00=0x0004, h01=0x0050, t00=0x00ba, t01=0x015e}
0x123de…123f2                Head {h00=0x0010, h01=0x0050, text=»KTB4L EQU 3 «, t00=0x00ba, t01=0x0166}
0x123f2…12414                Head {h00=0x001e, h01=0x0050, text=» KT04 KTB4L,CLR4,ENT4,CAN4«, t00=0x00ba, t01=0x017a}
0x12414…12422                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bb, t01=0x000c}
0x12422…1242a                Head {h00=0x0004, h01=0x0050, t00=0x00bb, t01=0x001a}
0x1242a…12436                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bb, t01=0x0022}
0x12436…12452                Head {h00=0x0018, h01=0x0050, text=»W:KTB5   EQU      * «, t00=0x00bb, t01=0x002e}
0x12452…12466                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00bb, t01=0x004a}
0x12466…124b4                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00bb, t01=0x005e}
0x124b4…12502                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00bb, t01=0x00ac}
0x12502…12550                Head {h00=0x004a, h01=0x0050, text=»**  W:KTB5            KEYTABLE 5. USED IN:                          **«, t00=0x00bb, t01=0x00fa}
0x12550…1259e                Head {h00=0x004a, h01=0x0050, text=»**                    ERROR  SITUATIONS.                            **«, t00=0x00bb, t01=0x0148}
0x1259e…125ec                Head {h00=0x004a, h01=0x0050, text=»**                    NOTE: SEE W:KTB3.                             **«, t00=0x00bc, t01=0x0008}
0x125ec…1263a                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00bc, t01=0x0056}
0x1263a…12688                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00bc, t01=0x00a4}
0x12688…12690                Head {h00=0x0004, h01=0x0050, t00=0x00bc, t01=0x00f2}
0x12690…126a4                Head {h00=0x0010, h01=0x0050, text=»KTB5L EQU 2 «, t00=0x00bc, t01=0x00fa}
0x126a4…126c2                Head {h00=0x001a, h01=0x0050, text=» KT03 KTB5L,CLR5,CAN5 «, t00=0x00bc, t01=0x010e}
0x126c2…126ca                Head {h00=0x0004, h01=0x0050, t00=0x00bc, t01=0x012c}
0x126ca…126d6                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bc, t01=0x0134}
0x126d6…126f2                Head {h00=0x0018, h01=0x0050, text=»W:KTB6   EQU      * «, t00=0x00bc, t01=0x0140}
0x126f2…12706                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00bc, t01=0x015c}
0x12706…12754                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00bc, t01=0x0170}
0x12754…127a2                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00bd, t01=0x002e}
0x127a2…127f0                Head {h00=0x004a, h01=0x0050, text=»**  W:KTB6            KEYTABLE 6.USED IN:                           **«, t00=0x00bd, t01=0x007c}
0x127f0…1283e                Head {h00=0x004a, h01=0x0050, text=»**                    WARNING SITUATIONS.                           **«, t00=0x00bd, t01=0x00ca}
0x1283e…1288c                Head {h00=0x004a, h01=0x0050, text=»**                    NOTE: SEE W:KTB3.                             **«, t00=0x00bd, t01=0x0118}
0x1288c…128da                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00bd, t01=0x0166}
0x128da…12928                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00be, t01=0x0024}
0x12928…12930                Head {h00=0x0004, h01=0x0050, t00=0x00be, t01=0x0072}
0x12930…12944                Head {h00=0x0010, h01=0x0050, text=»KTB6L EQU 3 «, t00=0x00be, t01=0x007a}
0x12944…12966                Head {h00=0x001e, h01=0x0050, text=» KT04 KTB6L,CLR6,CAN6,OV6 «, t00=0x00be, t01=0x008e}
0x12966…12972                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00be, t01=0x00b0}
0x12972…12980                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00be, t01=0x00bc}
0x12980…12988                Head {h00=0x0004, h01=0x0050, t00=0x00be, t01=0x00ca}
0x12988…12990                Head {h00=0x0004, h01=0x0050, t00=0x00be, t01=0x00d2}
0x12990…12998                Head {h00=0x0004, h01=0x0050, t00=0x00be, t01=0x00da}
0x12998…129a0                Head {h00=0x0004, h01=0x0050, t00=0x00be, t01=0x00e2}
0x129a0…129a8                Head {h00=0x0004, h01=0x0050, t00=0x00be, t01=0x00ea}
0x129a8…129b0                Head {h00=0x0004, h01=0x0050, t00=0x00be, t01=0x00f2}
0x129b0…129b8                Head {h00=0x0004, h01=0x0050, t00=0x00be, t01=0x00fa}
0x129b8…129c0                Head {h00=0x0004, h01=0x0050, t00=0x00be, t01=0x0102}
0x129c0…129c8                Head {h00=0x0004, h01=0x0050, t00=0x00be, t01=0x010a}
0x129c8…129d0                Head {h00=0x0004, h01=0x0050, t00=0x00be, t01=0x0112}
0x129d0…12a1e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00be, t01=0x011a}
0x12a1e…12a6c                Head {h00=0x004a, h01=0x0050, text=»**                    4. DEFINITION OF SYSTEM MESSAGES:             **«, t00=0x00be, t01=0x0168}
0x12a6c…12aba                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00bf, t01=0x0026}
0x12aba…12ace                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00bf, t01=0x0074}
0x12ace…12adc                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bf, t01=0x0088}
0x12adc…12ae4                Head {h00=0x0004, h01=0x0050, t00=0x00bf, t01=0x0096}
0x12ae4…12b00                Head {h00=0x0018, h01=0x0050, text=»W:SM     EQU      * «, t00=0x00bf, t01=0x009e}
0x12b00…12b4e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00bf, t01=0x00ba}
0x12b4e…12b9c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00bf, t01=0x0108}
0x12b9c…12bea                Head {h00=0x004a, h01=0x0050, text=»**  W:SM              WSM SYSTEM MESSAGES.                          **«, t00=0x00bf, t01=0x0156}
0x12bea…12c38                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00c0, t01=0x0014}
0x12c38…12c86                Head {h00=0x004a, h01=0x0050, text=»**                    ALL 5 MESSAGES CAN BE CHANGED OR TRANSLATED   **«, t00=0x00c0, t01=0x0062}
0x12c86…12cd4                Head {h00=0x004a, h01=0x0050, text=»**                    BY THE USER.                                  **«, t00=0x00c0, t01=0x00b0}
0x12cd4…12d22                Head {h00=0x004a, h01=0x0050, text=»**                    JUST REPLACE THE TEXTS WITHIN 'BLIPS'.        **«, t00=0x00c0, t01=0x00fe}
0x12d22…12d70                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00c0, t01=0x014c}
0x12d70…12dbe                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00c1, t01=0x000a}
0x12dbe…12dc6                Head {h00=0x0004, h01=0x0050, t00=0x00c1, t01=0x0058}
0x12dc6…12dce                Head {h00=0x0004, h01=0x0050, t00=0x00c1, t01=0x0060}
0x12dce…12e1c                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00c1, t01=0x0068}
0x12e1c…12e6a                Head {h00=0x004a, h01=0x0050, text=»**                    EQUATES FOR WSMGEN                            **«, t00=0x00c1, t01=0x00b6}
0x12e6a…12eb8                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x00c1, t01=0x0104}
0x12eb8…12f06                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00c1, t01=0x0152}
0x12f06…12f14                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x00c2, t01=0x0010}
0x12f14…12f28                Head {h00=0x0010, h01=0x0050, text=»X:SM01 EQU 0«, t00=0x00c2, t01=0x001e}
0x12f28…12f40                Head {h00=0x0014, h01=0x0050, text=»XSM01 EQU X:SM01«, t00=0x00c2, t01=0x0032}
0x12f40…12f54                Head {h00=0x0010, h01=0x0050, text=»X:SM02 EQU 0«, t00=0x00c2, t01=0x004a}
0x12f54…12f6c                Head {h00=0x0014, h01=0x0050, text=»XSM02 EQU X:SM02«, t00=0x00c2, t01=0x005e}
0x12f6c…12f80                Head {h00=0x0010, h01=0x0050, text=»X:SM03 EQU 0«, t00=0x00c2, t01=0x0076}
0x12f80…12f98                Head {h00=0x0014, h01=0x0050, text=»XSM03 EQU X:SM03«, t00=0x00c2, t01=0x008a}
0x12f98…12fac                Head {h00=0x0010, h01=0x0050, text=»X:SM04 EQU 0«, t00=0x00c2, t01=0x00a2}
0x12fac…12fc4                Head {h00=0x0014, h01=0x0050, text=»XSM04 EQU X:SM04«, t00=0x00c2, t01=0x00b6}
0x12fc4…12fd8                Head {h00=0x0010, h01=0x0050, text=»X:SM05 EQU 0«, t00=0x00c2, t01=0x00ce}
0x12fd8…12ff0                Head {h00=0x0014, h01=0x0050, text=»XSM05 EQU X:SM05«, t00=0x00c2, t01=0x00e2}
0x12ff0…13004                Head {h00=0x0010, h01=0x0050, text=»X:SM5C EQU 0«, t00=0x00c2, t01=0x00fa}
0x13004…1301c                Head {h00=0x0014, h01=0x0050, text=»XSM5C EQU X:SM5C«, t00=0x00c2, t01=0x010e}
0x1301c…13030                Head {h00=0x0010, h01=0x0050, text=»X:SM5S EQU 0«, t00=0x00c2, t01=0x0126}
0x13030…13048                Head {h00=0x0014, h01=0x0050, text=»XSM5S EQU X:SM5S«, t00=0x00c2, t01=0x013a}
0x13048…13056                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x00c2, t01=0x0152}
0x13056…1305e                Head {h00=0x0004, h01=0x0050, t00=0x00c2, t01=0x0160}
0x1305e…13066                Head {h00=0x0004, h01=0x0050, t00=0x00c2, t01=0x0168}
0x13066…13072                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c2, t01=0x0170}
0x13072…130a2                Head {h00=0x002c, h01=0x0050, text=»W:SM01 EQU * EMTPY MANDATORY FIELD FOUND«, t00=0x00c2, t01=0x017c}
0x130a2…130b6                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00c3, t01=0x001c}
0x130b6…130ec                Head {h00=0x0032, h01=0x0050, text=» DATA SM01E-W:SM01 ***************************«, t00=0x00c3, t01=0x0030}
0x130ec…13100                Head {h00=0x0010, h01=0x0050, text=» IFT XSM01=0«, t00=0x00c3, t01=0x0066}
0x13100…13120                Head {h00=0x001c, h01=0x0050, text=» DATA 'MANDATORY FIELD' «, t00=0x00c3, t01=0x007a}
0x13120…1312c                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c3, t01=0x009a}
0x1312c…13140                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00c3, t01=0x00a6}
0x13140…13154                Head {h00=0x0010, h01=0x0050, text=» IFF XSM01=0«, t00=0x00c3, t01=0x00ba}
0x13154…1316a                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R01 «, t00=0x00c3, t01=0x00ce}
0x1316a…1317e                Head {h00=0x0010, h01=0x0050, text=» IFF XSM01=1«, t00=0x00c3, t01=0x00e4}
0x1317e…13194                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R02 «, t00=0x00c3, t01=0x00f8}
0x13194…131a8                Head {h00=0x0010, h01=0x0050, text=» IFF XSM01=2«, t00=0x00c3, t01=0x010e}
0x131a8…131be                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R03 «, t00=0x00c3, t01=0x0122}
0x131be…131d2                Head {h00=0x0010, h01=0x0050, text=» IFF XSM01=3«, t00=0x00c3, t01=0x0138}
0x131d2…131e8                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R04 «, t00=0x00c3, t01=0x014c}
0x131e8…131fc                Head {h00=0x0010, h01=0x0050, text=» IFF XSM01=4«, t00=0x00c3, t01=0x0162}
0x131fc…13212                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R04 «, t00=0x00c3, t01=0x0176}
0x13212…13226                Head {h00=0x0010, h01=0x0050, text=» IFF XSM01=5«, t00=0x00c3, t01=0x018c}
0x13226…1323c                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R05 «, t00=0x00c4, t01=0x0010}
0x1323c…13250                Head {h00=0x0010, h01=0x0050, text=» IFF XSM01=6«, t00=0x00c4, t01=0x0026}
0x13250…13266                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R06 «, t00=0x00c4, t01=0x003a}
0x13266…1327a                Head {h00=0x0010, h01=0x0050, text=» IFF XSM01=7«, t00=0x00c4, t01=0x0050}
0x1327a…13290                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R07 «, t00=0x00c4, t01=0x0064}
0x13290…132a4                Head {h00=0x0010, h01=0x0050, text=» IFF XSM01=8«, t00=0x00c4, t01=0x007a}
0x132a4…132ba                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R08 «, t00=0x00c4, t01=0x008e}
0x132ba…132ce                Head {h00=0x0010, h01=0x0050, text=» IFF XSM01=9«, t00=0x00c4, t01=0x00a4}
0x132ce…132e4                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R09 «, t00=0x00c4, t01=0x00b8}
0x132e4…132fa                Head {h00=0x0012, h01=0x0050, text=» IFF XSM01=10 «, t00=0x00c4, t01=0x00ce}
0x132fa…13310                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R10 «, t00=0x00c4, t01=0x00e4}
0x13310…13326                Head {h00=0x0012, h01=0x0050, text=» IFF XSM01=11 «, t00=0x00c4, t01=0x00fa}
0x13326…1333c                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R11 «, t00=0x00c4, t01=0x0110}
0x1333c…13352                Head {h00=0x0012, h01=0x0050, text=» IFF XSM01=12 «, t00=0x00c4, t01=0x0126}
0x13352…13368                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R12 «, t00=0x00c4, t01=0x013c}
0x13368…1337e                Head {h00=0x0012, h01=0x0050, text=» IFF XSM01=13 «, t00=0x00c4, t01=0x0152}
0x1337e…13394                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R13 «, t00=0x00c4, t01=0x0168}
0x13394…133aa                Head {h00=0x0012, h01=0x0050, text=» IFF XSM01=14 «, t00=0x00c4, t01=0x017e}
0x133aa…133c0 (197, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» DATA SM01R14 «, t00=0x00c5, t01=0x0004}
0x133c0…133d6                Head {h00=0x0012, h01=0x0050, text=» IFF XSM01=15 «, t00=0x00c5, t01=0x001a}
0x133d6…133ec                Head {h00=0x0012, h01=0x0050, text=» DATA SM01R15 «, t00=0x00c5, t01=0x0030}
0x133ec…133f8                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c5, t01=0x0046}
0x133f8…1340c                Head {h00=0x0010, h01=0x0050, text=»SM01E EQU * «, t00=0x00c5, t01=0x0052}
0x1340c…13440                Head {h00=0x0030, h01=0x0050, text=»W:SM02 EQU * NOT FULL MUST FILL FIELD FOUND «, t00=0x00c5, t01=0x0066}
0x13440…13454                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00c5, t01=0x009a}
0x13454…1348e                Head {h00=0x0036, h01=0x0050, text=» DATA SM02E-W:SM02 ****************************** «, t00=0x00c5, t01=0x00ae}
0x1348e…134a2                Head {h00=0x0010, h01=0x0050, text=» IFT XSM02=0«, t00=0x00c5, t01=0x00e8}
0x134a2…134ca                Head {h00=0x0024, h01=0x0050, text=» DATA 'DIGITS OR CHAR.S MISSING'«, t00=0x00c5, t01=0x00fc}
0x134ca…134d6                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c5, t01=0x0124}
0x134d6…134ea                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00c5, t01=0x0130}
0x134ea…134fe                Head {h00=0x0010, h01=0x0050, text=» IFF XSM02=0«, t00=0x00c5, t01=0x0144}
0x134fe…13514                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R01 «, t00=0x00c5, t01=0x0158}
0x13514…13528                Head {h00=0x0010, h01=0x0050, text=» IFF XSM02=1«, t00=0x00c5, t01=0x016e}
0x13528…1353e                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R02 «, t00=0x00c5, t01=0x0182}
0x1353e…13552                Head {h00=0x0010, h01=0x0050, text=» IFF XSM02=2«, t00=0x00c6, t01=0x0008}
0x13552…13568                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R03 «, t00=0x00c6, t01=0x001c}
0x13568…1357c                Head {h00=0x0010, h01=0x0050, text=» IFF XSM02=3«, t00=0x00c6, t01=0x0032}
0x1357c…13592                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R04 «, t00=0x00c6, t01=0x0046}
0x13592…135a6                Head {h00=0x0010, h01=0x0050, text=» IFF XSM02=4«, t00=0x00c6, t01=0x005c}
0x135a6…135bc                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R04 «, t00=0x00c6, t01=0x0070}
0x135bc…135d0                Head {h00=0x0010, h01=0x0050, text=» IFF XSM02=5«, t00=0x00c6, t01=0x0086}
0x135d0…135e6                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R05 «, t00=0x00c6, t01=0x009a}
0x135e6…135fa                Head {h00=0x0010, h01=0x0050, text=» IFF XSM02=6«, t00=0x00c6, t01=0x00b0}
0x135fa…13610                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R06 «, t00=0x00c6, t01=0x00c4}
0x13610…13624                Head {h00=0x0010, h01=0x0050, text=» IFF XSM02=7«, t00=0x00c6, t01=0x00da}
0x13624…1363a                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R07 «, t00=0x00c6, t01=0x00ee}
0x1363a…1364e                Head {h00=0x0010, h01=0x0050, text=» IFF XSM02=8«, t00=0x00c6, t01=0x0104}
0x1364e…13664                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R08 «, t00=0x00c6, t01=0x0118}
0x13664…13678                Head {h00=0x0010, h01=0x0050, text=» IFF XSM02=9«, t00=0x00c6, t01=0x012e}
0x13678…1368e                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R09 «, t00=0x00c6, t01=0x0142}
0x1368e…136a4                Head {h00=0x0012, h01=0x0050, text=» IFF XSM02=10 «, t00=0x00c6, t01=0x0158}
0x136a4…136ba                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R10 «, t00=0x00c6, t01=0x016e}
0x136ba…136d0                Head {h00=0x0012, h01=0x0050, text=» IFF XSM02=11 «, t00=0x00c6, t01=0x0184}
0x136d0…136e6                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R11 «, t00=0x00c7, t01=0x000a}
0x136e6…136fc                Head {h00=0x0012, h01=0x0050, text=» IFF XSM02=12 «, t00=0x00c7, t01=0x0020}
0x136fc…13712                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R12 «, t00=0x00c7, t01=0x0036}
0x13712…13728                Head {h00=0x0012, h01=0x0050, text=» IFF XSM02=13 «, t00=0x00c7, t01=0x004c}
0x13728…1373e                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R13 «, t00=0x00c7, t01=0x0062}
0x1373e…13754                Head {h00=0x0012, h01=0x0050, text=» IFF XSM02=14 «, t00=0x00c7, t01=0x0078}
0x13754…1376a                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R14 «, t00=0x00c7, t01=0x008e}
0x1376a…13780                Head {h00=0x0012, h01=0x0050, text=» IFF XSM02=15 «, t00=0x00c7, t01=0x00a4}
0x13780…13796                Head {h00=0x0012, h01=0x0050, text=» DATA SM02R15 «, t00=0x00c7, t01=0x00ba}
0x13796…137a2                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c7, t01=0x00d0}
0x137a2…137b6                Head {h00=0x0010, h01=0x0050, text=»SM02E EQU * «, t00=0x00c7, t01=0x00dc}
0x137b6…137c4                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c7, t01=0x00f0}
0x137c4…137cc                Head {h00=0x0004, h01=0x0050, t00=0x00c7, t01=0x00fe}
0x137cc…13800                Head {h00=0x0030, h01=0x0050, text=»W:SM03 EQU * SHOWN AFTER FUNCTION-KEY STROKE«, t00=0x00c7, t01=0x0106}
0x13800…13814                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00c7, t01=0x013a}
0x13814…1384e                Head {h00=0x0036, h01=0x0050, text=» DATA SM03E-W:SM03 *******************************«, t00=0x00c7, t01=0x014e}
0x1384e…13862                Head {h00=0x0010, h01=0x0050, text=» IFT XSM03=0«, t00=0x00c7, t01=0x0188}
0x13862…13874                Head {h00=0x000e, h01=0x0050, text=» DATA 'F:'«, t00=0x00c8, t01=0x000c}
0x13874…13880                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c8, t01=0x001e}
0x13880…13894                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00c8, t01=0x002a}
0x13894…138a8                Head {h00=0x0010, h01=0x0050, text=» IFF XSM03=0«, t00=0x00c8, t01=0x003e}
0x138a8…138be                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R01 «, t00=0x00c8, t01=0x0052}
0x138be…138d2                Head {h00=0x0010, h01=0x0050, text=» IFF XSM03=1«, t00=0x00c8, t01=0x0068}
0x138d2…138e8                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R02 «, t00=0x00c8, t01=0x007c}
0x138e8…138fc                Head {h00=0x0010, h01=0x0050, text=» IFF XSM03=2«, t00=0x00c8, t01=0x0092}
0x138fc…13912                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R03 «, t00=0x00c8, t01=0x00a6}
0x13912…13926                Head {h00=0x0010, h01=0x0050, text=» IFF XSM03=3«, t00=0x00c8, t01=0x00bc}
0x13926…1393c                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R04 «, t00=0x00c8, t01=0x00d0}
0x1393c…13950                Head {h00=0x0010, h01=0x0050, text=» IFF XSM03=4«, t00=0x00c8, t01=0x00e6}
0x13950…13966                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R04 «, t00=0x00c8, t01=0x00fa}
0x13966…1397a                Head {h00=0x0010, h01=0x0050, text=» IFF XSM03=5«, t00=0x00c8, t01=0x0110}
0x1397a…13990                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R05 «, t00=0x00c8, t01=0x0124}
0x13990…139a4                Head {h00=0x0010, h01=0x0050, text=» IFF XSM03=6«, t00=0x00c8, t01=0x013a}
0x139a4…139ba                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R06 «, t00=0x00c8, t01=0x014e}
0x139ba…139ce                Head {h00=0x0010, h01=0x0050, text=» IFF XSM03=7«, t00=0x00c8, t01=0x0164}
0x139ce…139e4                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R07 «, t00=0x00c8, t01=0x0178}
0x139e4…139f8                Head {h00=0x0010, h01=0x0050, text=» IFF XSM03=8«, t00=0x00c8, t01=0x018e}
0x139f8…13a0e                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R08 «, t00=0x00c9, t01=0x0012}
0x13a0e…13a22                Head {h00=0x0010, h01=0x0050, text=» IFF XSM03=9«, t00=0x00c9, t01=0x0028}
0x13a22…13a38                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R09 «, t00=0x00c9, t01=0x003c}
0x13a38…13a4e                Head {h00=0x0012, h01=0x0050, text=» IFF XSM03=10 «, t00=0x00c9, t01=0x0052}
0x13a4e…13a64                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R10 «, t00=0x00c9, t01=0x0068}
0x13a64…13a7a                Head {h00=0x0012, h01=0x0050, text=» IFF XSM03=11 «, t00=0x00c9, t01=0x007e}
0x13a7a…13a90                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R11 «, t00=0x00c9, t01=0x0094}
0x13a90…13aa6                Head {h00=0x0012, h01=0x0050, text=» IFF XSM03=12 «, t00=0x00c9, t01=0x00aa}
0x13aa6…13abc                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R12 «, t00=0x00c9, t01=0x00c0}
0x13abc…13ad2                Head {h00=0x0012, h01=0x0050, text=» IFF XSM03=13 «, t00=0x00c9, t01=0x00d6}
0x13ad2…13ae8                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R13 «, t00=0x00c9, t01=0x00ec}
0x13ae8…13afe                Head {h00=0x0012, h01=0x0050, text=» IFF XSM03=14 «, t00=0x00c9, t01=0x0102}
0x13afe…13b14                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R14 «, t00=0x00c9, t01=0x0118}
0x13b14…13b2a                Head {h00=0x0012, h01=0x0050, text=» IFF XSM03=15 «, t00=0x00c9, t01=0x012e}
0x13b2a…13b40                Head {h00=0x0012, h01=0x0050, text=» DATA SM03R15 «, t00=0x00c9, t01=0x0144}
0x13b40…13b4c                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c9, t01=0x015a}
0x13b4c…13b60                Head {h00=0x0010, h01=0x0050, text=»SM03E EQU * «, t00=0x00c9, t01=0x0166}
0x13b60…13b68                Head {h00=0x0004, h01=0x0050, t00=0x00c9, t01=0x017a}
0x13b68…13b9c                Head {h00=0x0030, h01=0x0050, text=»W:SM04 EQU * SHOWN AFTER SECTION-KEY STROKE «, t00=0x00c9, t01=0x0182}
0x13b9c…13bb0                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00ca, t01=0x0026}
0x13bb0…13bea                Head {h00=0x0036, h01=0x0050, text=» DATA SM04E-W:SM04 ****************************** «, t00=0x00ca, t01=0x003a}
0x13bea…13bfe                Head {h00=0x0010, h01=0x0050, text=» IFT XSM04=0«, t00=0x00ca, t01=0x0074}
0x13bfe…13c10                Head {h00=0x000e, h01=0x0050, text=» DATA 'S:'«, t00=0x00ca, t01=0x0088}
0x13c10…13c1c                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ca, t01=0x009a}
0x13c1c…13c30                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00ca, t01=0x00a6}
0x13c30…13c44                Head {h00=0x0010, h01=0x0050, text=» IFF XSM04=0«, t00=0x00ca, t01=0x00ba}
0x13c44…13c5a                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R01 «, t00=0x00ca, t01=0x00ce}
0x13c5a…13c6e                Head {h00=0x0010, h01=0x0050, text=» IFF XSM04=1«, t00=0x00ca, t01=0x00e4}
0x13c6e…13c84                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R02 «, t00=0x00ca, t01=0x00f8}
0x13c84…13c98                Head {h00=0x0010, h01=0x0050, text=» IFF XSM04=2«, t00=0x00ca, t01=0x010e}
0x13c98…13cae                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R03 «, t00=0x00ca, t01=0x0122}
0x13cae…13cc2                Head {h00=0x0010, h01=0x0050, text=» IFF XSM04=3«, t00=0x00ca, t01=0x0138}
0x13cc2…13cd8                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R04 «, t00=0x00ca, t01=0x014c}
0x13cd8…13cec                Head {h00=0x0010, h01=0x0050, text=» IFF XSM04=4«, t00=0x00ca, t01=0x0162}
0x13cec…13d02                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R04 «, t00=0x00ca, t01=0x0176}
0x13d02…13d16                Head {h00=0x0010, h01=0x0050, text=» IFF XSM04=5«, t00=0x00ca, t01=0x018c}
0x13d16…13d2c                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R05 «, t00=0x00cb, t01=0x0010}
0x13d2c…13d40                Head {h00=0x0010, h01=0x0050, text=» IFF XSM04=6«, t00=0x00cb, t01=0x0026}
0x13d40…13d56                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R06 «, t00=0x00cb, t01=0x003a}
0x13d56…13d6a                Head {h00=0x0010, h01=0x0050, text=» IFF XSM04=7«, t00=0x00cb, t01=0x0050}
0x13d6a…13d80                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R07 «, t00=0x00cb, t01=0x0064}
0x13d80…13d94                Head {h00=0x0010, h01=0x0050, text=» IFF XSM04=8«, t00=0x00cb, t01=0x007a}
0x13d94…13daa                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R08 «, t00=0x00cb, t01=0x008e}
0x13daa…13dbe                Head {h00=0x0010, h01=0x0050, text=» IFF XSM04=9«, t00=0x00cb, t01=0x00a4}
0x13dbe…13dd4                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R09 «, t00=0x00cb, t01=0x00b8}
0x13dd4…13dea                Head {h00=0x0012, h01=0x0050, text=» IFF XSM04=10 «, t00=0x00cb, t01=0x00ce}
0x13dea…13e00                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R10 «, t00=0x00cb, t01=0x00e4}
0x13e00…13e16                Head {h00=0x0012, h01=0x0050, text=» IFF XSM04=11 «, t00=0x00cb, t01=0x00fa}
0x13e16…13e2c                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R11 «, t00=0x00cb, t01=0x0110}
0x13e2c…13e42                Head {h00=0x0012, h01=0x0050, text=» IFF XSM04=12 «, t00=0x00cb, t01=0x0126}
0x13e42…13e58                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R12 «, t00=0x00cb, t01=0x013c}
0x13e58…13e6e                Head {h00=0x0012, h01=0x0050, text=» IFF XSM04=13 «, t00=0x00cb, t01=0x0152}
0x13e6e…13e84                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R13 «, t00=0x00cb, t01=0x0168}
0x13e84…13e9a                Head {h00=0x0012, h01=0x0050, text=» IFF XSM04=14 «, t00=0x00cb, t01=0x017e}
0x13e9a…13eb0 (204, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» DATA SM04R14 «, t00=0x00cc, t01=0x0004}
0x13eb0…13ec6                Head {h00=0x0012, h01=0x0050, text=» IFF XSM04=15 «, t00=0x00cc, t01=0x001a}
0x13ec6…13edc                Head {h00=0x0012, h01=0x0050, text=» DATA SM04R15 «, t00=0x00cc, t01=0x0030}
0x13edc…13ee8                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cc, t01=0x0046}
0x13ee8…13efc                Head {h00=0x0010, h01=0x0050, text=»SM04E EQU * «, t00=0x00cc, t01=0x0052}
0x13efc…13f2c                Head {h00=0x002c, h01=0x0050, text=»W:SM05 EQU * SHOWN AFTER WSM BASIC ERROR«, t00=0x00cc, t01=0x0066}
0x13f2c…13f40                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00cc, t01=0x0096}
0x13f40…13f76                Head {h00=0x0032, h01=0x0050, text=» DATA SM05E-W:SM05 ***************************«, t00=0x00cc, t01=0x00aa}
0x13f76…13f9a                Head {h00=0x0020, h01=0x0050, text=» DATA /1E1E - LOW INTENSITY «, t00=0x00cc, t01=0x00e0}
0x13f9a…13fae                Head {h00=0x0010, h01=0x0050, text=» IFT XSM05=0«, t00=0x00cc, t01=0x0104}
0x13fae…13fcc                Head {h00=0x001a, h01=0x0050, text=» DATA 'WSM BASIC ERR:'«, t00=0x00cc, t01=0x0118}
0x13fcc…13fd8                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cc, t01=0x0136}
0x13fd8…13fec                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00cc, t01=0x0142}
0x13fec…14000                Head {h00=0x0010, h01=0x0050, text=» IFF XSM05=0«, t00=0x00cc, t01=0x0156}
0x14000…14016                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R01 «, t00=0x00cc, t01=0x016a}
0x14016…1402a                Head {h00=0x0010, h01=0x0050, text=» IFF XSM05=1«, t00=0x00cc, t01=0x0180}
0x1402a…14040 (205, 0, 398)  Head {h00=0x0012, h01=0x0050, text=» DATA SM05R02 «, t00=0x00cd, t01=0x0004}
0x14040…14054                Head {h00=0x0010, h01=0x0050, text=» IFF XSM05=2«, t00=0x00cd, t01=0x001a}
0x14054…1406a                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R03 «, t00=0x00cd, t01=0x002e}
0x1406a…1407e                Head {h00=0x0010, h01=0x0050, text=» IFF XSM05=3«, t00=0x00cd, t01=0x0044}
0x1407e…14094                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R04 «, t00=0x00cd, t01=0x0058}
0x14094…140a8                Head {h00=0x0010, h01=0x0050, text=» IFF XSM05=4«, t00=0x00cd, t01=0x006e}
0x140a8…140be                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R04 «, t00=0x00cd, t01=0x0082}
0x140be…140d2                Head {h00=0x0010, h01=0x0050, text=» IFF XSM05=5«, t00=0x00cd, t01=0x0098}
0x140d2…140e8                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R05 «, t00=0x00cd, t01=0x00ac}
0x140e8…140fc                Head {h00=0x0010, h01=0x0050, text=» IFF XSM05=6«, t00=0x00cd, t01=0x00c2}
0x140fc…14112                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R06 «, t00=0x00cd, t01=0x00d6}
0x14112…14126                Head {h00=0x0010, h01=0x0050, text=» IFF XSM05=7«, t00=0x00cd, t01=0x00ec}
0x14126…1413c                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R07 «, t00=0x00cd, t01=0x0100}
0x1413c…14150                Head {h00=0x0010, h01=0x0050, text=» IFF XSM05=8«, t00=0x00cd, t01=0x0116}
0x14150…14166                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R08 «, t00=0x00cd, t01=0x012a}
0x14166…1417a                Head {h00=0x0010, h01=0x0050, text=» IFF XSM05=9«, t00=0x00cd, t01=0x0140}
0x1417a…14190                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R09 «, t00=0x00cd, t01=0x0154}
0x14190…141a6                Head {h00=0x0012, h01=0x0050, text=» IFF XSM05=10 «, t00=0x00cd, t01=0x016a}
0x141a6…141bc                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R10 «, t00=0x00cd, t01=0x0180}
0x141bc…141d2                Head {h00=0x0012, h01=0x0050, text=» IFF XSM05=11 «, t00=0x00ce, t01=0x0008}
0x141d2…141e8                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R11 «, t00=0x00ce, t01=0x001e}
0x141e8…141fe                Head {h00=0x0012, h01=0x0050, text=» IFF XSM05=12 «, t00=0x00ce, t01=0x0034}
0x141fe…14214                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R12 «, t00=0x00ce, t01=0x004a}
0x14214…1422a                Head {h00=0x0012, h01=0x0050, text=» IFF XSM05=13 «, t00=0x00ce, t01=0x0060}
0x1422a…14240                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R13 «, t00=0x00ce, t01=0x0076}
0x14240…14256                Head {h00=0x0012, h01=0x0050, text=» IFF XSM05=14 «, t00=0x00ce, t01=0x008c}
0x14256…1426c                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R14 «, t00=0x00ce, t01=0x00a2}
0x1426c…14282                Head {h00=0x0012, h01=0x0050, text=» IFF XSM05=15 «, t00=0x00ce, t01=0x00b8}
0x14282…14298                Head {h00=0x0012, h01=0x0050, text=» DATA SM05R15 «, t00=0x00ce, t01=0x00ce}
0x14298…142a4                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ce, t01=0x00e4}
0x142a4…142b8                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00ce, t01=0x00f0}
0x142b8…142e4                Head {h00=0x0028, h01=0x0050, text=» DATA /1F1C - HIGH INTENSITY,REVERSE«, t00=0x00ce, t01=0x0104}
0x142e4…142f2                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ce, t01=0x0130}
0x142f2…142fa                Head {h00=0x0004, h01=0x0050, t00=0x00ce, t01=0x013e}
0x142fa…14306                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ce, t01=0x0146}
0x14306…1431a                Head {h00=0x0010, h01=0x0050, text=»W:SM5C EQU *«, t00=0x00ce, t01=0x0152}
0x1431a…1432e                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00ce, t01=0x0166}
0x1432e…14360                Head {h00=0x002e, h01=0x0050, text=» DATA 0 RESERVED FOR WSM BASIC ERROR CODE «, t00=0x00ce, t01=0x017a}
0x14360…1438a                Head {h00=0x0026, h01=0x0050, text=» DATA /1E1D - LOW INTENSITY,NORMAL«, t00=0x00cf, t01=0x001c}
0x1438a…1439e                Head {h00=0x0010, h01=0x0050, text=» IFT XSM5C=0«, t00=0x00cf, t01=0x0046}
0x1439e…143b2                Head {h00=0x0010, h01=0x0050, text=» DATA '  S:'«, t00=0x00cf, t01=0x005a}
0x143b2…143be                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cf, t01=0x006e}
0x143be…143d2                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00cf, t01=0x007a}
0x143d2…143e6                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5C=0«, t00=0x00cf, t01=0x008e}
0x143e6…143f8                Head {h00=0x000e, h01=0x0050, text=» DATA '  '«, t00=0x00cf, t01=0x00a2}
0x143f8…1440e                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR01 «, t00=0x00cf, t01=0x00b4}
0x1440e…14422                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5C=1«, t00=0x00cf, t01=0x00ca}
0x14422…14430                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00cf, t01=0x00de}
0x14430…14446                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR02 «, t00=0x00cf, t01=0x00ec}
0x14446…1445a                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5C=2«, t00=0x00cf, t01=0x0102}
0x1445a…14468                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00cf, t01=0x0116}
0x14468…1447e                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR03 «, t00=0x00cf, t01=0x0124}
0x1447e…14492                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5C=3«, t00=0x00cf, t01=0x013a}
0x14492…144a0                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00cf, t01=0x014e}
0x144a0…144b6                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR04 «, t00=0x00cf, t01=0x015c}
0x144b6…144ca                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5C=4«, t00=0x00cf, t01=0x0172}
0x144ca…144d8                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00cf, t01=0x0186}
0x144d8…144ee (208, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR04 «, t00=0x00d0, t01=0x0004}
0x144ee…14502                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5C=5«, t00=0x00d0, t01=0x001a}
0x14502…14510                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d0, t01=0x002e}
0x14510…14526                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR05 «, t00=0x00d0, t01=0x003c}
0x14526…1453a                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5C=6«, t00=0x00d0, t01=0x0052}
0x1453a…14548                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d0, t01=0x0066}
0x14548…1455e                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR06 «, t00=0x00d0, t01=0x0074}
0x1455e…14572                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5C=7«, t00=0x00d0, t01=0x008a}
0x14572…14580                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d0, t01=0x009e}
0x14580…14596                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR07 «, t00=0x00d0, t01=0x00ac}
0x14596…145aa                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5C=8«, t00=0x00d0, t01=0x00c2}
0x145aa…145b8                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d0, t01=0x00d6}
0x145b8…145ce                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR08 «, t00=0x00d0, t01=0x00e4}
0x145ce…145e2                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5C=9«, t00=0x00d0, t01=0x00fa}
0x145e2…145f0                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d0, t01=0x010e}
0x145f0…14606                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR09 «, t00=0x00d0, t01=0x011c}
0x14606…1461c                Head {h00=0x0012, h01=0x0050, text=» IFF XSM5C=10 «, t00=0x00d0, t01=0x0132}
0x1461c…1462a                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d0, t01=0x0148}
0x1462a…14640                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR10 «, t00=0x00d0, t01=0x0156}
0x14640…14656                Head {h00=0x0012, h01=0x0050, text=» IFF XSM5C=11 «, t00=0x00d0, t01=0x016c}
0x14656…14664                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d0, t01=0x0182}
0x14664…1467a                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR11 «, t00=0x00d0, t01=0x0190}
0x1467a…14690                Head {h00=0x0012, h01=0x0050, text=» IFF XSM5C=12 «, t00=0x00d1, t01=0x0016}
0x14690…1469e                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d1, t01=0x002c}
0x1469e…146b4                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR12 «, t00=0x00d1, t01=0x003a}
0x146b4…146ca                Head {h00=0x0012, h01=0x0050, text=» IFF XSM5C=13 «, t00=0x00d1, t01=0x0050}
0x146ca…146d8                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d1, t01=0x0066}
0x146d8…146ee                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR13 «, t00=0x00d1, t01=0x0074}
0x146ee…14704                Head {h00=0x0012, h01=0x0050, text=» IFF XSM5C=14 «, t00=0x00d1, t01=0x008a}
0x14704…14712                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d1, t01=0x00a0}
0x14712…14728                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR14 «, t00=0x00d1, t01=0x00ae}
0x14728…1473e                Head {h00=0x0012, h01=0x0050, text=» IFF XSM5C=15 «, t00=0x00d1, t01=0x00c4}
0x1473e…1474c                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d1, t01=0x00da}
0x1474c…14762                Head {h00=0x0012, h01=0x0050, text=» DATA SM5CR15 «, t00=0x00d1, t01=0x00e8}
0x14762…1476e                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d1, t01=0x00fe}
0x1476e…14782                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00d1, t01=0x010a}
0x14782…147ae                Head {h00=0x0028, h01=0x0050, text=» DATA /1F1C - HIGH INTENSITY,REVERSE«, t00=0x00d1, t01=0x011e}
0x147ae…147ba                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d1, t01=0x014a}
0x147ba…147ce                Head {h00=0x0010, h01=0x0050, text=»W:SM5S EQU *«, t00=0x00d1, t01=0x0156}
0x147ce…147e2                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00d1, t01=0x016a}
0x147e2…14810                Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0 RESERVED FOR SECTION NAME «, t00=0x00d1, t01=0x017e}
0x14810…1483a                Head {h00=0x0026, h01=0x0050, text=» DATA /1E1D - LOW INTESITY,NORMAL «, t00=0x00d2, t01=0x001c}
0x1483a…1484e                Head {h00=0x0010, h01=0x0050, text=» IFT XSM5S=0«, t00=0x00d2, t01=0x0046}
0x1484e…14862                Head {h00=0x0010, h01=0x0050, text=» DATA '  F:'«, t00=0x00d2, t01=0x005a}
0x14862…1486e                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d2, t01=0x006e}
0x1486e…14882                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00d2, t01=0x007a}
0x14882…14896                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5S=0«, t00=0x00d2, t01=0x008e}
0x14896…148a8                Head {h00=0x000e, h01=0x0050, text=» DATA '  '«, t00=0x00d2, t01=0x00a2}
0x148a8…148be                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR01 «, t00=0x00d2, t01=0x00b4}
0x148be…148d2                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5S=1«, t00=0x00d2, t01=0x00ca}
0x148d2…148e0                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d2, t01=0x00de}
0x148e0…148f6                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR02 «, t00=0x00d2, t01=0x00ec}
0x148f6…1490a                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5S=2«, t00=0x00d2, t01=0x0102}
0x1490a…14918                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d2, t01=0x0116}
0x14918…1492e                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR03 «, t00=0x00d2, t01=0x0124}
0x1492e…14942                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5S=3«, t00=0x00d2, t01=0x013a}
0x14942…14950                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d2, t01=0x014e}
0x14950…14966                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR04 «, t00=0x00d2, t01=0x015c}
0x14966…1497a                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5S=4«, t00=0x00d2, t01=0x0172}
0x1497a…14988                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d2, t01=0x0186}
0x14988…1499e (211, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR04 «, t00=0x00d3, t01=0x0004}
0x1499e…149b2                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5S=5«, t00=0x00d3, t01=0x001a}
0x149b2…149c0                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d3, t01=0x002e}
0x149c0…149d6                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR05 «, t00=0x00d3, t01=0x003c}
0x149d6…149ea                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5S=6«, t00=0x00d3, t01=0x0052}
0x149ea…149f8                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d3, t01=0x0066}
0x149f8…14a0e                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR06 «, t00=0x00d3, t01=0x0074}
0x14a0e…14a22                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5S=7«, t00=0x00d3, t01=0x008a}
0x14a22…14a30                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d3, t01=0x009e}
0x14a30…14a46                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR07 «, t00=0x00d3, t01=0x00ac}
0x14a46…14a5a                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5S=8«, t00=0x00d3, t01=0x00c2}
0x14a5a…14a68                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d3, t01=0x00d6}
0x14a68…14a7e                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR08 «, t00=0x00d3, t01=0x00e4}
0x14a7e…14a92                Head {h00=0x0010, h01=0x0050, text=» IFF XSM5S=9«, t00=0x00d3, t01=0x00fa}
0x14a92…14aa0                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d3, t01=0x010e}
0x14aa0…14ab6                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR09 «, t00=0x00d3, t01=0x011c}
0x14ab6…14acc                Head {h00=0x0012, h01=0x0050, text=» IFF XSM5S=10 «, t00=0x00d3, t01=0x0132}
0x14acc…14ada                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d3, t01=0x0148}
0x14ada…14af0                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR10 «, t00=0x00d3, t01=0x0156}
0x14af0…14b06                Head {h00=0x0012, h01=0x0050, text=» IFF XSM5S=11 «, t00=0x00d3, t01=0x016c}
0x14b06…14b14                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d3, t01=0x0182}
0x14b14…14b2a                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR11 «, t00=0x00d3, t01=0x0190}
0x14b2a…14b40                Head {h00=0x0012, h01=0x0050, text=» IFF XSM5S=12 «, t00=0x00d4, t01=0x0016}
0x14b40…14b4e                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d4, t01=0x002c}
0x14b4e…14b64                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR12 «, t00=0x00d4, t01=0x003a}
0x14b64…14b7a                Head {h00=0x0012, h01=0x0050, text=» IFF XSM5S=13 «, t00=0x00d4, t01=0x0050}
0x14b7a…14b88                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d4, t01=0x0066}
0x14b88…14b9e                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR13 «, t00=0x00d4, t01=0x0074}
0x14b9e…14bb4                Head {h00=0x0012, h01=0x0050, text=» IFF XSM5S=14 «, t00=0x00d4, t01=0x008a}
0x14bb4…14bc2                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d4, t01=0x00a0}
0x14bc2…14bd8                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR14 «, t00=0x00d4, t01=0x00ae}
0x14bd8…14bee                Head {h00=0x0012, h01=0x0050, text=» IFF XSM5S=15 «, t00=0x00d4, t01=0x00c4}
0x14bee…14bfc                Head {h00=0x000a, h01=0x0050, text=» DATA «, t00=0x00d4, t01=0x00da}
0x14bfc…14c12                Head {h00=0x0012, h01=0x0050, text=» DATA SM5SR15 «, t00=0x00d4, t01=0x00e8}
0x14c12…14c1e                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d4, t01=0x00fe}
0x14c1e…14c32                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00d4, t01=0x010a}
0x14c32…14c5e                Head {h00=0x0028, h01=0x0050, text=» DATA /1F1C - HIGH INTESITY,REVERSE «, t00=0x00d4, t01=0x011e}
0x14c5e…14c6a                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d4, t01=0x014a}
0x14c6a…14c7e                Head {h00=0x0010, h01=0x0050, text=»W:SM5F EQU *«, t00=0x00d4, t01=0x0156}
0x14c7e…14c92                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00d4, t01=0x016a}
0x14c92…14cbe                Head {h00=0x0028, h01=0x0050, text=» DATA 0 RESERVED FOR NAME OF DYNAMIC«, t00=0x00d4, t01=0x017e}
0x14cbe…14cec                Head {h00=0x002a, h01=0x0050, text=» DATA 0 ... FIELD WHERE ERROR OCCURRED«, t00=0x00d5, t01=0x001a}
0x14cec…14d0e                Head {h00=0x001e, h01=0x0050, text=» DATA /1D1D - NORMAL IMAGE«, t00=0x00d5, t01=0x0048}
0x14d0e…14d22                Head {h00=0x0010, h01=0x0050, text=»SM05E EQU * «, t00=0x00d5, t01=0x006a}
0x14d22…14d2e                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d5, t01=0x007e}
0x14d2e…14d3c                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d5, t01=0x008a}
0x14d3c…14d44                Head {h00=0x0004, h01=0x0050, t00=0x00d5, t01=0x0098}
0x14d44…14d4c                Head {h00=0x0004, h01=0x0050, t00=0x00d5, t01=0x00a0}
0x14d4c…14d54                Head {h00=0x0004, h01=0x0050, t00=0x00d5, t01=0x00a8}
0x14d54…14d5c                Head {h00=0x0004, h01=0x0050, t00=0x00d5, t01=0x00b0}
0x14d5c…14d64                Head {h00=0x0004, h01=0x0050, t00=0x00d5, t01=0x00b8}
0x14d64…14d6c                Head {h00=0x0004, h01=0x0050, t00=0x00d5, t01=0x00c0}
0x14d6c…14d74                Head {h00=0x0004, h01=0x0050, t00=0x00d5, t01=0x00c8}
0x14d74…14d7c                Head {h00=0x0004, h01=0x0050, t00=0x00d5, t01=0x00d0}
0x14d7c…14d84                Head {h00=0x0004, h01=0x0050, t00=0x00d5, t01=0x00d8}
0x14d84…14d8c                Head {h00=0x0004, h01=0x0050, t00=0x00d5, t01=0x00e0}
0x14d8c…14dda                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00d5, t01=0x00e8}
0x14dda…14e28                Head {h00=0x004a, h01=0x0050, text=»**                    5. DEFINITION OF POOL SIZE:                   **«, t00=0x00d5, t01=0x0136}
0x14e28…14e76                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00d5, t01=0x0184}
0x14e76…14e84                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d6, t01=0x0042}
0x14e84…14ed2                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00d6, t01=0x0050}
0x14ed2…14f20                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00d6, t01=0x009e}
0x14f20…14f6e                Head {h00=0x004a, h01=0x0050, text=»**                    WSM MEMORY BUFFER POOL                        **«, t00=0x00d6, t01=0x00ec}
0x14f6e…14fbc                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00d6, t01=0x013a}
0x14fbc…14ff4                Head {h00=0x0034, h01=0x0050, text=»**  4 LINES SHOULD BE ALTERED TO GET THE DESIRED«, t00=0x00d6, t01=0x0188}
0x14ff4…1502a                Head {h00=0x0032, h01=0x0050, text=»**  POOL SIZE. AS AN EXAMPLE A POOL SIZE OF 10«, t00=0x00d7, t01=0x0030}
0x1502a…1504a                Head {h00=0x001c, h01=0x0050, text=»**  POOL UNITS IS USED. «, t00=0x00d7, t01=0x0066}
0x1504a…1507e                Head {h00=0x0030, h01=0x0050, text=»**  ASSUME A SIZE OF N POOL UNITS IS WANTED.«, t00=0x00d7, t01=0x0086}
0x1507e…15090                Head {h00=0x000e, h01=0x0050, text=»**  THEN: «, t00=0x00d7, t01=0x00ba}
0x15090…1509a                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00d7, t01=0x00cc}
0x1509a…150ae                Head {h00=0x0010, h01=0x0050, text=»**  LINE 1: «, t00=0x00d7, t01=0x00d6}
0x150ae…150d8                Head {h00=0x0026, h01=0x0050, text=»**  ! DEFINE N             ( 25 ) «, t00=0x00d7, t01=0x00ea}
0x150d8…150e6                Head {h00=0x000a, h01=0x0050, text=»**  ! «, t00=0x00d7, t01=0x0114}
0x150e6…150f4                Head {h00=0x000a, h01=0x0050, text=»**  V «, t00=0x00d7, t01=0x0122}
0x150f4…1510a                Head {h00=0x0012, h01=0x0050, text=»X:OLNO EQU 25 «, t00=0x00d7, t01=0x0130}
0x1510a…15114                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00d7, t01=0x0146}
0x15114…15128                Head {h00=0x0010, h01=0x0050, text=»**  LINE 2: «, t00=0x00d7, t01=0x0150}
0x15128…1515e                Head {h00=0x0032, h01=0x0050, text=»**  ! RESERVE N*128 WORDS  ( 25*128 => 3200 ) «, t00=0x00d7, t01=0x0164}
0x1515e…1516c                Head {h00=0x000a, h01=0x0050, text=»**  ! «, t00=0x00d8, t01=0x000a}
0x1516c…1517a                Head {h00=0x000a, h01=0x0050, text=»**  V «, t00=0x00d8, t01=0x0018}
0x1517a…15192                Head {h00=0x0014, h01=0x0050, text=»X:POOL EQU 3200 «, t00=0x00d8, t01=0x0026}
0x15192…1519c                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00d8, t01=0x003e}
0x1519c…151b0                Head {h00=0x0010, h01=0x0050, text=»**  LINE 3: «, t00=0x00d8, t01=0x0048}
0x151b0…151e6                Head {h00=0x0032, h01=0x0050, text=»**  ! RESERVE N*6 WORDS    ( 25*6   =>  150 ) «, t00=0x00d8, t01=0x005c}
0x151e6…151f4                Head {h00=0x000a, h01=0x0050, text=»**  ! «, t00=0x00d8, t01=0x0092}
0x151f4…15202                Head {h00=0x000a, h01=0x0050, text=»**  V «, t00=0x00d8, t01=0x00a0}
0x15202…15218                Head {h00=0x0012, h01=0x0050, text=»X:OLAD EQU 150«, t00=0x00d8, t01=0x00ae}
0x15218…15222                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00d8, t01=0x00c4}
0x15222…1522c                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00d8, t01=0x00ce}
0x1522c…15236                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00d8, t01=0x00d8}
0x15236…15240                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00d8, t01=0x00e2}
0x15240…1524e                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d8, t01=0x00ec}
0x1524e…15256                Head {h00=0x0004, h01=0x0050, t00=0x00d8, t01=0x00fa}
0x15256…15260                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00d8, t01=0x0102}
0x15260…1526a                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00d8, t01=0x010c}
0x1526a…152b8                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00d8, t01=0x0116}
0x152b8…15306                Head {h00=0x004a, h01=0x0050, text=»**                    EQUATES FOR WSMGEN                            **«, t00=0x00d8, t01=0x0164}
0x15306…15354                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x00d9, t01=0x0022}
0x15354…153a2                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00d9, t01=0x0070}
0x153a2…153b0                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x00d9, t01=0x00be}
0x153b0…153ca                Head {h00=0x0016, h01=0x0050, text=»POOLNO EQU X:OLNO «, t00=0x00d9, t01=0x00cc}
0x153ca…153e2                Head {h00=0x0014, h01=0x0050, text=»POOL RES X:POOL «, t00=0x00d9, t01=0x00e6}
0x153e2…153fc                Head {h00=0x0016, h01=0x0050, text=»POOLAD RES X:OLAD «, t00=0x00d9, t01=0x00fe}
0x153fc…1540a                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x00d9, t01=0x0118}
0x1540a…1541c                Head {h00=0x000e, h01=0x0050, text=»****NLIST «, t00=0x00d9, t01=0x0126}
0x1541c…15430                Head {h00=0x0010, h01=0x0050, text=»POOLFS EQU *«, t00=0x00d9, t01=0x0138}
0x15430…15456                Head {h00=0x0022, h01=0x0050, text=» DATA POOLNO,FSEND-POOLFS,'B1'«, t00=0x00d9, t01=0x014c}
0x15456…15466                Head {h00=0x000c, h01=0x0050, text=»****LIST«, t00=0x00d9, t01=0x0172}
0x15466…15470                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00d9, t01=0x0182}
0x15470…1547a                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00d9, t01=0x018c}
0x1547a…15484                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00da, t01=0x0008}
0x15484…15498                Head {h00=0x0010, h01=0x0050, text=»**  LINE 4: «, t00=0x00da, t01=0x0012}
0x15498…154d8                Head {h00=0x003c, h01=0x0050, text=»**  ! DEFINE M WORDS WHERE M EQUALS THE INTEGER PART OF «, t00=0x00da, t01=0x0026}
0x154d8…15512                Head {h00=0x0036, h01=0x0050, text=»**  ! (N+15)/16.           ( M=INT((25+15)/16)=2 )«, t00=0x00da, t01=0x0066}
0x15512…15520                Head {h00=0x000a, h01=0x0050, text=»**  ! «, t00=0x00da, t01=0x00a0}
0x15520…15560                Head {h00=0x003c, h01=0x0050, text=»**  ! IN THESE WORDS, SET THE N FIRST BITS TO 1 AND THE «, t00=0x00da, t01=0x00ae}
0x15560…1558a                Head {h00=0x0026, h01=0x0050, text=»**  ! FOLLOWING BITS TO 0 (ZERO). «, t00=0x00da, t01=0x00ee}
0x1558a…15598                Head {h00=0x000a, h01=0x0050, text=»**  ! «, t00=0x00da, t01=0x0118}
0x15598…155a6                Head {h00=0x000a, h01=0x0050, text=»**  V «, t00=0x00da, t01=0x0126}
0x155a6…155d4                Head {h00=0x002a, h01=0x0050, text=»X:NMSK EQU 2 TOTAL NUMBER OF WORDS (M)«, t00=0x00da, t01=0x0134}
0x155d4…155fe                Head {h00=0x0026, h01=0x0050, text=»X:PMSK EQU /FF80 LAST WORD (OF M) «, t00=0x00da, t01=0x0162}
0x155fe…15608                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00da, t01=0x018c}
0x15608…15612                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00db, t01=0x0008}
0x15612…15620                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00db, t01=0x0012}
0x15620…15628                Head {h00=0x0004, h01=0x0050, t00=0x00db, t01=0x0020}
0x15628…15632                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00db, t01=0x0028}
0x15632…1563c                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00db, t01=0x0032}
0x1563c…1568a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00db, t01=0x003c}
0x1568a…156d8                Head {h00=0x004a, h01=0x0050, text=»**                    COND. ASSEMBLY FOR WSMGEN                     **«, t00=0x00db, t01=0x008a}
0x156d8…15726                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00db, t01=0x00d8}
0x15726…15734                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x00db, t01=0x0126}
0x15734…1574e                Head {h00=0x0016, h01=0x0050, text=»XNMASK EQU X:NMSK «, t00=0x00db, t01=0x0134}
0x1574e…15768                Head {h00=0x0016, h01=0x0050, text=»XPMASK EQU X:PMSK «, t00=0x00db, t01=0x014e}
0x15768…15776                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x00db, t01=0x0168}
0x15776…1578c                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=16«, t00=0x00db, t01=0x0176}
0x1578c…157b8                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00db, t01=0x018c}
0x157b8…157e4                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00dc, t01=0x0028}
0x157e4…15810                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00dc, t01=0x0054}
0x15810…1581c                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00dc, t01=0x0080}
0x1581c…15832                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=15«, t00=0x00dc, t01=0x008c}
0x15832…1585e                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00dc, t01=0x00a2}
0x1585e…1588a                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00dc, t01=0x00ce}
0x1588a…158b0                Head {h00=0x0022, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00dc, t01=0x00fa}
0x158b0…158bc                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00dc, t01=0x0120}
0x158bc…158d2                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=14«, t00=0x00dc, t01=0x012c}
0x158d2…158fe                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00dc, t01=0x0142}
0x158fe…1592a                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00dc, t01=0x016e}
0x1592a…1594a                Head {h00=0x001c, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF «, t00=0x00dd, t01=0x000a}
0x1594a…15956                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00dd, t01=0x002a}
0x15956…1596c                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=13«, t00=0x00dd, t01=0x0036}
0x1596c…15998                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00dd, t01=0x004c}
0x15998…159c4                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00dd, t01=0x0078}
0x159c4…159de                Head {h00=0x0016, h01=0x0050, text=» DATA /FFFF,/FFFF «, t00=0x00dd, t01=0x00a4}
0x159de…159ea                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00dd, t01=0x00be}
0x159ea…15a00                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=12«, t00=0x00dd, t01=0x00ca}
0x15a00…15a2c                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00dd, t01=0x00e0}
0x15a2c…15a58                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00dd, t01=0x010c}
0x15a58…15a6c                Head {h00=0x0010, h01=0x0050, text=» DATA /FFFF «, t00=0x00dd, t01=0x0138}
0x15a6c…15a78                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00dd, t01=0x014c}
0x15a78…15a8e                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=11«, t00=0x00dd, t01=0x0158}
0x15a8e…15aba                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00dd, t01=0x016e}
0x15aba…15ae6                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00de, t01=0x000a}
0x15ae6…15af2                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00de, t01=0x0036}
0x15af2…15b08                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=10«, t00=0x00de, t01=0x0042}
0x15b08…15b34                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00de, t01=0x0058}
0x15b34…15b5a                Head {h00=0x0022, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00de, t01=0x0084}
0x15b5a…15b66                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00de, t01=0x00aa}
0x15b66…15b7c                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=9 «, t00=0x00de, t01=0x00b6}
0x15b7c…15ba8                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00de, t01=0x00cc}
0x15ba8…15bc8                Head {h00=0x001c, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF «, t00=0x00de, t01=0x00f8}
0x15bc8…15bd4                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00de, t01=0x0118}
0x15bd4…15bea                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=8 «, t00=0x00de, t01=0x0124}
0x15bea…15c16                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00de, t01=0x013a}
0x15c16…15c30                Head {h00=0x0016, h01=0x0050, text=» DATA /FFFF,/FFFF «, t00=0x00de, t01=0x0166}
0x15c30…15c3c                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00de, t01=0x0180}
0x15c3c…15c52                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=7 «, t00=0x00de, t01=0x018c}
0x15c52…15c7e                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00df, t01=0x0012}
0x15c7e…15c92                Head {h00=0x0010, h01=0x0050, text=» DATA /FFFF «, t00=0x00df, t01=0x003e}
0x15c92…15c9e                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00df, t01=0x0052}
0x15c9e…15cb4                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=6 «, t00=0x00df, t01=0x005e}
0x15cb4…15ce0                Head {h00=0x0028, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00df, t01=0x0074}
0x15ce0…15cec                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00df, t01=0x00a0}
0x15cec…15d02                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=5 «, t00=0x00df, t01=0x00ac}
0x15d02…15d28                Head {h00=0x0022, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF,/FFFF «, t00=0x00df, t01=0x00c2}
0x15d28…15d34                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00df, t01=0x00e8}
0x15d34…15d4a                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=4 «, t00=0x00df, t01=0x00f4}
0x15d4a…15d6a                Head {h00=0x001c, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF «, t00=0x00df, t01=0x010a}
0x15d6a…15d76                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00df, t01=0x012a}
0x15d76…15d8c                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=3 «, t00=0x00df, t01=0x0136}
0x15d8c…15da6                Head {h00=0x0016, h01=0x0050, text=» DATA /FFFF,/FFFF «, t00=0x00df, t01=0x014c}
0x15da6…15db2                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00df, t01=0x0166}
0x15db2…15dc8                Head {h00=0x0012, h01=0x0050, text=» IFT XNMASK=2 «, t00=0x00df, t01=0x0172}
0x15dc8…15ddc                Head {h00=0x0010, h01=0x0050, text=» DATA /FFFF «, t00=0x00df, t01=0x0188}
0x15ddc…15de8                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e0, t01=0x000c}
0x15de8…15dfc                Head {h00=0x0010, h01=0x0050, text=» DATA XPMASK«, t00=0x00e0, t01=0x0018}
0x15dfc…15e06                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00e0, t01=0x002c}
0x15e06…15e10                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00e0, t01=0x0036}
0x15e10…15e1a                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00e0, t01=0x0040}
0x15e1a…15e24                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00e0, t01=0x004a}
0x15e24…15e36                Head {h00=0x000e, h01=0x0050, text=»****NLIST «, t00=0x00e0, t01=0x0054}
0x15e36…15e4c                Head {h00=0x0012, h01=0x0050, text=»FSEND DATA 0,0«, t00=0x00e0, t01=0x0066}
0x15e4c…15e5c                Head {h00=0x000c, h01=0x0050, text=»****LIST«, t00=0x00e0, t01=0x007c}
0x15e5c…15e6a                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e0, t01=0x008c}
0x15e6a…15e72                Head {h00=0x0004, h01=0x0050, t00=0x00e0, t01=0x009a}
0x15e72…15e7a                Head {h00=0x0004, h01=0x0050, t00=0x00e0, t01=0x00a2}
0x15e7a…15e82                Head {h00=0x0004, h01=0x0050, t00=0x00e0, t01=0x00aa}
0x15e82…15e8a                Head {h00=0x0004, h01=0x0050, t00=0x00e0, t01=0x00b2}
0x15e8a…15e92                Head {h00=0x0004, h01=0x0050, t00=0x00e0, t01=0x00ba}
0x15e92…15e9a                Head {h00=0x0004, h01=0x0050, t00=0x00e0, t01=0x00c2}
0x15e9a…15ea2                Head {h00=0x0004, h01=0x0050, t00=0x00e0, t01=0x00ca}
0x15ea2…15eaa                Head {h00=0x0004, h01=0x0050, t00=0x00e0, t01=0x00d2}
0x15eaa…15eb2                Head {h00=0x0004, h01=0x0050, t00=0x00e0, t01=0x00da}
0x15eb2…15eba                Head {h00=0x0004, h01=0x0050, t00=0x00e0, t01=0x00e2}
0x15eba…15ec2                Head {h00=0x0004, h01=0x0050, t00=0x00e0, t01=0x00ea}
0x15ec2…15f10                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00e0, t01=0x00f2}
0x15f10…15f5e                Head {h00=0x004a, h01=0x0050, text=»**                    6. FILE HANDLING:                             **«, t00=0x00e0, t01=0x0140}
0x15f5e…15fac                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00e0, t01=0x018e}
0x15fac…15fba                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e1, t01=0x004c}
0x15fba…15fc2                Head {h00=0x0004, h01=0x0050, t00=0x00e1, t01=0x005a}
0x15fc2…16010                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00e1, t01=0x0062}
0x16010…1605e                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00e1, t01=0x00b0}
0x1605e…160ac                Head {h00=0x004a, h01=0x0050, text=»**                    WSM INTERPRETER WITHOUT FILE HANDLER          **«, t00=0x00e1, t01=0x00fe}
0x160ac…160fa                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00e1, t01=0x014c}
0x160fa…16130                Head {h00=0x0032, h01=0x0050, text=»**  THE WSM FILE HANDLER IS A SEPARATE PART OF«, t00=0x00e2, t01=0x000a}
0x16130…16164                Head {h00=0x0030, h01=0x0050, text=»**  THE WSM INTERPRETER AND ALSO A SEPARATE «, t00=0x00e2, t01=0x0040}
0x16164…16176                Head {h00=0x000e, h01=0x0050, text=»**  TASK. «, t00=0x00e2, t01=0x0074}
0x16176…16182                Head {h00=0x0008, h01=0x0050, text=»**  «, t00=0x00e2, t01=0x0086}
0x16182…161ba                Head {h00=0x0034, h01=0x0050, text=»**  IN INTELLIGENT WORKSTATIONS (E.G. VD83) WITH«, t00=0x00e2, t01=0x0092}
0x161ba…161f4                Head {h00=0x0036, h01=0x0050, text=»**  NO FILES THE FILE HANDLER SHOULD BE EXCLUDED. «, t00=0x00e2, t01=0x00ca}
0x161f4…16200                Head {h00=0x0008, h01=0x0050, text=»**  «, t00=0x00e2, t01=0x0104}
0x16200…1623c                Head {h00=0x0038, h01=0x0050, text=»**  THIS IS DONE BY REPLACING  0 (ZERO)  BELOW WITH «, t00=0x00e2, t01=0x0110}
0x1623c…16252                Head {h00=0x0012, h01=0x0050, text=»**  1 (ONE). A«, t00=0x00e2, t01=0x014c}
0x16252…16260                Head {h00=0x000a, h01=0x0050, text=»**   !«, t00=0x00e2, t01=0x0162}
0x16260…16284                Head {h00=0x0020, h01=0x0050, text=»**  ----------------------- «, t00=0x00e2, t01=0x0170}
0x16284…16292 (227, 0, 398)  Head {h00=0x000a, h01=0x0050, text=»**  ! «, t00=0x00e3, t01=0x0004}
0x16292…162a0                Head {h00=0x000a, h01=0x0050, text=»**  V «, t00=0x00e3, t01=0x0012}
0x162a0…162b4                Head {h00=0x0010, h01=0x0050, text=»X:FHCA EQU 0«, t00=0x00e3, t01=0x0020}
0x162b4…162c0                Head {h00=0x0008, h01=0x0050, text=»**  «, t00=0x00e3, t01=0x0034}
0x162c0…162f4                Head {h00=0x0030, h01=0x0050, text=»**  THE FILE HANDLER TASK "FW" MUST ALSO BE «, t00=0x00e3, t01=0x0040}
0x162f4…16324                Head {h00=0x002c, h01=0x0050, text=»**  DELETED FROM THE CONFIGURATION FILE.«, t00=0x00e3, t01=0x0074}
0x16324…16372                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00e3, t01=0x00a4}
0x16372…163c0                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00e3, t01=0x00f2}
0x163c0…163c8                Head {h00=0x0004, h01=0x0050, t00=0x00e3, t01=0x0140}
0x163c8…16416                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00e3, t01=0x0148}
0x16416…16464                Head {h00=0x004a, h01=0x0050, text=»**                    EQUATES FOR WSMGEN                            **«, t00=0x00e4, t01=0x0008}
0x16464…164b2                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x00e4, t01=0x0056}
0x164b2…16500                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00e4, t01=0x00a4}
0x16500…1650e                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x00e4, t01=0x00f2}
0x1650e…16526                Head {h00=0x0014, h01=0x0050, text=»XFHCA EQU X:FHCA«, t00=0x00e4, t01=0x0100}
0x16526…16534                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x00e4, t01=0x0118}
0x16534…16548                Head {h00=0x0010, h01=0x0050, text=» IFT XFHCA=0«, t00=0x00e4, t01=0x0126}
0x16548…16562                Head {h00=0x0016, h01=0x0050, text=»W:FHCA DATA WD:FIL«, t00=0x00e4, t01=0x013a}
0x16562…1656e                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e4, t01=0x0154}
0x1656e…16582                Head {h00=0x0010, h01=0x0050, text=» IFT XFHCA=1«, t00=0x00e4, t01=0x0160}
0x16582…16598                Head {h00=0x0012, h01=0x0050, text=»W:FHCA DATA 0 «, t00=0x00e4, t01=0x0174}
0x16598…165a4                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e4, t01=0x018a}
0x165a4…165b2                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e5, t01=0x0008}
0x165b2…165ba                Head {h00=0x0004, h01=0x0050, t00=0x00e5, t01=0x0016}
0x165ba…165c2                Head {h00=0x0004, h01=0x0050, t00=0x00e5, t01=0x001e}
0x165c2…16610                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00e5, t01=0x0026}
0x16610…1665e                Head {h00=0x004a, h01=0x0050, text=»**                    POOL & FILE HANDLER POINTERS.                 **«, t00=0x00e5, t01=0x0074}
0x1665e…166ac                Head {h00=0x004a, h01=0x0050, text=»**                    (MUST NOT BE CHANGED.)                        **«, t00=0x00e5, t01=0x00c2}
0x166ac…166fa                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00e5, t01=0x0110}
0x166fa…16708                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x00e5, t01=0x015e}
0x16708…16710                Head {h00=0x0004, h01=0x0050, t00=0x00e5, t01=0x016c}
0x16710…16726                Head {h00=0x0012, h01=0x0050, text=»FILTAB RES 36 «, t00=0x00e5, t01=0x0174}
0x16726…16758                Head {h00=0x002e, h01=0x0050, text=»FORDER RES 128 ORDER-DATA TO FILE-HANDLER «, t00=0x00e5, t01=0x018a}
0x16758…16760                Head {h00=0x0004, h01=0x0050, t00=0x00e6, t01=0x002c}
0x16760…16786                Head {h00=0x0022, h01=0x0050, text=»S:POOL DATA POOL -> POOL START«, t00=0x00e6, t01=0x0034}
0x16786…167bc                Head {h00=0x0032, h01=0x0050, text=»S:POLA DATA POOLAD -> POOL ADMINISTRATION DATA«, t00=0x00e6, t01=0x005a}
0x167bc…167e4                Head {h00=0x0024, h01=0x0050, text=»S:FILT DATA FILTAB -> FILE TABLE«, t00=0x00e6, t01=0x0090}
0x167e4…16818                Head {h00=0x0030, h01=0x0050, text=»S:POLF DATA POOLFS -> POOL FREE SPACE VECTOR«, t00=0x00e6, t01=0x00b8}
0x16818…16850                Head {h00=0x0034, h01=0x0050, text=»S:FORD DATA FORDER -> ORDER-DATA TO FILE-HANDLER«, t00=0x00e6, t01=0x00ec}
0x16850…1685e                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x00e6, t01=0x0124}
0x1685e…1686c                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e6, t01=0x0132}
0x1686c…16874                Head {h00=0x0004, h01=0x0050, t00=0x00e6, t01=0x0140}
0x16874…1687c                Head {h00=0x0004, h01=0x0050, t00=0x00e6, t01=0x0148}
0x1687c…16884                Head {h00=0x0004, h01=0x0050, t00=0x00e6, t01=0x0150}
0x16884…1688c                Head {h00=0x0004, h01=0x0050, t00=0x00e6, t01=0x0158}
0x1688c…16894                Head {h00=0x0004, h01=0x0050, t00=0x00e6, t01=0x0160}
0x16894…1689c                Head {h00=0x0004, h01=0x0050, t00=0x00e6, t01=0x0168}
0x1689c…168a4                Head {h00=0x0004, h01=0x0050, t00=0x00e6, t01=0x0170}
0x168a4…168ac                Head {h00=0x0004, h01=0x0050, t00=0x00e6, t01=0x0178}
0x168ac…168b4                Head {h00=0x0004, h01=0x0050, t00=0x00e6, t01=0x0180}
0x168b4…168bc                Head {h00=0x0004, h01=0x0050, t00=0x00e6, t01=0x0188}
0x168bc…1690a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00e6, t01=0x0190}
0x1690a…16958                Head {h00=0x004a, h01=0x0050, text=»**                    7. WSM INSTRUCTION SELECTION:                 **«, t00=0x00e7, t01=0x004e}
0x16958…169a6                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00e7, t01=0x009c}
0x169a6…169b4                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e7, t01=0x00ea}
0x169b4…169bc                Head {h00=0x0004, h01=0x0050, t00=0x00e7, t01=0x00f8}
0x169bc…169d8                Head {h00=0x0018, h01=0x0050, text=»WSMTAB   EQU      * «, t00=0x00e7, t01=0x0100}
0x169d8…16a26                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00e7, t01=0x011c}
0x16a26…16a74                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00e7, t01=0x016a}
0x16a74…16ac2                Head {h00=0x004a, h01=0x0050, text=»**  WSMTAB            WSM INSTRUCTIONS - BRANCH TABLE               **«, t00=0x00e8, t01=0x0028}
0x16ac2…16b10                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00e8, t01=0x0076}
0x16b10…16b4e                Head {h00=0x003a, h01=0x0050, text=»**  TO EXCLUDE INSTRUCTIONS NOT IN USE IN YOUR SYSTEM,«, t00=0x00e8, t01=0x00c4}
0x16b4e…16b9c                Head {h00=0x004a, h01=0x0050, text=»**  REPLACE LABELS CORRESPONDING WITH EXCLUDED INSTRUCTIONS BY W:ENDR!«, t00=0x00e8, t01=0x0102}
0x16b9c…16bd8                Head {h00=0x0038, h01=0x0050, text=»**            A                                    A«, t00=0x00e8, t01=0x0150}
0x16bd8…16c14                Head {h00=0x0038, h01=0x0050, text=»**            !                                    !«, t00=0x00e8, t01=0x018c}
0x16c14…16c50                Head {h00=0x0038, h01=0x0050, text=»**            -------                      ---------«, t00=0x00e9, t01=0x0038}
0x16c50…16c84                Head {h00=0x0030, h01=0x0050, text=»**                  !                      !«, t00=0x00e9, t01=0x0074}
0x16c84…16cb8                Head {h00=0x0030, h01=0x0050, text=»**                  V                      V«, t00=0x00e9, t01=0x00a8}
0x16cb8…16cc0                Head {h00=0x0004, h01=0x0050, t00=0x00e9, t01=0x00dc}
0x16cc0…16cd4                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x00e9, t01=0x00e4}
0x16cd4…16cee                Head {h00=0x0016, h01=0x0050, text=» DATA W:OPEN WOPEN«, t00=0x00e9, t01=0x00f8}
0x16cee…16d0a                Head {h00=0x0018, h01=0x0050, text=» DATA W:ATCH WATTCH «, t00=0x00e9, t01=0x0112}
0x16d0a…16d26                Head {h00=0x0018, h01=0x0050, text=» DATA W:RCIV WRCIVE «, t00=0x00e9, t01=0x012e}
0x16d26…16d3e                Head {h00=0x0014, h01=0x0050, text=» DATA W:MSG WMSG«, t00=0x00e9, t01=0x014a}
0x16d3e…16d58                Head {h00=0x0016, h01=0x0050, text=» DATA W:SEND WSEND«, t00=0x00e9, t01=0x0162}
0x16d58…16d74                Head {h00=0x0018, h01=0x0050, text=» DATA W:PRNT WPRINT «, t00=0x00e9, t01=0x017c}
0x16d74…16d90                Head {h00=0x0018, h01=0x0050, text=» DATA W:CLOSE WCLOSE«, t00=0x00ea, t01=0x0008}
0x16d90…16daa                Head {h00=0x0016, h01=0x0050, text=» DATA W:SAVE WSAVE«, t00=0x00ea, t01=0x0024}
0x16daa…16dc6                Head {h00=0x0018, h01=0x0050, text=» DATA W:DLET WDLETE «, t00=0x00ea, t01=0x003e}
0x16dc6…16de2                Head {h00=0x0018, h01=0x0050, text=» DATA W:FATR WFATTR «, t00=0x00ea, t01=0x005a}
0x16de2…16dfc                Head {h00=0x0016, h01=0x0050, text=» DATA W:CODE WCODE«, t00=0x00ea, t01=0x0076}
0x16dfc…16e14                Head {h00=0x0014, h01=0x0050, text=» DATA W:FID WFID«, t00=0x00ea, t01=0x0090}
0x16e14…16e3e                Head {h00=0x0026, h01=0x0050, text=» DATA W:GTPM GET FIELD PARAMETERS «, t00=0x00ea, t01=0x00a8}
0x16e3e…16e4a                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ea, t01=0x00d2}
0x16e4a…16e5e                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=1«, t00=0x00ea, t01=0x00de}
0x16e5e…16e78                Head {h00=0x0016, h01=0x0050, text=» DATA W:OPEN WOPEN«, t00=0x00ea, t01=0x00f2}
0x16e78…16e8c                Head {h00=0x0010, h01=0x0050, text=» DATA W:ENDR«, t00=0x00ea, t01=0x010c}
0x16e8c…16ea0                Head {h00=0x0010, h01=0x0050, text=» DATA W:ENDR«, t00=0x00ea, t01=0x0120}
0x16ea0…16eb4                Head {h00=0x0010, h01=0x0050, text=» DATA W:ENDR«, t00=0x00ea, t01=0x0134}
0x16eb4…16ec8                Head {h00=0x0010, h01=0x0050, text=» DATA W:ENDR«, t00=0x00ea, t01=0x0148}
0x16ec8…16edc                Head {h00=0x0010, h01=0x0050, text=» DATA W:ENDR«, t00=0x00ea, t01=0x015c}
0x16edc…16ef8                Head {h00=0x0018, h01=0x0050, text=» DATA W:CLOSE WCLOSE«, t00=0x00ea, t01=0x0170}
0x16ef8…16f12                Head {h00=0x0016, h01=0x0050, text=» DATA W:SAVE WSAVE«, t00=0x00ea, t01=0x018c}
0x16f12…16f26                Head {h00=0x0010, h01=0x0050, text=» DATA W:ENDR«, t00=0x00eb, t01=0x0016}
0x16f26…16f3a                Head {h00=0x0010, h01=0x0050, text=» DATA W:ENDR«, t00=0x00eb, t01=0x002a}
0x16f3a…16f54                Head {h00=0x0016, h01=0x0050, text=» DATA W:CODE WCODE«, t00=0x00eb, t01=0x003e}
0x16f54…16f68                Head {h00=0x0010, h01=0x0050, text=» DATA W:ENDR«, t00=0x00eb, t01=0x0058}
0x16f68…16f7c                Head {h00=0x0010, h01=0x0050, text=» DATA W:ENDR«, t00=0x00eb, t01=0x006c}
0x16f7c…16f88                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00eb, t01=0x0080}
0x16f88…16f90                Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x008c}
0x16f90…16fde                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00eb, t01=0x0094}
0x16fde…1702c                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00eb, t01=0x00e2}
0x1702c…1703a                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00eb, t01=0x0130}
0x1703a…17042                Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x013e}
0x17042…1704a                Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x0146}
0x1704a…17052                Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x014e}
0x17052…1705a                Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x0156}
0x1705a…17062                Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x015e}
0x17062…1706a                Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x0166}
0x1706a…17072                Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x016e}
0x17072…1707a                Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x0176}
0x1707a…17082                Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x017e}
0x17082…1708a                Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x0186}
0x1708a…17092                Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x018e}
0x17092…1709a                Head {h00=0x0004, h01=0x0050, t00=0x00ec, t01=0x0008}
0x1709a…170a2                Head {h00=0x0004, h01=0x0050, t00=0x00ec, t01=0x0010}
0x170a2…170aa                Head {h00=0x0004, h01=0x0050, t00=0x00ec, t01=0x0018}
0x170aa…170b2                Head {h00=0x0004, h01=0x0050, t00=0x00ec, t01=0x0020}
0x170b2…17100                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00ec, t01=0x0028}
0x17100…1714e                Head {h00=0x004a, h01=0x0050, text=»**                    8. VALIDATION STATEMENT & FUNCTION            **«, t00=0x00ec, t01=0x0076}
0x1714e…1719c                Head {h00=0x004a, h01=0x0050, text=»**                    .  & OPERATOR SELECTION:                      **«, t00=0x00ec, t01=0x00c4}
0x1719c…171ea                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00ec, t01=0x0112}
0x171ea…171f8                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ec, t01=0x0160}
0x171f8…17200                Head {h00=0x0004, h01=0x0050, t00=0x00ec, t01=0x016e}
0x17200…1721c                Head {h00=0x0018, h01=0x0050, text=»W:VALA   EQU      * «, t00=0x00ec, t01=0x0176}
0x1721c…1726a (237, 0, 400)  Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00ed, t01=0x0004}
0x1726a…172b8                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00ed, t01=0x0052}
0x172b8…17306                Head {h00=0x004a, h01=0x0050, text=»**  W:VALA            VALIDATION LANGUAGE - MAIN ROUTINE.           **«, t00=0x00ed, t01=0x00a0}
0x17306…17310                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00ed, t01=0x00ee}
0x17310…17340                Head {h00=0x002c, h01=0x0050, text=»**  TO EXCLUDE THE COMPLETE VALIDATION, «, t00=0x00ed, t01=0x00f8}
0x17340…1738a                Head {h00=0x0046, h01=0x0050, text=»**  REPLACE 1 (ONE) BELOW BY 0 (ZERO) AND DELETE ALL DATA LINES IN«, t00=0x00ed, t01=0x0128}
0x1738a…173d2                Head {h00=0x0044, h01=0x0050, text=»**  VALIDATION STATEMENTS BRANCH TABLE AND VALIDATION OPERATORS «, t00=0x00ed, t01=0x0172}
0x173d2…173f2                Head {h00=0x001c, h01=0x0050, text=»**  BRANCH TABLE BELOW !«, t00=0x00ee, t01=0x002a}
0x173f2…173fc                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00ee, t01=0x004a}
0x173fc…17404                Head {h00=0x0004, h01=0x0050, t00=0x00ee, t01=0x0054}
0x17404…17418                Head {h00=0x0010, h01=0x0050, text=»X:VEVA EQU 1«, t00=0x00ee, t01=0x005c}
0x17418…17420                Head {h00=0x0004, h01=0x0050, t00=0x00ee, t01=0x0070}
0x17420…1746e                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00ee, t01=0x0078}
0x1746e…174bc                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00ee, t01=0x00c6}
0x174bc…174c4                Head {h00=0x0004, h01=0x0050, t00=0x00ee, t01=0x0114}
0x174c4…17512                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00ee, t01=0x011c}
0x17512…17560                Head {h00=0x004a, h01=0x0050, text=»**                    EQUATES FOR WSMGEN                            **«, t00=0x00ee, t01=0x016a}
0x17560…175ae                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x00ef, t01=0x0028}
0x175ae…175fc                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00ef, t01=0x0076}
0x175fc…1760a                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x00ef, t01=0x00c4}
0x1760a…17622                Head {h00=0x0014, h01=0x0050, text=»XVEVA EQU X:VEVA«, t00=0x00ef, t01=0x00d2}
0x17622…17636                Head {h00=0x0010, h01=0x0050, text=» IFT XVEVA=0«, t00=0x00ef, t01=0x00ea}
0x17636…17646                Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x00ef, t01=0x00fe}
0x17646…17652                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ef, t01=0x010e}
0x17652…17660                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x00ef, t01=0x011a}
0x17660…17668                Head {h00=0x0004, h01=0x0050, t00=0x00ef, t01=0x0128}
0x17668…1767c                Head {h00=0x0010, h01=0x0050, text=» IFT XVEVA=1«, t00=0x00ef, t01=0x0130}
0x1767c…17690                Head {h00=0x0010, h01=0x0050, text=» DATA W:VEVA«, t00=0x00ef, t01=0x0144}
0x17690…1769c                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ef, t01=0x0158}
0x1769c…176aa                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ef, t01=0x0164}
0x176aa…176b2                Head {h00=0x0004, h01=0x0050, t00=0x00ef, t01=0x0172}
0x176b2…176ce                Head {h00=0x0018, h01=0x0050, text=»W:STMT   EQU      * «, t00=0x00ef, t01=0x017a}
0x176ce…176e2                Head {h00=0x0010, h01=0x0050, text=» IFT XVEVA=1«, t00=0x00f0, t01=0x0008}
0x176e2…17730                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00f0, t01=0x001c}
0x17730…1777e                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00f0, t01=0x006a}
0x1777e…177cc                Head {h00=0x004a, h01=0x0050, text=»**  W:STMT            VALIDATION STATEMENTS - BRANCH TABLE          **«, t00=0x00f0, t01=0x00b8}
0x177cc…177d6                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00f0, t01=0x0106}
0x177d6…17822                Head {h00=0x0048, h01=0x0050, text=»**  TO EXCLUDE VALIDATION STATEMENT TYPES NOT IN USE IN YOUR SYSTEM,«, t00=0x00f0, t01=0x0110}
0x17822…1786e                Head {h00=0x0048, h01=0x0050, text=»**  REPLACE LABELS CORRESPONDING WITH EXCLUDED STATEMENTS BY W:V01C!«, t00=0x00f0, t01=0x015c}
0x1786e…178aa                Head {h00=0x0038, h01=0x0050, text=»**            A                                    A«, t00=0x00f1, t01=0x0018}
0x178aa…178e6                Head {h00=0x0038, h01=0x0050, text=»**            !                                    !«, t00=0x00f1, t01=0x0054}
0x178e6…17922                Head {h00=0x0038, h01=0x0050, text=»**            -------                      ---------«, t00=0x00f1, t01=0x0090}
0x17922…17956                Head {h00=0x0030, h01=0x0050, text=»**                  !                      !«, t00=0x00f1, t01=0x00cc}
0x17956…1798a                Head {h00=0x0030, h01=0x0050, text=»**                  V                      V«, t00=0x00f1, t01=0x0100}
0x1798a…17992                Head {h00=0x0004, h01=0x0050, t00=0x00f1, t01=0x0134}
0x17992…179ba                Head {h00=0x0024, h01=0x0050, text=» DATA W:V000 ALPHANUM ASSIGNMENT«, t00=0x00f1, t01=0x013c}
0x179ba…179de                Head {h00=0x0020, h01=0x0050, text=» DATA W:V002 NUM ASSIGNMENT «, t00=0x00f1, t01=0x0164}
0x179de…179fe                Head {h00=0x001c, h01=0x0050, text=» DATA W:V004 GO TO/GOTO «, t00=0x00f1, t01=0x0188}
0x179fe…17a24                Head {h00=0x0022, h01=0x0050, text=» DATA W:V006 IF...THEN LIN NO «, t00=0x00f2, t01=0x0018}
0x17a24…17a4c                Head {h00=0x0024, h01=0x0050, text=» DATA W:V008 IF...THEN STATEMENT«, t00=0x00f2, t01=0x003e}
0x17a4c…17a78                Head {h00=0x0028, h01=0x0050, text=» DATA W:V00A ON...GO TO/GOTO LINE NO«, t00=0x00f2, t01=0x0066}
0x17a78…17a92                Head {h00=0x0016, h01=0x0050, text=» DATA W:V00C CALL «, t00=0x00f2, t01=0x0092}
0x17a92…17aac                Head {h00=0x0016, h01=0x0050, text=» DATA W:V00E SECT «, t00=0x00f2, t01=0x00ac}
0x17aac…17ac6                Head {h00=0x0016, h01=0x0050, text=» DATA W:V010 ATTR «, t00=0x00f2, t01=0x00c6}
0x17ac6…17ae0                Head {h00=0x0016, h01=0x0050, text=» DATA W:V012 STOP «, t00=0x00f2, t01=0x00e0}
0x17ae0…17afa                Head {h00=0x0016, h01=0x0050, text=» DATA W:V014 EXIT «, t00=0x00f2, t01=0x00fa}
0x17afa…17b12                Head {h00=0x0014, h01=0x0050, text=» DATA W:V016 ERR«, t00=0x00f2, t01=0x0114}
0x17b12…17b2c                Head {h00=0x0016, h01=0x0050, text=» DATA W:V018 WARN «, t00=0x00f2, t01=0x012c}
0x17b2c…17b44                Head {h00=0x0014, h01=0x0050, text=» DATA W:V01A REM«, t00=0x00f2, t01=0x0146}
0x17b44…17b68                Head {h00=0x0020, h01=0x0050, text=» DATA W:V01C EMPTY STATEMENT«, t00=0x00f2, t01=0x015e}
0x17b68…17b70                Head {h00=0x0004, h01=0x0050, t00=0x00f2, t01=0x0182}
0x17b70…17bbe                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00f2, t01=0x018a}
0x17bbe…17c0c                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00f3, t01=0x0048}
0x17c0c…17c1a                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f3, t01=0x0096}
0x17c1a…17c68                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00f3, t01=0x00a4}
0x17c68…17cb6                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00f3, t01=0x00f2}
0x17cb6…17d04                Head {h00=0x004a, h01=0x0050, text=»**                    VALIDATION OPERATORS & FUNCTIONS              **«, t00=0x00f3, t01=0x0140}
0x17d04…17d52                Head {h00=0x004a, h01=0x0050, text=»**                    BRANCH TABLES.                                **«, t00=0x00f3, t01=0x018e}
0x17d52…17d5c                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x00f4, t01=0x004c}
0x17d5c…17d9e                Head {h00=0x003e, h01=0x0050, text=»**  TO EXCLUDE VALIDATION OPERATORS & FUNCTIONS NOT IN USE«, t00=0x00f4, t01=0x0056}
0x17d9e…17dba                Head {h00=0x0018, h01=0x0050, text=»**  IN YOUR SYSTEM, «, t00=0x00f4, t01=0x0098}
0x17dba…17e06                Head {h00=0x0048, h01=0x0050, text=»**  REPLACE LABELS CORRESPONDING WITH EXCLUDED OPERATORS BY W:EXP5! «, t00=0x00f4, t01=0x00b4}
0x17e06…17e42                Head {h00=0x0038, h01=0x0050, text=»**            A                                    A«, t00=0x00f4, t01=0x0100}
0x17e42…17e7e                Head {h00=0x0038, h01=0x0050, text=»**            !                                    !«, t00=0x00f4, t01=0x013c}
0x17e7e…17eba                Head {h00=0x0038, h01=0x0050, text=»**            -------                      ---------«, t00=0x00f4, t01=0x0178}
0x17eba…17eee                Head {h00=0x0030, h01=0x0050, text=»**                  !                      !«, t00=0x00f5, t01=0x0024}
0x17eee…17f22                Head {h00=0x0030, h01=0x0050, text=»**                  V                      V«, t00=0x00f5, t01=0x0058}
0x17f22…17f4a                Head {h00=0x0024, h01=0x0050, text=» DATA W:CMP RELATIONAL OPERATORS«, t00=0x00f5, t01=0x008c}
0x17f4a…17f56                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00f5, t01=0x00b4}
0x17f56…17f6a                Head {h00=0x0010, h01=0x0050, text=»W:OPER EQU *«, t00=0x00f5, t01=0x00c0}
0x17f6a…17f7e                Head {h00=0x0010, h01=0x0050, text=» IFT XVEVA=1«, t00=0x00f5, t01=0x00d4}
0x17f7e…17f9e                Head {h00=0x001c, h01=0x0050, text=» DATA W:OP0E CONCATENATE«, t00=0x00f5, t01=0x00e8}
0x17f9e…17fbc                Head {h00=0x001a, h01=0x0050, text=» DATA W:OP0F SUBSTRING«, t00=0x00f5, t01=0x0108}
0x17fbc…17fd4                Head {h00=0x0014, h01=0x0050, text=» DATA W:OP10 STR«, t00=0x00f5, t01=0x0126}
0x17fd4…17ff6                Head {h00=0x001e, h01=0x0050, text=» DATA W:OP11 MAKE POSITIVE«, t00=0x00f5, t01=0x013e}
0x17ff6…18012                Head {h00=0x0018, h01=0x0050, text=» DATA W:OP12 NEGATE «, t00=0x00f5, t01=0x0160}
0x18012…1802a                Head {h00=0x0014, h01=0x0050, text=» DATA W:OP13 ADD«, t00=0x00f5, t01=0x017c}
0x1802a…18048 (246, 0, 400)  Head {h00=0x001a, h01=0x0050, text=» DATA W:OP14 SUBTRACT «, t00=0x00f6, t01=0x0004}
0x18048…18064                Head {h00=0x0018, h01=0x0050, text=» DATA W:OP15 DIVIDE «, t00=0x00f6, t01=0x0022}
0x18064…18082                Head {h00=0x001a, h01=0x0050, text=» DATA W:OP16 MULTIPLY «, t00=0x00f6, t01=0x003e}
0x18082…1809a                Head {h00=0x0014, h01=0x0050, text=» DATA W:OP17 ABS«, t00=0x00f6, t01=0x005c}
0x1809a…180b2                Head {h00=0x0014, h01=0x0050, text=» DATA W:OP18 INT«, t00=0x00f6, t01=0x0074}
0x180b2…180ca                Head {h00=0x0014, h01=0x0050, text=» DATA W:OP19 SGN«, t00=0x00f6, t01=0x008c}
0x180ca…180e2                Head {h00=0x0014, h01=0x0050, text=» DATA W:OP1A TIM«, t00=0x00f6, t01=0x00a4}
0x180e2…180fa                Head {h00=0x0014, h01=0x0050, text=» DATA W:OP1B DAY«, t00=0x00f6, t01=0x00bc}
0x180fa…18112                Head {h00=0x0014, h01=0x0050, text=» DATA W:OP1C SYS«, t00=0x00f6, t01=0x00d4}
0x18112…1812a                Head {h00=0x0014, h01=0x0050, text=» DATA W:OP1D LEN«, t00=0x00f6, t01=0x00ec}
0x1812a…18142                Head {h00=0x0014, h01=0x0050, text=» DATA W:OP1E NUM«, t00=0x00f6, t01=0x0104}
0x18142…1815a                Head {h00=0x0014, h01=0x0050, text=» DATA W:OP1F DAT«, t00=0x00f6, t01=0x011c}
0x1815a…18172                Head {h00=0x0014, h01=0x0050, text=» DATA W:OP20 CDV«, t00=0x00f6, t01=0x0134}
0x18172…1818a                Head {h00=0x0014, h01=0x0050, text=» DATA W:OP21 POS«, t00=0x00f6, t01=0x014c}
0x1818a…181b0                Head {h00=0x0022, h01=0x0050, text=» DATA W:EXP5 PARANTHESIS (/22)«, t00=0x00f6, t01=0x0164}
0x181b0…181fe                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00f6, t01=0x018a}
0x181fe…1824c                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00f7, t01=0x0048}
0x1824c…1825a                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f7, t01=0x0096}
0x1825a…18262                Head {h00=0x0004, h01=0x0050, t00=0x00f7, t01=0x00a4}
0x18262…1826a                Head {h00=0x0004, h01=0x0050, t00=0x00f7, t01=0x00ac}
0x1826a…18272                Head {h00=0x0004, h01=0x0050, t00=0x00f7, t01=0x00b4}
0x18272…1827a                Head {h00=0x0004, h01=0x0050, t00=0x00f7, t01=0x00bc}
0x1827a…182c8                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00f7, t01=0x00c4}
0x182c8…18316                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x00f7, t01=0x0112}
0x18316…18364                Head {h00=0x004a, h01=0x0050, text=»**                    EXTERNAL FUNCTION CALLS.                      **«, t00=0x00f7, t01=0x0160}
0x18364…183b2                Head {h00=0x004a, h01=0x0050, text=»**                    DEFINE A NUMBER OF ASSEMBLER ROUTINES         **«, t00=0x00f8, t01=0x001e}
0x183b2…18400                Head {h00=0x004a, h01=0x0050, text=»**                    THAT CORRESPOND TO CALLS FROM YOUR VALIDATION.**«, t00=0x00f8, t01=0x006c}
0x18400…1844e                Head {h00=0x004a, h01=0x0050, text=»**                    A CONSECUTIVE TABLE OF ENTRIES                **«, t00=0x00f8, t01=0x00ba}
0x1844e…1849c                Head {h00=0x004a, h01=0x0050, text=»**                    STARTING WITH UF00 IS CREATED                 **«, t00=0x00f8, t01=0x0108}
0x1849c…184ea                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00f8, t01=0x0156}
0x184ea…184f2                Head {h00=0x0004, h01=0x0050, t00=0x00f9, t01=0x0014}
0x184f2…18506                Head {h00=0x0010, h01=0x0050, text=»X:UFNR EQU 0«, t00=0x00f9, t01=0x001c}
0x18506…1850e                Head {h00=0x0004, h01=0x0050, t00=0x00f9, t01=0x0030}
0x1850e…1855c                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00f9, t01=0x0038}
0x1855c…185aa                Head {h00=0x004a, h01=0x0050, text=»**                    EQUATES FOR WSMGEN                            **«, t00=0x00f9, t01=0x0086}
0x185aa…185f8                Head {h00=0x004a, h01=0x0050, text=»**                    ( MUST NOT BE ALTERED BY THE USER )           **«, t00=0x00f9, t01=0x00d4}
0x185f8…18646                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x00f9, t01=0x0122}
0x18646…1865e                Head {h00=0x0014, h01=0x0050, text=»XUFNR EQU X:UFNR«, t00=0x00f9, t01=0x0170}
0x1865e…1867c                Head {h00=0x001a, h01=0x0050, text=»XUFNR2 EQU XUFNR+XUFNR«, t00=0x00f9, t01=0x0188}
0x1867c…18684                Head {h00=0x0004, h01=0x0050, t00=0x00fa, t01=0x0016}
0x18684…186c2                Head {h00=0x003a, h01=0x0050, text=» DATA XUFNR2-2 W:UFTB LENGTH EQUATES MAX UF INDEX * 2 «, t00=0x00fa, t01=0x001e}
0x186c2…186fa                Head {h00=0x0034, h01=0x0050, text=»*   AND IS NEGATIVE (-2) IF NO UF:S ARE DEFINED «, t00=0x00fa, t01=0x005c}
0x186fa…18706                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00fa, t01=0x0094}
0x18706…1871a                Head {h00=0x0010, h01=0x0050, text=»W:UFTB EQU *«, t00=0x00fa, t01=0x00a0}
0x1871a…1872e                Head {h00=0x0010, h01=0x0050, text=» IFT XVEVA=1«, t00=0x00fa, t01=0x00b4}
0x1872e…18742                Head {h00=0x0010, h01=0x0050, text=» IFF XUFNR=0«, t00=0x00fa, t01=0x00c8}
0x18742…18754                Head {h00=0x000e, h01=0x0050, text=» DATA UF00«, t00=0x00fa, t01=0x00dc}
0x18754…18768                Head {h00=0x0010, h01=0x0050, text=» IFF XUFNR=1«, t00=0x00fa, t01=0x00ee}
0x18768…1877a                Head {h00=0x000e, h01=0x0050, text=» DATA UF01«, t00=0x00fa, t01=0x0102}
0x1877a…1878e                Head {h00=0x0010, h01=0x0050, text=» IFF XUFNR=2«, t00=0x00fa, t01=0x0114}
0x1878e…187a0                Head {h00=0x000e, h01=0x0050, text=» DATA UF02«, t00=0x00fa, t01=0x0128}
0x187a0…187b4                Head {h00=0x0010, h01=0x0050, text=» IFF XUFNR=3«, t00=0x00fa, t01=0x013a}
0x187b4…187c6                Head {h00=0x000e, h01=0x0050, text=» DATA UF03«, t00=0x00fa, t01=0x014e}
0x187c6…187da                Head {h00=0x0010, h01=0x0050, text=» IFF XUFNR=4«, t00=0x00fa, t01=0x0160}
0x187da…187ec                Head {h00=0x000e, h01=0x0050, text=» DATA UF04«, t00=0x00fa, t01=0x0174}
0x187ec…18800                Head {h00=0x0010, h01=0x0050, text=» IFF XUFNR=5«, t00=0x00fa, t01=0x0186}
0x18800…18812                Head {h00=0x000e, h01=0x0050, text=» DATA UF05«, t00=0x00fb, t01=0x000a}
0x18812…18826                Head {h00=0x0010, h01=0x0050, text=» IFF XUFNR=6«, t00=0x00fb, t01=0x001c}
0x18826…18838                Head {h00=0x000e, h01=0x0050, text=» DATA UF06«, t00=0x00fb, t01=0x0030}
0x18838…1884c                Head {h00=0x0010, h01=0x0050, text=» IFF XUFNR=7«, t00=0x00fb, t01=0x0042}
0x1884c…1885e                Head {h00=0x000e, h01=0x0050, text=» DATA UF07«, t00=0x00fb, t01=0x0056}
0x1885e…18872                Head {h00=0x0010, h01=0x0050, text=» IFF XUFNR=8«, t00=0x00fb, t01=0x0068}
0x18872…18884                Head {h00=0x000e, h01=0x0050, text=» DATA UF08«, t00=0x00fb, t01=0x007c}
0x18884…18898                Head {h00=0x0010, h01=0x0050, text=» IFF XUFNR=9«, t00=0x00fb, t01=0x008e}
0x18898…188aa                Head {h00=0x000e, h01=0x0050, text=» DATA UF09«, t00=0x00fb, t01=0x00a2}
0x188aa…188c0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=10 «, t00=0x00fb, t01=0x00b4}
0x188c0…188d2                Head {h00=0x000e, h01=0x0050, text=» DATA UF10«, t00=0x00fb, t01=0x00ca}
0x188d2…188e8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=11 «, t00=0x00fb, t01=0x00dc}
0x188e8…188fa                Head {h00=0x000e, h01=0x0050, text=» DATA UF11«, t00=0x00fb, t01=0x00f2}
0x188fa…18910                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=12 «, t00=0x00fb, t01=0x0104}
0x18910…18922                Head {h00=0x000e, h01=0x0050, text=» DATA UF12«, t00=0x00fb, t01=0x011a}
0x18922…18938                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=13 «, t00=0x00fb, t01=0x012c}
0x18938…1894a                Head {h00=0x000e, h01=0x0050, text=» DATA UF13«, t00=0x00fb, t01=0x0142}
0x1894a…18960                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=14 «, t00=0x00fb, t01=0x0154}
0x18960…18972                Head {h00=0x000e, h01=0x0050, text=» DATA UF14«, t00=0x00fb, t01=0x016a}
0x18972…18988                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=15 «, t00=0x00fb, t01=0x017c}
0x18988…1899a (252, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» DATA UF15«, t00=0x00fc, t01=0x0004}
0x1899a…189b0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=16 «, t00=0x00fc, t01=0x0016}
0x189b0…189c2                Head {h00=0x000e, h01=0x0050, text=» DATA UF16«, t00=0x00fc, t01=0x002c}
0x189c2…189d8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=17 «, t00=0x00fc, t01=0x003e}
0x189d8…189ea                Head {h00=0x000e, h01=0x0050, text=» DATA UF17«, t00=0x00fc, t01=0x0054}
0x189ea…18a00                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=18 «, t00=0x00fc, t01=0x0066}
0x18a00…18a12                Head {h00=0x000e, h01=0x0050, text=» DATA UF18«, t00=0x00fc, t01=0x007c}
0x18a12…18a28                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=19 «, t00=0x00fc, t01=0x008e}
0x18a28…18a3a                Head {h00=0x000e, h01=0x0050, text=» DATA UF19«, t00=0x00fc, t01=0x00a4}
0x18a3a…18a50                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=20 «, t00=0x00fc, t01=0x00b6}
0x18a50…18a62                Head {h00=0x000e, h01=0x0050, text=» DATA UF20«, t00=0x00fc, t01=0x00cc}
0x18a62…18a78                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=21 «, t00=0x00fc, t01=0x00de}
0x18a78…18a8a                Head {h00=0x000e, h01=0x0050, text=» DATA UF21«, t00=0x00fc, t01=0x00f4}
0x18a8a…18aa0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=22 «, t00=0x00fc, t01=0x0106}
0x18aa0…18ab2                Head {h00=0x000e, h01=0x0050, text=» DATA UF22«, t00=0x00fc, t01=0x011c}
0x18ab2…18ac8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=23 «, t00=0x00fc, t01=0x012e}
0x18ac8…18ada                Head {h00=0x000e, h01=0x0050, text=» DATA UF23«, t00=0x00fc, t01=0x0144}
0x18ada…18af0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=24 «, t00=0x00fc, t01=0x0156}
0x18af0…18b02                Head {h00=0x000e, h01=0x0050, text=» DATA UF24«, t00=0x00fc, t01=0x016c}
0x18b02…18b18                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=25 «, t00=0x00fc, t01=0x017e}
0x18b18…18b2a (253, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» DATA UF25«, t00=0x00fd, t01=0x0004}
0x18b2a…18b40                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=26 «, t00=0x00fd, t01=0x0016}
0x18b40…18b52                Head {h00=0x000e, h01=0x0050, text=» DATA UF26«, t00=0x00fd, t01=0x002c}
0x18b52…18b68                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=27 «, t00=0x00fd, t01=0x003e}
0x18b68…18b7a                Head {h00=0x000e, h01=0x0050, text=» DATA UF27«, t00=0x00fd, t01=0x0054}
0x18b7a…18b90                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=28 «, t00=0x00fd, t01=0x0066}
0x18b90…18ba2                Head {h00=0x000e, h01=0x0050, text=» DATA UF28«, t00=0x00fd, t01=0x007c}
0x18ba2…18bb8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=29 «, t00=0x00fd, t01=0x008e}
0x18bb8…18bca                Head {h00=0x000e, h01=0x0050, text=» DATA UF29«, t00=0x00fd, t01=0x00a4}
0x18bca…18be0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=30 «, t00=0x00fd, t01=0x00b6}
0x18be0…18bf2                Head {h00=0x000e, h01=0x0050, text=» DATA UF30«, t00=0x00fd, t01=0x00cc}
0x18bf2…18c08                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=31 «, t00=0x00fd, t01=0x00de}
0x18c08…18c1a                Head {h00=0x000e, h01=0x0050, text=» DATA UF31«, t00=0x00fd, t01=0x00f4}
0x18c1a…18c30                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=32 «, t00=0x00fd, t01=0x0106}
0x18c30…18c42                Head {h00=0x000e, h01=0x0050, text=» DATA UF32«, t00=0x00fd, t01=0x011c}
0x18c42…18c58                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=33 «, t00=0x00fd, t01=0x012e}
0x18c58…18c6a                Head {h00=0x000e, h01=0x0050, text=» DATA UF33«, t00=0x00fd, t01=0x0144}
0x18c6a…18c80                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=34 «, t00=0x00fd, t01=0x0156}
0x18c80…18c92                Head {h00=0x000e, h01=0x0050, text=» DATA UF34«, t00=0x00fd, t01=0x016c}
0x18c92…18ca8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=35 «, t00=0x00fd, t01=0x017e}
0x18ca8…18cba (254, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» DATA UF35«, t00=0x00fe, t01=0x0004}
0x18cba…18cd0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=36 «, t00=0x00fe, t01=0x0016}
0x18cd0…18ce2                Head {h00=0x000e, h01=0x0050, text=» DATA UF36«, t00=0x00fe, t01=0x002c}
0x18ce2…18cf8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=37 «, t00=0x00fe, t01=0x003e}
0x18cf8…18d0a                Head {h00=0x000e, h01=0x0050, text=» DATA UF37«, t00=0x00fe, t01=0x0054}
0x18d0a…18d20                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=38 «, t00=0x00fe, t01=0x0066}
0x18d20…18d32                Head {h00=0x000e, h01=0x0050, text=» DATA UF38«, t00=0x00fe, t01=0x007c}
0x18d32…18d48                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=39 «, t00=0x00fe, t01=0x008e}
0x18d48…18d5a                Head {h00=0x000e, h01=0x0050, text=» DATA UF39«, t00=0x00fe, t01=0x00a4}
0x18d5a…18d70                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=40 «, t00=0x00fe, t01=0x00b6}
0x18d70…18d82                Head {h00=0x000e, h01=0x0050, text=» DATA UF40«, t00=0x00fe, t01=0x00cc}
0x18d82…18d98                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=41 «, t00=0x00fe, t01=0x00de}
0x18d98…18daa                Head {h00=0x000e, h01=0x0050, text=» DATA UF41«, t00=0x00fe, t01=0x00f4}
0x18daa…18dc0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=42 «, t00=0x00fe, t01=0x0106}
0x18dc0…18dd2                Head {h00=0x000e, h01=0x0050, text=» DATA UF42«, t00=0x00fe, t01=0x011c}
0x18dd2…18de8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=43 «, t00=0x00fe, t01=0x012e}
0x18de8…18dfa                Head {h00=0x000e, h01=0x0050, text=» DATA UF43«, t00=0x00fe, t01=0x0144}
0x18dfa…18e10                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=44 «, t00=0x00fe, t01=0x0156}
0x18e10…18e22                Head {h00=0x000e, h01=0x0050, text=» DATA UF44«, t00=0x00fe, t01=0x016c}
0x18e22…18e38                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=45 «, t00=0x00fe, t01=0x017e}
0x18e38…18e4a (255, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» DATA UF45«, t00=0x00ff, t01=0x0004}
0x18e4a…18e60                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=46 «, t00=0x00ff, t01=0x0016}
0x18e60…18e72                Head {h00=0x000e, h01=0x0050, text=» DATA UF46«, t00=0x00ff, t01=0x002c}
0x18e72…18e88                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=47 «, t00=0x00ff, t01=0x003e}
0x18e88…18e9a                Head {h00=0x000e, h01=0x0050, text=» DATA UF47«, t00=0x00ff, t01=0x0054}
0x18e9a…18eb0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=48 «, t00=0x00ff, t01=0x0066}
0x18eb0…18ec2                Head {h00=0x000e, h01=0x0050, text=» DATA UF48«, t00=0x00ff, t01=0x007c}
0x18ec2…18ed8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=49 «, t00=0x00ff, t01=0x008e}
0x18ed8…18eea                Head {h00=0x000e, h01=0x0050, text=» DATA UF49«, t00=0x00ff, t01=0x00a4}
0x18eea…18f00                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=50 «, t00=0x00ff, t01=0x00b6}
0x18f00…18f12                Head {h00=0x000e, h01=0x0050, text=» DATA UF50«, t00=0x00ff, t01=0x00cc}
0x18f12…18f28                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=51 «, t00=0x00ff, t01=0x00de}
0x18f28…18f3a                Head {h00=0x000e, h01=0x0050, text=» DATA UF51«, t00=0x00ff, t01=0x00f4}
0x18f3a…18f50                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=52 «, t00=0x00ff, t01=0x0106}
0x18f50…18f62                Head {h00=0x000e, h01=0x0050, text=» DATA UF52«, t00=0x00ff, t01=0x011c}
0x18f62…18f78                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=53 «, t00=0x00ff, t01=0x012e}
0x18f78…18f8a                Head {h00=0x000e, h01=0x0050, text=» DATA UF53«, t00=0x00ff, t01=0x0144}
0x18f8a…18fa0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=54 «, t00=0x00ff, t01=0x0156}
0x18fa0…18fb2                Head {h00=0x000e, h01=0x0050, text=» DATA UF54«, t00=0x00ff, t01=0x016c}
0x18fb2…18fc8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=55 «, t00=0x00ff, t01=0x017e}
0x18fc8…18fda (256, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» DATA UF55«, t00=0x0100, t01=0x0004}
0x18fda…18ff0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=56 «, t00=0x0100, t01=0x0016}
0x18ff0…19002                Head {h00=0x000e, h01=0x0050, text=» DATA UF56«, t00=0x0100, t01=0x002c}
0x19002…19018                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=57 «, t00=0x0100, t01=0x003e}
0x19018…1902a                Head {h00=0x000e, h01=0x0050, text=» DATA UF57«, t00=0x0100, t01=0x0054}
0x1902a…19040                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=58 «, t00=0x0100, t01=0x0066}
0x19040…19052                Head {h00=0x000e, h01=0x0050, text=» DATA UF58«, t00=0x0100, t01=0x007c}
0x19052…19068                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=59 «, t00=0x0100, t01=0x008e}
0x19068…1907a                Head {h00=0x000e, h01=0x0050, text=» DATA UF59«, t00=0x0100, t01=0x00a4}
0x1907a…19090                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=60 «, t00=0x0100, t01=0x00b6}
0x19090…190a2                Head {h00=0x000e, h01=0x0050, text=» DATA UF60«, t00=0x0100, t01=0x00cc}
0x190a2…190b8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=61 «, t00=0x0100, t01=0x00de}
0x190b8…190ca                Head {h00=0x000e, h01=0x0050, text=» DATA UF61«, t00=0x0100, t01=0x00f4}
0x190ca…190e0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=62 «, t00=0x0100, t01=0x0106}
0x190e0…190f2                Head {h00=0x000e, h01=0x0050, text=» DATA UF62«, t00=0x0100, t01=0x011c}
0x190f2…19108                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=63 «, t00=0x0100, t01=0x012e}
0x19108…1911a                Head {h00=0x000e, h01=0x0050, text=» DATA UF63«, t00=0x0100, t01=0x0144}
0x1911a…19130                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=64 «, t00=0x0100, t01=0x0156}
0x19130…19142                Head {h00=0x000e, h01=0x0050, text=» DATA UF64«, t00=0x0100, t01=0x016c}
0x19142…19158                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=65 «, t00=0x0100, t01=0x017e}
0x19158…1916a (257, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» DATA UF65«, t00=0x0101, t01=0x0004}
0x1916a…19180                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=66 «, t00=0x0101, t01=0x0016}
0x19180…19192                Head {h00=0x000e, h01=0x0050, text=» DATA UF66«, t00=0x0101, t01=0x002c}
0x19192…191a8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=67 «, t00=0x0101, t01=0x003e}
0x191a8…191ba                Head {h00=0x000e, h01=0x0050, text=» DATA UF67«, t00=0x0101, t01=0x0054}
0x191ba…191d0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=68 «, t00=0x0101, t01=0x0066}
0x191d0…191e2                Head {h00=0x000e, h01=0x0050, text=» DATA UF68«, t00=0x0101, t01=0x007c}
0x191e2…191f8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=69 «, t00=0x0101, t01=0x008e}
0x191f8…1920a                Head {h00=0x000e, h01=0x0050, text=» DATA UF69«, t00=0x0101, t01=0x00a4}
0x1920a…19220                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=70 «, t00=0x0101, t01=0x00b6}
0x19220…19232                Head {h00=0x000e, h01=0x0050, text=» DATA UF70«, t00=0x0101, t01=0x00cc}
0x19232…19248                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=71 «, t00=0x0101, t01=0x00de}
0x19248…1925a                Head {h00=0x000e, h01=0x0050, text=» DATA UF71«, t00=0x0101, t01=0x00f4}
0x1925a…19270                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=72 «, t00=0x0101, t01=0x0106}
0x19270…19282                Head {h00=0x000e, h01=0x0050, text=» DATA UF72«, t00=0x0101, t01=0x011c}
0x19282…19298                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=73 «, t00=0x0101, t01=0x012e}
0x19298…192aa                Head {h00=0x000e, h01=0x0050, text=» DATA UF73«, t00=0x0101, t01=0x0144}
0x192aa…192c0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=74 «, t00=0x0101, t01=0x0156}
0x192c0…192d2                Head {h00=0x000e, h01=0x0050, text=» DATA UF74«, t00=0x0101, t01=0x016c}
0x192d2…192e8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=75 «, t00=0x0101, t01=0x017e}
0x192e8…192fa (258, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» DATA UF75«, t00=0x0102, t01=0x0004}
0x192fa…19310                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=76 «, t00=0x0102, t01=0x0016}
0x19310…19322                Head {h00=0x000e, h01=0x0050, text=» DATA UF76«, t00=0x0102, t01=0x002c}
0x19322…19338                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=77 «, t00=0x0102, t01=0x003e}
0x19338…1934a                Head {h00=0x000e, h01=0x0050, text=» DATA UF77«, t00=0x0102, t01=0x0054}
0x1934a…19360                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=78 «, t00=0x0102, t01=0x0066}
0x19360…19372                Head {h00=0x000e, h01=0x0050, text=» DATA UF78«, t00=0x0102, t01=0x007c}
0x19372…19388                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=79 «, t00=0x0102, t01=0x008e}
0x19388…1939a                Head {h00=0x000e, h01=0x0050, text=» DATA UF79«, t00=0x0102, t01=0x00a4}
0x1939a…193b0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=80 «, t00=0x0102, t01=0x00b6}
0x193b0…193c2                Head {h00=0x000e, h01=0x0050, text=» DATA UF80«, t00=0x0102, t01=0x00cc}
0x193c2…193d8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=81 «, t00=0x0102, t01=0x00de}
0x193d8…193ea                Head {h00=0x000e, h01=0x0050, text=» DATA UF81«, t00=0x0102, t01=0x00f4}
0x193ea…19400                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=82 «, t00=0x0102, t01=0x0106}
0x19400…19412                Head {h00=0x000e, h01=0x0050, text=» DATA UF82«, t00=0x0102, t01=0x011c}
0x19412…19428                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=83 «, t00=0x0102, t01=0x012e}
0x19428…1943a                Head {h00=0x000e, h01=0x0050, text=» DATA UF83«, t00=0x0102, t01=0x0144}
0x1943a…19450                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=84 «, t00=0x0102, t01=0x0156}
0x19450…19462                Head {h00=0x000e, h01=0x0050, text=» DATA UF84«, t00=0x0102, t01=0x016c}
0x19462…19478                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=85 «, t00=0x0102, t01=0x017e}
0x19478…1948a (259, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» DATA UF85«, t00=0x0103, t01=0x0004}
0x1948a…194a0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=86 «, t00=0x0103, t01=0x0016}
0x194a0…194b2                Head {h00=0x000e, h01=0x0050, text=» DATA UF86«, t00=0x0103, t01=0x002c}
0x194b2…194c8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=87 «, t00=0x0103, t01=0x003e}
0x194c8…194da                Head {h00=0x000e, h01=0x0050, text=» DATA UF87«, t00=0x0103, t01=0x0054}
0x194da…194f0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=88 «, t00=0x0103, t01=0x0066}
0x194f0…19502                Head {h00=0x000e, h01=0x0050, text=» DATA UF88«, t00=0x0103, t01=0x007c}
0x19502…19518                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=89 «, t00=0x0103, t01=0x008e}
0x19518…1952a                Head {h00=0x000e, h01=0x0050, text=» DATA UF89«, t00=0x0103, t01=0x00a4}
0x1952a…19540                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=90 «, t00=0x0103, t01=0x00b6}
0x19540…19552                Head {h00=0x000e, h01=0x0050, text=» DATA UF90«, t00=0x0103, t01=0x00cc}
0x19552…19568                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=91 «, t00=0x0103, t01=0x00de}
0x19568…1957a                Head {h00=0x000e, h01=0x0050, text=» DATA UF91«, t00=0x0103, t01=0x00f4}
0x1957a…19590                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=92 «, t00=0x0103, t01=0x0106}
0x19590…195a2                Head {h00=0x000e, h01=0x0050, text=» DATA UF92«, t00=0x0103, t01=0x011c}
0x195a2…195b8                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=93 «, t00=0x0103, t01=0x012e}
0x195b8…195ca                Head {h00=0x000e, h01=0x0050, text=» DATA UF93«, t00=0x0103, t01=0x0144}
0x195ca…195e0                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=94 «, t00=0x0103, t01=0x0156}
0x195e0…195f2                Head {h00=0x000e, h01=0x0050, text=» DATA UF94«, t00=0x0103, t01=0x016c}
0x195f2…19608                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=95 «, t00=0x0103, t01=0x017e}
0x19608…1961a (260, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» DATA UF95«, t00=0x0104, t01=0x0004}
0x1961a…19630                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=96 «, t00=0x0104, t01=0x0016}
0x19630…19642                Head {h00=0x000e, h01=0x0050, text=» DATA UF96«, t00=0x0104, t01=0x002c}
0x19642…19658                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=97 «, t00=0x0104, t01=0x003e}
0x19658…1966a                Head {h00=0x000e, h01=0x0050, text=» DATA UF97«, t00=0x0104, t01=0x0054}
0x1966a…19680                Head {h00=0x0012, h01=0x0050, text=» IFF XUFNR=98 «, t00=0x0104, t01=0x0066}
0x19680…19692                Head {h00=0x000e, h01=0x0050, text=» DATA UF98«, t00=0x0104, t01=0x007c}
0x19692…196a8                Head {h00=0x0012, h01=0x0050, text=» IFT XUFNR=99 «, t00=0x0104, t01=0x008e}
0x196a8…196ba                Head {h00=0x000e, h01=0x0050, text=» DATA UF99«, t00=0x0104, t01=0x00a4}
0x196ba…196c6                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0104, t01=0x00b6}
0x196c6…196d4                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0104, t01=0x00c2}
0x196d4…196dc                Head {h00=0x0004, h01=0x0050, t00=0x0104, t01=0x00d0}
0x196dc…196e4                Head {h00=0x0004, h01=0x0050, t00=0x0104, t01=0x00d8}
0x196e4…196ec                Head {h00=0x0004, h01=0x0050, t00=0x0104, t01=0x00e0}
0x196ec…196f4                Head {h00=0x0004, h01=0x0050, t00=0x0104, t01=0x00e8}
0x196f4…196fc                Head {h00=0x0004, h01=0x0050, t00=0x0104, t01=0x00f0}
0x196fc…19704                Head {h00=0x0004, h01=0x0050, t00=0x0104, t01=0x00f8}
0x19704…1970c                Head {h00=0x0004, h01=0x0050, t00=0x0104, t01=0x0100}
0x1970c…19714                Head {h00=0x0004, h01=0x0050, t00=0x0104, t01=0x0108}
0x19714…1971c                Head {h00=0x0004, h01=0x0050, t00=0x0104, t01=0x0110}
0x1971c…19724                Head {h00=0x0004, h01=0x0050, t00=0x0104, t01=0x0118}
0x19724…1972c                Head {h00=0x0004, h01=0x0050, t00=0x0104, t01=0x0120}
0x1972c…19734                Head {h00=0x0004, h01=0x0050, t00=0x0104, t01=0x0128}
0x19734…1973c                Head {h00=0x0004, h01=0x0050, t00=0x0104, t01=0x0130}
0x1973c…1978a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0104, t01=0x0138}
0x1978a…197d8                Head {h00=0x004a, h01=0x0050, text=»**                    9. USER DEFINED ASSEMBLER ROUTINE LINKED      **«, t00=0x0104, t01=0x0186}
0x197d8…19826                Head {h00=0x004a, h01=0x0050, text=»**                    .  WITH THE WSM INTERPRETER:                  **«, t00=0x0105, t01=0x0044}
0x19826…19874                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0105, t01=0x0092}
0x19874…19882                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0105, t01=0x00e0}
0x19882…1988a                Head {h00=0x0004, h01=0x0050, t00=0x0105, t01=0x00ee}
0x1988a…198d8                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0105, t01=0x00f6}
0x198d8…19926                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0105, t01=0x0144}
0x19926…19974 (262, 0, 400)  Head {h00=0x004a, h01=0x0050, text=»**                    IT IS POSSIBLE TO LINK AN USERDEFINED         **«, t00=0x0106, t01=0x0004}
0x19974…199c2                Head {h00=0x004a, h01=0x0050, text=»**                    ASEMBLER ROUTINE WITH THE WSM INTER-          **«, t00=0x0106, t01=0x0052}
0x199c2…19a10                Head {h00=0x004a, h01=0x0050, text=»**                    PRETER TO BE CALLED FROM THE APPLICATION OR   **«, t00=0x0106, t01=0x00a0}
0x19a10…19a5e                Head {h00=0x004a, h01=0x0050, text=»**                    THE WSM INTERPRETER.                          **«, t00=0x0106, t01=0x00ee}
0x19a5e…19aac                Head {h00=0x004a, h01=0x0050, text=»**                    THE LINKING SHOULD BE DONE BY RE-             **«, t00=0x0106, t01=0x013c}
0x19aac…19afa                Head {h00=0x004a, h01=0x0050, text=»**                    PLACING THE ZERO BELOW WITH THE NAME OF       **«, t00=0x0106, t01=0x018a}
0x19afa…19b48                Head {h00=0x004a, h01=0x0050, text=»**                    THE ASSEMBLER SUBROUTINE. THIS NAME MUST      **«, t00=0x0107, t01=0x0048}
0x19b48…19b96                Head {h00=0x004a, h01=0x0050, text=»**                    ALSO BE DEFINED AS EXTERNAL ACCORDING         **«, t00=0x0107, t01=0x0096}
0x19b96…19be4                Head {h00=0x004a, h01=0x0050, text=»**                    TO "EXTRN"-DECLARATIONS IN THE BEGINNING      **«, t00=0x0107, t01=0x00e4}
0x19be4…19c32                Head {h00=0x004a, h01=0x0050, text=»**                    OF THIS PROGRAM.                              **«, t00=0x0107, t01=0x0132}
0x19c32…19c80                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0107, t01=0x0180}
0x19c80…19cce                Head {h00=0x004a, h01=0x0050, text=»**                    1. SUBROUTINE CALLED FROM THE APPLICATION     **«, t00=0x0108, t01=0x003e}
0x19cce…19cd8                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0108, t01=0x008c}
0x19cd8…19ce6                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0108, t01=0x0096}
0x19ce6…19cfa                Head {h00=0x0010, h01=0x0050, text=»X:USRU EQU 0«, t00=0x0108, t01=0x00a4}
0x19cfa…19d12                Head {h00=0x0014, h01=0x0050, text=»XUSRU EQU X:USRU«, t00=0x0108, t01=0x00b8}
0x19d12…19d20                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x0108, t01=0x00d0}
0x19d20…19d34                Head {h00=0x0010, h01=0x0050, text=» IFT XUSRU=0«, t00=0x0108, t01=0x00de}
0x19d34…19d4a                Head {h00=0x0012, h01=0x0050, text=»W:USRU DATA 0 «, t00=0x0108, t01=0x00f2}
0x19d4a…19d56                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0108, t01=0x0108}
0x19d56…19d6a                Head {h00=0x0010, h01=0x0050, text=» IFT XUSRU=1«, t00=0x0108, t01=0x0114}
0x19d6a…19d84                Head {h00=0x0016, h01=0x0050, text=»W:USRU DATA Q:S902«, t00=0x0108, t01=0x0128}
0x19d84…19d90                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0108, t01=0x0142}
0x19d90…19dde                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0108, t01=0x014e}
0x19dde…19e2c                Head {h00=0x004a, h01=0x0050, text=»**                    2. SUBROUTINE CALLED FROM WSM INTERPRETER     **«, t00=0x0109, t01=0x000c}
0x19e2c…19e7a                Head {h00=0x004a, h01=0x0050, text=»**                    .  DURING A WRCIVE REQUEST E.G TO MODIFY THE  **«, t00=0x0109, t01=0x005a}
0x19e7a…19ec8                Head {h00=0x004a, h01=0x0050, text=»**                    .  PBLK BUFFER RETURNED TO THE APPLICATION    **«, t00=0x0109, t01=0x00a8}
0x19ec8…19ed2                Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0109, t01=0x00f6}
0x19ed2…19ee0                Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0109, t01=0x0100}
0x19ee0…19ef4                Head {h00=0x0010, h01=0x0050, text=»X:PBUF EQU 0«, t00=0x0109, t01=0x010e}
0x19ef4…19f0c                Head {h00=0x0014, h01=0x0050, text=»XPBUF EQU X:PBUF«, t00=0x0109, t01=0x0122}
0x19f0c…19f1a                Head {h00=0x000a, h01=0x0050, text=» LIST «, t00=0x0109, t01=0x013a}
0x19f1a…19f2e                Head {h00=0x0010, h01=0x0050, text=» IFT XPBUF=0«, t00=0x0109, t01=0x0148}
0x19f2e…19f44                Head {h00=0x0012, h01=0x0050, text=»W:PBUF DATA 0 «, t00=0x0109, t01=0x015c}
0x19f44…19f50                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0109, t01=0x0172}
0x19f50…19f64                Head {h00=0x0010, h01=0x0050, text=» IFT XPBUF=1«, t00=0x0109, t01=0x017e}
0x19f64…19f7e (266, 0, 400)  Head {h00=0x0016, h01=0x0050, text=»W:PBUF DATA Q:S904«, t00=0x010a, t01=0x0004}
0x19f7e…19f8a                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x010a, t01=0x001e}
0x19f8a…19f92                Head {h00=0x0004, h01=0x0050, t00=0x010a, t01=0x002a}
0x19f92…19fa0                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010a, t01=0x0032}
0x19fa0…19fee                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x010a, t01=0x0040}
0x19fee…1a03c                Head {h00=0x004a, h01=0x0050, text=»**                    NOTE:                                         **«, t00=0x010a, t01=0x008e}
0x1a03c…1a08a                Head {h00=0x004a, h01=0x0050, text=»**                    THIS INTERFACE SHOULD NOT BE MIXED UP WITH    **«, t00=0x010a, t01=0x00dc}
0x1a08a…1a0d8                Head {h00=0x004a, h01=0x0050, text=»**                    THE INTERFACE REQUIRED FOR UF-ROUTINES        **«, t00=0x010a, t01=0x012a}
0x1a0d8…1a126                Head {h00=0x004a, h01=0x0050, text=»**                    CALLED FROM WSM BASIC.                        **«, t00=0x010a, t01=0x0178}
0x1a126…1a174                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x010b, t01=0x0036}
0x1a174…1a1c2                Head {h00=0x004a, h01=0x0050, text=»**                    NOTE:                                         **«, t00=0x010b, t01=0x0084}
0x1a1c2…1a210                Head {h00=0x004a, h01=0x0050, text=»**                    THIS INTERFACE IS NOT RECOMMENDED.            **«, t00=0x010b, t01=0x00d2}
0x1a210…1a25e                Head {h00=0x004a, h01=0x0050, text=»**                    CONTACT FTS DEVELOPMENT DEPARTMENT BEFORE USE **«, t00=0x010b, t01=0x0120}
0x1a25e…1a2ac                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x010b, t01=0x016e}
0x1a2ac…1a2fa                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x010c, t01=0x002c}
0x1a2fa…1a308                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010c, t01=0x007a}
0x1a308…1a310                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x0088}
0x1a310…1a318                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x0090}
0x1a318…1a320                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x0098}
0x1a320…1a328                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x00a0}
0x1a328…1a330                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x00a8}
0x1a330…1a338                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x00b0}
0x1a338…1a340                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x00b8}
0x1a340…1a348                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x00c0}
0x1a348…1a350                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x00c8}
0x1a350…1a358                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x00d0}
0x1a358…1a360                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x00d8}
0x1a360…1a368                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x00e0}
0x1a368…1a370                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x00e8}
0x1a370…1a378                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x00f0}
0x1a378…1a380                Head {h00=0x0004, h01=0x0050, t00=0x010c, t01=0x00f8}
0x1a380…1a3ce                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x010c, t01=0x0100}
0x1a3ce…1a41c                Head {h00=0x004a, h01=0x0050, text=»**                    10.ROUTINES TO PACK NUMERIC DATA.             **«, t00=0x010c, t01=0x014e}
0x1a41c…1a46a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x010d, t01=0x000c}
0x1a46a…1a478                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010d, t01=0x005a}
0x1a478…1a480                Head {h00=0x0004, h01=0x0050, t00=0x010d, t01=0x0068}
0x1a480…1a488                Head {h00=0x0004, h01=0x0050, t00=0x010d, t01=0x0070}
0x1a488…1a490                Head {h00=0x0004, h01=0x0050, t00=0x010d, t01=0x0078}
0x1a490…1a4de                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x010d, t01=0x0080}
0x1a4de…1a52c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x010d, t01=0x00ce}
0x1a52c…1a57a                Head {h00=0x004a, h01=0x0050, text=»**                    WHEN PACKING NUMERIC VALUES IN THE            **«, t00=0x010d, t01=0x011c}
0x1a57a…1a5c8                Head {h00=0x004a, h01=0x0050, text=»**                    PARAMETERBLOCK BUFFER TO BE SENT BACK TO      **«, t00=0x010d, t01=0x016a}
0x1a5c8…1a616                Head {h00=0x004a, h01=0x0050, text=»**                    THE APPLICATION IT IS POSSIBLE TO EXCLUDE     **«, t00=0x010e, t01=0x0028}
0x1a616…1a664                Head {h00=0x004a, h01=0x0050, text=»**                    THE DECIMAL POINT OR COMMA.                   **«, t00=0x010e, t01=0x0076}
0x1a664…1a6b2                Head {h00=0x004a, h01=0x0050, text=»**                    THIS IS DONE BY REPLACING THE PACKROUTINE     **«, t00=0x010e, t01=0x00c4}
0x1a6b2…1a700                Head {h00=0x004a, h01=0x0050, text=»**                    W:NPA2 BELOW WITH W:NPA3.                     **«, t00=0x010e, t01=0x0112}
0x1a700…1a74e                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x010e, t01=0x0160}
0x1a74e…1a79c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x010f, t01=0x001e}
0x1a79c…1a7ea                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x010f, t01=0x006c}
0x1a7ea…1a7f2                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x00ba}
0x1a7f2…1a806                Head {h00=0x0010, h01=0x0050, text=»W:NUMP EQU *«, t00=0x010f, t01=0x00c2}
0x1a806…1a81a                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x010f, t01=0x00d6}
0x1a81a…1a82e                Head {h00=0x0010, h01=0x0050, text=» DATA W:NPA2«, t00=0x010f, t01=0x00ea}
0x1a82e…1a83a                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x010f, t01=0x00fe}
0x1a83a…1a848                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010f, t01=0x010a}
0x1a848…1a850                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0118}
0x1a850…1a858                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0120}
0x1a858…1a860                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0128}
0x1a860…1a868                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0130}
0x1a868…1a870                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0138}
0x1a870…1a878                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0140}
0x1a878…1a880                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0148}
0x1a880…1a888                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0150}
0x1a888…1a890                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0158}
0x1a890…1a898                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0160}
0x1a898…1a8a0                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0168}
0x1a8a0…1a8a8                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0170}
0x1a8a8…1a8b0                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0178}
0x1a8b0…1a8b8                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0180}
0x1a8b8…1a8c0                Head {h00=0x0004, h01=0x0050, t00=0x010f, t01=0x0188}
0x1a8c0…1a90e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x010f, t01=0x0190}
0x1a90e…1a95c                Head {h00=0x004a, h01=0x0050, text=»**                    11.WSM BASIC DEBUGGER.                        **«, t00=0x0110, t01=0x004e}
0x1a95c…1a9aa                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0110, t01=0x009c}
0x1a9aa…1a9b2                Head {h00=0x0004, h01=0x0050, t00=0x0110, t01=0x00ea}
0x1a9b2…1a9c0                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0110, t01=0x00f2}
0x1a9c0…1aa0e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0110, t01=0x0100}
0x1aa0e…1aa5c                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0110, t01=0x014e}
0x1aa5c…1aaaa                Head {h00=0x004a, h01=0x0050, text=»**                    THE WSM VALIDATION BASIC LANGUAGE DEBUGGER.   **«, t00=0x0111, t01=0x000c}
0x1aaaa…1aaf8                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0111, t01=0x005a}
0x1aaf8…1ab46                Head {h00=0x004a, h01=0x0050, text=»**                    W:BBUG                                        **«, t00=0x0111, t01=0x00a8}
0x1ab46…1ab94                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0111, t01=0x00f6}
0x1ab94…1abe2                Head {h00=0x004a, h01=0x0050, text=»**                    SET THE DATA WORD BELOW TO ZERO TO            **«, t00=0x0111, t01=0x0144}
0x1abe2…1ac30 (274, 0, 398)  Head {h00=0x004a, h01=0x0050, text=»**                    EXCLUDE THE DEBUGGER.                         **«, t00=0x0112, t01=0x0004}
0x1ac30…1ac7e                Head {h00=0x004a, h01=0x0050, text=»**                    SET THE DATA WORD BELOW TO W:BBUG TO          **«, t00=0x0112, t01=0x0052}
0x1ac7e…1accc                Head {h00=0x004a, h01=0x0050, text=»**                    INCLUDE THE DEBUGGER.                         **«, t00=0x0112, t01=0x00a0}
0x1accc…1ad1a                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0112, t01=0x00ee}
0x1ad1a…1ad68                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0112, t01=0x013c}
0x1ad68…1ad70                Head {h00=0x0004, h01=0x0050, t00=0x0112, t01=0x018a}
0x1ad70…1ad84 (275, 0, 400)  Head {h00=0x0010, h01=0x0050, text=»W:BUGG EQU *«, t00=0x0113, t01=0x0004}
0x1ad84…1ad98                Head {h00=0x0010, h01=0x0050, text=» IFT XWDSP=0«, t00=0x0113, t01=0x0018}
0x1ad98…1adac                Head {h00=0x0010, h01=0x0050, text=»WBBUG DATA 0«, t00=0x0113, t01=0x002c}
0x1adac…1adb8                Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0113, t01=0x0040}
0x1adb8…1adc6                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0113, t01=0x004c}
0x1adc6…1adce                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x005a}
0x1adce…1add6                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x0062}
0x1add6…1adde                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x006a}
0x1adde…1ade6                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x0072}
0x1ade6…1adee                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x007a}
0x1adee…1adf6                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x0082}
0x1adf6…1adfe                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x008a}
0x1adfe…1ae06                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x0092}
0x1ae06…1ae0e                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x009a}
0x1ae0e…1ae16                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x00a2}
0x1ae16…1ae1e                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x00aa}
0x1ae1e…1ae26                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x00b2}
0x1ae26…1ae2e                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x00ba}
0x1ae2e…1ae36                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x00c2}
0x1ae36…1ae3e                Head {h00=0x0004, h01=0x0050, t00=0x0113, t01=0x00ca}
0x1ae3e…1ae8c                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0113, t01=0x00d2}
0x1ae8c…1aeda                Head {h00=0x004a, h01=0x0050, text=»**                    THIS IS THE END OF THE AREA COMPRISING        **«, t00=0x0113, t01=0x0120}
0x1aeda…1af28                Head {h00=0x004a, h01=0x0050, text=»**                    APPLICATION DEPENDANT DATA.                   **«, t00=0x0113, t01=0x016e}
0x1af28…1af76                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0114, t01=0x002c}
0x1af76…1af84                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0114, t01=0x007a}
0x1af84…1af8c                Head {h00=0x0004, h01=0x0050, t00=0x0114, t01=0x0088}
0x1af8c…1afa8                Head {h00=0x0018, h01=0x0050, text=»W:INIT   EQU      * «, t00=0x0114, t01=0x0090}
0x1afa8…1aff6                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0114, t01=0x00ac}
0x1aff6…1b044                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0114, t01=0x00fa}
0x1b044…1b092                Head {h00=0x004a, h01=0x0050, text=»**  W:INIT            WSM INITIAL MODULE                            **«, t00=0x0114, t01=0x0148}
0x1b092…1b0e0                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0115, t01=0x0008}
0x1b0e0…1b12e                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0115, t01=0x0056}
0x1b12e…1b17c                Head {h00=0x004a, h01=0x0050, text=»**  INPUT:            A2 = TASK-ID                                  **«, t00=0x0115, t01=0x00a4}
0x1b17c…1b1ca                Head {h00=0x004a, h01=0x0050, text=»**                    A14 -> APPWRK GENERATED AREA                  **«, t00=0x0115, t01=0x00f2}
0x1b1ca…1b218                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0115, t01=0x0140}
0x1b218…1b266                Head {h00=0x004a, h01=0x0050, text=»**  OUTPUT:           A13 -> WSM-TCA                                **«, t00=0x0115, t01=0x018e}
0x1b266…1b2b4                Head {h00=0x004a, h01=0x0050, text=»**                    A14 -> WSM-STACK                              **«, t00=0x0116, t01=0x004c}
0x1b2b4…1b302                Head {h00=0x004a, h01=0x0050, text=»**                    TCA & ECB:S & WWI INITIALIZED                 **«, t00=0x0116, t01=0x009a}
0x1b302…1b350                Head {h00=0x004a, h01=0x0050, text=»**                                                                  **«, t00=0x0116, t01=0x00e8}
0x1b350…1b39e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0116, t01=0x0136}
0x1b39e…1b3a6                Head {h00=0x0004, h01=0x0050, t00=0x0116, t01=0x0184}
0x1b3a6…1b3f4                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0116, t01=0x018c}
0x1b3f4…1b442                Head {h00=0x004a, h01=0x0050, text=»**                    SET A13 -> WSM-TCA                            **«, t00=0x0117, t01=0x004a}
0x1b442…1b490                Head {h00=0x004a, h01=0x0050, text=»**                    SET A14 -> WSM-STACK                          **«, t00=0x0117, t01=0x0098}
0x1b490…1b4de                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0117, t01=0x00e6}
0x1b4de…1b4e6                Head {h00=0x0004, h01=0x0050, t00=0x0117, t01=0x0134}
0x1b4e6…1b518                Head {h00=0x002e, h01=0x0050, text=» LDR A13,A14 A13 -> APPWRK = WSM-TCA START«, t00=0x0117, t01=0x013c}
0x1b518…1b54c                Head {h00=0x0030, h01=0x0050, text=» ADR* A14,A14 APPWRK LENGTH FROM FIRST WORD «, t00=0x0117, t01=0x016e}
0x1b54c…1b57a                Head {h00=0x002a, h01=0x0050, text=» SUKL A14,2 A14 -> "BOTTOM" STACK WORD«, t00=0x0118, t01=0x0012}
0x1b57a…1b588                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0118, t01=0x0040}
0x1b588…1b5d6                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0118, t01=0x004e}
0x1b5d6…1b624                Head {h00=0x004a, h01=0x0050, text=»**                    CHECK IF FILE-HANDLER TASK.                   **«, t00=0x0118, t01=0x009c}
0x1b624…1b672                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0118, t01=0x00ea}
0x1b672…1b67a                Head {h00=0x0004, h01=0x0050, t00=0x0118, t01=0x0138}
0x1b67a…1b6a2                Head {h00=0x0024, h01=0x0050, text=» CWK A2,'FW' FILE HANDLER TASK ?«, t00=0x0118, t01=0x0140}
0x1b6a2…1b6c0                Head {h00=0x001a, h01=0x0050, text=» RF(NE) INIT10 - NO ! «, t00=0x0118, t01=0x0168}
0x1b6c0…1b6ee                Head {h00=0x002a, h01=0x0050, text=» LD A1,W:FHCA FILE HANDLER IN SYSTEM ?«, t00=0x0118, t01=0x0186}
0x1b6ee…1b70a                Head {h00=0x0018, h01=0x0050, text=» RF(Z) INIT10 - NO !«, t00=0x0119, t01=0x0024}
0x1b70a…1b734                Head {h00=0x0026, h01=0x0050, text=» ABR A1 ACTIVATE FILE HANDLER TASK«, t00=0x0119, t01=0x0040}
0x1b734…1b748                Head {h00=0x0010, h01=0x0050, text=»INIT10 EQU *«, t00=0x0119, t01=0x006a}
0x1b748…1b750                Head {h00=0x0004, h01=0x0050, t00=0x0119, t01=0x007e}
0x1b750…1b758                Head {h00=0x0004, h01=0x0050, t00=0x0119, t01=0x0086}
0x1b758…1b7a6                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0119, t01=0x008e}
0x1b7a6…1b7f4                Head {h00=0x004a, h01=0x0050, text=»**                    SET BUFFER ADDR IN INTERTASK-ECB              **«, t00=0x0119, t01=0x00dc}
0x1b7f4…1b842                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0119, t01=0x012a}
0x1b842…1b84a                Head {h00=0x0004, h01=0x0050, t00=0x0119, t01=0x0178}
0x1b84a…1b86c                Head {h00=0x001e, h01=0x0050, text=» LDR A5,A13 A5 -> WSM-TCA «, t00=0x0119, t01=0x0180}
0x1b86c…1b8a2                Head {h00=0x0032, h01=0x0050, text=» ADKL A5,PB:FC A5 -> WSM PARAMETER BLOCK START«, t00=0x011a, t01=0x0012}
0x1b8a2…1b8da                Head {h00=0x0034, h01=0x0050, text=» ST A5,TC:IC+ECB:BA,A13 SET BUF. ADDR IN IC-ECB «, t00=0x011a, t01=0x0048}
0x1b8da…1b8e2                Head {h00=0x0004, h01=0x0050, t00=0x011a, t01=0x0080}
0x1b8e2…1b8ea                Head {h00=0x0004, h01=0x0050, t00=0x011a, t01=0x0088}
0x1b8ea…1b938                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x011a, t01=0x0090}
0x1b938…1b986                Head {h00=0x004a, h01=0x0050, text=»**                    STORE TASK-ID AND STACK-POINTER IN WS:TCA     **«, t00=0x011a, t01=0x00de}
0x1b986…1b9d4                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x011a, t01=0x012c}
0x1b9d4…1b9f6                Head {h00=0x001e, h01=0x0050, text=» ST A2,TC:TID,A13 TASK-ID «, t00=0x011a, t01=0x017a}
0x1b9f6…1ba1e                Head {h00=0x0024, h01=0x0050, text=» ST A14,TC:STK,A13 STACK POINTER«, t00=0x011b, t01=0x000c}
0x1ba1e…1ba2c                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011b, t01=0x0034}
0x1ba2c…1ba7a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x011b, t01=0x0042}
0x1ba7a…1bac8                Head {h00=0x004a, h01=0x0050, text=»**                    INITIALIZE ECB:S                              **«, t00=0x011b, t01=0x0090}
0x1bac8…1bb16                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x011b, t01=0x00de}
0x1bb16…1bb1e                Head {h00=0x0004, h01=0x0050, t00=0x011b, t01=0x012c}
0x1bb1e…1bb44                Head {h00=0x0022, h01=0x0050, text=» LDK A1,KB KEY BOARD FILE CODE«, t00=0x011b, t01=0x0134}
0x1bb44…1bb5c                Head {h00=0x0014, h01=0x0050, text=» ST A1,TC:KB,A13«, t00=0x011b, t01=0x015a}
0x1bb5c…1bb88                Head {h00=0x0028, h01=0x0050, text=» LD A1,W:DYFC DISPLAY UNIT FILE CODE«, t00=0x011b, t01=0x0172}
0x1bb88…1bba4                Head {h00=0x0018, h01=0x0050, text=» SC A1,TC:EKO+1,A13 «, t00=0x011c, t01=0x000e}
0x1bba4…1bbd2                Head {h00=0x002a, h01=0x0050, text=»   PRINTER FILE CODE IS SET IN APPL. !«, t00=0x011c, t01=0x002a}
0x1bbd2…1bbda                Head {h00=0x0004, h01=0x0050, t00=0x011c, t01=0x0058}
0x1bbda…1bbfc                Head {h00=0x001e, h01=0x0050, text=» LDR A1,A13 A1 -> WSM-TCA «, t00=0x011c, t01=0x0060}
0x1bbfc…1bc32                Head {h00=0x0032, h01=0x0050, text=» ADKL A1,PB:BUF+PBBUF A1 -> INPUT BUFFER START«, t00=0x011c, t01=0x0082}
0x1bc32…1bc6c                Head {h00=0x0036, h01=0x0050, text=» ST A1,TC:KB+ECB:BA,A13 SET BUFFER ADDRESS FOR KB «, t00=0x011c, t01=0x00b8}
0x1bc6c…1bc9c                Head {h00=0x002c, h01=0x0050, text=» ADKL A1,INBUF A1 -> OUTPUT BUFFER START«, t00=0x011c, t01=0x00f2}
0x1bc9c…1bcd6                Head {h00=0x0036, h01=0x0050, text=» ST A1,TC:IIE,A13 SET 1ST BYTE AFTER INPUT BUFFER «, t00=0x011c, t01=0x0122}
0x1bcd6…1bd12                Head {h00=0x0038, h01=0x0050, text=» ST A1,TC:EKO+ECB:BA,A13 SET BUFFER ADDRESS FOR EKO «, t00=0x011c, t01=0x015c}
0x1bd12…1bd4e                Head {h00=0x0038, h01=0x0050, text=» ST A1,TC:PRT+ECB:BA,A13 SET BUFFER ADDRESS FOR PRT «, t00=0x011d, t01=0x0008}
0x1bd4e…1bd72                Head {h00=0x0020, h01=0x0050, text=»   IC:ECB-BA IS SET ABOVE ! «, t00=0x011d, t01=0x0044}
0x1bd72…1bd9e                Head {h00=0x0028, h01=0x0050, text=» LDR A5,A1 A5 -> OUTPUT BUFFER START«, t00=0x011d, t01=0x0068}
0x1bd9e…1bda6                Head {h00=0x0004, h01=0x0050, t00=0x011d, t01=0x0094}
0x1bda6…1bdc8                Head {h00=0x001e, h01=0x0050, text=» LDR A1,A13 A1 -> WSM-TCA «, t00=0x011d, t01=0x009c}
0x1bdc8…1be06                Head {h00=0x003a, h01=0x0050, text=» ADK A1,TC:KB+KB:PBL A1 -> KEY BOARD INPUT PAR. BLOCK «, t00=0x011d, t01=0x00be}
0x1be06…1be44                Head {h00=0x003a, h01=0x0050, text=» ST A1,TC:KB+KB:CW2,A13 STORE IN KB-ECB CONTROL WORD 2«, t00=0x011d, t01=0x00fc}
0x1be44…1be7e                Head {h00=0x0036, h01=0x0050, text=» LDK A1,KB:END-KB:EKO A1 := SIZE OF KB PAR. BLOCK «, t00=0x011d, t01=0x013a}
0x1be7e…1beae                Head {h00=0x002c, h01=0x0050, text=» SC A1,TC:KB+KB:PBL,A13 STORE IN KB-ECB «, t00=0x011d, t01=0x0174}
0x1beae…1bebc                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011e, t01=0x0014}
0x1bebc…1bf0a                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x011e, t01=0x0022}
0x1bf0a…1bf58                Head {h00=0x004a, h01=0x0050, text=»**                    INITIALIZE WSM WORK ITEMS AREA.               **«, t00=0x011e, t01=0x0070}
0x1bf58…1bfa6                Head {h00=0x004a, h01=0x0050, text=»**                    STORE WWI-ADDRESS IN WS:TCA.                  **«, t00=0x011e, t01=0x00be}
0x1bfa6…1bff4                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x011e, t01=0x010c}
0x1bff4…1bffc                Head {h00=0x0004, h01=0x0050, t00=0x011e, t01=0x015a}
0x1bffc…1c01a                Head {h00=0x001a, h01=0x0050, text=»   A5 -> OUTPUT BUFFER«, t00=0x011e, t01=0x0162}
0x1c01a…1c054                Head {h00=0x0036, h01=0x0050, text=» ADKL A5,OUTBUF A5 -> 1ST BYTE AFTER OUTPUT BUFFER«, t00=0x011e, t01=0x0180}
0x1c054…1c07e                Head {h00=0x0026, h01=0x0050, text=» ST A5,TC:WWI,A13 STORE IN WS:TCA «, t00=0x011f, t01=0x002a}
0x1c07e…1c0b6                Head {h00=0x0034, h01=0x0050, text=» LDK A2,WWINOF A2 := NO OF FAST CHOISE SECTIONS «, t00=0x011f, t01=0x0054}
0x1c0b6…1c0da                Head {h00=0x0020, h01=0x0050, text=» SCR A2,A5 STORE IN WWI-AREA«, t00=0x011f, t01=0x008c}
0x1c0da…1c118                Head {h00=0x003a, h01=0x0050, text=» LDK A3,WWIFCL A3 := LENGTH OF ONE FAST CHOISE SECT WI«, t00=0x011f, t01=0x00b0}
0x1c118…1c142                Head {h00=0x0026, h01=0x0050, text=» SC A3,WWI:LF,A5 STORE IN WWI-AREA«, t00=0x011f, t01=0x00ee}
0x1c142…1c178                Head {h00=0x0032, h01=0x0050, text=» MUR A3 A2 := LENGTH OF FAST CHOISE SECT AREA «, t00=0x011f, t01=0x0118}
0x1c178…1c19a                Head {h00=0x001e, h01=0x0050, text=» ADR A2,A5 SET A2 -> .... «, t00=0x011f, t01=0x014e}
0x1c19a…1c1c4                Head {h00=0x0026, h01=0x0050, text=» ADK A2,WWI:LO ...-> NUM WWI-AREA «, t00=0x011f, t01=0x0170}
0x1c1c4…1c1ee                Head {h00=0x0026, h01=0x0050, text=» ST A2,WWI:AN,A5 STORE IN WWI-AREA«, t00=0x0120, t01=0x000a}
0x1c1ee…1c21e                Head {h00=0x002c, h01=0x0050, text=» ADKL A2,WWINUM A2 -> ALPHANUM WWI-AREA «, t00=0x0120, t01=0x0034}
0x1c21e…1c248                Head {h00=0x0026, h01=0x0050, text=» ST A2,WWI:AA,A5 STORE IN WWI-AREA«, t00=0x0120, t01=0x0064}
0x1c248…1c27e                Head {h00=0x0032, h01=0x0050, text=» LDK A3,WWINON A3 := NO OF NUMERIC WORK ITEMS «, t00=0x0120, t01=0x008e}
0x1c27e…1c2a8                Head {h00=0x0026, h01=0x0050, text=» SC A3,WWI:NN,A5 STORE IN WWI-AREA«, t00=0x0120, t01=0x00c4}
0x1c2a8…1c2e2                Head {h00=0x0036, h01=0x0050, text=» LDKL A2,WWINUM A2 := TOTAL SIZE OF NUM WORK ITEMS«, t00=0x0120, t01=0x00ee}
0x1c2e2…1c30c                Head {h00=0x0026, h01=0x0050, text=» RF(Z) INIT20 NO DIVISION BY ZERO!«, t00=0x0120, t01=0x0128}
0x1c30c…1c336                Head {h00=0x0026, h01=0x0050, text=» DVR A3 DIVIDE BY NO OF NUM ITEMS «, t00=0x0120, t01=0x0152}
0x1c336…1c37a                Head {h00=0x0040, h01=0x0050, text=»INIT20 SC A2,WWI:LN,A5 RESULT, LENGTH OF EACH NUM WORK ITEM,«, t00=0x0120, t01=0x017c}
0x1c37a…1c39a                Head {h00=0x001c, h01=0x0050, text=»   IS STORED IN WWI-AREA«, t00=0x0121, t01=0x0030}
0x1c39a…1c3da                Head {h00=0x003c, h01=0x0050, text=» LDK A3,WWINOA SAME PROCEDURE FOR ALPHANUM WORK ITEMS ! «, t00=0x0121, t01=0x0050}
0x1c3da…1c3f2                Head {h00=0x0014, h01=0x0050, text=» SC A3,WWI:NA,A5«, t00=0x0121, t01=0x0090}
0x1c3f2…1c40a                Head {h00=0x0014, h01=0x0050, text=» LDKL A2,WWIALP «, t00=0x0121, t01=0x00a8}
0x1c40a…1c420                Head {h00=0x0012, h01=0x0050, text=» RF(Z) INIT25 «, t00=0x0121, t01=0x00c0}
0x1c420…1c430                Head {h00=0x000c, h01=0x0050, text=» DVR A3 «, t00=0x0121, t01=0x00d6}
0x1c430…1c44e                Head {h00=0x001a, h01=0x0050, text=»INIT25 SC A2,WWI:LA,A5«, t00=0x0121, t01=0x00e6}
0x1c44e…1c45c                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0121, t01=0x0104}
0x1c45c…1c4aa                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0121, t01=0x0112}
0x1c4aa…1c4f8                Head {h00=0x004a, h01=0x0050, text=»**                    CALCULATE & STORE DFD-ADDRESS                 **«, t00=0x0121, t01=0x0160}
0x1c4f8…1c546                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0122, t01=0x001e}
0x1c546…1c54e                Head {h00=0x0004, h01=0x0050, t00=0x0122, t01=0x006c}
0x1c54e…1c574                Head {h00=0x0022, h01=0x0050, text=» ADKL A5,WWISIZ A5 -> DFD-AREA«, t00=0x0122, t01=0x0074}
0x1c574…1c58e                Head {h00=0x0016, h01=0x0050, text=» ST A5,TC:DFD,A13 «, t00=0x0122, t01=0x009a}
0x1c58e…1c5dc                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0122, t01=0x00b4}
0x1c5dc…1c62a                Head {h00=0x004a, h01=0x0050, text=»**                    CALCULATE & STORE SST-ADDRESS                 **«, t00=0x0122, t01=0x0102}
0x1c62a…1c678                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0122, t01=0x0150}
0x1c678…1c680                Head {h00=0x0004, h01=0x0050, t00=0x0123, t01=0x000e}
0x1c680…1c6b6                Head {h00=0x0032, h01=0x0050, text=» ADKL A5,SSTDFD A5 -> 1ST BYTE AFTER SST-AREA «, t00=0x0123, t01=0x0016}
0x1c6b6…1c6d0                Head {h00=0x0016, h01=0x0050, text=» ST A5,TC:SST,A13 «, t00=0x0123, t01=0x004c}
0x1c6d0…1c6d8                Head {h00=0x0004, h01=0x0050, t00=0x0123, t01=0x0066}
0x1c6d8…1c6e0                Head {h00=0x0004, h01=0x0050, t00=0x0123, t01=0x006e}
0x1c6e0…1c72e                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0123, t01=0x0076}
0x1c72e…1c77c                Head {h00=0x004a, h01=0x0050, text=»**                    SET STANDARD KEY TABLE AND BITMAP             **«, t00=0x0123, t01=0x00c4}
0x1c77c…1c7ca                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0123, t01=0x0112}
0x1c7ca…1c7d2                Head {h00=0x0004, h01=0x0050, t00=0x0123, t01=0x0160}
0x1c7d2…1c7ea                Head {h00=0x0014, h01=0x0050, text=» LDKL A5,W:KTB1 «, t00=0x0123, t01=0x0168}
0x1c7ea…1c804                Head {h00=0x0016, h01=0x0050, text=» ST A5,TC:KY1,A13 «, t00=0x0123, t01=0x0180}
0x1c804…1c81c                Head {h00=0x0014, h01=0x0050, text=» LDKL A5,W:KT1V «, t00=0x0124, t01=0x000a}
0x1c81c…1c836                Head {h00=0x0016, h01=0x0050, text=» ST A5,TC:KTV,A13 «, t00=0x0124, t01=0x0022}
0x1c836…1c83e                Head {h00=0x0004, h01=0x0050, t00=0x0124, t01=0x003c}
0x1c83e…1c84c                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0124, t01=0x0044}
0x1c84c…1c854                Head {h00=0x0004, h01=0x0050, t00=0x0124, t01=0x0052}
0x1c854…1c8a2                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0124, t01=0x005a}
0x1c8a2…1c8f0                Head {h00=0x004a, h01=0x0050, text=»**                    GET SCREEN SIZE AND TYPE OF VDU               **«, t00=0x0124, t01=0x00a8}
0x1c8f0…1c93e                Head {h00=0x004a, h01=0x0050, text=»**                    AND INFORMATION ABOUT TWO MESSAGE LINES       **«, t00=0x0124, t01=0x00f6}
0x1c93e…1c98c                Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0124, t01=0x0144}
0x1c98c…1c994 (293, 0, 400)  Head {h00=0x0004, h01=0x0050, t00=0x0125, t01=0x0004}
0x1c994…1c9a8                Head {h00=0x0010, h01=0x0050, text=»INIT35 EQU *«, t00=0x0125, t01=0x000c}
0x1c9a8…1c9ce                Head {h00=0x0022, h01=0x0050, text=» LDR A8,A13 A8 -> DISPLAY ECB «, t00=0x0125, t01=0x0020}
0x1c9ce…1c9e6                Head {h00=0x0014, h01=0x0050, text=» ADKL A8,TC:EKO «, t00=0x0125, t01=0x0046}
0x1c9e6…1ca0e                Head {h00=0x0024, h01=0x0050, text=» LDK A1,2 - SET REQUESTED LENGTH«, t00=0x0125, t01=0x005e}
0x1ca0e…1ca26                Head {h00=0x0014, h01=0x0050, text=» ST A1,ECB:RL,A8«, t00=0x0125, t01=0x0086}
0x1ca26…1ca50                Head {h00=0x0026, h01=0x0050, text=» CM ECB:CW,A8 LOGICAL SIZE WANTED «, t00=0x0125, t01=0x009e}
0x1ca50…1ca80                Head {h00=0x002c, h01=0x0050, text=» LDK A7,/AC A7 := READ SCREEN SIZE ORDER«, t00=0x0125, t01=0x00c8}
0x1ca80…1ca8c                Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0125, t01=0x00f8}
0x1ca8c…1ca9c                Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0125, t01=0x0104}
0x1ca9c…1cad0                Head {h00=0x0030, h01=0x0050, text=» LD* A2,ECB:BA,A8 A2 := LOGICAL SCREEN SIZE «, t00=0x0125, t01=0x0114}
0x1cad0…1cb02                Head {h00=0x002e, h01=0x0050, text=» LD A3,W:DYFC MAKE BASIC READ TO FIND OUT «, t00=0x0125, t01=0x0148}
0x1cb02…1cb38                Head {h00=0x0032, h01=0x0050, text=» ECR A3,A3 SCREEN TYPE.THE REQUEST IS MADE ON «, t00=0x0125, t01=0x017a}
0x1cb38…1cb58                Head {h00=0x001c, h01=0x0050, text=» SC A3,1,A8 SYSTEM LINE «, t00=0x0126, t01=0x0020}
0x1cb58…1cb8a                Head {h00=0x002e, h01=0x0050, text=»   MAKE BASIC READ TO FIND OUT IF VD82/83 «, t00=0x0126, t01=0x0040}
0x1cb8a…1cbb6                Head {h00=0x0028, h01=0x0050, text=» LDK A7,/81 - A7 := BASIC READ ORDER«, t00=0x0126, t01=0x0072}
0x1cbb6…1cbc2                Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0126, t01=0x009e}
0x1cbc2…1cbd2                Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0126, t01=0x00aa}
0x1cbd2…1cbe6                Head {h00=0x0010, h01=0x0050, text=» ECR A3,A3  «, t00=0x0126, t01=0x00ba}
0x1cbe6…1cc14                Head {h00=0x002a, h01=0x0050, text=» SC A3,1,A8 RETURN FC FOR SUBSCREEN 1 «, t00=0x0126, t01=0x00ce}
0x1cc14…1cc28                Head {h00=0x0010, h01=0x0050, text=» LDK A3,VD82«, t00=0x0126, t01=0x00fc}
0x1cc28…1cc60                Head {h00=0x0034, h01=0x0050, text=» LD A5,W:MESS INFO ABOUT TWO MSGLINES IF VD82,83«, t00=0x0126, t01=0x0110}
0x1cc60…1cc6e                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0126, t01=0x0148}
0x1cc6e…1cc76                Head {h00=0x0004, h01=0x0050, t00=0x0126, t01=0x0156}
0x1cc76…1ccca                Head {h00=0x0050, h01=0x0050, text=»*************************************************************************** «, t00=0x0126, t01=0x015e}
0x1ccca…1cd1e                Head {h00=0x0050, h01=0x0050, text=»**                                                                       ** «, t00=0x0127, t01=0x0022}
0x1cd1e…1cd72                Head {h00=0x0050, h01=0x0050, text=»**  IF RC IS NOT NEGATIVE (=/8000) AND NOT = ZERO, THE WORK STATION IS   ** «, t00=0x0127, t01=0x0076}
0x1cd72…1cdc6                Head {h00=0x0050, h01=0x0050, text=»**  NOT OPERABLE. THIS DEPENDS ON:                                       ** «, t00=0x0127, t01=0x00ca}
0x1cdc6…1ce1a                Head {h00=0x0050, h01=0x0050, text=»**    1. THE WORK STATION IS NOT PRESENT/ON.                             ** «, t00=0x0127, t01=0x011e}
0x1ce1a…1ce6e                Head {h00=0x0050, h01=0x0050, text=»**    2. THE FIRM-WARE OF THE CONTROL UNIT IS A LITTLE BIT SLOW...       ** «, t00=0x0127, t01=0x0172}
0x1ce6e…1cec2                Head {h00=0x0050, h01=0x0050, text=»**  THEREFORE A NEW ATTEMPT TO READ THE WORK STATION IS PERFORMED, AFTER ** «, t00=0x0128, t01=0x0036}
0x1cec2…1cf16                Head {h00=0x0050, h01=0x0050, text=»**  A TASK DELAY. THIS FIRM-WARE ERROR WAS DETECTED 1983-09-09 AT LMO    ** «, t00=0x0128, t01=0x008a}
0x1cf16…1cf6a                Head {h00=0x0050, h01=0x0050, text=»**  SWEDEN (BANKDATA / VD82). WHEN REPAIRED, THIS DELAY/RETRY CAN BE     ** «, t00=0x0128, t01=0x00de}
0x1cf6a…1cfbe                Head {h00=0x0050, h01=0x0050, text=»**  REMOVED.                                                             ** «, t00=0x0128, t01=0x0132}
0x1cfbe…1d012                Head {h00=0x0050, h01=0x0050, text=»**                                                                       ** «, t00=0x0128, t01=0x0186}
0x1d012…1d066                Head {h00=0x0050, h01=0x0050, text=»*************************************************************************** «, t00=0x0129, t01=0x004a}
0x1d066…1d06e                Head {h00=0x0004, h01=0x0050, t00=0x0129, t01=0x009e}
0x1d06e…1d0a0                Head {h00=0x002e, h01=0x0050, text=» LD A1,ECB:RC,A8 BASIC READ OK -> VD82,83 «, t00=0x0129, t01=0x00a6}
0x1d0a0…1d0be                Head {h00=0x001a, h01=0x0050, text=» RF(Z) INIT50 VD82,83 «, t00=0x0129, t01=0x00d8}
0x1d0be…1d0fe                Head {h00=0x003c, h01=0x0050, text=» RF(N) INIT40 REQUEST ERROR => VD46/47/81 OR SIMILAR... «, t00=0x0129, t01=0x00f6}
0x1d0fe…1d128                Head {h00=0x0026, h01=0x0050, text=» LDKL A8,50 RC > 0 => NOT OPERABLE«, t00=0x0129, t01=0x0136}
0x1d128…1d154                Head {h00=0x0028, h01=0x0050, text=» LKM  DELAY 50 * 100 MS = 5 SECONDS «, t00=0x0129, t01=0x0160}
0x1d154…1d164                Head {h00=0x000c, h01=0x0050, text=» DATA 6 «, t00=0x0129, t01=0x018c}
0x1d164…1d17e                Head {h00=0x0016, h01=0x0050, text=» RB INIT35 AGAIN! «, t00=0x012a, t01=0x000c}
0x1d17e…1d186                Head {h00=0x0004, h01=0x0050, t00=0x012a, t01=0x0026}
0x1d186…1d19a                Head {h00=0x0010, h01=0x0050, text=»INIT40 EQU *«, t00=0x012a, t01=0x002e}
0x1d19a…1d1d6                Head {h00=0x0038, h01=0x0050, text=» LD A5,W:MESG INFO ABOUT TWO MSGLINES IF NOT VD82,83«, t00=0x012a, t01=0x0042}
0x1d1d6…1d1f8                Head {h00=0x001e, h01=0x0050, text=» CWK A2,/0200 TYPE OF VDU:«, t00=0x012a, t01=0x007e}
0x1d1f8…1d22a                Head {h00=0x002e, h01=0x0050, text=» RF(NL) INIT60 ORDINARY VDU (NOT ONELINE) «, t00=0x012a, t01=0x00a0}
0x1d22a…1d252                Head {h00=0x0024, h01=0x0050, text=» LDK A3,MSGLIN ONE LINE DISPLAY «, t00=0x012a, t01=0x00d2}
0x1d252…1d27c                Head {h00=0x0026, h01=0x0050, text=» LDK A5,0 TWO MSG LINES IMPOSSIBLE«, t00=0x012a, t01=0x00fa}
0x1d27c…1d2aa                Head {h00=0x002a, h01=0x0050, text=» LDK A6,/10 SCREEN BACKGROUND IS BLACK«, t00=0x012a, t01=0x0124}
0x1d2aa…1d2be                Head {h00=0x0010, h01=0x0050, text=» RF INIT55  «, t00=0x012a, t01=0x0152}
0x1d2be…1d2cc                Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012a, t01=0x0166}
0x1d2cc…1d2e8                Head {h00=0x0018, h01=0x0050, text=»INIT50 EQU * VD82,83«, t00=0x012a, t01=0x0174}
0x1d2e8…1d314                Head {h00=0x0028, h01=0x0050, text=» LDK A6,0 SCREEN BACKGROUND IS WHITE«, t00=0x012a, t01=0x0190}
0x1d314…1d346                Head {h00=0x002e, h01=0x0050, text=» CC A5,W:DYFC IF FILECODES FOR HELP AND.. «, t00=0x012b, t01=0x002c}
0x1d346…1d384                Head {h00=0x003a, h01=0x0050, text=» RF(NE) INIT55 ..ERRORLINES ARE EQUAL THEN INDICATE.. «, t00=0x012b, t01=0x005e}
0x1d384…1d3ac                Head {h00=0x0024, h01=0x0050, text=» LDK A5,0 ..ONE MSG LINE IN A5. «, t00=0x012b, t01=0x009c}
0x1d3ac…1d3c0                Head {h00=0x0010, h01=0x0050, text=»INIT55 EQU *«, t00=0x012b, t01=0x00c4}
0x1d3c0…1d3ea                Head {h00=0x0026, h01=0x0050, text=» ORS A3,TC:MSC,A13 SET TYPE OF VDU«, t00=0x012b, t01=0x00d8}
0x1d3ea…1d3fc                Head {h00=0x000e, h01=0x0050, text=» RF INIT99«, t00=0x012b, t01=0x0102}
0x1d3fc…1d420                Head {h00=0x0020, h01=0x0050, text=»INIT60 EQU * ORDINARY VDU:S «, t00=0x012b, t01=0x0114}
0x1d420…1d44e                Head {h00=0x002a, h01=0x0050, text=» LDK A6,/10 SCREEN BACKGROUND IS BLACK«, t00=0x012b, t01=0x0138}
0x1d44e…1d476                Head {h00=0x0024, h01=0x0050, text=» SUKL A2,/0100 EXCLUDE MSG LINE «, t00=0x012b, t01=0x0166}
0x1d476…1d496                Head {h00=0x001c, h01=0x0050, text=» ANR A5,A5 TWO MSGLINES?«, t00=0x012b, t01=0x018e}
0x1d496…1d4b2                Head {h00=0x0018, h01=0x0050, text=» RF(NN) INIT99 NO.. «, t00=0x012c, t01=0x001e}
0x1d4b2…1d4e2                Head {h00=0x002c, h01=0x0050, text=» SUKL A2,/0100 EXCLUDE ONE MORE MSG LINE«, t00=0x012c, t01=0x003a}
0x1d4e2…1d4ea                Head {h00=0x0004, h01=0x0050, t00=0x012c, t01=0x006a}
0x1d4ea…1d51a                Head {h00=0x002c, h01=0x0050, text=»INIT99 EQU * SET CURRENT SUBSCREEN PAR.S«, t00=0x012c, t01=0x0072}
0x1d51a…1d52c                Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x012c, t01=0x00a2}
0x1d52c…1d556                Head {h00=0x0026, h01=0x0050, text=» ST A1,TC:SUS,A13 - SUBSCREEN NO. «, t00=0x012c, t01=0x00b4}
0x1d556…1d580                Head {h00=0x0026, h01=0x0050, text=» SC A1,TC:LIN,A13 - 1:ST FREE LINE«, t00=0x012c, t01=0x00de}
0x1d580…1d5aa                Head {h00=0x0026, h01=0x0050, text=» ST A2,TC:SIZ,A13 - SUBSCREEN SIZE«, t00=0x012c, t01=0x0108}
0x1d5aa…1d5dc                Head {h00=0x002e, h01=0x0050, text=» ST A2,TC:SZE,A13 SAVE SIZE OF SUBSCREEN 1«, t00=0x012c, t01=0x0132}
0x1d5dc…1d614                Head {h00=0x0034, h01=0x0050, text=» ST A5,TC:MSG,A13 SAVE INFO ABOUT TWO MSG LINES «, t00=0x012c, t01=0x0164}
0x1d614…1d648                Head {h00=0x0030, h01=0x0050, text=» ADR A1,A6 ADD INFO ABOUT SCREEN BACKGROUND «, t00=0x012d, t01=0x000c}
0x1d648…1d67a                Head {h00=0x002e, h01=0x0050, text=» ORS A1,TC:MSC,A13 SET AUTO SWITCH ACTIVE «, t00=0x012d, t01=0x0040}
0x1d67a…1d6aa                Head {h00=0x002c, h01=0x0050, text=» ABL W:STRT BRANCH TO WSM START ROUTINE «, t00=0x012d, t01=0x0072}
0x1d6aa…1d6b2                Head {h00=0x0004, h01=0x0050, t00=0x012d, t01=0x00a2}
0x1d6b2…1d6c6                Head {h00=0x0010, h01=0x0050, text=» END W:INIT «, t00=0x012d, t01=0x00aa}
0x1d6c6…1d6ca                Head {h00=0x4004, h01=0x0000}
0x1d6ca…1d6ce                01 2d 00 be                                                                                                                                                                                                                                       ┆ -  ┆
0x1d6ce…1d6d6 (302, 1, 8)    20 04 00 00 01 2e 00 04                                                                                                                                                                                                                           ┆     .  ┆
0x1d6d6…1d726 (303, 3, 2646) 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000000000000000000000000000┆
                             […0x4…]
0x1d866…1d8b6                30 30 30 30 30 30 00 13 6a 60 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆000000  j`0000000000000000000000000000000000000000000000000000000000000000000000┆
0x1d8b6…1d906                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000000000000000000000000000┆
                             […0x3…]
0x1d9f6…1da46                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 00 13 6a 43 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆0000000000000000  jC000000000000000000000000000000000000000000000000000000000000┆
0x1da46…1da96                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000000000000000000000000000┆
                             […0x3…]
0x1db86…1dbd6                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 00 13 6a 4d 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000  jM00000000000000000000000000000000000000000000000000┆
0x1dbd6…1dc26                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000000000000000000000000000┆
                             […0x3…]
0x1dd16…1dd66                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 00 13 6a 57 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆000000000000000000000000000000000000  jW0000000000000000000000000000000000000000┆
0x1dd66…1ddb6                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000000000000000000000000000┆
                             […0x3…]
0x1dea6…1def6                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 00 13 6a 61 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆0000000000000000000000000000000000000000000000  ja000000000000000000000000000000┆
0x1def6…1df46                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000000000000000000000000000┆
                             […0x3…]
0x1e036…1e086                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 00 13 6a 44 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000  jD00000000000000000000┆
0x1e086…1e0d6                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000000000000000000000000000┆
                             […0x1…]
0x1e126…1e12c                30 30 30 30 30 30                                                                                                                                                                                                                                 ┆000000┆
0x1e12c…1e140 (304, 3, 2656) 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30                                                                                                                                                                                       ┆00000000000000000000┆
0x1e140…1e190                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000000000000000000000000000┆
                             […0x3…]
0x1e280…1e2d0                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 00 13 6a 43 30 30 30 30 30 30 30 30 30 30   ┆000000000000000000000000000000000000000000000000000000000000000000  jC0000000000┆
0x1e2d0…1e320                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000000000000000000000000000┆
                             […0x3…]
0x1e410…1e460                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 00 13 6a 4d   ┆0000000000000000000000000000000000000000000000000000000000000000000000000000  jM┆
0x1e460…1e4b0                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000000000000000000000000000┆
                             […0x4…]
0x1e5f0…1e640                30 30 30 30 30 30 00 13 6a 57 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆000000  jW0000000000000000000000000000000000000000000000000000000000000000000000┆
0x1e640…1e690                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000000000000000000000000000┆
0x1e690…1e6ca                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30                                                                     ┆0000000000000000000000000000000000000000000000000000000000┆
0x1e6ca…204d4                […elided…]
0x204d4…204e0                30 30 30 30 30 30 30 30 30 30 30 30                                                                                                                                                                                                               ┆000000000000┆
0x204e0…20530                30 30 30 30 30 30 00 14 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆000000                                                                          ┆
0x20530…20580                00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                                                                ┆
                             […0x3…]
0x20670…206c0                00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 14 01 90 02 80 02 88 02 90 02 98 02 a0 02 a8 02 b0 02 b8 02 c0 02 c8 02 d0 02 d8 02 e0 02 e8 02 f0 02 f8 03 00 03 08 03 10 03 18 03 20 03 28 03 30 03 38 03 40 03 48 03 50 03 58 03 60 03 68   ┆                                                               ( 0 8 @ H P X ` h┆
0x206c0…20710                03 70 03 78 03 80 03 88 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆ p x                                                                            ┆
0x20710…20760                00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                                                                ┆
                             […0x2…]
0x20800…20850                00 00 00 00 00 00 00 00 00 00 03 90 03 98 03 a0 03 a8 03 b0 00 00 00 00 00 00 00 14 01 90 00 30 00 48 20 49 44 45 4e 54 20 50 57 52 49 54 45 20 57 2c 52 45 4c 3d 32 2e 33 2c 38 35 30 39 30 31 2c 38 37 30 31 35 35 39 34 30 32 33 30 20 00 00   ┆                               0 H IDENT PWRITE W,REL=2.3,850901,870155940230   ┆
0x20850…208a0                00 04 00 48 00 44 01 21 a4 50 4f 50 45 4e c4 50 57 52 49 54 45 00 a4 50 52 45 41 44 c4 50 44 4c 45 54 45 00 c4 50 53 45 41 52 43 00 c4 50 43 4c 4f 53 45 00 a4 57 55 46 49 4c c4 53 3a 50 4f 4c 41 00 c4 53 3a 50 4f 4f 4c 00 00 00 00 38 00 1e   ┆   H D ! POPEN PWRITE  PREAD PDLETE  PSEARC  PCLOSE  WUFIL S:POLA  S:POOL    8  ┆
0x208a0…208f0                00 1a 01 0c c4 53 3a 50 4f 4c 46 00 c4 53 3a 46 49 4c 54 00 c4 53 3a 46 4f 52 44 00 00 00 00 84 00 10 00 0c 05 05 dc 53 3a 50 4f 4f 4c 00 02 52 00 00 00 a6 00 10 00 0c 05 05 dc 53 3a 50 4f 4c 41 00 02 54 00 00 00 ba 00 10 00 0c 05 05 dc 53   ┆     S:POLF  S:FILT  S:FORD            S:POOL  R           S:POLA  T           S┆
0x208f0…20940                3a 46 49 4c 54 00 02 56 00 00 00 ce 00 2c 00 28 03 13 00 03 02 39 00 00 00 00 00 16 42 31 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 f0 00 00 00 e2 00 10 00 0c 05 05 dc 53 3a 50 4f 4c 46 00 02 58 00 00 01 12   ┆:FILT  V     , (     9      B1                                     S:POLF  X    ┆
0x20940…20990                00 10 00 0c 05 05 dc 53 3a 46 4f 52 44 00 02 5a 00 00 01 26 00 10 00 0c 05 05 dc 50 57 52 49 54 45 00 02 5c 00 00 01 3a 00 0e 00 0a 02 04 c2 49 3a 45 56 41 30 00 00 00 01 4e 00 0e 00 0a 02 04 c2 57 44 3a 43 4f 50 00 00 00 01 60 00 2c 00 28   ┆       S:FORD  Z   &       PWRITE      :       I:EVA0    N       WD:COP    ` , (┆
0x20990…209e0                03 13 c0 20 02 59 08 00 02 38 01 38 07 05 f6 a1 00 00 00 02 80 86 e1 46 00 05 81 c0 02 54 00 2e 00 2a 30 30 00 14 01 90 86 02 16 05 82 a0 00 08 f6 a1 00 00 01 72 00 2a 00 26 03 12 10 00 02 77 80 00 00 00 00 04 82 c0 02 54 01 01 e1 4b 00 08   ┆     Y   8 8           F     T . *00                 r * &     w         T   K  ┆
0x209e0…20a30                e1 4b 00 09 e1 4b 00 0a 01 00 e1 4b 00 0b f6 a1 00 01 00 12 00 2c 00 28 03 13 10 00 02 93 80 00 00 00 00 02 81 c1 02 52 06 00 e6 46 00 12 01 02 e9 18 51 00 81 27 91 a0 01 00 11 01 5f 0e a0 27 00 01 00 40 00 10 00 0c 05 05 dc 50 53 45 41 52   ┆ K   K     K         , (               R   F      Q  '      _  '   @       PSEAR┆
0x20a30…20a73                43 00 02 b6 00 01 00 70 00 0e 00 0a 05 04 bc 50 4f 50 45 4e 02 ba 00 01 00 84 00 10 00 0c 05 05 dc 50 44 4c 45 54 45 00 02 be 00 01 00 96 00 0e 00 0a 05 04 bc 50 52 45 41 44 02 c2 00 01 00 aa 00 2c 00                                          ┆C      p       POPEN             PDLETE              PREAD       , ┆
0x20a73…20ac3 (308, 3, 2657) 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000000000000000000000000000┆
                             […0x4…]
0x20c03…20c53                30 30 30 30 30 30 00 13 6a 44 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆000000  jD0000000000000000000000000000000000000000000000000000000000000000000000┆
0x20c53…20ca3                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   ┆00000000000000000000000000000000000000000000000000000000000000000000000000000000┆
                             […0x3…]
0x20d93…20de3                30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 00 14 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆0000000000000000                                                                ┆
0x20de3…20e33                00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                                                                ┆
                             […0x3…]
0x20f23…20f73                00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 14 01 90 02 80 02 88 02 90 02 98 02 a0 02 a8 02 b0 02 b8 02 c0 02 c8 02 d0 02 d8 02 e0 02 e8 02 f0 02 f8 03 00 03 08 03 10 03 18 03 20 03 28 03 30 03 38 03 40   ┆                                                                         ( 0 8 @┆
0x20f73…20fc3                03 48 03 50 03 58 03 60 03 68 03 70 03 78 03 80 03 88 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆ H P X ` h p x                                                                  ┆
0x20fc3…21013                00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                                                                ┆
                             […0x2…]
0x210b3…21103                00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 03 90 03 98 03 a0 03 a8 03 b0 00 00 00 00 00 00 00 14 01 90 00 30 00 48 20 49 44 45 4e 54 20 50 57 52 49 54 45 20 57 2c 52 45 4c 3d 32 2e 33 2c 38 35 30 39 30 31 2c 38 37 30 31 35   ┆                                         0 H IDENT PWRITE W,REL=2.3,850901,87015┆
0x21103…21153                35 39 34 30 32 33 30 20 00 00 00 04 00 48 00 44 01 21 a4 50 4f 50 45 4e c4 50 57 52 49 54 45 00 a4 50 52 45 41 44 c4 50 44 4c 45 54 45 00 c4 50 53 45 41 52 43 00 c4 50 43 4c 4f 53 45 00 a4 57 55 46 49 4c c4 53 3a 50 4f 4c 41 00 c4 53 3a 50   ┆5940230      H D ! POPEN PWRITE  PREAD PDLETE  PSEARC  PCLOSE  WUFIL S:POLA  S:P┆
0x21153…211a3                4f 4f 4c 00 00 00 00 38 00 1e 00 1a 01 0c c4 53 3a 50 4f 4c 46 00 c4 53 3a 46 49 4c 54 00 c4 53 3a 46 4f 52 44 00 00 00 00 84 00 10 00 0c 05 05 dc 53 3a 50 4f 4f 4c 00 02 52 00 00 00 a6 00 10 00 0c 05 05 dc 53 3a 50 4f 4c 41 00 02 54 00 00   ┆OOL    8       S:POLF  S:FILT  S:FORD            S:POOL  R           S:POLA  T  ┆
0x211a3…211f3                00 ba 00 10 00 0c 05 05 dc 53 3a 46 49 4c 54 00 02 56 00 00 00 ce 00 2c 00 28 03 13 00 03 02 39 00 00 00 00 00 16 42 31 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 f0 00 00 00 e2 00 10 00 0c 05 05 dc 53 3a 50   ┆         S:FILT  V     , (     9      B1                                     S:P┆
0x211f3…21243                4f 4c 46 00 02 58 00 00 01 12 00 10 00 0c 05 05 dc 53 3a 46 4f 52 44 00 02 5a 00 00 01 26 00 10 00 0c 05 05 dc 50 57 52 49 54 45 00 02 5c 00 00 01 3a 00 0e 00 0a 02 04 c2 49 3a 45 56 41 30 00 00 00 01 4e 00 0e 00 0a 02 04 c2 57 44 3a 43 4f   ┆OLF  X           S:FORD  Z   &       PWRITE      :       I:EVA0    N       WD:CO┆
0x21243…21293                50 00 00 00 01 60 00 2c 00 28 03 13 c0 20 02 59 08 00 02 38 01 38 07 05 f6 a1 00 00 00 02 80 86 e1 46 00 05 81 c0 02 54 00 2e 00 2a 30 30 00 14 01 90 86 02 16 05 82 a0 00 08 f6 a1 00 00 01 72 00 2a 00 26 03 12 10 00 02 77 80 00 00 00 00 04   ┆P    ` , (     Y   8 8           F     T . *00                 r * &     w      ┆
0x21293…212e3                82 c0 02 54 01 01 e1 4b 00 08 e1 4b 00 09 e1 4b 00 0a 01 00 e1 4b 00 0b f6 a1 00 01 00 12 00 2c 00 28 03 13 10 00 02 93 80 00 00 00 00 02 81 c1 02 52 06 00 e6 46 00 12 01 02 e9 18 51 00 81 27 91 a0 01 00 11 01 5f 0e a0 27 00 01 00 40 00 10   ┆   T   K   K   K     K         , (               R   F      Q  '      _  '   @  ┆
0x212e3…21333                00 0c 05 05 dc 50 53 45 41 52 43 00 02 b6 00 01 00 70 00 0e 00 0a 05 04 bc 50 4f 50 45 4e 02 ba 00 01 00 84 00 10 00 0c 05 05 dc 50 44 4c 45 54 45 00 02 be 00 01 00 96 00 0e 00 0a 05 04 bc 50 52 45 41 44 02 c2 00 01 00 aa 00 2c 00 28 03 13   ┆     PSEARC      p       POPEN             PDLETE              PREAD       , (  ┆
0x21333…21383                40 01 02 b1 00 10 81 40 02 54 57 00 07 04 57 00 07 80 57 00 07 40 57 00 07 01 f6 a1 00 00 00 02 80 86 81 40 02 54 00 01 00 bc 00 2c 00 28 03 13 01 00 02 cf 00 00 02 0b 03 00 e3 25 11 01 1a 01 5e 0a 81 40 02 58 82 42 00 0e 82 45 00 00 82 20   ┆@      @ TW   W   W  @W            @ T     , (             %    ^  @ X B   E    ┆
0x21383…213d3                ff ff 83 04 93 44 00 01 00 ec 00 2c 00 28 03 13 00 20 02 ef 01 00 00 02 11 06 82 25 11 02 e9 0c 5c 08 f6 a1 00 00 00 02 81 c1 02 52 ef 20 00 40 54 00 a0 43 00 02 00 01 01 1c 00 10 00 0c 05 05 dc 50 43 4c 4f 53 45 00 03 10 00 01 01 4c 00 0e   ┆     D     , (             %               R   @T  C             PCLOSE      L  ┆
0x213d3…21423                00 0a 02 04 c2 57 3a 50 4f 4f 4c 00 00 01 01 60 00 2c 00 28 03 13 00 10 03 0d 08 84 01 00 57 00 07 08 f6 a1 00 00 00 02 80 86 f6 a1 00 00 00 02 81 c1 00 2e 00 2a 30 30 00 14 41 34 02 52 f6 a1 00 00 00 06 81 c0 00 01 01 72 00 0e 00 0a 02 04   ┆     W:POOL    ` , (          W                    . *00  A4 R           r      ┆
0x21423…21473                c2 57 44 3a 43 4c 45 00 00 02 00 12 00 0c 00 08 02 03 a2 51 55 45 53 54 00 02 00 24 00 0c 00 08 02 03 a2 51 55 45 4e 44 00 02 00 34 00 2c 00 28 03 13 80 00 03 27 08 92 02 56 82 a0 00 48 f6 a1 00 00 00 08 57 00 81 41 00 00 00 0a 81 41 00 00   ┆ WD:CLE            QUEST   $       QUEND   4 , (     '   V   H      W  A     A  ┆
0x21473…214c3                00 0c f6 a1 00 00 00 06 00 02 00 44 00 0c 00 08 02 03 a2 49 3a 52 54 31 00 02 00 74 00 0e 00 0a 05 04 bc 57 55 46 49 4c 03 54 00 02 00 84 00 0e 00 0a 02 04 c2 57 44 3a 46 49 4c 00 00 02 00 96 00 2a 00 26 03 12 00 04 03 3f 02 00 52 00 51 00   ┆           D       I:RT1   t       WUFIL T           WD:FIL      * &     ?  R Q ┆
0x214c3…214d4                01 00 e1 5b 00 02 8f 20 00 00 00 0e 01 02 5f 0c 01                                                                                                                                                                                                ┆   [          _  ┆

Reduced view