|
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: 11264 (0x2c00)
Types: M200
Notes: @(#)TOMBSTONE,1.04,92/04/28,12:00:00, M200_PROGRAM
Names: »TOMBSTONE.M200«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »TOMBSTONE.M200«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TOMBSTONE.M200«
└─ ⟦this⟧ »TOMBSTONE.M200«
@ 20bfa
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20bfa-20c5c Body>
<POP 20bfa-20c10 Prologue> Σ0 ↓
<POP 20c10-20c16 Naked> Σ0 ↓ →0x20c32
<MI 20c10 TST.L (A6+0xc)> {}
<MI 20c14 BLE 0x20c32> {}
<POP 20c16-20c1c Naked> Σ0 Δ-4 ↓
<MI 20c16 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 20c1a MOVEQ.L #0x01,D7> {[4, '(A6+0xc)']}
<POP 20c1c-20c20 Naked> Σ-4 ↓ →0x20c30 ←0x20c20
<MI 20c1c CMP.L (A7),D7> {[-4-]}
<MI 20c1e BGT 0x20c30> {[-4-]}
<POP 20c20-20c30 Naked> Σ-4 ↓ →0x20c1c
<Const 0x20c20 0x20.2> Δ-2 {[-4-]|[#32]}
<Call 0x20c24 0x103d0> {[-4-]|[#32]}
WriteConsoleChar(chr : char)
<POP 20c2a-20c2c StackAdj> Δ+2 {[-4-]}
<MI 20c2c ADDQ.L #0x1,D7> {[-4-]}
<MI 20c2e BVC 0x20c1c> {[-4-]}
<POP 20c30-20c32 Naked> Σ-4 Δ+4 ↓ ←0x20c1c
<POP 20c30-20c32 StackAdj> Δ+4 {}
<POP 20c32-20c38 Naked> Σ0 Δ-4 ↓ ←0x20c10
<MI 20c32 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 20c36 MOVEQ.L #0x01,D7> {[4, '(A6+0x8)']}
<POP 20c38-20c3c Naked> Σ-4 ↓ →0x20c4c ←0x20c3c
<MI 20c38 CMP.L (A7),D7> {[-4-]}
<MI 20c3a BGT 0x20c4c> {[-4-]}
<POP 20c3c-20c4c Naked> Σ-4 ↓ →0x20c38
<Const 0x20c3c 0x2d.2> Δ-2 {[-4-]|[#45]}
<Call 0x20c40 0x103d0> {[-4-]|[#45]}
WriteConsoleChar(chr : char)
<POP 20c46-20c48 StackAdj> Δ+2 {[-4-]}
<MI 20c48 ADDQ.L #0x1,D7> {[-4-]}
<MI 20c4a BVC 0x20c38> {[-4-]}
<POP 20c4c-20c54 Naked> Σ-4 Δ+4 ↓ ←0x20c38
<POP 20c4c-20c4e StackAdj> Δ+4 {}
<Call 0x20c4e 0x103dc> {}
WriteConsoleCrLf(void)
<POP 20c54-20c5c Epilogue> Σ0
@ 20c5c
<POP 20c5c-20c9c Body>
<POP 20c5c-20c6e Prologue> Σ0 ↓
<POP 20c6e-20c98 Naked> Σ0 ↓
<MI 20c6e CLR.B 0x23f28> {}
<MI 20c74 CLR.B 0x23f29> {}
<MI 20c7a CLR.B 0x23f2a> {}
<MI 20c80 CLR.B 0x23f2b> {}
<MI 20c86 CLR.B 0x23f2c> {}
<MI 20c8c CLR.B 0x23f2d> {}
<MI 20c92 CLR.B 0x23f2e> {}
<POP 20c98-20c9c Epilogue> Σ0
@ 20c9c
<POP 20c9c-20ce6 Body>
<POP 20c9c-20cb2 Prologue> Σ0 ↓
<POP 20cb2-20cb4 RegCacheLoad> Σ0 ↓
<POP 20cb4-20cde Naked> Σ0 ↓
<MI 20cb4 MOVE.B #0x01,0x23f28> {}
<MI 20cba MOVE.B #0x01,0x23f29> {}
<MI 20cc0 MOVE.B #0x01,0x23f2a> {}
<MI 20cc6 MOVE.B #0x01,0x23f2b> {}
<MI 20ccc MOVE.B #0x01,0x23f2c> {}
<MI 20cd2 MOVE.B #0x01,0x23f2d> {}
<MI 20cd8 MOVE.B #0x01,0x23f2e> {}
<POP 20cde-20ce6 Epilogue> Σ0
@ 20ce6
<LVAR 0x008 2(r)>
<POP 20ce6-20d22 Body>
<POP 20ce6-20cfc Prologue> Σ0 ↓
<POP 20cfc-20d1a Naked> Σ0 ↓
<POP 20cfc-20cfe StackAdj> Δ-4 {[-4-]}
<MI 20cfe CLR.L D0> {[-4-]}
<MI 20d00 MOVE.W (A6+0x8),D0> {[-4-]}
<MI 20d04 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<Const 0x20d06 0x4.4> Δ-4 {[-4-]|[4, 'D0']|[##4]}
<Call 0x20d0a 0x102e8> {[-4-]|[4, 'D0']|[##4]}
Long2HexString(val : Long; ndig : Long) : String
<POP 20d10-20d12 StackAdj> Δ+8 {[-4-]}
<Call 0x20d12 0x103d8> {[-4-]}
WriteConsoleString(str : String)
<POP 20d18-20d1a StackAdj> Δ+4 {}
<POP 20d1a-20d22 Epilogue> Σ0
@ 20d22
<LVAR 0x008 4(r)>
<POP 20d22-20d52 Body>
<POP 20d22-20d34 Prologue> Σ0 ↓
<POP 20d34-20d4e Naked> Σ0 ↓
<POP 20d34-20d36 StackAdj> Δ-4 {[-4-]}
<MI 20d36 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x20d3a 0x8.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##8]}
<Call 0x20d3e 0x102e8> {[-4-]|[4, '(A6+0x8)']|[##8]}
Long2HexString(val : Long; ndig : Long) : String
<POP 20d44-20d46 StackAdj> Δ+8 {[-4-]}
<Call 0x20d46 0x103d8> {[-4-]}
WriteConsoleString(str : String)
<POP 20d4c-20d4e StackAdj> Δ+4 {}
<POP 20d4e-20d52 Epilogue> Σ0
@ 20d52
<LVAR 0x00e 2(r)>
<LVAR 0x00c 2(r)>
<LVAR 0x00a 2(r)>
<LVAR 0x008 2(r)>
<POP 20d52-20d8e Body>
<POP 20d52-20d68 Prologue> Σ0 ↓
<POP 20d68-20d6c RegCacheLoad> Σ0 ↓
<POP 20d6c-20d86 Naked> Σ0 ↓
<MI 20d6c MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x20d70 0x20ce6> {[2, '(A6+0x8)']}
<MI 20d72 MOVE.W (A6+0xa),(A7)> {[2, '(A6+0xa)']}
<Call 0x20d76 0x20ce6> {[2, '(A6+0xa)']}
<MI 20d78 MOVE.W (A6+0xc),(A7)> {[2, '(A6+0xc)']}
<Call 0x20d7c 0x20ce6> {[2, '(A6+0xc)']}
<MI 20d7e MOVE.W (A6+0xe),(A7)> {[2, '(A6+0xe)']}
<Call 0x20d82 0x20ce6> {[2, '(A6+0xe)']}
<POP 20d84-20d86 StackAdj> Δ+2 {}
<POP 20d86-20d8e Epilogue> Σ0
@ 20d8e
<LVAR 0x00e 2(r)>
<LVAR 0x00c 2(r)>
<LVAR 0x00a 2(r)>
<LVAR 0x008 2(r)>
<POP 20d8e-20dec Body>
<POP 20d8e-20da4 Prologue> Σ0 ↓
<POP 20da4-20da8 RegCacheLoad> Σ0 ↓
<POP 20da8-20de4 Naked> Σ0 ↓
<MI 20da8 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x20dac 0x20ce6> {[2, '(A6+0x8)']}
<MI 20dae MOVE.W (A6+0xa),(A7)> {[2, '(A6+0xa)']}
<Call 0x20db2 0x20ce6> {[2, '(A6+0xa)']}
<POP 20db4-20db5 StackAdj> Δ+2 {}
<Blob 0x20db5 [2] @> Δ-2 {[«2""»]}
<POP 20db8-20dba StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x20dba 2> {[«2""»]|[$$__]}
<Call 0x20dce 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 20dd4-20dd6 StackAdj> Δ+4 {[«2""»]}
<MI 20dd6 MOVE.W (A6+0xc),(A7)> {[2, '(A6+0xc)']}
<Call 0x20dda 0x20ce6> {[2, '(A6+0xc)']}
<MI 20ddc MOVE.W (A6+0xe),(A7)> {[2, '(A6+0xe)']}
<Call 0x20de0 0x20ce6> {[2, '(A6+0xe)']}
<POP 20de2-20de4 StackAdj> Δ+2 {}
<POP 20de4-20dec Epilogue> Σ0
@ 20dec
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20dec-20e40 Body>
<POP 20dec-20dfe Prologue> Σ0 ↓
<POP 20dfe-20e3c Naked> Σ0 ↓
<MI 20dfe MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 20e02 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x20e06 0x20d52> {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 20e0a-20e0c StackAdj> Δ+6 {[-2-]}
<POP 20e0c-20e0d StackAdj> Δ+2 {}
<Blob 0x20e0d [2] @> Δ-2 {[«2""»]}
<POP 20e10-20e12 StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x20e12 2> {[«2""»]|[$$__]}
<Call 0x20e26 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 20e2c-20e2e StackAdj> Δ+2 {[«2""»]|[-2-]}
<MI 20e2e MOVE.L (A6+0x14),(A7)> {[4, '(A6+0x14)']}
<MI 20e32 MOVE.L (A6+0x10),-(A7)> Δ-4 {[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<Call 0x20e36 0x20d52> {[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<POP 20e3a-20e3c StackAdj> Δ+8 {}
<POP 20e3c-20e40 Epilogue> Σ0
@ 20e40
<POP 20e40-20fb8 Body>
<POP 20e40-20e56 Prologue> Σ0 ↓
<POP 20e56-20e6e RegCacheLoad> Σ0 ↓
<POP 20e6e-20efc Naked> Σ0 ↓ →0x20f88
<MI 20e6e MOVE.W 0x2334a,D7> {}
<Call 0x20e74 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x20e7a [78] @> Δ-78 {[«78""»]}
<POP 20e86-20e88 StackAdj> Δ-4 {[«78""»]|[-4-]}
<Lit 0x20e88 78> {[«78""»]|[$$******************************************************************************]}
<Call 0x20e96 0x103e0> {[«78""»]|[$$******************************************************************************]}
WriteConsoleStringCrLf(str : String)
<POP 20e98-20e9c StackAdj> Δ+82 {}
<Blob 0x20e9c [40] @> Δ-40 {[«40""»]}
<POP 20ea6-20ea8 StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x20ea8 40> {[«40""»]|[$$ -------------------------------------]}
<Call 0x20eb4 0x103e0> {[«40""»]|[$$ -------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 20eb6-20eb8 StackAdj> Δ+44 {}
<Blob 0x20eb8 [40] @> Δ-40 {[«40""»]}
<POP 20ec4-20ec6 StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x20ec6 40> {[«40""»]|[$$ CRASH REASON (based on last micro-pc)]}
<Call 0x20ed2 0x103e0> {[«40""»]|[$$ CRASH REASON (based on last micro-pc)]}
WriteConsoleStringCrLf(str : String)
<POP 20ed4-20ed6 StackAdj> Δ+44 {}
<Blob 0x20ed6 [40] @> Δ-40 {[«40""»]}
<POP 20ee0-20ee2 StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x20ee2 40> {[«40""»]|[$$ -------------------------------------]}
<Call 0x20eee 0x103e0> {[«40""»]|[$$ -------------------------------------]}
WriteConsoleStringCrLf(str : String)
<POP 20ef0-20ef2 StackAdj> Δ+44 {}
<MI 20ef2 TST.W 0x2336a> {}
<MI 20ef8 BEQ 0x20f88> {}
<POP 20efc-20f02 Naked> Σ0 ↓ →0x20f3e
<MI 20efc CMPI.W #0x01ff,D7> {}
<MI 20f00 BLS 0x20f3e> {}
<POP 20f02-20f08 Naked> Σ0 ↓ →0x20f3e
<MI 20f02 CMPI.W #0x020a,D7> {}
<MI 20f06 BCC 0x20f3e> {}
<POP 20f08-20f3e Naked> Σ0 →0x20f86
<MI 20f08 MOVE.W D7,D0> {}
<MI 20f0a ANDI.W #0x00ff,D0> {}
<POP 0x20f0e LimitCheck 0x0 ≤ D0 ≤ 0x9> {}
<MI 20f12 MULU.W #0x1e,D0> {}
<MI 20f14 CLR.L D1> {}
<MI 20f16 MOVE.W D0,D1> {}
<MI 20f18 LEA.L 0x208ee,A0> {}
<Blob 0x20f1c [30] (A0+D1.L+#0x1e)> Δ-30 {[«30»]}
<POP 20f28-20f2a StackAdj> Δ-4 {[«30»]|[-4-]}
<Lit 0x20f2a> {[«30»]|[$$…]}
<Pointer.sp 0x20f2a 4> Δ-4
<Const 0x20f2e 0x1.2> Δ-2
<Const 0x20f30 0x1e.2> Δ-2
<Call 0x20f32 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20f34-20f36 StackAdj> Δ+8
<Call 0x20f36 0x103e0> {[«30»]|[$$…]}
WriteConsoleStringCrLf(str : String)
<POP 20f38-20f3c StackAdj> Δ+34 {}
<MI 20f3c BRA 0x20f86> {}
<POP 20f3e-20f86 Naked> Σ0 ↓ ←0x20efc ←0x20f02
<Blob 0x20f3e [2] @> Δ-2 {[«2""»]}
<POP 20f42-20f44 StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x20f44 2> {[«2""»]|[$$__]}
<Call 0x20f52 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 20f58-20f5a StackAdj> Δ+4 {[«2""»]}
<MI 20f5a MOVE.W D7,(A7)> {[2, 'D7']}
<Call 0x20f5c 0x20ce6> {[2, 'D7']}
<POP 20f60-20f61 StackAdj> Δ+2 ↓ {}
<Blob 0x20f61 [14] @> Δ-14 {[«14""»]}
<POP 20f70-20f72 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x20f72 13> {[«14""»]|[$$ - not found]}
<Call 0x20f80 0x103e0> {[«14""»]|[$$ - not found]}
WriteConsoleStringCrLf(str : String)
<POP 20f82-20f86 StackAdj> Δ+18 {}
<POP 20f86-20f88 Naked> Σ0 →0x20fb0 ←0x20f08
<MI 20f86 BRA 0x20fb0> {}
<POP 20f88-20fb0 Naked> Σ0 ↓ ←0x20e6e
<Blob 0x20f88 [64] @> Δ-64 {[«64""»]}
<POP 20f9a-20f9c StackAdj> Δ-4 {[«64""»]|[-4-]}
<Lit 0x20f9c 63> {[«64""»]|[$$ information unavailable (CPU STATE not dumped to tombstone)]}
<Call 0x20faa 0x103e0> {[«64""»]|[$$ information unavailable (CPU STATE not dumped to tombstone)]}
WriteConsoleStringCrLf(str : String)
<POP 20fac-20fb0 StackAdj> Δ+68 {}
<POP 20fb0-20fb8 Epilogue> Σ0 ←0x20f86
@ 20fb8
<POP 20fb8-210b2 Body>
<POP 20fb8-20fce Prologue> Σ0 ↓
<POP 20fce-20fe2 RegCacheLoad> Σ0 ↓
<POP 20fe2-2104a Naked> Σ0 ↓ →0x21088
<Blob 0x20fe2 [78] @> Δ-78 {[«78""»]}
<POP 20fee-20ff0 StackAdj> Δ-4 {[«78""»]|[-4-]}
<Lit 0x20ff0 78> {[«78""»]|[$$******************************************************************************]}
<Call 0x20ffe 0x103e0> {[«78""»]|[$$******************************************************************************]}
WriteConsoleStringCrLf(str : String)
<POP 21000-21004 StackAdj> Δ+82 {}
<Const 0x21004 0x3.4> Δ-4 {[##3]}
<Const 0x21008 0x13.4> Δ-4 {[##3]|[##19]}
<Call 0x2100c 0x20bfa> {[##3]|[##19]}
<POP 21010-21012 StackAdj> Δ+8 {}
<Blob 0x21012 [22] @> Δ-22 {[«22""»]}
<POP 2101e-21020 StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x21020 22> {[«22""»]|[$$ LAST CONSOLE OUTPUT]}
<Call 0x2102e 0x103e0> {[«22""»]|[$$ LAST CONSOLE OUTPUT]}
WriteConsoleStringCrLf(str : String)
<POP 21030-21034 StackAdj> Δ+26 {}
<Const 0x21034 0x3.4> Δ-4 {[##3]}
<Const 0x21038 0x13.4> Δ-4 {[##3]|[##19]}
<Call 0x2103c 0x20bfa> {[##3]|[##19]}
<POP 21040-21042 StackAdj> Δ+8 {}
<MI 21042 TST.W 0x2334e> {}
<MI 21048 BEQ 0x21088> {}
<POP 2104a-2104c Naked> Σ0 ↓
<MI 2104a MOVEQ.L #0x01,D7> {}
<POP 2104c-21056 Naked> Σ0 ↓ →0x21058 ←0x21058
<MI 2104c MOVE.L 0x23efa,D0> {}
<MI 2104e CMPI.L #0x0000033f,D0> {}
<MI 21054 BLE 0x21058> {}
<POP 21056-21058 Naked> Σ0 ↓
<MI 21056 CLR.L 0x23efa> {}
<POP 21058-21086 Naked> Σ0 ↓ →0x2104c ←0x2104c
<MI 21058 MOVE.L 0x23efa,D0> {}
<POP 0x2105a LimitCheck 0x0 ≤ D0 ≤ 0x33f> {}
<MI 21064 LEA.L 0x22b0a,A0> {}
<MI 2106a LEA.L (A0+D0.L),A0> {}
<MI 2106e MOVE.B (A0+0x10b0),-(A7)> Δ-2 {[2, '(A0+0x10b0)']}
<Call 0x21072 0x103d0> {[2, '(A0+0x10b0)']}
WriteConsoleChar(chr : char)
<POP 21078-2107a StackAdj> Δ+2 {}
<MI 2107a ADDQ.L #0x1,0x23efa> {}
<MI 2107c ADDQ.L #0x1,D7> {}
<MI 2107e CMPI.L #0x00000340,D7> {}
<MI 21084 BLE 0x2104c> {}
<POP 21086-21088 Naked> Σ0 →0x210aa
<MI 21086 BRA 0x210aa> {}
<POP 21088-210aa Naked> Σ0 ↓ ←0x20fe2
<Blob 0x21088 [32] @> Δ-32 {[«32""»]}
<POP 21094-21096 StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x21096 32> {[«32""»]|[$$Iop state not saved to tombstone]}
<Call 0x210a4 0x103e0> {[«32""»]|[$$Iop state not saved to tombstone]}
WriteConsoleStringCrLf(str : String)
<POP 210a6-210aa StackAdj> Δ+36 {}
<POP 210aa-210b2 Epilogue> Σ0 ←0x21086
@ 210b2
<POP 210b2-21182 Body>
<POP 210b2-210c8 Prologue> Σ0 ↓
<POP 210c8-210d8 RegCacheLoad> Σ0 ↓
<POP 210d8-2117a Naked> Σ0 ↓
<MI 210d8 MOVE.B 0x2338c,D0> {}
<MI 210de EXTB.W D0> {}
<POP 0x210e0 LimitCheck 0x0 ≤ D0 ≤ 0xf> {}
<MI 210e4 MOVE.B D0,D7> {}
<Blob 0x210e6 [78] @> Δ-78 {[«78""»]}
<POP 210f2-210f4 StackAdj> Δ-4 {[«78""»]|[-4-]}
<Lit 0x210f4 78> {[«78""»]|[$$******************************************************************************]}
<Call 0x21102 0x103e0> {[«78""»]|[$$******************************************************************************]}
WriteConsoleStringCrLf(str : String)
<POP 21104-21108 StackAdj> Δ+82 {}
<Const 0x21108 0x3.4> Δ-4 {[##3]}
<Const 0x2110c 0x13.4> Δ-4 {[##3]|[##19]}
<Call 0x21110 0x20bfa> {[##3]|[##19]}
<POP 21114-21116 StackAdj> Δ+8 {}
<Blob 0x21116 [22] @> Δ-22 {[«22""»]}
<POP 21122-21124 StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x21124 22> {[«22""»]|[$$ CRASH CLASIFICATION]}
<Call 0x21132 0x103e0> {[«22""»]|[$$ CRASH CLASIFICATION]}
WriteConsoleStringCrLf(str : String)
<POP 21134-21138 StackAdj> Δ+26 {}
<Const 0x21138 0x3.4> Δ-4 {[##3]}
<Const 0x2113c 0x13.4> Δ-4 {[##3]|[##19]}
<Call 0x21140 0x20bfa> {[##3]|[##19]}
<POP 21144-21146 StackAdj> Δ+8 {}
<MI 21146 MOVE.B D7,D0> {}
<MI 21148 EXTB.W D0> {}
<MI 2114a MULS.W #0x1e,D0> {}
<MI 2114c LEA.L 0x20a1a,A0> {}
<Blob 0x21150 [30] (A0+D0.W)> Δ-30 {[«30»]}
<POP 21160-21162 StackAdj> Δ-4 {[«30»]|[-4-]}
<Lit 0x21162> {[«30»]|[$$…]}
<Pointer.sp 0x21162 4> Δ-4
<Const 0x21166 0x1.2> Δ-2
<Const 0x21168 0x1e.2> Δ-2
<Call 0x2116a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2116c-2116e StackAdj> Δ+8
<Call 0x2116e 0x103e0> {[«30»]|[$$…]}
WriteConsoleStringCrLf(str : String)
<POP 21170-21174 StackAdj> Δ+34 {}
<Call 0x21174 0x103dc> {}
WriteConsoleCrLf(void)
<POP 2117a-21182 Epilogue> Σ0
@ 21182
<POP 21182-21312 Body>
<POP 21182-21198 Prologue> Σ0 ↓
<POP 21198-211b2 RegCacheLoad> Σ0 ↓
<POP 211b2-21220 Naked> Σ0 ↓ →0x212e2
<Blob 0x211b2 [78] @> Δ-78 {[«78""»]}
<POP 211be-211c0 StackAdj> Δ-4 {[«78""»]|[-4-]}
<Lit 0x211c0 78> {[«78""»]|[$$******************************************************************************]}
<Call 0x211ce 0x103e0> {[«78""»]|[$$******************************************************************************]}
WriteConsoleStringCrLf(str : String)
<POP 211d0-211d4 StackAdj> Δ+82 {}
<Const 0x211d4 0x3.4> Δ-4 {[##3]}
<Const 0x211d8 0x12.4> Δ-4 {[##3]|[##18]}
<Call 0x211dc 0x20bfa> {[##3]|[##18]}
<POP 211e0-211e1 StackAdj> Δ+8 ↓ {}
<Blob 0x211e1 [22] @> Δ-22 {[«22""»]}
<POP 211f2-211f4 StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x211f4 21> {[«22""»]|[$$ IOP Kernel version]}
<Call 0x21202 0x103e0> {[«22""»]|[$$ IOP Kernel version]}
WriteConsoleStringCrLf(str : String)
<POP 21204-21208 StackAdj> Δ+26 {}
<Const 0x21208 0x3.4> Δ-4 {[##3]}
<Const 0x2120c 0x12.4> Δ-4 {[##3]|[##18]}
<Call 0x21210 0x20bfa> {[##3]|[##18]}
<POP 21214-21216 StackAdj> Δ+8 {}
<MI 21216 TST.W 0x2334e> {}
<MI 2121c BEQ 0x212e2> {}
<POP 21220-21224 Naked> Σ0 ↓
<MI 21220 MOVEQ.L #0x00,D6> {}
<MI 21222 MOVEQ.L #0x00,D7> {}
<POP 21224-2123c Naked> Σ0 ↓ →0x212c8 ←0x212d6
<POP 0x21224 LimitCheck 0x0 ≤ D7 ≤ 0x3ff> {}
<MI 2122a LEA.L 0x22b0a,A0> {}
<MI 2122c LEA.L (A0+D7.L),A0> {}
<MI 21230 MOVE.B (A0+0x414),D0> {}
<MI 21234 CMPI.B #0x40,D0> {}
<MI 21238 BNE 0x212c8> {}
<POP 2123c-21256 Naked> Σ0 ↓ →0x212c8
<MI 2123c MOVE.L D7,D0> {}
<MI 2123e ADDQ.L #0x1,D0> {}
<POP 0x21240 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {}
<MI 21246 LEA.L 0x22b0a,A0> {}
<MI 21248 LEA.L (A0+D0.L),A0> {}
<MI 2124c MOVE.B (A0+0x414),D0> {}
<MI 21250 CMPI.B #0x28,D0> {}
<MI 21254 BNE 0x212c8> {}
<POP 21256-21270 Naked> Σ0 ↓ →0x212c8
<MI 21256 MOVE.L D7,D0> {}
<MI 21258 ADDQ.L #0x2,D0> {}
<POP 0x2125a LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {}
<MI 21260 LEA.L 0x22b0a,A0> {}
<MI 21262 LEA.L (A0+D0.L),A0> {}
<MI 21266 MOVE.B (A0+0x414),D0> {}
<MI 2126a CMPI.B #0x23,D0> {}
<MI 2126e BNE 0x212c8> {}
<POP 21270-2128a Naked> Σ0 ↓ →0x212c8
<MI 21270 MOVE.L D7,D0> {}
<MI 21272 ADDQ.L #0x3,D0> {}
<POP 0x21274 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {}
<MI 2127a LEA.L 0x22b0a,A0> {}
<MI 2127c LEA.L (A0+D0.L),A0> {}
<MI 21280 MOVE.B (A0+0x414),D0> {}
<MI 21284 CMPI.B #0x29,D0> {}
<MI 21288 BNE 0x212c8> {}
<POP 2128a-2128c Naked> Σ0 ↓
<MI 2128a ADDQ.L #0x4,D7> {}
<POP 2128c-212be Naked> Σ0 ↓ →0x212c2 ←0x212c4
<POP 0x2128c LimitCheck 0x0 ≤ D7 ≤ 0x3ff> {}
<MI 21292 LEA.L 0x22b0a,A0> {}
<MI 21294 LEA.L (A0+D7.L),A0> {}
<MI 21298 MOVE.B (A0+0x414),-(A7)> Δ-2 {[2, '(A0+0x414)']}
<Call 0x2129c 0x103d0> {[2, '(A0+0x414)']}
WriteConsoleChar(chr : char)
<POP 212a2-212a4 StackAdj> Δ+2 {}
<MI 212a4 ADDQ.L #0x1,D7> {}
<MI 212a6 MOVEQ.L #0x00,D6> {}
<POP 0x212a8 LimitCheck 0x0 ≤ D7 ≤ 0x3ff> {}
<MI 212ae LEA.L 0x22b0a,A0> {}
<MI 212b0 LEA.L (A0+D7.L),A0> {}
<MI 212b4 MOVE.B (A0+0x414),D0> {}
<MI 212b8 CMPI.B #0x5c,D0> {}
<MI 212bc BEQ 0x212c2> {}
<POP 212be-212c2 Naked> Σ0 ↓ →0x212c4
<MI 212be CMP.L #0x3ff,D7> {}
<MI 212c0 BLT 0x212c4> {}
<POP 212c2-212c4 Naked> Σ0 ↓ ←0x2128c
<MI 212c2 ADDQ.B #0x1,D6> {}
<POP 212c4-212c8 Naked> Σ0 ↓ →0x2128c ←0x212be
<MI 212c4 TST.B D6> {}
<MI 212c6 BEQ 0x2128c> {}
<POP 212c8-212d0 Naked> Σ0 ↓ →0x212d4 ←0x21224 ←0x2123c ←0x21256 ←0x21270
<MI 212c8 ADDQ.L #0x1,D7> {}
<MI 212ca MOVEQ.L #0x00,D0> {}
<MI 212cc CMP.L #0x3ff,D7> {}
<MI 212ce BGT 0x212d4> {}
<POP 212d0-212d4 Naked> Σ0 ↓ →0x212d6
<MI 212d0 TST.B D6> {}
<MI 212d2 BEQ 0x212d6> {}
<POP 212d4-212d6 Naked> Σ0 ↓ ←0x212c8
<MI 212d4 ADDQ.B #0x1,D0> {}
<POP 212d6-212e0 Naked> Σ0 ↓ →0x21224 ←0x212d0
<MI 212d6 EXTB.W D0> {}
<POP 0x212d8 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 212da MOVE.B D0,D6> {}
<MI 212dc BEQ 0x21224> {}
<POP 212e0-212e2 Naked> Σ0 →0x21304
<MI 212e0 BRA 0x21304> {}
<POP 212e2-21304 Naked> Σ0 ↓ ←0x211b2
<Blob 0x212e2 [32] @> Δ-32 {[«32""»]}
<POP 212ee-212f0 StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x212f0 32> {[«32""»]|[$$Iop state not saved to tombstone]}
<Call 0x212fe 0x103e0> {[«32""»]|[$$Iop state not saved to tombstone]}
WriteConsoleStringCrLf(str : String)
<POP 21300-21304 StackAdj> Δ+36 {}
<POP 21304-2130a Naked> Σ0 ↓ ←0x212e0
<Call 0x21304 0x103dc> {}
WriteConsoleCrLf(void)
<POP 2130a-21312 Epilogue> Σ0
@ 21312
<LVAR -0x00c 4(rw)>
<POP 21312-2140e Body>
<POP 21312-21328 Prologue> Σ0 ↓
<POP 21328-2132a RegCacheLoad> Σ0 ↓
<POP 2132a-213b6 Naked> Σ0 ↓
<Blob 0x2132a [78] @> Δ-78 {[«78""»]}
<POP 21336-21338 StackAdj> Δ-4 {[«78""»]|[-4-]}
<Lit 0x21338 78> {[«78""»]|[$$******************************************************************************]}
<Call 0x2134a 0x103e0> {[«78""»]|[$$******************************************************************************]}
WriteConsoleStringCrLf(str : String)
<POP 21350-21354 StackAdj> Δ+82 {}
<Const 0x21354 0x3.4> Δ-4 {[##3]}
<Const 0x21358 0xe.4> Δ-4 {[##3]|[##14]}
<Call 0x2135c 0x20bfa> {[##3]|[##14]}
<POP 21360-21361 StackAdj> Δ+8 ↓ {}
<Blob 0x21361 [18] @> Δ-18 {[«18""»]}
<POP 21372-21374 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x21374 17> {[«18""»]|[$$ RESTART BUFFER]}
<Call 0x21386 0x103e0> {[«18""»]|[$$ RESTART BUFFER]}
WriteConsoleStringCrLf(str : String)
<POP 2138c-21390 StackAdj> Δ+22 {}
<Const 0x21390 0x3.4> Δ-4 {[##3]}
<Const 0x21394 0xe.4> Δ-4 {[##3]|[##14]}
<Call 0x21398 0x20bfa> {[##3]|[##14]}
<POP 2139c-2139e StackAdj> Δ+8 {}
<Call 0x2139e 0x103dc> {}
WriteConsoleCrLf(void)
<MI 213a4 CLR.L D0> {}
<MI 213a6 MOVE.W 0x2336c,D0> {}
<MI 213ac MOVE.L D0,(A6-0xc)> {}
<MI 213b0 MOVEQ.L #0x00,D6> {}
<MI 213b2 ADDQ.L #0x1,D0> {}
<MI 213b4 MOVE.L D0,D7> {}
<POP 213b6-213c0 Naked> Σ0 ↓ →0x213c2 ←0x213f8
<MI 213b6 ADDQ.L #0x1,D6> {}
<MI 213b8 CMPI.L #0x00000340,D7> {}
<MI 213be BLE 0x213c2> {}
<POP 213c0-213c2 Naked> Σ0 ↓
<MI 213c0 MOVEQ.L #0x01,D7> {}
<POP 213c2-213ee Naked> Σ0 ↓ →0x213f0 ←0x213b6
<MI 213c2 MOVE.L D7,D0> {}
<MI 213c4 SUBQ.L #0x1,D0> {}
<POP 0x213c6 LimitCheck 0x0 ≤ D0 ≤ 0x33f> {}
<MI 213d0 LEA.L 0x22b0a,A0> {}
<MI 213d6 LEA.L (A0+D0.L),A0> {}
<MI 213da MOVE.B (A0+0x902),-(A7)> Δ-2 {[2, '(A0+0x902)']}
<Call 0x213de 0x103d0> {[2, '(A0+0x902)']}
WriteConsoleChar(chr : char)
<POP 213e4-213e6 StackAdj> Δ+2 {}
<MI 213e6 MOVEQ.L #0x00,D0> {}
<MI 213e8 CMP.L (A6-0xc),D7> {}
<MI 213ec BNE 0x213f0> {}
<POP 213ee-213f0 Naked> Σ0 ↓
<MI 213ee ADDQ.B #0x1,D0> {}
<POP 213f0-213f8 Naked> Σ0 ↓ →0x21400 ←0x213c2
<MI 213f0 MOVE.B D0,D5> {}
<MI 213f2 ADDQ.L #0x1,D7> {}
<MI 213f4 TST.B D5> {}
<MI 213f6 BNE 0x21400> {}
<POP 213f8-21400 Naked> Σ0 ↓ →0x213b6
<MI 213f8 CMPI.L #0x00000340,D6> {}
<MI 213fe BLE 0x213b6> {}
<POP 21400-21406 Naked> Σ0 ↓ ←0x213f0
<Call 0x21400 0x103dc> {}
WriteConsoleCrLf(void)
<POP 21406-2140e Epilogue> Σ0
@ 2140e
<POP 2140e-2147a Body>
<POP 2140e-21424 Prologue> Σ0 ↓
<POP 21424-2142c RegCacheLoad> Σ0 ↓
<POP 2142c-2142e Naked> Σ0 ↓
<MI 2142c MOVEQ.L #0x01,D6> {}
<POP 2142e-21472 Naked> Σ0 ↓ →0x2142e ←0x2142e
<MI 2142e MOVEQ.L #0x02,D4> {}
<MI 21430 MOVE.L D6,D3> {}
<Call 0x21432 0x1028c> {}
?muls_d3_d4
<MI 21438 MOVE.L D4,D0> {}
<MI 2143a SUBQ.L #0x1,D0> {}
<MI 2143c SUBQ.L #0x1,D0> {}
<POP 0x2143e LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 21444 LEA.L 0x22b0a,A0> {}
<MI 21446 LEA.L (A0+D0.L),A0> {}
<MI 2144a MOVE.B (A0+0x13f4),D7> {}
<MI 2144e MOVE.L D4,D0> {}
<MI 21450 SUBQ.L #0x1,D0> {}
<POP 0x21452 LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 21458 LEA.L 0x22b0a,A1> {}
<MI 2145a LEA.L (A1+D0.L),A1> {}
<MI 2145e MOVE.B (A1+0x13f4),(A0+0x13f4)> {}
<MI 21464 MOVE.B D7,(A1+0x13f4)> {}
<MI 21468 ADDQ.L #0x1,D6> {}
<MI 2146a CMPI.L #0x0000000f,D6> {}
<MI 21470 BLE 0x2142e> {}
<POP 21472-2147a Epilogue> Σ0
@ 2147a
<POP 2147a-214d6 Body>
<POP 2147a-21490 Prologue> Σ0 ↓
<POP 21490-21492 Naked> Σ0 ↓
<MI 21490 MOVEQ.L #0x01,D7> {}
<POP 21492-214b4 Naked> Σ0 ↓ →0x214c4 ←0x214c4
<MI 21492 MOVE.L D7,D0> {}
<MI 21494 SUBQ.L #0x1,D0> {}
<POP 0x21496 LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 214a0 LEA.L 0x22b0a,A0> {}
<MI 214a6 LEA.L (A0+D0.L),A0> {}
<MI 214aa MOVE.B (A0+0x13f4),D0> {}
<MI 214ae CMPI.B #0x01,D0> {}
<MI 214b2 BLS 0x214c4> {}
<POP 214b4-214ba Naked> Σ0 ↓ →0x214c4
<MI 214b4 CMPI.B #0xff,D0> {}
<MI 214b8 BCC 0x214c4> {}
<POP 214ba-214c4 Naked> Σ0 ↓
<MI 214ba MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x214bc 0x103d0> {[2, 'D0']}
WriteConsoleChar(chr : char)
<POP 214c2-214c4 StackAdj> Δ+2 {}
<POP 214c4-214ce Naked> Σ0 ↓ →0x21492 ←0x21492 ←0x214b4
<MI 214c4 ADDQ.L #0x1,D7> {}
<MI 214c6 CMPI.L #0x0000001e,D7> {}
<MI 214cc BLE 0x21492> {}
<POP 214ce-214d6 Epilogue> Σ0
@ 214d6
<LVAR -0x002 2(w)>
<POP 214d6-217c0 Body> Δ+8
<POP 214d6-214ec Prologue> Σ0 ↓
<POP 214ec-21504 RegCacheLoad> Σ0 ↓
<POP 21504-21576 Naked> Σ0 ↓ →0x21792
<Blob 0x21504 [78] @> Δ-78 {[«78""»]}
<POP 21510-21512 StackAdj> Δ-4 {[«78""»]|[-4-]}
<Lit 0x21512 78> {[«78""»]|[$$******************************************************************************]}
<Call 0x21520 0x103e0> {[«78""»]|[$$******************************************************************************]}
WriteConsoleStringCrLf(str : String)
<POP 21526-2152a StackAdj> Δ+82 {}
<Const 0x2152a 0x3.4> Δ-4 {[##3]}
<Const 0x2152e 0x1d.4> Δ-4 {[##3]|[##29]}
<Call 0x21532 0x20bfa> {[##3]|[##29]}
<POP 21536-21538 StackAdj> Δ+8 {}
<Blob 0x21538 [32] @> Δ-32 {[«32""»]}
<POP 21544-21546 StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x21546 32> {[«32""»]|[$$ UCODE TRACE (last 20 entries)]}
<Call 0x21554 0x103e0> {[«32""»]|[$$ UCODE TRACE (last 20 entries)]}
WriteConsoleStringCrLf(str : String)
<POP 2155a-2155c StackAdj> Δ+36 {}
<Const 0x2155c 0x3.4> Δ-4 {[##3]}
<Const 0x21560 0x1d.4> Δ-4 {[##3]|[##29]}
<Call 0x21564 0x20bfa> {[##3]|[##29]}
<POP 21568-2156a StackAdj> Δ+8 {}
<Call 0x2156a 0x103dc> {}
WriteConsoleCrLf(void)
<MI 2156c TST.W 0x2336a> {}
<MI 21572 BEQ 0x21792> {}
<POP 21576-215a4 Naked> Σ0 ↓
<Blob 0x21576 [36] @> Δ-36 {[«36""»]}
<POP 21586-21588 StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x21588 35> {[«36""»]|[$$ Microcode trace for Wcs Version_]}
<Call 0x21596 0x103d8> {[«36""»]|[$$ Microcode trace for Wcs Version_]}
WriteConsoleString(str : String)
<POP 21598-2159c StackAdj> Δ+40 {}
<Call 0x2159c 0x2147a> {}
<Call 0x215a0 0x103dc> {}
WriteConsoleCrLf(void)
<MI 215a2 MOVEQ.L #0x00,D7> {}
<POP 215a4-215d8 Naked> Σ0 ↓ →0x215da ←0x21636
<POP 0x215a4 LimitCheck 0x0 ≤ D7 ≤ 0x13> {}
<MI 215ae MOVE.L D7,D0> {}
<MI 215b0 ASL.L #0x1,D0> {}
<MI 215b2 LEA.L 0x22b0a,A0> {}
<MI 215b8 LEA.L (A0+D0.L),A0> {}
<MI 215bc MOVE.W #0x3fff,D0> {}
<MI 215c0 AND.W (A0+0x81a),D0> {}
<MI 215c4 MOVE.W D0,(A6-0x2)> {}
<MI 215c8 MOVEQ.L #0x00,D6> {}
<MI 215ca MOVE.W #0x4000,D1> {}
<MI 215ce AND.W (A0+0x81a),D1> {}
<MI 215d2 CMPI.W #0x4000,D1> {}
<MI 215d6 BNE 0x215da> {}
<POP 215d8-215da Naked> Σ0 ↓
<MI 215d8 ADDQ.B #0x1,D6> {}
<POP 215da-215ea Naked> Σ0 ↓ →0x215ec ←0x215a4
<MI 215da MOVEQ.L #0x00,D5> {}
<MI 215dc MOVE.W #0x8000,D1> {}
<MI 215e0 AND.W (A0+0x81a),D1> {}
<MI 215e4 CMPI.W #0x8000,D1> {}
<MI 215e8 BNE 0x215ec> {}
<POP 215ea-215ec Naked> Σ0 ↓
<MI 215ea ADDQ.B #0x1,D5> {}
<POP 215ec-215f0 Naked> Σ0 ↓ →0x21602 ←0x215da
<MI 215ec TST.B D6> {}
<MI 215ee BEQ 0x21602> {}
<POP 215f0-21602 Naked> Σ0 Δ-6 →0x21612
<Blob 0x215f0 [6] @> Δ-6 {[«6""»]}
<MI 21600 BRA 0x21612> {[«6""»]}
<POP 21602-21612 Naked> Σ0 Δ-6 ↓ ←0x215ec
<Blob 0x21602 [6] @> Δ-6 {[«6""»]}
<POP 21612-2162c Naked> Σ-6 Δ+6 ↓ →0x21632 ←0x215f0
<POP 21612-21614 StackAdj> Δ-4 {[-10-]}
<Lit 0x21614> {[-6-]|[$$…]}
<Pointer.sp 0x21614 4> Δ-4
<Const 0x21618 0x1.2> Δ-2
<Const 0x2161a 0x5.2> Δ-2
<Call 0x2161e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21620-21622 StackAdj> Δ+8
<Call 0x21622 0x103d8> {[-6-]|[$$…]}
WriteConsoleString(str : String)
<POP 21624-21628 StackAdj> Δ+10 {}
<MI 21628 TST.B D5> {}
<MI 2162a BEQ 0x21632> {}
<POP 2162c-21632 Naked> Σ0 Δ-2 →0x21636
<Blob 0x2162c [2] @> Δ-2 {[«2""»]}
<MI 21630 BRA 0x21636> {[«2""»]}
<POP 21632-21636 Naked> Σ0 Δ-2 ↓ ←0x21612
<Blob 0x21632 [2] @> Δ-2 {[«2""»]}
<POP 21636-21660 Naked> Σ-2 Δ+2 ↓ →0x215a4 ←0x2162c
<POP 21636-21638 StackAdj> Δ-4 {[-6-]}
<Lit 0x21638> {[-2-]|[$$…]}
<Pointer.sp 0x21638 4> Δ-4
<Const 0x2163c 0x1.2> Δ-2
<Const 0x2163e 0x2.2> Δ-2
<Call 0x21642 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21644-21646 StackAdj> Δ+8
<Call 0x21646 0x103d8> {[-2-]|[$$…]}
WriteConsoleString(str : String)
<POP 21648-2164a StackAdj> Δ+6 {}
<MI 2164a MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x2164c 0x20ce6> {[2, 'D0']}
<POP 21650-21652 StackAdj> Δ+2 {}
<Call 0x21652 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21654 ADDQ.L #0x1,D7> {}
<MI 21656 CMPI.L #0x00000013,D7> {}
<MI 2165c BLE 0x215a4> {}
<POP 21660-21690 Naked> Σ0 ↓
<Call 0x21660 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21662 [26] @> Δ-26 {[«26""»]}
<POP 21674-21676 StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x21676 25> {[«26""»]|[$$ Micro Stack contents :]}
<Call 0x21684 0x103e0> {[«26""»]|[$$ Micro Stack contents :]}
WriteConsoleStringCrLf(str : String)
<POP 2168a-2168e StackAdj> Δ+30 {}
<MI 2168e MOVEQ.L #0x00,D7> {}
<POP 21690-2170e Naked> Σ0 ↓ →0x21690 ←0x21690
<Blob 0x21690 [2] @> Δ-2 {[«2""»]}
<Blob 0x21694 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x21698 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 2169c-2169e StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-8-]}
<Lit 0x2169e 6> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$______]}
<MI 216aa MOVE.L D7,(A7)> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'D7']}
<POP 216a8-216aa StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x216ac 0x102e4> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 216b2-216b4 StackAdj> Δ+4 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x216b4 0x102d0> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 216ba-216bc StackAdj> Δ+8 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Call 0x216bc 0x103d8> {[«2""»]|[«2""»]|[«2""»]|[-4-]}
WriteConsoleString(str : String)
<POP 216be-216c0 StackAdj> Δ+6 {[«2""»]|[«2""»]}
<POP 216c0-216c1 StackAdj> Δ+2 {[«2""»]}
<Blob 0x216c1 [2] @> Δ-2 {[«2""»]|[«2""»]}
<MI 216c4 MOVE.B 0x20765,(A7+0x1)> {[«2""»]|[«2""»]}
<MI 216ca MOVE.B 0x20766,(A7+0x2)> {[«2""»]|[«2""»]}
<POP 216d0-216d2 StackAdj> Δ-4 {[«2""»]|[«2""»]|[-4-]}
<Lit 0x216d2 3> {[«2""»]|[«2""»]|[$$ -_]}
<Call 0x216e0 0x103d8> {[«2""»]|[«2""»]|[$$ -_]}
WriteConsoleString(str : String)
<POP 216e2-216e4 StackAdj> Δ+8 {}
<POP 0x216e4 LimitCheck 0x0 ≤ D7 ≤ 0xf> {}
<MI 216ea MOVE.L D7,D0> {}
<MI 216ec ASL.L #0x1,D0> {}
<MI 216ee LEA.L 0x22b0a,A0> {}
<MI 216f4 LEA.L (A0+D0.L),A0> {}
<MI 216f8 MOVE.W (A0+0xc52),-(A7)> Δ-2 {[2, '(A0+0xc52)']}
<Call 0x216fc 0x20ce6> {[2, '(A0+0xc52)']}
<POP 21700-21702 StackAdj> Δ+2 {}
<Call 0x21702 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21704 ADDQ.L #0x1,D7> {}
<MI 21706 CMPI.L #0x00000009,D7> {}
<MI 2170c BLE 0x21690> {}
<POP 2170e-21710 Naked> Σ0 ↓
<MI 2170e MOVEQ.L #0x0a,D7> {}
<POP 21710-2178e Naked> Σ0 ↓ →0x21710 ←0x21710
<Blob 0x21710 [6] @> Δ-6 {[«6""»]}
<POP 21720-21722 StackAdj> Δ-8 {[«6""»]|[-8-]}
<Lit 0x21722 5> {[«6""»]|[-4-]|[$$_____]}
<MI 2172e MOVE.L D7,(A7)> {[«6""»]|[-4-]|[4, 'D7']}
<POP 2172c-2172e StackAdj> Δ-8 {[«6""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x21730 0x102e4> {[«6""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 21736-21738 StackAdj> Δ+4 {[«6""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x21738 0x102d0> {[«6""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 2173e-21740 StackAdj> Δ+8 {[«6""»]|[-4-]}
<Call 0x21740 0x103d8> {[«6""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21742-21744 StackAdj> Δ+6 {[-4-]}
<POP 21744-21745 StackAdj> Δ+2 {[-2-]}
<Blob 0x21745 [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 21748 MOVE.B 0x20769,(A7+0x1)> {[-2-]|[«2""»]}
<MI 2174e MOVE.B 0x2076a,(A7+0x2)> {[-2-]|[«2""»]}
<POP 21754-21756 StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]}
<Lit 0x21756> {[-2-]|[«2""»]|[$$…]}
<Pointer.sp 0x21756 4> Δ-4
<Const 0x2175a 0x1.2> Δ-2
<Const 0x2175c 0x3.2> Δ-2
<Call 0x21760 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21762-21764 StackAdj> Δ+8
<Call 0x21764 0x103d8> {[-2-]|[«2""»]|[$$…]}
WriteConsoleString(str : String)
<POP 21766-21768 StackAdj> Δ+8 {}
<POP 0x21768 LimitCheck 0x0 ≤ D7 ≤ 0xf> {}
<MI 2176e MOVE.L D7,D0> {}
<MI 21770 ASL.L #0x1,D0> {}
<MI 21772 LEA.L 0x22b0a,A0> {}
<MI 21778 LEA.L (A0+D0.L),A0> {}
<MI 2177c MOVE.W (A0+0xc52),-(A7)> Δ-2 {[2, '(A0+0xc52)']}
<Call 0x21780 0x20ce6> {[2, '(A0+0xc52)']}
<POP 21784-21786 StackAdj> Δ+2 {}
<Call 0x21786 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21788 ADDQ.L #0x1,D7> {}
<MI 2178a CMP.L #0x0f,D7> {}
<MI 2178c BLE 0x21710> {}
<POP 2178e-21792 Naked> Σ0 →0x217b8
<Call 0x2178e 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21790 BRA 0x217b8> {}
<POP 21792-217b8 Naked> Σ0 ↓ ←0x21504
<Blob 0x21792 [42] @> Δ-42 {[«42""»]}
<POP 2179e-217a0 StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x217a0 42> {[«42""»]|[$$R1000 cpu state was not saved in tombstone]}
<Call 0x217ae 0x103e0> {[«42""»]|[$$R1000 cpu state was not saved in tombstone]}
WriteConsoleStringCrLf(str : String)
<POP 217b4-217b8 StackAdj> Δ+46 {}
<POP 217b8-217c0 Epilogue> Σ0 ←0x2178e
@ 217c0
<POP 217c0-2186e Body>
<POP 217c0-217d6 Prologue> Σ0 ↓
<POP 217d6-217da RegCacheLoad> Σ0 ↓
<POP 217da-2180c Naked> Σ0 ↓
<Blob 0x217da [20] @> Δ-20 {[«20""»]}
<POP 217ec-217ee StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x217ee 19> {[«20""»]|[$$Lex levels valid =>]}
<Call 0x21800 0x103d8> {[«20""»]|[$$Lex levels valid =>]}
WriteConsoleString(str : String)
<POP 21806-2180a StackAdj> Δ+24 {}
<MI 2180a MOVEQ.L #0x00,D7> {}
<POP 2180c-2182a Naked> Σ0 ↓ →0x2185a ←0x2185a
<POP 0x2180c LimitCheck 0x0 ≤ D7 ≤ 0xf> {}
<MI 21812 LEA.L 0x2375a,A0> {}
<MI 21818 MOVE.L D7,D0> {}
<MI 2181a ROR.L #0x3,D0> {}
<MI 2181c ADDA.W D0,A0> {}
<MI 2181e SWAP.W D0> {}
<MI 21820 ROL.W #0x3,D0> {}
<MI 21822 MOVE.B (A0),D1> {}
<MI 21824 LSL.B D0,D1> {}
<MI 21826 LSR.B #0x7,D1> {}
<MI 21828 BEQ 0x2185a> {}
<POP 2182a-2185a Naked> Σ0 ↓
<Blob 0x2182a [2] @> Δ-2 {[«2""»]}
<POP 2182e-21830 StackAdj> Δ-8 {[«2""»]|[-8-]}
<Lit 0x21830 2> {[«2""»]|[-4-]|[$$__]}
<MI 21840 MOVE.L D7,(A7)> {[«2""»]|[-4-]|[4, 'D7']}
<POP 2183a-21840 StackAdj> Δ-8 {[«2""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x21842 0x102e4> {[«2""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 21848-2184a StackAdj> Δ+4 {[«2""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x2184a 0x102d0> {[«2""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 21850-21852 StackAdj> Δ+8 {[«2""»]|[-4-]}
<Call 0x21852 0x103d8> {[«2""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21858-2185a StackAdj> Δ+6 {}
<POP 2185a-21860 Naked> Σ0 ↓ →0x2180c ←0x2180c
<MI 2185a ADDQ.L #0x1,D7> {}
<MI 2185c CMP.L #0x0f,D7> {}
<MI 2185e BLE 0x2180c> {}
<POP 21860-21866 Naked> Σ0 ↓
<Call 0x21860 0x103dc> {}
WriteConsoleCrLf(void)
<POP 21866-2186e Epilogue> Σ0
@ 2186e
<LVAR 0x012 2(r)>
<LVAR 0x010 2(r)>
<LVAR 0x00a 2(r)>
<LVAR 0x008 2(r)>
<POP 2186e-218d2 Body>
<POP 2186e-21884 Prologue> Σ0 ↓
<POP 21884-21888 RegCacheLoad> Σ0 ↓
<POP 21888-218ca Naked> Σ0 ↓
<MI 21888 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x2188c 0x20ce6> {[2, '(A6+0x8)']}
<MI 2188e MOVE.W (A6+0xa),(A7)> {[2, '(A6+0xa)']}
<Call 0x21892 0x20ce6> {[2, '(A6+0xa)']}
<POP 21894-21895 StackAdj> Δ+2 {}
<Blob 0x21895 [2] @> Δ-2 {[«2""»]}
<POP 21898-2189a StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x2189a 2> {[«2""»]|[$$__]}
<Call 0x218ae 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 218b4-218b6 StackAdj> Δ+4 {[«2""»]}
<MI 218b6 MOVE.W (A6+0x10),(A7)> {[2, '(A6+0x10)']}
<Call 0x218ba 0x20ce6> {[2, '(A6+0x10)']}
<MI 218bc MOVE.W (A6+0x12),(A7)> {[2, '(A6+0x12)']}
<Call 0x218c0 0x20ce6> {[2, '(A6+0x12)']}
<POP 218c2-218c4 StackAdj> Δ+2 {}
<Call 0x218c4 0x103dc> {}
WriteConsoleCrLf(void)
<POP 218ca-218d2 Epilogue> Σ0
@ 218d2
<POP 218d2-21c86 Body>
<POP 218d2-218e8 Prologue> Σ0 ↓
<POP 218e8-21906 RegCacheLoad> Σ0 ↓
<POP 21906-2197a Naked> Σ0 ↓ →0x21c58
<Blob 0x21906 [78] @> Δ-78 {[«78""»]}
<POP 21912-21914 StackAdj> Δ-4 {[«78""»]|[-4-]}
<Lit 0x21914 78> {[«78""»]|[$$******************************************************************************]}
<Call 0x21922 0x103e0> {[«78""»]|[$$******************************************************************************]}
WriteConsoleStringCrLf(str : String)
<POP 21928-2192c StackAdj> Δ+82 {}
<Const 0x2192c 0x3.4> Δ-4 {[##3]}
<Const 0x21930 0xb.4> Δ-4 {[##3]|[##11]}
<Call 0x21934 0x20bfa> {[##3]|[##11]}
<POP 21938-2193a StackAdj> Δ+8 {}
<Blob 0x2193a [14] @> Δ-14 {[«14""»]}
<POP 21946-21948 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x21948 14> {[«14""»]|[$$ UCODE STATE]}
<Call 0x21956 0x103e0> {[«14""»]|[$$ UCODE STATE]}
WriteConsoleStringCrLf(str : String)
<POP 2195c-21960 StackAdj> Δ+18 {}
<Const 0x21960 0x3.4> Δ-4 {[##3]}
<Const 0x21964 0xb.4> Δ-4 {[##3]|[##11]}
<Call 0x21968 0x20bfa> {[##3]|[##11]}
<POP 2196c-2196e StackAdj> Δ+8 {}
<Call 0x2196e 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21970 TST.W 0x2336a> {}
<MI 21976 BEQ 0x21c58> {}
<POP 2197a-21c58 Naked> Σ0 →0x21c7e
<Blob 0x2197a [10] @> Δ-10 {[«10""»]}
<POP 2198a-2198c StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x2198c 9> {[«10""»]|[$$ Top =>_]}
<Call 0x21998 0x103d8> {[«10""»]|[$$ Top =>_]}
WriteConsoleString(str : String)
<POP 2199a-2199c StackAdj> Δ+10 {[-4-]}
<POP 2199c-2199d StackAdj> Δ+4 {}
<Blob 0x2199d [4] 0x2377c> Δ-4 {[«4»]}
<Call 0x219a2 0x20d22> {[«4»]}
<POP 219a6-219a8 StackAdj> Δ+2 {[-2-]}
<POP 219a8-219a9 StackAdj> Δ+2 {}
<Blob 0x219a9 [2] @> Δ-2 {[«2""»]}
<POP 219ac-219ae StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x219ae 2> {[«2""»]|[$$__]}
<Call 0x219ba 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 219bc-219be StackAdj> Δ+2 {[«2""»]|[-2-]}
<POP 219be-219bf StackAdj> Δ+4 {}
<Blob 0x219bf [4] 0x23780> Δ-4 {[«4»]}
<Call 0x219c4 0x20d22> {[«4»]}
<POP 219c8-219ca StackAdj> Δ+4 {}
<Call 0x219ca 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x219cc [10] @> Δ-10 {[«10""»]}
<POP 219dc-219de StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x219de 9> {[«10""»]|[$$ Pred =>_]}
<Call 0x219ea 0x103d8> {[«10""»]|[$$ Pred =>_]}
WriteConsoleString(str : String)
<POP 219ec-219ee StackAdj> Δ+10 {[-4-]}
<POP 219ee-219ef StackAdj> Δ+4 {}
<Blob 0x219ef [4] 0x2377c> Δ-4 {[«4»]}
<Call 0x219f4 0x20d22> {[«4»]}
<POP 219f8-219fa StackAdj> Δ+2 {[-2-]}
<POP 219fa-219fb StackAdj> Δ+2 {}
<Blob 0x219fb [2] @> Δ-2 {[«2""»]}
<POP 219fe-21a00 StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x21a00 2> {[«2""»]|[$$__]}
<Call 0x21a0c 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 21a0e-21a10 StackAdj> Δ+2 {[«2""»]|[-2-]}
<POP 21a10-21a11 StackAdj> Δ+4 {}
<Blob 0x21a11 [4] 0x23784> Δ-4 {[«4»]}
<Call 0x21a16 0x20d22> {[«4»]}
<POP 21a1a-21a1c StackAdj> Δ+4 {}
<Call 0x21a1c 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21a1e [10] @> Δ-10 {[«10""»]}
<POP 21a2e-21a30 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x21a30 9> {[«10""»]|[$$ Save =>_]}
<Call 0x21a3c 0x103d8> {[«10""»]|[$$ Save =>_]}
WriteConsoleString(str : String)
<POP 21a3e-21a40 StackAdj> Δ+10 {[-4-]}
<POP 21a40-21a41 StackAdj> Δ+4 {}
<Blob 0x21a41 [4] 0x23788> Δ-4 {[«4»]}
<Call 0x21a46 0x20d22> {[«4»]}
<POP 21a4a-21a4c StackAdj> Δ+4 {}
<Call 0x21a4c 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x21a4e 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21a50 [4] @> Δ-4 {[«4""»]}
<Blob 0x21a54 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21a58-21a5a StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x21a5a 8> {[«4""»]|[«4""»]|[$$ PC =>_]}
<Call 0x21a66 0x103d8> {[«4""»]|[«4""»]|[$$ PC =>_]}
WriteConsoleString(str : String)
<POP 21a68-21a6a StackAdj> Δ+8 {[«4""»]}
<POP 21a6a-21a6b StackAdj> Δ+4 {}
<Blob 0x21a6b [4] 0x23790> Δ-4 {[«4»]}
<Blob 0x21a70 [4] 0x2378c> Δ-4 {[«4»]|[«4»]}
<Call 0x21a76 0x20d8e> {[«4»]|[«4»]}
<POP 21a7a-21a7c StackAdj> Δ+8 {}
<Call 0x21a7c 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21a7e [4] @> Δ-4 {[«4""»]}
<Blob 0x21a82 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21a86-21a88 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x21a88 8> {[«4""»]|[«4""»]|[$$ DPC =>_]}
<Call 0x21a94 0x103d8> {[«4""»]|[«4""»]|[$$ DPC =>_]}
WriteConsoleString(str : String)
<POP 21a96-21a98 StackAdj> Δ+8 {[«4""»]}
<POP 21a98-21a99 StackAdj> Δ+4 {}
<Blob 0x21a99 [4] 0x23798> Δ-4 {[«4»]}
<Blob 0x21a9e [4] 0x23794> Δ-4 {[«4»]|[«4»]}
<Call 0x21aa4 0x20d8e> {[«4»]|[«4»]}
<POP 21aa8-21aaa StackAdj> Δ+8 {}
<Call 0x21aaa 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x21aac 0x217c0> {}
<Call 0x21ab0 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21ab2 [4] @> Δ-4 {[«4""»]}
<Blob 0x21ab6 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21aba-21abc StackAdj> Δ-8 {[«4""»]|[«4""»]|[-8-]}
<Lit 0x21abc 8> {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]}
<POP 21ac6-21ac8 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]}
<MI 21ac8 CLR.L D0> {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]}
<MI 21aca MOVE.W 0x23750,D0> {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]}
<MI 21ad0 MOVE.L D0,-(A7)> Δ-4 {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]|[4, 'D0']}
<Const 0x21ad2 0x2.4> Δ-4 {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]|[4, 'D0']|[##2]}
<Call 0x21ad6 0x102e8> {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]|[4, 'D0']|[##2]}
Long2HexString(val : Long; ndig : Long) : String
<POP 21adc-21ade StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]}
<Call 0x21ade 0x102d0> {[«4""»]|[«4""»]|[-4-]|[$$ TLC =>_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21ae4-21ae6 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<Call 0x21ae6 0x103e0> {[«4""»]|[«4""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21aec-21aee StackAdj> Δ+8 {[«4""»]}
<POP 21aee-21aef StackAdj> Δ+4 {}
<Blob 0x21aef [4] @> Δ-4 {[«4""»]}
<Blob 0x21af2 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21af6-21af8 StackAdj> Δ-8 {[«4""»]|[«4""»]|[-8-]}
<Lit 0x21af8 8> {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]}
<POP 21b02-21b04 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]}
<MI 21b04 CLR.L D0> {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]}
<MI 21b06 MOVE.W 0x23752,D0> {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]}
<MI 21b0c MOVE.L D0,-(A7)> Δ-4 {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]|[4, 'D0']}
<Const 0x21b0e 0x2.4> Δ-4 {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]|[4, 'D0']|[##2]}
<Call 0x21b12 0x102e8> {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]|[4, 'D0']|[##2]}
Long2HexString(val : Long; ndig : Long) : String
<POP 21b18-21b1a StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]}
<Call 0x21b1a 0x102d0> {[«4""»]|[«4""»]|[-4-]|[$$ VLC =>_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21b20-21b22 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<Call 0x21b22 0x103e0> {[«4""»]|[«4""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21b28-21b2c StackAdj> Δ+12 {}
<Call 0x21b2c 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21b2e [4] @> Δ-4 {[«4""»]}
<Blob 0x21b32 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21b36-21b38 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x21b38 8> {[«4""»]|[«4""»]|[$$ MAR =>_]}
<Call 0x21b44 0x103d8> {[«4""»]|[«4""»]|[$$ MAR =>_]}
WriteConsoleString(str : String)
<POP 21b46-21b48 StackAdj> Δ+8 {[«4""»]}
<POP 21b48-21b49 StackAdj> Δ+4 {}
<Blob 0x21b49 [4] 0x23838> Δ-4 {[«4»]}
<Blob 0x21b4e [4] 0x23834> Δ-4 {[«4»]|[«4»]}
<Blob 0x21b54 [4] 0x23830> Δ-4 {[«4»]|[«4»]|[«4»]}
<Blob 0x21b5a [4] 0x2382c> Δ-4 {[«4»]|[«4»]|[«4»]|[«4»]}
<Call 0x21b60 0x20dec> {[«4»]|[«4»]|[«4»]|[«4»]}
<POP 21b64-21b66 StackAdj> Δ+16 {}
<Call 0x21b66 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21b68 [4] @> Δ-4 {[«4""»]}
<Blob 0x21b6c [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21b70-21b72 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x21b72 8> {[«4""»]|[«4""»]|[$$ TAR =>_]}
<Call 0x21b7e 0x103d8> {[«4""»]|[«4""»]|[$$ TAR =>_]}
WriteConsoleString(str : String)
<POP 21b80-21b82 StackAdj> Δ+8 {[«4""»]}
<POP 21b82-21b83 StackAdj> Δ+4 {}
<Blob 0x21b83 [4] 0x23840> Δ-4 {[«4»]}
<Blob 0x21b88 [4] 0x2383c> Δ-4 {[«4»]|[«4»]}
<Call 0x21b8e 0x20d52> {[«4»]|[«4»]}
<POP 21b92-21b94 StackAdj> Δ+6 {[-2-]}
<POP 21b94-21b95 StackAdj> Δ+2 {}
<Blob 0x21b95 [2] @> Δ-2 {[«2""»]}
<POP 21b98-21b9a StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x21b9a 2> {[«2""»]|[$$__]}
<Call 0x21ba6 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 21ba8-21ba9 StackAdj> Δ+6 ↓ {}
<Blob 0x21ba9 [8] @> Δ-8 {[«8""»]}
<POP 21bb8-21bba StackAdj> Δ-4 {[«8""»]|[-4-]}
<Lit 0x21bba 7> {[«8""»]|[$$VAR =>_]}
<Call 0x21bc8 0x103d8> {[«8""»]|[$$VAR =>_]}
WriteConsoleString(str : String)
<POP 21bca-21bcc StackAdj> Δ+8 {[-4-]}
<POP 21bcc-21bcd StackAdj> Δ+4 {}
<Blob 0x21bcd [4] 0x23848> Δ-4 {[«4»]}
<Blob 0x21bd2 [4] 0x23844> Δ-4 {[«4»]|[«4»]}
<Call 0x21bd8 0x20d52> {[«4»]|[«4»]}
<POP 21bdc-21bde StackAdj> Δ+8 {}
<Call 0x21bde 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21be0 [4] @> Δ-4 {[«4""»]}
<Blob 0x21be4 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21be8-21bea StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x21bea 8> {[«4""»]|[«4""»]|[$$ RDR =>_]}
<Call 0x21bf6 0x103d8> {[«4""»]|[«4""»]|[$$ RDR =>_]}
WriteConsoleString(str : String)
<POP 21bf8-21bfa StackAdj> Δ+8 {[«4""»]}
<POP 21bfa-21bfb StackAdj> Δ+4 {}
<Blob 0x21bfb [4] 0x23868> Δ-4 {[«4»]}
<Blob 0x21c00 [4] 0x23864> Δ-4 {[«4»]|[«4»]}
<Blob 0x21c06 [4] 0x23860> Δ-4 {[«4»]|[«4»]|[«4»]}
<Blob 0x21c0c [4] 0x2385c> Δ-4 {[«4»]|[«4»]|[«4»]|[«4»]}
<Call 0x21c12 0x20dec> {[«4»]|[«4»]|[«4»]|[«4»]}
<POP 21c16-21c18 StackAdj> Δ+16 {}
<Call 0x21c18 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21c1a [4] @> Δ-4 {[«4""»]}
<Blob 0x21c1e [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21c22-21c24 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x21c24 8> {[«4""»]|[«4""»]|[$$ WDR =>_]}
<Call 0x21c30 0x103d8> {[«4""»]|[«4""»]|[$$ WDR =>_]}
WriteConsoleString(str : String)
<POP 21c32-21c34 StackAdj> Δ+8 {[«4""»]}
<POP 21c34-21c35 StackAdj> Δ+4 {}
<Blob 0x21c35 [4] 0x23878> Δ-4 {[«4»]}
<Blob 0x21c3a [4] 0x23874> Δ-4 {[«4»]|[«4»]}
<Blob 0x21c40 [4] 0x23870> Δ-4 {[«4»]|[«4»]|[«4»]}
<Blob 0x21c46 [4] 0x2386c> Δ-4 {[«4»]|[«4»]|[«4»]|[«4»]}
<Call 0x21c4c 0x20dec> {[«4»]|[«4»]|[«4»]|[«4»]}
<POP 21c50-21c52 StackAdj> Δ+16 {}
<Call 0x21c52 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x21c54 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21c56 BRA 0x21c7e> {}
<POP 21c58-21c7e Naked> Σ0 ↓ ←0x21906
<Blob 0x21c58 [42] @> Δ-42 {[«42""»]}
<POP 21c64-21c66 StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x21c66 42> {[«42""»]|[$$R1000 cpu state was not saved in tombstone]}
<Call 0x21c74 0x103e0> {[«42""»]|[$$R1000 cpu state was not saved in tombstone]}
WriteConsoleStringCrLf(str : String)
<POP 21c7a-21c7e StackAdj> Δ+46 {}
<POP 21c7e-21c86 Epilogue> Σ0 ←0x2197a
@ 21c86
<POP 21c86-21f62 Body>
<POP 21c86-21c9c Prologue> Σ0 ↓
<POP 21c9c-21cba RegCacheLoad> Σ0 ↓
<POP 21cba-21d30 Naked> Σ0 ↓ →0x21f32
<Blob 0x21cba [78] @> Δ-78 {[«78""»]}
<POP 21cc6-21cc8 StackAdj> Δ-4 {[«78""»]|[-4-]}
<Lit 0x21cc8 78> {[«78""»]|[$$******************************************************************************]}
<Call 0x21cd6 0x103e0> {[«78""»]|[$$******************************************************************************]}
WriteConsoleStringCrLf(str : String)
<POP 21cdc-21ce0 StackAdj> Δ+82 {}
<Call 0x21ce0 0x103dc> {}
WriteConsoleCrLf(void)
<Const 0x21ce2 0x3.4> Δ-4 {[##3]}
<Const 0x21ce6 0x6.4> Δ-4 {[##3]|[##6]}
<Call 0x21cea 0x20bfa> {[##3]|[##6]}
<POP 21cee-21cef StackAdj> Δ+8 ↓ {}
<Blob 0x21cef [10] @> Δ-10 {[«10""»]}
<POP 21cfe-21d00 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x21d00 9> {[«10""»]|[$$ QUEUES]}
<Call 0x21d0c 0x103e0> {[«10""»]|[$$ QUEUES]}
WriteConsoleStringCrLf(str : String)
<POP 21d12-21d14 StackAdj> Δ+14 {}
<Const 0x21d14 0x3.4> Δ-4 {[##3]}
<Const 0x21d18 0x6.4> Δ-4 {[##3]|[##6]}
<Call 0x21d1c 0x20bfa> {[##3]|[##6]}
<POP 21d20-21d22 StackAdj> Δ+8 {}
<Call 0x21d22 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21d24 MOVE.W 0x2336a,D0> {}
<MI 21d2a CMP.W #0x01,D0> {}
<MI 21d2c BLS 0x21f32> {}
<POP 21d30-21d5e Naked> Σ0 ↓
<Blob 0x21d30 [24] @> Δ-24 {[«24""»]}
<POP 21d42-21d44 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x21d44 23> {[«24""»]|[$$ PRI HEAD TAIL]}
<Call 0x21d52 0x103e0> {[«24""»]|[$$ PRI HEAD TAIL]}
WriteConsoleStringCrLf(str : String)
<POP 21d58-21d5c StackAdj> Δ+28 {}
<MI 21d5c MOVEQ.L #0x00,D7> {}
<POP 21d5e-21dce Naked> Σ0 ↓ →0x21d5e ←0x21d5e
<Blob 0x21d5e [4] @> Δ-4 {[«4""»]}
<POP 21d62-21d64 StackAdj> Δ-8 {[«4""»]|[-8-]}
<Lit 0x21d64 4> {[«4""»]|[-4-]|[$$____]}
<MI 21d70 MOVE.L D7,(A7)> {[«4""»]|[-4-]|[4, 'D7']}
<POP 21d6e-21d70 StackAdj> Δ-8 {[«4""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x21d72 0x102e4> {[«4""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 21d78-21d7a StackAdj> Δ+4 {[«4""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x21d7a 0x102d0> {[«4""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 21d80-21d82 StackAdj> Δ+8 {[«4""»]|[-4-]}
<Call 0x21d82 0x103d8> {[«4""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21d84-21d86 StackAdj> Δ+6 {[-2-]}
<POP 21d86-21d87 StackAdj> Δ+2 {}
<Blob 0x21d87 [2] @> Δ-2 {[«2""»]}
<POP 21d8a-21d8c StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x21d8c 2> {[«2""»]|[$$__]}
<Call 0x21d98 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 21d9a-21d9c StackAdj> Δ+6 {}
<POP 0x21d9c LimitCheck 0x0 ≤ D7 ≤ 0xf> {}
<MI 21da2 MOVE.L D7,D0> {}
<MI 21da4 ASL.L #0x4,D0> {}
<MI 21da6 LEA.L 0x22b0a,A0> {}
<MI 21dac LEA.L (A0+D0.L),A0> {}
<MI 21db0 MOVE.L (A0+0xf8c),-(A7)> Δ-4 {[4, '(A0+0xf8c)']}
<MI 21db4 MOVE.L (A0+0xf88),-(A7)> Δ-4 {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']}
<MI 21db8 MOVE.L (A0+0xf84),-(A7)> Δ-4 {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']|[4, '(A0+0xf84)']}
<MI 21dbc MOVE.L (A0+0xf80),-(A7)> Δ-4 {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']|[4, '(A0+0xf84)']|[4, '(A0+0xf80)']}
<Call 0x21dc0 0x2186e> {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']|[4, '(A0+0xf84)']|[4, '(A0+0xf80)']}
<POP 21dc4-21dc8 StackAdj> Δ+16 {}
<MI 21dc8 ADDQ.L #0x1,D7> {}
<MI 21dca CMP.L #0x09,D7> {}
<MI 21dcc BLE 0x21d5e> {}
<POP 21dce-21dd0 Naked> Σ0 ↓
<MI 21dce MOVEQ.L #0x0a,D7> {}
<POP 21dd0-21e4e Naked> Σ0 ↓ →0x21dd0 ←0x21dd0
<POP 21dd0-21dd2 StackAdj> Δ-4 {[-4-]}
<POP 21dd2-21dd3 StackAdj> Δ+2 {[-2-]}
<Blob 0x21dd3 [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 21dd6 MOVE.B 0x2081d,(A7+0x1)> {[-2-]|[«2""»]}
<MI 21ddc MOVE.B 0x2081e,(A7+0x2)> {[-2-]|[«2""»]}
<POP 21de2-21de4 StackAdj> Δ-8 {[-2-]|[«2""»]|[-8-]}
<Lit 0x21de4> {[-2-]|[«2""»]|[-4-]|[$$…]}
<Pointer.sp 0x21de4 8> Δ-4
<Const 0x21de8 0x1.2> Δ-2
<Const 0x21dea 0x3.2> Δ-2
<Call 0x21dee 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<MI 21df0 MOVE.L D7,(A7)> {[-2-]|[«2""»]|[-4-]|[4, 'D7']}
<POP 21dee-21df0 StackAdj> Δ-8 {[-2-]|[«2""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x21df2 0x102e4> {[-2-]|[«2""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 21df8-21dfa StackAdj> Δ+4 {[-2-]|[«2""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x21dfa 0x102d0> {[-2-]|[«2""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 21e00-21e02 StackAdj> Δ+8 {[-2-]|[«2""»]|[-4-]}
<Call 0x21e02 0x103d8> {[-2-]|[«2""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21e04-21e06 StackAdj> Δ+6 {[-2-]}
<POP 21e06-21e07 StackAdj> Δ+2 {}
<Blob 0x21e07 [2] @> Δ-2 {[«2""»]}
<POP 21e0a-21e0c StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x21e0c 2> {[«2""»]|[$$__]}
<Call 0x21e18 0x103d8> {[«2""»]|[$$__]}
WriteConsoleString(str : String)
<POP 21e1a-21e1c StackAdj> Δ+6 {}
<POP 0x21e1c LimitCheck 0x0 ≤ D7 ≤ 0xf> {}
<MI 21e22 MOVE.L D7,D0> {}
<MI 21e24 ASL.L #0x4,D0> {}
<MI 21e26 LEA.L 0x22b0a,A0> {}
<MI 21e2c LEA.L (A0+D0.L),A0> {}
<MI 21e30 MOVE.L (A0+0xf8c),-(A7)> Δ-4 {[4, '(A0+0xf8c)']}
<MI 21e34 MOVE.L (A0+0xf88),-(A7)> Δ-4 {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']}
<MI 21e38 MOVE.L (A0+0xf84),-(A7)> Δ-4 {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']|[4, '(A0+0xf84)']}
<MI 21e3c MOVE.L (A0+0xf80),-(A7)> Δ-4 {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']|[4, '(A0+0xf84)']|[4, '(A0+0xf80)']}
<Call 0x21e40 0x2186e> {[4, '(A0+0xf8c)']|[4, '(A0+0xf88)']|[4, '(A0+0xf84)']|[4, '(A0+0xf80)']}
<POP 21e44-21e48 StackAdj> Δ+16 {}
<MI 21e48 ADDQ.L #0x1,D7> {}
<MI 21e4a CMP.L #0x0f,D7> {}
<MI 21e4c BLE 0x21dd0> {}
<POP 21e4e-21f32 Naked> Σ0 →0x21f58
<Call 0x21e4e 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21e50 [20] @> Δ-20 {[«20""»]}
<POP 21e5c-21e5e StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x21e5e 20> {[«20""»]|[$$ Delay Queue Head -_]}
<Call 0x21e6a 0x103d8> {[«20""»]|[$$ Delay Queue Head -_]}
WriteConsoleString(str : String)
<POP 21e6c-21e70 StackAdj> Δ+22 {[-2-]}
<POP 21e70-21e71 StackAdj> Δ+2 {}
<Blob 0x21e71 [2] 0x23b8a> Δ-2 {[«2»]}
<Call 0x21e76 0x20ce6> {[«2»]}
<POP 21e7a-21e7b StackAdj> Δ+2 {}
<Blob 0x21e7b [2] 0x23b8c> Δ-2 {[«2»]}
<Call 0x21e80 0x20ce6> {[«2»]}
<POP 21e84-21e86 StackAdj> Δ+2 {}
<Call 0x21e86 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x21e88 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21e8a [18] @> Δ-18 {[«18""»]}
<POP 21e96-21e98 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x21e98 18> {[«18""»]|[$$ Disk Wait Head -_]}
<Call 0x21ea6 0x103d8> {[«18""»]|[$$ Disk Wait Head -_]}
WriteConsoleString(str : String)
<POP 21ea8-21eaa StackAdj> Δ+20 {[-2-]}
<POP 21eaa-21eab StackAdj> Δ+2 {}
<Blob 0x21eab [2] 0x23b92> Δ-2 {[«2»]}
<Call 0x21eb0 0x20ce6> {[«2»]}
<POP 21eb4-21eb5 StackAdj> Δ+2 {}
<Blob 0x21eb5 [2] 0x23b94> Δ-2 {[«2»]}
<Call 0x21eba 0x20ce6> {[«2»]}
<POP 21ebe-21ec0 StackAdj> Δ+2 {}
<Call 0x21ec0 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x21ec2 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21ec4 [4] @> Δ-4 {[«4""»]}
<Blob 0x21ec8 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x21ecc [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 21ed0-21ed2 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x21ed2 12> {[«4""»]|[«4""»]|[«4""»]|[$$ FAQ Head -_]}
<Call 0x21ee0 0x103d8> {[«4""»]|[«4""»]|[«4""»]|[$$ FAQ Head -_]}
WriteConsoleString(str : String)
<POP 21ee2-21ee4 StackAdj> Δ+14 {[-2-]}
<POP 21ee4-21ee5 StackAdj> Δ+2 {}
<Blob 0x21ee5 [2] 0x23b9a> Δ-2 {[«2»]}
<Call 0x21eea 0x20ce6> {[«2»]}
<POP 21eee-21eef StackAdj> Δ+2 {}
<Blob 0x21eef [2] 0x23b9c> Δ-2 {[«2»]}
<Call 0x21ef4 0x20ce6> {[«2»]}
<POP 21ef8-21efa StackAdj> Δ+2 {}
<Call 0x21efa 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x21efc 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21efe [20] @> Δ-20 {[«20""»]}
<POP 21f0a-21f0c StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x21f0c 20> {[«20""»]|[$$ CURRENT LOAD REG -_]}
<Call 0x21f18 0x103d8> {[«20""»]|[$$ CURRENT LOAD REG -_]}
WriteConsoleString(str : String)
<POP 21f1a-21f1c StackAdj> Δ+20 {[-4-]}
<POP 21f1c-21f1d StackAdj> Δ+4 {}
<Blob 0x21f1d [4] 0x23ba6> Δ-4 {[«4»]}
<Blob 0x21f22 [4] 0x23ba2> Δ-4 {[«4»]|[«4»]}
<Call 0x21f28 0x20d52> {[«4»]|[«4»]}
<POP 21f2c-21f2e StackAdj> Δ+8 {}
<Call 0x21f2e 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21f30 BRA 0x21f58> {}
<POP 21f32-21f58 Naked> Σ0 ↓ ←0x21cba
<Blob 0x21f32 [42] @> Δ-42 {[«42""»]}
<POP 21f3e-21f40 StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x21f40 42> {[«42""»]|[$$R1000 cpu state was not saved in tombstone]}
<Call 0x21f4e 0x103e0> {[«42""»]|[$$R1000 cpu state was not saved in tombstone]}
WriteConsoleStringCrLf(str : String)
<POP 21f54-21f58 StackAdj> Δ+46 {}
<POP 21f58-21f5a Naked> Σ0 ↓ ←0x21e4e
<Call 0x21f58 0x103dc> {}
WriteConsoleCrLf(void)
<POP 21f5a-21f62 Epilogue> Σ0
@ 21f62
<POP 21f62-220c0 Body>
<POP 21f62-21f78 Prologue> Σ0 ↓
<POP 21f78-21f94 RegCacheLoad> Σ0 ↓
<POP 21f94-21f9e Naked> Σ0 ↓ →0x220b8
<MI 21f94 TST.W 0x2336a> {}
<MI 21f9a BEQ 0x220b8> {}
<POP 21f9e-21fa0 Naked> Σ0 ↓
<MI 21f9e MOVEQ.L #0x00,D6> {}
<POP 21fa0-2201c Naked> Σ0 ↓ →0x21fa0 ←0x21fa0
<Blob 0x21fa0 [4] @> Δ-4 {[«4""»]}
<Blob 0x21fa4 [6] @> Δ-6 {[«4""»]|[«6""»]}
<POP 21fb4-21fb6 StackAdj> Δ-8 {[«4""»]|[«6""»]|[-8-]}
<Lit 0x21fb6 4> {[«4""»]|[«6""»]|[-4-]|[$$ GP(]}
<MI 21fc0 MOVE.L D6,(A7)> {[«4""»]|[«6""»]|[-4-]|[4, 'D6']}
<POP 21fbe-21fc0 StackAdj> Δ-8 {[«4""»]|[«6""»]|[-4-]|[4, 'D6']|[-8-]}
<Const 0x21fc2 0x1.4> Δ-4 {[«4""»]|[«6""»]|[-4-]|[4, 'D6']|[-8-]|[##1]}
<Call 0x21fc6 0x102e8> {[«4""»]|[«6""»]|[-4-]|[4, 'D6']|[-8-]|[##1]}
Long2HexString(val : Long; ndig : Long) : String
<POP 21fcc-21fce StackAdj> Δ+4 {[«4""»]|[«6""»]|[-4-]|[4, 'D6']|[-8-]}
<Lit 0x21fce 5> {[«4""»]|[«6""»]|[-4-]|[4, 'D6']|[-4-]|[$$) =>_]}
<Call 0x21fda 0x102d4> {[«4""»]|[«6""»]|[-4-]|[4, 'D6']|[-4-]|[$$) =>_]}
StringCat3(a, b, c : String) : String
<POP 21fe0-21fe2 StackAdj> Δ+12 {[«4""»]|[«6""»]|[-4-]}
<Call 0x21fe2 0x103d8> {[«4""»]|[«6""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21fe8-21fec StackAdj> Δ+14 {}
<POP 0x21fec LimitCheck 0x0 ≤ D6 ≤ 0xf> {}
<MI 21ff2 MOVE.L D6,D0> {}
<MI 21ff4 ASL.L #0x4,D0> {}
<MI 21ff6 LEA.L 0x22b0a,A0> {}
<MI 21ff8 LEA.L (A0+D0.L),A0> {}
<MI 21ffc MOVE.L (A0+0xd7e),-(A7)> Δ-4 {[4, '(A0+0xd7e)']}
<MI 22000 MOVE.L (A0+0xd7a),-(A7)> Δ-4 {[4, '(A0+0xd7e)']|[4, '(A0+0xd7a)']}
<MI 22004 MOVE.L (A0+0xd76),-(A7)> Δ-4 {[4, '(A0+0xd7e)']|[4, '(A0+0xd7a)']|[4, '(A0+0xd76)']}
<MI 22008 MOVE.L (A0+0xd72),-(A7)> Δ-4 {[4, '(A0+0xd7e)']|[4, '(A0+0xd7a)']|[4, '(A0+0xd76)']|[4, '(A0+0xd72)']}
<Call 0x2200c 0x20dec> {[4, '(A0+0xd7e)']|[4, '(A0+0xd7a)']|[4, '(A0+0xd76)']|[4, '(A0+0xd72)']}
<POP 22010-22014 StackAdj> Δ+16 {}
<Call 0x22014 0x103dc> {}
WriteConsoleCrLf(void)
<MI 22016 ADDQ.L #0x1,D6> {}
<MI 22018 CMP.L #0x0f,D6> {}
<MI 2201a BLE 0x21fa0> {}
<POP 2201c-22030 Naked> Σ0 ↓
<MI 2201c CLR.L D0> {}
<MI 2201e MOVE.W 0x23f1c,D0> {}
<MI 22024 SUBI.L #0x000003f0,D0> {}
<MI 2202a MOVE.L D0,D7> {}
<Call 0x2202c 0x103dc> {}
WriteConsoleCrLf(void)
<MI 2202e MOVEQ.L #0x00,D6> {}
<POP 22030-220aa Naked> Σ0 ↓ →0x220ae ←0x220b0
<Blob 0x22030 [6] @> Δ-6 {[«6""»]}
<Blob 0x22040 [4] @> Δ-4 {[«6""»]|[«4""»]}
<POP 22044-22046 StackAdj> Δ-8 {[«6""»]|[«4""»]|[-8-]}
<Lit 0x22046 5> {[«6""»]|[«4""»]|[-4-]|[$$ TOP-]}
<MI 22050 MOVE.L D6,(A7)> {[«6""»]|[«4""»]|[-4-]|[4, 'D6']}
<POP 2204e-22050 StackAdj> Δ-8 {[«6""»]|[«4""»]|[-4-]|[4, 'D6']|[-8-]}
<Const 0x22052 0x1.4> Δ-4 {[«6""»]|[«4""»]|[-4-]|[4, 'D6']|[-8-]|[##1]}
<Call 0x22056 0x102e8> {[«6""»]|[«4""»]|[-4-]|[4, 'D6']|[-8-]|[##1]}
Long2HexString(val : Long; ndig : Long) : String
<POP 2205c-2205e StackAdj> Δ+4 {[«6""»]|[«4""»]|[-4-]|[4, 'D6']|[-8-]}
<Lit 0x2205e 4> {[«6""»]|[«4""»]|[-4-]|[4, 'D6']|[-4-]|[$$ =>_]}
<Call 0x2206a 0x102d4> {[«6""»]|[«4""»]|[-4-]|[4, 'D6']|[-4-]|[$$ =>_]}
StringCat3(a, b, c : String) : String
<POP 22070-22072 StackAdj> Δ+12 {[«6""»]|[«4""»]|[-4-]}
<Call 0x22072 0x103d8> {[«6""»]|[«4""»]|[-4-]}
WriteConsoleString(str : String)
<POP 22078-2207c StackAdj> Δ+14 {}
<POP 0x2207c LimitCheck 0x0 ≤ D7 ≤ 0xf> {}
<MI 22082 MOVE.L D7,D0> {}
<MI 22084 ASL.L #0x4,D0> {}
<MI 22086 LEA.L 0x22b0a,A0> {}
<MI 22088 LEA.L (A0+D0.L),A0> {}
<MI 2208c MOVE.L (A0+0xe7e),-(A7)> Δ-4 {[4, '(A0+0xe7e)']}
<MI 22090 MOVE.L (A0+0xe7a),-(A7)> Δ-4 {[4, '(A0+0xe7e)']|[4, '(A0+0xe7a)']}
<MI 22094 MOVE.L (A0+0xe76),-(A7)> Δ-4 {[4, '(A0+0xe7e)']|[4, '(A0+0xe7a)']|[4, '(A0+0xe76)']}
<MI 22098 MOVE.L (A0+0xe72),-(A7)> Δ-4 {[4, '(A0+0xe7e)']|[4, '(A0+0xe7a)']|[4, '(A0+0xe76)']|[4, '(A0+0xe72)']}
<Call 0x2209c 0x20dec> {[4, '(A0+0xe7e)']|[4, '(A0+0xe7a)']|[4, '(A0+0xe76)']|[4, '(A0+0xe72)']}
<POP 220a0-220a4 StackAdj> Δ+16 {}
<Call 0x220a4 0x103dc> {}
WriteConsoleCrLf(void)
<MI 220a6 TST.L D7> {}
<MI 220a8 BNE 0x220ae> {}
<POP 220aa-220ae Naked> Σ0 →0x220b0
<MI 220aa MOVEQ.L #0x0f,D7> {}
<MI 220ac BRA 0x220b0> {}
<POP 220ae-220b0 Naked> Σ0 ↓ ←0x22030
<MI 220ae SUBQ.L #0x1,D7> {}
<POP 220b0-220b8 Naked> Σ0 ↓ →0x22030 ←0x220aa
<MI 220b0 ADDQ.L #0x1,D6> {}
<MI 220b2 CMP.L #0x0f,D6> {}
<MI 220b4 BLE 0x22030> {}
<POP 220b8-220c0 Epilogue> Σ0 ←0x21f94
@ 220c0
<POP 220c0-22134 Body>
<POP 220c0-220d6 Prologue> Σ0 ↓
<POP 220d6-220d8 RegCacheLoad> Σ0 ↓
<POP 220d8-2212c Naked> Σ0 ↓
<Call 0x220d8 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x220de [10] @> Δ-10 {[«10""»]}
<POP 220ea-220ec StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x220ec 10> {[«10""»]|[$$ PFMAR =>_]}
<Call 0x220fe 0x103d8> {[«10""»]|[$$ PFMAR =>_]}
WriteConsoleString(str : String)
<POP 22104-22106 StackAdj> Δ+10 {[-4-]}
<POP 22106-22107 StackAdj> Δ+4 {}
<Blob 0x22107 [4] 0x23bb6> Δ-4 {[«4»]}
<Blob 0x2210c [4] 0x23bb2> Δ-4 {[«4»]|[«4»]}
<Blob 0x22112 [4] 0x23bae> Δ-4 {[«4»]|[«4»]|[«4»]}
<Blob 0x22118 [4] 0x23baa> Δ-4 {[«4»]|[«4»]|[«4»]|[«4»]}
<Call 0x2211e 0x20dec> {[«4»]|[«4»]|[«4»]|[«4»]}
<POP 22122-22126 StackAdj> Δ+16 {}
<Call 0x22126 0x103dc> {}
WriteConsoleCrLf(void)
<POP 2212c-22134 Epilogue> Σ0
@ 22134
START
<POP 22134--0001 Body> Δ+36
<POP 22134-2213e Prologue> Σ0
<POP 2213e-2215c RegCacheLoad> Σ0 ↓
<POP 2215c-22168 Naked> Σ0 ↓
<Call 0x2215c 0x10398> {}
FSCALL_10398
<MI 22162 CLR.B 0x23f26> {}
<POP 22168-221b2 Naked> Σ0 ↓ ←0x228e6
<Call 0x22168 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x2216e [4] @> Δ-4 {[«4""»]}
<Blob 0x22172 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x22176 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 2217a-2217c StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x2217c 12> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]}
<Call 0x22188 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]}
WriteConsoleStringCrLf(str : String)
<POP 2218a-2218b StackAdj> Δ+16 ↓ {}
<Blob 0x2218b [14] @> Δ-14 {[«14""»]}
<POP 2219a-2219c StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x2219c 13> {[«14""»]|[$$ 0 => Exit]}
<Call 0x221aa 0x103e0> {[«14""»]|[$$ 0 => Exit]}
WriteConsoleStringCrLf(str : String)
<POP 221ac-221b0 StackAdj> Δ+18 {}
<MI 221b0 MOVEQ.L #0x01,D0> {}
<POP 221b2-2220c Naked> Σ0 ↓ →0x221b2 ←0x221b2
<MI 221b2 MOVE.L D0,0x22b12> {}
<Blob 0x221b8 [4] @> Δ-4 {[«4""»]}
<Blob 0x221bc [28] @> Δ-28 {[«4""»]|[«28""»]}
<POP 221ce-221d0 StackAdj> Δ-8 {[«4""»]|[«28""»]|[-8-]}
<Lit 0x221d0 4> {[«4""»]|[«28""»]|[-4-]|[$$____]}
<MI 221da MOVE.L D0,(A7)> {[«4""»]|[«28""»]|[-4-]|[4, 'D0']}
<POP 221d8-221da StackAdj> Δ-8 {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-8-]}
<Call 0x221dc 0x102e4> {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-8-]}
Long2String(a : Long) : String
<Lit 0x221e2 27> {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-4-]|[$$ => Display tombstone file_]}
<MI 221ee MOVE.L D0,(A7)> {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-4-]|[4, 'D0']}
<POP 221ec-221ee StackAdj> Δ-8 {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-4-]|[4, 'D0']|[-8-]}
<Call 0x221f0 0x102e4> {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-4-]|[4, 'D0']|[-8-]}
Long2String(a : Long) : String
<POP 221f6-221f8 StackAdj> Δ+4 {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-4-]|[4, 'D0']|[-4-]}
<Call 0x221f8 0x102d8> {[«4""»]|[«28""»]|[-4-]|[4, 'D0']|[-4-]|[4, 'D0']|[-4-]}
StringCat4(a, b, c, d : String) : String
<POP 221fe-22200 StackAdj> Δ+16 {[«4""»]|[«28""»]|[-4-]}
<Call 0x22200 0x103e0> {[«4""»]|[«28""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22202-22206 StackAdj> Δ+36 {}
<MI 22206 ADDQ.L #0x1,D0> {}
<MI 22208 CMP.L #0x04,D0> {}
<MI 2220a BLE 0x221b2> {}
<POP 2220c-22260 Naked> Σ0 →0x2226a →0x22272 →0x22284 →0x22296 →0x222a8
<Call 0x2220c 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x22212 [16] @> Δ-16 {[«16""»]}
<POP 22222-22224 StackAdj> Δ-8 {[«16""»]|[-8-]}
<Lit 0x22224 15> {[«16""»]|[-4-]|[$$Enter option :_]}
<Const 0x22232 0x0.4> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]}
<Const 0x22236 0x4.4> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[##4]}
<Call 0x2223a 0x103ec> {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[##4]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 22240-22242 StackAdj> Δ+12 {[«16""»]|[-4-]}
<MI 22242 MOVE.L (A7)+,0x23f1e> Δ+4 {[«16""»]}
<POP 22248-2224a StackAdj> Δ+16 {}
<MI 2224a MOVE.L 0x23f1e,D0> {}
<POP 0x22250 LimitCheck 0x0 ≤ D0 ≤ 0x4> {}
<MI 22256 ADD.W D0,D0> {}
<MI 22258 SWITCH D0.W> {}
<POP 2226a-22272 Naked> Σ0 →0x222e2 ←0x2220c
<MI 2226a MOVE.B #0x01,0x23f26> {}
<MI 22270 BRA 0x222e2> {}
<POP 22272-22284 Naked> Σ0 Δ-12 →0x222b8 ←0x2220c
<Blob 0x22272 [12] @> Δ-12 {[«12""»]}
<MI 22282 BRA 0x222b8> {[«12""»]}
<POP 22284-22296 Naked> Σ0 Δ-12 →0x222b8 ←0x2220c
<Blob 0x22284 [12] @> Δ-12 {[«12""»]}
<MI 22294 BRA 0x222b8> {[«12""»]}
<POP 22296-222a8 Naked> Σ0 Δ-12 →0x222b8 ←0x2220c
<Blob 0x22296 [12] @> Δ-12 {[«12""»]}
<MI 222a6 BRA 0x222b8> {[«12""»]}
<POP 222a8-222b8 Naked> Σ0 Δ-12 ↓ ←0x2220c
<Blob 0x222a8 [12] @> Δ-12 {[«12""»]}
<POP 222b8-222e2 Naked> Σ-12 Δ+12 ↓ ←0x22272 ←0x22284 ←0x22296
<POP 222b8-222ba StackAdj> Δ-4 {[-16-]}
<Lit 0x222ba> {[-12-]|[$$…]}
<Pointer.sp 0x222ba 4> Δ-4
<Const 0x222be 0x1.2> Δ-2
<Const 0x222c0 0xb.2> Δ-2
<Call 0x222c4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 222c6-222c8 StackAdj> Δ+8
<POP 222c6-222c8 StackAdj> Δ-2 {[-12-]|[$$…]|[-2-]}
<MI 222c8 CLR.B (A7)> {[-12-]|[$$…]|[-2-]}
<Const 0x222ca 0x1.2> Δ-2 {[-12-]|[$$…]|[-2-]|[#1]}
<Const 0x222cc 0x0.4> Δ-4 {[-12-]|[$$…]|[-2-]|[#1]|[##0]}
<Const 0x222d0 0x2331e.4> Δ-4 {[-12-]|[$$…]|[-2-]|[#1]|[##0]|[##144158]}
<Const 0x222d2 0x22b16.4> Δ-4 {[-12-]|[$$…]|[-2-]|[#1]|[##0]|[##144158]|[##142102]}
<Call 0x222d8 0x10380> {[-12-]|[$$…]|[-2-]|[#1]|[##0]|[##144158]|[##142102]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 222de-222e2 StackAdj> Δ+32 {}
<POP 222e2-222ea Naked> Σ0 ↓ →0x222ee ←0x2226a
<MI 222e2 TST.B 0x23f26> {}
<MI 222e8 BEQ 0x222ee> {}
<POP 222ea-222ee Naked> Σ0 →0x228f0
<MI 222ea BRA 0x228f0> {}
<POP 222ee-222f2 Naked> Σ0 ↓ →0x22332 ←0x222e2
<MI 222ee TST.B 0x2331e> {}
<MI 222f0 BEQ 0x22332> {}
<POP 222f2-22332 Naked> Σ0 →0x228e6
<Blob 0x222f2 [26] @> Δ-26 {[«26""»]}
<POP 22304-22306 StackAdj> Δ-8 {[«26""»]|[-8-]}
<Lit 0x22306 25> {[«26""»]|[-4-]|[$$Could not find tombstone_]}
<POP 22312-22313 StackAdj> Δ-4 {[«26""»]|[-4-]|[$$Could not find tombstone_]|[-4-]}
<Blob 0x22313 [4] 0x23f1e> Δ-4 {[«26""»]|[-4-]|[$$Could not find tombstone_]|[-4-]|[«4»]}
<Call 0x22318 0x102e4> {[«26""»]|[-4-]|[$$Could not find tombstone_]|[-4-]|[«4»]}
Long2String(a : Long) : String
<POP 2231e-22320 StackAdj> Δ+4 {[«26""»]|[-4-]|[$$Could not find tombstone_]|[-4-]}
<Call 0x22320 0x102d0> {[«26""»]|[-4-]|[$$Could not find tombstone_]|[-4-]}
StringCat2(a, b : String) : String
<POP 22326-22328 StackAdj> Δ+8 {[«26""»]|[-4-]}
<Call 0x22328 0x103e0> {[«26""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2232a-2232e StackAdj> Δ+30 {}
<MI 2232e BRA 0x228e6> {}
<POP 22332-2258e Naked> Σ0 ↓ ←0x222ee
<Blob 0x22332 [4] 0x22b16> Δ-4 {[«4»]}
<MI 22338 CLR.W -(A7)> Δ-2 {[«4»]|[#0]}
<MI 2233a CLR.W -(A7)> Δ-2 {[«4»]|[#0]|[#0]}
<Const 0x2233c 0x200.2> Δ-2 {[«4»]|[#0]|[#0]|[#512]}
<Const 0x22340 0x1.2> Δ-2 {[«4»]|[#0]|[#0]|[#512]|[#1]}
<MI 22342 LEA.L 0x22b1e,A0> {[«4»]|[#0]|[#0]|[#512]|[#1]}
<MI 22348 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#0]|[#0]|[#512]|[#1]|[4, 'A0']}
<Const 0x2234a 0x2331e.4> Δ-4 {[«4»]|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[##144158]}
<Call 0x2234c 0x10384> {[«4»]|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[##144158]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 22352-22354 StackAdj> Δ+20 {}
<MI 22354 LEA.L 0x22b1e,A0> {}
<MI 2235a MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2235c LEA.L 0x2334c,A0> {[4, 'A0']}
<MI 22362 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']|[4, 'A0']}
<Const 0x22364 0x400.2> Δ-2 {[4, 'A0']|[4, 'A0']|[#1024]}
<Call 0x22368 0x10238> {[4, 'A0']|[4, 'A0']|[#1024]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 2236e-22370 StackAdj> Δ+6 {[4, 'A0']}
<POP 22370-22371 StackAdj> Δ+4 {}
<Blob 0x22371 [4] 0x22b16> Δ-4 {[«4»]}
<Const 0x22376 0x1.2> Δ-2 {[«4»]|[#1]}
<MI 22378 CLR.W -(A7)> Δ-2 {[«4»]|[#1]|[#0]}
<Const 0x2237a 0x200.2> Δ-2 {[«4»]|[#1]|[#0]|[#512]}
<Const 0x2237e 0x1.2> Δ-2 {[«4»]|[#1]|[#0]|[#512]|[#1]}
<MI 22380 LEA.L 0x22f1e,A0> {[«4»]|[#1]|[#0]|[#512]|[#1]}
<MI 22386 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#1]|[#0]|[#512]|[#1]|[4, 'A0']}
<Const 0x22388 0x2331e.4> Δ-4 {[«4»]|[#1]|[#0]|[#512]|[#1]|[4, 'A0']|[##144158]}
<Call 0x2238a 0x10384> {[«4»]|[#1]|[#0]|[#512]|[#1]|[4, 'A0']|[##144158]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 22390-22392 StackAdj> Δ+16 {[«4»]}
<POP 22392-22393 StackAdj> Δ+4 {}
<Blob 0x22393 [4] 0x22b16> Δ-4 {[«4»]}
<Const 0x22398 0x3.2> Δ-2 {[«4»]|[#3]}
<Const 0x2239c 0x30.2> Δ-2 {[«4»]|[#3]|[#48]}
<Const 0x223a0 0x2.2> Δ-2 {[«4»]|[#3]|[#48]|[#2]}
<Const 0x223a2 0x1.2> Δ-2 {[«4»]|[#3]|[#48]|[#2]|[#1]}
<MI 223a4 LEA.L 0x23efa,A0> {[«4»]|[#3]|[#48]|[#2]|[#1]}
<MI 223aa MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#3]|[#48]|[#2]|[#1]|[4, 'A0']}
<Const 0x223ac 0x2331e.4> Δ-4 {[«4»]|[#3]|[#48]|[#2]|[#1]|[4, 'A0']|[##144158]}
<Call 0x223ae 0x10384> {[«4»]|[#3]|[#48]|[#2]|[#1]|[4, 'A0']|[##144158]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 223b4-223b6 StackAdj> Δ+16 {[«4»]}
<POP 223b6-223b7 StackAdj> Δ+4 {}
<Blob 0x223b7 [4] 0x22b16> Δ-4 {[«4»]}
<Const 0x223bc 0x3.2> Δ-2 {[«4»]|[#3]}
<Const 0x223c0 0x60.2> Δ-2 {[«4»]|[#3]|[#96]}
<Const 0x223c4 0x1a0.2> Δ-2 {[«4»]|[#3]|[#96]|[#416]}
<Const 0x223c8 0x1.2> Δ-2 {[«4»]|[#3]|[#96]|[#416]|[#1]}
<MI 223ca LEA.L 0x23bba,A0> {[«4»]|[#3]|[#96]|[#416]|[#1]}
<MI 223d0 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#3]|[#96]|[#416]|[#1]|[4, 'A0']}
<Const 0x223d2 0x2331e.4> Δ-4 {[«4»]|[#3]|[#96]|[#416]|[#1]|[4, 'A0']|[##144158]}
<Call 0x223d4 0x10384> {[«4»]|[#3]|[#96]|[#416]|[#1]|[4, 'A0']|[##144158]}
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,0x23efa> {}
<Blob 0x223e6 [4] 0x22b16> Δ-4 {[«4»]}
<Const 0x223ec 0xa.2> Δ-2 {[«4»]|[#10]}
<Const 0x223f0 0x9.2> Δ-2 {[«4»]|[#10]|[#9]}
<Const 0x223f4 0x1.2> Δ-2 {[«4»]|[#10]|[#9]|[#1]}
<Const 0x223f6 0x1.2> Δ-2 {[«4»]|[#10]|[#9]|[#1]|[#1]}
<MI 223f8 LEA.L 0x23f1c,A0> {[«4»]|[#10]|[#9]|[#1]|[#1]}
<MI 223fe MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#10]|[#9]|[#1]|[#1]|[4, 'A0']}
<Const 0x22400 0x2331e.4> Δ-4 {[«4»]|[#10]|[#9]|[#1]|[#1]|[4, 'A0']|[##144158]}
<Call 0x22402 0x10384> {[«4»]|[#10]|[#9]|[#1]|[#1]|[4, 'A0']|[##144158]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 22408-2240a StackAdj> Δ+16 {[«4»]}
<POP 2240a-2240b StackAdj> Δ+4 {}
<Blob 0x2240b [4] 0x22b16> Δ-4 {[«4»]}
<Const 0x22410 0xe.2> Δ-2 {[«4»]|[#14]}
<MI 22414 CLR.W -(A7)> Δ-2 {[«4»]|[#14]|[#0]}
<Const 0x22416 0x200.2> Δ-2 {[«4»]|[#14]|[#0]|[#512]}
<Const 0x2241a 0x1.2> Δ-2 {[«4»]|[#14]|[#0]|[#512]|[#1]}
<MI 2241c LEA.L 0x22b1e,A0> {[«4»]|[#14]|[#0]|[#512]|[#1]}
<MI 22422 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#14]|[#0]|[#512]|[#1]|[4, 'A0']}
<Const 0x22424 0x2331e.4> Δ-4 {[«4»]|[#14]|[#0]|[#512]|[#1]|[4, 'A0']|[##144158]}
<Call 0x22426 0x10384> {[«4»]|[#14]|[#0]|[#512]|[#1]|[4, 'A0']|[##144158]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 2242c-2242e StackAdj> Δ+20 {}
<MI 2242e LEA.L 0x22b1e,A0> {}
<MI 22434 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 22436 LEA.L 0x2374c,A0> {[4, 'A0']}
<MI 2243c MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']|[4, 'A0']}
<Const 0x2243e 0x33d.2> Δ-2 {[4, 'A0']|[4, 'A0']|[#829]}
<Call 0x22442 0x10238> {[4, 'A0']|[4, 'A0']|[#829]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 22448-2244a StackAdj> Δ+6 {[4, 'A0']}
<POP 2244a-2244b StackAdj> Δ+4 {}
<Blob 0x2244b [4] 0x22b16> Δ-4 {[«4»]}
<Const 0x22450 0x10.2> Δ-2 {[«4»]|[#16]}
<Const 0x22452 0x1ec.2> Δ-2 {[«4»]|[#16]|[#492]}
<Const 0x22456 0x14.2> Δ-2 {[«4»]|[#16]|[#492]|[#20]}
<Const 0x22458 0x1.2> Δ-2 {[«4»]|[#16]|[#492]|[#20]|[#1]}
<MI 2245a LEA.L 0x23324,A0> {[«4»]|[#16]|[#492]|[#20]|[#1]}
<MI 22460 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#16]|[#492]|[#20]|[#1]|[4, 'A0']}
<Const 0x22462 0x2331e.4> Δ-4 {[«4»]|[#16]|[#492]|[#20]|[#1]|[4, 'A0']|[##144158]}
<Call 0x22464 0x10384> {[«4»]|[#16]|[#492]|[#20]|[#1]|[4, 'A0']|[##144158]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 2246a-2246c StackAdj> Δ+16 {[«4»]}
<POP 2246c-2246d StackAdj> Δ+4 {}
<Blob 0x2246d [4] 0x22b16> Δ-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 0x23efe,A0> {[«4»]|[#17]|[#20]|[#15]|[#1]}
<MI 22484 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#17]|[#20]|[#15]|[#1]|[4, 'A0']}
<Const 0x22486 0x2331e.4> Δ-4 {[«4»]|[#17]|[#20]|[#15]|[#1]|[4, 'A0']|[##144158]}
<Call 0x22488 0x10384> {[«4»]|[#17]|[#20]|[#15]|[#1]|[4, 'A0']|[##144158]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 2248e-22490 StackAdj> Δ+16 {[«4»]}
<POP 22490-22491 StackAdj> Δ+4 {}
<Blob 0x22491 [4] 0x22b16> Δ-4 {[«4»]}
<Const 0x22496 0x13.2> Δ-2 {[«4»]|[#19]}
<Const 0x2249a 0x100.2> Δ-2 {[«4»]|[#19]|[#256]}
<Const 0x2249e 0x80.2> Δ-2 {[«4»]|[#19]|[#256]|[#128]}
<Const 0x224a2 0x1.2> Δ-2 {[«4»]|[#19]|[#256]|[#128]|[#1]}
<MI 224a4 LEA.L 0x23a8a,A0> {[«4»]|[#19]|[#256]|[#128]|[#1]}
<MI 224aa MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#19]|[#256]|[#128]|[#1]|[4, 'A0']}
<Const 0x224ac 0x2331e.4> Δ-4 {[«4»]|[#19]|[#256]|[#128]|[#1]|[4, 'A0']|[##144158]}
<Call 0x224ae 0x10384> {[«4»]|[#19]|[#256]|[#128]|[#1]|[4, 'A0']|[##144158]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 224b4-224b6 StackAdj> Δ+16 {[«4»]}
<POP 224b6-224b7 StackAdj> Δ+4 {}
<Blob 0x224b7 [4] 0x22b16> Δ-4 {[«4»]}
<Const 0x224bc 0x13.2> Δ-2 {[«4»]|[#19]}
<Const 0x224c0 0x180.2> Δ-2 {[«4»]|[#19]|[#384]}
<Const 0x224c4 0x2.2> Δ-2 {[«4»]|[#19]|[#384]|[#2]}
<Const 0x224c6 0x1.2> Δ-2 {[«4»]|[#19]|[#384]|[#2]|[#1]}
<MI 224c8 LEA.L 0x23b9a,A0> {[«4»]|[#19]|[#384]|[#2]|[#1]}
<MI 224ce MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#19]|[#384]|[#2]|[#1]|[4, 'A0']}
<Const 0x224d0 0x2331e.4> Δ-4 {[«4»]|[#19]|[#384]|[#2]|[#1]|[4, 'A0']|[##144158]}
<Call 0x224d2 0x10384> {[«4»]|[#19]|[#384]|[#2]|[#1]|[4, 'A0']|[##144158]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 224d8-224da StackAdj> Δ+16 {[«4»]}
<POP 224da-224db StackAdj> Δ+4 {}
<Blob 0x224db [4] 0x22b16> Δ-4 {[«4»]}
<Const 0x224e0 0x13.2> Δ-2 {[«4»]|[#19]}
<Const 0x224e4 0x188.2> Δ-2 {[«4»]|[#19]|[#392]}
<Const 0x224e8 0x2.2> Δ-2 {[«4»]|[#19]|[#392]|[#2]}
<Const 0x224ea 0x1.2> Δ-2 {[«4»]|[#19]|[#392]|[#2]|[#1]}
<MI 224ec LEA.L 0x23b92,A0> {[«4»]|[#19]|[#392]|[#2]|[#1]}
<MI 224f2 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#19]|[#392]|[#2]|[#1]|[4, 'A0']}
<Const 0x224f4 0x2331e.4> Δ-4 {[«4»]|[#19]|[#392]|[#2]|[#1]|[4, 'A0']|[##144158]}
<Call 0x224f6 0x10384> {[«4»]|[#19]|[#392]|[#2]|[#1]|[4, 'A0']|[##144158]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 224fc-224fe StackAdj> Δ+16 {[«4»]}
<POP 224fe-224ff StackAdj> Δ+4 {}
<Blob 0x224ff [4] 0x22b16> Δ-4 {[«4»]}
<Const 0x22504 0x14.2> Δ-2 {[«4»]|[#20]}
<Const 0x22506 0x54.2> Δ-2 {[«4»]|[#20]|[#84]}
<Const 0x2250a 0x4.2> Δ-2 {[«4»]|[#20]|[#84]|[#4]}
<Const 0x2250c 0x1.2> Δ-2 {[«4»]|[#20]|[#84]|[#4]|[#1]}
<MI 2250e LEA.L 0x23ba2,A0> {[«4»]|[#20]|[#84]|[#4]|[#1]}
<MI 22514 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#20]|[#84]|[#4]|[#1]|[4, 'A0']}
<Const 0x22516 0x2331e.4> Δ-4 {[«4»]|[#20]|[#84]|[#4]|[#1]|[4, 'A0']|[##144158]}
<Call 0x22518 0x10384> {[«4»]|[#20]|[#84]|[#4]|[#1]|[4, 'A0']|[##144158]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 2251e-22520 StackAdj> Δ+16 {[«4»]}
<POP 22520-22521 StackAdj> Δ+4 {}
<Blob 0x22521 [4] 0x22b16> Δ-4 {[«4»]}
<Const 0x22526 0x18.2> Δ-2 {[«4»]|[#24]}
<Const 0x2252a 0x100.2> Δ-2 {[«4»]|[#24]|[#256]}
<Const 0x2252e 0x8.2> Δ-2 {[«4»]|[#24]|[#256]|[#8]}
<Const 0x22532 0x1.2> Δ-2 {[«4»]|[#24]|[#256]|[#8]|[#1]}
<MI 22534 LEA.L 0x23baa,A0> {[«4»]|[#24]|[#256]|[#8]|[#1]}
<MI 2253a MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#24]|[#256]|[#8]|[#1]|[4, 'A0']}
<Const 0x2253c 0x2331e.4> Δ-4 {[«4»]|[#24]|[#256]|[#8]|[#1]|[4, 'A0']|[##144158]}
<Call 0x2253e 0x10384> {[«4»]|[#24]|[#256]|[#8]|[#1]|[4, 'A0']|[##144158]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 22544-22546 StackAdj> Δ+16 {[«4»]}
<POP 22546-22547 StackAdj> Δ+4 {}
<Blob 0x22547 [4] 0x22b16> Δ-4 {[«4»]}
<Const 0x2254c 0x1d.2> Δ-2 {[«4»]|[#29]}
<Const 0x22550 0x100.2> Δ-2 {[«4»]|[#29]|[#256]}
<Const 0x22554 0x2.2> Δ-2 {[«4»]|[#29]|[#256]|[#2]}
<Const 0x22556 0x1.2> Δ-2 {[«4»]|[#29]|[#256]|[#2]|[#1]}
<MI 22558 LEA.L 0x23b8a,A0> {[«4»]|[#29]|[#256]|[#2]|[#1]}
<MI 2255e MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#29]|[#256]|[#2]|[#1]|[4, 'A0']}
<Const 0x22560 0x2331e.4> Δ-4 {[«4»]|[#29]|[#256]|[#2]|[#1]|[4, 'A0']|[##144158]}
<Call 0x22562 0x10384> {[«4»]|[#29]|[#256]|[#2]|[#1]|[4, 'A0']|[##144158]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 22568-2256c StackAdj> Δ+18 {[-2-]}
<MI 2256c CLR.B (A7)> {[-2-]}
<Const 0x2256e 0x1.2> Δ-2 {[-2-]|[#1]}
<Const 0x22570 0x1.4> Δ-4 {[-2-]|[#1]|[##1]}
<Const 0x22574 0x2331e.4> Δ-4 {[-2-]|[#1]|[##1]|[##144158]}
<Const 0x22576 0x22b16.4> Δ-4 {[-2-]|[#1]|[##1]|[##144158]|[##142102]}
<Call 0x2257c 0x1038c> {[-2-]|[#1]|[##1]|[##144158]|[##142102]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 22582-22584 StackAdj> Δ+16 {}
<Call 0x22584 0x2140e> {}
<MI 22588 CLR.B 0x23f27> {}
<POP 2258e-225ee Naked> Σ0 ↓ ←0x228b4
<Call 0x2258e 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x22594 [22] @> Δ-22 {[«22""»]}
<Blob 0x225a0 [10] @> Δ-10 {[«22""»]|[«10""»]}
<POP 225b2-225b4 StackAdj> Δ-8 {[«22""»]|[«10""»]|[-8-]}
<Lit 0x225b4 22> {[«22""»]|[«10""»]|[-4-]|[$$Analysis of tombstone_]}
<POP 225c0-225c1 StackAdj> Δ-4 {[«22""»]|[«10""»]|[-4-]|[$$Analysis of tombstone_]|[-4-]}
<Blob 0x225c1 [4] 0x23f1e> Δ-4 {[«22""»]|[«10""»]|[-4-]|[$$Analysis of tombstone_]|[-4-]|[«4»]}
<Call 0x225c6 0x102e4> {[«22""»]|[«10""»]|[-4-]|[$$Analysis of tombstone_]|[-4-]|[«4»]}
Long2String(a : Long) : String
<Lit 0x225cc 9> {[«22""»]|[«10""»]|[-4-]|[$$Analysis of tombstone_]|[-4-]|[$$ dated -_]}
<Call 0x225da 0x102d4> {[«22""»]|[«10""»]|[-4-]|[$$Analysis of tombstone_]|[-4-]|[$$ dated -_]}
StringCat3(a, b, c : String) : String
<POP 225e0-225e2 StackAdj> Δ+12 {[«22""»]|[«10""»]|[-4-]}
<Call 0x225e2 0x103d8> {[«22""»]|[«10""»]|[-4-]}
WriteConsoleString(str : String)
<POP 225e8-225ec StackAdj> Δ+36 {}
<MI 225ec MOVEQ.L #0x01,D0> {}
<POP 225ee-22622 Naked> Σ0 ↓ →0x225ee ←0x225ee
<MI 225ee MOVE.L D0,0x22b12> {}
<MI 225f4 MOVE.L D0,D1> {}
<MI 225f6 SUBQ.L #0x1,D1> {}
<POP 0x225f8 LimitCheck 0x0 ≤ D1 ≤ 0x11> {}
<MI 22602 LEA.L 0x22b0a,A0> {}
<MI 22608 LEA.L (A0+D1.L),A0> {}
<MI 2260c MOVE.B (A0+0x84e),-(A7)> Δ-2 {[2, '(A0+0x84e)']}
<Call 0x22610 0x103d0> {[2, '(A0+0x84e)']}
WriteConsoleChar(chr : char)
<POP 22616-22618 StackAdj> Δ+2 {}
<MI 22618 ADDQ.L #0x1,D0> {}
<MI 2261a CMPI.L #0x00000012,D0> {}
<MI 22620 BLE 0x225ee> {}
<POP 22622-227d6 Naked> Σ0 →0x227e8 →0x227f0 →0x227f6 →0x227fe →0x22806 →0x2280e →0x22816 →0x2281e →0x22826
<Call 0x22622 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x22628 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x2262e [4] @> Δ-4 {[«4""»]}
<Blob 0x22632 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x22636 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 2263a-2263c StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x2263c 12> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]}
<Call 0x22648 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]}
WriteConsoleStringCrLf(str : String)
<POP 2264a-2264b StackAdj> Δ+16 ↓ {}
<Blob 0x2264b [14] @> Δ-14 {[«14""»]}
<POP 2265a-2265c StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x2265c 13> {[«14""»]|[$$ 0 => DONE]}
<Call 0x2266a 0x103e0> {[«14""»]|[$$ 0 => DONE]}
WriteConsoleStringCrLf(str : String)
<MI 2266c MOVEA.L A7,A0> {[«14""»]|[$$ 0 => DONE]}
<MI 2266e LEA.L 0x201de,A1> {[«14""»]|[$$ 0 => DONE]}
<BlockMove 17,A1,A0> {[«14""»]|[$$ 0 => DONE]}
<POP 2267a-2267c StackAdj> Δ-4 {[«14""»]|[$$ 0 => DONE]|[-4-]}
<Lit 0x2267c> {[«14""»]|[$$ 0 => DONE]|[$$…]}
<Pointer.sp 0x2267c 4> Δ-4
<Const 0x22680 0x1.2> Δ-2
<Const 0x22682 0x11.2> Δ-2
<Call 0x22686 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22688-2268a StackAdj> Δ+8
<Call 0x2268a 0x103e0> {[«14""»]|[$$ 0 => DONE]|[$$…]}
WriteConsoleStringCrLf(str : String)
<POP 2268c-2268d StackAdj> Δ+22 ↓ {}
<Blob 0x2268d [34] @> Δ-34 {[«34""»]}
<POP 2269c-2269e StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x2269e 33> {[«34""»]|[$$ 2 => Show last console output]}
<Call 0x226ac 0x103e0> {[«34""»]|[$$ 2 => Show last console output]}
WriteConsoleStringCrLf(str : String)
<POP 226ae-226b2 StackAdj> Δ+38 {}
<Blob 0x226b2 [34] @> Δ-34 {[«34""»]}
<POP 226be-226c0 StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x226c0 34> {[«34""»]|[$$ 3 => Show Crash Clasifications]}
<Call 0x226ce 0x103e0> {[«34""»]|[$$ 3 => Show Crash Clasifications]}
WriteConsoleStringCrLf(str : String)
<POP 226d0-226d4 StackAdj> Δ+38 {}
<Blob 0x226d4 [28] @> Δ-28 {[«28""»]}
<POP 226e0-226e2 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x226e2 28> {[«28""»]|[$$ 4 => Show restart output]}
<Call 0x226f0 0x103e0> {[«28""»]|[$$ 4 => Show restart output]}
WriteConsoleStringCrLf(str : String)
<POP 226f2-226f3 StackAdj> Δ+32 ↓ {}
<Blob 0x226f3 [20] @> Δ-20 {[«20""»]}
<POP 22702-22704 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x22704 19> {[«20""»]|[$$ 5 => Show trace]}
<Call 0x22712 0x103e0> {[«20""»]|[$$ 5 => Show trace]}
WriteConsoleStringCrLf(str : String)
<MI 22714 MOVEA.L A7,A0> {[«20""»]|[$$ 5 => Show trace]}
<MI 22716 LEA.L 0x20264,A1> {[«20""»]|[$$ 5 => Show trace]}
<BlockMove 23,A1,A0> {[«20""»]|[$$ 5 => Show trace]}
<POP 22722-22724 StackAdj> Δ-4 {[«20""»]|[$$ 5 => Show trace]|[-4-]}
<Lit 0x22724> {[«20""»]|[$$ 5 => Show trace]|[$$…]}
<Pointer.sp 0x22724 4> Δ-4
<Const 0x22728 0x1.2> Δ-2
<Const 0x2272a 0x17.2> Δ-2
<Call 0x2272e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22730-22732 StackAdj> Δ+8
<Call 0x22732 0x103e0> {[«20""»]|[$$ 5 => Show trace]|[$$…]}
WriteConsoleStringCrLf(str : String)
<POP 22734-22738 StackAdj> Δ+28 {}
<Blob 0x22738 [20] @> Δ-20 {[«20""»]}
<POP 22744-22746 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x22746 20> {[«20""»]|[$$ 7 => Show queues]}
<Call 0x22752 0x103e0> {[«20""»]|[$$ 7 => Show queues]}
WriteConsoleStringCrLf(str : String)
<POP 22754-22758 StackAdj> Δ+24 {}
<Blob 0x22758 [32] @> Δ-32 {[«32""»]}
<POP 22764-22766 StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x22766 32> {[«32""»]|[$$ 8 => Show IOP Kernel version]}
<Call 0x22774 0x103e0> {[«32""»]|[$$ 8 => Show IOP Kernel version]}
WriteConsoleStringCrLf(str : String)
<POP 22776-2277a StackAdj> Δ+36 {}
<Call 0x2277a 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x22780 [16] @> Δ-16 {[«16""»]}
<POP 22790-22792 StackAdj> Δ-8 {[«16""»]|[-8-]}
<Lit 0x22792 15> {[«16""»]|[-4-]|[$$Enter option :_]}
<Const 0x227a0 0x0.4> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]}
<Const 0x227a4 0x8.4> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[##8]}
<Call 0x227a8 0x103ec> {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[##8]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 227ae-227b0 StackAdj> Δ+12 {[«16""»]|[-4-]}
<MI 227b0 MOVE.L (A7)+,0x23f22> Δ+4 {[«16""»]}
<POP 227b6-227b8 StackAdj> Δ+16 {}
<Call 0x227b8 0x20c5c> {}
<MI 227bc MOVE.L 0x23f22,D0> {}
<POP 0x227c2 LimitCheck 0x0 ≤ D0 ≤ 0x8> {}
<MI 227cc ADD.W D0,D0> {}
<MI 227ce SWITCH D0.W> {}
<POP 227e8-227f0 Naked> Σ0 →0x2282c ←0x22622
<MI 227e8 MOVE.B #0x01,0x23f27> {}
<MI 227ee BRA 0x2282c> {}
<POP 227f0-227f6 Naked> Σ0 →0x2282c ←0x22622
<Call 0x227f0 0x20c9c> {}
<MI 227f4 BRA 0x2282c> {}
<POP 227f6-227fe Naked> Σ0 →0x2282c ←0x22622
<MI 227f6 MOVE.B #0x01,0x23f28> {}
<MI 227fc BRA 0x2282c> {}
<POP 227fe-22806 Naked> Σ0 →0x2282c ←0x22622
<MI 227fe MOVE.B #0x01,0x23f29> {}
<MI 22804 BRA 0x2282c> {}
<POP 22806-2280e Naked> Σ0 →0x2282c ←0x22622
<MI 22806 MOVE.B #0x01,0x23f2a> {}
<MI 2280c BRA 0x2282c> {}
<POP 2280e-22816 Naked> Σ0 →0x2282c ←0x22622
<MI 2280e MOVE.B #0x01,0x23f2b> {}
<MI 22814 BRA 0x2282c> {}
<POP 22816-2281e Naked> Σ0 →0x2282c ←0x22622
<MI 22816 MOVE.B #0x01,0x23f2c> {}
<MI 2281c BRA 0x2282c> {}
<POP 2281e-22826 Naked> Σ0 →0x2282c ←0x22622
<MI 2281e MOVE.B #0x01,0x23f2d> {}
<MI 22824 BRA 0x2282c> {}
<POP 22826-2282c Naked> Σ0 ↓ ←0x22622
<MI 22826 MOVE.B #0x01,0x23f2e> {}
<POP 2282c-22834 Naked> Σ0 ↓ →0x22838 ←0x227e8 ←0x227f0 ←0x227f6 ←0x227fe ←0x22806 ←0x2280e ←0x22816 ←0x2281e
<MI 2282c TST.B 0x23f29> {}
<MI 22832 BEQ 0x22838> {}
<POP 22834-22838 Naked> Σ0 ↓
<Call 0x22834 0x20e40> {}
<POP 22838-22840 Naked> Σ0 ↓ →0x22844 ←0x2282c
<MI 22838 TST.B 0x23f28> {}
<MI 2283e BEQ 0x22844> {}
<POP 22840-22844 Naked> Σ0 ↓
<Call 0x22840 0x20fb8> {}
<POP 22844-2284c Naked> Σ0 ↓ →0x22850 ←0x22838
<MI 22844 TST.B 0x23f29> {}
<MI 2284a BEQ 0x22850> {}
<POP 2284c-22850 Naked> Σ0 ↓
<Call 0x2284c 0x210b2> {}
<POP 22850-22858 Naked> Σ0 ↓ →0x2285c ←0x22844
<MI 22850 TST.B 0x23f2e> {}
<MI 22856 BEQ 0x2285c> {}
<POP 22858-2285c Naked> Σ0 ↓
<Call 0x22858 0x21182> {}
<POP 2285c-22864 Naked> Σ0 ↓ →0x22868 ←0x22850
<MI 2285c TST.B 0x23f2a> {}
<MI 22862 BEQ 0x22868> {}
<POP 22864-22868 Naked> Σ0 ↓
<Call 0x22864 0x21312> {}
<POP 22868-22876 Naked> Σ0 ↓ →0x2287a ←0x2285c
<Call 0x22868 0x103dc> {}
WriteConsoleCrLf(void)
<MI 2286e TST.B 0x23f2b> {}
<MI 22874 BEQ 0x2287a> {}
<POP 22876-2287a Naked> Σ0 ↓
<Call 0x22876 0x214d6> {}
<POP 2287a-22882 Naked> Σ0 ↓ →0x22886 ←0x22868
<MI 2287a TST.B 0x23f2c> {}
<MI 22880 BEQ 0x22886> {}
<POP 22882-22886 Naked> Σ0 ↓
<Call 0x22882 0x218d2> {}
<POP 22886-2288e Naked> Σ0 ↓ →0x22892 ←0x2287a
<MI 22886 TST.B 0x23f2c> {}
<MI 2288c BEQ 0x22892> {}
<POP 2288e-22892 Naked> Σ0 ↓
<Call 0x2288e 0x21f62> {}
<POP 22892-2289a Naked> Σ0 ↓ →0x228a8 ←0x22886
<MI 22892 TST.B 0x23f2c> {}
<MI 22898 BEQ 0x228a8> {}
<POP 2289a-228a4 Naked> Σ0 ↓ →0x228a8
<MI 2289a MOVE.W 0x2336a,D0> {}
<MI 228a0 CMP.W #0x01,D0> {}
<MI 228a2 BLS 0x228a8> {}
<POP 228a4-228a8 Naked> Σ0 ↓
<Call 0x228a4 0x220c0> {}
<POP 228a8-228b0 Naked> Σ0 ↓ →0x228b4 ←0x22892 ←0x2289a
<MI 228a8 TST.B 0x23f2d> {}
<MI 228ae BEQ 0x228b4> {}
<POP 228b0-228b4 Naked> Σ0 ↓
<Call 0x228b0 0x21c86> {}
<POP 228b4-228e6 Naked> Σ0 ↓ →0x2258e ←0x228a8
<Blob 0x228b4 [78] @> Δ-78 {[«78""»]}
<POP 228c0-228c2 StackAdj> Δ-4 {[«78""»]|[-4-]}
<Lit 0x228c2 78> {[«78""»]|[$$******************************************************************************]}
<Call 0x228d0 0x103e0> {[«78""»]|[$$******************************************************************************]}
WriteConsoleStringCrLf(str : String)
<POP 228d2-228d6 StackAdj> Δ+82 {}
<Call 0x228d6 0x103dc> {}
WriteConsoleCrLf(void)
<MI 228dc TST.B 0x23f27> {}
<MI 228e2 BEQ 0x2258e> {}
<POP 228e6-228f0 Naked> Σ0 ↓ →0x22168 ←0x222f2
<MI 228e6 TST.B 0x23f26> {}
<MI 228ec BEQ 0x22168> {}
<POP 228f0-228fe Naked> Σ0 ↓ ←0x222ea
<MI 228f0 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x228f2 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x228f6 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 228fc-228fe StackAdj> Δ+6 {}
<POP 228fe-22904 Naked> Σ0
<Call 0x228fe 0x10284> {}
?exit
@ 22912
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 22912-2297a Body>
<POP 22912-22928 Prologue> Σ0 ↓
<POP 22928-22972 Naked> Σ0 ↓
<Blob 0x22928 [14] @> Δ-14 {[«14""»]}
<Const 0x22934 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 22938-2293a StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x2293a 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 2294c-2294e StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2294e MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 22952 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 22954 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 22956 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x22958 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 2295e-22960 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x22960 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 22966-22968 StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x22968 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 2296e-22972 StackAdj> Δ+20 {}
<POP 22972-2297a Epilogue> Σ0
@ 229ce
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 229ce-22b0a Body>
<POP 229ce-229e4 Prologue> Σ0 ↓
<POP 229e4-229fa RegCacheLoad> Σ0 ↓
<POP 229fa-22a5a Naked> Σ0 ↓ →0x22aa2
<Call 0x229fa 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x22a00 [18] @> Δ-18 {[«18""»]}
<POP 22a0c-22a0e StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x22a0e 18> {[«18""»]|[$$Experiment error :]}
<Call 0x22a1a 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 22a1c-22a1d StackAdj> Δ+22 ↓ {}
<Blob 0x22a1d [14] @> Δ-14 {[«14""»]}
<POP 22a2c-22a2e StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x22a2e 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 22a38-22a3a StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 22a3a MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x22a3e 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 22a44-22a46 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x22a46 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 22a4c-22a4e StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x22a4e 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22a50-22a52 StackAdj> Δ+18 {}
<MI 22a52 MOVEA.L (A6+0xa),A0> {}
<MI 22a56 CMPA.W #0x01,A0> {}
<MI 22a58 BEQ 0x22aa2> {}
<POP 22a5a-22aa2 Naked> Σ0 ↓
<Blob 0x22a5a [14] @> Δ-14 {[«14""»]}
<Blob 0x22a6a [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 22a7a-22a7c StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x22a7c 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 22a86-22a88 StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x22a88> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x22a88 12> Δ-4
<Const 0x22a8c 0x1.2> Δ-2
<Const 0x22a8e 0x1e.2> Δ-2
<Call 0x22a90 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22a92-22a94 StackAdj> Δ+8
<Call 0x22a94 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 22a9a-22a9c StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x22a9c 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22a9e-22aa2 StackAdj> Δ+48 {}
<POP 22aa2-22b02 Naked> Σ0 ↓ ←0x229fa
<Blob 0x22aa2 [14] @> Δ-14 {[«14""»]}
<POP 22ab2-22ab4 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x22ab4 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 22abe-22ac0 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 22ac0 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x22ac4 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 22aca-22acc StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x22acc 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 22ad2-22ad4 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x22ad4 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22ad6-22ad7 StackAdj> Δ+18 ↓ {}
<Blob 0x22ad7 [24] @> Δ-24 {[«24""»]}
<Const 0x22ae6 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 22aea-22aec StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x22aec 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x22afa 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 22b00-22b02 StackAdj> Δ+30 {}
<POP 22b02-22b0a Epilogue> Σ0
00020000 ; --------------------------------------------------------------------------------------
00020000 ; R1000.Disassembly modules:
00020000 ; import all
00020000 ; import kind.program
00020000 ; no ident.870d06db535c4075
00020000 ; --------------------------------------------------------------------------------------
00020000 stack.top:
00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END
00020004 00 02 21 34 | !4 | .CODE START
00020008 00 01 02 88 | | .CODE FSCALL_10288
0002000c heap.top:
0002000c 00 02 3f 42 | ?B | .PTR 0x23f42
00020010 code.end:
00020010 00 02 2b 0a | + | .PTR 0x22b0a
00020014 00 00 00 00 | | .CONST 0x00000000
00020018 programfailurehandler:
00020018 00 02 29 12 | ) | .CODE PROG_FAIL
0002001c experimentfailurehandler:
0002001c 00 02 29 ce | ) | .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[0x20]
00020118 31 2e 30 34 2c 39 32 2f |1.04,92/|
00020120 30 34 2f 32 38 2c 31 32 |04/28,12|
00020128 3a 30 30 3a 30 30 5c 20 |:00:00\ |
00020130 5f 5f |__ | .TXT '__'
00020132 5f 5f 5f 5f 5f 20 |_____ | .TXT '_____ '
00020138 2a 2a 2a 2a 2a 2a 2a 2a |********| .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 => DONE '
000201de 20 20 | | .XXX[0x2]
000201e0 20 20 31 20 3d 3e 20 53 | 1 => S| .XXX[0x10]
000201e8 68 6f 77 20 61 6c 6c 20 |how all |
000201f0 20 20 20 20 32 20 3d 3e | 2 =>| .TXT ' 2 => Show last console output '
00020212 20 20 20 20 33 20 3d 3e | 3 =>| .TXT ' 3 => Show Crash Clasifications'
00020234 20 20 20 20 34 20 3d 3e | 4 =>| .TXT ' 4 => Show restart output'
00020250 20 20 20 20 35 20 3d 3e | 5 =>| .TXT ' 5 => Show trace '
00020264 20 20 20 20 | | .XXX[0x4]
00020268 36 20 3d 3e 20 53 68 6f |6 => Sho| .XXX[0x10]
00020270 77 20 43 70 75 20 53 74 |w Cpu St|
00020278 61 74 65 20 |ate | .XXX[0x4]
0002027c 20 20 20 20 37 20 3d 3e | 7 =>| .TXT ' 7 => Show queues'
00020290 20 20 20 20 38 20 3d 3e | 8 =>| .TXT ' 8 => Show IOP Kernel version'
000202b0 49 6f 70 20 73 74 61 74 |Iop stat| .TXT 'Iop state not saved to tombstone'
000202d0 52 31 30 30 30 20 63 70 |R1000 cp| .TXT 'R1000 cpu state was not saved in tombstone'
000202fa 20 20 20 43 52 41 53 48 | CRASH| .TXT ' CRASH REASON (based on last micro-pc)'
00020322 20 20 20 2d 2d 2d 2d 2d | -----| .TXT ' -------------------------------------'
0002034a 20 2d 20 20 6e 6f 74 20 | - not | .TXT ' - not found '
00020358 20 20 20 20 69 6e 66 6f | info| .TXT ' information unavailable (CPU STATE not dumped to tombstone) '
00020398 20 20 32 30 30 3a 20 53 | 200: S| .XXX[0x128]
000203a0 59 53 54 45 4d 20 45 52 |YSTEM ER|
000203a8 52 4f 52 20 20 20 20 20 |ROR |
000203b0 20 20 20 20 20 20 20 20 | |
000203b8 32 30 31 3a 20 49 4f 50 |201: IOP|
000203c0 20 48 41 52 44 57 41 52 | HARDWAR|
000203c8 45 20 45 52 52 4f 52 20 |E ERROR |
000203d0 20 20 20 20 20 20 32 30 | 20|
000203d8 32 3a 20 49 4f 50 20 53 |2: IOP S|
000203e0 4f 46 54 57 41 52 45 20 |OFTWARE |
000203e8 45 52 52 4f 52 20 20 20 |ERROR |
000203f0 20 20 20 20 32 30 33 3a | 203:|
000203f8 20 43 50 55 20 48 41 52 | CPU HAR|
00020400 44 57 41 52 45 20 45 52 |DWARE ER|
00020408 52 4f 52 20 20 20 20 20 |ROR |
00020410 20 20 32 30 34 3a 20 4d | 204: M|
00020418 55 4c 54 49 20 42 49 54 |ULTI BIT|
00020420 20 4d 45 4d 4f 52 59 20 | MEMORY |
00020428 45 52 52 4f 52 20 20 20 |ERROR |
00020430 32 30 35 3a 20 53 59 53 |205: SYS|
00020438 42 55 53 20 48 41 52 44 |BUS HARD|
00020440 57 41 52 45 20 45 52 52 |WARE ERR|
00020448 4f 52 20 20 20 20 32 30 |OR 20|
00020450 36 3a 20 43 50 55 20 4d |6: CPU M|
00020458 49 43 52 4f 43 4f 44 45 |ICROCODE|
00020460 20 45 52 52 4f 52 20 20 | ERROR |
00020468 20 20 20 20 32 30 37 3a | 207:|
00020470 20 43 50 55 20 53 4f 46 | CPU SOF|
00020478 54 57 41 52 45 20 45 52 |TWARE ER|
00020480 52 4f 52 20 20 20 20 20 |ROR |
00020488 20 20 32 30 38 3a 20 53 | 208: S|
00020490 59 53 54 45 4d 20 53 48 |YSTEM SH|
00020498 55 54 44 4f 57 4e 20 20 |UTDOWN |
000204a0 20 20 20 20 20 20 20 20 | |
000204a8 32 30 39 3a 20 53 4f 46 |209: SOF|
000204b0 54 57 41 52 45 20 43 52 |TWARE CR|
000204b8 41 53 48 20 20 20 20 20 |ASH |
000204c0 20 20 20 20 | | .XXX[0x4]
000204c4 20 20 20 4c 41 53 54 20 | LAST | .TXT ' LAST CONSOLE OUTPUT'
000204da 44 69 73 6b 20 20 |Disk | .XXX[0x6]
000204e0 20 20 20 20 20 20 20 20 | | .BLANK 20[0x18]
000204f8 54 61 70 65 20 20 20 20 |Tape | .XXX[0x8]
00020500 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020510 20 20 20 20 20 20 4d 61 | Ma| .XXX[0x78]
00020518 63 68 69 6e 65 20 63 72 |chine cr|
00020520 61 73 68 2c 20 49 2f 4f |ash, I/O|
00020528 20 41 64 61 70 74 6f 72 | Adaptor|
00020530 20 20 20 20 4d 61 63 68 | Mach|
00020538 69 6e 65 20 63 72 61 73 |ine cras|
00020540 68 2c 20 52 31 30 30 30 |h, R1000|
00020548 20 20 20 20 20 20 20 20 | |
00020550 20 20 4d 61 63 68 69 6e | Machin|
00020558 65 20 63 72 61 73 68 2c |e crash,|
00020560 20 49 2f 4f 20 50 72 6f | I/O Pro|
00020568 63 65 73 73 6f 72 20 20 |cessor |
00020570 46 52 55 20 44 69 61 67 |FRU Diag|
00020578 6e 6f 73 74 69 63 20 20 |nostic |
00020580 20 20 20 20 20 20 20 20 | |
00020588 20 20 20 20 20 20 | | .XXX[0x6]
0002058e 53 70 |Sp | .XXX[0x2]
00020590 61 72 65 20 35 20 20 20 |are 5 | .XXX[0x8]
00020598 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
000205a8 20 20 20 20 53 70 61 72 | Spar| .XXX[0x10]
000205b0 65 20 36 20 20 20 20 20 |e 6 |
000205b8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
000205c8 20 20 53 70 61 72 65 20 | Spare | .XXX[0x10]
000205d0 37 20 20 20 20 20 20 20 |7 |
000205d8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
000205e8 53 70 61 72 65 20 38 20 |Spare 8 | .XXX[0x8]
000205f0 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020600 20 20 20 20 20 20 53 70 | Sp| .XXX[0x10]
00020608 61 72 65 20 39 20 20 20 |are 9 |
00020610 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020620 20 20 20 20 53 70 61 72 | Spar| .XXX[0x10]
00020628 65 20 31 30 20 20 20 20 |e 10 |
00020630 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020640 20 20 53 70 61 72 65 20 | Spare | .XXX[0x10]
00020648 31 31 20 20 20 20 20 20 |11 |
00020650 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020660 53 70 61 72 65 20 31 32 |Spare 12| .XXX[0x8]
00020668 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020678 20 20 20 20 20 20 | | .BLANK 20[0x6]
0002067e 53 70 |Sp | .XXX[0x2]
00020680 61 72 65 20 31 33 20 20 |are 13 | .XXX[0x8]
00020688 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020698 20 20 20 20 53 70 61 72 | Spar| .XXX[0x10]
000206a0 65 20 31 34 20 20 20 20 |e 14 |
000206a8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
000206b8 20 20 | | .XXX[0x2]
000206ba 20 20 20 43 52 41 53 48 | CRASH| .TXT ' CRASH CLASIFICATION'
000206d0 20 20 20 49 4f 50 20 4b | IOP K| .TXT ' IOP Kernel version '
000206e6 20 20 20 52 45 53 54 41 | RESTA| .TXT ' RESTART BUFFER '
000206f8 20 20 20 55 43 4f 44 45 | UCODE| .TXT ' UCODE TRACE (last 20 entries)'
00020718 20 20 20 4d 69 63 72 6f | Micro| .TXT ' Microcode trace for Wcs Version_ '
0002073c 20 20 20 48 5f 20 | H_ | .TXT ' H_ '
00020742 43 5f |C_ | .TXT 'C_'
00020744 20 20 20 4d 69 63 72 6f | Micro| .TXT ' Micro Stack contents : '
0002075e 5f 5f |__ | .TXT '__'
00020760 5f 5f |__ | .TXT '__'
00020762 5f 5f |__ | .TXT '__'
00020764 20 2d | - | .TXT ' -'
00020766 5f 20 |_ | .XXX[0x2]
00020768 20 2d | - | .TXT ' -'
0002076a 5f 20 |_ | .XXX[0x2]
0002076c 4c 65 78 20 6c 65 76 65 |Lex leve| .TXT 'Lex levels valid => '
00020780 5f 5f |__ | .TXT '__'
00020782 20 20 20 55 43 4f 44 45 | UCODE| .TXT ' UCODE STATE'
00020790 20 54 6f 70 20 20 3d 3e | Top =>| .TXT ' Top =>_ '
0002079a 20 50 72 65 64 20 3d 3e | Pred =>| .TXT ' Pred =>_ '
000207a4 20 53 61 76 65 20 3d 3e | Save =>| .TXT ' Save =>_ '
000207ae 20 50 43 20 | PC | .TXT ' PC '
000207b2 20 3d 3e 5f | =>_ | .TXT ' =>_'
000207b6 20 44 50 43 | DPC | .TXT ' DPC'
000207ba 20 3d 3e 5f | =>_ | .TXT ' =>_'
000207be 20 54 4c 43 | TLC | .TXT ' TLC'
000207c2 20 3d 3e 5f | =>_ | .TXT ' =>_'
000207c6 20 56 4c 43 | VLC | .TXT ' VLC'
000207ca 20 3d 3e 5f | =>_ | .TXT ' =>_'
000207ce 20 4d 41 52 | MAR | .TXT ' MAR'
000207d2 20 3d 3e 5f | =>_ | .TXT ' =>_'
000207d6 20 54 41 52 | TAR | .TXT ' TAR'
000207da 20 3d 3e 5f | =>_ | .TXT ' =>_'
000207de 56 41 52 20 3d 3e 5f 20 |VAR =>_ | .TXT 'VAR =>_ '
000207e6 20 52 44 52 | RDR | .TXT ' RDR'
000207ea 20 3d 3e 5f | =>_ | .TXT ' =>_'
000207ee 20 57 44 52 | WDR | .TXT ' WDR'
000207f2 20 3d 3e 5f | =>_ | .TXT ' =>_'
000207f6 20 20 20 51 55 45 55 45 | QUEUE| .TXT ' QUEUES '
00020800 20 20 20 50 52 49 20 20 | PRI | .TXT ' PRI HEAD TAIL '
00020818 5f 5f 5f 5f |____ | .TXT '____'
0002081c 5f 5f |__ | .TXT '__'
0002081e 5f 20 |_ | .XXX[0x2]
00020820 20 44 65 6c 61 79 20 51 | Delay Q| .TXT ' Delay Queue Head -_'
00020834 20 44 69 73 6b 20 57 61 | Disk Wa| .TXT ' Disk Wait Head -_'
00020846 20 46 41 51 | FAQ | .TXT ' FAQ'
0002084a 20 48 65 61 | Hea | .TXT ' Hea'
0002084e 64 20 2d 5f |d -_ | .TXT 'd -_'
00020852 20 43 55 52 52 45 4e 54 | CURRENT| .TXT ' CURRENT LOAD REG -_'
00020866 20 47 50 28 | GP( | .TXT ' GP('
0002086a 29 20 3d 3e 5f 20 |) =>_ | .TXT ') =>_ '
00020870 20 54 4f 50 2d 20 | TOP- | .TXT ' TOP- '
00020876 20 3d 3e 5f | =>_ | .TXT ' =>_'
0002087a 20 50 46 4d 41 52 20 3d | PFMAR =| .TXT ' PFMAR =>_'
00020884 52 31 30 30 30 5f 44 55 |R1000_DU| .TXT 'R1000_DUMP1 '
00020890 52 31 30 30 30 5f 44 55 |R1000_DU| .TXT 'R1000_DUMP2 '
0002089c 52 31 30 30 30 5f 44 55 |R1000_DU| .TXT 'R1000_DUMP3 '
000208a8 52 31 30 30 30 5f 44 55 |R1000_DU| .TXT 'R1000_DUMP4 '
000208b4 43 6f 75 6c 64 20 6e 6f |Could no| .TXT 'Could not find tombstone_ '
000208ce 41 6e 61 6c 79 73 69 73 |Analysis| .TXT 'Analysis of tombstone_'
000208e4 20 64 61 74 65 64 20 2d | dated -| .TXT ' dated -_ '
000208ee 20 20 | | .XXX[0x2]
000208f0 32 30 30 3a 20 53 59 53 |200: SYS| .XXX[0x130]
000208f8 54 45 4d 20 45 52 52 4f |TEM ERRO|
00020900 52 20 20 20 20 20 20 20 |R |
00020908 20 20 20 20 20 20 32 30 | 20|
00020910 31 3a 20 49 4f 50 20 48 |1: IOP H|
00020918 41 52 44 57 41 52 45 20 |ARDWARE |
00020920 45 52 52 4f 52 20 20 20 |ERROR |
00020928 20 20 20 20 32 30 32 3a | 202:|
00020930 20 49 4f 50 20 53 4f 46 | IOP SOF|
00020938 54 57 41 52 45 20 45 52 |TWARE ER|
00020940 52 4f 52 20 20 20 20 20 |ROR |
00020948 20 20 32 30 33 3a 20 43 | 203: C|
00020950 50 55 20 48 41 52 44 57 |PU HARDW|
00020958 41 52 45 20 45 52 52 4f |ARE ERRO|
00020960 52 20 20 20 20 20 20 20 |R |
00020968 32 30 34 3a 20 4d 55 4c |204: MUL|
00020970 54 49 20 42 49 54 20 4d |TI BIT M|
00020978 45 4d 4f 52 59 20 45 52 |EMORY ER|
00020980 52 4f 52 20 20 20 32 30 |ROR 20|
00020988 35 3a 20 53 59 53 42 55 |5: SYSBU|
00020990 53 20 48 41 52 44 57 41 |S HARDWA|
00020998 52 45 20 45 52 52 4f 52 |RE ERROR|
000209a0 20 20 20 20 32 30 36 3a | 206:|
000209a8 20 43 50 55 20 4d 49 43 | CPU MIC|
000209b0 52 4f 43 4f 44 45 20 45 |ROCODE E|
000209b8 52 52 4f 52 20 20 20 20 |RROR |
000209c0 20 20 32 30 37 3a 20 43 | 207: C|
000209c8 50 55 20 53 4f 46 54 57 |PU SOFTW|
000209d0 41 52 45 20 45 52 52 4f |ARE ERRO|
000209d8 52 20 20 20 20 20 20 20 |R |
000209e0 32 30 38 3a 20 53 59 53 |208: SYS|
000209e8 54 45 4d 20 53 48 55 54 |TEM SHUT|
000209f0 44 4f 57 4e 20 20 20 20 |DOWN |
000209f8 20 20 20 20 20 20 32 30 | 20|
00020a00 39 3a 20 53 4f 46 54 57 |9: SOFTW|
00020a08 41 52 45 20 43 52 41 53 |ARE CRAS|
00020a10 48 20 20 20 20 20 20 20 |H |
00020a18 20 20 44 69 73 6b 20 20 | Disk |
00020a20 20 20 20 20 20 20 20 20 | | .BLANK 20[0x18]
00020a38 54 61 70 65 20 20 20 20 |Tape | .XXX[0x8]
00020a40 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020a50 20 20 20 20 20 20 4d 61 | Ma| .XXX[0x78]
00020a58 63 68 69 6e 65 20 63 72 |chine cr|
00020a60 61 73 68 2c 20 49 2f 4f |ash, I/O|
00020a68 20 41 64 61 70 74 6f 72 | Adaptor|
00020a70 20 20 20 20 4d 61 63 68 | Mach|
00020a78 69 6e 65 20 63 72 61 73 |ine cras|
00020a80 68 2c 20 52 31 30 30 30 |h, R1000|
00020a88 20 20 20 20 20 20 20 20 | |
00020a90 20 20 4d 61 63 68 69 6e | Machin|
00020a98 65 20 63 72 61 73 68 2c |e crash,|
00020aa0 20 49 2f 4f 20 50 72 6f | I/O Pro|
00020aa8 63 65 73 73 6f 72 20 20 |cessor |
00020ab0 46 52 55 20 44 69 61 67 |FRU Diag|
00020ab8 6e 6f 73 74 69 63 20 20 |nostic |
00020ac0 20 20 20 20 20 20 20 20 | |
00020ac8 20 20 20 20 20 20 | | .XXX[0x6]
00020ace 53 70 |Sp | .XXX[0x2]
00020ad0 61 72 65 20 35 20 20 20 |are 5 | .XXX[0x8]
00020ad8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020ae8 20 20 20 20 53 70 61 72 | Spar| .XXX[0x10]
00020af0 65 20 36 20 20 20 20 20 |e 6 |
00020af8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020b08 20 20 53 70 61 72 65 20 | Spare | .XXX[0x10]
00020b10 37 20 20 20 20 20 20 20 |7 |
00020b18 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020b28 53 70 61 72 65 20 38 20 |Spare 8 | .XXX[0x8]
00020b30 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020b40 20 20 20 20 20 20 53 70 | Sp| .XXX[0x10]
00020b48 61 72 65 20 39 20 20 20 |are 9 |
00020b50 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020b60 20 20 20 20 53 70 61 72 | Spar| .XXX[0x10]
00020b68 65 20 31 30 20 20 20 20 |e 10 |
00020b70 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020b80 20 20 53 70 61 72 65 20 | Spare | .XXX[0x10]
00020b88 31 31 20 20 20 20 20 20 |11 |
00020b90 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020ba0 53 70 61 72 65 20 31 32 |Spare 12| .XXX[0x8]
00020ba8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020bb8 20 20 20 20 20 20 | | .BLANK 20[0x6]
00020bbe 53 70 |Sp | .XXX[0x2]
00020bc0 61 72 65 20 31 33 20 20 |are 13 | .XXX[0x8]
00020bc8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020bd8 20 20 20 20 53 70 61 72 | Spar| .XXX[0x10]
00020be0 65 20 31 34 20 20 20 20 |e 14 |
00020be8 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10]
00020bf8 20 20 | | .XXX[0x2]
00020bfa ; --------------------------------------------------------------------------------------
00020bfa ; OMSI PASCAL Function
00020bfa ; <LVAR 0x00c 4(r)>
00020bfa ; <LVAR 0x008 4(r)>
00020bfa ; --------------------------------------------------------------------------------------
00020bfa 4e 56 ff ea |NV | LINK.W A6,#0xffea
00020bfe bf d5 | | CMPA.L (A5),A7
00020c00 62 06 |b | BHI 0x20c08
00020c02 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020c06 4e 76 |Nv | TRAPV
00020c08 de fc 00 12 | | ADDA.W #0x12,A7
00020c0c 48 e7 01 00 |H | MOVEM.L D7,-(A7)
00020c10 4a ae 00 0c |J | TST.L (A6+0xc)
00020c14 6f 1c |o | BLE 0x20c32
00020c16 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7)
00020c1a 7e 01 |~ | MOVEQ.L #0x01,D7
00020c1c be 97 | | CMP.L (A7),D7
00020c1e 6e 10 |n | BGT 0x20c30
00020c20 1f 3c 00 20 | < | MOVE.B #0x20,-(A7)
00020c24 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
00020c2a 54 4f |TO | ADDQ.L #0x2,A7
00020c2c 52 87 |R | ADDQ.L #0x1,D7
00020c2e 68 ec |h | BVC 0x20c1c
00020c30 58 4f |XO | ADDQ.L #0x4,A7
00020c32 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7)
00020c36 7e 01 |~ | MOVEQ.L #0x01,D7
00020c38 be 97 | | CMP.L (A7),D7
00020c3a 6e 10 |n | BGT 0x20c4c
00020c3c 1f 3c 00 2d | < - | MOVE.B #0x2d,-(A7)
00020c40 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
00020c46 54 4f |TO | ADDQ.L #0x2,A7
00020c48 52 87 |R | ADDQ.L #0x1,D7
00020c4a 68 ec |h | BVC 0x20c38
00020c4c 58 4f |XO | ADDQ.L #0x4,A7
00020c4e 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00020c54 4c df 00 80 |L | MOVEM.L (A7)+,D7
00020c58 4e 5e |N^ | UNLK A6
00020c5a 4e 75 |Nu | RTS
00020c5c ; --------------------------------------------------------------------------------------
00020c5c ; OMSI PASCAL Function
00020c5c ; --------------------------------------------------------------------------------------
00020c5c 4e 56 ff fc |NV | LINK.W A6,#0xfffc
00020c60 bf d5 | | CMPA.L (A5),A7
00020c62 62 06 |b | BHI 0x20c6a
00020c64 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020c68 4e 76 |Nv | TRAPV
00020c6a de fc 00 04 | | ADDA.W #0x4,A7
00020c6e 42 39 00 02 3f 28 |B9 ?( | CLR.B 0x23f28
00020c74 42 39 00 02 3f 29 |B9 ?) | CLR.B 0x23f29
00020c7a 42 39 00 02 3f 2a |B9 ?* | CLR.B 0x23f2a
00020c80 42 39 00 02 3f 2b |B9 ?+ | CLR.B 0x23f2b
00020c86 42 39 00 02 3f 2c |B9 ?, | CLR.B 0x23f2c
00020c8c 42 39 00 02 3f 2d |B9 ?- | CLR.B 0x23f2d
00020c92 42 39 00 02 3f 2e |B9 ?. | CLR.B 0x23f2e
00020c98 4e 5e |N^ | UNLK A6
00020c9a 4e 75 |Nu | RTS
00020c9c ; --------------------------------------------------------------------------------------
00020c9c ; OMSI PASCAL Function
00020c9c ; --------------------------------------------------------------------------------------
00020c9c 4e 56 ff f8 |NV | LINK.W A6,#0xfff8
00020ca0 bf d5 | | CMPA.L (A5),A7
00020ca2 62 06 |b | BHI 0x20caa
00020ca4 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020ca8 4e 76 |Nv | TRAPV
00020caa de fc 00 08 | | ADDA.W #0x8,A7
00020cae 48 e7 80 00 |H | MOVEM.L D0,-(A7)
00020cb2 70 01 |p | MOVEQ.L #0x01,D0
00020cb4 13 c0 00 02 3f 28 | ?( | MOVE.B D0,0x23f28
00020cba 13 c0 00 02 3f 29 | ?) | MOVE.B D0,0x23f29
00020cc0 13 c0 00 02 3f 2a | ?* | MOVE.B D0,0x23f2a
00020cc6 13 c0 00 02 3f 2b | ?+ | MOVE.B D0,0x23f2b
00020ccc 13 c0 00 02 3f 2c | ?, | MOVE.B D0,0x23f2c
00020cd2 13 c0 00 02 3f 2d | ?- | MOVE.B D0,0x23f2d
00020cd8 13 c0 00 02 3f 2e | ?. | MOVE.B D0,0x23f2e
00020cde 4c df 00 01 |L | MOVEM.L (A7)+,D0
00020ce2 4e 5e |N^ | UNLK A6
00020ce4 4e 75 |Nu | RTS
00020ce6 ; --------------------------------------------------------------------------------------
00020ce6 ; OMSI PASCAL Function
00020ce6 ; <LVAR 0x008 2(r)>
00020ce6 ; --------------------------------------------------------------------------------------
00020ce6 4e 56 ff ea |NV | LINK.W A6,#0xffea
00020cea bf d5 | | CMPA.L (A5),A7
00020cec 62 06 |b | BHI 0x20cf4
00020cee 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020cf2 4e 76 |Nv | TRAPV
00020cf4 de fc 00 14 | | ADDA.W #0x14,A7
00020cf8 48 e7 80 00 |H | MOVEM.L D0,-(A7)
00020cfc 59 4f |YO | SUBQ.L #0x4,A7
00020cfe 42 80 |B | CLR.L D0
00020d00 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0
00020d04 2f 00 |/ | MOVE.L D0,-(A7)
00020d06 48 78 00 04 |Hx | PEA.L 0x4
00020d0a 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
00020d10 50 4f |PO | ADDQ.L #0x8,A7
00020d12 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00020d18 58 4f |XO | ADDQ.L #0x4,A7
00020d1a 4c df 00 01 |L | MOVEM.L (A7)+,D0
00020d1e 4e 5e |N^ | UNLK A6
00020d20 4e 75 |Nu | RTS
00020d22 ; --------------------------------------------------------------------------------------
00020d22 ; OMSI PASCAL Function
00020d22 ; <LVAR 0x008 4(r)>
00020d22 ; --------------------------------------------------------------------------------------
00020d22 4e 56 ff f0 |NV | LINK.W A6,#0xfff0
00020d26 bf d5 | | CMPA.L (A5),A7
00020d28 62 06 |b | BHI 0x20d30
00020d2a 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020d2e 4e 76 |Nv | TRAPV
00020d30 de fc 00 10 | | ADDA.W #0x10,A7
00020d34 59 4f |YO | SUBQ.L #0x4,A7
00020d36 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7)
00020d3a 48 78 00 08 |Hx | PEA.L 0x8
00020d3e 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
00020d44 50 4f |PO | ADDQ.L #0x8,A7
00020d46 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00020d4c 58 4f |XO | ADDQ.L #0x4,A7
00020d4e 4e 5e |N^ | UNLK A6
00020d50 4e 75 |Nu | RTS
00020d52 ; --------------------------------------------------------------------------------------
00020d52 ; OMSI PASCAL Function
00020d52 ; <LVAR 0x00e 2(r)>
00020d52 ; <LVAR 0x00c 2(r)>
00020d52 ; <LVAR 0x00a 2(r)>
00020d52 ; <LVAR 0x008 2(r)>
00020d52 ; --------------------------------------------------------------------------------------
00020d52 4e 56 ff f6 |NV | LINK.W A6,#0xfff6
00020d56 bf d5 | | CMPA.L (A5),A7
00020d58 62 06 |b | BHI 0x20d60
00020d5a 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020d5e 4e 76 |Nv | TRAPV
00020d60 de fc 00 0a | | ADDA.W #0xa,A7
00020d64 48 e7 00 80 |H | MOVEM.L A0,-(A7)
00020d68 41 fa ff 7c |A | | LEA.L 0x20ce6,A0
00020d6c 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7)
00020d70 4e 90 |N | JSR (A0)
00020d72 3e ae 00 0a |> | MOVE.W (A6+0xa),(A7)
00020d76 4e 90 |N | JSR (A0)
00020d78 3e ae 00 0c |> | MOVE.W (A6+0xc),(A7)
00020d7c 4e 90 |N | JSR (A0)
00020d7e 3e ae 00 0e |> | MOVE.W (A6+0xe),(A7)
00020d82 4e 90 |N | JSR (A0)
00020d84 54 4f |TO | ADDQ.L #0x2,A7
00020d86 4c df 01 00 |L | MOVEM.L (A7)+,A0
00020d8a 4e 5e |N^ | UNLK A6
00020d8c 4e 75 |Nu | RTS
00020d8e ; --------------------------------------------------------------------------------------
00020d8e ; OMSI PASCAL Function
00020d8e ; <LVAR 0x00e 2(r)>
00020d8e ; <LVAR 0x00c 2(r)>
00020d8e ; <LVAR 0x00a 2(r)>
00020d8e ; <LVAR 0x008 2(r)>
00020d8e ; --------------------------------------------------------------------------------------
00020d8e 4e 56 ff ea |NV | LINK.W A6,#0xffea
00020d92 bf d5 | | CMPA.L (A5),A7
00020d94 62 06 |b | BHI 0x20d9c
00020d96 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020d9a 4e 76 |Nv | TRAPV
00020d9c de fc 00 16 | | ADDA.W #0x16,A7
00020da0 48 e7 00 80 |H | MOVEM.L A0,-(A7)
00020da4 41 fa ff 40 |A @ | LEA.L 0x20ce6,A0
00020da8 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7)
00020dac 4e 90 |N | JSR (A0)
00020dae 3e ae 00 0a |> | MOVE.W (A6+0xa),(A7)
00020db2 4e 90 |N | JSR (A0)
00020db4 3e ba f3 7a |> z | MOVE.W 0x20130,(A7)
00020db8 59 4f |YO | SUBQ.L #0x4,A7
00020dba 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020dbe 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00020dc2 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00020dc6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00020dcc 50 4f |PO | ADDQ.L #0x8,A7
00020dce 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00020dd4 58 4f |XO | ADDQ.L #0x4,A7
00020dd6 3e ae 00 0c |> | MOVE.W (A6+0xc),(A7)
00020dda 4e 90 |N | JSR (A0)
00020ddc 3e ae 00 0e |> | MOVE.W (A6+0xe),(A7)
00020de0 4e 90 |N | JSR (A0)
00020de2 54 4f |TO | ADDQ.L #0x2,A7
00020de4 4c df 01 00 |L | MOVEM.L (A7)+,A0
00020de8 4e 5e |N^ | UNLK A6
00020dea 4e 75 |Nu | RTS
00020dec ; --------------------------------------------------------------------------------------
00020dec ; OMSI PASCAL Function
00020dec ; <LVAR 0x014 4(r)>
00020dec ; <LVAR 0x010 4(r)>
00020dec ; <LVAR 0x00c 4(r)>
00020dec ; <LVAR 0x008 4(r)>
00020dec ; --------------------------------------------------------------------------------------
00020dec 4e 56 ff ee |NV | LINK.W A6,#0xffee
00020df0 bf d5 | | CMPA.L (A5),A7
00020df2 62 06 |b | BHI 0x20dfa
00020df4 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020df8 4e 76 |Nv | TRAPV
00020dfa de fc 00 12 | | ADDA.W #0x12,A7
00020dfe 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7)
00020e02 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7)
00020e06 4e ba ff 4a |N J | JSR 0x20d52
00020e0a 5c 4f |\O | ADDQ.L #0x6,A7
00020e0c 3e ba f3 22 |> " | MOVE.W 0x20130,(A7)
00020e10 59 4f |YO | SUBQ.L #0x4,A7
00020e12 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020e16 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00020e1a 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00020e1e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00020e24 50 4f |PO | ADDQ.L #0x8,A7
00020e26 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00020e2c 54 4f |TO | ADDQ.L #0x2,A7
00020e2e 2e ae 00 14 |. | MOVE.L (A6+0x14),(A7)
00020e32 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7)
00020e36 4e ba ff 1a |N | JSR 0x20d52
00020e3a 50 4f |PO | ADDQ.L #0x8,A7
00020e3c 4e 5e |N^ | UNLK A6
00020e3e 4e 75 |Nu | RTS
00020e40 ; --------------------------------------------------------------------------------------
00020e40 ; OMSI PASCAL Function
00020e40 ; --------------------------------------------------------------------------------------
00020e40 4e 56 ff 6e |NV n | LINK.W A6,#0xff6e
00020e44 bf d5 | | CMPA.L (A5),A7
00020e46 62 06 |b | BHI 0x20e4e
00020e48 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020e4c 4e 76 |Nv | TRAPV
00020e4e de fc 00 8e | | ADDA.W #0x8e,A7
00020e52 48 e7 fd f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D5+D4+D3+D2+D1+D0,-(A7)
00020e56 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00020e5c 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3
00020e62 49 fa f4 e6 |I | LEA.L 0x2034a,A4
00020e66 74 01 |t | MOVEQ.L #0x01,D2
00020e68 76 28 |v( | MOVEQ.L #0x28,D3
00020e6a 78 2c |x, | MOVEQ.L #0x2c,D4
00020e6c 7a 1e |z | MOVEQ.L #0x1e,D5
00020e6e 3e 39 00 02 33 4a |>9 3J | MOVE.W 0x2334a,D7
00020e74 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00020e7a 41 fa f3 0a |A | LEA.L 0x20186,A0
00020e7e 70 26 |p& | MOVEQ.L #0x26,D0
00020e80 3f 20 |? | MOVE.W -(A0),-(A7)
00020e82 51 c8 ff fc |Q | DBF D0,0x20e80
00020e86 59 4f |YO | SUBQ.L #0x4,A7
00020e88 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020e8c 3f 02 |? | MOVE.W D2,-(A7)
00020e8e 3f 3c 00 4e |?< N | MOVE.W #0x4e,-(A7)
00020e92 4e 92 |N | JSR (A2)
00020e94 50 4f |PO | ADDQ.L #0x8,A7
00020e96 4e 93 |N | JSR (A3)
00020e98 de fc 00 52 | R | ADDA.W #0x52,A7
00020e9c 20 4c | L | MOVEA.L A4,A0
00020e9e 70 09 |p | MOVEQ.L #0x09,D0
00020ea0 2f 20 |/ | MOVE.L -(A0),-(A7)
00020ea2 51 c8 ff fc |Q | DBF D0,0x20ea0
00020ea6 59 4f |YO | SUBQ.L #0x4,A7
00020ea8 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020eac 3f 02 |? | MOVE.W D2,-(A7)
00020eae 3f 03 |? | MOVE.W D3,-(A7)
00020eb0 4e 92 |N | JSR (A2)
00020eb2 50 4f |PO | ADDQ.L #0x8,A7
00020eb4 4e 93 |N | JSR (A3)
00020eb6 de c4 | | ADDA.W D4,A7
00020eb8 41 fa f4 68 |A h | LEA.L 0x20322,A0
00020ebc 70 09 |p | MOVEQ.L #0x09,D0
00020ebe 2f 20 |/ | MOVE.L -(A0),-(A7)
00020ec0 51 c8 ff fc |Q | DBF D0,0x20ebe
00020ec4 59 4f |YO | SUBQ.L #0x4,A7
00020ec6 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020eca 3f 02 |? | MOVE.W D2,-(A7)
00020ecc 3f 03 |? | MOVE.W D3,-(A7)
00020ece 4e 92 |N | JSR (A2)
00020ed0 50 4f |PO | ADDQ.L #0x8,A7
00020ed2 4e 93 |N | JSR (A3)
00020ed4 de c4 | | ADDA.W D4,A7
00020ed6 20 4c | L | MOVEA.L A4,A0
00020ed8 70 09 |p | MOVEQ.L #0x09,D0
00020eda 2f 20 |/ | MOVE.L -(A0),-(A7)
00020edc 51 c8 ff fc |Q | DBF D0,0x20eda
00020ee0 59 4f |YO | SUBQ.L #0x4,A7
00020ee2 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020ee6 3f 02 |? | MOVE.W D2,-(A7)
00020ee8 3f 03 |? | MOVE.W D3,-(A7)
00020eea 4e 92 |N | JSR (A2)
00020eec 50 4f |PO | ADDQ.L #0x8,A7
00020eee 4e 93 |N | JSR (A3)
00020ef0 de c4 | | ADDA.W D4,A7
00020ef2 4a 79 00 02 33 6a |Jy 3j | TST.W 0x2336a
00020ef8 67 00 00 8e |g | BEQ 0x20f88
00020efc 0c 47 01 ff | G | CMPI.W #0x01ff,D7
00020f00 63 3c |c< | BLS 0x20f3e
00020f02 0c 47 02 0a | G | CMPI.W #0x020a,D7
00020f06 64 36 |d6 | BCC 0x20f3e
00020f08 30 07 |0 | MOVE.W D7,D0
00020f0a 02 40 00 ff | @ | ANDI.W #0x00ff,D0
00020f0e 41 bc 00 09 |A | CHK.W #0x9,D0
00020f12 c0 c5 | | MULU.W D5,D0
00020f14 42 81 |B | CLR.L D1
00020f16 32 00 |2 | MOVE.W D0,D1
00020f18 41 fa f9 d4 |A | LEA.L 0x208ee,A0
00020f1c 41 f0 18 1e |A | LEA.L (A0+D1.L+#0x1e),A0
00020f20 70 0e |p | MOVEQ.L #0x0e,D0
00020f22 3f 20 |? | MOVE.W -(A0),-(A7)
00020f24 51 c8 ff fc |Q | DBF D0,0x20f22
00020f28 59 4f |YO | SUBQ.L #0x4,A7
00020f2a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020f2e 3f 02 |? | MOVE.W D2,-(A7)
00020f30 3f 05 |? | MOVE.W D5,-(A7)
00020f32 4e 92 |N | JSR (A2)
00020f34 50 4f |PO | ADDQ.L #0x8,A7
00020f36 4e 93 |N | JSR (A3)
00020f38 de fc 00 22 | " | ADDA.W #0x22,A7
00020f3c 60 48 |`H | BRA 0x20f86
00020f3e 3f 3a f1 f0 |?: | MOVE.W 0x20130,-(A7)
00020f42 59 4f |YO | SUBQ.L #0x4,A7
00020f44 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020f48 3f 02 |? | MOVE.W D2,-(A7)
00020f4a 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00020f4e 4e 92 |N | JSR (A2)
00020f50 50 4f |PO | ADDQ.L #0x8,A7
00020f52 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00020f58 58 4f |XO | ADDQ.L #0x4,A7
00020f5a 3e 87 |> | MOVE.W D7,(A7)
00020f5c 4e ba fd 88 |N | JSR 0x20ce6
00020f60 9e fc 00 0c | | SUBA.W #0xc,A7
00020f64 20 4f | O | MOVEA.L A7,A0
00020f66 22 4c |"L | MOVEA.L A4,A1
00020f68 70 0c |p | MOVEQ.L #0x0c,D0
00020f6a 10 d9 | | MOVE.B (A1)+,(A0)+
00020f6c 51 c8 ff fc |Q | DBF D0,0x20f6a
00020f70 59 4f |YO | SUBQ.L #0x4,A7
00020f72 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020f76 3f 02 |? | MOVE.W D2,-(A7)
00020f78 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7)
00020f7c 4e 92 |N | JSR (A2)
00020f7e 50 4f |PO | ADDQ.L #0x8,A7
00020f80 4e 93 |N | JSR (A3)
00020f82 de fc 00 12 | | ADDA.W #0x12,A7
00020f86 60 28 |`( | BRA 0x20fb0
00020f88 9e fc 00 40 | @ | SUBA.W #0x40,A7
00020f8c 20 4f | O | MOVEA.L A7,A0
00020f8e 43 fa f3 c8 |C | LEA.L 0x20358,A1
00020f92 70 3e |p> | MOVEQ.L #0x3e,D0
00020f94 10 d9 | | MOVE.B (A1)+,(A0)+
00020f96 51 c8 ff fc |Q | DBF D0,0x20f94
00020f9a 59 4f |YO | SUBQ.L #0x4,A7
00020f9c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020fa0 3f 02 |? | MOVE.W D2,-(A7)
00020fa2 3f 3c 00 3f |?< ? | MOVE.W #0x3f,-(A7)
00020fa6 4e 92 |N | JSR (A2)
00020fa8 50 4f |PO | ADDQ.L #0x8,A7
00020faa 4e 93 |N | JSR (A3)
00020fac de fc 00 44 | D | ADDA.W #0x44,A7
00020fb0 4c df 1f bf |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D7+A0+A1+A2+A3+A4
00020fb4 4e 5e |N^ | UNLK A6
00020fb6 4e 75 |Nu | RTS
00020fb8 ; --------------------------------------------------------------------------------------
00020fb8 ; OMSI PASCAL Function
00020fb8 ; --------------------------------------------------------------------------------------
00020fb8 4e 56 ff 82 |NV | LINK.W A6,#0xff82
00020fbc bf d5 | | CMPA.L (A5),A7
00020fbe 62 06 |b | BHI 0x20fc6
00020fc0 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020fc4 4e 76 |Nv | TRAPV
00020fc6 de fc 00 7a | z | ADDA.W #0x7a,A7
00020fca 48 e7 c1 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D1+D0,-(A7)
00020fce 43 f9 00 02 3e fa |C > | LEA.L 0x23efa,A1
00020fd4 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00020fda 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3
00020fe0 72 01 |r | MOVEQ.L #0x01,D1
00020fe2 41 fa f1 a2 |A | LEA.L 0x20186,A0
00020fe6 70 26 |p& | MOVEQ.L #0x26,D0
00020fe8 3f 20 |? | MOVE.W -(A0),-(A7)
00020fea 51 c8 ff fc |Q | DBF D0,0x20fe8
00020fee 59 4f |YO | SUBQ.L #0x4,A7
00020ff0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020ff4 3f 01 |? | MOVE.W D1,-(A7)
00020ff6 3f 3c 00 4e |?< N | MOVE.W #0x4e,-(A7)
00020ffa 4e 92 |N | JSR (A2)
00020ffc 50 4f |PO | ADDQ.L #0x8,A7
00020ffe 4e 93 |N | JSR (A3)
00021000 de fc 00 52 | R | ADDA.W #0x52,A7
00021004 48 78 00 03 |Hx | PEA.L 0x3
00021008 48 78 00 13 |Hx | PEA.L 0x13
0002100c 4e ba fb ec |N | JSR 0x20bfa
00021010 50 4f |PO | ADDQ.L #0x8,A7
00021012 41 fa f4 c6 |A | LEA.L 0x204da,A0
00021016 70 0a |p | MOVEQ.L #0x0a,D0
00021018 3f 20 |? | MOVE.W -(A0),-(A7)
0002101a 51 c8 ff fc |Q | DBF D0,0x21018
0002101e 59 4f |YO | SUBQ.L #0x4,A7
00021020 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021024 3f 01 |? | MOVE.W D1,-(A7)
00021026 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7)
0002102a 4e 92 |N | JSR (A2)
0002102c 50 4f |PO | ADDQ.L #0x8,A7
0002102e 4e 93 |N | JSR (A3)
00021030 de fc 00 1a | | ADDA.W #0x1a,A7
00021034 48 78 00 03 |Hx | PEA.L 0x3
00021038 48 78 00 13 |Hx | PEA.L 0x13
0002103c 4e ba fb bc |N | JSR 0x20bfa
00021040 50 4f |PO | ADDQ.L #0x8,A7
00021042 4a 79 00 02 33 4e |Jy 3N | TST.W 0x2334e
00021048 67 3e |g> | BEQ 0x21088
0002104a 7e 01 |~ | MOVEQ.L #0x01,D7
0002104c 20 11 | | MOVE.L (A1),D0
0002104e 0c 80 00 00 03 3f | ? | CMPI.L #0x0000033f,D0
00021054 6f 02 |o | BLE 0x21058
00021056 42 91 |B | CLR.L (A1)
00021058 20 11 | | MOVE.L (A1),D0
0002105a 0c 80 00 00 03 3f | ? | CMPI.L #0x0000033f,D0
00021060 63 02 |c | BLS 0x21064
00021062 4e 4f |NO | TRAP #15
00021064 41 f9 00 02 2b 0a |A + | LEA.L 0x22b0a,A0
0002106a 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
0002106e 1f 28 10 b0 | ( | MOVE.B (A0+0x10b0),-(A7)
00021072 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
00021078 54 4f |TO | ADDQ.L #0x2,A7
0002107a 52 91 |R | ADDQ.L #0x1,(A1)
0002107c 52 87 |R | ADDQ.L #0x1,D7
0002107e 0c 87 00 00 03 40 | @ | CMPI.L #0x00000340,D7
00021084 6f c6 |o | BLE 0x2104c
00021086 60 22 |`" | BRA 0x210aa
00021088 41 fa f2 46 |A F | LEA.L 0x202d0,A0
0002108c 70 07 |p | MOVEQ.L #0x07,D0
0002108e 2f 20 |/ | MOVE.L -(A0),-(A7)
00021090 51 c8 ff fc |Q | DBF D0,0x2108e
00021094 59 4f |YO | SUBQ.L #0x4,A7
00021096 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002109a 3f 01 |? | MOVE.W D1,-(A7)
0002109c 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7)
000210a0 4e 92 |N | JSR (A2)
000210a2 50 4f |PO | ADDQ.L #0x8,A7
000210a4 4e 93 |N | JSR (A3)
000210a6 de fc 00 24 | $ | ADDA.W #0x24,A7
000210aa 4c df 0f 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2+A3
000210ae 4e 5e |N^ | UNLK A6
000210b0 4e 75 |Nu | RTS
000210b2 ; --------------------------------------------------------------------------------------
000210b2 ; OMSI PASCAL Function
000210b2 ; --------------------------------------------------------------------------------------
000210b2 4e 56 ff 7e |NV ~ | LINK.W A6,#0xff7e
000210b6 bf d5 | | CMPA.L (A5),A7
000210b8 62 06 |b | BHI 0x210c0
000210ba 44 fc 00 02 |D | MOVE.W #0x2,CCR
000210be 4e 76 |Nv | TRAPV
000210c0 de fc 00 7e | ~ | ADDA.W #0x7e,A7
000210c4 48 e7 e1 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D2+D1+D0,-(A7)
000210c8 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
000210ce 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3
000210d4 72 01 |r | MOVEQ.L #0x01,D1
000210d6 74 1e |t | MOVEQ.L #0x1e,D2
000210d8 10 39 00 02 33 8c | 9 3 | MOVE.B 0x2338c,D0
000210de 48 80 |H | EXTB.W D0
000210e0 41 bc 00 0f |A | CHK.W #0xf,D0
000210e4 1e 00 | | MOVE.B D0,D7
000210e6 41 fa f0 9e |A | LEA.L 0x20186,A0
000210ea 70 26 |p& | MOVEQ.L #0x26,D0
000210ec 3f 20 |? | MOVE.W -(A0),-(A7)
000210ee 51 c8 ff fc |Q | DBF D0,0x210ec
000210f2 59 4f |YO | SUBQ.L #0x4,A7
000210f4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000210f8 3f 01 |? | MOVE.W D1,-(A7)
000210fa 3f 3c 00 4e |?< N | MOVE.W #0x4e,-(A7)
000210fe 4e 92 |N | JSR (A2)
00021100 50 4f |PO | ADDQ.L #0x8,A7
00021102 4e 93 |N | JSR (A3)
00021104 de fc 00 52 | R | ADDA.W #0x52,A7
00021108 48 78 00 03 |Hx | PEA.L 0x3
0002110c 48 78 00 13 |Hx | PEA.L 0x13
00021110 4e ba fa e8 |N | JSR 0x20bfa
00021114 50 4f |PO | ADDQ.L #0x8,A7
00021116 41 fa f5 b8 |A | LEA.L 0x206d0,A0
0002111a 70 0a |p | MOVEQ.L #0x0a,D0
0002111c 3f 20 |? | MOVE.W -(A0),-(A7)
0002111e 51 c8 ff fc |Q | DBF D0,0x2111c
00021122 59 4f |YO | SUBQ.L #0x4,A7
00021124 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021128 3f 01 |? | MOVE.W D1,-(A7)
0002112a 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7)
0002112e 4e 92 |N | JSR (A2)
00021130 50 4f |PO | ADDQ.L #0x8,A7
00021132 4e 93 |N | JSR (A3)
00021134 de fc 00 1a | | ADDA.W #0x1a,A7
00021138 48 78 00 03 |Hx | PEA.L 0x3
0002113c 48 78 00 13 |Hx | PEA.L 0x13
00021140 4e ba fa b8 |N | JSR 0x20bfa
00021144 50 4f |PO | ADDQ.L #0x8,A7
00021146 10 07 | | MOVE.B D7,D0
00021148 48 80 |H | EXTB.W D0
0002114a c1 c2 | | MULS.W D2,D0
0002114c 41 fa f8 cc |A | LEA.L 0x20a1a,A0
00021150 9e c2 | | SUBA.W D2,A7
00021152 22 4f |"O | MOVEA.L A7,A1
00021154 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00021158 70 1d |p | MOVEQ.L #0x1d,D0
0002115a 12 d8 | | MOVE.B (A0)+,(A1)+
0002115c 51 c8 ff fc |Q | DBF D0,0x2115a
00021160 59 4f |YO | SUBQ.L #0x4,A7
00021162 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021166 3f 01 |? | MOVE.W D1,-(A7)
00021168 3f 02 |? | MOVE.W D2,-(A7)
0002116a 4e 92 |N | JSR (A2)
0002116c 50 4f |PO | ADDQ.L #0x8,A7
0002116e 4e 93 |N | JSR (A3)
00021170 de fc 00 22 | " | ADDA.W #0x22,A7
00021174 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
0002117a 4c df 0f 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1+A2+A3
0002117e 4e 5e |N^ | UNLK A6
00021180 4e 75 |Nu | RTS
00021182 ; --------------------------------------------------------------------------------------
00021182 ; OMSI PASCAL Function
00021182 ; --------------------------------------------------------------------------------------
00021182 4e 56 ff 72 |NV r | LINK.W A6,#0xff72
00021186 bf d5 | | CMPA.L (A5),A7
00021188 62 06 |b | BHI 0x21190
0002118a 44 fc 00 02 |D | MOVE.W #0x2,CCR
0002118e 4e 76 |Nv | TRAPV
00021190 de fc 00 86 | | ADDA.W #0x86,A7
00021194 48 e7 e3 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D2+D1+D0,-(A7)
00021198 45 f9 00 02 2b 0a |E + | LEA.L 0x22b0a,A2
0002119e 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
000211a4 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4
000211aa 22 3c 00 00 03 ff |"< | MOVE.L #0x3ff,D1
000211b0 74 01 |t | MOVEQ.L #0x01,D2
000211b2 41 fa ef d2 |A | LEA.L 0x20186,A0
000211b6 70 26 |p& | MOVEQ.L #0x26,D0
000211b8 3f 20 |? | MOVE.W -(A0),-(A7)
000211ba 51 c8 ff fc |Q | DBF D0,0x211b8
000211be 59 4f |YO | SUBQ.L #0x4,A7
000211c0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000211c4 3f 02 |? | MOVE.W D2,-(A7)
000211c6 3f 3c 00 4e |?< N | MOVE.W #0x4e,-(A7)
000211ca 4e 93 |N | JSR (A3)
000211cc 50 4f |PO | ADDQ.L #0x8,A7
000211ce 4e 94 |N | JSR (A4)
000211d0 de fc 00 52 | R | ADDA.W #0x52,A7
000211d4 48 78 00 03 |Hx | PEA.L 0x3
000211d8 48 78 00 12 |Hx | PEA.L 0x12
000211dc 4e ba fa 1c |N | JSR 0x20bfa
000211e0 9e fc 00 0e | | SUBA.W #0xe,A7
000211e4 20 4f | O | MOVEA.L A7,A0
000211e6 43 fa f4 e8 |C | LEA.L 0x206d0,A1
000211ea 70 14 |p | MOVEQ.L #0x14,D0
000211ec 10 d9 | | MOVE.B (A1)+,(A0)+
000211ee 51 c8 ff fc |Q | DBF D0,0x211ec
000211f2 59 4f |YO | SUBQ.L #0x4,A7
000211f4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000211f8 3f 02 |? | MOVE.W D2,-(A7)
000211fa 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7)
000211fe 4e 93 |N | JSR (A3)
00021200 50 4f |PO | ADDQ.L #0x8,A7
00021202 4e 94 |N | JSR (A4)
00021204 de fc 00 1a | | ADDA.W #0x1a,A7
00021208 48 78 00 03 |Hx | PEA.L 0x3
0002120c 48 78 00 12 |Hx | PEA.L 0x12
00021210 4e ba f9 e8 |N | JSR 0x20bfa
00021214 50 4f |PO | ADDQ.L #0x8,A7
00021216 4a 79 00 02 33 4e |Jy 3N | TST.W 0x2334e
0002121c 67 00 00 c4 |g | BEQ 0x212e2
00021220 7c 00 || | MOVEQ.L #0x00,D6
00021222 7e 00 |~ | MOVEQ.L #0x00,D7
00021224 be 81 | | CMP.L D1,D7
00021226 63 02 |c | BLS 0x2122a
00021228 4e 4f |NO | TRAP #15
0002122a 20 4a | J | MOVEA.L A2,A0
0002122c 41 f0 78 00 |A x | LEA.L (A0+D7.L),A0
00021230 10 28 04 14 | ( | MOVE.B (A0+0x414),D0
00021234 0c 00 00 40 | @ | CMPI.B #0x40,D0
00021238 66 00 00 8e |f | BNE 0x212c8
0002123c 20 07 | | MOVE.L D7,D0
0002123e 52 80 |R | ADDQ.L #0x1,D0
00021240 b0 81 | | CMP.L D1,D0
00021242 63 02 |c | BLS 0x21246
00021244 4e 4f |NO | TRAP #15
00021246 20 4a | J | MOVEA.L A2,A0
00021248 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
0002124c 10 28 04 14 | ( | MOVE.B (A0+0x414),D0
00021250 0c 00 00 28 | ( | CMPI.B #0x28,D0
00021254 66 72 |fr | BNE 0x212c8
00021256 20 07 | | MOVE.L D7,D0
00021258 54 80 |T | ADDQ.L #0x2,D0
0002125a b0 81 | | CMP.L D1,D0
0002125c 63 02 |c | BLS 0x21260
0002125e 4e 4f |NO | TRAP #15
00021260 20 4a | J | MOVEA.L A2,A0
00021262 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00021266 10 28 04 14 | ( | MOVE.B (A0+0x414),D0
0002126a 0c 00 00 23 | # | CMPI.B #0x23,D0
0002126e 66 58 |fX | BNE 0x212c8
00021270 20 07 | | MOVE.L D7,D0
00021272 56 80 |V | ADDQ.L #0x3,D0
00021274 b0 81 | | CMP.L D1,D0
00021276 63 02 |c | BLS 0x2127a
00021278 4e 4f |NO | TRAP #15
0002127a 20 4a | J | MOVEA.L A2,A0
0002127c 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00021280 10 28 04 14 | ( | MOVE.B (A0+0x414),D0
00021284 0c 00 00 29 | ) | CMPI.B #0x29,D0
00021288 66 3e |f> | BNE 0x212c8
0002128a 58 87 |X | ADDQ.L #0x4,D7
0002128c be 81 | | CMP.L D1,D7
0002128e 63 02 |c | BLS 0x21292
00021290 4e 4f |NO | TRAP #15
00021292 20 4a | J | MOVEA.L A2,A0
00021294 41 f0 78 00 |A x | LEA.L (A0+D7.L),A0
00021298 1f 28 04 14 | ( | MOVE.B (A0+0x414),-(A7)
0002129c 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
000212a2 54 4f |TO | ADDQ.L #0x2,A7
000212a4 52 87 |R | ADDQ.L #0x1,D7
000212a6 7c 00 || | MOVEQ.L #0x00,D6
000212a8 be 81 | | CMP.L D1,D7
000212aa 63 02 |c | BLS 0x212ae
000212ac 4e 4f |NO | TRAP #15
000212ae 20 4a | J | MOVEA.L A2,A0
000212b0 41 f0 78 00 |A x | LEA.L (A0+D7.L),A0
000212b4 10 28 04 14 | ( | MOVE.B (A0+0x414),D0
000212b8 0c 00 00 5c | \ | CMPI.B #0x5c,D0
000212bc 67 04 |g | BEQ 0x212c2
000212be be 81 | | CMP.L D1,D7
000212c0 6d 02 |m | BLT 0x212c4
000212c2 52 06 |R | ADDQ.B #0x1,D6
000212c4 4a 06 |J | TST.B D6
000212c6 67 c4 |g | BEQ 0x2128c
000212c8 52 87 |R | ADDQ.L #0x1,D7
000212ca 70 00 |p | MOVEQ.L #0x00,D0
000212cc be 81 | | CMP.L D1,D7
000212ce 6e 04 |n | BGT 0x212d4
000212d0 4a 06 |J | TST.B D6
000212d2 67 02 |g | BEQ 0x212d6
000212d4 52 00 |R | ADDQ.B #0x1,D0
000212d6 48 80 |H | EXTB.W D0
000212d8 41 82 |A | CHK.W D2,D0
000212da 1c 00 | | MOVE.B D0,D6
000212dc 67 00 ff 46 |g F | BEQ 0x21224
000212e0 60 22 |`" | BRA 0x21304
000212e2 41 fa ef ec |A | LEA.L 0x202d0,A0
000212e6 70 07 |p | MOVEQ.L #0x07,D0
000212e8 2f 20 |/ | MOVE.L -(A0),-(A7)
000212ea 51 c8 ff fc |Q | DBF D0,0x212e8
000212ee 59 4f |YO | SUBQ.L #0x4,A7
000212f0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000212f4 3f 02 |? | MOVE.W D2,-(A7)
000212f6 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7)
000212fa 4e 93 |N | JSR (A3)
000212fc 50 4f |PO | ADDQ.L #0x8,A7
000212fe 4e 94 |N | JSR (A4)
00021300 de fc 00 24 | $ | ADDA.W #0x24,A7
00021304 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
0002130a 4c df 1f c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0+A1+A2+A3+A4
0002130e 4e 5e |N^ | UNLK A6
00021310 4e 75 |Nu | RTS
00021312 ; --------------------------------------------------------------------------------------
00021312 ; OMSI PASCAL Function
00021312 ; <LVAR -0x00c 4(rw)>
00021312 ; --------------------------------------------------------------------------------------
00021312 4e 56 ff 76 |NV v | LINK.W A6,#0xff76
00021316 bf d5 | | CMPA.L (A5),A7
00021318 62 06 |b | BHI 0x21320
0002131a 44 fc 00 02 |D | MOVE.W #0x2,CCR
0002131e 4e 76 |Nv | TRAPV
00021320 de fc 00 7a | z | ADDA.W #0x7a,A7
00021324 48 e7 c7 c0 |H | MOVEM.L A1+A0+D7+D6+D5+D1+D0,-(A7)
00021328 72 01 |r | MOVEQ.L #0x01,D1
0002132a 41 fa ee 5a |A Z | LEA.L 0x20186,A0
0002132e 70 26 |p& | MOVEQ.L #0x26,D0
00021330 3f 20 |? | MOVE.W -(A0),-(A7)
00021332 51 c8 ff fc |Q | DBF D0,0x21330
00021336 59 4f |YO | SUBQ.L #0x4,A7
00021338 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002133c 3f 01 |? | MOVE.W D1,-(A7)
0002133e 3f 3c 00 4e |?< N | MOVE.W #0x4e,-(A7)
00021342 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021348 50 4f |PO | ADDQ.L #0x8,A7
0002134a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021350 de fc 00 52 | R | ADDA.W #0x52,A7
00021354 48 78 00 03 |Hx | PEA.L 0x3
00021358 48 78 00 0e |Hx | PEA.L 0xe
0002135c 4e ba f8 9c |N | JSR 0x20bfa
00021360 9e fc 00 0a | | SUBA.W #0xa,A7
00021364 20 4f | O | MOVEA.L A7,A0
00021366 43 fa f3 7e |C ~ | LEA.L 0x206e6,A1
0002136a 70 10 |p | MOVEQ.L #0x10,D0
0002136c 10 d9 | | MOVE.B (A1)+,(A0)+
0002136e 51 c8 ff fc |Q | DBF D0,0x2136c
00021372 59 4f |YO | SUBQ.L #0x4,A7
00021374 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021378 3f 01 |? | MOVE.W D1,-(A7)
0002137a 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7)
0002137e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021384 50 4f |PO | ADDQ.L #0x8,A7
00021386 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
0002138c de fc 00 16 | | ADDA.W #0x16,A7
00021390 48 78 00 03 |Hx | PEA.L 0x3
00021394 48 78 00 0e |Hx | PEA.L 0xe
00021398 4e ba f8 60 |N ` | JSR 0x20bfa
0002139c 50 4f |PO | ADDQ.L #0x8,A7
0002139e 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
000213a4 42 80 |B | CLR.L D0
000213a6 30 39 00 02 33 6c |09 3l | MOVE.W 0x2336c,D0
000213ac 2d 40 ff f4 |-@ | MOVE.L D0,(A6-0xc)
000213b0 7c 00 || | MOVEQ.L #0x00,D6
000213b2 52 80 |R | ADDQ.L #0x1,D0
000213b4 2e 00 |. | MOVE.L D0,D7
000213b6 52 86 |R | ADDQ.L #0x1,D6
000213b8 0c 87 00 00 03 40 | @ | CMPI.L #0x00000340,D7
000213be 6f 02 |o | BLE 0x213c2
000213c0 7e 01 |~ | MOVEQ.L #0x01,D7
000213c2 20 07 | | MOVE.L D7,D0
000213c4 53 80 |S | SUBQ.L #0x1,D0
000213c6 0c 80 00 00 03 3f | ? | CMPI.L #0x0000033f,D0
000213cc 63 02 |c | BLS 0x213d0
000213ce 4e 4f |NO | TRAP #15
000213d0 41 f9 00 02 2b 0a |A + | LEA.L 0x22b0a,A0
000213d6 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
000213da 1f 28 09 02 | ( | MOVE.B (A0+0x902),-(A7)
000213de 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
000213e4 54 4f |TO | ADDQ.L #0x2,A7
000213e6 70 00 |p | MOVEQ.L #0x00,D0
000213e8 be ae ff f4 | | CMP.L (A6-0xc),D7
000213ec 66 02 |f | BNE 0x213f0
000213ee 52 00 |R | ADDQ.B #0x1,D0
000213f0 1a 00 | | MOVE.B D0,D5
000213f2 52 87 |R | ADDQ.L #0x1,D7
000213f4 4a 05 |J | TST.B D5
000213f6 66 08 |f | BNE 0x21400
000213f8 0c 86 00 00 03 40 | @ | CMPI.L #0x00000340,D6
000213fe 6f b6 |o | BLE 0x213b6
00021400 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00021406 4c df 03 e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1
0002140a 4e 5e |N^ | UNLK A6
0002140c 4e 75 |Nu | RTS
0002140e ; --------------------------------------------------------------------------------------
0002140e ; OMSI PASCAL Function
0002140e ; --------------------------------------------------------------------------------------
0002140e 4e 56 ff c0 |NV | LINK.W A6,#0xffc0
00021412 bf d5 | | CMPA.L (A5),A7
00021414 62 06 |b | BHI 0x2141c
00021416 44 fc 00 02 |D | MOVE.W #0x2,CCR
0002141a 4e 76 |Nv | TRAPV
0002141c de fc 00 38 | 8 | ADDA.W #0x38,A7
00021420 48 e7 db e0 |H | MOVEM.L A2+A1+A0+D7+D6+D4+D3+D1+D0,-(A7)
00021424 45 f9 00 02 2b 0a |E + | LEA.L 0x22b0a,A2
0002142a 72 1d |r | MOVEQ.L #0x1d,D1
0002142c 7c 01 || | MOVEQ.L #0x01,D6
0002142e 78 02 |x | MOVEQ.L #0x02,D4
00021430 26 06 |& | MOVE.L D6,D3
00021432 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4
00021438 20 04 | | MOVE.L D4,D0
0002143a 53 80 |S | SUBQ.L #0x1,D0
0002143c 53 80 |S | SUBQ.L #0x1,D0
0002143e b0 81 | | CMP.L D1,D0
00021440 63 02 |c | BLS 0x21444
00021442 4e 4f |NO | TRAP #15
00021444 20 4a | J | MOVEA.L A2,A0
00021446 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
0002144a 1e 28 13 f4 | ( | MOVE.B (A0+0x13f4),D7
0002144e 20 04 | | MOVE.L D4,D0
00021450 53 80 |S | SUBQ.L #0x1,D0
00021452 b0 81 | | CMP.L D1,D0
00021454 63 02 |c | BLS 0x21458
00021456 4e 4f |NO | TRAP #15
00021458 22 4a |"J | MOVEA.L A2,A1
0002145a 43 f1 08 00 |C | LEA.L (A1+D0.L),A1
0002145e 11 69 13 f4 13 f4 | i | MOVE.B (A1+0x13f4),(A0+0x13f4)
00021464 13 47 13 f4 | G | MOVE.B D7,(A1+0x13f4)
00021468 52 86 |R | ADDQ.L #0x1,D6
0002146a 0c 86 00 00 00 0f | | CMPI.L #0x0000000f,D6
00021470 6f bc |o | BLE 0x2142e
00021472 4c df 07 db |L | MOVEM.L (A7)+,D0+D1+D3+D4+D6+D7+A0+A1+A2
00021476 4e 5e |N^ | UNLK A6
00021478 4e 75 |Nu | RTS
0002147a ; --------------------------------------------------------------------------------------
0002147a ; OMSI PASCAL Function
0002147a ; --------------------------------------------------------------------------------------
0002147a 4e 56 ff e0 |NV | LINK.W A6,#0xffe0
0002147e bf d5 | | CMPA.L (A5),A7
00021480 62 06 |b | BHI 0x21488
00021482 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021486 4e 76 |Nv | TRAPV
00021488 de fc 00 1c | | ADDA.W #0x1c,A7
0002148c 48 e7 81 80 |H | MOVEM.L A0+D7+D0,-(A7)
00021490 7e 01 |~ | MOVEQ.L #0x01,D7
00021492 20 07 | | MOVE.L D7,D0
00021494 53 80 |S | SUBQ.L #0x1,D0
00021496 0c 80 00 00 00 1d | | CMPI.L #0x0000001d,D0
0002149c 63 02 |c | BLS 0x214a0
0002149e 4e 4f |NO | TRAP #15
000214a0 41 f9 00 02 2b 0a |A + | LEA.L 0x22b0a,A0
000214a6 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
000214aa 10 28 13 f4 | ( | MOVE.B (A0+0x13f4),D0
000214ae 0c 00 00 01 | | CMPI.B #0x01,D0
000214b2 63 10 |c | BLS 0x214c4
000214b4 0c 00 00 ff | | CMPI.B #0xff,D0
000214b8 64 0a |d | BCC 0x214c4
000214ba 1f 00 | | MOVE.B D0,-(A7)
000214bc 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
000214c2 54 4f |TO | ADDQ.L #0x2,A7
000214c4 52 87 |R | ADDQ.L #0x1,D7
000214c6 0c 87 00 00 00 1e | | CMPI.L #0x0000001e,D7
000214cc 6f c4 |o | BLE 0x21492
000214ce 4c df 01 81 |L | MOVEM.L (A7)+,D0+D7+A0
000214d2 4e 5e |N^ | UNLK A6
000214d4 4e 75 |Nu | RTS
000214d6 ; --------------------------------------------------------------------------------------
000214d6 ; OMSI PASCAL Function
000214d6 ; <LVAR -0x002 2(w)>
000214d6 ; --------------------------------------------------------------------------------------
000214d6 4e 56 ff 66 |NV f | LINK.W A6,#0xff66
000214da bf d5 | | CMPA.L (A5),A7
000214dc 62 06 |b | BHI 0x214e4
000214de 44 fc 00 02 |D | MOVE.W #0x2,CCR
000214e2 4e 76 |Nv | TRAPV
000214e4 de fc 00 92 | | ADDA.W #0x92,A7
000214e8 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
000214ec 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
000214f2 47 f9 00 01 03 dc |G | LEA.L WriteConsoleCrLf(void),A3
000214f8 49 f9 00 01 03 d8 |I | LEA.L WriteConsoleString(str : String),A4
000214fe 74 01 |t | MOVEQ.L #0x01,D2
00021500 76 0f |v | MOVEQ.L #0x0f,D3
00021502 78 24 |x$ | MOVEQ.L #0x24,D4
00021504 41 fa ec 80 |A | LEA.L 0x20186,A0
00021508 70 26 |p& | MOVEQ.L #0x26,D0
0002150a 3f 20 |? | MOVE.W -(A0),-(A7)
0002150c 51 c8 ff fc |Q | DBF D0,0x2150a
00021510 59 4f |YO | SUBQ.L #0x4,A7
00021512 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021516 3f 02 |? | MOVE.W D2,-(A7)
00021518 3f 3c 00 4e |?< N | MOVE.W #0x4e,-(A7)
0002151c 4e 92 |N | JSR (A2)
0002151e 50 4f |PO | ADDQ.L #0x8,A7
00021520 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021526 de fc 00 52 | R | ADDA.W #0x52,A7
0002152a 48 78 00 03 |Hx | PEA.L 0x3
0002152e 48 78 00 1d |Hx | PEA.L 0x1d
00021532 4e ba f6 c6 |N | JSR 0x20bfa
00021536 50 4f |PO | ADDQ.L #0x8,A7
00021538 41 fa f1 de |A | LEA.L 0x20718,A0
0002153c 70 07 |p | MOVEQ.L #0x07,D0
0002153e 2f 20 |/ | MOVE.L -(A0),-(A7)
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 02 |? | MOVE.W D2,-(A7)
0002154c 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7)
00021550 4e 92 |N | JSR (A2)
00021552 50 4f |PO | ADDQ.L #0x8,A7
00021554 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
0002155a de c4 | | ADDA.W D4,A7
0002155c 48 78 00 03 |Hx | PEA.L 0x3
00021560 48 78 00 1d |Hx | PEA.L 0x1d
00021564 4e ba f6 94 |N | JSR 0x20bfa
00021568 50 4f |PO | ADDQ.L #0x8,A7
0002156a 4e 93 |N | JSR (A3)
0002156c 4a 79 00 02 33 6a |Jy 3j | TST.W 0x2336a
00021572 67 00 02 1e |g | BEQ 0x21792
00021576 9e c4 | | SUBA.W D4,A7
00021578 20 4f | O | MOVEA.L A7,A0
0002157a 43 fa f1 9c |C | LEA.L 0x20718,A1
0002157e 70 22 |p" | MOVEQ.L #0x22,D0
00021580 10 d9 | | MOVE.B (A1)+,(A0)+
00021582 51 c8 ff fc |Q | DBF D0,0x21580
00021586 59 4f |YO | SUBQ.L #0x4,A7
00021588 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002158c 3f 02 |? | MOVE.W D2,-(A7)
0002158e 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7)
00021592 4e 92 |N | JSR (A2)
00021594 50 4f |PO | ADDQ.L #0x8,A7
00021596 4e 94 |N | JSR (A4)
00021598 de fc 00 28 | ( | ADDA.W #0x28,A7
0002159c 4e ba fe dc |N | JSR 0x2147a
000215a0 4e 93 |N | JSR (A3)
000215a2 7e 00 |~ | MOVEQ.L #0x00,D7
000215a4 0c 87 00 00 00 13 | | CMPI.L #0x00000013,D7
000215aa 63 02 |c | BLS 0x215ae
000215ac 4e 4f |NO | TRAP #15
000215ae 20 07 | | MOVE.L D7,D0
000215b0 e3 80 | | ASL.L #0x1,D0
000215b2 41 f9 00 02 2b 0a |A + | LEA.L 0x22b0a,A0
000215b8 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
000215bc 30 3c 3f ff |0<? | MOVE.W #0x3fff,D0
000215c0 c0 68 08 1a | h | AND.W (A0+0x81a),D0
000215c4 3d 40 ff fe |=@ | MOVE.W D0,(A6-0x2)
000215c8 7c 00 || | MOVEQ.L #0x00,D6
000215ca 32 3c 40 00 |2<@ | MOVE.W #0x4000,D1
000215ce c2 68 08 1a | h | AND.W (A0+0x81a),D1
000215d2 0c 41 40 00 | A@ | CMPI.W #0x4000,D1
000215d6 66 02 |f | BNE 0x215da
000215d8 52 06 |R | ADDQ.B #0x1,D6
000215da 7a 00 |z | MOVEQ.L #0x00,D5
000215dc 32 3c 80 00 |2< | MOVE.W #0x8000,D1
000215e0 c2 68 08 1a | h | AND.W (A0+0x81a),D1
000215e4 0c 41 80 00 | A | CMPI.W #0x8000,D1
000215e8 66 02 |f | BNE 0x215ec
000215ea 52 05 |R | ADDQ.B #0x1,D5
000215ec 4a 06 |J | TST.B D6
000215ee 67 12 |g | BEQ 0x21602
000215f0 5d 4f |]O | SUBQ.L #0x6,A7
000215f2 20 4f | O | MOVEA.L A7,A0
000215f4 43 fa f1 46 |C F | LEA.L 0x2073c,A1
000215f8 72 04 |r | MOVEQ.L #0x04,D1
000215fa 10 d9 | | MOVE.B (A1)+,(A0)+
000215fc 51 c9 ff fc |Q | DBF D1,0x215fa
00021600 60 10 |` | BRA 0x21612
00021602 5d 4f |]O | SUBQ.L #0x6,A7
00021604 20 4f | O | MOVEA.L A7,A0
00021606 43 fa eb 2a |C * | LEA.L 0x20132,A1
0002160a 72 04 |r | MOVEQ.L #0x04,D1
0002160c 10 d9 | | MOVE.B (A1)+,(A0)+
0002160e 51 c9 ff fc |Q | DBF D1,0x2160c
00021612 59 4f |YO | SUBQ.L #0x4,A7
00021614 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021618 3f 02 |? | MOVE.W D2,-(A7)
0002161a 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7)
0002161e 4e 92 |N | JSR (A2)
00021620 50 4f |PO | ADDQ.L #0x8,A7
00021622 4e 94 |N | JSR (A4)
00021624 de fc 00 0a | | ADDA.W #0xa,A7
00021628 4a 05 |J | TST.B D5
0002162a 67 06 |g | BEQ 0x21632
0002162c 3f 3a f1 14 |?: | MOVE.W 0x20742,-(A7)
00021630 60 04 |` | BRA 0x21636
00021632 3f 3a ea fc |?: | MOVE.W 0x20130,-(A7)
00021636 59 4f |YO | SUBQ.L #0x4,A7
00021638 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002163c 3f 02 |? | MOVE.W D2,-(A7)
0002163e 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00021642 4e 92 |N | JSR (A2)
00021644 50 4f |PO | ADDQ.L #0x8,A7
00021646 4e 94 |N | JSR (A4)
00021648 5c 4f |\O | ADDQ.L #0x6,A7
0002164a 3f 00 |? | MOVE.W D0,-(A7)
0002164c 4e ba f6 98 |N | JSR 0x20ce6
00021650 54 4f |TO | ADDQ.L #0x2,A7
00021652 4e 93 |N | JSR (A3)
00021654 52 87 |R | ADDQ.L #0x1,D7
00021656 0c 87 00 00 00 13 | | CMPI.L #0x00000013,D7
0002165c 6f 00 ff 46 |o F | BLE 0x215a4
00021660 4e 93 |N | JSR (A3)
00021662 9e fc 00 1a | | SUBA.W #0x1a,A7
00021666 20 4f | O | MOVEA.L A7,A0
00021668 43 fa f0 da |C | LEA.L 0x20744,A1
0002166c 70 18 |p | MOVEQ.L #0x18,D0
0002166e 10 d9 | | MOVE.B (A1)+,(A0)+
00021670 51 c8 ff fc |Q | DBF D0,0x2166e
00021674 59 4f |YO | SUBQ.L #0x4,A7
00021676 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002167a 3f 02 |? | MOVE.W D2,-(A7)
0002167c 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7)
00021680 4e 92 |N | JSR (A2)
00021682 50 4f |PO | ADDQ.L #0x8,A7
00021684 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
0002168a de fc 00 1e | | ADDA.W #0x1e,A7
0002168e 7e 00 |~ | MOVEQ.L #0x00,D7
00021690 3f 3a f0 d0 |?: | MOVE.W 0x20762,-(A7)
00021694 3f 3a f0 ca |?: | MOVE.W 0x20760,-(A7)
00021698 3f 3a f0 c4 |?: | MOVE.W 0x2075e,-(A7)
0002169c 51 4f |QO | SUBQ.L #0x8,A7
0002169e 48 6f 00 08 |Ho | PEA.L (A7+0x8)
000216a2 3f 02 |? | MOVE.W D2,-(A7)
000216a4 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7)
000216a8 4e 92 |N | JSR (A2)
000216aa 2e 87 |. | MOVE.L D7,(A7)
000216ac 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
000216b2 58 4f |XO | ADDQ.L #0x4,A7
000216b4 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
000216ba 50 4f |PO | ADDQ.L #0x8,A7
000216bc 4e 94 |N | JSR (A4)
000216be 5c 4f |\O | ADDQ.L #0x6,A7
000216c0 1e ba f0 a2 | | MOVE.B 0x20764,(A7)
000216c4 1f 7a f0 9f 00 01 | z | MOVE.B 0x20765,(A7+0x1)
000216ca 1f 7a f0 9a 00 02 | z | MOVE.B 0x20766,(A7+0x2)
000216d0 59 4f |YO | SUBQ.L #0x4,A7
000216d2 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000216d6 3f 02 |? | MOVE.W D2,-(A7)
000216d8 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7)
000216dc 4e 92 |N | JSR (A2)
000216de 50 4f |PO | ADDQ.L #0x8,A7
000216e0 4e 94 |N | JSR (A4)
000216e2 50 4f |PO | ADDQ.L #0x8,A7
000216e4 be 83 | | CMP.L D3,D7
000216e6 63 02 |c | BLS 0x216ea
000216e8 4e 4f |NO | TRAP #15
000216ea 20 07 | | MOVE.L D7,D0
000216ec e3 80 | | ASL.L #0x1,D0
000216ee 41 f9 00 02 2b 0a |A + | LEA.L 0x22b0a,A0
000216f4 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
000216f8 3f 28 0c 52 |?( R | MOVE.W (A0+0xc52),-(A7)
000216fc 4e ba f5 e8 |N | JSR 0x20ce6
00021700 54 4f |TO | ADDQ.L #0x2,A7
00021702 4e 93 |N | JSR (A3)
00021704 52 87 |R | ADDQ.L #0x1,D7
00021706 0c 87 00 00 00 09 | | CMPI.L #0x00000009,D7
0002170c 6f 82 |o | BLE 0x21690
0002170e 7e 0a |~ | MOVEQ.L #0x0a,D7
00021710 5d 4f |]O | SUBQ.L #0x6,A7
00021712 20 4f | O | MOVEA.L A7,A0
00021714 43 fa ea 1c |C | LEA.L 0x20132,A1
00021718 70 04 |p | MOVEQ.L #0x04,D0
0002171a 10 d9 | | MOVE.B (A1)+,(A0)+
0002171c 51 c8 ff fc |Q | DBF D0,0x2171a
00021720 51 4f |QO | SUBQ.L #0x8,A7
00021722 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00021726 3f 02 |? | MOVE.W D2,-(A7)
00021728 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7)
0002172c 4e 92 |N | JSR (A2)
0002172e 2e 87 |. | MOVE.L D7,(A7)
00021730 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00021736 58 4f |XO | ADDQ.L #0x4,A7
00021738 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
0002173e 50 4f |PO | ADDQ.L #0x8,A7
00021740 4e 94 |N | JSR (A4)
00021742 5c 4f |\O | ADDQ.L #0x6,A7
00021744 1e ba f0 22 | " | MOVE.B 0x20768,(A7)
00021748 1f 7a f0 1f 00 01 | z | MOVE.B 0x20769,(A7+0x1)
0002174e 1f 7a f0 1a 00 02 | z | MOVE.B 0x2076a,(A7+0x2)
00021754 59 4f |YO | SUBQ.L #0x4,A7
00021756 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002175a 3f 02 |? | MOVE.W D2,-(A7)
0002175c 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7)
00021760 4e 92 |N | JSR (A2)
00021762 50 4f |PO | ADDQ.L #0x8,A7
00021764 4e 94 |N | JSR (A4)
00021766 50 4f |PO | ADDQ.L #0x8,A7
00021768 be 83 | | CMP.L D3,D7
0002176a 63 02 |c | BLS 0x2176e
0002176c 4e 4f |NO | TRAP #15
0002176e 20 07 | | MOVE.L D7,D0
00021770 e3 80 | | ASL.L #0x1,D0
00021772 41 f9 00 02 2b 0a |A + | LEA.L 0x22b0a,A0
00021778 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
0002177c 3f 28 0c 52 |?( R | MOVE.W (A0+0xc52),-(A7)
00021780 4e ba f5 64 |N d | JSR 0x20ce6
00021784 54 4f |TO | ADDQ.L #0x2,A7
00021786 4e 93 |N | JSR (A3)
00021788 52 87 |R | ADDQ.L #0x1,D7
0002178a be 83 | | CMP.L D3,D7
0002178c 6f 82 |o | BLE 0x21710
0002178e 4e 93 |N | JSR (A3)
00021790 60 26 |`& | BRA 0x217b8
00021792 41 fa eb 66 |A f | LEA.L 0x202fa,A0
00021796 70 14 |p | MOVEQ.L #0x14,D0
00021798 3f 20 |? | MOVE.W -(A0),-(A7)
0002179a 51 c8 ff fc |Q | DBF D0,0x21798
0002179e 59 4f |YO | SUBQ.L #0x4,A7
000217a0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000217a4 3f 02 |? | MOVE.W D2,-(A7)
000217a6 3f 3c 00 2a |?< * | MOVE.W #0x2a,-(A7)
000217aa 4e 92 |N | JSR (A2)
000217ac 50 4f |PO | ADDQ.L #0x8,A7
000217ae 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
000217b4 de fc 00 2e | . | ADDA.W #0x2e,A7
000217b8 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
000217bc 4e 5e |N^ | UNLK A6
000217be 4e 75 |Nu | RTS
000217c0 ; --------------------------------------------------------------------------------------
000217c0 ; OMSI PASCAL Function
000217c0 ; --------------------------------------------------------------------------------------
000217c0 4e 56 ff bc |NV | LINK.W A6,#0xffbc
000217c4 bf d5 | | CMPA.L (A5),A7
000217c6 62 06 |b | BHI 0x217ce
000217c8 44 fc 00 02 |D | MOVE.W #0x2,CCR
000217cc 4e 76 |Nv | TRAPV
000217ce de fc 00 40 | @ | ADDA.W #0x40,A7
000217d2 48 e7 f1 c0 |H | MOVEM.L A1+A0+D7+D3+D2+D1+D0,-(A7)
000217d6 74 01 |t | MOVEQ.L #0x01,D2
000217d8 76 0f |v | MOVEQ.L #0x0f,D3
000217da 9e fc 00 14 | | SUBA.W #0x14,A7
000217de 20 4f | O | MOVEA.L A7,A0
000217e0 43 fa ef 8a |C | LEA.L 0x2076c,A1
000217e4 70 12 |p | MOVEQ.L #0x12,D0
000217e6 10 d9 | | MOVE.B (A1)+,(A0)+
000217e8 51 c8 ff fc |Q | DBF D0,0x217e6
000217ec 59 4f |YO | SUBQ.L #0x4,A7
000217ee 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000217f2 3f 02 |? | MOVE.W D2,-(A7)
000217f4 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
000217f8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
000217fe 50 4f |PO | ADDQ.L #0x8,A7
00021800 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00021806 de fc 00 18 | | ADDA.W #0x18,A7
0002180a 7e 00 |~ | MOVEQ.L #0x00,D7
0002180c be 83 | | CMP.L D3,D7
0002180e 63 02 |c | BLS 0x21812
00021810 4e 4f |NO | TRAP #15
00021812 41 f9 00 02 37 5a |A 7Z | LEA.L 0x2375a,A0
00021818 20 07 | | MOVE.L D7,D0
0002181a e6 98 | | ROR.L #0x3,D0
0002181c d0 c0 | | ADDA.W D0,A0
0002181e 48 40 |H@ | SWAP.W D0
00021820 e7 58 | X | ROL.W #0x3,D0
00021822 12 10 | | MOVE.B (A0),D1
00021824 e1 29 | ) | LSL.B D0,D1
00021826 ee 09 | | LSR.B #0x7,D1
00021828 67 30 |g0 | BEQ 0x2185a
0002182a 3f 3a ef 54 |?: T | MOVE.W 0x20780,-(A7)
0002182e 51 4f |QO | SUBQ.L #0x8,A7
00021830 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00021834 3f 02 |? | MOVE.W D2,-(A7)
00021836 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
0002183a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
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 b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00021858 5c 4f |\O | ADDQ.L #0x6,A7
0002185a 52 87 |R | ADDQ.L #0x1,D7
0002185c be 83 | | CMP.L D3,D7
0002185e 6f ac |o | BLE 0x2180c
00021860 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00021866 4c df 03 8f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D7+A0+A1
0002186a 4e 5e |N^ | UNLK A6
0002186c 4e 75 |Nu | RTS
0002186e ; --------------------------------------------------------------------------------------
0002186e ; OMSI PASCAL Function
0002186e ; <LVAR 0x012 2(r)>
0002186e ; <LVAR 0x010 2(r)>
0002186e ; <LVAR 0x00a 2(r)>
0002186e ; <LVAR 0x008 2(r)>
0002186e ; --------------------------------------------------------------------------------------
0002186e 4e 56 ff ea |NV | LINK.W A6,#0xffea
00021872 bf d5 | | CMPA.L (A5),A7
00021874 62 06 |b | BHI 0x2187c
00021876 44 fc 00 02 |D | MOVE.W #0x2,CCR
0002187a 4e 76 |Nv | TRAPV
0002187c de fc 00 16 | | ADDA.W #0x16,A7
00021880 48 e7 00 80 |H | MOVEM.L A0,-(A7)
00021884 41 fa f4 60 |A ` | LEA.L 0x20ce6,A0
00021888 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7)
0002188c 4e 90 |N | JSR (A0)
0002188e 3e ae 00 0a |> | MOVE.W (A6+0xa),(A7)
00021892 4e 90 |N | JSR (A0)
00021894 3e ba e8 9a |> | MOVE.W 0x20130,(A7)
00021898 59 4f |YO | SUBQ.L #0x4,A7
0002189a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002189e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
000218a2 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
000218a6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
000218ac 50 4f |PO | ADDQ.L #0x8,A7
000218ae 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
000218b4 58 4f |XO | ADDQ.L #0x4,A7
000218b6 3e ae 00 10 |> | MOVE.W (A6+0x10),(A7)
000218ba 4e 90 |N | JSR (A0)
000218bc 3e ae 00 12 |> | MOVE.W (A6+0x12),(A7)
000218c0 4e 90 |N | JSR (A0)
000218c2 54 4f |TO | ADDQ.L #0x2,A7
000218c4 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
000218ca 4c df 01 00 |L | MOVEM.L (A7)+,A0
000218ce 4e 5e |N^ | UNLK A6
000218d0 4e 75 |Nu | RTS
000218d2 ; --------------------------------------------------------------------------------------
000218d2 ; OMSI PASCAL Function
000218d2 ; --------------------------------------------------------------------------------------
000218d2 4e 56 ff 72 |NV r | LINK.W A6,#0xff72
000218d6 bf d5 | | CMPA.L (A5),A7
000218d8 62 06 |b | BHI 0x218e0
000218da 44 fc 00 02 |D | MOVE.W #0x2,CCR
000218de 4e 76 |Nv | TRAPV
000218e0 de fc 00 8e | | ADDA.W #0x8e,A7
000218e4 48 e7 fe f8 |H | MOVEM.L A4+A3+A2+A1+A0+D6+D5+D4+D3+D2+D1+D0,-(A7)
000218e8 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
000218ee 47 f9 00 01 03 dc |G | LEA.L WriteConsoleCrLf(void),A3
000218f4 49 f9 00 01 03 d8 |I | LEA.L WriteConsoleString(str : String),A4
000218fa 72 01 |r | MOVEQ.L #0x01,D1
000218fc 74 08 |t | MOVEQ.L #0x08,D2
000218fe 76 0a |v | MOVEQ.L #0x0a,D3
00021900 78 09 |x | MOVEQ.L #0x09,D4
00021902 7a 02 |z | MOVEQ.L #0x02,D5
00021904 7c 10 || | MOVEQ.L #0x10,D6
00021906 41 fa e8 7e |A ~ | LEA.L 0x20186,A0
0002190a 70 26 |p& | MOVEQ.L #0x26,D0
0002190c 3f 20 |? | MOVE.W -(A0),-(A7)
0002190e 51 c8 ff fc |Q | DBF D0,0x2190c
00021912 59 4f |YO | SUBQ.L #0x4,A7
00021914 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021918 3f 01 |? | MOVE.W D1,-(A7)
0002191a 3f 3c 00 4e |?< N | MOVE.W #0x4e,-(A7)
0002191e 4e 92 |N | JSR (A2)
00021920 50 4f |PO | ADDQ.L #0x8,A7
00021922 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021928 de fc 00 52 | R | ADDA.W #0x52,A7
0002192c 48 78 00 03 |Hx | PEA.L 0x3
00021930 48 78 00 0b |Hx | PEA.L 0xb
00021934 4e ba f2 c4 |N | JSR 0x20bfa
00021938 50 4f |PO | ADDQ.L #0x8,A7
0002193a 41 fa ee 54 |A T | LEA.L 0x20790,A0
0002193e 70 06 |p | MOVEQ.L #0x06,D0
00021940 3f 20 |? | MOVE.W -(A0),-(A7)
00021942 51 c8 ff fc |Q | DBF D0,0x21940
00021946 59 4f |YO | SUBQ.L #0x4,A7
00021948 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002194c 3f 01 |? | MOVE.W D1,-(A7)
0002194e 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
00021952 4e 92 |N | JSR (A2)
00021954 50 4f |PO | ADDQ.L #0x8,A7
00021956 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
0002195c de fc 00 12 | | ADDA.W #0x12,A7
00021960 48 78 00 03 |Hx | PEA.L 0x3
00021964 48 78 00 0b |Hx | PEA.L 0xb
00021968 4e ba f2 90 |N | JSR 0x20bfa
0002196c 50 4f |PO | ADDQ.L #0x8,A7
0002196e 4e 93 |N | JSR (A3)
00021970 4a 79 00 02 33 6a |Jy 3j | TST.W 0x2336a
00021976 67 00 02 e0 |g | BEQ 0x21c58
0002197a 9e c3 | | SUBA.W D3,A7
0002197c 20 4f | O | MOVEA.L A7,A0
0002197e 43 fa ee 10 |C | LEA.L 0x20790,A1
00021982 70 08 |p | MOVEQ.L #0x08,D0
00021984 10 d9 | | MOVE.B (A1)+,(A0)+
00021986 51 c8 ff fc |Q | DBF D0,0x21984
0002198a 59 4f |YO | SUBQ.L #0x4,A7
0002198c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021990 3f 01 |? | MOVE.W D1,-(A7)
00021992 3f 04 |? | MOVE.W D4,-(A7)
00021994 4e 92 |N | JSR (A2)
00021996 50 4f |PO | ADDQ.L #0x8,A7
00021998 4e 94 |N | JSR (A4)
0002199a de c3 | | ADDA.W D3,A7
0002199c 2e b9 00 02 37 7c |. 7| | MOVE.L 0x2377c,(A7)
000219a2 4e ba f3 7e |N ~ | JSR 0x20d22
000219a6 54 4f |TO | ADDQ.L #0x2,A7
000219a8 3e ba e7 86 |> | MOVE.W 0x20130,(A7)
000219ac 59 4f |YO | SUBQ.L #0x4,A7
000219ae 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000219b2 3f 01 |? | MOVE.W D1,-(A7)
000219b4 3f 05 |? | MOVE.W D5,-(A7)
000219b6 4e 92 |N | JSR (A2)
000219b8 50 4f |PO | ADDQ.L #0x8,A7
000219ba 4e 94 |N | JSR (A4)
000219bc 54 4f |TO | ADDQ.L #0x2,A7
000219be 2e b9 00 02 37 80 |. 7 | MOVE.L 0x23780,(A7)
000219c4 4e ba f3 5c |N \ | JSR 0x20d22
000219c8 58 4f |XO | ADDQ.L #0x4,A7
000219ca 4e 93 |N | JSR (A3)
000219cc 9e c3 | | SUBA.W D3,A7
000219ce 20 4f | O | MOVEA.L A7,A0
000219d0 43 fa ed c8 |C | LEA.L 0x2079a,A1
000219d4 70 08 |p | MOVEQ.L #0x08,D0
000219d6 10 d9 | | MOVE.B (A1)+,(A0)+
000219d8 51 c8 ff fc |Q | DBF D0,0x219d6
000219dc 59 4f |YO | SUBQ.L #0x4,A7
000219de 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000219e2 3f 01 |? | MOVE.W D1,-(A7)
000219e4 3f 04 |? | MOVE.W D4,-(A7)
000219e6 4e 92 |N | JSR (A2)
000219e8 50 4f |PO | ADDQ.L #0x8,A7
000219ea 4e 94 |N | JSR (A4)
000219ec de c3 | | ADDA.W D3,A7
000219ee 2e b9 00 02 37 7c |. 7| | MOVE.L 0x2377c,(A7)
000219f4 4e ba f3 2c |N , | JSR 0x20d22
000219f8 54 4f |TO | ADDQ.L #0x2,A7
000219fa 3e ba e7 34 |> 4 | MOVE.W 0x20130,(A7)
000219fe 59 4f |YO | SUBQ.L #0x4,A7
00021a00 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021a04 3f 01 |? | MOVE.W D1,-(A7)
00021a06 3f 05 |? | MOVE.W D5,-(A7)
00021a08 4e 92 |N | JSR (A2)
00021a0a 50 4f |PO | ADDQ.L #0x8,A7
00021a0c 4e 94 |N | JSR (A4)
00021a0e 54 4f |TO | ADDQ.L #0x2,A7
00021a10 2e b9 00 02 37 84 |. 7 | MOVE.L 0x23784,(A7)
00021a16 4e ba f3 0a |N | JSR 0x20d22
00021a1a 58 4f |XO | ADDQ.L #0x4,A7
00021a1c 4e 93 |N | JSR (A3)
00021a1e 9e c3 | | SUBA.W D3,A7
00021a20 20 4f | O | MOVEA.L A7,A0
00021a22 43 fa ed 80 |C | LEA.L 0x207a4,A1
00021a26 70 08 |p | MOVEQ.L #0x08,D0
00021a28 10 d9 | | MOVE.B (A1)+,(A0)+
00021a2a 51 c8 ff fc |Q | DBF D0,0x21a28
00021a2e 59 4f |YO | SUBQ.L #0x4,A7
00021a30 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021a34 3f 01 |? | MOVE.W D1,-(A7)
00021a36 3f 04 |? | MOVE.W D4,-(A7)
00021a38 4e 92 |N | JSR (A2)
00021a3a 50 4f |PO | ADDQ.L #0x8,A7
00021a3c 4e 94 |N | JSR (A4)
00021a3e de c3 | | ADDA.W D3,A7
00021a40 2e b9 00 02 37 88 |. 7 | MOVE.L 0x23788,(A7)
00021a46 4e ba f2 da |N | JSR 0x20d22
00021a4a 58 4f |XO | ADDQ.L #0x4,A7
00021a4c 4e 93 |N | JSR (A3)
00021a4e 4e 93 |N | JSR (A3)
00021a50 2f 3a ed 60 |/: ` | MOVE.L 0x207b2,-(A7)
00021a54 2f 3a ed 58 |/: X | MOVE.L 0x207ae,-(A7)
00021a58 59 4f |YO | SUBQ.L #0x4,A7
00021a5a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021a5e 3f 01 |? | MOVE.W D1,-(A7)
00021a60 3f 02 |? | MOVE.W D2,-(A7)
00021a62 4e 92 |N | JSR (A2)
00021a64 50 4f |PO | ADDQ.L #0x8,A7
00021a66 4e 94 |N | JSR (A4)
00021a68 50 4f |PO | ADDQ.L #0x8,A7
00021a6a 2e b9 00 02 37 90 |. 7 | MOVE.L 0x23790,(A7)
00021a70 2f 39 00 02 37 8c |/9 7 | MOVE.L 0x2378c,-(A7)
00021a76 4e ba f3 16 |N | JSR 0x20d8e
00021a7a 50 4f |PO | ADDQ.L #0x8,A7
00021a7c 4e 93 |N | JSR (A3)
00021a7e 2f 3a ed 3a |/: : | MOVE.L 0x207ba,-(A7)
00021a82 2f 3a ed 32 |/: 2 | MOVE.L 0x207b6,-(A7)
00021a86 59 4f |YO | SUBQ.L #0x4,A7
00021a88 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021a8c 3f 01 |? | MOVE.W D1,-(A7)
00021a8e 3f 02 |? | MOVE.W D2,-(A7)
00021a90 4e 92 |N | JSR (A2)
00021a92 50 4f |PO | ADDQ.L #0x8,A7
00021a94 4e 94 |N | JSR (A4)
00021a96 50 4f |PO | ADDQ.L #0x8,A7
00021a98 2e b9 00 02 37 98 |. 7 | MOVE.L 0x23798,(A7)
00021a9e 2f 39 00 02 37 94 |/9 7 | MOVE.L 0x23794,-(A7)
00021aa4 4e ba f2 e8 |N | JSR 0x20d8e
00021aa8 50 4f |PO | ADDQ.L #0x8,A7
00021aaa 4e 93 |N | JSR (A3)
00021aac 4e ba fd 12 |N | JSR 0x217c0
00021ab0 4e 93 |N | JSR (A3)
00021ab2 2f 3a ed 0e |/: | MOVE.L 0x207c2,-(A7)
00021ab6 2f 3a ed 06 |/: | MOVE.L 0x207be,-(A7)
00021aba 51 4f |QO | SUBQ.L #0x8,A7
00021abc 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00021ac0 3f 01 |? | MOVE.W D1,-(A7)
00021ac2 3f 02 |? | MOVE.W D2,-(A7)
00021ac4 4e 92 |N | JSR (A2)
00021ac6 58 4f |XO | ADDQ.L #0x4,A7
00021ac8 42 80 |B | CLR.L D0
00021aca 30 39 00 02 37 50 |09 7P | MOVE.W 0x23750,D0
00021ad0 2f 00 |/ | MOVE.L D0,-(A7)
00021ad2 48 78 00 02 |Hx | PEA.L 0x2
00021ad6 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
00021adc 50 4f |PO | ADDQ.L #0x8,A7
00021ade 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00021ae4 50 4f |PO | ADDQ.L #0x8,A7
00021ae6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021aec 50 4f |PO | ADDQ.L #0x8,A7
00021aee 2e ba ec da |. | MOVE.L 0x207ca,(A7)
00021af2 2f 3a ec d2 |/: | MOVE.L 0x207c6,-(A7)
00021af6 51 4f |QO | SUBQ.L #0x8,A7
00021af8 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00021afc 3f 01 |? | MOVE.W D1,-(A7)
00021afe 3f 02 |? | MOVE.W D2,-(A7)
00021b00 4e 92 |N | JSR (A2)
00021b02 58 4f |XO | ADDQ.L #0x4,A7
00021b04 42 80 |B | CLR.L D0
00021b06 30 39 00 02 37 52 |09 7R | MOVE.W 0x23752,D0
00021b0c 2f 00 |/ | MOVE.L D0,-(A7)
00021b0e 48 78 00 02 |Hx | PEA.L 0x2
00021b12 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
00021b18 50 4f |PO | ADDQ.L #0x8,A7
00021b1a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00021b20 50 4f |PO | ADDQ.L #0x8,A7
00021b22 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021b28 de fc 00 0c | | ADDA.W #0xc,A7
00021b2c 4e 93 |N | JSR (A3)
00021b2e 2f 3a ec a2 |/: | MOVE.L 0x207d2,-(A7)
00021b32 2f 3a ec 9a |/: | MOVE.L 0x207ce,-(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 02 |? | MOVE.W D2,-(A7)
00021b40 4e 92 |N | JSR (A2)
00021b42 50 4f |PO | ADDQ.L #0x8,A7
00021b44 4e 94 |N | JSR (A4)
00021b46 50 4f |PO | ADDQ.L #0x8,A7
00021b48 2e b9 00 02 38 38 |. 88 | MOVE.L 0x23838,(A7)
00021b4e 2f 39 00 02 38 34 |/9 84 | MOVE.L 0x23834,-(A7)
00021b54 2f 39 00 02 38 30 |/9 80 | MOVE.L 0x23830,-(A7)
00021b5a 2f 39 00 02 38 2c |/9 8, | MOVE.L 0x2382c,-(A7)
00021b60 4e ba f2 8a |N | JSR 0x20dec
00021b64 de c6 | | ADDA.W D6,A7
00021b66 4e 93 |N | JSR (A3)
00021b68 2f 3a ec 70 |/: p | MOVE.L 0x207da,-(A7)
00021b6c 2f 3a ec 68 |/: h | MOVE.L 0x207d6,-(A7)
00021b70 59 4f |YO | SUBQ.L #0x4,A7
00021b72 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021b76 3f 01 |? | MOVE.W D1,-(A7)
00021b78 3f 02 |? | MOVE.W D2,-(A7)
00021b7a 4e 92 |N | JSR (A2)
00021b7c 50 4f |PO | ADDQ.L #0x8,A7
00021b7e 4e 94 |N | JSR (A4)
00021b80 50 4f |PO | ADDQ.L #0x8,A7
00021b82 2e b9 00 02 38 40 |. 8@ | MOVE.L 0x23840,(A7)
00021b88 2f 39 00 02 38 3c |/9 8< | MOVE.L 0x2383c,-(A7)
00021b8e 4e ba f1 c2 |N | JSR 0x20d52
00021b92 5c 4f |\O | ADDQ.L #0x6,A7
00021b94 3e ba e5 9a |> | MOVE.W 0x20130,(A7)
00021b98 59 4f |YO | SUBQ.L #0x4,A7
00021b9a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021b9e 3f 01 |? | MOVE.W D1,-(A7)
00021ba0 3f 05 |? | MOVE.W D5,-(A7)
00021ba2 4e 92 |N | JSR (A2)
00021ba4 50 4f |PO | ADDQ.L #0x8,A7
00021ba6 4e 94 |N | JSR (A4)
00021ba8 55 4f |UO | SUBQ.L #0x2,A7
00021baa 20 4f | O | MOVEA.L A7,A0
00021bac 43 fa ec 30 |C 0 | LEA.L 0x207de,A1
00021bb0 70 06 |p | MOVEQ.L #0x06,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 3c 00 07 |?< | MOVE.W #0x7,-(A7)
00021bc4 4e 92 |N | JSR (A2)
00021bc6 50 4f |PO | ADDQ.L #0x8,A7
00021bc8 4e 94 |N | JSR (A4)
00021bca 50 4f |PO | ADDQ.L #0x8,A7
00021bcc 2e b9 00 02 38 48 |. 8H | MOVE.L 0x23848,(A7)
00021bd2 2f 39 00 02 38 44 |/9 8D | MOVE.L 0x23844,-(A7)
00021bd8 4e ba f1 78 |N x | JSR 0x20d52
00021bdc 50 4f |PO | ADDQ.L #0x8,A7
00021bde 4e 93 |N | JSR (A3)
00021be0 2f 3a ec 08 |/: | MOVE.L 0x207ea,-(A7)
00021be4 2f 3a ec 00 |/: | MOVE.L 0x207e6,-(A7)
00021be8 59 4f |YO | SUBQ.L #0x4,A7
00021bea 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021bee 3f 01 |? | MOVE.W D1,-(A7)
00021bf0 3f 02 |? | MOVE.W D2,-(A7)
00021bf2 4e 92 |N | JSR (A2)
00021bf4 50 4f |PO | ADDQ.L #0x8,A7
00021bf6 4e 94 |N | JSR (A4)
00021bf8 50 4f |PO | ADDQ.L #0x8,A7
00021bfa 2e b9 00 02 38 68 |. 8h | MOVE.L 0x23868,(A7)
00021c00 2f 39 00 02 38 64 |/9 8d | MOVE.L 0x23864,-(A7)
00021c06 2f 39 00 02 38 60 |/9 8` | MOVE.L 0x23860,-(A7)
00021c0c 2f 39 00 02 38 5c |/9 8\ | MOVE.L 0x2385c,-(A7)
00021c12 4e ba f1 d8 |N | JSR 0x20dec
00021c16 de c6 | | ADDA.W D6,A7
00021c18 4e 93 |N | JSR (A3)
00021c1a 2f 3a eb d6 |/: | MOVE.L 0x207f2,-(A7)
00021c1e 2f 3a eb ce |/: | MOVE.L 0x207ee,-(A7)
00021c22 59 4f |YO | SUBQ.L #0x4,A7
00021c24 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021c28 3f 01 |? | MOVE.W D1,-(A7)
00021c2a 3f 02 |? | MOVE.W D2,-(A7)
00021c2c 4e 92 |N | JSR (A2)
00021c2e 50 4f |PO | ADDQ.L #0x8,A7
00021c30 4e 94 |N | JSR (A4)
00021c32 50 4f |PO | ADDQ.L #0x8,A7
00021c34 2e b9 00 02 38 78 |. 8x | MOVE.L 0x23878,(A7)
00021c3a 2f 39 00 02 38 74 |/9 8t | MOVE.L 0x23874,-(A7)
00021c40 2f 39 00 02 38 70 |/9 8p | MOVE.L 0x23870,-(A7)
00021c46 2f 39 00 02 38 6c |/9 8l | MOVE.L 0x2386c,-(A7)
00021c4c 4e ba f1 9e |N | JSR 0x20dec
00021c50 de c6 | | ADDA.W D6,A7
00021c52 4e 93 |N | JSR (A3)
00021c54 4e 93 |N | JSR (A3)
00021c56 60 26 |`& | BRA 0x21c7e
00021c58 41 fa e6 a0 |A | LEA.L 0x202fa,A0
00021c5c 70 14 |p | MOVEQ.L #0x14,D0
00021c5e 3f 20 |? | MOVE.W -(A0),-(A7)
00021c60 51 c8 ff fc |Q | DBF D0,0x21c5e
00021c64 59 4f |YO | SUBQ.L #0x4,A7
00021c66 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021c6a 3f 01 |? | MOVE.W D1,-(A7)
00021c6c 3f 3c 00 2a |?< * | MOVE.W #0x2a,-(A7)
00021c70 4e 92 |N | JSR (A2)
00021c72 50 4f |PO | ADDQ.L #0x8,A7
00021c74 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021c7a de fc 00 2e | . | ADDA.W #0x2e,A7
00021c7e 4c df 1f 7f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+A0+A1+A2+A3+A4
00021c82 4e 5e |N^ | UNLK A6
00021c84 4e 75 |Nu | RTS
00021c86 ; --------------------------------------------------------------------------------------
00021c86 ; OMSI PASCAL Function
00021c86 ; --------------------------------------------------------------------------------------
00021c86 4e 56 ff 6a |NV j | LINK.W A6,#0xff6a
00021c8a bf d5 | | CMPA.L (A5),A7
00021c8c 62 06 |b | BHI 0x21c94
00021c8e 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021c92 4e 76 |Nv | TRAPV
00021c94 de fc 00 92 | | ADDA.W #0x92,A7
00021c98 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00021c9c 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00021ca2 47 f9 00 01 03 dc |G | LEA.L WriteConsoleCrLf(void),A3
00021ca8 49 f9 00 01 03 d8 |I | LEA.L WriteConsoleString(str : String),A4
00021cae 72 01 |r | MOVEQ.L #0x01,D1
00021cb0 74 14 |t | MOVEQ.L #0x14,D2
00021cb2 76 0f |v | MOVEQ.L #0x0f,D3
00021cb4 78 09 |x | MOVEQ.L #0x09,D4
00021cb6 7a 0e |z | MOVEQ.L #0x0e,D5
00021cb8 7c 02 || | MOVEQ.L #0x02,D6
00021cba 41 fa e4 ca |A | LEA.L 0x20186,A0
00021cbe 70 26 |p& | MOVEQ.L #0x26,D0
00021cc0 3f 20 |? | MOVE.W -(A0),-(A7)
00021cc2 51 c8 ff fc |Q | DBF D0,0x21cc0
00021cc6 59 4f |YO | SUBQ.L #0x4,A7
00021cc8 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021ccc 3f 01 |? | MOVE.W D1,-(A7)
00021cce 3f 3c 00 4e |?< N | MOVE.W #0x4e,-(A7)
00021cd2 4e 92 |N | JSR (A2)
00021cd4 50 4f |PO | ADDQ.L #0x8,A7
00021cd6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021cdc de fc 00 52 | R | ADDA.W #0x52,A7
00021ce0 4e 93 |N | JSR (A3)
00021ce2 48 78 00 03 |Hx | PEA.L 0x3
00021ce6 48 78 00 06 |Hx | PEA.L 0x6
00021cea 4e ba ef 0e |N | JSR 0x20bfa
00021cee 55 4f |UO | SUBQ.L #0x2,A7
00021cf0 20 4f | O | MOVEA.L A7,A0
00021cf2 43 fa eb 02 |C | LEA.L 0x207f6,A1
00021cf6 70 08 |p | MOVEQ.L #0x08,D0
00021cf8 10 d9 | | MOVE.B (A1)+,(A0)+
00021cfa 51 c8 ff fc |Q | DBF D0,0x21cf8
00021cfe 59 4f |YO | SUBQ.L #0x4,A7
00021d00 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021d04 3f 01 |? | MOVE.W D1,-(A7)
00021d06 3f 04 |? | MOVE.W D4,-(A7)
00021d08 4e 92 |N | JSR (A2)
00021d0a 50 4f |PO | ADDQ.L #0x8,A7
00021d0c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021d12 de c5 | | ADDA.W D5,A7
00021d14 48 78 00 03 |Hx | PEA.L 0x3
00021d18 48 78 00 06 |Hx | PEA.L 0x6
00021d1c 4e ba ee dc |N | JSR 0x20bfa
00021d20 50 4f |PO | ADDQ.L #0x8,A7
00021d22 4e 93 |N | JSR (A3)
00021d24 30 39 00 02 33 6a |09 3j | MOVE.W 0x2336a,D0
00021d2a b0 41 | A | CMP.W D1,D0
00021d2c 63 00 02 04 |c | BLS 0x21f32
00021d30 9e fc 00 18 | | SUBA.W #0x18,A7
00021d34 20 4f | O | MOVEA.L A7,A0
00021d36 43 fa ea c8 |C | LEA.L 0x20800,A1
00021d3a 70 16 |p | MOVEQ.L #0x16,D0
00021d3c 10 d9 | | MOVE.B (A1)+,(A0)+
00021d3e 51 c8 ff fc |Q | DBF D0,0x21d3c
00021d42 59 4f |YO | SUBQ.L #0x4,A7
00021d44 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021d48 3f 01 |? | MOVE.W D1,-(A7)
00021d4a 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7)
00021d4e 4e 92 |N | JSR (A2)
00021d50 50 4f |PO | ADDQ.L #0x8,A7
00021d52 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021d58 de fc 00 1c | | ADDA.W #0x1c,A7
00021d5c 7e 00 |~ | MOVEQ.L #0x00,D7
00021d5e 2f 3a ea b8 |/: | MOVE.L 0x20818,-(A7)
00021d62 51 4f |QO | SUBQ.L #0x8,A7
00021d64 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00021d68 3f 01 |? | MOVE.W D1,-(A7)
00021d6a 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
00021d6e 4e 92 |N | JSR (A2)
00021d70 2e 87 |. | MOVE.L D7,(A7)
00021d72 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00021d78 58 4f |XO | ADDQ.L #0x4,A7
00021d7a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00021d80 50 4f |PO | ADDQ.L #0x8,A7
00021d82 4e 94 |N | JSR (A4)
00021d84 5c 4f |\O | ADDQ.L #0x6,A7
00021d86 3e ba e3 a8 |> | MOVE.W 0x20130,(A7)
00021d8a 59 4f |YO | SUBQ.L #0x4,A7
00021d8c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021d90 3f 01 |? | MOVE.W D1,-(A7)
00021d92 3f 06 |? | MOVE.W D6,-(A7)
00021d94 4e 92 |N | JSR (A2)
00021d96 50 4f |PO | ADDQ.L #0x8,A7
00021d98 4e 94 |N | JSR (A4)
00021d9a 5c 4f |\O | ADDQ.L #0x6,A7
00021d9c be 83 | | CMP.L D3,D7
00021d9e 63 02 |c | BLS 0x21da2
00021da0 4e 4f |NO | TRAP #15
00021da2 20 07 | | MOVE.L D7,D0
00021da4 e9 80 | | ASL.L #0x4,D0
00021da6 41 f9 00 02 2b 0a |A + | LEA.L 0x22b0a,A0
00021dac 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00021db0 2f 28 0f 8c |/( | MOVE.L (A0+0xf8c),-(A7)
00021db4 2f 28 0f 88 |/( | MOVE.L (A0+0xf88),-(A7)
00021db8 2f 28 0f 84 |/( | MOVE.L (A0+0xf84),-(A7)
00021dbc 2f 28 0f 80 |/( | MOVE.L (A0+0xf80),-(A7)
00021dc0 4e ba fa ac |N | JSR 0x2186e
00021dc4 de fc 00 10 | | ADDA.W #0x10,A7
00021dc8 52 87 |R | ADDQ.L #0x1,D7
00021dca be 84 | | CMP.L D4,D7
00021dcc 6f 90 |o | BLE 0x21d5e
00021dce 7e 0a |~ | MOVEQ.L #0x0a,D7
00021dd0 59 4f |YO | SUBQ.L #0x4,A7
00021dd2 1e ba ea 48 | H | MOVE.B 0x2081c,(A7)
00021dd6 1f 7a ea 45 00 01 | z E | MOVE.B 0x2081d,(A7+0x1)
00021ddc 1f 7a ea 40 00 02 | z @ | MOVE.B 0x2081e,(A7+0x2)
00021de2 51 4f |QO | SUBQ.L #0x8,A7
00021de4 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00021de8 3f 01 |? | MOVE.W D1,-(A7)
00021dea 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7)
00021dee 4e 92 |N | JSR (A2)
00021df0 2e 87 |. | MOVE.L D7,(A7)
00021df2 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00021df8 58 4f |XO | ADDQ.L #0x4,A7
00021dfa 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00021e00 50 4f |PO | ADDQ.L #0x8,A7
00021e02 4e 94 |N | JSR (A4)
00021e04 5c 4f |\O | ADDQ.L #0x6,A7
00021e06 3e ba e3 28 |> ( | MOVE.W 0x20130,(A7)
00021e0a 59 4f |YO | SUBQ.L #0x4,A7
00021e0c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021e10 3f 01 |? | MOVE.W D1,-(A7)
00021e12 3f 06 |? | MOVE.W D6,-(A7)
00021e14 4e 92 |N | JSR (A2)
00021e16 50 4f |PO | ADDQ.L #0x8,A7
00021e18 4e 94 |N | JSR (A4)
00021e1a 5c 4f |\O | ADDQ.L #0x6,A7
00021e1c be 83 | | CMP.L D3,D7
00021e1e 63 02 |c | BLS 0x21e22
00021e20 4e 4f |NO | TRAP #15
00021e22 20 07 | | MOVE.L D7,D0
00021e24 e9 80 | | ASL.L #0x4,D0
00021e26 41 f9 00 02 2b 0a |A + | LEA.L 0x22b0a,A0
00021e2c 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00021e30 2f 28 0f 8c |/( | MOVE.L (A0+0xf8c),-(A7)
00021e34 2f 28 0f 88 |/( | MOVE.L (A0+0xf88),-(A7)
00021e38 2f 28 0f 84 |/( | MOVE.L (A0+0xf84),-(A7)
00021e3c 2f 28 0f 80 |/( | MOVE.L (A0+0xf80),-(A7)
00021e40 4e ba fa 2c |N , | JSR 0x2186e
00021e44 de fc 00 10 | | ADDA.W #0x10,A7
00021e48 52 87 |R | ADDQ.L #0x1,D7
00021e4a be 83 | | CMP.L D3,D7
00021e4c 6f 82 |o | BLE 0x21dd0
00021e4e 4e 93 |N | JSR (A3)
00021e50 41 fa e9 e2 |A | LEA.L 0x20834,A0
00021e54 70 04 |p | MOVEQ.L #0x04,D0
00021e56 2f 20 |/ | MOVE.L -(A0),-(A7)
00021e58 51 c8 ff fc |Q | DBF D0,0x21e56
00021e5c 59 4f |YO | SUBQ.L #0x4,A7
00021e5e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021e62 3f 01 |? | MOVE.W D1,-(A7)
00021e64 3f 02 |? | MOVE.W D2,-(A7)
00021e66 4e 92 |N | JSR (A2)
00021e68 50 4f |PO | ADDQ.L #0x8,A7
00021e6a 4e 94 |N | JSR (A4)
00021e6c de fc 00 16 | | ADDA.W #0x16,A7
00021e70 3e b9 00 02 3b 8a |> ; | MOVE.W 0x23b8a,(A7)
00021e76 4e ba ee 6e |N n | JSR 0x20ce6
00021e7a 3e b9 00 02 3b 8c |> ; | MOVE.W 0x23b8c,(A7)
00021e80 4e ba ee 64 |N d | JSR 0x20ce6
00021e84 54 4f |TO | ADDQ.L #0x2,A7
00021e86 4e 93 |N | JSR (A3)
00021e88 4e 93 |N | JSR (A3)
00021e8a 41 fa e9 ba |A | LEA.L 0x20846,A0
00021e8e 70 08 |p | MOVEQ.L #0x08,D0
00021e90 3f 20 |? | MOVE.W -(A0),-(A7)
00021e92 51 c8 ff fc |Q | DBF D0,0x21e90
00021e96 59 4f |YO | SUBQ.L #0x4,A7
00021e98 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021e9c 3f 01 |? | MOVE.W D1,-(A7)
00021e9e 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7)
00021ea2 4e 92 |N | JSR (A2)
00021ea4 50 4f |PO | ADDQ.L #0x8,A7
00021ea6 4e 94 |N | JSR (A4)
00021ea8 de c2 | | ADDA.W D2,A7
00021eaa 3e b9 00 02 3b 92 |> ; | MOVE.W 0x23b92,(A7)
00021eb0 4e ba ee 34 |N 4 | JSR 0x20ce6
00021eb4 3e b9 00 02 3b 94 |> ; | MOVE.W 0x23b94,(A7)
00021eba 4e ba ee 2a |N * | JSR 0x20ce6
00021ebe 54 4f |TO | ADDQ.L #0x2,A7
00021ec0 4e 93 |N | JSR (A3)
00021ec2 4e 93 |N | JSR (A3)
00021ec4 2f 3a e9 88 |/: | MOVE.L 0x2084e,-(A7)
00021ec8 2f 3a e9 80 |/: | MOVE.L 0x2084a,-(A7)
00021ecc 2f 3a e9 78 |/: x | MOVE.L 0x20846,-(A7)
00021ed0 59 4f |YO | SUBQ.L #0x4,A7
00021ed2 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021ed6 3f 01 |? | MOVE.W D1,-(A7)
00021ed8 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7)
00021edc 4e 92 |N | JSR (A2)
00021ede 50 4f |PO | ADDQ.L #0x8,A7
00021ee0 4e 94 |N | JSR (A4)
00021ee2 de c5 | | ADDA.W D5,A7
00021ee4 3e b9 00 02 3b 9a |> ; | MOVE.W 0x23b9a,(A7)
00021eea 4e ba ed fa |N | JSR 0x20ce6
00021eee 3e b9 00 02 3b 9c |> ; | MOVE.W 0x23b9c,(A7)
00021ef4 4e ba ed f0 |N | JSR 0x20ce6
00021ef8 54 4f |TO | ADDQ.L #0x2,A7
00021efa 4e 93 |N | JSR (A3)
00021efc 4e 93 |N | JSR (A3)
00021efe 41 fa e9 66 |A f | LEA.L 0x20866,A0
00021f02 70 04 |p | MOVEQ.L #0x04,D0
00021f04 2f 20 |/ | MOVE.L -(A0),-(A7)
00021f06 51 c8 ff fc |Q | DBF D0,0x21f04
00021f0a 59 4f |YO | SUBQ.L #0x4,A7
00021f0c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021f10 3f 01 |? | MOVE.W D1,-(A7)
00021f12 3f 02 |? | MOVE.W D2,-(A7)
00021f14 4e 92 |N | JSR (A2)
00021f16 50 4f |PO | ADDQ.L #0x8,A7
00021f18 4e 94 |N | JSR (A4)
00021f1a de c2 | | ADDA.W D2,A7
00021f1c 2e b9 00 02 3b a6 |. ; | MOVE.L 0x23ba6,(A7)
00021f22 2f 39 00 02 3b a2 |/9 ; | MOVE.L 0x23ba2,-(A7)
00021f28 4e ba ee 28 |N ( | JSR 0x20d52
00021f2c 50 4f |PO | ADDQ.L #0x8,A7
00021f2e 4e 93 |N | JSR (A3)
00021f30 60 26 |`& | BRA 0x21f58
00021f32 41 fa e3 c6 |A | LEA.L 0x202fa,A0
00021f36 70 14 |p | MOVEQ.L #0x14,D0
00021f38 3f 20 |? | MOVE.W -(A0),-(A7)
00021f3a 51 c8 ff fc |Q | DBF D0,0x21f38
00021f3e 59 4f |YO | SUBQ.L #0x4,A7
00021f40 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021f44 3f 01 |? | MOVE.W D1,-(A7)
00021f46 3f 3c 00 2a |?< * | MOVE.W #0x2a,-(A7)
00021f4a 4e 92 |N | JSR (A2)
00021f4c 50 4f |PO | ADDQ.L #0x8,A7
00021f4e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021f54 de fc 00 2e | . | ADDA.W #0x2e,A7
00021f58 4e 93 |N | JSR (A3)
00021f5a 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00021f5e 4e 5e |N^ | UNLK A6
00021f60 4e 75 |Nu | RTS
00021f62 ; --------------------------------------------------------------------------------------
00021f62 ; OMSI PASCAL Function
00021f62 ; --------------------------------------------------------------------------------------
00021f62 4e 56 ff 9a |NV | LINK.W A6,#0xff9a
00021f66 bf d5 | | CMPA.L (A5),A7
00021f68 62 06 |b | BHI 0x21f70
00021f6a 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021f6e 4e 76 |Nv | TRAPV
00021f70 de fc 00 5e | ^ | ADDA.W #0x5e,A7
00021f74 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00021f78 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2
00021f7e 47 f9 00 02 2b 0a |G + | LEA.L 0x22b0a,A3
00021f84 49 f9 00 01 03 dc |I | LEA.L WriteConsoleCrLf(void),A4
00021f8a 72 01 |r | MOVEQ.L #0x01,D1
00021f8c 74 0f |t | MOVEQ.L #0x0f,D2
00021f8e 76 04 |v | MOVEQ.L #0x04,D3
00021f90 78 05 |x | MOVEQ.L #0x05,D4
00021f92 7a 0c |z | MOVEQ.L #0x0c,D5
00021f94 4a 79 00 02 33 6a |Jy 3j | TST.W 0x2336a
00021f9a 67 00 01 1c |g | BEQ 0x220b8
00021f9e 7c 00 || | MOVEQ.L #0x00,D6
00021fa0 2f 3a e8 c4 |/: | MOVE.L 0x20866,-(A7)
00021fa4 5d 4f |]O | SUBQ.L #0x6,A7
00021fa6 20 4f | O | MOVEA.L A7,A0
00021fa8 43 fa e8 c0 |C | LEA.L 0x2086a,A1
00021fac 70 04 |p | MOVEQ.L #0x04,D0
00021fae 10 d9 | | MOVE.B (A1)+,(A0)+
00021fb0 51 c8 ff fc |Q | DBF D0,0x21fae
00021fb4 51 4f |QO | SUBQ.L #0x8,A7
00021fb6 48 6f 00 0e |Ho | PEA.L (A7+0xe)
00021fba 3f 01 |? | MOVE.W D1,-(A7)
00021fbc 3f 03 |? | MOVE.W D3,-(A7)
00021fbe 4e 92 |N | JSR (A2)
00021fc0 2e 86 |. | MOVE.L D6,(A7)
00021fc2 48 78 00 01 |Hx | PEA.L 0x1
00021fc6 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
00021fcc 58 4f |XO | ADDQ.L #0x4,A7
00021fce 48 6f 00 10 |Ho | PEA.L (A7+0x10)
00021fd2 3f 01 |? | MOVE.W D1,-(A7)
00021fd4 3f 04 |? | MOVE.W D4,-(A7)
00021fd6 4e 92 |N | JSR (A2)
00021fd8 50 4f |PO | ADDQ.L #0x8,A7
00021fda 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String
00021fe0 de c5 | | ADDA.W D5,A7
00021fe2 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00021fe8 de fc 00 0e | | ADDA.W #0xe,A7
00021fec bc 82 | | CMP.L D2,D6
00021fee 63 02 |c | BLS 0x21ff2
00021ff0 4e 4f |NO | TRAP #15
00021ff2 20 06 | | MOVE.L D6,D0
00021ff4 e9 80 | | ASL.L #0x4,D0
00021ff6 20 4b | K | MOVEA.L A3,A0
00021ff8 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00021ffc 2f 28 0d 7e |/( ~ | MOVE.L (A0+0xd7e),-(A7)
00022000 2f 28 0d 7a |/( z | MOVE.L (A0+0xd7a),-(A7)
00022004 2f 28 0d 76 |/( v | MOVE.L (A0+0xd76),-(A7)
00022008 2f 28 0d 72 |/( r | MOVE.L (A0+0xd72),-(A7)
0002200c 4e ba ed de |N | JSR 0x20dec
00022010 de fc 00 10 | | ADDA.W #0x10,A7
00022014 4e 94 |N | JSR (A4)
00022016 52 86 |R | ADDQ.L #0x1,D6
00022018 bc 82 | | CMP.L D2,D6
0002201a 6f 84 |o | BLE 0x21fa0
0002201c 42 80 |B | CLR.L D0
0002201e 30 39 00 02 3f 1c |09 ? | MOVE.W 0x23f1c,D0
00022024 04 80 00 00 03 f0 | | SUBI.L #0x000003f0,D0
0002202a 2e 00 |. | MOVE.L D0,D7
0002202c 4e 94 |N | JSR (A4)
0002202e 7c 00 || | MOVEQ.L #0x00,D6
00022030 5d 4f |]O | SUBQ.L #0x6,A7
00022032 20 4f | O | MOVEA.L A7,A0
00022034 43 fa e8 3a |C : | LEA.L 0x20870,A1
00022038 70 04 |p | MOVEQ.L #0x04,D0
0002203a 10 d9 | | MOVE.B (A1)+,(A0)+
0002203c 51 c8 ff fc |Q | DBF D0,0x2203a
00022040 2f 3a e8 34 |/: 4 | MOVE.L 0x20876,-(A7)
00022044 51 4f |QO | SUBQ.L #0x8,A7
00022046 48 6f 00 0c |Ho | PEA.L (A7+0xc)
0002204a 3f 01 |? | MOVE.W D1,-(A7)
0002204c 3f 04 |? | MOVE.W D4,-(A7)
0002204e 4e 92 |N | JSR (A2)
00022050 2e 86 |. | MOVE.L D6,(A7)
00022052 48 78 00 01 |Hx | PEA.L 0x1
00022056 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
0002205c 58 4f |XO | ADDQ.L #0x4,A7
0002205e 48 6f 00 10 |Ho | PEA.L (A7+0x10)
00022062 3f 01 |? | MOVE.W D1,-(A7)
00022064 3f 03 |? | MOVE.W D3,-(A7)
00022066 4e 92 |N | JSR (A2)
00022068 50 4f |PO | ADDQ.L #0x8,A7
0002206a 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String
00022070 de c5 | | ADDA.W D5,A7
00022072 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00022078 de fc 00 0e | | ADDA.W #0xe,A7
0002207c be 82 | | CMP.L D2,D7
0002207e 63 02 |c | BLS 0x22082
00022080 4e 4f |NO | TRAP #15
00022082 20 07 | | MOVE.L D7,D0
00022084 e9 80 | | ASL.L #0x4,D0
00022086 20 4b | K | MOVEA.L A3,A0
00022088 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
0002208c 2f 28 0e 7e |/( ~ | MOVE.L (A0+0xe7e),-(A7)
00022090 2f 28 0e 7a |/( z | MOVE.L (A0+0xe7a),-(A7)
00022094 2f 28 0e 76 |/( v | MOVE.L (A0+0xe76),-(A7)
00022098 2f 28 0e 72 |/( r | MOVE.L (A0+0xe72),-(A7)
0002209c 4e ba ed 4e |N N | JSR 0x20dec
000220a0 de fc 00 10 | | ADDA.W #0x10,A7
000220a4 4e 94 |N | JSR (A4)
000220a6 4a 87 |J | TST.L D7
000220a8 66 04 |f | BNE 0x220ae
000220aa 7e 0f |~ | MOVEQ.L #0x0f,D7
000220ac 60 02 |` | BRA 0x220b0
000220ae 53 87 |S | SUBQ.L #0x1,D7
000220b0 52 86 |R | ADDQ.L #0x1,D6
000220b2 bc 82 | | CMP.L D2,D6
000220b4 6f 00 ff 7a |o z | BLE 0x22030
000220b8 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
000220bc 4e 5e |N^ | UNLK A6
000220be 4e 75 |Nu | RTS
000220c0 ; --------------------------------------------------------------------------------------
000220c0 ; OMSI PASCAL Function
000220c0 ; --------------------------------------------------------------------------------------
000220c0 4e 56 ff da |NV | LINK.W A6,#0xffda
000220c4 bf d5 | | CMPA.L (A5),A7
000220c6 62 06 |b | BHI 0x220ce
000220c8 44 fc 00 02 |D | MOVE.W #0x2,CCR
000220cc 4e 76 |Nv | TRAPV
000220ce de fc 00 26 | & | ADDA.W #0x26,A7
000220d2 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7)
000220d6 72 0a |r | MOVEQ.L #0x0a,D1
000220d8 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
000220de 41 fa e7 a4 |A | LEA.L 0x20884,A0
000220e2 70 04 |p | MOVEQ.L #0x04,D0
000220e4 3f 20 |? | MOVE.W -(A0),-(A7)
000220e6 51 c8 ff fc |Q | DBF D0,0x220e4
000220ea 59 4f |YO | SUBQ.L #0x4,A7
000220ec 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000220f0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
000220f4 3f 01 |? | MOVE.W D1,-(A7)
000220f6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
000220fc 50 4f |PO | ADDQ.L #0x8,A7
000220fe 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00022104 de c1 | | ADDA.W D1,A7
00022106 2e b9 00 02 3b b6 |. ; | MOVE.L 0x23bb6,(A7)
0002210c 2f 39 00 02 3b b2 |/9 ; | MOVE.L 0x23bb2,-(A7)
00022112 2f 39 00 02 3b ae |/9 ; | MOVE.L 0x23bae,-(A7)
00022118 2f 39 00 02 3b aa |/9 ; | MOVE.L 0x23baa,-(A7)
0002211e 4e ba ec cc |N | JSR 0x20dec
00022122 de fc 00 10 | | ADDA.W #0x10,A7
00022126 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
0002212c 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0
00022130 4e 5e |N^ | UNLK A6
00022132 4e 75 |Nu | RTS
00022134 ; --------------------------------------------------------------------------------------
00022134 ; OMSI PASCAL Function
00022134 ; --------------------------------------------------------------------------------------
00022134 START:
00022134 4f fa 00 08 |O | LEA.L MAIN,A7
00022138 4e f9 00 01 02 80 |N | JMP ?start_program
0002213e MAIN:
0002213e 45 f9 00 02 33 1e |E 3 | LEA.L 0x2331e,A2
00022144 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
0002214a 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4
00022150 74 01 |t | MOVEQ.L #0x01,D2
00022152 76 10 |v | MOVEQ.L #0x10,D3
00022154 78 0c |x | MOVEQ.L #0x0c,D4
00022156 7a 14 |z | MOVEQ.L #0x14,D5
00022158 7c 04 || | MOVEQ.L #0x04,D6
0002215a 7e 02 |~ | MOVEQ.L #0x02,D7
0002215c 4e b9 00 01 03 98 |N | JSR FSCALL_10398
00022162 42 39 00 02 3f 26 |B9 ?& | CLR.B 0x23f26
00022168 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
0002216e 2f 3a e0 2e |/: . | MOVE.L 0x2019e,-(A7)
00022172 2f 3a e0 26 |/: & | MOVE.L 0x2019a,-(A7)
00022176 2f 3a e0 1e |/: | MOVE.L 0x20196,-(A7)
0002217a 59 4f |YO | SUBQ.L #0x4,A7
0002217c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022180 3f 02 |? | MOVE.W D2,-(A7)
00022182 3f 04 |? | MOVE.W D4,-(A7)
00022184 4e 93 |N | JSR (A3)
00022186 50 4f |PO | ADDQ.L #0x8,A7
00022188 4e 94 |N | JSR (A4)
0002218a 54 4f |TO | ADDQ.L #0x2,A7
0002218c 20 4f | O | MOVEA.L A7,A0
0002218e 43 fa e0 12 |C | LEA.L 0x201a2,A1
00022192 70 0c |p | MOVEQ.L #0x0c,D0
00022194 10 d9 | | MOVE.B (A1)+,(A0)+
00022196 51 c8 ff fc |Q | DBF D0,0x22194
0002219a 59 4f |YO | SUBQ.L #0x4,A7
0002219c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000221a0 3f 02 |? | MOVE.W D2,-(A7)
000221a2 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7)
000221a6 4e 93 |N | JSR (A3)
000221a8 50 4f |PO | ADDQ.L #0x8,A7
000221aa 4e 94 |N | JSR (A4)
000221ac de fc 00 12 | | ADDA.W #0x12,A7
000221b0 70 01 |p | MOVEQ.L #0x01,D0
000221b2 23 c0 00 02 2b 12 |# + | MOVE.L D0,0x22b12
000221b8 2f 3a df f6 |/: | MOVE.L 0x201b0,-(A7)
000221bc 9e fc 00 1c | | SUBA.W #0x1c,A7
000221c0 20 4f | O | MOVEA.L A7,A0
000221c2 43 fa df f0 |C | LEA.L 0x201b4,A1
000221c6 72 1a |r | MOVEQ.L #0x1a,D1
000221c8 10 d9 | | MOVE.B (A1)+,(A0)+
000221ca 51 c9 ff fc |Q | DBF D1,0x221c8
000221ce 51 4f |QO | SUBQ.L #0x8,A7
000221d0 48 6f 00 24 |Ho $ | PEA.L (A7+0x24)
000221d4 3f 02 |? | MOVE.W D2,-(A7)
000221d6 3f 06 |? | MOVE.W D6,-(A7)
000221d8 4e 93 |N | JSR (A3)
000221da 2e 80 |. | MOVE.L D0,(A7)
000221dc 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
000221e2 48 6f 00 10 |Ho | PEA.L (A7+0x10)
000221e6 3f 02 |? | MOVE.W D2,-(A7)
000221e8 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7)
000221ec 4e 93 |N | JSR (A3)
000221ee 2e 80 |. | MOVE.L D0,(A7)
000221f0 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
000221f6 58 4f |XO | ADDQ.L #0x4,A7
000221f8 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String
000221fe de c3 | | ADDA.W D3,A7
00022200 4e 94 |N | JSR (A4)
00022202 de fc 00 24 | $ | ADDA.W #0x24,A7
00022206 52 80 |R | ADDQ.L #0x1,D0
00022208 b0 86 | | CMP.L D6,D0
0002220a 6f a6 |o | BLE 0x221b2
0002220c 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00022212 9e c3 | | SUBA.W D3,A7
00022214 20 4f | O | MOVEA.L A7,A0
00022216 43 fa df 6e |C n | LEA.L 0x20186,A1
0002221a 70 0e |p | MOVEQ.L #0x0e,D0
0002221c 10 d9 | | MOVE.B (A1)+,(A0)+
0002221e 51 c8 ff fc |Q | DBF D0,0x2221c
00022222 51 4f |QO | SUBQ.L #0x8,A7
00022224 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00022228 3f 02 |? | MOVE.W D2,-(A7)
0002222a 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
0002222e 4e 93 |N | JSR (A3)
00022230 50 4f |PO | ADDQ.L #0x8,A7
00022232 48 78 00 00 |Hx | PEA.L 0x0
00022236 48 78 00 04 |Hx | PEA.L 0x4
0002223a 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
00022240 de c4 | | ADDA.W D4,A7
00022242 23 df 00 02 3f 1e |# ? | MOVE.L (A7)+,0x23f1e
00022248 de c3 | | ADDA.W D3,A7
0002224a 20 39 00 02 3f 1e | 9 ? | MOVE.L 0x23f1e,D0
00022250 b0 86 | | CMP.L D6,D0
00022252 63 02 |c | BLS 0x22256
00022254 4e 4e |NN | TRAP #14
00022256 d0 40 | @ | ADD.W D0,D0
00022258 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W
00022260 00 0a | | .CONST 0xa ; [0x0] -> 0x2226a
00022262 00 12 | | .CONST 0x12 ; [0x1] -> 0x22272
00022264 00 24 | $ | .CONST 0x24 ; [0x2] -> 0x22284
00022266 00 36 | 6 | .CONST 0x36 ; [0x3] -> 0x22296
00022268 00 48 | H | .CONST 0x48 ; [0x4] -> 0x222a8
0002226a switch@0x22258[0x0]:
0002226a 13 c2 00 02 3f 26 | ?& | MOVE.B D2,0x23f26
00022270 60 70 |`p | BRA 0x222e2
00022272 switch@0x22258[0x1]:
00022272 9e c4 | | SUBA.W D4,A7
00022274 20 4f | O | MOVEA.L A7,A0
00022276 43 fa e6 0c |C | LEA.L 0x20884,A1
0002227a 70 0a |p | MOVEQ.L #0x0a,D0
0002227c 10 d9 | | MOVE.B (A1)+,(A0)+
0002227e 51 c8 ff fc |Q | DBF D0,0x2227c
00022282 60 34 |`4 | BRA 0x222b8
00022284 switch@0x22258[0x2]:
00022284 9e c4 | | SUBA.W D4,A7
00022286 20 4f | O | MOVEA.L A7,A0
00022288 43 fa e6 06 |C | LEA.L 0x20890,A1
0002228c 70 0a |p | MOVEQ.L #0x0a,D0
0002228e 10 d9 | | MOVE.B (A1)+,(A0)+
00022290 51 c8 ff fc |Q | DBF D0,0x2228e
00022294 60 22 |`" | BRA 0x222b8
00022296 switch@0x22258[0x3]:
00022296 9e c4 | | SUBA.W D4,A7
00022298 20 4f | O | MOVEA.L A7,A0
0002229a 43 fa e6 00 |C | LEA.L 0x2089c,A1
0002229e 70 0a |p | MOVEQ.L #0x0a,D0
000222a0 10 d9 | | MOVE.B (A1)+,(A0)+
000222a2 51 c8 ff fc |Q | DBF D0,0x222a0
000222a6 60 10 |` | BRA 0x222b8
000222a8 switch@0x22258[0x4]:
000222a8 9e c4 | | SUBA.W D4,A7
000222aa 20 4f | O | MOVEA.L A7,A0
000222ac 43 fa e5 fa |C | LEA.L 0x208a8,A1
000222b0 70 0a |p | MOVEQ.L #0x0a,D0
000222b2 10 d9 | | MOVE.B (A1)+,(A0)+
000222b4 51 c8 ff fc |Q | DBF D0,0x222b2
000222b8 59 4f |YO | SUBQ.L #0x4,A7
000222ba 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000222be 3f 02 |? | MOVE.W D2,-(A7)
000222c0 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7)
000222c4 4e 93 |N | JSR (A3)
000222c6 5c 4f |\O | ADDQ.L #0x6,A7
000222c8 42 17 |B | CLR.B (A7)
000222ca 1f 02 | | MOVE.B D2,-(A7)
000222cc 48 78 00 00 |Hx | PEA.L 0x0
000222d0 48 52 |HR | PEA.L (A2)
000222d2 48 79 00 02 2b 16 |Hy + | PEA.L 0x22b16
000222d8 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
000222de de fc 00 20 | | ADDA.W #0x20,A7
000222e2 4a 39 00 02 3f 26 |J9 ?& | TST.B 0x23f26
000222e8 67 04 |g | BEQ 0x222ee
000222ea 60 00 06 04 |` | BRA 0x228f0
000222ee 4a 12 |J | TST.B (A2)
000222f0 67 40 |g@ | BEQ 0x22332
000222f2 9e fc 00 1a | | SUBA.W #0x1a,A7
000222f6 20 4f | O | MOVEA.L A7,A0
000222f8 43 fa e5 ba |C | LEA.L 0x208b4,A1
000222fc 70 18 |p | MOVEQ.L #0x18,D0
000222fe 10 d9 | | MOVE.B (A1)+,(A0)+
00022300 51 c8 ff fc |Q | DBF D0,0x222fe
00022304 51 4f |QO | SUBQ.L #0x8,A7
00022306 48 6f 00 08 |Ho | PEA.L (A7+0x8)
0002230a 3f 02 |? | MOVE.W D2,-(A7)
0002230c 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7)
00022310 4e 93 |N | JSR (A3)
00022312 2e b9 00 02 3f 1e |. ? | MOVE.L 0x23f1e,(A7)
00022318 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
0002231e 58 4f |XO | ADDQ.L #0x4,A7
00022320 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00022326 50 4f |PO | ADDQ.L #0x8,A7
00022328 4e 94 |N | JSR (A4)
0002232a de fc 00 1e | | ADDA.W #0x1e,A7
0002232e 60 00 05 b6 |` | BRA 0x228e6
00022332 2f 39 00 02 2b 16 |/9 + | MOVE.L 0x22b16,-(A7)
00022338 42 67 |Bg | CLR.W -(A7)
0002233a 42 67 |Bg | CLR.W -(A7)
0002233c 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7)
00022340 1f 02 | | MOVE.B D2,-(A7)
00022342 41 f9 00 02 2b 1e |A + | LEA.L 0x22b1e,A0
00022348 2f 08 |/ | MOVE.L A0,-(A7)
0002234a 48 52 |HR | PEA.L (A2)
0002234c 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
00022352 de c5 | | ADDA.W D5,A7
00022354 41 f9 00 02 2b 1e |A + | LEA.L 0x22b1e,A0
0002235a 2f 08 |/ | MOVE.L A0,-(A7)
0002235c 41 f9 00 02 33 4c |A 3L | LEA.L 0x2334c,A0
00022362 2f 08 |/ | MOVE.L A0,-(A7)
00022364 3f 3c 04 00 |?< | MOVE.W #0x400,-(A7)
00022368 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
0002236e 5c 4f |\O | ADDQ.L #0x6,A7
00022370 2e b9 00 02 2b 16 |. + | MOVE.L 0x22b16,(A7)
00022376 3f 02 |? | MOVE.W D2,-(A7)
00022378 42 67 |Bg | CLR.W -(A7)
0002237a 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7)
0002237e 1f 02 | | MOVE.B D2,-(A7)
00022380 41 f9 00 02 2f 1e |A / | LEA.L 0x22f1e,A0
00022386 2f 08 |/ | MOVE.L A0,-(A7)
00022388 48 52 |HR | PEA.L (A2)
0002238a 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
00022390 de c3 | | ADDA.W D3,A7
00022392 2e b9 00 02 2b 16 |. + | MOVE.L 0x22b16,(A7)
00022398 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7)
0002239c 3f 3c 00 30 |?< 0 | MOVE.W #0x30,-(A7)
000223a0 3f 07 |? | MOVE.W D7,-(A7)
000223a2 1f 02 | | MOVE.B D2,-(A7)
000223a4 41 f9 00 02 3e fa |A > | LEA.L 0x23efa,A0
000223aa 2f 08 |/ | MOVE.L A0,-(A7)
000223ac 48 52 |HR | PEA.L (A2)
000223ae 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
000223b4 de c3 | | ADDA.W D3,A7
000223b6 2e b9 00 02 2b 16 |. + | MOVE.L 0x22b16,(A7)
000223bc 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7)
000223c0 3f 3c 00 60 |?< ` | MOVE.W #0x60,-(A7)
000223c4 3f 3c 01 a0 |?< | MOVE.W #0x1a0,-(A7)
000223c8 1f 02 | | MOVE.B D2,-(A7)
000223ca 41 f9 00 02 3b ba |A ; | LEA.L 0x23bba,A0
000223d0 2f 08 |/ | MOVE.L A0,-(A7)
000223d2 48 52 |HR | PEA.L (A2)
000223d4 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
000223da de c5 | | ADDA.W D5,A7
000223dc 04 b9 00 00 fc c0 00 02 | | SUBI.L #0x0000fcc0,0x23efa
000223e4 3e fa |> |
000223e6 2f 39 00 02 2b 16 |/9 + | MOVE.L 0x22b16,-(A7)
000223ec 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7)
000223f0 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7)
000223f4 3f 02 |? | MOVE.W D2,-(A7)
000223f6 1f 02 | | MOVE.B D2,-(A7)
000223f8 41 f9 00 02 3f 1c |A ? | LEA.L 0x23f1c,A0
000223fe 2f 08 |/ | MOVE.L A0,-(A7)
00022400 48 52 |HR | PEA.L (A2)
00022402 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
00022408 de c3 | | ADDA.W D3,A7
0002240a 2e b9 00 02 2b 16 |. + | MOVE.L 0x22b16,(A7)
00022410 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
00022414 42 67 |Bg | CLR.W -(A7)
00022416 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7)
0002241a 1f 02 | | MOVE.B D2,-(A7)
0002241c 41 f9 00 02 2b 1e |A + | LEA.L 0x22b1e,A0
00022422 2f 08 |/ | MOVE.L A0,-(A7)
00022424 48 52 |HR | PEA.L (A2)
00022426 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
0002242c de c5 | | ADDA.W D5,A7
0002242e 41 f9 00 02 2b 1e |A + | LEA.L 0x22b1e,A0
00022434 2f 08 |/ | MOVE.L A0,-(A7)
00022436 41 f9 00 02 37 4c |A 7L | LEA.L 0x2374c,A0
0002243c 2f 08 |/ | MOVE.L A0,-(A7)
0002243e 3f 3c 03 3d |?< = | MOVE.W #0x33d,-(A7)
00022442 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
00022448 5c 4f |\O | ADDQ.L #0x6,A7
0002244a 2e b9 00 02 2b 16 |. + | MOVE.L 0x22b16,(A7)
00022450 3f 03 |? | MOVE.W D3,-(A7)
00022452 3f 3c 01 ec |?< | MOVE.W #0x1ec,-(A7)
00022456 3f 05 |? | MOVE.W D5,-(A7)
00022458 1f 02 | | MOVE.B D2,-(A7)
0002245a 41 f9 00 02 33 24 |A 3$ | LEA.L 0x23324,A0
00022460 2f 08 |/ | MOVE.L A0,-(A7)
00022462 48 52 |HR | PEA.L (A2)
00022464 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
0002246a de c3 | | ADDA.W D3,A7
0002246c 2e b9 00 02 2b 16 |. + | MOVE.L 0x22b16,(A7)
00022472 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7)
00022476 3f 05 |? | MOVE.W D5,-(A7)
00022478 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
0002247c 1f 02 | | MOVE.B D2,-(A7)
0002247e 41 f9 00 02 3e fe |A > | LEA.L 0x23efe,A0
00022484 2f 08 |/ | MOVE.L A0,-(A7)
00022486 48 52 |HR | PEA.L (A2)
00022488 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
0002248e de c3 | | ADDA.W D3,A7
00022490 2e b9 00 02 2b 16 |. + | MOVE.L 0x22b16,(A7)
00022496 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
0002249a 3f 3c 01 00 |?< | MOVE.W #0x100,-(A7)
0002249e 3f 3c 00 80 |?< | MOVE.W #0x80,-(A7)
000224a2 1f 02 | | MOVE.B D2,-(A7)
000224a4 41 f9 00 02 3a 8a |A : | LEA.L 0x23a8a,A0
000224aa 2f 08 |/ | MOVE.L A0,-(A7)
000224ac 48 52 |HR | PEA.L (A2)
000224ae 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
000224b4 de c3 | | ADDA.W D3,A7
000224b6 2e b9 00 02 2b 16 |. + | MOVE.L 0x22b16,(A7)
000224bc 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
000224c0 3f 3c 01 80 |?< | MOVE.W #0x180,-(A7)
000224c4 3f 07 |? | MOVE.W D7,-(A7)
000224c6 1f 02 | | MOVE.B D2,-(A7)
000224c8 41 f9 00 02 3b 9a |A ; | LEA.L 0x23b9a,A0
000224ce 2f 08 |/ | MOVE.L A0,-(A7)
000224d0 48 52 |HR | PEA.L (A2)
000224d2 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
000224d8 de c3 | | ADDA.W D3,A7
000224da 2e b9 00 02 2b 16 |. + | MOVE.L 0x22b16,(A7)
000224e0 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
000224e4 3f 3c 01 88 |?< | MOVE.W #0x188,-(A7)
000224e8 3f 07 |? | MOVE.W D7,-(A7)
000224ea 1f 02 | | MOVE.B D2,-(A7)
000224ec 41 f9 00 02 3b 92 |A ; | LEA.L 0x23b92,A0
000224f2 2f 08 |/ | MOVE.L A0,-(A7)
000224f4 48 52 |HR | PEA.L (A2)
000224f6 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
000224fc de c3 | | ADDA.W D3,A7
000224fe 2e b9 00 02 2b 16 |. + | MOVE.L 0x22b16,(A7)
00022504 3f 05 |? | MOVE.W D5,-(A7)
00022506 3f 3c 00 54 |?< T | MOVE.W #0x54,-(A7)
0002250a 3f 06 |? | MOVE.W D6,-(A7)
0002250c 1f 02 | | MOVE.B D2,-(A7)
0002250e 41 f9 00 02 3b a2 |A ; | LEA.L 0x23ba2,A0
00022514 2f 08 |/ | MOVE.L A0,-(A7)
00022516 48 52 |HR | PEA.L (A2)
00022518 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
0002251e de c3 | | ADDA.W D3,A7
00022520 2e b9 00 02 2b 16 |. + | MOVE.L 0x22b16,(A7)
00022526 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7)
0002252a 3f 3c 01 00 |?< | MOVE.W #0x100,-(A7)
0002252e 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7)
00022532 1f 02 | | MOVE.B D2,-(A7)
00022534 41 f9 00 02 3b aa |A ; | LEA.L 0x23baa,A0
0002253a 2f 08 |/ | MOVE.L A0,-(A7)
0002253c 48 52 |HR | PEA.L (A2)
0002253e 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
00022544 de c3 | | ADDA.W D3,A7
00022546 2e b9 00 02 2b 16 |. + | MOVE.L 0x22b16,(A7)
0002254c 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7)
00022550 3f 3c 01 00 |?< | MOVE.W #0x100,-(A7)
00022554 3f 07 |? | MOVE.W D7,-(A7)
00022556 1f 02 | | MOVE.B D2,-(A7)
00022558 41 f9 00 02 3b 8a |A ; | LEA.L 0x23b8a,A0
0002255e 2f 08 |/ | MOVE.L A0,-(A7)
00022560 48 52 |HR | PEA.L (A2)
00022562 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
00022568 de fc 00 12 | | ADDA.W #0x12,A7
0002256c 42 17 |B | CLR.B (A7)
0002256e 1f 02 | | MOVE.B D2,-(A7)
00022570 48 78 00 01 |Hx | PEA.L 0x1
00022574 48 52 |HR | PEA.L (A2)
00022576 48 79 00 02 2b 16 |Hy + | PEA.L 0x22b16
0002257c 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File)
00022582 de c3 | | ADDA.W D3,A7
00022584 4e ba ee 88 |N | JSR 0x2140e
00022588 42 39 00 02 3f 27 |B9 ?' | CLR.B 0x23f27
0002258e 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00022594 41 fa e3 4e |A N | LEA.L 0x208e4,A0
00022598 70 0a |p | MOVEQ.L #0x0a,D0
0002259a 3f 20 |? | MOVE.W -(A0),-(A7)
0002259c 51 c8 ff fc |Q | DBF D0,0x2259a
000225a0 9e fc 00 0a | | SUBA.W #0xa,A7
000225a4 20 4f | O | MOVEA.L A7,A0
000225a6 43 fa e3 3c |C < | LEA.L 0x208e4,A1
000225aa 70 08 |p | MOVEQ.L #0x08,D0
000225ac 10 d9 | | MOVE.B (A1)+,(A0)+
000225ae 51 c8 ff fc |Q | DBF D0,0x225ac
000225b2 51 4f |QO | SUBQ.L #0x8,A7
000225b4 48 6f 00 12 |Ho | PEA.L (A7+0x12)
000225b8 3f 02 |? | MOVE.W D2,-(A7)
000225ba 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7)
000225be 4e 93 |N | JSR (A3)
000225c0 2e b9 00 02 3f 1e |. ? | MOVE.L 0x23f1e,(A7)
000225c6 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
000225cc 48 6f 00 10 |Ho | PEA.L (A7+0x10)
000225d0 3f 02 |? | MOVE.W D2,-(A7)
000225d2 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7)
000225d6 4e 93 |N | JSR (A3)
000225d8 50 4f |PO | ADDQ.L #0x8,A7
000225da 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String
000225e0 de c4 | | ADDA.W D4,A7
000225e2 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
000225e8 de fc 00 24 | $ | ADDA.W #0x24,A7
000225ec 70 01 |p | MOVEQ.L #0x01,D0
000225ee 23 c0 00 02 2b 12 |# + | MOVE.L D0,0x22b12
000225f4 22 00 |" | MOVE.L D0,D1
000225f6 53 81 |S | SUBQ.L #0x1,D1
000225f8 0c 81 00 00 00 11 | | CMPI.L #0x00000011,D1
000225fe 63 02 |c | BLS 0x22602
00022600 4e 4f |NO | TRAP #15
00022602 41 f9 00 02 2b 0a |A + | LEA.L 0x22b0a,A0
00022608 41 f0 18 00 |A | LEA.L (A0+D1.L),A0
0002260c 1f 28 08 4e | ( N | MOVE.B (A0+0x84e),-(A7)
00022610 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char)
00022616 54 4f |TO | ADDQ.L #0x2,A7
00022618 52 80 |R | ADDQ.L #0x1,D0
0002261a 0c 80 00 00 00 12 | | CMPI.L #0x00000012,D0
00022620 6f cc |o | BLE 0x225ee
00022622 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00022628 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
0002262e 2f 3a db 6e |/: n | MOVE.L 0x2019e,-(A7)
00022632 2f 3a db 66 |/: f | MOVE.L 0x2019a,-(A7)
00022636 2f 3a db 5e |/: ^ | MOVE.L 0x20196,-(A7)
0002263a 59 4f |YO | SUBQ.L #0x4,A7
0002263c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022640 3f 02 |? | MOVE.W D2,-(A7)
00022642 3f 04 |? | MOVE.W D4,-(A7)
00022644 4e 93 |N | JSR (A3)
00022646 50 4f |PO | ADDQ.L #0x8,A7
00022648 4e 94 |N | JSR (A4)
0002264a 54 4f |TO | ADDQ.L #0x2,A7
0002264c 20 4f | O | MOVEA.L A7,A0
0002264e 43 fa db 80 |C | LEA.L 0x201d0,A1
00022652 70 0c |p | MOVEQ.L #0x0c,D0
00022654 10 d9 | | MOVE.B (A1)+,(A0)+
00022656 51 c8 ff fc |Q | DBF D0,0x22654
0002265a 59 4f |YO | SUBQ.L #0x4,A7
0002265c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022660 3f 02 |? | MOVE.W D2,-(A7)
00022662 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7)
00022666 4e 93 |N | JSR (A3)
00022668 50 4f |PO | ADDQ.L #0x8,A7
0002266a 4e 94 |N | JSR (A4)
0002266c 20 4f | O | MOVEA.L A7,A0
0002266e 43 fa db 6e |C n | LEA.L 0x201de,A1
00022672 70 10 |p | MOVEQ.L #0x10,D0
00022674 10 d9 | | MOVE.B (A1)+,(A0)+
00022676 51 c8 ff fc |Q | DBF D0,0x22674
0002267a 59 4f |YO | SUBQ.L #0x4,A7
0002267c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022680 3f 02 |? | MOVE.W D2,-(A7)
00022682 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7)
00022686 4e 93 |N | JSR (A3)
00022688 50 4f |PO | ADDQ.L #0x8,A7
0002268a 4e 94 |N | JSR (A4)
0002268c 9e c4 | | SUBA.W D4,A7
0002268e 20 4f | O | MOVEA.L A7,A0
00022690 43 fa db 5e |C ^ | LEA.L 0x201f0,A1
00022694 70 20 |p | MOVEQ.L #0x20,D0
00022696 10 d9 | | MOVE.B (A1)+,(A0)+
00022698 51 c8 ff fc |Q | DBF D0,0x22696
0002269c 59 4f |YO | SUBQ.L #0x4,A7
0002269e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000226a2 3f 02 |? | MOVE.W D2,-(A7)
000226a4 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7)
000226a8 4e 93 |N | JSR (A3)
000226aa 50 4f |PO | ADDQ.L #0x8,A7
000226ac 4e 94 |N | JSR (A4)
000226ae de fc 00 26 | & | ADDA.W #0x26,A7
000226b2 41 fa db 80 |A | LEA.L 0x20234,A0
000226b6 70 10 |p | MOVEQ.L #0x10,D0
000226b8 3f 20 |? | MOVE.W -(A0),-(A7)
000226ba 51 c8 ff fc |Q | DBF D0,0x226b8
000226be 59 4f |YO | SUBQ.L #0x4,A7
000226c0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000226c4 3f 02 |? | MOVE.W D2,-(A7)
000226c6 3f 3c 00 22 |?< " | MOVE.W #0x22,-(A7)
000226ca 4e 93 |N | JSR (A3)
000226cc 50 4f |PO | ADDQ.L #0x8,A7
000226ce 4e 94 |N | JSR (A4)
000226d0 de fc 00 26 | & | ADDA.W #0x26,A7
000226d4 41 fa db 7a |A z | LEA.L 0x20250,A0
000226d8 70 06 |p | MOVEQ.L #0x06,D0
000226da 2f 20 |/ | MOVE.L -(A0),-(A7)
000226dc 51 c8 ff fc |Q | DBF D0,0x226da
000226e0 59 4f |YO | SUBQ.L #0x4,A7
000226e2 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000226e6 3f 02 |? | MOVE.W D2,-(A7)
000226e8 3f 3c 00 1c |?< | MOVE.W #0x1c,-(A7)
000226ec 4e 93 |N | JSR (A3)
000226ee 50 4f |PO | ADDQ.L #0x8,A7
000226f0 4e 94 |N | JSR (A4)
000226f2 de c4 | | ADDA.W D4,A7
000226f4 20 4f | O | MOVEA.L A7,A0
000226f6 43 fa db 58 |C X | LEA.L 0x20250,A1
000226fa 70 12 |p | MOVEQ.L #0x12,D0
000226fc 10 d9 | | MOVE.B (A1)+,(A0)+
000226fe 51 c8 ff fc |Q | DBF D0,0x226fc
00022702 59 4f |YO | SUBQ.L #0x4,A7
00022704 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022708 3f 02 |? | MOVE.W D2,-(A7)
0002270a 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
0002270e 4e 93 |N | JSR (A3)
00022710 50 4f |PO | ADDQ.L #0x8,A7
00022712 4e 94 |N | JSR (A4)
00022714 20 4f | O | MOVEA.L A7,A0
00022716 43 fa db 4c |C L | LEA.L 0x20264,A1
0002271a 70 16 |p | MOVEQ.L #0x16,D0
0002271c 10 d9 | | MOVE.B (A1)+,(A0)+
0002271e 51 c8 ff fc |Q | DBF D0,0x2271c
00022722 59 4f |YO | SUBQ.L #0x4,A7
00022724 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022728 3f 02 |? | MOVE.W D2,-(A7)
0002272a 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7)
0002272e 4e 93 |N | JSR (A3)
00022730 50 4f |PO | ADDQ.L #0x8,A7
00022732 4e 94 |N | JSR (A4)
00022734 de fc 00 1c | | ADDA.W #0x1c,A7
00022738 41 fa db 56 |A V | LEA.L 0x20290,A0
0002273c 70 04 |p | MOVEQ.L #0x04,D0
0002273e 2f 20 |/ | MOVE.L -(A0),-(A7)
00022740 51 c8 ff fc |Q | DBF D0,0x2273e
00022744 59 4f |YO | SUBQ.L #0x4,A7
00022746 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002274a 3f 02 |? | MOVE.W D2,-(A7)
0002274c 3f 05 |? | MOVE.W D5,-(A7)
0002274e 4e 93 |N | JSR (A3)
00022750 50 4f |PO | ADDQ.L #0x8,A7
00022752 4e 94 |N | JSR (A4)
00022754 de fc 00 18 | | ADDA.W #0x18,A7
00022758 41 fa db 56 |A V | LEA.L 0x202b0,A0
0002275c 70 07 |p | MOVEQ.L #0x07,D0
0002275e 2f 20 |/ | MOVE.L -(A0),-(A7)
00022760 51 c8 ff fc |Q | DBF D0,0x2275e
00022764 59 4f |YO | SUBQ.L #0x4,A7
00022766 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002276a 3f 02 |? | MOVE.W D2,-(A7)
0002276c 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7)
00022770 4e 93 |N | JSR (A3)
00022772 50 4f |PO | ADDQ.L #0x8,A7
00022774 4e 94 |N | JSR (A4)
00022776 de fc 00 24 | $ | ADDA.W #0x24,A7
0002277a 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00022780 9e c3 | | SUBA.W D3,A7
00022782 20 4f | O | MOVEA.L A7,A0
00022784 43 fa da 00 |C | LEA.L 0x20186,A1
00022788 70 0e |p | MOVEQ.L #0x0e,D0
0002278a 10 d9 | | MOVE.B (A1)+,(A0)+
0002278c 51 c8 ff fc |Q | DBF D0,0x2278a
00022790 51 4f |QO | SUBQ.L #0x8,A7
00022792 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00022796 3f 02 |? | MOVE.W D2,-(A7)
00022798 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
0002279c 4e 93 |N | JSR (A3)
0002279e 50 4f |PO | ADDQ.L #0x8,A7
000227a0 48 78 00 00 |Hx | PEA.L 0x0
000227a4 48 78 00 08 |Hx | PEA.L 0x8
000227a8 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
000227ae de c4 | | ADDA.W D4,A7
000227b0 23 df 00 02 3f 22 |# ?" | MOVE.L (A7)+,0x23f22
000227b6 de c3 | | ADDA.W D3,A7
000227b8 4e ba e4 a2 |N | JSR 0x20c5c
000227bc 20 39 00 02 3f 22 | 9 ?" | MOVE.L 0x23f22,D0
000227c2 0c 80 00 00 00 08 | | CMPI.L #0x00000008,D0
000227c8 63 02 |c | BLS 0x227cc
000227ca 4e 4e |NN | TRAP #14
000227cc d0 40 | @ | ADD.W D0,D0
000227ce 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W
000227d6 00 12 | | .CONST 0x12 ; [0x0] -> 0x227e8
000227d8 00 1a | | .CONST 0x1a ; [0x1] -> 0x227f0
000227da 00 20 | | .CONST 0x20 ; [0x2] -> 0x227f6
000227dc 00 28 | ( | .CONST 0x28 ; [0x3] -> 0x227fe
000227de 00 30 | 0 | .CONST 0x30 ; [0x4] -> 0x22806
000227e0 00 38 | 8 | .CONST 0x38 ; [0x5] -> 0x2280e
000227e2 00 40 | @ | .CONST 0x40 ; [0x6] -> 0x22816
000227e4 00 48 | H | .CONST 0x48 ; [0x7] -> 0x2281e
000227e6 00 50 | P | .CONST 0x50 ; [0x8] -> 0x22826
000227e8 switch@0x227ce[0x0]:
000227e8 13 c2 00 02 3f 27 | ?' | MOVE.B D2,0x23f27
000227ee 60 3c |`< | BRA 0x2282c
000227f0 switch@0x227ce[0x1]:
000227f0 4e ba e4 aa |N | JSR 0x20c9c
000227f4 60 36 |`6 | BRA 0x2282c
000227f6 switch@0x227ce[0x2]:
000227f6 13 c2 00 02 3f 28 | ?( | MOVE.B D2,0x23f28
000227fc 60 2e |`. | BRA 0x2282c
000227fe switch@0x227ce[0x3]:
000227fe 13 c2 00 02 3f 29 | ?) | MOVE.B D2,0x23f29
00022804 60 26 |`& | BRA 0x2282c
00022806 switch@0x227ce[0x4]:
00022806 13 c2 00 02 3f 2a | ?* | MOVE.B D2,0x23f2a
0002280c 60 1e |` | BRA 0x2282c
0002280e switch@0x227ce[0x5]:
0002280e 13 c2 00 02 3f 2b | ?+ | MOVE.B D2,0x23f2b
00022814 60 16 |` | BRA 0x2282c
00022816 switch@0x227ce[0x6]:
00022816 13 c2 00 02 3f 2c | ?, | MOVE.B D2,0x23f2c
0002281c 60 0e |` | BRA 0x2282c
0002281e switch@0x227ce[0x7]:
0002281e 13 c2 00 02 3f 2d | ?- | MOVE.B D2,0x23f2d
00022824 60 06 |` | BRA 0x2282c
00022826 switch@0x227ce[0x8]:
00022826 13 c2 00 02 3f 2e | ?. | MOVE.B D2,0x23f2e
0002282c 4a 39 00 02 3f 29 |J9 ?) | TST.B 0x23f29
00022832 67 04 |g | BEQ 0x22838
00022834 4e ba e6 0a |N | JSR 0x20e40
00022838 4a 39 00 02 3f 28 |J9 ?( | TST.B 0x23f28
0002283e 67 04 |g | BEQ 0x22844
00022840 4e ba e7 76 |N v | JSR 0x20fb8
00022844 4a 39 00 02 3f 29 |J9 ?) | TST.B 0x23f29
0002284a 67 04 |g | BEQ 0x22850
0002284c 4e ba e8 64 |N d | JSR 0x210b2
00022850 4a 39 00 02 3f 2e |J9 ?. | TST.B 0x23f2e
00022856 67 04 |g | BEQ 0x2285c
00022858 4e ba e9 28 |N ( | JSR 0x21182
0002285c 4a 39 00 02 3f 2a |J9 ?* | TST.B 0x23f2a
00022862 67 04 |g | BEQ 0x22868
00022864 4e ba ea ac |N | JSR 0x21312
00022868 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
0002286e 4a 39 00 02 3f 2b |J9 ?+ | TST.B 0x23f2b
00022874 67 04 |g | BEQ 0x2287a
00022876 4e ba ec 5e |N ^ | JSR 0x214d6
0002287a 4a 39 00 02 3f 2c |J9 ?, | TST.B 0x23f2c
00022880 67 04 |g | BEQ 0x22886
00022882 4e ba f0 4e |N N | JSR 0x218d2
00022886 4a 39 00 02 3f 2c |J9 ?, | TST.B 0x23f2c
0002288c 67 04 |g | BEQ 0x22892
0002288e 4e ba f6 d2 |N | JSR 0x21f62
00022892 4a 39 00 02 3f 2c |J9 ?, | TST.B 0x23f2c
00022898 67 0e |g | BEQ 0x228a8
0002289a 30 39 00 02 33 6a |09 3j | MOVE.W 0x2336a,D0
000228a0 b0 42 | B | CMP.W D2,D0
000228a2 63 04 |c | BLS 0x228a8
000228a4 4e ba f8 1a |N | JSR 0x220c0
000228a8 4a 39 00 02 3f 2d |J9 ?- | TST.B 0x23f2d
000228ae 67 04 |g | BEQ 0x228b4
000228b0 4e ba f3 d4 |N | JSR 0x21c86
000228b4 41 fa d8 d0 |A | LEA.L 0x20186,A0
000228b8 70 26 |p& | MOVEQ.L #0x26,D0
000228ba 3f 20 |? | MOVE.W -(A0),-(A7)
000228bc 51 c8 ff fc |Q | DBF D0,0x228ba
000228c0 59 4f |YO | SUBQ.L #0x4,A7
000228c2 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000228c6 3f 02 |? | MOVE.W D2,-(A7)
000228c8 3f 3c 00 4e |?< N | MOVE.W #0x4e,-(A7)
000228cc 4e 93 |N | JSR (A3)
000228ce 50 4f |PO | ADDQ.L #0x8,A7
000228d0 4e 94 |N | JSR (A4)
000228d2 de fc 00 52 | R | ADDA.W #0x52,A7
000228d6 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
000228dc 4a 39 00 02 3f 27 |J9 ?' | TST.B 0x23f27
000228e2 67 00 fc aa |g | BEQ 0x2258e
000228e6 4a 39 00 02 3f 26 |J9 ?& | TST.B 0x23f26
000228ec 67 00 f8 7a |g z | BEQ 0x22168
000228f0 42 27 |B' | CLR.B -(A7)
000228f2 48 78 00 01 |Hx | PEA.L 0x1
000228f6 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String)
000228fc 5c 4f |\O | ADDQ.L #0x6,A7
000228fe 4e b9 00 01 02 84 |N | JSR ?exit
00022904 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_'
00022912 ; --------------------------------------------------------------------------------------
00022912 ; OMSI PASCAL Function
00022912 ; <LVAR 0x008 1(r)>
00022912 ; --------------------------------------------------------------------------------------
00022912 PROG_FAIL:
00022912 4e 56 ff d2 |NV | LINK.W A6,#0xffd2
00022916 bf d5 | | CMPA.L (A5),A7
00022918 62 06 |b | BHI 0x22920
0002291a 44 fc 00 02 |D | MOVE.W #0x2,CCR
0002291e 4e 76 |Nv | TRAPV
00022920 de fc 00 2c | , | ADDA.W #0x2c,A7
00022924 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7)
00022928 41 fa ff e8 |A | LEA.L PROG_FAIL,A0
0002292c 70 06 |p | MOVEQ.L #0x06,D0
0002292e 3f 20 |? | MOVE.W -(A0),-(A7)
00022930 51 c8 ff fc |Q | DBF D0,0x2292e
00022934 1f 3c 00 03 | < | MOVE.B #0x03,-(A7)
00022938 51 4f |QO | SUBQ.L #0x8,A7
0002293a 48 6f 00 0a |Ho | PEA.L (A7+0xa)
0002293e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00022942 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
00022946 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
0002294c 58 4f |XO | ADDQ.L #0x4,A7
0002294e 10 2e 00 08 | . | MOVE.B (A6+0x8),D0
00022952 48 80 |H | EXTB.W D0
00022954 48 c0 |H | EXTW.L D0
00022956 2f 00 |/ | MOVE.L D0,-(A7)
00022958 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
0002295e 58 4f |XO | ADDQ.L #0x4,A7
00022960 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00022966 50 4f |PO | ADDQ.L #0x8,A7
00022968 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String)
0002296e de fc 00 14 | | ADDA.W #0x14,A7
00022972 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0
00022976 4e 5e |N^ | UNLK A6
00022978 4e 75 |Nu | RTS
0002297a 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ '
00022988 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ '
00022996 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ '
000229a4 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :'
000229b6 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. '
000229ce ; --------------------------------------------------------------------------------------
000229ce ; OMSI PASCAL Function
000229ce ; <LVAR 0x00e 1(r)>
000229ce ; <LVAR 0x00a 4(r)>
000229ce ; <LVAR 0x008 1(r)>
000229ce ; --------------------------------------------------------------------------------------
000229ce EXP_FAIL:
000229ce 4e 56 ff 8c |NV | LINK.W A6,#0xff8c
000229d2 bf d5 | | CMPA.L (A5),A7
000229d4 62 06 |b | BHI 0x229dc
000229d6 44 fc 00 02 |D | MOVE.W #0x2,CCR
000229da 4e 76 |Nv | TRAPV
000229dc de fc 00 74 | t | ADDA.W #0x74,A7
000229e0 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
000229e4 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
000229ea 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4
000229f0 72 01 |r | MOVEQ.L #0x01,D1
000229f2 74 0d |t | MOVEQ.L #0x0d,D2
000229f4 76 1e |v | MOVEQ.L #0x1e,D3
000229f6 78 12 |x | MOVEQ.L #0x12,D4
000229f8 7a 0e |z | MOVEQ.L #0x0e,D5
000229fa 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00022a00 41 fa ff b4 |A | LEA.L 0x229b6,A0
00022a04 70 08 |p | MOVEQ.L #0x08,D0
00022a06 3f 20 |? | MOVE.W -(A0),-(A7)
00022a08 51 c8 ff fc |Q | DBF D0,0x22a06
00022a0c 59 4f |YO | SUBQ.L #0x4,A7
00022a0e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022a12 3f 01 |? | MOVE.W D1,-(A7)
00022a14 3f 04 |? | MOVE.W D4,-(A7)
00022a16 4e 93 |N | JSR (A3)
00022a18 50 4f |PO | ADDQ.L #0x8,A7
00022a1a 4e 94 |N | JSR (A4)
00022a1c 50 4f |PO | ADDQ.L #0x8,A7
00022a1e 20 4f | O | MOVEA.L A7,A0
00022a20 43 fa ff 58 |C X | LEA.L 0x2297a,A1
00022a24 70 0c |p | MOVEQ.L #0x0c,D0
00022a26 10 d9 | | MOVE.B (A1)+,(A0)+
00022a28 51 c8 ff fc |Q | DBF D0,0x22a26
00022a2c 51 4f |QO | SUBQ.L #0x8,A7
00022a2e 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00022a32 3f 01 |? | MOVE.W D1,-(A7)
00022a34 3f 02 |? | MOVE.W D2,-(A7)
00022a36 4e 93 |N | JSR (A3)
00022a38 54 4f |TO | ADDQ.L #0x2,A7
00022a3a 1e ae 00 0e | | MOVE.B (A6+0xe),(A7)
00022a3e 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String
00022a44 54 4f |TO | ADDQ.L #0x2,A7
00022a46 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00022a4c 50 4f |PO | ADDQ.L #0x8,A7
00022a4e 4e 94 |N | JSR (A4)
00022a50 de c4 | | ADDA.W D4,A7
00022a52 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0
00022a56 b0 c1 | | CMPA.W D1,A0
00022a58 67 48 |gH | BEQ 0x22aa2
00022a5a 9e c5 | | SUBA.W D5,A7
00022a5c 22 4f |"O | MOVEA.L A7,A1
00022a5e 45 fa ff 28 |E ( | LEA.L 0x22988,A2
00022a62 70 0c |p | MOVEQ.L #0x0c,D0
00022a64 12 da | | MOVE.B (A2)+,(A1)+
00022a66 51 c8 ff fc |Q | DBF D0,0x22a64
00022a6a 9e c3 | | SUBA.W D3,A7
00022a6c 22 4f |"O | MOVEA.L A7,A1
00022a6e 41 e8 00 fc |A | LEA.L (A0+0xfc),A0
00022a72 70 1d |p | MOVEQ.L #0x1d,D0
00022a74 12 d8 | | MOVE.B (A0)+,(A1)+
00022a76 51 c8 ff fc |Q | DBF D0,0x22a74
00022a7a 51 4f |QO | SUBQ.L #0x8,A7
00022a7c 48 6f 00 26 |Ho & | PEA.L (A7+0x26)
00022a80 3f 01 |? | MOVE.W D1,-(A7)
00022a82 3f 02 |? | MOVE.W D2,-(A7)
00022a84 4e 93 |N | JSR (A3)
00022a86 58 4f |XO | ADDQ.L #0x4,A7
00022a88 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00022a8c 3f 01 |? | MOVE.W D1,-(A7)
00022a8e 3f 03 |? | MOVE.W D3,-(A7)
00022a90 4e 93 |N | JSR (A3)
00022a92 50 4f |PO | ADDQ.L #0x8,A7
00022a94 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00022a9a 50 4f |PO | ADDQ.L #0x8,A7
00022a9c 4e 94 |N | JSR (A4)
00022a9e de fc 00 30 | 0 | ADDA.W #0x30,A7
00022aa2 9e c5 | | SUBA.W D5,A7
00022aa4 20 4f | O | MOVEA.L A7,A0
00022aa6 43 fa fe ee |C | LEA.L 0x22996,A1
00022aaa 70 0c |p | MOVEQ.L #0x0c,D0
00022aac 10 d9 | | MOVE.B (A1)+,(A0)+
00022aae 51 c8 ff fc |Q | DBF D0,0x22aac
00022ab2 51 4f |QO | SUBQ.L #0x8,A7
00022ab4 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00022ab8 3f 01 |? | MOVE.W D1,-(A7)
00022aba 3f 02 |? | MOVE.W D2,-(A7)
00022abc 4e 93 |N | JSR (A3)
00022abe 54 4f |TO | ADDQ.L #0x2,A7
00022ac0 1e ae 00 08 | | MOVE.B (A6+0x8),(A7)
00022ac4 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String)
00022aca 54 4f |TO | ADDQ.L #0x2,A7
00022acc 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00022ad2 50 4f |PO | ADDQ.L #0x8,A7
00022ad4 4e 94 |N | JSR (A4)
00022ad6 5d 4f |]O | SUBQ.L #0x6,A7
00022ad8 20 4f | O | MOVEA.L A7,A0
00022ada 43 fa fe da |C | LEA.L 0x229b6,A1
00022ade 70 16 |p | MOVEQ.L #0x16,D0
00022ae0 10 d9 | | MOVE.B (A1)+,(A0)+
00022ae2 51 c8 ff fc |Q | DBF D0,0x22ae0
00022ae6 1f 3c 00 02 | < | MOVE.B #0x02,-(A7)
00022aea 59 4f |YO | SUBQ.L #0x4,A7
00022aec 48 6f 00 06 |Ho | PEA.L (A7+0x6)
00022af0 3f 01 |? | MOVE.W D1,-(A7)
00022af2 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7)
00022af6 4e 93 |N | JSR (A3)
00022af8 50 4f |PO | ADDQ.L #0x8,A7
00022afa 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String)
00022b00 de c3 | | ADDA.W D3,A7
00022b02 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
00022b06 4e 5e |N^ | UNLK A6
00022b08 4e 75 |Nu | RTS