|
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: »P1TYP.M200«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »P1TYP.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »P1TYP.M200«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »P1TYP.M200«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »P1TYP.M200«
└─ ⟦this⟧ »P1TYP.M200«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »P1TYP.M200«
@ 20154
<POP 20154-20176 Body>
<POP 20154-20166 Prologue> Σ0 ↓
<POP 20166-20172 Naked> Σ0 ↓
<Call 0x20166 0x105b6> {}
R1000_Reset_L(void)
<Call 0x2016c 0x105bc> {}
R1000_Reset_H(void)
<POP 20172-20176 Epilogue> Σ0
@ 20176
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<POP 20176-201d6 Body>
<POP 20176-2018c Prologue> Σ0 ↓
<POP 2018c-20198 RegCacheLoad> Σ0 ↓
<POP 20198-2019e Naked> Σ0 ↓ →0x201ce
<MI 20198 TST.B (A6+0xa)> {}
<MI 2019c BNE 0x201ce> {}
<POP 2019e-201ce Naked> Σ0 ↓
<MI 2019e MOVE.B (A6+0x8),0x20ba6> {}
<MI 201a2 MOVE.B #0x03,0x20ba7> {}
<MI 201a6 CLR.B -(A7)> Δ-2 {[#0]}
<Blob 0x201a8 [4] 0x20b9e> Δ-4 {[#0]|[«4»]}
<Blob 0x201ae [4] 0x20ba2> Δ-4 {[#0]|[«4»]|[«4»]}
<Blob 0x201b4 [2] 0x20ba6> Δ-2 {[#0]|[«4»]|[«4»]|[«2»]}
<Blob 0x201b6 [8] 0x20ba7> Δ-8 {[#0]|[«4»]|[«4»]|[«2»]|[«8»]}
<Call 0x201c4 0x1054a> {[#0]|[«4»]|[«4»]|[«2»]|[«8»]}
?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
<POP 201ca-201ce StackAdj> Δ+20 {}
<POP 201ce-201d6 Epilogue> Σ0 ←0x20198
@ 201d6
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x015 @>
<LVAR -0x016 @ 1(r)>
<LVAR -0x017 1(rw)>
<LVAR -0x018 @ 1(r)>
<POP 201d6-20386 Body> Δ+4
<POP 201d6-201ec Prologue> Σ0 ↓
<POP 201ec-20206 RegCacheLoad> Σ0 ↓
<POP 20206-20222 Naked> Σ0 ↓ →0x2022c
<Const 0x20206 0x6.2> Δ-2 {[#6]}
<Const 0x20208 0x20be9.4> Δ-4 {[#6]|[##134121]}
<Const 0x2020a 0x20be6.4> Δ-4 {[#6]|[##134121]|[##134118]}
<Const 0x2020c 0x20be7.4> Δ-4 {[#6]|[##134121]|[##134118]|[##134119]}
<Call 0x20212 0x10484> {[#6]|[##134121]|[##134118]|[##134119]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20218-2021a StackAdj> Δ+14 {}
<MI 2021a MOVE.B 0x20be9,D0> {}
<MI 2021c CMPI.B #0x05,D0> {}
<MI 20220 BEQ 0x2022c> {}
<POP 20222-2022c Naked> Σ0 ↓
<MI 20222 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x20224 0x1.2> Δ-2 {[#0]|[#1]}
<Call 0x20226 0x20176> {[#0]|[#1]}
<POP 2022a-2022c StackAdj> Δ+4 {}
<POP 2022c-2029a Naked> Σ0 ↓ ←0x20206
<Call 0x2022c 0x20918> {}
exp_RESET.TYP()
<Blob 0x20232 [18] @> Δ-18 {[«18""»]}
<POP 20244-20246 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x20246 17> {[«18""»]|[$$TRIGGER_SCOPE.TYP]}
<Const 0x20258 0x20bea.4> Δ-4 {[«18""»]|[$$TRIGGER_SCOPE.TYP]|[##134122]}
<Call 0x2025a 0x10460> {[«18""»]|[$$TRIGGER_SCOPE.TYP]|[##134122]}
ExpLoad(a : String; b: Pointer)
<POP 20260-20264 StackAdj> Δ+24 {[-2-]}
<MI 20264 CLR.B (A7)> {[-2-]}
<Blob 0x20266 [4] 0x20bea> Δ-4 {[-2-]|[«4»]}
<Pointer.sp 0x20268 4> Δ-4 {[-2-]|[«4»]|[^^4]}
<Const 0x2026c 0x0.4> Δ-4 {[-2-]|[«4»]|[^^4]|[##0]}
<Const 0x20270 0x0.4> Δ-4 {[-2-]|[«4»]|[^^4]|[##0]|[##0]}
<Call 0x20274 0x10466> {[-2-]|[«4»]|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 2027a-2027e StackAdj> Δ+16 {[-2-]}
<POP 2027e-2027f StackAdj> Δ+2 {}
<Const 0x2027f 0x6.2> Δ-2 {[#6]}
<Blob 0x20280 [4] 0x20bea> Δ-4 {[#6]|[«4»]}
<Call 0x20282 0x1047e> {[#6]|[«4»]}
ExpXmit(adr : Byte; b : Pointer)
<POP 20288-2028a StackAdj> Δ+6 {}
<Const 0x2028a 0x20bea.4> Δ-4 {[##134122]}
<Call 0x2028c 0x10496> {[##134122]}
ExpClose(exp : Pointer)
<POP 20292-20294 StackAdj> Δ+4 {}
<MI 20294 MOVE.L #0xfffff830,D7> {}
<POP 2029a-202b2 Naked> Σ0 ↓ →0x202b8 ←0x202b2
<Const 0x2029a 0x6.2> Δ-2 {[#6]}
<Const 0x2029c 0x20be9.4> Δ-4 {[#6]|[##134121]}
<Const 0x2029e 0x20be6.4> Δ-4 {[#6]|[##134121]|[##134118]}
<Const 0x202a0 0x20be7.4> Δ-4 {[#6]|[##134121]|[##134118]|[##134119]}
<Call 0x202a6 0x10484> {[#6]|[##134121]|[##134118]|[##134119]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 202ac-202ae StackAdj> Δ+14 {}
<MI 202ae ADDQ.L #0x1,D7> {}
<MI 202b0 BEQ 0x202b8> {}
<POP 202b2-202b8 Naked> Σ0 ↓ →0x2029a
<MI 202b2 MOVE.B 0x20be9,D0> {}
<MI 202b4 CMP.B #0x01,D0> {}
<MI 202b6 BNE 0x2029a> {}
<POP 202b8-202c0 Naked> Σ0 ↓ →0x20362 ←0x2029a
<MI 202b8 MOVE.B 0x20be9,D0> {}
<MI 202ba CMP.B #0x01,D0> {}
<MI 202bc BEQ 0x20362> {}
<POP 202c0-202c8 Naked> Σ0 ↓ →0x202d8
<MI 202c0 TST.B 0x20baf> {}
<MI 202c6 BNE 0x202d8> {}
<POP 202c8-202ce Naked> Σ0 Δ-4 ↓
<MI 202c8 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x202ca 0x3.2> Δ-2 {[#0]|[#3]}
<POP 202ce-202d8 Naked> Σ-4 Δ+4 →0x20362 ←0x20332
<Call 0x202ce 0x20176> {[-4-]}
<POP 202d2-202d4 StackAdj> Δ+4 {}
<MI 202d4 BRA 0x20362> {}
<POP 202d8-20332 Naked> Σ0 ↓ →0x2033a ←0x202c0
<MI 202d8 MOVE.B #0x06,(A6-0x17)> {}
<Blob 0x202dc [4] @> Δ-4 {[«4""»]}
<MI 202e0 MOVE.B (A6-0x17),-(A7)> Δ-2 {[«4""»]|[2, '(A6-0x17)']}
<POP 202e4-202e6 StackAdj> Δ-4 {[«4""»]|[2, '(A6-0x17)']|[-4-]}
<Lit 0x202e6 4> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]}
<MI 202f6 MOVE.B 0x20baf,D0> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]}
<MI 202fc EXTB.W D0> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]}
<POP 0x202fe LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]}
<MI 20300 MOVE.B D0,-(A7)> Δ-2 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']}
<MI 20302 MOVE.B 0x20bb0,D0> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']}
<MI 20308 EXTB.W D0> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']}
<POP 0x2030a LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']}
<MI 2030c MOVE.B D0,-(A7)> Δ-2 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']|[2, 'D0']}
<Pointer.fp 0x2030e <LVAR -0x018 @ 1(r)>> Δ-4 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-24]}
<Pointer.fp 0x20312 <LVAR -0x00c @ 4(r)>> Δ-4 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-24]|[@@-12]}
<Pointer.fp 0x20316 <LVAR -0x008 @ 4(r)>> Δ-4 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-24]|[@@-12]|[@@-8]}
<Pointer.fp 0x2031a <LVAR -0x016 @ 1(r)>> Δ-4 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-24]|[@@-12]|[@@-8]|[@@-22]}
<Pointer.fp 0x2031e <LVAR -0x015 @>> Δ-4 {[«4""»]|[2, '(A6-0x17)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-24]|[@@-12]|[@@-8]|[@@-22]|[@@-21]}
<Call 0x20322 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 20328-2032c StackAdj> Δ+34 {}
<MI 2032c TST.B (A6-0x18)> {}
<MI 20330 BEQ 0x2033a> {}
<POP 20332-2033a Naked> Σ0 Δ-4 →0x202ce
<MI 20332 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x20334 0x2.2> Δ-2 {[#0]|[#2]}
<MI 20338 BRA 0x202ce> {[#0]|[#2]}
<POP 2033a-20362 Naked> Σ0 ↓ ←0x202d8
<MI 2033a CLR.B -(A7)> Δ-2 {[#0]}
<MI 2033c MOVE.L (A6-0xc),-(A7)> Δ-4 {[#0]|[4, '(A6-0xc)']}
<MI 20340 MOVE.L (A6-0x8),-(A7)> Δ-4 {[#0]|[4, '(A6-0xc)']|[4, '(A6-0x8)']}
<MI 20344 MOVE.B (A6-0x16),-(A7)> Δ-2 {[#0]|[4, '(A6-0xc)']|[4, '(A6-0x8)']|[2, '(A6-0x16)']}
<Blob 0x20348 [8] (A6-0x15)> Δ-8 {[#0]|[4, '(A6-0xc)']|[4, '(A6-0x8)']|[2, '(A6-0x16)']|[«8»]}
<Call 0x20358 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 2035e-20362 StackAdj> Δ+20 {}
<POP 20362-2037e Naked> Σ0 ↓ ←0x202b8 ←0x202ce
<Const 0x20362 0x20be8.4> Δ-4 {[##134120]}
<Call 0x20368 0x208dc> {[##134120]}
exp_TEST_RESET.TYP(&Fr)
<POP 2036e-20370 StackAdj> Δ+2 {[-2-]}
<POP 20370-20371 StackAdj> Δ+2 {}
<Blob 0x20371 [2] 0x20be8> Δ-2 {[«2»]}
<Const 0x20376 0x4.2> Δ-2 {[«2»]|[#4]}
<Call 0x20378 0x20176> {[«2»]|[#4]}
<POP 2037c-2037e StackAdj> Δ+4 {}
<POP 2037e-20386 Epilogue> Σ0
@ 20386
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x011 @>
<LVAR -0x012 @ 1(r)>
<LVAR -0x013 1(rw)>
<LVAR -0x014 @ 1(r)>
<POP 20386-2050c Body> Δ+4
<POP 20386-2039c Prologue> Σ0 ↓
<POP 2039c-203b2 RegCacheLoad> Σ0 ↓
<POP 203b2-203ec Naked> Σ0 ↓ →0x2048e
<Const 0x203b2 0x20be8.4> Δ-4 {[##134120]}
<Const 0x203b4 0x20bbc.4> Δ-4 {[##134120]|[##134076]}
<Const 0x203b6 0x20bd5.4> Δ-4 {[##134120]|[##134076]|[##134101]}
<Call 0x203bc 0x20892> {[##134120]|[##134076]|[##134101]}
exp_TEST_SCAN_PAREG.TYP(&Fr, &Sr_1, &Sr_1)
<POP 203c2-203c4 StackAdj> Δ+10 {[-2-]}
<POP 203c4-203c5 StackAdj> Δ+2 {}
<Blob 0x203c5 [2] 0x20be8> Δ-2 {[«2»]}
<Const 0x203c6 0x5.2> Δ-2 {[«2»]|[#5]}
<Call 0x203ca 0x20176> {[«2»]|[#5]}
<POP 203cc-203ce StackAdj> Δ+4 {}
<Const 0x203ce 0x20be8.4> Δ-4 {[##134120]}
<Const 0x203d0 0x20bb6.4> Δ-4 {[##134120]|[##134070]}
<Const 0x203d6 0x20bd6.4> Δ-4 {[##134120]|[##134070]|[##134102]}
<Call 0x203dc 0x20854> {[##134120]|[##134070]|[##134102]}
exp_TEST_UIR.TYP(&Fr, &Sr_6, &Sr_6)
<POP 203e2-203e6 StackAdj> Δ+12 {}
<MI 203e6 TST.B 0x20be8> {}
<MI 203e8 BNE 0x2048e> {}
<POP 203ec-203f4 Naked> Σ0 ↓ →0x20402
<MI 203ec TST.B 0x20baf> {}
<MI 203f2 BNE 0x20402> {}
<POP 203f4-203fa Naked> Σ0 Δ-4 ↓
<MI 203f4 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x203f6 0x8.2> Δ-2 {[#0]|[#8]}
<POP 203fa-20402 Naked> Σ-4 Δ+4 →0x2048e ←0x2045e
<Call 0x203fa 0x20176> {[-4-]}
<POP 203fc-203fe StackAdj> Δ+4 {}
<MI 203fe BRA 0x2048e> {}
<POP 20402-2045e Naked> Σ0 ↓ →0x20466 ←0x203ec
<MI 20402 MOVE.B #0x06,(A6-0x13)> {}
<Blob 0x20406 [4] @> Δ-4 {[«4""»]}
<MI 2040a MOVE.B (A6-0x13),-(A7)> Δ-2 {[«4""»]|[2, '(A6-0x13)']}
<POP 2040e-20410 StackAdj> Δ-4 {[«4""»]|[2, '(A6-0x13)']|[-4-]}
<Lit 0x20410 4> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]}
<MI 20422 MOVE.B 0x20baf,D0> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]}
<MI 20428 EXTB.W D0> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]}
<POP 0x2042a LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]}
<MI 2042c MOVE.B D0,-(A7)> Δ-2 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']}
<MI 2042e MOVE.B 0x20bb0,D0> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']}
<MI 20434 EXTB.W D0> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']}
<POP 0x20436 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']}
<MI 20438 MOVE.B D0,-(A7)> Δ-2 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']|[2, 'D0']}
<Pointer.fp 0x2043a <LVAR -0x014 @ 1(r)>> Δ-4 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-20]}
<Pointer.fp 0x2043e <LVAR -0x008 @ 4(r)>> Δ-4 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-20]|[@@-8]}
<Pointer.fp 0x20442 <LVAR -0x004 @ 4(r)>> Δ-4 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-20]|[@@-8]|[@@-4]}
<Pointer.fp 0x20446 <LVAR -0x012 @ 1(r)>> Δ-4 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-20]|[@@-8]|[@@-4]|[@@-18]}
<Pointer.fp 0x2044a <LVAR -0x011 @>> Δ-4 {[«4""»]|[2, '(A6-0x13)']|[$$P1SF]|[2, 'D0']|[2, 'D0']|[@@-20]|[@@-8]|[@@-4]|[@@-18]|[@@-17]}
<Call 0x2044e 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 20454-20458 StackAdj> Δ+34 {}
<MI 20458 TST.B (A6-0x14)> {}
<MI 2045c BEQ 0x20466> {}
<POP 2045e-20466 Naked> Σ0 Δ-4 →0x203fa
<MI 2045e CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x20460 0x7.2> Δ-2 {[#0]|[#7]}
<MI 20464 BRA 0x203fa> {[#0]|[#7]}
<POP 20466-2048e Naked> Σ0 ↓ ←0x20402
<MI 20466 CLR.B -(A7)> Δ-2 {[#0]}
<MI 20468 MOVE.L (A6-0x8),-(A7)> Δ-4 {[#0]|[4, '(A6-0x8)']}
<MI 2046c MOVE.L (A6-0x4),-(A7)> Δ-4 {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
<MI 20470 MOVE.B (A6-0x12),-(A7)> Δ-2 {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']|[2, '(A6-0x12)']}
<Blob 0x20474 [8] (A6-0x11)> Δ-8 {[#0]|[4, '(A6-0x8)']|[4, '(A6-0x4)']|[2, '(A6-0x12)']|[«8»]}
<Call 0x20484 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 2048a-2048e StackAdj> Δ+20 {}
<POP 2048e-20504 Naked> Σ0 ↓ ←0x203b2 ←0x203fa
<Const 0x2048e 0x20be8.4> Δ-4 {[##134120]}
<Const 0x20490 0x20bbc.4> Δ-4 {[##134120]|[##134076]}
<Const 0x20492 0x20bd5.4> Δ-4 {[##134120]|[##134076]|[##134101]}
<Call 0x20498 0x208b6> {[##134120]|[##134076]|[##134101]}
exp_TEST_SCAN_CSA_REG.TYP(&Fr, &Sr_1, &Sr_1)
<POP 2049e-204a0 StackAdj> Δ+10 {[-2-]}
<POP 204a0-204a1 StackAdj> Δ+2 {}
<Blob 0x204a1 [2] 0x20be8> Δ-2 {[«2»]}
<Const 0x204a2 0x6.2> Δ-2 {[«2»]|[#6]}
<Call 0x204a4 0x20176> {[«2»]|[#6]}
<POP 204a6-204a8 StackAdj> Δ+4 {}
<Const 0x204a8 0x20be8.4> Δ-4 {[##134120]}
<Const 0x204aa 0x20bbd.4> Δ-4 {[##134120]|[##134077]}
<Const 0x204b0 0x20bdc.4> Δ-4 {[##134120]|[##134077]|[##134108]}
<Call 0x204b6 0x20870> {[##134120]|[##134077]|[##134108]}
exp_TEST_SCAN_WDR.TYP(&Fr, &Sr_8_1, &Sr_8_1)
<POP 204bc-204be StackAdj> Δ+10 {[-2-]}
<POP 204be-204bf StackAdj> Δ+2 {}
<Blob 0x204bf [2] 0x20be8> Δ-2 {[«2»]}
<Const 0x204c0 0x9.2> Δ-2 {[«2»]|[#9]}
<Call 0x204c4 0x20176> {[«2»]|[#9]}
<POP 204c6-204c8 StackAdj> Δ+4 {}
<Const 0x204c8 0x20be8.4> Δ-4 {[##134120]}
<Const 0x204ca 0x20be5.4> Δ-4 {[##134120]|[##134117]}
<Const 0x204d0 0x20bc6.4> Δ-4 {[##134120]|[##134117]|[##134086]}
<Call 0x204d6 0x20830> {[##134120]|[##134117]|[##134086]}
exp_TEST_UIR_TO_WDR.TYP(&Fr, &Fr, &Sr_8_1)
<POP 204dc-204de StackAdj> Δ+10 {[-2-]}
<POP 204de-204df StackAdj> Δ+2 {}
<Blob 0x204df [2] 0x20be8> Δ-2 {[«2»]}
<Const 0x204e0 0xa.2> Δ-2 {[«2»]|[#10]}
<Call 0x204e2 0x20176> {[«2»]|[#10]}
<POP 204e4-204e6 StackAdj> Δ+4 {}
<Const 0x204e6 0x20be8.4> Δ-4 {[##134120]}
<Const 0x204e8 0x20be5.4> Δ-4 {[##134120]|[##134117]}
<Const 0x204ee 0x20bcf.4> Δ-4 {[##134120]|[##134117]|[##134095]}
<Call 0x204f4 0x2080c> {[##134120]|[##134117]|[##134095]}
exp_TEST_WDR_TO_UIR.TYP(&Fr, &Fr, &Sr_6)
<POP 204fa-204fc StackAdj> Δ+10 {[-2-]}
<POP 204fc-204fd StackAdj> Δ+2 {}
<Blob 0x204fd [2] 0x20be8> Δ-2 {[«2»]}
<Const 0x204fe 0xa.2> Δ-2 {[«2»]|[#10]}
<Call 0x20500 0x20176> {[«2»]|[#10]}
<POP 20502-20504 StackAdj> Δ+4 {}
<POP 20504-2050c Epilogue> Σ0
@ 2050c
<LVAR -0x00d @>
<LVAR -0x00f @>
<LVAR -0x010 @>
<LVAR -0x011 @ 1(r)>
<LVAR -0x013 @>
<LVAR -0x014 @ 1(r)>
<POP 2050c-205e4 Body>
<POP 2050c-20522 Prologue> Σ0 ↓
<POP 20522-2052a RegCacheLoad> Σ0 ↓
<POP 2052a-20558 Naked> Σ0 ↓ →0x20566
<Pointer.fp 0x2052a <LVAR -0x014 @ 1(r)>> Δ-4 {[@@-20]}
<Pointer.fp 0x2052e <LVAR -0x013 @>> Δ-4 {[@@-20]|[@@-19]}
<Pointer.fp 0x20532 <LVAR -0x011 @ 1(r)>> Δ-4 {[@@-20]|[@@-19]|[@@-17]}
<Pointer.fp 0x20536 <LVAR -0x010 @>> Δ-4 {[@@-20]|[@@-19]|[@@-17]|[@@-16]}
<Pointer.fp 0x2053a <LVAR -0x00f @>> Δ-4 {[@@-20]|[@@-19]|[@@-17]|[@@-16]|[@@-15]}
<Pointer.fp 0x2053e <LVAR -0x00d @>> Δ-4 {[@@-20]|[@@-19]|[@@-17]|[@@-16]|[@@-15]|[@@-13]}
<Call 0x20542 0x207e4> {[@@-20]|[@@-19]|[@@-17]|[@@-16]|[@@-15]|[@@-13]}
exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
<POP 20548-2054c StackAdj> Δ+24 {}
<MI 2054c CLR.L D0> {}
<MI 2054e MOVE.B (A6-0x14),D0> {}
<MI 20552 CMPI.W #0x0003,D0> {}
<MI 20556 BNE 0x20566> {}
<POP 20558-20562 Naked> Σ0 ↓ →0x20566
<MI 20558 CLR.L D0> {}
<MI 2055a MOVE.B (A6-0x11),D0> {}
<MI 2055e CMP.W #0x01,D0> {}
<MI 20560 BNE 0x20566> {}
<POP 20562-20566 Naked> Σ0 →0x20568
<MI 20562 MOVEQ.L #0x00,D5> {}
<MI 20564 BRA 0x20568> {}
<POP 20566-20568 Naked> Σ0 ↓ ←0x2052a ←0x20558
<MI 20566 MOVEQ.L #0x09,D5> {}
<POP 20568-2056a Naked> Σ0 ↓ ←0x20562
<MI 20568 MOVE.L D5,D7> {}
<POP 2056a-205b4 Naked> Σ0 ↓ →0x205b6 ←0x205be
<POP 0x2056a LimitCheck 0x0 ≤ D7 ≤ 0x11> {}
<MI 20574 MOVE.L D7,D0> {}
<MI 20576 ASL.L #0x1,D0> {}
<MI 20578 LEA.L 0x2012a,A0> {}
<MI 2057c MOVE.B (A0+D0.L),-(A7)> Δ-2 {[2, '(A0+D0.L)']}
<MI 20580 CLR.B -(A7)> Δ-2 {[2, '(A0+D0.L)']|[#0]}
<Call 0x20582 0x2094e> {[2, '(A0+D0.L)']|[#0]}
exp_LOAD_PAREG_DIRECT.TYP(Sw_1, Sw_1)
<POP 20588-2058a StackAdj> Δ+2 {[2, '(A0+D0.L)']}
<POP 2058a-2058b StackAdj> Δ+2 {}
<Const 0x2058b 0x6.2> Δ-2 {[#6]}
<Const 0x2058e 0x20be9.4> Δ-4 {[#6]|[##134121]}
<Const 0x20594 0x20be6.4> Δ-4 {[#6]|[##134121]|[##134118]}
<Const 0x20596 0x20be7.4> Δ-4 {[#6]|[##134121]|[##134118]|[##134119]}
<Call 0x2059c 0x10484> {[#6]|[##134121]|[##134118]|[##134119]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 205a2-205a6 StackAdj> Δ+14 {}
<MI 205a6 MOVEQ.L #0x00,D1> {}
<MI 205a8 LEA.L 0x2012a,A0> {}
<MI 205ac MOVE.B 0x20be6,D2> {}
<MI 205ae CMP.B (A0+D0.L+#0x1),D2> {}
<MI 205b2 BNE 0x205b6> {}
<POP 205b4-205b6 Naked> Σ0 ↓
<MI 205b4 ADDQ.B #0x1,D1> {}
<POP 205b6-205be Naked> Σ0 ↓ →0x205ca ←0x2056a
<MI 205b6 MOVE.B D1,D6> {}
<MI 205b8 ADDQ.L #0x1,D7> {}
<MI 205ba TST.B D6> {}
<MI 205bc BEQ 0x205ca> {}
<POP 205be-205ca Naked> Σ0 ↓ →0x2056a
<MI 205be MOVE.L D5,D0> {}
<MI 205c0 ADDI.L #0x00000009,D0> {}
<MI 205c6 CMP.L D0,D7> {}
<MI 205c8 BNE 0x2056a> {}
<POP 205ca-205dc Naked> Σ0 ↓ ←0x205b6
<MI 205ca MOVE.B D6,D0> {}
<MI 205cc EXTB.W D0> {}
<POP 0x205ce LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 205d0 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Const 0x205d2 0xb.2> Δ-2 {[2, 'D0']|[#11]}
<Call 0x205d6 0x20176> {[2, 'D0']|[#11]}
<POP 205da-205dc StackAdj> Δ+4 {}
<POP 205dc-205e4 Epilogue> Σ0
@ 205e4
<LVAR -0x004 @>
<LVAR -0x009 @ 1(r)>
<LVAR -0x00b @>
<LVAR -0x00c @ 1(r)>
<LVAR -0x00d @ 1(r)>
<LVAR -0x00f @>
<LVAR -0x010 @ 1(r)>
<POP 205e4-206be Body>
<POP 205e4-205fa Prologue> Σ0 ↓
<POP 205fa-20604 RegCacheLoad> Σ0 ↓
<POP 20604-2062c Naked> Σ0 ↓ →0x20636
<Pointer.fp 0x20604 <LVAR -0x010 @ 1(r)>> Δ-4 {[@@-16]}
<Pointer.fp 0x20608 <LVAR -0x00f @>> Δ-4 {[@@-16]|[@@-15]}
<Pointer.fp 0x2060c <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-16]|[@@-15]|[@@-13]}
<Pointer.fp 0x20610 <LVAR -0x00c @ 1(r)>> Δ-4 {[@@-16]|[@@-15]|[@@-13]|[@@-12]}
<Pointer.fp 0x20614 <LVAR -0x00b @>> Δ-4 {[@@-16]|[@@-15]|[@@-13]|[@@-12]|[@@-11]}
<Pointer.fp 0x20618 <LVAR -0x009 @ 1(r)>> Δ-4 {[@@-16]|[@@-15]|[@@-13]|[@@-12]|[@@-11]|[@@-9]}
<Call 0x2061c 0x207e4> {[@@-16]|[@@-15]|[@@-13]|[@@-12]|[@@-11]|[@@-9]}
exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
<POP 20622-20626 StackAdj> Δ+24 {}
<MI 20626 TST.B (A6-0x9)> {}
<MI 2062a BNE 0x20636> {}
<POP 2062c-20636 Naked> Σ0 ↓
<MI 2062c CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x2062e 0xc.2> Δ-2 {[#0]|[#12]}
<Call 0x20632 0x20176> {[#0]|[#12]}
<POP 20634-20636 StackAdj> Δ+4 {}
<POP 20636-20642 Naked> Σ0 ↓ →0x20668 ←0x20604
<MI 20636 CLR.L D0> {}
<MI 20638 MOVE.B (A6-0x10),D0> {}
<MI 2063c CMPI.W #0x0003,D0> {}
<MI 20640 BNE 0x20668> {}
<POP 20642-2064e Naked> Σ0 ↓ →0x20652
<MI 20642 CLR.L D0> {}
<MI 20644 MOVE.B (A6-0xd),D0> {}
<MI 20648 CMPI.W #0x0001,D0> {}
<MI 2064c BNE 0x20652> {}
<POP 2064e-20652 Naked> Σ0 →0x20666
<MI 2064e MOVEQ.L #0x17,D7> {}
<MI 20650 BRA 0x20666> {}
<POP 20652-20658 Naked> Σ0 ↓ →0x2065c ←0x20642
<MI 20652 CMPI.W #0x0002,D0> {}
<MI 20656 BNE 0x2065c> {}
<POP 20658-2065c Naked> Σ0 →0x20666
<MI 20658 MOVEQ.L #0x01,D7> {}
<MI 2065a BRA 0x20666> {}
<POP 2065c-20666 Naked> Σ0 ↓ ←0x20652
<MI 2065c CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x2065e 0xf.2> Δ-2 {[#0]|[#15]}
<Call 0x20662 0x20176> {[#0]|[#15]}
<POP 20664-20666 StackAdj> Δ+4 {}
<POP 20666-20668 Naked> Σ0 →0x2067c ←0x2064e ←0x20658
<MI 20666 BRA 0x2067c> {}
<POP 20668-2066e Naked> Σ0 ↓ →0x20672 ←0x20636
<MI 20668 CMPI.W #0x002b,D0> {}
<MI 2066c BNE 0x20672> {}
<POP 2066e-20672 Naked> Σ0 →0x2067c
<MI 2066e MOVEQ.L #0x00,D7> {}
<MI 20670 BRA 0x2067c> {}
<POP 20672-2067c Naked> Σ0 ↓ ←0x20668
<MI 20672 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x20674 0xd.2> Δ-2 {[#0]|[#13]}
<Call 0x20678 0x20176> {[#0]|[#13]}
<POP 2067a-2067c StackAdj> Δ+4 {}
<POP 2067c-20686 Naked> Σ0 ↓ →0x20690 ←0x20666 ←0x2066e
<MI 2067c CLR.L D0> {}
<MI 2067e MOVE.B (A6-0xc),D0> {}
<MI 20682 CMP.L D7,D0> {}
<MI 20684 BCC 0x20690> {}
<POP 20686-20690 Naked> Σ0 ↓
<MI 20686 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x20688 0x11.2> Δ-2 {[#0]|[#17]}
<Call 0x2068c 0x20176> {[#0]|[#17]}
<POP 2068e-20690 StackAdj> Δ+4 {}
<POP 20690-206b6 Naked> Σ0 ↓ ←0x2067c
<Const 0x20690 0x20be8.4> Δ-4 {[##134120]}
<Const 0x20692 0x20be5.4> Δ-4 {[##134120]|[##134117]}
<Pointer.fp 0x20698 <LVAR -0x004 @>> Δ-4 {[##134120]|[##134117]|[@@-4]}
<Const 0x2069c 0x20bbc.4> Δ-4 {[##134120]|[##134117]|[@@-4]|[##134076]}
<Call 0x206a2 0x208f8> {[##134120]|[##134117]|[@@-4]|[##134076]}
exp_TEST_NOVRAM.TYP(&Fr, &Fr, &Sr_2, &Sr_1)
<POP 206a8-206ac StackAdj> Δ+14 {[-2-]}
<POP 206ac-206ad StackAdj> Δ+2 {}
<Blob 0x206ad [2] 0x20be8> Δ-2 {[«2»]}
<Const 0x206ae 0x12.2> Δ-2 {[«2»]|[#18]}
<Call 0x206b2 0x20176> {[«2»]|[#18]}
<POP 206b4-206b6 StackAdj> Δ+4 {}
<POP 206b6-206be Epilogue> Σ0
@ 206be
<POP 206be-206fa Body>
<POP 206be-206d0 Prologue> Σ0 ↓
<POP 206d0-206f6 Naked> Σ0 ↓
<Call 0x206d0 0x20972> {}
exp_CLEAR_PARITY.TYP()
<MI 206d6 CLR.W -(A7)> Δ-2 {[#0]}
<Blob 0x206d8 [2] @> Δ-2 {[#0]|[«2""»]}
<Blob 0x206dc [2] @> Δ-2 {[#0]|[«2""»]|[«2""»]}
<Blob 0x206e0 [2] @> Δ-2 {[#0]|[«2""»]|[«2""»]|[«2""»]}
<MI 206e4 CLR.B -(A7)> Δ-2 {[#0]|[«2""»]|[«2""»]|[«2""»]|[#0]}
<Call 0x206e6 0x2092e> {[#0]|[«2""»]|[«2""»]|[«2""»]|[#0]}
exp_LOAD_WCS_UIR.TYP(Sw_2, Sw_6, Sw_1)
<POP 206ec-206f0 StackAdj> Δ+10 {}
<Call 0x206f0 0x20918> {}
exp_RESET.TYP()
<POP 206f6-206fa Epilogue> Σ0
@ 206fa
START
<POP 206fa--0001 Body>
<POP 206fa-20704 Prologue> Σ0
<POP 20704-2071a RegCacheLoad> Σ0 ↓
<POP 2071a-2077e Naked> Σ0 ↓
<Call 0x2071a 0x10398> {}
FSCALL_10398
<Const 0x20720 0x0.4> Δ-4 {[##0]}
<Call 0x20724 0x104d8> {[##0]}
ExpInit(a : Long)
<POP 2072a-2072c StackAdj> Δ+4 {}
<Const 0x2072c 0x20baf.4> Δ-4 {[##134063]}
<Const 0x20732 0x20bb0.4> Δ-4 {[##134063]|[##134064]}
<Call 0x20734 0x10544> {[##134063]|[##134064]}
IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool)
<POP 2073a-2073c StackAdj> Δ+6 {[-2-]}
<POP 2073c-2073d StackAdj> Δ+2 {}
<Blob 0x2073d [2] 0x20bb0> Δ-2 {[«2»]}
<Call 0x2073e 0x104d2> {[«2»]}
SetExpInitDone(a : Byte)
<POP 20744-20745 StackAdj> Δ+2 ↓ {}
<Blob 0x20745 [6] @> Δ-6 {[«6""»]}
<POP 20754-20756 StackAdj> Δ-4 {[«6""»]|[-4-]}
<Lit 0x20756 5> {[«6""»]|[$$P1TYP]}
<MI 20768 MOVE.L (A7)+,0x20b9e> Δ+4 {[«6""»]}
<POP 2076a-2076c StackAdj> Δ+6 {}
<Const 0x2076c 0x20ba2.4> Δ-4 {[##134050]}
<Call 0x2076e 0x102b8> {[##134050]}
NewString(VAR a : String)
<POP 20774-20776 StackAdj> Δ+4 {}
<MI 20776 CLR.B 0x20ba6> {}
<MI 2077c MOVEQ.L #0x00,D0> {}
<POP 2077e-2079a Naked> Σ0 ↓ →0x2077e ←0x2077e
<MI 2077e MOVE.L D0,0x20bb2> {}
<POP 0x20784 LimitCheck 0x0 ≤ D0 ≤ 0x7> {}
<MI 2078a LEA.L 0x20b96,A0> {}
<MI 20790 CLR.B (A0+D0.L+#0x11)> {}
<MI 20794 ADDQ.L #0x1,D0> {}
<MI 20796 CMP.L #0x07,D0> {}
<MI 20798 BLE 0x2077e> {}
<POP 2079a-207de Naked> Σ0 ↓
<Call 0x2079a 0x20154> {}
<Call 0x2079e 0x201d6> {}
<Call 0x207a2 0x20386> {}
<Call 0x207a6 0x205e4> {}
<Call 0x207aa 0x20154> {}
<Call 0x207ae 0x2050c> {}
<Call 0x207b2 0x206be> {}
<Const 0x207b6 0x1.2> Δ-2 {[#1]}
<Blob 0x207b8 [4] 0x20b9e> Δ-4 {[#1]|[«4»]}
<Blob 0x207ba [4] 0x20ba2> Δ-4 {[#1]|[«4»]|[«4»]}
<Blob 0x207bc [2] 0x20ba6> Δ-2 {[#1]|[«4»]|[«4»]|[«2»]}
<Blob 0x207c2 [8] 0x20ba7> Δ-8 {[#1]|[«4»]|[«4»]|[«2»]|[«8»]}
<Call 0x207d4 0x1054a> {[#1]|[«4»]|[«4»]|[«2»]|[«8»]}
?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long)
<POP 207da-207de StackAdj> Δ+20 {}
<POP 207de-207e4 Naked> Σ0
<Call 0x207de 0x10284> {}
?exit
@ 2099e
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 2099e-20a06 Body>
<POP 2099e-209b4 Prologue> Σ0 ↓
<POP 209b4-209fe Naked> Σ0 ↓
<Blob 0x209b4 [14] @> Δ-14 {[«14""»]}
<Const 0x209c0 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 209c4-209c6 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x209c6 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 209d8-209da StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 209da MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 209de EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 209e0 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 209e2 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x209e4 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 209ea-209ec StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x209ec 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 209f2-209f4 StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x209f4 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 209fa-209fe StackAdj> Δ+20 {}
<POP 209fe-20a06 Epilogue> Σ0
@ 20a5a
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 20a5a-20b96 Body>
<POP 20a5a-20a70 Prologue> Σ0 ↓
<POP 20a70-20a86 RegCacheLoad> Σ0 ↓
<POP 20a86-20ae6 Naked> Σ0 ↓ →0x20b2e
<Call 0x20a86 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x20a8c [18] @> Δ-18 {[«18""»]}
<POP 20a98-20a9a StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x20a9a 18> {[«18""»]|[$$Experiment error :]}
<Call 0x20aa6 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 20aa8-20aa9 StackAdj> Δ+22 ↓ {}
<Blob 0x20aa9 [14] @> Δ-14 {[«14""»]}
<POP 20ab8-20aba StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x20aba 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 20ac4-20ac6 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 20ac6 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x20aca 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 20ad0-20ad2 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x20ad2 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 20ad8-20ada StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x20ada 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 20adc-20ade StackAdj> Δ+18 {}
<MI 20ade MOVEA.L (A6+0xa),A0> {}
<MI 20ae2 CMPA.W #0x01,A0> {}
<MI 20ae4 BEQ 0x20b2e> {}
<POP 20ae6-20b2e Naked> Σ0 ↓
<Blob 0x20ae6 [14] @> Δ-14 {[«14""»]}
<Blob 0x20af6 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 20b06-20b08 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x20b08 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 20b12-20b14 StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x20b14> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x20b14 12> Δ-4
<Const 0x20b18 0x1.2> Δ-2
<Const 0x20b1a 0x1e.2> Δ-2
<Call 0x20b1c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20b1e-20b20 StackAdj> Δ+8
<Call 0x20b20 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 20b26-20b28 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x20b28 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 20b2a-20b2e StackAdj> Δ+48 {}
<POP 20b2e-20b8e Naked> Σ0 ↓ ←0x20a86
<Blob 0x20b2e [14] @> Δ-14 {[«14""»]}
<POP 20b3e-20b40 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x20b40 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 20b4a-20b4c StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 20b4c MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x20b50 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 20b56-20b58 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x20b58 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 20b5e-20b60 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x20b60 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 20b62-20b63 StackAdj> Δ+18 ↓ {}
<Blob 0x20b63 [24] @> Δ-24 {[«24""»]}
<Const 0x20b72 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 20b76-20b78 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x20b78 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x20b86 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 20b8c-20b8e StackAdj> Δ+30 {}
<POP 20b8e-20b96 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.3f9e88806b6e33c3 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 06 fa | | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 0b fe | | .PTR 0x20bfe 00020010 code.end: 00020010 00 02 0b 96 | | .PTR 0x20b96 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 09 9e | | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 0a 5a | Z | .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.TYP ' 0002011c 50 31 53 46 |P1SF | .TXT 'P1SF' 00020120 50 31 53 46 |P1SF | .TXT 'P1SF' 00020124 50 31 54 59 50 20 |P1TYP | .TXT 'P1TYP ' 0002012a 70 01 b0 01 d0 01 |p | .XXX[0x6] 00020130 e0 01 fc 01 f7 00 fb 00 | | .XXX[0x18] 00020138 f2 00 f1 00 70 01 b0 01 | p | 00020140 d0 01 e0 01 f6 01 f8 00 | | 00020148 f4 00 f2 00 f1 00 | | .XXX[0x6] 0002014e 00 0f | | .CONST 0x0,0xf 00020150 e0 a7 | | .CONST 0xe0,0xa7 00020152 ff 0d | | .CONST 0xff,0xd 00020154 ; -------------------------------------------------------------------------------------- 00020154 ; OMSI PASCAL Function 00020154 ; -------------------------------------------------------------------------------------- 00020154 4e 56 ff fc |NV | LINK.W A6,#0xfffc 00020158 bf d5 | | CMPA.L (A5),A7 0002015a 62 06 |b | BHI 0x20162 0002015c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020160 4e 76 |Nv | TRAPV 00020162 de fc 00 04 | | ADDA.W #0x4,A7 00020166 4e b9 00 01 05 b6 |N | JSR R1000_Reset_L(void) 0002016c 4e b9 00 01 05 bc |N | JSR R1000_Reset_H(void) 00020172 4e 5e |N^ | UNLK A6 00020174 4e 75 |Nu | RTS 00020176 ; -------------------------------------------------------------------------------------- 00020176 ; OMSI PASCAL Function 00020176 ; <LVAR 0x00a 1(r)> 00020176 ; <LVAR 0x008 1(r)> 00020176 ; -------------------------------------------------------------------------------------- 00020176 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 0002017a bf d5 | | CMPA.L (A5),A7 0002017c 62 06 |b | BHI 0x20184 0002017e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020182 4e 76 |Nv | TRAPV 00020184 de fc 00 2c | , | ADDA.W #0x2c,A7 00020188 48 e7 80 f0 |H | MOVEM.L A3+A2+A1+A0+D0,-(A7) 0002018c 45 f9 00 02 0b a6 |E | LEA.L 0x20ba6,A2 00020192 47 f9 00 02 0b a7 |G | LEA.L 0x20ba7,A3 00020198 4a 2e 00 0a |J. | TST.B (A6+0xa) 0002019c 66 30 |f0 | BNE 0x201ce 0002019e 14 ae 00 08 | | MOVE.B (A6+0x8),(A2) 000201a2 16 bc 00 03 | | MOVE.B #0x03,(A3) 000201a6 42 27 |B' | CLR.B -(A7) 000201a8 2f 39 00 02 0b 9e |/9 | MOVE.L 0x20b9e,-(A7) 000201ae 2f 39 00 02 0b a2 |/9 | MOVE.L 0x20ba2,-(A7) 000201b4 1f 12 | | MOVE.B (A2),-(A7) 000201b6 51 4f |QO | SUBQ.L #0x8,A7 000201b8 20 4f | O | MOVEA.L A7,A0 000201ba 22 4b |"K | MOVEA.L A3,A1 000201bc 70 07 |p | MOVEQ.L #0x07,D0 000201be 10 d9 | | MOVE.B (A1)+,(A0)+ 000201c0 51 c8 ff fc |Q | DBF D0,0x201be 000201c4 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 000201ca de fc 00 14 | | ADDA.W #0x14,A7 000201ce 4c df 0f 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2+A3 000201d2 4e 5e |N^ | UNLK A6 000201d4 4e 75 |Nu | RTS 000201d6 ; -------------------------------------------------------------------------------------- 000201d6 ; OMSI PASCAL Function 000201d6 ; <LVAR -0x008 @ 4(r)> 000201d6 ; <LVAR -0x00c @ 4(r)> 000201d6 ; <LVAR -0x015 @> 000201d6 ; <LVAR -0x016 @ 1(r)> 000201d6 ; <LVAR -0x017 1(rw)> 000201d6 ; <LVAR -0x018 @ 1(r)> 000201d6 ; -------------------------------------------------------------------------------------- 000201d6 4e 56 ff 96 |NV | LINK.W A6,#0xff96 000201da bf d5 | | CMPA.L (A5),A7 000201dc 62 06 |b | BHI 0x201e4 000201de 44 fc 00 02 |D | MOVE.W #0x2,CCR 000201e2 4e 76 |Nv | TRAPV 000201e4 de fc 00 52 | R | ADDA.W #0x52,A7 000201e8 48 e7 f9 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 000201ec 45 f9 00 02 0b e9 |E | LEA.L 0x20be9,A2 000201f2 47 f9 00 02 0b ea |G | LEA.L 0x20bea,A3 000201f8 49 f9 00 02 0b e6 |I | LEA.L 0x20be6,A4 000201fe 72 01 |r | MOVEQ.L #0x01,D1 00020200 74 06 |t | MOVEQ.L #0x06,D2 00020202 76 0e |v | MOVEQ.L #0x0e,D3 00020204 78 04 |x | MOVEQ.L #0x04,D4 00020206 1f 02 | | MOVE.B D2,-(A7) 00020208 48 52 |HR | PEA.L (A2) 0002020a 48 54 |HT | PEA.L (A4) 0002020c 48 79 00 02 0b e7 |Hy | PEA.L 0x20be7 00020212 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 00020218 de c3 | | ADDA.W D3,A7 0002021a 10 12 | | MOVE.B (A2),D0 0002021c 0c 00 00 05 | | CMPI.B #0x05,D0 00020220 67 0a |g | BEQ 0x2022c 00020222 42 27 |B' | CLR.B -(A7) 00020224 1f 01 | | MOVE.B D1,-(A7) 00020226 4e ba ff 4e |N N | JSR 0x20176 0002022a 58 4f |XO | ADDQ.L #0x4,A7 0002022c 4e b9 00 02 09 18 |N | JSR exp_RESET.TYP() 00020232 9e fc 00 12 | | SUBA.W #0x12,A7 00020236 20 4f | O | MOVEA.L A7,A0 00020238 43 fa fe d0 |C | LEA.L 0x2010a,A1 0002023c 70 10 |p | MOVEQ.L #0x10,D0 0002023e 10 d9 | | MOVE.B (A1)+,(A0)+ 00020240 51 c8 ff fc |Q | DBF D0,0x2023e 00020244 59 4f |YO | SUBQ.L #0x4,A7 00020246 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002024a 3f 01 |? | MOVE.W D1,-(A7) 0002024c 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 00020250 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020256 50 4f |PO | ADDQ.L #0x8,A7 00020258 48 53 |HS | PEA.L (A3) 0002025a 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00020260 de fc 00 18 | | ADDA.W #0x18,A7 00020264 42 17 |B | CLR.B (A7) 00020266 2f 13 |/ | MOVE.L (A3),-(A7) 00020268 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002026c 48 78 00 00 |Hx | PEA.L 0x0 00020270 48 78 00 00 |Hx | PEA.L 0x0 00020274 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 0002027a de fc 00 10 | | ADDA.W #0x10,A7 0002027e 1e 82 | | MOVE.B D2,(A7) 00020280 2f 13 |/ | MOVE.L (A3),-(A7) 00020282 4e b9 00 01 04 7e |N ~ | JSR ExpXmit(adr : Byte; b : Pointer) 00020288 5c 4f |\O | ADDQ.L #0x6,A7 0002028a 48 53 |HS | PEA.L (A3) 0002028c 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00020292 58 4f |XO | ADDQ.L #0x4,A7 00020294 2e 3c ff ff f8 30 |.< 0 | MOVE.L #0xfffff830,D7 0002029a 1f 02 | | MOVE.B D2,-(A7) 0002029c 48 52 |HR | PEA.L (A2) 0002029e 48 54 |HT | PEA.L (A4) 000202a0 48 79 00 02 0b e7 |Hy | PEA.L 0x20be7 000202a6 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 000202ac de c3 | | ADDA.W D3,A7 000202ae 52 87 |R | ADDQ.L #0x1,D7 000202b0 67 06 |g | BEQ 0x202b8 000202b2 10 12 | | MOVE.B (A2),D0 000202b4 b0 01 | | CMP.B D1,D0 000202b6 66 e2 |f | BNE 0x2029a 000202b8 10 12 | | MOVE.B (A2),D0 000202ba b0 01 | | CMP.B D1,D0 000202bc 67 00 00 a4 |g | BEQ 0x20362 000202c0 4a 39 00 02 0b af |J9 | TST.B 0x20baf 000202c6 66 10 |f | BNE 0x202d8 000202c8 42 27 |B' | CLR.B -(A7) 000202ca 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 000202ce 4e ba fe a6 |N | JSR 0x20176 000202d2 58 4f |XO | ADDQ.L #0x4,A7 000202d4 60 00 00 8c |` | BRA 0x20362 000202d8 1d 42 ff e9 | B | MOVE.B D2,(A6-0x17) 000202dc 2f 3a fe 3e |/: > | MOVE.L 0x2011c,-(A7) 000202e0 1f 2e ff e9 | . | MOVE.B (A6-0x17),-(A7) 000202e4 59 4f |YO | SUBQ.L #0x4,A7 000202e6 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000202ea 3f 01 |? | MOVE.W D1,-(A7) 000202ec 3f 04 |? | MOVE.W D4,-(A7) 000202ee 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000202f4 50 4f |PO | ADDQ.L #0x8,A7 000202f6 10 39 00 02 0b af | 9 | MOVE.B 0x20baf,D0 000202fc 48 80 |H | EXTB.W D0 000202fe 41 81 |A | CHK.W D1,D0 00020300 1f 00 | | MOVE.B D0,-(A7) 00020302 10 39 00 02 0b b0 | 9 | MOVE.B 0x20bb0,D0 00020308 48 80 |H | EXTB.W D0 0002030a 41 81 |A | CHK.W D1,D0 0002030c 1f 00 | | MOVE.B D0,-(A7) 0002030e 48 6e ff e8 |Hn | PEA.L (A6-0x18) 00020312 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00020316 48 6e ff f8 |Hn | PEA.L (A6-0x8) 0002031a 48 6e ff ea |Hn | PEA.L (A6-0x16) 0002031e 48 6e ff eb |Hn | PEA.L (A6-0x15) 00020322 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) 00020328 de fc 00 22 | " | ADDA.W #0x22,A7 0002032c 4a 2e ff e8 |J. | TST.B (A6-0x18) 00020330 67 08 |g | BEQ 0x2033a 00020332 42 27 |B' | CLR.B -(A7) 00020334 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020338 60 94 |` | BRA 0x202ce 0002033a 42 27 |B' | CLR.B -(A7) 0002033c 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00020340 2f 2e ff f8 |/. | MOVE.L (A6-0x8),-(A7) 00020344 1f 2e ff ea | . | MOVE.B (A6-0x16),-(A7) 00020348 51 4f |QO | SUBQ.L #0x8,A7 0002034a 20 4f | O | MOVEA.L A7,A0 0002034c 43 ee ff eb |C | LEA.L (A6-0x15),A1 00020350 70 07 |p | MOVEQ.L #0x07,D0 00020352 10 d9 | | MOVE.B (A1)+,(A0)+ 00020354 51 c8 ff fc |Q | DBF D0,0x20352 00020358 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 0002035e de fc 00 14 | | ADDA.W #0x14,A7 00020362 48 79 00 02 0b e8 |Hy | PEA.L 0x20be8 00020368 4e b9 00 02 08 dc |N | JSR exp_TEST_RESET.TYP(&Fr) 0002036e 54 4f |TO | ADDQ.L #0x2,A7 00020370 1e b9 00 02 0b e8 | | MOVE.B 0x20be8,(A7) 00020376 1f 04 | | MOVE.B D4,-(A7) 00020378 4e ba fd fc |N | JSR 0x20176 0002037c 58 4f |XO | ADDQ.L #0x4,A7 0002037e 4c df 1f 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4 00020382 4e 5e |N^ | UNLK A6 00020384 4e 75 |Nu | RTS 00020386 ; -------------------------------------------------------------------------------------- 00020386 ; OMSI PASCAL Function 00020386 ; <LVAR -0x004 @ 4(r)> 00020386 ; <LVAR -0x008 @ 4(r)> 00020386 ; <LVAR -0x011 @> 00020386 ; <LVAR -0x012 @ 1(r)> 00020386 ; <LVAR -0x013 1(rw)> 00020386 ; <LVAR -0x014 @ 1(r)> 00020386 ; -------------------------------------------------------------------------------------- 00020386 4e 56 ff a2 |NV | LINK.W A6,#0xffa2 0002038a bf d5 | | CMPA.L (A5),A7 0002038c 62 06 |b | BHI 0x20394 0002038e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020392 4e 76 |Nv | TRAPV 00020394 de fc 00 4a | J | ADDA.W #0x4a,A7 00020398 48 e7 f0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7) 0002039c 45 f9 00 02 0b e8 |E | LEA.L 0x20be8,A2 000203a2 47 fa fd d2 |G | LEA.L 0x20176,A3 000203a6 49 f9 00 02 0b bc |I | LEA.L 0x20bbc,A4 000203ac 72 0a |r | MOVEQ.L #0x0a,D1 000203ae 74 01 |t | MOVEQ.L #0x01,D2 000203b0 76 06 |v | MOVEQ.L #0x06,D3 000203b2 48 52 |HR | PEA.L (A2) 000203b4 48 54 |HT | PEA.L (A4) 000203b6 48 79 00 02 0b d5 |Hy | PEA.L 0x20bd5 000203bc 4e b9 00 02 08 92 |N | JSR exp_TEST_SCAN_PAREG.TYP(&Fr, &Sr_1, &Sr_1) 000203c2 de c1 | | ADDA.W D1,A7 000203c4 1e 92 | | MOVE.B (A2),(A7) 000203c6 1f 3c 00 05 | < | MOVE.B #0x05,-(A7) 000203ca 4e 93 |N | JSR (A3) 000203cc 58 4f |XO | ADDQ.L #0x4,A7 000203ce 48 52 |HR | PEA.L (A2) 000203d0 48 79 00 02 0b b6 |Hy | PEA.L 0x20bb6 000203d6 48 79 00 02 0b d6 |Hy | PEA.L 0x20bd6 000203dc 4e b9 00 02 08 54 |N T | JSR exp_TEST_UIR.TYP(&Fr, &Sr_6, &Sr_6) 000203e2 de fc 00 0c | | ADDA.W #0xc,A7 000203e6 4a 12 |J | TST.B (A2) 000203e8 66 00 00 a4 |f | BNE 0x2048e 000203ec 4a 39 00 02 0b af |J9 | TST.B 0x20baf 000203f2 66 0e |f | BNE 0x20402 000203f4 42 27 |B' | CLR.B -(A7) 000203f6 1f 3c 00 08 | < | MOVE.B #0x08,-(A7) 000203fa 4e 93 |N | JSR (A3) 000203fc 58 4f |XO | ADDQ.L #0x4,A7 000203fe 60 00 00 8e |` | BRA 0x2048e 00020402 1d 43 ff ed | C | MOVE.B D3,(A6-0x13) 00020406 2f 3a fd 18 |/: | MOVE.L 0x20120,-(A7) 0002040a 1f 2e ff ed | . | MOVE.B (A6-0x13),-(A7) 0002040e 59 4f |YO | SUBQ.L #0x4,A7 00020410 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020414 3f 02 |? | MOVE.W D2,-(A7) 00020416 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 0002041a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020420 50 4f |PO | ADDQ.L #0x8,A7 00020422 10 39 00 02 0b af | 9 | MOVE.B 0x20baf,D0 00020428 48 80 |H | EXTB.W D0 0002042a 41 82 |A | CHK.W D2,D0 0002042c 1f 00 | | MOVE.B D0,-(A7) 0002042e 10 39 00 02 0b b0 | 9 | MOVE.B 0x20bb0,D0 00020434 48 80 |H | EXTB.W D0 00020436 41 82 |A | CHK.W D2,D0 00020438 1f 00 | | MOVE.B D0,-(A7) 0002043a 48 6e ff ec |Hn | PEA.L (A6-0x14) 0002043e 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00020442 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020446 48 6e ff ee |Hn | PEA.L (A6-0x12) 0002044a 48 6e ff ef |Hn | PEA.L (A6-0x11) 0002044e 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) 00020454 de fc 00 22 | " | ADDA.W #0x22,A7 00020458 4a 2e ff ec |J. | TST.B (A6-0x14) 0002045c 67 08 |g | BEQ 0x20466 0002045e 42 27 |B' | CLR.B -(A7) 00020460 1f 3c 00 07 | < | MOVE.B #0x07,-(A7) 00020464 60 94 |` | BRA 0x203fa 00020466 42 27 |B' | CLR.B -(A7) 00020468 2f 2e ff f8 |/. | MOVE.L (A6-0x8),-(A7) 0002046c 2f 2e ff fc |/. | MOVE.L (A6-0x4),-(A7) 00020470 1f 2e ff ee | . | MOVE.B (A6-0x12),-(A7) 00020474 51 4f |QO | SUBQ.L #0x8,A7 00020476 20 4f | O | MOVEA.L A7,A0 00020478 43 ee ff ef |C | LEA.L (A6-0x11),A1 0002047c 70 07 |p | MOVEQ.L #0x07,D0 0002047e 10 d9 | | MOVE.B (A1)+,(A0)+ 00020480 51 c8 ff fc |Q | DBF D0,0x2047e 00020484 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 0002048a de fc 00 14 | | ADDA.W #0x14,A7 0002048e 48 52 |HR | PEA.L (A2) 00020490 48 54 |HT | PEA.L (A4) 00020492 48 79 00 02 0b d5 |Hy | PEA.L 0x20bd5 00020498 4e b9 00 02 08 b6 |N | JSR exp_TEST_SCAN_CSA_REG.TYP(&Fr, &Sr_1, &Sr_1) 0002049e de c1 | | ADDA.W D1,A7 000204a0 1e 92 | | MOVE.B (A2),(A7) 000204a2 1f 03 | | MOVE.B D3,-(A7) 000204a4 4e 93 |N | JSR (A3) 000204a6 58 4f |XO | ADDQ.L #0x4,A7 000204a8 48 52 |HR | PEA.L (A2) 000204aa 48 79 00 02 0b bd |Hy | PEA.L 0x20bbd 000204b0 48 79 00 02 0b dc |Hy | PEA.L 0x20bdc 000204b6 4e b9 00 02 08 70 |N p | JSR exp_TEST_SCAN_WDR.TYP(&Fr, &Sr_8_1, &Sr_8_1) 000204bc de c1 | | ADDA.W D1,A7 000204be 1e 92 | | MOVE.B (A2),(A7) 000204c0 1f 3c 00 09 | < | MOVE.B #0x09,-(A7) 000204c4 4e 93 |N | JSR (A3) 000204c6 58 4f |XO | ADDQ.L #0x4,A7 000204c8 48 52 |HR | PEA.L (A2) 000204ca 48 79 00 02 0b e5 |Hy | PEA.L 0x20be5 000204d0 48 79 00 02 0b c6 |Hy | PEA.L 0x20bc6 000204d6 4e b9 00 02 08 30 |N 0 | JSR exp_TEST_UIR_TO_WDR.TYP(&Fr, &Fr, &Sr_8_1) 000204dc de c1 | | ADDA.W D1,A7 000204de 1e 92 | | MOVE.B (A2),(A7) 000204e0 1f 01 | | MOVE.B D1,-(A7) 000204e2 4e 93 |N | JSR (A3) 000204e4 58 4f |XO | ADDQ.L #0x4,A7 000204e6 48 52 |HR | PEA.L (A2) 000204e8 48 79 00 02 0b e5 |Hy | PEA.L 0x20be5 000204ee 48 79 00 02 0b cf |Hy | PEA.L 0x20bcf 000204f4 4e b9 00 02 08 0c |N | JSR exp_TEST_WDR_TO_UIR.TYP(&Fr, &Fr, &Sr_6) 000204fa de c1 | | ADDA.W D1,A7 000204fc 1e 92 | | MOVE.B (A2),(A7) 000204fe 1f 01 | | MOVE.B D1,-(A7) 00020500 4e 93 |N | JSR (A3) 00020502 58 4f |XO | ADDQ.L #0x4,A7 00020504 4c df 1f 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4 00020508 4e 5e |N^ | UNLK A6 0002050a 4e 75 |Nu | RTS 0002050c ; -------------------------------------------------------------------------------------- 0002050c ; OMSI PASCAL Function 0002050c ; <LVAR -0x00d @> 0002050c ; <LVAR -0x00f @> 0002050c ; <LVAR -0x010 @> 0002050c ; <LVAR -0x011 @ 1(r)> 0002050c ; <LVAR -0x013 @> 0002050c ; <LVAR -0x014 @ 1(r)> 0002050c ; -------------------------------------------------------------------------------------- 0002050c 4e 56 ff ac |NV | LINK.W A6,#0xffac 00020510 bf d5 | | CMPA.L (A5),A7 00020512 62 06 |b | BHI 0x2051a 00020514 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020518 4e 76 |Nv | TRAPV 0002051a de fc 00 40 | @ | ADDA.W #0x40,A7 0002051e 48 e7 f7 c0 |H | MOVEM.L A1+A0+D7+D6+D5+D3+D2+D1+D0,-(A7) 00020522 43 f9 00 02 0b e6 |C | LEA.L 0x20be6,A1 00020528 76 01 |v | MOVEQ.L #0x01,D3 0002052a 48 6e ff ec |Hn | PEA.L (A6-0x14) 0002052e 48 6e ff ed |Hn | PEA.L (A6-0x13) 00020532 48 6e ff ef |Hn | PEA.L (A6-0x11) 00020536 48 6e ff f0 |Hn | PEA.L (A6-0x10) 0002053a 48 6e ff f1 |Hn | PEA.L (A6-0xf) 0002053e 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00020542 4e b9 00 02 07 e4 |N | JSR exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 00020548 de fc 00 18 | | ADDA.W #0x18,A7 0002054c 42 80 |B | CLR.L D0 0002054e 10 2e ff ec | . | MOVE.B (A6-0x14),D0 00020552 0c 40 00 03 | @ | CMPI.W #0x0003,D0 00020556 66 0e |f | BNE 0x20566 00020558 42 80 |B | CLR.L D0 0002055a 10 2e ff ef | . | MOVE.B (A6-0x11),D0 0002055e b0 43 | C | CMP.W D3,D0 00020560 66 04 |f | BNE 0x20566 00020562 7a 00 |z | MOVEQ.L #0x00,D5 00020564 60 02 |` | BRA 0x20568 00020566 7a 09 |z | MOVEQ.L #0x09,D5 00020568 2e 05 |. | MOVE.L D5,D7 0002056a 0c 87 00 00 00 11 | | CMPI.L #0x00000011,D7 00020570 63 02 |c | BLS 0x20574 00020572 4e 4f |NO | TRAP #15 00020574 20 07 | | MOVE.L D7,D0 00020576 e3 80 | | ASL.L #0x1,D0 00020578 41 fa fb b0 |A | LEA.L 0x2012a,A0 0002057c 1f 30 08 00 | 0 | MOVE.B (A0+D0.L),-(A7) 00020580 42 27 |B' | CLR.B -(A7) 00020582 4e b9 00 02 09 4e |N N | JSR exp_LOAD_PAREG_DIRECT.TYP(Sw_1, Sw_1) 00020588 54 4f |TO | ADDQ.L #0x2,A7 0002058a 1e bc 00 06 | | MOVE.B #0x06,(A7) 0002058e 48 79 00 02 0b e9 |Hy | PEA.L 0x20be9 00020594 48 51 |HQ | PEA.L (A1) 00020596 48 79 00 02 0b e7 |Hy | PEA.L 0x20be7 0002059c 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 000205a2 de fc 00 0e | | ADDA.W #0xe,A7 000205a6 72 00 |r | MOVEQ.L #0x00,D1 000205a8 41 fa fb 80 |A | LEA.L 0x2012a,A0 000205ac 14 11 | | MOVE.B (A1),D2 000205ae b4 30 08 01 | 0 | CMP.B (A0+D0.L+#0x1),D2 000205b2 66 02 |f | BNE 0x205b6 000205b4 52 01 |R | ADDQ.B #0x1,D1 000205b6 1c 01 | | MOVE.B D1,D6 000205b8 52 87 |R | ADDQ.L #0x1,D7 000205ba 4a 06 |J | TST.B D6 000205bc 67 0c |g | BEQ 0x205ca 000205be 20 05 | | MOVE.L D5,D0 000205c0 06 80 00 00 00 09 | | ADDI.L #0x00000009,D0 000205c6 be 80 | | CMP.L D0,D7 000205c8 66 a0 |f | BNE 0x2056a 000205ca 10 06 | | MOVE.B D6,D0 000205cc 48 80 |H | EXTB.W D0 000205ce 41 83 |A | CHK.W D3,D0 000205d0 1f 00 | | MOVE.B D0,-(A7) 000205d2 1f 3c 00 0b | < | MOVE.B #0x0b,-(A7) 000205d6 4e ba fb 9e |N | JSR 0x20176 000205da 58 4f |XO | ADDQ.L #0x4,A7 000205dc 4c df 03 ef |L | MOVEM.L (A7)+,D0+D1+D2+D3+D5+D6+D7+A0+A1 000205e0 4e 5e |N^ | UNLK A6 000205e2 4e 75 |Nu | RTS 000205e4 ; -------------------------------------------------------------------------------------- 000205e4 ; OMSI PASCAL Function 000205e4 ; <LVAR -0x004 @> 000205e4 ; <LVAR -0x009 @ 1(r)> 000205e4 ; <LVAR -0x00b @> 000205e4 ; <LVAR -0x00c @ 1(r)> 000205e4 ; <LVAR -0x00d @ 1(r)> 000205e4 ; <LVAR -0x00f @> 000205e4 ; <LVAR -0x010 @ 1(r)> 000205e4 ; -------------------------------------------------------------------------------------- 000205e4 4e 56 ff c4 |NV | LINK.W A6,#0xffc4 000205e8 bf d5 | | CMPA.L (A5),A7 000205ea 62 06 |b | BHI 0x205f2 000205ec 44 fc 00 02 |D | MOVE.W #0x2,CCR 000205f0 4e 76 |Nv | TRAPV 000205f2 de fc 00 2c | , | ADDA.W #0x2c,A7 000205f6 48 e7 81 c0 |H | MOVEM.L A1+A0+D7+D0,-(A7) 000205fa 41 fa fb 7a |A z | LEA.L 0x20176,A0 000205fe 43 f9 00 02 0b e8 |C | LEA.L 0x20be8,A1 00020604 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00020608 48 6e ff f1 |Hn | PEA.L (A6-0xf) 0002060c 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00020610 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00020614 48 6e ff f5 |Hn | PEA.L (A6-0xb) 00020618 48 6e ff f7 |Hn | PEA.L (A6-0x9) 0002061c 4e b9 00 02 07 e4 |N | JSR exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 00020622 de fc 00 18 | | ADDA.W #0x18,A7 00020626 4a 2e ff f7 |J. | TST.B (A6-0x9) 0002062a 66 0a |f | BNE 0x20636 0002062c 42 27 |B' | CLR.B -(A7) 0002062e 1f 3c 00 0c | < | MOVE.B #0x0c,-(A7) 00020632 4e 90 |N | JSR (A0) 00020634 58 4f |XO | ADDQ.L #0x4,A7 00020636 42 80 |B | CLR.L D0 00020638 10 2e ff f0 | . | MOVE.B (A6-0x10),D0 0002063c 0c 40 00 03 | @ | CMPI.W #0x0003,D0 00020640 66 26 |f& | BNE 0x20668 00020642 42 80 |B | CLR.L D0 00020644 10 2e ff f3 | . | MOVE.B (A6-0xd),D0 00020648 0c 40 00 01 | @ | CMPI.W #0x0001,D0 0002064c 66 04 |f | BNE 0x20652 0002064e 7e 17 |~ | MOVEQ.L #0x17,D7 00020650 60 14 |` | BRA 0x20666 00020652 0c 40 00 02 | @ | CMPI.W #0x0002,D0 00020656 66 04 |f | BNE 0x2065c 00020658 7e 01 |~ | MOVEQ.L #0x01,D7 0002065a 60 0a |` | BRA 0x20666 0002065c 42 27 |B' | CLR.B -(A7) 0002065e 1f 3c 00 0f | < | MOVE.B #0x0f,-(A7) 00020662 4e 90 |N | JSR (A0) 00020664 58 4f |XO | ADDQ.L #0x4,A7 00020666 60 14 |` | BRA 0x2067c 00020668 0c 40 00 2b | @ + | CMPI.W #0x002b,D0 0002066c 66 04 |f | BNE 0x20672 0002066e 7e 00 |~ | MOVEQ.L #0x00,D7 00020670 60 0a |` | BRA 0x2067c 00020672 42 27 |B' | CLR.B -(A7) 00020674 1f 3c 00 0d | < | MOVE.B #0x0d,-(A7) 00020678 4e 90 |N | JSR (A0) 0002067a 58 4f |XO | ADDQ.L #0x4,A7 0002067c 42 80 |B | CLR.L D0 0002067e 10 2e ff f4 | . | MOVE.B (A6-0xc),D0 00020682 b0 87 | | CMP.L D7,D0 00020684 64 0a |d | BCC 0x20690 00020686 42 27 |B' | CLR.B -(A7) 00020688 1f 3c 00 11 | < | MOVE.B #0x11,-(A7) 0002068c 4e 90 |N | JSR (A0) 0002068e 58 4f |XO | ADDQ.L #0x4,A7 00020690 48 51 |HQ | PEA.L (A1) 00020692 48 79 00 02 0b e5 |Hy | PEA.L 0x20be5 00020698 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002069c 48 79 00 02 0b bc |Hy | PEA.L 0x20bbc 000206a2 4e b9 00 02 08 f8 |N | JSR exp_TEST_NOVRAM.TYP(&Fr, &Fr, &Sr_2, &Sr_1) 000206a8 de fc 00 0e | | ADDA.W #0xe,A7 000206ac 1e 91 | | MOVE.B (A1),(A7) 000206ae 1f 3c 00 12 | < | MOVE.B #0x12,-(A7) 000206b2 4e 90 |N | JSR (A0) 000206b4 58 4f |XO | ADDQ.L #0x4,A7 000206b6 4c df 03 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1 000206ba 4e 5e |N^ | UNLK A6 000206bc 4e 75 |Nu | RTS 000206be ; -------------------------------------------------------------------------------------- 000206be ; OMSI PASCAL Function 000206be ; -------------------------------------------------------------------------------------- 000206be 4e 56 ff f2 |NV | LINK.W A6,#0xfff2 000206c2 bf d5 | | CMPA.L (A5),A7 000206c4 62 06 |b | BHI 0x206cc 000206c6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000206ca 4e 76 |Nv | TRAPV 000206cc de fc 00 0e | | ADDA.W #0xe,A7 000206d0 4e b9 00 02 09 72 |N r | JSR exp_CLEAR_PARITY.TYP() 000206d6 42 67 |Bg | CLR.W -(A7) 000206d8 3f 3a fa 78 |?: x | MOVE.W 0x20152,-(A7) 000206dc 3f 3a fa 72 |?: r | MOVE.W 0x20150,-(A7) 000206e0 3f 3a fa 6c |?: l | MOVE.W 0x2014e,-(A7) 000206e4 42 27 |B' | CLR.B -(A7) 000206e6 4e b9 00 02 09 2e |N . | JSR exp_LOAD_WCS_UIR.TYP(Sw_2, Sw_6, Sw_1) 000206ec de fc 00 0a | | ADDA.W #0xa,A7 000206f0 4e b9 00 02 09 18 |N | JSR exp_RESET.TYP() 000206f6 4e 5e |N^ | UNLK A6 000206f8 4e 75 |Nu | RTS 000206fa ; -------------------------------------------------------------------------------------- 000206fa ; OMSI PASCAL Function 000206fa ; -------------------------------------------------------------------------------------- 000206fa START: 000206fa 4f fa 00 08 |O | LEA.L MAIN,A7 000206fe 4e f9 00 01 02 80 |N | JMP ?start_program 00020704 MAIN: 00020704 45 f9 00 02 0b b0 |E | LEA.L 0x20bb0,A2 0002070a 47 f9 00 02 0b 9e |G | LEA.L 0x20b9e,A3 00020710 49 f9 00 02 0b a2 |I | LEA.L 0x20ba2,A4 00020716 72 01 |r | MOVEQ.L #0x01,D1 00020718 74 07 |t | MOVEQ.L #0x07,D2 0002071a 4e b9 00 01 03 98 |N | JSR FSCALL_10398 00020720 48 78 00 00 |Hx | PEA.L 0x0 00020724 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 0002072a 58 4f |XO | ADDQ.L #0x4,A7 0002072c 48 79 00 02 0b af |Hy | PEA.L 0x20baf 00020732 48 52 |HR | PEA.L (A2) 00020734 4e b9 00 01 05 44 |N D | JSR IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool) 0002073a 5c 4f |\O | ADDQ.L #0x6,A7 0002073c 1e 92 | | MOVE.B (A2),(A7) 0002073e 4e b9 00 01 04 d2 |N | JSR SetExpInitDone(a : Byte) 00020744 59 4f |YO | SUBQ.L #0x4,A7 00020746 20 4f | O | MOVEA.L A7,A0 00020748 43 fa f9 da |C | LEA.L 0x20124,A1 0002074c 70 04 |p | MOVEQ.L #0x04,D0 0002074e 10 d9 | | MOVE.B (A1)+,(A0)+ 00020750 51 c8 ff fc |Q | DBF D0,0x2074e 00020754 59 4f |YO | SUBQ.L #0x4,A7 00020756 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002075a 3f 01 |? | MOVE.W D1,-(A7) 0002075c 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00020760 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020766 50 4f |PO | ADDQ.L #0x8,A7 00020768 26 9f |& | MOVE.L (A7)+,(A3) 0002076a 5c 4f |\O | ADDQ.L #0x6,A7 0002076c 48 54 |HT | PEA.L (A4) 0002076e 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00020774 58 4f |XO | ADDQ.L #0x4,A7 00020776 42 39 00 02 0b a6 |B9 | CLR.B 0x20ba6 0002077c 70 00 |p | MOVEQ.L #0x00,D0 0002077e 23 c0 00 02 0b b2 |# | MOVE.L D0,0x20bb2 00020784 b0 82 | | CMP.L D2,D0 00020786 63 02 |c | BLS 0x2078a 00020788 4e 4f |NO | TRAP #15 0002078a 41 f9 00 02 0b 96 |A | LEA.L 0x20b96,A0 00020790 42 30 08 11 |B0 | CLR.B (A0+D0.L+#0x11) 00020794 52 80 |R | ADDQ.L #0x1,D0 00020796 b0 82 | | CMP.L D2,D0 00020798 6f e4 |o | BLE 0x2077e 0002079a 4e ba f9 b8 |N | JSR 0x20154 0002079e 4e ba fa 36 |N 6 | JSR 0x201d6 000207a2 4e ba fb e2 |N | JSR 0x20386 000207a6 4e ba fe 3c |N < | JSR 0x205e4 000207aa 4e ba f9 a8 |N | JSR 0x20154 000207ae 4e ba fd 5c |N \ | JSR 0x2050c 000207b2 4e ba ff 0a |N | JSR 0x206be 000207b6 1f 01 | | MOVE.B D1,-(A7) 000207b8 2f 13 |/ | MOVE.L (A3),-(A7) 000207ba 2f 14 |/ | MOVE.L (A4),-(A7) 000207bc 1f 39 00 02 0b a6 | 9 | MOVE.B 0x20ba6,-(A7) 000207c2 51 4f |QO | SUBQ.L #0x8,A7 000207c4 20 4f | O | MOVEA.L A7,A0 000207c6 43 f9 00 02 0b a7 |C | LEA.L 0x20ba7,A1 000207cc 70 07 |p | MOVEQ.L #0x07,D0 000207ce 10 d9 | | MOVE.B (A1)+,(A0)+ 000207d0 51 c8 ff fc |Q | DBF D0,0x207ce 000207d4 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 000207da de fc 00 14 | | ADDA.W #0x14,A7 000207de 4e b9 00 01 02 84 |N | JSR ?exit 000207e4 exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 000207e4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000207ea 00 20 | | .CONST 0x0020 ; Stack-delta 000207ec 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.TYP' 00020801 00 | | .CONST 0x0 00020802 06 | | .CONST 0x6 ; DIPROC address 00020803 06 | | .CONST 0x6 ; Output Parameters 00020804 00 | | .CONST 0x0 ; Input Parameters 00020805 00 | | .CONST 0x0 ; Out arg [1] 00020806 01 | | .CONST 0x1 ; Out arg [2] 00020807 00 | | .CONST 0x0 ; Out arg [1] 00020808 00 | | .CONST 0x0 ; Out arg [1] 00020809 01 | | .CONST 0x1 ; Out arg [2] 0002080a 08 | | .CONST 0x8 ; Out arg flag 0002080b 00 | | .PAD 0x0 0002080c exp_TEST_WDR_TO_UIR.TYP(&Fr, &Fr, &Sr_6): 0002080c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020812 00 14 | | .CONST 0x0014 ; Stack-delta 00020814 13 54 45 53 54 5f 57 44 | TEST_WD| .TXT 19,'TEST_WDR_TO_UIR.TYP' 00020828 00 | | .CONST 0x0 00020829 06 | | .CONST 0x6 ; DIPROC address 0002082a 03 | | .CONST 0x3 ; Output Parameters 0002082b 00 | | .CONST 0x0 ; Input Parameters 0002082c 08 | | .CONST 0x8 ; Out arg flag 0002082d 08 | | .CONST 0x8 ; Out arg flag 0002082e 05 | | .CONST 0x5 ; Out arg [6] 0002082f 00 | | .PAD 0x0 00020830 exp_TEST_UIR_TO_WDR.TYP(&Fr, &Fr, &Sr_8_1): 00020830 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020836 00 14 | | .CONST 0x0014 ; Stack-delta 00020838 13 54 45 53 54 5f 55 49 | TEST_UI| .TXT 19,'TEST_UIR_TO_WDR.TYP' 0002084c 00 | | .CONST 0x0 0002084d 06 | | .CONST 0x6 ; DIPROC address 0002084e 03 | | .CONST 0x3 ; Output Parameters 0002084f 00 | | .CONST 0x0 ; Input Parameters 00020850 08 | | .CONST 0x8 ; Out arg flag 00020851 08 | | .CONST 0x8 ; Out arg flag 00020852 0d | | .CONST 0xd ; Out arg [8, 1] 00020853 00 | | .PAD 0x0 00020854 exp_TEST_UIR.TYP(&Fr, &Sr_6, &Sr_6): 00020854 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002085a 00 14 | | .CONST 0x0014 ; Stack-delta 0002085c 0c 54 45 53 54 5f 55 49 | TEST_UI| .TXT 12,'TEST_UIR.TYP' 00020869 00 | | .CONST 0x0 0002086a 06 | | .CONST 0x6 ; DIPROC address 0002086b 03 | | .CONST 0x3 ; Output Parameters 0002086c 00 | | .CONST 0x0 ; Input Parameters 0002086d 08 | | .CONST 0x8 ; Out arg flag 0002086e 05 | | .CONST 0x5 ; Out arg [6] 0002086f 05 | | .CONST 0x5 ; Out arg [6] 00020870 exp_TEST_SCAN_WDR.TYP(&Fr, &Sr_8_1, &Sr_8_1): 00020870 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020876 00 14 | | .CONST 0x0014 ; Stack-delta 00020878 11 54 45 53 54 5f 53 43 | TEST_SC| .TXT 17,'TEST_SCAN_WDR.TYP' 0002088a 00 | | .CONST 0x0 0002088b 06 | | .CONST 0x6 ; DIPROC address 0002088c 03 | | .CONST 0x3 ; Output Parameters 0002088d 00 | | .CONST 0x0 ; Input Parameters 0002088e 08 | | .CONST 0x8 ; Out arg flag 0002088f 0d | | .CONST 0xd ; Out arg [8, 1] 00020890 0d | | .CONST 0xd ; Out arg [8, 1] 00020891 00 | | .PAD 0x0 00020892 exp_TEST_SCAN_PAREG.TYP(&Fr, &Sr_1, &Sr_1): 00020892 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020898 00 14 | | .CONST 0x0014 ; Stack-delta 0002089a 13 54 45 53 54 5f 53 43 | TEST_SC| .TXT 19,'TEST_SCAN_PAREG.TYP' 000208ae 00 | | .CONST 0x0 000208af 06 | | .CONST 0x6 ; DIPROC address 000208b0 03 | | .CONST 0x3 ; Output Parameters 000208b1 00 | | .CONST 0x0 ; Input Parameters 000208b2 08 | | .CONST 0x8 ; Out arg flag 000208b3 00 | | .CONST 0x0 ; Out arg [1] 000208b4 00 | | .CONST 0x0 ; Out arg [1] 000208b5 00 | | .PAD 0x0 000208b6 exp_TEST_SCAN_CSA_REG.TYP(&Fr, &Sr_1, &Sr_1): 000208b6 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000208bc 00 14 | | .CONST 0x0014 ; Stack-delta 000208be 15 54 45 53 54 5f 53 43 | TEST_SC| .TXT 21,'TEST_SCAN_CSA_REG.TYP' 000208d4 00 | | .CONST 0x0 000208d5 06 | | .CONST 0x6 ; DIPROC address 000208d6 03 | | .CONST 0x3 ; Output Parameters 000208d7 00 | | .CONST 0x0 ; Input Parameters 000208d8 08 | | .CONST 0x8 ; Out arg flag 000208d9 00 | | .CONST 0x0 ; Out arg [1] 000208da 00 | | .CONST 0x0 ; Out arg [1] 000208db 00 | | .PAD 0x0 000208dc exp_TEST_RESET.TYP(&Fr): 000208dc 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000208e2 00 0c | | .CONST 0x000c ; Stack-delta 000208e4 0e 54 45 53 54 5f 52 45 | TEST_RE| .TXT 14,'TEST_RESET.TYP' 000208f3 00 | | .CONST 0x0 000208f4 06 | | .CONST 0x6 ; DIPROC address 000208f5 01 | | .CONST 0x1 ; Output Parameters 000208f6 00 | | .CONST 0x0 ; Input Parameters 000208f7 08 | | .CONST 0x8 ; Out arg flag 000208f8 exp_TEST_NOVRAM.TYP(&Fr, &Fr, &Sr_2, &Sr_1): 000208f8 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000208fe 00 18 | | .CONST 0x0018 ; Stack-delta 00020900 0f 54 45 53 54 5f 4e 4f | TEST_NO| .TXT 15,'TEST_NOVRAM.TYP' 00020910 00 | | .CONST 0x0 00020911 06 | | .CONST 0x6 ; DIPROC address 00020912 04 | | .CONST 0x4 ; Output Parameters 00020913 00 | | .CONST 0x0 ; Input Parameters 00020914 08 | | .CONST 0x8 ; Out arg flag 00020915 08 | | .CONST 0x8 ; Out arg flag 00020916 01 | | .CONST 0x1 ; Out arg [2] 00020917 00 | | .CONST 0x0 ; Out arg [1] 00020918 exp_RESET.TYP(): 00020918 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002091e 00 08 | | .CONST 0x0008 ; Stack-delta 00020920 09 52 45 53 45 54 2e 54 | RESET.T| .TXT 9,'RESET.TYP' 0002092a 00 | | .CONST 0x0 0002092b 06 | | .CONST 0x6 ; DIPROC address 0002092c 00 | | .CONST 0x0 ; Output Parameters 0002092d 00 | | .CONST 0x0 ; Input Parameters 0002092e exp_LOAD_WCS_UIR.TYP(Sw_2, Sw_6, Sw_1): 0002092e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020934 00 12 | | .CONST 0x0012 ; Stack-delta 00020936 10 4c 4f 41 44 5f 57 43 | LOAD_WC| .TXT 16,'LOAD_WCS_UIR.TYP' 00020947 00 | | .CONST 0x0 00020948 06 | | .CONST 0x6 ; DIPROC address 00020949 00 | | .CONST 0x0 ; Output Parameters 0002094a 03 | | .CONST 0x3 ; Input Parameters 0002094b 01 | | .CONST 0x1 ; In arg [2] 0002094c 05 | | .CONST 0x5 ; In arg [6] 0002094d 00 | | .CONST 0x0 ; In arg [1] 0002094e exp_LOAD_PAREG_DIRECT.TYP(Sw_1, Sw_1): 0002094e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020954 00 0c | | .CONST 0x000c ; Stack-delta 00020956 15 4c 4f 41 44 5f 50 41 | LOAD_PA| .TXT 21,'LOAD_PAREG_DIRECT.TYP' 0002096c 00 | | .CONST 0x0 0002096d 06 | | .CONST 0x6 ; DIPROC address 0002096e 00 | | .CONST 0x0 ; Output Parameters 0002096f 02 | | .CONST 0x2 ; Input Parameters 00020970 00 | | .CONST 0x0 ; In arg [1] 00020971 00 | | .CONST 0x0 ; In arg [1] 00020972 exp_CLEAR_PARITY.TYP(): 00020972 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00020978 00 08 | | .CONST 0x0008 ; Stack-delta 0002097a 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.TYP' 0002098b 00 | | .CONST 0x0 0002098c 06 | | .CONST 0x6 ; DIPROC address 0002098d 00 | | .CONST 0x0 ; Output Parameters 0002098e 00 | | .CONST 0x0 ; Input Parameters 0002098f 00 | | .PAD 0x0 00020990 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 0002099e ; -------------------------------------------------------------------------------------- 0002099e ; OMSI PASCAL Function 0002099e ; <LVAR 0x008 1(r)> 0002099e ; -------------------------------------------------------------------------------------- 0002099e PROG_FAIL: 0002099e 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 000209a2 bf d5 | | CMPA.L (A5),A7 000209a4 62 06 |b | BHI 0x209ac 000209a6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000209aa 4e 76 |Nv | TRAPV 000209ac de fc 00 2c | , | ADDA.W #0x2c,A7 000209b0 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 000209b4 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 000209b8 70 06 |p | MOVEQ.L #0x06,D0 000209ba 3f 20 |? | MOVE.W -(A0),-(A7) 000209bc 51 c8 ff fc |Q | DBF D0,0x209ba 000209c0 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 000209c4 51 4f |QO | SUBQ.L #0x8,A7 000209c6 48 6f 00 0a |Ho | PEA.L (A7+0xa) 000209ca 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000209ce 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 000209d2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000209d8 58 4f |XO | ADDQ.L #0x4,A7 000209da 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000209de 48 80 |H | EXTB.W D0 000209e0 48 c0 |H | EXTW.L D0 000209e2 2f 00 |/ | MOVE.L D0,-(A7) 000209e4 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000209ea 58 4f |XO | ADDQ.L #0x4,A7 000209ec 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000209f2 50 4f |PO | ADDQ.L #0x8,A7 000209f4 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000209fa de fc 00 14 | | ADDA.W #0x14,A7 000209fe 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00020a02 4e 5e |N^ | UNLK A6 00020a04 4e 75 |Nu | RTS 00020a06 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 00020a14 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00020a22 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00020a30 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00020a42 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 00020a5a ; -------------------------------------------------------------------------------------- 00020a5a ; OMSI PASCAL Function 00020a5a ; <LVAR 0x00e 1(r)> 00020a5a ; <LVAR 0x00a 4(r)> 00020a5a ; <LVAR 0x008 1(r)> 00020a5a ; -------------------------------------------------------------------------------------- 00020a5a EXP_FAIL: 00020a5a 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 00020a5e bf d5 | | CMPA.L (A5),A7 00020a60 62 06 |b | BHI 0x20a68 00020a62 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020a66 4e 76 |Nv | TRAPV 00020a68 de fc 00 74 | t | ADDA.W #0x74,A7 00020a6c 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00020a70 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00020a76 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 00020a7c 72 01 |r | MOVEQ.L #0x01,D1 00020a7e 74 0d |t | MOVEQ.L #0x0d,D2 00020a80 76 1e |v | MOVEQ.L #0x1e,D3 00020a82 78 12 |x | MOVEQ.L #0x12,D4 00020a84 7a 0e |z | MOVEQ.L #0x0e,D5 00020a86 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00020a8c 41 fa ff b4 |A | LEA.L 0x20a42,A0 00020a90 70 08 |p | MOVEQ.L #0x08,D0 00020a92 3f 20 |? | MOVE.W -(A0),-(A7) 00020a94 51 c8 ff fc |Q | DBF D0,0x20a92 00020a98 59 4f |YO | SUBQ.L #0x4,A7 00020a9a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a9e 3f 01 |? | MOVE.W D1,-(A7) 00020aa0 3f 04 |? | MOVE.W D4,-(A7) 00020aa2 4e 93 |N | JSR (A3) 00020aa4 50 4f |PO | ADDQ.L #0x8,A7 00020aa6 4e 94 |N | JSR (A4) 00020aa8 50 4f |PO | ADDQ.L #0x8,A7 00020aaa 20 4f | O | MOVEA.L A7,A0 00020aac 43 fa ff 58 |C X | LEA.L 0x20a06,A1 00020ab0 70 0c |p | MOVEQ.L #0x0c,D0 00020ab2 10 d9 | | MOVE.B (A1)+,(A0)+ 00020ab4 51 c8 ff fc |Q | DBF D0,0x20ab2 00020ab8 51 4f |QO | SUBQ.L #0x8,A7 00020aba 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020abe 3f 01 |? | MOVE.W D1,-(A7) 00020ac0 3f 02 |? | MOVE.W D2,-(A7) 00020ac2 4e 93 |N | JSR (A3) 00020ac4 54 4f |TO | ADDQ.L #0x2,A7 00020ac6 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00020aca 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00020ad0 54 4f |TO | ADDQ.L #0x2,A7 00020ad2 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020ad8 50 4f |PO | ADDQ.L #0x8,A7 00020ada 4e 94 |N | JSR (A4) 00020adc de c4 | | ADDA.W D4,A7 00020ade 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00020ae2 b0 c1 | | CMPA.W D1,A0 00020ae4 67 48 |gH | BEQ 0x20b2e 00020ae6 9e c5 | | SUBA.W D5,A7 00020ae8 22 4f |"O | MOVEA.L A7,A1 00020aea 45 fa ff 28 |E ( | LEA.L 0x20a14,A2 00020aee 70 0c |p | MOVEQ.L #0x0c,D0 00020af0 12 da | | MOVE.B (A2)+,(A1)+ 00020af2 51 c8 ff fc |Q | DBF D0,0x20af0 00020af6 9e c3 | | SUBA.W D3,A7 00020af8 22 4f |"O | MOVEA.L A7,A1 00020afa 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00020afe 70 1d |p | MOVEQ.L #0x1d,D0 00020b00 12 d8 | | MOVE.B (A0)+,(A1)+ 00020b02 51 c8 ff fc |Q | DBF D0,0x20b00 00020b06 51 4f |QO | SUBQ.L #0x8,A7 00020b08 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00020b0c 3f 01 |? | MOVE.W D1,-(A7) 00020b0e 3f 02 |? | MOVE.W D2,-(A7) 00020b10 4e 93 |N | JSR (A3) 00020b12 58 4f |XO | ADDQ.L #0x4,A7 00020b14 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00020b18 3f 01 |? | MOVE.W D1,-(A7) 00020b1a 3f 03 |? | MOVE.W D3,-(A7) 00020b1c 4e 93 |N | JSR (A3) 00020b1e 50 4f |PO | ADDQ.L #0x8,A7 00020b20 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020b26 50 4f |PO | ADDQ.L #0x8,A7 00020b28 4e 94 |N | JSR (A4) 00020b2a de fc 00 30 | 0 | ADDA.W #0x30,A7 00020b2e 9e c5 | | SUBA.W D5,A7 00020b30 20 4f | O | MOVEA.L A7,A0 00020b32 43 fa fe ee |C | LEA.L 0x20a22,A1 00020b36 70 0c |p | MOVEQ.L #0x0c,D0 00020b38 10 d9 | | MOVE.B (A1)+,(A0)+ 00020b3a 51 c8 ff fc |Q | DBF D0,0x20b38 00020b3e 51 4f |QO | SUBQ.L #0x8,A7 00020b40 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020b44 3f 01 |? | MOVE.W D1,-(A7) 00020b46 3f 02 |? | MOVE.W D2,-(A7) 00020b48 4e 93 |N | JSR (A3) 00020b4a 54 4f |TO | ADDQ.L #0x2,A7 00020b4c 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00020b50 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00020b56 54 4f |TO | ADDQ.L #0x2,A7 00020b58 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020b5e 50 4f |PO | ADDQ.L #0x8,A7 00020b60 4e 94 |N | JSR (A4) 00020b62 5d 4f |]O | SUBQ.L #0x6,A7 00020b64 20 4f | O | MOVEA.L A7,A0 00020b66 43 fa fe da |C | LEA.L 0x20a42,A1 00020b6a 70 16 |p | MOVEQ.L #0x16,D0 00020b6c 10 d9 | | MOVE.B (A1)+,(A0)+ 00020b6e 51 c8 ff fc |Q | DBF D0,0x20b6c 00020b72 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020b76 59 4f |YO | SUBQ.L #0x4,A7 00020b78 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020b7c 3f 01 |? | MOVE.W D1,-(A7) 00020b7e 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00020b82 4e 93 |N | JSR (A3) 00020b84 50 4f |PO | ADDQ.L #0x8,A7 00020b86 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020b8c de c3 | | ADDA.W D3,A7 00020b8e 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00020b92 4e 5e |N^ | UNLK A6 00020b94 4e 75 |Nu | RTS