|
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: 4096 (0x1000)
Types: M200
Notes: @(#)INITSTATE,2.0,89/10/02,17:18:19, M200_PROGRAM
Names: »INITSTATE.M200«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »INITSTATE.M200«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »INITSTATE.M200«
└─ ⟦this⟧ »INITSTATE.M200«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »INITSTATE.M200«
@ 201a6
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 201a6-202e2 Body>
<POP 201a6-201bc Prologue> Σ0 ↓
<POP 201bc-201d2 RegCacheLoad> Σ0 ↓
<POP 201d2-20232 Naked> Σ0 ↓ →0x2027a
<Call 0x201d2 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x201d8 [18] @> Δ-18 {[«18""»]}
<POP 201e4-201e6 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x201e6 18> {[«18""»]|[$$Experiment error :]}
<Call 0x201f2 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 201f4-201f5 StackAdj> Δ+22 ↓ {}
<Blob 0x201f5 [14] @> Δ-14 {[«14""»]}
<POP 20204-20206 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x20206 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 20210-20212 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 20212 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x20216 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 2021c-2021e StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x2021e 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 20224-20226 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x20226 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 20228-2022a StackAdj> Δ+18 {}
<MI 2022a MOVEA.L (A6+0xa),A0> {}
<MI 2022e CMPA.W #0x01,A0> {}
<MI 20230 BEQ 0x2027a> {}
<POP 20232-2027a Naked> Σ0 ↓
<Blob 0x20232 [14] @> Δ-14 {[«14""»]}
<Blob 0x20242 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 20252-20254 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x20254 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 2025e-20260 StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x20260> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x20260 12> Δ-4
<Const 0x20264 0x1.2> Δ-2
<Const 0x20266 0x1e.2> Δ-2
<Call 0x20268 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2026a-2026c StackAdj> Δ+8
<Call 0x2026c 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 20272-20274 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x20274 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 20276-2027a StackAdj> Δ+48 {}
<POP 2027a-202da Naked> Σ0 ↓ ←0x201d2
<Blob 0x2027a [14] @> Δ-14 {[«14""»]}
<POP 2028a-2028c StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x2028c 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 20296-20298 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 20298 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x2029c 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 202a2-202a4 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x202a4 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 202aa-202ac StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x202ac 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 202ae-202af StackAdj> Δ+18 ↓ {}
<Blob 0x202af [24] @> Δ-24 {[«24""»]}
<Const 0x202be 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 202c2-202c4 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x202c4 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x202d2 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 202d8-202da StackAdj> Δ+30 {}
<POP 202da-202e2 Epilogue> Σ0
@ 202e2
<LVAR 0x00c 1(r)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @>
<POP 202e2-20370 Body>
<POP 202e2-202f8 Prologue> Σ0 ↓
<POP 202f8-20368 Naked> Σ0 ↓
<Call 0x202f8 0x10538> {}
IPC_Init(void)
<MI 202fe MOVE.B (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<Call 0x20302 0x10502> {[2, '(A6+0xc)']}
IPC_PutBool(a : Bool)
<POP 20308-2030a StackAdj> Δ+2 {}
<Call 0x2030a 0x10514> {}
IPC_PutEnd(void)
<Blob 0x20310 [10] @> Δ-10 {[«10""»]}
<POP 20322-20324 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x20324 9> {[«10""»]|[$$INITSTATE]}
<Const 0x20338 0x1.4> Δ-4 {[«10""»]|[$$INITSTATE]|[##1]}
<Const 0x2033c 0x2.2> Δ-2 {[«10""»]|[$$INITSTATE]|[##1]|[#2]}
<Pointer.fp 0x20340 <LVAR -0x002 @>> Δ-4 {[«10""»]|[$$INITSTATE]|[##1]|[#2]|[@@-2]}
<Call 0x20344 0x103b0> {[«10""»]|[$$INITSTATE]|[##1]|[#2]|[@@-2]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 2034a-2034e StackAdj> Δ+24 {}
<Call 0x2034e 0x10538> {}
IPC_Init(void)
<MI 20354 MOVEA.L (A6+0x8),A0> {}
<MI 20358 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x2035a 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20360-20362 StackAdj> Δ+4 {}
<Call 0x20362 0x1051a> {}
IPC_GetEnd(void)
<POP 20368-20370 Epilogue> Σ0
@ 20370
<LVAR 0x008 4(r)>
<POP 20370-203a8 Body>
<POP 20370-20386 Prologue> Σ0 ↓
<POP 20386-203a0 Naked> Σ0 ↓
<Call 0x20386 0x10538> {}
IPC_Init(void)
<MI 2038c MOVEA.L (A6+0x8),A0> {}
<MI 20390 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20392 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20398-2039a StackAdj> Δ+4 {}
<Call 0x2039a 0x1051a> {}
IPC_GetEnd(void)
<POP 203a0-203a8 Epilogue> Σ0
@ 203a8
<LVAR 0x008 1(r)>
<POP 203a8-203e4 Body>
<POP 203a8-203ba Prologue> Σ0 ↓
<POP 203ba-203e0 Naked> Σ0 ↓
<Call 0x203ba 0x10538> {}
IPC_Init(void)
<MI 203c0 MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x203c4 0x10502> {[2, '(A6+0x8)']}
IPC_PutBool(a : Bool)
<POP 203ca-203cc StackAdj> Δ+2 {}
<Call 0x203cc 0x10514> {}
IPC_PutEnd(void)
<MI 203d2 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x203d4 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x203d8 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 203de-203e0 StackAdj> Δ+6 {}
<POP 203e0-203e4 Epilogue> Σ0
@ 203e4
<LVAR -0x003 1(rw)>
<POP 203e4-20478 Body>
<POP 203e4-203fa Prologue> Σ0 ↓
<POP 203fa-20402 RegCacheLoad> Σ0 ↓
<POP 20402-20406 Naked> Σ0 ↓
<MI 20402 CLR.B (A6-0x3)> {}
<MI 20404 MOVEQ.L #0x0c,D7> {}
<POP 20406-20416 Naked> Σ0 ↓ →0x20422 ←0x20422
<POP 20406-20408 StackAdj> Δ-2 {[-2-]}
<MI 20408 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x2040a 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20410-20412 StackAdj> Δ+2 {[-2-]}
<MI 20412 TST.B (A7)+> Δ+2 {}
<MI 20414 BEQ 0x20422> {}
<POP 20416-20422 Naked> Σ0 ↓
<MI 20416 CLR.L D0> {}
<MI 20418 MOVE.B (A6-0x3),D0> {}
<MI 2041a ADDQ.W #0x1,D0> {}
<POP 0x2041c LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20420 MOVE.B D0,(A6-0x3)> {}
<POP 20422-20428 Naked> Σ0 ↓ →0x20406 ←0x20406
<MI 20422 ADDQ.B #0x1,D7> {}
<MI 20424 CMP.B #0x0f,D7> {}
<MI 20426 BLE 0x20406> {}
<POP 20428-2042a Naked> Σ0 ↓
<MI 20428 MOVEQ.L #0x0c,D7> {}
<POP 2042a-2043a Naked> Σ0 ↓ →0x2046a ←0x2046a
<POP 2042a-2042c StackAdj> Δ-2 {[-2-]}
<MI 2042c MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x2042e 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20434-20436 StackAdj> Δ+2 {[-2-]}
<MI 20436 TST.B (A7)+> Δ+2 {}
<MI 20438 BEQ 0x2046a> {}
<POP 2043a-2046a Naked> Σ0 ↓
<MI 2043a MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<POP 2043c-2043e StackAdj> Δ-2 {[2, 'D7']|[-2-]}
<MI 2043e MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']|[-2-]|[2, 'D7']}
<Call 0x20440 0x104c6> {[2, 'D7']|[-2-]|[2, 'D7']}
EQ_1c218(a : Byte) : Bool
<POP 20446-20448 StackAdj> Δ+2 {[2, 'D7']|[-2-]}
<MI 20448 MOVE.B (A7),D0> {[2, 'D7']|[-2-]}
<MI 2044a EXTB.W D0> {[2, 'D7']|[-2-]}
<POP 0x2044c LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']|[-2-]}
<MI 2044e MOVE.B D0,(A7)> {[2, 'D7']|[-2-]}
<POP 20450-20452 StackAdj> Δ-2 {[2, 'D7']|[-4-]}
<Call 0x20452 0x104cc> {[2, 'D7']|[-4-]}
MemOnly2MB() : Bool
<MI 20458 MOVE.B (A7),D0> {[2, 'D7']|[-4-]}
<MI 2045a EXTB.W D0> {[2, 'D7']|[-4-]}
<POP 0x2045c LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']|[-4-]}
<MI 2045e MOVE.B D0,(A7)> {[2, 'D7']|[-4-]}
<MI 20460 MOVE.B (A6-0x3),-(A7)> Δ-2 {[2, 'D7']|[-4-]|[2, '(A6-0x3)']}
<Call 0x20462 0x20978> {[2, 'D7']|[-4-]|[2, '(A6-0x3)']}
<POP 20468-2046a StackAdj> Δ+8 {}
<POP 2046a-20470 Naked> Σ0 ↓ →0x2042a ←0x2042a
<MI 2046a ADDQ.B #0x1,D7> {}
<MI 2046c CMP.B #0x0f,D7> {}
<MI 2046e BLE 0x2042a> {}
<POP 20470-20478 Epilogue> Σ0
@ 20478
START
<POP 20478--0001 Body>
<POP 20478-20482 Prologue> Σ0
<POP 20482-20498 RegCacheLoad> Σ0 ↓
<POP 20498-204d6 Naked> Σ0 ↓
<Call 0x20498 0x10398> {}
FSCALL_10398
<Const 0x2049e 0x20d42.4> Δ-4 {[##134466]}
<Call 0x204a0 0x20370> {[##134466]}
<POP 204a4-204a6 StackAdj> Δ+4 {}
<Const 0x204a6 0xf.4> Δ-4 {[##15]}
<Call 0x204aa 0x104d8> {[##15]}
ExpInit(a : Long)
<POP 204b0-204b2 StackAdj> Δ+2 {[-2-]}
<POP 204b2-204b3 StackAdj> Δ+2 {}
<Blob 0x204b3 [2] 0x20d42> Δ-2 {[«2»]}
<Call 0x204b4 0x104d2> {[«2»]}
SetExpInitDone(a : Byte)
<POP 204ba-204bc StackAdj> Δ+2 {}
<Call 0x204bc 0x20c50> {}
exp_MF.IOC()
<Call 0x204c2 0x207d4> {}
exp_MF.VAL()
<Call 0x204c8 0x20782> {}
exp_MF.TYP()
<Call 0x204ce 0x2071a> {}
exp_RESET.SEQ()
<MI 204d4 MOVEQ.L #0x0c,D0> {}
<POP 204d6-204e4 Naked> Σ0 ↓ →0x204ee ←0x204ee
<MI 204d6 MOVE.B D0,0x20d3c> {}
<POP 204d8-204da StackAdj> Δ-2 {[-2-]}
<MI 204da MOVE.B D0,-(A7)> Δ-2 {[-2-]|[2, 'D0']}
<Call 0x204dc 0x104c0> {[-2-]|[2, 'D0']}
HasBoard(diproc_addr: Byte) : Byte
<POP 204de-204e0 StackAdj> Δ+2 {[-2-]}
<MI 204e0 TST.B (A7)+> Δ+2 {}
<MI 204e2 BEQ 0x204ee> {}
<POP 204e4-204ee Naked> Σ0 ↓
<MI 204e4 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x204e6 0x208d4> {[2, 'D0']}
<POP 204ec-204ee StackAdj> Δ+2 {}
<POP 204ee-204f4 Naked> Σ0 ↓ →0x204d6 ←0x204d6
<MI 204ee ADDQ.B #0x1,D0> {}
<MI 204f0 CMP.B #0x0f,D0> {}
<MI 204f2 BLE 0x204d6> {}
<POP 204f4-2051c Naked> Σ0 ↓
<Call 0x204f4 0x20666> {}
exp_MF.FIU()
<Call 0x204fa 0x20764> {}
exp_CLEAR_PARITY.SEQ()
<Const 0x20500 0xff.2> Δ-2 {[#255]}
<MI 20504 CLR.B -(A7)> Δ-2 {[#255]|[#0]}
<Call 0x20506 0x20c80> {[#255]|[#0]}
exp_LOAD_PAREG.IOC(Sw_1, Sw_1)
<POP 2050c-2050e StackAdj> Δ+4 {}
<Call 0x2050e 0x207b6> {}
exp_CLEAR_PARITY.TYP()
<Call 0x20514 0x20808> {}
exp_CLEAR_PARITY.VAL()
<MI 2051a MOVEQ.L #0x0c,D0> {}
<POP 2051c-2052a Naked> Σ0 ↓ →0x20534 ←0x20534
<MI 2051c MOVE.B D0,0x20d3c> {}
<POP 2051e-20520 StackAdj> Δ-2 {[-2-]}
<MI 20520 MOVE.B D0,-(A7)> Δ-2 {[-2-]|[2, 'D0']}
<Call 0x20522 0x104c0> {[-2-]|[2, 'D0']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20524-20526 StackAdj> Δ+2 {[-2-]}
<MI 20526 TST.B (A7)+> Δ+2 {}
<MI 20528 BEQ 0x20534> {}
<POP 2052a-20534 Naked> Σ0 ↓
<MI 2052a MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x2052c 0x20a6c> {[2, 'D0']}
<POP 20532-20534 StackAdj> Δ+2 {}
<POP 20534-2053a Naked> Σ0 ↓ →0x2051c ←0x2051c
<MI 20534 ADDQ.B #0x1,D0> {}
<MI 20536 CMP.B #0x0f,D0> {}
<MI 20538 BLE 0x2051c> {}
<POP 2053a-20624 Naked> Σ0 ↓
<Call 0x2053a 0x206b6> {}
exp_CLEAR_PARITY.FIU()
<Call 0x20540 0x105b0> {}
FifoInit(void)
<MI 20546 CLR.W -(A7)> Δ-2 {[#0]}
<MI 20548 CLR.W -(A7)> Δ-2 {[#0]|[#0]}
<MI 2054a CLR.B -(A7)> Δ-2 {[#0]|[#0]|[#0]}
<Call 0x2054c 0x20696> {[#0]|[#0]|[#0]}
exp_LOAD_COUNTER.FIU(Sw_2, Sw_2, Sw_1)
<POP 20552-20554 StackAdj> Δ+6 {}
<Call 0x20554 0x20c9e> {}
exp_DISABLE_TIMERS.IOC()
<MI 2055a CLR.W -(A7)> Δ-2 {[#0]}
<Call 0x2055c 0x20730> {[#0]}
exp_PREP_RUN.SEQ(Sw_2)
<POP 20562-20564 StackAdj> Δ+2 {}
<Call 0x20564 0x206f6> {}
exp_SET_TO_NO_DISPATCH.SEQ()
<Blob 0x2056a [2] @> Δ-2 {[«2""»]}
<Blob 0x2056e [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x20572 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<Call 0x20576 0x2074a> {[«2""»]|[«2""»]|[«2""»]}
exp_LOAD_UIR.SEQ(Sw_6)
<POP 2057c-2057e StackAdj> Δ+6 {}
<Const 0x2057e 0xa000.2> Δ-2 {[#40960]}
<MI 20582 CLR.B -(A7)> Δ-2 {[#40960]|[#0]}
<Call 0x20584 0x20c64> {[#40960]|[#0]}
exp_LOAD_UIR.IOC(Sw_2, Sw_1)
<POP 2058a-2058c StackAdj> Δ+4 {}
<MI 2058c CLR.W -(A7)> Δ-2 {[#0]}
<Blob 0x2058e [2] @> Δ-2 {[#0]|[«2""»]}
<Blob 0x20592 [2] @> Δ-2 {[#0]|[«2""»]|[«2""»]}
<Blob 0x20596 [2] @> Δ-2 {[#0]|[«2""»]|[«2""»]|[«2""»]}
<MI 2059a CLR.B -(A7)> Δ-2 {[#0]|[«2""»]|[«2""»]|[«2""»]|[#0]}
<Call 0x2059c 0x20796> {[#0]|[«2""»]|[«2""»]|[«2""»]|[#0]}
exp_LOAD_WCS_UIR.TYP(Sw_2, Sw_6, Sw_1)
<POP 205a2-205a4 StackAdj> Δ+8 {[#0]}
<MI 205a4 CLR.W (A7)> {[#0]}
<Blob 0x205a6 [6] @> Δ-6 {[#0]|[«6""»]}
<MI 205b6 CLR.B -(A7)> Δ-2 {[#0]|[«6""»]|[#0]}
<Call 0x205b8 0x207e8> {[#0]|[«6""»]|[#0]}
exp_LOAD_WCS_UIR.VAL(Sw_2, Sw_5, Sw_1)
<POP 205be-205c2 StackAdj> Δ+10 {}
<Call 0x205c2 0x206d4> {}
exp_CLEAR_EXCEPTIONS.FIU()
<Blob 0x205c8 [2] @> Δ-2 {[«2""»]}
<Blob 0x205cc [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x205d0 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<MI 205d4 CLR.B -(A7)> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[#0]}
<Call 0x205d6 0x2067a> {[«2""»]|[«2""»]|[«2""»]|[#0]}
exp_LOAD_UIR.FIU(Sw_6, Sw_1)
<POP 205dc-205de StackAdj> Δ+8 {}
<Const 0x205de 0x4.2> Δ-2 {[#4]}
<Const 0x205e2 0x2.2> Δ-2 {[#4]|[#2]}
<Call 0x205e4 0x1048a> {[#4]|[#2]}
DiProcCmd(board : Byte; cmd : Byte)
<POP 205ea-205ec StackAdj> Δ+4 {}
<Const 0x205ec 0x2.2> Δ-2 {[#2]}
<Const 0x205ee 0x2.2> Δ-2 {[#2]|[#2]}
<Call 0x205f0 0x1048a> {[#2]|[#2]}
DiProcCmd(board : Byte; cmd : Byte)
<POP 205f6-205f8 StackAdj> Δ+2 {[#2]}
<POP 205f8-205f9 StackAdj> Δ+2 {}
<Const 0x205f9 0x7.2> Δ-2 {[#7]}
<Const 0x205fc 0x2.2> Δ-2 {[#7]|[#2]}
<Call 0x205fe 0x1048a> {[#7]|[#2]}
DiProcCmd(board : Byte; cmd : Byte)
<POP 20604-20606 StackAdj> Δ+2 {[#7]}
<POP 20606-20607 StackAdj> Δ+2 {}
<Const 0x20607 0x6.2> Δ-2 {[#6]}
<Const 0x2060a 0x2.2> Δ-2 {[#6]|[#2]}
<Call 0x2060c 0x1048a> {[#6]|[#2]}
DiProcCmd(board : Byte; cmd : Byte)
<POP 20612-20614 StackAdj> Δ+2 {[#6]}
<POP 20614-20615 StackAdj> Δ+2 {}
<Const 0x20615 0x3.2> Δ-2 {[#3]}
<Const 0x20618 0x2.2> Δ-2 {[#3]|[#2]}
<Call 0x2061a 0x1048a> {[#3]|[#2]}
DiProcCmd(board : Byte; cmd : Byte)
<POP 20620-20622 StackAdj> Δ+4 {}
<MI 20622 MOVEQ.L #0x0c,D0> {}
<POP 20624-20632 Naked> Σ0 ↓ →0x2064c ←0x2064c
<MI 20624 MOVE.B D0,0x20d3c> {}
<POP 20626-20628 StackAdj> Δ-2 {[-2-]}
<MI 20628 MOVE.B D0,-(A7)> Δ-2 {[-2-]|[2, 'D0']}
<Call 0x2062a 0x104c0> {[-2-]|[2, 'D0']}
HasBoard(diproc_addr: Byte) : Byte
<POP 2062c-2062e StackAdj> Δ+2 {[-2-]}
<MI 2062e TST.B (A7)+> Δ+2 {}
<MI 20630 BEQ 0x2064c> {}
<POP 20632-2064c Naked> Σ0 ↓
<MI 20632 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x20634 0x20b16> {[2, 'D0']}
<MI 2063a MOVE.B D0,(A7)> {[-2-]}
<Call 0x2063c 0x20bc2> {[-2-]}
<MI 20642 MOVE.B D0,(A7)> {[-2-]}
<Call 0x20644 0x2083a> {[-2-]}
<POP 2064a-2064c StackAdj> Δ+2 {}
<POP 2064c-20652 Naked> Σ0 ↓ →0x20624 ←0x20624
<MI 2064c ADDQ.B #0x1,D0> {}
<MI 2064e CMP.B #0x0f,D0> {}
<MI 20650 BLE 0x20624> {}
<POP 20652-20660 Naked> Σ0 ↓
<Call 0x20652 0x203e4> {}
<Const 0x20656 0x1.2> Δ-2 {[#1]}
<Call 0x2065a 0x203a8> {[#1]}
<POP 2065e-20660 StackAdj> Δ+2 {}
<POP 20660-20666 Naked> Σ0
<Call 0x20660 0x10284> {}
?exit
@ 2083a
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 2083a-208c8 Body> Δ+10
<POP 2083a-20850 Prologue> Σ0 ↓
<POP 20850-20856 RegCacheLoad> Σ0 ↓
<POP 20856-20862 Naked> Σ0 ↓ →0x20874
<POP 20856-20858 StackAdj> Δ-2 {[-2-]}
<Call 0x20858 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2085e TST.B (A7)+> Δ+2 {}
<MI 20860 BEQ 0x20874> {}
<POP 20862-20874 Naked> Σ0 Δ-10 →0x20884
<Blob 0x20862 [10] @> Δ-10 {[«10""»]}
<MI 20872 BRA 0x20884> {[«10""»]}
<POP 20874-20884 Naked> Σ0 Δ-10 ↓ ←0x20856
<Blob 0x20874 [10] @> Δ-10 {[«10""»]}
<POP 20884-208c0 Naked> Σ-10 Δ+10 ↓ ←0x20862
<POP 20884-20886 StackAdj> Δ-4 {[-14-]}
<Lit 0x20886> {[-10-]|[$$…]}
<Pointer.sp 0x20886 4> Δ-4
<Const 0x2088a 0x1.2> Δ-2
<Const 0x2088e 0x9.2> Δ-2
<Call 0x20892 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20898-2089a StackAdj> Δ+8
<Pointer.fp 0x2089a <LVAR -0x006 @ 4(r)>> Δ-4 {[-10-]|[$$…]|[@@-6]}
<Call 0x2089c 0x10460> {[-10-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 208a2-208a6 StackAdj> Δ+18 {}
<MI 208a6 CLR.B -(A7)> Δ-2 {[#0]}
<MI 208a8 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 208ac MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x208ae 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 208b4-208b6 StackAdj> Δ+8 {}
<Pointer.fp 0x208b6 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x208b8 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 208be-208c0 StackAdj> Δ+4 {}
<POP 208c0-208c8 Epilogue> Σ0
@ 208d4
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 208d4-20958 Body> Δ+6
<POP 208d4-208ea Prologue> Σ0 ↓
<POP 208ea-208ee RegCacheLoad> Σ0 ↓
<POP 208ee-208fa Naked> Σ0 ↓ →0x20908
<POP 208ee-208f0 StackAdj> Δ-2 {[-2-]}
<Call 0x208f0 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 208f6 TST.B (A7)+> Δ+2 {}
<MI 208f8 BEQ 0x20908> {}
<POP 208fa-20908 Naked> Σ0 Δ-6 →0x20914
<Blob 0x208fa [2] @> Δ-2 {[«2""»]}
<Blob 0x208fe [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x20902 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<MI 20906 BRA 0x20914> {[«2""»]|[«2""»]|[«2""»]}
<POP 20908-20914 Naked> Σ0 Δ-6 ↓ ←0x208ee
<Blob 0x20908 [2] @> Δ-2 {[«2""»]}
<Blob 0x2090c [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x20910 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 20914-20950 Naked> Σ-6 Δ+6 ↓ ←0x208fa
<POP 20914-20916 StackAdj> Δ-4 {[-10-]}
<Lit 0x20916> {[-6-]|[$$…]}
<Pointer.sp 0x20916 4> Δ-4
<Const 0x2091a 0x1.2> Δ-2
<Const 0x2091e 0x6.2> Δ-2
<Call 0x20922 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20928-2092a StackAdj> Δ+8
<Pointer.fp 0x2092a <LVAR -0x006 @ 4(r)>> Δ-4 {[-6-]|[$$…]|[@@-6]}
<Call 0x2092c 0x10460> {[-6-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 20932-20936 StackAdj> Δ+14 {}
<MI 20936 CLR.B -(A7)> Δ-2 {[#0]}
<MI 20938 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 2093c MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x2093e 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 20944-20946 StackAdj> Δ+8 {}
<Pointer.fp 0x20946 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x20948 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 2094e-20950 StackAdj> Δ+4 {}
<POP 20950-20958 Epilogue> Σ0
@ 20978
<LVAR 0x00e 1(r)>
<LVAR 0x00c 1(r)>
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 4(r)>
<POP 20978-20a3c Body> Δ+16
<POP 20978-2098e Prologue> Σ0 ↓
<POP 2098e-20994 RegCacheLoad> Σ0 ↓
<POP 20994-209a0 Naked> Σ0 ↓ →0x209b2
<POP 20994-20996 StackAdj> Δ-2 {[-2-]}
<Call 0x20996 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2099c TST.B (A7)+> Δ+2 {}
<MI 2099e BEQ 0x209b2> {}
<POP 209a0-209b2 Naked> Σ0 Δ-16 →0x209c2
<Blob 0x209a0 [16] @> Δ-16 {[«16""»]}
<MI 209b0 BRA 0x209c2> {[«16""»]}
<POP 209b2-209c2 Naked> Σ0 Δ-16 ↓ ←0x20994
<Blob 0x209b2 [16] @> Δ-16 {[«16""»]}
<POP 209c2-20a34 Naked> Σ-16 Δ+16 ↓ ←0x209a0
<POP 209c2-209c4 StackAdj> Δ-4 {[-20-]}
<Lit 0x209c4> {[-16-]|[$$…]}
<Pointer.sp 0x209c4 4> Δ-4
<Const 0x209c8 0x1.2> Δ-2
<Const 0x209cc 0xf.2> Δ-2
<Call 0x209d0 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 209d6-209d8 StackAdj> Δ+8
<Pointer.fp 0x209d8 <LVAR -0x004 @ 4(r)>> Δ-4 {[-16-]|[$$…]|[@@-4]}
<Call 0x209da 0x10460> {[-16-]|[$$…]|[@@-4]}
ExpLoad(a : String; b: Pointer)
<POP 209e0-209e4 StackAdj> Δ+24 {}
<MI 209e4 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 209e6 MOVE.B (A6+0xc),-(A7)> Δ-2 {[4, '(A6-0x4)']|[2, '(A6+0xc)']}
<Call 0x209ea 0x1046c> {[4, '(A6-0x4)']|[2, '(A6+0xc)']}
ExpInputFlag(exp : Pointer; val : Word)
<POP 209f0-209f2 StackAdj> Δ+2 {[4, '(A6-0x4)']}
<MI 209f2 MOVE.L (A6-0x4),(A7)> {[4, '(A6-0x4)']}
<MI 209f4 MOVE.B (A6+0xa),-(A7)> Δ-2 {[4, '(A6-0x4)']|[2, '(A6+0xa)']}
<Call 0x209f8 0x1046c> {[4, '(A6-0x4)']|[2, '(A6+0xa)']}
ExpInputFlag(exp : Pointer; val : Word)
<POP 209fe-20a00 StackAdj> Δ+4 {[-2-]}
<MI 20a00 MOVE.B (A6+0x8),(A7)> {[-2-]}
<MI 20a04 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x4)']}
<Pointer.sp 0x20a06 4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]}
<Const 0x20a0a 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]}
<Const 0x20a0e 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
<Call 0x20a12 0x10466> {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 20a18-20a1a StackAdj> Δ+16 {[-2-]}
<MI 20a1a CLR.B (A7)> {[-2-]}
<MI 20a1c MOVE.B (A6+0xe),-(A7)> Δ-2 {[-2-]|[2, '(A6+0xe)']}
<MI 20a20 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[2, '(A6+0xe)']|[4, '(A6-0x4)']}
<Call 0x20a22 0x104ba> {[-2-]|[2, '(A6+0xe)']|[4, '(A6-0x4)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 20a28-20a2a StackAdj> Δ+8 {}
<Pointer.fp 0x20a2a <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x20a2c 0x10496> {[@@-4]}
ExpClose(exp : Pointer)
<POP 20a32-20a34 StackAdj> Δ+4 {}
<POP 20a34-20a3c Epilogue> Σ0
@ 20a6c
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 20a6c-20afa Body> Δ+24
<POP 20a6c-20a82 Prologue> Σ0 ↓
<POP 20a82-20a88 RegCacheLoad> Σ0 ↓
<POP 20a88-20a94 Naked> Σ0 ↓ →0x20aa6
<POP 20a88-20a8a StackAdj> Δ-2 {[-2-]}
<Call 0x20a8a 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 20a90 TST.B (A7)+> Δ+2 {}
<MI 20a92 BEQ 0x20aa6> {}
<POP 20a94-20aa6 Naked> Σ0 Δ-24 →0x20ab6
<Blob 0x20a94 [24] @> Δ-24 {[«24""»]}
<MI 20aa4 BRA 0x20ab6> {[«24""»]}
<POP 20aa6-20ab6 Naked> Σ0 Δ-24 ↓ ←0x20a88
<Blob 0x20aa6 [24] @> Δ-24 {[«24""»]}
<POP 20ab6-20af2 Naked> Σ-24 Δ+24 ↓ ←0x20a94
<POP 20ab6-20ab8 StackAdj> Δ-4 {[-28-]}
<Lit 0x20ab8> {[-24-]|[$$…]}
<Pointer.sp 0x20ab8 4> Δ-4
<Const 0x20abc 0x1.2> Δ-2
<Const 0x20ac0 0x17.2> Δ-2
<Call 0x20ac4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20aca-20acc StackAdj> Δ+8
<Pointer.fp 0x20acc <LVAR -0x006 @ 4(r)>> Δ-4 {[-24-]|[$$…]|[@@-6]}
<Call 0x20ace 0x10460> {[-24-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 20ad4-20ad8 StackAdj> Δ+32 {}
<MI 20ad8 CLR.B -(A7)> Δ-2 {[#0]}
<MI 20ada MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 20ade MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x20ae0 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 20ae6-20ae8 StackAdj> Δ+8 {}
<Pointer.fp 0x20ae8 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x20aea 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 20af0-20af2 StackAdj> Δ+4 {}
<POP 20af2-20afa Epilogue> Σ0
@ 20b16
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 20b16-20b9a Body> Δ+14
<POP 20b16-20b2c Prologue> Σ0 ↓
<POP 20b2c-20b30 RegCacheLoad> Σ0 ↓
<POP 20b30-20b3c Naked> Σ0 ↓ →0x20b4a
<POP 20b30-20b32 StackAdj> Δ-2 {[-2-]}
<Call 0x20b32 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 20b38 TST.B (A7)+> Δ+2 {}
<MI 20b3a BEQ 0x20b4a> {}
<POP 20b3c-20b4a Naked> Σ0 Δ-14 →0x20b56
<Blob 0x20b3c [14] @> Δ-14 {[«14""»]}
<MI 20b48 BRA 0x20b56> {[«14""»]}
<POP 20b4a-20b56 Naked> Σ0 Δ-14 ↓ ←0x20b30
<Blob 0x20b4a [14] @> Δ-14 {[«14""»]}
<POP 20b56-20b92 Naked> Σ-14 Δ+14 ↓ ←0x20b3c
<POP 20b56-20b58 StackAdj> Δ-4 {[-18-]}
<Lit 0x20b58> {[-14-]|[$$…]}
<Pointer.sp 0x20b58 4> Δ-4
<Const 0x20b5c 0x1.2> Δ-2
<Const 0x20b60 0xe.2> Δ-2
<Call 0x20b64 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20b6a-20b6c StackAdj> Δ+8
<Pointer.fp 0x20b6c <LVAR -0x006 @ 4(r)>> Δ-4 {[-14-]|[$$…]|[@@-6]}
<Call 0x20b6e 0x10460> {[-14-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 20b74-20b78 StackAdj> Δ+22 {}
<MI 20b78 CLR.B -(A7)> Δ-2 {[#0]}
<MI 20b7a MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 20b7e MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x20b80 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 20b86-20b88 StackAdj> Δ+8 {}
<Pointer.fp 0x20b88 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x20b8a 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 20b90-20b92 StackAdj> Δ+4 {}
<POP 20b92-20b9a Epilogue> Σ0
@ 20bc2
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 20bc2-20c50 Body> Δ+20
<POP 20bc2-20bd8 Prologue> Σ0 ↓
<POP 20bd8-20bde RegCacheLoad> Σ0 ↓
<POP 20bde-20bea Naked> Σ0 ↓ →0x20bfc
<POP 20bde-20be0 StackAdj> Δ-2 {[-2-]}
<Call 0x20be0 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 20be6 TST.B (A7)+> Δ+2 {}
<MI 20be8 BEQ 0x20bfc> {}
<POP 20bea-20bfc Naked> Σ0 Δ-20 →0x20c0c
<Blob 0x20bea [20] @> Δ-20 {[«20""»]}
<MI 20bfa BRA 0x20c0c> {[«20""»]}
<POP 20bfc-20c0c Naked> Σ0 Δ-20 ↓ ←0x20bde
<Blob 0x20bfc [20] @> Δ-20 {[«20""»]}
<POP 20c0c-20c48 Naked> Σ-20 Δ+20 ↓ ←0x20bea
<POP 20c0c-20c0e StackAdj> Δ-4 {[-24-]}
<Lit 0x20c0e> {[-20-]|[$$…]}
<Pointer.sp 0x20c0e 4> Δ-4
<Const 0x20c12 0x1.2> Δ-2
<Const 0x20c16 0x13.2> Δ-2
<Call 0x20c1a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20c20-20c22 StackAdj> Δ+8
<Pointer.fp 0x20c22 <LVAR -0x006 @ 4(r)>> Δ-4 {[-20-]|[$$…]|[@@-6]}
<Call 0x20c24 0x10460> {[-20-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 20c2a-20c2e StackAdj> Δ+28 {}
<MI 20c2e CLR.B -(A7)> Δ-2 {[#0]}
<MI 20c30 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 20c34 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x20c36 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 20c3c-20c3e StackAdj> Δ+8 {}
<Pointer.fp 0x20c3e <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x20c40 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 20c46-20c48 StackAdj> Δ+4 {}
<POP 20c48-20c50 Epilogue> Σ0
@ 20ccc
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 20ccc-20d34 Body>
<POP 20ccc-20ce2 Prologue> Σ0 ↓
<POP 20ce2-20d2c Naked> Σ0 ↓
<Blob 0x20ce2 [14] @> Δ-14 {[«14""»]}
<Const 0x20cee 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 20cf2-20cf4 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x20cf4 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 20d06-20d08 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 20d08 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 20d0c EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 20d0e EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 20d10 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x20d12 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 20d18-20d1a StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x20d1a 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 20d20-20d22 StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x20d22 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 20d28-20d2c StackAdj> Δ+20 {}
<POP 20d2c-20d34 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.940165c2867ee2e8 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 04 78 | x | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 0d 80 | | .PTR 0x20d80 00020010 code.end: 00020010 00 02 0d 34 | 4 | .PTR 0x20d34 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 0c cc | | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 01 a6 | | .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 49 4e 49 54 53 54 41 54 |INITSTAT| .TXT 'INITSTATE ' 00020168 40 28 23 29 49 4e 49 54 |@(#)INIT| .XXX[0x20] 00020170 53 54 41 54 45 2c 32 2e |STATE,2.| 00020178 30 2c 38 39 2f 31 30 2f |0,89/10/| 00020180 30 32 2c 31 37 3a 31 38 |02,17:18| 00020188 3a 31 39 5c |:19\ | .XXX[0x4] 0002018c 00 00 | | .CONST 0x0,0x0 0002018e 98 39 | 9 | .CONST 0x98,0x39 00020190 00 00 | | .CONST 0x0,0x0 00020192 00 7f | | .CONST 0x0,0x7f 00020194 c3 0e | | .CONST 0xc3,0xe 00020196 66 03 |f | .CONST 0x66,0x3 00020198 00 0f | | .CONST 0x0,0xf 0002019a e0 a7 | | .CONST 0xe0,0xa7 0002019c ff 0d | | .CONST 0xff,0xd 0002019e 00 0a 7f 87 ff 03 | | .CONST 0x0,0xa,0x7f,0x87,0xff,0x3 000201a4 04 18 | | .XXX[0x2] 000201a6 ; -------------------------------------------------------------------------------------- 000201a6 ; OMSI PASCAL Function 000201a6 ; <LVAR 0x00e 1(r)> 000201a6 ; <LVAR 0x00a 4(r)> 000201a6 ; <LVAR 0x008 1(r)> 000201a6 ; -------------------------------------------------------------------------------------- 000201a6 EXP_FAIL: 000201a6 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 000201aa bf d5 | | CMPA.L (A5),A7 000201ac 62 06 |b | BHI 0x201b4 000201ae 44 fc 00 02 |D | MOVE.W #0x2,CCR 000201b2 4e 76 |Nv | TRAPV 000201b4 de fc 00 74 | t | ADDA.W #0x74,A7 000201b8 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 000201bc 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 000201c2 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 000201c8 72 01 |r | MOVEQ.L #0x01,D1 000201ca 74 0d |t | MOVEQ.L #0x0d,D2 000201cc 76 1e |v | MOVEQ.L #0x1e,D3 000201ce 78 12 |x | MOVEQ.L #0x12,D4 000201d0 7a 0e |z | MOVEQ.L #0x0e,D5 000201d2 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000201d8 41 fa ff 6c |A l | LEA.L 0x20146,A0 000201dc 70 08 |p | MOVEQ.L #0x08,D0 000201de 3f 20 |? | MOVE.W -(A0),-(A7) 000201e0 51 c8 ff fc |Q | DBF D0,0x201de 000201e4 59 4f |YO | SUBQ.L #0x4,A7 000201e6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000201ea 3f 01 |? | MOVE.W D1,-(A7) 000201ec 3f 04 |? | MOVE.W D4,-(A7) 000201ee 4e 93 |N | JSR (A3) 000201f0 50 4f |PO | ADDQ.L #0x8,A7 000201f2 4e 94 |N | JSR (A4) 000201f4 50 4f |PO | ADDQ.L #0x8,A7 000201f6 20 4f | O | MOVEA.L A7,A0 000201f8 43 fa ff 10 |C | LEA.L 0x2010a,A1 000201fc 70 0c |p | MOVEQ.L #0x0c,D0 000201fe 10 d9 | | MOVE.B (A1)+,(A0)+ 00020200 51 c8 ff fc |Q | DBF D0,0x201fe 00020204 51 4f |QO | SUBQ.L #0x8,A7 00020206 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002020a 3f 01 |? | MOVE.W D1,-(A7) 0002020c 3f 02 |? | MOVE.W D2,-(A7) 0002020e 4e 93 |N | JSR (A3) 00020210 54 4f |TO | ADDQ.L #0x2,A7 00020212 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00020216 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 0002021c 54 4f |TO | ADDQ.L #0x2,A7 0002021e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020224 50 4f |PO | ADDQ.L #0x8,A7 00020226 4e 94 |N | JSR (A4) 00020228 de c4 | | ADDA.W D4,A7 0002022a 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 0002022e b0 c1 | | CMPA.W D1,A0 00020230 67 48 |gH | BEQ 0x2027a 00020232 9e c5 | | SUBA.W D5,A7 00020234 22 4f |"O | MOVEA.L A7,A1 00020236 45 fa fe e0 |E | LEA.L 0x20118,A2 0002023a 70 0c |p | MOVEQ.L #0x0c,D0 0002023c 12 da | | MOVE.B (A2)+,(A1)+ 0002023e 51 c8 ff fc |Q | DBF D0,0x2023c 00020242 9e c3 | | SUBA.W D3,A7 00020244 22 4f |"O | MOVEA.L A7,A1 00020246 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 0002024a 70 1d |p | MOVEQ.L #0x1d,D0 0002024c 12 d8 | | MOVE.B (A0)+,(A1)+ 0002024e 51 c8 ff fc |Q | DBF D0,0x2024c 00020252 51 4f |QO | SUBQ.L #0x8,A7 00020254 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00020258 3f 01 |? | MOVE.W D1,-(A7) 0002025a 3f 02 |? | MOVE.W D2,-(A7) 0002025c 4e 93 |N | JSR (A3) 0002025e 58 4f |XO | ADDQ.L #0x4,A7 00020260 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00020264 3f 01 |? | MOVE.W D1,-(A7) 00020266 3f 03 |? | MOVE.W D3,-(A7) 00020268 4e 93 |N | JSR (A3) 0002026a 50 4f |PO | ADDQ.L #0x8,A7 0002026c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020272 50 4f |PO | ADDQ.L #0x8,A7 00020274 4e 94 |N | JSR (A4) 00020276 de fc 00 30 | 0 | ADDA.W #0x30,A7 0002027a 9e c5 | | SUBA.W D5,A7 0002027c 20 4f | O | MOVEA.L A7,A0 0002027e 43 fa fe a6 |C | LEA.L 0x20126,A1 00020282 70 0c |p | MOVEQ.L #0x0c,D0 00020284 10 d9 | | MOVE.B (A1)+,(A0)+ 00020286 51 c8 ff fc |Q | DBF D0,0x20284 0002028a 51 4f |QO | SUBQ.L #0x8,A7 0002028c 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020290 3f 01 |? | MOVE.W D1,-(A7) 00020292 3f 02 |? | MOVE.W D2,-(A7) 00020294 4e 93 |N | JSR (A3) 00020296 54 4f |TO | ADDQ.L #0x2,A7 00020298 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 0002029c 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 000202a2 54 4f |TO | ADDQ.L #0x2,A7 000202a4 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000202aa 50 4f |PO | ADDQ.L #0x8,A7 000202ac 4e 94 |N | JSR (A4) 000202ae 5d 4f |]O | SUBQ.L #0x6,A7 000202b0 20 4f | O | MOVEA.L A7,A0 000202b2 43 fa fe 92 |C | LEA.L 0x20146,A1 000202b6 70 16 |p | MOVEQ.L #0x16,D0 000202b8 10 d9 | | MOVE.B (A1)+,(A0)+ 000202ba 51 c8 ff fc |Q | DBF D0,0x202b8 000202be 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000202c2 59 4f |YO | SUBQ.L #0x4,A7 000202c4 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000202c8 3f 01 |? | MOVE.W D1,-(A7) 000202ca 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 000202ce 4e 93 |N | JSR (A3) 000202d0 50 4f |PO | ADDQ.L #0x8,A7 000202d2 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000202d8 de c3 | | ADDA.W D3,A7 000202da 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 000202de 4e 5e |N^ | UNLK A6 000202e0 4e 75 |Nu | RTS 000202e2 ; -------------------------------------------------------------------------------------- 000202e2 ; OMSI PASCAL Function 000202e2 ; <LVAR 0x00c 1(r)> 000202e2 ; <LVAR 0x008 4(r)> 000202e2 ; <LVAR -0x002 @> 000202e2 ; -------------------------------------------------------------------------------------- 000202e2 4e 56 ff d6 |NV | LINK.W A6,#0xffd6 ; Spelunked 000202e6 bf d5 | | CMPA.L (A5),A7 000202e8 62 06 |b | BHI 0x202f0 000202ea 44 fc 00 02 |D | MOVE.W #0x2,CCR 000202ee 4e 76 |Nv | TRAPV 000202f0 de fc 00 28 | ( | ADDA.W #0x28,A7 000202f4 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 000202f8 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000202fe 1f 2e 00 0c | . | MOVE.B (A6+0xc),-(A7) 00020302 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00020308 54 4f |TO | ADDQ.L #0x2,A7 0002030a 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 00020310 9e fc 00 0a | | SUBA.W #0xa,A7 00020314 20 4f | O | MOVEA.L A7,A0 00020316 43 fa fe 46 |C F | LEA.L 0x2015e,A1 0002031a 70 08 |p | MOVEQ.L #0x08,D0 0002031c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002031e 51 c8 ff fc |Q | DBF D0,0x2031c 00020322 59 4f |YO | SUBQ.L #0x4,A7 00020324 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020328 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002032c 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00020330 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020336 50 4f |PO | ADDQ.L #0x8,A7 00020338 48 78 00 01 |Hx | PEA.L 0x1 0002033c 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020340 48 6e ff fe |Hn | PEA.L (A6-0x2) 00020344 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 0002034a de fc 00 18 | | ADDA.W #0x18,A7 0002034e 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020354 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020358 48 50 |HP | PEA.L (A0) 0002035a 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020360 58 4f |XO | ADDQ.L #0x4,A7 00020362 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 00020368 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 0002036c 4e 5e |N^ | UNLK A6 0002036e 4e 75 |Nu | RTS 00020370 ; -------------------------------------------------------------------------------------- 00020370 ; OMSI PASCAL Function 00020370 ; <LVAR 0x008 4(r)> 00020370 ; -------------------------------------------------------------------------------------- 00020370 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 00020374 bf d5 | | CMPA.L (A5),A7 00020376 62 06 |b | BHI 0x2037e 00020378 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002037c 4e 76 |Nv | TRAPV 0002037e de fc 00 0c | | ADDA.W #0xc,A7 00020382 48 e7 00 80 |H | MOVEM.L A0,-(A7) 00020386 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 0002038c 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020390 48 50 |HP | PEA.L (A0) 00020392 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020398 58 4f |XO | ADDQ.L #0x4,A7 0002039a 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 000203a0 4c df 01 00 |L | MOVEM.L (A7)+,A0 000203a4 4e 5e |N^ | UNLK A6 000203a6 4e 75 |Nu | RTS 000203a8 ; -------------------------------------------------------------------------------------- 000203a8 ; OMSI PASCAL Function 000203a8 ; <LVAR 0x008 1(r)> 000203a8 ; -------------------------------------------------------------------------------------- 000203a8 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 000203ac bf d5 | | CMPA.L (A5),A7 000203ae 62 06 |b | BHI 0x203b6 000203b0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000203b4 4e 76 |Nv | TRAPV 000203b6 de fc 00 0a | | ADDA.W #0xa,A7 000203ba 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000203c0 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 000203c4 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 000203ca 54 4f |TO | ADDQ.L #0x2,A7 000203cc 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 000203d2 42 27 |B' | CLR.B -(A7) 000203d4 48 78 00 01 |Hx | PEA.L 0x1 000203d8 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000203de 5c 4f |\O | ADDQ.L #0x6,A7 000203e0 4e 5e |N^ | UNLK A6 000203e2 4e 75 |Nu | RTS 000203e4 ; -------------------------------------------------------------------------------------- 000203e4 ; OMSI PASCAL Function 000203e4 ; <LVAR -0x003 1(rw)> 000203e4 ; -------------------------------------------------------------------------------------- 000203e4 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 000203e8 bf d5 | | CMPA.L (A5),A7 000203ea 62 06 |b | BHI 0x203f2 000203ec 44 fc 00 02 |D | MOVE.W #0x2,CCR 000203f0 4e 76 |Nv | TRAPV 000203f2 de fc 00 24 | $ | ADDA.W #0x24,A7 000203f6 48 e7 e1 80 |H | MOVEM.L A0+D7+D2+D1+D0,-(A7) 000203fa 41 ee ff fd |A | LEA.L (A6-0x3),A0 000203fe 72 0f |r | MOVEQ.L #0x0f,D1 00020400 74 01 |t | MOVEQ.L #0x01,D2 00020402 42 10 |B | CLR.B (A0) 00020404 7e 0c |~ | MOVEQ.L #0x0c,D7 00020406 55 4f |UO | SUBQ.L #0x2,A7 00020408 1f 07 | | MOVE.B D7,-(A7) 0002040a 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00020410 54 4f |TO | ADDQ.L #0x2,A7 00020412 4a 1f |J | TST.B (A7)+ 00020414 67 0c |g | BEQ 0x20422 00020416 42 80 |B | CLR.L D0 00020418 10 10 | | MOVE.B (A0),D0 0002041a 52 40 |R@ | ADDQ.W #0x1,D0 0002041c 41 bc 00 ff |A | CHK.W #0xff,D0 00020420 10 80 | | MOVE.B D0,(A0) 00020422 52 07 |R | ADDQ.B #0x1,D7 00020424 be 01 | | CMP.B D1,D7 00020426 6f de |o | BLE 0x20406 00020428 7e 0c |~ | MOVEQ.L #0x0c,D7 0002042a 55 4f |UO | SUBQ.L #0x2,A7 0002042c 1f 07 | | MOVE.B D7,-(A7) 0002042e 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00020434 54 4f |TO | ADDQ.L #0x2,A7 00020436 4a 1f |J | TST.B (A7)+ 00020438 67 30 |g0 | BEQ 0x2046a 0002043a 1f 07 | | MOVE.B D7,-(A7) 0002043c 55 4f |UO | SUBQ.L #0x2,A7 0002043e 1f 07 | | MOVE.B D7,-(A7) 00020440 4e b9 00 01 04 c6 |N | JSR EQ_1c218(a : Byte) : Bool 00020446 54 4f |TO | ADDQ.L #0x2,A7 00020448 10 17 | | MOVE.B (A7),D0 0002044a 48 80 |H | EXTB.W D0 0002044c 41 82 |A | CHK.W D2,D0 0002044e 1e 80 | | MOVE.B D0,(A7) 00020450 55 4f |UO | SUBQ.L #0x2,A7 00020452 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00020458 10 17 | | MOVE.B (A7),D0 0002045a 48 80 |H | EXTB.W D0 0002045c 41 82 |A | CHK.W D2,D0 0002045e 1e 80 | | MOVE.B D0,(A7) 00020460 1f 10 | | MOVE.B (A0),-(A7) 00020462 4e b9 00 02 09 78 |N x | JSR 0x20978 00020468 50 4f |PO | ADDQ.L #0x8,A7 0002046a 52 07 |R | ADDQ.B #0x1,D7 0002046c be 01 | | CMP.B D1,D7 0002046e 6f ba |o | BLE 0x2042a 00020470 4c df 01 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0 00020474 4e 5e |N^ | UNLK A6 00020476 4e 75 |Nu | RTS 00020478 ; -------------------------------------------------------------------------------------- 00020478 ; OMSI PASCAL Function 00020478 ; -------------------------------------------------------------------------------------- 00020478 START: 00020478 4f fa 00 08 |O | LEA.L MAIN,A7 0002047c 4e f9 00 01 02 80 |N | JMP ?start_program 00020482 MAIN: 00020482 45 f9 00 02 0d 3c |E < | LEA.L 0x20d3c,A2 00020488 47 f9 00 02 0d 42 |G B | LEA.L 0x20d42,A3 0002048e 49 f9 00 01 04 c0 |I | LEA.L HasBoard(diproc_addr: Byte) : Byte,A4 00020494 72 02 |r | MOVEQ.L #0x02,D1 00020496 74 0f |t | MOVEQ.L #0x0f,D2 00020498 4e b9 00 01 03 98 |N | JSR FSCALL_10398 0002049e 48 53 |HS | PEA.L (A3) 000204a0 4e ba fe ce |N | JSR 0x20370 000204a4 58 4f |XO | ADDQ.L #0x4,A7 000204a6 48 78 00 0f |Hx | PEA.L 0xf 000204aa 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 000204b0 54 4f |TO | ADDQ.L #0x2,A7 000204b2 1e 93 | | MOVE.B (A3),(A7) 000204b4 4e b9 00 01 04 d2 |N | JSR SetExpInitDone(a : Byte) 000204ba 54 4f |TO | ADDQ.L #0x2,A7 000204bc 4e b9 00 02 0c 50 |N P | JSR exp_MF.IOC() 000204c2 4e b9 00 02 07 d4 |N | JSR exp_MF.VAL() 000204c8 4e b9 00 02 07 82 |N | JSR exp_MF.TYP() 000204ce 4e b9 00 02 07 1a |N | JSR exp_RESET.SEQ() 000204d4 70 0c |p | MOVEQ.L #0x0c,D0 000204d6 14 80 | | MOVE.B D0,(A2) 000204d8 55 4f |UO | SUBQ.L #0x2,A7 000204da 1f 00 | | MOVE.B D0,-(A7) 000204dc 4e 94 |N | JSR (A4) 000204de 54 4f |TO | ADDQ.L #0x2,A7 000204e0 4a 1f |J | TST.B (A7)+ 000204e2 67 0a |g | BEQ 0x204ee 000204e4 1f 00 | | MOVE.B D0,-(A7) 000204e6 4e b9 00 02 08 d4 |N | JSR 0x208d4 000204ec 54 4f |TO | ADDQ.L #0x2,A7 000204ee 52 00 |R | ADDQ.B #0x1,D0 000204f0 b0 02 | | CMP.B D2,D0 000204f2 6f e2 |o | BLE 0x204d6 000204f4 4e b9 00 02 06 66 |N f | JSR exp_MF.FIU() 000204fa 4e b9 00 02 07 64 |N d | JSR exp_CLEAR_PARITY.SEQ() 00020500 1f 3c 00 ff | < | MOVE.B #0xff,-(A7) 00020504 42 27 |B' | CLR.B -(A7) 00020506 4e b9 00 02 0c 80 |N | JSR exp_LOAD_PAREG.IOC(Sw_1, Sw_1) 0002050c 58 4f |XO | ADDQ.L #0x4,A7 0002050e 4e b9 00 02 07 b6 |N | JSR exp_CLEAR_PARITY.TYP() 00020514 4e b9 00 02 08 08 |N | JSR exp_CLEAR_PARITY.VAL() 0002051a 70 0c |p | MOVEQ.L #0x0c,D0 0002051c 14 80 | | MOVE.B D0,(A2) 0002051e 55 4f |UO | SUBQ.L #0x2,A7 00020520 1f 00 | | MOVE.B D0,-(A7) 00020522 4e 94 |N | JSR (A4) 00020524 54 4f |TO | ADDQ.L #0x2,A7 00020526 4a 1f |J | TST.B (A7)+ 00020528 67 0a |g | BEQ 0x20534 0002052a 1f 00 | | MOVE.B D0,-(A7) 0002052c 4e b9 00 02 0a 6c |N l | JSR 0x20a6c 00020532 54 4f |TO | ADDQ.L #0x2,A7 00020534 52 00 |R | ADDQ.B #0x1,D0 00020536 b0 02 | | CMP.B D2,D0 00020538 6f e2 |o | BLE 0x2051c 0002053a 4e b9 00 02 06 b6 |N | JSR exp_CLEAR_PARITY.FIU() 00020540 4e b9 00 01 05 b0 |N | JSR FifoInit(void) 00020546 42 67 |Bg | CLR.W -(A7) 00020548 42 67 |Bg | CLR.W -(A7) 0002054a 42 27 |B' | CLR.B -(A7) 0002054c 4e b9 00 02 06 96 |N | JSR exp_LOAD_COUNTER.FIU(Sw_2, Sw_2, Sw_1) 00020552 5c 4f |\O | ADDQ.L #0x6,A7 00020554 4e b9 00 02 0c 9e |N | JSR exp_DISABLE_TIMERS.IOC() 0002055a 42 67 |Bg | CLR.W -(A7) 0002055c 4e b9 00 02 07 30 |N 0 | JSR exp_PREP_RUN.SEQ(Sw_2) 00020562 54 4f |TO | ADDQ.L #0x2,A7 00020564 4e b9 00 02 06 f6 |N | JSR exp_SET_TO_NO_DISPATCH.SEQ() 0002056a 3f 3a fc 24 |?: $ | MOVE.W 0x20190,-(A7) 0002056e 3f 3a fc 1e |?: | MOVE.W 0x2018e,-(A7) 00020572 3f 3a fc 18 |?: | MOVE.W 0x2018c,-(A7) 00020576 4e b9 00 02 07 4a |N J | JSR exp_LOAD_UIR.SEQ(Sw_6) 0002057c 5c 4f |\O | ADDQ.L #0x6,A7 0002057e 3f 3c a0 00 |?< | MOVE.W #0xa000,-(A7) 00020582 42 27 |B' | CLR.B -(A7) 00020584 4e b9 00 02 0c 64 |N d | JSR exp_LOAD_UIR.IOC(Sw_2, Sw_1) 0002058a 58 4f |XO | ADDQ.L #0x4,A7 0002058c 42 67 |Bg | CLR.W -(A7) 0002058e 3f 3a fc 0c |?: | MOVE.W 0x2019c,-(A7) 00020592 3f 3a fc 06 |?: | MOVE.W 0x2019a,-(A7) 00020596 3f 3a fc 00 |?: | MOVE.W 0x20198,-(A7) 0002059a 42 27 |B' | CLR.B -(A7) 0002059c 4e b9 00 02 07 96 |N | JSR exp_LOAD_WCS_UIR.TYP(Sw_2, Sw_6, Sw_1) 000205a2 50 4f |PO | ADDQ.L #0x8,A7 000205a4 42 57 |BW | CLR.W (A7) 000205a6 5d 4f |]O | SUBQ.L #0x6,A7 000205a8 20 4f | O | MOVEA.L A7,A0 000205aa 43 fa fb f2 |C | LEA.L 0x2019e,A1 000205ae 70 04 |p | MOVEQ.L #0x04,D0 000205b0 10 d9 | | MOVE.B (A1)+,(A0)+ 000205b2 51 c8 ff fc |Q | DBF D0,0x205b0 000205b6 42 27 |B' | CLR.B -(A7) 000205b8 4e b9 00 02 07 e8 |N | JSR exp_LOAD_WCS_UIR.VAL(Sw_2, Sw_5, Sw_1) 000205be de fc 00 0a | | ADDA.W #0xa,A7 000205c2 4e b9 00 02 06 d4 |N | JSR exp_CLEAR_EXCEPTIONS.FIU() 000205c8 3f 3a fb cc |?: | MOVE.W 0x20196,-(A7) 000205cc 3f 3a fb c6 |?: | MOVE.W 0x20194,-(A7) 000205d0 3f 3a fb c0 |?: | MOVE.W 0x20192,-(A7) 000205d4 42 27 |B' | CLR.B -(A7) 000205d6 4e b9 00 02 06 7a |N z | JSR exp_LOAD_UIR.FIU(Sw_6, Sw_1) 000205dc 50 4f |PO | ADDQ.L #0x8,A7 000205de 1f 3c 00 04 | < | MOVE.B #0x04,-(A7) 000205e2 1f 01 | | MOVE.B D1,-(A7) 000205e4 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 000205ea 58 4f |XO | ADDQ.L #0x4,A7 000205ec 1f 01 | | MOVE.B D1,-(A7) 000205ee 1f 01 | | MOVE.B D1,-(A7) 000205f0 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 000205f6 54 4f |TO | ADDQ.L #0x2,A7 000205f8 1e bc 00 07 | | MOVE.B #0x07,(A7) 000205fc 1f 01 | | MOVE.B D1,-(A7) 000205fe 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 00020604 54 4f |TO | ADDQ.L #0x2,A7 00020606 1e bc 00 06 | | MOVE.B #0x06,(A7) 0002060a 1f 01 | | MOVE.B D1,-(A7) 0002060c 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 00020612 54 4f |TO | ADDQ.L #0x2,A7 00020614 1e bc 00 03 | | MOVE.B #0x03,(A7) 00020618 1f 01 | | MOVE.B D1,-(A7) 0002061a 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 00020620 58 4f |XO | ADDQ.L #0x4,A7 00020622 70 0c |p | MOVEQ.L #0x0c,D0 00020624 14 80 | | MOVE.B D0,(A2) 00020626 55 4f |UO | SUBQ.L #0x2,A7 00020628 1f 00 | | MOVE.B D0,-(A7) 0002062a 4e 94 |N | JSR (A4) 0002062c 54 4f |TO | ADDQ.L #0x2,A7 0002062e 4a 1f |J | TST.B (A7)+ 00020630 67 1a |g | BEQ 0x2064c 00020632 1f 00 | | MOVE.B D0,-(A7) 00020634 4e b9 00 02 0b 16 |N | JSR 0x20b16 0002063a 1e 80 | | MOVE.B D0,(A7) 0002063c 4e b9 00 02 0b c2 |N | JSR 0x20bc2 00020642 1e 80 | | MOVE.B D0,(A7) 00020644 4e b9 00 02 08 3a |N : | JSR 0x2083a 0002064a 54 4f |TO | ADDQ.L #0x2,A7 0002064c 52 00 |R | ADDQ.B #0x1,D0 0002064e b0 02 | | CMP.B D2,D0 00020650 6f d2 |o | BLE 0x20624 00020652 4e ba fd 90 |N | JSR 0x203e4 00020656 1f 3c 00 01 | < | MOVE.B #0x01,-(A7) 0002065a 4e ba fd 4c |N L | JSR 0x203a8 0002065e 54 4f |TO | ADDQ.L #0x2,A7 00020660 4e b9 00 01 02 84 |N | JSR ?exit 00020666 exp_MF.FIU(): 00020666 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002066c 00 08 | | .CONST 0x0008 ; Stack-delta 0002066e 06 4d 46 2e 46 49 55 | MF.FIU | .TXT 6,'MF.FIU' 00020675 00 | | .CONST 0x0 00020676 03 | | .CONST 0x3 ; DIPROC address 00020677 00 | | .CONST 0x0 ; Output Parameters 00020678 00 | | .CONST 0x0 ; Input Parameters 00020679 00 | | .PAD 0x0 0002067a exp_LOAD_UIR.FIU(Sw_6, Sw_1): 0002067a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020680 00 10 | | .CONST 0x0010 ; Stack-delta 00020682 0c 4c 4f 41 44 5f 55 49 | LOAD_UI| .TXT 12,'LOAD_UIR.FIU' 0002068f 00 | | .CONST 0x0 00020690 03 | | .CONST 0x3 ; DIPROC address 00020691 00 | | .CONST 0x0 ; Output Parameters 00020692 02 | | .CONST 0x2 ; Input Parameters 00020693 05 | | .CONST 0x5 ; In arg [6] 00020694 00 | | .CONST 0x0 ; In arg [1] 00020695 00 | | .PAD 0x0 00020696 exp_LOAD_COUNTER.FIU(Sw_2, Sw_2, Sw_1): 00020696 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002069c 00 0e | | .CONST 0x000e ; Stack-delta 0002069e 10 4c 4f 41 44 5f 43 4f | LOAD_CO| .TXT 16,'LOAD_COUNTER.FIU' 000206af 00 | | .CONST 0x0 000206b0 03 | | .CONST 0x3 ; DIPROC address 000206b1 00 | | .CONST 0x0 ; Output Parameters 000206b2 03 | | .CONST 0x3 ; Input Parameters 000206b3 01 | | .CONST 0x1 ; In arg [2] 000206b4 01 | | .CONST 0x1 ; In arg [2] 000206b5 00 | | .CONST 0x0 ; In arg [1] 000206b6 exp_CLEAR_PARITY.FIU(): 000206b6 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000206bc 00 08 | | .CONST 0x0008 ; Stack-delta 000206be 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.FIU' 000206cf 00 | | .CONST 0x0 000206d0 03 | | .CONST 0x3 ; DIPROC address 000206d1 00 | | .CONST 0x0 ; Output Parameters 000206d2 00 | | .CONST 0x0 ; Input Parameters 000206d3 00 | | .PAD 0x0 000206d4 exp_CLEAR_EXCEPTIONS.FIU(): 000206d4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000206da 00 08 | | .CONST 0x0008 ; Stack-delta 000206dc 14 43 4c 45 41 52 5f 45 | CLEAR_E| .TXT 20,'CLEAR_EXCEPTIONS.FIU' 000206f1 00 | | .CONST 0x0 000206f2 03 | | .CONST 0x3 ; DIPROC address 000206f3 00 | | .CONST 0x0 ; Output Parameters 000206f4 00 | | .CONST 0x0 ; Input Parameters 000206f5 00 | | .PAD 0x0 000206f6 exp_SET_TO_NO_DISPATCH.SEQ(): 000206f6 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000206fc 00 08 | | .CONST 0x0008 ; Stack-delta 000206fe 16 53 45 54 5f 54 4f 5f | SET_TO_| .TXT 22,'SET_TO_NO_DISPATCH.SEQ' 00020715 00 | | .CONST 0x0 00020716 02 | | .CONST 0x2 ; DIPROC address 00020717 00 | | .CONST 0x0 ; Output Parameters 00020718 00 | | .CONST 0x0 ; Input Parameters 00020719 00 | | .PAD 0x0 0002071a exp_RESET.SEQ(): 0002071a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020720 00 08 | | .CONST 0x0008 ; Stack-delta 00020722 09 52 45 53 45 54 2e 53 | RESET.S| .TXT 9,'RESET.SEQ' 0002072c 00 | | .CONST 0x0 0002072d 02 | | .CONST 0x2 ; DIPROC address 0002072e 00 | | .CONST 0x0 ; Output Parameters 0002072f 00 | | .CONST 0x0 ; Input Parameters 00020730 exp_PREP_RUN.SEQ(Sw_2): 00020730 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020736 00 0a | | .CONST 0x000a ; Stack-delta 00020738 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.SEQ' 00020745 00 | | .CONST 0x0 00020746 02 | | .CONST 0x2 ; DIPROC address 00020747 00 | | .CONST 0x0 ; Output Parameters 00020748 01 | | .CONST 0x1 ; Input Parameters 00020749 01 | | .CONST 0x1 ; In arg [2] 0002074a exp_LOAD_UIR.SEQ(Sw_6): 0002074a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020750 00 0e | | .CONST 0x000e ; Stack-delta 00020752 0c 4c 4f 41 44 5f 55 49 | LOAD_UI| .TXT 12,'LOAD_UIR.SEQ' 0002075f 00 | | .CONST 0x0 00020760 02 | | .CONST 0x2 ; DIPROC address 00020761 00 | | .CONST 0x0 ; Output Parameters 00020762 01 | | .CONST 0x1 ; Input Parameters 00020763 05 | | .CONST 0x5 ; In arg [6] 00020764 exp_CLEAR_PARITY.SEQ(): 00020764 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002076a 00 08 | | .CONST 0x0008 ; Stack-delta 0002076c 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.SEQ' 0002077d 00 | | .CONST 0x0 0002077e 02 | | .CONST 0x2 ; DIPROC address 0002077f 00 | | .CONST 0x0 ; Output Parameters 00020780 00 | | .CONST 0x0 ; Input Parameters 00020781 00 | | .PAD 0x0 00020782 exp_MF.TYP(): 00020782 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020788 00 08 | | .CONST 0x0008 ; Stack-delta 0002078a 06 4d 46 2e 54 59 50 | MF.TYP | .TXT 6,'MF.TYP' 00020791 00 | | .CONST 0x0 00020792 06 | | .CONST 0x6 ; DIPROC address 00020793 00 | | .CONST 0x0 ; Output Parameters 00020794 00 | | .CONST 0x0 ; Input Parameters 00020795 00 | | .PAD 0x0 00020796 exp_LOAD_WCS_UIR.TYP(Sw_2, Sw_6, Sw_1): 00020796 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002079c 00 12 | | .CONST 0x0012 ; Stack-delta 0002079e 10 4c 4f 41 44 5f 57 43 | LOAD_WC| .TXT 16,'LOAD_WCS_UIR.TYP' 000207af 00 | | .CONST 0x0 000207b0 06 | | .CONST 0x6 ; DIPROC address 000207b1 00 | | .CONST 0x0 ; Output Parameters 000207b2 03 | | .CONST 0x3 ; Input Parameters 000207b3 01 | | .CONST 0x1 ; In arg [2] 000207b4 05 | | .CONST 0x5 ; In arg [6] 000207b5 00 | | .CONST 0x0 ; In arg [1] 000207b6 exp_CLEAR_PARITY.TYP(): 000207b6 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000207bc 00 08 | | .CONST 0x0008 ; Stack-delta 000207be 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.TYP' 000207cf 00 | | .CONST 0x0 000207d0 06 | | .CONST 0x6 ; DIPROC address 000207d1 00 | | .CONST 0x0 ; Output Parameters 000207d2 00 | | .CONST 0x0 ; Input Parameters 000207d3 00 | | .PAD 0x0 000207d4 exp_MF.VAL(): 000207d4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000207da 00 08 | | .CONST 0x0008 ; Stack-delta 000207dc 06 4d 46 2e 56 41 4c | MF.VAL | .TXT 6,'MF.VAL' 000207e3 00 | | .CONST 0x0 000207e4 07 | | .CONST 0x7 ; DIPROC address 000207e5 00 | | .CONST 0x0 ; Output Parameters 000207e6 00 | | .CONST 0x0 ; Input Parameters 000207e7 00 | | .PAD 0x0 000207e8 exp_LOAD_WCS_UIR.VAL(Sw_2, Sw_5, Sw_1): 000207e8 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000207ee 00 12 | | .CONST 0x0012 ; Stack-delta 000207f0 10 4c 4f 41 44 5f 57 43 | LOAD_WC| .TXT 16,'LOAD_WCS_UIR.VAL' 00020801 00 | | .CONST 0x0 00020802 07 | | .CONST 0x7 ; DIPROC address 00020803 00 | | .CONST 0x0 ; Output Parameters 00020804 03 | | .CONST 0x3 ; Input Parameters 00020805 01 | | .CONST 0x1 ; In arg [2] 00020806 04 | | .CONST 0x4 ; In arg [5] 00020807 00 | | .CONST 0x0 ; In arg [1] 00020808 exp_CLEAR_PARITY.VAL(): 00020808 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002080e 00 08 | | .CONST 0x0008 ; Stack-delta 00020810 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.VAL' 00020821 00 | | .CONST 0x0 00020822 07 | | .CONST 0x7 ; DIPROC address 00020823 00 | | .CONST 0x0 ; Output Parameters 00020824 00 | | .CONST 0x0 ; Input Parameters 00020825 00 | | .PAD 0x0 00020826 52 45 53 45 54 2e 4d 45 |RESET.ME| .TXT 'RESET.MEM ' 00020830 52 45 53 45 54 2e 4d 33 |RESET.M3| .TXT 'RESET.M32 ' 0002083a ; -------------------------------------------------------------------------------------- 0002083a ; OMSI PASCAL Function 0002083a ; <LVAR 0x008 1(r)> 0002083a ; <LVAR -0x006 @ 4(r)> 0002083a ; -------------------------------------------------------------------------------------- 0002083a 4e 56 ff cc |NV | LINK.W A6,#0xffcc 0002083e bf d5 | | CMPA.L (A5),A7 00020840 62 06 |b | BHI 0x20848 00020842 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020846 4e 76 |Nv | TRAPV 00020848 de fc 00 2e | . | ADDA.W #0x2e,A7 0002084c 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00020850 45 ee ff fa |E | LEA.L (A6-0x6),A2 00020854 72 0a |r | MOVEQ.L #0x0a,D1 00020856 55 4f |UO | SUBQ.L #0x2,A7 00020858 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002085e 4a 1f |J | TST.B (A7)+ 00020860 67 12 |g | BEQ 0x20874 00020862 9e c1 | | SUBA.W D1,A7 00020864 20 4f | O | MOVEA.L A7,A0 00020866 43 fa ff be |C | LEA.L 0x20826,A1 0002086a 70 08 |p | MOVEQ.L #0x08,D0 0002086c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002086e 51 c8 ff fc |Q | DBF D0,0x2086c 00020872 60 10 |` | BRA 0x20884 00020874 9e c1 | | SUBA.W D1,A7 00020876 20 4f | O | MOVEA.L A7,A0 00020878 43 fa ff b6 |C | LEA.L 0x20830,A1 0002087c 70 08 |p | MOVEQ.L #0x08,D0 0002087e 10 d9 | | MOVE.B (A1)+,(A0)+ 00020880 51 c8 ff fc |Q | DBF D0,0x2087e 00020884 59 4f |YO | SUBQ.L #0x4,A7 00020886 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002088a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002088e 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00020892 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020898 50 4f |PO | ADDQ.L #0x8,A7 0002089a 48 52 |HR | PEA.L (A2) 0002089c 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000208a2 de fc 00 12 | | ADDA.W #0x12,A7 000208a6 42 27 |B' | CLR.B -(A7) 000208a8 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 000208ac 2f 12 |/ | MOVE.L (A2),-(A7) 000208ae 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000208b4 50 4f |PO | ADDQ.L #0x8,A7 000208b6 48 52 |HR | PEA.L (A2) 000208b8 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000208be 58 4f |XO | ADDQ.L #0x4,A7 000208c0 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 000208c4 4e 5e |N^ | UNLK A6 000208c6 4e 75 |Nu | RTS 000208c8 4d 46 |MF | .TXT 'MF' 000208ca 2e 4d |.M | .TXT '.M' 000208cc 45 4d |EM | .TXT 'EM' 000208ce 4d 46 |MF | .TXT 'MF' 000208d0 2e 4d |.M | .TXT '.M' 000208d2 33 32 |32 | .TXT '32' 000208d4 ; -------------------------------------------------------------------------------------- 000208d4 ; OMSI PASCAL Function 000208d4 ; <LVAR 0x008 1(r)> 000208d4 ; <LVAR -0x006 @ 4(r)> 000208d4 ; -------------------------------------------------------------------------------------- 000208d4 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 000208d8 bf d5 | | CMPA.L (A5),A7 000208da 62 06 |b | BHI 0x208e2 000208dc 44 fc 00 02 |D | MOVE.W #0x2,CCR 000208e0 4e 76 |Nv | TRAPV 000208e2 de fc 00 1a | | ADDA.W #0x1a,A7 000208e6 48 e7 00 80 |H | MOVEM.L A0,-(A7) 000208ea 41 ee ff fa |A | LEA.L (A6-0x6),A0 000208ee 55 4f |UO | SUBQ.L #0x2,A7 000208f0 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000208f6 4a 1f |J | TST.B (A7)+ 000208f8 67 0e |g | BEQ 0x20908 000208fa 3f 3a ff d0 |?: | MOVE.W 0x208cc,-(A7) 000208fe 3f 3a ff ca |?: | MOVE.W 0x208ca,-(A7) 00020902 3f 3a ff c4 |?: | MOVE.W 0x208c8,-(A7) 00020906 60 0c |` | BRA 0x20914 00020908 3f 3a ff c8 |?: | MOVE.W 0x208d2,-(A7) 0002090c 3f 3a ff c2 |?: | MOVE.W 0x208d0,-(A7) 00020910 3f 3a ff bc |?: | MOVE.W 0x208ce,-(A7) 00020914 59 4f |YO | SUBQ.L #0x4,A7 00020916 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002091a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002091e 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00020922 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020928 50 4f |PO | ADDQ.L #0x8,A7 0002092a 48 50 |HP | PEA.L (A0) 0002092c 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00020932 de fc 00 0e | | ADDA.W #0xe,A7 00020936 42 27 |B' | CLR.B -(A7) 00020938 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 0002093c 2f 10 |/ | MOVE.L (A0),-(A7) 0002093e 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00020944 50 4f |PO | ADDQ.L #0x8,A7 00020946 48 50 |HP | PEA.L (A0) 00020948 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 0002094e 58 4f |XO | ADDQ.L #0x4,A7 00020950 4c df 01 00 |L | MOVEM.L (A7)+,A0 00020954 4e 5e |N^ | UNLK A6 00020956 4e 75 |Nu | RTS 00020958 4c 4f 41 44 5f 43 4f 4e |LOAD_CON| .TXT 'LOAD_CONFIG.MEM ' 00020968 4c 4f 41 44 5f 43 4f 4e |LOAD_CON| .TXT 'LOAD_CONFIG.M32 ' 00020978 ; -------------------------------------------------------------------------------------- 00020978 ; OMSI PASCAL Function 00020978 ; <LVAR 0x00e 1(r)> 00020978 ; <LVAR 0x00c 1(r)> 00020978 ; <LVAR 0x00a 1(r)> 00020978 ; <LVAR 0x008 1(r)> 00020978 ; <LVAR -0x004 @ 4(r)> 00020978 ; -------------------------------------------------------------------------------------- 00020978 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 0002097c bf d5 | | CMPA.L (A5),A7 0002097e 62 06 |b | BHI 0x20986 00020980 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020984 4e 76 |Nv | TRAPV 00020986 de fc 00 34 | 4 | ADDA.W #0x34,A7 0002098a 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 0002098e 45 ee ff fc |E | LEA.L (A6-0x4),A2 00020992 72 10 |r | MOVEQ.L #0x10,D1 00020994 55 4f |UO | SUBQ.L #0x2,A7 00020996 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002099c 4a 1f |J | TST.B (A7)+ 0002099e 67 12 |g | BEQ 0x209b2 000209a0 9e c1 | | SUBA.W D1,A7 000209a2 20 4f | O | MOVEA.L A7,A0 000209a4 43 fa ff b2 |C | LEA.L 0x20958,A1 000209a8 70 0e |p | MOVEQ.L #0x0e,D0 000209aa 10 d9 | | MOVE.B (A1)+,(A0)+ 000209ac 51 c8 ff fc |Q | DBF D0,0x209aa 000209b0 60 10 |` | BRA 0x209c2 000209b2 9e c1 | | SUBA.W D1,A7 000209b4 20 4f | O | MOVEA.L A7,A0 000209b6 43 fa ff b0 |C | LEA.L 0x20968,A1 000209ba 70 0e |p | MOVEQ.L #0x0e,D0 000209bc 10 d9 | | MOVE.B (A1)+,(A0)+ 000209be 51 c8 ff fc |Q | DBF D0,0x209bc 000209c2 59 4f |YO | SUBQ.L #0x4,A7 000209c4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000209c8 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000209cc 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 000209d0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000209d6 50 4f |PO | ADDQ.L #0x8,A7 000209d8 48 52 |HR | PEA.L (A2) 000209da 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000209e0 de fc 00 18 | | ADDA.W #0x18,A7 000209e4 2f 12 |/ | MOVE.L (A2),-(A7) 000209e6 1f 2e 00 0c | . | MOVE.B (A6+0xc),-(A7) 000209ea 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 000209f0 54 4f |TO | ADDQ.L #0x2,A7 000209f2 2e 92 |. | MOVE.L (A2),(A7) 000209f4 1f 2e 00 0a | . | MOVE.B (A6+0xa),-(A7) 000209f8 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 000209fe 58 4f |XO | ADDQ.L #0x4,A7 00020a00 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00020a04 2f 12 |/ | MOVE.L (A2),-(A7) 00020a06 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a0a 48 78 00 00 |Hx | PEA.L 0x0 00020a0e 48 78 00 00 |Hx | PEA.L 0x0 00020a12 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00020a18 de c1 | | ADDA.W D1,A7 00020a1a 42 17 |B | CLR.B (A7) 00020a1c 1f 2e 00 0e | . | MOVE.B (A6+0xe),-(A7) 00020a20 2f 12 |/ | MOVE.L (A2),-(A7) 00020a22 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00020a28 50 4f |PO | ADDQ.L #0x8,A7 00020a2a 48 52 |HR | PEA.L (A2) 00020a2c 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00020a32 58 4f |XO | ADDQ.L #0x4,A7 00020a34 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00020a38 4e 5e |N^ | UNLK A6 00020a3a 4e 75 |Nu | RTS 00020a3c 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.MEM ' 00020a54 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.M32 ' 00020a6c ; -------------------------------------------------------------------------------------- 00020a6c ; OMSI PASCAL Function 00020a6c ; <LVAR 0x008 1(r)> 00020a6c ; <LVAR -0x006 @ 4(r)> 00020a6c ; -------------------------------------------------------------------------------------- 00020a6c 4e 56 ff be |NV | LINK.W A6,#0xffbe 00020a70 bf d5 | | CMPA.L (A5),A7 00020a72 62 06 |b | BHI 0x20a7a 00020a74 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020a78 4e 76 |Nv | TRAPV 00020a7a de fc 00 3c | < | ADDA.W #0x3c,A7 00020a7e 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00020a82 45 ee ff fa |E | LEA.L (A6-0x6),A2 00020a86 72 18 |r | MOVEQ.L #0x18,D1 00020a88 55 4f |UO | SUBQ.L #0x2,A7 00020a8a 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00020a90 4a 1f |J | TST.B (A7)+ 00020a92 67 12 |g | BEQ 0x20aa6 00020a94 9e c1 | | SUBA.W D1,A7 00020a96 20 4f | O | MOVEA.L A7,A0 00020a98 43 fa ff a2 |C | LEA.L 0x20a3c,A1 00020a9c 70 16 |p | MOVEQ.L #0x16,D0 00020a9e 10 d9 | | MOVE.B (A1)+,(A0)+ 00020aa0 51 c8 ff fc |Q | DBF D0,0x20a9e 00020aa4 60 10 |` | BRA 0x20ab6 00020aa6 9e c1 | | SUBA.W D1,A7 00020aa8 20 4f | O | MOVEA.L A7,A0 00020aaa 43 fa ff a8 |C | LEA.L 0x20a54,A1 00020aae 70 16 |p | MOVEQ.L #0x16,D0 00020ab0 10 d9 | | MOVE.B (A1)+,(A0)+ 00020ab2 51 c8 ff fc |Q | DBF D0,0x20ab0 00020ab6 59 4f |YO | SUBQ.L #0x4,A7 00020ab8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020abc 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020ac0 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00020ac4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020aca 50 4f |PO | ADDQ.L #0x8,A7 00020acc 48 52 |HR | PEA.L (A2) 00020ace 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00020ad4 de fc 00 20 | | ADDA.W #0x20,A7 00020ad8 42 27 |B' | CLR.B -(A7) 00020ada 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00020ade 2f 12 |/ | MOVE.L (A2),-(A7) 00020ae0 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00020ae6 50 4f |PO | ADDQ.L #0x8,A7 00020ae8 48 52 |HR | PEA.L (A2) 00020aea 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00020af0 58 4f |XO | ADDQ.L #0x4,A7 00020af2 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00020af6 4e 5e |N^ | UNLK A6 00020af8 4e 75 |Nu | RTS 00020afa 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.MEM' 00020b08 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.M32' 00020b16 ; -------------------------------------------------------------------------------------- 00020b16 ; OMSI PASCAL Function 00020b16 ; <LVAR 0x008 1(r)> 00020b16 ; <LVAR -0x006 @ 4(r)> 00020b16 ; -------------------------------------------------------------------------------------- 00020b16 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 00020b1a bf d5 | | CMPA.L (A5),A7 00020b1c 62 06 |b | BHI 0x20b24 00020b1e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020b22 4e 76 |Nv | TRAPV 00020b24 de fc 00 2a | * | ADDA.W #0x2a,A7 00020b28 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00020b2c 43 ee ff fa |C | LEA.L (A6-0x6),A1 00020b30 55 4f |UO | SUBQ.L #0x2,A7 00020b32 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00020b38 4a 1f |J | TST.B (A7)+ 00020b3a 67 0e |g | BEQ 0x20b4a 00020b3c 41 fa ff ca |A | LEA.L 0x20b08,A0 00020b40 70 06 |p | MOVEQ.L #0x06,D0 00020b42 3f 20 |? | MOVE.W -(A0),-(A7) 00020b44 51 c8 ff fc |Q | DBF D0,0x20b42 00020b48 60 0c |` | BRA 0x20b56 00020b4a 41 fa ff ca |A | LEA.L 0x20b16,A0 00020b4e 70 06 |p | MOVEQ.L #0x06,D0 00020b50 3f 20 |? | MOVE.W -(A0),-(A7) 00020b52 51 c8 ff fc |Q | DBF D0,0x20b50 00020b56 59 4f |YO | SUBQ.L #0x4,A7 00020b58 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020b5c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020b60 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00020b64 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020b6a 50 4f |PO | ADDQ.L #0x8,A7 00020b6c 48 51 |HQ | PEA.L (A1) 00020b6e 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00020b74 de fc 00 16 | | ADDA.W #0x16,A7 00020b78 42 27 |B' | CLR.B -(A7) 00020b7a 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00020b7e 2f 11 |/ | MOVE.L (A1),-(A7) 00020b80 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00020b86 50 4f |PO | ADDQ.L #0x8,A7 00020b88 48 51 |HQ | PEA.L (A1) 00020b8a 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00020b90 58 4f |XO | ADDQ.L #0x4,A7 00020b92 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00020b96 4e 5e |N^ | UNLK A6 00020b98 4e 75 |Nu | RTS 00020b9a 43 4c 45 41 52 5f 44 52 |CLEAR_DR| .TXT 'CLEAR_DRIVE_HIT.MEM ' 00020bae 43 4c 45 41 52 5f 44 52 |CLEAR_DR| .TXT 'CLEAR_DRIVE_HIT.M32 ' 00020bc2 ; -------------------------------------------------------------------------------------- 00020bc2 ; OMSI PASCAL Function 00020bc2 ; <LVAR 0x008 1(r)> 00020bc2 ; <LVAR -0x006 @ 4(r)> 00020bc2 ; -------------------------------------------------------------------------------------- 00020bc2 4e 56 ff c2 |NV | LINK.W A6,#0xffc2 00020bc6 bf d5 | | CMPA.L (A5),A7 00020bc8 62 06 |b | BHI 0x20bd0 00020bca 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020bce 4e 76 |Nv | TRAPV 00020bd0 de fc 00 38 | 8 | ADDA.W #0x38,A7 00020bd4 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00020bd8 45 ee ff fa |E | LEA.L (A6-0x6),A2 00020bdc 72 14 |r | MOVEQ.L #0x14,D1 00020bde 55 4f |UO | SUBQ.L #0x2,A7 00020be0 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00020be6 4a 1f |J | TST.B (A7)+ 00020be8 67 12 |g | BEQ 0x20bfc 00020bea 9e c1 | | SUBA.W D1,A7 00020bec 20 4f | O | MOVEA.L A7,A0 00020bee 43 fa ff aa |C | LEA.L 0x20b9a,A1 00020bf2 70 12 |p | MOVEQ.L #0x12,D0 00020bf4 10 d9 | | MOVE.B (A1)+,(A0)+ 00020bf6 51 c8 ff fc |Q | DBF D0,0x20bf4 00020bfa 60 10 |` | BRA 0x20c0c 00020bfc 9e c1 | | SUBA.W D1,A7 00020bfe 20 4f | O | MOVEA.L A7,A0 00020c00 43 fa ff ac |C | LEA.L 0x20bae,A1 00020c04 70 12 |p | MOVEQ.L #0x12,D0 00020c06 10 d9 | | MOVE.B (A1)+,(A0)+ 00020c08 51 c8 ff fc |Q | DBF D0,0x20c06 00020c0c 59 4f |YO | SUBQ.L #0x4,A7 00020c0e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020c12 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020c16 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00020c1a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020c20 50 4f |PO | ADDQ.L #0x8,A7 00020c22 48 52 |HR | PEA.L (A2) 00020c24 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00020c2a de fc 00 1c | | ADDA.W #0x1c,A7 00020c2e 42 27 |B' | CLR.B -(A7) 00020c30 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00020c34 2f 12 |/ | MOVE.L (A2),-(A7) 00020c36 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00020c3c 50 4f |PO | ADDQ.L #0x8,A7 00020c3e 48 52 |HR | PEA.L (A2) 00020c40 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00020c46 58 4f |XO | ADDQ.L #0x4,A7 00020c48 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00020c4c 4e 5e |N^ | UNLK A6 00020c4e 4e 75 |Nu | RTS 00020c50 exp_MF.IOC(): 00020c50 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020c56 00 08 | | .CONST 0x0008 ; Stack-delta 00020c58 06 4d 46 2e 49 4f 43 | MF.IOC | .TXT 6,'MF.IOC' 00020c5f 00 | | .CONST 0x0 00020c60 04 | | .CONST 0x4 ; DIPROC address 00020c61 00 | | .CONST 0x0 ; Output Parameters 00020c62 00 | | .CONST 0x0 ; Input Parameters 00020c63 00 | | .PAD 0x0 00020c64 exp_LOAD_UIR.IOC(Sw_2, Sw_1): 00020c64 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020c6a 00 0c | | .CONST 0x000c ; Stack-delta 00020c6c 0c 4c 4f 41 44 5f 55 49 | LOAD_UI| .TXT 12,'LOAD_UIR.IOC' 00020c79 00 | | .CONST 0x0 00020c7a 04 | | .CONST 0x4 ; DIPROC address 00020c7b 00 | | .CONST 0x0 ; Output Parameters 00020c7c 02 | | .CONST 0x2 ; Input Parameters 00020c7d 01 | | .CONST 0x1 ; In arg [2] 00020c7e 00 | | .CONST 0x0 ; In arg [1] 00020c7f 00 | | .PAD 0x0 00020c80 exp_LOAD_PAREG.IOC(Sw_1, Sw_1): 00020c80 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020c86 00 0c | | .CONST 0x000c ; Stack-delta 00020c88 0e 4c 4f 41 44 5f 50 41 | LOAD_PA| .TXT 14,'LOAD_PAREG.IOC' 00020c97 00 | | .CONST 0x0 00020c98 04 | | .CONST 0x4 ; DIPROC address 00020c99 00 | | .CONST 0x0 ; Output Parameters 00020c9a 02 | | .CONST 0x2 ; Input Parameters 00020c9b 00 | | .CONST 0x0 ; In arg [1] 00020c9c 00 | | .CONST 0x0 ; In arg [1] 00020c9d 00 | | .PAD 0x0 00020c9e exp_DISABLE_TIMERS.IOC(): 00020c9e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020ca4 00 08 | | .CONST 0x0008 ; Stack-delta 00020ca6 12 44 49 53 41 42 4c 45 | DISABLE| .TXT 18,'DISABLE_TIMERS.IOC' 00020cb9 00 | | .CONST 0x0 00020cba 04 | | .CONST 0x4 ; DIPROC address 00020cbb 00 | | .CONST 0x0 ; Output Parameters 00020cbc 00 | | .CONST 0x0 ; Input Parameters 00020cbd 00 | | .PAD 0x0 00020cbe 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 00020ccc ; -------------------------------------------------------------------------------------- 00020ccc ; OMSI PASCAL Function 00020ccc ; <LVAR 0x008 1(r)> 00020ccc ; -------------------------------------------------------------------------------------- 00020ccc PROG_FAIL: 00020ccc 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00020cd0 bf d5 | | CMPA.L (A5),A7 00020cd2 62 06 |b | BHI 0x20cda 00020cd4 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020cd8 4e 76 |Nv | TRAPV 00020cda de fc 00 2c | , | ADDA.W #0x2c,A7 00020cde 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00020ce2 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 00020ce6 70 06 |p | MOVEQ.L #0x06,D0 00020ce8 3f 20 |? | MOVE.W -(A0),-(A7) 00020cea 51 c8 ff fc |Q | DBF D0,0x20ce8 00020cee 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00020cf2 51 4f |QO | SUBQ.L #0x8,A7 00020cf4 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00020cf8 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020cfc 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00020d00 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020d06 58 4f |XO | ADDQ.L #0x4,A7 00020d08 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00020d0c 48 80 |H | EXTB.W D0 00020d0e 48 c0 |H | EXTW.L D0 00020d10 2f 00 |/ | MOVE.L D0,-(A7) 00020d12 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00020d18 58 4f |XO | ADDQ.L #0x4,A7 00020d1a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020d20 50 4f |PO | ADDQ.L #0x8,A7 00020d22 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020d28 de fc 00 14 | | ADDA.W #0x14,A7 00020d2c 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00020d30 4e 5e |N^ | UNLK A6 00020d32 4e 75 |Nu | RTS