X7$ ?BOOT-U-No boot on volume ߋtv  @y@oSRT11A DECRT11A  000000.DIR BACKUP.SYS BADBLK.SYS BADLOG.SYS  BITMAP.SYS CONTIN.SYS CORIMG.SYS INDEXF.SYSSYS0.DIR  VOLSET.SYS  P T qR8@ ? SYSEXE.DIR ^^[^kQD^v.hM[3v3vjLp3zzzzzz9g&PA.EXEGGSKMLPAMSG.EXE GGSKMMSA.EXEGGSKMMSAMSG.EXE GGSKMRXA.EXEGGSKMRXAMSG.EXE GGSKMTKA.EXEGGSKMTKAMSG.EXE GGSKMTSA.EXEGGSKMTSAMSG.EXE GGSKMXQA.EXEGGSKMXQAMSG.EXE   @y@o ELAN JOHNSON DECFILE11B h DECOD3 ABSTRACT?DECOD3 IS A PROGRAM WHICH EVERY SOFTWARE PIRATE SHOULD HAVE. IT8IS WRITTEN TO RUN UNDER RT-11 OPERATING SYSTEM TO DECODE?(DISASSEMBLE) .SAV AND .LDA FILES INTO THEIR EQIVALENT MACRO-11;ASSEMBLY CODE COMPLETE WITH SELF GENERATED LABELS, ABSOLUTE?LOCATION, SYMBOL TABLE, CROSS REFERENCE TABLE, OCTAL, ASCII ANDRADIX 50 EQUIVALENTS.:DECOD3 IS A SUPERSET, MODIFIED AND IMPROVED VERSION OF THE=DECODE PROGRAM. THE PROGRAM WAS ORIGINALLY WRITTEN BY MICHAELALEVINE AT NAVAL WEAPONS CENTER AND SUBSEQUENTLY MODIFIED BY YUKOHKOBAYASHI OF OHIO STATE.@THE OUTPUT CAN BE ASSEMBLED BY THE MACRO-11 ASSEMBLER AND LINKED@TO RECREATE THE ORIGINAL FILE. BY THE USE OF SWITCHES THE OUTPUTACODE CAN BE MADE TO REFLECT THE INSTRUCTION SET OF ONE OF SEVERALMACHINE CONFIGURATIONS. DECODE VERSION 3.0 Decode 3.0 is a modified version of DECODE 2.0. The file is stored in DECOD3.MAC and DECOD3.SAV. The program provides additional features over version 2.0. Under version 3.0, the user is allowed to specify a /S:nnnn and a /E:nnnn option. These options override the default start and end processing addresses for the decoding process. Normally, the addresses come from block 0 of the subject file. Manual control allows the user start instruction decoding before the program transfer address and to end decoding after the end of the root segment. The second enhancement allows the user to set up a command file which will allow the decode program to switch from data mode to instruction mode at specified octal addresses. This file is of the form: D 1000 I 1100 D 1200 I 1202 ect. During execution of the decode program, it will read the file and control the translation process. To call the revised program type "RUN DECOD3" and answer the "*" prompt in the form: LP:=prog,comm.DAT/S:nnnn/E:mmmm/P:2 This string will decode program "prog.SAV" with instructions starting at nnnn and ending at mmmm. The mode control will be defined in file "comm.DAT". Output will go to the line printer, and decoding will be in accordance with the LSI-11 instruction set (/P:2 option). These features are only available when decoding .SAV files!!!!!! Good Luck! Tom Rorro DECOD2.DOC V02 BY YUKOH KOBAYASHI INSTRUCTION AND RESEARCH COMPUTER CENTER THE OHIO STATE UNIVERSITY MAY 10, 1980 RT-11 SAV/LDA FILE DISASSEMBLER ABSTRACT DECOD2 IS A PROGRAM WRITTEN TO RUN UNDER RT-11 OPERATING SYSTEM TO DECODE (DISASSEMBLE).SAV AND .LDA FILES INTO THEIR EQIVALENT MACRO-11 ASSEMBLY CODE COMPLETE WITH SELF GENERATED LABELS, ABSOLUTE LOCATION, SYMBOL TABLE, CROSS REFERENCE TABLE, OCTAL, ASCII AND RADIX 50 EQUIVALENTS. DECOD2 IS A MODIFIED AND IMPROVED VERSION OF THE DECODE V01J PROGRAM, WHICH WAS WRITTEN BY MICHAEL LEVINE AT NAVAL WEAPONS CENTER. THE OUTPUT CAN BE ASSEMBLED BY THE MACRO-11 ASSEMBLER AND LINKED TO RECREATE THE ORIGINAL FILE. BY THE USE OF SWITCHES THE OUTPUT CODE CAN BE MADE TO REFLECT THE INSTRUCTION SET OF ONE MACHINE CONFIGURATION ONLY INSTEAD OF ALL POSSIBLE INSTRUCTIONS. IMPROVED FEATURES OVER DECODE V01J DECOD2 IS AN IMPROVED VERSION OF ORIGINAL DECODE V01J PROGRAM. IMPROVED FEATURES ARE FOLLOWINGS: 1. THE ORIGINAL DECODE PROGRAM DISASSEMBLED EVERY WORD INTO AN ASSEMBLY MNEMONIC CODE.IT CREATED AN UNDESIRABLE PROBLEM THAT WHEN THE STARTING ADDRESS OF AN INPUT PROGRAM TO BE DECODED IS LOCATED AT THE MIDDLE OF THE PROGRAM, THE FIRST INSTRUCTION AT THE STARTING ADDRESS MAY NOT BE DISASSEMBLED CORRECTLY SINCE THE MEANING OF CURRENT WORD BEING DECODED DEPENDS ON THE PREVIOUS WORDS. THIS PROBLEM HAS BEEN CORRECTED IN DECOD2 WHICH DOES NOT DECODE THOSE WORDS LOCATED BETWEEN THE LOWEST LOCATION OF THE PROGRAM AND THE STARTING ADDRESS OF THE PROGRAM. THESE WORDS WILL BE REGARDED AS DATA AND BE REPRESENTED BY .WORD MNEMONIC. 2. DECOD2 HAS A NEW OPTION, /I, WHICH SPECIFIES THAT THE OUTPUT FROM DECOD2 WILL HAVE A FORMAT SUITABLE TO AN INPUT TO MACRO-11 ASSEMBLER. IN THIS MODE, ALL COMMENT FIELDS ARE ELIMINATED. ALSO, THE SYMBOL TABLE AND CROSS REFERENCE TABLE ARE NOT OUTPUT. 3. THE ORIGINAL DECODE PROGRAM NEGLECTED STARTING ADDRESS GIVEN IN A .LDA FILE. HOWEVER, DECOD2 RECOGNIZES THE STARTING ADDRESS SPECIFIED IN A .LDA FILE. IF STARTING ADDRESS IS 0, DECOD2 PRINTS A MESSAGE TO THE USER, AND PROCEEDS DECODING. FURTHER, DECOD2 CAN READ THE VALUE OF STARTING ADDRESS FOR A .LDA FILE AS AN OPTION. 4. THE OUTPUT FROM THE ORIGINAL DECODE PROGRAM IS NOT EASY TO READ FOR THE REASON THAT LABELS PUT ON A DISASSEMBLED MNEMONIC LIST ARE NOT SORTED. IN DECOD2, LABELS APPEARING IN A MNEMONIC LIST ARE ALWAYS SORTED AND FURTHER EVERY LABEL SHOWS THE LOCATION WHERE IT IS DEFINED. 5. THE ORIGINAL DECODE HAS FEW COMMENTS, WHILE MORE COMMENTS ARE INCLUDED IN DECOD2. 6. A SINGLE 0 VALUE WORD IS REPRESENTED AS A .WORD 0 DIRECTIVE IN THE OUTPUT LIST IN DECOD2 INSTEAD OF HALT INSTRUCTION IN DECODE. TWO OR MORE CONTINUOUS 0 VALUE WORDS ARE REPRESENTED AS A .BLKW DIRECTIVE. FURTHER, LABELS APPEARING MIDDLE OF CONSECUTIVE 0'S ARE OUTPUTED CORRECTLY. 7. IN ORDER TO SAVE PRINTER PAPER, OUTPUT OF FF (FORM FEED) CODE IS MINIMIZED. 8. THE PROBLEM THAT DEFINITION OF ALL LABELS IS OUTPUTED BEFORE OUTPUT OF TEXT WHEN THE BIGGINING (NOT STARTING) ADDRESS OF THE INPUT PROGRAM IS 0. 9. OTHER SEVERAL SMALL POINTS HAVE BEEN MODIFIED. INSTRUCTIONS THE COMMAND STRING TO DECOD2 IS; *OUTFIL=INFIL/SW:VAL/SW:VAL WHERE THE FILES HAVE THE STANDARD RT-11 FORMAT DEV:FILNAM.EXT[SIZE] DEFAULT EXTENTIONS ARE INPUT FILE .SAV OUTPUT FILE .DEC SWITCHES /A:VAL USED TO LIMIT THE ARITHMETIC INSTRUCTIONS DECODED INTO MNEONICS. THE ARITHMETIC OPTION GIVEN BY VAL VAL=EIS FIS FPU GIVES THE SET OF ARITHMETIC INSTRUCTIONS THAT ARE TO BE DECODED INTO NEMONICS. THE /A SWITCH IS RECOGNIZED ONLY IF THE /P SWITCH IS ALSO USED AND THE PROCESSOR SPECIFIED BY THE /P SWITCH ALLOWS THE OPTIONS GIVEN BY VAL(FIS IS ILLEGAL FOR A 45 AS IS FPU FOR A 40). NOTE THAT A VAL OF FIS ALSO IMPILES EIS IS ON THE SYSTEM. /I THE FORMAT OF OUTPUT WILL BE SUCH THAT THE OUTPUT CAN BE AN INPUT TO MACRO-11 ASSEMBLER. /L:VAL FLAGS THAT THE INPUT FILE IS AN LDA FILE. IN THIS CASE THE INPUT FILE MUST HAVE .LDA FORMAT. VAL=STARTING ADDRESS (NOT LOADING ADDRESS) OF THE INPUT PROGRAM IN OCTAL. SEE EXAMPLE 2 /M USED TO LIMIT THE INSTRUCTION SET DECODED INTO NEMONICS. IN THIS CASE IT FLAGS THE EXISTENCE OF A MEMORY MANAGEMENT UNIT ON THE SYSTEM. THIS SWITCH IS IGNORED IF THE /P SWITCH IS NOT USED OR IF IT IS, THE PROCESSOR SPECIFIED DOES NOT HAVE THE CAPABILITY OF MEMORY MANAGEMENT(THAT MEANS 40'S AND ABOVE) AND THEN ONLY THE MEMORY MANAGEMENT INSTRUCTIONS THAT APPLY TO THAT PROCESSOR. /P:VALUE. SPECIFIES THE TYPE OF PROCESSOR TO DECODE FOR. IF VALUE IS NOT GIVEN-ONLY THE BASIC INSTRUCTION SET IS DECODED INTO NEMONICS. IF /P IS NOT USED,ALL POSSABLE PDP-11 INSTRUCTIONS ARE DECODED INTO THEIR NEMONICS. VALUE IS THE DECIMAL NUMBER OF THE TYPE OF PROCESSOR ( 03,04,05,10,15,20,34,35,40,45,ETC) AND MUST BE FOLLOWED BY A '.' DECIMAL POINT TO TELL THE CSI THAT IT IS A DECIMAL NUMBER. THIS SWITCH MUST BE USED IF THE /A AND /M SWITCHES ARE TO BE RECOGNIZED AND THE OPTIONS SPECIFIED MUST BE COMPATABLE WITH THE PROCESSOR TYPE GIVEN BY THE /P:VAL. OR THEY WILL BE IGNORED. THE DISSASEMBLER BREAKS DOWN THE PDP-11 INSTRUCTION SET INTO 9 CATEGORIES: 1 BASIC INSTRUCTION SET AS FOR THE PDP 11/04 THROUGH THE 11/20 SERIES. 2 PDP 11/03 UNIQUE INSTRUCTIONS. 3 PDP 11/40-11/45 UNIQUE BASIC INSTRUCTION SET. INCLUDES ALL THOSE NON OPTION INSTRUCTIONS UNIQUE TO THE 11/40 AND 45 COMPUTERS. 4 PDP 11/45 UNIQUE BASIC INSTRUCTION SET. INCLUDES ALL THE NON OPTION INSTRUCTIONS UNIQUE TO THE 11/45 COMPUTER 5 PDP 11/40-11/45 MEMORY MANAGEMENT INSTRUCTION SET. INCLUDES ALL THE MEMORY MANAGEMENT INSTRUCTIONS COMMON TO THE 11/40 AND 45 COMPUTERS 6 PDP 11/45 MEMORY MANAGEMENT INSTRUCTION SET. INCLUDES ALL THE MEMORY MANAGEMENT INSTRUCTIONS UNIQUE TO THE 11/45. 7 EIS INSTRUCTION SET 8 FIS INSTRUCTION SET 9 FPU INSTRUCTION SET VAL\INS. SET 1 2 3 4 5 6 7 8 9 NOVAL 0-2 X 4-20 3 X X X A A 21-40 X X A A A 41-77 X X X A A X A WHERE X=DEFAULT INSTRUCTION SET FOR VAL A=ACCEPTABLE ADDITONAL INSTRUCTION SET AVAILABLE FOR VAL =INSTRUCTIONS NOT AVAILABLE FOR VAL THE DECODER USES THE OPTIONS SPECIFIED IN THE COMMAND STRING TO CHOOSE WHICH COMBINATION OF INSTRUCTION SETS TO DECODE INTO NEMONICS( DEFAULT FOR NO OPTION SWITCHES IN THE COMMAND STRING IS ALL OF THEM) EXAMPLE 1 DISASSEMBLE A SAV FILE .R DECOD2 *PIP=PIP . EXAMPLE 2 DISASEMBLE AN LDA FILE WHICH CONTAINS A STARTING ADDRESS .R DECOD2 *ROLLIN=ROLLIN.LDA/L . OR .R DECOD2 *AAAAAA=AAAAAA.LDA/L:600 . EXAMPLE 3 DISASSEMBLE FOR A BASIC MACHINE (11/20) .R DECOD2 *TEST=TEST/P . OR .R DECOD2 *TEST=TEST/P:20. . EXAMPLE 4 FOR AN LSI-11 WITH ARITHMETIC CHIP .R DECOD2 *TEST=TEST/P:3./A:FIS EXAMPLE 5 AN 11/45 WITH MEMORY MANAGEMENT BUT NO FPU(EIS IS PART OF THE BASIC INSTRUCTION SET OF THE 45) .R DECOD2 *TEST=TEST/P:45./M . DISASSEMBLER OPERATION THE DISASSEMBLER MAKES 2 OR 3 PASSES OVER THE INPUT DEPENDING ON THE TYPE OF FILE IT IS: PASS 0 OPTIONAL LDA REFORMAT PASS CONVERTS AN LDA FILE INTO SAV FORMAT USEING A 128. BLOCK SCRATCH FILE ON THE SYSTEM DISK TO HOLD THE IMAGE FOR THE NEXT TWO PASSES. THE SCRATCH FILE NAME IS SY:WORK.DEC. PASS 1 SEARCH FOR LABELS DECODE THE SAV FILE AND LOCATE ALL MEMORY REFERENCES (SRC/DEST MODES 2 THRU 7 AND ALL BRANCHES ETC) AND ASSIGN A LABEL TO THE VALUE FOUND PASS 2 OUTPUT SOURCE DECODE AGAIN THE SOURCE NOW OUTPUTING IT SUBSTITUTEING LABELS FOR THE ABSOLUTE AND RELATIVE ADDRESSES FOUND IN PASS 1. GENERATED CODE THE OUTPUT OF THE DISASSEMBLER IS BROKEN INTO 7 PARTS: PART 1: DEFINITIONS 1 DEFINE ALL REGISTERS (AND ACCUMULATORS IF DECODEING FPU INSTRUCTIONS) 2 DECLARE THE LOCATION OF THE STACK STARTING LOCATION(IF FOUND) AS THE GLOBAL NAME 'STACK' THIS IS SO WHEN LINKING,THE STACK CAN BE PROPERLY PLACED BY THE USE OF THE /M SWITCH OF THE LINKER. WHEN LINKING,SPECIFY THE /M SWITCH, THE LINKER WILL COME BACK ASKING FOR THE STACK SYMBOL, JUST TYPE 'STACK' AND IT WILL BE PROPERLY PLACED. 3 DECLARES AN .ASECT 4 SETS THE POINT TO THE FIRST LOCATION DECODED (FOR SAVE FILES EITHER 1000 OR THE STARTING ADDRESS WHICH EVER IS LOWER AND FOR LDA FILES THE LOWEST ADDRESS FOUND) PART 2: LABEL DEFINITIONS THOSE LABELS GENERATED DURING PASS 1 AND WHOSE VALUE IS EITHER ODD OR WHOSE VALUE IS OUTSIDE THE BOUNDRIES OF THE PROGRAM ARE DEFINED HERE IN THE FORM: LXXX=VALUE WHERE XXX PRESENTS THE LOCATION IN OCTAL WHERE THE LABEL IS DEFINED PART 3: GENERATED CODE THE GENERATED CODE LINE HAS SIX SEGMENTS 1 LABEL IF THE ADDRESS IS REFFERED TO BY A LABEL FOUND IN PASS 1, IT IS PRINTED OUT IN THE FORM LXXX: (IF THIS IS THE START ADDRESS THE LABEL START: PRECEEDS THIS LABEL ON THE LINE PREVIOUS ALL BY ITSELF) 2 INSTRUCTION MNEMONIC OR .WORD OR .BLKW DIRECTIVE 3 AS THE FIRST PART OF A COMMENT, THE LOCATION OF THE INSTRUCTION WHEN /I IS GIVEN, THESE COMMENT FIELDS ARE NOT PRODUCED. 4 THE NEXT ITEM IN THE COMMENT ARE THE OCTAL CONTENTS OF THE WORDS MAKEING UP THE INSTRUCTION. 5 THE THIRD ITEM IS A LIST OF THE EQUIVALENT ASCII CARACTERS OF THE WORDS THAT MAKE UP THE INSTRUCTION (ALL ASCII CHARACTERS WITH VALUES LESS THAN 40 ARE REPACED BY BLANKS) 6 THE LAST ITEM IN THE COMMENT IS THE RADIX 50 EQUIVALENT STRING OF THE WORDS OF THE INSTRUCTION PART 4 LEFT OVER LABELS ANY LABELS FOUND DURING PASS 1 THAT HAVE NOT BEEN DEFINED IN EITHER PARTS 2 OR 3 ARE DEFINED HERE IN THE SAME MANNER AS IN PART 2 PART 5 END STATEMENT THE END OF THE PROGRAM IS DECLARED FOR THE ASSEMBLER AS .END START PART 6 SYMBOL TABLE A COMPLETE SYMBOL TABLE IS PRINTED OUT GIVEING EACH ENTRY AND ITS VALUE(132 COLUMN FORMAT). AN OCTAL VALUE PROCEEDED BY E REPRESENTS ENTRY POSITION IN THE SYMBOL TABLE. THIS IS NOT OUTPUTED WHEN /I OPTION IS SPECIFIED. PART 7 CROSS REFERENCE TABLE A LISTING OF ALL LABELS AND THE ABSOLUTE LOCATIONS THAT REFERENCE THEM. THIS IS NOT OUTPUTED WHEN /I OPTION IS SPECIFIED. POSSIBLE MACRO ASSEMBLER ERRORS WHEN ASSEMBLING THE RESULTING CODE GENERATED WITH /I OPTION THROUGH THE MACRO-11 ASSEMBLER,THE FOLLOWING ERRORS CAN BE REPORTED: M MULTIPLE DEFINITION OF A LABEL. SINCE A LABEL GENERATED BY DECOD2 PROGRAM WILL HAVE UP TO 7 LETTERS, WHILE THE ASSEMBLER RECOGNIZES ONLY FIRST 6 LETTERS, THIS ERROR MASSAGE MAY BE OBTAINED. TO CORRECT THIS ERROR, CHANGE THE LABEL NAMES AS YOU WANT USING UP TO 6 LETTERS. Z INSTRUCTION INCOMPATABLE ON VARIOUS PDP-11 MODELS. DATA, INTERPRETED AS INSTRUCTIONS, CAN COME UP AS THE MOST UNUSUAL INSTRUCTIONS-THIS ONE CAN BE IGNORED. A ADDRESS ERROR ONLY KNOW CASE IS FOR SOB RX,.+2 WHERE DATA IS INTERPRETED AS AN SOB INSTRUCTION WITH AN OFFSET BRANCH DISTANCE OF 0 (.+2). THE ASSEMBLER TREATS THIS AS AN ERROR AND CHANGES IT TO SOB RX,. WHICH IS NOT THE SAME. DO NOT IGNORE THIS ERROR,CHECK ALL OCCOURANCES. [END OF DECOD2.DOC] ;DECODE (DISASSEMBLE) A BINARY PROGRAM INTO ASSEMBLER MNEMONICS. ;MODIFIED BY YUKOH KOBAYASHI, INSTRUCTION AND RESEARCH COMPUTER ;CENTER, THE OHIO STATE UNIVERSITY, 10-MAY-80. ;ORIGINALLY WRITTEN BY MICHAEL LEVINE, NAVAL WEAPONS CENTER, V01J. ;MODIFICATIONS MADE: ; 1.LABEL NUMBER IS THE VALUE OF THE LABEL, INSTEAD OF THE ;POSITION ; IN THE LABEL TABLE. ; 2. SEE DECOD2.DOC FOR ADDITIONAL INFORMATION. ;INPUT FILE .SAV BECOMES CHANNEL 3. ;OUTPUT FILE BECOMES CHANNEL 0. ;DISK CHANNEL 0=OUTPUT FILE ; 3=INPUT FILE ; 4=WORK.DEC CONTAINING CONVERTED .LDA FILE ;PASS =2 =.LLDA FILE CONVERSION ; =1 =SERCH FOR LABELS ; =0 =OUTPUT OF TEXTS ; .TITLE DECOD2.MAC .IDENT /02.1/ .SBTTL DECLARATIONS .MCALL .CSIGEN,.PRINT,.READW,.WRITW,.CLOSE,.EXIT,.SETTOP .MCALL .QSET,.WRITE,.WAIT,.ENTER P03=1 P4045M=2 P45M=4 P4045B=10 P45B=20 EIS=40 FIS=100 FPU=200 PAGSIZ=53. .PAGE .SBTTL MAIN PROGRAM START: .QSET #QUE,#4 .PRINT #IDMES NEWFIL: MOV #3,INCHAN ;INPUT CHANNNEL=3 MOV SP,TMP ;TMP=SP (SAVE SP FOR OPTIONS) 1$: .CSIGEN #HANDLR,#DEFEXT,#0,#CMDSTR MOV R0,TABLEL MOV R0,ENTRYN MOV @#54,R0 .SETTOP MOV R0,TABLEH MOV R0,CRFEN MOV #1,PASS CLR LDAMOD MOV #-1,CONFIG ;DEFALT IS TO DECODE ALL INSTRUCTIONS CLR PSR CLR MM CLR ATH CLR INMODE ;INMODE=0 MOV (SP)+,R1 ;ANY SWITCHES, R1=NO. OF SWITCHES BEQ ENDCSI ;BRANCH IF NO SWITCH 6$: CMPB #'L,(SP) ;WAS SWITCH AN L BNE 4$ INC LDAMOD ;SET LDAMOD=1 MOV #4,INCHAN ;INCH=4 WHEN .LDA TST (SP)+ ;DELETE THE OPTION BPL 10$ ;IF NO VALUE, DO NOTHING MOV (SP),STADD ;READ THE VALUE INTO STADD BR 12$ 4$: CMPB #'I,(SP) ;I=INPUT TO ASSEMBLER MODE BNE 40$ INC INMODE BR 12$ ;GET NEXT SWITCH 40$: CMPB #'M,(SP) ;WAS IT MEMORY MANAGEMENT SWITCH BNE 11$ INC MM BR 12$ ;AND SKIP TO NEXT SWITCH 11$: CMPB #'P,(SP) ;WAS PROCESSOR SPECIFIED BNE 13$ CLR CONFIG TST (SP)+ ;SKIP TO VALUE IF ANY BPL 50$ ;ERROR IF NO VALUE MOV (SP),PSR ;SAVE TYPE OF PROCESSOR BR 12$ 13$: CMPB #'A,(SP) ;WAS ARITHMETIC OPTION SPECIFIED BNE 15$ ;INVALID OPTION TST (SP)+ ;GET IT IF ANY SPECIFDIED BPL 50$ ;ERROR IF NO VALUE MOV (SP),ATH 12$: TST (SP)+ ;DELETE THE OPTION 10$: DEC R1 ;ANOTHER SWITCH?? BGT 6$ ;REPEAT BR ENDCSI ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; ADD .SAV FILE START AND END ADDRESS OPTIONS ; 15$: CMPB #'S,(SP) ; START OPTION FOUND ? BNE 16$ ; IF NOT, TRY END OPTION CLR LDAMOD ; SET .SAV MODE TST (SP)+ ; WAS ANY ADDRESS SPECIFIED ? BPL 50$ ; IF NOT, THERE'S AN ERROR MOV (SP),STADD ; ELSE GET THE STARTING ADDRESS BR 12$ ; AND GET NEXT OPTION 16$: CMPB #'E,(SP) ; END DIRECTIVE FOUND ? BNE 50$ ; IF NOT, NOTHING LEFT THAT'S LEGAL CLR LDAMOD ; SET .SAV MODE TST (SP)+ ; SEE IF END ADDRESS IS THERE BPL 50$ ; IF NOT, ERROR MOV (SP),FINADD ; ELSE GET FINAL ADDRESS BR 12$ ; AND LOOK FOR NEXT OPTION ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; 50$: ;OPTION ERROR .PRINT #INVOPT MOV TMP,SP ;CLEAR SP BR 1$ ;REPEAT ENDCSI: MOV TMP,SP ;RECOVER SP .WAIT #0 BCS NEWFIL .WAIT #3 BCS NEWFIL ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; ATTEMPT TO OPEN COMMAND FILE ; MOV #CMDBUF+512.,CMDPTR ; INITIALIZE COMMAND POINTER CLR CMDBLK ; RESET COMMAND BLOCK NUMBER CLR NXTMOD ; RESET NEXT MODE COMMAND TST LDAMOD ; IN .SAV MODE ? BNE 100$ ; IF NOT, SET END OF FILE CONDITION .WAIT #4 ; SEE IF THE COMMAND FILE IS OPEN BCC 200$ ; IF IT IS, SKIP TO GET FIRST ADDRESS 100$: MOV #-1,EOF ; SET END OF FILE .TRUE. 200$: JSR PC,GETOPT ; GET THE NEXT TOGGLE ADDRESS ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; TST CONFIG BNE 14$ ;IF NO OPTINS SPECIFED-SKIP NEXT TST PSR ;WAS A VALUE GIVEN FOR PROCESSOR BEQ 14$ ;IF NOT ASSUME BASIC INSTRUCTION SET ;AND NO OTHER OTION SWITCHES ARE GOOD CMP #3,PSR ;WAS IT AN LSI-11 BNE 15$ BIS #P03!P4045B,CONFIG ;SET CONFIGURATION WORD BR 18$ ;GO CHECK ARITH OPTIONS(MM NOT APPLICABLE) 15$: CMP #20.,PSR ;IS IT A PROCESSOR 20 OR BELOW(BASIC ONLY) BGE 14$ ;IF YES NO OTHER OPTIONS GOOD BIS #P4045B,CONFIG ;IT IS AT LEAST A 40 FAMILY CMP #40.,PSR ;WAS IT A 45+ FAMILY BGE 17$ BIS #P45B!EIS,CONFIG ;SET 45 INTO CONFIG WORD 17$: TST MM ;HOW ABOUT MEMORY MANAGEMENT BEQ 18$ ;SKIP IF NONE BIS #P4045M,CONFIG ;SET 40 MM BIT #P45B,CONFIG ;IS IT A 45 BEQ 18$ BIS #P45M,CONFIG 18$: TST ATH ;WAS ARITH OPTION SELECTED BEQ 14$ ;SKIP IF NOT CMP REIS,ATH ;WAS EIS SELECTED BNE 19$ BIS #EIS,CONFIG ;YES SET OTION BR 14$ 19$: CMP RFIS,ATH ;HOW ABOUT FIS BNE 20$ BIT #P45B,CONFIG ;GOOD FOR 40 FAMILY ONLY BNE 14$ ;SKIP IF NOT BIS #EIS!FIS,CONFIG ;SET CONFIG WORD BR 14$ 20$: CMP RFPU,ATH ;FPU SELECTED BNE 14$ ;SKIP IF NOT BIT #P45B,CONFIG ;GOOD ONLY FOR 45 FAMILY BEQ 14$ BIS #FPU,CONFIG 14$: TST LDAMOD BNE 2$ JMP NOLDA ;START OF .LDA FILE PROCESS ;CHANNEL 4 WILL CONTAIN CONVERTED FILLE OF .LDA 2$: .ENTER #ARA,#4,#BLKLDA,#128. ;CREATE SCRATCH FILE ;BLKLDA=FILE NAME IN RAD50 BCC 7$ .PRINT #NOROOM ;ERROR (NO ROOM ON DISK) JMP EREXIT ;ERROR EXIT 7$: CLR OUTBLK MOV #OUTBUF,R1 MOV #512.,R2 8$: CLR (R1)+ DEC R2 BGT 8$ MOV #64.,R1 9$: .WRITW #ARA,#4,#OUTBUF,#512.,OUTBLK ADD #2,OUTBLK DEC R1 BGT 9$ .READW #ARA,#3,#INBUF,#256.,INBLK ;CHANNEL 3=.LDA FILE INC INBLK MOV #INBUF,INPT MOV #-1,LDALO CLR LDAHI LDABLK: CLR CHKSUM ;PROCESS .LDA FILE JSR PC,GETBYT CMPB #1,R0 BNE LDABLK JSR PC,GETBYT TST R0 BNE LDABLK JSR PC,LDAWD SUB #6,R0 ;IF INPUT=6, THIS BLOCK HAS STARTING ;ADDRESS BEQ LDADNE MOV R0,LDACT JSR PC,LDAWD MOV R0,ADDR LDALOP: JSR PC,GETBYT MOV ADDR,R1 CMP R1,LDAHI BLOS 1$ MOV R1,LDAHI 1$: CMP R1,LDALO BHIS 2$ MOV R1,LDALO ;FIND LOWEST ADDRESS USED IN .LDA 2$: BIC #777,R1 SWAB R1 CCC ROR R1 CMP R1,OUTBLK BEQ 3$ MOV R0,-(SP) .WRITW #ARA,#4,#OUTBUF,#256.,OUTBLK MOV R1,OUTBLK .READW #ARA,#4,#OUTBUF,#256.,OUTBLK ;READ .LDA FILE MOV (SP)+,R0 3$: MOV ADDR,R1 BIC #177000,R1 MOVB R0,OUTBUF(R1) INC ADDR DEC LDACT BNE LDALOP JSR PC,GETBYT TSTB CHKSUM ;TEST CHECKSUM BEQ LDABLK .PRINT #BADCKS BR LDABLK LDADNE: .WRITW #ARA,#4,#OUTBUF,#256.,OUTBLK ;STARTING ADDRESS BLOCK ;HAS BEEN FOUND JSR PC,LDAWD ;SET STARTING ADDRESS BIC #1,R0 ;TRANCATE 0-TH BIT BEQ 5$ ;IF STARTING ADDRESS IS .LDA IS 0, ;USE THE VALUE SPECIFIED IN THE OPTION MOV R0,STADD 5$: TST STADD BNE 10$ ;BRANCH IF STARTING ADDRESS IS NOT 0 .PRINT #MES1 ;STARTING ADDRESS IS 0 10$: MOV LDAHI,FINADD ;SET FINAL ADDRESS MOV LDALO,BADDR ;BIGINNING ADDRESS ;CHECKSUM FOR STARTING BLOCK ;IS NOT CHECKED BIC #1,BADDR ;ROUND OFF TO EVEN BEGINNING ADDRESS INC FINADD ;ROUND UP TO EVEN FINAL ADDRESS BIT #1,FINADD BEQ NOLDA INC FINADD ; ; ;PROCESS OF .SAV AND CONVERTED .LDA FILES NOLDA: CLR HALTIN ;PROCESS OF NON-.LDA FILE CLR COUNT0 CLR INBLK CLR OUTBLK CLR STFLAG CLR STKADD CLR CHRCT MOV #PAGSIZ,LINCT ;GO TO NEXT PAGE CLR CODE MOV #OUTBUF,R0 MOV #512.,R1 2$: CLR (R0)+ DEC R1 BGT 2$ MOV #OUTBUF,OUTPT TST LDAMOD BNE 3$ ;BRANCH IF .LDA FILE .READW #ARA,INCHAN,#INBUF,#256.,INBLK ;.SAV FILE AND READ IT BCC 4$ JMP NEWFIL ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; SEE IF THE START AND ENDING ADDRESS ; HAVE BEEN SPECIFIED. IF NOT, SET ; THE DEFAULT FROM THE .SAV FILE HEADER ; 4$: CMP #-1,STADD ; START ADDRESS NULL ? BNE 5$ ; IF NOT, GOTO END ADDRESS MOV INBUF+40,STADD ;GET STARTING ADDRESS OF .SAV FILE 5$: CMP #-1,FINADD ; FINAL ADDRESS SPECIFIED ? BNE 6$ ; IF SO, PROCEED NORMALLY MOV INBUF+50,FINADD ;ENDADD 6$: ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; MOV INBUF+42,STKADD MOV #1000,BADDR ;BEGINNING ADDRES OF .SAV IS 1000 3$: CMP STADD,BADDR BHIS 1$ ;GO TO IF STADD>=BADDR (NORMAL) ;INVALID STARTING ADDRESS .PRINT #INVSTA ;PRINT ERROR MASSAGE JMP A3 ;EXIT 1$: SUB #2,FINADD ;ADJUST FINAL AND BEGINNING ADDRESSES SUB #2,BADDR MOV STADD,R0 SUB #2,R0 MOV R0,ADDR ;START FROM THE STARTING ADDRESS ;FOR PASS=1 BR PASS1 ;START OF PASS PLOOP: MOV BADDR,ADDR ; ; RESET INPUT COMMAND FILE ; CLR EOF ; RESET END OF FILE MOV #CMDBUF+512.,CMDPTR ; RESET COMMAND POINTER CLR CMDBLK ; AND FILE BLOCK NUMBER CLR NXTMOD ; RESET NEXT MODE TST LDAMOD ; LDA MODE ? BNE 100$ ; IF SO, NO INPUT COMMAND FILE .WAIT #4 ; SEE IF THERE IS A COMMAND FILE BCC 200$ ; IF SO, PROCEED 100$: MOV #-1,EOF ; ELSE SET END OF FILE 200$: JSR PC,GETOPT ; GET THE NEXT FORMAT OPTION PASS1: CLR SHORT MOV ADDR,R0 ADD #2,R0 MOV R0,R1 BIC #177000,R1 ;EXTRACT BLOCK NUMBER MOV R1,INPT ADD #INBUF-2,INPT BIC #777,R0 CCC ROR R0 SWAB R0 MOV R0,INBLK .READW #ARA,INCHAN,#INBUF,#256.,INBLK BCC 5$ JMP NEWFIL 5$: INC INBLK TST PASS BNE ILOOP ;OUTPUT OF NEMONICS MOV #CMDOUT,R1 ;IF PASS=0, START OUTPUT JSR PC,OUTPUT ;OUTPUT USER'S COMMAND MOV #INTMSG,R1 BIT #FPU,CONFIG 6$: JSR PC,OUTPUT ;OUTPUT OF DEFINITION OF AC'S MOV ADDR,R1 ADD #2,R1 JSR PC,OCTOUT ;OUTPUT VALUE FOR LOCATION COUNTER TST STKADD BEQ 4$ MOV #STKMSG,R1 JSR PC,OUTPUT MOV STKADD,R1 JSR PC,OCTOUT ;OUTPUT OF DEFINITION OF LABELS WHICH PROBABLY ;NOT NORMAL LABEL. 4$: MOV ENTRYN,R4 ;R4=LAST ENTRY ADDRESS OF SYMBOL TABLE MOV TABLEL,R3 ;R3=ENTRY ADDRESS OF SYMBOL TABLE CLR R2 1$: CMP R3,R4 BHIS STCOD ;END OF LABEL LISTING CMP (R3),BADDR ;CHECK IF THE VALUE IS WITHINTHE PROGRAM BLE 2$ CMP (R3),FINADD BGT 2$ BIT #1,(R3) BNE 2$ 3$: ADD #6,R3 ;R3=NEXT ENTRY POINT OF LABEL TABEL INC R2 BR 1$ 2$: MOVB #15,R0 ;OUTPUT OF CR LF JSR PC,OUTCHR MOVB #12,R0 JSR PC,OUTCHR ;OUTPUT OF DEFINITIONS OF LABEL VALUES WHICH CANNOT BE ;ADDRESSES WITHIN THE PROGRAM MOVB #'L,R0 JSR PC,OUTCHR MOV (R3),R1 ;OUTPUT LABEL NUMBER MOV R2,-(SP) ;SAVE R2 JSR PC,OCTOUT MOVB #'=,R0 JSR PC,OUTCHR MOV (R3),R1 JSR PC,OCTOUT MOV (SP)+,R2 ;RESTORE R2 BIS #1,2(R3) ;SET OUTPUT FLAG=1 BR 3$ ; ; STCOD: MOVB #15,R0 ;CR LF JSR PC,OUTCHR MOVB #12,R0 JSR PC,OUTCHR MOV #1,CODE MOV #PAGSIZ,LINCT ;GO TO NEXT PAGE TST INMODE BNE ILOOP ;SKIP THE NEXT IF INPUT TO ASSEMBLER ;WAS SPECIFIED MOV #FMT,R1 ;OUTPUT OF HEADER JSR PC,OUTPUT ;STARTING OF DECODING PROCESS, WHEN PASS=1 ; R0= TMP ; R1= INS DECODE WORKING REGISTER ; R2= OFFSET POINETER REGISTER FOR DECODE, CALCULATED HERE ; R3= ; R4= ; R5= INSTR WORD ILOOP: MOV #ADDOLD+2,ADDOLD JSR PC,GETWD ;READ NEXT WORD. WORD IN R5 MOV ADDR,ADDR1 CMP FINADD,ADDR BHIS 5$ ;BRANCH IF FINADD>ADDR DEC PASS BNE 6$ ;BRANCH IF PASS=0 JMP PLOOP ;IF PASS=1 6$: JMP CLOSE ;END OF DECODING ;DECODE 5$: TST PASS BNE 3$ ;BRANCH IF PASS=1 CMP ADDR,STADD ;PASS=0 BNE 3$ INC STFLAG ;THIS IS STARTING ADDRESS MOV #STLAB,R1 JSR PC,OUTPUT 3$: ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; SEE IF WE NEED TO PICK UP NEXT FORMAT MODE ; ; MOV #360,R2 ; CMP ADDR,CHANGE ; AT A BOUNDARY ? BLO 100$ ; IF NOT, PROCEED JSR PC,GETOPT ; ELSE GET NEXT FORMAT MODE 100$: TST IORD ; INSTRUCION OR WORD MODE ? BNE 2$ ; IF WORD MODE, SKIP INSTRUCION DECODE ; ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ;CHECK ADDR IS BETWEEN STADD AND FINADD FOR OUTPUT ;IF ADDRADDR 1$: TST CNFINS(R2) ;IS IT ALL OPTIONS INS BEQ 7$ BIT CONFIG,CNFINS(R2) ;GOOD FOR THIS CONFIG BEQ 8$ 7$: MOV R5,R1 20$: BIC CLRLST(R2),R1 ;ADDR>=STADD, DECODE INDTRUCTION FOR ;OUTPUT CMP R1,SETLST(R2) BEQ 2$ ;R2 IS SET HERE 8$: ADD #2,R2 BR 1$ 2$: TST PASS ;R2 HAS BEEN DETERMINED BNE 4$ MOV R2,-(SP) ;PASS=0 FOR ANY ADDR MOV ADDR,R3 JSR PC,PUTLAB ;OUTPUT LABEL FIELD MOV (SP)+,R2 TST R5 ;TEST OF ZERO BNE 30$ INC COUNT0 ;R5=0 BR ILOOP 30$: ;R5 NE 0 CALL OUTBL ;IF R5 NE 0, OUTPUT .BLKW ;FOR PREVIOUS WORDS CMP #8.,CHRCT BLE 9$ MOV #11,R0 ;11=HT TAB JSR PC,OUTCHR 9$: MOV NAMLST(R2),R1 ;ONLY WHEN PASS=0, OUTPUT OP-CODE JSR PC,OUTPUT 10$: CMP #14.,CHRCT ;COLUMN IS 14 BLE 4$ MOV #40,R0 ;OUTPUT SPACE AFTER OP-CODE JSR PC,OUTCHR BR 10$ 4$: JSR PC,@EVLLST(R2) ;BOTH PASSES; AFTER OP-CODE HAS BEEN ;OUTPUTED ;OUTPUT OPERANDS TST PASS ;COMMENT FIELD IS OUTPUTED IN NULL SR. BNE ILOOP ;PASS=1 CRLF: MOV #15,R0 ;END OF ONE LINE, SO CRLF IF PASS=0 JSR PC,OUTCHR MOV #12,R0 JSR PC,OUTCHR BR ILOOP .PAGE .SBTTL GETOPT ; ; GETOPT RETRIEVES THE NEXT FORMAT MODE COMMAND ; FROM THE COMMAND FILE AND THEN SETS THE MODE ; AND NEXT ADDRESS TO TOGGLE THE MODE ; GETOPT: MOV NXTMOD,IORD ; SET PREVIOUS MODE AS CURRENT TST EOF ; AT END OF FILE ? BNE 10$ ; IF SO, SET DEFAULT PARAMETERS JSR PC,GETMOD ; GET THE NEXT MODE BCS 10$ ; IF NONE FOUND, EXIT JSR PC,GETADD ; GET ADRESS TO TOGGLE BCS 10$ ; IF NONE FOUND, EXIT 1$: RTS PC ; BYE BYE BYE 10$: MOV #-1,EOF ; SET END OF FILE TRUE MOV #-1,CHANGE ; SET MAXIMUM VIRTUAL ADDRESS CLR NXTMOD ; SET NORMAL INSTRUCTION MODE BR 1$ ; AND EXIT .PAGE .SBTTL GETMOD ; ; GET THE NEXT MODE: ; I = INSTRUCTION DECODE DIRECTIVE ; D = DATA DECODE DIRECTIVE ; GETMOD: JSR PC,GETCMD ; GET NEXT COMMAND BYTE BCS 3$ ; IF ERROR, EXIT CMPB R0,#'I ; INSTRUCTION MODE ? BNE 1$ ; IF NOT, TRY DATA MODE CLR NXTMOD ; SET INSTRUCTION MODE BR 2$ ; AND EXIT 1$: CMPB R0,#'D ; DATA MODE ? BNE GETMOD ; IF NOT, GET ANOTHER CHARACTER MOV #-1,NXTMOD ; ELSE SET DATA MODE 2$: CLC ; SET SUCCESS 3$: RTS PC ; AND EXIT .PAGE .SBTTL GETCMD ; ; GET THE NEXT BYTE FROM THE COMMAND FILE ; GETCMD: CMP CMDPTR,#CMDBUF+512. ; OFF THE END ? BLO 2$ ; IF NOT, GET THE CHARACTER .READW #ARA,#4,#CMDBUF,#256.,CMDBLK BCS 3$ ; ON ERROR, EXIT 1$: INC CMDBLK ; POINT TO NEXT FILE BLOCK MOV #CMDBUF,CMDPTR ; RESET POINTER TO START 2$: MOVB @CMDPTR,R0 ; GET THE NEXT BYTE BIC #177400,R0 ; ZAP H.O. BYTE INC CMDPTR ; BUMP BUFFER POINTER CLC ; SET SUCCESS 3$: RTS PC ; BYE BYE BYE .PAGE .SBTTL GETADD ; ; GET THE NEXT ADDRESS TO TOGGLE FORMAT MODE ; FROM THE COMMAND FILE ; GETADD: CLR SUM ; ZAP INTERMEDIATE SUM 1$: JSR PC,GETCMD ; GET NEXT CHARACTER BCS 9$ ; IF NONE LEFT, EXIT WITH ERROR SET CMP R0,#'0 ; AT LEAST A ZERO ? BLO 1$ ; IF NOT, TRY AGAIN CMP R0,#'7 ; BIGGER THAN A 7 ? BHI 1$ ; IF NOT , TRY AGAIN SUB #'0,R0 ; MAKE IT BINARY MOV R0,SUM ; AND ADD TO THE INTERMEDIATE SUM 2$: JSR PC,GETCMD ; GET NEXT CHARACTER BCS 9$ ; IF NONE, EXIT WITH ERROR SET CMP R0,#'0 ; AT LEAT ZERO ? BLO 8$ ; IF NOT, WE ARE DONE CMP R0,#'7 ; BIGGER THAN 7 ? BHI 8$ ; IF SO, ALSO DONE SUB #'0,R0 ; MAKE DIGIT BINARY MOV SUM,R1 ; GET INTERMEDIATE ASL R1 ; MULTIPLY BY 8 ASL R1 ASL R1 ADD R0,R1 ; ADD NEW DIGIT MOV R1,SUM ; SAVE THE RESULT BR 2$ ; AND GET NEXT CHARACTER 8$: MOV SUM,CHANGE ; SET NEXT CHANGE ADDRESS CLC ; SET SUCCESS 9$: RTS PC ; AND EXIT .PAGE .SBTTL I/O,WORD/BYTE HANDLEING SUBROUTINES ;GET ABYT FROM .LDA FILE GETBYT: CMP INPT,#INBUF+512. BLO 1$ .READW #ARA,#3,#INBUF,#256.,INBLK BCC 2$ .PRINT #BADLDA JMP EREXIT 2$: INC INBLK MOV #INBUF,INPT 1$: MOVB @INPT,R0 BIC #177400,R0 ADD R0,CHKSUM INC INPT RTS PC ; ;LOAD WORD FROM .LDA FILE ;R0=WORD FOR RETURN LDAWD: JSR PC,GETBYT MOVB R0,TMP JSR PC,GETBYT MOVB R0,TMP+1 MOV TMP,R0 RTS PC ; GETWD: TST HALTIN ;GET WORD FROM INPUT FILE ;R5=INPUT OWRD TO RETURN BGT 3$ ADD #2,ADDR TST SHORT BNE 4$ ADD #2,INPT ;SHORT=0 CMP INPT,#INBUF+512. BHIS 1$ 3$: JMP A1 1$: .READW #ARA,INCHAN,#INBUF,#256.,INBLK BCS 2$ ;BRANCH IF ERROR OCCURED JMP A2 2$: MOV #1,SHORT ;SET ERROR FLAG TST PASS BEQ 4$ .PRINT #LNERMS ;INPUT FILE IS SHORTER THAN SPECIFIED ;WRONG INPUT FILE, ABORTED. JMP CLOS ;ABORT 4$: CLR R5 JMP A4 ; CLOSE: CLR PASS ;AFTER PROGRAM HAS BEEN OUTPUTED ;OUTPUT OF LABEL LEFT IN SYMBOLL TABLE MOV #PAGSIZ,LINCT CLR CODE ; MOV #14,R0 ; JSR PC,OUTCHR MOV TABLEL,R5 MOV ENTRYN,R4 CLR R2 2$: CMP R5,R4 BHIS 5$ BIT #1,2(R5) BEQ 4$ 6$: BIC #1,2(R5) ADD #6,R5 INC R2 BR 2$ 4$: MOVB #'L,R0 ;OUTPUT OF LABELS LEFT JSR PC,OUTCHR MOV (R5),R1 ;R5=NEXT ADDRESS OF LABEL TABLE MOV R2,-(SP) JSR PC,OCTOUT MOVB #'=,R0 JSR PC,OUTCHR MOV (R5),R1 JSR PC,OCTOUT MOV (SP)+,R2 MOVB #15,R0 JSR PC,OUTCHR MOVB #12,R0 JSR PC,OUTCHR BR 6$ 5$: MOV #FIN1,R1 ;OUTPUT .END JSR PC,OUTPUT MOV #PAGSIZ,LINCT ;GO TO NEXT PAGE TST INMODE BEQ 50$ ;SKIP OUTPUT OF SIMBOL AND CROSS REF TABLES JMP CLOS 50$: MOV #SYMTBL,R1 ;OUTPUT OF SYMBOL TABLE JSR PC,OUTPUT MOV TABLEL,R5 MOV ENTRYN,R4 MOV #7,R3 CLR R2 12$: CMP R5,R4 BHIS 15$ MOVB #'E,R0 JSR PC,OUTCHR MOV R2,R1 MOV R2,-(SP) JSR PC,OCTOUT MOVB #11,R0 JSR PC,OUTCHR MOVB #'=,R0 JSR PC,OUTCHR MOV (R5),R1 JSR PC,OCTOUT MOV (SP)+,R2 MOVB #11,R0 JSR PC,OUTCHR ADD #6,R5 INC R2 DEC R3 BGT 12$ MOVB #15,R0 ;GOTO NEXT LINE JSR PC,OUTCHR MOVB #12,R0 JSR PC,OUTCHR MOV #7,R3 BR 12$ 15$: TST STFLAG BEQ 17$ MOV #STA,R1 JSR PC,OUTPUT MOV STADD,R1 JSR PC,FOCOUT 17$: MOV #15,R0 JSR PC,OUTCHR MOV #12,R0 JSR PC,OUTCHR MOV #PAGSIZ,LINCT MOV #CRF,R1 ;START OF OUTPUTTING CROSS REFERENCE JSR PC,OUTPUT ;OUTPUT OF CROSS REFERENCE ; R5=CTR=ENTRY POSITION OF SYMBOL TABLE ; R4=PRT TO SYMBOL BLOCK ; R3=PTR TO USE ADDR USE BLOCK CLR R5 ;CTR=0 MOV TABLEL,R4 18$: CMP R4,ENTRYN BHIS CLOS MOVB #'E,R0 ;OUTPUT ENTRY NUMBER JSR PC,OUTCHR MOV R5,R1 JSR PC,OCTOUT ;OUTPUT ENTRY NUMBER MOV #11,R0 ;OUTPUT HT JSR PC,OUTCHR MOVB #'L,R0 ;OUTPUT LABEL VALUE JSR PC,OUTCHR MOV (R4),R1 ;R1=VALUE OF LABEL JSR PC,OCTOUT MOV 2(R4),R3 ;GET REFERING ADDRESS 20$: CMP #123.,CHRCT ;CHECK 123TH COLUMN BLOS 21$ MOV #11,R0 JSR PC,OUTCHR ;OUTPUT TAB MOV -2(R3),R1 ;R1=REFERING ADDRESS JSR PC,FOCOUT MOV (R3),R3 BNE 20$ ;BRANCH IF R3=0=END OF LIST MOV #15,R0 JSR PC,OUTCHR MOV #12,R0 JSR PC,OUTCHR ADD #6,R4 INC R5 BR 18$ 21$: MOV #15,R0 ;OUTPUT CR-LF JSR PC,OUTCHR MOV #12,R0 JSR PC,OUTCHR BR 20$ CLOS: CMP OUTPT,#OUTBUF+512. BEQ A3 BLO 16$ .WRITW #ARA,#0,#OUTBUF+512.,#256.,OUTBLK BR A3 16$: CMP OUTPT,#OUTBUF BEQ A3 .WRITW #ARA,#0,#OUTBUF,#256.,OUTBLK EREXIT: A3: .CLOSE #3 ;CLOSE INPUT FILLE .WAIT #0 .CLOSE #0 ;CLOSE OUTPUT FILE .CLOSE #1 .CLOSE #4 ;WORK FILE FOR .LDA .EXIT ;NORMAL COMPLETION OF DECODE ; A2: INC INBLK MOV #INBUF,INPT A1: MOV @INPT,R5 ;R5=INPUT WORD A4: TST HALTIN BLT 1$ MOV R5,@ADDOLD ADD #2,ADDOLD 1$: CLR HALTIN RTS PC ;OUTPUT OF RAD50 ; ENTER WITH WORD TO BE CONVERTED IN R2 OUTRAD: MOV #3.,R1 7$: MOV #8$,R3 2$: TST -(R3) MOV #-1,R0 CMP #174777,R2 BCS 1$ 3$: INC R0 SUB (R3),R2 BCC 3$ ADD (R3),R2 TST R0 BEQ 4$ CMP #33,R0 BCS 5$ BEQ 6$ 1$: ADD #40,R0 4$: ADD #16,R0 5$: ADD #11,R0 6$: ADD #11,R0 JSR PC,OUTCHR DEC R1 BNE 2$ RTS PC .WORD 0,1,50,3100 8$: .WORD 0,1 ;OUTPUT A STRING OF CHARACTERS ;INPUT R1=ADDRESS OF THE STRING OUTPUT: ;CR-LF WILL BE OUTPUT IF THE CHARACTER STRING ;IS TERMINATED WITH 0. ;NO CR-LF WILL BE OUTPUT IF THE STRING IS TERMINATED ;WITH 200. TST PASS BNE 2$ MOVB (R1)+,R0 BEQ 1$ CMPB #200,R0 BEQ 2$ JSR PC,OUTCHR BR OUTPUT 1$: MOVB #15,R0 JSR PC,OUTCHR MOVB #12,R0 JSR PC,OUTCHR 2$: RTS PC ; COMMA: MOVB #',,R0 ; OUTCHR: TST PASS BEQ 20$ JMP 1$ 20$: CMPB #11,R0 BNE 11$ 14$: MOVB #40,R0 JSR PC,11$ BIT #7,CHRCT BNE 14$ RTS PC ; 11$: CMPB #12,R0 BNE 12$ CLR CHRCT DEC LINCT BGT 13$ JSR PC,13$ MOV #PAGSIZ,LINCT ; TST CODE ; BGT 15$ ; MOVB #14,R0 ; BR 13$ ;15$: TST INMODE ; BNE 30$ ;; ; MOV R1,-(SP) ; MOV #FMT,R1 ; JSR PC,OUTPUT ; MOV (SP)+,R1 30$: RTS PC 12$: CMPB #14,R0 BEQ 13$ INC CHRCT 13$: MOVB R0,@OUTPT INC OUTPT CMP OUTPT,#OUTBUF+512. BLO 1$ BHI 4$ .WAIT #0 BCS 2$ .WRITE #ARA,#0,#OUTBUF,#256.,OUTBLK BCS 2$ INC OUTBLK MOV R1,-(SP) MOV #OUTBUF+512.,R0 MOV #256.,R1 5$: CLR (R0)+ DEC R1 BGT 5$ MOV (SP)+,R1 BR 1$ 4$: CMP OUTPT,#OUTBUF+1024. BLO 1$ .WAIT #0 BCS 2$ .WRITE #ARA,#0,#OUTBUF+512.,#256.,OUTBLK BCS 2$ INC OUTBLK MOV R1,-(SP) MOV #OUTBUF,R0 MOV #256.,R1 3$: CLR (R0)+ DEC R1 BGT 3$ MOV #OUTBUF,OUTPT MOV (SP)+,R1 1$: RTS PC 2$: .PRINT #OUTERR JMP EREXIT ; BYTOUT: CLR R0 CLR LD0 MOV #3.,R2 SWAB R1 BR S2 ;FIXED OCTAL OUTPUT ;R1=INPUT VALUE TO BE OUTPUTED ;R1 IS DESTROYED UPON RETURN ;WHEN RETURNED, R1 IS DESTROYED FOCOUT: MOV #1,LD0 ;6 DIGIT OCTAL OUTPUT BR FOT OCTOUT: CLR LD0 ;LEADING 0'S ARE SUPPRESSED FOT: CLR R0 MOV #6.,R2 BR S1 S3: CLR R0 CCC ROL R1 ROL R0 S2: CCC ROL R1 ROL R0 S1: CCC ROL R1 ROL R0 S0: ADD #60,R0 CMPB #'0,R0 BNE 1$ TST LD0 BEQ 2$ 1$: INC LD0 JSR PC,OUTCHR 2$: DEC R2 BGT S3 TST LD0 BNE 3$ MOVB #'0,R0 JSR PC,OUTCHR 3$: RTS PC .PAGE .SBTTL INSTRUCTION EVALUATEING SUBROUTINES ; CBUFF: JSR PC,NULL CMP ADDR,FINADD BHIS 4$ MOV #-1,HALTIN JSR PC,GETWD TST R5 BNE 2$ 1$: CMP ADDR,FINADD BHIS 3$ MOV #-1,HALTIN JSR PC,GETWD TST R5 BEQ 1$ 3$: MOV #PEQ,R1 JSR PC,OUTPUT MOV ADDR,R1 JSR PC,OCTOUT 2$: MOV #1,HALTIN 4$: RTS PC ; ;OUTPUT COMMENT FIELD NULL: TST PASS BNE 1$ ;IF PASS=1, DO NOTHING 12$: CMP #32.,CHRCT ;COMMENT STARTS AT COLUMN 29 BLE 11$ MOVB #11,R0 ;SET TAB AT THE END OF NEMONIC JSR PC,OUTCHR BR 12$ 11$: MOV #ADDOLD+2,R5 SUB #2,ADDOLD MOVB #';,R0 ;COMMENT FIELD JSR PC,OUTCHR ;TEST IF NO-COMMENT MODE TST INMODE BNE 1$ ;FINISH IF INMODE=1 MOV ADDR1,R1 ;OUTPUT ADDRESS JSR PC,FOCOUT 2$: MOVB #40,R0 ;SPACE JSR PC,OUTCHR 4$: MOV (R5),R1 JSR PC,FOCOUT ;OUTPUT CONTENT OF THE ADDRESS CMP R5,ADDOLD BHIS 3$ JSR PC,COMMA ADD #2,R5 BR 4$ 3$: CMP #69.,CHRCT ;ASCII CODES START AT COLUMN 69 BLE 13$ MOVB #40,R0 ;PUT SPACE JSR PC,OUTCHR BR 3$ 13$: MOV #ADDOLD+2,R5 ;OUTPUT OF CHARACTES 5$: MOV (R5),R1 MOVB R1,R0 CMPB #40,R0 BLE 8$ MOVB #40,R0 8$: JSR PC,OUTCHR SWAB R1 MOVB R1,R0 CMPB #40,R0 BLE 9$ MOVB #40,R0 9$: JSR PC,OUTCHR CMP R5,ADDOLD BHIS 6$ ADD #2,R5 BR 5$ 6$: CMP #76.,CHRCT BLE 14$ MOVB #40,R0 JSR PC,OUTCHR BR 6$ 14$: MOV #ADDOLD+2,R5 ;OUTPUT OF RAD50 10$: MOV (R5),R2 JSR PC,OUTRAD CMP R5,ADDOLD BHIS 1$ ADD #2,R5 BR 10$ 1$: RTS PC ; ADDMOD: MOV R1,R2 BIC #177770,R1 BIC #177707,R2 ASR R2 ASR R2 JMP @MODTAB(R2) MODTAB: .WORD MOD0,MOD1,MOD2,MOD3,MOD4,MOD5,MOD6,MOD7 MOD0: TST PASS BNE RTN CMP #7,R1 BNE 1$ MOVB #'P,R0 JSR PC,OUTCHR MOVB #'C,R0 JSR PC,OUTCHR RTS PC 1$: CMP #6,R1 BNE 2$ MOVB #'S,R0 JSR PC,OUTCHR MOVB #'P,R0 JSR PC,OUTCHR RTS PC 2$: MOVB #'R,R0 JSR PC,OUTCHR MOV R1,R0 ADD #60,R0 JSR PC,OUTCHR RTN: RTS PC MOD1: TST PASS BNE RTN MOVB #'(,R0 JSR PC,OUTCHR JSR PC,MOD0 MOVB #'),R0 JSR PC,OUTCHR RTS PC MOD2: CMP #7,R1 BEQ 1$ TST PASS BNE RTN JSR PC,MOD1 MOVB #'+,R0 JSR PC,OUTCHR RTS PC 1$: TST PASS BNE 2$ MOVB #'#,R0 JSR PC,OUTCHR MOV R5,-(SP) JSR PC,GETWD MOV R5,R3 JSR PC,PUTARG MOV (SP)+,R5 RTS PC 2$: MOV R5,-(SP) JSR PC,GETWD MOV R5,R1 JSR PC,LODLAB MOV (SP)+,R5 RTS PC MOD3: TST PASS BNE MOD2 MOVB #'@,R0 JSR PC,OUTCHR BR MOD2 MOD4: TST PASS BNE RTN MOVB #'-,R0 JSR PC,OUTCHR BR MOD1 MOD5: TST PASS BNE RTN MOVB #'@,R0 JSR PC,OUTCHR BR MOD4 MOD6: MOV R5,-(SP) MOV R1,-(SP) JSR PC,GETWD MOV R5,R1 CMP #7,(SP) BNE 2$ ADD ADDR,R1 ADD #2,R1 2$: TST PASS BEQ 3$ JSR PC,LODLAB MOV (SP)+,R1 MOV (SP)+,R5 RTS PC 3$: MOV R1,R3 JSR PC,PUTARG MOV (SP)+,R1 MOV (SP)+,R5 CMP #7,R1 BEQ 1$ JSR PC,MOD1 1$: RTS PC MOD7: TST PASS BNE MOD6 MOVB #'@,R0 JSR PC,OUTCHR BR MOD6 ;SINGLE OPERAND ADDR DST: MOV R5,R1 BIC #177700,R1 ;GET DEST(SRC) JSR PC,ADDMOD ;DECODE IT JMP NULL ; REGISTER ONLY INS DREG: TST PASS BNE 1$ MOV R5,R1 BIC #177770,R1 CLR R2 JSR PC,MOD0 1$: JMP NULL DIG3: TST PASS BNE 1$ MOV R5,R0 BIC #177770,R0 ADD #60,R0 JSR PC,OUTCHR 1$: JMP NULL DIG6: TST PASS BNE DIG3 MOV R5,R0 ROR R0 ROR R0 ROR R0 BIC #177770,R0 ADD #60,R0 JSR PC,OUTCHR BR DIG3 DIG8: TST PASS BNE 1$ MOV R5,R1 BIC #177400,R1 JSR PC,BYTOUT 1$: JMP NULL DIG16: TST PASS BNE 1$ ;BRANCH IF PASS=1 MOV R5,R1 ;IF PASS=0, R5=INPUT WORD JSR PC,OCTOUT ;OUTPUT VALUE 1$: JMP NULL ;PASS=0 AND 1 BRCH: MOVB R5,R1 CCC ROL R1 ADD ADDR,R1 ADD #2,R1 TST PASS BNE 1$ MOV R1,R3 JSR PC,PUTARG JMP NULL 1$: JSR PC,LODLAB JMP NULL RDST: MOV R5,R1 .REPT 6 ROR R1 .ENDM BIC #177770,R1 CLR R2 JSR PC,MOD0 RD1: JSR PC,COMMA MOV R5,R1 BIC #177700,R1 JSR PC,ADDMOD JMP NULL SRCDST: MOV R5,R1 .REPT 6 ROR R1 .ENDM BIC #177700,R1 JSR PC,ADDMOD BR RD1 RSRC: MOV R5,R1 BIC #177700,R1 JSR PC,ADDMOD JSR PC,COMMA MOV R5,R1 .REPT 6 ROR R1 .ENDM BIC #177770,R1 CLR R2 JSR PC,MOD0 JMP NULL ACFDST: TST PASS BNE FDST JSR PC,GETAC JSR PC,COMMA FDST: JSR PC,FMOD JMP NULL ACFSRC: JSR PC,FMOD TST PASS BNE 1$ JSR PC,COMMA JSR PC,GETAC 1$: JMP NULL FMOD: MOV R5,R1 BIC #177700,R1 BIT #70,R1 BNE 1$ TST PASS BNE 2$ JSR PC,ACM RTS PC 1$: JSR PC,ADDMOD 2$: RTS PC GETAC: MOV R5,R1 .REPT 6 ROR R1 .ENDM BIC #177774,R1 ACM: BIC #177770,R1 MOVB #'A,R0 JSR PC,OUTCHR MOVB #'C,R0 JSR PC,OUTCHR MOV R1,R0 ADD #60,R0 JSR PC,OUTCHR RTS PC RDIG8: TST PASS BNE 1$ MOV R5,R1 .REPT 6 ROR R1 .ENDM BIC #177770,R1 CLR R2 JSR PC,MOD0 JSR PC,COMMA 1$: MOV R5,R1 BIC #177700,R1 DEC R1 NEG R1 ASL R1 ADD ADDR,R1 TST PASS BNE 2$ MOV R1,R3 JSR PC,PUTARG JMP NULL 2$: JSR PC,LODLAB JMP NULL ACDST: TST PASS BNE 1$ JSR PC,GETAC 1$: JMP RD1 ACSRC: MOV R5,R1 BIC #177700,R1 JSR PC,ADDMOD TST PASS BNE 1$ JSR PC,COMMA JSR PC,GETAC 1$: JMP NULL .PAGE .SBTTL SYMBOL TABLE GENERATION/HANDLEING SUBROUTINES LODLAB: MOV TABLEL,R3 2$: MOV ENTRYN,R4 CMP R3,R4 BHIS 3$ CMP R1,(R3) BEQ 1$ ADD #6,R3 BR 2$ 3$: ADD #6,ENTRYN MOV R1,(R4) MOV CRFEN,R3 SUB #4,CRFEN MOV R3,2(R4) MOV R3,4(R4) CLR (R3) MOV ADDR1,-2(R3) BR 4$ 1$: MOV CRFEN,R4 SUB #4,CRFEN MOV R4,@4(R3) MOV R4,4(R3) CLR (R4) MOV ADDR1,-2(R4) 4$: MOV CRFEN,R3 SUB #10,R3 CMP ENTRYN,R3 BHIS STOVFL RTS PC STOVFL: .PRINT #OFMSG ;SYMBOL TABLE OVERFLOW JMP CLOS ;ERROR EXIT ; ;OUTPUT OF LABEL PUTLAB: JSR PC,PUTARG TST R0 ;IF R0=0, NO LABEL MATCHED BEQ 1$ MOVB #':,R0 ;END OF LABEL FIELD JSR PC,OUTCHR BIS #1,2(R2) ;LOCATION HAS BEEN DEFINED IN OUTPUT ;R2=ENTRY IN SYMBOLL TABLE 1$: RTS PC ; ;RETUEN AND OUTPUT LABEL VALUE ;INPUT R3=VALUE OF LABEL ;THIS SR. IS CALLED BY LABELLING AND OPERAND OUTPUT ;OUTPUT R2=ENTRY IN SYMBOL TABLE PUTARG: MOV TABLEL,R2 CLR R1 MOV ENTRYN,R4 2$: CMP R2,R4 BHIS 3$ CMP R3,(R2) BEQ 1$ ;BRANCH IF FOUND A LABELL TO THIS ADDRESS ADD #6,R2 INC R1 BR 2$ 3$: CLR R0 ;NO LABEL MATHED RTS PC 1$: CALL OUTBL MOVB #'L,R0 ;OUTPUT LABEL JSR PC,OUTCHR MOV R2,-(SP) ;SAVE R2 MOV R3,R1 ;LABEL NAME IS THE ADDRESS OF THE LABEL JSR PC,OCTOUT MOV (SP)+,R2 MOV #1,R0 RTS PC ; ; ;COUNT NUMBER OF ZERO'S OUTBL: MOV R1,-(SP) MOV R2,-(SP) DEC COUNT0 BLT 20$ ;BRANCH IF COUNT0 WAS 0 BGT 15$ ;BRANCH IF COUNT0>1 ;COUNT0 WAS 1, THEN OUTPUT .WORD 0 ;FOR THE PREVIOUS WORD MOV #WORDS,R1 CALL OUTPUT BR 20$ 15$: ;OUTPUT .BLKW MOV #BLKWS,R1 CALL OUTPUT MOV COUNT0,R1 INC R1 CALL OCTOUT MOV #BLKWS2,R1 CALL OUTPUT 20$: MOV (SP)+,R2 MOV (SP)+,R1 CLR COUNT0 RETURN WORDS: .ASCIZ <11>/.WORD/<11>/0/<11><11>/;/ BLKWS: .ASCII <11>/.BLKW/<11><200> BLKWS2: .ASCIZ <11><11>/;/ .EVEN .PAGE .SBTTL IMPURE AREA(VARIABLES) INMODE: .WORD 0 ;INPUT MODE COUNT0: .WORD 0 ;COUNTER FOR 0 CRFEN: .WORD 0 LINCT: .WORD 0 CODE: .WORD 0 CHRCT: .WORD 0 CONFIG: .WORD 0 PSR: .WORD 0 MM: .WORD 0 ATH: .WORD 0 INCHAN: .WORD 0 ;INPUT CHANNEL OF DISK, =3 FOR .SAV AND ; =4 FOR .LDA LDAHI: .WORD 0 LDALO: .WORD 0 CHKSUM: .WORD 0 LDACT: .WORD 0 LDAMOD: .WORD 0 SHORT: .WORD 0 HALTIN: .WORD 0 ;NOT USED QUE: .BLKW 7*4 BADDR: .WORD 0 ;BEGINNING ADDRESS OF THE INPUT PROGRAM TABLEH: .WORD 0 TABLEL: .WORD 0 ENTRYN: .WORD 0 PASS: .WORD 0 STKADD: .WORD 0 STFLAG: .WORD 0 ;NOT USED LD0: .WORD 0 ADDOLD: .WORD 0,0,0,0 ADDR1: .WORD 0 ADDR: .WORD 0 ARA: .BLKW 6. STADD: .WORD -1 ;STARTING ADDRESS OF THE PROGRAM FINADD: .WORD -1 ;FINAL ADDRESS OF PROGRAM INBLK: .WORD 0 OUTBLK: .WORD 0 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; CMDBUF: .BLKW 256. CMDPTR: .WORD 0 CMDBLK: .WORD 0 IORD: .WORD 0 CHANGE: .WORD -1 EOF: .WORD 0 SUM: .BLKW 1 NXTMOD: .WORD 0 ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; INBUF: .BLKW 256. OUTBUF: .BLKW 512. INPT: .WORD 0 OUTPT: .WORD 0 TMP: .WORD 0 CMDOUT: .ASCII /;/ ;FOR OUTPUT OF USER'S COMMAND CMDSTR: .REPT 82. ;COMMAND BUFFER .BYTE 0 .ENDM .BYTE 0 .EVEN .PAGE .SBTTL CONSTANTS/MESSAGES STORAGE AREA REIS: .RAD50 /EIS/ RFIS: .RAD50 /FIS/ RFPU: .RAD50 /FPU/ BLKLDA: .RAD50 /SY WORK DEC/ ;WORK.DEC HOLDS CONVERTED .LDA FILE DEFEXT: .RAD50 /SAV/ ;INPUT DEFAULT .RAD50 /DEC/ ;OUTPUT DEFAULT .WORD 0,0 STA: .ASCII /START/<11>/=/<200> CRF: .ASCII <14><11>/GENERATED LABEL CROSS REF TABLE/<12><0> FMT: .BYTE 14 ;HEADER OF A PAGE .ASCII /;/<11><11><11><11>/ LOC .WORD / .ASCII /.ASCII .RAD50/<0> BADCKS: .ASCIZ /LDA MODULE-BAD CHECKSUM/ BADLDA: .ASCIZ /LDA MODULE-NO START ADDRESS GIVEN/ NOROOM: .ASCIZ /NO ROOM FOR LDA CONVERSION SCRATCH FILE/ SYMTBL: .ASCII <14><11>/GENERATED LABEL SYMBOL TABLE/<12> .BYTE 0 LNERMS: .ASCIZ /INVALID INPUT FILE-ABORT/ OFMSG: .ASCII /SYMBOL TABLE OVERFLOW/<0> STKMSG: .ASCII <15><12>/.GLOBL/<11>/STACK/<15><12>/STACK=/<200> STLAB: .ASCII /START:/<0> FIN1: .ASCII <11>/.END/<11>/START/<0> OUTERR: .ASCIZ /OUTPUT ERROR-ABORT/ INVSTA: .ASCIZ /INVALID STARTING ADDRESS-ABORT/ INVOPT: .ASCIZ /INVALID OPTION/ MES1: .ASCIZ /STARTING ADDRESS IS 0/ INTMSG: .ASCII /AC0=%0/ .ASCII <15><12>/AC1=%1/<15><12>/AC2=%2/<15><12>/AC3=%3/<15><12> .ASCII /AC4=%4/<15><12>/AC5=%5/<15><12>/AC6=%6/<15><12> .ASCII /AC7=%7/<15><12> .ASCII <11>/.ASECT/ PEQ: .ASCII <15><12>/.=/<200> IDMES: .ASCIZ /RT-11 DISASSEMBLER V02.1/ .EVEN .PAGE .SBTTL INSTRUCTION SET DECODEING TABLES .MACRO I NAME,CLEAR,SET,RTN,TYPE ID NAME,CLEAR,SET,RTN,TYPE,\J J=J+1 .ENDM .MACRO ID NAME,CLEAR,SET,RTN,TYPE,J .CSECT INAME NAM'J: .ASCII /NAME/ .BYTE 200 .CSECT NAMPTR .WORD NAM'J .CSECT BITCLR .WORD CLEAR .CSECT BITSET .WORD SET .CSECT EVLRTN .WORD RTN .CSECT TYPINS ;TYP OF INSTRUCTIONS .IF NB,TYPE .WORD TYPE .IFF .WORD 0 .ENDC .ENDM ID .CSECT NAMPTR NAMLST: .CSECT BITCLR CLRLST: .CSECT BITSET SETLST: .CSECT EVLRTN EVLLST: .CSECT TYPINS ;TYP OF INSTRUCTIONS CNFINS: J=0 I WAIT,0,1,NULL ;OP-CODE=1 I RTI,0,2,NULL I BPT,0,3,NULL I IOT,0,4,NULL I RESET,0,5,NULL I RTT,0,6,NULL,P4045B I JMP,77,100,DST I RTS,7,200,DREG I SPL,7,230,DIG3,P45B I NOP,0,240,NULL I NOP,0,260,NULL I CLC,0,241,NULL I CLV,0,242,NULL I CLZ,0,244,NULL I CLN,0,250,NULL I CCC,0,257,NULL I SEC,0,261,NULL I SEV,0,262,NULL I SEZ,0,264,NULL I SEN,0,270,NULL I SCC,0,277,NULL I SWAB,77,300,DST I BR,377,400,BRCH I BNE,377,1000,BRCH I BEQ,377,1400,BRCH I BGE,377,2000,BRCH I BLT,377,2400,BRCH I BGT,377,3000,BRCH I BLE,377,3400,BRCH I JSR,777,4000,RDST I CLR,77,5000,DST I COM,77,5100,DST I INC,77,5200,DST I DEC,77,5300,DST I NEG,77,5400,DST I ADC,77,5500,DST I SBC,77,5600,DST I TST,77,5700,DST I ROR,77,6000,DST I ROL,77,6100,DST I ASR,77,6200,DST I ASL,77,6300,DST I MARK,77,6400,DIG6,P4045B I MFPI,77,6500,DST,P4045M I MTPI,77,6600,DST,P4045M I SXT,77,6700,DST,P4045B I MOV,7777,10000,SRCDST I CMP,7777,20000,SRCDST I BIT,7777,30000,SRCDST I BIC,7777,40000,SRCDST I BIS,7777,50000,SRCDST I ADD,7777,60000,SRCDST I MUL,777,70000,RSRC,EIS I DIV,777,71000,RSRC,EIS I ASH,777,72000,RSRC,EIS I ASHC,777,73000,RSRC,EIS I XOR,777,74000,RDST,P4045B I FADD,7,75000,DREG,FIS I FSUB,7,75010,DREG,FIS I FMUL,7,75020,DREG,FIS I FDIV,7,75030,DREG,FIS I SOB,777,77000,RDIG8,P4045B I BPL,377,100000,BRCH I BMI,377,100400,BRCH I BHI,377,101000,BRCH I BLOS,377,101400,BRCH I BVC,377,102000,BRCH I BVS,377,102400,BRCH I BCC,377,103000,BRCH I BCS,377,103400,BRCH I EMT,377,104000,DIG8 I TRAP,377,104400,DIG8 I CLRB,77,105000,DST I COMB,77,105100,DST I INCB,77,105200,DST I DECB,77,105300,DST I NEGB,77,105400,DST I ADCB,77,105500,DST I SBCB,77,105600,DST I TSTB,77,105700,DST I RORB,77,106000,DST I ROLB,77,106100,DST I ASRB,77,106200,DST I ASLB,77,106300,DST I MTPS,77,106400,DST,P03 I MFPD,77,106500,DST,P45M I MTPD,77,106600,DST,P45M I MFPS,77,106700,DST,P03 I MOVB,7777,110000,SRCDST I CMPB,7777,120000,SRCDST I BITB,7777,130000,SRCDST I BICB,7777,140000,SRCDST I BISB,7777,150000,SRCDST I SUB,7777,160000,SRCDST I CFCC,0,170000,NULL,FPU I SETF,0,170001,NULL,FPU I SETI,0,170002,NULL,FPU I SETD,0,170011,NULL,FPU I SETL,0,170012,NULL,FPU I LDFPS,77,170100,DST,FPU I STFPS,77,170200,DST,FPU I STST,77,170300,DST,FPU I CLRF,77,170400,FDST,FPU I TSTF,77,170500,FDST,FPU I ABSF,77,170600,FDST,FPU I NEGF,77,170700,FDST,FPU I MULF,377,171000,ACFSRC,FPU I MODF,377,171400,ACFSRC,FPU I ADDF,377,172000,ACFSRC,FPU I LDF,377,172400,ACFSRC,FPU I SUBF,377,173000,ACFSRC,FPU I CMPF,377,173400,ACFSRC,FPU I STF,377,174000,ACFDST,FPU I DIVF,377,174400,ACFSRC,FPU I STEXP,377,175000,ACDST,FPU I STCFI,377,175400,ACDST,FPU I STCFD,377,176000,ACFDST,FPU I LDEXP,377,176400,ACSRC,FPU I LDCIF,377,177000,ACSRC,FPU I LDCDF,377,177400,ACFSRC,FPU I <.WORD>,177777,0,DIG16 .PAGE .SBTTL HANDLER/SYMBOL TABLE STORAGE AREA .CSECT DEVICE HANDLR: .BLKW 20. ; SYMBOL TABLE/CREF STRUCTURE ; STARTING FROM THE END OF THE HANDLER AREA AND ; WORKING INTO HIGH MEMORY IS THE LABEL DEFINEING ; BLOCKS-EACH BLOCK 3 WORDS LONG ; WORD 1= LOCATION (VALUE) OF LABEL ; WORD 2-BIT 0 SET TO SHOW LOCATION HAS BEEN DEFINED IN OUTPUT ; BY PUTLAB SR. ; WORD 2- ADDR OF 1ST LOCATION USED BLOCK ; WORD 3 ADDR OF LAST LOCATION USED BLOCK ; ; STARTING FROM THE HIGHEST USEABLE MEMORY AND WORKING DOWN ; ARE THE HOW USED BLOCKS-2 WORDS LONG EACH ; WORD 1 LINK TO NEXT HOW USED BLOCK FOR GIVEN LABEL ; WORD 2 ADDR OF USE OF LABEL .END START %x5u%& 77,77X7 hP7 N7 L7 J7 4HΥL  D4 !ΥI ΥM ΥP7  "ΥA  ΥS7  FΥE7  4@:  7 7   N pH lE%dU Z%T9UJ%(FU0< < U05*U" $-U - 5U` -5U w 4w&7 ,. @  .0 e  .0  .N7 H7 H    0T7* "7| tw w w wE w f$&  V.0 w> 2.0 E1.   @鈜  .0  ^E7 B>Ez 5 7 ,7 7 7 7 b7 \7 5 7 . .p ) ȝ F.0 w %"R%L@  - w   7  7  7 7  R  7 <  eEwe,E 7~  ȝ n .0 wH P ( a4 ,5  e        )" " 5e   L  = v |U ^ V 5  f $h d -r `  H wwr : -F R  0  -. H <- (  Z"= Z"ALr v e "   h   %d   X%L  t h!  ` X   |  7   I7 v Dh -T  F  0  ,  $ E  7  " 0 707  0 7 0 `w  -.  .0 w .E7`  7~ 7wr e< )eT-P.wV ȝ & .0 w" |w w7 5d 7 b    D!$5Ee L jA n= ZA ` J B 5 w\ @ >  D!(E   = A  e        5\ ^ 7!7E vA | hL ` f%{ F B 2 *e   -l.&  H.0 -@.  .0  舷 . re7 b % b %e ee e > (@ P@    , $w  5 7    5  ? - .I! F  .4 f. '-.# !  . |f. .xwN 7 2$7   A @ A @ A @ e00    0 D-| -f n s D tH _% " Jn; 6 Jd , A w!F e%E A@  @  w!e%L B .w!eBEE zHX&6t !% P dC \% S LP DR :@e0 0 R( ) %  0 +  # f C f A  @  -  @ ff A%me  *C % 0 @ NAE w bAE w L@Ee0 w 4@ Ee0  AE w A wpAA me C wR `wJA      E  AE w A      E AE VA      E w b @ , w  H  "wAE58 *  \A      EEA C @e0 A      E , AE  m C w .w  zwAE  R ^wnl K eeXL P ;3 4-w  : U   e  L  f L| N  D2 r 27  .WORD 0 ; .BLKW ;; &(z*DvSTART = GENERATED LABEL CROSS REF TABLE ; LOC .WORD .ASCII .RAD50LDA MODULE-BAD CHECKSUMLDA MODULE-NO START ADDRESS GIVENNO ROOM FOR LDA CONVERSION SCRATCH FILE GENERATED LABEL SYMBOL TABLE INVALID INPUT FILE-ABORTSYMBOL TABLE OVERFLOW .GLOBL STACK STACK=START: .END STARTOUTPUT ERROR-ABORTINVALID STARTING ADDRESS-ABORTINVALID OPTIONSTARTING ADDRESS IS 0AC0=%0 AC1=%1 AC2=%2 AC3=%3 AC4=%4 AC5=%5 AC6=%6 AC7=%7 .ASECT .=RT-11 DISASSEMBLER V02.1L#Q#U#Y#]#c#g#k#o#s#w#{#################################$$ $$$$$$"$&$*$.$3$7$<$A$F$K$O$S$W$[$`$d$h$l$p$t$y$~$$$$$$$$$$$$$$$$$$$$$$$$$$$% %%%%%$%)%.%3%7%<%A%E%J%P%V%\%b%h%n%?????????????????????????????????????????@ @ @ @ @  0@P`prtvxzzzz~@@@@ @@pppppppppppppppppp&PPPPPPhhhh&PPPPPPpppppXXff @@@@WAITRTIBPTIOTRESETRTTJMPRTSSPLNOPNOPCLCCLVCLZCLNCCCSECSEVSEZSENSCCSWABBRBNEBEQBGEBLTBGTBLEJSRCLRCOMINCDECNEGADCSBCTSTRORROLASRASLMARKMFPIMTPISXTMOVCMPBITBICBISADDMULDIVASHASHCXORFADDFSUBFMULFDIVSOBBPLBMIBHIBLOSBVCBVSBCCBCSEMTTRAPCLRBCOMBINCBDECBNEGBADCBSBCBTSTBRORBROLBASRBASLBMTPSMFPDMTPDMFPSMOVBCMPBBITBBICBBISBSUBCFCCSETFSETISETDSETLLDFPSSTFPSSTSTCLRFTSTFABSFNEGFMULFMODFADDFLDFSUBFCMPFSTFDIVFSTEXPSTCFISTCFDLDEXPLDCIFLDCDF.WORDDirectory of the DARMSTADT Floppy Disk -------------------------------------- Submitted by B. KUP, TH DARMSTADT Petersenstr. 30 D-6109 Darmstadt W-Germany Utilities: UCLFUN.MAC - R. Carpenter's UCL example (Funny UCL, in German) UCLFUN.SAV UCL .MAC - UCL by B. Kup, features parameter substitution and UCL .SAV expansion of .COM files (TSX style). INCL .FOR - F4 INCLUDE statement pre-processor INCL .SAV (generates temporary file with INCLUDE files inserted) GREPC .SAV - Famous GREP utility to do multi-file wildcard searches CSI .SAV - Shows how RT-11 CSI returns file specs & siwtches HLP .SAV - Help utility which first looks for .HLP file on DK:, HLP:. If not found, it will chain to SY:HELP.SAV DAY .SAV - A complete DAYtime command, which also will save the current system date over bootstraps. Current date is saved every time DAY is run and it finds its old saved date and current system date different. Date will be restored if you run DAY and it finds no system date. SY .SYS - Extension of a DEC dummy handler (never installs) to allow for the following system SET options: SET SY CACHE/NOCHACHE - switches cache on/off SET SY DATE/NODATE - remember date for next boot SET SY CLOCK=50/60 - change clock bit in RMON SET SY BUGS/NOBUGS - (try it) SET SY HELP - displays SET SY options Help files (partly for VT100): MACRO .HLP - Help file w. single character switches of MACRO V05 LINK .HLP - same for LINK V06.01 LIBR .HLP - same for LIBR FORTRA.HLP - same for FORTRA "d  e(>$ |  W    Rڇ    7!7 0 0 B E EW E  5(Ce   DPP  @S E EE * 'r!$&eHf& c `5%E l E@͋ ]U  e  t , $25 < | tf nf hw .: :  | vÕ/ e 'd <  D A C   :Yw/M-Jan-Feb-Mar-Apr-May-Jun-Jul-Aug-Sep-Oct-Nov-Dec-%,3;ENSaturdaySundayMondayTuesdayWednesdayThursdayFridayNo dateBad dateB@hJHELPԕ O̔:.$ JHU$ & ˋ6<8 37rj7   0 7R̕Tjj~` 7        ע ~̕  鈅 W! ]   ~    3[v:3Which topic do you want help for? Sorry, I cannot help you.HLP V01.00LIBR V04.00D /A Put All globals in the directory, incl. all absol. global symbols /C command continuation /D Delete module from library directory /E Extract a module and store in .OBJ file /G Global symbol deletion /N Names; include module names in directory /P include PSECT names in the directory /R Replace modules in a library file /U Update; inserts and replaces modules /W Wide listing format /X allow multiple definitions of global entry points in the library entry point table (RSTS) // command continuation LINK V06.01H B. Kup, 1-Apr-82 ------------ Option switches: /ALPHABETIZE - /A Alphabetical list of globals /BOTTOM:n - /B:n Bottom address changed to n (Ill with /R) /PROMPT - /C Continue line /EXTEND:n - /E:n Extend a program section to size n (not addr) * - /F Use the default FORTRAN library SY:FORLIB * - /G Size library EPT buffer for mult. def. lib. /TOP:n - /H:n Highest addr /INCLUDE - /I Include global symbols from library * - /K:n Inserts value (n=1-28) into loc 56 of blk 0 /LDA - /L LDA format (Ill with /R) /STACK[:n] - /M[:n] Manual (console) specification of stack addr * - /O:n Overlay in low memory, overlay region n * - /P:n extend libr. routine list space * - /Q Query start addr of up to 8 root sections /FOREGROUND[:n] - /R[:n] REL format (n=stack size) /SLOWLY - /S Space for linker symbol table set to maximum /TRANSFER[:n] - /T[:n] Transfer addr (Start addr) specification /ROUND:n - /U:n rounds Up a program section (n=power of 2) /XM - /V:n[:m]Virtual overlay in extended memory, region n /WIDE - /W Wide load map listing /NOBITMAP - /X Xclude bitmap for code below 400 /BOUNDARY:value - /Y:n start a program section on addr boundary n /FILL:n - /Z:n set unused locations in load module to n MACRO V04.00 AS dev WF: Allows WRK.TMP to be placed on dev: AS dev CF: Allows CREF.TMP to be placed on dev: /C[:arg] Control of CREF /C=/C:S:M:E /C: S = User defefined symbols /D:arg Disable function R = Register symbols /E:arg Enable function M = Macro symbolic names /L:arg Listing contoll P = Permanent symbols /M Macro library file C = CSECT's and PSECT's /N:arg Listing contoll E = Error code grouping /P:n Conditional assembly during pass n ABS d Absolute binary AMA d All rel as abs CDR d Trunct. bey. 72 CRF e Crossref. output FPT d Trunct. float GBL d Undef'd as GBL LC d Lower case ASCII LSB d Local sym. block PNC e Binary output REG e R0..PC inst. %n SEQ l Line sequence # LOC l Location counter BIN l Generated binary SRC l Source code COM l Comment BEX l Binary extensions SYM l Symbol table TOC l Table of contents ME nl Macro expansion MD l Macro definitions, repeat range expansion (MB does not exist, MC l Macro calls, repeat range expansion use /L:MEB/N:SRC) MEB nl Macro expansion binary code CND l Unsatisfied conditionals TTM nl Terminal mode instead 132 col LD nl List controll directives ,.,l"p 2<@"v,2x?@fST`2dV  T  70e @鈇?KMON-I-has no bugs ,  2 <@P w^e @鈇CACHE,DATE,CLOCK,BUGS,PROMPT,HELP(zsŻz0DX0205(O GGSKMLPAVAXELN V2.0-00}Oߕ04-00    ?"! PASCALMSC_001! MDMSHARE_001lpLPUS 026RS 025GS 024FS 023SUB 022EM 021CAN 020ETB 019SYN 018NAK 017DC4 016XOF 015DC2 014XON 013DLE 012SI 011SO 010HT 009BS 008BEL 007ACK 006ENQ 005EOT 004ETX 003STX 002SOH 001NUL 000PRINTERLPV11< ^(\ϧRlݏ〟RRlݏRcORlݏ뀟RGBRlݏ!R+sRlݏ)RRlݏ1RϡRlݏ9RRlݏARϱRlݏIRRlݏQRbRlݏYRgϷRlݏaRKi RlݏiR/υ RlݏqR(^lݏ P<(^q\R߭Rѭ߭߭(߭ݏ߭ݏq\lݏynlݏ]lݏLlݏ;lݏ*l6 Ϸ ^\ ϣ Rݬϔ ߭Rϒ R֬Ѭ~ j  ^ ] SRM~J C RR\߭\A BRѭR  @~ RR\߭\ BRѭRE~  RR\߭\ BRѭSS1] ϰ |^ ϣ VU TSS{0\RS\z S\߭St RS=UT\ G T\ T\\~5 . ' \\ USVV 1p   ^ S P\PLP_\RB~_R  ϼPR\_RPSS_ Ϗ<^ ρ( Ϥ i (ϊ O (p 5 (ϦV  (υ<  (d"  (C  ("ϳ (ϙ (Ϻ  (ϿϠe (ϞφK (}l1 (\R (;8(((ϯ(Ϸϕ(ϖ϶{(uϜa(TςG(3h-(N(4((ϯ ϼ^ ϯTS0ϣ ϜSS\߭\ϖBS RSR\ nR\ RX~^ WSS  ITT ;R /G ς\H~\  RRx K^ WV*TUSURTϯSϨRR\߭\ϢBRTRSTRSUUV@T?SVWW b^*sϮ @XWV*TUSURT'S RR\߭\BRTRSTRSUUV@T?SVWW U TRTBT_RSC~϶_S ϧ ϠTSR_STUU_ sSR/gR XR\~LR =R|~1R "R-R   SS- TS<>SSR߭RBSTT< ϹXX1q Ϩw ϩRR\߭\ϣBRSS< ρUU1 p?*RbiϤbݏbݏvbݏebݏɀTb?\b\bݏр$b~ݏ" bݏـbb^TRԢ ߭<~ޢ TS߭T߭Su߭߭l\\խխ߭ݏݏ*_  ^R޼nn߭<~S߭S߭߭խ߭~ݏ\0ޭP߭Pѭ?߭~ݏ'խ"߭ݏݏ2 P߭PX/*߭2ѭ߭ݏݏ L^޼nn Ѽ ּ<^޼Rb(b2TTSC~ϞTS^e\@RlRlRl~ݏ߭bѭl~ݏ  lRHl~ݏV ޼SRSRRx  @@@ HP`0 @ PASCALMSCMDMSHARE DIAG$LPV11$CODE$DATA LPV11+   CONFIGURE "xSERVICE_SET_UP LhdCLEAN_UPd ts TEST_FV_1s M TEST_FV_20 z TEST_FV_3z9 & TEST_FV_4& ' Eu TEST_FS_1 @ on TEST_FS_2n )  TEST_FS_3  hW TEST_FS_4W * #q TEST_EV_1  k TEST_ES_1U 8 UTILITY_1( [LPVINIT )OUTPUT_TO_PRINTER)3  5 CHECK_FOR_EOL5 *_ SEND_STRING_ 1ENABLE_THE_INTERRUPT_BIT + LOOP_ON_IT+ ()81.ޕp^DISK$DIAG1:[WORK]NALPAB.PAS;66/@'i$DISK1:[MDM]DSLIBRARY.PAS;781+ޕLDISK$DIAG1:[WORK]NALPAB.PIN;1  ,  ) -   ( 0 0DX0205(m:S GGSKMTSAMSGVAXELN V2.0-00m:S04-00   ?!\G MDMSHARE_001"! PASCALMSC_001<^0|~|~|~|~߭߭߭@яoЭRbS S~ݢ~ݢ S<~߭߭p ЭR(|~~ݭ`ݭ1`^޼R޼ ޼R\RKЬP`.NONAMENOMSGMessage number %X0123456789ABCDEFWSEIF???~~P `~ݬPݬ ݬ[ uXXB^^Y| (} (xcSЬPQR{PPUEqsR0r聢T,DES_CTLRTSV05 Magtape Controller& DES_UNIT_125 IPS Tape Drive& DES_FRU_10TSV05 Controller6 DES_FRU_20 TSV05 Controller interface cableF DES_FRU_300Reboot MDM Monitor or consult System specialist DES_FRU_40 TSV05 Drive.TST_FV_1Write Characteristics Test.TST_FV_2Basic Packet Protocol Test.TST_EV_1Basic Packet Protocol Test.TST_FS_1Write Characteristics Test.TST_FS_2Basic-Packet Protocol Test(TST_FS_3Basic Write Data Test(TST_FS_4Basic Read Data Test&TST_FS_5Space Records Test.TST_FS_6Write/Read Tape Marks Test.TST_ES_1Write Characteristics Test.TST_ES_2Basic-Packet Protocol Test$TST_ES_3Reliability Test"TST_UT_1Write Lock TestJ GEN_INFO16Please insure both TSV05 controller cables are securedR GEN_INFO2=for SERVICE MODE testing, install a blank tape into the driveL GEN_INFO38For details on cable placement and TSV05 Drive specificsF GEN_INFO41please refer to the User's Guide DOC: xx_xxxxx_xx6 GEN_INFO5"enter a CARRIDGE RETURN when readyV GEN_INFO6APlease insure both controller cables are secured for UTILITY MODET GEN_INFO7@testing, install a blank tape, WITHOUT WRITE RING into the driveL GEN_INFO88For details on cable placement and TSV05 Drive specificsF GEN_INFO91please refer to the User's Guide DOC: xx_xxxxx_xx8 GEN_INFO10"enter a CARRIDGE RETURN when ready< DET_INFO5'failed to leave device in neutral state< DET_INFO6'success leaving device in neutral state0 NIX_INCONinconsistency, err_num = 0 < NIX_UNKNOWN&unknown error, err_num not recognized 6ERR_005#An Initialization Error has occuredRERR_050@NBA was found set after WRITE CHARACTERISTICS command was issued4ERR_060"unknown source of error generation<ERR_070)Data Compare Error or Misposition on TapeLERR_080:Space Records Command Failed to position on correct record0ERR_090Read or Write Tape Mark Failed<ERR_306)Data Compare Error or Misposition on TapeVFTL_100CFATAL EXIT: ALLOCATE BUFFER operation failed, returned status was :HFTL_1306FATAL EXIT: DSL$READ_CSR failed, returned status was :RFTL_132@FATAL EXIT: DSL$WAIT_FOR_INTERRUPT failed, returned status was :JFTL_1627FATAL EXIT: DSL$WRITE_CSR failed, returned status was :PFTL_155>FATAL EXIT: DSL$ATTACH_INTERRUPTS failed,returned status was :PFTL_156>FATAL EXIT: DSL$DETACH_INTERRUPTS failed,returned status was :FFTL_2004FATAL EXIT: DSL$DELAY failed, returned status was :RFTL_201@FATAL EXIT: DSL$GET_SELECTED_UNITS failed, returned status was :JFTL_2027FATAL EXIT: DSL$RESET_IPL failed, returned status was :TFTL_203AFATAL EXIT: DSL$GET_INTERRUPT_COUNT failed, returned status was :VFTL_204CFATAL EXIT: DSL$CLEAR_INTERRUPT_COUNT failed, returned status was :PFTL_205=FATAL EXIT: DSLDEALOCATE_BUFFER failed, returned status was :RFTL_206?FATAL EXIT: DSL$WAIT_FOR_INTERRUPT failed, returned status was:0FTL_210FATAL EXIT: DRIVE IS OFF LINE RFTL_211?FATAL EXIT: DSL$DISABLE_CONTROLLER failed, returned status was:PFTL_212>FATAL EXIT: DSL$ENABLE_CONTROLLER failed, returned status was:LFTL_213:FATAL EXIT: DSL$IDENTIFY_UNIT failed, returned status was:DFTL_3001FATAL EXIT: Subsystem Ready (SSR) never activated`FTL_301MFATAL EXIT: Subsystem Ready (SSR) & Need Buffer Address (NBA) never activatedHFTL_3025FATAL EXIT: Need Buffer Address (NBA) never activated4FTL_303!FATAL EXIT: TSSR Contents Invalid:FTL_304(FATAL EXIT: Write Lock Bit Failed to SetVFTL_305CFATAL EXIT: Expected Interrupt Not Received od Unexpected InterruptTS@@\h80 @MDMSHARE PASCALMSC PMSG$VALUE_2$CODE$DATAPMSG$CONVERT_VALUE_2* 3PMSG$CONVERT_VALUE_3 nRC< sBҍ &(DISK$USER2:[MDM.CMS.M7]PMSGCONVERT.PAS;1  0DX0205(;SD!%GGSKMTSAVAXELN V2.0-00`~;S04-00 " # ?"! PASCALMSC_001!\G MDMSHARE_001"! DPASCALIO_001!DAP_001B no units to test, -disabled-TTTS ^R\ߢl~\D@\ߢl~\)@6\ߢl~\@j\ߢlݏ9\?g\ߢlݏA\?8%\ߢlݏI\?~\ߢlݏQ\?{ \ߢlݏY\}?ϯ \ߢlݏa\`?\ߢlݏi\C?Ϡ\ߢlݏq\&?ϩ\ߢlݏy\ ?\ߢlݏ\>\ߢlݏ\>M!\ߢlݏ\>&\ߢlݏ\> ߢlݏ >P 0^\SPPb<Ѭl ݬlݬ5Ȭ߬l>Ѭl ݬlݬ5bP߬lP=Ѭl ݬlݬϡ5Ԭ(bPP{bR֬(Ȭ߬l=Ѭl ݬlݬk5߬lRx=Ѭl ݬlݬG5Ѭ(bѬ(<, lݬlݬ5bQ bPQQQPQQCbPP bPP<-bPP<,<. lݬlݬϾ4^P߬lP<Ѭlݬlݬϖ4bP߬lP<Ѭlݬlݬn4bPP{bR֬(߬l}<ѬlȬݬlݬ;4߬lRM<Ѭlݬlݬ4Ѭ(bѬ( l<,ݬlݬ3bSbPPbbcS@bbѬ4߬l;ѬlӬݬlݬϔ3.Ѭlͬݬlݬ&֬(Ѭ( < ,Ԭ4<90 ݬ ݬ4,~ݬ >̄߬l-Ѭlͬݬlݬϲ%߬߬dѬd ݬdݬϖ%~-PXЬ@,$߬߬dѬd ݬdݬ`%ݬ$,~~߬߬dϚѬd ݬdݬ8%߬߬d8Ѭd ݬdݬ%< ,Ԭ4<90 ݬ ݬ4,~ݬ _̄߬l -Ѭlͬݬlݬ$Ԭ(<4<Ь ,ݬ(ݬ4,~ݬ d4̄߬l,Ѭlͬݬlݬς$֬(Ѭ( < ,Ԭ4<90 ݬ ݬ4,~ݬ ϼ̄߬lj,Ѭlͬݬlݬ0$߬߬dvѬd ݬdݬ$Ԭ(<4< ,<90 ݬ ݬ4,~ݬ Qd4܄8FѬ8( ݬlݬ#̄߬l+ѬlͬݬlݬϠ#֬(Ѭ( < ,Ԭ4<90 ݬ ݬ4,~ݬ ̄߬l+ѬlͬݬlݬN#߬߬dϔѬd ݬdݬ2#~$+PXЬ@,$߬߬dϻѬd ݬdݬ"ݬ$,~߬߬d6Ѭd ݬdݬ"߬߬dѬd ݬdݬϸ"< ,Ԭ4<90 ݬ ݬ4,~ݬ ̄߬l*Ѭlͬݬlݬo"Ԭ(<4< ,ݬ(ݬ4,~ݬ ϲ̄߬l`*Ѭlͬݬlݬ&"֬(Ѭ( Ԭ(<4< ,<90 ݬ ݬ4,~ݬ Z̄߬l*Ѭlͬݬlݬ!֬(Ѭ( < ,Ԭ4<90 ݬ ݬ4,~ݬ ̄߬l)Ѭlͬݬlݬ|!߬߬dѬd ݬdݬ`! \߬@߬l߬v)Ѭlɬݬlݬ0!լ1~)PXЬ@,$߬߬dϱѬd ݬdݬ ݬ$,~߬߬d,Ѭd ݬdݬ ߬߬dѬd ݬdݬϮ < ,Ԭ4<90 ݬ ݬ4,~ݬ ̄߬l(Ѭlͬݬlݬe Ԭ(<4< ,ݬ(ݬ4,~ݬ Ϩd4̄߬lN(Ѭlͬݬlݬ ֬(Ѭ( < ,Ԭ4<90 ݬ ݬ4,~ݬ N̄߬l'Ѭlͬݬlݬ߬߬dѬd ݬdݬϦ4ݬ4< , R߬d Ѭd<1ݬdݬϱ̄߬lѬlͬݬlݬύ֬(Ѭ(<4< ,<90 ݬ ݬ4,~ݬ  ߬d ]Ѭd<1ݬdݬ:܄8<2Ѭ8 ݬlݬ̄߬l2Ѭlͬݬlݬ֬HѬHd1߬dѬdݬdݬ߬dѬdʬݬdݬϢ< ,Ԭ4<90 ݬ ݬ4,~ݬ  ̄߬lѬlͬݬlݬY\߬@߬l߬oѬlɬݬlݬ)լ1qH߬d%Ѭdݬdݬ߬dѬdʬݬdݬ߬߬d~Ѭd ݬdݬϿ~PXЬ@,$ݬ$,~߬dѬd<1ݬlݬv߬߬dϼѬd ݬdݬZ߬߬dZѬd ݬdݬ>~0PXЬ@,< Ԭ4<90 ݬ ݬ4,~ݬ n ߬dѬd<1ݬlݬ̄߬lѬlͬݬlݬϿ߬߬dѬd ݬdݬϣ߬߬dϣѬd ݬdݬχ߬dѬdݬdݬe߬dcѬdʬݬdݬE߬߬dѬd ݬdݬ)֬H̔߬l<Ѭlͬݬlݬ̐߬lѬlͬݬlݬ̌߬lѬlͬݬlݬϺѬH1\7Rߢ@ߢlߢѢlɢݢlݢ\բ1ߢlݏˀߢlݏӀߢlݏۀrߢlݏ〢`ߢlݏ뀢Nߢl8Ѣl~PXТ@,$ߢߢdsѢd ݢdݢϴݢ$,~ߢߢdѢd ݢdݢόߢߢdόѢd ݢdݢp< ,Ԣ4<90 ݢ ݢ4,~ݢ ϳ„ߢlaѢl͢ݢlݢ'Ԣ(<4< ,ݢ(ݢ4,~ݢ jŒ\b<0b\\ ݢlݢ „ߢlѢl͢ݢlݢϸ < ,Ԣ4<90 ݢ ݢ4,~ݢ „ߢlѢl͢ݢlݢo ߢߢdϵѢd ݢdݢS R< 0CHECK_FOR_AMBIGUITY0< n W1TSSR_NBA_CHECKW1 v1WRITE_CHARACTERISTICSv1 O>5CMD_EXE5 x8 SPACE_EXE8Q >:SKIP_TAPE_MARK>:S G; ALLOCATOR; tL< REPORT_ERRORL<z qE81X5ShDISK$DIAG1:[WORK]NATSAA.PAS;16/$S$DISK1:[MDM]DSLIBRARY.PAS;681):SRDISK$DIAG1:[WORK]NATSAA.PIN;1    )    A     y  y y y   y   y y z Gy z yy y  yy  yy  yyyY;vU߭ݏݏJ-ݭPb1 ߭խ߭ݏݏ*O߭ ^VWԭf1 ߭ݬݏݏ:*ݭP1 Cݬݏݏڀ+߭ݏ߭g^(n1SʏSfRˏB^RSRhݬݏݏ’,_߭ݏ8߭g^(n,߭ݏ߭gfRBffSSSP ^RԭbPP6@P`߭ݬݏݏJ-ݭbbQQQP ^ԭЬRb߭7Rݏݏr.ݭjP1߭Rݏݏ2/ݭ:P1@߭Rݏݏ20ݭP[߭RݏݏB1ݭP.@߭wRݏݏB2ݭ ^ԭЬRb߭CRݏݏ23ݭnP1@߭ Rݏݏ24ݭ9P1߭RݏݏB5ݭ PZ@߭RݏݏB6ݭP(߭tRݏݏ7ݭ^ԭЬRb߭8Rݏݏ28ݭgPb߭RݏݏB9ݭ.P)߭Rݏݏ::ݭ^ԭѬ߭ݬݬ ݬּPP^^@@(p@ 8HPx`0( hx @ PASCALMSCMDMSHARECMSC NADLAB ctop$ $ptoc. Rmain% configurezclean_up test_fv_1= test_ev_1=, service_setupKw test_fs_1= test_fs_2= test_es_1G8 utility_1f utility_2w utility_3a register_testv loopback_test* overflow_test do_the_testv Fecho send_one_linekhandle_rec_int;handle_trans_int_enable_interruptsdisable_interrupts master_clear fatal_error+check_fatal_exit assign_rec y #zz z  y y y zy  vYY0DX0205(GN) GGSKMRXAMSGVAXELN V2.0-00`G04-00$' ( ?! MDMSHARE_001"! PASCALMSC_001<^0|~|~|~|~߭߭߭@яoЭRbS S~ݢ~ݢ S<~߭߭p ЭR(|~~ݭ`ݭ1`K^޼R޼ ޼R\RKЬP`.KNONAMENOMSGMessage number %X0123456789ABCDEFWSEIF???~~P `~ݬPݬ ݬ[ uXXB^^Y| (} (xcSЬPQR{PPUEqsR0r h     T    ȀЀB؀耔:d6 h(08@bHPXL`hp"xjH@ȁ.Ё`؁联T{d  \(08(@hHPX`@hpx&d86pȂЂ؂f肔 p  !b!|! !("00"8"@"H"#Pl#X#`$h0$pb$x$%&%P%%%&d&&&ȃ&Ѓ&؃'X'胔''{(>(h((( ((6)0v)8)@)H)P(*XT*`*h*p*x$+N+x+++,:,n,,,Ȅ,-Єl-؄--脔,.l...F/// "0(r00080@ 1H>1Pf1X1`1h2pJ2x223h334,4v445ȅJ5Ѕ5؅56腔B6{66&7|778 l8(8088.9@9H9P6:X:`:h8;pJ;x^;r;;;;;; <$<><ȆX<Іr<؆<<膔<<<=.=B=X= n=(=0=8=@=H2>P>X>`>h?p ?x2?D?V?h?z??????ȇ?Ї?؇6@H@P{臔Z@l@@@$ALAtA A(A0B8.B@VBHzBPBXB`BhCp`CxCCC4DjDDDDE\EȈEЈE؈ FLF舔FFF G*GLGhG G(G4 DES_CTRL_1Winchester/diskette controller.0 DES_CTRL_2Winchester disk controllerH DES_CTRL_32KDA RA80, RA81 and RA60 Winchester disk controller" DES_UNIT_1 Nonremovable4 DES_UNIT_1PNonremovable, Write protected" DES_UNIT_2 Nonremovable" DES_UNIT_3 Nonremovable DES_UNIT_4 Removable0 DES_UNIT_4PRemovable, Write protected& DES_UNIT_5Drive is offline.D DES_UNIT_6.Cannot identify drive, duplicate drive number.@ DES_UNIT_7*Cannot identify drive, drive unit unknown.. DES_FRU_0The controller is the FRU.* DES_FRU_1The drive is the FRU.* DES_FRU_5The media is the FRU.* DES_FRU_9Cannot isolate FRU???. TST_TITLE004Wrap pattern mode test.6 TST_TITLE005Initialization purge poll test.& TST_TITLE006Read unit test.8 TST_TITLE007!UQSSP maintenance read/write test0 TST_TITLE001RQDX configure procedure. TST_TITLE002RQDX cleanup procedure, TST_TITLE003RQDX setup procedure>TST_FV_1*Initialize, read and write RQDX registers.& TST_TITLE008Write unit testD TST_TITLE009-Formatter for RD53, RD52 and RD51 Winchester., TST_TITLE010Verify read exerciser4 TST_TITLE011Service write/read exerciser. TST_TITLE012Utility RQDX Exerciser& DET_UFT1_555THE CRN = !SL * DET_UFT1_556THE OPCODE = !SL < DET_UFT1_000%Diagnostic Wrap Mode pattern failure.B DET_UFT1_001*SA error in STEP 1 of port initialization.T DET_UFT1_002Controller never responded to step one of port initialization.F DET_UFT1_019.Set Controller Characteristics command failed.8 DET_UFT1_020!The controller never initialized.F DET_UFT1_021/CMD response interrupt not received, timed out.8 DET_UFT1_022 CMD response interrupt received.B DET_UFT1_023*Error has occurred in the response packet.R DET_UFT1_024;There has been 1 sequential message response with errors = X DET_UFT1_025AThere are two reasons that drive !SL was not able to come online.D DET_UFT1_027, 1. The drive is not formatted correctly.2 DET_UFT1_028 2. The Drive is broken.N DET_UFT1_0296Drive # !SL is offline or there is no media in drive. D DET_UFT1_030,Drive # !SL is offline and cannot be tested.b DET_UFT1_032KDuplicate drive number found for drive # !SL, check the disk configuration.> DET_UFT1_034'Drive # !SL has reported a media error.. DET_UFT1_036Drive # !SL is offline.X DET_UFT1_038AThe controller has experienced an error in accessing drive # !SL.L DET_UFT1_0394Host or undetermined error in accessing drive # !SL.N DET_UFT1_0406A media format error has been detected on drive # !SL.Z DET_UFT1_041BDrive # !SL is write protected. It has been dropped from the test.P DET_UFT1_0438Data read off the media in drive # !SL failed to verify.F DET_UFT1_044.Unable to allocate memory for the MSCP BuffersB DET_UFT1_051*There are two drives with unit number !SL.D DET_UFT1_052,Illegal status returned from the controller.@ DET_UFT1_053(Drive # !SL not online or not connected.: DET_UFT1_054#Data compare error on drive # !SL. 6 DET_UFT1_055Drive # !SL is write protected.(TST_FS_5RQDX read write test@ GEN_UTIL1_001(What unit do you want to format (0-3) ? B GEN_UTIL1_002)The valid unit numbers are 0, 1, 2 and 3.H GEN_UTIL1_003/Is this the correct unit number [Yes=1,No=0] = \ GEN_UTIL1_004CContinue if bad block information is inaccessible [Yes=1,(No=0)] = > GEN_UTIL1_005&Please enter the date [MM-DD-YYYY] = D GEN_UTIL1_006+Please type in a six digit serial number = V GEN_UTIL1_007=There was an unexpected message number from the DUP question.: GEN_UTIL1_008!The Send Data command has failed.X GEN_UTIL1_010?Unexpected message number returned from a DUP default question.R GEN_UTIL1_0099Do you want to use manufacturing bad block information ? T GEN_UTIL1_011 GEN_UTIL1_031%Get DUST command has failed, Status =: GEN_UTIL1_032"Controller initialization failure.B GEN_UTIL1_033*An invalid unit number has been specified.P GEN_UTIL1_0347Would you like to format another unit [YES=1,(NO=0)] ? ` GEN_UTIL1_035GThe controller reported a successful termination of the FORMAT command.> GEN_UTIL1_036&Received Data command failed, Status =T GEN_UTIL1_037;The failure could have been caused by any of the following. GEN_UTIL1_038 > GEN_UTIL1_039& . The Winchester drive is offline.F GEN_UTIL1_040. . The Winchester drive is write protected.0 GEN_UTIL1_041 . The Drive is dead.T GEN_UTIL1_042; . Bad block information should not have been specified.X GEN_UTIL1_043@ . The cables going to the drive are not making good contact.F GEN_UTIL1_045. . A non existent drive has been specified.J GEN_UTIL1_1041 . The drive select switches are set up wrong V GEN_UTIL1_046>WARNING - Data on the drive to be formatted will be destroyed.@ GEN_UTIL1_047(Do you wish to continue[YES=1,(NO=0)] ? . GEN_UTIL1_048Format of _DUA0 begun.2 GEN_UTIL1_049Format of _DUA0 finished.` GEN_UTIL1_050GWARNING, this utility will destroy any user data on the selected drive.B GEN_UTIL1_051)Do you want to continue [YES=1,(NO=0)] ? " GEN_UTIL1_044 ENTER UIT* GEN_UTIL1_052UIT Drive NameP GEN_UTIL1_0538________________________________________________________$ GEN_UTIL1_054 0: RD51 P GEN_UTIL1_0557 1: RD52 part # 30-21721-02 (1 light on front panel)P GEN_UTIL1_0568 2: RD52 part # 30-23227-02 (2 lights on front panel)$ GEN_UTIL1_057 3: RD53 $ GEN_UTIL1_058 4: ( GEN_UTIL1_059 5: $ GEN_UTIL1_060 6: $ GEN_UTIL1_061 7: < GEN_UTIL1_063$Enter Unit Identifier Table (UIT) ? @ GEN_UTIL1_064(What local program do you want to run ? N GEN_UTIL1_0655XBN size XBN size = 3*(1+sectors_per_track) (D) 54 = ( GEN_UTIL1_066DBN size (82) = 0 GEN_UTIL1_067LBN size (416730(o)) = * GEN_UTIL1_068RBN size (340) = 2 GEN_UTIL1_069Sectors per track (17) = 0 GEN_UTIL1_070Surfaces per unit (8) = 4 GEN_UTIL1_071Cylinders per unit (1024) = 8 GEN_UTIL1_072 Write precomp cylinder (1024) = @ GEN_UTIL1_073'Reduce write current cylinder (1024) = ( GEN_UTIL1_074Seek Rate (0) = . GEN_UTIL1_075Use CRC or ECC (1) = ( GEN_UTIL1_076RCT Size (5) = 4 GEN_UTIL1_077Number of RCT copies (8) = , GEN_UTIL1_078Media (25644034) = 8 GEN_UTIL1_079 Sector Interleave (n-to-1)(1) = 6 GEN_UTIL1_080Surface to Surface Skew (2) = 8 GEN_UTIL1_081 Cylinder to Cylinder Skew (8) = * GEN_UTIL1_082Gap size 0 (16) = * GEN_UTIL1_083Gap size 1 (16) = * GEN_UTIL1_084Gap size 2 (5) = * GEN_UTIL1_085Gap size 3 (40) = * GEN_UTIL1_086Sync size (13) = 6 GEN_UTIL1_087MSCP cylinders per Unit (1) = 8 GEN_UTIL1_088MSCP Groups per Cylinder (1) = 4 GEN_UTIL1_089MSCP Tracks per Group (1) = B GEN_UTIL1_090)Max allowed bad spots per surface (32) = < GEN_UTIL1_091#Bad spot tolerance (bytes) (110) = @ GEN_UTIL1_092'________BLANK0______________________ = @ GEN_UTIL1_093'________BLANK1______________________ = @ GEN_UTIL1_094'________BLANK2______________________ = @ GEN_UTIL1_095'________BLANK3______________________ = @ GEN_UTIL1_096'________BLANK4______________________ = @ GEN_UTIL1_097'________BLANK5______________________ = @ GEN_UTIL1_098'________BLANK6______________________ = @ GEN_UTIL1_099'________BLANK7______________________ = Z GEN_UTIL1_100BDo you want the Controller Specific Messages [Yes = 1,(NO = 0)] = < GEN_UTIL1_101$Invalid response , please try again ^ GEN_UTIL1_102FDownline Load UIT, IF 1st FORMAT on RQDX3 use default[(Yes=1),No=0] = B GEN_UTIL1_103)DUP Receive Data Command has timed out SOP GEN_UTIL1_1058Do you want to use the "AUTOFORMAT" mode [Yes=1,No=0] = 0 GEN_UTIL1_140Formatting has begun ...4 GEN_UTIL1_137Controller model code = !SB4 GEN_UTIL1_138Hardware Revision = !SB4 GEN_UTIL1_139Software Revision = !SB( UTL1_TITLE003RQDX - Utility 1> GEN_UTIL2_001&MDM RQDX Utility Exerciser 20-JAN-1986@ GEN_UTIL2_002(Which Exerciser mode do you want to do ?0 GEN_UTIL2_003Exerciser mode #1 - READ6 GEN_UTIL2_004Exerciser mode #2 - WRITE,READ@ GEN_UTIL2_005(Exerciser mode #3 - WRITE,READ,READ,READT GEN_UTIL2_006;Exerciser mode #4 - WRITE,READ 16 data patterns on each LBN6 GEN_UTIL2_007Enter your selection [1-4] = T GEN_UTIL2_008;Enter the run time of the exerciser in minutes [1-65000] = F GEN_UTIL2_009-Enter the duty cycle for Unit #!SL [0-100] = T GEN_UTIL2_010;Enter the type of access desired [Random=1,Sequential=0] = * SET_MESS1RQDX - Set-up RoutineJSET_09WARNING:: These tests will destroy user disk information.BSET_12 Nonremovable drives should be backed up.HSET_28 Place scratch media into the removable drives.JSET_3: Press RETURN to continue or ^C to exit the test.@SET_40WARNING:: Media on all drives will be destroyed.<SET_5+******* Are you sure you want to proceed?BSET_61 Press RETURN to continue or ^C to exit.:SET_WARN' ** WARNING **PSET_THE> The RQDX diagnostic performs write/read tests on the J SET_MEDIA5 media in the attached RD and RX disk drives.JSET_DATA7 DATA ON THE RD AND RX MEDIA WILL BE DESTROYED.V SET_PLEASE@ Please insert blank media in the RX drives and back-up,L SET_WRITE8 write protect, or take off line, the RD drives.J SET_PRESS6 Press ^C to exit, or press RETURN to proceed.ZSET_DOTG.......................................................................XSET_BLG. .4SET_S1A!. PERFORMANCE SUMMARY 6SET_S1B# RUN TIME = !SL MIN XSET_S2G. DEV TYPE KBREAD KBWRIT %DUTY SFTERS HRDERS SOFTERR RATE .XSET_S3G. --- ---- -------- -------- ----- ------ ------ ------------ .XSET_DASHE. - - - - - - - - - - - - - - - - - - - - - - .VSET_S5E. UNIT COUNT ERROR DESCRIPTION .VSET_S6E. ---- ----- --------------------------------------------- .VSET_S7E. N M AAAAA BBBBB CCCCC DDDDD EEEEE FFFFF GGGGG .SET_B1 SET_B2 SET_B3 SET_B4 SET_B5 SET_B6 SET_B13 SET_DEV. !SL SET_RX50 RX50 SET_RD51 RD51 SET_RD52 RD52 SET_RD53 RD53 SET_RC25 RC25  SET_RCF25 RCF25 SET_OFLIN OFLINSET_WHO ???? SET_KBR !SL SET_KBW !SL SET_RATE SOFTERRATE SET_PER per SET_EEEESET_STAR *SET_ADOT .SET_3PER 3% SET_XPER!SL%  SET_ZROPER0%  SET_NOPER ^ SET_TOOSHOTG * NOT ENOUGH THROUGHPUT TO PROVE SOFT ERROR SPEC.^ SET_FORCEI BLOCKS WITH FORCED ERROR STATUS = 0!SL.< SET_START' UTILITY EXERCISER STARTED 0NO_BUFRQDX waiting for buffer space.ERR_010ERR_050ERR_015ERR_052ERR_060ERR_061ERR_062ERR_070ERR_071ERR_072ERR_000ERR_001ERR_002ERR_003>ERR_004+The controller timed out on initialization.ERR_005ERR_080ERR_090DERR_3011ENVELOPE OR PACKET READ ERROR - PARITY OR TIMEOUTDERR_3022ENVELOPE OR PACKET WRITE ERROR - PARITY OR TIMEOUT0ERR_303CTLR ROM AND RAM PARITY ERRORS(ERR_304CTLR RAM PARITY ERROR(ERR_305CTLR ROM PARITY ERROR6ERR_306#RING READ ERROR - PARITY OR TIMEOUT6ERR_307$RING WRITE ERROR - PARITY OR TIMEOUT(ERR_310INTERRUPT MASTER ERROR&ERR_311HOST ACCESS TIMEOUT(ERR_312CREDIT LIMIT EXCEEDED$ERR_313Q-BUS MASTER ERROR(ERR_314CONTROLLER FATAL ERROR*ERR_315INSTRUCTION LOOP TIMEOUT(ERR_316BAD VIRTUAL CIRCUIT ID(ERR_317INTERRUPT WRITE ERRORDERR_3202MAINT READ/WRITE ERROR - INVALID REGION IDENTIFIER>ERR_321+MAINT WRITE ERROR - NON-LOADABLE CONTROLLER:ERR_322'CONTROLLER RAM ERROR - NON-PARITY ERROR&ERR_323INIT SEQUENCE ERROR6ERR_324#MSCP PROTOCOL INCOMPATIBILITY ERROR6ERR_325#PURGE/POLL ERROR - HARDWARE FAILURE>ERR_326+MAPPING REG READ ERROR - PARITY OR TIMEOUT.ERR_327MAPPING OPTION NOT SUPPORTED"ERR_330T11 CPU FAILURE&ERR_331NON-PARITY ROM ERROR>ERR_332,STATE MACHINE FAILURE - T11 ADDRESS REGISTER@ERR_333.STATE MACHINE FAILURE - Q-BUS ADDRESS REGISTER6ERR_334$STATE MACHINE FAILURE - CRC REGISTER:ERR_335'STATE MACHINE FAILURE - SERDES REGISTER@ERR_336.STATE MACHINE FAILURE - WRONG HARDWARE VERSION>ERR_337,STATE MACHINE FAILURE - DIAGNOSTIC INTERRUPT<ERR_340*STATE MACHINE FAILURE - SHUFFLE OSCILLATOR&ERR_341CONFIGURATION ERRORERR_800 FORCED ERROR ERR_802INVALID HEADER"ERR_803DATA SYNC ERRORERR_807 ECC ERROR8FTL_001%FATAL PORT ERROR SHOWN IN SA REGISTERERR_100ERR_101 NARXAD@@\h80L @MDMSHARE PASCALMSC PMSG$VALUE_2$CODE$DATAPMSG$CONVERT_VALUE_2* 3PMSG$CONVERT_VALUE_3 nRC< sBҍ &(DISK$USER2:[MDM.CMS.M7]PMSGCONVERT.PAS;1  0DX0205((vOT, GGSKMKDAMSGVAXELN V2.0-00(vO04-00'* + ?!\G MDMSHARE_001"! PASCALMSC_001<^0|~|~|~|~߭߭߭@яoЭRbS S~ݢ~ݢ S<~߭߭p ЭR(|~~ݭ`ݭ1`Q^޼R޼ ޼R\RKЬP`.QNONAMENOMSGMessage number %X0123456789ABCDEFWSEIF???~~P `~ݬPݬ ݬ[ uXXB^^Y| (} (xcSЬPQR{PPUEqsR0rPrX`h@pvx88tȂZЂ؂$肤j$ d   4!(|!0!8!@8"Hv"P"X#`J#h#p#x$l$$$6%x%%&N&&ȃ&Ѓ&؃2'b'胤''{ (<(n((( ,)(h)0)8)@"*Hb*P*X*`+hf+p+x0,h,,-b-- .<.n..Ȅ/Є4/؄x//脤0D0t00H111 1($20v282@2HH3P3X3`(4h\4p4x4.5|555$6`6|667ȅL7Ѕ7؅7"8腤b8{8829x999 ::(v:0:8;@>;H;P;X <`\<h<p<x"=^===@>>>>B??Ȇ?І:@؆@@膤AdAABBBBB $C(jC0C8C@@DHDPDX*E`nEhEp FxPFFF(GbGGG2HHHȇIЇhI؇IZJ@{臤JKtKK8LLM.DES_CTRLQ-bus SDI disk controller., DES_UNIT_1Fixed media disk drive.0 DES_UNIT_2Removable media disk drive.0 DES_UNIT_3Can't identify disk drive.6 DES_FRU_1!M7164 controller processor module0 DES_FRU_2M7165 controller SDI module , DES_FRU_3KDA50-Q disk controller* DES_FRU_4Fixed media disk drive. DES_FRU_5Removable media disk drive4TST_FV_1 UQSSP Controller Wrap Mode Test..TST_FV_2Controller Interrupt Test..TST_FV_3UQSSP Controller RAM Test.HTST_FV_44MSCP Non-destructive Disk Subsystem Functional Test.BTST_EV_1.MSCP Non-destructive Disk Subsystem Exerciser.HTST_FS_14MSCP Non-destructive Disk Subsystem Functional Test.BTST_ES_1.MSCP Non-destructive Disk Subsystem Exerciser.8UTL_1'Comprehensive Disk Subsystem Exerciser.4UTL_2$DUP Basic Subsystem Functional Test."UTL_3DUP DBN Exerciser.*UTL_4SDI Disk Drive Formatter.L GEN_SET_08The following tests perform extensive read operations onP GEN_SET_1 when you are ready to begin testing.d GEN_KDA_000NThis test will be skipped because the controller!\under test is not a KDA50-Q.B GEN_KDA_001+The controller reported the model type !SB.< GEN_INIT_000%???? Step !SL of port initialization.H GEN_INIT_0011???? Data written to SA register: !OW B GEN_INIT_002*???? SA register contains: !OW R GEN_CLP_000N GEN_FV1_1028???? Data pattern read from SA register is: !OW @ GEN_FV2_100)???? BR level test completed successfully@ GEN_FV3_000)The controller RAM test has been aborted.F GEN_FV3_100/???? Controller RAM test completed successfully: GEN_FV3_110#???? Test data pattern: !OW 6 GEN_FV4_100 ???? Test completed successfullyL GEN_UT1_0006Starting KDA50-Q Basic Disk Subsystem Functional Test.Z GEN_UT1_010DWARNING::!\ The following tests will destroy user disk information.@ GEN_UT1_011) Fixed media drives should be backed up.X GEN_UT1_012B Scratch media should be placed in the removable!\ media drives.L GEN_UT1_0136 Write protect any drives that are not to be written.R GEN_UT1_014 GEN_SUM_001'Test summary for drive unit number: !SW, GEN_SUM_002Software version: !SB. GEN_SUM_003 Hardware version: !SB0 GEN_SUM_004Volume serial number: !SL( GEN_SUM_005Bytes written: !SL( GEN_SUM_006 Bytes read: !SL4 GEN_SUM_008Blocks corrected with ECC: !SL, GEN_SUM_011Hard/fatal errors: !SL( GEN_SUM_012 Soft errors: !SL6 GEN_DBG_100???? MSCP Abort command issued.6 GEN_DBG_101 ???? MSCP Access command issued.: GEN_DBG_102#???? MSCP Available command issued.B GEN_DBG_103+???? MSCP Compare Host Data command issued.F GEN_DBG_1040???? MSCP Determine Access Paths command issued.6 GEN_DBG_105???? MSCP Erase command issued.B GEN_DBG_106,???? MSCP Get Command Status command issued.@ GEN_DBG_107)???? MSCP Get Unit Status command issued.6 GEN_DBG_108 ???? MSCP Online command issued.4 GEN_DBG_109???? MSCP Read command issued.8 GEN_DBG_110!???? MSCP Replace command issued.N GEN_DBG_1118???? MSCP Set Controller Characteristics command issued.H GEN_DBG_1122???? MSCP Set Unit Characteristics command issued.6 GEN_DBG_113???? MSCP Write command issued.B GEN_DBG_114+???? UQSSP Maintenance Read command issued.B GEN_DBG_115,???? UQSSP Maintenance Write command issued.> GEN_DBG_117(???? DUP Get Dust Status command issued.H GEN_DBG_1181???? DUP Execute Supplied Program command issued.D GEN_DBG_119.???? DUP Execute Local Program command issued.8 GEN_DBG_120"???? DUP Send Data command issued.< GEN_DBG_121%???? DUP Receive Data command issued.< GEN_DBG_122&???? DUP Abort Program command issued.H GEN_DBG_3102???? Error log message received, Controller Error.R GEN_DBG_320;???? Error log message received, Host Memmory Access Error.L GEN_DBG_3305???? Error log message received, Disk Transfer Error.B GEN_DBG_340+???? Error log message received, SDI Error.H GEN_DBG_3502???? Error log message received, Small Disk Error.@ GEN_DBG_410*???? Available Attention message received.F GEN_DBG_420/???? Duplicate Unit Attention message received.B GEN_DBG_430,???? Access Path Attention message received.< GEN_DBG_500%???? MSCP Abort end message received.< GEN_DBG_501&???? MSCP Access end message received.@ GEN_DBG_502)???? MSCP Available end message received.H GEN_DBG_5031???? MSCP Compare Host Data end message received.L GEN_DBG_5046???? MSCP Determine Access Paths end message received.< GEN_DBG_505%???? MSCP Erase end message received.H GEN_DBG_5062???? MSCP Get Command Status end message received.F GEN_DBG_507/???? MSCP Get Unit Status end message received.< GEN_DBG_508&???? MSCP Online end message received.: GEN_DBG_509$???? MSCP Read end message received.> GEN_DBG_510'???? MSCP Replace end message received.J GEN_DBG_5114???? MSCP Set Controller Char. end message received.N GEN_DBG_5128???? MSCP Set Unit Characteristics end message received.< GEN_DBG_513%???? MSCP Write end message received.H GEN_DBG_5141???? UQSSP Maintenance Read end message received.H GEN_DBG_5152???? UQSSP Maintenance Write end message received.D GEN_DBG_517.???? DUP Get Dust Status end message received.N GEN_DBG_5187???? DUP Execute Supplied Program end message received.J GEN_DBG_5194???? DUP Execute Local Program end message received.> GEN_DBG_520(???? DUP Send Data end message received.B GEN_DBG_521+???? DUP Receive Data end message received.B GEN_DBG_522,???? DUP Abort Program end message received.T GEN_DBG_998=???? Unknown MSCP end message received. Endcode: !OB R GEN_DBG_999;???? Unknown DUP end message received. Endcode: !OB 0 DET_OPC_100MSCP Abort command failed.2 DET_OPC_101MSCP Access command failed.4 DET_OPC_102MSCP Available command failed.< DET_OPC_103&MSCP Compare Host Data command failed.B DET_OPC_104+MSCP Determine Access Paths command failed.0 DET_OPC_105MSCP Erase command failed.> DET_OPC_106'MSCP Get Command Status command failed.: DET_OPC_107$MSCP Get Unit Status command failed.2 DET_OPC_108MSCP Online command failed.0 DET_OPC_109MSCP Read command failed.2 DET_OPC_110MSCP Replace command failed.J DET_OPC_1113MSCP Set Controller Characteristics command failed.D DET_OPC_112-MSCP Set Unit Characteristics command failed.0 DET_OPC_113MSCP Write command failed.< DET_OPC_114&UQSSP Maintenance Read command failed.> DET_OPC_115'UQSSP Maintenance Write command failed.: DET_OPC_117#DUP Get Dust Status command failed.B DET_OPC_118,DUP Execute Supplied Program command failed.@ DET_OPC_119)DUP Execute Local Program command failed.4 DET_OPC_120DUP Send Data command failed.6 DET_OPC_121 DUP Receive Data command failed.8 DET_OPC_122!DUP Abort Program command failed.b DET_INIT_000KA memory error occurred while trying to access the!\controller IP register.b DET_INIT_001KA memory error occurred while trying to access the!\controller SA register.h DET_INIT_010QAn error was detected by the controller during step !SB !\of port initialization.8 DET_INIT_011!SA register contains: !OW Z DET_INIT_020BThe controller timed out during step !SB !\of port initialization.P DET_INIT_0309Host communications area was never zeroed during DMA testP DET_INIT_0408Step bit did not set in step !SL of port initialization.N DET_INIT_0506SA register did not go to zero during Purge/Poll test.Z DET_INIT_060CIncorrect data returned in SA register during port!\initialization.2 DET_INIT_061Data expected: !OW 2 DET_INIT_062Data received: !OW f DET_FV1_000PThe controller timed out waiting for wrapped data!\to appear in the SA register.0 DET_FV1_001Data expected: !OW 0 DET_FV1_002Data received: !OW D DET_FV2_000.The controller interrupted above BR level !SB.D DET_FV2_010.The controller interrupted below BR level !SB.X DET_FV3_000AData verification error at controller memory address: !OW 0 DET_FV3_001Data expected: !OW 0 DET_FV3_002Data received: !OW j DET_FV3_120TA fatal error occurred while trying to perform a!\UQSSP Maintenance Write operation.j DET_FV3_130SA fatal error occurred while trying to perform a!\UQSSP Maintenance Read operation.8 DET_ERR_000"A fatal system error has occurred.6 DET_ERR_001 A controller error has occurred.@ DET_ERR_002*An error has occurred on drive number !SL.. DET_ERR_010The command status is: R DET_ERR_020;An MSCP operation failed. The endcode is !XB .8 DET_ERR_021!A bad block was found at LBN !SL.J DET_ERR_0223Additional bad blocks were found, but not reported.P DET_ERR_030:An DUP operation failed. The endcode is !XB .p DET_RSP_010YAn unknown endcode was ruturned in a response message.!\The endcode is !XB .8 DET_ERL_000!The MSCP operation has succeeded.8 DET_ERL_001!The MSCP operation is continuing.4 DET_ERL_002The MSCP operation has failed.J DET_ERL_0104A "Controller Error" error log message was received.R DET_ERL_020 DET_CMS_070(Compare error, MSCP status subcode: !XW.< DET_CMS_080%Data error, MSCP status subcode: !XW.J DET_CMS_0903Host buffer access error, MSCP status subcode: !XW.B DET_CMS_100+Controller error, MSCP status subcode: !XW.< DET_CMS_110&Drive error, MSCP status subcode: !XW.R DET_CMS_310;Message from internal diagnostic, MSCP status subcode: !XW.X DET_CMS_200BInvalid status code in response packet.!\MSCP status subcode: !XW.8 DET_CDS_000!Success, DUP status subcode: !XW.< DET_CDS_001%Invalid cmd, DUP status subcode: !XW.D DET_CDS_002-No region available, DUP status subcode: !XW.B DET_CDS_003,No region suitable, DUP status subcode: !XW.@ DET_CDS_004)Unknown program, DUP status subcode: !XW.< DET_CDS_005&Load failure, DUP status subcode: !XW.B DET_CDS_006,Standalone failure, DUP status subcode: !XW.H DET_CDS_0092Host buffer access error, DUP status subcode: !XW.X DET_CDS_100BInvalid status code in response packet.!\MSCP status subcode: !XW.F DET_DRH_160/An unrecognized "Special" message was received.* DET_DRH_161Message number: !SL.D DET_DRH_170.A fatal error was detected by the DUP program.N DET_CCK_0007Controller SA register contains error code: !OW F ERR_INIT_000/The controller timed out during initialization.J ERR_INIT_0012A controller error occurred during initialization.h ERR_NXM_001QA non-existant memory error occurred while trying to access!\the controller CSRs.J ERR_FV1_0004The controller failed the Diagnostic Wrap Mode test.L ERR_FV2_0006The controller failed the device interrupt level test.D ERR_FV3_000.The controller failed the controller RAM test.P ERR_RSP_000:Controller timed out by host. No progress made on command.P ERR_RSP_010:End message received from controller with unknown endcode.T ERR_RSP_020=End message received from controller specifies unknown drive.: ERR_CCK_000#Controller detected internal error.R ERR_DRH_000;Error during DUP program execution. DUP program was halted.L ERR_MRH_0006Drive under test unexpectedly became "Unit Available".D ERR_MRH_001-Duplicate unit detected for drive under test.F ERR_CMS_010/Invalid command was detected by the controller.> ERR_CMS_020(Command aborted during a MSCP operation.J ERR_CMS_0304Drive became "unit-offline" during a MSCP operation.N ERR_CMS_0407Drive became "unit-available" during a MSCP operation."P ERR_CMS_050:A media format error was detected during a MSCP operation.L ERR_CMS_0605The drive is write protected during a MSCP operation.N ERR_CMS_0707A data compare error occurred during a MSCP operation.D ERR_CMS_080.A data error occurred during a MSCP operation.R ERR_CMS_0904T>hR`R4Tt>Xr*ЏSyRR hR lSdS`RUU#0ЏSyRR hR lSdS1 `R1 ЏSyRR hR lSdS1 `R14ݏiݏ=< ~< ~-ϏXRR/4ݏiݏ=< ~< ~ T4ݏiݏ=< ~< ~ % ^ﻜR4=\4\<\4\< )$2'QyPP P حQѭQѭP 1߭”<@ ”\\\S4S5<4<414S<\\4S;4 ;41b4S;<\\4S;4S;<\Z4Si;<\&ЏQyPP P حQѭQѭP<\1\4\;4\:4 :41z4\:.4ݏiݏ0:< ~< ~ σ\4\p:\\/4ݏiݏX:< ~< ~ $4ݏiݏ`X:< ~< ~ \\/4ݏiݏh:< ~< ~ ϻ4ݏiݏp 9< ~< ~ ό\\.4ݏiݏ 9< ~< ~ R0^S\L\ϐ߭G91 \\(G߭߭~'x\RL*R1߭߭߭߭߭߭8խ1X1U%U\D.1߭Wݏ}3߭ݏqݏb~_3.x\PL*S1oD1e\D$\(\*\<,\<߭߭~xP\@*\1ŏJT\L\lP\P0\\D$\"(\@*\<,\<W߭߭~7xP\@*\\1߭Wݏ,2߭ݏqݏb~2xP\@*\1WT߭y1WT߭j1Sk߭Wݏ1߭ݏ1߭ݏȁ1߭ݏiݏbd~1T< ~< ~߭1\WT߭1MЭUxU\SL*VV1x UPP\\ *\\1PP.\\O߭WݏЁ1.1߭ݏqݏb 0T< ~< ~߭|1߭Wݏ؁0.1߭ݏqݏb 0T< ~< ~߭-pV_x UUUU *\\M߭WݏT0@߭ݏqݏb~/0T< ~< ~߭ WT߭ϛXTj߭ݏiݏe~/< ~< ~.υ߭ݏiݏf~/< ~< ~ U<^S4I/U%UTDÜSR1zRC>SR1gR33C>SR1TR0C>SR1AC>Ф>RCФ>RCФ>RCФ>RCФ>R?C Ф>RC Ф>RCФ>RCФ>RCФ>RCФ>RCФ>RCФ>R?CФ>RCФ>RCS1C>Ф>RCФ>RCФ>RCФ>RCФ>RC Ф>RC Ф>RCФ>RCФ>RCФ>RCФ>RCФ>RCФ>RCФ>RCФ>RCS1C>Ф>RCФ>RCФ>RCФ>RCФ>RC Ф>RC Ф>RCФ>RCФ>RCФ>RCФ>RCФ>RCФ>RCФ>RCФ>RCS1TRٶC>SR1AUUC>Ф>RUUCФ>RUUCФ>RCФ>RCФ>RC Ф>RUUC Ф>RUUCФ>RCФ>RCФ>RUUCФ>RCФ>RUUCФ>RCФ>RUUCФ>RCS1RlC>SR1|--C>Ф>R--CФ>R--CФ>RCФ>RCФ>RC Ф>R--C Ф>R--CФ>RCФ>RCФ>R--CФ>RCФ>R--CФ>RCФ>R--CФ>RCS1RmC>SR1C>Ф>RCФ>RCФ>RCФ>RCФ>R C Ф>R@C Ф>RCФ>RCФ>RCФ>RCФ>RCФ>RCФ>R CФ>R@CФ>RCS1C>Ф>RCФ>RCФ>RCФ>RCФ>RC Ф>RC Ф>RCФ>RCФ>RCФ>RCФ>RCФ>RCФ>RCФ>RCФ>RCS1amC>Ф>R۶CФ>RmCФ>RmCФ>R۶CФ>RmC Ф>RmC Ф>R۶CФ>RmCФ>RmCФ>R۶CФ>RmCФ>RmCФ>R۶CФ>RmCФ>RmCS1mC>Ф>R۶CФ>RmCФ>RmCФ>R۶CФ>RmC Ф>RmC Ф>R۶CФ>RmCФ>RmCФ>R۶CФ>RmCФ>RmCФ>R۶CФ>RmCФ>RmCS UEŏJXU%XRNH!%SP<@œ\\@œ@œDSѢDSSD&~T޼WWRBRR1WRBS-cB #OŏJWRBĴScBĬRЏQyPP bP آQQPc}cbŏJWUEĴVfEĬPЏ-1SyRR `R ؠSS Rf}f`ERbS@SdSď@ SSRyQQ `Q ؠRRQf EĨRb@^Q\|V߭߭߭~<~ZѭϋRR(W߬߬ܚ~7լ1(ԙRR(R<,RЭ0R4R8߬߬ܚ~Ͽ߭߭~ RR(R ,RЭ0R4R8σ߬߬ܚ~cR<R(^{\߭ݏsJ߭H߭ݏ{2߭߭ ߭ѭ1C ѭ1: ߭ݏ#߭߭߭խ ѭѬP]Qԭ߭ݏ[߭߭j߭|ݭխѭ߭ݏcO߭Mѭďѭ߭ݏk'߭߭߭ݭϏխѭ$ѭѭѭ ߭ݏ խѭѭѭѭ ѭ  ѭ1RRϦRR1G1=TRR(R߭߭ܚ~2TTխx SSRS/RRխ1x SSRS/SS1oR(R(k,׵߭߭ܚ~Ϸխ1߭9߭ݏԭ խ1W gRRqRt1 gVU߭ݏ{Z9 5߭5-߭;( ϞR ,, P1V1߭ݏ9 5߭5ݭc߭R,, P, P߭ݏ+߭߭ݬPݏ3x߭ݏ;d߭ݏCP߭ݏ<߭:ԭRR(R0R4R8߭߭ܚ~ƺխ1߭ݏ߭ԭ1 gVVVR,ϭ )81, P1,ڒ P1,ɒ P1,ϸ P1V11߭ݏ6߭ݏ(߭߭ݭϚ߭ խѭ$ѭѭѭ ߭ݏ խѭѭѭ ѭ 1nѬPխѭ, P ,Ց PR,1V1ѬP,ϱ P1,ϟ P1߭ݏ1߭߭ ݭϣ߭խѭ$ѭѭѭ ߭ݏ խѭѭѭѭ խѭ, P , PR,1V1,Ӑ PR,1߭ݏs[߭߭6ݭ͸߭@խѭ$ѭѭѭ ߭ݏ  խѭѭѭѭ խѭѭ ,) P-, P߭ݏ߭ԭRR(R0R4R8W߭߭ܚ~7խ1j߭ݏ>+=-߭ȟ+ݭ)߭ԭ1+1(ݭݭ߭1߭ݏ ߭ݏ߭ݏ߭ݏ#߭ݏ+߭ݏ3߭ݏ;{߭ݏKi߭ݏCW߭U߭ݏÂ;߭9ԭJ߭*߭ݏ߭ԭ߭ݏ߭ԭխ11߭ݏÂ3Ȏ5߭ȟ3ݭ߭1߭ݏӂ߭u߭ݏۂo3n5߭ȟ3ݭZ߭L:߭ݏゔ0߭.߭ݏ낔߭ԭ߭ݏ߭߭ݭi߭ѭ1qT޼XhWxWUUVSV $x WRRRRV R3@1 ЭR6bR<`  Џ4@d%"&( *,.0(2 468: @1ЭR6bA<` @ Џ4@d%"&(*,.0(2 468:@1ЭR6bRЏ<  Џ5@d%"&(*,.0(2 468: @1tЭV߭ݏۃ!߭ݏ냔]Qϛ6fЭfݏ]Q~RЭݏ]Q^ ЏЭݏ]Q;< Э ݏ ]Qݏ]Qݏ]Qݏ#]Qϻݏ+]QϚݏ3]Qyݏ;]Q[ݏC]Q<ݏK]Q  ݏS]Q Џ5@d%"Э"ݏ[]Q&&ݏc]Qϼ((ݏk]Qϝ**ݏs]Q~,,ݏ{]Q_..ݏ]Q@00ݏ]Q!(22ݏ]Q 44ݏ]Q66ݏ]Q88ݏ]Qϥ::ݏ]Qφ <<ݏ]Qgn>>RR(Rd,RЭ0R4R8n߭߭~Mխ;߭ݏWU}߭ݭC߭5Լ@@@H(p@ 8HPx`0(  @ PASCALMSCMDMSHARE DIAG$RQDX$CODE $DATA !RQDX2 !I # CONFIGURE#~ -  g   -SERVICE_SET_UP-&  l/CLEAN_UP/ * 3E/ TEST_UV_1E/ { M/ TEST_UV_2/ oJ/ TEST_UV_3/ O+0 TEST_UV_4+0 H0 TEST_EV_1H09 ^1 TEST_FS_1^1 ,N1 TEST_FE_117 S/3 UTILITY_22GET_USERS_INPUT2 l/3s 6 GET_NUMBER6 Wlk7 UTILITY_1k7 lB7EXECUTE_COMMAND7 7DRIVE_UNIT_STATUS7   7INIT7 T8INITIALIZE_CONTROLLER 8VERIFY 8 8r  G%<INITIALIZE_COMMUNICATIONS_AREA<( E}g= GET_BUFFERg=% ,>GET_MSCP_REGION,> x> DO_COMMAND> ~~ mECOMMANDmE n E COMMAND_DUMPE -E RESPONSE_DUMPE ERESPONSE_HANDLERE.  # ;FCHECK_FATAL_EXIT;F d>FCHECK_RESPONSE>F  * JCHECK_RESPONSE_2J0 PfKCHECK_SA_REGISTERfK C ^WHARDERR^W% W HOLD_SOFT_ERRWZ V_CY TALLY_SOFTCY dY GIVE_SUMMARYY   _SPACER_ V_ COUNT_BYTES_@ ` MSD_AND_POWER` BaSIZE1000a 'maSIZE100a BFa LIST_HARDERSa [a PRESET_UTEXa) wGbDIAGNOSTIC_WRAP_MODEGbf  :eINIT_PURGE_POLL:e 0    i UNIT_READ i  :lym UNIT_WRITEym j  s START_INIT s( "s ISSUE_COMMANDs! Y#ZtGENERATE_COMMANDZt` # XuMSCP_READ_WRITEu3 $3w GET_RANDOM3w) $ xINIT_RANDOM_BUFFER x %xFILL_RANDOM_BUFFERx K%`y SETUP_BUFFERy %  + WAIT_RESPONSE+, &RESPONSE_CHECKb ' * DATA_COMPARE (J[UNKNOWN_CRN_ERROR[ "(^ OUTPUT_STATUS^ '(aREPORT_TIMEOUTa 3(dVERIFY_COMMAND_ISSUEd q(n҃CHECK_SPECIFICATION҃@ (U!DATAGRAM_REPORT :)F UTILITY_11AUTOSIZE_DISKS; }*+PF * "  2RECIEVE_DUP_COMMANDHANDLE_RESPONSE ,L2x , GET_UITB GET_UIT_DATAB -_ -!      ~Y  92[.DISK$DIAG1:[WORK]NARXAD.PAS;276/@'i$DISK1:[MDM]DSLIBRARY.PAS;781@YDISK$DIAG1:[WORK]NARXAD.PIN;1  \  ) ]   ' b n(0DX0205(0A2 GGSKMTKAMSGVAXELN V2.0-00 0A04-00  ?! MDMSHARE_001"! PASCALMSC_001<^0|~|~|~|~߭߭߭@яoЭRbS S~ݢ~ݢ S<~߭߭p ЭR(|~~ݭ`ݭ1`/^޼R޼ ޼R\RKЬP`./NONAMENOMSGMessage number %X0123456789ABCDEFWSEIF???~~P `~ݬPݬ ݬ[ uXXB^^Y| (} (xcSЬPQR{PPUEqsR0r GEN_LOAD5) Please insert a blank cartridge.L GEN_LOAD68 Press ^C to exit, or press RETURN to proceed...4ERR_1$Error during Register Existence TestBERR_22Error during execution of LEVEL I Microdiagnostics:ERR_3*Error during Initialization STEPS 1-4 Test6ERR_4&Error during Diagnostic Wrap Mode Test6ERR_5%Error during Vector and BR LEVEL Test,ERR_6Error during Purge/Poll TestBERR_72Error during Small Ring Buffer Initialization TestBERR_82Error during Large Ring Buffer Initialization Test2ERR_9!Error during Get DUST Status TestDERR_103Error during Server Functionality Verification TestDERR_113Error during Execution of LEVEL II Microdiagnostics:ERR_12)Error during Q-BUS Exerciser and RAM TestDERR_133Error during Execution of LEVEL II Microdiagnostics4ERR_20"Error during Configuration routineDET_PS Packet sent:"DET_PRPacket received:& DET_SA_CONTSA Register: !XW0 DET_SA_EPREEnvelope packet read error2 DET_SA_EPWEEnvelope packet write error6 DET_SA_CRRPEController ROM-RAM Parity error2 DET_SA_CRAPEController RAM Parity error2 DET_SA_CROPEController ROM Parity error$ DET_SA_RRERing read error& DET_SA_RWERing write error, DET_SA_IMEInterrupt master error0 DET_SA_HATEHost access timeout error2 DET_SA_CLERCredit limit exceeded error& DET_SA_BMEBUS master error8 DET_SA_DCFE!Diagnostic controller FATAL error4 DET_SA_ILTEInstruction loop timeout error: DET_SA_ICIE#Invalid connection identifier error* DET_SA_IWEInterrupt write error2 DET_SA_MRWEMaintenance read-write error, DET_SA_MWEMaintenance write error* DET_SA_CREController RAM error2 DET_SA_ISEInitialization sequence error@ DET_SA_HLPIE)High level protocol incompatibility error& DET_SA_PPEPurge-Poll error2 DET_SA_MRREMapping register read error* DET_SA_MAEMapping attempt error, DET_SA_DEEDivide error exception* DET_SA_SSISingle step Interrupt, DET_SA_NMINon-maskable Interrupt( DET_SA_BIBreakpoint Interrupt, DET_SA_IDOInto detected overflow, DET_SA_ABEArray bounds exception( DET_SA_UOEUnused opcode error, DET_SA_EOEEscape opcode exception8DET_SA_R$Reserved error code -- unknown event" DET_SA_IIInto Interrupt( DET_SA_RCEROM checksum error DET_SA_ME MPU error8 DET_SA_MRWRE!Miscellaneous Register Wrap error. DET_SA_GDCEGap detect circuit error& DET_SA_UWEUSART Wrap error0 DET_SA_UWENUSART Wrap error -- No CRC. DET_SA_UWECUSART Wrap error -- CRC& DET_SA_DCEDrive cable error4 DET_SA_UNKUnknown SA error code returned" DET_SA_REO RAM error Odd$ DET_SA_REERAM error Even$ DET_SA_MTEMPU timer error DET_AFAllocate failed DET_IAInvalid address DET_ICInvalid contextDET_IE Invalid entry"DET_IPInvalid priority DET_IVInvalid Vector$DET_IDInterrupts disabled DET_LTSList too shortDET_NA No accessDET_ND Non decimalDET_NV Null valueDET_OOverflowDET_TO Timed_outDET_T Truncated"DET_UVUndefined Vector& DET_DUP_INVInvalid command* DET_DUP_NRANo region available( DET_DUP_NRSNo region suitable( DET_DUP_PNKProgram not known" DET_DUP_LF Load failure DET_DUP_S Standalone0 DET_DUP_HBAEHost buffer Access error0 DET_DUP_UISUnknown or Invalid Status* DET_TMSCP_OFF** Unit offline **2 DET_TMSCP_WP** Unit write protected **( DET_TMSCP_DAT** Data error **. DET_TMSCP_CE** Controller error **, DET_TMSCP_FE** Formatter error **( DET_TMSCP_DE** Drive error *** DET_TMSCP_PL** Position lost **6 DET_TMSCP_ID** Internal Diagnostic error **B DET_TMSCP_UNS*Unknown or unexpected Status code returned( DET_TMSCP_09Command: Online, ( DET_TMSCP_01Command: Abort, , DET_TMSCP_08Command: Available, 2 DET_TMSCP_03Command: Get Unit Status, & DET_TMSCP_21Command: Read, , DET_TMSCP_25Command: Reposition, @ DET_TMSCP_04)Command: Set Controller Characteristics, ( DET_TMSCP_22Command: Write, * DET_TMSCP_UNCCommand: Unknown, DET_NULLDET_STAR** DET_L2_SUBStatus subcode: !3XW( DET_L2_FLResponse flags: !2XB0DET_DRIVE_CODEDrive error code: !2XB4 DET_SAERRSA error during Packet exchangeF DET_BAD_STAT.Bad Status returned from a system service call:DET_SAR'System unable to access the SA Register:DET_IPR'System unable to access the IP Register@DET_DROP-Unit Failed -- Testing complete for this UnitBDET_NIV/No support for a Host settable Interrupt Vector<DET_QB*No support for a 22-BIT Host BUS available:DET_DD)Port does not support odd Host addressing6DET_MP%Port does not support address mappingBDET_DI1Port does not support enhanced Diagnostic testing<DET_S1*Unit failed to enter Initialization STEP 1<DET_S2*Unit failed to enter Initialization STEP 2<DET_S3*Unit failed to enter Initialization STEP 3<DET_S4*Unit failed to enter Initialization STEP 4& DET_PORT_TYPE Bad port type@DET_WR.Unit unexpectedly entered Diagnostic Wrap ModeHDET_COM5Incorrect number of command ring descriptors returnedHDET_RSP6Incorrect number of response ring descriptors returned8DET_BIT%Bad data during Initialization STEP 2*DET_IEDInterrupts not disabled2 DET_VECTORBad interrupt vector returnedD DET_VERSION-Firmware revision of 2 or greater is required. DET_MODELBad hardware MODEL number6DET_ER_1"Error during Initialization STEP 16DET_ER_2"Error during Initialization STEP 26DET_ER_3"Error during Initialization STEP 36DET_ER_4"Error during Initialization STEP 4( DET_TIME_OUTTime out error --B DET_TO_ST1,Unit failed to enter STEP1 within 10 secondsB DET_TO_ST2,Unit failed to enter STEP2 within 10 secondsB DET_TO_ST3,Unit failed to enter STEP3 within 10 secondsB DET_TO_ST4,Unit failed to enter STEP4 within 10 seconds@ DET_SET_DWM)Unit failed to enter Diagnostic Wrap Mode4DET_ECHO Unit failed to echo correct data:DET_FINT'Unit failed to interrupt when requested4 DET_BADVECTBad interrupt vector returned2 DET_BADBRBad BUS request level returnedJ DET_NOCLR5Controller failed to clear Host memory during PP test: DET_CLR_PP$Unit failed to enter Purge/Poll ModeH DET_DESC_CLR0Unit failed to clear the ring buffer descriptors< DET_CMD_REF%Bad command reference number returned* DET_ENDCODEBad endcode returned8DET_STAT%Unit did not return successful status2DET_IDLEController not in an IDLE stateDDET_DCE2Incorrect data returned during server verification6 DET_NUMDCE Number of bytes miscompared: !SW$ DET_HEADEXPData expected:$ DET_HEADRECData received:0 DET_HEADOFFOffsets from buffer start:H DET_EXCESS2Unit dropped because of excess data compare errors<DET_CMP*Data compare error during LEVEL II testing6DET_PROG#Unit hung during LEVEL II Execution> DET_SET_WR)Unit failed to enter Diagnostic Wrap Mode* DET_INVFLInvalid flag returned* DET_TO_CONTController time out@ DET_UFAIL+Unit failed to respond to an issued command DET_DATA_OUT!XL DET_BYTES_OUT!2XBDDET_BWS2Failing status returned from a system service callL DET_INVSTAT5MDM SYSTEM FAILURE -- Unknown or bad status returnedTK50@@\h800 @MDMSHARE PASCALMSC PMSG$VALUE_2$CODE$DATAPMSG$CONVERT_VALUE_2* 3PMSG$CONVERT_VALUE_3 nRC< sBҍ &(DISK$USER2:[MDM.CMS.M7]PMSGCONVERT.PAS;1  0DX0205( GGSKMXQAMSGVAXELN V2.0-00804-00   ?! MDMSHARE_001"! PASCALMSC_001<^0|~|~|~|~߭߭߭@яoЭRbS S~ݢ~ݢ S<~߭߭p ЭR(|~~ݭ`ݭ1`^޼R޼ ޼R\RKЬP`.NONAMENOMSGMessage number %X0123456789ABCDEFWSEIF???~~P `~ݬPݬ ݬ[ uXXB^^Y| (} (xcSЬPQR{PPUEqsR0rERR_013,The Transmit BDL Address Register is broken.>ERR_014+The Receive BDL Address Register is broken.,ERR_015Cannot attach interrupts..ERR_016Cannot get interrupt count.FERR_0173Timed out waiting for Nonexistent Memory interrupt.4ERR_018!Wrong type of interrupt occurred.,ERR_019Cannot detach interrupts.>ERR_030,Timed out waiting for Packet Done interrupt.0ERR_031Cannot clear interrupt count.$ERR_032Invalid interrupt.,ERR_033Error transmitting packet.*ERR_034Error receiving packet.(ERR_035Buffers do not match.$ERR_040Nothing received."ERR_041Packet overflow.8ERR_042%Did not receive expected Long packet.L DET_MSG_0015Packet Aborted from too many collisions, TDR value = ( DET_MSG_002Nocarrier flag = " DET_MSG_003 Loss flag = " DET_MSG_004 Runt flag = & DET_MSG_005Discard flag = & DET_MSG_006Overflow flag = * DET_MSG_010Transmit length = * DET_MSG_011Receive length = $ DET_MSG_012 Transmit BDL:" DET_MSG_013 Receive BDL:$ DET_MSG_014Transmit buff:$ DET_MSG_015 Receive buff:$ DET_MSG_020SA1 (0) = !4XW$ DET_MSG_021SA2 (1) = !4XW$ DET_MSG_022SA3 (2) = !4XW$ DET_MSG_023SA4 (3) = !4XW$ DET_MSG_024SA5 (4) = !4XW$ DET_MSG_025SA6 (5) = !4XW$ DET_MSG_026VA (6) = !4XW$ DET_MSG_027CSR (7) = !4XW, GEN_ALLOC_ERRNo memory available..TST_FS_1The external loopback test.*TST_ES_1The service exerciser.< GEN_RUN_UTIL1#Run UTILITY 1 to determine the FRU.&UTL_1The loopback utility.T GEN_UTL1_000=Utility #1 permits staged testing of the DEQNA and associatedZ GEN_UTL1_001Bcables/connectors. At each step you may place loopback connectors@ GEN_UTL1_002(at any point in the communications path.R GEN_UTL1_012:Please mount a loopback cable/connector (e.g. 12-22196-02)\ GEN_UTL1_013Danywhere on the communications path and hit RETURN when finished ..." GEN_UTL1_014 Testing...@ GEN_UTL1_050)Replace the fuse and run the tests again.$ GEN_UTL1_051 Test failed.& GEN_UTL1_052Test succeeded.: GEN_UTL1_053#Do you want to repeat the test? [n],UTL_2The remote loopback utility.( GEN_UTL2_002 Server found: H GEN_UTL2_0100This test looks for a loopback server out on theF GEN_UTL2_011/Ethernet, then sends a number of varying lengthJ GEN_UTL2_0123packets to it. It compares the looped back packetsL GEN_UTL2_0135to the packets that were sent and reports any errors.L GEN_UTL2_0144You probably need another MicroVAX running MDM DEQNAR GEN_UTL2_015:Utility 3 (loopback server) to run this test successfully.< DET_UTL2_001$ Searching for a loopback server...0 DET_UTL2_010 Packet sent, length = " DET_UTL2_011 CSR = !4XW* DET_UTL2_012Discarding packet:<ERR_050)Timed out waiting for transmit interrupt.:ERR_051(Timed out waiting for receive interrupt.0ERR_052No loopback server available.$UTL_3The loopback server.> GEN_UTL3_001' ---> Loopback Server active <---> GEN_UTL3_002'Net is overloaded, packets may be lost.< GEN_UTL3_010%This is the Ethernet loopback server.J GEN_UTL3_0112It answers loopback requests from other MicroVAXesJ GEN_UTL3_0122running MDM DEQNA Utility 2 (Remote loopback test)L GEN_UTL3_0134as well as other devices using the Ethernet loopback GEN_UTL3_014 protocol.0 DET_UTL3_010 Looped back, length = D DET_UTL3_011- Loopback packet, but no forwarding address.0 DET_UTL3_012 Not a loopback packet. DET_UTL3_013R DET_UTL3_014D2 DET_ERR_CNT Total number of errors is  DET_SPACE_XB !2XBDET_XB!2XB DET_SPACE_XW !4XWDET_XW!4XW DET_XB_MINUS!2XB-DEQNA@@\h80 @MDMSHARE PASCALMSC PMSG$VALUE_2$CODE$DATAPMSG$CONVERT_VALUE_2* 3PMSG$CONVERT_VALUE_3 nRC< sBҍ &(DISK$USER2:[MDM.CMS.M7]PMSGCONVERT.PAS;1  0DX0205($O>GGSKMKDAVAXELN V2.0-00`$O04-00:b=>  ?"! PASCALMSC_001!\G MDMSHARE_001"! DPASCALIO_001!DAP_001xIOPAGEFIELD Unable to identify controller. HW=REV MC= - MODEL RQDX3 - KDA50-Q - RQDX1 - RC25 - KDA50-Q""33333333333333333333333333333333330000000000000000DD??UUffwwٶٶٶٶٶٶٶٶٶٶٶٶٶٶٶٶUUUUUUUUUUUUUUUUllllllllllllllll۪----------------һmmmmmmmmmmmmmmmm @ @m۶mm۶mm۶mm۶mm۶mmm۶mm۶mm۶mm۶mm۶mm< ^M\ϡR~R5CR~R5ϞR~R5RݏQR~5. RݏYR`5 RݏaRB5'RݏiR$5#RݏqR5$RݏyR4%RݏR4'RݏR4RݏR4(RݏRp4(#ݏ c4PϞ^V^  fƐƌL4H33%ƌ18,φ1ƅWW$VVV1VVVVV=VVVVVJ2(J~}6r ( e} YWQޭPSR2YƐZZ(ZZZZZ5ZZZZZAZZZZZN2(ϼ~}Ϩr ( ϑe}}YZQޭPSRi0Y/'/jR¼\l\=a¸¸¼\ݬ´a¸{W<^RŒ">"\\|.d&P1A 󊏀 L\\\<QyPP P Q>\\.%P1 ѭѭ1ϝV.ݏ-ݏp-<\\ݏx- ݏ1ݏ†;-14ݏ)ݏ†-1 M~-ݏc-ݏP-ݏ)ݏ3-11>\\,Ͼ$P1ЏQyPP P Q>\\,g$P1Dѭѭ1ѭ1ѭ{w,ݏ\,ݏI,<\\ݏ2,<\\ݏȄ,ݏ)ݏ +1|SU>\\+ψ#P1eЏQyPP P Q>\\M+1#P1ѭѭ1ѭ1ѭzA+ݏ&+ݏ+<\\ݏ*<\\ݏȄ*ݏ)ݏ *\TT#\\S*S!P1S¼~()< *ݏć)ݏԇ))¼SSS\CSP\@P">"SS9)!!P1劏@ 刏 LSSSSS\\\(@ P1  T\\ѭѭ߭('>SS'1P-(ݏ(Tݏp'N%ݏć3%ݏ܇ %$UҸ¸\@¸\4Ҹ¸\S%xSP\@PҸ\\`¸CSF|˜ЏF#P >DSSO$7PT~&$L<^RŒ|T SŒˆ¨KP.L+$ݏ䇤$#¤ P)#ݏ䇤##P¤\޼\@lPa#ϗŒ.#ݏ+#~# ŒC…\\ 9_#ݏˀD#…\\ݏӀ,#1  1Œ1SV U1Wˆ\я 5\ ˆ 5°°ˆˆ 51S1¬1´1¤\¨¤\¨UU#K"E ^R޼Scc=d~ ߭Эcc67¬´c^6RмPP 6p/1DּDP@,F<ݏćݏ̇lIPďIP@ ρDD<1t1QDּDP@,vE<ݏćݏ̇PďIP@ DD<1t1Dּ¬1´1ּDP@,D<Jݏć/ݏ̇PďIP@<@°@8P`#DD<1f1DּDP@,D<ݏćݏ̇sPPďIP@/¬^FPďIP@8P`!eDD<1Q15Dּ¬1$´1ּ1DP@,@C<ݏćݏ̇tPďIP@@8P`<°ϞDD<1f1nDּּ¬1Y´1Pּ1DP@,uB<ݏćݏ̇QŏIQP@KďHQQPP;QQ3¬@DPďIP@8P`"ϡDD<141qD@@ּ@ּ¬1L´1CּDP@,kA<ݏćݏ̇PďIP@ DD<1t1DּDP@,@<Qݏć6ݏ̇#PďIP@ 8DD<1t DԼ ^RмSS,f|<R1mDּDP@,?<uݏćZݏ̇G$PďIP@ \DD<1t1DּDP@,Q?<ݏćݏ̇PďIP@ Ͻ DD<1t13Dּ¬1"´1ּ1DP@,ϗ><ݏćݏ̇QŏIQP@1#ďHQQPP QQ]MPS OMPSS 6s1QŏIQP@\\SSόP1tS¼~(<ݏćݏԇ_¼SSS\CSP\@P򈏀኏@ ሏ LSSSSS"SS pP1XV TT1dQyPP P Q>\\ P1 T\\ѭѭ T\\_ѭWѭM ݏ Tݏ ݏ)ݏ 1`^ 1T1%Ž1 1ЏQyPP P Q>\\ P1<\ѭѭ<\Rϯ4 ݏ ݏ ݏ)ݏ  1m > SSt \P1D>"SSS 7P1 % ߭߭ ѭ,Э>SS P1Rϸ3# ݏ Tݏ ݏ)ݏ† 1v1^3 ݏ Tݏp 1 ݏć ݏ܇ UҸ¸\@¸\4Ҹ¸\S%xSP\@PҸ\\`¸CSF|˜ЏF#P >DSS2PT ^R޼޼nѮm0S,ݏnݏhݏ`ݏ9ݏʆSSP^W޼Y޼n ߭82 1 ЭXPSyR Y(n*YRR!G9B DDDZ)DDDDJDDDDDDDDDDDDD]1\1YXSǐRďIRBRb$ǰ,ǐRďIRB8Rb<1#ǐSŏHSRRRďISCRb$1ǬXVǐRďIRBRb$ǰ,( ǘ0ǐRďIRB8Rb<1ǐRďIRBRb$1XSǐRďIRBRb$ǰ,ǐRďIRB8Rb<1jǔ,1aǐRďIRBRb$1IXSǐRďIRBRb$ԣ</*1ǬXVǐRďIRBRb$@*ǰ,( ǘ0ǐRďIRB8Rb<1XSǐRďIRBRb$ǰ,ǐRďIRB8Rb<1XR,..0|4Ԣ<zXSǐRďIRBRb$ԣ< /*FǬXVǐRďIRBRb$@*ǰ,( ǘ0ǐRďIRB8Rb<ЭS(R8R=P ǴcԣǴRSǰSSǴǰcǴSǴSװSǰ^W޼Y߭.1 ЭXY(YRRK^|1ЏSyR 1ǬXVǰ,( ǘ0( <ЏSyR \, ,} IǬXVǰ,( ǘ0} +ǬXVǰ,( ǘ0}  ЏSyR (RR ǴhԨǴRXǰXXǴǰhǴXǴXװXǰ Hݏć-ݏ^CW޼X߭ψ-bЭVPSyR X(XRRǬǰ,( ǘ0<Lj@ǰfǴVǴVװVǰ ^R 1!´S1xœQQPQ1(P8P?;P  1´Sc´´PԠ°(P8P ;P!¬PSS¨¬cԣS¬¨PS`S¬¨cS¨ حxœQPAQУPPa@>"PP:P1 œPPœ1SRØQxQRRPR 1øRAøRA@4bQޢPԀ QxØQPAQbPPaØPPØøRTPPà;1kTPPàl1PT1Dà14,^WǸ[RR }  ` Ig! |YUae%H 1|~(< RR`(<ݏćݏSŏISRBSϜB(SǸRcg(< RR'<^ݏćCݏ0 SŏISRB S'|~'< RRT'<ݏćݏSŏISRBSϐB$SǸRc['< RR&<Rݏć7ݏ$SŏISRB S &< RRX&<ݏćݏSŏISRBSϔBSǸRc_&|~rO&߭ݫ&SǸSЭRѣУ<Ͼ$)ݏݏ9ݏꆤ%gS< R 1Sg[ZSŏISVFR bďHSSSFRbF RbF$RbF(RbF,RbF0RbF4RbF8RbFRŏIRTD0RF ǸSDRbD@RУ,bDRУ0b < RRq <ݏćݏSŏISRBSϭBSǸRcx |~ϋ< RR1<RŏHRSSS1&ďIRB1BS0BRRݏ~ݏ< RRY1RďIRB1BBRRݏ~ݏݏjݏhWǸRS.ǸRSS'RďIRB4RbݏPCS@'RďIRB4RbݏXݏ`ݏݏpǸR-ǸRSS'RďIRB4RbݏPDCS@'RďIRB4RbݏXݏ`ǸRݢ ݏx< RR<1SďISC1CRRݏݏuǸRq,ǸRTTC4RbݏP88T@C4RbݏXݏ`RRǸR*RRݏǸR+RRݏ< RR1uSďISC1aCRRݏdݏQǸRM+ǸRTTC4RbݏP8T@C4RbݏXݏ`RR ݏSǸRЏ5wUyTT T UǸR<SSSQPǸR<RŏRSyRR R SQϯ?ϝ-ϋ1n߭ǸRݢ-A lݏćQݏ쇤>ǸRRRSЭYЩRТVS( fRR(1S2SRPRR!ǬϖA vݏć[ݏH%2ǰǰǰVVPPVǬR޲R(VbVPV,Q Vcρ1S2SRRRA4PR᳂ܳǬϘA xݏć]ݏJ'2ǰǰǰVVPPVǬR޲R(VbVPV,S Vcσ1S2SRRRC61S2SRRRݏ 1RS2SRRRﷱh缾W ;ݏ ~ݏ 1ǬЩR RR cV41@ǰǬR޲R(b, K1ЏhǰǬR޲R, Pb1nǰԭЩRТRТ ѭ < x RRǬRRЭ, L1$ǰԭЩRТRТ ѭ < x RRǬRRЭ, L1ǰǤRТǬRRЭ, L1xxD( ǰǬR޲R( b,ذ E1ax |SxR S S|Rxx |x(S2SRRǰǰǰSVW|~H%1ݏ¸SSSݏHχݏ9ݏ ^R> PP{_P :< Px*ݏw< PPݏ_ ݏ1ݏ=<ݏ)ݏ"¨1%¨Qѭ1  ѭ 1PX(P8PPE@1PQyPS S حT¨P}S ¨QPPS(PPPEQyPPQPo}S S T¨P}S ϧϿ 'ݏ ݏ9ݏꆤ<*S޼U޼TøRPP < r5&$1T PPݏ؅ ݏxGݏ `øP RRxRPPݏ腤8Rݏ#Tϭ ݏ9ݏ", T1ݏ øP PPݏ URŏHRPPP 1T8ďIRB0P`BPPݏq@ݏ YøP PPݏ;TFURďHRRRݏIݏ2. ݏAݏ2/UPďIP@ URŏHRPPP 1T=ďIRBB0P`BPPݏTݏ møP PPݏOTFURďHRRRݏIݏ:0ݏAݏ:1UPďIP@ T@URďIRBB0P`BPPݏτݏ øP PPݏ T1URďHRRRݏIݏB2GݏAݏB3-T4*UPďIP@PPݏݏ øP PPݏURŏHRQQPP T12ďIRB4P`QQݏIݏJ4wݏAݏJ5]T@URďIRBB0P`DBPPݏ" ݏ  øP PPݏ T1kURďHRRRݏIݏR6ݏAݏR7T4UPďIP@PPݏk: ݏ SøP PPݏ 5øP RRRUPďIP@,P`]TZURŏIRP@@0P`ďHRRRݏIݏZ8ݏAݏZ9 T#ݏZ ݏ søP PPݏ(U T1ݏ9ݏb-*T#'ݏ ݏ øP PPݏ0 T1UZݏ9ݏj+T@URďIRBB0P`BPPݏp? ݏ XøP PPݏ8: T1URďHRRRݏIݏr*ݏAݏr)Tݏݏ øP PPݏH&ݏ9ݏz w ﯞR¸PPP yy1b=ݏ"Ϧ ݏ  ¸P PPݏXy ݏ9ݏ(ݏ+ ݏ ¸P PPݏ`q ݏ9ݏ'JGݏ,ϰ ݏ ¸P PPݏhσ ݏ9ݏ&ݏ5 ݏ ¸P PPݏp{ ݏ9ݏ%TQݏ6Ϻ ݏ ¸P PPݏxύ ݏ9ݏ$ݏ? ݏ ¸P PPݏ ݏ9ݏ#^[ݏ@ݏ (¸P PPݏ ϗ ݏ9ݏ"ݏIݏ ¸P<PPݏ ݏ9ݏ!k ^RŒ">"\\´*´Э\l´լ߬߭W´°¬*¬Э\l¬լ߬ϖ߭#¬¨-¸~¸S\lfԌSQ<ęT޼U  )SSd ŏISRBRbU SS|U޼V޼ Td޼SŬcdcRѢ Vdгccd^ER¸\1߭ݬ=ݏćݏ쇤ЭP`Р¨`\Рՠ`¬Р\`lՠߠ%߭ϲ^R¤¤мP`¤6߭߼~L~мP ԼOŒмP`мPԠмPмPԠмP,мPмQŒ ԡ$)*P@,P RмS¤cм¤Լԗ\̤̤P`̤P:̤|^珞U޼nnVF F  ߼S NVTмPްRDқbSR$VSSPVP@QмPްPaB`PP蚭PPCT П8Q PPQPPQ P@aPP ЭS1ϔ|~|~|~߭߭ Pѭ<*ݏćݏ߭ݮdЭSSP^ R޼޼޼ n>PPPPnݮ ΐR´S\\1(\\!E!DDDm5DDDDYDD DDDq]DDDDDDIݏݏ ݏݏݏ#ݏ+ݏ3ݏ;ݏC|ݏKhݏSTݏ[@ݏc,ݏkݏ{ݏs(\\ !5I]qݏݏݏݏݏwݏc R¸S\\1I\\)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))I%)))q9))))])))))ua))))))M1ݏݏݏݏ ݏݏ|ݏ#hݏ+Tݏ3@ݏ;,ݏCݏKݏSݏ[ݏkݏcݏۂݏイݏ낤xݏdݏPݏÂ<ݏ˂(ݏӂ\ݏ\\"6J^rxݏsݏ{ݏݏݏݏn\ݏZ^ ^RЬQQR xRPPRQRiPPPRSSSP^ҬPPP^PPPPP^ЬQPPPPa^PWBLFQJNN N@N0Q ]GBfWjLnQrvv v@v  5  GBWLQ @     51 c cPÈeP@ 9 P  ` ;7123450o   / /ƈ 3   Lj8 `?    172ˆ\PmPi/ 0:  ! O G@Lj8 ULj@Ǒ@7@P@_ ; )@:‘JJO72L @ PP/P$P/0 P% @87:012 SW@KǑ B3LjPl `wv ;Pr  |7`wP?NJ@ `v ;Lj?NJ@8?82Pđ@2PPP '2,PP$&@!&@@EZ@38SE@@EZ@BES PPP ;d 9@\g‘@jg9jId4712345o  `Py?  `P   p n;ˆ          n%<ˆ %       %   7(`0 / P 0 1  I `PC 417E42""@\ PQ 5  po _`P  , 0 Po 3  n;ˆ         C! P @  n<ˆ         C! O  `P PT  n<ˆ     8     P  n<ˆ     t     P  n<ˆ          P  n<ˆ         C! L  n<ˆ     *    !C" d P P  P `PS 3  n;ˆ         C!    n<ˆ         !8"C# }  L  xI ~? = ~; ~C ~G ~9 ~M wK ~@ ~A    $| } } 8+c8w 7mlp P  P @  Ps `  7  i 7    P ooLj _ 7  P P P P P  I w9 pU  PJ AJ  _`= P1 J O `U P? PO _ V  PZ 5  P N z .  N  , džP   n;ˆ          G   H  I C! Q  >  N  -  P- N  1 1 N 2  <  N %/  N 3, EQ E>  N E- `  8 <@ca lb  { 8Lj b Lj  `P`712WPXP@@' @( @& '(7 G b Lj `P`71@(&7 @@ 2È U `P`p` J P`a*Lj 5ˆU*{Pqo J ??4Lj ˆR*Pp 0@'#P #.345; @$@#!PD E F  N PHPM4 .) P 0f P Pn@P n;ˆ          !"C# P)@@ n;ˆ         !"C# .1 (P$0"$$8@=P4yLjÑ` n<ˆ     u    !"#$ wgP}u `9@P n)<ˆ )       )C  r n&<ˆ &       &C  r n'<ˆ '    X   '  N 3  LjQ ǑLjP  LjO  +@PLjP Ǒ P 0 N .  'P5 d S  ) 5 PTPP` n;ˆ     .   C!    n<ˆ     t   !8"C# } S  N , Q P n(<ˆ (       (C   ) i P) N 0  pO /-P#ÈQ 'ÈR (ÈS ˆX %$@S#Ñ@hr b o p $s t 8q r ?8o ` 'P1 N Pu D v E w F  N PP  Pp`@@q r x {   `P`P  `Pp@ J @gP)q @r  n;ˆ     E   D  ޭ@ n;ˆ        @ D! U0 n0   n5 )@ @W"+,*)Z  0Z  n<ˆ     '    !"#$%&.P+,PnPt@z+,"WP%&PPX"$&XPPPY"*'P*)(P)"Y$&  .) . $ P  Bb   n<ˆ     /    !"#$%&.k Pim  N ~, mP  n0   o5  m 9' P:#. $@ G c P@ P BP PP P{y*   n<ˆ     H    !"#$%&.  @.  0P@  8: +9 8p 4 EPp  0 P@  9 +$@ @p8Ljˆ 4p 4 EP +  È  P8@   n<ˆ     ^    !"#$%&.) K ' P lpPL q  P P lpPM  P c lpPN q  P P c lpPO  P P c lZ0 n <ˆ     5    C! P  N p 'Pw lpPQ @ N  'P l0 n"<ˆ "       "C!  P@.* $ G PXPT  n<ˆ     &   " !"#$%   N d,  Q P n#<ˆ #       #C   'P % N R    P @PP n$<ˆ $       $C  ii.*)  Y`a n!<ˆ !    A   !C  O  ` N |}|, Q  '7o  `P ?   n;ˆ          8 Lj 7   m7P P=mP*  P=P P=7 m7P6y 4*  VpP5RJ*  PaPjPW6@PtE _2*`Px74O *`PP8@9@:@;<LjO :12*  P@‘@PC o y Jp zP p J Pxn y o0@5'F)=p3P+t 5P8 P P n?ˆ    f   + n?ˆ       *n Z z0 po "t  f n n @@(f n?ˆ       uv Z  n?ˆ    D   uw Z o PkO0t  p  `P?Ljt t @Ǒ,   /@ 9@ -@,-@-@%@0=@X  n?ˆ       uw Z  n?ˆ    6    ux Z  Pr  ">?@Ay gp @P @ ǁ8 eˆ P 7Á712"` I$I$m۶m o`P      @ ! o`P!      @1! 8 PY!8 PY!8 PY!8 PY! PK! @O!Y! PW! @! n3ˆ    u!   [  ! " # $ % & 'C( 5 PqC 5 `! p% ! @! lj"$ĉ8!P!! " "! Lj ǎ @"@"" @""P"""?P+" @/"1"P3" :=Lj $ `"-P" n3ˆ    `"   cl j! " # $ %(&('" n3ˆ    "   dm !l"j# $ % & '((()C* 5 & @" " Lj ǎ @#@#N$ @#N$P#N$?P%# @)#+#P-# :=?8 Lj $ `B$-P# n3ˆ    ]#   el j! " # $ %(&('2$P# n3ˆ    #   fl j! " # $ %(&('2$ n3ˆ    #   gm !l"j# $ % & '((()C* 5 D$ & @L$ #$É~9$712345$$Ċ @l$Ŋ È  n3ˆ    $   h l!j" # $ % & ' ( )(* +(,k-8.8/01C2# 5 $R$V$Ĉ ň q&P\%<\% n3ˆ    %   bl i! "(# $(%k&8'8( ) *C+ 5 @b%( Ph% $@n%$Lj 2731 %@s%3217 P%8 @%k& P%nj @%k&Ĉ ň t'Pk&t &k&%C, 5 k&Pk&Ĉ ň  t'Pk&t &%C- 5 k&Pk&Lj : t42""53++ n3ˆ    $&   al  ! " # $ %(& '(()*+,C- 5  &&C. 5 237')3 `p'P& n3ˆ    &   \l i! "(# $(%p'P'' n3ˆ    &   ]l i! "(# $(%p' n3ˆ    C'   ^m !l"i# $(% &('237')3 `!(P' n3ˆ    '   _l i! "(# $(%( n3ˆ    '   `m !l"i# $(% &('C( 5 w cV&X ";j.ESj.   2D^lifc07oju-@UjyU y = 1 W w  2 N X s y=PLUG NUMBERS OF DRIVES TO TEST ? H1 TEST ABORTED!/PLEASE RESTART THE TEST AND TRY AGAIN.!/BASIC SUBSYSTEM FUNCTIONAL TEST COMPETE -- ERRORS OCCURRED!!!/ENTER 1 TO 4 DRIVE PLUG NUMBERS, SEPERATED BY BLANKS OR COMMAS.!/!/*** OPERATOR ERROR!! ***!/!/!H1!/ONLY ONE (1) THROUGH FOUR (4) UNITS MAY BE SPECIFIED.DRIVE PLUG NUMBER TOO LARGE. IT MUST BE IN THE RANGE OF 0 - 255.A CHARACTER OTHER THAN A COMMA, BLANK OR DIGITS 0 - 9 IS IN THE INPUT LINE.BASIC SUBSYSTEM FUNCTIONAL TEST COMPETE -- NO ERRORS!/COULD NOT FIND DRIVE TO TEST!/!/CONTROLLER AT !OL DRIVE: !UW RUNTIME !AZ!/!H1!/!H1 ERROR !UW TEST !UW SUBTEST !UW !H1 TEST!/DUP PC !OW CONTROLLER AT !OL !H4 RUNTIME !AZ!/!H1!/DRIVE: !UWSYSTEM FATALDEVICE FATALHARDSOFTBUS ADDRESSINGDRIVE RESIDENT DIAGNOSTICDRIVE FUNCTIONALATTN ASSERTED DURING SEEK!/SEEK TO GRP !UB CYL !UL!/!H1REAL TIME STATE: !XW!/STATUS (R TO L): !XW !XW !XW !XW !XW !XW !XW!/SEEK DID NOT COMPLETE, NEITHER ATTN OR R/W RDY WAS ASSERTED!/BEFORE TIMEOUT!/SEEK TO GRP !UB CYL !UL!/!H1ERRORS DURING DRIVE INITIALIZATION AND SETUP!/THIS CONTROLLER AND ALL DRIVES ATTACHED WILL BE REMOVED FROM TESTING!/NO CLOCKS FROM DRIVE!/STATE PARITY ERRORS FROM DRIVE!/HARD PARITY OR PULSE ERROR FOR 1/2 A SECOND!/DRIVE NOT FORMATTED IN 512 BYTE MODE -- UNABLE TO TEST!/FCT BLOCK ZERO MODE WORD: !OW!H1COULD NOT READ FCT BLOCK ZERO!H1!/!/*** THIS PACK HAS AN INVALID FORMAT AND CANNOT BE USED ***!/UNABLE TO CONTINUE TESTING!/!H1!H1RUN/STOP SWITCH OUT!/SPINDLE NOT UP TO SPEED!/PORT SWITCH OUT!/PARITY ERRORS FOR MORE THAN A HALF SECOND!/OPERATOR ERROR IN ANSWERING MANUAL INTERVENTION QUESTIONS FOR THIS UNIT!/TIMEOUT OF SEND!/!H1!H1TIMEOUT OF RECEIVE!/!H1!H1FIRST WORD RECEIVED WAS NOT START FRAME!/!H1!H1FRAMING ERROR ON LEVEL 0 RECEIVE!/!H1!H1CHECKSUM ERROR ON LEVEL 0 RECEIVE!/!H1!H1BUFFER SIZE SMALLER THAN LEVEL 2 RESPONSE!/!H1!H1RESPONSE OF LEVEL 2 CMD NOT AS EXPECTED!/!H1EXPECTED RESPONSE !XB!/RESPONSE RECEIVED !XB!/!H1DRIVE NEVER DEASSERTED RECEIVER READY AFTER LEVEL 2 SEND!/!H1!H1UNKNOWN ERROR CODE RETURNED FROM LEVEL 2 RECEIVE!/!H1ERROR CODE RETURNED !OW!/!H1UNABLE TO VERIFY POSITION!/LAST HEADER ATTEMPTED !H1BN !UL!/TRK !UB GRP !UB CYL !UL!/UNABLE TO READ VALID DATA ON TRACK!/LAST BLOCK ATTEMPTED !H1BN !UL!/TRK !UB GRP !UB CYL !UL!/UNABLE TO FORMAT TRACK!/TRK !UB GRP !UB CYL !UL IN !H1BN AREA!/UNIT ACCEPTED ILLEGAL LEVEL 1 COMMAND!/!H1!H1SDI LEVEL 1 SEND ERROR!/!H1UNIT ACCEPTED ILLEGAL LEVEL 2 COMMAND!/!H1!H1WRITE SUCCEEDED ON WRITE PROTECTED UNIT!/!H1AVAILABLE NOT ASSERTED AFTER SDI DISCONNECT COMMAND!/!H1SDI LEVEL 1 RECEIVE TIMEOUT DURING DATA ECHO!/!H1DATA COMPARE ERROR DURING DATA ECHO!/ERROR IN DRIVE STATUS AFTER DIAGNOSE PERFORMED!/!H1SDI LEVEL 1 SEND TIMEOUT DURING DATA ECHO!/!H1INVALID GROUP NUMBER IN SELECT GROUP FRAME!/CONTINUE OR END FRAME DID NOT FOLLOW START FRAME!/END FRAME SENT WITHOUT START FRAME!/END FRAME CONTAINING BAD CHECKSUM SENT!/CONTINUE FRAME SENT WITHOUT START FRAME!/INVALID COMMAND OPCODE SENT!/INVALID COMMAND LENGTH USED!/ATTEMPTING TO DISCONNECT!/ATTEMPTING DIAGNOSE COMMAND!/ATTEMPTING TO GET STATUS!/ATTEMPTING DRIVE CLEAR CMD!/ATTEMPTING TO BRING DRIVE ONLINE!/ATTEMPTING TO CHANGE MODE!/ATTEMPTING TO GET SUBUNIT CHAR!/ATTEMPTING TO SPIN UP DRIVE!/ATTEMPTING TO RECALIBRATE!/ATTEMPTING TO GET COMMON CHAR!/ATTEMPTING TO ISSUE SEEK!/UNABLE TO FIND REQUESTED DRIVE FOR TESTING!/THE FOLLOWING IS VISIBLE ON THE PORTS!/CONTROLLER PORT 0 -- !H1CONTROLLER PORT 1 -- !H1CONTROLLER PORT 2 -- !H1CONTROLLER PORT 3 -- !H1UNABLE TO TEST MULTIPLE SUBUNIT DEVICE!/THE FOLLOWING IS VISIBLE ON THE PORTS!/CONTROLLER PORT 0 -- !H1CONTROLLER PORT 1 -- !H1CONTROLLER PORT 2 -- !H1CONTROLLER PORT 3 -- !H1NO DRIVE ATTACHED!/RCVR RDY NEVER ASSERTED!/TIMEOUT OF SEND!/TIMEOUT OF RECEIVE!/FIRST WORD RECEIVED WAS NOT START FRAME!/FRAMING ERROR ON LEVEL 0 RECEIVE!/CHECKSUM ERROR ON LEVEL 0 RECEIVE!/RESPONSE LONGER THAN EXPECTED FOR GET STATUS CMD!/DRIVE !H1!UW, !UW, !UW, !UW!/DRIVE NOT AVAILABLE TO THIS CONTROLLER!/UNSPINABLE DRIVE !H1REVECTORED TO RBN !UL!/TRACKGROUPLXDRCT LDIAGNOSTIC INTERNAL ERROR DETECTED!/PARAMETERS PASSED TO DIAGNOSTIC FROM HOST ARE INCORRECT!/!/EITHER AT LEAST ONE WORD IS NOT WRITEABLE AND READABLE OR!/THE HOST WRITEABLE OR READABLE AREA DOES NOT BEGIN OR END!/ON AN WORD BOUNDARY!/WRITEABLE AREA:!/ START!19 !XL (HEX)!/ END!21 !XL (HEX)!/READABLE AREA:!/ START!19 !XL (HEX)!/ END!21 !XL (HEX)!/NON-EXISTENT MEMORY ERROR DURING ONE-WORD READ FROM HOST MEMORY!/!H1!H1PARITY ERROR DURING ONE-WORD READ FROM HOST MEMORY!/!H1!H1DIAGNOSTIC INTERNAL ERROR DETECTED!/UNKNOWN ERROR CODE RETURNED FROM CONTROLLER DURING ONE-WORD READ!/FROM HOST MEMORY!/!H1!H1!H1NON-EXISTENT MEMORY ERROR DURING ONE-WORD WRITE TO HOST MEMORY!/!H1!H1DIAGNOSTIC INTERNAL ERROR DETECTED!/UNKNOWN ERROR CODE RETURNED FROM CONTROLLER DURING ONE-WORD WRITE!/TO HOST MEMORY!/!H1!H1!H1HOST MEMORY ADDRESSING ERROR. TWO ADDRESSES ACCESS THE SAME LOCATION!/!H1KNOWN GOOD ADDRESS!07 !OL!08 !XL!/TEST ADDRESS!13 !OL!08 !XL!/ADDRESS BIT IN ERROR!05 !OL!08 !XL!/HOST MEMORY ADDRESSING ERROR - LOCATION READ SHOULD CONTAIN!/THE LOW 16 BITS OF ITS ADDRESS!/!H1!H1!H1NON-EXISTENT MEMORY ERROR DURING LARGE-BUFFER WRITE TO HOST MEMORY!/!H1!H1DIAGNOSTIC INTERNAL ERROR DETECTED!/UNKNOWN ERROR CODE RETURNED FROM CONTROLLER DURING LARGE-BUFFER WRITE!/TO HOST MEMORY!/!H1!H1!H1NON-EXISTENT MEMORY ERROR DURING LARGE-BUFFER READ FROM HOST MEMORY!/!H1!H1PARITY ERROR DURING LARGE-BUFFER READ FROM HOST MEMORY!/!H1!H1DIAGNOSTIC INTERNAL ERROR DETECTED!/UNKNOWN ERROR CODE RETURNED FROM CONTROLLER DURING LARGE-BUFFER READ!/FROM HOST MEMORY!/!H1!H1!H1DATA COMPARE FAILED AFTER LARGE-BUFFER WRITE THEN READ FROM HOST MEMORY!/CURRENT DATA PATTERN: !UW!/!H1!H1ADDRESS OF ERROR!09 !OL!08 !XL!/!H1ADDRESS!18 !OL!08 !XL!/BUFFER STARTING ADDRESS !OL!08 !XL!/BUFFER SIZE IN BYTES!10 !OW!12 !XW!/DATA READ!21 !OW!12 !XW!/DATA EXPECTED!17 !OW!12 !XW!/!31 OCTAL!13 HEX!/ERROR CODE RETURNED FROM CONTROLLER: !UW (DECIMAL)!/THIS DISK HAS BEEN RECONSTRUCTED!/AND THEREFORE HAS A NULL FCT!/WRITE PROTECT BUTTON ON DRIVE IS IN!/UNABLE TO PERFORM ANY TESTS WHICH REQUIRE WRITING THE DISK!/KRAFMT S;F< M=X?FAFBFDFkFoFpFrF  yiE@`AL%L4*z7W=rGmD`.w[+IIK6n\#J2;h^eTm۶m0y m51Y@aa%15a]@a%73_Pg`  7125ZPe*@ @eg]71a@YP$Y@35 ~FE , 5G Pzzz‘„>EPz - PM  PU - P] - kf - Pv ~ ~ G34ˆ `P_ˆ `}PP GP0ƈ~p~pˆ  ` P   PP G 3/34_ˆ `~p(Ĉˆ `$P( G3# ~3' ~37ˆ + ~È PdPfP]sPXG ~s  ?^3 ~37 ~134" ``m PPˆ  ``m P Gq 'P  ~  GÈ31 '  3 3q '  ~P%`# `P`P`PPZy3  wa`q3 ~245È4#@{Pp3 P5`P QcX` xlmn m =P Q G2`  Ž     `MÑ(ˆ `P(;p*7135F  AP`0DRIVE ERROR ENCOUNTERED - STATUS RESPONSE: STATUS (R TO L): LAST BLOCK ACCESSED (16-BIT OCTAL): 71235/b9 P  S1  q  @ @071235  1 ‘ /P 0 W Enter date  Enter unit number to format <0>:  Format in 576 mode ? * Use existing bad block information : Q Use Down-line load : ? Continue if bad block information is inaccesable : *Enter a non-zero serial number: 0Format begun Version 13@0Input Error 'd<<|q|x|x||x|x >  p 2` )` 43P5 & 2`( Š )P- P `0  # PN 20 yt w  - /  S  Qg 7 r P ;3 P Pg p 35P 127S ƈ  p p lp  p \P !p P  2 r P 8 2' ' p' 2 r P; PC PC PC PC O 82  d pd a Š  b 4  < `  / 0 9 p NJ @ @ @ @   7Lj Ǒ8    G @  G 8 NJ@ @ Š@ Ê@   G7y   z% YP' % 2Š  = 2M  PM P `PY   4  È ˆ 0y 0y uu #@  P| @ @@ @ <e<bK  4  b0 Js@ rP   X    ` P6 8     `    `X    ` P}    y`zX    ` # #È `    `X     Ñ r `     `       ` `ZˆbUˆ_ˆ`ˆaP ˆc     `MÑ     0 E @  X p <    ` X<     MÑX       r Ž`    È   ?     Ĉ  M~MP~ P 8     `MP P X  Ñ X8888 M:} ˆ  Ps ˆ ` ~ps  _`( }~}ps  }Fps P: g ÑS S S 9ps È Pc >Cˆ  }0  G  M  Gˆ         O PC ÈÎÊgg O ÈÎÊg g g X ÑlP} |  -;;z   } n $ nl ? `y``zXpppoolmonm =p Xqx' Ĉ È Lj xˆ` ~p   =  V x yzqP opP l`r lP  ˆ G7 }-Ñ          7Pk ijjkt ijjk ˆ  `ˆh  P `P Lj8P 8 P 8 P 8P Lj8 P 8 P 8 P 8P LjP ]` P whP iPv   4Ìn ˆ  `ˆx {ˆ`Pz Lj8Pz 8 Pz 8 Pz 8Pz Lj8 Pz 8 Pz 8 Pz 8Pz Èi  pz bPz  k ~   = g jP kjP  Ĉ È Lj xˆ` ~p   = W 0 ` 0MORE THAN 12.5% OF TRACK IS BADhň @ÈŌp  Ŏ(! ! - ÂxŊŌ; 0= Ŏ= ŌPE (hP 'hP# ! # ZÈyÈzn yP7 zhP# X ‘q oq   o  0d Z     cĈ P hˆQvP wP }P }P   ČP vP whP{ Ĉ È# ]@] @ cc     y `vw    y `vw712345 }-=  Xlmmr y* Xpoolmon PT mW m =p2 Xqx Ĉ È Lj xˆ` ~p-   =k p  8  @    xX P  yz tuqPg opPA lr `r ĈlP5 ĈmP5 È @   GÈĈg#!  6 ˆ GPL ijjkU ijjk ˆ  `ˆh  P `P Lj8P 8 P 8 P 8P Lj8 P 8 P 8 P 8P LjP ]` P whPa iPW  \ 4 ` \ ˆ  `ˆÂx{ˆ`PZ Lj8PZ 8 PZ 8 PZ 8PZ Lj8 PZ 8 PZ 8 PZ 8PZ ÈM  pl bPl ]`P l ~g   =  @Pu  ` P( P"X Lj`P *Lj k    3 g P  0Zň@P PP 0v @P3 V P 0vÈ G 0vgV jP kj P  lb w y _ˆ`Èa  P  ˆf ˆd Z`  *Ĉ È Lj xˆ` ~p-  on = 8 0 ` 0MORE THAN 12.5% OF TRACK IS BADhň @ÈŌp   Ŏ(, `, 8 ÂxŊŌF 0H ŎH ŌPP (hP 8 P Èa ÈehZ , Ĉe 0 ĈcZÈyÈzyPK z@P[ P[ ÈhP3 5XhlZˆPn | ˆf~ ˆdlÈtÈu`tP uhP hX  ‘ o   o  0      cĈ vw P ˆQvP wP |P `P | @P! | 0i @P4X Lj`PJ Lj k e g  vP| 0 ČP vP w|P hP  Z Ĉ È# ]@] @ cc P 54Ĉx4- |- xlmon =P ˆ G*X . `y`z Z `tu` }       PL N        y z   P   yz `X   ]     `Zˆb_ˆ`Èa  P Èe{ W,}~z}yQXÈb P5 ZPC PP  È kÈy 3 =kPH NOMM '(}P [ ] P  ky z   ˆxÈyÈzÈ Ĉ ˆ  `` ~   = Èp  b y P ŌV PD P8 `}}P& ~}y~z}P3 }Pb MÑ PM  G    g        gV Èx3È3È3y xˆxP4   cc{  - ?È ˆxP @k  >   cc{  -  ?,Sc0 PP P SkÎ  SkÎ  >   cc{  -  ?,ScÎ0 > xP& mlx@P on  m =p4 X     Y Y` (X PN P Q ?Lj k p r ˆxcÊÈ Ĉ ˆ  `ˆ` ~   = Èp  b  PC Ō È   `  G2È P @ , *p P {È{c   -  ÈP/ {  G712345-ĈXQ P- /  cÊ?x {ˆ  `ˆ`P m  P ?Lj k ~   ~   =O Èp  bO Ō  3    ˆx?cÊÈ Ĉ ˆ  `ˆ` ~   = Èp  b   G^ p* X     Y Y` È PK @m y *pR P9 {È{c   - 6 ÈP{ {X  G Èx3È3È3r c3    y  Èo   Ĉh`vw$ ÈzP y 0E y cc{  - ?È ) @ hÈykÈzÎ V ˆÈ PV PP }~ }~V SS  cc{  -  4 ?,Sc0C `PE Èzzy cc{  - ?Ĉ %P @C @k  cc{  -  4 ?,Sc0 ˆÈ P P }~ }~ SSC 4 ?,ySc0C ÈykÈzÎ C È c hP^    Ĉ` o  - mlxon  m =t  ZZ P (XQ P  ?Lj k   ˆxcÊÈ Ĉ ˆ  `ˆ`6 ~%   = Èp5 / b  P Ō\ ÈZ  L  GÈP P Èx3È3È3    y y{z|}XQ Pe g (y Lj k   ˆxÈyÈzÊÈ Ĉ ˆ  `ˆ` ~   = Èp  b y Pw Ō[ P   p  ` }P P @P- {P |{y|z}}I `}Pt mlxon E m =PQ @'  GÈ Pm ZÈQÈÈ ÈÈÊÈx ˆ { ``Pk a  Pk ˆ k ~x   =C Èp  bC Ō      ˆxÈÈÈÊÈ Ĉ ˆ  `` ~   = Èp  b       G)È kÈ 3 =kP/ NOMM- 'ˆ GD-  -{ޭ* qx* P P - ; = PD {- PS -P` -   { -  +Ĉ,  0  0{  |-9 0 |P  P     G€!Èv{q @}tu{hĈ{ y ?0PL k0ÈtÈu}vo È}a tPR uhP+ {{P" j @}L @}q 6  z w`0Format completed @FCT used successfully @FCT was not used0WARNING - possible head addressing problem - run diagnostics 0 Revectored LBNS 0 Primary revectored LBNS 0 Secondary/tertiary revectored LBNS  0 Bad RBNS 0 Bad blocks in the RCT area due to data errors, 0 Bad blocks in the DBN area due to data errorsJ 0 Bad blocks in the XBN area due to data errorsh 0 Blocks retried on the check pass ` { ˆŽˆˆˆˆˆ ˆw{ ' 2`P  ` `52 *P 7234     Z0P  Ǒ/aP  Ǒ /712345} `P X P/ 1 Q Lj k Q S ˆxcÊ È Ĉ ˆ  `ˆ`    =m Ĉ}@}P QcX` xlmn   m =P Q GZˆc   XQ P   ˆxZcÊ`È Ĉ ˆ  `ˆ`b ~R   =4 Èpb \ b4 Ĉ @ P Q712345XQ P    cÊ?x {ˆ  `ˆ`P   P ?Lj k  " " ~   = Èp  b Ō   ~   ˆx?cÊÈ Ĉ ˆ  `ˆ`x ~h   =J Èpx r bJ "  GM6    P+ ޭ. qx ~z}yXQYRU( y z   8 ÂxyÈzˆ  ``P   P  k ~   =o Èp  bo  y PM P `}P ~}y~zPJ ˆ Gy y{z|}(X P  Qy 8 ˆxÈyÈzʈ { `ˆ`P| g  P| Lj k x  |  ~   =I Èp  bI  y P `}{P |{y|z}P ˆ} Gg}~xXppoXqxhlmon =p È}È~ÊÂxˆ  ``k PL  }PU ~hP LjxÈÈÈoÈx8xgx    }~hqP `oXqxpP g/ oxXll    h}~P lmon =p È}È~ÊÂxˆ  ``( P  }P ~hP l1 gP `/ QcX` xlmn ` ` m =Pg Q G݀11r ˆ kQRU ÂxcÊÈ Ĉ ˆ  ``d  =PL p  + Ō|  Gywv 0V   0> v  v  w v  w X Pc e L#p    v  P     v `w v P      Xwvywzv a12P 2 Y1XY aP 9 XY Y9 X   ‘9 b e*Šp# bY aY2 zD W`PGET STATUS failurePSDI send errorPUnsuccessful SDI commandPSDI receive errorPUNIBUS I/O errorPFormatter initialization errorPNon-existant unit numberPDBN/XBN format error (FORMAT XFC failed) PFCT check error PSEEK error PRCT check error PLBN format error (FORMAT XFC failed) PFCT write errorPRCT read errorPRCT write errorPRCT fullPFCT read errorPFCT non-existantPFCT Down Line Load error (FCT block not avbl.)PDrive init timeoutPInvalid response to questionPDrive does not support 576 format on this mediaPFCT corrupted - Format Invalid % . < F P a o       3 0@@@h`hp@ 08PXx`0( < @ PASCALMSCMDMSHARE DPASCALIODAP DIAG$KDA50Q$CODE$DATA KDA50Q4 'Y CONFIGUREY  oSERVICE_SET_UP wCLEAN_UP &J TEST_FV_1 {(X TEST_FV_2X T TEST_FV_3T R9 TEST_FV_4 j TEST_EV_1  TEST_FS_1  TEST_ES_1   UTILITY_1$  UTILITY_2 YB UTILITY_4B 'Y CONTROL_LOOPk NX!WAIT_FOR_RESPONSEX!! g!FUNCTIONAL_TEST! 5/'EXERCISE_DRIVES' !],GENERIC_DUP_DRIVER,~ 3/INITIALIZE_CONTROLLER/ & o6 CSR_EXISTSo6 .6BUILD_MSCP_CMD6 T8GE: BUILD_DUP_CMDE:i m;BUILD_MAINT_CMD;$ 4< SEND_MESSAGE4<L ;o=SERVICE_RESPONSEo=; M>MSCP_RSP_HANDLERM> _Z~kLNDUP_RSP_HANDLERN  7WMAINT_RSP_HANDLERWJ XCHECK_CONTROLLERXT J!ZCHECK_MSCP_STATUSZ !l{IcCHECK_DUP_STATUSIc " RgDISABLE_CONTROLLERRg= #4hGET_DRIVE_TABLE4h #AuhGET_COMMAND_ENVuh #;hRETURN_COMMAND_ENVh+ #UiBUILD_COMMAND_ENVUi9 ;$jRELEASE_CMD_ENVj $$jDEALLOCATE_CMD_ENV$j $-Qj PATTERN_BUILDQj$ $j GET_IO_BUFFERj( $qkRELEASE_IO_BUFFERqk% '%TkDEALLOCATE_IO_BUFFERk W%z?lGET_LBN?l {%Dl PRINT_SUMMARYl, %mDECODE_MSCP_ENDCODEmP %IoDECODE_DUP_ENDCODEIo( *&oGET_DMA_ADDRESSo! m&pRETURN_DMA_ADDRESSp &>*q COMMAND_DUMP*qh &4^s RESPONSE_DUMP^s :'U >7##O#DISK$USER2:[MDM.KDA108]NAKDAA.PAS;5LE6lO1DISK$USER2:[MDM.KITS.NEXT_RELEASE]DSLIBRARY.PAS;6>7|Ox#DISK$USER2:[MDM.KDA108]NAKDAA.PIN;2   )      NAKD_LIBgw init_randomvw get_random6wand_longwand_bytew bit_clearw comp_word_f w comp_word_p F gw DM_PROG_BASICSz . BLANK .d DM_PROG_RAFMT . BLANK ._ C$RAND yRAND #ySRAND0RANDXy$CODE*^ЬRݬ@Pbݬ@^R2PRPЬlP֬lެQB`R2aPRP攼l^O@ԭ߭옏~?ݭ<߭옏~?ݭ<߭ݏA?ݭ<߭ݏI?ݭZ<߭ݏQ h?ݭ4<߭ݏY#B?ݭ<߭ݏa:?ݭ;߭옏~>ݭ;߭ݏ>ݭ;߭ݏɁ2>ݭx;߭ݏف_>ݭR;߭ݏ1`>ݭ,;߭ݏS:>ݭ;߭ݏ >P^TS|߭=ѭ߭ݏ<= S߭ݏ=ݭ:߭ݏ=ݭh:߭ݏ!|=ݭL:߭ݏ)`=ݭ0:߭ݏ1D=ݭ:ߤR߭2R~=ѭS=RS1߭<ѭS߭<ѭS߭<ѭS\\S߭<ѭS߭j<ѭS߭W<ѭSS߭$S߭8S߭:߭S߭ <߭<߭;^߭08^|ԭ߭߭ %߭ݏ;߭Sݭ; ^|߭ խ%߭ݏ;߭ݭ; ^|߭ խ%߭ݏR;߭ݭG; ^|߭ խ%߭ݏ;߭ݭ ; ^ԭ\ԭ߭9 \߭ \߭u \߭g \߭Y \$߭ݏ:߭!\: ^ԭ\߭w:߭ݏ]:߭ݏO:߭5:߭?:߭ \խ߭ݏ:\$߭ݏ9߭\9 ^|߭~z խ7߭ݏ9߭Fݭ9߭ݏӁ9 ^|߭~' խ7߭ݏl9߭ݭa9߭ݏӁC9< ^ \$d ݏじ9 ݏ끘8 ݏ8 8 ݏ8 ݏ8 8 ݏ 8$$\$ ݏs8$~ $ ݏI8 ݏ#48 18 ݏ+8 7*h^(fn R*y*YRRR1 ^|߭7߭ݏC7߭ݏK7߭ݏS}7߭ݏ[k7߭ݏcY7߭ݏkG7߭E7߭ݏ1խ%߭ݏ7߭ݭ7 ^|߭6߭ݏÂ6߭ݏ˂6߭ݏӂ6߭ݏۂ6߭ݏ゘6߭6߭ݏz6߭+խ%߭ݏ]6߭ݭR6^8[EWNUT8ZYX|ЬRR+2bݏݏ51J /  b11 0  b1&i5Rݏݏ2P1''&&#5Rݏݏ1P1RBjBeRSQSRQRPAd@eQ Se' `(  ߭kg ЬR bb1)gS h1  1PRxRRPRVVRBci1VRBc1QխgPA`A(QQRVSRSP@(B(RQQPAd@(Q6SVPˏPRSRR67SxPRSRRR7ݏ肘3ݭ3 ݭ(p 1ЬR bb+1ݏ31ݏ31 / ݏݏd3ЬR b - b^'S`VWUX|ЬRRE/b߭ݏݏ21߭,խb1߭.խb1߭2Rݏݏݭ9/P1P߭L2Rݏݏݭ.P1TRTQRQPBe@fR Tfc%߭:c%ЬZj߭gխj1  Q   PP(PPPPSݏ1ݏ ?V ߭ݏ# PPPxPQ PPQ,SRRT~ݏY~1 1   RR+RRRRݬ~ݏ Z~F1T~ݏ[~*߭ݏ0߭ R RRn߭ݏ8T߭QR RR=߭ݏ@#߭ RRR~ UUSkT޼RCdEbUn<,~ ߭<FnPP^[>Z|nԼUTЬ STS TTS߭4ЬSSݏݏڀ\~ݭP1x߭Sݬݏ]~ݭP1I߭Sݏݏ^~ݭP1 ݬ ݬRbR |~R <~kRb|~kR ߭,c߭sc߭%Sݏݏ_~ݭP1YRR,߭Sݬݏ`~ݭP1"߭ЬVVݏݏڀa~ݭfP1߭Vݏݏb~ݭ4P1RR3߭^(nݏnVݏݏ‘c~߭ݬݏݏd~ݭP1GRR-߭ݬݬݏe~ݭP1߭ЬVVݏݏڀf~ݭSP1߭vVݏݏg~ݭ!P1RR3߭^(nݏ[Vݏݏ‘h~߭ݬݏݏi~ݭP1*߭ݏx߭jݬ S 1 RR1߭ݏ߭jR RЬSSݬݏn~ݭP1߭Sݏݏo~ݭP1ݬ ݬkRb kR |~kR  <~iRb# iR |~iR  ߭Y c߭ c߭RSݏݏp~ݭ P1RR RR,߭SݬݏҀq~ݭ P1߭ݬݏݏڀr~ݭ P1߭ݬݏݏs~ݭX P1uRRRR4߭^(nݏݬݏݏ‘t~ ߭ݬݏݏu~ݭ P1kS 1 RR.߭ݏ ߭jkR Rѭb^ԭѬ߭ݬݬ ݬDּPP^ ^ԭ߭߭ݭ߭ݭݏx߭߭ݭ߭ݭݏ߭߭ݭ߭ݭݏ߭߭mݭU߭ݭݏ߭߭Aݭ)߭ݭݏT߭߭ݭ߭ݭݏ(߭߭ݭ߭ݭݏ߭߭ݭ߭ݭݏ^ԭR߭ЬP<`~ݏ(R^ЬRSЬTCd~R!R-SЬP~RRb^TTPxPQʏQЬR֬Q  QSAS0QSSbTPPQQ  QRAR0QRR ^SЬRCb~ݏ8SЬR~ݏ ^^ԭ߭ݬ@@(@ 8HP`0( hxB @ PASCALMSCMDMSHARECMSC NAXQAD ctop$ $ptoc. Rmainq configure |clean_up test_fv_1L test_fv_2= test_fv_3=R test_fv_4= test_ev_1z service_setup test_fs_1S test_es_1SJ utility_1} utility_2 utility_3Gloopback_server>test_remote_loopbackA test_fuse` test_setuptest_internal_loopbackx&7test_internal_extended_loopback4test_external_loopbackC get_server~setup_test_setup_buff& print_buff[Bget_station_addressJcheck_station_address(only_send_one_packetronly_get_one_packetl!clear_receive_buff,2$add_forwarding_address7i$add_reply_message?$request_assistant(*send_one_loopback_packet1send_one_packetR7setup_setup_buff8send_setup_packet;setup_receive_bdls<setup_transmit_bdl <=setup_receive_bdl_address!=setup_transmit_bdl_addressD>enable_interrupts+?disable_interrupts?allocate_buffers@ master_clearh#A fatal_error+NAcheck_fatal_exitTAprint_all_regsiB print_bdl+Bconvert_station_address= %Ctohex[Cprint_station_address6C assign_rec C sleep_awhilez _  y6  z   y 0DX0205(^/ GGSKMTKAVAXELN V2.0-00 X04-00 ,/ . ?"! PASCALMSC_001! MDMSHARE_001REV FW=DIAGL2DUPTSTTK50^R\°ݏ1\KXj\°ݏ9\-X \°ݏA\X\°ݏI\WY \°ݏQ\W#\°ݏY\Wu\°ݏa\W \°ݏi\yWϤ\°ݏq \[Wg\°ݏy \=W\°ݏ \W!!\°ݏ\Wϯ&\°ݏ\VU<\°~\VeA\°~\VA\°~\V߭ݏ |VPRЏ\¨\&V'¨|~|~ݏ8 B\¨\U N¨|~|~ݏ@ ϏBI\ЏP̜PU'̜dC2QyP߬d NѬd|~|~ݏݏ0 BP̨PU0ųBϣE RЏ\œ\T'œϣB2QyPߢd NѢd|~|~ݏݏ0 CA\¨\^T0u¨/BD @\œ\S@œAS¨SSP¨ϚA-1P \\\\ `|~|~ݏݏ @C”ߢL(ݢ`$Sp”@L\\¸¸\\\œ\R8œϤ@S¨SR_¨l@/P \\\\ |~|~ݏݏ >ϫB¸\\\œ\QœϮ?¼S¨SQ¨v? /P¼\\¼\\ |~|~ݏݏ =ϵA(”Q"”>2QyP߬d NѬd|~|~ݏݏ0 =R̨R P0ų=Ϥ@ R̜RO@̜Ϛ=R̨ROP̨b=,PP5PP*P! PPP PP1o`|~|~ݏ(ݏ Ϯ;SUR4S¨S5F¨4ϙ#P |~|~ݏX ϑ2\œ\Eœy3\¨\}E"¨N3¼S¨SEEq¨3ϩ"P¼\\¼\\ |~|~ݏݏ ϋ1U5 (S<\><\8\0 \\& \\ \\\ \\|~|~ݏP 1(”8D0”2 SЏ|~|~|~#|~ '(R\ \\  \\|~|~ݏ` 0(R \\\ \\|~|~ݏ` G0|~|~|~τ&RЏ”ߢL$ݢ`<~BC'” 1QQQP$\>@\?l$\>@\?lQ$”B N”Ϛ0=RTЏ  |~|~|~q" ϛTT ϦSѣTA \\4<\.\\#\\\\ \\1ѣTЏh \\Џp<\Џx ]?P\\ \\\\ \\ЏЅ'ݢݢݢ ݢݢ _.-TTϾ\ ϛSѣT \\ <\\eѣTЏh \\Џp<\\Џx N|~ݢ ݢݢ Ͼ-I- |~|~|~#\TVЏ  ϊ ϴVV ϿSѣV RR<RnѣVЏh RRЏp<RЏx Ϥ=P'|~ݤݤ ݤݤ ,g, NRRR|~|~ݏ ϝ,VgVϪR<R RĨSѣV? RR2<R,RR!RRRR RR1ѣVЏh RRЏp<RЏx ϖP߭Pݏ腥* R^HR\fpz1Џ2\1Џʀ\vЏҀ\lЏڀ\bЏ‥\XЏꀥ\NЏ\DЏ\:Џ\0Џ \&Џ\Џ\Џ"\Џ*\S ЏXS Џ!XSЏ)X<^qR޼n޼U޼ TTPœP't'Tœπ2QyPߢdNѢd|~|~ݏݏ0T P¨P;'uT¨ UTϿUPPUPP @PœP&TœϩS¨S&T¨qP PPPP |~|~ݏݏT UTϰLPP¸¸PPPœP%TœϩS¨S%8T¨qP PPPP _|~|~ݏݏT Tϰ¸PPPœP$Tœϳ¼S¨S$T¨{P¼PP¼PP $|~|~ݏݏT UTϺn¾¾¾¾¾PœP#4Tœϴ ”KvS” ѮL”НS” ”S” ѮL ”S”Ϛ ”S”t Ѯ& ”{:S”H nL”P aS” ”*0S”ѮL”@S””PS”ϥѮL”`S”y”p$S”S|^\̰ݏg̰ݏ!T`R̜R̜12SyR߬dѬd1R̨R̨1 RR1 RR1sRR1dRR1URR1F RR17 RR1) RR1RR1 RR1 @R̜R̜1R̨R̨1IP RRRR 1?R13RR1$RR1R1 R1 RR1 RR1 RR1RR1RR1̔߬L(ݬ`̔1LRR̸̸RRR̜R̜1ZR̨Rx̨1/P RRRR 1RR1R1 RR1 RR1 RR1RR1RR1~̸RRR̜R̜1L̼R̨Rj̨1!P̼RR̼RR 1̼RR1 ̼RR1 ̼RR1 ̼RR1̼RR1(̔̔t̼QޭP SRr( jRRRRh(R̼RR̼RR̤hf̠hSʸ\̬̌ݏŤQ̬̌ݏ4̬̌ݏ̬̌̌ݏ̬̌̌ݏ̬̌ݏÀ̘ RЏ"¨1C~ϽϓSѣC \\<\qѣCЏh \\Џp<\Џx pP)|~ݢݢ ݢݢ Ϩ4\œ\Pœτ¨^޼T޼S߭ݏ8R߭Bݏ腥R߭ݏ@R߭Bݏ腥hR ^︶R޼Y޼޼ n޼X޼V޼W޼U޼ S޼$TݮY ߭ݏ߭ݢXݢ\߭ݏX߭XV߭VW߭WU߭US߭ST߭TnY ||Ԣb^߭ݏHW߭=^S޼T޼nT1T-m7v[dRI@1ЏR1ЏR|ЏȂRsЏЂRjЏ؂RaЏRXЏ肥ROЏRFЏR=ЏR4ЏR+ЏR"ЏRЏ RЏ(RЏRЏh |~|~Rݏ0ݮ ^S T\\$LU^gpyHЏRFЏЃR=Џ胥R4ЏȃR+ЏR"Џ؃RЏRЏRЏR\\<ENW`ir{HЏp\FЏx\=Џ\4Џ\+Џ\"Џ\Џ\Џ\Џ\߭R߭\ P\\ m\߭\ݏ  \߭\ݏ \ \߭\ݏЏPT5ЏXT,ЏhT#ЏhTЏ`TU UЏhTTP@@@h(p 08HPX`0( \ @ PASCALMSCMDMSHARE DIAG$TK50$CODE$DATA, TK50= j  TEST_1   TEST_2( I p TEST_3p  (  TEST_4   :t TEST_5  TEST_6  Vp PTEST_7P)  TEST_86 )  TEST_9L TEST_10~ G  2#TEST_112#  U `(TEST_12(~ ~$>.TEST_13>. \ RB3 PRINT_L2_INFO36 g4PRINT_SA4 +4 DUMP_REC_BUFF42 5TEST_FRU_NUMBER5 6 DO_UQ_INIT6 ' :START_AND_WAIT:4 `<EVENT_DURATION< >VW< PREP_DUP_ELPW< V[< PREP_DUP_GDS<" Q= PREP_DUP_RD=! `c= PREP_DUP_SDc=! _= PREP_DUP_ABO= K >SET_UP_DESCRIPTORS > /BO> GET_MEMORYO> \:ARELEASE_MEMORYA~ \yD CONFIGURED  ; , .ISET_UP.I" ICLEAN_UPI3 ' J PRINT_PAKJ th=K ERROR_HANDLER=K# 2L DROP_UNIT2L "TL CHECK_STATUSTL" RM DECODE_TMSCPRM1 OCHECK_SAO 2  J TRAISET "U DECODE_ERU: 7[DECODE_DUP_STATUS[ t81`tDISK$DIAG1:[WORK]NATKAC.PAS;16/@'i$DISK1:[MDM]DSLIBRARY.PAS;781' \ DISK$DIAG1:[WORK]NATKAC.PIN;1    )     0DX0205( 4;S  GGSKMDLAMSGVAXELN V2.0-00 4;S04-00  ?!\G MDMSHARE_001"! PASCALMSC_001<^0|~|~|~|~߭߭߭@яoЭRbS S~ݢ~ݢ S<~߭߭p ЭR(|~~ݭ`ݭ1`^޼R޼ ޼R\RKЬP`.NONAMENOMSGMessage number %X0123456789ABCDEFWSEIF???~~P `~ݬPݬ ݬ[ uXXB^^Y| (} (xcSЬPQR{PPUEqsR0r߭M խ1'߭s ߬ݏݏҀݭ P1߭߭> ߬ݏݏzݭ| P1խ;߭ ݬݏݏݭI P1ݬPR߭߭ ߬ݏݏzݭ PNխ8߭ ݬݏݏݭ PݬPSSR Ѽ1߭ խݬݏݏ* ߭^|Rݬ ЬP`Pݏݏ*F 10߭խ1߭ ߬ݏݏݭ P1߭߭ ߬ݏݏzݭ P1խݬݏݏ  1߭B ݬݏݏ!ݭ P1jV߭쟭 ݬݏݏJ"ݭK P11߭ ߬ݏݏ#ݭ P1߭߭ ߬ݏݏz$ݭP1߭| ݬݏݏ%ݭP1RRխ1d߭쟭H ݬݏݏJ&ݭvP_߭2% ߭쟭 ݬݏݏ:'ݭ<P%PPݬݏݏꀙ(߭_խݬݏݏ*)߭6 ^ЬRbRb߭ݏݏ2  ߭kxPRP߭խ!߭ݏݏ2L xRR|^VԼԭ߭߭욏~߭ݏݏҀݭP1߭߭߭ݏݏzݭP1խ߭t߭ݏݏݭP1߭쟭[߭ݏݏ:*ݭP1 @߭ݏݏڀ+U߭ݏ.߭f^(n"߭쟭߭ݏݏJ-ݭP1߭Eխ߭ݏݏ*߭^TԼԭޭR0SS~S ߭߭ ~9ޭRb1߭߭߭߭ݏݏzݭ9P1խx߭߭ݏݏݭP1߭߭ݏݏ:*ݭPYPʏPPTPTT2߭0DX0205( DR$ GGSKMXQAV1.0 04-00 " # ?"! PASCALMSC_001! MDMSHARE_001!CMSC_001DEQNA