|
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: 50006 (0xc356)
Notes: pts_type(SC)
Names: »DRDY02.SC«
└─⟦928b1fd3e⟧ Bits:30009671 Philips computer tape "600131"
└─⟦this⟧ »IMPROVE/DRDY02.SC«
IDENT DRDY02 REL 11.1 82-08-20 870105041110 =14,BLOCKING OF REQUESTS,CW NOT CLEARED IF ERR. =14,REL 11.1 82-04-06 =13 ERRORCHECK IN ECHO AND END OF ECHOING CORRECTED REL 11.1 82-02-12 =12 A5 DESTROYED BY TIMER, CHANGE IN RECOVERY REL 11.0 81-12-23 =11 TIMING PROBLEM IN RECOVERY FOR PLASMA DISPLAYS RECOVERY IN ECHO MODE IMPLEMENTED REL 11.0 81-12-09 =10 ECBRL DESTROYED BY ORDER 05 IF X:E=1 REL 11.0 81-09-30 =9 ERR. FOR 6342/51 AND EMPTY BLOCK IN ORD. /05 CHAR. CHECK AT FAST OUTPUT. ULINE&LOWINT ON 6387 REL 11.0 81-09-17 = 8 ERROR FOR 6342 & 6351 IN ORDER 0B & 31 REL 11.0 81-09-17 = 7 FUNCTIONS FOR VD87 IMPLEMENTED REL 11.0 81-06-30 = 6 "SUPPRESSION OF TRAILING BLANKS" REMOVED FROM BASIC WRITE REL 11.0 81-06-24 = 5 SUPPRESSION OF TABULATION CORRECTED REL 11.0 81-05-24 = 4 GREEK CHARACTER SET HANDLING & NEW CONDITIONS REL 11.0 81-04-06 = 3 ASS. ERROR IF FAST0=1, TRASPA=1 AND WHATDY=1 REL 11.0 81-02-17 = 2 ECB-ADDRESS CHECKED IF LRC-ERROR OCCURED REL 11.0 81-02-13 = 1 ECB-ADDRESS CHECKED IN ERROR-ROUTINE REL 11.0 81-02-03 * ************************************************************ * * * * PHILIPS TERMINAL SYSTEM P T S * DRDY02 = DRIVER VIDEO DISPLAY * * * ************************************************************ * * THIS DRIVER HANDLES OUTPUT TO THE VIDEO * DISPLAYS PTS 6342, 6344, 6346 AND TO THE * DISPLAYS PTS 6351, 6385 AND 6386. * THE DRIVER INCLUDES DEVICE DEPENDENT ECHO- * FUNCTIONS WHICH MAKES IT POSSIBLE TO USE * THE DISPLAY AS AN ECHO-DEVICE TO ANY KEY- * BOARD. * * * THE FOLLOWING ORDERS ARE TREATED : * * ORDER 00 TEST STATUS * 05 BASIC WRITE * 06 STANDARD WRITE * 0B SET CURSOR AND WRITE * 31 ERASE * 3D START WRITE * 3E STOP WRITE * * * NORMAL REGISTER USAGE : * * REGISTER A1 = RETURN CODE * A2 = OUTPUT CHARACTER * A3 = BUFFER INDEX * A4 = WORKING REGISTER * A5 = STACK BASE * A6 = DWT-ADDRESS * A7 = ORDER * A8 = ECB-ADDRESS * * * ENTRIES * * ENTRY DYAD ADDRESS TO ADDRESSBLOCK * * * EXTERNALS * * * TOSS ROUTINES * EXTRN LENDER I/O-REQUEST ERROR EXTRN LENDIS END I/O-REQUEST EXTRN STABLK START OF BLOCK EXTRN OUTPUT SEND EXTRN ENDBLK END OF BLOCK EXTRN GETCHR FETCH CHARACTER FROM ECB-BUFFER EXTRN ECHRTN RETURN TO KEYBOARD EXTRN TENDIO END OF I/O EXTRN SETIME TIMER ROUTINE EXTRN LDISP DISPATCH * * DWT DISPLACEMENTS * EXTRN DWTCHP CHANNEL PARAMETER WORD =14 EXTRN DWTDEV TERMINAL DEVICE STATUS EXTRN DWTST DEVICE STATUS EXTRN DWTOR ORDER EXTRN DWTSB2 STACK BASE * * ECB DISPLACEMENTS * EXTRN ECBBA BUFFER ADDRESS EXTRN ECBRL REQUESTED LENGTH EXTRN ECBEL EFFECTIVE LENGTH EXTRN ECBRC RETURN CODE EXTRN ECBCW CONTROL WORD * ************************************************************ * * CONSTANTS * ************************************************************ * * DWT DISPLACEMENTS * DWTAP EQU /2 HEAD POSITION POINTER DWTBC EQU /1 POSITION COUNTER DWTLIN EQU /4 LINES DWTPOS EQU /5 POSITIONS DWTBLC EQU /6 CHARACTERS IN BLOCK DWTTP EQU /8 TIMER POINTER * * CHARACTERS * DUMMY EQU /3 DUMMY CHARACTER BACKSP EQU /08 NON-DESTRUCTIVE BACKSPACE LF EQU /0A LINE FEED HOME EQU /0B CURSOR HOME CLEHOM EQU /0C CLEAR AND CURSOR HOME CR EQU /0D CARRIAGE RETURN CURRIG EQU /10 CURSOR RIGHT SCADD EQU /11 SET CURSOR ADDRESS ULSTOP EQU /13 UNDERLINE STOP FASOUT EQU /14 FAST OUTPUT STILL EQU /18 CURSOR STEADY CTYCOD EQU /1B SET COUNTRY CODE LISTOP EQU /1F LOW INTENSITY STOP SPACE EQU /20 SPACE * * RETURN CODES * CCERR EQU /4 CODE CHECK ERROR * * OTHER * MINBLK EQU 6 BLOCK SIZE FASTNR EQU 6 LEAST NUMBER OF CHARS TO SEND WITH FAST OUTPUT TIME EQU 1 * ************************************************************ * * ADDRESS BLOCK * ************************************************************ DATA DVBLEN BUFFER LENGTH DATA 2 DEVICE INDEX DYAD EQU * DATA ACDY DRIVER ACTIVATION ADDRESS DATA ABDY ABORT ROUTINE DATA 0 NO INTERRUPT HANDLER DATA RCDY RECOVERY ROUTINE DATA ECHODY ECHO ROUTINE * ************************************************************ * * CONDITIONAL ASSEMBLY * ************************************************************ * * IF THE CONSTANT X:A IS SET TO 1, FAST OUTPUT * WILL BE USED IF A NUMBER (SEE THE CONSTANT "FASTNR") * OF CONSECUTIVE CHARACTERS IN THE ECB-BUFFER ARE * FOUND EQUAL. * X:A EQU 0 FASTO EQU X:A * * * BY SETTING X:B=1 THE DRIVER HANDLES OTHER DISPLAYS THAN PTS 6344 * 6346, 6385 AND 6386. * X:B EQU 0 WHATDY EQU X:B * * * BY SETTING X:C TO 1 LOWER CASE CHAR. GENERATOR * (COLUMNS 6 AND 7) CAN BE USED X:C EQU 1 LOWCHA EQU X:C * * * BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE * TO SUPPRESS ECHOING OF END OF RECORD CHARACTER. * THIS IS ATTAINED BY SETTING THE CONSTANT X:G=0 * X:D EQU 0 EORECH EQU X:D * * BY SETTING THE CONSTANT TRASPA = 1 IT IS
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRDY02 REL 11.1 82-08-20 870105041110 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0078 Head {h00=0x0036, h01=0x0050, text=» =14,BLOCKING OF REQUESTS,CW NOT CLEARED IF ERR.«, t00=0x0000, t01=0x0042}
0x0078…0098 Head {h00=0x001c, h01=0x0050, text=» =14,REL 11.1 82-04-06«, t00=0x0000, t01=0x007c}
0x0098…00d6 Head {h00=0x003a, h01=0x0050, text=» =13 ERRORCHECK IN ECHO AND END OF ECHOING CORRECTED«, t00=0x0000, t01=0x009c}
0x00d6…00f2 Head {h00=0x0018, h01=0x0050, text=» REL 11.1 82-02-12«, t00=0x0000, t01=0x00da}
0x00f2…012a Head {h00=0x0034, h01=0x0050, text=» =12 A5 DESTROYED BY TIMER, CHANGE IN RECOVERY«, t00=0x0000, t01=0x00f6}
0x012a…0146 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-12-23«, t00=0x0000, t01=0x012e}
0x0146…0184 Head {h00=0x003a, h01=0x0050, text=» =11 TIMING PROBLEM IN RECOVERY FOR PLASMA DISPLAYS «, t00=0x0000, t01=0x014a}
0x0184…01b4 Head {h00=0x002c, h01=0x0050, text=» RECOVERY IN ECHO MODE IMPLEMENTED«, t00=0x0000, t01=0x0188}
0x01b4…01d0 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-12-09«, t00=0x0001, t01=0x0028}
0x01d0…0204 Head {h00=0x0030, h01=0x0050, text=» =10 ECBRL DESTROYED BY ORDER 05 IF X:E=1 «, t00=0x0001, t01=0x0044}
0x0204…0220 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-09-30«, t00=0x0001, t01=0x0078}
0x0220…025a Head {h00=0x0036, h01=0x0050, text=» =9 ERR. FOR 6342/51 AND EMPTY BLOCK IN ORD. /05«, t00=0x0001, t01=0x0094}
0x025a…0298 Head {h00=0x003a, h01=0x0050, text=» CHAR. CHECK AT FAST OUTPUT. ULINE&LOWINT ON 6387«, t00=0x0001, t01=0x00ce}
0x0298…02b4 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-09-17«, t00=0x0001, t01=0x010c}
0x02b4…02ea Head {h00=0x0032, h01=0x0050, text=» = 8 ERROR FOR 6342 & 6351 IN ORDER 0B & 31 «, t00=0x0001, t01=0x0128}
0x02ea…0306 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-09-17«, t00=0x0001, t01=0x015e}
0x0306…0334 Head {h00=0x002a, h01=0x0050, text=» = 7 FUNCTIONS FOR VD87 IMPLEMENTED «, t00=0x0001, t01=0x017a}
0x0334…0350 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-06-30«, t00=0x0002, t01=0x0018}
0x0350…0398 Head {h00=0x0044, h01=0x0050, text=» = 6 "SUPPRESSION OF TRAILING BLANKS" REMOVED FROM BASIC WRITE«, t00=0x0002, t01=0x0034}
0x0398…03b4 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-06-24«, t00=0x0002, t01=0x007c}
0x03b4…03e6 Head {h00=0x002e, h01=0x0050, text=» = 5 SUPPRESSION OF TABULATION CORRECTED«, t00=0x0002, t01=0x0098}
0x03e6…0402 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-05-24«, t00=0x0002, t01=0x00ca}
0x0402…043e Head {h00=0x0038, h01=0x0050, text=» = 4 GREEK CHARACTER SET HANDLING & NEW CONDITIONS«, t00=0x0002, t01=0x00e6}
0x043e…045a Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-04-06«, t00=0x0002, t01=0x0122}
0x045a…0496 Head {h00=0x0038, h01=0x0050, text=» = 3 ASS. ERROR IF FAST0=1, TRASPA=1 AND WHATDY=1 «, t00=0x0002, t01=0x013e}
0x0496…04b2 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-02-17«, t00=0x0002, t01=0x017a}
0x04b2…04ea Head {h00=0x0034, h01=0x0050, text=» = 2 ECB-ADDRESS CHECKED IF LRC-ERROR OCCURED «, t00=0x0003, t01=0x0008}
0x04ea…0506 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-02-13«, t00=0x0003, t01=0x0040}
0x0506…053a Head {h00=0x0030, h01=0x0050, text=» = 1 ECB-ADDRESS CHECKED IN ERROR-ROUTINE «, t00=0x0003, t01=0x005c}
0x053a…0556 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-02-03«, t00=0x0003, t01=0x0090}
0x0556…0560 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ac}
0x0560…05a4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0003, t01=0x00b6}
0x05a4…05ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00fa}
0x05ae…05b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0104}
0x05b8…05c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x010e}
0x05c2…05ec Head {h00=0x0026, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM P T S «, t00=0x0003, t01=0x0118}
0x05ec…0616 Head {h00=0x0026, h01=0x0050, text=»* DRDY02 = DRIVER VIDEO DISPLAY «, t00=0x0003, t01=0x0142}
0x0616…0620 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x016c}
0x0620…062a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0176}
0x062a…0634 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0180}
0x0634…0678 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0003, t01=0x018a}
0x0678…0682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x003e}
0x0682…06b6 Head {h00=0x0030, h01=0x0050, text=»* THIS DRIVER HANDLES OUTPUT TO THE VIDEO «, t00=0x0004, t01=0x0048}
0x06b6…06ea Head {h00=0x0030, h01=0x0050, text=»* DISPLAYS PTS 6342, 6344, 6346 AND TO THE«, t00=0x0004, t01=0x007c}
0x06ea…0718 Head {h00=0x002a, h01=0x0050, text=»* DISPLAYS PTS 6351, 6385 AND 6386. «, t00=0x0004, t01=0x00b0}
0x0718…074e Head {h00=0x0032, h01=0x0050, text=»* THE DRIVER INCLUDES DEVICE DEPENDENT ECHO-«, t00=0x0004, t01=0x00de}
0x074e…0782 Head {h00=0x0030, h01=0x0050, text=»* FUNCTIONS WHICH MAKES IT POSSIBLE TO USE«, t00=0x0004, t01=0x0114}
0x0782…07b8 Head {h00=0x0032, h01=0x0050, text=»* THE DISPLAY AS AN ECHO-DEVICE TO ANY KEY- «, t00=0x0004, t01=0x0148}
0x07b8…07ca Head {h00=0x000e, h01=0x0050, text=»* BOARD.«, t00=0x0004, t01=0x017e}
0x07ca…07d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0190}
0x07d4…07de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x000a}
0x07de…080c Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE TREATED :«, t00=0x0005, t01=0x0014}
0x080c…0816 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0042}
0x0816…083a Head {h00=0x0020, h01=0x0050, text=»* ORDER 00 TEST STATUS «, t00=0x0005, t01=0x004c}
0x083a…085e Head {h00=0x0020, h01=0x0050, text=»* 05 BASIC WRITE «, t00=0x0005, t01=0x0070}
0x085e…0884 Head {h00=0x0022, h01=0x0050, text=»* 06 STANDARD WRITE«, t00=0x0005, t01=0x0094}
0x0884…08b0 Head {h00=0x0028, h01=0x0050, text=»* 0B SET CURSOR AND WRITE«, t00=0x0005, t01=0x00ba}
0x08b0…08ce Head {h00=0x001a, h01=0x0050, text=»* 31 ERASE «, t00=0x0005, t01=0x00e6}
0x08ce…08f2 Head {h00=0x0020, h01=0x0050, text=»* 3D START WRITE «, t00=0x0005, t01=0x0104}
0x08f2…0914 Head {h00=0x001e, h01=0x0050, text=»* 3E STOP WRITE«, t00=0x0005, t01=0x0128}
0x0914…091e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x014a}
0x091e…0928 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0154}
0x0928…094c Head {h00=0x0020, h01=0x0050, text=»* NORMAL REGISTER USAGE : «, t00=0x0005, t01=0x015e}
0x094c…0956 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0182}
0x0956…097e Head {h00=0x0024, h01=0x0050, text=»* REGISTER A1 = RETURN CODE«, t00=0x0005, t01=0x018c}
0x097e…09ac Head {h00=0x002a, h01=0x0050, text=»* A2 = OUTPUT CHARACTER «, t00=0x0006, t01=0x0024}
0x09ac…09d6 Head {h00=0x0026, h01=0x0050, text=»* A3 = BUFFER INDEX «, t00=0x0006, t01=0x0052}
0x09d6…0a04 Head {h00=0x002a, h01=0x0050, text=»* A4 = WORKING REGISTER «, t00=0x0006, t01=0x007c}
0x0a04…0a2c Head {h00=0x0024, h01=0x0050, text=»* A5 = STACK BASE «, t00=0x0006, t01=0x00aa}
0x0a2c…0a54 Head {h00=0x0024, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0006, t01=0x00d2}
0x0a54…0a76 Head {h00=0x001e, h01=0x0050, text=»* A7 = ORDER«, t00=0x0006, t01=0x00fa}
0x0a76…0a9e Head {h00=0x0024, h01=0x0050, text=»* A8 = ECB-ADDRESS«, t00=0x0006, t01=0x011c}
0x0a9e…0aa8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0144}
0x0aa8…0ab2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014e}
0x0ab2…0ac6 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES «, t00=0x0006, t01=0x0158}
0x0ac6…0ad0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x016c}
0x0ad0…0ada Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0176}
0x0ada…0b06 Head {h00=0x0028, h01=0x0050, text=» ENTRY DYAD ADDRESS TO ADDRESSBLOCK «, t00=0x0006, t01=0x0180}
0x0b06…0b10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x001c}
0x0b10…0b1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0026}
0x0b1a…0b30 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS «, t00=0x0007, t01=0x0030}
0x0b30…0b3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0046}
0x0b3a…0b44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0050}
0x0b44…0b5e Head {h00=0x0016, h01=0x0050, text=»* TOSS ROUTINES «, t00=0x0007, t01=0x005a}
0x0b5e…0b68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0074}
0x0b68…0b90 Head {h00=0x0024, h01=0x0050, text=» EXTRN LENDER I/O-REQUEST ERROR «, t00=0x0007, t01=0x007e}
0x0b90…0bb6 Head {h00=0x0022, h01=0x0050, text=» EXTRN LENDIS END I/O-REQUEST «, t00=0x0007, t01=0x00a6}
0x0bb6…0bda Head {h00=0x0020, h01=0x0050, text=» EXTRN STABLK START OF BLOCK«, t00=0x0007, t01=0x00cc}
0x0bda…0bf4 Head {h00=0x0016, h01=0x0050, text=» EXTRN OUTPUT SEND«, t00=0x0007, t01=0x00f0}
0x0bf4…0c16 Head {h00=0x001e, h01=0x0050, text=» EXTRN ENDBLK END OF BLOCK«, t00=0x0007, t01=0x010a}
0x0c16…0c4c Head {h00=0x0032, h01=0x0050, text=» EXTRN GETCHR FETCH CHARACTER FROM ECB-BUFFER «, t00=0x0007, t01=0x012c}
0x0c4c…0c74 Head {h00=0x0024, h01=0x0050, text=» EXTRN ECHRTN RETURN TO KEYBOARD«, t00=0x0007, t01=0x0162}
0x0c74…0c94 Head {h00=0x001c, h01=0x0050, text=» EXTRN TENDIO END OF I/O«, t00=0x0007, t01=0x018a}
0x0c94…0cb8 Head {h00=0x0020, h01=0x0050, text=» EXTRN SETIME TIMER ROUTINE «, t00=0x0008, t01=0x001a}
0x0cb8…0cd6 Head {h00=0x001a, h01=0x0050, text=» EXTRN LDISP DISPATCH «, t00=0x0008, t01=0x003e}
0x0cd6…0ce0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x005c}
0x0ce0…0cfe Head {h00=0x001a, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x0008, t01=0x0066}
0x0cfe…0d08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0084}
0x0d08…0d38 Head {h00=0x002c, h01=0x0050, text=» EXTRN DWTCHP CHANNEL PARAMETER WORD =14«, t00=0x0008, t01=0x008e}
0x0d38…0d64 Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTDEV TERMINAL DEVICE STATUS«, t00=0x0008, t01=0x00be}
0x0d64…0d86 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTST DEVICE STATUS«, t00=0x0008, t01=0x00ea}
0x0d86…0da0 Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0008, t01=0x010c}
0x0da0…0dc0 Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTSB2 STACK BASE«, t00=0x0008, t01=0x0126}
0x0dc0…0dca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0146}
0x0dca…0de8 Head {h00=0x001a, h01=0x0050, text=»* ECB DISPLACEMENTS «, t00=0x0008, t01=0x0150}
0x0de8…0df2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x016e}
0x0df2…0e16 Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBBA BUFFER ADDRESS «, t00=0x0008, t01=0x0178}
0x0e16…0e3c Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBRL REQUESTED LENGTH «, t00=0x0009, t01=0x000c}
0x0e3c…0e62 Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBEL EFFECTIVE LENGTH «, t00=0x0009, t01=0x0032}
0x0e62…0e82 Head {h00=0x001c, h01=0x0050, text=» EXTRN ECBRC RETURN CODE«, t00=0x0009, t01=0x0058}
0x0e82…0ea4 Head {h00=0x001e, h01=0x0050, text=» EXTRN ECBCW CONTROL WORD «, t00=0x0009, t01=0x0078}
0x0ea4…0eae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x009a}
0x0eae…0ef2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0009, t01=0x00a4}
0x0ef2…0efc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00e8}
0x0efc…0f12 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS «, t00=0x0009, t01=0x00f2}
0x0f12…0f1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0108}
0x0f1c…0f60 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0009, t01=0x0112}
0x0f60…0f6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0156}
0x0f6a…0f88 Head {h00=0x001a, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x0009, t01=0x0160}
0x0f88…0f92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x017e}
0x0f92…0fbc Head {h00=0x0026, h01=0x0050, text=»DWTAP EQU /2 HEAD POSITION POINTER«, t00=0x0009, t01=0x0188}
0x0fbc…0fe2 Head {h00=0x0022, h01=0x0050, text=»DWTBC EQU /1 POSITION COUNTER «, t00=0x000a, t01=0x0022}
0x0fe2…0ffe Head {h00=0x0018, h01=0x0050, text=»DWTLIN EQU /4 LINES «, t00=0x000a, t01=0x0048}
0x0ffe…101e Head {h00=0x001c, h01=0x0050, text=»DWTPOS EQU /5 POSITIONS «, t00=0x000a, t01=0x0064}
0x101e…1048 Head {h00=0x0026, h01=0x0050, text=»DWTBLC EQU /6 CHARACTERS IN BLOCK «, t00=0x000a, t01=0x0084}
0x1048…106a Head {h00=0x001e, h01=0x0050, text=»DWTTP EQU /8 TIMER POINTER«, t00=0x000a, t01=0x00ae}
0x106a…1074 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d0}
0x1074…108a Head {h00=0x0012, h01=0x0050, text=»* CHARACTERS«, t00=0x000a, t01=0x00da}
0x108a…1094 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00f0}
0x1094…10b8 Head {h00=0x0020, h01=0x0050, text=»DUMMY EQU /3 DUMMY CHARACTER«, t00=0x000a, t01=0x00fa}
0x10b8…10e8 Head {h00=0x002c, h01=0x0050, text=»BACKSP EQU /08 NON-DESTRUCTIVE BACKSPACE«, t00=0x000a, t01=0x011e}
0x10e8…1104 Head {h00=0x0018, h01=0x0050, text=»LF EQU /0A LINE FEED«, t00=0x000a, t01=0x014e}
0x1104…1124 Head {h00=0x001c, h01=0x0050, text=»HOME EQU /0B CURSOR HOME«, t00=0x000a, t01=0x016a}
0x1124…1150 Head {h00=0x0028, h01=0x0050, text=»CLEHOM EQU /0C CLEAR AND CURSOR HOME«, t00=0x000a, t01=0x018a}
0x1150…1172 Head {h00=0x001e, h01=0x0050, text=»CR EQU /0D CARRIAGE RETURN«, t00=0x000b, t01=0x0026}
0x1172…1196 Head {h00=0x0020, h01=0x0050, text=»CURRIG EQU /10 CURSOR RIGHT «, t00=0x000b, t01=0x0048}
0x1196…11be Head {h00=0x0024, h01=0x0050, text=»SCADD EQU /11 SET CURSOR ADDRESS«, t00=0x000b, t01=0x006c}
0x11be…11e4 Head {h00=0x0022, h01=0x0050, text=»ULSTOP EQU /13 UNDERLINE STOP «, t00=0x000b, t01=0x0094}
0x11e4…1206 Head {h00=0x001e, h01=0x0050, text=»FASOUT EQU /14 FAST OUTPUT«, t00=0x000b, t01=0x00ba}
0x1206…122a Head {h00=0x0020, h01=0x0050, text=»STILL EQU /18 CURSOR STEADY «, t00=0x000b, t01=0x00dc}
0x122a…1252 Head {h00=0x0024, h01=0x0050, text=»CTYCOD EQU /1B SET COUNTRY CODE «, t00=0x000b, t01=0x0100}
0x1252…127c Head {h00=0x0026, h01=0x0050, text=»LISTOP EQU /1F LOW INTENSITY STOP «, t00=0x000b, t01=0x0128}
0x127c…1298 Head {h00=0x0018, h01=0x0050, text=»SPACE EQU /20 SPACE «, t00=0x000b, t01=0x0152}
0x1298…12a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x016e}
0x12a2…12ba Head {h00=0x0014, h01=0x0050, text=»* RETURN CODES«, t00=0x000b, t01=0x0178}
0x12ba…12c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0190}
0x12c4…12ea Head {h00=0x0022, h01=0x0050, text=»CCERR EQU /4 CODE CHECK ERROR «, t00=0x000c, t01=0x000a}
0x12ea…12f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0030}
0x12f4…1306 Head {h00=0x000e, h01=0x0050, text=»* OTHER «, t00=0x000c, t01=0x003a}
0x1306…1310 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x004c}
0x1310…1330 Head {h00=0x001c, h01=0x0050, text=»MINBLK EQU 6 BLOCK SIZE «, t00=0x000c, t01=0x0056}
0x1330…1374 Head {h00=0x0040, h01=0x0050, text=»FASTNR EQU 6 LEAST NUMBER OF CHARS TO SEND WITH FAST OUTPUT «, t00=0x000c, t01=0x0076}
0x1374…1386 Head {h00=0x000e, h01=0x0050, text=»TIME EQU 1«, t00=0x000c, t01=0x00ba}
0x1386…1390 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00cc}
0x1390…13d4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x000c, t01=0x00d6}
0x13d4…13de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x011a}
0x13de…13f8 Head {h00=0x0016, h01=0x0050, text=»* ADDRESS BLOCK «, t00=0x000c, t01=0x0124}
0x13f8…1402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x013e}
0x1402…1446 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x000c, t01=0x0148}
0x1446…1468 Head {h00=0x001e, h01=0x0050, text=» DATA DVBLEN BUFFER LENGTH«, t00=0x000c, t01=0x018c}
0x1468…1484 Head {h00=0x0018, h01=0x0050, text=» DATA 2 DEVICE INDEX«, t00=0x000d, t01=0x001e}
0x1484…1496 Head {h00=0x000e, h01=0x0050, text=»DYAD EQU *«, t00=0x000d, t01=0x003a}
0x1496…14c2 Head {h00=0x0028, h01=0x0050, text=» DATA ACDY DRIVER ACTIVATION ADDRESS«, t00=0x000d, t01=0x004c}
0x14c2…14e2 Head {h00=0x001c, h01=0x0050, text=» DATA ABDY ABORT ROUTINE«, t00=0x000d, t01=0x0078}
0x14e2…1506 Head {h00=0x0020, h01=0x0050, text=» DATA 0 NO INTERRUPT HANDLER«, t00=0x000d, t01=0x0098}
0x1506…152a Head {h00=0x0020, h01=0x0050, text=» DATA RCDY RECOVERY ROUTINE «, t00=0x000d, t01=0x00bc}
0x152a…154c Head {h00=0x001e, h01=0x0050, text=» DATA ECHODY ECHO ROUTINE «, t00=0x000d, t01=0x00e0}
0x154c…1556 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0102}
0x1556…159a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x000d, t01=0x010c}
0x159a…15a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0150}
0x15a4…15c4 Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000d, t01=0x015a}
0x15c4…15ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x017a}
0x15ce…1612 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x000d, t01=0x0184}
0x1612…161c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0038}
0x161c…1654 Head {h00=0x0034, h01=0x0050, text=»* IF THE CONSTANT X:A IS SET TO 1, FAST OUTPUT«, t00=0x000e, t01=0x0042}
0x1654…1694 Head {h00=0x003c, h01=0x0050, text=»* WILL BE USED IF A NUMBER (SEE THE CONSTANT "FASTNR")«, t00=0x000e, t01=0x007a}
0x1694…16d0 Head {h00=0x0038, h01=0x0050, text=»* OF CONSECUTIVE CHARACTERS IN THE ECB-BUFFER ARE «, t00=0x000e, t01=0x00ba}
0x16d0…16e8 Head {h00=0x0014, h01=0x0050, text=»* FOUND EQUAL.«, t00=0x000e, t01=0x00f6}
0x16e8…16f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x010e}
0x16f2…1704 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x000e, t01=0x0118}
0x1704…171a Head {h00=0x0012, h01=0x0050, text=»FASTO EQU X:A «, t00=0x000e, t01=0x012a}
0x171a…1724 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0140}
0x1724…172e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x014a}
0x172e…177a Head {h00=0x0048, h01=0x0050, text=»* BY SETTING X:B=1 THE DRIVER HANDLES OTHER DISPLAYS THAN PTS 6344«, t00=0x000e, t01=0x0154}
0x177a…179a Head {h00=0x001c, h01=0x0050, text=»* 6346, 6385 AND 6386.«, t00=0x000f, t01=0x0010}
0x179a…17a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0030}
0x17a4…17b6 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x000f, t01=0x003a}
0x17b6…17cc Head {h00=0x0012, h01=0x0050, text=»WHATDY EQU X:B«, t00=0x000f, t01=0x004c}
0x17cc…17d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0062}
0x17d6…17e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x006c}
0x17e0…181c Head {h00=0x0038, h01=0x0050, text=»* BY SETTING X:C TO 1 LOWER CASE CHAR. GENERATOR «, t00=0x000f, t01=0x0076}
0x181c…1846 Head {h00=0x0026, h01=0x0050, text=»* (COLUMNS 6 AND 7) CAN BE USED«, t00=0x000f, t01=0x00b2}
0x1846…1858 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 1 «, t00=0x000f, t01=0x00dc}
0x1858…186e Head {h00=0x0012, h01=0x0050, text=»LOWCHA EQU X:C«, t00=0x000f, t01=0x00ee}
0x186e…1878 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0104}
0x1878…1882 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x010e}
0x1882…18be Head {h00=0x0038, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE«, t00=0x000f, t01=0x0118}
0x18be…18fa Head {h00=0x0038, h01=0x0050, text=»* TO SUPPRESS ECHOING OF END OF RECORD CHARACTER.«, t00=0x000f, t01=0x0154}
0x18fa…1936 Head {h00=0x0038, h01=0x0050, text=»* THIS IS ATTAINED BY SETTING THE CONSTANT X:G=0 «, t00=0x000f, t01=0x0190}
0x1936…1940 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x003c}
0x1940…1952 Head {h00=0x000e, h01=0x0050, text=»X:D EQU 0 «, t00=0x0010, t01=0x0046}
0x1952…1968 Head {h00=0x0012, h01=0x0050, text=»EORECH EQU X:D«, t00=0x0010, t01=0x0058}
0x1968…1972 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x006e}
0x1972…19a6 Head {h00=0x0030, h01=0x0050, text=»* BY SETTING THE CONSTANT TRASPA = 1 IT IS«, t00=0x0010, t01=0x0078}
0x19a6…19aa Head {h00=0x0054, h01=0x0050}
0x19aa…19ae Head {h00=0x2a20, h01=0x2020}
0x19ae…19f0 50 4f 53 53 49 42 4c 45 20 54 4f 20 53 55 50 50 52 45 53 53 20 54 52 41 49 4c 49 4e 47 20 42 4c 41 4e 4b 53 2c 20 54 41 42 55 4c 41 54 49 4f 4e 53 2c 20 2f 31 45 20 41 4e 44 20 2f 31 46 2e 20 28 4e ┆POSSIBLE TO SUPPRESS TRAILING BLANKS, TABULATIONS, /1E AND /1F. (N┆
0x19f0…1a40 4f 54 20 42 41 53 49 43 20 57 00 10 00 ac 00 06 00 50 2a 20 00 10 01 04 00 0e 00 50 58 3a 45 5c 45 51 55 5c 30 20 00 10 01 0e 00 12 00 50 54 52 41 53 50 41 5c 45 51 55 5c 58 3a 45 00 10 01 20 00 06 00 50 2a 20 00 10 01 36 00 32 00 50 2a 20 ┆OT BASIC W P* PX:E EQU 0 PTRASPA EQU X:E P* 6 2 P* ┆
0x1a40…1a8c 20 20 42 59 20 53 45 54 54 49 4e 47 20 58 3a 46 20 3d 20 31 2c 20 43 55 52 53 4f 52 20 57 49 4c 4c 20 42 45 20 53 54 45 41 44 59 20 00 10 01 40 00 1c 00 50 2a 20 20 20 49 4e 53 54 45 41 44 20 4f 46 20 42 4c 49 4e 4b 49 4e 47 2e ┆ BY SETTING X:F = 1, CURSOR WILL BE STEADY @ P* INSTEAD OF BLINKING.┆
0x1a8c…1adc (17, 0, 400) 00 10 01 76 00 06 00 50 2a 20 00 11 00 08 00 0e 00 50 58 3a 46 5c 45 51 55 5c 31 20 00 11 00 12 00 12 00 50 53 54 45 41 44 59 5c 45 51 55 5c 58 3a 46 00 11 00 24 00 06 00 50 2a 20 00 11 00 3a 00 34 00 50 2a 20 20 20 42 59 20 4d 45 41 4e 53 ┆ v P* PX:F EQU 1 PSTEADY EQU X:F $ P* : 4 P* BY MEANS┆
0x1adc…1b2c 20 4f 46 20 43 4f 4e 44 49 54 49 4f 4e 41 4c 20 41 53 53 45 4d 42 4c 59 20 49 54 20 49 53 20 50 4f 53 2d 20 00 11 00 44 00 2e 00 50 2a 20 20 20 53 49 42 4c 45 20 54 4f 20 43 48 4f 4f 53 45 20 42 45 54 57 45 45 4e 20 54 45 4e 20 44 49 46 46 ┆ OF CONDITIONAL ASSEMBLY IT IS POS- D . P* SIBLE TO CHOOSE BETWEEN TEN DIFF┆
0x1b2c…1b7c 45 52 45 4e 54 20 00 11 00 7c 00 2c 00 50 2a 20 20 20 43 48 41 52 41 43 54 45 52 20 53 45 54 53 2c 20 49 46 20 50 54 53 20 36 33 38 35 20 49 53 20 55 53 45 44 2e 00 11 00 ae 00 06 00 50 2a 20 00 11 00 de 00 12 00 50 2a 5c 43 4f 44 45 5c 43 ┆ERENT | , P* CHARACTER SETS, IF PTS 6385 IS USED. P* P* CODE C┆
0x1b7c…1bcc 4f 55 4e 54 52 59 00 11 00 e8 00 10 00 50 2a 5c 30 5c 47 42 2f 4e 4c 2f 42 20 00 11 00 fe 00 10 00 50 2a 5c 31 5c 44 2f 41 2f 4c 2f 43 48 00 11 01 12 00 10 00 50 2a 5c 32 5c 46 2f 43 48 2f 42 2f 4c 00 11 01 26 00 0a 00 50 2a 5c 33 5c 45 20 ┆OUNTRY P* 0 GB/NL/B P* 1 D/A/L/CH P* 2 F/CH/B/L & P* 3 E ┆
0x1bcc…1c1c 00 11 01 3a 00 0c 00 50 2a 5c 34 5c 49 2f 43 48 00 11 01 48 00 0c 00 50 2a 5c 35 5c 53 2f 53 46 00 11 01 58 00 0c 00 50 2a 5c 36 5c 44 4b 2f 4e 00 11 01 68 00 0a 00 50 2a 5c 37 5c 50 20 00 11 01 78 00 0a 00 50 2a 5c 38 5c 59 55 00 11 01 86 ┆ : P* 4 I/CH H P* 5 S/SF X P* 6 DK/N h P* 7 P x P* 8 YU ┆
0x1c1c…1c6c (18, 0, 400) 00 0a 00 50 2a 5c 39 5c 55 53 00 12 00 04 00 0e 00 50 58 3a 47 5c 45 51 55 5c 30 20 00 12 00 12 00 14 00 50 43 4f 55 4e 54 52 59 5c 45 51 55 5c 58 3a 47 20 00 12 00 24 00 06 00 50 2a 20 00 12 00 3c 00 26 00 50 2a 20 20 20 4d 45 4d 4f 52 59 ┆ P* 9 US PX:G EQU 0 PCOUNTRY EQU X:G $ P* < & P* MEMORY┆
0x1c6c…1cbc 20 4d 41 4e 41 47 45 4d 45 4e 54 20 42 55 46 46 45 52 20 53 49 5a 45 20 00 12 00 46 00 06 00 50 2a 20 00 12 00 70 00 0e 00 50 58 3a 48 5c 45 51 55 5c 38 32 00 12 00 7a 00 12 00 50 44 56 42 4c 45 4e 5c 45 51 55 5c 58 3a 48 00 12 00 8c 00 06 ┆ MANAGEMENT BUFFER SIZE F P* p PX:H EQU 82 z PDVBLEN EQU X:H ┆
0x1cbc…1d0c 00 50 2a 20 00 12 00 a2 00 1a 00 50 2a 20 20 20 4d 41 58 49 4d 55 4d 20 42 4c 4f 43 4b 20 53 49 5a 45 00 12 00 ac 00 06 00 50 2a 20 00 12 00 ca 00 10 00 50 58 3a 4a 5c 45 51 55 5c 31 34 30 20 00 12 00 d4 00 12 00 50 4d 41 58 42 4c 4b 5c 45 ┆ P* P* MAXIMUM BLOCK SIZE P* PX:J EQU 140 PMAXBLK E┆
0x1d0c…1d5c 51 55 5c 58 3a 4a 00 12 00 e8 00 06 00 50 2a 20 00 12 00 fe 00 4c 00 50 2a 20 20 20 58 3a 49 20 53 48 4f 55 4c 44 20 42 45 20 53 45 54 20 54 4f 20 31 20 49 46 20 41 20 50 54 53 20 36 33 38 35 20 4f 52 20 38 36 20 49 53 20 49 4e 43 4c 55 44 ┆QU X:J P* L P* X:I SHOULD BE SET TO 1 IF A PTS 6385 OR 86 IS INCLUD┆
0x1d5c…1dac 45 44 20 49 4e 20 53 59 53 54 45 4d 5c 3d 34 20 00 12 01 08 00 06 00 50 2a 20 00 12 01 58 00 0e 00 50 58 3a 49 5c 45 51 55 5c 30 20 00 12 01 62 00 12 00 50 50 4c 41 53 4d 5c 45 51 55 5c 58 3a 49 20 00 12 01 74 00 06 00 50 2a 20 00 12 01 8a ┆ED IN SYSTEM =4 P* X PX:I EQU 0 b PPLASM EQU X:I t P* ┆
0x1dac…1dfc (19, 0, 400) 00 32 00 50 2a 20 20 20 49 46 20 58 3a 4b 20 3d 20 31 20 49 54 20 49 53 20 50 4f 53 53 49 42 4c 45 20 54 4f 20 55 53 45 20 47 52 45 45 4b 5c 5c 3d 34 00 13 00 04 00 1a 00 50 2a 20 20 20 43 48 41 52 41 43 54 45 52 20 53 45 54 5c 5c 3d 34 20 ┆ 2 P* IF X:K = 1 IT IS POSSIBLE TO USE GREEK =4 P* CHARACTER SET =4 ┆
0x1dfc…1e4c 00 13 00 3a 00 06 00 50 2a 20 00 13 00 58 00 12 00 50 58 3a 4b 5c 45 51 55 5c 30 5c 5c 3d 34 20 00 13 00 62 00 16 00 50 47 52 45 45 43 45 5c 45 51 55 5c 58 3a 4b 5c 5c 3d 34 00 13 00 78 00 06 00 50 2a 20 00 13 00 92 00 34 00 50 2a 20 20 20 ┆ : P* X PX:K EQU 0 =4 b PGREECE EQU X:K =4 x P* 4 P* ┆
0x1e4c…1e9c 49 46 20 44 49 53 50 4c 41 59 20 56 44 20 38 37 20 49 53 20 55 53 45 44 2c 20 58 3a 4c 20 53 48 4f 55 4c 44 20 42 45 20 31 5c 3d 37 00 13 00 9c 00 38 00 50 2a 20 20 20 54 48 45 20 57 4f 52 44 20 44 57 54 44 45 56 20 49 4e 20 54 48 45 20 44 ┆IF DISPLAY VD 87 IS USED, X:L SHOULD BE 1 =7 8 P* THE WORD DWTDEV IN THE D┆
0x1e9c…1eec 49 53 50 4c 41 59 2d 44 57 54 20 53 48 4f 55 4c 44 20 42 45 20 53 45 54 00 13 00 d4 00 2e 00 50 2a 20 20 20 54 4f 20 2f 41 45 30 30 20 54 4f 20 49 4e 44 49 43 41 54 45 20 54 48 41 54 20 56 44 38 37 20 49 53 20 55 53 45 44 00 13 01 10 00 06 ┆ISPLAY-DWT SHOULD BE SET . P* TO /AE00 TO INDICATE THAT VD87 IS USED ┆
0x1eec…1f3c 00 50 2a 20 00 13 01 42 00 0e 00 50 58 3a 4c 5c 45 51 55 5c 30 20 00 13 01 4c 00 10 00 50 56 44 38 37 5c 45 51 55 5c 58 3a 4c 00 13 01 5e 00 06 00 50 2a 20 00 13 01 72 00 0a 00 50 5c 45 4a 45 43 54 00 13 01 7c 00 06 00 50 2a 20 00 13 01 8a ┆ P* B PX:L EQU 0 L PVD87 EQU X:L ^ P* r P EJECT | P* ┆
0x1f3c…1f8c (20, 0, 400) 00 3a 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 2a 2a 2a 2a 2a 2a 2a 20 00 14 00 04 00 06 00 50 2a 20 00 14 00 42 00 26 00 50 2a 20 20 20 ┆ : P***************************************************** P* B & P* ┆
0x1f8c…1fdc 41 20 43 20 54 20 49 20 56 20 41 20 54 20 49 20 4f 20 4e 20 20 20 50 20 41 20 52 20 54 20 00 14 00 4c 00 06 00 50 2a 20 00 14 00 76 00 34 00 50 2a 20 20 20 54 48 49 53 20 50 41 52 54 20 4d 41 4b 45 53 20 41 20 53 54 41 52 54 20 4f 46 20 42 ┆A C T I V A T I O N P A R T L P* v 4 P* THIS PART MAKES A START OF B┆
0x1fdc…202c 4c 4f 43 4b 2c 20 43 48 45 43 4b 53 20 54 48 45 00 14 00 80 00 38 00 50 2a 20 20 20 52 45 51 55 45 53 54 45 44 20 4f 52 44 45 52 20 41 4e 44 20 42 52 41 4e 43 48 45 53 20 54 4f 20 54 48 45 20 41 50 50 52 4f 50 52 49 41 54 45 20 00 14 00 b8 ┆LOCK, CHECKS THE 8 P* REQUESTED ORDER AND BRANCHES TO THE APPROPRIATE ┆
0x202c…207c 00 1c 00 50 2a 20 20 20 50 41 52 54 20 4f 46 20 54 48 45 20 44 52 49 56 45 52 2e 20 00 14 00 f4 00 06 00 50 2a 20 00 14 01 14 00 3c 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 ┆ P* PART OF THE DRIVER. P* < P**********************************┆
0x207c…20cc 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 14 01 1e 00 06 00 50 2a 20 00 14 01 5e 00 0e 00 50 41 43 44 59 5c 45 51 55 5c 2a 00 14 01 68 00 20 00 50 5c 4c 44 4b 5c 41 33 2c 30 5c 52 45 53 45 54 20 42 55 46 46 45 52 ┆********************* P* ^ PACDY EQU * h P LDK A3,0 RESET BUFFER┆
0x20cc…211c (21, 0, 398) 20 49 4e 44 45 58 00 14 01 7a 00 06 00 50 2a 20 00 15 00 0e 00 24 00 50 2a 20 20 20 43 48 45 43 4b 20 49 46 20 42 4c 4f 43 4b 49 4e 47 20 4f 52 44 45 52 5c 3d 31 34 20 00 15 00 18 00 06 00 50 2a 20 00 15 00 40 00 1c 00 50 5c 4c 44 52 5c 41 ┆ INDEX z P* $ P* CHECK IF BLOCKING ORDER =14 P* @ P LDR A┆
0x211c…216c 32 2c 41 37 5c 47 45 54 20 4f 52 44 45 52 5c 3d 31 34 00 15 00 4a 00 22 00 50 5c 53 55 4b 5c 41 32 2c 2f 33 44 5c 53 54 41 52 54 20 57 52 49 54 45 20 3f 5c 3d 31 34 20 00 15 00 6a 00 1c 00 50 5c 41 42 4c 28 5a 29 5c 44 59 37 36 30 5c 59 45 ┆2,A7 GET ORDER =14 J " P SUK A2,/3D START WRITE ? =14 j P ABL(Z) DY760 YE┆
0x216c…21bc 53 20 21 5c 3d 31 34 20 00 15 00 90 00 1e 00 50 5c 53 55 4b 5c 41 32 2c 31 5c 53 54 4f 50 20 57 52 49 54 45 20 3f 5c 3d 31 34 00 15 00 b0 00 1c 00 50 5c 41 42 4c 28 5a 29 5c 44 59 37 38 30 5c 59 45 53 20 21 5c 3d 31 34 20 00 15 00 d2 00 06 ┆S ! =14 P SUK A2,1 STOP WRITE ? =14 P ABL(Z) DY780 YES ! =14 ┆
0x21bc…220c 00 50 2a 20 00 15 00 f2 00 30 00 50 5c 43 4d 5c 44 57 54 42 4c 43 2b 44 57 54 44 45 56 2c 41 36 5c 43 4c 45 41 52 20 43 48 41 52 41 43 54 45 52 20 43 4f 55 4e 54 45 52 00 15 00 fc 00 24 00 50 5c 4c 44 4b 4c 5c 41 32 2c 4d 41 58 42 4c 4b 5c ┆ P* 0 P CM DWTBLC+DWTDEV,A6 CLEAR CHARACTER COUNTER $ P LDKL A2,MAXBLK ┆
0x220c…225a 4d 41 58 2e 20 42 4c 4f 43 4b 20 53 49 5a 45 20 00 15 01 30 00 20 00 50 5c 43 46 5c 41 35 2c 53 54 41 42 4c 4b 5c 53 54 41 52 54 20 4f 46 20 42 4c 4f 43 4b 00 15 01 58 00 12 00 50 5c 52 46 28 4e 5a 29 5c 44 59 45 52 31 30 00 15 01 7c ┆MAX. BLOCK SIZE 0 P CF A5,STABLK START OF BLOCK X P RF(NZ) DYER10 |┆
0x225a…22aa (22, 0, 398) 00 06 00 50 2a 20 00 16 00 04 00 12 00 50 2a 20 20 20 54 45 53 54 20 4f 52 44 45 52 00 16 00 0e 00 06 00 50 2a 20 00 16 00 24 00 18 00 50 5c 4c 44 52 5c 41 37 2c 41 37 5c 47 45 54 20 4f 52 44 45 52 00 16 00 2e 00 26 00 50 5c 52 46 28 5a 29 ┆ P* P* TEST ORDER P* $ P LDR A7,A7 GET ORDER . & P RF(Z)┆
0x22aa…22fa 5c 44 59 31 30 30 5c 4f 52 44 45 52 20 30 30 2c 20 54 45 53 54 20 53 54 41 54 55 53 00 16 00 4a 00 06 00 50 2a 20 00 16 00 74 00 0e 00 50 5c 53 55 4b 5c 41 37 2c 2f 35 00 16 00 7e 00 26 00 50 5c 52 46 28 5a 29 5c 44 59 32 30 30 5c 4f 52 44 ┆ DY100 ORDER 00, TEST STATUS J P* t P SUK A7,/5 ~ & P RF(Z) DY200 ORD┆
0x22fa…234a 45 52 20 30 35 2c 20 42 41 53 49 43 20 57 52 49 54 45 00 16 00 90 00 06 00 50 2a 20 00 16 00 ba 00 0e 00 50 5c 53 55 4b 5c 41 37 2c 31 20 00 16 00 c4 00 28 00 50 5c 52 46 28 5a 29 5c 44 59 33 30 30 5c 4f 52 44 45 52 20 30 36 2c 53 54 41 4e ┆ER 05, BASIC WRITE P* P SUK A7,1 ( P RF(Z) DY300 ORDER 06,STAN┆
0x234a…239a 44 41 52 44 20 57 52 49 54 45 00 16 00 d6 00 06 00 50 2a 20 00 16 01 02 00 0e 00 50 5c 53 55 4b 5c 41 37 2c 2f 35 00 16 01 0c 00 30 00 50 5c 41 42 4c 28 5a 29 5c 44 59 36 30 30 5c 4f 52 44 45 52 20 30 42 2c 20 53 45 54 20 43 55 52 53 4f 52 ┆DARD WRITE P* P SUK A7,/5 0 P ABL(Z) DY600 ORDER 0B, SET CURSOR┆
0x239a…23e8 20 41 4e 44 20 57 52 49 54 45 00 16 01 1e 00 06 00 50 2a 20 00 16 01 52 00 10 00 50 5c 53 55 4b 5c 41 37 2c 2f 32 36 20 00 16 01 5c 00 22 00 50 5c 41 42 4c 28 5a 29 5c 44 59 37 30 30 5c 4f 52 44 45 52 20 33 31 2c 20 45 52 41 53 45 20 ┆ AND WRITE P* R P SUK A7,/26 " P ABL(Z) DY700 ORDER 31, ERASE ┆
0x23e8…2438 (23, 0, 400) 00 16 01 70 00 14 00 50 5c 49 46 54 5c 56 44 38 37 3d 31 5c 5c 3d 37 20 00 17 00 08 00 0e 00 50 5c 41 44 4b 5c 41 37 2c 2f 41 00 17 00 20 00 30 00 50 5c 41 42 4c 28 5a 29 5c 4f 52 44 32 37 5c 4f 52 44 45 52 20 2f 32 37 2c 20 54 52 41 4e 53 ┆ p P IFT VD87=1 =7 P ADK A7,/A 0 P ABL(Z) ORD27 ORDER /27, TRANS┆
0x2438…2488 46 45 52 20 50 41 52 41 4d 45 54 45 52 53 00 17 00 32 00 08 00 50 5c 58 49 46 00 17 00 66 00 06 00 50 2a 20 00 17 00 72 00 1a 00 50 2a 20 20 20 49 2f 4f 2d 52 45 51 55 45 53 54 20 45 52 52 4f 52 20 00 17 00 7c 00 06 00 50 2a 20 00 17 00 9a ┆FER PARAMETERS 2 P XIF f P* r P* I/O-REQUEST ERROR | P* ┆
0x2488…24d8 00 1e 00 50 5c 43 46 5c 41 35 2c 45 4e 44 42 4c 4b 5c 45 4e 44 20 4f 46 20 42 4c 4f 43 4b 00 17 00 a4 00 2c 00 50 5c 41 42 4c 5c 4c 45 4e 44 45 52 5c 53 45 54 20 52 45 54 55 52 4e 20 43 4f 44 45 20 41 4e 44 20 45 4e 44 20 49 2f 4f 20 00 17 ┆ P CF A5,ENDBLK END OF BLOCK , P ABL LENDER SET RETURN CODE AND END I/O ┆
0x24d8…2528 00 c6 00 0a 00 50 5c 45 4a 45 43 54 00 17 00 f6 00 06 00 50 2a 20 00 17 01 04 00 40 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 2a 2a 2a 2a ┆ P EJECT P* @ P**************************************************┆
0x2528…2578 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 17 01 0e 00 06 00 50 2a 20 00 17 01 52 00 1e 00 50 2a 20 20 20 4f 52 44 45 52 20 30 30 2c 20 54 45 53 54 20 53 54 41 54 55 53 2e 00 17 01 5c 00 38 00 50 2a 20 20 20 54 48 49 53 20 50 41 52 54 20 53 45 4e 44 ┆********** P* R P* ORDER 00, TEST STATUS. 8 P* THIS PART SEND┆
0x2578…25c8 (24, 0, 398) 53 20 41 20 44 55 4d 4d 59 20 43 48 41 52 41 43 54 45 52 20 54 4f 20 54 48 45 20 44 49 53 50 4c 41 59 00 17 01 7e 00 3a 00 50 2a 20 20 20 41 4e 44 20 53 45 54 53 20 42 49 54 20 31 35 20 49 4e 20 54 48 45 20 52 45 54 55 52 4e 20 43 4f 44 45 ┆S A DUMMY CHARACTER TO THE DISPLAY ~ : P* AND SETS BIT 15 IN THE RETURN CODE┆
0x25c8…2618 20 49 46 20 54 48 45 20 44 49 53 50 4c 41 59 20 00 18 00 2a 00 18 00 50 2a 20 20 20 49 53 20 4e 4f 54 20 4f 50 45 52 41 42 4c 45 2e 00 18 00 68 00 3a 00 50 2a 20 20 20 54 48 45 20 43 55 52 53 4f 52 20 50 4f 53 49 54 49 4f 4e 20 49 53 20 52 ┆ IF THE DISPLAY * P* IS NOT OPERABLE. h : P* THE CURSOR POSITION IS R┆
0x2618…2668 45 54 55 52 4e 45 44 20 49 4e 20 43 4f 4e 54 52 4f 4c 20 57 4f 52 44 20 4f 46 00 18 00 84 00 38 00 50 2a 20 20 20 45 43 42 2c 20 57 49 54 48 20 4c 49 4e 45 20 4e 55 4d 42 45 52 20 49 4e 20 4c 45 46 54 20 42 59 54 45 20 41 4e 44 20 43 4f 4c ┆ETURNED IN CONTROL WORD OF 8 P* ECB, WITH LINE NUMBER IN LEFT BYTE AND COL┆
0x2668…26b8 55 4d 4e 20 49 4e 00 18 00 c2 00 12 00 50 2a 20 20 20 54 48 45 20 52 49 47 48 54 2e 00 18 00 fe 00 06 00 50 2a 20 00 18 01 14 00 40 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 ┆UMN IN P* THE RIGHT. P* @ P**********************************┆
0x26b8…2706 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 18 01 1e 00 06 00 50 2a 20 00 18 01 62 00 10 00 50 44 59 31 30 30 5c 45 51 55 5c 2a 20 00 18 01 6c 00 12 00 50 5c 4c 44 4b 5c 41 32 2c 44 55 4d 4d 59 20 ┆************************** P* b PDY100 EQU * l P LDK A2,DUMMY ┆
0x2706…2756 (25, 0, 400) 00 18 01 80 00 1c 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 5c 53 45 4e 44 20 44 55 4d 4d 59 00 19 00 08 00 12 00 50 5c 52 46 28 4e 5a 29 5c 44 59 45 52 31 30 00 19 00 28 00 06 00 50 2a 20 00 19 00 3e 00 2e 00 50 5c 4c 44 5c 41 34 2c 44 ┆ P CF A5,OUTPUT SEND DUMMY P RF(NZ) DYER10 ( P* > . P LD A4,D┆
0x2756…27a6 57 54 41 50 2b 44 57 54 44 45 56 2c 41 36 5c 47 45 54 20 43 55 52 53 4f 52 20 50 4f 53 49 54 49 4f 4e 00 19 00 48 00 30 00 50 5c 53 54 5c 41 34 2c 45 43 42 43 57 2c 41 38 5c 53 41 56 45 20 43 55 52 53 4f 52 20 50 4f 53 49 54 49 4f 4e 20 49 ┆WTAP+DWTDEV,A6 GET CURSOR POSITION H 0 P ST A4,ECBCW,A8 SAVE CURSOR POSITION I┆
0x27a6…27f6 4e 20 45 43 42 20 00 19 00 7a 00 06 00 50 2a 20 00 19 00 ae 00 0e 00 50 5c 41 42 4c 5c 45 4e 44 49 4f 00 19 00 b8 00 0a 00 50 5c 45 4a 45 43 54 00 19 00 ca 00 06 00 50 2a 20 00 19 00 d8 00 40 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆N ECB z P* P ABL ENDIO P EJECT P* @ P**************┆
0x27f6…2846 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 00 19 00 e2 00 06 00 50 2a 20 00 19 01 26 00 1e 00 50 2a 20 20 20 4f 52 44 45 52 20 30 35 2c 20 42 41 ┆********************************************** P* & P* ORDER 05, BA┆
0x2846…2896 53 49 43 20 57 52 49 54 45 2e 00 19 01 30 00 30 00 50 2a 20 20 20 54 48 49 53 20 4f 52 44 45 52 20 53 45 4e 44 53 20 54 48 45 20 52 45 51 55 45 53 54 45 44 20 4e 55 4d 42 45 52 20 4f 46 00 19 01 52 00 2e 00 50 2a 20 20 20 43 48 41 52 41 43 ┆SIC WRITE. 0 0 P* THIS ORDER SENDS THE REQUESTED NUMBER OF R . P* CHARAC┆
0x2896…28a0 (26, 0, 400) 54 45 52 53 20 54 4f 20 54 48 ┆TERS TO TH┆
0x28a0…28f0 45 20 44 49 53 50 4c 41 59 20 41 4e 44 20 53 45 54 53 20 54 48 45 00 19 01 86 00 30 00 50 2a 20 20 20 49 4e 54 45 52 4e 41 4c 20 43 55 52 53 4f 52 20 50 4f 53 49 54 49 4f 4e 20 43 4f 55 4e 54 45 52 20 54 4f 20 48 4f 4d 45 00 1a 00 28 00 1a ┆E DISPLAY AND SETS THE 0 P* INTERNAL CURSOR POSITION COUNTER TO HOME ( ┆
0x28f0…2940 00 50 2a 20 20 20 50 4f 53 49 54 49 4f 4e 2e 20 28 2f 30 31 30 31 29 20 00 1a 00 5c 00 06 00 50 2a 20 00 1a 00 7a 00 40 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 ┆ P* POSITION. (/0101) P* z @ P**************************************┆
0x2940…2990 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 1a 00 84 00 06 00 50 2a 20 00 1a 00 c8 00 10 00 50 44 59 32 30 30 5c 45 51 55 5c 2a 20 00 1a 00 d2 00 32 00 50 5c 43 46 5c 41 31 35 2c 47 45 54 43 48 52 5c 46 45 54 43 48 ┆********************** P* PDY200 EQU * 2 P CF A15,GETCHR FETCH┆
0x2990…29ae 20 43 48 41 52 41 43 54 45 52 20 46 52 4f 4d 20 45 43 42 2d 42 55 46 46 45 52 00 1a 00 e6 ┆ CHARACTER FROM ECB-BUFFER ┆
0x29ae…b356 […elided…]
0xb356…b360 53 45 54 20 4f 4c 44 20 49 4e ┆SET OLD IN┆
0xb360…b392 44 49 43 41 54 49 4f 4e 20 42 49 54 00 72 01 48 00 26 00 50 5c 4f 52 52 5c 41 32 2c 41 34 5c 53 45 54 20 4e 45 57 20 49 4e 44 49 43 41 54 49 4f 4e 20 ┆DICATION BIT r H & P ORR A2,A4 SET NEW INDICATION ┆
0xb392…b3e2 (115, 0, 400) 42 49 54 20 00 72 01 72 00 2e 00 50 5c 53 52 43 5c 41 32 2c 31 5c 53 48 49 46 54 20 49 4e 44 49 43 41 54 49 4f 4e 20 42 49 54 20 54 4f 20 42 49 54 20 5a 45 52 4f 00 73 00 0c 00 0e 00 50 5c 4c 44 52 5c 41 34 2c 41 32 00 73 00 3e 00 0c 00 50 ┆BIT r r . P SRC A2,1 SHIFT INDICATION BIT TO BIT ZERO s P LDR A4,A2 s > P┆
0xb3e2…b432 5c 52 54 4e 5c 41 31 35 00 73 00 50 00 08 00 50 5c 58 49 46 00 73 00 60 00 0a 00 50 5c 45 4a 45 43 54 00 73 00 6c 00 40 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 ┆ RTN A15 s P P XIF s ` P EJECT s l @ P**************************************┆
0xb432…b482 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 73 00 7a 00 06 00 50 2a 20 00 73 00 be 00 20 00 50 2a 20 20 20 52 43 44 59 20 3d 20 52 45 43 4f 56 45 52 59 20 52 4f 55 54 49 4e 45 20 00 73 00 c8 00 36 00 50 2a 20 20 20 ┆********************** s z P* s P* RCDY = RECOVERY ROUTINE s 6 P* ┆
0xb482…b4d2 43 4c 45 41 52 53 20 44 49 53 50 4c 41 59 20 41 4e 44 20 53 45 54 53 20 43 55 52 53 4f 52 20 26 20 48 45 41 44 20 50 4f 53 49 54 49 4f 4e 00 73 00 ec 00 2c 00 50 2a 20 20 20 43 4f 55 4e 54 45 52 20 54 4f 20 48 4f 4d 45 20 50 4f 53 49 54 49 ┆CLEARS DISPLAY AND SETS CURSOR & HEAD POSITION s , P* COUNTER TO HOME POSITI┆
0xb4d2…b522 4f 4e 20 28 20 2f 30 31 30 31 20 29 2e 20 00 73 01 26 00 06 00 50 2a 20 00 73 01 56 00 40 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 2a 2a ┆ON ( /0101 ). s & P* s V @ P************************************************┆
0xb522…b572 (116, 0, 400) 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 73 01 60 00 06 00 50 2a 20 00 74 00 14 00 0e 00 50 52 43 44 59 5c 45 51 55 5c 2a 00 74 00 1e 00 12 00 50 5c 4c 44 4b 4c 5c 41 32 2c 2f 37 46 46 46 00 74 00 30 00 22 00 50 5c 41 4e 53 5c 41 32 2c 44 57 ┆************ s ` P* t PRCDY EQU * t P LDKL A2,/7FFF t 0 " P ANS A2,DW┆
0xb572…b5c2 54 53 54 2c 41 36 5c 49 4e 44 49 43 41 54 45 20 42 55 53 59 00 74 00 46 00 06 00 50 2a 20 00 74 00 6c 00 24 00 50 5c 4c 44 4b 4c 5c 41 32 2c 4d 41 58 42 4c 4b 5c 4d 41 58 2e 20 42 4c 4f 43 4b 20 53 49 5a 45 20 00 74 00 76 00 20 00 50 5c 43 ┆TST,A6 INDICATE BUSY t F P* t l $ P LDKL A2,MAXBLK MAX. BLOCK SIZE t v P C┆
0xb5c2…b612 46 5c 41 35 2c 53 54 41 42 4c 4b 5c 53 54 41 52 54 20 4f 46 20 42 4c 4f 43 4b 00 74 00 9e 00 14 00 50 5c 49 46 54 5c 50 4c 41 53 4d 3d 31 5c 3d 31 31 00 74 00 c2 00 06 00 50 2a 20 00 74 00 da 00 38 00 50 2a 20 20 20 57 41 49 54 20 46 4f 52 ┆F A5,STABLK START OF BLOCK t P IFT PLASM=1 =11 t P* t 8 P* WAIT FOR┆
0xb612…b662 20 50 4c 41 53 4d 41 20 44 49 53 50 4c 41 59 27 53 20 49 4e 54 45 52 4e 41 4c 20 52 45 43 4f 56 45 52 59 5c 3d 31 31 20 00 74 00 e4 00 06 00 50 2a 20 00 74 01 20 00 1a 00 50 5c 4c 44 5c 41 32 2c 44 57 54 44 45 56 2c 41 36 5c 5c 3d 31 31 20 ┆ PLASMA DISPLAY'S INTERNAL RECOVERY =11 t P* t P LD A2,DWTDEV,A6 =11 ┆
0xb662…b6b2 00 74 01 2a 00 12 00 50 5c 53 4c 43 5c 41 32 2c 32 5c 5c 3d 31 31 00 74 01 48 00 2a 00 50 5c 52 46 28 4e 4e 29 5c 52 43 44 59 30 32 5c 4e 4f 54 20 50 4c 41 53 4d 41 20 44 49 53 50 4c 41 59 5c 3d 31 31 20 00 74 01 5e 00 14 00 50 5c 4c 44 52 ┆ t * P SLC A2,2 =11 t H * P RF(NN) RCDY02 NOT PLASMA DISPLAY =11 t ^ P LDR┆
0xb6b2…b702 (117, 0, 400) 5c 41 31 2c 41 36 5c 5c 3d 31 31 20 00 74 01 8c 00 20 00 50 5c 43 46 5c 41 31 35 2c 53 45 54 49 4d 45 5c 53 45 54 20 54 49 4d 45 52 5c 3d 31 31 00 75 00 14 00 1a 00 50 5c 44 41 54 41 5c 52 43 54 49 4d 45 2c 54 49 4d 45 5c 5c 3d 31 31 00 75 ┆ A1,A6 =11 t P CF A15,SETIME SET TIMER =11 u P DATA RCTIME,TIME =11 u┆
0xb702…b752 00 38 00 20 00 50 5c 53 54 5c 41 34 2c 44 57 54 54 50 2b 44 57 54 44 45 56 2c 41 36 5c 5c 3d 31 31 20 00 75 00 56 00 18 00 50 5c 41 42 4c 5c 4c 44 49 53 50 5c 57 41 49 54 5c 3d 31 31 20 00 75 00 7a 00 1a 00 50 52 43 54 49 4d 45 5c 45 51 55 ┆ 8 P ST A4,DWTTP+DWTDEV,A6 =11 u V P ABL LDISP WAIT =11 u z PRCTIME EQU┆
0xb752…b7a2 5c 2a 5c 52 45 41 44 59 5c 3d 31 31 00 75 00 96 00 26 00 50 5c 4c 44 52 5c 41 36 2c 41 31 5c 52 45 53 54 4f 52 45 20 44 57 54 2d 41 44 44 52 45 53 53 5c 3d 31 31 00 75 00 b4 00 2e 00 50 5c 4c 44 52 5c 41 35 2c 41 36 5c 49 4e 49 54 49 41 54 ┆ * READY =11 u & P LDR A6,A1 RESTORE DWT-ADDRESS =11 u . P LDR A5,A6 INITIAT┆
0xb7a2…b7f2 45 20 44 57 54 20 53 54 41 43 4b 20 50 4f 49 4e 54 45 52 5c 3d 31 32 20 00 75 00 de 00 18 00 50 5c 41 44 4b 4c 5c 41 35 2c 44 57 54 53 42 32 5c 5c 3d 31 32 00 75 01 10 00 16 00 50 52 43 44 59 30 32 5c 45 51 55 5c 2a 5c 5c 3d 31 31 20 00 75 ┆E DWT STACK POINTER =12 u P ADKL A5,DWTSB2 =12 u PRCDY02 EQU * =11 u┆
0xb7f2…b842 01 2c 00 0e 00 50 5c 58 49 46 5c 5c 5c 3d 31 31 00 75 01 46 00 14 00 50 5c 49 46 54 5c 56 44 38 37 3d 31 5c 5c 3d 37 20 00 75 01 58 00 06 00 50 2a 20 00 75 01 70 00 32 00 50 2a 20 20 20 54 48 49 53 20 50 41 52 54 20 49 53 20 4f 4e 4c 59 20 ┆ , P XIF =11 u F P IFT VD87=1 =7 u X P* u p 2 P* THIS PART IS ONLY ┆
0xb842…b892 (118, 0, 400) 55 53 45 44 20 42 59 20 54 48 45 20 56 44 38 37 20 44 49 53 50 4c 41 59 00 75 01 7a 00 06 00 50 2a 20 00 76 00 20 00 26 00 50 5c 4c 44 5c 41 34 2c 44 57 54 44 45 56 2c 41 36 5c 47 45 54 20 44 45 56 49 43 45 20 53 54 41 54 55 53 00 76 00 2a ┆USED BY THE VD87 DISPLAY u z P* v & P LD A4,DWTDEV,A6 GET DEVICE STATUS v *┆
0xb892…b8e2 00 1e 00 50 5c 52 46 28 4e 4e 29 5c 52 43 44 59 30 35 5c 4e 4f 54 20 56 44 38 37 20 21 20 00 76 00 54 00 06 00 50 2a 20 00 76 00 76 00 28 00 50 5c 53 4c 4c 5c 41 34 2c 34 5c 47 45 54 20 42 49 54 20 46 4f 52 20 42 41 43 4b 47 52 2e 20 43 4f ┆ P RF(NN) RCDY05 NOT VD87 ! v T P* v v ( P SLL A4,4 GET BIT FOR BACKGR. CO┆
0xb8e2…b932 4c 4f 55 52 00 76 00 80 00 32 00 50 5c 4c 43 4b 5c 41 34 2c 2f 33 30 30 30 5c 43 4f 4e 54 52 2e 20 43 48 41 52 2e 20 46 4f 52 20 42 41 43 4b 47 52 2e 20 43 4f 4c 4f 55 52 20 00 76 00 ac 00 22 00 50 5c 43 46 5c 41 35 2c 52 53 45 4e 44 31 5c ┆LOUR v 2 P LCK A4,/3000 CONTR. CHAR. FOR BACKGR. COLOUR v " P CF A5,RSEND1 ┆
0xb932…b982 53 45 4e 44 20 50 41 52 41 4d 45 54 45 52 53 20 00 76 00 e2 00 06 00 50 2a 20 00 76 01 08 00 0e 00 50 5c 53 4c 4c 5c 41 34 2c 31 20 00 76 01 12 00 28 00 50 5c 4c 43 4b 5c 41 34 2c 2f 33 32 30 30 5c 43 4f 4e 54 52 2e 20 43 48 41 52 2e 20 46 ┆SEND PARAMETERS v P* v P SLL A4,1 v ( P LCK A4,/3200 CONTR. CHAR. F┆
0xb982…b9d2 4f 52 20 57 49 44 54 48 00 76 01 24 00 12 00 50 5c 43 46 5c 41 35 2c 52 53 45 4e 44 31 20 00 76 01 50 00 06 00 50 2a 20 00 76 01 66 00 0e 00 50 5c 53 4c 4c 5c 41 34 2c 31 20 00 76 01 70 00 34 00 50 5c 4c 43 4b 5c 41 34 2c 2f 33 36 30 30 5c ┆OR WIDTH v $ P CF A5,RSEND1 v P P* v f P SLL A4,1 v p 4 P LCK A4,/3600 ┆
0xb9d2…ba22 (119, 0, 400) 43 4f 4e 54 52 2e 20 43 48 41 52 2e 20 46 4f 52 20 53 43 52 45 45 4e 20 49 4e 54 45 4e 53 49 54 59 20 00 76 01 82 00 12 00 50 5c 43 46 5c 41 35 2c 52 53 45 4e 44 31 20 00 77 00 2a 00 06 00 50 2a 20 00 77 00 40 00 0e 00 50 5c 53 4c 4c 5c 41 ┆CONTR. CHAR. FOR SCREEN INTENSITY v P CF A5,RSEND1 w * P* w @ P SLL A┆
0xba22…ba72 34 2c 31 20 00 77 00 4a 00 2a 00 50 5c 4c 43 4b 5c 41 34 2c 2f 31 35 30 30 5c 43 4f 4e 54 52 2e 20 43 48 41 52 2e 20 46 4f 52 20 43 55 52 53 4f 52 20 00 77 00 5c 00 12 00 50 5c 43 46 5c 41 35 2c 52 53 45 4e 44 32 20 00 77 00 8a 00 10 00 50 ┆4,1 w J * P LCK A4,/1500 CONTR. CHAR. FOR CURSOR w P CF A5,RSEND2 w P┆
0xba72…bac2 52 43 44 59 30 35 5c 45 51 55 5c 2a 00 77 00 a0 00 08 00 50 5c 58 49 46 00 77 00 b4 00 16 00 50 5c 49 46 46 5c 53 54 45 41 44 59 2b 56 44 38 37 3d 30 00 77 00 c0 00 26 00 50 5c 4c 44 5c 41 32 2c 44 57 54 44 45 56 2c 41 36 5c 47 45 54 20 44 ┆RCDY05 EQU * w P XIF w P IFF STEADY+VD87=0 w & P LD A2,DWTDEV,A6 GET D┆
0xbac2…bb12 45 56 49 43 45 20 53 54 41 54 55 53 00 77 00 da 00 2c 00 50 5c 41 4e 4b 4c 5c 41 32 2c 2f 32 30 30 30 5c 50 54 53 20 36 33 38 35 2c 20 36 33 38 36 20 4f 52 20 36 33 38 37 20 3f 20 00 77 01 04 00 16 00 50 5c 52 46 28 5a 29 5c 52 43 44 59 32 ┆EVICE STATUS w , P ANKL A2,/2000 PTS 6385, 6386 OR 6387 ? w P RF(Z) RCDY2┆
0xbb12…bb62 30 5c 4e 4f 20 21 00 77 01 34 00 06 00 50 2a 20 00 77 01 4e 00 2a 00 50 5c 4c 44 4b 5c 41 32 2c 53 54 49 4c 4c 2d 31 5c 53 45 54 20 55 50 20 43 55 52 53 4f 52 20 42 4c 49 4e 4b 49 4e 47 00 77 01 58 00 2a 00 50 5c 41 44 4b 5c 41 32 2c 53 54 ┆0 NO ! w 4 P* w N * P LDK A2,STILL-1 SET UP CURSOR BLINKING w X * P ADK A2,ST┆
0xbb62…bbb2 (120, 0, 400) 45 41 44 59 5c 41 44 4a 55 53 54 20 54 4f 20 53 54 45 41 44 59 20 49 46 20 53 4f 20 00 77 01 86 00 2a 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 5c 53 45 4e 44 20 43 55 52 53 4f 52 20 49 4e 46 4f 52 4d 41 54 49 4f 4e 20 00 78 00 24 00 08 ┆EADY ADJUST TO STEADY IF SO w * P CF A5,OUTPUT SEND CURSOR INFORMATION x $ ┆
0xbbb2…bc02 00 50 5c 58 49 46 00 78 00 52 00 12 00 50 5c 49 46 46 5c 43 4f 55 4e 54 52 59 3d 30 00 78 00 5e 00 2a 00 50 5c 4c 44 4b 5c 41 32 2c 43 54 59 43 4f 44 5c 53 45 4e 44 20 22 53 45 54 20 43 4f 55 4e 54 52 59 20 43 4f 44 45 22 00 78 00 74 00 12 ┆ P XIF x R P IFF COUNTRY=0 x ^ * P LDK A2,CTYCOD SEND "SET COUNTRY CODE" x t ┆
0xbc02…bc52 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 20 00 78 00 a2 00 14 00 50 5c 49 46 54 5c 56 44 38 37 3d 31 5c 5c 3d 37 20 00 78 00 b8 00 06 00 50 2a 20 00 78 00 d0 00 44 00 50 2a 20 20 20 53 45 4e 44 20 41 4e 20 45 58 54 52 41 20 43 4f 4e 54 ┆ P CF A5,OUTPUT x P IFT VD87=1 =7 x P* x D P* SEND AN EXTRA CONT┆
0xbc52…bca2 52 4f 4c 20 43 48 41 52 41 43 54 45 52 20 54 4f 20 56 44 38 37 20 42 45 46 4f 52 45 20 43 4f 55 4e 54 52 59 20 43 4f 44 45 20 00 78 00 da 00 06 00 50 2a 20 00 78 01 22 00 1c 00 50 5c 4c 44 5c 41 34 2c 44 57 54 44 45 56 2c 41 36 5c 56 44 38 ┆ROL CHARACTER TO VD87 BEFORE COUNTRY CODE x P* x " P LD A4,DWTDEV,A6 VD8┆
0xbca2…bcf2 37 20 3f 20 00 78 01 2c 00 16 00 50 5c 52 46 28 4e 4e 29 5c 4e 4f 54 38 37 5c 4e 4f 20 21 00 78 01 4c 00 10 00 50 5c 4c 44 4b 5c 41 32 2c 2f 32 38 20 00 78 01 66 00 1c 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 5c 53 45 4e 44 20 43 2e 43 ┆7 ? x , P RF(NN) NOT87 NO ! x L P LDK A2,/28 x f P CF A5,OUTPUT SEND C.C┆
0xbcf2…bd42 (121, 0, 398) 2e 20 00 78 01 7a 00 10 00 50 4e 4f 54 38 37 5c 45 51 55 5c 2a 20 00 79 00 0a 00 08 00 50 5c 58 49 46 00 79 00 1e 00 12 00 50 5c 49 46 46 5c 43 4f 55 4e 54 52 59 3d 30 00 79 00 2a 00 28 00 50 5c 4c 44 4b 5c 41 32 2c 43 4f 55 4e 54 52 59 5c ┆. x z PNOT87 EQU * y P XIF y P IFF COUNTRY=0 y * ( P LDK A2,COUNTRY ┆
0xbd42…bd92 53 45 4e 44 20 22 43 4f 55 4e 54 52 59 20 43 4f 44 45 22 20 00 79 00 40 00 20 00 50 5c 4f 52 4b 5c 41 32 2c 2f 33 30 5c 4d 41 4b 45 20 41 53 43 49 49 20 44 49 47 49 54 00 79 00 6c 00 12 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 20 00 79 ┆SEND "COUNTRY CODE" y @ P ORK A2,/30 MAKE ASCII DIGIT y l P CF A5,OUTPUT y┆
0xbd92…bde2 00 90 00 08 00 50 5c 58 49 46 00 79 00 a6 00 10 00 50 52 43 44 59 32 30 5c 45 51 55 5c 2a 00 79 00 b2 00 06 00 50 2a 20 00 79 00 c6 00 28 00 50 5c 4c 44 4b 5c 41 32 2c 43 4c 45 48 4f 4d 5c 43 4c 45 41 52 20 41 4e 44 20 43 55 52 53 4f 52 20 ┆ P XIF y PRCDY20 EQU * y P* y ( P LDK A2,CLEHOM CLEAR AND CURSOR ┆
0xbde2…be32 48 4f 4d 45 00 79 00 d0 00 16 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 5c 53 45 4e 44 00 79 00 fc 00 16 00 50 5c 43 46 5c 41 35 2c 45 4e 44 42 4c 4b 5c 5c 3d 31 31 00 79 01 16 00 06 00 50 2a 20 00 79 01 30 00 20 00 50 5c 4c 44 4b 4c 5c ┆HOME y P CF A5,OUTPUT SEND y P CF A5,ENDBLK =11 y P* y 0 P LDKL ┆
0xbe32…be80 41 32 2c 2f 30 31 30 31 5c 48 4f 4d 45 20 50 4f 53 49 54 49 4f 4e 00 79 01 3a 00 34 00 50 5c 53 54 5c 41 32 2c 44 57 54 41 50 2b 44 57 54 44 45 56 2c 41 36 5c 53 45 54 20 48 45 41 44 20 50 4f 53 49 54 49 4f 4e 20 43 4f 55 4e 54 45 52 ┆A2,/0101 HOME POSITION y : 4 P ST A2,DWTAP+DWTDEV,A6 SET HEAD POSITION COUNTER┆
0xbe80…bed0 (122, 0, 400) 00 79 01 5e 00 0e 00 50 5c 4c 44 4b 5c 41 32 2c 30 20 00 7a 00 08 00 3a 00 50 5c 53 43 5c 41 32 2c 44 57 54 42 43 2b 44 57 54 44 45 56 2c 41 36 5c 52 45 53 45 54 20 43 55 52 52 45 4e 54 20 50 4f 53 49 54 49 4f 4e 20 43 4f 55 4e 54 45 52 20 ┆ y ^ P LDK A2,0 z : P SC A2,DWTBC+DWTDEV,A6 RESET CURRENT POSITION COUNTER ┆
0xbed0…bf20 00 7a 00 1a 00 06 00 50 2a 20 00 7a 00 58 00 2c 00 50 5c 4c 44 5c 41 32 2c 44 57 54 53 54 2c 41 36 5c 47 4f 20 54 4f 20 44 49 53 50 41 54 43 48 45 52 20 49 46 5c 3d 31 31 20 00 7a 00 62 00 2a 00 50 5c 53 4c 43 5c 41 32 2c 32 5c 44 49 53 50 ┆ z P* z X , P LD A2,DWTST,A6 GO TO DISPATCHER IF =11 z b * P SLC A2,2 DISP┆
0xbf20…bf70 4c 41 59 20 49 53 20 49 4e 20 45 43 48 4f 20 4d 4f 44 45 5c 3d 31 31 20 00 7a 00 92 00 16 00 50 5c 41 42 4c 28 4e 29 5c 4c 44 49 53 50 5c 5c 3d 31 31 00 7a 00 c0 00 14 00 50 5c 49 46 54 5c 56 44 38 37 3d 31 5c 5c 3d 31 32 00 7a 00 da 00 20 ┆LAY IS IN ECHO MODE =11 z P ABL(N) LDISP =11 z P IFT VD87=1 =12 z ┆
0xbf70…bfc0 00 50 5c 4c 44 52 5c 41 38 2c 41 38 5c 52 45 51 55 45 53 54 20 4f 4e 20 3f 5c 3d 31 32 20 00 7a 00 f2 00 18 00 50 5c 52 46 28 5a 29 5c 52 43 44 59 33 30 5c 4e 4f 5c 3d 31 32 00 7a 01 16 00 22 00 50 5c 4c 44 5c 41 37 2c 44 57 54 4f 52 2c 41 ┆ P LDR A8,A8 REQUEST ON ? =12 z P RF(Z) RCDY30 NO =12 z " P LD A7,DWTOR,A┆
0xbfc0…c010 36 5c 4f 52 44 45 52 20 32 37 20 3f 5c 3d 31 32 00 7a 01 32 00 16 00 50 5c 43 43 4b 5c 41 37 2c 2f 32 37 32 37 5c 5c 3d 31 32 00 7a 01 58 00 24 00 50 5c 41 42 4c 28 45 29 5c 41 43 44 59 5c 59 45 53 2c 20 52 45 50 45 41 54 20 49 54 5c 3d 31 ┆6 ORDER 27 ? =12 z 2 P CCK A7,/2727 =12 z X $ P ABL(E) ACDY YES, REPEAT IT =1┆
0xc010…c060 (123, 0, 400) 32 20 00 7a 01 72 00 16 00 50 52 43 44 59 33 30 5c 45 51 55 5c 2a 5c 5c 3d 31 32 20 00 7b 00 0a 00 0e 00 50 5c 58 49 46 5c 5c 5c 3d 31 32 00 7b 00 24 00 14 00 50 5c 41 42 4c 5c 4c 45 4e 44 49 53 5c 5c 3d 31 31 00 7b 00 36 00 06 00 50 2a 20 ┆2 z r PRCDY30 EQU * =12 { P XIF =12 { $ P ABL LENDIS =11 { 6 P* ┆
0xc060…c0b0 00 7b 00 4e 00 14 00 50 5c 49 46 54 5c 56 44 38 37 3d 31 5c 5c 3d 31 31 00 7b 00 58 00 06 00 50 2a 20 00 7b 00 70 00 26 00 50 2a 20 20 20 52 45 43 4f 56 45 52 59 20 53 55 42 52 4f 55 54 49 4e 45 53 20 46 4f 52 20 56 44 38 37 20 00 7b 00 7a ┆ { N P IFT VD87=1 =11 { X P* { p & P* RECOVERY SUBROUTINES FOR VD87 { z┆
0xc0b0…c100 00 06 00 50 2a 20 00 7b 00 a4 00 16 00 50 52 53 45 4e 44 31 5c 45 51 55 5c 2a 5c 5c 3d 31 31 20 00 7b 00 ae 00 2a 00 50 5c 4c 44 4b 5c 41 32 2c 2f 31 42 5c 53 45 4e 44 20 43 4f 4e 54 52 4f 4c 20 43 48 41 52 41 43 54 45 52 5c 3d 31 31 00 7b ┆ P* { PRSEND1 EQU * =11 { * P LDK A2,/1B SEND CONTROL CHARACTER =11 {┆
0xc100…c150 00 c8 00 16 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 5c 5c 3d 31 31 00 7b 00 f6 00 06 00 50 2a 20 00 7b 01 10 00 16 00 50 52 53 45 4e 44 32 5c 45 51 55 5c 2a 5c 5c 3d 31 31 20 00 7b 01 1a 00 20 00 50 5c 4c 44 52 5c 41 32 2c 41 34 5c 46 ┆ P CF A5,OUTPUT =11 { P* { PRSEND2 EQU * =11 { P LDR A2,A4 F┆
0xc150…c1a0 49 52 53 54 20 54 59 50 45 20 3f 5c 3d 31 31 20 00 7b 01 34 00 1a 00 50 5c 52 46 28 4e 4e 29 5c 52 53 31 30 5c 59 45 53 20 21 5c 3d 31 31 00 7b 01 58 00 2e 00 50 5c 41 44 4b 5c 41 32 2c 31 5c 4e 4f 2c 20 43 48 41 4e 47 45 20 43 4f 4e 54 52 ┆IRST TYPE ? =11 { 4 P RF(NN) RS10 YES ! =11 { X . P ADK A2,1 NO, CHANGE CONTR┆
0xc1a0…c1f0 (124, 0, 400) 4f 4c 20 43 48 41 52 41 43 54 45 52 5c 3d 31 31 00 7b 01 76 00 14 00 50 52 53 31 30 5c 45 51 55 5c 2a 5c 5c 3d 31 31 20 00 7c 00 18 00 2c 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 5c 53 45 4e 44 20 43 4f 4e 54 52 4f 4c 20 43 48 41 52 41 ┆OL CHARACTER =11 { v PRS10 EQU * =11 | , P CF A5,OUTPUT SEND CONTROL CHARA┆
0xc1f0…c240 43 54 45 52 5c 3d 31 31 00 7c 00 30 00 16 00 50 5c 52 54 4e 5c 41 35 5c 52 45 54 55 52 4e 5c 3d 31 31 00 7c 00 60 00 06 00 50 2a 20 00 7c 00 7a 00 08 00 50 5c 58 49 46 00 7c 00 84 00 0a 00 50 5c 45 4a 45 43 54 00 7c 00 90 00 06 00 50 2a 20 ┆CTER =11 | 0 P RTN A5 RETURN =11 | ` P* | z P XIF | P EJECT | P* ┆
0xc240…c290 00 7c 00 9e 00 2c 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 00 7c 00 a8 00 06 00 50 2a 20 00 7c 00 d8 00 16 00 50 2a 20 20 20 41 42 4f 52 54 20 52 4f 55 54 ┆ | , P**************************************** | P* | P* ABORT ROUT┆
0xc290…c2e0 49 4e 45 20 00 7c 00 e2 00 06 00 50 2a 20 00 7c 00 fc 00 2c 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 00 7c 01 06 00 06 00 50 2a 20 00 7c 01 36 00 0e 00 50 ┆INE | P* | , P**************************************** | P* | 6 P┆
0xc2e0…c330 41 42 44 59 5c 45 51 55 5c 2a 00 7c 01 40 00 2c 00 50 5c 43 46 5c 41 31 35 2c 55 50 44 41 50 50 5c 55 50 44 41 54 45 20 48 45 41 44 20 50 4f 53 2e 20 50 4f 49 4e 54 45 52 20 00 7c 01 52 00 18 00 50 5c 41 42 4c 5c 4c 45 4e 44 49 53 5c 45 4e ┆ABDY EQU * | @ , P CF A15,UPDAPP UPDATE HEAD POS. POINTER | R P ABL LENDIS EN┆
0xc330…c34e (125, 2, 30) 44 20 49 2f 4f 20 00 7c 01 82 00 08 00 50 5c 45 4e 44 00 7d 00 0e 40 04 00 00 00 7d 00 1a ┆D I/O | P END } @ } ┆
0xc34e…c356 (126, 1, 8) 20 04 00 00 00 7e 00 04 ┆ ~ ┆