|
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: 7680 (0x1e00)
Types: M200
Notes: @(#)P2UCODE,3.1,92/08/28,17:18:19, M200_PROGRAM
Names: »P2UCODE.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »P2UCODE.M200«
@ 2045a
<LVAR 0x00c 1(r)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @>
<POP 2045a-204e8 Body>
<POP 2045a-20470 Prologue> Σ0 ↓
<POP 20470-204e0 Naked> Σ0 ↓
<Call 0x20470 0x10538> {}
IPC_Init(void)
<MI 20476 MOVE.B (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<Call 0x2047a 0x10502> {[2, '(A6+0xc)']}
IPC_PutBool(a : Bool)
<POP 20480-20482 StackAdj> Δ+2 {}
<Call 0x20482 0x10514> {}
IPC_PutEnd(void)
<Blob 0x20488 [10] @> Δ-10 {[«10""»]}
<POP 2049a-2049c StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x2049c 9> {[«10""»]|[$$INITSTATE]}
<Const 0x204b0 0x1.4> Δ-4 {[«10""»]|[$$INITSTATE]|[##1]}
<Const 0x204b4 0x2.2> Δ-2 {[«10""»]|[$$INITSTATE]|[##1]|[#2]}
<Pointer.fp 0x204b8 <LVAR -0x002 @>> Δ-4 {[«10""»]|[$$INITSTATE]|[##1]|[#2]|[@@-2]}
<Call 0x204bc 0x103b0> {[«10""»]|[$$INITSTATE]|[##1]|[#2]|[@@-2]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 204c2-204c6 StackAdj> Δ+24 {}
<Call 0x204c6 0x10538> {}
IPC_Init(void)
<MI 204cc MOVEA.L (A6+0x8),A0> {}
<MI 204d0 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x204d2 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 204d8-204da StackAdj> Δ+4 {}
<Call 0x204da 0x1051a> {}
IPC_GetEnd(void)
<POP 204e0-204e8 Epilogue> Σ0
@ 204e8
<LVAR 0x008 4(r)>
<POP 204e8-20520 Body>
<POP 204e8-204fe Prologue> Σ0 ↓
<POP 204fe-20518 Naked> Σ0 ↓
<Call 0x204fe 0x10538> {}
IPC_Init(void)
<MI 20504 MOVEA.L (A6+0x8),A0> {}
<MI 20508 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x2050a 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20510-20512 StackAdj> Δ+4 {}
<Call 0x20512 0x1051a> {}
IPC_GetEnd(void)
<POP 20518-20520 Epilogue> Σ0
@ 20520
<LVAR 0x008 1(r)>
<POP 20520-2055c Body>
<POP 20520-20532 Prologue> Σ0 ↓
<POP 20532-20558 Naked> Σ0 ↓
<Call 0x20532 0x10538> {}
IPC_Init(void)
<MI 20538 MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x2053c 0x10502> {[2, '(A6+0x8)']}
IPC_PutBool(a : Bool)
<POP 20542-20544 StackAdj> Δ+2 {}
<Call 0x20544 0x10514> {}
IPC_PutEnd(void)
<MI 2054a CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x2054c 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x20550 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 20556-20558 StackAdj> Δ+6 {}
<POP 20558-2055c Epilogue> Σ0
@ 2055c
<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 2055c-20624 Body> Δ+10
<POP 2055c-20572 Prologue> Σ0 ↓
<POP 20572-2057a RegCacheLoad> Σ0 ↓
<POP 2057a-2059a Naked> Σ0 ↓ →0x205a8
<Call 0x2057a 0x10538> {}
IPC_Init(void)
<MI 20580 MOVE.L (A6+0x12),-(A7)> Δ-4 {[4, '(A6+0x12)']}
<Call 0x20584 0x10508> {[4, '(A6+0x12)']}
IPC_PutString(a : String)
<POP 2058a-2058c StackAdj> Δ+2 {[-2-]}
<MI 2058c MOVE.B (A6+0x10),(A7)> {[-2-]}
<Call 0x20590 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 20592-20594 StackAdj> Δ+2 {}
<MI 20594 TST.B (A6+0x16)> {}
<MI 20598 BNE 0x205a8> {}
<POP 2059a-205a8 Naked> Σ0 ↓
<MI 2059a MOVE.B (A6+0xe),-(A7)> Δ-2 {[2, '(A6+0xe)']}
<Call 0x2059e 0x10502> {[2, '(A6+0xe)']}
IPC_PutBool(a : Bool)
<MI 205a0 MOVE.B (A6+0xc),(A7)> {[-2-]}
<Call 0x205a4 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 205a6-205a8 StackAdj> Δ+2 {}
<POP 205a8-205b4 Naked> Σ0 ↓ →0x205c6 ←0x2057a
<Call 0x205a8 0x10514> {}
IPC_PutEnd(void)
<MI 205ae TST.B (A6+0x16)> {}
<MI 205b2 BEQ 0x205c6> {}
<POP 205b4-205c6 Naked> Σ0 Δ-10 →0x205d6
<Blob 0x205b4 [10] @> Δ-10 {[«10""»]}
<MI 205c4 BRA 0x205d6> {[«10""»]}
<POP 205c6-205d6 Naked> Σ0 Δ-10 ↓ ←0x205a8
<Blob 0x205c6 [10] @> Δ-10 {[«10""»]}
<POP 205d6-2061c Naked> Σ-10 Δ+10 ↓ ←0x205b4
<POP 205d6-205d8 StackAdj> Δ-4 {[-14-]}
<Lit 0x205d8> {[-10-]|[$$…]}
<Pointer.sp 0x205d8 4> Δ-4
<Const 0x205dc 0x1.2> Δ-2
<Const 0x205e0 0x9.2> Δ-2
<Call 0x205e4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 205ea-205ec StackAdj> Δ+8
<Const 0x205ec 0x1.4> Δ-4 {[-10-]|[$$…]|[##1]}
<Const 0x205f0 0x2.2> Δ-2 {[-10-]|[$$…]|[##1]|[#2]}
<Pointer.fp 0x205f4 <LVAR -0x004 @>> Δ-4 {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
<Call 0x205f8 0x103b0> {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 205fe-20602 StackAdj> Δ+24 {}
<Call 0x20602 0x10538> {}
IPC_Init(void)
<MI 20608 MOVEA.L (A6+0x8),A0> {}
<MI 2060c PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x2060e 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20614-20616 StackAdj> Δ+4 {}
<Call 0x20616 0x1051a> {}
IPC_GetEnd(void)
<POP 2061c-20624 Epilogue> Σ0
@ 20624
<LVAR -0x004 1(rw)>
<POP 20624-20704 Body>
<POP 20624-2063a Prologue> Σ0 ↓
<POP 2063a-20642 RegCacheLoad> Σ0 ↓
<POP 20642-2064e Naked> Σ0 ↓ →0x20656
<POP 20642-20644 StackAdj> Δ-2 {[-2-]}
<Call 0x20644 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2064a TST.B (A7)+> Δ+2 {}
<MI 2064c BEQ 0x20656> {}
<POP 2064e-20656 Naked> Σ0 →0x2065c
<Call 0x2064e 0x210f4> {}
exp_LOAD_HRAM_8_0.FIU()
<MI 20654 BRA 0x2065c> {}
<POP 20656-2065c Naked> Σ0 ↓ ←0x20642
<Call 0x20656 0x21112> {}
exp_LOAD_HRAM_32_0.FIU()
<POP 2065c-20672 Naked> Σ0 ↓ ←0x2064e
<Call 0x2065c 0x211c0> {}
exp_LOAD_HRAM_1.FIU()
<Call 0x20662 0x213c0> {}
exp_ALIGN_CSA.VAL()
<Call 0x20668 0x21320> {}
exp_ALIGN_CSA.TYP()
<MI 2066e CLR.B (A6-0x4)> {}
<MI 20670 MOVEQ.L #0x0c,D7> {}
<POP 20672-20682 Naked> Σ0 ↓ →0x2068e ←0x2068e
<POP 20672-20674 StackAdj> Δ-2 {[-2-]}
<MI 20674 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x20676 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 2067c-2067e StackAdj> Δ+2 {[-2-]}
<MI 2067e TST.B (A7)+> Δ+2 {}
<MI 20680 BEQ 0x2068e> {}
<POP 20682-2068e Naked> Σ0 ↓
<MI 20682 CLR.L D0> {}
<MI 20684 MOVE.B (A6-0x4),D0> {}
<MI 20686 ADDQ.W #0x1,D0> {}
<POP 0x20688 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 2068c MOVE.B D0,(A6-0x4)> {}
<POP 2068e-20694 Naked> Σ0 ↓ →0x20672 ←0x20672
<MI 2068e ADDQ.B #0x1,D7> {}
<MI 20690 CMP.B #0x0f,D7> {}
<MI 20692 BLE 0x20672> {}
<POP 20694-20696 Naked> Σ0 ↓
<MI 20694 MOVEQ.L #0x0c,D7> {}
<POP 20696-206a6 Naked> Σ0 ↓ →0x206e0 ←0x206e0
<POP 20696-20698 StackAdj> Δ-2 {[-2-]}
<MI 20698 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x2069a 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 206a0-206a2 StackAdj> Δ+2 {[-2-]}
<MI 206a2 TST.B (A7)+> Δ+2 {}
<MI 206a4 BEQ 0x206e0> {}
<POP 206a6-206e0 Naked> Σ0 ↓
<MI 206a6 MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<POP 206a8-206aa StackAdj> Δ-2 {[2, 'D7']|[-2-]}
<MI 206aa MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']|[-2-]|[2, 'D7']}
<Call 0x206ac 0x104c6> {[2, 'D7']|[-2-]|[2, 'D7']}
EQ_1c218(a : Byte) : Bool
<POP 206b2-206b4 StackAdj> Δ+2 {[2, 'D7']|[-2-]}
<MI 206b4 MOVE.B (A7),D0> {[2, 'D7']|[-2-]}
<MI 206b6 EXTB.W D0> {[2, 'D7']|[-2-]}
<POP 0x206b8 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']|[-2-]}
<MI 206ba MOVE.B D0,(A7)> {[2, 'D7']|[-2-]}
<POP 206bc-206be StackAdj> Δ-2 {[2, 'D7']|[-4-]}
<Call 0x206be 0x104cc> {[2, 'D7']|[-4-]}
MemOnly2MB() : Bool
<MI 206c4 MOVE.B (A7),D0> {[2, 'D7']|[-4-]}
<MI 206c6 EXTB.W D0> {[2, 'D7']|[-4-]}
<POP 0x206c8 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']|[-4-]}
<MI 206ca MOVE.B D0,(A7)> {[2, 'D7']|[-4-]}
<MI 206cc MOVE.B (A6-0x4),-(A7)> Δ-2 {[2, 'D7']|[-4-]|[2, '(A6-0x4)']}
<Call 0x206ce 0x21608> {[2, 'D7']|[-4-]|[2, '(A6-0x4)']}
<POP 206d4-206d6 StackAdj> Δ+6 {[2, 'D7']}
<MI 206d6 MOVE.B D7,(A7)> {[-2-]}
<Call 0x206d8 0x21808> {[-2-]}
<POP 206de-206e0 StackAdj> Δ+2 {}
<POP 206e0-206e6 Naked> Σ0 ↓ →0x20696 ←0x20696
<MI 206e0 ADDQ.B #0x1,D7> {}
<MI 206e2 CMP.B #0x0f,D7> {}
<MI 206e4 BLE 0x20696> {}
<POP 206e6-206fc Naked> Σ0 ↓
<Call 0x206e6 0x105b0> {}
FifoInit(void)
<Const 0x206ec 0xffff.2> Δ-2 {[#65535]}
<Const 0x206f0 0xffff.2> Δ-2 {[#65535]|[#65535]}
<Call 0x206f4 0x2119c> {[#65535]|[#65535]}
exp_LOAD_REFRESH_REGS.FIU(Sw_2, Sw_2)
<POP 206fa-206fc StackAdj> Δ+4 {}
<POP 206fc-20704 Epilogue> Σ0
@ 20704
<LVAR 0x008 2(r)>
<LVAR -0x002 1(rw)>
<POP 20704-2087a Body>
<POP 20704-2071a Prologue> Σ0 ↓
<POP 2071a-2073c RegCacheLoad> Σ0 ↓
<POP 2073c-2074e Naked> Σ0 ↓ →0x20752
<Call 0x2073c 0x212fe> {}
exp_LOAD_BENIGN_UWORD.TYP()
<POP 20742-20744 StackAdj> Δ-2 {[-2-]}
<Call 0x20744 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2074a TST.B (A7)+> Δ+2 {}
<MI 2074c BEQ 0x20752> {}
<POP 2074e-20752 Naked> Σ0 →0x20756
<MI 2074e CLR.B (A6-0x2)> {}
<MI 20750 BRA 0x20756> {}
<POP 20752-20756 Naked> Σ0 ↓ ←0x2073c
<MI 20752 MOVE.B #0xff,(A6-0x2)> {}
<POP 20756-20762 Naked> Σ0 ↓ →0x2076a ←0x2074e
<POP 20756-20758 StackAdj> Δ-2 {[-2-]}
<Const 0x20758 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x2075a 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2075c-2075e StackAdj> Δ+2 {[-2-]}
<MI 2075e TST.B (A7)+> Δ+2 {}
<MI 20760 BEQ 0x2076a> {}
<POP 20762-2076a Naked> Σ0 ↓
<Const 0x20762 0xc.2> Δ-2 {[#12]}
<MI 20764 MOVE.B (A6-0x2),-(A7)> Δ-2 {[#12]|[2, '(A6-0x2)']}
<Call 0x20766 0x213f2> {[#12]|[2, '(A6-0x2)']}
<POP 20768-2076a StackAdj> Δ+4 {}
<POP 2076a-20776 Naked> Σ0 ↓ →0x2077e ←0x20756
<POP 2076a-2076c StackAdj> Δ-2 {[-2-]}
<Const 0x2076c 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x2076e 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20770-20772 StackAdj> Δ+2 {[-2-]}
<MI 20772 TST.B (A7)+> Δ+2 {}
<MI 20774 BEQ 0x2077e> {}
<POP 20776-2077e Naked> Σ0 ↓
<Const 0x20776 0xd.2> Δ-2 {[#13]}
<MI 20778 MOVE.B (A6-0x2),-(A7)> Δ-2 {[#13]|[2, '(A6-0x2)']}
<Call 0x2077a 0x213f2> {[#13]|[2, '(A6-0x2)']}
<POP 2077c-2077e StackAdj> Δ+4 {}
<POP 2077e-2078a Naked> Σ0 ↓ →0x20792 ←0x2076a
<POP 2077e-20780 StackAdj> Δ-2 {[-2-]}
<Const 0x20780 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x20782 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20784-20786 StackAdj> Δ+2 {[-2-]}
<MI 20786 TST.B (A7)+> Δ+2 {}
<MI 20788 BEQ 0x20792> {}
<POP 2078a-20792 Naked> Σ0 ↓
<Const 0x2078a 0xe.2> Δ-2 {[#14]}
<MI 2078c MOVE.B (A6-0x2),-(A7)> Δ-2 {[#14]|[2, '(A6-0x2)']}
<Call 0x2078e 0x213f2> {[#14]|[2, '(A6-0x2)']}
<POP 20790-20792 StackAdj> Δ+4 {}
<POP 20792-2079e Naked> Σ0 ↓ →0x207a6 ←0x2077e
<POP 20792-20794 StackAdj> Δ-2 {[-2-]}
<Const 0x20794 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x20796 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20798-2079a StackAdj> Δ+2 {[-2-]}
<MI 2079a TST.B (A7)+> Δ+2 {}
<MI 2079c BEQ 0x207a6> {}
<POP 2079e-207a6 Naked> Σ0 ↓
<Const 0x2079e 0xf.2> Δ-2 {[#15]}
<MI 207a0 MOVE.B (A6-0x2),-(A7)> Δ-2 {[#15]|[2, '(A6-0x2)']}
<Call 0x207a2 0x213f2> {[#15]|[2, '(A6-0x2)']}
<POP 207a4-207a6 StackAdj> Δ+4 {}
<POP 207a6-207b8 Naked> Σ0 ↓ →0x207be ←0x20792
<Call 0x207a6 0x211dc> {}
exp_INIT_MRU.FIU()
<POP 207ac-207ae StackAdj> Δ-2 {[-2-]}
<Const 0x207ae 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x207b0 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 207b2-207b4 StackAdj> Δ+2 {[-2-]}
<MI 207b4 TST.B (A7)+> Δ+2 {}
<MI 207b6 BEQ 0x207be> {}
<POP 207b8-207be Naked> Σ0 ↓
<Const 0x207b8 0xc.2> Δ-2 {[#12]}
<Call 0x207ba 0x21966> {[#12]}
<POP 207bc-207be StackAdj> Δ+2 {}
<POP 207be-207ca Naked> Σ0 ↓ →0x207d0 ←0x207a6
<POP 207be-207c0 StackAdj> Δ-2 {[-2-]}
<Const 0x207c0 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x207c2 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 207c4-207c6 StackAdj> Δ+2 {[-2-]}
<MI 207c6 TST.B (A7)+> Δ+2 {}
<MI 207c8 BEQ 0x207d0> {}
<POP 207ca-207d0 Naked> Σ0 ↓
<Const 0x207ca 0xd.2> Δ-2 {[#13]}
<Call 0x207cc 0x21966> {[#13]}
<POP 207ce-207d0 StackAdj> Δ+2 {}
<POP 207d0-207dc Naked> Σ0 ↓ →0x207e2 ←0x207be
<POP 207d0-207d2 StackAdj> Δ-2 {[-2-]}
<Const 0x207d2 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x207d4 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 207d6-207d8 StackAdj> Δ+2 {[-2-]}
<MI 207d8 TST.B (A7)+> Δ+2 {}
<MI 207da BEQ 0x207e2> {}
<POP 207dc-207e2 Naked> Σ0 ↓
<Const 0x207dc 0xe.2> Δ-2 {[#14]}
<Call 0x207de 0x21966> {[#14]}
<POP 207e0-207e2 StackAdj> Δ+2 {}
<POP 207e2-207ee Naked> Σ0 ↓ →0x207f4 ←0x207d0
<POP 207e2-207e4 StackAdj> Δ-2 {[-2-]}
<Const 0x207e4 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x207e6 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 207e8-207ea StackAdj> Δ+2 {[-2-]}
<MI 207ea TST.B (A7)+> Δ+2 {}
<MI 207ec BEQ 0x207f4> {}
<POP 207ee-207f4 Naked> Σ0 ↓
<Const 0x207ee 0xf.2> Δ-2 {[#15]}
<Call 0x207f0 0x21966> {[#15]}
<POP 207f2-207f4 StackAdj> Δ+2 {}
<POP 207f4-20826 Naked> Σ0 ↓ →0x20830 ←0x207e2
<MI 207f4 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x207f6 0x212c8> {[2, '(A6+0x8)']}
exp_PREP_RUN.TYP(Sw_2)
<MI 207fc MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']}
<Call 0x207fe 0x2138a> {[2, '(A6+0x8)']}
exp_PREP_RUN.VAL(Sw_2)
<MI 20804 MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']}
<Call 0x20806 0x21a1a> {[2, '(A6+0x8)']}
exp_PREP_RUN.IOC(Sw_2)
<MI 2080c MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']}
<Call 0x2080e 0x21244> {[2, '(A6+0x8)']}
exp_PREP_RUN.SEQ(Sw_2)
<MI 20814 MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']}
<Call 0x20816 0x21182> {[2, '(A6+0x8)']}
exp_PREP_RUN.FIU(Sw_2)
<Const 0x2081c 0xc.2> Δ-2 {[2, '(A6+0x8)']|[#12]}
<Call 0x2081e 0x104c0> {[2, '(A6+0x8)']|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20820-20822 StackAdj> Δ+2 {[2, '(A6+0x8)']}
<MI 20822 TST.B (A7)+> Δ+2 {}
<MI 20824 BEQ 0x20830> {}
<POP 20826-20830 Naked> Σ0 ↓
<Const 0x20826 0xc.2> Δ-2 {[#12]}
<Call 0x20828 0x218bc> {[#12]}
<POP 2082e-20830 StackAdj> Δ+2 {}
<POP 20830-2083c Naked> Σ0 ↓ →0x20846 ←0x207f4
<POP 20830-20832 StackAdj> Δ-2 {[-2-]}
<Const 0x20832 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x20834 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20836-20838 StackAdj> Δ+2 {[-2-]}
<MI 20838 TST.B (A7)+> Δ+2 {}
<MI 2083a BEQ 0x20846> {}
<POP 2083c-20846 Naked> Σ0 ↓
<Const 0x2083c 0xd.2> Δ-2 {[#13]}
<Call 0x2083e 0x218bc> {[#13]}
<POP 20844-20846 StackAdj> Δ+2 {}
<POP 20846-20852 Naked> Σ0 ↓ →0x2085c ←0x20830
<POP 20846-20848 StackAdj> Δ-2 {[-2-]}
<Const 0x20848 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x2084a 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2084c-2084e StackAdj> Δ+2 {[-2-]}
<MI 2084e TST.B (A7)+> Δ+2 {}
<MI 20850 BEQ 0x2085c> {}
<POP 20852-2085c Naked> Σ0 ↓
<Const 0x20852 0xe.2> Δ-2 {[#14]}
<Call 0x20854 0x218bc> {[#14]}
<POP 2085a-2085c StackAdj> Δ+2 {}
<POP 2085c-20868 Naked> Σ0 ↓ →0x20872 ←0x20846
<POP 2085c-2085e StackAdj> Δ-2 {[-2-]}
<Const 0x2085e 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x20860 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20862-20864 StackAdj> Δ+2 {[-2-]}
<MI 20864 TST.B (A7)+> Δ+2 {}
<MI 20866 BEQ 0x20872> {}
<POP 20868-20872 Naked> Σ0 ↓
<Const 0x20868 0xf.2> Δ-2 {[#15]}
<Call 0x2086a 0x218bc> {[#15]}
<POP 20870-20872 StackAdj> Δ+2 {}
<POP 20872-2087a Epilogue> Σ0 ←0x2085c
@ 2087a
<POP 2087a-20918 Body>
<POP 2087a-20890 Prologue> Σ0 ↓
<POP 20890-208a4 RegCacheLoad> Σ0 ↓
<POP 208a4-208ce Naked> Σ0 ↓ →0x208d4
<Call 0x208a4 0x211f6> {}
exp_FREEZE_WORLD.FIU()
<Call 0x208aa 0x21296> {}
exp_RUN_NORMAL.TYP()
<Call 0x208b0 0x21358> {}
exp_RUN_NORMAL.VAL()
<Call 0x208b6 0x2122a> {}
exp_RUN_CHECK.SEQ()
<Call 0x208bc 0x21a00> {}
exp_RUN_CHECK.IOC()
<POP 208c2-208c4 StackAdj> Δ-2 {[-2-]}
<Const 0x208c4 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x208c6 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 208c8-208ca StackAdj> Δ+2 {[-2-]}
<MI 208ca TST.B (A7)+> Δ+2 {}
<MI 208cc BEQ 0x208d4> {}
<POP 208ce-208d4 Naked> Σ0 ↓
<Const 0x208ce 0xc.2> Δ-2 {[#12]}
<Call 0x208d0 0x2155a> {[#12]}
<POP 208d2-208d4 StackAdj> Δ+2 {}
<POP 208d4-208e0 Naked> Σ0 ↓ →0x208e6 ←0x208a4
<POP 208d4-208d6 StackAdj> Δ-2 {[-2-]}
<Const 0x208d6 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x208d8 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 208da-208dc StackAdj> Δ+2 {[-2-]}
<MI 208dc TST.B (A7)+> Δ+2 {}
<MI 208de BEQ 0x208e6> {}
<POP 208e0-208e6 Naked> Σ0 ↓
<Const 0x208e0 0xd.2> Δ-2 {[#13]}
<Call 0x208e2 0x2155a> {[#13]}
<POP 208e4-208e6 StackAdj> Δ+2 {}
<POP 208e6-208f2 Naked> Σ0 ↓ →0x208f8 ←0x208d4
<POP 208e6-208e8 StackAdj> Δ-2 {[-2-]}
<Const 0x208e8 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x208ea 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 208ec-208ee StackAdj> Δ+2 {[-2-]}
<MI 208ee TST.B (A7)+> Δ+2 {}
<MI 208f0 BEQ 0x208f8> {}
<POP 208f2-208f8 Naked> Σ0 ↓
<Const 0x208f2 0xe.2> Δ-2 {[#14]}
<Call 0x208f4 0x2155a> {[#14]}
<POP 208f6-208f8 StackAdj> Δ+2 {}
<POP 208f8-20904 Naked> Σ0 ↓ →0x2090a ←0x208e6
<POP 208f8-208fa StackAdj> Δ-2 {[-2-]}
<Const 0x208fa 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x208fc 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 208fe-20900 StackAdj> Δ+2 {[-2-]}
<MI 20900 TST.B (A7)+> Δ+2 {}
<MI 20902 BEQ 0x2090a> {}
<POP 20904-2090a Naked> Σ0 ↓
<Const 0x20904 0xf.2> Δ-2 {[#15]}
<Call 0x20906 0x2155a> {[#15]}
<POP 20908-2090a StackAdj> Δ+2 {}
<POP 2090a-20910 Naked> Σ0 ↓ ←0x208f8
<Call 0x2090a 0x21150> {}
exp_RUN_NORMAL.FIU()
<POP 20910-20918 Epilogue> Σ0
@ 20918
<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 20918-20a48 Body>
<POP 20918-2092e Prologue> Σ0 ↓
<POP 2092e-20948 RegCacheLoad> Σ0 ↓
<POP 20948-20972 Naked> Σ0 ↓ →0x20978
<Call 0x20948 0x211f6> {}
exp_FREEZE_WORLD.FIU()
<Call 0x2094e 0x219ea> {}
exp_RESET.IOC()
<Call 0x20954 0x21374> {}
exp_RESET.VAL()
<Call 0x2095a 0x212b2> {}
exp_RESET.TYP()
<Call 0x20960 0x21214> {}
exp_RESET.SEQ()
<POP 20966-20968 StackAdj> Δ-2 {[-2-]}
<Const 0x20968 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x2096a 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2096c-2096e StackAdj> Δ+2 {[-2-]}
<MI 2096e TST.B (A7)+> Δ+2 {}
<MI 20970 BEQ 0x20978> {}
<POP 20972-20978 Naked> Σ0 ↓
<Const 0x20972 0xc.2> Δ-2 {[#12]}
<Call 0x20974 0x214b0> {[#12]}
<POP 20976-20978 StackAdj> Δ+2 {}
<POP 20978-20984 Naked> Σ0 ↓ →0x2098a ←0x20948
<POP 20978-2097a StackAdj> Δ-2 {[-2-]}
<Const 0x2097a 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x2097c 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2097e-20980 StackAdj> Δ+2 {[-2-]}
<MI 20980 TST.B (A7)+> Δ+2 {}
<MI 20982 BEQ 0x2098a> {}
<POP 20984-2098a Naked> Σ0 ↓
<Const 0x20984 0xd.2> Δ-2 {[#13]}
<Call 0x20986 0x214b0> {[#13]}
<POP 20988-2098a StackAdj> Δ+2 {}
<POP 2098a-20996 Naked> Σ0 ↓ →0x2099c ←0x20978
<POP 2098a-2098c StackAdj> Δ-2 {[-2-]}
<Const 0x2098c 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x2098e 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20990-20992 StackAdj> Δ+2 {[-2-]}
<MI 20992 TST.B (A7)+> Δ+2 {}
<MI 20994 BEQ 0x2099c> {}
<POP 20996-2099c Naked> Σ0 ↓
<Const 0x20996 0xe.2> Δ-2 {[#14]}
<Call 0x20998 0x214b0> {[#14]}
<POP 2099a-2099c StackAdj> Δ+2 {}
<POP 2099c-209a8 Naked> Σ0 ↓ →0x209ae ←0x2098a
<POP 2099c-2099e StackAdj> Δ-2 {[-2-]}
<Const 0x2099e 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x209a0 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 209a2-209a4 StackAdj> Δ+2 {[-2-]}
<MI 209a4 TST.B (A7)+> Δ+2 {}
<MI 209a6 BEQ 0x209ae> {}
<POP 209a8-209ae Naked> Σ0 ↓
<Const 0x209a8 0xf.2> Δ-2 {[#15]}
<Call 0x209aa 0x214b0> {[#15]}
<POP 209ac-209ae StackAdj> Δ+2 {}
<POP 209ae-209d8 Naked> Σ0 ↓ ←0x2099c
<Call 0x209ae 0x2116c> {}
exp_RESET.FIU()
<MI 209b4 MOVEA.L (A6+0x10),A0> {}
<MI 209b8 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x209ba 0x2125e> {[4, '^(A0)']}
exp_HALT.SEQ(&Fr)
<POP 209c0-209c2 StackAdj> Δ+4 {}
<MI 209c2 MOVEA.L (A6+0xc),A0> {}
<MI 209c6 CLR.B (A0)> {}
<MI 209c8 MOVEA.L (A6+0x8),A0> {}
<MI 209cc CLR.B (A0)> {}
<MI 209ce CLR.B (A0+0xb)> {}
<MI 209d2 CLR.B (A0+0x1)> {}
<MI 209d6 MOVEQ.L #0x02,D7> {}
<POP 209d8-209de Naked> Σ0 ↓ →0x209fe ←0x20a36
<MI 209d8 CMPI.B #0x05,D7> {}
<MI 209dc BEQ 0x209fe> {}
<POP 209de-209fe Naked> Σ0 →0x20a18
<MI 209de MOVE.B D7,D0> {}
<MI 209e0 EXTB.W D0> {}
<MI 209e2 LEA.L 0x2043a,A0> {}
<MI 209e6 MOVE.B (A0+D0.W),-(A7)> Δ-2 {[2, '(A0+D0.W)']}
<Pointer.fp 0x209ea <LVAR -0x006 @>> Δ-4 {[2, '(A0+D0.W)']|[@@-6]}
<Pointer.fp 0x209ee <LVAR -0x005 @ 1(rw)>> Δ-4 {[2, '(A0+D0.W)']|[@@-6]|[@@-5]}
<Pointer.fp 0x209f0 <LVAR -0x004 @>> Δ-4 {[2, '(A0+D0.W)']|[@@-6]|[@@-5]|[@@-4]}
<Call 0x209f4 0x10484> {[2, '(A0+D0.W)']|[@@-6]|[@@-5]|[@@-4]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 209fa-209fc StackAdj> Δ+14 {}
<MI 209fc BRA 0x20a18> {}
<POP 209fe-20a16 Naked> Σ0 ↓ →0x20a18 ←0x209d8
<Pointer.fp 0x209fe <LVAR -0x007 @ 1(r)>> Δ-4 {[@@-7]}
<Call 0x20a02 0x21274> {[@@-7]}
exp_GET_MISC_ERRORS.SEQ(&Sr_1)
<POP 20a08-20a0a StackAdj> Δ+4 {}
<MI 20a0a CLR.L D0> {}
<MI 20a0c MOVE.B (A6-0x7),D0> {}
<MI 20a10 CMPI.W #0x001f,D0> {}
<MI 20a14 BEQ 0x20a18> {}
<POP 20a16-20a18 Naked> Σ0 ↓
<MI 20a16 MOVE.B #0x01,(A6-0x5)> {}
<POP 20a18-20a30 Naked> Σ0 Δ-2 ↓ →0x20a36 ←0x209de ←0x209fe
<MI 20a18 MOVEA.L (A6+0x8),A0> {}
<MI 20a1c MOVE.B D7,D0> {}
<MI 20a1e EXTB.W D0> {}
<MI 20a20 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<MI 20a22 MOVE.B (A6-0x5),D1> {[2, 'D0']}
<MI 20a24 EXTB.W D1> {[2, 'D0']}
<POP 0x20a26 LimitCheck 0x0 ≤ D1 ≤ 0x1> {[2, 'D0']}
<MI 20a28 MOVE.B D1,(A0+D0.W)> {[2, 'D0']}
<MI 20a2c TST.W D1> {[2, 'D0']}
<MI 20a2e BEQ 0x20a36> {[2, 'D0']}
<POP 20a30-20a36 Naked> Σ-2 ↓
<MI 20a30 MOVEA.L (A6+0xc),A0> {[-2-]}
<MI 20a34 MOVE.B #0x01,(A0)> {[-2-]}
<POP 20a36-20a40 Naked> Σ-2 Δ+2 ↓ →0x209d8 ←0x20a18
<MI 20a36 MOVE.W (A7)+,D7> Δ+2 {}
<MI 20a38 ADDQ.W #0x1,D7> {}
<MI 20a3a CMPI.W #0x000a,D7> {}
<MI 20a3e BLE 0x209d8> {}
<POP 20a40-20a48 Epilogue> Σ0
@ 20a48
<LVAR 0x008 2(r)>
<POP 20a48-20aea Body>
<POP 20a48-20a5e Prologue> Σ0 ↓
<POP 20a5e-20a68 RegCacheLoad> Σ0 ↓
<POP 20a68-20ae2 Naked> Σ0 ↓
<MI 20a68 MOVE.W (A6+0x8),D0> {}
<POP 0x20a6c LimitCheck 0x0 ≤ D0 ≤ 0x1f> {}
<MI 20a70 MULS.W #0x0a,D0> {}
<MI 20a72 LEA.L 0x202f2,A0> {}
<Blob 0x20a76 [10] (A0+D0.W+#0xa)> Δ-10 {[«10»]}
<POP 20a82-20a84 StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x20a84> {[«10»]|[$$…]}
<Pointer.sp 0x20a84 4> Δ-4
<Const 0x20a88 0x1.2> Δ-2
<Const 0x20a8a 0xa.2> Δ-2
<Call 0x20a8c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20a92-20a94 StackAdj> Δ+8
<MI 20a94 MOVE.L (A7)+,0x21c4e> Δ+4 {[«10»]}
<POP 20a96-20a98 StackAdj> Δ+2 {[-8-]}
<POP 20a98-20a99 StackAdj> Δ+4 {[-4-]}
<Blob 0x20a99 [4] 0x21c4e> Δ-4 {[-4-]|[«4»]}
<Call 0x20a9a 0x102cc> {[-4-]|[«4»]}
StringDup(a : String) : String
<POP 20aa0-20aa2 StackAdj> Δ+4 {[-4-]}
<MI 20aa2 MOVE.B 0x21c48,D0> {[-4-]}
<MI 20aa8 EXTB.W D0> {[-4-]}
<POP 0x20aaa LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-4-]}
<MI 20aac MOVE.B D0,-(A7)> Δ-2 {[-4-]|[2, 'D0']}
<MI 20aae MOVE.B 0x21c49,D0> {[-4-]|[2, 'D0']}
<MI 20ab4 EXTB.W D0> {[-4-]|[2, 'D0']}
<POP 0x20ab6 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-4-]|[2, 'D0']}
<MI 20ab8 MOVE.B D0,-(A7)> Δ-2 {[-4-]|[2, 'D0']|[2, 'D0']}
<Const 0x20aba 0x21c4a.4> Δ-4 {[-4-]|[2, 'D0']|[2, 'D0']|[##138314]}
<Const 0x20ac0 0x21c52.4> Δ-4 {[-4-]|[2, 'D0']|[2, 'D0']|[##138314]|[##138322]}
<Const 0x20ac6 0x21c56.4> Δ-4 {[-4-]|[2, 'D0']|[2, 'D0']|[##138314]|[##138322]|[##138326]}
<Const 0x20acc 0x21c5a.4> Δ-4 {[-4-]|[2, 'D0']|[2, 'D0']|[##138314]|[##138322]|[##138326]|[##138330]}
<Const 0x20ad2 0x21c5b.4> Δ-4 {[-4-]|[2, 'D0']|[2, 'D0']|[##138314]|[##138322]|[##138326]|[##138330]|[##138331]}
<Call 0x20ad8 0x1053e> {[-4-]|[2, 'D0']|[2, 'D0']|[##138314]|[##138322]|[##138326]|[##138330]|[##138331]}
FSCALL_1053e
<POP 20ade-20ae2 StackAdj> Δ+28 {}
<POP 20ae2-20aea Epilogue> Σ0
@ 20aea
<LVAR 0x008 1(r)>
<POP 20aea-20b4e Body>
<POP 20aea-20b00 Prologue> Σ0 ↓
<POP 20b00-20b0c RegCacheLoad> Σ0 ↓
<POP 20b0c-20b1a Naked> Σ0 ↓ →0x20b1e
<MI 20b0c MOVE.B (A6+0x8),0x21c5a> {}
<MI 20b10 MOVE.B (A6+0x8),D0> {}
<MI 20b14 CMPI.B #0x03,D0> {}
<MI 20b18 BEQ 0x20b1e> {}
<POP 20b1a-20b1e Naked> Σ0 ↓
<MI 20b1a MOVE.B #0x29,0x21c5b> {}
<POP 20b1e-20b46 Naked> Σ0 ↓ ←0x20b0c
<MI 20b1e CLR.B -(A7)> Δ-2 {[#0]}
<Blob 0x20b20 [4] 0x21c52> Δ-4 {[#0]|[«4»]}
<Blob 0x20b26 [4] 0x21c56> Δ-4 {[#0]|[«4»]|[«4»]}
<Blob 0x20b2c [2] 0x21c5a> Δ-2 {[#0]|[«4»]|[«4»]|[«2»]}
<Blob 0x20b2e [8] 0x21c5b> Δ-8 {[#0]|[«4»]|[«4»]|[«2»]|[«8»]}
<Call 0x20b3c 0x1054a> {[#0]|[«4»]|[«4»]|[«2»]|[«8»]}
?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
<POP 20b42-20b46 StackAdj> Δ+20 {}
<POP 20b46-20b4e Epilogue> Σ0
@ 20b4e
<LVAR 0x008 1(rw)>
<LVAR -0x004 @ 1(rw)>
<POP 20b4e-20b92 Body>
<POP 20b4e-20b64 Prologue> Σ0 ↓
<POP 20b64-20b68 RegCacheLoad> Σ0 ↓
<POP 20b68-20b86 Naked> Σ0 ↓ →0x20b8a
<MI 20b68 CLR.B -(A7)> Δ-2 {[#0]}
<Pointer.fp 0x20b6a <LVAR -0x004 @ 1(rw)>> Δ-4 {[#0]|[@@-4]}
<Call 0x20b6c 0x21132> {[#0]|[@@-4]}
exp_READ_PAREG.FIU(Sw_1, &Sr_1)
<POP 20b72-20b74 StackAdj> Δ+6 {}
<MI 20b74 CLR.L D0> {}
<MI 20b76 MOVE.B (A6-0x4),D0> {}
<MI 20b78 ANDI.W #0x0008,D0> {}
<MI 20b7c MOVE.B D0,(A6-0x4)> {}
<MI 20b7e CLR.B (A6+0x8)> {}
<MI 20b82 TST.B D0> {}
<MI 20b84 BNE 0x20b8a> {}
<POP 20b86-20b8a Naked> Σ0 ↓
<MI 20b86 ADDQ.B #0x1,(A6+0x8)> {}
<POP 20b8a-20b92 Epilogue> Σ0 ←0x20b68
@ 20b92
<LVAR 0x008 1(r)>
<LVAR -0x001 1(r)>
<LVAR -0x008 @>
<LVAR -0x014 @>
<LVAR -0x015 @ 1(r)>
<LVAR -0x016 @ 1(r)>
<POP 20b92-20cf0 Body> Δ+4
<POP 20b92-20ba8 Prologue> Σ0 ↓
<POP 20ba8-20bb8 RegCacheLoad> Σ0 ↓
<POP 20bb8-20be6 Naked> Σ0 ↓ →0x20ca4
<Pointer.fp 0x20bb8 <LVAR -0x016 @ 1(r)>> Δ-4 {[@@-22]}
<Pointer.fp 0x20bbc <LVAR -0x015 @ 1(r)>> Δ-4 {[@@-22]|[@@-21]}
<Pointer.fp 0x20bc0 <LVAR -0x014 @>> Δ-4 {[@@-22]|[@@-21]|[@@-20]}
<Call 0x20bc4 0x20918> {[@@-22]|[@@-21]|[@@-20]}
<POP 20bc8-20bcc StackAdj> Δ+10 {[-2-]}
<POP 20bcc-20bcd StackAdj> Δ+2 {}
<Const 0x20bcd 0xffcf.2> Δ-2 {[#65487]}
<MI 20bd0 CLR.B -(A7)> Δ-2 {[#65487]|[#0]}
<Pointer.fp 0x20bd2 <LVAR -0x008 @>> Δ-4 {[#65487]|[#0]|[@@-8]}
<Call 0x20bd6 0x2133a> {[#65487]|[#0]|[@@-8]}
exp_READ_RF_B.VAL(Sw_2, Sw_1, &Sr_8)
<POP 20bdc-20bde StackAdj> Δ+8 {}
<MI 20bde TST.B (A6-0x15)> {}
<MI 20be2 BEQ 0x20ca4> {}
<POP 20be6-20bf0 Naked> Σ0 ↓ →0x20c06
<POP 20be6-20be8 StackAdj> Δ-2 {[-2-]}
<Call 0x20be8 0x20b4e> {[-2-]}
<MI 20bec TST.B (A7)+> Δ+2 {}
<MI 20bee BEQ 0x20c06> {}
<POP 20bf0-20bfa Naked> Σ0 ↓ →0x20c06
<MI 20bf0 CLR.L D0> {}
<MI 20bf2 MOVE.B (A6-0x1),D0> {}
<MI 20bf6 CMP.W #0x18,D0> {}
<MI 20bf8 BNE 0x20c06> {}
<POP 20bfa-20c06 Naked> Σ0 →0x20ca2
<Const 0x20bfa 0x18.2> Δ-2 {[#24]}
<Call 0x20bfc 0x20a48> {[#24]}
<POP 20c00-20c02 StackAdj> Δ+2 {}
<MI 20c02 BRA 0x20ca2> {}
<POP 20c06-20ca2 Naked> Σ0 ↓ ←0x20be6 ←0x20bf0
<Blob 0x20c06 [42] @> Δ-42 {[«42""»]}
<POP 20c18-20c1a StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x20c1a 41> {[«42""»]|[$$a MACHINE_CHECK error occured, therefore_]}
<Call 0x20c2c 0x103d8> {[«42""»]|[$$a MACHINE_CHECK error occured, therefore_]}
WriteConsoleString(str : String)
<POP 20c32-20c36 StackAdj> Δ+44 {[-2-]}
<POP 20c36-20c37 StackAdj> Δ+2 {}
<Blob 0x20c37 [2] @> Δ-2 {[«2""»]}
<Blob 0x20c3a [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x20c3e [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 20c42-20c44 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x20c44 6> {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]}
<MI 20c56 MOVE.L (A7)+,0x21c4e> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 20c58-20c5a StackAdj> Δ+2 {[«2""»]|[«2""»]}
<Blob 0x20c5a [4] 0x21c4e> Δ-4 {[«2""»]|[«2""»]|[«4»]}
<Call 0x20c5c 0x102cc> {[«2""»]|[«2""»]|[«4»]}
StringDup(a : String) : String
<POP 20c62-20c64 StackAdj> Δ+4 {[«2""»]|[«2""»]}
<MI 20c64 MOVE.B 0x21c48,D0> {[«2""»]|[«2""»]}
<MI 20c6a EXTB.W D0> {[«2""»]|[«2""»]}
<POP 0x20c6c LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«2""»]|[«2""»]}
<MI 20c6e MOVE.B D0,-(A7)> Δ-2 {[«2""»]|[«2""»]|[2, 'D0']}
<MI 20c70 MOVE.B 0x21c49,D0> {[«2""»]|[«2""»]|[2, 'D0']}
<MI 20c76 EXTB.W D0> {[«2""»]|[«2""»]|[2, 'D0']}
<POP 0x20c78 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«2""»]|[«2""»]|[2, 'D0']}
<MI 20c7a MOVE.B D0,-(A7)> Δ-2 {[«2""»]|[«2""»]|[2, 'D0']|[2, 'D0']}
<Const 0x20c7c 0x21c4a.4> Δ-4 {[«2""»]|[«2""»]|[2, 'D0']|[2, 'D0']|[##138314]}
<Const 0x20c7e 0x21c52.4> Δ-4 {[«2""»]|[«2""»]|[2, 'D0']|[2, 'D0']|[##138314]|[##138322]}
<Const 0x20c84 0x21c56.4> Δ-4 {[«2""»]|[«2""»]|[2, 'D0']|[2, 'D0']|[##138314]|[##138322]|[##138326]}
<Const 0x20c8a 0x21c5a.4> Δ-4 {[«2""»]|[«2""»]|[2, 'D0']|[2, 'D0']|[##138314]|[##138322]|[##138326]|[##138330]}
<Const 0x20c90 0x21c5b.4> Δ-4 {[«2""»]|[«2""»]|[2, 'D0']|[2, 'D0']|[##138314]|[##138322]|[##138326]|[##138330]|[##138331]}
<Call 0x20c96 0x1053e> {[«2""»]|[«2""»]|[2, 'D0']|[2, 'D0']|[##138314]|[##138322]|[##138326]|[##138330]|[##138331]}
FSCALL_1053e
<POP 20c9c-20ca0 StackAdj> Δ+28 {}
<MI 20ca0 CLR.B 0x21c4a> {}
<POP 20ca2-20ca4 Naked> Σ0 →0x20ce8 ←0x20bfa
<MI 20ca2 BRA 0x20ce8> {}
<POP 20ca4-20caa Naked> Σ0 ↓ →0x20cd2 ←0x20bb8
<MI 20ca4 TST.B (A6-0x16)> {}
<MI 20ca8 BEQ 0x20cd2> {}
<POP 20caa-20cb6 Naked> Σ0 ↓ →0x20cd0
<MI 20caa CLR.L D0> {}
<MI 20cac MOVE.B (A6-0x1),D0> {}
<MI 20cb0 CMPI.W #0x00ff,D0> {}
<MI 20cb4 BEQ 0x20cd0> {}
<POP 20cb6-20cba Naked> Σ0 ↓ →0x20cc0
<MI 20cb6 TST.W D0> {}
<MI 20cb8 BLT 0x20cc0> {}
<POP 20cba-20cc0 Naked> Σ0 ↓ →0x20cc8
<MI 20cba CMPI.W #0x001f,D0> {}
<MI 20cbe BLE 0x20cc8> {}
<POP 20cc0-20cc8 Naked> Σ0 Δ-2 →0x20cce ←0x20cb6
<Const 0x20cc0 0x1.2> Δ-2 {[#1]}
<Call 0x20cc2 0x20aea> {[#1]}
<MI 20cc6 BRA 0x20cce> {[#1]}
<POP 20cc8-20cce Naked> Σ0 Δ-2 ↓ ←0x20cba
<MI 20cc8 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x20cca 0x20a48> {[2, 'D0']}
<POP 20cce-20cd0 Naked> Σ-2 Δ+2 ↓ ←0x20cc0
<POP 20cce-20cd0 StackAdj> Δ+2 {}
<POP 20cd0-20cd2 Naked> Σ0 →0x20ce8 ←0x20caa
<MI 20cd0 BRA 0x20ce8> {}
<POP 20cd2-20cd8 Naked> Σ0 ↓ →0x20cde ←0x20ca4
<MI 20cd2 TST.B (A6+0x8)> {}
<MI 20cd6 BEQ 0x20cde> {}
<POP 20cd8-20cde Naked> Σ0 Δ-2 →0x20ce2
<Const 0x20cd8 0x2.2> Δ-2 {[#2]}
<MI 20cdc BRA 0x20ce2> {[#2]}
<POP 20cde-20ce2 Naked> Σ0 Δ-2 ↓ ←0x20cd2
<Const 0x20cde 0x3.2> Δ-2 {[#3]}
<POP 20ce2-20ce8 Naked> Σ-2 Δ+2 ↓ ←0x20cd8
<Call 0x20ce2 0x20aea> {[-2-]}
<POP 20ce6-20ce8 StackAdj> Δ+2 {}
<POP 20ce8-20cf0 Epilogue> Σ0 ←0x20ca2 ←0x20cd0
@ 20cf0
<LVAR 0x008 4(r)>
<LVAR -0x00a @>
<LVAR -0x00b @ 1(r)>
<LVAR -0x00c @>
<POP 20cf0-20dfc Body>
<POP 20cf0-20d06 Prologue> Σ0 ↓
<POP 20d06-20d1c RegCacheLoad> Σ0 ↓
<POP 20d1c-20d2a Naked> Σ0 ↓
<MI 20d1c MOVE.L #0x258,D5> {}
<MI 20d22 MOVEQ.L #0x00,D7> {}
<MI 20d24 MOVEA.L (A6+0x8),A0> {}
<MI 20d28 CLR.B (A0)> {}
<POP 20d2a-20db2 Naked> Σ0 ↓ ←0x20de4
<Const 0x20d2a 0x9896.4> Δ-4 {[##39062]}
<Call 0x20d30 0x10224> {[##39062]}
KC12_Sleep(dur: Long)
<POP 20d36-20d38 StackAdj> Δ+2 {[-2-]}
<POP 20d38-20d39 StackAdj> Δ+2 {}
<Const 0x20d39 0x4.2> Δ-2 {[#4]}
<Pointer.fp 0x20d3c <LVAR -0x00c @>> Δ-4 {[#4]|[@@-12]}
<Pointer.fp 0x20d3e <LVAR -0x00b @ 1(r)>> Δ-4 {[#4]|[@@-12]|[@@-11]}
<Pointer.fp 0x20d40 <LVAR -0x00a @>> Δ-4 {[#4]|[@@-12]|[@@-11]|[@@-10]}
<Call 0x20d42 0x10484> {[#4]|[@@-12]|[@@-11]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20d44-20d46 StackAdj> Δ+14 {}
<MI 20d46 MOVE.B D7,D0> {}
<MI 20d48 OR.B (A6-0xb),D0> {}
<MI 20d4a EXTB.W D0> {}
<POP 0x20d4c LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20d4e MOVE.B D0,D7> {}
<Const 0x20d50 0x7.2> Δ-2 {[#7]}
<Pointer.fp 0x20d54 <LVAR -0x00c @>> Δ-4 {[#7]|[@@-12]}
<Pointer.fp 0x20d56 <LVAR -0x00b @ 1(r)>> Δ-4 {[#7]|[@@-12]|[@@-11]}
<Pointer.fp 0x20d58 <LVAR -0x00a @>> Δ-4 {[#7]|[@@-12]|[@@-11]|[@@-10]}
<Call 0x20d5a 0x10484> {[#7]|[@@-12]|[@@-11]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20d5c-20d5e StackAdj> Δ+14 {}
<MI 20d5e MOVE.B D7,D0> {}
<MI 20d60 OR.B (A6-0xb),D0> {}
<MI 20d62 EXTB.W D0> {}
<POP 0x20d64 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20d66 MOVE.B D0,D7> {}
<Const 0x20d68 0x6.2> Δ-2 {[#6]}
<Pointer.fp 0x20d6c <LVAR -0x00c @>> Δ-4 {[#6]|[@@-12]}
<Pointer.fp 0x20d6e <LVAR -0x00b @ 1(r)>> Δ-4 {[#6]|[@@-12]|[@@-11]}
<Pointer.fp 0x20d70 <LVAR -0x00a @>> Δ-4 {[#6]|[@@-12]|[@@-11]|[@@-10]}
<Call 0x20d72 0x10484> {[#6]|[@@-12]|[@@-11]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20d74-20d76 StackAdj> Δ+14 {}
<MI 20d76 MOVE.B D7,D0> {}
<MI 20d78 OR.B (A6-0xb),D0> {}
<MI 20d7a EXTB.W D0> {}
<POP 0x20d7c LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20d7e MOVE.B D0,D7> {}
<Const 0x20d80 0x2.2> Δ-2 {[#2]}
<Pointer.fp 0x20d84 <LVAR -0x00c @>> Δ-4 {[#2]|[@@-12]}
<Pointer.fp 0x20d86 <LVAR -0x00b @ 1(r)>> Δ-4 {[#2]|[@@-12]|[@@-11]}
<Pointer.fp 0x20d88 <LVAR -0x00a @>> Δ-4 {[#2]|[@@-12]|[@@-11]|[@@-10]}
<Call 0x20d8a 0x10484> {[#2]|[@@-12]|[@@-11]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20d8c-20d8e StackAdj> Δ+14 {}
<MI 20d8e MOVE.B D7,D0> {}
<MI 20d90 OR.B (A6-0xb),D0> {}
<MI 20d92 EXTB.W D0> {}
<POP 0x20d94 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20d96 MOVE.B D0,D7> {}
<Const 0x20d98 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x20d9c <LVAR -0x00c @>> Δ-4 {[#3]|[@@-12]}
<Pointer.fp 0x20d9e <LVAR -0x00b @ 1(r)>> Δ-4 {[#3]|[@@-12]|[@@-11]}
<Pointer.fp 0x20da0 <LVAR -0x00a @>> Δ-4 {[#3]|[@@-12]|[@@-11]|[@@-10]}
<Call 0x20da2 0x10484> {[#3]|[@@-12]|[@@-11]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20da4-20da6 StackAdj> Δ+14 {}
<MI 20da6 MOVE.B D7,D0> {}
<MI 20da8 OR.B (A6-0xb),D0> {}
<MI 20daa EXTB.W D0> {}
<POP 0x20dac LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20dae MOVE.B D0,D7> {}
<MI 20db0 MOVEQ.L #0x0c,D6> {}
<POP 20db2-20dc2 Naked> Σ0 ↓ →0x20dd8 ←0x20dd8
<POP 20db2-20db4 StackAdj> Δ-2 {[-2-]}
<MI 20db4 MOVE.B D6,-(A7)> Δ-2 {[-2-]|[2, 'D6']}
<Call 0x20db6 0x104c0> {[-2-]|[2, 'D6']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20dbc-20dbe StackAdj> Δ+2 {[-2-]}
<MI 20dbe TST.B (A7)+> Δ+2 {}
<MI 20dc0 BEQ 0x20dd8> {}
<POP 20dc2-20dd8 Naked> Σ0 ↓
<MI 20dc2 MOVE.B D6,-(A7)> Δ-2 {[2, 'D6']}
<Pointer.fp 0x20dc4 <LVAR -0x00c @>> Δ-4 {[2, 'D6']|[@@-12]}
<Pointer.fp 0x20dc6 <LVAR -0x00b @ 1(r)>> Δ-4 {[2, 'D6']|[@@-12]|[@@-11]}
<Pointer.fp 0x20dc8 <LVAR -0x00a @>> Δ-4 {[2, 'D6']|[@@-12]|[@@-11]|[@@-10]}
<Call 0x20dca 0x10484> {[2, 'D6']|[@@-12]|[@@-11]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20dcc-20dce StackAdj> Δ+14 {}
<MI 20dce MOVE.B D7,D0> {}
<MI 20dd0 OR.B (A6-0xb),D0> {}
<MI 20dd2 EXTB.W D0> {}
<POP 0x20dd4 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20dd6 MOVE.B D0,D7> {}
<POP 20dd8-20de0 Naked> Σ0 ↓ →0x20db2 ←0x20db2
<MI 20dd8 ADDQ.B #0x1,D6> {}
<MI 20dda CMPI.B #0x0f,D6> {}
<MI 20dde BLE 0x20db2> {}
<POP 20de0-20de4 Naked> Σ0 ↓ →0x20dea
<MI 20de0 SUBQ.L #0x1,D5> {}
<MI 20de2 BEQ 0x20dea> {}
<POP 20de4-20dea Naked> Σ0 ↓ →0x20d2a
<MI 20de4 TST.B D7> {}
<MI 20de6 BEQ 0x20d2a> {}
<POP 20dea-20df4 Naked> Σ0 ↓ ←0x20de0
<MI 20dea MOVEA.L (A6+0x8),A0> {}
<MI 20dee MOVE.B D7,(A0)> {}
<MI 20df0 NEG.B (A0)> {}
<MI 20df2 ADDQ.B #0x1,(A0)> {}
<POP 20df4-20dfc Epilogue> Σ0
@ 20dfc
<LVAR -0x004 @>
<POP 20dfc-20e50 Body>
<POP 20dfc-20e12 Prologue> Σ0 ↓
<POP 20e12-20e14 RegCacheLoad> Σ0 ↓
<POP 20e14-20e48 Naked> Σ0 ↓
<Blob 0x20e14 [18] @> Δ-18 {[«18""»]}
<MI 20e20 CLR.B -(A7)> Δ-2 {[«18""»]|[#0]}
<POP 20e22-20e24 StackAdj> Δ-4 {[«18""»]|[#0]|[-4-]}
<Lit 0x20e24 18> {[«18""»]|[#0]|[$$P2UCODE.M200_UCODE]}
<POP 20e34-20e36 StackAdj> Δ-2 {[«18""»]|[#0]|[$$P2UCODE.M200_UCODE]|[-2-]}
<POP 20e36-20e37 StackAdj> Δ+2 {[«18""»]|[#0]|[$$P2UCODE.M200_UCODE]}
<Const 0x20e37 0x1.2> Δ-2 {[«18""»]|[#0]|[$$P2UCODE.M200_UCODE]|[#1]}
<Const 0x20e38 0x1.2> Δ-2 {[«18""»]|[#0]|[$$P2UCODE.M200_UCODE]|[#1]|[#1]}
<Const 0x20e3a 0x1.2> Δ-2 {[«18""»]|[#0]|[$$P2UCODE.M200_UCODE]|[#1]|[#1]|[#1]}
<Pointer.fp 0x20e3c <LVAR -0x004 @>> Δ-4 {[«18""»]|[#0]|[$$P2UCODE.M200_UCODE]|[#1]|[#1]|[#1]|[@@-4]}
<Call 0x20e40 0x2055c> {[«18""»]|[#0]|[$$P2UCODE.M200_UCODE]|[#1]|[#1]|[#1]|[@@-4]}
<POP 20e44-20e48 StackAdj> Δ+34 {}
<POP 20e48-20e50 Epilogue> Σ0
@ 20e50
<POP 20e50-20f0a Body>
<POP 20e50-20e66 Prologue> Σ0 ↓
<POP 20e66-20e82 RegCacheLoad> Σ0 ↓
<POP 20e82-20e8e Naked> Σ0 ↓ →0x20ea2
<POP 20e82-20e84 StackAdj> Δ-2 {[-2-]}
<Const 0x20e84 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x20e86 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20e88-20e8a StackAdj> Δ+2 {[-2-]}
<MI 20e8a TST.B (A7)+> Δ+2 {}
<MI 20e8c BEQ 0x20ea2> {}
<POP 20e8e-20ea2 Naked> Σ0 ↓
<Const 0x20e8e 0xc.2> Δ-2 {[#12]}
<Blob 0x20e90 [20] @> Δ-20 {[#12]|[«20""»]}
<Call 0x20e9e 0x216ec> {[#12]|[«20""»]}
<POP 20ea0-20ea2 StackAdj> Δ+22 {}
<POP 20ea2-20eae Naked> Σ0 ↓ →0x20ec2 ←0x20e82
<POP 20ea2-20ea4 StackAdj> Δ-2 {[-2-]}
<Const 0x20ea4 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x20ea6 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20ea8-20eaa StackAdj> Δ+2 {[-2-]}
<MI 20eaa TST.B (A7)+> Δ+2 {}
<MI 20eac BEQ 0x20ec2> {}
<POP 20eae-20ec2 Naked> Σ0 ↓
<Const 0x20eae 0xd.2> Δ-2 {[#13]}
<Blob 0x20eb0 [20] @> Δ-20 {[#13]|[«20""»]}
<Call 0x20ebe 0x216ec> {[#13]|[«20""»]}
<POP 20ec0-20ec2 StackAdj> Δ+22 {}
<POP 20ec2-20ece Naked> Σ0 ↓ →0x20ee2 ←0x20ea2
<POP 20ec2-20ec4 StackAdj> Δ-2 {[-2-]}
<Const 0x20ec4 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x20ec6 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20ec8-20eca StackAdj> Δ+2 {[-2-]}
<MI 20eca TST.B (A7)+> Δ+2 {}
<MI 20ecc BEQ 0x20ee2> {}
<POP 20ece-20ee2 Naked> Σ0 ↓
<Const 0x20ece 0xe.2> Δ-2 {[#14]}
<Blob 0x20ed0 [20] @> Δ-20 {[#14]|[«20""»]}
<Call 0x20ede 0x216ec> {[#14]|[«20""»]}
<POP 20ee0-20ee2 StackAdj> Δ+22 {}
<POP 20ee2-20eee Naked> Σ0 ↓ →0x20f02 ←0x20ec2
<POP 20ee2-20ee4 StackAdj> Δ-2 {[-2-]}
<Const 0x20ee4 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x20ee6 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20ee8-20eea StackAdj> Δ+2 {[-2-]}
<MI 20eea TST.B (A7)+> Δ+2 {}
<MI 20eec BEQ 0x20f02> {}
<POP 20eee-20f02 Naked> Σ0 ↓
<Const 0x20eee 0xf.2> Δ-2 {[#15]}
<Blob 0x20ef0 [20] @> Δ-20 {[#15]|[«20""»]}
<Call 0x20efe 0x216ec> {[#15]|[«20""»]}
<POP 20f00-20f02 StackAdj> Δ+22 {}
<POP 20f02-20f0a Epilogue> Σ0 ←0x20ee2
@ 20f0a
START
<POP 20f0a--0001 Body>
<POP 20f0a-20f14 Prologue> Σ0
<POP 20f14-20f2c RegCacheLoad> Σ0 ↓
<POP 20f2c-20fa2 Naked> Σ0 ↓
<Call 0x20f2c 0x10398> {}
FSCALL_10398
<Const 0x20f32 0x0.4> Δ-4 {[##0]}
<Call 0x20f36 0x104d8> {[##0]}
ExpInit(a : Long)
<POP 20f3c-20f3e StackAdj> Δ+4 {}
<Const 0x20f3e 0x21c44.4> Δ-4 {[##138308]}
<Const 0x20f40 0x21c48.4> Δ-4 {[##138308]|[##138312]}
<Const 0x20f46 0x21c49.4> Δ-4 {[##138308]|[##138312]|[##138313]}
<Const 0x20f48 0x21c4b.4> Δ-4 {[##138308]|[##138312]|[##138313]|[##138315]}
<Const 0x20f4a 0x21c4c.4> Δ-4 {[##138308]|[##138312]|[##138313]|[##138315]|[##138316]}
<Call 0x20f50 0x10562> {[##138308]|[##138312]|[##138313]|[##138315]|[##138316]}
?IPC_GetVar4xBool(VAR a : Pointer; VAR b : Bool ; VAR c : Bool; VAR d: Bool; VAR e: Bool)
<POP 20f56-20f5a StackAdj> Δ+18 {[-2-]}
<POP 20f5a-20f5b StackAdj> Δ+2 {}
<Blob 0x20f5b [2] 0x21c49> Δ-2 {[«2»]}
<Call 0x20f5c 0x104d2> {[«2»]}
SetExpInitDone(a : Byte)
<POP 20f62-20f63 StackAdj> Δ+2 ↓ {}
<Blob 0x20f63 [8] @> Δ-8 {[«8""»]}
<POP 20f72-20f74 StackAdj> Δ-4 {[«8""»]|[-4-]}
<Lit 0x20f74 7> {[«8""»]|[$$P2UCODE]}
<MI 20f84 MOVE.L (A7)+,0x21c52> Δ+4 {[«8""»]}
<POP 20f8a-20f8c StackAdj> Δ+8 {}
<Const 0x20f8c 0x21c56.4> Δ-4 {[##138326]}
<Call 0x20f92 0x102b8> {[##138326]}
NewString(VAR a : String)
<POP 20f98-20f9a StackAdj> Δ+4 {}
<MI 20f9a CLR.B 0x21c5a> {}
<MI 20fa0 MOVEQ.L #0x00,D0> {}
<POP 20fa2-20fbe Naked> Σ0 ↓ →0x20fa2 ←0x20fa2
<MI 20fa2 MOVE.L D0,0x21c64> {}
<POP 0x20fa8 LimitCheck 0x0 ≤ D0 ≤ 0x7> {}
<MI 20fae LEA.L 0x21c3a,A0> {}
<MI 20fb4 CLR.B (A0+D0.L+#0x21)> {}
<MI 20fb8 ADDQ.L #0x1,D0> {}
<MI 20fba CMP.L #0x07,D0> {}
<MI 20fbc BLE 0x20fa2> {}
<POP 20fbe-20fce Naked> Σ0 ↓ →0x20ffa
<MI 20fbe MOVE.B #0x01,0x21c4a> {}
<MI 20fc4 CLR.L D0> {}
<MI 20fc6 MOVE.B 0x21c44,D0> {}
<MI 20fc8 CMPI.W #0x0020,D0> {}
<MI 20fcc BLS 0x20ffa> {}
<POP 20fce-20ffa Naked> Σ0 ↓
<Blob 0x20fce [30] @> Δ-30 {[«30""»]}
<Const 0x20fda 0xe.2> Δ-2 {[«30""»]|[#14]}
<POP 20fdc-20fde StackAdj> Δ-4 {[«30""»]|[#14]|[-4-]}
<Lit 0x20fde 30> {[«30""»]|[#14]|[$$Illegal test name for P2UCODE.]}
<Call 0x20ff0 0x103b8> {[«30""»]|[#14]|[$$Illegal test name for P2UCODE.]}
PopProgram(status : Byte; msg : String)
<POP 20ff6-20ffa StackAdj> Δ+36 {}
<POP 20ffa-21002 Naked> Σ0 ↓ →0x21006 ←0x20fbe
<MI 20ffa TST.B 0x21c4c> {}
<MI 21000 BEQ 0x21006> {}
<POP 21002-21006 Naked> Σ0 ↓
<Call 0x21002 0x20624> {}
<POP 21006-2100a Naked> Σ0 ↓ →0x21034 ←0x20ffa
<MI 21006 TST.B 0x21c4b> {}
<MI 21008 BEQ 0x21034> {}
<POP 2100a-21034 Naked> Σ0 ↓
<Call 0x2100a 0x20dfc> {}
<Blob 0x2100e [4] @> Δ-4 {[«4""»]}
<Blob 0x21012 [4] @> Δ-4 {[«4""»]|[«4""»]}
<MI 21016 CLR.B -(A7)> Δ-2 {[«4""»]|[«4""»]|[#0]}
<Call 0x21018 0x213a4> {[«4""»]|[«4""»]|[#0]}
exp_LOAD_WDR.VAL(Sw_8, Sw_1)
<POP 2101e-21020 StackAdj> Δ+6 {[«4""»]}
<POP 21020-21021 StackAdj> Δ+4 {}
<Blob 0x21021 [4] @> Δ-4 {[«4""»]}
<Blob 0x21024 [4] @> Δ-4 {[«4""»]|[«4""»]}
<MI 21028 CLR.B -(A7)> Δ-2 {[«4""»]|[«4""»]|[#0]}
<Call 0x2102a 0x212e2> {[«4""»]|[«4""»]|[#0]}
exp_LOAD_WDR.TYP(Sw_8, Sw_1)
<POP 21030-21034 StackAdj> Δ+10 {}
<POP 21034-21064 Naked> Σ0 ↓ →0x21086 ←0x21006
<Call 0x21034 0x20e50> {}
<MI 21038 MOVE.B #0x0e,0x21c42> {}
<MI 2103e MOVE.B 0x21c44,0x21c43> {}
<Blob 0x21044 [2] 0x21c42> Δ-2 {[«2»]}
<Call 0x2104a 0x20704> {[«2»]}
<POP 2104e-21050 StackAdj> Δ+2 {}
<MI 21050 CLR.B 0x21c45> {}
<MI 21056 CLR.B 0x21c46> {}
<MI 2105c CLR.L D0> {}
<MI 2105e MOVE.B 0x21c44,D0> {}
<MI 21060 CMP.W #0x01,D0> {}
<MI 21062 BNE 0x21086> {}
<POP 21064-21086 Naked> Σ0 →0x21092
<MI 21064 MOVE.B #0x01,0x21c45> {}
<MI 2106a MOVE.B #0x01,0x21c46> {}
<MI 21070 CLR.L D0> {}
<MI 21072 MOVE.B 0x21c43,D0> {}
<MI 21078 SUBQ.W #0x1,D0> {}
<POP 0x2107a LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 2107e MOVE.B D0,0x21c43> {}
<MI 21084 BRA 0x21092> {}
<POP 21086-2108c Naked> Σ0 ↓ →0x21092 ←0x21034
<MI 21086 CMPI.W #0x0002,D0> {}
<MI 2108a BNE 0x21092> {}
<POP 2108c-21092 Naked> Σ0 ↓
<MI 2108c MOVE.B #0x01,0x21c45> {}
<POP 21092-210ee Naked> Σ0 ↓ ←0x21064 ←0x21086
<Call 0x21092 0x2087a> {}
<Const 0x21096 0x21c47.4> Δ-4 {[##138311]}
<Call 0x2109c 0x20cf0> {[##138311]}
<POP 210a0-210a2 StackAdj> Δ+2 {[-2-]}
<POP 210a2-210a3 StackAdj> Δ+2 {}
<Blob 0x210a3 [2] 0x21c47> Δ-2 {[«2»]}
<Call 0x210a8 0x20b92> {[«2»]}
<POP 210ac-210ad StackAdj> Δ+2 {}
<Blob 0x210ad [2] 0x21c49> Δ-2 {[«2»]}
<Const 0x210ae 0x21c4d.4> Δ-4 {[«2»]|[##138317]}
<Call 0x210b4 0x2045a> {[«2»]|[##138317]}
<POP 210b8-210ba StackAdj> Δ+4 {[«2»]}
<POP 210ba-210bb StackAdj> Δ+2 {}
<Blob 0x210bb [2] 0x21c4a> Δ-2 {[«2»]}
<Blob 0x210c0 [4] 0x21c52> Δ-4 {[«2»]|[«4»]}
<Blob 0x210c6 [4] 0x21c56> Δ-4 {[«2»]|[«4»]|[«4»]}
<Blob 0x210cc [2] 0x21c5a> Δ-2 {[«2»]|[«4»]|[«4»]|[«2»]}
<Blob 0x210d2 [8] 0x21c5b> Δ-8 {[«2»]|[«4»]|[«4»]|[«2»]|[«8»]}
<Call 0x210e4 0x1054a> {[«2»]|[«4»]|[«4»]|[«2»]|[«8»]}
?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
<POP 210ea-210ee StackAdj> Δ+20 {}
<POP 210ee-210f4 Naked> Σ0
<Call 0x210ee 0x10284> {}
?exit
@ 213f2
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 4(r)>
<POP 213f2-2149c Body> Δ+12
<POP 213f2-21408 Prologue> Σ0 ↓
<POP 21408-2140e RegCacheLoad> Σ0 ↓
<POP 2140e-2141a Naked> Σ0 ↓ →0x2142c
<POP 2140e-21410 StackAdj> Δ-2 {[-2-]}
<Call 0x21410 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 21416 TST.B (A7)+> Δ+2 {}
<MI 21418 BEQ 0x2142c> {}
<POP 2141a-2142c Naked> Σ0 Δ-12 →0x2143c
<Blob 0x2141a [12] @> Δ-12 {[«12""»]}
<MI 2142a BRA 0x2143c> {[«12""»]}
<POP 2142c-2143c Naked> Σ0 Δ-12 ↓ ←0x2140e
<Blob 0x2142c [12] @> Δ-12 {[«12""»]}
<POP 2143c-21494 Naked> Σ-12 Δ+12 ↓ ←0x2141a
<POP 2143c-2143e StackAdj> Δ-4 {[-16-]}
<Lit 0x2143e> {[-12-]|[$$…]}
<Pointer.sp 0x2143e 4> Δ-4
<Const 0x21442 0x1.2> Δ-2
<Const 0x21446 0xb.2> Δ-2
<Call 0x2144a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21450-21452 StackAdj> Δ+8
<Pointer.fp 0x21452 <LVAR -0x004 @ 4(r)>> Δ-4 {[-12-]|[$$…]|[@@-4]}
<Call 0x21454 0x10460> {[-12-]|[$$…]|[@@-4]}
ExpLoad(a : String; b: Pointer)
<POP 2145a-2145e StackAdj> Δ+20 {}
<MI 2145e MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<MI 21462 MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']}
<Pointer.sp 0x21464 4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]}
<Const 0x21468 0x0.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]}
<Const 0x2146c 0x0.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
<Call 0x21470 0x10466> {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 21476-2147a StackAdj> Δ+16 {[2, '(A6+0x8)']}
<MI 2147a CLR.B (A7)> {[2, '(A6+0x8)']}
<MI 2147c MOVE.B (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0x8)']|[2, '(A6+0xa)']}
<MI 21480 MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[2, '(A6+0xa)']|[4, '(A6-0x4)']}
<Call 0x21482 0x104ba> {[2, '(A6+0x8)']|[2, '(A6+0xa)']|[4, '(A6-0x4)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 21488-2148a StackAdj> Δ+8 {}
<Pointer.fp 0x2148a <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x2148c 0x10496> {[@@-4]}
ExpClose(exp : Pointer)
<POP 21492-21494 StackAdj> Δ+4 {}
<POP 21494-2149c Epilogue> Σ0
@ 214b0
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 214b0-2153e Body> Δ+10
<POP 214b0-214c6 Prologue> Σ0 ↓
<POP 214c6-214cc RegCacheLoad> Σ0 ↓
<POP 214cc-214d8 Naked> Σ0 ↓ →0x214ea
<POP 214cc-214ce StackAdj> Δ-2 {[-2-]}
<Call 0x214ce 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 214d4 TST.B (A7)+> Δ+2 {}
<MI 214d6 BEQ 0x214ea> {}
<POP 214d8-214ea Naked> Σ0 Δ-10 →0x214fa
<Blob 0x214d8 [10] @> Δ-10 {[«10""»]}
<MI 214e8 BRA 0x214fa> {[«10""»]}
<POP 214ea-214fa Naked> Σ0 Δ-10 ↓ ←0x214cc
<Blob 0x214ea [10] @> Δ-10 {[«10""»]}
<POP 214fa-21536 Naked> Σ-10 Δ+10 ↓ ←0x214d8
<POP 214fa-214fc StackAdj> Δ-4 {[-14-]}
<Lit 0x214fc> {[-10-]|[$$…]}
<Pointer.sp 0x214fc 4> Δ-4
<Const 0x21500 0x1.2> Δ-2
<Const 0x21504 0x9.2> Δ-2
<Call 0x21508 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2150e-21510 StackAdj> Δ+8
<Pointer.fp 0x21510 <LVAR -0x006 @ 4(r)>> Δ-4 {[-10-]|[$$…]|[@@-6]}
<Call 0x21512 0x10460> {[-10-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 21518-2151c StackAdj> Δ+18 {}
<MI 2151c CLR.B -(A7)> Δ-2 {[#0]}
<MI 2151e MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 21522 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x21524 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 2152a-2152c StackAdj> Δ+8 {}
<Pointer.fp 0x2152c <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x2152e 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 21534-21536 StackAdj> Δ+4 {}
<POP 21536-2153e Epilogue> Σ0
@ 2155a
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 2155a-215e8 Body> Δ+14
<POP 2155a-21570 Prologue> Σ0 ↓
<POP 21570-21576 RegCacheLoad> Σ0 ↓
<POP 21576-21582 Naked> Σ0 ↓ →0x21594
<POP 21576-21578 StackAdj> Δ-2 {[-2-]}
<Call 0x21578 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2157e TST.B (A7)+> Δ+2 {}
<MI 21580 BEQ 0x21594> {}
<POP 21582-21594 Naked> Σ0 Δ-14 →0x215a4
<Blob 0x21582 [14] @> Δ-14 {[«14""»]}
<MI 21592 BRA 0x215a4> {[«14""»]}
<POP 21594-215a4 Naked> Σ0 Δ-14 ↓ ←0x21576
<Blob 0x21594 [14] @> Δ-14 {[«14""»]}
<POP 215a4-215e0 Naked> Σ-14 Δ+14 ↓ ←0x21582
<POP 215a4-215a6 StackAdj> Δ-4 {[-18-]}
<Lit 0x215a6> {[-14-]|[$$…]}
<Pointer.sp 0x215a6 4> Δ-4
<Const 0x215aa 0x1.2> Δ-2
<Const 0x215ae 0xd.2> Δ-2
<Call 0x215b2 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 215b8-215ba StackAdj> Δ+8
<Pointer.fp 0x215ba <LVAR -0x006 @ 4(r)>> Δ-4 {[-14-]|[$$…]|[@@-6]}
<Call 0x215bc 0x10460> {[-14-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 215c2-215c6 StackAdj> Δ+22 {}
<MI 215c6 CLR.B -(A7)> Δ-2 {[#0]}
<MI 215c8 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 215cc MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x215ce 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 215d4-215d6 StackAdj> Δ+8 {}
<Pointer.fp 0x215d6 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x215d8 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 215de-215e0 StackAdj> Δ+4 {}
<POP 215e0-215e8 Epilogue> Σ0
@ 21608
<LVAR 0x00e 1(r)>
<LVAR 0x00c 1(r)>
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 4(r)>
<POP 21608-216cc Body> Δ+16
<POP 21608-2161e Prologue> Σ0 ↓
<POP 2161e-21624 RegCacheLoad> Σ0 ↓
<POP 21624-21630 Naked> Σ0 ↓ →0x21642
<POP 21624-21626 StackAdj> Δ-2 {[-2-]}
<Call 0x21626 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2162c TST.B (A7)+> Δ+2 {}
<MI 2162e BEQ 0x21642> {}
<POP 21630-21642 Naked> Σ0 Δ-16 →0x21652
<Blob 0x21630 [16] @> Δ-16 {[«16""»]}
<MI 21640 BRA 0x21652> {[«16""»]}
<POP 21642-21652 Naked> Σ0 Δ-16 ↓ ←0x21624
<Blob 0x21642 [16] @> Δ-16 {[«16""»]}
<POP 21652-216c4 Naked> Σ-16 Δ+16 ↓ ←0x21630
<POP 21652-21654 StackAdj> Δ-4 {[-20-]}
<Lit 0x21654> {[-16-]|[$$…]}
<Pointer.sp 0x21654 4> Δ-4
<Const 0x21658 0x1.2> Δ-2
<Const 0x2165c 0xf.2> Δ-2
<Call 0x21660 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21666-21668 StackAdj> Δ+8
<Pointer.fp 0x21668 <LVAR -0x004 @ 4(r)>> Δ-4 {[-16-]|[$$…]|[@@-4]}
<Call 0x2166a 0x10460> {[-16-]|[$$…]|[@@-4]}
ExpLoad(a : String; b: Pointer)
<POP 21670-21674 StackAdj> Δ+24 {}
<MI 21674 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 21676 MOVE.B (A6+0xc),-(A7)> Δ-2 {[4, '(A6-0x4)']|[2, '(A6+0xc)']}
<Call 0x2167a 0x1046c> {[4, '(A6-0x4)']|[2, '(A6+0xc)']}
ExpInputFlag(exp : Pointer; val : Word)
<POP 21680-21682 StackAdj> Δ+2 {[4, '(A6-0x4)']}
<MI 21682 MOVE.L (A6-0x4),(A7)> {[4, '(A6-0x4)']}
<MI 21684 MOVE.B (A6+0xa),-(A7)> Δ-2 {[4, '(A6-0x4)']|[2, '(A6+0xa)']}
<Call 0x21688 0x1046c> {[4, '(A6-0x4)']|[2, '(A6+0xa)']}
ExpInputFlag(exp : Pointer; val : Word)
<POP 2168e-21690 StackAdj> Δ+4 {[-2-]}
<MI 21690 MOVE.B (A6+0x8),(A7)> {[-2-]}
<MI 21694 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x4)']}
<Pointer.sp 0x21696 4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]}
<Const 0x2169a 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]}
<Const 0x2169e 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
<Call 0x216a2 0x10466> {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 216a8-216aa StackAdj> Δ+16 {[-2-]}
<MI 216aa CLR.B (A7)> {[-2-]}
<MI 216ac MOVE.B (A6+0xe),-(A7)> Δ-2 {[-2-]|[2, '(A6+0xe)']}
<MI 216b0 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[2, '(A6+0xe)']|[4, '(A6-0x4)']}
<Call 0x216b2 0x104ba> {[-2-]|[2, '(A6+0xe)']|[4, '(A6-0x4)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 216b8-216ba StackAdj> Δ+8 {}
<Pointer.fp 0x216ba <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x216bc 0x10496> {[@@-4]}
ExpClose(exp : Pointer)
<POP 216c2-216c4 StackAdj> Δ+4 {}
<POP 216c4-216cc Epilogue> Σ0
@ 216ec
<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 216ec-217e4 Body> Δ+16
<POP 216ec-21702 Prologue> Σ0 ↓
<POP 21702-21712 RegCacheLoad> Σ0 ↓
<POP 21712-2171e Naked> Σ0 ↓ →0x21730
<POP 21712-21714 StackAdj> Δ-2 {[-2-]}
<Call 0x21714 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2171a TST.B (A7)+> Δ+2 {}
<MI 2171c BEQ 0x21730> {}
<POP 2171e-21730 Naked> Σ0 Δ-16 →0x21740
<Blob 0x2171e [16] @> Δ-16 {[«16""»]}
<MI 2172e BRA 0x21740> {[«16""»]}
<POP 21730-21740 Naked> Σ0 Δ-16 ↓ ←0x21712
<Blob 0x21730 [16] @> Δ-16 {[«16""»]}
<POP 21740-217dc Naked> Σ-16 Δ+16 ↓ ←0x2171e
<POP 21740-21742 StackAdj> Δ-4 {[-20-]}
<Lit 0x21742> {[-16-]|[$$…]}
<Pointer.sp 0x21742 4> Δ-4
<Const 0x21746 0x1.2> Δ-2
<Const 0x2174a 0xf.2> Δ-2
<Call 0x2174e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21754-21756 StackAdj> Δ+8
<Pointer.fp 0x21756 <LVAR -0x006 @ 4(r)>> Δ-4 {[-16-]|[$$…]|[@@-6]}
<Call 0x21758 0x10460> {[-16-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 2175e-21762 StackAdj> Δ+24 {}
<MI 21762 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 21766 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 2176a MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '(A6-0x6)']}
<Pointer.sp 0x2176c 4> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '(A6-0x6)']|[^^4]}
<Const 0x21770 0x0.4> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '(A6-0x6)']|[^^4]|[##0]}
<Const 0x21772 0x7.4> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '(A6-0x6)']|[^^4]|[##0]|[##7]}
<Call 0x21776 0x10466> {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '(A6-0x6)']|[^^4]|[##0]|[##7]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 21778-2177c StackAdj> Δ+20 {[4, '(A6+0xc)']}
<MI 2177c MOVE.L (A6+0x14),(A7)> {[4, '(A6+0x14)']}
<MI 21780 MOVE.L (A6+0x10),-(A7)> Δ-4 {[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 21784 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6-0x6)']}
<Pointer.sp 0x21786 4> Δ-4 {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6-0x6)']|[^^4]}
<Const 0x2178a 0x0.4> Δ-4 {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6-0x6)']|[^^4]|[##0]}
<Const 0x2178c 0x7.4> Δ-4 {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6-0x6)']|[^^4]|[##0]|[##7]}
<Call 0x21790 0x10466> {[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6-0x6)']|[^^4]|[##0]|[##7]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 21792-21796 StackAdj> Δ+22 {[-2-]}
<MI 21796 MOVE.B (A6+0x18),(A7)> {[-2-]}
<MI 2179a MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x6)']}
<Pointer.sp 0x2179c 4> Δ-4 {[-2-]|[4, '(A6-0x6)']|[^^4]}
<Const 0x217a0 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]}
<Const 0x217a2 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]|[##0]}
<Call 0x217a4 0x10466> {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 217a6-217a8 StackAdj> Δ+16 {[-2-]}
<MI 217a8 MOVE.B (A6+0x19),(A7)> {[-2-]}
<MI 217ac MOVE.B (A6+0x1a),(A7+0x1)> {[-2-]}
<MI 217b2 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x6)']}
<Pointer.sp 0x217b4 4> Δ-4 {[-2-]|[4, '(A6-0x6)']|[^^4]}
<Const 0x217b8 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]}
<Const 0x217ba 0x1.4> Δ-4 {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]|[##1]}
<Call 0x217be 0x10466> {[-2-]|[4, '(A6-0x6)']|[^^4]|[##0]|[##1]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 217c0-217c2 StackAdj> Δ+16 {[-2-]}
<MI 217c2 CLR.B (A7)> {[-2-]}
<MI 217c4 MOVE.B (A6+0x1c),-(A7)> Δ-2 {[-2-]|[2, '(A6+0x1c)']}
<MI 217c8 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[2, '(A6+0x1c)']|[4, '(A6-0x6)']}
<Call 0x217ca 0x104ba> {[-2-]|[2, '(A6+0x1c)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 217d0-217d2 StackAdj> Δ+8 {}
<Pointer.fp 0x217d2 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x217d4 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 217da-217dc StackAdj> Δ+4 {}
<POP 217dc-217e4 Epilogue> Σ0
@ 21808
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 21808-2188c Body> Δ+18
<POP 21808-2181e Prologue> Σ0 ↓
<POP 2181e-21822 RegCacheLoad> Σ0 ↓
<POP 21822-2182e Naked> Σ0 ↓ →0x2183c
<POP 21822-21824 StackAdj> Δ-2 {[-2-]}
<Call 0x21824 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2182a TST.B (A7)+> Δ+2 {}
<MI 2182c BEQ 0x2183c> {}
<POP 2182e-2183c Naked> Σ0 Δ-18 →0x21848
<Blob 0x2182e [18] @> Δ-18 {[«18""»]}
<MI 2183a BRA 0x21848> {[«18""»]}
<POP 2183c-21848 Naked> Σ0 Δ-18 ↓ ←0x21822
<Blob 0x2183c [18] @> Δ-18 {[«18""»]}
<POP 21848-21884 Naked> Σ-18 Δ+18 ↓ ←0x2182e
<POP 21848-2184a StackAdj> Δ-4 {[-22-]}
<Lit 0x2184a> {[-18-]|[$$…]}
<Pointer.sp 0x2184a 4> Δ-4
<Const 0x2184e 0x1.2> Δ-2
<Const 0x21852 0x12.2> Δ-2
<Call 0x21856 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2185c-2185e StackAdj> Δ+8
<Pointer.fp 0x2185e <LVAR -0x006 @ 4(r)>> Δ-4 {[-18-]|[$$…]|[@@-6]}
<Call 0x21860 0x10460> {[-18-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 21866-2186a StackAdj> Δ+26 {}
<MI 2186a CLR.B -(A7)> Δ-2 {[#0]}
<MI 2186c MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 21870 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x21872 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 21878-2187a StackAdj> Δ+8 {}
<Pointer.fp 0x2187a <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x2187c 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 21882-21884 StackAdj> Δ+4 {}
<POP 21884-2188c Epilogue> Σ0
@ 218bc
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 218bc-2194a Body> Δ+24
<POP 218bc-218d2 Prologue> Σ0 ↓
<POP 218d2-218d8 RegCacheLoad> Σ0 ↓
<POP 218d8-218e4 Naked> Σ0 ↓ →0x218f6
<POP 218d8-218da StackAdj> Δ-2 {[-2-]}
<Call 0x218da 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 218e0 TST.B (A7)+> Δ+2 {}
<MI 218e2 BEQ 0x218f6> {}
<POP 218e4-218f6 Naked> Σ0 Δ-24 →0x21906
<Blob 0x218e4 [24] @> Δ-24 {[«24""»]}
<MI 218f4 BRA 0x21906> {[«24""»]}
<POP 218f6-21906 Naked> Σ0 Δ-24 ↓ ←0x218d8
<Blob 0x218f6 [24] @> Δ-24 {[«24""»]}
<POP 21906-21942 Naked> Σ-24 Δ+24 ↓ ←0x218e4
<POP 21906-21908 StackAdj> Δ-4 {[-28-]}
<Lit 0x21908> {[-24-]|[$$…]}
<Pointer.sp 0x21908 4> Δ-4
<Const 0x2190c 0x1.2> Δ-2
<Const 0x21910 0x17.2> Δ-2
<Call 0x21914 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2191a-2191c StackAdj> Δ+8
<Pointer.fp 0x2191c <LVAR -0x006 @ 4(r)>> Δ-4 {[-24-]|[$$…]|[@@-6]}
<Call 0x2191e 0x10460> {[-24-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 21924-21928 StackAdj> Δ+32 {}
<MI 21928 CLR.B -(A7)> Δ-2 {[#0]}
<MI 2192a MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 2192e MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x21930 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 21936-21938 StackAdj> Δ+8 {}
<Pointer.fp 0x21938 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x2193a 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 21940-21942 StackAdj> Δ+4 {}
<POP 21942-2194a Epilogue> Σ0
@ 21966
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 21966-219ea Body> Δ+14
<POP 21966-2197c Prologue> Σ0 ↓
<POP 2197c-21980 RegCacheLoad> Σ0 ↓
<POP 21980-2198c Naked> Σ0 ↓ →0x2199a
<POP 21980-21982 StackAdj> Δ-2 {[-2-]}
<Call 0x21982 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 21988 TST.B (A7)+> Δ+2 {}
<MI 2198a BEQ 0x2199a> {}
<POP 2198c-2199a Naked> Σ0 Δ-14 →0x219a6
<Blob 0x2198c [14] @> Δ-14 {[«14""»]}
<MI 21998 BRA 0x219a6> {[«14""»]}
<POP 2199a-219a6 Naked> Σ0 Δ-14 ↓ ←0x21980
<Blob 0x2199a [14] @> Δ-14 {[«14""»]}
<POP 219a6-219e2 Naked> Σ-14 Δ+14 ↓ ←0x2198c
<POP 219a6-219a8 StackAdj> Δ-4 {[-18-]}
<Lit 0x219a8> {[-14-]|[$$…]}
<Pointer.sp 0x219a8 4> Δ-4
<Const 0x219ac 0x1.2> Δ-2
<Const 0x219b0 0xe.2> Δ-2
<Call 0x219b4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 219ba-219bc StackAdj> Δ+8
<Pointer.fp 0x219bc <LVAR -0x006 @ 4(r)>> Δ-4 {[-14-]|[$$…]|[@@-6]}
<Call 0x219be 0x10460> {[-14-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 219c4-219c8 StackAdj> Δ+22 {}
<MI 219c8 CLR.B -(A7)> Δ-2 {[#0]}
<MI 219ca MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 219ce MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x219d0 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 219d6-219d8 StackAdj> Δ+8 {}
<Pointer.fp 0x219d8 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x219da 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 219e0-219e2 StackAdj> Δ+4 {}
<POP 219e2-219ea Epilogue> Σ0
@ 21a42
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 21a42-21aaa Body>
<POP 21a42-21a58 Prologue> Σ0 ↓
<POP 21a58-21aa2 Naked> Σ0 ↓
<Blob 0x21a58 [14] @> Δ-14 {[«14""»]}
<Const 0x21a64 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 21a68-21a6a StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x21a6a 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 21a7c-21a7e StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 21a7e MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 21a82 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 21a84 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 21a86 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x21a88 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 21a8e-21a90 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x21a90 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21a96-21a98 StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x21a98 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 21a9e-21aa2 StackAdj> Δ+20 {}
<POP 21aa2-21aaa Epilogue> Σ0
@ 21afe
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 21afe-21c3a Body>
<POP 21afe-21b14 Prologue> Σ0 ↓
<POP 21b14-21b2a RegCacheLoad> Σ0 ↓
<POP 21b2a-21b8a Naked> Σ0 ↓ →0x21bd2
<Call 0x21b2a 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21b30 [18] @> Δ-18 {[«18""»]}
<POP 21b3c-21b3e StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x21b3e 18> {[«18""»]|[$$Experiment error :]}
<Call 0x21b4a 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 21b4c-21b4d StackAdj> Δ+22 ↓ {}
<Blob 0x21b4d [14] @> Δ-14 {[«14""»]}
<POP 21b5c-21b5e StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x21b5e 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 21b68-21b6a StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 21b6a MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x21b6e 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 21b74-21b76 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x21b76 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21b7c-21b7e StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x21b7e 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21b80-21b82 StackAdj> Δ+18 {}
<MI 21b82 MOVEA.L (A6+0xa),A0> {}
<MI 21b86 CMPA.W #0x01,A0> {}
<MI 21b88 BEQ 0x21bd2> {}
<POP 21b8a-21bd2 Naked> Σ0 ↓
<Blob 0x21b8a [14] @> Δ-14 {[«14""»]}
<Blob 0x21b9a [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 21baa-21bac StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x21bac 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 21bb6-21bb8 StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x21bb8> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x21bb8 12> Δ-4
<Const 0x21bbc 0x1.2> Δ-2
<Const 0x21bbe 0x1e.2> Δ-2
<Call 0x21bc0 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21bc2-21bc4 StackAdj> Δ+8
<Call 0x21bc4 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 21bca-21bcc StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x21bcc 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21bce-21bd2 StackAdj> Δ+48 {}
<POP 21bd2-21c32 Naked> Σ0 ↓ ←0x21b2a
<Blob 0x21bd2 [14] @> Δ-14 {[«14""»]}
<POP 21be2-21be4 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x21be4 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 21bee-21bf0 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 21bf0 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x21bf4 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 21bfa-21bfc StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x21bfc 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21c02-21c04 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x21c04 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21c06-21c07 StackAdj> Δ+18 ↓ {}
<Blob 0x21c07 [24] @> Δ-24 {[«24""»]}
<Const 0x21c16 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 21c1a-21c1c StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x21c1c 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x21c2a 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 21c30-21c32 StackAdj> Δ+30 {}
<POP 21c32-21c3a Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.1ddac3ed4c41ff88 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 0f 0a | | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 1c ba | | .PTR 0x21cba 00020010 code.end: 00020010 00 02 1c 3a | : | .PTR 0x21c3a 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 1a 42 | B | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 1a fe | | .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 50 32 55 43 |@(#)P2UC| .XXX[0x160] 00020130 4f 44 45 2c 33 2e 31 2c |ODE,3.1,| 00020138 39 32 2f 30 38 2f 32 38 |92/08/28| 00020140 2c 31 37 3a 31 38 3a 31 |,17:18:1| 00020148 39 5c 50 32 55 41 4c 4c |9\P2UALL| 00020150 20 20 20 20 50 32 55 43 | P2UC| 00020158 4f 4e 44 20 20 20 50 32 |OND P2| 00020160 55 53 59 53 20 20 20 20 |USYS | 00020168 50 32 55 56 41 4c 20 20 |P2UVAL | 00020170 20 20 50 32 55 54 59 50 | P2UTYP| 00020178 20 20 20 20 50 32 55 53 | P2US| 00020180 45 51 20 20 20 20 50 32 |EQ P2| 00020188 55 46 49 55 20 20 20 20 |UFIU | 00020190 50 32 55 4d 45 4d 20 20 |P2UMEM | 00020198 20 20 50 32 55 43 53 41 | P2UCSA| 000201a0 20 20 20 20 50 32 55 4d | P2UM| 000201a8 4d 20 20 20 20 20 50 32 |M P2| 000201b0 55 50 52 49 56 20 20 20 |UPRIV | 000201b8 50 32 55 43 4c 41 53 53 |P2UCLASS| 000201c0 20 20 50 32 55 57 43 53 | P2UWCS| 000201c8 20 20 20 20 50 32 55 53 | P2US| 000201d0 57 43 53 20 20 20 50 32 |WCS P2| 000201d8 55 56 57 43 53 20 20 20 |UVWCS | 000201e0 50 32 55 54 57 43 53 20 |P2UTWCS | 000201e8 20 20 50 32 55 51 57 43 | P2UQWC| 000201f0 53 20 20 20 50 32 55 46 |S P2UF| 000201f8 57 43 53 20 20 20 50 32 |WCS P2| 00020200 55 54 41 47 53 20 20 20 |UTAGS | 00020208 50 32 55 44 52 41 4d 20 |P2UDRAM | 00020210 20 20 50 32 55 56 52 46 | P2UVRF| 00020218 20 20 20 20 50 32 55 54 | P2UT| 00020220 52 46 20 20 20 20 50 32 |RF P2| 00020228 55 53 59 53 42 55 46 46 |USYSBUFF| 00020230 50 32 55 44 49 53 50 20 |P2UDISP | 00020238 20 20 50 32 55 45 43 43 | P2UECC| 00020240 20 20 20 20 50 32 55 54 | P2UT| 00020248 49 4d 45 52 53 20 50 32 |IMERS P2| 00020250 55 50 41 54 48 53 20 20 |UPATHS | 00020258 50 32 55 53 50 41 52 45 |P2USPARE| 00020260 30 20 50 32 55 53 50 41 |0 P2USPA| 00020268 52 45 31 20 50 32 55 53 |RE1 P2US| 00020270 50 41 52 45 32 20 50 32 |PARE2 P2| 00020278 55 53 50 41 52 45 33 20 |USPARE3 | 00020280 50 32 55 53 50 41 52 45 |P2USPARE| 00020288 34 20 |4 | .XXX[0x2] 0002028a 61 20 4d 41 43 48 49 4e |a MACHIN| .TXT 'a MACHINE_CHECK error occured, therefore_ ' 000202b4 45 4d |EM | .TXT 'EM' 000202b6 42 41 |BA | .TXT 'BA' 000202b8 4c 4d |LM | .TXT 'LM' 000202ba 50 32 55 43 4f 44 45 2e |P2UCODE.| .TXT 'P2UCODE.M200_UCODE' 000202cc 50 32 55 43 4f 44 45 20 |P2UCODE | .TXT 'P2UCODE ' 000202d4 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal test name for P2UCODE.' 000202f2 50 32 55 41 4c 4c |P2UALL | .XXX[0x6] 000202f8 20 20 20 20 50 32 55 43 | P2UC| .XXX[0x138] 00020300 4f 4e 44 20 20 20 50 32 |OND P2| 00020308 55 53 59 53 20 20 20 20 |USYS | 00020310 50 32 55 56 41 4c 20 20 |P2UVAL | 00020318 20 20 50 32 55 54 59 50 | P2UTYP| 00020320 20 20 20 20 50 32 55 53 | P2US| 00020328 45 51 20 20 20 20 50 32 |EQ P2| 00020330 55 46 49 55 20 20 20 20 |UFIU | 00020338 50 32 55 4d 45 4d 20 20 |P2UMEM | 00020340 20 20 50 32 55 43 53 41 | P2UCSA| 00020348 20 20 20 20 50 32 55 4d | P2UM| 00020350 4d 20 20 20 20 20 50 32 |M P2| 00020358 55 50 52 49 56 20 20 20 |UPRIV | 00020360 50 32 55 43 4c 41 53 53 |P2UCLASS| 00020368 20 20 50 32 55 57 43 53 | P2UWCS| 00020370 20 20 20 20 50 32 55 53 | P2US| 00020378 57 43 53 20 20 20 50 32 |WCS P2| 00020380 55 56 57 43 53 20 20 20 |UVWCS | 00020388 50 32 55 54 57 43 53 20 |P2UTWCS | 00020390 20 20 50 32 55 51 57 43 | P2UQWC| 00020398 53 20 20 20 50 32 55 46 |S P2UF| 000203a0 57 43 53 20 20 20 50 32 |WCS P2| 000203a8 55 54 41 47 53 20 20 20 |UTAGS | 000203b0 50 32 55 44 52 41 4d 20 |P2UDRAM | 000203b8 20 20 50 32 55 56 52 46 | P2UVRF| 000203c0 20 20 20 20 50 32 55 54 | P2UT| 000203c8 52 46 20 20 20 20 50 32 |RF P2| 000203d0 55 53 59 53 42 55 46 46 |USYSBUFF| 000203d8 50 32 55 44 49 53 50 20 |P2UDISP | 000203e0 20 20 50 32 55 45 43 43 | P2UECC| 000203e8 20 20 20 20 50 32 55 54 | P2UT| 000203f0 49 4d 45 52 53 20 50 32 |IMERS P2| 000203f8 55 50 41 54 48 53 20 20 |UPATHS | 00020400 50 32 55 53 50 41 52 45 |P2USPARE| 00020408 30 20 50 32 55 53 50 41 |0 P2USPA| 00020410 52 45 31 20 50 32 55 53 |RE1 P2US| 00020418 50 41 52 45 32 20 50 32 |PARE2 P2| 00020420 55 53 50 41 52 45 33 20 |USPARE3 | 00020428 50 32 55 53 50 41 52 45 |P2USPARE| 00020430 34 20 |4 | .XXX[0x2] 00020432 00 00 00 00 | | .CONST 0x0,0x0,0x0,0x0 00020436 00 00 00 00 | | .CONST 0x0,0x0,0x0,0x0 0002043a 05 01 04 07 06 02 | | .XXX[0x6] 00020440 03 0c 0d 0e 0f 01 | | .XXX[0x6] 00020446 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 0002045a ; -------------------------------------------------------------------------------------- 0002045a ; OMSI PASCAL Function 0002045a ; <LVAR 0x00c 1(r)> 0002045a ; <LVAR 0x008 4(r)> 0002045a ; <LVAR -0x002 @> 0002045a ; -------------------------------------------------------------------------------------- 0002045a 4e 56 ff d6 |NV | LINK.W A6,#0xffd6 0002045e bf d5 | | CMPA.L (A5),A7 00020460 62 06 |b | BHI 0x20468 00020462 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020466 4e 76 |Nv | TRAPV 00020468 de fc 00 28 | ( | ADDA.W #0x28,A7 0002046c 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00020470 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020476 1f 2e 00 0c | . | MOVE.B (A6+0xc),-(A7) 0002047a 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00020480 54 4f |TO | ADDQ.L #0x2,A7 00020482 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 00020488 9e fc 00 0a | | SUBA.W #0xa,A7 0002048c 20 4f | O | MOVEA.L A7,A0 0002048e 43 fa fc 7a |C z | LEA.L 0x2010a,A1 00020492 70 08 |p | MOVEQ.L #0x08,D0 00020494 10 d9 | | MOVE.B (A1)+,(A0)+ 00020496 51 c8 ff fc |Q | DBF D0,0x20494 0002049a 59 4f |YO | SUBQ.L #0x4,A7 0002049c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000204a0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000204a4 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 000204a8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000204ae 50 4f |PO | ADDQ.L #0x8,A7 000204b0 48 78 00 01 |Hx | PEA.L 0x1 000204b4 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000204b8 48 6e ff fe |Hn | PEA.L (A6-0x2) 000204bc 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 000204c2 de fc 00 18 | | ADDA.W #0x18,A7 000204c6 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000204cc 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000204d0 48 50 |HP | PEA.L (A0) 000204d2 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 000204d8 58 4f |XO | ADDQ.L #0x4,A7 000204da 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 000204e0 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 000204e4 4e 5e |N^ | UNLK A6 000204e6 4e 75 |Nu | RTS 000204e8 ; -------------------------------------------------------------------------------------- 000204e8 ; OMSI PASCAL Function 000204e8 ; <LVAR 0x008 4(r)> 000204e8 ; -------------------------------------------------------------------------------------- 000204e8 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 ; Spelunked 000204ec bf d5 | | CMPA.L (A5),A7 000204ee 62 06 |b | BHI 0x204f6 000204f0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000204f4 4e 76 |Nv | TRAPV 000204f6 de fc 00 0c | | ADDA.W #0xc,A7 000204fa 48 e7 00 80 |H | MOVEM.L A0,-(A7) 000204fe 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020504 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020508 48 50 |HP | PEA.L (A0) 0002050a 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020510 58 4f |XO | ADDQ.L #0x4,A7 00020512 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 00020518 4c df 01 00 |L | MOVEM.L (A7)+,A0 0002051c 4e 5e |N^ | UNLK A6 0002051e 4e 75 |Nu | RTS 00020520 ; -------------------------------------------------------------------------------------- 00020520 ; OMSI PASCAL Function 00020520 ; <LVAR 0x008 1(r)> 00020520 ; -------------------------------------------------------------------------------------- 00020520 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 ; Spelunked 00020524 bf d5 | | CMPA.L (A5),A7 00020526 62 06 |b | BHI 0x2052e 00020528 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002052c 4e 76 |Nv | TRAPV 0002052e de fc 00 0a | | ADDA.W #0xa,A7 00020532 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020538 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 0002053c 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00020542 54 4f |TO | ADDQ.L #0x2,A7 00020544 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 0002054a 42 27 |B' | CLR.B -(A7) 0002054c 48 78 00 01 |Hx | PEA.L 0x1 00020550 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020556 5c 4f |\O | ADDQ.L #0x6,A7 00020558 4e 5e |N^ | UNLK A6 0002055a 4e 75 |Nu | RTS 0002055c ; -------------------------------------------------------------------------------------- 0002055c ; OMSI PASCAL Function 0002055c ; <LVAR 0x016 1(r)> 0002055c ; <LVAR 0x012 4(r)> 0002055c ; <LVAR 0x010 1(r)> 0002055c ; <LVAR 0x00e 1(r)> 0002055c ; <LVAR 0x00c 1(r)> 0002055c ; <LVAR 0x008 4(r)> 0002055c ; <LVAR -0x004 @> 0002055c ; -------------------------------------------------------------------------------------- 0002055c 4e 56 ff cc |NV | LINK.W A6,#0xffcc 00020560 bf d5 | | CMPA.L (A5),A7 00020562 62 06 |b | BHI 0x2056a 00020564 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020568 4e 76 |Nv | TRAPV 0002056a de fc 00 30 | 0 | ADDA.W #0x30,A7 0002056e 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00020572 45 f9 00 01 05 02 |E | LEA.L IPC_PutBool(a : Bool),A2 00020578 72 0a |r | MOVEQ.L #0x0a,D1 0002057a 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020580 2f 2e 00 12 |/. | MOVE.L (A6+0x12),-(A7) 00020584 4e b9 00 01 05 08 |N | JSR IPC_PutString(a : String) 0002058a 54 4f |TO | ADDQ.L #0x2,A7 0002058c 1e ae 00 10 | | MOVE.B (A6+0x10),(A7) 00020590 4e 92 |N | JSR (A2) 00020592 54 4f |TO | ADDQ.L #0x2,A7 00020594 4a 2e 00 16 |J. | TST.B (A6+0x16) 00020598 66 0e |f | BNE 0x205a8 0002059a 1f 2e 00 0e | . | MOVE.B (A6+0xe),-(A7) 0002059e 4e 92 |N | JSR (A2) 000205a0 1e ae 00 0c | | MOVE.B (A6+0xc),(A7) 000205a4 4e 92 |N | JSR (A2) 000205a6 54 4f |TO | ADDQ.L #0x2,A7 000205a8 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 000205ae 4a 2e 00 16 |J. | TST.B (A6+0x16) 000205b2 67 12 |g | BEQ 0x205c6 000205b4 9e c1 | | SUBA.W D1,A7 000205b6 20 4f | O | MOVEA.L A7,A0 000205b8 43 fa fb 5a |C Z | LEA.L 0x20114,A1 000205bc 70 08 |p | MOVEQ.L #0x08,D0 000205be 10 d9 | | MOVE.B (A1)+,(A0)+ 000205c0 51 c8 ff fc |Q | DBF D0,0x205be 000205c4 60 10 |` | BRA 0x205d6 000205c6 9e c1 | | SUBA.W D1,A7 000205c8 20 4f | O | MOVEA.L A7,A0 000205ca 43 fa fb 52 |C R | LEA.L 0x2011e,A1 000205ce 70 08 |p | MOVEQ.L #0x08,D0 000205d0 10 d9 | | MOVE.B (A1)+,(A0)+ 000205d2 51 c8 ff fc |Q | DBF D0,0x205d0 000205d6 59 4f |YO | SUBQ.L #0x4,A7 000205d8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000205dc 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000205e0 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 000205e4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000205ea 50 4f |PO | ADDQ.L #0x8,A7 000205ec 48 78 00 01 |Hx | PEA.L 0x1 000205f0 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000205f4 48 6e ff fc |Hn | PEA.L (A6-0x4) 000205f8 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 000205fe de fc 00 18 | | ADDA.W #0x18,A7 00020602 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020608 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002060c 48 50 |HP | PEA.L (A0) 0002060e 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020614 58 4f |XO | ADDQ.L #0x4,A7 00020616 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 0002061c 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00020620 4e 5e |N^ | UNLK A6 00020622 4e 75 |Nu | RTS 00020624 ; -------------------------------------------------------------------------------------- 00020624 ; OMSI PASCAL Function 00020624 ; <LVAR -0x004 1(rw)> 00020624 ; -------------------------------------------------------------------------------------- 00020624 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00020628 bf d5 | | CMPA.L (A5),A7 0002062a 62 06 |b | BHI 0x20632 0002062c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020630 4e 76 |Nv | TRAPV 00020632 de fc 00 24 | $ | ADDA.W #0x24,A7 00020636 48 e7 e1 80 |H | MOVEM.L A0+D7+D2+D1+D0,-(A7) 0002063a 41 ee ff fc |A | LEA.L (A6-0x4),A0 0002063e 72 0f |r | MOVEQ.L #0x0f,D1 00020640 74 01 |t | MOVEQ.L #0x01,D2 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 08 |g | BEQ 0x20656 0002064e 4e b9 00 02 10 f4 |N | JSR exp_LOAD_HRAM_8_0.FIU() 00020654 60 06 |` | BRA 0x2065c 00020656 4e b9 00 02 11 12 |N | JSR exp_LOAD_HRAM_32_0.FIU() 0002065c 4e b9 00 02 11 c0 |N | JSR exp_LOAD_HRAM_1.FIU() 00020662 4e b9 00 02 13 c0 |N | JSR exp_ALIGN_CSA.VAL() 00020668 4e b9 00 02 13 20 |N | JSR exp_ALIGN_CSA.TYP() 0002066e 42 10 |B | CLR.B (A0) 00020670 7e 0c |~ | MOVEQ.L #0x0c,D7 00020672 55 4f |UO | SUBQ.L #0x2,A7 00020674 1f 07 | | MOVE.B D7,-(A7) 00020676 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 0002067c 54 4f |TO | ADDQ.L #0x2,A7 0002067e 4a 1f |J | TST.B (A7)+ 00020680 67 0c |g | BEQ 0x2068e 00020682 42 80 |B | CLR.L D0 00020684 10 10 | | MOVE.B (A0),D0 00020686 52 40 |R@ | ADDQ.W #0x1,D0 00020688 41 bc 00 ff |A | CHK.W #0xff,D0 0002068c 10 80 | | MOVE.B D0,(A0) 0002068e 52 07 |R | ADDQ.B #0x1,D7 00020690 be 01 | | CMP.B D1,D7 00020692 6f de |o | BLE 0x20672 00020694 7e 0c |~ | MOVEQ.L #0x0c,D7 00020696 55 4f |UO | SUBQ.L #0x2,A7 00020698 1f 07 | | MOVE.B D7,-(A7) 0002069a 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 000206a0 54 4f |TO | ADDQ.L #0x2,A7 000206a2 4a 1f |J | TST.B (A7)+ 000206a4 67 3a |g: | BEQ 0x206e0 000206a6 1f 07 | | MOVE.B D7,-(A7) 000206a8 55 4f |UO | SUBQ.L #0x2,A7 000206aa 1f 07 | | MOVE.B D7,-(A7) 000206ac 4e b9 00 01 04 c6 |N | JSR EQ_1c218(a : Byte) : Bool 000206b2 54 4f |TO | ADDQ.L #0x2,A7 000206b4 10 17 | | MOVE.B (A7),D0 000206b6 48 80 |H | EXTB.W D0 000206b8 41 82 |A | CHK.W D2,D0 000206ba 1e 80 | | MOVE.B D0,(A7) 000206bc 55 4f |UO | SUBQ.L #0x2,A7 000206be 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000206c4 10 17 | | MOVE.B (A7),D0 000206c6 48 80 |H | EXTB.W D0 000206c8 41 82 |A | CHK.W D2,D0 000206ca 1e 80 | | MOVE.B D0,(A7) 000206cc 1f 10 | | MOVE.B (A0),-(A7) 000206ce 4e b9 00 02 16 08 |N | JSR 0x21608 000206d4 5c 4f |\O | ADDQ.L #0x6,A7 000206d6 1e 87 | | MOVE.B D7,(A7) 000206d8 4e b9 00 02 18 08 |N | JSR 0x21808 000206de 54 4f |TO | ADDQ.L #0x2,A7 000206e0 52 07 |R | ADDQ.B #0x1,D7 000206e2 be 01 | | CMP.B D1,D7 000206e4 6f b0 |o | BLE 0x20696 000206e6 4e b9 00 01 05 b0 |N | JSR FifoInit(void) 000206ec 3f 3c ff ff |?< | MOVE.W #0xffff,-(A7) 000206f0 3f 3c ff ff |?< | MOVE.W #0xffff,-(A7) 000206f4 4e b9 00 02 11 9c |N | JSR exp_LOAD_REFRESH_REGS.FIU(Sw_2, Sw_2) 000206fa 58 4f |XO | ADDQ.L #0x4,A7 000206fc 4c df 01 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0 00020700 4e 5e |N^ | UNLK A6 00020702 4e 75 |Nu | RTS 00020704 ; -------------------------------------------------------------------------------------- 00020704 ; OMSI PASCAL Function 00020704 ; <LVAR 0x008 2(r)> 00020704 ; <LVAR -0x002 1(rw)> 00020704 ; -------------------------------------------------------------------------------------- 00020704 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00020708 bf d5 | | CMPA.L (A5),A7 0002070a 62 06 |b | BHI 0x20712 0002070c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020710 4e 76 |Nv | TRAPV 00020712 de fc 00 2c | , | ADDA.W #0x2c,A7 00020716 48 e7 f0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7) 0002071a 41 f9 00 01 04 c0 |A | LEA.L HasBoard(diproc_addr: Byte) : Byte,A0 00020720 43 ee ff fe |C | LEA.L (A6-0x2),A1 00020724 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00020728 47 f9 00 02 13 f2 |G | LEA.L 0x213f2,A3 0002072e 49 f9 00 02 19 66 |I f | LEA.L 0x21966,A4 00020734 70 0c |p | MOVEQ.L #0x0c,D0 00020736 72 0d |r | MOVEQ.L #0x0d,D1 00020738 74 0e |t | MOVEQ.L #0x0e,D2 0002073a 76 0f |v | MOVEQ.L #0x0f,D3 0002073c 4e b9 00 02 12 fe |N | JSR exp_LOAD_BENIGN_UWORD.TYP() 00020742 55 4f |UO | SUBQ.L #0x2,A7 00020744 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002074a 4a 1f |J | TST.B (A7)+ 0002074c 67 04 |g | BEQ 0x20752 0002074e 42 11 |B | CLR.B (A1) 00020750 60 04 |` | BRA 0x20756 00020752 12 bc 00 ff | | MOVE.B #0xff,(A1) 00020756 55 4f |UO | SUBQ.L #0x2,A7 00020758 1f 00 | | MOVE.B D0,-(A7) 0002075a 4e 90 |N | JSR (A0) 0002075c 54 4f |TO | ADDQ.L #0x2,A7 0002075e 4a 1f |J | TST.B (A7)+ 00020760 67 08 |g | BEQ 0x2076a 00020762 1f 00 | | MOVE.B D0,-(A7) 00020764 1f 11 | | MOVE.B (A1),-(A7) 00020766 4e 93 |N | JSR (A3) 00020768 58 4f |XO | ADDQ.L #0x4,A7 0002076a 55 4f |UO | SUBQ.L #0x2,A7 0002076c 1f 01 | | MOVE.B D1,-(A7) 0002076e 4e 90 |N | JSR (A0) 00020770 54 4f |TO | ADDQ.L #0x2,A7 00020772 4a 1f |J | TST.B (A7)+ 00020774 67 08 |g | BEQ 0x2077e 00020776 1f 01 | | MOVE.B D1,-(A7) 00020778 1f 11 | | MOVE.B (A1),-(A7) 0002077a 4e 93 |N | JSR (A3) 0002077c 58 4f |XO | ADDQ.L #0x4,A7 0002077e 55 4f |UO | SUBQ.L #0x2,A7 00020780 1f 02 | | MOVE.B D2,-(A7) 00020782 4e 90 |N | JSR (A0) 00020784 54 4f |TO | ADDQ.L #0x2,A7 00020786 4a 1f |J | TST.B (A7)+ 00020788 67 08 |g | BEQ 0x20792 0002078a 1f 02 | | MOVE.B D2,-(A7) 0002078c 1f 11 | | MOVE.B (A1),-(A7) 0002078e 4e 93 |N | JSR (A3) 00020790 58 4f |XO | ADDQ.L #0x4,A7 00020792 55 4f |UO | SUBQ.L #0x2,A7 00020794 1f 03 | | MOVE.B D3,-(A7) 00020796 4e 90 |N | JSR (A0) 00020798 54 4f |TO | ADDQ.L #0x2,A7 0002079a 4a 1f |J | TST.B (A7)+ 0002079c 67 08 |g | BEQ 0x207a6 0002079e 1f 03 | | MOVE.B D3,-(A7) 000207a0 1f 11 | | MOVE.B (A1),-(A7) 000207a2 4e 93 |N | JSR (A3) 000207a4 58 4f |XO | ADDQ.L #0x4,A7 000207a6 4e b9 00 02 11 dc |N | JSR exp_INIT_MRU.FIU() 000207ac 55 4f |UO | SUBQ.L #0x2,A7 000207ae 1f 00 | | MOVE.B D0,-(A7) 000207b0 4e 90 |N | JSR (A0) 000207b2 54 4f |TO | ADDQ.L #0x2,A7 000207b4 4a 1f |J | TST.B (A7)+ 000207b6 67 06 |g | BEQ 0x207be 000207b8 1f 00 | | MOVE.B D0,-(A7) 000207ba 4e 94 |N | JSR (A4) 000207bc 54 4f |TO | ADDQ.L #0x2,A7 000207be 55 4f |UO | SUBQ.L #0x2,A7 000207c0 1f 01 | | MOVE.B D1,-(A7) 000207c2 4e 90 |N | JSR (A0) 000207c4 54 4f |TO | ADDQ.L #0x2,A7 000207c6 4a 1f |J | TST.B (A7)+ 000207c8 67 06 |g | BEQ 0x207d0 000207ca 1f 01 | | MOVE.B D1,-(A7) 000207cc 4e 94 |N | JSR (A4) 000207ce 54 4f |TO | ADDQ.L #0x2,A7 000207d0 55 4f |UO | SUBQ.L #0x2,A7 000207d2 1f 02 | | MOVE.B D2,-(A7) 000207d4 4e 90 |N | JSR (A0) 000207d6 54 4f |TO | ADDQ.L #0x2,A7 000207d8 4a 1f |J | TST.B (A7)+ 000207da 67 06 |g | BEQ 0x207e2 000207dc 1f 02 | | MOVE.B D2,-(A7) 000207de 4e 94 |N | JSR (A4) 000207e0 54 4f |TO | ADDQ.L #0x2,A7 000207e2 55 4f |UO | SUBQ.L #0x2,A7 000207e4 1f 03 | | MOVE.B D3,-(A7) 000207e6 4e 90 |N | JSR (A0) 000207e8 54 4f |TO | ADDQ.L #0x2,A7 000207ea 4a 1f |J | TST.B (A7)+ 000207ec 67 06 |g | BEQ 0x207f4 000207ee 1f 03 | | MOVE.B D3,-(A7) 000207f0 4e 94 |N | JSR (A4) 000207f2 54 4f |TO | ADDQ.L #0x2,A7 000207f4 3f 12 |? | MOVE.W (A2),-(A7) 000207f6 4e b9 00 02 12 c8 |N | JSR exp_PREP_RUN.TYP(Sw_2) 000207fc 3e 92 |> | MOVE.W (A2),(A7) 000207fe 4e b9 00 02 13 8a |N | JSR exp_PREP_RUN.VAL(Sw_2) 00020804 3e 92 |> | MOVE.W (A2),(A7) 00020806 4e b9 00 02 1a 1a |N | JSR exp_PREP_RUN.IOC(Sw_2) 0002080c 3e 92 |> | MOVE.W (A2),(A7) 0002080e 4e b9 00 02 12 44 |N D | JSR exp_PREP_RUN.SEQ(Sw_2) 00020814 3e 92 |> | MOVE.W (A2),(A7) 00020816 4e b9 00 02 11 82 |N | JSR exp_PREP_RUN.FIU(Sw_2) 0002081c 1f 00 | | MOVE.B D0,-(A7) 0002081e 4e 90 |N | JSR (A0) 00020820 54 4f |TO | ADDQ.L #0x2,A7 00020822 4a 1f |J | TST.B (A7)+ 00020824 67 0a |g | BEQ 0x20830 00020826 1f 00 | | MOVE.B D0,-(A7) 00020828 4e b9 00 02 18 bc |N | JSR 0x218bc 0002082e 54 4f |TO | ADDQ.L #0x2,A7 00020830 55 4f |UO | SUBQ.L #0x2,A7 00020832 1f 01 | | MOVE.B D1,-(A7) 00020834 4e 90 |N | JSR (A0) 00020836 54 4f |TO | ADDQ.L #0x2,A7 00020838 4a 1f |J | TST.B (A7)+ 0002083a 67 0a |g | BEQ 0x20846 0002083c 1f 01 | | MOVE.B D1,-(A7) 0002083e 4e b9 00 02 18 bc |N | JSR 0x218bc 00020844 54 4f |TO | ADDQ.L #0x2,A7 00020846 55 4f |UO | SUBQ.L #0x2,A7 00020848 1f 02 | | MOVE.B D2,-(A7) 0002084a 4e 90 |N | JSR (A0) 0002084c 54 4f |TO | ADDQ.L #0x2,A7 0002084e 4a 1f |J | TST.B (A7)+ 00020850 67 0a |g | BEQ 0x2085c 00020852 1f 02 | | MOVE.B D2,-(A7) 00020854 4e b9 00 02 18 bc |N | JSR 0x218bc 0002085a 54 4f |TO | ADDQ.L #0x2,A7 0002085c 55 4f |UO | SUBQ.L #0x2,A7 0002085e 1f 03 | | MOVE.B D3,-(A7) 00020860 4e 90 |N | JSR (A0) 00020862 54 4f |TO | ADDQ.L #0x2,A7 00020864 4a 1f |J | TST.B (A7)+ 00020866 67 0a |g | BEQ 0x20872 00020868 1f 03 | | MOVE.B D3,-(A7) 0002086a 4e b9 00 02 18 bc |N | JSR 0x218bc 00020870 54 4f |TO | ADDQ.L #0x2,A7 00020872 4c df 1f 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4 00020876 4e 5e |N^ | UNLK A6 00020878 4e 75 |Nu | RTS 0002087a ; -------------------------------------------------------------------------------------- 0002087a ; OMSI PASCAL Function 0002087a ; -------------------------------------------------------------------------------------- 0002087a 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 0002087e bf d5 | | CMPA.L (A5),A7 00020880 62 06 |b | BHI 0x20888 00020882 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020886 4e 76 |Nv | TRAPV 00020888 de fc 00 20 | | ADDA.W #0x20,A7 0002088c 48 e7 f0 c0 |H | MOVEM.L A1+A0+D3+D2+D1+D0,-(A7) 00020890 41 f9 00 01 04 c0 |A | LEA.L HasBoard(diproc_addr: Byte) : Byte,A0 00020896 43 f9 00 02 15 5a |C Z | LEA.L 0x2155a,A1 0002089c 70 0c |p | MOVEQ.L #0x0c,D0 0002089e 72 0d |r | MOVEQ.L #0x0d,D1 000208a0 74 0e |t | MOVEQ.L #0x0e,D2 000208a2 76 0f |v | MOVEQ.L #0x0f,D3 000208a4 4e b9 00 02 11 f6 |N | JSR exp_FREEZE_WORLD.FIU() 000208aa 4e b9 00 02 12 96 |N | JSR exp_RUN_NORMAL.TYP() 000208b0 4e b9 00 02 13 58 |N X | JSR exp_RUN_NORMAL.VAL() 000208b6 4e b9 00 02 12 2a |N * | JSR exp_RUN_CHECK.SEQ() 000208bc 4e b9 00 02 1a 00 |N | JSR exp_RUN_CHECK.IOC() 000208c2 55 4f |UO | SUBQ.L #0x2,A7 000208c4 1f 00 | | MOVE.B D0,-(A7) 000208c6 4e 90 |N | JSR (A0) 000208c8 54 4f |TO | ADDQ.L #0x2,A7 000208ca 4a 1f |J | TST.B (A7)+ 000208cc 67 06 |g | BEQ 0x208d4 000208ce 1f 00 | | MOVE.B D0,-(A7) 000208d0 4e 91 |N | JSR (A1) 000208d2 54 4f |TO | ADDQ.L #0x2,A7 000208d4 55 4f |UO | SUBQ.L #0x2,A7 000208d6 1f 01 | | MOVE.B D1,-(A7) 000208d8 4e 90 |N | JSR (A0) 000208da 54 4f |TO | ADDQ.L #0x2,A7 000208dc 4a 1f |J | TST.B (A7)+ 000208de 67 06 |g | BEQ 0x208e6 000208e0 1f 01 | | MOVE.B D1,-(A7) 000208e2 4e 91 |N | JSR (A1) 000208e4 54 4f |TO | ADDQ.L #0x2,A7 000208e6 55 4f |UO | SUBQ.L #0x2,A7 000208e8 1f 02 | | MOVE.B D2,-(A7) 000208ea 4e 90 |N | JSR (A0) 000208ec 54 4f |TO | ADDQ.L #0x2,A7 000208ee 4a 1f |J | TST.B (A7)+ 000208f0 67 06 |g | BEQ 0x208f8 000208f2 1f 02 | | MOVE.B D2,-(A7) 000208f4 4e 91 |N | JSR (A1) 000208f6 54 4f |TO | ADDQ.L #0x2,A7 000208f8 55 4f |UO | SUBQ.L #0x2,A7 000208fa 1f 03 | | MOVE.B D3,-(A7) 000208fc 4e 90 |N | JSR (A0) 000208fe 54 4f |TO | ADDQ.L #0x2,A7 00020900 4a 1f |J | TST.B (A7)+ 00020902 67 06 |g | BEQ 0x2090a 00020904 1f 03 | | MOVE.B D3,-(A7) 00020906 4e 91 |N | JSR (A1) 00020908 54 4f |TO | ADDQ.L #0x2,A7 0002090a 4e b9 00 02 11 50 |N P | JSR exp_RUN_NORMAL.FIU() 00020910 4c df 03 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1 00020914 4e 5e |N^ | UNLK A6 00020916 4e 75 |Nu | RTS 00020918 ; -------------------------------------------------------------------------------------- 00020918 ; OMSI PASCAL Function 00020918 ; <LVAR 0x010 4(r)> 00020918 ; <LVAR 0x00c 4(r)> 00020918 ; <LVAR 0x008 4(r)> 00020918 ; <LVAR -0x004 @> 00020918 ; <LVAR -0x005 @ 1(rw)> 00020918 ; <LVAR -0x006 @> 00020918 ; <LVAR -0x007 @ 1(r)> 00020918 ; -------------------------------------------------------------------------------------- 00020918 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 0002091c bf d5 | | CMPA.L (A5),A7 0002091e 62 06 |b | BHI 0x20926 00020920 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020924 4e 76 |Nv | TRAPV 00020926 de fc 00 46 | F | ADDA.W #0x46,A7 0002092a 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002092e 43 f9 00 01 04 c0 |C | LEA.L HasBoard(diproc_addr: Byte) : Byte,A1 00020934 45 f9 00 02 14 b0 |E | LEA.L 0x214b0,A2 0002093a 47 ee ff fb |G | LEA.L (A6-0x5),A3 0002093e 74 0e |t | MOVEQ.L #0x0e,D2 00020940 76 01 |v | MOVEQ.L #0x01,D3 00020942 78 0c |x | MOVEQ.L #0x0c,D4 00020944 7a 0d |z | MOVEQ.L #0x0d,D5 00020946 7c 0f || | MOVEQ.L #0x0f,D6 00020948 4e b9 00 02 11 f6 |N | JSR exp_FREEZE_WORLD.FIU() 0002094e 4e b9 00 02 19 ea |N | JSR exp_RESET.IOC() 00020954 4e b9 00 02 13 74 |N t | JSR exp_RESET.VAL() 0002095a 4e b9 00 02 12 b2 |N | JSR exp_RESET.TYP() 00020960 4e b9 00 02 12 14 |N | JSR exp_RESET.SEQ() 00020966 55 4f |UO | SUBQ.L #0x2,A7 00020968 1f 04 | | MOVE.B D4,-(A7) 0002096a 4e 91 |N | JSR (A1) 0002096c 54 4f |TO | ADDQ.L #0x2,A7 0002096e 4a 1f |J | TST.B (A7)+ 00020970 67 06 |g | BEQ 0x20978 00020972 1f 04 | | MOVE.B D4,-(A7) 00020974 4e 92 |N | JSR (A2) 00020976 54 4f |TO | ADDQ.L #0x2,A7 00020978 55 4f |UO | SUBQ.L #0x2,A7 0002097a 1f 05 | | MOVE.B D5,-(A7) 0002097c 4e 91 |N | JSR (A1) 0002097e 54 4f |TO | ADDQ.L #0x2,A7 00020980 4a 1f |J | TST.B (A7)+ 00020982 67 06 |g | BEQ 0x2098a 00020984 1f 05 | | MOVE.B D5,-(A7) 00020986 4e 92 |N | JSR (A2) 00020988 54 4f |TO | ADDQ.L #0x2,A7 0002098a 55 4f |UO | SUBQ.L #0x2,A7 0002098c 1f 02 | | MOVE.B D2,-(A7) 0002098e 4e 91 |N | JSR (A1) 00020990 54 4f |TO | ADDQ.L #0x2,A7 00020992 4a 1f |J | TST.B (A7)+ 00020994 67 06 |g | BEQ 0x2099c 00020996 1f 02 | | MOVE.B D2,-(A7) 00020998 4e 92 |N | JSR (A2) 0002099a 54 4f |TO | ADDQ.L #0x2,A7 0002099c 55 4f |UO | SUBQ.L #0x2,A7 0002099e 1f 06 | | MOVE.B D6,-(A7) 000209a0 4e 91 |N | JSR (A1) 000209a2 54 4f |TO | ADDQ.L #0x2,A7 000209a4 4a 1f |J | TST.B (A7)+ 000209a6 67 06 |g | BEQ 0x209ae 000209a8 1f 06 | | MOVE.B D6,-(A7) 000209aa 4e 92 |N | JSR (A2) 000209ac 54 4f |TO | ADDQ.L #0x2,A7 000209ae 4e b9 00 02 11 6c |N l | JSR exp_RESET.FIU() 000209b4 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 000209b8 48 50 |HP | PEA.L (A0) 000209ba 4e b9 00 02 12 5e |N ^ | JSR exp_HALT.SEQ(&Fr) 000209c0 58 4f |XO | ADDQ.L #0x4,A7 000209c2 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000209c6 42 10 |B | CLR.B (A0) 000209c8 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000209cc 42 10 |B | CLR.B (A0) 000209ce 42 28 00 0b |B( | CLR.B (A0+0xb) 000209d2 42 28 00 01 |B( | CLR.B (A0+0x1) 000209d6 7e 02 |~ | MOVEQ.L #0x02,D7 000209d8 0c 07 00 05 | | CMPI.B #0x05,D7 000209dc 67 20 |g | BEQ 0x209fe 000209de 10 07 | | MOVE.B D7,D0 000209e0 48 80 |H | EXTB.W D0 000209e2 41 fa fa 56 |A V | LEA.L 0x2043a,A0 000209e6 1f 30 00 00 | 0 | MOVE.B (A0+D0.W),-(A7) 000209ea 48 6e ff fa |Hn | PEA.L (A6-0x6) 000209ee 48 53 |HS | PEA.L (A3) 000209f0 48 6e ff fc |Hn | PEA.L (A6-0x4) 000209f4 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 000209fa de c2 | | ADDA.W D2,A7 000209fc 60 1a |` | BRA 0x20a18 000209fe 48 6e ff f9 |Hn | PEA.L (A6-0x7) 00020a02 4e b9 00 02 12 74 |N t | JSR exp_GET_MISC_ERRORS.SEQ(&Sr_1) 00020a08 58 4f |XO | ADDQ.L #0x4,A7 00020a0a 42 80 |B | CLR.L D0 00020a0c 10 2e ff f9 | . | MOVE.B (A6-0x7),D0 00020a10 0c 40 00 1f | @ | CMPI.W #0x001f,D0 00020a14 67 02 |g | BEQ 0x20a18 00020a16 16 83 | | MOVE.B D3,(A3) 00020a18 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020a1c 10 07 | | MOVE.B D7,D0 00020a1e 48 80 |H | EXTB.W D0 00020a20 3f 00 |? | MOVE.W D0,-(A7) 00020a22 12 13 | | MOVE.B (A3),D1 00020a24 48 81 |H | EXTB.W D1 00020a26 43 83 |C | CHK.W D3,D1 00020a28 11 81 00 00 | | MOVE.B D1,(A0+D0.W) 00020a2c 4a 41 |JA | TST.W D1 00020a2e 67 06 |g | BEQ 0x20a36 00020a30 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00020a34 10 83 | | MOVE.B D3,(A0) 00020a36 3e 1f |> | MOVE.W (A7)+,D7 00020a38 52 47 |RG | ADDQ.W #0x1,D7 00020a3a 0c 47 00 0a | G | CMPI.W #0x000a,D7 00020a3e 6f 98 |o | BLE 0x209d8 00020a40 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 00020a44 4e 5e |N^ | UNLK A6 00020a46 4e 75 |Nu | RTS 00020a48 ; -------------------------------------------------------------------------------------- 00020a48 ; OMSI PASCAL Function 00020a48 ; <LVAR 0x008 2(r)> 00020a48 ; -------------------------------------------------------------------------------------- 00020a48 4e 56 ff ca |NV | LINK.W A6,#0xffca 00020a4c bf d5 | | CMPA.L (A5),A7 00020a4e 62 06 |b | BHI 0x20a56 00020a50 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020a54 4e 76 |Nv | TRAPV 00020a56 de fc 00 34 | 4 | ADDA.W #0x34,A7 00020a5a 48 e7 e0 c0 |H | MOVEM.L A1+A0+D2+D1+D0,-(A7) 00020a5e 43 f9 00 02 1c 4e |C N | LEA.L 0x21c4e,A1 00020a64 72 01 |r | MOVEQ.L #0x01,D1 00020a66 74 0a |t | MOVEQ.L #0x0a,D2 00020a68 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00020a6c 41 bc 00 1f |A | CHK.W #0x1f,D0 00020a70 c1 c2 | | MULS.W D2,D0 00020a72 41 fa f8 7e |A ~ | LEA.L 0x202f2,A0 00020a76 41 f0 00 0a |A | LEA.L (A0+D0.W+#0xa),A0 00020a7a 70 04 |p | MOVEQ.L #0x04,D0 00020a7c 3f 20 |? | MOVE.W -(A0),-(A7) 00020a7e 51 c8 ff fc |Q | DBF D0,0x20a7c 00020a82 59 4f |YO | SUBQ.L #0x4,A7 00020a84 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a88 3f 01 |? | MOVE.W D1,-(A7) 00020a8a 3f 02 |? | MOVE.W D2,-(A7) 00020a8c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020a92 50 4f |PO | ADDQ.L #0x8,A7 00020a94 22 9f |" | MOVE.L (A7)+,(A1) 00020a96 54 4f |TO | ADDQ.L #0x2,A7 00020a98 2e 91 |. | MOVE.L (A1),(A7) 00020a9a 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00020aa0 58 4f |XO | ADDQ.L #0x4,A7 00020aa2 10 39 00 02 1c 48 | 9 H | MOVE.B 0x21c48,D0 00020aa8 48 80 |H | EXTB.W D0 00020aaa 41 81 |A | CHK.W D1,D0 00020aac 1f 00 | | MOVE.B D0,-(A7) 00020aae 10 39 00 02 1c 49 | 9 I | MOVE.B 0x21c49,D0 00020ab4 48 80 |H | EXTB.W D0 00020ab6 41 81 |A | CHK.W D1,D0 00020ab8 1f 00 | | MOVE.B D0,-(A7) 00020aba 48 79 00 02 1c 4a |Hy J | PEA.L 0x21c4a 00020ac0 48 79 00 02 1c 52 |Hy R | PEA.L 0x21c52 00020ac6 48 79 00 02 1c 56 |Hy V | PEA.L 0x21c56 00020acc 48 79 00 02 1c 5a |Hy Z | PEA.L 0x21c5a 00020ad2 48 79 00 02 1c 5b |Hy [ | PEA.L 0x21c5b 00020ad8 4e b9 00 01 05 3e |N > | JSR FSCALL_1053e 00020ade de fc 00 1c | | ADDA.W #0x1c,A7 00020ae2 4c df 03 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1 00020ae6 4e 5e |N^ | UNLK A6 00020ae8 4e 75 |Nu | RTS 00020aea ; -------------------------------------------------------------------------------------- 00020aea ; OMSI PASCAL Function 00020aea ; <LVAR 0x008 1(r)> 00020aea ; -------------------------------------------------------------------------------------- 00020aea 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00020aee bf d5 | | CMPA.L (A5),A7 00020af0 62 06 |b | BHI 0x20af8 00020af2 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020af6 4e 76 |Nv | TRAPV 00020af8 de fc 00 2c | , | ADDA.W #0x2c,A7 00020afc 48 e7 80 f0 |H | MOVEM.L A3+A2+A1+A0+D0,-(A7) 00020b00 45 f9 00 02 1c 5a |E Z | LEA.L 0x21c5a,A2 00020b06 47 f9 00 02 1c 5b |G [ | LEA.L 0x21c5b,A3 00020b0c 14 ae 00 08 | | MOVE.B (A6+0x8),(A2) 00020b10 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00020b14 0c 00 00 03 | | CMPI.B #0x03,D0 00020b18 67 04 |g | BEQ 0x20b1e 00020b1a 16 bc 00 29 | ) | MOVE.B #0x29,(A3) 00020b1e 42 27 |B' | CLR.B -(A7) 00020b20 2f 39 00 02 1c 52 |/9 R | MOVE.L 0x21c52,-(A7) 00020b26 2f 39 00 02 1c 56 |/9 V | MOVE.L 0x21c56,-(A7) 00020b2c 1f 12 | | MOVE.B (A2),-(A7) 00020b2e 51 4f |QO | SUBQ.L #0x8,A7 00020b30 20 4f | O | MOVEA.L A7,A0 00020b32 22 4b |"K | MOVEA.L A3,A1 00020b34 70 07 |p | MOVEQ.L #0x07,D0 00020b36 10 d9 | | MOVE.B (A1)+,(A0)+ 00020b38 51 c8 ff fc |Q | DBF D0,0x20b36 00020b3c 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 00020b42 de fc 00 14 | | ADDA.W #0x14,A7 00020b46 4c df 0f 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2+A3 00020b4a 4e 5e |N^ | UNLK A6 00020b4c 4e 75 |Nu | RTS 00020b4e ; -------------------------------------------------------------------------------------- 00020b4e ; OMSI PASCAL Function 00020b4e ; <LVAR 0x008 1(rw)> 00020b4e ; <LVAR -0x004 @ 1(rw)> 00020b4e ; -------------------------------------------------------------------------------------- 00020b4e 4e 56 ff ea |NV | LINK.W A6,#0xffea 00020b52 bf d5 | | CMPA.L (A5),A7 00020b54 62 06 |b | BHI 0x20b5c 00020b56 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020b5a 4e 76 |Nv | TRAPV 00020b5c de fc 00 12 | | ADDA.W #0x12,A7 00020b60 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00020b64 41 ee ff fc |A | LEA.L (A6-0x4),A0 00020b68 42 27 |B' | CLR.B -(A7) 00020b6a 48 50 |HP | PEA.L (A0) 00020b6c 4e b9 00 02 11 32 |N 2 | JSR exp_READ_PAREG.FIU(Sw_1, &Sr_1) 00020b72 5c 4f |\O | ADDQ.L #0x6,A7 00020b74 42 80 |B | CLR.L D0 00020b76 10 10 | | MOVE.B (A0),D0 00020b78 02 40 00 08 | @ | ANDI.W #0x0008,D0 00020b7c 10 80 | | MOVE.B D0,(A0) 00020b7e 42 2e 00 08 |B. | CLR.B (A6+0x8) 00020b82 4a 00 |J | TST.B D0 00020b84 66 04 |f | BNE 0x20b8a 00020b86 52 2e 00 08 |R. | ADDQ.B #0x1,(A6+0x8) 00020b8a 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00020b8e 4e 5e |N^ | UNLK A6 00020b90 4e 75 |Nu | RTS 00020b92 ; -------------------------------------------------------------------------------------- 00020b92 ; OMSI PASCAL Function 00020b92 ; <LVAR 0x008 1(r)> 00020b92 ; <LVAR -0x001 1(r)> 00020b92 ; <LVAR -0x008 @> 00020b92 ; <LVAR -0x014 @> 00020b92 ; <LVAR -0x015 @ 1(r)> 00020b92 ; <LVAR -0x016 @ 1(r)> 00020b92 ; -------------------------------------------------------------------------------------- 00020b92 4e 56 ff 94 |NV | LINK.W A6,#0xff94 00020b96 bf d5 | | CMPA.L (A5),A7 00020b98 62 06 |b | BHI 0x20ba0 00020b9a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020b9e 4e 76 |Nv | TRAPV 00020ba0 de fc 00 56 | V | ADDA.W #0x56,A7 00020ba4 48 e7 e0 f0 |H | MOVEM.L A3+A2+A1+A0+D2+D1+D0,-(A7) 00020ba8 45 f9 00 02 1c 4e |E N | LEA.L 0x21c4e,A2 00020bae 47 f9 00 02 1c 4a |G J | LEA.L 0x21c4a,A3 00020bb4 72 01 |r | MOVEQ.L #0x01,D1 00020bb6 74 18 |t | MOVEQ.L #0x18,D2 00020bb8 48 6e ff ea |Hn | PEA.L (A6-0x16) 00020bbc 48 6e ff eb |Hn | PEA.L (A6-0x15) 00020bc0 48 6e ff ec |Hn | PEA.L (A6-0x14) 00020bc4 4e ba fd 52 |N R | JSR 0x20918 00020bc8 de fc 00 0a | | ADDA.W #0xa,A7 00020bcc 3e bc ff cf |> | MOVE.W #0xffcf,(A7) 00020bd0 42 27 |B' | CLR.B -(A7) 00020bd2 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00020bd6 4e b9 00 02 13 3a |N : | JSR exp_READ_RF_B.VAL(Sw_2, Sw_1, &Sr_8) 00020bdc 50 4f |PO | ADDQ.L #0x8,A7 00020bde 4a 2e ff eb |J. | TST.B (A6-0x15) 00020be2 67 00 00 c0 |g | BEQ 0x20ca4 00020be6 55 4f |UO | SUBQ.L #0x2,A7 00020be8 4e ba ff 64 |N d | JSR 0x20b4e 00020bec 4a 1f |J | TST.B (A7)+ 00020bee 67 16 |g | BEQ 0x20c06 00020bf0 42 80 |B | CLR.L D0 00020bf2 10 2e ff ff | . | MOVE.B (A6-0x1),D0 00020bf6 b0 42 | B | CMP.W D2,D0 00020bf8 66 0c |f | BNE 0x20c06 00020bfa 3f 02 |? | MOVE.W D2,-(A7) 00020bfc 4e ba fe 4a |N J | JSR 0x20a48 00020c00 54 4f |TO | ADDQ.L #0x2,A7 00020c02 60 00 00 9e |` | BRA 0x20ca2 00020c06 9e fc 00 2a | * | SUBA.W #0x2a,A7 00020c0a 20 4f | O | MOVEA.L A7,A0 00020c0c 43 fa f6 7c |C | | LEA.L 0x2028a,A1 00020c10 70 28 |p( | MOVEQ.L #0x28,D0 00020c12 10 d9 | | MOVE.B (A1)+,(A0)+ 00020c14 51 c8 ff fc |Q | DBF D0,0x20c12 00020c18 59 4f |YO | SUBQ.L #0x4,A7 00020c1a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020c1e 3f 01 |? | MOVE.W D1,-(A7) 00020c20 3f 3c 00 29 |?< ) | MOVE.W #0x29,-(A7) 00020c24 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020c2a 50 4f |PO | ADDQ.L #0x8,A7 00020c2c 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00020c32 de fc 00 2c | , | ADDA.W #0x2c,A7 00020c36 3e ba f6 80 |> | MOVE.W 0x202b8,(A7) 00020c3a 3f 3a f6 7a |?: z | MOVE.W 0x202b6,-(A7) 00020c3e 3f 3a f6 74 |?: t | MOVE.W 0x202b4,-(A7) 00020c42 59 4f |YO | SUBQ.L #0x4,A7 00020c44 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020c48 3f 01 |? | MOVE.W D1,-(A7) 00020c4a 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00020c4e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020c54 50 4f |PO | ADDQ.L #0x8,A7 00020c56 24 9f |$ | MOVE.L (A7)+,(A2) 00020c58 54 4f |TO | ADDQ.L #0x2,A7 00020c5a 2f 12 |/ | MOVE.L (A2),-(A7) 00020c5c 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00020c62 58 4f |XO | ADDQ.L #0x4,A7 00020c64 10 39 00 02 1c 48 | 9 H | MOVE.B 0x21c48,D0 00020c6a 48 80 |H | EXTB.W D0 00020c6c 41 81 |A | CHK.W D1,D0 00020c6e 1f 00 | | MOVE.B D0,-(A7) 00020c70 10 39 00 02 1c 49 | 9 I | MOVE.B 0x21c49,D0 00020c76 48 80 |H | EXTB.W D0 00020c78 41 81 |A | CHK.W D1,D0 00020c7a 1f 00 | | MOVE.B D0,-(A7) 00020c7c 48 53 |HS | PEA.L (A3) 00020c7e 48 79 00 02 1c 52 |Hy R | PEA.L 0x21c52 00020c84 48 79 00 02 1c 56 |Hy V | PEA.L 0x21c56 00020c8a 48 79 00 02 1c 5a |Hy Z | PEA.L 0x21c5a 00020c90 48 79 00 02 1c 5b |Hy [ | PEA.L 0x21c5b 00020c96 4e b9 00 01 05 3e |N > | JSR FSCALL_1053e 00020c9c de fc 00 1c | | ADDA.W #0x1c,A7 00020ca0 42 13 |B | CLR.B (A3) 00020ca2 60 44 |`D | BRA 0x20ce8 00020ca4 4a 2e ff ea |J. | TST.B (A6-0x16) 00020ca8 67 28 |g( | BEQ 0x20cd2 00020caa 42 80 |B | CLR.L D0 00020cac 10 2e ff ff | . | MOVE.B (A6-0x1),D0 00020cb0 0c 40 00 ff | @ | CMPI.W #0x00ff,D0 00020cb4 67 1a |g | BEQ 0x20cd0 00020cb6 4a 40 |J@ | TST.W D0 00020cb8 6d 06 |m | BLT 0x20cc0 00020cba 0c 40 00 1f | @ | CMPI.W #0x001f,D0 00020cbe 6f 08 |o | BLE 0x20cc8 00020cc0 1f 01 | | MOVE.B D1,-(A7) 00020cc2 4e ba fe 26 |N & | JSR 0x20aea 00020cc6 60 06 |` | BRA 0x20cce 00020cc8 3f 00 |? | MOVE.W D0,-(A7) 00020cca 4e ba fd 7c |N | | JSR 0x20a48 00020cce 54 4f |TO | ADDQ.L #0x2,A7 00020cd0 60 16 |` | BRA 0x20ce8 00020cd2 4a 2e 00 08 |J. | TST.B (A6+0x8) 00020cd6 67 06 |g | BEQ 0x20cde 00020cd8 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020cdc 60 04 |` | BRA 0x20ce2 00020cde 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00020ce2 4e ba fe 06 |N | JSR 0x20aea 00020ce6 54 4f |TO | ADDQ.L #0x2,A7 00020ce8 4c df 0f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3 00020cec 4e 5e |N^ | UNLK A6 00020cee 4e 75 |Nu | RTS 00020cf0 ; -------------------------------------------------------------------------------------- 00020cf0 ; OMSI PASCAL Function 00020cf0 ; <LVAR 0x008 4(r)> 00020cf0 ; <LVAR -0x00a @> 00020cf0 ; <LVAR -0x00b @ 1(r)> 00020cf0 ; <LVAR -0x00c @> 00020cf0 ; -------------------------------------------------------------------------------------- 00020cf0 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 00020cf4 bf d5 | | CMPA.L (A5),A7 00020cf6 62 06 |b | BHI 0x20cfe 00020cf8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020cfc 4e 76 |Nv | TRAPV 00020cfe de fc 00 42 | B | ADDA.W #0x42,A7 00020d02 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00020d06 43 ee ff f5 |C | LEA.L (A6-0xb),A1 00020d0a 45 ee ff f4 |E | LEA.L (A6-0xc),A2 00020d0e 47 ee ff f6 |G | LEA.L (A6-0xa),A3 00020d12 49 f9 00 01 04 84 |I | LEA.L DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool),A4 00020d18 72 0e |r | MOVEQ.L #0x0e,D1 00020d1a 74 01 |t | MOVEQ.L #0x01,D2 00020d1c 2a 3c 00 00 02 58 |*< X | MOVE.L #0x258,D5 00020d22 7e 00 |~ | MOVEQ.L #0x00,D7 00020d24 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020d28 42 10 |B | CLR.B (A0) 00020d2a 2f 3c 00 00 98 96 |/< | MOVE.L #0x9896,-(A7) 00020d30 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 00020d36 54 4f |TO | ADDQ.L #0x2,A7 00020d38 1e bc 00 04 | | MOVE.B #0x04,(A7) 00020d3c 48 52 |HR | PEA.L (A2) 00020d3e 48 51 |HQ | PEA.L (A1) 00020d40 48 53 |HS | PEA.L (A3) 00020d42 4e 94 |N | JSR (A4) 00020d44 de c1 | | ADDA.W D1,A7 00020d46 10 07 | | MOVE.B D7,D0 00020d48 80 11 | | OR.B (A1),D0 00020d4a 48 80 |H | EXTB.W D0 00020d4c 41 82 |A | CHK.W D2,D0 00020d4e 1e 00 | | MOVE.B D0,D7 00020d50 1f 3c 00 07 | < | MOVE.B #0x07,-(A7) 00020d54 48 52 |HR | PEA.L (A2) 00020d56 48 51 |HQ | PEA.L (A1) 00020d58 48 53 |HS | PEA.L (A3) 00020d5a 4e 94 |N | JSR (A4) 00020d5c de c1 | | ADDA.W D1,A7 00020d5e 10 07 | | MOVE.B D7,D0 00020d60 80 11 | | OR.B (A1),D0 00020d62 48 80 |H | EXTB.W D0 00020d64 41 82 |A | CHK.W D2,D0 00020d66 1e 00 | | MOVE.B D0,D7 00020d68 1f 3c 00 06 | < | MOVE.B #0x06,-(A7) 00020d6c 48 52 |HR | PEA.L (A2) 00020d6e 48 51 |HQ | PEA.L (A1) 00020d70 48 53 |HS | PEA.L (A3) 00020d72 4e 94 |N | JSR (A4) 00020d74 de c1 | | ADDA.W D1,A7 00020d76 10 07 | | MOVE.B D7,D0 00020d78 80 11 | | OR.B (A1),D0 00020d7a 48 80 |H | EXTB.W D0 00020d7c 41 82 |A | CHK.W D2,D0 00020d7e 1e 00 | | MOVE.B D0,D7 00020d80 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020d84 48 52 |HR | PEA.L (A2) 00020d86 48 51 |HQ | PEA.L (A1) 00020d88 48 53 |HS | PEA.L (A3) 00020d8a 4e 94 |N | JSR (A4) 00020d8c de c1 | | ADDA.W D1,A7 00020d8e 10 07 | | MOVE.B D7,D0 00020d90 80 11 | | OR.B (A1),D0 00020d92 48 80 |H | EXTB.W D0 00020d94 41 82 |A | CHK.W D2,D0 00020d96 1e 00 | | MOVE.B D0,D7 00020d98 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00020d9c 48 52 |HR | PEA.L (A2) 00020d9e 48 51 |HQ | PEA.L (A1) 00020da0 48 53 |HS | PEA.L (A3) 00020da2 4e 94 |N | JSR (A4) 00020da4 de c1 | | ADDA.W D1,A7 00020da6 10 07 | | MOVE.B D7,D0 00020da8 80 11 | | OR.B (A1),D0 00020daa 48 80 |H | EXTB.W D0 00020dac 41 82 |A | CHK.W D2,D0 00020dae 1e 00 | | MOVE.B D0,D7 00020db0 7c 0c || | MOVEQ.L #0x0c,D6 00020db2 55 4f |UO | SUBQ.L #0x2,A7 00020db4 1f 06 | | MOVE.B D6,-(A7) 00020db6 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00020dbc 54 4f |TO | ADDQ.L #0x2,A7 00020dbe 4a 1f |J | TST.B (A7)+ 00020dc0 67 16 |g | BEQ 0x20dd8 00020dc2 1f 06 | | MOVE.B D6,-(A7) 00020dc4 48 52 |HR | PEA.L (A2) 00020dc6 48 51 |HQ | PEA.L (A1) 00020dc8 48 53 |HS | PEA.L (A3) 00020dca 4e 94 |N | JSR (A4) 00020dcc de c1 | | ADDA.W D1,A7 00020dce 10 07 | | MOVE.B D7,D0 00020dd0 80 11 | | OR.B (A1),D0 00020dd2 48 80 |H | EXTB.W D0 00020dd4 41 82 |A | CHK.W D2,D0 00020dd6 1e 00 | | MOVE.B D0,D7 00020dd8 52 06 |R | ADDQ.B #0x1,D6 00020dda 0c 06 00 0f | | CMPI.B #0x0f,D6 00020dde 6f d2 |o | BLE 0x20db2 00020de0 53 85 |S | SUBQ.L #0x1,D5 00020de2 67 06 |g | BEQ 0x20dea 00020de4 4a 07 |J | TST.B D7 00020de6 67 00 ff 42 |g B | BEQ 0x20d2a 00020dea 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020dee 10 87 | | MOVE.B D7,(A0) 00020df0 44 10 |D | NEG.B (A0) 00020df2 52 10 |R | ADDQ.B #0x1,(A0) 00020df4 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 00020df8 4e 5e |N^ | UNLK A6 00020dfa 4e 75 |Nu | RTS 00020dfc ; -------------------------------------------------------------------------------------- 00020dfc ; OMSI PASCAL Function 00020dfc ; <LVAR -0x004 @> 00020dfc ; -------------------------------------------------------------------------------------- 00020dfc 4e 56 ff ca |NV | LINK.W A6,#0xffca 00020e00 bf d5 | | CMPA.L (A5),A7 00020e02 62 06 |b | BHI 0x20e0a 00020e04 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020e08 4e 76 |Nv | TRAPV 00020e0a de fc 00 32 | 2 | ADDA.W #0x32,A7 00020e0e 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00020e12 72 01 |r | MOVEQ.L #0x01,D1 00020e14 41 fa f4 b6 |A | LEA.L 0x202cc,A0 00020e18 70 08 |p | MOVEQ.L #0x08,D0 00020e1a 3f 20 |? | MOVE.W -(A0),-(A7) 00020e1c 51 c8 ff fc |Q | DBF D0,0x20e1a 00020e20 42 27 |B' | CLR.B -(A7) 00020e22 59 4f |YO | SUBQ.L #0x4,A7 00020e24 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020e28 3f 01 |? | MOVE.W D1,-(A7) 00020e2a 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00020e2e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020e34 5c 4f |\O | ADDQ.L #0x6,A7 00020e36 1e 81 | | MOVE.B D1,(A7) 00020e38 1f 01 | | MOVE.B D1,-(A7) 00020e3a 1f 01 | | MOVE.B D1,-(A7) 00020e3c 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020e40 4e ba f7 1a |N | JSR 0x2055c 00020e44 de fc 00 22 | " | ADDA.W #0x22,A7 00020e48 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00020e4c 4e 5e |N^ | UNLK A6 00020e4e 4e 75 |Nu | RTS 00020e50 ; -------------------------------------------------------------------------------------- 00020e50 ; OMSI PASCAL Function 00020e50 ; -------------------------------------------------------------------------------------- 00020e50 4e 56 ff b6 |NV | LINK.W A6,#0xffb6 00020e54 bf d5 | | CMPA.L (A5),A7 00020e56 62 06 |b | BHI 0x20e5e 00020e58 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020e5c 4e 76 |Nv | TRAPV 00020e5e de fc 00 4a | J | ADDA.W #0x4a,A7 00020e62 48 e7 fe f8 |H | MOVEM.L A4+A3+A2+A1+A0+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020e66 45 f9 00 01 04 c0 |E | LEA.L HasBoard(diproc_addr: Byte) : Byte,A2 00020e6c 47 fa f5 d8 |G | LEA.L 0x20446,A3 00020e70 49 f9 00 02 16 ec |I | LEA.L 0x216ec,A4 00020e76 72 14 |r | MOVEQ.L #0x14,D1 00020e78 74 16 |t | MOVEQ.L #0x16,D2 00020e7a 76 0c |v | MOVEQ.L #0x0c,D3 00020e7c 78 0d |x | MOVEQ.L #0x0d,D4 00020e7e 7a 0e |z | MOVEQ.L #0x0e,D5 00020e80 7c 0f || | MOVEQ.L #0x0f,D6 00020e82 55 4f |UO | SUBQ.L #0x2,A7 00020e84 1f 03 | | MOVE.B D3,-(A7) 00020e86 4e 92 |N | JSR (A2) 00020e88 54 4f |TO | ADDQ.L #0x2,A7 00020e8a 4a 1f |J | TST.B (A7)+ 00020e8c 67 14 |g | BEQ 0x20ea2 00020e8e 1f 03 | | MOVE.B D3,-(A7) 00020e90 9e c1 | | SUBA.W D1,A7 00020e92 20 4f | O | MOVEA.L A7,A0 00020e94 22 4b |"K | MOVEA.L A3,A1 00020e96 70 12 |p | MOVEQ.L #0x12,D0 00020e98 10 d9 | | MOVE.B (A1)+,(A0)+ 00020e9a 51 c8 ff fc |Q | DBF D0,0x20e98 00020e9e 4e 94 |N | JSR (A4) 00020ea0 de c2 | | ADDA.W D2,A7 00020ea2 55 4f |UO | SUBQ.L #0x2,A7 00020ea4 1f 04 | | MOVE.B D4,-(A7) 00020ea6 4e 92 |N | JSR (A2) 00020ea8 54 4f |TO | ADDQ.L #0x2,A7 00020eaa 4a 1f |J | TST.B (A7)+ 00020eac 67 14 |g | BEQ 0x20ec2 00020eae 1f 04 | | MOVE.B D4,-(A7) 00020eb0 9e c1 | | SUBA.W D1,A7 00020eb2 20 4f | O | MOVEA.L A7,A0 00020eb4 22 4b |"K | MOVEA.L A3,A1 00020eb6 70 12 |p | MOVEQ.L #0x12,D0 00020eb8 10 d9 | | MOVE.B (A1)+,(A0)+ 00020eba 51 c8 ff fc |Q | DBF D0,0x20eb8 00020ebe 4e 94 |N | JSR (A4) 00020ec0 de c2 | | ADDA.W D2,A7 00020ec2 55 4f |UO | SUBQ.L #0x2,A7 00020ec4 1f 05 | | MOVE.B D5,-(A7) 00020ec6 4e 92 |N | JSR (A2) 00020ec8 54 4f |TO | ADDQ.L #0x2,A7 00020eca 4a 1f |J | TST.B (A7)+ 00020ecc 67 14 |g | BEQ 0x20ee2 00020ece 1f 05 | | MOVE.B D5,-(A7) 00020ed0 9e c1 | | SUBA.W D1,A7 00020ed2 20 4f | O | MOVEA.L A7,A0 00020ed4 22 4b |"K | MOVEA.L A3,A1 00020ed6 70 12 |p | MOVEQ.L #0x12,D0 00020ed8 10 d9 | | MOVE.B (A1)+,(A0)+ 00020eda 51 c8 ff fc |Q | DBF D0,0x20ed8 00020ede 4e 94 |N | JSR (A4) 00020ee0 de c2 | | ADDA.W D2,A7 00020ee2 55 4f |UO | SUBQ.L #0x2,A7 00020ee4 1f 06 | | MOVE.B D6,-(A7) 00020ee6 4e 92 |N | JSR (A2) 00020ee8 54 4f |TO | ADDQ.L #0x2,A7 00020eea 4a 1f |J | TST.B (A7)+ 00020eec 67 14 |g | BEQ 0x20f02 00020eee 1f 06 | | MOVE.B D6,-(A7) 00020ef0 9e c1 | | SUBA.W D1,A7 00020ef2 20 4f | O | MOVEA.L A7,A0 00020ef4 22 4b |"K | MOVEA.L A3,A1 00020ef6 70 12 |p | MOVEQ.L #0x12,D0 00020ef8 10 d9 | | MOVE.B (A1)+,(A0)+ 00020efa 51 c8 ff fc |Q | DBF D0,0x20ef8 00020efe 4e 94 |N | JSR (A4) 00020f00 de c2 | | ADDA.W D2,A7 00020f02 4c df 1f 7f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+A0+A1+A2+A3+A4 00020f06 4e 5e |N^ | UNLK A6 00020f08 4e 75 |Nu | RTS 00020f0a ; -------------------------------------------------------------------------------------- 00020f0a ; OMSI PASCAL Function 00020f0a ; -------------------------------------------------------------------------------------- 00020f0a START: 00020f0a 4f fa 00 08 |O | LEA.L MAIN,A7 00020f0e 4e f9 00 01 02 80 |N | JMP ?start_program 00020f14 MAIN: 00020f14 45 f9 00 02 1c 44 |E D | LEA.L 0x21c44,A2 00020f1a 47 f9 00 02 1c 49 |G I | LEA.L 0x21c49,A3 00020f20 49 f9 00 02 1c 4b |I K | LEA.L 0x21c4b,A4 00020f26 72 01 |r | MOVEQ.L #0x01,D1 00020f28 74 07 |t | MOVEQ.L #0x07,D2 00020f2a 76 0e |v | MOVEQ.L #0x0e,D3 00020f2c 4e b9 00 01 03 98 |N | JSR FSCALL_10398 00020f32 48 78 00 00 |Hx | PEA.L 0x0 00020f36 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 00020f3c 58 4f |XO | ADDQ.L #0x4,A7 00020f3e 48 52 |HR | PEA.L (A2) 00020f40 48 79 00 02 1c 48 |Hy H | PEA.L 0x21c48 00020f46 48 53 |HS | PEA.L (A3) 00020f48 48 54 |HT | PEA.L (A4) 00020f4a 48 79 00 02 1c 4c |Hy L | PEA.L 0x21c4c 00020f50 4e b9 00 01 05 62 |N b | JSR ?IPC_GetVar4xBool(VAR a : Pointer; VAR b : Bool ; VAR c : Bool; VAR d: Bool; VAR e: Bool) 00020f56 de fc 00 12 | | ADDA.W #0x12,A7 00020f5a 1e 93 | | MOVE.B (A3),(A7) 00020f5c 4e b9 00 01 04 d2 |N | JSR SetExpInitDone(a : Byte) 00020f62 5d 4f |]O | SUBQ.L #0x6,A7 00020f64 20 4f | O | MOVEA.L A7,A0 00020f66 43 fa f3 64 |C d | LEA.L 0x202cc,A1 00020f6a 70 06 |p | MOVEQ.L #0x06,D0 00020f6c 10 d9 | | MOVE.B (A1)+,(A0)+ 00020f6e 51 c8 ff fc |Q | DBF D0,0x20f6c 00020f72 59 4f |YO | SUBQ.L #0x4,A7 00020f74 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020f78 3f 01 |? | MOVE.W D1,-(A7) 00020f7a 3f 02 |? | MOVE.W D2,-(A7) 00020f7c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020f82 50 4f |PO | ADDQ.L #0x8,A7 00020f84 23 df 00 02 1c 52 |# R | MOVE.L (A7)+,0x21c52 00020f8a 50 4f |PO | ADDQ.L #0x8,A7 00020f8c 48 79 00 02 1c 56 |Hy V | PEA.L 0x21c56 00020f92 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00020f98 58 4f |XO | ADDQ.L #0x4,A7 00020f9a 42 39 00 02 1c 5a |B9 Z | CLR.B 0x21c5a 00020fa0 70 00 |p | MOVEQ.L #0x00,D0 00020fa2 23 c0 00 02 1c 64 |# d | MOVE.L D0,0x21c64 00020fa8 b0 82 | | CMP.L D2,D0 00020faa 63 02 |c | BLS 0x20fae 00020fac 4e 4f |NO | TRAP #15 00020fae 41 f9 00 02 1c 3a |A : | LEA.L 0x21c3a,A0 00020fb4 42 30 08 21 |B0 ! | CLR.B (A0+D0.L+#0x21) 00020fb8 52 80 |R | ADDQ.L #0x1,D0 00020fba b0 82 | | CMP.L D2,D0 00020fbc 6f e4 |o | BLE 0x20fa2 00020fbe 13 c1 00 02 1c 4a | J | MOVE.B D1,0x21c4a 00020fc4 42 80 |B | CLR.L D0 00020fc6 10 12 | | MOVE.B (A2),D0 00020fc8 0c 40 00 20 | @ | CMPI.W #0x0020,D0 00020fcc 63 2c |c, | BLS 0x20ffa 00020fce 41 fa f3 22 |A " | LEA.L 0x202f2,A0 00020fd2 70 0e |p | MOVEQ.L #0x0e,D0 00020fd4 3f 20 |? | MOVE.W -(A0),-(A7) 00020fd6 51 c8 ff fc |Q | DBF D0,0x20fd4 00020fda 1f 03 | | MOVE.B D3,-(A7) 00020fdc 59 4f |YO | SUBQ.L #0x4,A7 00020fde 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020fe2 3f 01 |? | MOVE.W D1,-(A7) 00020fe4 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00020fe8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020fee 50 4f |PO | ADDQ.L #0x8,A7 00020ff0 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020ff6 de fc 00 24 | $ | ADDA.W #0x24,A7 00020ffa 4a 39 00 02 1c 4c |J9 L | TST.B 0x21c4c 00021000 67 04 |g | BEQ 0x21006 00021002 4e ba f6 20 |N | JSR 0x20624 00021006 4a 14 |J | TST.B (A4) 00021008 67 2a |g* | BEQ 0x21034 0002100a 4e ba fd f0 |N | JSR 0x20dfc 0002100e 2f 3a f4 26 |/: & | MOVE.L 0x20436,-(A7) 00021012 2f 3a f4 1e |/: | MOVE.L 0x20432,-(A7) 00021016 42 27 |B' | CLR.B -(A7) 00021018 4e b9 00 02 13 a4 |N | JSR exp_LOAD_WDR.VAL(Sw_8, Sw_1) 0002101e 5c 4f |\O | ADDQ.L #0x6,A7 00021020 2e ba f4 14 |. | MOVE.L 0x20436,(A7) 00021024 2f 3a f4 0c |/: | MOVE.L 0x20432,-(A7) 00021028 42 27 |B' | CLR.B -(A7) 0002102a 4e b9 00 02 12 e2 |N | JSR exp_LOAD_WDR.TYP(Sw_8, Sw_1) 00021030 de fc 00 0a | | ADDA.W #0xa,A7 00021034 4e ba fe 1a |N | JSR 0x20e50 00021038 13 c3 00 02 1c 42 | B | MOVE.B D3,0x21c42 0002103e 13 d2 00 02 1c 43 | C | MOVE.B (A2),0x21c43 00021044 3f 39 00 02 1c 42 |?9 B | MOVE.W 0x21c42,-(A7) 0002104a 4e ba f6 b8 |N | JSR 0x20704 0002104e 54 4f |TO | ADDQ.L #0x2,A7 00021050 42 39 00 02 1c 45 |B9 E | CLR.B 0x21c45 00021056 42 39 00 02 1c 46 |B9 F | CLR.B 0x21c46 0002105c 42 80 |B | CLR.L D0 0002105e 10 12 | | MOVE.B (A2),D0 00021060 b0 41 | A | CMP.W D1,D0 00021062 66 22 |f" | BNE 0x21086 00021064 13 c1 00 02 1c 45 | E | MOVE.B D1,0x21c45 0002106a 13 c1 00 02 1c 46 | F | MOVE.B D1,0x21c46 00021070 42 80 |B | CLR.L D0 00021072 10 39 00 02 1c 43 | 9 C | MOVE.B 0x21c43,D0 00021078 53 40 |S@ | SUBQ.W #0x1,D0 0002107a 41 bc 00 ff |A | CHK.W #0xff,D0 0002107e 13 c0 00 02 1c 43 | C | MOVE.B D0,0x21c43 00021084 60 0c |` | BRA 0x21092 00021086 0c 40 00 02 | @ | CMPI.W #0x0002,D0 0002108a 66 06 |f | BNE 0x21092 0002108c 13 c1 00 02 1c 45 | E | MOVE.B D1,0x21c45 00021092 4e ba f7 e6 |N | JSR 0x2087a 00021096 48 79 00 02 1c 47 |Hy G | PEA.L 0x21c47 0002109c 4e ba fc 52 |N R | JSR 0x20cf0 000210a0 54 4f |TO | ADDQ.L #0x2,A7 000210a2 1e b9 00 02 1c 47 | G | MOVE.B 0x21c47,(A7) 000210a8 4e ba fa e8 |N | JSR 0x20b92 000210ac 1e 93 | | MOVE.B (A3),(A7) 000210ae 48 79 00 02 1c 4d |Hy M | PEA.L 0x21c4d 000210b4 4e ba f3 a4 |N | JSR 0x2045a 000210b8 58 4f |XO | ADDQ.L #0x4,A7 000210ba 1e b9 00 02 1c 4a | J | MOVE.B 0x21c4a,(A7) 000210c0 2f 39 00 02 1c 52 |/9 R | MOVE.L 0x21c52,-(A7) 000210c6 2f 39 00 02 1c 56 |/9 V | MOVE.L 0x21c56,-(A7) 000210cc 1f 39 00 02 1c 5a | 9 Z | MOVE.B 0x21c5a,-(A7) 000210d2 51 4f |QO | SUBQ.L #0x8,A7 000210d4 20 4f | O | MOVEA.L A7,A0 000210d6 43 f9 00 02 1c 5b |C [ | LEA.L 0x21c5b,A1 000210dc 70 07 |p | MOVEQ.L #0x07,D0 000210de 10 d9 | | MOVE.B (A1)+,(A0)+ 000210e0 51 c8 ff fc |Q | DBF D0,0x210de 000210e4 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 000210ea de fc 00 14 | | ADDA.W #0x14,A7 000210ee 4e b9 00 01 02 84 |N | JSR ?exit 000210f4 exp_LOAD_HRAM_8_0.FIU(): 000210f4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000210fa 00 08 | | .CONST 0x0008 ; Stack-delta 000210fc 11 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 17,'LOAD_HRAM_8_0.FIU' 0002110e 00 | | .CONST 0x0 0002110f 03 | | .CONST 0x3 ; DIPROC address 00021110 00 | | .CONST 0x0 ; Output Parameters 00021111 00 | | .CONST 0x0 ; Input Parameters 00021112 exp_LOAD_HRAM_32_0.FIU(): 00021112 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021118 00 08 | | .CONST 0x0008 ; Stack-delta 0002111a 12 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 18,'LOAD_HRAM_32_0.FIU' 0002112d 00 | | .CONST 0x0 0002112e 03 | | .CONST 0x3 ; DIPROC address 0002112f 00 | | .CONST 0x0 ; Output Parameters 00021130 00 | | .CONST 0x0 ; Input Parameters 00021131 00 | | .PAD 0x0 00021132 exp_READ_PAREG.FIU(Sw_1, &Sr_1): 00021132 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021138 00 0e | | .CONST 0x000e ; Stack-delta 0002113a 0e 52 45 41 44 5f 50 41 | READ_PA| .TXT 14,'READ_PAREG.FIU' 00021149 00 | | .CONST 0x0 0002114a 03 | | .CONST 0x3 ; DIPROC address 0002114b 01 | | .CONST 0x1 ; Output Parameters 0002114c 01 | | .CONST 0x1 ; Input Parameters 0002114d 00 | | .CONST 0x0 ; In arg [1] 0002114e 00 | | .CONST 0x0 ; Out arg [1] 0002114f 00 | | .PAD 0x0 00021150 exp_RUN_NORMAL.FIU(): 00021150 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021156 00 08 | | .CONST 0x0008 ; Stack-delta 00021158 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.FIU' 00021167 00 | | .CONST 0x0 00021168 03 | | .CONST 0x3 ; DIPROC address 00021169 00 | | .CONST 0x0 ; Output Parameters 0002116a 00 | | .CONST 0x0 ; Input Parameters 0002116b 00 | | .PAD 0x0 0002116c exp_RESET.FIU(): 0002116c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021172 00 08 | | .CONST 0x0008 ; Stack-delta 00021174 09 52 45 53 45 54 2e 46 | RESET.F| .TXT 9,'RESET.FIU' 0002117e 00 | | .CONST 0x0 0002117f 03 | | .CONST 0x3 ; DIPROC address 00021180 00 | | .CONST 0x0 ; Output Parameters 00021181 00 | | .CONST 0x0 ; Input Parameters 00021182 exp_PREP_RUN.FIU(Sw_2): 00021182 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021188 00 0a | | .CONST 0x000a ; Stack-delta 0002118a 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.FIU' 00021197 00 | | .CONST 0x0 00021198 03 | | .CONST 0x3 ; DIPROC address 00021199 00 | | .CONST 0x0 ; Output Parameters 0002119a 01 | | .CONST 0x1 ; Input Parameters 0002119b 01 | | .CONST 0x1 ; In arg [2] 0002119c exp_LOAD_REFRESH_REGS.FIU(Sw_2, Sw_2): 0002119c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000211a2 00 0c | | .CONST 0x000c ; Stack-delta 000211a4 15 4c 4f 41 44 5f 52 45 | LOAD_RE| .TXT 21,'LOAD_REFRESH_REGS.FIU' 000211ba 00 | | .CONST 0x0 000211bb 03 | | .CONST 0x3 ; DIPROC address 000211bc 00 | | .CONST 0x0 ; Output Parameters 000211bd 02 | | .CONST 0x2 ; Input Parameters 000211be 01 | | .CONST 0x1 ; In arg [2] 000211bf 01 | | .CONST 0x1 ; In arg [2] 000211c0 exp_LOAD_HRAM_1.FIU(): 000211c0 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000211c6 00 08 | | .CONST 0x0008 ; Stack-delta 000211c8 0f 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 15,'LOAD_HRAM_1.FIU' 000211d8 00 | | .CONST 0x0 000211d9 03 | | .CONST 0x3 ; DIPROC address 000211da 00 | | .CONST 0x0 ; Output Parameters 000211db 00 | | .CONST 0x0 ; Input Parameters 000211dc exp_INIT_MRU.FIU(): 000211dc 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000211e2 00 08 | | .CONST 0x0008 ; Stack-delta 000211e4 0c 49 4e 49 54 5f 4d 52 | INIT_MR| .TXT 12,'INIT_MRU.FIU' 000211f1 00 | | .CONST 0x0 000211f2 03 | | .CONST 0x3 ; DIPROC address 000211f3 00 | | .CONST 0x0 ; Output Parameters 000211f4 00 | | .CONST 0x0 ; Input Parameters 000211f5 00 | | .PAD 0x0 000211f6 exp_FREEZE_WORLD.FIU(): 000211f6 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000211fc 00 08 | | .CONST 0x0008 ; Stack-delta 000211fe 10 46 52 45 45 5a 45 5f | FREEZE_| .TXT 16,'FREEZE_WORLD.FIU' 0002120f 00 | | .CONST 0x0 00021210 03 | | .CONST 0x3 ; DIPROC address 00021211 00 | | .CONST 0x0 ; Output Parameters 00021212 00 | | .CONST 0x0 ; Input Parameters 00021213 00 | | .PAD 0x0 00021214 exp_RESET.SEQ(): 00021214 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002121a 00 08 | | .CONST 0x0008 ; Stack-delta 0002121c 09 52 45 53 45 54 2e 53 | RESET.S| .TXT 9,'RESET.SEQ' 00021226 00 | | .CONST 0x0 00021227 02 | | .CONST 0x2 ; DIPROC address 00021228 00 | | .CONST 0x0 ; Output Parameters 00021229 00 | | .CONST 0x0 ; Input Parameters 0002122a exp_RUN_CHECK.SEQ(): 0002122a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021230 00 08 | | .CONST 0x0008 ; Stack-delta 00021232 0d 52 55 4e 5f 43 48 45 | RUN_CHE| .TXT 13,'RUN_CHECK.SEQ' 00021240 00 | | .CONST 0x0 00021241 02 | | .CONST 0x2 ; DIPROC address 00021242 00 | | .CONST 0x0 ; Output Parameters 00021243 00 | | .CONST 0x0 ; Input Parameters 00021244 exp_PREP_RUN.SEQ(Sw_2): 00021244 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002124a 00 0a | | .CONST 0x000a ; Stack-delta 0002124c 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.SEQ' 00021259 00 | | .CONST 0x0 0002125a 02 | | .CONST 0x2 ; DIPROC address 0002125b 00 | | .CONST 0x0 ; Output Parameters 0002125c 01 | | .CONST 0x1 ; Input Parameters 0002125d 01 | | .CONST 0x1 ; In arg [2] 0002125e exp_HALT.SEQ(&Fr): 0002125e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021264 00 0c | | .CONST 0x000c ; Stack-delta 00021266 08 48 41 4c 54 2e 53 45 | HALT.SE| .TXT 8,'HALT.SEQ' 0002126f 00 | | .CONST 0x0 00021270 02 | | .CONST 0x2 ; DIPROC address 00021271 01 | | .CONST 0x1 ; Output Parameters 00021272 00 | | .CONST 0x0 ; Input Parameters 00021273 08 | | .CONST 0x8 ; Out arg flag 00021274 exp_GET_MISC_ERRORS.SEQ(&Sr_1): 00021274 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002127a 00 0c | | .CONST 0x000c ; Stack-delta 0002127c 13 47 45 54 5f 4d 49 53 | GET_MIS| .TXT 19,'GET_MISC_ERRORS.SEQ' 00021290 00 | | .CONST 0x0 00021291 02 | | .CONST 0x2 ; DIPROC address 00021292 01 | | .CONST 0x1 ; Output Parameters 00021293 00 | | .CONST 0x0 ; Input Parameters 00021294 00 | | .CONST 0x0 ; Out arg [1] 00021295 00 | | .PAD 0x0 00021296 exp_RUN_NORMAL.TYP(): 00021296 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002129c 00 08 | | .CONST 0x0008 ; Stack-delta 0002129e 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.TYP' 000212ad 00 | | .CONST 0x0 000212ae 06 | | .CONST 0x6 ; DIPROC address 000212af 00 | | .CONST 0x0 ; Output Parameters 000212b0 00 | | .CONST 0x0 ; Input Parameters 000212b1 00 | | .PAD 0x0 000212b2 exp_RESET.TYP(): 000212b2 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000212b8 00 08 | | .CONST 0x0008 ; Stack-delta 000212ba 09 52 45 53 45 54 2e 54 | RESET.T| .TXT 9,'RESET.TYP' 000212c4 00 | | .CONST 0x0 000212c5 06 | | .CONST 0x6 ; DIPROC address 000212c6 00 | | .CONST 0x0 ; Output Parameters 000212c7 00 | | .CONST 0x0 ; Input Parameters 000212c8 exp_PREP_RUN.TYP(Sw_2): 000212c8 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000212ce 00 0a | | .CONST 0x000a ; Stack-delta 000212d0 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.TYP' 000212dd 00 | | .CONST 0x0 000212de 06 | | .CONST 0x6 ; DIPROC address 000212df 00 | | .CONST 0x0 ; Output Parameters 000212e0 01 | | .CONST 0x1 ; Input Parameters 000212e1 01 | | .CONST 0x1 ; In arg [2] 000212e2 exp_LOAD_WDR.TYP(Sw_8, Sw_1): 000212e2 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000212e8 00 12 | | .CONST 0x0012 ; Stack-delta 000212ea 0c 4c 4f 41 44 5f 57 44 | LOAD_WD| .TXT 12,'LOAD_WDR.TYP' 000212f7 00 | | .CONST 0x0 000212f8 06 | | .CONST 0x6 ; DIPROC address 000212f9 00 | | .CONST 0x0 ; Output Parameters 000212fa 02 | | .CONST 0x2 ; Input Parameters 000212fb 07 | | .CONST 0x7 ; In arg [8] 000212fc 00 | | .CONST 0x0 ; In arg [1] 000212fd 00 | | .PAD 0x0 000212fe exp_LOAD_BENIGN_UWORD.TYP(): 000212fe 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021304 00 08 | | .CONST 0x0008 ; Stack-delta 00021306 15 4c 4f 41 44 5f 42 45 | LOAD_BE| .TXT 21,'LOAD_BENIGN_UWORD.TYP' 0002131c 00 | | .CONST 0x0 0002131d 06 | | .CONST 0x6 ; DIPROC address 0002131e 00 | | .CONST 0x0 ; Output Parameters 0002131f 00 | | .CONST 0x0 ; Input Parameters 00021320 exp_ALIGN_CSA.TYP(): 00021320 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021326 00 08 | | .CONST 0x0008 ; Stack-delta 00021328 0d 41 4c 49 47 4e 5f 43 | ALIGN_C| .TXT 13,'ALIGN_CSA.TYP' 00021336 00 | | .CONST 0x0 00021337 06 | | .CONST 0x6 ; DIPROC address 00021338 00 | | .CONST 0x0 ; Output Parameters 00021339 00 | | .CONST 0x0 ; Input Parameters 0002133a exp_READ_RF_B.VAL(Sw_2, Sw_1, &Sr_8): 0002133a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021340 00 10 | | .CONST 0x0010 ; Stack-delta 00021342 0d 52 45 41 44 5f 52 46 | READ_RF| .TXT 13,'READ_RF_B.VAL' 00021350 00 | | .CONST 0x0 00021351 07 | | .CONST 0x7 ; DIPROC address 00021352 01 | | .CONST 0x1 ; Output Parameters 00021353 02 | | .CONST 0x2 ; Input Parameters 00021354 01 | | .CONST 0x1 ; In arg [2] 00021355 00 | | .CONST 0x0 ; In arg [1] 00021356 07 | | .CONST 0x7 ; Out arg [8] 00021357 00 | | .PAD 0x0 00021358 exp_RUN_NORMAL.VAL(): 00021358 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002135e 00 08 | | .CONST 0x0008 ; Stack-delta 00021360 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.VAL' 0002136f 00 | | .CONST 0x0 00021370 07 | | .CONST 0x7 ; DIPROC address 00021371 00 | | .CONST 0x0 ; Output Parameters 00021372 00 | | .CONST 0x0 ; Input Parameters 00021373 00 | | .PAD 0x0 00021374 exp_RESET.VAL(): 00021374 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002137a 00 08 | | .CONST 0x0008 ; Stack-delta 0002137c 09 52 45 53 45 54 2e 56 | RESET.V| .TXT 9,'RESET.VAL' 00021386 00 | | .CONST 0x0 00021387 07 | | .CONST 0x7 ; DIPROC address 00021388 00 | | .CONST 0x0 ; Output Parameters 00021389 00 | | .CONST 0x0 ; Input Parameters 0002138a exp_PREP_RUN.VAL(Sw_2): 0002138a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021390 00 0a | | .CONST 0x000a ; Stack-delta 00021392 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.VAL' 0002139f 00 | | .CONST 0x0 000213a0 07 | | .CONST 0x7 ; DIPROC address 000213a1 00 | | .CONST 0x0 ; Output Parameters 000213a2 01 | | .CONST 0x1 ; Input Parameters 000213a3 01 | | .CONST 0x1 ; In arg [2] 000213a4 exp_LOAD_WDR.VAL(Sw_8, Sw_1): 000213a4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000213aa 00 12 | | .CONST 0x0012 ; Stack-delta 000213ac 0c 4c 4f 41 44 5f 57 44 | LOAD_WD| .TXT 12,'LOAD_WDR.VAL' 000213b9 00 | | .CONST 0x0 000213ba 07 | | .CONST 0x7 ; DIPROC address 000213bb 00 | | .CONST 0x0 ; Output Parameters 000213bc 02 | | .CONST 0x2 ; Input Parameters 000213bd 07 | | .CONST 0x7 ; In arg [8] 000213be 00 | | .CONST 0x0 ; In arg [1] 000213bf 00 | | .PAD 0x0 000213c0 exp_ALIGN_CSA.VAL(): 000213c0 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000213c6 00 08 | | .CONST 0x0008 ; Stack-delta 000213c8 0d 41 4c 49 47 4e 5f 43 | ALIGN_C| .TXT 13,'ALIGN_CSA.VAL' 000213d6 00 | | .CONST 0x0 000213d7 07 | | .CONST 0x7 ; DIPROC address 000213d8 00 | | .CONST 0x0 ; Output Parameters 000213d9 00 | | .CONST 0x0 ; Input Parameters 000213da 53 45 54 5f 48 49 54 2e |SET_HIT.| .TXT 'SET_HIT.MEM ' 000213e6 53 45 54 5f 48 49 54 2e |SET_HIT.| .TXT 'SET_HIT.M32 ' 000213f2 ; -------------------------------------------------------------------------------------- 000213f2 ; OMSI PASCAL Function 000213f2 ; <LVAR 0x00a 1(r)> 000213f2 ; <LVAR 0x008 1(r)> 000213f2 ; <LVAR -0x004 @ 4(r)> 000213f2 ; -------------------------------------------------------------------------------------- 000213f2 4e 56 ff cc |NV | LINK.W A6,#0xffcc 000213f6 bf d5 | | CMPA.L (A5),A7 000213f8 62 06 |b | BHI 0x21400 000213fa 44 fc 00 02 |D | MOVE.W #0x2,CCR 000213fe 4e 76 |Nv | TRAPV 00021400 de fc 00 30 | 0 | ADDA.W #0x30,A7 00021404 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00021408 45 ee ff fc |E | LEA.L (A6-0x4),A2 0002140c 72 0c |r | MOVEQ.L #0x0c,D1 0002140e 55 4f |UO | SUBQ.L #0x2,A7 00021410 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00021416 4a 1f |J | TST.B (A7)+ 00021418 67 12 |g | BEQ 0x2142c 0002141a 9e c1 | | SUBA.W D1,A7 0002141c 20 4f | O | MOVEA.L A7,A0 0002141e 43 fa ff ba |C | LEA.L 0x213da,A1 00021422 70 0a |p | MOVEQ.L #0x0a,D0 00021424 10 d9 | | MOVE.B (A1)+,(A0)+ 00021426 51 c8 ff fc |Q | DBF D0,0x21424 0002142a 60 10 |` | BRA 0x2143c 0002142c 9e c1 | | SUBA.W D1,A7 0002142e 20 4f | O | MOVEA.L A7,A0 00021430 43 fa ff b4 |C | LEA.L 0x213e6,A1 00021434 70 0a |p | MOVEQ.L #0x0a,D0 00021436 10 d9 | | MOVE.B (A1)+,(A0)+ 00021438 51 c8 ff fc |Q | DBF D0,0x21436 0002143c 59 4f |YO | SUBQ.L #0x4,A7 0002143e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021442 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021446 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 0002144a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021450 50 4f |PO | ADDQ.L #0x8,A7 00021452 48 52 |HR | PEA.L (A2) 00021454 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 0002145a de fc 00 14 | | ADDA.W #0x14,A7 0002145e 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00021462 2f 12 |/ | MOVE.L (A2),-(A7) 00021464 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021468 48 78 00 00 |Hx | PEA.L 0x0 0002146c 48 78 00 00 |Hx | PEA.L 0x0 00021470 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00021476 de fc 00 10 | | ADDA.W #0x10,A7 0002147a 42 17 |B | CLR.B (A7) 0002147c 1f 2e 00 0a | . | MOVE.B (A6+0xa),-(A7) 00021480 2f 12 |/ | MOVE.L (A2),-(A7) 00021482 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00021488 50 4f |PO | ADDQ.L #0x8,A7 0002148a 48 52 |HR | PEA.L (A2) 0002148c 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00021492 58 4f |XO | ADDQ.L #0x4,A7 00021494 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00021498 4e 5e |N^ | UNLK A6 0002149a 4e 75 |Nu | RTS 0002149c 52 45 53 45 54 2e 4d 45 |RESET.ME| .TXT 'RESET.MEM ' 000214a6 52 45 53 45 54 2e 4d 33 |RESET.M3| .TXT 'RESET.M32 ' 000214b0 ; -------------------------------------------------------------------------------------- 000214b0 ; OMSI PASCAL Function 000214b0 ; <LVAR 0x008 1(r)> 000214b0 ; <LVAR -0x006 @ 4(r)> 000214b0 ; -------------------------------------------------------------------------------------- 000214b0 4e 56 ff cc |NV | LINK.W A6,#0xffcc 000214b4 bf d5 | | CMPA.L (A5),A7 000214b6 62 06 |b | BHI 0x214be 000214b8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000214bc 4e 76 |Nv | TRAPV 000214be de fc 00 2e | . | ADDA.W #0x2e,A7 000214c2 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000214c6 45 ee ff fa |E | LEA.L (A6-0x6),A2 000214ca 72 0a |r | MOVEQ.L #0x0a,D1 000214cc 55 4f |UO | SUBQ.L #0x2,A7 000214ce 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000214d4 4a 1f |J | TST.B (A7)+ 000214d6 67 12 |g | BEQ 0x214ea 000214d8 9e c1 | | SUBA.W D1,A7 000214da 20 4f | O | MOVEA.L A7,A0 000214dc 43 fa ff be |C | LEA.L 0x2149c,A1 000214e0 70 08 |p | MOVEQ.L #0x08,D0 000214e2 10 d9 | | MOVE.B (A1)+,(A0)+ 000214e4 51 c8 ff fc |Q | DBF D0,0x214e2 000214e8 60 10 |` | BRA 0x214fa 000214ea 9e c1 | | SUBA.W D1,A7 000214ec 20 4f | O | MOVEA.L A7,A0 000214ee 43 fa ff b6 |C | LEA.L 0x214a6,A1 000214f2 70 08 |p | MOVEQ.L #0x08,D0 000214f4 10 d9 | | MOVE.B (A1)+,(A0)+ 000214f6 51 c8 ff fc |Q | DBF D0,0x214f4 000214fa 59 4f |YO | SUBQ.L #0x4,A7 000214fc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021500 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021504 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00021508 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002150e 50 4f |PO | ADDQ.L #0x8,A7 00021510 48 52 |HR | PEA.L (A2) 00021512 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00021518 de fc 00 12 | | ADDA.W #0x12,A7 0002151c 42 27 |B' | CLR.B -(A7) 0002151e 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00021522 2f 12 |/ | MOVE.L (A2),-(A7) 00021524 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 0002152a 50 4f |PO | ADDQ.L #0x8,A7 0002152c 48 52 |HR | PEA.L (A2) 0002152e 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00021534 58 4f |XO | ADDQ.L #0x4,A7 00021536 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 0002153a 4e 5e |N^ | UNLK A6 0002153c 4e 75 |Nu | RTS 0002153e 52 55 4e 5f 43 48 45 43 |RUN_CHEC| .TXT 'RUN_CHECK.MEM ' 0002154c 52 55 4e 5f 43 48 45 43 |RUN_CHEC| .TXT 'RUN_CHECK.M32 ' 0002155a ; -------------------------------------------------------------------------------------- 0002155a ; OMSI PASCAL Function 0002155a ; <LVAR 0x008 1(r)> 0002155a ; <LVAR -0x006 @ 4(r)> 0002155a ; -------------------------------------------------------------------------------------- 0002155a 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 0002155e bf d5 | | CMPA.L (A5),A7 00021560 62 06 |b | BHI 0x21568 00021562 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021566 4e 76 |Nv | TRAPV 00021568 de fc 00 32 | 2 | ADDA.W #0x32,A7 0002156c 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00021570 45 ee ff fa |E | LEA.L (A6-0x6),A2 00021574 72 0e |r | MOVEQ.L #0x0e,D1 00021576 55 4f |UO | SUBQ.L #0x2,A7 00021578 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002157e 4a 1f |J | TST.B (A7)+ 00021580 67 12 |g | BEQ 0x21594 00021582 9e c1 | | SUBA.W D1,A7 00021584 20 4f | O | MOVEA.L A7,A0 00021586 43 fa ff b6 |C | LEA.L 0x2153e,A1 0002158a 70 0c |p | MOVEQ.L #0x0c,D0 0002158c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002158e 51 c8 ff fc |Q | DBF D0,0x2158c 00021592 60 10 |` | BRA 0x215a4 00021594 9e c1 | | SUBA.W D1,A7 00021596 20 4f | O | MOVEA.L A7,A0 00021598 43 fa ff b2 |C | LEA.L 0x2154c,A1 0002159c 70 0c |p | MOVEQ.L #0x0c,D0 0002159e 10 d9 | | MOVE.B (A1)+,(A0)+ 000215a0 51 c8 ff fc |Q | DBF D0,0x2159e 000215a4 59 4f |YO | SUBQ.L #0x4,A7 000215a6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000215aa 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000215ae 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 000215b2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000215b8 50 4f |PO | ADDQ.L #0x8,A7 000215ba 48 52 |HR | PEA.L (A2) 000215bc 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000215c2 de fc 00 16 | | ADDA.W #0x16,A7 000215c6 42 27 |B' | CLR.B -(A7) 000215c8 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 000215cc 2f 12 |/ | MOVE.L (A2),-(A7) 000215ce 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000215d4 50 4f |PO | ADDQ.L #0x8,A7 000215d6 48 52 |HR | PEA.L (A2) 000215d8 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000215de 58 4f |XO | ADDQ.L #0x4,A7 000215e0 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 000215e4 4e 5e |N^ | UNLK A6 000215e6 4e 75 |Nu | RTS 000215e8 4c 4f 41 44 5f 43 4f 4e |LOAD_CON| .TXT 'LOAD_CONFIG.MEM ' 000215f8 4c 4f 41 44 5f 43 4f 4e |LOAD_CON| .TXT 'LOAD_CONFIG.M32 ' 00021608 ; -------------------------------------------------------------------------------------- 00021608 ; OMSI PASCAL Function 00021608 ; <LVAR 0x00e 1(r)> 00021608 ; <LVAR 0x00c 1(r)> 00021608 ; <LVAR 0x00a 1(r)> 00021608 ; <LVAR 0x008 1(r)> 00021608 ; <LVAR -0x004 @ 4(r)> 00021608 ; -------------------------------------------------------------------------------------- 00021608 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 0002160c bf d5 | | CMPA.L (A5),A7 0002160e 62 06 |b | BHI 0x21616 00021610 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021614 4e 76 |Nv | TRAPV 00021616 de fc 00 34 | 4 | ADDA.W #0x34,A7 0002161a 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 0002161e 45 ee ff fc |E | LEA.L (A6-0x4),A2 00021622 72 10 |r | MOVEQ.L #0x10,D1 00021624 55 4f |UO | SUBQ.L #0x2,A7 00021626 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002162c 4a 1f |J | TST.B (A7)+ 0002162e 67 12 |g | BEQ 0x21642 00021630 9e c1 | | SUBA.W D1,A7 00021632 20 4f | O | MOVEA.L A7,A0 00021634 43 fa ff b2 |C | LEA.L 0x215e8,A1 00021638 70 0e |p | MOVEQ.L #0x0e,D0 0002163a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002163c 51 c8 ff fc |Q | DBF D0,0x2163a 00021640 60 10 |` | BRA 0x21652 00021642 9e c1 | | SUBA.W D1,A7 00021644 20 4f | O | MOVEA.L A7,A0 00021646 43 fa ff b0 |C | LEA.L 0x215f8,A1 0002164a 70 0e |p | MOVEQ.L #0x0e,D0 0002164c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002164e 51 c8 ff fc |Q | DBF D0,0x2164c 00021652 59 4f |YO | SUBQ.L #0x4,A7 00021654 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021658 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002165c 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00021660 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021666 50 4f |PO | ADDQ.L #0x8,A7 00021668 48 52 |HR | PEA.L (A2) 0002166a 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00021670 de fc 00 18 | | ADDA.W #0x18,A7 00021674 2f 12 |/ | MOVE.L (A2),-(A7) 00021676 1f 2e 00 0c | . | MOVE.B (A6+0xc),-(A7) 0002167a 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 00021680 54 4f |TO | ADDQ.L #0x2,A7 00021682 2e 92 |. | MOVE.L (A2),(A7) 00021684 1f 2e 00 0a | . | MOVE.B (A6+0xa),-(A7) 00021688 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 0002168e 58 4f |XO | ADDQ.L #0x4,A7 00021690 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00021694 2f 12 |/ | MOVE.L (A2),-(A7) 00021696 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002169a 48 78 00 00 |Hx | PEA.L 0x0 0002169e 48 78 00 00 |Hx | PEA.L 0x0 000216a2 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 000216a8 de c1 | | ADDA.W D1,A7 000216aa 42 17 |B | CLR.B (A7) 000216ac 1f 2e 00 0e | . | MOVE.B (A6+0xe),-(A7) 000216b0 2f 12 |/ | MOVE.L (A2),-(A7) 000216b2 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000216b8 50 4f |PO | ADDQ.L #0x8,A7 000216ba 48 52 |HR | PEA.L (A2) 000216bc 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000216c2 58 4f |XO | ADDQ.L #0x4,A7 000216c4 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 000216c8 4e 5e |N^ | UNLK A6 000216ca 4e 75 |Nu | RTS 000216cc 46 49 4c 4c 5f 4d 45 4d |FILL_MEM| .TXT 'FILL_MEMORY.MEM ' 000216dc 46 49 4c 4c 5f 4d 45 4d |FILL_MEM| .TXT 'FILL_MEMORY.M32 ' 000216ec ; -------------------------------------------------------------------------------------- 000216ec ; OMSI PASCAL Function 000216ec ; <LVAR 0x01c 1(r)> 000216ec ; <LVAR 0x01a 1(r)> 000216ec ; <LVAR 0x019 1(r)> 000216ec ; <LVAR 0x018 1(r)> 000216ec ; <LVAR 0x014 4(r)> 000216ec ; <LVAR 0x010 4(r)> 000216ec ; <LVAR 0x00c 4(r)> 000216ec ; <LVAR 0x008 4(r)> 000216ec ; <LVAR -0x006 @ 4(r)> 000216ec ; -------------------------------------------------------------------------------------- 000216ec 4e 56 ff be |NV | LINK.W A6,#0xffbe 000216f0 bf d5 | | CMPA.L (A5),A7 000216f2 62 06 |b | BHI 0x216fa 000216f4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000216f8 4e 76 |Nv | TRAPV 000216fa de fc 00 3c | < | ADDA.W #0x3c,A7 000216fe 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 00021702 45 ee ff fa |E | LEA.L (A6-0x6),A2 00021706 47 f8 00 00 |G | LEA.L 0x0,A3 0002170a 49 f9 00 01 04 66 |I f | LEA.L ExpInputParam(exp : Pointer; ptr : Pointer; len : L),A4 00021710 72 10 |r | MOVEQ.L #0x10,D1 00021712 55 4f |UO | SUBQ.L #0x2,A7 00021714 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002171a 4a 1f |J | TST.B (A7)+ 0002171c 67 12 |g | BEQ 0x21730 0002171e 9e c1 | | SUBA.W D1,A7 00021720 20 4f | O | MOVEA.L A7,A0 00021722 43 fa ff a8 |C | LEA.L 0x216cc,A1 00021726 70 0e |p | MOVEQ.L #0x0e,D0 00021728 10 d9 | | MOVE.B (A1)+,(A0)+ 0002172a 51 c8 ff fc |Q | DBF D0,0x21728 0002172e 60 10 |` | BRA 0x21740 00021730 9e c1 | | SUBA.W D1,A7 00021732 20 4f | O | MOVEA.L A7,A0 00021734 43 fa ff a6 |C | LEA.L 0x216dc,A1 00021738 70 0e |p | MOVEQ.L #0x0e,D0 0002173a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002173c 51 c8 ff fc |Q | DBF D0,0x2173a 00021740 59 4f |YO | SUBQ.L #0x4,A7 00021742 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021746 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002174a 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 0002174e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021754 50 4f |PO | ADDQ.L #0x8,A7 00021756 48 52 |HR | PEA.L (A2) 00021758 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 0002175e de fc 00 18 | | ADDA.W #0x18,A7 00021762 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00021766 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002176a 2f 12 |/ | MOVE.L (A2),-(A7) 0002176c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021770 48 53 |HS | PEA.L (A3) 00021772 48 78 00 07 |Hx | PEA.L 0x7 00021776 4e 94 |N | JSR (A4) 00021778 de fc 00 14 | | ADDA.W #0x14,A7 0002177c 2e ae 00 14 |. | MOVE.L (A6+0x14),(A7) 00021780 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 00021784 2f 12 |/ | MOVE.L (A2),-(A7) 00021786 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002178a 48 53 |HS | PEA.L (A3) 0002178c 48 78 00 07 |Hx | PEA.L 0x7 00021790 4e 94 |N | JSR (A4) 00021792 de fc 00 16 | | ADDA.W #0x16,A7 00021796 1e ae 00 18 | | MOVE.B (A6+0x18),(A7) 0002179a 2f 12 |/ | MOVE.L (A2),-(A7) 0002179c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000217a0 48 53 |HS | PEA.L (A3) 000217a2 48 53 |HS | PEA.L (A3) 000217a4 4e 94 |N | JSR (A4) 000217a6 de c1 | | ADDA.W D1,A7 000217a8 1e ae 00 19 | | MOVE.B (A6+0x19),(A7) 000217ac 1f 6e 00 1a 00 01 | n | MOVE.B (A6+0x1a),(A7+0x1) 000217b2 2f 12 |/ | MOVE.L (A2),-(A7) 000217b4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000217b8 48 53 |HS | PEA.L (A3) 000217ba 48 78 00 01 |Hx | PEA.L 0x1 000217be 4e 94 |N | JSR (A4) 000217c0 de c1 | | ADDA.W D1,A7 000217c2 42 17 |B | CLR.B (A7) 000217c4 1f 2e 00 1c | . | MOVE.B (A6+0x1c),-(A7) 000217c8 2f 12 |/ | MOVE.L (A2),-(A7) 000217ca 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000217d0 50 4f |PO | ADDQ.L #0x8,A7 000217d2 48 52 |HR | PEA.L (A2) 000217d4 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000217da 58 4f |XO | ADDQ.L #0x4,A7 000217dc 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 000217e0 4e 5e |N^ | UNLK A6 000217e2 4e 75 |Nu | RTS 000217e4 43 4c 45 41 52 5f 54 41 |CLEAR_TA| .TXT 'CLEAR_TAGSTORE.MEM' 000217f6 43 4c 45 41 52 5f 54 41 |CLEAR_TA| .TXT 'CLEAR_TAGSTORE.M32' 00021808 ; -------------------------------------------------------------------------------------- 00021808 ; OMSI PASCAL Function 00021808 ; <LVAR 0x008 1(r)> 00021808 ; <LVAR -0x006 @ 4(r)> 00021808 ; -------------------------------------------------------------------------------------- 00021808 4e 56 ff cc |NV | LINK.W A6,#0xffcc 0002180c bf d5 | | CMPA.L (A5),A7 0002180e 62 06 |b | BHI 0x21816 00021810 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021814 4e 76 |Nv | TRAPV 00021816 de fc 00 2e | . | ADDA.W #0x2e,A7 0002181a 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 0002181e 43 ee ff fa |C | LEA.L (A6-0x6),A1 00021822 55 4f |UO | SUBQ.L #0x2,A7 00021824 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002182a 4a 1f |J | TST.B (A7)+ 0002182c 67 0e |g | BEQ 0x2183c 0002182e 41 fa ff c6 |A | LEA.L 0x217f6,A0 00021832 70 08 |p | MOVEQ.L #0x08,D0 00021834 3f 20 |? | MOVE.W -(A0),-(A7) 00021836 51 c8 ff fc |Q | DBF D0,0x21834 0002183a 60 0c |` | BRA 0x21848 0002183c 41 fa ff ca |A | LEA.L 0x21808,A0 00021840 70 08 |p | MOVEQ.L #0x08,D0 00021842 3f 20 |? | MOVE.W -(A0),-(A7) 00021844 51 c8 ff fc |Q | DBF D0,0x21842 00021848 59 4f |YO | SUBQ.L #0x4,A7 0002184a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002184e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021852 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00021856 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002185c 50 4f |PO | ADDQ.L #0x8,A7 0002185e 48 51 |HQ | PEA.L (A1) 00021860 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00021866 de fc 00 1a | | ADDA.W #0x1a,A7 0002186a 42 27 |B' | CLR.B -(A7) 0002186c 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00021870 2f 11 |/ | MOVE.L (A1),-(A7) 00021872 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00021878 50 4f |PO | ADDQ.L #0x8,A7 0002187a 48 51 |HQ | PEA.L (A1) 0002187c 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00021882 58 4f |XO | ADDQ.L #0x4,A7 00021884 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00021888 4e 5e |N^ | UNLK A6 0002188a 4e 75 |Nu | RTS 0002188c 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.MEM ' 000218a4 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.M32 ' 000218bc ; -------------------------------------------------------------------------------------- 000218bc ; OMSI PASCAL Function 000218bc ; <LVAR 0x008 1(r)> 000218bc ; <LVAR -0x006 @ 4(r)> 000218bc ; -------------------------------------------------------------------------------------- 000218bc 4e 56 ff be |NV | LINK.W A6,#0xffbe 000218c0 bf d5 | | CMPA.L (A5),A7 000218c2 62 06 |b | BHI 0x218ca 000218c4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000218c8 4e 76 |Nv | TRAPV 000218ca de fc 00 3c | < | ADDA.W #0x3c,A7 000218ce 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000218d2 45 ee ff fa |E | LEA.L (A6-0x6),A2 000218d6 72 18 |r | MOVEQ.L #0x18,D1 000218d8 55 4f |UO | SUBQ.L #0x2,A7 000218da 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000218e0 4a 1f |J | TST.B (A7)+ 000218e2 67 12 |g | BEQ 0x218f6 000218e4 9e c1 | | SUBA.W D1,A7 000218e6 20 4f | O | MOVEA.L A7,A0 000218e8 43 fa ff a2 |C | LEA.L 0x2188c,A1 000218ec 70 16 |p | MOVEQ.L #0x16,D0 000218ee 10 d9 | | MOVE.B (A1)+,(A0)+ 000218f0 51 c8 ff fc |Q | DBF D0,0x218ee 000218f4 60 10 |` | BRA 0x21906 000218f6 9e c1 | | SUBA.W D1,A7 000218f8 20 4f | O | MOVEA.L A7,A0 000218fa 43 fa ff a8 |C | LEA.L 0x218a4,A1 000218fe 70 16 |p | MOVEQ.L #0x16,D0 00021900 10 d9 | | MOVE.B (A1)+,(A0)+ 00021902 51 c8 ff fc |Q | DBF D0,0x21900 00021906 59 4f |YO | SUBQ.L #0x4,A7 00021908 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002190c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021910 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00021914 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002191a 50 4f |PO | ADDQ.L #0x8,A7 0002191c 48 52 |HR | PEA.L (A2) 0002191e 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00021924 de fc 00 20 | | ADDA.W #0x20,A7 00021928 42 27 |B' | CLR.B -(A7) 0002192a 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 0002192e 2f 12 |/ | MOVE.L (A2),-(A7) 00021930 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00021936 50 4f |PO | ADDQ.L #0x8,A7 00021938 48 52 |HR | PEA.L (A2) 0002193a 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00021940 58 4f |XO | ADDQ.L #0x4,A7 00021942 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00021946 4e 5e |N^ | UNLK A6 00021948 4e 75 |Nu | RTS 0002194a 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.MEM' 00021958 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.M32' 00021966 ; -------------------------------------------------------------------------------------- 00021966 ; OMSI PASCAL Function 00021966 ; <LVAR 0x008 1(r)> 00021966 ; <LVAR -0x006 @ 4(r)> 00021966 ; -------------------------------------------------------------------------------------- 00021966 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 0002196a bf d5 | | CMPA.L (A5),A7 0002196c 62 06 |b | BHI 0x21974 0002196e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021972 4e 76 |Nv | TRAPV 00021974 de fc 00 2a | * | ADDA.W #0x2a,A7 00021978 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 0002197c 43 ee ff fa |C | LEA.L (A6-0x6),A1 00021980 55 4f |UO | SUBQ.L #0x2,A7 00021982 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00021988 4a 1f |J | TST.B (A7)+ 0002198a 67 0e |g | BEQ 0x2199a 0002198c 41 fa ff ca |A | LEA.L 0x21958,A0 00021990 70 06 |p | MOVEQ.L #0x06,D0 00021992 3f 20 |? | MOVE.W -(A0),-(A7) 00021994 51 c8 ff fc |Q | DBF D0,0x21992 00021998 60 0c |` | BRA 0x219a6 0002199a 41 fa ff ca |A | LEA.L 0x21966,A0 0002199e 70 06 |p | MOVEQ.L #0x06,D0 000219a0 3f 20 |? | MOVE.W -(A0),-(A7) 000219a2 51 c8 ff fc |Q | DBF D0,0x219a0 000219a6 59 4f |YO | SUBQ.L #0x4,A7 000219a8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000219ac 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000219b0 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 000219b4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000219ba 50 4f |PO | ADDQ.L #0x8,A7 000219bc 48 51 |HQ | PEA.L (A1) 000219be 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000219c4 de fc 00 16 | | ADDA.W #0x16,A7 000219c8 42 27 |B' | CLR.B -(A7) 000219ca 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 000219ce 2f 11 |/ | MOVE.L (A1),-(A7) 000219d0 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000219d6 50 4f |PO | ADDQ.L #0x8,A7 000219d8 48 51 |HQ | PEA.L (A1) 000219da 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000219e0 58 4f |XO | ADDQ.L #0x4,A7 000219e2 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 000219e6 4e 5e |N^ | UNLK A6 000219e8 4e 75 |Nu | RTS 000219ea exp_RESET.IOC(): 000219ea 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000219f0 00 08 | | .CONST 0x0008 ; Stack-delta 000219f2 09 52 45 53 45 54 2e 49 | RESET.I| .TXT 9,'RESET.IOC' 000219fc 00 | | .CONST 0x0 000219fd 04 | | .CONST 0x4 ; DIPROC address 000219fe 00 | | .CONST 0x0 ; Output Parameters 000219ff 00 | | .CONST 0x0 ; Input Parameters 00021a00 exp_RUN_CHECK.IOC(): 00021a00 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021a06 00 08 | | .CONST 0x0008 ; Stack-delta 00021a08 0d 52 55 4e 5f 43 48 45 | RUN_CHE| .TXT 13,'RUN_CHECK.IOC' 00021a16 00 | | .CONST 0x0 00021a17 04 | | .CONST 0x4 ; DIPROC address 00021a18 00 | | .CONST 0x0 ; Output Parameters 00021a19 00 | | .CONST 0x0 ; Input Parameters 00021a1a exp_PREP_RUN.IOC(Sw_2): 00021a1a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021a20 00 0a | | .CONST 0x000a ; Stack-delta 00021a22 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.IOC' 00021a2f 00 | | .CONST 0x0 00021a30 04 | | .CONST 0x4 ; DIPROC address 00021a31 00 | | .CONST 0x0 ; Output Parameters 00021a32 01 | | .CONST 0x1 ; Input Parameters 00021a33 01 | | .CONST 0x1 ; In arg [2] 00021a34 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 00021a42 ; -------------------------------------------------------------------------------------- 00021a42 ; OMSI PASCAL Function 00021a42 ; <LVAR 0x008 1(r)> 00021a42 ; -------------------------------------------------------------------------------------- 00021a42 PROG_FAIL: 00021a42 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00021a46 bf d5 | | CMPA.L (A5),A7 00021a48 62 06 |b | BHI 0x21a50 00021a4a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021a4e 4e 76 |Nv | TRAPV 00021a50 de fc 00 2c | , | ADDA.W #0x2c,A7 00021a54 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00021a58 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 00021a5c 70 06 |p | MOVEQ.L #0x06,D0 00021a5e 3f 20 |? | MOVE.W -(A0),-(A7) 00021a60 51 c8 ff fc |Q | DBF D0,0x21a5e 00021a64 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00021a68 51 4f |QO | SUBQ.L #0x8,A7 00021a6a 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00021a6e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021a72 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00021a76 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021a7c 58 4f |XO | ADDQ.L #0x4,A7 00021a7e 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00021a82 48 80 |H | EXTB.W D0 00021a84 48 c0 |H | EXTW.L D0 00021a86 2f 00 |/ | MOVE.L D0,-(A7) 00021a88 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021a8e 58 4f |XO | ADDQ.L #0x4,A7 00021a90 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021a96 50 4f |PO | ADDQ.L #0x8,A7 00021a98 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021a9e de fc 00 14 | | ADDA.W #0x14,A7 00021aa2 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00021aa6 4e 5e |N^ | UNLK A6 00021aa8 4e 75 |Nu | RTS 00021aaa 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 00021ab8 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00021ac6 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00021ad4 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00021ae6 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 00021afe ; -------------------------------------------------------------------------------------- 00021afe ; OMSI PASCAL Function 00021afe ; <LVAR 0x00e 1(r)> 00021afe ; <LVAR 0x00a 4(r)> 00021afe ; <LVAR 0x008 1(r)> 00021afe ; -------------------------------------------------------------------------------------- 00021afe EXP_FAIL: 00021afe 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 00021b02 bf d5 | | CMPA.L (A5),A7 00021b04 62 06 |b | BHI 0x21b0c 00021b06 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021b0a 4e 76 |Nv | TRAPV 00021b0c de fc 00 74 | t | ADDA.W #0x74,A7 00021b10 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00021b14 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00021b1a 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 00021b20 72 01 |r | MOVEQ.L #0x01,D1 00021b22 74 0d |t | MOVEQ.L #0x0d,D2 00021b24 76 1e |v | MOVEQ.L #0x1e,D3 00021b26 78 12 |x | MOVEQ.L #0x12,D4 00021b28 7a 0e |z | MOVEQ.L #0x0e,D5 00021b2a 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00021b30 41 fa ff b4 |A | LEA.L 0x21ae6,A0 00021b34 70 08 |p | MOVEQ.L #0x08,D0 00021b36 3f 20 |? | MOVE.W -(A0),-(A7) 00021b38 51 c8 ff fc |Q | DBF D0,0x21b36 00021b3c 59 4f |YO | SUBQ.L #0x4,A7 00021b3e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021b42 3f 01 |? | MOVE.W D1,-(A7) 00021b44 3f 04 |? | MOVE.W D4,-(A7) 00021b46 4e 93 |N | JSR (A3) 00021b48 50 4f |PO | ADDQ.L #0x8,A7 00021b4a 4e 94 |N | JSR (A4) 00021b4c 50 4f |PO | ADDQ.L #0x8,A7 00021b4e 20 4f | O | MOVEA.L A7,A0 00021b50 43 fa ff 58 |C X | LEA.L 0x21aaa,A1 00021b54 70 0c |p | MOVEQ.L #0x0c,D0 00021b56 10 d9 | | MOVE.B (A1)+,(A0)+ 00021b58 51 c8 ff fc |Q | DBF D0,0x21b56 00021b5c 51 4f |QO | SUBQ.L #0x8,A7 00021b5e 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021b62 3f 01 |? | MOVE.W D1,-(A7) 00021b64 3f 02 |? | MOVE.W D2,-(A7) 00021b66 4e 93 |N | JSR (A3) 00021b68 54 4f |TO | ADDQ.L #0x2,A7 00021b6a 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00021b6e 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00021b74 54 4f |TO | ADDQ.L #0x2,A7 00021b76 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021b7c 50 4f |PO | ADDQ.L #0x8,A7 00021b7e 4e 94 |N | JSR (A4) 00021b80 de c4 | | ADDA.W D4,A7 00021b82 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00021b86 b0 c1 | | CMPA.W D1,A0 00021b88 67 48 |gH | BEQ 0x21bd2 00021b8a 9e c5 | | SUBA.W D5,A7 00021b8c 22 4f |"O | MOVEA.L A7,A1 00021b8e 45 fa ff 28 |E ( | LEA.L 0x21ab8,A2 00021b92 70 0c |p | MOVEQ.L #0x0c,D0 00021b94 12 da | | MOVE.B (A2)+,(A1)+ 00021b96 51 c8 ff fc |Q | DBF D0,0x21b94 00021b9a 9e c3 | | SUBA.W D3,A7 00021b9c 22 4f |"O | MOVEA.L A7,A1 00021b9e 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00021ba2 70 1d |p | MOVEQ.L #0x1d,D0 00021ba4 12 d8 | | MOVE.B (A0)+,(A1)+ 00021ba6 51 c8 ff fc |Q | DBF D0,0x21ba4 00021baa 51 4f |QO | SUBQ.L #0x8,A7 00021bac 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00021bb0 3f 01 |? | MOVE.W D1,-(A7) 00021bb2 3f 02 |? | MOVE.W D2,-(A7) 00021bb4 4e 93 |N | JSR (A3) 00021bb6 58 4f |XO | ADDQ.L #0x4,A7 00021bb8 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021bbc 3f 01 |? | MOVE.W D1,-(A7) 00021bbe 3f 03 |? | MOVE.W D3,-(A7) 00021bc0 4e 93 |N | JSR (A3) 00021bc2 50 4f |PO | ADDQ.L #0x8,A7 00021bc4 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021bca 50 4f |PO | ADDQ.L #0x8,A7 00021bcc 4e 94 |N | JSR (A4) 00021bce de fc 00 30 | 0 | ADDA.W #0x30,A7 00021bd2 9e c5 | | SUBA.W D5,A7 00021bd4 20 4f | O | MOVEA.L A7,A0 00021bd6 43 fa fe ee |C | LEA.L 0x21ac6,A1 00021bda 70 0c |p | MOVEQ.L #0x0c,D0 00021bdc 10 d9 | | MOVE.B (A1)+,(A0)+ 00021bde 51 c8 ff fc |Q | DBF D0,0x21bdc 00021be2 51 4f |QO | SUBQ.L #0x8,A7 00021be4 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021be8 3f 01 |? | MOVE.W D1,-(A7) 00021bea 3f 02 |? | MOVE.W D2,-(A7) 00021bec 4e 93 |N | JSR (A3) 00021bee 54 4f |TO | ADDQ.L #0x2,A7 00021bf0 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00021bf4 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00021bfa 54 4f |TO | ADDQ.L #0x2,A7 00021bfc 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021c02 50 4f |PO | ADDQ.L #0x8,A7 00021c04 4e 94 |N | JSR (A4) 00021c06 5d 4f |]O | SUBQ.L #0x6,A7 00021c08 20 4f | O | MOVEA.L A7,A0 00021c0a 43 fa fe da |C | LEA.L 0x21ae6,A1 00021c0e 70 16 |p | MOVEQ.L #0x16,D0 00021c10 10 d9 | | MOVE.B (A1)+,(A0)+ 00021c12 51 c8 ff fc |Q | DBF D0,0x21c10 00021c16 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00021c1a 59 4f |YO | SUBQ.L #0x4,A7 00021c1c 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021c20 3f 01 |? | MOVE.W D1,-(A7) 00021c22 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00021c26 4e 93 |N | JSR (A3) 00021c28 50 4f |PO | ADDQ.L #0x8,A7 00021c2a 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021c30 de c3 | | ADDA.W D3,A7 00021c32 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00021c36 4e 5e |N^ | UNLK A6 00021c38 4e 75 |Nu | RTS