|
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: 11776 (0x2e00)
Types: M200
Notes: @(#)TOMBSTONE,1.1,92/09/08,12:00:00, M200_PROGRAM
Names: »TOMBSTONE.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »TOMBSTONE.M200«
@ 20c98
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20c98-20cfa Body>
<POP 20c98-20cae Prologue> Σ0 ↓
<POP 20cae-20cb4 Naked> Σ0 ↓ →0x20cd0
<MI 20cae TST.L (A6+0xc)> {}
<MI 20cb2 BLE 0x20cd0> {}
<POP 20cb4-20cba Naked> Σ0 Δ-4 ↓
<MI 20cb4 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 20cb8 MOVEQ.L #0x01,D7> {[4, '(A6+0xc)']}
<POP 20cba-20cbe Naked> Σ-4 ↓ →0x20cce ←0x20cbe
<MI 20cba CMP.L (A7),D7> {[-4-]}
<MI 20cbc BGT 0x20cce> {[-4-]}
<POP 20cbe-20cce Naked> Σ-4 ↓ →0x20cba
<Const 0x20cbe 0x20.2> Δ-2 {[-4-]|[#32]}
<Call 0x20cc2 0x103d0> {[-4-]|[#32]}
WriteConsoleChar(chr : char)
<POP 20cc8-20cca StackAdj> Δ+2 {[-4-]}
<MI 20cca ADDQ.L #0x1,D7> {[-4-]}
<MI 20ccc BVC 0x20cba> {[-4-]}
<POP 20cce-20cd0 Naked> Σ-4 Δ+4 ↓ ←0x20cba
<POP 20cce-20cd0 StackAdj> Δ+4 {}
<POP 20cd0-20cd6 Naked> Σ0 Δ-4 ↓ ←0x20cae
<MI 20cd0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 20cd4 MOVEQ.L #0x01,D7> {[4, '(A6+0x8)']}
<POP 20cd6-20cda Naked> Σ-4 ↓ →0x20cea ←0x20cda
<MI 20cd6 CMP.L (A7),D7> {[-4-]}
<MI 20cd8 BGT 0x20cea> {[-4-]}
<POP 20cda-20cea Naked> Σ-4 ↓ →0x20cd6
<Const 0x20cda 0x2d.2> Δ-2 {[-4-]|[#45]}
<Call 0x20cde 0x103d0> {[-4-]|[#45]}
WriteConsoleChar(chr : char)
<POP 20ce4-20ce6 StackAdj> Δ+2 {[-4-]}
<MI 20ce6 ADDQ.L #0x1,D7> {[-4-]}
<MI 20ce8 BVC 0x20cd6> {[-4-]}
<POP 20cea-20cf2 Naked> Σ-4 Δ+4 ↓ ←0x20cd6
<POP 20cea-20cec StackAdj> Δ+4 {}
<Call 0x20cec 0x103dc> {}
WriteConsoleCrLf(void)
<POP 20cf2-20cfa Epilogue> Σ0
@ 20cfa
<POP 20cfa-20d3a Body>
<POP 20cfa-20d0c Prologue> Σ0 ↓
<POP 20d0c-20d36 Naked> Σ0 ↓
<MI 20d0c CLR.B 0x247ca> {}
<MI 20d12 CLR.B 0x247cb> {}
<MI 20d18 CLR.B 0x247cc> {}
<MI 20d1e CLR.B 0x247cd> {}
<MI 20d24 CLR.B 0x247ce> {}
<MI 20d2a CLR.B 0x247cf> {}
<MI 20d30 CLR.B 0x247d0> {}
<POP 20d36-20d3a Epilogue> Σ0
@ 20d3a
<POP 20d3a-20d84 Body>
<POP 20d3a-20d50 Prologue> Σ0 ↓
<POP 20d50-20d52 RegCacheLoad> Σ0 ↓
<POP 20d52-20d7c Naked> Σ0 ↓
<MI 20d52 MOVE.B #0x01,0x247ca> {}
<MI 20d58 MOVE.B #0x01,0x247cb> {}
<MI 20d5e MOVE.B #0x01,0x247cc> {}
<MI 20d64 MOVE.B #0x01,0x247cd> {}
<MI 20d6a MOVE.B #0x01,0x247ce> {}
<MI 20d70 MOVE.B #0x01,0x247cf> {}
<MI 20d76 MOVE.B #0x01,0x247d0> {}
<POP 20d7c-20d84 Epilogue> Σ0
@ 20d84
<LVAR 0x008 2(r)>
<POP 20d84-20dc0 Body>
<POP 20d84-20d9a Prologue> Σ0 ↓
<POP 20d9a-20db8 Naked> Σ0 ↓
<POP 20d9a-20d9c StackAdj> Δ-4 {[-4-]}
<MI 20d9c CLR.L D0> {[-4-]}
<MI 20d9e MOVE.W (A6+0x8),D0> {[-4-]}
<MI 20da2 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<Const 0x20da4 0x4.4> Δ-4 {[-4-]|[4, 'D0']|[##4]}
<Call 0x20da8 0x102e8> {[-4-]|[4, 'D0']|[##4]}
Long2HexString(val : Long; ndig : Long) : String
<POP 20dae-20db0 StackAdj> Δ+8 {[-4-]}
<Call 0x20db0 0x103d8> {[-4-]}
WriteConsoleString(str : String)
<POP 20db6-20db8 StackAdj> Δ+4 {}
<POP 20db8-20dc0 Epilogue> Σ0
@ 20dc0
<LVAR 0x008 4(r)>
<POP 20dc0-20df0 Body>
<POP 20dc0-20dd2 Prologue> Σ0 ↓
<POP 20dd2-20dec Naked> Σ0 ↓
<POP 20dd2-20dd4 StackAdj> Δ-4 {[-4-]}
<MI 20dd4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x20dd8 0x8.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##8]}
<Call 0x20ddc 0x102e8> {[-4-]|[4, '(A6+0x8)']|[##8]}
Long2HexString(val : Long; ndig : Long) : String
<POP 20de2-20de4 StackAdj> Δ+8 {[-4-]}
<Call 0x20de4 0x103d8> {[-4-]}
WriteConsoleString(str : String)
<POP 20dea-20dec StackAdj> Δ+4 {}
<POP 20dec-20df0 Epilogue> Σ0
@ 20df0
<LVAR 0x00e 2(r)>
<LVAR 0x00c 2(r)>
<LVAR 0x00a 2(r)>
<LVAR 0x008 2(r)>
<POP 20df0-20e2c Body>
<POP 20df0-20e06 Prologue> Σ0 ↓
<POP 20e06-20e0a RegCacheLoad> Σ0 ↓
<POP 20e0a-20e24 Naked> Σ0 ↓
<MI 20e0a MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x20e0e 0x20d84> {[2, '(A6+0x8)']}
<MI 20e10 MOVE.W (A6+0xa),(A7)> {[2, '(A6+0xa)']}
<Call 0x20e14 0x20d84> {[2, '(A6+0xa)']}
<MI 20e16 MOVE.W (A6+0xc),(A7)> {[2, '(A6+0xc)']}
<Call 0x20e1a 0x20d84> {[2, '(A6+0xc)']}
<MI 20e1c MOVE.W (A6+0xe),(A7)> {[2, '(A6+0xe)']}
<Call 0x20e20 0x20d84> {[2, '(A6+0xe)']}
<POP 20e22-20e24 StackAdj> Δ+2 {}
<POP 20e24-20e2c Epilogue> Σ0
@ 20e2c
<LVAR 0x00e 2(r)>
<LVAR 0x00c 2(r)>
<LVAR 0x00a 2(r)>
<LVAR 0x008 2(r)>
<POP 20e2c-20e8a Body>
<POP 20e2c-20e42 Prologue> Σ0 ↓
<POP 20e42-20e46 RegCacheLoad> Σ0 ↓
<POP 20e46-20e82 Naked> Σ0 ↓
<MI 20e46 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x20e4a 0x20d84> {[2, '(A6+0x8)']}
<MI 20e4c MOVE.W (A6+0xa),(A7)> {[2, '(A6+0xa)']}
<Call 0x20e50 0x20d84> {[2, '(A6+0xa)']}
<POP 20e52-20e53 StackAdj> Δ+2 {}
<Blob 0x20e53 [2] @> Δ-2 {[«2""»]}
<POP 20e56-20e58 StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x20e58 2> {[«2""»]|[$$__]}
<Call 0x20e6c 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 20e72-20e74 StackAdj> Δ+4 {[«2""»]}
<MI 20e74 MOVE.W (A6+0xc),(A7)> {[2, '(A6+0xc)']}
<Call 0x20e78 0x20d84> {[2, '(A6+0xc)']}
<MI 20e7a MOVE.W (A6+0xe),(A7)> {[2, '(A6+0xe)']}
<Call 0x20e7e 0x20d84> {[2, '(A6+0xe)']}
<POP 20e80-20e82 StackAdj> Δ+2 {}
<POP 20e82-20e8a Epilogue> Σ0
@ 20e8a
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20e8a-20ede Body>
<POP 20e8a-20e9c Prologue> Σ0 ↓
<POP 20e9c-20eda Naked> Σ0 ↓
<MI 20e9c MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 20ea0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x20ea4 0x20df0> {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 20ea8-20eaa StackAdj> Δ+6 {[-2-]}
<POP 20eaa-20eab StackAdj> Δ+2 {}
<Blob 0x20eab [2] @> Δ-2 {[«2""»]}
<POP 20eae-20eb0 StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x20eb0 2> {[«2""»]|[$$__]}
<Call 0x20ec4 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 20eca-20ecc StackAdj> Δ+2 {[«2""»]|[-2-]}
<MI 20ecc MOVE.L (A6+0x14),(A7)> {[4, '(A6+0x14)']}
<MI 20ed0 MOVE.L (A6+0x10),-(A7)> Δ-4 {[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<Call 0x20ed4 0x20df0> {[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<POP 20ed8-20eda StackAdj> Δ+8 {}
<POP 20eda-20ede Epilogue> Σ0
@ 20ede
<POP 20ede-2105c Body>
<POP 20ede-20ef4 Prologue> Σ0 ↓
<POP 20ef4-20f0c RegCacheLoad> Σ0 ↓
<POP 20f0c-20fa0 Naked> Σ0 ↓ →0x2102c
<MI 20f0c MOVE.W 0x2356c,D7> {}
<Call 0x20f12 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x20f18 [80] @> Δ-80 {[«80""»]}
<POP 20f2a-20f2c StackAdj> Δ-4 {[«80""»]|[-4-]}
<Lit 0x20f2c 79> {[«80""»]|[$$-------------------------------------------------------------------------------]}
<Call 0x20f3a 0x103e0> {[«80""»]|[$$-------------------------------------------------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 20f3c-20f40 StackAdj> Δ+84 {}
<Blob 0x20f40 [40] @> Δ-40 {[«40""»]}
<POP 20f4a-20f4c StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x20f4c 40> {[«40""»]|[$$ -------------------------------------]}
<Call 0x20f58 0x103e0> {[«40""»]|[$$ -------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 20f5a-20f5c StackAdj> Δ+44 {}
<Blob 0x20f5c [40] @> Δ-40 {[«40""»]}
<POP 20f68-20f6a StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x20f6a 40> {[«40""»]|[$$ CRASH REASON (based on last micro-pc)]}
<Call 0x20f76 0x103e0> {[«40""»]|[$$ CRASH REASON (based on last micro-pc)]}
WriteConsoleStringCrLf(str : String)
<POP 20f78-20f7a StackAdj> Δ+44 {}
<Blob 0x20f7a [40] @> Δ-40 {[«40""»]}
<POP 20f84-20f86 StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x20f86 40> {[«40""»]|[$$ -------------------------------------]}
<Call 0x20f92 0x103e0> {[«40""»]|[$$ -------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 20f94-20f96 StackAdj> Δ+44 {}
<MI 20f96 TST.W 0x2358c> {}
<MI 20f9c BEQ 0x2102c> {}
<POP 20fa0-20fa6 Naked> Σ0 ↓ →0x20fe2
<MI 20fa0 CMPI.W #0x01ff,D7> {}
<MI 20fa4 BLS 0x20fe2> {}
<POP 20fa6-20fac Naked> Σ0 ↓ →0x20fe2
<MI 20fa6 CMPI.W #0x020a,D7> {}
<MI 20faa BCC 0x20fe2> {}
<POP 20fac-20fe2 Naked> Σ0 →0x2102a
<MI 20fac MOVE.W D7,D0> {}
<MI 20fae ANDI.W #0x00ff,D0> {}
<POP 0x20fb2 LimitCheck 0x0 ≤ D0 ≤ 0x9> {}
<MI 20fb6 MULU.W #0x1e,D0> {}
<MI 20fb8 CLR.L D1> {}
<MI 20fba MOVE.W D0,D1> {}
<MI 20fbc LEA.L 0x2098c,A0> {}
<Blob 0x20fc0 [30] (A0+D1.L+#0x1e)> Δ-30 {[«30»]}
<POP 20fcc-20fce StackAdj> Δ-4 {[«30»]|[-4-]}
<Lit 0x20fce> {[«30»]|[$$…]}
<Pointer.sp 0x20fce 4> Δ-4
<Const 0x20fd2 0x1.2> Δ-2
<Const 0x20fd4 0x1e.2> Δ-2
<Call 0x20fd6 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20fd8-20fda StackAdj> Δ+8
<Call 0x20fda 0x103e0> {[«30»]|[$$…]}
WriteConsoleStringCrLf(str : String)
<POP 20fdc-20fe0 StackAdj> Δ+34 {}
<MI 20fe0 BRA 0x2102a> {}
<POP 20fe2-2102a Naked> Σ0 ↓ ←0x20fa0 ←0x20fa6
<Blob 0x20fe2 [2] @> Δ-2 {[«2""»]}
<POP 20fe6-20fe8 StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x20fe8 2> {[«2""»]|[$$__]}
<Call 0x20ff6 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 20ffc-20ffe StackAdj> Δ+4 {[«2""»]}
<MI 20ffe MOVE.W D7,(A7)> {[2, 'D7']}
<Call 0x21000 0x20d84> {[2, 'D7']}
<POP 21004-21005 StackAdj> Δ+2 ↓ {}
<Blob 0x21005 [14] @> Δ-14 {[«14""»]}
<POP 21014-21016 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x21016 13> {[«14""»]|[$$ - not found]}
<Call 0x21024 0x103e0> {[«14""»]|[$$ - not found]}
WriteConsoleStringCrLf(str : String)
<POP 21026-2102a StackAdj> Δ+18 {}
<POP 2102a-2102c Naked> Σ0 →0x21054 ←0x20fac
<MI 2102a BRA 0x21054> {}
<POP 2102c-21054 Naked> Σ0 ↓ ←0x20f0c
<Blob 0x2102c [64] @> Δ-64 {[«64""»]}
<POP 2103e-21040 StackAdj> Δ-4 {[«64""»]|[-4-]}
<Lit 0x21040 63> {[«64""»]|[$$ information unavailable (CPU STATE not dumped to tombstone)]}
<Call 0x2104e 0x103e0> {[«64""»]|[$$ information unavailable (CPU STATE not dumped to tombstone)]}
WriteConsoleStringCrLf(str : String)
<POP 21050-21054 StackAdj> Δ+68 {}
<POP 21054-2105c Epilogue> Σ0 ←0x2102a
@ 2105c
<POP 2105c-21152 Body>
<POP 2105c-21072 Prologue> Σ0 ↓
<POP 21072-21086 RegCacheLoad> Σ0 ↓
<POP 21086-210e6 Naked> Σ0 ↓ →0x21128
<Blob 0x21086 [80] @> Δ-80 {[«80""»]}
<POP 21098-2109a StackAdj> Δ-4 {[«80""»]|[-4-]}
<Lit 0x2109a 79> {[«80""»]|[$$-------------------------------------------------------------------------------]}
<Call 0x210a8 0x103e0> {[«80""»]|[$$-------------------------------------------------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 210aa-210ae StackAdj> Δ+84 {}
<Blob 0x210ae [22] @> Δ-22 {[«22""»]}
<POP 210ba-210bc StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x210bc 22> {[«22""»]|[$$ LAST CONSOLE OUTPUT]}
<Call 0x210ca 0x103e0> {[«22""»]|[$$ LAST CONSOLE OUTPUT]}
WriteConsoleStringCrLf(str : String)
<POP 210cc-210d0 StackAdj> Δ+26 {}
<Const 0x210d0 0x3.4> Δ-4 {[##3]}
<Const 0x210d4 0x13.4> Δ-4 {[##3]|[##19]}
<Call 0x210d8 0x20c98> {[##3]|[##19]}
<POP 210dc-210de StackAdj> Δ+8 {}
<MI 210de TST.W 0x23570> {}
<MI 210e4 BEQ 0x21128> {}
<POP 210e6-210e8 Naked> Σ0 ↓
<MI 210e6 MOVEQ.L #0x00,D7> {}
<POP 210e8-21126 Naked> Σ0 ↓ →0x210e8 ←0x210e8
<MI 210e8 MOVE.L 0x2479c,D0> {}
<POP 0x210ea LimitCheck 0x0 ≤ D0 ≤ 0x33f> {}
<MI 210f4 LEA.L 0x22d2c,A0> {}
<MI 210fa LEA.L (A0+D0.L),A0> {}
<MI 210fe MOVE.B (A0+0x1730),-(A7)> Δ-2 {[2, '(A0+0x1730)']}
<Call 0x21102 0x103d0> {[2, '(A0+0x1730)']}
WriteConsoleChar(chr : char)
<POP 21108-2110a StackAdj> Δ+2 {}
<MI 2110a ADDQ.L #0x1,0x2479c> {}
<MI 2110c MOVE.L 0x2479c,D4> {}
<MI 2110e MOVE.L #0x340,D3> {}
<Call 0x21114 0x10294> {}
?divs_d3_d4
<MI 2111a MOVE.L D3,0x2479c> {}
<MI 2111c ADDQ.L #0x1,D7> {}
<MI 2111e CMPI.L #0x0000033f,D7> {}
<MI 21124 BLE 0x210e8> {}
<POP 21126-21128 Naked> Σ0 →0x2114a
<MI 21126 BRA 0x2114a> {}
<POP 21128-2114a Naked> Σ0 ↓ ←0x21086
<Blob 0x21128 [32] @> Δ-32 {[«32""»]}
<POP 21134-21136 StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x21136 32> {[«32""»]|[$$Iop state not saved to tombstone]}
<Call 0x21144 0x103e0> {[«32""»]|[$$Iop state not saved to tombstone]}
WriteConsoleStringCrLf(str : String)
<POP 21146-2114a StackAdj> Δ+36 {}
<POP 2114a-21152 Epilogue> Σ0 ←0x21126
@ 21152
<POP 21152-2121c Body>
<POP 21152-21168 Prologue> Σ0 ↓
<POP 21168-21178 RegCacheLoad> Σ0 ↓
<POP 21178-21214 Naked> Σ0 ↓
<MI 21178 MOVE.B 0x235ae,D0> {}
<MI 2117e EXTB.W D0> {}
<POP 0x21180 LimitCheck 0x0 ≤ D0 ≤ 0xf> {}
<MI 21184 MOVE.B D0,D7> {}
<Blob 0x21186 [80] @> Δ-80 {[«80""»]}
<POP 21198-2119a StackAdj> Δ-4 {[«80""»]|[-4-]}
<Lit 0x2119a 79> {[«80""»]|[$$-------------------------------------------------------------------------------]}
<Call 0x211a8 0x103e0> {[«80""»]|[$$-------------------------------------------------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 211aa-211ab StackAdj> Δ+84 ↓ {}
<Blob 0x211ab [24] @> Δ-24 {[«24""»]}
<POP 211bc-211be StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x211be 23> {[«24""»]|[$$ CRASH CLASSIFICATION]}
<Call 0x211cc 0x103e0> {[«24""»]|[$$ CRASH CLASSIFICATION]}
WriteConsoleStringCrLf(str : String)
<POP 211ce-211d2 StackAdj> Δ+28 {}
<Const 0x211d2 0x3.4> Δ-4 {[##3]}
<Const 0x211d6 0x13.4> Δ-4 {[##3]|[##19]}
<Call 0x211da 0x20c98> {[##3]|[##19]}
<POP 211de-211e0 StackAdj> Δ+8 {}
<MI 211e0 MOVE.B D7,D0> {}
<MI 211e2 EXTB.W D0> {}
<MI 211e4 MULS.W #0x1e,D0> {}
<MI 211e6 LEA.L 0x20ab8,A0> {}
<Blob 0x211ea [30] (A0+D0.W)> Δ-30 {[«30»]}
<POP 211fa-211fc StackAdj> Δ-4 {[«30»]|[-4-]}
<Lit 0x211fc> {[«30»]|[$$…]}
<Pointer.sp 0x211fc 4> Δ-4
<Const 0x21200 0x1.2> Δ-2
<Const 0x21202 0x1e.2> Δ-2
<Call 0x21204 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21206-21208 StackAdj> Δ+8
<Call 0x21208 0x103e0> {[«30»]|[$$…]}
WriteConsoleStringCrLf(str : String)
<POP 2120a-2120e StackAdj> Δ+34 {}
<Call 0x2120e 0x103dc> {}
WriteConsoleCrLf(void)
<POP 21214-2121c Epilogue> Σ0
@ 2121c
<POP 2121c-213e4 Body>
<POP 2121c-21232 Prologue> Σ0 ↓
<POP 21232-2124e RegCacheLoad> Σ0 ↓
<POP 2124e-212b0 Naked> Σ0 ↓ →0x21378
<Blob 0x2124e [80] @> Δ-80 {[«80""»]}
<POP 21260-21262 StackAdj> Δ-4 {[«80""»]|[-4-]}
<Lit 0x21262 79> {[«80""»]|[$$-------------------------------------------------------------------------------]}
<Call 0x21270 0x103e0> {[«80""»]|[$$-------------------------------------------------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 21272-21273 StackAdj> Δ+84 ↓ {}
<Blob 0x21273 [22] @> Δ-22 {[«22""»]}
<POP 21284-21286 StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x21286 21> {[«22""»]|[$$ IOP Kernel version]}
<Call 0x21294 0x103e0> {[«22""»]|[$$ IOP Kernel version]}
WriteConsoleStringCrLf(str : String)
<POP 21296-21298 StackAdj> Δ+26 {}
<Const 0x21298 0x3.4> Δ-4 {[##3]}
<Const 0x2129c 0x12.4> Δ-4 {[##3]|[##18]}
<Call 0x212a0 0x20c98> {[##3]|[##18]}
<POP 212a4-212a6 StackAdj> Δ+8 {}
<MI 212a6 TST.W 0x23570> {}
<MI 212ac BEQ 0x21378> {}
<POP 212b0-212b4 Naked> Σ0 ↓
<MI 212b0 MOVEQ.L #0x00,D6> {}
<MI 212b2 MOVEQ.L #0x00,D7> {}
<POP 212b4-212cc Naked> Σ0 ↓ →0x21358 ←0x21366
<POP 0x212b4 LimitCheck 0x0 ≤ D7 ≤ 0x3ff> {}
<MI 212ba LEA.L 0x22d2c,A0> {}
<MI 212bc LEA.L (A0+D7.L),A0> {}
<MI 212c0 MOVE.B (A0+0x414),D0> {}
<MI 212c4 CMPI.B #0x40,D0> {}
<MI 212c8 BNE 0x21358> {}
<POP 212cc-212e6 Naked> Σ0 ↓ →0x21358
<MI 212cc MOVE.L D7,D0> {}
<MI 212ce ADDQ.L #0x1,D0> {}
<POP 0x212d0 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {}
<MI 212d6 LEA.L 0x22d2c,A0> {}
<MI 212d8 LEA.L (A0+D0.L),A0> {}
<MI 212dc MOVE.B (A0+0x414),D0> {}
<MI 212e0 CMPI.B #0x28,D0> {}
<MI 212e4 BNE 0x21358> {}
<POP 212e6-21300 Naked> Σ0 ↓ →0x21358
<MI 212e6 MOVE.L D7,D0> {}
<MI 212e8 ADDQ.L #0x2,D0> {}
<POP 0x212ea LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {}
<MI 212f0 LEA.L 0x22d2c,A0> {}
<MI 212f2 LEA.L (A0+D0.L),A0> {}
<MI 212f6 MOVE.B (A0+0x414),D0> {}
<MI 212fa CMPI.B #0x23,D0> {}
<MI 212fe BNE 0x21358> {}
<POP 21300-2131a Naked> Σ0 ↓ →0x21358
<MI 21300 MOVE.L D7,D0> {}
<MI 21302 ADDQ.L #0x3,D0> {}
<POP 0x21304 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {}
<MI 2130a LEA.L 0x22d2c,A0> {}
<MI 2130c LEA.L (A0+D0.L),A0> {}
<MI 21310 MOVE.B (A0+0x414),D0> {}
<MI 21314 CMPI.B #0x29,D0> {}
<MI 21318 BNE 0x21358> {}
<POP 2131a-2131c Naked> Σ0 ↓
<MI 2131a ADDQ.L #0x4,D7> {}
<POP 2131c-2134e Naked> Σ0 ↓ →0x21352 ←0x21354
<POP 0x2131c LimitCheck 0x0 ≤ D7 ≤ 0x3ff> {}
<MI 21322 LEA.L 0x22d2c,A0> {}
<MI 21324 LEA.L (A0+D7.L),A0> {}
<MI 21328 MOVE.B (A0+0x414),-(A7)> Δ-2 {[2, '(A0+0x414)']}
<Call 0x2132c 0x103d0> {[2, '(A0+0x414)']}
WriteConsoleChar(chr : char)
<POP 21332-21334 StackAdj> Δ+2 {}
<MI 21334 ADDQ.L #0x1,D7> {}
<MI 21336 MOVEQ.L #0x00,D6> {}
<POP 0x21338 LimitCheck 0x0 ≤ D7 ≤ 0x3ff> {}
<MI 2133e LEA.L 0x22d2c,A0> {}
<MI 21340 LEA.L (A0+D7.L),A0> {}
<MI 21344 MOVE.B (A0+0x414),D0> {}
<MI 21348 CMPI.B #0x5c,D0> {}
<MI 2134c BEQ 0x21352> {}
<POP 2134e-21352 Naked> Σ0 ↓ →0x21354
<MI 2134e CMP.L #0x3ff,D7> {}
<MI 21350 BLT 0x21354> {}
<POP 21352-21354 Naked> Σ0 ↓ ←0x2131c
<MI 21352 ADDQ.B #0x1,D6> {}
<POP 21354-21358 Naked> Σ0 ↓ →0x2131c ←0x2134e
<MI 21354 TST.B D6> {}
<MI 21356 BEQ 0x2131c> {}
<POP 21358-21360 Naked> Σ0 ↓ →0x21364 ←0x212b4 ←0x212cc ←0x212e6 ←0x21300
<MI 21358 ADDQ.L #0x1,D7> {}
<MI 2135a MOVEQ.L #0x00,D0> {}
<MI 2135c CMP.L #0x3ff,D7> {}
<MI 2135e BGT 0x21364> {}
<POP 21360-21364 Naked> Σ0 ↓ →0x21366
<MI 21360 TST.B D6> {}
<MI 21362 BEQ 0x21366> {}
<POP 21364-21366 Naked> Σ0 ↓ ←0x21358
<MI 21364 ADDQ.B #0x1,D0> {}
<POP 21366-21370 Naked> Σ0 ↓ →0x212b4 ←0x21360
<MI 21366 EXTB.W D0> {}
<POP 0x21368 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 2136a MOVE.B D0,D6> {}
<MI 2136c BEQ 0x212b4> {}
<POP 21370-21378 Naked> Σ0 →0x2139a
<Call 0x21370 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21376 BRA 0x2139a> {}
<POP 21378-2139a Naked> Σ0 ↓ ←0x2124e
<Blob 0x21378 [32] @> Δ-32 {[«32""»]}
<POP 21384-21386 StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x21386 32> {[«32""»]|[$$Iop state not saved to tombstone]}
<Call 0x21394 0x103e0> {[«32""»]|[$$Iop state not saved to tombstone]}
WriteConsoleStringCrLf(str : String)
<POP 21396-2139a StackAdj> Δ+36 {}
<POP 2139a-213dc Naked> Σ0 ↓ ←0x21370
<Blob 0x2139a [14] @> Δ-14 {[«14""»]}
<Blob 0x213a6 [4] 0x23598> Δ-4 {[«14""»]|[«4»]}
<Blob 0x213ac [4] 0x23594> Δ-4 {[«14""»]|[«4»]|[«4»]}
<POP 213b2-213b4 StackAdj> Δ-8 {[«14""»]|[«4»]|[«4»]|[-8-]}
<Lit 0x213b4 14> {[«14""»]|[«4»]|[«4»]|[-4-]|[$$CLUSTER_ID =>_]}
<POP 213c0-213c2 StackAdj> Δ-4 {[«14""»]|[«4»]|[«4»]|[-4-]|[$$CLUSTER_ID =>_]|[-4-]}
<Lit 0x213c2> {[«14""»]|[«4»]|[«4»]|[-4-]|[$$CLUSTER_ID =>_]|[$$…]}
<Pointer.sp 0x213c2 12> Δ-4
<Const 0x213c6 0x1.2> Δ-2
<Const 0x213c8 0x8.2> Δ-2
<Call 0x213cc 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 213ce-213d0 StackAdj> Δ+8
<Call 0x213d0 0x102d0> {[«14""»]|[«4»]|[«4»]|[-4-]|[$$CLUSTER_ID =>_]|[$$…]}
StringCat2(a, b : String) : String
<POP 213d6-213d8 StackAdj> Δ+8 {[«14""»]|[«4»]|[«4»]|[-4-]}
<Call 0x213d8 0x103e0> {[«14""»]|[«4»]|[«4»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 213da-213dc StackAdj> Δ+26 {}
<POP 213dc-213e4 Epilogue> Σ0
@ 213e4
<LVAR -0x004 4(rw)>
<POP 213e4-215ac Body>
<POP 213e4-213fa Prologue> Σ0 ↓
<POP 213fa-21412 RegCacheLoad> Σ0 ↓
<POP 21412-21498 Naked> Σ0 Δ-4 ↓
<MI 21412 MOVE.L #0x340,(A6-0x4)> {}
<Blob 0x21418 [80] @> Δ-80 {[«80""»]}
<POP 2142a-2142c StackAdj> Δ-4 {[«80""»]|[-4-]}
<Lit 0x2142c 79> {[«80""»]|[$$-------------------------------------------------------------------------------]}
<Call 0x2143e 0x103e0> {[«80""»]|[$$-------------------------------------------------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 21444-21445 StackAdj> Δ+84 ↓ {}
<Blob 0x21445 [18] @> Δ-18 {[«18""»]}
<POP 21456-21458 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x21458 17> {[«18""»]|[$$ RESTART BUFFER]}
<Call 0x2146a 0x103e0> {[«18""»]|[$$ RESTART BUFFER]}
WriteConsoleStringCrLf(str : String)
<POP 21470-21474 StackAdj> Δ+22 {}
<Const 0x21474 0x3.4> Δ-4 {[##3]}
<Const 0x21478 0xe.4> Δ-4 {[##3]|[##14]}
<Call 0x2147c 0x20c98> {[##3]|[##14]}
<POP 21480-21482 StackAdj> Δ+8 {}
<Call 0x21482 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21488 CLR.L D0> {}
<MI 2148a MOVE.W 0x2358e,D0> {}
<MI 21490 SUBQ.L #0x1,D0> {}
<MI 21492 MOVE.L D0,D7> {}
<MI 21494 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 21496 MOVEQ.L #0x01,D6> {[4, '(A6-0x4)']}
<POP 21498-2149c Naked> Σ-4 ↓ →0x214c2 ←0x2149c
<MI 21498 CMP.L (A7),D6> {[-4-]}
<MI 2149a BGT 0x214c2> {[-4-]}
<POP 2149c-214c2 Naked> Σ-4 ↓ →0x21498
<POP 0x2149c LimitCheck 0x0 ≤ D7 ≤ 0x33f> {[-4-]}
<MI 214a2 LEA.L 0x22d2c,A0> {[-4-]}
<MI 214a4 LEA.L (A0+D7.L),A0> {[-4-]}
<MI 214a8 MOVE.B (A0+0x902),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x902)']}
<Call 0x214ac 0x103d0> {[-4-]|[2, '(A0+0x902)']}
WriteConsoleChar(chr : char)
<POP 214b2-214b4 StackAdj> Δ+2 {[-4-]}
<MI 214b4 ADDQ.L #0x1,D7> {[-4-]}
<MI 214b6 MOVE.L D7,D4> {[-4-]}
<MI 214b8 MOVE.L (A6-0x4),D3> {[-4-]}
<Call 0x214ba 0x10294> {[-4-]}
?divs_d3_d4
<MI 214bc MOVE.L D3,D7> {[-4-]}
<MI 214be ADDQ.L #0x1,D6> {[-4-]}
<MI 214c0 BVC 0x21498> {[-4-]}
<POP 214c2-214d0 Naked> Σ-4 Δ+4 ↓ →0x2151e ←0x21498
<POP 214c2-214c4 StackAdj> Δ+4 {}
<MI 214c4 MOVE.W 0x2356e,D0> {}
<MI 214ca CMPI.W #0x0002,D0> {}
<MI 214ce BLS 0x2151e> {}
<POP 214d0-214d8 Naked> Σ0 ↓ →0x2151e
<MI 214d0 TST.W 0x23590> {}
<MI 214d6 BEQ 0x2151e> {}
<POP 214d8-214f2 Naked> Σ0 Δ-4 ↓
<MI 214d8 CLR.L D0> {}
<MI 214da MOVE.W 0x23590,D0> {}
<MI 214e0 ADD.L (A6-0x4),D0> {}
<MI 214e2 SUB.L D7,D0> {}
<MI 214e4 SUBQ.L #0x1,D0> {}
<MI 214e6 MOVE.L D0,D5> {}
<MI 214e8 MOVE.L D5,D4> {}
<MI 214ea MOVE.L (A6-0x4),D3> {}
<Call 0x214ec 0x10294> {}
?divs_d3_d4
<MI 214ee MOVE.L D3,-(A7)> Δ-4 {[4, 'D3']}
<MI 214f0 MOVEQ.L #0x01,D6> {[4, 'D3']}
<POP 214f2-214f6 Naked> Σ-4 ↓ →0x2151c ←0x214f6
<MI 214f2 CMP.L (A7),D6> {[-4-]}
<MI 214f4 BGT 0x2151c> {[-4-]}
<POP 214f6-2151c Naked> Σ-4 ↓ →0x214f2
<POP 0x214f6 LimitCheck 0x0 ≤ D7 ≤ 0x33f> {[-4-]}
<MI 214fc LEA.L 0x22d2c,A0> {[-4-]}
<MI 214fe LEA.L (A0+D7.L),A0> {[-4-]}
<MI 21502 MOVE.B (A0+0x10b0),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x10b0)']}
<Call 0x21506 0x103d0> {[-4-]|[2, '(A0+0x10b0)']}
WriteConsoleChar(chr : char)
<POP 2150c-2150e StackAdj> Δ+2 {[-4-]}
<MI 2150e ADDQ.L #0x1,D7> {[-4-]}
<MI 21510 MOVE.L D7,D4> {[-4-]}
<MI 21512 MOVE.L (A6-0x4),D3> {[-4-]}
<Call 0x21514 0x10294> {[-4-]}
?divs_d3_d4
<MI 21516 MOVE.L D3,D7> {[-4-]}
<MI 21518 ADDQ.L #0x1,D6> {[-4-]}
<MI 2151a BVC 0x214f2> {[-4-]}
<POP 2151c-2151e Naked> Σ-4 Δ+4 ↓ ←0x214f2
<POP 2151c-2151e StackAdj> Δ+4 {}
<POP 2151e-2152a Naked> Σ0 ↓ →0x2159e ←0x214c2 ←0x214d0
<MI 2151e MOVE.W 0x2356e,D0> {}
<MI 21524 CMPI.W #0x0002,D0> {}
<MI 21528 BLS 0x2159e> {}
<POP 2152a-21532 Naked> Σ0 ↓ →0x2159e
<MI 2152a TST.W 0x23592> {}
<MI 21530 BEQ 0x2159e> {}
<POP 21532-21572 Naked> Σ0 Δ-4 ↓
<Blob 0x21532 [40] @> Δ-40 {[«40""»]}
<POP 21544-21546 StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x21546 39> {[«40""»]|[$$---- console output from the FRU tests:]}
<Call 0x21558 0x103e0> {[«40""»]|[$$---- console output from the FRU tests:]}
WriteConsoleStringCrLf(str : String)
<POP 2155e-21562 StackAdj> Δ+44 {}
<MI 21562 CLR.L D0> {}
<MI 21564 MOVE.W 0x23592,D0> {}
<MI 2156a SUBQ.L #0x1,D0> {}
<MI 2156c MOVE.L D0,D7> {}
<MI 2156e MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 21570 MOVEQ.L #0x01,D6> {[4, '(A6-0x4)']}
<POP 21572-21576 Naked> Σ-4 ↓ →0x2159c ←0x21576
<MI 21572 CMP.L (A7),D6> {[-4-]}
<MI 21574 BGT 0x2159c> {[-4-]}
<POP 21576-2159c Naked> Σ-4 ↓ →0x21572
<POP 0x21576 LimitCheck 0x0 ≤ D7 ≤ 0x33f> {[-4-]}
<MI 2157c LEA.L 0x22d2c,A0> {[-4-]}
<MI 2157e LEA.L (A0+D7.L),A0> {[-4-]}
<MI 21582 MOVE.B (A0+0x13f0),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x13f0)']}
<Call 0x21586 0x103d0> {[-4-]|[2, '(A0+0x13f0)']}
WriteConsoleChar(chr : char)
<POP 2158c-2158e StackAdj> Δ+2 {[-4-]}
<MI 2158e ADDQ.L #0x1,D7> {[-4-]}
<MI 21590 MOVE.L D7,D4> {[-4-]}
<MI 21592 MOVE.L (A6-0x4),D3> {[-4-]}
<Call 0x21594 0x10294> {[-4-]}
?divs_d3_d4
<MI 21596 MOVE.L D3,D7> {[-4-]}
<MI 21598 ADDQ.L #0x1,D6> {[-4-]}
<MI 2159a BVC 0x21572> {[-4-]}
<POP 2159c-2159e Naked> Σ-4 Δ+4 ↓ ←0x21572
<POP 2159c-2159e StackAdj> Δ+4 {}
<POP 2159e-215a4 Naked> Σ0 ↓ ←0x2151e ←0x2152a
<Call 0x2159e 0x103dc> {}
WriteConsoleCrLf(void)
<POP 215a4-215ac Epilogue> Σ0
@ 215ac
<POP 215ac-21618 Body>
<POP 215ac-215c2 Prologue> Σ0 ↓
<POP 215c2-215ca RegCacheLoad> Σ0 ↓
<POP 215ca-215cc Naked> Σ0 ↓
<MI 215ca MOVEQ.L #0x01,D6> {}
<POP 215cc-21610 Naked> Σ0 ↓ →0x215cc ←0x215cc
<MI 215cc MOVEQ.L #0x02,D4> {}
<MI 215ce MOVE.L D6,D3> {}
<Call 0x215d0 0x1028c> {}
?muls_d3_d4
<MI 215d6 MOVE.L D4,D0> {}
<MI 215d8 SUBQ.L #0x1,D0> {}
<MI 215da SUBQ.L #0x1,D0> {}
<POP 0x215dc LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 215e2 LEA.L 0x22d2c,A0> {}
<MI 215e4 LEA.L (A0+D0.L),A0> {}
<MI 215e8 MOVE.B (A0+0x1a74),D7> {}
<MI 215ec MOVE.L D4,D0> {}
<MI 215ee SUBQ.L #0x1,D0> {}
<POP 0x215f0 LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 215f6 LEA.L 0x22d2c,A1> {}
<MI 215f8 LEA.L (A1+D0.L),A1> {}
<MI 215fc MOVE.B (A1+0x1a74),(A0+0x1a74)> {}
<MI 21602 MOVE.B D7,(A1+0x1a74)> {}
<MI 21606 ADDQ.L #0x1,D6> {}
<MI 21608 CMPI.L #0x0000000f,D6> {}
<MI 2160e BLE 0x215cc> {}
<POP 21610-21618 Epilogue> Σ0
@ 21618
<POP 21618-21674 Body>
<POP 21618-2162e Prologue> Σ0 ↓
<POP 2162e-21630 Naked> Σ0 ↓
<MI 2162e MOVEQ.L #0x01,D7> {}
<POP 21630-21652 Naked> Σ0 ↓ →0x21662 ←0x21662
<MI 21630 MOVE.L D7,D0> {}
<MI 21632 SUBQ.L #0x1,D0> {}
<POP 0x21634 LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 2163e LEA.L 0x22d2c,A0> {}
<MI 21644 LEA.L (A0+D0.L),A0> {}
<MI 21648 MOVE.B (A0+0x1a74),D0> {}
<MI 2164c CMPI.B #0x01,D0> {}
<MI 21650 BLS 0x21662> {}
<POP 21652-21658 Naked> Σ0 ↓ →0x21662
<MI 21652 CMPI.B #0xff,D0> {}
<MI 21656 BCC 0x21662> {}
<POP 21658-21662 Naked> Σ0 ↓
<MI 21658 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x2165a 0x103d0> {[2, 'D0']}
WriteConsoleChar(chr : char)
<POP 21660-21662 StackAdj> Δ+2 {}
<POP 21662-2166c Naked> Σ0 ↓ →0x21630 ←0x21630 ←0x21652
<MI 21662 ADDQ.L #0x1,D7> {}
<MI 21664 CMPI.L #0x0000001e,D7> {}
<MI 2166a BLE 0x21630> {}
<POP 2166c-21674 Epilogue> Σ0
@ 21674
<LVAR -0x002 2(w)>
<POP 21674-21956 Body> Δ+8
<POP 21674-2168a Prologue> Σ0 ↓
<POP 2168a-216a2 RegCacheLoad> Σ0 ↓
<POP 216a2-2170c Naked> Σ0 ↓ →0x21928
<Blob 0x216a2 [80] @> Δ-80 {[«80""»]}
<POP 216b4-216b6 StackAdj> Δ-4 {[«80""»]|[-4-]}
<Lit 0x216b6 79> {[«80""»]|[$$-------------------------------------------------------------------------------]}
<Call 0x216c4 0x103e0> {[«80""»]|[$$-------------------------------------------------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 216ca-216ce StackAdj> Δ+84 {}
<Blob 0x216ce [32] @> Δ-32 {[«32""»]}
<POP 216da-216dc StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x216dc 32> {[«32""»]|[$$ UCODE TRACE (last 20 entries)]}
<Call 0x216ea 0x103e0> {[«32""»]|[$$ UCODE TRACE (last 20 entries)]}
WriteConsoleStringCrLf(str : String)
<POP 216f0-216f2 StackAdj> Δ+36 {}
<Const 0x216f2 0x3.4> Δ-4 {[##3]}
<Const 0x216f6 0x1d.4> Δ-4 {[##3]|[##29]}
<Call 0x216fa 0x20c98> {[##3]|[##29]}
<POP 216fe-21700 StackAdj> Δ+8 {}
<Call 0x21700 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21702 TST.W 0x2358c> {}
<MI 21708 BEQ 0x21928> {}
<POP 2170c-2173a Naked> Σ0 ↓
<Blob 0x2170c [36] @> Δ-36 {[«36""»]}
<POP 2171c-2171e StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x2171e 35> {[«36""»]|[$$ Microcode trace for Wcs Version_]}
<Call 0x2172c 0x103d8> {[«36""»]|[$$ Microcode trace for Wcs Version_]}
WriteConsoleString(str : String)
<POP 2172e-21732 StackAdj> Δ+40 {}
<Call 0x21732 0x21618> {}
<Call 0x21736 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21738 MOVEQ.L #0x00,D7> {}
<POP 2173a-2176e Naked> Σ0 ↓ →0x21770 ←0x217cc
<POP 0x2173a LimitCheck 0x0 ≤ D7 ≤ 0x13> {}
<MI 21744 MOVE.L D7,D0> {}
<MI 21746 ASL.L #0x1,D0> {}
<MI 21748 LEA.L 0x22d2c,A0> {}
<MI 2174e LEA.L (A0+D0.L),A0> {}
<MI 21752 MOVE.W #0x3fff,D0> {}
<MI 21756 AND.W (A0+0x81a),D0> {}
<MI 2175a MOVE.W D0,(A6-0x2)> {}
<MI 2175e MOVEQ.L #0x00,D6> {}
<MI 21760 MOVE.W #0x4000,D1> {}
<MI 21764 AND.W (A0+0x81a),D1> {}
<MI 21768 CMPI.W #0x4000,D1> {}
<MI 2176c BNE 0x21770> {}
<POP 2176e-21770 Naked> Σ0 ↓
<MI 2176e ADDQ.B #0x1,D6> {}
<POP 21770-21780 Naked> Σ0 ↓ →0x21782 ←0x2173a
<MI 21770 MOVEQ.L #0x00,D5> {}
<MI 21772 MOVE.W #0x8000,D1> {}
<MI 21776 AND.W (A0+0x81a),D1> {}
<MI 2177a CMPI.W #0x8000,D1> {}
<MI 2177e BNE 0x21782> {}
<POP 21780-21782 Naked> Σ0 ↓
<MI 21780 ADDQ.B #0x1,D5> {}
<POP 21782-21786 Naked> Σ0 ↓ →0x21798 ←0x21770
<MI 21782 TST.B D6> {}
<MI 21784 BEQ 0x21798> {}
<POP 21786-21798 Naked> Σ0 Δ-6 →0x217a8
<Blob 0x21786 [6] @> Δ-6 {[«6""»]}
<MI 21796 BRA 0x217a8> {[«6""»]}
<POP 21798-217a8 Naked> Σ0 Δ-6 ↓ ←0x21782
<Blob 0x21798 [6] @> Δ-6 {[«6""»]}
<POP 217a8-217c2 Naked> Σ-6 Δ+6 ↓ →0x217c8 ←0x21786
<POP 217a8-217aa StackAdj> Δ-4 {[-10-]}
<Lit 0x217aa> {[-6-]|[$$…]}
<Pointer.sp 0x217aa 4> Δ-4
<Const 0x217ae 0x1.2> Δ-2
<Const 0x217b0 0x5.2> Δ-2
<Call 0x217b4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 217b6-217b8 StackAdj> Δ+8
<Call 0x217b8 0x103d8> {[-6-]|[$$…]}
WriteConsoleString(str : String)
<POP 217ba-217be StackAdj> Δ+10 {}
<MI 217be TST.B D5> {}
<MI 217c0 BEQ 0x217c8> {}
<POP 217c2-217c8 Naked> Σ0 Δ-2 →0x217cc
<Blob 0x217c2 [2] @> Δ-2 {[«2""»]}
<MI 217c6 BRA 0x217cc> {[«2""»]}
<POP 217c8-217cc Naked> Σ0 Δ-2 ↓ ←0x217a8
<Blob 0x217c8 [2] @> Δ-2 {[«2""»]}
<POP 217cc-217f6 Naked> Σ-2 Δ+2 ↓ →0x2173a ←0x217c2
<POP 217cc-217ce StackAdj> Δ-4 {[-6-]}
<Lit 0x217ce> {[-2-]|[$$…]}
<Pointer.sp 0x217ce 4> Δ-4
<Const 0x217d2 0x1.2> Δ-2
<Const 0x217d4 0x2.2> Δ-2
<Call 0x217d8 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 217da-217dc StackAdj> Δ+8
<Call 0x217dc 0x103d8> {[-2-]|[$$…]}
WriteConsoleString(str : String)
<POP 217de-217e0 StackAdj> Δ+6 {}
<MI 217e0 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x217e2 0x20d84> {[2, 'D0']}
<POP 217e6-217e8 StackAdj> Δ+2 {}
<Call 0x217e8 0x103dc> {}
WriteConsoleCrLf(void)
<MI 217ea ADDQ.L #0x1,D7> {}
<MI 217ec CMPI.L #0x00000013,D7> {}
<MI 217f2 BLE 0x2173a> {}
<POP 217f6-21826 Naked> Σ0 ↓
<Call 0x217f6 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x217f8 [26] @> Δ-26 {[«26""»]}
<POP 2180a-2180c StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x2180c 25> {[«26""»]|[$$ Micro Stack contents :]}
<Call 0x2181a 0x103e0> {[«26""»]|[$$ Micro Stack contents :]}
WriteConsoleStringCrLf(str : String)
<POP 21820-21824 StackAdj> Δ+30 {}
<MI 21824 MOVEQ.L #0x00,D7> {}
<POP 21826-218a4 Naked> Σ0 ↓ →0x21826 ←0x21826
<Blob 0x21826 [2] @> Δ-2 {[«2""»]}
<Blob 0x2182a [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x2182e [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 21832-21834 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-8-]}
<Lit 0x21834 6> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$______]}
<MI 21840 MOVE.L D7,(A7)> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'D7']}
<POP 2183e-21840 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x21842 0x102e4> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 21848-2184a StackAdj> Δ+4 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x2184a 0x102d0> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 21850-21852 StackAdj> Δ+8 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Call 0x21852 0x103d8> {[«2""»]|[«2""»]|[«2""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21854-21856 StackAdj> Δ+6 {[«2""»]|[«2""»]}
<POP 21856-21857 StackAdj> Δ+2 {[«2""»]}
<Blob 0x21857 [2] @> Δ-2 {[«2""»]|[«2""»]}
<MI 2185a MOVE.B 0x207eb,(A7+0x1)> {[«2""»]|[«2""»]}
<MI 21860 MOVE.B 0x207ec,(A7+0x2)> {[«2""»]|[«2""»]}
<POP 21866-21868 StackAdj> Δ-4 {[«2""»]|[«2""»]|[-4-]}
<Lit 0x21868 3> {[«2""»]|[«2""»]|[$$ -_]}
<Call 0x21876 0x103d8> {[«2""»]|[«2""»]|[$$ -_]}
WriteConsoleString(str : String)
<POP 21878-2187a StackAdj> Δ+8 {}
<POP 0x2187a LimitCheck 0x0 ≤ D7 ≤ 0xf> {}
<MI 21880 MOVE.L D7,D0> {}
<MI 21882 ASL.L #0x1,D0> {}
<MI 21884 LEA.L 0x22d2c,A0> {}
<MI 2188a LEA.L (A0+D0.L),A0> {}
<MI 2188e MOVE.W (A0+0xc52),-(A7)> Δ-2 {[2, '(A0+0xc52)']}
<Call 0x21892 0x20d84> {[2, '(A0+0xc52)']}
<POP 21896-21898 StackAdj> Δ+2 {}
<Call 0x21898 0x103dc> {}
WriteConsoleCrLf(void)
<MI 2189a ADDQ.L #0x1,D7> {}
<MI 2189c CMPI.L #0x00000009,D7> {}
<MI 218a2 BLE 0x21826> {}
<POP 218a4-218a6 Naked> Σ0 ↓
<MI 218a4 MOVEQ.L #0x0a,D7> {}
<POP 218a6-21924 Naked> Σ0 ↓ →0x218a6 ←0x218a6
<Blob 0x218a6 [6] @> Δ-6 {[«6""»]}
<POP 218b6-218b8 StackAdj> Δ-8 {[«6""»]|[-8-]}
<Lit 0x218b8 5> {[«6""»]|[-4-]|[$$_____]}
<MI 218c4 MOVE.L D7,(A7)> {[«6""»]|[-4-]|[4, 'D7']}
<POP 218c2-218c4 StackAdj> Δ-8 {[«6""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x218c6 0x102e4> {[«6""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 218cc-218ce StackAdj> Δ+4 {[«6""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x218ce 0x102d0> {[«6""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 218d4-218d6 StackAdj> Δ+8 {[«6""»]|[-4-]}
<Call 0x218d6 0x103d8> {[«6""»]|[-4-]}
WriteConsoleString(str : String)
<POP 218d8-218da StackAdj> Δ+6 {[-4-]}
<POP 218da-218db StackAdj> Δ+2 {[-2-]}
<Blob 0x218db [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 218de MOVE.B 0x207ef,(A7+0x1)> {[-2-]|[«2""»]}
<MI 218e4 MOVE.B 0x207f0,(A7+0x2)> {[-2-]|[«2""»]}
<POP 218ea-218ec StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]}
<Lit 0x218ec> {[-2-]|[«2""»]|[$$…]}
<Pointer.sp 0x218ec 4> Δ-4
<Const 0x218f0 0x1.2> Δ-2
<Const 0x218f2 0x3.2> Δ-2
<Call 0x218f6 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 218f8-218fa StackAdj> Δ+8
<Call 0x218fa 0x103d8> {[-2-]|[«2""»]|[$$…]}
WriteConsoleString(str : String)
<POP 218fc-218fe StackAdj> Δ+8 {}
<POP 0x218fe LimitCheck 0x0 ≤ D7 ≤ 0xf> {}
<MI 21904 MOVE.L D7,D0> {}
<MI 21906 ASL.L #0x1,D0> {}
<MI 21908 LEA.L 0x22d2c,A0> {}
<MI 2190e LEA.L (A0+D0.L),A0> {}
<MI 21912 MOVE.W (A0+0xc52),-(A7)> Δ-2 {[2, '(A0+0xc52)']}
<Call 0x21916 0x20d84> {[2, '(A0+0xc52)']}
<POP 2191a-2191c StackAdj> Δ+2 {}
<Call 0x2191c 0x103dc> {}
WriteConsoleCrLf(void)
<MI 2191e ADDQ.L #0x1,D7> {}
<MI 21920 CMP.L #0x0f,D7> {}
<MI 21922 BLE 0x218a6> {}
<POP 21924-21928 Naked> Σ0 →0x2194e
<Call 0x21924 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21926 BRA 0x2194e> {}
<POP 21928-2194e Naked> Σ0 ↓ ←0x216a2
<Blob 0x21928 [42] @> Δ-42 {[«42""»]}
<POP 21934-21936 StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x21936 42> {[«42""»]|[$$R1000 cpu state was not saved in tombstone]}
<Call 0x21944 0x103e0> {[«42""»]|[$$R1000 cpu state was not saved in tombstone]}
WriteConsoleStringCrLf(str : String)
<POP 2194a-2194e StackAdj> Δ+46 {}
<POP 2194e-21956 Epilogue> Σ0 ←0x21924
@ 21956
<POP 21956-219fe Body>
<POP 21956-2196c Prologue> Σ0 ↓
<POP 2196c-21970 RegCacheLoad> Σ0 ↓
<POP 21970-2199c Naked> Σ0 ↓
<Blob 0x21970 [20] @> Δ-20 {[«20""»]}
<POP 2197c-2197e StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x2197e 20> {[«20""»]|[$$ Lex levels valid =>]}
<Call 0x21990 0x103d8> {[«20""»]|[$$ Lex levels valid =>]}
WriteConsoleString(str : String)
<POP 21996-2199a StackAdj> Δ+24 {}
<MI 2199a MOVEQ.L #0x00,D7> {}
<POP 2199c-219ba Naked> Σ0 ↓ →0x219ea ←0x219ea
<POP 0x2199c LimitCheck 0x0 ≤ D7 ≤ 0xf> {}
<MI 219a2 LEA.L 0x2397c,A0> {}
<MI 219a8 MOVE.L D7,D0> {}
<MI 219aa ROR.L #0x3,D0> {}
<MI 219ac ADDA.W D0,A0> {}
<MI 219ae SWAP.W D0> {}
<MI 219b0 ROL.W #0x3,D0> {}
<MI 219b2 MOVE.B (A0),D1> {}
<MI 219b4 LSL.B D0,D1> {}
<MI 219b6 LSR.B #0x7,D1> {}
<MI 219b8 BEQ 0x219ea> {}
<POP 219ba-219ea Naked> Σ0 ↓
<Blob 0x219ba [2] @> Δ-2 {[«2""»]}
<POP 219be-219c0 StackAdj> Δ-8 {[«2""»]|[-8-]}
<Lit 0x219c0 2> {[«2""»]|[-4-]|[$$__]}
<MI 219d0 MOVE.L D7,(A7)> {[«2""»]|[-4-]|[4, 'D7']}
<POP 219ca-219d0 StackAdj> Δ-8 {[«2""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x219d2 0x102e4> {[«2""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 219d8-219da StackAdj> Δ+4 {[«2""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x219da 0x102d0> {[«2""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 219e0-219e2 StackAdj> Δ+8 {[«2""»]|[-4-]}
<Call 0x219e2 0x103d8> {[«2""»]|[-4-]}
WriteConsoleString(str : String)
<POP 219e8-219ea StackAdj> Δ+6 {}
<POP 219ea-219f0 Naked> Σ0 ↓ →0x2199c ←0x2199c
<MI 219ea ADDQ.L #0x1,D7> {}
<MI 219ec CMP.L #0x0f,D7> {}
<MI 219ee BLE 0x2199c> {}
<POP 219f0-219f6 Naked> Σ0 ↓
<Call 0x219f0 0x103dc> {}
WriteConsoleCrLf(void)
<POP 219f6-219fe Epilogue> Σ0
@ 219fe
<LVAR 0x012 2(r)>
<LVAR 0x010 2(r)>
<LVAR 0x00a 2(r)>
<LVAR 0x008 2(r)>
<POP 219fe-21a62 Body>
<POP 219fe-21a14 Prologue> Σ0 ↓
<POP 21a14-21a18 RegCacheLoad> Σ0 ↓
<POP 21a18-21a5a Naked> Σ0 ↓
<MI 21a18 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x21a1c 0x20d84> {[2, '(A6+0x8)']}
<MI 21a1e MOVE.W (A6+0xa),(A7)> {[2, '(A6+0xa)']}
<Call 0x21a22 0x20d84> {[2, '(A6+0xa)']}
<POP 21a24-21a25 StackAdj> Δ+2 {}
<Blob 0x21a25 [2] @> Δ-2 {[«2""»]}
<POP 21a28-21a2a StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x21a2a 2> {[«2""»]|[$$__]}
<Call 0x21a3e 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 21a44-21a46 StackAdj> Δ+4 {[«2""»]}
<MI 21a46 MOVE.W (A6+0x10),(A7)> {[2, '(A6+0x10)']}
<Call 0x21a4a 0x20d84> {[2, '(A6+0x10)']}
<MI 21a4c MOVE.W (A6+0x12),(A7)> {[2, '(A6+0x12)']}
<Call 0x21a50 0x20d84> {[2, '(A6+0x12)']}
<POP 21a52-21a54 StackAdj> Δ+2 {}
<Call 0x21a54 0x103dc> {}
WriteConsoleCrLf(void)
<POP 21a5a-21a62 Epilogue> Σ0
@ 21a62
<POP 21a62-21e0a Body>
<POP 21a62-21a78 Prologue> Σ0 ↓
<POP 21a78-21a98 RegCacheLoad> Σ0 ↓
<POP 21a98-21b04 Naked> Σ0 ↓ →0x21ddc
<Blob 0x21a98 [80] @> Δ-80 {[«80""»]}
<POP 21aaa-21aac StackAdj> Δ-4 {[«80""»]|[-4-]}
<Lit 0x21aac 79> {[«80""»]|[$$-------------------------------------------------------------------------------]}
<Call 0x21aba 0x103e0> {[«80""»]|[$$-------------------------------------------------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 21ac0-21ac4 StackAdj> Δ+84 {}
<Blob 0x21ac4 [14] @> Δ-14 {[«14""»]}
<POP 21ad0-21ad2 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x21ad2 14> {[«14""»]|[$$ UCODE STATE]}
<Call 0x21ae0 0x103e0> {[«14""»]|[$$ UCODE STATE]}
WriteConsoleStringCrLf(str : String)
<POP 21ae6-21aea StackAdj> Δ+18 {}
<Const 0x21aea 0x3.4> Δ-4 {[##3]}
<Const 0x21aee 0xb.4> Δ-4 {[##3]|[##11]}
<Call 0x21af2 0x20c98> {[##3]|[##11]}
<POP 21af6-21af8 StackAdj> Δ+8 {}
<Call 0x21af8 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21afa TST.W 0x2358c> {}
<MI 21b00 BEQ 0x21ddc> {}
<POP 21b04-21ddc Naked> Σ0 →0x21e02
<Blob 0x21b04 [10] @> Δ-10 {[«10""»]}
<POP 21b14-21b16 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x21b16 9> {[«10""»]|[$$ Top =>_]}
<Call 0x21b22 0x103d8> {[«10""»]|[$$ Top =>_]}
WriteConsoleString(str : String)
<POP 21b24-21b26 StackAdj> Δ+10 {[-4-]}
<POP 21b26-21b27 StackAdj> Δ+4 {}
<Blob 0x21b27 [4] 0x2399e> Δ-4 {[«4»]}
<Call 0x21b2c 0x20dc0> {[«4»]}
<POP 21b30-21b32 StackAdj> Δ+2 {[-2-]}
<POP 21b32-21b33 StackAdj> Δ+2 {}
<Blob 0x21b33 [2] @> Δ-2 {[«2""»]}
<POP 21b36-21b38 StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x21b38 2> {[«2""»]|[$$__]}
<Call 0x21b44 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 21b46-21b48 StackAdj> Δ+2 {[«2""»]|[-2-]}
<POP 21b48-21b49 StackAdj> Δ+4 {}
<Blob 0x21b49 [4] 0x239a2> Δ-4 {[«4»]}
<Call 0x21b4e 0x20dc0> {[«4»]}
<POP 21b52-21b54 StackAdj> Δ+4 {}
<Call 0x21b54 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21b56 [10] @> Δ-10 {[«10""»]}
<POP 21b66-21b68 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x21b68 9> {[«10""»]|[$$ Pred =>_]}
<Call 0x21b74 0x103d8> {[«10""»]|[$$ Pred =>_]}
WriteConsoleString(str : String)
<POP 21b76-21b78 StackAdj> Δ+10 {[-4-]}
<POP 21b78-21b79 StackAdj> Δ+4 {}
<Blob 0x21b79 [4] 0x2399e> Δ-4 {[«4»]}
<Call 0x21b7e 0x20dc0> {[«4»]}
<POP 21b82-21b84 StackAdj> Δ+2 {[-2-]}
<POP 21b84-21b85 StackAdj> Δ+2 {}
<Blob 0x21b85 [2] @> Δ-2 {[«2""»]}
<POP 21b88-21b8a StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x21b8a 2> {[«2""»]|[$$__]}
<Call 0x21b96 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 21b98-21b9a StackAdj> Δ+2 {[«2""»]|[-2-]}
<POP 21b9a-21b9b StackAdj> Δ+4 {}
<Blob 0x21b9b [4] 0x239a6> Δ-4 {[«4»]}
<Call 0x21ba0 0x20dc0> {[«4»]}
<POP 21ba4-21ba6 StackAdj> Δ+4 {}
<Call 0x21ba6 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21ba8 [10] @> Δ-10 {[«10""»]}
<POP 21bb8-21bba StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x21bba 9> {[«10""»]|[$$ Save =>_]}
<Call 0x21bc6 0x103d8> {[«10""»]|[$$ Save =>_]}
WriteConsoleString(str : String)
<POP 21bc8-21bca StackAdj> Δ+10 {[-4-]}
<POP 21bca-21bcb StackAdj> Δ+4 {}
<Blob 0x21bcb [4] 0x239aa> Δ-4 {[«4»]}
<Call 0x21bd0 0x20dc0> {[«4»]}
<POP 21bd4-21bd6 StackAdj> Δ+4 {}
<Call 0x21bd6 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x21bd8 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21bda [4] @> Δ-4 {[«4""»]}
<Blob 0x21bde [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21be2-21be4 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x21be4 8> {[«4""»]|[«4""»]|[$$ PC =>_]}
<Call 0x21bf0 0x103d8> {[«4""»]|[«4""»]|[$$ PC =>_]}
WriteConsoleString(str : String)
<POP 21bf2-21bf4 StackAdj> Δ+8 {[«4""»]}
<POP 21bf4-21bf5 StackAdj> Δ+4 {}
<Blob 0x21bf5 [4] 0x239b2> Δ-4 {[«4»]}
<Blob 0x21bfa [4] 0x239ae> Δ-4 {[«4»]|[«4»]}
<Call 0x21c00 0x20e2c> {[«4»]|[«4»]}
<POP 21c04-21c06 StackAdj> Δ+8 {}
<Call 0x21c06 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21c08 [4] @> Δ-4 {[«4""»]}
<Blob 0x21c0c [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21c10-21c12 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x21c12 8> {[«4""»]|[«4""»]|[$$ DPC =>_]}
<Call 0x21c1e 0x103d8> {[«4""»]|[«4""»]|[$$ DPC =>_]}
WriteConsoleString(str : String)
<POP 21c20-21c22 StackAdj> Δ+8 {[«4""»]}
<POP 21c22-21c23 StackAdj> Δ+4 {}
<Blob 0x21c23 [4] 0x239ba> Δ-4 {[«4»]}
<Blob 0x21c28 [4] 0x239b6> Δ-4 {[«4»]|[«4»]}
<Call 0x21c2e 0x20e2c> {[«4»]|[«4»]}
<POP 21c32-21c34 StackAdj> Δ+8 {}
<Call 0x21c34 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x21c36 0x21956> {}
<Blob 0x21c3a [4] @> Δ-4 {[«4""»]}
<Blob 0x21c3e [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21c42-21c44 StackAdj> Δ-8 {[«4""»]|[«4""»]|[-8-]}
<Lit 0x21c44 8> {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]}
<POP 21c4e-21c50 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]}
<MI 21c50 CLR.L D0> {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]}
<MI 21c52 MOVE.W 0x23972,D0> {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]}
<MI 21c58 MOVE.L D0,-(A7)> Δ-4 {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]|[4, 'D0']}
<Const 0x21c5a 0x2.4> Δ-4 {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]|[4, 'D0']|[##2]}
<Call 0x21c5e 0x102e8> {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]|[4, 'D0']|[##2]}
Long2HexString(val : Long; ndig : Long) : String
<POP 21c64-21c66 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]}
<Call 0x21c66 0x102d0> {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21c6c-21c6e StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<Call 0x21c6e 0x103e0> {[«4""»]|[«4""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21c74-21c76 StackAdj> Δ+8 {[«4""»]}
<POP 21c76-21c77 StackAdj> Δ+4 {}
<Blob 0x21c77 [4] @> Δ-4 {[«4""»]}
<Blob 0x21c7a [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21c7e-21c80 StackAdj> Δ-8 {[«4""»]|[«4""»]|[-8-]}
<Lit 0x21c80 8> {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]}
<POP 21c8a-21c8c StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]}
<MI 21c8c CLR.L D0> {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]}
<MI 21c8e MOVE.W 0x23974,D0> {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]}
<MI 21c94 MOVE.L D0,-(A7)> Δ-4 {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]|[4, 'D0']}
<Const 0x21c96 0x2.4> Δ-4 {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]|[4, 'D0']|[##2]}
<Call 0x21c9a 0x102e8> {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]|[4, 'D0']|[##2]}
Long2HexString(val : Long; ndig : Long) : String
<POP 21ca0-21ca2 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]}
<Call 0x21ca2 0x102d0> {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21ca8-21caa StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<Call 0x21caa 0x103e0> {[«4""»]|[«4""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21cb0-21cb2 StackAdj> Δ+12 {}
<Call 0x21cb2 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21cb4 [4] @> Δ-4 {[«4""»]}
<Blob 0x21cb8 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21cbc-21cbe StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x21cbe 8> {[«4""»]|[«4""»]|[$$ MAR =>_]}
<Call 0x21cca 0x103d8> {[«4""»]|[«4""»]|[$$ MAR =>_]}
WriteConsoleString(str : String)
<POP 21ccc-21cce StackAdj> Δ+8 {[«4""»]}
<POP 21cce-21ccf StackAdj> Δ+4 {}
<Blob 0x21ccf [4] 0x23a5a> Δ-4 {[«4»]}
<Blob 0x21cd4 [4] 0x23a56> Δ-4 {[«4»]|[«4»]}
<Blob 0x21cda [4] 0x23a52> Δ-4 {[«4»]|[«4»]|[«4»]}
<Blob 0x21ce0 [4] 0x23a4e> Δ-4 {[«4»]|[«4»]|[«4»]|[«4»]}
<Call 0x21ce6 0x20e8a> {[«4»]|[«4»]|[«4»]|[«4»]}
<POP 21cea-21cec StackAdj> Δ+16 {}
<Call 0x21cec 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21cee [4] @> Δ-4 {[«4""»]}
<Blob 0x21cf2 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21cf6-21cf8 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x21cf8 8> {[«4""»]|[«4""»]|[$$ TAR =>_]}
<Call 0x21d04 0x103d8> {[«4""»]|[«4""»]|[$$ TAR =>_]}
WriteConsoleString(str : String)
<POP 21d06-21d08 StackAdj> Δ+8 {[«4""»]}
<POP 21d08-21d09 StackAdj> Δ+4 {}
<Blob 0x21d09 [4] 0x23a62> Δ-4 {[«4»]}
<Blob 0x21d0e [4] 0x23a5e> Δ-4 {[«4»]|[«4»]}
<Call 0x21d14 0x20df0> {[«4»]|[«4»]}
<POP 21d18-21d1a StackAdj> Δ+6 {[-2-]}
<POP 21d1a-21d1b StackAdj> Δ+2 {}
<Blob 0x21d1b [2] @> Δ-2 {[«2""»]}
<POP 21d1e-21d20 StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x21d20 2> {[«2""»]|[$$__]}
<Call 0x21d2c 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 21d2e-21d30 StackAdj> Δ+2 {[«2""»]|[-2-]}
<POP 21d30-21d31 StackAdj> Δ+4 {}
<Blob 0x21d31 [4] 0x23a6a> Δ-4 {[«4»]}
<Blob 0x21d36 [4] 0x23a66> Δ-4 {[«4»]|[«4»]}
<Call 0x21d3c 0x20df0> {[«4»]|[«4»]}
<MI 21d40 MOVEA.L A7,A0> {[«4»]|[«4»]}
<MI 21d42 LEA.L 0x20864,A1> {[«4»]|[«4»]}
<BlockMove 7,A1,A0> {[«4»]|[«4»]}
<POP 21d4e-21d50 StackAdj> Δ-4 {[«4»]|[«4»]|[-4-]}
<Lit 0x21d50> {[«4»]|[«4»]|[$$…]}
<Pointer.sp 0x21d50 4> Δ-4
<Const 0x21d54 0x1.2> Δ-2
<Const 0x21d56 0x7.2> Δ-2
<Call 0x21d5a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21d5c-21d5e StackAdj> Δ+8
<Call 0x21d5e 0x103d8> {[«4»]|[«4»]|[$$…]}
WriteConsoleString(str : String)
<POP 21d60-21d62 StackAdj> Δ+12 {}
<Call 0x21d62 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21d64 [4] @> Δ-4 {[«4""»]}
<Blob 0x21d68 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21d6c-21d6e StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x21d6e 8> {[«4""»]|[«4""»]|[$$ RDR =>_]}
<Call 0x21d7a 0x103d8> {[«4""»]|[«4""»]|[$$ RDR =>_]}
WriteConsoleString(str : String)
<POP 21d7c-21d7e StackAdj> Δ+8 {[«4""»]}
<POP 21d7e-21d7f StackAdj> Δ+4 {}
<Blob 0x21d7f [4] 0x23a8a> Δ-4 {[«4»]}
<Blob 0x21d84 [4] 0x23a86> Δ-4 {[«4»]|[«4»]}
<Blob 0x21d8a [4] 0x23a82> Δ-4 {[«4»]|[«4»]|[«4»]}
<Blob 0x21d90 [4] 0x23a7e> Δ-4 {[«4»]|[«4»]|[«4»]|[«4»]}
<Call 0x21d96 0x20e8a> {[«4»]|[«4»]|[«4»]|[«4»]}
<POP 21d9a-21d9c StackAdj> Δ+16 {}
<Call 0x21d9c 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21d9e [4] @> Δ-4 {[«4""»]}
<Blob 0x21da2 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21da6-21da8 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x21da8 8> {[«4""»]|[«4""»]|[$$ WDR =>_]}
<Call 0x21db4 0x103d8> {[«4""»]|[«4""»]|[$$ WDR =>_]}
WriteConsoleString(str : String)
<POP 21db6-21db8 StackAdj> Δ+8 {[«4""»]}
<POP 21db8-21db9 StackAdj> Δ+4 {}
<Blob 0x21db9 [4] 0x23a9a> Δ-4 {[«4»]}
<Blob 0x21dbe [4] 0x23a96> Δ-4 {[«4»]|[«4»]}
<Blob 0x21dc4 [4] 0x23a92> Δ-4 {[«4»]|[«4»]|[«4»]}
<Blob 0x21dca [4] 0x23a8e> Δ-4 {[«4»]|[«4»]|[«4»]|[«4»]}
<Call 0x21dd0 0x20e8a> {[«4»]|[«4»]|[«4»]|[«4»]}
<POP 21dd4-21dd6 StackAdj> Δ+16 {}
<Call 0x21dd6 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x21dd8 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21dda BRA 0x21e02> {}
<POP 21ddc-21e02 Naked> Σ0 ↓ ←0x21a98
<Blob 0x21ddc [42] @> Δ-42 {[«42""»]}
<POP 21de8-21dea StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x21dea 42> {[«42""»]|[$$R1000 cpu state was not saved in tombstone]}
<Call 0x21df8 0x103e0> {[«42""»]|[$$R1000 cpu state was not saved in tombstone]}
WriteConsoleStringCrLf(str : String)
<POP 21dfe-21e02 StackAdj> Δ+46 {}
<POP 21e02-21e0a Epilogue> Σ0 ←0x21b04
@ 21e0a
<POP 21e0a-220dc Body>
<POP 21e0a-21e20 Prologue> Σ0 ↓
<POP 21e20-21e3e RegCacheLoad> Σ0 ↓
<POP 21e3e-21eaa Naked> Σ0 ↓ →0x220ac
<Blob 0x21e3e [80] @> Δ-80 {[«80""»]}
<POP 21e50-21e52 StackAdj> Δ-4 {[«80""»]|[-4-]}
<Lit 0x21e52 79> {[«80""»]|[$$-------------------------------------------------------------------------------]}
<Call 0x21e60 0x103e0> {[«80""»]|[$$-------------------------------------------------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 21e66-21e67 StackAdj> Δ+84 ↓ {}
<Blob 0x21e67 [10] @> Δ-10 {[«10""»]}
<POP 21e78-21e7a StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x21e7a 9> {[«10""»]|[$$ QUEUES]}
<Call 0x21e86 0x103e0> {[«10""»]|[$$ QUEUES]}
WriteConsoleStringCrLf(str : String)
<POP 21e8c-21e8e StackAdj> Δ+14 {}
<Const 0x21e8e 0x3.4> Δ-4 {[##3]}
<Const 0x21e92 0x6.4> Δ-4 {[##3]|[##6]}
<Call 0x21e96 0x20c98> {[##3]|[##6]}
<POP 21e9a-21e9c StackAdj> Δ+8 {}
<Call 0x21e9c 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21e9e MOVE.W 0x2358c,D0> {}
<MI 21ea4 CMP.W #0x01,D0> {}
<MI 21ea6 BLS 0x220ac> {}
<POP 21eaa-21ed8 Naked> Σ0 ↓
<Blob 0x21eaa [24] @> Δ-24 {[«24""»]}
<POP 21ebc-21ebe StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x21ebe 23> {[«24""»]|[$$ PRI HEAD TAIL]}
<Call 0x21ecc 0x103e0> {[«24""»]|[$$ PRI HEAD TAIL]}
WriteConsoleStringCrLf(str : String)
<POP 21ed2-21ed6 StackAdj> Δ+28 {}
<MI 21ed6 MOVEQ.L #0x00,D7> {}
<POP 21ed8-21f48 Naked> Σ0 ↓ →0x21ed8 ←0x21ed8
<Blob 0x21ed8 [4] @> Δ-4 {[«4""»]}
<POP 21edc-21ede StackAdj> Δ-8 {[«4""»]|[-8-]}
<Lit 0x21ede 4> {[«4""»]|[-4-]|[$$____]}
<MI 21eea MOVE.L D7,(A7)> {[«4""»]|[-4-]|[4, 'D7']}
<POP 21ee8-21eea StackAdj> Δ-8 {[«4""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x21eec 0x102e4> {[«4""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 21ef2-21ef4 StackAdj> Δ+4 {[«4""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x21ef4 0x102d0> {[«4""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 21efa-21efc StackAdj> Δ+8 {[«4""»]|[-4-]}
<Call 0x21efc 0x103d8> {[«4""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21efe-21f00 StackAdj> Δ+6 {[-2-]}
<POP 21f00-21f01 StackAdj> Δ+2 {}
<Blob 0x21f01 [2] @> Δ-2 {[«2""»]}
<POP 21f04-21f06 StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x21f06 2> {[«2""»]|[$$__]}
<Call 0x21f12 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 21f14-21f16 StackAdj> Δ+6 {}
<POP 0x21f16 LimitCheck 0x0 ≤ D7 ≤ 0xf> {}
<MI 21f1c MOVE.L D7,D0> {}
<MI 21f1e ASL.L #0x4,D0> {}
<MI 21f20 LEA.L 0x22d2c,A0> {}
<MI 21f26 LEA.L (A0+D0.L),A0> {}
<MI 21f2a MOVE.L (A0+0xf8c),-(A7)> Δ-4 {[4, '(A0+0xf8c)']}
<MI 21f2e MOVE.L (A0+0xf88),-(A7)> Δ-4 {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']}
<MI 21f32 MOVE.L (A0+0xf84),-(A7)> Δ-4 {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']|[4, '(A0+0xf84)']}
<MI 21f36 MOVE.L (A0+0xf80),-(A7)> Δ-4 {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']|[4, '(A0+0xf84)']|[4, '(A0+0xf80)']}
<Call 0x21f3a 0x219fe> {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']|[4, '(A0+0xf84)']|[4, '(A0+0xf80)']}
<POP 21f3e-21f42 StackAdj> Δ+16 {}
<MI 21f42 ADDQ.L #0x1,D7> {}
<MI 21f44 CMP.L #0x09,D7> {}
<MI 21f46 BLE 0x21ed8> {}
<POP 21f48-21f4a Naked> Σ0 ↓
<MI 21f48 MOVEQ.L #0x0a,D7> {}
<POP 21f4a-21fc8 Naked> Σ0 ↓ →0x21f4a ←0x21f4a
<POP 21f4a-21f4c StackAdj> Δ-4 {[-4-]}
<POP 21f4c-21f4d StackAdj> Δ+2 {[-2-]}
<Blob 0x21f4d [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 21f50 MOVE.B 0x208a3,(A7+0x1)> {[-2-]|[«2""»]}
<MI 21f56 MOVE.B 0x208a4,(A7+0x2)> {[-2-]|[«2""»]}
<POP 21f5c-21f5e StackAdj> Δ-8 {[-2-]|[«2""»]|[-8-]}
<Lit 0x21f5e> {[-2-]|[«2""»]|[-4-]|[$$…]}
<Pointer.sp 0x21f5e 8> Δ-4
<Const 0x21f62 0x1.2> Δ-2
<Const 0x21f64 0x3.2> Δ-2
<Call 0x21f68 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<MI 21f6a MOVE.L D7,(A7)> {[-2-]|[«2""»]|[-4-]|[4, 'D7']}
<POP 21f68-21f6a StackAdj> Δ-8 {[-2-]|[«2""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x21f6c 0x102e4> {[-2-]|[«2""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 21f72-21f74 StackAdj> Δ+4 {[-2-]|[«2""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x21f74 0x102d0> {[-2-]|[«2""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 21f7a-21f7c StackAdj> Δ+8 {[-2-]|[«2""»]|[-4-]}
<Call 0x21f7c 0x103d8> {[-2-]|[«2""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21f7e-21f80 StackAdj> Δ+6 {[-2-]}
<POP 21f80-21f81 StackAdj> Δ+2 {}
<Blob 0x21f81 [2] @> Δ-2 {[«2""»]}
<POP 21f84-21f86 StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x21f86 2> {[«2""»]|[$$__]}
<Call 0x21f92 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 21f94-21f96 StackAdj> Δ+6 {}
<POP 0x21f96 LimitCheck 0x0 ≤ D7 ≤ 0xf> {}
<MI 21f9c MOVE.L D7,D0> {}
<MI 21f9e ASL.L #0x4,D0> {}
<MI 21fa0 LEA.L 0x22d2c,A0> {}
<MI 21fa6 LEA.L (A0+D0.L),A0> {}
<MI 21faa MOVE.L (A0+0xf8c),-(A7)> Δ-4 {[4, '(A0+0xf8c)']}
<MI 21fae MOVE.L (A0+0xf88),-(A7)> Δ-4 {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']}
<MI 21fb2 MOVE.L (A0+0xf84),-(A7)> Δ-4 {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']|[4, '(A0+0xf84)']}
<MI 21fb6 MOVE.L (A0+0xf80),-(A7)> Δ-4 {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']|[4, '(A0+0xf84)']|[4, '(A0+0xf80)']}
<Call 0x21fba 0x219fe> {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']|[4, '(A0+0xf84)']|[4, '(A0+0xf80)']}
<POP 21fbe-21fc2 StackAdj> Δ+16 {}
<MI 21fc2 ADDQ.L #0x1,D7> {}
<MI 21fc4 CMP.L #0x0f,D7> {}
<MI 21fc6 BLE 0x21f4a> {}
<POP 21fc8-220ac Naked> Σ0 →0x220d2
<Call 0x21fc8 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21fca [20] @> Δ-20 {[«20""»]}
<POP 21fd6-21fd8 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x21fd8 20> {[«20""»]|[$$ Delay Queue Head -_]}
<Call 0x21fe4 0x103d8> {[«20""»]|[$$ Delay Queue Head -_]}
WriteConsoleString(str : String)
<POP 21fe6-21fea StackAdj> Δ+22 {[-2-]}
<POP 21fea-21feb StackAdj> Δ+2 {}
<Blob 0x21feb [2] 0x23dac> Δ-2 {[«2»]}
<Call 0x21ff0 0x20d84> {[«2»]}
<POP 21ff4-21ff5 StackAdj> Δ+2 {}
<Blob 0x21ff5 [2] 0x23dae> Δ-2 {[«2»]}
<Call 0x21ffa 0x20d84> {[«2»]}
<POP 21ffe-22000 StackAdj> Δ+2 {}
<Call 0x22000 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x22002 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x22004 [18] @> Δ-18 {[«18""»]}
<POP 22010-22012 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x22012 18> {[«18""»]|[$$ Disk Wait Head -_]}
<Call 0x22020 0x103d8> {[«18""»]|[$$ Disk Wait Head -_]}
WriteConsoleString(str : String)
<POP 22022-22024 StackAdj> Δ+20 {[-2-]}
<POP 22024-22025 StackAdj> Δ+2 {}
<Blob 0x22025 [2] 0x23db4> Δ-2 {[«2»]}
<Call 0x2202a 0x20d84> {[«2»]}
<POP 2202e-2202f StackAdj> Δ+2 {}
<Blob 0x2202f [2] 0x23db6> Δ-2 {[«2»]}
<Call 0x22034 0x20d84> {[«2»]}
<POP 22038-2203a StackAdj> Δ+2 {}
<Call 0x2203a 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x2203c 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x2203e [4] @> Δ-4 {[«4""»]}
<Blob 0x22042 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x22046 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 2204a-2204c StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x2204c 12> {[«4""»]|[«4""»]|[«4""»]|[$$ FAQ Head -_]}
<Call 0x2205a 0x103d8> {[«4""»]|[«4""»]|[«4""»]|[$$ FAQ Head -_]}
WriteConsoleString(str : String)
<POP 2205c-2205e StackAdj> Δ+14 {[-2-]}
<POP 2205e-2205f StackAdj> Δ+2 {}
<Blob 0x2205f [2] 0x23dbc> Δ-2 {[«2»]}
<Call 0x22064 0x20d84> {[«2»]}
<POP 22068-22069 StackAdj> Δ+2 {}
<Blob 0x22069 [2] 0x23dbe> Δ-2 {[«2»]}
<Call 0x2206e 0x20d84> {[«2»]}
<POP 22072-22074 StackAdj> Δ+2 {}
<Call 0x22074 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x22076 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x22078 [20] @> Δ-20 {[«20""»]}
<POP 22084-22086 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x22086 20> {[«20""»]|[$$ CURRENT LOAD REG -_]}
<Call 0x22092 0x103d8> {[«20""»]|[$$ CURRENT LOAD REG -_]}
WriteConsoleString(str : String)
<POP 22094-22096 StackAdj> Δ+20 {[-4-]}
<POP 22096-22097 StackAdj> Δ+4 {}
<Blob 0x22097 [4] 0x23dc8> Δ-4 {[«4»]}
<Blob 0x2209c [4] 0x23dc4> Δ-4 {[«4»]|[«4»]}
<Call 0x220a2 0x20df0> {[«4»]|[«4»]}
<POP 220a6-220a8 StackAdj> Δ+8 {}
<Call 0x220a8 0x103dc> {}
WriteConsoleCrLf(void)
<MI 220aa BRA 0x220d2> {}
<POP 220ac-220d2 Naked> Σ0 ↓ ←0x21e3e
<Blob 0x220ac [48] @> Δ-48 {[«48""»]}
<POP 220b8-220ba StackAdj> Δ-4 {[«48""»]|[-4-]}
<Lit 0x220ba 48> {[«48""»]|[$$R1000 register files were not saved in tombstone]}
<Call 0x220c8 0x103e0> {[«48""»]|[$$R1000 register files were not saved in tombstone]}
WriteConsoleStringCrLf(str : String)
<POP 220ce-220d2 StackAdj> Δ+52 {}
<POP 220d2-220d4 Naked> Σ0 ↓ ←0x21fc8
<Call 0x220d2 0x103dc> {}
WriteConsoleCrLf(void)
<POP 220d4-220dc Epilogue> Σ0
@ 220dc
<POP 220dc-2223a Body>
<POP 220dc-220f2 Prologue> Σ0 ↓
<POP 220f2-2210e RegCacheLoad> Σ0 ↓
<POP 2210e-22118 Naked> Σ0 ↓ →0x22232
<MI 2210e TST.W 0x2358c> {}
<MI 22114 BEQ 0x22232> {}
<POP 22118-2211a Naked> Σ0 ↓
<MI 22118 MOVEQ.L #0x00,D6> {}
<POP 2211a-22196 Naked> Σ0 ↓ →0x2211a ←0x2211a
<Blob 0x2211a [4] @> Δ-4 {[«4""»]}
<Blob 0x2211e [6] @> Δ-6 {[«4""»]|[«6""»]}
<POP 2212e-22130 StackAdj> Δ-8 {[«4""»]|[«6""»]|[-8-]}
<Lit 0x22130 4> {[«4""»]|[«6""»]|[-4-]|[$$ GP(]}
<MI 2213a MOVE.L D6,(A7)> {[«4""»]|[«6""»]|[-4-]|[4, 'D6']}
<POP 22138-2213a StackAdj> Δ-8 {[«4""»]|[«6""»]|[-4-]|[4, 'D6']|[-8-]}
<Const 0x2213c 0x1.4> Δ-4 {[«4""»]|[«6""»]|[-4-]|[4, 'D6']|[-8-]|[##1]}
<Call 0x22140 0x102e8> {[«4""»]|[«6""»]|[-4-]|[4, 'D6']|[-8-]|[##1]}
Long2HexString(val : Long; ndig : Long) : String
<POP 22146-22148 StackAdj> Δ+4 {[«4""»]|[«6""»]|[-4-]|[4, 'D6']|[-8-]}
<Lit 0x22148 5> {[«4""»]|[«6""»]|[-4-]|[4, 'D6']|[-4-]|[$$) =>_]}
<Call 0x22154 0x102d4> {[«4""»]|[«6""»]|[-4-]|[4, 'D6']|[-4-]|[$$) =>_]}
StringCat3(a, b, c : String) : String
<POP 2215a-2215c StackAdj> Δ+12 {[«4""»]|[«6""»]|[-4-]}
<Call 0x2215c 0x103d8> {[«4""»]|[«6""»]|[-4-]}
WriteConsoleString(str : String)
<POP 22162-22166 StackAdj> Δ+14 {}
<POP 0x22166 LimitCheck 0x0 ≤ D6 ≤ 0xf> {}
<MI 2216c MOVE.L D6,D0> {}
<MI 2216e ASL.L #0x4,D0> {}
<MI 22170 LEA.L 0x22d2c,A0> {}
<MI 22172 LEA.L (A0+D0.L),A0> {}
<MI 22176 MOVE.L (A0+0xd7e),-(A7)> Δ-4 {[4, '(A0+0xd7e)']}
<MI 2217a MOVE.L (A0+0xd7a),-(A7)> Δ-4 {[4, '(A0+0xd7e)']|[4, '(A0+0xd7a)']}
<MI 2217e MOVE.L (A0+0xd76),-(A7)> Δ-4 {[4, '(A0+0xd7e)']|[4, '(A0+0xd7a)']|[4, '(A0+0xd76)']}
<MI 22182 MOVE.L (A0+0xd72),-(A7)> Δ-4 {[4, '(A0+0xd7e)']|[4, '(A0+0xd7a)']|[4, '(A0+0xd76)']|[4, '(A0+0xd72)']}
<Call 0x22186 0x20e8a> {[4, '(A0+0xd7e)']|[4, '(A0+0xd7a)']|[4, '(A0+0xd76)']|[4, '(A0+0xd72)']}
<POP 2218a-2218e StackAdj> Δ+16 {}
<Call 0x2218e 0x103dc> {}
WriteConsoleCrLf(void)
<MI 22190 ADDQ.L #0x1,D6> {}
<MI 22192 CMP.L #0x0f,D6> {}
<MI 22194 BLE 0x2211a> {}
<POP 22196-221aa Naked> Σ0 ↓
<MI 22196 CLR.L D0> {}
<MI 22198 MOVE.W 0x247be,D0> {}
<MI 2219e SUBI.L #0x000003f0,D0> {}
<MI 221a4 MOVE.L D0,D7> {}
<Call 0x221a6 0x103dc> {}
WriteConsoleCrLf(void)
<MI 221a8 MOVEQ.L #0x00,D6> {}
<POP 221aa-22224 Naked> Σ0 ↓ →0x22228 ←0x2222a
<Blob 0x221aa [6] @> Δ-6 {[«6""»]}
<Blob 0x221ba [4] @> Δ-4 {[«6""»]|[«4""»]}
<POP 221be-221c0 StackAdj> Δ-8 {[«6""»]|[«4""»]|[-8-]}
<Lit 0x221c0 5> {[«6""»]|[«4""»]|[-4-]|[$$ TOP-]}
<MI 221ca MOVE.L D6,(A7)> {[«6""»]|[«4""»]|[-4-]|[4, 'D6']}
<POP 221c8-221ca StackAdj> Δ-8 {[«6""»]|[«4""»]|[-4-]|[4, 'D6']|[-8-]}
<Const 0x221cc 0x1.4> Δ-4 {[«6""»]|[«4""»]|[-4-]|[4, 'D6']|[-8-]|[##1]}
<Call 0x221d0 0x102e8> {[«6""»]|[«4""»]|[-4-]|[4, 'D6']|[-8-]|[##1]}
Long2HexString(val : Long; ndig : Long) : String
<POP 221d6-221d8 StackAdj> Δ+4 {[«6""»]|[«4""»]|[-4-]|[4, 'D6']|[-8-]}
<Lit 0x221d8 4> {[«6""»]|[«4""»]|[-4-]|[4, 'D6']|[-4-]|[$$ =>_]}
<Call 0x221e4 0x102d4> {[«6""»]|[«4""»]|[-4-]|[4, 'D6']|[-4-]|[$$ =>_]}
StringCat3(a, b, c : String) : String
<POP 221ea-221ec StackAdj> Δ+12 {[«6""»]|[«4""»]|[-4-]}
<Call 0x221ec 0x103d8> {[«6""»]|[«4""»]|[-4-]}
WriteConsoleString(str : String)
<POP 221f2-221f6 StackAdj> Δ+14 {}
<POP 0x221f6 LimitCheck 0x0 ≤ D7 ≤ 0xf> {}
<MI 221fc MOVE.L D7,D0> {}
<MI 221fe ASL.L #0x4,D0> {}
<MI 22200 LEA.L 0x22d2c,A0> {}
<MI 22202 LEA.L (A0+D0.L),A0> {}
<MI 22206 MOVE.L (A0+0xe7e),-(A7)> Δ-4 {[4, '(A0+0xe7e)']}
<MI 2220a MOVE.L (A0+0xe7a),-(A7)> Δ-4 {[4, '(A0+0xe7e)']|[4, '(A0+0xe7a)']}
<MI 2220e MOVE.L (A0+0xe76),-(A7)> Δ-4 {[4, '(A0+0xe7e)']|[4, '(A0+0xe7a)']|[4, '(A0+0xe76)']}
<MI 22212 MOVE.L (A0+0xe72),-(A7)> Δ-4 {[4, '(A0+0xe7e)']|[4, '(A0+0xe7a)']|[4, '(A0+0xe76)']|[4, '(A0+0xe72)']}
<Call 0x22216 0x20e8a> {[4, '(A0+0xe7e)']|[4, '(A0+0xe7a)']|[4, '(A0+0xe76)']|[4, '(A0+0xe72)']}
<POP 2221a-2221e StackAdj> Δ+16 {}
<Call 0x2221e 0x103dc> {}
WriteConsoleCrLf(void)
<MI 22220 TST.L D7> {}
<MI 22222 BNE 0x22228> {}
<POP 22224-22228 Naked> Σ0 →0x2222a
<MI 22224 MOVEQ.L #0x0f,D7> {}
<MI 22226 BRA 0x2222a> {}
<POP 22228-2222a Naked> Σ0 ↓ ←0x221aa
<MI 22228 SUBQ.L #0x1,D7> {}
<POP 2222a-22232 Naked> Σ0 ↓ →0x221aa ←0x22224
<MI 2222a ADDQ.L #0x1,D6> {}
<MI 2222c CMP.L #0x0f,D6> {}
<MI 2222e BLE 0x221aa> {}
<POP 22232-2223a Epilogue> Σ0 ←0x2210e
@ 2223a
<POP 2223a-222e4 Body>
<POP 2223a-22250 Prologue> Σ0 ↓
<POP 22250-22254 RegCacheLoad> Σ0 ↓
<POP 22254-2225e Naked> Σ0 ↓ →0x222b2
<MI 22254 MOVE.W 0x2358c,D0> {}
<MI 2225a CMP.W #0x01,D0> {}
<MI 2225c BLS 0x222b2> {}
<POP 2225e-222b2 Naked> Σ0 →0x222dc
<Call 0x2225e 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x22264 [10] @> Δ-10 {[«10""»]}
<POP 22270-22272 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x22272 10> {[«10""»]|[$$ PFMAR =>_]}
<Call 0x22282 0x103d8> {[«10""»]|[$$ PFMAR =>_]}
WriteConsoleString(str : String)
<POP 22288-2228a StackAdj> Δ+10 {[-4-]}
<POP 2228a-2228b StackAdj> Δ+4 {}
<Blob 0x2228b [4] 0x23dd8> Δ-4 {[«4»]}
<Blob 0x22290 [4] 0x23dd4> Δ-4 {[«4»]|[«4»]}
<Blob 0x22296 [4] 0x23dd0> Δ-4 {[«4»]|[«4»]|[«4»]}
<Blob 0x2229c [4] 0x23dcc> Δ-4 {[«4»]|[«4»]|[«4»]|[«4»]}
<Call 0x222a2 0x20e8a> {[«4»]|[«4»]|[«4»]|[«4»]}
<POP 222a6-222aa StackAdj> Δ+16 {}
<Call 0x222aa 0x103dc> {}
WriteConsoleCrLf(void)
<MI 222b0 BRA 0x222dc> {}
<POP 222b2-222dc Naked> Σ0 ↓ ←0x22254
<Blob 0x222b2 [48] @> Δ-48 {[«48""»]}
<POP 222be-222c0 StackAdj> Δ-4 {[«48""»]|[-4-]}
<Lit 0x222c0 48> {[«48""»]|[$$R1000 register files were not saved in tombstone]}
<Call 0x222d2 0x103e0> {[«48""»]|[$$R1000 register files were not saved in tombstone]}
WriteConsoleStringCrLf(str : String)
<POP 222d8-222dc StackAdj> Δ+52 {}
<POP 222dc-222e4 Epilogue> Σ0 ←0x2225e
@ 222e4
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x003 @ 1(r)>
<LVAR -0x004 @>
<POP 222e4-22598 Body>
<POP 222e4-222fa Prologue> Σ0 ↓
<POP 222fa-22318 RegCacheLoad> Σ0 ↓
<POP 22318-22338 Naked> Σ0 ↓ →0x22370
<MI 22318 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 2231c CLR.B -(A7)> Δ-2 {[4, '(A6+0xc)']|[#0]}
<Const 0x2231e 0x1.2> Δ-2 {[4, '(A6+0xc)']|[#0]|[#1]}
<Const 0x22320 0x0.4> Δ-4 {[4, '(A6+0xc)']|[#0]|[#1]|[##0]}
<Pointer.fp 0x22324 <LVAR -0x003 @ 1(r)>> Δ-4 {[4, '(A6+0xc)']|[#0]|[#1]|[##0]|[@@-3]}
<Const 0x22328 0x22d38.4> Δ-4 {[4, '(A6+0xc)']|[#0]|[#1]|[##0]|[@@-3]|[##142648]}
<Call 0x2232a 0x10380> {[4, '(A6+0xc)']|[#0]|[#1]|[##0]|[@@-3]|[##142648]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 22330-22332 StackAdj> Δ+20 {}
<MI 22332 TST.B (A6-0x3)> {}
<MI 22336 BEQ 0x22370> {}
<POP 22338-22370 Naked> Σ0 →0x22590
<Blob 0x22338 [34] @> Δ-34 {[«34""»]}
<POP 22348-2234a StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x2234a 33> {[«34""»]|[$$*** Could not find tombstone file]}
<Call 0x2235c 0x103e0> {[«34""»]|[$$*** Could not find tombstone file]}
WriteConsoleStringCrLf(str : String)
<POP 22362-22366 StackAdj> Δ+38 {}
<MI 22366 MOVEA.L (A6+0x8),A0> {}
<MI 2236a CLR.B (A0)> {}
<MI 2236c BRA 0x22590> {}
<POP 22370-22540 Naked> Σ0 ↓ →0x22576 ←0x22318
<Blob 0x22370 [4] 0x22d38> Δ-4 {[«4»]}
<MI 22372 CLR.W -(A7)> Δ-2 {[«4»]|[#0]}
<MI 22374 CLR.W -(A7)> Δ-2 {[«4»]|[#0]|[#0]}
<Const 0x22376 0x200.2> Δ-2 {[«4»]|[#0]|[#0]|[#512]}
<Const 0x2237a 0x1.2> Δ-2 {[«4»]|[#0]|[#0]|[#512]|[#1]}
<MI 2237c LEA.L 0x22d40,A0> {[«4»]|[#0]|[#0]|[#512]|[#1]}
<MI 22382 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#0]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x22384 <LVAR -0x004 @>> Δ-4 {[«4»]|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x22386 0x10384> {[«4»]|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 22388-2238a StackAdj> Δ+20 {}
<MI 2238a LEA.L 0x22d40,A0> {}
<MI 22390 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 22392 LEA.L 0x2356e,A0> {[4, 'A0']}
<MI 22398 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']|[4, 'A0']}
<Const 0x2239a 0x400.2> Δ-2 {[4, 'A0']|[4, 'A0']|[#1024]}
<Call 0x2239e 0x10238> {[4, 'A0']|[4, 'A0']|[#1024]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 223a4-223a6 StackAdj> Δ+6 {[4, 'A0']}
<POP 223a6-223a7 StackAdj> Δ+4 {}
<Blob 0x223a7 [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x223a8 0x1.2> Δ-2 {[«4»]|[#1]}
<MI 223aa CLR.W -(A7)> Δ-2 {[«4»]|[#1]|[#0]}
<Const 0x223ac 0x200.2> Δ-2 {[«4»]|[#1]|[#0]|[#512]}
<Const 0x223b0 0x1.2> Δ-2 {[«4»]|[#1]|[#0]|[#512]|[#1]}
<MI 223b2 LEA.L 0x23140,A0> {[«4»]|[#1]|[#0]|[#512]|[#1]}
<MI 223b8 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#1]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x223ba <LVAR -0x004 @>> Δ-4 {[«4»]|[#1]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x223bc 0x10384> {[«4»]|[#1]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 223be-223c0 StackAdj> Δ+16 {[«4»]}
<POP 223c0-223c1 StackAdj> Δ+4 {}
<Blob 0x223c1 [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x223c2 0x3.2> Δ-2 {[«4»]|[#3]}
<Const 0x223c6 0x30.2> Δ-2 {[«4»]|[#3]|[#48]}
<Const 0x223ca 0x2.2> Δ-2 {[«4»]|[#3]|[#48]|[#2]}
<Const 0x223cc 0x1.2> Δ-2 {[«4»]|[#3]|[#48]|[#2]|[#1]}
<MI 223ce LEA.L 0x2479c,A0> {[«4»]|[#3]|[#48]|[#2]|[#1]}
<MI 223d4 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#3]|[#48]|[#2]|[#1]|[4, 'A0']}
<Pointer.fp 0x223d6 <LVAR -0x004 @>> Δ-4 {[«4»]|[#3]|[#48]|[#2]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x223d8 0x10384> {[«4»]|[#3]|[#48]|[#2]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 223da-223dc StackAdj> Δ+20 {}
<MI 223dc SUBI.L #0x0000fcc0,0x2479c> {}
<Blob 0x223e6 [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x223e8 0x3.2> Δ-2 {[«4»]|[#3]}
<Const 0x223ec 0x60.2> Δ-2 {[«4»]|[#3]|[#96]}
<Const 0x223ee 0x1a0.2> Δ-2 {[«4»]|[#3]|[#96]|[#416]}
<Const 0x223f2 0x1.2> Δ-2 {[«4»]|[#3]|[#96]|[#416]|[#1]}
<MI 223f4 LEA.L 0x2445c,A0> {[«4»]|[#3]|[#96]|[#416]|[#1]}
<MI 223fa MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#3]|[#96]|[#416]|[#1]|[4, 'A0']}
<Pointer.fp 0x223fc <LVAR -0x004 @>> Δ-4 {[«4»]|[#3]|[#96]|[#416]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x223fe 0x10384> {[«4»]|[#3]|[#96]|[#416]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 22400-22402 StackAdj> Δ+16 {[«4»]}
<POP 22402-22403 StackAdj> Δ+4 {}
<Blob 0x22403 [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x22404 0xa.2> Δ-2 {[«4»]|[#10]}
<Const 0x22408 0x9.2> Δ-2 {[«4»]|[#10]|[#9]}
<Const 0x2240c 0x1.2> Δ-2 {[«4»]|[#10]|[#9]|[#1]}
<Const 0x2240e 0x1.2> Δ-2 {[«4»]|[#10]|[#9]|[#1]|[#1]}
<MI 22410 LEA.L 0x247be,A0> {[«4»]|[#10]|[#9]|[#1]|[#1]}
<MI 22416 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#10]|[#9]|[#1]|[#1]|[4, 'A0']}
<Pointer.fp 0x22418 <LVAR -0x004 @>> Δ-4 {[«4»]|[#10]|[#9]|[#1]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x2241a 0x10384> {[«4»]|[#10]|[#9]|[#1]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 2241c-2241e StackAdj> Δ+16 {[«4»]}
<POP 2241e-2241f StackAdj> Δ+4 {}
<Blob 0x2241f [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x22420 0xe.2> Δ-2 {[«4»]|[#14]}
<MI 22424 CLR.W -(A7)> Δ-2 {[«4»]|[#14]|[#0]}
<Const 0x22426 0x200.2> Δ-2 {[«4»]|[#14]|[#0]|[#512]}
<Const 0x2242a 0x1.2> Δ-2 {[«4»]|[#14]|[#0]|[#512]|[#1]}
<MI 2242c LEA.L 0x22d40,A0> {[«4»]|[#14]|[#0]|[#512]|[#1]}
<MI 22432 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#14]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x22434 <LVAR -0x004 @>> Δ-4 {[«4»]|[#14]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x22436 0x10384> {[«4»]|[#14]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 22438-2243a StackAdj> Δ+20 {}
<MI 2243a LEA.L 0x22d40,A0> {}
<MI 22440 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 22442 LEA.L 0x2396e,A0> {[4, 'A0']}
<MI 22448 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']|[4, 'A0']}
<Const 0x2244a 0x33d.2> Δ-2 {[4, 'A0']|[4, 'A0']|[#829]}
<Call 0x2244e 0x10238> {[4, 'A0']|[4, 'A0']|[#829]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 22454-22456 StackAdj> Δ+6 {[4, 'A0']}
<POP 22456-22457 StackAdj> Δ+4 {}
<Blob 0x22457 [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x22458 0x10.2> Δ-2 {[«4»]|[#16]}
<Const 0x2245a 0x1ec.2> Δ-2 {[«4»]|[#16]|[#492]}
<Const 0x2245e 0x14.2> Δ-2 {[«4»]|[#16]|[#492]|[#20]}
<Const 0x22460 0x1.2> Δ-2 {[«4»]|[#16]|[#492]|[#20]|[#1]}
<MI 22462 LEA.L 0x23546,A0> {[«4»]|[#16]|[#492]|[#20]|[#1]}
<MI 22468 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#16]|[#492]|[#20]|[#1]|[4, 'A0']}
<Pointer.fp 0x2246a <LVAR -0x004 @>> Δ-4 {[«4»]|[#16]|[#492]|[#20]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x2246c 0x10384> {[«4»]|[#16]|[#492]|[#20]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 2246e-22470 StackAdj> Δ+16 {[«4»]}
<POP 22470-22471 StackAdj> Δ+4 {}
<Blob 0x22471 [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x22472 0x11.2> Δ-2 {[«4»]|[#17]}
<Const 0x22476 0x14.2> Δ-2 {[«4»]|[#17]|[#20]}
<Const 0x22478 0xf.2> Δ-2 {[«4»]|[#17]|[#20]|[#15]}
<Const 0x2247c 0x1.2> Δ-2 {[«4»]|[#17]|[#20]|[#15]|[#1]}
<MI 2247e LEA.L 0x247a0,A0> {[«4»]|[#17]|[#20]|[#15]|[#1]}
<MI 22484 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#17]|[#20]|[#15]|[#1]|[4, 'A0']}
<Pointer.fp 0x22486 <LVAR -0x004 @>> Δ-4 {[«4»]|[#17]|[#20]|[#15]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x22488 0x10384> {[«4»]|[#17]|[#20]|[#15]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 2248a-2248c StackAdj> Δ+20 {}
<Call 0x2248c 0x215ac> {}
<Blob 0x22490 [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x22492 0x13.2> Δ-2 {[«4»]|[#19]}
<Const 0x22494 0x100.2> Δ-2 {[«4»]|[#19]|[#256]}
<Const 0x22498 0x80.2> Δ-2 {[«4»]|[#19]|[#256]|[#128]}
<Const 0x2249c 0x1.2> Δ-2 {[«4»]|[#19]|[#256]|[#128]|[#1]}
<MI 2249e LEA.L 0x23cac,A0> {[«4»]|[#19]|[#256]|[#128]|[#1]}
<MI 224a4 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#19]|[#256]|[#128]|[#1]|[4, 'A0']}
<Pointer.fp 0x224a6 <LVAR -0x004 @>> Δ-4 {[«4»]|[#19]|[#256]|[#128]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x224a8 0x10384> {[«4»]|[#19]|[#256]|[#128]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 224aa-224ac StackAdj> Δ+16 {[«4»]}
<POP 224ac-224ad StackAdj> Δ+4 {}
<Blob 0x224ad [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x224ae 0x13.2> Δ-2 {[«4»]|[#19]}
<Const 0x224b0 0x180.2> Δ-2 {[«4»]|[#19]|[#384]}
<Const 0x224b4 0x2.2> Δ-2 {[«4»]|[#19]|[#384]|[#2]}
<Const 0x224b6 0x1.2> Δ-2 {[«4»]|[#19]|[#384]|[#2]|[#1]}
<MI 224b8 LEA.L 0x23dbc,A0> {[«4»]|[#19]|[#384]|[#2]|[#1]}
<MI 224be MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#19]|[#384]|[#2]|[#1]|[4, 'A0']}
<Pointer.fp 0x224c0 <LVAR -0x004 @>> Δ-4 {[«4»]|[#19]|[#384]|[#2]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x224c2 0x10384> {[«4»]|[#19]|[#384]|[#2]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 224c4-224c6 StackAdj> Δ+16 {[«4»]}
<POP 224c6-224c7 StackAdj> Δ+4 {}
<Blob 0x224c7 [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x224c8 0x13.2> Δ-2 {[«4»]|[#19]}
<Const 0x224ca 0x188.2> Δ-2 {[«4»]|[#19]|[#392]}
<Const 0x224ce 0x2.2> Δ-2 {[«4»]|[#19]|[#392]|[#2]}
<Const 0x224d0 0x1.2> Δ-2 {[«4»]|[#19]|[#392]|[#2]|[#1]}
<MI 224d2 LEA.L 0x23db4,A0> {[«4»]|[#19]|[#392]|[#2]|[#1]}
<MI 224d8 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#19]|[#392]|[#2]|[#1]|[4, 'A0']}
<Pointer.fp 0x224da <LVAR -0x004 @>> Δ-4 {[«4»]|[#19]|[#392]|[#2]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x224dc 0x10384> {[«4»]|[#19]|[#392]|[#2]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 224de-224e0 StackAdj> Δ+16 {[«4»]}
<POP 224e0-224e1 StackAdj> Δ+4 {}
<Blob 0x224e1 [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x224e2 0x14.2> Δ-2 {[«4»]|[#20]}
<Const 0x224e4 0x54.2> Δ-2 {[«4»]|[#20]|[#84]}
<Const 0x224e8 0x4.2> Δ-2 {[«4»]|[#20]|[#84]|[#4]}
<Const 0x224ec 0x1.2> Δ-2 {[«4»]|[#20]|[#84]|[#4]|[#1]}
<MI 224ee LEA.L 0x23dc4,A0> {[«4»]|[#20]|[#84]|[#4]|[#1]}
<MI 224f4 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#20]|[#84]|[#4]|[#1]|[4, 'A0']}
<Pointer.fp 0x224f6 <LVAR -0x004 @>> Δ-4 {[«4»]|[#20]|[#84]|[#4]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x224f8 0x10384> {[«4»]|[#20]|[#84]|[#4]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 224fa-224fc StackAdj> Δ+16 {[«4»]}
<POP 224fc-224fd StackAdj> Δ+4 {}
<Blob 0x224fd [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x224fe 0x18.2> Δ-2 {[«4»]|[#24]}
<Const 0x22502 0x100.2> Δ-2 {[«4»]|[#24]|[#256]}
<Const 0x22506 0x8.2> Δ-2 {[«4»]|[#24]|[#256]|[#8]}
<Const 0x2250a 0x1.2> Δ-2 {[«4»]|[#24]|[#256]|[#8]|[#1]}
<MI 2250c LEA.L 0x23dcc,A0> {[«4»]|[#24]|[#256]|[#8]|[#1]}
<MI 22512 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#24]|[#256]|[#8]|[#1]|[4, 'A0']}
<Pointer.fp 0x22514 <LVAR -0x004 @>> Δ-4 {[«4»]|[#24]|[#256]|[#8]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x22516 0x10384> {[«4»]|[#24]|[#256]|[#8]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 22518-2251a StackAdj> Δ+16 {[«4»]}
<POP 2251a-2251b StackAdj> Δ+4 {}
<Blob 0x2251b [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x2251c 0x1d.2> Δ-2 {[«4»]|[#29]}
<Const 0x22520 0x100.2> Δ-2 {[«4»]|[#29]|[#256]}
<Const 0x22524 0x2.2> Δ-2 {[«4»]|[#29]|[#256]|[#2]}
<Const 0x22526 0x1.2> Δ-2 {[«4»]|[#29]|[#256]|[#2]|[#1]}
<MI 22528 LEA.L 0x23dac,A0> {[«4»]|[#29]|[#256]|[#2]|[#1]}
<MI 2252e MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#29]|[#256]|[#2]|[#1]|[4, 'A0']}
<Pointer.fp 0x22530 <LVAR -0x004 @>> Δ-4 {[«4»]|[#29]|[#256]|[#2]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x22532 0x10384> {[«4»]|[#29]|[#256]|[#2]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 22534-22536 StackAdj> Δ+20 {}
<MI 22536 MOVE.W 0x2356e,D0> {}
<MI 2253c CMP.W #0x02,D0> {}
<MI 2253e BLS 0x22576> {}
<POP 22540-22576 Naked> Σ0 ↓
<Blob 0x22540 [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x22542 0x22.2> Δ-2 {[«4»]|[#34]}
<Const 0x22544 0x60.2> Δ-2 {[«4»]|[#34]|[#96]}
<Const 0x22546 0x1a0.2> Δ-2 {[«4»]|[#34]|[#96]|[#416]}
<Const 0x2254a 0x1.2> Δ-2 {[«4»]|[#34]|[#96]|[#416]|[#1]}
<MI 2254c LEA.L 0x23ddc,A0> {[«4»]|[#34]|[#96]|[#416]|[#1]}
<MI 22552 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#34]|[#96]|[#416]|[#1]|[4, 'A0']}
<Pointer.fp 0x22554 <LVAR -0x004 @>> Δ-4 {[«4»]|[#34]|[#96]|[#416]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x22556 0x10384> {[«4»]|[#34]|[#96]|[#416]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 22558-2255a StackAdj> Δ+16 {[«4»]}
<POP 2255a-2255b StackAdj> Δ+4 {}
<Blob 0x2255b [4] 0x22d38> Δ-4 {[«4»]}
<Const 0x2255c 0x23.2> Δ-2 {[«4»]|[#35]}
<Const 0x22560 0x60.2> Δ-2 {[«4»]|[#35]|[#96]}
<Const 0x22562 0x1a0.2> Δ-2 {[«4»]|[#35]|[#96]|[#416]}
<Const 0x22566 0x1.2> Δ-2 {[«4»]|[#35]|[#96]|[#416]|[#1]}
<MI 22568 LEA.L 0x2411c,A0> {[«4»]|[#35]|[#96]|[#416]|[#1]}
<MI 2256e MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#35]|[#96]|[#416]|[#1]|[4, 'A0']}
<Pointer.fp 0x22570 <LVAR -0x004 @>> Δ-4 {[«4»]|[#35]|[#96]|[#416]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x22572 0x10384> {[«4»]|[#35]|[#96]|[#416]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 22574-22576 StackAdj> Δ+20 {}
<POP 22576-22590 Naked> Σ0 ↓ ←0x22370
<MI 22576 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x22578 0x1.2> Δ-2 {[#0]|[#1]}
<Const 0x2257a 0x1.4> Δ-4 {[#0]|[#1]|[##1]}
<Pointer.fp 0x2257e <LVAR -0x004 @>> Δ-4 {[#0]|[#1]|[##1]|[@@-4]}
<Const 0x22580 0x22d38.4> Δ-4 {[#0]|[#1]|[##1]|[@@-4]|[##142648]}
<Call 0x22582 0x1038c> {[#0]|[#1]|[##1]|[@@-4]|[##142648]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 22588-2258a StackAdj> Δ+16 {}
<MI 2258a MOVEA.L (A6+0x8),A0> {}
<MI 2258e MOVE.B #0x01,(A0)> {}
<POP 22590-22598 Epilogue> Σ0 ←0x22338
@ 22598
START
<POP 22598--0001 Body> Δ+32
<POP 22598-225a2 Prologue> Σ0
<POP 225a2-225c0 RegCacheLoad> Σ0 ↓
<POP 225c0-225f2 Naked> Σ0 Δ-4 ↓ →0x2265e
<Call 0x225c0 0x10398> {}
FSCALL_10398
<MI 225c6 CLR.B 0x247c8> {}
<Blob 0x225cc [4] @> Δ-4 {[«4""»]}
<POP 225d0-225d2 StackAdj> Δ-6 {[«4""»]|[-6-]}
<Call 0x225d2 0x103c4> {[«4""»]|[-6-]}
GetArgv() : String
<POP 225d8-225da StackAdj> Δ-4 {[«4""»]|[-10-]}
<Lit 0x225da 4> {[«4""»]|[-6-]|[$$AUTO]}
<Call 0x225e6 0x102c8> {[«4""»]|[-6-]|[$$AUTO]}
StringEqual(a, b : String) : Byte
<POP 225ec-225ee StackAdj> Δ+8 {[«4""»]|[-2-]}
<MI 225ee TST.B (A7)+> Δ+2 {[«4""»]}
<MI 225f0 BEQ 0x2265e> {[«4""»]}
<POP 225f2-22628 Naked> Σ-4 ↓ →0x22658
<Call 0x225f2 0x103dc> {[-4-]}
WriteConsoleCrLf(void)
<Blob 0x225f4 [12] @> Δ-12 {[-4-]|[«12""»]}
<POP 22604-22606 StackAdj> Δ-4 {[-4-]|[«12""»]|[-4-]}
<Lit 0x22606 11> {[-4-]|[«12""»]|[$$R1000_DUMP1]}
<Const 0x22614 0x23540.4> Δ-4 {[-4-]|[«12""»]|[$$R1000_DUMP1]|[##144704]}
<Call 0x2261a 0x222e4> {[-4-]|[«12""»]|[$$R1000_DUMP1]|[##144704]}
<POP 2261e-22620 StackAdj> Δ+20 {[-4-]}
<MI 22620 TST.B 0x23540> {[-4-]}
<MI 22626 BEQ 0x22658> {[-4-]}
<POP 22628-22658 Naked> Σ-4 ↓
<Call 0x22628 0x2105c> {[-4-]}
<Call 0x2262c 0x213e4> {[-4-]}
<Blob 0x22630 [80] @> Δ-80 {[-4-]|[«80""»]}
<POP 22642-22644 StackAdj> Δ-4 {[-4-]|[«80""»]|[-4-]}
<Lit 0x22644 79> {[-4-]|[«80""»]|[$$-------------------------------------------------------------------------------]}
<Call 0x22652 0x103e0> {[-4-]|[«80""»]|[$$-------------------------------------------------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 22654-22658 StackAdj> Δ+84 {[-4-]}
<POP 22658-2265e Naked> Σ-4 Δ+4 →0x22b12 ←0x225f2
<POP 22658-2265a StackAdj> Δ+4 {}
<MI 2265a BRA 0x22b12> {}
<POP 2265e-22660 Naked> Σ-4 Δ+4 ↓ ←0x225c0
<POP 2265e-22660 StackAdj> Δ+4 {}
<POP 22660-226a6 Naked> Σ0 ↓ ←0x22b08
<Call 0x22660 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x22662 [4] @> Δ-4 {[«4""»]}
<Blob 0x22666 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x2266a [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 2266e-22670 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x22670 12> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]}
<Call 0x2267c 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]}
WriteConsoleStringCrLf(str : String)
<POP 2267e-2267f StackAdj> Δ+16 ↓ {}
<Blob 0x2267f [14] @> Δ-14 {[«14""»]}
<POP 2268e-22690 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x22690 13> {[«14""»]|[$$ 0 => Exit]}
<Call 0x2269e 0x103e0> {[«14""»]|[$$ 0 => Exit]}
WriteConsoleStringCrLf(str : String)
<POP 226a0-226a4 StackAdj> Δ+18 {}
<MI 226a4 MOVEQ.L #0x01,D0> {}
<POP 226a6-226fe Naked> Σ0 ↓ →0x226a6 ←0x226a6
<MI 226a6 MOVE.L D0,0x22d34> {}
<Blob 0x226ac [4] @> Δ-4 {[«4""»]}
<Blob 0x226b0 [28] @> Δ-28 {[«4""»]|[«28""»]}
<POP 226c0-226c2 StackAdj> Δ-8 {[«4""»]|[«28""»]|[-8-]}
<Lit 0x226c2 4> {[«4""»]|[«28""»]|[-4-]|[$$____]}
<MI 226cc MOVE.L D0,(A7)> {[«4""»]|[«28""»]|[-4-]|[4, 'D0']}
<POP 226ca-226cc StackAdj> Δ-8 {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-8-]}
<Call 0x226ce 0x102e4> {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-8-]}
Long2String(a : Long) : String
<Lit 0x226d4 27> {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-4-]|[$$ => Display tombstone file_]}
<MI 226e0 MOVE.L D0,(A7)> {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-4-]|[4, 'D0']}
<POP 226de-226e0 StackAdj> Δ-8 {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-4-]|[4, 'D0']|[-8-]}
<Call 0x226e2 0x102e4> {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-4-]|[4, 'D0']|[-8-]}
Long2String(a : Long) : String
<POP 226e8-226ea StackAdj> Δ+4 {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-4-]|[4, 'D0']|[-4-]}
<Call 0x226ea 0x102d8> {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-4-]|[4, 'D0']|[-4-]}
StringCat4(a, b, c, d : String) : String
<POP 226f0-226f2 StackAdj> Δ+16 {[«4""»]|[«28""»]|[-4-]}
<Call 0x226f2 0x103e0> {[«4""»]|[«28""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 226f4-226f8 StackAdj> Δ+36 {}
<MI 226f8 ADDQ.L #0x1,D0> {}
<MI 226fa CMP.L #0x04,D0> {}
<MI 226fc BLE 0x226a6> {}
<POP 226fe-2274e Naked> Σ0 →0x22758 →0x2275e →0x22770 →0x22782 →0x22794
<Call 0x226fe 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x22700 [16] @> Δ-16 {[«16""»]}
<POP 22710-22712 StackAdj> Δ-8 {[«16""»]|[-8-]}
<Lit 0x22712 15> {[«16""»]|[-4-]|[$$Enter option :_]}
<Const 0x22720 0x0.4> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]}
<Const 0x22724 0x4.4> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[##4]}
<Call 0x22728 0x103ec> {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[##4]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 2272e-22730 StackAdj> Δ+12 {[«16""»]|[-4-]}
<MI 22730 MOVE.L (A7)+,0x247c0> Δ+4 {[«16""»]}
<POP 22736-22738 StackAdj> Δ+16 {}
<MI 22738 MOVE.L 0x247c0,D0> {}
<POP 0x2273e LimitCheck 0x0 ≤ D0 ≤ 0x4> {}
<MI 22744 ADD.W D0,D0> {}
<MI 22746 SWITCH D0.W> {}
<POP 22758-2275c Naked> Σ0 →0x22b12 ←0x226fe
<MI 22758 BRA 0x22b12> {}
<POP 2275e-22770 Naked> Σ0 Δ-12 →0x227a4 ←0x226fe
<Blob 0x2275e [12] @> Δ-12 {[«12""»]}
<MI 2276e BRA 0x227a4> {[«12""»]}
<POP 22770-22782 Naked> Σ0 Δ-12 →0x227a4 ←0x226fe
<Blob 0x22770 [12] @> Δ-12 {[«12""»]}
<MI 22780 BRA 0x227a4> {[«12""»]}
<POP 22782-22794 Naked> Σ0 Δ-12 →0x227a4 ←0x226fe
<Blob 0x22782 [12] @> Δ-12 {[«12""»]}
<MI 22792 BRA 0x227a4> {[«12""»]}
<POP 22794-227a4 Naked> Σ0 Δ-12 ↓ ←0x226fe
<Blob 0x22794 [12] @> Δ-12 {[«12""»]}
<POP 227a4-227c8 Naked> Σ-12 Δ+12 ↓ →0x227cc ←0x2275e ←0x22770 ←0x22782
<POP 227a4-227a6 StackAdj> Δ-4 {[-16-]}
<Lit 0x227a6> {[-12-]|[$$…]}
<Pointer.sp 0x227a6 4> Δ-4
<Const 0x227aa 0x1.2> Δ-2
<Const 0x227ac 0xb.2> Δ-2
<Call 0x227b0 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 227b2-227b4 StackAdj> Δ+8
<Const 0x227b4 0x23540.4> Δ-4 {[-12-]|[$$…]|[##144704]}
<Call 0x227ba 0x222e4> {[-12-]|[$$…]|[##144704]}
<POP 227be-227c0 StackAdj> Δ+20 {}
<MI 227c0 TST.B 0x23540> {}
<MI 227c6 BNE 0x227cc> {}
<POP 227c8-227cc Naked> Σ0 →0x22b08
<MI 227c8 BRA 0x22b08> {}
<POP 227cc-227d2 Naked> Σ0 ↓ ←0x227a4
<MI 227cc CLR.B 0x247c9> {}
<POP 227d2-2282e Naked> Σ0 ↓ ←0x22ad6
<Call 0x227d2 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x227d4 [22] @> Δ-22 {[«22""»]}
<Blob 0x227e0 [10] @> Δ-10 {[«22""»]|[«10""»]}
<POP 227f2-227f4 StackAdj> Δ-8 {[«22""»]|[«10""»]|[-8-]}
<Lit 0x227f4 22> {[«22""»]|[«10""»]|[-4-]|[$$Analysis of tombstone_]}
<POP 22800-22801 StackAdj> Δ-4 {[«22""»]|[«10""»]|[-4-]|[$$Analysis of tombstone_]|[-4-]}
<Blob 0x22801 [4] 0x247c0> Δ-4 {[«22""»]|[«10""»]|[-4-]|[$$Analysis of tombstone_]|[-4-]|[«4»]}
<Call 0x22806 0x102e4> {[«22""»]|[«10""»]|[-4-]|[$$Analysis of tombstone_]|[-4-]|[«4»]}
Long2String(a : Long) : String
<Lit 0x2280c 9> {[«22""»]|[«10""»]|[-4-]|[$$Analysis of tombstone_]|[-4-]|[$$ dated -_]}
<Call 0x2281a 0x102d4> {[«22""»]|[«10""»]|[-4-]|[$$Analysis of tombstone_]|[-4-]|[$$ dated -_]}
StringCat3(a, b, c : String) : String
<POP 22820-22822 StackAdj> Δ+12 {[«22""»]|[«10""»]|[-4-]}
<Call 0x22822 0x103d8> {[«22""»]|[«10""»]|[-4-]}
WriteConsoleString(str : String)
<POP 22828-2282c StackAdj> Δ+36 {}
<MI 2282c MOVEQ.L #0x01,D0> {}
<POP 2282e-22862 Naked> Σ0 ↓ →0x2282e ←0x2282e
<MI 2282e MOVE.L D0,0x22d34> {}
<MI 22834 MOVE.L D0,D1> {}
<MI 22836 SUBQ.L #0x1,D1> {}
<POP 0x22838 LimitCheck 0x0 ≤ D1 ≤ 0x11> {}
<MI 22842 LEA.L 0x22d2c,A0> {}
<MI 22848 LEA.L (A0+D1.L),A0> {}
<MI 2284c MOVE.B (A0+0x84e),-(A7)> Δ-2 {[2, '(A0+0x84e)']}
<Call 0x22850 0x103d0> {[2, '(A0+0x84e)']}
WriteConsoleChar(chr : char)
<POP 22856-22858 StackAdj> Δ+2 {}
<MI 22858 ADDQ.L #0x1,D0> {}
<MI 2285a CMPI.L #0x00000012,D0> {}
<MI 22860 BLE 0x2282e> {}
<POP 22862-22a08 Naked> Σ0 →0x22a1a →0x22a22 →0x22a28 →0x22a30 →0x22a38 →0x22a40 →0x22a48 →0x22a50 →0x22a58
<Call 0x22862 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x22864 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x22866 [4] @> Δ-4 {[«4""»]}
<Blob 0x2286a [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x2286e [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 22872-22874 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x22874 12> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]}
<Call 0x22880 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]}
WriteConsoleStringCrLf(str : String)
<POP 22882-22884 StackAdj> Δ+16 {}
<Blob 0x22884 [28] @> Δ-28 {[«28""»]}
<POP 22890-22892 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x22892 28> {[«28""»]|[$$ 0 => Return to main menu]}
<Call 0x2289e 0x103e0> {[«28""»]|[$$ 0 => Return to main menu]}
WriteConsoleStringCrLf(str : String)
<POP 228a0-228a1 StackAdj> Δ+32 ↓ {}
<Blob 0x228a1 [18] @> Δ-18 {[«18""»]}
<POP 228b2-228b4 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x228b4 17> {[«18""»]|[$$ 1 => Show all]}
<Call 0x228c2 0x103e0> {[«18""»]|[$$ 1 => Show all]}
WriteConsoleStringCrLf(str : String)
<POP 228c4-228c5 StackAdj> Δ+22 ↓ {}
<Blob 0x228c5 [34] @> Δ-34 {[«34""»]}
<POP 228d4-228d6 StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x228d6 33> {[«34""»]|[$$ 2 => Show last console output]}
<Call 0x228e4 0x103e0> {[«34""»]|[$$ 2 => Show last console output]}
WriteConsoleStringCrLf(str : String)
<POP 228e6-228e7 StackAdj> Δ+38 ↓ {}
<Blob 0x228e7 [36] @> Δ-36 {[«36""»]}
<POP 228f6-228f8 StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x228f8 35> {[«36""»]|[$$ 3 => Show Crash Classifications]}
<Call 0x22906 0x103e0> {[«36""»]|[$$ 3 => Show Crash Classifications]}
WriteConsoleStringCrLf(str : String)
<POP 22908-2290c StackAdj> Δ+40 {}
<Blob 0x2290c [28] @> Δ-28 {[«28""»]}
<POP 22918-2291a StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x2291a 28> {[«28""»]|[$$ 4 => Show restart output]}
<Call 0x22926 0x103e0> {[«28""»]|[$$ 4 => Show restart output]}
WriteConsoleStringCrLf(str : String)
<POP 22928-22929 StackAdj> Δ+32 ↓ {}
<Blob 0x22929 [20] @> Δ-20 {[«20""»]}
<POP 22938-2293a StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x2293a 19> {[«20""»]|[$$ 5 => Show trace]}
<Call 0x22948 0x103e0> {[«20""»]|[$$ 5 => Show trace]}
WriteConsoleStringCrLf(str : String)
<MI 2294a MOVEA.L A7,A0> {[«20""»]|[$$ 5 => Show trace]}
<MI 2294c LEA.L 0x20274,A1> {[«20""»]|[$$ 5 => Show trace]}
<BlockMove 23,A1,A0> {[«20""»]|[$$ 5 => Show trace]}
<POP 22958-2295a StackAdj> Δ-4 {[«20""»]|[$$ 5 => Show trace]|[-4-]}
<Lit 0x2295a> {[«20""»]|[$$ 5 => Show trace]|[$$…]}
<Pointer.sp 0x2295a 4> Δ-4
<Const 0x2295e 0x1.2> Δ-2
<Const 0x22960 0x17.2> Δ-2
<Call 0x22964 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22966-22968 StackAdj> Δ+8
<Call 0x22968 0x103e0> {[«20""»]|[$$ 5 => Show trace]|[$$…]}
WriteConsoleStringCrLf(str : String)
<POP 2296a-2296c StackAdj> Δ+28 {}
<Blob 0x2296c [20] @> Δ-20 {[«20""»]}
<POP 22978-2297a StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x2297a 20> {[«20""»]|[$$ 7 => Show queues]}
<Call 0x22986 0x103e0> {[«20""»]|[$$ 7 => Show queues]}
WriteConsoleStringCrLf(str : String)
<POP 22988-22989 StackAdj> Δ+24 ↓ {}
<Blob 0x22989 [46] @> Δ-46 {[«46""»]}
<POP 2299a-2299c StackAdj> Δ-4 {[«46""»]|[-4-]}
<Lit 0x2299c 45> {[«46""»]|[$$ 8 => Show IOP Kernel version & cluster ID]}
<Call 0x229aa 0x103e0> {[«46""»]|[$$ 8 => Show IOP Kernel version & cluster ID]}
WriteConsoleStringCrLf(str : String)
<POP 229ac-229b0 StackAdj> Δ+50 {}
<Call 0x229b0 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x229b2 [16] @> Δ-16 {[«16""»]}
<POP 229c2-229c4 StackAdj> Δ-8 {[«16""»]|[-8-]}
<Lit 0x229c4 15> {[«16""»]|[-4-]|[$$Enter option :_]}
<Const 0x229d2 0x0.4> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]}
<Const 0x229d6 0x8.4> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[##8]}
<Call 0x229da 0x103ec> {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[##8]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 229e0-229e2 StackAdj> Δ+12 {[«16""»]|[-4-]}
<MI 229e2 MOVE.L (A7)+,0x247c4> Δ+4 {[«16""»]}
<POP 229e8-229ea StackAdj> Δ+16 {}
<Call 0x229ea 0x20cfa> {}
<MI 229ee MOVE.L 0x247c4,D0> {}
<POP 0x229f4 LimitCheck 0x0 ≤ D0 ≤ 0x8> {}
<MI 229fe ADD.W D0,D0> {}
<MI 22a00 SWITCH D0.W> {}
<POP 22a1a-22a22 Naked> Σ0 →0x22a5e ←0x22862
<MI 22a1a MOVE.B #0x01,0x247c9> {}
<MI 22a20 BRA 0x22a5e> {}
<POP 22a22-22a28 Naked> Σ0 →0x22a5e ←0x22862
<Call 0x22a22 0x20d3a> {}
<MI 22a26 BRA 0x22a5e> {}
<POP 22a28-22a30 Naked> Σ0 →0x22a5e ←0x22862
<MI 22a28 MOVE.B #0x01,0x247ca> {}
<MI 22a2e BRA 0x22a5e> {}
<POP 22a30-22a38 Naked> Σ0 →0x22a5e ←0x22862
<MI 22a30 MOVE.B #0x01,0x247cb> {}
<MI 22a36 BRA 0x22a5e> {}
<POP 22a38-22a40 Naked> Σ0 →0x22a5e ←0x22862
<MI 22a38 MOVE.B #0x01,0x247cc> {}
<MI 22a3e BRA 0x22a5e> {}
<POP 22a40-22a48 Naked> Σ0 →0x22a5e ←0x22862
<MI 22a40 MOVE.B #0x01,0x247cd> {}
<MI 22a46 BRA 0x22a5e> {}
<POP 22a48-22a50 Naked> Σ0 →0x22a5e ←0x22862
<MI 22a48 MOVE.B #0x01,0x247ce> {}
<MI 22a4e BRA 0x22a5e> {}
<POP 22a50-22a58 Naked> Σ0 →0x22a5e ←0x22862
<MI 22a50 MOVE.B #0x01,0x247cf> {}
<MI 22a56 BRA 0x22a5e> {}
<POP 22a58-22a5e Naked> Σ0 ↓ ←0x22862
<MI 22a58 MOVE.B #0x01,0x247d0> {}
<POP 22a5e-22a66 Naked> Σ0 ↓ →0x22a6a ←0x22a1a ←0x22a22 ←0x22a28 ←0x22a30 ←0x22a38 ←0x22a40 ←0x22a48 ←0x22a50
<MI 22a5e TST.B 0x247cb> {}
<MI 22a64 BEQ 0x22a6a> {}
<POP 22a66-22a6a Naked> Σ0 ↓
<Call 0x22a66 0x20ede> {}
<POP 22a6a-22a72 Naked> Σ0 ↓ →0x22a76 ←0x22a5e
<MI 22a6a TST.B 0x247ca> {}
<MI 22a70 BEQ 0x22a76> {}
<POP 22a72-22a76 Naked> Σ0 ↓
<Call 0x22a72 0x2105c> {}
<POP 22a76-22a7e Naked> Σ0 ↓ →0x22a82 ←0x22a6a
<MI 22a76 TST.B 0x247cb> {}
<MI 22a7c BEQ 0x22a82> {}
<POP 22a7e-22a82 Naked> Σ0 ↓
<Call 0x22a7e 0x21152> {}
<POP 22a82-22a8a Naked> Σ0 ↓ →0x22a8e ←0x22a76
<MI 22a82 TST.B 0x247d0> {}
<MI 22a88 BEQ 0x22a8e> {}
<POP 22a8a-22a8e Naked> Σ0 ↓
<Call 0x22a8a 0x2121c> {}
<POP 22a8e-22a96 Naked> Σ0 ↓ →0x22a9a ←0x22a82
<MI 22a8e TST.B 0x247cc> {}
<MI 22a94 BEQ 0x22a9a> {}
<POP 22a96-22a9a Naked> Σ0 ↓
<Call 0x22a96 0x213e4> {}
<POP 22a9a-22aa2 Naked> Σ0 ↓ →0x22aa6 ←0x22a8e
<MI 22a9a TST.B 0x247cd> {}
<MI 22aa0 BEQ 0x22aa6> {}
<POP 22aa2-22aa6 Naked> Σ0 ↓
<Call 0x22aa2 0x21674> {}
<POP 22aa6-22aae Naked> Σ0 ↓ →0x22ab2 ←0x22a9a
<MI 22aa6 TST.B 0x247ce> {}
<MI 22aac BEQ 0x22ab2> {}
<POP 22aae-22ab2 Naked> Σ0 ↓
<Call 0x22aae 0x21a62> {}
<POP 22ab2-22aba Naked> Σ0 ↓ →0x22abe ←0x22aa6
<MI 22ab2 TST.B 0x247ce> {}
<MI 22ab8 BEQ 0x22abe> {}
<POP 22aba-22abe Naked> Σ0 ↓
<Call 0x22aba 0x220dc> {}
<POP 22abe-22ac6 Naked> Σ0 ↓ →0x22aca ←0x22ab2
<MI 22abe TST.B 0x247ce> {}
<MI 22ac4 BEQ 0x22aca> {}
<POP 22ac6-22aca Naked> Σ0 ↓
<Call 0x22ac6 0x2223a> {}
<POP 22aca-22ad2 Naked> Σ0 ↓ →0x22ad6 ←0x22abe
<MI 22aca TST.B 0x247cf> {}
<MI 22ad0 BEQ 0x22ad6> {}
<POP 22ad2-22ad6 Naked> Σ0 ↓
<Call 0x22ad2 0x21e0a> {}
<POP 22ad6-22b08 Naked> Σ0 ↓ →0x227d2 ←0x22aca
<Blob 0x22ad6 [80] @> Δ-80 {[«80""»]}
<POP 22ae8-22aea StackAdj> Δ-4 {[«80""»]|[-4-]}
<Lit 0x22aea 79> {[«80""»]|[$$-------------------------------------------------------------------------------]}
<Call 0x22af8 0x103e0> {[«80""»]|[$$-------------------------------------------------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 22afa-22afe StackAdj> Δ+84 {}
<MI 22afe TST.B 0x247c9> {}
<MI 22b04 BEQ 0x227d2> {}
<POP 22b08-22b12 Naked> Σ0 ↓ →0x22660 ←0x227c8
<MI 22b08 TST.B 0x247c8> {}
<MI 22b0e BEQ 0x22660> {}
<POP 22b12-22b20 Naked> Σ0 ↓ ←0x22658 ←0x22758
<MI 22b12 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x22b14 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x22b18 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 22b1e-22b20 StackAdj> Δ+6 {}
<POP 22b20-22b26 Naked> Σ0
<Call 0x22b20 0x10284> {}
?exit
@ 22b34
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 22b34-22b9c Body>
<POP 22b34-22b4a Prologue> Σ0 ↓
<POP 22b4a-22b94 Naked> Σ0 ↓
<Blob 0x22b4a [14] @> Δ-14 {[«14""»]}
<Const 0x22b56 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 22b5a-22b5c StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x22b5c 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 22b6e-22b70 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 22b70 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 22b74 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 22b76 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 22b78 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x22b7a 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 22b80-22b82 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x22b82 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 22b88-22b8a StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x22b8a 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 22b90-22b94 StackAdj> Δ+20 {}
<POP 22b94-22b9c Epilogue> Σ0
@ 22bf0
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 22bf0-22d2c Body>
<POP 22bf0-22c06 Prologue> Σ0 ↓
<POP 22c06-22c1c RegCacheLoad> Σ0 ↓
<POP 22c1c-22c7c Naked> Σ0 ↓ →0x22cc4
<Call 0x22c1c 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x22c22 [18] @> Δ-18 {[«18""»]}
<POP 22c2e-22c30 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x22c30 18> {[«18""»]|[$$Experiment error :]}
<Call 0x22c3c 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 22c3e-22c3f StackAdj> Δ+22 ↓ {}
<Blob 0x22c3f [14] @> Δ-14 {[«14""»]}
<POP 22c4e-22c50 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x22c50 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 22c5a-22c5c StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 22c5c MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x22c60 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 22c66-22c68 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x22c68 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 22c6e-22c70 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x22c70 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22c72-22c74 StackAdj> Δ+18 {}
<MI 22c74 MOVEA.L (A6+0xa),A0> {}
<MI 22c78 CMPA.W #0x01,A0> {}
<MI 22c7a BEQ 0x22cc4> {}
<POP 22c7c-22cc4 Naked> Σ0 ↓
<Blob 0x22c7c [14] @> Δ-14 {[«14""»]}
<Blob 0x22c8c [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 22c9c-22c9e StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x22c9e 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 22ca8-22caa StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x22caa> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x22caa 12> Δ-4
<Const 0x22cae 0x1.2> Δ-2
<Const 0x22cb0 0x1e.2> Δ-2
<Call 0x22cb2 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22cb4-22cb6 StackAdj> Δ+8
<Call 0x22cb6 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 22cbc-22cbe StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x22cbe 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22cc0-22cc4 StackAdj> Δ+48 {}
<POP 22cc4-22d24 Naked> Σ0 ↓ ←0x22c1c
<Blob 0x22cc4 [14] @> Δ-14 {[«14""»]}
<POP 22cd4-22cd6 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x22cd6 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 22ce0-22ce2 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 22ce2 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x22ce6 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 22cec-22cee StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x22cee 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 22cf4-22cf6 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x22cf6 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22cf8-22cf9 StackAdj> Δ+18 ↓ {}
<Blob 0x22cf9 [24] @> Δ-24 {[«24""»]}
<Const 0x22d08 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 22d0c-22d0e StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x22d0e 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x22d1c 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 22d22-22d24 StackAdj> Δ+30 {}
<POP 22d24-22d2c Epilogue> Σ0
00020000 ; --------------------------------------------------------------------------------------
00020000 ; R1000.Disassembly modules:
00020000 ; import all
00020000 ; import kind.program
00020000 ; no ident.494c55dccd7bbae7
00020000 ; --------------------------------------------------------------------------------------
00020000 stack.top:
00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END
00020004 00 02 25 98 | % | .CODE START
00020008 00 01 02 88 | | .CODE FSCALL_10288
0002000c heap.top:
0002000c 00 02 47 e4 | G | .PTR 0x247e4
00020010 code.end:
00020010 00 02 2d 2c | -, | .PTR 0x22d2c
00020014 00 00 00 00 | | .CONST 0x00000000
00020018 programfailurehandler:
00020018 00 02 2b 34 | +4 | .CODE PROG_FAIL
0002001c experimentfailurehandler:
0002001c 00 02 2b f0 | + | .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 54 4f |@(#)TO | .XXX[0x6]
00020110 4d 42 53 54 4f 4e 45 2c |MBSTONE,| .XXX[0x18]
00020118 31 2e 31 2c 39 32 2f 30 |1.1,92/0|
00020120 39 2f 30 38 2c 31 32 3a |9/08,12:|
00020128 30 30 3a 30 30 5c |00:00\ | .XXX[0x6]
0002012e 5f 5f |__ | .TXT '__'
00020130 5f 5f 5f 5f 5f 20 |_____ | .TXT '_____ '
00020136 2d 2d 2d 2d 2d 2d 2d 2d |--------| .TXT '------------------------------------------------------------------------------- '
00020186 45 6e 74 65 72 20 6f 70 |Enter op| .TXT 'Enter option :_ '
00020196 4f 70 74 69 |Opti | .TXT 'Opti'
0002019a 6f 6e 73 20 |ons | .TXT 'ons '
0002019e 61 72 65 3a |are: | .TXT 'are:'
000201a2 20 20 20 20 30 20 3d 3e | 0 =>| .TXT ' 0 => Exit '
000201b0 5f 5f 5f 5f |____ | .TXT '____'
000201b4 20 3d 3e 20 44 69 73 70 | => Disp| .TXT ' => Display tombstone file_ '
000201d0 20 20 20 20 30 20 3d 3e | 0 =>| .TXT ' 0 => Return to main menu'
000201ec 20 20 20 20 31 20 3d 3e | 1 =>| .TXT ' 1 => Show all '
000201fe 20 20 20 20 32 20 3d 3e | 2 =>| .TXT ' 2 => Show last console output '
00020220 20 20 20 20 33 20 3d 3e | 3 =>| .TXT ' 3 => Show Crash Classifications '
00020244 20 20 20 20 34 20 3d 3e | 4 =>| .TXT ' 4 => Show restart output'
00020260 20 20 20 20 35 20 3d 3e | 5 =>| .TXT ' 5 => Show trace '
00020274 20 20 20 20 | | .XXX[0x4]
00020278 36 20 3d 3e 20 53 68 6f |6 => Sho| .XXX[0x10]
00020280 77 20 43 70 75 20 53 74 |w Cpu St|
00020288 61 74 65 20 |ate | .XXX[0x4]
0002028c 20 20 20 20 37 20 3d 3e | 7 =>| .TXT ' 7 => Show queues'
000202a0 20 20 20 20 38 20 3d 3e | 8 =>| .TXT ' 8 => Show IOP Kernel version & cluster ID '
000202ce 49 6f 70 20 73 74 61 74 |Iop stat| .TXT 'Iop state not saved to tombstone'
000202ee 52 31 30 30 30 20 63 70 |R1000 cp| .TXT 'R1000 cpu state was not saved in tombstone'
00020318 52 31 30 30 30 20 72 65 |R1000 re| .TXT 'R1000 register files were not saved in tombstone'
00020348 20 20 20 43 52 41 53 48 | CRASH| .TXT ' CRASH REASON (based on last micro-pc)'
00020370 20 20 20 2d 2d 2d 2d 2d | -----| .TXT ' -------------------------------------'
00020398 20 2d 20 20 6e 6f 74 20 | - not | .TXT ' - not found '
000203a6 20 20 20 20 69 6e 66 6f | info| .TXT ' information unavailable (CPU STATE not dumped to tombstone) '
000203e6 20 20 | | .XXX[0x2]
000203e8 32 30 30 3a 20 53 59 53 |200: SYS| .XXX[0x128]
000203f0 54 45 4d 20 45 52 52 4f |TEM ERRO|
000203f8 52 20 20 20 20 20 20 20 |R |
00020400 20 20 20 20 20 20 32 30 | 20|
00020408 31 3a 20 49 4f 50 20 48 |1: IOP H|
00020410 41 52 44 57 41 52 45 20 |ARDWARE |
00020418 45 52 52 4f 52 20 20 20 |ERROR |
00020420 20 20 20 20 32 30 32 3a | 202:|
00020428 20 49 4f 50 20 53 4f 46 | IOP SOF|
00020430 54 57 41 52 45 20 45 52 |TWARE ER|
00020438 52 4f 52 20 20 20 20 20 |ROR |
00020440 20 20 32 30 33 3a 20 43 | 203: C|
00020448 50 55 20 48 41 52 44 57 |PU HARDW|
00020450 41 52 45 20 45 52 52 4f |ARE ERRO|
00020458 52 20 20 20 20 20 20 20 |R |
00020460 32 30 34 3a 20 4d 55 4c |204: MUL|
00020468 54 49 20 42 49 54 20 4d |TI BIT M|
00020470 45 4d 4f 52 59 20 45 52 |EMORY ER|
00020478 52 4f 52 20 20 20 32 30 |ROR 20|
00020480 35 3a 20 53 59 53 42 55 |5: SYSBU|
00020488 53 20 48 41 52 44 57 41 |S HARDWA|
00020490 52 45 20 45 52 52 4f 52 |RE ERROR|
00020498 20 20 20 20 32 30 36 3a | 206:|
000204a0 20 43 50 55 20 4d 49 43 | CPU MIC|
000204a8 52 4f 43 4f 44 45 20 45 |ROCODE E|
000204b0 52 52 4f 52 20 20 20 20 |RROR |
000204b8 20 20 32 30 37 3a 20 43 | 207: C|
000204c0 50 55 20 53 4f 46 54 57 |PU SOFTW|
000204c8 41 52 45 20 45 52 52 4f |ARE ERRO|
000204d0 52 20 20 20 20 20 20 20 |R |
000204d8 32 30 38 3a 20 53 59 53 |208: SYS|
000204e0 54 45 4d 20 53 48 55 54 |TEM SHUT|
000204e8 44 4f 57 4e 20 20 20 20 |DOWN |
000204f0 20 20 20 20 20 20 32 30 | 20|
000204f8 39 3a 20 53 4f 46 54 57 |9: SOFTW|
00020500 41 52 45 20 43 52 41 53 |ARE CRAS|
00020508 48 20 20 20 20 20 20 20 |H |
00020510 20 20 | | .XXX[0x2]
00020512 20 20 20 4c 41 53 54 20 | LAST | .TXT ' LAST CONSOLE OUTPUT'
00020528 44 69 73 6b 20 20 20 20 |Disk | .XXX[0x8]
00020530 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020540 20 20 20 20 20 20 54 61 | Ta| .XXX[0x10]
00020548 70 65 20 20 20 20 20 20 |pe |
00020550 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020560 20 20 20 20 4d 61 63 68 | Mach| .XXX[0x78]
00020568 69 6e 65 20 63 72 61 73 |ine cras|
00020570 68 2c 20 49 2f 4f 20 41 |h, I/O A|
00020578 64 61 70 74 6f 72 20 20 |daptor |
00020580 20 20 4d 61 63 68 69 6e | Machin|
00020588 65 20 63 72 61 73 68 2c |e crash,|
00020590 20 52 31 30 30 30 20 20 | R1000 |
00020598 20 20 20 20 20 20 20 20 | |
000205a0 4d 61 63 68 69 6e 65 20 |Machine |
000205a8 63 72 61 73 68 2c 20 49 |crash, I|
000205b0 2f 4f 20 50 72 6f 63 65 |/O Proce|
000205b8 73 73 6f 72 20 20 46 52 |ssor FR|
000205c0 55 20 44 69 61 67 6e 6f |U Diagno|
000205c8 73 74 69 63 20 20 20 20 |stic |
000205d0 20 20 20 20 20 20 20 20 | |
000205d8 20 20 20 20 | | .XXX[0x4]
000205dc 53 70 61 72 |Spar | .XXX[0x4]
000205e0 65 20 35 20 20 20 20 20 |e 5 | .XXX[0x8]
000205e8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
000205f8 20 20 53 70 61 72 65 20 | Spare | .XXX[0x10]
00020600 36 20 20 20 20 20 20 20 |6 |
00020608 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020618 53 70 61 72 65 20 37 20 |Spare 7 | .XXX[0x8]
00020620 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020630 20 20 20 20 20 20 53 70 | Sp| .XXX[0x10]
00020638 61 72 65 20 38 20 20 20 |are 8 |
00020640 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020650 20 20 20 20 53 70 61 72 | Spar| .XXX[0x10]
00020658 65 20 39 20 20 20 20 20 |e 9 |
00020660 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020670 20 20 53 70 61 72 65 20 | Spare | .XXX[0x10]
00020678 31 30 20 20 20 20 20 20 |10 |
00020680 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020690 53 70 61 72 65 20 31 31 |Spare 11| .XXX[0x8]
00020698 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
000206a8 20 20 20 20 20 20 | | .BLANK 20[0x6]
000206ae 53 70 |Sp | .XXX[0x2]
000206b0 61 72 65 20 31 32 20 20 |are 12 | .XXX[0x8]
000206b8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
000206c8 20 20 20 20 53 70 61 72 | Spar| .XXX[0x10]
000206d0 65 20 31 33 20 20 20 20 |e 13 |
000206d8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
000206e8 20 20 53 70 61 72 65 20 | Spare | .XXX[0x10]
000206f0 31 34 20 20 20 20 20 20 |14 |
000206f8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020708 20 20 20 43 52 41 53 48 | CRASH| .TXT ' CRASH CLASSIFICATION '
00020720 20 20 20 49 4f 50 20 4b | IOP K| .TXT ' IOP Kernel version '
00020736 43 4c 55 53 54 45 52 5f |CLUSTER_| .TXT 'CLUSTER_ID =>_'
00020744 20 20 20 52 45 53 54 41 | RESTA| .TXT ' RESTART BUFFER '
00020756 2d 2d 2d 2d 20 63 6f 6e |---- con| .TXT '---- console output from the FRU tests: '
0002077e 20 20 20 55 43 4f 44 45 | UCODE| .TXT ' UCODE TRACE (last 20 entries)'
0002079e 20 20 20 4d 69 63 72 6f | Micro| .TXT ' Microcode trace for Wcs Version_ '
000207c2 20 20 20 48 5f 20 | H_ | .TXT ' H_ '
000207c8 43 5f |C_ | .TXT 'C_'
000207ca 20 20 20 4d 69 63 72 6f | Micro| .TXT ' Micro Stack contents : '
000207e4 5f 5f |__ | .TXT '__'
000207e6 5f 5f |__ | .TXT '__'
000207e8 5f 5f |__ | .TXT '__'
000207ea 20 2d | - | .TXT ' -'
000207ec 5f 20 |_ | .XXX[0x2]
000207ee 20 2d | - | .TXT ' -'
000207f0 5f 20 |_ | .XXX[0x2]
000207f2 20 4c 65 78 20 6c 65 76 | Lex lev| .TXT ' Lex levels valid =>'
00020806 5f 5f |__ | .TXT '__'
00020808 20 20 20 55 43 4f 44 45 | UCODE| .TXT ' UCODE STATE'
00020816 20 54 6f 70 20 20 3d 3e | Top =>| .TXT ' Top =>_ '
00020820 20 50 72 65 64 20 3d 3e | Pred =>| .TXT ' Pred =>_ '
0002082a 20 53 61 76 65 20 3d 3e | Save =>| .TXT ' Save =>_ '
00020834 20 50 43 20 | PC | .TXT ' PC '
00020838 20 3d 3e 5f | =>_ | .TXT ' =>_'
0002083c 20 44 50 43 | DPC | .TXT ' DPC'
00020840 20 3d 3e 5f | =>_ | .TXT ' =>_'
00020844 20 54 4c 43 | TLC | .TXT ' TLC'
00020848 20 3d 3e 5f | =>_ | .TXT ' =>_'
0002084c 20 56 4c 43 | VLC | .TXT ' VLC'
00020850 20 3d 3e 5f | =>_ | .TXT ' =>_'
00020854 20 4d 41 52 | MAR | .TXT ' MAR'
00020858 20 3d 3e 5f | =>_ | .TXT ' =>_'
0002085c 20 54 41 52 | TAR | .TXT ' TAR'
00020860 20 3d 3e 5f | =>_ | .TXT ' =>_'
00020864 20 3c 3d 20 | <= | .XXX[0x4]
00020868 56 41 52 20 |VAR | .XXX[0x4]
0002086c 20 52 44 52 | RDR | .TXT ' RDR'
00020870 20 3d 3e 5f | =>_ | .TXT ' =>_'
00020874 20 57 44 52 | WDR | .TXT ' WDR'
00020878 20 3d 3e 5f | =>_ | .TXT ' =>_'
0002087c 20 20 20 51 55 45 55 45 | QUEUE| .TXT ' QUEUES '
00020886 20 20 20 50 52 49 20 20 | PRI | .TXT ' PRI HEAD TAIL '
0002089e 5f 5f 5f 5f |____ | .TXT '____'
000208a2 5f 5f |__ | .TXT '__'
000208a4 5f 20 |_ | .XXX[0x2]
000208a6 20 44 65 6c 61 79 20 51 | Delay Q| .TXT ' Delay Queue Head -_'
000208ba 20 44 69 73 6b 20 57 61 | Disk Wa| .TXT ' Disk Wait Head -_'
000208cc 20 46 41 51 | FAQ | .TXT ' FAQ'
000208d0 20 48 65 61 | Hea | .TXT ' Hea'
000208d4 64 20 2d 5f |d -_ | .TXT 'd -_'
000208d8 20 43 55 52 52 45 4e 54 | CURRENT| .TXT ' CURRENT LOAD REG -_'
000208ec 20 47 50 28 | GP( | .TXT ' GP('
000208f0 29 20 3d 3e 5f 20 |) =>_ | .TXT ') =>_ '
000208f6 20 54 4f 50 2d 20 | TOP- | .TXT ' TOP- '
000208fc 20 3d 3e 5f | =>_ | .TXT ' =>_'
00020900 20 50 46 4d 41 52 20 3d | PFMAR =| .TXT ' PFMAR =>_'
0002090a 2a 2a 2a 20 43 6f 75 6c |*** Coul| .TXT '*** Could not find tombstone file '
0002092c 41 55 54 4f |AUTO | .TXT 'AUTO'
00020930 52 31 30 30 30 5f 44 55 |R1000_DU| .TXT 'R1000_DUMP1 '
0002093c 52 31 30 30 30 5f 44 55 |R1000_DU| .TXT 'R1000_DUMP1 '
00020948 52 31 30 30 30 5f 44 55 |R1000_DU| .TXT 'R1000_DUMP2 '
00020954 52 31 30 30 30 5f 44 55 |R1000_DU| .TXT 'R1000_DUMP3 '
00020960 52 31 30 30 30 5f 44 55 |R1000_DU| .TXT 'R1000_DUMP4 '
0002096c 41 6e 61 6c 79 73 69 73 |Analysis| .TXT 'Analysis of tombstone_'
00020982 20 64 61 74 65 64 20 2d | dated -| .TXT ' dated -_ '
0002098c 20 20 32 30 | 20 | .XXX[0x4]
00020990 30 3a 20 53 59 53 54 45 |0: SYSTE| .XXX[0x130]
00020998 4d 20 45 52 52 4f 52 20 |M ERROR |
000209a0 20 20 20 20 20 20 20 20 | |
000209a8 20 20 20 20 32 30 31 3a | 201:|
000209b0 20 49 4f 50 20 48 41 52 | IOP HAR|
000209b8 44 57 41 52 45 20 45 52 |DWARE ER|
000209c0 52 4f 52 20 20 20 20 20 |ROR |
000209c8 20 20 32 30 32 3a 20 49 | 202: I|
000209d0 4f 50 20 53 4f 46 54 57 |OP SOFTW|
000209d8 41 52 45 20 45 52 52 4f |ARE ERRO|
000209e0 52 20 20 20 20 20 20 20 |R |
000209e8 32 30 33 3a 20 43 50 55 |203: CPU|
000209f0 20 48 41 52 44 57 41 52 | HARDWAR|
000209f8 45 20 45 52 52 4f 52 20 |E ERROR |
00020a00 20 20 20 20 20 20 32 30 | 20|
00020a08 34 3a 20 4d 55 4c 54 49 |4: MULTI|
00020a10 20 42 49 54 20 4d 45 4d | BIT MEM|
00020a18 4f 52 59 20 45 52 52 4f |ORY ERRO|
00020a20 52 20 20 20 32 30 35 3a |R 205:|
00020a28 20 53 59 53 42 55 53 20 | SYSBUS |
00020a30 48 41 52 44 57 41 52 45 |HARDWARE|
00020a38 20 45 52 52 4f 52 20 20 | ERROR |
00020a40 20 20 32 30 36 3a 20 43 | 206: C|
00020a48 50 55 20 4d 49 43 52 4f |PU MICRO|
00020a50 43 4f 44 45 20 45 52 52 |CODE ERR|
00020a58 4f 52 20 20 20 20 20 20 |OR |
00020a60 32 30 37 3a 20 43 50 55 |207: CPU|
00020a68 20 53 4f 46 54 57 41 52 | SOFTWAR|
00020a70 45 20 45 52 52 4f 52 20 |E ERROR |
00020a78 20 20 20 20 20 20 32 30 | 20|
00020a80 38 3a 20 53 59 53 54 45 |8: SYSTE|
00020a88 4d 20 53 48 55 54 44 4f |M SHUTDO|
00020a90 57 4e 20 20 20 20 20 20 |WN |
00020a98 20 20 20 20 32 30 39 3a | 209:|
00020aa0 20 53 4f 46 54 57 41 52 | SOFTWAR|
00020aa8 45 20 43 52 41 53 48 20 |E CRASH |
00020ab0 20 20 20 20 20 20 20 20 | |
00020ab8 44 69 73 6b 20 20 20 20 |Disk |
00020ac0 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020ad0 20 20 20 20 20 20 54 61 | Ta| .XXX[0x10]
00020ad8 70 65 20 20 20 20 20 20 |pe |
00020ae0 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020af0 20 20 20 20 4d 61 63 68 | Mach| .XXX[0x78]
00020af8 69 6e 65 20 63 72 61 73 |ine cras|
00020b00 68 2c 20 49 2f 4f 20 41 |h, I/O A|
00020b08 64 61 70 74 6f 72 20 20 |daptor |
00020b10 20 20 4d 61 63 68 69 6e | Machin|
00020b18 65 20 63 72 61 73 68 2c |e crash,|
00020b20 20 52 31 30 30 30 20 20 | R1000 |
00020b28 20 20 20 20 20 20 20 20 | |
00020b30 4d 61 63 68 69 6e 65 20 |Machine |
00020b38 63 72 61 73 68 2c 20 49 |crash, I|
00020b40 2f 4f 20 50 72 6f 63 65 |/O Proce|
00020b48 73 73 6f 72 20 20 46 52 |ssor FR|
00020b50 55 20 44 69 61 67 6e 6f |U Diagno|
00020b58 73 74 69 63 20 20 20 20 |stic |
00020b60 20 20 20 20 20 20 20 20 | |
00020b68 20 20 20 20 | | .XXX[0x4]
00020b6c 53 70 61 72 |Spar | .XXX[0x4]
00020b70 65 20 35 20 20 20 20 20 |e 5 | .XXX[0x8]
00020b78 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020b88 20 20 53 70 61 72 65 20 | Spare | .XXX[0x10]
00020b90 36 20 20 20 20 20 20 20 |6 |
00020b98 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020ba8 53 70 61 72 65 20 37 20 |Spare 7 | .XXX[0x8]
00020bb0 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020bc0 20 20 20 20 20 20 53 70 | Sp| .XXX[0x10]
00020bc8 61 72 65 20 38 20 20 20 |are 8 |
00020bd0 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020be0 20 20 20 20 53 70 61 72 | Spar| .XXX[0x10]
00020be8 65 20 39 20 20 20 20 20 |e 9 |
00020bf0 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020c00 20 20 53 70 61 72 65 20 | Spare | .XXX[0x10]
00020c08 31 30 20 20 20 20 20 20 |10 |
00020c10 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020c20 53 70 61 72 65 20 31 31 |Spare 11| .XXX[0x8]
00020c28 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020c38 20 20 20 20 20 20 | | .BLANK 20[0x6]
00020c3e 53 70 |Sp | .XXX[0x2]
00020c40 61 72 65 20 31 32 20 20 |are 12 | .XXX[0x8]
00020c48 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020c58 20 20 20 20 53 70 61 72 | Spar| .XXX[0x10]
00020c60 65 20 31 33 20 20 20 20 |e 13 |
00020c68 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020c78 20 20 53 70 61 72 65 20 | Spare | .XXX[0x10]
00020c80 31 34 20 20 20 20 20 20 |14 |
00020c88 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020c98 ; --------------------------------------------------------------------------------------
00020c98 ; OMSI PASCAL Function
00020c98 ; <LVAR 0x00c 4(r)>
00020c98 ; <LVAR 0x008 4(r)>
00020c98 ; --------------------------------------------------------------------------------------
00020c98 4e 56 ff ea |NV | LINK.W A6,#0xffea
00020c9c bf d5 | | CMPA.L (A5),A7
00020c9e 62 06 |b | BHI 0x20ca6
00020ca0 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020ca4 4e 76 |Nv | TRAPV
00020ca6 de fc 00 12 | | ADDA.W #0x12,A7
00020caa 48 e7 01 00 |H | MOVEM.L D7,-(A7)
00020cae 4a ae 00 0c |J | TST.L (A6+0xc)
00020cb2 6f 1c |o | BLE 0x20cd0
00020cb4 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7)
00020cb8 7e 01 |~ | MOVEQ.L #0x01,D7
00020cba be 97 | | CMP.L (A7),D7
00020cbc 6e 10 |n | BGT 0x20cce
00020cbe 1f 3c 00 20 | < | MOVE.B #0x20,-(A7)
00020cc2 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
00020cc8 54 4f |TO | ADDQ.L #0x2,A7
00020cca 52 87 |R | ADDQ.L #0x1,D7
00020ccc 68 ec |h | BVC 0x20cba
00020cce 58 4f |XO | ADDQ.L #0x4,A7
00020cd0 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7)
00020cd4 7e 01 |~ | MOVEQ.L #0x01,D7
00020cd6 be 97 | | CMP.L (A7),D7
00020cd8 6e 10 |n | BGT 0x20cea
00020cda 1f 3c 00 2d | < - | MOVE.B #0x2d,-(A7)
00020cde 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
00020ce4 54 4f |TO | ADDQ.L #0x2,A7
00020ce6 52 87 |R | ADDQ.L #0x1,D7
00020ce8 68 ec |h | BVC 0x20cd6
00020cea 58 4f |XO | ADDQ.L #0x4,A7
00020cec 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00020cf2 4c df 00 80 |L | MOVEM.L (A7)+,D7
00020cf6 4e 5e |N^ | UNLK A6
00020cf8 4e 75 |Nu | RTS
00020cfa ; --------------------------------------------------------------------------------------
00020cfa ; OMSI PASCAL Function
00020cfa ; --------------------------------------------------------------------------------------
00020cfa 4e 56 ff fc |NV | LINK.W A6,#0xfffc
00020cfe bf d5 | | CMPA.L (A5),A7
00020d00 62 06 |b | BHI 0x20d08
00020d02 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020d06 4e 76 |Nv | TRAPV
00020d08 de fc 00 04 | | ADDA.W #0x4,A7
00020d0c 42 39 00 02 47 ca |B9 G | CLR.B 0x247ca
00020d12 42 39 00 02 47 cb |B9 G | CLR.B 0x247cb
00020d18 42 39 00 02 47 cc |B9 G | CLR.B 0x247cc
00020d1e 42 39 00 02 47 cd |B9 G | CLR.B 0x247cd
00020d24 42 39 00 02 47 ce |B9 G | CLR.B 0x247ce
00020d2a 42 39 00 02 47 cf |B9 G | CLR.B 0x247cf
00020d30 42 39 00 02 47 d0 |B9 G | CLR.B 0x247d0
00020d36 4e 5e |N^ | UNLK A6
00020d38 4e 75 |Nu | RTS
00020d3a ; --------------------------------------------------------------------------------------
00020d3a ; OMSI PASCAL Function
00020d3a ; --------------------------------------------------------------------------------------
00020d3a 4e 56 ff f8 |NV | LINK.W A6,#0xfff8
00020d3e bf d5 | | CMPA.L (A5),A7
00020d40 62 06 |b | BHI 0x20d48
00020d42 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020d46 4e 76 |Nv | TRAPV
00020d48 de fc 00 08 | | ADDA.W #0x8,A7
00020d4c 48 e7 80 00 |H | MOVEM.L D0,-(A7)
00020d50 70 01 |p | MOVEQ.L #0x01,D0
00020d52 13 c0 00 02 47 ca | G | MOVE.B D0,0x247ca
00020d58 13 c0 00 02 47 cb | G | MOVE.B D0,0x247cb
00020d5e 13 c0 00 02 47 cc | G | MOVE.B D0,0x247cc
00020d64 13 c0 00 02 47 cd | G | MOVE.B D0,0x247cd
00020d6a 13 c0 00 02 47 ce | G | MOVE.B D0,0x247ce
00020d70 13 c0 00 02 47 cf | G | MOVE.B D0,0x247cf
00020d76 13 c0 00 02 47 d0 | G | MOVE.B D0,0x247d0
00020d7c 4c df 00 01 |L | MOVEM.L (A7)+,D0
00020d80 4e 5e |N^ | UNLK A6
00020d82 4e 75 |Nu | RTS
00020d84 ; --------------------------------------------------------------------------------------
00020d84 ; OMSI PASCAL Function
00020d84 ; <LVAR 0x008 2(r)>
00020d84 ; --------------------------------------------------------------------------------------
00020d84 4e 56 ff ea |NV | LINK.W A6,#0xffea
00020d88 bf d5 | | CMPA.L (A5),A7
00020d8a 62 06 |b | BHI 0x20d92
00020d8c 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020d90 4e 76 |Nv | TRAPV
00020d92 de fc 00 14 | | ADDA.W #0x14,A7
00020d96 48 e7 80 00 |H | MOVEM.L D0,-(A7)
00020d9a 59 4f |YO | SUBQ.L #0x4,A7
00020d9c 42 80 |B | CLR.L D0
00020d9e 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0
00020da2 2f 00 |/ | MOVE.L D0,-(A7)
00020da4 48 78 00 04 |Hx | PEA.L 0x4
00020da8 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
00020dae 50 4f |PO | ADDQ.L #0x8,A7
00020db0 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00020db6 58 4f |XO | ADDQ.L #0x4,A7
00020db8 4c df 00 01 |L | MOVEM.L (A7)+,D0
00020dbc 4e 5e |N^ | UNLK A6
00020dbe 4e 75 |Nu | RTS
00020dc0 ; --------------------------------------------------------------------------------------
00020dc0 ; OMSI PASCAL Function
00020dc0 ; <LVAR 0x008 4(r)>
00020dc0 ; --------------------------------------------------------------------------------------
00020dc0 4e 56 ff f0 |NV | LINK.W A6,#0xfff0
00020dc4 bf d5 | | CMPA.L (A5),A7
00020dc6 62 06 |b | BHI 0x20dce
00020dc8 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020dcc 4e 76 |Nv | TRAPV
00020dce de fc 00 10 | | ADDA.W #0x10,A7
00020dd2 59 4f |YO | SUBQ.L #0x4,A7
00020dd4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7)
00020dd8 48 78 00 08 |Hx | PEA.L 0x8
00020ddc 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
00020de2 50 4f |PO | ADDQ.L #0x8,A7
00020de4 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00020dea 58 4f |XO | ADDQ.L #0x4,A7
00020dec 4e 5e |N^ | UNLK A6
00020dee 4e 75 |Nu | RTS
00020df0 ; --------------------------------------------------------------------------------------
00020df0 ; OMSI PASCAL Function
00020df0 ; <LVAR 0x00e 2(r)>
00020df0 ; <LVAR 0x00c 2(r)>
00020df0 ; <LVAR 0x00a 2(r)>
00020df0 ; <LVAR 0x008 2(r)>
00020df0 ; --------------------------------------------------------------------------------------
00020df0 4e 56 ff f6 |NV | LINK.W A6,#0xfff6
00020df4 bf d5 | | CMPA.L (A5),A7
00020df6 62 06 |b | BHI 0x20dfe
00020df8 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020dfc 4e 76 |Nv | TRAPV
00020dfe de fc 00 0a | | ADDA.W #0xa,A7
00020e02 48 e7 00 80 |H | MOVEM.L A0,-(A7)
00020e06 41 fa ff 7c |A | | LEA.L 0x20d84,A0
00020e0a 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7)
00020e0e 4e 90 |N | JSR (A0)
00020e10 3e ae 00 0a |> | MOVE.W (A6+0xa),(A7)
00020e14 4e 90 |N | JSR (A0)
00020e16 3e ae 00 0c |> | MOVE.W (A6+0xc),(A7)
00020e1a 4e 90 |N | JSR (A0)
00020e1c 3e ae 00 0e |> | MOVE.W (A6+0xe),(A7)
00020e20 4e 90 |N | JSR (A0)
00020e22 54 4f |TO | ADDQ.L #0x2,A7
00020e24 4c df 01 00 |L | MOVEM.L (A7)+,A0
00020e28 4e 5e |N^ | UNLK A6
00020e2a 4e 75 |Nu | RTS
00020e2c ; --------------------------------------------------------------------------------------
00020e2c ; OMSI PASCAL Function
00020e2c ; <LVAR 0x00e 2(r)>
00020e2c ; <LVAR 0x00c 2(r)>
00020e2c ; <LVAR 0x00a 2(r)>
00020e2c ; <LVAR 0x008 2(r)>
00020e2c ; --------------------------------------------------------------------------------------
00020e2c 4e 56 ff ea |NV | LINK.W A6,#0xffea
00020e30 bf d5 | | CMPA.L (A5),A7
00020e32 62 06 |b | BHI 0x20e3a
00020e34 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020e38 4e 76 |Nv | TRAPV
00020e3a de fc 00 16 | | ADDA.W #0x16,A7
00020e3e 48 e7 00 80 |H | MOVEM.L A0,-(A7)
00020e42 41 fa ff 40 |A @ | LEA.L 0x20d84,A0
00020e46 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7)
00020e4a 4e 90 |N | JSR (A0)
00020e4c 3e ae 00 0a |> | MOVE.W (A6+0xa),(A7)
00020e50 4e 90 |N | JSR (A0)
00020e52 3e ba f2 da |> | MOVE.W 0x2012e,(A7)
00020e56 59 4f |YO | SUBQ.L #0x4,A7
00020e58 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020e5c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00020e60 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00020e64 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00020e6a 50 4f |PO | ADDQ.L #0x8,A7
00020e6c 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00020e72 58 4f |XO | ADDQ.L #0x4,A7
00020e74 3e ae 00 0c |> | MOVE.W (A6+0xc),(A7)
00020e78 4e 90 |N | JSR (A0)
00020e7a 3e ae 00 0e |> | MOVE.W (A6+0xe),(A7)
00020e7e 4e 90 |N | JSR (A0)
00020e80 54 4f |TO | ADDQ.L #0x2,A7
00020e82 4c df 01 00 |L | MOVEM.L (A7)+,A0
00020e86 4e 5e |N^ | UNLK A6
00020e88 4e 75 |Nu | RTS
00020e8a ; --------------------------------------------------------------------------------------
00020e8a ; OMSI PASCAL Function
00020e8a ; <LVAR 0x014 4(r)>
00020e8a ; <LVAR 0x010 4(r)>
00020e8a ; <LVAR 0x00c 4(r)>
00020e8a ; <LVAR 0x008 4(r)>
00020e8a ; --------------------------------------------------------------------------------------
00020e8a 4e 56 ff ee |NV | LINK.W A6,#0xffee
00020e8e bf d5 | | CMPA.L (A5),A7
00020e90 62 06 |b | BHI 0x20e98
00020e92 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020e96 4e 76 |Nv | TRAPV
00020e98 de fc 00 12 | | ADDA.W #0x12,A7
00020e9c 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7)
00020ea0 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7)
00020ea4 4e ba ff 4a |N J | JSR 0x20df0
00020ea8 5c 4f |\O | ADDQ.L #0x6,A7
00020eaa 3e ba f2 82 |> | MOVE.W 0x2012e,(A7)
00020eae 59 4f |YO | SUBQ.L #0x4,A7
00020eb0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020eb4 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00020eb8 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00020ebc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00020ec2 50 4f |PO | ADDQ.L #0x8,A7
00020ec4 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00020eca 54 4f |TO | ADDQ.L #0x2,A7
00020ecc 2e ae 00 14 |. | MOVE.L (A6+0x14),(A7)
00020ed0 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7)
00020ed4 4e ba ff 1a |N | JSR 0x20df0
00020ed8 50 4f |PO | ADDQ.L #0x8,A7
00020eda 4e 5e |N^ | UNLK A6
00020edc 4e 75 |Nu | RTS
00020ede ; --------------------------------------------------------------------------------------
00020ede ; OMSI PASCAL Function
00020ede ; --------------------------------------------------------------------------------------
00020ede 4e 56 ff 6c |NV l | LINK.W A6,#0xff6c
00020ee2 bf d5 | | CMPA.L (A5),A7
00020ee4 62 06 |b | BHI 0x20eec
00020ee6 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020eea 4e 76 |Nv | TRAPV
00020eec de fc 00 90 | | ADDA.W #0x90,A7
00020ef0 48 e7 fd f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D5+D4+D3+D2+D1+D0,-(A7)
00020ef4 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00020efa 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3
00020f00 49 fa f4 96 |I | LEA.L 0x20398,A4
00020f04 74 01 |t | MOVEQ.L #0x01,D2
00020f06 76 28 |v( | MOVEQ.L #0x28,D3
00020f08 78 2c |x, | MOVEQ.L #0x2c,D4
00020f0a 7a 1e |z | MOVEQ.L #0x1e,D5
00020f0c 3e 39 00 02 35 6c |>9 5l | MOVE.W 0x2356c,D7
00020f12 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00020f18 9e fc 00 50 | P | SUBA.W #0x50,A7
00020f1c 20 4f | O | MOVEA.L A7,A0
00020f1e 43 fa f2 16 |C | LEA.L 0x20136,A1
00020f22 70 4e |pN | MOVEQ.L #0x4e,D0
00020f24 10 d9 | | MOVE.B (A1)+,(A0)+
00020f26 51 c8 ff fc |Q | DBF D0,0x20f24
00020f2a 59 4f |YO | SUBQ.L #0x4,A7
00020f2c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020f30 3f 02 |? | MOVE.W D2,-(A7)
00020f32 3f 3c 00 4f |?< O | MOVE.W #0x4f,-(A7)
00020f36 4e 92 |N | JSR (A2)
00020f38 50 4f |PO | ADDQ.L #0x8,A7
00020f3a 4e 93 |N | JSR (A3)
00020f3c de fc 00 54 | T | ADDA.W #0x54,A7
00020f40 20 4c | L | MOVEA.L A4,A0
00020f42 70 09 |p | MOVEQ.L #0x09,D0
00020f44 2f 20 |/ | MOVE.L -(A0),-(A7)
00020f46 51 c8 ff fc |Q | DBF D0,0x20f44
00020f4a 59 4f |YO | SUBQ.L #0x4,A7
00020f4c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020f50 3f 02 |? | MOVE.W D2,-(A7)
00020f52 3f 03 |? | MOVE.W D3,-(A7)
00020f54 4e 92 |N | JSR (A2)
00020f56 50 4f |PO | ADDQ.L #0x8,A7
00020f58 4e 93 |N | JSR (A3)
00020f5a de c4 | | ADDA.W D4,A7
00020f5c 41 fa f4 12 |A | LEA.L 0x20370,A0
00020f60 70 09 |p | MOVEQ.L #0x09,D0
00020f62 2f 20 |/ | MOVE.L -(A0),-(A7)
00020f64 51 c8 ff fc |Q | DBF D0,0x20f62
00020f68 59 4f |YO | SUBQ.L #0x4,A7
00020f6a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020f6e 3f 02 |? | MOVE.W D2,-(A7)
00020f70 3f 03 |? | MOVE.W D3,-(A7)
00020f72 4e 92 |N | JSR (A2)
00020f74 50 4f |PO | ADDQ.L #0x8,A7
00020f76 4e 93 |N | JSR (A3)
00020f78 de c4 | | ADDA.W D4,A7
00020f7a 20 4c | L | MOVEA.L A4,A0
00020f7c 70 09 |p | MOVEQ.L #0x09,D0
00020f7e 2f 20 |/ | MOVE.L -(A0),-(A7)
00020f80 51 c8 ff fc |Q | DBF D0,0x20f7e
00020f84 59 4f |YO | SUBQ.L #0x4,A7
00020f86 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020f8a 3f 02 |? | MOVE.W D2,-(A7)
00020f8c 3f 03 |? | MOVE.W D3,-(A7)
00020f8e 4e 92 |N | JSR (A2)
00020f90 50 4f |PO | ADDQ.L #0x8,A7
00020f92 4e 93 |N | JSR (A3)
00020f94 de c4 | | ADDA.W D4,A7
00020f96 4a 79 00 02 35 8c |Jy 5 | TST.W 0x2358c
00020f9c 67 00 00 8e |g | BEQ 0x2102c
00020fa0 0c 47 01 ff | G | CMPI.W #0x01ff,D7
00020fa4 63 3c |c< | BLS 0x20fe2
00020fa6 0c 47 02 0a | G | CMPI.W #0x020a,D7
00020faa 64 36 |d6 | BCC 0x20fe2
00020fac 30 07 |0 | MOVE.W D7,D0
00020fae 02 40 00 ff | @ | ANDI.W #0x00ff,D0
00020fb2 41 bc 00 09 |A | CHK.W #0x9,D0
00020fb6 c0 c5 | | MULU.W D5,D0
00020fb8 42 81 |B | CLR.L D1
00020fba 32 00 |2 | MOVE.W D0,D1
00020fbc 41 fa f9 ce |A | LEA.L 0x2098c,A0
00020fc0 41 f0 18 1e |A | LEA.L (A0+D1.L+#0x1e),A0
00020fc4 70 0e |p | MOVEQ.L #0x0e,D0
00020fc6 3f 20 |? | MOVE.W -(A0),-(A7)
00020fc8 51 c8 ff fc |Q | DBF D0,0x20fc6
00020fcc 59 4f |YO | SUBQ.L #0x4,A7
00020fce 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020fd2 3f 02 |? | MOVE.W D2,-(A7)
00020fd4 3f 05 |? | MOVE.W D5,-(A7)
00020fd6 4e 92 |N | JSR (A2)
00020fd8 50 4f |PO | ADDQ.L #0x8,A7
00020fda 4e 93 |N | JSR (A3)
00020fdc de fc 00 22 | " | ADDA.W #0x22,A7
00020fe0 60 48 |`H | BRA 0x2102a
00020fe2 3f 3a f1 4a |?: J | MOVE.W 0x2012e,-(A7)
00020fe6 59 4f |YO | SUBQ.L #0x4,A7
00020fe8 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020fec 3f 02 |? | MOVE.W D2,-(A7)
00020fee 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00020ff2 4e 92 |N | JSR (A2)
00020ff4 50 4f |PO | ADDQ.L #0x8,A7
00020ff6 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00020ffc 58 4f |XO | ADDQ.L #0x4,A7
00020ffe 3e 87 |> | MOVE.W D7,(A7)
00021000 4e ba fd 82 |N | JSR 0x20d84
00021004 9e fc 00 0c | | SUBA.W #0xc,A7
00021008 20 4f | O | MOVEA.L A7,A0
0002100a 22 4c |"L | MOVEA.L A4,A1
0002100c 70 0c |p | MOVEQ.L #0x0c,D0
0002100e 10 d9 | | MOVE.B (A1)+,(A0)+
00021010 51 c8 ff fc |Q | DBF D0,0x2100e
00021014 59 4f |YO | SUBQ.L #0x4,A7
00021016 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002101a 3f 02 |? | MOVE.W D2,-(A7)
0002101c 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7)
00021020 4e 92 |N | JSR (A2)
00021022 50 4f |PO | ADDQ.L #0x8,A7
00021024 4e 93 |N | JSR (A3)
00021026 de fc 00 12 | | ADDA.W #0x12,A7
0002102a 60 28 |`( | BRA 0x21054
0002102c 9e fc 00 40 | @ | SUBA.W #0x40,A7
00021030 20 4f | O | MOVEA.L A7,A0
00021032 43 fa f3 72 |C r | LEA.L 0x203a6,A1
00021036 70 3e |p> | MOVEQ.L #0x3e,D0
00021038 10 d9 | | MOVE.B (A1)+,(A0)+
0002103a 51 c8 ff fc |Q | DBF D0,0x21038
0002103e 59 4f |YO | SUBQ.L #0x4,A7
00021040 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021044 3f 02 |? | MOVE.W D2,-(A7)
00021046 3f 3c 00 3f |?< ? | MOVE.W #0x3f,-(A7)
0002104a 4e 92 |N | JSR (A2)
0002104c 50 4f |PO | ADDQ.L #0x8,A7
0002104e 4e 93 |N | JSR (A3)
00021050 de fc 00 44 | D | ADDA.W #0x44,A7
00021054 4c df 1f bf |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D7+A0+A1+A2+A3+A4
00021058 4e 5e |N^ | UNLK A6
0002105a 4e 75 |Nu | RTS
0002105c ; --------------------------------------------------------------------------------------
0002105c ; OMSI PASCAL Function
0002105c ; --------------------------------------------------------------------------------------
0002105c 4e 56 ff 74 |NV t | LINK.W A6,#0xff74
00021060 bf d5 | | CMPA.L (A5),A7
00021062 62 06 |b | BHI 0x2106a
00021064 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021068 4e 76 |Nv | TRAPV
0002106a de fc 00 88 | | ADDA.W #0x88,A7
0002106e 48 e7 d9 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D4+D3+D1+D0,-(A7)
00021072 45 f9 00 02 47 9c |E G | LEA.L 0x2479c,A2
00021078 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
0002107e 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4
00021084 72 01 |r | MOVEQ.L #0x01,D1
00021086 9e fc 00 50 | P | SUBA.W #0x50,A7
0002108a 20 4f | O | MOVEA.L A7,A0
0002108c 43 fa f0 a8 |C | LEA.L 0x20136,A1
00021090 70 4e |pN | MOVEQ.L #0x4e,D0
00021092 10 d9 | | MOVE.B (A1)+,(A0)+
00021094 51 c8 ff fc |Q | DBF D0,0x21092
00021098 59 4f |YO | SUBQ.L #0x4,A7
0002109a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002109e 3f 01 |? | MOVE.W D1,-(A7)
000210a0 3f 3c 00 4f |?< O | MOVE.W #0x4f,-(A7)
000210a4 4e 93 |N | JSR (A3)
000210a6 50 4f |PO | ADDQ.L #0x8,A7
000210a8 4e 94 |N | JSR (A4)
000210aa de fc 00 54 | T | ADDA.W #0x54,A7
000210ae 41 fa f4 78 |A x | LEA.L 0x20528,A0
000210b2 70 0a |p | MOVEQ.L #0x0a,D0
000210b4 3f 20 |? | MOVE.W -(A0),-(A7)
000210b6 51 c8 ff fc |Q | DBF D0,0x210b4
000210ba 59 4f |YO | SUBQ.L #0x4,A7
000210bc 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000210c0 3f 01 |? | MOVE.W D1,-(A7)
000210c2 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7)
000210c6 4e 93 |N | JSR (A3)
000210c8 50 4f |PO | ADDQ.L #0x8,A7
000210ca 4e 94 |N | JSR (A4)
000210cc de fc 00 1a | | ADDA.W #0x1a,A7
000210d0 48 78 00 03 |Hx | PEA.L 0x3
000210d4 48 78 00 13 |Hx | PEA.L 0x13
000210d8 4e ba fb be |N | JSR 0x20c98
000210dc 50 4f |PO | ADDQ.L #0x8,A7
000210de 4a 79 00 02 35 70 |Jy 5p | TST.W 0x23570
000210e4 67 42 |gB | BEQ 0x21128
000210e6 7e 00 |~ | MOVEQ.L #0x00,D7
000210e8 20 12 | | MOVE.L (A2),D0
000210ea 0c 80 00 00 03 3f | ? | CMPI.L #0x0000033f,D0
000210f0 63 02 |c | BLS 0x210f4
000210f2 4e 4f |NO | TRAP #15
000210f4 41 f9 00 02 2d 2c |A -, | LEA.L 0x22d2c,A0
000210fa 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
000210fe 1f 28 17 30 | ( 0 | MOVE.B (A0+0x1730),-(A7)
00021102 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
00021108 54 4f |TO | ADDQ.L #0x2,A7
0002110a 52 92 |R | ADDQ.L #0x1,(A2)
0002110c 28 12 |( | MOVE.L (A2),D4
0002110e 26 3c 00 00 03 40 |&< @ | MOVE.L #0x340,D3
00021114 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4
0002111a 24 83 |$ | MOVE.L D3,(A2)
0002111c 52 87 |R | ADDQ.L #0x1,D7
0002111e 0c 87 00 00 03 3f | ? | CMPI.L #0x0000033f,D7
00021124 6f c2 |o | BLE 0x210e8
00021126 60 22 |`" | BRA 0x2114a
00021128 41 fa f1 c4 |A | LEA.L 0x202ee,A0
0002112c 70 07 |p | MOVEQ.L #0x07,D0
0002112e 2f 20 |/ | MOVE.L -(A0),-(A7)
00021130 51 c8 ff fc |Q | DBF D0,0x2112e
00021134 59 4f |YO | SUBQ.L #0x4,A7
00021136 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002113a 3f 01 |? | MOVE.W D1,-(A7)
0002113c 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7)
00021140 4e 93 |N | JSR (A3)
00021142 50 4f |PO | ADDQ.L #0x8,A7
00021144 4e 94 |N | JSR (A4)
00021146 de fc 00 24 | $ | ADDA.W #0x24,A7
0002114a 4c df 1f 9b |L | MOVEM.L (A7)+,D0+D1+D3+D4+D7+A0+A1+A2+A3+A4
0002114e 4e 5e |N^ | UNLK A6
00021150 4e 75 |Nu | RTS
00021152 ; --------------------------------------------------------------------------------------
00021152 ; OMSI PASCAL Function
00021152 ; --------------------------------------------------------------------------------------
00021152 4e 56 ff 7c |NV | | LINK.W A6,#0xff7c
00021156 bf d5 | | CMPA.L (A5),A7
00021158 62 06 |b | BHI 0x21160
0002115a 44 fc 00 02 |D | MOVE.W #0x2,CCR
0002115e 4e 76 |Nv | TRAPV
00021160 de fc 00 80 | | ADDA.W #0x80,A7
00021164 48 e7 e1 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D2+D1+D0,-(A7)
00021168 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
0002116e 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3
00021174 72 01 |r | MOVEQ.L #0x01,D1
00021176 74 1e |t | MOVEQ.L #0x1e,D2
00021178 10 39 00 02 35 ae | 9 5 | MOVE.B 0x235ae,D0
0002117e 48 80 |H | EXTB.W D0
00021180 41 bc 00 0f |A | CHK.W #0xf,D0
00021184 1e 00 | | MOVE.B D0,D7
00021186 9e fc 00 50 | P | SUBA.W #0x50,A7
0002118a 20 4f | O | MOVEA.L A7,A0
0002118c 43 fa ef a8 |C | LEA.L 0x20136,A1
00021190 70 4e |pN | MOVEQ.L #0x4e,D0
00021192 10 d9 | | MOVE.B (A1)+,(A0)+
00021194 51 c8 ff fc |Q | DBF D0,0x21192
00021198 59 4f |YO | SUBQ.L #0x4,A7
0002119a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002119e 3f 01 |? | MOVE.W D1,-(A7)
000211a0 3f 3c 00 4f |?< O | MOVE.W #0x4f,-(A7)
000211a4 4e 92 |N | JSR (A2)
000211a6 50 4f |PO | ADDQ.L #0x8,A7
000211a8 4e 93 |N | JSR (A3)
000211aa de fc 00 3c | < | ADDA.W #0x3c,A7
000211ae 20 4f | O | MOVEA.L A7,A0
000211b0 43 fa f5 56 |C V | LEA.L 0x20708,A1
000211b4 70 16 |p | MOVEQ.L #0x16,D0
000211b6 10 d9 | | MOVE.B (A1)+,(A0)+
000211b8 51 c8 ff fc |Q | DBF D0,0x211b6
000211bc 59 4f |YO | SUBQ.L #0x4,A7
000211be 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000211c2 3f 01 |? | MOVE.W D1,-(A7)
000211c4 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7)
000211c8 4e 92 |N | JSR (A2)
000211ca 50 4f |PO | ADDQ.L #0x8,A7
000211cc 4e 93 |N | JSR (A3)
000211ce de fc 00 1c | | ADDA.W #0x1c,A7
000211d2 48 78 00 03 |Hx | PEA.L 0x3
000211d6 48 78 00 13 |Hx | PEA.L 0x13
000211da 4e ba fa bc |N | JSR 0x20c98
000211de 50 4f |PO | ADDQ.L #0x8,A7
000211e0 10 07 | | MOVE.B D7,D0
000211e2 48 80 |H | EXTB.W D0
000211e4 c1 c2 | | MULS.W D2,D0
000211e6 41 fa f8 d0 |A | LEA.L 0x20ab8,A0
000211ea 9e c2 | | SUBA.W D2,A7
000211ec 22 4f |"O | MOVEA.L A7,A1
000211ee 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
000211f2 70 1d |p | MOVEQ.L #0x1d,D0
000211f4 12 d8 | | MOVE.B (A0)+,(A1)+
000211f6 51 c8 ff fc |Q | DBF D0,0x211f4
000211fa 59 4f |YO | SUBQ.L #0x4,A7
000211fc 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021200 3f 01 |? | MOVE.W D1,-(A7)
00021202 3f 02 |? | MOVE.W D2,-(A7)
00021204 4e 92 |N | JSR (A2)
00021206 50 4f |PO | ADDQ.L #0x8,A7
00021208 4e 93 |N | JSR (A3)
0002120a de fc 00 22 | " | ADDA.W #0x22,A7
0002120e 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00021214 4c df 0f 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1+A2+A3
00021218 4e 5e |N^ | UNLK A6
0002121a 4e 75 |Nu | RTS
0002121c ; --------------------------------------------------------------------------------------
0002121c ; OMSI PASCAL Function
0002121c ; --------------------------------------------------------------------------------------
0002121c 4e 56 ff 6c |NV l | LINK.W A6,#0xff6c
00021220 bf d5 | | CMPA.L (A5),A7
00021222 62 06 |b | BHI 0x2122a
00021224 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021228 4e 76 |Nv | TRAPV
0002122a de fc 00 8c | | ADDA.W #0x8c,A7
0002122e 48 e7 f3 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D3+D2+D1+D0,-(A7)
00021232 45 f9 00 02 2d 2c |E -, | LEA.L 0x22d2c,A2
00021238 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
0002123e 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4
00021244 22 3c 00 00 03 ff |"< | MOVE.L #0x3ff,D1
0002124a 74 01 |t | MOVEQ.L #0x01,D2
0002124c 76 1a |v | MOVEQ.L #0x1a,D3
0002124e 9e fc 00 50 | P | SUBA.W #0x50,A7
00021252 20 4f | O | MOVEA.L A7,A0
00021254 43 fa ee e0 |C | LEA.L 0x20136,A1
00021258 70 4e |pN | MOVEQ.L #0x4e,D0
0002125a 10 d9 | | MOVE.B (A1)+,(A0)+
0002125c 51 c8 ff fc |Q | DBF D0,0x2125a
00021260 59 4f |YO | SUBQ.L #0x4,A7
00021262 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021266 3f 02 |? | MOVE.W D2,-(A7)
00021268 3f 3c 00 4f |?< O | MOVE.W #0x4f,-(A7)
0002126c 4e 93 |N | JSR (A3)
0002126e 50 4f |PO | ADDQ.L #0x8,A7
00021270 4e 94 |N | JSR (A4)
00021272 de fc 00 3e | > | ADDA.W #0x3e,A7
00021276 20 4f | O | MOVEA.L A7,A0
00021278 43 fa f4 a6 |C | LEA.L 0x20720,A1
0002127c 70 14 |p | MOVEQ.L #0x14,D0
0002127e 10 d9 | | MOVE.B (A1)+,(A0)+
00021280 51 c8 ff fc |Q | DBF D0,0x2127e
00021284 59 4f |YO | SUBQ.L #0x4,A7
00021286 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002128a 3f 02 |? | MOVE.W D2,-(A7)
0002128c 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7)
00021290 4e 93 |N | JSR (A3)
00021292 50 4f |PO | ADDQ.L #0x8,A7
00021294 4e 94 |N | JSR (A4)
00021296 de c3 | | ADDA.W D3,A7
00021298 48 78 00 03 |Hx | PEA.L 0x3
0002129c 48 78 00 12 |Hx | PEA.L 0x12
000212a0 4e ba f9 f6 |N | JSR 0x20c98
000212a4 50 4f |PO | ADDQ.L #0x8,A7
000212a6 4a 79 00 02 35 70 |Jy 5p | TST.W 0x23570
000212ac 67 00 00 ca |g | BEQ 0x21378
000212b0 7c 00 || | MOVEQ.L #0x00,D6
000212b2 7e 00 |~ | MOVEQ.L #0x00,D7
000212b4 be 81 | | CMP.L D1,D7
000212b6 63 02 |c | BLS 0x212ba
000212b8 4e 4f |NO | TRAP #15
000212ba 20 4a | J | MOVEA.L A2,A0
000212bc 41 f0 78 00 |A x | LEA.L (A0+D7.L),A0
000212c0 10 28 04 14 | ( | MOVE.B (A0+0x414),D0
000212c4 0c 00 00 40 | @ | CMPI.B #0x40,D0
000212c8 66 00 00 8e |f | BNE 0x21358
000212cc 20 07 | | MOVE.L D7,D0
000212ce 52 80 |R | ADDQ.L #0x1,D0
000212d0 b0 81 | | CMP.L D1,D0
000212d2 63 02 |c | BLS 0x212d6
000212d4 4e 4f |NO | TRAP #15
000212d6 20 4a | J | MOVEA.L A2,A0
000212d8 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
000212dc 10 28 04 14 | ( | MOVE.B (A0+0x414),D0
000212e0 0c 00 00 28 | ( | CMPI.B #0x28,D0
000212e4 66 72 |fr | BNE 0x21358
000212e6 20 07 | | MOVE.L D7,D0
000212e8 54 80 |T | ADDQ.L #0x2,D0
000212ea b0 81 | | CMP.L D1,D0
000212ec 63 02 |c | BLS 0x212f0
000212ee 4e 4f |NO | TRAP #15
000212f0 20 4a | J | MOVEA.L A2,A0
000212f2 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
000212f6 10 28 04 14 | ( | MOVE.B (A0+0x414),D0
000212fa 0c 00 00 23 | # | CMPI.B #0x23,D0
000212fe 66 58 |fX | BNE 0x21358
00021300 20 07 | | MOVE.L D7,D0
00021302 56 80 |V | ADDQ.L #0x3,D0
00021304 b0 81 | | CMP.L D1,D0
00021306 63 02 |c | BLS 0x2130a
00021308 4e 4f |NO | TRAP #15
0002130a 20 4a | J | MOVEA.L A2,A0
0002130c 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00021310 10 28 04 14 | ( | MOVE.B (A0+0x414),D0
00021314 0c 00 00 29 | ) | CMPI.B #0x29,D0
00021318 66 3e |f> | BNE 0x21358
0002131a 58 87 |X | ADDQ.L #0x4,D7
0002131c be 81 | | CMP.L D1,D7
0002131e 63 02 |c | BLS 0x21322
00021320 4e 4f |NO | TRAP #15
00021322 20 4a | J | MOVEA.L A2,A0
00021324 41 f0 78 00 |A x | LEA.L (A0+D7.L),A0
00021328 1f 28 04 14 | ( | MOVE.B (A0+0x414),-(A7)
0002132c 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
00021332 54 4f |TO | ADDQ.L #0x2,A7
00021334 52 87 |R | ADDQ.L #0x1,D7
00021336 7c 00 || | MOVEQ.L #0x00,D6
00021338 be 81 | | CMP.L D1,D7
0002133a 63 02 |c | BLS 0x2133e
0002133c 4e 4f |NO | TRAP #15
0002133e 20 4a | J | MOVEA.L A2,A0
00021340 41 f0 78 00 |A x | LEA.L (A0+D7.L),A0
00021344 10 28 04 14 | ( | MOVE.B (A0+0x414),D0
00021348 0c 00 00 5c | \ | CMPI.B #0x5c,D0
0002134c 67 04 |g | BEQ 0x21352
0002134e be 81 | | CMP.L D1,D7
00021350 6d 02 |m | BLT 0x21354
00021352 52 06 |R | ADDQ.B #0x1,D6
00021354 4a 06 |J | TST.B D6
00021356 67 c4 |g | BEQ 0x2131c
00021358 52 87 |R | ADDQ.L #0x1,D7
0002135a 70 00 |p | MOVEQ.L #0x00,D0
0002135c be 81 | | CMP.L D1,D7
0002135e 6e 04 |n | BGT 0x21364
00021360 4a 06 |J | TST.B D6
00021362 67 02 |g | BEQ 0x21366
00021364 52 00 |R | ADDQ.B #0x1,D0
00021366 48 80 |H | EXTB.W D0
00021368 41 82 |A | CHK.W D2,D0
0002136a 1c 00 | | MOVE.B D0,D6
0002136c 67 00 ff 46 |g F | BEQ 0x212b4
00021370 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00021376 60 22 |`" | BRA 0x2139a
00021378 41 fa ef 74 |A t | LEA.L 0x202ee,A0
0002137c 70 07 |p | MOVEQ.L #0x07,D0
0002137e 2f 20 |/ | MOVE.L -(A0),-(A7)
00021380 51 c8 ff fc |Q | DBF D0,0x2137e
00021384 59 4f |YO | SUBQ.L #0x4,A7
00021386 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002138a 3f 02 |? | MOVE.W D2,-(A7)
0002138c 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7)
00021390 4e 93 |N | JSR (A3)
00021392 50 4f |PO | ADDQ.L #0x8,A7
00021394 4e 94 |N | JSR (A4)
00021396 de fc 00 24 | $ | ADDA.W #0x24,A7
0002139a 41 fa f3 a8 |A | LEA.L 0x20744,A0
0002139e 70 06 |p | MOVEQ.L #0x06,D0
000213a0 3f 20 |? | MOVE.W -(A0),-(A7)
000213a2 51 c8 ff fc |Q | DBF D0,0x213a0
000213a6 2f 39 00 02 35 98 |/9 5 | MOVE.L 0x23598,-(A7)
000213ac 2f 39 00 02 35 94 |/9 5 | MOVE.L 0x23594,-(A7)
000213b2 51 4f |QO | SUBQ.L #0x8,A7
000213b4 48 6f 00 10 |Ho | PEA.L (A7+0x10)
000213b8 3f 02 |? | MOVE.W D2,-(A7)
000213ba 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
000213be 4e 93 |N | JSR (A3)
000213c0 58 4f |XO | ADDQ.L #0x4,A7
000213c2 48 6f 00 0c |Ho | PEA.L (A7+0xc)
000213c6 3f 02 |? | MOVE.W D2,-(A7)
000213c8 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7)
000213cc 4e 93 |N | JSR (A3)
000213ce 50 4f |PO | ADDQ.L #0x8,A7
000213d0 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
000213d6 50 4f |PO | ADDQ.L #0x8,A7
000213d8 4e 94 |N | JSR (A4)
000213da de c3 | | ADDA.W D3,A7
000213dc 4c df 1f cf |L | MOVEM.L (A7)+,D0+D1+D2+D3+D6+D7+A0+A1+A2+A3+A4
000213e0 4e 5e |N^ | UNLK A6
000213e2 4e 75 |Nu | RTS
000213e4 ; --------------------------------------------------------------------------------------
000213e4 ; OMSI PASCAL Function
000213e4 ; <LVAR -0x004 4(rw)>
000213e4 ; --------------------------------------------------------------------------------------
000213e4 4e 56 ff 5c |NV \ | LINK.W A6,#0xff5c
000213e8 bf d5 | | CMPA.L (A5),A7
000213ea 62 06 |b | BHI 0x213f2
000213ec 44 fc 00 02 |D | MOVE.W #0x2,CCR
000213f0 4e 76 |Nv | TRAPV
000213f2 de fc 00 94 | | ADDA.W #0x94,A7
000213f6 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
000213fa 45 ee ff fc |E | LEA.L (A6-0x4),A2
000213fe 47 f9 00 02 2d 2c |G -, | LEA.L 0x22d2c,A3
00021404 49 f9 00 01 02 94 |I | LEA.L ?divs_d3_d4,A4
0002140a 72 01 |r | MOVEQ.L #0x01,D1
0002140c 24 3c 00 00 03 3f |$< ? | MOVE.L #0x33f,D2
00021412 24 bc 00 00 03 40 |$ @ | MOVE.L #0x340,(A2)
00021418 9e fc 00 50 | P | SUBA.W #0x50,A7
0002141c 20 4f | O | MOVEA.L A7,A0
0002141e 43 fa ed 16 |C | LEA.L 0x20136,A1
00021422 70 4e |pN | MOVEQ.L #0x4e,D0
00021424 10 d9 | | MOVE.B (A1)+,(A0)+
00021426 51 c8 ff fc |Q | DBF D0,0x21424
0002142a 59 4f |YO | SUBQ.L #0x4,A7
0002142c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021430 3f 01 |? | MOVE.W D1,-(A7)
00021432 3f 3c 00 4f |?< O | MOVE.W #0x4f,-(A7)
00021436 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
0002143c 50 4f |PO | ADDQ.L #0x8,A7
0002143e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021444 de fc 00 42 | B | ADDA.W #0x42,A7
00021448 20 4f | O | MOVEA.L A7,A0
0002144a 43 fa f2 f8 |C | LEA.L 0x20744,A1
0002144e 70 10 |p | MOVEQ.L #0x10,D0
00021450 10 d9 | | MOVE.B (A1)+,(A0)+
00021452 51 c8 ff fc |Q | DBF D0,0x21450
00021456 59 4f |YO | SUBQ.L #0x4,A7
00021458 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002145c 3f 01 |? | MOVE.W D1,-(A7)
0002145e 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7)
00021462 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021468 50 4f |PO | ADDQ.L #0x8,A7
0002146a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021470 de fc 00 16 | | ADDA.W #0x16,A7
00021474 48 78 00 03 |Hx | PEA.L 0x3
00021478 48 78 00 0e |Hx | PEA.L 0xe
0002147c 4e ba f8 1a |N | JSR 0x20c98
00021480 50 4f |PO | ADDQ.L #0x8,A7
00021482 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00021488 42 80 |B | CLR.L D0
0002148a 30 39 00 02 35 8e |09 5 | MOVE.W 0x2358e,D0
00021490 53 80 |S | SUBQ.L #0x1,D0
00021492 2e 00 |. | MOVE.L D0,D7
00021494 2f 12 |/ | MOVE.L (A2),-(A7)
00021496 7c 01 || | MOVEQ.L #0x01,D6
00021498 bc 97 | | CMP.L (A7),D6
0002149a 6e 26 |n& | BGT 0x214c2
0002149c be 82 | | CMP.L D2,D7
0002149e 63 02 |c | BLS 0x214a2
000214a0 4e 4f |NO | TRAP #15
000214a2 20 4b | K | MOVEA.L A3,A0
000214a4 41 f0 78 00 |A x | LEA.L (A0+D7.L),A0
000214a8 1f 28 09 02 | ( | MOVE.B (A0+0x902),-(A7)
000214ac 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
000214b2 54 4f |TO | ADDQ.L #0x2,A7
000214b4 52 87 |R | ADDQ.L #0x1,D7
000214b6 28 07 |( | MOVE.L D7,D4
000214b8 26 12 |& | MOVE.L (A2),D3
000214ba 4e 94 |N | JSR (A4)
000214bc 2e 03 |. | MOVE.L D3,D7
000214be 52 86 |R | ADDQ.L #0x1,D6
000214c0 68 d6 |h | BVC 0x21498
000214c2 58 4f |XO | ADDQ.L #0x4,A7
000214c4 30 39 00 02 35 6e |09 5n | MOVE.W 0x2356e,D0
000214ca 0c 40 00 02 | @ | CMPI.W #0x0002,D0
000214ce 63 4e |cN | BLS 0x2151e
000214d0 4a 79 00 02 35 90 |Jy 5 | TST.W 0x23590
000214d6 67 46 |gF | BEQ 0x2151e
000214d8 42 80 |B | CLR.L D0
000214da 30 39 00 02 35 90 |09 5 | MOVE.W 0x23590,D0
000214e0 d0 92 | | ADD.L (A2),D0
000214e2 90 87 | | SUB.L D7,D0
000214e4 53 80 |S | SUBQ.L #0x1,D0
000214e6 2a 00 |* | MOVE.L D0,D5
000214e8 28 05 |( | MOVE.L D5,D4
000214ea 26 12 |& | MOVE.L (A2),D3
000214ec 4e 94 |N | JSR (A4)
000214ee 2f 03 |/ | MOVE.L D3,-(A7)
000214f0 7c 01 || | MOVEQ.L #0x01,D6
000214f2 bc 97 | | CMP.L (A7),D6
000214f4 6e 26 |n& | BGT 0x2151c
000214f6 be 82 | | CMP.L D2,D7
000214f8 63 02 |c | BLS 0x214fc
000214fa 4e 4f |NO | TRAP #15
000214fc 20 4b | K | MOVEA.L A3,A0
000214fe 41 f0 78 00 |A x | LEA.L (A0+D7.L),A0
00021502 1f 28 10 b0 | ( | MOVE.B (A0+0x10b0),-(A7)
00021506 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
0002150c 54 4f |TO | ADDQ.L #0x2,A7
0002150e 52 87 |R | ADDQ.L #0x1,D7
00021510 28 07 |( | MOVE.L D7,D4
00021512 26 12 |& | MOVE.L (A2),D3
00021514 4e 94 |N | JSR (A4)
00021516 2e 03 |. | MOVE.L D3,D7
00021518 52 86 |R | ADDQ.L #0x1,D6
0002151a 68 d6 |h | BVC 0x214f2
0002151c 58 4f |XO | ADDQ.L #0x4,A7
0002151e 30 39 00 02 35 6e |09 5n | MOVE.W 0x2356e,D0
00021524 0c 40 00 02 | @ | CMPI.W #0x0002,D0
00021528 63 74 |ct | BLS 0x2159e
0002152a 4a 79 00 02 35 92 |Jy 5 | TST.W 0x23592
00021530 67 6c |gl | BEQ 0x2159e
00021532 9e fc 00 28 | ( | SUBA.W #0x28,A7
00021536 20 4f | O | MOVEA.L A7,A0
00021538 43 fa f2 1c |C | LEA.L 0x20756,A1
0002153c 70 26 |p& | MOVEQ.L #0x26,D0
0002153e 10 d9 | | MOVE.B (A1)+,(A0)+
00021540 51 c8 ff fc |Q | DBF D0,0x2153e
00021544 59 4f |YO | SUBQ.L #0x4,A7
00021546 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002154a 3f 01 |? | MOVE.W D1,-(A7)
0002154c 3f 3c 00 27 |?< ' | MOVE.W #0x27,-(A7)
00021550 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021556 50 4f |PO | ADDQ.L #0x8,A7
00021558 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
0002155e de fc 00 2c | , | ADDA.W #0x2c,A7
00021562 42 80 |B | CLR.L D0
00021564 30 39 00 02 35 92 |09 5 | MOVE.W 0x23592,D0
0002156a 53 80 |S | SUBQ.L #0x1,D0
0002156c 2e 00 |. | MOVE.L D0,D7
0002156e 2f 12 |/ | MOVE.L (A2),-(A7)
00021570 7c 01 || | MOVEQ.L #0x01,D6
00021572 bc 97 | | CMP.L (A7),D6
00021574 6e 26 |n& | BGT 0x2159c
00021576 be 82 | | CMP.L D2,D7
00021578 63 02 |c | BLS 0x2157c
0002157a 4e 4f |NO | TRAP #15
0002157c 20 4b | K | MOVEA.L A3,A0
0002157e 41 f0 78 00 |A x | LEA.L (A0+D7.L),A0
00021582 1f 28 13 f0 | ( | MOVE.B (A0+0x13f0),-(A7)
00021586 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
0002158c 54 4f |TO | ADDQ.L #0x2,A7
0002158e 52 87 |R | ADDQ.L #0x1,D7
00021590 28 07 |( | MOVE.L D7,D4
00021592 26 12 |& | MOVE.L (A2),D3
00021594 4e 94 |N | JSR (A4)
00021596 2e 03 |. | MOVE.L D3,D7
00021598 52 86 |R | ADDQ.L #0x1,D6
0002159a 68 d6 |h | BVC 0x21572
0002159c 58 4f |XO | ADDQ.L #0x4,A7
0002159e 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
000215a4 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
000215a8 4e 5e |N^ | UNLK A6
000215aa 4e 75 |Nu | RTS
000215ac ; --------------------------------------------------------------------------------------
000215ac ; OMSI PASCAL Function
000215ac ; --------------------------------------------------------------------------------------
000215ac 4e 56 ff c0 |NV | LINK.W A6,#0xffc0
000215b0 bf d5 | | CMPA.L (A5),A7
000215b2 62 06 |b | BHI 0x215ba
000215b4 44 fc 00 02 |D | MOVE.W #0x2,CCR
000215b8 4e 76 |Nv | TRAPV
000215ba de fc 00 38 | 8 | ADDA.W #0x38,A7
000215be 48 e7 db e0 |H | MOVEM.L A2+A1+A0+D7+D6+D4+D3+D1+D0,-(A7)
000215c2 45 f9 00 02 2d 2c |E -, | LEA.L 0x22d2c,A2
000215c8 72 1d |r | MOVEQ.L #0x1d,D1
000215ca 7c 01 || | MOVEQ.L #0x01,D6
000215cc 78 02 |x | MOVEQ.L #0x02,D4
000215ce 26 06 |& | MOVE.L D6,D3
000215d0 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4
000215d6 20 04 | | MOVE.L D4,D0
000215d8 53 80 |S | SUBQ.L #0x1,D0
000215da 53 80 |S | SUBQ.L #0x1,D0
000215dc b0 81 | | CMP.L D1,D0
000215de 63 02 |c | BLS 0x215e2
000215e0 4e 4f |NO | TRAP #15
000215e2 20 4a | J | MOVEA.L A2,A0
000215e4 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
000215e8 1e 28 1a 74 | ( t | MOVE.B (A0+0x1a74),D7
000215ec 20 04 | | MOVE.L D4,D0
000215ee 53 80 |S | SUBQ.L #0x1,D0
000215f0 b0 81 | | CMP.L D1,D0
000215f2 63 02 |c | BLS 0x215f6
000215f4 4e 4f |NO | TRAP #15
000215f6 22 4a |"J | MOVEA.L A2,A1
000215f8 43 f1 08 00 |C | LEA.L (A1+D0.L),A1
000215fc 11 69 1a 74 1a 74 | i t t | MOVE.B (A1+0x1a74),(A0+0x1a74)
00021602 13 47 1a 74 | G t | MOVE.B D7,(A1+0x1a74)
00021606 52 86 |R | ADDQ.L #0x1,D6
00021608 0c 86 00 00 00 0f | | CMPI.L #0x0000000f,D6
0002160e 6f bc |o | BLE 0x215cc
00021610 4c df 07 db |L | MOVEM.L (A7)+,D0+D1+D3+D4+D6+D7+A0+A1+A2
00021614 4e 5e |N^ | UNLK A6
00021616 4e 75 |Nu | RTS
00021618 ; --------------------------------------------------------------------------------------
00021618 ; OMSI PASCAL Function
00021618 ; --------------------------------------------------------------------------------------
00021618 4e 56 ff e0 |NV | LINK.W A6,#0xffe0
0002161c bf d5 | | CMPA.L (A5),A7
0002161e 62 06 |b | BHI 0x21626
00021620 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021624 4e 76 |Nv | TRAPV
00021626 de fc 00 1c | | ADDA.W #0x1c,A7
0002162a 48 e7 81 80 |H | MOVEM.L A0+D7+D0,-(A7)
0002162e 7e 01 |~ | MOVEQ.L #0x01,D7
00021630 20 07 | | MOVE.L D7,D0
00021632 53 80 |S | SUBQ.L #0x1,D0
00021634 0c 80 00 00 00 1d | | CMPI.L #0x0000001d,D0
0002163a 63 02 |c | BLS 0x2163e
0002163c 4e 4f |NO | TRAP #15
0002163e 41 f9 00 02 2d 2c |A -, | LEA.L 0x22d2c,A0
00021644 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00021648 10 28 1a 74 | ( t | MOVE.B (A0+0x1a74),D0
0002164c 0c 00 00 01 | | CMPI.B #0x01,D0
00021650 63 10 |c | BLS 0x21662
00021652 0c 00 00 ff | | CMPI.B #0xff,D0
00021656 64 0a |d | BCC 0x21662
00021658 1f 00 | | MOVE.B D0,-(A7)
0002165a 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
00021660 54 4f |TO | ADDQ.L #0x2,A7
00021662 52 87 |R | ADDQ.L #0x1,D7
00021664 0c 87 00 00 00 1e | | CMPI.L #0x0000001e,D7
0002166a 6f c4 |o | BLE 0x21630
0002166c 4c df 01 81 |L | MOVEM.L (A7)+,D0+D7+A0
00021670 4e 5e |N^ | UNLK A6
00021672 4e 75 |Nu | RTS
00021674 ; --------------------------------------------------------------------------------------
00021674 ; OMSI PASCAL Function
00021674 ; <LVAR -0x002 2(w)>
00021674 ; --------------------------------------------------------------------------------------
00021674 4e 56 ff 64 |NV d | LINK.W A6,#0xff64
00021678 bf d5 | | CMPA.L (A5),A7
0002167a 62 06 |b | BHI 0x21682
0002167c 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021680 4e 76 |Nv | TRAPV
00021682 de fc 00 94 | | ADDA.W #0x94,A7
00021686 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
0002168a 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00021690 47 f9 00 01 03 dc |G | LEA.L WriteConsoleCrLf(void),A3
00021696 49 f9 00 01 03 d8 |I | LEA.L WriteConsoleString(str : String),A4
0002169c 74 01 |t | MOVEQ.L #0x01,D2
0002169e 76 0f |v | MOVEQ.L #0x0f,D3
000216a0 78 24 |x$ | MOVEQ.L #0x24,D4
000216a2 9e fc 00 50 | P | SUBA.W #0x50,A7
000216a6 20 4f | O | MOVEA.L A7,A0
000216a8 43 fa ea 8c |C | LEA.L 0x20136,A1
000216ac 70 4e |pN | MOVEQ.L #0x4e,D0
000216ae 10 d9 | | MOVE.B (A1)+,(A0)+
000216b0 51 c8 ff fc |Q | DBF D0,0x216ae
000216b4 59 4f |YO | SUBQ.L #0x4,A7
000216b6 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000216ba 3f 02 |? | MOVE.W D2,-(A7)
000216bc 3f 3c 00 4f |?< O | MOVE.W #0x4f,-(A7)
000216c0 4e 92 |N | JSR (A2)
000216c2 50 4f |PO | ADDQ.L #0x8,A7
000216c4 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
000216ca de fc 00 54 | T | ADDA.W #0x54,A7
000216ce 41 fa f0 ce |A | LEA.L 0x2079e,A0
000216d2 70 07 |p | MOVEQ.L #0x07,D0
000216d4 2f 20 |/ | MOVE.L -(A0),-(A7)
000216d6 51 c8 ff fc |Q | DBF D0,0x216d4
000216da 59 4f |YO | SUBQ.L #0x4,A7
000216dc 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000216e0 3f 02 |? | MOVE.W D2,-(A7)
000216e2 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7)
000216e6 4e 92 |N | JSR (A2)
000216e8 50 4f |PO | ADDQ.L #0x8,A7
000216ea 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
000216f0 de c4 | | ADDA.W D4,A7
000216f2 48 78 00 03 |Hx | PEA.L 0x3
000216f6 48 78 00 1d |Hx | PEA.L 0x1d
000216fa 4e ba f5 9c |N | JSR 0x20c98
000216fe 50 4f |PO | ADDQ.L #0x8,A7
00021700 4e 93 |N | JSR (A3)
00021702 4a 79 00 02 35 8c |Jy 5 | TST.W 0x2358c
00021708 67 00 02 1e |g | BEQ 0x21928
0002170c 9e c4 | | SUBA.W D4,A7
0002170e 20 4f | O | MOVEA.L A7,A0
00021710 43 fa f0 8c |C | LEA.L 0x2079e,A1
00021714 70 22 |p" | MOVEQ.L #0x22,D0
00021716 10 d9 | | MOVE.B (A1)+,(A0)+
00021718 51 c8 ff fc |Q | DBF D0,0x21716
0002171c 59 4f |YO | SUBQ.L #0x4,A7
0002171e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021722 3f 02 |? | MOVE.W D2,-(A7)
00021724 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7)
00021728 4e 92 |N | JSR (A2)
0002172a 50 4f |PO | ADDQ.L #0x8,A7
0002172c 4e 94 |N | JSR (A4)
0002172e de fc 00 28 | ( | ADDA.W #0x28,A7
00021732 4e ba fe e4 |N | JSR 0x21618
00021736 4e 93 |N | JSR (A3)
00021738 7e 00 |~ | MOVEQ.L #0x00,D7
0002173a 0c 87 00 00 00 13 | | CMPI.L #0x00000013,D7
00021740 63 02 |c | BLS 0x21744
00021742 4e 4f |NO | TRAP #15
00021744 20 07 | | MOVE.L D7,D0
00021746 e3 80 | | ASL.L #0x1,D0
00021748 41 f9 00 02 2d 2c |A -, | LEA.L 0x22d2c,A0
0002174e 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00021752 30 3c 3f ff |0<? | MOVE.W #0x3fff,D0
00021756 c0 68 08 1a | h | AND.W (A0+0x81a),D0
0002175a 3d 40 ff fe |=@ | MOVE.W D0,(A6-0x2)
0002175e 7c 00 || | MOVEQ.L #0x00,D6
00021760 32 3c 40 00 |2<@ | MOVE.W #0x4000,D1
00021764 c2 68 08 1a | h | AND.W (A0+0x81a),D1
00021768 0c 41 40 00 | A@ | CMPI.W #0x4000,D1
0002176c 66 02 |f | BNE 0x21770
0002176e 52 06 |R | ADDQ.B #0x1,D6
00021770 7a 00 |z | MOVEQ.L #0x00,D5
00021772 32 3c 80 00 |2< | MOVE.W #0x8000,D1
00021776 c2 68 08 1a | h | AND.W (A0+0x81a),D1
0002177a 0c 41 80 00 | A | CMPI.W #0x8000,D1
0002177e 66 02 |f | BNE 0x21782
00021780 52 05 |R | ADDQ.B #0x1,D5
00021782 4a 06 |J | TST.B D6
00021784 67 12 |g | BEQ 0x21798
00021786 5d 4f |]O | SUBQ.L #0x6,A7
00021788 20 4f | O | MOVEA.L A7,A0
0002178a 43 fa f0 36 |C 6 | LEA.L 0x207c2,A1
0002178e 72 04 |r | MOVEQ.L #0x04,D1
00021790 10 d9 | | MOVE.B (A1)+,(A0)+
00021792 51 c9 ff fc |Q | DBF D1,0x21790
00021796 60 10 |` | BRA 0x217a8
00021798 5d 4f |]O | SUBQ.L #0x6,A7
0002179a 20 4f | O | MOVEA.L A7,A0
0002179c 43 fa e9 92 |C | LEA.L 0x20130,A1
000217a0 72 04 |r | MOVEQ.L #0x04,D1
000217a2 10 d9 | | MOVE.B (A1)+,(A0)+
000217a4 51 c9 ff fc |Q | DBF D1,0x217a2
000217a8 59 4f |YO | SUBQ.L #0x4,A7
000217aa 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000217ae 3f 02 |? | MOVE.W D2,-(A7)
000217b0 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7)
000217b4 4e 92 |N | JSR (A2)
000217b6 50 4f |PO | ADDQ.L #0x8,A7
000217b8 4e 94 |N | JSR (A4)
000217ba de fc 00 0a | | ADDA.W #0xa,A7
000217be 4a 05 |J | TST.B D5
000217c0 67 06 |g | BEQ 0x217c8
000217c2 3f 3a f0 04 |?: | MOVE.W 0x207c8,-(A7)
000217c6 60 04 |` | BRA 0x217cc
000217c8 3f 3a e9 64 |?: d | MOVE.W 0x2012e,-(A7)
000217cc 59 4f |YO | SUBQ.L #0x4,A7
000217ce 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000217d2 3f 02 |? | MOVE.W D2,-(A7)
000217d4 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
000217d8 4e 92 |N | JSR (A2)
000217da 50 4f |PO | ADDQ.L #0x8,A7
000217dc 4e 94 |N | JSR (A4)
000217de 5c 4f |\O | ADDQ.L #0x6,A7
000217e0 3f 00 |? | MOVE.W D0,-(A7)
000217e2 4e ba f5 a0 |N | JSR 0x20d84
000217e6 54 4f |TO | ADDQ.L #0x2,A7
000217e8 4e 93 |N | JSR (A3)
000217ea 52 87 |R | ADDQ.L #0x1,D7
000217ec 0c 87 00 00 00 13 | | CMPI.L #0x00000013,D7
000217f2 6f 00 ff 46 |o F | BLE 0x2173a
000217f6 4e 93 |N | JSR (A3)
000217f8 9e fc 00 1a | | SUBA.W #0x1a,A7
000217fc 20 4f | O | MOVEA.L A7,A0
000217fe 43 fa ef ca |C | LEA.L 0x207ca,A1
00021802 70 18 |p | MOVEQ.L #0x18,D0
00021804 10 d9 | | MOVE.B (A1)+,(A0)+
00021806 51 c8 ff fc |Q | DBF D0,0x21804
0002180a 59 4f |YO | SUBQ.L #0x4,A7
0002180c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021810 3f 02 |? | MOVE.W D2,-(A7)
00021812 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7)
00021816 4e 92 |N | JSR (A2)
00021818 50 4f |PO | ADDQ.L #0x8,A7
0002181a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021820 de fc 00 1e | | ADDA.W #0x1e,A7
00021824 7e 00 |~ | MOVEQ.L #0x00,D7
00021826 3f 3a ef c0 |?: | MOVE.W 0x207e8,-(A7)
0002182a 3f 3a ef ba |?: | MOVE.W 0x207e6,-(A7)
0002182e 3f 3a ef b4 |?: | MOVE.W 0x207e4,-(A7)
00021832 51 4f |QO | SUBQ.L #0x8,A7
00021834 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00021838 3f 02 |? | MOVE.W D2,-(A7)
0002183a 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7)
0002183e 4e 92 |N | JSR (A2)
00021840 2e 87 |. | MOVE.L D7,(A7)
00021842 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00021848 58 4f |XO | ADDQ.L #0x4,A7
0002184a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00021850 50 4f |PO | ADDQ.L #0x8,A7
00021852 4e 94 |N | JSR (A4)
00021854 5c 4f |\O | ADDQ.L #0x6,A7
00021856 1e ba ef 92 | | MOVE.B 0x207ea,(A7)
0002185a 1f 7a ef 8f 00 01 | z | MOVE.B 0x207eb,(A7+0x1)
00021860 1f 7a ef 8a 00 02 | z | MOVE.B 0x207ec,(A7+0x2)
00021866 59 4f |YO | SUBQ.L #0x4,A7
00021868 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002186c 3f 02 |? | MOVE.W D2,-(A7)
0002186e 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7)
00021872 4e 92 |N | JSR (A2)
00021874 50 4f |PO | ADDQ.L #0x8,A7
00021876 4e 94 |N | JSR (A4)
00021878 50 4f |PO | ADDQ.L #0x8,A7
0002187a be 83 | | CMP.L D3,D7
0002187c 63 02 |c | BLS 0x21880
0002187e 4e 4f |NO | TRAP #15
00021880 20 07 | | MOVE.L D7,D0
00021882 e3 80 | | ASL.L #0x1,D0
00021884 41 f9 00 02 2d 2c |A -, | LEA.L 0x22d2c,A0
0002188a 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
0002188e 3f 28 0c 52 |?( R | MOVE.W (A0+0xc52),-(A7)
00021892 4e ba f4 f0 |N | JSR 0x20d84
00021896 54 4f |TO | ADDQ.L #0x2,A7
00021898 4e 93 |N | JSR (A3)
0002189a 52 87 |R | ADDQ.L #0x1,D7
0002189c 0c 87 00 00 00 09 | | CMPI.L #0x00000009,D7
000218a2 6f 82 |o | BLE 0x21826
000218a4 7e 0a |~ | MOVEQ.L #0x0a,D7
000218a6 5d 4f |]O | SUBQ.L #0x6,A7
000218a8 20 4f | O | MOVEA.L A7,A0
000218aa 43 fa e8 84 |C | LEA.L 0x20130,A1
000218ae 70 04 |p | MOVEQ.L #0x04,D0
000218b0 10 d9 | | MOVE.B (A1)+,(A0)+
000218b2 51 c8 ff fc |Q | DBF D0,0x218b0
000218b6 51 4f |QO | SUBQ.L #0x8,A7
000218b8 48 6f 00 08 |Ho | PEA.L (A7+0x8)
000218bc 3f 02 |? | MOVE.W D2,-(A7)
000218be 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7)
000218c2 4e 92 |N | JSR (A2)
000218c4 2e 87 |. | MOVE.L D7,(A7)
000218c6 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
000218cc 58 4f |XO | ADDQ.L #0x4,A7
000218ce 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
000218d4 50 4f |PO | ADDQ.L #0x8,A7
000218d6 4e 94 |N | JSR (A4)
000218d8 5c 4f |\O | ADDQ.L #0x6,A7
000218da 1e ba ef 12 | | MOVE.B 0x207ee,(A7)
000218de 1f 7a ef 0f 00 01 | z | MOVE.B 0x207ef,(A7+0x1)
000218e4 1f 7a ef 0a 00 02 | z | MOVE.B 0x207f0,(A7+0x2)
000218ea 59 4f |YO | SUBQ.L #0x4,A7
000218ec 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000218f0 3f 02 |? | MOVE.W D2,-(A7)
000218f2 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7)
000218f6 4e 92 |N | JSR (A2)
000218f8 50 4f |PO | ADDQ.L #0x8,A7
000218fa 4e 94 |N | JSR (A4)
000218fc 50 4f |PO | ADDQ.L #0x8,A7
000218fe be 83 | | CMP.L D3,D7
00021900 63 02 |c | BLS 0x21904
00021902 4e 4f |NO | TRAP #15
00021904 20 07 | | MOVE.L D7,D0
00021906 e3 80 | | ASL.L #0x1,D0
00021908 41 f9 00 02 2d 2c |A -, | LEA.L 0x22d2c,A0
0002190e 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00021912 3f 28 0c 52 |?( R | MOVE.W (A0+0xc52),-(A7)
00021916 4e ba f4 6c |N l | JSR 0x20d84
0002191a 54 4f |TO | ADDQ.L #0x2,A7
0002191c 4e 93 |N | JSR (A3)
0002191e 52 87 |R | ADDQ.L #0x1,D7
00021920 be 83 | | CMP.L D3,D7
00021922 6f 82 |o | BLE 0x218a6
00021924 4e 93 |N | JSR (A3)
00021926 60 26 |`& | BRA 0x2194e
00021928 41 fa e9 ee |A | LEA.L 0x20318,A0
0002192c 70 14 |p | MOVEQ.L #0x14,D0
0002192e 3f 20 |? | MOVE.W -(A0),-(A7)
00021930 51 c8 ff fc |Q | DBF D0,0x2192e
00021934 59 4f |YO | SUBQ.L #0x4,A7
00021936 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002193a 3f 02 |? | MOVE.W D2,-(A7)
0002193c 3f 3c 00 2a |?< * | MOVE.W #0x2a,-(A7)
00021940 4e 92 |N | JSR (A2)
00021942 50 4f |PO | ADDQ.L #0x8,A7
00021944 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
0002194a de fc 00 2e | . | ADDA.W #0x2e,A7
0002194e 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00021952 4e 5e |N^ | UNLK A6
00021954 4e 75 |Nu | RTS
00021956 ; --------------------------------------------------------------------------------------
00021956 ; OMSI PASCAL Function
00021956 ; --------------------------------------------------------------------------------------
00021956 4e 56 ff c0 |NV | LINK.W A6,#0xffc0
0002195a bf d5 | | CMPA.L (A5),A7
0002195c 62 06 |b | BHI 0x21964
0002195e 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021962 4e 76 |Nv | TRAPV
00021964 de fc 00 3c | < | ADDA.W #0x3c,A7
00021968 48 e7 f1 80 |H | MOVEM.L A0+D7+D3+D2+D1+D0,-(A7)
0002196c 74 01 |t | MOVEQ.L #0x01,D2
0002196e 76 0f |v | MOVEQ.L #0x0f,D3
00021970 41 fa ee 94 |A | LEA.L 0x20806,A0
00021974 70 04 |p | MOVEQ.L #0x04,D0
00021976 2f 20 |/ | MOVE.L -(A0),-(A7)
00021978 51 c8 ff fc |Q | DBF D0,0x21976
0002197c 59 4f |YO | SUBQ.L #0x4,A7
0002197e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021982 3f 02 |? | MOVE.W D2,-(A7)
00021984 3f 3c 00 14 |?< | MOVE.W #0x14,-(A7)
00021988 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
0002198e 50 4f |PO | ADDQ.L #0x8,A7
00021990 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00021996 de fc 00 18 | | ADDA.W #0x18,A7
0002199a 7e 00 |~ | MOVEQ.L #0x00,D7
0002199c be 83 | | CMP.L D3,D7
0002199e 63 02 |c | BLS 0x219a2
000219a0 4e 4f |NO | TRAP #15
000219a2 41 f9 00 02 39 7c |A 9| | LEA.L 0x2397c,A0
000219a8 20 07 | | MOVE.L D7,D0
000219aa e6 98 | | ROR.L #0x3,D0
000219ac d0 c0 | | ADDA.W D0,A0
000219ae 48 40 |H@ | SWAP.W D0
000219b0 e7 58 | X | ROL.W #0x3,D0
000219b2 12 10 | | MOVE.B (A0),D1
000219b4 e1 29 | ) | LSL.B D0,D1
000219b6 ee 09 | | LSR.B #0x7,D1
000219b8 67 30 |g0 | BEQ 0x219ea
000219ba 3f 3a ee 4a |?: J | MOVE.W 0x20806,-(A7)
000219be 51 4f |QO | SUBQ.L #0x8,A7
000219c0 48 6f 00 08 |Ho | PEA.L (A7+0x8)
000219c4 3f 02 |? | MOVE.W D2,-(A7)
000219c6 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
000219ca 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
000219d0 2e 87 |. | MOVE.L D7,(A7)
000219d2 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
000219d8 58 4f |XO | ADDQ.L #0x4,A7
000219da 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
000219e0 50 4f |PO | ADDQ.L #0x8,A7
000219e2 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
000219e8 5c 4f |\O | ADDQ.L #0x6,A7
000219ea 52 87 |R | ADDQ.L #0x1,D7
000219ec be 83 | | CMP.L D3,D7
000219ee 6f ac |o | BLE 0x2199c
000219f0 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
000219f6 4c df 01 8f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D7+A0
000219fa 4e 5e |N^ | UNLK A6
000219fc 4e 75 |Nu | RTS
000219fe ; --------------------------------------------------------------------------------------
000219fe ; OMSI PASCAL Function
000219fe ; <LVAR 0x012 2(r)>
000219fe ; <LVAR 0x010 2(r)>
000219fe ; <LVAR 0x00a 2(r)>
000219fe ; <LVAR 0x008 2(r)>
000219fe ; --------------------------------------------------------------------------------------
000219fe 4e 56 ff ea |NV | LINK.W A6,#0xffea
00021a02 bf d5 | | CMPA.L (A5),A7
00021a04 62 06 |b | BHI 0x21a0c
00021a06 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021a0a 4e 76 |Nv | TRAPV
00021a0c de fc 00 16 | | ADDA.W #0x16,A7
00021a10 48 e7 00 80 |H | MOVEM.L A0,-(A7)
00021a14 41 fa f3 6e |A n | LEA.L 0x20d84,A0
00021a18 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7)
00021a1c 4e 90 |N | JSR (A0)
00021a1e 3e ae 00 0a |> | MOVE.W (A6+0xa),(A7)
00021a22 4e 90 |N | JSR (A0)
00021a24 3e ba e7 08 |> | MOVE.W 0x2012e,(A7)
00021a28 59 4f |YO | SUBQ.L #0x4,A7
00021a2a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021a2e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00021a32 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00021a36 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021a3c 50 4f |PO | ADDQ.L #0x8,A7
00021a3e 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00021a44 58 4f |XO | ADDQ.L #0x4,A7
00021a46 3e ae 00 10 |> | MOVE.W (A6+0x10),(A7)
00021a4a 4e 90 |N | JSR (A0)
00021a4c 3e ae 00 12 |> | MOVE.W (A6+0x12),(A7)
00021a50 4e 90 |N | JSR (A0)
00021a52 54 4f |TO | ADDQ.L #0x2,A7
00021a54 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00021a5a 4c df 01 00 |L | MOVEM.L (A7)+,A0
00021a5e 4e 5e |N^ | UNLK A6
00021a60 4e 75 |Nu | RTS
00021a62 ; --------------------------------------------------------------------------------------
00021a62 ; OMSI PASCAL Function
00021a62 ; --------------------------------------------------------------------------------------
00021a62 4e 56 ff 6c |NV l | LINK.W A6,#0xff6c
00021a66 bf d5 | | CMPA.L (A5),A7
00021a68 62 06 |b | BHI 0x21a70
00021a6a 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021a6e 4e 76 |Nv | TRAPV
00021a70 de fc 00 94 | | ADDA.W #0x94,A7
00021a74 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00021a78 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00021a7e 47 f9 00 01 03 dc |G | LEA.L WriteConsoleCrLf(void),A3
00021a84 49 f9 00 01 03 d8 |I | LEA.L WriteConsoleString(str : String),A4
00021a8a 72 01 |r | MOVEQ.L #0x01,D1
00021a8c 74 08 |t | MOVEQ.L #0x08,D2
00021a8e 76 0a |v | MOVEQ.L #0x0a,D3
00021a90 78 09 |x | MOVEQ.L #0x09,D4
00021a92 7a 02 |z | MOVEQ.L #0x02,D5
00021a94 7c 10 || | MOVEQ.L #0x10,D6
00021a96 7e 0c |~ | MOVEQ.L #0x0c,D7
00021a98 9e fc 00 50 | P | SUBA.W #0x50,A7
00021a9c 20 4f | O | MOVEA.L A7,A0
00021a9e 43 fa e6 96 |C | LEA.L 0x20136,A1
00021aa2 70 4e |pN | MOVEQ.L #0x4e,D0
00021aa4 10 d9 | | MOVE.B (A1)+,(A0)+
00021aa6 51 c8 ff fc |Q | DBF D0,0x21aa4
00021aaa 59 4f |YO | SUBQ.L #0x4,A7
00021aac 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021ab0 3f 01 |? | MOVE.W D1,-(A7)
00021ab2 3f 3c 00 4f |?< O | MOVE.W #0x4f,-(A7)
00021ab6 4e 92 |N | JSR (A2)
00021ab8 50 4f |PO | ADDQ.L #0x8,A7
00021aba 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021ac0 de fc 00 54 | T | ADDA.W #0x54,A7
00021ac4 41 fa ed 50 |A P | LEA.L 0x20816,A0
00021ac8 70 06 |p | MOVEQ.L #0x06,D0
00021aca 3f 20 |? | MOVE.W -(A0),-(A7)
00021acc 51 c8 ff fc |Q | DBF D0,0x21aca
00021ad0 59 4f |YO | SUBQ.L #0x4,A7
00021ad2 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021ad6 3f 01 |? | MOVE.W D1,-(A7)
00021ad8 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
00021adc 4e 92 |N | JSR (A2)
00021ade 50 4f |PO | ADDQ.L #0x8,A7
00021ae0 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021ae6 de fc 00 12 | | ADDA.W #0x12,A7
00021aea 48 78 00 03 |Hx | PEA.L 0x3
00021aee 48 78 00 0b |Hx | PEA.L 0xb
00021af2 4e ba f1 a4 |N | JSR 0x20c98
00021af6 50 4f |PO | ADDQ.L #0x8,A7
00021af8 4e 93 |N | JSR (A3)
00021afa 4a 79 00 02 35 8c |Jy 5 | TST.W 0x2358c
00021b00 67 00 02 da |g | BEQ 0x21ddc
00021b04 9e c3 | | SUBA.W D3,A7
00021b06 20 4f | O | MOVEA.L A7,A0
00021b08 43 fa ed 0c |C | LEA.L 0x20816,A1
00021b0c 70 08 |p | MOVEQ.L #0x08,D0
00021b0e 10 d9 | | MOVE.B (A1)+,(A0)+
00021b10 51 c8 ff fc |Q | DBF D0,0x21b0e
00021b14 59 4f |YO | SUBQ.L #0x4,A7
00021b16 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021b1a 3f 01 |? | MOVE.W D1,-(A7)
00021b1c 3f 04 |? | MOVE.W D4,-(A7)
00021b1e 4e 92 |N | JSR (A2)
00021b20 50 4f |PO | ADDQ.L #0x8,A7
00021b22 4e 94 |N | JSR (A4)
00021b24 de c3 | | ADDA.W D3,A7
00021b26 2e b9 00 02 39 9e |. 9 | MOVE.L 0x2399e,(A7)
00021b2c 4e ba f2 92 |N | JSR 0x20dc0
00021b30 54 4f |TO | ADDQ.L #0x2,A7
00021b32 3e ba e5 fa |> | MOVE.W 0x2012e,(A7)
00021b36 59 4f |YO | SUBQ.L #0x4,A7
00021b38 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021b3c 3f 01 |? | MOVE.W D1,-(A7)
00021b3e 3f 05 |? | MOVE.W D5,-(A7)
00021b40 4e 92 |N | JSR (A2)
00021b42 50 4f |PO | ADDQ.L #0x8,A7
00021b44 4e 94 |N | JSR (A4)
00021b46 54 4f |TO | ADDQ.L #0x2,A7
00021b48 2e b9 00 02 39 a2 |. 9 | MOVE.L 0x239a2,(A7)
00021b4e 4e ba f2 70 |N p | JSR 0x20dc0
00021b52 58 4f |XO | ADDQ.L #0x4,A7
00021b54 4e 93 |N | JSR (A3)
00021b56 9e c3 | | SUBA.W D3,A7
00021b58 20 4f | O | MOVEA.L A7,A0
00021b5a 43 fa ec c4 |C | LEA.L 0x20820,A1
00021b5e 70 08 |p | MOVEQ.L #0x08,D0
00021b60 10 d9 | | MOVE.B (A1)+,(A0)+
00021b62 51 c8 ff fc |Q | DBF D0,0x21b60
00021b66 59 4f |YO | SUBQ.L #0x4,A7
00021b68 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021b6c 3f 01 |? | MOVE.W D1,-(A7)
00021b6e 3f 04 |? | MOVE.W D4,-(A7)
00021b70 4e 92 |N | JSR (A2)
00021b72 50 4f |PO | ADDQ.L #0x8,A7
00021b74 4e 94 |N | JSR (A4)
00021b76 de c3 | | ADDA.W D3,A7
00021b78 2e b9 00 02 39 9e |. 9 | MOVE.L 0x2399e,(A7)
00021b7e 4e ba f2 40 |N @ | JSR 0x20dc0
00021b82 54 4f |TO | ADDQ.L #0x2,A7
00021b84 3e ba e5 a8 |> | MOVE.W 0x2012e,(A7)
00021b88 59 4f |YO | SUBQ.L #0x4,A7
00021b8a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021b8e 3f 01 |? | MOVE.W D1,-(A7)
00021b90 3f 05 |? | MOVE.W D5,-(A7)
00021b92 4e 92 |N | JSR (A2)
00021b94 50 4f |PO | ADDQ.L #0x8,A7
00021b96 4e 94 |N | JSR (A4)
00021b98 54 4f |TO | ADDQ.L #0x2,A7
00021b9a 2e b9 00 02 39 a6 |. 9 | MOVE.L 0x239a6,(A7)
00021ba0 4e ba f2 1e |N | JSR 0x20dc0
00021ba4 58 4f |XO | ADDQ.L #0x4,A7
00021ba6 4e 93 |N | JSR (A3)
00021ba8 9e c3 | | SUBA.W D3,A7
00021baa 20 4f | O | MOVEA.L A7,A0
00021bac 43 fa ec 7c |C | | LEA.L 0x2082a,A1
00021bb0 70 08 |p | MOVEQ.L #0x08,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 01 |? | MOVE.W D1,-(A7)
00021bc0 3f 04 |? | MOVE.W D4,-(A7)
00021bc2 4e 92 |N | JSR (A2)
00021bc4 50 4f |PO | ADDQ.L #0x8,A7
00021bc6 4e 94 |N | JSR (A4)
00021bc8 de c3 | | ADDA.W D3,A7
00021bca 2e b9 00 02 39 aa |. 9 | MOVE.L 0x239aa,(A7)
00021bd0 4e ba f1 ee |N | JSR 0x20dc0
00021bd4 58 4f |XO | ADDQ.L #0x4,A7
00021bd6 4e 93 |N | JSR (A3)
00021bd8 4e 93 |N | JSR (A3)
00021bda 2f 3a ec 5c |/: \ | MOVE.L 0x20838,-(A7)
00021bde 2f 3a ec 54 |/: T | MOVE.L 0x20834,-(A7)
00021be2 59 4f |YO | SUBQ.L #0x4,A7
00021be4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021be8 3f 01 |? | MOVE.W D1,-(A7)
00021bea 3f 02 |? | MOVE.W D2,-(A7)
00021bec 4e 92 |N | JSR (A2)
00021bee 50 4f |PO | ADDQ.L #0x8,A7
00021bf0 4e 94 |N | JSR (A4)
00021bf2 50 4f |PO | ADDQ.L #0x8,A7
00021bf4 2e b9 00 02 39 b2 |. 9 | MOVE.L 0x239b2,(A7)
00021bfa 2f 39 00 02 39 ae |/9 9 | MOVE.L 0x239ae,-(A7)
00021c00 4e ba f2 2a |N * | JSR 0x20e2c
00021c04 50 4f |PO | ADDQ.L #0x8,A7
00021c06 4e 93 |N | JSR (A3)
00021c08 2f 3a ec 36 |/: 6 | MOVE.L 0x20840,-(A7)
00021c0c 2f 3a ec 2e |/: . | MOVE.L 0x2083c,-(A7)
00021c10 59 4f |YO | SUBQ.L #0x4,A7
00021c12 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021c16 3f 01 |? | MOVE.W D1,-(A7)
00021c18 3f 02 |? | MOVE.W D2,-(A7)
00021c1a 4e 92 |N | JSR (A2)
00021c1c 50 4f |PO | ADDQ.L #0x8,A7
00021c1e 4e 94 |N | JSR (A4)
00021c20 50 4f |PO | ADDQ.L #0x8,A7
00021c22 2e b9 00 02 39 ba |. 9 | MOVE.L 0x239ba,(A7)
00021c28 2f 39 00 02 39 b6 |/9 9 | MOVE.L 0x239b6,-(A7)
00021c2e 4e ba f1 fc |N | JSR 0x20e2c
00021c32 50 4f |PO | ADDQ.L #0x8,A7
00021c34 4e 93 |N | JSR (A3)
00021c36 4e ba fd 1e |N | JSR 0x21956
00021c3a 2f 3a ec 0c |/: | MOVE.L 0x20848,-(A7)
00021c3e 2f 3a ec 04 |/: | MOVE.L 0x20844,-(A7)
00021c42 51 4f |QO | SUBQ.L #0x8,A7
00021c44 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00021c48 3f 01 |? | MOVE.W D1,-(A7)
00021c4a 3f 02 |? | MOVE.W D2,-(A7)
00021c4c 4e 92 |N | JSR (A2)
00021c4e 58 4f |XO | ADDQ.L #0x4,A7
00021c50 42 80 |B | CLR.L D0
00021c52 30 39 00 02 39 72 |09 9r | MOVE.W 0x23972,D0
00021c58 2f 00 |/ | MOVE.L D0,-(A7)
00021c5a 48 78 00 02 |Hx | PEA.L 0x2
00021c5e 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
00021c64 50 4f |PO | ADDQ.L #0x8,A7
00021c66 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00021c6c 50 4f |PO | ADDQ.L #0x8,A7
00021c6e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021c74 50 4f |PO | ADDQ.L #0x8,A7
00021c76 2e ba eb d8 |. | MOVE.L 0x20850,(A7)
00021c7a 2f 3a eb d0 |/: | MOVE.L 0x2084c,-(A7)
00021c7e 51 4f |QO | SUBQ.L #0x8,A7
00021c80 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00021c84 3f 01 |? | MOVE.W D1,-(A7)
00021c86 3f 02 |? | MOVE.W D2,-(A7)
00021c88 4e 92 |N | JSR (A2)
00021c8a 58 4f |XO | ADDQ.L #0x4,A7
00021c8c 42 80 |B | CLR.L D0
00021c8e 30 39 00 02 39 74 |09 9t | MOVE.W 0x23974,D0
00021c94 2f 00 |/ | MOVE.L D0,-(A7)
00021c96 48 78 00 02 |Hx | PEA.L 0x2
00021c9a 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
00021ca0 50 4f |PO | ADDQ.L #0x8,A7
00021ca2 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00021ca8 50 4f |PO | ADDQ.L #0x8,A7
00021caa 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021cb0 de c7 | | ADDA.W D7,A7
00021cb2 4e 93 |N | JSR (A3)
00021cb4 2f 3a eb a2 |/: | MOVE.L 0x20858,-(A7)
00021cb8 2f 3a eb 9a |/: | MOVE.L 0x20854,-(A7)
00021cbc 59 4f |YO | SUBQ.L #0x4,A7
00021cbe 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021cc2 3f 01 |? | MOVE.W D1,-(A7)
00021cc4 3f 02 |? | MOVE.W D2,-(A7)
00021cc6 4e 92 |N | JSR (A2)
00021cc8 50 4f |PO | ADDQ.L #0x8,A7
00021cca 4e 94 |N | JSR (A4)
00021ccc 50 4f |PO | ADDQ.L #0x8,A7
00021cce 2e b9 00 02 3a 5a |. :Z | MOVE.L 0x23a5a,(A7)
00021cd4 2f 39 00 02 3a 56 |/9 :V | MOVE.L 0x23a56,-(A7)
00021cda 2f 39 00 02 3a 52 |/9 :R | MOVE.L 0x23a52,-(A7)
00021ce0 2f 39 00 02 3a 4e |/9 :N | MOVE.L 0x23a4e,-(A7)
00021ce6 4e ba f1 a2 |N | JSR 0x20e8a
00021cea de c6 | | ADDA.W D6,A7
00021cec 4e 93 |N | JSR (A3)
00021cee 2f 3a eb 70 |/: p | MOVE.L 0x20860,-(A7)
00021cf2 2f 3a eb 68 |/: h | MOVE.L 0x2085c,-(A7)
00021cf6 59 4f |YO | SUBQ.L #0x4,A7
00021cf8 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021cfc 3f 01 |? | MOVE.W D1,-(A7)
00021cfe 3f 02 |? | MOVE.W D2,-(A7)
00021d00 4e 92 |N | JSR (A2)
00021d02 50 4f |PO | ADDQ.L #0x8,A7
00021d04 4e 94 |N | JSR (A4)
00021d06 50 4f |PO | ADDQ.L #0x8,A7
00021d08 2e b9 00 02 3a 62 |. :b | MOVE.L 0x23a62,(A7)
00021d0e 2f 39 00 02 3a 5e |/9 :^ | MOVE.L 0x23a5e,-(A7)
00021d14 4e ba f0 da |N | JSR 0x20df0
00021d18 5c 4f |\O | ADDQ.L #0x6,A7
00021d1a 3e ba e4 12 |> | MOVE.W 0x2012e,(A7)
00021d1e 59 4f |YO | SUBQ.L #0x4,A7
00021d20 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021d24 3f 01 |? | MOVE.W D1,-(A7)
00021d26 3f 05 |? | MOVE.W D5,-(A7)
00021d28 4e 92 |N | JSR (A2)
00021d2a 50 4f |PO | ADDQ.L #0x8,A7
00021d2c 4e 94 |N | JSR (A4)
00021d2e 54 4f |TO | ADDQ.L #0x2,A7
00021d30 2e b9 00 02 3a 6a |. :j | MOVE.L 0x23a6a,(A7)
00021d36 2f 39 00 02 3a 66 |/9 :f | MOVE.L 0x23a66,-(A7)
00021d3c 4e ba f0 b2 |N | JSR 0x20df0
00021d40 20 4f | O | MOVEA.L A7,A0
00021d42 43 fa eb 20 |C | LEA.L 0x20864,A1
00021d46 70 06 |p | MOVEQ.L #0x06,D0
00021d48 10 d9 | | MOVE.B (A1)+,(A0)+
00021d4a 51 c8 ff fc |Q | DBF D0,0x21d48
00021d4e 59 4f |YO | SUBQ.L #0x4,A7
00021d50 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021d54 3f 01 |? | MOVE.W D1,-(A7)
00021d56 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7)
00021d5a 4e 92 |N | JSR (A2)
00021d5c 50 4f |PO | ADDQ.L #0x8,A7
00021d5e 4e 94 |N | JSR (A4)
00021d60 de c7 | | ADDA.W D7,A7
00021d62 4e 93 |N | JSR (A3)
00021d64 2f 3a eb 0a |/: | MOVE.L 0x20870,-(A7)
00021d68 2f 3a eb 02 |/: | MOVE.L 0x2086c,-(A7)
00021d6c 59 4f |YO | SUBQ.L #0x4,A7
00021d6e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021d72 3f 01 |? | MOVE.W D1,-(A7)
00021d74 3f 02 |? | MOVE.W D2,-(A7)
00021d76 4e 92 |N | JSR (A2)
00021d78 50 4f |PO | ADDQ.L #0x8,A7
00021d7a 4e 94 |N | JSR (A4)
00021d7c 50 4f |PO | ADDQ.L #0x8,A7
00021d7e 2e b9 00 02 3a 8a |. : | MOVE.L 0x23a8a,(A7)
00021d84 2f 39 00 02 3a 86 |/9 : | MOVE.L 0x23a86,-(A7)
00021d8a 2f 39 00 02 3a 82 |/9 : | MOVE.L 0x23a82,-(A7)
00021d90 2f 39 00 02 3a 7e |/9 :~ | MOVE.L 0x23a7e,-(A7)
00021d96 4e ba f0 f2 |N | JSR 0x20e8a
00021d9a de c6 | | ADDA.W D6,A7
00021d9c 4e 93 |N | JSR (A3)
00021d9e 2f 3a ea d8 |/: | MOVE.L 0x20878,-(A7)
00021da2 2f 3a ea d0 |/: | MOVE.L 0x20874,-(A7)
00021da6 59 4f |YO | SUBQ.L #0x4,A7
00021da8 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021dac 3f 01 |? | MOVE.W D1,-(A7)
00021dae 3f 02 |? | MOVE.W D2,-(A7)
00021db0 4e 92 |N | JSR (A2)
00021db2 50 4f |PO | ADDQ.L #0x8,A7
00021db4 4e 94 |N | JSR (A4)
00021db6 50 4f |PO | ADDQ.L #0x8,A7
00021db8 2e b9 00 02 3a 9a |. : | MOVE.L 0x23a9a,(A7)
00021dbe 2f 39 00 02 3a 96 |/9 : | MOVE.L 0x23a96,-(A7)
00021dc4 2f 39 00 02 3a 92 |/9 : | MOVE.L 0x23a92,-(A7)
00021dca 2f 39 00 02 3a 8e |/9 : | MOVE.L 0x23a8e,-(A7)
00021dd0 4e ba f0 b8 |N | JSR 0x20e8a
00021dd4 de c6 | | ADDA.W D6,A7
00021dd6 4e 93 |N | JSR (A3)
00021dd8 4e 93 |N | JSR (A3)
00021dda 60 26 |`& | BRA 0x21e02
00021ddc 41 fa e5 3a |A : | LEA.L 0x20318,A0
00021de0 70 14 |p | MOVEQ.L #0x14,D0
00021de2 3f 20 |? | MOVE.W -(A0),-(A7)
00021de4 51 c8 ff fc |Q | DBF D0,0x21de2
00021de8 59 4f |YO | SUBQ.L #0x4,A7
00021dea 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021dee 3f 01 |? | MOVE.W D1,-(A7)
00021df0 3f 3c 00 2a |?< * | MOVE.W #0x2a,-(A7)
00021df4 4e 92 |N | JSR (A2)
00021df6 50 4f |PO | ADDQ.L #0x8,A7
00021df8 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021dfe de fc 00 2e | . | ADDA.W #0x2e,A7
00021e02 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00021e06 4e 5e |N^ | UNLK A6
00021e08 4e 75 |Nu | RTS
00021e0a ; --------------------------------------------------------------------------------------
00021e0a ; OMSI PASCAL Function
00021e0a ; --------------------------------------------------------------------------------------
00021e0a 4e 56 ff 68 |NV h | LINK.W A6,#0xff68
00021e0e bf d5 | | CMPA.L (A5),A7
00021e10 62 06 |b | BHI 0x21e18
00021e12 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021e16 4e 76 |Nv | TRAPV
00021e18 de fc 00 94 | | ADDA.W #0x94,A7
00021e1c 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00021e20 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00021e26 47 f9 00 01 03 dc |G | LEA.L WriteConsoleCrLf(void),A3
00021e2c 49 f9 00 01 03 d8 |I | LEA.L WriteConsoleString(str : String),A4
00021e32 72 01 |r | MOVEQ.L #0x01,D1
00021e34 74 14 |t | MOVEQ.L #0x14,D2
00021e36 76 0f |v | MOVEQ.L #0x0f,D3
00021e38 78 09 |x | MOVEQ.L #0x09,D4
00021e3a 7a 0e |z | MOVEQ.L #0x0e,D5
00021e3c 7c 02 || | MOVEQ.L #0x02,D6
00021e3e 9e fc 00 50 | P | SUBA.W #0x50,A7
00021e42 20 4f | O | MOVEA.L A7,A0
00021e44 43 fa e2 f0 |C | LEA.L 0x20136,A1
00021e48 70 4e |pN | MOVEQ.L #0x4e,D0
00021e4a 10 d9 | | MOVE.B (A1)+,(A0)+
00021e4c 51 c8 ff fc |Q | DBF D0,0x21e4a
00021e50 59 4f |YO | SUBQ.L #0x4,A7
00021e52 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021e56 3f 01 |? | MOVE.W D1,-(A7)
00021e58 3f 3c 00 4f |?< O | MOVE.W #0x4f,-(A7)
00021e5c 4e 92 |N | JSR (A2)
00021e5e 50 4f |PO | ADDQ.L #0x8,A7
00021e60 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021e66 de fc 00 4a | J | ADDA.W #0x4a,A7
00021e6a 20 4f | O | MOVEA.L A7,A0
00021e6c 43 fa ea 0e |C | LEA.L 0x2087c,A1
00021e70 70 08 |p | MOVEQ.L #0x08,D0
00021e72 10 d9 | | MOVE.B (A1)+,(A0)+
00021e74 51 c8 ff fc |Q | DBF D0,0x21e72
00021e78 59 4f |YO | SUBQ.L #0x4,A7
00021e7a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021e7e 3f 01 |? | MOVE.W D1,-(A7)
00021e80 3f 04 |? | MOVE.W D4,-(A7)
00021e82 4e 92 |N | JSR (A2)
00021e84 50 4f |PO | ADDQ.L #0x8,A7
00021e86 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021e8c de c5 | | ADDA.W D5,A7
00021e8e 48 78 00 03 |Hx | PEA.L 0x3
00021e92 48 78 00 06 |Hx | PEA.L 0x6
00021e96 4e ba ee 00 |N | JSR 0x20c98
00021e9a 50 4f |PO | ADDQ.L #0x8,A7
00021e9c 4e 93 |N | JSR (A3)
00021e9e 30 39 00 02 35 8c |09 5 | MOVE.W 0x2358c,D0
00021ea4 b0 41 | A | CMP.W D1,D0
00021ea6 63 00 02 04 |c | BLS 0x220ac
00021eaa 9e fc 00 18 | | SUBA.W #0x18,A7
00021eae 20 4f | O | MOVEA.L A7,A0
00021eb0 43 fa e9 d4 |C | LEA.L 0x20886,A1
00021eb4 70 16 |p | MOVEQ.L #0x16,D0
00021eb6 10 d9 | | MOVE.B (A1)+,(A0)+
00021eb8 51 c8 ff fc |Q | DBF D0,0x21eb6
00021ebc 59 4f |YO | SUBQ.L #0x4,A7
00021ebe 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021ec2 3f 01 |? | MOVE.W D1,-(A7)
00021ec4 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7)
00021ec8 4e 92 |N | JSR (A2)
00021eca 50 4f |PO | ADDQ.L #0x8,A7
00021ecc 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021ed2 de fc 00 1c | | ADDA.W #0x1c,A7
00021ed6 7e 00 |~ | MOVEQ.L #0x00,D7
00021ed8 2f 3a e9 c4 |/: | MOVE.L 0x2089e,-(A7)
00021edc 51 4f |QO | SUBQ.L #0x8,A7
00021ede 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00021ee2 3f 01 |? | MOVE.W D1,-(A7)
00021ee4 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
00021ee8 4e 92 |N | JSR (A2)
00021eea 2e 87 |. | MOVE.L D7,(A7)
00021eec 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00021ef2 58 4f |XO | ADDQ.L #0x4,A7
00021ef4 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00021efa 50 4f |PO | ADDQ.L #0x8,A7
00021efc 4e 94 |N | JSR (A4)
00021efe 5c 4f |\O | ADDQ.L #0x6,A7
00021f00 3e ba e2 2c |> , | MOVE.W 0x2012e,(A7)
00021f04 59 4f |YO | SUBQ.L #0x4,A7
00021f06 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021f0a 3f 01 |? | MOVE.W D1,-(A7)
00021f0c 3f 06 |? | MOVE.W D6,-(A7)
00021f0e 4e 92 |N | JSR (A2)
00021f10 50 4f |PO | ADDQ.L #0x8,A7
00021f12 4e 94 |N | JSR (A4)
00021f14 5c 4f |\O | ADDQ.L #0x6,A7
00021f16 be 83 | | CMP.L D3,D7
00021f18 63 02 |c | BLS 0x21f1c
00021f1a 4e 4f |NO | TRAP #15
00021f1c 20 07 | | MOVE.L D7,D0
00021f1e e9 80 | | ASL.L #0x4,D0
00021f20 41 f9 00 02 2d 2c |A -, | LEA.L 0x22d2c,A0
00021f26 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00021f2a 2f 28 0f 8c |/( | MOVE.L (A0+0xf8c),-(A7)
00021f2e 2f 28 0f 88 |/( | MOVE.L (A0+0xf88),-(A7)
00021f32 2f 28 0f 84 |/( | MOVE.L (A0+0xf84),-(A7)
00021f36 2f 28 0f 80 |/( | MOVE.L (A0+0xf80),-(A7)
00021f3a 4e ba fa c2 |N | JSR 0x219fe
00021f3e de fc 00 10 | | ADDA.W #0x10,A7
00021f42 52 87 |R | ADDQ.L #0x1,D7
00021f44 be 84 | | CMP.L D4,D7
00021f46 6f 90 |o | BLE 0x21ed8
00021f48 7e 0a |~ | MOVEQ.L #0x0a,D7
00021f4a 59 4f |YO | SUBQ.L #0x4,A7
00021f4c 1e ba e9 54 | T | MOVE.B 0x208a2,(A7)
00021f50 1f 7a e9 51 00 01 | z Q | MOVE.B 0x208a3,(A7+0x1)
00021f56 1f 7a e9 4c 00 02 | z L | MOVE.B 0x208a4,(A7+0x2)
00021f5c 51 4f |QO | SUBQ.L #0x8,A7
00021f5e 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00021f62 3f 01 |? | MOVE.W D1,-(A7)
00021f64 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7)
00021f68 4e 92 |N | JSR (A2)
00021f6a 2e 87 |. | MOVE.L D7,(A7)
00021f6c 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00021f72 58 4f |XO | ADDQ.L #0x4,A7
00021f74 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00021f7a 50 4f |PO | ADDQ.L #0x8,A7
00021f7c 4e 94 |N | JSR (A4)
00021f7e 5c 4f |\O | ADDQ.L #0x6,A7
00021f80 3e ba e1 ac |> | MOVE.W 0x2012e,(A7)
00021f84 59 4f |YO | SUBQ.L #0x4,A7
00021f86 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021f8a 3f 01 |? | MOVE.W D1,-(A7)
00021f8c 3f 06 |? | MOVE.W D6,-(A7)
00021f8e 4e 92 |N | JSR (A2)
00021f90 50 4f |PO | ADDQ.L #0x8,A7
00021f92 4e 94 |N | JSR (A4)
00021f94 5c 4f |\O | ADDQ.L #0x6,A7
00021f96 be 83 | | CMP.L D3,D7
00021f98 63 02 |c | BLS 0x21f9c
00021f9a 4e 4f |NO | TRAP #15
00021f9c 20 07 | | MOVE.L D7,D0
00021f9e e9 80 | | ASL.L #0x4,D0
00021fa0 41 f9 00 02 2d 2c |A -, | LEA.L 0x22d2c,A0
00021fa6 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00021faa 2f 28 0f 8c |/( | MOVE.L (A0+0xf8c),-(A7)
00021fae 2f 28 0f 88 |/( | MOVE.L (A0+0xf88),-(A7)
00021fb2 2f 28 0f 84 |/( | MOVE.L (A0+0xf84),-(A7)
00021fb6 2f 28 0f 80 |/( | MOVE.L (A0+0xf80),-(A7)
00021fba 4e ba fa 42 |N B | JSR 0x219fe
00021fbe de fc 00 10 | | ADDA.W #0x10,A7
00021fc2 52 87 |R | ADDQ.L #0x1,D7
00021fc4 be 83 | | CMP.L D3,D7
00021fc6 6f 82 |o | BLE 0x21f4a
00021fc8 4e 93 |N | JSR (A3)
00021fca 41 fa e8 ee |A | LEA.L 0x208ba,A0
00021fce 70 04 |p | MOVEQ.L #0x04,D0
00021fd0 2f 20 |/ | MOVE.L -(A0),-(A7)
00021fd2 51 c8 ff fc |Q | DBF D0,0x21fd0
00021fd6 59 4f |YO | SUBQ.L #0x4,A7
00021fd8 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021fdc 3f 01 |? | MOVE.W D1,-(A7)
00021fde 3f 02 |? | MOVE.W D2,-(A7)
00021fe0 4e 92 |N | JSR (A2)
00021fe2 50 4f |PO | ADDQ.L #0x8,A7
00021fe4 4e 94 |N | JSR (A4)
00021fe6 de fc 00 16 | | ADDA.W #0x16,A7
00021fea 3e b9 00 02 3d ac |> = | MOVE.W 0x23dac,(A7)
00021ff0 4e ba ed 92 |N | JSR 0x20d84
00021ff4 3e b9 00 02 3d ae |> = | MOVE.W 0x23dae,(A7)
00021ffa 4e ba ed 88 |N | JSR 0x20d84
00021ffe 54 4f |TO | ADDQ.L #0x2,A7
00022000 4e 93 |N | JSR (A3)
00022002 4e 93 |N | JSR (A3)
00022004 41 fa e8 c6 |A | LEA.L 0x208cc,A0
00022008 70 08 |p | MOVEQ.L #0x08,D0
0002200a 3f 20 |? | MOVE.W -(A0),-(A7)
0002200c 51 c8 ff fc |Q | DBF D0,0x2200a
00022010 59 4f |YO | SUBQ.L #0x4,A7
00022012 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022016 3f 01 |? | MOVE.W D1,-(A7)
00022018 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7)
0002201c 4e 92 |N | JSR (A2)
0002201e 50 4f |PO | ADDQ.L #0x8,A7
00022020 4e 94 |N | JSR (A4)
00022022 de c2 | | ADDA.W D2,A7
00022024 3e b9 00 02 3d b4 |> = | MOVE.W 0x23db4,(A7)
0002202a 4e ba ed 58 |N X | JSR 0x20d84
0002202e 3e b9 00 02 3d b6 |> = | MOVE.W 0x23db6,(A7)
00022034 4e ba ed 4e |N N | JSR 0x20d84
00022038 54 4f |TO | ADDQ.L #0x2,A7
0002203a 4e 93 |N | JSR (A3)
0002203c 4e 93 |N | JSR (A3)
0002203e 2f 3a e8 94 |/: | MOVE.L 0x208d4,-(A7)
00022042 2f 3a e8 8c |/: | MOVE.L 0x208d0,-(A7)
00022046 2f 3a e8 84 |/: | MOVE.L 0x208cc,-(A7)
0002204a 59 4f |YO | SUBQ.L #0x4,A7
0002204c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022050 3f 01 |? | MOVE.W D1,-(A7)
00022052 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7)
00022056 4e 92 |N | JSR (A2)
00022058 50 4f |PO | ADDQ.L #0x8,A7
0002205a 4e 94 |N | JSR (A4)
0002205c de c5 | | ADDA.W D5,A7
0002205e 3e b9 00 02 3d bc |> = | MOVE.W 0x23dbc,(A7)
00022064 4e ba ed 1e |N | JSR 0x20d84
00022068 3e b9 00 02 3d be |> = | MOVE.W 0x23dbe,(A7)
0002206e 4e ba ed 14 |N | JSR 0x20d84
00022072 54 4f |TO | ADDQ.L #0x2,A7
00022074 4e 93 |N | JSR (A3)
00022076 4e 93 |N | JSR (A3)
00022078 41 fa e8 72 |A r | LEA.L 0x208ec,A0
0002207c 70 04 |p | MOVEQ.L #0x04,D0
0002207e 2f 20 |/ | MOVE.L -(A0),-(A7)
00022080 51 c8 ff fc |Q | DBF D0,0x2207e
00022084 59 4f |YO | SUBQ.L #0x4,A7
00022086 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002208a 3f 01 |? | MOVE.W D1,-(A7)
0002208c 3f 02 |? | MOVE.W D2,-(A7)
0002208e 4e 92 |N | JSR (A2)
00022090 50 4f |PO | ADDQ.L #0x8,A7
00022092 4e 94 |N | JSR (A4)
00022094 de c2 | | ADDA.W D2,A7
00022096 2e b9 00 02 3d c8 |. = | MOVE.L 0x23dc8,(A7)
0002209c 2f 39 00 02 3d c4 |/9 = | MOVE.L 0x23dc4,-(A7)
000220a2 4e ba ed 4c |N L | JSR 0x20df0
000220a6 50 4f |PO | ADDQ.L #0x8,A7
000220a8 4e 93 |N | JSR (A3)
000220aa 60 26 |`& | BRA 0x220d2
000220ac 41 fa e2 9a |A | LEA.L 0x20348,A0
000220b0 70 0b |p | MOVEQ.L #0x0b,D0
000220b2 2f 20 |/ | MOVE.L -(A0),-(A7)
000220b4 51 c8 ff fc |Q | DBF D0,0x220b2
000220b8 59 4f |YO | SUBQ.L #0x4,A7
000220ba 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000220be 3f 01 |? | MOVE.W D1,-(A7)
000220c0 3f 3c 00 30 |?< 0 | MOVE.W #0x30,-(A7)
000220c4 4e 92 |N | JSR (A2)
000220c6 50 4f |PO | ADDQ.L #0x8,A7
000220c8 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
000220ce de fc 00 34 | 4 | ADDA.W #0x34,A7
000220d2 4e 93 |N | JSR (A3)
000220d4 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
000220d8 4e 5e |N^ | UNLK A6
000220da 4e 75 |Nu | RTS
000220dc ; --------------------------------------------------------------------------------------
000220dc ; OMSI PASCAL Function
000220dc ; --------------------------------------------------------------------------------------
000220dc 4e 56 ff 9a |NV | LINK.W A6,#0xff9a
000220e0 bf d5 | | CMPA.L (A5),A7
000220e2 62 06 |b | BHI 0x220ea
000220e4 44 fc 00 02 |D | MOVE.W #0x2,CCR
000220e8 4e 76 |Nv | TRAPV
000220ea de fc 00 5e | ^ | ADDA.W #0x5e,A7
000220ee 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
000220f2 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
000220f8 47 f9 00 02 2d 2c |G -, | LEA.L 0x22d2c,A3
000220fe 49 f9 00 01 03 dc |I | LEA.L WriteConsoleCrLf(void),A4
00022104 72 01 |r | MOVEQ.L #0x01,D1
00022106 74 0f |t | MOVEQ.L #0x0f,D2
00022108 76 04 |v | MOVEQ.L #0x04,D3
0002210a 78 05 |x | MOVEQ.L #0x05,D4
0002210c 7a 0c |z | MOVEQ.L #0x0c,D5
0002210e 4a 79 00 02 35 8c |Jy 5 | TST.W 0x2358c
00022114 67 00 01 1c |g | BEQ 0x22232
00022118 7c 00 || | MOVEQ.L #0x00,D6
0002211a 2f 3a e7 d0 |/: | MOVE.L 0x208ec,-(A7)
0002211e 5d 4f |]O | SUBQ.L #0x6,A7
00022120 20 4f | O | MOVEA.L A7,A0
00022122 43 fa e7 cc |C | LEA.L 0x208f0,A1
00022126 70 04 |p | MOVEQ.L #0x04,D0
00022128 10 d9 | | MOVE.B (A1)+,(A0)+
0002212a 51 c8 ff fc |Q | DBF D0,0x22128
0002212e 51 4f |QO | SUBQ.L #0x8,A7
00022130 48 6f 00 0e |Ho | PEA.L (A7+0xe)
00022134 3f 01 |? | MOVE.W D1,-(A7)
00022136 3f 03 |? | MOVE.W D3,-(A7)
00022138 4e 92 |N | JSR (A2)
0002213a 2e 86 |. | MOVE.L D6,(A7)
0002213c 48 78 00 01 |Hx | PEA.L 0x1
00022140 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
00022146 58 4f |XO | ADDQ.L #0x4,A7
00022148 48 6f 00 10 |Ho | PEA.L (A7+0x10)
0002214c 3f 01 |? | MOVE.W D1,-(A7)
0002214e 3f 04 |? | MOVE.W D4,-(A7)
00022150 4e 92 |N | JSR (A2)
00022152 50 4f |PO | ADDQ.L #0x8,A7
00022154 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String
0002215a de c5 | | ADDA.W D5,A7
0002215c 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00022162 de fc 00 0e | | ADDA.W #0xe,A7
00022166 bc 82 | | CMP.L D2,D6
00022168 63 02 |c | BLS 0x2216c
0002216a 4e 4f |NO | TRAP #15
0002216c 20 06 | | MOVE.L D6,D0
0002216e e9 80 | | ASL.L #0x4,D0
00022170 20 4b | K | MOVEA.L A3,A0
00022172 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00022176 2f 28 0d 7e |/( ~ | MOVE.L (A0+0xd7e),-(A7)
0002217a 2f 28 0d 7a |/( z | MOVE.L (A0+0xd7a),-(A7)
0002217e 2f 28 0d 76 |/( v | MOVE.L (A0+0xd76),-(A7)
00022182 2f 28 0d 72 |/( r | MOVE.L (A0+0xd72),-(A7)
00022186 4e ba ed 02 |N | JSR 0x20e8a
0002218a de fc 00 10 | | ADDA.W #0x10,A7
0002218e 4e 94 |N | JSR (A4)
00022190 52 86 |R | ADDQ.L #0x1,D6
00022192 bc 82 | | CMP.L D2,D6
00022194 6f 84 |o | BLE 0x2211a
00022196 42 80 |B | CLR.L D0
00022198 30 39 00 02 47 be |09 G | MOVE.W 0x247be,D0
0002219e 04 80 00 00 03 f0 | | SUBI.L #0x000003f0,D0
000221a4 2e 00 |. | MOVE.L D0,D7
000221a6 4e 94 |N | JSR (A4)
000221a8 7c 00 || | MOVEQ.L #0x00,D6
000221aa 5d 4f |]O | SUBQ.L #0x6,A7
000221ac 20 4f | O | MOVEA.L A7,A0
000221ae 43 fa e7 46 |C F | LEA.L 0x208f6,A1
000221b2 70 04 |p | MOVEQ.L #0x04,D0
000221b4 10 d9 | | MOVE.B (A1)+,(A0)+
000221b6 51 c8 ff fc |Q | DBF D0,0x221b4
000221ba 2f 3a e7 40 |/: @ | MOVE.L 0x208fc,-(A7)
000221be 51 4f |QO | SUBQ.L #0x8,A7
000221c0 48 6f 00 0c |Ho | PEA.L (A7+0xc)
000221c4 3f 01 |? | MOVE.W D1,-(A7)
000221c6 3f 04 |? | MOVE.W D4,-(A7)
000221c8 4e 92 |N | JSR (A2)
000221ca 2e 86 |. | MOVE.L D6,(A7)
000221cc 48 78 00 01 |Hx | PEA.L 0x1
000221d0 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
000221d6 58 4f |XO | ADDQ.L #0x4,A7
000221d8 48 6f 00 10 |Ho | PEA.L (A7+0x10)
000221dc 3f 01 |? | MOVE.W D1,-(A7)
000221de 3f 03 |? | MOVE.W D3,-(A7)
000221e0 4e 92 |N | JSR (A2)
000221e2 50 4f |PO | ADDQ.L #0x8,A7
000221e4 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String
000221ea de c5 | | ADDA.W D5,A7
000221ec 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
000221f2 de fc 00 0e | | ADDA.W #0xe,A7
000221f6 be 82 | | CMP.L D2,D7
000221f8 63 02 |c | BLS 0x221fc
000221fa 4e 4f |NO | TRAP #15
000221fc 20 07 | | MOVE.L D7,D0
000221fe e9 80 | | ASL.L #0x4,D0
00022200 20 4b | K | MOVEA.L A3,A0
00022202 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00022206 2f 28 0e 7e |/( ~ | MOVE.L (A0+0xe7e),-(A7)
0002220a 2f 28 0e 7a |/( z | MOVE.L (A0+0xe7a),-(A7)
0002220e 2f 28 0e 76 |/( v | MOVE.L (A0+0xe76),-(A7)
00022212 2f 28 0e 72 |/( r | MOVE.L (A0+0xe72),-(A7)
00022216 4e ba ec 72 |N r | JSR 0x20e8a
0002221a de fc 00 10 | | ADDA.W #0x10,A7
0002221e 4e 94 |N | JSR (A4)
00022220 4a 87 |J | TST.L D7
00022222 66 04 |f | BNE 0x22228
00022224 7e 0f |~ | MOVEQ.L #0x0f,D7
00022226 60 02 |` | BRA 0x2222a
00022228 53 87 |S | SUBQ.L #0x1,D7
0002222a 52 86 |R | ADDQ.L #0x1,D6
0002222c bc 82 | | CMP.L D2,D6
0002222e 6f 00 ff 7a |o z | BLE 0x221aa
00022232 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00022236 4e 5e |N^ | UNLK A6
00022238 4e 75 |Nu | RTS
0002223a ; --------------------------------------------------------------------------------------
0002223a ; OMSI PASCAL Function
0002223a ; --------------------------------------------------------------------------------------
0002223a 4e 56 ff b0 |NV | LINK.W A6,#0xffb0
0002223e bf d5 | | CMPA.L (A5),A7
00022240 62 06 |b | BHI 0x22248
00022242 44 fc 00 02 |D | MOVE.W #0x2,CCR
00022246 4e 76 |Nv | TRAPV
00022248 de fc 00 50 | P | ADDA.W #0x50,A7
0002224c 48 e7 e0 80 |H | MOVEM.L A0+D2+D1+D0,-(A7)
00022250 72 01 |r | MOVEQ.L #0x01,D1
00022252 74 0a |t | MOVEQ.L #0x0a,D2
00022254 30 39 00 02 35 8c |09 5 | MOVE.W 0x2358c,D0
0002225a b0 41 | A | CMP.W D1,D0
0002225c 63 54 |cT | BLS 0x222b2
0002225e 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00022264 41 fa e6 a4 |A | LEA.L 0x2090a,A0
00022268 70 04 |p | MOVEQ.L #0x04,D0
0002226a 3f 20 |? | MOVE.W -(A0),-(A7)
0002226c 51 c8 ff fc |Q | DBF D0,0x2226a
00022270 59 4f |YO | SUBQ.L #0x4,A7
00022272 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022276 3f 01 |? | MOVE.W D1,-(A7)
00022278 3f 02 |? | MOVE.W D2,-(A7)
0002227a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00022280 50 4f |PO | ADDQ.L #0x8,A7
00022282 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00022288 de c2 | | ADDA.W D2,A7
0002228a 2e b9 00 02 3d d8 |. = | MOVE.L 0x23dd8,(A7)
00022290 2f 39 00 02 3d d4 |/9 = | MOVE.L 0x23dd4,-(A7)
00022296 2f 39 00 02 3d d0 |/9 = | MOVE.L 0x23dd0,-(A7)
0002229c 2f 39 00 02 3d cc |/9 = | MOVE.L 0x23dcc,-(A7)
000222a2 4e ba eb e6 |N | JSR 0x20e8a
000222a6 de fc 00 10 | | ADDA.W #0x10,A7
000222aa 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
000222b0 60 2a |`* | BRA 0x222dc
000222b2 41 fa e0 94 |A | LEA.L 0x20348,A0
000222b6 70 0b |p | MOVEQ.L #0x0b,D0
000222b8 2f 20 |/ | MOVE.L -(A0),-(A7)
000222ba 51 c8 ff fc |Q | DBF D0,0x222b8
000222be 59 4f |YO | SUBQ.L #0x4,A7
000222c0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000222c4 3f 01 |? | MOVE.W D1,-(A7)
000222c6 3f 3c 00 30 |?< 0 | MOVE.W #0x30,-(A7)
000222ca 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
000222d0 50 4f |PO | ADDQ.L #0x8,A7
000222d2 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
000222d8 de fc 00 34 | 4 | ADDA.W #0x34,A7
000222dc 4c df 01 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0
000222e0 4e 5e |N^ | UNLK A6
000222e2 4e 75 |Nu | RTS
000222e4 ; --------------------------------------------------------------------------------------
000222e4 ; OMSI PASCAL Function
000222e4 ; <LVAR 0x00c 4(r)>
000222e4 ; <LVAR 0x008 4(r)>
000222e4 ; <LVAR -0x003 @ 1(r)>
000222e4 ; <LVAR -0x004 @>
000222e4 ; --------------------------------------------------------------------------------------
000222e4 4e 56 ff 96 |NV | LINK.W A6,#0xff96
000222e8 bf d5 | | CMPA.L (A5),A7
000222ea 62 06 |b | BHI 0x222f2
000222ec 44 fc 00 02 |D | MOVE.W #0x2,CCR
000222f0 4e 76 |Nv | TRAPV
000222f2 de fc 00 66 | f | ADDA.W #0x66,A7
000222f6 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
000222fa 45 f9 00 02 2d 38 |E -8 | LEA.L 0x22d38,A2
00022300 47 ee ff fc |G | LEA.L (A6-0x4),A3
00022304 49 f9 00 01 03 84 |I | LEA.L ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L),A4
0002230a 72 01 |r | MOVEQ.L #0x01,D1
0002230c 74 10 |t | MOVEQ.L #0x10,D2
0002230e 76 14 |v | MOVEQ.L #0x14,D3
00022310 78 02 |x | MOVEQ.L #0x02,D4
00022312 7a 60 |z` | MOVEQ.L #0x60,D5
00022314 7c 13 || | MOVEQ.L #0x13,D6
00022316 7e 22 |~" | MOVEQ.L #0x22,D7
00022318 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7)
0002231c 42 27 |B' | CLR.B -(A7)
0002231e 1f 01 | | MOVE.B D1,-(A7)
00022320 48 78 00 00 |Hx | PEA.L 0x0
00022324 48 6e ff fd |Hn | PEA.L (A6-0x3)
00022328 48 52 |HR | PEA.L (A2)
0002232a 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
00022330 de c3 | | ADDA.W D3,A7
00022332 4a 2e ff fd |J. | TST.B (A6-0x3)
00022336 67 38 |g8 | BEQ 0x22370
00022338 9e c7 | | SUBA.W D7,A7
0002233a 20 4f | O | MOVEA.L A7,A0
0002233c 43 fa e5 cc |C | LEA.L 0x2090a,A1
00022340 70 20 |p | MOVEQ.L #0x20,D0
00022342 10 d9 | | MOVE.B (A1)+,(A0)+
00022344 51 c8 ff fc |Q | DBF D0,0x22342
00022348 59 4f |YO | SUBQ.L #0x4,A7
0002234a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002234e 3f 01 |? | MOVE.W D1,-(A7)
00022350 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7)
00022354 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
0002235a 50 4f |PO | ADDQ.L #0x8,A7
0002235c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00022362 de fc 00 26 | & | ADDA.W #0x26,A7
00022366 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0
0002236a 42 10 |B | CLR.B (A0)
0002236c 60 00 02 22 |` " | BRA 0x22590
00022370 2f 12 |/ | MOVE.L (A2),-(A7)
00022372 42 67 |Bg | CLR.W -(A7)
00022374 42 67 |Bg | CLR.W -(A7)
00022376 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7)
0002237a 1f 01 | | MOVE.B D1,-(A7)
0002237c 41 f9 00 02 2d 40 |A -@ | LEA.L 0x22d40,A0
00022382 2f 08 |/ | MOVE.L A0,-(A7)
00022384 48 53 |HS | PEA.L (A3)
00022386 4e 94 |N | JSR (A4)
00022388 de c3 | | ADDA.W D3,A7
0002238a 41 f9 00 02 2d 40 |A -@ | LEA.L 0x22d40,A0
00022390 2f 08 |/ | MOVE.L A0,-(A7)
00022392 41 f9 00 02 35 6e |A 5n | LEA.L 0x2356e,A0
00022398 2f 08 |/ | MOVE.L A0,-(A7)
0002239a 3f 3c 04 00 |?< | MOVE.W #0x400,-(A7)
0002239e 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
000223a4 5c 4f |\O | ADDQ.L #0x6,A7
000223a6 2e 92 |. | MOVE.L (A2),(A7)
000223a8 3f 01 |? | MOVE.W D1,-(A7)
000223aa 42 67 |Bg | CLR.W -(A7)
000223ac 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7)
000223b0 1f 01 | | MOVE.B D1,-(A7)
000223b2 41 f9 00 02 31 40 |A 1@ | LEA.L 0x23140,A0
000223b8 2f 08 |/ | MOVE.L A0,-(A7)
000223ba 48 53 |HS | PEA.L (A3)
000223bc 4e 94 |N | JSR (A4)
000223be de c2 | | ADDA.W D2,A7
000223c0 2e 92 |. | MOVE.L (A2),(A7)
000223c2 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7)
000223c6 3f 3c 00 30 |?< 0 | MOVE.W #0x30,-(A7)
000223ca 3f 04 |? | MOVE.W D4,-(A7)
000223cc 1f 01 | | MOVE.B D1,-(A7)
000223ce 41 f9 00 02 47 9c |A G | LEA.L 0x2479c,A0
000223d4 2f 08 |/ | MOVE.L A0,-(A7)
000223d6 48 53 |HS | PEA.L (A3)
000223d8 4e 94 |N | JSR (A4)
000223da de c3 | | ADDA.W D3,A7
000223dc 04 b9 00 00 fc c0 00 02 | | SUBI.L #0x0000fcc0,0x2479c
000223e4 47 9c |G |
000223e6 2f 12 |/ | MOVE.L (A2),-(A7)
000223e8 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7)
000223ec 3f 05 |? | MOVE.W D5,-(A7)
000223ee 3f 3c 01 a0 |?< | MOVE.W #0x1a0,-(A7)
000223f2 1f 01 | | MOVE.B D1,-(A7)
000223f4 41 f9 00 02 44 5c |A D\ | LEA.L 0x2445c,A0
000223fa 2f 08 |/ | MOVE.L A0,-(A7)
000223fc 48 53 |HS | PEA.L (A3)
000223fe 4e 94 |N | JSR (A4)
00022400 de c2 | | ADDA.W D2,A7
00022402 2e 92 |. | MOVE.L (A2),(A7)
00022404 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7)
00022408 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7)
0002240c 3f 01 |? | MOVE.W D1,-(A7)
0002240e 1f 01 | | MOVE.B D1,-(A7)
00022410 41 f9 00 02 47 be |A G | LEA.L 0x247be,A0
00022416 2f 08 |/ | MOVE.L A0,-(A7)
00022418 48 53 |HS | PEA.L (A3)
0002241a 4e 94 |N | JSR (A4)
0002241c de c2 | | ADDA.W D2,A7
0002241e 2e 92 |. | MOVE.L (A2),(A7)
00022420 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
00022424 42 67 |Bg | CLR.W -(A7)
00022426 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7)
0002242a 1f 01 | | MOVE.B D1,-(A7)
0002242c 41 f9 00 02 2d 40 |A -@ | LEA.L 0x22d40,A0
00022432 2f 08 |/ | MOVE.L A0,-(A7)
00022434 48 53 |HS | PEA.L (A3)
00022436 4e 94 |N | JSR (A4)
00022438 de c3 | | ADDA.W D3,A7
0002243a 41 f9 00 02 2d 40 |A -@ | LEA.L 0x22d40,A0
00022440 2f 08 |/ | MOVE.L A0,-(A7)
00022442 41 f9 00 02 39 6e |A 9n | LEA.L 0x2396e,A0
00022448 2f 08 |/ | MOVE.L A0,-(A7)
0002244a 3f 3c 03 3d |?< = | MOVE.W #0x33d,-(A7)
0002244e 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
00022454 5c 4f |\O | ADDQ.L #0x6,A7
00022456 2e 92 |. | MOVE.L (A2),(A7)
00022458 3f 02 |? | MOVE.W D2,-(A7)
0002245a 3f 3c 01 ec |?< | MOVE.W #0x1ec,-(A7)
0002245e 3f 03 |? | MOVE.W D3,-(A7)
00022460 1f 01 | | MOVE.B D1,-(A7)
00022462 41 f9 00 02 35 46 |A 5F | LEA.L 0x23546,A0
00022468 2f 08 |/ | MOVE.L A0,-(A7)
0002246a 48 53 |HS | PEA.L (A3)
0002246c 4e 94 |N | JSR (A4)
0002246e de c2 | | ADDA.W D2,A7
00022470 2e 92 |. | MOVE.L (A2),(A7)
00022472 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7)
00022476 3f 03 |? | MOVE.W D3,-(A7)
00022478 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
0002247c 1f 01 | | MOVE.B D1,-(A7)
0002247e 41 f9 00 02 47 a0 |A G | LEA.L 0x247a0,A0
00022484 2f 08 |/ | MOVE.L A0,-(A7)
00022486 48 53 |HS | PEA.L (A3)
00022488 4e 94 |N | JSR (A4)
0002248a de c3 | | ADDA.W D3,A7
0002248c 4e ba f1 1e |N | JSR 0x215ac
00022490 2f 12 |/ | MOVE.L (A2),-(A7)
00022492 3f 06 |? | MOVE.W D6,-(A7)
00022494 3f 3c 01 00 |?< | MOVE.W #0x100,-(A7)
00022498 3f 3c 00 80 |?< | MOVE.W #0x80,-(A7)
0002249c 1f 01 | | MOVE.B D1,-(A7)
0002249e 41 f9 00 02 3c ac |A < | LEA.L 0x23cac,A0
000224a4 2f 08 |/ | MOVE.L A0,-(A7)
000224a6 48 53 |HS | PEA.L (A3)
000224a8 4e 94 |N | JSR (A4)
000224aa de c2 | | ADDA.W D2,A7
000224ac 2e 92 |. | MOVE.L (A2),(A7)
000224ae 3f 06 |? | MOVE.W D6,-(A7)
000224b0 3f 3c 01 80 |?< | MOVE.W #0x180,-(A7)
000224b4 3f 04 |? | MOVE.W D4,-(A7)
000224b6 1f 01 | | MOVE.B D1,-(A7)
000224b8 41 f9 00 02 3d bc |A = | LEA.L 0x23dbc,A0
000224be 2f 08 |/ | MOVE.L A0,-(A7)
000224c0 48 53 |HS | PEA.L (A3)
000224c2 4e 94 |N | JSR (A4)
000224c4 de c2 | | ADDA.W D2,A7
000224c6 2e 92 |. | MOVE.L (A2),(A7)
000224c8 3f 06 |? | MOVE.W D6,-(A7)
000224ca 3f 3c 01 88 |?< | MOVE.W #0x188,-(A7)
000224ce 3f 04 |? | MOVE.W D4,-(A7)
000224d0 1f 01 | | MOVE.B D1,-(A7)
000224d2 41 f9 00 02 3d b4 |A = | LEA.L 0x23db4,A0
000224d8 2f 08 |/ | MOVE.L A0,-(A7)
000224da 48 53 |HS | PEA.L (A3)
000224dc 4e 94 |N | JSR (A4)
000224de de c2 | | ADDA.W D2,A7
000224e0 2e 92 |. | MOVE.L (A2),(A7)
000224e2 3f 03 |? | MOVE.W D3,-(A7)
000224e4 3f 3c 00 54 |?< T | MOVE.W #0x54,-(A7)
000224e8 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
000224ec 1f 01 | | MOVE.B D1,-(A7)
000224ee 41 f9 00 02 3d c4 |A = | LEA.L 0x23dc4,A0
000224f4 2f 08 |/ | MOVE.L A0,-(A7)
000224f6 48 53 |HS | PEA.L (A3)
000224f8 4e 94 |N | JSR (A4)
000224fa de c2 | | ADDA.W D2,A7
000224fc 2e 92 |. | MOVE.L (A2),(A7)
000224fe 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7)
00022502 3f 3c 01 00 |?< | MOVE.W #0x100,-(A7)
00022506 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7)
0002250a 1f 01 | | MOVE.B D1,-(A7)
0002250c 41 f9 00 02 3d cc |A = | LEA.L 0x23dcc,A0
00022512 2f 08 |/ | MOVE.L A0,-(A7)
00022514 48 53 |HS | PEA.L (A3)
00022516 4e 94 |N | JSR (A4)
00022518 de c2 | | ADDA.W D2,A7
0002251a 2e 92 |. | MOVE.L (A2),(A7)
0002251c 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7)
00022520 3f 3c 01 00 |?< | MOVE.W #0x100,-(A7)
00022524 3f 04 |? | MOVE.W D4,-(A7)
00022526 1f 01 | | MOVE.B D1,-(A7)
00022528 41 f9 00 02 3d ac |A = | LEA.L 0x23dac,A0
0002252e 2f 08 |/ | MOVE.L A0,-(A7)
00022530 48 53 |HS | PEA.L (A3)
00022532 4e 94 |N | JSR (A4)
00022534 de c3 | | ADDA.W D3,A7
00022536 30 39 00 02 35 6e |09 5n | MOVE.W 0x2356e,D0
0002253c b0 44 | D | CMP.W D4,D0
0002253e 63 36 |c6 | BLS 0x22576
00022540 2f 12 |/ | MOVE.L (A2),-(A7)
00022542 3f 07 |? | MOVE.W D7,-(A7)
00022544 3f 05 |? | MOVE.W D5,-(A7)
00022546 3f 3c 01 a0 |?< | MOVE.W #0x1a0,-(A7)
0002254a 1f 01 | | MOVE.B D1,-(A7)
0002254c 41 f9 00 02 3d dc |A = | LEA.L 0x23ddc,A0
00022552 2f 08 |/ | MOVE.L A0,-(A7)
00022554 48 53 |HS | PEA.L (A3)
00022556 4e 94 |N | JSR (A4)
00022558 de c2 | | ADDA.W D2,A7
0002255a 2e 92 |. | MOVE.L (A2),(A7)
0002255c 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7)
00022560 3f 05 |? | MOVE.W D5,-(A7)
00022562 3f 3c 01 a0 |?< | MOVE.W #0x1a0,-(A7)
00022566 1f 01 | | MOVE.B D1,-(A7)
00022568 41 f9 00 02 41 1c |A A | LEA.L 0x2411c,A0
0002256e 2f 08 |/ | MOVE.L A0,-(A7)
00022570 48 53 |HS | PEA.L (A3)
00022572 4e 94 |N | JSR (A4)
00022574 de c3 | | ADDA.W D3,A7
00022576 42 27 |B' | CLR.B -(A7)
00022578 1f 01 | | MOVE.B D1,-(A7)
0002257a 48 78 00 01 |Hx | PEA.L 0x1
0002257e 48 53 |HS | PEA.L (A3)
00022580 48 52 |HR | PEA.L (A2)
00022582 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File)
00022588 de c2 | | ADDA.W D2,A7
0002258a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0
0002258e 10 81 | | MOVE.B D1,(A0)
00022590 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00022594 4e 5e |N^ | UNLK A6
00022596 4e 75 |Nu | RTS
00022598 ; --------------------------------------------------------------------------------------
00022598 ; OMSI PASCAL Function
00022598 ; --------------------------------------------------------------------------------------
00022598 START:
00022598 4f fa 00 08 |O | LEA.L MAIN,A7
0002259c 4e f9 00 01 02 80 |N | JMP ?start_program
000225a2 MAIN:
000225a2 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
000225a8 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3
000225ae 49 f9 00 01 03 dc |I | LEA.L WriteConsoleCrLf(void),A4
000225b4 74 01 |t | MOVEQ.L #0x01,D2
000225b6 76 0c |v | MOVEQ.L #0x0c,D3
000225b8 78 10 |x | MOVEQ.L #0x10,D4
000225ba 7a 04 |z | MOVEQ.L #0x04,D5
000225bc 7c 1c || | MOVEQ.L #0x1c,D6
000225be 7e 14 |~ | MOVEQ.L #0x14,D7
000225c0 4e b9 00 01 03 98 |N | JSR FSCALL_10398
000225c6 42 39 00 02 47 c8 |B9 G | CLR.B 0x247c8
000225cc 2f 3a e3 5e |/: ^ | MOVE.L 0x2092c,-(A7)
000225d0 5d 4f |]O | SUBQ.L #0x6,A7
000225d2 4e b9 00 01 03 c4 |N | JSR GetArgv() : String
000225d8 59 4f |YO | SUBQ.L #0x4,A7
000225da 48 6f 00 0a |Ho | PEA.L (A7+0xa)
000225de 3f 02 |? | MOVE.W D2,-(A7)
000225e0 3f 05 |? | MOVE.W D5,-(A7)
000225e2 4e 92 |N | JSR (A2)
000225e4 50 4f |PO | ADDQ.L #0x8,A7
000225e6 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte
000225ec 50 4f |PO | ADDQ.L #0x8,A7
000225ee 4a 1f |J | TST.B (A7)+
000225f0 67 6c |gl | BEQ 0x2265e
000225f2 4e 94 |N | JSR (A4)
000225f4 9e c3 | | SUBA.W D3,A7
000225f6 20 4f | O | MOVEA.L A7,A0
000225f8 43 fa e3 36 |C 6 | LEA.L 0x20930,A1
000225fc 70 0a |p | MOVEQ.L #0x0a,D0
000225fe 10 d9 | | MOVE.B (A1)+,(A0)+
00022600 51 c8 ff fc |Q | DBF D0,0x225fe
00022604 59 4f |YO | SUBQ.L #0x4,A7
00022606 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002260a 3f 02 |? | MOVE.W D2,-(A7)
0002260c 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7)
00022610 4e 92 |N | JSR (A2)
00022612 50 4f |PO | ADDQ.L #0x8,A7
00022614 48 79 00 02 35 40 |Hy 5@ | PEA.L 0x23540
0002261a 4e ba fc c8 |N | JSR 0x222e4
0002261e de c7 | | ADDA.W D7,A7
00022620 4a 39 00 02 35 40 |J9 5@ | TST.B 0x23540
00022626 67 30 |g0 | BEQ 0x22658
00022628 4e ba ea 32 |N 2 | JSR 0x2105c
0002262c 4e ba ed b6 |N | JSR 0x213e4
00022630 9e fc 00 50 | P | SUBA.W #0x50,A7
00022634 20 4f | O | MOVEA.L A7,A0
00022636 43 fa da fe |C | LEA.L 0x20136,A1
0002263a 70 4e |pN | MOVEQ.L #0x4e,D0
0002263c 10 d9 | | MOVE.B (A1)+,(A0)+
0002263e 51 c8 ff fc |Q | DBF D0,0x2263c
00022642 59 4f |YO | SUBQ.L #0x4,A7
00022644 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022648 3f 02 |? | MOVE.W D2,-(A7)
0002264a 3f 3c 00 4f |?< O | MOVE.W #0x4f,-(A7)
0002264e 4e 92 |N | JSR (A2)
00022650 50 4f |PO | ADDQ.L #0x8,A7
00022652 4e 93 |N | JSR (A3)
00022654 de fc 00 54 | T | ADDA.W #0x54,A7
00022658 58 4f |XO | ADDQ.L #0x4,A7
0002265a 60 00 04 b6 |` | BRA 0x22b12
0002265e 58 4f |XO | ADDQ.L #0x4,A7
00022660 4e 94 |N | JSR (A4)
00022662 2f 3a db 3a |/: : | MOVE.L 0x2019e,-(A7)
00022666 2f 3a db 32 |/: 2 | MOVE.L 0x2019a,-(A7)
0002266a 2f 3a db 2a |/: * | MOVE.L 0x20196,-(A7)
0002266e 59 4f |YO | SUBQ.L #0x4,A7
00022670 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022674 3f 02 |? | MOVE.W D2,-(A7)
00022676 3f 03 |? | MOVE.W D3,-(A7)
00022678 4e 92 |N | JSR (A2)
0002267a 50 4f |PO | ADDQ.L #0x8,A7
0002267c 4e 93 |N | JSR (A3)
0002267e 54 4f |TO | ADDQ.L #0x2,A7
00022680 20 4f | O | MOVEA.L A7,A0
00022682 43 fa db 1e |C | LEA.L 0x201a2,A1
00022686 70 0c |p | MOVEQ.L #0x0c,D0
00022688 10 d9 | | MOVE.B (A1)+,(A0)+
0002268a 51 c8 ff fc |Q | DBF D0,0x22688
0002268e 59 4f |YO | SUBQ.L #0x4,A7
00022690 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022694 3f 02 |? | MOVE.W D2,-(A7)
00022696 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7)
0002269a 4e 92 |N | JSR (A2)
0002269c 50 4f |PO | ADDQ.L #0x8,A7
0002269e 4e 93 |N | JSR (A3)
000226a0 de fc 00 12 | | ADDA.W #0x12,A7
000226a4 70 01 |p | MOVEQ.L #0x01,D0
000226a6 23 c0 00 02 2d 34 |# -4 | MOVE.L D0,0x22d34
000226ac 2f 3a db 02 |/: | MOVE.L 0x201b0,-(A7)
000226b0 9e c6 | | SUBA.W D6,A7
000226b2 20 4f | O | MOVEA.L A7,A0
000226b4 43 fa da fe |C | LEA.L 0x201b4,A1
000226b8 72 1a |r | MOVEQ.L #0x1a,D1
000226ba 10 d9 | | MOVE.B (A1)+,(A0)+
000226bc 51 c9 ff fc |Q | DBF D1,0x226ba
000226c0 51 4f |QO | SUBQ.L #0x8,A7
000226c2 48 6f 00 24 |Ho $ | PEA.L (A7+0x24)
000226c6 3f 02 |? | MOVE.W D2,-(A7)
000226c8 3f 05 |? | MOVE.W D5,-(A7)
000226ca 4e 92 |N | JSR (A2)
000226cc 2e 80 |. | MOVE.L D0,(A7)
000226ce 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
000226d4 48 6f 00 10 |Ho | PEA.L (A7+0x10)
000226d8 3f 02 |? | MOVE.W D2,-(A7)
000226da 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7)
000226de 4e 92 |N | JSR (A2)
000226e0 2e 80 |. | MOVE.L D0,(A7)
000226e2 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
000226e8 58 4f |XO | ADDQ.L #0x4,A7
000226ea 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String
000226f0 de c4 | | ADDA.W D4,A7
000226f2 4e 93 |N | JSR (A3)
000226f4 de fc 00 24 | $ | ADDA.W #0x24,A7
000226f8 52 80 |R | ADDQ.L #0x1,D0
000226fa b0 85 | | CMP.L D5,D0
000226fc 6f a8 |o | BLE 0x226a6
000226fe 4e 94 |N | JSR (A4)
00022700 9e c4 | | SUBA.W D4,A7
00022702 20 4f | O | MOVEA.L A7,A0
00022704 43 fa da 80 |C | LEA.L 0x20186,A1
00022708 70 0e |p | MOVEQ.L #0x0e,D0
0002270a 10 d9 | | MOVE.B (A1)+,(A0)+
0002270c 51 c8 ff fc |Q | DBF D0,0x2270a
00022710 51 4f |QO | SUBQ.L #0x8,A7
00022712 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00022716 3f 02 |? | MOVE.W D2,-(A7)
00022718 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
0002271c 4e 92 |N | JSR (A2)
0002271e 50 4f |PO | ADDQ.L #0x8,A7
00022720 48 78 00 00 |Hx | PEA.L 0x0
00022724 48 78 00 04 |Hx | PEA.L 0x4
00022728 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
0002272e de c3 | | ADDA.W D3,A7
00022730 23 df 00 02 47 c0 |# G | MOVE.L (A7)+,0x247c0
00022736 de c4 | | ADDA.W D4,A7
00022738 20 39 00 02 47 c0 | 9 G | MOVE.L 0x247c0,D0
0002273e b0 85 | | CMP.L D5,D0
00022740 63 02 |c | BLS 0x22744
00022742 4e 4e |NN | TRAP #14
00022744 d0 40 | @ | ADD.W D0,D0
00022746 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W
0002274e 00 0a | | .CONST 0xa ; [0x0] -> 0x22758
00022750 00 10 | | .CONST 0x10 ; [0x1] -> 0x2275e
00022752 00 22 | " | .CONST 0x22 ; [0x2] -> 0x22770
00022754 00 34 | 4 | .CONST 0x34 ; [0x3] -> 0x22782
00022756 00 46 | F | .CONST 0x46 ; [0x4] -> 0x22794
00022758 switch@0x22746[0x0]:
00022758 60 00 03 b8 |` | BRA 0x22b12
0002275c 60 62 |`b | .XXX[0x2]
0002275e switch@0x22746[0x1]:
0002275e 9e c3 | | SUBA.W D3,A7
00022760 20 4f | O | MOVEA.L A7,A0
00022762 43 fa e1 d8 |C | LEA.L 0x2093c,A1
00022766 70 0a |p | MOVEQ.L #0x0a,D0
00022768 10 d9 | | MOVE.B (A1)+,(A0)+
0002276a 51 c8 ff fc |Q | DBF D0,0x22768
0002276e 60 34 |`4 | BRA 0x227a4
00022770 switch@0x22746[0x2]:
00022770 9e c3 | | SUBA.W D3,A7
00022772 20 4f | O | MOVEA.L A7,A0
00022774 43 fa e1 d2 |C | LEA.L 0x20948,A1
00022778 70 0a |p | MOVEQ.L #0x0a,D0
0002277a 10 d9 | | MOVE.B (A1)+,(A0)+
0002277c 51 c8 ff fc |Q | DBF D0,0x2277a
00022780 60 22 |`" | BRA 0x227a4
00022782 switch@0x22746[0x3]:
00022782 9e c3 | | SUBA.W D3,A7
00022784 20 4f | O | MOVEA.L A7,A0
00022786 43 fa e1 cc |C | LEA.L 0x20954,A1
0002278a 70 0a |p | MOVEQ.L #0x0a,D0
0002278c 10 d9 | | MOVE.B (A1)+,(A0)+
0002278e 51 c8 ff fc |Q | DBF D0,0x2278c
00022792 60 10 |` | BRA 0x227a4
00022794 switch@0x22746[0x4]:
00022794 9e c3 | | SUBA.W D3,A7
00022796 20 4f | O | MOVEA.L A7,A0
00022798 43 fa e1 c6 |C | LEA.L 0x20960,A1
0002279c 70 0a |p | MOVEQ.L #0x0a,D0
0002279e 10 d9 | | MOVE.B (A1)+,(A0)+
000227a0 51 c8 ff fc |Q | DBF D0,0x2279e
000227a4 59 4f |YO | SUBQ.L #0x4,A7
000227a6 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000227aa 3f 02 |? | MOVE.W D2,-(A7)
000227ac 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7)
000227b0 4e 92 |N | JSR (A2)
000227b2 50 4f |PO | ADDQ.L #0x8,A7
000227b4 48 79 00 02 35 40 |Hy 5@ | PEA.L 0x23540
000227ba 4e ba fb 28 |N ( | JSR 0x222e4
000227be de c7 | | ADDA.W D7,A7
000227c0 4a 39 00 02 35 40 |J9 5@ | TST.B 0x23540
000227c6 66 04 |f | BNE 0x227cc
000227c8 60 00 03 3e |` > | BRA 0x22b08
000227cc 42 39 00 02 47 c9 |B9 G | CLR.B 0x247c9
000227d2 4e 94 |N | JSR (A4)
000227d4 41 fa e1 ac |A | LEA.L 0x20982,A0
000227d8 70 0a |p | MOVEQ.L #0x0a,D0
000227da 3f 20 |? | MOVE.W -(A0),-(A7)
000227dc 51 c8 ff fc |Q | DBF D0,0x227da
000227e0 9e fc 00 0a | | SUBA.W #0xa,A7
000227e4 20 4f | O | MOVEA.L A7,A0
000227e6 43 fa e1 9a |C | LEA.L 0x20982,A1
000227ea 70 08 |p | MOVEQ.L #0x08,D0
000227ec 10 d9 | | MOVE.B (A1)+,(A0)+
000227ee 51 c8 ff fc |Q | DBF D0,0x227ec
000227f2 51 4f |QO | SUBQ.L #0x8,A7
000227f4 48 6f 00 12 |Ho | PEA.L (A7+0x12)
000227f8 3f 02 |? | MOVE.W D2,-(A7)
000227fa 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7)
000227fe 4e 92 |N | JSR (A2)
00022800 2e b9 00 02 47 c0 |. G | MOVE.L 0x247c0,(A7)
00022806 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
0002280c 48 6f 00 10 |Ho | PEA.L (A7+0x10)
00022810 3f 02 |? | MOVE.W D2,-(A7)
00022812 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7)
00022816 4e 92 |N | JSR (A2)
00022818 50 4f |PO | ADDQ.L #0x8,A7
0002281a 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String
00022820 de c3 | | ADDA.W D3,A7
00022822 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00022828 de fc 00 24 | $ | ADDA.W #0x24,A7
0002282c 70 01 |p | MOVEQ.L #0x01,D0
0002282e 23 c0 00 02 2d 34 |# -4 | MOVE.L D0,0x22d34
00022834 22 00 |" | MOVE.L D0,D1
00022836 53 81 |S | SUBQ.L #0x1,D1
00022838 0c 81 00 00 00 11 | | CMPI.L #0x00000011,D1
0002283e 63 02 |c | BLS 0x22842
00022840 4e 4f |NO | TRAP #15
00022842 41 f9 00 02 2d 2c |A -, | LEA.L 0x22d2c,A0
00022848 41 f0 18 00 |A | LEA.L (A0+D1.L),A0
0002284c 1f 28 08 4e | ( N | MOVE.B (A0+0x84e),-(A7)
00022850 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
00022856 54 4f |TO | ADDQ.L #0x2,A7
00022858 52 80 |R | ADDQ.L #0x1,D0
0002285a 0c 80 00 00 00 12 | | CMPI.L #0x00000012,D0
00022860 6f cc |o | BLE 0x2282e
00022862 4e 94 |N | JSR (A4)
00022864 4e 94 |N | JSR (A4)
00022866 2f 3a d9 36 |/: 6 | MOVE.L 0x2019e,-(A7)
0002286a 2f 3a d9 2e |/: . | MOVE.L 0x2019a,-(A7)
0002286e 2f 3a d9 26 |/: & | MOVE.L 0x20196,-(A7)
00022872 59 4f |YO | SUBQ.L #0x4,A7
00022874 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022878 3f 02 |? | MOVE.W D2,-(A7)
0002287a 3f 03 |? | MOVE.W D3,-(A7)
0002287c 4e 92 |N | JSR (A2)
0002287e 50 4f |PO | ADDQ.L #0x8,A7
00022880 4e 93 |N | JSR (A3)
00022882 de c4 | | ADDA.W D4,A7
00022884 41 fa d9 66 |A f | LEA.L 0x201ec,A0
00022888 70 06 |p | MOVEQ.L #0x06,D0
0002288a 2f 20 |/ | MOVE.L -(A0),-(A7)
0002288c 51 c8 ff fc |Q | DBF D0,0x2288a
00022890 59 4f |YO | SUBQ.L #0x4,A7
00022892 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022896 3f 02 |? | MOVE.W D2,-(A7)
00022898 3f 06 |? | MOVE.W D6,-(A7)
0002289a 4e 92 |N | JSR (A2)
0002289c 50 4f |PO | ADDQ.L #0x8,A7
0002289e 4e 93 |N | JSR (A3)
000228a0 de fc 00 0e | | ADDA.W #0xe,A7
000228a4 20 4f | O | MOVEA.L A7,A0
000228a6 43 fa d9 44 |C D | LEA.L 0x201ec,A1
000228aa 70 10 |p | MOVEQ.L #0x10,D0
000228ac 10 d9 | | MOVE.B (A1)+,(A0)+
000228ae 51 c8 ff fc |Q | DBF D0,0x228ac
000228b2 59 4f |YO | SUBQ.L #0x4,A7
000228b4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000228b8 3f 02 |? | MOVE.W D2,-(A7)
000228ba 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7)
000228be 4e 92 |N | JSR (A2)
000228c0 50 4f |PO | ADDQ.L #0x8,A7
000228c2 4e 93 |N | JSR (A3)
000228c4 9e c3 | | SUBA.W D3,A7
000228c6 20 4f | O | MOVEA.L A7,A0
000228c8 43 fa d9 34 |C 4 | LEA.L 0x201fe,A1
000228cc 70 20 |p | MOVEQ.L #0x20,D0
000228ce 10 d9 | | MOVE.B (A1)+,(A0)+
000228d0 51 c8 ff fc |Q | DBF D0,0x228ce
000228d4 59 4f |YO | SUBQ.L #0x4,A7
000228d6 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000228da 3f 02 |? | MOVE.W D2,-(A7)
000228dc 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7)
000228e0 4e 92 |N | JSR (A2)
000228e2 50 4f |PO | ADDQ.L #0x8,A7
000228e4 4e 93 |N | JSR (A3)
000228e6 54 4f |TO | ADDQ.L #0x2,A7
000228e8 20 4f | O | MOVEA.L A7,A0
000228ea 43 fa d9 34 |C 4 | LEA.L 0x20220,A1
000228ee 70 22 |p" | MOVEQ.L #0x22,D0
000228f0 10 d9 | | MOVE.B (A1)+,(A0)+
000228f2 51 c8 ff fc |Q | DBF D0,0x228f0
000228f6 59 4f |YO | SUBQ.L #0x4,A7
000228f8 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000228fc 3f 02 |? | MOVE.W D2,-(A7)
000228fe 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7)
00022902 4e 92 |N | JSR (A2)
00022904 50 4f |PO | ADDQ.L #0x8,A7
00022906 4e 93 |N | JSR (A3)
00022908 de fc 00 28 | ( | ADDA.W #0x28,A7
0002290c 41 fa d9 52 |A R | LEA.L 0x20260,A0
00022910 70 06 |p | MOVEQ.L #0x06,D0
00022912 2f 20 |/ | MOVE.L -(A0),-(A7)
00022914 51 c8 ff fc |Q | DBF D0,0x22912
00022918 59 4f |YO | SUBQ.L #0x4,A7
0002291a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002291e 3f 02 |? | MOVE.W D2,-(A7)
00022920 3f 06 |? | MOVE.W D6,-(A7)
00022922 4e 92 |N | JSR (A2)
00022924 50 4f |PO | ADDQ.L #0x8,A7
00022926 4e 93 |N | JSR (A3)
00022928 de c3 | | ADDA.W D3,A7
0002292a 20 4f | O | MOVEA.L A7,A0
0002292c 43 fa d9 32 |C 2 | LEA.L 0x20260,A1
00022930 70 12 |p | MOVEQ.L #0x12,D0
00022932 10 d9 | | MOVE.B (A1)+,(A0)+
00022934 51 c8 ff fc |Q | DBF D0,0x22932
00022938 59 4f |YO | SUBQ.L #0x4,A7
0002293a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002293e 3f 02 |? | MOVE.W D2,-(A7)
00022940 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
00022944 4e 92 |N | JSR (A2)
00022946 50 4f |PO | ADDQ.L #0x8,A7
00022948 4e 93 |N | JSR (A3)
0002294a 20 4f | O | MOVEA.L A7,A0
0002294c 43 fa d9 26 |C & | LEA.L 0x20274,A1
00022950 70 16 |p | MOVEQ.L #0x16,D0
00022952 10 d9 | | MOVE.B (A1)+,(A0)+
00022954 51 c8 ff fc |Q | DBF D0,0x22952
00022958 59 4f |YO | SUBQ.L #0x4,A7
0002295a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002295e 3f 02 |? | MOVE.W D2,-(A7)
00022960 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7)
00022964 4e 92 |N | JSR (A2)
00022966 50 4f |PO | ADDQ.L #0x8,A7
00022968 4e 93 |N | JSR (A3)
0002296a de c6 | | ADDA.W D6,A7
0002296c 41 fa d9 32 |A 2 | LEA.L 0x202a0,A0
00022970 70 04 |p | MOVEQ.L #0x04,D0
00022972 2f 20 |/ | MOVE.L -(A0),-(A7)
00022974 51 c8 ff fc |Q | DBF D0,0x22972
00022978 59 4f |YO | SUBQ.L #0x4,A7
0002297a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002297e 3f 02 |? | MOVE.W D2,-(A7)
00022980 3f 07 |? | MOVE.W D7,-(A7)
00022982 4e 92 |N | JSR (A2)
00022984 50 4f |PO | ADDQ.L #0x8,A7
00022986 4e 93 |N | JSR (A3)
00022988 9e fc 00 16 | | SUBA.W #0x16,A7
0002298c 20 4f | O | MOVEA.L A7,A0
0002298e 43 fa d9 10 |C | LEA.L 0x202a0,A1
00022992 70 2c |p, | MOVEQ.L #0x2c,D0
00022994 10 d9 | | MOVE.B (A1)+,(A0)+
00022996 51 c8 ff fc |Q | DBF D0,0x22994
0002299a 59 4f |YO | SUBQ.L #0x4,A7
0002299c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000229a0 3f 02 |? | MOVE.W D2,-(A7)
000229a2 3f 3c 00 2d |?< - | MOVE.W #0x2d,-(A7)
000229a6 4e 92 |N | JSR (A2)
000229a8 50 4f |PO | ADDQ.L #0x8,A7
000229aa 4e 93 |N | JSR (A3)
000229ac de fc 00 32 | 2 | ADDA.W #0x32,A7
000229b0 4e 94 |N | JSR (A4)
000229b2 9e c4 | | SUBA.W D4,A7
000229b4 20 4f | O | MOVEA.L A7,A0
000229b6 43 fa d7 ce |C | LEA.L 0x20186,A1
000229ba 70 0e |p | MOVEQ.L #0x0e,D0
000229bc 10 d9 | | MOVE.B (A1)+,(A0)+
000229be 51 c8 ff fc |Q | DBF D0,0x229bc
000229c2 51 4f |QO | SUBQ.L #0x8,A7
000229c4 48 6f 00 08 |Ho | PEA.L (A7+0x8)
000229c8 3f 02 |? | MOVE.W D2,-(A7)
000229ca 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
000229ce 4e 92 |N | JSR (A2)
000229d0 50 4f |PO | ADDQ.L #0x8,A7
000229d2 48 78 00 00 |Hx | PEA.L 0x0
000229d6 48 78 00 08 |Hx | PEA.L 0x8
000229da 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
000229e0 de c3 | | ADDA.W D3,A7
000229e2 23 df 00 02 47 c4 |# G | MOVE.L (A7)+,0x247c4
000229e8 de c4 | | ADDA.W D4,A7
000229ea 4e ba e3 0e |N | JSR 0x20cfa
000229ee 20 39 00 02 47 c4 | 9 G | MOVE.L 0x247c4,D0
000229f4 0c 80 00 00 00 08 | | CMPI.L #0x00000008,D0
000229fa 63 02 |c | BLS 0x229fe
000229fc 4e 4e |NN | TRAP #14
000229fe d0 40 | @ | ADD.W D0,D0
00022a00 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W
00022a08 00 12 | | .CONST 0x12 ; [0x0] -> 0x22a1a
00022a0a 00 1a | | .CONST 0x1a ; [0x1] -> 0x22a22
00022a0c 00 20 | | .CONST 0x20 ; [0x2] -> 0x22a28
00022a0e 00 28 | ( | .CONST 0x28 ; [0x3] -> 0x22a30
00022a10 00 30 | 0 | .CONST 0x30 ; [0x4] -> 0x22a38
00022a12 00 38 | 8 | .CONST 0x38 ; [0x5] -> 0x22a40
00022a14 00 40 | @ | .CONST 0x40 ; [0x6] -> 0x22a48
00022a16 00 48 | H | .CONST 0x48 ; [0x7] -> 0x22a50
00022a18 00 50 | P | .CONST 0x50 ; [0x8] -> 0x22a58
00022a1a switch@0x22a00[0x0]:
00022a1a 13 c2 00 02 47 c9 | G | MOVE.B D2,0x247c9
00022a20 60 3c |`< | BRA 0x22a5e
00022a22 switch@0x22a00[0x1]:
00022a22 4e ba e3 16 |N | JSR 0x20d3a
00022a26 60 36 |`6 | BRA 0x22a5e
00022a28 switch@0x22a00[0x2]:
00022a28 13 c2 00 02 47 ca | G | MOVE.B D2,0x247ca
00022a2e 60 2e |`. | BRA 0x22a5e
00022a30 switch@0x22a00[0x3]:
00022a30 13 c2 00 02 47 cb | G | MOVE.B D2,0x247cb
00022a36 60 26 |`& | BRA 0x22a5e
00022a38 switch@0x22a00[0x4]:
00022a38 13 c2 00 02 47 cc | G | MOVE.B D2,0x247cc
00022a3e 60 1e |` | BRA 0x22a5e
00022a40 switch@0x22a00[0x5]:
00022a40 13 c2 00 02 47 cd | G | MOVE.B D2,0x247cd
00022a46 60 16 |` | BRA 0x22a5e
00022a48 switch@0x22a00[0x6]:
00022a48 13 c2 00 02 47 ce | G | MOVE.B D2,0x247ce
00022a4e 60 0e |` | BRA 0x22a5e
00022a50 switch@0x22a00[0x7]:
00022a50 13 c2 00 02 47 cf | G | MOVE.B D2,0x247cf
00022a56 60 06 |` | BRA 0x22a5e
00022a58 switch@0x22a00[0x8]:
00022a58 13 c2 00 02 47 d0 | G | MOVE.B D2,0x247d0
00022a5e 4a 39 00 02 47 cb |J9 G | TST.B 0x247cb
00022a64 67 04 |g | BEQ 0x22a6a
00022a66 4e ba e4 76 |N v | JSR 0x20ede
00022a6a 4a 39 00 02 47 ca |J9 G | TST.B 0x247ca
00022a70 67 04 |g | BEQ 0x22a76
00022a72 4e ba e5 e8 |N | JSR 0x2105c
00022a76 4a 39 00 02 47 cb |J9 G | TST.B 0x247cb
00022a7c 67 04 |g | BEQ 0x22a82
00022a7e 4e ba e6 d2 |N | JSR 0x21152
00022a82 4a 39 00 02 47 d0 |J9 G | TST.B 0x247d0
00022a88 67 04 |g | BEQ 0x22a8e
00022a8a 4e ba e7 90 |N | JSR 0x2121c
00022a8e 4a 39 00 02 47 cc |J9 G | TST.B 0x247cc
00022a94 67 04 |g | BEQ 0x22a9a
00022a96 4e ba e9 4c |N L | JSR 0x213e4
00022a9a 4a 39 00 02 47 cd |J9 G | TST.B 0x247cd
00022aa0 67 04 |g | BEQ 0x22aa6
00022aa2 4e ba eb d0 |N | JSR 0x21674
00022aa6 4a 39 00 02 47 ce |J9 G | TST.B 0x247ce
00022aac 67 04 |g | BEQ 0x22ab2
00022aae 4e ba ef b2 |N | JSR 0x21a62
00022ab2 4a 39 00 02 47 ce |J9 G | TST.B 0x247ce
00022ab8 67 04 |g | BEQ 0x22abe
00022aba 4e ba f6 20 |N | JSR 0x220dc
00022abe 4a 39 00 02 47 ce |J9 G | TST.B 0x247ce
00022ac4 67 04 |g | BEQ 0x22aca
00022ac6 4e ba f7 72 |N r | JSR 0x2223a
00022aca 4a 39 00 02 47 cf |J9 G | TST.B 0x247cf
00022ad0 67 04 |g | BEQ 0x22ad6
00022ad2 4e ba f3 36 |N 6 | JSR 0x21e0a
00022ad6 9e fc 00 50 | P | SUBA.W #0x50,A7
00022ada 20 4f | O | MOVEA.L A7,A0
00022adc 43 fa d6 58 |C X | LEA.L 0x20136,A1
00022ae0 70 4e |pN | MOVEQ.L #0x4e,D0
00022ae2 10 d9 | | MOVE.B (A1)+,(A0)+
00022ae4 51 c8 ff fc |Q | DBF D0,0x22ae2
00022ae8 59 4f |YO | SUBQ.L #0x4,A7
00022aea 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022aee 3f 02 |? | MOVE.W D2,-(A7)
00022af0 3f 3c 00 4f |?< O | MOVE.W #0x4f,-(A7)
00022af4 4e 92 |N | JSR (A2)
00022af6 50 4f |PO | ADDQ.L #0x8,A7
00022af8 4e 93 |N | JSR (A3)
00022afa de fc 00 54 | T | ADDA.W #0x54,A7
00022afe 4a 39 00 02 47 c9 |J9 G | TST.B 0x247c9
00022b04 67 00 fc cc |g | BEQ 0x227d2
00022b08 4a 39 00 02 47 c8 |J9 G | TST.B 0x247c8
00022b0e 67 00 fb 50 |g P | BEQ 0x22660
00022b12 42 27 |B' | CLR.B -(A7)
00022b14 48 78 00 01 |Hx | PEA.L 0x1
00022b18 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String)
00022b1e 5c 4f |\O | ADDQ.L #0x6,A7
00022b20 4e b9 00 01 02 84 |N | JSR ?exit
00022b26 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_'
00022b34 ; --------------------------------------------------------------------------------------
00022b34 ; OMSI PASCAL Function
00022b34 ; <LVAR 0x008 1(r)>
00022b34 ; --------------------------------------------------------------------------------------
00022b34 PROG_FAIL:
00022b34 4e 56 ff d2 |NV | LINK.W A6,#0xffd2
00022b38 bf d5 | | CMPA.L (A5),A7
00022b3a 62 06 |b | BHI 0x22b42
00022b3c 44 fc 00 02 |D | MOVE.W #0x2,CCR
00022b40 4e 76 |Nv | TRAPV
00022b42 de fc 00 2c | , | ADDA.W #0x2c,A7
00022b46 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7)
00022b4a 41 fa ff e8 |A | LEA.L PROG_FAIL,A0
00022b4e 70 06 |p | MOVEQ.L #0x06,D0
00022b50 3f 20 |? | MOVE.W -(A0),-(A7)
00022b52 51 c8 ff fc |Q | DBF D0,0x22b50
00022b56 1f 3c 00 03 | < | MOVE.B #0x03,-(A7)
00022b5a 51 4f |QO | SUBQ.L #0x8,A7
00022b5c 48 6f 00 0a |Ho | PEA.L (A7+0xa)
00022b60 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00022b64 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
00022b68 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00022b6e 58 4f |XO | ADDQ.L #0x4,A7
00022b70 10 2e 00 08 | . | MOVE.B (A6+0x8),D0
00022b74 48 80 |H | EXTB.W D0
00022b76 48 c0 |H | EXTW.L D0
00022b78 2f 00 |/ | MOVE.L D0,-(A7)
00022b7a 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00022b80 58 4f |XO | ADDQ.L #0x4,A7
00022b82 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00022b88 50 4f |PO | ADDQ.L #0x8,A7
00022b8a 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String)
00022b90 de fc 00 14 | | ADDA.W #0x14,A7
00022b94 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0
00022b98 4e 5e |N^ | UNLK A6
00022b9a 4e 75 |Nu | RTS
00022b9c 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ '
00022baa 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ '
00022bb8 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ '
00022bc6 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :'
00022bd8 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. '
00022bf0 ; --------------------------------------------------------------------------------------
00022bf0 ; OMSI PASCAL Function
00022bf0 ; <LVAR 0x00e 1(r)>
00022bf0 ; <LVAR 0x00a 4(r)>
00022bf0 ; <LVAR 0x008 1(r)>
00022bf0 ; --------------------------------------------------------------------------------------
00022bf0 EXP_FAIL:
00022bf0 4e 56 ff 8c |NV | LINK.W A6,#0xff8c
00022bf4 bf d5 | | CMPA.L (A5),A7
00022bf6 62 06 |b | BHI 0x22bfe
00022bf8 44 fc 00 02 |D | MOVE.W #0x2,CCR
00022bfc 4e 76 |Nv | TRAPV
00022bfe de fc 00 74 | t | ADDA.W #0x74,A7
00022c02 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
00022c06 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00022c0c 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4
00022c12 72 01 |r | MOVEQ.L #0x01,D1
00022c14 74 0d |t | MOVEQ.L #0x0d,D2
00022c16 76 1e |v | MOVEQ.L #0x1e,D3
00022c18 78 12 |x | MOVEQ.L #0x12,D4
00022c1a 7a 0e |z | MOVEQ.L #0x0e,D5
00022c1c 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00022c22 41 fa ff b4 |A | LEA.L 0x22bd8,A0
00022c26 70 08 |p | MOVEQ.L #0x08,D0
00022c28 3f 20 |? | MOVE.W -(A0),-(A7)
00022c2a 51 c8 ff fc |Q | DBF D0,0x22c28
00022c2e 59 4f |YO | SUBQ.L #0x4,A7
00022c30 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022c34 3f 01 |? | MOVE.W D1,-(A7)
00022c36 3f 04 |? | MOVE.W D4,-(A7)
00022c38 4e 93 |N | JSR (A3)
00022c3a 50 4f |PO | ADDQ.L #0x8,A7
00022c3c 4e 94 |N | JSR (A4)
00022c3e 50 4f |PO | ADDQ.L #0x8,A7
00022c40 20 4f | O | MOVEA.L A7,A0
00022c42 43 fa ff 58 |C X | LEA.L 0x22b9c,A1
00022c46 70 0c |p | MOVEQ.L #0x0c,D0
00022c48 10 d9 | | MOVE.B (A1)+,(A0)+
00022c4a 51 c8 ff fc |Q | DBF D0,0x22c48
00022c4e 51 4f |QO | SUBQ.L #0x8,A7
00022c50 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00022c54 3f 01 |? | MOVE.W D1,-(A7)
00022c56 3f 02 |? | MOVE.W D2,-(A7)
00022c58 4e 93 |N | JSR (A3)
00022c5a 54 4f |TO | ADDQ.L #0x2,A7
00022c5c 1e ae 00 0e | | MOVE.B (A6+0xe),(A7)
00022c60 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String
00022c66 54 4f |TO | ADDQ.L #0x2,A7
00022c68 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00022c6e 50 4f |PO | ADDQ.L #0x8,A7
00022c70 4e 94 |N | JSR (A4)
00022c72 de c4 | | ADDA.W D4,A7
00022c74 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0
00022c78 b0 c1 | | CMPA.W D1,A0
00022c7a 67 48 |gH | BEQ 0x22cc4
00022c7c 9e c5 | | SUBA.W D5,A7
00022c7e 22 4f |"O | MOVEA.L A7,A1
00022c80 45 fa ff 28 |E ( | LEA.L 0x22baa,A2
00022c84 70 0c |p | MOVEQ.L #0x0c,D0
00022c86 12 da | | MOVE.B (A2)+,(A1)+
00022c88 51 c8 ff fc |Q | DBF D0,0x22c86
00022c8c 9e c3 | | SUBA.W D3,A7
00022c8e 22 4f |"O | MOVEA.L A7,A1
00022c90 41 e8 00 fc |A | LEA.L (A0+0xfc),A0
00022c94 70 1d |p | MOVEQ.L #0x1d,D0
00022c96 12 d8 | | MOVE.B (A0)+,(A1)+
00022c98 51 c8 ff fc |Q | DBF D0,0x22c96
00022c9c 51 4f |QO | SUBQ.L #0x8,A7
00022c9e 48 6f 00 26 |Ho & | PEA.L (A7+0x26)
00022ca2 3f 01 |? | MOVE.W D1,-(A7)
00022ca4 3f 02 |? | MOVE.W D2,-(A7)
00022ca6 4e 93 |N | JSR (A3)
00022ca8 58 4f |XO | ADDQ.L #0x4,A7
00022caa 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00022cae 3f 01 |? | MOVE.W D1,-(A7)
00022cb0 3f 03 |? | MOVE.W D3,-(A7)
00022cb2 4e 93 |N | JSR (A3)
00022cb4 50 4f |PO | ADDQ.L #0x8,A7
00022cb6 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00022cbc 50 4f |PO | ADDQ.L #0x8,A7
00022cbe 4e 94 |N | JSR (A4)
00022cc0 de fc 00 30 | 0 | ADDA.W #0x30,A7
00022cc4 9e c5 | | SUBA.W D5,A7
00022cc6 20 4f | O | MOVEA.L A7,A0
00022cc8 43 fa fe ee |C | LEA.L 0x22bb8,A1
00022ccc 70 0c |p | MOVEQ.L #0x0c,D0
00022cce 10 d9 | | MOVE.B (A1)+,(A0)+
00022cd0 51 c8 ff fc |Q | DBF D0,0x22cce
00022cd4 51 4f |QO | SUBQ.L #0x8,A7
00022cd6 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00022cda 3f 01 |? | MOVE.W D1,-(A7)
00022cdc 3f 02 |? | MOVE.W D2,-(A7)
00022cde 4e 93 |N | JSR (A3)
00022ce0 54 4f |TO | ADDQ.L #0x2,A7
00022ce2 1e ae 00 08 | | MOVE.B (A6+0x8),(A7)
00022ce6 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String)
00022cec 54 4f |TO | ADDQ.L #0x2,A7
00022cee 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00022cf4 50 4f |PO | ADDQ.L #0x8,A7
00022cf6 4e 94 |N | JSR (A4)
00022cf8 5d 4f |]O | SUBQ.L #0x6,A7
00022cfa 20 4f | O | MOVEA.L A7,A0
00022cfc 43 fa fe da |C | LEA.L 0x22bd8,A1
00022d00 70 16 |p | MOVEQ.L #0x16,D0
00022d02 10 d9 | | MOVE.B (A1)+,(A0)+
00022d04 51 c8 ff fc |Q | DBF D0,0x22d02
00022d08 1f 3c 00 02 | < | MOVE.B #0x02,-(A7)
00022d0c 59 4f |YO | SUBQ.L #0x4,A7
00022d0e 48 6f 00 06 |Ho | PEA.L (A7+0x6)
00022d12 3f 01 |? | MOVE.W D1,-(A7)
00022d14 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7)
00022d18 4e 93 |N | JSR (A3)
00022d1a 50 4f |PO | ADDQ.L #0x8,A7
00022d1c 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String)
00022d22 de c3 | | ADDA.W D3,A7
00022d24 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
00022d28 4e 5e |N^ | UNLK A6
00022d2a 4e 75 |Nu | RTS