|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 68518 (0x10ba6)
Notes: pts_type(SC)
Names: »DRDC15.SC«
└─⟦dab19bdd7⟧ Bits:30009677 Philips computer tape "600218"
└─⟦this⟧ »M:261/DRDC15.SC«
IDENT DRDC15 9.2DK 6 82-10-04 870105040924 DK7,READ-MODIFIED, MODIFIED 82-10-02 DK6, READ MODIFIED DK5, LP, DWTINF, ST.PR.BIT, 81-11-05 DK3, RBUFNR=1 ALLOWED DK2, TBUFL 80-03-11 DK, COND.ASM., TIMPRO, TIMNAK, READ BUF. 80-03-11 REL 9.1 79-08-16 =8, ASCII-MODE FOR SALCUZ REL 9.1 79-07-19 =7, ACK IN CONVERSATIONAL MODE REL 9.1 79-07-19 =6, DCTASK BUFFER ADDRESS DESTROYED REL 9.1 79-05-23 =5, INCOMPLETE POLL SEQUENCE REL 9.1 79-05-23 =3, TRANSFER PARAMETER PRR 9.1 79-04-06 =4, ANY MESSAGE ORDER PRR 9.1 79-04-06 =2, ABORT HANDLING PRR 9.1 78-11-29 =1, MSR-INSTRUCTION PRR 9.1 78-11-14 REL 8.2 78-11-14 * * ********************************************* * * PHILIPS TERMINAL SYSTEM PTS * * DRDC15: DRIVER DATA COMMUNICATION * BSC MULTIPOINT LINE PROCEDURE * OR SIEMENS MSV1 * * * * * **************************************************** * * * ENTRY POINTS * ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS ENTRY IH1501 INPUT INTERRUPT ENTRY IH1502 OUTPUT INTERRUPT ENTRY DC15ON POWER ON ROUTINE ENTRY DW1500 DWT FOR DC TASK * * * EXTERNAL REFERENCES * * EXTRN TDISP DISPATCHER ENTRY EXTRN SAVE8 SAVE A1-A8 ON A15 STACK EXTRN TENDIO COMPLETE I/O EVENT EXTRN DISIOE REQUEST ERROR EXTRN SETIME SET TIMER EXTRN DWTST DWT STATUS EXTRN DWTOR DWT ORDER EXTRN DWTECB DWT ECB EXTRN INTSAV SAVE AREA LAST INTERRUPT EXTRN TEBCDIC ASCII TO EBCDIC TABLE EXTRN TASCII EBCDIC TO ASCII TABLE EXTRN ECBBA ECB BUFFER ADDRESS EXTRN ECBRL ECB REQUESTED LENGTH EXTRN ECBEL ECB EFFECTIVE LENGTH EXTRN ECBRC ECB RETURN CODE EXTRN ECBCW ECB CONTROL WORD EXTRN DC:MIN MOVE DATA TO USER BUFFER EXTRN DC:MOT MOVE DATA FROM USER BUFFER EXTRN DISEND COMPLETE REQUEST AND DISPATCH * * * * * STANDARD INTERFACE PART FOR DATA COMMUNICATION * * * * * DWT CONTENTS * * DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15) * ******************************************************* * * PARAMETERS FOR CONDITIONAL ASSEMBLY * XRVI EQU /5C STANDARD:/40, DK:/5C DK X:D EQU 0 BASE FOR RBUFL AND TBUFL DK X:X EQU 500 VALUE FOR BASE DK X:A EQU 2000 RECEIVE BUFFER LENGTH RBUFL EQU 650+X:X DK X:B EQU /60 DCTASK FILE CODE DC15FC EQU /60 X:C EQU 1 IF 1 INTERRUPT LOGGING LOGG EQU 0 * TIMPOL EQU 600 POLL TIMEOUT VALUE DK X:E EQU 1 STATUS AND RVI HANDLING IF=1 STAT EQU X:E X:F EQU 1 READ COMMAND HANDLING IF=1 RCOM EQU X:F X:G EQU 252 TRANSMIT BLOCK LENGTH TBLEN EQU X:G X:H EQU 1 CODE , 0=ASCII , 1=EBCDIC CODE EQU X:H X:I EQU 0 IF 1 SPECIFIC POLL HANDLING SPECP EQU X:I X:J EQU 1 IF = 1 LINE SPEED SET TO HIGH IF = 0 LINE SPEED IS SET TO LOW SPEED EQU X:J X:K EQU 0 IF 1 SIEMENS MSV1 PROCEDURE MSV1 EQU X:K X:L EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) RBUFNR EQU 2 X:M EQU 0 IF = 1 PTS 6805 ADAPTION P6805 EQU X:M X:N EQU /02 IFT P6805=0 LCUIN EQU X:N DEVICE ADDRESS OF RECEIVER XIF IFT P6805=1 LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER XIF X:O EQU 0 IBMCHR EQU X:O IF 1 IBM CHARACTER HANDLING X:P EQU 0 IF 1 MESSAGE PASSING TO DC TASK MESPAS EQU X:P X:Q EQU 1 IBM-3270 EMULATION PACKAGE, IF NOT = 0 EM3270 EQU X:Q X:R EQU 1000 DK2 BINTRM EQU 0 IF 1 BINARY TRANSMISSION TSTREQ EQU X:I IF 1 TEST REQUEST HANDLING DMRK EQU 1 SPECIAL CONDITION FOR DENMARK NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT DOESN'T ACCEPT WACK RESPONSE TO A SELECT SEQUENCE, NOWACK SHOULD BE SET TO "ONE". ONLY WORKING IF STAT IS SET TO "ONE". IFT P6805=0 LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER XIF IFT P6805=1 LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER XIF * * * ***************************************** * * CONDITIONAL ASSEMBLY * ***************************************** * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 1 * DB IFT MMUPAG=0 DK2 TBUFL EQU 0 DK2 XIF DK2 * IFT MMUPAG=1 DK2 TBUFL EQU 650+X:X MMU BUFFER LENGTH DK XIF DK2 DE * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 0 * DEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION BUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE * * * DWT DISPLACEMENTS * DWTDRD EQU /10 START OF DRIVER DEFINED PART * IFT MMUPAG=0 START EQU DWTDRD XIF * IFT MMUPAG=1 START EQU DWTDRD+4 XIF * DWTTP EQU START+/00 TIMER POINTER ORDER PROCESS DWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE DWTSQ EQU START+/04 STATUS QUEUE DWTRQ EQU START+/06 RECEIVE QUEUE DWTBUF EQU START+/08 DEVICE BUFFER ADDRESS DWTCUR EQU START+/0A CURSOR ADDRESS DWTTIM EQU START+/0C REQUEST TIMER VALUE DWTINF EQU START+/0E DEVICE INFO, 1=LP DK5 * * * REQUEST HANDLING * * * * A7=ORDER * * /02: READ * /06: WRITE * /31: TRANSFER DWTINF DK5 * /33: READ MODIFIED RESPONSE * /37: TRANSFER PARAMETERS * /38: SET STATUS * /39: SET REQUEST TIMEOUT VALUE * * * CONSTANTS AND WORK AREAS * * DCONOF DATA 0 ON- / OFFLINESWITCH DCSTOL DATA 0 OLD DC EQUIPMENT STATUS DCSTCU DATA 0 CURRENT STATUS DCWRQ DATA 0 WRITE REQUEST QUEUE DCTPGP DATA 0 TIMER POINTER GENERAL POLL * * DC TASK ADDRESS BLOCK * DATA 0 INDICATES NO MMU BUFFER DATA DEVIND DEVICE INDEX DC15DC DATA DCACTD ACTIVATION ADDRESS DATA ABORT ABORT ROUTINE ADDRESS DATA DCRBUF REC. BUFFER ANCHOR * * DRIVER ADDRESS BLOCK * DATA BUFLEN MMU BUFFER SIZE DATA DEVIND DEVICE INDEX DC15AD DATA DCACT ACTIVATION ADDRESS DATA ABORT ABORT ROUTINE ABORT ROUTINE ADDRESS DATA DCRBUF REC. BUFFER ANCHOR * RES 15 SUBROUTINE STACK FOR INTERRUPTS STB RES 1 RES 1 AND FOR TRANSFER PARAM STB2 RES 1 IFT SPEED=1 LSPEED EQU /0200 XIF IFT SPEED=0 LSPEED EQU 0 XIF * * * ACTIVATION FROM TERMINAL TASKS * DCACT EQU * LDK A1,0 PRESET RETURN CODE IFT EM3270=1 =4 LDR A7,A7 =4 RF(Z) ANYMSG ANY MESSAGE ORDER =4 XIF SUK A7,/02 ABL(Z) DCRD READ SPECIFIC SUK A7,/06-/02 RF(Z) DCWR SUK A7,/31-/06 DK5 RF(Z) TRINF TRANSFER DWTINF DK5 SUK A7,/33-/31 DK7 RF(E) RESTRM RESPONSE TO READ MODIFIED SUK A7,/37-/33 DK5 RF(Z) DCTP TRANSFER PARAMETERS IFF STAT=0 SUK A7,/38-/37 ABL(Z) DCSS SET STATUS DK4 SUK A7,/39-/38 ABL(Z) REQTIM SET REQUEST TIMER XIF IFT STAT=0 SUK A7,/39-/37 RF(Z) REQTIM SET REQUEST TIMER XIF RF DCA100 * * * ACTIVATION FROM DCTASK * * DCACTD EQU * SUR A1,A1 PRESET RETURN CODE =4 IFT EM3270=1 =4 LDR A7,A7 =4 RF(Z) ANYMSG ANY MESSAGE ORDER =4 XIF SUK A7,/02 RF(E) DCRDDC READ SUK A7,/37-/02 RF(E) DCTP TRANSFER PARAMETERS DCA100 EQU * REQUEST ERROR ABL DISIOE INVALID ORDER * * * READ FROM DCTASK * * * REQUEST FROM DC-TASK * COMPLETE WHEN: * STATUS CHANGE ON DC EQUIPMENT * SPONTANOUS MESSAGE RECEPTION * DCRDDC EQU * CF A15,CKMESS CHECK IF MESSAGE RECEIVED DCRTN EQU * ABL TDISP GO TO DISPATCHER IFT EM3270=1 =4 ***************************************** * * ANY MESSAGE ORDER * ***************************** ANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4 RF(Z) DCRD10 NO!! =4 RF ENDIO YES!! COMPLETE REQUEST =4 XIF * * TRANSFER DWTINF DK5 * DK5 TRINF EQU * DK5 LD A2,ECBCW,A8 GET INFO DK5 ORS A2,DWTINF,A6 OR AND STORE DK5 RF ENDIO COMPLETE REQUEST DK5 * * RESPONSE TO READ MODIFIED * RESTRM EQU * DK7 LD A1,DWTINF,A6 WAS READ MODIFIED RECEIVED? DK7 ANKL A1,/0002 DK7 ABL(Z) DISIOE NO, REQUEST ERROR DK7 RF DCWR TREAT ALMOST AS WRITE REQUEST EJECT * DK5 * * TRANSFER PARAMETERS * * * REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS * FROM TERMINALS: TRANSFER TERMINAL ADDRESSES * * IFF CODE=1 DCTP LD A2,ECBCW,A8 GET PARAMETER XIF IFT CODE=1 DCTP LC A2,ECBCW,A8 GET TCS IF ANY ANK A2,/FF RF(Z) DCTP10 LC A2,TASCII,A2 TRANSLATE TO ASCII SLL A2,8 DCTP10 EQU * LC A3,ECBCW+1,A8 GET TCP OR DV ANK A3,/FF LC A2,TASCII,A3 TRANSLATE TO ASCII XIF ST A2,DWTBUF,A6 SAVE TERM. ADDR. DK4 DCTP12 EQU * LD A1,DCSTQ CHECK IF THIS DWT IS IN QUEUE DK4 DCTP14 EQU * RF(Z) DCTP18 NO, END OF/OR NO QUEUE DK4 LDR A3,A6 ADJUST ADDR. VALUE DK4 ADKL A3,DWTSQ DK4 CWR A1,A3 SOMETHING QUEUED OUR DWT? DK4 RF(E) DCTP16 YES, WAIT BEFORE TRANS. PARAM. DK4 LDR* A1,A1 NOT OURS, GET NEXT DK4 RB DCTP14 DK4 DCTP16 EQU * LDR A1,A6 SAVE DWT AS PARAMETER DK4 CF A15,SETIME WAIT UNTIL STATUS IS SENT DK4 DATA TPTOUT,20 DELAY= 2 SECONDS DK4 RB DCRTN DK4 TPTOUT EQU * LDR A6,A1 RESTORE DWT DK4 RB DCTP12 LOOK IN THE QUEUE AGAIN DK4 DCTP18 EQU * LD A2,DWTBUF,A6 RESTORE TERM ADDR. DK4 STR A2,A6 SAVE IN FIRST WORD OF DWT IFT RCOM=1 ST A8,DWTBUF,A6 SAVE ECB FOR RD. MODIFIED DK6 XIF CWK A6,DW1500 DCTASK DWT ??? RF(E) DCTP30 YES!!! SHOULD NOT BE IN DC:TAB LD A1,DC:IN GET DC:TAB INPUT POINTER CWK A1,DC:END TABLE ALREADY FULL ???? ABL(E) DISIOE YES!! REQUEST ERROR DCTP20 EQU * LD A4,DCTAB DC:TAB ADDRESS =3 AD* A4,DCTAB LAST TABLE POS. =3 DCTP22 SUK A4,2 ADDR. TO NEXT ENTRY =3 CW A4,DCTAB ALL ENTRIES CHECKED?? =3 RF(E) DCTP25 YES.DWT NOT IN TABLE =3 CWR* A6,A4 IN TABLE ?? =3 RF(E) DCTP30 YES!! =3 RB DCTP22 CHECK NEXT ENTRY =3 DCTP25 EQU * =3 STR A6,A1 INSERT DWT IN DC:TAB LDK A1,2 ADS A1,DC:IN UPDATE DC:TAB IN POINTER ADS A1,DC:TAB INCREMENT DC:TAB LENGTH IFT STAT=1 LDK A1,4 DEVICE END ORS A1,DWTST,A6 CF A15,INSSQ INSERT IN STATUS QUEUE XIF DCTP30 EQU * SUR A1,A1 RETURN CODE ::= 0 ENDIO EQU * CF A15,TENDIO COMPLETE REQUEST RB DCRTN * * * WRITE * * * COMPLETE WHEN: * SUCCESFUL TRANSMISSION * TIME OUT * * DCWR EQU * IFT MMUPAG=1 LD A1,ECBRL,A8 REQUESTED LENGTH CWK A1,BUFLEN ILLEGAL LENGTH? RF(G) IL:LEN YES!! XIF CF A15,TIMEWR SET TIMER CF A15,INSWQ QUEUE REQUEST LD A1,DWTOR,A6 RESPONSE TO READ MODIFIED? DK7 ANK A1,/FF MASK ORDER DK7 CWK A1,/0033 READ-MOD. RESPONSE? DK7 ABL(E) SPOLLX YES TREAT AS SPECIFIC POLL DK7 RB DCRTN * * * * READ * * * COMPLETE WHEN: * MESSAGE RECEIVED * TIME OUT * * DCRD EQU * LD A8,DWTECB,A6 GET ECB LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE RF(Z) DCRD10 NOTHING IN QUEUE LDR* A2,A4 TAKE THE FIRST IN QUEUE ST A2,DWTRQ,A6 ADK A4,6 LD A3,-4,A4 EFFECTIVE LENGTH ST A3,ECBEL,A8 LDK A1,0 RESET RETURN CODE CF A15,DC:MIN MOV DATA TO USER BUFFER RB DCRTN DCRD10 CF A15,TIMERE START TIMER RB DCRTN * * * SET STATUS * * IFF STAT=0 DCSS EQU * LD A1,ECBCW,A8 GET STATUS INFORMATION ANK A1,3 MASK DB,IR RF(Z) DCSS20 DEVICE END DCSS10 EQU * ST A1,DWTST,A6 RB DCTP30 COMPLETE REQUEST DCSS20 EQU * LD A1,DWTST,A6 ANK A1,9 RB(Z) DCSS10 WACK HAS NOT BEEN SENT DCSS30 EQU * CF A15,INSSQ INSERT DWT IN STATUS QUEUE LDK A1,4 SET DE RB DCSS10 XIF * * SET REQUEST TIMEOUT VALUE * * REQTIM EQU * LD A2,ECBCW,A8 TIMEOUT VALUE ST A2,DWTTIM,A6 SAVE IT IN DWT RB DCTP30 TENDIO & DISPATCH * * ILLEGAL APPLICATION BUFFER SIZE * IL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH ABL DISEND COMPLETE REQUEST * * * * TIMER HANDLING PART * * * * READ TIMER=TIMERR * TIMERE EQU * LDR A1,A6 LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE RF(Z) TIME10 NO TIMING ST A2,TIMERR CF A15,SETIME DATA TOUTRE TIMERR DATA 0 ST A4,DWTTP,A6 STORE TIMER POINTER TIME10 EQU * RF GBUF10 RETURN * * TIMEOUT READ TIMER * TOUTRE EQU * LDR A6,A1 FETCH DWT CM DWTTP,A6 TOUTR1 EQU * LDK A1,/40 INDICATE TIME OUT TOUTR2 RB ENDIO COMPLETE REQUEST * * WRITE TIMER=TIMWR * TIMEWR LDR A1,A6 LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE RB(Z) TIME10 NO TIMING ST A2,TIMWR CF A15,SETIME DATA TOUTWR TIMWR DATA 0 ST A4,DWTTP,A6 RB TIME10 * * TIMEOUT WRITE TIMER * TOUTWR EQU * LDR A6,A1 FETCH DWT CM DWTTP,A6 CF A15,REMOVW REMOVE FROM WRITE QUEUE * * THIS INSTRUCTION DOES NOT BELONG * TO THE STANDARD INTERFACE LD A2,FDWTUT CWR A2,A6 RB(NE) TOUTR1 THIS DWT IS NOT WRITING CM XACK INDICATE 'ACK NOT EXPECTED' CM FDWTUT * * RB TOUTR1 * * * STOP REQUEST TIMING * * REMAINING TIME IS RETURNED IN A2 * * CTIME EQU * LD A2,DWTTP,A6 GET TIMER POINTER RF(Z) CTIM10 NOT RUNNING LDR* A2,A2 NGR A2,A2 GET REMAINING TIME CM* DWTTP,A6 STOP TIMER CM DWTTP,A6 CTIM10 EQU * RF GBUF10 * * GET RECEIVE BUFFER * * CALLING SEQUENCE: CF A15,GRBUF * A4=0 IF NO BUFFER IS FREE * ELSE A4 CONTAINS BUFFER ADDRESS * A2 AND A3 ARE DESTROYED * * GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS GBUF INH LDR* A4,A2 RF(Z) GBUF10 NO BUFFER FREE LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN STR A3,A2 GBUF10 ADKL A15,4 ADJUST STACK POINTER ABR* A15 RETURN TO CALLER * * * INSERT DWT IN WRITE REQUEST QUEUE * * A2,A3,A4 DESTROYED * A6=DWT * INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR INSWQ1 LDK A4,DWTWQ INSWQ2 LDR* A3,A2 RF(Z) INSWQ3 END OF QUEUE FOUND LDR A2,A3 RB INSWQ2 INSWQ3 ADR A4,A6 STR A4,A2 INSERT IN QUEUE CMR A4 INDICATE END OF QUEUE RB GBUF10 RETURN * * * REMOVE DWT FROM WRITE REQUEST QUEUE * * A2,A3,A4 DESTROYED * A6=DWT * REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR REM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED REM06 EQU * ADR A4,A6 REM10 LDR* A3,A2 RB(Z) GBUF10 NOT ON QUEUE: RETURN CWR A3,A4 RF(E) REM15 LDR A2,A3 GET NEXT RB REM10 REM15 LDR* A3,A4 REMOVE STR A3,A2 RB GBUF10 RETURN * * * INSERT DWT IN STATUS QUEUE * IFF STAT=0 * A2,A3,A4 DESTROYED * A6=DWT * INSSQ EQU * LD A2,0,A6 GET TERMINAL ADDRESS DK4 ANK A2,/FF IF ADDRESS = 00 OR /7F DK4 RB(Z) GBUF10 DONT PUT IN STATUS DK4 SUK A2,/7F QUEUE, TERMINAL HAS BEEN DK4 RB(Z) GBUF10 MADE INACTIVE DK4 LDKL A2,DCSTQ GET QUEUE ANCHOR LDK A4,DWTSQ RB INSWQ2 * * * REMOVE DWT FROM STATUS QUEUE * * A2,A3,A4 DESTROYED * A6=DWT * REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR LDK A4,DWTSQ RB REM06 XIF * * * QUEUE ALLOCATED RECEIVE BUFFER * * A4=BUFFER ADDR * A2,A3 DESTROYED * QRBUF EQU * IFT MESPAS=1 LDKL A2,DW1500 QUEUE ON DC-TASK DWT XIF IFT MESPAS=0 LDR A2,A6 QUEUE ON TERMINAL DWT XIF ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE QR100 EQU * LDR* A3,A2 RF(Z) QR200 END OF QUEUE FOUND LDR A2,A3 RB QR100 QR200 STR A4,A2 INSERT INTO QUEUE CMR A4 INDICATE END OF QUEUE RTN A5 * * * CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE * * REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED * CKMESS LDKL A6,DW1500 LD A1,DWTST,A6 RF(N) CKM110 NO REQUEST LDK A1,2 READ REQUEST ? CW A1,DWTOR,A6 RF(NE) CKM110 NO LD A8,DWTECB,A6 ECB ADDR TO A8 LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE RF(Z) CKM200 NO READ IN QUEUE LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE ADK A3,6 MOVE POINTER TO TEXT DONT DESTROY BUFFER ADDRESS =6 LD A4,-4,A3 ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS LD A4,-2,A3 ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS LDK A1,0 RESET RETURN CODE LDR A4,A3 RECEIVE BUFFER ADDRESS CF A15,DC:MIN MOVE DATA TO USER BUFFER CKM110 ADKL A15,4 ADJUST STACK POINTER ABR* A15 RETURN CKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS OR A1,DCONOF TAKE CARE OF POLL TIME OUT CW A1,DCSTOL ST A1,DCSTOL RB(E) CKM110 NO CHANGE OF STATUS ORKL A1,/2000 INDICATE STATUS CHANGE CF A15,TENDIO COMPLETE READ GENERAL REQUEST RB CKM110 ************************************************************ * * ABORT ROUTINE * ************************ ABORT LD A1,DWTTP,A6 TIMER POINTER RF(Z) AB:10 NO TIMER RUNNING CM* DWTTP,A6 KILL TIMER CM DWTTP,A6 AB:10 LD A1,DWTOR,A6 ORDER CODE SUK A1,2 RF(Z) AB:RTN READ REQUEST. NO ACTION SUK A1,4 RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE LD A2,FDWTUT WRITING DWT ADDRESS CWR A2,A6 RF(NE) AB:RTN NOT THIS DWT CM XACK RESET ACK EXPECTED CM FDWTUT RESET WRITING DWT AB:RTN EQU * IFT CPU852=1 ADKL A15,4 ABR* A15 RETURN IN INHIBIT MODE XIF IFF CPU852=1 RTN A15 XIF * * * STORE REGISTER A3-A8 * CALLING SEQUENSE: CF A15,STREG * * RESTORE * CALLING SEQUENCE: CF A15,LDREG * * STREG ST A3,LCA3 ST A4,LCA4 ST A5,LCA5 ST A6,LCA6 ST A7,LCA7 ST A8,LCA8 RF RTNA15 RETURN LDREG LDKL A3,0 LCA3 EQU *-2 LDKL A4,0 LCA4 EQU *-2 LDKL A5,0 LCA5 EQU *-2 LDKL A6,0 LCA6 EQU *-2 LDKL A7,0 LCA7 EQU *-2 LDKL A8,0 LCA8 EQU *-2 RTNA15 EQU * ADKL A15,4 ABR* A15 * * * TIMER VALUES * * TIMPRO EQU 90 PROCEDURE TIMER 9 SEC DK TIMNAK EQU 3 DELAY FOR NAK DK * * * CHARACTER EQUATES * SF EQU X'1D' START FIELD CHARACTER SYN EQU /16 STX EQU /02 ETX EQU /03 ETB EQU /17 ITB EQU /1F SOH EQU /01 ENQ EQU /05 DLE EQU /10 EOT EQU /04 NAK EQU /15 ESC EQU /1B SBA EQU /11 GP EQU /22 RDBCOM EQU /32 RDMCOM EQU /36 IFT CODE=0 PAR EQU /80 RVI EQU /3C ACK0 EQU /30 ACK1 EQU /31 DC1 EQU /11 IFT MSV1=0 WACK EQU /3B XIF IFT CODE=0 IFT MSV1=1 WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE XIF IFT CODE=1 PAR EQU /00 WACK EQU /2C RVI EQU XRVI DK ACK0 EQU /18 ACK1 EQU /2F SYNEBC EQU /32 XIF * * * PROCEDURE WORK AREAS * * FDWTIN RES 1 CURRENT DWT FOR RECEPTION FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION XACK DATA 0 ACK EXPECTED XSEL DATA 0 SELECTED XETX DATA 0 ETX SENT XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT XRB DATA 0 READ BUFFER SWITCH CACK DATA 0 ACK COUNTER SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP * FECB RES 1 WRITING ECB FECBBA RES 1 WRITING BUFFER ADDRESS FECBRL RES 1 WRITING BUFFER LENGTH FBAX DATA 0 BUFFER INDEX FBLST DATA 0 START OF LAST TRANSMITTED BLOCK DCSTQ DATA 0 STATUS QUEUE ANCHOR DCTPP DATA 0 POINTER FOR PROCEDURE TIMING RESEND DATA 0 CONTROL SEQUENCE SAVE AREA CRDBUF DATA 0 READ BUFFER COUNTER DK * * * 3270 SENSE/STATUS INFORMATION * * IFF STAT=0 SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE * * DATA /4248 DATA /4242 * NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED IR EQU /26 S/S 1 : INTERVENTION REQUIRED XIF * * * BASIC RECEIVE MODE * * ENTERED EVERY TIME A MESSAGE * IS EXPECTED FROM THE MASTER SIDE * * IFT P6805=1 BRMHLT CF A5,HALTIN HALT RECEIVER XIF BRM EQU * LDKL A5,STB LOAD STACKBASE IFT P6805=0 CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS XIF IFT P6805=1 CF A15,CKMESS CHECK IF STATUS CHANGE XIF BRM010 EQU * IFT CODE+P6805=0 LDKL A2,/100+LSPEED+SYN SPECIFY SYN PATTERN XIF IFT P6805=0 IFT CODE=1 LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN XIF IFT P6805=0 CIO A2,1,LCUIN START RECEIVER XIF IFT P6805=1 IFF CODE=1 LDK A2,/0C CIO A2,1,LCUIN START RECEIVER LDK A2,SYN OTR A2,1,LCUIN SPECIFY SYNC CHARACTER RB(NA) BRMHLT XIF IFT CODE+P6805=2 LDK A2,0 CIO A2,1,LCUIN START RECEIVER LDK A2,SYNEBC OTR A2,1,LCUIN SPECIFY SYNC CHARACTER RB(NA) BRMHLT XIF BRM100 EQU * CF A5,READP READ ONE CHARACTER RF(NZ) BRM150 PARITY ERROR LDR A1,A2 SUK A1,STX RF(Z) BRM300 STX RECEIVED SUK A1,EOT-STX RF(Z) BRM200 EOT RECEIVED SUK A1,ENQ-EOT ABL(Z) BRM400 ENQ RECEIVED SUK A1,DLE-ENQ ABL(Z) BRM600 DLE RECEIVED SUK A1,NAK-DLE ABL(Z) BRM500 NAK RECEIVED IFT MSV1=0 LDR A8,A2 CF A5,READP READ ONE CHARACTER RF(NZ) BRM150 PARITY ERROR CWR A2,A8 RF(NE) BRM150 INVALID ADDRESSING XIF LDK A3,0 CC A2,DW1500+1 RF(E) BRM110 POLLING LDK A3,2 CC A2,DW1500 RF(NE) BRM150 NOT THIS TCU BRM110 EQU * CF A5,READP READ 1:ST STA RF(NZ) BRM150 PARITY ERROR LDR A8,A2 IFT MSV1=0 CF A5,READP READ 2:ND STA RF(NZ) BRM150 PARITY ERROR CWR A2,A8 RF(NE) BRM150 INVALID ADDRESS SEQUENCE XIF CF A5,READ READ ONE CHARACTER IFT P6805=0 SUK A2,ENQ+PAR XIF IFT P6805=1 SUK A2,ENQ XIF RF(NZ) BRM150 NOT ENQ IFT P6805=0 CF A5,READ READ LAST CHARACTER * TRAILING PAD CAN BE CHECKED CIO A1,0,LCUIN HALT INPUT SST A1,LCUIN XIF IFT P6805=1 CF A5,HALTIN HALT INPUT RB(NZ) BRM010 PARITY ERROR XIF LDK A1,1 ST A1,CACK LOAD ACK COUNTER LDR A2,A8 SUK A3,2 RF(Z) BRM120 SELECTING CWK A8,GP ABL(E) GPOLL GENERAL POLL IFT MSV1=1 CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) XIF IFT MSV1=0 CF A5,FINTER CHECK IF STA PRESENT XIF LDR A6,A3 LOAD DWT TO A6 ABL(NZ) SPOLL SPECIFIC POLL RB BRM INVALID POLL BRM120 EQU * CF A5,FINTER CHECK IF STA PRESENT LDR A6,A3 LOAD DWT TO A6 RF(NZ) BRM130 STA FOUND IFT MSV1=0 LDKL A6,DW1500 SELECT TO DCTASK BRM130 EQU * ABL SELECT XIF IFT MSV1=1 ABL BRM INVALID ADDRESS XIF * * WAIT FOR MARK HOLD TO RESYNCHRONIZE * BRM150 EQU * ANK A2,/7F SUK A2,/7F RB(Z) BRM RESYNCHRONIZE CF A5,READ READ ANOTHER CHARACTER RB BRM150 * * * EOT HAS BEEN RECEIVED * * BRM200 EQU * CF A5,HPTIM STOP PROCEDURE TIMER IFT RCOM=1 CM XRB RESET READ BUFFER XIF LD A1,XACK RF(Z) BRM220 ACK IS NOT EXPECTED LD A6,FDWTUT GET WRITING DWT RF(Z) BRM210 NO ONE WRITING LDK A1,2 SET RC=2 CF A5,CWRITE COMPLETE WRITE REQUEST BRM210 EQU * CM XACK RESET 'ACK EXPECTED' BRM220 EQU * CM XSEL RESET 'SELECTED' RB BRM * * * STX HAS BEEN RECEIVED * * BRM300 EQU * CF A5,HPTIM LD A1,XSEL RF(Z) BRM315 NOT SELECTED LD A1,DCRBUF RB(Z) BRM150 NO BUFFER AVAILABLE BRM305 EQU * CF A5,RDMESS READ MESSAGE SUK A7,1 RF(NZ) BRM320 MESSAGE OK BRM310 EQU * CM XSTA INDICATE 'INVALID MESSAGE' BRM312 EQU * CF A5,TRNAK SEND NAK ABL BRM BRM315 EQU * IFT RCOM=1 LD A1,XACK RF(Z) BRM316 ACK IS NOT EXPECTED LD A1,DCRBUF RF(Z) BRM316 NO BUFFER AVAILABLE LD A6,FDWTUT GET WRITING DWT ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE LDR* A2,A6 GET STA XIF IFT RCOM=1 CF A5,PRREC PREPARE FOR TEXT RECEPTION LD A1,DWTECB,A6 SAVE CURRENT ECB DK6 ST A1,DWTCUR,A6 DK6 LDK A1,0 SET RC=0 CF A5,CWRITE COMPLETE WRITE REQUEST CM CACK PRESET ACK-1 =7 RB BRM305 READ THE MESSAGE XIF BRM316 CF A5,READ READ ONE CHARACTER IFF P6805=1 =8 SUK A2,ENQ+PAR XIF =8 IFT P6805=1 =8 SUK A2,ENQ =8 XIF =8 RB(Z) BRM312 FORWARD ABORT SEQUENCE RB BRM220 BRM320 EQU * IM XSTA INDICATE MESSAGE OK LD A4,DCRBUF GET BUFFER ADDRESS ADK A4,6 CW A4,FBLST RF(NE) BRM325 NOT FIRST BLOCK IFF RCOM=0 LDK A1,ESC CCR A1,A4 RB(NE) BRM310 ESC NOT FOUND ADK A4,1 LCR A1,A4 GET COMMAND CODE SUK A4,1 SUK A1,RDBCOM RF(Z) RDBUF READ MODIFIED RECEIVED SUK A1,RDMCOM-RDBCOM RF(Z) RDMOD READ BUFFER RECEIVED XIF BRM325 EQU * SUK A7,1 RF(Z) BRM340 MESSAGE ENDED BY ETB CM FBAX CF A15,GRBUF ALLOCATE RECEIVE BUFFER ADK A4,6 LD A6,FDWTIN GET INPUT DWT * * PREPARE FOR CHAINED COMMAND * IFT RCOM=1 LDR* A2,A6 LC A2,TEBCDIC,A2 LD A1,DCRBUF RF(Z) BRM326 ST A2,+4,A1 XIF BRM326 EQU * CWK A6,DW1500 RF(E) BRM330 MESSAGE IS MENT FOR DCTASK LD A2,DWTST,A6 GET STATUS RF(N) BRM330 NO REQUEST IFT EM3270=1 =4 LD A2,DWTOR,A6 ORDER =4 RF(Z) BRM327 ANY MESSAGE ORDER =4 XIF =4 LDK A2,2 CW A2,DWTOR,A6 RF(NE) BRM330 NO READ REQUEST BRM327 EQU * LDK A1,0 SET RC=0 LD A8,DWTECB,A6 GET ECB ADDRESS LD A3,-4,A4 GET LENGTH ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH CF A15,CTIME STOP REQUEST TIMING ST A2,ECBCW,A8 STORE REMAINING TIME * * * CHECK IF START PRINTER BIT SET IN CCC/WCC * * IFT STAT=1 LC A2,+2,A4 GET WCC/CCC ANK A2,/FF LC A2,TEBCDI,A2 TRANSLATE LD A3,DWTINF,A6 GET DWT INFO DK5 ANK A3,1 GET LPBIT DK5 RF(Z) BRM328 NOT LP DK5 ANK A2,8 RF(Z) BRM328 LD A2,DWTST,A6 GET STATUS ORK A2,/A SET WACK INDICATION ST A2,DWTST,A6 BRM328 EQU * XIF IFT EM3270=1 =4 LD A2,DWTOR,A6 ORDER =4 RF(NZ) BRM329 NOT ANY MESSAGE ORDER =4 SUK A4,6 ADJUST BUFFER ADDRESS =4 CF A5,QRBUF QUEUE MESSAGE ON DWT =4 RF BRM32A =4 XIF =4 BRM329 EQU * =4 LDK A1,0 RESET RETURN CODE CF A15,DC:MIN MOVE TO USER BUFFER RF BRM345 BRM32A EQU * =4 CF A15,TENDIO COMPLETE REQUEST RF BRM345 BRM330 EQU * IFT EM3270=1 =4 LD A1,DWTST,A6 STATUS =4 RF(N) BRM335 NO REQUEST =4 LD A1,DWTOR,A6 ORDER =4 RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4 CF A15,TENDIO COMPLETE REQUEST =4 BRM335 EQU * =4 XIF =4 SUK A4,6 GET BUFFER BASE CF A5,QRBUF QUEUE BUFFER FOR DCTASK CF A15,CKMESS COMPLETE DCTASK READ IF ANY BRM340 EQU * CF A5,TRACK SEND ACK 0/1 ABL BRM BRM345 EQU * IFT STAT=1 LD A1,DWTINF,A6 READ-MOD. RECEIVED? DK7 ANKL A1,/0002 DK7 RF(NZ) BRM410 WAIT FOR RESPONSE FROM APPL. DK7 LD A1,DWTST,A6 ANK A1,8 RB(Z) BRM340 ACK SHOULD BE SENT CF A5,TRWACK SEND WACK RF BRM410 XIF IFF STAT=1 RB BRM340 XIF * * * READ MODIFIED OR READ BUFFER RECEIVED * * IFF RCOM=0 RDBUF EQU * READ BUFFER COMMAND RDMOD EQU * CM XSEL RESET SELECT EXPECTED LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL LDK A1,1 XRS A1,CACK INCREMENT ACK COUNTER DB LDK A1,/02 INDICATE READ-MOD. RECEIVED DK7 ORS A1,DWTINF,A6 DK7 LDKL A1,/4000 SET RETURN CODE =READ-MOD. DK7 RB BRM32A COMPLETE THE REQUEST DK7 XIF * * * ENQ HAS BEEN RECEIVED * * BRM400 EQU * CF A5,HPTIM STOP PROCEDURE TIMER LD A1,XACK RF(NZ) BRM510 RETRANSMISSION OF MESSAGE OR A1,XSEL RF(Z) BRM410 IN CONTROL STATE CF A5,TRREP REPEAT LAST CONTROL SEQUENCE BRM410 EQU * ABL BRM * * * NAK HAS BEEN RECEIVED * * BRM500 EQU * CF A5,HPTIM STOP PROCEDURE TIMER LD A1,XACK RF(NZ) BRM510 ACK EXPECTED OR A1,XSEL RB(Z) BRM410 IN CONTROL STATE RF BRM636 BRM510 EQU * DB LDK A1,0 CIO A1,0,LCUIN DK SST A1,LCUIN DK CF A15,STREG DK CF A15,SETIME DK DATA BRM520,TIMNAK DK ABL TDISP DK BRM520 EQU * DK CF A15,LDREG DK DE LD A6,FDWTUT GET WRITING DWT IFF STAT=0 LD A1,XSTA ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED XIF LD A1,FBLST GET START POINT FOR LAST BLOCK SU A1,FECBBA COMPUTE BUFFER INDEX ST A1,FBAX ABL POL130 * * * DLE HAS BEEN RECEIVED * * BRM600 EQU * CF A5,HPTIM STOP PROCEDURE TIMER LD A1,XACK RB(Z) BRM410 ACK NOT EXPECTED CF A5,READ READ SECOND CHARACTER IFF P6805=1 =8 CWK A2,ACK0+PAR XIF =8 IFT P6805=1 =8 CWK A2,ACK0 =8 XIF =8 RF(NE) BRM620 * * ACK , 0 RECEIVED * LD A1,CACK GET ACKCOUNTER RF(Z) BRM630 ACK,0 EXPECTED BRM610 EQU * CF A5,TRENQ SEND ENQ CF A5,SPTIM START PROCEDURE TIMER RB BRM410 BRM620 EQU * CWK A2,ACK1 RF(NE) BRM650 * * ACK , 1 RECEIVED * LD A1,CACK GET ACK COUNTER RB(Z) BRM610 ACK,1 NOT EXPECTED BRM630 EQU * LD A1,XETX RF(Z) BRM640 ETX NOT SENT * * ACK HAS BEEN RECEIVED TO AN ETX BLOCK * LDK A1,0 SET RC=0 BRM635 EQU * IFF STAT=0 LD A2,XSTA RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED XIF CF A5,CWRITE COMPLETE WRITE REQUEST BRM636 EQU * CF A5,TREOT SEND EOT IFT RCOM=1 CM XRB RESET READ BUFFER XIF RB BRM410 BRM640 EQU * LDK A1,1 XRS A1,CACK INCREMENT ACK COUNTER ABL POL130 BRM650 EQU * IFF P6805=1 =8 CWK A2,RVI+PAR XIF =8 IFT P6805=1 =8 CWK A2,RVI =8 XIF =8 RB(NE) BRM610 INVALID DLE SEQUENCE CM XACK RESET 'EXPECTING ACK' LD A1,XETX RF(NZ) BRM660 ETX HAS BEEN SENT LDK A1,2 SET RC=2 RB BRM635 BRM660 EQU * LDK A1,0 SET RC=0 RB BRM635 IFF STAT=0 * * * STATUS HAS BEEN TRANSMITTED * * BRM670 EQU * LD A6,FDWTUT GET DWT ADDRESS CF A15,REMOVS REMOVE FROM STATUS QUEUE CM XSTA CLEAR 'STATUS SENT' CM XACK CLEAR 'ACK EXPECTED' LD A1,DWTST,A6 GET STATUS ANK A1,4 RB(Z) BRM636 NOT DE LDKL A1,/8000 ANS A1,DWTST,A6 CLEAR STATUS RB BRM636 XIF * * * SELECT HAS BEEN RECEIVED * * SELECT EQU * LD A1,XACK =5 RF(NZ) POL010 ERROR. ACK EXPECTED =5 IFF STAT=0 LD A1,DWTST,A6 GET STATUS LDR A3,A1 ANK A1,1 RF(Z) SEL110 NO PENDING STATUS CF A5,TRRVI SEND RVI XIF IFF STAT=1 RF SEL110 XIF SEL100 EQU * ABL BRM SEL110 EQU * IFT STAT+NOWACK=1 ANK A3,8 RF(NZ) SEL115 BUSY XIF IFT STAT+NOWACK=2 ANK A3,8 RF(Z) SEL111 DEVICE NOT BUSY CF A5,TRWACK TRANSMIT WACK ABL BRM SEL111 EQU * XIF LD A1,DCRBUF RF(NZ) SEL120 BUFFER AVAILABLE SEL115 EQU * IFF STAT+NOWACK=2 CF A5,TRWACK SEND WACK XIF RB SEL100 SEL120 EQU * CF A5,PRREC PREPARE FOR TEXT RECEPTION CF A5,TRACK SEND ACK,0 RB SEL100 * * * PREPARE FOR TEXT RECEPTION * * PRREC EQU * IM XSEL SET 'SELECTED' CM FBAX RESET BUFFER INDEX IFT CODE=1 LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC XIF ST A2,+4,A1 SAVE STA IN BUFFER IM XSTA ST A6,FDWTIN STORE INPUT DWT RTN A5 * * * GENERAL POLL HAS BEEN RECEIVED * * GPOLL EQU * LD A1,XACK =5 RF(Z) POL020 ACK NOT EXPECTED =5 POL010 CF A5,TRENQ SEND ENQ =5 CF A5,SPTIM START PROCEDURE TIMER =5 ABL BRM WAIT FOR RESPONSE =5 POL020 EQU * =5 CF A5,CPTIM CHECK POLL TIMER IFF STAT=0 LD A6,DCSTQ RF(Z) POL110 NO STATUS TO BE SENT SUK A6,DWTSQ GET DWT ADDRESS POL050 EQU * CF A5,TRSTA SEND STATUS CF A5,SPTIM START PROCEDURE TIMER IM XACK SET 'ACK EXPECTED' XIF IFF STAT=1 RF POL110 XIF POL100 EQU * ABL BRM POL110 EQU * LD A6,DCWRQ RF(NZ) POL120 WRITE ON QUEUE POL115 EQU * CF A5,TREOT SEND EOT RB POL100 POL120 EQU * SUK A6,DWTWQ GET DWT ADDRESS POL125 EQU * LD A8,DWTECB,A6 GET ECB ADDRESS RF(NZ) POL126 CF A15,REMOVW RB POL115 POL126 EQU * ST A8,FECB SAVE ECB ADDRESS ST A6,FDWTUT SAVE A6 IFF MMUPAG=0 LDKL A4,MMUBUF MMU WORK BUFFER ST A4,ECBBA,A8 CF A15,DC:MOT MOVE DATA FROM USER BUFFER XIF LD A4,ECBBA,A8 GET BUFFER ADDRESS LD A3,ECBRL,A8 GET LENGTH POL127 EQU * ST A4,FECBBA SAVE BUFFER ADDRESS SUK A3,2 SKIP FIRST WORD OF BUFFER ST A3,FECBRL SAVE LENGTH CM FBAX RESET BUFFER INDEX POL130 EQU * CM XETX RESET 'ETX SENT' CM XSTA CF A5,TRTEXT SEND ONE BLOCK CF A5,SPTIM START PROCEDURE TIMER IM XACK SET 'ACK EXPECTED' RB POL100 EJECT * * PROCESS RESPONSE TO READ MODIFIED * SPOLLX EQU * DK7 LDK A1,/06 FAKE A WRITE REQUEST ST A1,DWTOR,A6 DK7 LDKL A1,/FFFF-/0002 CLEAR READ MODIFIED FLAG DK7 ANS A1,DWTINF,A6 LDKL A5,STB SET STACK BASE DK7 RF SPOLL PROCESS AS SPECIFIC POLL DK7 * * * SPECIFIC POLL HAS BEEN RECEIVED * * SPOLL EQU * IFF STAT+SPECP=0 LD A1,XACK =5 RB(NZ) POL010 ACK EXPECTED =5 LDR A7,A6 SAVE A6 CF A5,CPTIM CHECK POLLTIMER LDR A6,A7 RESTORE A6 IFT STAT=1 LD A1,DWTST,A6 GET STATUS ANK A1,7 RB(NZ) POL050 PENDING STATUS XIF IFF STAT+SPECP=0 LD A1,DWTST,A6 RB(N) POL115 NO REQUEST LD A1,DWTOR,A6 GET ORDER SUK A1,6 RB(Z) POL125 WRITE REQUEST SUK A1,2 RB(Z) POL125 EXCHANGE REQUEST XIF RB POL115 SEND EOT * * * CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED * * A1 CONTAINS RETURN CODE * * CWRITE LD A6,FDWTUT RF(Z) CWR900 NO WRITE GOING ON IFT RCOM=1 LD A2,XRB IF RCOM, SKIP IT DK6 RF(NZ) CWR900 DK6 XIF LD A2,DWTST,A6 RF(N) CWR900 NO REQUEST LD A2,DWTOR,A6 GET ORDER SUK A2,6 RF(Z) CWR100 WRITE REQUEST SUK A2,2 RF(NZ) CWR900 NOT EXCHANGE REQUEST LDR A1,A1 RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO LDK A2,2 TRANMISSION OK ST A2,DWTOR,A6 INDICATE READ ORDER RF CWR150 CWR100 LD A8,FECB GET ECB ADDRESS CF A15,CTIME STOP TIMING LDR A8,A8 RF(Z) CWR150 ST A2,ECBCW,A8 CF A15,TENDIO COMPLETE REQUEST CWR150 EQU * CF A15,REMOVW REMOVE FROM WRITE QUEUE CWR200 EQU * CWR900 EQU * CM XACK RESET 'ACK EXPECTED' CM FDWTUT IFT RCOM=1 LD A2,XRB READ MODIFIED ? DK6 RF(Z) CWR910 DK6 LD A2,DWTCUR,A6 RESTORE ECB DK6 ST A2,DWTECB,A6 DK6 CWR910 EQU * DK6 XIF RTN A5 * * * READ ONE TEXT BLOCK * * ON EXIT A3 CONTAINS : * 0 : IF CORRECT ETX BLOCK RECEIVED * 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW * 2 : IF CORRECT ETB BLOCK RECEIVED * RDMESS EQU * LD A4,DCRBUF GET BUFFER ADDRESS ADK A4,6 RESERVE HEADER LDK A3,0 LD A1,XSTA RF(NZ) RDM050 LAST INPUT WAS OK LD A1,FBLST COMPUTE NEW INDEX SUR A1,A4 ST A1,FBAX RDM050 EQU * AD A4,FBAX ADD BUFFER INDEX ST A4,FBLST REMEMBER START OF BLOCK RDM075 EQU * CM XSTA LDK A7,0 RESET LRC IFT IBMCHR=1 LD A1,FBAX RF(NZ) RDM100 NOT FIRST BLOCK CF A5,READP RF(NZ) RDM120 PARITY ERROR CWK A2,ESC RF(NE) RDM110 CF A5,READP SKIP NEXT TWO CHARACTERS CF A5,READP XIF RDM100 EQU * CF A5,READP READ ONE CHARACTER RF(NZ) RDM120 PARITY ERROR RDM110 EQU * CWK A2,ETX RF(E) RDM130 ETX RECEIVED CWK A2,ETB RF(E) RDM160 ETB RECEIVED CWK A2,ITB RF(E) RDM170 ITB RECEIVED CWK A2,ENQ RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE CWK A2,/FF RF(E) RDM140 MARK HOLD RECEIVED IFT CODE=0 IFT BINTRM=1 LDR A1,A2 SUK A1,DC1+3 RF(P) RDM115 NOT DC1-DC3 ADK A1,3 RF(N) RDM115 NOT DC1-DC3 SLL A1,6 LDR A8,A1 CF A5,READP 8-BIT CHAR GET NEXT PART RF(NZ) RDM120 PARITY ERROR SUK A2,/20 ASSEMBLE TO ONE CHARACTER ORR A2,A8 RDM115 EQU * XIF SCR A2,A4 STORE CHARACTER ADK A4,1 INCREMENT POINTER IM FBAX INCREMENT BUFFER INDEX LD A1,FBAX CWK A1,RBUFL+RBUFL RB(NG) RDM100 NOT OVERFLOW * * BUFFER OVERFLOW * RF RDM140 ABORT INPUT RDM120 EQU * LDK A3,1 INDICATE INVALID MESSAGE SUK A2,/7F RF(Z) RDM150 MARK HOLD RECEIVED RB RDM100 * * ETX RECEIVED * RDM130 EQU * LD A1,DCRBUF GET BUFFER ADDRESS LD A2,FBAX GET BUFFER INDEX ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER IFF CODE=1 CF A5,RDLRC RF(Z) RDM150 LRC WAS OK XIF IFT CODE=1 CF A5,RDCRC READ CRC AND CHECK IT RF(E) RDM150 CRC WAS OK XIF RDM140 EQU * LDK A3,1 INDICATE INVALID MESSAGE RDM150 EQU * LDR A7,A3 SAVE RESULT REGISTER CF A5,HALTIN HALT INPUT IFT P6805=1 ORR A7,A1 PARITY ERROR XIF RTN A5 * * ETB RECEIVED * RDM160 EQU * LDR A3,A3 RB(NZ) RDM130 ALREADY INVALID LDK A3,2 INDICATE CORRECT ETB RB RDM130 * * ITB RECEIVED * RDM170 EQU * IFF CODE=1 CF A5,RDLRC RB(NZ) RDM120 LRC WAS NOT OK XIF IFT CODE=1 CF A5,RDCRC READ CRC AND CHECK IT RB(NE) RDM120 CRC WAS NOT OK XIF RB RDM100 * * TRANSMIT ACK 0 OR 1 * TRACK LDK A2,1 LDK A3,ACK1 PRELOAD ACK1 XRS A2,CACK INCREMENT ACK COUNTER RF(NZ) TRDLE LDK A3,ACK0 LOAD ACK0 RF TRDLE * * TRANSMIT WACK * TRWACK LDK A3,WACK LOAD WACK RF TRDLE * * TRANSMIT RVI * IFF STAT=0 TRRVI LDK A3,RVI LOAD RVI XIF * * TRANSMIT DLE * TRDLE LDK A2,DLE LOAD DLE SC A2,RESEND PUT INSAVE AREA SC A3,RESEND+1 RF TRREP * * TRANSMIT NAK * TRNAK LDK A3,NAK LOAD NAK RF TREN10 * * TRANSMIT EOT * TREOT LDK A3,EOT LOAD EOT RF TREN10 * * TRANSMIT ENQ * TRENQ LDK A3,ENQ LOAD ENQ * TREN10 SC A3,RESEND PUT IN SAVE AREA LDK A2,/FF SC A2,RESEND+1 TRREP CF A5,TRSYNC START OUTPUT LC A2,RESEND GET FIRST CHARACTER CF A5,WRITEP SEND IT LC A2,RESEND+1 GET NEXT CHARACTER CF A5,WRITEP SEND IT TRRE10 LDK A2,/FF CF A5,WRIT05 SEND PAD LDK A2,/FF CF A5,WRIT05 LDK A2,0 CIO A2,0,LCUUT STOP TRANSMITTER IFT P6805=1 CF A5,READ WAIT FOR END XIF SST A2,LCUUT PERFORM SST AT ONCE IFF LOGG=0 CF A5,LOGSST LOG TRANSMITTER STATUS XIF RTN A5 * * * TRANSMIT ONE TEXT BLOCK * * TRTEXT EQU * CF A5,TRSYNC START OUTPUT IFT TSTREQ=1 * * * TEST REQUEST HANDLING * * LD A4,FBAX RF(NZ) TRT050 NOT START OF MESSAGE LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? RF(NZ) TRT050 YES !! LD A4,FECBBA LC A3,+2,A4 GET AID CHARACTER SUK A3,/30 RF(NZ) TRT050 NOT TEST REQUEST LDK A2,SOH CF A5,WRITE SEND SOH LDK A7,0 RESET BCC LDK A2,'%' CF A5,WRITE SEND % LDK A2,'/' CF A5,WRITE SEND / LDK A2,STX CF A5,WRITE SEND STX ST A4,FBLST REMEMBER START OF BLOCK ADK A4,5 SKIP AID + CURSOR ADDRESS LDK A3,5 ADJUST LENGTH LDK A2,3 ST A2,FBAX RF TRT100 TRT050 EQU * * * * XIF LDK A2,STX CF A5,WRITE SEND STX LDK A7,0 RESET LRC LD A4,FECBBA GET BUFFER ADDRESS AD A4,FBAX ADD BUFFER INDEX ST A4,FBLST REMEMBER START OF BLOCK ADK A4,2 SKIP FIRST WORD OF BUFFER LDK A3,0 RESET CHARACTER COUNTER LD A1,FBAX GET BUFFER INDEX RF(NZ) TRT100 NOT FIRST BLOCK LC A2,DW1500+1 GET TCA CF A5,WRITEP SEND TCA LDR* A2,A6 GET STA CF A5,WRITEP SEND STA IFT IBMCHR=1 IFF RCOM=1 LDK A2,/27 SEND ENTER AS AID CF A5,WRITEP LDK A2,/20 AND CURSOR ADDRESS CF A5,WRITEP LDK A2,/20 CF A5,WRITEP XIF IFT RCOM=1 RF TRT070 DK6 ******************** LDK A2,X'2D' AID FOR DISPLAY TRT060 CF A5,WRITEP SEND AID LD* A3,DWTCUR,A6 CURSOR ADDRESS CF A5,LINCOL SEND LINE AND COLUMN NUMBER LDK A3,5 SET BLOCK COUNT RF TRT100 TRT070 EQU * XIF LDK A3,2 TRT100 EQU * LCR A2,A4 GET ONE CHARACTER ADK A4,1 INCREMENT POINTER ANK A2,/7F IFT RCOM=1 RF TRT105 DK6 ************************************************************ * * CHECK IF ATTRIBUTE CHARACTER OR NULL * *********************************************** CWK A2,X'20' ATTRIBUTE CHARACTER RF(L) TRT101 YES!!! XIF IFT DMRK=1 CWK A2,/7E LINE FEED ? RF(NE) TRT102 NO,GO TO TRT102 LDK A2,/0A TRT102 EQU * CWK A2,/7D END OF MESSAGE ? RF(NE) TRT103 NO,GO TO TRT103 LDK A2,/19 TRT103 EQU * CWK A2,X'7F' NULL ?? RF(NE) TRT105 SUK A2,1 XIF IFT RCOM=1 RF TRT105 TRT101 EQU * LDK A2,SF CF A5,WRITEP SEND START FIELD LC A2,-1,A4 GET ATTRIBUTE CHARACTER ANK A2,X'7F' LDR A1,A2 CONVERT TO IBM ATTRIBUTE ANK A1,1 ANK A2,/1E MASK SLL A2,1 ORR A2,A1 IBM ATTRIBUTE COMPOSED ORK A2,/40 BIT ALWAYS SET ONE LC A2,TASCII,A2 CWK A2,/18 CHECK SPECIAL ATTRIBUT RF(NE) TRT104 LDK A2,/30 TRT104 EQU * CF A5,WRITEP SEND ATTRIBUTE ADK A3,1 RF TRT110 TRT105 EQU * XIF CWK A2,/07 RF(L) TRT110 ILLEGAL CODE : SKIP IT CF A5,WRITEP SEND CHARACTER TRT110 EQU * IM FBAX INCREMENT BUFFER INDEX LD A1,FECBRL GET REQUESTED LENGTH CW A1,FBAX RF(NG) TRT130 END OF MESSAGE ADK A3,1 INCREMENT CHARACTER COUNTER CWK A3,TBLEN RB(L) TRT100 NOT FULL BLOCK IFT RCOM=1 LDK A1,SBA CHECK IF SBA AT END OF BLOCK CC A1,-2,A4 RF(E) TRT115 YES CC A1,-1,A4 RF(NE) TRT116 NO SEND ETB LCR A2,A4 GET FIRST BYTE AFTER SBA ADK A4,1 INREMENT POINTER CF A5,WRITEP SEND IT IM FBAX INCREMENT INDEX TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA CF A5,WRITEP SEND IT IM FBAX INCREMENT INDEX XIF TRT116 EQU * LDK A2,ETB LOAD ETB TRT120 EQU * CF A5,WRITEP SEND IT IFF CODE=1 LDR A2,A7 GET LRC CF A5,WRITEP SEND LRC XIF IFT CODE=1 LDR A8,A7 SAVE CURRENT CRC LDR A2,A7 ANK A2,/FF CF A5,WRIT05 SEND CRC BYTE 1 ECR A2,A8 ANK A2,/FF CF A5,WRIT05 SEND CRC BYTE 2 XIF ABL TRRE10 HALT OUTPUT TRT130 EQU * IM XETX INDICATE 'ETX SENT' TRT140 EQU * LDK A2,ETX LOAD ETX RB TRT120 SEND ETX AND LRC * * * TRANSMIT STATUS MESSAGE * * IFF STAT=0 TRSTA EQU * IM XSTA INDICATE 'STATUS SENT' ST A6,FDWTUT SAVE A6 CF A5,TRSYNC START OUTPUT LDK A2,SOH CF A5,WRITE SEND SOH LDK A7,0 REST LRC LDK A2,'%' CF A5,WRITEP SEND '%' LDK A2,'R' CF A5,WRITEP SEND 'R' LDK A2,STX CF A5,WRITE SEND STX LC A2,DW1500+1 CF A5,WRITEP SEND TCA LDR* A2,A6 CF A5,WRITEP SEND STA LD A1,DWTST,A6 GET STATUS ANK A1,/06 MASK FOR S/S 0 SRL A1,1 LC A2,SSTAB,A1 GET STATUS BYTE CF A5,WRITEP SEND S/S 0 LDK A2,NOIR PRELOAD S/S 1 LD A1,DWTST,A6 GET STATUS ANK A1,5 RF(Z) TRST10 NOT 'IR' ANK A1,4 RF(NZ) TRST10 NO IR IF DE LDK A2,IR TRST10 EQU * CF A5,WRITEP SEND S/S 1 RB TRT130 SEND ETX AND LRC XIF * * * TRANSMIT SYNC SEQUENCE * * TRSYNC EQU * LDK A2,0 CIO A2,0,LCUIN HALT INPUT IF NOT DONE SST A2,LCUIN PERFORM SST IFT P6805=0 CIO A2,1,LCUUT START TRANSMITTER XIF IFT P6805=1 IFT CODE=1 LDK A2,0 CIO A2,1,LCUUT START TRANSMITTER RF(A) TRS010 SST A1,LCUUT RF(A) TRS005 ABL BRM TRS005 CIO A2,1,LCUUT TRS010 EQU * LDK A2,SYNEBC OTR A2,1,LCUUT SPECIFY SYNC CHARACTER XIF IFT P6805=1 IFT CODE=0 LDK A2,/0C CIO A2,1,LCUUT RF(A) TRS010 SST A1,LCUUT RF(A) TRS005 ABL BRM TRS005 CIO A2,1,LCUUT TRS010 EQU * LDK A2,SYN OTR A2,1,LCUUT SPECIFY SYNC CHARACTER XIF CF A5,READ WAIT FOR OUTPUT INTERRUPT LDK A3,4 4 SYNS TRS100 LDK A2,SYN CF A5,WRITE SEND SYN SUK A3,1 RB(NZ) TRS100 RTN A5 * * * RECEIVER INTERRUPT * * IH1501 EQU * ST P,INTSAV IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 XIF IFF CPU852=1 MSR 8,A15 SAVE A1-A8 =1 XIF CF A15,LDREG RESTORE DC REGS A3 - A8 INR A2,0,LCUIN READ CHAR RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS IFF LOGG=0 CF A5,LOGIN LOG RECEIVED CHARACTER XIF IFF CODE=1 C2 SYNSW RF(NZ) IHLCI2 CWK A2,SYN SKIP SYNS RF(E) READ IHLCI2 XRR A7,A2 CALCULATE LRC XIF IFT CODE=1 C2 SYNSW RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME CWK A2,SYNEBC RF(E) READ SKIP EBCDIC SYN IHLCI1 EQU * CF A5,CRCCAL CALCULATE CRC LC A2,TASCII,A2 TRANSLATE TO ASCII XIF IHIN10 RTN A5 IFT P6805=0 IHIN20 CF A5,SST PERFORM SST ABL BRM XIF IFT P6805=1 IHIN20 RF SST PERFORM SST XIF * * * TRANSMITTER INTERRUPT * * IH1502 EQU * ST P,INTSAV IFT CPU852=1 CF A15,SAVE8 SAVE A1 - A8 XIF IFF CPU852=1 MSR 8,A15 SAVE A1-A8 =1 XIF CF A15,LDREG RESTORE DC REGS A3 - A8 RB IHIN10 * * * SST INSTRUCTION AND STATUS CHECK * * LCU STATUS : BIT 10=CARRIER OFF * BIT 13=PARITY ERROR (6805 ONLY) * BIT 14=THROUGHPUT ERROR * BIT 15=MODEM NOT READY * SST SST A1,LCUIN IFT P6805=1 RF(NA) SST200 ALREADY INACTIVE XIF LDR A2,A1 IFF LOGG=0 CF A5,LOGSST LOG SST INFORMATION XIF IFT P6805=0 ANK A2,2 RF(Z) SST100 XIF IFT P6805=1 ANK A2,6 RF(Z) SST100 ANK A2,2 RF(NZ) SST050 THROUGH PUT LDK A1,1 SET PARITY ERROR RF SSTRET XIF SST050 EQU * CM XSTA TROUHHPUT ERROR LDKL A5,STB ABL BRM010 SST100 EQU * ST A1,DCSTCU IFT P6805=0 CF A15,CKMESS CHECK IF STATUS CHANGE RTN A5 XIF IFT P6805=1 ANK A1,/21 RF(Z) SST200 LSALCUZ CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS DATA BRM RESTART DATA 2 WAIT TIME RF READ * SST200 LDK A1,0 SSTRET ADK A5,4 LDR A1,A1 SET CR ABR* A5 RETURN XIF * * * HALT INPUT * * HALTIN LDK A1,0 CIO A1,0,LCUIN IFT P6805=0 RB SST PERFORM SST INSTRUCTION AND STATUS CHECK XIF IFT P6805=1 RF READ WAIT FOR SST INTERRUPT XIF * * * WRITE FROM OR READ ONE CHARACTER TO A2 * * WRITE EQU * IFT CODE=1 ANK A2,/FF CWK A2,/FF RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC XIF WRIT05 EQU * OTR A2,0,LCUUT SEND CHARACTER RF(A) WRIT10 RF READ THROUGHPUT ERROR IFF CODE=1 WRIT10 XRR A7,A2 ACCUMULATE BCC XIF IFT CODE=1 WRIT10 CF A5,CRCCAL CALCULATE CRC XIF IFF LOGG=0 CF A5,LOGOUT LOG OUTPUT CHARACTER XIF * READ CF A15,STREG ABL TDISP * * *** WRITEP * * WRITE A2 WITH PARITY * * IFT CODE+P6805=0 WRITEP ANK A2,/FF ECR A1,A2 ORK A2,/80 WRI100 SLL A1,1 RB(P) WRI100 RB(Z) WRITE WRITE XRK A2,/80 RB WRI100 XIF IFF CODE+P6805=0 WRITEP RB WRITE XIF * * * *** READP * * READ CHARACTER TO A2 AND CHECK PARITY * * READP CF A5,READ IFT CODE+P6805=0 ECR A1,A2 RE100 SLL A1,1 RF(Z) RE110 RB(NN) RE100 XRK A2,/80 RB RE100 RE110 LDR A1,A2 ANK A2,/7F XIF IFF CODE+P6805=0 LDK A1,/80 XIF ADK A5,4 ANK A1,/80 XRK A1,/80 ABR* A5 * * * * FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 * * CALLING SEQUENCE: CF A5,FINTER * A2=SUBTERMINAL ADDRESS * A4 DESTROYED * A3#0: DWT TO FOUND TERMINAL * * NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES * ENTRY: FINTER - CHECK SELECT ADDRESS * FINTEP - CHECK SPECIFIC POLL ADDRESS * RBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE * * FINTEP EQU * IFT MSV1=0 FINTER EQU * XIF IM RBYTE IFT MSV1=1 FINTER EQU * XIF LD A4,DCTAB GET ADDRESS TO DC:TAB AD* A4,DCTAB ADDRESS TO END OF DC:TAB FINT10 SUK A4,2 LDK A3,0 DEFAULT VALUE CW A4,DCTAB END OF TABLE RF(E) FINT20 SUBTERMINAL NOT FOUND LDR* A3,A4 LOAD DWT ADDRESS IFT MSV1=1 AD A3,RBYTE CHOOSE ADDRESS TYPE CCR A2,A3 COMPARE SUBTERMINAL ADDRESS XIF IFT MSV1=0 CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS XIF RB(NE) FINT10 TAKE NEXT TERMINAL FINT20 CM RBYTE ANKL A3,/FFFE RTN A5 * * * POWER ON FUNCTIONS * * DC15ON EQU * IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 XIF IFF CPU852=1 MSR 8,A15 SAVE A1-A8 =1 XIF IFT STAT=1 LDK A5,4 SET DEVICE END LD A1,DCTAB AD* A1,DCTAB GET ADDRESS TO END OF TABLE DRDC05 SUK A1,2 CW A1,DCTAB RF(E) DRDC06 END OF TABLE LDR* A6,A1 GET DWT ADDRESS ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE CF A15,INSSQ INSERT IN STATUS QUEUE RB DRDC05 DRDC06 EQU * XIF LDK A2,/40 ORS A2,DCONOF CF A15,CKMESS LD A2,DCTPGP GET POLL TIMER POINTER RF(NZ) DRDC20 ALREADY STARTED DRDC10 CF A15,SPOTIM START POLL TIMER DRDC20 ABL BRM * * POLL TIME OUT * PTOUT LDKL A5,STB LOAD A5 STACK BASE LDK A2,/40 ST A2,DCONOF INDICATE POLL TIME OUT CF A15,CKMESS CHECK IF STATUS CHANGE CF A15,SPOTIM START POLL TIMER ABL TDISP * * RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED * CPTIM CM DCONOF INDICATE POLLING LDKL A2,-TIMPOL ST* A2,DCTPGP RESTART TIMER CF A15,CKMESS CHECK IF STATUS CHANGE RTN A5 * * START POLL TIMER * SPOTIM CF A15,SETIME START TIMER DATA PTOUT,TIMPOL ST A4,DCTPGP STORE TIMER POINTER ADKL A15,4 ABR* A15 * * START PROCEDURE TIMER * SPTIM EQU * LDR A1,A6 LOAD DWT AS PARAMETER CF A15,SETIME DATA PRTOUT,TIMPRO ST A4,DCTPP SAVE TIMER POINTER RTN A5 * * PROCEDURE TIMEOUT * PRTOUT CM DCTPP LDR A6,A1 RELOAD A6 LDKL A5,STB LOAD STACK BASE CF A5,HALTIN HALT INPUT IF OPEN LD A1,XACK RF(Z) PRT10 ACK NOT EXPECTED CF A5,TRENQ SEND ENQ CF A5,SPTIM START PROCEDURE TIMER PRT10 ABL BRM * * STOP PROCEDURE TIMER * HPTIM LD A1,DCTPP GET TIMER POINTER RF(Z) HPT10 NOT RUNNING CM* DCTPP STOP TIMER CM DCTPP HPT10 RTN A5 IFT CODE=1 * * * CALCULATION OF CRC * * A2 = CHARACTER * A7 = ACCUMULATED CRC * * CRCCAL EQU * ST A1,CRCSAV ST A2,CRCSAV+2 ST A3,CRCSAV+4 LDK A1,8 CRC100 LDR A3,A7 SRL A7,1 XRR A3,A2 SRL A2,1 ANK A3,1 RF(Z) CRC110 XRKL A7,/A001 CRC110 SUK A1,1 RB(NZ) CRC100 LD A1,CRCSAV LD A2,CRCSAV+2 LD A3,CRCSAV+4 RTN A5 CRCSAV RES 3 * * * READ CRC CHARACTERS AND CHECK THEM * CR = (E) IF CRC WAS OK * * RDCRC LDR A6,A7 SAVE CURRENT CRC IM SYNSW DO NOT SKIP SYNCS NOW CF A5,READ READ BYTE 1 LD A8,CRCSAV+2 SAVE IT CF A5,READ READ BYTE 2 CM SYNSW SYNCS CAN BE SKIPPED AGAIN LD A2,CRCSAV+2 SAVE IT SLL A2,8 XRR A2,A8 ADK A5,4 CWR A2,A6 COMPARE RECEIVED WITH COMPUTED ABR* A5 XIF IFT CODE=0 * * RDLRC READ LRC CHARACTER * CR=0 IF LRC OK * RDLRC IM SYNSW CF A5,READP ADK A5,4 LDR A1,A1 RF(NZ) LRCEND ANK A7,/7F LRCEND EQU * CM SYNSW ABR* A5 XIF * * * DEVICE WORK TABLE FOR DCTASK * * DW1500 EQU * TABLE ENTRY DATA 0 CU LINE ADDRESS DATA /8000 STATUS DATA 0 ECB ADDRESS DATA 0 ORDER DATA DC15DC POINTER TO ADDRESS BLOCK DATA 0 TTAB ADDRESS DATA 0 WAIT/ACTIVATE INDICATOR DATA 0 TASK QUEUE * IFT MMUPAG=1 DATA 0 USER ECB ADDRESS DATA DC:ECB MMU ECB ADDRESS XIF * DATA 0 TIMER POINTER DATA 0 WRITE QUEUE OR BUFFER QUEUE DATA 0 STATUS QUEUE (NOT USED BY DC-TASK) DATA 0 RECEIVE MESSAGE QUEUE DATA 0 SIMULATED DEVICE BUFFER ADDRESS DATA 0 CURSOR ADDRESS DATA 0 REQUEST TIMEOUT VALUE DATA 0 EXTRA DEVICE INFO DK5 * IFT MMUPAG=1 DC:ECB EQU * MMU ECB DATA 0,0,0,0,0,0 XIF * * * * DC RECEIVE BUFFER POOL * RLINK EQU RBUFL+RBUFL+8 * DCRBUF EQU * DATA *+2 FREE BUFFER ANCHOR IFF RBUFNR=1 DK3 IFF RBUFNR=2 DATA *+RLINK RES RBUFL+3 IFF RBUFNR=3 DATA *+RLINK RES RBUFL+3 IFF RBUFNR=4 DATA *+RLINK RES RBUFL+3 XIF IFF RBUFNR=1 DK3 DATA *+RLINK RES RBUFL+3 XIF DK3 DATA 0 END OF CHAIN RES RBUFL+3 IFF MMUPAG=0 MMUBUF RES TBUFL+1 MMU WORK BUFFER XIF * * * INTERRUPT LOGGING ROUTINE * * IFF LOGG=0 LOGSST ST A2,SAVE2 ORKL A2,/F000 RF LOG10 LOGOUT ST A2,SAVE2 ORKL A2,/0F00 RF LOG10 LOGIN CWK A2,/FF RF(E) LOGE10 ST A2,SAVE2 LOG10 ST A3,SAVE3 LD A3,LOGPNT STR A2,A3 ADK A3,2 CWK A3,LOGEND RF(L) LOGEXI LDKL A3,LOGSTA LOGEXI ST A3,LOGPNT LD A2,SAVE2 LD A3,SAVE3 LOGE10 RTN A5 * * LOGPNT DATA LOGSTA LOGSTA EQU * RES 300 LOGEND EQU *-4 SAVE2 DATA 0 SAVE3 DATA 0 XIF * * * IFT RCOM=1 ******************************************************* * * L I N C O L * * CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER * ********************************************************** LINCOL EQU * LDR A2,A3 COPY CURSOR ADDRESS SRL A2,6 ANK A2,X'3F' LC A2,LICO:T,A2 ASCII LINE NUMBER CF A5,WRITEP SEND LINE NUMBER LDR A2,A3 ANK A2,X'3F' LC A2,LICO:T,A2 ASCII COLUMN NUMBER CF A5,WRITEP SEND COLUMN NUMBER RTN A5 RETURN * * * * SCANDINAVIAN ALPHABET DB LICO:T EQU * DATA /2041,/4243,/4445,/4647 /00-/07 DATA /4849,/232E,/3C28,/2B21 /08-/0F DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 DATA /5152,/245D,/2A29,/3B5E /18-/1F DATA /2D2F,/5354,/5556,/5758 /20-/27 DATA /595A,/402C,/255F,/3E3F /28-/2F DATA /3031,/3233,/3435,/3637 /30-37 DATA /3839,/3A5B,/5C27,/3D22 /38-3F DE XIF DC:IN DATA DC:TAB+2 DCTAB DATA DC:TAB DC:TAB DATA 2 LENGTH OF DC:TAB DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 DC:END EQU * * * END
0x00000…00034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT DRDC15 9.2DK 6 82-10-04 870105040924 «, t00=0x0000, t01=0x0004}
0x00034…0005a Head {h00=0x0022, h01=0x0050, text=» DK7,READ-MODIFIED, MODIFIED«, t00=0x0000, t01=0x0038}
0x0005a…0006e Head {h00=0x0010, h01=0x0050, text=» 82-10-02 «, t00=0x0000, t01=0x005e}
0x0006e…0008c Head {h00=0x001a, h01=0x0050, text=» DK6, READ MODIFIED «, t00=0x0000, t01=0x0072}
0x0008c…000bc Head {h00=0x002c, h01=0x0050, text=» DK5, LP, DWTINF, ST.PR.BIT, 81-11-05 «, t00=0x0000, t01=0x0090}
0x000bc…000c4 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x00c0}
0x000c4…000e4 Head {h00=0x001c, h01=0x0050, text=» DK3, RBUFNR=1 ALLOWED«, t00=0x0000, t01=0x00c8}
0x000e4…000fa Head {h00=0x0012, h01=0x0050, text=» DK2, TBUFL «, t00=0x0000, t01=0x00e8}
0x000fa…0010e Head {h00=0x0010, h01=0x0050, text=» 80-03-11 «, t00=0x0000, t01=0x00fe}
0x0010e…00142 Head {h00=0x0030, h01=0x0050, text=» DK, COND.ASM., TIMPRO, TIMNAK, READ BUF. «, t00=0x0000, t01=0x0112}
0x00142…00156 Head {h00=0x0010, h01=0x0050, text=» 80-03-11 «, t00=0x0000, t01=0x0146}
0x00156…00172 Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-08-16 «, t00=0x0000, t01=0x015a}
0x00172…00196 Head {h00=0x0020, h01=0x0050, text=» =8, ASCII-MODE FOR SALCUZ«, t00=0x0000, t01=0x0176}
0x00196…001b2 Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-07-19 «, t00=0x0001, t01=0x000a}
0x001b2…001dc Head {h00=0x0026, h01=0x0050, text=» =7, ACK IN CONVERSATIONAL MODE «, t00=0x0001, t01=0x0026}
0x001dc…001f8 Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-07-19 «, t00=0x0001, t01=0x0050}
0x001f8…00226 Head {h00=0x002a, h01=0x0050, text=» =6, DCTASK BUFFER ADDRESS DESTROYED«, t00=0x0001, t01=0x006c}
0x00226…00242 Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-05-23 «, t00=0x0001, t01=0x009a}
0x00242…0026a Head {h00=0x0024, h01=0x0050, text=» =5, INCOMPLETE POLL SEQUENCE «, t00=0x0001, t01=0x00b6}
0x0026a…00286 Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-05-23 «, t00=0x0001, t01=0x00de}
0x00286…002a8 Head {h00=0x001e, h01=0x0050, text=» =3, TRANSFER PARAMETER «, t00=0x0001, t01=0x00fa}
0x002a8…002c4 Head {h00=0x0018, h01=0x0050, text=» PRR 9.1 79-04-06 «, t00=0x0001, t01=0x011c}
0x002c4…002e4 Head {h00=0x001c, h01=0x0050, text=» =4, ANY MESSAGE ORDER«, t00=0x0001, t01=0x0138}
0x002e4…00300 Head {h00=0x0018, h01=0x0050, text=» PRR 9.1 79-04-06 «, t00=0x0001, t01=0x0158}
0x00300…0031e Head {h00=0x001a, h01=0x0050, text=» =2, ABORT HANDLING «, t00=0x0001, t01=0x0174}
0x0031e…0033a (2, 0, 398) Head {h00=0x0018, h01=0x0050, text=» PRR 9.1 78-11-29 «, t00=0x0002, t01=0x0004}
0x0033a…00358 Head {h00=0x001a, h01=0x0050, text=» =1, MSR-INSTRUCTION«, t00=0x0002, t01=0x0020}
0x00358…00374 Head {h00=0x0018, h01=0x0050, text=» PRR 9.1 78-11-14 «, t00=0x0002, t01=0x003e}
0x00374…00390 Head {h00=0x0018, h01=0x0050, text=» REL 8.2 78-11-14 «, t00=0x0002, t01=0x005a}
0x00390…00398 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x0076}
0x00398…003a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x007e}
0x003a2…003ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0088}
0x003ac…003e2 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x0092}
0x003e2…003ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c8}
0x003ec…00414 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0002, t01=0x00d2}
0x00414…0041e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fa}
0x0041e…0044c Head {h00=0x002a, h01=0x0050, text=»* DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0002, t01=0x0104}
0x0044c…0047e Head {h00=0x002e, h01=0x0050, text=»* BSC MULTIPOINT LINE PROCEDURE «, t00=0x0002, t01=0x0132}
0x0047e…004a2 Head {h00=0x0020, h01=0x0050, text=»* OR SIEMENS MSV1 «, t00=0x0002, t01=0x0164}
0x004a2…004ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0188}
0x004ac…004b6 (3, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0004}
0x004b6…004c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x000e}
0x004c0…004ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0018}
0x004ca…004d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0022}
0x004d4…00510 Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0003, t01=0x002c}
0x00510…0051a Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0003, t01=0x0068}
0x0051a…00524 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0072}
0x00524…0052e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x007c}
0x0052e…00544 Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0003, t01=0x0086}
0x00544…0054e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x009c}
0x0054e…00584 Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0003, t01=0x00a6}
0x00584…005aa Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0003, t01=0x00dc}
0x005aa…005d0 Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0003, t01=0x0102}
0x005d0…005f6 Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0003, t01=0x0128}
0x005f6…0061c Head {h00=0x0022, h01=0x0050, text=» ENTRY DW1500 DWT FOR DC TASK «, t00=0x0003, t01=0x014e}
0x0061c…00626 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0174}
0x00626…00630 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x017e}
0x00630…0064e Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0003, t01=0x0188}
0x0064e…00658 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0016}
0x00658…00662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0020}
0x00662…00688 Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0004, t01=0x002a}
0x00688…006b4 Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0004, t01=0x0050}
0x006b4…006dc Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0004, t01=0x007c}
0x006dc…00700 Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0004, t01=0x00a4}
0x00700…00720 Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0004, t01=0x00c8}
0x00720…00740 Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0004, t01=0x00e8}
0x00740…0075e Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0004, t01=0x0108}
0x0075e…0077c Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0004, t01=0x0126}
0x0077c…007aa Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x0144}
0x007aa…007d6 Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0004, t01=0x0172}
0x007d6…00802 Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0005, t01=0x000e}
0x00802…0082a Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0005, t01=0x003a}
0x0082a…00854 Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0005, t01=0x0062}
0x00854…0087e Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0005, t01=0x008c}
0x0087e…008a2 Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0005, t01=0x00b6}
0x008a2…008c8 Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBCW ECB CONTROL WORD «, t00=0x0005, t01=0x00da}
0x008c8…008f6 Head {h00=0x002a, h01=0x0050, text=» EXTRN DC:MIN MOVE DATA TO USER BUFFER«, t00=0x0005, t01=0x0100}
0x008f6…00926 Head {h00=0x002c, h01=0x0050, text=» EXTRN DC:MOT MOVE DATA FROM USER BUFFER«, t00=0x0005, t01=0x012e}
0x00926…0095a Head {h00=0x0030, h01=0x0050, text=» EXTRN DISEND COMPLETE REQUEST AND DISPATCH «, t00=0x0005, t01=0x015e}
0x0095a…00964 (6, 0, 398) Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0006, t01=0x0004}
0x00964…0096e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x000e}
0x0096e…00978 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0018}
0x00978…00982 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0022}
0x00982…0098c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x002c}
0x0098c…009c6 Head {h00=0x0036, h01=0x0050, text=»* STANDARD INTERFACE PART FOR DATA COMMUNICATION«, t00=0x0006, t01=0x0036}
0x009c6…009d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0070}
0x009d0…009da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x007a}
0x009da…009e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0084}
0x009e4…009ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x008e}
0x009ee…00a04 Head {h00=0x0012, h01=0x0050, text=»* DWT CONTENTS«, t00=0x0006, t01=0x0098}
0x00a04…00a0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ae}
0x00a0e…00a5c Head {h00=0x004a, h01=0x0050, text=»* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)«, t00=0x0006, t01=0x00b8}
0x00a5c…00a66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0106}
0x00a66…00a70 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0006, t01=0x0110}
0x00a70…00ab0 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0006, t01=0x011a}
0x00ab0…00aba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x015a}
0x00aba…00ae8 Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0006, t01=0x0164}
0x00ae8…00af2 (7, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0004}
0x00af2…00b1e Head {h00=0x0028, h01=0x0050, text=»XRVI EQU /5C STANDARD:/40, DK:/5C DK«, t00=0x0007, t01=0x000e}
0x00b1e…00b4c Head {h00=0x002a, h01=0x0050, text=»X:D EQU 0 BASE FOR RBUFL AND TBUFL DK «, t00=0x0007, t01=0x003a}
0x00b4c…00b72 Head {h00=0x0022, h01=0x0050, text=»X:X EQU 500 VALUE FOR BASE DK «, t00=0x0007, t01=0x0068}
0x00b72…00b9c Head {h00=0x0026, h01=0x0050, text=»X:A EQU 2000 RECEIVE BUFFER LENGTH«, t00=0x0007, t01=0x008e}
0x00b9c…00bba Head {h00=0x001a, h01=0x0050, text=»RBUFL EQU 650+X:X DK «, t00=0x0007, t01=0x00b8}
0x00bba…00bde Head {h00=0x0020, h01=0x0050, text=»X:B EQU /60 DCTASK FILE CODE«, t00=0x0007, t01=0x00d6}
0x00bde…00bf4 Head {h00=0x0012, h01=0x0050, text=»DC15FC EQU /60«, t00=0x0007, t01=0x00fa}
0x00bf4…00c1c Head {h00=0x0024, h01=0x0050, text=»X:C EQU 1 IF 1 INTERRUPT LOGGING«, t00=0x0007, t01=0x0110}
0x00c1c…00c2e Head {h00=0x000e, h01=0x0050, text=»LOGG EQU 0«, t00=0x0007, t01=0x0138}
0x00c2e…00c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x014a}
0x00c38…00c66 Head {h00=0x002a, h01=0x0050, text=»TIMPOL EQU 600 POLL TIMEOUT VALUE DK «, t00=0x0007, t01=0x0154}
0x00c66…00c94 Head {h00=0x002a, h01=0x0050, text=»X:E EQU 1 STATUS AND RVI HANDLING IF=1«, t00=0x0007, t01=0x0182}
0x00c94…00ca8 Head {h00=0x0010, h01=0x0050, text=»STAT EQU X:E«, t00=0x0008, t01=0x0020}
0x00ca8…00cd4 Head {h00=0x0028, h01=0x0050, text=»X:F EQU 1 READ COMMAND HANDLING IF=1«, t00=0x0008, t01=0x0034}
0x00cd4…00ce8 Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:F«, t00=0x0008, t01=0x0060}
0x00ce8…00d12 Head {h00=0x0026, h01=0x0050, text=»X:G EQU 252 TRANSMIT BLOCK LENGTH «, t00=0x0008, t01=0x0074}
0x00d12…00d28 Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU X:G «, t00=0x0008, t01=0x009e}
0x00d28…00d54 Head {h00=0x0028, h01=0x0050, text=»X:H EQU 1 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0008, t01=0x00b4}
0x00d54…00d68 Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:H«, t00=0x0008, t01=0x00e0}
0x00d68…00d96 Head {h00=0x002a, h01=0x0050, text=»X:I EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0008, t01=0x00f4}
0x00d96…00dac Head {h00=0x0012, h01=0x0050, text=»SPECP EQU X:I «, t00=0x0008, t01=0x0122}
0x00dac…00ddc Head {h00=0x002c, h01=0x0050, text=»X:J EQU 1 IF = 1 LINE SPEED SET TO HIGH«, t00=0x0008, t01=0x0138}
0x00ddc…00e08 Head {h00=0x0028, h01=0x0050, text=» IF = 0 LINE SPEED IS SET TO LOW «, t00=0x0008, t01=0x0168}
0x00e08…00e1e (9, 0, 400) Head {h00=0x0012, h01=0x0050, text=»SPEED EQU X:J «, t00=0x0009, t01=0x0004}
0x00e1e…00e4c Head {h00=0x002a, h01=0x0050, text=»X:K EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x0009, t01=0x001a}
0x00e4c…00e60 Head {h00=0x0010, h01=0x0050, text=»MSV1 EQU X:K«, t00=0x0009, t01=0x0048}
0x00e60…00e92 Head {h00=0x002e, h01=0x0050, text=»X:L EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x0009, t01=0x005c}
0x00e92…00ea6 Head {h00=0x0010, h01=0x0050, text=»RBUFNR EQU 2«, t00=0x0009, t01=0x008e}
0x00ea6…00ed2 Head {h00=0x0028, h01=0x0050, text=»X:M EQU 0 IF = 1 PTS 6805 ADAPTION «, t00=0x0009, t01=0x00a2}
0x00ed2…00ee8 Head {h00=0x0012, h01=0x0050, text=»P6805 EQU X:M «, t00=0x0009, t01=0x00ce}
0x00ee8…00efc Head {h00=0x0010, h01=0x0050, text=»X:N EQU /02 «, t00=0x0009, t01=0x00e4}
0x00efc…00f10 Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0009, t01=0x00f8}
0x00f10…00f40 Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU X:N DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x010c}
0x00f40…00f4c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x013c}
0x00f4c…00f60 Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0009, t01=0x0148}
0x00f60…00f90 Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x015c}
0x00f90…00f9c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x018c}
0x00f9c…00fae Head {h00=0x000e, h01=0x0050, text=»X:O EQU 0 «, t00=0x000a, t01=0x0008}
0x00fae…00fe0 Head {h00=0x002e, h01=0x0050, text=»IBMCHR EQU X:O IF 1 IBM CHARACTER HANDLING«, t00=0x000a, t01=0x001a}
0x00fe0…01012 Head {h00=0x002e, h01=0x0050, text=»X:P EQU 0 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x000a, t01=0x004c}
0x01012…01028 Head {h00=0x0012, h01=0x0050, text=»MESPAS EQU X:P«, t00=0x000a, t01=0x007e}
0x01028…01060 Head {h00=0x0034, h01=0x0050, text=»X:Q EQU 1 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x000a, t01=0x0094}
0x01060…01076 Head {h00=0x0012, h01=0x0050, text=»EM3270 EQU X:Q«, t00=0x000a, t01=0x00cc}
0x01076…0108a Head {h00=0x0010, h01=0x0050, text=»X:R EQU 1000«, t00=0x000a, t01=0x00e2}
0x0108a…0109a Head {h00=0x000c, h01=0x0050, text=» DK2 «, t00=0x000a, t01=0x00f6}
0x0109a…010c8 Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x000a, t01=0x0106}
0x010c8…010fa Head {h00=0x002e, h01=0x0050, text=»TSTREQ EQU X:I IF 1 TEST REQUEST HANDLING «, t00=0x000a, t01=0x0134}
0x010fa…0112a Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 1 SPECIAL CONDITION FOR DENMARK«, t00=0x000a, t01=0x0166}
0x0112a…01162 Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x000b, t01=0x0008}
0x01162…01196 Head {h00=0x0030, h01=0x0050, text=» DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000b, t01=0x0040}
0x01196…011ca Head {h00=0x0030, h01=0x0050, text=» SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000b, t01=0x0074}
0x011ca…011fa Head {h00=0x002c, h01=0x0050, text=» ONLY WORKING IF STAT IS SET TO "ONE".«, t00=0x000b, t01=0x00a8}
0x011fa…01210 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=0 «, t00=0x000b, t01=0x00d8}
0x01210…0124a Head {h00=0x0036, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER «, t00=0x000b, t01=0x00ee}
0x0124a…01258 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x000b, t01=0x0128}
0x01258…0126c Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x0136}
0x0126c…012a6 Head {h00=0x0036, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER «, t00=0x000b, t01=0x014a}
0x012a6…012b4 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x000b, t01=0x0184}
0x012b4…012be (12, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0004}
0x012be…012c8 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x000c, t01=0x000e}
0x012c8…012d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0018}
0x012d2…012dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0022}
0x012dc…0130e Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x002c}
0x0130e…01318 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x005e}
0x01318…01336 Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000c, t01=0x0068}
0x01336…01340 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0086}
0x01340…01372 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x0090}
0x01372…0137c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00c2}
0x0137c…013ae Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000c, t01=0x00cc}
0x013ae…013dc Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000c, t01=0x00fe}
0x013dc…013e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x012c}
0x013e6…013fa Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000c, t01=0x0136}
0x013fa…01404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x014a}
0x01404…01412 Head {h00=0x000a, h01=0x0050, text=» DB«, t00=0x000c, t01=0x0154}
0x01412…0142c Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=0 DK2«, t00=0x000c, t01=0x0162}
0x0142c…01444 Head {h00=0x0014, h01=0x0050, text=»TBUFL EQU 0 DK2«, t00=0x000c, t01=0x017c}
0x01444…01456 (13, 0, 400) Head {h00=0x000e, h01=0x0050, text=» XIF DK2«, t00=0x000d, t01=0x0004}
0x01456…01460 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0016}
0x01460…0147a Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=1 DK2«, t00=0x000d, t01=0x0020}
0x0147a…014a8 Head {h00=0x002a, h01=0x0050, text=»TBUFL EQU 650+X:X MMU BUFFER LENGTH DK«, t00=0x000d, t01=0x003a}
0x014a8…014ba Head {h00=0x000e, h01=0x0050, text=» XIF DK2«, t00=0x000d, t01=0x0068}
0x014ba…014c8 Head {h00=0x000a, h01=0x0050, text=» DE«, t00=0x000d, t01=0x007a}
0x014c8…014d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0088}
0x014d2…0150c Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000d, t01=0x0092}
0x0150c…0153e Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000d, t01=0x00cc}
0x0153e…01548 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00fe}
0x01548…0155c Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000d, t01=0x0108}
0x0155c…01566 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x011c}
0x01566…0159c Head {h00=0x0032, h01=0x0050, text=»DEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION «, t00=0x000d, t01=0x0126}
0x0159c…015ca Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE«, t00=0x000d, t01=0x015c}
0x015ca…015d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x018a}
0x015d4…015de (14, 0, 400) Head {h00=0x0006, h01=0x0050, text=» «, t00=0x000e, t01=0x0004}
0x015de…015e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x000e}
0x015e8…01604 Head {h00=0x0018, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x000e, t01=0x0018}
0x01604…0160e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0034}
0x0160e…01642 Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000e, t01=0x003e}
0x01642…0164c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0072}
0x0164c…01662 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000e, t01=0x007c}
0x01662…0167a Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x000e, t01=0x0092}
0x0167a…01686 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x00aa}
0x01686…01690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00b6}
0x01690…016a6 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000e, t01=0x00c0}
0x016a6…016c0 Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x000e, t01=0x00d6}
0x016c0…016cc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x00f0}
0x016cc…016d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00fc}
0x016d6…0170e Head {h00=0x0034, h01=0x0050, text=»DWTTP EQU START+/00 TIMER POINTER ORDER PROCESS «, t00=0x000e, t01=0x0106}
0x0170e…01740 Head {h00=0x002e, h01=0x0050, text=»DWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE«, t00=0x000e, t01=0x013e}
0x01740…01768 Head {h00=0x0024, h01=0x0050, text=»DWTSQ EQU START+/04 STATUS QUEUE«, t00=0x000e, t01=0x0170}
0x01768…01792 Head {h00=0x0026, h01=0x0050, text=»DWTRQ EQU START+/06 RECEIVE QUEUE «, t00=0x000f, t01=0x0008}
0x01792…017c4 Head {h00=0x002e, h01=0x0050, text=»DWTBUF EQU START+/08 DEVICE BUFFER ADDRESS«, t00=0x000f, t01=0x0032}
0x017c4…017f0 Head {h00=0x0028, h01=0x0050, text=»DWTCUR EQU START+/0A CURSOR ADDRESS «, t00=0x000f, t01=0x0064}
0x017f0…01820 Head {h00=0x002c, h01=0x0050, text=»DWTTIM EQU START+/0C REQUEST TIMER VALUE«, t00=0x000f, t01=0x0090}
0x01820…01852 Head {h00=0x002e, h01=0x0050, text=»DWTINF EQU START+/0E DEVICE INFO, 1=LP DK5«, t00=0x000f, t01=0x00c0}
0x01852…0185c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00f2}
0x0185c…01866 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x000f, t01=0x00fc}
0x01866…01870 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0106}
0x01870…0188a Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x000f, t01=0x0110}
0x0188a…01894 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x012a}
0x01894…0189e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0134}
0x0189e…018a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x013e}
0x018a8…018ba Head {h00=0x000e, h01=0x0050, text=»* A7=ORDER«, t00=0x000f, t01=0x0148}
0x018ba…018c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x015a}
0x018c4…018d8 Head {h00=0x0010, h01=0x0050, text=»* /02: READ «, t00=0x000f, t01=0x0164}
0x018d8…018ec Head {h00=0x0010, h01=0x0050, text=»* /06: WRITE«, t00=0x000f, t01=0x0178}
0x018ec…01910 Head {h00=0x0020, h01=0x0050, text=»* /31: TRANSFER DWTINF DK5 «, t00=0x000f, t01=0x018c}
0x01910…01936 Head {h00=0x0022, h01=0x0050, text=»* /33: READ MODIFIED RESPONSE «, t00=0x0010, t01=0x0020}
0x01936…01958 Head {h00=0x001e, h01=0x0050, text=»* /37: TRANSFER PARAMETERS«, t00=0x0010, t01=0x0046}
0x01958…01972 Head {h00=0x0016, h01=0x0050, text=»* /38: SET STATUS «, t00=0x0010, t01=0x0068}
0x01972…0199a Head {h00=0x0024, h01=0x0050, text=»* /39: SET REQUEST TIMEOUT VALUE«, t00=0x0010, t01=0x0082}
0x0199a…019a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00aa}
0x019a4…019ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b4}
0x019ae…019d0 Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x0010, t01=0x00be}
0x019d0…019da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00e0}
0x019da…019e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ea}
0x019e4…01a0e Head {h00=0x0026, h01=0x0050, text=»DCONOF DATA 0 ON- / OFFLINESWITCH «, t00=0x0010, t01=0x00f4}
0x01a0e…01a3c Head {h00=0x002a, h01=0x0050, text=»DCSTOL DATA 0 OLD DC EQUIPMENT STATUS «, t00=0x0010, t01=0x011e}
0x01a3c…01a60 Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x0010, t01=0x014c}
0x01a60…01a88 Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x0010, t01=0x0170}
0x01a88…01ab8 Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x0011, t01=0x0008}
0x01ab8…01ac2 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0011, t01=0x0038}
0x01ac2…01acc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0042}
0x01acc…01aec Head {h00=0x001c, h01=0x0050, text=»* DC TASK ADDRESS BLOCK «, t00=0x0011, t01=0x004c}
0x01aec…01af6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x006c}
0x01af6…01b1e Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDICATES NO MMU BUFFER «, t00=0x0011, t01=0x0076}
0x01b1e…01b40 Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0011, t01=0x009e}
0x01b40…01b6e Head {h00=0x002a, h01=0x0050, text=»DC15DC DATA DCACTD ACTIVATION ADDRESS «, t00=0x0011, t01=0x00c0}
0x01b6e…01b98 Head {h00=0x0026, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ADDRESS «, t00=0x0011, t01=0x00ee}
0x01b98…01bc0 Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0011, t01=0x0118}
0x01bc0…01bca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0140}
0x01bca…01be8 Head {h00=0x001a, h01=0x0050, text=»* DRIVER ADDRESS BLOCK«, t00=0x0011, t01=0x014a}
0x01be8…01bf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0168}
0x01bf2…01c16 Head {h00=0x0020, h01=0x0050, text=» DATA BUFLEN MMU BUFFER SIZE«, t00=0x0011, t01=0x0172}
0x01c16…01c38 Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0012, t01=0x0008}
0x01c38…01c64 Head {h00=0x0028, h01=0x0050, text=»DC15AD DATA DCACT ACTIVATION ADDRESS«, t00=0x0012, t01=0x002a}
0x01c64…01c9c Head {h00=0x0034, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ABORT ROUTINE ADDRESS «, t00=0x0012, t01=0x0056}
0x01c9c…01cc4 Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0012, t01=0x008e}
0x01cc4…01cce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00b6}
0x01cce…01cfe Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x0012, t01=0x00c0}
0x01cfe…01d10 Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x0012, t01=0x00f0}
0x01d10…01d36 Head {h00=0x0022, h01=0x0050, text=» RES 1 AND FOR TRANSFER PARAM «, t00=0x0012, t01=0x0102}
0x01d36…01d48 Head {h00=0x000e, h01=0x0050, text=»STB2 RES 1«, t00=0x0012, t01=0x0128}
0x01d48…01d50 Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x013a}
0x01d50…01d64 Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x0012, t01=0x0142}
0x01d64…01d7c Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x0012, t01=0x0156}
0x01d7c…01d88 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x016e}
0x01d88…01d9c Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x0012, t01=0x017a}
0x01d9c…01db0 Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x0012, t01=0x018e}
0x01db0…01dbc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0012}
0x01dbc…01dc6 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0013, t01=0x001e}
0x01dc6…01dd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0028}
0x01dd0…01dda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0032}
0x01dda…01e02 Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x0013, t01=0x003c}
0x01e02…01e0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0064}
0x01e0c…01e20 Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x0013, t01=0x006e}
0x01e20…01e44 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x0013, t01=0x0082}
0x01e44…01e5e Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1 =4 «, t00=0x0013, t01=0x00a6}
0x01e5e…01e74 Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7 =4«, t00=0x0013, t01=0x00c0}
0x01e74…01e9e Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0013, t01=0x00d6}
0x01e9e…01eaa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0100}
0x01eaa…01ebe Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0013, t01=0x010c}
0x01ebe…01ee0 Head {h00=0x001e, h01=0x0050, text=» ABL(Z) DCRD READ SPECIFIC«, t00=0x0013, t01=0x0120}
0x01ee0…01ef8 Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x0013, t01=0x0142}
0x01ef8…01f0c Head {h00=0x0010, h01=0x0050, text=» RF(Z) DCWR «, t00=0x0013, t01=0x015a}
0x01f0c…01f28 Head {h00=0x0018, h01=0x0050, text=» SUK A7,/31-/06 DK5«, t00=0x0013, t01=0x016e}
0x01f28…01f50 Head {h00=0x0024, h01=0x0050, text=» RF(Z) TRINF TRANSFER DWTINF DK5«, t00=0x0013, t01=0x018a}
0x01f50…01f6c Head {h00=0x0018, h01=0x0050, text=» SUK A7,/33-/31 DK7«, t00=0x0014, t01=0x0022}
0x01f6c…01f9c Head {h00=0x002c, h01=0x0050, text=» RF(E) RESTRM RESPONSE TO READ MODIFIED «, t00=0x0014, t01=0x003e}
0x01f9c…01fb8 Head {h00=0x0018, h01=0x0050, text=» SUK A7,/37-/33 DK5«, t00=0x0014, t01=0x006e}
0x01fb8…01fe0 Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCTP TRANSFER PARAMETERS «, t00=0x0014, t01=0x008a}
0x01fe0…01ff4 Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0014, t01=0x00b2}
0x01ff4…0200c Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/37 «, t00=0x0014, t01=0x00c6}
0x0200c…02030 Head {h00=0x0020, h01=0x0050, text=» ABL(Z) DCSS SET STATUS DK4 «, t00=0x0014, t01=0x00de}
0x02030…02048 Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/38 «, t00=0x0014, t01=0x0102}
0x02048…02070 Head {h00=0x0024, h01=0x0050, text=» ABL(Z) REQTIM SET REQUEST TIMER«, t00=0x0014, t01=0x011a}
0x02070…0207c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0142}
0x0207c…02084 Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x014e}
0x02084…02098 Head {h00=0x0010, h01=0x0050, text=» IFT STAT=0 «, t00=0x0014, t01=0x0156}
0x02098…020b0 Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/37 «, t00=0x0014, t01=0x016a}
0x020b0…020d8 Head {h00=0x0024, h01=0x0050, text=» RF(Z) REQTIM SET REQUEST TIMER «, t00=0x0014, t01=0x0182}
0x020d8…020e4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x001a}
0x020e4…020f6 Head {h00=0x000e, h01=0x0050, text=» RF DCA100«, t00=0x0015, t01=0x0026}
0x020f6…02100 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0015, t01=0x0038}
0x02100…0210a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0042}
0x0210a…02114 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x004c}
0x02114…02134 Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION FROM DCTASK«, t00=0x0015, t01=0x0056}
0x02134…0213e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0076}
0x0213e…02148 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0080}
0x02148…0215c Head {h00=0x0010, h01=0x0050, text=»DCACTD EQU *«, t00=0x0015, t01=0x008a}
0x0215c…02184 Head {h00=0x0024, h01=0x0050, text=» SUR A1,A1 PRESET RETURN CODE =4«, t00=0x0015, t01=0x009e}
0x02184…0219e Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1 =4 «, t00=0x0015, t01=0x00c6}
0x0219e…021b4 Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7 =4«, t00=0x0015, t01=0x00e0}
0x021b4…021de Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0015, t01=0x00f6}
0x021de…021ea Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0120}
0x021ea…021fe Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0015, t01=0x012c}
0x021fe…02218 Head {h00=0x0016, h01=0x0050, text=» RF(E) DCRDDC READ«, t00=0x0015, t01=0x0140}
0x02218…02230 Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/02 «, t00=0x0015, t01=0x015a}
0x02230…02258 Head {h00=0x0024, h01=0x0050, text=» RF(E) DCTP TRANSFER PARAMETERS «, t00=0x0015, t01=0x0172}
0x02258…02260 Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x000a}
0x02260…02282 Head {h00=0x001e, h01=0x0050, text=»DCA100 EQU * REQUEST ERROR«, t00=0x0016, t01=0x0012}
0x02282…022a4 Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE INVALID ORDER «, t00=0x0016, t01=0x0034}
0x022a4…022ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0056}
0x022ae…022b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0060}
0x022b8…022d2 Head {h00=0x0016, h01=0x0050, text=»* READ FROM DCTASK«, t00=0x0016, t01=0x006a}
0x022d2…022dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0084}
0x022dc…022e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x008e}
0x022e6…02304 Head {h00=0x001a, h01=0x0050, text=»* REQUEST FROM DC-TASK«, t00=0x0016, t01=0x0098}
0x02304…0231c Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0016, t01=0x00b6}
0x0231c…02346 Head {h00=0x0026, h01=0x0050, text=»* STATUS CHANGE ON DC EQUIPMENT «, t00=0x0016, t01=0x00ce}
0x02346…0236e Head {h00=0x0024, h01=0x0050, text=»* SPONTANOUS MESSAGE RECEPTION«, t00=0x0016, t01=0x00f8}
0x0236e…02378 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0120}
0x02378…0238c Head {h00=0x0010, h01=0x0050, text=»DCRDDC EQU *«, t00=0x0016, t01=0x012a}
0x0238c…023bc Head {h00=0x002c, h01=0x0050, text=» CF A15,CKMESS CHECK IF MESSAGE RECEIVED«, t00=0x0016, t01=0x013e}
0x023bc…023d0 Head {h00=0x0010, h01=0x0050, text=»DCRTN EQU * «, t00=0x0016, t01=0x016e}
0x023d0…023f4 Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0016, t01=0x0182}
0x023f4…0240e Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1 =4 «, t00=0x0017, t01=0x0016}
0x0240e…02418 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0017, t01=0x0030}
0x02418…0244a Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0017, t01=0x003a}
0x0244a…02454 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x006c}
0x02454…02472 Head {h00=0x001a, h01=0x0050, text=»* ANY MESSAGE ORDER «, t00=0x0017, t01=0x0076}
0x02472…0247c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0094}
0x0247c…024a2 Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x0017, t01=0x009e}
0x024a2…024aa Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x00c4}
0x024aa…024e0 Head {h00=0x0032, h01=0x0050, text=»ANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4«, t00=0x0017, t01=0x00cc}
0x024e0…024fe Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCRD10 NO!! =4 «, t00=0x0017, t01=0x0102}
0x024fe…0252a Head {h00=0x0028, h01=0x0050, text=» RF ENDIO YES!! COMPLETE REQUEST =4 «, t00=0x0017, t01=0x0120}
0x0252a…02536 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x014c}
0x02536…02540 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0017, t01=0x0158}
0x02540…0254a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0162}
0x0254a…02568 Head {h00=0x001a, h01=0x0050, text=»* TRANSFER DWTINF DK5«, t00=0x0017, t01=0x016c}
0x02568…02578 Head {h00=0x000c, h01=0x0050, text=»* DK5«, t00=0x0017, t01=0x018a}
0x02578…02590 Head {h00=0x0014, h01=0x0050, text=»TRINF EQU * DK5«, t00=0x0018, t01=0x000a}
0x02590…025b4 Head {h00=0x0020, h01=0x0050, text=» LD A2,ECBCW,A8 GET INFO DK5«, t00=0x0018, t01=0x0022}
0x025b4…025de Head {h00=0x0026, h01=0x0050, text=» ORS A2,DWTINF,A6 OR AND STORE DK5«, t00=0x0018, t01=0x0046}
0x025de…02604 Head {h00=0x0022, h01=0x0050, text=» RF ENDIO COMPLETE REQUEST DK5«, t00=0x0018, t01=0x0070}
0x02604…0260e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0096}
0x0260e…02632 Head {h00=0x0020, h01=0x0050, text=»* RESPONSE TO READ MODIFIED«, t00=0x0018, t01=0x00a0}
0x02632…0263c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00c4}
0x0263c…02656 Head {h00=0x0016, h01=0x0050, text=»RESTRM EQU * DK7 «, t00=0x0018, t01=0x00ce}
0x02656…0268e Head {h00=0x0034, h01=0x0050, text=» LD A1,DWTINF,A6 WAS READ MODIFIED RECEIVED? DK7«, t00=0x0018, t01=0x00e8}
0x0268e…026aa Head {h00=0x0018, h01=0x0050, text=» ANKL A1,/0002 DK7 «, t00=0x0018, t01=0x0120}
0x026aa…026d6 Head {h00=0x0028, h01=0x0050, text=» ABL(Z) DISIOE NO, REQUEST ERROR DK7«, t00=0x0018, t01=0x013c}
0x026d6…02704 Head {h00=0x002a, h01=0x0050, text=» RF DCWR TREAT ALMOST AS WRITE REQUEST«, t00=0x0018, t01=0x0168}
0x02704…02716 Head {h00=0x000e, h01=0x0050, text=» EJECT «, t00=0x0019, t01=0x0008}
0x02716…02726 Head {h00=0x000c, h01=0x0050, text=»* DK5«, t00=0x0019, t01=0x001a}
0x02726…02730 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x002a}
0x02730…0274e Head {h00=0x001a, h01=0x0050, text=»* TRANSFER PARAMETERS «, t00=0x0019, t01=0x0034}
0x0274e…02758 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0052}
0x02758…02762 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x005c}
0x02762…027a4 Head {h00=0x003e, h01=0x0050, text=»* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS«, t00=0x0019, t01=0x0066}
0x027a4…027e2 Head {h00=0x003a, h01=0x0050, text=»* FROM TERMINALS: TRANSFER TERMINAL ADDRESSES «, t00=0x0019, t01=0x00a8}
0x027e2…027ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00e6}
0x027ec…027f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00f0}
0x027f6…0280a Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0019, t01=0x00fa}
0x0280a…02834 Head {h00=0x0026, h01=0x0050, text=»DCTP LD A2,ECBCW,A8 GET PARAMETER «, t00=0x0019, t01=0x010e}
0x02834…02840 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0138}
0x02840…02854 Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0019, t01=0x0144}
0x02854…0287e Head {h00=0x0026, h01=0x0050, text=»DCTP LC A2,ECBCW,A8 GET TCS IF ANY«, t00=0x0019, t01=0x0158}
0x0287e…02892 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0019, t01=0x0182}
0x02892…028a8 Head {h00=0x0012, h01=0x0050, text=» RF(Z) DCTP10 «, t00=0x001a, t01=0x0008}
0x028a8…028d4 Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x001a, t01=0x001e}
0x028d4…028e6 Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x001a, t01=0x004a}
0x028e6…028fa Head {h00=0x0010, h01=0x0050, text=»DCTP10 EQU *«, t00=0x001a, t01=0x005c}
0x028fa…02922 Head {h00=0x0024, h01=0x0050, text=» LC A3,ECBCW+1,A8 GET TCP OR DV «, t00=0x001a, t01=0x0070}
0x02922…02936 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x001a, t01=0x0098}
0x02936…02962 Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A3 TRANSLATE TO ASCII «, t00=0x001a, t01=0x00ac}
0x02962…0296e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x00d8}
0x0296e…0299c Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTBUF,A6 SAVE TERM. ADDR. DK4 «, t00=0x001a, t01=0x00e4}
0x0299c…029b2 Head {h00=0x0012, h01=0x0050, text=»DCTP12 EQU * «, t00=0x001a, t01=0x0112}
0x029b2…029e8 Head {h00=0x0032, h01=0x0050, text=» LD A1,DCSTQ CHECK IF THIS DWT IS IN QUEUE DK4«, t00=0x001a, t01=0x0128}
0x029e8…029fe Head {h00=0x0012, h01=0x0050, text=»DCTP14 EQU * «, t00=0x001a, t01=0x015e}
0x029fe…02a2e Head {h00=0x002c, h01=0x0050, text=» RF(Z) DCTP18 NO, END OF/OR NO QUEUE DK4«, t00=0x001a, t01=0x0174}
0x02a2e…02a58 Head {h00=0x0026, h01=0x0050, text=» LDR A3,A6 ADJUST ADDR. VALUE DK4 «, t00=0x001b, t01=0x0014}
0x02a58…02a74 Head {h00=0x0018, h01=0x0050, text=» ADKL A3,DWTSQ DK4 «, t00=0x001b, t01=0x003e}
0x02a74…02aa4 Head {h00=0x002c, h01=0x0050, text=» CWR A1,A3 SOMETHING QUEUED OUR DWT? DK4«, t00=0x001b, t01=0x005a}
0x02aa4…02adc Head {h00=0x0034, h01=0x0050, text=» RF(E) DCTP16 YES, WAIT BEFORE TRANS. PARAM. DK4«, t00=0x001b, t01=0x008a}
0x02adc…02b06 Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A1 NOT OURS, GET NEXT DK4«, t00=0x001b, t01=0x00c2}
0x02b06…02b1e Head {h00=0x0014, h01=0x0050, text=» RB DCTP14 DK4 «, t00=0x001b, t01=0x00ec}
0x02b1e…02b34 Head {h00=0x0012, h01=0x0050, text=»DCTP16 EQU * «, t00=0x001b, t01=0x0104}
0x02b34…02b60 Head {h00=0x0028, h01=0x0050, text=» LDR A1,A6 SAVE DWT AS PARAMETER DK4«, t00=0x001b, t01=0x011a}
0x02b60…02b94 Head {h00=0x0030, h01=0x0050, text=» CF A15,SETIME WAIT UNTIL STATUS IS SENT DK4«, t00=0x001b, t01=0x0146}
0x02b94…02bc0 Head {h00=0x0028, h01=0x0050, text=» DATA TPTOUT,20 DELAY= 2 SECONDS DK4«, t00=0x001b, t01=0x017a}
0x02bc0…02bd6 Head {h00=0x0012, h01=0x0050, text=» RB DCRTN DK4«, t00=0x001c, t01=0x0016}
0x02bd6…02bec Head {h00=0x0012, h01=0x0050, text=»TPTOUT EQU * «, t00=0x001c, t01=0x002c}
0x02bec…02c0e Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 RESTORE DWT DK4«, t00=0x001c, t01=0x0042}
0x02c0e…02c3c Head {h00=0x002a, h01=0x0050, text=» RB DCTP12 LOOK IN THE QUEUE AGAIN DK4«, t00=0x001c, t01=0x0064}
0x02c3c…02c52 Head {h00=0x0012, h01=0x0050, text=»DCTP18 EQU * «, t00=0x001c, t01=0x0092}
0x02c52…02c82 Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTBUF,A6 RESTORE TERM ADDR. DK4 «, t00=0x001c, t01=0x00a8}
0x02c82…02cae Head {h00=0x0028, h01=0x0050, text=» STR A2,A6 SAVE IN FIRST WORD OF DWT«, t00=0x001c, t01=0x00d8}
0x02cae…02cb6 Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0104}
0x02cb6…02cca Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x001c, t01=0x010c}
0x02cca…02d00 Head {h00=0x0032, h01=0x0050, text=» ST A8,DWTBUF,A6 SAVE ECB FOR RD. MODIFIED DK6«, t00=0x001c, t01=0x0120}
0x02d00…02d0c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0156}
0x02d0c…02d32 Head {h00=0x0022, h01=0x0050, text=» CWK A6,DW1500 DCTASK DWT ??? «, t00=0x001c, t01=0x0162}
0x02d32…02d68 Head {h00=0x0032, h01=0x0050, text=» RF(E) DCTP30 YES!!! SHOULD NOT BE IN DC:TAB «, t00=0x001c, t01=0x0188}
0x02d68…02d96 Head {h00=0x002a, h01=0x0050, text=» LD A1,DC:IN GET DC:TAB INPUT POINTER «, t00=0x001d, t01=0x002e}
0x02d96…02dc4 Head {h00=0x002a, h01=0x0050, text=» CWK A1,DC:END TABLE ALREADY FULL ????«, t00=0x001d, t01=0x005c}
0x02dc4…02dee Head {h00=0x0026, h01=0x0050, text=» ABL(E) DISIOE YES!! REQUEST ERROR«, t00=0x001d, t01=0x008a}
0x02dee…02df8 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x001d, t01=0x00b4}
0x02df8…02e00 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00be}
0x02e00…02e08 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00c6}
0x02e08…02e1c Head {h00=0x0010, h01=0x0050, text=»DCTP20 EQU *«, t00=0x001d, t01=0x00ce}
0x02e1c…02e42 Head {h00=0x0022, h01=0x0050, text=» LD A4,DCTAB DC:TAB ADDRESS =3«, t00=0x001d, t01=0x00e2}
0x02e42…02e6a Head {h00=0x0024, h01=0x0050, text=» AD* A4,DCTAB LAST TABLE POS. =3«, t00=0x001d, t01=0x0108}
0x02e6a…02e98 Head {h00=0x002a, h01=0x0050, text=»DCTP22 SUK A4,2 ADDR. TO NEXT ENTRY =3«, t00=0x001d, t01=0x0130}
0x02e98…02ec6 Head {h00=0x002a, h01=0x0050, text=» CW A4,DCTAB ALL ENTRIES CHECKED?? =3 «, t00=0x001d, t01=0x015e}
0x02ec6…02ef4 Head {h00=0x002a, h01=0x0050, text=» RF(E) DCTP25 YES.DWT NOT IN TABLE =3 «, t00=0x001d, t01=0x018c}
0x02ef4…02f16 Head {h00=0x001e, h01=0x0050, text=» CWR* A6,A4 IN TABLE ?? =3«, t00=0x001e, t01=0x002a}
0x02f16…02f34 Head {h00=0x001a, h01=0x0050, text=» RF(E) DCTP30 YES!! =3«, t00=0x001e, t01=0x004c}
0x02f34…02f5a Head {h00=0x0022, h01=0x0050, text=» RB DCTP22 CHECK NEXT ENTRY =3«, t00=0x001e, t01=0x006a}
0x02f5a…02f72 Head {h00=0x0014, h01=0x0050, text=»DCTP25 EQU * =3«, t00=0x001e, t01=0x0090}
0x02f72…02f7a Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x00a8}
0x02f7a…02fa2 Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 INSERT DWT IN DC:TAB «, t00=0x001e, t01=0x00b0}
0x02fa2…02fb4 Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x001e, t01=0x00d8}
0x02fb4…02fe2 Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:IN UPDATE DC:TAB IN POINTER«, t00=0x001e, t01=0x00ea}
0x02fe2…02fea Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x0118}
0x02fea…03018 Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:TAB INCREMENT DC:TAB LENGTH«, t00=0x001e, t01=0x0120}
0x03018…0302c Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x001e, t01=0x014e}
0x0302c…03048 Head {h00=0x0018, h01=0x0050, text=» LDK A1,4 DEVICE END«, t00=0x001e, t01=0x0162}
0x03048…03060 Head {h00=0x0014, h01=0x0050, text=» ORS A1,DWTST,A6«, t00=0x001e, t01=0x017e}
0x03060…0308c Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x001f, t01=0x0008}
0x0308c…03098 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0034}
0x03098…030ac Head {h00=0x0010, h01=0x0050, text=»DCTP30 EQU *«, t00=0x001f, t01=0x0040}
0x030ac…030d0 Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RETURN CODE ::= 0«, t00=0x001f, t01=0x0054}
0x030d0…030e4 Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x001f, t01=0x0078}
0x030e4…0310c Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x001f, t01=0x008c}
0x0310c…0311e Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001f, t01=0x00b4}
0x0311e…03128 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x001f, t01=0x00c6}
0x03128…03132 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00d0}
0x03132…0313c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00da}
0x0313c…0314c Head {h00=0x000c, h01=0x0050, text=»* WRITE «, t00=0x001f, t01=0x00e4}
0x0314c…03156 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00f4}
0x03156…03160 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00fe}
0x03160…03178 Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001f, t01=0x0108}
0x03178…0319a Head {h00=0x001e, h01=0x0050, text=»* SUCCESFUL TRANSMISSION«, t00=0x001f, t01=0x0120}
0x0319a…031ae Head {h00=0x0010, h01=0x0050, text=»* TIME OUT«, t00=0x001f, t01=0x0142}
0x031ae…031b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0156}
0x031b8…031c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0160}
0x031c2…031d4 Head {h00=0x000e, h01=0x0050, text=»DCWR EQU *«, t00=0x001f, t01=0x016a}
0x031d4…031ea Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001f, t01=0x017c}
0x031ea…03212 (32, 0, 398) Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x0020, t01=0x0004}
0x03212…03238 Head {h00=0x0022, h01=0x0050, text=» CWK A1,BUFLEN ILLEGAL LENGTH?«, t00=0x0020, t01=0x002c}
0x03238…03254 Head {h00=0x0018, h01=0x0050, text=» RF(G) IL:LEN YES!! «, t00=0x0020, t01=0x0052}
0x03254…03260 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x006e}
0x03260…03280 Head {h00=0x001c, h01=0x0050, text=» CF A15,TIMEWR SET TIMER«, t00=0x0020, t01=0x007a}
0x03280…032a4 Head {h00=0x0020, h01=0x0050, text=» CF A15,INSWQ QUEUE REQUEST«, t00=0x0020, t01=0x009a}
0x032a4…032da Head {h00=0x0032, h01=0x0050, text=» LD A1,DWTOR,A6 RESPONSE TO READ MODIFIED? DK7«, t00=0x0020, t01=0x00be}
0x032da…032fc Head {h00=0x001e, h01=0x0050, text=» ANK A1,/FF MASK ORDER DK7«, t00=0x0020, t01=0x00f4}
0x032fc…0332a Head {h00=0x002a, h01=0x0050, text=» CWK A1,/0033 READ-MOD. RESPONSE? DK7 «, t00=0x0020, t01=0x0116}
0x0332a…03360 Head {h00=0x0032, h01=0x0050, text=» ABL(E) SPOLLX YES TREAT AS SPECIFIC POLL DK7 «, t00=0x0020, t01=0x0144}
0x03360…03372 Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0020, t01=0x017a}
0x03372…0337c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x018c}
0x0337c…03386 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0008}
0x03386…03390 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0012}
0x03390…0339e Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x0021, t01=0x001c}
0x0339e…033a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x002a}
0x033a8…033b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0034}
0x033b2…033ca Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0021, t01=0x003e}
0x033ca…033e6 Head {h00=0x0018, h01=0x0050, text=»* MESSAGE RECEIVED«, t00=0x0021, t01=0x0056}
0x033e6…033fa Head {h00=0x0010, h01=0x0050, text=»* TIME OUT«, t00=0x0021, t01=0x0072}
0x033fa…03404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0086}
0x03404…0340e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0090}
0x0340e…03420 Head {h00=0x000e, h01=0x0050, text=»DCRD EQU *«, t00=0x0021, t01=0x009a}
0x03420…03440 Head {h00=0x001c, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB«, t00=0x0021, t01=0x00ac}
0x03440…03472 Head {h00=0x002e, h01=0x0050, text=» LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE «, t00=0x0021, t01=0x00cc}
0x03472…03498 Head {h00=0x0022, h01=0x0050, text=» RF(Z) DCRD10 NOTHING IN QUEUE«, t00=0x0021, t01=0x00fe}
0x03498…034a0 Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x0124}
0x034a0…034a8 Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x012c}
0x034a8…034b0 Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x0134}
0x034b0…034dc Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 TAKE THE FIRST IN QUEUE «, t00=0x0021, t01=0x013c}
0x034dc…034f4 Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRQ,A6 «, t00=0x0021, t01=0x0168}
0x034f4…03506 Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0021, t01=0x0180}
0x03506…0352c (34, 0, 400) Head {h00=0x0022, h01=0x0050, text=» LD A3,-4,A4 EFFECTIVE LENGTH «, t00=0x0022, t01=0x0004}
0x0352c…03544 Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBEL,A8 «, t00=0x0022, t01=0x002a}
0x03544…0354c Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x0042}
0x0354c…03570 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0022, t01=0x004a}
0x03570…0359e Head {h00=0x002a, h01=0x0050, text=» CF A15,DC:MIN MOV DATA TO USER BUFFER«, t00=0x0022, t01=0x006e}
0x0359e…035b0 Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0022, t01=0x009c}
0x035b0…035b8 Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x00ae}
0x035b8…035e0 Head {h00=0x0024, h01=0x0050, text=»DCRD10 CF A15,TIMERE START TIMER«, t00=0x0022, t01=0x00b6}
0x035e0…035f2 Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0022, t01=0x00de}
0x035f2…035fc Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0022, t01=0x00f0}
0x035fc…03606 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00fa}
0x03606…03610 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0104}
0x03610…03624 Head {h00=0x0010, h01=0x0050, text=»* SET STATUS«, t00=0x0022, t01=0x010e}
0x03624…0362e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0122}
0x0362e…03638 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x012c}
0x03638…0364c Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0022, t01=0x0136}
0x0364c…0365e Head {h00=0x000e, h01=0x0050, text=»DCSS EQU *«, t00=0x0022, t01=0x014a}
0x0365e…0368c Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW,A8 GET STATUS INFORMATION«, t00=0x0022, t01=0x015c}
0x0368c…036a8 Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x0022, t01=0x018a}
0x036a8…036c8 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DCSS20 DEVICE END«, t00=0x0023, t01=0x0016}
0x036c8…036dc Head {h00=0x0010, h01=0x0050, text=»DCSS10 EQU *«, t00=0x0023, t01=0x0036}
0x036dc…036f4 Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTST,A6 «, t00=0x0023, t01=0x004a}
0x036f4…03718 Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 COMPLETE REQUEST «, t00=0x0023, t01=0x0062}
0x03718…0372c Head {h00=0x0010, h01=0x0050, text=»DCSS20 EQU *«, t00=0x0023, t01=0x0086}
0x0372c…03744 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0023, t01=0x009a}
0x03744…03756 Head {h00=0x000e, h01=0x0050, text=» ANK A1,9 «, t00=0x0023, t01=0x00b2}
0x03756…03782 Head {h00=0x0028, h01=0x0050, text=» RB(Z) DCSS10 WACK HAS NOT BEEN SENT«, t00=0x0023, t01=0x00c4}
0x03782…03796 Head {h00=0x0010, h01=0x0050, text=»DCSS30 EQU *«, t00=0x0023, t01=0x00f0}
0x03796…037c6 Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x0023, t01=0x0104}
0x037c6…037de Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x0023, t01=0x0134}
0x037de…037f0 Head {h00=0x000e, h01=0x0050, text=» RB DCSS10«, t00=0x0023, t01=0x014c}
0x037f0…037fc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x015e}
0x037fc…03806 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0023, t01=0x016a}
0x03806…0380e Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x0174}
0x0380e…03818 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x017c}
0x03818…0383e Head {h00=0x0022, h01=0x0050, text=»* SET REQUEST TIMEOUT VALUE «, t00=0x0023, t01=0x0186}
0x0383e…03848 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x001c}
0x03848…03852 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0026}
0x03852…0385a Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x0030}
0x0385a…0386e Head {h00=0x0010, h01=0x0050, text=»REQTIM EQU *«, t00=0x0024, t01=0x0038}
0x0386e…03894 Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBCW,A8 TIMEOUT VALUE «, t00=0x0024, t01=0x004c}
0x03894…038bc Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTTIM,A6 SAVE IT IN DWT «, t00=0x0024, t01=0x0072}
0x038bc…038e0 Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 TENDIO & DISPATCH«, t00=0x0024, t01=0x009a}
0x038e0…038e8 Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x00be}
0x038e8…038f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00c6}
0x038f2…0391e Head {h00=0x0028, h01=0x0050, text=»* ILLEGAL APPLICATION BUFFER SIZE «, t00=0x0024, t01=0x00d0}
0x0391e…03928 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00fc}
0x03928…03930 Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x0106}
0x03930…0396c Head {h00=0x0038, h01=0x0050, text=»IL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH «, t00=0x0024, t01=0x010e}
0x0396c…03990 Head {h00=0x0020, h01=0x0050, text=» ABL DISEND COMPLETE REQUEST«, t00=0x0024, t01=0x014a}
0x03990…0399a Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0024, t01=0x016e}
0x0399a…039a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0178}
0x039a4…039ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0182}
0x039ae…039b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x018c}
0x039b8…039d6 Head {h00=0x001a, h01=0x0050, text=»* TIMER HANDLING PART «, t00=0x0025, t01=0x0008}
0x039d6…039e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0026}
0x039e0…039ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0030}
0x039ea…039f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x003a}
0x039f4…03a10 Head {h00=0x0018, h01=0x0050, text=»* READ TIMER=TIMERR «, t00=0x0025, t01=0x0044}
0x03a10…03a1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0060}
0x03a1a…03a2e Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x0025, t01=0x006a}
0x03a2e…03a40 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0025, t01=0x007e}
0x03a40…03a72 Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0025, t01=0x0090}
0x03a72…03a92 Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIME10 NO TIMING «, t00=0x0025, t01=0x00c2}
0x03a92…03aa8 Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x0025, t01=0x00e2}
0x03aa8…03abe Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0025, t01=0x00f8}
0x03abe…03ad2 Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x0025, t01=0x010e}
0x03ad2…03ae8 Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x0025, t01=0x0122}
0x03ae8…03b14 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER POINTER «, t00=0x0025, t01=0x0138}
0x03b14…03b28 Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x0025, t01=0x0164}
0x03b28…03b42 Head {h00=0x0016, h01=0x0050, text=» RF GBUF10 RETURN «, t00=0x0025, t01=0x0178}
0x03b42…03b4c (38, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0004}
0x03b4c…03b68 Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x0026, t01=0x000e}
0x03b68…03b72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x002a}
0x03b72…03b86 Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x0026, t01=0x0034}
0x03b86…03ba2 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0026, t01=0x0048}
0x03ba2…03bb6 Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0026, t01=0x0064}
0x03bb6…03bca Head {h00=0x0010, h01=0x0050, text=»TOUTR1 EQU *«, t00=0x0026, t01=0x0078}
0x03bca…03bf0 Head {h00=0x0022, h01=0x0050, text=» LDK A1,/40 INDICATE TIME OUT «, t00=0x0026, t01=0x008c}
0x03bf0…03c18 Head {h00=0x0024, h01=0x0050, text=»TOUTR2 RB ENDIO COMPLETE REQUEST«, t00=0x0026, t01=0x00b2}
0x03c18…03c22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00da}
0x03c22…03c3e Head {h00=0x0018, h01=0x0050, text=»* WRITE TIMER=TIMWR «, t00=0x0026, t01=0x00e4}
0x03c3e…03c48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0100}
0x03c48…03c60 Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x0026, t01=0x010a}
0x03c60…03c92 Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0026, t01=0x0122}
0x03c92…03cb2 Head {h00=0x001c, h01=0x0050, text=» RB(Z) TIME10 NO TIMING «, t00=0x0026, t01=0x0154}
0x03cb2…03cc6 Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x0026, t01=0x0174}
0x03cc6…03cdc Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0026, t01=0x0188}
0x03cdc…03cf0 Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x0027, t01=0x000e}
0x03cf0…03d04 Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x0027, t01=0x0022}
0x03d04…03d1c Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x0027, t01=0x0036}
0x03d1c…03d2e Head {h00=0x000e, h01=0x0050, text=» RB TIME10«, t00=0x0027, t01=0x004e}
0x03d2e…03d38 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0027, t01=0x0060}
0x03d38…03d42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x006a}
0x03d42…03d60 Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x0027, t01=0x0074}
0x03d60…03d6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0092}
0x03d6a…03d7e Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x0027, t01=0x009c}
0x03d7e…03d9a Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0027, t01=0x00b0}
0x03d9a…03dae Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0027, t01=0x00cc}
0x03dae…03ddc Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0027, t01=0x00e0}
0x03ddc…03de6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x010e}
0x03de6…03e10 Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x0027, t01=0x0118}
0x03e10…03e34 Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x0027, t01=0x0142}
0x03e34…03e4a Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x0027, t01=0x0166}
0x03e4a…03e5c Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0027, t01=0x017c}
0x03e5c…03e8a Head {h00=0x002a, h01=0x0050, text=» RB(NE) TOUTR1 THIS DWT IS NOT WRITING«, t00=0x0027, t01=0x018e}
0x03e8a…03eb6 Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x0028, t01=0x002c}
0x03eb6…03ec8 Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0028, t01=0x0058}
0x03ec8…03ed2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x006a}
0x03ed2…03edc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0074}
0x03edc…03eee Head {h00=0x000e, h01=0x0050, text=» RB TOUTR1«, t00=0x0028, t01=0x007e}
0x03eee…03ef8 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0028, t01=0x0090}
0x03ef8…03f02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x009a}
0x03f02…03f0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00a4}
0x03f0c…03f2a Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x0028, t01=0x00ae}
0x03f2a…03f34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00cc}
0x03f34…03f5e Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x0028, t01=0x00d6}
0x03f5e…03f68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0100}
0x03f68…03f72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x010a}
0x03f72…03f86 Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x0028, t01=0x0114}
0x03f86…03fb0 Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0028, t01=0x0128}
0x03fb0…03fd2 Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x0028, t01=0x0152}
0x03fd2…03fe6 Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A2 «, t00=0x0028, t01=0x0174}
0x03fe6…0400c Head {h00=0x0022, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME «, t00=0x0028, t01=0x0188}
0x0400c…0402c Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 STOP TIMER«, t00=0x0029, t01=0x001e}
0x0402c…04040 Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0029, t01=0x003e}
0x04040…04054 Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x0029, t01=0x0052}
0x04054…04066 Head {h00=0x000e, h01=0x0050, text=» RF GBUF10«, t00=0x0029, t01=0x0066}
0x04066…04070 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0029, t01=0x0078}
0x04070…0407a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0082}
0x0407a…04096 Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x0029, t01=0x008c}
0x04096…040a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00a8}
0x040a0…040c8 Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x0029, t01=0x00b2}
0x040c8…040ec Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0029, t01=0x00da}
0x040ec…04116 Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0029, t01=0x00fe}
0x04116…04138 Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0029, t01=0x0128}
0x04138…04142 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x014a}
0x04142…0414c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0154}
0x0414c…04178 Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0029, t01=0x015e}
0x04178…04188 Head {h00=0x000c, h01=0x0050, text=»GBUF INH«, t00=0x0029, t01=0x018a}
0x04188…0419c Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x002a, t01=0x000a}
0x0419c…041c0 Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x002a, t01=0x001e}
0x041c0…041f2 Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x002a, t01=0x0042}
0x041f2…04204 Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x002a, t01=0x0074}
0x04204…04232 Head {h00=0x002a, h01=0x0050, text=»GBUF10 ADKL A15,4 ADJUST STACK POINTER«, t00=0x002a, t01=0x0086}
0x04232…04254 Head {h00=0x001e, h01=0x0050, text=» ABR* A15 RETURN TO CALLER«, t00=0x002a, t01=0x00b4}
0x04254…0425e Head {h00=0x0006, h01=0x0050, text=» «, t00=0x002a, t01=0x00d6}
0x0425e…04268 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00e0}
0x04268…04272 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00ea}
0x04272…0429e Head {h00=0x0028, h01=0x0050, text=»* INSERT DWT IN WRITE REQUEST QUEUE «, t00=0x002a, t01=0x00f4}
0x0429e…042a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0120}
0x042a8…042c4 Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002a, t01=0x012a}
0x042c4…042d4 Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002a, t01=0x0146}
0x042d4…042de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0156}
0x042de…0430a Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x002a, t01=0x0160}
0x0430a…04326 Head {h00=0x0018, h01=0x0050, text=»INSWQ1 LDK A4,DWTWQ «, t00=0x002a, t01=0x018c}
0x04326…04340 Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x002b, t01=0x0018}
0x04340…04368 Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x002b, t01=0x0032}
0x04368…0437a Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002b, t01=0x005a}
0x0437a…0438c Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x002b, t01=0x006c}
0x0438c…043a4 Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x002b, t01=0x007e}
0x043a4…043c6 Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x002b, t01=0x0096}
0x043c6…043ec Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002b, t01=0x00b8}
0x043ec…04406 Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x002b, t01=0x00de}
0x04406…04410 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00f8}
0x04410…0441a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0102}
0x0441a…04448 Head {h00=0x002a, h01=0x0050, text=»* REMOVE DWT FROM WRITE REQUEST QUEUE «, t00=0x002b, t01=0x010c}
0x04448…04452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x013a}
0x04452…0446e Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002b, t01=0x0144}
0x0446e…0447e Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x0160}
0x0447e…04488 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0170}
0x04488…044b6 Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x002b, t01=0x017a}
0x044b6…044ec Head {h00=0x0032, h01=0x0050, text=»REM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED «, t00=0x002c, t01=0x0018}
0x044ec…04500 Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x002c, t01=0x004e}
0x04500…04514 Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6 «, t00=0x002c, t01=0x0062}
0x04514…0452c Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x002c, t01=0x0076}
0x0452c…04556 Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x002c, t01=0x008e}
0x04556…04568 Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x002c, t01=0x00b8}
0x04568…0457c Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x002c, t01=0x00ca}
0x0457c…04598 Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x002c, t01=0x00de}
0x04598…045aa Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x002c, t01=0x00fa}
0x045aa…045ca Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x002c, t01=0x010c}
0x045ca…045dc Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x002c, t01=0x012c}
0x045dc…045f6 Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x002c, t01=0x013e}
0x045f6…04600 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x002c, t01=0x0158}
0x04600…0460a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0162}
0x0460a…04614 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x016c}
0x04614…04638 Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x002c, t01=0x0176}
0x04638…04642 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x000a}
0x04642…04656 Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x002d, t01=0x0014}
0x04656…04672 Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002d, t01=0x0028}
0x04672…04682 Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002d, t01=0x0044}
0x04682…0468c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0054}
0x0468c…046a0 Head {h00=0x0010, h01=0x0050, text=»INSSQ EQU * «, t00=0x002d, t01=0x005e}
0x046a0…046cc Head {h00=0x0028, h01=0x0050, text=» LD A2,0,A6 GET TERMINAL ADDRESS DK4«, t00=0x002d, t01=0x0072}
0x046cc…046fa Head {h00=0x002a, h01=0x0050, text=» ANK A2,/FF IF ADDRESS = 00 OR /7F DK4«, t00=0x002d, t01=0x009e}
0x046fa…04726 Head {h00=0x0028, h01=0x0050, text=» RB(Z) GBUF10 DONT PUT IN STATUS DK4«, t00=0x002d, t01=0x00cc}
0x04726…04756 Head {h00=0x002c, h01=0x0050, text=» SUK A2,/7F QUEUE, TERMINAL HAS BEEN DK4«, t00=0x002d, t01=0x00f8}
0x04756…0477e Head {h00=0x0024, h01=0x0050, text=» RB(Z) GBUF10 MADE INACTIVE DK4 «, t00=0x002d, t01=0x0128}
0x0477e…047a6 Head {h00=0x0024, h01=0x0050, text=» LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002d, t01=0x0150}
0x047a6…047bc Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002d, t01=0x0178}
0x047bc…047ce Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x002d, t01=0x018e}
0x047ce…047d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0010}
0x047d8…047e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x001a}
0x047e2…04808 Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x002e, t01=0x0024}
0x04808…04812 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x004a}
0x04812…0482e Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002e, t01=0x0054}
0x0482e…0483e Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002e, t01=0x0070}
0x0483e…04848 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0080}
0x04848…04876 Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002e, t01=0x008a}
0x04876…0488c Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002e, t01=0x00b8}
0x0488c…0489e Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x002e, t01=0x00ce}
0x0489e…048aa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x00e0}
0x048aa…048b4 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x002e, t01=0x00ec}
0x048b4…048be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00f6}
0x048be…048c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0100}
0x048c8…048f0 Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x002e, t01=0x010a}
0x048f0…048fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0132}
0x048fa…04912 Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x002e, t01=0x013c}
0x04912…0492c Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x002e, t01=0x0154}
0x0492c…04936 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x016e}
0x04936…0494a Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x002e, t01=0x0178}
0x0494a…04960 Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x002e, t01=0x018c}
0x04960…0498c Head {h00=0x0028, h01=0x0050, text=» LDKL A2,DW1500 QUEUE ON DC-TASK DWT«, t00=0x002f, t01=0x0012}
0x0498c…04998 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x003e}
0x04998…049ae Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=0 «, t00=0x002f, t01=0x004a}
0x049ae…049d6 Head {h00=0x0024, h01=0x0050, text=» LDR A2,A6 QUEUE ON TERMINAL DWT«, t00=0x002f, t01=0x0060}
0x049d6…049e2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x0088}
0x049e2…04a12 Head {h00=0x002c, h01=0x0050, text=» ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE«, t00=0x002f, t01=0x0094}
0x04a12…04a26 Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x002f, t01=0x00c4}
0x04a26…04a3a Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x002f, t01=0x00d8}
0x04a3a…04a62 Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x002f, t01=0x00ec}
0x04a62…04a74 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002f, t01=0x0114}
0x04a74…04a86 Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x002f, t01=0x0126}
0x04a86…04ab0 Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x002f, t01=0x0138}
0x04ab0…04ad6 Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002f, t01=0x0162}
0x04ad6…04ae6 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002f, t01=0x0188}
0x04ae6…04af0 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0030, t01=0x0008}
0x04af0…04afa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0012}
0x04afa…04b04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x001c}
0x04b04…04b3a Head {h00=0x0032, h01=0x0050, text=»* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE«, t00=0x0030, t01=0x0026}
0x04b3a…04b44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x005c}
0x04b44…04b7c Head {h00=0x0034, h01=0x0050, text=»* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED «, t00=0x0030, t01=0x0066}
0x04b7c…04b86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x009e}
0x04b86…04ba4 Head {h00=0x001a, h01=0x0050, text=»CKMESS LDKL A6,DW1500 «, t00=0x0030, t01=0x00a8}
0x04ba4…04bbc Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0030, t01=0x00c6}
0x04bbc…04bdc Head {h00=0x001c, h01=0x0050, text=» RF(N) CKM110 NO REQUEST«, t00=0x0030, t01=0x00de}
0x04bdc…04bfc Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 READ REQUEST ?«, t00=0x0030, t01=0x00fe}
0x04bfc…04c14 Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTOR,A6 «, t00=0x0030, t01=0x011e}
0x04c14…04c2e Head {h00=0x0016, h01=0x0050, text=» RF(NE) CKM110 NO «, t00=0x0030, t01=0x0136}
0x04c2e…04c56 Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDR TO A8 «, t00=0x0030, t01=0x0150}
0x04c56…04c84 Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE «, t00=0x0030, t01=0x0178}
0x04c84…04caa Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKM200 NO READ IN QUEUE«, t00=0x0031, t01=0x0016}
0x04caa…04cb2 Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x003c}
0x04cb2…04cba Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x0044}
0x04cba…04cea Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER «, t00=0x0031, t01=0x004c}
0x04cea…04d1c Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE«, t00=0x0031, t01=0x007c}
0x04d1c…04d42 Head {h00=0x0022, h01=0x0050, text=» ADK A3,6 MOVE POINTER TO TEXT«, t00=0x0031, t01=0x00ae}
0x04d42…04d6c Head {h00=0x0026, h01=0x0050, text=» DONT DESTROY BUFFER ADDRESS =6 «, t00=0x0031, t01=0x00d4}
0x04d6c…04d80 Head {h00=0x0010, h01=0x0050, text=» LD A4,-4,A3«, t00=0x0031, t01=0x00fe}
0x04d80…04db4 Head {h00=0x0030, h01=0x0050, text=» ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS «, t00=0x0031, t01=0x0112}
0x04db4…04dc8 Head {h00=0x0010, h01=0x0050, text=» LD A4,-2,A3«, t00=0x0031, t01=0x0146}
0x04dc8…04dfa Head {h00=0x002e, h01=0x0050, text=» ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS «, t00=0x0031, t01=0x015a}
0x04dfa…04e02 Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x018c}
0x04e02…04e26 (50, 0, 400) Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0032, t01=0x0004}
0x04e26…04e50 Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 RECEIVE BUFFER ADDRESS «, t00=0x0032, t01=0x0028}
0x04e50…04e80 Head {h00=0x002c, h01=0x0050, text=» CF A15,DC:MIN MOVE DATA TO USER BUFFER «, t00=0x0032, t01=0x0052}
0x04e80…04eae Head {h00=0x002a, h01=0x0050, text=»CKM110 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0032, t01=0x0082}
0x04eae…04ec6 Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0032, t01=0x00b0}
0x04ec6…04f02 Head {h00=0x0038, h01=0x0050, text=»CKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS«, t00=0x0032, t01=0x00c8}
0x04f02…04f32 Head {h00=0x002c, h01=0x0050, text=» OR A1,DCONOF TAKE CARE OF POLL TIME OUT«, t00=0x0032, t01=0x0104}
0x04f32…04f48 Head {h00=0x0012, h01=0x0050, text=» CW A1,DCSTOL «, t00=0x0032, t01=0x0134}
0x04f48…04f5e Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTOL «, t00=0x0032, t01=0x014a}
0x04f5e…04f88 Head {h00=0x0026, h01=0x0050, text=» RB(E) CKM110 NO CHANGE OF STATUS «, t00=0x0032, t01=0x0160}
0x04f88…04fb6 Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/2000 INDICATE STATUS CHANGE «, t00=0x0032, t01=0x018a}
0x04fb6…04fea Head {h00=0x0030, h01=0x0050, text=» CF A15,TENDIO COMPLETE READ GENERAL REQUEST«, t00=0x0033, t01=0x0028}
0x04fea…04ffc Head {h00=0x000e, h01=0x0050, text=» RB CKM110«, t00=0x0033, t01=0x005c}
0x04ffc…05006 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0033, t01=0x006e}
0x05006…0500e Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x0078}
0x0500e…05052 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0033, t01=0x0080}
0x05052…0505c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00c4}
0x0505c…05076 Head {h00=0x0016, h01=0x0050, text=»* ABORT ROUTINE«, t00=0x0033, t01=0x00ce}
0x05076…05080 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00e8}
0x05080…050a0 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0033, t01=0x00f2}
0x050a0…050a8 Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x0112}
0x050a8…050d2 Head {h00=0x0026, h01=0x0050, text=»ABORT LD A1,DWTTP,A6 TIMER POINTER«, t00=0x0033, t01=0x011a}
0x050d2…050f8 Head {h00=0x0022, h01=0x0050, text=» RF(Z) AB:10 NO TIMER RUNNING «, t00=0x0033, t01=0x0144}
0x050f8…05118 Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 KILL TIMER«, t00=0x0033, t01=0x016a}
0x05118…0512c Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0033, t01=0x018a}
0x0512c…05134 Head {h00=0x0004, h01=0x0050, t00=0x0034, t01=0x000e}
0x05134…0515c Head {h00=0x0024, h01=0x0050, text=»AB:10 LD A1,DWTOR,A6 ORDER CODE «, t00=0x0034, t01=0x0016}
0x0515c…0516e Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0034, t01=0x003e}
0x0516e…0519c Head {h00=0x002a, h01=0x0050, text=» RF(Z) AB:RTN READ REQUEST. NO ACTION «, t00=0x0034, t01=0x0050}
0x0519c…051ae Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x0034, t01=0x007e}
0x051ae…051e0 Head {h00=0x002e, h01=0x0050, text=» RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE«, t00=0x0034, t01=0x0090}
0x051e0…051e8 Head {h00=0x0004, h01=0x0050, t00=0x0034, t01=0x00c2}
0x051e8…0521a Head {h00=0x002e, h01=0x0050, text=» CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE«, t00=0x0034, t01=0x00ca}
0x0521a…05244 Head {h00=0x0026, h01=0x0050, text=» LD A2,FDWTUT WRITING DWT ADDRESS «, t00=0x0034, t01=0x00fc}
0x05244…05256 Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0034, t01=0x0126}
0x05256…0527a Head {h00=0x0020, h01=0x0050, text=» RF(NE) AB:RTN NOT THIS DWT «, t00=0x0034, t01=0x0138}
0x0527a…0529e Head {h00=0x0020, h01=0x0050, text=» CM XACK RESET ACK EXPECTED «, t00=0x0034, t01=0x015c}
0x0529e…052c2 Head {h00=0x0020, h01=0x0050, text=» CM FDWTUT RESET WRITING DWT«, t00=0x0034, t01=0x0180}
0x052c2…052ca Head {h00=0x0004, h01=0x0050, t00=0x0035, t01=0x0014}
0x052ca…052de Head {h00=0x0010, h01=0x0050, text=»AB:RTN EQU *«, t00=0x0035, t01=0x001c}
0x052de…052f4 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0035, t01=0x0030}
0x052f4…05308 Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0035, t01=0x0046}
0x05308…05330 Head {h00=0x0024, h01=0x0050, text=» ABR* A15 RETURN IN INHIBIT MODE«, t00=0x0035, t01=0x005a}
0x05330…0533c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x0082}
0x0533c…05352 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0035, t01=0x008e}
0x05352…05362 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0035, t01=0x00a4}
0x05362…0536e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x00b4}
0x0536e…05378 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0035, t01=0x00c0}
0x05378…05380 Head {h00=0x0004, h01=0x0050, t00=0x0035, t01=0x00ca}
0x05380…0538a Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0035, t01=0x00d2}
0x0538a…05394 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00dc}
0x05394…0539e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00e6}
0x0539e…053bc Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0035, t01=0x00f0}
0x053bc…053e4 Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0035, t01=0x010e}
0x053e4…053ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0136}
0x053ee…05400 Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0035, t01=0x0140}
0x05400…05428 Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0035, t01=0x0152}
0x05428…05432 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x017a}
0x05432…0543c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0184}
0x0543c…05454 Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0035, t01=0x018e}
0x05454…05468 Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0036, t01=0x0016}
0x05468…0547c Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0036, t01=0x002a}
0x0547c…05490 Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0036, t01=0x003e}
0x05490…054a4 Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0036, t01=0x0052}
0x054a4…054b8 Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0036, t01=0x0066}
0x054b8…054d2 Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0036, t01=0x007a}
0x054d2…054dc Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0036, t01=0x0094}
0x054dc…054f4 Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0036, t01=0x009e}
0x054f4…05508 Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0036, t01=0x00b6}
0x05508…0551a Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0036, t01=0x00ca}
0x0551a…0552e Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0036, t01=0x00dc}
0x0552e…05540 Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0036, t01=0x00f0}
0x05540…05554 Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0036, t01=0x0102}
0x05554…05566 Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0036, t01=0x0116}
0x05566…0557a Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0036, t01=0x0128}
0x0557a…0558c Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0036, t01=0x013c}
0x0558c…055a0 Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0036, t01=0x014e}
0x055a0…055b2 Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0036, t01=0x0162}
0x055b2…055c6 Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0036, t01=0x0174}
0x055c6…055da Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0036, t01=0x0188}
0x055da…055ee Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0037, t01=0x000c}
0x055ee…05600 Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0037, t01=0x0020}
0x05600…0560a Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0037, t01=0x0032}
0x0560a…05614 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x003c}
0x05614…0561e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0046}
0x0561e…05634 Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x0037, t01=0x0050}
0x05634…0563e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0066}
0x0563e…05648 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0070}
0x05648…05676 Head {h00=0x002a, h01=0x0050, text=»TIMPRO EQU 90 PROCEDURE TIMER 9 SEC DK«, t00=0x0037, t01=0x007a}
0x05676…0569c Head {h00=0x0022, h01=0x0050, text=»TIMNAK EQU 3 DELAY FOR NAK DK «, t00=0x0037, t01=0x00a8}
0x0569c…056a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00ce}
0x056a6…056b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00d8}
0x056b0…056cc Head {h00=0x0018, h01=0x0050, text=»* CHARACTER EQUATES «, t00=0x0037, t01=0x00e2}
0x056cc…056d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00fe}
0x056d6…05700 Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x0037, t01=0x0108}
0x05700…05714 Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x0037, t01=0x0132}
0x05714…05728 Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0037, t01=0x0146}
0x05728…0573c Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x0037, t01=0x015a}
0x0573c…05750 Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x0037, t01=0x016e}
0x05750…05764 Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x0037, t01=0x0182}
0x05764…05778 Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0038, t01=0x0008}
0x05778…0578c Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x0038, t01=0x001c}
0x0578c…057a0 Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x0038, t01=0x0030}
0x057a0…057b4 Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x0038, t01=0x0044}
0x057b4…057c8 Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x0038, t01=0x0058}
0x057c8…057dc Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x0038, t01=0x006c}
0x057dc…057f0 Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x0038, t01=0x0080}
0x057f0…05802 Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x0038, t01=0x0094}
0x05802…05818 Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x0038, t01=0x00a6}
0x05818…0582e Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x0038, t01=0x00bc}
0x0582e…05842 Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0038, t01=0x00d2}
0x05842…05856 Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x0038, t01=0x00e6}
0x05856…0586a Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x0038, t01=0x00fa}
0x0586a…0587e Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x0038, t01=0x010e}
0x0587e…05892 Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x0038, t01=0x0122}
0x05892…058a6 Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x0038, t01=0x0136}
0x058a6…058ba Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0038, t01=0x014a}
0x058ba…058ce Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x0038, t01=0x015e}
0x058ce…058da Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x0172}
0x058da…058ee Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0038, t01=0x017e}
0x058ee…05902 (57, 0, 400) Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0039, t01=0x0004}
0x05902…05936 Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x0039, t01=0x0018}
0x05936…05942 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x004c}
0x05942…05956 Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0039, t01=0x0058}
0x05956…0596a Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x0039, t01=0x006c}
0x0596a…0597e Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x0039, t01=0x0080}
0x0597e…05996 Head {h00=0x0014, h01=0x0050, text=»RVI EQU XRVI DK«, t00=0x0039, t01=0x0094}
0x05996…059aa Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x0039, t01=0x00ac}
0x059aa…059be Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x0039, t01=0x00c0}
0x059be…059d4 Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x0039, t01=0x00d4}
0x059d4…059e0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x00ea}
0x059e0…059ea Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0039, t01=0x00f6}
0x059ea…059f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0100}
0x059f4…059fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x010a}
0x059fe…05a1c Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x0039, t01=0x0114}
0x05a1c…05a26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0132}
0x05a26…05a30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x013c}
0x05a30…05a5e Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x0039, t01=0x0146}
0x05a5e…05a90 Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x0039, t01=0x0174}
0x05a90…05ab0 Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x003a, t01=0x0016}
0x05ab0…05acc Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x003a, t01=0x0036}
0x05acc…05ae8 Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x003a, t01=0x0052}
0x05ae8…05b1e Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x003a, t01=0x006e}
0x05b1e…05b44 Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x003a, t01=0x00a4}
0x05b44…05b64 Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x003a, t01=0x00ca}
0x05b64…05b92 Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x003a, t01=0x00ea}
0x05b92…05b9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0118}
0x05b9c…05bba Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x003a, t01=0x0122}
0x05bba…05be6 Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x003a, t01=0x0140}
0x05be6…05c10 Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x003a, t01=0x016c}
0x05c10…05c30 Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x003b, t01=0x0008}
0x05c30…05c64 Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x003b, t01=0x0028}
0x05c64…05c8c Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x003b, t01=0x005c}
0x05c8c…05cbe Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x003b, t01=0x0084}
0x05cbe…05cee Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x003b, t01=0x00b6}
0x05cee…05d1a Head {h00=0x0028, h01=0x0050, text=»CRDBUF DATA 0 READ BUFFER COUNTER DK«, t00=0x003b, t01=0x00e6}
0x05d1a…05d24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0112}
0x05d24…05d2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x011c}
0x05d2e…05d56 Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x003b, t01=0x0126}
0x05d56…05d60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x014e}
0x05d60…05d6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0158}
0x05d6a…05d7e Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x003b, t01=0x0162}
0x05d7e…05db0 Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x003b, t01=0x0176}
0x05db0…05dba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0018}
0x05dba…05dc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0022}
0x05dc4…05dd8 Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x003c, t01=0x002c}
0x05dd8…05dec Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x003c, t01=0x0040}
0x05dec…05df6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0054}
0x05df6…05e2c Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x003c, t01=0x005e}
0x05e2c…05e5c Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x003c, t01=0x0094}
0x05e5c…05e68 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x00c4}
0x05e68…05e72 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x003c, t01=0x00d0}
0x05e72…05e7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00da}
0x05e7c…05e86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00e4}
0x05e86…05ea2 Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x003c, t01=0x00ee}
0x05ea2…05eac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x010a}
0x05eac…05ed2 Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x003c, t01=0x0114}
0x05ed2…05efc Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x003c, t01=0x013a}
0x05efc…05f06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0164}
0x05f06…05f10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x016e}
0x05f10…05f26 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=1 «, t00=0x003c, t01=0x0178}
0x05f26…05f50 Head {h00=0x0026, h01=0x0050, text=»BRMHLT CF A5,HALTIN HALT RECEIVER «, t00=0x003c, t01=0x018e}
0x05f50…05f5e Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x003d, t01=0x0028}
0x05f5e…05f70 Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x003d, t01=0x0036}
0x05f70…05f94 Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x003d, t01=0x0048}
0x05f94…05faa Head {h00=0x0012, h01=0x0050, text=» IFT P6805=0 «, t00=0x003d, t01=0x006c}
0x05faa…05fe0 Head {h00=0x0032, h01=0x0050, text=» CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS «, t00=0x003d, t01=0x0082}
0x05fe0…05fee Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x003d, t01=0x00b8}
0x05fee…06004 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=1 «, t00=0x003d, t01=0x00c6}
0x06004…06032 Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x003d, t01=0x00dc}
0x06032…06040 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x003d, t01=0x010a}
0x06040…06054 Head {h00=0x0010, h01=0x0050, text=»BRM010 EQU *«, t00=0x003d, t01=0x0118}
0x06054…0606e Head {h00=0x0016, h01=0x0050, text=» IFT CODE+P6805=0 «, t00=0x003d, t01=0x012c}
0x0606e…060a2 Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYN SPECIFY SYN PATTERN«, t00=0x003d, t01=0x0146}
0x060a2…060b0 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x003d, t01=0x017a}
0x060b0…060c6 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=0 «, t00=0x003d, t01=0x0188}
0x060c6…060da Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x003e, t01=0x000e}
0x060da…06112 Head {h00=0x0034, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN «, t00=0x003e, t01=0x0022}
0x06112…06120 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x003e, t01=0x005a}
0x06120…06136 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=0 «, t00=0x003e, t01=0x0068}
0x06136…0615c Head {h00=0x0022, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER«, t00=0x003e, t01=0x007e}
0x0615c…0616a Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x003e, t01=0x00a4}
0x0616a…06180 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=1 «, t00=0x003e, t01=0x00b2}
0x06180…06194 Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x003e, t01=0x00c8}
0x06194…061a8 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0C «, t00=0x003e, t01=0x00dc}
0x061a8…061ce Head {h00=0x0022, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER«, t00=0x003e, t01=0x00f0}
0x061ce…061e2 Head {h00=0x0010, h01=0x0050, text=» LDK A2,SYN «, t00=0x003e, t01=0x0116}
0x061e2…06210 Head {h00=0x002a, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER«, t00=0x003e, t01=0x012a}
0x06210…06228 Head {h00=0x0014, h01=0x0050, text=» RB(NA) BRMHLT «, t00=0x003e, t01=0x0158}
0x06228…06236 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x003e, t01=0x0170}
0x06236…06250 Head {h00=0x0016, h01=0x0050, text=» IFT CODE+P6805=2 «, t00=0x003e, t01=0x017e}
0x06250…06262 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x003f, t01=0x0008}
0x06262…06288 Head {h00=0x0022, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER«, t00=0x003f, t01=0x001a}
0x06288…062a0 Head {h00=0x0014, h01=0x0050, text=» LDK A2,SYNEBC «, t00=0x003f, t01=0x0040}
0x062a0…062ce Head {h00=0x002a, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER«, t00=0x003f, t01=0x0058}
0x062ce…062e6 Head {h00=0x0014, h01=0x0050, text=» RB(NA) BRMHLT «, t00=0x003f, t01=0x0086}
0x062e6…062f4 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x003f, t01=0x009e}
0x062f4…06308 Head {h00=0x0010, h01=0x0050, text=»BRM100 EQU *«, t00=0x003f, t01=0x00ac}
0x06308…06330 Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003f, t01=0x00c0}
0x06330…06354 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003f, t01=0x00e8}
0x06354…06366 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x003f, t01=0x010c}
0x06366…0637a Head {h00=0x0010, h01=0x0050, text=» SUK A1,STX «, t00=0x003f, t01=0x011e}
0x0637a…0639c Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM300 STX RECEIVED«, t00=0x003f, t01=0x0132}
0x0639c…063b4 Head {h00=0x0014, h01=0x0050, text=» SUK A1,EOT-STX «, t00=0x003f, t01=0x0154}
0x063b4…063d6 Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM200 EOT RECEIVED«, t00=0x003f, t01=0x016c}
0x063d6…063ee Head {h00=0x0014, h01=0x0050, text=» SUK A1,ENQ-EOT «, t00=0x003f, t01=0x018e}
0x063ee…06412 Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM400 ENQ RECEIVED «, t00=0x0040, t01=0x0016}
0x06412…0642a Head {h00=0x0014, h01=0x0050, text=» SUK A1,DLE-ENQ «, t00=0x0040, t01=0x003a}
0x0642a…0644e Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM600 DLE RECEIVED «, t00=0x0040, t01=0x0052}
0x0644e…06466 Head {h00=0x0014, h01=0x0050, text=» SUK A1,NAK-DLE «, t00=0x0040, t01=0x0076}
0x06466…0648a Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM500 NAK RECEIVED «, t00=0x0040, t01=0x008e}
0x0648a…0649e Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0040, t01=0x00b2}
0x0649e…064b0 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x0040, t01=0x00c6}
0x064b0…064d8 Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x0040, t01=0x00d8}
0x064d8…064fc Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x0040, t01=0x0100}
0x064fc…0650e Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x0040, t01=0x0124}
0x0650e…06538 Head {h00=0x0026, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESSING «, t00=0x0040, t01=0x0136}
0x06538…06544 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x0160}
0x06544…06556 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0040, t01=0x016c}
0x06556…0656e Head {h00=0x0014, h01=0x0050, text=» CC A2,DW1500+1 «, t00=0x0040, t01=0x017e}
0x0656e…0658c Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM110 POLLING «, t00=0x0041, t01=0x0008}
0x0658c…0659e Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0041, t01=0x0026}
0x0659e…065b4 Head {h00=0x0012, h01=0x0050, text=» CC A2,DW1500 «, t00=0x0041, t01=0x0038}
0x065b4…065d8 Head {h00=0x0020, h01=0x0050, text=» RF(NE) BRM150 NOT THIS TCU «, t00=0x0041, t01=0x004e}
0x065d8…065ec Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x0041, t01=0x0072}
0x065ec…0660e Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x0041, t01=0x0086}
0x0660e…06632 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x0041, t01=0x00a8}
0x06632…06644 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x0041, t01=0x00cc}
0x06644…06658 Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0041, t01=0x00de}
0x06658…0667a Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x0041, t01=0x00f2}
0x0667a…0669e Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x0041, t01=0x0114}
0x0669e…066b0 Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x0041, t01=0x0138}
0x066b0…066e0 Head {h00=0x002c, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESS SEQUENCE «, t00=0x0041, t01=0x014a}
0x066e0…066ec Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x017a}
0x066ec…06712 Head {h00=0x0022, h01=0x0050, text=» CF A5,READ READ ONE CHARACTER«, t00=0x0041, t01=0x0186}
0x06712…06728 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=0 «, t00=0x0042, t01=0x001c}
0x06728…06740 Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0042, t01=0x0032}
0x06740…0674e Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x0042, t01=0x004a}
0x0674e…06764 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=1 «, t00=0x0042, t01=0x0058}
0x06764…06778 Head {h00=0x0010, h01=0x0050, text=» SUK A2,ENQ «, t00=0x0042, t01=0x006e}
0x06778…06786 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x0042, t01=0x0082}
0x06786…067a4 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) BRM150 NOT ENQ«, t00=0x0042, t01=0x0090}
0x067a4…067ba Head {h00=0x0012, h01=0x0050, text=» IFT P6805=0 «, t00=0x0042, t01=0x00ae}
0x067ba…067e2 Head {h00=0x0024, h01=0x0050, text=» CF A5,READ READ LAST CHARACTER «, t00=0x0042, t01=0x00c4}
0x067e2…067ea Head {h00=0x0004, h01=0x0050, t00=0x0042, t01=0x00ec}
0x067ea…06810 Head {h00=0x0022, h01=0x0050, text=»* TRAILING PAD CAN BE CHECKED «, t00=0x0042, t01=0x00f4}
0x06810…06818 Head {h00=0x0004, h01=0x0050, t00=0x0042, t01=0x011a}
0x06818…0683a Head {h00=0x001e, h01=0x0050, text=» CIO A1,0,LCUIN HALT INPUT«, t00=0x0042, t01=0x0122}
0x0683a…06850 Head {h00=0x0012, h01=0x0050, text=» SST A1,LCUIN «, t00=0x0042, t01=0x0144}
0x06850…0685e Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x0042, t01=0x015a}
0x0685e…06874 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=1 «, t00=0x0042, t01=0x0168}
0x06874…06894 Head {h00=0x001c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT«, t00=0x0042, t01=0x017e}
0x06894…068ba Head {h00=0x0022, h01=0x0050, text=» RB(NZ) BRM010 PARITY ERROR «, t00=0x0043, t01=0x000e}
0x068ba…068c8 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x0043, t01=0x0034}
0x068c8…068da Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0043, t01=0x0042}
0x068da…068fe Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK COUNTER«, t00=0x0043, t01=0x0054}
0x068fe…06910 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x0043, t01=0x0078}
0x06910…06922 Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x0043, t01=0x008a}
0x06922…06942 Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM120 SELECTING «, t00=0x0043, t01=0x009c}
0x06942…06954 Head {h00=0x000e, h01=0x0050, text=» CWK A8,GP«, t00=0x0043, t01=0x00bc}
0x06954…06976 Head {h00=0x001e, h01=0x0050, text=» ABL(E) GPOLL GENERAL POLL«, t00=0x0043, t01=0x00ce}
0x06976…0698a Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0043, t01=0x00f0}
0x0698a…069c4 Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x0043, t01=0x0104}
0x069c4…069d0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x013e}
0x069d0…069e4 Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0043, t01=0x014a}
0x069e4…06a0e Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0043, t01=0x015e}
0x06a0e…06a1a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x0188}
0x06a1a…06a3c (68, 0, 398) Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0044, t01=0x0004}
0x06a3c…06a60 Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) SPOLL SPECIFIC POLL«, t00=0x0044, t01=0x0026}
0x06a60…06a7c Head {h00=0x0018, h01=0x0050, text=» RB BRM INVALID POLL«, t00=0x0044, t01=0x004a}
0x06a7c…06a90 Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x0044, t01=0x0066}
0x06a90…06aba Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0044, t01=0x007a}
0x06aba…06adc Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0044, t01=0x00a4}
0x06adc…06afc Head {h00=0x001c, h01=0x0050, text=» RF(NZ) BRM130 STA FOUND«, t00=0x0044, t01=0x00c6}
0x06afc…06b12 Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0044, t01=0x00e6}
0x06b12…06b3a Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DW1500 SELECT TO DCTASK«, t00=0x0044, t01=0x00fc}
0x06b3a…06b4e Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x0044, t01=0x0124}
0x06b4e…06b62 Head {h00=0x0010, h01=0x0050, text=» ABL SELECT «, t00=0x0044, t01=0x0138}
0x06b62…06b72 Head {h00=0x000c, h01=0x0050, text=» XIF «, t00=0x0044, t01=0x014c}
0x06b72…06b88 Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0044, t01=0x015c}
0x06b88…06ba8 Head {h00=0x001c, h01=0x0050, text=» ABL BRM INVALID ADDRESS«, t00=0x0044, t01=0x0172}
0x06ba8…06bb8 (69, 0, 400) Head {h00=0x000c, h01=0x0050, text=» XIF «, t00=0x0045, t01=0x0004}
0x06bb8…06bc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0014}
0x06bc2…06bf2 Head {h00=0x002c, h01=0x0050, text=»* WAIT FOR MARK HOLD TO RESYNCHRONIZE «, t00=0x0045, t01=0x001e}
0x06bf2…06bfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x004e}
0x06bfc…06c10 Head {h00=0x0010, h01=0x0050, text=»BRM150 EQU *«, t00=0x0045, t01=0x0058}
0x06c10…06c24 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0045, t01=0x006c}
0x06c24…06c38 Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0045, t01=0x0080}
0x06c38…06c58 Head {h00=0x001c, h01=0x0050, text=» RB(Z) BRM RESYNCHRONIZE«, t00=0x0045, t01=0x0094}
0x06c58…06c82 Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ ANOTHER CHARACTER«, t00=0x0045, t01=0x00b4}
0x06c82…06c94 Head {h00=0x000e, h01=0x0050, text=» RB BRM150«, t00=0x0045, t01=0x00de}
0x06c94…06c9e Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0045, t01=0x00f0}
0x06c9e…06ca8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00fa}
0x06ca8…06cb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0104}
0x06cb2…06cd2 Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0045, t01=0x010e}
0x06cd2…06cdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x012e}
0x06cdc…06ce6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0138}
0x06ce6…06cfa Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0045, t01=0x0142}
0x06cfa…06d24 Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0045, t01=0x0156}
0x06d24…06d38 Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0045, t01=0x0180}
0x06d38…06d5a (70, 0, 400) Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0046, t01=0x0004}
0x06d5a…06d66 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x0026}
0x06d66…06d7a Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0046, t01=0x0032}
0x06d7a…06da4 Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM220 ACK IS NOT EXPECTED «, t00=0x0046, t01=0x0046}
0x06da4…06dca Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0046, t01=0x0070}
0x06dca…06dee Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM210 NO ONE WRITING«, t00=0x0046, t01=0x0096}
0x06dee…06e08 Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0046, t01=0x00ba}
0x06e08…06e34 Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0046, t01=0x00d4}
0x06e34…06e48 Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0046, t01=0x0100}
0x06e48…06e6e Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0046, t01=0x0114}
0x06e6e…06e82 Head {h00=0x0010, h01=0x0050, text=»BRM220 EQU *«, t00=0x0046, t01=0x013a}
0x06e82…06ea4 Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0046, t01=0x014e}
0x06ea4…06eb4 Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0046, t01=0x0170}
0x06eb4…06ebe Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0046, t01=0x0180}
0x06ebe…06ec8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x018a}
0x06ec8…06ed2 (71, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0004}
0x06ed2…06ef2 Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0047, t01=0x000e}
0x06ef2…06efc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x002e}
0x06efc…06f06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0038}
0x06f06…06f1a Head {h00=0x0010, h01=0x0050, text=»BRM300 EQU *«, t00=0x0047, t01=0x0042}
0x06f1a…06f2e Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0047, t01=0x0056}
0x06f2e…06f42 Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0047, t01=0x006a}
0x06f42…06f64 Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM315 NOT SELECTED«, t00=0x0047, t01=0x007e}
0x06f64…06f7a Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0047, t01=0x00a0}
0x06f7a…06fa4 Head {h00=0x0026, h01=0x0050, text=» RB(Z) BRM150 NO BUFFER AVAILABLE «, t00=0x0047, t01=0x00b6}
0x06fa4…06fb8 Head {h00=0x0010, h01=0x0050, text=»BRM305 EQU *«, t00=0x0047, t01=0x00e0}
0x06fb8…06fda Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0047, t01=0x00f4}
0x06fda…06fec Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0047, t01=0x0116}
0x06fec…0700e Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BRM320 MESSAGE OK «, t00=0x0047, t01=0x0128}
0x0700e…07022 Head {h00=0x0010, h01=0x0050, text=»BRM310 EQU *«, t00=0x0047, t01=0x014a}
0x07022…0704e Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0047, t01=0x015e}
0x0704e…07062 Head {h00=0x0010, h01=0x0050, text=»BRM312 EQU *«, t00=0x0047, t01=0x018a}
0x07062…07080 Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0048, t01=0x000e}
0x07080…07090 Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0048, t01=0x002c}
0x07090…070a4 Head {h00=0x0010, h01=0x0050, text=»BRM315 EQU *«, t00=0x0048, t01=0x003c}
0x070a4…070b8 Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0048, t01=0x0050}
0x070b8…070cc Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0048, t01=0x0064}
0x070cc…070f6 Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 ACK IS NOT EXPECTED «, t00=0x0048, t01=0x0078}
0x070f6…0710c Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0048, t01=0x00a2}
0x0710c…07136 Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 NO BUFFER AVAILABLE «, t00=0x0048, t01=0x00b8}
0x07136…0715c Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0048, t01=0x00e2}
0x0715c…07190 Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0048, t01=0x0108}
0x07190…071ac Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0048, t01=0x013c}
0x071ac…071b8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x0158}
0x071b8…071cc Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0048, t01=0x0164}
0x071cc…071fc Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0048, t01=0x0178}
0x071fc…0722a Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTECB,A6 SAVE CURRENT ECB DK6 «, t00=0x0049, t01=0x0018}
0x0722a…07248 Head {h00=0x001a, h01=0x0050, text=» ST A1,DWTCUR,A6 DK6 «, t00=0x0049, t01=0x0046}
0x07248…07262 Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0049, t01=0x0064}
0x07262…0728e Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0049, t01=0x007e}
0x0728e…072ae Head {h00=0x001c, h01=0x0050, text=» CM CACK PRESET ACK-1 =7«, t00=0x0049, t01=0x00aa}
0x072ae…072d2 Head {h00=0x0020, h01=0x0050, text=» RB BRM305 READ THE MESSAGE «, t00=0x0049, t01=0x00ca}
0x072d2…072de Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x00ee}
0x072de…0730a Head {h00=0x0028, h01=0x0050, text=»BRM316 CF A5,READ READ ONE CHARACTER«, t00=0x0049, t01=0x00fa}
0x0730a…07322 Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1 =8«, t00=0x0049, t01=0x0126}
0x07322…0733a Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0049, t01=0x013e}
0x0733a…0734c Head {h00=0x000e, h01=0x0050, text=» XIF =8 «, t00=0x0049, t01=0x0156}
0x0734c…07364 Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1 =8«, t00=0x0049, t01=0x0168}
0x07364…0737c Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ =8 «, t00=0x0049, t01=0x0180}
0x0737c…0738e Head {h00=0x000e, h01=0x0050, text=» XIF =8 «, t00=0x004a, t01=0x0008}
0x0738e…073ba Head {h00=0x0028, h01=0x0050, text=» RB(Z) BRM312 FORWARD ABORT SEQUENCE«, t00=0x004a, t01=0x001a}
0x073ba…073cc Head {h00=0x000e, h01=0x0050, text=» RB BRM220«, t00=0x004a, t01=0x0046}
0x073cc…073e0 Head {h00=0x0010, h01=0x0050, text=»BRM320 EQU *«, t00=0x004a, t01=0x0058}
0x073e0…07404 Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x004a, t01=0x006c}
0x07404…0742c Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x004a, t01=0x0090}
0x0742c…0743e Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x004a, t01=0x00b8}
0x0743e…07452 Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x004a, t01=0x00ca}
0x07452…07478 Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM325 NOT FIRST BLOCK«, t00=0x004a, t01=0x00de}
0x07478…0748c Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x004a, t01=0x0104}
0x0748c…074a0 Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x004a, t01=0x0118}
0x074a0…074b2 Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x004a, t01=0x012c}
0x074b2…074d6 Head {h00=0x0020, h01=0x0050, text=» RB(NE) BRM310 ESC NOT FOUND«, t00=0x004a, t01=0x013e}
0x074d6…074e8 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x004a, t01=0x0162}
0x074e8…0750c Head {h00=0x0020, h01=0x0050, text=» LCR A1,A4 GET COMMAND CODE «, t00=0x004a, t01=0x0174}
0x0750c…0751e Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x004b, t01=0x0008}
0x0751e…07534 Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x004b, t01=0x001a}
0x07534…07560 Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x004b, t01=0x0030}
0x07560…0757e Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x004b, t01=0x005c}
0x0757e…075a8 Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x004b, t01=0x007a}
0x075a8…075b4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004b, t01=0x00a4}
0x075b4…075c8 Head {h00=0x0010, h01=0x0050, text=»BRM325 EQU *«, t00=0x004b, t01=0x00b0}
0x075c8…075da Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x004b, t01=0x00c4}
0x075da…07604 Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM340 MESSAGE ENDED BY ETB«, t00=0x004b, t01=0x00d6}
0x07604…07614 Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x004b, t01=0x0100}
0x07614…07642 Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x004b, t01=0x0110}
0x07642…07654 Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x004b, t01=0x013e}
0x07654…07678 Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x004b, t01=0x0150}
0x07678…07682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0174}
0x07682…076a8 Head {h00=0x0022, h01=0x0050, text=»* PREPARE FOR CHAINED COMMAND «, t00=0x004b, t01=0x017e}
0x076a8…076b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0014}
0x076b2…076c6 Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x004c, t01=0x001e}
0x076c6…076da Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x004c, t01=0x0032}
0x076da…076f4 Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x004c, t01=0x0046}
0x076f4…0770a Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x004c, t01=0x0060}
0x0770a…07720 Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM326 «, t00=0x004c, t01=0x0076}
0x07720…07734 Head {h00=0x0010, h01=0x0050, text=» ST A2,+4,A1«, t00=0x004c, t01=0x008c}
0x07734…07740 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x00a0}
0x07740…07754 Head {h00=0x0010, h01=0x0050, text=»BRM326 EQU *«, t00=0x004c, t01=0x00ac}
0x07754…0776a Head {h00=0x0012, h01=0x0050, text=» CWK A6,DW1500«, t00=0x004c, t01=0x00c0}
0x0776a…0779a Head {h00=0x002c, h01=0x0050, text=» RF(E) BRM330 MESSAGE IS MENT FOR DCTASK«, t00=0x004c, t01=0x00d6}
0x0779a…077bc Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004c, t01=0x0106}
0x077bc…077dc Head {h00=0x001c, h01=0x0050, text=» RF(N) BRM330 NO REQUEST«, t00=0x004c, t01=0x0128}
0x077dc…077f6 Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1 =4 «, t00=0x004c, t01=0x0148}
0x077f6…07816 Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x004c, t01=0x0162}
0x07816…07840 Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM327 ANY MESSAGE ORDER =4«, t00=0x004c, t01=0x0182}
0x07840…07852 Head {h00=0x000e, h01=0x0050, text=» XIF =4 «, t00=0x004d, t01=0x001c}
0x07852…07864 Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x004d, t01=0x002e}
0x07864…0787c Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTOR,A6 «, t00=0x004d, t01=0x0040}
0x0787c…078a2 Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM330 NO READ REQUEST«, t00=0x004d, t01=0x0058}
0x078a2…078b6 Head {h00=0x0010, h01=0x0050, text=»BRM327 EQU *«, t00=0x004d, t01=0x007e}
0x078b6…078d0 Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x004d, t01=0x0092}
0x078d0…078f8 Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x004d, t01=0x00ac}
0x078f8…07918 Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x004d, t01=0x00d4}
0x07918…07946 Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x004d, t01=0x00f4}
0x07946…07970 Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x004d, t01=0x0122}
0x07970…0799c Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A8 STORE REMAINING TIME«, t00=0x004d, t01=0x014c}
0x0799c…079a6 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x004d, t01=0x0178}
0x079a6…079b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0182}
0x079b0…079ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x018c}
0x079ba…079ee Head {h00=0x0030, h01=0x0050, text=»* CHECK IF START PRINTER BIT SET IN CCC/WCC «, t00=0x004e, t01=0x0008}
0x079ee…079f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x003c}
0x079f8…07a02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0046}
0x07a02…07a16 Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004e, t01=0x0050}
0x07a16…07a36 Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x004e, t01=0x0064}
0x07a36…07a4a Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x004e, t01=0x0084}
0x07a4a…07a6c Head {h00=0x001e, h01=0x0050, text=» LC A2,TEBCDI,A2 TRANSLATE«, t00=0x004e, t01=0x0098}
0x07a6c…07a96 Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTINF,A6 GET DWT INFO DK5 «, t00=0x004e, t01=0x00ba}
0x07a96…07ab6 Head {h00=0x001c, h01=0x0050, text=» ANK A3,1 GET LPBIT DK5 «, t00=0x004e, t01=0x00e4}
0x07ab6…07ad6 Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM328 NOT LP DK5«, t00=0x004e, t01=0x0104}
0x07ad6…07ae8 Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x004e, t01=0x0124}
0x07ae8…07afe Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM328 «, t00=0x004e, t01=0x0136}
0x07afe…07b20 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004e, t01=0x014c}
0x07b20…07b46 Head {h00=0x0022, h01=0x0050, text=» ORK A2,/A SET WACK INDICATION«, t00=0x004e, t01=0x016e}
0x07b46…07b5e (79, 0, 400) Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x004f, t01=0x0004}
0x07b5e…07b72 Head {h00=0x0010, h01=0x0050, text=»BRM328 EQU *«, t00=0x004f, t01=0x001c}
0x07b72…07b7e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x0030}
0x07b7e…07b98 Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1 =4 «, t00=0x004f, t01=0x003c}
0x07b98…07bb8 Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x004f, t01=0x0056}
0x07bb8…07be8 Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM329 NOT ANY MESSAGE ORDER =4 «, t00=0x004f, t01=0x0076}
0x07be8…07c12 Head {h00=0x0026, h01=0x0050, text=» SUK A4,6 ADJUST BUFFER ADDRESS =4«, t00=0x004f, t01=0x00a6}
0x07c12…07c3e Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE MESSAGE ON DWT =4«, t00=0x004f, t01=0x00d0}
0x07c3e…07c54 Head {h00=0x0012, h01=0x0050, text=» RF BRM32A =4«, t00=0x004f, t01=0x00fc}
0x07c54…07c64 Head {h00=0x000c, h01=0x0050, text=» XIF =4«, t00=0x004f, t01=0x0112}
0x07c64…07c7c Head {h00=0x0014, h01=0x0050, text=»BRM329 EQU * =4«, t00=0x004f, t01=0x0122}
0x07c7c…07c84 Head {h00=0x0004, h01=0x0050, t00=0x004f, t01=0x013a}
0x07c84…07ca8 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x004f, t01=0x0142}
0x07ca8…07cd2 Head {h00=0x0026, h01=0x0050, text=» CF A15,DC:MIN MOVE TO USER BUFFER«, t00=0x004f, t01=0x0166}
0x07cd2…07ce4 Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004f, t01=0x0190}
0x07ce4…07cfc Head {h00=0x0014, h01=0x0050, text=»BRM32A EQU * =4«, t00=0x0050, t01=0x0012}
0x07cfc…07d04 Head {h00=0x0004, h01=0x0050, t00=0x0050, t01=0x002a}
0x07d04…07d2c Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0050, t01=0x0032}
0x07d2c…07d3e Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x0050, t01=0x005a}
0x07d3e…07d48 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0050, t01=0x006c}
0x07d48…07d5c Head {h00=0x0010, h01=0x0050, text=»BRM330 EQU *«, t00=0x0050, t01=0x0076}
0x07d5c…07d76 Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1 =4 «, t00=0x0050, t01=0x008a}
0x07d76…07d98 Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 STATUS =4 «, t00=0x0050, t01=0x00a4}
0x07d98…07dbc Head {h00=0x0020, h01=0x0050, text=» RF(N) BRM335 NO REQUEST =4 «, t00=0x0050, t01=0x00c6}
0x07dbc…07ddc Head {h00=0x001c, h01=0x0050, text=» LD A1,DWTOR,A6 ORDER =4«, t00=0x0050, t01=0x00ea}
0x07ddc…07e0c Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4 «, t00=0x0050, t01=0x010a}
0x07e0c…07e36 Head {h00=0x0026, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST =4«, t00=0x0050, t01=0x013a}
0x07e36…07e4e Head {h00=0x0014, h01=0x0050, text=»BRM335 EQU * =4«, t00=0x0050, t01=0x0164}
0x07e4e…07e60 Head {h00=0x000e, h01=0x0050, text=» XIF =4 «, t00=0x0050, t01=0x017c}
0x07e60…07e82 Head {h00=0x001e, h01=0x0050, text=» SUK A4,6 GET BUFFER BASE «, t00=0x0050, t01=0x018e}
0x07e82…07eae Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER FOR DCTASK«, t00=0x0051, t01=0x0020}
0x07eae…07ee0 Head {h00=0x002e, h01=0x0050, text=» CF A15,CKMESS COMPLETE DCTASK READ IF ANY«, t00=0x0051, t01=0x004c}
0x07ee0…07ef4 Head {h00=0x0010, h01=0x0050, text=»BRM340 EQU *«, t00=0x0051, t01=0x007e}
0x07ef4…07f16 Head {h00=0x001e, h01=0x0050, text=» CF A5,TRACK SEND ACK 0/1 «, t00=0x0051, t01=0x0092}
0x07f16…07f26 Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0051, t01=0x00b4}
0x07f26…07f3a Head {h00=0x0010, h01=0x0050, text=»BRM345 EQU *«, t00=0x0051, t01=0x00c4}
0x07f3a…07f4e Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0051, t01=0x00d8}
0x07f4e…07f7e Head {h00=0x002c, h01=0x0050, text=» LD A1,DWTINF,A6 READ-MOD. RECEIVED? DK7«, t00=0x0051, t01=0x00ec}
0x07f7e…07f9a Head {h00=0x0018, h01=0x0050, text=» ANKL A1,/0002 DK7 «, t00=0x0051, t01=0x011c}
0x07f9a…07fd2 Head {h00=0x0034, h01=0x0050, text=» RF(NZ) BRM410 WAIT FOR RESPONSE FROM APPL. DK7 «, t00=0x0051, t01=0x0138}
0x07fd2…07fea Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0051, t01=0x0170}
0x07fea…07ffc Head {h00=0x000e, h01=0x0050, text=» ANK A1,8 «, t00=0x0051, t01=0x0188}
0x07ffc…08024 Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM340 ACK SHOULD BE SENT«, t00=0x0052, t01=0x000a}
0x08024…08044 Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x0052, t01=0x0032}
0x08044…08056 Head {h00=0x000e, h01=0x0050, text=» RF BRM410«, t00=0x0052, t01=0x0052}
0x08056…08062 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x0064}
0x08062…08076 Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0052, t01=0x0070}
0x08076…08088 Head {h00=0x000e, h01=0x0050, text=» RB BRM340«, t00=0x0052, t01=0x0084}
0x08088…08094 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x0096}
0x08094…0809e Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0052, t01=0x00a2}
0x0809e…080a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00ac}
0x080a8…080b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00b6}
0x080b2…080e2 Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x0052, t01=0x00c0}
0x080e2…080ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00f0}
0x080ec…080f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00fa}
0x080f6…0810a Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0052, t01=0x0104}
0x0810a…08132 Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x0052, t01=0x0118}
0x08132…08146 Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x0052, t01=0x0140}
0x08146…0816c Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x0052, t01=0x0154}
0x0816c…081a4 Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x0052, t01=0x017a}
0x081a4…081b6 Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0053, t01=0x0022}
0x081b6…081e0 Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0053, t01=0x0034}
0x081e0…081ee Head {h00=0x000a, h01=0x0050, text=» DB«, t00=0x0053, t01=0x005e}
0x081ee…08222 Head {h00=0x0030, h01=0x0050, text=» LDK A1,/02 INDICATE READ-MOD. RECEIVED DK7 «, t00=0x0053, t01=0x006c}
0x08222…08240 Head {h00=0x001a, h01=0x0050, text=» ORS A1,DWTINF,A6 DK7«, t00=0x0053, t01=0x00a0}
0x08240…08276 Head {h00=0x0032, h01=0x0050, text=» LDKL A1,/4000 SET RETURN CODE =READ-MOD. DK7 «, t00=0x0053, t01=0x00be}
0x08276…082a2 Head {h00=0x0028, h01=0x0050, text=» RB BRM32A COMPLETE THE REQUEST DK7 «, t00=0x0053, t01=0x00f4}
0x082a2…082ae Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x0120}
0x082ae…082b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x012c}
0x082b8…082c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0136}
0x082c2…082e2 Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x0053, t01=0x0140}
0x082e2…082ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0160}
0x082ec…082f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x016a}
0x082f6…0830a Head {h00=0x0010, h01=0x0050, text=»BRM400 EQU *«, t00=0x0053, t01=0x0174}
0x0830a…08334 Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0053, t01=0x0188}
0x08334…08348 Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0054, t01=0x0022}
0x08348…08378 Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM510 RETRANSMISSION OF MESSAGE«, t00=0x0054, t01=0x0036}
0x08378…0838c Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0054, t01=0x0066}
0x0838c…083b2 Head {h00=0x0022, h01=0x0050, text=» RF(Z) BRM410 IN CONTROL STATE«, t00=0x0054, t01=0x007a}
0x083b2…083e4 Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x0054, t01=0x00a0}
0x083e4…083f8 Head {h00=0x0010, h01=0x0050, text=»BRM410 EQU *«, t00=0x0054, t01=0x00d2}
0x083f8…08408 Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0054, t01=0x00e6}
0x08408…08412 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0054, t01=0x00f6}
0x08412…0841c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0100}
0x0841c…08426 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x010a}
0x08426…08446 Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x0054, t01=0x0114}
0x08446…08450 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0134}
0x08450…0845a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x013e}
0x0845a…0846e Head {h00=0x0010, h01=0x0050, text=»BRM500 EQU *«, t00=0x0054, t01=0x0148}
0x0846e…08498 Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0054, t01=0x015c}
0x08498…084ac Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0054, t01=0x0186}
0x084ac…084d0 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM510 ACK EXPECTED «, t00=0x0055, t01=0x000a}
0x084d0…084e4 Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0055, t01=0x002e}
0x084e4…0850a Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 IN CONTROL STATE«, t00=0x0055, t01=0x0042}
0x0850a…0851c Head {h00=0x000e, h01=0x0050, text=» RF BRM636«, t00=0x0055, t01=0x0068}
0x0851c…08530 Head {h00=0x0010, h01=0x0050, text=»BRM510 EQU *«, t00=0x0055, t01=0x007a}
0x08530…0853e Head {h00=0x000a, h01=0x0050, text=» DB«, t00=0x0055, t01=0x008e}
0x0853e…08550 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0055, t01=0x009c}
0x08550…0856c Head {h00=0x0018, h01=0x0050, text=» CIO A1,0,LCUIN DK «, t00=0x0055, t01=0x00ae}
0x0856c…08586 Head {h00=0x0016, h01=0x0050, text=» SST A1,LCUIN DK «, t00=0x0055, t01=0x00ca}
0x08586…085a0 Head {h00=0x0016, h01=0x0050, text=» CF A15,STREG DK «, t00=0x0055, t01=0x00e4}
0x085a0…085ba Head {h00=0x0016, h01=0x0050, text=» CF A15,SETIME DK«, t00=0x0055, t01=0x00fe}
0x085ba…085da Head {h00=0x001c, h01=0x0050, text=» DATA BRM520,TIMNAK DK «, t00=0x0055, t01=0x0118}
0x085da…085f0 Head {h00=0x0012, h01=0x0050, text=» ABL TDISP DK«, t00=0x0055, t01=0x0138}
0x085f0…08608 Head {h00=0x0014, h01=0x0050, text=»BRM520 EQU * DK«, t00=0x0055, t01=0x014e}
0x08608…08622 Head {h00=0x0016, h01=0x0050, text=» CF A15,LDREG DK «, t00=0x0055, t01=0x0166}
0x08622…08630 Head {h00=0x000a, h01=0x0050, text=» DE«, t00=0x0055, t01=0x0180}
0x08630…08656 Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0055, t01=0x018e}
0x08656…0866a Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0056, t01=0x0024}
0x0866a…0867e Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0056, t01=0x0038}
0x0867e…086b2 Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED «, t00=0x0056, t01=0x004c}
0x086b2…086be Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x0080}
0x086be…086f2 Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x0056, t01=0x008c}
0x086f2…0871c Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x0056, t01=0x00c0}
0x0871c…08730 Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0056, t01=0x00ea}
0x08730…08744 Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0056, t01=0x00fe}
0x08744…0874e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0112}
0x0874e…08758 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x011c}
0x08758…08778 Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x0056, t01=0x0126}
0x08778…08782 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0146}
0x08782…0878c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0150}
0x0878c…087a0 Head {h00=0x0010, h01=0x0050, text=»BRM600 EQU *«, t00=0x0056, t01=0x015a}
0x087a0…087ca Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0056, t01=0x016e}
0x087ca…087de Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0057, t01=0x0008}
0x087de…08804 Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 ACK NOT EXPECTED«, t00=0x0057, t01=0x001c}
0x08804…0882e Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x0057, t01=0x0042}
0x0882e…08846 Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1 =8«, t00=0x0057, t01=0x006c}
0x08846…0885e Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0+PAR«, t00=0x0057, t01=0x0084}
0x0885e…08870 Head {h00=0x000e, h01=0x0050, text=» XIF =8 «, t00=0x0057, t01=0x009c}
0x08870…08888 Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1 =8«, t00=0x0057, t01=0x00ae}
0x08888…088a0 Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0 =8«, t00=0x0057, t01=0x00c6}
0x088a0…088b2 Head {h00=0x000e, h01=0x0050, text=» XIF =8 «, t00=0x0057, t01=0x00de}
0x088b2…088c8 Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM620«, t00=0x0057, t01=0x00f0}
0x088c8…088d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0106}
0x088d2…088ec Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x0057, t01=0x0110}
0x088ec…088f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x012a}
0x088f6…08918 Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x0057, t01=0x0134}
0x08918…0893c Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM630 ACK,0 EXPECTED«, t00=0x0057, t01=0x0156}
0x0893c…08950 Head {h00=0x0010, h01=0x0050, text=»BRM610 EQU *«, t00=0x0057, t01=0x017a}
0x08950…0896e Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0057, t01=0x018e}
0x0896e…08998 Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0058, t01=0x001c}
0x08998…089aa Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0058, t01=0x0046}
0x089aa…089be Head {h00=0x0010, h01=0x0050, text=»BRM620 EQU *«, t00=0x0058, t01=0x0058}
0x089be…089d2 Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x0058, t01=0x006c}
0x089d2…089e8 Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM650«, t00=0x0058, t01=0x0080}
0x089e8…089f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0096}
0x089f2…08a0c Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x0058, t01=0x00a0}
0x08a0c…08a16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00ba}
0x08a16…08a3a Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x0058, t01=0x00c4}
0x08a3a…08a62 Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM610 ACK,1 NOT EXPECTED«, t00=0x0058, t01=0x00e8}
0x08a62…08a76 Head {h00=0x0010, h01=0x0050, text=»BRM630 EQU *«, t00=0x0058, t01=0x0110}
0x08a76…08a8a Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0058, t01=0x0124}
0x08a8a…08aac Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM640 ETX NOT SENT«, t00=0x0058, t01=0x0138}
0x08aac…08ab6 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0058, t01=0x015a}
0x08ab6…08ac0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0164}
0x08ac0…08af0 Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x0058, t01=0x016e}
0x08af0…08afa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x000e}
0x08afa…08b14 Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0059, t01=0x0018}
0x08b14…08b28 Head {h00=0x0010, h01=0x0050, text=»BRM635 EQU *«, t00=0x0059, t01=0x0032}
0x08b28…08b3c Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0059, t01=0x0046}
0x08b3c…08b50 Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x0059, t01=0x005a}
0x08b50…08b82 Head {h00=0x002e, h01=0x0050, text=» RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED«, t00=0x0059, t01=0x006e}
0x08b82…08b8e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x00a0}
0x08b8e…08bba Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0059, t01=0x00ac}
0x08bba…08bce Head {h00=0x0010, h01=0x0050, text=»BRM636 EQU *«, t00=0x0059, t01=0x00d8}
0x08bce…08bec Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0059, t01=0x00ec}
0x08bec…08c00 Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0059, t01=0x010a}
0x08c00…08c08 Head {h00=0x0004, h01=0x0050, t00=0x0059, t01=0x011e}
0x08c08…08c2a Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0059, t01=0x0126}
0x08c2a…08c36 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x0148}
0x08c36…08c48 Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0059, t01=0x0154}
0x08c48…08c5c Head {h00=0x0010, h01=0x0050, text=»BRM640 EQU *«, t00=0x0059, t01=0x0166}
0x08c5c…08c6e Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0059, t01=0x017a}
0x08c6e…08c98 Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0059, t01=0x018c}
0x08c98…08cac Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x005a, t01=0x0026}
0x08cac…08cc0 Head {h00=0x0010, h01=0x0050, text=»BRM650 EQU *«, t00=0x005a, t01=0x003a}
0x08cc0…08cd8 Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1 =8«, t00=0x005a, t01=0x004e}
0x08cd8…08cf0 Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI+PAR «, t00=0x005a, t01=0x0066}
0x08cf0…08d02 Head {h00=0x000e, h01=0x0050, text=» XIF =8 «, t00=0x005a, t01=0x007e}
0x08d02…08d1a Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1 =8«, t00=0x005a, t01=0x0090}
0x08d1a…08d32 Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI =8 «, t00=0x005a, t01=0x00a8}
0x08d32…08d44 Head {h00=0x000e, h01=0x0050, text=» XIF =8 «, t00=0x005a, t01=0x00c0}
0x08d44…08d70 Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM610 INVALID DLE SEQUENCE «, t00=0x005a, t01=0x00d2}
0x08d70…08d96 Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x005a, t01=0x00fe}
0x08d96…08daa Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x005a, t01=0x0124}
0x08daa…08dd2 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) BRM660 ETX HAS BEEN SENT«, t00=0x005a, t01=0x0138}
0x08dd2…08dec Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x005a, t01=0x0160}
0x08dec…08dfe Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x005a, t01=0x017a}
0x08dfe…08e12 Head {h00=0x0010, h01=0x0050, text=»BRM660 EQU *«, t00=0x005a, t01=0x018c}
0x08e12…08e2c Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x005b, t01=0x0010}
0x08e2c…08e3e Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x005b, t01=0x002a}
0x08e3e…08e52 Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005b, t01=0x003c}
0x08e52…08e5c Head {h00=0x0006, h01=0x0050, text=» «, t00=0x005b, t01=0x0050}
0x08e5c…08e66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x005a}
0x08e66…08e70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0064}
0x08e70…08e96 Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x005b, t01=0x006e}
0x08e96…08ea0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0094}
0x08ea0…08eaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x009e}
0x08eaa…08ebe Head {h00=0x0010, h01=0x0050, text=»BRM670 EQU *«, t00=0x005b, t01=0x00a8}
0x08ebe…08ee4 Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x005b, t01=0x00bc}
0x08ee4…08f14 Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x005b, t01=0x00e2}
0x08f14…08f38 Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x005b, t01=0x0112}
0x08f38…08f5e Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x005b, t01=0x0136}
0x08f5e…08f80 Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x005b, t01=0x015c}
0x08f80…08f92 Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x005b, t01=0x017e}
0x08f92…08fae Head {h00=0x0018, h01=0x0050, text=» RB(Z) BRM636 NOT DE«, t00=0x005b, t01=0x0190}
0x08fae…08fc4 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x005c, t01=0x001c}
0x08fc4…08fea Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x005c, t01=0x0032}
0x08fea…08ffc Head {h00=0x000e, h01=0x0050, text=» RB BRM636«, t00=0x005c, t01=0x0058}
0x08ffc…09008 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x006a}
0x09008…09012 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x005c, t01=0x0076}
0x09012…0901c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0080}
0x0901c…09026 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x008a}
0x09026…09048 Head {h00=0x001e, h01=0x0050, text=»* SELECT HAS BEEN RECEIVED«, t00=0x005c, t01=0x0094}
0x09048…09052 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00b6}
0x09052…0905c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00c0}
0x0905c…09070 Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x005c, t01=0x00ca}
0x09070…09088 Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK =5 «, t00=0x005c, t01=0x00de}
0x09088…090b6 Head {h00=0x002a, h01=0x0050, text=» RF(NZ) POL010 ERROR. ACK EXPECTED =5 «, t00=0x005c, t01=0x00f6}
0x090b6…090ca Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005c, t01=0x0124}
0x090ca…090ec Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x005c, t01=0x0138}
0x090ec…090fe Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x005c, t01=0x015a}
0x090fe…09110 Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x005c, t01=0x016c}
0x09110…09138 Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL110 NO PENDING STATUS «, t00=0x005c, t01=0x017e}
0x09138…09156 Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x005d, t01=0x0016}
0x09156…09162 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x0034}
0x09162…09176 Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x005d, t01=0x0040}
0x09176…09188 Head {h00=0x000e, h01=0x0050, text=» RF SEL110«, t00=0x005d, t01=0x0054}
0x09188…09194 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x0066}
0x09194…091a8 Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x005d, t01=0x0072}
0x091a8…091b8 Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005d, t01=0x0086}
0x091b8…091cc Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x005d, t01=0x0096}
0x091cc…091e6 Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=1«, t00=0x005d, t01=0x00aa}
0x091e6…091f8 Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x005d, t01=0x00c4}
0x091f8…09214 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SEL115 BUSY «, t00=0x005d, t01=0x00d6}
0x09214…09220 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x00f2}
0x09220…0923a Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=2«, t00=0x005d, t01=0x00fe}
0x0923a…0924c Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x005d, t01=0x0118}
0x0924c…09272 Head {h00=0x0022, h01=0x0050, text=» RF(Z) SEL111 DEVICE NOT BUSY «, t00=0x005d, t01=0x012a}
0x09272…09296 Head {h00=0x0020, h01=0x0050, text=» CF A5,TRWACK TRANSMIT WACK «, t00=0x005d, t01=0x0150}
0x09296…092a6 Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005d, t01=0x0174}
0x092a6…092ba Head {h00=0x0010, h01=0x0050, text=»SEL111 EQU *«, t00=0x005d, t01=0x0184}
0x092ba…092c6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x0008}
0x092c6…092dc Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x005e, t01=0x0014}
0x092dc…09304 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL120 BUFFER AVAILABLE «, t00=0x005e, t01=0x002a}
0x09304…09318 Head {h00=0x0010, h01=0x0050, text=»SEL115 EQU *«, t00=0x005e, t01=0x0052}
0x09318…09332 Head {h00=0x0016, h01=0x0050, text=» IFF STAT+NOWACK=2«, t00=0x005e, t01=0x0066}
0x09332…09352 Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x005e, t01=0x0080}
0x09352…0935e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x00a0}
0x0935e…09370 Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005e, t01=0x00ac}
0x09370…09384 Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x005e, t01=0x00be}
0x09384…093b4 Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x005e, t01=0x00d2}
0x093b4…093d4 Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x005e, t01=0x0102}
0x093d4…093e6 Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005e, t01=0x0122}
0x093e6…093f0 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x005e, t01=0x0134}
0x093f0…093fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x013e}
0x093fa…09404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0148}
0x09404…09428 Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x005e, t01=0x0152}
0x09428…09432 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0176}
0x09432…0943c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0180}
0x0943c…09450 Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x005e, t01=0x018a}
0x09450…09470 Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x005f, t01=0x000e}
0x09470…09494 Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005f, t01=0x002e}
0x09494…094a8 Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x005f, t01=0x0052}
0x094a8…094da Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x005f, t01=0x0066}
0x094da…094e6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x0098}
0x094e6…0950e Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x005f, t01=0x00a4}
0x0950e…0951e Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x005f, t01=0x00cc}
0x0951e…09544 Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x005f, t01=0x00dc}
0x09544…09554 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x005f, t01=0x0102}
0x09554…0955e Head {h00=0x0006, h01=0x0050, text=» «, t00=0x005f, t01=0x0112}
0x0955e…09568 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x011c}
0x09568…09572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0126}
0x09572…0959a Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x005f, t01=0x0130}
0x0959a…095a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0158}
0x095a4…095ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0162}
0x095ae…095c2 Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x005f, t01=0x016c}
0x095c2…095da Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK =5 «, t00=0x005f, t01=0x0180}
0x095da…09604 Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL020 ACK NOT EXPECTED =5 «, t00=0x0060, t01=0x0008}
0x09604…0962a Head {h00=0x0022, h01=0x0050, text=»POL010 CF A5,TRENQ SEND ENQ =5«, t00=0x0060, t01=0x0032}
0x0962a…09658 Head {h00=0x002a, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER =5 «, t00=0x0060, t01=0x0058}
0x09658…0967e Head {h00=0x0022, h01=0x0050, text=» ABL BRM WAIT FOR RESPONSE =5 «, t00=0x0060, t01=0x0086}
0x0967e…09696 Head {h00=0x0014, h01=0x0050, text=»POL020 EQU * =5«, t00=0x0060, t01=0x00ac}
0x09696…096bc Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x0060, t01=0x00c4}
0x096bc…096d0 Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0060, t01=0x00ea}
0x096d0…096e6 Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ «, t00=0x0060, t01=0x00fe}
0x096e6…09710 Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL110 NO STATUS TO BE SENT«, t00=0x0060, t01=0x0114}
0x09710…09736 Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTSQ GET DWT ADDRESS «, t00=0x0060, t01=0x013e}
0x09736…0974a Head {h00=0x0010, h01=0x0050, text=»POL050 EQU *«, t00=0x0060, t01=0x0164}
0x0974a…0976a Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x0060, t01=0x0178}
0x0976a…09794 Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0061, t01=0x0008}
0x09794…097b8 Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x0061, t01=0x0032}
0x097b8…097c4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x0056}
0x097c4…097d8 Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0061, t01=0x0062}
0x097d8…097ea Head {h00=0x000e, h01=0x0050, text=» RF POL110«, t00=0x0061, t01=0x0076}
0x097ea…097f6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x0088}
0x097f6…0980a Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x0061, t01=0x0094}
0x0980a…0981a Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0061, t01=0x00a8}
0x0981a…0982e Head {h00=0x0010, h01=0x0050, text=»POL110 EQU *«, t00=0x0061, t01=0x00b8}
0x0982e…09842 Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x0061, t01=0x00cc}
0x09842…09868 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 WRITE ON QUEUE «, t00=0x0061, t01=0x00e0}
0x09868…0987c Head {h00=0x0010, h01=0x0050, text=»POL115 EQU *«, t00=0x0061, t01=0x0106}
0x0987c…0989a Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0061, t01=0x011a}
0x0989a…098ac Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x0061, t01=0x0138}
0x098ac…098c0 Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x0061, t01=0x014a}
0x098c0…098e6 Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTWQ GET DWT ADDRESS «, t00=0x0061, t01=0x015e}
0x098e6…098fa Head {h00=0x0010, h01=0x0050, text=»POL125 EQU *«, t00=0x0061, t01=0x0184}
0x098fa…09922 Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0062, t01=0x0008}
0x09922…09938 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL126«, t00=0x0062, t01=0x0030}
0x09938…0994e Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x0062, t01=0x0046}
0x0994e…09960 Head {h00=0x000e, h01=0x0050, text=» RB POL115«, t00=0x0062, t01=0x005c}
0x09960…09974 Head {h00=0x0010, h01=0x0050, text=»POL126 EQU *«, t00=0x0062, t01=0x006e}
0x09974…09998 Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x0062, t01=0x0082}
0x09998…099b6 Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0062, t01=0x00a6}
0x099b6…099be Head {h00=0x0004, h01=0x0050, t00=0x0062, t01=0x00c4}
0x099be…099d4 Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x0062, t01=0x00cc}
0x099d4…099fc Head {h00=0x0024, h01=0x0050, text=» LDKL A4,MMUBUF MMU WORK BUFFER «, t00=0x0062, t01=0x00e2}
0x099fc…09a14 Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x0062, t01=0x010a}
0x09a14…09a46 Head {h00=0x002e, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA FROM USER BUFFER «, t00=0x0062, t01=0x0122}
0x09a46…09a52 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0062, t01=0x0154}
0x09a52…09a7c Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x0062, t01=0x0160}
0x09a7c…09a9e Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x0062, t01=0x018a}
0x09a9e…09ab2 Head {h00=0x0010, h01=0x0050, text=»POL127 EQU *«, t00=0x0063, t01=0x001c}
0x09ab2…09adc Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x0063, t01=0x0030}
0x09adc…09b08 Head {h00=0x0028, h01=0x0050, text=» SUK A3,2 SKIP FIRST WORD OF BUFFER «, t00=0x0063, t01=0x005a}
0x09b08…09b2a Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x0063, t01=0x0086}
0x09b2a…09b4e Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x0063, t01=0x00a8}
0x09b4e…09b62 Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x0063, t01=0x00cc}
0x09b62…09b84 Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x0063, t01=0x00e0}
0x09b84…09b94 Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0063, t01=0x0102}
0x09b94…09bb8 Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x0063, t01=0x0112}
0x09bb8…09be2 Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0063, t01=0x0136}
0x09be2…09c06 Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x0063, t01=0x0160}
0x09c06…09c18 Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x0063, t01=0x0184}
0x09c18…09c28 Head {h00=0x000c, h01=0x0050, text=» EJECT «, t00=0x0064, t01=0x0008}
0x09c28…09c32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0018}
0x09c32…09c5e Head {h00=0x0028, h01=0x0050, text=»* PROCESS RESPONSE TO READ MODIFIED «, t00=0x0064, t01=0x0022}
0x09c5e…09c68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x004e}
0x09c68…09c82 Head {h00=0x0016, h01=0x0050, text=»SPOLLX EQU * DK7 «, t00=0x0064, t01=0x0058}
0x09c82…09cac Head {h00=0x0026, h01=0x0050, text=» LDK A1,/06 FAKE A WRITE REQUEST «, t00=0x0064, t01=0x0072}
0x09cac…09cc8 Head {h00=0x0018, h01=0x0050, text=» ST A1,DWTOR,A6 DK7«, t00=0x0064, t01=0x009c}
0x09cc8…09d02 Head {h00=0x0036, h01=0x0050, text=» LDKL A1,/FFFF-/0002 CLEAR READ MODIFIED FLAG DK7 «, t00=0x0064, t01=0x00b8}
0x09d02…09d1c Head {h00=0x0016, h01=0x0050, text=» ANS A1,DWTINF,A6 «, t00=0x0064, t01=0x00f2}
0x09d1c…09d44 Head {h00=0x0024, h01=0x0050, text=» LDKL A5,STB SET STACK BASE DK7 «, t00=0x0064, t01=0x010c}
0x09d44…09d72 Head {h00=0x002a, h01=0x0050, text=» RF SPOLL PROCESS AS SPECIFIC POLL DK7«, t00=0x0064, t01=0x0134}
0x09d72…09d7c Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0064, t01=0x0162}
0x09d7c…09d86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x016c}
0x09d86…09d90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0176}
0x09d90…09dba Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x0064, t01=0x0180}
0x09dba…09dc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x001a}
0x09dc4…09dce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0024}
0x09dce…09de2 Head {h00=0x0010, h01=0x0050, text=»SPOLL EQU * «, t00=0x0065, t01=0x002e}
0x09de2…09dfc Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0065, t01=0x0042}
0x09dfc…09e14 Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK =5 «, t00=0x0065, t01=0x005c}
0x09e14…09e3a Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL010 ACK EXPECTED =5«, t00=0x0065, t01=0x0074}
0x09e3a…09e54 Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x0065, t01=0x009a}
0x09e54…09e78 Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x0065, t01=0x00b4}
0x09e78…09e96 Head {h00=0x001a, h01=0x0050, text=» LDR A6,A7 RESTORE A6 «, t00=0x0065, t01=0x00d8}
0x09e96…09eaa Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0065, t01=0x00f6}
0x09eaa…09ecc Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0065, t01=0x010a}
0x09ecc…09ede Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x0065, t01=0x012c}
0x09ede…09f04 Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL050 PENDING STATUS «, t00=0x0065, t01=0x013e}
0x09f04…09f10 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0065, t01=0x0164}
0x09f10…09f2a Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0065, t01=0x0170}
0x09f2a…09f42 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0065, t01=0x018a}
0x09f42…09f62 Head {h00=0x001c, h01=0x0050, text=» RB(N) POL115 NO REQUEST«, t00=0x0066, t01=0x0012}
0x09f62…09f84 Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x0066, t01=0x0032}
0x09f84…09f96 Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x0066, t01=0x0054}
0x09f96…09fba Head {h00=0x0020, h01=0x0050, text=» RB(Z) POL125 WRITE REQUEST «, t00=0x0066, t01=0x0066}
0x09fba…09fcc Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0066, t01=0x008a}
0x09fcc…09ff2 Head {h00=0x0022, h01=0x0050, text=» RB(Z) POL125 EXCHANGE REQUEST«, t00=0x0066, t01=0x009c}
0x09ff2…09ffe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0066, t01=0x00c2}
0x09ffe…0a01a Head {h00=0x0018, h01=0x0050, text=» RB POL115 SEND EOT «, t00=0x0066, t01=0x00ce}
0x0a01a…0a024 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0066, t01=0x00ea}
0x0a024…0a02e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00f4}
0x0a02e…0a038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00fe}
0x0a038…0a074 Head {h00=0x0038, h01=0x0050, text=»* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED «, t00=0x0066, t01=0x0108}
0x0a074…0a07e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0144}
0x0a07e…0a0a0 Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x0066, t01=0x014e}
0x0a0a0…0a0aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0170}
0x0a0aa…0a0b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x017a}
0x0a0b4…0a0d0 Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x0066, t01=0x0184}
0x0a0d0…0a0f8 Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x0067, t01=0x0010}
0x0a0f8…0a10c Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0067, t01=0x0038}
0x0a10c…0a134 Head {h00=0x0024, h01=0x0050, text=» LD A2,XRB IF RCOM, SKIP IT DK6 «, t00=0x0067, t01=0x004c}
0x0a134…0a150 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) CWR900 DK6 «, t00=0x0067, t01=0x0074}
0x0a150…0a160 Head {h00=0x000c, h01=0x0050, text=» XIF «, t00=0x0067, t01=0x0090}
0x0a160…0a178 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0067, t01=0x00a0}
0x0a178…0a198 Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x0067, t01=0x00b8}
0x0a198…0a1ba Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x0067, t01=0x00d8}
0x0a1ba…0a1cc Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x0067, t01=0x00fa}
0x0a1cc…0a1f0 Head {h00=0x0020, h01=0x0050, text=» RF(Z) CWR100 WRITE REQUEST «, t00=0x0067, t01=0x010c}
0x0a1f0…0a202 Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0067, t01=0x0130}
0x0a202…0a22e Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CWR900 NOT EXCHANGE REQUEST «, t00=0x0067, t01=0x0142}
0x0a22e…0a240 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0067, t01=0x016e}
0x0a240…0a276 Head {h00=0x0032, h01=0x0050, text=» RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO«, t00=0x0067, t01=0x0180}
0x0a276…0a296 Head {h00=0x001c, h01=0x0050, text=» LDK A2,2 TRANMISSION OK«, t00=0x0068, t01=0x0026}
0x0a296…0a2c2 Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTOR,A6 INDICATE READ ORDER «, t00=0x0068, t01=0x0046}
0x0a2c2…0a2d4 Head {h00=0x000e, h01=0x0050, text=» RF CWR150«, t00=0x0068, t01=0x0072}
0x0a2d4…0a2fe Head {h00=0x0026, h01=0x0050, text=»CWR100 LD A8,FECB GET ECB ADDRESS «, t00=0x0068, t01=0x0084}
0x0a2fe…0a320 Head {h00=0x001e, h01=0x0050, text=» CF A15,CTIME STOP TIMING «, t00=0x0068, t01=0x00ae}
0x0a320…0a332 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0068, t01=0x00d0}
0x0a332…0a348 Head {h00=0x0012, h01=0x0050, text=» RF(Z) CWR150 «, t00=0x0068, t01=0x00e2}
0x0a348…0a360 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x0068, t01=0x00f8}
0x0a360…0a388 Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0068, t01=0x0110}
0x0a388…0a39c Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x0068, t01=0x0138}
0x0a39c…0a3ca Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0068, t01=0x014c}
0x0a3ca…0a3de Head {h00=0x0010, h01=0x0050, text=»CWR200 EQU *«, t00=0x0068, t01=0x017a}
0x0a3de…0a3f2 Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x0068, t01=0x018e}
0x0a3f2…0a418 Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0069, t01=0x0012}
0x0a418…0a42a Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0069, t01=0x0038}
0x0a42a…0a43e Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0069, t01=0x004a}
0x0a43e…0a464 Head {h00=0x0022, h01=0x0050, text=» LD A2,XRB READ MODIFIED ? DK6«, t00=0x0069, t01=0x005e}
0x0a464…0a47e Head {h00=0x0016, h01=0x0050, text=» RF(Z) CWR910 DK6«, t00=0x0069, t01=0x0084}
0x0a47e…0a4a6 Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTCUR,A6 RESTORE ECB DK6«, t00=0x0069, t01=0x009e}
0x0a4a6…0a4c4 Head {h00=0x001a, h01=0x0050, text=» ST A2,DWTECB,A6 DK6 «, t00=0x0069, t01=0x00c6}
0x0a4c4…0a4de Head {h00=0x0016, h01=0x0050, text=»CWR910 EQU * DK6 «, t00=0x0069, t01=0x00e4}
0x0a4de…0a4ec Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x0069, t01=0x00fe}
0x0a4ec…0a4fc Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0069, t01=0x010c}
0x0a4fc…0a506 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0069, t01=0x011c}
0x0a506…0a510 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0126}
0x0a510…0a51a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0130}
0x0a51a…0a538 Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x0069, t01=0x013a}
0x0a538…0a542 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0158}
0x0a542…0a562 Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x0069, t01=0x0162}
0x0a562…0a58e Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x0069, t01=0x0182}
0x0a58e…0a5c4 Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x006a, t01=0x001e}
0x0a5c4…0a5f0 Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x006a, t01=0x0054}
0x0a5f0…0a5fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0080}
0x0a5fa…0a60e Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x006a, t01=0x008a}
0x0a60e…0a636 Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x006a, t01=0x009e}
0x0a636…0a656 Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x006a, t01=0x00c6}
0x0a656…0a668 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x006a, t01=0x00e6}
0x0a668…0a67c Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x006a, t01=0x00f8}
0x0a67c…0a6a4 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x006a, t01=0x010c}
0x0a6a4…0a6ca Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x006a, t01=0x0134}
0x0a6ca…0a6dc Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x006a, t01=0x015a}
0x0a6dc…0a6f0 Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x006a, t01=0x016c}
0x0a6f0…0a704 Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x006a, t01=0x0180}
0x0a704…0a728 (107, 0, 400) Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x006b, t01=0x0004}
0x0a728…0a754 Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x006b, t01=0x0028}
0x0a754…0a768 Head {h00=0x0010, h01=0x0050, text=»RDM075 EQU *«, t00=0x006b, t01=0x0054}
0x0a768…0a778 Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x006b, t01=0x0068}
0x0a778…0a794 Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x006b, t01=0x0078}
0x0a794…0a79c Head {h00=0x0004, h01=0x0050, t00=0x006b, t01=0x0094}
0x0a79c…0a7b2 Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x006b, t01=0x009c}
0x0a7b2…0a7c6 Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x006b, t01=0x00b2}
0x0a7c6…0a7ec Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x006b, t01=0x00c6}
0x0a7ec…0a800 Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x006b, t01=0x00ec}
0x0a800…0a824 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x006b, t01=0x0100}
0x0a824…0a838 Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x006b, t01=0x0124}
0x0a838…0a84e Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x006b, t01=0x0138}
0x0a84e…0a87c Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x006b, t01=0x014e}
0x0a87c…0a890 Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x006b, t01=0x017c}
0x0a890…0a89c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006b, t01=0x0190}
0x0a89c…0a8b0 Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x006c, t01=0x000c}
0x0a8b0…0a8d8 Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x006c, t01=0x0020}
0x0a8d8…0a8fc Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x006c, t01=0x0048}
0x0a8fc…0a910 Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x006c, t01=0x006c}
0x0a910…0a924 Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x006c, t01=0x0080}
0x0a924…0a946 Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x006c, t01=0x0094}
0x0a946…0a95a Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x006c, t01=0x00b6}
0x0a95a…0a97c Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x006c, t01=0x00ca}
0x0a97c…0a990 Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x006c, t01=0x00ec}
0x0a990…0a9b2 Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x006c, t01=0x0100}
0x0a9b2…0a9c6 Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x006c, t01=0x0122}
0x0a9c6…0a9fc Head {h00=0x0032, h01=0x0050, text=» RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE «, t00=0x006c, t01=0x0136}
0x0a9fc…0aa10 Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x006c, t01=0x016c}
0x0aa10…0aa38 Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x006c, t01=0x0180}
0x0aa38…0aa40 Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0018}
0x0aa40…0aa54 Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x006d, t01=0x0020}
0x0aa54…0aa6a Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x006d, t01=0x0034}
0x0aa6a…0aa72 Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x004a}
0x0aa72…0aa84 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x006d, t01=0x0052}
0x0aa84…0aa9a Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x006d, t01=0x0064}
0x0aa9a…0aabc Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x006d, t01=0x007a}
0x0aabc…0aace Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x006d, t01=0x009c}
0x0aace…0aaf0 Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x006d, t01=0x00ae}
0x0aaf0…0ab02 Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x006d, t01=0x00d0}
0x0ab02…0ab14 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x006d, t01=0x00e2}
0x0ab14…0ab42 Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x006d, t01=0x00f4}
0x0ab42…0ab66 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x006d, t01=0x0122}
0x0ab66…0ab94 Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x006d, t01=0x0146}
0x0ab94…0aba6 Head {h00=0x000e, h01=0x0050, text=» ORR A2,A8«, t00=0x006d, t01=0x0174}
0x0aba6…0abba Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x006d, t01=0x0186}
0x0abba…0abc6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x000a}
0x0abc6…0abce Head {h00=0x0004, h01=0x0050, t00=0x006e, t01=0x0016}
0x0abce…0abf0 Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x006e, t01=0x001e}
0x0abf0…0ac14 Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x006e, t01=0x0040}
0x0ac14…0ac3c Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x006e, t01=0x0064}
0x0ac3c…0ac50 Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x006e, t01=0x008c}
0x0ac50…0ac6c Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x006e, t01=0x00a0}
0x0ac6c…0ac90 Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x006e, t01=0x00bc}
0x0ac90…0ac9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00e0}
0x0ac9a…0acb4 Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x006e, t01=0x00ea}
0x0acb4…0acbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0104}
0x0acbe…0acdc Head {h00=0x001a, h01=0x0050, text=» RF RDM140 ABORT INPUT«, t00=0x006e, t01=0x010e}
0x0acdc…0acf0 Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x006e, t01=0x012c}
0x0acf0…0ad1a Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x006e, t01=0x0140}
0x0ad1a…0ad2e Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x006e, t01=0x016a}
0x0ad2e…0ad56 Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x006e, t01=0x017e}
0x0ad56…0ad68 Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x006f, t01=0x0016}
0x0ad68…0ad72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0028}
0x0ad72…0ad88 Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x006f, t01=0x0032}
0x0ad88…0ad92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0048}
0x0ad92…0ada6 Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x006f, t01=0x0052}
0x0ada6…0adce Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x006f, t01=0x0066}
0x0adce…0adf2 Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x006f, t01=0x008e}
0x0adf2…0ae28 Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x006f, t01=0x00b2}
0x0ae28…0ae3c Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x006f, t01=0x00e8}
0x0ae3c…0ae50 Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x006f, t01=0x00fc}
0x0ae50…0ae70 Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x006f, t01=0x0110}
0x0ae70…0ae7c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x0130}
0x0ae7c…0ae90 Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x006f, t01=0x013c}
0x0ae90…0aeba Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x006f, t01=0x0150}
0x0aeba…0aeda Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x006f, t01=0x017a}
0x0aeda…0aee6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x000a}
0x0aee6…0aefa Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x0070, t01=0x0016}
0x0aefa…0af24 Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x0070, t01=0x002a}
0x0af24…0af38 Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x0070, t01=0x0054}
0x0af38…0af60 Head {h00=0x0024, h01=0x0050, text=» LDR A7,A3 SAVE RESULT REGISTER «, t00=0x0070, t01=0x0068}
0x0af60…0af80 Head {h00=0x001c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT«, t00=0x0070, t01=0x0090}
0x0af80…0af94 Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0070, t01=0x00b0}
0x0af94…0afb4 Head {h00=0x001c, h01=0x0050, text=» ORR A7,A1 PARITY ERROR «, t00=0x0070, t01=0x00c4}
0x0afb4…0afc2 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x0070, t01=0x00e4}
0x0afc2…0afd2 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0070, t01=0x00f2}
0x0afd2…0afdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0102}
0x0afdc…0aff2 Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x0070, t01=0x010c}
0x0aff2…0affc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0122}
0x0affc…0b010 Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x0070, t01=0x012c}
0x0b010…0b022 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0070, t01=0x0140}
0x0b022…0b048 Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x0070, t01=0x0152}
0x0b048…0b06e Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x0070, t01=0x0178}
0x0b06e…0b080 Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x0071, t01=0x000e}
0x0b080…0b08a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0020}
0x0b08a…0b0a0 Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x0071, t01=0x002a}
0x0b0a0…0b0aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0040}
0x0b0aa…0b0be Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x0071, t01=0x004a}
0x0b0be…0b0d2 Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0071, t01=0x005e}
0x0b0d2…0b0e6 Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x0071, t01=0x0072}
0x0b0e6…0b10c Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x0071, t01=0x0086}
0x0b10c…0b118 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x00ac}
0x0b118…0b12c Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0071, t01=0x00b8}
0x0b12c…0b156 Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x0071, t01=0x00cc}
0x0b156…0b17c Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x0071, t01=0x00f6}
0x0b17c…0b188 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x011c}
0x0b188…0b19a Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x0071, t01=0x0128}
0x0b19a…0b1a4 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0071, t01=0x013a}
0x0b1a4…0b1ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0144}
0x0b1ae…0b1cc Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x0071, t01=0x014e}
0x0b1cc…0b1d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x016c}
0x0b1d6…0b1ec Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x0071, t01=0x0176}
0x0b1ec…0b20e Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x0071, t01=0x018c}
0x0b20e…0b238 Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x0072, t01=0x001e}
0x0b238…0b24e Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x0072, t01=0x0048}
0x0b24e…0b26c Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x0072, t01=0x005e}
0x0b26c…0b27e Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x0072, t01=0x007c}
0x0b27e…0b288 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x008e}
0x0b288…0b2a0 Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x0072, t01=0x0098}
0x0b2a0…0b2aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00b0}
0x0b2aa…0b2ce Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x0072, t01=0x00ba}
0x0b2ce…0b2e0 Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x0072, t01=0x00de}
0x0b2e0…0b2ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00f0}
0x0b2ea…0b300 Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x0072, t01=0x00fa}
0x0b300…0b30a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0110}
0x0b30a…0b31e Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0072, t01=0x011a}
0x0b31e…0b340 Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x0072, t01=0x012e}
0x0b340…0b34c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x0150}
0x0b34c…0b356 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x015c}
0x0b356…0b36c Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x0072, t01=0x0166}
0x0b36c…0b376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x017c}
0x0b376…0b398 Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x0072, t01=0x0186}
0x0b398…0b3be Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x0073, t01=0x0018}
0x0b3be…0b3d6 Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x0073, t01=0x003e}
0x0b3d6…0b3e8 Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x0073, t01=0x0056}
0x0b3e8…0b3f2 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0073, t01=0x0068}
0x0b3f2…0b3fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0072}
0x0b3fc…0b412 Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x0073, t01=0x007c}
0x0b412…0b41c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0092}
0x0b41c…0b43e Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x0073, t01=0x009c}
0x0b43e…0b450 Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0073, t01=0x00be}
0x0b450…0b45a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00d0}
0x0b45a…0b470 Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x0073, t01=0x00da}
0x0b470…0b47a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00f0}
0x0b47a…0b49c Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x0073, t01=0x00fa}
0x0b49c…0b4ae Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0073, t01=0x011c}
0x0b4ae…0b4b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x012e}
0x0b4b8…0b4ce Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x0073, t01=0x0138}
0x0b4ce…0b4d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x014e}
0x0b4d8…0b4fa Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x0073, t01=0x0158}
0x0b4fa…0b504 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x017a}
0x0b504…0b530 Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x0073, t01=0x0184}
0x0b530…0b544 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0074, t01=0x0020}
0x0b544…0b55c Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x0074, t01=0x0034}
0x0b55c…0b584 Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x0074, t01=0x004c}
0x0b584…0b5ae Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x0074, t01=0x0074}
0x0b5ae…0b5cc Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0074, t01=0x009e}
0x0b5cc…0b5f6 Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x0074, t01=0x00bc}
0x0b5f6…0b614 Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0074, t01=0x00e6}
0x0b614…0b62e Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x0074, t01=0x0104}
0x0b62e…0b64c Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x0074, t01=0x011e}
0x0b64c…0b660 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0074, t01=0x013c}
0x0b660…0b676 Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x0074, t01=0x0150}
0x0b676…0b688 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0074, t01=0x0166}
0x0b688…0b6b0 Head {h00=0x0024, h01=0x0050, text=» CIO A2,0,LCUUT STOP TRANSMITTER«, t00=0x0074, t01=0x0178}
0x0b6b0…0b6c6 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=1 «, t00=0x0075, t01=0x0010}
0x0b6c6…0b6e6 Head {h00=0x001c, h01=0x0050, text=» CF A5,READ WAIT FOR END«, t00=0x0075, t01=0x0026}
0x0b6e6…0b6f4 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x0075, t01=0x0046}
0x0b6f4…0b71e Head {h00=0x0026, h01=0x0050, text=» SST A2,LCUUT PERFORM SST AT ONCE «, t00=0x0075, t01=0x0054}
0x0b71e…0b732 Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0075, t01=0x007e}
0x0b732…0b75e Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x0075, t01=0x0092}
0x0b75e…0b76a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x00be}
0x0b76a…0b77a Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0075, t01=0x00ca}
0x0b77a…0b784 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0075, t01=0x00da}
0x0b784…0b78e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00e4}
0x0b78e…0b798 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00ee}
0x0b798…0b7ba Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x0075, t01=0x00f8}
0x0b7ba…0b7c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x011a}
0x0b7c4…0b7ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0124}
0x0b7ce…0b7e2 Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x0075, t01=0x012e}
0x0b7e2…0b804 Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0075, t01=0x0142}
0x0b804…0b81a Head {h00=0x0012, h01=0x0050, text=» IFT TSTREQ=1 «, t00=0x0075, t01=0x0164}
0x0b81a…0b824 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x017a}
0x0b824…0b82e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0184}
0x0b82e…0b84e Head {h00=0x001c, h01=0x0050, text=»* TEST REQUEST HANDLING «, t00=0x0075, t01=0x018e}
0x0b84e…0b858 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x001e}
0x0b858…0b862 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0028}
0x0b862…0b876 Head {h00=0x0010, h01=0x0050, text=» LD A4,FBAX «, t00=0x0076, t01=0x0032}
0x0b876…0b8a2 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TRT050 NOT START OF MESSAGE «, t00=0x0076, t01=0x0046}
0x0b8a2…0b8aa Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x0072}
0x0b8aa…0b8e0 Head {h00=0x0032, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? «, t00=0x0076, t01=0x007a}
0x0b8e0…0b8fe Head {h00=0x001a, h01=0x0050, text=» RF(NZ) TRT050 YES !! «, t00=0x0076, t01=0x00b0}
0x0b8fe…0b906 Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x00ce}
0x0b906…0b91c Head {h00=0x0012, h01=0x0050, text=» LD A4,FECBBA «, t00=0x0076, t01=0x00d6}
0x0b91c…0b942 Head {h00=0x0022, h01=0x0050, text=» LC A3,+2,A4 GET AID CHARACTER«, t00=0x0076, t01=0x00ec}
0x0b942…0b956 Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x0076, t01=0x0112}
0x0b956…0b97e Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TRT050 NOT TEST REQUEST «, t00=0x0076, t01=0x0126}
0x0b97e…0b992 Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0076, t01=0x014e}
0x0b992…0b9b0 Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0076, t01=0x0162}
0x0b9b0…0b9cc Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET BCC «, t00=0x0076, t01=0x0180}
0x0b9cc…0b9e0 Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0077, t01=0x000c}
0x0b9e0…0b9fc Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND % «, t00=0x0077, t01=0x0020}
0x0b9fc…0ba10 Head {h00=0x0010, h01=0x0050, text=» LDK A2,'/' «, t00=0x0077, t01=0x003c}
0x0ba10…0ba2c Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND / «, t00=0x0077, t01=0x0050}
0x0ba2c…0ba40 Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0077, t01=0x006c}
0x0ba40…0ba5e Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0077, t01=0x0080}
0x0ba5e…0ba8a Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0077, t01=0x009e}
0x0ba8a…0bab6 Head {h00=0x0028, h01=0x0050, text=» ADK A4,5 SKIP AID + CURSOR ADDRESS «, t00=0x0077, t01=0x00ca}
0x0bab6…0bad6 Head {h00=0x001c, h01=0x0050, text=» LDK A3,5 ADJUST LENGTH «, t00=0x0077, t01=0x00f6}
0x0bad6…0bae8 Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x0077, t01=0x0116}
0x0bae8…0bafc Head {h00=0x0010, h01=0x0050, text=» ST A2,FBAX «, t00=0x0077, t01=0x0128}
0x0bafc…0bb0e Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0077, t01=0x013c}
0x0bb0e…0bb22 Head {h00=0x0010, h01=0x0050, text=»TRT050 EQU *«, t00=0x0077, t01=0x014e}
0x0bb22…0bb2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0162}
0x0bb2c…0bb36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x016c}
0x0bb36…0bb40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0176}
0x0bb40…0bb4c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0077, t01=0x0180}
0x0bb4c…0bb60 Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0077, t01=0x018c}
0x0bb60…0bb7e Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0078, t01=0x0010}
0x0bb7e…0bb9a Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0078, t01=0x002e}
0x0bb9a…0bbc2 Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x0078, t01=0x004a}
0x0bbc2…0bbe6 Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0078, t01=0x0072}
0x0bbe6…0bc12 Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0078, t01=0x0096}
0x0bc12…0bc3e Head {h00=0x0028, h01=0x0050, text=» ADK A4,2 SKIP FIRST WORD OF BUFFER «, t00=0x0078, t01=0x00c2}
0x0bc3e…0bc68 Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x0078, t01=0x00ee}
0x0bc68…0bc8c Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x0078, t01=0x0118}
0x0bc8c…0bcb2 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x0078, t01=0x013c}
0x0bcb2…0bcd2 Head {h00=0x001c, h01=0x0050, text=» LC A2,DW1500+1 GET TCA «, t00=0x0078, t01=0x0162}
0x0bcd2…0bcf0 Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0078, t01=0x0182}
0x0bcf0…0bd0c Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0079, t01=0x0010}
0x0bd0c…0bd2a Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0079, t01=0x002c}
0x0bd2a…0bd40 Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0079, t01=0x004a}
0x0bd40…0bd54 Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x0079, t01=0x0060}
0x0bd54…0bd7a Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x0079, t01=0x0074}
0x0bd7a…0bd90 Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0079, t01=0x009a}
0x0bd90…0bdb6 Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x0079, t01=0x00b0}
0x0bdb6…0bdcc Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0079, t01=0x00d6}
0x0bdcc…0bde0 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x0079, t01=0x00ec}
0x0bde0…0bdf6 Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0079, t01=0x0100}
0x0bdf6…0be02 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x0116}
0x0be02…0be16 Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0079, t01=0x0122}
0x0be16…0be1e Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x0136}
0x0be1e…0be36 Head {h00=0x0014, h01=0x0050, text=» RF TRT070 DK6 «, t00=0x0079, t01=0x013e}
0x0be36…0be3e Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x0156}
0x0be3e…0be5e Head {h00=0x001c, h01=0x0050, text=» ******************** «, t00=0x0079, t01=0x015e}
0x0be5e…0be84 Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x0079, t01=0x017e}
0x0be84…0bea8 Head {h00=0x0020, h01=0x0050, text=»TRT060 CF A5,WRITEP SEND AID«, t00=0x007a, t01=0x0014}
0x0bea8…0beb0 Head {h00=0x0004, h01=0x0050, t00=0x007a, t01=0x0038}
0x0beb0…0bed8 Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x007a, t01=0x0040}
0x0bed8…0bf0a Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x007a, t01=0x0068}
0x0bf0a…0bf2c Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x007a, t01=0x009a}
0x0bf2c…0bf3e Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x007a, t01=0x00bc}
0x0bf3e…0bf52 Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x007a, t01=0x00ce}
0x0bf52…0bf5e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x00e2}
0x0bf5e…0bf66 Head {h00=0x0004, h01=0x0050, t00=0x007a, t01=0x00ee}
0x0bf66…0bf78 Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x007a, t01=0x00f6}
0x0bf78…0bf8c Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x007a, t01=0x0108}
0x0bf8c…0bfb0 Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x007a, t01=0x011c}
0x0bfb0…0bfd4 Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x007a, t01=0x0140}
0x0bfd4…0bfe8 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x007a, t01=0x0164}
0x0bfe8…0bffc Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x007a, t01=0x0178}
0x0bffc…0c014 Head {h00=0x0014, h01=0x0050, text=» RF TRT105 DK6 «, t00=0x007a, t01=0x018c}
0x0c014…0c01c Head {h00=0x0004, h01=0x0050, t00=0x007b, t01=0x0014}
0x0c01c…0c060 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x007b, t01=0x001c}
0x0c060…0c06a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0060}
0x0c06a…0c09a Head {h00=0x002c, h01=0x0050, text=»* CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x007b, t01=0x006a}
0x0c09a…0c0a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x009a}
0x0c0a4…0c0dc Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x007b, t01=0x00a4}
0x0c0dc…0c0e4 Head {h00=0x0004, h01=0x0050, t00=0x007b, t01=0x00dc}
0x0c0e4…0c10e Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x007b, t01=0x00e4}
0x0c10e…0c12a Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x007b, t01=0x010e}
0x0c12a…0c136 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007b, t01=0x012a}
0x0c136…0c14a Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x007b, t01=0x0136}
0x0c14a…0c16a Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x007b, t01=0x014a}
0x0c16a…0c190 Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x007b, t01=0x016a}
0x0c190…0c1a4 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x007b, t01=0x0190}
0x0c1a4…0c1b8 Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x007c, t01=0x0014}
0x0c1b8…0c1dc Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x007c, t01=0x0028}
0x0c1dc…0c202 Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x007c, t01=0x004c}
0x0c202…0c216 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x007c, t01=0x0072}
0x0c216…0c22a Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x007c, t01=0x0086}
0x0c22a…0c248 Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x007c, t01=0x009a}
0x0c248…0c25e Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x007c, t01=0x00b8}
0x0c25e…0c270 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x007c, t01=0x00ce}
0x0c270…0c27c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x00e0}
0x0c27c…0c290 Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x007c, t01=0x00ec}
0x0c290…0c2a2 Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x007c, t01=0x0100}
0x0c2a2…0c2aa Head {h00=0x0004, h01=0x0050, t00=0x007c, t01=0x0112}
0x0c2aa…0c2be Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x007c, t01=0x011a}
0x0c2be…0c2c6 Head {h00=0x0004, h01=0x0050, t00=0x007c, t01=0x012e}
0x0c2c6…0c2d8 Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x007c, t01=0x0136}
0x0c2d8…0c2fe Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x007c, t01=0x0148}
0x0c2fe…0c306 Head {h00=0x0004, h01=0x0050, t00=0x007c, t01=0x016e}
0x0c306…0c332 Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x007c, t01=0x0176}
0x0c332…0c348 Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x007d, t01=0x0012}
0x0c348…0c374 Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x007d, t01=0x0028}
0x0c374…0c386 Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x007d, t01=0x0054}
0x0c386…0c39e Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x007d, t01=0x0066}
0x0c39e…0c3b0 Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x007d, t01=0x007e}
0x0c3b0…0c3da Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x007d, t01=0x0090}
0x0c3da…0c400 Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x007d, t01=0x00ba}
0x0c400…0c418 Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x007d, t01=0x00e0}
0x0c418…0c442 Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x007d, t01=0x00f8}
0x0c442…0c458 Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x007d, t01=0x0122}
0x0c458…0c46c Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x007d, t01=0x0138}
0x0c46c…0c480 Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x007d, t01=0x014c}
0x0c480…0c4a4 Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x007d, t01=0x0160}
0x0c4a4…0c4b6 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x007d, t01=0x0184}
0x0c4b6…0c4c8 Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x007e, t01=0x0008}
0x0c4c8…0c4dc Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x007e, t01=0x001a}
0x0c4dc…0c4e8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007e, t01=0x002e}
0x0c4e8…0c4f2 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x007e, t01=0x003a}
0x0c4f2…0c506 Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x007e, t01=0x0044}
0x0c506…0c532 Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x007e, t01=0x0058}
0x0c532…0c556 Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x007e, t01=0x0084}
0x0c556…0c56a Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x007e, t01=0x00a8}
0x0c56a…0c592 Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x007e, t01=0x00bc}
0x0c592…0c5bc Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x007e, t01=0x00e4}
0x0c5bc…0c5d0 Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x007e, t01=0x010e}
0x0c5d0…0c5f6 Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x007e, t01=0x0122}
0x0c5f6…0c624 Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x007e, t01=0x0148}
0x0c624…0c63a Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x007e, t01=0x0176}
0x0c63a…0c65e Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x007e, t01=0x018c}
0x0c65e…0c672 Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x007f, t01=0x0020}
0x0c672…0c6a2 Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x007f, t01=0x0034}
0x0c6a2…0c6b6 Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x007f, t01=0x0064}
0x0c6b6…0c6d0 Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x007f, t01=0x0078}
0x0c6d0…0c6e4 Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x007f, t01=0x0092}
0x0c6e4…0c706 Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x007f, t01=0x00a6}
0x0c706…0c732 Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x007f, t01=0x00c8}
0x0c732…0c754 Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x007f, t01=0x00f4}
0x0c754…0c772 Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007f, t01=0x0116}
0x0c772…0c792 Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x007f, t01=0x0134}
0x0c792…0c7c4 Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x007f, t01=0x0154}
0x0c7c4…0c7e2 Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007f, t01=0x0186}
0x0c7e2…0c802 Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x0080, t01=0x0014}
0x0c802…0c80e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x0034}
0x0c80e…0c822 Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x0080, t01=0x0040}
0x0c822…0c83e Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x0080, t01=0x0054}
0x0c83e…0c852 Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x0080, t01=0x0070}
0x0c852…0c870 Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0080, t01=0x0084}
0x0c870…0c884 Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0080, t01=0x00a2}
0x0c884…0c89e Head {h00=0x0016, h01=0x0050, text=» LDR A2,A7 GET LRC«, t00=0x0080, t01=0x00b6}
0x0c89e…0c8bc Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x0080, t01=0x00d0}
0x0c8bc…0c8c8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x00ee}
0x0c8c8…0c8dc Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0080, t01=0x00fa}
0x0c8dc…0c900 Head {h00=0x0020, h01=0x0050, text=» LDR A8,A7 SAVE CURRENT CRC «, t00=0x0080, t01=0x010e}
0x0c900…0c912 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0080, t01=0x0132}
0x0c912…0c926 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0080, t01=0x0144}
0x0c926…0c94c Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x0080, t01=0x0158}
0x0c94c…0c95e Head {h00=0x000e, h01=0x0050, text=» ECR A2,A8«, t00=0x0080, t01=0x017e}
0x0c95e…0c972 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0080, t01=0x0190}
0x0c972…0c998 Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x0081, t01=0x0014}
0x0c998…0c9a4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x003a}
0x0c9a4…0c9c4 Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x0081, t01=0x0046}
0x0c9c4…0c9d8 Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x0081, t01=0x0066}
0x0c9d8…0c9fc Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x0081, t01=0x007a}
0x0c9fc…0ca10 Head {h00=0x0010, h01=0x0050, text=»TRT140 EQU *«, t00=0x0081, t01=0x009e}
0x0ca10…0ca2c Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x0081, t01=0x00b2}
0x0ca2c…0ca50 Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x0081, t01=0x00ce}
0x0ca50…0ca5a Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0081, t01=0x00f2}
0x0ca5a…0ca64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00fc}
0x0ca64…0ca6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0106}
0x0ca6e…0ca90 Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x0081, t01=0x0110}
0x0ca90…0ca9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0132}
0x0ca9a…0caa4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x013c}
0x0caa4…0cab8 Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0081, t01=0x0146}
0x0cab8…0cacc Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x0081, t01=0x015a}
0x0cacc…0caf4 Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x0081, t01=0x016e}
0x0caf4…0cb12 Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0082, t01=0x0008}
0x0cb12…0cb34 Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0082, t01=0x0026}
0x0cb34…0cb48 Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0082, t01=0x0048}
0x0cb48…0cb66 Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0082, t01=0x005c}
0x0cb66…0cb80 Head {h00=0x0016, h01=0x0050, text=» LDK A7,0 REST LRC«, t00=0x0082, t01=0x007a}
0x0cb80…0cb94 Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0082, t01=0x0094}
0x0cb94…0cbb2 Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x0082, t01=0x00a8}
0x0cbb2…0cbc6 Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x0082, t01=0x00c6}
0x0cbc6…0cbe4 Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x0082, t01=0x00da}
0x0cbe4…0cbf8 Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0082, t01=0x00f8}
0x0cbf8…0cc16 Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0082, t01=0x010c}
0x0cc16…0cc2e Head {h00=0x0014, h01=0x0050, text=» LC A2,DW1500+1 «, t00=0x0082, t01=0x012a}
0x0cc2e…0cc4c Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0082, t01=0x0142}
0x0cc4c…0cc60 Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0082, t01=0x0160}
0x0cc60…0cc7e Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0082, t01=0x0174}
0x0cc7e…0cca0 (131, 0, 400) Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0083, t01=0x0004}
0x0cca0…0ccc2 Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x0083, t01=0x0026}
0x0ccc2…0ccd4 Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0083, t01=0x0048}
0x0ccd4…0ccfc Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x0083, t01=0x005a}
0x0ccfc…0cd1c Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x0083, t01=0x0082}
0x0cd1c…0cd3e Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x0083, t01=0x00a2}
0x0cd3e…0cd60 Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0083, t01=0x00c4}
0x0cd60…0cd72 Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x0083, t01=0x00e6}
0x0cd72…0cd90 Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x0083, t01=0x00f8}
0x0cd90…0cda2 Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0083, t01=0x0116}
0x0cda2…0cdc4 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x0083, t01=0x0128}
0x0cdc4…0cdd6 Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x0083, t01=0x014a}
0x0cdd6…0cdea Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x0083, t01=0x015c}
0x0cdea…0ce0a Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x0083, t01=0x0170}
0x0ce0a…0ce2e Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x0083, t01=0x0190}
0x0ce2e…0ce3a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x0024}
0x0ce3a…0ce44 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0084, t01=0x0030}
0x0ce44…0ce4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x003a}
0x0ce4e…0ce58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0044}
0x0ce58…0ce78 Head {h00=0x001c, h01=0x0050, text=»* TRANSMIT SYNC SEQUENCE«, t00=0x0084, t01=0x004e}
0x0ce78…0ce82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x006e}
0x0ce82…0ce8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0078}
0x0ce8c…0cea0 Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x0084, t01=0x0082}
0x0cea0…0ceb2 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0084, t01=0x0096}
0x0ceb2…0cee0 Head {h00=0x002a, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT IF NOT DONE«, t00=0x0084, t01=0x00a8}
0x0cee0…0cf02 Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN PERFORM SST «, t00=0x0084, t01=0x00d6}
0x0cf02…0cf18 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=0 «, t00=0x0084, t01=0x00f8}
0x0cf18…0cf42 Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x0084, t01=0x010e}
0x0cf42…0cf50 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x0084, t01=0x0138}
0x0cf50…0cf66 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=1 «, t00=0x0084, t01=0x0146}
0x0cf66…0cf7a Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0084, t01=0x015c}
0x0cf7a…0cf8c Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0084, t01=0x0170}
0x0cf8c…0cfb6 Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x0084, t01=0x0182}
0x0cfb6…0cfcc Head {h00=0x0012, h01=0x0050, text=» RF(A) TRS010 «, t00=0x0085, t01=0x001c}
0x0cfcc…0cfe2 Head {h00=0x0012, h01=0x0050, text=» SST A1,LCUUT «, t00=0x0085, t01=0x0032}
0x0cfe2…0cff8 Head {h00=0x0012, h01=0x0050, text=» RF(A) TRS005 «, t00=0x0085, t01=0x0048}
0x0cff8…0d00a Head {h00=0x000e, h01=0x0050, text=» ABL BRM «, t00=0x0085, t01=0x005e}
0x0d00a…0d028 Head {h00=0x001a, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT «, t00=0x0085, t01=0x0070}
0x0d028…0d03e Head {h00=0x0012, h01=0x0050, text=»TRS010 EQU * «, t00=0x0085, t01=0x008e}
0x0d03e…0d056 Head {h00=0x0014, h01=0x0050, text=» LDK A2,SYNEBC «, t00=0x0085, t01=0x00a4}
0x0d056…0d084 Head {h00=0x002a, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER«, t00=0x0085, t01=0x00bc}
0x0d084…0d092 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x0085, t01=0x00ea}
0x0d092…0d0a8 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=1 «, t00=0x0085, t01=0x00f8}
0x0d0a8…0d0bc Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0085, t01=0x010e}
0x0d0bc…0d0d0 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0C «, t00=0x0085, t01=0x0122}
0x0d0d0…0d0e8 Head {h00=0x0014, h01=0x0050, text=» CIO A2,1,LCUUT «, t00=0x0085, t01=0x0136}
0x0d0e8…0d0fe Head {h00=0x0012, h01=0x0050, text=» RF(A) TRS010 «, t00=0x0085, t01=0x014e}
0x0d0fe…0d114 Head {h00=0x0012, h01=0x0050, text=» SST A1,LCUUT «, t00=0x0085, t01=0x0164}
0x0d114…0d12a Head {h00=0x0012, h01=0x0050, text=» RF(A) TRS005 «, t00=0x0085, t01=0x017a}
0x0d12a…0d13c Head {h00=0x000e, h01=0x0050, text=» ABL BRM «, t00=0x0085, t01=0x0190}
0x0d13c…0d15a Head {h00=0x001a, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT «, t00=0x0086, t01=0x0012}
0x0d15a…0d16e Head {h00=0x0010, h01=0x0050, text=»TRS010 EQU *«, t00=0x0086, t01=0x0030}
0x0d16e…0d182 Head {h00=0x0010, h01=0x0050, text=» LDK A2,SYN «, t00=0x0086, t01=0x0044}
0x0d182…0d1b0 Head {h00=0x002a, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER«, t00=0x0086, t01=0x0058}
0x0d1b0…0d1be Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x0086, t01=0x0086}
0x0d1be…0d1ec Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x0086, t01=0x0094}
0x0d1ec…0d204 Head {h00=0x0014, h01=0x0050, text=» LDK A3,4 4 SYNS«, t00=0x0086, t01=0x00c2}
0x0d204…0d21e Head {h00=0x0016, h01=0x0050, text=»TRS100 LDK A2,SYN «, t00=0x0086, t01=0x00da}
0x0d21e…0d23c Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SYN «, t00=0x0086, t01=0x00f4}
0x0d23c…0d24e Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0086, t01=0x0112}
0x0d24e…0d264 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x0086, t01=0x0124}
0x0d264…0d274 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0086, t01=0x013a}
0x0d274…0d27e Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0086, t01=0x014a}
0x0d27e…0d288 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0154}
0x0d288…0d292 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x015e}
0x0d292…0d2b0 Head {h00=0x001a, h01=0x0050, text=»* RECEIVER INTERRUPT«, t00=0x0086, t01=0x0168}
0x0d2b0…0d2ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0186}
0x0d2ba…0d2c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0190}
0x0d2c4…0d2d8 Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x0087, t01=0x000a}
0x0d2d8…0d2ec Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0087, t01=0x001e}
0x0d2ec…0d302 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0087, t01=0x0032}
0x0d302…0d322 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0087, t01=0x0048}
0x0d322…0d32e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x0068}
0x0d32e…0d336 Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x0074}
0x0d336…0d34c Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0087, t01=0x007c}
0x0d34c…0d36c Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0087, t01=0x0092}
0x0d36c…0d378 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x00b2}
0x0d378…0d3a6 Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0087, t01=0x00be}
0x0d3a6…0d3c8 Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x0087, t01=0x00ec}
0x0d3c8…0d3f8 Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x0087, t01=0x010e}
0x0d3f8…0d40c Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0087, t01=0x013e}
0x0d40c…0d438 Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x0087, t01=0x0152}
0x0d438…0d444 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x017e}
0x0d444…0d458 Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0087, t01=0x018a}
0x0d458…0d46a Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0088, t01=0x000e}
0x0d46a…0d480 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) IHLCI2«, t00=0x0088, t01=0x0020}
0x0d480…0d49e Head {h00=0x001a, h01=0x0050, text=» CWK A2,SYN SKIP SYNS «, t00=0x0088, t01=0x0036}
0x0d49e…0d4b2 Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x0088, t01=0x0054}
0x0d4b2…0d4d8 Head {h00=0x0022, h01=0x0050, text=»IHLCI2 XRR A7,A2 CALCULATE LRC«, t00=0x0088, t01=0x0068}
0x0d4d8…0d4e4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x008e}
0x0d4e4…0d4f8 Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0088, t01=0x009a}
0x0d4f8…0d50a Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0088, t01=0x00ae}
0x0d50a…0d540 Head {h00=0x0032, h01=0x0050, text=» RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME «, t00=0x0088, t01=0x00c0}
0x0d540…0d556 Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x0088, t01=0x00f6}
0x0d556…0d57a Head {h00=0x0020, h01=0x0050, text=» RF(E) READ SKIP EBCDIC SYN «, t00=0x0088, t01=0x010c}
0x0d57a…0d58e Head {h00=0x0010, h01=0x0050, text=»IHLCI1 EQU *«, t00=0x0088, t01=0x0130}
0x0d58e…0d5b2 Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x0088, t01=0x0144}
0x0d5b2…0d5de Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0088, t01=0x0168}
0x0d5de…0d5ea (137, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x0004}
0x0d5ea…0d600 Head {h00=0x0012, h01=0x0050, text=»IHIN10 RTN A5 «, t00=0x0089, t01=0x0010}
0x0d600…0d616 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=0 «, t00=0x0089, t01=0x0026}
0x0d616…0d63a Head {h00=0x0020, h01=0x0050, text=»IHIN20 CF A5,SST PERFORM SST«, t00=0x0089, t01=0x003c}
0x0d63a…0d64a Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0089, t01=0x0060}
0x0d64a…0d658 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x0089, t01=0x0070}
0x0d658…0d66e Head {h00=0x0012, h01=0x0050, text=» IFT P6805=1 «, t00=0x0089, t01=0x007e}
0x0d66e…0d690 Head {h00=0x001e, h01=0x0050, text=»IHIN20 RF SST PERFORM SST «, t00=0x0089, t01=0x0094}
0x0d690…0d69e Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x0089, t01=0x00b6}
0x0d69e…0d6a8 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0089, t01=0x00c4}
0x0d6a8…0d6b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00ce}
0x0d6b2…0d6bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00d8}
0x0d6bc…0d6de Head {h00=0x001e, h01=0x0050, text=»* TRANSMITTER INTERRUPT «, t00=0x0089, t01=0x00e2}
0x0d6de…0d6e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0104}
0x0d6e8…0d6f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x010e}
0x0d6f2…0d706 Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x0089, t01=0x0118}
0x0d706…0d71a Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0089, t01=0x012c}
0x0d71a…0d730 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0089, t01=0x0140}
0x0d730…0d752 Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x0089, t01=0x0156}
0x0d752…0d75e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x0178}
0x0d75e…0d766 Head {h00=0x0004, h01=0x0050, t00=0x0089, t01=0x0184}
0x0d766…0d77c Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0089, t01=0x018c}
0x0d77c…0d79c Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x008a, t01=0x0012}
0x0d79c…0d7a8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x0032}
0x0d7a8…0d7d6 Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x008a, t01=0x003e}
0x0d7d6…0d7e8 Head {h00=0x000e, h01=0x0050, text=» RB IHIN10«, t00=0x008a, t01=0x006c}
0x0d7e8…0d7f2 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x008a, t01=0x007e}
0x0d7f2…0d7fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0088}
0x0d7fc…0d806 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0092}
0x0d806…0d830 Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x008a, t01=0x009c}
0x0d830…0d83a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x00c6}
0x0d83a…0d866 Head {h00=0x0028, h01=0x0050, text=»* LCU STATUS : BIT 10=CARRIER OFF «, t00=0x008a, t01=0x00d0}
0x0d866…0d890 Head {h00=0x0026, h01=0x0050, text=»* BIT 13=PARITY ERROR (6805 ONLY)«, t00=0x008a, t01=0x00fc}
0x0d890…0d8c0 Head {h00=0x002c, h01=0x0050, text=»* BIT 14=THROUGHPUT ERROR«, t00=0x008a, t01=0x0126}
0x0d8c0…0d8f0 Head {h00=0x002c, h01=0x0050, text=»* BIT 15=MODEM NOT READY «, t00=0x008a, t01=0x0156}
0x0d8f0…0d8fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0186}
0x0d8fa…0d912 Head {h00=0x0014, h01=0x0050, text=»SST SST A1,LCUIN«, t00=0x008a, t01=0x0190}
0x0d912…0d928 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=1 «, t00=0x008b, t01=0x0018}
0x0d928…0d952 Head {h00=0x0026, h01=0x0050, text=» RF(NA) SST200 ALREADY INACTIVE «, t00=0x008b, t01=0x002e}
0x0d952…0d960 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x008b, t01=0x0058}
0x0d960…0d972 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x008b, t01=0x0066}
0x0d972…0d986 Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x008b, t01=0x0078}
0x0d986…0d9b0 Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOG SST INFORMATION «, t00=0x008b, t01=0x008c}
0x0d9b0…0d9bc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x00b6}
0x0d9bc…0d9d2 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=0 «, t00=0x008b, t01=0x00c2}
0x0d9d2…0d9e4 Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x008b, t01=0x00d8}
0x0d9e4…0d9fa Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST100 «, t00=0x008b, t01=0x00ea}
0x0d9fa…0da08 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x008b, t01=0x0100}
0x0da08…0da1e Head {h00=0x0012, h01=0x0050, text=» IFT P6805=1 «, t00=0x008b, t01=0x010e}
0x0da1e…0da30 Head {h00=0x000e, h01=0x0050, text=» ANK A2,6 «, t00=0x008b, t01=0x0124}
0x0da30…0da46 Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST100 «, t00=0x008b, t01=0x0136}
0x0da46…0da58 Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x008b, t01=0x014c}
0x0da58…0da7a Head {h00=0x001e, h01=0x0050, text=» RF(NZ) SST050 THROUGH PUT«, t00=0x008b, t01=0x015e}
0x0da7a…0da9c Head {h00=0x001e, h01=0x0050, text=» LDK A1,1 SET PARITY ERROR«, t00=0x008b, t01=0x0180}
0x0da9c…0dab0 Head {h00=0x0010, h01=0x0050, text=» RF SSTRET «, t00=0x008c, t01=0x0012}
0x0dab0…0dabe Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x008c, t01=0x0026}
0x0dabe…0dad4 Head {h00=0x0012, h01=0x0050, text=»SST050 EQU * «, t00=0x008c, t01=0x0034}
0x0dad4…0daf4 Head {h00=0x001c, h01=0x0050, text=» CM XSTA TROUHHPUT ERROR«, t00=0x008c, t01=0x004a}
0x0daf4…0db08 Head {h00=0x0010, h01=0x0050, text=» LDKL A5,STB«, t00=0x008c, t01=0x006a}
0x0db08…0db1c Head {h00=0x0010, h01=0x0050, text=» ABL BRM010 «, t00=0x008c, t01=0x007e}
0x0db1c…0db30 Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x008c, t01=0x0092}
0x0db30…0db46 Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTCU «, t00=0x008c, t01=0x00a6}
0x0db46…0db5c Head {h00=0x0012, h01=0x0050, text=» IFT P6805=0 «, t00=0x008c, t01=0x00bc}
0x0db5c…0db8a Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x008c, t01=0x00d2}
0x0db8a…0db9a Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008c, t01=0x0100}
0x0db9a…0dba8 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x008c, t01=0x0110}
0x0dba8…0dbbe Head {h00=0x0012, h01=0x0050, text=» IFT P6805=1 «, t00=0x008c, t01=0x011e}
0x0dbbe…0dbd2 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/21 «, t00=0x008c, t01=0x0134}
0x0dbd2…0dbf0 Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST200 LSALCUZ «, t00=0x008c, t01=0x0148}
0x0dbf0…0dc24 Head {h00=0x0030, h01=0x0050, text=» CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS «, t00=0x008c, t01=0x0166}
0x0dc24…0dc3e Head {h00=0x0016, h01=0x0050, text=» DATA BRM RESTART «, t00=0x008d, t01=0x000a}
0x0dc3e…0dc58 Head {h00=0x0016, h01=0x0050, text=» DATA 2 WAIT TIME «, t00=0x008d, t01=0x0024}
0x0dc58…0dc6a Head {h00=0x000e, h01=0x0050, text=» RF READ «, t00=0x008d, t01=0x003e}
0x0dc6a…0dc74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0050}
0x0dc74…0dc8c Head {h00=0x0014, h01=0x0050, text=»SST200 LDK A1,0 «, t00=0x008d, t01=0x005a}
0x0dc8c…0dca4 Head {h00=0x0014, h01=0x0050, text=»SSTRET ADK A5,4 «, t00=0x008d, t01=0x0072}
0x0dca4…0dcbe Head {h00=0x0016, h01=0x0050, text=» LDR A1,A1 SET CR «, t00=0x008d, t01=0x008a}
0x0dcbe…0dcd6 Head {h00=0x0014, h01=0x0050, text=» ABR* A5 RETURN «, t00=0x008d, t01=0x00a4}
0x0dcd6…0dce4 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x008d, t01=0x00bc}
0x0dce4…0dcee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00ca}
0x0dcee…0dcf8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00d4}
0x0dcf8…0dd0c Head {h00=0x0010, h01=0x0050, text=»* HALT INPUT«, t00=0x008d, t01=0x00de}
0x0dd0c…0dd16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00f2}
0x0dd16…0dd20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00fc}
0x0dd20…0dd38 Head {h00=0x0014, h01=0x0050, text=»HALTIN LDK A1,0 «, t00=0x008d, t01=0x0106}
0x0dd38…0dd50 Head {h00=0x0014, h01=0x0050, text=» CIO A1,0,LCUIN «, t00=0x008d, t01=0x011e}
0x0dd50…0dd66 Head {h00=0x0012, h01=0x0050, text=» IFT P6805=0 «, t00=0x008d, t01=0x0136}
0x0dd66…0dd9e Head {h00=0x0034, h01=0x0050, text=» RB SST PERFORM SST INSTRUCTION AND STATUS CHECK«, t00=0x008d, t01=0x014c}
0x0dd9e…0ddac Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x008d, t01=0x0184}
0x0ddac…0ddc2 (142, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFT P6805=1 «, t00=0x008e, t01=0x0004}
0x0ddc2…0ddea Head {h00=0x0024, h01=0x0050, text=» RF READ WAIT FOR SST INTERRUPT «, t00=0x008e, t01=0x001a}
0x0ddea…0ddf8 Head {h00=0x000a, h01=0x0050, text=» XIF «, t00=0x008e, t01=0x0042}
0x0ddf8…0de02 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x008e, t01=0x0050}
0x0de02…0de0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x005a}
0x0de0c…0de16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0064}
0x0de16…0de46 Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x008e, t01=0x006e}
0x0de46…0de50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x009e}
0x0de50…0de5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00a8}
0x0de5a…0de6e Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x008e, t01=0x00b2}
0x0de6e…0de82 Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x008e, t01=0x00c6}
0x0de82…0de96 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x008e, t01=0x00da}
0x0de96…0deaa Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x008e, t01=0x00ee}
0x0deaa…0dede Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x008e, t01=0x0102}
0x0dede…0df0c Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x008e, t01=0x0136}
0x0df0c…0df18 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x0164}
0x0df18…0df2c Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x008e, t01=0x0170}
0x0df2c…0df52 Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x008e, t01=0x0184}
0x0df52…0df68 Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x008f, t01=0x001a}
0x0df68…0df8a Head {h00=0x001e, h01=0x0050, text=» RF READ THROUGHPUT ERROR «, t00=0x008f, t01=0x0030}
0x0df8a…0df9e Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x008f, t01=0x0052}
0x0df9e…0dfc6 Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A7,A2 ACCUMULATE BCC «, t00=0x008f, t01=0x0066}
0x0dfc6…0dfd2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x008e}
0x0dfd2…0dfe6 Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x008f, t01=0x009a}
0x0dfe6…0e010 Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x008f, t01=0x00ae}
0x0e010…0e01c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x00d8}
0x0e01c…0e030 Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x008f, t01=0x00e4}
0x0e030…0e05a Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x008f, t01=0x00f8}
0x0e05a…0e066 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x0122}
0x0e066…0e070 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x012e}
0x0e070…0e08a Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x008f, t01=0x0138}
0x0e08a…0e09c Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x008f, t01=0x0152}
0x0e09c…0e0a6 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x008f, t01=0x0164}
0x0e0a6…0e0b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x016e}
0x0e0b0…0e0ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0178}
0x0e0ba…0e0cc Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x008f, t01=0x0182}
0x0e0cc…0e0d6 (144, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0004}
0x0e0d6…0e0f6 Head {h00=0x001c, h01=0x0050, text=»* WRITE A2 WITH PARITY«, t00=0x0090, t01=0x000e}
0x0e0f6…0e100 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x002e}
0x0e100…0e10a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0038}
0x0e10a…0e124 Head {h00=0x0016, h01=0x0050, text=» IFT CODE+P6805=0 «, t00=0x0090, t01=0x0042}
0x0e124…0e13e Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x0090, t01=0x005c}
0x0e13e…0e150 Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0090, t01=0x0076}
0x0e150…0e164 Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x0090, t01=0x0088}
0x0e164…0e17c Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x0090, t01=0x009c}
0x0e17c…0e192 Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x0090, t01=0x00b4}
0x0e192…0e1ac Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x0090, t01=0x00ca}
0x0e1ac…0e1c0 Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0090, t01=0x00e4}
0x0e1c0…0e1d2 Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x0090, t01=0x00f8}
0x0e1d2…0e1de Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0090, t01=0x010a}
0x0e1de…0e1f8 Head {h00=0x0016, h01=0x0050, text=» IFF CODE+P6805=0 «, t00=0x0090, t01=0x0116}
0x0e1f8…0e210 Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x0090, t01=0x0130}
0x0e210…0e21c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0090, t01=0x0148}
0x0e21c…0e226 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0154}
0x0e226…0e230 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x015e}
0x0e230…0e23a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0168}
0x0e23a…0e24c Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x0090, t01=0x0172}
0x0e24c…0e256 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0184}
0x0e256…0e288 Head {h00=0x002e, h01=0x0050, text=»* READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x0090, t01=0x018e}
0x0e288…0e292 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0030}
0x0e292…0e29c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x003a}
0x0e29c…0e2b4 Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x0091, t01=0x0044}
0x0e2b4…0e2ce Head {h00=0x0016, h01=0x0050, text=» IFT CODE+P6805=0 «, t00=0x0091, t01=0x005c}
0x0e2ce…0e2e0 Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0091, t01=0x0076}
0x0e2e0…0e2f6 Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x0091, t01=0x0088}
0x0e2f6…0e30a Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x0091, t01=0x009e}
0x0e30a…0e320 Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x0091, t01=0x00b2}
0x0e320…0e334 Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0091, t01=0x00c8}
0x0e334…0e346 Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x0091, t01=0x00dc}
0x0e346…0e35e Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x0091, t01=0x00ee}
0x0e35e…0e372 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0091, t01=0x0106}
0x0e372…0e37e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x011a}
0x0e37e…0e398 Head {h00=0x0016, h01=0x0050, text=» IFF CODE+P6805=0 «, t00=0x0091, t01=0x0126}
0x0e398…0e3ac Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x0091, t01=0x0140}
0x0e3ac…0e3b8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x0154}
0x0e3b8…0e3ca Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0091, t01=0x0160}
0x0e3ca…0e3de Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x0091, t01=0x0172}
0x0e3de…0e3f2 Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x0091, t01=0x0186}
0x0e3f2…0e402 Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0092, t01=0x000a}
0x0e402…0e40c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x001a}
0x0e40c…0e416 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0024}
0x0e416…0e420 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0092, t01=0x002e}
0x0e420…0e42a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0038}
0x0e42a…0e46a Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x0092, t01=0x0042}
0x0e46a…0e474 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0082}
0x0e474…0e49c Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER«, t00=0x0092, t01=0x008c}
0x0e49c…0e4bc Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x0092, t01=0x00b4}
0x0e4bc…0e4d2 Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x0092, t01=0x00d4}
0x0e4d2…0e4f8 Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x0092, t01=0x00ea}
0x0e4f8…0e502 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0110}
0x0e502…0e548 Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x0092, t01=0x011a}
0x0e548…0e576 Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTER - CHECK SELECT ADDRESS«, t00=0x0092, t01=0x0160}
0x0e576…0e5a6 Head {h00=0x002c, h01=0x0050, text=»* FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x0092, t01=0x018e}
0x0e5a6…0e5b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x002e}
0x0e5b0…0e5e2 Head {h00=0x002e, h01=0x0050, text=»RBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE «, t00=0x0093, t01=0x0038}
0x0e5e2…0e5ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x006a}
0x0e5ec…0e5f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0074}
0x0e5f6…0e60a Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x0093, t01=0x007e}
0x0e60a…0e61e Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0093, t01=0x0092}
0x0e61e…0e632 Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0093, t01=0x00a6}
0x0e632…0e63e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x00ba}
0x0e63e…0e650 Head {h00=0x000e, h01=0x0050, text=» IM RBYTE «, t00=0x0093, t01=0x00c6}
0x0e650…0e664 Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0093, t01=0x00d8}
0x0e664…0e678 Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0093, t01=0x00ec}
0x0e678…0e684 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x0100}
0x0e684…0e6ae Head {h00=0x0026, h01=0x0050, text=» LD A4,DCTAB GET ADDRESS TO DC:TAB«, t00=0x0093, t01=0x010c}
0x0e6ae…0e6dc Head {h00=0x002a, h01=0x0050, text=» AD* A4,DCTAB ADDRESS TO END OF DC:TAB«, t00=0x0093, t01=0x0136}
0x0e6dc…0e6f4 Head {h00=0x0014, h01=0x0050, text=»FINT10 SUK A4,2 «, t00=0x0093, t01=0x0164}
0x0e6f4…0e714 Head {h00=0x001c, h01=0x0050, text=» LDK A3,0 DEFAULT VALUE «, t00=0x0093, t01=0x017c}
0x0e714…0e736 Head {h00=0x001e, h01=0x0050, text=» CW A4,DCTAB END OF TABLE «, t00=0x0094, t01=0x000c}
0x0e736…0e762 Head {h00=0x0028, h01=0x0050, text=» RF(E) FINT20 SUBTERMINAL NOT FOUND «, t00=0x0094, t01=0x002e}
0x0e762…0e786 Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 LOAD DWT ADDRESS«, t00=0x0094, t01=0x005a}
0x0e786…0e79a Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0094, t01=0x007e}
0x0e79a…0e7c2 Head {h00=0x0024, h01=0x0050, text=» AD A3,RBYTE CHOOSE ADDRESS TYPE«, t00=0x0094, t01=0x0092}
0x0e7c2…0e7f0 Head {h00=0x002a, h01=0x0050, text=» CCR A2,A3 COMPARE SUBTERMINAL ADDRESS«, t00=0x0094, t01=0x00ba}
0x0e7f0…0e7fc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x00e8}
0x0e7fc…0e810 Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0094, t01=0x00f4}
0x0e810…0e842 Head {h00=0x002e, h01=0x0050, text=» CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS«, t00=0x0094, t01=0x0108}
0x0e842…0e84e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x013a}
0x0e84e…0e878 Head {h00=0x0026, h01=0x0050, text=» RB(NE) FINT10 TAKE NEXT TERMINAL «, t00=0x0094, t01=0x0146}
0x0e878…0e890 Head {h00=0x0014, h01=0x0050, text=»FINT20 CM RBYTE «, t00=0x0094, t01=0x0170}
0x0e890…0e8a6 Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x0094, t01=0x0188}
0x0e8a6…0e8b6 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0095, t01=0x000e}
0x0e8b6…0e8c0 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0095, t01=0x001e}
0x0e8c0…0e8ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0028}
0x0e8ca…0e8d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0032}
0x0e8d4…0e8f0 Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x0095, t01=0x003c}
0x0e8f0…0e8fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0058}
0x0e8fa…0e904 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0062}
0x0e904…0e918 Head {h00=0x0010, h01=0x0050, text=»DC15ON EQU *«, t00=0x0095, t01=0x006c}
0x0e918…0e92e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0095, t01=0x0080}
0x0e92e…0e94e Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0095, t01=0x0096}
0x0e94e…0e95a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0095, t01=0x00b6}
0x0e95a…0e962 Head {h00=0x0004, h01=0x0050, t00=0x0095, t01=0x00c2}
0x0e962…0e978 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0095, t01=0x00ca}
0x0e978…0e998 Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0095, t01=0x00e0}
0x0e998…0e9a4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0095, t01=0x0100}
0x0e9a4…0e9b8 Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0095, t01=0x010c}
0x0e9b8…0e9d8 Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x0095, t01=0x0120}
0x0e9d8…0e9ec Head {h00=0x0010, h01=0x0050, text=» LD A1,DCTAB«, t00=0x0095, t01=0x0140}
0x0e9ec…0ea1e Head {h00=0x002e, h01=0x0050, text=» AD* A1,DCTAB GET ADDRESS TO END OF TABLE «, t00=0x0095, t01=0x0154}
0x0ea1e…0ea36 Head {h00=0x0014, h01=0x0050, text=»DRDC05 SUK A1,2 «, t00=0x0095, t01=0x0186}
0x0ea36…0ea4a Head {h00=0x0010, h01=0x0050, text=» CW A1,DCTAB«, t00=0x0096, t01=0x000e}
0x0ea4a…0ea6c Head {h00=0x001e, h01=0x0050, text=» RF(E) DRDC06 END OF TABLE«, t00=0x0096, t01=0x0022}
0x0ea6c…0ea90 Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT ADDRESS «, t00=0x0096, t01=0x0044}
0x0ea90…0eac4 Head {h00=0x0030, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE«, t00=0x0096, t01=0x0068}
0x0eac4…0eaf0 Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x0096, t01=0x009c}
0x0eaf0…0eb02 Head {h00=0x000e, h01=0x0050, text=» RB DRDC05«, t00=0x0096, t01=0x00c8}
0x0eb02…0eb16 Head {h00=0x0010, h01=0x0050, text=»DRDC06 EQU *«, t00=0x0096, t01=0x00da}
0x0eb16…0eb22 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0096, t01=0x00ee}
0x0eb22…0eb36 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0096, t01=0x00fa}
0x0eb36…0eb4c Head {h00=0x0012, h01=0x0050, text=» ORS A2,DCONOF«, t00=0x0096, t01=0x010e}
0x0eb4c…0eb62 Head {h00=0x0012, h01=0x0050, text=» CF A15,CKMESS«, t00=0x0096, t01=0x0124}
0x0eb62…0eb8e Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x0096, t01=0x013a}
0x0eb8e…0ebb4 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DRDC20 ALREADY STARTED«, t00=0x0096, t01=0x0166}
0x0ebb4…0ebe2 Head {h00=0x002a, h01=0x0050, text=»DRDC10 CF A15,SPOTIM START POLL TIMER «, t00=0x0096, t01=0x018c}
0x0ebe2…0ebf8 Head {h00=0x0012, h01=0x0050, text=»DRDC20 ABL BRM«, t00=0x0097, t01=0x002a}
0x0ebf8…0ec02 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0097, t01=0x0040}
0x0ec02…0ec0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x004a}
0x0ec0c…0ec24 Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x0097, t01=0x0054}
0x0ec24…0ec2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x006c}
0x0ec2e…0ec5a Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x0097, t01=0x0076}
0x0ec5a…0ec6e Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0097, t01=0x00a2}
0x0ec6e…0ec9a Head {h00=0x0028, h01=0x0050, text=» ST A2,DCONOF INDICATE POLL TIME OUT«, t00=0x0097, t01=0x00b6}
0x0ec9a…0ecc8 Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0097, t01=0x00e2}
0x0ecc8…0ecf0 Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x0097, t01=0x0110}
0x0ecf0…0ed02 Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0097, t01=0x0138}
0x0ed02…0ed0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x014a}
0x0ed0c…0ed44 Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x0097, t01=0x0154}
0x0ed44…0ed4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x018c}
0x0ed4e…0ed76 Head {h00=0x0024, h01=0x0050, text=»CPTIM CM DCONOF INDICATE POLLING«, t00=0x0098, t01=0x0008}
0x0ed76…0ed8e Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x0098, t01=0x0030}
0x0ed8e…0edb2 Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x0098, t01=0x0048}
0x0edb2…0ede0 Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0098, t01=0x006c}
0x0ede0…0edf0 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0098, t01=0x009a}
0x0edf0…0edfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x00aa}
0x0edfa…0ee14 Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x0098, t01=0x00b4}
0x0ee14…0ee1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x00ce}
0x0ee1e…0ee46 Head {h00=0x0024, h01=0x0050, text=»SPOTIM CF A15,SETIME START TIMER«, t00=0x0098, t01=0x00d8}
0x0ee46…0ee60 Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x0098, t01=0x0100}
0x0ee60…0ee8a Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x0098, t01=0x011a}
0x0ee8a…0ee9e Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0098, t01=0x0144}
0x0ee9e…0eeb0 Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0098, t01=0x0158}
0x0eeb0…0eeba Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0098, t01=0x016a}
0x0eeba…0eec4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0174}
0x0eec4…0eee4 Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x0098, t01=0x017e}
0x0eee4…0eeee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x000e}
0x0eeee…0ef02 Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x0099, t01=0x0018}
0x0ef02…0ef2a Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x0099, t01=0x002c}
0x0ef2a…0ef40 Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0099, t01=0x0054}
0x0ef40…0ef5c Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x0099, t01=0x006a}
0x0ef5c…0ef84 Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x0099, t01=0x0086}
0x0ef84…0ef94 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0099, t01=0x00ae}
0x0ef94…0ef9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00be}
0x0ef9e…0efba Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x0099, t01=0x00c8}
0x0efba…0efc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00e4}
0x0efc4…0efdc Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x0099, t01=0x00ee}
0x0efdc…0eff8 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x0099, t01=0x0106}
0x0eff8…0f01c Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x0099, t01=0x0122}
0x0f01c…0f044 Head {h00=0x0024, h01=0x0050, text=» CF A5,HALTIN HALT INPUT IF OPEN«, t00=0x0099, t01=0x0146}
0x0f044…0f058 Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0099, t01=0x016e}
0x0f058…0f07e Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x0099, t01=0x0182}
0x0f07e…0f09c Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x009a, t01=0x0018}
0x0f09c…0f0c6 Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x009a, t01=0x0036}
0x0f0c6…0f0dc Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x009a, t01=0x0060}
0x0f0dc…0f0e6 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x009a, t01=0x0076}
0x0f0e6…0f0f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0080}
0x0f0f0…0f10e Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x009a, t01=0x008a}
0x0f10e…0f118 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00a8}
0x0f118…0f144 Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x009a, t01=0x00b2}
0x0f144…0f164 Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x009a, t01=0x00de}
0x0f164…0f182 Head {h00=0x001a, h01=0x0050, text=» CM* DCTPP STOP TIMER «, t00=0x009a, t01=0x00fe}
0x0f182…0f194 Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x009a, t01=0x011c}
0x0f194…0f1a8 Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x009a, t01=0x012e}
0x0f1a8…0f1b2 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x009a, t01=0x0142}
0x0f1b2…0f1c6 Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x009a, t01=0x014c}
0x0f1c6…0f1d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0160}
0x0f1d0…0f1da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x016a}
0x0f1da…0f1f6 Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x009a, t01=0x0174}
0x0f1f6…0f200 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0190}
0x0f200…0f218 Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x009b, t01=0x000a}
0x0f218…0f236 Head {h00=0x001a, h01=0x0050, text=»* A7 = ACCUMULATED CRC«, t00=0x009b, t01=0x0022}
0x0f236…0f240 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0040}
0x0f240…0f24a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x004a}
0x0f24a…0f25e Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x009b, t01=0x0054}
0x0f25e…0f274 Head {h00=0x0012, h01=0x0050, text=» ST A1,CRCSAV «, t00=0x009b, t01=0x0068}
0x0f274…0f28c Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+2 «, t00=0x009b, t01=0x007e}
0x0f28c…0f2a4 Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+4 «, t00=0x009b, t01=0x0096}
0x0f2a4…0f2b6 Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x009b, t01=0x00ae}
0x0f2b6…0f2ce Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A7«, t00=0x009b, t01=0x00c0}
0x0f2ce…0f2e0 Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x009b, t01=0x00d8}
0x0f2e0…0f2f2 Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x009b, t01=0x00ea}
0x0f2f2…0f304 Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x009b, t01=0x00fc}
0x0f304…0f316 Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x009b, t01=0x010e}
0x0f316…0f32c Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x009b, t01=0x0120}
0x0f32c…0f342 Head {h00=0x0012, h01=0x0050, text=» XRKL A7,/A001«, t00=0x009b, t01=0x0136}
0x0f342…0f35a Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x009b, t01=0x014c}
0x0f35a…0f370 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x009b, t01=0x0164}
0x0f370…0f386 Head {h00=0x0012, h01=0x0050, text=» LD A1,CRCSAV «, t00=0x009b, t01=0x017a}
0x0f386…0f39e Head {h00=0x0014, h01=0x0050, text=» LD A2,CRCSAV+2 «, t00=0x009b, t01=0x0190}
0x0f39e…0f3b6 Head {h00=0x0014, h01=0x0050, text=» LD A3,CRCSAV+4 «, t00=0x009c, t01=0x0018}
0x0f3b6…0f3c6 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x009c, t01=0x0030}
0x0f3c6…0f3da Head {h00=0x0010, h01=0x0050, text=»CRCSAV RES 3«, t00=0x009c, t01=0x0040}
0x0f3da…0f3e4 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x009c, t01=0x0054}
0x0f3e4…0f3ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x005e}
0x0f3ee…0f3f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0068}
0x0f3f8…0f424 Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x009c, t01=0x0072}
0x0f424…0f444 Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x009c, t01=0x009e}
0x0f444…0f44e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00be}
0x0f44e…0f458 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00c8}
0x0f458…0f480 Head {h00=0x0024, h01=0x0050, text=»RDCRC LDR A6,A7 SAVE CURRENT CRC«, t00=0x009c, t01=0x00d2}
0x0f480…0f4a8 Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x009c, t01=0x00fa}
0x0f4a8…0f4c8 Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x009c, t01=0x0122}
0x0f4c8…0f4e8 Head {h00=0x001c, h01=0x0050, text=» LD A8,CRCSAV+2 SAVE IT «, t00=0x009c, t01=0x0142}
0x0f4e8…0f508 Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x009c, t01=0x0162}
0x0f508…0f534 Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x009c, t01=0x0182}
0x0f534…0f554 Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+2 SAVE IT «, t00=0x009d, t01=0x001e}
0x0f554…0f566 Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x009d, t01=0x003e}
0x0f566…0f578 Head {h00=0x000e, h01=0x0050, text=» XRR A2,A8«, t00=0x009d, t01=0x0050}
0x0f578…0f58a Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x009d, t01=0x0062}
0x0f58a…0f5bc Head {h00=0x002e, h01=0x0050, text=» CWR A2,A6 COMPARE RECEIVED WITH COMPUTED «, t00=0x009d, t01=0x0074}
0x0f5bc…0f5cc Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x009d, t01=0x00a6}
0x0f5cc…0f5d8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009d, t01=0x00b6}
0x0f5d8…0f5ec Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x009d, t01=0x00c2}
0x0f5ec…0f5f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00d6}
0x0f5f6…0f620 Head {h00=0x0026, h01=0x0050, text=»* RDLRC READ LRC CHARACTER «, t00=0x009d, t01=0x00e0}
0x0f620…0f646 Head {h00=0x0022, h01=0x0050, text=»* CR=0 IF LRC OK «, t00=0x009d, t01=0x010a}
0x0f646…0f650 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0130}
0x0f650…0f666 Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x009d, t01=0x013a}
0x0f666…0f67a Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x009d, t01=0x0150}
0x0f67a…0f68c Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x009d, t01=0x0164}
0x0f68c…0f69e Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x009d, t01=0x0176}
0x0f69e…0f6b4 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x009d, t01=0x0188}
0x0f6b4…0f6c8 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x009e, t01=0x000e}
0x0f6c8…0f6dc Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x009e, t01=0x0022}
0x0f6dc…0f6ee Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x009e, t01=0x0036}
0x0f6ee…0f6fe Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x009e, t01=0x0048}
0x0f6fe…0f706 Head {h00=0x0004, h01=0x0050, t00=0x009e, t01=0x0058}
0x0f706…0f712 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009e, t01=0x0060}
0x0f712…0f71c Head {h00=0x0006, h01=0x0050, text=» «, t00=0x009e, t01=0x006c}
0x0f71c…0f726 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0076}
0x0f726…0f730 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0080}
0x0f730…0f756 Head {h00=0x0022, h01=0x0050, text=»* DEVICE WORK TABLE FOR DCTASK«, t00=0x009e, t01=0x008a}
0x0f756…0f760 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00b0}
0x0f760…0f76a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00ba}
0x0f76a…0f78a Head {h00=0x001c, h01=0x0050, text=»DW1500 EQU * TABLE ENTRY«, t00=0x009e, t01=0x00c4}
0x0f78a…0f7aa Head {h00=0x001c, h01=0x0050, text=» DATA 0 CU LINE ADDRESS «, t00=0x009e, t01=0x00e4}
0x0f7aa…0f7c4 Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x009e, t01=0x0104}
0x0f7c4…0f7e0 Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x009e, t01=0x011e}
0x0f7e0…0f7f6 Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x009e, t01=0x013a}
0x0f7f6…0f824 Head {h00=0x002a, h01=0x0050, text=» DATA DC15DC POINTER TO ADDRESS BLOCK «, t00=0x009e, t01=0x0150}
0x0f824…0f840 Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x009e, t01=0x017e}
0x0f840…0f868 Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x009f, t01=0x000a}
0x0f868…0f882 Head {h00=0x0016, h01=0x0050, text=» DATA 0 TASK QUEUE«, t00=0x009f, t01=0x0032}
0x0f882…0f88c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x004c}
0x0f88c…0f8a2 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x009f, t01=0x0056}
0x0f8a2…0f8c2 Head {h00=0x001c, h01=0x0050, text=» DATA 0 USER ECB ADDRESS«, t00=0x009f, t01=0x006c}
0x0f8c2…0f8e6 Head {h00=0x0020, h01=0x0050, text=» DATA DC:ECB MMU ECB ADDRESS«, t00=0x009f, t01=0x008c}
0x0f8e6…0f8f2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x00b0}
0x0f8f2…0f8fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x00bc}
0x0f8fc…0f91a Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x009f, t01=0x00c6}
0x0f91a…0f946 Head {h00=0x0028, h01=0x0050, text=» DATA 0 WRITE QUEUE OR BUFFER QUEUE «, t00=0x009f, t01=0x00e4}
0x0f946…0f978 Head {h00=0x002e, h01=0x0050, text=» DATA 0 STATUS QUEUE (NOT USED BY DC-TASK)«, t00=0x009f, t01=0x0110}
0x0f978…0f99e Head {h00=0x0022, h01=0x0050, text=» DATA 0 RECEIVE MESSAGE QUEUE «, t00=0x009f, t01=0x0142}
0x0f99e…0f9ce Head {h00=0x002c, h01=0x0050, text=» DATA 0 SIMULATED DEVICE BUFFER ADDRESS «, t00=0x009f, t01=0x0168}
0x0f9ce…0f9ec Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x00a0, t01=0x0008}
0x0f9ec…0fa12 Head {h00=0x0022, h01=0x0050, text=» DATA 0 REQUEST TIMEOUT VALUE «, t00=0x00a0, t01=0x0026}
0x0fa12…0fa38 Head {h00=0x0022, h01=0x0050, text=» DATA 0 EXTRA DEVICE INFO DK5 «, t00=0x00a0, t01=0x004c}
0x0fa38…0fa42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0072}
0x0fa42…0fa58 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x00a0, t01=0x007c}
0x0fa58…0fa74 Head {h00=0x0018, h01=0x0050, text=»DC:ECB EQU * MMU ECB«, t00=0x00a0, t01=0x0092}
0x0fa74…0fa8e Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x00a0, t01=0x00ae}
0x0fa8e…0fa9a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a0, t01=0x00c8}
0x0fa9a…0faa4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x00d4}
0x0faa4…0faae Head {h00=0x0006, h01=0x0050, text=» «, t00=0x00a0, t01=0x00de}
0x0faae…0fab8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x00e8}
0x0fab8…0fac2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x00f2}
0x0fac2…0fae2 Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x00a0, t01=0x00fc}
0x0fae2…0faec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x011c}
0x0faec…0fb0c Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x00a0, t01=0x0126}
0x0fb0c…0fb16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0146}
0x0fb16…0fb2a Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x00a0, t01=0x0150}
0x0fb2a…0fb4e Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x00a0, t01=0x0164}
0x0fb4e…0fb68 Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x00a0, t01=0x0188}
0x0fb68…0fb7e Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x00a1, t01=0x0012}
0x0fb7e…0fb94 Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a1, t01=0x0028}
0x0fb94…0fba8 Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a1, t01=0x003e}
0x0fba8…0fbbe Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x00a1, t01=0x0052}
0x0fbbe…0fbd4 Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a1, t01=0x0068}
0x0fbd4…0fbe8 Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a1, t01=0x007e}
0x0fbe8…0fbfe Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x00a1, t01=0x0092}
0x0fbfe…0fc14 Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a1, t01=0x00a8}
0x0fc14…0fc28 Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a1, t01=0x00be}
0x0fc28…0fc34 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a1, t01=0x00d2}
0x0fc34…0fc4e Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x00a1, t01=0x00de}
0x0fc4e…0fc64 Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a1, t01=0x00f8}
0x0fc64…0fc78 Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a1, t01=0x010e}
0x0fc78…0fc8a Head {h00=0x000e, h01=0x0050, text=» XIF DK3«, t00=0x00a1, t01=0x0122}
0x0fc8a…0fca6 Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x00a1, t01=0x0134}
0x0fca6…0fcba Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a1, t01=0x0150}
0x0fcba…0fcc2 Head {h00=0x0004, h01=0x0050, t00=0x00a1, t01=0x0164}
0x0fcc2…0fcd8 Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x00a1, t01=0x016c}
0x0fcd8…0fd02 Head {h00=0x0026, h01=0x0050, text=»MMUBUF RES TBUFL+1 MMU WORK BUFFER«, t00=0x00a1, t01=0x0182}
0x0fd02…0fd0e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a2, t01=0x001c}
0x0fd0e…0fd18 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x00a2, t01=0x0028}
0x0fd18…0fd22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0032}
0x0fd22…0fd2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x003c}
0x0fd2c…0fd50 Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x00a2, t01=0x0046}
0x0fd50…0fd5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x006a}
0x0fd5a…0fd64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0074}
0x0fd64…0fd78 Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00a2, t01=0x007e}
0x0fd78…0fd92 Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x00a2, t01=0x0092}
0x0fd92…0fda8 Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x00a2, t01=0x00ac}
0x0fda8…0fdba Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a2, t01=0x00c2}
0x0fdba…0fdd4 Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x00a2, t01=0x00d4}
0x0fdd4…0fdea Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x00a2, t01=0x00ee}
0x0fdea…0fdfc Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a2, t01=0x0104}
0x0fdfc…0fe14 Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x00a2, t01=0x0116}
0x0fe14…0fe2a Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x00a2, t01=0x012e}
0x0fe2a…0fe3e Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x00a2, t01=0x0144}
0x0fe3e…0fe58 Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x00a2, t01=0x0158}
0x0fe58…0fe6e Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x00a2, t01=0x0172}
0x0fe6e…0fe80 Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x00a2, t01=0x0188}
0x0fe80…0fe92 Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x00a3, t01=0x000a}
0x0fe92…0fea8 Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x00a3, t01=0x001c}
0x0fea8…0febe Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x00a3, t01=0x0032}
0x0febe…0fed6 Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x00a3, t01=0x0048}
0x0fed6…0fef2 Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x00a3, t01=0x0060}
0x0fef2…0ff06 Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x00a3, t01=0x007c}
0x0ff06…0ff1a Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x00a3, t01=0x0090}
0x0ff1a…0ff30 Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x00a3, t01=0x00a4}
0x0ff30…0ff3a Head {h00=0x0006, h01=0x0050, text=» «, t00=0x00a3, t01=0x00ba}
0x0ff3a…0ff44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x00c4}
0x0ff44…0ff4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x00ce}
0x0ff4e…0ff68 Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x00a3, t01=0x00d8}
0x0ff68…0ff7c Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x00a3, t01=0x00f2}
0x0ff7c…0ff8c Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x00a3, t01=0x0106}
0x0ff8c…0ffa2 Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x00a3, t01=0x0116}
0x0ffa2…0ffb6 Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x00a3, t01=0x012c}
0x0ffb6…0ffca Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x00a3, t01=0x0140}
0x0ffca…0ffd6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a3, t01=0x0154}
0x0ffd6…0ffe0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0160}
0x0ffe0…0ffea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x016a}
0x0ffea…0fff4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0174}
0x0fff4…10008 Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00a3, t01=0x017e}
0x10008…10012 (164, 0, 400) Head {h00=0x0006, h01=0x0050, text=» «, t00=0x00a4, t01=0x0004}
0x10012…10052 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x00a4, t01=0x000e}
0x10052…1005c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x004e}
0x1005c…10076 Head {h00=0x0016, h01=0x0050, text=»* L I N C O L «, t00=0x00a4, t01=0x0058}
0x10076…10080 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x0072}
0x10080…100be Head {h00=0x003a, h01=0x0050, text=»* CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x00a4, t01=0x007c}
0x100be…100c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x00ba}
0x100c8…1010a Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x00a4, t01=0x00c4}
0x1010a…10112 Head {h00=0x0004, h01=0x0050, t00=0x00a4, t01=0x0106}
0x10112…10126 Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x00a4, t01=0x010e}
0x10126…1014c Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x00a4, t01=0x0122}
0x1014c…1015e Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x00a4, t01=0x0148}
0x1015e…10174 Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a4, t01=0x015a}
0x10174…1019e Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x00a4, t01=0x0170}
0x1019e…101c4 Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x00a5, t01=0x000a}
0x101c4…101cc Head {h00=0x0004, h01=0x0050, t00=0x00a5, t01=0x0030}
0x101cc…101de Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x00a5, t01=0x0038}
0x101de…101f4 Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a5, t01=0x004a}
0x101f4…10220 Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x00a5, t01=0x0060}
0x10220…10248 Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x00a5, t01=0x008c}
0x10248…1025e Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x00a5, t01=0x00b4}
0x1025e…10268 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x00ca}
0x10268…10272 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x00d4}
0x10272…1027c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x00de}
0x1027c…10286 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x00a5, t01=0x00e8}
0x10286…1028e Head {h00=0x0004, h01=0x0050, t00=0x00a5, t01=0x00f2}
0x1028e…102b2 Head {h00=0x0020, h01=0x0050, text=»* SCANDINAVIAN ALPHABET «, t00=0x00a5, t01=0x00fa}
0x102b2…102c0 Head {h00=0x000a, h01=0x0050, text=» DB«, t00=0x00a5, t01=0x011e}
0x102c0…102d4 Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x00a5, t01=0x012c}
0x102d4…10302 Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x00a5, t01=0x0140}
0x10302…10330 Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/232E,/3C28,/2B21 /08-/0F «, t00=0x00a5, t01=0x016e}
0x10330…1035e Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x00a6, t01=0x000c}
0x1035e…1038c Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/245D,/2A29,/3B5E /18-/1F «, t00=0x00a6, t01=0x003a}
0x1038c…103ba Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x00a6, t01=0x0068}
0x103ba…103e8 Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/402C,/255F,/3E3F /28-/2F «, t00=0x00a6, t01=0x0096}
0x103e8…10414 Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x00a6, t01=0x00c4}
0x10414…10440 Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A5B,/5C27,/3D22 /38-3F«, t00=0x00a6, t01=0x00f0}
0x10440…1044e Head {h00=0x000a, h01=0x0050, text=» DE«, t00=0x00a6, t01=0x011c}
0x1044e…1045a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a6, t01=0x012a}
0x1045a…10464 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x00a6, t01=0x0136}
0x10464…1046c Head {h00=0x0004, h01=0x0050, t00=0x00a6, t01=0x0140}
0x1046c…10488 Head {h00=0x0018, h01=0x0050, text=»DC:IN DATA DC:TAB+2 «, t00=0x00a6, t01=0x0148}
0x10488…104a2 Head {h00=0x0016, h01=0x0050, text=»DCTAB DATA DC:TAB «, t00=0x00a6, t01=0x0164}
0x104a2…104c8 Head {h00=0x0022, h01=0x0050, text=»DC:TAB DATA 2 LENGTH OF DC:TAB«, t00=0x00a6, t01=0x017e}
0x104c8…104f6 Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x00a7, t01=0x0014}
0x104f6…10524 Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x00a7, t01=0x0042}
0x10524…10538 Head {h00=0x0010, h01=0x0050, text=»DC:END EQU *«, t00=0x00a7, t01=0x0070}
0x10538…10542 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x0084}
0x10542…1054c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x008e}
0x1054c…10558 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x00a7, t01=0x0098}
0x10558…1055c Head {h00=0x4004, h01=0x0000}
0x1055c…10560 00 a7 00 a4 ┆ ┆
0x10560…10568 (168, 1, 8) 20 04 00 00 00 a8 00 04 ┆ ┆
0x10568…105b8 (169, 0, 400) 5c 41 31 34 00 10 01 8c 00 12 00 50 2a 20 20 20 20 20 20 20 20 45 4a 45 43 54 00 11 00 0c 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ A14 P* EJECT D P**********************************************┆
0x105b8…10608 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 11 00 22 00 06 00 50 2a 20 00 11 00 6a 00 14 00 50 2a 5c 49 4e 50 55 54 20 46 52 4f 4d 20 44 43 20 00 11 00 74 00 06 00 50 2a 20 00 11 00 8c 00 38 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆****************** " P* j P* INPUT FROM DC t P* 8 P**********┆
0x10608…10658 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 11 00 96 00 06 00 50 2a 20 00 11 00 d2 00 10 00 50 44 43 49 4e 50 5c 45 51 55 5c 2a 20 00 11 00 dc 00 28 00 50 ┆****************************************** P* PDCINP EQU * ( P┆
0x10658…106a8 5c 43 46 5c 41 31 34 2c 49 43 41 42 4f 52 5c 41 42 4f 52 54 20 49 4e 54 45 52 54 41 53 4b 20 52 45 41 44 20 00 11 00 f0 00 0e 00 50 5c 4c 44 52 5c 41 37 2c 41 37 00 11 01 1c 00 20 00 50 5c 52 46 28 5a 29 5c 44 43 49 4e 31 30 5c 4e 4f 54 20 ┆ CF A14,ICABOR ABORT INTERTASK READ P LDR A7,A7 P RF(Z) DCIN10 NOT ┆
0x106a8…106f8 43 4f 4d 50 4c 45 54 45 44 20 00 11 01 2e 00 1e 00 50 5c 49 4d 5c 49 43 57 4f 52 4b 2c 54 43 41 42 41 53 5c 53 45 54 20 46 4c 41 47 00 11 01 52 00 2c 00 50 5c 52 46 5c 49 43 52 49 4e 50 5c 54 41 4b 45 20 43 41 52 45 20 4f 46 20 49 4e 54 45 ┆COMPLETED . P IM ICWORK,TCABAS SET FLAG R , P RF ICRINP TAKE CARE OF INTE┆
0x106f8…10748 (170, 0, 398) 52 54 41 53 4b 20 49 4e 50 55 54 20 00 11 01 74 00 2e 00 50 5c 5c 5c 4f 52 20 42 55 46 46 45 52 20 57 49 4c 4c 20 42 45 20 44 45 53 54 52 4f 59 45 44 20 49 4e 20 27 55 50 44 41 54 45 27 00 12 00 14 00 10 00 50 44 43 49 4e 31 30 5c 45 51 55 ┆RTASK INPUT t . P OR BUFFER WILL BE DESTROYED IN 'UPDATE' PDCIN10 EQU┆
0x10748…10798 5c 2a 00 12 00 46 00 26 00 50 5c 43 46 5c 41 31 34 2c 47 54 52 42 55 46 5c 47 45 54 20 52 45 43 45 49 56 45 20 42 55 46 46 45 52 20 00 12 00 5a 00 18 00 50 5c 4c 44 5c 41 38 2c 45 43 42 44 43 43 2c 54 43 41 42 41 53 00 12 00 84 00 20 00 50 ┆ * F & P CF A14,GTRBUF GET RECEIVE BUFFER Z P LD A8,ECBDCC,TCABAS P┆
0x10798…107e8 5c 43 46 5c 41 31 34 2c 44 43 47 45 54 4d 5c 52 45 41 44 20 4d 45 53 53 41 47 45 20 00 12 00 a0 00 10 00 50 5c 49 46 46 5c 44 43 4c 49 4e 3d 32 00 12 00 c4 00 1a 00 50 5c 43 4d 5c 45 43 42 42 4c 4b 2b 44 43 31 2c 54 43 41 42 41 53 20 00 12 ┆ CF A14,DCGETM READ MESSAGE P IFF DCLIN=2 P CM ECBBLK+DC1,TCABAS ┆
0x107e8…10838 00 d8 00 08 00 50 5c 58 49 46 00 12 00 f6 00 10 00 50 5c 49 46 54 5c 44 43 4c 49 4e 3d 32 00 12 01 02 00 1c 00 50 5c 43 57 5c 41 38 2c 45 43 42 42 4c 4b 2b 44 43 32 2c 54 43 41 42 41 53 00 12 01 16 00 18 00 50 5c 52 46 28 45 29 5c 44 43 49 ┆ P XIF P IFT DCLIN=2 P CW A8,ECBBLK+DC2,TCABAS P RF(E) DCI┆
0x10838…10886 4e 32 30 5c 4d 46 20 23 20 32 00 12 01 36 00 1a 00 50 5c 43 4d 5c 45 43 42 42 4c 4b 2b 44 43 31 2c 54 43 41 42 41 53 20 00 12 01 52 00 0e 00 50 5c 52 46 5c 44 43 49 4e 33 30 00 12 01 70 00 10 00 50 44 43 49 4e 32 30 5c 45 51 55 5c 2a ┆N20 MF # 2 6 P CM ECBBLK+DC1,TCABAS R P RF DCIN30 p PDCIN20 EQU *┆
0x10886…108d6 (171, 0, 400) 00 12 01 82 00 1a 00 50 5c 43 4d 5c 45 43 42 42 4c 4b 2b 44 43 32 2c 54 43 41 42 41 53 20 00 13 00 08 00 08 00 50 5c 58 49 46 00 13 00 26 00 10 00 50 44 43 49 4e 33 30 5c 45 51 55 5c 2a 00 13 00 32 00 24 00 50 5c 4c 44 5c 41 31 2c 45 43 42 ┆ P CM ECBBLK+DC2,TCABAS P XIF & PDCIN30 EQU * 2 $ P LD A1,ECB┆
0x108d6…10926 45 4c 2c 41 38 5c 45 46 46 45 43 54 49 56 45 20 4c 45 4e 47 54 48 00 13 00 46 00 2e 00 50 5c 53 54 5c 41 31 2c 44 43 4c 45 4e 47 2c 54 43 41 42 41 53 5c 53 41 56 45 20 49 54 20 49 4e 20 53 41 56 45 20 41 52 45 41 20 00 13 00 6e 00 04 00 50 ┆EL,A8 EFFECTIVE LENGTH F . P ST A1,DCLENG,TCABAS SAVE IT IN SAVE AREA n P┆
0x10926…10976 00 13 00 a0 00 32 00 50 5c 43 46 5c 41 31 34 2c 55 50 44 41 54 45 5c 4d 4f 56 45 20 46 52 4f 4d 20 44 43 20 54 4f 20 50 52 49 4e 54 45 52 20 42 55 46 46 45 52 3b 00 13 00 a8 00 12 00 50 5c 49 46 54 5c 43 4f 50 43 4d 44 3d 31 20 00 13 00 de ┆ 2 P CF A14,UPDATE MOVE FROM DC TO PRINTER BUFFER; P IFT COPCMD=1 ┆
0x10976…109c6 00 18 00 50 5c 4c 44 5c 41 31 2c 49 43 57 4f 52 4b 2c 54 43 41 42 41 53 00 13 00 f4 00 20 00 50 5c 52 46 28 4e 5a 29 5c 44 43 49 4e 39 30 5c 43 4f 50 59 20 43 4f 4d 4d 41 4e 44 20 00 13 01 10 00 08 00 50 5c 58 49 46 00 13 01 34 00 2e 00 50 ┆ P LD A1,ICWORK,TCABAS P RF(NZ) DCIN90 COPY COMMAND P XIF 4 . P┆
0x109c6…10a16 5c 4c 44 5c 41 31 2c 57 43 43 2c 54 43 41 42 41 53 5c 57 52 49 54 45 20 43 4f 4e 54 52 4f 4c 20 43 48 41 52 41 43 54 45 52 20 00 13 01 40 00 1e 00 50 5c 53 54 5c 41 31 2c 43 43 43 2c 54 43 41 42 41 53 5c 43 4f 50 59 20 49 54 20 00 13 01 72 ┆ LD A1,WCC,TCABAS WRITE CONTROL CHARACTER @ P ST A1,CCC,TCABAS COPY IT r┆
0x10a16…10a66 (172, 0, 400) 00 20 00 50 5c 43 46 5c 41 31 34 2c 43 4f 50 59 5c 43 4f 50 59 20 4f 4e 20 50 52 49 4e 54 45 52 00 14 00 04 00 10 00 50 44 43 49 4e 39 30 5c 45 51 55 5c 2a 00 14 00 28 00 12 00 50 5c 43 46 5c 41 31 34 2c 53 4e 42 55 53 59 00 14 00 3c 00 0c ┆ P CF A14,COPY COPY ON PRINTER PDCIN90 EQU * ( P CF A14,SNBUSY < ┆
0x10a66…10ab6 00 50 5c 52 54 4e 5c 41 31 34 00 14 00 52 00 12 00 50 2a 20 20 20 20 20 20 20 20 45 4a 45 43 54 00 14 00 62 00 06 00 50 2a 20 00 14 00 78 00 1a 00 50 2a 5c 41 42 4f 52 54 20 49 4e 54 45 52 54 41 53 4b 20 52 45 41 44 00 14 00 82 00 06 00 50 ┆ P RTN A14 R P* EJECT b P* x P* ABORT INTERTASK READ P┆
0x10ab6…10b06 2a 20 00 14 00 a0 00 10 00 50 49 43 41 42 4f 52 5c 45 51 55 5c 2a 00 14 00 aa 00 0e 00 50 5c 4c 44 4b 5c 41 37 2c 30 20 00 14 00 be 00 1a 00 50 5c 43 4d 5c 45 43 42 42 4c 4b 2b 49 43 52 2c 54 43 41 42 41 53 20 00 14 00 d0 00 14 00 50 5c 4c ┆* PICABOR EQU * P LDK A7,0 P CM ECBBLK+ICR,TCABAS P L┆
0x10b06…10b56 44 4b 4c 5c 41 38 2c 45 43 42 49 43 52 20 00 14 00 ee 00 12 00 50 5c 41 44 52 5c 41 38 2c 43 52 45 42 41 53 00 14 01 06 00 08 00 50 5c 4c 4b 4d 00 14 01 1c 00 0c 00 50 5c 44 41 54 41 5c 31 30 00 14 01 28 00 0c 00 50 5c 52 54 4e 5c 41 31 34 ┆DKL A8,ECBICR P ADR A8,CREBAS P LKM P DATA 10 ( P RTN A14┆
0x10b56…10ba6 00 14 01 38 00 12 00 50 2a 20 20 20 20 20 20 20 20 45 4a 45 43 54 00 14 01 48 00 06 00 50 2a 20 00 14 01 5e 00 1a 00 50 2a 5c 49 4e 50 55 54 20 46 52 4f 4d 20 49 4e 54 45 52 54 41 53 4b 00 14 01 68 00 06 00 50 2a 20 00 14 01 86 00 10 00 50 ┆ 8 P* EJECT H P* ^ P* INPUT FROM INTERTASK h P* P┆