|
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: 12800 (0x3200) Types: M200 Notes: @(#)EMBALM,3.2,92/10/28,16:17:00, M200_PROGRAM Names: »EMBALM.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3 └─ ⟦this⟧ »EMBALM.M200«
@ 2127a <LVAR 0x010 1(r)> <LVAR 0x00c 4(r)> <LVAR 0x00a 1(r)> <LVAR 0x008 1(r)> <POP 2127a-21322 Body> <POP 2127a-21290 Prologue> Σ0 ↓ <POP 21290-21292 RegCacheLoad> Σ0 ↓ <POP 21292-212b4 Naked> Σ0 ↓ →0x212b6 <MI 21292 MOVEQ.L #0x00,D0> {} <MI 21294 MOVE.L (A6+0xc),D1> {} <POP 0x21298 LimitCheck 0x0 ≤ D1 ≤ 0x7> {} <MI 212a2 ASL.L #0x1,D1> {} <MI 212a4 LEA.L 0x20b82,A0> {} <MI 212a8 CLR.L D2> {} <MI 212aa MOVE.B (A6+0x10),D2> {} <MI 212ae AND.W (A0+D1.L),D2> {} <MI 212b2 BEQ 0x212b6> {} <POP 212b4-212b6 Naked> Σ0 ↓ <MI 212b4 ADDQ.B #0x1,D0> {} <POP 212b6-212bc Naked> Σ0 ↓ →0x2131a ←0x21292 <MI 212b6 CMP.B (A6+0xa),D0> {} <MI 212ba BNE 0x2131a> {} <POP 212bc-2131a Naked> Σ0 ↓ <MI 212bc MOVEA.L (A4+0x28),A0> {} <MI 212c0 MOVE.B (A6+0x8),D0> {} <MI 212c4 EXTB.W D0> {} <MI 212c6 MOVE.B #0x01,(A0+D0.W)> {} <Blob 0x212ca [2] @> Δ-2 {[«2""»]} <POP 212ce-212d0 StackAdj> Δ-4 {[«2""»]|[-4-]} <Lit 0x212d0 2> {[«2""»]|[$$__]} <Call 0x212e2 0x103d8> {[«2""»]|[$$__]} WriteConsoleString(str : String) <POP 212e8-212ea StackAdj> Δ+6 {} <MI 212ea ASL.W #0x5,D0> {} <MI 212ec LEA.L 0x20cfa,A0> {} <Blob 0x212f0 [30] (A0+D0.W+#0x1e)> Δ-30 {[«30»]} <POP 212fc-212fe StackAdj> Δ-4 {[«30»]|[-4-]} <Lit 0x212fe> {[«30»]|[$$…]} <Pointer.sp 0x212fe 4> Δ-4 <Const 0x21302 0x1.2> Δ-2 <Const 0x21304 0x1e.2> Δ-2 <Call 0x21308 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 2130e-21310 StackAdj> Δ+8 <Call 0x21310 0x103e0> {[«30»]|[$$…]} WriteConsoleStringCrLf(str : String) <POP 21316-2131a StackAdj> Δ+34 {} <POP 2131a-21322 Epilogue> Σ0 ←0x212b6
@ 21322 <LVAR -0x002 @ 1(r)> <LVAR -0x003 @> <LVAR -0x005 @ 1(r)> <LVAR -0x006 @ 1(r)> <LVAR -0x007 @ 1(r)> <LVAR -0x009 1(r)> <LVAR -0x00d @> <LVAR -0x012 1(r)> <LVAR -0x013 @ 1(r)> <LVAR -0x014 1(r)> <LVAR -0x018 @> <LVAR -0x01c 1(r)> <LVAR -0x01d @ 1(r)> <LVAR -0x01e 1(rw)> <LVAR -0x01f 1(rw)> <LVAR -0x020 @ 1(rw)> <POP 21322-2188c Body> Δ+40 <POP 21322-21338 Prologue> Σ0 ↓ <POP 21338-21352 RegCacheLoad> Σ0 ↓ <POP 21352-21360 Naked> Σ0 ↓ →0x21362 <MI 21352 MOVEQ.L #0x00,D7> {} <MI 21354 MOVE.W 0x23058,D0> {} <MI 2135a ANDI.W #0x4000,D0> {} <MI 2135e BEQ 0x21362> {} <POP 21360-21362 Naked> Σ0 ↓ <MI 21360 ADDQ.B #0x1,D7> {} <POP 21362-214d4 Naked> Σ0 ↓ →0x214f6 ←0x21352 <MI 21362 MOVE.W 0x2305a,D0> {} <MI 21368 ANDI.W #0x3f00,D0> {} <MI 2136c LSR.W #0x8,D0> {} <MI 2136e MOVE.B D0,(A6-0x1f)> {} <MI 21370 MOVE.W 0x2305a,D0> {} <MI 21376 ANDI.W #0x00ff,D0> {} <MI 2137a MOVE.B D0,(A6-0x1e)> {} <POP 2137e-21380 StackAdj> Δ-2 {[-2-]} <MI 21380 MOVE.B (A6-0x1f),(A7)> {[-2-]} <MI 21382 MOVE.B (A6-0x1e),(A7+0x1)> {[-2-]} <MI 21388 CLR.B -(A7)> Δ-2 {[-2-]|[#0]} <Pointer.fp 0x2138a <LVAR -0x013 @ 1(r)>> Δ-4 {[-2-]|[#0]|[@@-19]} <Pointer.fp 0x2138e <LVAR -0x003 @>> Δ-4 {[-2-]|[#0]|[@@-19]|[@@-3]} <Call 0x21392 0x22a4e> {[-2-]|[#0]|[@@-19]|[@@-3]} exp_READ_WCS.TYP(Sw_2, Sw_1, &Sr_6, &Fr) <POP 21398-2139a StackAdj> Δ+10 {[-2-]} <MI 2139a MOVE.B (A6-0x1f),(A7)> {[-2-]} <MI 2139c MOVE.B (A6-0x1e),(A7+0x1)> {[-2-]} <MI 213a2 CLR.B -(A7)> Δ-2 {[-2-]|[#0]} <Pointer.fp 0x213a4 <LVAR -0x01d @ 1(r)>> Δ-4 {[-2-]|[#0]|[@@-29]} <Pointer.fp 0x213a8 <LVAR -0x003 @>> Δ-4 {[-2-]|[#0]|[@@-29]|[@@-3]} <Call 0x213ac 0x22a8a> {[-2-]|[#0]|[@@-29]|[@@-3]} exp_READ_WCS.VAL(Sw_2, Sw_1, &Sr_5, &Fr) <POP 213b2-213b4 StackAdj> Δ+10 {[-2-]} <MI 213b4 MOVE.B (A6-0x1f),(A7)> {[-2-]} <MI 213b6 MOVE.B (A6-0x1e),(A7+0x1)> {[-2-]} <MI 213bc CLR.B -(A7)> Δ-2 {[-2-]|[#0]} <Const 0x213be 0x230d8.4> Δ-4 {[-2-]|[#0]|[##143576]} <Pointer.fp 0x213c4 <LVAR -0x003 @>> Δ-4 {[-2-]|[#0]|[##143576]|[@@-3]} <Call 0x213c8 0x22d90> {[-2-]|[#0]|[##143576]|[@@-3]} exp_READ_WCS.IOC(Sw_2, Sw_1, &Sr_2, &Fr) <POP 213ce-213d0 StackAdj> Δ+12 {} <MI 213d0 MOVE.W 0x2305c,D0> {} <MI 213d6 ANDI.W #0x3f00,D0> {} <MI 213da LSR.W #0x8,D0> {} <MI 213dc MOVE.B D0,(A6-0x1f)> {} <MI 213de MOVE.W 0x2305c,D0> {} <MI 213e4 ANDI.W #0x00ff,D0> {} <MI 213e8 MOVE.B D0,(A6-0x1e)> {} <POP 213ec-213ee StackAdj> Δ-2 {[-2-]} <MI 213ee MOVE.B (A6-0x1f),(A7)> {[-2-]} <MI 213f0 MOVE.B (A6-0x1e),(A7+0x1)> {[-2-]} <MI 213f6 CLR.B -(A7)> Δ-2 {[-2-]|[#0]} <Pointer.fp 0x213f8 <LVAR -0x00d @>> Δ-4 {[-2-]|[#0]|[@@-13]} <Pointer.fp 0x213fc <LVAR -0x003 @>> Δ-4 {[-2-]|[#0]|[@@-13]|[@@-3]} <Call 0x21400 0x22a4e> {[-2-]|[#0]|[@@-13]|[@@-3]} exp_READ_WCS.TYP(Sw_2, Sw_1, &Sr_6, &Fr) <POP 21406-21408 StackAdj> Δ+10 {[-2-]} <MI 21408 MOVE.B (A6-0x1f),(A7)> {[-2-]} <MI 2140a MOVE.B (A6-0x1e),(A7+0x1)> {[-2-]} <MI 21410 CLR.B -(A7)> Δ-2 {[-2-]|[#0]} <Pointer.fp 0x21412 <LVAR -0x018 @>> Δ-4 {[-2-]|[#0]|[@@-24]} <Pointer.fp 0x21416 <LVAR -0x003 @>> Δ-4 {[-2-]|[#0]|[@@-24]|[@@-3]} <Call 0x2141a 0x22a8a> {[-2-]|[#0]|[@@-24]|[@@-3]} exp_READ_WCS.VAL(Sw_2, Sw_1, &Sr_5, &Fr) <POP 21420-21422 StackAdj> Δ+10 {[-2-]} <MI 21422 MOVE.B (A6-0x1f),(A7)> {[-2-]} <MI 21424 MOVE.B (A6-0x1e),(A7+0x1)> {[-2-]} <MI 2142a CLR.B -(A7)> Δ-2 {[-2-]|[#0]} <Const 0x2142c 0x230da.4> Δ-4 {[-2-]|[#0]|[##143578]} <Pointer.fp 0x21432 <LVAR -0x003 @>> Δ-4 {[-2-]|[#0]|[##143578]|[@@-3]} <Call 0x21436 0x22d90> {[-2-]|[#0]|[##143578]|[@@-3]} exp_READ_WCS.IOC(Sw_2, Sw_1, &Sr_2, &Fr) <POP 2143c-2143e StackAdj> Δ+10 {[-2-]} <MI 2143e CLR.B (A7)> {[-2-]} <Pointer.fp 0x21440 <LVAR -0x020 @ 1(rw)>> Δ-4 {[-2-]|[@@-32]} <Call 0x21442 0x22e06> {[-2-]|[@@-32]} exp_READ_PAREG.IOC(Sw_1, &Sr_1) <POP 21448-2144a StackAdj> Δ+4 {[-2-]} <MI 2144a MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x2144c 0x4.4> Δ-4 {[-2-]|[##4]} <MI 21450 CLR.B -(A7)> Δ-2 {[-2-]|[##4]|[#0]} <Const 0x21452 0x2.2> Δ-2 {[-2-]|[##4]|[#0]|[#2]} <MI 21454 LEA.L (A6-0x20),A4> {[-2-]|[##4]|[#0]|[#2]} <Call 0x21456 0x2127a> {[-2-]|[##4]|[#0]|[#2]} <POP 21458-2145a StackAdj> Δ+8 {[-2-]} <MI 2145a MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x2145c 0x5.4> Δ-4 {[-2-]|[##5]} <MI 21460 CLR.B -(A7)> Δ-2 {[-2-]|[##5]|[#0]} <Const 0x21462 0x3.2> Δ-2 {[-2-]|[##5]|[#0]|[#3]} <MI 21464 LEA.L (A6-0x20),A4> {[-2-]|[##5]|[#0]|[#3]} <Call 0x21466 0x2127a> {[-2-]|[##5]|[#0]|[#3]} <POP 21468-2146a StackAdj> Δ+8 {[-2-]} <MI 2146a MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x2146c 0x6.4> Δ-4 {[-2-]|[##6]} <MI 21470 CLR.B -(A7)> Δ-2 {[-2-]|[##6]|[#0]} <Const 0x21472 0x1.2> Δ-2 {[-2-]|[##6]|[#0]|[#1]} <MI 21474 LEA.L (A6-0x20),A4> {[-2-]|[##6]|[#0]|[#1]} <Call 0x21476 0x2127a> {[-2-]|[##6]|[#0]|[#1]} <POP 21478-2147a StackAdj> Δ+8 {[-2-]} <MI 2147a MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x2147c 0x7.4> Δ-4 {[-2-]|[##7]} <MI 2147e CLR.B -(A7)> Δ-2 {[-2-]|[##7]|[#0]} <MI 21480 CLR.B -(A7)> Δ-2 {[-2-]|[##7]|[#0]|[#0]} <MI 21482 LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#0]|[#0]} <Call 0x21484 0x2127a> {[-2-]|[##7]|[#0]|[#0]} <POP 21486-21488 StackAdj> Δ+10 {} <Pointer.fp 0x21488 <LVAR -0x020 @ 1(rw)>> Δ-4 {[@@-32]} <Call 0x2148a 0x22aa8> {[@@-32]} exp_READ_PARITY.VAL(&Sr_1) <POP 21490-21492 StackAdj> Δ+2 {[-2-]} <MI 21492 MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x21494 0x0.4> Δ-4 {[-2-]|[##0]} <MI 21498 CLR.B -(A7)> Δ-2 {[-2-]|[##0]|[#0]} <Const 0x2149a 0x4.2> Δ-2 {[-2-]|[##0]|[#0]|[#4]} <MI 2149e LEA.L (A6-0x20),A4> {[-2-]|[##0]|[#0]|[#4]} <Call 0x214a0 0x2127a> {[-2-]|[##0]|[#0]|[#4]} <POP 214a2-214a4 StackAdj> Δ+8 {[-2-]} <MI 214a4 MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x214a6 0x1.4> Δ-4 {[-2-]|[##1]} <MI 214aa CLR.B -(A7)> Δ-2 {[-2-]|[##1]|[#0]} <Const 0x214ac 0x5.2> Δ-2 {[-2-]|[##1]|[#0]|[#5]} <MI 214b0 LEA.L (A6-0x20),A4> {[-2-]|[##1]|[#0]|[#5]} <Call 0x214b2 0x2127a> {[-2-]|[##1]|[#0]|[#5]} <POP 214b4-214b6 StackAdj> Δ+8 {[-2-]} <MI 214b6 MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x214b8 0x3.4> Δ-4 {[-2-]|[##3]} <MI 214bc CLR.B -(A7)> Δ-2 {[-2-]|[##3]|[#0]} <Const 0x214be 0x6.2> Δ-2 {[-2-]|[##3]|[#0]|[#6]} <MI 214c2 LEA.L (A6-0x20),A4> {[-2-]|[##3]|[#0]|[#6]} <Call 0x214c4 0x2127a> {[-2-]|[##3]|[#0]|[#6]} <POP 214c6-214c8 StackAdj> Δ+10 {} <MI 214c8 CLR.L D0> {} <MI 214ca MOVE.B (A6-0x1d),D0> {} <MI 214ce AND.W #0x03,D0> {} <MI 214d0 CMP.W #0x01,D0> {} <MI 214d2 BNE 0x214f6> {} <POP 214d4-214e4 Naked> Σ0 ↓ →0x214f6 <MI 214d4 CLR.L D0> {} <MI 214d6 MOVE.B (A6-0x1c),D0> {} <MI 214da ANDI.W #0x00f0,D0> {} <MI 214de CMPI.W #0x0060,D0> {} <MI 214e2 BNE 0x214f6> {} <POP 214e4-214e8 Naked> Σ0 ↓ →0x214f6 <MI 214e4 TST.B D7> {} <MI 214e6 BNE 0x214f6> {} <POP 214e8-214f6 Naked> Σ0 Δ-10 →0x21502 <MI 214e8 MOVE.B (A6-0x20),-(A7)> Δ-2 {[2, '(A6-0x20)']} <Const 0x214ea 0x2.4> Δ-4 {[2, '(A6-0x20)']|[##2]} <MI 214ee CLR.B -(A7)> Δ-2 {[2, '(A6-0x20)']|[##2]|[#0]} <Const 0x214f0 0x8.2> Δ-2 {[2, '(A6-0x20)']|[##2]|[#0]|[#8]} <MI 214f4 BRA 0x21502> {[2, '(A6-0x20)']|[##2]|[#0]|[#8]} <POP 214f6-21502 Naked> Σ0 Δ-10 ↓ ←0x21362 ←0x214d4 ←0x214e4 <MI 214f6 MOVE.B (A6-0x20),-(A7)> Δ-2 {[2, '(A6-0x20)']} <Const 0x214f8 0x2.4> Δ-4 {[2, '(A6-0x20)']|[##2]} <MI 214fc CLR.B -(A7)> Δ-2 {[2, '(A6-0x20)']|[##2]|[#0]} <Const 0x214fe 0x7.2> Δ-2 {[2, '(A6-0x20)']|[##2]|[#0]|[#7]} <POP 21502-21514 Naked> Σ-10 Δ+10 ↓ →0x2153c ←0x214e8 <MI 21502 LEA.L (A6-0x20),A4> {[-10-]} <Call 0x21504 0x2127a> {[-10-]} <POP 21506-21508 StackAdj> Δ+10 {} <MI 21508 CLR.L D0> {} <MI 2150a MOVE.B (A6-0x20),D0> {} <MI 2150c MOVE.W D0,D1> {} <MI 2150e ANDI.W #0x0004,D1> {} <MI 21512 BEQ 0x2153c> {} <POP 21514-2151e Naked> Σ0 ↓ →0x2152c <MI 21514 CLR.L D1> {} <MI 21516 MOVE.B (A6-0x14),D1> {} <MI 2151a AND.W #0x02,D1> {} <MI 2151c BNE 0x2152c> {} <POP 2151e-2152c Naked> Σ0 Δ-10 →0x21536 <MI 2151e MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']} <Const 0x21520 0x4.4> Δ-4 {[2, 'D0']|[##4]} <Const 0x21524 0x1.2> Δ-2 {[2, 'D0']|[##4]|[#1]} <Const 0x21526 0x9.2> Δ-2 {[2, 'D0']|[##4]|[#1]|[#9]} <MI 2152a BRA 0x21536> {[2, 'D0']|[##4]|[#1]|[#9]} <POP 2152c-21536 Naked> Σ0 Δ-10 ↓ ←0x21514 <MI 2152c MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']} <Const 0x2152e 0x4.4> Δ-4 {[2, 'D0']|[##4]} <Const 0x21532 0x1.2> Δ-2 {[2, 'D0']|[##4]|[#1]} <Const 0x21534 0xa.2> Δ-2 {[2, 'D0']|[##4]|[#1]|[#10]} <POP 21536-2153c Naked> Σ-10 Δ+10 ↓ ←0x2151e <MI 21536 LEA.L (A6-0x20),A4> {[-10-]} <Call 0x21538 0x2127a> {[-10-]} <POP 2153a-2153c StackAdj> Δ+10 {} <POP 2153c-21586 Naked> Σ0 ↓ →0x215a8 ←0x21502 <Pointer.fp 0x2153c <LVAR -0x020 @ 1(rw)>> Δ-4 {[@@-32]} <Call 0x2153e 0x22a6c> {[@@-32]} exp_READ_PARITY.TYP(&Sr_1) <POP 21544-21546 StackAdj> Δ+2 {[-2-]} <MI 21546 MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x21548 0x0.4> Δ-4 {[-2-]|[##0]} <MI 2154c CLR.B -(A7)> Δ-2 {[-2-]|[##0]|[#0]} <Const 0x2154e 0xb.2> Δ-2 {[-2-]|[##0]|[#0]|[#11]} <MI 21552 LEA.L (A6-0x20),A4> {[-2-]|[##0]|[#0]|[#11]} <Call 0x21554 0x2127a> {[-2-]|[##0]|[#0]|[#11]} <POP 21556-21558 StackAdj> Δ+8 {[-2-]} <MI 21558 MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x2155a 0x1.4> Δ-4 {[-2-]|[##1]} <MI 2155e CLR.B -(A7)> Δ-2 {[-2-]|[##1]|[#0]} <Const 0x21560 0xc.2> Δ-2 {[-2-]|[##1]|[#0]|[#12]} <MI 21562 LEA.L (A6-0x20),A4> {[-2-]|[##1]|[#0]|[#12]} <Call 0x21564 0x2127a> {[-2-]|[##1]|[#0]|[#12]} <POP 21566-21568 StackAdj> Δ+8 {[-2-]} <MI 21568 MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x2156a 0x3.4> Δ-4 {[-2-]|[##3]} <MI 2156e CLR.B -(A7)> Δ-2 {[-2-]|[##3]|[#0]} <Const 0x21570 0xd.2> Δ-2 {[-2-]|[##3]|[#0]|[#13]} <MI 21574 LEA.L (A6-0x20),A4> {[-2-]|[##3]|[#0]|[#13]} <Call 0x21576 0x2127a> {[-2-]|[##3]|[#0]|[#13]} <POP 21578-2157a StackAdj> Δ+10 {} <MI 2157a CLR.L D0> {} <MI 2157c MOVE.B (A6-0x13),D0> {} <MI 21580 AND.W #0x03,D0> {} <MI 21582 CMP.W #0x01,D0> {} <MI 21584 BNE 0x215a8> {} <POP 21586-21596 Naked> Σ0 ↓ →0x215a8 <MI 21586 CLR.L D0> {} <MI 21588 MOVE.B (A6-0x12),D0> {} <MI 2158c ANDI.W #0x00f0,D0> {} <MI 21590 CMPI.W #0x0060,D0> {} <MI 21594 BNE 0x215a8> {} <POP 21596-2159a Naked> Σ0 ↓ →0x215a8 <MI 21596 TST.B D7> {} <MI 21598 BNE 0x215a8> {} <POP 2159a-215a8 Naked> Σ0 Δ-10 →0x215b4 <MI 2159a MOVE.B (A6-0x20),-(A7)> Δ-2 {[2, '(A6-0x20)']} <Const 0x2159c 0x2.4> Δ-4 {[2, '(A6-0x20)']|[##2]} <MI 215a0 CLR.B -(A7)> Δ-2 {[2, '(A6-0x20)']|[##2]|[#0]} <Const 0x215a2 0xf.2> Δ-2 {[2, '(A6-0x20)']|[##2]|[#0]|[#15]} <MI 215a6 BRA 0x215b4> {[2, '(A6-0x20)']|[##2]|[#0]|[#15]} <POP 215a8-215b4 Naked> Σ0 Δ-10 ↓ ←0x2153c ←0x21586 ←0x21596 <MI 215a8 MOVE.B (A6-0x20),-(A7)> Δ-2 {[2, '(A6-0x20)']} <Const 0x215aa 0x2.4> Δ-4 {[2, '(A6-0x20)']|[##2]} <MI 215ae CLR.B -(A7)> Δ-2 {[2, '(A6-0x20)']|[##2]|[#0]} <Const 0x215b0 0xe.2> Δ-2 {[2, '(A6-0x20)']|[##2]|[#0]|[#14]} <POP 215b4-215c4 Naked> Σ-10 Δ+10 ↓ →0x215ee ←0x2159a <MI 215b4 LEA.L (A6-0x20),A4> {[-10-]} <Call 0x215b6 0x2127a> {[-10-]} <POP 215b8-215ba StackAdj> Δ+10 {} <MI 215ba CLR.L D0> {} <MI 215bc MOVE.B (A6-0x20),D0> {} <MI 215be MOVE.W D0,D1> {} <MI 215c0 AND.W #0x02,D1> {} <MI 215c2 BEQ 0x215ee> {} <POP 215c4-215ce Naked> Σ0 ↓ →0x215dc <MI 215c4 CLR.L D1> {} <MI 215c6 MOVE.B (A6-0x9),D1> {} <MI 215ca AND.W #0x01,D1> {} <MI 215cc BNE 0x215dc> {} <POP 215ce-215dc Naked> Σ0 Δ-10 →0x215e8 <MI 215ce MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']} <Const 0x215d0 0x5.4> Δ-4 {[2, 'D0']|[##5]} <Const 0x215d4 0x1.2> Δ-2 {[2, 'D0']|[##5]|[#1]} <Const 0x215d6 0x10.2> Δ-2 {[2, 'D0']|[##5]|[#1]|[#16]} <MI 215da BRA 0x215e8> {[2, 'D0']|[##5]|[#1]|[#16]} <POP 215dc-215e8 Naked> Σ0 Δ-10 ↓ ←0x215c4 <MI 215dc MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']} <Const 0x215de 0x5.4> Δ-4 {[2, 'D0']|[##5]} <Const 0x215e2 0x1.2> Δ-2 {[2, 'D0']|[##5]|[#1]} <Const 0x215e4 0x11.2> Δ-2 {[2, 'D0']|[##5]|[#1]|[#17]} <POP 215e8-215ee Naked> Σ-10 Δ+10 ↓ ←0x215ce <MI 215e8 LEA.L (A6-0x20),A4> {[-10-]} <Call 0x215ea 0x2127a> {[-10-]} <POP 215ec-215ee StackAdj> Δ+10 {} <POP 215ee-21718 Naked> Σ0 ↓ →0x21764 ←0x215b4 <Pointer.fp 0x215ee <LVAR -0x020 @ 1(rw)>> Δ-4 {[@@-32]} <Call 0x215f0 0x22a2c> {[@@-32]} exp_GET_MISC_ERRORS.SEQ(&Sr_1) <POP 215f6-215f8 StackAdj> Δ+2 {[-2-]} <MI 215f8 MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x215fa 0x3.4> Δ-4 {[-2-]|[##3]} <MI 215fe CLR.B -(A7)> Δ-2 {[-2-]|[##3]|[#0]} <Const 0x21600 0x12.2> Δ-2 {[-2-]|[##3]|[#0]|[#18]} <MI 21604 LEA.L (A6-0x20),A4> {[-2-]|[##3]|[#0]|[#18]} <Call 0x21606 0x2127a> {[-2-]|[##3]|[#0]|[#18]} <POP 21608-2160a StackAdj> Δ+8 {[-2-]} <MI 2160a MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x2160c 0x4.4> Δ-4 {[-2-]|[##4]} <MI 21610 CLR.B -(A7)> Δ-2 {[-2-]|[##4]|[#0]} <Const 0x21612 0x13.2> Δ-2 {[-2-]|[##4]|[#0]|[#19]} <MI 21616 LEA.L (A6-0x20),A4> {[-2-]|[##4]|[#0]|[#19]} <Call 0x21618 0x2127a> {[-2-]|[##4]|[#0]|[#19]} <POP 2161a-2161c StackAdj> Δ+8 {[-2-]} <MI 2161c MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x2161e 0x5.4> Δ-4 {[-2-]|[##5]} <MI 21622 CLR.B -(A7)> Δ-2 {[-2-]|[##5]|[#0]} <Const 0x21624 0x14.2> Δ-2 {[-2-]|[##5]|[#0]|[#20]} <MI 21628 LEA.L (A6-0x20),A4> {[-2-]|[##5]|[#0]|[#20]} <Call 0x2162a 0x2127a> {[-2-]|[##5]|[#0]|[#20]} <POP 2162c-2162e StackAdj> Δ+8 {[-2-]} <MI 2162e MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x21630 0x6.4> Δ-4 {[-2-]|[##6]} <MI 21634 CLR.B -(A7)> Δ-2 {[-2-]|[##6]|[#0]} <Const 0x21636 0x15.2> Δ-2 {[-2-]|[##6]|[#0]|[#21]} <MI 2163a LEA.L (A6-0x20),A4> {[-2-]|[##6]|[#0]|[#21]} <Call 0x2163c 0x2127a> {[-2-]|[##6]|[#0]|[#21]} <POP 2163e-21640 StackAdj> Δ+8 {[-2-]} <MI 21640 MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x21642 0x7.4> Δ-4 {[-2-]|[##7]} <MI 21644 CLR.B -(A7)> Δ-2 {[-2-]|[##7]|[#0]} <Const 0x21646 0x16.2> Δ-2 {[-2-]|[##7]|[#0]|[#22]} <MI 2164a LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#0]|[#22]} <Call 0x2164c 0x2127a> {[-2-]|[##7]|[#0]|[#22]} <POP 2164e-21650 StackAdj> Δ+10 {} <Pointer.fp 0x21650 <LVAR -0x002 @ 1(r)>> Δ-4 {[@@-2]} <Call 0x21654 0x22a16> {[@@-2]} exp_HALT.SEQ(&Fr) <POP 2165a-2165c StackAdj> Δ+4 {} <MI 2165c MOVE.B (A6-0x2),(A6-0x20)> {} <MI 21660 MOVE.B (A6-0x20),-(A7)> Δ-2 {[2, '(A6-0x20)']} <Const 0x21662 0x7.4> Δ-4 {[2, '(A6-0x20)']|[##7]} <Const 0x21664 0x1.2> Δ-2 {[2, '(A6-0x20)']|[##7]|[#1]} <Const 0x21666 0x17.2> Δ-2 {[2, '(A6-0x20)']|[##7]|[#1]|[#23]} <MI 2166a LEA.L (A6-0x20),A4> {[2, '(A6-0x20)']|[##7]|[#1]|[#23]} <Call 0x2166c 0x2127a> {[2, '(A6-0x20)']|[##7]|[#1]|[#23]} <POP 2166e-21670 StackAdj> Δ+8 {[2, '(A6-0x20)']} <MI 21670 CLR.B (A7)> {[2, '(A6-0x20)']} <Pointer.fp 0x21672 <LVAR -0x020 @ 1(rw)>> Δ-4 {[2, '(A6-0x20)']|[@@-32]} <Call 0x21674 0x229f8> {[2, '(A6-0x20)']|[@@-32]} exp_READ_PAREG.FIU(Sw_1, &Sr_1) <POP 2167a-2167c StackAdj> Δ+4 {[2, '(A6-0x20)']} <MI 2167c MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x2167e 0x0.4> Δ-4 {[-2-]|[##0]} <MI 21682 CLR.B -(A7)> Δ-2 {[-2-]|[##0]|[#0]} <Const 0x21684 0x18.2> Δ-2 {[-2-]|[##0]|[#0]|[#24]} <MI 21688 LEA.L (A6-0x20),A4> {[-2-]|[##0]|[#0]|[#24]} <Call 0x2168a 0x2127a> {[-2-]|[##0]|[#0]|[#24]} <POP 2168c-2168e StackAdj> Δ+8 {[-2-]} <MI 2168e MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x21690 0x1.4> Δ-4 {[-2-]|[##1]} <MI 21694 CLR.B -(A7)> Δ-2 {[-2-]|[##1]|[#0]} <Const 0x21696 0x19.2> Δ-2 {[-2-]|[##1]|[#0]|[#25]} <MI 2169a LEA.L (A6-0x20),A4> {[-2-]|[##1]|[#0]|[#25]} <Call 0x2169c 0x2127a> {[-2-]|[##1]|[#0]|[#25]} <POP 2169e-216a0 StackAdj> Δ+8 {[-2-]} <MI 216a0 MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x216a2 0x2.4> Δ-4 {[-2-]|[##2]} <MI 216a6 CLR.B -(A7)> Δ-2 {[-2-]|[##2]|[#0]} <Const 0x216a8 0x1a.2> Δ-2 {[-2-]|[##2]|[#0]|[#26]} <MI 216ac LEA.L (A6-0x20),A4> {[-2-]|[##2]|[#0]|[#26]} <Call 0x216ae 0x2127a> {[-2-]|[##2]|[#0]|[#26]} <POP 216b0-216b2 StackAdj> Δ+8 {[-2-]} <MI 216b2 MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x216b4 0x3.4> Δ-4 {[-2-]|[##3]} <MI 216b8 CLR.B -(A7)> Δ-2 {[-2-]|[##3]|[#0]} <Const 0x216ba 0x1b.2> Δ-2 {[-2-]|[##3]|[#0]|[#27]} <MI 216be LEA.L (A6-0x20),A4> {[-2-]|[##3]|[#0]|[#27]} <Call 0x216c0 0x2127a> {[-2-]|[##3]|[#0]|[#27]} <POP 216c2-216c4 StackAdj> Δ+8 {[-2-]} <MI 216c4 MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x216c6 0x4.4> Δ-4 {[-2-]|[##4]} <MI 216ca CLR.B -(A7)> Δ-2 {[-2-]|[##4]|[#0]} <Const 0x216cc 0x1c.2> Δ-2 {[-2-]|[##4]|[#0]|[#28]} <MI 216d0 LEA.L (A6-0x20),A4> {[-2-]|[##4]|[#0]|[#28]} <Call 0x216d2 0x2127a> {[-2-]|[##4]|[#0]|[#28]} <POP 216d4-216d6 StackAdj> Δ+8 {[-2-]} <MI 216d6 MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x216d8 0x5.4> Δ-4 {[-2-]|[##5]} <MI 216dc CLR.B -(A7)> Δ-2 {[-2-]|[##5]|[#0]} <Const 0x216de 0x1d.2> Δ-2 {[-2-]|[##5]|[#0]|[#29]} <MI 216e2 LEA.L (A6-0x20),A4> {[-2-]|[##5]|[#0]|[#29]} <Call 0x216e4 0x2127a> {[-2-]|[##5]|[#0]|[#29]} <POP 216e6-216e8 StackAdj> Δ+8 {[-2-]} <MI 216e8 MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x216ea 0x6.4> Δ-4 {[-2-]|[##6]} <MI 216ee CLR.B -(A7)> Δ-2 {[-2-]|[##6]|[#0]} <Const 0x216f0 0x1e.2> Δ-2 {[-2-]|[##6]|[#0]|[#30]} <MI 216f4 LEA.L (A6-0x20),A4> {[-2-]|[##6]|[#0]|[#30]} <Call 0x216f6 0x2127a> {[-2-]|[##6]|[#0]|[#30]} <POP 216f8-216fa StackAdj> Δ+8 {[-2-]} <MI 216fa MOVE.B (A6-0x20),(A7)> {[-2-]} <Const 0x216fc 0x7.4> Δ-4 {[-2-]|[##7]} <MI 216fe CLR.B -(A7)> Δ-2 {[-2-]|[##7]|[#0]} <Const 0x21700 0x1f.2> Δ-2 {[-2-]|[##7]|[#0]|[#31]} <MI 21704 LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#0]|[#31]} <Call 0x21706 0x2127a> {[-2-]|[##7]|[#0]|[#31]} <POP 21708-2170a StackAdj> Δ+6 {[-2-]|[-2-]} <POP 2170a-2170b StackAdj> Δ+2 {[-2-]} <Const 0x2170b 0xc.2> Δ-2 {[-2-]|[#12]} <Call 0x2170c 0x104c0> {[-2-]|[#12]} HasBoard(diproc_addr: Byte) : Byte <POP 21712-21714 StackAdj> Δ+2 {[-2-]} <MI 21714 TST.B (A7)+> Δ+2 {} <MI 21716 BEQ 0x21764> {} <POP 21718-21764 Naked> Σ0 ↓ <Const 0x21718 0xc.2> Δ-2 {[#12]} <Pointer.fp 0x2171a <LVAR -0x007 @ 1(r)>> Δ-4 {[#12]|[@@-7]} <Pointer.fp 0x2171e <LVAR -0x006 @ 1(r)>> Δ-4 {[#12]|[@@-7]|[@@-6]} <Pointer.fp 0x21722 <LVAR -0x005 @ 1(r)>> Δ-4 {[#12]|[@@-7]|[@@-6]|[@@-5]} <Call 0x21726 0x22cc6> {[#12]|[@@-7]|[@@-6]|[@@-5]} <POP 2172c-2172e StackAdj> Δ+12 {[#12]} <MI 2172e MOVE.B (A6-0x7),(A7)> {[-2-]} <Const 0x21732 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21734 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x21736 0x20.2> Δ-2 {[-2-]|[##7]|[#1]|[#32]} <MI 2173a LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#32]} <Call 0x2173c 0x2127a> {[-2-]|[##7]|[#1]|[#32]} <POP 2173e-21740 StackAdj> Δ+8 {[-2-]} <MI 21740 MOVE.B (A6-0x6),(A7)> {[-2-]} <Const 0x21744 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21746 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x21748 0x21.2> Δ-2 {[-2-]|[##7]|[#1]|[#33]} <MI 2174c LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#33]} <Call 0x2174e 0x2127a> {[-2-]|[##7]|[#1]|[#33]} <POP 21750-21752 StackAdj> Δ+8 {[-2-]} <MI 21752 MOVE.B (A6-0x5),(A7)> {[-2-]} <Const 0x21756 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21758 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x2175a 0x22.2> Δ-2 {[-2-]|[##7]|[#1]|[#34]} <MI 2175e LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#34]} <Call 0x21760 0x2127a> {[-2-]|[##7]|[#1]|[#34]} <POP 21762-21764 StackAdj> Δ+10 {} <POP 21764-21776 Naked> Σ0 ↓ →0x217c4 ←0x215ee <POP 21764-21766 StackAdj> Δ-2 {[-2-]} <Const 0x21766 0xd.2> Δ-2 {[-2-]|[#13]} <Call 0x2176a 0x104c0> {[-2-]|[#13]} HasBoard(diproc_addr: Byte) : Byte <POP 21770-21772 StackAdj> Δ+2 {[-2-]} <MI 21772 TST.B (A7)+> Δ+2 {} <MI 21774 BEQ 0x217c4> {} <POP 21776-217c4 Naked> Σ0 ↓ <Const 0x21776 0xd.2> Δ-2 {[#13]} <Pointer.fp 0x2177a <LVAR -0x007 @ 1(r)>> Δ-4 {[#13]|[@@-7]} <Pointer.fp 0x2177e <LVAR -0x006 @ 1(r)>> Δ-4 {[#13]|[@@-7]|[@@-6]} <Pointer.fp 0x21782 <LVAR -0x005 @ 1(r)>> Δ-4 {[#13]|[@@-7]|[@@-6]|[@@-5]} <Call 0x21786 0x22cc6> {[#13]|[@@-7]|[@@-6]|[@@-5]} <POP 2178c-2178e StackAdj> Δ+12 {[#13]} <MI 2178e MOVE.B (A6-0x7),(A7)> {[-2-]} <Const 0x21792 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21794 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x21796 0x23.2> Δ-2 {[-2-]|[##7]|[#1]|[#35]} <MI 2179a LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#35]} <Call 0x2179c 0x2127a> {[-2-]|[##7]|[#1]|[#35]} <POP 2179e-217a0 StackAdj> Δ+8 {[-2-]} <MI 217a0 MOVE.B (A6-0x6),(A7)> {[-2-]} <Const 0x217a4 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x217a6 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x217a8 0x24.2> Δ-2 {[-2-]|[##7]|[#1]|[#36]} <MI 217ac LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#36]} <Call 0x217ae 0x2127a> {[-2-]|[##7]|[#1]|[#36]} <POP 217b0-217b2 StackAdj> Δ+8 {[-2-]} <MI 217b2 MOVE.B (A6-0x5),(A7)> {[-2-]} <Const 0x217b6 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x217b8 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x217ba 0x25.2> Δ-2 {[-2-]|[##7]|[#1]|[#37]} <MI 217be LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#37]} <Call 0x217c0 0x2127a> {[-2-]|[##7]|[#1]|[#37]} <POP 217c2-217c4 StackAdj> Δ+10 {} <POP 217c4-217d6 Naked> Σ0 ↓ →0x21824 ←0x21764 <POP 217c4-217c6 StackAdj> Δ-2 {[-2-]} <Const 0x217c6 0xe.2> Δ-2 {[-2-]|[#14]} <Call 0x217ca 0x104c0> {[-2-]|[#14]} HasBoard(diproc_addr: Byte) : Byte <POP 217d0-217d2 StackAdj> Δ+2 {[-2-]} <MI 217d2 TST.B (A7)+> Δ+2 {} <MI 217d4 BEQ 0x21824> {} <POP 217d6-21824 Naked> Σ0 ↓ <Const 0x217d6 0xe.2> Δ-2 {[#14]} <Pointer.fp 0x217da <LVAR -0x007 @ 1(r)>> Δ-4 {[#14]|[@@-7]} <Pointer.fp 0x217de <LVAR -0x006 @ 1(r)>> Δ-4 {[#14]|[@@-7]|[@@-6]} <Pointer.fp 0x217e2 <LVAR -0x005 @ 1(r)>> Δ-4 {[#14]|[@@-7]|[@@-6]|[@@-5]} <Call 0x217e6 0x22cc6> {[#14]|[@@-7]|[@@-6]|[@@-5]} <POP 217ec-217ee StackAdj> Δ+12 {[#14]} <MI 217ee MOVE.B (A6-0x7),(A7)> {[-2-]} <Const 0x217f2 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x217f4 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x217f6 0x26.2> Δ-2 {[-2-]|[##7]|[#1]|[#38]} <MI 217fa LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#38]} <Call 0x217fc 0x2127a> {[-2-]|[##7]|[#1]|[#38]} <POP 217fe-21800 StackAdj> Δ+8 {[-2-]} <MI 21800 MOVE.B (A6-0x6),(A7)> {[-2-]} <Const 0x21804 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21806 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x21808 0x27.2> Δ-2 {[-2-]|[##7]|[#1]|[#39]} <MI 2180c LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#39]} <Call 0x2180e 0x2127a> {[-2-]|[##7]|[#1]|[#39]} <POP 21810-21812 StackAdj> Δ+8 {[-2-]} <MI 21812 MOVE.B (A6-0x5),(A7)> {[-2-]} <Const 0x21816 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21818 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x2181a 0x28.2> Δ-2 {[-2-]|[##7]|[#1]|[#40]} <MI 2181e LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#40]} <Call 0x21820 0x2127a> {[-2-]|[##7]|[#1]|[#40]} <POP 21822-21824 StackAdj> Δ+10 {} <POP 21824-21836 Naked> Σ0 ↓ →0x21884 ←0x217c4 <POP 21824-21826 StackAdj> Δ-2 {[-2-]} <Const 0x21826 0xf.2> Δ-2 {[-2-]|[#15]} <Call 0x2182a 0x104c0> {[-2-]|[#15]} HasBoard(diproc_addr: Byte) : Byte <POP 21830-21832 StackAdj> Δ+2 {[-2-]} <MI 21832 TST.B (A7)+> Δ+2 {} <MI 21834 BEQ 0x21884> {} <POP 21836-21884 Naked> Σ0 ↓ <Const 0x21836 0xf.2> Δ-2 {[#15]} <Pointer.fp 0x2183a <LVAR -0x007 @ 1(r)>> Δ-4 {[#15]|[@@-7]} <Pointer.fp 0x2183e <LVAR -0x006 @ 1(r)>> Δ-4 {[#15]|[@@-7]|[@@-6]} <Pointer.fp 0x21842 <LVAR -0x005 @ 1(r)>> Δ-4 {[#15]|[@@-7]|[@@-6]|[@@-5]} <Call 0x21846 0x22cc6> {[#15]|[@@-7]|[@@-6]|[@@-5]} <POP 2184c-2184e StackAdj> Δ+12 {[#15]} <MI 2184e MOVE.B (A6-0x7),(A7)> {[-2-]} <Const 0x21852 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21854 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x21856 0x29.2> Δ-2 {[-2-]|[##7]|[#1]|[#41]} <MI 2185a LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#41]} <Call 0x2185c 0x2127a> {[-2-]|[##7]|[#1]|[#41]} <POP 2185e-21860 StackAdj> Δ+8 {[-2-]} <MI 21860 MOVE.B (A6-0x6),(A7)> {[-2-]} <Const 0x21864 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21866 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x21868 0x2a.2> Δ-2 {[-2-]|[##7]|[#1]|[#42]} <MI 2186c LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#42]} <Call 0x2186e 0x2127a> {[-2-]|[##7]|[#1]|[#42]} <POP 21870-21872 StackAdj> Δ+8 {[-2-]} <MI 21872 MOVE.B (A6-0x5),(A7)> {[-2-]} <Const 0x21876 0x7.4> Δ-4 {[-2-]|[##7]} <Const 0x21878 0x1.2> Δ-2 {[-2-]|[##7]|[#1]} <Const 0x2187a 0x2b.2> Δ-2 {[-2-]|[##7]|[#1]|[#43]} <MI 2187e LEA.L (A6-0x20),A4> {[-2-]|[##7]|[#1]|[#43]} <Call 0x21880 0x2127a> {[-2-]|[##7]|[#1]|[#43]} <POP 21882-21884 StackAdj> Δ+10 {} <POP 21884-2188c Epilogue> Σ0 ←0x21824
@ 2188c <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 2188c-219cc Body> <POP 2188c-218a2 Prologue> Σ0 ↓ <POP 218a2-218a8 RegCacheLoad> Σ0 ↓ <POP 218a8-2193e Naked> Σ0 ↓ <MI 218a8 CLR.B -(A7)> Δ-2 {[#0]} <Pointer.fp 0x218aa <LVAR -0x006 @ 1(r) 2(r)>> Δ-4 {[#0]|[@@-6]} <Call 0x218ac 0x22de0> {[#0]|[@@-6]} exp_READ_TRACE_ADDRESS.IOC(Sw_1, &Sr_2) <POP 218b2-218b4 StackAdj> Δ+6 {} <MI 218b4 CLR.L D0> {} <MI 218b6 MOVE.B (A6-0x6),D0> {} <MI 218b8 ASL.W #0x8,D0> {} <MI 218ba CLR.L D1> {} <MI 218bc MOVE.B (A6-0x5),D1> {} <MI 218c0 ADD.W D0,D1> {} <MI 218c2 MOVE.W D1,D5> {} <MI 218c4 CLR.L D0> {} <MI 218c6 MOVE.W D5,D0> {} <MI 218c8 SUB.L #0x40,D0> {} <MI 218ca SUBQ.L #0x2,D0> {} <MI 218cc ANDI.L #0x000007ff,D0> {} <MI 218d2 MOVE.W D0,D5> {} <MI 218d4 MOVE.W D5,D0> {} <MI 218d6 LSR.W #0x8,D0> {} <MI 218d8 MOVE.B D0,(A6-0x4)> {} <MI 218dc MOVE.W D5,D0> {} <MI 218de ANDI.W #0x00ff,D0> {} <MI 218e2 MOVE.B D0,(A6-0x3)> {} <MI 218e6 MOVE.W (A6-0x4),-(A7)> Δ-2 {[2, '(A6-0x4)']} <MI 218ea CLR.B -(A7)> Δ-2 {[2, '(A6-0x4)']|[#0]} <Call 0x218ec 0x22e24> {[2, '(A6-0x4)']|[#0]} exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1) <POP 218f2-218f4 StackAdj> Δ+4 {} <Pointer.fp 0x218f4 <LVAR -0x088 @>> Δ-4 {[@@-136]} <Pointer.fp 0x218f8 <LVAR -0x080 @>> Δ-4 {[@@-136]|[@@-128]} <Pointer.fp 0x218fc <LVAR -0x078 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]} <Pointer.fp 0x21900 <LVAR -0x070 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]} <Pointer.fp 0x21904 <LVAR -0x068 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]} <Pointer.fp 0x21908 <LVAR -0x060 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]} <Pointer.fp 0x2190c <LVAR -0x058 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]} <Pointer.fp 0x21910 <LVAR -0x050 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]} <Pointer.fp 0x21914 <LVAR -0x048 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]} <Pointer.fp 0x21918 <LVAR -0x040 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]} <Pointer.fp 0x2191c <LVAR -0x038 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]} <Pointer.fp 0x21920 <LVAR -0x030 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]} <Pointer.fp 0x21924 <LVAR -0x028 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]} <Pointer.fp 0x21928 <LVAR -0x020 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]} <Pointer.fp 0x2192c <LVAR -0x018 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]|[@@-24]} <Pointer.fp 0x21930 <LVAR -0x010 @>> Δ-4 {[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]|[@@-24]|[@@-16]} <Call 0x21934 0x22dae> {[@@-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 2193a-2193c StackAdj> Δ+64 {} <MI 2193c MOVEQ.L #0x00,D6> {} <POP 2193e-21940 Naked> Σ0 ↓ ←0x219ae <MI 2193e MOVEQ.L #0x00,D7> {} <POP 21940-219ae Naked> Σ0 ↓ →0x21940 ←0x21940 <MI 21940 MOVE.L D6,D0> {} <MI 21942 ASL.L #0x2,D0> {} <MI 21944 NEG.L D0> {} <MI 21946 ADDI.L #0x0000003f,D0> {} <MI 2194c SUB.L D7,D0> {} <POP 0x2194e LimitCheck 0x0 ≤ D0 ≤ 0x3f> {} <MI 21958 ASL.L #0x1,D0> {} <MI 2195a LEA.L 0x23050,A0> {} <POP 0x21960 LimitCheck 0x0 ≤ D6 ≤ 0xf> {} <MI 2196a MOVE.L D6,D1> {} <MI 2196c ASL.L #0x3,D1> {} <MI 2196e LEA.L (A6-0x90),A1> {} <MI 21972 MOVE.L D7,D2> {} <MI 21974 ASL.L #0x1,D2> {} <POP 0x21976 LimitCheck 0x0 ≤ D2 ≤ 0x7> {} <MI 21980 LEA.L (A1+D1.L),A1> {} <MI 21984 CLR.L D1> {} <MI 21986 MOVE.B (A1+D2.L+#0x8),D1> {} <MI 2198a ASL.W #0x8,D1> {} <MI 2198c ADDQ.L #0x1,D2> {} <POP 0x2198e LimitCheck 0x0 ≤ D2 ≤ 0x7> {} <MI 21998 CLR.L D3> {} <MI 2199a MOVE.B (A1+D2.L+#0x8),D3> {} <MI 2199e ADD.W D1,D3> {} <MI 219a0 MOVE.W D3,(A0+D0.L+#0x8)> {} <MI 219a4 ADDQ.L #0x1,D7> {} <MI 219a6 CMPI.L #0x00000003,D7> {} <MI 219ac BLE 0x21940> {} <POP 219ae-219b8 Naked> Σ0 ↓ →0x2193e <MI 219ae ADDQ.L #0x1,D6> {} <MI 219b0 CMPI.L #0x0000000f,D6> {} <MI 219b6 BLE 0x2193e> {} <POP 219b8-219c4 Naked> Σ0 ↓ <MI 219b8 MOVE.W (A6-0x6),-(A7)> Δ-2 {[2, '(A6-0x6)']} <MI 219ba CLR.B -(A7)> Δ-2 {[2, '(A6-0x6)']|[#0]} <Call 0x219bc 0x22e24> {[2, '(A6-0x6)']|[#0]} exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1) <POP 219c2-219c4 StackAdj> Δ+4 {} <POP 219c4-219cc Epilogue> Σ0
@ 219cc <LVAR -0x006 @ 4(r)> <LVAR -0x00a @ 4(r)> <LVAR -0x00b @ 1(r)> <POP 219cc-21bda Body> Δ+2 <POP 219cc-219e2 Prologue> Σ0 ↓ <POP 219e2-219fc RegCacheLoad> Σ0 ↓ <POP 219fc-21a1c Naked> Σ0 ↓ <Blob 0x219fc [14] @> Δ-14 {[«14""»]} <POP 21a08-21a0a StackAdj> Δ-4 {[«14""»]|[-4-]} <Lit 0x21a0a 14> {[«14""»]|[$$ uaddr trace:]} <Call 0x21a16 0x103d8> {[«14""»]|[$$ uaddr trace:]} WriteConsoleString(str : String) <POP 21a18-21a1a StackAdj> Δ+18 {} <MI 21a1a MOVEQ.L #0x04,D7> {} <POP 21a1c-21a5e Naked> Σ0 ↓ →0x21a64 ←0x21a68 <Blob 0x21a1c [2] @> Δ-2 {[«2""»]} <POP 21a20-21a22 StackAdj> Δ-8 {[«2""»]|[-8-]} <Lit 0x21a22 2> {[«2""»]|[-4-]|[$$ _]} <MI 21a2c MOVE.L D7,(A7)> {[«2""»]|[-4-]|[4, 'D7']} <POP 21a2a-21a2c StackAdj> Δ-8 {[«2""»]|[-4-]|[4, 'D7']|[-8-]} <Call 0x21a2e 0x102e4> {[«2""»]|[-4-]|[4, 'D7']|[-8-]} Long2String(a : Long) : String <POP 21a34-21a36 StackAdj> Δ+4 {[«2""»]|[-4-]|[4, 'D7']|[-4-]} <Call 0x21a36 0x102d0> {[«2""»]|[-4-]|[4, 'D7']|[-4-]} StringCat2(a, b : String) : String <POP 21a3c-21a3e StackAdj> Δ+8 {[«2""»]|[-4-]} <Call 0x21a3e 0x103d8> {[«2""»]|[-4-]} WriteConsoleString(str : String) <POP 21a40-21a42 StackAdj> Δ+6 {} <MI 21a42 MOVE.L D7,D0> {} <MI 21a44 SUBQ.L #0x1,D0> {} <POP 0x21a46 LimitCheck 0x0 ≤ D0 ≤ 0x3f> {} <MI 21a4c ASL.L #0x1,D0> {} <MI 21a4e LEA.L 0x23050,A0> {} <MI 21a54 MOVE.W (A0+D0.L+#0x8),D0> {} <MI 21a58 ANDI.W #0x8000,D0> {} <MI 21a5c BNE 0x21a64> {} <POP 21a5e-21a64 Naked> Σ0 Δ-2 →0x21a68 <Blob 0x21a5e [2] @> Δ-2 {[«2""»]} <MI 21a62 BRA 0x21a68> {[«2""»]} <POP 21a64-21a68 Naked> Σ0 Δ-2 ↓ ←0x21a1c <Blob 0x21a64 [2] @> Δ-2 {[«2""»]} <POP 21a68-21ab2 Naked> Σ-2 Δ+2 ↓ →0x21a1c ←0x21a5e <POP 21a68-21a6a StackAdj> Δ-4 {[-6-]} <Lit 0x21a6a> {[-2-]|[$$…]} <Pointer.sp 0x21a6a 4> Δ-4 <Const 0x21a6e 0x1.2> Δ-2 <Const 0x21a70 0x2.2> Δ-2 <Call 0x21a72 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 21a74-21a76 StackAdj> Δ+8 <Call 0x21a76 0x103d8> {[-2-]|[$$…]} WriteConsoleString(str : String) <POP 21a78-21a7a StackAdj> Δ+6 {} <POP 21a7a-21a7c StackAdj> Δ-4 {[-4-]} <POP 0x21a7c LimitCheck 0x0 ≤ D7 ≤ 0x3f> {[-4-]} <MI 21a82 MOVE.L D7,D0> {[-4-]} <MI 21a84 ASL.L #0x1,D0> {[-4-]} <MI 21a86 LEA.L 0x23050,A0> {[-4-]} <MI 21a8c MOVE.W (A0+D0.L+#0x8),D0> {[-4-]} <MI 21a90 ANDI.W #0x3fff,D0> {[-4-]} <MI 21a94 CLR.L D1> {[-4-]} <MI 21a96 MOVE.W D0,D1> {[-4-]} <MI 21a98 MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'D1']} <Const 0x21a9a 0x4.4> Δ-4 {[-4-]|[4, 'D1']|[##4]} <Call 0x21a9e 0x102e8> {[-4-]|[4, 'D1']|[##4]} Long2HexString(val : Long; ndig : Long) : String <POP 21aa4-21aa6 StackAdj> Δ+8 {[-4-]} <Call 0x21aa6 0x103d8> {[-4-]} WriteConsoleString(str : String) <POP 21aa8-21aaa StackAdj> Δ+4 {} <MI 21aaa SUBQ.L #0x1,D7> {} <MI 21aac CMP.L #0x01,D7> {} <MI 21aae BGE 0x21a1c> {} <POP 21ab2-21af0 Naked> Σ0 ↓ →0x21ba6 <Blob 0x21ab2 [10] @> Δ-10 {[«10""»]} <POP 21abe-21ac0 StackAdj> Δ-4 {[«10""»]|[-4-]} <Lit 0x21ac0 10> {[«10""»]|[$$LAST_UCODE]} <POP 21acc-21ace StackAdj> Δ-2 {[«10""»]|[$$LAST_UCODE]|[-2-]} <MI 21ace CLR.B (A7)> {[«10""»]|[$$LAST_UCODE]|[-2-]} <MI 21ad0 CLR.B -(A7)> Δ-2 {[«10""»]|[$$LAST_UCODE]|[-2-]|[#0]} <Const 0x21ad2 0x0.4> Δ-4 {[«10""»]|[$$LAST_UCODE]|[-2-]|[#0]|[##0]} <Pointer.fp 0x21ad6 <LVAR -0x00b @ 1(r)>> Δ-4 {[«10""»]|[$$LAST_UCODE]|[-2-]|[#0]|[##0]|[@@-11]} <Pointer.fp 0x21ada <LVAR -0x00a @ 4(r)>> Δ-4 {[«10""»]|[$$LAST_UCODE]|[-2-]|[#0]|[##0]|[@@-11]|[@@-10]} <Call 0x21ade 0x10380> {[«10""»]|[$$LAST_UCODE]|[-2-]|[#0]|[##0]|[@@-11]|[@@-10]} OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) <POP 21ae4-21ae8 StackAdj> Δ+30 {} <MI 21ae8 TST.B (A6-0xb)> {} <MI 21aec BNE 0x21ba6> {} <POP 21af0-21b36 Naked> Σ0 Δ-2 ↓ →0x21b74 <Pointer.fp 0x21af0 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]} <Call 0x21af2 0x102b8> {[@@-6]} NewString(VAR a : String) <MI 21af8 MOVE.L (A6-0xa),(A7)> {[4, '(A6-0xa)']} <MI 21afc CLR.W -(A7)> Δ-2 {[4, '(A6-0xa)']|[#0]} <MI 21afe CLR.W -(A7)> Δ-2 {[4, '(A6-0xa)']|[#0]|[#0]} <Const 0x21b00 0x40.2> Δ-2 {[4, '(A6-0xa)']|[#0]|[#0]|[#64]} <Const 0x21b04 0x2.2> Δ-2 {[4, '(A6-0xa)']|[#0]|[#0]|[#64]|[#2]} <MI 21b06 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0xa)']|[#0]|[#0]|[#64]|[#2]|[4, '(A6-0x6)']} <Pointer.fp 0x21b08 <LVAR -0x00b @ 1(r)>> Δ-4 {[4, '(A6-0xa)']|[#0]|[#0]|[#64]|[#2]|[4, '(A6-0x6)']|[@@-11]} <Call 0x21b0c 0x10384> {[4, '(A6-0xa)']|[#0]|[#0]|[#64]|[#2]|[4, '(A6-0x6)']|[@@-11]} ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) <POP 21b12-21b14 StackAdj> Δ+18 {[-2-]} <POP 21b14-21b15 StackAdj> Δ+2 {} <Blob 0x21b15 [2] @> Δ-2 {[«2""»]} <POP 21b18-21b1a StackAdj> Δ-4 {[«2""»]|[-4-]} <MI 21b1a MOVE.L (A6-0x6),-(A7)> Δ-4 {[«2""»]|[-4-]|[4, '(A6-0x6)']} <POP 21b1c-21b1e StackAdj> Δ-4 {[«2""»]|[-4-]|[4, '(A6-0x6)']|[-4-]} <Lit 0x21b1e 2> {[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$. ]} <Call 0x21b2a 0x10300> {[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$. ]} FSCALL_10300 <POP 21b30-21b32 StackAdj> Δ+8 {[«2""»]|[-4-]} <MI 21b32 TST.L (A7)+> Δ+4 {[«2""»]} <MI 21b34 BLE 0x21b74> {[«2""»]} <POP 21b36-21b74 Naked> Σ-2 ↓ <MI 21b36 MOVEA.L (A6-0x6),A0> {[-2-]} <Blob 0x21b38 [2] @> Δ-2 {[-2-]|[«2""»]} <POP 21b3c-21b3e StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]} <MI 21b3e MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']} <POP 21b40-21b42 StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-4-]} <Lit 0x21b42 2> {[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$. ]} <Call 0x21b4e 0x10300> {[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$. ]} FSCALL_10300 <POP 21b54-21b56 StackAdj> Δ+8 {[-2-]|[«2""»]|[-4-]} <MI 21b56 MOVE.L (A7)+,D0> Δ+4 {[-2-]|[«2""»]} <MI 21b58 SUBQ.L #0x1,D0> {[-2-]|[«2""»]} <POP 21b5a-21b5c StackAdj> Δ+2 {[-2-]} <POP 0x21b5c LimitCheck -0x8000 ≤ D0 ≤ 0x7fff> {[-2-]} <MI 21b72 MOVE.W D0,(A0)> {[-2-]} <POP 21b74-21ba6 Naked> Σ-2 Δ+2 →0x21bd2 ←0x21af0 <POP 21b74-21b76 StackAdj> Δ+2 {} <Blob 0x21b76 [10] @> Δ-10 {[«10""»]} <POP 21b82-21b84 StackAdj> Δ-8 {[«10""»]|[-8-]} <Lit 0x21b84 10> {[«10""»]|[-4-]|[$$ --ucode_]} <POP 21b90-21b92 StackAdj> Δ-4 {[«10""»]|[-4-]|[$$ --ucode_]|[-4-]} <MI 21b92 MOVE.L (A6-0x6),(A7)> {[«10""»]|[-4-]|[$$ --ucode_]|[4, '(A6-0x6)']} <Call 0x21b94 0x102d0> {[«10""»]|[-4-]|[$$ --ucode_]|[4, '(A6-0x6)']} StringCat2(a, b : String) : String <POP 21b9a-21b9c StackAdj> Δ+8 {[«10""»]|[-4-]} <Call 0x21b9c 0x103e0> {[«10""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 21ba2-21ba4 StackAdj> Δ+14 {} <MI 21ba4 BRA 0x21bd2> {} <POP 21ba6-21bd2 Naked> Σ0 ↓ ←0x21ab2 <Blob 0x21ba6 [22] @> Δ-22 {[«22""»]} <POP 21bb8-21bba StackAdj> Δ-4 {[«22""»]|[-4-]} <Lit 0x21bba 21> {[«22""»]|[$$ ** ucode version ??]} <Call 0x21bc8 0x103e0> {[«22""»]|[$$ ** ucode version ??]} WriteConsoleStringCrLf(str : String) <POP 21bce-21bd2 StackAdj> Δ+26 {} <POP 21bd2-21bda Epilogue> Σ0 ←0x21b74
@ 21bda <LVAR 0x00c 1(rw)> <LVAR 0x008 4(r)> <POP 21bda-21c52 Body> <POP 21bda-21bf0 Prologue> Σ0 ↓ <POP 21bf0-21bf2 RegCacheLoad> Σ0 ↓ <POP 21bf2-21bf4 Naked> Σ0 ↓ <MI 21bf2 MOVEQ.L #0x01,D7> {} <POP 21bf4-21c04 Naked> Σ0 ↓ →0x21bf4 ←0x21bf4 <MI 21bf4 MOVE.B D7,D0> {} <MI 21bf6 EXTB.W D0> {} <MI 21bf8 CLR.B (A6+D0.W-#0xe)> {} <MI 21bfc ADDQ.B #0x1,D7> {} <MI 21bfe CMPI.B #0x0b,D7> {} <MI 21c02 BLE 0x21bf4> {} <POP 21c04-21c06 Naked> Σ0 ↓ <MI 21c04 MOVEQ.L #0x00,D6> {} <POP 21c06-21c14 Naked> Σ0 ↓ →0x21c28 ←0x21c28 <MI 21c06 MOVEA.L (A6+0x8),A0> {} <MI 21c0a MOVE.B D6,D0> {} <MI 21c0c EXTB.W D0> {} <MI 21c0e TST.B (A0+D0.W)> {} <MI 21c12 BEQ 0x21c28> {} <POP 21c14-21c28 Naked> Σ0 ↓ <MI 21c14 MOVE.B D6,D0> {} <MI 21c16 EXTB.W D0> {} <MI 21c18 ASL.W #0x5,D0> {} <MI 21c1a LEA.L 0x20cfa,A0> {} <MI 21c1e MOVE.B (A0+D0.W+#0x1f),D1> {} <MI 21c22 EXTB.W D1> {} <MI 21c24 MOVE.B #0x01,(A6+D1.W-#0xe)> {} <POP 21c28-21c30 Naked> Σ0 ↓ →0x21c06 ←0x21c06 <MI 21c28 ADDQ.B #0x1,D6> {} <MI 21c2a CMPI.B #0x2b,D6> {} <MI 21c2e BLE 0x21c06> {} <POP 21c30-21c36 Naked> Σ0 ↓ <MI 21c30 CLR.B (A6+0xc)> {} <MI 21c34 MOVEQ.L #0x0b,D7> {} <POP 21c36-21c40 Naked> Σ0 ↓ →0x21c44 ←0x21c44 <MI 21c36 MOVE.B D7,D0> {} <MI 21c38 EXTB.W D0> {} <MI 21c3a TST.B (A6+D0.W-#0xe)> {} <MI 21c3e BEQ 0x21c44> {} <POP 21c40-21c44 Naked> Σ0 ↓ <MI 21c40 MOVE.B D7,(A6+0xc)> {} <POP 21c44-21c4a Naked> Σ0 ↓ →0x21c36 ←0x21c36 <MI 21c44 SUBQ.B #0x1,D7> {} <MI 21c46 CMP.B #0x01,D7> {} <MI 21c48 BGE 0x21c36> {} <POP 21c4a-21c52 Epilogue> Σ0
@ 21c52 <LVAR 0x03a 4(w)> <LVAR 0x036 4(w)> <LVAR 0x008 1(r)> <LVAR -0x00a 4(r)> <LVAR -0x00e 4(r)> <POP 21c52-21d16 Body> <POP 21c52-21c68 Prologue> Σ0 ↓ <POP 21c68-21c6e RegCacheLoad> Σ0 ↓ <POP 21c6e-21c70 Naked> Σ0 ↓ <MI 21c6e MOVEQ.L #0x00,D7> {} <POP 21c70-21c80 Naked> Σ0 ↓ →0x21c70 ←0x21c70 <POP 0x21c70 LimitCheck 0x0 ≤ D7 ≤ 0x7> {} <MI 21c76 CLR.B (A6+D7.L-#0xe)> {} <MI 21c7a ADDQ.L #0x1,D7> {} <MI 21c7c CMP.L #0x07,D7> {} <MI 21c7e BLE 0x21c70> {} <POP 21c80-21c86 Naked> Σ0 ↓ <MI 21c80 MOVEQ.L #0x00,D7> {} <MI 21c82 MOVEQ.L #0x0f,D6> {} <MI 21c84 MOVEQ.L #0x00,D5> {} <POP 21c86-21c90 Naked> Σ0 ↓ →0x21cfa ←0x21cfa <MI 21c86 MOVE.B D5,D0> {} <MI 21c88 EXTB.W D0> {} <MI 21c8a TST.B (A6+D0.W+#0xa)> {} <MI 21c8e BEQ 0x21cfa> {} <POP 21c90-21ca2 Naked> Σ0 ↓ →0x21cfa <MI 21c90 MOVE.B D5,D0> {} <MI 21c92 EXTB.W D0> {} <MI 21c94 ASL.W #0x5,D0> {} <MI 21c96 LEA.L 0x20cfa,A0> {} <MI 21c98 MOVE.B (A6+0x8),D1> {} <MI 21c9c CMP.B (A0+D0.W+#0x1f),D1> {} <MI 21ca0 BNE 0x21cfa> {} <POP 21ca2-21caa Naked> Σ0 ↓ →0x21cfa <MI 21ca2 LEA.L 0x20cfa,A0> {} <MI 21ca4 CMP.B (A0+D0.W+#0x1e),D6> {} <MI 21ca8 BEQ 0x21cfa> {} <POP 21caa-21cae Naked> Σ0 ↓ →0x21ce4 <MI 21caa CMP.L #0x07,D7> {} <MI 21cac BLE 0x21ce4> {} <POP 21cae-21ce4 Naked> Σ0 ↓ <Blob 0x21cae [24] @> Δ-24 {[«24""»]} <Const 0x21cc0 0xe.2> Δ-2 {[«24""»]|[#14]} <POP 21cc4-21cc6 StackAdj> Δ-4 {[«24""»]|[#14]|[-4-]} <Lit 0x21cc6 23> {[«24""»]|[#14]|[$$Too many boards failed.]} <Call 0x21cda 0x103b8> {[«24""»]|[#14]|[$$Too many boards failed.]} PopProgram(status : Byte; msg : String) <POP 21ce0-21ce4 StackAdj> Δ+30 {} <POP 21ce4-21cfa Naked> Σ0 ↓ ←0x21caa <POP 0x21ce4 LimitCheck 0x0 ≤ D7 ≤ 0x7> {} <MI 21cea LEA.L 0x20cfa,A0> {} <MI 21cec MOVE.B (A0+D0.W+#0x1e),(A6+D7.L-#0xe)> {} <MI 21cf2 LEA.L 0x20cfa,A0> {} <MI 21cf4 MOVE.B (A0+D0.W+#0x1e),D6> {} <MI 21cf8 ADDQ.L #0x1,D7> {} <POP 21cfa-21d02 Naked> Σ0 ↓ →0x21c86 ←0x21c86 ←0x21c90 ←0x21ca2 <MI 21cfa ADDQ.B #0x1,D5> {} <MI 21cfc CMPI.B #0x2b,D5> {} <MI 21d00 BLE 0x21c86> {} <POP 21d02-21d0e Naked> Σ0 ↓ <MI 21d02 MOVE.L (A6-0xe),(A6+0x36)> {} <MI 21d08 MOVE.L (A6-0xa),(A6+0x3a)> {} <POP 21d0e-21d16 Epilogue> Σ0
@ 21d16 <LVAR 0x008 1(r)> <LVAR -0x003 @ 1(r)> <LVAR -0x004 @ 1(r)> <LVAR -0x005 @ 1(r)> <LVAR -0x006 @ 1(r)> <POP 21d16-21e74 Body> Δ+6 <POP 21d16-21d2c Prologue> Σ0 ↓ <POP 21d2c-21d44 RegCacheLoad> Σ0 ↓ <POP 21d44-21d6a Naked> Σ0 ↓ →0x21d78 <MI 21d44 MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']} <Pointer.fp 0x21d48 <LVAR -0x006 @ 1(r)>> Δ-4 {[2, '(A6+0x8)']|[@@-6]} <Pointer.fp 0x21d4c <LVAR -0x005 @ 1(r)>> Δ-4 {[2, '(A6+0x8)']|[@@-6]|[@@-5]} <Pointer.fp 0x21d50 <LVAR -0x004 @ 1(r)>> Δ-4 {[2, '(A6+0x8)']|[@@-6]|[@@-5]|[@@-4]} <Pointer.fp 0x21d54 <LVAR -0x003 @ 1(r)>> Δ-4 {[2, '(A6+0x8)']|[@@-6]|[@@-5]|[@@-4]|[@@-3]} <Call 0x21d58 0x22bca> {[2, '(A6+0x8)']|[@@-6]|[@@-5]|[@@-4]|[@@-3]} <POP 21d5e-21d60 StackAdj> Δ+18 {} <MI 21d60 MOVE.B (A6+0x8),D0> {} <MI 21d64 CMPI.B #0x0c,D0> {} <MI 21d68 BNE 0x21d78> {} <POP 21d6a-21d78 Naked> Σ0 Δ-6 →0x21d84 <Blob 0x21d6a [2] @> Δ-2 {[«2""»]} <Blob 0x21d6e [2] @> Δ-2 {[«2""»]|[«2""»]} <Blob 0x21d72 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]} <MI 21d76 BRA 0x21d84> {[«2""»]|[«2""»]|[«2""»]} <POP 21d78-21d84 Naked> Σ0 Δ-6 ↓ ←0x21d44 <Blob 0x21d78 [2] @> Δ-2 {[«2""»]} <Blob 0x21d7c [2] @> Δ-2 {[«2""»]|[«2""»]} <Blob 0x21d80 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]} <POP 21d84-21e6c Naked> Σ-6 Δ+6 ↓ ←0x21d6a <POP 21d84-21d86 StackAdj> Δ-4 {[-10-]} <Lit 0x21d86> {[-6-]|[$$…]} <Pointer.sp 0x21d86 4> Δ-4 <Const 0x21d8a 0x1.2> Δ-2 <Const 0x21d8c 0x6.2> Δ-2 <Call 0x21d90 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 21d92-21d94 StackAdj> Δ+8 <Call 0x21d94 0x103d8> {[-6-]|[$$…]} WriteConsoleString(str : String) <POP 21d9a-21d9e StackAdj> Δ+10 {} <Blob 0x21d9e [18] @> Δ-18 {[«18""»]} <Blob 0x21dae [18] @> Δ-18 {[«18""»]|[«18""»]} <POP 21dbe-21dc0 StackAdj> Δ-8 {[«18""»]|[«18""»]|[-8-]} <Lit 0x21dc0 17> {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]} <POP 21dca-21dcc StackAdj> Δ-4 {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]} <MI 21dcc CLR.L D0> {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]} <MI 21dce MOVE.B (A6-0x6),D0> {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]} <MI 21dd2 MOVE.L D0,-(A7)> Δ-4 {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]|[4, 'D0']} <Const 0x21dd4 0x2.4> Δ-4 {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]|[4, 'D0']|[##2]} <Call 0x21dd6 0x102e8> {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]|[4, 'D0']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 21dd8-21dda StackAdj> Δ+4 {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]|[4, 'D0']} <Lit 0x21dda 17> {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]|[$$, TSB_STORED_PAR=]} <POP 21de4-21de6 StackAdj> Δ-4 {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]|[$$, TSB_STORED_PAR=]|[-4-]} <MI 21de6 CLR.L D0> {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]|[$$, TSB_STORED_PAR=]|[-4-]} <MI 21de8 MOVE.B (A6-0x4),D0> {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]|[$$, TSB_STORED_PAR=]|[-4-]} <MI 21dec MOVE.L D0,-(A7)> Δ-4 {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]|[$$, TSB_STORED_PAR=]|[-4-]|[4, 'D0']} <Const 0x21dee 0x2.4> Δ-4 {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]|[$$, TSB_STORED_PAR=]|[-4-]|[4, 'D0']|[##2]} <Call 0x21df0 0x102e8> {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]|[$$, TSB_STORED_PAR=]|[-4-]|[4, 'D0']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 21df2-21df4 StackAdj> Δ+8 {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]|[$$, TSB_STORED_PAR=]|[-4-]} <Call 0x21df4 0x102d8> {[«18""»]|[«18""»]|[-4-]|[$$: TSA_STORED_PAR=]|[-4-]|[$$, TSB_STORED_PAR=]|[-4-]} StringCat4(a, b, c, d : String) : String <POP 21dfa-21dfc StackAdj> Δ+16 {[«18""»]|[«18""»]|[-4-]} <Call 0x21dfc 0x103e0> {[«18""»]|[«18""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 21e02-21e03 StackAdj> Δ+40 ↓ {} <Blob 0x21e03 [24] @> Δ-24 {[«24""»]} <Blob 0x21e12 [18] @> Δ-18 {[«24""»]|[«18""»]} <POP 21e22-21e24 StackAdj> Δ-8 {[«24""»]|[«18""»]|[-8-]} <Lit 0x21e24 23> {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]} <POP 21e30-21e32 StackAdj> Δ-4 {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]} <MI 21e32 CLR.L D0> {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]} <MI 21e34 MOVE.B (A6-0x5),D0> {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]} <MI 21e38 MOVE.L D0,-(A7)> Δ-4 {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]|[4, 'D0']} <Const 0x21e3a 0x2.4> Δ-4 {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]|[4, 'D0']|[##2]} <Call 0x21e3c 0x102e8> {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]|[4, 'D0']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 21e3e-21e40 StackAdj> Δ+4 {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]|[4, 'D0']} <Lit 0x21e40 17> {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]|[$$, TSB_EXPECT_PAR=]} <POP 21e4a-21e4c StackAdj> Δ-4 {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]|[$$, TSB_EXPECT_PAR=]|[-4-]} <MI 21e4c CLR.L D0> {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]|[$$, TSB_EXPECT_PAR=]|[-4-]} <MI 21e4e MOVE.B (A6-0x3),D0> {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]|[$$, TSB_EXPECT_PAR=]|[-4-]} <MI 21e52 MOVE.L D0,-(A7)> Δ-4 {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]|[$$, TSB_EXPECT_PAR=]|[-4-]|[4, 'D0']} <Const 0x21e54 0x2.4> Δ-4 {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]|[$$, TSB_EXPECT_PAR=]|[-4-]|[4, 'D0']|[##2]} <Call 0x21e56 0x102e8> {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]|[$$, TSB_EXPECT_PAR=]|[-4-]|[4, 'D0']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 21e58-21e5a StackAdj> Δ+8 {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]|[$$, TSB_EXPECT_PAR=]|[-4-]} <Call 0x21e5a 0x102d8> {[«24""»]|[«18""»]|[-4-]|[$$ TSA_EXPECT_PAR=]|[-4-]|[$$, TSB_EXPECT_PAR=]|[-4-]} StringCat4(a, b, c, d : String) : String <POP 21e60-21e62 StackAdj> Δ+16 {[«24""»]|[«18""»]|[-4-]} <Call 0x21e62 0x103e0> {[«24""»]|[«18""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 21e68-21e6c StackAdj> Δ+46 {} <POP 21e6c-21e74 Epilogue> Σ0
@ 21e74 <LVAR 0x010 4(w)> <LVAR -0x00c @ 4(r)> <POP 21e74-21f26 Body> Δ+4 <POP 21e74-21e8a Prologue> Σ0 ↓ <POP 21e8a-21e94 RegCacheLoad> Σ0 ↓ <POP 21e94-21ea0 Naked> Σ0 ↓ <Pointer.fp 0x21e94 <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-12]} <Call 0x21e96 0x102b8> {[@@-12]} NewString(VAR a : String) <POP 21e9c-21e9e StackAdj> Δ+4 {} <MI 21e9e MOVEQ.L #0x00,D6> {} <POP 21ea0-21eae Naked> Σ0 ↓ →0x21ebe ←0x21f14 <MI 21ea0 MOVE.L D6,D4> {} <MI 21ea2 MOVEQ.L #0x02,D3> {} <Call 0x21ea4 0x10294> {} ?divs_d3_d4 <MI 21eaa TST.L D3> {} <MI 21eac BNE 0x21ebe> {} <POP 21eae-21ebe Naked> Σ0 →0x21ecc <POP 0x21eae LimitCheck 0x0 ≤ D4 ≤ 0x7> {} <MI 21eb4 CLR.L D0> {} <MI 21eb6 MOVE.B (A6+D4.L+#0x8),D0> {} <MI 21eba ASR.W #0x4,D0> {} <MI 21ebc BRA 0x21ecc> {} <POP 21ebe-21ecc Naked> Σ0 ↓ ←0x21ea0 <POP 0x21ebe LimitCheck 0x0 ≤ D4 ≤ 0x7> {} <MI 21ec4 CLR.L D0> {} <MI 21ec6 MOVE.B (A6+D4.L+#0x8),D0> {} <MI 21eca AND.W #0x0f,D0> {} <POP 21ecc-21ed4 Naked> Σ0 ↓ →0x21ee6 ←0x21eae <MI 21ecc EXTW.L D0> {} <MI 21ece MOVE.L D0,D7> {} <MI 21ed0 CMP.L #0x0a,D7> {} <MI 21ed2 BGE 0x21ee6> {} <POP 21ed4-21ee6 Naked> Σ0 Δ-4 →0x21ef8 <MI 21ed4 MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']} <MI 21ed6 MOVEQ.L #0x30,D0> {[4, '(A6-0xc)']} <MI 21ed8 ADD.L D7,D0> {[4, '(A6-0xc)']} <POP 0x21eda LimitCheck 0x0 ≤ D0 ≤ 0xff> {[4, '(A6-0xc)']} <MI 21ee4 BRA 0x21ef8> {[4, '(A6-0xc)']} <POP 21ee6-21ef8 Naked> Σ0 Δ-4 ↓ ←0x21ecc <MI 21ee6 MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']} <MI 21ee8 MOVEQ.L #0x41,D0> {[4, '(A6-0xc)']} <MI 21eea ADD.L D7,D0> {[4, '(A6-0xc)']} <MI 21eec SUB.L #0x0a,D0> {[4, '(A6-0xc)']} <POP 0x21eee LimitCheck 0x0 ≤ D0 ≤ 0xff> {[4, '(A6-0xc)']} <POP 21ef8-21f06 Naked> Σ-4 Δ+4 ↓ →0x21f14 ←0x21ed4 <MI 21ef8 MOVE.B D0,-(A7)> Δ-2 {[-4-]|[2, 'D0']} <Call 0x21efa 0x102c0> {[-4-]|[2, 'D0']} AppendChar(MOD b : String; a : char) <POP 21f00-21f02 StackAdj> Δ+6 {} <MI 21f02 CMP.L #0x07,D6> {} <MI 21f04 BNE 0x21f14> {} <POP 21f06-21f14 Naked> Σ0 ↓ <MI 21f06 MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']} <Const 0x21f08 0x5f.2> Δ-2 {[4, '(A6-0xc)']|[#95]} <Call 0x21f0c 0x102c0> {[4, '(A6-0xc)']|[#95]} AppendChar(MOD b : String; a : char) <POP 21f12-21f14 StackAdj> Δ+6 {} <POP 21f14-21f1a Naked> Σ0 ↓ →0x21ea0 ←0x21ef8 <MI 21f14 ADDQ.L #0x1,D6> {} <MI 21f16 CMP.L #0x0f,D6> {} <MI 21f18 BLE 0x21ea0> {} <POP 21f1a-21f1e Naked> Σ0 ↓ <MI 21f1a MOVE.L (A6-0xc),(A6+0x10)> {} <POP 21f1e-21f26 Epilogue> Σ0
@ 21f26 <LVAR 0x008 1(r)> <LVAR -0x009 @> <LVAR -0x011 @> <LVAR -0x012 @ 1(r)> <LVAR -0x013 @> <LVAR -0x014 1(r)> <LVAR -0x015 @ 1(r)> <LVAR -0x016 @ 1(r)> <LVAR -0x01a @ 4(r)> <POP 21f26-2222a Body> Δ+6 <POP 21f26-21f3c Prologue> Σ0 ↓ <POP 21f3c-21f56 RegCacheLoad> Σ0 ↓ <POP 21f56-21f60 Naked> Σ0 ↓ →0x21f94 <MI 21f56 MOVE.B (A6+0x8),D0> {} <MI 21f5a CMPI.B #0x07,D0> {} <MI 21f5e BNE 0x21f94> {} <POP 21f60-21f94 Naked> Σ0 Δ-6 →0x21fc6 <Blob 0x21f60 [20] @> Δ-20 {[«20""»]} <POP 21f6c-21f6e StackAdj> Δ-4 {[«20""»]|[-4-]} <Lit 0x21f6e 20> {[«20""»]|[$$SEARCH_RF_ERRORS.VAL]} <Pointer.fp 0x21f7a <LVAR -0x01a @ 4(r)>> Δ-4 {[«20""»]|[$$SEARCH_RF_ERRORS.VAL]|[@@-26]} <Call 0x21f7c 0x10460> {[«20""»]|[$$SEARCH_RF_ERRORS.VAL]|[@@-26]} ExpLoad(a : String; b: Pointer) <POP 21f82-21f83 StackAdj> Δ+28 ↓ {} <Blob 0x21f83 [6] @> Δ-6 {[«6""»]} <MI 21f92 BRA 0x21fc6> {[«6""»]} <POP 21f94-21fc6 Naked> Σ0 Δ-6 ↓ ←0x21f56 <Blob 0x21f94 [20] @> Δ-20 {[«20""»]} <POP 21fa0-21fa2 StackAdj> Δ-4 {[«20""»]|[-4-]} <Lit 0x21fa2 20> {[«20""»]|[$$SEARCH_RF_ERRORS.TYP]} <Pointer.fp 0x21fae <LVAR -0x01a @ 4(r)>> Δ-4 {[«20""»]|[$$SEARCH_RF_ERRORS.TYP]|[@@-26]} <Call 0x21fb0 0x10460> {[«20""»]|[$$SEARCH_RF_ERRORS.TYP]|[@@-26]} ExpLoad(a : String; b: Pointer) <POP 21fb6-21fb7 StackAdj> Δ+28 ↓ {} <Blob 0x21fb7 [6] @> Δ-6 {[«6""»]} <POP 21fc6-22080 Naked> Σ-6 Δ+6 ↓ →0x221f6 ←0x21f60 <POP 21fc6-21fc8 StackAdj> Δ-4 {[-10-]} <Lit 0x21fc8> {[-6-]|[$$…]} <Pointer.sp 0x21fc8 4> Δ-4 <Const 0x21fcc 0x1.2> Δ-2 <Const 0x21fce 0x5.2> Δ-2 <Call 0x21fd2 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 21fd4-21fd6 StackAdj> Δ+8 <Call 0x21fd6 0x103d8> {[-6-]|[$$…]} WriteConsoleString(str : String) <POP 21fdc-21fe0 StackAdj> Δ+10 {} <MI 21fe0 CLR.B -(A7)> Δ-2 {[#0]} <MI 21fe2 MOVE.B D0,-(A7)> Δ-2 {[#0]|[2, 'D0']} <MI 21fe4 MOVE.L (A6-0x1a),-(A7)> Δ-4 {[#0]|[2, 'D0']|[4, '(A6-0x1a)']} <Call 0x21fe6 0x104ba> {[#0]|[2, 'D0']|[4, '(A6-0x1a)']} ExpRun(a: Bool; adr: Byte; b: Pointer) <POP 21fec-21fee StackAdj> Δ+4 {[#0]|[2, 'D0']} <MI 21fee MOVE.L (A6-0x1a),(A7)> {[4, '(A6-0x1a)']} <Pointer.fp 0x21ff0 <LVAR -0x016 @ 1(r)>> Δ-4 {[4, '(A6-0x1a)']|[@@-22]} <Call 0x21ff4 0x10478> {[4, '(A6-0x1a)']|[@@-22]} ExpOutputFlag(exp : Pointer; VAR status : Bool) <POP 21ffa-21ffc StackAdj> Δ+4 {[4, '(A6-0x1a)']} <MI 21ffc MOVE.L (A6-0x1a),(A7)> {[4, '(A6-0x1a)']} <Pointer.fp 0x21ffe <LVAR -0x015 @ 1(r)>> Δ-4 {[4, '(A6-0x1a)']|[@@-21]} <Const 0x22002 0x0.4> Δ-4 {[4, '(A6-0x1a)']|[@@-21]|[##0]} <Const 0x22004 0x1.4> Δ-4 {[4, '(A6-0x1a)']|[@@-21]|[##0]|[##1]} <Call 0x22008 0x10472> {[4, '(A6-0x1a)']|[@@-21]|[##0]|[##1]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 2200e-22010 StackAdj> Δ+12 {[4, '(A6-0x1a)']} <MI 22010 MOVE.L (A6-0x1a),(A7)> {[4, '(A6-0x1a)']} <Pointer.fp 0x22012 <LVAR -0x012 @ 1(r)>> Δ-4 {[4, '(A6-0x1a)']|[@@-18]} <Const 0x22016 0x0.4> Δ-4 {[4, '(A6-0x1a)']|[@@-18]|[##0]} <Const 0x22018 0x0.4> Δ-4 {[4, '(A6-0x1a)']|[@@-18]|[##0]|[##0]} <Call 0x2201a 0x10472> {[4, '(A6-0x1a)']|[@@-18]|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22020-22022 StackAdj> Δ+12 {[4, '(A6-0x1a)']} <MI 22022 MOVE.L (A6-0x1a),(A7)> {[4, '(A6-0x1a)']} <Pointer.fp 0x22024 <LVAR -0x011 @>> Δ-4 {[4, '(A6-0x1a)']|[@@-17]} <Const 0x22028 0x0.4> Δ-4 {[4, '(A6-0x1a)']|[@@-17]|[##0]} <Const 0x2202a 0x7.4> Δ-4 {[4, '(A6-0x1a)']|[@@-17]|[##0]|[##7]} <Call 0x2202e 0x10472> {[4, '(A6-0x1a)']|[@@-17]|[##0]|[##7]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22034-22036 StackAdj> Δ+12 {[4, '(A6-0x1a)']} <MI 22036 MOVE.L (A6-0x1a),(A7)> {[4, '(A6-0x1a)']} <Pointer.fp 0x22038 <LVAR -0x013 @>> Δ-4 {[4, '(A6-0x1a)']|[@@-19]} <Const 0x2203c 0x0.4> Δ-4 {[4, '(A6-0x1a)']|[@@-19]|[##0]} <Const 0x2203e 0x0.4> Δ-4 {[4, '(A6-0x1a)']|[@@-19]|[##0]|[##0]} <Call 0x22040 0x10472> {[4, '(A6-0x1a)']|[@@-19]|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22046-22048 StackAdj> Δ+12 {[4, '(A6-0x1a)']} <MI 22048 MOVE.L (A6-0x1a),(A7)> {[4, '(A6-0x1a)']} <Pointer.fp 0x2204a <LVAR -0x009 @>> Δ-4 {[4, '(A6-0x1a)']|[@@-9]} <Const 0x2204e 0x0.4> Δ-4 {[4, '(A6-0x1a)']|[@@-9]|[##0]} <Const 0x22050 0x7.4> Δ-4 {[4, '(A6-0x1a)']|[@@-9]|[##0]|[##7]} <Call 0x22054 0x10472> {[4, '(A6-0x1a)']|[@@-9]|[##0]|[##7]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 2205a-2205c StackAdj> Δ+12 {[4, '(A6-0x1a)']} <MI 2205c MOVE.L (A6-0x1a),(A7)> {[4, '(A6-0x1a)']} <Pointer.fp 0x2205e <LVAR -0x013 @>> Δ-4 {[4, '(A6-0x1a)']|[@@-19]} <Const 0x22062 0x0.4> Δ-4 {[4, '(A6-0x1a)']|[@@-19]|[##0]} <Const 0x22064 0x0.4> Δ-4 {[4, '(A6-0x1a)']|[@@-19]|[##0]|[##0]} <Call 0x22066 0x10472> {[4, '(A6-0x1a)']|[@@-19]|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 2206c-2206e StackAdj> Δ+16 {} <Pointer.fp 0x2206e <LVAR -0x01a @ 4(r)>> Δ-4 {[@@-26]} <Call 0x22070 0x10496> {[@@-26]} ExpClose(exp : Pointer) <POP 22076-22078 StackAdj> Δ+4 {} <MI 22078 TST.B (A6-0x16)> {} <MI 2207c BEQ 0x221f6> {} <POP 22080-22104 Naked> Σ0 ↓ →0x2212c <Blob 0x22080 [4] @> Δ-4 {[«4""»]} <Blob 0x22084 [4] @> Δ-4 {[«4""»]|[«4""»]} <Blob 0x22088 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]} <Blob 0x2208c [2] @> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[«2""»]} <Blob 0x22090 [2] @> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]} <Blob 0x22094 [2] @> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]} <POP 22098-2209a StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-8-]} <Lit 0x2209a 12> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]} <POP 220a4-220a6 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]} <MI 220a6 CLR.L D0> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]} <MI 220a8 MOVE.B (A6-0x15),D0> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]} <MI 220ac ASL.W #0x8,D0> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]} <MI 220ae CLR.L D1> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]} <MI 220b0 MOVE.B (A6-0x14),D1> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]} <MI 220b4 ADD.W D0,D1> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]} <MI 220b6 EXTW.L D1> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]} <MI 220b8 MOVE.L D1,-(A7)> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]|[4, 'D1']} <Const 0x220ba 0x3.4> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]|[4, 'D1']|[##3]} <Call 0x220be 0x102e8> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]|[4, 'D1']|[##3]} Long2HexString(val : Long; ndig : Long) : String <POP 220c4-220c6 StackAdj> Δ+4 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]|[4, 'D1']} <Lit 0x220c6 6> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]|[$$: ARF=]} <POP 220d2-220d3 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]|[$$: ARF=]|[-4-]} <Blob 0x220d3 [8] (A6-0x11)> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]|[$$: ARF=]|[-4-]|[«8»]} <Call 0x220e2 0x21e74> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]|[$$: ARF=]|[-4-]|[«8»]} <POP 220e6-220e8 StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]|[$$: ARF=]|[-4-]} <Call 0x220e8 0x102d8> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ RF error @_]|[-4-]|[$$: ARF=]|[-4-]} StringCat4(a, b, c, d : String) : String <POP 220ee-220f0 StackAdj> Δ+16 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]} <Call 0x220f0 0x103d8> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]} WriteConsoleString(str : String) <POP 220f6-220f8 StackAdj> Δ+22 {} <MI 220f8 CLR.L D0> {} <MI 220fa MOVE.B (A6-0x12),D0> {} <MI 220fe MOVE.W D0,D1> {} <MI 22100 AND.W #0x10,D1> {} <MI 22102 BNE 0x2212c> {} <POP 22104-2212c Naked> Σ0 →0x22158 <Blob 0x22104 [12] @> Δ-12 {[«12""»]} <POP 22114-22116 StackAdj> Δ-4 {[«12""»]|[-4-]} <Lit 0x22116 11> {[«12""»]|[$$, parity ok]} <Call 0x22122 0x103e0> {[«12""»]|[$$, parity ok]} WriteConsoleStringCrLf(str : String) <POP 22128-2212a StackAdj> Δ+16 {} <MI 2212a BRA 0x22158> {} <POP 2212c-22158 Naked> Σ0 ↓ ←0x22080 <Blob 0x2212c [14] @> Δ-14 {[«14""»]} <POP 2213e-22140 StackAdj> Δ-4 {[«14""»]|[-4-]} <Lit 0x22140 13> {[«14""»]|[$$, parity BAD!]} <Call 0x2214e 0x103e0> {[«14""»]|[$$, parity BAD!]} WriteConsoleStringCrLf(str : String) <POP 22154-22158 StackAdj> Δ+18 {} <POP 22158-221a0 Naked> Σ0 ↓ →0x221c8 ←0x22104 <Blob 0x22158 [26] @> Δ-26 {[«26""»]} <POP 22164-22166 StackAdj> Δ-8 {[«26""»]|[-8-]} <Lit 0x22166 26> {[«26""»]|[-4-]|[$$ BRF=]} <POP 22172-22173 StackAdj> Δ-4 {[«26""»]|[-4-]|[$$ BRF=]|[-4-]} <Blob 0x22173 [8] (A6-0x9)> Δ-8 {[«26""»]|[-4-]|[$$ BRF=]|[-4-]|[«8»]} <Call 0x22182 0x21e74> {[«26""»]|[-4-]|[$$ BRF=]|[-4-]|[«8»]} <POP 22186-22188 StackAdj> Δ+8 {[«26""»]|[-4-]|[$$ BRF=]|[-4-]} <Call 0x22188 0x102d0> {[«26""»]|[-4-]|[$$ BRF=]|[-4-]} StringCat2(a, b : String) : String <POP 2218e-22190 StackAdj> Δ+8 {[«26""»]|[-4-]} <Call 0x22190 0x103d8> {[«26""»]|[-4-]} WriteConsoleString(str : String) <POP 22196-2219a StackAdj> Δ+30 {} <MI 2219a ANDI.W #0x0020,D0> {} <MI 2219e BNE 0x221c8> {} <POP 221a0-221c8 Naked> Σ0 →0x221f4 <Blob 0x221a0 [12] @> Δ-12 {[«12""»]} <POP 221b0-221b2 StackAdj> Δ-4 {[«12""»]|[-4-]} <Lit 0x221b2 11> {[«12""»]|[$$, parity ok]} <Call 0x221be 0x103e0> {[«12""»]|[$$, parity ok]} WriteConsoleStringCrLf(str : String) <POP 221c4-221c6 StackAdj> Δ+16 {} <MI 221c6 BRA 0x221f4> {} <POP 221c8-221f4 Naked> Σ0 ↓ ←0x22158 <Blob 0x221c8 [14] @> Δ-14 {[«14""»]} <POP 221da-221dc StackAdj> Δ-4 {[«14""»]|[-4-]} <Lit 0x221dc 13> {[«14""»]|[$$, parity BAD!]} <Call 0x221ea 0x103e0> {[«14""»]|[$$, parity BAD!]} WriteConsoleStringCrLf(str : String) <POP 221f0-221f4 StackAdj> Δ+18 {} <POP 221f4-221f6 Naked> Σ0 →0x22222 ←0x221a0 <MI 221f4 BRA 0x22222> {} <POP 221f6-22222 Naked> Σ0 ↓ ←0x21fc6 <Blob 0x221f6 [62] @> Δ-62 {[«62""»]} <POP 22208-2220a StackAdj> Δ-4 {[«62""»]|[-4-]} <Lit 0x2220a 61> {[«62""»]|[$$ had an ARF or BRF parity error but its register files are OK]} <Call 0x22218 0x103e0> {[«62""»]|[$$ had an ARF or BRF parity error but its register files are OK]} WriteConsoleStringCrLf(str : String) <POP 2221e-22222 StackAdj> Δ+66 {} <POP 22222-2222a Epilogue> Σ0 ←0x221f4
@ 2222a NB: STACK SKEW <LVAR 0x050 1(r)> <LVAR 0x04c 4(r)> <LVAR 0x049 1(r)> <LVAR 0x048 1(r) 4(r)> <LVAR 0x036 1(r)> <LVAR 0x035 1(r)> <LVAR 0x034 1(r)> <LVAR 0x030 1(r)> <LVAR 0x02f 1(r)> <LVAR 0x02e 1(r)> <LVAR 0x02c 1(r)> <LVAR 0x02b 1(r)> <LVAR 0x025 1(r)> <LVAR 0x024 1(r)> <LVAR 0x01f 1(r)> <LVAR 0x01e 1(r)> <LVAR 0x018 4(r)> <LVAR 0x014 4(r)> <LVAR 0x010 4(r)> <LVAR 0x00c 4(r)> <LVAR 0x008 4(r)> <LVAR -0x001 @ 1(r)> <LVAR -0x002 @ 1(r)> <LVAR -0x003 @> <LVAR -0x00a @ 1(r)> <POP 2222a-228a0 Body> Δ+256 <POP 2222a-22240 Prologue> Σ0 ↓ <POP 22240-2224a RegCacheLoad> Σ0 ↓ <POP 2224a-222dc Naked> Σ0 Δ-8 ↓ →0x22894 <MI 2224a MOVEA.L (A6+0x18),A0> {} <MI 2224e MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']} <MI 22250 MOVE.B #0x01,(A0)> {[4, 'A0']} <MI 22252 MOVEA.L (A6+0x14),A1> {[4, 'A0']} <Blob 0x22256 [2] @> Δ-2 {[4, 'A0']|[«2""»]} <Blob 0x2225a [2] @> Δ-2 {[4, 'A0']|[«2""»]|[«2""»]} <Blob 0x2225e [2] @> Δ-2 {[4, 'A0']|[«2""»]|[«2""»]|[«2""»]} <POP 22262-22264 StackAdj> Δ-4 {[4, 'A0']|[«2""»]|[«2""»]|[«2""»]|[-4-]} <Lit 0x22264 6> {[4, 'A0']|[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]} <MI 22274 MOVE.L (A7)+,(A1)> Δ+4 {[4, 'A0']|[«2""»]|[«2""»]|[«2""»]} <POP 22276-22278 StackAdj> Δ+6 {[4, 'A0']} <MI 22278 MOVEA.L (A6+0x10),A2> {[4, 'A0']} <MI 2227c MOVE.B (A6+0x50),D0> {[4, 'A0']} <MI 22280 EXTB.W D0> {[4, 'A0']} <MI 22282 MOVEQ.L #0x1e,D1> {[4, 'A0']} <MI 22284 MULS.W D0,D1> {[4, 'A0']} <MI 22286 LEA.L 0x20b92,A3> {[4, 'A0']} <Blob 0x2228a [30] (A3+D1.W)> Δ-30 {[4, 'A0']|[«30»]} <POP 2229a-2229c StackAdj> Δ-4 {[4, 'A0']|[«30»]|[-4-]} <Lit 0x2229c> {[4, 'A0']|[«30»]|[$$…]} <Pointer.sp 0x2229c 4> Δ-4 <Const 0x222a0 0x1.2> Δ-2 <Const 0x222a2 0x1e.2> Δ-2 <Call 0x222a4 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 222aa-222ac StackAdj> Δ+8 <MI 222ac MOVE.L (A7)+,(A2)> Δ+4 {[4, 'A0']|[«30»]} <POP 222ae-222b2 StackAdj> Δ+26 {[4, 'A0']|[-4-]} <MI 222b2 MOVE.L (A2),(A7)> {[4, 'A0']|[4, '(A2)']} <Const 0x222b4 0x5c.2> Δ-2 {[4, 'A0']|[4, '(A2)']|[#92]} <Call 0x222b8 0x102c0> {[4, 'A0']|[4, '(A2)']|[#92]} AppendChar(MOD b : String; a : char) <POP 222be-222c0 StackAdj> Δ+6 {[4, 'A0']} <MI 222c0 MOVEA.L (A6+0xc),A0> {[4, 'A0']} <MI 222c4 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']|[4, 'A0']} <MI 222c6 MOVE.B #0x01,(A0)> {[4, 'A0']|[4, 'A0']} <MI 222c8 MOVEA.L (A6+0x8),A3> {[4, 'A0']|[4, 'A0']} <MI 222cc MOVE.B #0x27,(A3)> {[4, 'A0']|[4, 'A0']} <MI 222d0 MOVE.W D0,D1> {[4, 'A0']|[4, 'A0']} <MI 222d2 SUBQ.W #0x3,D1> {[4, 'A0']|[4, 'A0']} <MI 222d4 CMPI.W #0x0007,D1> {[4, 'A0']|[4, 'A0']} <MI 222d8 BHI 0x22894> {[4, 'A0']|[4, 'A0']} <POP 222dc-222e6 Naked> Σ-8 →0x222f6 →0x222f6 →0x222f6 →0x22894 →0x223d0 →0x22410 →0x22894 →0x2284a <MI 222dc ADD.W D1,D1> {[-8-]} <MI 222de SWITCH D1.W> {[-8-]} <POP 222f6-22362 Naked> Σ-8 ↓ →0x22370 ←0x222dc ←0x222dc ←0x222dc <Call 0x222f6 0x10538> {[-8-]} IPC_Init(void) <MI 222fc EXTW.L D0> {[-8-]} <MI 222fe MOVE.L D0,-(A7)> Δ-4 {[-8-]|[4, 'D0']} <Call 0x22300 0x1050e> {[-8-]|[4, 'D0']} IPC_PutLong(a : L) <MI 22306 MOVE.L (A6+0x4c),(A7)> {[-8-]|[4, '(A6+0x4c)']} <MI 2230a MOVE.L (A6+0x48),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x4c)']|[4, '(A6+0x48)']} <MI 2230e PEA.L (A7)> Δ-4 {[-8-]|[4, '(A6+0x4c)']|[4, '(A6+0x48)']|[4, '^(A7)']} <Const 0x22310 0x0.4> Δ-4 {[-8-]|[4, '(A6+0x4c)']|[4, '(A6+0x48)']|[4, '^(A7)']|[##0]} <Const 0x22314 0x7.4> Δ-4 {[-8-]|[4, '(A6+0x4c)']|[4, '(A6+0x48)']|[4, '^(A7)']|[##0]|[##7]} <Call 0x22318 0x104fc> {[-8-]|[4, '(A6+0x4c)']|[4, '(A6+0x48)']|[4, '^(A7)']|[##0]|[##7]} IPC_PutVar(src : Pointer; length : Long ; type : Long) <POP 2231e-22322 StackAdj> Δ+20 {[-8-]} <Call 0x22322 0x10514> {[-8-]} IPC_PutEnd(void) <Blob 0x22328 [2] @> Δ-2 {[-8-]|[«2""»]} <Blob 0x2232c [2] @> Δ-2 {[-8-]|[«2""»]|[«2""»]} <Blob 0x22330 [2] @> Δ-2 {[-8-]|[«2""»]|[«2""»]|[«2""»]} <POP 22334-22336 StackAdj> Δ-4 {[-8-]|[«2""»]|[«2""»]|[«2""»]|[-4-]} <Lit 0x22336 6> {[-8-]|[«2""»]|[«2""»]|[«2""»]|[$$EMWCSP]} <Const 0x22346 0x1.4> Δ-4 {[-8-]|[«2""»]|[«2""»]|[«2""»]|[$$EMWCSP]|[##1]} <Const 0x2234a 0x2.2> Δ-2 {[-8-]|[«2""»]|[«2""»]|[«2""»]|[$$EMWCSP]|[##1]|[#2]} <Pointer.fp 0x2234e <LVAR -0x00a @ 1(r)>> Δ-4 {[-8-]|[«2""»]|[«2""»]|[«2""»]|[$$EMWCSP]|[##1]|[#2]|[@@-10]} <Call 0x22352 0x103b0> {[-8-]|[«2""»]|[«2""»]|[«2""»]|[$$EMWCSP]|[##1]|[#2]|[@@-10]} PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) <POP 22358-2235c StackAdj> Δ+20 {[-8-]} <MI 2235c TST.B (A6-0xa)> {[-8-]} <MI 22360 BEQ 0x22370> {[-8-]} <POP 22362-22370 Naked> Σ-8 ↓ <Const 0x22362 0x6.2> Δ-2 {[-8-]|[#6]} <Const 0x22364 0x1.4> Δ-4 {[-8-]|[#6]|[##1]} <Call 0x22368 0x103b8> {[-8-]|[#6]|[##1]} PopProgram(status : Byte; msg : String) <POP 2236e-22370 StackAdj> Δ+6 {[-8-]} <POP 22370-223d0 Naked> Σ-8 Δ+8 →0x22898 ←0x222f6 <Call 0x22370 0x10538> {[-8-]} IPC_Init(void) <MI 22376 MOVEA.L (A7+0x4),A0> {[-8-]} <MI 2237a PEA.L (A0)> Δ-4 {[-8-]|[4, '^(A0)']} <Call 0x2237c 0x10526> {[-8-]|[4, '^(A0)']} IPC_GetBool() : Bool <POP 22382-22384 StackAdj> Δ+4 {[-8-]} <MI 22384 PEA.L (A1)> Δ-4 {[-8-]|[4, '^(A1)']} <Call 0x22386 0x1052c> {[-8-]|[4, '^(A1)']} IPC_GetString(VAR retval : String) <POP 2238c-2238e StackAdj> Δ+4 {[-8-]} <MI 2238e PEA.L (A2)> Δ-4 {[-8-]|[4, '^(A2)']} <Call 0x22390 0x1052c> {[-8-]|[4, '^(A2)']} IPC_GetString(VAR retval : String) <POP 22396-22398 StackAdj> Δ+4 {[-8-]} <MI 22398 MOVEA.L (A7),A0> {[-8-]} <MI 2239a PEA.L (A0)> Δ-4 {[-8-]|[4, '^(A0)']} <Const 0x2239c 0x0.4> Δ-4 {[-8-]|[4, '^(A0)']|[##0]} <Const 0x223a0 0x0.4> Δ-4 {[-8-]|[4, '^(A0)']|[##0]|[##0]} <Call 0x223a4 0x10520> {[-8-]|[4, '^(A0)']|[##0]|[##0]} IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) <POP 223aa-223ac StackAdj> Δ+12 {[-8-]} <MI 223ac PEA.L (A3)> Δ-4 {[-8-]|[4, '^(A3)']} <Const 0x223ae 0x0.4> Δ-4 {[-8-]|[4, '^(A3)']|[##0]} <Const 0x223b2 0x7.4> Δ-4 {[-8-]|[4, '^(A3)']|[##0]|[##7]} <Call 0x223b6 0x10520> {[-8-]|[4, '^(A3)']|[##0]|[##7]} IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) <POP 223bc-223be StackAdj> Δ+12 {[-8-]} <Call 0x223be 0x1051a> {[-8-]} IPC_GetEnd(void) <Call 0x223c4 0x105c8> {[-8-]} And_fc0c_7f(void) <POP 223ca-223cc StackAdj> Δ+8 {} <MI 223cc BRA 0x22898> {} <POP 223d0-223da Naked> Σ-8 ↓ →0x223e4 ←0x222dc <MI 223d0 CLR.L D0> {[-8-]} <MI 223d2 MOVE.B (A6+0x48),D0> {[-8-]} <MI 223d6 CMP.W #0x06,D0> {[-8-]} <MI 223d8 BEQ 0x223e4> {[-8-]} <POP 223da-223e4 Naked> Σ-8 ↓ →0x223ec <MI 223da CLR.L D1> {[-8-]} <MI 223dc MOVE.B (A6+0x49),D1> {[-8-]} <MI 223e0 CMP.W #0x06,D1> {[-8-]} <MI 223e2 BNE 0x223ec> {[-8-]} <POP 223e4-223ec Naked> Σ-8 ↓ ←0x223d0 <Const 0x223e4 0x6.2> Δ-2 {[-8-]|[#6]} <Call 0x223e6 0x21f26> {[-8-]|[#6]} <POP 223ea-223ec StackAdj> Δ+2 {[-8-]} <POP 223ec-223f2 Naked> Σ-8 ↓ →0x223fe ←0x223da <MI 223ec CMPI.W #0x0007,D0> {[-8-]} <MI 223f0 BEQ 0x223fe> {[-8-]} <POP 223f2-223fe Naked> Σ-8 ↓ →0x22408 <MI 223f2 CLR.L D0> {[-8-]} <MI 223f4 MOVE.B (A6+0x49),D0> {[-8-]} <MI 223f8 CMPI.W #0x0007,D0> {[-8-]} <MI 223fc BNE 0x22408> {[-8-]} <POP 223fe-22408 Naked> Σ-8 ↓ ←0x223ec <Const 0x223fe 0x7.2> Δ-2 {[-8-]|[#7]} <Call 0x22402 0x21f26> {[-8-]|[#7]} <POP 22406-22408 StackAdj> Δ+2 {[-8-]} <POP 22408-22410 Naked> Σ-8 Δ+8 →0x22898 ←0x223f2 <MI 22408 CLR.B (A0)> {[-8-]} <POP 2240a-2240c StackAdj> Δ+8 {} <MI 2240c BRA 0x22898> {} <POP 22410-22414 Naked> Σ-8 ↓ ←0x222dc <MI 22410 MOVEA.W #0x01,A4> {[-8-]} <MI 22412 MOVEQ.L #0x0f,D7> {[-8-]} <POP 22414-22418 Naked> Σ-8 ↓ →0x2245a ←0x2245a <MI 22414 CMPA.W #0x01,A4> {[-8-]} <MI 22416 BNE 0x2245a> {[-8-]} <POP 22418-22428 Naked> Σ-8 ↓ →0x2245a <POP 22418-2241a StackAdj> Δ-2 {[-10-]} <MI 2241a MOVE.B D7,-(A7)> Δ-2 {[-10-]|[2, 'D7']} <Call 0x2241c 0x104c0> {[-10-]|[2, 'D7']} HasBoard(diproc_addr: Byte) : Byte <POP 22422-22424 StackAdj> Δ+2 {[-10-]} <MI 22424 TST.B (A7)+> Δ+2 {[-8-]} <MI 22426 BEQ 0x2245a> {[-8-]} <POP 22428-22446 Naked> Σ-8 ↓ →0x2244c <MI 22428 MOVE.B D7,-(A7)> Δ-2 {[-8-]|[2, 'D7']} <Pointer.fp 0x2242a <LVAR -0x002 @ 1(r)>> Δ-4 {[-8-]|[2, 'D7']|[@@-2]} <Pointer.fp 0x2242e <LVAR -0x001 @ 1(r)>> Δ-4 {[-8-]|[2, 'D7']|[@@-2]|[@@-1]} <Pointer.fp 0x22432 <LVAR -0x003 @>> Δ-4 {[-8-]|[2, 'D7']|[@@-2]|[@@-1]|[@@-3]} <Call 0x22436 0x22ade> {[-8-]|[2, 'D7']|[@@-2]|[@@-1]|[@@-3]} <POP 2243c-22440 StackAdj> Δ+14 {[-8-]} <MI 22440 TST.B (A6-0x1)> {[-8-]} <MI 22444 BNE 0x2244c> {[-8-]} <POP 22446-2244c Naked> Σ-8 ↓ →0x2245a <MI 22446 TST.B (A6-0x2)> {[-8-]} <MI 2244a BEQ 0x2245a> {[-8-]} <POP 2244c-2245a Naked> Σ-8 ↓ ←0x22428 <POP 2244c-2244e StackAdj> Δ-4 {[-12-]} <MI 2244e MOVE.B D7,-(A7)> Δ-2 {[-12-]|[2, 'D7']} <Call 0x22450 0x1049c> {[-12-]|[2, 'D7']} BoardName(address : B) : String <POP 22456-22458 StackAdj> Δ+2 {[-12-]} <MI 22458 MOVEA.L (A7)+,A4> Δ+4 {[-8-]} <POP 2245a-22460 Naked> Σ-8 ↓ →0x22414 ←0x22414 ←0x22418 ←0x22446 <MI 2245a SUBQ.B #0x1,D7> {[-8-]} <MI 2245c CMP.B #0x0c,D7> {[-8-]} <MI 2245e BGE 0x22414> {[-8-]} <POP 22460-22464 Naked> Σ-8 ↓ →0x22480 <MI 22460 CMPA.W #0x01,A4> {[-8-]} <MI 22462 BNE 0x22480> {[-8-]} <POP 22464-22480 Naked> Σ-8 ↓ <Blob 0x22464 [4] @> Δ-4 {[-8-]|[«4""»]} <POP 22468-2246a StackAdj> Δ-4 {[-8-]|[«4""»]|[-4-]} <Lit 0x2246a 4> {[-8-]|[«4""»]|[$$MEM0]} <MI 2247c MOVEA.L (A7)+,A4> Δ+4 {[-8-]|[«4""»]} <POP 2247e-22480 StackAdj> Δ+4 {[-8-]} <POP 22480-22486 Naked> Σ-8 ↓ →0x2249a ←0x22460 <MI 22480 TST.B (A6+0x36)> {[-8-]} <MI 22484 BNE 0x2249a> {[-8-]} <POP 22486-2248c Naked> Σ-8 ↓ →0x2249a <MI 22486 TST.B (A6+0x30)> {[-8-]} <MI 2248a BNE 0x2249a> {[-8-]} <POP 2248c-22492 Naked> Σ-8 ↓ →0x2249a <MI 2248c TST.B (A6+0x2b)> {[-8-]} <MI 22490 BNE 0x2249a> {[-8-]} <POP 22492-2249a Naked> Σ-8 ↓ →0x225aa <MI 22492 TST.B (A6+0x1e)> {[-8-]} <MI 22496 BEQ 0x225aa> {[-8-]} <POP 2249a-224ae Naked> Σ-8 ↓ →0x2257c ←0x22480 ←0x22486 ←0x2248c <MI 2249a CLR.L D0> {[-8-]} <MI 2249c MOVE.B 0x230d9,D0> {[-8-]} <MI 224a2 ANDI.W #0x000f,D0> {[-8-]} <MI 224a6 CMPI.W #0x000f,D0> {[-8-]} <MI 224aa BHI 0x2257c> {[-8-]} <POP 224ae-224b8 Naked> Σ-8 →0x224d8 →0x224d8 →0x2250a →0x2250a →0x2251c →0x2252e →0x2257c →0x2257c →0x224d8 →0x224d8 →0x2250a →0x2250a →0x22540 →0x22540 →0x22540 →0x22540 <MI 224ae ADD.W D0,D0> {[-8-]} <MI 224b0 SWITCH D0.W> {[-8-]} <POP 224d8-224e8 Naked> Σ-8 Δ-24 ↓ ←0x224ae ←0x224ae ←0x224ae ←0x224ae <Blob 0x224d8 [24] @> Δ-24 {[-8-]|[«24""»]} <POP 224e8-2250a Naked> Σ-32 Δ+24 →0x225aa ←0x2250a ←0x2251c ←0x2252e <POP 224e8-224ea StackAdj> Δ-4 {[-36-]} <Lit 0x224ea> {[-32-]|[$$…]} <Pointer.sp 0x224ea 4> Δ-4 <Const 0x224ee 0x1.2> Δ-2 <Const 0x224f0 0x17.2> Δ-2 <Call 0x224f4 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 224fa-224fc StackAdj> Δ+8 <Call 0x224fc 0x103e0> {[-32-]|[$$…]} WriteConsoleStringCrLf(str : String) <POP 22502-22506 StackAdj> Δ+28 {[-8-]} <MI 22506 BRA 0x225aa> {[-8-]} <POP 2250a-2251c Naked> Σ-8 Δ-24 →0x224e8 ←0x224ae ←0x224ae ←0x224ae ←0x224ae <Blob 0x2250a [24] @> Δ-24 {[-8-]|[«24""»]} <MI 2251a BRA 0x224e8> {[-8-]|[«24""»]} <POP 2251c-2252e Naked> Σ-8 Δ-24 →0x224e8 ←0x224ae <Blob 0x2251c [24] @> Δ-24 {[-8-]|[«24""»]} <MI 2252c BRA 0x224e8> {[-8-]|[«24""»]} <POP 2252e-22540 Naked> Σ-8 Δ-24 →0x224e8 ←0x224ae <Blob 0x2252e [24] @> Δ-24 {[-8-]|[«24""»]} <MI 2253e BRA 0x224e8> {[-8-]|[«24""»]} <POP 22540-2257c Naked> Σ-8 →0x225aa ←0x224ae ←0x224ae ←0x224ae ←0x224ae <Blob 0x22540 [48] @> Δ-48 {[-8-]|[«48""»]} <POP 2254c-2254e StackAdj> Δ-8 {[-8-]|[«48""»]|[-8-]} <MI 2254e MOVE.L A4,-(A7)> Δ-4 {[-8-]|[«48""»]|[-8-]|[4, 'A4']} <Call 0x22550 0x102cc> {[-8-]|[«48""»]|[-8-]|[4, 'A4']} StringDup(a : String) : String <Lit 0x22556 48> {[-8-]|[«48""»]|[-8-]|[$$ RDR or IOC drove TYP bus & IOC drove the parity]} <Call 0x22568 0x102d0> {[-8-]|[«48""»]|[-8-]|[$$ RDR or IOC drove TYP bus & IOC drove the parity]} StringCat2(a, b : String) : String <POP 2256e-22570 StackAdj> Δ+8 {[-8-]|[«48""»]|[-4-]} <Call 0x22570 0x103e0> {[-8-]|[«48""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 22576-2257a StackAdj> Δ+52 {[-8-]} <MI 2257a BRA 0x225aa> {[-8-]} <POP 2257c-225aa Naked> Σ-8 ↓ ←0x2249a ←0x224ae ←0x224ae <Blob 0x2257c [30] @> Δ-30 {[-8-]|[«30""»]} <POP 2258c-2258e StackAdj> Δ-4 {[-8-]|[«30""»]|[-4-]} <Lit 0x2258e 29> {[-8-]|[«30""»]|[$$*** illegal TYP bus src field]} <Call 0x225a0 0x103e0> {[-8-]|[«30""»]|[$$*** illegal TYP bus src field]} WriteConsoleStringCrLf(str : String) <POP 225a6-225aa StackAdj> Δ+34 {[-8-]} <POP 225aa-225b0 Naked> Σ-8 ↓ →0x225c4 ←0x22492 ←0x224e8 ←0x22540 <MI 225aa TST.B (A6+0x35)> {[-8-]} <MI 225ae BNE 0x225c4> {[-8-]} <POP 225b0-225b6 Naked> Σ-8 ↓ →0x225c4 <MI 225b0 TST.B (A6+0x2f)> {[-8-]} <MI 225b4 BNE 0x225c4> {[-8-]} <POP 225b6-225bc Naked> Σ-8 ↓ →0x225c4 <MI 225b6 TST.B (A6+0x24)> {[-8-]} <MI 225ba BNE 0x225c4> {[-8-]} <POP 225bc-225c4 Naked> Σ-8 ↓ →0x22710 <MI 225bc TST.B (A6+0x1f)> {[-8-]} <MI 225c0 BEQ 0x22710> {[-8-]} <POP 225c4-225d8 Naked> Σ-8 ↓ →0x226e2 ←0x225aa ←0x225b0 ←0x225b6 <MI 225c4 CLR.L D0> {[-8-]} <MI 225c6 MOVE.B 0x230d9,D0> {[-8-]} <MI 225cc ANDI.W #0x000f,D0> {[-8-]} <MI 225d0 CMPI.W #0x000f,D0> {[-8-]} <MI 225d4 BHI 0x226e2> {[-8-]} <POP 225d8-225e2 Naked> Σ-8 →0x22602 →0x22634 →0x22602 →0x22634 →0x22646 →0x22658 →0x226e2 →0x226e2 →0x2266a →0x2266a →0x2266a →0x2266a →0x226a6 →0x226a6 →0x226a6 →0x226a6 <MI 225d8 ADD.W D0,D0> {[-8-]} <MI 225da SWITCH D0.W> {[-8-]} <POP 22602-22612 Naked> Σ-8 Δ-24 ↓ ←0x225d8 ←0x225d8 <Blob 0x22602 [24] @> Δ-24 {[-8-]|[«24""»]} <POP 22612-22634 Naked> Σ-32 Δ+24 →0x22710 ←0x22634 ←0x22646 ←0x22658 <POP 22612-22614 StackAdj> Δ-4 {[-36-]} <Lit 0x22614> {[-32-]|[$$…]} <Pointer.sp 0x22614 4> Δ-4 <Const 0x22618 0x1.2> Δ-2 <Const 0x2261a 0x17.2> Δ-2 <Call 0x2261e 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 22624-22626 StackAdj> Δ+8 <Call 0x22626 0x103e0> {[-32-]|[$$…]} WriteConsoleStringCrLf(str : String) <POP 2262c-22630 StackAdj> Δ+28 {[-8-]} <MI 22630 BRA 0x22710> {[-8-]} <POP 22634-22646 Naked> Σ-8 Δ-24 →0x22612 ←0x225d8 ←0x225d8 <Blob 0x22634 [24] @> Δ-24 {[-8-]|[«24""»]} <MI 22644 BRA 0x22612> {[-8-]|[«24""»]} <POP 22646-22658 Naked> Σ-8 Δ-24 →0x22612 ←0x225d8 <Blob 0x22646 [24] @> Δ-24 {[-8-]|[«24""»]} <MI 22656 BRA 0x22612> {[-8-]|[«24""»]} <POP 22658-2266a Naked> Σ-8 Δ-24 →0x22612 ←0x225d8 <Blob 0x22658 [24] @> Δ-24 {[-8-]|[«24""»]} <MI 22668 BRA 0x22612> {[-8-]|[«24""»]} <POP 2266a-226a6 Naked> Σ-8 →0x22710 ←0x225d8 ←0x225d8 ←0x225d8 ←0x225d8 <Blob 0x2266a [18] @> Δ-18 {[-8-]|[«18""»]} <POP 22676-22678 StackAdj> Δ-8 {[-8-]|[«18""»]|[-8-]} <MI 22678 MOVE.L A4,-(A7)> Δ-4 {[-8-]|[«18""»]|[-8-]|[4, 'A4']} <Call 0x2267a 0x102cc> {[-8-]|[«18""»]|[-8-]|[4, 'A4']} StringDup(a : String) : String <Lit 0x22680 18> {[-8-]|[«18""»]|[-8-]|[$$ TVR drove VAL bus]} <Call 0x22692 0x102d0> {[-8-]|[«18""»]|[-8-]|[$$ TVR drove VAL bus]} StringCat2(a, b : String) : String <POP 22698-2269a StackAdj> Δ+8 {[-8-]|[«18""»]|[-4-]} <Call 0x2269a 0x103e0> {[-8-]|[«18""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 226a0-226a4 StackAdj> Δ+22 {[-8-]} <MI 226a4 BRA 0x22710> {[-8-]} <POP 226a6-226e2 Naked> Σ-8 →0x22710 ←0x225d8 ←0x225d8 ←0x225d8 ←0x225d8 <Blob 0x226a6 [48] @> Δ-48 {[-8-]|[«48""»]} <POP 226b2-226b4 StackAdj> Δ-8 {[-8-]|[«48""»]|[-8-]} <MI 226b4 MOVE.L A4,-(A7)> Δ-4 {[-8-]|[«48""»]|[-8-]|[4, 'A4']} <Call 0x226b6 0x102cc> {[-8-]|[«48""»]|[-8-]|[4, 'A4']} StringDup(a : String) : String <Lit 0x226bc 48> {[-8-]|[«48""»]|[-8-]|[$$ RDR or IOC drove VAL bus & IOC drove the parity]} <Call 0x226ce 0x102d0> {[-8-]|[«48""»]|[-8-]|[$$ RDR or IOC drove VAL bus & IOC drove the parity]} StringCat2(a, b : String) : String <POP 226d4-226d6 StackAdj> Δ+8 {[-8-]|[«48""»]|[-4-]} <Call 0x226d6 0x103e0> {[-8-]|[«48""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 226dc-226e0 StackAdj> Δ+52 {[-8-]} <MI 226e0 BRA 0x22710> {[-8-]} <POP 226e2-22710 Naked> Σ-8 ↓ ←0x225c4 ←0x225d8 ←0x225d8 <Blob 0x226e2 [30] @> Δ-30 {[-8-]|[«30""»]} <POP 226f2-226f4 StackAdj> Δ-4 {[-8-]|[«30""»]|[-4-]} <Lit 0x226f4 29> {[-8-]|[«30""»]|[$$*** illegal VAL bus src field]} <Call 0x22706 0x103e0> {[-8-]|[«30""»]|[$$*** illegal VAL bus src field]} WriteConsoleStringCrLf(str : String) <POP 2270c-22710 StackAdj> Δ+34 {[-8-]} <POP 22710-22718 Naked> Σ-8 ↓ →0x227a8 ←0x225bc ←0x22612 ←0x2266a ←0x226a6 <MI 22710 TST.B (A6+0x34)> {[-8-]} <MI 22714 BEQ 0x227a8> {[-8-]} <POP 22718-22738 Naked> Σ-8 →0x22740 →0x22752 →0x22764 →0x22776 <MI 22718 CLR.L D0> {[-8-]} <MI 2271a MOVE.B 0x230d9,D0> {[-8-]} <MI 22720 ASR.W #0x4,D0> {[-8-]} <MI 22722 ANDI.W #0x0003,D0> {[-8-]} <POP 0x22726 LimitCheck 0x0 ≤ D0 ≤ 0x3> {[-8-]} <MI 2272e ADD.W D0,D0> {[-8-]} <MI 22730 SWITCH D0.W> {[-8-]} <POP 22740-22752 Naked> Σ-8 Δ-24 →0x22786 ←0x22718 <Blob 0x22740 [24] @> Δ-24 {[-8-]|[«24""»]} <MI 22750 BRA 0x22786> {[-8-]|[«24""»]} <POP 22752-22764 Naked> Σ-8 Δ-24 →0x22786 ←0x22718 <Blob 0x22752 [24] @> Δ-24 {[-8-]|[«24""»]} <MI 22762 BRA 0x22786> {[-8-]|[«24""»]} <POP 22764-22776 Naked> Σ-8 Δ-24 →0x22786 ←0x22718 <Blob 0x22764 [24] @> Δ-24 {[-8-]|[«24""»]} <MI 22774 BRA 0x22786> {[-8-]|[«24""»]} <POP 22776-22786 Naked> Σ-8 Δ-24 ↓ ←0x22718 <Blob 0x22776 [24] @> Δ-24 {[-8-]|[«24""»]} <POP 22786-227a8 Naked> Σ-32 Δ+24 →0x22844 ←0x22740 ←0x22752 ←0x22764 <POP 22786-22788 StackAdj> Δ-4 {[-36-]} <Lit 0x22788> {[-32-]|[$$…]} <Pointer.sp 0x22788 4> Δ-4 <Const 0x2278c 0x1.2> Δ-2 <Const 0x2278e 0x17.2> Δ-2 <Call 0x22792 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 22798-2279a StackAdj> Δ+8 <Call 0x2279a 0x103e0> {[-32-]|[$$…]} WriteConsoleStringCrLf(str : String) <POP 227a0-227a4 StackAdj> Δ+28 {[-8-]} <MI 227a4 BRA 0x22844> {[-8-]} <POP 227a8-227ae Naked> Σ-8 ↓ →0x227bc ←0x22710 <MI 227a8 TST.B (A6+0x2e)> {[-8-]} <MI 227ac BNE 0x227bc> {[-8-]} <POP 227ae-227b4 Naked> Σ-8 ↓ →0x227bc <MI 227ae TST.B (A6+0x25)> {[-8-]} <MI 227b2 BNE 0x227bc> {[-8-]} <POP 227b4-227bc Naked> Σ-8 ↓ →0x22844 <MI 227b4 TST.B (A6+0x2c)> {[-8-]} <MI 227b8 BEQ 0x22844> {[-8-]} <POP 227bc-227dc Naked> Σ-8 →0x227e4 →0x227f6 →0x22808 →0x2281a ←0x227a8 ←0x227ae <MI 227bc CLR.L D0> {[-8-]} <MI 227be MOVE.B 0x230db,D0> {[-8-]} <MI 227c4 ASR.W #0x4,D0> {[-8-]} <MI 227c6 ANDI.W #0x0003,D0> {[-8-]} <POP 0x227ca LimitCheck 0x0 ≤ D0 ≤ 0x3> {[-8-]} <MI 227d2 ADD.W D0,D0> {[-8-]} <MI 227d4 SWITCH D0.W> {[-8-]} <POP 227e4-227f6 Naked> Σ-8 Δ-24 →0x2282a ←0x227bc <Blob 0x227e4 [24] @> Δ-24 {[-8-]|[«24""»]} <MI 227f4 BRA 0x2282a> {[-8-]|[«24""»]} <POP 227f6-22808 Naked> Σ-8 Δ-24 →0x2282a ←0x227bc <Blob 0x227f6 [24] @> Δ-24 {[-8-]|[«24""»]} <MI 22806 BRA 0x2282a> {[-8-]|[«24""»]} <POP 22808-2281a Naked> Σ-8 Δ-24 →0x2282a ←0x227bc <Blob 0x22808 [24] @> Δ-24 {[-8-]|[«24""»]} <MI 22818 BRA 0x2282a> {[-8-]|[«24""»]} <POP 2281a-2282a Naked> Σ-8 Δ-24 ↓ ←0x227bc <Blob 0x2281a [24] @> Δ-24 {[-8-]|[«24""»]} <POP 2282a-22844 Naked> Σ-32 Δ-4 ↓ ←0x227e4 ←0x227f6 ←0x22808 <POP 2282a-2282c StackAdj> Δ-4 {[-36-]} <Lit 0x2282c> {[-32-]|[$$…]} <Pointer.sp 0x2282c 4> Δ-4 <Const 0x22830 0x1.2> Δ-2 <Const 0x22832 0x17.2> Δ-2 <Call 0x22836 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 2283c-2283e StackAdj> Δ+8 <Call 0x2283e 0x103e0> {[-32-]|[$$…]} WriteConsoleStringCrLf(str : String) <POP 22844-2284a Naked> Σ-8 Δ+36 →0x22898 ←0x22786 ←0x227b4 <POP 22844-22848 StackAdj> Δ+36 {MANGLED} <MI 22848 BRA 0x22898> {MANGLED} <POP 2284a-22856 Naked> Σ-8 ↓ →0x22890 ←0x222dc <POP 2284a-2284c StackAdj> Δ-2 {[-10-]} <Call 0x2284c 0x104cc> {[-10-]} MemOnly2MB() : Bool <MI 22852 TST.B (A7)+> Δ+2 {[-8-]} <MI 22854 BNE 0x22890> {[-8-]} <POP 22856-22860 Naked> Σ-8 ↓ →0x2286a <MI 22856 CLR.L D0> {[-8-]} <MI 22858 MOVE.B (A6+0x48),D0> {[-8-]} <MI 2285c CMP.W #0x0c,D0> {[-8-]} <MI 2285e BEQ 0x2286a> {[-8-]} <POP 22860-2286a Naked> Σ-8 ↓ →0x22872 <MI 22860 CLR.L D1> {[-8-]} <MI 22862 MOVE.B (A6+0x49),D1> {[-8-]} <MI 22866 CMP.W #0x0c,D1> {[-8-]} <MI 22868 BNE 0x22872> {[-8-]} <POP 2286a-22872 Naked> Σ-8 ↓ ←0x22856 <Const 0x2286a 0xc.2> Δ-2 {[-8-]|[#12]} <Call 0x2286c 0x21d16> {[-8-]|[#12]} <POP 22870-22872 StackAdj> Δ+2 {[-8-]} <POP 22872-22878 Naked> Σ-8 ↓ →0x22884 ←0x22860 <MI 22872 CMPI.W #0x000e,D0> {[-8-]} <MI 22876 BEQ 0x22884> {[-8-]} <POP 22878-22884 Naked> Σ-8 ↓ →0x2288e <MI 22878 CLR.L D0> {[-8-]} <MI 2287a MOVE.B (A6+0x49),D0> {[-8-]} <MI 2287e CMPI.W #0x000e,D0> {[-8-]} <MI 22882 BNE 0x2288e> {[-8-]} <POP 22884-2288e Naked> Σ-8 ↓ ←0x22872 <Const 0x22884 0xe.2> Δ-2 {[-8-]|[#14]} <Call 0x22888 0x21d16> {[-8-]|[#14]} <POP 2288c-2288e StackAdj> Δ+2 {[-8-]} <POP 2288e-22890 Naked> Σ-8 ↓ ←0x22878 <MI 2288e CLR.B (A0)> {[-8-]} <POP 22890-22894 Naked> Σ-8 Δ+8 →0x22898 ←0x2284a <POP 22890-22892 StackAdj> Δ+8 {} <MI 22892 BRA 0x22898> {} <POP 22894-22898 Naked> Σ-8 Δ+8 ↓ ←0x2224a ←0x222dc ←0x222dc <MI 22894 MOVE.B #0x01,(A0)> {[-8-]} <POP 22896-22898 StackAdj> Δ+8 {} <POP 22898-228a0 Epilogue> Σ0 ←0x22370 ←0x22408 ←0x22844 ←0x22890
@ 228a0 START <POP 228a0--0001 Body> <POP 228a0-228aa Prologue> Σ0 <POP 228aa-228be RegCacheLoad> Σ0 ↓ <POP 228be-228ec Naked> Σ0 ↓ <Call 0x228be 0x10398> {} FSCALL_10398 <Const 0x228c4 0x230e2.4> Δ-4 {[##143586]} <Const 0x228ca 0x230e3.4> Δ-4 {[##143586]|[##143587]} <Call 0x228cc 0x10544> {[##143586]|[##143587]} IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool) <POP 228d2-228d4 StackAdj> Δ+8 {} <Const 0x228d4 0x0.4> Δ-4 {[##0]} <Call 0x228d8 0x104d8> {[##0]} ExpInit(a : Long) <POP 228de-228e0 StackAdj> Δ+2 {[-2-]} <POP 228e0-228e1 StackAdj> Δ+2 {} <Blob 0x228e1 [2] 0x230e3> Δ-2 {[«2»]} <Call 0x228e2 0x104d2> {[«2»]} SetExpInitDone(a : Byte) <POP 228e8-228ea StackAdj> Δ+2 {} <MI 228ea MOVEQ.L #0x00,D0> {} <POP 228ec-2290c Naked> Σ0 ↓ →0x228ec ←0x228ec <MI 228ec MOVE.B D0,0x230e4> {} <MI 228f2 MOVE.B D0,D1> {} <MI 228f4 EXTB.W D1> {} <MI 228f6 MOVE.W D1,-(A7)> Δ-2 {[2, 'D1']} <MI 228f8 LEA.L 0x23050,A0> {[2, 'D1']} <MI 228fa LEA.L (A0+D1.W),A0> {[2, 'D1']} <MI 228fe CLR.B (A0+0xa7)> {[2, 'D1']} <MI 22902 MOVE.W (A7)+,D0> Δ+2 {} <MI 22904 ADDQ.W #0x1,D0> {} <MI 22906 CMPI.W #0x002b,D0> {} <MI 2290a BLE 0x228ec> {} <POP 2290c-2290e Naked> Σ0 ↓ <MI 2290c MOVEQ.L #0x00,D0> {} <POP 2290e-2292a Naked> Σ0 ↓ →0x2290e ←0x2290e <MI 2290e MOVE.L D0,0x230de> {} <POP 0x22914 LimitCheck 0x0 ≤ D0 ≤ 0x7> {} <MI 2291a LEA.L 0x23050,A0> {} <MI 2291c LEA.L (A0+D0.L),A0> {} <MI 22920 CLR.B (A0+0x9f)> {} <MI 22924 ADDQ.L #0x1,D0> {} <MI 22926 CMP.L #0x07,D0> {} <MI 22928 BLE 0x2290e> {} <POP 2292a-229f2 Naked> Σ0 ↓ <Call 0x2292a 0x2188c> {} <Call 0x2292e 0x219cc> {} <Const 0x22932 0x230f7.4> Δ-4 {[##143607]} <Call 0x22934 0x21322> {[##143607]} <POP 22938-2293a StackAdj> Δ+2 {[-2-]} <Const 0x2293a 0x230f7.4> Δ-4 {[-2-]|[##143607]} <Call 0x2293c 0x21bda> {[-2-]|[##143607]} <POP 22940-22942 StackAdj> Δ+4 {[-2-]} <MI 22942 MOVE.B (A7)+,D0> Δ+2 {} <MI 22944 EXTB.W D0> {} <POP 0x22946 LimitCheck 0x0 ≤ D0 ≤ 0xb> {} <MI 2294a MOVE.B D0,0x23123> {} <POP 22950-22951 StackAdj> Δ-8 ↓ {[-8-]} <Blob 0x22951 [44] 0x230f7> Δ-44 {[-8-]|[«44»]} <MI 22960 MOVE.B D0,-(A7)> Δ-2 {[-8-]|[«44»]|[2, 'D0']} <Call 0x22962 0x21c52> {[-8-]|[«44»]|[2, 'D0']} <POP 22966-2296a StackAdj> Δ+46 {[-8-]} <MI 2296a MOVE.L (A7)+,0x23124> Δ+4 {[-4-]} <MI 22970 MOVE.L (A7)+,0x23128> Δ+4 {} <Blob 0x22976 [2] 0x23123> Δ-2 {[«2»]} <Blob 0x2297c [4] 0x23128> Δ-4 {[«2»]|[«4»]} <Blob 0x22982 [4] 0x23124> Δ-4 {[«2»]|[«4»]|[«4»]} <Blob 0x22988 [44] 0x230f7> Δ-44 {[«2»]|[«4»]|[«4»]|[«44»]} <Const 0x22998 0x230e5.4> Δ-4 {[«2»]|[«4»]|[«4»]|[«44»]|[##143589]} <Const 0x2299e 0x230e6.4> Δ-4 {[«2»]|[«4»]|[«4»]|[«44»]|[##143589]|[##143590]} <Const 0x229a4 0x230ea.4> Δ-4 {[«2»]|[«4»]|[«4»]|[«44»]|[##143589]|[##143590]|[##143594]} <Const 0x229aa 0x230ee.4> Δ-4 {[«2»]|[«4»]|[«4»]|[«44»]|[##143589]|[##143590]|[##143594]|[##143598]} <Const 0x229b0 0x230ef.4> Δ-4 {[«2»]|[«4»]|[«4»]|[«44»]|[##143589]|[##143590]|[##143594]|[##143598]|[##143599]} <Call 0x229b6 0x2222a> {[«2»]|[«4»]|[«4»]|[«44»]|[##143589]|[##143590]|[##143594]|[##143598]|[##143599]} <POP 229ba-229be StackAdj> Δ+72 {[«2»]} <POP 229be-229bf StackAdj> Δ+2 {} <Blob 0x229bf [2] 0x230e5> Δ-2 {[«2»]} <Blob 0x229c4 [4] 0x230e6> Δ-4 {[«2»]|[«4»]} <Blob 0x229ca [4] 0x230ea> Δ-4 {[«2»]|[«4»]|[«4»]} <Blob 0x229d0 [2] 0x230ee> Δ-2 {[«2»]|[«4»]|[«4»]|[«2»]} <Blob 0x229d6 [8] 0x230ef> Δ-8 {[«2»]|[«4»]|[«4»]|[«2»]|[«8»]} <Call 0x229e8 0x1054a> {[«2»]|[«4»]|[«4»]|[«2»]|[«8»]} ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) <POP 229ee-229f2 StackAdj> Δ+20 {} <POP 229f2-229f8 Naked> Σ0 <Call 0x229f2 0x10284> {} ?exit
@ 22ade <LVAR 0x014 1(r)> <LVAR 0x010 4(r)> <LVAR 0x00c 4(r)> <LVAR 0x008 4(r)> <LVAR -0x006 @ 4(r)> <POP 22ade-22ba6 Body> Δ+12 <POP 22ade-22af4 Prologue> Σ0 ↓ <POP 22af4-22afa RegCacheLoad> Σ0 ↓ <POP 22afa-22b06 Naked> Σ0 ↓ →0x22b18 <POP 22afa-22afc StackAdj> Δ-2 {[-2-]} <Call 0x22afc 0x104cc> {[-2-]} MemOnly2MB() : Bool <MI 22b02 TST.B (A7)+> Δ+2 {} <MI 22b04 BEQ 0x22b18> {} <POP 22b06-22b18 Naked> Σ0 Δ-12 →0x22b28 <Blob 0x22b06 [12] @> Δ-12 {[«12""»]} <MI 22b16 BRA 0x22b28> {[«12""»]} <POP 22b18-22b28 Naked> Σ0 Δ-12 ↓ ←0x22afa <Blob 0x22b18 [12] @> Δ-12 {[«12""»]} <POP 22b28-22b9e Naked> Σ-12 Δ+12 ↓ ←0x22b06 <POP 22b28-22b2a StackAdj> Δ-4 {[-16-]} <Lit 0x22b2a> {[-12-]|[$$…]} <Pointer.sp 0x22b2a 4> Δ-4 <Const 0x22b2e 0x1.2> Δ-2 <Const 0x22b32 0xb.2> Δ-2 <Call 0x22b36 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 22b3c-22b3e StackAdj> Δ+8 <Pointer.fp 0x22b3e <LVAR -0x006 @ 4(r)>> Δ-4 {[-12-]|[$$…]|[@@-6]} <Call 0x22b40 0x10460> {[-12-]|[$$…]|[@@-6]} ExpLoad(a : String; b: Pointer) <POP 22b46-22b4a StackAdj> Δ+20 {} <MI 22b4a CLR.B -(A7)> Δ-2 {[#0]} <MI 22b4c MOVE.B (A6+0x14),-(A7)> Δ-2 {[#0]|[2, '(A6+0x14)']} <MI 22b50 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x14)']|[4, '(A6-0x6)']} <Call 0x22b52 0x104ba> {[#0]|[2, '(A6+0x14)']|[4, '(A6-0x6)']} ExpRun(a: Bool; adr: Byte; b: Pointer) <POP 22b58-22b5a StackAdj> Δ+4 {[#0]|[2, '(A6+0x14)']} <MI 22b5a MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22b5c MOVEA.L (A6+0x10),A0> {[4, '(A6-0x6)']} <MI 22b60 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Call 0x22b62 0x10478> {[4, '(A6-0x6)']|[4, '^(A0)']} ExpOutputFlag(exp : Pointer; VAR status : Bool) <POP 22b68-22b6a StackAdj> Δ+4 {[4, '(A6-0x6)']} <MI 22b6a MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22b6c MOVEA.L (A6+0xc),A0> {[4, '(A6-0x6)']} <MI 22b70 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Call 0x22b72 0x10478> {[4, '(A6-0x6)']|[4, '^(A0)']} ExpOutputFlag(exp : Pointer; VAR status : Bool) <POP 22b78-22b7a StackAdj> Δ+4 {[4, '(A6-0x6)']} <MI 22b7a MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22b7c MOVEA.L (A6+0x8),A0> {[4, '(A6-0x6)']} <MI 22b80 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x22b82 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x22b86 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x22b8a 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22b90-22b94 StackAdj> Δ+16 {} <Pointer.fp 0x22b94 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]} <Call 0x22b96 0x10496> {[@@-6]} ExpClose(exp : Pointer) <POP 22b9c-22b9e StackAdj> Δ+4 {} <POP 22b9e-22ba6 Epilogue> Σ0
@ 22bca <LVAR 0x018 1(r)> <LVAR 0x014 4(r)> <LVAR 0x010 4(r)> <LVAR 0x00c 4(r)> <LVAR 0x008 4(r)> <LVAR -0x006 @ 4(r)> <POP 22bca-22ca6 Body> Δ+18 <POP 22bca-22be0 Prologue> Σ0 ↓ <POP 22be0-22bf2 RegCacheLoad> Σ0 ↓ <POP 22bf2-22bfe Naked> Σ0 ↓ →0x22c10 <POP 22bf2-22bf4 StackAdj> Δ-2 {[-2-]} <Call 0x22bf4 0x104cc> {[-2-]} MemOnly2MB() : Bool <MI 22bfa TST.B (A7)+> Δ+2 {} <MI 22bfc BEQ 0x22c10> {} <POP 22bfe-22c10 Naked> Σ0 Δ-18 →0x22c20 <Blob 0x22bfe [18] @> Δ-18 {[«18""»]} <MI 22c0e BRA 0x22c20> {[«18""»]} <POP 22c10-22c20 Naked> Σ0 Δ-18 ↓ ←0x22bf2 <Blob 0x22c10 [18] @> Δ-18 {[«18""»]} <POP 22c20-22c9e Naked> Σ-18 Δ+18 ↓ ←0x22bfe <POP 22c20-22c22 StackAdj> Δ-4 {[-22-]} <Lit 0x22c22> {[-18-]|[$$…]} <Pointer.sp 0x22c22 4> Δ-4 <Const 0x22c26 0x1.2> Δ-2 <Const 0x22c2a 0x11.2> Δ-2 <Call 0x22c2e 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 22c34-22c36 StackAdj> Δ+8 <Pointer.fp 0x22c36 <LVAR -0x006 @ 4(r)>> Δ-4 {[-18-]|[$$…]|[@@-6]} <Call 0x22c38 0x10460> {[-18-]|[$$…]|[@@-6]} ExpLoad(a : String; b: Pointer) <POP 22c3e-22c42 StackAdj> Δ+26 {} <MI 22c42 CLR.B -(A7)> Δ-2 {[#0]} <MI 22c44 MOVE.B (A6+0x18),-(A7)> Δ-2 {[#0]|[2, '(A6+0x18)']} <MI 22c48 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x18)']|[4, '(A6-0x6)']} <Call 0x22c4a 0x104ba> {[#0]|[2, '(A6+0x18)']|[4, '(A6-0x6)']} ExpRun(a: Bool; adr: Byte; b: Pointer) <POP 22c50-22c52 StackAdj> Δ+4 {[#0]|[2, '(A6+0x18)']} <MI 22c52 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22c54 MOVEA.L (A6+0x14),A0> {[4, '(A6-0x6)']} <MI 22c58 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x22c5a 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x22c5c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x22c5e 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22c60-22c62 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22c62 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22c64 MOVEA.L (A6+0x10),A0> {[4, '(A6-0x6)']} <MI 22c68 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x22c6a 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x22c6c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x22c6e 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22c70-22c72 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22c72 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22c74 MOVEA.L (A6+0xc),A0> {[4, '(A6-0x6)']} <MI 22c78 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x22c7a 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x22c7c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x22c7e 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22c80-22c82 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22c82 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22c84 MOVEA.L (A6+0x8),A0> {[4, '(A6-0x6)']} <MI 22c88 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x22c8a 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x22c8c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x22c8e 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22c90-22c94 StackAdj> Δ+16 {} <Pointer.fp 0x22c94 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]} <Call 0x22c96 0x10496> {[@@-6]} ExpClose(exp : Pointer) <POP 22c9c-22c9e StackAdj> Δ+4 {} <POP 22c9e-22ca6 Epilogue> Σ0
@ 22cc6 <LVAR 0x014 1(r)> <LVAR 0x010 4(r)> <LVAR 0x00c 4(r)> <LVAR 0x008 4(r)> <LVAR -0x006 @ 4(r)> <POP 22cc6-22d90 Body> Δ+16 <POP 22cc6-22cdc Prologue> Σ0 ↓ <POP 22cdc-22cee RegCacheLoad> Σ0 ↓ <POP 22cee-22cfa Naked> Σ0 ↓ →0x22d0c <POP 22cee-22cf0 StackAdj> Δ-2 {[-2-]} <Call 0x22cf0 0x104cc> {[-2-]} MemOnly2MB() : Bool <MI 22cf6 TST.B (A7)+> Δ+2 {} <MI 22cf8 BEQ 0x22d0c> {} <POP 22cfa-22d0c Naked> Σ0 Δ-16 →0x22d1c <Blob 0x22cfa [16] @> Δ-16 {[«16""»]} <MI 22d0a BRA 0x22d1c> {[«16""»]} <POP 22d0c-22d1c Naked> Σ0 Δ-16 ↓ ←0x22cee <Blob 0x22d0c [16] @> Δ-16 {[«16""»]} <POP 22d1c-22d88 Naked> Σ-16 Δ+16 ↓ ←0x22cfa <POP 22d1c-22d1e StackAdj> Δ-4 {[-20-]} <Lit 0x22d1e> {[-16-]|[$$…]} <Pointer.sp 0x22d1e 4> Δ-4 <Const 0x22d22 0x1.2> Δ-2 <Const 0x22d26 0xf.2> Δ-2 <Call 0x22d2a 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 22d30-22d32 StackAdj> Δ+8 <Pointer.fp 0x22d32 <LVAR -0x006 @ 4(r)>> Δ-4 {[-16-]|[$$…]|[@@-6]} <Call 0x22d34 0x10460> {[-16-]|[$$…]|[@@-6]} ExpLoad(a : String; b: Pointer) <POP 22d3a-22d3e StackAdj> Δ+24 {} <MI 22d3e CLR.B -(A7)> Δ-2 {[#0]} <MI 22d40 MOVE.B (A6+0x14),-(A7)> Δ-2 {[#0]|[2, '(A6+0x14)']} <MI 22d44 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x14)']|[4, '(A6-0x6)']} <Call 0x22d46 0x104ba> {[#0]|[2, '(A6+0x14)']|[4, '(A6-0x6)']} ExpRun(a: Bool; adr: Byte; b: Pointer) <POP 22d4c-22d4e StackAdj> Δ+4 {[#0]|[2, '(A6+0x14)']} <MI 22d4e MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22d50 MOVEA.L (A6+0x10),A0> {[4, '(A6-0x6)']} <MI 22d54 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x22d56 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x22d58 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x22d5a 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22d5c-22d5e StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22d5e MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22d60 MOVEA.L (A6+0xc),A0> {[4, '(A6-0x6)']} <MI 22d64 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x22d66 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x22d68 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x22d6a 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22d6c-22d6e StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22d6e MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22d70 MOVEA.L (A6+0x8),A0> {[4, '(A6-0x6)']} <MI 22d74 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x22d76 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x22d78 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x22d7a 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22d7c-22d7e StackAdj> Δ+16 {} <Pointer.fp 0x22d7e <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]} <Call 0x22d80 0x10496> {[@@-6]} ExpClose(exp : Pointer) <POP 22d86-22d88 StackAdj> Δ+4 {} <POP 22d88-22d90 Epilogue> Σ0
@ 22e58 PROG_FAIL <LVAR 0x008 1(r)> <POP 22e58-22ec0 Body> <POP 22e58-22e6e Prologue> Σ0 ↓ <POP 22e6e-22eb8 Naked> Σ0 ↓ <Blob 0x22e6e [14] @> Δ-14 {[«14""»]} <Const 0x22e7a 0x3.2> Δ-2 {[«14""»]|[#3]} <POP 22e7e-22e80 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]} <Lit 0x22e80 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]} <POP 22e92-22e94 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 22e94 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 22e98 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 22e9a EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 22e9c MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']} <Call 0x22e9e 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']} Long2String(a : Long) : String <POP 22ea4-22ea6 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <Call 0x22ea6 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} StringCat2(a, b : String) : String <POP 22eac-22eae StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]} <Call 0x22eae 0x103b8> {[«14""»]|[#3]|[-4-]} PopProgram(status : Byte; msg : String) <POP 22eb4-22eb8 StackAdj> Δ+20 {} <POP 22eb8-22ec0 Epilogue> Σ0
@ 22f14 EXP_FAIL <LVAR 0x00e 1(r)> <LVAR 0x00a 4(r)> <LVAR 0x008 1(r)> <POP 22f14-23050 Body> <POP 22f14-22f2a Prologue> Σ0 ↓ <POP 22f2a-22f40 RegCacheLoad> Σ0 ↓ <POP 22f40-22fa0 Naked> Σ0 ↓ →0x22fe8 <Call 0x22f40 0x103dc> {} WriteConsoleCrLf(void) <Blob 0x22f46 [18] @> Δ-18 {[«18""»]} <POP 22f52-22f54 StackAdj> Δ-4 {[«18""»]|[-4-]} <Lit 0x22f54 18> {[«18""»]|[$$Experiment error :]} <Call 0x22f60 0x103e0> {[«18""»]|[$$Experiment error :]} WriteConsoleStringCrLf(str : String) <POP 22f62-22f63 StackAdj> Δ+22 ↓ {} <Blob 0x22f63 [14] @> Δ-14 {[«14""»]} <POP 22f72-22f74 StackAdj> Δ-8 {[«14""»]|[-8-]} <Lit 0x22f74 13> {[«14""»]|[-4-]|[$$Board :_]} <POP 22f7e-22f80 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]} <MI 22f80 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]} <Call 0x22f84 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]} BoardName(address : B) : String <POP 22f8a-22f8c StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]} <Call 0x22f8c 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]} StringCat2(a, b : String) : String <POP 22f92-22f94 StackAdj> Δ+8 {[«14""»]|[-4-]} <Call 0x22f94 0x103e0> {[«14""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 22f96-22f98 StackAdj> Δ+18 {} <MI 22f98 MOVEA.L (A6+0xa),A0> {} <MI 22f9c CMPA.W #0x01,A0> {} <MI 22f9e BEQ 0x22fe8> {} <POP 22fa0-22fe8 Naked> Σ0 ↓ <Blob 0x22fa0 [14] @> Δ-14 {[«14""»]} <Blob 0x22fb0 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]} <POP 22fc0-22fc2 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]} <Lit 0x22fc2 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]} <POP 22fcc-22fce StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]} <Lit 0x22fce> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]} <Pointer.sp 0x22fce 12> Δ-4 <Const 0x22fd2 0x1.2> Δ-2 <Const 0x22fd4 0x1e.2> Δ-2 <Call 0x22fd6 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 22fd8-22fda StackAdj> Δ+8 <Call 0x22fda 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]} StringCat2(a, b : String) : String <POP 22fe0-22fe2 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]} <Call 0x22fe2 0x103e0> {[«14""»]|[«30»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 22fe4-22fe8 StackAdj> Δ+48 {} <POP 22fe8-23048 Naked> Σ0 ↓ ←0x22f40 <Blob 0x22fe8 [14] @> Δ-14 {[«14""»]} <POP 22ff8-22ffa StackAdj> Δ-8 {[«14""»]|[-8-]} <Lit 0x22ffa 13> {[«14""»]|[-4-]|[$$Status :_]} <POP 23004-23006 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]} <MI 23006 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]} <Call 0x2300a 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]} ExpStatus2Text(status.B, &String) <POP 23010-23012 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]} <Call 0x23012 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]} StringCat2(a, b : String) : String <POP 23018-2301a StackAdj> Δ+8 {[«14""»]|[-4-]} <Call 0x2301a 0x103e0> {[«14""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 2301c-2301d StackAdj> Δ+18 ↓ {} <Blob 0x2301d [24] @> Δ-24 {[«24""»]} <Const 0x2302c 0x2.2> Δ-2 {[«24""»]|[#2]} <POP 23030-23032 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]} <Lit 0x23032 23> {[«24""»]|[#2]|[$$Fatal experiment error.]} <Call 0x23040 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]} PopProgram(status : Byte; msg : String) <POP 23046-23048 StackAdj> Δ+30 {} <POP 23048-23050 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.9ed829eb3d4cd566 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 28 a0 | ( | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 31 54 | 1T | .PTR 0x23154 00020010 code.end: 00020010 00 02 30 50 | 0P | .PTR 0x23050 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 2e 58 | .X | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 2f 14 | / | .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 40 28 23 29 45 4d |@(#)EM | .XXX[0x6] 00020110 42 41 4c 4d 2c 33 2e 32 |BALM,3.2| .XXX[0x38] 00020118 2c 39 32 2f 31 30 2f 32 |,92/10/2| 00020120 38 2c 31 36 3a 31 37 3a |8,16:17:| 00020128 30 30 5c 20 55 6e 6b 6e |00\ Unkn| 00020130 6f 77 6e 20 65 72 72 6f |own erro| 00020138 72 20 20 20 20 20 20 20 |r | 00020140 20 20 20 20 20 20 20 20 | | 00020148 20 20 | | .XXX[0x2] 0002014a 48 61 6c 74 20 20 |Halt | .XXX[0x6] 00020150 20 20 20 20 20 20 20 20 | | .BLANK 20[0x18] 00020168 52 65 66 72 65 73 68 20 |Refresh | .XXX[0x3f8] 00020170 6d 61 63 68 69 6e 65 20 |machine | 00020178 63 68 65 63 6b 20 20 20 |check | 00020180 20 20 20 20 20 20 4d 69 | Mi| 00020188 63 72 6f 61 64 64 72 65 |croaddre| 00020190 73 73 20 62 75 73 20 70 |ss bus p| 00020198 61 72 69 74 79 20 20 20 |arity | 000201a0 20 20 20 20 57 43 53 20 | WCS | 000201a8 52 41 4d 20 70 61 72 69 |RAM pari| 000201b0 74 79 20 65 72 72 6f 72 |ty error| 000201b8 20 20 20 20 20 20 20 20 | | 000201c0 20 20 44 65 63 6f 64 65 | Decode| 000201c8 20 52 41 4d 20 70 61 72 | RAM par| 000201d0 69 74 79 20 65 72 72 6f |ity erro| 000201d8 72 20 20 20 20 20 20 20 |r | 000201e0 53 63 61 76 65 6e 67 65 |Scavenge| 000201e8 72 20 52 41 4d 20 70 61 |r RAM pa| 000201f0 72 69 74 79 20 65 72 72 |rity err| 000201f8 6f 72 20 20 20 20 52 65 |or Re| 00020200 67 69 73 74 65 72 20 46 |gister F| 00020208 69 6c 65 20 52 41 4d 20 |ile RAM | 00020210 70 61 72 69 74 79 20 65 |parity e| 00020218 72 72 6f 72 46 6f 72 65 |rrorFore| 00020220 70 6c 61 6e 65 20 62 75 |plane bu| 00020228 73 20 70 61 72 69 74 79 |s parity| 00020230 20 65 72 72 6f 72 20 20 | error | 00020238 20 20 41 64 64 72 65 73 | Addres| 00020240 73 20 62 75 73 20 70 61 |s bus pa| 00020248 72 69 74 79 20 65 72 72 |rity err| 00020250 6f 72 20 20 20 20 20 20 |or | 00020258 54 61 67 73 74 6f 72 65 |Tagstore| 00020260 20 52 41 4d 20 70 61 72 | RAM par| 00020268 69 74 79 20 65 72 72 6f |ity erro| 00020270 72 20 20 20 20 20 57 44 |r WD| 00020278 52 2f 46 6f 72 65 70 6c |R/Forepl| 00020280 61 6e 65 5f 62 75 73 20 |ane_bus | 00020288 65 72 72 6f 72 20 20 20 |error | 00020290 20 20 20 20 49 4f 43 20 | IOC | 00020298 62 6f 61 72 64 20 75 41 |board uA| 000202a0 44 44 52 20 70 61 72 69 |DDR pari| 000202a8 74 79 20 65 72 72 6f 72 |ty error| 000202b0 20 20 49 4f 43 20 62 6f | IOC bo| 000202b8 61 72 64 20 57 43 53 20 |ard WCS | 000202c0 52 41 4d 20 70 61 72 69 |RAM pari| 000202c8 74 79 20 65 72 72 6f 72 |ty error| 000202d0 49 4f 43 20 62 6f 61 72 |IOC boar| 000202d8 64 20 54 59 50 20 62 75 |d TYP bu| 000202e0 73 20 70 61 72 69 74 79 |s parity| 000202e8 20 65 72 72 6f 72 49 4f | errorIO| 000202f0 43 20 62 6f 61 72 64 20 |C board | 000202f8 56 41 4c 20 62 75 73 20 |VAL bus | 00020300 70 61 72 69 74 79 20 65 |parity e| 00020308 72 72 6f 72 56 41 4c 20 |rrorVAL | 00020310 62 6f 61 72 64 20 75 41 |board uA| 00020318 44 44 52 20 70 61 72 69 |DDR pari| 00020320 74 79 20 65 72 72 6f 72 |ty error| 00020328 20 20 56 41 4c 20 62 6f | VAL bo| 00020330 61 72 64 20 57 43 53 20 |ard WCS | 00020338 52 41 4d 20 70 61 72 69 |RAM pari| 00020340 74 79 20 65 72 72 6f 72 |ty error| 00020348 56 41 4c 20 62 6f 61 72 |VAL boar| 00020350 64 20 41 52 46 20 52 41 |d ARF RA| 00020358 4d 20 70 61 72 69 74 79 |M parity| 00020360 20 65 72 72 6f 72 56 41 | errorVA| 00020368 4c 20 62 6f 61 72 64 20 |L board | 00020370 42 52 46 20 52 41 4d 20 |BRF RAM | 00020378 70 61 72 69 74 79 20 65 |parity e| 00020380 72 72 6f 72 56 41 4c 20 |rrorVAL | 00020388 62 6f 61 72 64 20 56 41 |board VA| 00020390 4c 20 62 75 73 20 70 61 |L bus pa| 00020398 72 69 74 79 20 65 72 72 |rity err| 000203a0 6f 72 56 41 4c 20 62 6f |orVAL bo| 000203a8 61 72 64 20 46 49 55 20 |ard FIU | 000203b0 62 75 73 20 70 61 72 69 |bus pari| 000203b8 74 79 20 65 72 72 6f 72 |ty error| 000203c0 56 41 4c 20 62 6f 61 72 |VAL boar| 000203c8 64 20 57 44 52 20 70 61 |d WDR pa| 000203d0 72 69 74 79 20 65 72 72 |rity err| 000203d8 6f 72 20 20 20 20 54 59 |or TY| 000203e0 50 20 62 6f 61 72 64 20 |P board | 000203e8 75 41 44 44 52 20 70 61 |uADDR pa| 000203f0 72 69 74 79 20 65 72 72 |rity err| 000203f8 6f 72 20 20 54 59 50 20 |or TYP | 00020400 62 6f 61 72 64 20 57 43 |board WC| 00020408 53 20 52 41 4d 20 70 61 |S RAM pa| 00020410 72 69 74 79 20 65 72 72 |rity err| 00020418 6f 72 54 59 50 20 62 6f |orTYP bo| 00020420 61 72 64 20 41 52 46 20 |ard ARF | 00020428 52 41 4d 20 70 61 72 69 |RAM pari| 00020430 74 79 20 65 72 72 6f 72 |ty error| 00020438 54 59 50 20 62 6f 61 72 |TYP boar| 00020440 64 20 42 52 46 20 52 41 |d BRF RA| 00020448 4d 20 70 61 72 69 74 79 |M parity| 00020450 20 65 72 72 6f 72 54 59 | errorTY| 00020458 50 20 62 6f 61 72 64 20 |P board | 00020460 54 59 50 20 62 75 73 20 |TYP bus | 00020468 70 61 72 69 74 79 20 65 |parity e| 00020470 72 72 6f 72 54 59 50 20 |rrorTYP | 00020478 62 6f 61 72 64 20 46 49 |board FI| 00020480 55 20 62 75 73 20 70 61 |U bus pa| 00020488 72 69 74 79 20 65 72 72 |rity err| 00020490 6f 72 54 59 50 20 62 6f |orTYP bo| 00020498 61 72 64 20 57 44 52 20 |ard WDR | 000204a0 70 61 72 69 74 79 20 65 |parity e| 000204a8 72 72 6f 72 20 20 20 20 |rror | 000204b0 53 45 51 20 62 6f 61 72 |SEQ boar| 000204b8 64 20 46 49 55 20 62 75 |d FIU bu| 000204c0 73 20 70 61 72 69 74 79 |s parity| 000204c8 20 65 72 72 6f 72 53 45 | errorSE| 000204d0 51 20 62 6f 61 72 64 20 |Q board | 000204d8 56 41 4c 20 62 75 73 20 |VAL bus | 000204e0 70 61 72 69 74 79 20 65 |parity e| 000204e8 72 72 6f 72 53 45 51 20 |rrorSEQ | 000204f0 62 6f 61 72 64 20 54 59 |board TY| 000204f8 50 20 62 75 73 20 70 61 |P bus pa| 00020500 72 69 74 79 20 65 72 72 |rity err| 00020508 6f 72 53 45 51 20 62 6f |orSEQ bo| 00020510 61 72 64 20 57 43 53 20 |ard WCS | 00020518 52 41 4d 20 70 61 72 69 |RAM pari| 00020520 74 79 20 65 72 72 6f 72 |ty error| 00020528 53 45 51 20 62 6f 61 72 |SEQ boar| 00020530 64 20 44 45 43 20 52 41 |d DEC RA| 00020538 4d 20 70 61 72 69 74 79 |M parity| 00020540 20 65 72 72 6f 72 4d 69 | errorMi| 00020548 63 72 6f 63 6f 64 65 20 |crocode | 00020550 48 41 4c 54 20 20 20 20 |HALT | 00020558 20 20 20 20 20 20 20 20 | | 00020560 20 20 20 20 | | .XXX[0x4] 00020564 46 49 55 20 |FIU | .XXX[0x4] 00020568 62 6f 61 72 64 20 46 49 |board FI| .XXX[0x250] 00020570 55 20 62 75 73 20 70 61 |U bus pa| 00020578 72 69 74 79 20 65 72 72 |rity err| 00020580 6f 72 46 49 55 20 62 6f |orFIU bo| 00020588 61 72 64 20 56 41 4c 20 |ard VAL | 00020590 62 75 73 20 70 61 72 69 |bus pari| 00020598 74 79 20 65 72 72 6f 72 |ty error| 000205a0 46 49 55 20 62 6f 61 72 |FIU boar| 000205a8 64 20 54 59 50 20 62 75 |d TYP bu| 000205b0 73 20 70 61 72 69 74 79 |s parity| 000205b8 20 65 72 72 6f 72 46 49 | errorFI| 000205c0 55 20 62 6f 61 72 64 20 |U board | 000205c8 41 44 52 20 62 75 73 20 |ADR bus | 000205d0 70 61 72 69 74 79 20 65 |parity e| 000205d8 72 72 6f 72 52 65 66 72 |rrorRefr| 000205e0 65 73 68 20 4d 61 63 68 |esh Mach| 000205e8 69 6e 65 20 43 68 65 63 |ine Chec| 000205f0 6b 20 65 72 72 6f 72 20 |k error | 000205f8 20 20 46 49 55 20 62 6f | FIU bo| 00020600 61 72 64 20 57 43 53 20 |ard WCS | 00020608 52 41 4d 20 70 61 72 69 |RAM pari| 00020610 74 79 20 65 72 72 6f 72 |ty error| 00020618 46 49 55 20 62 6f 61 72 |FIU boar| 00020620 64 20 75 41 44 44 52 20 |d uADDR | 00020628 70 61 72 69 74 79 20 65 |parity e| 00020630 72 72 6f 72 20 20 46 49 |rror FI| 00020638 55 20 62 6f 61 72 64 20 |U board | 00020640 53 43 41 56 52 41 4d 20 |SCAVRAM | 00020648 70 61 72 69 74 79 20 65 |parity e| 00020650 72 72 6f 72 4d 45 4d 30 |rrorMEM0| 00020658 20 54 61 67 73 74 6f 72 | Tagstor| 00020660 65 20 30 20 70 61 72 69 |e 0 pari| 00020668 74 79 20 65 72 72 6f 72 |ty error| 00020670 20 20 4d 45 4d 30 20 54 | MEM0 T| 00020678 61 67 73 74 6f 72 65 20 |agstore | 00020680 31 20 70 61 72 69 74 79 |1 parity| 00020688 20 65 72 72 6f 72 20 20 | error | 00020690 4d 45 4d 30 20 41 64 64 |MEM0 Add| 00020698 72 65 73 73 20 62 75 73 |ress bus| 000206a0 20 70 61 72 69 74 79 20 | parity | 000206a8 65 72 72 6f 72 20 4d 45 |error ME| 000206b0 4d 31 20 54 61 67 73 74 |M1 Tagst| 000206b8 6f 72 65 20 30 20 70 61 |ore 0 pa| 000206c0 72 69 74 79 20 65 72 72 |rity err| 000206c8 6f 72 20 20 4d 45 4d 31 |or MEM1| 000206d0 20 54 61 67 73 74 6f 72 | Tagstor| 000206d8 65 20 31 20 70 61 72 69 |e 1 pari| 000206e0 74 79 20 65 72 72 6f 72 |ty error| 000206e8 20 20 4d 45 4d 31 20 41 | MEM1 A| 000206f0 64 64 72 65 73 73 20 62 |ddress b| 000206f8 75 73 20 70 61 72 69 74 |us parit| 00020700 79 20 65 72 72 6f 72 20 |y error | 00020708 4d 45 4d 32 20 54 61 67 |MEM2 Tag| 00020710 73 74 6f 72 65 20 30 20 |store 0 | 00020718 70 61 72 69 74 79 20 65 |parity e| 00020720 72 72 6f 72 20 20 4d 45 |rror ME| 00020728 4d 32 20 54 61 67 73 74 |M2 Tagst| 00020730 6f 72 65 20 31 20 70 61 |ore 1 pa| 00020738 72 69 74 79 20 65 72 72 |rity err| 00020740 6f 72 20 20 4d 45 4d 32 |or MEM2| 00020748 20 41 64 64 72 65 73 73 | Address| 00020750 20 62 75 73 20 70 61 72 | bus par| 00020758 69 74 79 20 65 72 72 6f |ity erro| 00020760 72 20 4d 45 4d 33 20 54 |r MEM3 T| 00020768 61 67 73 74 6f 72 65 20 |agstore | 00020770 30 20 70 61 72 69 74 79 |0 parity| 00020778 20 65 72 72 6f 72 20 20 | error | 00020780 4d 45 4d 33 20 54 61 67 |MEM3 Tag| 00020788 73 74 6f 72 65 20 31 20 |store 1 | 00020790 70 61 72 69 74 79 20 65 |parity e| 00020798 72 72 6f 72 20 20 4d 45 |rror ME| 000207a0 4d 33 20 41 64 64 72 65 |M3 Addre| 000207a8 73 73 20 62 75 73 20 70 |ss bus p| 000207b0 61 72 69 74 79 20 65 72 |arity er| 000207b8 72 6f 72 20 |ror | .XXX[0x4] 000207bc 5f 5f |__ | .TXT '__' 000207be 20 20 75 61 64 64 72 20 | uaddr | .TXT ' uaddr trace:' 000207cc 20 5f | _ | .TXT ' _' 000207ce 3d 20 |= | .TXT '= ' 000207d0 23 20 |# | .TXT '# ' 000207d2 4c 41 53 54 5f 55 43 4f |LAST_UCO| .TXT 'LAST_UCODE' 000207dc 2e 20 |. | .TXT '. ' 000207de 2e 20 |. | .TXT '. ' 000207e0 20 20 2d 2d 75 63 6f 64 | --ucod| .TXT ' --ucode_' 000207ea 20 20 2a 2a 20 75 63 6f | ** uco| .TXT ' ** ucode version ?? ' 00020800 54 6f 6f 20 6d 61 6e 79 |Too many| .TXT 'Too many boards failed. ' 00020818 20 20 | | .TXT ' ' 0002081a 4d 45 |ME | .TXT 'ME' 0002081c 4d 30 |M0 | .TXT 'M0' 0002081e 20 20 | | .TXT ' ' 00020820 4d 45 |ME | .TXT 'ME' 00020822 4d 32 |M2 | .TXT 'M2' 00020824 3a 20 54 53 41 5f 53 54 |: TSA_ST| .TXT ': TSA_STORED_PAR= ' 00020836 2c 20 54 53 42 5f 53 54 |, TSB_ST| .TXT ', TSB_STORED_PAR= ' 00020848 20 20 20 20 20 20 20 20 | | .TXT ' TSA_EXPECT_PAR= ' 00020860 2c 20 54 53 42 5f 45 58 |, TSB_EX| .TXT ', TSB_EXPECT_PAR= ' 00020872 53 45 41 52 43 48 5f 52 |SEARCH_R| .TXT 'SEARCH_RF_ERRORS.VAL' 00020886 20 20 56 41 4c 20 | VAL | .TXT ' VAL ' 0002088c 53 45 41 52 43 48 5f 52 |SEARCH_R| .TXT 'SEARCH_RF_ERRORS.TYP' 000208a0 20 20 54 59 50 20 | TYP | .TXT ' TYP ' 000208a6 20 52 46 20 | RF | .TXT ' RF ' 000208aa 65 72 72 6f |erro | .TXT 'erro' 000208ae 72 20 40 5f |r @_ | .TXT 'r @_' 000208b2 3a 20 |: | .TXT ': ' 000208b4 41 52 |AR | .TXT 'AR' 000208b6 46 3d |F= | .TXT 'F=' 000208b8 2c 20 70 61 72 69 74 79 |, parity| .TXT ', parity ok ' 000208c4 2c 20 70 61 72 69 74 79 |, parity| .TXT ', parity BAD! ' 000208d2 20 20 20 20 20 20 20 20 | | .TXT ' BRF=' 000208ec 2c 20 70 61 72 69 74 79 |, parity| .TXT ', parity ok ' 000208f8 2c 20 70 61 72 69 74 79 |, parity| .TXT ', parity BAD! ' 00020906 20 68 61 64 20 61 6e 20 | had an | .TXT ' had an ARF or BRF parity error but its register files are OK ' 00020944 45 4d |EM | .TXT 'EM' 00020946 42 41 |BA | .TXT 'BA' 00020948 4c 4d |LM | .TXT 'LM' 0002094a 45 4d |EM | .TXT 'EM' 0002094c 57 43 |WC | .TXT 'WC' 0002094e 53 50 |SP | .TXT 'SP' 00020950 4d 45 4d 30 |MEM0 | .TXT 'MEM0' 00020954 54 59 50 20 62 6f 61 72 |TYP boar| .TXT 'TYP board drove TYP bus ' 0002096c 46 49 55 20 62 6f 61 72 |FIU boar| .TXT 'FIU board drove TYP bus ' 00020984 49 4f 43 20 62 6f 61 72 |IOC boar| .TXT 'IOC board drove TYP bus ' 0002099c 53 45 51 20 62 6f 61 72 |SEQ boar| .TXT 'SEQ board drove TYP bus ' 000209b4 20 52 44 52 20 6f 72 20 | RDR or | .TXT ' RDR or IOC drove TYP bus & IOC drove the parity' 000209e4 2a 2a 2a 20 69 6c 6c 65 |*** ille| .TXT '*** illegal TYP bus src field ' 00020a02 56 41 4c 20 62 6f 61 72 |VAL boar| .TXT 'VAL board drove VAL bus ' 00020a1a 46 49 55 20 62 6f 61 72 |FIU boar| .TXT 'FIU board drove VAL bus ' 00020a32 49 4f 43 20 62 6f 61 72 |IOC boar| .TXT 'IOC board drove VAL bus ' 00020a4a 53 45 51 20 62 6f 61 72 |SEQ boar| .TXT 'SEQ board drove VAL bus ' 00020a62 20 54 56 52 20 64 72 6f | TVR dro| .TXT ' TVR drove VAL bus' 00020a74 20 52 44 52 20 6f 72 20 | RDR or | .TXT ' RDR or IOC drove VAL bus & IOC drove the parity' 00020aa4 2a 2a 2a 20 69 6c 6c 65 |*** ille| .TXT '*** illegal VAL bus src field ' 00020ac2 46 49 55 20 62 6f 61 72 |FIU boar| .TXT 'FIU board drove FIU bus ' 00020ada 56 41 4c 20 62 6f 61 72 |VAL boar| .TXT 'VAL board drove FIU bus ' 00020af2 54 59 50 20 62 6f 61 72 |TYP boar| .TXT 'TYP board drove FIU bus ' 00020b0a 53 45 51 20 62 6f 61 72 |SEQ boar| .TXT 'SEQ board drove FIU bus ' 00020b22 46 49 55 20 62 6f 61 72 |FIU boar| .TXT 'FIU board drove FIU bus ' 00020b3a 56 41 4c 20 62 6f 61 72 |VAL boar| .TXT 'VAL board drove FIU bus ' 00020b52 54 59 50 20 62 6f 61 72 |TYP boar| .TXT 'TYP board drove FIU bus ' 00020b6a 53 45 51 20 62 6f 61 72 |SEQ boar| .TXT 'SEQ board drove FIU bus ' 00020b82 00 80 00 40 00 20 | @ | .XXX[0x6] 00020b88 00 10 00 08 00 04 00 02 | | .XXX[0x18] 00020b90 00 01 55 6e 6b 6e 6f 77 | Unknow| 00020b98 6e 20 65 72 72 6f 72 20 |n error | 00020ba0 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00020bb0 48 61 6c 74 20 20 20 20 |Halt | .XXX[0x8] 00020bb8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00020bc8 20 20 20 20 20 20 52 65 | Re| .XXX[0x420] 00020bd0 66 72 65 73 68 20 6d 61 |fresh ma| 00020bd8 63 68 69 6e 65 20 63 68 |chine ch| 00020be0 65 63 6b 20 20 20 20 20 |eck | 00020be8 20 20 20 20 4d 69 63 72 | Micr| 00020bf0 6f 61 64 64 72 65 73 73 |oaddress| 00020bf8 20 62 75 73 20 70 61 72 | bus par| 00020c00 69 74 79 20 20 20 20 20 |ity | 00020c08 20 20 57 43 53 20 52 41 | WCS RA| 00020c10 4d 20 70 61 72 69 74 79 |M parity| 00020c18 20 65 72 72 6f 72 20 20 | error | 00020c20 20 20 20 20 20 20 20 20 | | 00020c28 44 65 63 6f 64 65 20 52 |Decode R| 00020c30 41 4d 20 70 61 72 69 74 |AM parit| 00020c38 79 20 65 72 72 6f 72 20 |y error | 00020c40 20 20 20 20 20 20 53 63 | Sc| 00020c48 61 76 65 6e 67 65 72 20 |avenger | 00020c50 52 41 4d 20 70 61 72 69 |RAM pari| 00020c58 74 79 20 65 72 72 6f 72 |ty error| 00020c60 20 20 20 20 52 65 67 69 | Regi| 00020c68 73 74 65 72 20 46 69 6c |ster Fil| 00020c70 65 20 52 41 4d 20 70 61 |e RAM pa| 00020c78 72 69 74 79 20 65 72 72 |rity err| 00020c80 6f 72 46 6f 72 65 70 6c |orForepl| 00020c88 61 6e 65 20 62 75 73 20 |ane bus | 00020c90 70 61 72 69 74 79 20 65 |parity e| 00020c98 72 72 6f 72 20 20 20 20 |rror | 00020ca0 41 64 64 72 65 73 73 20 |Address | 00020ca8 62 75 73 20 70 61 72 69 |bus pari| 00020cb0 74 79 20 65 72 72 6f 72 |ty error| 00020cb8 20 20 20 20 20 20 54 61 | Ta| 00020cc0 67 73 74 6f 72 65 20 52 |gstore R| 00020cc8 41 4d 20 70 61 72 69 74 |AM parit| 00020cd0 79 20 65 72 72 6f 72 20 |y error | 00020cd8 20 20 20 20 57 44 52 2f | WDR/| 00020ce0 46 6f 72 65 70 6c 61 6e |Foreplan| 00020ce8 65 5f 62 75 73 20 65 72 |e_bus er| 00020cf0 72 6f 72 20 20 20 20 20 |ror | 00020cf8 20 20 49 4f 43 20 62 6f | IOC bo| 00020d00 61 72 64 20 75 41 44 44 |ard uADD| 00020d08 52 20 70 61 72 69 74 79 |R parity| 00020d10 20 65 72 72 6f 72 20 20 | error | 00020d18 04 03 49 4f 43 20 62 6f | IOC bo| 00020d20 61 72 64 20 57 43 53 20 |ard WCS | 00020d28 52 41 4d 20 70 61 72 69 |RAM pari| 00020d30 74 79 20 65 72 72 6f 72 |ty error| 00020d38 04 04 49 4f 43 20 62 6f | IOC bo| 00020d40 61 72 64 20 54 59 50 20 |ard TYP | 00020d48 62 75 73 20 70 61 72 69 |bus pari| 00020d50 74 79 20 65 72 72 6f 72 |ty error| 00020d58 04 08 49 4f 43 20 62 6f | IOC bo| 00020d60 61 72 64 20 56 41 4c 20 |ard VAL | 00020d68 62 75 73 20 70 61 72 69 |bus pari| 00020d70 74 79 20 65 72 72 6f 72 |ty error| 00020d78 04 08 56 41 4c 20 62 6f | VAL bo| 00020d80 61 72 64 20 75 41 44 44 |ard uADD| 00020d88 52 20 70 61 72 69 74 79 |R parity| 00020d90 20 65 72 72 6f 72 20 20 | error | 00020d98 07 03 56 41 4c 20 62 6f | VAL bo| 00020da0 61 72 64 20 57 43 53 20 |ard WCS | 00020da8 52 41 4d 20 70 61 72 69 |RAM pari| 00020db0 74 79 20 65 72 72 6f 72 |ty error| 00020db8 07 04 56 41 4c 20 62 6f | VAL bo| 00020dc0 61 72 64 20 41 52 46 20 |ard ARF | 00020dc8 52 41 4d 20 70 61 72 69 |RAM pari| 00020dd0 74 79 20 65 72 72 6f 72 |ty error| 00020dd8 07 07 56 41 4c 20 62 6f | VAL bo| 00020de0 61 72 64 20 42 52 46 20 |ard BRF | 00020de8 52 41 4d 20 70 61 72 69 |RAM pari| 00020df0 74 79 20 65 72 72 6f 72 |ty error| 00020df8 07 07 56 41 4c 20 62 6f | VAL bo| 00020e00 61 72 64 20 56 41 4c 20 |ard VAL | 00020e08 62 75 73 20 70 61 72 69 |bus pari| 00020e10 74 79 20 65 72 72 6f 72 |ty error| 00020e18 07 08 56 41 4c 20 62 6f | VAL bo| 00020e20 61 72 64 20 46 49 55 20 |ard FIU | 00020e28 62 75 73 20 70 61 72 69 |bus pari| 00020e30 74 79 20 65 72 72 6f 72 |ty error| 00020e38 07 08 56 41 4c 20 62 6f | VAL bo| 00020e40 61 72 64 20 57 44 52 20 |ard WDR | 00020e48 70 61 72 69 74 79 20 65 |parity e| 00020e50 72 72 6f 72 20 20 20 20 |rror | 00020e58 07 0b 54 59 50 20 62 6f | TYP bo| 00020e60 61 72 64 20 75 41 44 44 |ard uADD| 00020e68 52 20 70 61 72 69 74 79 |R parity| 00020e70 20 65 72 72 6f 72 20 20 | error | 00020e78 06 03 54 59 50 20 62 6f | TYP bo| 00020e80 61 72 64 20 57 43 53 20 |ard WCS | 00020e88 52 41 4d 20 70 61 72 69 |RAM pari| 00020e90 74 79 20 65 72 72 6f 72 |ty error| 00020e98 06 04 54 59 50 20 62 6f | TYP bo| 00020ea0 61 72 64 20 41 52 46 20 |ard ARF | 00020ea8 52 41 4d 20 70 61 72 69 |RAM pari| 00020eb0 74 79 20 65 72 72 6f 72 |ty error| 00020eb8 06 07 54 59 50 20 62 6f | TYP bo| 00020ec0 61 72 64 20 42 52 46 20 |ard BRF | 00020ec8 52 41 4d 20 70 61 72 69 |RAM pari| 00020ed0 74 79 20 65 72 72 6f 72 |ty error| 00020ed8 06 07 54 59 50 20 62 6f | TYP bo| 00020ee0 61 72 64 20 54 59 50 20 |ard TYP | 00020ee8 62 75 73 20 70 61 72 69 |bus pari| 00020ef0 74 79 20 65 72 72 6f 72 |ty error| 00020ef8 06 08 54 59 50 20 62 6f | TYP bo| 00020f00 61 72 64 20 46 49 55 20 |ard FIU | 00020f08 62 75 73 20 70 61 72 69 |bus pari| 00020f10 74 79 20 65 72 72 6f 72 |ty error| 00020f18 06 08 54 59 50 20 62 6f | TYP bo| 00020f20 61 72 64 20 57 44 52 20 |ard WDR | 00020f28 70 61 72 69 74 79 20 65 |parity e| 00020f30 72 72 6f 72 20 20 20 20 |rror | 00020f38 06 0b 53 45 51 20 62 6f | SEQ bo| 00020f40 61 72 64 20 46 49 55 20 |ard FIU | 00020f48 62 75 73 20 70 61 72 69 |bus pari| 00020f50 74 79 20 65 72 72 6f 72 |ty error| 00020f58 02 08 53 45 51 20 62 6f | SEQ bo| 00020f60 61 72 64 20 56 41 4c 20 |ard VAL | 00020f68 62 75 73 20 70 61 72 69 |bus pari| 00020f70 74 79 20 65 72 72 6f 72 |ty error| 00020f78 02 08 53 45 51 20 62 6f | SEQ bo| 00020f80 61 72 64 20 54 59 50 20 |ard TYP | 00020f88 62 75 73 20 70 61 72 69 |bus pari| 00020f90 74 79 20 65 72 72 6f 72 |ty error| 00020f98 02 08 53 45 51 20 62 6f | SEQ bo| 00020fa0 61 72 64 20 57 43 53 20 |ard WCS | 00020fa8 52 41 4d 20 70 61 72 69 |RAM pari| 00020fb0 74 79 20 65 72 72 6f 72 |ty error| 00020fb8 02 04 53 45 51 20 62 6f | SEQ bo| 00020fc0 61 72 64 20 44 45 43 20 |ard DEC | 00020fc8 52 41 4d 20 70 61 72 69 |RAM pari| 00020fd0 74 79 20 65 72 72 6f 72 |ty error| 00020fd8 02 05 4d 69 63 72 6f 63 | Microc| 00020fe0 6f 64 65 20 48 41 4c 54 |ode HALT| 00020fe8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00020ff8 02 01 46 49 55 20 62 6f | FIU bo| .XXX[0x280] 00021000 61 72 64 20 46 49 55 20 |ard FIU | 00021008 62 75 73 20 70 61 72 69 |bus pari| 00021010 74 79 20 65 72 72 6f 72 |ty error| 00021018 03 08 46 49 55 20 62 6f | FIU bo| 00021020 61 72 64 20 56 41 4c 20 |ard VAL | 00021028 62 75 73 20 70 61 72 69 |bus pari| 00021030 74 79 20 65 72 72 6f 72 |ty error| 00021038 03 08 46 49 55 20 62 6f | FIU bo| 00021040 61 72 64 20 54 59 50 20 |ard TYP | 00021048 62 75 73 20 70 61 72 69 |bus pari| 00021050 74 79 20 65 72 72 6f 72 |ty error| 00021058 03 08 46 49 55 20 62 6f | FIU bo| 00021060 61 72 64 20 41 44 52 20 |ard ADR | 00021068 62 75 73 20 70 61 72 69 |bus pari| 00021070 74 79 20 65 72 72 6f 72 |ty error| 00021078 03 09 52 65 66 72 65 73 | Refres| 00021080 68 20 4d 61 63 68 69 6e |h Machin| 00021088 65 20 43 68 65 63 6b 20 |e Check | 00021090 65 72 72 6f 72 20 20 20 |error | 00021098 03 02 46 49 55 20 62 6f | FIU bo| 000210a0 61 72 64 20 57 43 53 20 |ard WCS | 000210a8 52 41 4d 20 70 61 72 69 |RAM pari| 000210b0 74 79 20 65 72 72 6f 72 |ty error| 000210b8 03 04 46 49 55 20 62 6f | FIU bo| 000210c0 61 72 64 20 75 41 44 44 |ard uADD| 000210c8 52 20 70 61 72 69 74 79 |R parity| 000210d0 20 65 72 72 6f 72 20 20 | error | 000210d8 03 03 46 49 55 20 62 6f | FIU bo| 000210e0 61 72 64 20 53 43 41 56 |ard SCAV| 000210e8 52 41 4d 20 70 61 72 69 |RAM pari| 000210f0 74 79 20 65 72 72 6f 72 |ty error| 000210f8 03 06 4d 45 4d 30 20 54 | MEM0 T| 00021100 61 67 73 74 6f 72 65 20 |agstore | 00021108 30 20 70 61 72 69 74 79 |0 parity| 00021110 20 65 72 72 6f 72 20 20 | error | 00021118 0c 0a 4d 45 4d 30 20 54 | MEM0 T| 00021120 61 67 73 74 6f 72 65 20 |agstore | 00021128 31 20 70 61 72 69 74 79 |1 parity| 00021130 20 65 72 72 6f 72 20 20 | error | 00021138 0c 0a 4d 45 4d 30 20 41 | MEM0 A| 00021140 64 64 72 65 73 73 20 62 |ddress b| 00021148 75 73 20 70 61 72 69 74 |us parit| 00021150 79 20 65 72 72 6f 72 20 |y error | 00021158 0c 09 4d 45 4d 31 20 54 | MEM1 T| 00021160 61 67 73 74 6f 72 65 20 |agstore | 00021168 30 20 70 61 72 69 74 79 |0 parity| 00021170 20 65 72 72 6f 72 20 20 | error | 00021178 0d 0a 4d 45 4d 31 20 54 | MEM1 T| 00021180 61 67 73 74 6f 72 65 20 |agstore | 00021188 31 20 70 61 72 69 74 79 |1 parity| 00021190 20 65 72 72 6f 72 20 20 | error | 00021198 0d 0a 4d 45 4d 31 20 41 | MEM1 A| 000211a0 64 64 72 65 73 73 20 62 |ddress b| 000211a8 75 73 20 70 61 72 69 74 |us parit| 000211b0 79 20 65 72 72 6f 72 20 |y error | 000211b8 0d 09 4d 45 4d 32 20 54 | MEM2 T| 000211c0 61 67 73 74 6f 72 65 20 |agstore | 000211c8 30 20 70 61 72 69 74 79 |0 parity| 000211d0 20 65 72 72 6f 72 20 20 | error | 000211d8 0e 0a 4d 45 4d 32 20 54 | MEM2 T| 000211e0 61 67 73 74 6f 72 65 20 |agstore | 000211e8 31 20 70 61 72 69 74 79 |1 parity| 000211f0 20 65 72 72 6f 72 20 20 | error | 000211f8 0e 0a 4d 45 4d 32 20 41 | MEM2 A| 00021200 64 64 72 65 73 73 20 62 |ddress b| 00021208 75 73 20 70 61 72 69 74 |us parit| 00021210 79 20 65 72 72 6f 72 20 |y error | 00021218 0e 09 4d 45 4d 33 20 54 | MEM3 T| 00021220 61 67 73 74 6f 72 65 20 |agstore | 00021228 30 20 70 61 72 69 74 79 |0 parity| 00021230 20 65 72 72 6f 72 20 20 | error | 00021238 0f 0a 4d 45 4d 33 20 54 | MEM3 T| 00021240 61 67 73 74 6f 72 65 20 |agstore | 00021248 31 20 70 61 72 69 74 79 |1 parity| 00021250 20 65 72 72 6f 72 20 20 | error | 00021258 0f 0a 4d 45 4d 33 20 41 | MEM3 A| 00021260 64 64 72 65 73 73 20 62 |ddress b| 00021268 75 73 20 70 61 72 69 74 |us parit| 00021270 79 20 65 72 72 6f 72 20 |y error | 00021278 0f 09 | | .XXX[0x2] 0002127a ; -------------------------------------------------------------------------------------- 0002127a ; OMSI PASCAL Function 0002127a ; <LVAR 0x010 1(r)> 0002127a ; <LVAR 0x00c 4(r)> 0002127a ; <LVAR 0x00a 1(r)> 0002127a ; <LVAR 0x008 1(r)> 0002127a ; -------------------------------------------------------------------------------------- 0002127a 4e 56 ff ba |NV | LINK.W A6,#0xffba 0002127e bf d5 | | CMPA.L (A5),A7 00021280 62 06 |b | BHI 0x21288 00021282 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021286 4e 76 |Nv | TRAPV 00021288 de fc 00 44 | D | ADDA.W #0x44,A7 0002128c 48 e7 f0 80 |H | MOVEM.L A0+D3+D2+D1+D0,-(A7) 00021290 76 01 |v | MOVEQ.L #0x01,D3 00021292 70 00 |p | MOVEQ.L #0x00,D0 00021294 22 2e 00 0c |". | MOVE.L (A6+0xc),D1 00021298 0c 81 00 00 00 07 | | CMPI.L #0x00000007,D1 0002129e 63 02 |c | BLS 0x212a2 000212a0 4e 4f |NO | TRAP #15 000212a2 e3 81 | | ASL.L #0x1,D1 000212a4 41 fa f8 dc |A | LEA.L 0x20b82,A0 000212a8 42 82 |B | CLR.L D2 000212aa 14 2e 00 10 | . | MOVE.B (A6+0x10),D2 000212ae c4 70 18 00 | p | AND.W (A0+D1.L),D2 000212b2 67 02 |g | BEQ 0x212b6 000212b4 52 00 |R | ADDQ.B #0x1,D0 000212b6 b0 2e 00 0a | . | CMP.B (A6+0xa),D0 000212ba 66 5e |f^ | BNE 0x2131a 000212bc 20 6c 00 28 | l ( | MOVEA.L (A4+0x28),A0 000212c0 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000212c4 48 80 |H | EXTB.W D0 000212c6 11 83 00 00 | | MOVE.B D3,(A0+D0.W) 000212ca 3f 3a f4 f0 |?: | MOVE.W 0x207bc,-(A7) 000212ce 59 4f |YO | SUBQ.L #0x4,A7 000212d0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000212d4 3f 03 |? | MOVE.W D3,-(A7) 000212d6 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 000212da 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000212e0 50 4f |PO | ADDQ.L #0x8,A7 000212e2 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000212e8 5c 4f |\O | ADDQ.L #0x6,A7 000212ea eb 40 | @ | ASL.W #0x5,D0 000212ec 41 fa fa 0c |A | LEA.L 0x20cfa,A0 000212f0 41 f0 00 1e |A | LEA.L (A0+D0.W+#0x1e),A0 000212f4 70 0e |p | MOVEQ.L #0x0e,D0 000212f6 3f 20 |? | MOVE.W -(A0),-(A7) 000212f8 51 c8 ff fc |Q | DBF D0,0x212f6 000212fc 59 4f |YO | SUBQ.L #0x4,A7 000212fe 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021302 3f 03 |? | MOVE.W D3,-(A7) 00021304 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00021308 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002130e 50 4f |PO | ADDQ.L #0x8,A7 00021310 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021316 de fc 00 22 | " | ADDA.W #0x22,A7 0002131a 4c df 01 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0 0002131e 4e 5e |N^ | UNLK A6 00021320 4e 75 |Nu | RTS 00021322 ; -------------------------------------------------------------------------------------- 00021322 ; OMSI PASCAL Function 00021322 ; <LVAR -0x002 @ 1(r)> 00021322 ; <LVAR -0x003 @> 00021322 ; <LVAR -0x005 @ 1(r)> 00021322 ; <LVAR -0x006 @ 1(r)> 00021322 ; <LVAR -0x007 @ 1(r)> 00021322 ; <LVAR -0x009 1(r)> 00021322 ; <LVAR -0x00d @> 00021322 ; <LVAR -0x012 1(r)> 00021322 ; <LVAR -0x013 @ 1(r)> 00021322 ; <LVAR -0x014 1(r)> 00021322 ; <LVAR -0x018 @> 00021322 ; <LVAR -0x01c 1(r)> 00021322 ; <LVAR -0x01d @ 1(r)> 00021322 ; <LVAR -0x01e 1(rw)> 00021322 ; <LVAR -0x01f 1(rw)> 00021322 ; <LVAR -0x020 @ 1(rw)> 00021322 ; -------------------------------------------------------------------------------------- 00021322 4e 56 ff 9a |NV | LINK.W A6,#0xff9a 00021326 bf d5 | | CMPA.L (A5),A7 00021328 62 06 |b | BHI 0x21330 0002132a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002132e 4e 76 |Nv | TRAPV 00021330 de fc 00 46 | F | ADDA.W #0x46,A7 00021334 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021338 41 ee ff e0 |A | LEA.L (A6-0x20),A0 0002133c 43 fa ff 3c |C < | LEA.L 0x2127a,A1 00021340 45 f8 00 07 |E | LEA.L 0x7,A2 00021344 47 ee ff e1 |G | LEA.L (A6-0x1f),A3 00021348 74 01 |t | MOVEQ.L #0x01,D2 0002134a 76 0a |v | MOVEQ.L #0x0a,D3 0002134c 78 0c |x | MOVEQ.L #0x0c,D4 0002134e 7a 02 |z | MOVEQ.L #0x02,D5 00021350 7c 03 || | MOVEQ.L #0x03,D6 00021352 7e 00 |~ | MOVEQ.L #0x00,D7 00021354 30 39 00 02 30 58 |09 0X | MOVE.W 0x23058,D0 0002135a 02 40 40 00 | @@ | ANDI.W #0x4000,D0 0002135e 67 02 |g | BEQ 0x21362 00021360 52 07 |R | ADDQ.B #0x1,D7 00021362 30 39 00 02 30 5a |09 0Z | MOVE.W 0x2305a,D0 00021368 02 40 3f 00 | @? | ANDI.W #0x3f00,D0 0002136c e0 48 | H | LSR.W #0x8,D0 0002136e 16 80 | | MOVE.B D0,(A3) 00021370 30 39 00 02 30 5a |09 0Z | MOVE.W 0x2305a,D0 00021376 02 40 00 ff | @ | ANDI.W #0x00ff,D0 0002137a 1d 40 ff e2 | @ | MOVE.B D0,(A6-0x1e) 0002137e 55 4f |UO | SUBQ.L #0x2,A7 00021380 1e 93 | | MOVE.B (A3),(A7) 00021382 1f 6e ff e2 00 01 | n | MOVE.B (A6-0x1e),(A7+0x1) 00021388 42 27 |B' | CLR.B -(A7) 0002138a 48 6e ff ed |Hn | PEA.L (A6-0x13) 0002138e 48 6e ff fd |Hn | PEA.L (A6-0x3) 00021392 4e b9 00 02 2a 4e |N *N | JSR exp_READ_WCS.TYP(Sw_2, Sw_1, &Sr_6, &Fr) 00021398 de c3 | | ADDA.W D3,A7 0002139a 1e 93 | | MOVE.B (A3),(A7) 0002139c 1f 6e ff e2 00 01 | n | MOVE.B (A6-0x1e),(A7+0x1) 000213a2 42 27 |B' | CLR.B -(A7) 000213a4 48 6e ff e3 |Hn | PEA.L (A6-0x1d) 000213a8 48 6e ff fd |Hn | PEA.L (A6-0x3) 000213ac 4e b9 00 02 2a 8a |N * | JSR exp_READ_WCS.VAL(Sw_2, Sw_1, &Sr_5, &Fr) 000213b2 de c3 | | ADDA.W D3,A7 000213b4 1e 93 | | MOVE.B (A3),(A7) 000213b6 1f 6e ff e2 00 01 | n | MOVE.B (A6-0x1e),(A7+0x1) 000213bc 42 27 |B' | CLR.B -(A7) 000213be 48 79 00 02 30 d8 |Hy 0 | PEA.L 0x230d8 000213c4 48 6e ff fd |Hn | PEA.L (A6-0x3) 000213c8 4e b9 00 02 2d 90 |N - | JSR exp_READ_WCS.IOC(Sw_2, Sw_1, &Sr_2, &Fr) 000213ce de c4 | | ADDA.W D4,A7 000213d0 30 39 00 02 30 5c |09 0\ | MOVE.W 0x2305c,D0 000213d6 02 40 3f 00 | @? | ANDI.W #0x3f00,D0 000213da e0 48 | H | LSR.W #0x8,D0 000213dc 16 80 | | MOVE.B D0,(A3) 000213de 30 39 00 02 30 5c |09 0\ | MOVE.W 0x2305c,D0 000213e4 02 40 00 ff | @ | ANDI.W #0x00ff,D0 000213e8 1d 40 ff e2 | @ | MOVE.B D0,(A6-0x1e) 000213ec 55 4f |UO | SUBQ.L #0x2,A7 000213ee 1e 93 | | MOVE.B (A3),(A7) 000213f0 1f 6e ff e2 00 01 | n | MOVE.B (A6-0x1e),(A7+0x1) 000213f6 42 27 |B' | CLR.B -(A7) 000213f8 48 6e ff f3 |Hn | PEA.L (A6-0xd) 000213fc 48 6e ff fd |Hn | PEA.L (A6-0x3) 00021400 4e b9 00 02 2a 4e |N *N | JSR exp_READ_WCS.TYP(Sw_2, Sw_1, &Sr_6, &Fr) 00021406 de c3 | | ADDA.W D3,A7 00021408 1e 93 | | MOVE.B (A3),(A7) 0002140a 1f 6e ff e2 00 01 | n | MOVE.B (A6-0x1e),(A7+0x1) 00021410 42 27 |B' | CLR.B -(A7) 00021412 48 6e ff e8 |Hn | PEA.L (A6-0x18) 00021416 48 6e ff fd |Hn | PEA.L (A6-0x3) 0002141a 4e b9 00 02 2a 8a |N * | JSR exp_READ_WCS.VAL(Sw_2, Sw_1, &Sr_5, &Fr) 00021420 de c3 | | ADDA.W D3,A7 00021422 1e 93 | | MOVE.B (A3),(A7) 00021424 1f 6e ff e2 00 01 | n | MOVE.B (A6-0x1e),(A7+0x1) 0002142a 42 27 |B' | CLR.B -(A7) 0002142c 48 79 00 02 30 da |Hy 0 | PEA.L 0x230da 00021432 48 6e ff fd |Hn | PEA.L (A6-0x3) 00021436 4e b9 00 02 2d 90 |N - | JSR exp_READ_WCS.IOC(Sw_2, Sw_1, &Sr_2, &Fr) 0002143c de c3 | | ADDA.W D3,A7 0002143e 42 17 |B | CLR.B (A7) 00021440 48 50 |HP | PEA.L (A0) 00021442 4e b9 00 02 2e 06 |N . | JSR exp_READ_PAREG.IOC(Sw_1, &Sr_1) 00021448 58 4f |XO | ADDQ.L #0x4,A7 0002144a 1e 90 | | MOVE.B (A0),(A7) 0002144c 48 78 00 04 |Hx | PEA.L 0x4 00021450 42 27 |B' | CLR.B -(A7) 00021452 1f 05 | | MOVE.B D5,-(A7) 00021454 28 48 |(H | MOVEA.L A0,A4 00021456 4e 91 |N | JSR (A1) 00021458 50 4f |PO | ADDQ.L #0x8,A7 0002145a 1e 90 | | MOVE.B (A0),(A7) 0002145c 48 78 00 05 |Hx | PEA.L 0x5 00021460 42 27 |B' | CLR.B -(A7) 00021462 1f 06 | | MOVE.B D6,-(A7) 00021464 28 48 |(H | MOVEA.L A0,A4 00021466 4e 91 |N | JSR (A1) 00021468 50 4f |PO | ADDQ.L #0x8,A7 0002146a 1e 90 | | MOVE.B (A0),(A7) 0002146c 48 78 00 06 |Hx | PEA.L 0x6 00021470 42 27 |B' | CLR.B -(A7) 00021472 1f 02 | | MOVE.B D2,-(A7) 00021474 28 48 |(H | MOVEA.L A0,A4 00021476 4e 91 |N | JSR (A1) 00021478 50 4f |PO | ADDQ.L #0x8,A7 0002147a 1e 90 | | MOVE.B (A0),(A7) 0002147c 48 52 |HR | PEA.L (A2) 0002147e 42 27 |B' | CLR.B -(A7) 00021480 42 27 |B' | CLR.B -(A7) 00021482 28 48 |(H | MOVEA.L A0,A4 00021484 4e 91 |N | JSR (A1) 00021486 de c3 | | ADDA.W D3,A7 00021488 48 50 |HP | PEA.L (A0) 0002148a 4e b9 00 02 2a a8 |N * | JSR exp_READ_PARITY.VAL(&Sr_1) 00021490 54 4f |TO | ADDQ.L #0x2,A7 00021492 1e 90 | | MOVE.B (A0),(A7) 00021494 48 78 00 00 |Hx | PEA.L 0x0 00021498 42 27 |B' | CLR.B -(A7) 0002149a 1f 3c 00 04 | < | MOVE.B #0x04,-(A7) 0002149e 28 48 |(H | MOVEA.L A0,A4 000214a0 4e 91 |N | JSR (A1) 000214a2 50 4f |PO | ADDQ.L #0x8,A7 000214a4 1e 90 | | MOVE.B (A0),(A7) 000214a6 48 78 00 01 |Hx | PEA.L 0x1 000214aa 42 27 |B' | CLR.B -(A7) 000214ac 1f 3c 00 05 | < | MOVE.B #0x05,-(A7) 000214b0 28 48 |(H | MOVEA.L A0,A4 000214b2 4e 91 |N | JSR (A1) 000214b4 50 4f |PO | ADDQ.L #0x8,A7 000214b6 1e 90 | | MOVE.B (A0),(A7) 000214b8 48 78 00 03 |Hx | PEA.L 0x3 000214bc 42 27 |B' | CLR.B -(A7) 000214be 1f 3c 00 06 | < | MOVE.B #0x06,-(A7) 000214c2 28 48 |(H | MOVEA.L A0,A4 000214c4 4e 91 |N | JSR (A1) 000214c6 de c3 | | ADDA.W D3,A7 000214c8 42 80 |B | CLR.L D0 000214ca 10 2e ff e3 | . | MOVE.B (A6-0x1d),D0 000214ce c0 46 | F | AND.W D6,D0 000214d0 b0 42 | B | CMP.W D2,D0 000214d2 66 22 |f" | BNE 0x214f6 000214d4 42 80 |B | CLR.L D0 000214d6 10 2e ff e4 | . | MOVE.B (A6-0x1c),D0 000214da 02 40 00 f0 | @ | ANDI.W #0x00f0,D0 000214de 0c 40 00 60 | @ ` | CMPI.W #0x0060,D0 000214e2 66 12 |f | BNE 0x214f6 000214e4 4a 07 |J | TST.B D7 000214e6 66 0e |f | BNE 0x214f6 000214e8 1f 10 | | MOVE.B (A0),-(A7) 000214ea 48 78 00 02 |Hx | PEA.L 0x2 000214ee 42 27 |B' | CLR.B -(A7) 000214f0 1f 3c 00 08 | < | MOVE.B #0x08,-(A7) 000214f4 60 0c |` | BRA 0x21502 000214f6 1f 10 | | MOVE.B (A0),-(A7) 000214f8 48 78 00 02 |Hx | PEA.L 0x2 000214fc 42 27 |B' | CLR.B -(A7) 000214fe 1f 3c 00 07 | < | MOVE.B #0x07,-(A7) 00021502 28 48 |(H | MOVEA.L A0,A4 00021504 4e 91 |N | JSR (A1) 00021506 de c3 | | ADDA.W D3,A7 00021508 42 80 |B | CLR.L D0 0002150a 10 10 | | MOVE.B (A0),D0 0002150c 32 00 |2 | MOVE.W D0,D1 0002150e 02 41 00 04 | A | ANDI.W #0x0004,D1 00021512 67 28 |g( | BEQ 0x2153c 00021514 42 81 |B | CLR.L D1 00021516 12 2e ff ec | . | MOVE.B (A6-0x14),D1 0002151a c2 45 | E | AND.W D5,D1 0002151c 66 0e |f | BNE 0x2152c 0002151e 1f 00 | | MOVE.B D0,-(A7) 00021520 48 78 00 04 |Hx | PEA.L 0x4 00021524 1f 02 | | MOVE.B D2,-(A7) 00021526 1f 3c 00 09 | < | MOVE.B #0x09,-(A7) 0002152a 60 0a |` | BRA 0x21536 0002152c 1f 00 | | MOVE.B D0,-(A7) 0002152e 48 78 00 04 |Hx | PEA.L 0x4 00021532 1f 02 | | MOVE.B D2,-(A7) 00021534 1f 03 | | MOVE.B D3,-(A7) 00021536 28 48 |(H | MOVEA.L A0,A4 00021538 4e 91 |N | JSR (A1) 0002153a de c3 | | ADDA.W D3,A7 0002153c 48 50 |HP | PEA.L (A0) 0002153e 4e b9 00 02 2a 6c |N *l | JSR exp_READ_PARITY.TYP(&Sr_1) 00021544 54 4f |TO | ADDQ.L #0x2,A7 00021546 1e 90 | | MOVE.B (A0),(A7) 00021548 48 78 00 00 |Hx | PEA.L 0x0 0002154c 42 27 |B' | CLR.B -(A7) 0002154e 1f 3c 00 0b | < | MOVE.B #0x0b,-(A7) 00021552 28 48 |(H | MOVEA.L A0,A4 00021554 4e 91 |N | JSR (A1) 00021556 50 4f |PO | ADDQ.L #0x8,A7 00021558 1e 90 | | MOVE.B (A0),(A7) 0002155a 48 78 00 01 |Hx | PEA.L 0x1 0002155e 42 27 |B' | CLR.B -(A7) 00021560 1f 04 | | MOVE.B D4,-(A7) 00021562 28 48 |(H | MOVEA.L A0,A4 00021564 4e 91 |N | JSR (A1) 00021566 50 4f |PO | ADDQ.L #0x8,A7 00021568 1e 90 | | MOVE.B (A0),(A7) 0002156a 48 78 00 03 |Hx | PEA.L 0x3 0002156e 42 27 |B' | CLR.B -(A7) 00021570 1f 3c 00 0d | < | MOVE.B #0x0d,-(A7) 00021574 28 48 |(H | MOVEA.L A0,A4 00021576 4e 91 |N | JSR (A1) 00021578 de c3 | | ADDA.W D3,A7 0002157a 42 80 |B | CLR.L D0 0002157c 10 2e ff ed | . | MOVE.B (A6-0x13),D0 00021580 c0 46 | F | AND.W D6,D0 00021582 b0 42 | B | CMP.W D2,D0 00021584 66 22 |f" | BNE 0x215a8 00021586 42 80 |B | CLR.L D0 00021588 10 2e ff ee | . | MOVE.B (A6-0x12),D0 0002158c 02 40 00 f0 | @ | ANDI.W #0x00f0,D0 00021590 0c 40 00 60 | @ ` | CMPI.W #0x0060,D0 00021594 66 12 |f | BNE 0x215a8 00021596 4a 07 |J | TST.B D7 00021598 66 0e |f | BNE 0x215a8 0002159a 1f 10 | | MOVE.B (A0),-(A7) 0002159c 48 78 00 02 |Hx | PEA.L 0x2 000215a0 42 27 |B' | CLR.B -(A7) 000215a2 1f 3c 00 0f | < | MOVE.B #0x0f,-(A7) 000215a6 60 0c |` | BRA 0x215b4 000215a8 1f 10 | | MOVE.B (A0),-(A7) 000215aa 48 78 00 02 |Hx | PEA.L 0x2 000215ae 42 27 |B' | CLR.B -(A7) 000215b0 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 000215b4 28 48 |(H | MOVEA.L A0,A4 000215b6 4e 91 |N | JSR (A1) 000215b8 de c3 | | ADDA.W D3,A7 000215ba 42 80 |B | CLR.L D0 000215bc 10 10 | | MOVE.B (A0),D0 000215be 32 00 |2 | MOVE.W D0,D1 000215c0 c2 45 | E | AND.W D5,D1 000215c2 67 2a |g* | BEQ 0x215ee 000215c4 42 81 |B | CLR.L D1 000215c6 12 2e ff f7 | . | MOVE.B (A6-0x9),D1 000215ca c2 42 | B | AND.W D2,D1 000215cc 66 0e |f | BNE 0x215dc 000215ce 1f 00 | | MOVE.B D0,-(A7) 000215d0 48 78 00 05 |Hx | PEA.L 0x5 000215d4 1f 02 | | MOVE.B D2,-(A7) 000215d6 1f 3c 00 10 | < | MOVE.B #0x10,-(A7) 000215da 60 0c |` | BRA 0x215e8 000215dc 1f 00 | | MOVE.B D0,-(A7) 000215de 48 78 00 05 |Hx | PEA.L 0x5 000215e2 1f 02 | | MOVE.B D2,-(A7) 000215e4 1f 3c 00 11 | < | MOVE.B #0x11,-(A7) 000215e8 28 48 |(H | MOVEA.L A0,A4 000215ea 4e 91 |N | JSR (A1) 000215ec de c3 | | ADDA.W D3,A7 000215ee 48 50 |HP | PEA.L (A0) 000215f0 4e b9 00 02 2a 2c |N *, | JSR exp_GET_MISC_ERRORS.SEQ(&Sr_1) 000215f6 54 4f |TO | ADDQ.L #0x2,A7 000215f8 1e 90 | | MOVE.B (A0),(A7) 000215fa 48 78 00 03 |Hx | PEA.L 0x3 000215fe 42 27 |B' | CLR.B -(A7) 00021600 1f 3c 00 12 | < | MOVE.B #0x12,-(A7) 00021604 28 48 |(H | MOVEA.L A0,A4 00021606 4e 91 |N | JSR (A1) 00021608 50 4f |PO | ADDQ.L #0x8,A7 0002160a 1e 90 | | MOVE.B (A0),(A7) 0002160c 48 78 00 04 |Hx | PEA.L 0x4 00021610 42 27 |B' | CLR.B -(A7) 00021612 1f 3c 00 13 | < | MOVE.B #0x13,-(A7) 00021616 28 48 |(H | MOVEA.L A0,A4 00021618 4e 91 |N | JSR (A1) 0002161a 50 4f |PO | ADDQ.L #0x8,A7 0002161c 1e 90 | | MOVE.B (A0),(A7) 0002161e 48 78 00 05 |Hx | PEA.L 0x5 00021622 42 27 |B' | CLR.B -(A7) 00021624 1f 3c 00 14 | < | MOVE.B #0x14,-(A7) 00021628 28 48 |(H | MOVEA.L A0,A4 0002162a 4e 91 |N | JSR (A1) 0002162c 50 4f |PO | ADDQ.L #0x8,A7 0002162e 1e 90 | | MOVE.B (A0),(A7) 00021630 48 78 00 06 |Hx | PEA.L 0x6 00021634 42 27 |B' | CLR.B -(A7) 00021636 1f 3c 00 15 | < | MOVE.B #0x15,-(A7) 0002163a 28 48 |(H | MOVEA.L A0,A4 0002163c 4e 91 |N | JSR (A1) 0002163e 50 4f |PO | ADDQ.L #0x8,A7 00021640 1e 90 | | MOVE.B (A0),(A7) 00021642 48 52 |HR | PEA.L (A2) 00021644 42 27 |B' | CLR.B -(A7) 00021646 1f 3c 00 16 | < | MOVE.B #0x16,-(A7) 0002164a 28 48 |(H | MOVEA.L A0,A4 0002164c 4e 91 |N | JSR (A1) 0002164e de c3 | | ADDA.W D3,A7 00021650 48 6e ff fe |Hn | PEA.L (A6-0x2) 00021654 4e b9 00 02 2a 16 |N * | JSR exp_HALT.SEQ(&Fr) 0002165a 58 4f |XO | ADDQ.L #0x4,A7 0002165c 10 ae ff fe | | MOVE.B (A6-0x2),(A0) 00021660 1f 10 | | MOVE.B (A0),-(A7) 00021662 48 52 |HR | PEA.L (A2) 00021664 1f 02 | | MOVE.B D2,-(A7) 00021666 1f 3c 00 17 | < | MOVE.B #0x17,-(A7) 0002166a 28 48 |(H | MOVEA.L A0,A4 0002166c 4e 91 |N | JSR (A1) 0002166e 50 4f |PO | ADDQ.L #0x8,A7 00021670 42 17 |B | CLR.B (A7) 00021672 48 50 |HP | PEA.L (A0) 00021674 4e b9 00 02 29 f8 |N ) | JSR exp_READ_PAREG.FIU(Sw_1, &Sr_1) 0002167a 58 4f |XO | ADDQ.L #0x4,A7 0002167c 1e 90 | | MOVE.B (A0),(A7) 0002167e 48 78 00 00 |Hx | PEA.L 0x0 00021682 42 27 |B' | CLR.B -(A7) 00021684 1f 3c 00 18 | < | MOVE.B #0x18,-(A7) 00021688 28 48 |(H | MOVEA.L A0,A4 0002168a 4e 91 |N | JSR (A1) 0002168c 50 4f |PO | ADDQ.L #0x8,A7 0002168e 1e 90 | | MOVE.B (A0),(A7) 00021690 48 78 00 01 |Hx | PEA.L 0x1 00021694 42 27 |B' | CLR.B -(A7) 00021696 1f 3c 00 19 | < | MOVE.B #0x19,-(A7) 0002169a 28 48 |(H | MOVEA.L A0,A4 0002169c 4e 91 |N | JSR (A1) 0002169e 50 4f |PO | ADDQ.L #0x8,A7 000216a0 1e 90 | | MOVE.B (A0),(A7) 000216a2 48 78 00 02 |Hx | PEA.L 0x2 000216a6 42 27 |B' | CLR.B -(A7) 000216a8 1f 3c 00 1a | < | MOVE.B #0x1a,-(A7) 000216ac 28 48 |(H | MOVEA.L A0,A4 000216ae 4e 91 |N | JSR (A1) 000216b0 50 4f |PO | ADDQ.L #0x8,A7 000216b2 1e 90 | | MOVE.B (A0),(A7) 000216b4 48 78 00 03 |Hx | PEA.L 0x3 000216b8 42 27 |B' | CLR.B -(A7) 000216ba 1f 3c 00 1b | < | MOVE.B #0x1b,-(A7) 000216be 28 48 |(H | MOVEA.L A0,A4 000216c0 4e 91 |N | JSR (A1) 000216c2 50 4f |PO | ADDQ.L #0x8,A7 000216c4 1e 90 | | MOVE.B (A0),(A7) 000216c6 48 78 00 04 |Hx | PEA.L 0x4 000216ca 42 27 |B' | CLR.B -(A7) 000216cc 1f 3c 00 1c | < | MOVE.B #0x1c,-(A7) 000216d0 28 48 |(H | MOVEA.L A0,A4 000216d2 4e 91 |N | JSR (A1) 000216d4 50 4f |PO | ADDQ.L #0x8,A7 000216d6 1e 90 | | MOVE.B (A0),(A7) 000216d8 48 78 00 05 |Hx | PEA.L 0x5 000216dc 42 27 |B' | CLR.B -(A7) 000216de 1f 3c 00 1d | < | MOVE.B #0x1d,-(A7) 000216e2 28 48 |(H | MOVEA.L A0,A4 000216e4 4e 91 |N | JSR (A1) 000216e6 50 4f |PO | ADDQ.L #0x8,A7 000216e8 1e 90 | | MOVE.B (A0),(A7) 000216ea 48 78 00 06 |Hx | PEA.L 0x6 000216ee 42 27 |B' | CLR.B -(A7) 000216f0 1f 3c 00 1e | < | MOVE.B #0x1e,-(A7) 000216f4 28 48 |(H | MOVEA.L A0,A4 000216f6 4e 91 |N | JSR (A1) 000216f8 50 4f |PO | ADDQ.L #0x8,A7 000216fa 1e 90 | | MOVE.B (A0),(A7) 000216fc 48 52 |HR | PEA.L (A2) 000216fe 42 27 |B' | CLR.B -(A7) 00021700 1f 3c 00 1f | < | MOVE.B #0x1f,-(A7) 00021704 28 48 |(H | MOVEA.L A0,A4 00021706 4e 91 |N | JSR (A1) 00021708 5c 4f |\O | ADDQ.L #0x6,A7 0002170a 1e 84 | | MOVE.B D4,(A7) 0002170c 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00021712 54 4f |TO | ADDQ.L #0x2,A7 00021714 4a 1f |J | TST.B (A7)+ 00021716 67 4c |gL | BEQ 0x21764 00021718 1f 04 | | MOVE.B D4,-(A7) 0002171a 48 6e ff f9 |Hn | PEA.L (A6-0x7) 0002171e 48 6e ff fa |Hn | PEA.L (A6-0x6) 00021722 48 6e ff fb |Hn | PEA.L (A6-0x5) 00021726 4e b9 00 02 2c c6 |N , | JSR 0x22cc6 0002172c de c4 | | ADDA.W D4,A7 0002172e 1e ae ff f9 | | MOVE.B (A6-0x7),(A7) 00021732 48 52 |HR | PEA.L (A2) 00021734 1f 02 | | MOVE.B D2,-(A7) 00021736 1f 3c 00 20 | < | MOVE.B #0x20,-(A7) 0002173a 28 48 |(H | MOVEA.L A0,A4 0002173c 4e 91 |N | JSR (A1) 0002173e 50 4f |PO | ADDQ.L #0x8,A7 00021740 1e ae ff fa | | MOVE.B (A6-0x6),(A7) 00021744 48 52 |HR | PEA.L (A2) 00021746 1f 02 | | MOVE.B D2,-(A7) 00021748 1f 3c 00 21 | < ! | MOVE.B #0x21,-(A7) 0002174c 28 48 |(H | MOVEA.L A0,A4 0002174e 4e 91 |N | JSR (A1) 00021750 50 4f |PO | ADDQ.L #0x8,A7 00021752 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 00021756 48 52 |HR | PEA.L (A2) 00021758 1f 02 | | MOVE.B D2,-(A7) 0002175a 1f 3c 00 22 | < " | MOVE.B #0x22,-(A7) 0002175e 28 48 |(H | MOVEA.L A0,A4 00021760 4e 91 |N | JSR (A1) 00021762 de c3 | | ADDA.W D3,A7 00021764 55 4f |UO | SUBQ.L #0x2,A7 00021766 1f 3c 00 0d | < | MOVE.B #0x0d,-(A7) 0002176a 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00021770 54 4f |TO | ADDQ.L #0x2,A7 00021772 4a 1f |J | TST.B (A7)+ 00021774 67 4e |gN | BEQ 0x217c4 00021776 1f 3c 00 0d | < | MOVE.B #0x0d,-(A7) 0002177a 48 6e ff f9 |Hn | PEA.L (A6-0x7) 0002177e 48 6e ff fa |Hn | PEA.L (A6-0x6) 00021782 48 6e ff fb |Hn | PEA.L (A6-0x5) 00021786 4e b9 00 02 2c c6 |N , | JSR 0x22cc6 0002178c de c4 | | ADDA.W D4,A7 0002178e 1e ae ff f9 | | MOVE.B (A6-0x7),(A7) 00021792 48 52 |HR | PEA.L (A2) 00021794 1f 02 | | MOVE.B D2,-(A7) 00021796 1f 3c 00 23 | < # | MOVE.B #0x23,-(A7) 0002179a 28 48 |(H | MOVEA.L A0,A4 0002179c 4e 91 |N | JSR (A1) 0002179e 50 4f |PO | ADDQ.L #0x8,A7 000217a0 1e ae ff fa | | MOVE.B (A6-0x6),(A7) 000217a4 48 52 |HR | PEA.L (A2) 000217a6 1f 02 | | MOVE.B D2,-(A7) 000217a8 1f 3c 00 24 | < $ | MOVE.B #0x24,-(A7) 000217ac 28 48 |(H | MOVEA.L A0,A4 000217ae 4e 91 |N | JSR (A1) 000217b0 50 4f |PO | ADDQ.L #0x8,A7 000217b2 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 000217b6 48 52 |HR | PEA.L (A2) 000217b8 1f 02 | | MOVE.B D2,-(A7) 000217ba 1f 3c 00 25 | < % | MOVE.B #0x25,-(A7) 000217be 28 48 |(H | MOVEA.L A0,A4 000217c0 4e 91 |N | JSR (A1) 000217c2 de c3 | | ADDA.W D3,A7 000217c4 55 4f |UO | SUBQ.L #0x2,A7 000217c6 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 000217ca 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 000217d0 54 4f |TO | ADDQ.L #0x2,A7 000217d2 4a 1f |J | TST.B (A7)+ 000217d4 67 4e |gN | BEQ 0x21824 000217d6 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 000217da 48 6e ff f9 |Hn | PEA.L (A6-0x7) 000217de 48 6e ff fa |Hn | PEA.L (A6-0x6) 000217e2 48 6e ff fb |Hn | PEA.L (A6-0x5) 000217e6 4e b9 00 02 2c c6 |N , | JSR 0x22cc6 000217ec de c4 | | ADDA.W D4,A7 000217ee 1e ae ff f9 | | MOVE.B (A6-0x7),(A7) 000217f2 48 52 |HR | PEA.L (A2) 000217f4 1f 02 | | MOVE.B D2,-(A7) 000217f6 1f 3c 00 26 | < & | MOVE.B #0x26,-(A7) 000217fa 28 48 |(H | MOVEA.L A0,A4 000217fc 4e 91 |N | JSR (A1) 000217fe 50 4f |PO | ADDQ.L #0x8,A7 00021800 1e ae ff fa | | MOVE.B (A6-0x6),(A7) 00021804 48 52 |HR | PEA.L (A2) 00021806 1f 02 | | MOVE.B D2,-(A7) 00021808 1f 3c 00 27 | < ' | MOVE.B #0x27,-(A7) 0002180c 28 48 |(H | MOVEA.L A0,A4 0002180e 4e 91 |N | JSR (A1) 00021810 50 4f |PO | ADDQ.L #0x8,A7 00021812 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 00021816 48 52 |HR | PEA.L (A2) 00021818 1f 02 | | MOVE.B D2,-(A7) 0002181a 1f 3c 00 28 | < ( | MOVE.B #0x28,-(A7) 0002181e 28 48 |(H | MOVEA.L A0,A4 00021820 4e 91 |N | JSR (A1) 00021822 de c3 | | ADDA.W D3,A7 00021824 55 4f |UO | SUBQ.L #0x2,A7 00021826 1f 3c 00 0f | < | MOVE.B #0x0f,-(A7) 0002182a 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00021830 54 4f |TO | ADDQ.L #0x2,A7 00021832 4a 1f |J | TST.B (A7)+ 00021834 67 4e |gN | BEQ 0x21884 00021836 1f 3c 00 0f | < | MOVE.B #0x0f,-(A7) 0002183a 48 6e ff f9 |Hn | PEA.L (A6-0x7) 0002183e 48 6e ff fa |Hn | PEA.L (A6-0x6) 00021842 48 6e ff fb |Hn | PEA.L (A6-0x5) 00021846 4e b9 00 02 2c c6 |N , | JSR 0x22cc6 0002184c de c4 | | ADDA.W D4,A7 0002184e 1e ae ff f9 | | MOVE.B (A6-0x7),(A7) 00021852 48 52 |HR | PEA.L (A2) 00021854 1f 02 | | MOVE.B D2,-(A7) 00021856 1f 3c 00 29 | < ) | MOVE.B #0x29,-(A7) 0002185a 28 48 |(H | MOVEA.L A0,A4 0002185c 4e 91 |N | JSR (A1) 0002185e 50 4f |PO | ADDQ.L #0x8,A7 00021860 1e ae ff fa | | MOVE.B (A6-0x6),(A7) 00021864 48 52 |HR | PEA.L (A2) 00021866 1f 02 | | MOVE.B D2,-(A7) 00021868 1f 3c 00 2a | < * | MOVE.B #0x2a,-(A7) 0002186c 28 48 |(H | MOVEA.L A0,A4 0002186e 4e 91 |N | JSR (A1) 00021870 50 4f |PO | ADDQ.L #0x8,A7 00021872 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 00021876 48 52 |HR | PEA.L (A2) 00021878 1f 02 | | MOVE.B D2,-(A7) 0002187a 1f 3c 00 2b | < + | MOVE.B #0x2b,-(A7) 0002187e 28 48 |(H | MOVEA.L A0,A4 00021880 4e 91 |N | JSR (A1) 00021882 de c3 | | ADDA.W D3,A7 00021884 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00021888 4e 5e |N^ | UNLK A6 0002188a 4e 75 |Nu | RTS 0002188c ; -------------------------------------------------------------------------------------- 0002188c ; OMSI PASCAL Function 0002188c ; <LVAR -0x003 1(w)> 0002188c ; <LVAR -0x004 1(w) 2(r)> 0002188c ; <LVAR -0x005 1(r)> 0002188c ; <LVAR -0x006 @ 1(r) 2(r)> 0002188c ; <LVAR -0x010 @> 0002188c ; <LVAR -0x018 @> 0002188c ; <LVAR -0x020 @> 0002188c ; <LVAR -0x028 @> 0002188c ; <LVAR -0x030 @> 0002188c ; <LVAR -0x038 @> 0002188c ; <LVAR -0x040 @> 0002188c ; <LVAR -0x048 @> 0002188c ; <LVAR -0x050 @> 0002188c ; <LVAR -0x058 @> 0002188c ; <LVAR -0x060 @> 0002188c ; <LVAR -0x068 @> 0002188c ; <LVAR -0x070 @> 0002188c ; <LVAR -0x078 @> 0002188c ; <LVAR -0x080 @> 0002188c ; <LVAR -0x088 @> 0002188c ; <LVAR -0x090 @> 0002188c ; -------------------------------------------------------------------------------------- 0002188c 4e 56 ff 00 |NV | LINK.W A6,#0xff00 00021890 bf d5 | | CMPA.L (A5),A7 00021892 62 06 |b | BHI 0x2189a 00021894 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021898 4e 76 |Nv | TRAPV 0002189a de fc 00 70 | p | ADDA.W #0x70,A7 0002189e 48 e7 ff e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000218a2 45 ee ff fa |E | LEA.L (A6-0x6),A2 000218a6 78 40 |x@ | MOVEQ.L #0x40,D4 000218a8 42 27 |B' | CLR.B -(A7) 000218aa 48 52 |HR | PEA.L (A2) 000218ac 4e b9 00 02 2d e0 |N - | JSR exp_READ_TRACE_ADDRESS.IOC(Sw_1, &Sr_2) 000218b2 5c 4f |\O | ADDQ.L #0x6,A7 000218b4 42 80 |B | CLR.L D0 000218b6 10 12 | | MOVE.B (A2),D0 000218b8 e1 40 | @ | ASL.W #0x8,D0 000218ba 42 81 |B | CLR.L D1 000218bc 12 2e ff fb | . | MOVE.B (A6-0x5),D1 000218c0 d2 40 | @ | ADD.W D0,D1 000218c2 3a 01 |: | MOVE.W D1,D5 000218c4 42 80 |B | CLR.L D0 000218c6 30 05 |0 | MOVE.W D5,D0 000218c8 90 84 | | SUB.L D4,D0 000218ca 55 80 |U | SUBQ.L #0x2,D0 000218cc 02 80 00 00 07 ff | | ANDI.L #0x000007ff,D0 000218d2 3a 00 |: | MOVE.W D0,D5 000218d4 30 05 |0 | MOVE.W D5,D0 000218d6 e0 48 | H | LSR.W #0x8,D0 000218d8 1d 40 ff fc | @ | MOVE.B D0,(A6-0x4) 000218dc 30 05 |0 | MOVE.W D5,D0 000218de 02 40 00 ff | @ | ANDI.W #0x00ff,D0 000218e2 1d 40 ff fd | @ | MOVE.B D0,(A6-0x3) 000218e6 3f 2e ff fc |?. | MOVE.W (A6-0x4),-(A7) 000218ea 42 27 |B' | CLR.B -(A7) 000218ec 4e b9 00 02 2e 24 |N .$ | JSR exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1) 000218f2 58 4f |XO | ADDQ.L #0x4,A7 000218f4 48 6e ff 78 |Hn x | PEA.L (A6-0x88) 000218f8 48 6e ff 80 |Hn | PEA.L (A6-0x80) 000218fc 48 6e ff 88 |Hn | PEA.L (A6-0x78) 00021900 48 6e ff 90 |Hn | PEA.L (A6-0x70) 00021904 48 6e ff 98 |Hn | PEA.L (A6-0x68) 00021908 48 6e ff a0 |Hn | PEA.L (A6-0x60) 0002190c 48 6e ff a8 |Hn | PEA.L (A6-0x58) 00021910 48 6e ff b0 |Hn | PEA.L (A6-0x50) 00021914 48 6e ff b8 |Hn | PEA.L (A6-0x48) 00021918 48 6e ff c0 |Hn | PEA.L (A6-0x40) 0002191c 48 6e ff c8 |Hn | PEA.L (A6-0x38) 00021920 48 6e ff d0 |Hn | PEA.L (A6-0x30) 00021924 48 6e ff d8 |Hn | PEA.L (A6-0x28) 00021928 48 6e ff e0 |Hn | PEA.L (A6-0x20) 0002192c 48 6e ff e8 |Hn | PEA.L (A6-0x18) 00021930 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00021934 4e b9 00 02 2d ae |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) 0002193a de c4 | | ADDA.W D4,A7 0002193c 7c 00 || | MOVEQ.L #0x00,D6 0002193e 7e 00 |~ | MOVEQ.L #0x00,D7 00021940 20 06 | | MOVE.L D6,D0 00021942 e5 80 | | ASL.L #0x2,D0 00021944 44 80 |D | NEG.L D0 00021946 06 80 00 00 00 3f | ? | ADDI.L #0x0000003f,D0 0002194c 90 87 | | SUB.L D7,D0 0002194e 0c 80 00 00 00 3f | ? | CMPI.L #0x0000003f,D0 00021954 63 02 |c | BLS 0x21958 00021956 4e 4f |NO | TRAP #15 00021958 e3 80 | | ASL.L #0x1,D0 0002195a 41 f9 00 02 30 50 |A 0P | LEA.L 0x23050,A0 00021960 0c 86 00 00 00 0f | | CMPI.L #0x0000000f,D6 00021966 63 02 |c | BLS 0x2196a 00021968 4e 4f |NO | TRAP #15 0002196a 22 06 |" | MOVE.L D6,D1 0002196c e7 81 | | ASL.L #0x3,D1 0002196e 43 ee ff 70 |C p | LEA.L (A6-0x90),A1 00021972 24 07 |$ | MOVE.L D7,D2 00021974 e3 82 | | ASL.L #0x1,D2 00021976 0c 82 00 00 00 07 | | CMPI.L #0x00000007,D2 0002197c 63 02 |c | BLS 0x21980 0002197e 4e 4f |NO | TRAP #15 00021980 43 f1 18 00 |C | LEA.L (A1+D1.L),A1 00021984 42 81 |B | CLR.L D1 00021986 12 31 28 08 | 1( | MOVE.B (A1+D2.L+#0x8),D1 0002198a e1 41 | A | ASL.W #0x8,D1 0002198c 52 82 |R | ADDQ.L #0x1,D2 0002198e 0c 82 00 00 00 07 | | CMPI.L #0x00000007,D2 00021994 63 02 |c | BLS 0x21998 00021996 4e 4f |NO | TRAP #15 00021998 42 83 |B | CLR.L D3 0002199a 16 31 28 08 | 1( | MOVE.B (A1+D2.L+#0x8),D3 0002199e d6 41 | A | ADD.W D1,D3 000219a0 31 83 08 08 |1 | MOVE.W D3,(A0+D0.L+#0x8) 000219a4 52 87 |R | ADDQ.L #0x1,D7 000219a6 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 000219ac 6f 92 |o | BLE 0x21940 000219ae 52 86 |R | ADDQ.L #0x1,D6 000219b0 0c 86 00 00 00 0f | | CMPI.L #0x0000000f,D6 000219b6 6f 86 |o | BLE 0x2193e 000219b8 3f 12 |? | MOVE.W (A2),-(A7) 000219ba 42 27 |B' | CLR.B -(A7) 000219bc 4e b9 00 02 2e 24 |N .$ | JSR exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1) 000219c2 58 4f |XO | ADDQ.L #0x4,A7 000219c4 4c df 07 ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2 000219c8 4e 5e |N^ | UNLK A6 000219ca 4e 75 |Nu | RTS 000219cc ; -------------------------------------------------------------------------------------- 000219cc ; OMSI PASCAL Function 000219cc ; <LVAR -0x006 @ 4(r)> 000219cc ; <LVAR -0x00a @ 4(r)> 000219cc ; <LVAR -0x00b @ 1(r)> 000219cc ; -------------------------------------------------------------------------------------- 000219cc 4e 56 ff 96 |NV | LINK.W A6,#0xff96 000219d0 bf d5 | | CMPA.L (A5),A7 000219d2 62 06 |b | BHI 0x219da 000219d4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000219d8 4e 76 |Nv | TRAPV 000219da de fc 00 5a | Z | ADDA.W #0x5a,A7 000219de 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000219e2 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 000219e8 47 ee ff fa |G | LEA.L (A6-0x6),A3 000219ec 49 f9 00 01 03 d8 |I | LEA.L WriteConsoleString(str : String),A4 000219f2 74 01 |t | MOVEQ.L #0x01,D2 000219f4 76 02 |v | MOVEQ.L #0x02,D3 000219f6 78 0e |x | MOVEQ.L #0x0e,D4 000219f8 7a 12 |z | MOVEQ.L #0x12,D5 000219fa 7c 3f ||? | MOVEQ.L #0x3f,D6 000219fc 41 fa ed ce |A | LEA.L 0x207cc,A0 00021a00 70 06 |p | MOVEQ.L #0x06,D0 00021a02 3f 20 |? | MOVE.W -(A0),-(A7) 00021a04 51 c8 ff fc |Q | DBF D0,0x21a02 00021a08 59 4f |YO | SUBQ.L #0x4,A7 00021a0a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021a0e 3f 02 |? | MOVE.W D2,-(A7) 00021a10 3f 04 |? | MOVE.W D4,-(A7) 00021a12 4e 92 |N | JSR (A2) 00021a14 50 4f |PO | ADDQ.L #0x8,A7 00021a16 4e 94 |N | JSR (A4) 00021a18 de c5 | | ADDA.W D5,A7 00021a1a 7e 04 |~ | MOVEQ.L #0x04,D7 00021a1c 3f 3a ed ae |?: | MOVE.W 0x207cc,-(A7) 00021a20 51 4f |QO | SUBQ.L #0x8,A7 00021a22 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021a26 3f 02 |? | MOVE.W D2,-(A7) 00021a28 3f 03 |? | MOVE.W D3,-(A7) 00021a2a 4e 92 |N | JSR (A2) 00021a2c 2e 87 |. | MOVE.L D7,(A7) 00021a2e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021a34 58 4f |XO | ADDQ.L #0x4,A7 00021a36 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021a3c 50 4f |PO | ADDQ.L #0x8,A7 00021a3e 4e 94 |N | JSR (A4) 00021a40 5c 4f |\O | ADDQ.L #0x6,A7 00021a42 20 07 | | MOVE.L D7,D0 00021a44 53 80 |S | SUBQ.L #0x1,D0 00021a46 b0 86 | | CMP.L D6,D0 00021a48 63 02 |c | BLS 0x21a4c 00021a4a 4e 4f |NO | TRAP #15 00021a4c e3 80 | | ASL.L #0x1,D0 00021a4e 41 f9 00 02 30 50 |A 0P | LEA.L 0x23050,A0 00021a54 30 30 08 08 |00 | MOVE.W (A0+D0.L+#0x8),D0 00021a58 02 40 80 00 | @ | ANDI.W #0x8000,D0 00021a5c 66 06 |f | BNE 0x21a64 00021a5e 3f 3a ed 6e |?: n | MOVE.W 0x207ce,-(A7) 00021a62 60 04 |` | BRA 0x21a68 00021a64 3f 3a ed 6a |?: j | MOVE.W 0x207d0,-(A7) 00021a68 59 4f |YO | SUBQ.L #0x4,A7 00021a6a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021a6e 3f 02 |? | MOVE.W D2,-(A7) 00021a70 3f 03 |? | MOVE.W D3,-(A7) 00021a72 4e 92 |N | JSR (A2) 00021a74 50 4f |PO | ADDQ.L #0x8,A7 00021a76 4e 94 |N | JSR (A4) 00021a78 5c 4f |\O | ADDQ.L #0x6,A7 00021a7a 59 4f |YO | SUBQ.L #0x4,A7 00021a7c be 86 | | CMP.L D6,D7 00021a7e 63 02 |c | BLS 0x21a82 00021a80 4e 4f |NO | TRAP #15 00021a82 20 07 | | MOVE.L D7,D0 00021a84 e3 80 | | ASL.L #0x1,D0 00021a86 41 f9 00 02 30 50 |A 0P | LEA.L 0x23050,A0 00021a8c 30 30 08 08 |00 | MOVE.W (A0+D0.L+#0x8),D0 00021a90 02 40 3f ff | @? | ANDI.W #0x3fff,D0 00021a94 42 81 |B | CLR.L D1 00021a96 32 00 |2 | MOVE.W D0,D1 00021a98 2f 01 |/ | MOVE.L D1,-(A7) 00021a9a 48 78 00 04 |Hx | PEA.L 0x4 00021a9e 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00021aa4 50 4f |PO | ADDQ.L #0x8,A7 00021aa6 4e 94 |N | JSR (A4) 00021aa8 58 4f |XO | ADDQ.L #0x4,A7 00021aaa 53 87 |S | SUBQ.L #0x1,D7 00021aac be 82 | | CMP.L D2,D7 00021aae 6c 00 ff 6c |l l | BGE 0x21a1c 00021ab2 41 fa ed 28 |A ( | LEA.L 0x207dc,A0 00021ab6 70 04 |p | MOVEQ.L #0x04,D0 00021ab8 3f 20 |? | MOVE.W -(A0),-(A7) 00021aba 51 c8 ff fc |Q | DBF D0,0x21ab8 00021abe 59 4f |YO | SUBQ.L #0x4,A7 00021ac0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021ac4 3f 02 |? | MOVE.W D2,-(A7) 00021ac6 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00021aca 4e 92 |N | JSR (A2) 00021acc 5c 4f |\O | ADDQ.L #0x6,A7 00021ace 42 17 |B | CLR.B (A7) 00021ad0 42 27 |B' | CLR.B -(A7) 00021ad2 48 78 00 00 |Hx | PEA.L 0x0 00021ad6 48 6e ff f5 |Hn | PEA.L (A6-0xb) 00021ada 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00021ade 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00021ae4 de fc 00 1e | | ADDA.W #0x1e,A7 00021ae8 4a 2e ff f5 |J. | TST.B (A6-0xb) 00021aec 66 00 00 b8 |f | BNE 0x21ba6 00021af0 48 53 |HS | PEA.L (A3) 00021af2 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00021af8 2e ae ff f6 |. | MOVE.L (A6-0xa),(A7) 00021afc 42 67 |Bg | CLR.W -(A7) 00021afe 42 67 |Bg | CLR.W -(A7) 00021b00 3f 3c 00 40 |?< @ | MOVE.W #0x40,-(A7) 00021b04 1f 03 | | MOVE.B D3,-(A7) 00021b06 2f 13 |/ | MOVE.L (A3),-(A7) 00021b08 48 6e ff f5 |Hn | PEA.L (A6-0xb) 00021b0c 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00021b12 de c5 | | ADDA.W D5,A7 00021b14 3e ba ec c6 |> | MOVE.W 0x207dc,(A7) 00021b18 59 4f |YO | SUBQ.L #0x4,A7 00021b1a 2f 13 |/ | MOVE.L (A3),-(A7) 00021b1c 59 4f |YO | SUBQ.L #0x4,A7 00021b1e 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021b22 3f 02 |? | MOVE.W D2,-(A7) 00021b24 3f 03 |? | MOVE.W D3,-(A7) 00021b26 4e 92 |N | JSR (A2) 00021b28 50 4f |PO | ADDQ.L #0x8,A7 00021b2a 4e b9 00 01 03 00 |N | JSR FSCALL_10300 00021b30 50 4f |PO | ADDQ.L #0x8,A7 00021b32 4a 9f |J | TST.L (A7)+ 00021b34 6f 3e |o> | BLE 0x21b74 00021b36 20 53 | S | MOVEA.L (A3),A0 00021b38 3f 3a ec a4 |?: | MOVE.W 0x207de,-(A7) 00021b3c 59 4f |YO | SUBQ.L #0x4,A7 00021b3e 2f 13 |/ | MOVE.L (A3),-(A7) 00021b40 59 4f |YO | SUBQ.L #0x4,A7 00021b42 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021b46 3f 02 |? | MOVE.W D2,-(A7) 00021b48 3f 03 |? | MOVE.W D3,-(A7) 00021b4a 4e 92 |N | JSR (A2) 00021b4c 50 4f |PO | ADDQ.L #0x8,A7 00021b4e 4e b9 00 01 03 00 |N | JSR FSCALL_10300 00021b54 50 4f |PO | ADDQ.L #0x8,A7 00021b56 20 1f | | MOVE.L (A7)+,D0 00021b58 53 80 |S | SUBQ.L #0x1,D0 00021b5a 54 4f |TO | ADDQ.L #0x2,A7 00021b5c 04 80 ff ff 80 00 | | SUBI.L #0xffff8000,D0 00021b62 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021b68 63 02 |c | BLS 0x21b6c 00021b6a 4e 4f |NO | TRAP #15 00021b6c 06 80 ff ff 80 00 | | ADDI.L #0xffff8000,D0 00021b72 30 80 |0 | MOVE.W D0,(A0) 00021b74 54 4f |TO | ADDQ.L #0x2,A7 00021b76 41 fa ec 72 |A r | LEA.L 0x207ea,A0 00021b7a 70 04 |p | MOVEQ.L #0x04,D0 00021b7c 3f 20 |? | MOVE.W -(A0),-(A7) 00021b7e 51 c8 ff fc |Q | DBF D0,0x21b7c 00021b82 51 4f |QO | SUBQ.L #0x8,A7 00021b84 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021b88 3f 02 |? | MOVE.W D2,-(A7) 00021b8a 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00021b8e 4e 92 |N | JSR (A2) 00021b90 58 4f |XO | ADDQ.L #0x4,A7 00021b92 2e 93 |. | MOVE.L (A3),(A7) 00021b94 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021b9a 50 4f |PO | ADDQ.L #0x8,A7 00021b9c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021ba2 de c4 | | ADDA.W D4,A7 00021ba4 60 2c |`, | BRA 0x21bd2 00021ba6 9e fc 00 16 | | SUBA.W #0x16,A7 00021baa 20 4f | O | MOVEA.L A7,A0 00021bac 43 fa ec 3c |C < | LEA.L 0x207ea,A1 00021bb0 70 14 |p | MOVEQ.L #0x14,D0 00021bb2 10 d9 | | MOVE.B (A1)+,(A0)+ 00021bb4 51 c8 ff fc |Q | DBF D0,0x21bb2 00021bb8 59 4f |YO | SUBQ.L #0x4,A7 00021bba 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021bbe 3f 02 |? | MOVE.W D2,-(A7) 00021bc0 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 00021bc4 4e 92 |N | JSR (A2) 00021bc6 50 4f |PO | ADDQ.L #0x8,A7 00021bc8 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021bce de fc 00 1a | | ADDA.W #0x1a,A7 00021bd2 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00021bd6 4e 5e |N^ | UNLK A6 00021bd8 4e 75 |Nu | RTS 00021bda ; -------------------------------------------------------------------------------------- 00021bda ; OMSI PASCAL Function 00021bda ; <LVAR 0x00c 1(rw)> 00021bda ; <LVAR 0x008 4(r)> 00021bda ; -------------------------------------------------------------------------------------- 00021bda 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 00021bde bf d5 | | CMPA.L (A5),A7 00021be0 62 06 |b | BHI 0x21be8 00021be2 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021be6 4e 76 |Nv | TRAPV 00021be8 de fc 00 20 | | ADDA.W #0x20,A7 00021bec 48 e7 e3 80 |H | MOVEM.L A0+D7+D6+D2+D1+D0,-(A7) 00021bf0 74 01 |t | MOVEQ.L #0x01,D2 00021bf2 7e 01 |~ | MOVEQ.L #0x01,D7 00021bf4 10 07 | | MOVE.B D7,D0 00021bf6 48 80 |H | EXTB.W D0 00021bf8 42 36 00 f2 |B6 | CLR.B (A6+D0.W-#0xe) 00021bfc 52 07 |R | ADDQ.B #0x1,D7 00021bfe 0c 07 00 0b | | CMPI.B #0x0b,D7 00021c02 6f f0 |o | BLE 0x21bf4 00021c04 7c 00 || | MOVEQ.L #0x00,D6 00021c06 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021c0a 10 06 | | MOVE.B D6,D0 00021c0c 48 80 |H | EXTB.W D0 00021c0e 4a 30 00 00 |J0 | TST.B (A0+D0.W) 00021c12 67 14 |g | BEQ 0x21c28 00021c14 10 06 | | MOVE.B D6,D0 00021c16 48 80 |H | EXTB.W D0 00021c18 eb 40 | @ | ASL.W #0x5,D0 00021c1a 41 fa f0 de |A | LEA.L 0x20cfa,A0 00021c1e 12 30 00 1f | 0 | MOVE.B (A0+D0.W+#0x1f),D1 00021c22 48 81 |H | EXTB.W D1 00021c24 1d 82 10 f2 | | MOVE.B D2,(A6+D1.W-#0xe) 00021c28 52 06 |R | ADDQ.B #0x1,D6 00021c2a 0c 06 00 2b | + | CMPI.B #0x2b,D6 00021c2e 6f d6 |o | BLE 0x21c06 00021c30 42 2e 00 0c |B. | CLR.B (A6+0xc) 00021c34 7e 0b |~ | MOVEQ.L #0x0b,D7 00021c36 10 07 | | MOVE.B D7,D0 00021c38 48 80 |H | EXTB.W D0 00021c3a 4a 36 00 f2 |J6 | TST.B (A6+D0.W-#0xe) 00021c3e 67 04 |g | BEQ 0x21c44 00021c40 1d 47 00 0c | G | MOVE.B D7,(A6+0xc) 00021c44 53 07 |S | SUBQ.B #0x1,D7 00021c46 be 02 | | CMP.B D2,D7 00021c48 6c ec |l | BGE 0x21c36 00021c4a 4c df 01 c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0 00021c4e 4e 5e |N^ | UNLK A6 00021c50 4e 75 |Nu | RTS 00021c52 ; -------------------------------------------------------------------------------------- 00021c52 ; OMSI PASCAL Function 00021c52 ; <LVAR 0x03a 4(w)> 00021c52 ; <LVAR 0x036 4(w)> 00021c52 ; <LVAR 0x008 1(r)> 00021c52 ; <LVAR -0x00a 4(r)> 00021c52 ; <LVAR -0x00e 4(r)> 00021c52 ; -------------------------------------------------------------------------------------- 00021c52 4e 56 ff 9e |NV | LINK.W A6,#0xff9e 00021c56 bf d5 | | CMPA.L (A5),A7 00021c58 62 06 |b | BHI 0x21c60 00021c5a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021c5e 4e 76 |Nv | TRAPV 00021c60 de fc 00 54 | T | ADDA.W #0x54,A7 00021c64 48 e7 e7 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00021c68 45 fa f0 90 |E | LEA.L 0x20cfa,A2 00021c6c 74 07 |t | MOVEQ.L #0x07,D2 00021c6e 7e 00 |~ | MOVEQ.L #0x00,D7 00021c70 be 82 | | CMP.L D2,D7 00021c72 63 02 |c | BLS 0x21c76 00021c74 4e 4f |NO | TRAP #15 00021c76 42 36 78 f2 |B6x | CLR.B (A6+D7.L-#0xe) 00021c7a 52 87 |R | ADDQ.L #0x1,D7 00021c7c be 82 | | CMP.L D2,D7 00021c7e 6f f0 |o | BLE 0x21c70 00021c80 7e 00 |~ | MOVEQ.L #0x00,D7 00021c82 7c 0f || | MOVEQ.L #0x0f,D6 00021c84 7a 00 |z | MOVEQ.L #0x00,D5 00021c86 10 05 | | MOVE.B D5,D0 00021c88 48 80 |H | EXTB.W D0 00021c8a 4a 36 00 0a |J6 | TST.B (A6+D0.W+#0xa) 00021c8e 67 6a |gj | BEQ 0x21cfa 00021c90 10 05 | | MOVE.B D5,D0 00021c92 48 80 |H | EXTB.W D0 00021c94 eb 40 | @ | ASL.W #0x5,D0 00021c96 20 4a | J | MOVEA.L A2,A0 00021c98 12 2e 00 08 | . | MOVE.B (A6+0x8),D1 00021c9c b2 30 00 1f | 0 | CMP.B (A0+D0.W+#0x1f),D1 00021ca0 66 58 |fX | BNE 0x21cfa 00021ca2 20 4a | J | MOVEA.L A2,A0 00021ca4 bc 30 00 1e | 0 | CMP.B (A0+D0.W+#0x1e),D6 00021ca8 67 50 |gP | BEQ 0x21cfa 00021caa be 82 | | CMP.L D2,D7 00021cac 6f 36 |o6 | BLE 0x21ce4 00021cae 9e fc 00 18 | | SUBA.W #0x18,A7 00021cb2 20 4f | O | MOVEA.L A7,A0 00021cb4 43 fa eb 4a |C J | LEA.L 0x20800,A1 00021cb8 72 16 |r | MOVEQ.L #0x16,D1 00021cba 10 d9 | | MOVE.B (A1)+,(A0)+ 00021cbc 51 c9 ff fc |Q | DBF D1,0x21cba 00021cc0 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00021cc4 59 4f |YO | SUBQ.L #0x4,A7 00021cc6 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021cca 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021cce 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00021cd2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021cd8 50 4f |PO | ADDQ.L #0x8,A7 00021cda 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021ce0 de fc 00 1e | | ADDA.W #0x1e,A7 00021ce4 be 82 | | CMP.L D2,D7 00021ce6 63 02 |c | BLS 0x21cea 00021ce8 4e 4f |NO | TRAP #15 00021cea 20 4a | J | MOVEA.L A2,A0 00021cec 1d b0 00 1e 78 f2 | x | MOVE.B (A0+D0.W+#0x1e),(A6+D7.L-#0xe) 00021cf2 20 4a | J | MOVEA.L A2,A0 00021cf4 1c 30 00 1e | 0 | MOVE.B (A0+D0.W+#0x1e),D6 00021cf8 52 87 |R | ADDQ.L #0x1,D7 00021cfa 52 05 |R | ADDQ.B #0x1,D5 00021cfc 0c 05 00 2b | + | CMPI.B #0x2b,D5 00021d00 6f 84 |o | BLE 0x21c86 00021d02 2d 6e ff f2 00 36 |-n 6 | MOVE.L (A6-0xe),(A6+0x36) 00021d08 2d 6e ff f6 00 3a |-n : | MOVE.L (A6-0xa),(A6+0x3a) 00021d0e 4c df 07 e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2 00021d12 4e 5e |N^ | UNLK A6 00021d14 4e 75 |Nu | RTS 00021d16 ; -------------------------------------------------------------------------------------- 00021d16 ; OMSI PASCAL Function 00021d16 ; <LVAR 0x008 1(r)> 00021d16 ; <LVAR -0x003 @ 1(r)> 00021d16 ; <LVAR -0x004 @ 1(r)> 00021d16 ; <LVAR -0x005 @ 1(r)> 00021d16 ; <LVAR -0x006 @ 1(r)> 00021d16 ; -------------------------------------------------------------------------------------- 00021d16 4e 56 ff 88 |NV | LINK.W A6,#0xff88 00021d1a bf d5 | | CMPA.L (A5),A7 00021d1c 62 06 |b | BHI 0x21d24 00021d1e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021d22 4e 76 |Nv | TRAPV 00021d24 de fc 00 72 | r | ADDA.W #0x72,A7 00021d28 48 e7 f8 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7) 00021d2c 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021d32 47 f8 00 02 |G | LEA.L 0x2,A3 00021d36 49 f9 00 01 02 e8 |I | LEA.L Long2HexString(val : Long; ndig : Long) : String,A4 00021d3c 72 01 |r | MOVEQ.L #0x01,D1 00021d3e 74 12 |t | MOVEQ.L #0x12,D2 00021d40 76 11 |v | MOVEQ.L #0x11,D3 00021d42 78 10 |x | MOVEQ.L #0x10,D4 00021d44 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00021d48 48 6e ff fa |Hn | PEA.L (A6-0x6) 00021d4c 48 6e ff fb |Hn | PEA.L (A6-0x5) 00021d50 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021d54 48 6e ff fd |Hn | PEA.L (A6-0x3) 00021d58 4e b9 00 02 2b ca |N + | JSR 0x22bca 00021d5e de c2 | | ADDA.W D2,A7 00021d60 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00021d64 0c 00 00 0c | | CMPI.B #0x0c,D0 00021d68 66 0e |f | BNE 0x21d78 00021d6a 3f 3a ea b0 |?: | MOVE.W 0x2081c,-(A7) 00021d6e 3f 3a ea aa |?: | MOVE.W 0x2081a,-(A7) 00021d72 3f 3a ea a4 |?: | MOVE.W 0x20818,-(A7) 00021d76 60 0c |` | BRA 0x21d84 00021d78 3f 3a ea a8 |?: | MOVE.W 0x20822,-(A7) 00021d7c 3f 3a ea a2 |?: | MOVE.W 0x20820,-(A7) 00021d80 3f 3a ea 9c |?: | MOVE.W 0x2081e,-(A7) 00021d84 59 4f |YO | SUBQ.L #0x4,A7 00021d86 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021d8a 3f 01 |? | MOVE.W D1,-(A7) 00021d8c 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00021d90 4e 92 |N | JSR (A2) 00021d92 50 4f |PO | ADDQ.L #0x8,A7 00021d94 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021d9a de fc 00 0a | | ADDA.W #0xa,A7 00021d9e 9e c2 | | SUBA.W D2,A7 00021da0 20 4f | O | MOVEA.L A7,A0 00021da2 43 fa ea 80 |C | LEA.L 0x20824,A1 00021da6 70 10 |p | MOVEQ.L #0x10,D0 00021da8 10 d9 | | MOVE.B (A1)+,(A0)+ 00021daa 51 c8 ff fc |Q | DBF D0,0x21da8 00021dae 9e c2 | | SUBA.W D2,A7 00021db0 20 4f | O | MOVEA.L A7,A0 00021db2 43 fa ea 82 |C | LEA.L 0x20836,A1 00021db6 70 10 |p | MOVEQ.L #0x10,D0 00021db8 10 d9 | | MOVE.B (A1)+,(A0)+ 00021dba 51 c8 ff fc |Q | DBF D0,0x21db8 00021dbe 51 4f |QO | SUBQ.L #0x8,A7 00021dc0 48 6f 00 1a |Ho | PEA.L (A7+0x1a) 00021dc4 3f 01 |? | MOVE.W D1,-(A7) 00021dc6 3f 03 |? | MOVE.W D3,-(A7) 00021dc8 4e 92 |N | JSR (A2) 00021dca 58 4f |XO | ADDQ.L #0x4,A7 00021dcc 42 80 |B | CLR.L D0 00021dce 10 2e ff fa | . | MOVE.B (A6-0x6),D0 00021dd2 2f 00 |/ | MOVE.L D0,-(A7) 00021dd4 48 53 |HS | PEA.L (A3) 00021dd6 4e 94 |N | JSR (A4) 00021dd8 58 4f |XO | ADDQ.L #0x4,A7 00021dda 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00021dde 3f 01 |? | MOVE.W D1,-(A7) 00021de0 3f 03 |? | MOVE.W D3,-(A7) 00021de2 4e 92 |N | JSR (A2) 00021de4 58 4f |XO | ADDQ.L #0x4,A7 00021de6 42 80 |B | CLR.L D0 00021de8 10 2e ff fc | . | MOVE.B (A6-0x4),D0 00021dec 2f 00 |/ | MOVE.L D0,-(A7) 00021dee 48 53 |HS | PEA.L (A3) 00021df0 4e 94 |N | JSR (A4) 00021df2 50 4f |PO | ADDQ.L #0x8,A7 00021df4 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00021dfa de c4 | | ADDA.W D4,A7 00021dfc 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021e02 de c4 | | ADDA.W D4,A7 00021e04 20 4f | O | MOVEA.L A7,A0 00021e06 43 fa ea 40 |C @ | LEA.L 0x20848,A1 00021e0a 70 16 |p | MOVEQ.L #0x16,D0 00021e0c 10 d9 | | MOVE.B (A1)+,(A0)+ 00021e0e 51 c8 ff fc |Q | DBF D0,0x21e0c 00021e12 9e c2 | | SUBA.W D2,A7 00021e14 20 4f | O | MOVEA.L A7,A0 00021e16 43 fa ea 48 |C H | LEA.L 0x20860,A1 00021e1a 70 10 |p | MOVEQ.L #0x10,D0 00021e1c 10 d9 | | MOVE.B (A1)+,(A0)+ 00021e1e 51 c8 ff fc |Q | DBF D0,0x21e1c 00021e22 51 4f |QO | SUBQ.L #0x8,A7 00021e24 48 6f 00 1a |Ho | PEA.L (A7+0x1a) 00021e28 3f 01 |? | MOVE.W D1,-(A7) 00021e2a 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00021e2e 4e 92 |N | JSR (A2) 00021e30 58 4f |XO | ADDQ.L #0x4,A7 00021e32 42 80 |B | CLR.L D0 00021e34 10 2e ff fb | . | MOVE.B (A6-0x5),D0 00021e38 2f 00 |/ | MOVE.L D0,-(A7) 00021e3a 48 53 |HS | PEA.L (A3) 00021e3c 4e 94 |N | JSR (A4) 00021e3e 58 4f |XO | ADDQ.L #0x4,A7 00021e40 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00021e44 3f 01 |? | MOVE.W D1,-(A7) 00021e46 3f 03 |? | MOVE.W D3,-(A7) 00021e48 4e 92 |N | JSR (A2) 00021e4a 58 4f |XO | ADDQ.L #0x4,A7 00021e4c 42 80 |B | CLR.L D0 00021e4e 10 2e ff fd | . | MOVE.B (A6-0x3),D0 00021e52 2f 00 |/ | MOVE.L D0,-(A7) 00021e54 48 53 |HS | PEA.L (A3) 00021e56 4e 94 |N | JSR (A4) 00021e58 50 4f |PO | ADDQ.L #0x8,A7 00021e5a 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00021e60 de c4 | | ADDA.W D4,A7 00021e62 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021e68 de fc 00 2e | . | ADDA.W #0x2e,A7 00021e6c 4c df 1f 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4 00021e70 4e 5e |N^ | UNLK A6 00021e72 4e 75 |Nu | RTS 00021e74 ; -------------------------------------------------------------------------------------- 00021e74 ; OMSI PASCAL Function 00021e74 ; <LVAR 0x010 4(w)> 00021e74 ; <LVAR -0x00c @ 4(r)> 00021e74 ; -------------------------------------------------------------------------------------- 00021e74 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 00021e78 bf d5 | | CMPA.L (A5),A7 00021e7a 62 06 |b | BHI 0x21e82 00021e7c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021e80 4e 76 |Nv | TRAPV 00021e82 de fc 00 34 | 4 | ADDA.W #0x34,A7 00021e86 48 e7 ff 80 |H | MOVEM.L A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021e8a 41 ee ff f4 |A | LEA.L (A6-0xc),A0 00021e8e 72 07 |r | MOVEQ.L #0x07,D1 00021e90 74 0f |t | MOVEQ.L #0x0f,D2 00021e92 7a 0a |z | MOVEQ.L #0x0a,D5 00021e94 48 50 |HP | PEA.L (A0) 00021e96 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00021e9c 58 4f |XO | ADDQ.L #0x4,A7 00021e9e 7c 00 || | MOVEQ.L #0x00,D6 00021ea0 28 06 |( | MOVE.L D6,D4 00021ea2 76 02 |v | MOVEQ.L #0x02,D3 00021ea4 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00021eaa 4a 83 |J | TST.L D3 00021eac 66 10 |f | BNE 0x21ebe 00021eae b8 81 | | CMP.L D1,D4 00021eb0 63 02 |c | BLS 0x21eb4 00021eb2 4e 4f |NO | TRAP #15 00021eb4 42 80 |B | CLR.L D0 00021eb6 10 36 48 08 | 6H | MOVE.B (A6+D4.L+#0x8),D0 00021eba e8 40 | @ | ASR.W #0x4,D0 00021ebc 60 0e |` | BRA 0x21ecc 00021ebe b8 81 | | CMP.L D1,D4 00021ec0 63 02 |c | BLS 0x21ec4 00021ec2 4e 4f |NO | TRAP #15 00021ec4 42 80 |B | CLR.L D0 00021ec6 10 36 48 08 | 6H | MOVE.B (A6+D4.L+#0x8),D0 00021eca c0 42 | B | AND.W D2,D0 00021ecc 48 c0 |H | EXTW.L D0 00021ece 2e 00 |. | MOVE.L D0,D7 00021ed0 be 85 | | CMP.L D5,D7 00021ed2 6c 12 |l | BGE 0x21ee6 00021ed4 2f 10 |/ | MOVE.L (A0),-(A7) 00021ed6 70 30 |p0 | MOVEQ.L #0x30,D0 00021ed8 d0 87 | | ADD.L D7,D0 00021eda 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 00021ee0 63 02 |c | BLS 0x21ee4 00021ee2 4e 4f |NO | TRAP #15 00021ee4 60 12 |` | BRA 0x21ef8 00021ee6 2f 10 |/ | MOVE.L (A0),-(A7) 00021ee8 70 41 |pA | MOVEQ.L #0x41,D0 00021eea d0 87 | | ADD.L D7,D0 00021eec 90 85 | | SUB.L D5,D0 00021eee 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 00021ef4 63 02 |c | BLS 0x21ef8 00021ef6 4e 4f |NO | TRAP #15 00021ef8 1f 00 | | MOVE.B D0,-(A7) 00021efa 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00021f00 5c 4f |\O | ADDQ.L #0x6,A7 00021f02 bc 81 | | CMP.L D1,D6 00021f04 66 0e |f | BNE 0x21f14 00021f06 2f 10 |/ | MOVE.L (A0),-(A7) 00021f08 1f 3c 00 5f | < _ | MOVE.B #0x5f,-(A7) 00021f0c 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00021f12 5c 4f |\O | ADDQ.L #0x6,A7 00021f14 52 86 |R | ADDQ.L #0x1,D6 00021f16 bc 82 | | CMP.L D2,D6 00021f18 6f 86 |o | BLE 0x21ea0 00021f1a 2d 50 00 10 |-P | MOVE.L (A0),(A6+0x10) 00021f1e 4c df 01 ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0 00021f22 4e 5e |N^ | UNLK A6 00021f24 4e 75 |Nu | RTS 00021f26 ; -------------------------------------------------------------------------------------- 00021f26 ; OMSI PASCAL Function 00021f26 ; <LVAR 0x008 1(r)> 00021f26 ; <LVAR -0x009 @> 00021f26 ; <LVAR -0x011 @> 00021f26 ; <LVAR -0x012 @ 1(r)> 00021f26 ; <LVAR -0x013 @> 00021f26 ; <LVAR -0x014 1(r)> 00021f26 ; <LVAR -0x015 @ 1(r)> 00021f26 ; <LVAR -0x016 @ 1(r)> 00021f26 ; <LVAR -0x01a @ 4(r)> 00021f26 ; -------------------------------------------------------------------------------------- 00021f26 4e 56 ff 64 |NV d | LINK.W A6,#0xff64 00021f2a bf d5 | | CMPA.L (A5),A7 00021f2c 62 06 |b | BHI 0x21f34 00021f2e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021f32 4e 76 |Nv | TRAPV 00021f34 de fc 00 82 | | ADDA.W #0x82,A7 00021f38 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021f3c 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021f42 47 ee ff e6 |G | LEA.L (A6-0x1a),A3 00021f46 49 f8 00 00 |I | LEA.L 0x0,A4 00021f4a 74 01 |t | MOVEQ.L #0x01,D2 00021f4c 76 0c |v | MOVEQ.L #0x0c,D3 00021f4e 78 10 |x | MOVEQ.L #0x10,D4 00021f50 7a 16 |z | MOVEQ.L #0x16,D5 00021f52 7c 14 || | MOVEQ.L #0x14,D6 00021f54 7e 0b |~ | MOVEQ.L #0x0b,D7 00021f56 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00021f5a 0c 00 00 07 | | CMPI.B #0x07,D0 00021f5e 66 34 |f4 | BNE 0x21f94 00021f60 41 fa e9 24 |A $ | LEA.L 0x20886,A0 00021f64 72 04 |r | MOVEQ.L #0x04,D1 00021f66 2f 20 |/ | MOVE.L -(A0),-(A7) 00021f68 51 c9 ff fc |Q | DBF D1,0x21f66 00021f6c 59 4f |YO | SUBQ.L #0x4,A7 00021f6e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021f72 3f 02 |? | MOVE.W D2,-(A7) 00021f74 3f 06 |? | MOVE.W D6,-(A7) 00021f76 4e 92 |N | JSR (A2) 00021f78 50 4f |PO | ADDQ.L #0x8,A7 00021f7a 48 53 |HS | PEA.L (A3) 00021f7c 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00021f82 de c5 | | ADDA.W D5,A7 00021f84 20 4f | O | MOVEA.L A7,A0 00021f86 43 fa e8 fe |C | LEA.L 0x20886,A1 00021f8a 72 04 |r | MOVEQ.L #0x04,D1 00021f8c 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f8e 51 c9 ff fc |Q | DBF D1,0x21f8c 00021f92 60 32 |`2 | BRA 0x21fc6 00021f94 41 fa e9 0a |A | LEA.L 0x208a0,A0 00021f98 72 04 |r | MOVEQ.L #0x04,D1 00021f9a 2f 20 |/ | MOVE.L -(A0),-(A7) 00021f9c 51 c9 ff fc |Q | DBF D1,0x21f9a 00021fa0 59 4f |YO | SUBQ.L #0x4,A7 00021fa2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021fa6 3f 02 |? | MOVE.W D2,-(A7) 00021fa8 3f 06 |? | MOVE.W D6,-(A7) 00021faa 4e 92 |N | JSR (A2) 00021fac 50 4f |PO | ADDQ.L #0x8,A7 00021fae 48 53 |HS | PEA.L (A3) 00021fb0 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00021fb6 de c5 | | ADDA.W D5,A7 00021fb8 20 4f | O | MOVEA.L A7,A0 00021fba 43 fa e8 e4 |C | LEA.L 0x208a0,A1 00021fbe 72 04 |r | MOVEQ.L #0x04,D1 00021fc0 10 d9 | | MOVE.B (A1)+,(A0)+ 00021fc2 51 c9 ff fc |Q | DBF D1,0x21fc0 00021fc6 59 4f |YO | SUBQ.L #0x4,A7 00021fc8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021fcc 3f 02 |? | MOVE.W D2,-(A7) 00021fce 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00021fd2 4e 92 |N | JSR (A2) 00021fd4 50 4f |PO | ADDQ.L #0x8,A7 00021fd6 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021fdc de fc 00 0a | | ADDA.W #0xa,A7 00021fe0 42 27 |B' | CLR.B -(A7) 00021fe2 1f 00 | | MOVE.B D0,-(A7) 00021fe4 2f 13 |/ | MOVE.L (A3),-(A7) 00021fe6 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00021fec 58 4f |XO | ADDQ.L #0x4,A7 00021fee 2e 93 |. | MOVE.L (A3),(A7) 00021ff0 48 6e ff ea |Hn | PEA.L (A6-0x16) 00021ff4 4e b9 00 01 04 78 |N x | JSR ExpOutputFlag(exp : Pointer; VAR status : Bool) 00021ffa 58 4f |XO | ADDQ.L #0x4,A7 00021ffc 2e 93 |. | MOVE.L (A3),(A7) 00021ffe 48 6e ff eb |Hn | PEA.L (A6-0x15) 00022002 48 54 |HT | PEA.L (A4) 00022004 48 78 00 01 |Hx | PEA.L 0x1 00022008 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 0002200e de c3 | | ADDA.W D3,A7 00022010 2e 93 |. | MOVE.L (A3),(A7) 00022012 48 6e ff ee |Hn | PEA.L (A6-0x12) 00022016 48 54 |HT | PEA.L (A4) 00022018 48 54 |HT | PEA.L (A4) 0002201a 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 00022020 de c3 | | ADDA.W D3,A7 00022022 2e 93 |. | MOVE.L (A3),(A7) 00022024 48 6e ff ef |Hn | PEA.L (A6-0x11) 00022028 48 54 |HT | PEA.L (A4) 0002202a 48 78 00 07 |Hx | PEA.L 0x7 0002202e 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 00022034 de c3 | | ADDA.W D3,A7 00022036 2e 93 |. | MOVE.L (A3),(A7) 00022038 48 6e ff ed |Hn | PEA.L (A6-0x13) 0002203c 48 54 |HT | PEA.L (A4) 0002203e 48 54 |HT | PEA.L (A4) 00022040 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 00022046 de c3 | | ADDA.W D3,A7 00022048 2e 93 |. | MOVE.L (A3),(A7) 0002204a 48 6e ff f7 |Hn | PEA.L (A6-0x9) 0002204e 48 54 |HT | PEA.L (A4) 00022050 48 78 00 07 |Hx | PEA.L 0x7 00022054 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 0002205a de c3 | | ADDA.W D3,A7 0002205c 2e 93 |. | MOVE.L (A3),(A7) 0002205e 48 6e ff ed |Hn | PEA.L (A6-0x13) 00022062 48 54 |HT | PEA.L (A4) 00022064 48 54 |HT | PEA.L (A4) 00022066 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 0002206c de c4 | | ADDA.W D4,A7 0002206e 48 53 |HS | PEA.L (A3) 00022070 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00022076 58 4f |XO | ADDQ.L #0x4,A7 00022078 4a 2e ff ea |J. | TST.B (A6-0x16) 0002207c 67 00 01 78 |g x | BEQ 0x221f6 00022080 2f 3a e8 2c |/: , | MOVE.L 0x208ae,-(A7) 00022084 2f 3a e8 24 |/: $ | MOVE.L 0x208aa,-(A7) 00022088 2f 3a e8 1c |/: | MOVE.L 0x208a6,-(A7) 0002208c 3f 3a e8 28 |?: ( | MOVE.W 0x208b6,-(A7) 00022090 3f 3a e8 22 |?: " | MOVE.W 0x208b4,-(A7) 00022094 3f 3a e8 1c |?: | MOVE.W 0x208b2,-(A7) 00022098 51 4f |QO | SUBQ.L #0x8,A7 0002209a 48 6f 00 0e |Ho | PEA.L (A7+0xe) 0002209e 3f 02 |? | MOVE.W D2,-(A7) 000220a0 3f 03 |? | MOVE.W D3,-(A7) 000220a2 4e 92 |N | JSR (A2) 000220a4 58 4f |XO | ADDQ.L #0x4,A7 000220a6 42 80 |B | CLR.L D0 000220a8 10 2e ff eb | . | MOVE.B (A6-0x15),D0 000220ac e1 40 | @ | ASL.W #0x8,D0 000220ae 42 81 |B | CLR.L D1 000220b0 12 2e ff ec | . | MOVE.B (A6-0x14),D1 000220b4 d2 40 | @ | ADD.W D0,D1 000220b6 48 c1 |H | EXTW.L D1 000220b8 2f 01 |/ | MOVE.L D1,-(A7) 000220ba 48 78 00 03 |Hx | PEA.L 0x3 000220be 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 000220c4 58 4f |XO | ADDQ.L #0x4,A7 000220c6 48 6f 00 10 |Ho | PEA.L (A7+0x10) 000220ca 3f 02 |? | MOVE.W D2,-(A7) 000220cc 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 000220d0 4e 92 |N | JSR (A2) 000220d2 59 4f |YO | SUBQ.L #0x4,A7 000220d4 20 4f | O | MOVEA.L A7,A0 000220d6 43 ee ff ef |C | LEA.L (A6-0x11),A1 000220da 70 07 |p | MOVEQ.L #0x07,D0 000220dc 10 d9 | | MOVE.B (A1)+,(A0)+ 000220de 51 c8 ff fc |Q | DBF D0,0x220dc 000220e2 4e ba fd 90 |N | JSR 0x21e74 000220e6 50 4f |PO | ADDQ.L #0x8,A7 000220e8 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 000220ee de c4 | | ADDA.W D4,A7 000220f0 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000220f6 de c5 | | ADDA.W D5,A7 000220f8 42 80 |B | CLR.L D0 000220fa 10 2e ff ee | . | MOVE.B (A6-0x12),D0 000220fe 32 00 |2 | MOVE.W D0,D1 00022100 c2 44 | D | AND.W D4,D1 00022102 66 28 |f( | BNE 0x2212c 00022104 9e c3 | | SUBA.W D3,A7 00022106 20 4f | O | MOVEA.L A7,A0 00022108 43 fa e7 ae |C | LEA.L 0x208b8,A1 0002210c 72 0a |r | MOVEQ.L #0x0a,D1 0002210e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022110 51 c9 ff fc |Q | DBF D1,0x2210e 00022114 59 4f |YO | SUBQ.L #0x4,A7 00022116 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002211a 3f 02 |? | MOVE.W D2,-(A7) 0002211c 3f 07 |? | MOVE.W D7,-(A7) 0002211e 4e 92 |N | JSR (A2) 00022120 50 4f |PO | ADDQ.L #0x8,A7 00022122 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022128 de c4 | | ADDA.W D4,A7 0002212a 60 2c |`, | BRA 0x22158 0002212c 9e fc 00 0e | | SUBA.W #0xe,A7 00022130 20 4f | O | MOVEA.L A7,A0 00022132 43 fa e7 90 |C | LEA.L 0x208c4,A1 00022136 72 0c |r | MOVEQ.L #0x0c,D1 00022138 10 d9 | | MOVE.B (A1)+,(A0)+ 0002213a 51 c9 ff fc |Q | DBF D1,0x22138 0002213e 59 4f |YO | SUBQ.L #0x4,A7 00022140 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022144 3f 02 |? | MOVE.W D2,-(A7) 00022146 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 0002214a 4e 92 |N | JSR (A2) 0002214c 50 4f |PO | ADDQ.L #0x8,A7 0002214e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022154 de fc 00 12 | | ADDA.W #0x12,A7 00022158 41 fa e7 92 |A | LEA.L 0x208ec,A0 0002215c 72 0c |r | MOVEQ.L #0x0c,D1 0002215e 3f 20 |? | MOVE.W -(A0),-(A7) 00022160 51 c9 ff fc |Q | DBF D1,0x2215e 00022164 51 4f |QO | SUBQ.L #0x8,A7 00022166 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002216a 3f 02 |? | MOVE.W D2,-(A7) 0002216c 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 00022170 4e 92 |N | JSR (A2) 00022172 59 4f |YO | SUBQ.L #0x4,A7 00022174 20 4f | O | MOVEA.L A7,A0 00022176 43 ee ff f7 |C | LEA.L (A6-0x9),A1 0002217a 72 07 |r | MOVEQ.L #0x07,D1 0002217c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002217e 51 c9 ff fc |Q | DBF D1,0x2217c 00022182 4e ba fc f0 |N | JSR 0x21e74 00022186 50 4f |PO | ADDQ.L #0x8,A7 00022188 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002218e 50 4f |PO | ADDQ.L #0x8,A7 00022190 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00022196 de fc 00 1e | | ADDA.W #0x1e,A7 0002219a 02 40 00 20 | @ | ANDI.W #0x0020,D0 0002219e 66 28 |f( | BNE 0x221c8 000221a0 9e c3 | | SUBA.W D3,A7 000221a2 20 4f | O | MOVEA.L A7,A0 000221a4 43 fa e7 46 |C F | LEA.L 0x208ec,A1 000221a8 70 0a |p | MOVEQ.L #0x0a,D0 000221aa 10 d9 | | MOVE.B (A1)+,(A0)+ 000221ac 51 c8 ff fc |Q | DBF D0,0x221aa 000221b0 59 4f |YO | SUBQ.L #0x4,A7 000221b2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000221b6 3f 02 |? | MOVE.W D2,-(A7) 000221b8 3f 07 |? | MOVE.W D7,-(A7) 000221ba 4e 92 |N | JSR (A2) 000221bc 50 4f |PO | ADDQ.L #0x8,A7 000221be 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000221c4 de c4 | | ADDA.W D4,A7 000221c6 60 2c |`, | BRA 0x221f4 000221c8 9e fc 00 0e | | SUBA.W #0xe,A7 000221cc 20 4f | O | MOVEA.L A7,A0 000221ce 43 fa e7 28 |C ( | LEA.L 0x208f8,A1 000221d2 70 0c |p | MOVEQ.L #0x0c,D0 000221d4 10 d9 | | MOVE.B (A1)+,(A0)+ 000221d6 51 c8 ff fc |Q | DBF D0,0x221d4 000221da 59 4f |YO | SUBQ.L #0x4,A7 000221dc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000221e0 3f 02 |? | MOVE.W D2,-(A7) 000221e2 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 000221e6 4e 92 |N | JSR (A2) 000221e8 50 4f |PO | ADDQ.L #0x8,A7 000221ea 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000221f0 de fc 00 12 | | ADDA.W #0x12,A7 000221f4 60 2c |`, | BRA 0x22222 000221f6 9e fc 00 3e | > | SUBA.W #0x3e,A7 000221fa 20 4f | O | MOVEA.L A7,A0 000221fc 43 fa e7 08 |C | LEA.L 0x20906,A1 00022200 70 3c |p< | MOVEQ.L #0x3c,D0 00022202 10 d9 | | MOVE.B (A1)+,(A0)+ 00022204 51 c8 ff fc |Q | DBF D0,0x22202 00022208 59 4f |YO | SUBQ.L #0x4,A7 0002220a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002220e 3f 02 |? | MOVE.W D2,-(A7) 00022210 3f 3c 00 3d |?< = | MOVE.W #0x3d,-(A7) 00022214 4e 92 |N | JSR (A2) 00022216 50 4f |PO | ADDQ.L #0x8,A7 00022218 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002221e de fc 00 42 | B | ADDA.W #0x42,A7 00022222 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00022226 4e 5e |N^ | UNLK A6 00022228 4e 75 |Nu | RTS 0002222a ; -------------------------------------------------------------------------------------- 0002222a ; OMSI PASCAL Function 0002222a ; <LVAR 0x050 1(r)> 0002222a ; <LVAR 0x04c 4(r)> 0002222a ; <LVAR 0x049 1(r)> 0002222a ; <LVAR 0x048 1(r) 4(r)> 0002222a ; <LVAR 0x036 1(r)> 0002222a ; <LVAR 0x035 1(r)> 0002222a ; <LVAR 0x034 1(r)> 0002222a ; <LVAR 0x030 1(r)> 0002222a ; <LVAR 0x02f 1(r)> 0002222a ; <LVAR 0x02e 1(r)> 0002222a ; <LVAR 0x02c 1(r)> 0002222a ; <LVAR 0x02b 1(r)> 0002222a ; <LVAR 0x025 1(r)> 0002222a ; <LVAR 0x024 1(r)> 0002222a ; <LVAR 0x01f 1(r)> 0002222a ; <LVAR 0x01e 1(r)> 0002222a ; <LVAR 0x018 4(r)> 0002222a ; <LVAR 0x014 4(r)> 0002222a ; <LVAR 0x010 4(r)> 0002222a ; <LVAR 0x00c 4(r)> 0002222a ; <LVAR 0x008 4(r)> 0002222a ; <LVAR -0x001 @ 1(r)> 0002222a ; <LVAR -0x002 @ 1(r)> 0002222a ; <LVAR -0x003 @> 0002222a ; <LVAR -0x00a @ 1(r)> 0002222a ; -------------------------------------------------------------------------------------- 0002222a 4e 56 ff 64 |NV d | LINK.W A6,#0xff64 0002222e bf d5 | | CMPA.L (A5),A7 00022230 62 06 |b | BHI 0x22238 00022232 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022236 4e 76 |Nv | TRAPV 00022238 de fc 00 92 | | ADDA.W #0x92,A7 0002223c 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022240 74 01 |t | MOVEQ.L #0x01,D2 00022242 76 18 |v | MOVEQ.L #0x18,D3 00022244 78 06 |x | MOVEQ.L #0x06,D4 00022246 7a 0c |z | MOVEQ.L #0x0c,D5 00022248 7c 1e || | MOVEQ.L #0x1e,D6 0002224a 20 6e 00 18 | n | MOVEA.L (A6+0x18),A0 0002224e 2f 08 |/ | MOVE.L A0,-(A7) 00022250 10 82 | | MOVE.B D2,(A0) 00022252 22 6e 00 14 |"n | MOVEA.L (A6+0x14),A1 00022256 3f 3a e6 f0 |?: | MOVE.W 0x20948,-(A7) 0002225a 3f 3a e6 ea |?: | MOVE.W 0x20946,-(A7) 0002225e 3f 3a e6 e4 |?: | MOVE.W 0x20944,-(A7) 00022262 59 4f |YO | SUBQ.L #0x4,A7 00022264 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022268 3f 02 |? | MOVE.W D2,-(A7) 0002226a 3f 04 |? | MOVE.W D4,-(A7) 0002226c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022272 50 4f |PO | ADDQ.L #0x8,A7 00022274 22 9f |" | MOVE.L (A7)+,(A1) 00022276 5c 4f |\O | ADDQ.L #0x6,A7 00022278 24 6e 00 10 |$n | MOVEA.L (A6+0x10),A2 0002227c 10 2e 00 50 | . P | MOVE.B (A6+0x50),D0 00022280 48 80 |H | EXTB.W D0 00022282 72 1e |r | MOVEQ.L #0x1e,D1 00022284 c3 c0 | | MULS.W D0,D1 00022286 47 fa e9 0a |G | LEA.L 0x20b92,A3 0002228a 9e c6 | | SUBA.W D6,A7 0002228c 20 4f | O | MOVEA.L A7,A0 0002228e 47 f3 10 00 |G | LEA.L (A3+D1.W),A3 00022292 72 1d |r | MOVEQ.L #0x1d,D1 00022294 10 db | | MOVE.B (A3)+,(A0)+ 00022296 51 c9 ff fc |Q | DBF D1,0x22294 0002229a 59 4f |YO | SUBQ.L #0x4,A7 0002229c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000222a0 3f 02 |? | MOVE.W D2,-(A7) 000222a2 3f 06 |? | MOVE.W D6,-(A7) 000222a4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000222aa 50 4f |PO | ADDQ.L #0x8,A7 000222ac 24 9f |$ | MOVE.L (A7)+,(A2) 000222ae de fc 00 1a | | ADDA.W #0x1a,A7 000222b2 2e 92 |. | MOVE.L (A2),(A7) 000222b4 1f 3c 00 5c | < \ | MOVE.B #0x5c,-(A7) 000222b8 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000222be 5c 4f |\O | ADDQ.L #0x6,A7 000222c0 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000222c4 2f 08 |/ | MOVE.L A0,-(A7) 000222c6 10 82 | | MOVE.B D2,(A0) 000222c8 26 6e 00 08 |&n | MOVEA.L (A6+0x8),A3 000222cc 16 bc 00 27 | ' | MOVE.B #0x27,(A3) 000222d0 32 00 |2 | MOVE.W D0,D1 000222d2 57 41 |WA | SUBQ.W #0x3,D1 000222d4 0c 41 00 07 | A | CMPI.W #0x0007,D1 000222d8 62 00 05 ba |b | BHI switch@0x222de[0x3] 000222dc d2 41 | A | ADD.W D1,D1 000222de 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W 000222e6 00 10 | | .CONST 0x10 ; [0x0] -> 0x222f6 000222e8 00 10 | | .CONST 0x10 ; [0x1] -> 0x222f6 000222ea 00 10 | | .CONST 0x10 ; [0x2] -> 0x222f6 000222ec 05 ae | | .CONST 0x5ae ; [0x3] -> 0x22894 000222ee 00 ea | | .CONST 0xea ; [0x4] -> 0x223d0 000222f0 01 2a | * | .CONST 0x12a ; [0x5] -> 0x22410 000222f2 05 ae | | .CONST 0x5ae ; [0x6] -> 0x22894 000222f4 05 64 | d | .CONST 0x564 ; [0x7] -> 0x2284a 000222f6 switch@0x222de[0x0]: 000222f6 switch@0x222de[0x1]: 000222f6 switch@0x222de[0x2]: 000222f6 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000222fc 48 c0 |H | EXTW.L D0 000222fe 2f 00 |/ | MOVE.L D0,-(A7) 00022300 4e b9 00 01 05 0e |N | JSR IPC_PutLong(a : L) 00022306 2e ae 00 4c |. L | MOVE.L (A6+0x4c),(A7) 0002230a 2f 2e 00 48 |/. H | MOVE.L (A6+0x48),-(A7) 0002230e 48 57 |HW | PEA.L (A7) 00022310 48 78 00 00 |Hx | PEA.L 0x0 00022314 48 78 00 07 |Hx | PEA.L 0x7 00022318 4e b9 00 01 04 fc |N | JSR IPC_PutVar(src : Pointer; length : Long ; type : Long) 0002231e de fc 00 14 | | ADDA.W #0x14,A7 00022322 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 00022328 3f 3a e6 24 |?: $ | MOVE.W 0x2094e,-(A7) 0002232c 3f 3a e6 1e |?: | MOVE.W 0x2094c,-(A7) 00022330 3f 3a e6 18 |?: | MOVE.W 0x2094a,-(A7) 00022334 59 4f |YO | SUBQ.L #0x4,A7 00022336 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002233a 3f 02 |? | MOVE.W D2,-(A7) 0002233c 3f 04 |? | MOVE.W D4,-(A7) 0002233e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022344 50 4f |PO | ADDQ.L #0x8,A7 00022346 48 78 00 01 |Hx | PEA.L 0x1 0002234a 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 0002234e 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00022352 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00022358 de fc 00 14 | | ADDA.W #0x14,A7 0002235c 4a 2e ff f6 |J. | TST.B (A6-0xa) 00022360 67 0e |g | BEQ 0x22370 00022362 1f 04 | | MOVE.B D4,-(A7) 00022364 48 78 00 01 |Hx | PEA.L 0x1 00022368 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002236e 5c 4f |\O | ADDQ.L #0x6,A7 00022370 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00022376 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 0002237a 48 50 |HP | PEA.L (A0) 0002237c 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00022382 58 4f |XO | ADDQ.L #0x4,A7 00022384 48 51 |HQ | PEA.L (A1) 00022386 4e b9 00 01 05 2c |N , | JSR IPC_GetString(VAR retval : String) 0002238c 58 4f |XO | ADDQ.L #0x4,A7 0002238e 48 52 |HR | PEA.L (A2) 00022390 4e b9 00 01 05 2c |N , | JSR IPC_GetString(VAR retval : String) 00022396 58 4f |XO | ADDQ.L #0x4,A7 00022398 20 57 | W | MOVEA.L (A7),A0 0002239a 48 50 |HP | PEA.L (A0) 0002239c 48 78 00 00 |Hx | PEA.L 0x0 000223a0 48 78 00 00 |Hx | PEA.L 0x0 000223a4 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 000223aa de c5 | | ADDA.W D5,A7 000223ac 48 53 |HS | PEA.L (A3) 000223ae 48 78 00 00 |Hx | PEA.L 0x0 000223b2 48 78 00 07 |Hx | PEA.L 0x7 000223b6 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 000223bc de c5 | | ADDA.W D5,A7 000223be 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 000223c4 4e b9 00 01 05 c8 |N | JSR And_fc0c_7f(void) 000223ca 50 4f |PO | ADDQ.L #0x8,A7 000223cc 60 00 04 ca |` | BRA 0x22898 000223d0 switch@0x222de[0x4]: 000223d0 42 80 |B | CLR.L D0 000223d2 10 2e 00 48 | . H | MOVE.B (A6+0x48),D0 000223d6 b0 44 | D | CMP.W D4,D0 000223d8 67 0a |g | BEQ 0x223e4 000223da 42 81 |B | CLR.L D1 000223dc 12 2e 00 49 | . I | MOVE.B (A6+0x49),D1 000223e0 b2 44 | D | CMP.W D4,D1 000223e2 66 08 |f | BNE 0x223ec 000223e4 1f 04 | | MOVE.B D4,-(A7) 000223e6 4e ba fb 3e |N > | JSR 0x21f26 000223ea 54 4f |TO | ADDQ.L #0x2,A7 000223ec 0c 40 00 07 | @ | CMPI.W #0x0007,D0 000223f0 67 0c |g | BEQ 0x223fe 000223f2 42 80 |B | CLR.L D0 000223f4 10 2e 00 49 | . I | MOVE.B (A6+0x49),D0 000223f8 0c 40 00 07 | @ | CMPI.W #0x0007,D0 000223fc 66 0a |f | BNE 0x22408 000223fe 1f 3c 00 07 | < | MOVE.B #0x07,-(A7) 00022402 4e ba fb 22 |N " | JSR 0x21f26 00022406 54 4f |TO | ADDQ.L #0x2,A7 00022408 42 10 |B | CLR.B (A0) 0002240a 50 4f |PO | ADDQ.L #0x8,A7 0002240c 60 00 04 8a |` | BRA 0x22898 00022410 switch@0x222de[0x5]: 00022410 38 42 |8B | MOVEA.W D2,A4 00022412 7e 0f |~ | MOVEQ.L #0x0f,D7 00022414 b8 c2 | | CMPA.W D2,A4 00022416 66 42 |fB | BNE 0x2245a 00022418 55 4f |UO | SUBQ.L #0x2,A7 0002241a 1f 07 | | MOVE.B D7,-(A7) 0002241c 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00022422 54 4f |TO | ADDQ.L #0x2,A7 00022424 4a 1f |J | TST.B (A7)+ 00022426 67 32 |g2 | BEQ 0x2245a 00022428 1f 07 | | MOVE.B D7,-(A7) 0002242a 48 6e ff fe |Hn | PEA.L (A6-0x2) 0002242e 48 6e ff ff |Hn | PEA.L (A6-0x1) 00022432 48 6e ff fd |Hn | PEA.L (A6-0x3) 00022436 4e b9 00 02 2a de |N * | JSR 0x22ade 0002243c de fc 00 0e | | ADDA.W #0xe,A7 00022440 4a 2e ff ff |J. | TST.B (A6-0x1) 00022444 66 06 |f | BNE 0x2244c 00022446 4a 2e ff fe |J. | TST.B (A6-0x2) 0002244a 67 0e |g | BEQ 0x2245a 0002244c 59 4f |YO | SUBQ.L #0x4,A7 0002244e 1f 07 | | MOVE.B D7,-(A7) 00022450 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00022456 54 4f |TO | ADDQ.L #0x2,A7 00022458 28 5f |(_ | MOVEA.L (A7)+,A4 0002245a 53 07 |S | SUBQ.B #0x1,D7 0002245c be 05 | | CMP.B D5,D7 0002245e 6c b4 |l | BGE 0x22414 00022460 b8 c2 | | CMPA.W D2,A4 00022462 66 1c |f | BNE 0x22480 00022464 2f 3a e4 ea |/: | MOVE.L 0x20950,-(A7) 00022468 59 4f |YO | SUBQ.L #0x4,A7 0002246a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002246e 3f 02 |? | MOVE.W D2,-(A7) 00022470 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00022474 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002247a 50 4f |PO | ADDQ.L #0x8,A7 0002247c 28 5f |(_ | MOVEA.L (A7)+,A4 0002247e 58 4f |XO | ADDQ.L #0x4,A7 00022480 4a 2e 00 36 |J. 6 | TST.B (A6+0x36) 00022484 66 14 |f | BNE 0x2249a 00022486 4a 2e 00 30 |J. 0 | TST.B (A6+0x30) 0002248a 66 0e |f | BNE 0x2249a 0002248c 4a 2e 00 2b |J. + | TST.B (A6+0x2b) 00022490 66 08 |f | BNE 0x2249a 00022492 4a 2e 00 1e |J. | TST.B (A6+0x1e) 00022496 67 00 01 12 |g | BEQ 0x225aa 0002249a 42 80 |B | CLR.L D0 0002249c 10 39 00 02 30 d9 | 9 0 | MOVE.B 0x230d9,D0 000224a2 02 40 00 0f | @ | ANDI.W #0x000f,D0 000224a6 0c 40 00 0f | @ | CMPI.W #0x000f,D0 000224aa 62 00 00 d0 |b | BHI switch@0x224b0[0x6] 000224ae d0 40 | @ | ADD.W D0,D0 000224b0 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000224b8 00 20 | | .CONST 0x20 ; [0x0] -> 0x224d8 000224ba 00 20 | | .CONST 0x20 ; [0x1] -> 0x224d8 000224bc 00 52 | R | .CONST 0x52 ; [0x2] -> 0x2250a 000224be 00 52 | R | .CONST 0x52 ; [0x3] -> 0x2250a 000224c0 00 64 | d | .CONST 0x64 ; [0x4] -> 0x2251c 000224c2 00 76 | v | .CONST 0x76 ; [0x5] -> 0x2252e 000224c4 00 c4 | | .CONST 0xc4 ; [0x6] -> 0x2257c 000224c6 00 c4 | | .CONST 0xc4 ; [0x7] -> 0x2257c 000224c8 00 20 | | .CONST 0x20 ; [0x8] -> 0x224d8 000224ca 00 20 | | .CONST 0x20 ; [0x9] -> 0x224d8 000224cc 00 52 | R | .CONST 0x52 ; [0xa] -> 0x2250a 000224ce 00 52 | R | .CONST 0x52 ; [0xb] -> 0x2250a 000224d0 00 88 | | .CONST 0x88 ; [0xc] -> 0x22540 000224d2 00 88 | | .CONST 0x88 ; [0xd] -> 0x22540 000224d4 00 88 | | .CONST 0x88 ; [0xe] -> 0x22540 000224d6 00 88 | | .CONST 0x88 ; [0xf] -> 0x22540 000224d8 switch@0x224b0[0x0]: 000224d8 switch@0x224b0[0x1]: 000224d8 switch@0x224b0[0x8]: 000224d8 switch@0x224b0[0x9]: 000224d8 9e c3 | | SUBA.W D3,A7 000224da 20 4f | O | MOVEA.L A7,A0 000224dc 43 fa e4 76 |C v | LEA.L 0x20954,A1 000224e0 70 16 |p | MOVEQ.L #0x16,D0 000224e2 10 d9 | | MOVE.B (A1)+,(A0)+ 000224e4 51 c8 ff fc |Q | DBF D0,0x224e2 000224e8 59 4f |YO | SUBQ.L #0x4,A7 000224ea 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000224ee 3f 02 |? | MOVE.W D2,-(A7) 000224f0 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 000224f4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000224fa 50 4f |PO | ADDQ.L #0x8,A7 000224fc 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022502 de fc 00 1c | | ADDA.W #0x1c,A7 00022506 60 00 00 a2 |` | BRA 0x225aa 0002250a switch@0x224b0[0x2]: 0002250a switch@0x224b0[0x3]: 0002250a switch@0x224b0[0xa]: 0002250a switch@0x224b0[0xb]: 0002250a 9e c3 | | SUBA.W D3,A7 0002250c 20 4f | O | MOVEA.L A7,A0 0002250e 43 fa e4 5c |C \ | LEA.L 0x2096c,A1 00022512 70 16 |p | MOVEQ.L #0x16,D0 00022514 10 d9 | | MOVE.B (A1)+,(A0)+ 00022516 51 c8 ff fc |Q | DBF D0,0x22514 0002251a 60 cc |` | BRA 0x224e8 0002251c switch@0x224b0[0x4]: 0002251c 9e c3 | | SUBA.W D3,A7 0002251e 20 4f | O | MOVEA.L A7,A0 00022520 43 fa e4 62 |C b | LEA.L 0x20984,A1 00022524 70 16 |p | MOVEQ.L #0x16,D0 00022526 10 d9 | | MOVE.B (A1)+,(A0)+ 00022528 51 c8 ff fc |Q | DBF D0,0x22526 0002252c 60 ba |` | BRA 0x224e8 0002252e switch@0x224b0[0x5]: 0002252e 9e c3 | | SUBA.W D3,A7 00022530 20 4f | O | MOVEA.L A7,A0 00022532 43 fa e4 68 |C h | LEA.L 0x2099c,A1 00022536 70 16 |p | MOVEQ.L #0x16,D0 00022538 10 d9 | | MOVE.B (A1)+,(A0)+ 0002253a 51 c8 ff fc |Q | DBF D0,0x22538 0002253e 60 a8 |` | BRA 0x224e8 00022540 switch@0x224b0[0xc]: 00022540 switch@0x224b0[0xd]: 00022540 switch@0x224b0[0xe]: 00022540 switch@0x224b0[0xf]: 00022540 41 fa e4 a2 |A | LEA.L 0x209e4,A0 00022544 70 0b |p | MOVEQ.L #0x0b,D0 00022546 2f 20 |/ | MOVE.L -(A0),-(A7) 00022548 51 c8 ff fc |Q | DBF D0,0x22546 0002254c 51 4f |QO | SUBQ.L #0x8,A7 0002254e 2f 0c |/ | MOVE.L A4,-(A7) 00022550 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00022556 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002255a 3f 02 |? | MOVE.W D2,-(A7) 0002255c 3f 3c 00 30 |?< 0 | MOVE.W #0x30,-(A7) 00022560 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022566 50 4f |PO | ADDQ.L #0x8,A7 00022568 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002256e 50 4f |PO | ADDQ.L #0x8,A7 00022570 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022576 de fc 00 34 | 4 | ADDA.W #0x34,A7 0002257a 60 2e |`. | BRA 0x225aa 0002257c switch@0x224b0[0x6]: 0002257c switch@0x224b0[0x7]: 0002257c 9e c6 | | SUBA.W D6,A7 0002257e 20 4f | O | MOVEA.L A7,A0 00022580 43 fa e4 62 |C b | LEA.L 0x209e4,A1 00022584 70 1c |p | MOVEQ.L #0x1c,D0 00022586 10 d9 | | MOVE.B (A1)+,(A0)+ 00022588 51 c8 ff fc |Q | DBF D0,0x22586 0002258c 59 4f |YO | SUBQ.L #0x4,A7 0002258e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022592 3f 02 |? | MOVE.W D2,-(A7) 00022594 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 00022598 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002259e 50 4f |PO | ADDQ.L #0x8,A7 000225a0 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000225a6 de fc 00 22 | " | ADDA.W #0x22,A7 000225aa 4a 2e 00 35 |J. 5 | TST.B (A6+0x35) 000225ae 66 14 |f | BNE 0x225c4 000225b0 4a 2e 00 2f |J. / | TST.B (A6+0x2f) 000225b4 66 0e |f | BNE 0x225c4 000225b6 4a 2e 00 24 |J. $ | TST.B (A6+0x24) 000225ba 66 08 |f | BNE 0x225c4 000225bc 4a 2e 00 1f |J. | TST.B (A6+0x1f) 000225c0 67 00 01 4e |g N | BEQ 0x22710 000225c4 42 80 |B | CLR.L D0 000225c6 10 39 00 02 30 d9 | 9 0 | MOVE.B 0x230d9,D0 000225cc 02 40 00 0f | @ | ANDI.W #0x000f,D0 000225d0 0c 40 00 0f | @ | CMPI.W #0x000f,D0 000225d4 62 00 01 0c |b | BHI switch@0x225da[0x6] 000225d8 d0 40 | @ | ADD.W D0,D0 000225da 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000225e2 00 20 | | .CONST 0x20 ; [0x0] -> 0x22602 000225e4 00 52 | R | .CONST 0x52 ; [0x1] -> 0x22634 000225e6 00 20 | | .CONST 0x20 ; [0x2] -> 0x22602 000225e8 00 52 | R | .CONST 0x52 ; [0x3] -> 0x22634 000225ea 00 64 | d | .CONST 0x64 ; [0x4] -> 0x22646 000225ec 00 76 | v | .CONST 0x76 ; [0x5] -> 0x22658 000225ee 01 00 | | .CONST 0x100 ; [0x6] -> 0x226e2 000225f0 01 00 | | .CONST 0x100 ; [0x7] -> 0x226e2 000225f2 00 88 | | .CONST 0x88 ; [0x8] -> 0x2266a 000225f4 00 88 | | .CONST 0x88 ; [0x9] -> 0x2266a 000225f6 00 88 | | .CONST 0x88 ; [0xa] -> 0x2266a 000225f8 00 88 | | .CONST 0x88 ; [0xb] -> 0x2266a 000225fa 00 c4 | | .CONST 0xc4 ; [0xc] -> 0x226a6 000225fc 00 c4 | | .CONST 0xc4 ; [0xd] -> 0x226a6 000225fe 00 c4 | | .CONST 0xc4 ; [0xe] -> 0x226a6 00022600 00 c4 | | .CONST 0xc4 ; [0xf] -> 0x226a6 00022602 switch@0x225da[0x0]: 00022602 switch@0x225da[0x2]: 00022602 9e c3 | | SUBA.W D3,A7 00022604 20 4f | O | MOVEA.L A7,A0 00022606 43 fa e3 fa |C | LEA.L 0x20a02,A1 0002260a 70 16 |p | MOVEQ.L #0x16,D0 0002260c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002260e 51 c8 ff fc |Q | DBF D0,0x2260c 00022612 59 4f |YO | SUBQ.L #0x4,A7 00022614 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022618 3f 02 |? | MOVE.W D2,-(A7) 0002261a 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 0002261e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022624 50 4f |PO | ADDQ.L #0x8,A7 00022626 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002262c de fc 00 1c | | ADDA.W #0x1c,A7 00022630 60 00 00 de |` | BRA 0x22710 00022634 switch@0x225da[0x1]: 00022634 switch@0x225da[0x3]: 00022634 9e c3 | | SUBA.W D3,A7 00022636 20 4f | O | MOVEA.L A7,A0 00022638 43 fa e3 e0 |C | LEA.L 0x20a1a,A1 0002263c 70 16 |p | MOVEQ.L #0x16,D0 0002263e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022640 51 c8 ff fc |Q | DBF D0,0x2263e 00022644 60 cc |` | BRA 0x22612 00022646 switch@0x225da[0x4]: 00022646 9e c3 | | SUBA.W D3,A7 00022648 20 4f | O | MOVEA.L A7,A0 0002264a 43 fa e3 e6 |C | LEA.L 0x20a32,A1 0002264e 70 16 |p | MOVEQ.L #0x16,D0 00022650 10 d9 | | MOVE.B (A1)+,(A0)+ 00022652 51 c8 ff fc |Q | DBF D0,0x22650 00022656 60 ba |` | BRA 0x22612 00022658 switch@0x225da[0x5]: 00022658 9e c3 | | SUBA.W D3,A7 0002265a 20 4f | O | MOVEA.L A7,A0 0002265c 43 fa e3 ec |C | LEA.L 0x20a4a,A1 00022660 70 16 |p | MOVEQ.L #0x16,D0 00022662 10 d9 | | MOVE.B (A1)+,(A0)+ 00022664 51 c8 ff fc |Q | DBF D0,0x22662 00022668 60 a8 |` | BRA 0x22612 0002266a switch@0x225da[0x8]: 0002266a switch@0x225da[0x9]: 0002266a switch@0x225da[0xa]: 0002266a switch@0x225da[0xb]: 0002266a 41 fa e4 08 |A | LEA.L 0x20a74,A0 0002266e 70 08 |p | MOVEQ.L #0x08,D0 00022670 3f 20 |? | MOVE.W -(A0),-(A7) 00022672 51 c8 ff fc |Q | DBF D0,0x22670 00022676 51 4f |QO | SUBQ.L #0x8,A7 00022678 2f 0c |/ | MOVE.L A4,-(A7) 0002267a 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00022680 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00022684 3f 02 |? | MOVE.W D2,-(A7) 00022686 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 0002268a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022690 50 4f |PO | ADDQ.L #0x8,A7 00022692 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022698 50 4f |PO | ADDQ.L #0x8,A7 0002269a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000226a0 de fc 00 16 | | ADDA.W #0x16,A7 000226a4 60 6a |`j | BRA 0x22710 000226a6 switch@0x225da[0xc]: 000226a6 switch@0x225da[0xd]: 000226a6 switch@0x225da[0xe]: 000226a6 switch@0x225da[0xf]: 000226a6 41 fa e3 fc |A | LEA.L 0x20aa4,A0 000226aa 70 0b |p | MOVEQ.L #0x0b,D0 000226ac 2f 20 |/ | MOVE.L -(A0),-(A7) 000226ae 51 c8 ff fc |Q | DBF D0,0x226ac 000226b2 51 4f |QO | SUBQ.L #0x8,A7 000226b4 2f 0c |/ | MOVE.L A4,-(A7) 000226b6 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 000226bc 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000226c0 3f 02 |? | MOVE.W D2,-(A7) 000226c2 3f 3c 00 30 |?< 0 | MOVE.W #0x30,-(A7) 000226c6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000226cc 50 4f |PO | ADDQ.L #0x8,A7 000226ce 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000226d4 50 4f |PO | ADDQ.L #0x8,A7 000226d6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000226dc de fc 00 34 | 4 | ADDA.W #0x34,A7 000226e0 60 2e |`. | BRA 0x22710 000226e2 switch@0x225da[0x6]: 000226e2 switch@0x225da[0x7]: 000226e2 9e c6 | | SUBA.W D6,A7 000226e4 20 4f | O | MOVEA.L A7,A0 000226e6 43 fa e3 bc |C | LEA.L 0x20aa4,A1 000226ea 70 1c |p | MOVEQ.L #0x1c,D0 000226ec 10 d9 | | MOVE.B (A1)+,(A0)+ 000226ee 51 c8 ff fc |Q | DBF D0,0x226ec 000226f2 59 4f |YO | SUBQ.L #0x4,A7 000226f4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000226f8 3f 02 |? | MOVE.W D2,-(A7) 000226fa 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 000226fe 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022704 50 4f |PO | ADDQ.L #0x8,A7 00022706 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002270c de fc 00 22 | " | ADDA.W #0x22,A7 00022710 4a 2e 00 34 |J. 4 | TST.B (A6+0x34) 00022714 67 00 00 92 |g | BEQ 0x227a8 00022718 42 80 |B | CLR.L D0 0002271a 10 39 00 02 30 d9 | 9 0 | MOVE.B 0x230d9,D0 00022720 e8 40 | @ | ASR.W #0x4,D0 00022722 02 40 00 03 | @ | ANDI.W #0x0003,D0 00022726 0c 40 00 03 | @ | CMPI.W #0x0003,D0 0002272a 63 02 |c | BLS 0x2272e 0002272c 4e 4e |NN | TRAP #14 0002272e d0 40 | @ | ADD.W D0,D0 00022730 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00022738 00 08 | | .CONST 0x8 ; [0x0] -> 0x22740 0002273a 00 1a | | .CONST 0x1a ; [0x1] -> 0x22752 0002273c 00 2c | , | .CONST 0x2c ; [0x2] -> 0x22764 0002273e 00 3e | > | .CONST 0x3e ; [0x3] -> 0x22776 00022740 switch@0x22730[0x0]: 00022740 9e c3 | | SUBA.W D3,A7 00022742 20 4f | O | MOVEA.L A7,A0 00022744 43 fa e3 7c |C | | LEA.L 0x20ac2,A1 00022748 70 16 |p | MOVEQ.L #0x16,D0 0002274a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002274c 51 c8 ff fc |Q | DBF D0,0x2274a 00022750 60 34 |`4 | BRA 0x22786 00022752 switch@0x22730[0x1]: 00022752 9e c3 | | SUBA.W D3,A7 00022754 20 4f | O | MOVEA.L A7,A0 00022756 43 fa e3 82 |C | LEA.L 0x20ada,A1 0002275a 70 16 |p | MOVEQ.L #0x16,D0 0002275c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002275e 51 c8 ff fc |Q | DBF D0,0x2275c 00022762 60 22 |`" | BRA 0x22786 00022764 switch@0x22730[0x2]: 00022764 9e c3 | | SUBA.W D3,A7 00022766 20 4f | O | MOVEA.L A7,A0 00022768 43 fa e3 88 |C | LEA.L 0x20af2,A1 0002276c 70 16 |p | MOVEQ.L #0x16,D0 0002276e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022770 51 c8 ff fc |Q | DBF D0,0x2276e 00022774 60 10 |` | BRA 0x22786 00022776 switch@0x22730[0x3]: 00022776 9e c3 | | SUBA.W D3,A7 00022778 20 4f | O | MOVEA.L A7,A0 0002277a 43 fa e3 8e |C | LEA.L 0x20b0a,A1 0002277e 70 16 |p | MOVEQ.L #0x16,D0 00022780 10 d9 | | MOVE.B (A1)+,(A0)+ 00022782 51 c8 ff fc |Q | DBF D0,0x22780 00022786 59 4f |YO | SUBQ.L #0x4,A7 00022788 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002278c 3f 02 |? | MOVE.W D2,-(A7) 0002278e 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00022792 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022798 50 4f |PO | ADDQ.L #0x8,A7 0002279a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000227a0 de fc 00 1c | | ADDA.W #0x1c,A7 000227a4 60 00 00 9e |` | BRA 0x22844 000227a8 4a 2e 00 2e |J. . | TST.B (A6+0x2e) 000227ac 66 0e |f | BNE 0x227bc 000227ae 4a 2e 00 25 |J. % | TST.B (A6+0x25) 000227b2 66 08 |f | BNE 0x227bc 000227b4 4a 2e 00 2c |J. , | TST.B (A6+0x2c) 000227b8 67 00 00 8a |g | BEQ 0x22844 000227bc 42 80 |B | CLR.L D0 000227be 10 39 00 02 30 db | 9 0 | MOVE.B 0x230db,D0 000227c4 e8 40 | @ | ASR.W #0x4,D0 000227c6 02 40 00 03 | @ | ANDI.W #0x0003,D0 000227ca 0c 40 00 03 | @ | CMPI.W #0x0003,D0 000227ce 63 02 |c | BLS 0x227d2 000227d0 4e 4e |NN | TRAP #14 000227d2 d0 40 | @ | ADD.W D0,D0 000227d4 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000227dc 00 08 | | .CONST 0x8 ; [0x0] -> 0x227e4 000227de 00 1a | | .CONST 0x1a ; [0x1] -> 0x227f6 000227e0 00 2c | , | .CONST 0x2c ; [0x2] -> 0x22808 000227e2 00 3e | > | .CONST 0x3e ; [0x3] -> 0x2281a 000227e4 switch@0x227d4[0x0]: 000227e4 9e c3 | | SUBA.W D3,A7 000227e6 20 4f | O | MOVEA.L A7,A0 000227e8 43 fa e3 38 |C 8 | LEA.L 0x20b22,A1 000227ec 70 16 |p | MOVEQ.L #0x16,D0 000227ee 10 d9 | | MOVE.B (A1)+,(A0)+ 000227f0 51 c8 ff fc |Q | DBF D0,0x227ee 000227f4 60 34 |`4 | BRA 0x2282a 000227f6 switch@0x227d4[0x1]: 000227f6 9e c3 | | SUBA.W D3,A7 000227f8 20 4f | O | MOVEA.L A7,A0 000227fa 43 fa e3 3e |C > | LEA.L 0x20b3a,A1 000227fe 70 16 |p | MOVEQ.L #0x16,D0 00022800 10 d9 | | MOVE.B (A1)+,(A0)+ 00022802 51 c8 ff fc |Q | DBF D0,0x22800 00022806 60 22 |`" | BRA 0x2282a 00022808 switch@0x227d4[0x2]: 00022808 9e c3 | | SUBA.W D3,A7 0002280a 20 4f | O | MOVEA.L A7,A0 0002280c 43 fa e3 44 |C D | LEA.L 0x20b52,A1 00022810 70 16 |p | MOVEQ.L #0x16,D0 00022812 10 d9 | | MOVE.B (A1)+,(A0)+ 00022814 51 c8 ff fc |Q | DBF D0,0x22812 00022818 60 10 |` | BRA 0x2282a 0002281a switch@0x227d4[0x3]: 0002281a 9e c3 | | SUBA.W D3,A7 0002281c 20 4f | O | MOVEA.L A7,A0 0002281e 43 fa e3 4a |C J | LEA.L 0x20b6a,A1 00022822 70 16 |p | MOVEQ.L #0x16,D0 00022824 10 d9 | | MOVE.B (A1)+,(A0)+ 00022826 51 c8 ff fc |Q | DBF D0,0x22824 0002282a 59 4f |YO | SUBQ.L #0x4,A7 0002282c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022830 3f 02 |? | MOVE.W D2,-(A7) 00022832 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00022836 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002283c 50 4f |PO | ADDQ.L #0x8,A7 0002283e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022844 de fc 00 24 | $ | ADDA.W #0x24,A7 00022848 60 4e |`N | BRA 0x22898 0002284a switch@0x222de[0x7]: 0002284a 55 4f |UO | SUBQ.L #0x2,A7 0002284c 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00022852 4a 1f |J | TST.B (A7)+ 00022854 66 3a |f: | BNE 0x22890 00022856 42 80 |B | CLR.L D0 00022858 10 2e 00 48 | . H | MOVE.B (A6+0x48),D0 0002285c b0 45 | E | CMP.W D5,D0 0002285e 67 0a |g | BEQ 0x2286a 00022860 42 81 |B | CLR.L D1 00022862 12 2e 00 49 | . I | MOVE.B (A6+0x49),D1 00022866 b2 45 | E | CMP.W D5,D1 00022868 66 08 |f | BNE 0x22872 0002286a 1f 05 | | MOVE.B D5,-(A7) 0002286c 4e ba f4 a8 |N | JSR 0x21d16 00022870 54 4f |TO | ADDQ.L #0x2,A7 00022872 0c 40 00 0e | @ | CMPI.W #0x000e,D0 00022876 67 0c |g | BEQ 0x22884 00022878 42 80 |B | CLR.L D0 0002287a 10 2e 00 49 | . I | MOVE.B (A6+0x49),D0 0002287e 0c 40 00 0e | @ | CMPI.W #0x000e,D0 00022882 66 0a |f | BNE 0x2288e 00022884 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00022888 4e ba f4 8c |N | JSR 0x21d16 0002288c 54 4f |TO | ADDQ.L #0x2,A7 0002288e 42 10 |B | CLR.B (A0) 00022890 50 4f |PO | ADDQ.L #0x8,A7 00022892 60 04 |` | BRA 0x22898 00022894 switch@0x222de[0x3]: 00022894 switch@0x222de[0x6]: 00022894 10 82 | | MOVE.B D2,(A0) 00022896 50 4f |PO | ADDQ.L #0x8,A7 00022898 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 0002289c 4e 5e |N^ | UNLK A6 0002289e 4e 75 |Nu | RTS 000228a0 ; -------------------------------------------------------------------------------------- 000228a0 ; OMSI PASCAL Function 000228a0 ; -------------------------------------------------------------------------------------- 000228a0 START: 000228a0 4f fa 00 08 |O | LEA.L MAIN,A7 000228a4 4e f9 00 01 02 80 |N | JMP ?start_program 000228aa MAIN: 000228aa 45 f9 00 02 30 f7 |E 0 | LEA.L 0x230f7,A2 000228b0 47 f9 00 02 30 e3 |G 0 | LEA.L 0x230e3,A3 000228b6 49 f9 00 02 30 50 |I 0P | LEA.L 0x23050,A4 000228bc 74 07 |t | MOVEQ.L #0x07,D2 000228be 4e b9 00 01 03 98 |N | JSR FSCALL_10398 000228c4 48 79 00 02 30 e2 |Hy 0 | PEA.L 0x230e2 000228ca 48 53 |HS | PEA.L (A3) 000228cc 4e b9 00 01 05 44 |N D | JSR IPC_InitGetTwoBools(VAR a : Bool; VAR b : Bool) 000228d2 50 4f |PO | ADDQ.L #0x8,A7 000228d4 48 78 00 00 |Hx | PEA.L 0x0 000228d8 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 000228de 54 4f |TO | ADDQ.L #0x2,A7 000228e0 1e 93 | | MOVE.B (A3),(A7) 000228e2 4e b9 00 01 04 d2 |N | JSR SetExpInitDone(a : Byte) 000228e8 54 4f |TO | ADDQ.L #0x2,A7 000228ea 70 00 |p | MOVEQ.L #0x00,D0 000228ec 13 c0 00 02 30 e4 | 0 | MOVE.B D0,0x230e4 000228f2 12 00 | | MOVE.B D0,D1 000228f4 48 81 |H | EXTB.W D1 000228f6 3f 01 |? | MOVE.W D1,-(A7) 000228f8 20 4c | L | MOVEA.L A4,A0 000228fa 41 f0 10 00 |A | LEA.L (A0+D1.W),A0 000228fe 42 28 00 a7 |B( | CLR.B (A0+0xa7) 00022902 30 1f |0 | MOVE.W (A7)+,D0 00022904 52 40 |R@ | ADDQ.W #0x1,D0 00022906 0c 40 00 2b | @ + | CMPI.W #0x002b,D0 0002290a 6f e0 |o | BLE 0x228ec 0002290c 70 00 |p | MOVEQ.L #0x00,D0 0002290e 23 c0 00 02 30 de |# 0 | MOVE.L D0,0x230de 00022914 b0 82 | | CMP.L D2,D0 00022916 63 02 |c | BLS 0x2291a 00022918 4e 4f |NO | TRAP #15 0002291a 20 4c | L | MOVEA.L A4,A0 0002291c 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00022920 42 28 00 9f |B( | CLR.B (A0+0x9f) 00022924 52 80 |R | ADDQ.L #0x1,D0 00022926 b0 82 | | CMP.L D2,D0 00022928 6f e4 |o | BLE 0x2290e 0002292a 4e ba ef 60 |N ` | JSR 0x2188c 0002292e 4e ba f0 9c |N | JSR 0x219cc 00022932 48 52 |HR | PEA.L (A2) 00022934 4e ba e9 ec |N | JSR 0x21322 00022938 54 4f |TO | ADDQ.L #0x2,A7 0002293a 48 52 |HR | PEA.L (A2) 0002293c 4e ba f2 9c |N | JSR 0x21bda 00022940 58 4f |XO | ADDQ.L #0x4,A7 00022942 10 1f | | MOVE.B (A7)+,D0 00022944 48 80 |H | EXTB.W D0 00022946 41 bc 00 0b |A | CHK.W #0xb,D0 0002294a 13 c0 00 02 31 23 | 1# | MOVE.B D0,0x23123 00022950 9e fc 00 34 | 4 | SUBA.W #0x34,A7 00022954 20 4f | O | MOVEA.L A7,A0 00022956 22 4a |"J | MOVEA.L A2,A1 00022958 72 2b |r+ | MOVEQ.L #0x2b,D1 0002295a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002295c 51 c9 ff fc |Q | DBF D1,0x2295a 00022960 1f 00 | | MOVE.B D0,-(A7) 00022962 4e ba f2 ee |N | JSR 0x21c52 00022966 de fc 00 2e | . | ADDA.W #0x2e,A7 0002296a 23 df 00 02 31 24 |# 1$ | MOVE.L (A7)+,0x23124 00022970 23 df 00 02 31 28 |# 1( | MOVE.L (A7)+,0x23128 00022976 1f 39 00 02 31 23 | 9 1# | MOVE.B 0x23123,-(A7) 0002297c 2f 39 00 02 31 28 |/9 1( | MOVE.L 0x23128,-(A7) 00022982 2f 39 00 02 31 24 |/9 1$ | MOVE.L 0x23124,-(A7) 00022988 9e fc 00 2c | , | SUBA.W #0x2c,A7 0002298c 20 4f | O | MOVEA.L A7,A0 0002298e 22 4a |"J | MOVEA.L A2,A1 00022990 70 2b |p+ | MOVEQ.L #0x2b,D0 00022992 10 d9 | | MOVE.B (A1)+,(A0)+ 00022994 51 c8 ff fc |Q | DBF D0,0x22992 00022998 48 79 00 02 30 e5 |Hy 0 | PEA.L 0x230e5 0002299e 48 79 00 02 30 e6 |Hy 0 | PEA.L 0x230e6 000229a4 48 79 00 02 30 ea |Hy 0 | PEA.L 0x230ea 000229aa 48 79 00 02 30 ee |Hy 0 | PEA.L 0x230ee 000229b0 48 79 00 02 30 ef |Hy 0 | PEA.L 0x230ef 000229b6 4e ba f8 72 |N r | JSR 0x2222a 000229ba de fc 00 48 | H | ADDA.W #0x48,A7 000229be 1e b9 00 02 30 e5 | 0 | MOVE.B 0x230e5,(A7) 000229c4 2f 39 00 02 30 e6 |/9 0 | MOVE.L 0x230e6,-(A7) 000229ca 2f 39 00 02 30 ea |/9 0 | MOVE.L 0x230ea,-(A7) 000229d0 1f 39 00 02 30 ee | 9 0 | MOVE.B 0x230ee,-(A7) 000229d6 51 4f |QO | SUBQ.L #0x8,A7 000229d8 20 4f | O | MOVEA.L A7,A0 000229da 43 f9 00 02 30 ef |C 0 | LEA.L 0x230ef,A1 000229e0 70 07 |p | MOVEQ.L #0x07,D0 000229e2 10 d9 | | MOVE.B (A1)+,(A0)+ 000229e4 51 c8 ff fc |Q | DBF D0,0x229e2 000229e8 4e b9 00 01 05 4a |N J | JSR ?IPC_Puts(a : Bool; b : String; c : String; d: Bool; e : Long; f : Long) 000229ee de fc 00 14 | | ADDA.W #0x14,A7 000229f2 4e b9 00 01 02 84 |N | JSR ?exit 000229f8 exp_READ_PAREG.FIU(Sw_1, &Sr_1): 000229f8 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000229fe 00 0e | | .CONST 0x000e ; Stack-delta 00022a00 0e 52 45 41 44 5f 50 41 | READ_PA| .TXT 14,'READ_PAREG.FIU' 00022a0f 00 | | .CONST 0x0 00022a10 03 | | .CONST 0x3 ; DIPROC address 00022a11 01 | | .CONST 0x1 ; Output Parameters 00022a12 01 | | .CONST 0x1 ; Input Parameters 00022a13 00 | | .CONST 0x0 ; In arg [1] 00022a14 00 | | .CONST 0x0 ; Out arg [1] 00022a15 00 | | .PAD 0x0 00022a16 exp_HALT.SEQ(&Fr): 00022a16 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022a1c 00 0c | | .CONST 0x000c ; Stack-delta 00022a1e 08 48 41 4c 54 2e 53 45 | HALT.SE| .TXT 8,'HALT.SEQ' 00022a27 00 | | .CONST 0x0 00022a28 02 | | .CONST 0x2 ; DIPROC address 00022a29 01 | | .CONST 0x1 ; Output Parameters 00022a2a 00 | | .CONST 0x0 ; Input Parameters 00022a2b 08 | | .CONST 0x8 ; Out arg flag 00022a2c exp_GET_MISC_ERRORS.SEQ(&Sr_1): 00022a2c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022a32 00 0c | | .CONST 0x000c ; Stack-delta 00022a34 13 47 45 54 5f 4d 49 53 | GET_MIS| .TXT 19,'GET_MISC_ERRORS.SEQ' 00022a48 00 | | .CONST 0x0 00022a49 02 | | .CONST 0x2 ; DIPROC address 00022a4a 01 | | .CONST 0x1 ; Output Parameters 00022a4b 00 | | .CONST 0x0 ; Input Parameters 00022a4c 00 | | .CONST 0x0 ; Out arg [1] 00022a4d 00 | | .PAD 0x0 00022a4e exp_READ_WCS.TYP(Sw_2, Sw_1, &Sr_6, &Fr): 00022a4e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022a54 00 14 | | .CONST 0x0014 ; Stack-delta 00022a56 0c 52 45 41 44 5f 57 43 | READ_WC| .TXT 12,'READ_WCS.TYP' 00022a63 00 | | .CONST 0x0 00022a64 06 | | .CONST 0x6 ; DIPROC address 00022a65 02 | | .CONST 0x2 ; Output Parameters 00022a66 02 | | .CONST 0x2 ; Input Parameters 00022a67 01 | | .CONST 0x1 ; In arg [2] 00022a68 00 | | .CONST 0x0 ; In arg [1] 00022a69 05 | | .CONST 0x5 ; Out arg [6] 00022a6a 08 | | .CONST 0x8 ; Out arg flag 00022a6b 00 | | .PAD 0x0 00022a6c exp_READ_PARITY.TYP(&Sr_1): 00022a6c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022a72 00 0c | | .CONST 0x000c ; Stack-delta 00022a74 0f 52 45 41 44 5f 50 41 | READ_PA| .TXT 15,'READ_PARITY.TYP' 00022a84 00 | | .CONST 0x0 00022a85 06 | | .CONST 0x6 ; DIPROC address 00022a86 01 | | .CONST 0x1 ; Output Parameters 00022a87 00 | | .CONST 0x0 ; Input Parameters 00022a88 00 | | .CONST 0x0 ; Out arg [1] 00022a89 00 | | .PAD 0x0 00022a8a exp_READ_WCS.VAL(Sw_2, Sw_1, &Sr_5, &Fr): 00022a8a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022a90 00 14 | | .CONST 0x0014 ; Stack-delta 00022a92 0c 52 45 41 44 5f 57 43 | READ_WC| .TXT 12,'READ_WCS.VAL' 00022a9f 00 | | .CONST 0x0 00022aa0 07 | | .CONST 0x7 ; DIPROC address 00022aa1 02 | | .CONST 0x2 ; Output Parameters 00022aa2 02 | | .CONST 0x2 ; Input Parameters 00022aa3 01 | | .CONST 0x1 ; In arg [2] 00022aa4 00 | | .CONST 0x0 ; In arg [1] 00022aa5 04 | | .CONST 0x4 ; Out arg [5] 00022aa6 08 | | .CONST 0x8 ; Out arg flag 00022aa7 00 | | .PAD 0x0 00022aa8 exp_READ_PARITY.VAL(&Sr_1): 00022aa8 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022aae 00 0c | | .CONST 0x000c ; Stack-delta 00022ab0 0f 52 45 41 44 5f 50 41 | READ_PA| .TXT 15,'READ_PARITY.VAL' 00022ac0 00 | | .CONST 0x0 00022ac1 07 | | .CONST 0x7 ; DIPROC address 00022ac2 01 | | .CONST 0x1 ; Output Parameters 00022ac3 00 | | .CONST 0x0 ; Input Parameters 00022ac4 00 | | .CONST 0x0 ; Out arg [1] 00022ac5 00 | | .PAD 0x0 00022ac6 57 48 4f 5f 48 49 54 2e |WHO_HIT.| .TXT 'WHO_HIT.MEM ' 00022ad2 57 48 4f 5f 48 49 54 2e |WHO_HIT.| .TXT 'WHO_HIT.M32 ' 00022ade ; -------------------------------------------------------------------------------------- 00022ade ; OMSI PASCAL Function 00022ade ; <LVAR 0x014 1(r)> 00022ade ; <LVAR 0x010 4(r)> 00022ade ; <LVAR 0x00c 4(r)> 00022ade ; <LVAR 0x008 4(r)> 00022ade ; <LVAR -0x006 @ 4(r)> 00022ade ; -------------------------------------------------------------------------------------- 00022ade 4e 56 ff ca |NV | LINK.W A6,#0xffca 00022ae2 bf d5 | | CMPA.L (A5),A7 00022ae4 62 06 |b | BHI 0x22aec 00022ae6 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022aea 4e 76 |Nv | TRAPV 00022aec de fc 00 30 | 0 | ADDA.W #0x30,A7 00022af0 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00022af4 45 ee ff fa |E | LEA.L (A6-0x6),A2 00022af8 72 0c |r | MOVEQ.L #0x0c,D1 00022afa 55 4f |UO | SUBQ.L #0x2,A7 00022afc 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00022b02 4a 1f |J | TST.B (A7)+ 00022b04 67 12 |g | BEQ 0x22b18 00022b06 9e c1 | | SUBA.W D1,A7 00022b08 20 4f | O | MOVEA.L A7,A0 00022b0a 43 fa ff ba |C | LEA.L 0x22ac6,A1 00022b0e 70 0a |p | MOVEQ.L #0x0a,D0 00022b10 10 d9 | | MOVE.B (A1)+,(A0)+ 00022b12 51 c8 ff fc |Q | DBF D0,0x22b10 00022b16 60 10 |` | BRA 0x22b28 00022b18 9e c1 | | SUBA.W D1,A7 00022b1a 20 4f | O | MOVEA.L A7,A0 00022b1c 43 fa ff b4 |C | LEA.L 0x22ad2,A1 00022b20 70 0a |p | MOVEQ.L #0x0a,D0 00022b22 10 d9 | | MOVE.B (A1)+,(A0)+ 00022b24 51 c8 ff fc |Q | DBF D0,0x22b22 00022b28 59 4f |YO | SUBQ.L #0x4,A7 00022b2a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022b2e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022b32 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00022b36 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022b3c 50 4f |PO | ADDQ.L #0x8,A7 00022b3e 48 52 |HR | PEA.L (A2) 00022b40 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00022b46 de fc 00 14 | | ADDA.W #0x14,A7 00022b4a 42 27 |B' | CLR.B -(A7) 00022b4c 1f 2e 00 14 | . | MOVE.B (A6+0x14),-(A7) 00022b50 2f 12 |/ | MOVE.L (A2),-(A7) 00022b52 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00022b58 58 4f |XO | ADDQ.L #0x4,A7 00022b5a 2e 92 |. | MOVE.L (A2),(A7) 00022b5c 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00022b60 48 50 |HP | PEA.L (A0) 00022b62 4e b9 00 01 04 78 |N x | JSR ExpOutputFlag(exp : Pointer; VAR status : Bool) 00022b68 58 4f |XO | ADDQ.L #0x4,A7 00022b6a 2e 92 |. | MOVE.L (A2),(A7) 00022b6c 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00022b70 48 50 |HP | PEA.L (A0) 00022b72 4e b9 00 01 04 78 |N x | JSR ExpOutputFlag(exp : Pointer; VAR status : Bool) 00022b78 58 4f |XO | ADDQ.L #0x4,A7 00022b7a 2e 92 |. | MOVE.L (A2),(A7) 00022b7c 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022b80 48 50 |HP | PEA.L (A0) 00022b82 48 78 00 00 |Hx | PEA.L 0x0 00022b86 48 78 00 00 |Hx | PEA.L 0x0 00022b8a 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 00022b90 de fc 00 10 | | ADDA.W #0x10,A7 00022b94 48 52 |HR | PEA.L (A2) 00022b96 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00022b9c 58 4f |XO | ADDQ.L #0x4,A7 00022b9e 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00022ba2 4e 5e |N^ | UNLK A6 00022ba4 4e 75 |Nu | RTS 00022ba6 52 45 41 44 5f 50 41 52 |READ_PAR| .TXT 'READ_PAR_ERRS.MEM ' 00022bb8 52 45 41 44 5f 50 41 52 |READ_PAR| .TXT 'READ_PAR_ERRS.M32 ' 00022bca ; -------------------------------------------------------------------------------------- 00022bca ; OMSI PASCAL Function 00022bca ; <LVAR 0x018 1(r)> 00022bca ; <LVAR 0x014 4(r)> 00022bca ; <LVAR 0x010 4(r)> 00022bca ; <LVAR 0x00c 4(r)> 00022bca ; <LVAR 0x008 4(r)> 00022bca ; <LVAR -0x006 @ 4(r)> 00022bca ; -------------------------------------------------------------------------------------- 00022bca 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 00022bce bf d5 | | CMPA.L (A5),A7 00022bd0 62 06 |b | BHI 0x22bd8 00022bd2 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022bd6 4e 76 |Nv | TRAPV 00022bd8 de fc 00 42 | B | ADDA.W #0x42,A7 00022bdc 48 e7 e0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D2+D1+D0,-(A7) 00022be0 45 f8 00 00 |E | LEA.L 0x0,A2 00022be4 47 ee ff fa |G | LEA.L (A6-0x6),A3 00022be8 49 f9 00 01 04 72 |I r | LEA.L ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L),A4 00022bee 72 0c |r | MOVEQ.L #0x0c,D1 00022bf0 74 12 |t | MOVEQ.L #0x12,D2 00022bf2 55 4f |UO | SUBQ.L #0x2,A7 00022bf4 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00022bfa 4a 1f |J | TST.B (A7)+ 00022bfc 67 12 |g | BEQ 0x22c10 00022bfe 9e c2 | | SUBA.W D2,A7 00022c00 20 4f | O | MOVEA.L A7,A0 00022c02 43 fa ff a2 |C | LEA.L 0x22ba6,A1 00022c06 70 10 |p | MOVEQ.L #0x10,D0 00022c08 10 d9 | | MOVE.B (A1)+,(A0)+ 00022c0a 51 c8 ff fc |Q | DBF D0,0x22c08 00022c0e 60 10 |` | BRA 0x22c20 00022c10 9e c2 | | SUBA.W D2,A7 00022c12 20 4f | O | MOVEA.L A7,A0 00022c14 43 fa ff a2 |C | LEA.L 0x22bb8,A1 00022c18 70 10 |p | MOVEQ.L #0x10,D0 00022c1a 10 d9 | | MOVE.B (A1)+,(A0)+ 00022c1c 51 c8 ff fc |Q | DBF D0,0x22c1a 00022c20 59 4f |YO | SUBQ.L #0x4,A7 00022c22 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022c26 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022c2a 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 00022c2e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022c34 50 4f |PO | ADDQ.L #0x8,A7 00022c36 48 53 |HS | PEA.L (A3) 00022c38 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00022c3e de fc 00 1a | | ADDA.W #0x1a,A7 00022c42 42 27 |B' | CLR.B -(A7) 00022c44 1f 2e 00 18 | . | MOVE.B (A6+0x18),-(A7) 00022c48 2f 13 |/ | MOVE.L (A3),-(A7) 00022c4a 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00022c50 58 4f |XO | ADDQ.L #0x4,A7 00022c52 2e 93 |. | MOVE.L (A3),(A7) 00022c54 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00022c58 48 50 |HP | PEA.L (A0) 00022c5a 48 52 |HR | PEA.L (A2) 00022c5c 48 52 |HR | PEA.L (A2) 00022c5e 4e 94 |N | JSR (A4) 00022c60 de c1 | | ADDA.W D1,A7 00022c62 2e 93 |. | MOVE.L (A3),(A7) 00022c64 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00022c68 48 50 |HP | PEA.L (A0) 00022c6a 48 52 |HR | PEA.L (A2) 00022c6c 48 52 |HR | PEA.L (A2) 00022c6e 4e 94 |N | JSR (A4) 00022c70 de c1 | | ADDA.W D1,A7 00022c72 2e 93 |. | MOVE.L (A3),(A7) 00022c74 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00022c78 48 50 |HP | PEA.L (A0) 00022c7a 48 52 |HR | PEA.L (A2) 00022c7c 48 52 |HR | PEA.L (A2) 00022c7e 4e 94 |N | JSR (A4) 00022c80 de c1 | | ADDA.W D1,A7 00022c82 2e 93 |. | MOVE.L (A3),(A7) 00022c84 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022c88 48 50 |HP | PEA.L (A0) 00022c8a 48 52 |HR | PEA.L (A2) 00022c8c 48 52 |HR | PEA.L (A2) 00022c8e 4e 94 |N | JSR (A4) 00022c90 de fc 00 10 | | ADDA.W #0x10,A7 00022c94 48 53 |HS | PEA.L (A3) 00022c96 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00022c9c 58 4f |XO | ADDQ.L #0x4,A7 00022c9e 4c df 1f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3+A4 00022ca2 4e 5e |N^ | UNLK A6 00022ca4 4e 75 |Nu | RTS 00022ca6 52 45 41 44 5f 50 41 52 |READ_PAR| .TXT 'READ_PARITY.MEM ' 00022cb6 52 45 41 44 5f 50 41 52 |READ_PAR| .TXT 'READ_PARITY.M32 ' 00022cc6 ; -------------------------------------------------------------------------------------- 00022cc6 ; OMSI PASCAL Function 00022cc6 ; <LVAR 0x014 1(r)> 00022cc6 ; <LVAR 0x010 4(r)> 00022cc6 ; <LVAR 0x00c 4(r)> 00022cc6 ; <LVAR 0x008 4(r)> 00022cc6 ; <LVAR -0x006 @ 4(r)> 00022cc6 ; -------------------------------------------------------------------------------------- 00022cc6 4e 56 ff ba |NV | LINK.W A6,#0xffba 00022cca bf d5 | | CMPA.L (A5),A7 00022ccc 62 06 |b | BHI 0x22cd4 00022cce 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022cd2 4e 76 |Nv | TRAPV 00022cd4 de fc 00 40 | @ | ADDA.W #0x40,A7 00022cd8 48 e7 e0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D2+D1+D0,-(A7) 00022cdc 45 ee ff fa |E | LEA.L (A6-0x6),A2 00022ce0 47 f8 00 00 |G | LEA.L 0x0,A3 00022ce4 49 f9 00 01 04 72 |I r | LEA.L ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L),A4 00022cea 72 10 |r | MOVEQ.L #0x10,D1 00022cec 74 0c |t | MOVEQ.L #0x0c,D2 00022cee 55 4f |UO | SUBQ.L #0x2,A7 00022cf0 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00022cf6 4a 1f |J | TST.B (A7)+ 00022cf8 67 12 |g | BEQ 0x22d0c 00022cfa 9e c1 | | SUBA.W D1,A7 00022cfc 20 4f | O | MOVEA.L A7,A0 00022cfe 43 fa ff a6 |C | LEA.L 0x22ca6,A1 00022d02 70 0e |p | MOVEQ.L #0x0e,D0 00022d04 10 d9 | | MOVE.B (A1)+,(A0)+ 00022d06 51 c8 ff fc |Q | DBF D0,0x22d04 00022d0a 60 10 |` | BRA 0x22d1c 00022d0c 9e c1 | | SUBA.W D1,A7 00022d0e 20 4f | O | MOVEA.L A7,A0 00022d10 43 fa ff a4 |C | LEA.L 0x22cb6,A1 00022d14 70 0e |p | MOVEQ.L #0x0e,D0 00022d16 10 d9 | | MOVE.B (A1)+,(A0)+ 00022d18 51 c8 ff fc |Q | DBF D0,0x22d16 00022d1c 59 4f |YO | SUBQ.L #0x4,A7 00022d1e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022d22 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022d26 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00022d2a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022d30 50 4f |PO | ADDQ.L #0x8,A7 00022d32 48 52 |HR | PEA.L (A2) 00022d34 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00022d3a de fc 00 18 | | ADDA.W #0x18,A7 00022d3e 42 27 |B' | CLR.B -(A7) 00022d40 1f 2e 00 14 | . | MOVE.B (A6+0x14),-(A7) 00022d44 2f 12 |/ | MOVE.L (A2),-(A7) 00022d46 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00022d4c 58 4f |XO | ADDQ.L #0x4,A7 00022d4e 2e 92 |. | MOVE.L (A2),(A7) 00022d50 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00022d54 48 50 |HP | PEA.L (A0) 00022d56 48 53 |HS | PEA.L (A3) 00022d58 48 53 |HS | PEA.L (A3) 00022d5a 4e 94 |N | JSR (A4) 00022d5c de c2 | | ADDA.W D2,A7 00022d5e 2e 92 |. | MOVE.L (A2),(A7) 00022d60 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00022d64 48 50 |HP | PEA.L (A0) 00022d66 48 53 |HS | PEA.L (A3) 00022d68 48 53 |HS | PEA.L (A3) 00022d6a 4e 94 |N | JSR (A4) 00022d6c de c2 | | ADDA.W D2,A7 00022d6e 2e 92 |. | MOVE.L (A2),(A7) 00022d70 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022d74 48 50 |HP | PEA.L (A0) 00022d76 48 53 |HS | PEA.L (A3) 00022d78 48 53 |HS | PEA.L (A3) 00022d7a 4e 94 |N | JSR (A4) 00022d7c de c1 | | ADDA.W D1,A7 00022d7e 48 52 |HR | PEA.L (A2) 00022d80 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00022d86 58 4f |XO | ADDQ.L #0x4,A7 00022d88 4c df 1f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3+A4 00022d8c 4e 5e |N^ | UNLK A6 00022d8e 4e 75 |Nu | RTS 00022d90 exp_READ_WCS.IOC(Sw_2, Sw_1, &Sr_2, &Fr): 00022d90 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022d96 00 14 | | .CONST 0x0014 ; Stack-delta 00022d98 0c 52 45 41 44 5f 57 43 | READ_WC| .TXT 12,'READ_WCS.IOC' 00022da5 00 | | .CONST 0x0 00022da6 04 | | .CONST 0x4 ; DIPROC address 00022da7 02 | | .CONST 0x2 ; Output Parameters 00022da8 02 | | .CONST 0x2 ; Input Parameters 00022da9 01 | | .CONST 0x1 ; In arg [2] 00022daa 00 | | .CONST 0x0 ; In arg [1] 00022dab 01 | | .CONST 0x1 ; Out arg [2] 00022dac 08 | | .CONST 0x8 ; Out arg flag 00022dad 00 | | .PAD 0x0 00022dae 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): 00022dae 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022db4 00 48 | H | .CONST 0x0048 ; Stack-delta 00022db6 14 52 45 41 44 5f 54 52 | READ_TR| .TXT 20,'READ_TRACE_BLOCK.IOC' 00022dcb 00 | | .CONST 0x0 00022dcc 04 | | .CONST 0x4 ; DIPROC address 00022dcd 10 | | .CONST 0x10 ; Output Parameters 00022dce 00 | | .CONST 0x0 ; Input Parameters 00022dcf 07 | | .CONST 0x7 ; Out arg [8] 00022dd0 07 | | .CONST 0x7 ; Out arg [8] 00022dd1 07 | | .CONST 0x7 ; Out arg [8] 00022dd2 07 | | .CONST 0x7 ; Out arg [8] 00022dd3 07 | | .CONST 0x7 ; Out arg [8] 00022dd4 07 | | .CONST 0x7 ; Out arg [8] 00022dd5 07 | | .CONST 0x7 ; Out arg [8] 00022dd6 07 | | .CONST 0x7 ; Out arg [8] 00022dd7 07 | | .CONST 0x7 ; Out arg [8] 00022dd8 07 | | .CONST 0x7 ; Out arg [8] 00022dd9 07 | | .CONST 0x7 ; Out arg [8] 00022dda 07 | | .CONST 0x7 ; Out arg [8] 00022ddb 07 | | .CONST 0x7 ; Out arg [8] 00022ddc 07 | | .CONST 0x7 ; Out arg [8] 00022ddd 07 | | .CONST 0x7 ; Out arg [8] 00022dde 07 | | .CONST 0x7 ; Out arg [8] 00022ddf 00 | | .PAD 0x0 00022de0 exp_READ_TRACE_ADDRESS.IOC(Sw_1, &Sr_2): 00022de0 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022de6 00 0e | | .CONST 0x000e ; Stack-delta 00022de8 16 52 45 41 44 5f 54 52 | READ_TR| .TXT 22,'READ_TRACE_ADDRESS.IOC' 00022dff 00 | | .CONST 0x0 00022e00 04 | | .CONST 0x4 ; DIPROC address 00022e01 01 | | .CONST 0x1 ; Output Parameters 00022e02 01 | | .CONST 0x1 ; Input Parameters 00022e03 00 | | .CONST 0x0 ; In arg [1] 00022e04 01 | | .CONST 0x1 ; Out arg [2] 00022e05 00 | | .PAD 0x0 00022e06 exp_READ_PAREG.IOC(Sw_1, &Sr_1): 00022e06 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022e0c 00 0e | | .CONST 0x000e ; Stack-delta 00022e0e 0e 52 45 41 44 5f 50 41 | READ_PA| .TXT 14,'READ_PAREG.IOC' 00022e1d 00 | | .CONST 0x0 00022e1e 04 | | .CONST 0x4 ; DIPROC address 00022e1f 01 | | .CONST 0x1 ; Output Parameters 00022e20 01 | | .CONST 0x1 ; Input Parameters 00022e21 00 | | .CONST 0x0 ; In arg [1] 00022e22 00 | | .CONST 0x0 ; Out arg [1] 00022e23 00 | | .PAD 0x0 00022e24 exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1): 00022e24 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022e2a 00 0c | | .CONST 0x000c ; Stack-delta 00022e2c 16 4c 4f 41 44 5f 54 52 | LOAD_TR| .TXT 22,'LOAD_TRACE_ADDRESS.IOC' 00022e43 00 | | .CONST 0x0 00022e44 04 | | .CONST 0x4 ; DIPROC address 00022e45 00 | | .CONST 0x0 ; Output Parameters 00022e46 02 | | .CONST 0x2 ; Input Parameters 00022e47 01 | | .CONST 0x1 ; In arg [2] 00022e48 00 | | .CONST 0x0 ; In arg [1] 00022e49 00 | | .PAD 0x0 00022e4a 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 00022e58 ; -------------------------------------------------------------------------------------- 00022e58 ; OMSI PASCAL Function 00022e58 ; <LVAR 0x008 1(r)> 00022e58 ; -------------------------------------------------------------------------------------- 00022e58 PROG_FAIL: 00022e58 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00022e5c bf d5 | | CMPA.L (A5),A7 00022e5e 62 06 |b | BHI 0x22e66 00022e60 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022e64 4e 76 |Nv | TRAPV 00022e66 de fc 00 2c | , | ADDA.W #0x2c,A7 00022e6a 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00022e6e 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 00022e72 70 06 |p | MOVEQ.L #0x06,D0 00022e74 3f 20 |? | MOVE.W -(A0),-(A7) 00022e76 51 c8 ff fc |Q | DBF D0,0x22e74 00022e7a 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00022e7e 51 4f |QO | SUBQ.L #0x8,A7 00022e80 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00022e84 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022e88 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00022e8c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022e92 58 4f |XO | ADDQ.L #0x4,A7 00022e94 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00022e98 48 80 |H | EXTB.W D0 00022e9a 48 c0 |H | EXTW.L D0 00022e9c 2f 00 |/ | MOVE.L D0,-(A7) 00022e9e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00022ea4 58 4f |XO | ADDQ.L #0x4,A7 00022ea6 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022eac 50 4f |PO | ADDQ.L #0x8,A7 00022eae 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022eb4 de fc 00 14 | | ADDA.W #0x14,A7 00022eb8 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00022ebc 4e 5e |N^ | UNLK A6 00022ebe 4e 75 |Nu | RTS 00022ec0 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 00022ece 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00022edc 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00022eea 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00022efc 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 00022f14 ; -------------------------------------------------------------------------------------- 00022f14 ; OMSI PASCAL Function 00022f14 ; <LVAR 0x00e 1(r)> 00022f14 ; <LVAR 0x00a 4(r)> 00022f14 ; <LVAR 0x008 1(r)> 00022f14 ; -------------------------------------------------------------------------------------- 00022f14 EXP_FAIL: 00022f14 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 00022f18 bf d5 | | CMPA.L (A5),A7 00022f1a 62 06 |b | BHI 0x22f22 00022f1c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022f20 4e 76 |Nv | TRAPV 00022f22 de fc 00 74 | t | ADDA.W #0x74,A7 00022f26 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00022f2a 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00022f30 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 00022f36 72 01 |r | MOVEQ.L #0x01,D1 00022f38 74 0d |t | MOVEQ.L #0x0d,D2 00022f3a 76 1e |v | MOVEQ.L #0x1e,D3 00022f3c 78 12 |x | MOVEQ.L #0x12,D4 00022f3e 7a 0e |z | MOVEQ.L #0x0e,D5 00022f40 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00022f46 41 fa ff b4 |A | LEA.L 0x22efc,A0 00022f4a 70 08 |p | MOVEQ.L #0x08,D0 00022f4c 3f 20 |? | MOVE.W -(A0),-(A7) 00022f4e 51 c8 ff fc |Q | DBF D0,0x22f4c 00022f52 59 4f |YO | SUBQ.L #0x4,A7 00022f54 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022f58 3f 01 |? | MOVE.W D1,-(A7) 00022f5a 3f 04 |? | MOVE.W D4,-(A7) 00022f5c 4e 93 |N | JSR (A3) 00022f5e 50 4f |PO | ADDQ.L #0x8,A7 00022f60 4e 94 |N | JSR (A4) 00022f62 50 4f |PO | ADDQ.L #0x8,A7 00022f64 20 4f | O | MOVEA.L A7,A0 00022f66 43 fa ff 58 |C X | LEA.L 0x22ec0,A1 00022f6a 70 0c |p | MOVEQ.L #0x0c,D0 00022f6c 10 d9 | | MOVE.B (A1)+,(A0)+ 00022f6e 51 c8 ff fc |Q | DBF D0,0x22f6c 00022f72 51 4f |QO | SUBQ.L #0x8,A7 00022f74 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022f78 3f 01 |? | MOVE.W D1,-(A7) 00022f7a 3f 02 |? | MOVE.W D2,-(A7) 00022f7c 4e 93 |N | JSR (A3) 00022f7e 54 4f |TO | ADDQ.L #0x2,A7 00022f80 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00022f84 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00022f8a 54 4f |TO | ADDQ.L #0x2,A7 00022f8c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022f92 50 4f |PO | ADDQ.L #0x8,A7 00022f94 4e 94 |N | JSR (A4) 00022f96 de c4 | | ADDA.W D4,A7 00022f98 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00022f9c b0 c1 | | CMPA.W D1,A0 00022f9e 67 48 |gH | BEQ 0x22fe8 00022fa0 9e c5 | | SUBA.W D5,A7 00022fa2 22 4f |"O | MOVEA.L A7,A1 00022fa4 45 fa ff 28 |E ( | LEA.L 0x22ece,A2 00022fa8 70 0c |p | MOVEQ.L #0x0c,D0 00022faa 12 da | | MOVE.B (A2)+,(A1)+ 00022fac 51 c8 ff fc |Q | DBF D0,0x22faa 00022fb0 9e c3 | | SUBA.W D3,A7 00022fb2 22 4f |"O | MOVEA.L A7,A1 00022fb4 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00022fb8 70 1d |p | MOVEQ.L #0x1d,D0 00022fba 12 d8 | | MOVE.B (A0)+,(A1)+ 00022fbc 51 c8 ff fc |Q | DBF D0,0x22fba 00022fc0 51 4f |QO | SUBQ.L #0x8,A7 00022fc2 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00022fc6 3f 01 |? | MOVE.W D1,-(A7) 00022fc8 3f 02 |? | MOVE.W D2,-(A7) 00022fca 4e 93 |N | JSR (A3) 00022fcc 58 4f |XO | ADDQ.L #0x4,A7 00022fce 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00022fd2 3f 01 |? | MOVE.W D1,-(A7) 00022fd4 3f 03 |? | MOVE.W D3,-(A7) 00022fd6 4e 93 |N | JSR (A3) 00022fd8 50 4f |PO | ADDQ.L #0x8,A7 00022fda 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022fe0 50 4f |PO | ADDQ.L #0x8,A7 00022fe2 4e 94 |N | JSR (A4) 00022fe4 de fc 00 30 | 0 | ADDA.W #0x30,A7 00022fe8 9e c5 | | SUBA.W D5,A7 00022fea 20 4f | O | MOVEA.L A7,A0 00022fec 43 fa fe ee |C | LEA.L 0x22edc,A1 00022ff0 70 0c |p | MOVEQ.L #0x0c,D0 00022ff2 10 d9 | | MOVE.B (A1)+,(A0)+ 00022ff4 51 c8 ff fc |Q | DBF D0,0x22ff2 00022ff8 51 4f |QO | SUBQ.L #0x8,A7 00022ffa 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022ffe 3f 01 |? | MOVE.W D1,-(A7) 00023000 3f 02 |? | MOVE.W D2,-(A7) 00023002 4e 93 |N | JSR (A3) 00023004 54 4f |TO | ADDQ.L #0x2,A7 00023006 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 0002300a 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00023010 54 4f |TO | ADDQ.L #0x2,A7 00023012 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023018 50 4f |PO | ADDQ.L #0x8,A7 0002301a 4e 94 |N | JSR (A4) 0002301c 5d 4f |]O | SUBQ.L #0x6,A7 0002301e 20 4f | O | MOVEA.L A7,A0 00023020 43 fa fe da |C | LEA.L 0x22efc,A1 00023024 70 16 |p | MOVEQ.L #0x16,D0 00023026 10 d9 | | MOVE.B (A1)+,(A0)+ 00023028 51 c8 ff fc |Q | DBF D0,0x23026 0002302c 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00023030 59 4f |YO | SUBQ.L #0x4,A7 00023032 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00023036 3f 01 |? | MOVE.W D1,-(A7) 00023038 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 0002303c 4e 93 |N | JSR (A3) 0002303e 50 4f |PO | ADDQ.L #0x8,A7 00023040 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00023046 de c3 | | ADDA.W D3,A7 00023048 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 0002304c 4e 5e |N^ | UNLK A6 0002304e 4e 75 |Nu | RTS