PROGRAM 0 660 BYTES 0: LABEL 0 DPY-80186 POD PCB RECOVERY PROGRAM EXECUTE PROGRAM 4 1: LABEL 1 WRITE @ F00006 = 1 RUN UUT @ FFFF0 2: LABEL 2 DPY-READY TO RECOVER PCB REGS?A IF REGA = 1 GOTO 3 GOTO 2 3: LABEL 3 EXECUTE PROGRAM 5 READ @ F00006 REGB = REGE AND 2 IF REGB = 0 GOTO 4 REGB = REGE AND 8 IF REGB = 0 GOTO 5 REGB = REGE AND 4 IF REGB = 4 GOTO 6 DPY-RECOVERY SUCCESSFUL EXECUTE PROGRAM 4 DPY-SET POD TO RECOVERED VALUES?A IF REGA = 0 GOTO 7 DPY-WORKING... EXECUTE PROGRAM 1 GOTO 8 5: LABEL 5 DPY-PCB REGISTERS NOT FOUND EXECUTE PROGRAM 4 DPY-PCB RECOVERY NOT COMPLETED EXECUTE PROGRAM 4 DPY-TRY RECOVERY AGAIN?A IF REGA = 1 GOTO 1 GOTO 7 6: LABEL 6 DPY-FAILURE OCCURRED EXECUTE PROGRAM 4 DPY-POD REGS MAY BE CONTAMINATED EXECUTE PROGRAM 4 DPY-RESET POD TO PWR-UP DEFAULT?A IF REGA = 0 GOTO 7 EXECUTE PROGRAM 3 DPY-ALL POD REGS RESTORED TO DEFAULT EXECUTE PROGRAM 4 GOTO 7 4: LABEL 4 DPY-RUNUUT EXIT FAILED-TRY AGAIN?A IF REGA = 1 GOTO 1 GOTO 7 9: LABEL 9 DPY-SET POD TO DEFAULT PCB VALUES?A IF REGA = 0 GOTO 7 DPY-WORKING... EXECUTE PROGRAM 2 8: LABEL 8 DPY-80186 POD PCB SETUP COMPLETE EXECUTE PROGRAM 4 7: LABEL 7 DPY-80186 PCB RECOVERY PROGRAM DONE PROGRAM 1 373 BYTES REGB = F00320 READ @ REGB WRITE @ REGB AND FFF1FF = REGE REGB = F00328 0: LABEL 0 READ @ REGB WRITE @ REGB AND FFF1FF = REGE REGB = REGB INC INC IF REGB = F00340 GOTO 1 GOTO 0 1: LABEL 1 REGB = F00350 2: LABEL 2 READ @ REGB WRITE @ REGB AND FFF1FF = REGE REGB = REGB INC INC IF REGB = F00364 GOTO 3 GOTO 2 3: LABEL 3 REGB = F00366 READ @ REGB WRITE @ REGB AND FFF1FF = REGE REGB = F003A0 4: LABEL 4 READ @ REGB WRITE @ REGB AND FFF1FF = REGE REGB = REGB INC INC IF REGB = F003AA GOTO 5 GOTO 4 5: LABEL 5 REGB = F003C0 6: LABEL 6 READ @ REGB WRITE @ REGB AND FFF1FF = REGE REGB = REGB INC INC IF REGB = F003CC GOTO 7 GOTO 6 7: LABEL 7 REGB = F003D0 8: LABEL 8 READ @ REGB WRITE @ REGB AND FFF1FF = REGE REGB = REGB INC INC IF REGB = F003DC GOTO 9 GOTO 8 9: LABEL 9 REGB = F001FE READ @ REGB WRITE @ REGB AND FFF1FF = REGE PROGRAM 2 452 BYTES WRITE @ F00120 = 0 WRITE @ F00122 = 0 WRITE @ F00128 = FD WRITE @ F0012A = 7 WRITE @ F0012C = 0 WRITE @ F0012E = 0 WRITE @ F00130 = 8000 WRITE @ F00132 = F WRITE @ F00134 = F WRITE @ F00136 = F WRITE @ F00138 = F WRITE @ F0013A = F WRITE @ F0013C = F WRITE @ F0013E = F WRITE @ F00150 = 0 WRITE @ F00152 = 0 WRITE @ F00154 = 0 WRITE @ F00156 = 0 WRITE @ F00158 = 0 WRITE @ F0015A = 0 WRITE @ F0015C = 0 WRITE @ F0015E = 0 WRITE @ F00160 = 0 WRITE @ F00162 = 0 WRITE @ F00166 = 0 WRITE @ F001A0 = C03B WRITE @ F001A2 = 3FFB WRITE @ F001A4 = 403B WRITE @ F001A6 = 81FB WRITE @ F001A8 = A0FB WRITE @ F001C0 = 0 WRITE @ F001C2 = 0 WRITE @ F001C4 = 0 WRITE @ F001C6 = 0 WRITE @ F001C8 = 0 WRITE @ F001CA = 0 WRITE @ F001D0 = 0 WRITE @ F001D2 = 0 WRITE @ F001D4 = 0 WRITE @ F001D6 = 0 WRITE @ F001D8 = 0 WRITE @ F001D8 = 0 WRITE @ F001FE = FF PROGRAM 3 16 BYTES WRITE @ F00008 = AA55 BUS TEST PROGRAM 4 25 BYTES REG1 = 60 0: LABEL 0 REG1 = REG1 DEC IF REG1 > 0 GOTO 0 PROGRAM 5 21 BYTES