|
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: 3072 (0xc00)
Types: M200
Notes: M200_PROGRAM
Names: »P1VAL.M200«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »P1VAL.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »P1VAL.M200«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »P1VAL.M200«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »P1VAL.M200«
└─ ⟦this⟧ »P1VAL.M200«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »P1VAL.M200«
@ 20142
<POP 20142-20164 Body>
<POP 20142-20154 Prologue> Σ0 ↓
<POP 20154-20160 Naked> Σ0 ↓
<Call 0x20154 0x105b6> {}
R1000_Reset_L(void)
<Call 0x2015a 0x105bc> {}
R1000_Reset_H(void)
<POP 20160-20164 Epilogue> Σ0
@ 20164
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<POP 20164-201c4 Body>
<POP 20164-2017a Prologue> Σ0 ↓
<POP 2017a-20186 RegCacheLoad> Σ0 ↓
<POP 20186-2018c Naked> Σ0 ↓ →0x201bc
<MI 20186 TST.B (A6+0xa)> {}
<MI 2018a BNE 0x201bc> {}
<POP 2018c-201bc Naked> Σ0 ↓
<MI 2018c MOVE.B (A6+0x8),0x20b00> {}
<MI 20190 MOVE.B #0x04,0x20b01> {}
<MI 20194 CLR.B -(A7)> Δ-2 {[#0]}
<Blob 0x20196 [4] 0x20af8> Δ-4 {[#0]|[«4»]}
<Blob 0x2019c [4] 0x20afc> Δ-4 {[#0]|[«4»]|[«4»]}
<Blob 0x201a2 [2] 0x20b00> Δ-2 {[#0]|[«4»]|[«4»]|[«2»]}
<Blob 0x201a4 [8] 0x20b01> Δ-8 {[#0]|[«4»]|[«4»]|[«2»]|[«8»]}
<Call 0x201b2 0x1054a> {[#0]|[«4»]|[«4»]|[«2»]|[«8»]}
?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
<POP 201b8-201bc StackAdj> Δ+20 {}
<POP 201bc-201c4 Epilogue> Σ0 ←0x20186
@ 201c4
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x015 @>
<LVAR -0x016 @ 1(r)>
<LVAR -0x017 1(rw)>
<LVAR -0x018 @ 1(r)>
<POP 201c4-20374 Body> Δ+4
<POP 201c4-201da Prologue> Σ0 ↓
<POP 201da-201f4 RegCacheLoad> Σ0 ↓
<POP 201f4-20210 Naked> Σ0 ↓ →0x2021a
<Const 0x201f4 0x7.2> Δ-2 {[#7]}
<Const 0x201f6 0x20b40.4> Δ-4 {[#7]|[##133952]}
<Const 0x201f8 0x20b3d.4> Δ-4 {[#7]|[##133952]|[##133949]}
<Const 0x201fa 0x20b3e.4> Δ-4 {[#7]|[##133952]|[##133949]|[##133950]}
<Call 0x20200 0x10484> {[#7]|[##133952]|[##133949]|[##133950]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20206-20208 StackAdj> Δ+14 {}
<MI 20208 MOVE.B 0x20b40,D0> {}
<MI 2020a CMPI.B #0x05,D0> {}
<MI 2020e BEQ 0x2021a> {}
<POP 20210-2021a Naked> Σ0 ↓
<MI 20210 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x20212 0x1.2> Δ-2 {[#0]|[#1]}
<Call 0x20214 0x20164> {[#0]|[#1]}
<POP 20218-2021a StackAdj> Δ+4 {}
<POP 2021a-20288 Naked> Σ0 ↓ ←0x201f4
<Call 0x2021a 0x20872> {}
exp_RESET.VAL()
<Blob 0x20220 [18] @> Δ-18 {[«18""»]}
<POP 20232-20234 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x20234 17> {[«18""»]|[$$TRIGGER_SCOPE.VAL]}
<Const 0x20246 0x20b42.4> Δ-4 {[«18""»]|[$$TRIGGER_SCOPE.VAL]|[##133954]}
<Call 0x20248 0x10460> {[«18""»]|[$$TRIGGER_SCOPE.VAL]|[##133954]}
ExpLoad(a : String; b: Pointer)
<POP 2024e-20252 StackAdj> Δ+24 {[-2-]}
<MI 20252 CLR.B (A7)> {[-2-]}
<Blob 0x20254 [4] 0x20b42> Δ-4 {[-2-]|[«4»]}
<Pointer.sp 0x20256 4> Δ-4 {[-2-]|[«4»]|[^^4]}
<Const 0x2025a 0x0.4> Δ-4 {[-2-]|[«4»]|[^^4]|[##0]}
<Const 0x2025e 0x0.4> Δ-4 {[-2-]|[«4»]|[^^4]|[##0]|[##0]}
<Call 0x20262 0x10466> {[-2-]|[«4»]|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 20268-2026c StackAdj> Δ+16 {[-2-]}
<POP 2026c-2026d StackAdj> Δ+2 {}
<Const 0x2026d 0x7.2> Δ-2 {[#7]}
<Blob 0x2026e [4] 0x20b42> Δ-4 {[#7]|[«4»]}
<Call 0x20270 0x1047e> {[#7]|[«4»]}
ExpXmit(adr : Byte; b : Pointer)
<POP 20276-20278 StackAdj> Δ+6 {}
<Const 0x20278 0x20b42.4> Δ-4 {[##133954]}
<Call 0x2027a 0x10496> {[##133954]}
ExpClose(exp : Pointer)
<POP 20280-20282 StackAdj> Δ+4 {}
<MI 20282 MOVE.L #0xfffff830,D7> {}
<POP 20288-202a0 Naked> Σ0 ↓ →0x202a6 ←0x202a0
<Const 0x20288 0x7.2> Δ-2 {[#7]}
<Const 0x2028a 0x20b40.4> Δ-4 {[#7]|[##133952]}
<Const 0x2028c 0x20b3d.4> Δ-4 {[#7]|[##133952]|[##133949]}
<Const 0x2028e 0x20b3e.4> Δ-4 {[#7]|[##133952]|[##133949]|[##133950]}
<Call 0x20294 0x10484> {[#7]|[##133952]|[##133949]|[##133950]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 2029a-2029c StackAdj> Δ+14 {}
<MI 2029c ADDQ.L #0x1,D7> {}
<MI 2029e BEQ 0x202a6> {}
<POP 202a0-202a6 Naked> Σ0 ↓ →0x20288
<MI 202a0 MOVE.B 0x20b40,D0> {}
<MI 202a2 CMP.B #0x01,D0> {}
<MI 202a4 BNE 0x20288> {}
<POP 202a6-202ae Naked> Σ0 ↓ →0x20350 ←0x20288
<MI 202a6 MOVE.B 0x20b40,D0> {}
<MI 202a8 CMP.B #0x01,D0> {}
<MI 202aa BEQ 0x20350> {}
<POP 202ae-202b6 Naked> Σ0 ↓ →0x202c6
<MI 202ae TST.B 0x20b09> {}
<MI 202b4 BNE 0x202c6> {}
<POP 202b6-202bc Naked> Σ0 Δ-4 ↓
<MI 202b6 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x202b8 0x3.2> Δ-2 {[#0]|[#3]}
<POP 202bc-202c6 Naked> Σ-4 Δ+4 →0x20350 ←0x20320
<Call 0x202bc 0x20164> {[-4-]}
<POP 202c0-202c2 StackAdj> Δ+4 {}
<MI 202c2 BRA 0x20350> {}
<POP 202c6-20320 Naked> Σ0 ↓ →0x20328 ←0x202ae
<MI 202c6 MOVE.B #0x07,(A6-0x17)> {}
<Blob 0x202ca [4] @> Δ-4 {[«4""»]}
<MI 202ce MOVE.B (A6-0x17),-(A7)> Δ-2 {[«4""»]|[2, '(A6-0x17)']}
<POP 202d2-202d4 StackAdj> Δ-4 {[«4""»]|[2, '(A6-0x17)']|[-4-]}
<Lit 0x202d4 4> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]}
<MI 202e4 MOVE.B 0x20b09,D0> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]}
<MI 202ea EXTB.W D0> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]}
<POP 0x202ec LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]}
<MI 202ee MOVE.B D0,-(A7)> Δ-2 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']}
<MI 202f0 MOVE.B 0x20b0a,D0> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']}
<MI 202f6 EXTB.W D0> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']}
<POP 0x202f8 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']}
<MI 202fa MOVE.B D0,-(A7)> Δ-2 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']|[2, 'D0']}
<Pointer.fp 0x202fc <LVAR -0x018 @ 1(r)>> Δ-4 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-24]}
<Pointer.fp 0x20300 <LVAR -0x00c @ 4(r)>> Δ-4 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-24]|[@@-12]}
<Pointer.fp 0x20304 <LVAR -0x008 @ 4(r)>> Δ-4 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-24]|[@@-12]|[@@-8]}
<Pointer.fp 0x20308 <LVAR -0x016 @ 1(r)>> Δ-4 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-24]|[@@-12]|[@@-8]|[@@-22]}
<Pointer.fp 0x2030c <LVAR -0x015 @>> Δ-4 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-24]|[@@-12]|[@@-8]|[@@-22]|[@@-21]}
<Call 0x20310 0x10550> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-24]|[@@-12]|[@@-8]|[@@-22]|[@@-21]}
?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B)
<POP 20316-2031a StackAdj> Δ+34 {}
<MI 2031a TST.B (A6-0x18)> {}
<MI 2031e BEQ 0x20328> {}
<POP 20320-20328 Naked> Σ0 Δ-4 →0x202bc
<MI 20320 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x20322 0x2.2> Δ-2 {[#0]|[#2]}
<MI 20326 BRA 0x202bc> {[#0]|[#2]}
<POP 20328-20350 Naked> Σ0 ↓ ←0x202c6
<MI 20328 CLR.B -(A7)> Δ-2 {[#0]}
<MI 2032a MOVE.L (A6-0xc),-(A7)> Δ-4 {[#0]|[4, '(A6-0xc)']}
<MI 2032e MOVE.L (A6-0x8),-(A7)> Δ-4 {[#0]|[4, '(A6-0xc)']|[4, '(A6-0x8)']}
<MI 20332 MOVE.B (A6-0x16),-(A7)> Δ-2 {[#0]|[4, '(A6-0xc)']|[4, '(A6-0x8)']|[2, '(A6-0x16)']}
<Blob 0x20336 [8] (A6-0x15)> Δ-8 {[#0]|[4, '(A6-0xc)']|[4, '(A6-0x8)']|[2, '(A6-0x16)']|[«8»]}
<Call 0x20346 0x1054a> {[#0]|[4, '(A6-0xc)']|[4, '(A6-0x8)']|[2, '(A6-0x16)']|[«8»]}
?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
<POP 2034c-20350 StackAdj> Δ+20 {}
<POP 20350-2036c Naked> Σ0 ↓ ←0x202a6 ←0x202bc
<Const 0x20350 0x20b3f.4> Δ-4 {[##133951]}
<Call 0x20356 0x20836> {[##133951]}
exp_TEST_RESET.VAL(&Fr)
<POP 2035c-2035e StackAdj> Δ+2 {[-2-]}
<POP 2035e-2035f StackAdj> Δ+2 {}
<Blob 0x2035f [2] 0x20b3f> Δ-2 {[«2»]}
<Const 0x20364 0x4.2> Δ-2 {[«2»]|[#4]}
<Call 0x20366 0x20164> {[«2»]|[#4]}
<POP 2036a-2036c StackAdj> Δ+4 {}
<POP 2036c-20374 Epilogue> Σ0
@ 20374
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x011 @>
<LVAR -0x012 @ 1(r)>
<LVAR -0x013 1(rw)>
<LVAR -0x014 @ 1(r)>
<POP 20374-204dc Body> Δ+4
<POP 20374-2038a Prologue> Σ0 ↓
<POP 2038a-203a2 RegCacheLoad> Σ0 ↓
<POP 203a2-203e0 Naked> Σ0 ↓ →0x20478
<Const 0x203a2 0x20b3f.4> Δ-4 {[##133951]}
<Const 0x203a4 0x20b15.4> Δ-4 {[##133951]|[##133909]}
<Const 0x203aa 0x20b2d.4> Δ-4 {[##133951]|[##133909]|[##133933]}
<Call 0x203b0 0x20812> {[##133951]|[##133909]|[##133933]}
exp_TEST_SCAN_PAREG.VAL(&Fr, &Sr_1, &Sr_1)
<POP 203b6-203b8 StackAdj> Δ+10 {[-2-]}
<POP 203b8-203b9 StackAdj> Δ+2 {}
<Blob 0x203b9 [2] 0x20b3f> Δ-2 {[«2»]}
<Const 0x203ba 0x5.2> Δ-2 {[«2»]|[#5]}
<Call 0x203be 0x20164> {[«2»]|[#5]}
<POP 203c0-203c2 StackAdj> Δ+4 {}
<Const 0x203c2 0x20b3f.4> Δ-4 {[##133951]}
<Const 0x203c4 0x20b10.4> Δ-4 {[##133951]|[##133904]}
<Const 0x203ca 0x20b2e.4> Δ-4 {[##133951]|[##133904]|[##133934]}
<Call 0x203d0 0x207d4> {[##133951]|[##133904]|[##133934]}
exp_TEST_UIR.VAL(&Fr, &Sr_5, &Sr_5)
<POP 203d6-203da StackAdj> Δ+12 {}
<MI 203da TST.B 0x20b3f> {}
<MI 203dc BNE 0x20478> {}
<POP 203e0-203e4 Naked> Σ0 ↓ →0x203f0
<MI 203e0 TST.B 0x20b09> {}
<MI 203e2 BNE 0x203f0> {}
<POP 203e4-203e8 Naked> Σ0 Δ-4 ↓
<MI 203e4 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x203e6 0x7.2> Δ-2 {[#0]|[#7]}
<POP 203e8-203f0 Naked> Σ-4 Δ+4 →0x20478 ←0x20448
<Call 0x203e8 0x20164> {[-4-]}
<POP 203ea-203ec StackAdj> Δ+4 {}
<MI 203ec BRA 0x20478> {}
<POP 203f0-20448 Naked> Σ0 ↓ →0x20450 ←0x203e0
<MI 203f0 MOVE.B #0x07,(A6-0x13)> {}
<Blob 0x203f4 [4] @> Δ-4 {[«4""»]}
<MI 203f8 MOVE.B (A6-0x13),-(A7)> Δ-2 {[«4""»]|[2, '(A6-0x13)']}
<POP 203fc-203fe StackAdj> Δ-4 {[«4""»]|[2, '(A6-0x13)']|[-4-]}
<Lit 0x203fe 4> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]}
<MI 20410 MOVE.B 0x20b09,D0> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]}
<MI 20412 EXTB.W D0> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]}
<POP 0x20414 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]}
<MI 20416 MOVE.B D0,-(A7)> Δ-2 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']}
<MI 20418 MOVE.B 0x20b0a,D0> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']}
<MI 2041e EXTB.W D0> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']}
<POP 0x20420 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']}
<MI 20422 MOVE.B D0,-(A7)> Δ-2 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']|[2, 'D0']}
<Pointer.fp 0x20424 <LVAR -0x014 @ 1(r)>> Δ-4 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-20]}
<Pointer.fp 0x20428 <LVAR -0x008 @ 4(r)>> Δ-4 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-20]|[@@-8]}
<Pointer.fp 0x2042c <LVAR -0x004 @ 4(r)>> Δ-4 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-20]|[@@-8]|[@@-4]}
<Pointer.fp 0x20430 <LVAR -0x012 @ 1(r)>> Δ-4 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-20]|[@@-8]|[@@-4]|[@@-18]}
<Pointer.fp 0x20434 <LVAR -0x011 @>> Δ-4 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-20]|[@@-8]|[@@-4]|[@@-18]|[@@-17]}
<Call 0x20438 0x10550> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-20]|[@@-8]|[@@-4]|[@@-18]|[@@-17]}
?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B)
<POP 2043e-20442 StackAdj> Δ+34 {}
<MI 20442 TST.B (A6-0x14)> {}
<MI 20446 BEQ 0x20450> {}
<POP 20448-20450 Naked> Σ0 Δ-4 →0x203e8
<MI 20448 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x2044a 0x6.2> Δ-2 {[#0]|[#6]}
<MI 2044e BRA 0x203e8> {[#0]|[#6]}
<POP 20450-20478 Naked> Σ0 ↓ ←0x203f0
<MI 20450 CLR.B -(A7)> Δ-2 {[#0]}
<MI 20452 MOVE.L (A6-0x8),-(A7)> Δ-4 {[#0]|[4, '(A6-0x8)']}
<MI 20456 MOVE.L (A6-0x4),-(A7)> Δ-4 {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
<MI 2045a MOVE.B (A6-0x12),-(A7)> Δ-2 {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']|[2, '(A6-0x12)']}
<Blob 0x2045e [8] (A6-0x11)> Δ-8 {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']|[2, '(A6-0x12)']|[«8»]}
<Call 0x2046e 0x1054a> {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']|[2, '(A6-0x12)']|[«8»]}
?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
<POP 20474-20478 StackAdj> Δ+20 {}
<POP 20478-204d4 Naked> Σ0 ↓ ←0x203a2 ←0x203e8
<Const 0x20478 0x20b3f.4> Δ-4 {[##133951]}
<Const 0x2047a 0x20b16.4> Δ-4 {[##133951]|[##133910]}
<Const 0x20480 0x20b33.4> Δ-4 {[##133951]|[##133910]|[##133939]}
<Call 0x20486 0x207f0> {[##133951]|[##133910]|[##133939]}
exp_TEST_SCAN_WDR.VAL(&Fr, &Sr_8_1, &Sr_8_1)
<POP 2048c-2048e StackAdj> Δ+10 {[-2-]}
<POP 2048e-2048f StackAdj> Δ+2 {}
<Blob 0x2048f [2] 0x20b3f> Δ-2 {[«2»]}
<Const 0x20490 0x8.2> Δ-2 {[«2»]|[#8]}
<Call 0x20494 0x20164> {[«2»]|[#8]}
<POP 20496-20498 StackAdj> Δ+4 {}
<Const 0x20498 0x20b3f.4> Δ-4 {[##133951]}
<Const 0x2049a 0x20b3c.4> Δ-4 {[##133951]|[##133948]}
<Const 0x204a0 0x20b1f.4> Δ-4 {[##133951]|[##133948]|[##133919]}
<Call 0x204a6 0x207b0> {[##133951]|[##133948]|[##133919]}
exp_TEST_UIR_TO_WDR.VAL(&Fr, &Fr, &Sr_8_1)
<POP 204ac-204ae StackAdj> Δ+10 {[-2-]}
<POP 204ae-204af StackAdj> Δ+2 {}
<Blob 0x204af [2] 0x20b3f> Δ-2 {[«2»]}
<Const 0x204b0 0x9.2> Δ-2 {[«2»]|[#9]}
<Call 0x204b2 0x20164> {[«2»]|[#9]}
<POP 204b4-204b6 StackAdj> Δ+4 {}
<Const 0x204b6 0x20b3f.4> Δ-4 {[##133951]}
<Const 0x204b8 0x20b3c.4> Δ-4 {[##133951]|[##133948]}
<Const 0x204be 0x20b28.4> Δ-4 {[##133951]|[##133948]|[##133928]}
<Call 0x204c4 0x2078c> {[##133951]|[##133948]|[##133928]}
exp_TEST_WDR_TO_UIR.VAL(&Fr, &Fr, &Sr_5)
<POP 204ca-204cc StackAdj> Δ+10 {[-2-]}
<POP 204cc-204cd StackAdj> Δ+2 {}
<Blob 0x204cd [2] 0x20b3f> Δ-2 {[«2»]}
<Const 0x204ce 0x9.2> Δ-2 {[«2»]|[#9]}
<Call 0x204d0 0x20164> {[«2»]|[#9]}
<POP 204d2-204d4 StackAdj> Δ+4 {}
<POP 204d4-204dc Epilogue> Σ0
@ 204dc
<POP 204dc-2056a Body>
<POP 204dc-204f2 Prologue> Σ0 ↓
<POP 204f2-204fa RegCacheLoad> Σ0 ↓
<POP 204fa-204fc Naked> Σ0 ↓
<MI 204fa MOVEQ.L #-0x01,D7> {}
<POP 204fc-20544 Naked> Σ0 ↓ →0x20546 ←0x2054a
<MI 204fc ADDQ.L #0x1,D7> {}
<POP 0x204fe LimitCheck 0x0 ≤ D7 ≤ 0x8> {}
<MI 20504 MOVE.L D7,D0> {}
<MI 20506 ASL.L #0x1,D0> {}
<MI 20508 LEA.L 0x2012a,A0> {}
<MI 2050c MOVE.B (A0+D0.L),-(A7)> Δ-2 {[2, '(A0+D0.L)']}
<MI 20510 CLR.B -(A7)> Δ-2 {[2, '(A0+D0.L)']|[#0]}
<Call 0x20512 0x208a8> {[2, '(A0+D0.L)']|[#0]}
exp_LOAD_PAREG_DIRECT.VAL(Sw_1, Sw_1)
<POP 20518-2051a StackAdj> Δ+2 {[2, '(A0+D0.L)']}
<POP 2051a-2051b StackAdj> Δ+2 {}
<Const 0x2051b 0x7.2> Δ-2 {[#7]}
<Const 0x2051e 0x20b40.4> Δ-4 {[#7]|[##133952]}
<Const 0x20524 0x20b3d.4> Δ-4 {[#7]|[##133952]|[##133949]}
<Const 0x20526 0x20b3e.4> Δ-4 {[#7]|[##133952]|[##133949]|[##133950]}
<Call 0x2052c 0x10484> {[#7]|[##133952]|[##133949]|[##133950]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20532-20536 StackAdj> Δ+14 {}
<MI 20536 MOVEQ.L #0x00,D6> {}
<MI 20538 LEA.L 0x2012a,A0> {}
<MI 2053c MOVE.B 0x20b3d,D1> {}
<MI 2053e CMP.B (A0+D0.L+#0x1),D1> {}
<MI 20542 BNE 0x20546> {}
<POP 20544-20546 Naked> Σ0 ↓
<MI 20544 ADDQ.B #0x1,D6> {}
<POP 20546-2054a Naked> Σ0 ↓ →0x2054e ←0x204fc
<MI 20546 TST.B D6> {}
<MI 20548 BEQ 0x2054e> {}
<POP 2054a-2054e Naked> Σ0 ↓ →0x204fc
<MI 2054a CMP.L #0x08,D7> {}
<MI 2054c BNE 0x204fc> {}
<POP 2054e-20562 Naked> Σ0 ↓ ←0x20546
<MI 2054e MOVE.B D6,D0> {}
<MI 20550 EXTB.W D0> {}
<POP 0x20552 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20556 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Const 0x20558 0xa.2> Δ-2 {[2, 'D0']|[#10]}
<Call 0x2055c 0x20164> {[2, 'D0']|[#10]}
<POP 20560-20562 StackAdj> Δ+4 {}
<POP 20562-2056a Epilogue> Σ0
@ 2056a
<LVAR -0x002 @ 1(r)>
<LVAR -0x009 @>
<LVAR -0x00b @>
<LVAR -0x00c @ 1(r)>
<LVAR -0x00d @ 1(r)>
<LVAR -0x00e @ 1(r)>
<LVAR -0x010 @>
<POP 2056a-20632 Body>
<POP 2056a-20580 Prologue> Σ0 ↓
<POP 20580-2058c RegCacheLoad> Σ0 ↓
<POP 2058c-205b4 Naked> Σ0 ↓ →0x205be
<Pointer.fp 0x2058c <LVAR -0x00e @ 1(r)>> Δ-4 {[@@-14]}
<Pointer.fp 0x20590 <LVAR -0x00b @>> Δ-4 {[@@-14]|[@@-11]}
<Pointer.fp 0x20594 <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-14]|[@@-11]|[@@-13]}
<Pointer.fp 0x20598 <LVAR -0x00c @ 1(r)>> Δ-4 {[@@-14]|[@@-11]|[@@-13]|[@@-12]}
<Pointer.fp 0x2059c <LVAR -0x009 @>> Δ-4 {[@@-14]|[@@-11]|[@@-13]|[@@-12]|[@@-9]}
<Pointer.fp 0x205a0 <LVAR -0x002 @ 1(r)>> Δ-4 {[@@-14]|[@@-11]|[@@-13]|[@@-12]|[@@-9]|[@@-2]}
<Call 0x205a4 0x20764> {[@@-14]|[@@-11]|[@@-13]|[@@-12]|[@@-9]|[@@-2]}
exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
<POP 205aa-205ae StackAdj> Δ+24 {}
<MI 205ae TST.B (A6-0x2)> {}
<MI 205b2 BNE 0x205be> {}
<POP 205b4-205be Naked> Σ0 ↓
<MI 205b4 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x205b6 0xb.2> Δ-2 {[#0]|[#11]}
<Call 0x205ba 0x20164> {[#0]|[#11]}
<POP 205bc-205be StackAdj> Δ+4 {}
<POP 205be-205c8 Naked> Σ0 ↓ →0x205de ←0x2058c
<MI 205be CLR.L D0> {}
<MI 205c0 MOVE.B (A6-0xe),D0> {}
<MI 205c4 CMP.W #0x02,D0> {}
<MI 205c6 BNE 0x205de> {}
<POP 205c8-205d4 Naked> Σ0 ↓ →0x205d8
<MI 205c8 CLR.L D0> {}
<MI 205ca MOVE.B (A6-0xd),D0> {}
<MI 205ce CMPI.W #0x0001,D0> {}
<MI 205d2 BNE 0x205d8> {}
<POP 205d4-205d8 Naked> Σ0 →0x205dc
<MI 205d4 MOVEQ.L #0x15,D7> {}
<MI 205d6 BRA 0x205dc> {}
<POP 205d8-205da Naked> Σ0 ↓ ←0x205c8
<MI 205d8 CMP.W #0x02,D0> {}
<POP 205da-205dc Naked> Σ0 ↓ ←0x205e4
<MI 205da MOVEQ.L #0x00,D7> {}
<POP 205dc-205de Naked> Σ0 →0x205f0 ←0x205d4
<MI 205dc BRA 0x205f0> {}
<POP 205de-205e4 Naked> Σ0 ↓ →0x205e6 ←0x205be
<MI 205de CMPI.W #0x002a,D0> {}
<MI 205e2 BNE 0x205e6> {}
<POP 205e4-205e6 Naked> Σ0 →0x205da
<MI 205e4 BRA 0x205da> {}
<POP 205e6-205f0 Naked> Σ0 ↓ ←0x205de
<MI 205e6 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x205e8 0xc.2> Δ-2 {[#0]|[#12]}
<Call 0x205ec 0x20164> {[#0]|[#12]}
<POP 205ee-205f0 StackAdj> Δ+4 {}
<POP 205f0-205fa Naked> Σ0 ↓ →0x20604 ←0x205dc
<MI 205f0 CLR.L D0> {}
<MI 205f2 MOVE.B (A6-0xc),D0> {}
<MI 205f6 CMP.L D7,D0> {}
<MI 205f8 BCC 0x20604> {}
<POP 205fa-20604 Naked> Σ0 ↓
<MI 205fa CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x205fc 0x10.2> Δ-2 {[#0]|[#16]}
<Call 0x20600 0x20164> {[#0]|[#16]}
<POP 20602-20604 StackAdj> Δ+4 {}
<POP 20604-2062a Naked> Σ0 ↓ ←0x205f0
<Const 0x20604 0x20b3f.4> Δ-4 {[##133951]}
<Const 0x20606 0x20b3c.4> Δ-4 {[##133951]|[##133948]}
<Pointer.fp 0x2060c <LVAR -0x010 @>> Δ-4 {[##133951]|[##133948]|[@@-16]}
<Const 0x20610 0x20b15.4> Δ-4 {[##133951]|[##133948]|[@@-16]|[##133909]}
<Call 0x20616 0x20852> {[##133951]|[##133948]|[@@-16]|[##133909]}
exp_TEST_NOVRAM.VAL(&Fr, &Fr, &Sr_2, &Sr_1)
<POP 2061c-20620 StackAdj> Δ+14 {[-2-]}
<POP 20620-20621 StackAdj> Δ+2 {}
<Blob 0x20621 [2] 0x20b3f> Δ-2 {[«2»]}
<Const 0x20622 0x11.2> Δ-2 {[«2»]|[#17]}
<Call 0x20626 0x20164> {[«2»]|[#17]}
<POP 20628-2062a StackAdj> Δ+4 {}
<POP 2062a-20632 Epilogue> Σ0
@ 20632
<POP 20632-2067a Body>
<POP 20632-20648 Prologue> Σ0 ↓
<POP 20648-20672 Naked> Σ0 ↓
<Call 0x20648 0x208cc> {}
exp_CLEAR_PARITY.VAL()
<MI 2064e CLR.W -(A7)> Δ-2 {[#0]}
<Blob 0x20650 [6] @> Δ-6 {[#0]|[«6""»]}
<MI 20660 CLR.B -(A7)> Δ-2 {[#0]|[«6""»]|[#0]}
<Call 0x20662 0x20888> {[#0]|[«6""»]|[#0]}
exp_LOAD_WCS_UIR.VAL(Sw_2, Sw_5, Sw_1)
<POP 20668-2066c StackAdj> Δ+10 {}
<Call 0x2066c 0x20872> {}
exp_RESET.VAL()
<POP 20672-2067a Epilogue> Σ0
@ 2067a
START
<POP 2067a--0001 Body>
<POP 2067a-20684 Prologue> Σ0
<POP 20684-2069a RegCacheLoad> Σ0 ↓
<POP 2069a-206fe Naked> Σ0 ↓
<Call 0x2069a 0x10398> {}
FSCALL_10398
<Const 0x206a0 0x0.4> Δ-4 {[##0]}
<Call 0x206a4 0x104d8> {[##0]}
ExpInit(a : Long)
<POP 206aa-206ac StackAdj> Δ+4 {}
<Const 0x206ac 0x20b09.4> Δ-4 {[##133897]}
<Const 0x206b2 0x20b0a.4> Δ-4 {[##133897]|[##133898]}
<Call 0x206b4 0x10544> {[##133897]|[##133898]}
IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool)
<POP 206ba-206bc StackAdj> Δ+6 {[-2-]}
<POP 206bc-206bd StackAdj> Δ+2 {}
<Blob 0x206bd [2] 0x20b0a> Δ-2 {[«2»]}
<Call 0x206be 0x104d2> {[«2»]}
SetExpInitDone(a : Byte)
<POP 206c4-206c5 StackAdj> Δ+2 ↓ {}
<Blob 0x206c5 [6] @> Δ-6 {[«6""»]}
<POP 206d4-206d6 StackAdj> Δ-4 {[«6""»]|[-4-]}
<Lit 0x206d6 5> {[«6""»]|[$$P1VAL]}
<MI 206e8 MOVE.L (A7)+,0x20af8> Δ+4 {[«6""»]}
<POP 206ea-206ec StackAdj> Δ+6 {}
<Const 0x206ec 0x20afc.4> Δ-4 {[##133884]}
<Call 0x206ee 0x102b8> {[##133884]}
NewString(VAR a : String)
<POP 206f4-206f6 StackAdj> Δ+4 {}
<MI 206f6 CLR.B 0x20b00> {}
<MI 206fc MOVEQ.L #0x00,D0> {}
<POP 206fe-2071a Naked> Σ0 ↓ →0x206fe ←0x206fe
<MI 206fe MOVE.L D0,0x20b0c> {}
<POP 0x20704 LimitCheck 0x0 ≤ D0 ≤ 0x7> {}
<MI 2070a LEA.L 0x20af0,A0> {}
<MI 20710 CLR.B (A0+D0.L+#0x11)> {}
<MI 20714 ADDQ.L #0x1,D0> {}
<MI 20716 CMP.L #0x07,D0> {}
<MI 20718 BLE 0x206fe> {}
<POP 2071a-2075e Naked> Σ0 ↓
<Call 0x2071a 0x20142> {}
<Call 0x2071e 0x201c4> {}
<Call 0x20722 0x20374> {}
<Call 0x20726 0x204dc> {}
<Call 0x2072a 0x2056a> {}
<Call 0x2072e 0x20142> {}
<Call 0x20732 0x20632> {}
<Const 0x20736 0x1.2> Δ-2 {[#1]}
<Blob 0x20738 [4] 0x20af8> Δ-4 {[#1]|[«4»]}
<Blob 0x2073a [4] 0x20afc> Δ-4 {[#1]|[«4»]|[«4»]}
<Blob 0x2073c [2] 0x20b00> Δ-2 {[#1]|[«4»]|[«4»]|[«2»]}
<Blob 0x20742 [8] 0x20b01> Δ-8 {[#1]|[«4»]|[«4»]|[«2»]|[«8»]}
<Call 0x20754 0x1054a> {[#1]|[«4»]|[«4»]|[«2»]|[«8»]}
?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
<POP 2075a-2075e StackAdj> Δ+20 {}
<POP 2075e-20764 Naked> Σ0
<Call 0x2075e 0x10284> {}
?exit
@ 208f8
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 208f8-20960 Body>
<POP 208f8-2090e Prologue> Σ0 ↓
<POP 2090e-20958 Naked> Σ0 ↓
<Blob 0x2090e [14] @> Δ-14 {[«14""»]}
<Const 0x2091a 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 2091e-20920 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x20920 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 20932-20934 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 20934 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 20938 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2093a EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2093c MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x2093e 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 20944-20946 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x20946 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 2094c-2094e StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x2094e 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 20954-20958 StackAdj> Δ+20 {}
<POP 20958-20960 Epilogue> Σ0
@ 209b4
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 209b4-20af0 Body>
<POP 209b4-209ca Prologue> Σ0 ↓
<POP 209ca-209e0 RegCacheLoad> Σ0 ↓
<POP 209e0-20a40 Naked> Σ0 ↓ →0x20a88
<Call 0x209e0 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x209e6 [18] @> Δ-18 {[«18""»]}
<POP 209f2-209f4 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x209f4 18> {[«18""»]|[$$Experiment error :]}
<Call 0x20a00 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 20a02-20a03 StackAdj> Δ+22 ↓ {}
<Blob 0x20a03 [14] @> Δ-14 {[«14""»]}
<POP 20a12-20a14 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x20a14 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 20a1e-20a20 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 20a20 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x20a24 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 20a2a-20a2c StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x20a2c 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 20a32-20a34 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x20a34 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 20a36-20a38 StackAdj> Δ+18 {}
<MI 20a38 MOVEA.L (A6+0xa),A0> {}
<MI 20a3c CMPA.W #0x01,A0> {}
<MI 20a3e BEQ 0x20a88> {}
<POP 20a40-20a88 Naked> Σ0 ↓
<Blob 0x20a40 [14] @> Δ-14 {[«14""»]}
<Blob 0x20a50 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 20a60-20a62 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x20a62 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 20a6c-20a6e StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x20a6e> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x20a6e 12> Δ-4
<Const 0x20a72 0x1.2> Δ-2
<Const 0x20a74 0x1e.2> Δ-2
<Call 0x20a76 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20a78-20a7a StackAdj> Δ+8
<Call 0x20a7a 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 20a80-20a82 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x20a82 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 20a84-20a88 StackAdj> Δ+48 {}
<POP 20a88-20ae8 Naked> Σ0 ↓ ←0x209e0
<Blob 0x20a88 [14] @> Δ-14 {[«14""»]}
<POP 20a98-20a9a StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x20a9a 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 20aa4-20aa6 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 20aa6 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x20aaa 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 20ab0-20ab2 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x20ab2 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 20ab8-20aba StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x20aba 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 20abc-20abd StackAdj> Δ+18 ↓ {}
<Blob 0x20abd [24] @> Δ-24 {[«24""»]}
<Const 0x20acc 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 20ad0-20ad2 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x20ad2 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x20ae0 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 20ae6-20ae8 StackAdj> Δ+30 {}
<POP 20ae8-20af0 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.176b6ccf5127fd6f 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 06 7a | z | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 0b 58 | X | .PTR 0x20b58 00020010 code.end: 00020010 00 02 0a f0 | | .PTR 0x20af0 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 08 f8 | | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 09 b4 | | .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 54 52 49 47 47 45 52 5f |TRIGGER_| .TXT 'TRIGGER_SCOPE.VAL ' 0002011c 50 31 53 46 |P1SF | .TXT 'P1SF' 00020120 50 31 53 46 |P1SF | .TXT 'P1SF' 00020124 50 31 56 41 4c 20 |P1VAL | .TXT 'P1VAL ' 0002012a 70 01 b0 01 d0 01 |p | .XXX[0x6] 00020130 e0 01 fc 01 f7 00 fb 00 | | .XXX[0x8] 00020138 f3 00 f0 00 | | .XXX[0x4] 0002013c 00 0a 7f 87 ff 00 | | .CONST 0x0,0xa,0x7f,0x87,0xff,0x0 00020142 ; -------------------------------------------------------------------------------------- 00020142 ; OMSI PASCAL Function 00020142 ; -------------------------------------------------------------------------------------- 00020142 4e 56 ff fc |NV | LINK.W A6,#0xfffc 00020146 bf d5 | | CMPA.L (A5),A7 00020148 62 06 |b | BHI 0x20150 0002014a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002014e 4e 76 |Nv | TRAPV 00020150 de fc 00 04 | | ADDA.W #0x4,A7 00020154 4e b9 00 01 05 b6 |N | JSR R1000_Reset_L(void) 0002015a 4e b9 00 01 05 bc |N | JSR R1000_Reset_H(void) 00020160 4e 5e |N^ | UNLK A6 00020162 4e 75 |Nu | RTS 00020164 ; -------------------------------------------------------------------------------------- 00020164 ; OMSI PASCAL Function 00020164 ; <LVAR 0x00a 1(r)> 00020164 ; <LVAR 0x008 1(r)> 00020164 ; -------------------------------------------------------------------------------------- 00020164 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 00020168 bf d5 | | CMPA.L (A5),A7 0002016a 62 06 |b | BHI 0x20172 0002016c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020170 4e 76 |Nv | TRAPV 00020172 de fc 00 2c | , | ADDA.W #0x2c,A7 00020176 48 e7 80 f0 |H | MOVEM.L A3+A2+A1+A0+D0,-(A7) 0002017a 45 f9 00 02 0b 00 |E | LEA.L 0x20b00,A2 00020180 47 f9 00 02 0b 01 |G | LEA.L 0x20b01,A3 00020186 4a 2e 00 0a |J. | TST.B (A6+0xa) 0002018a 66 30 |f0 | BNE 0x201bc 0002018c 14 ae 00 08 | | MOVE.B (A6+0x8),(A2) 00020190 16 bc 00 04 | | MOVE.B #0x04,(A3) 00020194 42 27 |B' | CLR.B -(A7) 00020196 2f 39 00 02 0a f8 |/9 | MOVE.L 0x20af8,-(A7) 0002019c 2f 39 00 02 0a fc |/9 | MOVE.L 0x20afc,-(A7) 000201a2 1f 12 | | MOVE.B (A2),-(A7) 000201a4 51 4f |QO | SUBQ.L #0x8,A7 000201a6 20 4f | O | MOVEA.L A7,A0 000201a8 22 4b |"K | MOVEA.L A3,A1 000201aa 70 07 |p | MOVEQ.L #0x07,D0 000201ac 10 d9 | | MOVE.B (A1)+,(A0)+ 000201ae 51 c8 ff fc |Q | DBF D0,0x201ac 000201b2 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 000201b8 de fc 00 14 | | ADDA.W #0x14,A7 000201bc 4c df 0f 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2+A3 000201c0 4e 5e |N^ | UNLK A6 000201c2 4e 75 |Nu | RTS 000201c4 ; -------------------------------------------------------------------------------------- 000201c4 ; OMSI PASCAL Function 000201c4 ; <LVAR -0x008 @ 4(r)> 000201c4 ; <LVAR -0x00c @ 4(r)> 000201c4 ; <LVAR -0x015 @> 000201c4 ; <LVAR -0x016 @ 1(r)> 000201c4 ; <LVAR -0x017 1(rw)> 000201c4 ; <LVAR -0x018 @ 1(r)> 000201c4 ; -------------------------------------------------------------------------------------- 000201c4 4e 56 ff 96 |NV | LINK.W A6,#0xff96 000201c8 bf d5 | | CMPA.L (A5),A7 000201ca 62 06 |b | BHI 0x201d2 000201cc 44 fc 00 02 |D | MOVE.W #0x2,CCR 000201d0 4e 76 |Nv | TRAPV 000201d2 de fc 00 52 | R | ADDA.W #0x52,A7 000201d6 48 e7 f9 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 000201da 45 f9 00 02 0b 40 |E @ | LEA.L 0x20b40,A2 000201e0 47 f9 00 02 0b 42 |G B | LEA.L 0x20b42,A3 000201e6 49 f9 00 02 0b 3d |I = | LEA.L 0x20b3d,A4 000201ec 72 01 |r | MOVEQ.L #0x01,D1 000201ee 74 07 |t | MOVEQ.L #0x07,D2 000201f0 76 0e |v | MOVEQ.L #0x0e,D3 000201f2 78 04 |x | MOVEQ.L #0x04,D4 000201f4 1f 02 | | MOVE.B D2,-(A7) 000201f6 48 52 |HR | PEA.L (A2) 000201f8 48 54 |HT | PEA.L (A4) 000201fa 48 79 00 02 0b 3e |Hy > | PEA.L 0x20b3e 00020200 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 00020206 de c3 | | ADDA.W D3,A7 00020208 10 12 | | MOVE.B (A2),D0 0002020a 0c 00 00 05 | | CMPI.B #0x05,D0 0002020e 67 0a |g | BEQ 0x2021a 00020210 42 27 |B' | CLR.B -(A7) 00020212 1f 01 | | MOVE.B D1,-(A7) 00020214 4e ba ff 4e |N N | JSR 0x20164 00020218 58 4f |XO | ADDQ.L #0x4,A7 0002021a 4e b9 00 02 08 72 |N r | JSR exp_RESET.VAL() 00020220 9e fc 00 12 | | SUBA.W #0x12,A7 00020224 20 4f | O | MOVEA.L A7,A0 00020226 43 fa fe e2 |C | LEA.L 0x2010a,A1 0002022a 70 10 |p | MOVEQ.L #0x10,D0 0002022c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002022e 51 c8 ff fc |Q | DBF D0,0x2022c 00020232 59 4f |YO | SUBQ.L #0x4,A7 00020234 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020238 3f 01 |? | MOVE.W D1,-(A7) 0002023a 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 0002023e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020244 50 4f |PO | ADDQ.L #0x8,A7 00020246 48 53 |HS | PEA.L (A3) 00020248 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 0002024e de fc 00 18 | | ADDA.W #0x18,A7 00020252 42 17 |B | CLR.B (A7) 00020254 2f 13 |/ | MOVE.L (A3),-(A7) 00020256 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002025a 48 78 00 00 |Hx | PEA.L 0x0 0002025e 48 78 00 00 |Hx | PEA.L 0x0 00020262 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00020268 de fc 00 10 | | ADDA.W #0x10,A7 0002026c 1e 82 | | MOVE.B D2,(A7) 0002026e 2f 13 |/ | MOVE.L (A3),-(A7) 00020270 4e b9 00 01 04 7e |N ~ | JSR ExpXmit(adr : Byte; b : Pointer) 00020276 5c 4f |\O | ADDQ.L #0x6,A7 00020278 48 53 |HS | PEA.L (A3) 0002027a 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00020280 58 4f |XO | ADDQ.L #0x4,A7 00020282 2e 3c ff ff f8 30 |.< 0 | MOVE.L #0xfffff830,D7 00020288 1f 02 | | MOVE.B D2,-(A7) 0002028a 48 52 |HR | PEA.L (A2) 0002028c 48 54 |HT | PEA.L (A4) 0002028e 48 79 00 02 0b 3e |Hy > | PEA.L 0x20b3e 00020294 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 0002029a de c3 | | ADDA.W D3,A7 0002029c 52 87 |R | ADDQ.L #0x1,D7 0002029e 67 06 |g | BEQ 0x202a6 000202a0 10 12 | | MOVE.B (A2),D0 000202a2 b0 01 | | CMP.B D1,D0 000202a4 66 e2 |f | BNE 0x20288 000202a6 10 12 | | MOVE.B (A2),D0 000202a8 b0 01 | | CMP.B D1,D0 000202aa 67 00 00 a4 |g | BEQ 0x20350 000202ae 4a 39 00 02 0b 09 |J9 | TST.B 0x20b09 000202b4 66 10 |f | BNE 0x202c6 000202b6 42 27 |B' | CLR.B -(A7) 000202b8 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 000202bc 4e ba fe a6 |N | JSR 0x20164 000202c0 58 4f |XO | ADDQ.L #0x4,A7 000202c2 60 00 00 8c |` | BRA 0x20350 000202c6 1d 42 ff e9 | B | MOVE.B D2,(A6-0x17) 000202ca 2f 3a fe 50 |/: P | MOVE.L 0x2011c,-(A7) 000202ce 1f 2e ff e9 | . | MOVE.B (A6-0x17),-(A7) 000202d2 59 4f |YO | SUBQ.L #0x4,A7 000202d4 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000202d8 3f 01 |? | MOVE.W D1,-(A7) 000202da 3f 04 |? | MOVE.W D4,-(A7) 000202dc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000202e2 50 4f |PO | ADDQ.L #0x8,A7 000202e4 10 39 00 02 0b 09 | 9 | MOVE.B 0x20b09,D0 000202ea 48 80 |H | EXTB.W D0 000202ec 41 81 |A | CHK.W D1,D0 000202ee 1f 00 | | MOVE.B D0,-(A7) 000202f0 10 39 00 02 0b 0a | 9 | MOVE.B 0x20b0a,D0 000202f6 48 80 |H | EXTB.W D0 000202f8 41 81 |A | CHK.W D1,D0 000202fa 1f 00 | | MOVE.B D0,-(A7) 000202fc 48 6e ff e8 |Hn | PEA.L (A6-0x18) 00020300 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00020304 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00020308 48 6e ff ea |Hn | PEA.L (A6-0x16) 0002030c 48 6e ff eb |Hn | PEA.L (A6-0x15) 00020310 4e b9 00 01 05 50 |N P | JSR ?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B) 00020316 de fc 00 22 | " | ADDA.W #0x22,A7 0002031a 4a 2e ff e8 |J. | TST.B (A6-0x18) 0002031e 67 08 |g | BEQ 0x20328 00020320 42 27 |B' | CLR.B -(A7) 00020322 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020326 60 94 |` | BRA 0x202bc 00020328 42 27 |B' | CLR.B -(A7) 0002032a 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 0002032e 2f 2e ff f8 |/. | MOVE.L (A6-0x8),-(A7) 00020332 1f 2e ff ea | . | MOVE.B (A6-0x16),-(A7) 00020336 51 4f |QO | SUBQ.L #0x8,A7 00020338 20 4f | O | MOVEA.L A7,A0 0002033a 43 ee ff eb |C | LEA.L (A6-0x15),A1 0002033e 70 07 |p | MOVEQ.L #0x07,D0 00020340 10 d9 | | MOVE.B (A1)+,(A0)+ 00020342 51 c8 ff fc |Q | DBF D0,0x20340 00020346 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 0002034c de fc 00 14 | | ADDA.W #0x14,A7 00020350 48 79 00 02 0b 3f |Hy ? | PEA.L 0x20b3f 00020356 4e b9 00 02 08 36 |N 6 | JSR exp_TEST_RESET.VAL(&Fr) 0002035c 54 4f |TO | ADDQ.L #0x2,A7 0002035e 1e b9 00 02 0b 3f | ? | MOVE.B 0x20b3f,(A7) 00020364 1f 04 | | MOVE.B D4,-(A7) 00020366 4e ba fd fc |N | JSR 0x20164 0002036a 58 4f |XO | ADDQ.L #0x4,A7 0002036c 4c df 1f 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4 00020370 4e 5e |N^ | UNLK A6 00020372 4e 75 |Nu | RTS 00020374 ; -------------------------------------------------------------------------------------- 00020374 ; OMSI PASCAL Function 00020374 ; <LVAR -0x004 @ 4(r)> 00020374 ; <LVAR -0x008 @ 4(r)> 00020374 ; <LVAR -0x011 @> 00020374 ; <LVAR -0x012 @ 1(r)> 00020374 ; <LVAR -0x013 1(rw)> 00020374 ; <LVAR -0x014 @ 1(r)> 00020374 ; -------------------------------------------------------------------------------------- 00020374 4e 56 ff 9e |NV | LINK.W A6,#0xff9e 00020378 bf d5 | | CMPA.L (A5),A7 0002037a 62 06 |b | BHI 0x20382 0002037c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020380 4e 76 |Nv | TRAPV 00020382 de fc 00 4e | N | ADDA.W #0x4e,A7 00020386 48 e7 f8 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7) 0002038a 45 f9 00 02 0b 3f |E ? | LEA.L 0x20b3f,A2 00020390 47 fa fd d2 |G | LEA.L 0x20164,A3 00020394 49 f9 00 02 0b 09 |I | LEA.L 0x20b09,A4 0002039a 72 0a |r | MOVEQ.L #0x0a,D1 0002039c 74 01 |t | MOVEQ.L #0x01,D2 0002039e 76 07 |v | MOVEQ.L #0x07,D3 000203a0 78 09 |x | MOVEQ.L #0x09,D4 000203a2 48 52 |HR | PEA.L (A2) 000203a4 48 79 00 02 0b 15 |Hy | PEA.L 0x20b15 000203aa 48 79 00 02 0b 2d |Hy - | PEA.L 0x20b2d 000203b0 4e b9 00 02 08 12 |N | JSR exp_TEST_SCAN_PAREG.VAL(&Fr, &Sr_1, &Sr_1) 000203b6 de c1 | | ADDA.W D1,A7 000203b8 1e 92 | | MOVE.B (A2),(A7) 000203ba 1f 3c 00 05 | < | MOVE.B #0x05,-(A7) 000203be 4e 93 |N | JSR (A3) 000203c0 58 4f |XO | ADDQ.L #0x4,A7 000203c2 48 52 |HR | PEA.L (A2) 000203c4 48 79 00 02 0b 10 |Hy | PEA.L 0x20b10 000203ca 48 79 00 02 0b 2e |Hy . | PEA.L 0x20b2e 000203d0 4e b9 00 02 07 d4 |N | JSR exp_TEST_UIR.VAL(&Fr, &Sr_5, &Sr_5) 000203d6 de fc 00 0c | | ADDA.W #0xc,A7 000203da 4a 12 |J | TST.B (A2) 000203dc 66 00 00 9a |f | BNE 0x20478 000203e0 4a 14 |J | TST.B (A4) 000203e2 66 0c |f | BNE 0x203f0 000203e4 42 27 |B' | CLR.B -(A7) 000203e6 1f 03 | | MOVE.B D3,-(A7) 000203e8 4e 93 |N | JSR (A3) 000203ea 58 4f |XO | ADDQ.L #0x4,A7 000203ec 60 00 00 8a |` | BRA 0x20478 000203f0 1d 43 ff ed | C | MOVE.B D3,(A6-0x13) 000203f4 2f 3a fd 2a |/: * | MOVE.L 0x20120,-(A7) 000203f8 1f 2e ff ed | . | MOVE.B (A6-0x13),-(A7) 000203fc 59 4f |YO | SUBQ.L #0x4,A7 000203fe 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020402 3f 02 |? | MOVE.W D2,-(A7) 00020404 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020408 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002040e 50 4f |PO | ADDQ.L #0x8,A7 00020410 10 14 | | MOVE.B (A4),D0 00020412 48 80 |H | EXTB.W D0 00020414 41 82 |A | CHK.W D2,D0 00020416 1f 00 | | MOVE.B D0,-(A7) 00020418 10 39 00 02 0b 0a | 9 | MOVE.B 0x20b0a,D0 0002041e 48 80 |H | EXTB.W D0 00020420 41 82 |A | CHK.W D2,D0 00020422 1f 00 | | MOVE.B D0,-(A7) 00020424 48 6e ff ec |Hn | PEA.L (A6-0x14) 00020428 48 6e ff f8 |Hn | PEA.L (A6-0x8) 0002042c 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020430 48 6e ff ee |Hn | PEA.L (A6-0x12) 00020434 48 6e ff ef |Hn | PEA.L (A6-0x11) 00020438 4e b9 00 01 05 50 |N P | JSR ?ExecFRU(VAR a : L; VAR b : W; VAR c: L; VAR d : L; VAR e: B) 0002043e de fc 00 22 | " | ADDA.W #0x22,A7 00020442 4a 2e ff ec |J. | TST.B (A6-0x14) 00020446 67 08 |g | BEQ 0x20450 00020448 42 27 |B' | CLR.B -(A7) 0002044a 1f 3c 00 06 | < | MOVE.B #0x06,-(A7) 0002044e 60 98 |` | BRA 0x203e8 00020450 42 27 |B' | CLR.B -(A7) 00020452 2f 2e ff f8 |/. | MOVE.L (A6-0x8),-(A7) 00020456 2f 2e ff fc |/. | MOVE.L (A6-0x4),-(A7) 0002045a 1f 2e ff ee | . | MOVE.B (A6-0x12),-(A7) 0002045e 51 4f |QO | SUBQ.L #0x8,A7 00020460 20 4f | O | MOVEA.L A7,A0 00020462 43 ee ff ef |C | LEA.L (A6-0x11),A1 00020466 70 07 |p | MOVEQ.L #0x07,D0 00020468 10 d9 | | MOVE.B (A1)+,(A0)+ 0002046a 51 c8 ff fc |Q | DBF D0,0x20468 0002046e 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 00020474 de fc 00 14 | | ADDA.W #0x14,A7 00020478 48 52 |HR | PEA.L (A2) 0002047a 48 79 00 02 0b 16 |Hy | PEA.L 0x20b16 00020480 48 79 00 02 0b 33 |Hy 3 | PEA.L 0x20b33 00020486 4e b9 00 02 07 f0 |N | JSR exp_TEST_SCAN_WDR.VAL(&Fr, &Sr_8_1, &Sr_8_1) 0002048c de c1 | | ADDA.W D1,A7 0002048e 1e 92 | | MOVE.B (A2),(A7) 00020490 1f 3c 00 08 | < | MOVE.B #0x08,-(A7) 00020494 4e 93 |N | JSR (A3) 00020496 58 4f |XO | ADDQ.L #0x4,A7 00020498 48 52 |HR | PEA.L (A2) 0002049a 48 79 00 02 0b 3c |Hy < | PEA.L 0x20b3c 000204a0 48 79 00 02 0b 1f |Hy | PEA.L 0x20b1f 000204a6 4e b9 00 02 07 b0 |N | JSR exp_TEST_UIR_TO_WDR.VAL(&Fr, &Fr, &Sr_8_1) 000204ac de c1 | | ADDA.W D1,A7 000204ae 1e 92 | | MOVE.B (A2),(A7) 000204b0 1f 04 | | MOVE.B D4,-(A7) 000204b2 4e 93 |N | JSR (A3) 000204b4 58 4f |XO | ADDQ.L #0x4,A7 000204b6 48 52 |HR | PEA.L (A2) 000204b8 48 79 00 02 0b 3c |Hy < | PEA.L 0x20b3c 000204be 48 79 00 02 0b 28 |Hy ( | PEA.L 0x20b28 000204c4 4e b9 00 02 07 8c |N | JSR exp_TEST_WDR_TO_UIR.VAL(&Fr, &Fr, &Sr_5) 000204ca de c1 | | ADDA.W D1,A7 000204cc 1e 92 | | MOVE.B (A2),(A7) 000204ce 1f 04 | | MOVE.B D4,-(A7) 000204d0 4e 93 |N | JSR (A3) 000204d2 58 4f |XO | ADDQ.L #0x4,A7 000204d4 4c df 1f 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4 000204d8 4e 5e |N^ | UNLK A6 000204da 4e 75 |Nu | RTS 000204dc ; -------------------------------------------------------------------------------------- 000204dc ; OMSI PASCAL Function 000204dc ; -------------------------------------------------------------------------------------- 000204dc 4e 56 ff c6 |NV | LINK.W A6,#0xffc6 000204e0 bf d5 | | CMPA.L (A5),A7 000204e2 62 06 |b | BHI 0x204ea 000204e4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000204e8 4e 76 |Nv | TRAPV 000204ea de fc 00 32 | 2 | ADDA.W #0x32,A7 000204ee 48 e7 e3 c0 |H | MOVEM.L A1+A0+D7+D6+D2+D1+D0,-(A7) 000204f2 43 f9 00 02 0b 3d |C = | LEA.L 0x20b3d,A1 000204f8 74 08 |t | MOVEQ.L #0x08,D2 000204fa 7e ff |~ | MOVEQ.L #-0x01,D7 000204fc 52 87 |R | ADDQ.L #0x1,D7 000204fe be 82 | | CMP.L D2,D7 00020500 63 02 |c | BLS 0x20504 00020502 4e 4f |NO | TRAP #15 00020504 20 07 | | MOVE.L D7,D0 00020506 e3 80 | | ASL.L #0x1,D0 00020508 41 fa fc 20 |A | LEA.L 0x2012a,A0 0002050c 1f 30 08 00 | 0 | MOVE.B (A0+D0.L),-(A7) 00020510 42 27 |B' | CLR.B -(A7) 00020512 4e b9 00 02 08 a8 |N | JSR exp_LOAD_PAREG_DIRECT.VAL(Sw_1, Sw_1) 00020518 54 4f |TO | ADDQ.L #0x2,A7 0002051a 1e bc 00 07 | | MOVE.B #0x07,(A7) 0002051e 48 79 00 02 0b 40 |Hy @ | PEA.L 0x20b40 00020524 48 51 |HQ | PEA.L (A1) 00020526 48 79 00 02 0b 3e |Hy > | PEA.L 0x20b3e 0002052c 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 00020532 de fc 00 0e | | ADDA.W #0xe,A7 00020536 7c 00 || | MOVEQ.L #0x00,D6 00020538 41 fa fb f0 |A | LEA.L 0x2012a,A0 0002053c 12 11 | | MOVE.B (A1),D1 0002053e b2 30 08 01 | 0 | CMP.B (A0+D0.L+#0x1),D1 00020542 66 02 |f | BNE 0x20546 00020544 52 06 |R | ADDQ.B #0x1,D6 00020546 4a 06 |J | TST.B D6 00020548 67 04 |g | BEQ 0x2054e 0002054a be 82 | | CMP.L D2,D7 0002054c 66 ae |f | BNE 0x204fc 0002054e 10 06 | | MOVE.B D6,D0 00020550 48 80 |H | EXTB.W D0 00020552 41 bc 00 01 |A | CHK.W #0x1,D0 00020556 1f 00 | | MOVE.B D0,-(A7) 00020558 1f 3c 00 0a | < | MOVE.B #0x0a,-(A7) 0002055c 4e ba fc 06 |N | JSR 0x20164 00020560 58 4f |XO | ADDQ.L #0x4,A7 00020562 4c df 03 c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0+A1 00020566 4e 5e |N^ | UNLK A6 00020568 4e 75 |Nu | RTS 0002056a ; -------------------------------------------------------------------------------------- 0002056a ; OMSI PASCAL Function 0002056a ; <LVAR -0x002 @ 1(r)> 0002056a ; <LVAR -0x009 @> 0002056a ; <LVAR -0x00b @> 0002056a ; <LVAR -0x00c @ 1(r)> 0002056a ; <LVAR -0x00d @ 1(r)> 0002056a ; <LVAR -0x00e @ 1(r)> 0002056a ; <LVAR -0x010 @> 0002056a ; -------------------------------------------------------------------------------------- 0002056a 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 0002056e bf d5 | | CMPA.L (A5),A7 00020570 62 06 |b | BHI 0x20578 00020572 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020576 4e 76 |Nv | TRAPV 00020578 de fc 00 30 | 0 | ADDA.W #0x30,A7 0002057c 48 e7 c1 c0 |H | MOVEM.L A1+A0+D7+D1+D0,-(A7) 00020580 41 fa fb e2 |A | LEA.L 0x20164,A0 00020584 43 f9 00 02 0b 3f |C ? | LEA.L 0x20b3f,A1 0002058a 72 02 |r | MOVEQ.L #0x02,D1 0002058c 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00020590 48 6e ff f5 |Hn | PEA.L (A6-0xb) 00020594 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00020598 48 6e ff f4 |Hn | PEA.L (A6-0xc) 0002059c 48 6e ff f7 |Hn | PEA.L (A6-0x9) 000205a0 48 6e ff fe |Hn | PEA.L (A6-0x2) 000205a4 4e b9 00 02 07 64 |N d | JSR exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 000205aa de fc 00 18 | | ADDA.W #0x18,A7 000205ae 4a 2e ff fe |J. | TST.B (A6-0x2) 000205b2 66 0a |f | BNE 0x205be 000205b4 42 27 |B' | CLR.B -(A7) 000205b6 1f 3c 00 0b | < | MOVE.B #0x0b,-(A7) 000205ba 4e 90 |N | JSR (A0) 000205bc 58 4f |XO | ADDQ.L #0x4,A7 000205be 42 80 |B | CLR.L D0 000205c0 10 2e ff f2 | . | MOVE.B (A6-0xe),D0 000205c4 b0 41 | A | CMP.W D1,D0 000205c6 66 16 |f | BNE 0x205de 000205c8 42 80 |B | CLR.L D0 000205ca 10 2e ff f3 | . | MOVE.B (A6-0xd),D0 000205ce 0c 40 00 01 | @ | CMPI.W #0x0001,D0 000205d2 66 04 |f | BNE 0x205d8 000205d4 7e 15 |~ | MOVEQ.L #0x15,D7 000205d6 60 04 |` | BRA 0x205dc 000205d8 b0 41 | A | CMP.W D1,D0 000205da 7e 00 |~ | MOVEQ.L #0x00,D7 000205dc 60 12 |` | BRA 0x205f0 000205de 0c 40 00 2a | @ * | CMPI.W #0x002a,D0 000205e2 66 02 |f | BNE 0x205e6 000205e4 60 f4 |` | BRA 0x205da 000205e6 42 27 |B' | CLR.B -(A7) 000205e8 1f 3c 00 0c | < | MOVE.B #0x0c,-(A7) 000205ec 4e 90 |N | JSR (A0) 000205ee 58 4f |XO | ADDQ.L #0x4,A7 000205f0 42 80 |B | CLR.L D0 000205f2 10 2e ff f4 | . | MOVE.B (A6-0xc),D0 000205f6 b0 87 | | CMP.L D7,D0 000205f8 64 0a |d | BCC 0x20604 000205fa 42 27 |B' | CLR.B -(A7) 000205fc 1f 3c 00 10 | < | MOVE.B #0x10,-(A7) 00020600 4e 90 |N | JSR (A0) 00020602 58 4f |XO | ADDQ.L #0x4,A7 00020604 48 51 |HQ | PEA.L (A1) 00020606 48 79 00 02 0b 3c |Hy < | PEA.L 0x20b3c 0002060c 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00020610 48 79 00 02 0b 15 |Hy | PEA.L 0x20b15 00020616 4e b9 00 02 08 52 |N R | JSR exp_TEST_NOVRAM.VAL(&Fr, &Fr, &Sr_2, &Sr_1) 0002061c de fc 00 0e | | ADDA.W #0xe,A7 00020620 1e 91 | | MOVE.B (A1),(A7) 00020622 1f 3c 00 11 | < | MOVE.B #0x11,-(A7) 00020626 4e 90 |N | JSR (A0) 00020628 58 4f |XO | ADDQ.L #0x4,A7 0002062a 4c df 03 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1 0002062e 4e 5e |N^ | UNLK A6 00020630 4e 75 |Nu | RTS 00020632 ; -------------------------------------------------------------------------------------- 00020632 ; OMSI PASCAL Function 00020632 ; -------------------------------------------------------------------------------------- 00020632 4e 56 ff e6 |NV | LINK.W A6,#0xffe6 00020636 bf d5 | | CMPA.L (A5),A7 00020638 62 06 |b | BHI 0x20640 0002063a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002063e 4e 76 |Nv | TRAPV 00020640 de fc 00 1a | | ADDA.W #0x1a,A7 00020644 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00020648 4e b9 00 02 08 cc |N | JSR exp_CLEAR_PARITY.VAL() 0002064e 42 67 |Bg | CLR.W -(A7) 00020650 5d 4f |]O | SUBQ.L #0x6,A7 00020652 20 4f | O | MOVEA.L A7,A0 00020654 43 fa fa e6 |C | LEA.L 0x2013c,A1 00020658 70 04 |p | MOVEQ.L #0x04,D0 0002065a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002065c 51 c8 ff fc |Q | DBF D0,0x2065a 00020660 42 27 |B' | CLR.B -(A7) 00020662 4e b9 00 02 08 88 |N | JSR exp_LOAD_WCS_UIR.VAL(Sw_2, Sw_5, Sw_1) 00020668 de fc 00 0a | | ADDA.W #0xa,A7 0002066c 4e b9 00 02 08 72 |N r | JSR exp_RESET.VAL() 00020672 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00020676 4e 5e |N^ | UNLK A6 00020678 4e 75 |Nu | RTS 0002067a ; -------------------------------------------------------------------------------------- 0002067a ; OMSI PASCAL Function 0002067a ; -------------------------------------------------------------------------------------- 0002067a START: 0002067a 4f fa 00 08 |O | LEA.L MAIN,A7 0002067e 4e f9 00 01 02 80 |N | JMP ?start_program 00020684 MAIN: 00020684 45 f9 00 02 0b 0a |E | LEA.L 0x20b0a,A2 0002068a 47 f9 00 02 0a f8 |G | LEA.L 0x20af8,A3 00020690 49 f9 00 02 0a fc |I | LEA.L 0x20afc,A4 00020696 72 01 |r | MOVEQ.L #0x01,D1 00020698 74 07 |t | MOVEQ.L #0x07,D2 0002069a 4e b9 00 01 03 98 |N | JSR FSCALL_10398 000206a0 48 78 00 00 |Hx | PEA.L 0x0 000206a4 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 000206aa 58 4f |XO | ADDQ.L #0x4,A7 000206ac 48 79 00 02 0b 09 |Hy | PEA.L 0x20b09 000206b2 48 52 |HR | PEA.L (A2) 000206b4 4e b9 00 01 05 44 |N D | JSR IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool) 000206ba 5c 4f |\O | ADDQ.L #0x6,A7 000206bc 1e 92 | | MOVE.B (A2),(A7) 000206be 4e b9 00 01 04 d2 |N | JSR SetExpInitDone(a : Byte) 000206c4 59 4f |YO | SUBQ.L #0x4,A7 000206c6 20 4f | O | MOVEA.L A7,A0 000206c8 43 fa fa 5a |C Z | LEA.L 0x20124,A1 000206cc 70 04 |p | MOVEQ.L #0x04,D0 000206ce 10 d9 | | MOVE.B (A1)+,(A0)+ 000206d0 51 c8 ff fc |Q | DBF D0,0x206ce 000206d4 59 4f |YO | SUBQ.L #0x4,A7 000206d6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000206da 3f 01 |? | MOVE.W D1,-(A7) 000206dc 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 000206e0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000206e6 50 4f |PO | ADDQ.L #0x8,A7 000206e8 26 9f |& | MOVE.L (A7)+,(A3) 000206ea 5c 4f |\O | ADDQ.L #0x6,A7 000206ec 48 54 |HT | PEA.L (A4) 000206ee 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000206f4 58 4f |XO | ADDQ.L #0x4,A7 000206f6 42 39 00 02 0b 00 |B9 | CLR.B 0x20b00 000206fc 70 00 |p | MOVEQ.L #0x00,D0 000206fe 23 c0 00 02 0b 0c |# | MOVE.L D0,0x20b0c 00020704 b0 82 | | CMP.L D2,D0 00020706 63 02 |c | BLS 0x2070a 00020708 4e 4f |NO | TRAP #15 0002070a 41 f9 00 02 0a f0 |A | LEA.L 0x20af0,A0 00020710 42 30 08 11 |B0 | CLR.B (A0+D0.L+#0x11) 00020714 52 80 |R | ADDQ.L #0x1,D0 00020716 b0 82 | | CMP.L D2,D0 00020718 6f e4 |o | BLE 0x206fe 0002071a 4e ba fa 26 |N & | JSR 0x20142 0002071e 4e ba fa a4 |N | JSR 0x201c4 00020722 4e ba fc 50 |N P | JSR 0x20374 00020726 4e ba fd b4 |N | JSR 0x204dc 0002072a 4e ba fe 3e |N > | JSR 0x2056a 0002072e 4e ba fa 12 |N | JSR 0x20142 00020732 4e ba fe fe |N | JSR 0x20632 00020736 1f 01 | | MOVE.B D1,-(A7) 00020738 2f 13 |/ | MOVE.L (A3),-(A7) 0002073a 2f 14 |/ | MOVE.L (A4),-(A7) 0002073c 1f 39 00 02 0b 00 | 9 | MOVE.B 0x20b00,-(A7) 00020742 51 4f |QO | SUBQ.L #0x8,A7 00020744 20 4f | O | MOVEA.L A7,A0 00020746 43 f9 00 02 0b 01 |C | LEA.L 0x20b01,A1 0002074c 70 07 |p | MOVEQ.L #0x07,D0 0002074e 10 d9 | | MOVE.B (A1)+,(A0)+ 00020750 51 c8 ff fc |Q | DBF D0,0x2074e 00020754 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 0002075a de fc 00 14 | | ADDA.W #0x14,A7 0002075e 4e b9 00 01 02 84 |N | JSR ?exit 00020764 exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 00020764 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002076a 00 20 | | .CONST 0x0020 ; Stack-delta 0002076c 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.VAL' 00020781 00 | | .CONST 0x0 00020782 07 | | .CONST 0x7 ; DIPROC address 00020783 06 | | .CONST 0x6 ; Output Parameters 00020784 00 | | .CONST 0x0 ; Input Parameters 00020785 00 | | .CONST 0x0 ; Out arg [1] 00020786 01 | | .CONST 0x1 ; Out arg [2] 00020787 00 | | .CONST 0x0 ; Out arg [1] 00020788 00 | | .CONST 0x0 ; Out arg [1] 00020789 01 | | .CONST 0x1 ; Out arg [2] 0002078a 08 | | .CONST 0x8 ; Out arg flag 0002078b 00 | | .PAD 0x0 0002078c exp_TEST_WDR_TO_UIR.VAL(&Fr, &Fr, &Sr_5): 0002078c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020792 00 14 | | .CONST 0x0014 ; Stack-delta 00020794 13 54 45 53 54 5f 57 44 | TEST_WD| .TXT 19,'TEST_WDR_TO_UIR.VAL' 000207a8 00 | | .CONST 0x0 000207a9 07 | | .CONST 0x7 ; DIPROC address 000207aa 03 | | .CONST 0x3 ; Output Parameters 000207ab 00 | | .CONST 0x0 ; Input Parameters 000207ac 08 | | .CONST 0x8 ; Out arg flag 000207ad 08 | | .CONST 0x8 ; Out arg flag 000207ae 04 | | .CONST 0x4 ; Out arg [5] 000207af 00 | | .PAD 0x0 000207b0 exp_TEST_UIR_TO_WDR.VAL(&Fr, &Fr, &Sr_8_1): 000207b0 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000207b6 00 14 | | .CONST 0x0014 ; Stack-delta 000207b8 13 54 45 53 54 5f 55 49 | TEST_UI| .TXT 19,'TEST_UIR_TO_WDR.VAL' 000207cc 00 | | .CONST 0x0 000207cd 07 | | .CONST 0x7 ; DIPROC address 000207ce 03 | | .CONST 0x3 ; Output Parameters 000207cf 00 | | .CONST 0x0 ; Input Parameters 000207d0 08 | | .CONST 0x8 ; Out arg flag 000207d1 08 | | .CONST 0x8 ; Out arg flag 000207d2 0d | | .CONST 0xd ; Out arg [8, 1] 000207d3 00 | | .PAD 0x0 000207d4 exp_TEST_UIR.VAL(&Fr, &Sr_5, &Sr_5): 000207d4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000207da 00 14 | | .CONST 0x0014 ; Stack-delta 000207dc 0c 54 45 53 54 5f 55 49 | TEST_UI| .TXT 12,'TEST_UIR.VAL' 000207e9 00 | | .CONST 0x0 000207ea 07 | | .CONST 0x7 ; DIPROC address 000207eb 03 | | .CONST 0x3 ; Output Parameters 000207ec 00 | | .CONST 0x0 ; Input Parameters 000207ed 08 | | .CONST 0x8 ; Out arg flag 000207ee 04 | | .CONST 0x4 ; Out arg [5] 000207ef 04 | | .CONST 0x4 ; Out arg [5] 000207f0 exp_TEST_SCAN_WDR.VAL(&Fr, &Sr_8_1, &Sr_8_1): 000207f0 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000207f6 00 14 | | .CONST 0x0014 ; Stack-delta 000207f8 11 54 45 53 54 5f 53 43 | TEST_SC| .TXT 17,'TEST_SCAN_WDR.VAL' 0002080a 00 | | .CONST 0x0 0002080b 07 | | .CONST 0x7 ; DIPROC address 0002080c 03 | | .CONST 0x3 ; Output Parameters 0002080d 00 | | .CONST 0x0 ; Input Parameters 0002080e 08 | | .CONST 0x8 ; Out arg flag 0002080f 0d | | .CONST 0xd ; Out arg [8, 1] 00020810 0d | | .CONST 0xd ; Out arg [8, 1] 00020811 00 | | .PAD 0x0 00020812 exp_TEST_SCAN_PAREG.VAL(&Fr, &Sr_1, &Sr_1): 00020812 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020818 00 14 | | .CONST 0x0014 ; Stack-delta 0002081a 13 54 45 53 54 5f 53 43 | TEST_SC| .TXT 19,'TEST_SCAN_PAREG.VAL' 0002082e 00 | | .CONST 0x0 0002082f 07 | | .CONST 0x7 ; DIPROC address 00020830 03 | | .CONST 0x3 ; Output Parameters 00020831 00 | | .CONST 0x0 ; Input Parameters 00020832 08 | | .CONST 0x8 ; Out arg flag 00020833 00 | | .CONST 0x0 ; Out arg [1] 00020834 00 | | .CONST 0x0 ; Out arg [1] 00020835 00 | | .PAD 0x0 00020836 exp_TEST_RESET.VAL(&Fr): 00020836 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002083c 00 0c | | .CONST 0x000c ; Stack-delta 0002083e 0e 54 45 53 54 5f 52 45 | TEST_RE| .TXT 14,'TEST_RESET.VAL' 0002084d 00 | | .CONST 0x0 0002084e 07 | | .CONST 0x7 ; DIPROC address 0002084f 01 | | .CONST 0x1 ; Output Parameters 00020850 00 | | .CONST 0x0 ; Input Parameters 00020851 08 | | .CONST 0x8 ; Out arg flag 00020852 exp_TEST_NOVRAM.VAL(&Fr, &Fr, &Sr_2, &Sr_1): 00020852 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020858 00 18 | | .CONST 0x0018 ; Stack-delta 0002085a 0f 54 45 53 54 5f 4e 4f | TEST_NO| .TXT 15,'TEST_NOVRAM.VAL' 0002086a 00 | | .CONST 0x0 0002086b 07 | | .CONST 0x7 ; DIPROC address 0002086c 04 | | .CONST 0x4 ; Output Parameters 0002086d 00 | | .CONST 0x0 ; Input Parameters 0002086e 08 | | .CONST 0x8 ; Out arg flag 0002086f 08 | | .CONST 0x8 ; Out arg flag 00020870 01 | | .CONST 0x1 ; Out arg [2] 00020871 00 | | .CONST 0x0 ; Out arg [1] 00020872 exp_RESET.VAL(): 00020872 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020878 00 08 | | .CONST 0x0008 ; Stack-delta 0002087a 09 52 45 53 45 54 2e 56 | RESET.V| .TXT 9,'RESET.VAL' 00020884 00 | | .CONST 0x0 00020885 07 | | .CONST 0x7 ; DIPROC address 00020886 00 | | .CONST 0x0 ; Output Parameters 00020887 00 | | .CONST 0x0 ; Input Parameters 00020888 exp_LOAD_WCS_UIR.VAL(Sw_2, Sw_5, Sw_1): 00020888 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002088e 00 12 | | .CONST 0x0012 ; Stack-delta 00020890 10 4c 4f 41 44 5f 57 43 | LOAD_WC| .TXT 16,'LOAD_WCS_UIR.VAL' 000208a1 00 | | .CONST 0x0 000208a2 07 | | .CONST 0x7 ; DIPROC address 000208a3 00 | | .CONST 0x0 ; Output Parameters 000208a4 03 | | .CONST 0x3 ; Input Parameters 000208a5 01 | | .CONST 0x1 ; In arg [2] 000208a6 04 | | .CONST 0x4 ; In arg [5] 000208a7 00 | | .CONST 0x0 ; In arg [1] 000208a8 exp_LOAD_PAREG_DIRECT.VAL(Sw_1, Sw_1): 000208a8 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000208ae 00 0c | | .CONST 0x000c ; Stack-delta 000208b0 15 4c 4f 41 44 5f 50 41 | LOAD_PA| .TXT 21,'LOAD_PAREG_DIRECT.VAL' 000208c6 00 | | .CONST 0x0 000208c7 07 | | .CONST 0x7 ; DIPROC address 000208c8 00 | | .CONST 0x0 ; Output Parameters 000208c9 02 | | .CONST 0x2 ; Input Parameters 000208ca 00 | | .CONST 0x0 ; In arg [1] 000208cb 00 | | .CONST 0x0 ; In arg [1] 000208cc exp_CLEAR_PARITY.VAL(): 000208cc 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000208d2 00 08 | | .CONST 0x0008 ; Stack-delta 000208d4 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.VAL' 000208e5 00 | | .CONST 0x0 000208e6 07 | | .CONST 0x7 ; DIPROC address 000208e7 00 | | .CONST 0x0 ; Output Parameters 000208e8 00 | | .CONST 0x0 ; Input Parameters 000208e9 00 | | .PAD 0x0 000208ea 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 000208f8 ; -------------------------------------------------------------------------------------- 000208f8 ; OMSI PASCAL Function 000208f8 ; <LVAR 0x008 1(r)> 000208f8 ; -------------------------------------------------------------------------------------- 000208f8 PROG_FAIL: 000208f8 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 000208fc bf d5 | | CMPA.L (A5),A7 000208fe 62 06 |b | BHI 0x20906 00020900 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020904 4e 76 |Nv | TRAPV 00020906 de fc 00 2c | , | ADDA.W #0x2c,A7 0002090a 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 0002090e 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 00020912 70 06 |p | MOVEQ.L #0x06,D0 00020914 3f 20 |? | MOVE.W -(A0),-(A7) 00020916 51 c8 ff fc |Q | DBF D0,0x20914 0002091a 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 0002091e 51 4f |QO | SUBQ.L #0x8,A7 00020920 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00020924 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020928 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 0002092c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020932 58 4f |XO | ADDQ.L #0x4,A7 00020934 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00020938 48 80 |H | EXTB.W D0 0002093a 48 c0 |H | EXTW.L D0 0002093c 2f 00 |/ | MOVE.L D0,-(A7) 0002093e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00020944 58 4f |XO | ADDQ.L #0x4,A7 00020946 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002094c 50 4f |PO | ADDQ.L #0x8,A7 0002094e 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020954 de fc 00 14 | | ADDA.W #0x14,A7 00020958 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 0002095c 4e 5e |N^ | UNLK A6 0002095e 4e 75 |Nu | RTS 00020960 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 0002096e 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 0002097c 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 0002098a 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 0002099c 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 000209b4 ; -------------------------------------------------------------------------------------- 000209b4 ; OMSI PASCAL Function 000209b4 ; <LVAR 0x00e 1(r)> 000209b4 ; <LVAR 0x00a 4(r)> 000209b4 ; <LVAR 0x008 1(r)> 000209b4 ; -------------------------------------------------------------------------------------- 000209b4 EXP_FAIL: 000209b4 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 000209b8 bf d5 | | CMPA.L (A5),A7 000209ba 62 06 |b | BHI 0x209c2 000209bc 44 fc 00 02 |D | MOVE.W #0x2,CCR 000209c0 4e 76 |Nv | TRAPV 000209c2 de fc 00 74 | t | ADDA.W #0x74,A7 000209c6 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 000209ca 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 000209d0 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 000209d6 72 01 |r | MOVEQ.L #0x01,D1 000209d8 74 0d |t | MOVEQ.L #0x0d,D2 000209da 76 1e |v | MOVEQ.L #0x1e,D3 000209dc 78 12 |x | MOVEQ.L #0x12,D4 000209de 7a 0e |z | MOVEQ.L #0x0e,D5 000209e0 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000209e6 41 fa ff b4 |A | LEA.L 0x2099c,A0 000209ea 70 08 |p | MOVEQ.L #0x08,D0 000209ec 3f 20 |? | MOVE.W -(A0),-(A7) 000209ee 51 c8 ff fc |Q | DBF D0,0x209ec 000209f2 59 4f |YO | SUBQ.L #0x4,A7 000209f4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000209f8 3f 01 |? | MOVE.W D1,-(A7) 000209fa 3f 04 |? | MOVE.W D4,-(A7) 000209fc 4e 93 |N | JSR (A3) 000209fe 50 4f |PO | ADDQ.L #0x8,A7 00020a00 4e 94 |N | JSR (A4) 00020a02 50 4f |PO | ADDQ.L #0x8,A7 00020a04 20 4f | O | MOVEA.L A7,A0 00020a06 43 fa ff 58 |C X | LEA.L 0x20960,A1 00020a0a 70 0c |p | MOVEQ.L #0x0c,D0 00020a0c 10 d9 | | MOVE.B (A1)+,(A0)+ 00020a0e 51 c8 ff fc |Q | DBF D0,0x20a0c 00020a12 51 4f |QO | SUBQ.L #0x8,A7 00020a14 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020a18 3f 01 |? | MOVE.W D1,-(A7) 00020a1a 3f 02 |? | MOVE.W D2,-(A7) 00020a1c 4e 93 |N | JSR (A3) 00020a1e 54 4f |TO | ADDQ.L #0x2,A7 00020a20 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00020a24 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00020a2a 54 4f |TO | ADDQ.L #0x2,A7 00020a2c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020a32 50 4f |PO | ADDQ.L #0x8,A7 00020a34 4e 94 |N | JSR (A4) 00020a36 de c4 | | ADDA.W D4,A7 00020a38 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00020a3c b0 c1 | | CMPA.W D1,A0 00020a3e 67 48 |gH | BEQ 0x20a88 00020a40 9e c5 | | SUBA.W D5,A7 00020a42 22 4f |"O | MOVEA.L A7,A1 00020a44 45 fa ff 28 |E ( | LEA.L 0x2096e,A2 00020a48 70 0c |p | MOVEQ.L #0x0c,D0 00020a4a 12 da | | MOVE.B (A2)+,(A1)+ 00020a4c 51 c8 ff fc |Q | DBF D0,0x20a4a 00020a50 9e c3 | | SUBA.W D3,A7 00020a52 22 4f |"O | MOVEA.L A7,A1 00020a54 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00020a58 70 1d |p | MOVEQ.L #0x1d,D0 00020a5a 12 d8 | | MOVE.B (A0)+,(A1)+ 00020a5c 51 c8 ff fc |Q | DBF D0,0x20a5a 00020a60 51 4f |QO | SUBQ.L #0x8,A7 00020a62 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00020a66 3f 01 |? | MOVE.W D1,-(A7) 00020a68 3f 02 |? | MOVE.W D2,-(A7) 00020a6a 4e 93 |N | JSR (A3) 00020a6c 58 4f |XO | ADDQ.L #0x4,A7 00020a6e 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00020a72 3f 01 |? | MOVE.W D1,-(A7) 00020a74 3f 03 |? | MOVE.W D3,-(A7) 00020a76 4e 93 |N | JSR (A3) 00020a78 50 4f |PO | ADDQ.L #0x8,A7 00020a7a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020a80 50 4f |PO | ADDQ.L #0x8,A7 00020a82 4e 94 |N | JSR (A4) 00020a84 de fc 00 30 | 0 | ADDA.W #0x30,A7 00020a88 9e c5 | | SUBA.W D5,A7 00020a8a 20 4f | O | MOVEA.L A7,A0 00020a8c 43 fa fe ee |C | LEA.L 0x2097c,A1 00020a90 70 0c |p | MOVEQ.L #0x0c,D0 00020a92 10 d9 | | MOVE.B (A1)+,(A0)+ 00020a94 51 c8 ff fc |Q | DBF D0,0x20a92 00020a98 51 4f |QO | SUBQ.L #0x8,A7 00020a9a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020a9e 3f 01 |? | MOVE.W D1,-(A7) 00020aa0 3f 02 |? | MOVE.W D2,-(A7) 00020aa2 4e 93 |N | JSR (A3) 00020aa4 54 4f |TO | ADDQ.L #0x2,A7 00020aa6 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00020aaa 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00020ab0 54 4f |TO | ADDQ.L #0x2,A7 00020ab2 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020ab8 50 4f |PO | ADDQ.L #0x8,A7 00020aba 4e 94 |N | JSR (A4) 00020abc 5d 4f |]O | SUBQ.L #0x6,A7 00020abe 20 4f | O | MOVEA.L A7,A0 00020ac0 43 fa fe da |C | LEA.L 0x2099c,A1 00020ac4 70 16 |p | MOVEQ.L #0x16,D0 00020ac6 10 d9 | | MOVE.B (A1)+,(A0)+ 00020ac8 51 c8 ff fc |Q | DBF D0,0x20ac6 00020acc 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020ad0 59 4f |YO | SUBQ.L #0x4,A7 00020ad2 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020ad6 3f 01 |? | MOVE.W D1,-(A7) 00020ad8 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00020adc 4e 93 |N | JSR (A3) 00020ade 50 4f |PO | ADDQ.L #0x8,A7 00020ae0 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020ae6 de c3 | | ADDA.W D3,A7 00020ae8 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00020aec 4e 5e |N^ | UNLK A6 00020aee 4e 75 |Nu | RTS