|
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: 9728 (0x2600) Types: M200 Notes: M200_PROGRAM Names: »EMBALM.M200«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293 └─ ⟦this⟧ »EMBALM.M200«
@ 2126e <LVAR -0x003 1(w)> <LVAR -0x004 1(w) 2(r)> <LVAR -0x005 1(r)> <LVAR -0x006 @ 1(r) 2(r)> <LVAR -0x010 @> <LVAR -0x018 @> <LVAR -0x020 @> <LVAR -0x028 @> <LVAR -0x030 @> <LVAR -0x038 @> <LVAR -0x040 @> <LVAR -0x048 @> <LVAR -0x050 @> <LVAR -0x058 @> <LVAR -0x060 @> <LVAR -0x068 @> <LVAR -0x070 @> <LVAR -0x078 @> <LVAR -0x080 @> <LVAR -0x088 @> <LVAR -0x090 @> <POP 2126e-213ae Body> <POP 2126e-21284 Prologue> Σ0 ↓ <POP 21284-2128a RegCacheLoad> Σ0 ↓ <POP 2128a-21320 Naked> Σ0 ↓ <MI 2128a CLR.B -(A7)> Δ-2 {[#0]} <Pointer.fp 0x2128c <LVAR -0x006 @ 1(r) 2(r)>> Δ-4 {[#0]|[@@-6]} <Call 0x2128e 0x2220c> {[#0]|[@@-6]} exp_READ_TRACE_ADDRESS.IOC(Sw_1, &Sr_2) <POP 21294-21296 StackAdj> Δ+6 {} <MI 21296 CLR.L D0> {} <MI 21298 MOVE.B (A6-0x6),D0> {} <MI 2129a ASL.W #0x8,D0> {} <MI 2129c CLR.L D1> {} <MI 2129e MOVE.B (A6-0x5),D1> {} <MI 212a2 ADD.W D0,D1> {} <MI 212a4 MOVE.W D1,D5> {} <MI 212a6 CLR.L D0> {} <MI 212a8 MOVE.W D5,D0> {} <MI 212aa SUB.L #0x40,D0> {} <MI 212ac SUBQ.L #0x2,D0> {} <MI 212ae ANDI.L #0x000007ff,D0> {} <MI 212b4 MOVE.W D0,D5> {} <MI 212b6 MOVE.W D5,D0> {} <MI 212b8 LSR.W #0x8,D0> {} <MI 212ba MOVE.B D0,(A6-0x4)> {} <MI 212be MOVE.W D5,D0> {} <MI 212c0 ANDI.W #0x00ff,D0> {} <MI 212c4 MOVE.B D0,(A6-0x3)> {} <MI 212c8 MOVE.W (A6-0x4),-(A7)> Δ-2 {[2, '(A6-0x4)']} <MI 212cc CLR.B -(A7)> Δ-2 {[2, '(A6-0x4)']|[#0]} <Call 0x212ce 0x22250> {[2, '(A6-0x4)']|[#0]} exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1) <POP 212d4-212d6 StackAdj> Δ+4 {} <Pointer.fp 0x212d6 <LVAR -0x088 @>> Δ-4 {[@@-136]} <Pointer.fp 0x212da <LVAR -0x080 @>> Δ-4 {[@@-136]|[@@-128]} <Pointer.fp 0x212de <LVAR -0x078 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]} <Pointer.fp 0x212e2 <LVAR -0x070 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]} <Pointer.fp 0x212e6 <LVAR -0x068 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]} <Pointer.fp 0x212ea <LVAR -0x060 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]} <Pointer.fp 0x212ee <LVAR -0x058 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]} <Pointer.fp 0x212f2 <LVAR -0x050 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]} <Pointer.fp 0x212f6 <LVAR -0x048 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]} <Pointer.fp 0x212fa <LVAR -0x040 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]} <Pointer.fp 0x212fe <LVAR -0x038 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]} <Pointer.fp 0x21302 <LVAR -0x030 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]} <Pointer.fp 0x21306 <LVAR -0x028 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]} <Pointer.fp 0x2130a <LVAR -0x020 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]} <Pointer.fp 0x2130e <LVAR -0x018 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]|[@@-24]} <Pointer.fp 0x21312 <LVAR -0x010 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]|[@@-24]|[@@-16]} <Call 0x21316 0x221da> {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]|[@@-24]|[@@-16]} exp_READ_TRACE_BLOCK.IOC(&Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8) <POP 2131c-2131e StackAdj> Δ+64 {} <MI 2131e MOVEQ.L #0x00,D6> {} <POP 21320-21322 Naked> Σ0 ↓ ←0x21390 <MI 21320 MOVEQ.L #0x00,D7> {} <POP 21322-21390 Naked> Σ0 ↓ →0x21322 ←0x21322 <MI 21322 MOVE.L D6,D0> {} <MI 21324 ASL.L #0x2,D0> {} <MI 21326 NEG.L D0> {} <MI 21328 ADDI.L #0x0000003f,D0> {} <MI 2132e SUB.L D7,D0> {} <POP 0x21330 LimitCheck 0x0 ≤ D0 ≤ 0x3f> {} <MI 2133a ASL.L #0x1,D0> {} <MI 2133c LEA.L 0x2247c,A0> {} <POP 0x21342 LimitCheck 0x0 ≤ D6 ≤ 0xf> {} <MI 2134c MOVE.L D6,D1> {} <MI 2134e ASL.L #0x3,D1> {} <MI 21350 LEA.L (A6-0x90),A1> {} <MI 21354 MOVE.L D7,D2> {} <MI 21356 ASL.L #0x1,D2> {} <POP 0x21358 LimitCheck 0x0 ≤ D2 ≤ 0x7> {} <MI 21362 LEA.L (A1+D1.L),A1> {} <MI 21366 CLR.L D1> {} <MI 21368 MOVE.B (A1+D2.L+#0x8),D1> {} <MI 2136c ASL.W #0x8,D1> {} <MI 2136e ADDQ.L #0x1,D2> {} <POP 0x21370 LimitCheck 0x0 ≤ D2 ≤ 0x7> {} <MI 2137a CLR.L D3> {} <MI 2137c MOVE.B (A1+D2.L+#0x8),D3> {} <MI 21380 ADD.W D1,D3> {} <MI 21382 MOVE.W D3,(A0+D0.L+#0x8)> {} <MI 21386 ADDQ.L #0x1,D7> {} <MI 21388 CMPI.L #0x00000003,D7> {} <MI 2138e BLE 0x21322> {} <POP 21390-2139a Naked> Σ0 ↓ →0x21320 <MI 21390 ADDQ.L #0x1,D6> {} <MI 21392 CMPI.L #0x0000000f,D6> {} <MI 21398 BLE 0x21320> {} <POP 2139a-213a6 Naked> Σ0 ↓ <MI 2139a MOVE.W (A6-0x6),-(A7)> Δ-2 {[2, '(A6-0x6)']} <MI 2139c CLR.B -(A7)> Δ-2 {[2, '(A6-0x6)']|[#0]} <Call 0x2139e 0x22250> {[2, '(A6-0x6)']|[#0]} exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1) <POP 213a4-213a6 StackAdj> Δ+4 {} <POP 213a6-213ae Epilogue> Σ0
@ 213ae <LVAR 0x010 1(r)> <LVAR 0x00c 4(r)> <LVAR 0x00a 1(r)> <LVAR 0x008 1(r)> <POP 213ae-21444 Body> <POP 213ae-213c4 Prologue> Σ0 ↓ <POP 213c4-213c6 RegCacheLoad> Σ0 ↓ <POP 213c6-213e8 Naked> Σ0 ↓ →0x213ea <MI 213c6 MOVEQ.L #0x00,D0> {} <MI 213c8 MOVE.L (A6+0xc),D1> {} <POP 0x213cc LimitCheck 0x0 ≤ D1 ≤ 0x7> {} <MI 213d6 ASL.L #0x1,D1> {} <MI 213d8 LEA.L 0x210f6,A0> {} <MI 213dc CLR.L D2> {} <MI 213de MOVE.B (A6+0x10),D2> {} <MI 213e2 AND.W (A0+D1.L),D2> {} <MI 213e6 BEQ 0x213ea> {} <POP 213e8-213ea Naked> Σ0 ↓ <MI 213e8 ADDQ.B #0x1,D0> {} <POP 213ea-213f0 Naked> Σ0 ↓ →0x2143c ←0x213c6 <MI 213ea CMP.B (A6+0xa),D0> {} <MI 213ee BNE 0x2143c> {} <POP 213f0-2143c Naked> Σ0 ↓ <MI 213f0 MOVEA.L (A4+0x2c),A0> {} <MI 213f4 ADDQ.L #0x1,(A0)> {} <MI 213f6 MOVEA.L (A4+0x30),A0> {} <MI 213fa MOVE.B (A6+0x8),D0> {} <MI 213fe EXTB.W D0> {} <MI 21400 MOVE.B #0x01,(A0+D0.W)> {} <MI 21404 MOVEA.L (A4+0x28),A0> {} <MI 21408 MOVE.B D0,(A0)> {} <MI 2140a MULS.W #0x2a,D0> {} <MI 2140e LEA.L 0x209be,A0> {} <Blob 0x21412 [40] (A0+D0.W+#0x28)> Δ-40 {[«40»]} <POP 2141e-21420 StackAdj> Δ-4 {[«40»]|[-4-]} <Lit 0x21420> {[«40»]|[$$…]} <Pointer.sp 0x21420 4> Δ-4 <Const 0x21424 0x1.2> Δ-2 <Const 0x21426 0x28.2> Δ-2 <Call 0x2142a 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 21430-21432 StackAdj> Δ+8 <Call 0x21432 0x103e0> {[«40»]|[$$…]} WriteConsoleStringCrLf(str : String) <POP 21438-2143c StackAdj> Δ+44 {} <POP 2143c-21444 Epilogue> Σ0 ←0x213ea
@ 21444 <LVAR 0x00c 4(r)> <LVAR -0x002 @ 1(r)> <LVAR -0x003 @> <LVAR -0x005 @ 1(r)> <LVAR -0x006 @ 1(r)> <LVAR -0x007 @ 1(r)> <LVAR -0x008 @ 1(rw)> <LVAR -0x00a 1(r)> <LVAR -0x00e @> <LVAR -0x013 1(r)> <LVAR -0x014 @ 1(r)> <LVAR -0x015 1(r)> <LVAR -0x019 @> <LVAR -0x01d 1(r)> <LVAR -0x01e @ 1(r)> <LVAR -0x01f 1(w)> <LVAR -0x020 @ 1(w) 2(r)> <POP 21444-2197c Body> Δ+40 <POP 21444-2145a Prologue> Σ0 ↓ <POP 2145a-21470 RegCacheLoad> Σ0 ↓ <POP 21470-21484 Naked> Σ0 ↓ →0x21486 <MI 21470 MOVEA.L (A6+0xc),A0> {} <MI 21474 CLR.L (A0)> {} <MI 21476 MOVEQ.L #0x00,D7> {} <MI 21478 MOVE.W 0x22484,D0> {} <MI 2147e ANDI.W #0x4000,D0> {} <MI 21482 BEQ 0x21486> {} <POP 21484-21486 Naked> Σ0 ↓ <MI 21484 ADDQ.B #0x1,D7> {} <POP 21486-215a6 Naked> Σ0 ↓ →0x215c8 ←0x21470 <MI 21486 MOVE.W 0x22486,D0> {} <MI 2148c ANDI.W #0x3f00,D0> {} <MI 21490 LSR.W #0x8,D0> {} <MI 21492 MOVE.B D0,(A6-0x20)> {} <MI 21494 MOVE.W 0x22486,D0> {} <MI 2149a ANDI.W #0x00ff,D0> {} <MI 2149e MOVE.B D0,(A6-0x1f)> {} <MI 214a2 MOVE.W (A6-0x20),-(A7)> Δ-2 {[2, '(A6-0x20)']} <MI 214a4 CLR.B -(A7)> Δ-2 {[2, '(A6-0x20)']|[#0]} <Pointer.fp 0x214a6 <LVAR -0x014 @ 1(r)>> Δ-4 {[2, '(A6-0x20)']|[#0]|[@@-20]} <Pointer.fp 0x214aa <LVAR -0x003 @>> Δ-4 {[2, '(A6-0x20)']|[#0]|[@@-20]|[@@-3]} <Call 0x214ae 0x22078> {[2, '(A6-0x20)']|[#0]|[@@-20]|[@@-3]} exp_READ_WCS.TYP(Sw_2, Sw_1, &Sr_6, &Fr) <POP 214b4-214b6 StackAdj> Δ+10 {[2, '(A6-0x20)']} <MI 214b6 MOVE.W (A6-0x20),(A7)> {[2, '(A6-0x20)']} <MI 214b8 CLR.B -(A7)> Δ-2 {[2, '(A6-0x20)']|[#0]} <Pointer.fp 0x214ba <LVAR -0x01e @ 1(r)>> Δ-4 {[2, '(A6-0x20)']|[#0]|[@@-30]} <Pointer.fp 0x214be <LVAR -0x003 @>> Δ-4 {[2, '(A6-0x20)']|[#0]|[@@-30]|[@@-3]} <Call 0x214c2 0x220b4> {[2, '(A6-0x20)']|[#0]|[@@-30]|[@@-3]} exp_READ_WCS.VAL(Sw_2, Sw_1, &Sr_5, &Fr) <POP 214c8-214ca StackAdj> Δ+12 {} <MI 214ca MOVE.W 0x22488,D0> {} <MI 214d0 ANDI.W #0x3f00,D0> {} <MI 214d4 LSR.W #0x8,D0> {} <MI 214d6 MOVE.B D0,(A6-0x20)> {} <MI 214d8 MOVE.W 0x22488,D0> {} <MI 214de ANDI.W #0x00ff,D0> {} <MI 214e2 MOVE.B D0,(A6-0x1f)> {} <MI 214e6 MOVE.W (A6-0x20),-(A7)> Δ-2 {[2, '(A6-0x20)']} <MI 214e8 CLR.B -(A7)> Δ-2 {[2, '(A6-0x20)']|[#0]} <Pointer.fp 0x214ea <LVAR -0x00e @>> Δ-4 {[2, '(A6-0x20)']|[#0]|[@@-14]} <Pointer.fp 0x214ee <LVAR -0x003 @>> Δ-4 {[2, '(A6-0x20)']|[#0]|[@@-14]|[@@-3]} <Call 0x214f2 0x22078> {[2, '(A6-0x20)']|[#0]|[@@-14]|[@@-3]} exp_READ_WCS.TYP(Sw_2, Sw_1, &Sr_6, &Fr) <POP 214f8-214fa StackAdj> Δ+10 {[2, '(A6-0x20)']} <MI 214fa MOVE.W (A6-0x20),(A7)> {[2, '(A6-0x20)']} <MI 214fc CLR.B -(A7)> Δ-2 {[2, '(A6-0x20)']|[#0]} <Pointer.fp 0x214fe <LVAR -0x019 @>> Δ-4 {[2, '(A6-0x20)']|[#0]|[@@-25]} <Pointer.fp 0x21502 <LVAR -0x003 @>> Δ-4 {[2, '(A6-0x20)']|[#0]|[@@-25]|[@@-3]} <Call 0x21506 0x220b4> {[2, '(A6-0x20)']|[#0]|[@@-25]|[@@-3]} exp_READ_WCS.VAL(Sw_2, Sw_1, &Sr_5, &Fr) <POP 2150c-2150e StackAdj> Δ+10 {[2, '(A6-0x20)']} <MI 2150e CLR.B (A7)> {[2, '(A6-0x20)']} <Pointer.fp 0x21510 <LVAR -0x008 @ 1(rw)>> Δ-4 {[2, '(A6-0x20)']|[@@-8]} <Call 0x21512 0x22232> {[2, '(A6-0x20)']|[@@-8]} exp_READ_PAREG.IOC(Sw_1, &Sr_1) <POP 21518-2151a StackAdj> Δ+4 {[2, '(A6-0x20)']} <MI 2151a MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x2151c 0x4.4> Δ-4 {[-2-]|[##4]} <MI 21520 CLR.B -(A7)> Δ-2 {[-2-]|[##4]|[#0]} <Const 0x21522 0x2.2> Δ-2 {[-2-]|[##4]|[#0]|[#2]} <MI 21524 LEA.L (A6-0x20),A4> {[-2-]|[##4]|[#0]|[#2]} <Call 0x21526 0x213ae> {[-2-]|[##4]|[#0]|[#2]} <POP 21528-2152a StackAdj> Δ+8 {[-2-]} <MI 2152a MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x2152c 0x5.4> Δ-4 {[-2-]|[##5]} <MI 21530 CLR.B -(A7)> Δ-2 {[-2-]|[##5]|[#0]} <Const 0x21532 0x3.2> Δ-2 {[-2-]|[##5]|[#0]|[#3]} <MI 21534 LEA.L (A6-0x20),A4> {[-2-]|[##5]|[#0]|[#3]} <Call 0x21536 0x213ae> {[-2-]|[##5]|[#0]|[#3]} <POP 21538-2153a StackAdj> Δ+8 {[-2-]} <MI 2153a MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x2153c 0x6.4> Δ-4 {[-2-]|[##6]} <MI 21540 CLR.B -(A7)> Δ-2 {[-2-]|[##6]|[#0]} <Const 0x21542 0x1.2> Δ-2 {[-2-]|[##6]|[#0]|[#1]} <MI 21544 LEA.L (A6-0x20),A4> {[-2-]|[##6]|[#0]|[#1]} <Call 0x21546 0x213ae> {[-2-]|[##6]|[#0]|[#1]} <POP 21548-2154a StackAdj> Δ+8 {[-2-]} <MI 2154a MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x2154c 0x7.4> Δ-4 {[-2-]|[##7]} <MI 21550 CLR.B -(A7)> Δ-2 {[-2-]|[##7]|[#0]} <MI 21552 CLR.B -(A7)> Δ-2 {[-2-]|[##7]|[#0]|[#0]} <MI 21554 LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#0]|[#0]} <Call 0x21556 0x213ae> {[-2-]|[##7]|[#0]|[#0]} <POP 21558-2155a StackAdj> Δ+10 {} <Pointer.fp 0x2155a <LVAR -0x008 @ 1(rw)>> Δ-4 {[@@-8]} <Call 0x2155c 0x220d2> {[@@-8]} exp_READ_PARITY.VAL(&Sr_1) <POP 21562-21564 StackAdj> Δ+2 {[-2-]} <MI 21564 MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x21566 0x0.4> Δ-4 {[-2-]|[##0]} <MI 2156a CLR.B -(A7)> Δ-2 {[-2-]|[##0]|[#0]} <Const 0x2156c 0x4.2> Δ-2 {[-2-]|[##0]|[#0]|[#4]} <MI 21570 LEA.L (A6-0x20),A4> {[-2-]|[##0]|[#0]|[#4]} <Call 0x21572 0x213ae> {[-2-]|[##0]|[#0]|[#4]} <POP 21574-21576 StackAdj> Δ+8 {[-2-]} <MI 21576 MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x21578 0x1.4> Δ-4 {[-2-]|[##1]} <MI 2157c CLR.B -(A7)> Δ-2 {[-2-]|[##1]|[#0]} <Const 0x2157e 0x5.2> Δ-2 {[-2-]|[##1]|[#0]|[#5]} <MI 21582 LEA.L (A6-0x20),A4> {[-2-]|[##1]|[#0]|[#5]} <Call 0x21584 0x213ae> {[-2-]|[##1]|[#0]|[#5]} <POP 21586-21588 StackAdj> Δ+8 {[-2-]} <MI 21588 MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x2158a 0x3.4> Δ-4 {[-2-]|[##3]} <MI 2158e CLR.B -(A7)> Δ-2 {[-2-]|[##3]|[#0]} <Const 0x21590 0x6.2> Δ-2 {[-2-]|[##3]|[#0]|[#6]} <MI 21594 LEA.L (A6-0x20),A4> {[-2-]|[##3]|[#0]|[#6]} <Call 0x21596 0x213ae> {[-2-]|[##3]|[#0]|[#6]} <POP 21598-2159a StackAdj> Δ+10 {} <MI 2159a CLR.L D0> {} <MI 2159c MOVE.B (A6-0x1e),D0> {} <MI 215a0 AND.W #0x03,D0> {} <MI 215a2 CMP.W #0x01,D0> {} <MI 215a4 BNE 0x215c8> {} <POP 215a6-215b6 Naked> Σ0 ↓ →0x215c8 <MI 215a6 CLR.L D0> {} <MI 215a8 MOVE.B (A6-0x1d),D0> {} <MI 215ac ANDI.W #0x00f0,D0> {} <MI 215b0 CMPI.W #0x0060,D0> {} <MI 215b4 BNE 0x215c8> {} <POP 215b6-215ba Naked> Σ0 ↓ →0x215c8 <MI 215b6 TST.B D7> {} <MI 215b8 BNE 0x215c8> {} <POP 215ba-215c8 Naked> Σ0 Δ-10 →0x215d4 <MI 215ba MOVE.B (A6-0x8),-(A7)> Δ-2 {[2, '(A6-0x8)']} <Const 0x215bc 0x2.4> Δ-4 {[2, '(A6-0x8)']|[##2]} <MI 215c0 CLR.B -(A7)> Δ-2 {[2, '(A6-0x8)']|[##2]|[#0]} <Const 0x215c2 0x8.2> Δ-2 {[2, '(A6-0x8)']|[##2]|[#0]|[#8]} <MI 215c6 BRA 0x215d4> {[2, '(A6-0x8)']|[##2]|[#0]|[#8]} <POP 215c8-215d4 Naked> Σ0 Δ-10 ↓ ←0x21486 ←0x215a6 ←0x215b6 <MI 215c8 MOVE.B (A6-0x8),-(A7)> Δ-2 {[2, '(A6-0x8)']} <Const 0x215ca 0x2.4> Δ-4 {[2, '(A6-0x8)']|[##2]} <MI 215ce CLR.B -(A7)> Δ-2 {[2, '(A6-0x8)']|[##2]|[#0]} <Const 0x215d0 0x7.2> Δ-2 {[2, '(A6-0x8)']|[##2]|[#0]|[#7]} <POP 215d4-215e6 Naked> Σ-10 Δ+10 ↓ →0x2160e ←0x215ba <MI 215d4 LEA.L (A6-0x20),A4> {[-10-]} <Call 0x215d6 0x213ae> {[-10-]} <POP 215d8-215da StackAdj> Δ+10 {} <MI 215da CLR.L D0> {} <MI 215dc MOVE.B (A6-0x8),D0> {} <MI 215de MOVE.W D0,D1> {} <MI 215e0 ANDI.W #0x0004,D1> {} <MI 215e4 BEQ 0x2160e> {} <POP 215e6-215f0 Naked> Σ0 ↓ →0x215fe <MI 215e6 CLR.L D1> {} <MI 215e8 MOVE.B (A6-0x15),D1> {} <MI 215ec AND.W #0x02,D1> {} <MI 215ee BNE 0x215fe> {} <POP 215f0-215fe Naked> Σ0 Δ-10 →0x21608 <MI 215f0 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']} <Const 0x215f2 0x4.4> Δ-4 {[2, 'D0']|[##4]} <Const 0x215f6 0x1.2> Δ-2 {[2, 'D0']|[##4]|[#1]} <Const 0x215f8 0x9.2> Δ-2 {[2, 'D0']|[##4]|[#1]|[#9]} <MI 215fc BRA 0x21608> {[2, 'D0']|[##4]|[#1]|[#9]} <POP 215fe-21608 Naked> Σ0 Δ-10 ↓ ←0x215e6 <MI 215fe MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']} <Const 0x21600 0x4.4> Δ-4 {[2, 'D0']|[##4]} <Const 0x21604 0x1.2> Δ-2 {[2, 'D0']|[##4]|[#1]} <Const 0x21606 0xa.2> Δ-2 {[2, 'D0']|[##4]|[#1]|[#10]} <POP 21608-2160e Naked> Σ-10 Δ+10 ↓ ←0x215f0 <MI 21608 LEA.L (A6-0x20),A4> {[-10-]} <Call 0x2160a 0x213ae> {[-10-]} <POP 2160c-2160e StackAdj> Δ+10 {} <POP 2160e-21658 Naked> Σ0 ↓ →0x2167a ←0x215d4 <Pointer.fp 0x2160e <LVAR -0x008 @ 1(rw)>> Δ-4 {[@@-8]} <Call 0x21610 0x22096> {[@@-8]} exp_READ_PARITY.TYP(&Sr_1) <POP 21616-21618 StackAdj> Δ+2 {[-2-]} <MI 21618 MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x2161a 0x0.4> Δ-4 {[-2-]|[##0]} <MI 2161e CLR.B -(A7)> Δ-2 {[-2-]|[##0]|[#0]} <Const 0x21620 0xb.2> Δ-2 {[-2-]|[##0]|[#0]|[#11]} <MI 21624 LEA.L (A6-0x20),A4> {[-2-]|[##0]|[#0]|[#11]} <Call 0x21626 0x213ae> {[-2-]|[##0]|[#0]|[#11]} <POP 21628-2162a StackAdj> Δ+8 {[-2-]} <MI 2162a MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x2162c 0x1.4> Δ-4 {[-2-]|[##1]} <MI 21630 CLR.B -(A7)> Δ-2 {[-2-]|[##1]|[#0]} <Const 0x21632 0xc.2> Δ-2 {[-2-]|[##1]|[#0]|[#12]} <MI 21634 LEA.L (A6-0x20),A4> {[-2-]|[##1]|[#0]|[#12]} <Call 0x21636 0x213ae> {[-2-]|[##1]|[#0]|[#12]} <POP 21638-2163a StackAdj> Δ+8 {[-2-]} <MI 2163a MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x2163c 0x3.4> Δ-4 {[-2-]|[##3]} <MI 21640 CLR.B -(A7)> Δ-2 {[-2-]|[##3]|[#0]} <Const 0x21642 0xd.2> Δ-2 {[-2-]|[##3]|[#0]|[#13]} <MI 21646 LEA.L (A6-0x20),A4> {[-2-]|[##3]|[#0]|[#13]} <Call 0x21648 0x213ae> {[-2-]|[##3]|[#0]|[#13]} <POP 2164a-2164c StackAdj> Δ+10 {} <MI 2164c CLR.L D0> {} <MI 2164e MOVE.B (A6-0x14),D0> {} <MI 21652 AND.W #0x03,D0> {} <MI 21654 CMP.W #0x01,D0> {} <MI 21656 BNE 0x2167a> {} <POP 21658-21668 Naked> Σ0 ↓ →0x2167a <MI 21658 CLR.L D0> {} <MI 2165a MOVE.B (A6-0x13),D0> {} <MI 2165e ANDI.W #0x00f0,D0> {} <MI 21662 CMPI.W #0x0060,D0> {} <MI 21666 BNE 0x2167a> {} <POP 21668-2166c Naked> Σ0 ↓ →0x2167a <MI 21668 TST.B D7> {} <MI 2166a BNE 0x2167a> {} <POP 2166c-2167a Naked> Σ0 Δ-10 →0x21686 <MI 2166c MOVE.B (A6-0x8),-(A7)> Δ-2 {[2, '(A6-0x8)']} <Const 0x2166e 0x2.4> Δ-4 {[2, '(A6-0x8)']|[##2]} <MI 21672 CLR.B -(A7)> Δ-2 {[2, '(A6-0x8)']|[##2]|[#0]} <Const 0x21674 0xf.2> Δ-2 {[2, '(A6-0x8)']|[##2]|[#0]|[#15]} <MI 21678 BRA 0x21686> {[2, '(A6-0x8)']|[##2]|[#0]|[#15]} <POP 2167a-21686 Naked> Σ0 Δ-10 ↓ ←0x2160e ←0x21658 ←0x21668 <MI 2167a MOVE.B (A6-0x8),-(A7)> Δ-2 {[2, '(A6-0x8)']} <Const 0x2167c 0x2.4> Δ-4 {[2, '(A6-0x8)']|[##2]} <MI 21680 CLR.B -(A7)> Δ-2 {[2, '(A6-0x8)']|[##2]|[#0]} <Const 0x21682 0xe.2> Δ-2 {[2, '(A6-0x8)']|[##2]|[#0]|[#14]} <POP 21686-21696 Naked> Σ-10 Δ+10 ↓ →0x216c0 ←0x2166c <MI 21686 LEA.L (A6-0x20),A4> {[-10-]} <Call 0x21688 0x213ae> {[-10-]} <POP 2168a-2168c StackAdj> Δ+10 {} <MI 2168c CLR.L D0> {} <MI 2168e MOVE.B (A6-0x8),D0> {} <MI 21690 MOVE.W D0,D1> {} <MI 21692 AND.W #0x02,D1> {} <MI 21694 BEQ 0x216c0> {} <POP 21696-216a0 Naked> Σ0 ↓ →0x216ae <MI 21696 CLR.L D1> {} <MI 21698 MOVE.B (A6-0xa),D1> {} <MI 2169c AND.W #0x01,D1> {} <MI 2169e BNE 0x216ae> {} <POP 216a0-216ae Naked> Σ0 Δ-10 →0x216ba <MI 216a0 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']} <Const 0x216a2 0x5.4> Δ-4 {[2, 'D0']|[##5]} <Const 0x216a6 0x1.2> Δ-2 {[2, 'D0']|[##5]|[#1]} <Const 0x216a8 0x10.2> Δ-2 {[2, 'D0']|[##5]|[#1]|[#16]} <MI 216ac BRA 0x216ba> {[2, 'D0']|[##5]|[#1]|[#16]} <POP 216ae-216ba Naked> Σ0 Δ-10 ↓ ←0x21696 <MI 216ae MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']} <Const 0x216b0 0x5.4> Δ-4 {[2, 'D0']|[##5]} <Const 0x216b4 0x1.2> Δ-2 {[2, 'D0']|[##5]|[#1]} <Const 0x216b6 0x11.2> Δ-2 {[2, 'D0']|[##5]|[#1]|[#17]} <POP 216ba-216c0 Naked> Σ-10 Δ+10 ↓ ←0x216a0 <MI 216ba LEA.L (A6-0x20),A4> {[-10-]} <Call 0x216bc 0x213ae> {[-10-]} <POP 216be-216c0 StackAdj> Δ+10 {} <POP 216c0-217f0 Naked> Σ0 ↓ →0x21842 ←0x21686 <Pointer.fp 0x216c0 <LVAR -0x008 @ 1(rw)>> Δ-4 {[@@-8]} <Call 0x216c2 0x22056> {[@@-8]} exp_GET_MISC_ERRORS.SEQ(&Sr_1) <POP 216c8-216ca StackAdj> Δ+2 {[-2-]} <MI 216ca MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x216cc 0x3.4> Δ-4 {[-2-]|[##3]} <MI 216d0 CLR.B -(A7)> Δ-2 {[-2-]|[##3]|[#0]} <Const 0x216d2 0x12.2> Δ-2 {[-2-]|[##3]|[#0]|[#18]} <MI 216d6 LEA.L (A6-0x20),A4> {[-2-]|[##3]|[#0]|[#18]} <Call 0x216d8 0x213ae> {[-2-]|[##3]|[#0]|[#18]} <POP 216da-216dc StackAdj> Δ+8 {[-2-]} <MI 216dc MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x216de 0x4.4> Δ-4 {[-2-]|[##4]} <MI 216e2 CLR.B -(A7)> Δ-2 {[-2-]|[##4]|[#0]} <Const 0x216e4 0x13.2> Δ-2 {[-2-]|[##4]|[#0]|[#19]} <MI 216e8 LEA.L (A6-0x20),A4> {[-2-]|[##4]|[#0]|[#19]} <Call 0x216ea 0x213ae> {[-2-]|[##4]|[#0]|[#19]} <POP 216ec-216ee StackAdj> Δ+8 {[-2-]} <MI 216ee MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x216f0 0x5.4> Δ-4 {[-2-]|[##5]} <MI 216f4 CLR.B -(A7)> Δ-2 {[-2-]|[##5]|[#0]} <Const 0x216f6 0x14.2> Δ-2 {[-2-]|[##5]|[#0]|[#20]} <MI 216fa LEA.L (A6-0x20),A4> {[-2-]|[##5]|[#0]|[#20]} <Call 0x216fc 0x213ae> {[-2-]|[##5]|[#0]|[#20]} <POP 216fe-21700 StackAdj> Δ+8 {[-2-]} <MI 21700 MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x21702 0x6.4> Δ-4 {[-2-]|[##6]} <MI 21706 CLR.B -(A7)> Δ-2 {[-2-]|[##6]|[#0]} <Const 0x21708 0x15.2> Δ-2 {[-2-]|[##6]|[#0]|[#21]} <MI 2170c LEA.L (A6-0x20),A4> {[-2-]|[##6]|[#0]|[#21]} <Call 0x2170e 0x213ae> {[-2-]|[##6]|[#0]|[#21]} <POP 21710-21712 StackAdj> Δ+8 {[-2-]} <MI 21712 MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x21714 0x7.4> Δ-4 {[-2-]|[##7]} <MI 21718 CLR.B -(A7)> Δ-2 {[-2-]|[##7]|[#0]} <Const 0x2171a 0x16.2> Δ-2 {[-2-]|[##7]|[#0]|[#22]} <MI 2171e LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#0]|[#22]} <Call 0x21720 0x213ae> {[-2-]|[##7]|[#0]|[#22]} <POP 21722-21724 StackAdj> Δ+10 {} <Pointer.fp 0x21724 <LVAR -0x002 @ 1(r)>> Δ-4 {[@@-2]} <Call 0x21728 0x22040> {[@@-2]} exp_HALT.SEQ(&Fr) <POP 2172e-21730 StackAdj> Δ+4 {} <MI 21730 MOVE.B (A6-0x2),(A6-0x8)> {} <MI 21734 MOVE.B (A6-0x8),-(A7)> Δ-2 {[2, '(A6-0x8)']} <Const 0x21736 0x7.4> Δ-4 {[2, '(A6-0x8)']|[##7]} <Const 0x2173a 0x1.2> Δ-2 {[2, '(A6-0x8)']|[##7]|[#1]} <Const 0x2173c 0x17.2> Δ-2 {[2, '(A6-0x8)']|[##7]|[#1]|[#23]} <MI 21740 LEA.L (A6-0x20),A4> {[2, '(A6-0x8)']|[##7]|[#1]|[#23]} <Call 0x21742 0x213ae> {[2, '(A6-0x8)']|[##7]|[#1]|[#23]} <POP 21744-21746 StackAdj> Δ+8 {[2, '(A6-0x8)']} <MI 21746 CLR.B (A7)> {[2, '(A6-0x8)']} <Pointer.fp 0x21748 <LVAR -0x008 @ 1(rw)>> Δ-4 {[2, '(A6-0x8)']|[@@-8]} <Call 0x2174a 0x22022> {[2, '(A6-0x8)']|[@@-8]} exp_READ_PAREG.FIU(Sw_1, &Sr_1) <POP 21750-21752 StackAdj> Δ+4 {[2, '(A6-0x8)']} <MI 21752 MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x21754 0x0.4> Δ-4 {[-2-]|[##0]} <MI 21758 CLR.B -(A7)> Δ-2 {[-2-]|[##0]|[#0]} <Const 0x2175a 0x18.2> Δ-2 {[-2-]|[##0]|[#0]|[#24]} <MI 2175e LEA.L (A6-0x20),A4> {[-2-]|[##0]|[#0]|[#24]} <Call 0x21760 0x213ae> {[-2-]|[##0]|[#0]|[#24]} <POP 21762-21764 StackAdj> Δ+8 {[-2-]} <MI 21764 MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x21766 0x1.4> Δ-4 {[-2-]|[##1]} <MI 2176a CLR.B -(A7)> Δ-2 {[-2-]|[##1]|[#0]} <Const 0x2176c 0x19.2> Δ-2 {[-2-]|[##1]|[#0]|[#25]} <MI 21770 LEA.L (A6-0x20),A4> {[-2-]|[##1]|[#0]|[#25]} <Call 0x21772 0x213ae> {[-2-]|[##1]|[#0]|[#25]} <POP 21774-21776 StackAdj> Δ+8 {[-2-]} <MI 21776 MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x21778 0x2.4> Δ-4 {[-2-]|[##2]} <MI 2177c CLR.B -(A7)> Δ-2 {[-2-]|[##2]|[#0]} <Const 0x2177e 0x1a.2> Δ-2 {[-2-]|[##2]|[#0]|[#26]} <MI 21782 LEA.L (A6-0x20),A4> {[-2-]|[##2]|[#0]|[#26]} <Call 0x21784 0x213ae> {[-2-]|[##2]|[#0]|[#26]} <POP 21786-21788 StackAdj> Δ+8 {[-2-]} <MI 21788 MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x2178a 0x3.4> Δ-4 {[-2-]|[##3]} <MI 2178e CLR.B -(A7)> Δ-2 {[-2-]|[##3]|[#0]} <Const 0x21790 0x1b.2> Δ-2 {[-2-]|[##3]|[#0]|[#27]} <MI 21794 LEA.L (A6-0x20),A4> {[-2-]|[##3]|[#0]|[#27]} <Call 0x21796 0x213ae> {[-2-]|[##3]|[#0]|[#27]} <POP 21798-2179a StackAdj> Δ+8 {[-2-]} <MI 2179a MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x2179c 0x4.4> Δ-4 {[-2-]|[##4]} <MI 217a0 CLR.B -(A7)> Δ-2 {[-2-]|[##4]|[#0]} <Const 0x217a2 0x1c.2> Δ-2 {[-2-]|[##4]|[#0]|[#28]} <MI 217a6 LEA.L (A6-0x20),A4> {[-2-]|[##4]|[#0]|[#28]} <Call 0x217a8 0x213ae> {[-2-]|[##4]|[#0]|[#28]} <POP 217aa-217ac StackAdj> Δ+8 {[-2-]} <MI 217ac MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x217ae 0x5.4> Δ-4 {[-2-]|[##5]} <MI 217b2 CLR.B -(A7)> Δ-2 {[-2-]|[##5]|[#0]} <Const 0x217b4 0x1d.2> Δ-2 {[-2-]|[##5]|[#0]|[#29]} <MI 217b8 LEA.L (A6-0x20),A4> {[-2-]|[##5]|[#0]|[#29]} <Call 0x217ba 0x213ae> {[-2-]|[##5]|[#0]|[#29]} <POP 217bc-217be StackAdj> Δ+8 {[-2-]} <MI 217be MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x217c0 0x6.4> Δ-4 {[-2-]|[##6]} <MI 217c4 CLR.B -(A7)> Δ-2 {[-2-]|[##6]|[#0]} <Const 0x217c6 0x1e.2> Δ-2 {[-2-]|[##6]|[#0]|[#30]} <MI 217ca LEA.L (A6-0x20),A4> {[-2-]|[##6]|[#0]|[#30]} <Call 0x217cc 0x213ae> {[-2-]|[##6]|[#0]|[#30]} <POP 217ce-217d0 StackAdj> Δ+8 {[-2-]} <MI 217d0 MOVE.B (A6-0x8),(A7)> {[-2-]} <Const 0x217d2 0x7.4> Δ-4 {[-2-]|[##7]} <MI 217d6 CLR.B -(A7)> Δ-2 {[-2-]|[##7]|[#0]} <Const 0x217d8 0x1f.2> Δ-2 {[-2-]|[##7]|[#0]|[#31]} <MI 217dc LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#0]|[#31]} <Call 0x217de 0x213ae> {[-2-]|[##7]|[#0]|[#31]} <POP 217e0-217e2 StackAdj> Δ+6 {[-2-]|[-2-]} <POP 217e2-217e3 StackAdj> Δ+2 {[-2-]} <Const 0x217e3 0xc.2> Δ-2 {[-2-]|[#12]} <Call 0x217e4 0x104c0> {[-2-]|[#12]} HasBoard(diproc_addr: Byte) : Byte <POP 217ea-217ec StackAdj> Δ+2 {[-2-]} <MI 217ec TST.B (A7)+> Δ+2 {} <MI 217ee BEQ 0x21842> {} <POP 217f0-21842 Naked> Σ0 ↓ <Const 0x217f0 0xc.2> Δ-2 {[#12]} <Pointer.fp 0x217f2 <LVAR -0x007 @ 1(r)>> Δ-4 {[#12]|[@@-7]} <Pointer.fp 0x217f6 <LVAR -0x006 @ 1(r)>> Δ-4 {[#12]|[@@-7]|[@@-6]} <Pointer.fp 0x217fa <LVAR -0x005 @ 1(r)>> Δ-4 {[#12]|[@@-7]|[@@-6]|[@@-5]} <Call 0x217fe 0x22110> {[#12]|[@@-7]|[@@-6]|[@@-5]} <POP 21804-21806 StackAdj> Δ+12 {[#12]} <MI 21806 MOVE.B (A6-0x7),(A7)> {[-2-]} <Const 0x2180a 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x2180e 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x21810 0x20.2> Δ-2 {[-2-]|[##7]|[#1]|[#32]} <MI 21814 LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#32]} <Call 0x21816 0x213ae> {[-2-]|[##7]|[#1]|[#32]} <POP 21818-2181a StackAdj> Δ+8 {[-2-]} <MI 2181a MOVE.B (A6-0x6),(A7)> {[-2-]} <Const 0x2181e 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21822 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x21824 0x21.2> Δ-2 {[-2-]|[##7]|[#1]|[#33]} <MI 21828 LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#33]} <Call 0x2182a 0x213ae> {[-2-]|[##7]|[#1]|[#33]} <POP 2182c-2182e StackAdj> Δ+8 {[-2-]} <MI 2182e MOVE.B (A6-0x5),(A7)> {[-2-]} <Const 0x21832 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21836 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x21838 0x22.2> Δ-2 {[-2-]|[##7]|[#1]|[#34]} <MI 2183c LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#34]} <Call 0x2183e 0x213ae> {[-2-]|[##7]|[#1]|[#34]} <POP 21840-21842 StackAdj> Δ+10 {} <POP 21842-21854 Naked> Σ0 ↓ →0x218a8 ←0x216c0 <POP 21842-21844 StackAdj> Δ-2 {[-2-]} <Const 0x21844 0xd.2> Δ-2 {[-2-]|[#13]} <Call 0x21848 0x104c0> {[-2-]|[#13]} HasBoard(diproc_addr: Byte) : Byte <POP 2184e-21850 StackAdj> Δ+2 {[-2-]} <MI 21850 TST.B (A7)+> Δ+2 {} <MI 21852 BEQ 0x218a8> {} <POP 21854-218a8 Naked> Σ0 ↓ <Const 0x21854 0xd.2> Δ-2 {[#13]} <Pointer.fp 0x21858 <LVAR -0x007 @ 1(r)>> Δ-4 {[#13]|[@@-7]} <Pointer.fp 0x2185c <LVAR -0x006 @ 1(r)>> Δ-4 {[#13]|[@@-7]|[@@-6]} <Pointer.fp 0x21860 <LVAR -0x005 @ 1(r)>> Δ-4 {[#13]|[@@-7]|[@@-6]|[@@-5]} <Call 0x21864 0x22110> {[#13]|[@@-7]|[@@-6]|[@@-5]} <POP 2186a-2186c StackAdj> Δ+12 {[#13]} <MI 2186c MOVE.B (A6-0x7),(A7)> {[-2-]} <Const 0x21870 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21874 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x21876 0x23.2> Δ-2 {[-2-]|[##7]|[#1]|[#35]} <MI 2187a LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#35]} <Call 0x2187c 0x213ae> {[-2-]|[##7]|[#1]|[#35]} <POP 2187e-21880 StackAdj> Δ+8 {[-2-]} <MI 21880 MOVE.B (A6-0x6),(A7)> {[-2-]} <Const 0x21884 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21888 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x2188a 0x24.2> Δ-2 {[-2-]|[##7]|[#1]|[#36]} <MI 2188e LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#36]} <Call 0x21890 0x213ae> {[-2-]|[##7]|[#1]|[#36]} <POP 21892-21894 StackAdj> Δ+8 {[-2-]} <MI 21894 MOVE.B (A6-0x5),(A7)> {[-2-]} <Const 0x21898 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x2189c 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x2189e 0x25.2> Δ-2 {[-2-]|[##7]|[#1]|[#37]} <MI 218a2 LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#37]} <Call 0x218a4 0x213ae> {[-2-]|[##7]|[#1]|[#37]} <POP 218a6-218a8 StackAdj> Δ+10 {} <POP 218a8-218ba Naked> Σ0 ↓ →0x2190e ←0x21842 <POP 218a8-218aa StackAdj> Δ-2 {[-2-]} <Const 0x218aa 0xe.2> Δ-2 {[-2-]|[#14]} <Call 0x218ae 0x104c0> {[-2-]|[#14]} HasBoard(diproc_addr: Byte) : Byte <POP 218b4-218b6 StackAdj> Δ+2 {[-2-]} <MI 218b6 TST.B (A7)+> Δ+2 {} <MI 218b8 BEQ 0x2190e> {} <POP 218ba-2190e Naked> Σ0 ↓ <Const 0x218ba 0xe.2> Δ-2 {[#14]} <Pointer.fp 0x218be <LVAR -0x007 @ 1(r)>> Δ-4 {[#14]|[@@-7]} <Pointer.fp 0x218c2 <LVAR -0x006 @ 1(r)>> Δ-4 {[#14]|[@@-7]|[@@-6]} <Pointer.fp 0x218c6 <LVAR -0x005 @ 1(r)>> Δ-4 {[#14]|[@@-7]|[@@-6]|[@@-5]} <Call 0x218ca 0x22110> {[#14]|[@@-7]|[@@-6]|[@@-5]} <POP 218d0-218d2 StackAdj> Δ+12 {[#14]} <MI 218d2 MOVE.B (A6-0x7),(A7)> {[-2-]} <Const 0x218d6 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x218da 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x218dc 0x26.2> Δ-2 {[-2-]|[##7]|[#1]|[#38]} <MI 218e0 LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#38]} <Call 0x218e2 0x213ae> {[-2-]|[##7]|[#1]|[#38]} <POP 218e4-218e6 StackAdj> Δ+8 {[-2-]} <MI 218e6 MOVE.B (A6-0x6),(A7)> {[-2-]} <Const 0x218ea 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x218ee 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x218f0 0x27.2> Δ-2 {[-2-]|[##7]|[#1]|[#39]} <MI 218f4 LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#39]} <Call 0x218f6 0x213ae> {[-2-]|[##7]|[#1]|[#39]} <POP 218f8-218fa StackAdj> Δ+8 {[-2-]} <MI 218fa MOVE.B (A6-0x5),(A7)> {[-2-]} <Const 0x218fe 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21902 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x21904 0x28.2> Δ-2 {[-2-]|[##7]|[#1]|[#40]} <MI 21908 LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#40]} <Call 0x2190a 0x213ae> {[-2-]|[##7]|[#1]|[#40]} <POP 2190c-2190e StackAdj> Δ+10 {} <POP 2190e-21920 Naked> Σ0 ↓ →0x21974 ←0x218a8 <POP 2190e-21910 StackAdj> Δ-2 {[-2-]} <Const 0x21910 0xf.2> Δ-2 {[-2-]|[#15]} <Call 0x21914 0x104c0> {[-2-]|[#15]} HasBoard(diproc_addr: Byte) : Byte <POP 2191a-2191c StackAdj> Δ+2 {[-2-]} <MI 2191c TST.B (A7)+> Δ+2 {} <MI 2191e BEQ 0x21974> {} <POP 21920-21974 Naked> Σ0 ↓ <Const 0x21920 0xf.2> Δ-2 {[#15]} <Pointer.fp 0x21924 <LVAR -0x007 @ 1(r)>> Δ-4 {[#15]|[@@-7]} <Pointer.fp 0x21928 <LVAR -0x006 @ 1(r)>> Δ-4 {[#15]|[@@-7]|[@@-6]} <Pointer.fp 0x2192c <LVAR -0x005 @ 1(r)>> Δ-4 {[#15]|[@@-7]|[@@-6]|[@@-5]} <Call 0x21930 0x22110> {[#15]|[@@-7]|[@@-6]|[@@-5]} <POP 21936-21938 StackAdj> Δ+12 {[#15]} <MI 21938 MOVE.B (A6-0x7),(A7)> {[-2-]} <Const 0x2193c 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21940 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x21942 0x29.2> Δ-2 {[-2-]|[##7]|[#1]|[#41]} <MI 21946 LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#41]} <Call 0x21948 0x213ae> {[-2-]|[##7]|[#1]|[#41]} <POP 2194a-2194c StackAdj> Δ+8 {[-2-]} <MI 2194c MOVE.B (A6-0x6),(A7)> {[-2-]} <Const 0x21950 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21954 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x21956 0x2a.2> Δ-2 {[-2-]|[##7]|[#1]|[#42]} <MI 2195a LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#42]} <Call 0x2195c 0x213ae> {[-2-]|[##7]|[#1]|[#42]} <POP 2195e-21960 StackAdj> Δ+8 {[-2-]} <MI 21960 MOVE.B (A6-0x5),(A7)> {[-2-]} <Const 0x21964 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21968 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x2196a 0x2b.2> Δ-2 {[-2-]|[##7]|[#1]|[#43]} <MI 2196e LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#43]} <Call 0x21970 0x213ae> {[-2-]|[##7]|[#1]|[#43]} <POP 21972-21974 StackAdj> Δ+10 {} <POP 21974-2197c Epilogue> Σ0 ←0x2190e
@ 2197c <LVAR 0x012 1(rw)> <LVAR 0x00e 4(r)> <LVAR 0x00a 4(r)> <LVAR 0x008 1(r)> <POP 2197c-21a28 Body> <POP 2197c-21992 Prologue> Σ0 ↓ <POP 21992-219a0 RegCacheLoad> Σ0 ↓ <POP 219a0-219a2 Naked> Σ0 ↓ <MI 219a0 MOVEQ.L #0x01,D7> {} <POP 219a2-219b0 Naked> Σ0 ↓ →0x219a2 ←0x219a2 <MI 219a2 MOVE.B D7,D0> {} <MI 219a4 EXTB.W D0> {} <MI 219a6 CLR.B (A6+D0.W-#0xc)> {} <MI 219aa ADDQ.B #0x1,D7> {} <MI 219ac CMP.B #0x0b,D7> {} <MI 219ae BLE 0x219a2> {} <POP 219b0-219b6 Naked> Σ0 ↓ →0x219ba <MI 219b0 TST.L (A6+0xa)> {} <MI 219b4 BNE 0x219ba> {} <POP 219b6-219ba Naked> Σ0 →0x21a20 <MI 219b6 CLR.B (A6+0x12)> {} <MI 219b8 BRA 0x21a20> {} <POP 219ba-219c2 Naked> Σ0 ↓ →0x219d2 ←0x219b0 <MI 219ba MOVE.L (A6+0xa),D0> {} <MI 219be CMP.L #0x01,D0> {} <MI 219c0 BNE 0x219d2> {} <POP 219c2-219d2 Naked> Σ0 →0x21a20 <MI 219c2 MOVE.B (A6+0x8),D0> {} <MI 219c6 EXTB.W D0> {} <MI 219c8 MULS.W #0x2a,D0> {} <MI 219ca LEA.L 0x209be,A0> {} <MI 219cc MOVE.B (A0+D0.W+#0x29),(A6+0x12)> {} <MI 219d0 BRA 0x21a20> {} <POP 219d2-219d4 Naked> Σ0 ↓ ←0x219ba <MI 219d2 MOVEQ.L #0x04,D6> {} <POP 219d4-21a0a Naked> Σ0 ↓ →0x219d4 ←0x219d4 <MI 219d4 MOVE.B D6,D0> {} <MI 219d6 EXTB.W D0> {} <MI 219d8 MULS.W #0x2a,D0> {} <MI 219da LEA.L 0x209be,A0> {} <MI 219dc MOVE.B (A0+D0.W+#0x29),D1> {} <MI 219e0 EXTB.W D1> {} <MI 219e2 LEA.L 0x209be,A0> {} <MI 219e4 MOVE.B (A0+D0.W+#0x29),D2> {} <MI 219e8 EXTB.W D2> {} <MI 219ea MOVEA.L (A6+0xe),A0> {} <MI 219ee MOVE.B D6,D0> {} <MI 219f0 EXTB.W D0> {} <MI 219f2 MOVE.B (A6+D2.W-#0xc),D2> {} <MI 219f6 OR.B (A0+D0.W),D2> {} <MI 219fa EXTB.W D2> {} <POP 0x219fc LimitCheck 0x0 ≤ D2 ≤ 0x1> {} <MI 219fe MOVE.B D2,(A6+D1.W-#0xc)> {} <MI 21a02 ADDQ.B #0x1,D6> {} <MI 21a04 CMPI.B #0x2b,D6> {} <MI 21a08 BLE 0x219d4> {} <POP 21a0a-21a0c Naked> Σ0 ↓ <MI 21a0a MOVEQ.L #0x01,D7> {} <POP 21a0c-21a16 Naked> Σ0 ↓ →0x21a1a ←0x21a1a <MI 21a0c MOVE.B D7,D0> {} <MI 21a0e EXTB.W D0> {} <MI 21a10 TST.B (A6+D0.W-#0xc)> {} <MI 21a14 BEQ 0x21a1a> {} <POP 21a16-21a1a Naked> Σ0 →0x21a20 <MI 21a16 MOVE.B D7,(A6+0x12)> {} <MI 21a18 BRA 0x21a20> {} <POP 21a1a-21a20 Naked> Σ0 ↓ →0x21a0c ←0x21a0c <MI 21a1a ADDQ.B #0x1,D7> {} <MI 21a1c CMP.B #0x0b,D7> {} <MI 21a1e BLE 0x21a0c> {} <POP 21a20-21a28 Epilogue> Σ0 ←0x219b6 ←0x219c2 ←0x21a16
@ 21a28 <LVAR 0x00a 4(w)> <LVAR 0x008 1(r)> <POP 21a28-21a7a Body> <POP 21a28-21a3e Prologue> Σ0 ↓ <POP 21a3e-21a40 RegCacheLoad> Σ0 ↓ <POP 21a40-21a72 Naked> Σ0 ↓ <MI 21a40 MOVE.B (A6+0x8),D0> {} <MI 21a44 EXTB.W D0> {} <MI 21a46 MULS.W #0x1e,D0> {} <MI 21a48 LEA.L 0x21106,A0> {} <Blob 0x21a4c [30] (A0+D0.W+#0x1e)> Δ-30 {[«30»]} <POP 21a58-21a5a StackAdj> Δ-4 {[«30»]|[-4-]} <Lit 0x21a5a> {[«30»]|[$$…]} <Pointer.sp 0x21a5a 4> Δ-4 <Const 0x21a5e 0x1.2> Δ-2 <Const 0x21a62 0x1e.2> Δ-2 <Call 0x21a64 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 21a6a-21a6c StackAdj> Δ+8 <MI 21a6c MOVE.L (A7)+,(A6+0xa)> Δ+4 {[«30»]} <POP 21a70-21a72 StackAdj> Δ+30 {} <POP 21a72-21a7a Epilogue> Σ0
@ 21a7a <LVAR 0x03a 4(w)> <LVAR 0x036 4(w)> <LVAR 0x008 1(r)> <LVAR -0x00a 4(r)> <LVAR -0x00e 4(r)> <POP 21a7a-21b40 Body> <POP 21a7a-21a90 Prologue> Σ0 ↓ <POP 21a90-21a96 RegCacheLoad> Σ0 ↓ <POP 21a96-21a98 Naked> Σ0 ↓ <MI 21a96 MOVEQ.L #0x00,D7> {} <POP 21a98-21aa8 Naked> Σ0 ↓ →0x21a98 ←0x21a98 <POP 0x21a98 LimitCheck 0x0 ≤ D7 ≤ 0x7> {} <MI 21a9e CLR.B (A6+D7.L-#0xe)> {} <MI 21aa2 ADDQ.L #0x1,D7> {} <MI 21aa4 CMP.L #0x07,D7> {} <MI 21aa6 BLE 0x21a98> {} <POP 21aa8-21aae Naked> Σ0 ↓ <MI 21aa8 MOVEQ.L #0x00,D7> {} <MI 21aaa MOVEQ.L #0x0f,D6> {} <MI 21aac MOVEQ.L #0x04,D5> {} <POP 21aae-21ab8 Naked> Σ0 ↓ →0x21b24 ←0x21b24 <MI 21aae MOVE.B D5,D0> {} <MI 21ab0 EXTB.W D0> {} <MI 21ab2 TST.B (A6+D0.W+#0xa)> {} <MI 21ab6 BEQ 0x21b24> {} <POP 21ab8-21acc Naked> Σ0 ↓ →0x21b24 <MI 21ab8 MOVE.B D5,D0> {} <MI 21aba EXTB.W D0> {} <MI 21abc MULS.W #0x2a,D0> {} <MI 21ac0 LEA.L 0x209be,A0> {} <MI 21ac2 MOVE.B (A6+0x8),D1> {} <MI 21ac6 CMP.B (A0+D0.W+#0x29),D1> {} <MI 21aca BNE 0x21b24> {} <POP 21acc-21ad4 Naked> Σ0 ↓ →0x21b24 <MI 21acc LEA.L 0x209be,A0> {} <MI 21ace CMP.B (A0+D0.W+#0x28),D6> {} <MI 21ad2 BEQ 0x21b24> {} <POP 21ad4-21ad8 Naked> Σ0 ↓ →0x21b0e <MI 21ad4 CMP.L #0x07,D7> {} <MI 21ad6 BLE 0x21b0e> {} <POP 21ad8-21b0e Naked> Σ0 ↓ <Blob 0x21ad8 [24] @> Δ-24 {[«24""»]} <Const 0x21aea 0xe.2> Δ-2 {[«24""»]|[#14]} <POP 21aee-21af0 StackAdj> Δ-4 {[«24""»]|[#14]|[-4-]} <Lit 0x21af0 23> {[«24""»]|[#14]|[$$Too many boards failed.]} <Call 0x21b04 0x103b8> {[«24""»]|[#14]|[$$Too many boards failed.]} PopProgram(status : Byte; msg : String) <POP 21b0a-21b0e StackAdj> Δ+30 {} <POP 21b0e-21b24 Naked> Σ0 ↓ ←0x21ad4 <POP 0x21b0e LimitCheck 0x0 ≤ D7 ≤ 0x7> {} <MI 21b14 LEA.L 0x209be,A0> {} <MI 21b16 MOVE.B (A0+D0.W+#0x28),(A6+D7.L-#0xe)> {} <MI 21b1c LEA.L 0x209be,A0> {} <MI 21b1e MOVE.B (A0+D0.W+#0x28),D6> {} <MI 21b22 ADDQ.L #0x1,D7> {} <POP 21b24-21b2c Naked> Σ0 ↓ →0x21aae ←0x21aae ←0x21ab8 ←0x21acc <MI 21b24 ADDQ.B #0x1,D5> {} <MI 21b26 CMPI.B #0x2b,D5> {} <MI 21b2a BLE 0x21aae> {} <POP 21b2c-21b38 Naked> Σ0 ↓ <MI 21b2c MOVE.L (A6-0xe),(A6+0x36)> {} <MI 21b32 MOVE.L (A6-0xa),(A6+0x3a)> {} <POP 21b38-21b40 Epilogue> Σ0
@ 21b40 <LVAR 0x024 1(r)> <LVAR 0x020 4(r)> <LVAR 0x01c 4(r)> <LVAR 0x018 4(r)> <LVAR 0x014 4(r)> <LVAR 0x010 4(r)> <LVAR 0x00c 4(r)> <LVAR 0x008 4(r)> <LVAR -0x004 @ 1(r)> <POP 21b40-21cc6 Body> <POP 21b40-21b56 Prologue> Σ0 ↓ <POP 21b56-21b60 RegCacheLoad> Σ0 ↓ <POP 21b60-21b6a Naked> Σ0 ↓ →0x21b76 <MI 21b60 MOVE.B (A6+0x24),D0> {} <MI 21b64 CMPI.B #0x03,D0> {} <MI 21b68 BEQ 0x21b76> {} <POP 21b6a-21b70 Naked> Σ0 ↓ →0x21b76 <MI 21b6a CMPI.B #0x04,D0> {} <MI 21b6e BEQ 0x21b76> {} <POP 21b70-21b76 Naked> Σ0 ↓ →0x21b9a <MI 21b70 CMPI.B #0x05,D0> {} <MI 21b74 BNE 0x21b9a> {} <POP 21b76-21b9a Naked> Σ0 →0x21b9c ←0x21b60 ←0x21b6a <Blob 0x21b76 [2] @> Δ-2 {[«2""»]} <Blob 0x21b7a [2] @> Δ-2 {[«2""»]|[«2""»]} <Blob 0x21b7e [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]} <POP 21b82-21b84 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]} <Lit 0x21b84 6> {[«2""»]|[«2""»]|[«2""»]|[$$EMWCSP]} <MI 21b94 MOVEA.L (A7)+,A4> Δ+4 {[«2""»]|[«2""»]|[«2""»]} <POP 21b96-21b98 StackAdj> Δ+6 {} <MI 21b98 BRA 0x21b9c> {} <POP 21b9a-21b9c Naked> Σ0 ↓ ←0x21b70 <MI 21b9a MOVEA.W #0x01,A4> {} <POP 21b9c-21ba2 Naked> Σ0 ↓ →0x21ba4 ←0x21b76 <MI 21b9c MOVEQ.L #0x00,D7> {} <MI 21b9e CMPA.W #0x01,A4> {} <MI 21ba0 BEQ 0x21ba4> {} <POP 21ba2-21ba4 Naked> Σ0 ↓ <MI 21ba2 ADDQ.B #0x1,D7> {} <POP 21ba4-21baa Naked> Σ0 ↓ →0x21c66 ←0x21b9c <MI 21ba4 TST.B D7> {} <MI 21ba6 BEQ 0x21c66> {} <POP 21baa-21bfa Naked> Σ0 ↓ →0x21c08 <Call 0x21baa 0x10538> {} IPC_Init(void) <MI 21bb0 EXTB.W D0> {} <MI 21bb2 EXTW.L D0> {} <MI 21bb4 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']} <Call 0x21bb6 0x1050e> {[4, 'D0']} IPC_PutLong(a : L) <MI 21bbc MOVE.L (A6+0x20),(A7)> {[4, '(A6+0x20)']} <MI 21bc0 MOVE.L (A6+0x1c),-(A7)> Δ-4 {[4, '(A6+0x20)']|[4, '(A6+0x1c)']} <MI 21bc4 PEA.L (A7)> Δ-4 {[4, '(A6+0x20)']|[4, '(A6+0x1c)']|[4, '^(A7)']} <Const 0x21bc6 0x0.4> Δ-4 {[4, '(A6+0x20)']|[4, '(A6+0x1c)']|[4, '^(A7)']|[##0]} <Const 0x21bc8 0x7.4> Δ-4 {[4, '(A6+0x20)']|[4, '(A6+0x1c)']|[4, '^(A7)']|[##0]|[##7]} <Call 0x21bcc 0x104fc> {[4, '(A6+0x20)']|[4, '(A6+0x1c)']|[4, '^(A7)']|[##0]|[##7]} IPC_PutVar(src : Pointer; length : Long ; type : Long) <POP 21bd2-21bd6 StackAdj> Δ+20 {} <Call 0x21bd6 0x10514> {} IPC_PutEnd(void) <MI 21bdc MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']} <Const 0x21bde 0x1.4> Δ-4 {[4, 'A4']|[##1]} <Const 0x21be2 0x2.2> Δ-2 {[4, 'A4']|[##1]|[#2]} <Pointer.fp 0x21be6 <LVAR -0x004 @ 1(r)>> Δ-4 {[4, 'A4']|[##1]|[#2]|[@@-4]} <Call 0x21bea 0x103b0> {[4, 'A4']|[##1]|[#2]|[@@-4]} PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) <POP 21bf0-21bf4 StackAdj> Δ+14 {} <MI 21bf4 TST.B (A6-0x4)> {} <MI 21bf8 BEQ 0x21c08> {} <POP 21bfa-21c08 Naked> Σ0 ↓ <Const 0x21bfa 0x6.2> Δ-2 {[#6]} <Const 0x21bfc 0x1.4> Δ-4 {[#6]|[##1]} <Call 0x21c00 0x103b8> {[#6]|[##1]} PopProgram(status : Byte; msg : String) <POP 21c06-21c08 StackAdj> Δ+6 {} <POP 21c08-21c66 Naked> Σ0 →0x21cbe ←0x21baa <Call 0x21c08 0x10538> {} IPC_Init(void) <MI 21c0e MOVEA.L (A6+0x18),A0> {} <MI 21c12 PEA.L (A0)> Δ-4 {[4, '^(A0)']} <Call 0x21c14 0x10526> {[4, '^(A0)']} IPC_GetBool() : Bool <POP 21c1a-21c1c StackAdj> Δ+4 {} <MI 21c1c MOVEA.L (A6+0x14),A0> {} <MI 21c20 PEA.L (A0)> Δ-4 {[4, '^(A0)']} <Call 0x21c22 0x1052c> {[4, '^(A0)']} IPC_GetString(VAR retval : String) <POP 21c28-21c2a StackAdj> Δ+4 {} <MI 21c2a MOVEA.L (A6+0x10),A0> {} <MI 21c2e PEA.L (A0)> Δ-4 {[4, '^(A0)']} <Call 0x21c30 0x1052c> {[4, '^(A0)']} IPC_GetString(VAR retval : String) <POP 21c36-21c38 StackAdj> Δ+4 {} <MI 21c38 MOVEA.L (A6+0xc),A0> {} <MI 21c3c PEA.L (A0)> Δ-4 {[4, '^(A0)']} <Const 0x21c3e 0x0.4> Δ-4 {[4, '^(A0)']|[##0]} <Const 0x21c40 0x0.4> Δ-4 {[4, '^(A0)']|[##0]|[##0]} <Call 0x21c42 0x10520> {[4, '^(A0)']|[##0]|[##0]} IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) <POP 21c48-21c4a StackAdj> Δ+12 {} <MI 21c4a MOVEA.L (A6+0x8),A0> {} <MI 21c4e PEA.L (A0)> Δ-4 {[4, '^(A0)']} <Const 0x21c50 0x0.4> Δ-4 {[4, '^(A0)']|[##0]} <Const 0x21c52 0x7.4> Δ-4 {[4, '^(A0)']|[##0]|[##7]} <Call 0x21c56 0x10520> {[4, '^(A0)']|[##0]|[##7]} IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) <POP 21c5c-21c5e StackAdj> Δ+12 {} <Call 0x21c5e 0x1051a> {} IPC_GetEnd(void) <MI 21c64 BRA 0x21cbe> {} <POP 21c66-21cbe Naked> Σ0 ↓ ←0x21ba4 <MI 21c66 MOVEA.L (A6+0x18),A0> {} <MI 21c6a MOVE.B #0x01,(A0)> {} <MI 21c6c MOVEA.L (A6+0x14),A0> {} <Blob 0x21c70 [2] @> Δ-2 {[«2""»]} <Blob 0x21c74 [2] @> Δ-2 {[«2""»]|[«2""»]} <Blob 0x21c78 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]} <POP 21c7c-21c7e StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]} <Lit 0x21c7e 6> {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]} <MI 21c8e MOVE.L (A7)+,(A0)> Δ+4 {[«2""»]|[«2""»]|[«2""»]} <POP 21c90-21c92 StackAdj> Δ+6 {} <MI 21c92 MOVEA.L (A6+0x10),A0> {} <POP 21c96-21c98 StackAdj> Δ-4 {[-4-]} <MI 21c98 MOVE.B D0,-(A7)> Δ-2 {[-4-]|[2, 'D0']} <Call 0x21c9a 0x21a28> {[-4-]|[2, 'D0']} <POP 21c9e-21ca0 StackAdj> Δ+2 {[-4-]} <MI 21ca0 MOVE.L (A7)+,(A0)> Δ+4 {} <MI 21ca2 MOVE.L (A0),-(A7)> Δ-4 {[4, '(A0)']} <Const 0x21ca4 0x5c.2> Δ-2 {[4, '(A0)']|[#92]} <Call 0x21ca8 0x102c0> {[4, '(A0)']|[#92]} AppendChar(MOD b : String; a : char) <POP 21cae-21cb0 StackAdj> Δ+6 {} <MI 21cb0 MOVEA.L (A6+0xc),A0> {} <MI 21cb4 MOVE.B #0x01,(A0)> {} <MI 21cb6 MOVEA.L (A6+0x8),A0> {} <MI 21cba MOVE.B #0x27,(A0)> {} <POP 21cbe-21cc6 Epilogue> Σ0 ←0x21c08
@ 21cc6 START <POP 21cc6--0001 Body> Δ+2 <POP 21cc6-21cd0 Prologue> Σ0 <POP 21cd0-21cec RegCacheLoad> Σ0 ↓ <POP 21cec-21d28 Naked> Σ0 ↓ <Call 0x21cec 0x10398> {} FSCALL_10398 <Const 0x21cf2 0x2250a.4> Δ-4 {[##140554]} <Const 0x21cf8 0x2250b.4> Δ-4 {[##140554]|[##140555]} <Call 0x21cfe 0x10544> {[##140554]|[##140555]} IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool) <POP 21d04-21d06 StackAdj> Δ+8 {} <Const 0x21d06 0x0.4> Δ-4 {[##0]} <Call 0x21d0a 0x104d8> {[##0]} ExpInit(a : Long) <POP 21d10-21d12 StackAdj> Δ+2 {[-2-]} <POP 21d12-21d13 StackAdj> Δ+2 {} <Blob 0x21d13 [2] 0x2250b> Δ-2 {[«2»]} <Call 0x21d18 0x104d2> {[«2»]} SetExpInitDone(a : Byte) <POP 21d1e-21d20 StackAdj> Δ+2 {} <Call 0x21d20 0x105c8> {} And_fc0c_7f(void) <MI 21d26 MOVEQ.L #0x04,D0> {} <POP 21d28-21d48 Naked> Σ0 ↓ →0x21d28 ←0x21d28 <MI 21d28 MOVE.B D0,0x22510> {} <MI 21d2e MOVE.B D0,D1> {} <MI 21d30 EXTB.W D1> {} <MI 21d32 MOVE.W D1,-(A7)> Δ-2 {[2, 'D1']} <MI 21d34 LEA.L 0x2247c,A0> {[2, 'D1']} <MI 21d36 LEA.L (A0+D1.W),A0> {[2, 'D1']} <MI 21d3a CLR.B (A0+0xa7)> {[2, 'D1']} <MI 21d3e MOVE.W (A7)+,D0> Δ+2 {} <MI 21d40 ADDQ.W #0x1,D0> {} <MI 21d42 CMPI.W #0x002b,D0> {} <MI 21d46 BLE 0x21d28> {} <POP 21d48-21d4a Naked> Σ0 ↓ <MI 21d48 MOVEQ.L #0x00,D0> {} <POP 21d4a-21d66 Naked> Σ0 ↓ →0x21d4a ←0x21d4a <MI 21d4a MOVE.L D0,0x22506> {} <POP 0x21d50 LimitCheck 0x0 ≤ D0 ≤ 0x7> {} <MI 21d56 LEA.L 0x2247c,A0> {} <MI 21d58 LEA.L (A0+D0.L),A0> {} <MI 21d5c CLR.B (A0+0x9f)> {} <MI 21d60 ADDQ.L #0x1,D0> {} <MI 21d62 CMP.L #0x07,D0> {} <MI 21d64 BLE 0x21d4a> {} <POP 21d66-21d8e Naked> Σ0 ↓ <Call 0x21d66 0x2126e> {} <Blob 0x21d6a [4] @> Δ-4 {[«4""»]} <Blob 0x21d6e [4] @> Δ-4 {[«4""»]|[«4""»]} <Blob 0x21d72 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]} <POP 21d76-21d78 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]} <Lit 0x21d78 12> {[«4""»]|[«4""»]|[«4""»]|[$$uaddr trace:]} <Call 0x21d86 0x103d8> {[«4""»]|[«4""»]|[«4""»]|[$$uaddr trace:]} WriteConsoleString(str : String) <POP 21d88-21d8c StackAdj> Δ+16 {} <MI 21d8c MOVEQ.L #0x04,D0> {} <POP 21d8e-21dd6 Naked> Σ0 ↓ →0x21ddc ←0x21de0 <MI 21d8e MOVE.L D0,0x22506> {} <Blob 0x21d94 [2] @> Δ-2 {[«2""»]} <POP 21d98-21d9a StackAdj> Δ-8 {[«2""»]|[-8-]} <Lit 0x21d9a 2> {[«2""»]|[-4-]|[$$ _]} <MI 21da4 MOVE.L D0,(A7)> {[«2""»]|[-4-]|[4, 'D0']} <POP 21da2-21da4 StackAdj> Δ-8 {[«2""»]|[-4-]|[4, 'D0']|[-8-]} <Call 0x21da6 0x102e4> {[«2""»]|[-4-]|[4, 'D0']|[-8-]} Long2String(a : Long) : String <POP 21dac-21dae StackAdj> Δ+4 {[«2""»]|[-4-]|[4, 'D0']|[-4-]} <Call 0x21dae 0x102d0> {[«2""»]|[-4-]|[4, 'D0']|[-4-]} StringCat2(a, b : String) : String <POP 21db4-21db6 StackAdj> Δ+8 {[«2""»]|[-4-]} <Call 0x21db6 0x103d8> {[«2""»]|[-4-]} WriteConsoleString(str : String) <POP 21db8-21dba StackAdj> Δ+6 {} <MI 21dba MOVE.L D0,D1> {} <MI 21dbc SUBQ.L #0x1,D1> {} <POP 0x21dbe LimitCheck 0x0 ≤ D1 ≤ 0x3f> {} <MI 21dc8 ASL.L #0x1,D1> {} <MI 21dca LEA.L 0x2247c,A0> {} <MI 21dcc MOVE.W (A0+D1.L+#0x8),D1> {} <MI 21dd0 ANDI.W #0x8000,D1> {} <MI 21dd4 BNE 0x21ddc> {} <POP 21dd6-21ddc Naked> Σ0 Δ-2 →0x21de0 <Blob 0x21dd6 [2] @> Δ-2 {[«2""»]} <MI 21dda BRA 0x21de0> {[«2""»]} <POP 21ddc-21de0 Naked> Σ0 Δ-2 ↓ ←0x21d8e <Blob 0x21ddc [2] @> Δ-2 {[«2""»]} <POP 21de0-21e2a Naked> Σ-2 Δ+2 ↓ →0x21d8e ←0x21dd6 <POP 21de0-21de2 StackAdj> Δ-4 {[-6-]} <Lit 0x21de2> {[-2-]|[$$…]} <Pointer.sp 0x21de2 4> Δ-4 <Const 0x21de6 0x1.2> Δ-2 <Const 0x21de8 0x2.2> Δ-2 <Call 0x21dea 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 21dec-21dee StackAdj> Δ+8 <Call 0x21dee 0x103d8> {[-2-]|[$$…]} WriteConsoleString(str : String) <POP 21df0-21df2 StackAdj> Δ+6 {} <POP 21df2-21df4 StackAdj> Δ-4 {[-4-]} <POP 0x21df4 LimitCheck 0x0 ≤ D0 ≤ 0x3f> {[-4-]} <MI 21dfe MOVE.L D0,D1> {[-4-]} <MI 21e00 ASL.L #0x1,D1> {[-4-]} <MI 21e02 LEA.L 0x2247c,A0> {[-4-]} <MI 21e04 MOVE.W (A0+D1.L+#0x8),D1> {[-4-]} <MI 21e08 ANDI.W #0x3fff,D1> {[-4-]} <MI 21e0c CLR.L D2> {[-4-]} <MI 21e0e MOVE.W D1,D2> {[-4-]} <MI 21e10 MOVE.L D2,-(A7)> Δ-4 {[-4-]|[4, 'D2']} <Const 0x21e12 0x4.4> Δ-4 {[-4-]|[4, 'D2']|[##4]} <Call 0x21e16 0x102e8> {[-4-]|[4, 'D2']|[##4]} Long2HexString(val : Long; ndig : Long) : String <POP 21e1c-21e1e StackAdj> Δ+8 {[-4-]} <Call 0x21e1e 0x103d8> {[-4-]} WriteConsoleString(str : String) <POP 21e20-21e22 StackAdj> Δ+4 {} <MI 21e22 SUBQ.L #0x1,D0> {} <MI 21e24 CMP.L #0x01,D0> {} <MI 21e26 BGE 0x21d8e> {} <POP 21e2a-21e70 Naked> Σ0 ↓ →0x21f10 <Blob 0x21e2a [20] @> Δ-20 {[«20""»]} <POP 21e3c-21e3e StackAdj> Δ-4 {[«20""»]|[-4-]} <Lit 0x21e3e 19> {[«20""»]|[$$CURRENT.M200_CONFIG]} <Const 0x21e4c 0x3.4> Δ-4 {[«20""»]|[$$CURRENT.M200_CONFIG]|[##3]} <Const 0x21e50 0x2255c.4> Δ-4 {[«20""»]|[$$CURRENT.M200_CONFIG]|[##3]|[##140636]} <Const 0x21e56 0x22504.4> Δ-4 {[«20""»]|[$$CURRENT.M200_CONFIG]|[##3]|[##140636]|[##140548]} <Call 0x21e5c 0x1056e> {[«20""»]|[$$CURRENT.M200_CONFIG]|[##3]|[##140636]|[##140548]} Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool) <POP 21e62-21e66 StackAdj> Δ+36 {} <MI 21e66 TST.B 0x22504> {} <MI 21e6c BEQ 0x21f10> {} <POP 21e70-21f10 Naked> Σ0 →0x21f3c <Blob 0x21e70 [30] 0x2258f> Δ-30 {[«30»]} <POP 21e82-21e84 StackAdj> Δ-4 {[«30»]|[-4-]} <Lit 0x21e84> {[«30»]|[$$…]} <Pointer.sp 0x21e84 4> Δ-4 <Const 0x21e88 0x1.2> Δ-2 <Const 0x21e8a 0x1e.2> Δ-2 <Call 0x21e8c 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 21e8e-21e90 StackAdj> Δ+8 <MI 21e90 MOVE.L (A7)+,0x226ee> Δ+4 {[«30»]} <POP 21e96-21e98 StackAdj> Δ+30 {} <MI 21e98 MOVEA.L 0x226ee,A0> {} <Blob 0x21e9e [2] @> Δ-2 {[«2""»]} <POP 21ea2-21ea4 StackAdj> Δ-4 {[«2""»]|[-4-]} <Blob 0x21ea4 [4] 0x226ee> Δ-4 {[«2""»]|[-4-]|[«4»]} <POP 21eaa-21eac StackAdj> Δ-4 {[«2""»]|[-4-]|[«4»]|[-4-]} <Lit 0x21eac 2> {[«2""»]|[-4-]|[«4»]|[$$. ]} <Call 0x21eb8 0x10300> {[«2""»]|[-4-]|[«4»]|[$$. ]} FSCALL_10300 <POP 21ebe-21ec0 StackAdj> Δ+8 {[«2""»]|[-4-]} <MI 21ec0 MOVE.L (A7)+,D0> Δ+4 {[«2""»]} <POP 0x21ec2 LimitCheck -0x8000 ≤ D0 ≤ 0x7fff> {[«2""»]} <POP 21ed8-21eda StackAdj> Δ+2 {} <MI 21eda MOVE.W D0,(A0)> {} <Blob 0x21edc [10] @> Δ-10 {[«10""»]} <POP 21ee8-21eea StackAdj> Δ-8 {[«10""»]|[-8-]} <Lit 0x21eea 10> {[«10""»]|[-4-]|[$$ --ucode_]} <POP 21ef4-21ef6 StackAdj> Δ-4 {[«10""»]|[-4-]|[$$ --ucode_]|[-4-]} <POP 21ef6-21ef7 StackAdj> Δ+4 {[«10""»]|[-4-]|[$$ --ucode_]} <Blob 0x21ef7 [4] 0x226ee> Δ-4 {[«10""»]|[-4-]|[$$ --ucode_]|[«4»]} <Call 0x21efc 0x102d0> {[«10""»]|[-4-]|[$$ --ucode_]|[«4»]} StringCat2(a, b : String) : String <POP 21f02-21f04 StackAdj> Δ+8 {[«10""»]|[-4-]} <Call 0x21f04 0x103e0> {[«10""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 21f0a-21f0e StackAdj> Δ+14 {} <MI 21f0e BRA 0x21f3c> {} <POP 21f10-21f3c Naked> Σ0 ↓ ←0x21e2a <Blob 0x21f10 [22] @> Δ-22 {[«22""»]} <POP 21f22-21f24 StackAdj> Δ-4 {[«22""»]|[-4-]} <Lit 0x21f24 21> {[«22""»]|[$$ ** ucode version ??]} <Call 0x21f32 0x103e0> {[«22""»]|[$$ ** ucode version ??]} WriteConsoleStringCrLf(str : String) <POP 21f38-21f3c StackAdj> Δ+26 {} <POP 21f3c-2201c Naked> Σ0 ↓ ←0x21e70 <Const 0x21f3c 0x22523.4> Δ-4 {[##140579]} <Const 0x21f42 0x2250c.4> Δ-4 {[##140579]|[##140556]} <Const 0x21f48 0x22550.4> Δ-4 {[##140579]|[##140556]|[##140624]} <Call 0x21f4e 0x21444> {[##140579]|[##140556]|[##140624]} <POP 21f52-21f54 StackAdj> Δ+10 {[-2-]} <Const 0x21f54 0x22523.4> Δ-4 {[-2-]|[##140579]} <Blob 0x21f5a [4] 0x2250c> Δ-4 {[-2-]|[##140579]|[«4»]} <Blob 0x21f60 [2] 0x22550> Δ-2 {[-2-]|[##140579]|[«4»]|[«2»]} <Call 0x21f66 0x2197c> {[-2-]|[##140579]|[«4»]|[«2»]} <POP 21f6a-21f6c StackAdj> Δ+10 {[-2-]} <MI 21f6c MOVE.B (A7)+,D0> Δ+2 {} <MI 21f6e EXTB.W D0> {} <POP 0x21f70 LimitCheck 0x0 ≤ D0 ≤ 0xb> {} <MI 21f74 MOVE.B D0,0x2254f> {} <POP 21f7a-21f7b StackAdj> Δ-8 ↓ {[-8-]} <Blob 0x21f7b [44] 0x22523> Δ-44 {[-8-]|[«44»]} <MI 21f8e MOVE.B D0,-(A7)> Δ-2 {[-8-]|[«44»]|[2, 'D0']} <Call 0x21f90 0x21a7a> {[-8-]|[«44»]|[2, 'D0']} <POP 21f94-21f98 StackAdj> Δ+46 {[-8-]} <MI 21f98 LEA.L 0x22551,A0> {[-8-]} <MI 21f9e MOVEA.L A7,A1> {[-8-]} <BlockMove 8,A1,A0> {[-8-]} <POP 21fa8-21faa StackAdj> Δ+6 {[-2-]} <POP 21faa-21fab StackAdj> Δ+2 {} <Blob 0x21fab [2] 0x2254f> Δ-2 {[«2»]} <Blob 0x21fb0 [8] 0x22551> Δ-8 {[«2»]|[«8»]} <Const 0x21fc2 0x22511.4> Δ-4 {[«2»]|[«8»]|[##140561]} <Const 0x21fc8 0x22512.4> Δ-4 {[«2»]|[«8»]|[##140561]|[##140562]} <Const 0x21fce 0x22516.4> Δ-4 {[«2»]|[«8»]|[##140561]|[##140562]|[##140566]} <Const 0x21fd4 0x2251a.4> Δ-4 {[«2»]|[«8»]|[##140561]|[##140562]|[##140566]|[##140570]} <Const 0x21fda 0x2251b.4> Δ-4 {[«2»]|[«8»]|[##140561]|[##140562]|[##140566]|[##140570]|[##140571]} <Call 0x21fe0 0x21b40> {[«2»]|[«8»]|[##140561]|[##140562]|[##140566]|[##140570]|[##140571]} <POP 21fe4-21fe8 StackAdj> Δ+28 {[«2»]} <POP 21fe8-21fe9 StackAdj> Δ+2 {} <Blob 0x21fe9 [2] 0x22511> Δ-2 {[«2»]} <Blob 0x21fee [4] 0x22512> Δ-4 {[«2»]|[«4»]} <Blob 0x21ff4 [4] 0x22516> Δ-4 {[«2»]|[«4»]|[«4»]} <Blob 0x21ffa [2] 0x2251a> Δ-2 {[«2»]|[«4»]|[«4»]|[«2»]} <Blob 0x22000 [8] 0x2251b> Δ-8 {[«2»]|[«4»]|[«4»]|[«2»]|[«8»]} <Call 0x22012 0x1054a> {[«2»]|[«4»]|[«4»]|[«2»]|[«8»]} ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) <POP 22018-2201c StackAdj> Δ+20 {} <POP 2201c-22022 Naked> Σ0 <Call 0x2201c 0x10284> {} ?exit
@ 22110 <LVAR 0x014 1(r)> <LVAR 0x010 4(r)> <LVAR 0x00c 4(r)> <LVAR 0x008 4(r)> <LVAR -0x006 @ 4(r)> <POP 22110-221da Body> Δ+16 <POP 22110-22126 Prologue> Σ0 ↓ <POP 22126-22138 RegCacheLoad> Σ0 ↓ <POP 22138-22144 Naked> Σ0 ↓ →0x22156 <POP 22138-2213a StackAdj> Δ-2 {[-2-]} <Call 0x2213a 0x104cc> {[-2-]} MemOnly2MB() : Bool <MI 22140 TST.B (A7)+> Δ+2 {} <MI 22142 BEQ 0x22156> {} <POP 22144-22156 Naked> Σ0 Δ-16 →0x22166 <Blob 0x22144 [16] @> Δ-16 {[«16""»]} <MI 22154 BRA 0x22166> {[«16""»]} <POP 22156-22166 Naked> Σ0 Δ-16 ↓ ←0x22138 <Blob 0x22156 [16] @> Δ-16 {[«16""»]} <POP 22166-221d2 Naked> Σ-16 Δ+16 ↓ ←0x22144 <POP 22166-22168 StackAdj> Δ-4 {[-20-]} <Lit 0x22168> {[-16-]|[$$…]} <Pointer.sp 0x22168 4> Δ-4 <Const 0x2216c 0x1.2> Δ-2 <Const 0x22170 0xf.2> Δ-2 <Call 0x22174 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 2217a-2217c StackAdj> Δ+8 <Pointer.fp 0x2217c <LVAR -0x006 @ 4(r)>> Δ-4 {[-16-]|[$$…]|[@@-6]} <Call 0x2217e 0x10460> {[-16-]|[$$…]|[@@-6]} ExpLoad(a : String; b: Pointer) <POP 22184-22188 StackAdj> Δ+24 {} <MI 22188 CLR.B -(A7)> Δ-2 {[#0]} <MI 2218a MOVE.B (A6+0x14),-(A7)> Δ-2 {[#0]|[2, '(A6+0x14)']} <MI 2218e MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x14)']|[4, '(A6-0x6)']} <Call 0x22190 0x104ba> {[#0]|[2, '(A6+0x14)']|[4, '(A6-0x6)']} ExpRun(a: Bool; adr: Byte; b: Pointer) <POP 22196-22198 StackAdj> Δ+4 {[#0]|[2, '(A6+0x14)']} <MI 22198 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 2219a MOVEA.L (A6+0x10),A0> {[4, '(A6-0x6)']} <MI 2219e PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x221a0 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x221a2 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x221a4 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 221a6-221a8 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 221a8 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 221aa MOVEA.L (A6+0xc),A0> {[4, '(A6-0x6)']} <MI 221ae PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x221b0 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x221b2 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x221b4 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 221b6-221b8 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 221b8 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 221ba MOVEA.L (A6+0x8),A0> {[4, '(A6-0x6)']} <MI 221be PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x221c0 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x221c2 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x221c4 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 221c6-221c8 StackAdj> Δ+16 {} <Pointer.fp 0x221c8 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]} <Call 0x221ca 0x10496> {[@@-6]} ExpClose(exp : Pointer) <POP 221d0-221d2 StackAdj> Δ+4 {} <POP 221d2-221da Epilogue> Σ0
@ 22284 PROG_FAIL <LVAR 0x008 1(r)> <POP 22284-222ec Body> <POP 22284-2229a Prologue> Σ0 ↓ <POP 2229a-222e4 Naked> Σ0 ↓ <Blob 0x2229a [14] @> Δ-14 {[«14""»]} <Const 0x222a6 0x3.2> Δ-2 {[«14""»]|[#3]} <POP 222aa-222ac StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]} <Lit 0x222ac 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]} <POP 222be-222c0 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 222c0 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 222c4 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 222c6 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 222c8 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']} <Call 0x222ca 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']} Long2String(a : Long) : String <POP 222d0-222d2 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <Call 0x222d2 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} StringCat2(a, b : String) : String <POP 222d8-222da StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]} <Call 0x222da 0x103b8> {[«14""»]|[#3]|[-4-]} PopProgram(status : Byte; msg : String) <POP 222e0-222e4 StackAdj> Δ+20 {} <POP 222e4-222ec Epilogue> Σ0
@ 22340 EXP_FAIL <LVAR 0x00e 1(r)> <LVAR 0x00a 4(r)> <LVAR 0x008 1(r)> <POP 22340-2247c Body> <POP 22340-22356 Prologue> Σ0 ↓ <POP 22356-2236c RegCacheLoad> Σ0 ↓ <POP 2236c-223cc Naked> Σ0 ↓ →0x22414 <Call 0x2236c 0x103dc> {} WriteConsoleCrLf(void) <Blob 0x22372 [18] @> Δ-18 {[«18""»]} <POP 2237e-22380 StackAdj> Δ-4 {[«18""»]|[-4-]} <Lit 0x22380 18> {[«18""»]|[$$Experiment error :]} <Call 0x2238c 0x103e0> {[«18""»]|[$$Experiment error :]} WriteConsoleStringCrLf(str : String) <POP 2238e-2238f StackAdj> Δ+22 ↓ {} <Blob 0x2238f [14] @> Δ-14 {[«14""»]} <POP 2239e-223a0 StackAdj> Δ-8 {[«14""»]|[-8-]} <Lit 0x223a0 13> {[«14""»]|[-4-]|[$$Board :_]} <POP 223aa-223ac StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]} <MI 223ac MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]} <Call 0x223b0 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]} BoardName(address : B) : String <POP 223b6-223b8 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]} <Call 0x223b8 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]} StringCat2(a, b : String) : String <POP 223be-223c0 StackAdj> Δ+8 {[«14""»]|[-4-]} <Call 0x223c0 0x103e0> {[«14""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 223c2-223c4 StackAdj> Δ+18 {} <MI 223c4 MOVEA.L (A6+0xa),A0> {} <MI 223c8 CMPA.W #0x01,A0> {} <MI 223ca BEQ 0x22414> {} <POP 223cc-22414 Naked> Σ0 ↓ <Blob 0x223cc [14] @> Δ-14 {[«14""»]} <Blob 0x223dc [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]} <POP 223ec-223ee StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]} <Lit 0x223ee 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]} <POP 223f8-223fa StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]} <Lit 0x223fa> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]} <Pointer.sp 0x223fa 12> Δ-4 <Const 0x223fe 0x1.2> Δ-2 <Const 0x22400 0x1e.2> Δ-2 <Call 0x22402 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 22404-22406 StackAdj> Δ+8 <Call 0x22406 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]} StringCat2(a, b : String) : String <POP 2240c-2240e StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]} <Call 0x2240e 0x103e0> {[«14""»]|[«30»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 22410-22414 StackAdj> Δ+48 {} <POP 22414-22474 Naked> Σ0 ↓ ←0x2236c <Blob 0x22414 [14] @> Δ-14 {[«14""»]} <POP 22424-22426 StackAdj> Δ-8 {[«14""»]|[-8-]} <Lit 0x22426 13> {[«14""»]|[-4-]|[$$Status :_]} <POP 22430-22432 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]} <MI 22432 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]} <Call 0x22436 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]} ExpStatus2Text(status.B, &String) <POP 2243c-2243e StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]} <Call 0x2243e 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]} StringCat2(a, b : String) : String <POP 22444-22446 StackAdj> Δ+8 {[«14""»]|[-4-]} <Call 0x22446 0x103e0> {[«14""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 22448-22449 StackAdj> Δ+18 ↓ {} <Blob 0x22449 [24] @> Δ-24 {[«24""»]} <Const 0x22458 0x2.2> Δ-2 {[«24""»]|[#2]} <POP 2245c-2245e StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]} <Lit 0x2245e 23> {[«24""»]|[#2]|[$$Fatal experiment error.]} <Call 0x2246c 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]} PopProgram(status : Byte; msg : String) <POP 22472-22474 StackAdj> Δ+30 {} <POP 22474-2247c Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.034c561ea36442ee 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 1c c6 | | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 27 0c | ' | .PTR 0x2270c 00020010 code.end: 00020010 00 02 24 7c | $| | .PTR 0x2247c 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 22 84 | " | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 23 40 | #@ | .CODE EXP_FAIL 00020020 00 00 00 00 | | .CONST 0x00000000 00020024 exp_init_done: 00020024 00 | | .CONST 0x00 00020025 00 | | .CONST 0x00 00020026 00 00 | | .CONST 0x0000 00020028 00 00 | | .CONST 0x0000 0002002a 00 00 | | .XXX[0x2] 0002002c 00 00 | | .CONST 0x0000 0002002e 00 00 | | .CONST 0x0000 00020030 00 00 | | .CONST 0x0000 00020032 00 00 00 00 00 00 | | .XXX[0x6] 00020038 00 00 00 00 00 00 00 00 | | .BLANK 00[0xb0] 000200e8 00 00 00 00 | | .XXX[0x4] 000200ec 00 00 00 00 | | .PTR 0x0 000200f0 is_open_ERROR_LOG: 000200f0 00 | | .CONST 0x0 000200f1 write_error_ERROR_LOG: 000200f1 00 | | .CONST 0x0 000200f2 00 00 00 00 | | .CONST 0x00000000 000200f6 00 00 00 00 | | .CONST 0x00000000 000200fa 00 | | .CONST 0x00 000200fb 00 | | .CONST 0x00 000200fc file_ERROR_LOG: 000200fc 00 00 00 00 | | .CONST 0x00000000 00020100 00 00 00 00 | | .CONST 0x00000000 00020104 00 00 | | .CONST 0x0000 00020106 00 00 | | .CONST 0x0000 00020108 somekindoffsflag: 00020108 00 | | .CONST 0x00 00020109 00 | | .CONST 0x00 0002010a 49 4f 43 20 62 6f |IOC bo | .XXX[0x6] 00020110 61 72 64 20 4d 69 63 72 |ard Micr| .XXX[0x3a0] 00020118 6f 61 64 64 72 65 73 73 |oaddress| 00020120 20 62 75 73 20 70 61 72 | bus par| 00020128 69 74 79 20 65 72 72 6f |ity erro| 00020130 72 20 49 4f 43 20 62 6f |r IOC bo| 00020138 61 72 64 20 57 43 53 20 |ard WCS | 00020140 70 61 72 69 74 79 20 65 |parity e| 00020148 72 72 6f 72 20 20 20 20 |rror | 00020150 20 20 20 20 20 20 20 20 | | 00020158 20 20 49 4f 43 20 62 6f | IOC bo| 00020160 61 72 64 20 54 59 50 20 |ard TYP | 00020168 62 75 73 20 70 61 72 69 |bus pari| 00020170 74 79 20 65 72 72 6f 72 |ty error| 00020178 20 20 20 20 20 20 20 20 | | 00020180 20 20 49 4f 43 20 62 6f | IOC bo| 00020188 61 72 64 20 56 41 4c 20 |ard VAL | 00020190 62 75 73 20 70 61 72 69 |bus pari| 00020198 74 79 20 65 72 72 6f 72 |ty error| 000201a0 20 20 20 20 20 20 20 20 | | 000201a8 20 20 56 41 4c 20 62 6f | VAL bo| 000201b0 61 72 64 20 4d 69 63 72 |ard Micr| 000201b8 6f 61 64 64 72 65 73 73 |oaddress| 000201c0 20 62 75 73 20 70 61 72 | bus par| 000201c8 69 74 79 20 65 72 72 6f |ity erro| 000201d0 72 20 56 41 4c 20 62 6f |r VAL bo| 000201d8 61 72 64 20 57 43 53 20 |ard WCS | 000201e0 70 61 72 69 74 79 20 65 |parity e| 000201e8 72 72 6f 72 20 20 20 20 |rror | 000201f0 20 20 20 20 20 20 20 20 | | 000201f8 20 20 56 41 4c 20 62 6f | VAL bo| 00020200 61 72 64 20 41 52 46 20 |ard ARF | 00020208 52 41 4d 20 70 61 72 69 |RAM pari| 00020210 74 79 20 65 72 72 6f 72 |ty error| 00020218 20 20 20 20 20 20 20 20 | | 00020220 20 20 56 41 4c 20 62 6f | VAL bo| 00020228 61 72 64 20 42 52 46 20 |ard BRF | 00020230 52 41 4d 20 70 61 72 69 |RAM pari| 00020238 74 79 20 65 72 72 6f 72 |ty error| 00020240 20 20 20 20 20 20 20 20 | | 00020248 20 20 56 41 4c 20 62 6f | VAL bo| 00020250 61 72 64 20 56 41 4c 20 |ard VAL | 00020258 62 75 73 20 70 61 72 69 |bus pari| 00020260 74 79 20 65 72 72 6f 72 |ty error| 00020268 20 20 20 20 20 20 20 20 | | 00020270 20 20 56 41 4c 20 62 6f | VAL bo| 00020278 61 72 64 20 46 49 55 20 |ard FIU | 00020280 62 75 73 20 70 61 72 69 |bus pari| 00020288 74 79 20 65 72 72 6f 72 |ty error| 00020290 20 20 20 20 20 20 20 20 | | 00020298 20 20 56 41 4c 20 62 6f | VAL bo| 000202a0 61 72 64 20 57 44 52 20 |ard WDR | 000202a8 70 61 72 69 74 79 20 65 |parity e| 000202b0 72 72 6f 72 20 20 20 20 |rror | 000202b8 20 20 20 20 20 20 20 20 | | 000202c0 20 20 54 59 50 20 62 6f | TYP bo| 000202c8 61 72 64 20 4d 69 63 72 |ard Micr| 000202d0 6f 61 64 64 72 65 73 73 |oaddress| 000202d8 20 62 75 73 20 70 61 72 | bus par| 000202e0 69 74 79 20 65 72 72 6f |ity erro| 000202e8 72 20 54 59 50 20 62 6f |r TYP bo| 000202f0 61 72 64 20 57 43 53 20 |ard WCS | 000202f8 70 61 72 69 74 79 20 65 |parity e| 00020300 72 72 6f 72 20 20 20 20 |rror | 00020308 20 20 20 20 20 20 20 20 | | 00020310 20 20 54 59 50 20 62 6f | TYP bo| 00020318 61 72 64 20 41 52 46 20 |ard ARF | 00020320 52 41 4d 20 70 61 72 69 |RAM pari| 00020328 74 79 20 65 72 72 6f 72 |ty error| 00020330 20 20 20 20 20 20 20 20 | | 00020338 20 20 54 59 50 20 62 6f | TYP bo| 00020340 61 72 64 20 42 52 46 20 |ard BRF | 00020348 52 41 4d 20 70 61 72 69 |RAM pari| 00020350 74 79 20 65 72 72 6f 72 |ty error| 00020358 20 20 20 20 20 20 20 20 | | 00020360 20 20 54 59 50 20 62 6f | TYP bo| 00020368 61 72 64 20 54 59 50 20 |ard TYP | 00020370 62 75 73 20 70 61 72 69 |bus pari| 00020378 74 79 20 65 72 72 6f 72 |ty error| 00020380 20 20 20 20 20 20 20 20 | | 00020388 20 20 54 59 50 20 62 6f | TYP bo| 00020390 61 72 64 20 46 49 55 20 |ard FIU | 00020398 62 75 73 20 70 61 72 69 |bus pari| 000203a0 74 79 20 65 72 72 6f 72 |ty error| 000203a8 20 20 20 20 20 20 20 20 | | 000203b0 20 20 54 59 50 20 62 6f | TYP bo| 000203b8 61 72 64 20 57 44 52 20 |ard WDR | 000203c0 70 61 72 69 74 79 20 65 |parity e| 000203c8 72 72 6f 72 20 20 20 20 |rror | 000203d0 20 20 20 20 20 20 20 20 | | 000203d8 20 20 53 45 51 20 62 6f | SEQ bo| 000203e0 61 72 64 20 46 49 55 20 |ard FIU | 000203e8 62 75 73 20 70 61 72 69 |bus pari| 000203f0 74 79 20 65 72 72 6f 72 |ty error| 000203f8 20 20 20 20 20 20 20 20 | | 00020400 20 20 53 45 51 20 62 6f | SEQ bo| 00020408 61 72 64 20 56 41 4c 20 |ard VAL | 00020410 62 75 73 20 70 61 72 69 |bus pari| 00020418 74 79 20 65 72 72 6f 72 |ty error| 00020420 20 20 20 20 20 20 20 20 | | 00020428 20 20 53 45 51 20 62 6f | SEQ bo| 00020430 61 72 64 20 54 59 50 20 |ard TYP | 00020438 62 75 73 20 70 61 72 69 |bus pari| 00020440 74 79 20 65 72 72 6f 72 |ty error| 00020448 20 20 20 20 20 20 20 20 | | 00020450 20 20 53 45 51 20 62 6f | SEQ bo| 00020458 61 72 64 20 57 43 53 20 |ard WCS | 00020460 70 61 72 69 74 79 20 65 |parity e| 00020468 72 72 6f 72 20 20 20 20 |rror | 00020470 20 20 20 20 20 20 20 20 | | 00020478 20 20 53 45 51 20 62 6f | SEQ bo| 00020480 61 72 64 20 44 65 63 6f |ard Deco| 00020488 64 65 20 52 41 4d 20 70 |de RAM p| 00020490 61 72 69 74 79 20 65 72 |arity er| 00020498 72 6f 72 20 20 20 20 20 |ror | 000204a0 20 20 4d 69 63 72 6f 63 | Microc| 000204a8 6f 64 65 20 48 41 4c 54 |ode HALT| 000204b0 20 20 20 20 20 20 20 20 | | .BLANK 20[0x18] 000204c8 20 20 | | .BLANK 20[0x2] 000204ca 46 49 55 20 62 6f |FIU bo | .XXX[0x6] 000204d0 61 72 64 20 46 49 55 20 |ard FIU | .XXX[0xb0] 000204d8 62 75 73 20 70 61 72 69 |bus pari| 000204e0 74 79 20 65 72 72 6f 72 |ty error| 000204e8 20 20 20 20 20 20 20 20 | | 000204f0 20 20 46 49 55 20 62 6f | FIU bo| 000204f8 61 72 64 20 56 41 4c 20 |ard VAL | 00020500 62 75 73 20 70 61 72 69 |bus pari| 00020508 74 79 20 65 72 72 6f 72 |ty error| 00020510 20 20 20 20 20 20 20 20 | | 00020518 20 20 46 49 55 20 62 6f | FIU bo| 00020520 61 72 64 20 54 59 50 20 |ard TYP | 00020528 62 75 73 20 70 61 72 69 |bus pari| 00020530 74 79 20 65 72 72 6f 72 |ty error| 00020538 20 20 20 20 20 20 20 20 | | 00020540 20 20 46 49 55 20 62 6f | FIU bo| 00020548 61 72 64 20 41 64 64 72 |ard Addr| 00020550 65 73 73 20 62 75 73 20 |ess bus | 00020558 70 61 72 69 74 79 20 65 |parity e| 00020560 72 72 6f 72 20 20 20 20 |rror | 00020568 20 20 52 65 66 72 65 73 | Refres| 00020570 68 20 4d 61 63 68 69 6e |h Machin| 00020578 65 20 43 68 65 63 6b 20 |e Check | 00020580 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00020590 20 20 46 49 55 20 62 6f | FIU bo| .XXX[0x268] 00020598 61 72 64 20 57 43 53 20 |ard WCS | 000205a0 70 61 72 69 74 79 20 65 |parity e| 000205a8 72 72 6f 72 20 20 20 20 |rror | 000205b0 20 20 20 20 20 20 20 20 | | 000205b8 20 20 46 49 55 20 62 6f | FIU bo| 000205c0 61 72 64 20 4d 69 63 72 |ard Micr| 000205c8 6f 61 64 64 72 65 73 73 |oaddress| 000205d0 20 62 75 73 20 70 61 72 | bus par| 000205d8 69 74 79 20 65 72 72 6f |ity erro| 000205e0 72 20 46 49 55 20 62 6f |r FIU bo| 000205e8 61 72 64 20 53 63 61 76 |ard Scav| 000205f0 65 6e 67 65 72 20 52 41 |enger RA| 000205f8 4d 20 70 61 72 69 74 79 |M parity| 00020600 20 65 72 72 6f 72 20 20 | error | 00020608 20 20 4d 65 6d 6f 72 79 | Memory| 00020610 20 62 6f 61 72 64 20 30 | board 0| 00020618 20 54 61 67 73 74 6f 72 | Tagstor| 00020620 65 20 30 20 70 61 72 69 |e 0 pari| 00020628 74 79 20 65 72 72 6f 72 |ty error| 00020630 20 20 4d 65 6d 6f 72 79 | Memory| 00020638 20 62 6f 61 72 64 20 30 | board 0| 00020640 20 54 61 67 73 74 6f 72 | Tagstor| 00020648 65 20 31 20 70 61 72 69 |e 1 pari| 00020650 74 79 20 65 72 72 6f 72 |ty error| 00020658 20 20 4d 65 6d 6f 72 79 | Memory| 00020660 20 62 6f 61 72 64 20 30 | board 0| 00020668 20 41 64 64 72 65 73 73 | Address| 00020670 20 62 75 73 20 70 61 72 | bus par| 00020678 69 74 79 20 65 72 72 6f |ity erro| 00020680 72 20 4d 65 6d 6f 72 79 |r Memory| 00020688 20 62 6f 61 72 64 20 31 | board 1| 00020690 20 54 61 67 73 74 6f 72 | Tagstor| 00020698 65 20 30 20 70 61 72 69 |e 0 pari| 000206a0 74 79 20 65 72 72 6f 72 |ty error| 000206a8 20 20 4d 65 6d 6f 72 79 | Memory| 000206b0 20 62 6f 61 72 64 20 31 | board 1| 000206b8 20 54 61 67 73 74 6f 72 | Tagstor| 000206c0 65 20 31 20 70 61 72 69 |e 1 pari| 000206c8 74 79 20 65 72 72 6f 72 |ty error| 000206d0 20 20 4d 65 6d 6f 72 79 | Memory| 000206d8 20 62 6f 61 72 64 20 31 | board 1| 000206e0 20 41 64 64 72 65 73 73 | Address| 000206e8 20 62 75 73 20 70 61 72 | bus par| 000206f0 69 74 79 20 65 72 72 6f |ity erro| 000206f8 72 20 4d 65 6d 6f 72 79 |r Memory| 00020700 20 62 6f 61 72 64 20 32 | board 2| 00020708 20 54 61 67 73 74 6f 72 | Tagstor| 00020710 65 20 30 20 70 61 72 69 |e 0 pari| 00020718 74 79 20 65 72 72 6f 72 |ty error| 00020720 20 20 4d 65 6d 6f 72 79 | Memory| 00020728 20 62 6f 61 72 64 20 32 | board 2| 00020730 20 54 61 67 73 74 6f 72 | Tagstor| 00020738 65 20 31 20 70 61 72 69 |e 1 pari| 00020740 74 79 20 65 72 72 6f 72 |ty error| 00020748 20 20 4d 65 6d 6f 72 79 | Memory| 00020750 20 62 6f 61 72 64 20 32 | board 2| 00020758 20 41 64 64 72 65 73 73 | Address| 00020760 20 62 75 73 20 70 61 72 | bus par| 00020768 69 74 79 20 65 72 72 6f |ity erro| 00020770 72 20 4d 65 6d 6f 72 79 |r Memory| 00020778 20 62 6f 61 72 64 20 33 | board 3| 00020780 20 54 61 67 73 74 6f 72 | Tagstor| 00020788 65 20 30 20 70 61 72 69 |e 0 pari| 00020790 74 79 20 65 72 72 6f 72 |ty error| 00020798 20 20 4d 65 6d 6f 72 79 | Memory| 000207a0 20 62 6f 61 72 64 20 33 | board 3| 000207a8 20 54 61 67 73 74 6f 72 | Tagstor| 000207b0 65 20 31 20 70 61 72 69 |e 1 pari| 000207b8 74 79 20 65 72 72 6f 72 |ty error| 000207c0 20 20 4d 65 6d 6f 72 79 | Memory| 000207c8 20 62 6f 61 72 64 20 33 | board 3| 000207d0 20 41 64 64 72 65 73 73 | Address| 000207d8 20 62 75 73 20 70 61 72 | bus par| 000207e0 69 74 79 20 65 72 72 6f |ity erro| 000207e8 72 20 55 6e 6b 6e 6f 77 |r Unknow| 000207f0 6e 20 65 72 72 6f 72 20 |n error | 000207f8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00020808 48 61 6c 74 20 20 20 20 |Halt | .XXX[0x8] 00020810 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00020820 20 20 20 20 20 20 52 65 | Re| .XXX[0x130] 00020828 66 72 65 73 68 20 6d 61 |fresh ma| 00020830 63 68 69 6e 65 20 63 68 |chine ch| 00020838 65 63 6b 20 20 20 20 20 |eck | 00020840 20 20 20 20 4d 69 63 72 | Micr| 00020848 6f 61 64 64 72 65 73 73 |oaddress| 00020850 20 62 75 73 20 70 61 72 | bus par| 00020858 69 74 79 20 20 20 20 20 |ity | 00020860 20 20 57 43 53 20 52 41 | WCS RA| 00020868 4d 20 70 61 72 69 74 79 |M parity| 00020870 20 65 72 72 6f 72 20 20 | error | 00020878 20 20 20 20 20 20 20 20 | | 00020880 44 65 63 6f 64 65 20 52 |Decode R| 00020888 41 4d 20 70 61 72 69 74 |AM parit| 00020890 79 20 65 72 72 6f 72 20 |y error | 00020898 20 20 20 20 20 20 53 63 | Sc| 000208a0 61 76 65 6e 67 65 72 20 |avenger | 000208a8 52 41 4d 20 70 61 72 69 |RAM pari| 000208b0 74 79 20 65 72 72 6f 72 |ty error| 000208b8 20 20 20 20 54 61 67 73 | Tags| 000208c0 74 6f 72 65 20 52 41 4d |tore RAM| 000208c8 20 70 61 72 69 74 79 20 | parity | 000208d0 65 72 72 6f 72 20 20 20 |error | 000208d8 20 20 52 65 67 69 73 74 | Regist| 000208e0 65 72 20 46 69 6c 65 20 |er File | 000208e8 52 41 4d 20 70 61 72 69 |RAM pari| 000208f0 74 79 20 65 72 72 6f 72 |ty error| 000208f8 41 64 64 72 65 73 73 20 |Address | 00020900 62 75 73 20 70 61 72 69 |bus pari| 00020908 74 79 20 65 72 72 6f 72 |ty error| 00020910 20 20 20 20 20 20 46 6f | Fo| 00020918 72 65 70 6c 61 6e 65 20 |replane | 00020920 62 75 73 20 70 61 72 69 |bus pari| 00020928 74 79 20 65 72 72 6f 72 |ty error| 00020930 20 20 20 20 57 44 52 2f | WDR/| 00020938 46 6f 72 65 70 6c 61 6e |Foreplan| 00020940 65 5f 62 75 73 20 65 72 |e_bus er| 00020948 72 6f 72 20 20 20 20 20 |ror | 00020950 20 20 | | .XXX[0x2] 00020952 54 6f 6f 20 6d 61 6e 79 |Too many| .TXT 'Too many boards failed. ' 0002096a 45 4d |EM | .TXT 'EM' 0002096c 57 43 |WC | .TXT 'WC' 0002096e 53 50 |SP | .TXT 'SP' 00020970 45 4d |EM | .TXT 'EM' 00020972 42 41 |BA | .TXT 'BA' 00020974 4c 4d |LM | .TXT 'LM' 00020976 75 61 64 64 |uadd | .TXT 'uadd' 0002097a 72 20 74 72 |r tr | .TXT 'r tr' 0002097e 61 63 65 3a |ace: | .TXT 'ace:' 00020982 20 5f | _ | .TXT ' _' 00020984 3d 20 |= | .TXT '= ' 00020986 23 20 |# | .TXT '# ' 00020988 43 55 52 52 45 4e 54 2e |CURRENT.| .TXT 'CURRENT.M200_CONFIG ' 0002099c 2e 20 |. | .TXT '. ' 0002099e 20 20 2d 2d 75 63 6f 64 | --ucod| .TXT ' --ucode_' 000209a8 20 20 2a 2a 20 75 63 6f | ** uco| .TXT ' ** ucode version ?? ' 000209be 49 4f |IO | .XXX[0x2] 000209c0 43 20 62 6f 61 72 64 20 |C board | .XXX[0x3d8] 000209c8 4d 69 63 72 6f 61 64 64 |Microadd| 000209d0 72 65 73 73 20 62 75 73 |ress bus| 000209d8 20 70 61 72 69 74 79 20 | parity | 000209e0 65 72 72 6f 72 20 04 03 |error | 000209e8 49 4f 43 20 62 6f 61 72 |IOC boar| 000209f0 64 20 57 43 53 20 70 61 |d WCS pa| 000209f8 72 69 74 79 20 65 72 72 |rity err| 00020a00 6f 72 20 20 20 20 20 20 |or | 00020a08 20 20 20 20 20 20 20 20 | | 00020a10 04 04 49 4f 43 20 62 6f | IOC bo| 00020a18 61 72 64 20 54 59 50 20 |ard TYP | 00020a20 62 75 73 20 70 61 72 69 |bus pari| 00020a28 74 79 20 65 72 72 6f 72 |ty error| 00020a30 20 20 20 20 20 20 20 20 | | 00020a38 20 20 04 0a 49 4f 43 20 | IOC | 00020a40 62 6f 61 72 64 20 56 41 |board VA| 00020a48 4c 20 62 75 73 20 70 61 |L bus pa| 00020a50 72 69 74 79 20 65 72 72 |rity err| 00020a58 6f 72 20 20 20 20 20 20 |or | 00020a60 20 20 20 20 04 0a 56 41 | VA| 00020a68 4c 20 62 6f 61 72 64 20 |L board | 00020a70 4d 69 63 72 6f 61 64 64 |Microadd| 00020a78 72 65 73 73 20 62 75 73 |ress bus| 00020a80 20 70 61 72 69 74 79 20 | parity | 00020a88 65 72 72 6f 72 20 07 03 |error | 00020a90 56 41 4c 20 62 6f 61 72 |VAL boar| 00020a98 64 20 57 43 53 20 70 61 |d WCS pa| 00020aa0 72 69 74 79 20 65 72 72 |rity err| 00020aa8 6f 72 20 20 20 20 20 20 |or | 00020ab0 20 20 20 20 20 20 20 20 | | 00020ab8 07 04 56 41 4c 20 62 6f | VAL bo| 00020ac0 61 72 64 20 41 52 46 20 |ard ARF | 00020ac8 52 41 4d 20 70 61 72 69 |RAM pari| 00020ad0 74 79 20 65 72 72 6f 72 |ty error| 00020ad8 20 20 20 20 20 20 20 20 | | 00020ae0 20 20 07 08 56 41 4c 20 | VAL | 00020ae8 62 6f 61 72 64 20 42 52 |board BR| 00020af0 46 20 52 41 4d 20 70 61 |F RAM pa| 00020af8 72 69 74 79 20 65 72 72 |rity err| 00020b00 6f 72 20 20 20 20 20 20 |or | 00020b08 20 20 20 20 07 08 56 41 | VA| 00020b10 4c 20 62 6f 61 72 64 20 |L board | 00020b18 56 41 4c 20 62 75 73 20 |VAL bus | 00020b20 70 61 72 69 74 79 20 65 |parity e| 00020b28 72 72 6f 72 20 20 20 20 |rror | 00020b30 20 20 20 20 20 20 07 0a | | 00020b38 56 41 4c 20 62 6f 61 72 |VAL boar| 00020b40 64 20 46 49 55 20 62 75 |d FIU bu| 00020b48 73 20 70 61 72 69 74 79 |s parity| 00020b50 20 65 72 72 6f 72 20 20 | error | 00020b58 20 20 20 20 20 20 20 20 | | 00020b60 07 0a 56 41 4c 20 62 6f | VAL bo| 00020b68 61 72 64 20 57 44 52 20 |ard WDR | 00020b70 70 61 72 69 74 79 20 65 |parity e| 00020b78 72 72 6f 72 20 20 20 20 |rror | 00020b80 20 20 20 20 20 20 20 20 | | 00020b88 20 20 07 0b 54 59 50 20 | TYP | 00020b90 62 6f 61 72 64 20 4d 69 |board Mi| 00020b98 63 72 6f 61 64 64 72 65 |croaddre| 00020ba0 73 73 20 62 75 73 20 70 |ss bus p| 00020ba8 61 72 69 74 79 20 65 72 |arity er| 00020bb0 72 6f 72 20 06 03 54 59 |ror TY| 00020bb8 50 20 62 6f 61 72 64 20 |P board | 00020bc0 57 43 53 20 70 61 72 69 |WCS pari| 00020bc8 74 79 20 65 72 72 6f 72 |ty error| 00020bd0 20 20 20 20 20 20 20 20 | | 00020bd8 20 20 20 20 20 20 06 04 | | 00020be0 54 59 50 20 62 6f 61 72 |TYP boar| 00020be8 64 20 41 52 46 20 52 41 |d ARF RA| 00020bf0 4d 20 70 61 72 69 74 79 |M parity| 00020bf8 20 65 72 72 6f 72 20 20 | error | 00020c00 20 20 20 20 20 20 20 20 | | 00020c08 06 08 54 59 50 20 62 6f | TYP bo| 00020c10 61 72 64 20 42 52 46 20 |ard BRF | 00020c18 52 41 4d 20 70 61 72 69 |RAM pari| 00020c20 74 79 20 65 72 72 6f 72 |ty error| 00020c28 20 20 20 20 20 20 20 20 | | 00020c30 20 20 06 08 54 59 50 20 | TYP | 00020c38 62 6f 61 72 64 20 54 59 |board TY| 00020c40 50 20 62 75 73 20 70 61 |P bus pa| 00020c48 72 69 74 79 20 65 72 72 |rity err| 00020c50 6f 72 20 20 20 20 20 20 |or | 00020c58 20 20 20 20 06 0a 54 59 | TY| 00020c60 50 20 62 6f 61 72 64 20 |P board | 00020c68 46 49 55 20 62 75 73 20 |FIU bus | 00020c70 70 61 72 69 74 79 20 65 |parity e| 00020c78 72 72 6f 72 20 20 20 20 |rror | 00020c80 20 20 20 20 20 20 06 0a | | 00020c88 54 59 50 20 62 6f 61 72 |TYP boar| 00020c90 64 20 57 44 52 20 70 61 |d WDR pa| 00020c98 72 69 74 79 20 65 72 72 |rity err| 00020ca0 6f 72 20 20 20 20 20 20 |or | 00020ca8 20 20 20 20 20 20 20 20 | | 00020cb0 06 0b 53 45 51 20 62 6f | SEQ bo| 00020cb8 61 72 64 20 46 49 55 20 |ard FIU | 00020cc0 62 75 73 20 70 61 72 69 |bus pari| 00020cc8 74 79 20 65 72 72 6f 72 |ty error| 00020cd0 20 20 20 20 20 20 20 20 | | 00020cd8 20 20 02 0a 53 45 51 20 | SEQ | 00020ce0 62 6f 61 72 64 20 56 41 |board VA| 00020ce8 4c 20 62 75 73 20 70 61 |L bus pa| 00020cf0 72 69 74 79 20 65 72 72 |rity err| 00020cf8 6f 72 20 20 20 20 20 20 |or | 00020d00 20 20 20 20 02 0a 53 45 | SE| 00020d08 51 20 62 6f 61 72 64 20 |Q board | 00020d10 54 59 50 20 62 75 73 20 |TYP bus | 00020d18 70 61 72 69 74 79 20 65 |parity e| 00020d20 72 72 6f 72 20 20 20 20 |rror | 00020d28 20 20 20 20 20 20 02 0a | | 00020d30 53 45 51 20 62 6f 61 72 |SEQ boar| 00020d38 64 20 57 43 53 20 70 61 |d WCS pa| 00020d40 72 69 74 79 20 65 72 72 |rity err| 00020d48 6f 72 20 20 20 20 20 20 |or | 00020d50 20 20 20 20 20 20 20 20 | | 00020d58 02 04 53 45 51 20 62 6f | SEQ bo| 00020d60 61 72 64 20 44 65 63 6f |ard Deco| 00020d68 64 65 20 52 41 4d 20 70 |de RAM p| 00020d70 61 72 69 74 79 20 65 72 |arity er| 00020d78 72 6f 72 20 20 20 20 20 |ror | 00020d80 20 20 02 05 4d 69 63 72 | Micr| 00020d88 6f 63 6f 64 65 20 48 41 |ocode HA| 00020d90 4c 54 20 20 20 20 20 20 |LT | 00020d98 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00020da8 20 20 20 20 02 01 46 49 | FI| .XXX[0xd0] 00020db0 55 20 62 6f 61 72 64 20 |U board | 00020db8 46 49 55 20 62 75 73 20 |FIU bus | 00020dc0 70 61 72 69 74 79 20 65 |parity e| 00020dc8 72 72 6f 72 20 20 20 20 |rror | 00020dd0 20 20 20 20 20 20 03 0a | | 00020dd8 46 49 55 20 62 6f 61 72 |FIU boar| 00020de0 64 20 56 41 4c 20 62 75 |d VAL bu| 00020de8 73 20 70 61 72 69 74 79 |s parity| 00020df0 20 65 72 72 6f 72 20 20 | error | 00020df8 20 20 20 20 20 20 20 20 | | 00020e00 03 0a 46 49 55 20 62 6f | FIU bo| 00020e08 61 72 64 20 54 59 50 20 |ard TYP | 00020e10 62 75 73 20 70 61 72 69 |bus pari| 00020e18 74 79 20 65 72 72 6f 72 |ty error| 00020e20 20 20 20 20 20 20 20 20 | | 00020e28 20 20 03 0a 46 49 55 20 | FIU | 00020e30 62 6f 61 72 64 20 41 64 |board Ad| 00020e38 64 72 65 73 73 20 62 75 |dress bu| 00020e40 73 20 70 61 72 69 74 79 |s parity| 00020e48 20 65 72 72 6f 72 20 20 | error | 00020e50 20 20 20 20 03 09 52 65 | Re| 00020e58 66 72 65 73 68 20 4d 61 |fresh Ma| 00020e60 63 68 69 6e 65 20 43 68 |chine Ch| 00020e68 65 63 6b 20 20 20 20 20 |eck | 00020e70 20 20 20 20 20 20 20 20 | | 00020e78 20 20 20 20 20 20 | | .XXX[0x6] 00020e7e 03 02 | | .XXX[0x2] 00020e80 46 49 55 20 62 6f 61 72 |FIU boar| .XXX[0x2a0] 00020e88 64 20 57 43 53 20 70 61 |d WCS pa| 00020e90 72 69 74 79 20 65 72 72 |rity err| 00020e98 6f 72 20 20 20 20 20 20 |or | 00020ea0 20 20 20 20 20 20 20 20 | | 00020ea8 03 04 46 49 55 20 62 6f | FIU bo| 00020eb0 61 72 64 20 4d 69 63 72 |ard Micr| 00020eb8 6f 61 64 64 72 65 73 73 |oaddress| 00020ec0 20 62 75 73 20 70 61 72 | bus par| 00020ec8 69 74 79 20 65 72 72 6f |ity erro| 00020ed0 72 20 03 03 46 49 55 20 |r FIU | 00020ed8 62 6f 61 72 64 20 53 63 |board Sc| 00020ee0 61 76 65 6e 67 65 72 20 |avenger | 00020ee8 52 41 4d 20 70 61 72 69 |RAM pari| 00020ef0 74 79 20 65 72 72 6f 72 |ty error| 00020ef8 20 20 20 20 03 06 4d 65 | Me| 00020f00 6d 6f 72 79 20 62 6f 61 |mory boa| 00020f08 72 64 20 30 20 54 61 67 |rd 0 Tag| 00020f10 73 74 6f 72 65 20 30 20 |store 0 | 00020f18 70 61 72 69 74 79 20 65 |parity e| 00020f20 72 72 6f 72 20 20 0c 07 |rror | 00020f28 4d 65 6d 6f 72 79 20 62 |Memory b| 00020f30 6f 61 72 64 20 30 20 54 |oard 0 T| 00020f38 61 67 73 74 6f 72 65 20 |agstore | 00020f40 31 20 70 61 72 69 74 79 |1 parity| 00020f48 20 65 72 72 6f 72 20 20 | error | 00020f50 0c 07 4d 65 6d 6f 72 79 | Memory| 00020f58 20 62 6f 61 72 64 20 30 | board 0| 00020f60 20 41 64 64 72 65 73 73 | Address| 00020f68 20 62 75 73 20 70 61 72 | bus par| 00020f70 69 74 79 20 65 72 72 6f |ity erro| 00020f78 72 20 0c 09 4d 65 6d 6f |r Memo| 00020f80 72 79 20 62 6f 61 72 64 |ry board| 00020f88 20 31 20 54 61 67 73 74 | 1 Tagst| 00020f90 6f 72 65 20 30 20 70 61 |ore 0 pa| 00020f98 72 69 74 79 20 65 72 72 |rity err| 00020fa0 6f 72 20 20 0d 07 4d 65 |or Me| 00020fa8 6d 6f 72 79 20 62 6f 61 |mory boa| 00020fb0 72 64 20 31 20 54 61 67 |rd 1 Tag| 00020fb8 73 74 6f 72 65 20 31 20 |store 1 | 00020fc0 70 61 72 69 74 79 20 65 |parity e| 00020fc8 72 72 6f 72 20 20 0d 07 |rror | 00020fd0 4d 65 6d 6f 72 79 20 62 |Memory b| 00020fd8 6f 61 72 64 20 31 20 41 |oard 1 A| 00020fe0 64 64 72 65 73 73 20 62 |ddress b| 00020fe8 75 73 20 70 61 72 69 74 |us parit| 00020ff0 79 20 65 72 72 6f 72 20 |y error | 00020ff8 0d 09 4d 65 6d 6f 72 79 | Memory| 00021000 20 62 6f 61 72 64 20 32 | board 2| 00021008 20 54 61 67 73 74 6f 72 | Tagstor| 00021010 65 20 30 20 70 61 72 69 |e 0 pari| 00021018 74 79 20 65 72 72 6f 72 |ty error| 00021020 20 20 0e 07 4d 65 6d 6f | Memo| 00021028 72 79 20 62 6f 61 72 64 |ry board| 00021030 20 32 20 54 61 67 73 74 | 2 Tagst| 00021038 6f 72 65 20 31 20 70 61 |ore 1 pa| 00021040 72 69 74 79 20 65 72 72 |rity err| 00021048 6f 72 20 20 0e 07 4d 65 |or Me| 00021050 6d 6f 72 79 20 62 6f 61 |mory boa| 00021058 72 64 20 32 20 41 64 64 |rd 2 Add| 00021060 72 65 73 73 20 62 75 73 |ress bus| 00021068 20 70 61 72 69 74 79 20 | parity | 00021070 65 72 72 6f 72 20 0e 09 |error | 00021078 4d 65 6d 6f 72 79 20 62 |Memory b| 00021080 6f 61 72 64 20 33 20 54 |oard 3 T| 00021088 61 67 73 74 6f 72 65 20 |agstore | 00021090 30 20 70 61 72 69 74 79 |0 parity| 00021098 20 65 72 72 6f 72 20 20 | error | 000210a0 0f 07 4d 65 6d 6f 72 79 | Memory| 000210a8 20 62 6f 61 72 64 20 33 | board 3| 000210b0 20 54 61 67 73 74 6f 72 | Tagstor| 000210b8 65 20 31 20 70 61 72 69 |e 1 pari| 000210c0 74 79 20 65 72 72 6f 72 |ty error| 000210c8 20 20 0f 07 4d 65 6d 6f | Memo| 000210d0 72 79 20 62 6f 61 72 64 |ry board| 000210d8 20 33 20 41 64 64 72 65 | 3 Addre| 000210e0 73 73 20 62 75 73 20 70 |ss bus p| 000210e8 61 72 69 74 79 20 65 72 |arity er| 000210f0 72 6f 72 20 0f 09 00 80 |ror | 000210f8 00 40 00 20 00 10 00 08 | @ | 00021100 00 04 00 02 00 01 55 6e | Un| 00021108 6b 6e 6f 77 6e 20 65 72 |known er| 00021110 72 6f 72 20 20 20 20 20 |ror | 00021118 20 20 20 20 20 20 20 20 | | 00021120 20 20 20 20 | | .XXX[0x4] 00021124 48 61 6c 74 |Halt | .XXX[0x4] 00021128 20 20 20 20 20 20 20 20 | | .BLANK 20[0x18] 00021140 20 20 | | .BLANK 20[0x2] 00021142 52 65 66 72 65 73 |Refres | .XXX[0x6] 00021148 68 20 6d 61 63 68 69 6e |h machin| .XXX[0x120] 00021150 65 20 63 68 65 63 6b 20 |e check | 00021158 20 20 20 20 20 20 20 20 | | 00021160 4d 69 63 72 6f 61 64 64 |Microadd| 00021168 72 65 73 73 20 62 75 73 |ress bus| 00021170 20 70 61 72 69 74 79 20 | parity | 00021178 20 20 20 20 20 20 57 43 | WC| 00021180 53 20 52 41 4d 20 70 61 |S RAM pa| 00021188 72 69 74 79 20 65 72 72 |rity err| 00021190 6f 72 20 20 20 20 20 20 |or | 00021198 20 20 20 20 44 65 63 6f | Deco| 000211a0 64 65 20 52 41 4d 20 70 |de RAM p| 000211a8 61 72 69 74 79 20 65 72 |arity er| 000211b0 72 6f 72 20 20 20 20 20 |ror | 000211b8 20 20 53 63 61 76 65 6e | Scaven| 000211c0 67 65 72 20 52 41 4d 20 |ger RAM | 000211c8 70 61 72 69 74 79 20 65 |parity e| 000211d0 72 72 6f 72 20 20 20 20 |rror | 000211d8 54 61 67 73 74 6f 72 65 |Tagstore| 000211e0 20 52 41 4d 20 70 61 72 | RAM par| 000211e8 69 74 79 20 65 72 72 6f |ity erro| 000211f0 72 20 20 20 20 20 52 65 |r Re| 000211f8 67 69 73 74 65 72 20 46 |gister F| 00021200 69 6c 65 20 52 41 4d 20 |ile RAM | 00021208 70 61 72 69 74 79 20 65 |parity e| 00021210 72 72 6f 72 41 64 64 72 |rrorAddr| 00021218 65 73 73 20 62 75 73 20 |ess bus | 00021220 70 61 72 69 74 79 20 65 |parity e| 00021228 72 72 6f 72 20 20 20 20 |rror | 00021230 20 20 46 6f 72 65 70 6c | Forepl| 00021238 61 6e 65 20 62 75 73 20 |ane bus | 00021240 70 61 72 69 74 79 20 65 |parity e| 00021248 72 72 6f 72 20 20 20 20 |rror | 00021250 57 44 52 2f 46 6f 72 65 |WDR/Fore| 00021258 70 6c 61 6e 65 5f 62 75 |plane_bu| 00021260 73 20 65 72 72 6f 72 20 |s error | 00021268 20 20 20 20 20 20 | | .XXX[0x6] 0002126e ; -------------------------------------------------------------------------------------- 0002126e ; OMSI PASCAL Function 0002126e ; <LVAR -0x003 1(w)> 0002126e ; <LVAR -0x004 1(w) 2(r)> 0002126e ; <LVAR -0x005 1(r)> 0002126e ; <LVAR -0x006 @ 1(r) 2(r)> 0002126e ; <LVAR -0x010 @> 0002126e ; <LVAR -0x018 @> 0002126e ; <LVAR -0x020 @> 0002126e ; <LVAR -0x028 @> 0002126e ; <LVAR -0x030 @> 0002126e ; <LVAR -0x038 @> 0002126e ; <LVAR -0x040 @> 0002126e ; <LVAR -0x048 @> 0002126e ; <LVAR -0x050 @> 0002126e ; <LVAR -0x058 @> 0002126e ; <LVAR -0x060 @> 0002126e ; <LVAR -0x068 @> 0002126e ; <LVAR -0x070 @> 0002126e ; <LVAR -0x078 @> 0002126e ; <LVAR -0x080 @> 0002126e ; <LVAR -0x088 @> 0002126e ; <LVAR -0x090 @> 0002126e ; -------------------------------------------------------------------------------------- 0002126e 4e 56 ff 00 |NV | LINK.W A6,#0xff00 00021272 bf d5 | | CMPA.L (A5),A7 00021274 62 06 |b | BHI 0x2127c 00021276 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002127a 4e 76 |Nv | TRAPV 0002127c de fc 00 70 | p | ADDA.W #0x70,A7 00021280 48 e7 ff e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021284 45 ee ff fa |E | LEA.L (A6-0x6),A2 00021288 78 40 |x@ | MOVEQ.L #0x40,D4 0002128a 42 27 |B' | CLR.B -(A7) 0002128c 48 52 |HR | PEA.L (A2) 0002128e 4e b9 00 02 22 0c |N " | JSR exp_READ_TRACE_ADDRESS.IOC(Sw_1, &Sr_2) 00021294 5c 4f |\O | ADDQ.L #0x6,A7 00021296 42 80 |B | CLR.L D0 00021298 10 12 | | MOVE.B (A2),D0 0002129a e1 40 | @ | ASL.W #0x8,D0 0002129c 42 81 |B | CLR.L D1 0002129e 12 2e ff fb | . | MOVE.B (A6-0x5),D1 000212a2 d2 40 | @ | ADD.W D0,D1 000212a4 3a 01 |: | MOVE.W D1,D5 000212a6 42 80 |B | CLR.L D0 000212a8 30 05 |0 | MOVE.W D5,D0 000212aa 90 84 | | SUB.L D4,D0 000212ac 55 80 |U | SUBQ.L #0x2,D0 000212ae 02 80 00 00 07 ff | | ANDI.L #0x000007ff,D0 000212b4 3a 00 |: | MOVE.W D0,D5 000212b6 30 05 |0 | MOVE.W D5,D0 000212b8 e0 48 | H | LSR.W #0x8,D0 000212ba 1d 40 ff fc | @ | MOVE.B D0,(A6-0x4) 000212be 30 05 |0 | MOVE.W D5,D0 000212c0 02 40 00 ff | @ | ANDI.W #0x00ff,D0 000212c4 1d 40 ff fd | @ | MOVE.B D0,(A6-0x3) 000212c8 3f 2e ff fc |?. | MOVE.W (A6-0x4),-(A7) 000212cc 42 27 |B' | CLR.B -(A7) 000212ce 4e b9 00 02 22 50 |N "P | JSR exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1) 000212d4 58 4f |XO | ADDQ.L #0x4,A7 000212d6 48 6e ff 78 |Hn x | PEA.L (A6-0x88) 000212da 48 6e ff 80 |Hn | PEA.L (A6-0x80) 000212de 48 6e ff 88 |Hn | PEA.L (A6-0x78) 000212e2 48 6e ff 90 |Hn | PEA.L (A6-0x70) 000212e6 48 6e ff 98 |Hn | PEA.L (A6-0x68) 000212ea 48 6e ff a0 |Hn | PEA.L (A6-0x60) 000212ee 48 6e ff a8 |Hn | PEA.L (A6-0x58) 000212f2 48 6e ff b0 |Hn | PEA.L (A6-0x50) 000212f6 48 6e ff b8 |Hn | PEA.L (A6-0x48) 000212fa 48 6e ff c0 |Hn | PEA.L (A6-0x40) 000212fe 48 6e ff c8 |Hn | PEA.L (A6-0x38) 00021302 48 6e ff d0 |Hn | PEA.L (A6-0x30) 00021306 48 6e ff d8 |Hn | PEA.L (A6-0x28) 0002130a 48 6e ff e0 |Hn | PEA.L (A6-0x20) 0002130e 48 6e ff e8 |Hn | PEA.L (A6-0x18) 00021312 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00021316 4e b9 00 02 21 da |N ! | JSR exp_READ_TRACE_BLOCK.IOC(&Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8) 0002131c de c4 | | ADDA.W D4,A7 0002131e 7c 00 || | MOVEQ.L #0x00,D6 00021320 7e 00 |~ | MOVEQ.L #0x00,D7 00021322 20 06 | | MOVE.L D6,D0 00021324 e5 80 | | ASL.L #0x2,D0 00021326 44 80 |D | NEG.L D0 00021328 06 80 00 00 00 3f | ? | ADDI.L #0x0000003f,D0 0002132e 90 87 | | SUB.L D7,D0 00021330 0c 80 00 00 00 3f | ? | CMPI.L #0x0000003f,D0 00021336 63 02 |c | BLS 0x2133a 00021338 4e 4f |NO | TRAP #15 0002133a e3 80 | | ASL.L #0x1,D0 0002133c 41 f9 00 02 24 7c |A $| | LEA.L 0x2247c,A0 00021342 0c 86 00 00 00 0f | | CMPI.L #0x0000000f,D6 00021348 63 02 |c | BLS 0x2134c 0002134a 4e 4f |NO | TRAP #15 0002134c 22 06 |" | MOVE.L D6,D1 0002134e e7 81 | | ASL.L #0x3,D1 00021350 43 ee ff 70 |C p | LEA.L (A6-0x90),A1 00021354 24 07 |$ | MOVE.L D7,D2 00021356 e3 82 | | ASL.L #0x1,D2 00021358 0c 82 00 00 00 07 | | CMPI.L #0x00000007,D2 0002135e 63 02 |c | BLS 0x21362 00021360 4e 4f |NO | TRAP #15 00021362 43 f1 18 00 |C | LEA.L (A1+D1.L),A1 00021366 42 81 |B | CLR.L D1 00021368 12 31 28 08 | 1( | MOVE.B (A1+D2.L+#0x8),D1 0002136c e1 41 | A | ASL.W #0x8,D1 0002136e 52 82 |R | ADDQ.L #0x1,D2 00021370 0c 82 00 00 00 07 | | CMPI.L #0x00000007,D2 00021376 63 02 |c | BLS 0x2137a 00021378 4e 4f |NO | TRAP #15 0002137a 42 83 |B | CLR.L D3 0002137c 16 31 28 08 | 1( | MOVE.B (A1+D2.L+#0x8),D3 00021380 d6 41 | A | ADD.W D1,D3 00021382 31 83 08 08 |1 | MOVE.W D3,(A0+D0.L+#0x8) 00021386 52 87 |R | ADDQ.L #0x1,D7 00021388 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 0002138e 6f 92 |o | BLE 0x21322 00021390 52 86 |R | ADDQ.L #0x1,D6 00021392 0c 86 00 00 00 0f | | CMPI.L #0x0000000f,D6 00021398 6f 86 |o | BLE 0x21320 0002139a 3f 12 |? | MOVE.W (A2),-(A7) 0002139c 42 27 |B' | CLR.B -(A7) 0002139e 4e b9 00 02 22 50 |N "P | JSR exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1) 000213a4 58 4f |XO | ADDQ.L #0x4,A7 000213a6 4c df 07 ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2 000213aa 4e 5e |N^ | UNLK A6 000213ac 4e 75 |Nu | RTS 000213ae ; -------------------------------------------------------------------------------------- 000213ae ; OMSI PASCAL Function 000213ae ; <LVAR 0x010 1(r)> 000213ae ; <LVAR 0x00c 4(r)> 000213ae ; <LVAR 0x00a 1(r)> 000213ae ; <LVAR 0x008 1(r)> 000213ae ; -------------------------------------------------------------------------------------- 000213ae 4e 56 ff b0 |NV | LINK.W A6,#0xffb0 ; Spelunked 000213b2 bf d5 | | CMPA.L (A5),A7 000213b4 62 06 |b | BHI 0x213bc 000213b6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000213ba 4e 76 |Nv | TRAPV 000213bc de fc 00 4e | N | ADDA.W #0x4e,A7 000213c0 48 e7 f0 80 |H | MOVEM.L A0+D3+D2+D1+D0,-(A7) 000213c4 76 01 |v | MOVEQ.L #0x01,D3 000213c6 70 00 |p | MOVEQ.L #0x00,D0 000213c8 22 2e 00 0c |". | MOVE.L (A6+0xc),D1 000213cc 0c 81 00 00 00 07 | | CMPI.L #0x00000007,D1 000213d2 63 02 |c | BLS 0x213d6 000213d4 4e 4f |NO | TRAP #15 000213d6 e3 81 | | ASL.L #0x1,D1 000213d8 41 fa fd 1c |A | LEA.L 0x210f6,A0 000213dc 42 82 |B | CLR.L D2 000213de 14 2e 00 10 | . | MOVE.B (A6+0x10),D2 000213e2 c4 70 18 00 | p | AND.W (A0+D1.L),D2 000213e6 67 02 |g | BEQ 0x213ea 000213e8 52 00 |R | ADDQ.B #0x1,D0 000213ea b0 2e 00 0a | . | CMP.B (A6+0xa),D0 000213ee 66 4c |fL | BNE 0x2143c 000213f0 20 6c 00 2c | l , | MOVEA.L (A4+0x2c),A0 000213f4 52 90 |R | ADDQ.L #0x1,(A0) 000213f6 20 6c 00 30 | l 0 | MOVEA.L (A4+0x30),A0 000213fa 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000213fe 48 80 |H | EXTB.W D0 00021400 11 83 00 00 | | MOVE.B D3,(A0+D0.W) 00021404 20 6c 00 28 | l ( | MOVEA.L (A4+0x28),A0 00021408 10 80 | | MOVE.B D0,(A0) 0002140a c1 fc 00 2a | * | MULS.W #0x2a,D0 0002140e 41 fa f5 ae |A | LEA.L 0x209be,A0 00021412 41 f0 00 28 |A ( | LEA.L (A0+D0.W+#0x28),A0 00021416 70 09 |p | MOVEQ.L #0x09,D0 00021418 2f 20 |/ | MOVE.L -(A0),-(A7) 0002141a 51 c8 ff fc |Q | DBF D0,0x21418 0002141e 59 4f |YO | SUBQ.L #0x4,A7 00021420 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021424 3f 03 |? | MOVE.W D3,-(A7) 00021426 3f 3c 00 28 |?< ( | MOVE.W #0x28,-(A7) 0002142a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021430 50 4f |PO | ADDQ.L #0x8,A7 00021432 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021438 de fc 00 2c | , | ADDA.W #0x2c,A7 0002143c 4c df 01 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0 00021440 4e 5e |N^ | UNLK A6 00021442 4e 75 |Nu | RTS 00021444 ; -------------------------------------------------------------------------------------- 00021444 ; OMSI PASCAL Function 00021444 ; <LVAR 0x00c 4(r)> 00021444 ; <LVAR -0x002 @ 1(r)> 00021444 ; <LVAR -0x003 @> 00021444 ; <LVAR -0x005 @ 1(r)> 00021444 ; <LVAR -0x006 @ 1(r)> 00021444 ; <LVAR -0x007 @ 1(r)> 00021444 ; <LVAR -0x008 @ 1(rw)> 00021444 ; <LVAR -0x00a 1(r)> 00021444 ; <LVAR -0x00e @> 00021444 ; <LVAR -0x013 1(r)> 00021444 ; <LVAR -0x014 @ 1(r)> 00021444 ; <LVAR -0x015 1(r)> 00021444 ; <LVAR -0x019 @> 00021444 ; <LVAR -0x01d 1(r)> 00021444 ; <LVAR -0x01e @ 1(r)> 00021444 ; <LVAR -0x01f 1(w)> 00021444 ; <LVAR -0x020 @ 1(w) 2(r)> 00021444 ; -------------------------------------------------------------------------------------- 00021444 4e 56 ff 9a |NV | LINK.W A6,#0xff9a 00021448 bf d5 | | CMPA.L (A5),A7 0002144a 62 06 |b | BHI 0x21452 0002144c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021450 4e 76 |Nv | TRAPV 00021452 de fc 00 46 | F | ADDA.W #0x46,A7 00021456 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002145a 43 ee ff e0 |C | LEA.L (A6-0x20),A1 0002145e 45 fa ff 4e |E N | LEA.L 0x213ae,A2 00021462 47 ee ff f8 |G | LEA.L (A6-0x8),A3 00021466 74 01 |t | MOVEQ.L #0x01,D2 00021468 76 0a |v | MOVEQ.L #0x0a,D3 0002146a 78 0c |x | MOVEQ.L #0x0c,D4 0002146c 7a 02 |z | MOVEQ.L #0x02,D5 0002146e 7c 03 || | MOVEQ.L #0x03,D6 00021470 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00021474 42 90 |B | CLR.L (A0) 00021476 7e 00 |~ | MOVEQ.L #0x00,D7 00021478 30 39 00 02 24 84 |09 $ | MOVE.W 0x22484,D0 0002147e 02 40 40 00 | @@ | ANDI.W #0x4000,D0 00021482 67 02 |g | BEQ 0x21486 00021484 52 07 |R | ADDQ.B #0x1,D7 00021486 30 39 00 02 24 86 |09 $ | MOVE.W 0x22486,D0 0002148c 02 40 3f 00 | @? | ANDI.W #0x3f00,D0 00021490 e0 48 | H | LSR.W #0x8,D0 00021492 12 80 | | MOVE.B D0,(A1) 00021494 30 39 00 02 24 86 |09 $ | MOVE.W 0x22486,D0 0002149a 02 40 00 ff | @ | ANDI.W #0x00ff,D0 0002149e 1d 40 ff e1 | @ | MOVE.B D0,(A6-0x1f) 000214a2 3f 11 |? | MOVE.W (A1),-(A7) 000214a4 42 27 |B' | CLR.B -(A7) 000214a6 48 6e ff ec |Hn | PEA.L (A6-0x14) 000214aa 48 6e ff fd |Hn | PEA.L (A6-0x3) 000214ae 4e b9 00 02 20 78 |N x | JSR exp_READ_WCS.TYP(Sw_2, Sw_1, &Sr_6, &Fr) 000214b4 de c3 | | ADDA.W D3,A7 000214b6 3e 91 |> | MOVE.W (A1),(A7) 000214b8 42 27 |B' | CLR.B -(A7) 000214ba 48 6e ff e2 |Hn | PEA.L (A6-0x1e) 000214be 48 6e ff fd |Hn | PEA.L (A6-0x3) 000214c2 4e b9 00 02 20 b4 |N | JSR exp_READ_WCS.VAL(Sw_2, Sw_1, &Sr_5, &Fr) 000214c8 de c4 | | ADDA.W D4,A7 000214ca 30 39 00 02 24 88 |09 $ | MOVE.W 0x22488,D0 000214d0 02 40 3f 00 | @? | ANDI.W #0x3f00,D0 000214d4 e0 48 | H | LSR.W #0x8,D0 000214d6 12 80 | | MOVE.B D0,(A1) 000214d8 30 39 00 02 24 88 |09 $ | MOVE.W 0x22488,D0 000214de 02 40 00 ff | @ | ANDI.W #0x00ff,D0 000214e2 1d 40 ff e1 | @ | MOVE.B D0,(A6-0x1f) 000214e6 3f 11 |? | MOVE.W (A1),-(A7) 000214e8 42 27 |B' | CLR.B -(A7) 000214ea 48 6e ff f2 |Hn | PEA.L (A6-0xe) 000214ee 48 6e ff fd |Hn | PEA.L (A6-0x3) 000214f2 4e b9 00 02 20 78 |N x | JSR exp_READ_WCS.TYP(Sw_2, Sw_1, &Sr_6, &Fr) 000214f8 de c3 | | ADDA.W D3,A7 000214fa 3e 91 |> | MOVE.W (A1),(A7) 000214fc 42 27 |B' | CLR.B -(A7) 000214fe 48 6e ff e7 |Hn | PEA.L (A6-0x19) 00021502 48 6e ff fd |Hn | PEA.L (A6-0x3) 00021506 4e b9 00 02 20 b4 |N | JSR exp_READ_WCS.VAL(Sw_2, Sw_1, &Sr_5, &Fr) 0002150c de c3 | | ADDA.W D3,A7 0002150e 42 17 |B | CLR.B (A7) 00021510 48 53 |HS | PEA.L (A3) 00021512 4e b9 00 02 22 32 |N "2 | JSR exp_READ_PAREG.IOC(Sw_1, &Sr_1) 00021518 58 4f |XO | ADDQ.L #0x4,A7 0002151a 1e 93 | | MOVE.B (A3),(A7) 0002151c 48 78 00 04 |Hx | PEA.L 0x4 00021520 42 27 |B' | CLR.B -(A7) 00021522 1f 05 | | MOVE.B D5,-(A7) 00021524 28 49 |(I | MOVEA.L A1,A4 00021526 4e 92 |N | JSR (A2) 00021528 50 4f |PO | ADDQ.L #0x8,A7 0002152a 1e 93 | | MOVE.B (A3),(A7) 0002152c 48 78 00 05 |Hx | PEA.L 0x5 00021530 42 27 |B' | CLR.B -(A7) 00021532 1f 06 | | MOVE.B D6,-(A7) 00021534 28 49 |(I | MOVEA.L A1,A4 00021536 4e 92 |N | JSR (A2) 00021538 50 4f |PO | ADDQ.L #0x8,A7 0002153a 1e 93 | | MOVE.B (A3),(A7) 0002153c 48 78 00 06 |Hx | PEA.L 0x6 00021540 42 27 |B' | CLR.B -(A7) 00021542 1f 02 | | MOVE.B D2,-(A7) 00021544 28 49 |(I | MOVEA.L A1,A4 00021546 4e 92 |N | JSR (A2) 00021548 50 4f |PO | ADDQ.L #0x8,A7 0002154a 1e 93 | | MOVE.B (A3),(A7) 0002154c 48 78 00 07 |Hx | PEA.L 0x7 00021550 42 27 |B' | CLR.B -(A7) 00021552 42 27 |B' | CLR.B -(A7) 00021554 28 49 |(I | MOVEA.L A1,A4 00021556 4e 92 |N | JSR (A2) 00021558 de c3 | | ADDA.W D3,A7 0002155a 48 53 |HS | PEA.L (A3) 0002155c 4e b9 00 02 20 d2 |N | JSR exp_READ_PARITY.VAL(&Sr_1) 00021562 54 4f |TO | ADDQ.L #0x2,A7 00021564 1e 93 | | MOVE.B (A3),(A7) 00021566 48 78 00 00 |Hx | PEA.L 0x0 0002156a 42 27 |B' | CLR.B -(A7) 0002156c 1f 3c 00 04 | < | MOVE.B #0x04,-(A7) 00021570 28 49 |(I | MOVEA.L A1,A4 00021572 4e 92 |N | JSR (A2) 00021574 50 4f |PO | ADDQ.L #0x8,A7 00021576 1e 93 | | MOVE.B (A3),(A7) 00021578 48 78 00 01 |Hx | PEA.L 0x1 0002157c 42 27 |B' | CLR.B -(A7) 0002157e 1f 3c 00 05 | < | MOVE.B #0x05,-(A7) 00021582 28 49 |(I | MOVEA.L A1,A4 00021584 4e 92 |N | JSR (A2) 00021586 50 4f |PO | ADDQ.L #0x8,A7 00021588 1e 93 | | MOVE.B (A3),(A7) 0002158a 48 78 00 03 |Hx | PEA.L 0x3 0002158e 42 27 |B' | CLR.B -(A7) 00021590 1f 3c 00 06 | < | MOVE.B #0x06,-(A7) 00021594 28 49 |(I | MOVEA.L A1,A4 00021596 4e 92 |N | JSR (A2) 00021598 de c3 | | ADDA.W D3,A7 0002159a 42 80 |B | CLR.L D0 0002159c 10 2e ff e2 | . | MOVE.B (A6-0x1e),D0 000215a0 c0 46 | F | AND.W D6,D0 000215a2 b0 42 | B | CMP.W D2,D0 000215a4 66 22 |f" | BNE 0x215c8 000215a6 42 80 |B | CLR.L D0 000215a8 10 2e ff e3 | . | MOVE.B (A6-0x1d),D0 000215ac 02 40 00 f0 | @ | ANDI.W #0x00f0,D0 000215b0 0c 40 00 60 | @ ` | CMPI.W #0x0060,D0 000215b4 66 12 |f | BNE 0x215c8 000215b6 4a 07 |J | TST.B D7 000215b8 66 0e |f | BNE 0x215c8 000215ba 1f 13 | | MOVE.B (A3),-(A7) 000215bc 48 78 00 02 |Hx | PEA.L 0x2 000215c0 42 27 |B' | CLR.B -(A7) 000215c2 1f 3c 00 08 | < | MOVE.B #0x08,-(A7) 000215c6 60 0c |` | BRA 0x215d4 000215c8 1f 13 | | MOVE.B (A3),-(A7) 000215ca 48 78 00 02 |Hx | PEA.L 0x2 000215ce 42 27 |B' | CLR.B -(A7) 000215d0 1f 3c 00 07 | < | MOVE.B #0x07,-(A7) 000215d4 28 49 |(I | MOVEA.L A1,A4 000215d6 4e 92 |N | JSR (A2) 000215d8 de c3 | | ADDA.W D3,A7 000215da 42 80 |B | CLR.L D0 000215dc 10 13 | | MOVE.B (A3),D0 000215de 32 00 |2 | MOVE.W D0,D1 000215e0 02 41 00 04 | A | ANDI.W #0x0004,D1 000215e4 67 28 |g( | BEQ 0x2160e 000215e6 42 81 |B | CLR.L D1 000215e8 12 2e ff eb | . | MOVE.B (A6-0x15),D1 000215ec c2 45 | E | AND.W D5,D1 000215ee 66 0e |f | BNE 0x215fe 000215f0 1f 00 | | MOVE.B D0,-(A7) 000215f2 48 78 00 04 |Hx | PEA.L 0x4 000215f6 1f 02 | | MOVE.B D2,-(A7) 000215f8 1f 3c 00 09 | < | MOVE.B #0x09,-(A7) 000215fc 60 0a |` | BRA 0x21608 000215fe 1f 00 | | MOVE.B D0,-(A7) 00021600 48 78 00 04 |Hx | PEA.L 0x4 00021604 1f 02 | | MOVE.B D2,-(A7) 00021606 1f 03 | | MOVE.B D3,-(A7) 00021608 28 49 |(I | MOVEA.L A1,A4 0002160a 4e 92 |N | JSR (A2) 0002160c de c3 | | ADDA.W D3,A7 0002160e 48 53 |HS | PEA.L (A3) 00021610 4e b9 00 02 20 96 |N | JSR exp_READ_PARITY.TYP(&Sr_1) 00021616 54 4f |TO | ADDQ.L #0x2,A7 00021618 1e 93 | | MOVE.B (A3),(A7) 0002161a 48 78 00 00 |Hx | PEA.L 0x0 0002161e 42 27 |B' | CLR.B -(A7) 00021620 1f 3c 00 0b | < | MOVE.B #0x0b,-(A7) 00021624 28 49 |(I | MOVEA.L A1,A4 00021626 4e 92 |N | JSR (A2) 00021628 50 4f |PO | ADDQ.L #0x8,A7 0002162a 1e 93 | | MOVE.B (A3),(A7) 0002162c 48 78 00 01 |Hx | PEA.L 0x1 00021630 42 27 |B' | CLR.B -(A7) 00021632 1f 04 | | MOVE.B D4,-(A7) 00021634 28 49 |(I | MOVEA.L A1,A4 00021636 4e 92 |N | JSR (A2) 00021638 50 4f |PO | ADDQ.L #0x8,A7 0002163a 1e 93 | | MOVE.B (A3),(A7) 0002163c 48 78 00 03 |Hx | PEA.L 0x3 00021640 42 27 |B' | CLR.B -(A7) 00021642 1f 3c 00 0d | < | MOVE.B #0x0d,-(A7) 00021646 28 49 |(I | MOVEA.L A1,A4 00021648 4e 92 |N | JSR (A2) 0002164a de c3 | | ADDA.W D3,A7 0002164c 42 80 |B | CLR.L D0 0002164e 10 2e ff ec | . | MOVE.B (A6-0x14),D0 00021652 c0 46 | F | AND.W D6,D0 00021654 b0 42 | B | CMP.W D2,D0 00021656 66 22 |f" | BNE 0x2167a 00021658 42 80 |B | CLR.L D0 0002165a 10 2e ff ed | . | MOVE.B (A6-0x13),D0 0002165e 02 40 00 f0 | @ | ANDI.W #0x00f0,D0 00021662 0c 40 00 60 | @ ` | CMPI.W #0x0060,D0 00021666 66 12 |f | BNE 0x2167a 00021668 4a 07 |J | TST.B D7 0002166a 66 0e |f | BNE 0x2167a 0002166c 1f 13 | | MOVE.B (A3),-(A7) 0002166e 48 78 00 02 |Hx | PEA.L 0x2 00021672 42 27 |B' | CLR.B -(A7) 00021674 1f 3c 00 0f | < | MOVE.B #0x0f,-(A7) 00021678 60 0c |` | BRA 0x21686 0002167a 1f 13 | | MOVE.B (A3),-(A7) 0002167c 48 78 00 02 |Hx | PEA.L 0x2 00021680 42 27 |B' | CLR.B -(A7) 00021682 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00021686 28 49 |(I | MOVEA.L A1,A4 00021688 4e 92 |N | JSR (A2) 0002168a de c3 | | ADDA.W D3,A7 0002168c 42 80 |B | CLR.L D0 0002168e 10 13 | | MOVE.B (A3),D0 00021690 32 00 |2 | MOVE.W D0,D1 00021692 c2 45 | E | AND.W D5,D1 00021694 67 2a |g* | BEQ 0x216c0 00021696 42 81 |B | CLR.L D1 00021698 12 2e ff f6 | . | MOVE.B (A6-0xa),D1 0002169c c2 42 | B | AND.W D2,D1 0002169e 66 0e |f | BNE 0x216ae 000216a0 1f 00 | | MOVE.B D0,-(A7) 000216a2 48 78 00 05 |Hx | PEA.L 0x5 000216a6 1f 02 | | MOVE.B D2,-(A7) 000216a8 1f 3c 00 10 | < | MOVE.B #0x10,-(A7) 000216ac 60 0c |` | BRA 0x216ba 000216ae 1f 00 | | MOVE.B D0,-(A7) 000216b0 48 78 00 05 |Hx | PEA.L 0x5 000216b4 1f 02 | | MOVE.B D2,-(A7) 000216b6 1f 3c 00 11 | < | MOVE.B #0x11,-(A7) 000216ba 28 49 |(I | MOVEA.L A1,A4 000216bc 4e 92 |N | JSR (A2) 000216be de c3 | | ADDA.W D3,A7 000216c0 48 53 |HS | PEA.L (A3) 000216c2 4e b9 00 02 20 56 |N V | JSR exp_GET_MISC_ERRORS.SEQ(&Sr_1) 000216c8 54 4f |TO | ADDQ.L #0x2,A7 000216ca 1e 93 | | MOVE.B (A3),(A7) 000216cc 48 78 00 03 |Hx | PEA.L 0x3 000216d0 42 27 |B' | CLR.B -(A7) 000216d2 1f 3c 00 12 | < | MOVE.B #0x12,-(A7) 000216d6 28 49 |(I | MOVEA.L A1,A4 000216d8 4e 92 |N | JSR (A2) 000216da 50 4f |PO | ADDQ.L #0x8,A7 000216dc 1e 93 | | MOVE.B (A3),(A7) 000216de 48 78 00 04 |Hx | PEA.L 0x4 000216e2 42 27 |B' | CLR.B -(A7) 000216e4 1f 3c 00 13 | < | MOVE.B #0x13,-(A7) 000216e8 28 49 |(I | MOVEA.L A1,A4 000216ea 4e 92 |N | JSR (A2) 000216ec 50 4f |PO | ADDQ.L #0x8,A7 000216ee 1e 93 | | MOVE.B (A3),(A7) 000216f0 48 78 00 05 |Hx | PEA.L 0x5 000216f4 42 27 |B' | CLR.B -(A7) 000216f6 1f 3c 00 14 | < | MOVE.B #0x14,-(A7) 000216fa 28 49 |(I | MOVEA.L A1,A4 000216fc 4e 92 |N | JSR (A2) 000216fe 50 4f |PO | ADDQ.L #0x8,A7 00021700 1e 93 | | MOVE.B (A3),(A7) 00021702 48 78 00 06 |Hx | PEA.L 0x6 00021706 42 27 |B' | CLR.B -(A7) 00021708 1f 3c 00 15 | < | MOVE.B #0x15,-(A7) 0002170c 28 49 |(I | MOVEA.L A1,A4 0002170e 4e 92 |N | JSR (A2) 00021710 50 4f |PO | ADDQ.L #0x8,A7 00021712 1e 93 | | MOVE.B (A3),(A7) 00021714 48 78 00 07 |Hx | PEA.L 0x7 00021718 42 27 |B' | CLR.B -(A7) 0002171a 1f 3c 00 16 | < | MOVE.B #0x16,-(A7) 0002171e 28 49 |(I | MOVEA.L A1,A4 00021720 4e 92 |N | JSR (A2) 00021722 de c3 | | ADDA.W D3,A7 00021724 48 6e ff fe |Hn | PEA.L (A6-0x2) 00021728 4e b9 00 02 20 40 |N @ | JSR exp_HALT.SEQ(&Fr) 0002172e 58 4f |XO | ADDQ.L #0x4,A7 00021730 16 ae ff fe | | MOVE.B (A6-0x2),(A3) 00021734 1f 13 | | MOVE.B (A3),-(A7) 00021736 48 78 00 07 |Hx | PEA.L 0x7 0002173a 1f 02 | | MOVE.B D2,-(A7) 0002173c 1f 3c 00 17 | < | MOVE.B #0x17,-(A7) 00021740 28 49 |(I | MOVEA.L A1,A4 00021742 4e 92 |N | JSR (A2) 00021744 50 4f |PO | ADDQ.L #0x8,A7 00021746 42 17 |B | CLR.B (A7) 00021748 48 53 |HS | PEA.L (A3) 0002174a 4e b9 00 02 20 22 |N " | JSR exp_READ_PAREG.FIU(Sw_1, &Sr_1) 00021750 58 4f |XO | ADDQ.L #0x4,A7 00021752 1e 93 | | MOVE.B (A3),(A7) 00021754 48 78 00 00 |Hx | PEA.L 0x0 00021758 42 27 |B' | CLR.B -(A7) 0002175a 1f 3c 00 18 | < | MOVE.B #0x18,-(A7) 0002175e 28 49 |(I | MOVEA.L A1,A4 00021760 4e 92 |N | JSR (A2) 00021762 50 4f |PO | ADDQ.L #0x8,A7 00021764 1e 93 | | MOVE.B (A3),(A7) 00021766 48 78 00 01 |Hx | PEA.L 0x1 0002176a 42 27 |B' | CLR.B -(A7) 0002176c 1f 3c 00 19 | < | MOVE.B #0x19,-(A7) 00021770 28 49 |(I | MOVEA.L A1,A4 00021772 4e 92 |N | JSR (A2) 00021774 50 4f |PO | ADDQ.L #0x8,A7 00021776 1e 93 | | MOVE.B (A3),(A7) 00021778 48 78 00 02 |Hx | PEA.L 0x2 0002177c 42 27 |B' | CLR.B -(A7) 0002177e 1f 3c 00 1a | < | MOVE.B #0x1a,-(A7) 00021782 28 49 |(I | MOVEA.L A1,A4 00021784 4e 92 |N | JSR (A2) 00021786 50 4f |PO | ADDQ.L #0x8,A7 00021788 1e 93 | | MOVE.B (A3),(A7) 0002178a 48 78 00 03 |Hx | PEA.L 0x3 0002178e 42 27 |B' | CLR.B -(A7) 00021790 1f 3c 00 1b | < | MOVE.B #0x1b,-(A7) 00021794 28 49 |(I | MOVEA.L A1,A4 00021796 4e 92 |N | JSR (A2) 00021798 50 4f |PO | ADDQ.L #0x8,A7 0002179a 1e 93 | | MOVE.B (A3),(A7) 0002179c 48 78 00 04 |Hx | PEA.L 0x4 000217a0 42 27 |B' | CLR.B -(A7) 000217a2 1f 3c 00 1c | < | MOVE.B #0x1c,-(A7) 000217a6 28 49 |(I | MOVEA.L A1,A4 000217a8 4e 92 |N | JSR (A2) 000217aa 50 4f |PO | ADDQ.L #0x8,A7 000217ac 1e 93 | | MOVE.B (A3),(A7) 000217ae 48 78 00 05 |Hx | PEA.L 0x5 000217b2 42 27 |B' | CLR.B -(A7) 000217b4 1f 3c 00 1d | < | MOVE.B #0x1d,-(A7) 000217b8 28 49 |(I | MOVEA.L A1,A4 000217ba 4e 92 |N | JSR (A2) 000217bc 50 4f |PO | ADDQ.L #0x8,A7 000217be 1e 93 | | MOVE.B (A3),(A7) 000217c0 48 78 00 06 |Hx | PEA.L 0x6 000217c4 42 27 |B' | CLR.B -(A7) 000217c6 1f 3c 00 1e | < | MOVE.B #0x1e,-(A7) 000217ca 28 49 |(I | MOVEA.L A1,A4 000217cc 4e 92 |N | JSR (A2) 000217ce 50 4f |PO | ADDQ.L #0x8,A7 000217d0 1e 93 | | MOVE.B (A3),(A7) 000217d2 48 78 00 07 |Hx | PEA.L 0x7 000217d6 42 27 |B' | CLR.B -(A7) 000217d8 1f 3c 00 1f | < | MOVE.B #0x1f,-(A7) 000217dc 28 49 |(I | MOVEA.L A1,A4 000217de 4e 92 |N | JSR (A2) 000217e0 5c 4f |\O | ADDQ.L #0x6,A7 000217e2 1e 84 | | MOVE.B D4,(A7) 000217e4 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 000217ea 54 4f |TO | ADDQ.L #0x2,A7 000217ec 4a 1f |J | TST.B (A7)+ 000217ee 67 52 |gR | BEQ 0x21842 000217f0 1f 04 | | MOVE.B D4,-(A7) 000217f2 48 6e ff f9 |Hn | PEA.L (A6-0x7) 000217f6 48 6e ff fa |Hn | PEA.L (A6-0x6) 000217fa 48 6e ff fb |Hn | PEA.L (A6-0x5) 000217fe 4e b9 00 02 21 10 |N ! | JSR 0x22110 00021804 de c4 | | ADDA.W D4,A7 00021806 1e ae ff f9 | | MOVE.B (A6-0x7),(A7) 0002180a 48 78 00 07 |Hx | PEA.L 0x7 0002180e 1f 02 | | MOVE.B D2,-(A7) 00021810 1f 3c 00 20 | < | MOVE.B #0x20,-(A7) 00021814 28 49 |(I | MOVEA.L A1,A4 00021816 4e 92 |N | JSR (A2) 00021818 50 4f |PO | ADDQ.L #0x8,A7 0002181a 1e ae ff fa | | MOVE.B (A6-0x6),(A7) 0002181e 48 78 00 07 |Hx | PEA.L 0x7 00021822 1f 02 | | MOVE.B D2,-(A7) 00021824 1f 3c 00 21 | < ! | MOVE.B #0x21,-(A7) 00021828 28 49 |(I | MOVEA.L A1,A4 0002182a 4e 92 |N | JSR (A2) 0002182c 50 4f |PO | ADDQ.L #0x8,A7 0002182e 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 00021832 48 78 00 07 |Hx | PEA.L 0x7 00021836 1f 02 | | MOVE.B D2,-(A7) 00021838 1f 3c 00 22 | < " | MOVE.B #0x22,-(A7) 0002183c 28 49 |(I | MOVEA.L A1,A4 0002183e 4e 92 |N | JSR (A2) 00021840 de c3 | | ADDA.W D3,A7 00021842 55 4f |UO | SUBQ.L #0x2,A7 00021844 1f 3c 00 0d | < | MOVE.B #0x0d,-(A7) 00021848 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 0002184e 54 4f |TO | ADDQ.L #0x2,A7 00021850 4a 1f |J | TST.B (A7)+ 00021852 67 54 |gT | BEQ 0x218a8 00021854 1f 3c 00 0d | < | MOVE.B #0x0d,-(A7) 00021858 48 6e ff f9 |Hn | PEA.L (A6-0x7) 0002185c 48 6e ff fa |Hn | PEA.L (A6-0x6) 00021860 48 6e ff fb |Hn | PEA.L (A6-0x5) 00021864 4e b9 00 02 21 10 |N ! | JSR 0x22110 0002186a de c4 | | ADDA.W D4,A7 0002186c 1e ae ff f9 | | MOVE.B (A6-0x7),(A7) 00021870 48 78 00 07 |Hx | PEA.L 0x7 00021874 1f 02 | | MOVE.B D2,-(A7) 00021876 1f 3c 00 23 | < # | MOVE.B #0x23,-(A7) 0002187a 28 49 |(I | MOVEA.L A1,A4 0002187c 4e 92 |N | JSR (A2) 0002187e 50 4f |PO | ADDQ.L #0x8,A7 00021880 1e ae ff fa | | MOVE.B (A6-0x6),(A7) 00021884 48 78 00 07 |Hx | PEA.L 0x7 00021888 1f 02 | | MOVE.B D2,-(A7) 0002188a 1f 3c 00 24 | < $ | MOVE.B #0x24,-(A7) 0002188e 28 49 |(I | MOVEA.L A1,A4 00021890 4e 92 |N | JSR (A2) 00021892 50 4f |PO | ADDQ.L #0x8,A7 00021894 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 00021898 48 78 00 07 |Hx | PEA.L 0x7 0002189c 1f 02 | | MOVE.B D2,-(A7) 0002189e 1f 3c 00 25 | < % | MOVE.B #0x25,-(A7) 000218a2 28 49 |(I | MOVEA.L A1,A4 000218a4 4e 92 |N | JSR (A2) 000218a6 de c3 | | ADDA.W D3,A7 000218a8 55 4f |UO | SUBQ.L #0x2,A7 000218aa 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 000218ae 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 000218b4 54 4f |TO | ADDQ.L #0x2,A7 000218b6 4a 1f |J | TST.B (A7)+ 000218b8 67 54 |gT | BEQ 0x2190e 000218ba 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 000218be 48 6e ff f9 |Hn | PEA.L (A6-0x7) 000218c2 48 6e ff fa |Hn | PEA.L (A6-0x6) 000218c6 48 6e ff fb |Hn | PEA.L (A6-0x5) 000218ca 4e b9 00 02 21 10 |N ! | JSR 0x22110 000218d0 de c4 | | ADDA.W D4,A7 000218d2 1e ae ff f9 | | MOVE.B (A6-0x7),(A7) 000218d6 48 78 00 07 |Hx | PEA.L 0x7 000218da 1f 02 | | MOVE.B D2,-(A7) 000218dc 1f 3c 00 26 | < & | MOVE.B #0x26,-(A7) 000218e0 28 49 |(I | MOVEA.L A1,A4 000218e2 4e 92 |N | JSR (A2) 000218e4 50 4f |PO | ADDQ.L #0x8,A7 000218e6 1e ae ff fa | | MOVE.B (A6-0x6),(A7) 000218ea 48 78 00 07 |Hx | PEA.L 0x7 000218ee 1f 02 | | MOVE.B D2,-(A7) 000218f0 1f 3c 00 27 | < ' | MOVE.B #0x27,-(A7) 000218f4 28 49 |(I | MOVEA.L A1,A4 000218f6 4e 92 |N | JSR (A2) 000218f8 50 4f |PO | ADDQ.L #0x8,A7 000218fa 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 000218fe 48 78 00 07 |Hx | PEA.L 0x7 00021902 1f 02 | | MOVE.B D2,-(A7) 00021904 1f 3c 00 28 | < ( | MOVE.B #0x28,-(A7) 00021908 28 49 |(I | MOVEA.L A1,A4 0002190a 4e 92 |N | JSR (A2) 0002190c de c3 | | ADDA.W D3,A7 0002190e 55 4f |UO | SUBQ.L #0x2,A7 00021910 1f 3c 00 0f | < | MOVE.B #0x0f,-(A7) 00021914 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 0002191a 54 4f |TO | ADDQ.L #0x2,A7 0002191c 4a 1f |J | TST.B (A7)+ 0002191e 67 54 |gT | BEQ 0x21974 00021920 1f 3c 00 0f | < | MOVE.B #0x0f,-(A7) 00021924 48 6e ff f9 |Hn | PEA.L (A6-0x7) 00021928 48 6e ff fa |Hn | PEA.L (A6-0x6) 0002192c 48 6e ff fb |Hn | PEA.L (A6-0x5) 00021930 4e b9 00 02 21 10 |N ! | JSR 0x22110 00021936 de c4 | | ADDA.W D4,A7 00021938 1e ae ff f9 | | MOVE.B (A6-0x7),(A7) 0002193c 48 78 00 07 |Hx | PEA.L 0x7 00021940 1f 02 | | MOVE.B D2,-(A7) 00021942 1f 3c 00 29 | < ) | MOVE.B #0x29,-(A7) 00021946 28 49 |(I | MOVEA.L A1,A4 00021948 4e 92 |N | JSR (A2) 0002194a 50 4f |PO | ADDQ.L #0x8,A7 0002194c 1e ae ff fa | | MOVE.B (A6-0x6),(A7) 00021950 48 78 00 07 |Hx | PEA.L 0x7 00021954 1f 02 | | MOVE.B D2,-(A7) 00021956 1f 3c 00 2a | < * | MOVE.B #0x2a,-(A7) 0002195a 28 49 |(I | MOVEA.L A1,A4 0002195c 4e 92 |N | JSR (A2) 0002195e 50 4f |PO | ADDQ.L #0x8,A7 00021960 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 00021964 48 78 00 07 |Hx | PEA.L 0x7 00021968 1f 02 | | MOVE.B D2,-(A7) 0002196a 1f 3c 00 2b | < + | MOVE.B #0x2b,-(A7) 0002196e 28 49 |(I | MOVEA.L A1,A4 00021970 4e 92 |N | JSR (A2) 00021972 de c3 | | ADDA.W D3,A7 00021974 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00021978 4e 5e |N^ | UNLK A6 0002197a 4e 75 |Nu | RTS 0002197c ; -------------------------------------------------------------------------------------- 0002197c ; OMSI PASCAL Function 0002197c ; <LVAR 0x012 1(rw)> 0002197c ; <LVAR 0x00e 4(r)> 0002197c ; <LVAR 0x00a 4(r)> 0002197c ; <LVAR 0x008 1(r)> 0002197c ; -------------------------------------------------------------------------------------- 0002197c 4e 56 ff bc |NV | LINK.W A6,#0xffbc 00021980 bf d5 | | CMPA.L (A5),A7 00021982 62 06 |b | BHI 0x2198a 00021984 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021988 4e 76 |Nv | TRAPV 0002198a de fc 00 36 | 6 | ADDA.W #0x36,A7 0002198e 48 e7 ff e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021992 43 ee 00 12 |C | LEA.L (A6+0x12),A1 00021996 45 fa f0 26 |E & | LEA.L 0x209be,A2 0002199a 76 0b |v | MOVEQ.L #0x0b,D3 0002199c 78 01 |x | MOVEQ.L #0x01,D4 0002199e 7a 2a |z* | MOVEQ.L #0x2a,D5 000219a0 7e 01 |~ | MOVEQ.L #0x01,D7 000219a2 10 07 | | MOVE.B D7,D0 000219a4 48 80 |H | EXTB.W D0 000219a6 42 36 00 f4 |B6 | CLR.B (A6+D0.W-#0xc) 000219aa 52 07 |R | ADDQ.B #0x1,D7 000219ac be 03 | | CMP.B D3,D7 000219ae 6f f2 |o | BLE 0x219a2 000219b0 4a ae 00 0a |J | TST.L (A6+0xa) 000219b4 66 04 |f | BNE 0x219ba 000219b6 42 11 |B | CLR.B (A1) 000219b8 60 66 |`f | BRA 0x21a20 000219ba 20 2e 00 0a | . | MOVE.L (A6+0xa),D0 000219be b0 84 | | CMP.L D4,D0 000219c0 66 10 |f | BNE 0x219d2 000219c2 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000219c6 48 80 |H | EXTB.W D0 000219c8 c1 c5 | | MULS.W D5,D0 000219ca 20 4a | J | MOVEA.L A2,A0 000219cc 12 b0 00 29 | ) | MOVE.B (A0+D0.W+#0x29),(A1) 000219d0 60 4e |`N | BRA 0x21a20 000219d2 7c 04 || | MOVEQ.L #0x04,D6 000219d4 10 06 | | MOVE.B D6,D0 000219d6 48 80 |H | EXTB.W D0 000219d8 c1 c5 | | MULS.W D5,D0 000219da 20 4a | J | MOVEA.L A2,A0 000219dc 12 30 00 29 | 0 ) | MOVE.B (A0+D0.W+#0x29),D1 000219e0 48 81 |H | EXTB.W D1 000219e2 20 4a | J | MOVEA.L A2,A0 000219e4 14 30 00 29 | 0 ) | MOVE.B (A0+D0.W+#0x29),D2 000219e8 48 82 |H | EXTB.W D2 000219ea 20 6e 00 0e | n | MOVEA.L (A6+0xe),A0 000219ee 10 06 | | MOVE.B D6,D0 000219f0 48 80 |H | EXTB.W D0 000219f2 14 36 20 f4 | 6 | MOVE.B (A6+D2.W-#0xc),D2 000219f6 84 30 00 00 | 0 | OR.B (A0+D0.W),D2 000219fa 48 82 |H | EXTB.W D2 000219fc 45 84 |E | CHK.W D4,D2 000219fe 1d 82 10 f4 | | MOVE.B D2,(A6+D1.W-#0xc) 00021a02 52 06 |R | ADDQ.B #0x1,D6 00021a04 0c 06 00 2b | + | CMPI.B #0x2b,D6 00021a08 6f ca |o | BLE 0x219d4 00021a0a 7e 01 |~ | MOVEQ.L #0x01,D7 00021a0c 10 07 | | MOVE.B D7,D0 00021a0e 48 80 |H | EXTB.W D0 00021a10 4a 36 00 f4 |J6 | TST.B (A6+D0.W-#0xc) 00021a14 67 04 |g | BEQ 0x21a1a 00021a16 12 87 | | MOVE.B D7,(A1) 00021a18 60 06 |` | BRA 0x21a20 00021a1a 52 07 |R | ADDQ.B #0x1,D7 00021a1c be 03 | | CMP.B D3,D7 00021a1e 6f ec |o | BLE 0x21a0c 00021a20 4c df 07 ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2 00021a24 4e 5e |N^ | UNLK A6 00021a26 4e 75 |Nu | RTS 00021a28 ; -------------------------------------------------------------------------------------- 00021a28 ; OMSI PASCAL Function 00021a28 ; <LVAR 0x00a 4(w)> 00021a28 ; <LVAR 0x008 1(r)> 00021a28 ; -------------------------------------------------------------------------------------- 00021a28 4e 56 ff c4 |NV | LINK.W A6,#0xffc4 00021a2c bf d5 | | CMPA.L (A5),A7 00021a2e 62 06 |b | BHI 0x21a36 00021a30 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021a34 4e 76 |Nv | TRAPV 00021a36 de fc 00 3a | : | ADDA.W #0x3a,A7 00021a3a 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00021a3e 72 1e |r | MOVEQ.L #0x1e,D1 00021a40 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00021a44 48 80 |H | EXTB.W D0 00021a46 c1 c1 | | MULS.W D1,D0 00021a48 41 fa f6 bc |A | LEA.L 0x21106,A0 00021a4c 41 f0 00 1e |A | LEA.L (A0+D0.W+#0x1e),A0 00021a50 70 0e |p | MOVEQ.L #0x0e,D0 00021a52 3f 20 |? | MOVE.W -(A0),-(A7) 00021a54 51 c8 ff fc |Q | DBF D0,0x21a52 00021a58 59 4f |YO | SUBQ.L #0x4,A7 00021a5a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021a5e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021a62 3f 01 |? | MOVE.W D1,-(A7) 00021a64 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021a6a 50 4f |PO | ADDQ.L #0x8,A7 00021a6c 2d 5f 00 0a |-_ | MOVE.L (A7)+,(A6+0xa) 00021a70 de c1 | | ADDA.W D1,A7 00021a72 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00021a76 4e 5e |N^ | UNLK A6 00021a78 4e 75 |Nu | RTS 00021a7a ; -------------------------------------------------------------------------------------- 00021a7a ; OMSI PASCAL Function 00021a7a ; <LVAR 0x03a 4(w)> 00021a7a ; <LVAR 0x036 4(w)> 00021a7a ; <LVAR 0x008 1(r)> 00021a7a ; <LVAR -0x00a 4(r)> 00021a7a ; <LVAR -0x00e 4(r)> 00021a7a ; -------------------------------------------------------------------------------------- 00021a7a 4e 56 ff 9e |NV | LINK.W A6,#0xff9e 00021a7e bf d5 | | CMPA.L (A5),A7 00021a80 62 06 |b | BHI 0x21a88 00021a82 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021a86 4e 76 |Nv | TRAPV 00021a88 de fc 00 54 | T | ADDA.W #0x54,A7 00021a8c 48 e7 e7 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00021a90 45 fa ef 2c |E , | LEA.L 0x209be,A2 00021a94 74 07 |t | MOVEQ.L #0x07,D2 00021a96 7e 00 |~ | MOVEQ.L #0x00,D7 00021a98 be 82 | | CMP.L D2,D7 00021a9a 63 02 |c | BLS 0x21a9e 00021a9c 4e 4f |NO | TRAP #15 00021a9e 42 36 78 f2 |B6x | CLR.B (A6+D7.L-#0xe) 00021aa2 52 87 |R | ADDQ.L #0x1,D7 00021aa4 be 82 | | CMP.L D2,D7 00021aa6 6f f0 |o | BLE 0x21a98 00021aa8 7e 00 |~ | MOVEQ.L #0x00,D7 00021aaa 7c 0f || | MOVEQ.L #0x0f,D6 00021aac 7a 04 |z | MOVEQ.L #0x04,D5 00021aae 10 05 | | MOVE.B D5,D0 00021ab0 48 80 |H | EXTB.W D0 00021ab2 4a 36 00 0a |J6 | TST.B (A6+D0.W+#0xa) 00021ab6 67 6c |gl | BEQ 0x21b24 00021ab8 10 05 | | MOVE.B D5,D0 00021aba 48 80 |H | EXTB.W D0 00021abc c1 fc 00 2a | * | MULS.W #0x2a,D0 00021ac0 20 4a | J | MOVEA.L A2,A0 00021ac2 12 2e 00 08 | . | MOVE.B (A6+0x8),D1 00021ac6 b2 30 00 29 | 0 ) | CMP.B (A0+D0.W+#0x29),D1 00021aca 66 58 |fX | BNE 0x21b24 00021acc 20 4a | J | MOVEA.L A2,A0 00021ace bc 30 00 28 | 0 ( | CMP.B (A0+D0.W+#0x28),D6 00021ad2 67 50 |gP | BEQ 0x21b24 00021ad4 be 82 | | CMP.L D2,D7 00021ad6 6f 36 |o6 | BLE 0x21b0e 00021ad8 9e fc 00 18 | | SUBA.W #0x18,A7 00021adc 20 4f | O | MOVEA.L A7,A0 00021ade 43 fa ee 72 |C r | LEA.L 0x20952,A1 00021ae2 72 16 |r | MOVEQ.L #0x16,D1 00021ae4 10 d9 | | MOVE.B (A1)+,(A0)+ 00021ae6 51 c9 ff fc |Q | DBF D1,0x21ae4 00021aea 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00021aee 59 4f |YO | SUBQ.L #0x4,A7 00021af0 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021af4 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021af8 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00021afc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021b02 50 4f |PO | ADDQ.L #0x8,A7 00021b04 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021b0a de fc 00 1e | | ADDA.W #0x1e,A7 00021b0e be 82 | | CMP.L D2,D7 00021b10 63 02 |c | BLS 0x21b14 00021b12 4e 4f |NO | TRAP #15 00021b14 20 4a | J | MOVEA.L A2,A0 00021b16 1d b0 00 28 78 f2 | (x | MOVE.B (A0+D0.W+#0x28),(A6+D7.L-#0xe) 00021b1c 20 4a | J | MOVEA.L A2,A0 00021b1e 1c 30 00 28 | 0 ( | MOVE.B (A0+D0.W+#0x28),D6 00021b22 52 87 |R | ADDQ.L #0x1,D7 00021b24 52 05 |R | ADDQ.B #0x1,D5 00021b26 0c 05 00 2b | + | CMPI.B #0x2b,D5 00021b2a 6f 82 |o | BLE 0x21aae 00021b2c 2d 6e ff f2 00 36 |-n 6 | MOVE.L (A6-0xe),(A6+0x36) 00021b32 2d 6e ff f6 00 3a |-n : | MOVE.L (A6-0xa),(A6+0x3a) 00021b38 4c df 07 e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2 00021b3c 4e 5e |N^ | UNLK A6 00021b3e 4e 75 |Nu | RTS 00021b40 ; -------------------------------------------------------------------------------------- 00021b40 ; OMSI PASCAL Function 00021b40 ; <LVAR 0x024 1(r)> 00021b40 ; <LVAR 0x020 4(r)> 00021b40 ; <LVAR 0x01c 4(r)> 00021b40 ; <LVAR 0x018 4(r)> 00021b40 ; <LVAR 0x014 4(r)> 00021b40 ; <LVAR 0x010 4(r)> 00021b40 ; <LVAR 0x00c 4(r)> 00021b40 ; <LVAR 0x008 4(r)> 00021b40 ; <LVAR -0x004 @ 1(r)> 00021b40 ; -------------------------------------------------------------------------------------- 00021b40 4e 56 ff bc |NV | LINK.W A6,#0xffbc 00021b44 bf d5 | | CMPA.L (A5),A7 00021b46 62 06 |b | BHI 0x21b4e 00021b48 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021b4c 4e 76 |Nv | TRAPV 00021b4e de fc 00 3a | : | ADDA.W #0x3a,A7 00021b52 48 e7 f1 c8 |H | MOVEM.L A4+A1+A0+D7+D3+D2+D1+D0,-(A7) 00021b56 43 f8 00 00 |C | LEA.L 0x0,A1 00021b5a 72 01 |r | MOVEQ.L #0x01,D1 00021b5c 74 06 |t | MOVEQ.L #0x06,D2 00021b5e 76 0c |v | MOVEQ.L #0x0c,D3 00021b60 10 2e 00 24 | . $ | MOVE.B (A6+0x24),D0 00021b64 0c 00 00 03 | | CMPI.B #0x03,D0 00021b68 67 0c |g | BEQ 0x21b76 00021b6a 0c 00 00 04 | | CMPI.B #0x04,D0 00021b6e 67 06 |g | BEQ 0x21b76 00021b70 0c 00 00 05 | | CMPI.B #0x05,D0 00021b74 66 24 |f$ | BNE 0x21b9a 00021b76 3f 3a ed f6 |?: | MOVE.W 0x2096e,-(A7) 00021b7a 3f 3a ed f0 |?: | MOVE.W 0x2096c,-(A7) 00021b7e 3f 3a ed ea |?: | MOVE.W 0x2096a,-(A7) 00021b82 59 4f |YO | SUBQ.L #0x4,A7 00021b84 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021b88 3f 01 |? | MOVE.W D1,-(A7) 00021b8a 3f 02 |? | MOVE.W D2,-(A7) 00021b8c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021b92 50 4f |PO | ADDQ.L #0x8,A7 00021b94 28 5f |(_ | MOVEA.L (A7)+,A4 00021b96 5c 4f |\O | ADDQ.L #0x6,A7 00021b98 60 02 |` | BRA 0x21b9c 00021b9a 38 41 |8A | MOVEA.W D1,A4 00021b9c 7e 00 |~ | MOVEQ.L #0x00,D7 00021b9e b8 c1 | | CMPA.W D1,A4 00021ba0 67 02 |g | BEQ 0x21ba4 00021ba2 52 07 |R | ADDQ.B #0x1,D7 00021ba4 4a 07 |J | TST.B D7 00021ba6 67 00 00 be |g | BEQ 0x21c66 00021baa 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00021bb0 48 80 |H | EXTB.W D0 00021bb2 48 c0 |H | EXTW.L D0 00021bb4 2f 00 |/ | MOVE.L D0,-(A7) 00021bb6 4e b9 00 01 05 0e |N | JSR IPC_PutLong(a : L) 00021bbc 2e ae 00 20 |. | MOVE.L (A6+0x20),(A7) 00021bc0 2f 2e 00 1c |/. | MOVE.L (A6+0x1c),-(A7) 00021bc4 48 57 |HW | PEA.L (A7) 00021bc6 48 51 |HQ | PEA.L (A1) 00021bc8 48 78 00 07 |Hx | PEA.L 0x7 00021bcc 4e b9 00 01 04 fc |N | JSR IPC_PutVar(src : Pointer; length : Long ; type : Long) 00021bd2 de fc 00 14 | | ADDA.W #0x14,A7 00021bd6 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 00021bdc 2f 0c |/ | MOVE.L A4,-(A7) 00021bde 48 78 00 01 |Hx | PEA.L 0x1 00021be2 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00021be6 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021bea 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00021bf0 de fc 00 0e | | ADDA.W #0xe,A7 00021bf4 4a 2e ff fc |J. | TST.B (A6-0x4) 00021bf8 67 0e |g | BEQ 0x21c08 00021bfa 1f 02 | | MOVE.B D2,-(A7) 00021bfc 48 78 00 01 |Hx | PEA.L 0x1 00021c00 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021c06 5c 4f |\O | ADDQ.L #0x6,A7 00021c08 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00021c0e 20 6e 00 18 | n | MOVEA.L (A6+0x18),A0 00021c12 48 50 |HP | PEA.L (A0) 00021c14 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00021c1a 58 4f |XO | ADDQ.L #0x4,A7 00021c1c 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00021c20 48 50 |HP | PEA.L (A0) 00021c22 4e b9 00 01 05 2c |N , | JSR IPC_GetString(VAR retval : String) 00021c28 58 4f |XO | ADDQ.L #0x4,A7 00021c2a 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00021c2e 48 50 |HP | PEA.L (A0) 00021c30 4e b9 00 01 05 2c |N , | JSR IPC_GetString(VAR retval : String) 00021c36 58 4f |XO | ADDQ.L #0x4,A7 00021c38 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00021c3c 48 50 |HP | PEA.L (A0) 00021c3e 48 51 |HQ | PEA.L (A1) 00021c40 48 51 |HQ | PEA.L (A1) 00021c42 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 00021c48 de c3 | | ADDA.W D3,A7 00021c4a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021c4e 48 50 |HP | PEA.L (A0) 00021c50 48 51 |HQ | PEA.L (A1) 00021c52 48 78 00 07 |Hx | PEA.L 0x7 00021c56 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 00021c5c de c3 | | ADDA.W D3,A7 00021c5e 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 00021c64 60 58 |`X | BRA 0x21cbe 00021c66 20 6e 00 18 | n | MOVEA.L (A6+0x18),A0 00021c6a 10 81 | | MOVE.B D1,(A0) 00021c6c 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00021c70 3f 3a ed 02 |?: | MOVE.W 0x20974,-(A7) 00021c74 3f 3a ec fc |?: | MOVE.W 0x20972,-(A7) 00021c78 3f 3a ec f6 |?: | MOVE.W 0x20970,-(A7) 00021c7c 59 4f |YO | SUBQ.L #0x4,A7 00021c7e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021c82 3f 01 |? | MOVE.W D1,-(A7) 00021c84 3f 02 |? | MOVE.W D2,-(A7) 00021c86 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021c8c 50 4f |PO | ADDQ.L #0x8,A7 00021c8e 20 9f | | MOVE.L (A7)+,(A0) 00021c90 5c 4f |\O | ADDQ.L #0x6,A7 00021c92 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00021c96 59 4f |YO | SUBQ.L #0x4,A7 00021c98 1f 00 | | MOVE.B D0,-(A7) 00021c9a 4e ba fd 8c |N | JSR 0x21a28 00021c9e 54 4f |TO | ADDQ.L #0x2,A7 00021ca0 20 9f | | MOVE.L (A7)+,(A0) 00021ca2 2f 10 |/ | MOVE.L (A0),-(A7) 00021ca4 1f 3c 00 5c | < \ | MOVE.B #0x5c,-(A7) 00021ca8 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00021cae 5c 4f |\O | ADDQ.L #0x6,A7 00021cb0 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00021cb4 10 81 | | MOVE.B D1,(A0) 00021cb6 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021cba 10 bc 00 27 | ' | MOVE.B #0x27,(A0) 00021cbe 4c df 13 8f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D7+A0+A1+A4 00021cc2 4e 5e |N^ | UNLK A6 00021cc4 4e 75 |Nu | RTS 00021cc6 ; -------------------------------------------------------------------------------------- 00021cc6 ; OMSI PASCAL Function 00021cc6 ; -------------------------------------------------------------------------------------- 00021cc6 START: 00021cc6 4f fa 00 08 |O | LEA.L MAIN,A7 00021cca 4e f9 00 01 02 80 |N | JMP ?start_program 00021cd0 MAIN: 00021cd0 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021cd6 47 f9 00 02 24 7c |G $| | LEA.L 0x2247c,A3 00021cdc 49 f9 00 01 03 d8 |I | LEA.L WriteConsoleString(str : String),A4 00021ce2 76 01 |v | MOVEQ.L #0x01,D3 00021ce4 78 02 |x | MOVEQ.L #0x02,D4 00021ce6 7a 1e |z | MOVEQ.L #0x1e,D5 00021ce8 7c 0a || | MOVEQ.L #0x0a,D6 00021cea 7e 07 |~ | MOVEQ.L #0x07,D7 00021cec 4e b9 00 01 03 98 |N | JSR FSCALL_10398 00021cf2 48 79 00 02 25 0a |Hy % | PEA.L 0x2250a 00021cf8 48 79 00 02 25 0b |Hy % | PEA.L 0x2250b 00021cfe 4e b9 00 01 05 44 |N D | JSR IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool) 00021d04 50 4f |PO | ADDQ.L #0x8,A7 00021d06 48 78 00 00 |Hx | PEA.L 0x0 00021d0a 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 00021d10 54 4f |TO | ADDQ.L #0x2,A7 00021d12 1e b9 00 02 25 0b | % | MOVE.B 0x2250b,(A7) 00021d18 4e b9 00 01 04 d2 |N | JSR SetExpInitDone(a : Byte) 00021d1e 54 4f |TO | ADDQ.L #0x2,A7 00021d20 4e b9 00 01 05 c8 |N | JSR And_fc0c_7f(void) 00021d26 70 04 |p | MOVEQ.L #0x04,D0 00021d28 13 c0 00 02 25 10 | % | MOVE.B D0,0x22510 00021d2e 12 00 | | MOVE.B D0,D1 00021d30 48 81 |H | EXTB.W D1 00021d32 3f 01 |? | MOVE.W D1,-(A7) 00021d34 20 4b | K | MOVEA.L A3,A0 00021d36 41 f0 10 00 |A | LEA.L (A0+D1.W),A0 00021d3a 42 28 00 a7 |B( | CLR.B (A0+0xa7) 00021d3e 30 1f |0 | MOVE.W (A7)+,D0 00021d40 52 40 |R@ | ADDQ.W #0x1,D0 00021d42 0c 40 00 2b | @ + | CMPI.W #0x002b,D0 00021d46 6f e0 |o | BLE 0x21d28 00021d48 70 00 |p | MOVEQ.L #0x00,D0 00021d4a 23 c0 00 02 25 06 |# % | MOVE.L D0,0x22506 00021d50 b0 87 | | CMP.L D7,D0 00021d52 63 02 |c | BLS 0x21d56 00021d54 4e 4f |NO | TRAP #15 00021d56 20 4b | K | MOVEA.L A3,A0 00021d58 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00021d5c 42 28 00 9f |B( | CLR.B (A0+0x9f) 00021d60 52 80 |R | ADDQ.L #0x1,D0 00021d62 b0 87 | | CMP.L D7,D0 00021d64 6f e4 |o | BLE 0x21d4a 00021d66 4e ba f5 06 |N | JSR 0x2126e 00021d6a 2f 3a ec 12 |/: | MOVE.L 0x2097e,-(A7) 00021d6e 2f 3a ec 0a |/: | MOVE.L 0x2097a,-(A7) 00021d72 2f 3a ec 02 |/: | MOVE.L 0x20976,-(A7) 00021d76 59 4f |YO | SUBQ.L #0x4,A7 00021d78 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021d7c 3f 03 |? | MOVE.W D3,-(A7) 00021d7e 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7) 00021d82 4e 92 |N | JSR (A2) 00021d84 50 4f |PO | ADDQ.L #0x8,A7 00021d86 4e 94 |N | JSR (A4) 00021d88 de fc 00 10 | | ADDA.W #0x10,A7 00021d8c 70 04 |p | MOVEQ.L #0x04,D0 00021d8e 23 c0 00 02 25 06 |# % | MOVE.L D0,0x22506 00021d94 3f 3a eb ec |?: | MOVE.W 0x20982,-(A7) 00021d98 51 4f |QO | SUBQ.L #0x8,A7 00021d9a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021d9e 3f 03 |? | MOVE.W D3,-(A7) 00021da0 3f 04 |? | MOVE.W D4,-(A7) 00021da2 4e 92 |N | JSR (A2) 00021da4 2e 80 |. | MOVE.L D0,(A7) 00021da6 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021dac 58 4f |XO | ADDQ.L #0x4,A7 00021dae 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021db4 50 4f |PO | ADDQ.L #0x8,A7 00021db6 4e 94 |N | JSR (A4) 00021db8 5c 4f |\O | ADDQ.L #0x6,A7 00021dba 22 00 |" | MOVE.L D0,D1 00021dbc 53 81 |S | SUBQ.L #0x1,D1 00021dbe 0c 81 00 00 00 3f | ? | CMPI.L #0x0000003f,D1 00021dc4 63 02 |c | BLS 0x21dc8 00021dc6 4e 4f |NO | TRAP #15 00021dc8 e3 81 | | ASL.L #0x1,D1 00021dca 20 4b | K | MOVEA.L A3,A0 00021dcc 32 30 18 08 |20 | MOVE.W (A0+D1.L+#0x8),D1 00021dd0 02 41 80 00 | A | ANDI.W #0x8000,D1 00021dd4 66 06 |f | BNE 0x21ddc 00021dd6 3f 3a eb ac |?: | MOVE.W 0x20984,-(A7) 00021dda 60 04 |` | BRA 0x21de0 00021ddc 3f 3a eb a8 |?: | MOVE.W 0x20986,-(A7) 00021de0 59 4f |YO | SUBQ.L #0x4,A7 00021de2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021de6 3f 03 |? | MOVE.W D3,-(A7) 00021de8 3f 04 |? | MOVE.W D4,-(A7) 00021dea 4e 92 |N | JSR (A2) 00021dec 50 4f |PO | ADDQ.L #0x8,A7 00021dee 4e 94 |N | JSR (A4) 00021df0 5c 4f |\O | ADDQ.L #0x6,A7 00021df2 59 4f |YO | SUBQ.L #0x4,A7 00021df4 0c 80 00 00 00 3f | ? | CMPI.L #0x0000003f,D0 00021dfa 63 02 |c | BLS 0x21dfe 00021dfc 4e 4f |NO | TRAP #15 00021dfe 22 00 |" | MOVE.L D0,D1 00021e00 e3 81 | | ASL.L #0x1,D1 00021e02 20 4b | K | MOVEA.L A3,A0 00021e04 32 30 18 08 |20 | MOVE.W (A0+D1.L+#0x8),D1 00021e08 02 41 3f ff | A? | ANDI.W #0x3fff,D1 00021e0c 42 82 |B | CLR.L D2 00021e0e 34 01 |4 | MOVE.W D1,D2 00021e10 2f 02 |/ | MOVE.L D2,-(A7) 00021e12 48 78 00 04 |Hx | PEA.L 0x4 00021e16 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00021e1c 50 4f |PO | ADDQ.L #0x8,A7 00021e1e 4e 94 |N | JSR (A4) 00021e20 58 4f |XO | ADDQ.L #0x4,A7 00021e22 53 80 |S | SUBQ.L #0x1,D0 00021e24 b0 83 | | CMP.L D3,D0 00021e26 6c 00 ff 66 |l f | BGE 0x21d8e 00021e2a 9e fc 00 14 | | SUBA.W #0x14,A7 00021e2e 20 4f | O | MOVEA.L A7,A0 00021e30 43 fa eb 56 |C V | LEA.L 0x20988,A1 00021e34 70 12 |p | MOVEQ.L #0x12,D0 00021e36 10 d9 | | MOVE.B (A1)+,(A0)+ 00021e38 51 c8 ff fc |Q | DBF D0,0x21e36 00021e3c 59 4f |YO | SUBQ.L #0x4,A7 00021e3e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021e42 3f 03 |? | MOVE.W D3,-(A7) 00021e44 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00021e48 4e 92 |N | JSR (A2) 00021e4a 50 4f |PO | ADDQ.L #0x8,A7 00021e4c 48 78 00 03 |Hx | PEA.L 0x3 00021e50 48 79 00 02 25 5c |Hy %\ | PEA.L 0x2255c 00021e56 48 79 00 02 25 04 |Hy % | PEA.L 0x22504 00021e5c 4e b9 00 01 05 6e |N n | JSR Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool) 00021e62 de fc 00 24 | $ | ADDA.W #0x24,A7 00021e66 4a 39 00 02 25 04 |J9 % | TST.B 0x22504 00021e6c 67 00 00 a2 |g | BEQ 0x21f10 00021e70 9e c5 | | SUBA.W D5,A7 00021e72 20 4f | O | MOVEA.L A7,A0 00021e74 43 f9 00 02 25 8f |C % | LEA.L 0x2258f,A1 00021e7a 70 1d |p | MOVEQ.L #0x1d,D0 00021e7c 10 d9 | | MOVE.B (A1)+,(A0)+ 00021e7e 51 c8 ff fc |Q | DBF D0,0x21e7c 00021e82 59 4f |YO | SUBQ.L #0x4,A7 00021e84 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021e88 3f 03 |? | MOVE.W D3,-(A7) 00021e8a 3f 05 |? | MOVE.W D5,-(A7) 00021e8c 4e 92 |N | JSR (A2) 00021e8e 50 4f |PO | ADDQ.L #0x8,A7 00021e90 23 df 00 02 26 ee |# & | MOVE.L (A7)+,0x226ee 00021e96 de c5 | | ADDA.W D5,A7 00021e98 20 79 00 02 26 ee | y & | MOVEA.L 0x226ee,A0 00021e9e 3f 3a ea fc |?: | MOVE.W 0x2099c,-(A7) 00021ea2 59 4f |YO | SUBQ.L #0x4,A7 00021ea4 2f 39 00 02 26 ee |/9 & | MOVE.L 0x226ee,-(A7) 00021eaa 59 4f |YO | SUBQ.L #0x4,A7 00021eac 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021eb0 3f 03 |? | MOVE.W D3,-(A7) 00021eb2 3f 04 |? | MOVE.W D4,-(A7) 00021eb4 4e 92 |N | JSR (A2) 00021eb6 50 4f |PO | ADDQ.L #0x8,A7 00021eb8 4e b9 00 01 03 00 |N | JSR FSCALL_10300 00021ebe 50 4f |PO | ADDQ.L #0x8,A7 00021ec0 20 1f | | MOVE.L (A7)+,D0 00021ec2 04 80 ff ff 80 00 | | SUBI.L #0xffff8000,D0 00021ec8 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021ece 63 02 |c | BLS 0x21ed2 00021ed0 4e 4f |NO | TRAP #15 00021ed2 06 80 ff ff 80 00 | | ADDI.L #0xffff8000,D0 00021ed8 54 4f |TO | ADDQ.L #0x2,A7 00021eda 30 80 |0 | MOVE.W D0,(A0) 00021edc 41 fa ea ca |A | LEA.L 0x209a8,A0 00021ee0 70 04 |p | MOVEQ.L #0x04,D0 00021ee2 3f 20 |? | MOVE.W -(A0),-(A7) 00021ee4 51 c8 ff fc |Q | DBF D0,0x21ee2 00021ee8 51 4f |QO | SUBQ.L #0x8,A7 00021eea 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021eee 3f 03 |? | MOVE.W D3,-(A7) 00021ef0 3f 06 |? | MOVE.W D6,-(A7) 00021ef2 4e 92 |N | JSR (A2) 00021ef4 58 4f |XO | ADDQ.L #0x4,A7 00021ef6 2e b9 00 02 26 ee |. & | MOVE.L 0x226ee,(A7) 00021efc 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021f02 50 4f |PO | ADDQ.L #0x8,A7 00021f04 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021f0a de fc 00 0e | | ADDA.W #0xe,A7 00021f0e 60 2c |`, | BRA 0x21f3c 00021f10 9e fc 00 16 | | SUBA.W #0x16,A7 00021f14 20 4f | O | MOVEA.L A7,A0 00021f16 43 fa ea 90 |C | LEA.L 0x209a8,A1 00021f1a 70 14 |p | MOVEQ.L #0x14,D0 00021f1c 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f1e 51 c8 ff fc |Q | DBF D0,0x21f1c 00021f22 59 4f |YO | SUBQ.L #0x4,A7 00021f24 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021f28 3f 03 |? | MOVE.W D3,-(A7) 00021f2a 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 00021f2e 4e 92 |N | JSR (A2) 00021f30 50 4f |PO | ADDQ.L #0x8,A7 00021f32 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021f38 de fc 00 1a | | ADDA.W #0x1a,A7 00021f3c 48 79 00 02 25 23 |Hy %# | PEA.L 0x22523 00021f42 48 79 00 02 25 0c |Hy % | PEA.L 0x2250c 00021f48 48 79 00 02 25 50 |Hy %P | PEA.L 0x22550 00021f4e 4e ba f4 f4 |N | JSR 0x21444 00021f52 de c6 | | ADDA.W D6,A7 00021f54 48 79 00 02 25 23 |Hy %# | PEA.L 0x22523 00021f5a 2f 39 00 02 25 0c |/9 % | MOVE.L 0x2250c,-(A7) 00021f60 1f 39 00 02 25 50 | 9 %P | MOVE.B 0x22550,-(A7) 00021f66 4e ba fa 14 |N | JSR 0x2197c 00021f6a de c6 | | ADDA.W D6,A7 00021f6c 10 1f | | MOVE.B (A7)+,D0 00021f6e 48 80 |H | EXTB.W D0 00021f70 41 bc 00 0b |A | CHK.W #0xb,D0 00021f74 13 c0 00 02 25 4f | %O | MOVE.B D0,0x2254f 00021f7a 9e fc 00 34 | 4 | SUBA.W #0x34,A7 00021f7e 20 4f | O | MOVEA.L A7,A0 00021f80 43 f9 00 02 25 23 |C %# | LEA.L 0x22523,A1 00021f86 72 2b |r+ | MOVEQ.L #0x2b,D1 00021f88 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f8a 51 c9 ff fc |Q | DBF D1,0x21f88 00021f8e 1f 00 | | MOVE.B D0,-(A7) 00021f90 4e ba fa e8 |N | JSR 0x21a7a 00021f94 de fc 00 2e | . | ADDA.W #0x2e,A7 00021f98 41 f9 00 02 25 51 |A %Q | LEA.L 0x22551,A0 00021f9e 22 4f |"O | MOVEA.L A7,A1 00021fa0 70 07 |p | MOVEQ.L #0x07,D0 00021fa2 10 d9 | | MOVE.B (A1)+,(A0)+ 00021fa4 51 c8 ff fc |Q | DBF D0,0x21fa2 00021fa8 5c 4f |\O | ADDQ.L #0x6,A7 00021faa 1e b9 00 02 25 4f | %O | MOVE.B 0x2254f,(A7) 00021fb0 51 4f |QO | SUBQ.L #0x8,A7 00021fb2 20 4f | O | MOVEA.L A7,A0 00021fb4 43 f9 00 02 25 51 |C %Q | LEA.L 0x22551,A1 00021fba 70 07 |p | MOVEQ.L #0x07,D0 00021fbc 10 d9 | | MOVE.B (A1)+,(A0)+ 00021fbe 51 c8 ff fc |Q | DBF D0,0x21fbc 00021fc2 48 79 00 02 25 11 |Hy % | PEA.L 0x22511 00021fc8 48 79 00 02 25 12 |Hy % | PEA.L 0x22512 00021fce 48 79 00 02 25 16 |Hy % | PEA.L 0x22516 00021fd4 48 79 00 02 25 1a |Hy % | PEA.L 0x2251a 00021fda 48 79 00 02 25 1b |Hy % | PEA.L 0x2251b 00021fe0 4e ba fb 5e |N ^ | JSR 0x21b40 00021fe4 de fc 00 1c | | ADDA.W #0x1c,A7 00021fe8 1e b9 00 02 25 11 | % | MOVE.B 0x22511,(A7) 00021fee 2f 39 00 02 25 12 |/9 % | MOVE.L 0x22512,-(A7) 00021ff4 2f 39 00 02 25 16 |/9 % | MOVE.L 0x22516,-(A7) 00021ffa 1f 39 00 02 25 1a | 9 % | MOVE.B 0x2251a,-(A7) 00022000 51 4f |QO | SUBQ.L #0x8,A7 00022002 20 4f | O | MOVEA.L A7,A0 00022004 43 f9 00 02 25 1b |C % | LEA.L 0x2251b,A1 0002200a 70 07 |p | MOVEQ.L #0x07,D0 0002200c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002200e 51 c8 ff fc |Q | DBF D0,0x2200c 00022012 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 00022018 de fc 00 14 | | ADDA.W #0x14,A7 0002201c 4e b9 00 01 02 84 |N | JSR ?exit 00022022 exp_READ_PAREG.FIU(Sw_1, &Sr_1): 00022022 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022028 00 0e | | .CONST 0x000e ; Stack-delta 0002202a 0e 52 45 41 44 5f 50 41 | READ_PA| .TXT 14,'READ_PAREG.FIU' 00022039 00 | | .CONST 0x0 0002203a 03 | | .CONST 0x3 ; DIPROC address 0002203b 01 | | .CONST 0x1 ; Output Parameters 0002203c 01 | | .CONST 0x1 ; Input Parameters 0002203d 00 | | .CONST 0x0 ; In arg [1] 0002203e 00 | | .CONST 0x0 ; Out arg [1] 0002203f 00 | | .PAD 0x0 00022040 exp_HALT.SEQ(&Fr): 00022040 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022046 00 0c | | .CONST 0x000c ; Stack-delta 00022048 08 48 41 4c 54 2e 53 45 | HALT.SE| .TXT 8,'HALT.SEQ' 00022051 00 | | .CONST 0x0 00022052 02 | | .CONST 0x2 ; DIPROC address 00022053 01 | | .CONST 0x1 ; Output Parameters 00022054 00 | | .CONST 0x0 ; Input Parameters 00022055 08 | | .CONST 0x8 ; Out arg flag 00022056 exp_GET_MISC_ERRORS.SEQ(&Sr_1): 00022056 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002205c 00 0c | | .CONST 0x000c ; Stack-delta 0002205e 13 47 45 54 5f 4d 49 53 | GET_MIS| .TXT 19,'GET_MISC_ERRORS.SEQ' 00022072 00 | | .CONST 0x0 00022073 02 | | .CONST 0x2 ; DIPROC address 00022074 01 | | .CONST 0x1 ; Output Parameters 00022075 00 | | .CONST 0x0 ; Input Parameters 00022076 00 | | .CONST 0x0 ; Out arg [1] 00022077 00 | | .PAD 0x0 00022078 exp_READ_WCS.TYP(Sw_2, Sw_1, &Sr_6, &Fr): 00022078 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002207e 00 14 | | .CONST 0x0014 ; Stack-delta 00022080 0c 52 45 41 44 5f 57 43 | READ_WC| .TXT 12,'READ_WCS.TYP' 0002208d 00 | | .CONST 0x0 0002208e 06 | | .CONST 0x6 ; DIPROC address 0002208f 02 | | .CONST 0x2 ; Output Parameters 00022090 02 | | .CONST 0x2 ; Input Parameters 00022091 01 | | .CONST 0x1 ; In arg [2] 00022092 00 | | .CONST 0x0 ; In arg [1] 00022093 05 | | .CONST 0x5 ; Out arg [6] 00022094 08 | | .CONST 0x8 ; Out arg flag 00022095 00 | | .PAD 0x0 00022096 exp_READ_PARITY.TYP(&Sr_1): 00022096 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002209c 00 0c | | .CONST 0x000c ; Stack-delta 0002209e 0f 52 45 41 44 5f 50 41 | READ_PA| .TXT 15,'READ_PARITY.TYP' 000220ae 00 | | .CONST 0x0 000220af 06 | | .CONST 0x6 ; DIPROC address 000220b0 01 | | .CONST 0x1 ; Output Parameters 000220b1 00 | | .CONST 0x0 ; Input Parameters 000220b2 00 | | .CONST 0x0 ; Out arg [1] 000220b3 00 | | .PAD 0x0 000220b4 exp_READ_WCS.VAL(Sw_2, Sw_1, &Sr_5, &Fr): 000220b4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000220ba 00 14 | | .CONST 0x0014 ; Stack-delta 000220bc 0c 52 45 41 44 5f 57 43 | READ_WC| .TXT 12,'READ_WCS.VAL' 000220c9 00 | | .CONST 0x0 000220ca 07 | | .CONST 0x7 ; DIPROC address 000220cb 02 | | .CONST 0x2 ; Output Parameters 000220cc 02 | | .CONST 0x2 ; Input Parameters 000220cd 01 | | .CONST 0x1 ; In arg [2] 000220ce 00 | | .CONST 0x0 ; In arg [1] 000220cf 04 | | .CONST 0x4 ; Out arg [5] 000220d0 08 | | .CONST 0x8 ; Out arg flag 000220d1 00 | | .PAD 0x0 000220d2 exp_READ_PARITY.VAL(&Sr_1): 000220d2 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000220d8 00 0c | | .CONST 0x000c ; Stack-delta 000220da 0f 52 45 41 44 5f 50 41 | READ_PA| .TXT 15,'READ_PARITY.VAL' 000220ea 00 | | .CONST 0x0 000220eb 07 | | .CONST 0x7 ; DIPROC address 000220ec 01 | | .CONST 0x1 ; Output Parameters 000220ed 00 | | .CONST 0x0 ; Input Parameters 000220ee 00 | | .CONST 0x0 ; Out arg [1] 000220ef 00 | | .PAD 0x0 000220f0 52 45 41 44 5f 50 41 52 |READ_PAR| .TXT 'READ_PARITY.MEM ' 00022100 52 45 41 44 5f 50 41 52 |READ_PAR| .TXT 'READ_PARITY.M32 ' 00022110 ; -------------------------------------------------------------------------------------- 00022110 ; OMSI PASCAL Function 00022110 ; <LVAR 0x014 1(r)> 00022110 ; <LVAR 0x010 4(r)> 00022110 ; <LVAR 0x00c 4(r)> 00022110 ; <LVAR 0x008 4(r)> 00022110 ; <LVAR -0x006 @ 4(r)> 00022110 ; -------------------------------------------------------------------------------------- 00022110 4e 56 ff ba |NV | LINK.W A6,#0xffba 00022114 bf d5 | | CMPA.L (A5),A7 00022116 62 06 |b | BHI 0x2211e 00022118 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002211c 4e 76 |Nv | TRAPV 0002211e de fc 00 40 | @ | ADDA.W #0x40,A7 00022122 48 e7 e0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D2+D1+D0,-(A7) 00022126 45 ee ff fa |E | LEA.L (A6-0x6),A2 0002212a 47 f8 00 00 |G | LEA.L 0x0,A3 0002212e 49 f9 00 01 04 72 |I r | LEA.L ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L),A4 00022134 72 10 |r | MOVEQ.L #0x10,D1 00022136 74 0c |t | MOVEQ.L #0x0c,D2 00022138 55 4f |UO | SUBQ.L #0x2,A7 0002213a 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00022140 4a 1f |J | TST.B (A7)+ 00022142 67 12 |g | BEQ 0x22156 00022144 9e c1 | | SUBA.W D1,A7 00022146 20 4f | O | MOVEA.L A7,A0 00022148 43 fa ff a6 |C | LEA.L 0x220f0,A1 0002214c 70 0e |p | MOVEQ.L #0x0e,D0 0002214e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022150 51 c8 ff fc |Q | DBF D0,0x2214e 00022154 60 10 |` | BRA 0x22166 00022156 9e c1 | | SUBA.W D1,A7 00022158 20 4f | O | MOVEA.L A7,A0 0002215a 43 fa ff a4 |C | LEA.L 0x22100,A1 0002215e 70 0e |p | MOVEQ.L #0x0e,D0 00022160 10 d9 | | MOVE.B (A1)+,(A0)+ 00022162 51 c8 ff fc |Q | DBF D0,0x22160 00022166 59 4f |YO | SUBQ.L #0x4,A7 00022168 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002216c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022170 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00022174 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002217a 50 4f |PO | ADDQ.L #0x8,A7 0002217c 48 52 |HR | PEA.L (A2) 0002217e 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00022184 de fc 00 18 | | ADDA.W #0x18,A7 00022188 42 27 |B' | CLR.B -(A7) 0002218a 1f 2e 00 14 | . | MOVE.B (A6+0x14),-(A7) 0002218e 2f 12 |/ | MOVE.L (A2),-(A7) 00022190 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00022196 58 4f |XO | ADDQ.L #0x4,A7 00022198 2e 92 |. | MOVE.L (A2),(A7) 0002219a 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 0002219e 48 50 |HP | PEA.L (A0) 000221a0 48 53 |HS | PEA.L (A3) 000221a2 48 53 |HS | PEA.L (A3) 000221a4 4e 94 |N | JSR (A4) 000221a6 de c2 | | ADDA.W D2,A7 000221a8 2e 92 |. | MOVE.L (A2),(A7) 000221aa 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000221ae 48 50 |HP | PEA.L (A0) 000221b0 48 53 |HS | PEA.L (A3) 000221b2 48 53 |HS | PEA.L (A3) 000221b4 4e 94 |N | JSR (A4) 000221b6 de c2 | | ADDA.W D2,A7 000221b8 2e 92 |. | MOVE.L (A2),(A7) 000221ba 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000221be 48 50 |HP | PEA.L (A0) 000221c0 48 53 |HS | PEA.L (A3) 000221c2 48 53 |HS | PEA.L (A3) 000221c4 4e 94 |N | JSR (A4) 000221c6 de c1 | | ADDA.W D1,A7 000221c8 48 52 |HR | PEA.L (A2) 000221ca 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000221d0 58 4f |XO | ADDQ.L #0x4,A7 000221d2 4c df 1f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3+A4 000221d6 4e 5e |N^ | UNLK A6 000221d8 4e 75 |Nu | RTS 000221da exp_READ_TRACE_BLOCK.IOC(&Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8): 000221da 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000221e0 00 48 | H | .CONST 0x0048 ; Stack-delta 000221e2 14 52 45 41 44 5f 54 52 | READ_TR| .TXT 20,'READ_TRACE_BLOCK.IOC' 000221f7 00 | | .CONST 0x0 000221f8 04 | | .CONST 0x4 ; DIPROC address 000221f9 10 | | .CONST 0x10 ; Output Parameters 000221fa 00 | | .CONST 0x0 ; Input Parameters 000221fb 07 | | .CONST 0x7 ; Out arg [8] 000221fc 07 | | .CONST 0x7 ; Out arg [8] 000221fd 07 | | .CONST 0x7 ; Out arg [8] 000221fe 07 | | .CONST 0x7 ; Out arg [8] 000221ff 07 | | .CONST 0x7 ; Out arg [8] 00022200 07 | | .CONST 0x7 ; Out arg [8] 00022201 07 | | .CONST 0x7 ; Out arg [8] 00022202 07 | | .CONST 0x7 ; Out arg [8] 00022203 07 | | .CONST 0x7 ; Out arg [8] 00022204 07 | | .CONST 0x7 ; Out arg [8] 00022205 07 | | .CONST 0x7 ; Out arg [8] 00022206 07 | | .CONST 0x7 ; Out arg [8] 00022207 07 | | .CONST 0x7 ; Out arg [8] 00022208 07 | | .CONST 0x7 ; Out arg [8] 00022209 07 | | .CONST 0x7 ; Out arg [8] 0002220a 07 | | .CONST 0x7 ; Out arg [8] 0002220b 00 | | .PAD 0x0 0002220c exp_READ_TRACE_ADDRESS.IOC(Sw_1, &Sr_2): 0002220c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022212 00 0e | | .CONST 0x000e ; Stack-delta 00022214 16 52 45 41 44 5f 54 52 | READ_TR| .TXT 22,'READ_TRACE_ADDRESS.IOC' 0002222b 00 | | .CONST 0x0 0002222c 04 | | .CONST 0x4 ; DIPROC address 0002222d 01 | | .CONST 0x1 ; Output Parameters 0002222e 01 | | .CONST 0x1 ; Input Parameters 0002222f 00 | | .CONST 0x0 ; In arg [1] 00022230 01 | | .CONST 0x1 ; Out arg [2] 00022231 00 | | .PAD 0x0 00022232 exp_READ_PAREG.IOC(Sw_1, &Sr_1): 00022232 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022238 00 0e | | .CONST 0x000e ; Stack-delta 0002223a 0e 52 45 41 44 5f 50 41 | READ_PA| .TXT 14,'READ_PAREG.IOC' 00022249 00 | | .CONST 0x0 0002224a 04 | | .CONST 0x4 ; DIPROC address 0002224b 01 | | .CONST 0x1 ; Output Parameters 0002224c 01 | | .CONST 0x1 ; Input Parameters 0002224d 00 | | .CONST 0x0 ; In arg [1] 0002224e 00 | | .CONST 0x0 ; Out arg [1] 0002224f 00 | | .PAD 0x0 00022250 exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1): 00022250 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022256 00 0c | | .CONST 0x000c ; Stack-delta 00022258 16 4c 4f 41 44 5f 54 52 | LOAD_TR| .TXT 22,'LOAD_TRACE_ADDRESS.IOC' 0002226f 00 | | .CONST 0x0 00022270 04 | | .CONST 0x4 ; DIPROC address 00022271 00 | | .CONST 0x0 ; Output Parameters 00022272 02 | | .CONST 0x2 ; Input Parameters 00022273 01 | | .CONST 0x1 ; In arg [2] 00022274 00 | | .CONST 0x0 ; In arg [1] 00022275 00 | | .PAD 0x0 00022276 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 00022284 ; -------------------------------------------------------------------------------------- 00022284 ; OMSI PASCAL Function 00022284 ; <LVAR 0x008 1(r)> 00022284 ; -------------------------------------------------------------------------------------- 00022284 PROG_FAIL: 00022284 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00022288 bf d5 | | CMPA.L (A5),A7 0002228a 62 06 |b | BHI 0x22292 0002228c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022290 4e 76 |Nv | TRAPV 00022292 de fc 00 2c | , | ADDA.W #0x2c,A7 00022296 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 0002229a 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 0002229e 70 06 |p | MOVEQ.L #0x06,D0 000222a0 3f 20 |? | MOVE.W -(A0),-(A7) 000222a2 51 c8 ff fc |Q | DBF D0,0x222a0 000222a6 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 000222aa 51 4f |QO | SUBQ.L #0x8,A7 000222ac 48 6f 00 0a |Ho | PEA.L (A7+0xa) 000222b0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000222b4 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 000222b8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000222be 58 4f |XO | ADDQ.L #0x4,A7 000222c0 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000222c4 48 80 |H | EXTB.W D0 000222c6 48 c0 |H | EXTW.L D0 000222c8 2f 00 |/ | MOVE.L D0,-(A7) 000222ca 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000222d0 58 4f |XO | ADDQ.L #0x4,A7 000222d2 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000222d8 50 4f |PO | ADDQ.L #0x8,A7 000222da 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000222e0 de fc 00 14 | | ADDA.W #0x14,A7 000222e4 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 000222e8 4e 5e |N^ | UNLK A6 000222ea 4e 75 |Nu | RTS 000222ec 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 000222fa 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00022308 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00022316 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00022328 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 00022340 ; -------------------------------------------------------------------------------------- 00022340 ; OMSI PASCAL Function 00022340 ; <LVAR 0x00e 1(r)> 00022340 ; <LVAR 0x00a 4(r)> 00022340 ; <LVAR 0x008 1(r)> 00022340 ; -------------------------------------------------------------------------------------- 00022340 EXP_FAIL: 00022340 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 00022344 bf d5 | | CMPA.L (A5),A7 00022346 62 06 |b | BHI 0x2234e 00022348 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002234c 4e 76 |Nv | TRAPV 0002234e de fc 00 74 | t | ADDA.W #0x74,A7 00022352 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00022356 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 0002235c 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 00022362 72 01 |r | MOVEQ.L #0x01,D1 00022364 74 0d |t | MOVEQ.L #0x0d,D2 00022366 76 1e |v | MOVEQ.L #0x1e,D3 00022368 78 12 |x | MOVEQ.L #0x12,D4 0002236a 7a 0e |z | MOVEQ.L #0x0e,D5 0002236c 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00022372 41 fa ff b4 |A | LEA.L 0x22328,A0 00022376 70 08 |p | MOVEQ.L #0x08,D0 00022378 3f 20 |? | MOVE.W -(A0),-(A7) 0002237a 51 c8 ff fc |Q | DBF D0,0x22378 0002237e 59 4f |YO | SUBQ.L #0x4,A7 00022380 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022384 3f 01 |? | MOVE.W D1,-(A7) 00022386 3f 04 |? | MOVE.W D4,-(A7) 00022388 4e 93 |N | JSR (A3) 0002238a 50 4f |PO | ADDQ.L #0x8,A7 0002238c 4e 94 |N | JSR (A4) 0002238e 50 4f |PO | ADDQ.L #0x8,A7 00022390 20 4f | O | MOVEA.L A7,A0 00022392 43 fa ff 58 |C X | LEA.L 0x222ec,A1 00022396 70 0c |p | MOVEQ.L #0x0c,D0 00022398 10 d9 | | MOVE.B (A1)+,(A0)+ 0002239a 51 c8 ff fc |Q | DBF D0,0x22398 0002239e 51 4f |QO | SUBQ.L #0x8,A7 000223a0 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000223a4 3f 01 |? | MOVE.W D1,-(A7) 000223a6 3f 02 |? | MOVE.W D2,-(A7) 000223a8 4e 93 |N | JSR (A3) 000223aa 54 4f |TO | ADDQ.L #0x2,A7 000223ac 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 000223b0 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 000223b6 54 4f |TO | ADDQ.L #0x2,A7 000223b8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000223be 50 4f |PO | ADDQ.L #0x8,A7 000223c0 4e 94 |N | JSR (A4) 000223c2 de c4 | | ADDA.W D4,A7 000223c4 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 000223c8 b0 c1 | | CMPA.W D1,A0 000223ca 67 48 |gH | BEQ 0x22414 000223cc 9e c5 | | SUBA.W D5,A7 000223ce 22 4f |"O | MOVEA.L A7,A1 000223d0 45 fa ff 28 |E ( | LEA.L 0x222fa,A2 000223d4 70 0c |p | MOVEQ.L #0x0c,D0 000223d6 12 da | | MOVE.B (A2)+,(A1)+ 000223d8 51 c8 ff fc |Q | DBF D0,0x223d6 000223dc 9e c3 | | SUBA.W D3,A7 000223de 22 4f |"O | MOVEA.L A7,A1 000223e0 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 000223e4 70 1d |p | MOVEQ.L #0x1d,D0 000223e6 12 d8 | | MOVE.B (A0)+,(A1)+ 000223e8 51 c8 ff fc |Q | DBF D0,0x223e6 000223ec 51 4f |QO | SUBQ.L #0x8,A7 000223ee 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 000223f2 3f 01 |? | MOVE.W D1,-(A7) 000223f4 3f 02 |? | MOVE.W D2,-(A7) 000223f6 4e 93 |N | JSR (A3) 000223f8 58 4f |XO | ADDQ.L #0x4,A7 000223fa 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000223fe 3f 01 |? | MOVE.W D1,-(A7) 00022400 3f 03 |? | MOVE.W D3,-(A7) 00022402 4e 93 |N | JSR (A3) 00022404 50 4f |PO | ADDQ.L #0x8,A7 00022406 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002240c 50 4f |PO | ADDQ.L #0x8,A7 0002240e 4e 94 |N | JSR (A4) 00022410 de fc 00 30 | 0 | ADDA.W #0x30,A7 00022414 9e c5 | | SUBA.W D5,A7 00022416 20 4f | O | MOVEA.L A7,A0 00022418 43 fa fe ee |C | LEA.L 0x22308,A1 0002241c 70 0c |p | MOVEQ.L #0x0c,D0 0002241e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022420 51 c8 ff fc |Q | DBF D0,0x2241e 00022424 51 4f |QO | SUBQ.L #0x8,A7 00022426 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002242a 3f 01 |? | MOVE.W D1,-(A7) 0002242c 3f 02 |? | MOVE.W D2,-(A7) 0002242e 4e 93 |N | JSR (A3) 00022430 54 4f |TO | ADDQ.L #0x2,A7 00022432 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00022436 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 0002243c 54 4f |TO | ADDQ.L #0x2,A7 0002243e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022444 50 4f |PO | ADDQ.L #0x8,A7 00022446 4e 94 |N | JSR (A4) 00022448 5d 4f |]O | SUBQ.L #0x6,A7 0002244a 20 4f | O | MOVEA.L A7,A0 0002244c 43 fa fe da |C | LEA.L 0x22328,A1 00022450 70 16 |p | MOVEQ.L #0x16,D0 00022452 10 d9 | | MOVE.B (A1)+,(A0)+ 00022454 51 c8 ff fc |Q | DBF D0,0x22452 00022458 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 0002245c 59 4f |YO | SUBQ.L #0x4,A7 0002245e 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00022462 3f 01 |? | MOVE.W D1,-(A7) 00022464 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00022468 4e 93 |N | JSR (A3) 0002246a 50 4f |PO | ADDQ.L #0x8,A7 0002246c 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022472 de c3 | | ADDA.W D3,A7 00022474 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00022478 4e 5e |N^ | UNLK A6 0002247a 4e 75 |Nu | RTS