|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 7168 (0x1c00)
Types: M200
Notes: @(#)P3UCODE,2.0,89/10/03,17:18:19, M200_PROGRAM
Names: »P3UCODE.M200«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »P3UCODE.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »P3UCODE.M200«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »P3UCODE.M200«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »P3UCODE.M200«
└─ ⟦this⟧ »P3UCODE.M200«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »P3UCODE.M200«
@ 2047c
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 2047c-205b8 Body>
<POP 2047c-20492 Prologue> Σ0 ↓
<POP 20492-204a8 RegCacheLoad> Σ0 ↓
<POP 204a8-20508 Naked> Σ0 ↓ →0x20550
<Call 0x204a8 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x204ae [18] @> Δ-18 {[«18""»]}
<POP 204ba-204bc StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x204bc 18> {[«18""»]|[$$Experiment error :]}
<Call 0x204c8 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 204ca-204cb StackAdj> Δ+22 ↓ {}
<Blob 0x204cb [14] @> Δ-14 {[«14""»]}
<POP 204da-204dc StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x204dc 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 204e6-204e8 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 204e8 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x204ec 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 204f2-204f4 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x204f4 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 204fa-204fc StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x204fc 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 204fe-20500 StackAdj> Δ+18 {}
<MI 20500 MOVEA.L (A6+0xa),A0> {}
<MI 20504 CMPA.W #0x01,A0> {}
<MI 20506 BEQ 0x20550> {}
<POP 20508-20550 Naked> Σ0 ↓
<Blob 0x20508 [14] @> Δ-14 {[«14""»]}
<Blob 0x20518 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 20528-2052a StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x2052a 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 20534-20536 StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x20536> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x20536 12> Δ-4
<Const 0x2053a 0x1.2> Δ-2
<Const 0x2053c 0x1e.2> Δ-2
<Call 0x2053e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20540-20542 StackAdj> Δ+8
<Call 0x20542 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 20548-2054a StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x2054a 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2054c-20550 StackAdj> Δ+48 {}
<POP 20550-205b0 Naked> Σ0 ↓ ←0x204a8
<Blob 0x20550 [14] @> Δ-14 {[«14""»]}
<POP 20560-20562 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x20562 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 2056c-2056e StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 2056e MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x20572 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 20578-2057a StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x2057a 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 20580-20582 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x20582 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 20584-20585 StackAdj> Δ+18 ↓ {}
<Blob 0x20585 [24] @> Δ-24 {[«24""»]}
<Const 0x20594 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 20598-2059a StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x2059a 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x205a8 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 205ae-205b0 StackAdj> Δ+30 {}
<POP 205b0-205b8 Epilogue> Σ0
@ 205b8
<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 205b8-20680 Body> Δ+10
<POP 205b8-205ce Prologue> Σ0 ↓
<POP 205ce-205d6 RegCacheLoad> Σ0 ↓
<POP 205d6-205f6 Naked> Σ0 ↓ →0x20604
<Call 0x205d6 0x10538> {}
IPC_Init(void)
<MI 205dc MOVE.L (A6+0x12),-(A7)> Δ-4 {[4, '(A6+0x12)']}
<Call 0x205e0 0x10508> {[4, '(A6+0x12)']}
IPC_PutString(a : String)
<POP 205e6-205e8 StackAdj> Δ+2 {[-2-]}
<MI 205e8 MOVE.B (A6+0x10),(A7)> {[-2-]}
<Call 0x205ec 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 205ee-205f0 StackAdj> Δ+2 {}
<MI 205f0 TST.B (A6+0x16)> {}
<MI 205f4 BNE 0x20604> {}
<POP 205f6-20604 Naked> Σ0 ↓
<MI 205f6 MOVE.B (A6+0xe),-(A7)> Δ-2 {[2, '(A6+0xe)']}
<Call 0x205fa 0x10502> {[2, '(A6+0xe)']}
IPC_PutBool(a : Bool)
<MI 205fc MOVE.B (A6+0xc),(A7)> {[-2-]}
<Call 0x20600 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 20602-20604 StackAdj> Δ+2 {}
<POP 20604-20610 Naked> Σ0 ↓ →0x20622 ←0x205d6
<Call 0x20604 0x10514> {}
IPC_PutEnd(void)
<MI 2060a TST.B (A6+0x16)> {}
<MI 2060e BEQ 0x20622> {}
<POP 20610-20622 Naked> Σ0 Δ-10 →0x20632
<Blob 0x20610 [10] @> Δ-10 {[«10""»]}
<MI 20620 BRA 0x20632> {[«10""»]}
<POP 20622-20632 Naked> Σ0 Δ-10 ↓ ←0x20604
<Blob 0x20622 [10] @> Δ-10 {[«10""»]}
<POP 20632-20678 Naked> Σ-10 Δ+10 ↓ ←0x20610
<POP 20632-20634 StackAdj> Δ-4 {[-14-]}
<Lit 0x20634> {[-10-]|[$$…]}
<Pointer.sp 0x20634 4> Δ-4
<Const 0x20638 0x1.2> Δ-2
<Const 0x2063c 0x9.2> Δ-2
<Call 0x20640 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20646-20648 StackAdj> Δ+8
<Const 0x20648 0x1.4> Δ-4 {[-10-]|[$$…]|[##1]}
<Const 0x2064c 0x2.2> Δ-2 {[-10-]|[$$…]|[##1]|[#2]}
<Pointer.fp 0x20650 <LVAR -0x004 @>> Δ-4 {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
<Call 0x20654 0x103b0> {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 2065a-2065e StackAdj> Δ+24 {}
<Call 0x2065e 0x10538> {}
IPC_Init(void)
<MI 20664 MOVEA.L (A6+0x8),A0> {}
<MI 20668 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x2066a 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20670-20672 StackAdj> Δ+4 {}
<Call 0x20672 0x1051a> {}
IPC_GetEnd(void)
<POP 20678-20680 Epilogue> Σ0
@ 20680
<LVAR 0x00c 1(r)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @>
<POP 20680-2070e Body>
<POP 20680-20696 Prologue> Σ0 ↓
<POP 20696-20706 Naked> Σ0 ↓
<Call 0x20696 0x10538> {}
IPC_Init(void)
<MI 2069c MOVE.B (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<Call 0x206a0 0x10502> {[2, '(A6+0xc)']}
IPC_PutBool(a : Bool)
<POP 206a6-206a8 StackAdj> Δ+2 {}
<Call 0x206a8 0x10514> {}
IPC_PutEnd(void)
<Blob 0x206ae [10] @> Δ-10 {[«10""»]}
<POP 206c0-206c2 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x206c2 9> {[«10""»]|[$$INITSTATE]}
<Const 0x206d6 0x1.4> Δ-4 {[«10""»]|[$$INITSTATE]|[##1]}
<Const 0x206da 0x2.2> Δ-2 {[«10""»]|[$$INITSTATE]|[##1]|[#2]}
<Pointer.fp 0x206de <LVAR -0x002 @>> Δ-4 {[«10""»]|[$$INITSTATE]|[##1]|[#2]|[@@-2]}
<Call 0x206e2 0x103b0> {[«10""»]|[$$INITSTATE]|[##1]|[#2]|[@@-2]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 206e8-206ec StackAdj> Δ+24 {}
<Call 0x206ec 0x10538> {}
IPC_Init(void)
<MI 206f2 MOVEA.L (A6+0x8),A0> {}
<MI 206f6 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x206f8 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 206fe-20700 StackAdj> Δ+4 {}
<Call 0x20700 0x1051a> {}
IPC_GetEnd(void)
<POP 20706-2070e Epilogue> Σ0
@ 2070e
<LVAR 0x008 4(r)>
<POP 2070e-20746 Body>
<POP 2070e-20724 Prologue> Σ0 ↓
<POP 20724-2073e Naked> Σ0 ↓
<Call 0x20724 0x10538> {}
IPC_Init(void)
<MI 2072a MOVEA.L (A6+0x8),A0> {}
<MI 2072e PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20730 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20736-20738 StackAdj> Δ+4 {}
<Call 0x20738 0x1051a> {}
IPC_GetEnd(void)
<POP 2073e-20746 Epilogue> Σ0
@ 20746
<LVAR 0x008 1(r)>
<POP 20746-20782 Body>
<POP 20746-20758 Prologue> Σ0 ↓
<POP 20758-2077e Naked> Σ0 ↓
<Call 0x20758 0x10538> {}
IPC_Init(void)
<MI 2075e MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x20762 0x10502> {[2, '(A6+0x8)']}
IPC_PutBool(a : Bool)
<POP 20768-2076a StackAdj> Δ+2 {}
<Call 0x2076a 0x10514> {}
IPC_PutEnd(void)
<MI 20770 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x20772 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x20776 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 2077c-2077e StackAdj> Δ+6 {}
<POP 2077e-20782 Epilogue> Σ0
@ 20782
<LVAR -0x004 1(rw)>
<POP 20782-20862 Body>
<POP 20782-20798 Prologue> Σ0 ↓
<POP 20798-207a0 RegCacheLoad> Σ0 ↓
<POP 207a0-207ac Naked> Σ0 ↓ →0x207b4
<POP 207a0-207a2 StackAdj> Δ-2 {[-2-]}
<Call 0x207a2 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 207a8 TST.B (A7)+> Δ+2 {}
<MI 207aa BEQ 0x207b4> {}
<POP 207ac-207b4 Naked> Σ0 →0x207ba
<Call 0x207ac 0x2114c> {}
exp_LOAD_HRAM_8_0.FIU()
<MI 207b2 BRA 0x207ba> {}
<POP 207b4-207ba Naked> Σ0 ↓ ←0x207a0
<Call 0x207b4 0x2116a> {}
exp_LOAD_HRAM_32_0.FIU()
<POP 207ba-207d0 Naked> Σ0 ↓ ←0x207ac
<Call 0x207ba 0x211fa> {}
exp_LOAD_HRAM_1.FIU()
<Call 0x207c0 0x21438> {}
exp_ALIGN_CSA.VAL()
<Call 0x207c6 0x213b6> {}
exp_ALIGN_CSA.TYP()
<MI 207cc CLR.B (A6-0x4)> {}
<MI 207ce MOVEQ.L #0x0c,D7> {}
<POP 207d0-207e0 Naked> Σ0 ↓ →0x207ec ←0x207ec
<POP 207d0-207d2 StackAdj> Δ-2 {[-2-]}
<MI 207d2 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x207d4 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 207da-207dc StackAdj> Δ+2 {[-2-]}
<MI 207dc TST.B (A7)+> Δ+2 {}
<MI 207de BEQ 0x207ec> {}
<POP 207e0-207ec Naked> Σ0 ↓
<MI 207e0 CLR.L D0> {}
<MI 207e2 MOVE.B (A6-0x4),D0> {}
<MI 207e4 ADDQ.W #0x1,D0> {}
<POP 0x207e6 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 207ea MOVE.B D0,(A6-0x4)> {}
<POP 207ec-207f2 Naked> Σ0 ↓ →0x207d0 ←0x207d0
<MI 207ec ADDQ.B #0x1,D7> {}
<MI 207ee CMP.B #0x0f,D7> {}
<MI 207f0 BLE 0x207d0> {}
<POP 207f2-207f4 Naked> Σ0 ↓
<MI 207f2 MOVEQ.L #0x0c,D7> {}
<POP 207f4-20804 Naked> Σ0 ↓ →0x2083e ←0x2083e
<POP 207f4-207f6 StackAdj> Δ-2 {[-2-]}
<MI 207f6 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x207f8 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 207fe-20800 StackAdj> Δ+2 {[-2-]}
<MI 20800 TST.B (A7)+> Δ+2 {}
<MI 20802 BEQ 0x2083e> {}
<POP 20804-2083e Naked> Σ0 ↓
<MI 20804 MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<POP 20806-20808 StackAdj> Δ-2 {[2, 'D7']|[-2-]}
<MI 20808 MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']|[-2-]|[2, 'D7']}
<Call 0x2080a 0x104c6> {[2, 'D7']|[-2-]|[2, 'D7']}
EQ_1c218(a : Byte) : Bool
<POP 20810-20812 StackAdj> Δ+2 {[2, 'D7']|[-2-]}
<MI 20812 MOVE.B (A7),D0> {[2, 'D7']|[-2-]}
<MI 20814 EXTB.W D0> {[2, 'D7']|[-2-]}
<POP 0x20816 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']|[-2-]}
<MI 20818 MOVE.B D0,(A7)> {[2, 'D7']|[-2-]}
<POP 2081a-2081c StackAdj> Δ-2 {[2, 'D7']|[-4-]}
<Call 0x2081c 0x104cc> {[2, 'D7']|[-4-]}
MemOnly2MB() : Bool
<MI 20822 MOVE.B (A7),D0> {[2, 'D7']|[-4-]}
<MI 20824 EXTB.W D0> {[2, 'D7']|[-4-]}
<POP 0x20826 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']|[-4-]}
<MI 20828 MOVE.B D0,(A7)> {[2, 'D7']|[-4-]}
<MI 2082a MOVE.B (A6-0x4),-(A7)> Δ-2 {[2, 'D7']|[-4-]|[2, '(A6-0x4)']}
<Call 0x2082c 0x21680> {[2, 'D7']|[-4-]|[2, '(A6-0x4)']}
<POP 20832-20834 StackAdj> Δ+6 {[2, 'D7']}
<MI 20834 MOVE.B D7,(A7)> {[-2-]}
<Call 0x20836 0x21768> {[-2-]}
<POP 2083c-2083e StackAdj> Δ+2 {}
<POP 2083e-20844 Naked> Σ0 ↓ →0x207f4 ←0x207f4
<MI 2083e ADDQ.B #0x1,D7> {}
<MI 20840 CMP.B #0x0f,D7> {}
<MI 20842 BLE 0x207f4> {}
<POP 20844-2085a Naked> Σ0 ↓
<Call 0x20844 0x105b0> {}
FifoInit(void)
<Const 0x2084a 0xffff.2> Δ-2 {[#65535]}
<Const 0x2084e 0xffff.2> Δ-2 {[#65535]|[#65535]}
<Call 0x20852 0x211d6> {[#65535]|[#65535]}
exp_LOAD_REFRESH_REGS.FIU(Sw_2, Sw_2)
<POP 20858-2085a StackAdj> Δ+4 {}
<POP 2085a-20862 Epilogue> Σ0
@ 20862
<LVAR 0x008 2(r)>
<LVAR -0x002 1(rw)>
<POP 20862-209dc Body>
<POP 20862-20878 Prologue> Σ0 ↓
<POP 20878-2089a RegCacheLoad> Σ0 ↓
<POP 2089a-208ac Naked> Σ0 ↓ →0x208b0
<Call 0x2089a 0x21394> {}
exp_LOAD_BENIGN_UWORD.TYP()
<POP 208a0-208a2 StackAdj> Δ-2 {[-2-]}
<Call 0x208a2 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 208a8 TST.B (A7)+> Δ+2 {}
<MI 208aa BEQ 0x208b0> {}
<POP 208ac-208b0 Naked> Σ0 →0x208b4
<MI 208ac CLR.B (A6-0x2)> {}
<MI 208ae BRA 0x208b4> {}
<POP 208b0-208b4 Naked> Σ0 ↓ ←0x2089a
<MI 208b0 MOVE.B #0xff,(A6-0x2)> {}
<POP 208b4-208c0 Naked> Σ0 ↓ →0x208c8 ←0x208ac
<POP 208b4-208b6 StackAdj> Δ-2 {[-2-]}
<Const 0x208b6 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x208b8 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 208ba-208bc StackAdj> Δ+2 {[-2-]}
<MI 208bc TST.B (A7)+> Δ+2 {}
<MI 208be BEQ 0x208c8> {}
<POP 208c0-208c8 Naked> Σ0 ↓
<Const 0x208c0 0xc.2> Δ-2 {[#12]}
<MI 208c2 MOVE.B (A6-0x2),-(A7)> Δ-2 {[#12]|[2, '(A6-0x2)']}
<Call 0x208c4 0x2146a> {[#12]|[2, '(A6-0x2)']}
<POP 208c6-208c8 StackAdj> Δ+4 {}
<POP 208c8-208d4 Naked> Σ0 ↓ →0x208dc ←0x208b4
<POP 208c8-208ca StackAdj> Δ-2 {[-2-]}
<Const 0x208ca 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x208cc 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 208ce-208d0 StackAdj> Δ+2 {[-2-]}
<MI 208d0 TST.B (A7)+> Δ+2 {}
<MI 208d2 BEQ 0x208dc> {}
<POP 208d4-208dc Naked> Σ0 ↓
<Const 0x208d4 0xd.2> Δ-2 {[#13]}
<MI 208d6 MOVE.B (A6-0x2),-(A7)> Δ-2 {[#13]|[2, '(A6-0x2)']}
<Call 0x208d8 0x2146a> {[#13]|[2, '(A6-0x2)']}
<POP 208da-208dc StackAdj> Δ+4 {}
<POP 208dc-208e8 Naked> Σ0 ↓ →0x208f0 ←0x208c8
<POP 208dc-208de StackAdj> Δ-2 {[-2-]}
<Const 0x208de 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x208e0 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 208e2-208e4 StackAdj> Δ+2 {[-2-]}
<MI 208e4 TST.B (A7)+> Δ+2 {}
<MI 208e6 BEQ 0x208f0> {}
<POP 208e8-208f0 Naked> Σ0 ↓
<Const 0x208e8 0xe.2> Δ-2 {[#14]}
<MI 208ea MOVE.B (A6-0x2),-(A7)> Δ-2 {[#14]|[2, '(A6-0x2)']}
<Call 0x208ec 0x2146a> {[#14]|[2, '(A6-0x2)']}
<POP 208ee-208f0 StackAdj> Δ+4 {}
<POP 208f0-208fc Naked> Σ0 ↓ →0x20904 ←0x208dc
<POP 208f0-208f2 StackAdj> Δ-2 {[-2-]}
<Const 0x208f2 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x208f4 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 208f6-208f8 StackAdj> Δ+2 {[-2-]}
<MI 208f8 TST.B (A7)+> Δ+2 {}
<MI 208fa BEQ 0x20904> {}
<POP 208fc-20904 Naked> Σ0 ↓
<Const 0x208fc 0xf.2> Δ-2 {[#15]}
<MI 208fe MOVE.B (A6-0x2),-(A7)> Δ-2 {[#15]|[2, '(A6-0x2)']}
<Call 0x20900 0x2146a> {[#15]|[2, '(A6-0x2)']}
<POP 20902-20904 StackAdj> Δ+4 {}
<POP 20904-20916 Naked> Σ0 ↓ →0x2091c ←0x208f0
<Call 0x20904 0x21216> {}
exp_INIT_MRU.FIU()
<POP 2090a-2090c StackAdj> Δ-2 {[-2-]}
<Const 0x2090c 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x2090e 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20910-20912 StackAdj> Δ+2 {[-2-]}
<MI 20912 TST.B (A7)+> Δ+2 {}
<MI 20914 BEQ 0x2091c> {}
<POP 20916-2091c Naked> Σ0 ↓
<Const 0x20916 0xc.2> Δ-2 {[#12]}
<Call 0x20918 0x218c6> {[#12]}
<POP 2091a-2091c StackAdj> Δ+2 {}
<POP 2091c-20928 Naked> Σ0 ↓ →0x2092e ←0x20904
<POP 2091c-2091e StackAdj> Δ-2 {[-2-]}
<Const 0x2091e 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x20920 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20922-20924 StackAdj> Δ+2 {[-2-]}
<MI 20924 TST.B (A7)+> Δ+2 {}
<MI 20926 BEQ 0x2092e> {}
<POP 20928-2092e Naked> Σ0 ↓
<Const 0x20928 0xd.2> Δ-2 {[#13]}
<Call 0x2092a 0x218c6> {[#13]}
<POP 2092c-2092e StackAdj> Δ+2 {}
<POP 2092e-2093a Naked> Σ0 ↓ →0x20940 ←0x2091c
<POP 2092e-20930 StackAdj> Δ-2 {[-2-]}
<Const 0x20930 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x20932 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20934-20936 StackAdj> Δ+2 {[-2-]}
<MI 20936 TST.B (A7)+> Δ+2 {}
<MI 20938 BEQ 0x20940> {}
<POP 2093a-20940 Naked> Σ0 ↓
<Const 0x2093a 0xe.2> Δ-2 {[#14]}
<Call 0x2093c 0x218c6> {[#14]}
<POP 2093e-20940 StackAdj> Δ+2 {}
<POP 20940-2094c Naked> Σ0 ↓ →0x20952 ←0x2092e
<POP 20940-20942 StackAdj> Δ-2 {[-2-]}
<Const 0x20942 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x20944 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20946-20948 StackAdj> Δ+2 {[-2-]}
<MI 20948 TST.B (A7)+> Δ+2 {}
<MI 2094a BEQ 0x20952> {}
<POP 2094c-20952 Naked> Σ0 ↓
<Const 0x2094c 0xf.2> Δ-2 {[#15]}
<Call 0x2094e 0x218c6> {[#15]}
<POP 20950-20952 StackAdj> Δ+2 {}
<POP 20952-20988 Naked> Σ0 ↓ →0x20992 ←0x20940
<MI 20952 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x20954 0x21340> {[2, '(A6+0x8)']}
exp_PREP_RUN.TYP(Sw_2)
<MI 2095a MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']}
<Call 0x2095c 0x21402> {[2, '(A6+0x8)']}
exp_PREP_RUN.VAL(Sw_2)
<POP 20962-20964 StackAdj> Δ+2 {}
<MI 20964 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x20966 0x21998> {[2, '(A6+0x8)']}
exp_PREP_RUN.IOC(Sw_2)
<POP 2096c-2096e StackAdj> Δ+2 {}
<MI 2096e MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x20970 0x2127e> {[2, '(A6+0x8)']}
exp_PREP_RUN.SEQ(Sw_2)
<MI 20976 MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']}
<Call 0x20978 0x211bc> {[2, '(A6+0x8)']}
exp_PREP_RUN.FIU(Sw_2)
<Const 0x2097e 0xc.2> Δ-2 {[2, '(A6+0x8)']|[#12]}
<Call 0x20980 0x104c0> {[2, '(A6+0x8)']|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20982-20984 StackAdj> Δ+2 {[2, '(A6+0x8)']}
<MI 20984 TST.B (A7)+> Δ+2 {}
<MI 20986 BEQ 0x20992> {}
<POP 20988-20992 Naked> Σ0 ↓
<Const 0x20988 0xc.2> Δ-2 {[#12]}
<Call 0x2098a 0x2181c> {[#12]}
<POP 20990-20992 StackAdj> Δ+2 {}
<POP 20992-2099e Naked> Σ0 ↓ →0x209a8 ←0x20952
<POP 20992-20994 StackAdj> Δ-2 {[-2-]}
<Const 0x20994 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x20996 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20998-2099a StackAdj> Δ+2 {[-2-]}
<MI 2099a TST.B (A7)+> Δ+2 {}
<MI 2099c BEQ 0x209a8> {}
<POP 2099e-209a8 Naked> Σ0 ↓
<Const 0x2099e 0xd.2> Δ-2 {[#13]}
<Call 0x209a0 0x2181c> {[#13]}
<POP 209a6-209a8 StackAdj> Δ+2 {}
<POP 209a8-209b4 Naked> Σ0 ↓ →0x209be ←0x20992
<POP 209a8-209aa StackAdj> Δ-2 {[-2-]}
<Const 0x209aa 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x209ac 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 209ae-209b0 StackAdj> Δ+2 {[-2-]}
<MI 209b0 TST.B (A7)+> Δ+2 {}
<MI 209b2 BEQ 0x209be> {}
<POP 209b4-209be Naked> Σ0 ↓
<Const 0x209b4 0xe.2> Δ-2 {[#14]}
<Call 0x209b6 0x2181c> {[#14]}
<POP 209bc-209be StackAdj> Δ+2 {}
<POP 209be-209ca Naked> Σ0 ↓ →0x209d4 ←0x209a8
<POP 209be-209c0 StackAdj> Δ-2 {[-2-]}
<Const 0x209c0 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x209c2 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 209c4-209c6 StackAdj> Δ+2 {[-2-]}
<MI 209c6 TST.B (A7)+> Δ+2 {}
<MI 209c8 BEQ 0x209d4> {}
<POP 209ca-209d4 Naked> Σ0 ↓
<Const 0x209ca 0xf.2> Δ-2 {[#15]}
<Call 0x209cc 0x2181c> {[#15]}
<POP 209d2-209d4 StackAdj> Δ+2 {}
<POP 209d4-209dc Epilogue> Σ0 ←0x209be
@ 209dc
<POP 209dc-20a7a Body>
<POP 209dc-209f2 Prologue> Σ0 ↓
<POP 209f2-20a06 RegCacheLoad> Σ0 ↓
<POP 20a06-20a30 Naked> Σ0 ↓ →0x20a36
<Call 0x20a06 0x21230> {}
exp_FREEZE_WORLD.FIU()
<Call 0x20a0c 0x212f0> {}
exp_RUN_NORMAL.TYP()
<Call 0x20a12 0x213d0> {}
exp_RUN_NORMAL.VAL()
<Call 0x20a18 0x21264> {}
exp_RUN_CHECK.SEQ()
<Call 0x20a1e 0x2197e> {}
exp_RUN_CHECK.IOC()
<POP 20a24-20a26 StackAdj> Δ-2 {[-2-]}
<Const 0x20a26 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x20a28 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20a2a-20a2c StackAdj> Δ+2 {[-2-]}
<MI 20a2c TST.B (A7)+> Δ+2 {}
<MI 20a2e BEQ 0x20a36> {}
<POP 20a30-20a36 Naked> Σ0 ↓
<Const 0x20a30 0xc.2> Δ-2 {[#12]}
<Call 0x20a32 0x215d2> {[#12]}
<POP 20a34-20a36 StackAdj> Δ+2 {}
<POP 20a36-20a42 Naked> Σ0 ↓ →0x20a48 ←0x20a06
<POP 20a36-20a38 StackAdj> Δ-2 {[-2-]}
<Const 0x20a38 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x20a3a 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20a3c-20a3e StackAdj> Δ+2 {[-2-]}
<MI 20a3e TST.B (A7)+> Δ+2 {}
<MI 20a40 BEQ 0x20a48> {}
<POP 20a42-20a48 Naked> Σ0 ↓
<Const 0x20a42 0xd.2> Δ-2 {[#13]}
<Call 0x20a44 0x215d2> {[#13]}
<POP 20a46-20a48 StackAdj> Δ+2 {}
<POP 20a48-20a54 Naked> Σ0 ↓ →0x20a5a ←0x20a36
<POP 20a48-20a4a StackAdj> Δ-2 {[-2-]}
<Const 0x20a4a 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x20a4c 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20a4e-20a50 StackAdj> Δ+2 {[-2-]}
<MI 20a50 TST.B (A7)+> Δ+2 {}
<MI 20a52 BEQ 0x20a5a> {}
<POP 20a54-20a5a Naked> Σ0 ↓
<Const 0x20a54 0xe.2> Δ-2 {[#14]}
<Call 0x20a56 0x215d2> {[#14]}
<POP 20a58-20a5a StackAdj> Δ+2 {}
<POP 20a5a-20a66 Naked> Σ0 ↓ →0x20a6c ←0x20a48
<POP 20a5a-20a5c StackAdj> Δ-2 {[-2-]}
<Const 0x20a5c 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x20a5e 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20a60-20a62 StackAdj> Δ+2 {[-2-]}
<MI 20a62 TST.B (A7)+> Δ+2 {}
<MI 20a64 BEQ 0x20a6c> {}
<POP 20a66-20a6c Naked> Σ0 ↓
<Const 0x20a66 0xf.2> Δ-2 {[#15]}
<Call 0x20a68 0x215d2> {[#15]}
<POP 20a6a-20a6c StackAdj> Δ+2 {}
<POP 20a6c-20a72 Naked> Σ0 ↓ ←0x20a5a
<Call 0x20a6c 0x2118a> {}
exp_RUN_NORMAL.FIU()
<POP 20a72-20a7a Epilogue> Σ0
@ 20a7a
<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 20a7a-20baa Body>
<POP 20a7a-20a90 Prologue> Σ0 ↓
<POP 20a90-20aaa RegCacheLoad> Σ0 ↓
<POP 20aaa-20ad4 Naked> Σ0 ↓ →0x20ada
<Call 0x20aaa 0x21230> {}
exp_FREEZE_WORLD.FIU()
<Call 0x20ab0 0x21968> {}
exp_RESET.IOC()
<Call 0x20ab6 0x213ec> {}
exp_RESET.VAL()
<Call 0x20abc 0x2130c> {}
exp_RESET.TYP()
<Call 0x20ac2 0x2124e> {}
exp_RESET.SEQ()
<POP 20ac8-20aca StackAdj> Δ-2 {[-2-]}
<Const 0x20aca 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x20acc 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20ace-20ad0 StackAdj> Δ+2 {[-2-]}
<MI 20ad0 TST.B (A7)+> Δ+2 {}
<MI 20ad2 BEQ 0x20ada> {}
<POP 20ad4-20ada Naked> Σ0 ↓
<Const 0x20ad4 0xc.2> Δ-2 {[#12]}
<Call 0x20ad6 0x21528> {[#12]}
<POP 20ad8-20ada StackAdj> Δ+2 {}
<POP 20ada-20ae6 Naked> Σ0 ↓ →0x20aec ←0x20aaa
<POP 20ada-20adc StackAdj> Δ-2 {[-2-]}
<Const 0x20adc 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x20ade 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20ae0-20ae2 StackAdj> Δ+2 {[-2-]}
<MI 20ae2 TST.B (A7)+> Δ+2 {}
<MI 20ae4 BEQ 0x20aec> {}
<POP 20ae6-20aec Naked> Σ0 ↓
<Const 0x20ae6 0xd.2> Δ-2 {[#13]}
<Call 0x20ae8 0x21528> {[#13]}
<POP 20aea-20aec StackAdj> Δ+2 {}
<POP 20aec-20af8 Naked> Σ0 ↓ →0x20afe ←0x20ada
<POP 20aec-20aee StackAdj> Δ-2 {[-2-]}
<Const 0x20aee 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x20af0 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20af2-20af4 StackAdj> Δ+2 {[-2-]}
<MI 20af4 TST.B (A7)+> Δ+2 {}
<MI 20af6 BEQ 0x20afe> {}
<POP 20af8-20afe Naked> Σ0 ↓
<Const 0x20af8 0xe.2> Δ-2 {[#14]}
<Call 0x20afa 0x21528> {[#14]}
<POP 20afc-20afe StackAdj> Δ+2 {}
<POP 20afe-20b0a Naked> Σ0 ↓ →0x20b10 ←0x20aec
<POP 20afe-20b00 StackAdj> Δ-2 {[-2-]}
<Const 0x20b00 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x20b02 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20b04-20b06 StackAdj> Δ+2 {[-2-]}
<MI 20b06 TST.B (A7)+> Δ+2 {}
<MI 20b08 BEQ 0x20b10> {}
<POP 20b0a-20b10 Naked> Σ0 ↓
<Const 0x20b0a 0xf.2> Δ-2 {[#15]}
<Call 0x20b0c 0x21528> {[#15]}
<POP 20b0e-20b10 StackAdj> Δ+2 {}
<POP 20b10-20b3a Naked> Σ0 ↓ ←0x20afe
<Call 0x20b10 0x211a6> {}
exp_RESET.FIU()
<MI 20b16 MOVEA.L (A6+0x10),A0> {}
<MI 20b1a PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20b1c 0x21298> {[4, '^(A0)']}
exp_HALT.SEQ(&Fr)
<POP 20b22-20b24 StackAdj> Δ+4 {}
<MI 20b24 MOVEA.L (A6+0xc),A0> {}
<MI 20b28 CLR.B (A0)> {}
<MI 20b2a MOVEA.L (A6+0x8),A0> {}
<MI 20b2e CLR.B (A0)> {}
<MI 20b30 CLR.B (A0+0xb)> {}
<MI 20b34 CLR.B (A0+0x1)> {}
<MI 20b38 MOVEQ.L #0x02,D7> {}
<POP 20b3a-20b40 Naked> Σ0 ↓ →0x20b60 ←0x20b98
<MI 20b3a CMPI.B #0x05,D7> {}
<MI 20b3e BEQ 0x20b60> {}
<POP 20b40-20b60 Naked> Σ0 →0x20b7a
<MI 20b40 MOVE.B D7,D0> {}
<MI 20b42 EXTB.W D0> {}
<MI 20b44 LEA.L 0x20470,A0> {}
<MI 20b48 MOVE.B (A0+D0.W),-(A7)> Δ-2 {[2, '(A0+D0.W)']}
<Pointer.fp 0x20b4c <LVAR -0x006 @>> Δ-4 {[2, '(A0+D0.W)']|[@@-6]}
<Pointer.fp 0x20b50 <LVAR -0x005 @ 1(rw)>> Δ-4 {[2, '(A0+D0.W)']|[@@-6]|[@@-5]}
<Pointer.fp 0x20b52 <LVAR -0x004 @>> Δ-4 {[2, '(A0+D0.W)']|[@@-6]|[@@-5]|[@@-4]}
<Call 0x20b56 0x10484> {[2, '(A0+D0.W)']|[@@-6]|[@@-5]|[@@-4]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20b5c-20b5e StackAdj> Δ+14 {}
<MI 20b5e BRA 0x20b7a> {}
<POP 20b60-20b78 Naked> Σ0 ↓ →0x20b7a ←0x20b3a
<Pointer.fp 0x20b60 <LVAR -0x007 @ 1(r)>> Δ-4 {[@@-7]}
<Call 0x20b64 0x212ae> {[@@-7]}
exp_GET_MISC_ERRORS.SEQ(&Sr_1)
<POP 20b6a-20b6c StackAdj> Δ+4 {}
<MI 20b6c CLR.L D0> {}
<MI 20b6e MOVE.B (A6-0x7),D0> {}
<MI 20b72 CMPI.W #0x001f,D0> {}
<MI 20b76 BEQ 0x20b7a> {}
<POP 20b78-20b7a Naked> Σ0 ↓
<MI 20b78 MOVE.B #0x01,(A6-0x5)> {}
<POP 20b7a-20b92 Naked> Σ0 Δ-2 ↓ →0x20b98 ←0x20b40 ←0x20b60
<MI 20b7a MOVEA.L (A6+0x8),A0> {}
<MI 20b7e MOVE.B D7,D0> {}
<MI 20b80 EXTB.W D0> {}
<MI 20b82 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<MI 20b84 MOVE.B (A6-0x5),D1> {[2, 'D0']}
<MI 20b86 EXTB.W D1> {[2, 'D0']}
<POP 0x20b88 LimitCheck 0x0 ≤ D1 ≤ 0x1> {[2, 'D0']}
<MI 20b8a MOVE.B D1,(A0+D0.W)> {[2, 'D0']}
<MI 20b8e TST.W D1> {[2, 'D0']}
<MI 20b90 BEQ 0x20b98> {[2, 'D0']}
<POP 20b92-20b98 Naked> Σ-2 ↓
<MI 20b92 MOVEA.L (A6+0xc),A0> {[-2-]}
<MI 20b96 MOVE.B #0x01,(A0)> {[-2-]}
<POP 20b98-20ba2 Naked> Σ-2 Δ+2 ↓ →0x20b3a ←0x20b7a
<MI 20b98 MOVE.W (A7)+,D7> Δ+2 {}
<MI 20b9a ADDQ.W #0x1,D7> {}
<MI 20b9c CMPI.W #0x000a,D7> {}
<MI 20ba0 BLE 0x20b3a> {}
<POP 20ba2-20baa Epilogue> Σ0
@ 20baa
<LVAR 0x008 2(r)>
<POP 20baa-20c60 Body>
<POP 20baa-20bc0 Prologue> Σ0 ↓
<POP 20bc0-20bd0 RegCacheLoad> Σ0 ↓
<POP 20bd0-20c1a Naked> Σ0 ↓ →0x20c58
<Const 0x20bd0 0x21a3a.4> Δ-4 {[##137786]}
<Call 0x20bd2 0x102bc> {[##137786]}
FreeString(VAR a : String)
<POP 20bd8-20bda StackAdj> Δ+4 {}
<MI 20bda MOVE.W (A6+0x8),D0> {}
<POP 0x20bde LimitCheck 0x0 ≤ D0 ≤ 0x1f> {}
<MI 20be2 MULS.W #0x0a,D0> {}
<MI 20be4 LEA.L 0x20328,A0> {}
<Blob 0x20be8 [10] (A0+D0.W+#0xa)> Δ-10 {[«10»]}
<POP 20bf4-20bf6 StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x20bf6> {[«10»]|[$$…]}
<Pointer.sp 0x20bf6 4> Δ-4
<Const 0x20bfa 0x1.2> Δ-2
<Const 0x20bfc 0xa.2> Δ-2
<Call 0x20bfe 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20c04-20c06 StackAdj> Δ+8
<MI 20c06 MOVE.L (A7)+,0x21a3a> Δ+4 {[«10»]}
<POP 20c08-20c0a StackAdj> Δ+2 {[-8-]}
<POP 20c0a-20c0b StackAdj> Δ+4 {[-4-]}
<Blob 0x20c0b [4] 0x21a3a> Δ-4 {[-4-]|[«4»]}
<Call 0x20c0c 0x102cc> {[-4-]|[«4»]}
StringDup(a : String) : String
<POP 20c12-20c14 StackAdj> Δ+4 {[-4-]}
<MI 20c14 MOVEA.L (A7)+,A4> Δ+4 {}
<MI 20c16 TST.B 0x21a34> {}
<MI 20c18 BEQ 0x20c58> {}
<POP 20c1a-20c58 Naked> Σ0 ↓
<MI 20c1a MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']}
<MI 20c1c MOVE.B 0x21a34,D0> {[4, 'A4']}
<MI 20c1e EXTB.W D0> {[4, 'A4']}
<POP 0x20c20 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[4, 'A4']}
<MI 20c22 MOVE.B D0,-(A7)> Δ-2 {[4, 'A4']|[2, 'D0']}
<MI 20c24 MOVE.B 0x21a35,D0> {[4, 'A4']|[2, 'D0']}
<MI 20c2a EXTB.W D0> {[4, 'A4']|[2, 'D0']}
<POP 0x20c2c LimitCheck 0x0 ≤ D0 ≤ 0x1> {[4, 'A4']|[2, 'D0']}
<MI 20c2e MOVE.B D0,-(A7)> Δ-2 {[4, 'A4']|[2, 'D0']|[2, 'D0']}
<Const 0x20c30 0x21a36.4> Δ-4 {[4, 'A4']|[2, 'D0']|[2, 'D0']|[##137782]}
<Const 0x20c36 0x21a3e.4> Δ-4 {[4, 'A4']|[2, 'D0']|[2, 'D0']|[##137782]|[##137790]}
<Const 0x20c3c 0x21a42.4> Δ-4 {[4, 'A4']|[2, 'D0']|[2, 'D0']|[##137782]|[##137790]|[##137794]}
<Const 0x20c42 0x21a46.4> Δ-4 {[4, 'A4']|[2, 'D0']|[2, 'D0']|[##137782]|[##137790]|[##137794]|[##137798]}
<Const 0x20c48 0x21a47.4> Δ-4 {[4, 'A4']|[2, 'D0']|[2, 'D0']|[##137782]|[##137790]|[##137794]|[##137798]|[##137799]}
<Call 0x20c4e 0x1053e> {[4, 'A4']|[2, 'D0']|[2, 'D0']|[##137782]|[##137790]|[##137794]|[##137798]|[##137799]}
FSCALL_1053e
<POP 20c54-20c58 StackAdj> Δ+28 {}
<POP 20c58-20c60 Epilogue> Σ0 ←0x20bd0
@ 20c60
<LVAR 0x008 1(r)>
<POP 20c60-20cc4 Body>
<POP 20c60-20c76 Prologue> Σ0 ↓
<POP 20c76-20c82 RegCacheLoad> Σ0 ↓
<POP 20c82-20c90 Naked> Σ0 ↓ →0x20c94
<MI 20c82 MOVE.B (A6+0x8),0x21a46> {}
<MI 20c86 MOVE.B (A6+0x8),D0> {}
<MI 20c8a CMPI.B #0x02,D0> {}
<MI 20c8e BEQ 0x20c94> {}
<POP 20c90-20c94 Naked> Σ0 ↓
<MI 20c90 MOVE.B #0x29,0x21a47> {}
<POP 20c94-20cbc Naked> Σ0 ↓ ←0x20c82
<MI 20c94 CLR.B -(A7)> Δ-2 {[#0]}
<Blob 0x20c96 [4] 0x21a3e> Δ-4 {[#0]|[«4»]}
<Blob 0x20c9c [4] 0x21a42> Δ-4 {[#0]|[«4»]|[«4»]}
<Blob 0x20ca2 [2] 0x21a46> Δ-2 {[#0]|[«4»]|[«4»]|[«2»]}
<Blob 0x20ca4 [8] 0x21a47> Δ-8 {[#0]|[«4»]|[«4»]|[«2»]|[«8»]}
<Call 0x20cb2 0x1054a> {[#0]|[«4»]|[«4»]|[«2»]|[«8»]}
?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
<POP 20cb8-20cbc StackAdj> Δ+20 {}
<POP 20cbc-20cc4 Epilogue> Σ0
@ 20cc4
<LVAR -0x005 1(r)>
<LVAR -0x006 @ 1(r) 2(r)>
<LVAR -0x012 @>
<LVAR -0x013 @ 1(r)>
<LVAR -0x014 @ 1(r)>
<POP 20cc4-20dd8 Body> Δ-6
<POP 20cc4-20cda Prologue> Σ0 ↓
<POP 20cda-20cec RegCacheLoad> Σ0 ↓
<POP 20cec-20d10 Naked> Σ0 Δ-4 ↓ →0x20d46
<Pointer.fp 0x20cec <LVAR -0x014 @ 1(r)>> Δ-4 {[@@-20]}
<Pointer.fp 0x20cee <LVAR -0x013 @ 1(r)>> Δ-4 {[@@-20]|[@@-19]}
<Pointer.fp 0x20cf0 <LVAR -0x012 @>> Δ-4 {[@@-20]|[@@-19]|[@@-18]}
<Call 0x20cf4 0x20a7a> {[@@-20]|[@@-19]|[@@-18]}
<POP 20cf8-20cfc StackAdj> Δ+12 {}
<Pointer.fp 0x20cfc <LVAR -0x006 @ 1(r) 2(r)>> Δ-4 {[@@-6]}
<Call 0x20cfe 0x2194a> {[@@-6]}
exp_READ_LAST_PC.IOC(&Sr_2)
<POP 20d04-20d06 StackAdj> Δ+4 {}
<MI 20d06 MOVE.W (A6-0x6),-(A7)> Δ-2 {[2, '(A6-0x6)']}
<Const 0x20d08 0x200.2> Δ-2 {[2, '(A6-0x6)']|[#512]}
<MI 20d0c TST.B (A6-0x14)> {[2, '(A6-0x6)']|[#512]}
<MI 20d0e BEQ 0x20d46> {[2, '(A6-0x6)']|[#512]}
<POP 20d10-20d14 Naked> Σ-4 ↓ →0x20d46
<MI 20d10 TST.B (A6-0x13)> {[-4-]}
<MI 20d12 BNE 0x20d46> {[-4-]}
<POP 20d14-20d3c Naked> Σ-4 ↓ →0x20d46
<POP 20d14-20d16 StackAdj> Δ-2 {[-6-]}
<Pointer.sp 0x20d16 4> Δ-4 {[-6-]|[^^4]}
<Const 0x20d1a 0x0.4> Δ-4 {[-6-]|[^^4]|[##0]}
<Const 0x20d1e 0x1.4> Δ-4 {[-6-]|[^^4]|[##0]|[##1]}
<Pointer.sp 0x20d22 14> Δ-4 {[-6-]|[^^4]|[##0]|[##1]|[^^14]}
<Const 0x20d26 0x0.4> Δ-4 {[-6-]|[^^4]|[##0]|[##1]|[^^14]|[##0]}
<Const 0x20d2a 0x1.4> Δ-4 {[-6-]|[^^4]|[##0]|[##1]|[^^14]|[##0]|[##1]}
<Call 0x20d2e 0x104a8> {[-6-]|[^^4]|[##0]|[##1]|[^^14]|[##0]|[##1]}
?FS104a8(VAR : Pointer; b : L; c : L ; VAR : Pointer; e: L; f : L) : Bool
<POP 20d34-20d38 StackAdj> Δ+24 {[-6-]}
<MI 20d38 TST.B (A7)+> Δ+2 {[-4-]}
<MI 20d3a BEQ 0x20d46> {[-4-]}
<POP 20d3c-20d42 Naked> Σ-4 Δ+4 →0x20dd0
<POP 20d3c-20d3e StackAdj> Δ+4 {}
<MI 20d3e BRA 0x20dd0> {}
<POP 20d46-20d4a Naked> Σ-4 ↓ →0x20d4e ←0x20cec ←0x20d10 ←0x20d14
<MI 20d46 TST.B (A6-0x13)> {[-4-]}
<MI 20d48 BNE 0x20d4e> {[-4-]}
<POP 20d4a-20d4e Naked> Σ-4 ↓ →0x20dc4
<MI 20d4a TST.B (A6-0x14)> {[-4-]}
<MI 20d4c BEQ 0x20dc4> {[-4-]}
<POP 20d4e-20d50 Naked> Σ-4 ↓ ←0x20d46
<MI 20d4e MOVEQ.L #0x00,D7> {[-4-]}
<POP 20d50-20d6c Naked> Σ-4 ↓ →0x20db8 ←0x20db8
<POP 0x20d50 LimitCheck 0x0 ≤ D7 ≤ 0x1f> {[-4-]}
<MI 20d52 MOVE.W D7,D0> {[-4-]}
<MI 20d54 ASL.W #0x3,D0> {[-4-]}
<MI 20d56 LEA.L 0x21a28,A0> {[-4-]}
<MI 20d5c CLR.L D1> {[-4-]}
<MI 20d5e MOVE.B (A0+D0.W+#0x32),D1> {[-4-]}
<MI 20d62 AND.W #0xff,D1> {[-4-]}
<MI 20d64 MOVE.B D1,(A0+D0.W+#0x32)> {[-4-]}
<MI 20d68 TST.B D1> {[-4-]}
<MI 20d6a BEQ 0x20db8> {[-4-]}
<POP 20d6c-20d98 Naked> Σ-4 ↓ →0x20db8
<MI 20d6c CLR.L D1> {[-4-]}
<MI 20d6e MOVE.B (A0+D0.W+#0x30),D1> {[-4-]}
<MI 20d72 AND.W #0xff,D1> {[-4-]}
<MI 20d74 MOVE.B D1,(A0+D0.W+#0x30)> {[-4-]}
<MI 20d78 CLR.L D1> {[-4-]}
<MI 20d7a MOVE.B (A0+D0.W+#0x31),D1> {[-4-]}
<MI 20d7e AND.W #0xff,D1> {[-4-]}
<MI 20d80 MOVE.B D1,(A0+D0.W+#0x31)> {[-4-]}
<MI 20d84 CLR.L D1> {[-4-]}
<MI 20d86 MOVE.B (A0+D0.W+#0x33),D1> {[-4-]}
<MI 20d8a AND.W #0xff,D1> {[-4-]}
<MI 20d8c MOVE.B D1,(A0+D0.W+#0x33)> {[-4-]}
<MI 20d90 MOVE.B (A6-0x6),D2> {[-4-]}
<MI 20d92 CMP.B (A0+D0.W+#0x32),D2> {[-4-]}
<MI 20d96 BCS 0x20db8> {[-4-]}
<POP 20d98-20d9e Naked> Σ-4 ↓ →0x20db8
<MI 20d98 CMP.B (A6-0x5),D1> {[-4-]}
<MI 20d9c BHI 0x20db8> {[-4-]}
<POP 20d9e-20da4 Naked> Σ-4 ↓ →0x20db8
<MI 20d9e CMP.B (A0+D0.W+#0x30),D2> {[-4-]}
<MI 20da2 BHI 0x20db8> {[-4-]}
<POP 20da4-20dae Naked> Σ-4 ↓ →0x20db8
<MI 20da4 MOVE.B (A6-0x5),D1> {[-4-]}
<MI 20da8 CMP.B (A0+D0.W+#0x31),D1> {[-4-]}
<MI 20dac BHI 0x20db8> {[-4-]}
<POP 20dae-20db8 Naked> Σ-4 Δ+4 →0x20dd0
<MI 20dae MOVE.W D7,-(A7)> Δ-2 {[-4-]|[2, 'D7']}
<Call 0x20db0 0x20baa> {[-4-]|[2, 'D7']}
<POP 20db4-20db6 StackAdj> Δ+6 {}
<MI 20db6 BRA 0x20dd0> {}
<POP 20db8-20dbe Naked> Σ-4 ↓ →0x20d50 ←0x20d50 ←0x20d6c ←0x20d98 ←0x20d9e ←0x20da4
<MI 20db8 ADDQ.W #0x1,D7> {[-4-]}
<MI 20dba CMP.W #0x1f,D7> {[-4-]}
<MI 20dbc BLE 0x20d50> {[-4-]}
<POP 20dbe-20dc4 Naked> Σ-4 Δ-2 →0x20dc8
<Const 0x20dbe 0x1.2> Δ-2 {[-4-]|[#1]}
<MI 20dc2 BRA 0x20dc8> {[-4-]|[#1]}
<POP 20dc4-20dc8 Naked> Σ-4 Δ-2 ↓ ←0x20d4a
<Const 0x20dc4 0x2.2> Δ-2 {[-4-]|[#2]}
<POP 20dc8-20dd0 Naked> Σ-6 Δ+6 ↓ ←0x20dbe
<Call 0x20dc8 0x20c60> {[-6-]}
<POP 20dcc-20dce StackAdj> Δ+2 {[-4-]}
<POP 20dce-20dd0 StackAdj> Δ+4 {}
<POP 20dd0-20dd8 Epilogue> Σ0 ←0x20d3c ←0x20dae
@ 20dd8
<LVAR -0x006 @ 1(r)>
<LVAR -0x007 @>
<LVAR -0x008 @>
<POP 20dd8-20eca Body>
<POP 20dd8-20dee Prologue> Σ0 ↓
<POP 20dee-20e04 RegCacheLoad> Σ0 ↓
<POP 20e04-20e06 Naked> Σ0 ↓
<MI 20e04 MOVEQ.L #0x00,D7> {}
<POP 20e06-20e8e Naked> Σ0 ↓ ←0x20ebc
<Const 0x20e06 0x9896.4> Δ-4 {[##39062]}
<Call 0x20e0c 0x10224> {[##39062]}
KC12_Sleep(dur: Long)
<POP 20e12-20e14 StackAdj> Δ+2 {[-2-]}
<POP 20e14-20e15 StackAdj> Δ+2 {}
<Const 0x20e15 0x4.2> Δ-2 {[#4]}
<Pointer.fp 0x20e18 <LVAR -0x008 @>> Δ-4 {[#4]|[@@-8]}
<Pointer.fp 0x20e1a <LVAR -0x006 @ 1(r)>> Δ-4 {[#4]|[@@-8]|[@@-6]}
<Pointer.fp 0x20e1c <LVAR -0x007 @>> Δ-4 {[#4]|[@@-8]|[@@-6]|[@@-7]}
<Call 0x20e1e 0x10484> {[#4]|[@@-8]|[@@-6]|[@@-7]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20e20-20e22 StackAdj> Δ+14 {}
<MI 20e22 MOVE.B D7,D0> {}
<MI 20e24 OR.B (A6-0x6),D0> {}
<MI 20e26 EXTB.W D0> {}
<POP 0x20e28 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20e2a MOVE.B D0,D7> {}
<Const 0x20e2c 0x7.2> Δ-2 {[#7]}
<Pointer.fp 0x20e30 <LVAR -0x008 @>> Δ-4 {[#7]|[@@-8]}
<Pointer.fp 0x20e32 <LVAR -0x006 @ 1(r)>> Δ-4 {[#7]|[@@-8]|[@@-6]}
<Pointer.fp 0x20e34 <LVAR -0x007 @>> Δ-4 {[#7]|[@@-8]|[@@-6]|[@@-7]}
<Call 0x20e36 0x10484> {[#7]|[@@-8]|[@@-6]|[@@-7]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20e38-20e3a StackAdj> Δ+14 {}
<MI 20e3a MOVE.B D7,D0> {}
<MI 20e3c OR.B (A6-0x6),D0> {}
<MI 20e3e EXTB.W D0> {}
<POP 0x20e40 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20e42 MOVE.B D0,D7> {}
<Const 0x20e44 0x6.2> Δ-2 {[#6]}
<Pointer.fp 0x20e48 <LVAR -0x008 @>> Δ-4 {[#6]|[@@-8]}
<Pointer.fp 0x20e4a <LVAR -0x006 @ 1(r)>> Δ-4 {[#6]|[@@-8]|[@@-6]}
<Pointer.fp 0x20e4c <LVAR -0x007 @>> Δ-4 {[#6]|[@@-8]|[@@-6]|[@@-7]}
<Call 0x20e4e 0x10484> {[#6]|[@@-8]|[@@-6]|[@@-7]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20e50-20e52 StackAdj> Δ+14 {}
<MI 20e52 MOVE.B D7,D0> {}
<MI 20e54 OR.B (A6-0x6),D0> {}
<MI 20e56 EXTB.W D0> {}
<POP 0x20e58 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20e5a MOVE.B D0,D7> {}
<Const 0x20e5c 0x2.2> Δ-2 {[#2]}
<Pointer.fp 0x20e60 <LVAR -0x008 @>> Δ-4 {[#2]|[@@-8]}
<Pointer.fp 0x20e62 <LVAR -0x006 @ 1(r)>> Δ-4 {[#2]|[@@-8]|[@@-6]}
<Pointer.fp 0x20e64 <LVAR -0x007 @>> Δ-4 {[#2]|[@@-8]|[@@-6]|[@@-7]}
<Call 0x20e66 0x10484> {[#2]|[@@-8]|[@@-6]|[@@-7]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20e68-20e6a StackAdj> Δ+14 {}
<MI 20e6a MOVE.B D7,D0> {}
<MI 20e6c OR.B (A6-0x6),D0> {}
<MI 20e6e EXTB.W D0> {}
<POP 0x20e70 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20e72 MOVE.B D0,D7> {}
<Const 0x20e74 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x20e78 <LVAR -0x008 @>> Δ-4 {[#3]|[@@-8]}
<Pointer.fp 0x20e7a <LVAR -0x006 @ 1(r)>> Δ-4 {[#3]|[@@-8]|[@@-6]}
<Pointer.fp 0x20e7c <LVAR -0x007 @>> Δ-4 {[#3]|[@@-8]|[@@-6]|[@@-7]}
<Call 0x20e7e 0x10484> {[#3]|[@@-8]|[@@-6]|[@@-7]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20e80-20e82 StackAdj> Δ+14 {}
<MI 20e82 MOVE.B D7,D0> {}
<MI 20e84 OR.B (A6-0x6),D0> {}
<MI 20e86 EXTB.W D0> {}
<POP 0x20e88 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20e8a MOVE.B D0,D7> {}
<MI 20e8c MOVEQ.L #0x0c,D6> {}
<POP 20e8e-20e9e Naked> Σ0 ↓ →0x20eb4 ←0x20eb4
<POP 20e8e-20e90 StackAdj> Δ-2 {[-2-]}
<MI 20e90 MOVE.B D6,-(A7)> Δ-2 {[-2-]|[2, 'D6']}
<Call 0x20e92 0x104c0> {[-2-]|[2, 'D6']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20e98-20e9a StackAdj> Δ+2 {[-2-]}
<MI 20e9a TST.B (A7)+> Δ+2 {}
<MI 20e9c BEQ 0x20eb4> {}
<POP 20e9e-20eb4 Naked> Σ0 ↓
<MI 20e9e MOVE.B D6,-(A7)> Δ-2 {[2, 'D6']}
<Pointer.fp 0x20ea0 <LVAR -0x008 @>> Δ-4 {[2, 'D6']|[@@-8]}
<Pointer.fp 0x20ea2 <LVAR -0x006 @ 1(r)>> Δ-4 {[2, 'D6']|[@@-8]|[@@-6]}
<Pointer.fp 0x20ea4 <LVAR -0x007 @>> Δ-4 {[2, 'D6']|[@@-8]|[@@-6]|[@@-7]}
<Call 0x20ea6 0x10484> {[2, 'D6']|[@@-8]|[@@-6]|[@@-7]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20ea8-20eaa StackAdj> Δ+14 {}
<MI 20eaa MOVE.B D7,D0> {}
<MI 20eac OR.B (A6-0x6),D0> {}
<MI 20eae EXTB.W D0> {}
<POP 0x20eb0 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20eb2 MOVE.B D0,D7> {}
<POP 20eb4-20ebc Naked> Σ0 ↓ →0x20e8e ←0x20e8e
<MI 20eb4 ADDQ.B #0x1,D6> {}
<MI 20eb6 CMPI.B #0x0f,D6> {}
<MI 20eba BLE 0x20e8e> {}
<POP 20ebc-20ec2 Naked> Σ0 ↓ →0x20e06
<MI 20ebc TST.B D7> {}
<MI 20ebe BEQ 0x20e06> {}
<POP 20ec2-20eca Epilogue> Σ0
@ 20eca
<LVAR -0x006 1(r)>
<LVAR -0x007 @ 1(r)>
<LVAR -0x008 1(rw)>
<POP 20eca-20f44 Body>
<POP 20eca-20ee0 Prologue> Σ0 ↓
<POP 20ee0-20ee2 RegCacheLoad> Σ0 ↓
<POP 20ee2-20ee4 Naked> Σ0 ↓
<MI 20ee2 MOVEQ.L #0x00,D7> {}
<POP 20ee4-20f3c Naked> Σ0 ↓ →0x20ee4 ←0x20ee4
<POP 0x20ee4 LimitCheck 0x0 ≤ D7 ≤ 0xff> {}
<MI 20eee MOVE.B D7,(A6-0x8)> {}
<Const 0x20ef2 0x6.2> Δ-2 {[#6]}
<MI 20ef6 MOVE.B (A6-0x8),-(A7)> Δ-2 {[#6]|[2, '(A6-0x8)']}
<Pointer.fp 0x20efa <LVAR -0x007 @ 1(r)>> Δ-4 {[#6]|[2, '(A6-0x8)']|[@@-7]}
<Call 0x20efe 0x212d0> {[#6]|[2, '(A6-0x8)']|[@@-7]}
exp_REG_TO_LOOP.TYP(Sw_1, Sw_1, &Sr_2)
<POP 20f04-20f06 StackAdj> Δ+8 {}
<Call 0x20f06 0x2135a> {}
exp_PREP_READ_REG.TYP()
<POP 20f0c-20f0e StackAdj> Δ-2 {[-2-]}
<MI 20f0e MOVE.B (A6-0x7),(A7)> {[-2-]}
<MI 20f12 MOVE.B (A6-0x6),(A7+0x1)> {[-2-]}
<MI 20f18 CLR.B -(A7)> Δ-2 {[-2-]|[#0]}
<POP 0x20f1a LimitCheck 0x0 ≤ D7 ≤ 0x1f> {[-2-]|[#0]}
<MI 20f20 MOVE.L D7,D0> {[-2-]|[#0]}
<MI 20f22 ASL.L #0x3,D0> {[-2-]|[#0]}
<MI 20f24 LEA.L 0x21a28,A0> {[-2-]|[#0]}
<MI 20f2a PEA.L (A0+D0.L+#0x2c)> Δ-4 {[-2-]|[#0]|[4, '^(A0+D0.L+#0x2c)']}
<Call 0x20f2e 0x21322> {[-2-]|[#0]|[4, '^(A0+D0.L+#0x2c)']}
exp_READ_B_REG.TYP(Sw_2, Sw_1, &Sr_8)
<POP 20f34-20f36 StackAdj> Δ+8 {}
<MI 20f36 ADDQ.L #0x1,D7> {}
<MI 20f38 CMP.L #0x1f,D7> {}
<MI 20f3a BLE 0x20ee4> {}
<POP 20f3c-20f44 Epilogue> Σ0
@ 20f44
<LVAR -0x004 @>
<POP 20f44-20f98 Body>
<POP 20f44-20f5a Prologue> Σ0 ↓
<POP 20f5a-20f5c RegCacheLoad> Σ0 ↓
<POP 20f5c-20f90 Naked> Σ0 ↓
<Blob 0x20f5c [18] @> Δ-18 {[«18""»]}
<MI 20f68 CLR.B -(A7)> Δ-2 {[«18""»]|[#0]}
<POP 20f6a-20f6c StackAdj> Δ-4 {[«18""»]|[#0]|[-4-]}
<Lit 0x20f6c 18> {[«18""»]|[#0]|[$$P3UCODE.M200_UCODE]}
<POP 20f7c-20f7e StackAdj> Δ-2 {[«18""»]|[#0]|[$$P3UCODE.M200_UCODE]|[-2-]}
<POP 20f7e-20f7f StackAdj> Δ+2 {[«18""»]|[#0]|[$$P3UCODE.M200_UCODE]}
<Const 0x20f7f 0x1.2> Δ-2 {[«18""»]|[#0]|[$$P3UCODE.M200_UCODE]|[#1]}
<Const 0x20f80 0x1.2> Δ-2 {[«18""»]|[#0]|[$$P3UCODE.M200_UCODE]|[#1]|[#1]}
<Const 0x20f82 0x1.2> Δ-2 {[«18""»]|[#0]|[$$P3UCODE.M200_UCODE]|[#1]|[#1]|[#1]}
<Pointer.fp 0x20f84 <LVAR -0x004 @>> Δ-4 {[«18""»]|[#0]|[$$P3UCODE.M200_UCODE]|[#1]|[#1]|[#1]|[@@-4]}
<Call 0x20f88 0x205b8> {[«18""»]|[#0]|[$$P3UCODE.M200_UCODE]|[#1]|[#1]|[#1]|[@@-4]}
<POP 20f8c-20f90 StackAdj> Δ+34 {}
<POP 20f90-20f98 Epilogue> Σ0
@ 20f98
START
<POP 20f98--0001 Body>
<POP 20f98-20fa2 Prologue> Σ0
<POP 20fa2-20fb8 RegCacheLoad> Σ0 ↓
<POP 20fb8-2103c Naked> Σ0 ↓
<Call 0x20fb8 0x10398> {}
FSCALL_10398
<Const 0x20fbe 0x3.4> Δ-4 {[##3]}
<Call 0x20fc2 0x104d8> {[##3]}
ExpInit(a : Long)
<POP 20fc8-20fca StackAdj> Δ+4 {}
<Const 0x20fca 0x21a32.4> Δ-4 {[##137778]}
<Const 0x20fcc 0x21a34.4> Δ-4 {[##137778]|[##137780]}
<Const 0x20fd2 0x21a35.4> Δ-4 {[##137778]|[##137780]|[##137781]}
<Const 0x20fd4 0x21a37.4> Δ-4 {[##137778]|[##137780]|[##137781]|[##137783]}
<Const 0x20fd6 0x21a38.4> Δ-4 {[##137778]|[##137780]|[##137781]|[##137783]|[##137784]}
<Call 0x20fdc 0x10562> {[##137778]|[##137780]|[##137781]|[##137783]|[##137784]}
?IPC_GetVar4xBool(VAR a : Pointer; VAR b : Bool ; VAR c : Bool; VAR d: Bool; VAR e: Bool)
<POP 20fe2-20fe6 StackAdj> Δ+18 {[-2-]}
<POP 20fe6-20fe7 StackAdj> Δ+2 {}
<Blob 0x20fe7 [2] 0x21a35> Δ-2 {[«2»]}
<Call 0x20fe8 0x104d2> {[«2»]}
SetExpInitDone(a : Byte)
<POP 20fee-20fef StackAdj> Δ+2 ↓ {}
<Blob 0x20fef [8] @> Δ-8 {[«8""»]}
<POP 20ffe-21000 StackAdj> Δ-4 {[«8""»]|[-4-]}
<Lit 0x21000 7> {[«8""»]|[$$P3UCODE]}
<MI 21010 MOVE.L (A7)+,0x21a3e> Δ+4 {[«8""»]}
<POP 21016-21018 StackAdj> Δ+8 {}
<Const 0x21018 0x21a42.4> Δ-4 {[##137794]}
<Call 0x2101e 0x102b8> {[##137794]}
NewString(VAR a : String)
<POP 21024-21026 StackAdj> Δ+4 {}
<Const 0x21026 0x21a3a.4> Δ-4 {[##137786]}
<Call 0x2102c 0x102b8> {[##137786]}
NewString(VAR a : String)
<POP 21032-21034 StackAdj> Δ+4 {}
<MI 21034 CLR.B 0x21a46> {}
<MI 2103a MOVEQ.L #0x00,D0> {}
<POP 2103c-21058 Naked> Σ0 ↓ →0x2103c ←0x2103c
<MI 2103c MOVE.L D0,0x21a50> {}
<POP 0x21042 LimitCheck 0x0 ≤ D0 ≤ 0x7> {}
<MI 21048 LEA.L 0x21a28,A0> {}
<MI 2104e CLR.B (A0+D0.L+#0x1f)> {}
<MI 21052 ADDQ.L #0x1,D0> {}
<MI 21054 CMP.L #0x07,D0> {}
<MI 21056 BLE 0x2103c> {}
<POP 21058-21068 Naked> Σ0 ↓ →0x21096
<MI 21058 MOVE.B #0x01,0x21a36> {}
<MI 2105e CLR.L D0> {}
<MI 21060 MOVE.B 0x21a32,D0> {}
<MI 21062 CMPI.W #0x0020,D0> {}
<MI 21066 BLS 0x21096> {}
<POP 21068-21096 Naked> Σ0 ↓
<Blob 0x21068 [30] @> Δ-30 {[«30""»]}
<Const 0x21074 0xe.2> Δ-2 {[«30""»]|[#14]}
<POP 21078-2107a StackAdj> Δ-4 {[«30""»]|[#14]|[-4-]}
<Lit 0x2107a 30> {[«30""»]|[#14]|[$$Illegal test name for P3UCODE.]}
<Call 0x2108c 0x103b8> {[«30""»]|[#14]|[$$Illegal test name for P3UCODE.]}
PopProgram(status : Byte; msg : String)
<POP 21092-21096 StackAdj> Δ+36 {}
<POP 21096-2109e Naked> Σ0 ↓ →0x210a2 ←0x21058
<MI 21096 TST.B 0x21a38> {}
<MI 2109c BEQ 0x210a2> {}
<POP 2109e-210a2 Naked> Σ0 ↓
<Call 0x2109e 0x20782> {}
<POP 210a2-210a6 Naked> Σ0 ↓ →0x210d0 ←0x21096
<MI 210a2 TST.B 0x21a37> {}
<MI 210a4 BEQ 0x210d0> {}
<POP 210a6-210d0 Naked> Σ0 ↓
<Call 0x210a6 0x20f44> {}
<Blob 0x210aa [4] @> Δ-4 {[«4""»]}
<Blob 0x210ae [4] @> Δ-4 {[«4""»]|[«4""»]}
<MI 210b2 CLR.B -(A7)> Δ-2 {[«4""»]|[«4""»]|[#0]}
<Call 0x210b4 0x2141c> {[«4""»]|[«4""»]|[#0]}
exp_LOAD_WDR.VAL(Sw_8, Sw_1)
<POP 210ba-210bc StackAdj> Δ+6 {[«4""»]}
<POP 210bc-210bd StackAdj> Δ+4 {}
<Blob 0x210bd [4] @> Δ-4 {[«4""»]}
<Blob 0x210c0 [4] @> Δ-4 {[«4""»]|[«4""»]}
<MI 210c4 CLR.B -(A7)> Δ-2 {[«4""»]|[«4""»]|[#0]}
<Call 0x210c6 0x21378> {[«4""»]|[«4""»]|[#0]}
exp_LOAD_WDR.TYP(Sw_8, Sw_1)
<POP 210cc-210d0 StackAdj> Δ+10 {}
<POP 210d0-21146 Naked> Σ0 ↓ ←0x210a2
<Call 0x210d0 0x20eca> {}
<MI 210d4 MOVE.B #0x02,0x21a30> {}
<MI 210dc CLR.L D0> {}
<MI 210de MOVE.B 0x21a32,D0> {}
<MI 210e0 ADDQ.W #0x2,D0> {}
<POP 0x210e2 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 210e6 MOVE.B D0,0x21a31> {}
<Blob 0x210ec [2] 0x21a30> Δ-2 {[«2»]}
<Call 0x210f2 0x20862> {[«2»]}
<POP 210f6-210f8 StackAdj> Δ+2 {}
<Call 0x210f8 0x209dc> {}
<Call 0x210fc 0x20dd8> {}
<Call 0x21100 0x20cc4> {}
<Blob 0x21104 [2] 0x21a35> Δ-2 {[«2»]}
<Const 0x21106 0x21a39.4> Δ-4 {[«2»]|[##137785]}
<Call 0x2110c 0x20680> {[«2»]|[##137785]}
<POP 21110-21112 StackAdj> Δ+4 {[«2»]}
<POP 21112-21113 StackAdj> Δ+2 {}
<Blob 0x21113 [2] 0x21a36> Δ-2 {[«2»]}
<Blob 0x21118 [4] 0x21a3e> Δ-4 {[«2»]|[«4»]}
<Blob 0x2111e [4] 0x21a42> Δ-4 {[«2»]|[«4»]|[«4»]}
<Blob 0x21124 [2] 0x21a46> Δ-2 {[«2»]|[«4»]|[«4»]|[«2»]}
<Blob 0x2112a [8] 0x21a47> Δ-8 {[«2»]|[«4»]|[«4»]|[«2»]|[«8»]}
<Call 0x2113c 0x1054a> {[«2»]|[«4»]|[«4»]|[«2»]|[«8»]}
?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
<POP 21142-21146 StackAdj> Δ+20 {}
<POP 21146-2114c Naked> Σ0
<Call 0x21146 0x10284> {}
?exit
@ 2146a
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 4(r)>
<POP 2146a-21514 Body> Δ+12
<POP 2146a-21480 Prologue> Σ0 ↓
<POP 21480-21486 RegCacheLoad> Σ0 ↓
<POP 21486-21492 Naked> Σ0 ↓ →0x214a4
<POP 21486-21488 StackAdj> Δ-2 {[-2-]}
<Call 0x21488 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2148e TST.B (A7)+> Δ+2 {}
<MI 21490 BEQ 0x214a4> {}
<POP 21492-214a4 Naked> Σ0 Δ-12 →0x214b4
<Blob 0x21492 [12] @> Δ-12 {[«12""»]}
<MI 214a2 BRA 0x214b4> {[«12""»]}
<POP 214a4-214b4 Naked> Σ0 Δ-12 ↓ ←0x21486
<Blob 0x214a4 [12] @> Δ-12 {[«12""»]}
<POP 214b4-2150c Naked> Σ-12 Δ+12 ↓ ←0x21492
<POP 214b4-214b6 StackAdj> Δ-4 {[-16-]}
<Lit 0x214b6> {[-12-]|[$$…]}
<Pointer.sp 0x214b6 4> Δ-4
<Const 0x214ba 0x1.2> Δ-2
<Const 0x214be 0xb.2> Δ-2
<Call 0x214c2 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 214c8-214ca StackAdj> Δ+8
<Pointer.fp 0x214ca <LVAR -0x004 @ 4(r)>> Δ-4 {[-12-]|[$$…]|[@@-4]}
<Call 0x214cc 0x10460> {[-12-]|[$$…]|[@@-4]}
ExpLoad(a : String; b: Pointer)
<POP 214d2-214d6 StackAdj> Δ+20 {}
<MI 214d6 MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<MI 214da MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']}
<Pointer.sp 0x214dc 4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]}
<Const 0x214e0 0x0.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]}
<Const 0x214e4 0x0.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
<Call 0x214e8 0x10466> {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 214ee-214f2 StackAdj> Δ+16 {[2, '(A6+0x8)']}
<MI 214f2 CLR.B (A7)> {[2, '(A6+0x8)']}
<MI 214f4 MOVE.B (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0x8)']|[2, '(A6+0xa)']}
<MI 214f8 MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[2, '(A6+0xa)']|[4, '(A6-0x4)']}
<Call 0x214fa 0x104ba> {[2, '(A6+0x8)']|[2, '(A6+0xa)']|[4, '(A6-0x4)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 21500-21502 StackAdj> Δ+8 {}
<Pointer.fp 0x21502 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x21504 0x10496> {[@@-4]}
ExpClose(exp : Pointer)
<POP 2150a-2150c StackAdj> Δ+4 {}
<POP 2150c-21514 Epilogue> Σ0
@ 21528
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 21528-215b6 Body> Δ+10
<POP 21528-2153e Prologue> Σ0 ↓
<POP 2153e-21544 RegCacheLoad> Σ0 ↓
<POP 21544-21550 Naked> Σ0 ↓ →0x21562
<POP 21544-21546 StackAdj> Δ-2 {[-2-]}
<Call 0x21546 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2154c TST.B (A7)+> Δ+2 {}
<MI 2154e BEQ 0x21562> {}
<POP 21550-21562 Naked> Σ0 Δ-10 →0x21572
<Blob 0x21550 [10] @> Δ-10 {[«10""»]}
<MI 21560 BRA 0x21572> {[«10""»]}
<POP 21562-21572 Naked> Σ0 Δ-10 ↓ ←0x21544
<Blob 0x21562 [10] @> Δ-10 {[«10""»]}
<POP 21572-215ae Naked> Σ-10 Δ+10 ↓ ←0x21550
<POP 21572-21574 StackAdj> Δ-4 {[-14-]}
<Lit 0x21574> {[-10-]|[$$…]}
<Pointer.sp 0x21574 4> Δ-4
<Const 0x21578 0x1.2> Δ-2
<Const 0x2157c 0x9.2> Δ-2
<Call 0x21580 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21586-21588 StackAdj> Δ+8
<Pointer.fp 0x21588 <LVAR -0x006 @ 4(r)>> Δ-4 {[-10-]|[$$…]|[@@-6]}
<Call 0x2158a 0x10460> {[-10-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 21590-21594 StackAdj> Δ+18 {}
<MI 21594 CLR.B -(A7)> Δ-2 {[#0]}
<MI 21596 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 2159a MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x2159c 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 215a2-215a4 StackAdj> Δ+8 {}
<Pointer.fp 0x215a4 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x215a6 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 215ac-215ae StackAdj> Δ+4 {}
<POP 215ae-215b6 Epilogue> Σ0
@ 215d2
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 215d2-21660 Body> Δ+14
<POP 215d2-215e8 Prologue> Σ0 ↓
<POP 215e8-215ee RegCacheLoad> Σ0 ↓
<POP 215ee-215fa Naked> Σ0 ↓ →0x2160c
<POP 215ee-215f0 StackAdj> Δ-2 {[-2-]}
<Call 0x215f0 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 215f6 TST.B (A7)+> Δ+2 {}
<MI 215f8 BEQ 0x2160c> {}
<POP 215fa-2160c Naked> Σ0 Δ-14 →0x2161c
<Blob 0x215fa [14] @> Δ-14 {[«14""»]}
<MI 2160a BRA 0x2161c> {[«14""»]}
<POP 2160c-2161c Naked> Σ0 Δ-14 ↓ ←0x215ee
<Blob 0x2160c [14] @> Δ-14 {[«14""»]}
<POP 2161c-21658 Naked> Σ-14 Δ+14 ↓ ←0x215fa
<POP 2161c-2161e StackAdj> Δ-4 {[-18-]}
<Lit 0x2161e> {[-14-]|[$$…]}
<Pointer.sp 0x2161e 4> Δ-4
<Const 0x21622 0x1.2> Δ-2
<Const 0x21626 0xd.2> Δ-2
<Call 0x2162a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21630-21632 StackAdj> Δ+8
<Pointer.fp 0x21632 <LVAR -0x006 @ 4(r)>> Δ-4 {[-14-]|[$$…]|[@@-6]}
<Call 0x21634 0x10460> {[-14-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 2163a-2163e StackAdj> Δ+22 {}
<MI 2163e CLR.B -(A7)> Δ-2 {[#0]}
<MI 21640 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 21644 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x21646 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 2164c-2164e StackAdj> Δ+8 {}
<Pointer.fp 0x2164e <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x21650 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 21656-21658 StackAdj> Δ+4 {}
<POP 21658-21660 Epilogue> Σ0
@ 21680
<LVAR 0x00e 1(r)>
<LVAR 0x00c 1(r)>
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 4(r)>
<POP 21680-21744 Body> Δ+16
<POP 21680-21696 Prologue> Σ0 ↓
<POP 21696-2169c RegCacheLoad> Σ0 ↓
<POP 2169c-216a8 Naked> Σ0 ↓ →0x216ba
<POP 2169c-2169e StackAdj> Δ-2 {[-2-]}
<Call 0x2169e 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 216a4 TST.B (A7)+> Δ+2 {}
<MI 216a6 BEQ 0x216ba> {}
<POP 216a8-216ba Naked> Σ0 Δ-16 →0x216ca
<Blob 0x216a8 [16] @> Δ-16 {[«16""»]}
<MI 216b8 BRA 0x216ca> {[«16""»]}
<POP 216ba-216ca Naked> Σ0 Δ-16 ↓ ←0x2169c
<Blob 0x216ba [16] @> Δ-16 {[«16""»]}
<POP 216ca-2173c Naked> Σ-16 Δ+16 ↓ ←0x216a8
<POP 216ca-216cc StackAdj> Δ-4 {[-20-]}
<Lit 0x216cc> {[-16-]|[$$…]}
<Pointer.sp 0x216cc 4> Δ-4
<Const 0x216d0 0x1.2> Δ-2
<Const 0x216d4 0xf.2> Δ-2
<Call 0x216d8 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 216de-216e0 StackAdj> Δ+8
<Pointer.fp 0x216e0 <LVAR -0x004 @ 4(r)>> Δ-4 {[-16-]|[$$…]|[@@-4]}
<Call 0x216e2 0x10460> {[-16-]|[$$…]|[@@-4]}
ExpLoad(a : String; b: Pointer)
<POP 216e8-216ec StackAdj> Δ+24 {}
<MI 216ec MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 216ee MOVE.B (A6+0xc),-(A7)> Δ-2 {[4, '(A6-0x4)']|[2, '(A6+0xc)']}
<Call 0x216f2 0x1046c> {[4, '(A6-0x4)']|[2, '(A6+0xc)']}
ExpInputFlag(exp : Pointer; val : Word)
<POP 216f8-216fa StackAdj> Δ+2 {[4, '(A6-0x4)']}
<MI 216fa MOVE.L (A6-0x4),(A7)> {[4, '(A6-0x4)']}
<MI 216fc MOVE.B (A6+0xa),-(A7)> Δ-2 {[4, '(A6-0x4)']|[2, '(A6+0xa)']}
<Call 0x21700 0x1046c> {[4, '(A6-0x4)']|[2, '(A6+0xa)']}
ExpInputFlag(exp : Pointer; val : Word)
<POP 21706-21708 StackAdj> Δ+4 {[-2-]}
<MI 21708 MOVE.B (A6+0x8),(A7)> {[-2-]}
<MI 2170c MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x4)']}
<Pointer.sp 0x2170e 4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]}
<Const 0x21712 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]}
<Const 0x21716 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
<Call 0x2171a 0x10466> {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 21720-21722 StackAdj> Δ+16 {[-2-]}
<MI 21722 CLR.B (A7)> {[-2-]}
<MI 21724 MOVE.B (A6+0xe),-(A7)> Δ-2 {[-2-]|[2, '(A6+0xe)']}
<MI 21728 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[2, '(A6+0xe)']|[4, '(A6-0x4)']}
<Call 0x2172a 0x104ba> {[-2-]|[2, '(A6+0xe)']|[4, '(A6-0x4)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 21730-21732 StackAdj> Δ+8 {}
<Pointer.fp 0x21732 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x21734 0x10496> {[@@-4]}
ExpClose(exp : Pointer)
<POP 2173a-2173c StackAdj> Δ+4 {}
<POP 2173c-21744 Epilogue> Σ0
@ 21768
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 21768-217ec Body> Δ+18
<POP 21768-2177e Prologue> Σ0 ↓
<POP 2177e-21782 RegCacheLoad> Σ0 ↓
<POP 21782-2178e Naked> Σ0 ↓ →0x2179c
<POP 21782-21784 StackAdj> Δ-2 {[-2-]}
<Call 0x21784 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2178a TST.B (A7)+> Δ+2 {}
<MI 2178c BEQ 0x2179c> {}
<POP 2178e-2179c Naked> Σ0 Δ-18 →0x217a8
<Blob 0x2178e [18] @> Δ-18 {[«18""»]}
<MI 2179a BRA 0x217a8> {[«18""»]}
<POP 2179c-217a8 Naked> Σ0 Δ-18 ↓ ←0x21782
<Blob 0x2179c [18] @> Δ-18 {[«18""»]}
<POP 217a8-217e4 Naked> Σ-18 Δ+18 ↓ ←0x2178e
<POP 217a8-217aa StackAdj> Δ-4 {[-22-]}
<Lit 0x217aa> {[-18-]|[$$…]}
<Pointer.sp 0x217aa 4> Δ-4
<Const 0x217ae 0x1.2> Δ-2
<Const 0x217b2 0x12.2> Δ-2
<Call 0x217b6 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 217bc-217be StackAdj> Δ+8
<Pointer.fp 0x217be <LVAR -0x006 @ 4(r)>> Δ-4 {[-18-]|[$$…]|[@@-6]}
<Call 0x217c0 0x10460> {[-18-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 217c6-217ca StackAdj> Δ+26 {}
<MI 217ca CLR.B -(A7)> Δ-2 {[#0]}
<MI 217cc MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 217d0 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x217d2 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 217d8-217da StackAdj> Δ+8 {}
<Pointer.fp 0x217da <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x217dc 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 217e2-217e4 StackAdj> Δ+4 {}
<POP 217e4-217ec Epilogue> Σ0
@ 2181c
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 2181c-218aa Body> Δ+24
<POP 2181c-21832 Prologue> Σ0 ↓
<POP 21832-21838 RegCacheLoad> Σ0 ↓
<POP 21838-21844 Naked> Σ0 ↓ →0x21856
<POP 21838-2183a StackAdj> Δ-2 {[-2-]}
<Call 0x2183a 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 21840 TST.B (A7)+> Δ+2 {}
<MI 21842 BEQ 0x21856> {}
<POP 21844-21856 Naked> Σ0 Δ-24 →0x21866
<Blob 0x21844 [24] @> Δ-24 {[«24""»]}
<MI 21854 BRA 0x21866> {[«24""»]}
<POP 21856-21866 Naked> Σ0 Δ-24 ↓ ←0x21838
<Blob 0x21856 [24] @> Δ-24 {[«24""»]}
<POP 21866-218a2 Naked> Σ-24 Δ+24 ↓ ←0x21844
<POP 21866-21868 StackAdj> Δ-4 {[-28-]}
<Lit 0x21868> {[-24-]|[$$…]}
<Pointer.sp 0x21868 4> Δ-4
<Const 0x2186c 0x1.2> Δ-2
<Const 0x21870 0x17.2> Δ-2
<Call 0x21874 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2187a-2187c StackAdj> Δ+8
<Pointer.fp 0x2187c <LVAR -0x006 @ 4(r)>> Δ-4 {[-24-]|[$$…]|[@@-6]}
<Call 0x2187e 0x10460> {[-24-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 21884-21888 StackAdj> Δ+32 {}
<MI 21888 CLR.B -(A7)> Δ-2 {[#0]}
<MI 2188a MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 2188e MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x21890 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 21896-21898 StackAdj> Δ+8 {}
<Pointer.fp 0x21898 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x2189a 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 218a0-218a2 StackAdj> Δ+4 {}
<POP 218a2-218aa Epilogue> Σ0
@ 218c6
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 218c6-2194a Body> Δ+14
<POP 218c6-218dc Prologue> Σ0 ↓
<POP 218dc-218e0 RegCacheLoad> Σ0 ↓
<POP 218e0-218ec Naked> Σ0 ↓ →0x218fa
<POP 218e0-218e2 StackAdj> Δ-2 {[-2-]}
<Call 0x218e2 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 218e8 TST.B (A7)+> Δ+2 {}
<MI 218ea BEQ 0x218fa> {}
<POP 218ec-218fa Naked> Σ0 Δ-14 →0x21906
<Blob 0x218ec [14] @> Δ-14 {[«14""»]}
<MI 218f8 BRA 0x21906> {[«14""»]}
<POP 218fa-21906 Naked> Σ0 Δ-14 ↓ ←0x218e0
<Blob 0x218fa [14] @> Δ-14 {[«14""»]}
<POP 21906-21942 Naked> Σ-14 Δ+14 ↓ ←0x218ec
<POP 21906-21908 StackAdj> Δ-4 {[-18-]}
<Lit 0x21908> {[-14-]|[$$…]}
<Pointer.sp 0x21908 4> Δ-4
<Const 0x2190c 0x1.2> Δ-2
<Const 0x21910 0xe.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 {[-14-]|[$$…]|[@@-6]}
<Call 0x2191e 0x10460> {[-14-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 21924-21928 StackAdj> Δ+22 {}
<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
@ 219c0
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 219c0-21a28 Body>
<POP 219c0-219d6 Prologue> Σ0 ↓
<POP 219d6-21a20 Naked> Σ0 ↓
<Blob 0x219d6 [14] @> Δ-14 {[«14""»]}
<Const 0x219e2 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 219e6-219e8 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x219e8 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 219fa-219fc StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 219fc MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 21a00 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 21a02 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 21a04 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x21a06 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 21a0c-21a0e StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x21a0e 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21a14-21a16 StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x21a16 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 21a1c-21a20 StackAdj> Δ+20 {}
<POP 21a20-21a28 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.924d5e60203f42dc 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 0f 98 | | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 1b 94 | | .PTR 0x21b94 00020010 code.end: 00020010 00 02 1a 28 | ( | .PTR 0x21a28 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 19 c0 | | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 04 7c | | | .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 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 00020118 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00020126 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00020134 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00020146 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 0002015e 53 42 55 53 55 4c 4f 41 |SBUSULOA| .TXT 'SBUSULOAD ' 00020168 44 42 55 53 55 4c 4f 41 |DBUSULOA| .TXT 'DBUSULOAD ' 00020172 49 4e 49 54 53 54 41 54 |INITSTAT| .TXT 'INITSTATE ' 0002017c 40 28 23 29 |@(#) | .XXX[0x4] 00020180 50 33 55 43 4f 44 45 2c |P3UCODE,| .XXX[0x170] 00020188 32 2e 30 2c 38 39 2f 31 |2.0,89/1| 00020190 30 2f 30 33 2c 31 37 3a |0/03,17:| 00020198 31 38 3a 31 39 5c 50 33 |18:19\P3| 000201a0 55 41 4c 4c 20 20 20 20 |UALL | 000201a8 50 33 55 43 4f 4e 44 20 |P3UCOND | 000201b0 20 20 50 33 55 53 59 53 | P3USYS| 000201b8 20 20 20 20 50 33 55 56 | P3UV| 000201c0 41 4c 20 20 20 20 50 33 |AL P3| 000201c8 55 54 59 50 20 20 20 20 |UTYP | 000201d0 50 33 55 53 45 51 20 20 |P3USEQ | 000201d8 20 20 50 33 55 46 49 55 | P3UFIU| 000201e0 20 20 20 20 50 33 55 4d | P3UM| 000201e8 45 4d 20 20 20 20 50 33 |EM P3| 000201f0 55 43 53 41 20 20 20 20 |UCSA | 000201f8 50 33 55 4d 4d 20 20 20 |P3UMM | 00020200 20 20 50 33 55 50 52 49 | P3UPRI| 00020208 56 20 20 20 50 33 55 43 |V P3UC| 00020210 4c 41 53 53 20 20 50 33 |LASS P3| 00020218 55 57 43 53 20 20 20 20 |UWCS | 00020220 50 33 55 53 57 43 53 20 |P3USWCS | 00020228 20 20 50 33 55 56 57 43 | P3UVWC| 00020230 53 20 20 20 50 33 55 54 |S P3UT| 00020238 57 43 53 20 20 20 50 33 |WCS P3| 00020240 55 51 57 43 53 20 20 20 |UQWCS | 00020248 50 33 55 46 57 43 53 20 |P3UFWCS | 00020250 20 20 50 33 55 54 41 47 | P3UTAG| 00020258 53 20 20 20 50 33 55 44 |S P3UD| 00020260 52 41 4d 20 20 20 50 33 |RAM P3| 00020268 55 52 46 20 20 20 20 20 |URF | 00020270 50 33 55 52 46 20 20 20 |P3URF | 00020278 20 20 50 33 55 53 42 55 | P3USBU| 00020280 46 46 20 20 50 33 55 44 |FF P3UD| 00020288 49 53 50 20 20 20 50 33 |ISP P3| 00020290 55 45 43 43 20 20 20 20 |UECC | 00020298 50 33 55 54 49 4d 45 52 |P3UTIMER| 000202a0 53 20 50 33 55 50 41 54 |S P3UPAT| 000202a8 48 53 20 20 50 33 55 53 |HS P3US| 000202b0 50 41 52 45 30 20 50 33 |PARE0 P3| 000202b8 55 53 50 41 52 45 31 20 |USPARE1 | 000202c0 50 33 55 53 50 41 52 45 |P3USPARE| 000202c8 32 20 50 33 55 53 50 41 |2 P3USPA| 000202d0 52 45 33 20 50 33 55 53 |RE3 P3US| 000202d8 50 41 52 45 34 20 50 33 |PARE4 P3| 000202e0 55 43 4f 44 45 2e 4d 31 |UCODE.M1| 000202e8 30 30 5f 55 43 4f 44 45 |00_UCODE| 000202f0 50 33 55 43 4f 44 45 2e |P3UCODE.| .TXT 'P3UCODE.M200_UCODE' 00020302 50 33 55 43 4f 44 45 20 |P3UCODE | .TXT 'P3UCODE ' 0002030a 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal test name for P3UCODE.' 00020328 50 33 55 41 4c 4c 20 20 |P3UALL | .XXX[0x140] 00020330 20 20 50 33 55 43 4f 4e | P3UCON| 00020338 44 20 20 20 50 33 55 53 |D P3US| 00020340 59 53 20 20 20 20 50 33 |YS P3| 00020348 55 56 41 4c 20 20 20 20 |UVAL | 00020350 50 33 55 54 59 50 20 20 |P3UTYP | 00020358 20 20 50 33 55 53 45 51 | P3USEQ| 00020360 20 20 20 20 50 33 55 46 | P3UF| 00020368 49 55 20 20 20 20 50 33 |IU P3| 00020370 55 4d 45 4d 20 20 20 20 |UMEM | 00020378 50 33 55 43 53 41 20 20 |P3UCSA | 00020380 20 20 50 33 55 4d 4d 20 | P3UMM | 00020388 20 20 20 20 50 33 55 50 | P3UP| 00020390 52 49 56 20 20 20 50 33 |RIV P3| 00020398 55 43 4c 41 53 53 20 20 |UCLASS | 000203a0 50 33 55 57 43 53 20 20 |P3UWCS | 000203a8 20 20 50 33 55 53 57 43 | P3USWC| 000203b0 53 20 20 20 50 33 55 56 |S P3UV| 000203b8 57 43 53 20 20 20 50 33 |WCS P3| 000203c0 55 54 57 43 53 20 20 20 |UTWCS | 000203c8 50 33 55 51 57 43 53 20 |P3UQWCS | 000203d0 20 20 50 33 55 46 57 43 | P3UFWC| 000203d8 53 20 20 20 50 33 55 54 |S P3UT| 000203e0 41 47 53 20 20 20 50 33 |AGS P3| 000203e8 55 44 52 41 4d 20 20 20 |UDRAM | 000203f0 50 33 55 52 46 20 20 20 |P3URF | 000203f8 20 20 50 33 55 52 46 20 | P3URF | 00020400 20 20 20 20 50 33 55 53 | P3US| 00020408 42 55 46 46 20 20 50 33 |BUFF P3| 00020410 55 44 49 53 50 20 20 20 |UDISP | 00020418 50 33 55 45 43 43 20 20 |P3UECC | 00020420 20 20 50 33 55 54 49 4d | P3UTIM| 00020428 45 52 53 20 50 33 55 50 |ERS P3UP| 00020430 41 54 48 53 20 20 50 33 |ATHS P3| 00020438 55 53 50 41 52 45 30 20 |USPARE0 | 00020440 50 33 55 53 50 41 52 45 |P3USPARE| 00020448 31 20 50 33 55 53 50 41 |1 P3USPA| 00020450 52 45 32 20 50 33 55 53 |RE2 P3US| 00020458 50 41 52 45 33 20 50 33 |PARE3 P3| 00020460 55 53 50 41 52 45 34 20 |USPARE4 | 00020468 00 00 00 00 | | .CONST 0x0,0x0,0x0,0x0 0002046c 00 00 00 00 | | .CONST 0x0,0x0,0x0,0x0 00020470 05 01 04 07 06 02 03 0c | | .XXX[0x8] 00020478 0d 0e 0f 01 | | .XXX[0x4] 0002047c ; -------------------------------------------------------------------------------------- 0002047c ; OMSI PASCAL Function 0002047c ; <LVAR 0x00e 1(r)> 0002047c ; <LVAR 0x00a 4(r)> 0002047c ; <LVAR 0x008 1(r)> 0002047c ; -------------------------------------------------------------------------------------- 0002047c EXP_FAIL: 0002047c 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 00020480 bf d5 | | CMPA.L (A5),A7 00020482 62 06 |b | BHI 0x2048a 00020484 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020488 4e 76 |Nv | TRAPV 0002048a de fc 00 74 | t | ADDA.W #0x74,A7 0002048e 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00020492 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00020498 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 0002049e 72 01 |r | MOVEQ.L #0x01,D1 000204a0 74 0d |t | MOVEQ.L #0x0d,D2 000204a2 76 1e |v | MOVEQ.L #0x1e,D3 000204a4 78 12 |x | MOVEQ.L #0x12,D4 000204a6 7a 0e |z | MOVEQ.L #0x0e,D5 000204a8 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000204ae 41 fa fc 96 |A | LEA.L 0x20146,A0 000204b2 70 08 |p | MOVEQ.L #0x08,D0 000204b4 3f 20 |? | MOVE.W -(A0),-(A7) 000204b6 51 c8 ff fc |Q | DBF D0,0x204b4 000204ba 59 4f |YO | SUBQ.L #0x4,A7 000204bc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000204c0 3f 01 |? | MOVE.W D1,-(A7) 000204c2 3f 04 |? | MOVE.W D4,-(A7) 000204c4 4e 93 |N | JSR (A3) 000204c6 50 4f |PO | ADDQ.L #0x8,A7 000204c8 4e 94 |N | JSR (A4) 000204ca 50 4f |PO | ADDQ.L #0x8,A7 000204cc 20 4f | O | MOVEA.L A7,A0 000204ce 43 fa fc 3a |C : | LEA.L 0x2010a,A1 000204d2 70 0c |p | MOVEQ.L #0x0c,D0 000204d4 10 d9 | | MOVE.B (A1)+,(A0)+ 000204d6 51 c8 ff fc |Q | DBF D0,0x204d4 000204da 51 4f |QO | SUBQ.L #0x8,A7 000204dc 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000204e0 3f 01 |? | MOVE.W D1,-(A7) 000204e2 3f 02 |? | MOVE.W D2,-(A7) 000204e4 4e 93 |N | JSR (A3) 000204e6 54 4f |TO | ADDQ.L #0x2,A7 000204e8 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 000204ec 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 000204f2 54 4f |TO | ADDQ.L #0x2,A7 000204f4 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000204fa 50 4f |PO | ADDQ.L #0x8,A7 000204fc 4e 94 |N | JSR (A4) 000204fe de c4 | | ADDA.W D4,A7 00020500 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00020504 b0 c1 | | CMPA.W D1,A0 00020506 67 48 |gH | BEQ 0x20550 00020508 9e c5 | | SUBA.W D5,A7 0002050a 22 4f |"O | MOVEA.L A7,A1 0002050c 45 fa fc 0a |E | LEA.L 0x20118,A2 00020510 70 0c |p | MOVEQ.L #0x0c,D0 00020512 12 da | | MOVE.B (A2)+,(A1)+ 00020514 51 c8 ff fc |Q | DBF D0,0x20512 00020518 9e c3 | | SUBA.W D3,A7 0002051a 22 4f |"O | MOVEA.L A7,A1 0002051c 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00020520 70 1d |p | MOVEQ.L #0x1d,D0 00020522 12 d8 | | MOVE.B (A0)+,(A1)+ 00020524 51 c8 ff fc |Q | DBF D0,0x20522 00020528 51 4f |QO | SUBQ.L #0x8,A7 0002052a 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 0002052e 3f 01 |? | MOVE.W D1,-(A7) 00020530 3f 02 |? | MOVE.W D2,-(A7) 00020532 4e 93 |N | JSR (A3) 00020534 58 4f |XO | ADDQ.L #0x4,A7 00020536 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002053a 3f 01 |? | MOVE.W D1,-(A7) 0002053c 3f 03 |? | MOVE.W D3,-(A7) 0002053e 4e 93 |N | JSR (A3) 00020540 50 4f |PO | ADDQ.L #0x8,A7 00020542 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020548 50 4f |PO | ADDQ.L #0x8,A7 0002054a 4e 94 |N | JSR (A4) 0002054c de fc 00 30 | 0 | ADDA.W #0x30,A7 00020550 9e c5 | | SUBA.W D5,A7 00020552 20 4f | O | MOVEA.L A7,A0 00020554 43 fa fb d0 |C | LEA.L 0x20126,A1 00020558 70 0c |p | MOVEQ.L #0x0c,D0 0002055a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002055c 51 c8 ff fc |Q | DBF D0,0x2055a 00020560 51 4f |QO | SUBQ.L #0x8,A7 00020562 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020566 3f 01 |? | MOVE.W D1,-(A7) 00020568 3f 02 |? | MOVE.W D2,-(A7) 0002056a 4e 93 |N | JSR (A3) 0002056c 54 4f |TO | ADDQ.L #0x2,A7 0002056e 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00020572 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00020578 54 4f |TO | ADDQ.L #0x2,A7 0002057a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020580 50 4f |PO | ADDQ.L #0x8,A7 00020582 4e 94 |N | JSR (A4) 00020584 5d 4f |]O | SUBQ.L #0x6,A7 00020586 20 4f | O | MOVEA.L A7,A0 00020588 43 fa fb bc |C | LEA.L 0x20146,A1 0002058c 70 16 |p | MOVEQ.L #0x16,D0 0002058e 10 d9 | | MOVE.B (A1)+,(A0)+ 00020590 51 c8 ff fc |Q | DBF D0,0x2058e 00020594 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020598 59 4f |YO | SUBQ.L #0x4,A7 0002059a 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002059e 3f 01 |? | MOVE.W D1,-(A7) 000205a0 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 000205a4 4e 93 |N | JSR (A3) 000205a6 50 4f |PO | ADDQ.L #0x8,A7 000205a8 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000205ae de c3 | | ADDA.W D3,A7 000205b0 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 000205b4 4e 5e |N^ | UNLK A6 000205b6 4e 75 |Nu | RTS 000205b8 ; -------------------------------------------------------------------------------------- 000205b8 ; OMSI PASCAL Function 000205b8 ; <LVAR 0x016 1(r)> 000205b8 ; <LVAR 0x012 4(r)> 000205b8 ; <LVAR 0x010 1(r)> 000205b8 ; <LVAR 0x00e 1(r)> 000205b8 ; <LVAR 0x00c 1(r)> 000205b8 ; <LVAR 0x008 4(r)> 000205b8 ; <LVAR -0x004 @> 000205b8 ; -------------------------------------------------------------------------------------- 000205b8 4e 56 ff cc |NV | LINK.W A6,#0xffcc 000205bc bf d5 | | CMPA.L (A5),A7 000205be 62 06 |b | BHI 0x205c6 000205c0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000205c4 4e 76 |Nv | TRAPV 000205c6 de fc 00 30 | 0 | ADDA.W #0x30,A7 000205ca 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000205ce 45 f9 00 01 05 02 |E | LEA.L IPC_PutBool(a : Bool),A2 000205d4 72 0a |r | MOVEQ.L #0x0a,D1 000205d6 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000205dc 2f 2e 00 12 |/. | MOVE.L (A6+0x12),-(A7) 000205e0 4e b9 00 01 05 08 |N | JSR IPC_PutString(a : String) 000205e6 54 4f |TO | ADDQ.L #0x2,A7 000205e8 1e ae 00 10 | | MOVE.B (A6+0x10),(A7) 000205ec 4e 92 |N | JSR (A2) 000205ee 54 4f |TO | ADDQ.L #0x2,A7 000205f0 4a 2e 00 16 |J. | TST.B (A6+0x16) 000205f4 66 0e |f | BNE 0x20604 000205f6 1f 2e 00 0e | . | MOVE.B (A6+0xe),-(A7) 000205fa 4e 92 |N | JSR (A2) 000205fc 1e ae 00 0c | | MOVE.B (A6+0xc),(A7) 00020600 4e 92 |N | JSR (A2) 00020602 54 4f |TO | ADDQ.L #0x2,A7 00020604 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 0002060a 4a 2e 00 16 |J. | TST.B (A6+0x16) 0002060e 67 12 |g | BEQ 0x20622 00020610 9e c1 | | SUBA.W D1,A7 00020612 20 4f | O | MOVEA.L A7,A0 00020614 43 fa fb 48 |C H | LEA.L 0x2015e,A1 00020618 70 08 |p | MOVEQ.L #0x08,D0 0002061a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002061c 51 c8 ff fc |Q | DBF D0,0x2061a 00020620 60 10 |` | BRA 0x20632 00020622 9e c1 | | SUBA.W D1,A7 00020624 20 4f | O | MOVEA.L A7,A0 00020626 43 fa fb 40 |C @ | LEA.L 0x20168,A1 0002062a 70 08 |p | MOVEQ.L #0x08,D0 0002062c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002062e 51 c8 ff fc |Q | DBF D0,0x2062c 00020632 59 4f |YO | SUBQ.L #0x4,A7 00020634 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020638 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002063c 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00020640 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020646 50 4f |PO | ADDQ.L #0x8,A7 00020648 48 78 00 01 |Hx | PEA.L 0x1 0002064c 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020650 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020654 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 0002065a de fc 00 18 | | ADDA.W #0x18,A7 0002065e 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020664 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020668 48 50 |HP | PEA.L (A0) 0002066a 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020670 58 4f |XO | ADDQ.L #0x4,A7 00020672 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 00020678 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 0002067c 4e 5e |N^ | UNLK A6 0002067e 4e 75 |Nu | RTS 00020680 ; -------------------------------------------------------------------------------------- 00020680 ; OMSI PASCAL Function 00020680 ; <LVAR 0x00c 1(r)> 00020680 ; <LVAR 0x008 4(r)> 00020680 ; <LVAR -0x002 @> 00020680 ; -------------------------------------------------------------------------------------- 00020680 4e 56 ff d6 |NV | LINK.W A6,#0xffd6 00020684 bf d5 | | CMPA.L (A5),A7 00020686 62 06 |b | BHI 0x2068e 00020688 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002068c 4e 76 |Nv | TRAPV 0002068e de fc 00 28 | ( | ADDA.W #0x28,A7 00020692 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00020696 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 0002069c 1f 2e 00 0c | . | MOVE.B (A6+0xc),-(A7) 000206a0 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 000206a6 54 4f |TO | ADDQ.L #0x2,A7 000206a8 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 000206ae 9e fc 00 0a | | SUBA.W #0xa,A7 000206b2 20 4f | O | MOVEA.L A7,A0 000206b4 43 fa fa bc |C | LEA.L 0x20172,A1 000206b8 70 08 |p | MOVEQ.L #0x08,D0 000206ba 10 d9 | | MOVE.B (A1)+,(A0)+ 000206bc 51 c8 ff fc |Q | DBF D0,0x206ba 000206c0 59 4f |YO | SUBQ.L #0x4,A7 000206c2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000206c6 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000206ca 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 000206ce 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000206d4 50 4f |PO | ADDQ.L #0x8,A7 000206d6 48 78 00 01 |Hx | PEA.L 0x1 000206da 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000206de 48 6e ff fe |Hn | PEA.L (A6-0x2) 000206e2 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 000206e8 de fc 00 18 | | ADDA.W #0x18,A7 000206ec 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000206f2 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000206f6 48 50 |HP | PEA.L (A0) 000206f8 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 000206fe 58 4f |XO | ADDQ.L #0x4,A7 00020700 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 00020706 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 0002070a 4e 5e |N^ | UNLK A6 0002070c 4e 75 |Nu | RTS 0002070e ; -------------------------------------------------------------------------------------- 0002070e ; OMSI PASCAL Function 0002070e ; <LVAR 0x008 4(r)> 0002070e ; -------------------------------------------------------------------------------------- 0002070e 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 ; Spelunked 00020712 bf d5 | | CMPA.L (A5),A7 00020714 62 06 |b | BHI 0x2071c 00020716 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002071a 4e 76 |Nv | TRAPV 0002071c de fc 00 0c | | ADDA.W #0xc,A7 00020720 48 e7 00 80 |H | MOVEM.L A0,-(A7) 00020724 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 0002072a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002072e 48 50 |HP | PEA.L (A0) 00020730 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020736 58 4f |XO | ADDQ.L #0x4,A7 00020738 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 0002073e 4c df 01 00 |L | MOVEM.L (A7)+,A0 00020742 4e 5e |N^ | UNLK A6 00020744 4e 75 |Nu | RTS 00020746 ; -------------------------------------------------------------------------------------- 00020746 ; OMSI PASCAL Function 00020746 ; <LVAR 0x008 1(r)> 00020746 ; -------------------------------------------------------------------------------------- 00020746 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 ; Spelunked 0002074a bf d5 | | CMPA.L (A5),A7 0002074c 62 06 |b | BHI 0x20754 0002074e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020752 4e 76 |Nv | TRAPV 00020754 de fc 00 0a | | ADDA.W #0xa,A7 00020758 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 0002075e 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00020762 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00020768 54 4f |TO | ADDQ.L #0x2,A7 0002076a 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 00020770 42 27 |B' | CLR.B -(A7) 00020772 48 78 00 01 |Hx | PEA.L 0x1 00020776 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002077c 5c 4f |\O | ADDQ.L #0x6,A7 0002077e 4e 5e |N^ | UNLK A6 00020780 4e 75 |Nu | RTS 00020782 ; -------------------------------------------------------------------------------------- 00020782 ; OMSI PASCAL Function 00020782 ; <LVAR -0x004 1(rw)> 00020782 ; -------------------------------------------------------------------------------------- 00020782 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00020786 bf d5 | | CMPA.L (A5),A7 00020788 62 06 |b | BHI 0x20790 0002078a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002078e 4e 76 |Nv | TRAPV 00020790 de fc 00 24 | $ | ADDA.W #0x24,A7 00020794 48 e7 e1 80 |H | MOVEM.L A0+D7+D2+D1+D0,-(A7) 00020798 41 ee ff fc |A | LEA.L (A6-0x4),A0 0002079c 72 0f |r | MOVEQ.L #0x0f,D1 0002079e 74 01 |t | MOVEQ.L #0x01,D2 000207a0 55 4f |UO | SUBQ.L #0x2,A7 000207a2 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000207a8 4a 1f |J | TST.B (A7)+ 000207aa 67 08 |g | BEQ 0x207b4 000207ac 4e b9 00 02 11 4c |N L | JSR exp_LOAD_HRAM_8_0.FIU() 000207b2 60 06 |` | BRA 0x207ba 000207b4 4e b9 00 02 11 6a |N j | JSR exp_LOAD_HRAM_32_0.FIU() 000207ba 4e b9 00 02 11 fa |N | JSR exp_LOAD_HRAM_1.FIU() 000207c0 4e b9 00 02 14 38 |N 8 | JSR exp_ALIGN_CSA.VAL() 000207c6 4e b9 00 02 13 b6 |N | JSR exp_ALIGN_CSA.TYP() 000207cc 42 10 |B | CLR.B (A0) 000207ce 7e 0c |~ | MOVEQ.L #0x0c,D7 000207d0 55 4f |UO | SUBQ.L #0x2,A7 000207d2 1f 07 | | MOVE.B D7,-(A7) 000207d4 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 000207da 54 4f |TO | ADDQ.L #0x2,A7 000207dc 4a 1f |J | TST.B (A7)+ 000207de 67 0c |g | BEQ 0x207ec 000207e0 42 80 |B | CLR.L D0 000207e2 10 10 | | MOVE.B (A0),D0 000207e4 52 40 |R@ | ADDQ.W #0x1,D0 000207e6 41 bc 00 ff |A | CHK.W #0xff,D0 000207ea 10 80 | | MOVE.B D0,(A0) 000207ec 52 07 |R | ADDQ.B #0x1,D7 000207ee be 01 | | CMP.B D1,D7 000207f0 6f de |o | BLE 0x207d0 000207f2 7e 0c |~ | MOVEQ.L #0x0c,D7 000207f4 55 4f |UO | SUBQ.L #0x2,A7 000207f6 1f 07 | | MOVE.B D7,-(A7) 000207f8 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 000207fe 54 4f |TO | ADDQ.L #0x2,A7 00020800 4a 1f |J | TST.B (A7)+ 00020802 67 3a |g: | BEQ 0x2083e 00020804 1f 07 | | MOVE.B D7,-(A7) 00020806 55 4f |UO | SUBQ.L #0x2,A7 00020808 1f 07 | | MOVE.B D7,-(A7) 0002080a 4e b9 00 01 04 c6 |N | JSR EQ_1c218(a : Byte) : Bool 00020810 54 4f |TO | ADDQ.L #0x2,A7 00020812 10 17 | | MOVE.B (A7),D0 00020814 48 80 |H | EXTB.W D0 00020816 41 82 |A | CHK.W D2,D0 00020818 1e 80 | | MOVE.B D0,(A7) 0002081a 55 4f |UO | SUBQ.L #0x2,A7 0002081c 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00020822 10 17 | | MOVE.B (A7),D0 00020824 48 80 |H | EXTB.W D0 00020826 41 82 |A | CHK.W D2,D0 00020828 1e 80 | | MOVE.B D0,(A7) 0002082a 1f 10 | | MOVE.B (A0),-(A7) 0002082c 4e b9 00 02 16 80 |N | JSR 0x21680 00020832 5c 4f |\O | ADDQ.L #0x6,A7 00020834 1e 87 | | MOVE.B D7,(A7) 00020836 4e b9 00 02 17 68 |N h | JSR 0x21768 0002083c 54 4f |TO | ADDQ.L #0x2,A7 0002083e 52 07 |R | ADDQ.B #0x1,D7 00020840 be 01 | | CMP.B D1,D7 00020842 6f b0 |o | BLE 0x207f4 00020844 4e b9 00 01 05 b0 |N | JSR FifoInit(void) 0002084a 3f 3c ff ff |?< | MOVE.W #0xffff,-(A7) 0002084e 3f 3c ff ff |?< | MOVE.W #0xffff,-(A7) 00020852 4e b9 00 02 11 d6 |N | JSR exp_LOAD_REFRESH_REGS.FIU(Sw_2, Sw_2) 00020858 58 4f |XO | ADDQ.L #0x4,A7 0002085a 4c df 01 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0 0002085e 4e 5e |N^ | UNLK A6 00020860 4e 75 |Nu | RTS 00020862 ; -------------------------------------------------------------------------------------- 00020862 ; OMSI PASCAL Function 00020862 ; <LVAR 0x008 2(r)> 00020862 ; <LVAR -0x002 1(rw)> 00020862 ; -------------------------------------------------------------------------------------- 00020862 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00020866 bf d5 | | CMPA.L (A5),A7 00020868 62 06 |b | BHI 0x20870 0002086a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002086e 4e 76 |Nv | TRAPV 00020870 de fc 00 2c | , | ADDA.W #0x2c,A7 00020874 48 e7 f0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7) 00020878 41 f9 00 01 04 c0 |A | LEA.L HasBoard(diproc_addr: Byte) : Byte,A0 0002087e 43 ee ff fe |C | LEA.L (A6-0x2),A1 00020882 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00020886 47 f9 00 02 14 6a |G j | LEA.L 0x2146a,A3 0002088c 49 f9 00 02 18 c6 |I | LEA.L 0x218c6,A4 00020892 70 0c |p | MOVEQ.L #0x0c,D0 00020894 72 0d |r | MOVEQ.L #0x0d,D1 00020896 74 0e |t | MOVEQ.L #0x0e,D2 00020898 76 0f |v | MOVEQ.L #0x0f,D3 0002089a 4e b9 00 02 13 94 |N | JSR exp_LOAD_BENIGN_UWORD.TYP() 000208a0 55 4f |UO | SUBQ.L #0x2,A7 000208a2 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000208a8 4a 1f |J | TST.B (A7)+ 000208aa 67 04 |g | BEQ 0x208b0 000208ac 42 11 |B | CLR.B (A1) 000208ae 60 04 |` | BRA 0x208b4 000208b0 12 bc 00 ff | | MOVE.B #0xff,(A1) 000208b4 55 4f |UO | SUBQ.L #0x2,A7 000208b6 1f 00 | | MOVE.B D0,-(A7) 000208b8 4e 90 |N | JSR (A0) 000208ba 54 4f |TO | ADDQ.L #0x2,A7 000208bc 4a 1f |J | TST.B (A7)+ 000208be 67 08 |g | BEQ 0x208c8 000208c0 1f 00 | | MOVE.B D0,-(A7) 000208c2 1f 11 | | MOVE.B (A1),-(A7) 000208c4 4e 93 |N | JSR (A3) 000208c6 58 4f |XO | ADDQ.L #0x4,A7 000208c8 55 4f |UO | SUBQ.L #0x2,A7 000208ca 1f 01 | | MOVE.B D1,-(A7) 000208cc 4e 90 |N | JSR (A0) 000208ce 54 4f |TO | ADDQ.L #0x2,A7 000208d0 4a 1f |J | TST.B (A7)+ 000208d2 67 08 |g | BEQ 0x208dc 000208d4 1f 01 | | MOVE.B D1,-(A7) 000208d6 1f 11 | | MOVE.B (A1),-(A7) 000208d8 4e 93 |N | JSR (A3) 000208da 58 4f |XO | ADDQ.L #0x4,A7 000208dc 55 4f |UO | SUBQ.L #0x2,A7 000208de 1f 02 | | MOVE.B D2,-(A7) 000208e0 4e 90 |N | JSR (A0) 000208e2 54 4f |TO | ADDQ.L #0x2,A7 000208e4 4a 1f |J | TST.B (A7)+ 000208e6 67 08 |g | BEQ 0x208f0 000208e8 1f 02 | | MOVE.B D2,-(A7) 000208ea 1f 11 | | MOVE.B (A1),-(A7) 000208ec 4e 93 |N | JSR (A3) 000208ee 58 4f |XO | ADDQ.L #0x4,A7 000208f0 55 4f |UO | SUBQ.L #0x2,A7 000208f2 1f 03 | | MOVE.B D3,-(A7) 000208f4 4e 90 |N | JSR (A0) 000208f6 54 4f |TO | ADDQ.L #0x2,A7 000208f8 4a 1f |J | TST.B (A7)+ 000208fa 67 08 |g | BEQ 0x20904 000208fc 1f 03 | | MOVE.B D3,-(A7) 000208fe 1f 11 | | MOVE.B (A1),-(A7) 00020900 4e 93 |N | JSR (A3) 00020902 58 4f |XO | ADDQ.L #0x4,A7 00020904 4e b9 00 02 12 16 |N | JSR exp_INIT_MRU.FIU() 0002090a 55 4f |UO | SUBQ.L #0x2,A7 0002090c 1f 00 | | MOVE.B D0,-(A7) 0002090e 4e 90 |N | JSR (A0) 00020910 54 4f |TO | ADDQ.L #0x2,A7 00020912 4a 1f |J | TST.B (A7)+ 00020914 67 06 |g | BEQ 0x2091c 00020916 1f 00 | | MOVE.B D0,-(A7) 00020918 4e 94 |N | JSR (A4) 0002091a 54 4f |TO | ADDQ.L #0x2,A7 0002091c 55 4f |UO | SUBQ.L #0x2,A7 0002091e 1f 01 | | MOVE.B D1,-(A7) 00020920 4e 90 |N | JSR (A0) 00020922 54 4f |TO | ADDQ.L #0x2,A7 00020924 4a 1f |J | TST.B (A7)+ 00020926 67 06 |g | BEQ 0x2092e 00020928 1f 01 | | MOVE.B D1,-(A7) 0002092a 4e 94 |N | JSR (A4) 0002092c 54 4f |TO | ADDQ.L #0x2,A7 0002092e 55 4f |UO | SUBQ.L #0x2,A7 00020930 1f 02 | | MOVE.B D2,-(A7) 00020932 4e 90 |N | JSR (A0) 00020934 54 4f |TO | ADDQ.L #0x2,A7 00020936 4a 1f |J | TST.B (A7)+ 00020938 67 06 |g | BEQ 0x20940 0002093a 1f 02 | | MOVE.B D2,-(A7) 0002093c 4e 94 |N | JSR (A4) 0002093e 54 4f |TO | ADDQ.L #0x2,A7 00020940 55 4f |UO | SUBQ.L #0x2,A7 00020942 1f 03 | | MOVE.B D3,-(A7) 00020944 4e 90 |N | JSR (A0) 00020946 54 4f |TO | ADDQ.L #0x2,A7 00020948 4a 1f |J | TST.B (A7)+ 0002094a 67 06 |g | BEQ 0x20952 0002094c 1f 03 | | MOVE.B D3,-(A7) 0002094e 4e 94 |N | JSR (A4) 00020950 54 4f |TO | ADDQ.L #0x2,A7 00020952 3f 12 |? | MOVE.W (A2),-(A7) 00020954 4e b9 00 02 13 40 |N @ | JSR exp_PREP_RUN.TYP(Sw_2) 0002095a 3e 92 |> | MOVE.W (A2),(A7) 0002095c 4e b9 00 02 14 02 |N | JSR exp_PREP_RUN.VAL(Sw_2) 00020962 54 4f |TO | ADDQ.L #0x2,A7 00020964 3f 12 |? | MOVE.W (A2),-(A7) 00020966 4e b9 00 02 19 98 |N | JSR exp_PREP_RUN.IOC(Sw_2) 0002096c 54 4f |TO | ADDQ.L #0x2,A7 0002096e 3f 12 |? | MOVE.W (A2),-(A7) 00020970 4e b9 00 02 12 7e |N ~ | JSR exp_PREP_RUN.SEQ(Sw_2) 00020976 3e 92 |> | MOVE.W (A2),(A7) 00020978 4e b9 00 02 11 bc |N | JSR exp_PREP_RUN.FIU(Sw_2) 0002097e 1f 00 | | MOVE.B D0,-(A7) 00020980 4e 90 |N | JSR (A0) 00020982 54 4f |TO | ADDQ.L #0x2,A7 00020984 4a 1f |J | TST.B (A7)+ 00020986 67 0a |g | BEQ 0x20992 00020988 1f 00 | | MOVE.B D0,-(A7) 0002098a 4e b9 00 02 18 1c |N | JSR 0x2181c 00020990 54 4f |TO | ADDQ.L #0x2,A7 00020992 55 4f |UO | SUBQ.L #0x2,A7 00020994 1f 01 | | MOVE.B D1,-(A7) 00020996 4e 90 |N | JSR (A0) 00020998 54 4f |TO | ADDQ.L #0x2,A7 0002099a 4a 1f |J | TST.B (A7)+ 0002099c 67 0a |g | BEQ 0x209a8 0002099e 1f 01 | | MOVE.B D1,-(A7) 000209a0 4e b9 00 02 18 1c |N | JSR 0x2181c 000209a6 54 4f |TO | ADDQ.L #0x2,A7 000209a8 55 4f |UO | SUBQ.L #0x2,A7 000209aa 1f 02 | | MOVE.B D2,-(A7) 000209ac 4e 90 |N | JSR (A0) 000209ae 54 4f |TO | ADDQ.L #0x2,A7 000209b0 4a 1f |J | TST.B (A7)+ 000209b2 67 0a |g | BEQ 0x209be 000209b4 1f 02 | | MOVE.B D2,-(A7) 000209b6 4e b9 00 02 18 1c |N | JSR 0x2181c 000209bc 54 4f |TO | ADDQ.L #0x2,A7 000209be 55 4f |UO | SUBQ.L #0x2,A7 000209c0 1f 03 | | MOVE.B D3,-(A7) 000209c2 4e 90 |N | JSR (A0) 000209c4 54 4f |TO | ADDQ.L #0x2,A7 000209c6 4a 1f |J | TST.B (A7)+ 000209c8 67 0a |g | BEQ 0x209d4 000209ca 1f 03 | | MOVE.B D3,-(A7) 000209cc 4e b9 00 02 18 1c |N | JSR 0x2181c 000209d2 54 4f |TO | ADDQ.L #0x2,A7 000209d4 4c df 1f 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4 000209d8 4e 5e |N^ | UNLK A6 000209da 4e 75 |Nu | RTS 000209dc ; -------------------------------------------------------------------------------------- 000209dc ; OMSI PASCAL Function 000209dc ; -------------------------------------------------------------------------------------- 000209dc 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 000209e0 bf d5 | | CMPA.L (A5),A7 000209e2 62 06 |b | BHI 0x209ea 000209e4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000209e8 4e 76 |Nv | TRAPV 000209ea de fc 00 20 | | ADDA.W #0x20,A7 000209ee 48 e7 f0 c0 |H | MOVEM.L A1+A0+D3+D2+D1+D0,-(A7) 000209f2 41 f9 00 01 04 c0 |A | LEA.L HasBoard(diproc_addr: Byte) : Byte,A0 000209f8 43 f9 00 02 15 d2 |C | LEA.L 0x215d2,A1 000209fe 70 0c |p | MOVEQ.L #0x0c,D0 00020a00 72 0d |r | MOVEQ.L #0x0d,D1 00020a02 74 0e |t | MOVEQ.L #0x0e,D2 00020a04 76 0f |v | MOVEQ.L #0x0f,D3 00020a06 4e b9 00 02 12 30 |N 0 | JSR exp_FREEZE_WORLD.FIU() 00020a0c 4e b9 00 02 12 f0 |N | JSR exp_RUN_NORMAL.TYP() 00020a12 4e b9 00 02 13 d0 |N | JSR exp_RUN_NORMAL.VAL() 00020a18 4e b9 00 02 12 64 |N d | JSR exp_RUN_CHECK.SEQ() 00020a1e 4e b9 00 02 19 7e |N ~ | JSR exp_RUN_CHECK.IOC() 00020a24 55 4f |UO | SUBQ.L #0x2,A7 00020a26 1f 00 | | MOVE.B D0,-(A7) 00020a28 4e 90 |N | JSR (A0) 00020a2a 54 4f |TO | ADDQ.L #0x2,A7 00020a2c 4a 1f |J | TST.B (A7)+ 00020a2e 67 06 |g | BEQ 0x20a36 00020a30 1f 00 | | MOVE.B D0,-(A7) 00020a32 4e 91 |N | JSR (A1) 00020a34 54 4f |TO | ADDQ.L #0x2,A7 00020a36 55 4f |UO | SUBQ.L #0x2,A7 00020a38 1f 01 | | MOVE.B D1,-(A7) 00020a3a 4e 90 |N | JSR (A0) 00020a3c 54 4f |TO | ADDQ.L #0x2,A7 00020a3e 4a 1f |J | TST.B (A7)+ 00020a40 67 06 |g | BEQ 0x20a48 00020a42 1f 01 | | MOVE.B D1,-(A7) 00020a44 4e 91 |N | JSR (A1) 00020a46 54 4f |TO | ADDQ.L #0x2,A7 00020a48 55 4f |UO | SUBQ.L #0x2,A7 00020a4a 1f 02 | | MOVE.B D2,-(A7) 00020a4c 4e 90 |N | JSR (A0) 00020a4e 54 4f |TO | ADDQ.L #0x2,A7 00020a50 4a 1f |J | TST.B (A7)+ 00020a52 67 06 |g | BEQ 0x20a5a 00020a54 1f 02 | | MOVE.B D2,-(A7) 00020a56 4e 91 |N | JSR (A1) 00020a58 54 4f |TO | ADDQ.L #0x2,A7 00020a5a 55 4f |UO | SUBQ.L #0x2,A7 00020a5c 1f 03 | | MOVE.B D3,-(A7) 00020a5e 4e 90 |N | JSR (A0) 00020a60 54 4f |TO | ADDQ.L #0x2,A7 00020a62 4a 1f |J | TST.B (A7)+ 00020a64 67 06 |g | BEQ 0x20a6c 00020a66 1f 03 | | MOVE.B D3,-(A7) 00020a68 4e 91 |N | JSR (A1) 00020a6a 54 4f |TO | ADDQ.L #0x2,A7 00020a6c 4e b9 00 02 11 8a |N | JSR exp_RUN_NORMAL.FIU() 00020a72 4c df 03 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1 00020a76 4e 5e |N^ | UNLK A6 00020a78 4e 75 |Nu | RTS 00020a7a ; -------------------------------------------------------------------------------------- 00020a7a ; OMSI PASCAL Function 00020a7a ; <LVAR 0x010 4(r)> 00020a7a ; <LVAR 0x00c 4(r)> 00020a7a ; <LVAR 0x008 4(r)> 00020a7a ; <LVAR -0x004 @> 00020a7a ; <LVAR -0x005 @ 1(rw)> 00020a7a ; <LVAR -0x006 @> 00020a7a ; <LVAR -0x007 @ 1(r)> 00020a7a ; -------------------------------------------------------------------------------------- 00020a7a 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 00020a7e bf d5 | | CMPA.L (A5),A7 00020a80 62 06 |b | BHI 0x20a88 00020a82 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020a86 4e 76 |Nv | TRAPV 00020a88 de fc 00 46 | F | ADDA.W #0x46,A7 00020a8c 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020a90 43 f9 00 01 04 c0 |C | LEA.L HasBoard(diproc_addr: Byte) : Byte,A1 00020a96 45 f9 00 02 15 28 |E ( | LEA.L 0x21528,A2 00020a9c 47 ee ff fb |G | LEA.L (A6-0x5),A3 00020aa0 74 0e |t | MOVEQ.L #0x0e,D2 00020aa2 76 01 |v | MOVEQ.L #0x01,D3 00020aa4 78 0c |x | MOVEQ.L #0x0c,D4 00020aa6 7a 0d |z | MOVEQ.L #0x0d,D5 00020aa8 7c 0f || | MOVEQ.L #0x0f,D6 00020aaa 4e b9 00 02 12 30 |N 0 | JSR exp_FREEZE_WORLD.FIU() 00020ab0 4e b9 00 02 19 68 |N h | JSR exp_RESET.IOC() 00020ab6 4e b9 00 02 13 ec |N | JSR exp_RESET.VAL() 00020abc 4e b9 00 02 13 0c |N | JSR exp_RESET.TYP() 00020ac2 4e b9 00 02 12 4e |N N | JSR exp_RESET.SEQ() 00020ac8 55 4f |UO | SUBQ.L #0x2,A7 00020aca 1f 04 | | MOVE.B D4,-(A7) 00020acc 4e 91 |N | JSR (A1) 00020ace 54 4f |TO | ADDQ.L #0x2,A7 00020ad0 4a 1f |J | TST.B (A7)+ 00020ad2 67 06 |g | BEQ 0x20ada 00020ad4 1f 04 | | MOVE.B D4,-(A7) 00020ad6 4e 92 |N | JSR (A2) 00020ad8 54 4f |TO | ADDQ.L #0x2,A7 00020ada 55 4f |UO | SUBQ.L #0x2,A7 00020adc 1f 05 | | MOVE.B D5,-(A7) 00020ade 4e 91 |N | JSR (A1) 00020ae0 54 4f |TO | ADDQ.L #0x2,A7 00020ae2 4a 1f |J | TST.B (A7)+ 00020ae4 67 06 |g | BEQ 0x20aec 00020ae6 1f 05 | | MOVE.B D5,-(A7) 00020ae8 4e 92 |N | JSR (A2) 00020aea 54 4f |TO | ADDQ.L #0x2,A7 00020aec 55 4f |UO | SUBQ.L #0x2,A7 00020aee 1f 02 | | MOVE.B D2,-(A7) 00020af0 4e 91 |N | JSR (A1) 00020af2 54 4f |TO | ADDQ.L #0x2,A7 00020af4 4a 1f |J | TST.B (A7)+ 00020af6 67 06 |g | BEQ 0x20afe 00020af8 1f 02 | | MOVE.B D2,-(A7) 00020afa 4e 92 |N | JSR (A2) 00020afc 54 4f |TO | ADDQ.L #0x2,A7 00020afe 55 4f |UO | SUBQ.L #0x2,A7 00020b00 1f 06 | | MOVE.B D6,-(A7) 00020b02 4e 91 |N | JSR (A1) 00020b04 54 4f |TO | ADDQ.L #0x2,A7 00020b06 4a 1f |J | TST.B (A7)+ 00020b08 67 06 |g | BEQ 0x20b10 00020b0a 1f 06 | | MOVE.B D6,-(A7) 00020b0c 4e 92 |N | JSR (A2) 00020b0e 54 4f |TO | ADDQ.L #0x2,A7 00020b10 4e b9 00 02 11 a6 |N | JSR exp_RESET.FIU() 00020b16 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00020b1a 48 50 |HP | PEA.L (A0) 00020b1c 4e b9 00 02 12 98 |N | JSR exp_HALT.SEQ(&Fr) 00020b22 58 4f |XO | ADDQ.L #0x4,A7 00020b24 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00020b28 42 10 |B | CLR.B (A0) 00020b2a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020b2e 42 10 |B | CLR.B (A0) 00020b30 42 28 00 0b |B( | CLR.B (A0+0xb) 00020b34 42 28 00 01 |B( | CLR.B (A0+0x1) 00020b38 7e 02 |~ | MOVEQ.L #0x02,D7 00020b3a 0c 07 00 05 | | CMPI.B #0x05,D7 00020b3e 67 20 |g | BEQ 0x20b60 00020b40 10 07 | | MOVE.B D7,D0 00020b42 48 80 |H | EXTB.W D0 00020b44 41 fa f9 2a |A * | LEA.L 0x20470,A0 00020b48 1f 30 00 00 | 0 | MOVE.B (A0+D0.W),-(A7) 00020b4c 48 6e ff fa |Hn | PEA.L (A6-0x6) 00020b50 48 53 |HS | PEA.L (A3) 00020b52 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020b56 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 00020b5c de c2 | | ADDA.W D2,A7 00020b5e 60 1a |` | BRA 0x20b7a 00020b60 48 6e ff f9 |Hn | PEA.L (A6-0x7) 00020b64 4e b9 00 02 12 ae |N | JSR exp_GET_MISC_ERRORS.SEQ(&Sr_1) 00020b6a 58 4f |XO | ADDQ.L #0x4,A7 00020b6c 42 80 |B | CLR.L D0 00020b6e 10 2e ff f9 | . | MOVE.B (A6-0x7),D0 00020b72 0c 40 00 1f | @ | CMPI.W #0x001f,D0 00020b76 67 02 |g | BEQ 0x20b7a 00020b78 16 83 | | MOVE.B D3,(A3) 00020b7a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020b7e 10 07 | | MOVE.B D7,D0 00020b80 48 80 |H | EXTB.W D0 00020b82 3f 00 |? | MOVE.W D0,-(A7) 00020b84 12 13 | | MOVE.B (A3),D1 00020b86 48 81 |H | EXTB.W D1 00020b88 43 83 |C | CHK.W D3,D1 00020b8a 11 81 00 00 | | MOVE.B D1,(A0+D0.W) 00020b8e 4a 41 |JA | TST.W D1 00020b90 67 06 |g | BEQ 0x20b98 00020b92 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00020b96 10 83 | | MOVE.B D3,(A0) 00020b98 3e 1f |> | MOVE.W (A7)+,D7 00020b9a 52 47 |RG | ADDQ.W #0x1,D7 00020b9c 0c 47 00 0a | G | CMPI.W #0x000a,D7 00020ba0 6f 98 |o | BLE 0x20b3a 00020ba2 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 00020ba6 4e 5e |N^ | UNLK A6 00020ba8 4e 75 |Nu | RTS 00020baa ; -------------------------------------------------------------------------------------- 00020baa ; OMSI PASCAL Function 00020baa ; <LVAR 0x008 2(r)> 00020baa ; -------------------------------------------------------------------------------------- 00020baa 4e 56 ff be |NV | LINK.W A6,#0xffbe 00020bae bf d5 | | CMPA.L (A5),A7 00020bb0 62 06 |b | BHI 0x20bb8 00020bb2 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020bb6 4e 76 |Nv | TRAPV 00020bb8 de fc 00 3c | < | ADDA.W #0x3c,A7 00020bbc 48 e7 e0 e8 |H | MOVEM.L A4+A2+A1+A0+D2+D1+D0,-(A7) 00020bc0 43 f9 00 02 1a 3a |C : | LEA.L 0x21a3a,A1 00020bc6 45 f9 00 02 1a 34 |E 4 | LEA.L 0x21a34,A2 00020bcc 72 01 |r | MOVEQ.L #0x01,D1 00020bce 74 0a |t | MOVEQ.L #0x0a,D2 00020bd0 48 51 |HQ | PEA.L (A1) 00020bd2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020bd8 58 4f |XO | ADDQ.L #0x4,A7 00020bda 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00020bde 41 bc 00 1f |A | CHK.W #0x1f,D0 00020be2 c1 c2 | | MULS.W D2,D0 00020be4 41 fa f7 42 |A B | LEA.L 0x20328,A0 00020be8 41 f0 00 0a |A | LEA.L (A0+D0.W+#0xa),A0 00020bec 70 04 |p | MOVEQ.L #0x04,D0 00020bee 3f 20 |? | MOVE.W -(A0),-(A7) 00020bf0 51 c8 ff fc |Q | DBF D0,0x20bee 00020bf4 59 4f |YO | SUBQ.L #0x4,A7 00020bf6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020bfa 3f 01 |? | MOVE.W D1,-(A7) 00020bfc 3f 02 |? | MOVE.W D2,-(A7) 00020bfe 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020c04 50 4f |PO | ADDQ.L #0x8,A7 00020c06 22 9f |" | MOVE.L (A7)+,(A1) 00020c08 54 4f |TO | ADDQ.L #0x2,A7 00020c0a 2e 91 |. | MOVE.L (A1),(A7) 00020c0c 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00020c12 58 4f |XO | ADDQ.L #0x4,A7 00020c14 28 5f |(_ | MOVEA.L (A7)+,A4 00020c16 4a 12 |J | TST.B (A2) 00020c18 67 3e |g> | BEQ 0x20c58 00020c1a 2f 0c |/ | MOVE.L A4,-(A7) 00020c1c 10 12 | | MOVE.B (A2),D0 00020c1e 48 80 |H | EXTB.W D0 00020c20 41 81 |A | CHK.W D1,D0 00020c22 1f 00 | | MOVE.B D0,-(A7) 00020c24 10 39 00 02 1a 35 | 9 5 | MOVE.B 0x21a35,D0 00020c2a 48 80 |H | EXTB.W D0 00020c2c 41 81 |A | CHK.W D1,D0 00020c2e 1f 00 | | MOVE.B D0,-(A7) 00020c30 48 79 00 02 1a 36 |Hy 6 | PEA.L 0x21a36 00020c36 48 79 00 02 1a 3e |Hy > | PEA.L 0x21a3e 00020c3c 48 79 00 02 1a 42 |Hy B | PEA.L 0x21a42 00020c42 48 79 00 02 1a 46 |Hy F | PEA.L 0x21a46 00020c48 48 79 00 02 1a 47 |Hy G | PEA.L 0x21a47 00020c4e 4e b9 00 01 05 3e |N > | JSR FSCALL_1053e 00020c54 de fc 00 1c | | ADDA.W #0x1c,A7 00020c58 4c df 17 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A4 00020c5c 4e 5e |N^ | UNLK A6 00020c5e 4e 75 |Nu | RTS 00020c60 ; -------------------------------------------------------------------------------------- 00020c60 ; OMSI PASCAL Function 00020c60 ; <LVAR 0x008 1(r)> 00020c60 ; -------------------------------------------------------------------------------------- 00020c60 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00020c64 bf d5 | | CMPA.L (A5),A7 00020c66 62 06 |b | BHI 0x20c6e 00020c68 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020c6c 4e 76 |Nv | TRAPV 00020c6e de fc 00 2c | , | ADDA.W #0x2c,A7 00020c72 48 e7 80 f0 |H | MOVEM.L A3+A2+A1+A0+D0,-(A7) 00020c76 45 f9 00 02 1a 46 |E F | LEA.L 0x21a46,A2 00020c7c 47 f9 00 02 1a 47 |G G | LEA.L 0x21a47,A3 00020c82 14 ae 00 08 | | MOVE.B (A6+0x8),(A2) 00020c86 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00020c8a 0c 00 00 02 | | CMPI.B #0x02,D0 00020c8e 67 04 |g | BEQ 0x20c94 00020c90 16 bc 00 29 | ) | MOVE.B #0x29,(A3) 00020c94 42 27 |B' | CLR.B -(A7) 00020c96 2f 39 00 02 1a 3e |/9 > | MOVE.L 0x21a3e,-(A7) 00020c9c 2f 39 00 02 1a 42 |/9 B | MOVE.L 0x21a42,-(A7) 00020ca2 1f 12 | | MOVE.B (A2),-(A7) 00020ca4 51 4f |QO | SUBQ.L #0x8,A7 00020ca6 20 4f | O | MOVEA.L A7,A0 00020ca8 22 4b |"K | MOVEA.L A3,A1 00020caa 70 07 |p | MOVEQ.L #0x07,D0 00020cac 10 d9 | | MOVE.B (A1)+,(A0)+ 00020cae 51 c8 ff fc |Q | DBF D0,0x20cac 00020cb2 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 00020cb8 de fc 00 14 | | ADDA.W #0x14,A7 00020cbc 4c df 0f 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2+A3 00020cc0 4e 5e |N^ | UNLK A6 00020cc2 4e 75 |Nu | RTS 00020cc4 ; -------------------------------------------------------------------------------------- 00020cc4 ; OMSI PASCAL Function 00020cc4 ; <LVAR -0x005 1(r)> 00020cc4 ; <LVAR -0x006 @ 1(r) 2(r)> 00020cc4 ; <LVAR -0x012 @> 00020cc4 ; <LVAR -0x013 @ 1(r)> 00020cc4 ; <LVAR -0x014 @ 1(r)> 00020cc4 ; -------------------------------------------------------------------------------------- 00020cc4 4e 56 ff a2 |NV | LINK.W A6,#0xffa2 00020cc8 bf d5 | | CMPA.L (A5),A7 00020cca 62 06 |b | BHI 0x20cd2 00020ccc 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020cd0 4e 76 |Nv | TRAPV 00020cd2 de fc 00 4a | J | ADDA.W #0x4a,A7 00020cd6 48 e7 f9 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 00020cda 43 ee ff ec |C | LEA.L (A6-0x14),A1 00020cde 45 ee ff ed |E | LEA.L (A6-0x13),A2 00020ce2 47 ee ff fa |G | LEA.L (A6-0x6),A3 00020ce6 36 3c 00 ff |6< | MOVE.W #0xff,D3 00020cea 78 1f |x | MOVEQ.L #0x1f,D4 00020cec 48 51 |HQ | PEA.L (A1) 00020cee 48 52 |HR | PEA.L (A2) 00020cf0 48 6e ff ee |Hn | PEA.L (A6-0x12) 00020cf4 4e ba fd 84 |N | JSR 0x20a7a 00020cf8 de fc 00 0c | | ADDA.W #0xc,A7 00020cfc 48 53 |HS | PEA.L (A3) 00020cfe 4e b9 00 02 19 4a |N J | JSR exp_READ_LAST_PC.IOC(&Sr_2) 00020d04 58 4f |XO | ADDQ.L #0x4,A7 00020d06 3f 13 |? | MOVE.W (A3),-(A7) 00020d08 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020d0c 4a 11 |J | TST.B (A1) 00020d0e 67 36 |g6 | BEQ 0x20d46 00020d10 4a 12 |J | TST.B (A2) 00020d12 66 32 |f2 | BNE 0x20d46 00020d14 55 4f |UO | SUBQ.L #0x2,A7 00020d16 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020d1a 48 78 00 00 |Hx | PEA.L 0x0 00020d1e 48 78 00 01 |Hx | PEA.L 0x1 00020d22 48 6f 00 0e |Ho | PEA.L (A7+0xe) 00020d26 48 78 00 00 |Hx | PEA.L 0x0 00020d2a 48 78 00 01 |Hx | PEA.L 0x1 00020d2e 4e b9 00 01 04 a8 |N | JSR ?FS104a8(VAR : Pointer; b : L; c : L ; VAR : Pointer; e: L; f : L) : Bool 00020d34 de fc 00 18 | | ADDA.W #0x18,A7 00020d38 4a 1f |J | TST.B (A7)+ 00020d3a 67 0a |g | BEQ 0x20d46 00020d3c 58 4f |XO | ADDQ.L #0x4,A7 00020d3e 60 00 00 90 |` | BRA 0x20dd0 00020d42 60 00 00 8a |` | .XXX[0x4] 00020d46 4a 12 |J | TST.B (A2) 00020d48 66 04 |f | BNE 0x20d4e 00020d4a 4a 11 |J | TST.B (A1) 00020d4c 67 76 |gv | BEQ 0x20dc4 00020d4e 7e 00 |~ | MOVEQ.L #0x00,D7 00020d50 4f 84 |O | CHK.W D4,D7 00020d52 30 07 |0 | MOVE.W D7,D0 00020d54 e7 40 | @ | ASL.W #0x3,D0 00020d56 41 f9 00 02 1a 28 |A ( | LEA.L 0x21a28,A0 00020d5c 42 81 |B | CLR.L D1 00020d5e 12 30 00 32 | 0 2 | MOVE.B (A0+D0.W+#0x32),D1 00020d62 c2 43 | C | AND.W D3,D1 00020d64 11 81 00 32 | 2 | MOVE.B D1,(A0+D0.W+#0x32) 00020d68 4a 01 |J | TST.B D1 00020d6a 67 4c |gL | BEQ 0x20db8 00020d6c 42 81 |B | CLR.L D1 00020d6e 12 30 00 30 | 0 0 | MOVE.B (A0+D0.W+#0x30),D1 00020d72 c2 43 | C | AND.W D3,D1 00020d74 11 81 00 30 | 0 | MOVE.B D1,(A0+D0.W+#0x30) 00020d78 42 81 |B | CLR.L D1 00020d7a 12 30 00 31 | 0 1 | MOVE.B (A0+D0.W+#0x31),D1 00020d7e c2 43 | C | AND.W D3,D1 00020d80 11 81 00 31 | 1 | MOVE.B D1,(A0+D0.W+#0x31) 00020d84 42 81 |B | CLR.L D1 00020d86 12 30 00 33 | 0 3 | MOVE.B (A0+D0.W+#0x33),D1 00020d8a c2 43 | C | AND.W D3,D1 00020d8c 11 81 00 33 | 3 | MOVE.B D1,(A0+D0.W+#0x33) 00020d90 14 13 | | MOVE.B (A3),D2 00020d92 b4 30 00 32 | 0 2 | CMP.B (A0+D0.W+#0x32),D2 00020d96 65 20 |e | BCS 0x20db8 00020d98 b2 2e ff fb | . | CMP.B (A6-0x5),D1 00020d9c 62 1a |b | BHI 0x20db8 00020d9e b4 30 00 30 | 0 0 | CMP.B (A0+D0.W+#0x30),D2 00020da2 62 14 |b | BHI 0x20db8 00020da4 12 2e ff fb | . | MOVE.B (A6-0x5),D1 00020da8 b2 30 00 31 | 0 1 | CMP.B (A0+D0.W+#0x31),D1 00020dac 62 0a |b | BHI 0x20db8 00020dae 3f 07 |? | MOVE.W D7,-(A7) 00020db0 4e ba fd f8 |N | JSR 0x20baa 00020db4 5c 4f |\O | ADDQ.L #0x6,A7 00020db6 60 18 |` | BRA 0x20dd0 00020db8 52 47 |RG | ADDQ.W #0x1,D7 00020dba be 44 | D | CMP.W D4,D7 00020dbc 6f 92 |o | BLE 0x20d50 00020dbe 1f 3c 00 01 | < | MOVE.B #0x01,-(A7) 00020dc2 60 04 |` | BRA 0x20dc8 00020dc4 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020dc8 4e ba fe 96 |N | JSR 0x20c60 00020dcc 54 4f |TO | ADDQ.L #0x2,A7 00020dce 58 4f |XO | ADDQ.L #0x4,A7 00020dd0 4c df 0f 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3 00020dd4 4e 5e |N^ | UNLK A6 00020dd6 4e 75 |Nu | RTS 00020dd8 ; -------------------------------------------------------------------------------------- 00020dd8 ; OMSI PASCAL Function 00020dd8 ; <LVAR -0x006 @ 1(r)> 00020dd8 ; <LVAR -0x007 @> 00020dd8 ; <LVAR -0x008 @> 00020dd8 ; -------------------------------------------------------------------------------------- 00020dd8 4e 56 ff be |NV | LINK.W A6,#0xffbe 00020ddc bf d5 | | CMPA.L (A5),A7 00020dde 62 06 |b | BHI 0x20de6 00020de0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020de4 4e 76 |Nv | TRAPV 00020de6 de fc 00 3a | : | ADDA.W #0x3a,A7 00020dea 48 e7 e3 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D2+D1+D0,-(A7) 00020dee 41 ee ff fa |A | LEA.L (A6-0x6),A0 00020df2 43 ee ff f8 |C | LEA.L (A6-0x8),A1 00020df6 45 ee ff f9 |E | LEA.L (A6-0x7),A2 00020dfa 47 f9 00 01 04 84 |G | LEA.L DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool),A3 00020e00 72 0e |r | MOVEQ.L #0x0e,D1 00020e02 74 01 |t | MOVEQ.L #0x01,D2 00020e04 7e 00 |~ | MOVEQ.L #0x00,D7 00020e06 2f 3c 00 00 98 96 |/< | MOVE.L #0x9896,-(A7) 00020e0c 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 00020e12 54 4f |TO | ADDQ.L #0x2,A7 00020e14 1e bc 00 04 | | MOVE.B #0x04,(A7) 00020e18 48 51 |HQ | PEA.L (A1) 00020e1a 48 50 |HP | PEA.L (A0) 00020e1c 48 52 |HR | PEA.L (A2) 00020e1e 4e 93 |N | JSR (A3) 00020e20 de c1 | | ADDA.W D1,A7 00020e22 10 07 | | MOVE.B D7,D0 00020e24 80 10 | | OR.B (A0),D0 00020e26 48 80 |H | EXTB.W D0 00020e28 41 82 |A | CHK.W D2,D0 00020e2a 1e 00 | | MOVE.B D0,D7 00020e2c 1f 3c 00 07 | < | MOVE.B #0x07,-(A7) 00020e30 48 51 |HQ | PEA.L (A1) 00020e32 48 50 |HP | PEA.L (A0) 00020e34 48 52 |HR | PEA.L (A2) 00020e36 4e 93 |N | JSR (A3) 00020e38 de c1 | | ADDA.W D1,A7 00020e3a 10 07 | | MOVE.B D7,D0 00020e3c 80 10 | | OR.B (A0),D0 00020e3e 48 80 |H | EXTB.W D0 00020e40 41 82 |A | CHK.W D2,D0 00020e42 1e 00 | | MOVE.B D0,D7 00020e44 1f 3c 00 06 | < | MOVE.B #0x06,-(A7) 00020e48 48 51 |HQ | PEA.L (A1) 00020e4a 48 50 |HP | PEA.L (A0) 00020e4c 48 52 |HR | PEA.L (A2) 00020e4e 4e 93 |N | JSR (A3) 00020e50 de c1 | | ADDA.W D1,A7 00020e52 10 07 | | MOVE.B D7,D0 00020e54 80 10 | | OR.B (A0),D0 00020e56 48 80 |H | EXTB.W D0 00020e58 41 82 |A | CHK.W D2,D0 00020e5a 1e 00 | | MOVE.B D0,D7 00020e5c 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020e60 48 51 |HQ | PEA.L (A1) 00020e62 48 50 |HP | PEA.L (A0) 00020e64 48 52 |HR | PEA.L (A2) 00020e66 4e 93 |N | JSR (A3) 00020e68 de c1 | | ADDA.W D1,A7 00020e6a 10 07 | | MOVE.B D7,D0 00020e6c 80 10 | | OR.B (A0),D0 00020e6e 48 80 |H | EXTB.W D0 00020e70 41 82 |A | CHK.W D2,D0 00020e72 1e 00 | | MOVE.B D0,D7 00020e74 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00020e78 48 51 |HQ | PEA.L (A1) 00020e7a 48 50 |HP | PEA.L (A0) 00020e7c 48 52 |HR | PEA.L (A2) 00020e7e 4e 93 |N | JSR (A3) 00020e80 de c1 | | ADDA.W D1,A7 00020e82 10 07 | | MOVE.B D7,D0 00020e84 80 10 | | OR.B (A0),D0 00020e86 48 80 |H | EXTB.W D0 00020e88 41 82 |A | CHK.W D2,D0 00020e8a 1e 00 | | MOVE.B D0,D7 00020e8c 7c 0c || | MOVEQ.L #0x0c,D6 00020e8e 55 4f |UO | SUBQ.L #0x2,A7 00020e90 1f 06 | | MOVE.B D6,-(A7) 00020e92 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00020e98 54 4f |TO | ADDQ.L #0x2,A7 00020e9a 4a 1f |J | TST.B (A7)+ 00020e9c 67 16 |g | BEQ 0x20eb4 00020e9e 1f 06 | | MOVE.B D6,-(A7) 00020ea0 48 51 |HQ | PEA.L (A1) 00020ea2 48 50 |HP | PEA.L (A0) 00020ea4 48 52 |HR | PEA.L (A2) 00020ea6 4e 93 |N | JSR (A3) 00020ea8 de c1 | | ADDA.W D1,A7 00020eaa 10 07 | | MOVE.B D7,D0 00020eac 80 10 | | OR.B (A0),D0 00020eae 48 80 |H | EXTB.W D0 00020eb0 41 82 |A | CHK.W D2,D0 00020eb2 1e 00 | | MOVE.B D0,D7 00020eb4 52 06 |R | ADDQ.B #0x1,D6 00020eb6 0c 06 00 0f | | CMPI.B #0x0f,D6 00020eba 6f d2 |o | BLE 0x20e8e 00020ebc 4a 07 |J | TST.B D7 00020ebe 67 00 ff 46 |g F | BEQ 0x20e06 00020ec2 4c df 0f c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0+A1+A2+A3 00020ec6 4e 5e |N^ | UNLK A6 00020ec8 4e 75 |Nu | RTS 00020eca ; -------------------------------------------------------------------------------------- 00020eca ; OMSI PASCAL Function 00020eca ; <LVAR -0x006 1(r)> 00020eca ; <LVAR -0x007 @ 1(r)> 00020eca ; <LVAR -0x008 1(rw)> 00020eca ; -------------------------------------------------------------------------------------- 00020eca 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00020ece bf d5 | | CMPA.L (A5),A7 00020ed0 62 06 |b | BHI 0x20ed8 00020ed2 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020ed6 4e 76 |Nv | TRAPV 00020ed8 de fc 00 20 | | ADDA.W #0x20,A7 00020edc 48 e7 c1 80 |H | MOVEM.L A0+D7+D1+D0,-(A7) 00020ee0 72 1f |r | MOVEQ.L #0x1f,D1 00020ee2 7e 00 |~ | MOVEQ.L #0x00,D7 00020ee4 0c 87 00 00 00 ff | | CMPI.L #0x000000ff,D7 00020eea 63 02 |c | BLS 0x20eee 00020eec 4e 4f |NO | TRAP #15 00020eee 1d 47 ff f8 | G | MOVE.B D7,(A6-0x8) 00020ef2 1f 3c 00 06 | < | MOVE.B #0x06,-(A7) 00020ef6 1f 2e ff f8 | . | MOVE.B (A6-0x8),-(A7) 00020efa 48 6e ff f9 |Hn | PEA.L (A6-0x7) 00020efe 4e b9 00 02 12 d0 |N | JSR exp_REG_TO_LOOP.TYP(Sw_1, Sw_1, &Sr_2) 00020f04 50 4f |PO | ADDQ.L #0x8,A7 00020f06 4e b9 00 02 13 5a |N Z | JSR exp_PREP_READ_REG.TYP() 00020f0c 55 4f |UO | SUBQ.L #0x2,A7 00020f0e 1e ae ff f9 | | MOVE.B (A6-0x7),(A7) 00020f12 1f 6e ff fa 00 01 | n | MOVE.B (A6-0x6),(A7+0x1) 00020f18 42 27 |B' | CLR.B -(A7) 00020f1a be 81 | | CMP.L D1,D7 00020f1c 63 02 |c | BLS 0x20f20 00020f1e 4e 4f |NO | TRAP #15 00020f20 20 07 | | MOVE.L D7,D0 00020f22 e7 80 | | ASL.L #0x3,D0 00020f24 41 f9 00 02 1a 28 |A ( | LEA.L 0x21a28,A0 00020f2a 48 70 08 2c |Hp , | PEA.L (A0+D0.L+#0x2c) 00020f2e 4e b9 00 02 13 22 |N " | JSR exp_READ_B_REG.TYP(Sw_2, Sw_1, &Sr_8) 00020f34 50 4f |PO | ADDQ.L #0x8,A7 00020f36 52 87 |R | ADDQ.L #0x1,D7 00020f38 be 81 | | CMP.L D1,D7 00020f3a 6f a8 |o | BLE 0x20ee4 00020f3c 4c df 01 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0 00020f40 4e 5e |N^ | UNLK A6 00020f42 4e 75 |Nu | RTS 00020f44 ; -------------------------------------------------------------------------------------- 00020f44 ; OMSI PASCAL Function 00020f44 ; <LVAR -0x004 @> 00020f44 ; -------------------------------------------------------------------------------------- 00020f44 4e 56 ff ca |NV | LINK.W A6,#0xffca 00020f48 bf d5 | | CMPA.L (A5),A7 00020f4a 62 06 |b | BHI 0x20f52 00020f4c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020f50 4e 76 |Nv | TRAPV 00020f52 de fc 00 32 | 2 | ADDA.W #0x32,A7 00020f56 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00020f5a 72 01 |r | MOVEQ.L #0x01,D1 00020f5c 41 fa f3 a4 |A | LEA.L 0x20302,A0 00020f60 70 08 |p | MOVEQ.L #0x08,D0 00020f62 3f 20 |? | MOVE.W -(A0),-(A7) 00020f64 51 c8 ff fc |Q | DBF D0,0x20f62 00020f68 42 27 |B' | CLR.B -(A7) 00020f6a 59 4f |YO | SUBQ.L #0x4,A7 00020f6c 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020f70 3f 01 |? | MOVE.W D1,-(A7) 00020f72 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00020f76 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020f7c 5c 4f |\O | ADDQ.L #0x6,A7 00020f7e 1e 81 | | MOVE.B D1,(A7) 00020f80 1f 01 | | MOVE.B D1,-(A7) 00020f82 1f 01 | | MOVE.B D1,-(A7) 00020f84 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020f88 4e ba f6 2e |N . | JSR 0x205b8 00020f8c de fc 00 22 | " | ADDA.W #0x22,A7 00020f90 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00020f94 4e 5e |N^ | UNLK A6 00020f96 4e 75 |Nu | RTS 00020f98 ; -------------------------------------------------------------------------------------- 00020f98 ; OMSI PASCAL Function 00020f98 ; -------------------------------------------------------------------------------------- 00020f98 START: 00020f98 4f fa 00 08 |O | LEA.L MAIN,A7 00020f9c 4e f9 00 01 02 80 |N | JMP ?start_program 00020fa2 MAIN: 00020fa2 45 f9 00 02 1a 32 |E 2 | LEA.L 0x21a32,A2 00020fa8 47 f9 00 02 1a 35 |G 5 | LEA.L 0x21a35,A3 00020fae 49 f9 00 02 1a 37 |I 7 | LEA.L 0x21a37,A4 00020fb4 72 01 |r | MOVEQ.L #0x01,D1 00020fb6 74 07 |t | MOVEQ.L #0x07,D2 00020fb8 4e b9 00 01 03 98 |N | JSR FSCALL_10398 00020fbe 48 78 00 03 |Hx | PEA.L 0x3 00020fc2 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 00020fc8 58 4f |XO | ADDQ.L #0x4,A7 00020fca 48 52 |HR | PEA.L (A2) 00020fcc 48 79 00 02 1a 34 |Hy 4 | PEA.L 0x21a34 00020fd2 48 53 |HS | PEA.L (A3) 00020fd4 48 54 |HT | PEA.L (A4) 00020fd6 48 79 00 02 1a 38 |Hy 8 | PEA.L 0x21a38 00020fdc 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) 00020fe2 de fc 00 12 | | ADDA.W #0x12,A7 00020fe6 1e 93 | | MOVE.B (A3),(A7) 00020fe8 4e b9 00 01 04 d2 |N | JSR SetExpInitDone(a : Byte) 00020fee 5d 4f |]O | SUBQ.L #0x6,A7 00020ff0 20 4f | O | MOVEA.L A7,A0 00020ff2 43 fa f3 0e |C | LEA.L 0x20302,A1 00020ff6 70 06 |p | MOVEQ.L #0x06,D0 00020ff8 10 d9 | | MOVE.B (A1)+,(A0)+ 00020ffa 51 c8 ff fc |Q | DBF D0,0x20ff8 00020ffe 59 4f |YO | SUBQ.L #0x4,A7 00021000 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021004 3f 01 |? | MOVE.W D1,-(A7) 00021006 3f 02 |? | MOVE.W D2,-(A7) 00021008 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002100e 50 4f |PO | ADDQ.L #0x8,A7 00021010 23 df 00 02 1a 3e |# > | MOVE.L (A7)+,0x21a3e 00021016 50 4f |PO | ADDQ.L #0x8,A7 00021018 48 79 00 02 1a 42 |Hy B | PEA.L 0x21a42 0002101e 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00021024 58 4f |XO | ADDQ.L #0x4,A7 00021026 48 79 00 02 1a 3a |Hy : | PEA.L 0x21a3a 0002102c 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00021032 58 4f |XO | ADDQ.L #0x4,A7 00021034 42 39 00 02 1a 46 |B9 F | CLR.B 0x21a46 0002103a 70 00 |p | MOVEQ.L #0x00,D0 0002103c 23 c0 00 02 1a 50 |# P | MOVE.L D0,0x21a50 00021042 b0 82 | | CMP.L D2,D0 00021044 63 02 |c | BLS 0x21048 00021046 4e 4f |NO | TRAP #15 00021048 41 f9 00 02 1a 28 |A ( | LEA.L 0x21a28,A0 0002104e 42 30 08 1f |B0 | CLR.B (A0+D0.L+#0x1f) 00021052 52 80 |R | ADDQ.L #0x1,D0 00021054 b0 82 | | CMP.L D2,D0 00021056 6f e4 |o | BLE 0x2103c 00021058 13 c1 00 02 1a 36 | 6 | MOVE.B D1,0x21a36 0002105e 42 80 |B | CLR.L D0 00021060 10 12 | | MOVE.B (A2),D0 00021062 0c 40 00 20 | @ | CMPI.W #0x0020,D0 00021066 63 2e |c. | BLS 0x21096 00021068 41 fa f2 be |A | LEA.L 0x20328,A0 0002106c 70 0e |p | MOVEQ.L #0x0e,D0 0002106e 3f 20 |? | MOVE.W -(A0),-(A7) 00021070 51 c8 ff fc |Q | DBF D0,0x2106e 00021074 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00021078 59 4f |YO | SUBQ.L #0x4,A7 0002107a 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002107e 3f 01 |? | MOVE.W D1,-(A7) 00021080 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00021084 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002108a 50 4f |PO | ADDQ.L #0x8,A7 0002108c 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021092 de fc 00 24 | $ | ADDA.W #0x24,A7 00021096 4a 39 00 02 1a 38 |J9 8 | TST.B 0x21a38 0002109c 67 04 |g | BEQ 0x210a2 0002109e 4e ba f6 e2 |N | JSR 0x20782 000210a2 4a 14 |J | TST.B (A4) 000210a4 67 2a |g* | BEQ 0x210d0 000210a6 4e ba fe 9c |N | JSR 0x20f44 000210aa 2f 3a f3 c0 |/: | MOVE.L 0x2046c,-(A7) 000210ae 2f 3a f3 b8 |/: | MOVE.L 0x20468,-(A7) 000210b2 42 27 |B' | CLR.B -(A7) 000210b4 4e b9 00 02 14 1c |N | JSR exp_LOAD_WDR.VAL(Sw_8, Sw_1) 000210ba 5c 4f |\O | ADDQ.L #0x6,A7 000210bc 2e ba f3 ae |. | MOVE.L 0x2046c,(A7) 000210c0 2f 3a f3 a6 |/: | MOVE.L 0x20468,-(A7) 000210c4 42 27 |B' | CLR.B -(A7) 000210c6 4e b9 00 02 13 78 |N x | JSR exp_LOAD_WDR.TYP(Sw_8, Sw_1) 000210cc de fc 00 0a | | ADDA.W #0xa,A7 000210d0 4e ba fd f8 |N | JSR 0x20eca 000210d4 13 fc 00 02 00 02 1a 30 | 0| MOVE.B #0x02,0x21a30 000210dc 42 80 |B | CLR.L D0 000210de 10 12 | | MOVE.B (A2),D0 000210e0 54 40 |T@ | ADDQ.W #0x2,D0 000210e2 41 bc 00 ff |A | CHK.W #0xff,D0 000210e6 13 c0 00 02 1a 31 | 1 | MOVE.B D0,0x21a31 000210ec 3f 39 00 02 1a 30 |?9 0 | MOVE.W 0x21a30,-(A7) 000210f2 4e ba f7 6e |N n | JSR 0x20862 000210f6 54 4f |TO | ADDQ.L #0x2,A7 000210f8 4e ba f8 e2 |N | JSR 0x209dc 000210fc 4e ba fc da |N | JSR 0x20dd8 00021100 4e ba fb c2 |N | JSR 0x20cc4 00021104 1f 13 | | MOVE.B (A3),-(A7) 00021106 48 79 00 02 1a 39 |Hy 9 | PEA.L 0x21a39 0002110c 4e ba f5 72 |N r | JSR 0x20680 00021110 58 4f |XO | ADDQ.L #0x4,A7 00021112 1e b9 00 02 1a 36 | 6 | MOVE.B 0x21a36,(A7) 00021118 2f 39 00 02 1a 3e |/9 > | MOVE.L 0x21a3e,-(A7) 0002111e 2f 39 00 02 1a 42 |/9 B | MOVE.L 0x21a42,-(A7) 00021124 1f 39 00 02 1a 46 | 9 F | MOVE.B 0x21a46,-(A7) 0002112a 51 4f |QO | SUBQ.L #0x8,A7 0002112c 20 4f | O | MOVEA.L A7,A0 0002112e 43 f9 00 02 1a 47 |C G | LEA.L 0x21a47,A1 00021134 70 07 |p | MOVEQ.L #0x07,D0 00021136 10 d9 | | MOVE.B (A1)+,(A0)+ 00021138 51 c8 ff fc |Q | DBF D0,0x21136 0002113c 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 00021142 de fc 00 14 | | ADDA.W #0x14,A7 00021146 4e b9 00 01 02 84 |N | JSR ?exit 0002114c exp_LOAD_HRAM_8_0.FIU(): 0002114c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021152 00 08 | | .CONST 0x0008 ; Stack-delta 00021154 11 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 17,'LOAD_HRAM_8_0.FIU' 00021166 00 | | .CONST 0x0 00021167 03 | | .CONST 0x3 ; DIPROC address 00021168 00 | | .CONST 0x0 ; Output Parameters 00021169 00 | | .CONST 0x0 ; Input Parameters 0002116a exp_LOAD_HRAM_32_0.FIU(): 0002116a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021170 00 08 | | .CONST 0x0008 ; Stack-delta 00021172 12 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 18,'LOAD_HRAM_32_0.FIU' 00021185 00 | | .CONST 0x0 00021186 03 | | .CONST 0x3 ; DIPROC address 00021187 00 | | .CONST 0x0 ; Output Parameters 00021188 00 | | .CONST 0x0 ; Input Parameters 00021189 00 | | .PAD 0x0 0002118a exp_RUN_NORMAL.FIU(): 0002118a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021190 00 08 | | .CONST 0x0008 ; Stack-delta 00021192 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.FIU' 000211a1 00 | | .CONST 0x0 000211a2 03 | | .CONST 0x3 ; DIPROC address 000211a3 00 | | .CONST 0x0 ; Output Parameters 000211a4 00 | | .CONST 0x0 ; Input Parameters 000211a5 00 | | .PAD 0x0 000211a6 exp_RESET.FIU(): 000211a6 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000211ac 00 08 | | .CONST 0x0008 ; Stack-delta 000211ae 09 52 45 53 45 54 2e 46 | RESET.F| .TXT 9,'RESET.FIU' 000211b8 00 | | .CONST 0x0 000211b9 03 | | .CONST 0x3 ; DIPROC address 000211ba 00 | | .CONST 0x0 ; Output Parameters 000211bb 00 | | .CONST 0x0 ; Input Parameters 000211bc exp_PREP_RUN.FIU(Sw_2): 000211bc 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000211c2 00 0a | | .CONST 0x000a ; Stack-delta 000211c4 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.FIU' 000211d1 00 | | .CONST 0x0 000211d2 03 | | .CONST 0x3 ; DIPROC address 000211d3 00 | | .CONST 0x0 ; Output Parameters 000211d4 01 | | .CONST 0x1 ; Input Parameters 000211d5 01 | | .CONST 0x1 ; In arg [2] 000211d6 exp_LOAD_REFRESH_REGS.FIU(Sw_2, Sw_2): 000211d6 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000211dc 00 0c | | .CONST 0x000c ; Stack-delta 000211de 15 4c 4f 41 44 5f 52 45 | LOAD_RE| .TXT 21,'LOAD_REFRESH_REGS.FIU' 000211f4 00 | | .CONST 0x0 000211f5 03 | | .CONST 0x3 ; DIPROC address 000211f6 00 | | .CONST 0x0 ; Output Parameters 000211f7 02 | | .CONST 0x2 ; Input Parameters 000211f8 01 | | .CONST 0x1 ; In arg [2] 000211f9 01 | | .CONST 0x1 ; In arg [2] 000211fa exp_LOAD_HRAM_1.FIU(): 000211fa 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021200 00 08 | | .CONST 0x0008 ; Stack-delta 00021202 0f 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 15,'LOAD_HRAM_1.FIU' 00021212 00 | | .CONST 0x0 00021213 03 | | .CONST 0x3 ; DIPROC address 00021214 00 | | .CONST 0x0 ; Output Parameters 00021215 00 | | .CONST 0x0 ; Input Parameters 00021216 exp_INIT_MRU.FIU(): 00021216 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002121c 00 08 | | .CONST 0x0008 ; Stack-delta 0002121e 0c 49 4e 49 54 5f 4d 52 | INIT_MR| .TXT 12,'INIT_MRU.FIU' 0002122b 00 | | .CONST 0x0 0002122c 03 | | .CONST 0x3 ; DIPROC address 0002122d 00 | | .CONST 0x0 ; Output Parameters 0002122e 00 | | .CONST 0x0 ; Input Parameters 0002122f 00 | | .PAD 0x0 00021230 exp_FREEZE_WORLD.FIU(): 00021230 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021236 00 08 | | .CONST 0x0008 ; Stack-delta 00021238 10 46 52 45 45 5a 45 5f | FREEZE_| .TXT 16,'FREEZE_WORLD.FIU' 00021249 00 | | .CONST 0x0 0002124a 03 | | .CONST 0x3 ; DIPROC address 0002124b 00 | | .CONST 0x0 ; Output Parameters 0002124c 00 | | .CONST 0x0 ; Input Parameters 0002124d 00 | | .PAD 0x0 0002124e exp_RESET.SEQ(): 0002124e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021254 00 08 | | .CONST 0x0008 ; Stack-delta 00021256 09 52 45 53 45 54 2e 53 | RESET.S| .TXT 9,'RESET.SEQ' 00021260 00 | | .CONST 0x0 00021261 02 | | .CONST 0x2 ; DIPROC address 00021262 00 | | .CONST 0x0 ; Output Parameters 00021263 00 | | .CONST 0x0 ; Input Parameters 00021264 exp_RUN_CHECK.SEQ(): 00021264 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002126a 00 08 | | .CONST 0x0008 ; Stack-delta 0002126c 0d 52 55 4e 5f 43 48 45 | RUN_CHE| .TXT 13,'RUN_CHECK.SEQ' 0002127a 00 | | .CONST 0x0 0002127b 02 | | .CONST 0x2 ; DIPROC address 0002127c 00 | | .CONST 0x0 ; Output Parameters 0002127d 00 | | .CONST 0x0 ; Input Parameters 0002127e exp_PREP_RUN.SEQ(Sw_2): 0002127e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021284 00 0a | | .CONST 0x000a ; Stack-delta 00021286 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.SEQ' 00021293 00 | | .CONST 0x0 00021294 02 | | .CONST 0x2 ; DIPROC address 00021295 00 | | .CONST 0x0 ; Output Parameters 00021296 01 | | .CONST 0x1 ; Input Parameters 00021297 01 | | .CONST 0x1 ; In arg [2] 00021298 exp_HALT.SEQ(&Fr): 00021298 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002129e 00 0c | | .CONST 0x000c ; Stack-delta 000212a0 08 48 41 4c 54 2e 53 45 | HALT.SE| .TXT 8,'HALT.SEQ' 000212a9 00 | | .CONST 0x0 000212aa 02 | | .CONST 0x2 ; DIPROC address 000212ab 01 | | .CONST 0x1 ; Output Parameters 000212ac 00 | | .CONST 0x0 ; Input Parameters 000212ad 08 | | .CONST 0x8 ; Out arg flag 000212ae exp_GET_MISC_ERRORS.SEQ(&Sr_1): 000212ae 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000212b4 00 0c | | .CONST 0x000c ; Stack-delta 000212b6 13 47 45 54 5f 4d 49 53 | GET_MIS| .TXT 19,'GET_MISC_ERRORS.SEQ' 000212ca 00 | | .CONST 0x0 000212cb 02 | | .CONST 0x2 ; DIPROC address 000212cc 01 | | .CONST 0x1 ; Output Parameters 000212cd 00 | | .CONST 0x0 ; Input Parameters 000212ce 00 | | .CONST 0x0 ; Out arg [1] 000212cf 00 | | .PAD 0x0 000212d0 exp_REG_TO_LOOP.TYP(Sw_1, Sw_1, &Sr_2): 000212d0 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000212d6 00 10 | | .CONST 0x0010 ; Stack-delta 000212d8 0f 52 45 47 5f 54 4f 5f | REG_TO_| .TXT 15,'REG_TO_LOOP.TYP' 000212e8 00 | | .CONST 0x0 000212e9 06 | | .CONST 0x6 ; DIPROC address 000212ea 01 | | .CONST 0x1 ; Output Parameters 000212eb 02 | | .CONST 0x2 ; Input Parameters 000212ec 00 | | .CONST 0x0 ; In arg [1] 000212ed 00 | | .CONST 0x0 ; In arg [1] 000212ee 01 | | .CONST 0x1 ; Out arg [2] 000212ef 00 | | .PAD 0x0 000212f0 exp_RUN_NORMAL.TYP(): 000212f0 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000212f6 00 08 | | .CONST 0x0008 ; Stack-delta 000212f8 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.TYP' 00021307 00 | | .CONST 0x0 00021308 06 | | .CONST 0x6 ; DIPROC address 00021309 00 | | .CONST 0x0 ; Output Parameters 0002130a 00 | | .CONST 0x0 ; Input Parameters 0002130b 00 | | .PAD 0x0 0002130c exp_RESET.TYP(): 0002130c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021312 00 08 | | .CONST 0x0008 ; Stack-delta 00021314 09 52 45 53 45 54 2e 54 | RESET.T| .TXT 9,'RESET.TYP' 0002131e 00 | | .CONST 0x0 0002131f 06 | | .CONST 0x6 ; DIPROC address 00021320 00 | | .CONST 0x0 ; Output Parameters 00021321 00 | | .CONST 0x0 ; Input Parameters 00021322 exp_READ_B_REG.TYP(Sw_2, Sw_1, &Sr_8): 00021322 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021328 00 10 | | .CONST 0x0010 ; Stack-delta 0002132a 0e 52 45 41 44 5f 42 5f | READ_B_| .TXT 14,'READ_B_REG.TYP' 00021339 00 | | .CONST 0x0 0002133a 06 | | .CONST 0x6 ; DIPROC address 0002133b 01 | | .CONST 0x1 ; Output Parameters 0002133c 02 | | .CONST 0x2 ; Input Parameters 0002133d 01 | | .CONST 0x1 ; In arg [2] 0002133e 00 | | .CONST 0x0 ; In arg [1] 0002133f 07 | | .CONST 0x7 ; Out arg [8] 00021340 exp_PREP_RUN.TYP(Sw_2): 00021340 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021346 00 0a | | .CONST 0x000a ; Stack-delta 00021348 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.TYP' 00021355 00 | | .CONST 0x0 00021356 06 | | .CONST 0x6 ; DIPROC address 00021357 00 | | .CONST 0x0 ; Output Parameters 00021358 01 | | .CONST 0x1 ; Input Parameters 00021359 01 | | .CONST 0x1 ; In arg [2] 0002135a exp_PREP_READ_REG.TYP(): 0002135a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021360 00 08 | | .CONST 0x0008 ; Stack-delta 00021362 11 50 52 45 50 5f 52 45 | PREP_RE| .TXT 17,'PREP_READ_REG.TYP' 00021374 00 | | .CONST 0x0 00021375 06 | | .CONST 0x6 ; DIPROC address 00021376 00 | | .CONST 0x0 ; Output Parameters 00021377 00 | | .CONST 0x0 ; Input Parameters 00021378 exp_LOAD_WDR.TYP(Sw_8, Sw_1): 00021378 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002137e 00 12 | | .CONST 0x0012 ; Stack-delta 00021380 0c 4c 4f 41 44 5f 57 44 | LOAD_WD| .TXT 12,'LOAD_WDR.TYP' 0002138d 00 | | .CONST 0x0 0002138e 06 | | .CONST 0x6 ; DIPROC address 0002138f 00 | | .CONST 0x0 ; Output Parameters 00021390 02 | | .CONST 0x2 ; Input Parameters 00021391 07 | | .CONST 0x7 ; In arg [8] 00021392 00 | | .CONST 0x0 ; In arg [1] 00021393 00 | | .PAD 0x0 00021394 exp_LOAD_BENIGN_UWORD.TYP(): 00021394 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002139a 00 08 | | .CONST 0x0008 ; Stack-delta 0002139c 15 4c 4f 41 44 5f 42 45 | LOAD_BE| .TXT 21,'LOAD_BENIGN_UWORD.TYP' 000213b2 00 | | .CONST 0x0 000213b3 06 | | .CONST 0x6 ; DIPROC address 000213b4 00 | | .CONST 0x0 ; Output Parameters 000213b5 00 | | .CONST 0x0 ; Input Parameters 000213b6 exp_ALIGN_CSA.TYP(): 000213b6 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000213bc 00 08 | | .CONST 0x0008 ; Stack-delta 000213be 0d 41 4c 49 47 4e 5f 43 | ALIGN_C| .TXT 13,'ALIGN_CSA.TYP' 000213cc 00 | | .CONST 0x0 000213cd 06 | | .CONST 0x6 ; DIPROC address 000213ce 00 | | .CONST 0x0 ; Output Parameters 000213cf 00 | | .CONST 0x0 ; Input Parameters 000213d0 exp_RUN_NORMAL.VAL(): 000213d0 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000213d6 00 08 | | .CONST 0x0008 ; Stack-delta 000213d8 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.VAL' 000213e7 00 | | .CONST 0x0 000213e8 07 | | .CONST 0x7 ; DIPROC address 000213e9 00 | | .CONST 0x0 ; Output Parameters 000213ea 00 | | .CONST 0x0 ; Input Parameters 000213eb 00 | | .PAD 0x0 000213ec exp_RESET.VAL(): 000213ec 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000213f2 00 08 | | .CONST 0x0008 ; Stack-delta 000213f4 09 52 45 53 45 54 2e 56 | RESET.V| .TXT 9,'RESET.VAL' 000213fe 00 | | .CONST 0x0 000213ff 07 | | .CONST 0x7 ; DIPROC address 00021400 00 | | .CONST 0x0 ; Output Parameters 00021401 00 | | .CONST 0x0 ; Input Parameters 00021402 exp_PREP_RUN.VAL(Sw_2): 00021402 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021408 00 0a | | .CONST 0x000a ; Stack-delta 0002140a 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.VAL' 00021417 00 | | .CONST 0x0 00021418 07 | | .CONST 0x7 ; DIPROC address 00021419 00 | | .CONST 0x0 ; Output Parameters 0002141a 01 | | .CONST 0x1 ; Input Parameters 0002141b 01 | | .CONST 0x1 ; In arg [2] 0002141c exp_LOAD_WDR.VAL(Sw_8, Sw_1): 0002141c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021422 00 12 | | .CONST 0x0012 ; Stack-delta 00021424 0c 4c 4f 41 44 5f 57 44 | LOAD_WD| .TXT 12,'LOAD_WDR.VAL' 00021431 00 | | .CONST 0x0 00021432 07 | | .CONST 0x7 ; DIPROC address 00021433 00 | | .CONST 0x0 ; Output Parameters 00021434 02 | | .CONST 0x2 ; Input Parameters 00021435 07 | | .CONST 0x7 ; In arg [8] 00021436 00 | | .CONST 0x0 ; In arg [1] 00021437 00 | | .PAD 0x0 00021438 exp_ALIGN_CSA.VAL(): 00021438 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002143e 00 08 | | .CONST 0x0008 ; Stack-delta 00021440 0d 41 4c 49 47 4e 5f 43 | ALIGN_C| .TXT 13,'ALIGN_CSA.VAL' 0002144e 00 | | .CONST 0x0 0002144f 07 | | .CONST 0x7 ; DIPROC address 00021450 00 | | .CONST 0x0 ; Output Parameters 00021451 00 | | .CONST 0x0 ; Input Parameters 00021452 53 45 54 5f 48 49 54 2e |SET_HIT.| .TXT 'SET_HIT.MEM ' 0002145e 53 45 54 5f 48 49 54 2e |SET_HIT.| .TXT 'SET_HIT.M32 ' 0002146a ; -------------------------------------------------------------------------------------- 0002146a ; OMSI PASCAL Function 0002146a ; <LVAR 0x00a 1(r)> 0002146a ; <LVAR 0x008 1(r)> 0002146a ; <LVAR -0x004 @ 4(r)> 0002146a ; -------------------------------------------------------------------------------------- 0002146a 4e 56 ff cc |NV | LINK.W A6,#0xffcc 0002146e bf d5 | | CMPA.L (A5),A7 00021470 62 06 |b | BHI 0x21478 00021472 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021476 4e 76 |Nv | TRAPV 00021478 de fc 00 30 | 0 | ADDA.W #0x30,A7 0002147c 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00021480 45 ee ff fc |E | LEA.L (A6-0x4),A2 00021484 72 0c |r | MOVEQ.L #0x0c,D1 00021486 55 4f |UO | SUBQ.L #0x2,A7 00021488 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002148e 4a 1f |J | TST.B (A7)+ 00021490 67 12 |g | BEQ 0x214a4 00021492 9e c1 | | SUBA.W D1,A7 00021494 20 4f | O | MOVEA.L A7,A0 00021496 43 fa ff ba |C | LEA.L 0x21452,A1 0002149a 70 0a |p | MOVEQ.L #0x0a,D0 0002149c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002149e 51 c8 ff fc |Q | DBF D0,0x2149c 000214a2 60 10 |` | BRA 0x214b4 000214a4 9e c1 | | SUBA.W D1,A7 000214a6 20 4f | O | MOVEA.L A7,A0 000214a8 43 fa ff b4 |C | LEA.L 0x2145e,A1 000214ac 70 0a |p | MOVEQ.L #0x0a,D0 000214ae 10 d9 | | MOVE.B (A1)+,(A0)+ 000214b0 51 c8 ff fc |Q | DBF D0,0x214ae 000214b4 59 4f |YO | SUBQ.L #0x4,A7 000214b6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000214ba 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000214be 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 000214c2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000214c8 50 4f |PO | ADDQ.L #0x8,A7 000214ca 48 52 |HR | PEA.L (A2) 000214cc 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000214d2 de fc 00 14 | | ADDA.W #0x14,A7 000214d6 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 000214da 2f 12 |/ | MOVE.L (A2),-(A7) 000214dc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000214e0 48 78 00 00 |Hx | PEA.L 0x0 000214e4 48 78 00 00 |Hx | PEA.L 0x0 000214e8 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 000214ee de fc 00 10 | | ADDA.W #0x10,A7 000214f2 42 17 |B | CLR.B (A7) 000214f4 1f 2e 00 0a | . | MOVE.B (A6+0xa),-(A7) 000214f8 2f 12 |/ | MOVE.L (A2),-(A7) 000214fa 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00021500 50 4f |PO | ADDQ.L #0x8,A7 00021502 48 52 |HR | PEA.L (A2) 00021504 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 0002150a 58 4f |XO | ADDQ.L #0x4,A7 0002150c 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00021510 4e 5e |N^ | UNLK A6 00021512 4e 75 |Nu | RTS 00021514 52 45 53 45 54 2e 4d 45 |RESET.ME| .TXT 'RESET.MEM ' 0002151e 52 45 53 45 54 2e 4d 33 |RESET.M3| .TXT 'RESET.M32 ' 00021528 ; -------------------------------------------------------------------------------------- 00021528 ; OMSI PASCAL Function 00021528 ; <LVAR 0x008 1(r)> 00021528 ; <LVAR -0x006 @ 4(r)> 00021528 ; -------------------------------------------------------------------------------------- 00021528 4e 56 ff cc |NV | LINK.W A6,#0xffcc 0002152c bf d5 | | CMPA.L (A5),A7 0002152e 62 06 |b | BHI 0x21536 00021530 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021534 4e 76 |Nv | TRAPV 00021536 de fc 00 2e | . | ADDA.W #0x2e,A7 0002153a 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 0002153e 45 ee ff fa |E | LEA.L (A6-0x6),A2 00021542 72 0a |r | MOVEQ.L #0x0a,D1 00021544 55 4f |UO | SUBQ.L #0x2,A7 00021546 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002154c 4a 1f |J | TST.B (A7)+ 0002154e 67 12 |g | BEQ 0x21562 00021550 9e c1 | | SUBA.W D1,A7 00021552 20 4f | O | MOVEA.L A7,A0 00021554 43 fa ff be |C | LEA.L 0x21514,A1 00021558 70 08 |p | MOVEQ.L #0x08,D0 0002155a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002155c 51 c8 ff fc |Q | DBF D0,0x2155a 00021560 60 10 |` | BRA 0x21572 00021562 9e c1 | | SUBA.W D1,A7 00021564 20 4f | O | MOVEA.L A7,A0 00021566 43 fa ff b6 |C | LEA.L 0x2151e,A1 0002156a 70 08 |p | MOVEQ.L #0x08,D0 0002156c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002156e 51 c8 ff fc |Q | DBF D0,0x2156c 00021572 59 4f |YO | SUBQ.L #0x4,A7 00021574 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021578 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002157c 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00021580 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021586 50 4f |PO | ADDQ.L #0x8,A7 00021588 48 52 |HR | PEA.L (A2) 0002158a 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00021590 de fc 00 12 | | ADDA.W #0x12,A7 00021594 42 27 |B' | CLR.B -(A7) 00021596 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 0002159a 2f 12 |/ | MOVE.L (A2),-(A7) 0002159c 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000215a2 50 4f |PO | ADDQ.L #0x8,A7 000215a4 48 52 |HR | PEA.L (A2) 000215a6 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000215ac 58 4f |XO | ADDQ.L #0x4,A7 000215ae 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 000215b2 4e 5e |N^ | UNLK A6 000215b4 4e 75 |Nu | RTS 000215b6 52 55 4e 5f 43 48 45 43 |RUN_CHEC| .TXT 'RUN_CHECK.MEM ' 000215c4 52 55 4e 5f 43 48 45 43 |RUN_CHEC| .TXT 'RUN_CHECK.M32 ' 000215d2 ; -------------------------------------------------------------------------------------- 000215d2 ; OMSI PASCAL Function 000215d2 ; <LVAR 0x008 1(r)> 000215d2 ; <LVAR -0x006 @ 4(r)> 000215d2 ; -------------------------------------------------------------------------------------- 000215d2 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 000215d6 bf d5 | | CMPA.L (A5),A7 000215d8 62 06 |b | BHI 0x215e0 000215da 44 fc 00 02 |D | MOVE.W #0x2,CCR 000215de 4e 76 |Nv | TRAPV 000215e0 de fc 00 32 | 2 | ADDA.W #0x32,A7 000215e4 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000215e8 45 ee ff fa |E | LEA.L (A6-0x6),A2 000215ec 72 0e |r | MOVEQ.L #0x0e,D1 000215ee 55 4f |UO | SUBQ.L #0x2,A7 000215f0 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000215f6 4a 1f |J | TST.B (A7)+ 000215f8 67 12 |g | BEQ 0x2160c 000215fa 9e c1 | | SUBA.W D1,A7 000215fc 20 4f | O | MOVEA.L A7,A0 000215fe 43 fa ff b6 |C | LEA.L 0x215b6,A1 00021602 70 0c |p | MOVEQ.L #0x0c,D0 00021604 10 d9 | | MOVE.B (A1)+,(A0)+ 00021606 51 c8 ff fc |Q | DBF D0,0x21604 0002160a 60 10 |` | BRA 0x2161c 0002160c 9e c1 | | SUBA.W D1,A7 0002160e 20 4f | O | MOVEA.L A7,A0 00021610 43 fa ff b2 |C | LEA.L 0x215c4,A1 00021614 70 0c |p | MOVEQ.L #0x0c,D0 00021616 10 d9 | | MOVE.B (A1)+,(A0)+ 00021618 51 c8 ff fc |Q | DBF D0,0x21616 0002161c 59 4f |YO | SUBQ.L #0x4,A7 0002161e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021622 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021626 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 0002162a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021630 50 4f |PO | ADDQ.L #0x8,A7 00021632 48 52 |HR | PEA.L (A2) 00021634 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 0002163a de fc 00 16 | | ADDA.W #0x16,A7 0002163e 42 27 |B' | CLR.B -(A7) 00021640 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00021644 2f 12 |/ | MOVE.L (A2),-(A7) 00021646 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 0002164c 50 4f |PO | ADDQ.L #0x8,A7 0002164e 48 52 |HR | PEA.L (A2) 00021650 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00021656 58 4f |XO | ADDQ.L #0x4,A7 00021658 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 0002165c 4e 5e |N^ | UNLK A6 0002165e 4e 75 |Nu | RTS 00021660 4c 4f 41 44 5f 43 4f 4e |LOAD_CON| .TXT 'LOAD_CONFIG.MEM ' 00021670 4c 4f 41 44 5f 43 4f 4e |LOAD_CON| .TXT 'LOAD_CONFIG.M32 ' 00021680 ; -------------------------------------------------------------------------------------- 00021680 ; OMSI PASCAL Function 00021680 ; <LVAR 0x00e 1(r)> 00021680 ; <LVAR 0x00c 1(r)> 00021680 ; <LVAR 0x00a 1(r)> 00021680 ; <LVAR 0x008 1(r)> 00021680 ; <LVAR -0x004 @ 4(r)> 00021680 ; -------------------------------------------------------------------------------------- 00021680 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00021684 bf d5 | | CMPA.L (A5),A7 00021686 62 06 |b | BHI 0x2168e 00021688 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002168c 4e 76 |Nv | TRAPV 0002168e de fc 00 34 | 4 | ADDA.W #0x34,A7 00021692 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00021696 45 ee ff fc |E | LEA.L (A6-0x4),A2 0002169a 72 10 |r | MOVEQ.L #0x10,D1 0002169c 55 4f |UO | SUBQ.L #0x2,A7 0002169e 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000216a4 4a 1f |J | TST.B (A7)+ 000216a6 67 12 |g | BEQ 0x216ba 000216a8 9e c1 | | SUBA.W D1,A7 000216aa 20 4f | O | MOVEA.L A7,A0 000216ac 43 fa ff b2 |C | LEA.L 0x21660,A1 000216b0 70 0e |p | MOVEQ.L #0x0e,D0 000216b2 10 d9 | | MOVE.B (A1)+,(A0)+ 000216b4 51 c8 ff fc |Q | DBF D0,0x216b2 000216b8 60 10 |` | BRA 0x216ca 000216ba 9e c1 | | SUBA.W D1,A7 000216bc 20 4f | O | MOVEA.L A7,A0 000216be 43 fa ff b0 |C | LEA.L 0x21670,A1 000216c2 70 0e |p | MOVEQ.L #0x0e,D0 000216c4 10 d9 | | MOVE.B (A1)+,(A0)+ 000216c6 51 c8 ff fc |Q | DBF D0,0x216c4 000216ca 59 4f |YO | SUBQ.L #0x4,A7 000216cc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000216d0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000216d4 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 000216d8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000216de 50 4f |PO | ADDQ.L #0x8,A7 000216e0 48 52 |HR | PEA.L (A2) 000216e2 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000216e8 de fc 00 18 | | ADDA.W #0x18,A7 000216ec 2f 12 |/ | MOVE.L (A2),-(A7) 000216ee 1f 2e 00 0c | . | MOVE.B (A6+0xc),-(A7) 000216f2 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 000216f8 54 4f |TO | ADDQ.L #0x2,A7 000216fa 2e 92 |. | MOVE.L (A2),(A7) 000216fc 1f 2e 00 0a | . | MOVE.B (A6+0xa),-(A7) 00021700 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 00021706 58 4f |XO | ADDQ.L #0x4,A7 00021708 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 0002170c 2f 12 |/ | MOVE.L (A2),-(A7) 0002170e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021712 48 78 00 00 |Hx | PEA.L 0x0 00021716 48 78 00 00 |Hx | PEA.L 0x0 0002171a 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00021720 de c1 | | ADDA.W D1,A7 00021722 42 17 |B | CLR.B (A7) 00021724 1f 2e 00 0e | . | MOVE.B (A6+0xe),-(A7) 00021728 2f 12 |/ | MOVE.L (A2),-(A7) 0002172a 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00021730 50 4f |PO | ADDQ.L #0x8,A7 00021732 48 52 |HR | PEA.L (A2) 00021734 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 0002173a 58 4f |XO | ADDQ.L #0x4,A7 0002173c 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00021740 4e 5e |N^ | UNLK A6 00021742 4e 75 |Nu | RTS 00021744 43 4c 45 41 52 5f 54 41 |CLEAR_TA| .TXT 'CLEAR_TAGSTORE.MEM' 00021756 43 4c 45 41 52 5f 54 41 |CLEAR_TA| .TXT 'CLEAR_TAGSTORE.M32' 00021768 ; -------------------------------------------------------------------------------------- 00021768 ; OMSI PASCAL Function 00021768 ; <LVAR 0x008 1(r)> 00021768 ; <LVAR -0x006 @ 4(r)> 00021768 ; -------------------------------------------------------------------------------------- 00021768 4e 56 ff cc |NV | LINK.W A6,#0xffcc 0002176c bf d5 | | CMPA.L (A5),A7 0002176e 62 06 |b | BHI 0x21776 00021770 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021774 4e 76 |Nv | TRAPV 00021776 de fc 00 2e | . | ADDA.W #0x2e,A7 0002177a 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 0002177e 43 ee ff fa |C | LEA.L (A6-0x6),A1 00021782 55 4f |UO | SUBQ.L #0x2,A7 00021784 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002178a 4a 1f |J | TST.B (A7)+ 0002178c 67 0e |g | BEQ 0x2179c 0002178e 41 fa ff c6 |A | LEA.L 0x21756,A0 00021792 70 08 |p | MOVEQ.L #0x08,D0 00021794 3f 20 |? | MOVE.W -(A0),-(A7) 00021796 51 c8 ff fc |Q | DBF D0,0x21794 0002179a 60 0c |` | BRA 0x217a8 0002179c 41 fa ff ca |A | LEA.L 0x21768,A0 000217a0 70 08 |p | MOVEQ.L #0x08,D0 000217a2 3f 20 |? | MOVE.W -(A0),-(A7) 000217a4 51 c8 ff fc |Q | DBF D0,0x217a2 000217a8 59 4f |YO | SUBQ.L #0x4,A7 000217aa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000217ae 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000217b2 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 000217b6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000217bc 50 4f |PO | ADDQ.L #0x8,A7 000217be 48 51 |HQ | PEA.L (A1) 000217c0 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000217c6 de fc 00 1a | | ADDA.W #0x1a,A7 000217ca 42 27 |B' | CLR.B -(A7) 000217cc 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 000217d0 2f 11 |/ | MOVE.L (A1),-(A7) 000217d2 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000217d8 50 4f |PO | ADDQ.L #0x8,A7 000217da 48 51 |HQ | PEA.L (A1) 000217dc 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000217e2 58 4f |XO | ADDQ.L #0x4,A7 000217e4 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 000217e8 4e 5e |N^ | UNLK A6 000217ea 4e 75 |Nu | RTS 000217ec 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.MEM ' 00021804 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.M32 ' 0002181c ; -------------------------------------------------------------------------------------- 0002181c ; OMSI PASCAL Function 0002181c ; <LVAR 0x008 1(r)> 0002181c ; <LVAR -0x006 @ 4(r)> 0002181c ; -------------------------------------------------------------------------------------- 0002181c 4e 56 ff be |NV | LINK.W A6,#0xffbe 00021820 bf d5 | | CMPA.L (A5),A7 00021822 62 06 |b | BHI 0x2182a 00021824 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021828 4e 76 |Nv | TRAPV 0002182a de fc 00 3c | < | ADDA.W #0x3c,A7 0002182e 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00021832 45 ee ff fa |E | LEA.L (A6-0x6),A2 00021836 72 18 |r | MOVEQ.L #0x18,D1 00021838 55 4f |UO | SUBQ.L #0x2,A7 0002183a 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00021840 4a 1f |J | TST.B (A7)+ 00021842 67 12 |g | BEQ 0x21856 00021844 9e c1 | | SUBA.W D1,A7 00021846 20 4f | O | MOVEA.L A7,A0 00021848 43 fa ff a2 |C | LEA.L 0x217ec,A1 0002184c 70 16 |p | MOVEQ.L #0x16,D0 0002184e 10 d9 | | MOVE.B (A1)+,(A0)+ 00021850 51 c8 ff fc |Q | DBF D0,0x2184e 00021854 60 10 |` | BRA 0x21866 00021856 9e c1 | | SUBA.W D1,A7 00021858 20 4f | O | MOVEA.L A7,A0 0002185a 43 fa ff a8 |C | LEA.L 0x21804,A1 0002185e 70 16 |p | MOVEQ.L #0x16,D0 00021860 10 d9 | | MOVE.B (A1)+,(A0)+ 00021862 51 c8 ff fc |Q | DBF D0,0x21860 00021866 59 4f |YO | SUBQ.L #0x4,A7 00021868 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002186c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021870 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00021874 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002187a 50 4f |PO | ADDQ.L #0x8,A7 0002187c 48 52 |HR | PEA.L (A2) 0002187e 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00021884 de fc 00 20 | | ADDA.W #0x20,A7 00021888 42 27 |B' | CLR.B -(A7) 0002188a 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 0002188e 2f 12 |/ | MOVE.L (A2),-(A7) 00021890 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00021896 50 4f |PO | ADDQ.L #0x8,A7 00021898 48 52 |HR | PEA.L (A2) 0002189a 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000218a0 58 4f |XO | ADDQ.L #0x4,A7 000218a2 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 000218a6 4e 5e |N^ | UNLK A6 000218a8 4e 75 |Nu | RTS 000218aa 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.MEM' 000218b8 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.M32' 000218c6 ; -------------------------------------------------------------------------------------- 000218c6 ; OMSI PASCAL Function 000218c6 ; <LVAR 0x008 1(r)> 000218c6 ; <LVAR -0x006 @ 4(r)> 000218c6 ; -------------------------------------------------------------------------------------- 000218c6 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 000218ca bf d5 | | CMPA.L (A5),A7 000218cc 62 06 |b | BHI 0x218d4 000218ce 44 fc 00 02 |D | MOVE.W #0x2,CCR 000218d2 4e 76 |Nv | TRAPV 000218d4 de fc 00 2a | * | ADDA.W #0x2a,A7 000218d8 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 000218dc 43 ee ff fa |C | LEA.L (A6-0x6),A1 000218e0 55 4f |UO | SUBQ.L #0x2,A7 000218e2 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000218e8 4a 1f |J | TST.B (A7)+ 000218ea 67 0e |g | BEQ 0x218fa 000218ec 41 fa ff ca |A | LEA.L 0x218b8,A0 000218f0 70 06 |p | MOVEQ.L #0x06,D0 000218f2 3f 20 |? | MOVE.W -(A0),-(A7) 000218f4 51 c8 ff fc |Q | DBF D0,0x218f2 000218f8 60 0c |` | BRA 0x21906 000218fa 41 fa ff ca |A | LEA.L 0x218c6,A0 000218fe 70 06 |p | MOVEQ.L #0x06,D0 00021900 3f 20 |? | MOVE.W -(A0),-(A7) 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 0e |?< | MOVE.W #0xe,-(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 51 |HQ | PEA.L (A1) 0002191e 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00021924 de fc 00 16 | | ADDA.W #0x16,A7 00021928 42 27 |B' | CLR.B -(A7) 0002192a 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 0002192e 2f 11 |/ | MOVE.L (A1),-(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 51 |HQ | PEA.L (A1) 0002193a 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00021940 58 4f |XO | ADDQ.L #0x4,A7 00021942 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00021946 4e 5e |N^ | UNLK A6 00021948 4e 75 |Nu | RTS 0002194a exp_READ_LAST_PC.IOC(&Sr_2): 0002194a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021950 00 0c | | .CONST 0x000c ; Stack-delta 00021952 10 52 45 41 44 5f 4c 41 | READ_LA| .TXT 16,'READ_LAST_PC.IOC' 00021963 00 | | .CONST 0x0 00021964 04 | | .CONST 0x4 ; DIPROC address 00021965 01 | | .CONST 0x1 ; Output Parameters 00021966 00 | | .CONST 0x0 ; Input Parameters 00021967 01 | | .CONST 0x1 ; Out arg [2] 00021968 exp_RESET.IOC(): 00021968 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002196e 00 08 | | .CONST 0x0008 ; Stack-delta 00021970 09 52 45 53 45 54 2e 49 | RESET.I| .TXT 9,'RESET.IOC' 0002197a 00 | | .CONST 0x0 0002197b 04 | | .CONST 0x4 ; DIPROC address 0002197c 00 | | .CONST 0x0 ; Output Parameters 0002197d 00 | | .CONST 0x0 ; Input Parameters 0002197e exp_RUN_CHECK.IOC(): 0002197e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021984 00 08 | | .CONST 0x0008 ; Stack-delta 00021986 0d 52 55 4e 5f 43 48 45 | RUN_CHE| .TXT 13,'RUN_CHECK.IOC' 00021994 00 | | .CONST 0x0 00021995 04 | | .CONST 0x4 ; DIPROC address 00021996 00 | | .CONST 0x0 ; Output Parameters 00021997 00 | | .CONST 0x0 ; Input Parameters 00021998 exp_PREP_RUN.IOC(Sw_2): 00021998 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002199e 00 0a | | .CONST 0x000a ; Stack-delta 000219a0 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.IOC' 000219ad 00 | | .CONST 0x0 000219ae 04 | | .CONST 0x4 ; DIPROC address 000219af 00 | | .CONST 0x0 ; Output Parameters 000219b0 01 | | .CONST 0x1 ; Input Parameters 000219b1 01 | | .CONST 0x1 ; In arg [2] 000219b2 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 000219c0 ; -------------------------------------------------------------------------------------- 000219c0 ; OMSI PASCAL Function 000219c0 ; <LVAR 0x008 1(r)> 000219c0 ; -------------------------------------------------------------------------------------- 000219c0 PROG_FAIL: 000219c0 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 000219c4 bf d5 | | CMPA.L (A5),A7 000219c6 62 06 |b | BHI 0x219ce 000219c8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000219cc 4e 76 |Nv | TRAPV 000219ce de fc 00 2c | , | ADDA.W #0x2c,A7 000219d2 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 000219d6 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 000219da 70 06 |p | MOVEQ.L #0x06,D0 000219dc 3f 20 |? | MOVE.W -(A0),-(A7) 000219de 51 c8 ff fc |Q | DBF D0,0x219dc 000219e2 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 000219e6 51 4f |QO | SUBQ.L #0x8,A7 000219e8 48 6f 00 0a |Ho | PEA.L (A7+0xa) 000219ec 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000219f0 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 000219f4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000219fa 58 4f |XO | ADDQ.L #0x4,A7 000219fc 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00021a00 48 80 |H | EXTB.W D0 00021a02 48 c0 |H | EXTW.L D0 00021a04 2f 00 |/ | MOVE.L D0,-(A7) 00021a06 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021a0c 58 4f |XO | ADDQ.L #0x4,A7 00021a0e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021a14 50 4f |PO | ADDQ.L #0x8,A7 00021a16 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021a1c de fc 00 14 | | ADDA.W #0x14,A7 00021a20 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00021a24 4e 5e |N^ | UNLK A6 00021a26 4e 75 |Nu | RTS