|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 7168 (0x1c00)
Types: M200
Notes: @(#)RUN_UDIAG,1.1,92/01/16,17:18:19, M200_PROGRAM
Names: »RUN_UDIAG.M200«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »RUN_UDIAG.M200«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »RUN_UDIAG.M200«
└─ ⟦this⟧ »RUN_UDIAG.M200«
@ 2034c
<LVAR 0x00c 1(r)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @>
<POP 2034c-203da Body>
<POP 2034c-20362 Prologue> Σ0 ↓
<POP 20362-203d2 Naked> Σ0 ↓
<Call 0x20362 0x10538> {}
IPC_Init(void)
<MI 20368 MOVE.B (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<Call 0x2036c 0x10502> {[2, '(A6+0xc)']}
IPC_PutBool(a : Bool)
<POP 20372-20374 StackAdj> Δ+2 {}
<Call 0x20374 0x10514> {}
IPC_PutEnd(void)
<Blob 0x2037a [10] @> Δ-10 {[«10""»]}
<POP 2038c-2038e StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x2038e 9> {[«10""»]|[$$INITSTATE]}
<Const 0x203a2 0x1.4> Δ-4 {[«10""»]|[$$INITSTATE]|[##1]}
<Const 0x203a6 0x2.2> Δ-2 {[«10""»]|[$$INITSTATE]|[##1]|[#2]}
<Pointer.fp 0x203aa <LVAR -0x002 @>> Δ-4 {[«10""»]|[$$INITSTATE]|[##1]|[#2]|[@@-2]}
<Call 0x203ae 0x103b0> {[«10""»]|[$$INITSTATE]|[##1]|[#2]|[@@-2]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 203b4-203b8 StackAdj> Δ+24 {}
<Call 0x203b8 0x10538> {}
IPC_Init(void)
<MI 203be MOVEA.L (A6+0x8),A0> {}
<MI 203c2 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x203c4 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 203ca-203cc StackAdj> Δ+4 {}
<Call 0x203cc 0x1051a> {}
IPC_GetEnd(void)
<POP 203d2-203da Epilogue> Σ0
@ 203da
<LVAR 0x008 4(r)>
<POP 203da-20412 Body>
<POP 203da-203f0 Prologue> Σ0 ↓
<POP 203f0-2040a Naked> Σ0 ↓
<Call 0x203f0 0x10538> {}
IPC_Init(void)
<MI 203f6 MOVEA.L (A6+0x8),A0> {}
<MI 203fa PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x203fc 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20402-20404 StackAdj> Δ+4 {}
<Call 0x20404 0x1051a> {}
IPC_GetEnd(void)
<POP 2040a-20412 Epilogue> Σ0
@ 20412
<LVAR 0x008 1(r)>
<POP 20412-2044e Body>
<POP 20412-20424 Prologue> Σ0 ↓
<POP 20424-2044a Naked> Σ0 ↓
<Call 0x20424 0x10538> {}
IPC_Init(void)
<MI 2042a MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x2042e 0x10502> {[2, '(A6+0x8)']}
IPC_PutBool(a : Bool)
<POP 20434-20436 StackAdj> Δ+2 {}
<Call 0x20436 0x10514> {}
IPC_PutEnd(void)
<MI 2043c CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x2043e 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x20442 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 20448-2044a StackAdj> Δ+6 {}
<POP 2044a-2044e Epilogue> Σ0
@ 2044e
<LVAR 0x016 1(r)>
<LVAR 0x012 4(r)>
<LVAR 0x010 1(r)>
<LVAR 0x00e 1(r)>
<LVAR 0x00c 1(r)>
<LVAR 0x008 4(r)>
<LVAR -0x004 @>
<POP 2044e-20516 Body> Δ+10
<POP 2044e-20464 Prologue> Σ0 ↓
<POP 20464-2046c RegCacheLoad> Σ0 ↓
<POP 2046c-2048c Naked> Σ0 ↓ →0x2049a
<Call 0x2046c 0x10538> {}
IPC_Init(void)
<MI 20472 MOVE.L (A6+0x12),-(A7)> Δ-4 {[4, '(A6+0x12)']}
<Call 0x20476 0x10508> {[4, '(A6+0x12)']}
IPC_PutString(a : String)
<POP 2047c-2047e StackAdj> Δ+2 {[-2-]}
<MI 2047e MOVE.B (A6+0x10),(A7)> {[-2-]}
<Call 0x20482 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 20484-20486 StackAdj> Δ+2 {}
<MI 20486 TST.B (A6+0x16)> {}
<MI 2048a BNE 0x2049a> {}
<POP 2048c-2049a Naked> Σ0 ↓
<MI 2048c MOVE.B (A6+0xe),-(A7)> Δ-2 {[2, '(A6+0xe)']}
<Call 0x20490 0x10502> {[2, '(A6+0xe)']}
IPC_PutBool(a : Bool)
<MI 20492 MOVE.B (A6+0xc),(A7)> {[-2-]}
<Call 0x20496 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 20498-2049a StackAdj> Δ+2 {}
<POP 2049a-204a6 Naked> Σ0 ↓ →0x204b8 ←0x2046c
<Call 0x2049a 0x10514> {}
IPC_PutEnd(void)
<MI 204a0 TST.B (A6+0x16)> {}
<MI 204a4 BEQ 0x204b8> {}
<POP 204a6-204b8 Naked> Σ0 Δ-10 →0x204c8
<Blob 0x204a6 [10] @> Δ-10 {[«10""»]}
<MI 204b6 BRA 0x204c8> {[«10""»]}
<POP 204b8-204c8 Naked> Σ0 Δ-10 ↓ ←0x2049a
<Blob 0x204b8 [10] @> Δ-10 {[«10""»]}
<POP 204c8-2050e Naked> Σ-10 Δ+10 ↓ ←0x204a6
<POP 204c8-204ca StackAdj> Δ-4 {[-14-]}
<Lit 0x204ca> {[-10-]|[$$…]}
<Pointer.sp 0x204ca 4> Δ-4
<Const 0x204ce 0x1.2> Δ-2
<Const 0x204d2 0x9.2> Δ-2
<Call 0x204d6 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 204dc-204de StackAdj> Δ+8
<Const 0x204de 0x1.4> Δ-4 {[-10-]|[$$…]|[##1]}
<Const 0x204e2 0x2.2> Δ-2 {[-10-]|[$$…]|[##1]|[#2]}
<Pointer.fp 0x204e6 <LVAR -0x004 @>> Δ-4 {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
<Call 0x204ea 0x103b0> {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 204f0-204f4 StackAdj> Δ+24 {}
<Call 0x204f4 0x10538> {}
IPC_Init(void)
<MI 204fa MOVEA.L (A6+0x8),A0> {}
<MI 204fe PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20500 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20506-20508 StackAdj> Δ+4 {}
<Call 0x20508 0x1051a> {}
IPC_GetEnd(void)
<POP 2050e-20516 Epilogue> Σ0
@ 20516
<LVAR -0x004 1(rw)>
<POP 20516-20604 Body>
<POP 20516-2052c Prologue> Σ0 ↓
<POP 2052c-20534 RegCacheLoad> Σ0 ↓
<POP 20534-2054e Naked> Σ0 ↓ →0x20556
<Const 0x20534 0x5.2> Δ-2 {[#5]}
<Const 0x20538 0x2.2> Δ-2 {[#5]|[#2]}
<Call 0x2053c 0x1048a> {[#5]|[#2]}
DiProcCmd(board : Byte; cmd : Byte)
<POP 20542-20544 StackAdj> Δ+2 {[#5]}
<Call 0x20544 0x104cc> {[#5]}
MemOnly2MB() : Bool
<MI 2054a TST.B (A7)+> Δ+2 {}
<MI 2054c BEQ 0x20556> {}
<POP 2054e-20556 Naked> Σ0 →0x2055c
<Call 0x2054e 0x20f38> {}
exp_LOAD_HRAM_8_0.FIU()
<MI 20554 BRA 0x2055c> {}
<POP 20556-2055c Naked> Σ0 ↓ ←0x20534
<Call 0x20556 0x20f56> {}
exp_LOAD_HRAM_32_0.FIU()
<POP 2055c-20572 Naked> Σ0 ↓ ←0x2054e
<Call 0x2055c 0x20fe6> {}
exp_LOAD_HRAM_1.FIU()
<Call 0x20562 0x21208> {}
exp_ALIGN_CSA.VAL()
<Call 0x20568 0x21186> {}
exp_ALIGN_CSA.TYP()
<MI 2056e CLR.B (A6-0x4)> {}
<MI 20570 MOVEQ.L #0x0c,D7> {}
<POP 20572-20582 Naked> Σ0 ↓ →0x2058e ←0x2058e
<POP 20572-20574 StackAdj> Δ-2 {[-2-]}
<MI 20574 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x20576 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 2057c-2057e StackAdj> Δ+2 {[-2-]}
<MI 2057e TST.B (A7)+> Δ+2 {}
<MI 20580 BEQ 0x2058e> {}
<POP 20582-2058e Naked> Σ0 ↓
<MI 20582 CLR.L D0> {}
<MI 20584 MOVE.B (A6-0x4),D0> {}
<MI 20586 ADDQ.W #0x1,D0> {}
<POP 0x20588 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 2058c MOVE.B D0,(A6-0x4)> {}
<POP 2058e-20594 Naked> Σ0 ↓ →0x20572 ←0x20572
<MI 2058e ADDQ.B #0x1,D7> {}
<MI 20590 CMP.B #0x0f,D7> {}
<MI 20592 BLE 0x20572> {}
<POP 20594-20596 Naked> Σ0 ↓
<MI 20594 MOVEQ.L #0x0c,D7> {}
<POP 20596-205a6 Naked> Σ0 ↓ →0x205e0 ←0x205e0
<POP 20596-20598 StackAdj> Δ-2 {[-2-]}
<MI 20598 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x2059a 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 205a0-205a2 StackAdj> Δ+2 {[-2-]}
<MI 205a2 TST.B (A7)+> Δ+2 {}
<MI 205a4 BEQ 0x205e0> {}
<POP 205a6-205e0 Naked> Σ0 ↓
<MI 205a6 MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<POP 205a8-205aa StackAdj> Δ-2 {[2, 'D7']|[-2-]}
<MI 205aa MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']|[-2-]|[2, 'D7']}
<Call 0x205ac 0x104c6> {[2, 'D7']|[-2-]|[2, 'D7']}
EQ_1c218(a : Byte) : Bool
<POP 205b2-205b4 StackAdj> Δ+2 {[2, 'D7']|[-2-]}
<MI 205b4 MOVE.B (A7),D0> {[2, 'D7']|[-2-]}
<MI 205b6 EXTB.W D0> {[2, 'D7']|[-2-]}
<POP 0x205b8 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']|[-2-]}
<MI 205ba MOVE.B D0,(A7)> {[2, 'D7']|[-2-]}
<POP 205bc-205be StackAdj> Δ-2 {[2, 'D7']|[-4-]}
<Call 0x205be 0x104cc> {[2, 'D7']|[-4-]}
MemOnly2MB() : Bool
<MI 205c4 MOVE.B (A7),D0> {[2, 'D7']|[-4-]}
<MI 205c6 EXTB.W D0> {[2, 'D7']|[-4-]}
<POP 0x205c8 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']|[-4-]}
<MI 205ca MOVE.B D0,(A7)> {[2, 'D7']|[-4-]}
<MI 205cc MOVE.B (A6-0x4),-(A7)> Δ-2 {[2, 'D7']|[-4-]|[2, '(A6-0x4)']}
<Call 0x205ce 0x21450> {[2, 'D7']|[-4-]|[2, '(A6-0x4)']}
<POP 205d4-205d6 StackAdj> Δ+6 {[2, 'D7']}
<MI 205d6 MOVE.B D7,(A7)> {[-2-]}
<Call 0x205d8 0x21650> {[-2-]}
<POP 205de-205e0 StackAdj> Δ+2 {}
<POP 205e0-205e6 Naked> Σ0 ↓ →0x20596 ←0x20596
<MI 205e0 ADDQ.B #0x1,D7> {}
<MI 205e2 CMP.B #0x0f,D7> {}
<MI 205e4 BLE 0x20596> {}
<POP 205e6-205fc Naked> Σ0 ↓
<Call 0x205e6 0x105b0> {}
FifoInit(void)
<Const 0x205ec 0xffff.2> Δ-2 {[#65535]}
<Const 0x205f0 0xffff.2> Δ-2 {[#65535]|[#65535]}
<Call 0x205f4 0x20fc2> {[#65535]|[#65535]}
exp_LOAD_REFRESH_REGS.FIU(Sw_2, Sw_2)
<POP 205fa-205fc StackAdj> Δ+4 {}
<POP 205fc-20604 Epilogue> Σ0
@ 20604
<LVAR 0x008 2(r)>
<LVAR -0x002 1(rw)>
<POP 20604-2077a Body>
<POP 20604-2061a Prologue> Σ0 ↓
<POP 2061a-2063c RegCacheLoad> Σ0 ↓
<POP 2063c-2064e Naked> Σ0 ↓ →0x20652
<Call 0x2063c 0x21164> {}
exp_LOAD_BENIGN_UWORD.TYP()
<POP 20642-20644 StackAdj> Δ-2 {[-2-]}
<Call 0x20644 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2064a TST.B (A7)+> Δ+2 {}
<MI 2064c BEQ 0x20652> {}
<POP 2064e-20652 Naked> Σ0 →0x20656
<MI 2064e CLR.B (A6-0x2)> {}
<MI 20650 BRA 0x20656> {}
<POP 20652-20656 Naked> Σ0 ↓ ←0x2063c
<MI 20652 MOVE.B #0xff,(A6-0x2)> {}
<POP 20656-20662 Naked> Σ0 ↓ →0x2066a ←0x2064e
<POP 20656-20658 StackAdj> Δ-2 {[-2-]}
<Const 0x20658 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x2065a 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2065c-2065e StackAdj> Δ+2 {[-2-]}
<MI 2065e TST.B (A7)+> Δ+2 {}
<MI 20660 BEQ 0x2066a> {}
<POP 20662-2066a Naked> Σ0 ↓
<Const 0x20662 0xc.2> Δ-2 {[#12]}
<MI 20664 MOVE.B (A6-0x2),-(A7)> Δ-2 {[#12]|[2, '(A6-0x2)']}
<Call 0x20666 0x2123a> {[#12]|[2, '(A6-0x2)']}
<POP 20668-2066a StackAdj> Δ+4 {}
<POP 2066a-20676 Naked> Σ0 ↓ →0x2067e ←0x20656
<POP 2066a-2066c StackAdj> Δ-2 {[-2-]}
<Const 0x2066c 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x2066e 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20670-20672 StackAdj> Δ+2 {[-2-]}
<MI 20672 TST.B (A7)+> Δ+2 {}
<MI 20674 BEQ 0x2067e> {}
<POP 20676-2067e Naked> Σ0 ↓
<Const 0x20676 0xd.2> Δ-2 {[#13]}
<MI 20678 MOVE.B (A6-0x2),-(A7)> Δ-2 {[#13]|[2, '(A6-0x2)']}
<Call 0x2067a 0x2123a> {[#13]|[2, '(A6-0x2)']}
<POP 2067c-2067e StackAdj> Δ+4 {}
<POP 2067e-2068a Naked> Σ0 ↓ →0x20692 ←0x2066a
<POP 2067e-20680 StackAdj> Δ-2 {[-2-]}
<Const 0x20680 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x20682 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20684-20686 StackAdj> Δ+2 {[-2-]}
<MI 20686 TST.B (A7)+> Δ+2 {}
<MI 20688 BEQ 0x20692> {}
<POP 2068a-20692 Naked> Σ0 ↓
<Const 0x2068a 0xe.2> Δ-2 {[#14]}
<MI 2068c MOVE.B (A6-0x2),-(A7)> Δ-2 {[#14]|[2, '(A6-0x2)']}
<Call 0x2068e 0x2123a> {[#14]|[2, '(A6-0x2)']}
<POP 20690-20692 StackAdj> Δ+4 {}
<POP 20692-2069e Naked> Σ0 ↓ →0x206a6 ←0x2067e
<POP 20692-20694 StackAdj> Δ-2 {[-2-]}
<Const 0x20694 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x20696 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20698-2069a StackAdj> Δ+2 {[-2-]}
<MI 2069a TST.B (A7)+> Δ+2 {}
<MI 2069c BEQ 0x206a6> {}
<POP 2069e-206a6 Naked> Σ0 ↓
<Const 0x2069e 0xf.2> Δ-2 {[#15]}
<MI 206a0 MOVE.B (A6-0x2),-(A7)> Δ-2 {[#15]|[2, '(A6-0x2)']}
<Call 0x206a2 0x2123a> {[#15]|[2, '(A6-0x2)']}
<POP 206a4-206a6 StackAdj> Δ+4 {}
<POP 206a6-206b8 Naked> Σ0 ↓ →0x206be ←0x20692
<Call 0x206a6 0x21002> {}
exp_INIT_MRU.FIU()
<POP 206ac-206ae StackAdj> Δ-2 {[-2-]}
<Const 0x206ae 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x206b0 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 206b2-206b4 StackAdj> Δ+2 {[-2-]}
<MI 206b4 TST.B (A7)+> Δ+2 {}
<MI 206b6 BEQ 0x206be> {}
<POP 206b8-206be Naked> Σ0 ↓
<Const 0x206b8 0xc.2> Δ-2 {[#12]}
<Call 0x206ba 0x217ae> {[#12]}
<POP 206bc-206be StackAdj> Δ+2 {}
<POP 206be-206ca Naked> Σ0 ↓ →0x206d0 ←0x206a6
<POP 206be-206c0 StackAdj> Δ-2 {[-2-]}
<Const 0x206c0 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x206c2 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 206c4-206c6 StackAdj> Δ+2 {[-2-]}
<MI 206c6 TST.B (A7)+> Δ+2 {}
<MI 206c8 BEQ 0x206d0> {}
<POP 206ca-206d0 Naked> Σ0 ↓
<Const 0x206ca 0xd.2> Δ-2 {[#13]}
<Call 0x206cc 0x217ae> {[#13]}
<POP 206ce-206d0 StackAdj> Δ+2 {}
<POP 206d0-206dc Naked> Σ0 ↓ →0x206e2 ←0x206be
<POP 206d0-206d2 StackAdj> Δ-2 {[-2-]}
<Const 0x206d2 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x206d4 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 206d6-206d8 StackAdj> Δ+2 {[-2-]}
<MI 206d8 TST.B (A7)+> Δ+2 {}
<MI 206da BEQ 0x206e2> {}
<POP 206dc-206e2 Naked> Σ0 ↓
<Const 0x206dc 0xe.2> Δ-2 {[#14]}
<Call 0x206de 0x217ae> {[#14]}
<POP 206e0-206e2 StackAdj> Δ+2 {}
<POP 206e2-206ee Naked> Σ0 ↓ →0x206f4 ←0x206d0
<POP 206e2-206e4 StackAdj> Δ-2 {[-2-]}
<Const 0x206e4 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x206e6 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 206e8-206ea StackAdj> Δ+2 {[-2-]}
<MI 206ea TST.B (A7)+> Δ+2 {}
<MI 206ec BEQ 0x206f4> {}
<POP 206ee-206f4 Naked> Σ0 ↓
<Const 0x206ee 0xf.2> Δ-2 {[#15]}
<Call 0x206f0 0x217ae> {[#15]}
<POP 206f2-206f4 StackAdj> Δ+2 {}
<POP 206f4-20726 Naked> Σ0 ↓ →0x20730 ←0x206e2
<MI 206f4 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x206f6 0x2112e> {[2, '(A6+0x8)']}
exp_PREP_RUN.TYP(Sw_2)
<MI 206fc MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']}
<Call 0x206fe 0x211d2> {[2, '(A6+0x8)']}
exp_PREP_RUN.VAL(Sw_2)
<MI 20704 MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']}
<Call 0x20706 0x21880> {[2, '(A6+0x8)']}
exp_PREP_RUN.IOC(Sw_2)
<MI 2070c MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']}
<Call 0x2070e 0x2106a> {[2, '(A6+0x8)']}
exp_PREP_RUN.SEQ(Sw_2)
<MI 20714 MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']}
<Call 0x20716 0x20fa8> {[2, '(A6+0x8)']}
exp_PREP_RUN.FIU(Sw_2)
<Const 0x2071c 0xc.2> Δ-2 {[2, '(A6+0x8)']|[#12]}
<Call 0x2071e 0x104c0> {[2, '(A6+0x8)']|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20720-20722 StackAdj> Δ+2 {[2, '(A6+0x8)']}
<MI 20722 TST.B (A7)+> Δ+2 {}
<MI 20724 BEQ 0x20730> {}
<POP 20726-20730 Naked> Σ0 ↓
<Const 0x20726 0xc.2> Δ-2 {[#12]}
<Call 0x20728 0x21704> {[#12]}
<POP 2072e-20730 StackAdj> Δ+2 {}
<POP 20730-2073c Naked> Σ0 ↓ →0x20746 ←0x206f4
<POP 20730-20732 StackAdj> Δ-2 {[-2-]}
<Const 0x20732 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x20734 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20736-20738 StackAdj> Δ+2 {[-2-]}
<MI 20738 TST.B (A7)+> Δ+2 {}
<MI 2073a BEQ 0x20746> {}
<POP 2073c-20746 Naked> Σ0 ↓
<Const 0x2073c 0xd.2> Δ-2 {[#13]}
<Call 0x2073e 0x21704> {[#13]}
<POP 20744-20746 StackAdj> Δ+2 {}
<POP 20746-20752 Naked> Σ0 ↓ →0x2075c ←0x20730
<POP 20746-20748 StackAdj> Δ-2 {[-2-]}
<Const 0x20748 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x2074a 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2074c-2074e StackAdj> Δ+2 {[-2-]}
<MI 2074e TST.B (A7)+> Δ+2 {}
<MI 20750 BEQ 0x2075c> {}
<POP 20752-2075c Naked> Σ0 ↓
<Const 0x20752 0xe.2> Δ-2 {[#14]}
<Call 0x20754 0x21704> {[#14]}
<POP 2075a-2075c StackAdj> Δ+2 {}
<POP 2075c-20768 Naked> Σ0 ↓ →0x20772 ←0x20746
<POP 2075c-2075e StackAdj> Δ-2 {[-2-]}
<Const 0x2075e 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x20760 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20762-20764 StackAdj> Δ+2 {[-2-]}
<MI 20764 TST.B (A7)+> Δ+2 {}
<MI 20766 BEQ 0x20772> {}
<POP 20768-20772 Naked> Σ0 ↓
<Const 0x20768 0xf.2> Δ-2 {[#15]}
<Call 0x2076a 0x21704> {[#15]}
<POP 20770-20772 StackAdj> Δ+2 {}
<POP 20772-2077a Epilogue> Σ0 ←0x2075c
@ 2077a
<POP 2077a-20818 Body>
<POP 2077a-20790 Prologue> Σ0 ↓
<POP 20790-207a4 RegCacheLoad> Σ0 ↓
<POP 207a4-207ce Naked> Σ0 ↓ →0x207d4
<Call 0x207a4 0x2101c> {}
exp_FREEZE_WORLD.FIU()
<Call 0x207aa 0x210da> {}
exp_RUN_NORMAL.TYP()
<Call 0x207b0 0x211a0> {}
exp_RUN_NORMAL.VAL()
<Call 0x207b6 0x21050> {}
exp_RUN_CHECK.SEQ()
<Call 0x207bc 0x21866> {}
exp_RUN_CHECK.IOC()
<POP 207c2-207c4 StackAdj> Δ-2 {[-2-]}
<Const 0x207c4 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x207c6 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 207c8-207ca StackAdj> Δ+2 {[-2-]}
<MI 207ca TST.B (A7)+> Δ+2 {}
<MI 207cc BEQ 0x207d4> {}
<POP 207ce-207d4 Naked> Σ0 ↓
<Const 0x207ce 0xc.2> Δ-2 {[#12]}
<Call 0x207d0 0x213a2> {[#12]}
<POP 207d2-207d4 StackAdj> Δ+2 {}
<POP 207d4-207e0 Naked> Σ0 ↓ →0x207e6 ←0x207a4
<POP 207d4-207d6 StackAdj> Δ-2 {[-2-]}
<Const 0x207d6 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x207d8 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 207da-207dc StackAdj> Δ+2 {[-2-]}
<MI 207dc TST.B (A7)+> Δ+2 {}
<MI 207de BEQ 0x207e6> {}
<POP 207e0-207e6 Naked> Σ0 ↓
<Const 0x207e0 0xd.2> Δ-2 {[#13]}
<Call 0x207e2 0x213a2> {[#13]}
<POP 207e4-207e6 StackAdj> Δ+2 {}
<POP 207e6-207f2 Naked> Σ0 ↓ →0x207f8 ←0x207d4
<POP 207e6-207e8 StackAdj> Δ-2 {[-2-]}
<Const 0x207e8 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x207ea 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 207ec-207ee StackAdj> Δ+2 {[-2-]}
<MI 207ee TST.B (A7)+> Δ+2 {}
<MI 207f0 BEQ 0x207f8> {}
<POP 207f2-207f8 Naked> Σ0 ↓
<Const 0x207f2 0xe.2> Δ-2 {[#14]}
<Call 0x207f4 0x213a2> {[#14]}
<POP 207f6-207f8 StackAdj> Δ+2 {}
<POP 207f8-20804 Naked> Σ0 ↓ →0x2080a ←0x207e6
<POP 207f8-207fa StackAdj> Δ-2 {[-2-]}
<Const 0x207fa 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x207fc 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 207fe-20800 StackAdj> Δ+2 {[-2-]}
<MI 20800 TST.B (A7)+> Δ+2 {}
<MI 20802 BEQ 0x2080a> {}
<POP 20804-2080a Naked> Σ0 ↓
<Const 0x20804 0xf.2> Δ-2 {[#15]}
<Call 0x20806 0x213a2> {[#15]}
<POP 20808-2080a StackAdj> Δ+2 {}
<POP 2080a-20810 Naked> Σ0 ↓ ←0x207f8
<Call 0x2080a 0x20f76> {}
exp_RUN_NORMAL.FIU()
<POP 20810-20818 Epilogue> Σ0
@ 20818
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x004 @>
<LVAR -0x005 @ 1(rw)>
<LVAR -0x006 @>
<LVAR -0x007 @ 1(r)>
<POP 20818-20948 Body>
<POP 20818-2082e Prologue> Σ0 ↓
<POP 2082e-20848 RegCacheLoad> Σ0 ↓
<POP 20848-20872 Naked> Σ0 ↓ →0x20878
<Call 0x20848 0x2101c> {}
exp_FREEZE_WORLD.FIU()
<Call 0x2084e 0x21850> {}
exp_RESET.IOC()
<Call 0x20854 0x211bc> {}
exp_RESET.VAL()
<Call 0x2085a 0x210f6> {}
exp_RESET.TYP()
<Call 0x20860 0x2103a> {}
exp_RESET.SEQ()
<POP 20866-20868 StackAdj> Δ-2 {[-2-]}
<Const 0x20868 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x2086a 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2086c-2086e StackAdj> Δ+2 {[-2-]}
<MI 2086e TST.B (A7)+> Δ+2 {}
<MI 20870 BEQ 0x20878> {}
<POP 20872-20878 Naked> Σ0 ↓
<Const 0x20872 0xc.2> Δ-2 {[#12]}
<Call 0x20874 0x212f8> {[#12]}
<POP 20876-20878 StackAdj> Δ+2 {}
<POP 20878-20884 Naked> Σ0 ↓ →0x2088a ←0x20848
<POP 20878-2087a StackAdj> Δ-2 {[-2-]}
<Const 0x2087a 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x2087c 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2087e-20880 StackAdj> Δ+2 {[-2-]}
<MI 20880 TST.B (A7)+> Δ+2 {}
<MI 20882 BEQ 0x2088a> {}
<POP 20884-2088a Naked> Σ0 ↓
<Const 0x20884 0xd.2> Δ-2 {[#13]}
<Call 0x20886 0x212f8> {[#13]}
<POP 20888-2088a StackAdj> Δ+2 {}
<POP 2088a-20896 Naked> Σ0 ↓ →0x2089c ←0x20878
<POP 2088a-2088c StackAdj> Δ-2 {[-2-]}
<Const 0x2088c 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x2088e 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20890-20892 StackAdj> Δ+2 {[-2-]}
<MI 20892 TST.B (A7)+> Δ+2 {}
<MI 20894 BEQ 0x2089c> {}
<POP 20896-2089c Naked> Σ0 ↓
<Const 0x20896 0xe.2> Δ-2 {[#14]}
<Call 0x20898 0x212f8> {[#14]}
<POP 2089a-2089c StackAdj> Δ+2 {}
<POP 2089c-208a8 Naked> Σ0 ↓ →0x208ae ←0x2088a
<POP 2089c-2089e StackAdj> Δ-2 {[-2-]}
<Const 0x2089e 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x208a0 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 208a2-208a4 StackAdj> Δ+2 {[-2-]}
<MI 208a4 TST.B (A7)+> Δ+2 {}
<MI 208a6 BEQ 0x208ae> {}
<POP 208a8-208ae Naked> Σ0 ↓
<Const 0x208a8 0xf.2> Δ-2 {[#15]}
<Call 0x208aa 0x212f8> {[#15]}
<POP 208ac-208ae StackAdj> Δ+2 {}
<POP 208ae-208d8 Naked> Σ0 ↓ ←0x2089c
<Call 0x208ae 0x20f92> {}
exp_RESET.FIU()
<MI 208b4 MOVEA.L (A6+0x10),A0> {}
<MI 208b8 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x208ba 0x21084> {[4, '^(A0)']}
exp_HALT.SEQ(&Fr)
<POP 208c0-208c2 StackAdj> Δ+4 {}
<MI 208c2 MOVEA.L (A6+0xc),A0> {}
<MI 208c6 CLR.B (A0)> {}
<MI 208c8 MOVEA.L (A6+0x8),A0> {}
<MI 208cc CLR.B (A0)> {}
<MI 208ce CLR.B (A0+0xb)> {}
<MI 208d2 CLR.B (A0+0x1)> {}
<MI 208d6 MOVEQ.L #0x02,D7> {}
<POP 208d8-208de Naked> Σ0 ↓ →0x208fe ←0x20936
<MI 208d8 CMPI.B #0x05,D7> {}
<MI 208dc BEQ 0x208fe> {}
<POP 208de-208fe Naked> Σ0 →0x20918
<MI 208de MOVE.B D7,D0> {}
<MI 208e0 EXTB.W D0> {}
<MI 208e2 LEA.L 0x20314,A0> {}
<MI 208e6 MOVE.B (A0+D0.W),-(A7)> Δ-2 {[2, '(A0+D0.W)']}
<Pointer.fp 0x208ea <LVAR -0x006 @>> Δ-4 {[2, '(A0+D0.W)']|[@@-6]}
<Pointer.fp 0x208ee <LVAR -0x005 @ 1(rw)>> Δ-4 {[2, '(A0+D0.W)']|[@@-6]|[@@-5]}
<Pointer.fp 0x208f0 <LVAR -0x004 @>> Δ-4 {[2, '(A0+D0.W)']|[@@-6]|[@@-5]|[@@-4]}
<Call 0x208f4 0x10484> {[2, '(A0+D0.W)']|[@@-6]|[@@-5]|[@@-4]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 208fa-208fc StackAdj> Δ+14 {}
<MI 208fc BRA 0x20918> {}
<POP 208fe-20916 Naked> Σ0 ↓ →0x20918 ←0x208d8
<Pointer.fp 0x208fe <LVAR -0x007 @ 1(r)>> Δ-4 {[@@-7]}
<Call 0x20902 0x2109a> {[@@-7]}
exp_GET_MISC_ERRORS.SEQ(&Sr_1)
<POP 20908-2090a StackAdj> Δ+4 {}
<MI 2090a CLR.L D0> {}
<MI 2090c MOVE.B (A6-0x7),D0> {}
<MI 20910 CMPI.W #0x001f,D0> {}
<MI 20914 BEQ 0x20918> {}
<POP 20916-20918 Naked> Σ0 ↓
<MI 20916 MOVE.B #0x01,(A6-0x5)> {}
<POP 20918-20930 Naked> Σ0 Δ-2 ↓ →0x20936 ←0x208de ←0x208fe
<MI 20918 MOVEA.L (A6+0x8),A0> {}
<MI 2091c MOVE.B D7,D0> {}
<MI 2091e EXTB.W D0> {}
<MI 20920 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<MI 20922 MOVE.B (A6-0x5),D1> {[2, 'D0']}
<MI 20924 EXTB.W D1> {[2, 'D0']}
<POP 0x20926 LimitCheck 0x0 ≤ D1 ≤ 0x1> {[2, 'D0']}
<MI 20928 MOVE.B D1,(A0+D0.W)> {[2, 'D0']}
<MI 2092c TST.W D1> {[2, 'D0']}
<MI 2092e BEQ 0x20936> {[2, 'D0']}
<POP 20930-20936 Naked> Σ-2 ↓
<MI 20930 MOVEA.L (A6+0xc),A0> {[-2-]}
<MI 20934 MOVE.B #0x01,(A0)> {[-2-]}
<POP 20936-20940 Naked> Σ-2 Δ+2 ↓ →0x208d8 ←0x20918
<MI 20936 MOVE.W (A7)+,D7> Δ+2 {}
<MI 20938 ADDQ.W #0x1,D7> {}
<MI 2093a CMPI.W #0x000a,D7> {}
<MI 2093e BLE 0x208d8> {}
<POP 20940-20948 Epilogue> Σ0
@ 20948
<LVAR 0x008 1(r)>
<LVAR -0x004 1(r)>
<LVAR -0x005 @ 1(r)>
<LVAR -0x00d @>
<LVAR -0x00e @>
<LVAR -0x012 @>
<LVAR -0x016 @>
<LVAR -0x023 @>
<LVAR -0x024 @ 1(r)>
<LVAR -0x025 @ 1(r)>
<LVAR -0x026 @ 1(r)>
<POP 20948-20b44 Body>
<POP 20948-2095e Prologue> Σ0 ↓
<POP 2095e-2097a RegCacheLoad> Σ0 ↓
<POP 2097a-20996 Naked> Σ0 ↓ →0x20a5a
<Pointer.fp 0x2097a <LVAR -0x026 @ 1(r)>> Δ-4 {[@@-38]}
<Pointer.fp 0x2097e <LVAR -0x025 @ 1(r)>> Δ-4 {[@@-38]|[@@-37]}
<Pointer.fp 0x20982 <LVAR -0x023 @>> Δ-4 {[@@-38]|[@@-37]|[@@-35]}
<Call 0x20986 0x20818> {[@@-38]|[@@-37]|[@@-35]}
<POP 2098a-2098c StackAdj> Δ+12 {}
<MI 2098c CLR.B 0x21aa8> {}
<MI 2098e TST.B (A6-0x25)> {}
<MI 20992 BEQ 0x20a5a> {}
<POP 20996-20a08 Naked> Σ0 ↓ →0x20a2e
<Blob 0x20996 [36] @> Δ-36 {[«36""»]}
<POP 209a2-209a4 StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x209a4 36> {[«36""»]|[$$detected a MACHINE_CHECK, therefore_]}
<Call 0x209b2 0x103d8> {[«36""»]|[$$detected a MACHINE_CHECK, therefore_]}
WriteConsoleString(str : String)
<POP 209b8-209ba StackAdj> Δ+38 {[-2-]}
<POP 209ba-209bb StackAdj> Δ+2 {}
<Blob 0x209bb [2] @> Δ-2 {[«2""»]}
<Blob 0x209be [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x209c2 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 209c6-209c8 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x209c8 6> {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]}
<POP 209d4-209d6 StackAdj> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[-2-]}
<POP 209d6-209d7 StackAdj> Δ+2 {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]}
<Const 0x209d7 0x1.2> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[#1]}
<MI 209d8 MOVE.B 0x21aa9,D0> {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[#1]}
<MI 209de EXTB.W D0> {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[#1]}
<POP 0x209e0 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[#1]}
<MI 209e2 MOVE.B D0,-(A7)> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[#1]|[2, 'D0']}
<Pointer.fp 0x209e4 <LVAR -0x024 @ 1(r)>> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[#1]|[2, 'D0']|[@@-36]}
<Pointer.fp 0x209e8 <LVAR -0x016 @>> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[#1]|[2, 'D0']|[@@-36]|[@@-22]}
<Pointer.fp 0x209ec <LVAR -0x012 @>> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[#1]|[2, 'D0']|[@@-36]|[@@-22]|[@@-18]}
<Pointer.fp 0x209f0 <LVAR -0x00e @>> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[#1]|[2, 'D0']|[@@-36]|[@@-22]|[@@-18]|[@@-14]}
<Pointer.fp 0x209f4 <LVAR -0x00d @>> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[#1]|[2, 'D0']|[@@-36]|[@@-22]|[@@-18]|[@@-14]|[@@-13]}
<Call 0x209f8 0x1053e> {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[#1]|[2, 'D0']|[@@-36]|[@@-22]|[@@-18]|[@@-14]|[@@-13]}
FSCALL_1053e
<POP 209fe-20a02 StackAdj> Δ+34 {}
<MI 20a02 TST.B (A6-0x24)> {}
<MI 20a06 BEQ 0x20a2e> {}
<POP 20a08-20a2e Naked> Σ0 →0x20a56
<Blob 0x20a08 [38] @> Δ-38 {[«38""»]}
<POP 20a18-20a1a StackAdj> Δ-4 {[«38""»]|[-4-]}
<Lit 0x20a1a 37> {[«38""»]|[$$uDIAG failed: a MACHINE_CHECK occured]}
<Call 0x20a28 0x103e0> {[«38""»]|[$$uDIAG failed: a MACHINE_CHECK occured]}
WriteConsoleStringCrLf(str : String)
<POP 20a2a-20a2c StackAdj> Δ+42 {}
<MI 20a2c BRA 0x20a56> {}
<POP 20a2e-20a56 Naked> Σ0 ↓ ←0x20996
<Blob 0x20a2e [58] @> Δ-58 {[«58""»]}
<POP 20a40-20a42 StackAdj> Δ-4 {[«58""»]|[-4-]}
<Lit 0x20a42 57> {[«58""»]|[$$uDIAG failed: MACHINE_CHECK but the EMABLM program failed]}
<Call 0x20a50 0x103e0> {[«58""»]|[$$uDIAG failed: MACHINE_CHECK but the EMABLM program failed]}
WriteConsoleStringCrLf(str : String)
<POP 20a52-20a56 StackAdj> Δ+62 {}
<POP 20a56-20a5a Naked> Σ0 →0x20b3c ←0x20a08
<MI 20a56 BRA 0x20b3c> {}
<POP 20a5a-20a62 Naked> Σ0 ↓ →0x20ae6 ←0x2097a
<MI 20a5a TST.B (A6-0x26)> {}
<MI 20a5e BEQ 0x20ae6> {}
<POP 20a62-20a86 Naked> Σ0 ↓ →0x20aaa
<Pointer.fp 0x20a62 <LVAR -0x005 @ 1(r)>> Δ-4 {[@@-5]}
<Call 0x20a66 0x21832> {[@@-5]}
exp_READ_LAST_PC.IOC(&Sr_2)
<POP 20a6c-20a6e StackAdj> Δ+4 {}
<MI 20a6e CLR.L D0> {}
<MI 20a70 MOVE.B (A6-0x5),D0> {}
<MI 20a74 ASL.W #0x8,D0> {}
<MI 20a76 CLR.L D1> {}
<MI 20a78 MOVE.B (A6-0x4),D1> {}
<MI 20a7c ADD.W D0,D1> {}
<MI 20a7e MOVE.W D1,D7> {}
<MI 20a80 CMPI.W #0x0102,D7> {}
<MI 20a84 BNE 0x20aaa> {}
<POP 20a86-20aaa Naked> Σ0 →0x20ae4
<Blob 0x20a86 [4] @> Δ-4 {[«4""»]}
<Blob 0x20a8a [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x20a8e [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 20a92-20a94 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x20a94 12> {[«4""»]|[«4""»]|[«4""»]|[$$uDIAG passed]}
<Call 0x20aa0 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[$$uDIAG passed]}
WriteConsoleStringCrLf(str : String)
<POP 20aa2-20aa6 StackAdj> Δ+16 {}
<MI 20aa6 MOVE.B #0x01,0x21aa8> {}
<MI 20aa8 BRA 0x20ae4> {}
<POP 20aaa-20ae4 Naked> Σ0 ↓ ←0x20a62
<Blob 0x20aaa [44] @> Δ-44 {[«44""»]}
<POP 20ab6-20ab8 StackAdj> Δ-8 {[«44""»]|[-8-]}
<Lit 0x20ab8 44> {[«44""»]|[-4-]|[$$uDIAG failed: it did an error halt at uaddr_]}
<POP 20ac4-20ac6 StackAdj> Δ-4 {[«44""»]|[-4-]|[$$uDIAG failed: it did an error halt at uaddr_]|[-4-]}
<MI 20ac6 CLR.L D0> {[«44""»]|[-4-]|[$$uDIAG failed: it did an error halt at uaddr_]|[-4-]}
<MI 20ac8 MOVE.W D7,D0> {[«44""»]|[-4-]|[$$uDIAG failed: it did an error halt at uaddr_]|[-4-]}
<MI 20aca MOVE.L D0,-(A7)> Δ-4 {[«44""»]|[-4-]|[$$uDIAG failed: it did an error halt at uaddr_]|[-4-]|[4, 'D0']}
<Const 0x20acc 0x4.4> Δ-4 {[«44""»]|[-4-]|[$$uDIAG failed: it did an error halt at uaddr_]|[-4-]|[4, 'D0']|[##4]}
<Call 0x20ad0 0x102e8> {[«44""»]|[-4-]|[$$uDIAG failed: it did an error halt at uaddr_]|[-4-]|[4, 'D0']|[##4]}
Long2HexString(val : Long; ndig : Long) : String
<POP 20ad6-20ad8 StackAdj> Δ+8 {[«44""»]|[-4-]|[$$uDIAG failed: it did an error halt at uaddr_]|[-4-]}
<Call 0x20ad8 0x102d0> {[«44""»]|[-4-]|[$$uDIAG failed: it did an error halt at uaddr_]|[-4-]}
StringCat2(a, b : String) : String
<POP 20ade-20ae0 StackAdj> Δ+8 {[«44""»]|[-4-]}
<Call 0x20ae0 0x103e0> {[«44""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 20ae2-20ae4 StackAdj> Δ+48 {}
<POP 20ae4-20ae6 Naked> Σ0 →0x20b3c ←0x20a86
<MI 20ae4 BRA 0x20b3c> {}
<POP 20ae6-20aec Naked> Σ0 ↓ →0x20b16 ←0x20a5a
<MI 20ae6 TST.B (A6+0x8)> {}
<MI 20aea BEQ 0x20b16> {}
<POP 20aec-20b16 Naked> Σ0 →0x20b3c
<Blob 0x20aec [50] @> Δ-50 {[«50""»]}
<POP 20afe-20b00 StackAdj> Δ-4 {[«50""»]|[-4-]}
<Lit 0x20b00 49> {[«50""»]|[$$uDIAG failed: we timed out waiting for it to halt]}
<Call 0x20b0e 0x103e0> {[«50""»]|[$$uDIAG failed: we timed out waiting for it to halt]}
WriteConsoleStringCrLf(str : String)
<POP 20b10-20b14 StackAdj> Δ+54 {}
<MI 20b14 BRA 0x20b3c> {}
<POP 20b16-20b3c Naked> Σ0 ↓ ←0x20ae6
<Blob 0x20b16 [42] @> Δ-42 {[«42""»]}
<Const 0x20b22 0xe.2> Δ-2 {[«42""»]|[#14]}
<POP 20b26-20b28 StackAdj> Δ-4 {[«42""»]|[#14]|[-4-]}
<Lit 0x20b28 42> {[«42""»]|[#14]|[$$internal error: no MCHK or HALT or TIMEOUT]}
<Call 0x20b34 0x103b8> {[«42""»]|[#14]|[$$internal error: no MCHK or HALT or TIMEOUT]}
PopProgram(status : Byte; msg : String)
<POP 20b3a-20b3c StackAdj> Δ+48 {}
<POP 20b3c-20b44 Epilogue> Σ0 ←0x20a56 ←0x20ae4 ←0x20aec
@ 20b44
<LVAR 0x008 4(r)>
<LVAR -0x00a @>
<LVAR -0x00b @ 1(r)>
<LVAR -0x00c @>
<POP 20b44-20c50 Body>
<POP 20b44-20b5a Prologue> Σ0 ↓
<POP 20b5a-20b70 RegCacheLoad> Σ0 ↓
<POP 20b70-20b7e Naked> Σ0 ↓
<MI 20b70 MOVE.L #0x96,D5> {}
<MI 20b76 MOVEQ.L #0x00,D7> {}
<MI 20b78 MOVEA.L (A6+0x8),A0> {}
<MI 20b7c CLR.B (A0)> {}
<POP 20b7e-20c06 Naked> Σ0 ↓ ←0x20c38
<Const 0x20b7e 0x9896.4> Δ-4 {[##39062]}
<Call 0x20b84 0x10224> {[##39062]}
KC12_Sleep(dur: Long)
<POP 20b8a-20b8c StackAdj> Δ+2 {[-2-]}
<POP 20b8c-20b8d StackAdj> Δ+2 {}
<Const 0x20b8d 0x4.2> Δ-2 {[#4]}
<Pointer.fp 0x20b90 <LVAR -0x00c @>> Δ-4 {[#4]|[@@-12]}
<Pointer.fp 0x20b92 <LVAR -0x00b @ 1(r)>> Δ-4 {[#4]|[@@-12]|[@@-11]}
<Pointer.fp 0x20b94 <LVAR -0x00a @>> Δ-4 {[#4]|[@@-12]|[@@-11]|[@@-10]}
<Call 0x20b96 0x10484> {[#4]|[@@-12]|[@@-11]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20b98-20b9a StackAdj> Δ+14 {}
<MI 20b9a MOVE.B D7,D0> {}
<MI 20b9c OR.B (A6-0xb),D0> {}
<MI 20b9e EXTB.W D0> {}
<POP 0x20ba0 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20ba2 MOVE.B D0,D7> {}
<Const 0x20ba4 0x7.2> Δ-2 {[#7]}
<Pointer.fp 0x20ba8 <LVAR -0x00c @>> Δ-4 {[#7]|[@@-12]}
<Pointer.fp 0x20baa <LVAR -0x00b @ 1(r)>> Δ-4 {[#7]|[@@-12]|[@@-11]}
<Pointer.fp 0x20bac <LVAR -0x00a @>> Δ-4 {[#7]|[@@-12]|[@@-11]|[@@-10]}
<Call 0x20bae 0x10484> {[#7]|[@@-12]|[@@-11]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20bb0-20bb2 StackAdj> Δ+14 {}
<MI 20bb2 MOVE.B D7,D0> {}
<MI 20bb4 OR.B (A6-0xb),D0> {}
<MI 20bb6 EXTB.W D0> {}
<POP 0x20bb8 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20bba MOVE.B D0,D7> {}
<Const 0x20bbc 0x6.2> Δ-2 {[#6]}
<Pointer.fp 0x20bc0 <LVAR -0x00c @>> Δ-4 {[#6]|[@@-12]}
<Pointer.fp 0x20bc2 <LVAR -0x00b @ 1(r)>> Δ-4 {[#6]|[@@-12]|[@@-11]}
<Pointer.fp 0x20bc4 <LVAR -0x00a @>> Δ-4 {[#6]|[@@-12]|[@@-11]|[@@-10]}
<Call 0x20bc6 0x10484> {[#6]|[@@-12]|[@@-11]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20bc8-20bca StackAdj> Δ+14 {}
<MI 20bca MOVE.B D7,D0> {}
<MI 20bcc OR.B (A6-0xb),D0> {}
<MI 20bce EXTB.W D0> {}
<POP 0x20bd0 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20bd2 MOVE.B D0,D7> {}
<Const 0x20bd4 0x2.2> Δ-2 {[#2]}
<Pointer.fp 0x20bd8 <LVAR -0x00c @>> Δ-4 {[#2]|[@@-12]}
<Pointer.fp 0x20bda <LVAR -0x00b @ 1(r)>> Δ-4 {[#2]|[@@-12]|[@@-11]}
<Pointer.fp 0x20bdc <LVAR -0x00a @>> Δ-4 {[#2]|[@@-12]|[@@-11]|[@@-10]}
<Call 0x20bde 0x10484> {[#2]|[@@-12]|[@@-11]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20be0-20be2 StackAdj> Δ+14 {}
<MI 20be2 MOVE.B D7,D0> {}
<MI 20be4 OR.B (A6-0xb),D0> {}
<MI 20be6 EXTB.W D0> {}
<POP 0x20be8 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20bea MOVE.B D0,D7> {}
<Const 0x20bec 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x20bf0 <LVAR -0x00c @>> Δ-4 {[#3]|[@@-12]}
<Pointer.fp 0x20bf2 <LVAR -0x00b @ 1(r)>> Δ-4 {[#3]|[@@-12]|[@@-11]}
<Pointer.fp 0x20bf4 <LVAR -0x00a @>> Δ-4 {[#3]|[@@-12]|[@@-11]|[@@-10]}
<Call 0x20bf6 0x10484> {[#3]|[@@-12]|[@@-11]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20bf8-20bfa StackAdj> Δ+14 {}
<MI 20bfa MOVE.B D7,D0> {}
<MI 20bfc OR.B (A6-0xb),D0> {}
<MI 20bfe EXTB.W D0> {}
<POP 0x20c00 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20c02 MOVE.B D0,D7> {}
<MI 20c04 MOVEQ.L #0x0c,D6> {}
<POP 20c06-20c16 Naked> Σ0 ↓ →0x20c2c ←0x20c2c
<POP 20c06-20c08 StackAdj> Δ-2 {[-2-]}
<MI 20c08 MOVE.B D6,-(A7)> Δ-2 {[-2-]|[2, 'D6']}
<Call 0x20c0a 0x104c0> {[-2-]|[2, 'D6']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20c10-20c12 StackAdj> Δ+2 {[-2-]}
<MI 20c12 TST.B (A7)+> Δ+2 {}
<MI 20c14 BEQ 0x20c2c> {}
<POP 20c16-20c2c Naked> Σ0 ↓
<MI 20c16 MOVE.B D6,-(A7)> Δ-2 {[2, 'D6']}
<Pointer.fp 0x20c18 <LVAR -0x00c @>> Δ-4 {[2, 'D6']|[@@-12]}
<Pointer.fp 0x20c1a <LVAR -0x00b @ 1(r)>> Δ-4 {[2, 'D6']|[@@-12]|[@@-11]}
<Pointer.fp 0x20c1c <LVAR -0x00a @>> Δ-4 {[2, 'D6']|[@@-12]|[@@-11]|[@@-10]}
<Call 0x20c1e 0x10484> {[2, 'D6']|[@@-12]|[@@-11]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20c20-20c22 StackAdj> Δ+14 {}
<MI 20c22 MOVE.B D7,D0> {}
<MI 20c24 OR.B (A6-0xb),D0> {}
<MI 20c26 EXTB.W D0> {}
<POP 0x20c28 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20c2a MOVE.B D0,D7> {}
<POP 20c2c-20c34 Naked> Σ0 ↓ →0x20c06 ←0x20c06
<MI 20c2c ADDQ.B #0x1,D6> {}
<MI 20c2e CMPI.B #0x0f,D6> {}
<MI 20c32 BLE 0x20c06> {}
<POP 20c34-20c38 Naked> Σ0 ↓ →0x20c3e
<MI 20c34 SUBQ.L #0x1,D5> {}
<MI 20c36 BEQ 0x20c3e> {}
<POP 20c38-20c3e Naked> Σ0 ↓ →0x20b7e
<MI 20c38 TST.B D7> {}
<MI 20c3a BEQ 0x20b7e> {}
<POP 20c3e-20c48 Naked> Σ0 ↓ ←0x20c34
<MI 20c3e MOVEA.L (A6+0x8),A0> {}
<MI 20c42 MOVE.B D7,(A0)> {}
<MI 20c44 NEG.B (A0)> {}
<MI 20c46 ADDQ.B #0x1,(A0)> {}
<POP 20c48-20c50 Epilogue> Σ0
@ 20c50
<POP 20c50-20d0a Body>
<POP 20c50-20c66 Prologue> Σ0 ↓
<POP 20c66-20c82 RegCacheLoad> Σ0 ↓
<POP 20c82-20c8e Naked> Σ0 ↓ →0x20ca2
<POP 20c82-20c84 StackAdj> Δ-2 {[-2-]}
<Const 0x20c84 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x20c86 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20c88-20c8a StackAdj> Δ+2 {[-2-]}
<MI 20c8a TST.B (A7)+> Δ+2 {}
<MI 20c8c BEQ 0x20ca2> {}
<POP 20c8e-20ca2 Naked> Σ0 ↓
<Const 0x20c8e 0xc.2> Δ-2 {[#12]}
<Blob 0x20c90 [20] @> Δ-20 {[#12]|[«20""»]}
<Call 0x20c9e 0x21534> {[#12]|[«20""»]}
<POP 20ca0-20ca2 StackAdj> Δ+22 {}
<POP 20ca2-20cae Naked> Σ0 ↓ →0x20cc2 ←0x20c82
<POP 20ca2-20ca4 StackAdj> Δ-2 {[-2-]}
<Const 0x20ca4 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x20ca6 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20ca8-20caa StackAdj> Δ+2 {[-2-]}
<MI 20caa TST.B (A7)+> Δ+2 {}
<MI 20cac BEQ 0x20cc2> {}
<POP 20cae-20cc2 Naked> Σ0 ↓
<Const 0x20cae 0xd.2> Δ-2 {[#13]}
<Blob 0x20cb0 [20] @> Δ-20 {[#13]|[«20""»]}
<Call 0x20cbe 0x21534> {[#13]|[«20""»]}
<POP 20cc0-20cc2 StackAdj> Δ+22 {}
<POP 20cc2-20cce Naked> Σ0 ↓ →0x20ce2 ←0x20ca2
<POP 20cc2-20cc4 StackAdj> Δ-2 {[-2-]}
<Const 0x20cc4 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x20cc6 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20cc8-20cca StackAdj> Δ+2 {[-2-]}
<MI 20cca TST.B (A7)+> Δ+2 {}
<MI 20ccc BEQ 0x20ce2> {}
<POP 20cce-20ce2 Naked> Σ0 ↓
<Const 0x20cce 0xe.2> Δ-2 {[#14]}
<Blob 0x20cd0 [20] @> Δ-20 {[#14]|[«20""»]}
<Call 0x20cde 0x21534> {[#14]|[«20""»]}
<POP 20ce0-20ce2 StackAdj> Δ+22 {}
<POP 20ce2-20cee Naked> Σ0 ↓ →0x20d02 ←0x20cc2
<POP 20ce2-20ce4 StackAdj> Δ-2 {[-2-]}
<Const 0x20ce4 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x20ce6 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20ce8-20cea StackAdj> Δ+2 {[-2-]}
<MI 20cea TST.B (A7)+> Δ+2 {}
<MI 20cec BEQ 0x20d02> {}
<POP 20cee-20d02 Naked> Σ0 ↓
<Const 0x20cee 0xf.2> Δ-2 {[#15]}
<Blob 0x20cf0 [20] @> Δ-20 {[#15]|[«20""»]}
<Call 0x20cfe 0x21534> {[#15]|[«20""»]}
<POP 20d00-20d02 StackAdj> Δ+22 {}
<POP 20d02-20d0a Epilogue> Σ0 ←0x20ce2
@ 20d0a
START
<POP 20d0a--0001 Body>
<POP 20d0a-20d14 Prologue> Σ0
<POP 20d14-20d2a RegCacheLoad> Σ0 ↓
<POP 20d2a-20d86 Naked> Σ0 ↓ →0x20d98
<Call 0x20d2a 0x10398> {}
FSCALL_10398
<Blob 0x20d30 [44] @> Δ-44 {[«44""»]}
<POP 20d3c-20d3e StackAdj> Δ-4 {[«44""»]|[-4-]}
<Lit 0x20d3e 44> {[«44""»]|[$$preparing to run the microdiagnostic (uDIAG)]}
<Call 0x20d50 0x103e0> {[«44""»]|[$$preparing to run the microdiagnostic (uDIAG)]}
WriteConsoleStringCrLf(str : String)
<POP 20d56-20d5a StackAdj> Δ+48 {}
<Call 0x20d5a 0x10538> {}
IPC_Init(void)
<Const 0x20d60 0x21aaa.4> Δ-4 {[##137898]}
<Call 0x20d62 0x10526> {[##137898]}
IPC_GetBool() : Bool
<POP 20d68-20d6a StackAdj> Δ+4 {}
<Const 0x20d6a 0x21aa9.4> Δ-4 {[##137897]}
<Call 0x20d6c 0x10526> {[##137897]}
IPC_GetBool() : Bool
<POP 20d72-20d74 StackAdj> Δ+4 {}
<Const 0x20d74 0x21aac.4> Δ-4 {[##137900]}
<Call 0x20d7a 0x10526> {[##137900]}
IPC_GetBool() : Bool
<POP 20d80-20d82 StackAdj> Δ+4 {}
<MI 20d82 TST.B 0x21aaa> {}
<MI 20d84 BEQ 0x20d98> {}
<POP 20d86-20d98 Naked> Σ0 →0x20e1a
<MI 20d86 LEA.L 0x21ab2,A0> {}
<MI 20d88 LEA.L 0x20333,A1> {}
<BlockMove 8,A1,A0> {}
<MI 20d94 BRA 0x20e1a> {}
<POP 20d98-20df8 Naked> Σ0 Δ-36 ↓ →0x20e08 ←0x20d2a
<Blob 0x20d98 [66] @> Δ-66 {[«66""»]}
<POP 20daa-20dac StackAdj> Δ-4 {[«66""»]|[-4-]}
<Lit 0x20dac 65> {[«66""»]|[$$The long version stress tests the DRAMs but runs 2 minutes longer]}
<Call 0x20dbe 0x103e0> {[«66""»]|[$$The long version stress tests the DRAMs but runs 2 minutes longer]}
WriteConsoleStringCrLf(str : String)
<POP 20dc4-20dc5 StackAdj> Δ+70 ↓ {}
<Blob 0x20dc5 [36] @> Δ-36 {[«36""»]}
<POP 20dd6-20dd8 StackAdj> Δ-6 {[«36""»]|[-6-]}
<Lit 0x20dd8 35> {[«36""»]|[-2-]|[$$Do you want to run the long version]}
<POP 20de8-20dea StackAdj> Δ-2 {[«36""»]|[-2-]|[$$Do you want to run the long version]|[-2-]}
<MI 20dea CLR.B (A7)> {[«36""»]|[-2-]|[$$Do you want to run the long version]|[-2-]}
<Call 0x20dec 0x103f0> {[«36""»]|[-2-]|[$$Do you want to run the long version]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 20df2-20df4 StackAdj> Δ+6 {[«36""»]|[-2-]}
<MI 20df4 TST.B (A7)+> Δ+2 {[«36""»]}
<MI 20df6 BEQ 0x20e08> {[«36""»]}
<POP 20df8-20e08 Naked> Σ-36 →0x20e16
<MI 20df8 LEA.L 0x21ab2,A0> {[-36-]}
<MI 20dfa LEA.L 0x2033b,A1> {[-36-]}
<BlockMove 8,A1,A0> {[-36-]}
<MI 20e06 BRA 0x20e16> {[-36-]}
<POP 20e08-20e16 Naked> Σ-36 ↓ ←0x20d98
<MI 20e08 LEA.L 0x21ab2,A0> {[-36-]}
<MI 20e0a LEA.L 0x20343,A1> {[-36-]}
<BlockMove 8,A1,A0> {[-36-]}
<POP 20e16-20e1a Naked> Σ-36 Δ+36 ↓ ←0x20df8
<POP 20e16-20e1a StackAdj> Δ+36 {}
<POP 20e1a-20f00 Naked> Σ0 ↓ →0x20f12 ←0x20d86
<Const 0x20e1a 0x0.4> Δ-4 {[##0]}
<Call 0x20e1e 0x104d8> {[##0]}
ExpInit(a : Long)
<POP 20e24-20e26 StackAdj> Δ+2 {[-2-]}
<POP 20e26-20e27 StackAdj> Δ+2 {}
<Blob 0x20e27 [2] 0x21aa9> Δ-2 {[«2»]}
<Call 0x20e28 0x104d2> {[«2»]}
SetExpInitDone(a : Byte)
<POP 20e2e-20e30 StackAdj> Δ+2 {}
<Call 0x20e30 0x20516> {}
<Blob 0x20e34 [16] @> Δ-16 {[«16""»]}
<MI 20e46 CLR.B -(A7)> Δ-2 {[«16""»]|[#0]}
<POP 20e48-20e4a StackAdj> Δ-4 {[«16""»]|[#0]|[-4-]}
<Lit 0x20e4a 15> {[«16""»]|[#0]|[$$DIAG.M200_UCODE]}
<POP 20e5a-20e5c StackAdj> Δ-2 {[«16""»]|[#0]|[$$DIAG.M200_UCODE]|[-2-]}
<POP 20e5c-20e5d StackAdj> Δ+2 {[«16""»]|[#0]|[$$DIAG.M200_UCODE]}
<Blob 0x20e5d [2] 0x21aac> Δ-2 {[«16""»]|[#0]|[$$DIAG.M200_UCODE]|[«2»]}
<Const 0x20e62 0x1.2> Δ-2 {[«16""»]|[#0]|[$$DIAG.M200_UCODE]|[«2»]|[#1]}
<Const 0x20e64 0x1.2> Δ-2 {[«16""»]|[#0]|[$$DIAG.M200_UCODE]|[«2»]|[#1]|[#1]}
<Const 0x20e66 0x21aad.4> Δ-4 {[«16""»]|[#0]|[$$DIAG.M200_UCODE]|[«2»]|[#1]|[#1]|[##137901]}
<Call 0x20e6c 0x2044e> {[«16""»]|[#0]|[$$DIAG.M200_UCODE]|[«2»]|[#1]|[#1]|[##137901]}
<POP 20e70-20e74 StackAdj> Δ+28 {[-4-]}
<POP 20e74-20e75 StackAdj> Δ+4 {}
<Blob 0x20e75 [4] 0x21ab6> Δ-4 {[«4»]}
<Blob 0x20e7a [4] 0x21ab2> Δ-4 {[«4»]|[«4»]}
<Const 0x20e7c 0x21aba.4> Δ-4 {[«4»]|[«4»]|[##137914]}
<Call 0x20e82 0x2110c> {[«4»]|[«4»]|[##137914]}
exp_PREP_WRITE_REG.TYP(Sw_8, &Sr_8_1)
<POP 20e88-20e8a StackAdj> Δ+10 {[-2-]}
<POP 20e8a-20e8b StackAdj> Δ+2 {}
<Const 0x20e8b 0x320.2> Δ-2 {[#800]}
<Blob 0x20e8e [10] 0x21aba> Δ-10 {[#800]|[«10»]}
<MI 20ea0 CLR.B -(A7)> Δ-2 {[#800]|[«10»]|[#0]}
<Call 0x20ea2 0x210bc> {[#800]|[«10»]|[#0]}
exp_WRITE_REG.TYP(Sw_2, Sw_8_1, Sw_1)
<POP 20ea8-20eaa StackAdj> Δ+10 {[#800]|[-2-]}
<POP 20eaa-20eab StackAdj> Δ+4 {}
<Blob 0x20eab [4] @> Δ-4 {[«4""»]}
<Blob 0x20eae [4] @> Δ-4 {[«4""»]|[«4""»]}
<MI 20eb2 CLR.B -(A7)> Δ-2 {[«4""»]|[«4""»]|[#0]}
<Call 0x20eb4 0x211ec> {[«4""»]|[«4""»]|[#0]}
exp_LOAD_WDR.VAL(Sw_8, Sw_1)
<POP 20eba-20ebc StackAdj> Δ+6 {[«4""»]}
<POP 20ebc-20ebd StackAdj> Δ+4 {}
<Blob 0x20ebd [4] @> Δ-4 {[«4""»]}
<Blob 0x20ec0 [4] @> Δ-4 {[«4""»]|[«4""»]}
<MI 20ec4 CLR.B -(A7)> Δ-2 {[«4""»]|[«4""»]|[#0]}
<Call 0x20ec6 0x21148> {[«4""»]|[«4""»]|[#0]}
exp_LOAD_WDR.TYP(Sw_8, Sw_1)
<POP 20ecc-20ece StackAdj> Δ+10 {}
<Call 0x20ece 0x20c50> {}
<Const 0x20ed2 0x100.2> Δ-2 {[#256]}
<Call 0x20ed6 0x20604> {[#256]}
<POP 20eda-20edc StackAdj> Δ+2 {}
<Call 0x20edc 0x2077a> {}
<Const 0x20ee0 0x21aab.4> Δ-4 {[##137899]}
<Call 0x20ee6 0x20b44> {[##137899]}
<POP 20eea-20eec StackAdj> Δ+2 {[-2-]}
<POP 20eec-20eed StackAdj> Δ+2 {}
<Blob 0x20eed [2] 0x21aab> Δ-2 {[«2»]}
<Call 0x20ef2 0x20948> {[«2»]}
<POP 20ef6-20ef8 StackAdj> Δ+2 {}
<MI 20ef8 TST.B 0x21aa8> {}
<MI 20efe BEQ 0x20f12> {}
<POP 20f00-20f04 Naked> Σ0 ↓ →0x20f12
<MI 20f00 TST.B 0x21aaa> {}
<MI 20f02 BNE 0x20f12> {}
<POP 20f04-20f12 Naked> Σ0 ↓
<Blob 0x20f04 [2] 0x21aa9> Δ-2 {[«2»]}
<Const 0x20f06 0x21aad.4> Δ-4 {[«2»]|[##137901]}
<Call 0x20f0c 0x2034c> {[«2»]|[##137901]}
<POP 20f10-20f12 StackAdj> Δ+6 {}
<POP 20f12-20f32 Naked> Σ0 ↓ ←0x20e1a ←0x20f00
<Call 0x20f12 0x10538> {}
IPC_Init(void)
<Blob 0x20f18 [2] 0x21aa8> Δ-2 {[«2»]}
<Call 0x20f1e 0x10502> {[«2»]}
IPC_PutBool(a : Bool)
<MI 20f24 CLR.B (A7)> {[«2»]}
<Const 0x20f26 0x1.4> Δ-4 {[«2»]|[##1]}
<Call 0x20f2a 0x103b8> {[«2»]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 20f30-20f32 StackAdj> Δ+6 {}
<POP 20f32-20f38 Naked> Σ0
<Call 0x20f32 0x10284> {}
?exit
@ 2123a
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 4(r)>
<POP 2123a-212e4 Body> Δ+12
<POP 2123a-21250 Prologue> Σ0 ↓
<POP 21250-21256 RegCacheLoad> Σ0 ↓
<POP 21256-21262 Naked> Σ0 ↓ →0x21274
<POP 21256-21258 StackAdj> Δ-2 {[-2-]}
<Call 0x21258 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2125e TST.B (A7)+> Δ+2 {}
<MI 21260 BEQ 0x21274> {}
<POP 21262-21274 Naked> Σ0 Δ-12 →0x21284
<Blob 0x21262 [12] @> Δ-12 {[«12""»]}
<MI 21272 BRA 0x21284> {[«12""»]}
<POP 21274-21284 Naked> Σ0 Δ-12 ↓ ←0x21256
<Blob 0x21274 [12] @> Δ-12 {[«12""»]}
<POP 21284-212dc Naked> Σ-12 Δ+12 ↓ ←0x21262
<POP 21284-21286 StackAdj> Δ-4 {[-16-]}
<Lit 0x21286> {[-12-]|[$$…]}
<Pointer.sp 0x21286 4> Δ-4
<Const 0x2128a 0x1.2> Δ-2
<Const 0x2128e 0xb.2> Δ-2
<Call 0x21292 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21298-2129a StackAdj> Δ+8
<Pointer.fp 0x2129a <LVAR -0x004 @ 4(r)>> Δ-4 {[-12-]|[$$…]|[@@-4]}
<Call 0x2129c 0x10460> {[-12-]|[$$…]|[@@-4]}
ExpLoad(a : String; b: Pointer)
<POP 212a2-212a6 StackAdj> Δ+20 {}
<MI 212a6 MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<MI 212aa MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']}
<Pointer.sp 0x212ac 4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]}
<Const 0x212b0 0x0.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]}
<Const 0x212b4 0x0.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
<Call 0x212b8 0x10466> {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 212be-212c2 StackAdj> Δ+16 {[2, '(A6+0x8)']}
<MI 212c2 CLR.B (A7)> {[2, '(A6+0x8)']}
<MI 212c4 MOVE.B (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0x8)']|[2, '(A6+0xa)']}
<MI 212c8 MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[2, '(A6+0xa)']|[4, '(A6-0x4)']}
<Call 0x212ca 0x104ba> {[2, '(A6+0x8)']|[2, '(A6+0xa)']|[4, '(A6-0x4)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 212d0-212d2 StackAdj> Δ+8 {}
<Pointer.fp 0x212d2 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x212d4 0x10496> {[@@-4]}
ExpClose(exp : Pointer)
<POP 212da-212dc StackAdj> Δ+4 {}
<POP 212dc-212e4 Epilogue> Σ0
@ 212f8
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 212f8-21386 Body> Δ+10
<POP 212f8-2130e Prologue> Σ0 ↓
<POP 2130e-21314 RegCacheLoad> Σ0 ↓
<POP 21314-21320 Naked> Σ0 ↓ →0x21332
<POP 21314-21316 StackAdj> Δ-2 {[-2-]}
<Call 0x21316 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2131c TST.B (A7)+> Δ+2 {}
<MI 2131e BEQ 0x21332> {}
<POP 21320-21332 Naked> Σ0 Δ-10 →0x21342
<Blob 0x21320 [10] @> Δ-10 {[«10""»]}
<MI 21330 BRA 0x21342> {[«10""»]}
<POP 21332-21342 Naked> Σ0 Δ-10 ↓ ←0x21314
<Blob 0x21332 [10] @> Δ-10 {[«10""»]}
<POP 21342-2137e Naked> Σ-10 Δ+10 ↓ ←0x21320
<POP 21342-21344 StackAdj> Δ-4 {[-14-]}
<Lit 0x21344> {[-10-]|[$$…]}
<Pointer.sp 0x21344 4> Δ-4
<Const 0x21348 0x1.2> Δ-2
<Const 0x2134c 0x9.2> Δ-2
<Call 0x21350 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21356-21358 StackAdj> Δ+8
<Pointer.fp 0x21358 <LVAR -0x006 @ 4(r)>> Δ-4 {[-10-]|[$$…]|[@@-6]}
<Call 0x2135a 0x10460> {[-10-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 21360-21364 StackAdj> Δ+18 {}
<MI 21364 CLR.B -(A7)> Δ-2 {[#0]}
<MI 21366 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 2136a MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x2136c 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 21372-21374 StackAdj> Δ+8 {}
<Pointer.fp 0x21374 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x21376 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 2137c-2137e StackAdj> Δ+4 {}
<POP 2137e-21386 Epilogue> Σ0
@ 213a2
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 213a2-21430 Body> Δ+14
<POP 213a2-213b8 Prologue> Σ0 ↓
<POP 213b8-213be RegCacheLoad> Σ0 ↓
<POP 213be-213ca Naked> Σ0 ↓ →0x213dc
<POP 213be-213c0 StackAdj> Δ-2 {[-2-]}
<Call 0x213c0 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 213c6 TST.B (A7)+> Δ+2 {}
<MI 213c8 BEQ 0x213dc> {}
<POP 213ca-213dc Naked> Σ0 Δ-14 →0x213ec
<Blob 0x213ca [14] @> Δ-14 {[«14""»]}
<MI 213da BRA 0x213ec> {[«14""»]}
<POP 213dc-213ec Naked> Σ0 Δ-14 ↓ ←0x213be
<Blob 0x213dc [14] @> Δ-14 {[«14""»]}
<POP 213ec-21428 Naked> Σ-14 Δ+14 ↓ ←0x213ca
<POP 213ec-213ee StackAdj> Δ-4 {[-18-]}
<Lit 0x213ee> {[-14-]|[$$…]}
<Pointer.sp 0x213ee 4> Δ-4
<Const 0x213f2 0x1.2> Δ-2
<Const 0x213f6 0xd.2> Δ-2
<Call 0x213fa 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21400-21402 StackAdj> Δ+8
<Pointer.fp 0x21402 <LVAR -0x006 @ 4(r)>> Δ-4 {[-14-]|[$$…]|[@@-6]}
<Call 0x21404 0x10460> {[-14-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 2140a-2140e StackAdj> Δ+22 {}
<MI 2140e CLR.B -(A7)> Δ-2 {[#0]}
<MI 21410 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 21414 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x21416 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 2141c-2141e StackAdj> Δ+8 {}
<Pointer.fp 0x2141e <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x21420 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 21426-21428 StackAdj> Δ+4 {}
<POP 21428-21430 Epilogue> Σ0
@ 21450
<LVAR 0x00e 1(r)>
<LVAR 0x00c 1(r)>
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 4(r)>
<POP 21450-21514 Body> Δ+16
<POP 21450-21466 Prologue> Σ0 ↓
<POP 21466-2146c RegCacheLoad> Σ0 ↓
<POP 2146c-21478 Naked> Σ0 ↓ →0x2148a
<POP 2146c-2146e StackAdj> Δ-2 {[-2-]}
<Call 0x2146e 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 21474 TST.B (A7)+> Δ+2 {}
<MI 21476 BEQ 0x2148a> {}
<POP 21478-2148a Naked> Σ0 Δ-16 →0x2149a
<Blob 0x21478 [16] @> Δ-16 {[«16""»]}
<MI 21488 BRA 0x2149a> {[«16""»]}
<POP 2148a-2149a Naked> Σ0 Δ-16 ↓ ←0x2146c
<Blob 0x2148a [16] @> Δ-16 {[«16""»]}
<POP 2149a-2150c Naked> Σ-16 Δ+16 ↓ ←0x21478
<POP 2149a-2149c StackAdj> Δ-4 {[-20-]}
<Lit 0x2149c> {[-16-]|[$$…]}
<Pointer.sp 0x2149c 4> Δ-4
<Const 0x214a0 0x1.2> Δ-2
<Const 0x214a4 0xf.2> Δ-2
<Call 0x214a8 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 214ae-214b0 StackAdj> Δ+8
<Pointer.fp 0x214b0 <LVAR -0x004 @ 4(r)>> Δ-4 {[-16-]|[$$…]|[@@-4]}
<Call 0x214b2 0x10460> {[-16-]|[$$…]|[@@-4]}
ExpLoad(a : String; b: Pointer)
<POP 214b8-214bc StackAdj> Δ+24 {}
<MI 214bc MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 214be MOVE.B (A6+0xc),-(A7)> Δ-2 {[4, '(A6-0x4)']|[2, '(A6+0xc)']}
<Call 0x214c2 0x1046c> {[4, '(A6-0x4)']|[2, '(A6+0xc)']}
ExpInputFlag(exp : Pointer; val : Word)
<POP 214c8-214ca StackAdj> Δ+2 {[4, '(A6-0x4)']}
<MI 214ca MOVE.L (A6-0x4),(A7)> {[4, '(A6-0x4)']}
<MI 214cc MOVE.B (A6+0xa),-(A7)> Δ-2 {[4, '(A6-0x4)']|[2, '(A6+0xa)']}
<Call 0x214d0 0x1046c> {[4, '(A6-0x4)']|[2, '(A6+0xa)']}
ExpInputFlag(exp : Pointer; val : Word)
<POP 214d6-214d8 StackAdj> Δ+4 {[-2-]}
<MI 214d8 MOVE.B (A6+0x8),(A7)> {[-2-]}
<MI 214dc MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x4)']}
<Pointer.sp 0x214de 4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]}
<Const 0x214e2 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]}
<Const 0x214e6 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
<Call 0x214ea 0x10466> {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 214f0-214f2 StackAdj> Δ+16 {[-2-]}
<MI 214f2 CLR.B (A7)> {[-2-]}
<MI 214f4 MOVE.B (A6+0xe),-(A7)> Δ-2 {[-2-]|[2, '(A6+0xe)']}
<MI 214f8 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[2, '(A6+0xe)']|[4, '(A6-0x4)']}
<Call 0x214fa 0x104ba> {[-2-]|[2, '(A6+0xe)']|[4, '(A6-0x4)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 21500-21502 StackAdj> Δ+8 {}
<Pointer.fp 0x21502 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x21504 0x10496> {[@@-4]}
ExpClose(exp : Pointer)
<POP 2150a-2150c StackAdj> Δ+4 {}
<POP 2150c-21514 Epilogue> Σ0
@ 21534
<LVAR 0x01c 1(r)>
<LVAR 0x01a 1(r)>
<LVAR 0x019 1(r)>
<LVAR 0x018 1(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x006 @ 4(r)>
<POP 21534-2162c Body> Δ+16
<POP 21534-2154a Prologue> Σ0 ↓
<POP 2154a-2155a RegCacheLoad> Σ0 ↓
<POP 2155a-21566 Naked> Σ0 ↓ →0x21578
<POP 2155a-2155c StackAdj> Δ-2 {[-2-]}
<Call 0x2155c 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 21562 TST.B (A7)+> Δ+2 {}
<MI 21564 BEQ 0x21578> {}
<POP 21566-21578 Naked> Σ0 Δ-16 →0x21588
<Blob 0x21566 [16] @> Δ-16 {[«16""»]}
<MI 21576 BRA 0x21588> {[«16""»]}
<POP 21578-21588 Naked> Σ0 Δ-16 ↓ ←0x2155a
<Blob 0x21578 [16] @> Δ-16 {[«16""»]}
<POP 21588-21624 Naked> Σ-16 Δ+16 ↓ ←0x21566
<POP 21588-2158a StackAdj> Δ-4 {[-20-]}
<Lit 0x2158a> {[-16-]|[$$…]}
<Pointer.sp 0x2158a 4> Δ-4
<Const 0x2158e 0x1.2> Δ-2
<Const 0x21592 0xf.2> Δ-2
<Call 0x21596 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2159c-2159e StackAdj> Δ+8
<Pointer.fp 0x2159e <LVAR -0x006 @ 4(r)>> Δ-4 {[-16-]|[$$…]|[@@-6]}
<Call 0x215a0 0x10460> {[-16-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 215a6-215aa StackAdj> Δ+24 {}
<MI 215aa MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 215ae MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 215b2 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '(A6-0x6)']}
<Pointer.sp 0x215b4 4> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '(A6-0x6)']|[^^4]}
<Const 0x215b8 0x0.4> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '(A6-0x6)']|[^^4]|[##0]}
<Const 0x215ba 0x7.4> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '(A6-0x6)']|[^^4]|[##0]|[##7]}
<Call 0x215be 0x10466> {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '(A6-0x6)']|[^^4]|[##0]|[##7]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 215c0-215c4 StackAdj> Δ+20 {[4, '(A6+0xc)']}
<MI 215c4 MOVE.L (A6+0x14),(A7)> {[4, '(A6+0x14)']}
<MI 215c8 MOVE.L (A6+0x10),-(A7)> Δ-4 {[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 215cc MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6-0x6)']}
<Pointer.sp 0x215ce 4> Δ-4 {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6-0x6)']|[^^4]}
<Const 0x215d2 0x0.4> Δ-4 {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6-0x6)']|[^^4]|[##0]}
<Const 0x215d4 0x7.4> Δ-4 {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6-0x6)']|[^^4]|[##0]|[##7]}
<Call 0x215d8 0x10466> {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6-0x6)']|[^^4]|[##0]|[##7]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 215da-215de StackAdj> Δ+22 {[-2-]}
<MI 215de MOVE.B (A6+0x18),(A7)> {[-2-]}
<MI 215e2 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x6)']}
<Pointer.sp 0x215e4 4> Δ-4 {[-2-]|[4, '(A6-0x6)']|[^^4]}
<Const 0x215e8 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]}
<Const 0x215ea 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]|[##0]}
<Call 0x215ec 0x10466> {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 215ee-215f0 StackAdj> Δ+16 {[-2-]}
<MI 215f0 MOVE.B (A6+0x19),(A7)> {[-2-]}
<MI 215f4 MOVE.B (A6+0x1a),(A7+0x1)> {[-2-]}
<MI 215fa MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x6)']}
<Pointer.sp 0x215fc 4> Δ-4 {[-2-]|[4, '(A6-0x6)']|[^^4]}
<Const 0x21600 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]}
<Const 0x21602 0x1.4> Δ-4 {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]|[##1]}
<Call 0x21606 0x10466> {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]|[##1]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 21608-2160a StackAdj> Δ+16 {[-2-]}
<MI 2160a CLR.B (A7)> {[-2-]}
<MI 2160c MOVE.B (A6+0x1c),-(A7)> Δ-2 {[-2-]|[2, '(A6+0x1c)']}
<MI 21610 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[2, '(A6+0x1c)']|[4, '(A6-0x6)']}
<Call 0x21612 0x104ba> {[-2-]|[2, '(A6+0x1c)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 21618-2161a StackAdj> Δ+8 {}
<Pointer.fp 0x2161a <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x2161c 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 21622-21624 StackAdj> Δ+4 {}
<POP 21624-2162c Epilogue> Σ0
@ 21650
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 21650-216d4 Body> Δ+18
<POP 21650-21666 Prologue> Σ0 ↓
<POP 21666-2166a RegCacheLoad> Σ0 ↓
<POP 2166a-21676 Naked> Σ0 ↓ →0x21684
<POP 2166a-2166c StackAdj> Δ-2 {[-2-]}
<Call 0x2166c 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 21672 TST.B (A7)+> Δ+2 {}
<MI 21674 BEQ 0x21684> {}
<POP 21676-21684 Naked> Σ0 Δ-18 →0x21690
<Blob 0x21676 [18] @> Δ-18 {[«18""»]}
<MI 21682 BRA 0x21690> {[«18""»]}
<POP 21684-21690 Naked> Σ0 Δ-18 ↓ ←0x2166a
<Blob 0x21684 [18] @> Δ-18 {[«18""»]}
<POP 21690-216cc Naked> Σ-18 Δ+18 ↓ ←0x21676
<POP 21690-21692 StackAdj> Δ-4 {[-22-]}
<Lit 0x21692> {[-18-]|[$$…]}
<Pointer.sp 0x21692 4> Δ-4
<Const 0x21696 0x1.2> Δ-2
<Const 0x2169a 0x12.2> Δ-2
<Call 0x2169e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 216a4-216a6 StackAdj> Δ+8
<Pointer.fp 0x216a6 <LVAR -0x006 @ 4(r)>> Δ-4 {[-18-]|[$$…]|[@@-6]}
<Call 0x216a8 0x10460> {[-18-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 216ae-216b2 StackAdj> Δ+26 {}
<MI 216b2 CLR.B -(A7)> Δ-2 {[#0]}
<MI 216b4 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 216b8 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x216ba 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 216c0-216c2 StackAdj> Δ+8 {}
<Pointer.fp 0x216c2 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x216c4 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 216ca-216cc StackAdj> Δ+4 {}
<POP 216cc-216d4 Epilogue> Σ0
@ 21704
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 21704-21792 Body> Δ+24
<POP 21704-2171a Prologue> Σ0 ↓
<POP 2171a-21720 RegCacheLoad> Σ0 ↓
<POP 21720-2172c Naked> Σ0 ↓ →0x2173e
<POP 21720-21722 StackAdj> Δ-2 {[-2-]}
<Call 0x21722 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 21728 TST.B (A7)+> Δ+2 {}
<MI 2172a BEQ 0x2173e> {}
<POP 2172c-2173e Naked> Σ0 Δ-24 →0x2174e
<Blob 0x2172c [24] @> Δ-24 {[«24""»]}
<MI 2173c BRA 0x2174e> {[«24""»]}
<POP 2173e-2174e Naked> Σ0 Δ-24 ↓ ←0x21720
<Blob 0x2173e [24] @> Δ-24 {[«24""»]}
<POP 2174e-2178a Naked> Σ-24 Δ+24 ↓ ←0x2172c
<POP 2174e-21750 StackAdj> Δ-4 {[-28-]}
<Lit 0x21750> {[-24-]|[$$…]}
<Pointer.sp 0x21750 4> Δ-4
<Const 0x21754 0x1.2> Δ-2
<Const 0x21758 0x17.2> Δ-2
<Call 0x2175c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21762-21764 StackAdj> Δ+8
<Pointer.fp 0x21764 <LVAR -0x006 @ 4(r)>> Δ-4 {[-24-]|[$$…]|[@@-6]}
<Call 0x21766 0x10460> {[-24-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 2176c-21770 StackAdj> Δ+32 {}
<MI 21770 CLR.B -(A7)> Δ-2 {[#0]}
<MI 21772 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 21776 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x21778 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 2177e-21780 StackAdj> Δ+8 {}
<Pointer.fp 0x21780 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x21782 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 21788-2178a StackAdj> Δ+4 {}
<POP 2178a-21792 Epilogue> Σ0
@ 217ae
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 217ae-21832 Body> Δ+14
<POP 217ae-217c4 Prologue> Σ0 ↓
<POP 217c4-217c8 RegCacheLoad> Σ0 ↓
<POP 217c8-217d4 Naked> Σ0 ↓ →0x217e2
<POP 217c8-217ca StackAdj> Δ-2 {[-2-]}
<Call 0x217ca 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 217d0 TST.B (A7)+> Δ+2 {}
<MI 217d2 BEQ 0x217e2> {}
<POP 217d4-217e2 Naked> Σ0 Δ-14 →0x217ee
<Blob 0x217d4 [14] @> Δ-14 {[«14""»]}
<MI 217e0 BRA 0x217ee> {[«14""»]}
<POP 217e2-217ee Naked> Σ0 Δ-14 ↓ ←0x217c8
<Blob 0x217e2 [14] @> Δ-14 {[«14""»]}
<POP 217ee-2182a Naked> Σ-14 Δ+14 ↓ ←0x217d4
<POP 217ee-217f0 StackAdj> Δ-4 {[-18-]}
<Lit 0x217f0> {[-14-]|[$$…]}
<Pointer.sp 0x217f0 4> Δ-4
<Const 0x217f4 0x1.2> Δ-2
<Const 0x217f8 0xe.2> Δ-2
<Call 0x217fc 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21802-21804 StackAdj> Δ+8
<Pointer.fp 0x21804 <LVAR -0x006 @ 4(r)>> Δ-4 {[-14-]|[$$…]|[@@-6]}
<Call 0x21806 0x10460> {[-14-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 2180c-21810 StackAdj> Δ+22 {}
<MI 21810 CLR.B -(A7)> Δ-2 {[#0]}
<MI 21812 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 21816 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x21818 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 2181e-21820 StackAdj> Δ+8 {}
<Pointer.fp 0x21820 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x21822 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 21828-2182a StackAdj> Δ+4 {}
<POP 2182a-21832 Epilogue> Σ0
@ 218a8
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 218a8-21910 Body>
<POP 218a8-218be Prologue> Σ0 ↓
<POP 218be-21908 Naked> Σ0 ↓
<Blob 0x218be [14] @> Δ-14 {[«14""»]}
<Const 0x218ca 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 218ce-218d0 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x218d0 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 218e2-218e4 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 218e4 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 218e8 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 218ea EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 218ec MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x218ee 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 218f4-218f6 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x218f6 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 218fc-218fe StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x218fe 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 21904-21908 StackAdj> Δ+20 {}
<POP 21908-21910 Epilogue> Σ0
@ 21964
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 21964-21aa0 Body>
<POP 21964-2197a Prologue> Σ0 ↓
<POP 2197a-21990 RegCacheLoad> Σ0 ↓
<POP 21990-219f0 Naked> Σ0 ↓ →0x21a38
<Call 0x21990 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21996 [18] @> Δ-18 {[«18""»]}
<POP 219a2-219a4 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x219a4 18> {[«18""»]|[$$Experiment error :]}
<Call 0x219b0 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 219b2-219b3 StackAdj> Δ+22 ↓ {}
<Blob 0x219b3 [14] @> Δ-14 {[«14""»]}
<POP 219c2-219c4 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x219c4 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 219ce-219d0 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 219d0 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x219d4 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 219da-219dc StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x219dc 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 219e2-219e4 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x219e4 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 219e6-219e8 StackAdj> Δ+18 {}
<MI 219e8 MOVEA.L (A6+0xa),A0> {}
<MI 219ec CMPA.W #0x01,A0> {}
<MI 219ee BEQ 0x21a38> {}
<POP 219f0-21a38 Naked> Σ0 ↓
<Blob 0x219f0 [14] @> Δ-14 {[«14""»]}
<Blob 0x21a00 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 21a10-21a12 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x21a12 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 21a1c-21a1e StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x21a1e> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x21a1e 12> Δ-4
<Const 0x21a22 0x1.2> Δ-2
<Const 0x21a24 0x1e.2> Δ-2
<Call 0x21a26 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21a28-21a2a StackAdj> Δ+8
<Call 0x21a2a 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 21a30-21a32 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x21a32 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21a34-21a38 StackAdj> Δ+48 {}
<POP 21a38-21a98 Naked> Σ0 ↓ ←0x21990
<Blob 0x21a38 [14] @> Δ-14 {[«14""»]}
<POP 21a48-21a4a StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x21a4a 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 21a54-21a56 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 21a56 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x21a5a 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 21a60-21a62 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x21a62 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21a68-21a6a StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x21a6a 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21a6c-21a6d StackAdj> Δ+18 ↓ {}
<Blob 0x21a6d [24] @> Δ-24 {[«24""»]}
<Const 0x21a7c 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 21a80-21a82 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x21a82 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x21a90 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 21a96-21a98 StackAdj> Δ+30 {}
<POP 21a98-21aa0 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.62c2a4452f8953b6 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 0d 0a | | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 1b 14 | | .PTR 0x21b14 00020010 code.end: 00020010 00 02 1a a0 | | .PTR 0x21aa0 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 18 a8 | | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 19 64 | d | .CODE EXP_FAIL 00020020 00 00 00 00 | | .CONST 0x00000000 00020024 exp_init_done: 00020024 00 | | .CONST 0x00 00020025 00 | | .CONST 0x00 00020026 00 00 | | .CONST 0x0000 00020028 00 00 | | .CONST 0x0000 0002002a 00 00 | | .XXX[0x2] 0002002c 00 00 | | .CONST 0x0000 0002002e 00 00 | | .CONST 0x0000 00020030 00 00 | | .CONST 0x0000 00020032 00 00 00 00 00 00 | | .XXX[0x6] 00020038 00 00 00 00 00 00 00 00 | | .BLANK 00[0xb0] 000200e8 00 00 00 00 | | .XXX[0x4] 000200ec 00 00 00 00 | | .PTR 0x0 000200f0 is_open_ERROR_LOG: 000200f0 00 | | .CONST 0x0 000200f1 write_error_ERROR_LOG: 000200f1 00 | | .CONST 0x0 000200f2 00 00 00 00 | | .CONST 0x00000000 000200f6 00 00 00 00 | | .CONST 0x00000000 000200fa 00 | | .CONST 0x00 000200fb 00 | | .CONST 0x00 000200fc file_ERROR_LOG: 000200fc 00 00 00 00 | | .CONST 0x00000000 00020100 00 00 00 00 | | .CONST 0x00000000 00020104 00 00 | | .CONST 0x0000 00020106 00 00 | | .CONST 0x0000 00020108 somekindoffsflag: 00020108 00 | | .CONST 0x00 00020109 00 | | .CONST 0x00 0002010a 49 4e 49 54 53 54 41 54 |INITSTAT| .TXT 'INITSTATE ' 00020114 53 42 55 53 55 4c 4f 41 |SBUSULOA| .TXT 'SBUSULOAD ' 0002011e 44 42 55 53 55 4c 4f 41 |DBUSULOA| .TXT 'DBUSULOAD ' 00020128 40 28 23 29 52 55 4e 5f |@(#)RUN_| .XXX[0x20] 00020130 55 44 49 41 47 2c 31 2e |UDIAG,1.| 00020138 31 2c 39 32 2f 30 31 2f |1,92/01/| 00020140 31 36 2c 31 37 3a 31 38 |16,17:18| 00020148 3a 31 39 5c |:19\ | .XXX[0x4] 0002014c 64 65 74 65 63 74 65 64 |detected| .TXT 'detected a MACHINE_CHECK, therefore_' 00020170 45 4d |EM | .TXT 'EM' 00020172 42 41 |BA | .TXT 'BA' 00020174 4c 4d |LM | .TXT 'LM' 00020176 75 44 49 41 47 20 66 61 |uDIAG fa| .TXT 'uDIAG failed: a MACHINE_CHECK occured ' 0002019c 75 44 49 41 47 20 66 61 |uDIAG fa| .TXT 'uDIAG failed: MACHINE_CHECK but the EMABLM program failed ' 000201d6 75 44 49 41 |uDIA | .TXT 'uDIA' 000201da 47 20 70 61 |G pa | .TXT 'G pa' 000201de 73 73 65 64 |ssed | .TXT 'ssed' 000201e2 75 44 49 41 47 20 66 61 |uDIAG fa| .TXT 'uDIAG failed: it did an error halt at uaddr_' 0002020e 75 44 49 41 47 20 66 61 |uDIAG fa| .TXT 'uDIAG failed: we timed out waiting for it to halt ' 00020240 69 6e 74 65 72 6e 61 6c |internal| .TXT 'internal error: no MCHK or HALT or TIMEOUT' 0002026a 70 72 65 70 61 72 69 6e |preparin| .TXT 'preparing to run the microdiagnostic (uDIAG)' 00020296 54 68 65 20 6c 6f 6e 67 |The long| .TXT 'The long version stress tests the DRAMs but runs 2 minutes longer ' 000202d8 44 6f 20 79 6f 75 20 77 |Do you w| .TXT 'Do you want to run the long version ' 000202fc 44 49 41 47 2e 4d 32 30 |DIAG.M20| .TXT 'DIAG.M200_UCODE ' 0002030c 00 00 00 00 | | .CONST 0x0,0x0,0x0,0x0 00020310 00 00 00 00 | | .CONST 0x0,0x0,0x0,0x0 00020314 05 01 04 07 | | .XXX[0x4] 00020318 06 02 03 0c 0d 0e 0f 01 | | .XXX[0x8] 00020320 00 00 00 00 00 00 00 00 | | .CONST 0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x1c,0x0 00020334 00 00 00 00 | | .XXX[0x4] 00020338 00 00 01 00 00 00 00 00 | | .XXX[0x10] 00020340 00 00 00 00 00 00 00 00 | | 00020348 00 00 01 00 | | .XXX[0x4] 0002034c ; -------------------------------------------------------------------------------------- 0002034c ; OMSI PASCAL Function 0002034c ; <LVAR 0x00c 1(r)> 0002034c ; <LVAR 0x008 4(r)> 0002034c ; <LVAR -0x002 @> 0002034c ; -------------------------------------------------------------------------------------- 0002034c 4e 56 ff d6 |NV | LINK.W A6,#0xffd6 00020350 bf d5 | | CMPA.L (A5),A7 00020352 62 06 |b | BHI 0x2035a 00020354 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020358 4e 76 |Nv | TRAPV 0002035a de fc 00 28 | ( | ADDA.W #0x28,A7 0002035e 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00020362 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020368 1f 2e 00 0c | . | MOVE.B (A6+0xc),-(A7) 0002036c 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00020372 54 4f |TO | ADDQ.L #0x2,A7 00020374 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 0002037a 9e fc 00 0a | | SUBA.W #0xa,A7 0002037e 20 4f | O | MOVEA.L A7,A0 00020380 43 fa fd 88 |C | LEA.L 0x2010a,A1 00020384 70 08 |p | MOVEQ.L #0x08,D0 00020386 10 d9 | | MOVE.B (A1)+,(A0)+ 00020388 51 c8 ff fc |Q | DBF D0,0x20386 0002038c 59 4f |YO | SUBQ.L #0x4,A7 0002038e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020392 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020396 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 0002039a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000203a0 50 4f |PO | ADDQ.L #0x8,A7 000203a2 48 78 00 01 |Hx | PEA.L 0x1 000203a6 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000203aa 48 6e ff fe |Hn | PEA.L (A6-0x2) 000203ae 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 000203b4 de fc 00 18 | | ADDA.W #0x18,A7 000203b8 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000203be 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000203c2 48 50 |HP | PEA.L (A0) 000203c4 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 000203ca 58 4f |XO | ADDQ.L #0x4,A7 000203cc 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 000203d2 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 000203d6 4e 5e |N^ | UNLK A6 000203d8 4e 75 |Nu | RTS 000203da ; -------------------------------------------------------------------------------------- 000203da ; OMSI PASCAL Function 000203da ; <LVAR 0x008 4(r)> 000203da ; -------------------------------------------------------------------------------------- 000203da 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 ; Spelunked 000203de bf d5 | | CMPA.L (A5),A7 000203e0 62 06 |b | BHI 0x203e8 000203e2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000203e6 4e 76 |Nv | TRAPV 000203e8 de fc 00 0c | | ADDA.W #0xc,A7 000203ec 48 e7 00 80 |H | MOVEM.L A0,-(A7) 000203f0 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000203f6 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000203fa 48 50 |HP | PEA.L (A0) 000203fc 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020402 58 4f |XO | ADDQ.L #0x4,A7 00020404 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 0002040a 4c df 01 00 |L | MOVEM.L (A7)+,A0 0002040e 4e 5e |N^ | UNLK A6 00020410 4e 75 |Nu | RTS 00020412 ; -------------------------------------------------------------------------------------- 00020412 ; OMSI PASCAL Function 00020412 ; <LVAR 0x008 1(r)> 00020412 ; -------------------------------------------------------------------------------------- 00020412 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 ; Spelunked 00020416 bf d5 | | CMPA.L (A5),A7 00020418 62 06 |b | BHI 0x20420 0002041a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002041e 4e 76 |Nv | TRAPV 00020420 de fc 00 0a | | ADDA.W #0xa,A7 00020424 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 0002042a 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 0002042e 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00020434 54 4f |TO | ADDQ.L #0x2,A7 00020436 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 0002043c 42 27 |B' | CLR.B -(A7) 0002043e 48 78 00 01 |Hx | PEA.L 0x1 00020442 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020448 5c 4f |\O | ADDQ.L #0x6,A7 0002044a 4e 5e |N^ | UNLK A6 0002044c 4e 75 |Nu | RTS 0002044e ; -------------------------------------------------------------------------------------- 0002044e ; OMSI PASCAL Function 0002044e ; <LVAR 0x016 1(r)> 0002044e ; <LVAR 0x012 4(r)> 0002044e ; <LVAR 0x010 1(r)> 0002044e ; <LVAR 0x00e 1(r)> 0002044e ; <LVAR 0x00c 1(r)> 0002044e ; <LVAR 0x008 4(r)> 0002044e ; <LVAR -0x004 @> 0002044e ; -------------------------------------------------------------------------------------- 0002044e 4e 56 ff cc |NV | LINK.W A6,#0xffcc 00020452 bf d5 | | CMPA.L (A5),A7 00020454 62 06 |b | BHI 0x2045c 00020456 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002045a 4e 76 |Nv | TRAPV 0002045c de fc 00 30 | 0 | ADDA.W #0x30,A7 00020460 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00020464 45 f9 00 01 05 02 |E | LEA.L IPC_PutBool(a : Bool),A2 0002046a 72 0a |r | MOVEQ.L #0x0a,D1 0002046c 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020472 2f 2e 00 12 |/. | MOVE.L (A6+0x12),-(A7) 00020476 4e b9 00 01 05 08 |N | JSR IPC_PutString(a : String) 0002047c 54 4f |TO | ADDQ.L #0x2,A7 0002047e 1e ae 00 10 | | MOVE.B (A6+0x10),(A7) 00020482 4e 92 |N | JSR (A2) 00020484 54 4f |TO | ADDQ.L #0x2,A7 00020486 4a 2e 00 16 |J. | TST.B (A6+0x16) 0002048a 66 0e |f | BNE 0x2049a 0002048c 1f 2e 00 0e | . | MOVE.B (A6+0xe),-(A7) 00020490 4e 92 |N | JSR (A2) 00020492 1e ae 00 0c | | MOVE.B (A6+0xc),(A7) 00020496 4e 92 |N | JSR (A2) 00020498 54 4f |TO | ADDQ.L #0x2,A7 0002049a 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 000204a0 4a 2e 00 16 |J. | TST.B (A6+0x16) 000204a4 67 12 |g | BEQ 0x204b8 000204a6 9e c1 | | SUBA.W D1,A7 000204a8 20 4f | O | MOVEA.L A7,A0 000204aa 43 fa fc 68 |C h | LEA.L 0x20114,A1 000204ae 70 08 |p | MOVEQ.L #0x08,D0 000204b0 10 d9 | | MOVE.B (A1)+,(A0)+ 000204b2 51 c8 ff fc |Q | DBF D0,0x204b0 000204b6 60 10 |` | BRA 0x204c8 000204b8 9e c1 | | SUBA.W D1,A7 000204ba 20 4f | O | MOVEA.L A7,A0 000204bc 43 fa fc 60 |C ` | LEA.L 0x2011e,A1 000204c0 70 08 |p | MOVEQ.L #0x08,D0 000204c2 10 d9 | | MOVE.B (A1)+,(A0)+ 000204c4 51 c8 ff fc |Q | DBF D0,0x204c2 000204c8 59 4f |YO | SUBQ.L #0x4,A7 000204ca 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000204ce 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000204d2 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 000204d6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000204dc 50 4f |PO | ADDQ.L #0x8,A7 000204de 48 78 00 01 |Hx | PEA.L 0x1 000204e2 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000204e6 48 6e ff fc |Hn | PEA.L (A6-0x4) 000204ea 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 000204f0 de fc 00 18 | | ADDA.W #0x18,A7 000204f4 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000204fa 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000204fe 48 50 |HP | PEA.L (A0) 00020500 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020506 58 4f |XO | ADDQ.L #0x4,A7 00020508 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 0002050e 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00020512 4e 5e |N^ | UNLK A6 00020514 4e 75 |Nu | RTS 00020516 ; -------------------------------------------------------------------------------------- 00020516 ; OMSI PASCAL Function 00020516 ; <LVAR -0x004 1(rw)> 00020516 ; -------------------------------------------------------------------------------------- 00020516 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 0002051a bf d5 | | CMPA.L (A5),A7 0002051c 62 06 |b | BHI 0x20524 0002051e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020522 4e 76 |Nv | TRAPV 00020524 de fc 00 24 | $ | ADDA.W #0x24,A7 00020528 48 e7 e1 80 |H | MOVEM.L A0+D7+D2+D1+D0,-(A7) 0002052c 41 ee ff fc |A | LEA.L (A6-0x4),A0 00020530 72 0f |r | MOVEQ.L #0x0f,D1 00020532 74 01 |t | MOVEQ.L #0x01,D2 00020534 1f 3c 00 05 | < | MOVE.B #0x05,-(A7) 00020538 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 0002053c 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 00020542 54 4f |TO | ADDQ.L #0x2,A7 00020544 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002054a 4a 1f |J | TST.B (A7)+ 0002054c 67 08 |g | BEQ 0x20556 0002054e 4e b9 00 02 0f 38 |N 8 | JSR exp_LOAD_HRAM_8_0.FIU() 00020554 60 06 |` | BRA 0x2055c 00020556 4e b9 00 02 0f 56 |N V | JSR exp_LOAD_HRAM_32_0.FIU() 0002055c 4e b9 00 02 0f e6 |N | JSR exp_LOAD_HRAM_1.FIU() 00020562 4e b9 00 02 12 08 |N | JSR exp_ALIGN_CSA.VAL() 00020568 4e b9 00 02 11 86 |N | JSR exp_ALIGN_CSA.TYP() 0002056e 42 10 |B | CLR.B (A0) 00020570 7e 0c |~ | MOVEQ.L #0x0c,D7 00020572 55 4f |UO | SUBQ.L #0x2,A7 00020574 1f 07 | | MOVE.B D7,-(A7) 00020576 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 0002057c 54 4f |TO | ADDQ.L #0x2,A7 0002057e 4a 1f |J | TST.B (A7)+ 00020580 67 0c |g | BEQ 0x2058e 00020582 42 80 |B | CLR.L D0 00020584 10 10 | | MOVE.B (A0),D0 00020586 52 40 |R@ | ADDQ.W #0x1,D0 00020588 41 bc 00 ff |A | CHK.W #0xff,D0 0002058c 10 80 | | MOVE.B D0,(A0) 0002058e 52 07 |R | ADDQ.B #0x1,D7 00020590 be 01 | | CMP.B D1,D7 00020592 6f de |o | BLE 0x20572 00020594 7e 0c |~ | MOVEQ.L #0x0c,D7 00020596 55 4f |UO | SUBQ.L #0x2,A7 00020598 1f 07 | | MOVE.B D7,-(A7) 0002059a 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 000205a0 54 4f |TO | ADDQ.L #0x2,A7 000205a2 4a 1f |J | TST.B (A7)+ 000205a4 67 3a |g: | BEQ 0x205e0 000205a6 1f 07 | | MOVE.B D7,-(A7) 000205a8 55 4f |UO | SUBQ.L #0x2,A7 000205aa 1f 07 | | MOVE.B D7,-(A7) 000205ac 4e b9 00 01 04 c6 |N | JSR EQ_1c218(a : Byte) : Bool 000205b2 54 4f |TO | ADDQ.L #0x2,A7 000205b4 10 17 | | MOVE.B (A7),D0 000205b6 48 80 |H | EXTB.W D0 000205b8 41 82 |A | CHK.W D2,D0 000205ba 1e 80 | | MOVE.B D0,(A7) 000205bc 55 4f |UO | SUBQ.L #0x2,A7 000205be 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000205c4 10 17 | | MOVE.B (A7),D0 000205c6 48 80 |H | EXTB.W D0 000205c8 41 82 |A | CHK.W D2,D0 000205ca 1e 80 | | MOVE.B D0,(A7) 000205cc 1f 10 | | MOVE.B (A0),-(A7) 000205ce 4e b9 00 02 14 50 |N P | JSR 0x21450 000205d4 5c 4f |\O | ADDQ.L #0x6,A7 000205d6 1e 87 | | MOVE.B D7,(A7) 000205d8 4e b9 00 02 16 50 |N P | JSR 0x21650 000205de 54 4f |TO | ADDQ.L #0x2,A7 000205e0 52 07 |R | ADDQ.B #0x1,D7 000205e2 be 01 | | CMP.B D1,D7 000205e4 6f b0 |o | BLE 0x20596 000205e6 4e b9 00 01 05 b0 |N | JSR FifoInit(void) 000205ec 3f 3c ff ff |?< | MOVE.W #0xffff,-(A7) 000205f0 3f 3c ff ff |?< | MOVE.W #0xffff,-(A7) 000205f4 4e b9 00 02 0f c2 |N | JSR exp_LOAD_REFRESH_REGS.FIU(Sw_2, Sw_2) 000205fa 58 4f |XO | ADDQ.L #0x4,A7 000205fc 4c df 01 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0 00020600 4e 5e |N^ | UNLK A6 00020602 4e 75 |Nu | RTS 00020604 ; -------------------------------------------------------------------------------------- 00020604 ; OMSI PASCAL Function 00020604 ; <LVAR 0x008 2(r)> 00020604 ; <LVAR -0x002 1(rw)> 00020604 ; -------------------------------------------------------------------------------------- 00020604 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00020608 bf d5 | | CMPA.L (A5),A7 0002060a 62 06 |b | BHI 0x20612 0002060c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020610 4e 76 |Nv | TRAPV 00020612 de fc 00 2c | , | ADDA.W #0x2c,A7 00020616 48 e7 f0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7) 0002061a 41 f9 00 01 04 c0 |A | LEA.L HasBoard(diproc_addr: Byte) : Byte,A0 00020620 43 ee ff fe |C | LEA.L (A6-0x2),A1 00020624 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00020628 47 f9 00 02 12 3a |G : | LEA.L 0x2123a,A3 0002062e 49 f9 00 02 17 ae |I | LEA.L 0x217ae,A4 00020634 70 0c |p | MOVEQ.L #0x0c,D0 00020636 72 0d |r | MOVEQ.L #0x0d,D1 00020638 74 0e |t | MOVEQ.L #0x0e,D2 0002063a 76 0f |v | MOVEQ.L #0x0f,D3 0002063c 4e b9 00 02 11 64 |N d | JSR exp_LOAD_BENIGN_UWORD.TYP() 00020642 55 4f |UO | SUBQ.L #0x2,A7 00020644 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002064a 4a 1f |J | TST.B (A7)+ 0002064c 67 04 |g | BEQ 0x20652 0002064e 42 11 |B | CLR.B (A1) 00020650 60 04 |` | BRA 0x20656 00020652 12 bc 00 ff | | MOVE.B #0xff,(A1) 00020656 55 4f |UO | SUBQ.L #0x2,A7 00020658 1f 00 | | MOVE.B D0,-(A7) 0002065a 4e 90 |N | JSR (A0) 0002065c 54 4f |TO | ADDQ.L #0x2,A7 0002065e 4a 1f |J | TST.B (A7)+ 00020660 67 08 |g | BEQ 0x2066a 00020662 1f 00 | | MOVE.B D0,-(A7) 00020664 1f 11 | | MOVE.B (A1),-(A7) 00020666 4e 93 |N | JSR (A3) 00020668 58 4f |XO | ADDQ.L #0x4,A7 0002066a 55 4f |UO | SUBQ.L #0x2,A7 0002066c 1f 01 | | MOVE.B D1,-(A7) 0002066e 4e 90 |N | JSR (A0) 00020670 54 4f |TO | ADDQ.L #0x2,A7 00020672 4a 1f |J | TST.B (A7)+ 00020674 67 08 |g | BEQ 0x2067e 00020676 1f 01 | | MOVE.B D1,-(A7) 00020678 1f 11 | | MOVE.B (A1),-(A7) 0002067a 4e 93 |N | JSR (A3) 0002067c 58 4f |XO | ADDQ.L #0x4,A7 0002067e 55 4f |UO | SUBQ.L #0x2,A7 00020680 1f 02 | | MOVE.B D2,-(A7) 00020682 4e 90 |N | JSR (A0) 00020684 54 4f |TO | ADDQ.L #0x2,A7 00020686 4a 1f |J | TST.B (A7)+ 00020688 67 08 |g | BEQ 0x20692 0002068a 1f 02 | | MOVE.B D2,-(A7) 0002068c 1f 11 | | MOVE.B (A1),-(A7) 0002068e 4e 93 |N | JSR (A3) 00020690 58 4f |XO | ADDQ.L #0x4,A7 00020692 55 4f |UO | SUBQ.L #0x2,A7 00020694 1f 03 | | MOVE.B D3,-(A7) 00020696 4e 90 |N | JSR (A0) 00020698 54 4f |TO | ADDQ.L #0x2,A7 0002069a 4a 1f |J | TST.B (A7)+ 0002069c 67 08 |g | BEQ 0x206a6 0002069e 1f 03 | | MOVE.B D3,-(A7) 000206a0 1f 11 | | MOVE.B (A1),-(A7) 000206a2 4e 93 |N | JSR (A3) 000206a4 58 4f |XO | ADDQ.L #0x4,A7 000206a6 4e b9 00 02 10 02 |N | JSR exp_INIT_MRU.FIU() 000206ac 55 4f |UO | SUBQ.L #0x2,A7 000206ae 1f 00 | | MOVE.B D0,-(A7) 000206b0 4e 90 |N | JSR (A0) 000206b2 54 4f |TO | ADDQ.L #0x2,A7 000206b4 4a 1f |J | TST.B (A7)+ 000206b6 67 06 |g | BEQ 0x206be 000206b8 1f 00 | | MOVE.B D0,-(A7) 000206ba 4e 94 |N | JSR (A4) 000206bc 54 4f |TO | ADDQ.L #0x2,A7 000206be 55 4f |UO | SUBQ.L #0x2,A7 000206c0 1f 01 | | MOVE.B D1,-(A7) 000206c2 4e 90 |N | JSR (A0) 000206c4 54 4f |TO | ADDQ.L #0x2,A7 000206c6 4a 1f |J | TST.B (A7)+ 000206c8 67 06 |g | BEQ 0x206d0 000206ca 1f 01 | | MOVE.B D1,-(A7) 000206cc 4e 94 |N | JSR (A4) 000206ce 54 4f |TO | ADDQ.L #0x2,A7 000206d0 55 4f |UO | SUBQ.L #0x2,A7 000206d2 1f 02 | | MOVE.B D2,-(A7) 000206d4 4e 90 |N | JSR (A0) 000206d6 54 4f |TO | ADDQ.L #0x2,A7 000206d8 4a 1f |J | TST.B (A7)+ 000206da 67 06 |g | BEQ 0x206e2 000206dc 1f 02 | | MOVE.B D2,-(A7) 000206de 4e 94 |N | JSR (A4) 000206e0 54 4f |TO | ADDQ.L #0x2,A7 000206e2 55 4f |UO | SUBQ.L #0x2,A7 000206e4 1f 03 | | MOVE.B D3,-(A7) 000206e6 4e 90 |N | JSR (A0) 000206e8 54 4f |TO | ADDQ.L #0x2,A7 000206ea 4a 1f |J | TST.B (A7)+ 000206ec 67 06 |g | BEQ 0x206f4 000206ee 1f 03 | | MOVE.B D3,-(A7) 000206f0 4e 94 |N | JSR (A4) 000206f2 54 4f |TO | ADDQ.L #0x2,A7 000206f4 3f 12 |? | MOVE.W (A2),-(A7) 000206f6 4e b9 00 02 11 2e |N . | JSR exp_PREP_RUN.TYP(Sw_2) 000206fc 3e 92 |> | MOVE.W (A2),(A7) 000206fe 4e b9 00 02 11 d2 |N | JSR exp_PREP_RUN.VAL(Sw_2) 00020704 3e 92 |> | MOVE.W (A2),(A7) 00020706 4e b9 00 02 18 80 |N | JSR exp_PREP_RUN.IOC(Sw_2) 0002070c 3e 92 |> | MOVE.W (A2),(A7) 0002070e 4e b9 00 02 10 6a |N j | JSR exp_PREP_RUN.SEQ(Sw_2) 00020714 3e 92 |> | MOVE.W (A2),(A7) 00020716 4e b9 00 02 0f a8 |N | JSR exp_PREP_RUN.FIU(Sw_2) 0002071c 1f 00 | | MOVE.B D0,-(A7) 0002071e 4e 90 |N | JSR (A0) 00020720 54 4f |TO | ADDQ.L #0x2,A7 00020722 4a 1f |J | TST.B (A7)+ 00020724 67 0a |g | BEQ 0x20730 00020726 1f 00 | | MOVE.B D0,-(A7) 00020728 4e b9 00 02 17 04 |N | JSR 0x21704 0002072e 54 4f |TO | ADDQ.L #0x2,A7 00020730 55 4f |UO | SUBQ.L #0x2,A7 00020732 1f 01 | | MOVE.B D1,-(A7) 00020734 4e 90 |N | JSR (A0) 00020736 54 4f |TO | ADDQ.L #0x2,A7 00020738 4a 1f |J | TST.B (A7)+ 0002073a 67 0a |g | BEQ 0x20746 0002073c 1f 01 | | MOVE.B D1,-(A7) 0002073e 4e b9 00 02 17 04 |N | JSR 0x21704 00020744 54 4f |TO | ADDQ.L #0x2,A7 00020746 55 4f |UO | SUBQ.L #0x2,A7 00020748 1f 02 | | MOVE.B D2,-(A7) 0002074a 4e 90 |N | JSR (A0) 0002074c 54 4f |TO | ADDQ.L #0x2,A7 0002074e 4a 1f |J | TST.B (A7)+ 00020750 67 0a |g | BEQ 0x2075c 00020752 1f 02 | | MOVE.B D2,-(A7) 00020754 4e b9 00 02 17 04 |N | JSR 0x21704 0002075a 54 4f |TO | ADDQ.L #0x2,A7 0002075c 55 4f |UO | SUBQ.L #0x2,A7 0002075e 1f 03 | | MOVE.B D3,-(A7) 00020760 4e 90 |N | JSR (A0) 00020762 54 4f |TO | ADDQ.L #0x2,A7 00020764 4a 1f |J | TST.B (A7)+ 00020766 67 0a |g | BEQ 0x20772 00020768 1f 03 | | MOVE.B D3,-(A7) 0002076a 4e b9 00 02 17 04 |N | JSR 0x21704 00020770 54 4f |TO | ADDQ.L #0x2,A7 00020772 4c df 1f 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4 00020776 4e 5e |N^ | UNLK A6 00020778 4e 75 |Nu | RTS 0002077a ; -------------------------------------------------------------------------------------- 0002077a ; OMSI PASCAL Function 0002077a ; -------------------------------------------------------------------------------------- 0002077a 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 0002077e bf d5 | | CMPA.L (A5),A7 00020780 62 06 |b | BHI 0x20788 00020782 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020786 4e 76 |Nv | TRAPV 00020788 de fc 00 20 | | ADDA.W #0x20,A7 0002078c 48 e7 f0 c0 |H | MOVEM.L A1+A0+D3+D2+D1+D0,-(A7) 00020790 41 f9 00 01 04 c0 |A | LEA.L HasBoard(diproc_addr: Byte) : Byte,A0 00020796 43 f9 00 02 13 a2 |C | LEA.L 0x213a2,A1 0002079c 70 0c |p | MOVEQ.L #0x0c,D0 0002079e 72 0d |r | MOVEQ.L #0x0d,D1 000207a0 74 0e |t | MOVEQ.L #0x0e,D2 000207a2 76 0f |v | MOVEQ.L #0x0f,D3 000207a4 4e b9 00 02 10 1c |N | JSR exp_FREEZE_WORLD.FIU() 000207aa 4e b9 00 02 10 da |N | JSR exp_RUN_NORMAL.TYP() 000207b0 4e b9 00 02 11 a0 |N | JSR exp_RUN_NORMAL.VAL() 000207b6 4e b9 00 02 10 50 |N P | JSR exp_RUN_CHECK.SEQ() 000207bc 4e b9 00 02 18 66 |N f | JSR exp_RUN_CHECK.IOC() 000207c2 55 4f |UO | SUBQ.L #0x2,A7 000207c4 1f 00 | | MOVE.B D0,-(A7) 000207c6 4e 90 |N | JSR (A0) 000207c8 54 4f |TO | ADDQ.L #0x2,A7 000207ca 4a 1f |J | TST.B (A7)+ 000207cc 67 06 |g | BEQ 0x207d4 000207ce 1f 00 | | MOVE.B D0,-(A7) 000207d0 4e 91 |N | JSR (A1) 000207d2 54 4f |TO | ADDQ.L #0x2,A7 000207d4 55 4f |UO | SUBQ.L #0x2,A7 000207d6 1f 01 | | MOVE.B D1,-(A7) 000207d8 4e 90 |N | JSR (A0) 000207da 54 4f |TO | ADDQ.L #0x2,A7 000207dc 4a 1f |J | TST.B (A7)+ 000207de 67 06 |g | BEQ 0x207e6 000207e0 1f 01 | | MOVE.B D1,-(A7) 000207e2 4e 91 |N | JSR (A1) 000207e4 54 4f |TO | ADDQ.L #0x2,A7 000207e6 55 4f |UO | SUBQ.L #0x2,A7 000207e8 1f 02 | | MOVE.B D2,-(A7) 000207ea 4e 90 |N | JSR (A0) 000207ec 54 4f |TO | ADDQ.L #0x2,A7 000207ee 4a 1f |J | TST.B (A7)+ 000207f0 67 06 |g | BEQ 0x207f8 000207f2 1f 02 | | MOVE.B D2,-(A7) 000207f4 4e 91 |N | JSR (A1) 000207f6 54 4f |TO | ADDQ.L #0x2,A7 000207f8 55 4f |UO | SUBQ.L #0x2,A7 000207fa 1f 03 | | MOVE.B D3,-(A7) 000207fc 4e 90 |N | JSR (A0) 000207fe 54 4f |TO | ADDQ.L #0x2,A7 00020800 4a 1f |J | TST.B (A7)+ 00020802 67 06 |g | BEQ 0x2080a 00020804 1f 03 | | MOVE.B D3,-(A7) 00020806 4e 91 |N | JSR (A1) 00020808 54 4f |TO | ADDQ.L #0x2,A7 0002080a 4e b9 00 02 0f 76 |N v | JSR exp_RUN_NORMAL.FIU() 00020810 4c df 03 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1 00020814 4e 5e |N^ | UNLK A6 00020816 4e 75 |Nu | RTS 00020818 ; -------------------------------------------------------------------------------------- 00020818 ; OMSI PASCAL Function 00020818 ; <LVAR 0x010 4(r)> 00020818 ; <LVAR 0x00c 4(r)> 00020818 ; <LVAR 0x008 4(r)> 00020818 ; <LVAR -0x004 @> 00020818 ; <LVAR -0x005 @ 1(rw)> 00020818 ; <LVAR -0x006 @> 00020818 ; <LVAR -0x007 @ 1(r)> 00020818 ; -------------------------------------------------------------------------------------- 00020818 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 0002081c bf d5 | | CMPA.L (A5),A7 0002081e 62 06 |b | BHI 0x20826 00020820 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020824 4e 76 |Nv | TRAPV 00020826 de fc 00 46 | F | ADDA.W #0x46,A7 0002082a 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002082e 43 f9 00 01 04 c0 |C | LEA.L HasBoard(diproc_addr: Byte) : Byte,A1 00020834 45 f9 00 02 12 f8 |E | LEA.L 0x212f8,A2 0002083a 47 ee ff fb |G | LEA.L (A6-0x5),A3 0002083e 74 0e |t | MOVEQ.L #0x0e,D2 00020840 76 01 |v | MOVEQ.L #0x01,D3 00020842 78 0c |x | MOVEQ.L #0x0c,D4 00020844 7a 0d |z | MOVEQ.L #0x0d,D5 00020846 7c 0f || | MOVEQ.L #0x0f,D6 00020848 4e b9 00 02 10 1c |N | JSR exp_FREEZE_WORLD.FIU() 0002084e 4e b9 00 02 18 50 |N P | JSR exp_RESET.IOC() 00020854 4e b9 00 02 11 bc |N | JSR exp_RESET.VAL() 0002085a 4e b9 00 02 10 f6 |N | JSR exp_RESET.TYP() 00020860 4e b9 00 02 10 3a |N : | JSR exp_RESET.SEQ() 00020866 55 4f |UO | SUBQ.L #0x2,A7 00020868 1f 04 | | MOVE.B D4,-(A7) 0002086a 4e 91 |N | JSR (A1) 0002086c 54 4f |TO | ADDQ.L #0x2,A7 0002086e 4a 1f |J | TST.B (A7)+ 00020870 67 06 |g | BEQ 0x20878 00020872 1f 04 | | MOVE.B D4,-(A7) 00020874 4e 92 |N | JSR (A2) 00020876 54 4f |TO | ADDQ.L #0x2,A7 00020878 55 4f |UO | SUBQ.L #0x2,A7 0002087a 1f 05 | | MOVE.B D5,-(A7) 0002087c 4e 91 |N | JSR (A1) 0002087e 54 4f |TO | ADDQ.L #0x2,A7 00020880 4a 1f |J | TST.B (A7)+ 00020882 67 06 |g | BEQ 0x2088a 00020884 1f 05 | | MOVE.B D5,-(A7) 00020886 4e 92 |N | JSR (A2) 00020888 54 4f |TO | ADDQ.L #0x2,A7 0002088a 55 4f |UO | SUBQ.L #0x2,A7 0002088c 1f 02 | | MOVE.B D2,-(A7) 0002088e 4e 91 |N | JSR (A1) 00020890 54 4f |TO | ADDQ.L #0x2,A7 00020892 4a 1f |J | TST.B (A7)+ 00020894 67 06 |g | BEQ 0x2089c 00020896 1f 02 | | MOVE.B D2,-(A7) 00020898 4e 92 |N | JSR (A2) 0002089a 54 4f |TO | ADDQ.L #0x2,A7 0002089c 55 4f |UO | SUBQ.L #0x2,A7 0002089e 1f 06 | | MOVE.B D6,-(A7) 000208a0 4e 91 |N | JSR (A1) 000208a2 54 4f |TO | ADDQ.L #0x2,A7 000208a4 4a 1f |J | TST.B (A7)+ 000208a6 67 06 |g | BEQ 0x208ae 000208a8 1f 06 | | MOVE.B D6,-(A7) 000208aa 4e 92 |N | JSR (A2) 000208ac 54 4f |TO | ADDQ.L #0x2,A7 000208ae 4e b9 00 02 0f 92 |N | JSR exp_RESET.FIU() 000208b4 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 000208b8 48 50 |HP | PEA.L (A0) 000208ba 4e b9 00 02 10 84 |N | JSR exp_HALT.SEQ(&Fr) 000208c0 58 4f |XO | ADDQ.L #0x4,A7 000208c2 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000208c6 42 10 |B | CLR.B (A0) 000208c8 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000208cc 42 10 |B | CLR.B (A0) 000208ce 42 28 00 0b |B( | CLR.B (A0+0xb) 000208d2 42 28 00 01 |B( | CLR.B (A0+0x1) 000208d6 7e 02 |~ | MOVEQ.L #0x02,D7 000208d8 0c 07 00 05 | | CMPI.B #0x05,D7 000208dc 67 20 |g | BEQ 0x208fe 000208de 10 07 | | MOVE.B D7,D0 000208e0 48 80 |H | EXTB.W D0 000208e2 41 fa fa 30 |A 0 | LEA.L 0x20314,A0 000208e6 1f 30 00 00 | 0 | MOVE.B (A0+D0.W),-(A7) 000208ea 48 6e ff fa |Hn | PEA.L (A6-0x6) 000208ee 48 53 |HS | PEA.L (A3) 000208f0 48 6e ff fc |Hn | PEA.L (A6-0x4) 000208f4 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 000208fa de c2 | | ADDA.W D2,A7 000208fc 60 1a |` | BRA 0x20918 000208fe 48 6e ff f9 |Hn | PEA.L (A6-0x7) 00020902 4e b9 00 02 10 9a |N | JSR exp_GET_MISC_ERRORS.SEQ(&Sr_1) 00020908 58 4f |XO | ADDQ.L #0x4,A7 0002090a 42 80 |B | CLR.L D0 0002090c 10 2e ff f9 | . | MOVE.B (A6-0x7),D0 00020910 0c 40 00 1f | @ | CMPI.W #0x001f,D0 00020914 67 02 |g | BEQ 0x20918 00020916 16 83 | | MOVE.B D3,(A3) 00020918 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002091c 10 07 | | MOVE.B D7,D0 0002091e 48 80 |H | EXTB.W D0 00020920 3f 00 |? | MOVE.W D0,-(A7) 00020922 12 13 | | MOVE.B (A3),D1 00020924 48 81 |H | EXTB.W D1 00020926 43 83 |C | CHK.W D3,D1 00020928 11 81 00 00 | | MOVE.B D1,(A0+D0.W) 0002092c 4a 41 |JA | TST.W D1 0002092e 67 06 |g | BEQ 0x20936 00020930 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00020934 10 83 | | MOVE.B D3,(A0) 00020936 3e 1f |> | MOVE.W (A7)+,D7 00020938 52 47 |RG | ADDQ.W #0x1,D7 0002093a 0c 47 00 0a | G | CMPI.W #0x000a,D7 0002093e 6f 98 |o | BLE 0x208d8 00020940 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 00020944 4e 5e |N^ | UNLK A6 00020946 4e 75 |Nu | RTS 00020948 ; -------------------------------------------------------------------------------------- 00020948 ; OMSI PASCAL Function 00020948 ; <LVAR 0x008 1(r)> 00020948 ; <LVAR -0x004 1(r)> 00020948 ; <LVAR -0x005 @ 1(r)> 00020948 ; <LVAR -0x00d @> 00020948 ; <LVAR -0x00e @> 00020948 ; <LVAR -0x012 @> 00020948 ; <LVAR -0x016 @> 00020948 ; <LVAR -0x023 @> 00020948 ; <LVAR -0x024 @ 1(r)> 00020948 ; <LVAR -0x025 @ 1(r)> 00020948 ; <LVAR -0x026 @ 1(r)> 00020948 ; -------------------------------------------------------------------------------------- 00020948 4e 56 ff 5c |NV \ | LINK.W A6,#0xff5c 0002094c bf d5 | | CMPA.L (A5),A7 0002094e 62 06 |b | BHI 0x20956 00020950 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020954 4e 76 |Nv | TRAPV 00020956 de fc 00 7e | ~ | ADDA.W #0x7e,A7 0002095a 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002095e 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00020964 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3 0002096a 49 f9 00 02 1a a8 |I | LEA.L 0x21aa8,A4 00020970 74 01 |t | MOVEQ.L #0x01,D2 00020972 76 0c |v | MOVEQ.L #0x0c,D3 00020974 78 26 |x& | MOVEQ.L #0x26,D4 00020976 7a 2a |z* | MOVEQ.L #0x2a,D5 00020978 7c 30 ||0 | MOVEQ.L #0x30,D6 0002097a 48 6e ff da |Hn | PEA.L (A6-0x26) 0002097e 48 6e ff db |Hn | PEA.L (A6-0x25) 00020982 48 6e ff dd |Hn | PEA.L (A6-0x23) 00020986 4e ba fe 90 |N | JSR 0x20818 0002098a de c3 | | ADDA.W D3,A7 0002098c 42 14 |B | CLR.B (A4) 0002098e 4a 2e ff db |J. | TST.B (A6-0x25) 00020992 67 00 00 c6 |g | BEQ 0x20a5a 00020996 41 fa f7 d8 |A | LEA.L 0x20170,A0 0002099a 70 08 |p | MOVEQ.L #0x08,D0 0002099c 2f 20 |/ | MOVE.L -(A0),-(A7) 0002099e 51 c8 ff fc |Q | DBF D0,0x2099c 000209a2 59 4f |YO | SUBQ.L #0x4,A7 000209a4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000209a8 3f 02 |? | MOVE.W D2,-(A7) 000209aa 3f 3c 00 24 |?< $ | MOVE.W #0x24,-(A7) 000209ae 4e 92 |N | JSR (A2) 000209b0 50 4f |PO | ADDQ.L #0x8,A7 000209b2 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000209b8 de c4 | | ADDA.W D4,A7 000209ba 3e ba f7 b8 |> | MOVE.W 0x20174,(A7) 000209be 3f 3a f7 b2 |?: | MOVE.W 0x20172,-(A7) 000209c2 3f 3a f7 ac |?: | MOVE.W 0x20170,-(A7) 000209c6 59 4f |YO | SUBQ.L #0x4,A7 000209c8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000209cc 3f 02 |? | MOVE.W D2,-(A7) 000209ce 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 000209d2 4e 92 |N | JSR (A2) 000209d4 5c 4f |\O | ADDQ.L #0x6,A7 000209d6 1e 82 | | MOVE.B D2,(A7) 000209d8 10 39 00 02 1a a9 | 9 | MOVE.B 0x21aa9,D0 000209de 48 80 |H | EXTB.W D0 000209e0 41 82 |A | CHK.W D2,D0 000209e2 1f 00 | | MOVE.B D0,-(A7) 000209e4 48 6e ff dc |Hn | PEA.L (A6-0x24) 000209e8 48 6e ff ea |Hn | PEA.L (A6-0x16) 000209ec 48 6e ff ee |Hn | PEA.L (A6-0x12) 000209f0 48 6e ff f2 |Hn | PEA.L (A6-0xe) 000209f4 48 6e ff f3 |Hn | PEA.L (A6-0xd) 000209f8 4e b9 00 01 05 3e |N > | JSR FSCALL_1053e 000209fe de fc 00 22 | " | ADDA.W #0x22,A7 00020a02 4a 2e ff dc |J. | TST.B (A6-0x24) 00020a06 67 26 |g& | BEQ 0x20a2e 00020a08 9e c4 | | SUBA.W D4,A7 00020a0a 20 4f | O | MOVEA.L A7,A0 00020a0c 43 fa f7 68 |C h | LEA.L 0x20176,A1 00020a10 70 24 |p$ | MOVEQ.L #0x24,D0 00020a12 10 d9 | | MOVE.B (A1)+,(A0)+ 00020a14 51 c8 ff fc |Q | DBF D0,0x20a12 00020a18 59 4f |YO | SUBQ.L #0x4,A7 00020a1a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a1e 3f 02 |? | MOVE.W D2,-(A7) 00020a20 3f 3c 00 25 |?< % | MOVE.W #0x25,-(A7) 00020a24 4e 92 |N | JSR (A2) 00020a26 50 4f |PO | ADDQ.L #0x8,A7 00020a28 4e 93 |N | JSR (A3) 00020a2a de c5 | | ADDA.W D5,A7 00020a2c 60 28 |`( | BRA 0x20a56 00020a2e 9e fc 00 3a | : | SUBA.W #0x3a,A7 00020a32 20 4f | O | MOVEA.L A7,A0 00020a34 43 fa f7 66 |C f | LEA.L 0x2019c,A1 00020a38 70 38 |p8 | MOVEQ.L #0x38,D0 00020a3a 10 d9 | | MOVE.B (A1)+,(A0)+ 00020a3c 51 c8 ff fc |Q | DBF D0,0x20a3a 00020a40 59 4f |YO | SUBQ.L #0x4,A7 00020a42 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a46 3f 02 |? | MOVE.W D2,-(A7) 00020a48 3f 3c 00 39 |?< 9 | MOVE.W #0x39,-(A7) 00020a4c 4e 92 |N | JSR (A2) 00020a4e 50 4f |PO | ADDQ.L #0x8,A7 00020a50 4e 93 |N | JSR (A3) 00020a52 de fc 00 3e | > | ADDA.W #0x3e,A7 00020a56 60 00 00 e4 |` | BRA 0x20b3c 00020a5a 4a 2e ff da |J. | TST.B (A6-0x26) 00020a5e 67 00 00 86 |g | BEQ 0x20ae6 00020a62 48 6e ff fb |Hn | PEA.L (A6-0x5) 00020a66 4e b9 00 02 18 32 |N 2 | JSR exp_READ_LAST_PC.IOC(&Sr_2) 00020a6c 58 4f |XO | ADDQ.L #0x4,A7 00020a6e 42 80 |B | CLR.L D0 00020a70 10 2e ff fb | . | MOVE.B (A6-0x5),D0 00020a74 e1 40 | @ | ASL.W #0x8,D0 00020a76 42 81 |B | CLR.L D1 00020a78 12 2e ff fc | . | MOVE.B (A6-0x4),D1 00020a7c d2 40 | @ | ADD.W D0,D1 00020a7e 3e 01 |> | MOVE.W D1,D7 00020a80 0c 47 01 02 | G | CMPI.W #0x0102,D7 00020a84 66 24 |f$ | BNE 0x20aaa 00020a86 2f 3a f7 56 |/: V | MOVE.L 0x201de,-(A7) 00020a8a 2f 3a f7 4e |/: N | MOVE.L 0x201da,-(A7) 00020a8e 2f 3a f7 46 |/: F | MOVE.L 0x201d6,-(A7) 00020a92 59 4f |YO | SUBQ.L #0x4,A7 00020a94 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a98 3f 02 |? | MOVE.W D2,-(A7) 00020a9a 3f 03 |? | MOVE.W D3,-(A7) 00020a9c 4e 92 |N | JSR (A2) 00020a9e 50 4f |PO | ADDQ.L #0x8,A7 00020aa0 4e 93 |N | JSR (A3) 00020aa2 de fc 00 10 | | ADDA.W #0x10,A7 00020aa6 18 82 | | MOVE.B D2,(A4) 00020aa8 60 3a |`: | BRA 0x20ae4 00020aaa 41 fa f7 62 |A b | LEA.L 0x2020e,A0 00020aae 70 0a |p | MOVEQ.L #0x0a,D0 00020ab0 2f 20 |/ | MOVE.L -(A0),-(A7) 00020ab2 51 c8 ff fc |Q | DBF D0,0x20ab0 00020ab6 51 4f |QO | SUBQ.L #0x8,A7 00020ab8 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020abc 3f 02 |? | MOVE.W D2,-(A7) 00020abe 3f 3c 00 2c |?< , | MOVE.W #0x2c,-(A7) 00020ac2 4e 92 |N | JSR (A2) 00020ac4 58 4f |XO | ADDQ.L #0x4,A7 00020ac6 42 80 |B | CLR.L D0 00020ac8 30 07 |0 | MOVE.W D7,D0 00020aca 2f 00 |/ | MOVE.L D0,-(A7) 00020acc 48 78 00 04 |Hx | PEA.L 0x4 00020ad0 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00020ad6 50 4f |PO | ADDQ.L #0x8,A7 00020ad8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020ade 50 4f |PO | ADDQ.L #0x8,A7 00020ae0 4e 93 |N | JSR (A3) 00020ae2 de c6 | | ADDA.W D6,A7 00020ae4 60 56 |`V | BRA 0x20b3c 00020ae6 4a 2e 00 08 |J. | TST.B (A6+0x8) 00020aea 67 2a |g* | BEQ 0x20b16 00020aec 9e fc 00 32 | 2 | SUBA.W #0x32,A7 00020af0 20 4f | O | MOVEA.L A7,A0 00020af2 43 fa f7 1a |C | LEA.L 0x2020e,A1 00020af6 70 30 |p0 | MOVEQ.L #0x30,D0 00020af8 10 d9 | | MOVE.B (A1)+,(A0)+ 00020afa 51 c8 ff fc |Q | DBF D0,0x20af8 00020afe 59 4f |YO | SUBQ.L #0x4,A7 00020b00 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020b04 3f 02 |? | MOVE.W D2,-(A7) 00020b06 3f 3c 00 31 |?< 1 | MOVE.W #0x31,-(A7) 00020b0a 4e 92 |N | JSR (A2) 00020b0c 50 4f |PO | ADDQ.L #0x8,A7 00020b0e 4e 93 |N | JSR (A3) 00020b10 de fc 00 36 | 6 | ADDA.W #0x36,A7 00020b14 60 26 |`& | BRA 0x20b3c 00020b16 41 fa f7 52 |A R | LEA.L 0x2026a,A0 00020b1a 70 14 |p | MOVEQ.L #0x14,D0 00020b1c 3f 20 |? | MOVE.W -(A0),-(A7) 00020b1e 51 c8 ff fc |Q | DBF D0,0x20b1c 00020b22 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00020b26 59 4f |YO | SUBQ.L #0x4,A7 00020b28 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020b2c 3f 02 |? | MOVE.W D2,-(A7) 00020b2e 3f 05 |? | MOVE.W D5,-(A7) 00020b30 4e 92 |N | JSR (A2) 00020b32 50 4f |PO | ADDQ.L #0x8,A7 00020b34 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020b3a de c6 | | ADDA.W D6,A7 00020b3c 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00020b40 4e 5e |N^ | UNLK A6 00020b42 4e 75 |Nu | RTS 00020b44 ; -------------------------------------------------------------------------------------- 00020b44 ; OMSI PASCAL Function 00020b44 ; <LVAR 0x008 4(r)> 00020b44 ; <LVAR -0x00a @> 00020b44 ; <LVAR -0x00b @ 1(r)> 00020b44 ; <LVAR -0x00c @> 00020b44 ; -------------------------------------------------------------------------------------- 00020b44 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 00020b48 bf d5 | | CMPA.L (A5),A7 00020b4a 62 06 |b | BHI 0x20b52 00020b4c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020b50 4e 76 |Nv | TRAPV 00020b52 de fc 00 42 | B | ADDA.W #0x42,A7 00020b56 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00020b5a 43 ee ff f5 |C | LEA.L (A6-0xb),A1 00020b5e 45 ee ff f4 |E | LEA.L (A6-0xc),A2 00020b62 47 ee ff f6 |G | LEA.L (A6-0xa),A3 00020b66 49 f9 00 01 04 84 |I | LEA.L DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool),A4 00020b6c 72 0e |r | MOVEQ.L #0x0e,D1 00020b6e 74 01 |t | MOVEQ.L #0x01,D2 00020b70 2a 3c 00 00 00 96 |*< | MOVE.L #0x96,D5 00020b76 7e 00 |~ | MOVEQ.L #0x00,D7 00020b78 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020b7c 42 10 |B | CLR.B (A0) 00020b7e 2f 3c 00 00 98 96 |/< | MOVE.L #0x9896,-(A7) 00020b84 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 00020b8a 54 4f |TO | ADDQ.L #0x2,A7 00020b8c 1e bc 00 04 | | MOVE.B #0x04,(A7) 00020b90 48 52 |HR | PEA.L (A2) 00020b92 48 51 |HQ | PEA.L (A1) 00020b94 48 53 |HS | PEA.L (A3) 00020b96 4e 94 |N | JSR (A4) 00020b98 de c1 | | ADDA.W D1,A7 00020b9a 10 07 | | MOVE.B D7,D0 00020b9c 80 11 | | OR.B (A1),D0 00020b9e 48 80 |H | EXTB.W D0 00020ba0 41 82 |A | CHK.W D2,D0 00020ba2 1e 00 | | MOVE.B D0,D7 00020ba4 1f 3c 00 07 | < | MOVE.B #0x07,-(A7) 00020ba8 48 52 |HR | PEA.L (A2) 00020baa 48 51 |HQ | PEA.L (A1) 00020bac 48 53 |HS | PEA.L (A3) 00020bae 4e 94 |N | JSR (A4) 00020bb0 de c1 | | ADDA.W D1,A7 00020bb2 10 07 | | MOVE.B D7,D0 00020bb4 80 11 | | OR.B (A1),D0 00020bb6 48 80 |H | EXTB.W D0 00020bb8 41 82 |A | CHK.W D2,D0 00020bba 1e 00 | | MOVE.B D0,D7 00020bbc 1f 3c 00 06 | < | MOVE.B #0x06,-(A7) 00020bc0 48 52 |HR | PEA.L (A2) 00020bc2 48 51 |HQ | PEA.L (A1) 00020bc4 48 53 |HS | PEA.L (A3) 00020bc6 4e 94 |N | JSR (A4) 00020bc8 de c1 | | ADDA.W D1,A7 00020bca 10 07 | | MOVE.B D7,D0 00020bcc 80 11 | | OR.B (A1),D0 00020bce 48 80 |H | EXTB.W D0 00020bd0 41 82 |A | CHK.W D2,D0 00020bd2 1e 00 | | MOVE.B D0,D7 00020bd4 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020bd8 48 52 |HR | PEA.L (A2) 00020bda 48 51 |HQ | PEA.L (A1) 00020bdc 48 53 |HS | PEA.L (A3) 00020bde 4e 94 |N | JSR (A4) 00020be0 de c1 | | ADDA.W D1,A7 00020be2 10 07 | | MOVE.B D7,D0 00020be4 80 11 | | OR.B (A1),D0 00020be6 48 80 |H | EXTB.W D0 00020be8 41 82 |A | CHK.W D2,D0 00020bea 1e 00 | | MOVE.B D0,D7 00020bec 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00020bf0 48 52 |HR | PEA.L (A2) 00020bf2 48 51 |HQ | PEA.L (A1) 00020bf4 48 53 |HS | PEA.L (A3) 00020bf6 4e 94 |N | JSR (A4) 00020bf8 de c1 | | ADDA.W D1,A7 00020bfa 10 07 | | MOVE.B D7,D0 00020bfc 80 11 | | OR.B (A1),D0 00020bfe 48 80 |H | EXTB.W D0 00020c00 41 82 |A | CHK.W D2,D0 00020c02 1e 00 | | MOVE.B D0,D7 00020c04 7c 0c || | MOVEQ.L #0x0c,D6 00020c06 55 4f |UO | SUBQ.L #0x2,A7 00020c08 1f 06 | | MOVE.B D6,-(A7) 00020c0a 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00020c10 54 4f |TO | ADDQ.L #0x2,A7 00020c12 4a 1f |J | TST.B (A7)+ 00020c14 67 16 |g | BEQ 0x20c2c 00020c16 1f 06 | | MOVE.B D6,-(A7) 00020c18 48 52 |HR | PEA.L (A2) 00020c1a 48 51 |HQ | PEA.L (A1) 00020c1c 48 53 |HS | PEA.L (A3) 00020c1e 4e 94 |N | JSR (A4) 00020c20 de c1 | | ADDA.W D1,A7 00020c22 10 07 | | MOVE.B D7,D0 00020c24 80 11 | | OR.B (A1),D0 00020c26 48 80 |H | EXTB.W D0 00020c28 41 82 |A | CHK.W D2,D0 00020c2a 1e 00 | | MOVE.B D0,D7 00020c2c 52 06 |R | ADDQ.B #0x1,D6 00020c2e 0c 06 00 0f | | CMPI.B #0x0f,D6 00020c32 6f d2 |o | BLE 0x20c06 00020c34 53 85 |S | SUBQ.L #0x1,D5 00020c36 67 06 |g | BEQ 0x20c3e 00020c38 4a 07 |J | TST.B D7 00020c3a 67 00 ff 42 |g B | BEQ 0x20b7e 00020c3e 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020c42 10 87 | | MOVE.B D7,(A0) 00020c44 44 10 |D | NEG.B (A0) 00020c46 52 10 |R | ADDQ.B #0x1,(A0) 00020c48 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 00020c4c 4e 5e |N^ | UNLK A6 00020c4e 4e 75 |Nu | RTS 00020c50 ; -------------------------------------------------------------------------------------- 00020c50 ; OMSI PASCAL Function 00020c50 ; -------------------------------------------------------------------------------------- 00020c50 4e 56 ff b6 |NV | LINK.W A6,#0xffb6 00020c54 bf d5 | | CMPA.L (A5),A7 00020c56 62 06 |b | BHI 0x20c5e 00020c58 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020c5c 4e 76 |Nv | TRAPV 00020c5e de fc 00 4a | J | ADDA.W #0x4a,A7 00020c62 48 e7 fe f8 |H | MOVEM.L A4+A3+A2+A1+A0+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020c66 45 f9 00 01 04 c0 |E | LEA.L HasBoard(diproc_addr: Byte) : Byte,A2 00020c6c 47 fa f6 b2 |G | LEA.L 0x20320,A3 00020c70 49 f9 00 02 15 34 |I 4 | LEA.L 0x21534,A4 00020c76 72 14 |r | MOVEQ.L #0x14,D1 00020c78 74 16 |t | MOVEQ.L #0x16,D2 00020c7a 76 0c |v | MOVEQ.L #0x0c,D3 00020c7c 78 0d |x | MOVEQ.L #0x0d,D4 00020c7e 7a 0e |z | MOVEQ.L #0x0e,D5 00020c80 7c 0f || | MOVEQ.L #0x0f,D6 00020c82 55 4f |UO | SUBQ.L #0x2,A7 00020c84 1f 03 | | MOVE.B D3,-(A7) 00020c86 4e 92 |N | JSR (A2) 00020c88 54 4f |TO | ADDQ.L #0x2,A7 00020c8a 4a 1f |J | TST.B (A7)+ 00020c8c 67 14 |g | BEQ 0x20ca2 00020c8e 1f 03 | | MOVE.B D3,-(A7) 00020c90 9e c1 | | SUBA.W D1,A7 00020c92 20 4f | O | MOVEA.L A7,A0 00020c94 22 4b |"K | MOVEA.L A3,A1 00020c96 70 12 |p | MOVEQ.L #0x12,D0 00020c98 10 d9 | | MOVE.B (A1)+,(A0)+ 00020c9a 51 c8 ff fc |Q | DBF D0,0x20c98 00020c9e 4e 94 |N | JSR (A4) 00020ca0 de c2 | | ADDA.W D2,A7 00020ca2 55 4f |UO | SUBQ.L #0x2,A7 00020ca4 1f 04 | | MOVE.B D4,-(A7) 00020ca6 4e 92 |N | JSR (A2) 00020ca8 54 4f |TO | ADDQ.L #0x2,A7 00020caa 4a 1f |J | TST.B (A7)+ 00020cac 67 14 |g | BEQ 0x20cc2 00020cae 1f 04 | | MOVE.B D4,-(A7) 00020cb0 9e c1 | | SUBA.W D1,A7 00020cb2 20 4f | O | MOVEA.L A7,A0 00020cb4 22 4b |"K | MOVEA.L A3,A1 00020cb6 70 12 |p | MOVEQ.L #0x12,D0 00020cb8 10 d9 | | MOVE.B (A1)+,(A0)+ 00020cba 51 c8 ff fc |Q | DBF D0,0x20cb8 00020cbe 4e 94 |N | JSR (A4) 00020cc0 de c2 | | ADDA.W D2,A7 00020cc2 55 4f |UO | SUBQ.L #0x2,A7 00020cc4 1f 05 | | MOVE.B D5,-(A7) 00020cc6 4e 92 |N | JSR (A2) 00020cc8 54 4f |TO | ADDQ.L #0x2,A7 00020cca 4a 1f |J | TST.B (A7)+ 00020ccc 67 14 |g | BEQ 0x20ce2 00020cce 1f 05 | | MOVE.B D5,-(A7) 00020cd0 9e c1 | | SUBA.W D1,A7 00020cd2 20 4f | O | MOVEA.L A7,A0 00020cd4 22 4b |"K | MOVEA.L A3,A1 00020cd6 70 12 |p | MOVEQ.L #0x12,D0 00020cd8 10 d9 | | MOVE.B (A1)+,(A0)+ 00020cda 51 c8 ff fc |Q | DBF D0,0x20cd8 00020cde 4e 94 |N | JSR (A4) 00020ce0 de c2 | | ADDA.W D2,A7 00020ce2 55 4f |UO | SUBQ.L #0x2,A7 00020ce4 1f 06 | | MOVE.B D6,-(A7) 00020ce6 4e 92 |N | JSR (A2) 00020ce8 54 4f |TO | ADDQ.L #0x2,A7 00020cea 4a 1f |J | TST.B (A7)+ 00020cec 67 14 |g | BEQ 0x20d02 00020cee 1f 06 | | MOVE.B D6,-(A7) 00020cf0 9e c1 | | SUBA.W D1,A7 00020cf2 20 4f | O | MOVEA.L A7,A0 00020cf4 22 4b |"K | MOVEA.L A3,A1 00020cf6 70 12 |p | MOVEQ.L #0x12,D0 00020cf8 10 d9 | | MOVE.B (A1)+,(A0)+ 00020cfa 51 c8 ff fc |Q | DBF D0,0x20cf8 00020cfe 4e 94 |N | JSR (A4) 00020d00 de c2 | | ADDA.W D2,A7 00020d02 4c df 1f 7f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+A0+A1+A2+A3+A4 00020d06 4e 5e |N^ | UNLK A6 00020d08 4e 75 |Nu | RTS 00020d0a ; -------------------------------------------------------------------------------------- 00020d0a ; OMSI PASCAL Function 00020d0a ; -------------------------------------------------------------------------------------- 00020d0a START: 00020d0a 4f fa 00 08 |O | LEA.L MAIN,A7 00020d0e 4e f9 00 01 02 80 |N | JMP ?start_program 00020d14 MAIN: 00020d14 45 f9 00 02 1a b2 |E | LEA.L 0x21ab2,A2 00020d1a 47 f9 00 02 1a aa |G | LEA.L 0x21aaa,A3 00020d20 49 f9 00 02 1a a9 |I | LEA.L 0x21aa9,A4 00020d26 72 01 |r | MOVEQ.L #0x01,D1 00020d28 74 0a |t | MOVEQ.L #0x0a,D2 00020d2a 4e b9 00 01 03 98 |N | JSR FSCALL_10398 00020d30 41 fa f5 64 |A d | LEA.L 0x20296,A0 00020d34 70 0a |p | MOVEQ.L #0x0a,D0 00020d36 2f 20 |/ | MOVE.L -(A0),-(A7) 00020d38 51 c8 ff fc |Q | DBF D0,0x20d36 00020d3c 59 4f |YO | SUBQ.L #0x4,A7 00020d3e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020d42 3f 01 |? | MOVE.W D1,-(A7) 00020d44 3f 3c 00 2c |?< , | MOVE.W #0x2c,-(A7) 00020d48 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020d4e 50 4f |PO | ADDQ.L #0x8,A7 00020d50 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00020d56 de fc 00 30 | 0 | ADDA.W #0x30,A7 00020d5a 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020d60 48 53 |HS | PEA.L (A3) 00020d62 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020d68 58 4f |XO | ADDQ.L #0x4,A7 00020d6a 48 54 |HT | PEA.L (A4) 00020d6c 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020d72 58 4f |XO | ADDQ.L #0x4,A7 00020d74 48 79 00 02 1a ac |Hy | PEA.L 0x21aac 00020d7a 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020d80 58 4f |XO | ADDQ.L #0x4,A7 00020d82 4a 13 |J | TST.B (A3) 00020d84 67 12 |g | BEQ 0x20d98 00020d86 20 4a | J | MOVEA.L A2,A0 00020d88 43 fa f5 a9 |C | LEA.L 0x20333,A1 00020d8c 70 07 |p | MOVEQ.L #0x07,D0 00020d8e 10 d9 | | MOVE.B (A1)+,(A0)+ 00020d90 51 c8 ff fc |Q | DBF D0,0x20d8e 00020d94 60 00 00 84 |` | BRA 0x20e1a 00020d98 9e fc 00 42 | B | SUBA.W #0x42,A7 00020d9c 20 4f | O | MOVEA.L A7,A0 00020d9e 43 fa f4 f6 |C | LEA.L 0x20296,A1 00020da2 70 40 |p@ | MOVEQ.L #0x40,D0 00020da4 10 d9 | | MOVE.B (A1)+,(A0)+ 00020da6 51 c8 ff fc |Q | DBF D0,0x20da4 00020daa 59 4f |YO | SUBQ.L #0x4,A7 00020dac 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020db0 3f 01 |? | MOVE.W D1,-(A7) 00020db2 3f 3c 00 41 |?< A | MOVE.W #0x41,-(A7) 00020db6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020dbc 50 4f |PO | ADDQ.L #0x8,A7 00020dbe 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00020dc4 de fc 00 22 | " | ADDA.W #0x22,A7 00020dc8 20 4f | O | MOVEA.L A7,A0 00020dca 43 fa f5 0c |C | LEA.L 0x202d8,A1 00020dce 70 22 |p" | MOVEQ.L #0x22,D0 00020dd0 10 d9 | | MOVE.B (A1)+,(A0)+ 00020dd2 51 c8 ff fc |Q | DBF D0,0x20dd0 00020dd6 5d 4f |]O | SUBQ.L #0x6,A7 00020dd8 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020ddc 3f 01 |? | MOVE.W D1,-(A7) 00020dde 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 00020de2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020de8 5c 4f |\O | ADDQ.L #0x6,A7 00020dea 42 17 |B | CLR.B (A7) 00020dec 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00020df2 5c 4f |\O | ADDQ.L #0x6,A7 00020df4 4a 1f |J | TST.B (A7)+ 00020df6 67 10 |g | BEQ 0x20e08 00020df8 20 4a | J | MOVEA.L A2,A0 00020dfa 43 fa f5 3f |C ? | LEA.L 0x2033b,A1 00020dfe 70 07 |p | MOVEQ.L #0x07,D0 00020e00 10 d9 | | MOVE.B (A1)+,(A0)+ 00020e02 51 c8 ff fc |Q | DBF D0,0x20e00 00020e06 60 0e |` | BRA 0x20e16 00020e08 20 4a | J | MOVEA.L A2,A0 00020e0a 43 fa f5 37 |C 7 | LEA.L 0x20343,A1 00020e0e 70 07 |p | MOVEQ.L #0x07,D0 00020e10 10 d9 | | MOVE.B (A1)+,(A0)+ 00020e12 51 c8 ff fc |Q | DBF D0,0x20e10 00020e16 de fc 00 24 | $ | ADDA.W #0x24,A7 00020e1a 48 78 00 00 |Hx | PEA.L 0x0 00020e1e 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 00020e24 54 4f |TO | ADDQ.L #0x2,A7 00020e26 1e 94 | | MOVE.B (A4),(A7) 00020e28 4e b9 00 01 04 d2 |N | JSR SetExpInitDone(a : Byte) 00020e2e 54 4f |TO | ADDQ.L #0x2,A7 00020e30 4e ba f6 e4 |N | JSR 0x20516 00020e34 9e fc 00 10 | | SUBA.W #0x10,A7 00020e38 20 4f | O | MOVEA.L A7,A0 00020e3a 43 fa f4 c0 |C | LEA.L 0x202fc,A1 00020e3e 70 0e |p | MOVEQ.L #0x0e,D0 00020e40 10 d9 | | MOVE.B (A1)+,(A0)+ 00020e42 51 c8 ff fc |Q | DBF D0,0x20e40 00020e46 42 27 |B' | CLR.B -(A7) 00020e48 59 4f |YO | SUBQ.L #0x4,A7 00020e4a 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020e4e 3f 01 |? | MOVE.W D1,-(A7) 00020e50 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00020e54 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020e5a 5c 4f |\O | ADDQ.L #0x6,A7 00020e5c 1e b9 00 02 1a ac | | MOVE.B 0x21aac,(A7) 00020e62 1f 01 | | MOVE.B D1,-(A7) 00020e64 1f 01 | | MOVE.B D1,-(A7) 00020e66 48 79 00 02 1a ad |Hy | PEA.L 0x21aad 00020e6c 4e ba f5 e0 |N | JSR 0x2044e 00020e70 de fc 00 1c | | ADDA.W #0x1c,A7 00020e74 2e b9 00 02 1a b6 |. | MOVE.L 0x21ab6,(A7) 00020e7a 2f 12 |/ | MOVE.L (A2),-(A7) 00020e7c 48 79 00 02 1a ba |Hy | PEA.L 0x21aba 00020e82 4e b9 00 02 11 0c |N | JSR exp_PREP_WRITE_REG.TYP(Sw_8, &Sr_8_1) 00020e88 de c2 | | ADDA.W D2,A7 00020e8a 3e bc 03 20 |> | MOVE.W #0x320,(A7) 00020e8e 9e c2 | | SUBA.W D2,A7 00020e90 20 4f | O | MOVEA.L A7,A0 00020e92 43 f9 00 02 1a ba |C | LEA.L 0x21aba,A1 00020e98 70 08 |p | MOVEQ.L #0x08,D0 00020e9a 10 d9 | | MOVE.B (A1)+,(A0)+ 00020e9c 51 c8 ff fc |Q | DBF D0,0x20e9a 00020ea0 42 27 |B' | CLR.B -(A7) 00020ea2 4e b9 00 02 10 bc |N | JSR exp_WRITE_REG.TYP(Sw_2, Sw_8_1, Sw_1) 00020ea8 de c2 | | ADDA.W D2,A7 00020eaa 2e ba f4 64 |. d | MOVE.L 0x20310,(A7) 00020eae 2f 3a f4 5c |/: \ | MOVE.L 0x2030c,-(A7) 00020eb2 42 27 |B' | CLR.B -(A7) 00020eb4 4e b9 00 02 11 ec |N | JSR exp_LOAD_WDR.VAL(Sw_8, Sw_1) 00020eba 5c 4f |\O | ADDQ.L #0x6,A7 00020ebc 2e ba f4 52 |. R | MOVE.L 0x20310,(A7) 00020ec0 2f 3a f4 4a |/: J | MOVE.L 0x2030c,-(A7) 00020ec4 42 27 |B' | CLR.B -(A7) 00020ec6 4e b9 00 02 11 48 |N H | JSR exp_LOAD_WDR.TYP(Sw_8, Sw_1) 00020ecc de c2 | | ADDA.W D2,A7 00020ece 4e ba fd 80 |N | JSR 0x20c50 00020ed2 3f 3c 01 00 |?< | MOVE.W #0x100,-(A7) 00020ed6 4e ba f7 2c |N , | JSR 0x20604 00020eda 54 4f |TO | ADDQ.L #0x2,A7 00020edc 4e ba f8 9c |N | JSR 0x2077a 00020ee0 48 79 00 02 1a ab |Hy | PEA.L 0x21aab 00020ee6 4e ba fc 5c |N \ | JSR 0x20b44 00020eea 54 4f |TO | ADDQ.L #0x2,A7 00020eec 1e b9 00 02 1a ab | | MOVE.B 0x21aab,(A7) 00020ef2 4e ba fa 54 |N T | JSR 0x20948 00020ef6 54 4f |TO | ADDQ.L #0x2,A7 00020ef8 4a 39 00 02 1a a8 |J9 | TST.B 0x21aa8 00020efe 67 12 |g | BEQ 0x20f12 00020f00 4a 13 |J | TST.B (A3) 00020f02 66 0e |f | BNE 0x20f12 00020f04 1f 14 | | MOVE.B (A4),-(A7) 00020f06 48 79 00 02 1a ad |Hy | PEA.L 0x21aad 00020f0c 4e ba f4 3e |N > | JSR 0x2034c 00020f10 5c 4f |\O | ADDQ.L #0x6,A7 00020f12 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020f18 1f 39 00 02 1a a8 | 9 | MOVE.B 0x21aa8,-(A7) 00020f1e 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00020f24 42 17 |B | CLR.B (A7) 00020f26 48 78 00 01 |Hx | PEA.L 0x1 00020f2a 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020f30 5c 4f |\O | ADDQ.L #0x6,A7 00020f32 4e b9 00 01 02 84 |N | JSR ?exit 00020f38 exp_LOAD_HRAM_8_0.FIU(): 00020f38 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020f3e 00 08 | | .CONST 0x0008 ; Stack-delta 00020f40 11 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 17,'LOAD_HRAM_8_0.FIU' 00020f52 00 | | .CONST 0x0 00020f53 03 | | .CONST 0x3 ; DIPROC address 00020f54 00 | | .CONST 0x0 ; Output Parameters 00020f55 00 | | .CONST 0x0 ; Input Parameters 00020f56 exp_LOAD_HRAM_32_0.FIU(): 00020f56 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020f5c 00 08 | | .CONST 0x0008 ; Stack-delta 00020f5e 12 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 18,'LOAD_HRAM_32_0.FIU' 00020f71 00 | | .CONST 0x0 00020f72 03 | | .CONST 0x3 ; DIPROC address 00020f73 00 | | .CONST 0x0 ; Output Parameters 00020f74 00 | | .CONST 0x0 ; Input Parameters 00020f75 00 | | .PAD 0x0 00020f76 exp_RUN_NORMAL.FIU(): 00020f76 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020f7c 00 08 | | .CONST 0x0008 ; Stack-delta 00020f7e 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.FIU' 00020f8d 00 | | .CONST 0x0 00020f8e 03 | | .CONST 0x3 ; DIPROC address 00020f8f 00 | | .CONST 0x0 ; Output Parameters 00020f90 00 | | .CONST 0x0 ; Input Parameters 00020f91 00 | | .PAD 0x0 00020f92 exp_RESET.FIU(): 00020f92 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020f98 00 08 | | .CONST 0x0008 ; Stack-delta 00020f9a 09 52 45 53 45 54 2e 46 | RESET.F| .TXT 9,'RESET.FIU' 00020fa4 00 | | .CONST 0x0 00020fa5 03 | | .CONST 0x3 ; DIPROC address 00020fa6 00 | | .CONST 0x0 ; Output Parameters 00020fa7 00 | | .CONST 0x0 ; Input Parameters 00020fa8 exp_PREP_RUN.FIU(Sw_2): 00020fa8 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020fae 00 0a | | .CONST 0x000a ; Stack-delta 00020fb0 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.FIU' 00020fbd 00 | | .CONST 0x0 00020fbe 03 | | .CONST 0x3 ; DIPROC address 00020fbf 00 | | .CONST 0x0 ; Output Parameters 00020fc0 01 | | .CONST 0x1 ; Input Parameters 00020fc1 01 | | .CONST 0x1 ; In arg [2] 00020fc2 exp_LOAD_REFRESH_REGS.FIU(Sw_2, Sw_2): 00020fc2 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020fc8 00 0c | | .CONST 0x000c ; Stack-delta 00020fca 15 4c 4f 41 44 5f 52 45 | LOAD_RE| .TXT 21,'LOAD_REFRESH_REGS.FIU' 00020fe0 00 | | .CONST 0x0 00020fe1 03 | | .CONST 0x3 ; DIPROC address 00020fe2 00 | | .CONST 0x0 ; Output Parameters 00020fe3 02 | | .CONST 0x2 ; Input Parameters 00020fe4 01 | | .CONST 0x1 ; In arg [2] 00020fe5 01 | | .CONST 0x1 ; In arg [2] 00020fe6 exp_LOAD_HRAM_1.FIU(): 00020fe6 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020fec 00 08 | | .CONST 0x0008 ; Stack-delta 00020fee 0f 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 15,'LOAD_HRAM_1.FIU' 00020ffe 00 | | .CONST 0x0 00020fff 03 | | .CONST 0x3 ; DIPROC address 00021000 00 | | .CONST 0x0 ; Output Parameters 00021001 00 | | .CONST 0x0 ; Input Parameters 00021002 exp_INIT_MRU.FIU(): 00021002 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021008 00 08 | | .CONST 0x0008 ; Stack-delta 0002100a 0c 49 4e 49 54 5f 4d 52 | INIT_MR| .TXT 12,'INIT_MRU.FIU' 00021017 00 | | .CONST 0x0 00021018 03 | | .CONST 0x3 ; DIPROC address 00021019 00 | | .CONST 0x0 ; Output Parameters 0002101a 00 | | .CONST 0x0 ; Input Parameters 0002101b 00 | | .PAD 0x0 0002101c exp_FREEZE_WORLD.FIU(): 0002101c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021022 00 08 | | .CONST 0x0008 ; Stack-delta 00021024 10 46 52 45 45 5a 45 5f | FREEZE_| .TXT 16,'FREEZE_WORLD.FIU' 00021035 00 | | .CONST 0x0 00021036 03 | | .CONST 0x3 ; DIPROC address 00021037 00 | | .CONST 0x0 ; Output Parameters 00021038 00 | | .CONST 0x0 ; Input Parameters 00021039 00 | | .PAD 0x0 0002103a exp_RESET.SEQ(): 0002103a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021040 00 08 | | .CONST 0x0008 ; Stack-delta 00021042 09 52 45 53 45 54 2e 53 | RESET.S| .TXT 9,'RESET.SEQ' 0002104c 00 | | .CONST 0x0 0002104d 02 | | .CONST 0x2 ; DIPROC address 0002104e 00 | | .CONST 0x0 ; Output Parameters 0002104f 00 | | .CONST 0x0 ; Input Parameters 00021050 exp_RUN_CHECK.SEQ(): 00021050 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021056 00 08 | | .CONST 0x0008 ; Stack-delta 00021058 0d 52 55 4e 5f 43 48 45 | RUN_CHE| .TXT 13,'RUN_CHECK.SEQ' 00021066 00 | | .CONST 0x0 00021067 02 | | .CONST 0x2 ; DIPROC address 00021068 00 | | .CONST 0x0 ; Output Parameters 00021069 00 | | .CONST 0x0 ; Input Parameters 0002106a exp_PREP_RUN.SEQ(Sw_2): 0002106a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021070 00 0a | | .CONST 0x000a ; Stack-delta 00021072 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.SEQ' 0002107f 00 | | .CONST 0x0 00021080 02 | | .CONST 0x2 ; DIPROC address 00021081 00 | | .CONST 0x0 ; Output Parameters 00021082 01 | | .CONST 0x1 ; Input Parameters 00021083 01 | | .CONST 0x1 ; In arg [2] 00021084 exp_HALT.SEQ(&Fr): 00021084 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002108a 00 0c | | .CONST 0x000c ; Stack-delta 0002108c 08 48 41 4c 54 2e 53 45 | HALT.SE| .TXT 8,'HALT.SEQ' 00021095 00 | | .CONST 0x0 00021096 02 | | .CONST 0x2 ; DIPROC address 00021097 01 | | .CONST 0x1 ; Output Parameters 00021098 00 | | .CONST 0x0 ; Input Parameters 00021099 08 | | .CONST 0x8 ; Out arg flag 0002109a exp_GET_MISC_ERRORS.SEQ(&Sr_1): 0002109a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000210a0 00 0c | | .CONST 0x000c ; Stack-delta 000210a2 13 47 45 54 5f 4d 49 53 | GET_MIS| .TXT 19,'GET_MISC_ERRORS.SEQ' 000210b6 00 | | .CONST 0x0 000210b7 02 | | .CONST 0x2 ; DIPROC address 000210b8 01 | | .CONST 0x1 ; Output Parameters 000210b9 00 | | .CONST 0x0 ; Input Parameters 000210ba 00 | | .CONST 0x0 ; Out arg [1] 000210bb 00 | | .PAD 0x0 000210bc exp_WRITE_REG.TYP(Sw_2, Sw_8_1, Sw_1): 000210bc 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000210c2 00 16 | | .CONST 0x0016 ; Stack-delta 000210c4 0d 57 52 49 54 45 5f 52 | WRITE_R| .TXT 13,'WRITE_REG.TYP' 000210d2 00 | | .CONST 0x0 000210d3 06 | | .CONST 0x6 ; DIPROC address 000210d4 00 | | .CONST 0x0 ; Output Parameters 000210d5 03 | | .CONST 0x3 ; Input Parameters 000210d6 01 | | .CONST 0x1 ; In arg [2] 000210d7 0d | | .CONST 0xd ; In arg [8, 1] 000210d8 00 | | .CONST 0x0 ; In arg [1] 000210d9 00 | | .PAD 0x0 000210da exp_RUN_NORMAL.TYP(): 000210da 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000210e0 00 08 | | .CONST 0x0008 ; Stack-delta 000210e2 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.TYP' 000210f1 00 | | .CONST 0x0 000210f2 06 | | .CONST 0x6 ; DIPROC address 000210f3 00 | | .CONST 0x0 ; Output Parameters 000210f4 00 | | .CONST 0x0 ; Input Parameters 000210f5 00 | | .PAD 0x0 000210f6 exp_RESET.TYP(): 000210f6 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000210fc 00 08 | | .CONST 0x0008 ; Stack-delta 000210fe 09 52 45 53 45 54 2e 54 | RESET.T| .TXT 9,'RESET.TYP' 00021108 00 | | .CONST 0x0 00021109 06 | | .CONST 0x6 ; DIPROC address 0002110a 00 | | .CONST 0x0 ; Output Parameters 0002110b 00 | | .CONST 0x0 ; Input Parameters 0002110c exp_PREP_WRITE_REG.TYP(Sw_8, &Sr_8_1): 0002110c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021112 00 14 | | .CONST 0x0014 ; Stack-delta 00021114 12 50 52 45 50 5f 57 52 | PREP_WR| .TXT 18,'PREP_WRITE_REG.TYP' 00021127 00 | | .CONST 0x0 00021128 06 | | .CONST 0x6 ; DIPROC address 00021129 01 | | .CONST 0x1 ; Output Parameters 0002112a 01 | | .CONST 0x1 ; Input Parameters 0002112b 07 | | .CONST 0x7 ; In arg [8] 0002112c 0d | | .CONST 0xd ; Out arg [8, 1] 0002112d 00 | | .PAD 0x0 0002112e exp_PREP_RUN.TYP(Sw_2): 0002112e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021134 00 0a | | .CONST 0x000a ; Stack-delta 00021136 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.TYP' 00021143 00 | | .CONST 0x0 00021144 06 | | .CONST 0x6 ; DIPROC address 00021145 00 | | .CONST 0x0 ; Output Parameters 00021146 01 | | .CONST 0x1 ; Input Parameters 00021147 01 | | .CONST 0x1 ; In arg [2] 00021148 exp_LOAD_WDR.TYP(Sw_8, Sw_1): 00021148 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002114e 00 12 | | .CONST 0x0012 ; Stack-delta 00021150 0c 4c 4f 41 44 5f 57 44 | LOAD_WD| .TXT 12,'LOAD_WDR.TYP' 0002115d 00 | | .CONST 0x0 0002115e 06 | | .CONST 0x6 ; DIPROC address 0002115f 00 | | .CONST 0x0 ; Output Parameters 00021160 02 | | .CONST 0x2 ; Input Parameters 00021161 07 | | .CONST 0x7 ; In arg [8] 00021162 00 | | .CONST 0x0 ; In arg [1] 00021163 00 | | .PAD 0x0 00021164 exp_LOAD_BENIGN_UWORD.TYP(): 00021164 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002116a 00 08 | | .CONST 0x0008 ; Stack-delta 0002116c 15 4c 4f 41 44 5f 42 45 | LOAD_BE| .TXT 21,'LOAD_BENIGN_UWORD.TYP' 00021182 00 | | .CONST 0x0 00021183 06 | | .CONST 0x6 ; DIPROC address 00021184 00 | | .CONST 0x0 ; Output Parameters 00021185 00 | | .CONST 0x0 ; Input Parameters 00021186 exp_ALIGN_CSA.TYP(): 00021186 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002118c 00 08 | | .CONST 0x0008 ; Stack-delta 0002118e 0d 41 4c 49 47 4e 5f 43 | ALIGN_C| .TXT 13,'ALIGN_CSA.TYP' 0002119c 00 | | .CONST 0x0 0002119d 06 | | .CONST 0x6 ; DIPROC address 0002119e 00 | | .CONST 0x0 ; Output Parameters 0002119f 00 | | .CONST 0x0 ; Input Parameters 000211a0 exp_RUN_NORMAL.VAL(): 000211a0 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000211a6 00 08 | | .CONST 0x0008 ; Stack-delta 000211a8 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.VAL' 000211b7 00 | | .CONST 0x0 000211b8 07 | | .CONST 0x7 ; DIPROC address 000211b9 00 | | .CONST 0x0 ; Output Parameters 000211ba 00 | | .CONST 0x0 ; Input Parameters 000211bb 00 | | .PAD 0x0 000211bc exp_RESET.VAL(): 000211bc 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000211c2 00 08 | | .CONST 0x0008 ; Stack-delta 000211c4 09 52 45 53 45 54 2e 56 | RESET.V| .TXT 9,'RESET.VAL' 000211ce 00 | | .CONST 0x0 000211cf 07 | | .CONST 0x7 ; DIPROC address 000211d0 00 | | .CONST 0x0 ; Output Parameters 000211d1 00 | | .CONST 0x0 ; Input Parameters 000211d2 exp_PREP_RUN.VAL(Sw_2): 000211d2 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000211d8 00 0a | | .CONST 0x000a ; Stack-delta 000211da 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.VAL' 000211e7 00 | | .CONST 0x0 000211e8 07 | | .CONST 0x7 ; DIPROC address 000211e9 00 | | .CONST 0x0 ; Output Parameters 000211ea 01 | | .CONST 0x1 ; Input Parameters 000211eb 01 | | .CONST 0x1 ; In arg [2] 000211ec exp_LOAD_WDR.VAL(Sw_8, Sw_1): 000211ec 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000211f2 00 12 | | .CONST 0x0012 ; Stack-delta 000211f4 0c 4c 4f 41 44 5f 57 44 | LOAD_WD| .TXT 12,'LOAD_WDR.VAL' 00021201 00 | | .CONST 0x0 00021202 07 | | .CONST 0x7 ; DIPROC address 00021203 00 | | .CONST 0x0 ; Output Parameters 00021204 02 | | .CONST 0x2 ; Input Parameters 00021205 07 | | .CONST 0x7 ; In arg [8] 00021206 00 | | .CONST 0x0 ; In arg [1] 00021207 00 | | .PAD 0x0 00021208 exp_ALIGN_CSA.VAL(): 00021208 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002120e 00 08 | | .CONST 0x0008 ; Stack-delta 00021210 0d 41 4c 49 47 4e 5f 43 | ALIGN_C| .TXT 13,'ALIGN_CSA.VAL' 0002121e 00 | | .CONST 0x0 0002121f 07 | | .CONST 0x7 ; DIPROC address 00021220 00 | | .CONST 0x0 ; Output Parameters 00021221 00 | | .CONST 0x0 ; Input Parameters 00021222 53 45 54 5f 48 49 54 2e |SET_HIT.| .TXT 'SET_HIT.MEM ' 0002122e 53 45 54 5f 48 49 54 2e |SET_HIT.| .TXT 'SET_HIT.M32 ' 0002123a ; -------------------------------------------------------------------------------------- 0002123a ; OMSI PASCAL Function 0002123a ; <LVAR 0x00a 1(r)> 0002123a ; <LVAR 0x008 1(r)> 0002123a ; <LVAR -0x004 @ 4(r)> 0002123a ; -------------------------------------------------------------------------------------- 0002123a 4e 56 ff cc |NV | LINK.W A6,#0xffcc 0002123e bf d5 | | CMPA.L (A5),A7 00021240 62 06 |b | BHI 0x21248 00021242 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021246 4e 76 |Nv | TRAPV 00021248 de fc 00 30 | 0 | ADDA.W #0x30,A7 0002124c 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00021250 45 ee ff fc |E | LEA.L (A6-0x4),A2 00021254 72 0c |r | MOVEQ.L #0x0c,D1 00021256 55 4f |UO | SUBQ.L #0x2,A7 00021258 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002125e 4a 1f |J | TST.B (A7)+ 00021260 67 12 |g | BEQ 0x21274 00021262 9e c1 | | SUBA.W D1,A7 00021264 20 4f | O | MOVEA.L A7,A0 00021266 43 fa ff ba |C | LEA.L 0x21222,A1 0002126a 70 0a |p | MOVEQ.L #0x0a,D0 0002126c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002126e 51 c8 ff fc |Q | DBF D0,0x2126c 00021272 60 10 |` | BRA 0x21284 00021274 9e c1 | | SUBA.W D1,A7 00021276 20 4f | O | MOVEA.L A7,A0 00021278 43 fa ff b4 |C | LEA.L 0x2122e,A1 0002127c 70 0a |p | MOVEQ.L #0x0a,D0 0002127e 10 d9 | | MOVE.B (A1)+,(A0)+ 00021280 51 c8 ff fc |Q | DBF D0,0x2127e 00021284 59 4f |YO | SUBQ.L #0x4,A7 00021286 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002128a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002128e 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00021292 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021298 50 4f |PO | ADDQ.L #0x8,A7 0002129a 48 52 |HR | PEA.L (A2) 0002129c 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000212a2 de fc 00 14 | | ADDA.W #0x14,A7 000212a6 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 000212aa 2f 12 |/ | MOVE.L (A2),-(A7) 000212ac 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000212b0 48 78 00 00 |Hx | PEA.L 0x0 000212b4 48 78 00 00 |Hx | PEA.L 0x0 000212b8 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 000212be de fc 00 10 | | ADDA.W #0x10,A7 000212c2 42 17 |B | CLR.B (A7) 000212c4 1f 2e 00 0a | . | MOVE.B (A6+0xa),-(A7) 000212c8 2f 12 |/ | MOVE.L (A2),-(A7) 000212ca 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000212d0 50 4f |PO | ADDQ.L #0x8,A7 000212d2 48 52 |HR | PEA.L (A2) 000212d4 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000212da 58 4f |XO | ADDQ.L #0x4,A7 000212dc 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 000212e0 4e 5e |N^ | UNLK A6 000212e2 4e 75 |Nu | RTS 000212e4 52 45 53 45 54 2e 4d 45 |RESET.ME| .TXT 'RESET.MEM ' 000212ee 52 45 53 45 54 2e 4d 33 |RESET.M3| .TXT 'RESET.M32 ' 000212f8 ; -------------------------------------------------------------------------------------- 000212f8 ; OMSI PASCAL Function 000212f8 ; <LVAR 0x008 1(r)> 000212f8 ; <LVAR -0x006 @ 4(r)> 000212f8 ; -------------------------------------------------------------------------------------- 000212f8 4e 56 ff cc |NV | LINK.W A6,#0xffcc 000212fc bf d5 | | CMPA.L (A5),A7 000212fe 62 06 |b | BHI 0x21306 00021300 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021304 4e 76 |Nv | TRAPV 00021306 de fc 00 2e | . | ADDA.W #0x2e,A7 0002130a 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 0002130e 45 ee ff fa |E | LEA.L (A6-0x6),A2 00021312 72 0a |r | MOVEQ.L #0x0a,D1 00021314 55 4f |UO | SUBQ.L #0x2,A7 00021316 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002131c 4a 1f |J | TST.B (A7)+ 0002131e 67 12 |g | BEQ 0x21332 00021320 9e c1 | | SUBA.W D1,A7 00021322 20 4f | O | MOVEA.L A7,A0 00021324 43 fa ff be |C | LEA.L 0x212e4,A1 00021328 70 08 |p | MOVEQ.L #0x08,D0 0002132a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002132c 51 c8 ff fc |Q | DBF D0,0x2132a 00021330 60 10 |` | BRA 0x21342 00021332 9e c1 | | SUBA.W D1,A7 00021334 20 4f | O | MOVEA.L A7,A0 00021336 43 fa ff b6 |C | LEA.L 0x212ee,A1 0002133a 70 08 |p | MOVEQ.L #0x08,D0 0002133c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002133e 51 c8 ff fc |Q | DBF D0,0x2133c 00021342 59 4f |YO | SUBQ.L #0x4,A7 00021344 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021348 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002134c 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00021350 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021356 50 4f |PO | ADDQ.L #0x8,A7 00021358 48 52 |HR | PEA.L (A2) 0002135a 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00021360 de fc 00 12 | | ADDA.W #0x12,A7 00021364 42 27 |B' | CLR.B -(A7) 00021366 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 0002136a 2f 12 |/ | MOVE.L (A2),-(A7) 0002136c 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00021372 50 4f |PO | ADDQ.L #0x8,A7 00021374 48 52 |HR | PEA.L (A2) 00021376 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 0002137c 58 4f |XO | ADDQ.L #0x4,A7 0002137e 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00021382 4e 5e |N^ | UNLK A6 00021384 4e 75 |Nu | RTS 00021386 52 55 4e 5f 43 48 45 43 |RUN_CHEC| .TXT 'RUN_CHECK.MEM ' 00021394 52 55 4e 5f 43 48 45 43 |RUN_CHEC| .TXT 'RUN_CHECK.M32 ' 000213a2 ; -------------------------------------------------------------------------------------- 000213a2 ; OMSI PASCAL Function 000213a2 ; <LVAR 0x008 1(r)> 000213a2 ; <LVAR -0x006 @ 4(r)> 000213a2 ; -------------------------------------------------------------------------------------- 000213a2 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 000213a6 bf d5 | | CMPA.L (A5),A7 000213a8 62 06 |b | BHI 0x213b0 000213aa 44 fc 00 02 |D | MOVE.W #0x2,CCR 000213ae 4e 76 |Nv | TRAPV 000213b0 de fc 00 32 | 2 | ADDA.W #0x32,A7 000213b4 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000213b8 45 ee ff fa |E | LEA.L (A6-0x6),A2 000213bc 72 0e |r | MOVEQ.L #0x0e,D1 000213be 55 4f |UO | SUBQ.L #0x2,A7 000213c0 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000213c6 4a 1f |J | TST.B (A7)+ 000213c8 67 12 |g | BEQ 0x213dc 000213ca 9e c1 | | SUBA.W D1,A7 000213cc 20 4f | O | MOVEA.L A7,A0 000213ce 43 fa ff b6 |C | LEA.L 0x21386,A1 000213d2 70 0c |p | MOVEQ.L #0x0c,D0 000213d4 10 d9 | | MOVE.B (A1)+,(A0)+ 000213d6 51 c8 ff fc |Q | DBF D0,0x213d4 000213da 60 10 |` | BRA 0x213ec 000213dc 9e c1 | | SUBA.W D1,A7 000213de 20 4f | O | MOVEA.L A7,A0 000213e0 43 fa ff b2 |C | LEA.L 0x21394,A1 000213e4 70 0c |p | MOVEQ.L #0x0c,D0 000213e6 10 d9 | | MOVE.B (A1)+,(A0)+ 000213e8 51 c8 ff fc |Q | DBF D0,0x213e6 000213ec 59 4f |YO | SUBQ.L #0x4,A7 000213ee 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000213f2 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000213f6 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 000213fa 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021400 50 4f |PO | ADDQ.L #0x8,A7 00021402 48 52 |HR | PEA.L (A2) 00021404 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 0002140a de fc 00 16 | | ADDA.W #0x16,A7 0002140e 42 27 |B' | CLR.B -(A7) 00021410 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00021414 2f 12 |/ | MOVE.L (A2),-(A7) 00021416 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 0002141c 50 4f |PO | ADDQ.L #0x8,A7 0002141e 48 52 |HR | PEA.L (A2) 00021420 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00021426 58 4f |XO | ADDQ.L #0x4,A7 00021428 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 0002142c 4e 5e |N^ | UNLK A6 0002142e 4e 75 |Nu | RTS 00021430 4c 4f 41 44 5f 43 4f 4e |LOAD_CON| .TXT 'LOAD_CONFIG.MEM ' 00021440 4c 4f 41 44 5f 43 4f 4e |LOAD_CON| .TXT 'LOAD_CONFIG.M32 ' 00021450 ; -------------------------------------------------------------------------------------- 00021450 ; OMSI PASCAL Function 00021450 ; <LVAR 0x00e 1(r)> 00021450 ; <LVAR 0x00c 1(r)> 00021450 ; <LVAR 0x00a 1(r)> 00021450 ; <LVAR 0x008 1(r)> 00021450 ; <LVAR -0x004 @ 4(r)> 00021450 ; -------------------------------------------------------------------------------------- 00021450 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00021454 bf d5 | | CMPA.L (A5),A7 00021456 62 06 |b | BHI 0x2145e 00021458 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002145c 4e 76 |Nv | TRAPV 0002145e de fc 00 34 | 4 | ADDA.W #0x34,A7 00021462 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00021466 45 ee ff fc |E | LEA.L (A6-0x4),A2 0002146a 72 10 |r | MOVEQ.L #0x10,D1 0002146c 55 4f |UO | SUBQ.L #0x2,A7 0002146e 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00021474 4a 1f |J | TST.B (A7)+ 00021476 67 12 |g | BEQ 0x2148a 00021478 9e c1 | | SUBA.W D1,A7 0002147a 20 4f | O | MOVEA.L A7,A0 0002147c 43 fa ff b2 |C | LEA.L 0x21430,A1 00021480 70 0e |p | MOVEQ.L #0x0e,D0 00021482 10 d9 | | MOVE.B (A1)+,(A0)+ 00021484 51 c8 ff fc |Q | DBF D0,0x21482 00021488 60 10 |` | BRA 0x2149a 0002148a 9e c1 | | SUBA.W D1,A7 0002148c 20 4f | O | MOVEA.L A7,A0 0002148e 43 fa ff b0 |C | LEA.L 0x21440,A1 00021492 70 0e |p | MOVEQ.L #0x0e,D0 00021494 10 d9 | | MOVE.B (A1)+,(A0)+ 00021496 51 c8 ff fc |Q | DBF D0,0x21494 0002149a 59 4f |YO | SUBQ.L #0x4,A7 0002149c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000214a0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000214a4 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 000214a8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000214ae 50 4f |PO | ADDQ.L #0x8,A7 000214b0 48 52 |HR | PEA.L (A2) 000214b2 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000214b8 de fc 00 18 | | ADDA.W #0x18,A7 000214bc 2f 12 |/ | MOVE.L (A2),-(A7) 000214be 1f 2e 00 0c | . | MOVE.B (A6+0xc),-(A7) 000214c2 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 000214c8 54 4f |TO | ADDQ.L #0x2,A7 000214ca 2e 92 |. | MOVE.L (A2),(A7) 000214cc 1f 2e 00 0a | . | MOVE.B (A6+0xa),-(A7) 000214d0 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 000214d6 58 4f |XO | ADDQ.L #0x4,A7 000214d8 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 000214dc 2f 12 |/ | MOVE.L (A2),-(A7) 000214de 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000214e2 48 78 00 00 |Hx | PEA.L 0x0 000214e6 48 78 00 00 |Hx | PEA.L 0x0 000214ea 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 000214f0 de c1 | | ADDA.W D1,A7 000214f2 42 17 |B | CLR.B (A7) 000214f4 1f 2e 00 0e | . | MOVE.B (A6+0xe),-(A7) 000214f8 2f 12 |/ | MOVE.L (A2),-(A7) 000214fa 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00021500 50 4f |PO | ADDQ.L #0x8,A7 00021502 48 52 |HR | PEA.L (A2) 00021504 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 0002150a 58 4f |XO | ADDQ.L #0x4,A7 0002150c 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00021510 4e 5e |N^ | UNLK A6 00021512 4e 75 |Nu | RTS 00021514 46 49 4c 4c 5f 4d 45 4d |FILL_MEM| .TXT 'FILL_MEMORY.MEM ' 00021524 46 49 4c 4c 5f 4d 45 4d |FILL_MEM| .TXT 'FILL_MEMORY.M32 ' 00021534 ; -------------------------------------------------------------------------------------- 00021534 ; OMSI PASCAL Function 00021534 ; <LVAR 0x01c 1(r)> 00021534 ; <LVAR 0x01a 1(r)> 00021534 ; <LVAR 0x019 1(r)> 00021534 ; <LVAR 0x018 1(r)> 00021534 ; <LVAR 0x014 4(r)> 00021534 ; <LVAR 0x010 4(r)> 00021534 ; <LVAR 0x00c 4(r)> 00021534 ; <LVAR 0x008 4(r)> 00021534 ; <LVAR -0x006 @ 4(r)> 00021534 ; -------------------------------------------------------------------------------------- 00021534 4e 56 ff be |NV | LINK.W A6,#0xffbe 00021538 bf d5 | | CMPA.L (A5),A7 0002153a 62 06 |b | BHI 0x21542 0002153c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021540 4e 76 |Nv | TRAPV 00021542 de fc 00 3c | < | ADDA.W #0x3c,A7 00021546 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 0002154a 45 ee ff fa |E | LEA.L (A6-0x6),A2 0002154e 47 f8 00 00 |G | LEA.L 0x0,A3 00021552 49 f9 00 01 04 66 |I f | LEA.L ExpInputParam(exp : Pointer; ptr : Pointer; len : L),A4 00021558 72 10 |r | MOVEQ.L #0x10,D1 0002155a 55 4f |UO | SUBQ.L #0x2,A7 0002155c 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00021562 4a 1f |J | TST.B (A7)+ 00021564 67 12 |g | BEQ 0x21578 00021566 9e c1 | | SUBA.W D1,A7 00021568 20 4f | O | MOVEA.L A7,A0 0002156a 43 fa ff a8 |C | LEA.L 0x21514,A1 0002156e 70 0e |p | MOVEQ.L #0x0e,D0 00021570 10 d9 | | MOVE.B (A1)+,(A0)+ 00021572 51 c8 ff fc |Q | DBF D0,0x21570 00021576 60 10 |` | BRA 0x21588 00021578 9e c1 | | SUBA.W D1,A7 0002157a 20 4f | O | MOVEA.L A7,A0 0002157c 43 fa ff a6 |C | LEA.L 0x21524,A1 00021580 70 0e |p | MOVEQ.L #0x0e,D0 00021582 10 d9 | | MOVE.B (A1)+,(A0)+ 00021584 51 c8 ff fc |Q | DBF D0,0x21582 00021588 59 4f |YO | SUBQ.L #0x4,A7 0002158a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002158e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021592 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00021596 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002159c 50 4f |PO | ADDQ.L #0x8,A7 0002159e 48 52 |HR | PEA.L (A2) 000215a0 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000215a6 de fc 00 18 | | ADDA.W #0x18,A7 000215aa 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000215ae 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000215b2 2f 12 |/ | MOVE.L (A2),-(A7) 000215b4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000215b8 48 53 |HS | PEA.L (A3) 000215ba 48 78 00 07 |Hx | PEA.L 0x7 000215be 4e 94 |N | JSR (A4) 000215c0 de fc 00 14 | | ADDA.W #0x14,A7 000215c4 2e ae 00 14 |. | MOVE.L (A6+0x14),(A7) 000215c8 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 000215cc 2f 12 |/ | MOVE.L (A2),-(A7) 000215ce 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000215d2 48 53 |HS | PEA.L (A3) 000215d4 48 78 00 07 |Hx | PEA.L 0x7 000215d8 4e 94 |N | JSR (A4) 000215da de fc 00 16 | | ADDA.W #0x16,A7 000215de 1e ae 00 18 | | MOVE.B (A6+0x18),(A7) 000215e2 2f 12 |/ | MOVE.L (A2),-(A7) 000215e4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000215e8 48 53 |HS | PEA.L (A3) 000215ea 48 53 |HS | PEA.L (A3) 000215ec 4e 94 |N | JSR (A4) 000215ee de c1 | | ADDA.W D1,A7 000215f0 1e ae 00 19 | | MOVE.B (A6+0x19),(A7) 000215f4 1f 6e 00 1a 00 01 | n | MOVE.B (A6+0x1a),(A7+0x1) 000215fa 2f 12 |/ | MOVE.L (A2),-(A7) 000215fc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021600 48 53 |HS | PEA.L (A3) 00021602 48 78 00 01 |Hx | PEA.L 0x1 00021606 4e 94 |N | JSR (A4) 00021608 de c1 | | ADDA.W D1,A7 0002160a 42 17 |B | CLR.B (A7) 0002160c 1f 2e 00 1c | . | MOVE.B (A6+0x1c),-(A7) 00021610 2f 12 |/ | MOVE.L (A2),-(A7) 00021612 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00021618 50 4f |PO | ADDQ.L #0x8,A7 0002161a 48 52 |HR | PEA.L (A2) 0002161c 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00021622 58 4f |XO | ADDQ.L #0x4,A7 00021624 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 00021628 4e 5e |N^ | UNLK A6 0002162a 4e 75 |Nu | RTS 0002162c 43 4c 45 41 52 5f 54 41 |CLEAR_TA| .TXT 'CLEAR_TAGSTORE.MEM' 0002163e 43 4c 45 41 52 5f 54 41 |CLEAR_TA| .TXT 'CLEAR_TAGSTORE.M32' 00021650 ; -------------------------------------------------------------------------------------- 00021650 ; OMSI PASCAL Function 00021650 ; <LVAR 0x008 1(r)> 00021650 ; <LVAR -0x006 @ 4(r)> 00021650 ; -------------------------------------------------------------------------------------- 00021650 4e 56 ff cc |NV | LINK.W A6,#0xffcc 00021654 bf d5 | | CMPA.L (A5),A7 00021656 62 06 |b | BHI 0x2165e 00021658 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002165c 4e 76 |Nv | TRAPV 0002165e de fc 00 2e | . | ADDA.W #0x2e,A7 00021662 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00021666 43 ee ff fa |C | LEA.L (A6-0x6),A1 0002166a 55 4f |UO | SUBQ.L #0x2,A7 0002166c 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00021672 4a 1f |J | TST.B (A7)+ 00021674 67 0e |g | BEQ 0x21684 00021676 41 fa ff c6 |A | LEA.L 0x2163e,A0 0002167a 70 08 |p | MOVEQ.L #0x08,D0 0002167c 3f 20 |? | MOVE.W -(A0),-(A7) 0002167e 51 c8 ff fc |Q | DBF D0,0x2167c 00021682 60 0c |` | BRA 0x21690 00021684 41 fa ff ca |A | LEA.L 0x21650,A0 00021688 70 08 |p | MOVEQ.L #0x08,D0 0002168a 3f 20 |? | MOVE.W -(A0),-(A7) 0002168c 51 c8 ff fc |Q | DBF D0,0x2168a 00021690 59 4f |YO | SUBQ.L #0x4,A7 00021692 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021696 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002169a 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 0002169e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000216a4 50 4f |PO | ADDQ.L #0x8,A7 000216a6 48 51 |HQ | PEA.L (A1) 000216a8 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000216ae de fc 00 1a | | ADDA.W #0x1a,A7 000216b2 42 27 |B' | CLR.B -(A7) 000216b4 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 000216b8 2f 11 |/ | MOVE.L (A1),-(A7) 000216ba 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000216c0 50 4f |PO | ADDQ.L #0x8,A7 000216c2 48 51 |HQ | PEA.L (A1) 000216c4 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000216ca 58 4f |XO | ADDQ.L #0x4,A7 000216cc 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 000216d0 4e 5e |N^ | UNLK A6 000216d2 4e 75 |Nu | RTS 000216d4 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.MEM ' 000216ec 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.M32 ' 00021704 ; -------------------------------------------------------------------------------------- 00021704 ; OMSI PASCAL Function 00021704 ; <LVAR 0x008 1(r)> 00021704 ; <LVAR -0x006 @ 4(r)> 00021704 ; -------------------------------------------------------------------------------------- 00021704 4e 56 ff be |NV | LINK.W A6,#0xffbe 00021708 bf d5 | | CMPA.L (A5),A7 0002170a 62 06 |b | BHI 0x21712 0002170c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021710 4e 76 |Nv | TRAPV 00021712 de fc 00 3c | < | ADDA.W #0x3c,A7 00021716 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 0002171a 45 ee ff fa |E | LEA.L (A6-0x6),A2 0002171e 72 18 |r | MOVEQ.L #0x18,D1 00021720 55 4f |UO | SUBQ.L #0x2,A7 00021722 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00021728 4a 1f |J | TST.B (A7)+ 0002172a 67 12 |g | BEQ 0x2173e 0002172c 9e c1 | | SUBA.W D1,A7 0002172e 20 4f | O | MOVEA.L A7,A0 00021730 43 fa ff a2 |C | LEA.L 0x216d4,A1 00021734 70 16 |p | MOVEQ.L #0x16,D0 00021736 10 d9 | | MOVE.B (A1)+,(A0)+ 00021738 51 c8 ff fc |Q | DBF D0,0x21736 0002173c 60 10 |` | BRA 0x2174e 0002173e 9e c1 | | SUBA.W D1,A7 00021740 20 4f | O | MOVEA.L A7,A0 00021742 43 fa ff a8 |C | LEA.L 0x216ec,A1 00021746 70 16 |p | MOVEQ.L #0x16,D0 00021748 10 d9 | | MOVE.B (A1)+,(A0)+ 0002174a 51 c8 ff fc |Q | DBF D0,0x21748 0002174e 59 4f |YO | SUBQ.L #0x4,A7 00021750 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021754 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021758 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 0002175c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021762 50 4f |PO | ADDQ.L #0x8,A7 00021764 48 52 |HR | PEA.L (A2) 00021766 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 0002176c de fc 00 20 | | ADDA.W #0x20,A7 00021770 42 27 |B' | CLR.B -(A7) 00021772 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00021776 2f 12 |/ | MOVE.L (A2),-(A7) 00021778 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 0002177e 50 4f |PO | ADDQ.L #0x8,A7 00021780 48 52 |HR | PEA.L (A2) 00021782 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00021788 58 4f |XO | ADDQ.L #0x4,A7 0002178a 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 0002178e 4e 5e |N^ | UNLK A6 00021790 4e 75 |Nu | RTS 00021792 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.MEM' 000217a0 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.M32' 000217ae ; -------------------------------------------------------------------------------------- 000217ae ; OMSI PASCAL Function 000217ae ; <LVAR 0x008 1(r)> 000217ae ; <LVAR -0x006 @ 4(r)> 000217ae ; -------------------------------------------------------------------------------------- 000217ae 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 000217b2 bf d5 | | CMPA.L (A5),A7 000217b4 62 06 |b | BHI 0x217bc 000217b6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000217ba 4e 76 |Nv | TRAPV 000217bc de fc 00 2a | * | ADDA.W #0x2a,A7 000217c0 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 000217c4 43 ee ff fa |C | LEA.L (A6-0x6),A1 000217c8 55 4f |UO | SUBQ.L #0x2,A7 000217ca 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000217d0 4a 1f |J | TST.B (A7)+ 000217d2 67 0e |g | BEQ 0x217e2 000217d4 41 fa ff ca |A | LEA.L 0x217a0,A0 000217d8 70 06 |p | MOVEQ.L #0x06,D0 000217da 3f 20 |? | MOVE.W -(A0),-(A7) 000217dc 51 c8 ff fc |Q | DBF D0,0x217da 000217e0 60 0c |` | BRA 0x217ee 000217e2 41 fa ff ca |A | LEA.L 0x217ae,A0 000217e6 70 06 |p | MOVEQ.L #0x06,D0 000217e8 3f 20 |? | MOVE.W -(A0),-(A7) 000217ea 51 c8 ff fc |Q | DBF D0,0x217e8 000217ee 59 4f |YO | SUBQ.L #0x4,A7 000217f0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000217f4 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000217f8 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 000217fc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021802 50 4f |PO | ADDQ.L #0x8,A7 00021804 48 51 |HQ | PEA.L (A1) 00021806 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 0002180c de fc 00 16 | | ADDA.W #0x16,A7 00021810 42 27 |B' | CLR.B -(A7) 00021812 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00021816 2f 11 |/ | MOVE.L (A1),-(A7) 00021818 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 0002181e 50 4f |PO | ADDQ.L #0x8,A7 00021820 48 51 |HQ | PEA.L (A1) 00021822 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00021828 58 4f |XO | ADDQ.L #0x4,A7 0002182a 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 0002182e 4e 5e |N^ | UNLK A6 00021830 4e 75 |Nu | RTS 00021832 exp_READ_LAST_PC.IOC(&Sr_2): 00021832 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021838 00 0c | | .CONST 0x000c ; Stack-delta 0002183a 10 52 45 41 44 5f 4c 41 | READ_LA| .TXT 16,'READ_LAST_PC.IOC' 0002184b 00 | | .CONST 0x0 0002184c 04 | | .CONST 0x4 ; DIPROC address 0002184d 01 | | .CONST 0x1 ; Output Parameters 0002184e 00 | | .CONST 0x0 ; Input Parameters 0002184f 01 | | .CONST 0x1 ; Out arg [2] 00021850 exp_RESET.IOC(): 00021850 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021856 00 08 | | .CONST 0x0008 ; Stack-delta 00021858 09 52 45 53 45 54 2e 49 | RESET.I| .TXT 9,'RESET.IOC' 00021862 00 | | .CONST 0x0 00021863 04 | | .CONST 0x4 ; DIPROC address 00021864 00 | | .CONST 0x0 ; Output Parameters 00021865 00 | | .CONST 0x0 ; Input Parameters 00021866 exp_RUN_CHECK.IOC(): 00021866 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002186c 00 08 | | .CONST 0x0008 ; Stack-delta 0002186e 0d 52 55 4e 5f 43 48 45 | RUN_CHE| .TXT 13,'RUN_CHECK.IOC' 0002187c 00 | | .CONST 0x0 0002187d 04 | | .CONST 0x4 ; DIPROC address 0002187e 00 | | .CONST 0x0 ; Output Parameters 0002187f 00 | | .CONST 0x0 ; Input Parameters 00021880 exp_PREP_RUN.IOC(Sw_2): 00021880 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021886 00 0a | | .CONST 0x000a ; Stack-delta 00021888 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.IOC' 00021895 00 | | .CONST 0x0 00021896 04 | | .CONST 0x4 ; DIPROC address 00021897 00 | | .CONST 0x0 ; Output Parameters 00021898 01 | | .CONST 0x1 ; Input Parameters 00021899 01 | | .CONST 0x1 ; In arg [2] 0002189a 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 000218a8 ; -------------------------------------------------------------------------------------- 000218a8 ; OMSI PASCAL Function 000218a8 ; <LVAR 0x008 1(r)> 000218a8 ; -------------------------------------------------------------------------------------- 000218a8 PROG_FAIL: 000218a8 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 000218ac bf d5 | | CMPA.L (A5),A7 000218ae 62 06 |b | BHI 0x218b6 000218b0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000218b4 4e 76 |Nv | TRAPV 000218b6 de fc 00 2c | , | ADDA.W #0x2c,A7 000218ba 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 000218be 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 000218c2 70 06 |p | MOVEQ.L #0x06,D0 000218c4 3f 20 |? | MOVE.W -(A0),-(A7) 000218c6 51 c8 ff fc |Q | DBF D0,0x218c4 000218ca 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 000218ce 51 4f |QO | SUBQ.L #0x8,A7 000218d0 48 6f 00 0a |Ho | PEA.L (A7+0xa) 000218d4 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000218d8 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 000218dc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000218e2 58 4f |XO | ADDQ.L #0x4,A7 000218e4 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000218e8 48 80 |H | EXTB.W D0 000218ea 48 c0 |H | EXTW.L D0 000218ec 2f 00 |/ | MOVE.L D0,-(A7) 000218ee 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000218f4 58 4f |XO | ADDQ.L #0x4,A7 000218f6 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000218fc 50 4f |PO | ADDQ.L #0x8,A7 000218fe 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021904 de fc 00 14 | | ADDA.W #0x14,A7 00021908 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 0002190c 4e 5e |N^ | UNLK A6 0002190e 4e 75 |Nu | RTS 00021910 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 0002191e 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 0002192c 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 0002193a 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 0002194c 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 00021964 ; -------------------------------------------------------------------------------------- 00021964 ; OMSI PASCAL Function 00021964 ; <LVAR 0x00e 1(r)> 00021964 ; <LVAR 0x00a 4(r)> 00021964 ; <LVAR 0x008 1(r)> 00021964 ; -------------------------------------------------------------------------------------- 00021964 EXP_FAIL: 00021964 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 00021968 bf d5 | | CMPA.L (A5),A7 0002196a 62 06 |b | BHI 0x21972 0002196c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021970 4e 76 |Nv | TRAPV 00021972 de fc 00 74 | t | ADDA.W #0x74,A7 00021976 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 0002197a 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00021980 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 00021986 72 01 |r | MOVEQ.L #0x01,D1 00021988 74 0d |t | MOVEQ.L #0x0d,D2 0002198a 76 1e |v | MOVEQ.L #0x1e,D3 0002198c 78 12 |x | MOVEQ.L #0x12,D4 0002198e 7a 0e |z | MOVEQ.L #0x0e,D5 00021990 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00021996 41 fa ff b4 |A | LEA.L 0x2194c,A0 0002199a 70 08 |p | MOVEQ.L #0x08,D0 0002199c 3f 20 |? | MOVE.W -(A0),-(A7) 0002199e 51 c8 ff fc |Q | DBF D0,0x2199c 000219a2 59 4f |YO | SUBQ.L #0x4,A7 000219a4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000219a8 3f 01 |? | MOVE.W D1,-(A7) 000219aa 3f 04 |? | MOVE.W D4,-(A7) 000219ac 4e 93 |N | JSR (A3) 000219ae 50 4f |PO | ADDQ.L #0x8,A7 000219b0 4e 94 |N | JSR (A4) 000219b2 50 4f |PO | ADDQ.L #0x8,A7 000219b4 20 4f | O | MOVEA.L A7,A0 000219b6 43 fa ff 58 |C X | LEA.L 0x21910,A1 000219ba 70 0c |p | MOVEQ.L #0x0c,D0 000219bc 10 d9 | | MOVE.B (A1)+,(A0)+ 000219be 51 c8 ff fc |Q | DBF D0,0x219bc 000219c2 51 4f |QO | SUBQ.L #0x8,A7 000219c4 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000219c8 3f 01 |? | MOVE.W D1,-(A7) 000219ca 3f 02 |? | MOVE.W D2,-(A7) 000219cc 4e 93 |N | JSR (A3) 000219ce 54 4f |TO | ADDQ.L #0x2,A7 000219d0 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 000219d4 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 000219da 54 4f |TO | ADDQ.L #0x2,A7 000219dc 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000219e2 50 4f |PO | ADDQ.L #0x8,A7 000219e4 4e 94 |N | JSR (A4) 000219e6 de c4 | | ADDA.W D4,A7 000219e8 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 000219ec b0 c1 | | CMPA.W D1,A0 000219ee 67 48 |gH | BEQ 0x21a38 000219f0 9e c5 | | SUBA.W D5,A7 000219f2 22 4f |"O | MOVEA.L A7,A1 000219f4 45 fa ff 28 |E ( | LEA.L 0x2191e,A2 000219f8 70 0c |p | MOVEQ.L #0x0c,D0 000219fa 12 da | | MOVE.B (A2)+,(A1)+ 000219fc 51 c8 ff fc |Q | DBF D0,0x219fa 00021a00 9e c3 | | SUBA.W D3,A7 00021a02 22 4f |"O | MOVEA.L A7,A1 00021a04 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00021a08 70 1d |p | MOVEQ.L #0x1d,D0 00021a0a 12 d8 | | MOVE.B (A0)+,(A1)+ 00021a0c 51 c8 ff fc |Q | DBF D0,0x21a0a 00021a10 51 4f |QO | SUBQ.L #0x8,A7 00021a12 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00021a16 3f 01 |? | MOVE.W D1,-(A7) 00021a18 3f 02 |? | MOVE.W D2,-(A7) 00021a1a 4e 93 |N | JSR (A3) 00021a1c 58 4f |XO | ADDQ.L #0x4,A7 00021a1e 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021a22 3f 01 |? | MOVE.W D1,-(A7) 00021a24 3f 03 |? | MOVE.W D3,-(A7) 00021a26 4e 93 |N | JSR (A3) 00021a28 50 4f |PO | ADDQ.L #0x8,A7 00021a2a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021a30 50 4f |PO | ADDQ.L #0x8,A7 00021a32 4e 94 |N | JSR (A4) 00021a34 de fc 00 30 | 0 | ADDA.W #0x30,A7 00021a38 9e c5 | | SUBA.W D5,A7 00021a3a 20 4f | O | MOVEA.L A7,A0 00021a3c 43 fa fe ee |C | LEA.L 0x2192c,A1 00021a40 70 0c |p | MOVEQ.L #0x0c,D0 00021a42 10 d9 | | MOVE.B (A1)+,(A0)+ 00021a44 51 c8 ff fc |Q | DBF D0,0x21a42 00021a48 51 4f |QO | SUBQ.L #0x8,A7 00021a4a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021a4e 3f 01 |? | MOVE.W D1,-(A7) 00021a50 3f 02 |? | MOVE.W D2,-(A7) 00021a52 4e 93 |N | JSR (A3) 00021a54 54 4f |TO | ADDQ.L #0x2,A7 00021a56 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00021a5a 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00021a60 54 4f |TO | ADDQ.L #0x2,A7 00021a62 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021a68 50 4f |PO | ADDQ.L #0x8,A7 00021a6a 4e 94 |N | JSR (A4) 00021a6c 5d 4f |]O | SUBQ.L #0x6,A7 00021a6e 20 4f | O | MOVEA.L A7,A0 00021a70 43 fa fe da |C | LEA.L 0x2194c,A1 00021a74 70 16 |p | MOVEQ.L #0x16,D0 00021a76 10 d9 | | MOVE.B (A1)+,(A0)+ 00021a78 51 c8 ff fc |Q | DBF D0,0x21a76 00021a7c 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00021a80 59 4f |YO | SUBQ.L #0x4,A7 00021a82 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021a86 3f 01 |? | MOVE.W D1,-(A7) 00021a88 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00021a8c 4e 93 |N | JSR (A3) 00021a8e 50 4f |PO | ADDQ.L #0x8,A7 00021a90 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021a96 de c3 | | ADDA.W D3,A7 00021a98 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00021a9c 4e 5e |N^ | UNLK A6 00021a9e 4e 75 |Nu | RTS