|
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 - metrics - download
Length: 22528 (0x5800)
Types: M200
Notes: @(#)IOX,2.3,90/12/06,12:40:00, M200_PROGRAM
Names: »IOX.M200«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »IOX.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »IOX.M200«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─⟦this⟧ »IOX.M200«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─⟦this⟧ »IOX.M200«
└─⟦this⟧ »IOX.M200«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─⟦this⟧ »IOX.M200«
@ 20c42
<LVAR 0x008 4(r)>
<POP 20c42-20c68 Body>
<POP 20c42-20c54 Prologue> Σ0 ↓
<POP 20c54-20c64 Naked> Σ0 ↓
<Const 0x20c54 0xe.2> Δ-2 {[#14]}
<MI 20c58 MOVE.L (A6+0x8),-(A7)> Δ-4 {[#14]|[4, '(A6+0x8)']}
<Call 0x20c5c 0x103b8> {[#14]|[4, '(A6+0x8)']}
PopProgram(status : Byte; msg : String)
<POP 20c62-20c64 StackAdj> Δ+6 {}
<POP 20c64-20c68 Epilogue> Σ0
@ 20c68
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20c68-20cc2 Body>
<POP 20c68-20c7e Prologue> Σ0 ↓
<POP 20c7e-20c84 RegCacheLoad> Σ0 ↓
<POP 20c84-20cba Naked> Σ0 ↓
<MI 20c84 MOVE.L 0x2579a,D4> {}
<MI 20c86 MOVE.L #0x1a5,D3> {}
<Call 0x20c8c 0x1028c> {}
?muls_d3_d4
<MI 20c92 MOVE.L D4,0x2579a> {}
<MI 20c94 ADDQ.L #0x1,0x2579a> {}
<MI 20c96 ANDI.L #0x00007fff,0x2579a> {}
<MI 20c9c MOVE.L (A6+0x8),D7> {}
<MI 20ca0 SUB.L (A6+0xc),D7> {}
<MI 20ca4 ADDQ.L #0x1,D7> {}
<MI 20ca6 MOVE.L 0x2579a,D4> {}
<MI 20ca8 MOVE.L D7,D3> {}
<Call 0x20caa 0x10294> {}
?divs_d3_d4
<MI 20cb0 ADD.L (A6+0xc),D3> {}
<MI 20cb4 MOVE.L D3,D7> {}
<MI 20cb6 MOVE.L D7,(A6+0x10)> {}
<POP 20cba-20cc2 Epilogue> Σ0
@ 20cc2
<LVAR 0x008 4(w)>
<POP 20cc2-20d16 Body>
<POP 20cc2-20cd8 Prologue> Σ0 ↓
<POP 20cd8-20cde RegCacheLoad> Σ0 ↓
<POP 20cde-20cea Naked> Σ0 ↓ →0x20cf0
<MI 20cde ADDQ.L #0x1,0x25796> {}
<MI 20ce0 MOVE.L 0x25796,D0> {}
<MI 20ce2 CMPI.L #0x00000005,D0> {}
<MI 20ce8 BLE 0x20cf0> {}
<POP 20cea-20cf0 Naked> Σ0 ↓
<MI 20cea MOVE.L #0x1,0x25796> {}
<POP 20cf0-20d0e Naked> Σ0 ↓ ←0x20cde
<MI 20cf0 MOVE.L 0x25796,D0> {}
<MI 20cf2 SUBQ.L #0x1,D0> {}
<POP 0x20cf4 LimitCheck 0x0 ≤ D0 ≤ 0x4> {}
<MI 20cfe ASL.L #0x1,D0> {}
<MI 20d00 LEA.L 0x20bea,A0> {}
<MI 20d04 CLR.L D1> {}
<MI 20d06 MOVE.W (A0+D0.L),D1> {}
<MI 20d0a MOVE.L D1,(A6+0x8)> {}
<POP 20d0e-20d16 Epilogue> Σ0
@ 20d16
<LVAR -0x006 @>
<LVAR -0x008 @ 1(r)>
<POP 20d16-20e28 Body>
<POP 20d16-20d2c Prologue> Σ0 ↓
<POP 20d2c-20d44 RegCacheLoad> Σ0 ↓
<POP 20d44-20dd4 Naked> Σ0 ↓ →0x20e20
<Blob 0x20d44 [24] @> Δ-24 {[«24""»]}
<POP 20d50-20d52 StackAdj> Δ-6 {[«24""»]|[-6-]}
<Lit 0x20d52 24> {[«24""»]|[-2-]|[$$Simulate packet requests]}
<POP 20d60-20d62 StackAdj> Δ-2 {[«24""»]|[-2-]|[$$Simulate packet requests]|[-2-]}
<POP 20d62-20d63 StackAdj> Δ+2 {[«24""»]|[-2-]|[$$Simulate packet requests]}
<Const 0x20d63 0x1.2> Δ-2 {[«24""»]|[-2-]|[$$Simulate packet requests]|[#1]}
<Call 0x20d64 0x103f0> {[«24""»]|[-2-]|[$$Simulate packet requests]|[#1]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 20d6a-20d6c StackAdj> Δ+6 {[«24""»]|[-2-]}
<MI 20d6c MOVE.B (A7)+,D0> Δ+2 {[«24""»]}
<MI 20d6e EXTB.W D0> {[«24""»]}
<POP 0x20d70 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«24""»]}
<POP 20d72-20d74 StackAdj> Δ+24 {}
<MI 20d74 MOVE.B D0,0x257a2> {}
<Const 0x20d76 0x400.4> Δ-4 {[##1024]}
<MI 20d7a LEA.L 0x257a8,A0> {[##1024]}
<MI 20d80 MOVE.L A0,-(A7)> Δ-4 {[##1024]|[4, 'A0']}
<Const 0x20d82 0x4.2> Δ-2 {[##1024]|[4, 'A0']|[#4]}
<Call 0x20d84 0x10238> {[##1024]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 20d86-20d88 StackAdj> Δ+10 {}
<Const 0x20d88 0x404.4> Δ-4 {[##1028]}
<MI 20d8c LEA.L 0x257ac,A0> {[##1028]}
<MI 20d92 MOVE.L A0,-(A7)> Δ-4 {[##1028]|[4, 'A0']}
<Const 0x20d94 0x2.2> Δ-2 {[##1028]|[4, 'A0']|[#2]}
<Call 0x20d96 0x10238> {[##1028]|[4, 'A0']|[#2]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 20d98-20d9a StackAdj> Δ+10 {}
<Const 0x20d9a 0x406.4> Δ-4 {[##1030]}
<MI 20d9e LEA.L 0x257ae,A0> {[##1030]}
<MI 20da4 MOVE.L A0,-(A7)> Δ-4 {[##1030]|[4, 'A0']}
<Const 0x20da6 0x2.2> Δ-2 {[##1030]|[4, 'A0']|[#2]}
<Call 0x20da8 0x10238> {[##1030]|[4, 'A0']|[#2]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 20daa-20dac StackAdj> Δ+10 {}
<Const 0x20dac 0x408.4> Δ-4 {[##1032]}
<MI 20db0 LEA.L 0x257b0,A0> {[##1032]}
<MI 20db6 MOVE.L A0,-(A7)> Δ-4 {[##1032]|[4, 'A0']}
<Const 0x20db8 0x4.2> Δ-2 {[##1032]|[4, 'A0']|[#4]}
<Call 0x20dba 0x10238> {[##1032]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 20dbc-20dbe StackAdj> Δ+10 {}
<Const 0x20dbe 0x40c.4> Δ-4 {[##1036]}
<MI 20dc2 LEA.L 0x257b4,A0> {[##1036]}
<MI 20dc8 MOVE.L A0,-(A7)> Δ-4 {[##1036]|[4, 'A0']}
<Const 0x20dca 0x4.2> Δ-2 {[##1036]|[4, 'A0']|[#4]}
<Call 0x20dcc 0x10238> {[##1036]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 20dce-20dd0 StackAdj> Δ+10 {}
<MI 20dd0 TST.B 0x257a2> {}
<MI 20dd2 BEQ 0x20e20> {}
<POP 20dd4-20dd6 Naked> Σ0 ↓
<MI 20dd4 MOVEQ.L #0x00,D7> {}
<POP 20dd6-20e08 Naked> Σ0 ↓ →0x20dd6 ←0x20dd6
<POP 0x20dd6 LimitCheck 0x0 ≤ D7 ≤ 0x1f> {}
<MI 20ddc MOVE.L D7,D0> {}
<MI 20dde ASL.L #0x4,D0> {}
<MI 20de0 LEA.L 0x2578e,A0> {}
<MI 20de6 CLR.B (A0+D0.L+#0x2a)> {}
<MI 20dea CLR.B (A0+D0.L+#0x2b)> {}
<MI 20dee CLR.B (A0+D0.L+#0x2c)> {}
<MI 20df2 CLR.W (A0+D0.L+#0x2e)> {}
<MI 20df6 CLR.W (A0+D0.L+#0x30)> {}
<MI 20dfa CLR.L (A0+D0.L+#0x32)> {}
<MI 20dfe CLR.L (A0+D0.L+#0x36)> {}
<MI 20e02 ADDQ.L #0x1,D7> {}
<MI 20e04 CMP.L #0x1f,D7> {}
<MI 20e06 BLE 0x20dd6> {}
<POP 20e08-20e20 Naked> Σ0 ↓ →0x20e08 ←0x20e08
<MI 20e08 CLR.B -(A7)> Δ-2 {[#0]}
<Pointer.fp 0x20e0a <LVAR -0x008 @ 1(r)>> Δ-4 {[#0]|[@@-8]}
<Pointer.fp 0x20e0e <LVAR -0x006 @>> Δ-4 {[#0]|[@@-8]|[@@-6]}
<Call 0x20e12 0x10232> {[#0]|[@@-8]|[@@-6]}
KERNCALL_19
<POP 20e18-20e1a StackAdj> Δ+10 {}
<MI 20e1a TST.B (A6-0x8)> {}
<MI 20e1e BNE 0x20e08> {}
<POP 20e20-20e28 Epilogue> Σ0 ←0x20d44
@ 20e28
<LVAR 0x010 2(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x009 1(r)>
<LVAR -0x00a 1(r)>
<LVAR -0x00c 1(r)>
<LVAR -0x00f 1(r)>
<LVAR -0x010 1(r)>
<LVAR -0x011 1(r)>
<LVAR -0x012 @>
<LVAR -0x01c @ 2(r)>
<LVAR -0x01e @ 1(r)>
<POP 20e28-2115a Body>
<POP 20e28-20e3e Prologue> Σ0 ↓
<POP 20e3e-20e48 RegCacheLoad> Σ0 ↓
<POP 20e48-20e52 Naked> Σ0 ↓ →0x21138
<MI 20e48 TST.B 0x257a2> {}
<MI 20e4e BEQ 0x21138> {}
<POP 20e52-20e54 Naked> Σ0 ↓
<MI 20e52 MOVEQ.L #0x00,D7> {}
<POP 20e54-20e78 Naked> Σ0 ↓ →0x2109c ←0x2109c ←0x210ec
<MI 20e54 MOVE.B D7,D0> {}
<MI 20e56 EXTB.W D0> {}
<POP 0x20e58 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 20e5c MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Pointer.fp 0x20e5e <LVAR -0x01e @ 1(r)>> Δ-4 {[2, 'D0']|[@@-30]}
<Pointer.fp 0x20e62 <LVAR -0x01c @ 2(r)>> Δ-4 {[2, 'D0']|[@@-30]|[@@-28]}
<Call 0x20e66 0x10232> {[2, 'D0']|[@@-30]|[@@-28]}
KERNCALL_19
<POP 20e6c-20e70 StackAdj> Δ+10 {}
<MI 20e70 TST.B (A6-0x1e)> {}
<MI 20e74 BEQ 0x2109c> {}
<POP 20e78-20e82 Naked> Σ0 ↓ →0x20ea6
<MI 20e78 MOVE.W (A6-0x1c),D0> {}
<MI 20e7c CMPI.W #0x00ff,D0> {}
<MI 20e80 BLS 0x20ea6> {}
<POP 20e82-20ea6 Naked> Σ0 ↓
<Blob 0x20e82 [32] @> Δ-32 {[«32""»]}
<POP 20e8e-20e90 StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x20e90 32> {[«32""»]|[$$Response queue data out of range]}
<Call 0x20ea0 0x20c42> {[«32""»]|[$$Response queue data out of range]}
<POP 20ea2-20ea6 StackAdj> Δ+36 {}
<POP 20ea6-20ee8 Naked> Σ0 Δ-4 ↓ →0x20f12 ←0x20e78
<MI 20ea6 MOVE.W 0x257ae,D1> {}
<MI 20eac MULU.W D0,D1> {}
<MI 20eae ADD.L 0x257b0,D1> {}
<MI 20eb4 MOVE.L D1,-(A7)> Δ-4 {[4, 'D1']}
<MI 20eb6 LEA.L (A6-0x12),A0> {[4, 'D1']}
<MI 20eba MOVE.L A0,-(A7)> Δ-4 {[4, 'D1']|[4, 'A0']}
<Const 0x20ebc 0x10.2> Δ-2 {[4, 'D1']|[4, 'A0']|[#16]}
<Call 0x20ec0 0x10238> {[4, 'D1']|[4, 'A0']|[#16]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 20ec6-20eca StackAdj> Δ+10 {}
<MI 20eca CLR.L D1> {}
<MI 20ecc MOVE.B (A6-0xa),D1> {}
<MI 20ed0 MOVE.W D1,D2> {}
<MI 20ed2 ASR.W #0x3,D2> {}
<MI 20ed4 ASL.W #0x4,D2> {}
<MI 20ed6 LEA.L 0x2578e,A0> {}
<MI 20edc MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 20ede CLR.L D3> {[4, 'A0']}
<MI 20ee0 MOVE.B (A6-0xf),D3> {[4, 'A0']}
<MI 20ee4 CMP.W D0,D3> {[4, 'A0']}
<MI 20ee6 BEQ 0x20f12> {[4, 'A0']}
<POP 20ee8-20f12 Naked> Σ-4 ↓
<Blob 0x20ee8 [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 20efa-20efc StackAdj> Δ-4 {[-4-]|[«20""»]|[-4-]}
<Lit 0x20efc 19> {[-4-]|[«20""»]|[$$Incorrect Packet_Id]}
<Call 0x20f0c 0x20c42> {[-4-]|[«20""»]|[$$Incorrect Packet_Id]}
<POP 20f0e-20f12 StackAdj> Δ+24 {[-4-]}
<POP 20f12-20f18 Naked> Σ-4 ↓ →0x20f42 ←0x20ea6
<MI 20f12 TST.B (A6-0xc)> {[-4-]}
<MI 20f16 BEQ 0x20f42> {[-4-]}
<POP 20f18-20f42 Naked> Σ-4 ↓
<Blob 0x20f18 [24] @> Δ-24 {[-4-]|[«24""»]}
<POP 20f2a-20f2c StackAdj> Δ-4 {[-4-]|[«24""»]|[-4-]}
<Lit 0x20f2c 23> {[-4-]|[«24""»]|[$$Incorrect Response_Kind]}
<Call 0x20f3c 0x20c42> {[-4-]|[«24""»]|[$$Incorrect Response_Kind]}
<POP 20f3e-20f42 StackAdj> Δ+28 {[-4-]}
<POP 20f42-20f48 Naked> Σ-4 ↓ →0x20f72 ←0x20f12
<MI 20f42 TST.B (A0+D2.W+#0x2b)> {[-4-]}
<MI 20f46 BNE 0x20f72> {[-4-]}
<POP 20f48-20f72 Naked> Σ-4 ↓
<Blob 0x20f48 [28] @> Δ-28 {[-4-]|[«28""»]}
<POP 20f5a-20f5c StackAdj> Δ-4 {[-4-]|[«28""»]|[-4-]}
<Lit 0x20f5c 27> {[-4-]|[«28""»]|[$$Unexpected response arrived]}
<Call 0x20f6c 0x20c42> {[-4-]|[«28""»]|[$$Unexpected response arrived]}
<POP 20f6e-20f72 StackAdj> Δ+32 {[-4-]}
<POP 20f72-20f86 Naked> Σ-4 Δ-4 ↓ →0x20fb0 ←0x20f42
<MI 20f72 MOVE.W D1,D0> {[-4-]}
<MI 20f74 EXTW.L D0> {[-4-]}
<MI 20f76 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<MI 20f78 CLR.L D1> {[-4-]|[4, 'D0']}
<MI 20f7a MOVE.W (A0+D2.W+#0x2e),D1> {[-4-]|[4, 'D0']}
<MI 20f7e ADD.L D0,D1> {[-4-]|[4, 'D0']}
<MI 20f80 EXTW.L D3> {[-4-]|[4, 'D0']}
<MI 20f82 CMP.L D1,D3> {[-4-]|[4, 'D0']}
<MI 20f84 BEQ 0x20fb0> {[-4-]|[4, 'D0']}
<POP 20f86-20fb0 Naked> Σ-8 ↓
<Blob 0x20f86 [28] @> Δ-28 {[-8-]|[«28""»]}
<POP 20f98-20f9a StackAdj> Δ-4 {[-8-]|[«28""»]|[-4-]}
<Lit 0x20f9a 27> {[-8-]|[«28""»]|[$$Packet arrived out of order]}
<Call 0x20faa 0x20c42> {[-8-]|[«28""»]|[$$Packet arrived out of order]}
<POP 20fac-20fb0 StackAdj> Δ+32 {[-8-]}
<POP 20fb0-20fcc Naked> Σ-8 ↓ →0x20ff0 ←0x20f72
<MI 20fb0 CLR.L D0> {[-8-]}
<MI 20fb2 MOVE.W (A0+D2.W+#0x2e),D0> {[-8-]}
<MI 20fb6 ADDQ.L #0x1,D0> {[-8-]}
<POP 0x20fb8 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-8-]}
<MI 20fc2 MOVE.W D0,(A0+D2.W+#0x2e)> {[-8-]}
<MI 20fc6 CMP.W (A0+D2.W+#0x30),D0> {[-8-]}
<MI 20fca BLS 0x20ff0> {[-8-]}
<POP 20fcc-20ff0 Naked> Σ-8 ↓
<Blob 0x20fcc [26] @> Δ-26 {[-8-]|[«26""»]}
<POP 20fd8-20fda StackAdj> Δ-4 {[-8-]|[«26""»]|[-4-]}
<Lit 0x20fda 26> {[-8-]|[«26""»]|[$$Too many responses arrived]}
<Call 0x20fea 0x20c42> {[-8-]|[«26""»]|[$$Too many responses arrived]}
<POP 20fec-20ff0 StackAdj> Δ+30 {[-8-]}
<POP 20ff0-20ffa Naked> Σ-8 ↓ →0x2109a ←0x20fb0
<MI 20ff0 MOVE.B (A6-0x9),D0> {[-8-]}
<MI 20ff4 LSR.B #0x7,D0> {[-8-]}
<MI 20ff6 BEQ 0x2109a> {[-8-]}
<POP 20ffa-2101e Naked> Σ-8 ↓ →0x2109a
<MI 20ffa MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 20ffe CLR.B (A0+D2.W+#0x2b)> {[-8-]}
<MI 21002 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 21006 MOVE.B #0x01,(A0+D2.W+#0x2a)> {[-8-]}
<MI 2100c MOVE.B (A6-0x9),D0> {[-8-]}
<MI 21010 LSL.B #0x6,D0> {[-8-]}
<MI 21012 LSR.B #0x7,D0> {[-8-]}
<MI 21014 MOVE.B D0,(A0+D2.W+#0x2c)> {[-8-]}
<MI 21018 TST.L (A0+D2.W+#0x36)> {[-8-]}
<MI 2101c BEQ 0x2109a> {[-8-]}
<POP 2101e-21038 Naked> Σ-8 ↓ →0x21062
<MI 2101e CLR.L D0> {[-8-]}
<MI 21020 MOVE.B (A6-0x11),D0> {[-8-]}
<MI 21024 ASL.W #0x3,D0> {[-8-]}
<MI 21026 CLR.L D1> {[-8-]}
<MI 21028 MOVE.B (A6-0x10),D1> {[-8-]}
<MI 2102c NEG.W D1> {[-8-]}
<MI 2102e ADD.W D0,D1> {[-8-]}
<MI 21030 EXTW.L D1> {[-8-]}
<MI 21032 CMP.L (A0+D2.W+#0x36),D1> {[-8-]}
<MI 21036 BLE 0x21062> {[-8-]}
<POP 21038-21062 Naked> Σ-8 ↓
<Blob 0x21038 [20] @> Δ-20 {[-8-]|[«20""»]}
<POP 2104a-2104c StackAdj> Δ-4 {[-8-]|[«20""»]|[-4-]}
<Lit 0x2104c 19> {[-8-]|[«20""»]|[$$Packet size too big]}
<Call 0x2105c 0x20c42> {[-8-]|[«20""»]|[$$Packet size too big]}
<POP 2105e-21062 StackAdj> Δ+24 {[-8-]}
<POP 21062-2109a Naked> Σ-8 ↓ ←0x2101e
<MI 21062 MOVE.L (A7),D4> {[-8-]}
<MI 21064 CLR.L D3> {[-8-]}
<MI 21066 MOVE.W 0x257ac,D3> {[-8-]}
<Call 0x2106c 0x10290> {[-8-]}
?mulu_d3_d4
<MI 21072 MOVE.L D4,D0> {[-8-]}
<MI 21074 ADD.L 0x257b4,D0> {[-8-]}
<MI 2107a MOVE.L D0,-(A7)> Δ-4 {[-8-]|[4, 'D0']}
<MI 2107c MOVE.L (A0+D2.W+#0x32),-(A7)> Δ-4 {[-8-]|[4, 'D0']|[4, '(A0+D2.W+#0x32)']}
<MI 21080 MOVE.L (A0+D2.W+#0x36),D0> {[-8-]|[4, 'D0']|[4, '(A0+D2.W+#0x32)']}
<POP 0x21084 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-8-]|[4, 'D0']|[4, '(A0+D2.W+#0x32)']}
<MI 2108e MOVE.W D0,-(A7)> Δ-2 {[-8-]|[4, 'D0']|[4, '(A0+D2.W+#0x32)']|[2, 'D0']}
<Call 0x21090 0x10238> {[-8-]|[4, 'D0']|[4, '(A0+D2.W+#0x32)']|[2, 'D0']}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 21096-2109a StackAdj> Δ+10 {[-8-]}
<POP 2109a-2109c Naked> Σ-8 Δ+8 ↓ ←0x20ff0 ←0x20ffa
<POP 2109a-2109c StackAdj> Δ+8 {}
<POP 2109c-210a6 Naked> Σ0 ↓ →0x20e54 ←0x20e54
<MI 2109c MOVEQ.L #0x00,D7> {}
<MI 2109e TST.B (A6-0x1e)> {}
<MI 210a2 BNE 0x20e54> {}
<POP 210a6-210ae Naked> Σ0 ↓
<MI 210a6 MOVEQ.L #0x01,D7> {}
<MI 210a8 MOVEQ.L #0x00,D6> {}
<MI 210aa MOVEQ.L #0x00,D5> {}
<MI 210ac MOVEQ.L #0x00,D0> {}
<POP 210ae-210e8 Naked> Σ0 ↓ →0x210ae ←0x210ae
<POP 0x210ae LimitCheck 0x0 ≤ D0 ≤ 0x1f> {}
<MI 210b8 MOVE.L D0,D1> {}
<MI 210ba ASL.L #0x4,D1> {}
<MI 210bc LEA.L 0x2578e,A0> {}
<MI 210c2 MOVE.B D6,D2> {}
<MI 210c4 OR.B (A0+D1.L+#0x2b),D2> {}
<MI 210c8 EXTB.W D2> {}
<POP 0x210ca LimitCheck 0x0 ≤ D2 ≤ 0x1> {}
<MI 210ce MOVE.B D2,D6> {}
<MI 210d0 MOVE.B D5,D2> {}
<MI 210d2 OR.B (A0+D1.L+#0x2a),D2> {}
<MI 210d6 EXTB.W D2> {}
<POP 0x210d8 LimitCheck 0x0 ≤ D2 ≤ 0x1> {}
<MI 210dc MOVE.B D2,D5> {}
<MI 210de ADDQ.L #0x1,D0> {}
<MI 210e0 CMPI.L #0x0000001f,D0> {}
<MI 210e6 BLE 0x210ae> {}
<POP 210e8-210ec Naked> Σ0 ↓ →0x210f2
<MI 210e8 TST.B D5> {}
<MI 210ea BNE 0x210f2> {}
<POP 210ec-210f2 Naked> Σ0 ↓ →0x20e54
<MI 210ec TST.B D6> {}
<MI 210ee BNE 0x20e54> {}
<POP 210f2-2110c Naked> Σ0 ↓ →0x2112a ←0x210e8
<MI 210f2 MOVE.W (A6+0x10),D0> {}
<POP 0x210f6 LimitCheck 0x0 ≤ D0 ≤ 0x1f> {}
<MI 210fa CLR.L D1> {}
<MI 210fc MOVE.W D0,D1> {}
<MI 210fe ASL.L #0x4,D1> {}
<MI 21100 LEA.L 0x2578e,A0> {}
<MI 21106 TST.B (A0+D1.L+#0x2a)> {}
<MI 2110a BEQ 0x2112a> {}
<POP 2110c-2112a Naked> Σ0 →0x21136
<MI 2110c CLR.B (A0+D1.L+#0x2a)> {}
<MI 21110 MOVEA.L (A6+0xc),A1> {}
<MI 21114 MOVE.B #0x01,(A1)> {}
<MI 21118 MOVEA.L (A6+0x8),A1> {}
<MI 2111c MOVE.B (A0+D1.L+#0x2c),D0> {}
<MI 21120 EXTB.W D0> {}
<POP 0x21122 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 21126 MOVE.B D0,(A1)> {}
<MI 21128 BRA 0x21136> {}
<POP 2112a-21136 Naked> Σ0 ↓ ←0x210f2
<MI 2112a MOVEA.L (A6+0xc),A0> {}
<MI 2112e CLR.B (A0)> {}
<MI 21130 MOVEA.L (A6+0x8),A0> {}
<MI 21134 CLR.B (A0)> {}
<POP 21136-21138 Naked> Σ0 →0x21152 ←0x2110c
<MI 21136 BRA 0x21152> {}
<POP 21138-21152 Naked> Σ0 ↓ ←0x20e48
<MI 21138 MOVE.W (A6+0x10),-(A7)> Δ-2 {[2, '(A6+0x10)']}
<MI 2113c MOVEA.L (A6+0xc),A0> {[2, '(A6+0x10)']}
<MI 21140 PEA.L (A0)> Δ-4 {[2, '(A6+0x10)']|[4, '^(A0)']}
<MI 21142 MOVEA.L (A6+0x8),A0> {[2, '(A6+0x10)']|[4, '^(A0)']}
<MI 21146 PEA.L (A0)> Δ-4 {[2, '(A6+0x10)']|[4, '^(A0)']|[4, '^(A0)']}
<Call 0x21148 0x10208> {[2, '(A6+0x10)']|[4, '^(A0)']|[4, '^(A0)']}
KERNCALL_04
<POP 2114e-21152 StackAdj> Δ+10 {}
<POP 21152-2115a Epilogue> Σ0 ←0x21136
@ 2115a
<LVAR 0x00c 2(r)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @ 1(r)>
<POP 2115a-211b0 Body>
<POP 2115a-21170 Prologue> Σ0 ↓
<POP 21170-21178 Naked> Σ0 ↓ →0x21196
<MI 21170 TST.B 0x257a2> {}
<MI 21176 BEQ 0x21196> {}
<POP 21178-21194 Naked> Σ0 ↓ →0x21178 ←0x21178
<MI 21178 MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<Pointer.fp 0x2117c <LVAR -0x002 @ 1(r)>> Δ-4 {[2, '(A6+0xc)']|[@@-2]}
<MI 21180 MOVEA.L (A6+0x8),A0> {[2, '(A6+0xc)']|[@@-2]}
<MI 21184 PEA.L (A0)> Δ-4 {[2, '(A6+0xc)']|[@@-2]|[4, '^(A0)']}
<Call 0x21186 0x20e28> {[2, '(A6+0xc)']|[@@-2]|[4, '^(A0)']}
<POP 2118a-2118e StackAdj> Δ+10 {}
<MI 2118e TST.B (A6-0x2)> {}
<MI 21192 BEQ 0x21178> {}
<POP 21194-21196 Naked> Σ0 →0x211a8
<MI 21194 BRA 0x211a8> {}
<POP 21196-211a8 Naked> Σ0 ↓ ←0x21170
<MI 21196 MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<MI 2119a MOVEA.L (A6+0x8),A0> {[2, '(A6+0xc)']}
<MI 2119e PEA.L (A0)> Δ-4 {[2, '(A6+0xc)']|[4, '^(A0)']}
<Call 0x211a0 0x10206> {[2, '(A6+0xc)']|[4, '^(A0)']}
KC03_Wait_Disk_IO(a : W; VAR status : Byte)
<POP 211a6-211a8 StackAdj> Δ+6 {}
<POP 211a8-211b0 Epilogue> Σ0 ←0x21194
@ 211b0
<LVAR 0x00a 4(w)>
<LVAR 0x008 2(r)>
<LVAR -0x014 1(r)>
<LVAR -0x015 1(r)>
<LVAR -0x016 @>
<POP 211b0-21244 Body>
<POP 211b0-211c6 Prologue> Σ0 ↓
<POP 211c6-2123c Naked> Σ0 ↓
<MI 211c6 CLR.L D0> {}
<MI 211c8 MOVE.W (A6+0x8),D0> {}
<MI 211cc MOVE.L D0,D7> {}
<MI 211ce ASL.L #0x3,D7> {}
<POP 0x211d0 LimitCheck 0x0 ≤ D0 ≤ 0x1f> {}
<MI 211d4 EXTW.L D0> {}
<MI 211d6 ASL.L #0x4,D0> {}
<MI 211d8 LEA.L 0x2578e,A0> {}
<MI 211de CLR.L D1> {}
<MI 211e0 MOVE.W (A0+D0.L+#0x2e),D1> {}
<MI 211e4 ADD.L D1,D7> {}
<MI 211e6 SUBQ.L #0x1,D7> {}
<MI 211e8 MOVE.L D7,D4> {}
<MI 211ea CLR.L D3> {}
<MI 211ec MOVE.W 0x257ae,D3> {}
<Call 0x211f2 0x10290> {}
?mulu_d3_d4
<MI 211f8 MOVE.L D4,D1> {}
<MI 211fa ADD.L 0x257b0,D1> {}
<MI 21200 MOVE.L D1,-(A7)> Δ-4 {[4, 'D1']}
<MI 21202 LEA.L (A6-0x16),A1> {[4, 'D1']}
<MI 21206 MOVE.L A1,-(A7)> Δ-4 {[4, 'D1']|[4, 'A1']}
<Const 0x21208 0x10.2> Δ-2 {[4, 'D1']|[4, 'A1']|[#16]}
<Call 0x2120c 0x10238> {[4, 'D1']|[4, 'A1']|[#16]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 21212-21216 StackAdj> Δ+10 {}
<MI 21216 CLR.L D1> {}
<MI 21218 MOVE.B (A6-0x15),D1> {}
<MI 2121c ASL.W #0x3,D1> {}
<MI 2121e CLR.L D2> {}
<MI 21220 MOVE.B (A6-0x14),D2> {}
<MI 21224 NEG.W D2> {}
<MI 21226 ADD.W D1,D2> {}
<MI 21228 CLR.L D1> {}
<MI 2122a MOVE.W (A0+D0.L+#0x2e),D1> {}
<MI 2122e SUBQ.L #0x1,D1> {}
<MI 21230 ASL.L #0x8,D1> {}
<MI 21232 ASL.L #0x2,D1> {}
<MI 21234 EXTW.L D2> {}
<MI 21236 ADD.L D2,D1> {}
<MI 21238 MOVE.L D1,(A6+0xa)> {}
<POP 2123c-21244 Epilogue> Σ0
@ 21244
<LVAR 0x016 4(r)>
<LVAR 0x012 4(r)>
<LVAR 0x010 2(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x004 4(w)>
<LVAR -0x007 1(w)>
<LVAR -0x008 1(w) 4(w)>
<LVAR -0x00a 1(w)>
<LVAR -0x00c 4(w)>
<LVAR -0x00d 1(w)>
<LVAR -0x00e 1(w)>
<LVAR -0x00f 1(w)>
<LVAR -0x010 @ 1(w) 4(w)>
<POP 21244-213dc Body>
<POP 21244-2125a Prologue> Σ0 ↓
<POP 2125a-2126c RegCacheLoad> Σ0 ↓
<POP 2126c-21276 Naked> Σ0 ↓ →0x213c0
<MI 2126c TST.B 0x257a2> {}
<MI 21272 BEQ 0x213c0> {}
<POP 21276-2129c Naked> Σ0 ↓ →0x212a2
<MI 21276 MOVE.W (A6+0x10),D0> {}
<POP 0x21278 LimitCheck 0x0 ≤ D0 ≤ 0x1f> {}
<MI 2127c CLR.L D1> {}
<MI 2127e MOVE.W D0,D1> {}
<MI 21280 ASL.L #0x4,D1> {}
<MI 21282 LEA.L 0x2578e,A0> {}
<MI 21288 CLR.L D0> {}
<MI 2128a MOVE.W (A6+0x10),D0> {}
<MI 2128c ASL.L #0x3,D0> {}
<POP 0x2128e LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 21294 MOVE.W D0,D7> {}
<MI 21296 TST.B (A0+D1.L+#0x2b)> {}
<MI 2129a BNE 0x212a2> {}
<POP 2129c-212a2 Naked> Σ0 ↓ →0x212d0
<MI 2129c TST.B (A0+D1.L+#0x2a)> {}
<MI 212a0 BEQ 0x212d0> {}
<POP 212a2-212d0 Naked> Σ0 ↓ ←0x21276
<Blob 0x212a2 [34] @> Δ-34 {[«34""»]}
<POP 212b4-212b6 StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x212b6 33> {[«34""»]|[$$Starting new I/O on active handle]}
<Call 0x212c8 0x20c42> {[«34""»]|[$$Starting new I/O on active handle]}
<POP 212cc-212d0 StackAdj> Δ+38 {}
<POP 212d0-212ec Naked> Σ0 ↓ →0x21316 ←0x2129c
<MI 212d0 MOVE.B #0x01,(A0+D1.L+#0x2b)> {}
<MI 212d4 CLR.W (A0+D1.L+#0x2e)> {}
<MI 212d8 MOVE.W #0x01,(A0+D1.L+#0x30)> {}
<MI 212dc MOVE.L (A6+0x12),(A0+D1.L+#0x32)> {}
<MI 212e2 MOVE.L (A6+0x8),(A0+D1.L+#0x36)> {}
<MI 212e8 TST.L (A6+0xc)> {}
<MI 212ea BEQ 0x21316> {}
<POP 212ec-21316 Naked> Σ0 ↓
<MI 212ec MOVE.W 0x257ac,D0> {}
<MI 212f2 MULU.W D7,D0> {}
<MI 212f4 MOVE.L (A6+0x12),-(A7)> Δ-4 {[4, '(A6+0x12)']}
<MI 212f8 ADD.L 0x257b4,D0> {[4, '(A6+0x12)']}
<MI 212fe MOVE.L D0,-(A7)> Δ-4 {[4, '(A6+0x12)']|[4, 'D0']}
<MI 21300 MOVE.L (A6+0xc),D0> {[4, '(A6+0x12)']|[4, 'D0']}
<POP 0x21302 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[4, '(A6+0x12)']|[4, 'D0']}
<MI 2130c MOVE.W D0,-(A7)> Δ-2 {[4, '(A6+0x12)']|[4, 'D0']|[2, 'D0']}
<Call 0x2130e 0x10238> {[4, '(A6+0x12)']|[4, 'D0']|[2, 'D0']}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 21314-21316 StackAdj> Δ+10 {}
<POP 21316-213c0 Naked> Σ0 →0x213d4 ←0x212d0
<MI 21316 MOVEA.L (A6+0x16),A0> {}
<POP 2131a-2131e StackAdj> Δ-16 {[-16-]}
<MI 2131e MOVEA.L A7,A1> {[-16-]}
<BlockMove 16,A0,A1> {[-16-]}
<MI 21328 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-12-]}
<MI 2132c MOVE.L (A7)+,(A6-0xc)> Δ+4 {[-8-]}
<MI 21330 MOVE.L (A7)+,(A6-0x8)> Δ+4 {[-4-]}
<MI 21334 MOVE.L (A7)+,(A6-0x4)> Δ+4 {}
<MI 21338 MOVE.B #0x40,(A6-0x10)> {}
<MI 2133e MOVE.L (A6+0xc),D0> {}
<MI 21340 ADDQ.L #0x7,D0> {}
<MI 21342 MOVE.L D0,D4> {}
<MI 21344 MOVEQ.L #0x08,D3> {}
<Call 0x21346 0x10294> {}
?divs_d3_d4
<POP 0x2134c LimitCheck 0x0 ≤ D4 ≤ 0x80> {}
<MI 21356 MOVE.B D4,(A6-0xf)> {}
<MI 2135a CLR.L D0> {}
<MI 2135c MOVE.B D4,D0> {}
<MI 2135e ASL.W #0x3,D0> {}
<MI 21360 EXTW.L D0> {}
<MI 21362 SUB.L (A6+0xc),D0> {}
<POP 0x21364 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 2136a MOVE.B D0,(A6-0xe)> {}
<POP 0x2136e LimitCheck 0x0 ≤ D7 ≤ 0xff> {}
<MI 21370 MOVE.B D7,(A6-0xd)> {}
<MI 21374 MOVE.B #0x0f,(A6-0xa)> {}
<MI 2137a MOVE.B D7,(A6-0x8)> {}
<MI 2137e ORI.B #0x80,(A6-0x7)> {}
<MI 21384 ANDI.B #0xfe,(A6-0x7)> {}
<MI 2138a MOVE.W 0x257ae,D0> {}
<MI 21390 MULU.W D7,D0> {}
<MI 21392 LEA.L (A6-0x10),A0> {}
<MI 21396 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 21398 ADD.L 0x257b0,D0> {[4, 'A0']}
<MI 2139e MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<Const 0x213a0 0x10.2> Δ-2 {[4, 'A0']|[4, 'D0']|[#16]}
<Call 0x213a4 0x10238> {[4, 'A0']|[4, 'D0']|[#16]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 213aa-213ac StackAdj> Δ+10 {}
<POP 0x213ac LimitCheck 0x0 ≤ D7 ≤ 0xffff> {}
<MI 213b4 MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x213b6 0x10230> {[2, 'D7']}
KERNCALL_18
<POP 213bc-213be StackAdj> Δ+2 {}
<MI 213be BRA 0x213d4> {}
<POP 213c0-213d4 Naked> Σ0 ↓ ←0x2126c
<MI 213c0 MOVEA.L (A6+0x16),A0> {}
<MI 213c4 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<MI 213c6 MOVE.L (A6+0x12),-(A7)> Δ-4 {[4, '^(A0)']|[4, '(A6+0x12)']}
<MI 213ca MOVE.W (A6+0x10),-(A7)> Δ-2 {[4, '^(A0)']|[4, '(A6+0x12)']|[2, '(A6+0x10)']}
<Call 0x213cc 0x10204> {[4, '^(A0)']|[4, '(A6+0x12)']|[2, '(A6+0x10)']}
KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
<POP 213d2-213d4 StackAdj> Δ+10 {}
<POP 213d4-213dc Epilogue> Σ0 ←0x21316
@ 213dc
<LVAR 0x016 4(r)>
<LVAR 0x012 4(r)>
<LVAR 0x010 2(r)>
<LVAR 0x00c 4(rw)>
<LVAR 0x008 4(r)>
<LVAR -0x016 @ 2(w)>
<LVAR -0x01a 4(w)>
<LVAR -0x01d 1(w)>
<LVAR -0x01e 1(w) 4(w)>
<LVAR -0x020 1(w)>
<LVAR -0x022 4(w)>
<LVAR -0x023 1(w)>
<LVAR -0x024 1(rw)>
<LVAR -0x025 1(rw)>
<LVAR -0x026 @ 1(w) 4(w)>
<POP 213dc-21698 Body>
<POP 213dc-213f2 Prologue> Σ0 ↓
<POP 213f2-21400 RegCacheLoad> Σ0 ↓
<POP 21400-2140a Naked> Σ0 ↓ →0x21678
<MI 21400 TST.B 0x257a2> {}
<MI 21406 BEQ 0x21678> {}
<POP 2140a-21434 Naked> Σ0 ↓ →0x2143a
<MI 2140a MOVE.W (A6+0x10),D0> {}
<POP 0x2140e LimitCheck 0x0 ≤ D0 ≤ 0x1f> {}
<MI 21412 CLR.L D1> {}
<MI 21414 MOVE.W D0,D1> {}
<MI 21416 ASL.L #0x4,D1> {}
<MI 21418 LEA.L 0x2578e,A0> {}
<MI 2141e CLR.L D0> {}
<MI 21420 MOVE.W (A6+0x10),D0> {}
<MI 21424 ASL.L #0x3,D0> {}
<POP 0x21426 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 2142c MOVE.W D0,D5> {}
<MI 2142e TST.B (A0+D1.L+#0x2b)> {}
<MI 21432 BNE 0x2143a> {}
<POP 21434-2143a Naked> Σ0 ↓ →0x2146a
<MI 21434 TST.B (A0+D1.L+#0x2a)> {}
<MI 21438 BEQ 0x2146a> {}
<POP 2143a-2146a Naked> Σ0 ↓ ←0x2140a
<Blob 0x2143a [34] @> Δ-34 {[«34""»]}
<POP 2144c-2144e StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x2144e 33> {[«34""»]|[$$Starting new I/O on active handle]}
<Call 0x21462 0x20c42> {[«34""»]|[$$Starting new I/O on active handle]}
<POP 21466-2146a StackAdj> Δ+38 {}
<POP 2146a-2149e Naked> Σ0 ↓ →0x214a4 ←0x21434
<MI 2146a MOVE.B #0x01,(A0+D1.L+#0x2b)> {}
<MI 21470 CLR.W (A0+D1.L+#0x2e)> {}
<MI 21474 MOVE.L (A6+0x8),D0> {}
<MI 21478 ADDI.L #0x000003ff,D0> {}
<MI 2147e MOVE.L D0,D4> {}
<MI 21480 MOVE.L #0x400,D3> {}
<Call 0x21486 0x10294> {}
?divs_d3_d4
<POP 0x2148c LimitCheck 0x0 ≤ D4 ≤ 0xffff> {}
<MI 21496 MOVE.W D4,(A0+D1.L+#0x30)> {}
<MI 2149a TST.W D4> {}
<MI 2149c BNE 0x214a4> {}
<POP 2149e-214a4 Naked> Σ0 ↓
<MI 2149e MOVE.W #0x1,(A0+D1.L+#0x30)> {}
<POP 214a4-214d4 Naked> Σ0 ↓ →0x215be ←0x2146a
<MI 214a4 CLR.L (A0+D1.L+#0x32)> {}
<MI 214a8 CLR.L (A0+D1.L+#0x36)> {}
<MI 214ac MOVEA.L (A6+0x16),A0> {}
<POP 214b0-214b4 StackAdj> Δ-16 {[-16-]}
<MI 214b4 MOVEA.L A7,A1> {[-16-]}
<BlockMove 16,A0,A1> {[-16-]}
<MI 214be MOVE.L (A7)+,(A6-0x26)> Δ+4 {[-12-]}
<MI 214c0 MOVE.L (A7)+,(A6-0x22)> Δ+4 {[-8-]}
<MI 214c4 MOVE.L (A7)+,(A6-0x1e)> Δ+4 {[-4-]}
<MI 214c8 MOVE.L (A7)+,(A6-0x1a)> Δ+4 {}
<MI 214cc TST.L (A6+0xc)> {}
<MI 214d0 BNE 0x215be> {}
<POP 214d4-214e2 Naked> Σ0 ↓ →0x215be
<MI 214d4 MOVE.L (A6+0x8),D0> {}
<MI 214d8 CMPI.L #0x00000400,D0> {}
<MI 214de BLE 0x215be> {}
<POP 214e2-2150c Naked> Σ0 Δ-4 ↓
<MI 214e2 MOVE.L (A6+0x8),D0> {}
<MI 214e6 SUBQ.L #0x1,D0> {}
<MI 214e8 MOVE.L D0,D4> {}
<MI 214ea MOVE.L #0x400,D3> {}
<Call 0x214f0 0x10294> {}
?divs_d3_d4
<POP 0x214f6 LimitCheck 0x0 ≤ D4 ≤ 0xffff> {}
<MI 21500 MOVE.W D4,(A6-0x16)> {}
<MI 21504 CLR.L D0> {}
<MI 21506 MOVE.W D4,D0> {}
<MI 21508 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 2150a MOVEQ.L #0x00,D6> {[4, 'D0']}
<POP 2150c-21510 Naked> Σ-4 ↓ →0x2153c ←0x21510
<MI 2150c CMP.L (A7),D6> {[-4-]}
<MI 2150e BGT 0x2153c> {[-4-]}
<POP 21510-2153c Naked> Σ-4 ↓ →0x2150c
<POP 0x21510 LimitCheck 0x0 ≤ D6 ≤ 0x8> {[-4-]}
<MI 2151a MOVE.L D6,D0> {[-4-]}
<MI 2151c ASL.L #0x1,D0> {[-4-]}
<MI 2151e MOVE.W D5,D1> {[-4-]}
<MI 21520 EXTW.L D1> {[-4-]}
<MI 21522 ADD.L D6,D1> {[-4-]}
<POP 0x21524 LimitCheck 0x0 ≤ D1 ≤ 0xff> {[-4-]}
<MI 2152a MOVE.B D1,(A6+D0.L-#0x14)> {[-4-]}
<POP 0x2152e LimitCheck 0x0 ≤ D6 ≤ 0xff> {[-4-]}
<MI 21534 MOVE.B D6,(A6+D0.L-#0x13)> {[-4-]}
<MI 21538 ADDQ.L #0x1,D6> {[-4-]}
<MI 2153a BVC 0x2150c> {[-4-]}
<POP 2153c-215be Naked> Σ-4 Δ+4 →0x21676 ←0x2150c
<POP 2153c-2153e StackAdj> Δ+4 {}
<MI 2153e MOVE.W 0x257ac,D0> {}
<MI 21544 MULU.W D5,D0> {}
<MI 21546 LEA.L (A6-0x16),A0> {}
<MI 2154a MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2154c ADD.L 0x257b4,D0> {[4, 'A0']}
<MI 21552 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<Const 0x21554 0x14.2> Δ-2 {[4, 'A0']|[4, 'D0']|[#20]}
<Call 0x21558 0x10238> {[4, 'A0']|[4, 'D0']|[#20]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 2155e-21562 StackAdj> Δ+10 {}
<MI 21562 MOVE.B #0x40,(A6-0x26)> {}
<MI 21566 CLR.B (A6-0x25)> {}
<MI 2156a CLR.B (A6-0x24)> {}
<POP 0x2156e LimitCheck 0x0 ≤ D5 ≤ 0xff> {}
<MI 21570 MOVE.B D5,(A6-0x23)> {}
<MI 21574 MOVE.B #0x0f,(A6-0x20)> {}
<MI 2157a MOVE.B D5,(A6-0x1e)> {}
<MI 2157e ORI.B #0x80,(A6-0x1d)> {}
<MI 21582 ORI.B #0x01,(A6-0x1d)> {}
<MI 21586 MOVE.W 0x257ae,D0> {}
<MI 2158c MULU.W D5,D0> {}
<MI 2158e LEA.L (A6-0x26),A0> {}
<MI 21590 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 21592 ADD.L 0x257b0,D0> {[4, 'A0']}
<MI 21598 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<Const 0x2159a 0x10.2> Δ-2 {[4, 'A0']|[4, 'D0']|[#16]}
<Call 0x2159e 0x10238> {[4, 'A0']|[4, 'D0']|[#16]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 215a4-215a8 StackAdj> Δ+10 {}
<POP 0x215a8 LimitCheck 0x0 ≤ D5 ≤ 0xffff> {}
<MI 215b0 MOVE.W D5,-(A7)> Δ-2 {[2, 'D5']}
<Call 0x215b2 0x10230> {[2, 'D5']}
KERNCALL_18
<POP 215b8-215ba StackAdj> Δ+2 {}
<MI 215ba BRA 0x21676> {}
<POP 215be-215c2 Naked> Σ0 ↓ ←0x214a4 ←0x214d4
<POP 0x215be LimitCheck 0x0 ≤ D5 ≤ 0xff> {}
<MI 215c0 MOVE.W D5,D7> {}
<POP 215c2-215e8 Naked> Σ0 ↓ →0x21620 ←0x2162e
<MI 215c2 MOVE.B #0x40,(A6-0x26)> {}
<POP 0x215c6 LimitCheck 0x0 ≤ D7 ≤ 0xff> {}
<MI 215c8 MOVE.B D7,(A6-0x23)> {}
<MI 215cc MOVE.B #0x0f,(A6-0x20)> {}
<POP 0x215d2 LimitCheck 0x0 ≤ D5 ≤ 0xff> {}
<MI 215d4 MOVE.B D5,(A6-0x1e)> {}
<MI 215d8 ANDI.B #0xfe,(A6-0x1d)> {}
<MI 215dc MOVE.L (A6+0xc),D0> {}
<MI 215e0 CMPI.L #0x00000400,D0> {}
<MI 215e6 BGT 0x21620> {}
<POP 215e8-21620 Naked> Σ0 →0x2162e
<MI 215e8 MOVE.L D0,D1> {}
<MI 215ea ADDQ.L #0x7,D1> {}
<MI 215ec MOVE.L D1,D4> {}
<MI 215ee MOVEQ.L #0x08,D3> {}
<Call 0x215f0 0x10294> {}
?divs_d3_d4
<POP 0x215f6 LimitCheck 0x0 ≤ D4 ≤ 0x80> {}
<MI 21600 MOVE.B D4,(A6-0x25)> {}
<MI 21604 CLR.L D1> {}
<MI 21606 MOVE.B D4,D1> {}
<MI 21608 ASL.W #0x3,D1> {}
<MI 2160a EXTW.L D1> {}
<MI 2160c NEG.L D0> {}
<MI 2160e ADD.L D1,D0> {}
<POP 0x21610 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 21616 MOVE.B D0,(A6-0x24)> {}
<MI 2161a ORI.B #0x80,(A6-0x1d)> {}
<MI 2161e BRA 0x2162e> {}
<POP 21620-2162e Naked> Σ0 ↓ ←0x215c2
<MI 21620 MOVE.B #0x80,(A6-0x25)> {}
<MI 21626 CLR.B (A6-0x24)> {}
<MI 2162a ANDI.B #0x7f,(A6-0x1d)> {}
<POP 2162e-21676 Naked> Σ0 ↓ →0x215c2 ←0x215e8
<MI 2162e MOVE.W 0x257ae,D0> {}
<MI 21634 MULU.W D7,D0> {}
<MI 21636 LEA.L (A6-0x26),A0> {}
<MI 21638 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2163a ADD.L 0x257b0,D0> {[4, 'A0']}
<MI 21640 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<Const 0x21642 0x10.2> Δ-2 {[4, 'A0']|[4, 'D0']|[#16]}
<Call 0x21646 0x10238> {[4, 'A0']|[4, 'D0']|[#16]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 2164c-21650 StackAdj> Δ+10 {}
<POP 0x21650 LimitCheck 0x0 ≤ D7 ≤ 0xffff> {}
<MI 21658 MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x2165a 0x10230> {[2, 'D7']}
KERNCALL_18
<POP 21660-21662 StackAdj> Δ+2 {}
<MI 21662 MOVE.W D7,D0> {}
<MI 21664 ADDQ.W #0x1,D0> {}
<POP 0x21666 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 21668 MOVE.W D0,D7> {}
<MI 2166a SUBI.L #0x00000400,(A6+0xc)> {}
<MI 21672 BGT 0x215c2> {}
<POP 21676-21678 Naked> Σ0 →0x21690 ←0x2153c
<MI 21676 BRA 0x21690> {}
<POP 21678-21690 Naked> Σ0 ↓ ←0x21400
<MI 21678 MOVEA.L (A6+0x16),A0> {}
<MI 2167c PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<MI 2167e MOVE.L (A6+0x12),-(A7)> Δ-4 {[4, '^(A0)']|[4, '(A6+0x12)']}
<MI 21682 MOVE.W (A6+0x10),-(A7)> Δ-2 {[4, '^(A0)']|[4, '(A6+0x12)']|[2, '(A6+0x10)']}
<Call 0x21686 0x10204> {[4, '^(A0)']|[4, '(A6+0x12)']|[2, '(A6+0x10)']}
KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
<POP 2168c-21690 StackAdj> Δ+10 {}
<POP 21690-21698 Epilogue> Σ0 ←0x21676
@ 21698
<LVAR 0x00a 1(rw)>
<LVAR 0x008 2(r)>
<LVAR -0x008 2(r)>
<LVAR -0x010 2(r)>
<LVAR -0x014 @ 2(r)>
<LVAR -0x016 @>
<LVAR -0x018 2(r)>
<LVAR -0x01a 2(r)>
<LVAR -0x01c 2(w)>
<LVAR -0x01e 2(w)>
<LVAR -0x020 2(r)>
<LVAR -0x022 2(w)>
<LVAR -0x024 2(r)>
<LVAR -0x026 @ 2(r)>
<POP 21698-21732 Body>
<POP 21698-216ae Prologue> Σ0 ↓
<POP 216ae-216b2 RegCacheLoad> Σ0 ↓
<POP 216b2-21712 Naked> Σ0 ↓ →0x2172a
<MI 216b2 CLR.W (A6-0x26)> {}
<MI 216b6 CLR.W (A6-0x24)> {}
<MI 216ba MOVE.W #0x3,(A6-0x22)> {}
<MI 216c0 CLR.W (A6-0x20)> {}
<MI 216c4 MOVE.W #0x4,(A6-0x1e)> {}
<MI 216ca MOVE.W (A6+0x8),D0> {}
<MI 216ce ASL.W #0x8,D0> {}
<MI 216d0 MOVE.W D0,(A6-0x1c)> {}
<MI 216d4 CLR.W (A6-0x1a)> {}
<MI 216d8 CLR.W (A6-0x18)> {}
<Pointer.fp 0x216dc <LVAR -0x026 @ 2(r)>> Δ-4 {[@@-38]}
<MI 216e0 LEA.L (A6-0x14),A0> {[@@-38]}
<MI 216e4 MOVE.L A0,-(A7)> Δ-4 {[@@-38]|[4, 'A0']}
<Const 0x216e6 0x1c.2> Δ-2 {[@@-38]|[4, 'A0']|[#28]}
<Const 0x216e8 0x0.4> Δ-4 {[@@-38]|[4, 'A0']|[#28]|[##0]}
<Const 0x216ec 0x14.4> Δ-4 {[@@-38]|[4, 'A0']|[#28]|[##0]|[##20]}
<Call 0x216f0 0x21244> {[@@-38]|[4, 'A0']|[#28]|[##0]|[##20]}
<POP 216f4-216f8 StackAdj> Δ+16 {[-2-]}
<POP 216f8-216f9 StackAdj> Δ+2 {}
<Const 0x216f9 0x1c.2> Δ-2 {[#28]}
<Pointer.fp 0x216fa <LVAR -0x016 @>> Δ-4 {[#28]|[@@-22]}
<Call 0x216fe 0x2115a> {[#28]|[@@-22]}
<POP 21702-21704 StackAdj> Δ+6 {}
<MI 21704 CLR.B (A6+0xa)> {}
<MI 21708 MOVE.W (A6-0x14),D0> {}
<MI 2170c AND.W #0x01,D0> {}
<MI 2170e CMP.W #0x01,D0> {}
<MI 21710 BNE 0x2172a> {}
<POP 21712-2171c Naked> Σ0 ↓ →0x2172a
<MI 21712 MOVE.W (A6-0x10),D0> {}
<MI 21716 ANDI.W #0x0040,D0> {}
<MI 2171a BNE 0x2172a> {}
<POP 2171c-21726 Naked> Σ0 ↓ →0x2172a
<MI 2171c MOVE.W (A6-0x8),D0> {}
<MI 21720 ANDI.W #0x0800,D0> {}
<MI 21724 BNE 0x2172a> {}
<POP 21726-2172a Naked> Σ0 ↓
<MI 21726 ADDQ.B #0x1,(A6+0xa)> {}
<POP 2172a-21732 Epilogue> Σ0 ←0x216b2 ←0x21712 ←0x2171c
@ 21732
<LVAR 0x008 2(r)>
<POP 21732-217ba Body> Δ+4
<POP 21732-21748 Prologue> Σ0 ↓
<POP 21748-2178c Naked> Σ0 ↓ →0x217a8
<MI 21748 MOVE.W #0x21c0,D0> {}
<MI 2174c MULS.W (A6+0x8),D0> {}
<MI 21750 LEA.L 0x2578e,A0> {}
<MI 21756 LEA.L (A0+D0.W),A0> {}
<MI 2175a CLR.L (A0+0x230)> {}
<MI 2175e CLR.L (A0+0x234)> {}
<MI 21762 CLR.L (A0+0x238)> {}
<MI 21766 CLR.L (A0+0x244)> {}
<MI 2176a CLR.B (A0+0x22b)> {}
<MI 2176e CLR.B (A0+0x22d)> {}
<MI 21772 MOVE.B #0x01,(A0+0x22e)> {}
<MI 21778 MOVE.L #0xa,(A0+0x24c)> {}
<MI 21780 CLR.L (A0+0x248)> {}
<MI 21784 TST.B 0x257a2> {}
<MI 2178a BEQ 0x217a8> {}
<POP 2178c-217a8 Naked> Σ0 Δ-4 →0x217ae
<MI 2178c MOVE.W (A6+0x8),D0> {}
<MI 21790 ADDI.W #0x0010,D0> {}
<MI 21794 ASL.W #0x3,D0> {}
<MI 21796 MULU.W 0x257ac,D0> {}
<MI 2179c ADD.L 0x257b4,D0> {}
<MI 217a2 MOVE.L D0,D7> {}
<MI 217a4 MOVE.L D7,-(A7)> Δ-4 {[4, 'D7']}
<MI 217a6 BRA 0x217ae> {[4, 'D7']}
<POP 217a8-217ae Naked> Σ0 Δ-4 ↓ ←0x21748
<MI 217a8 LEA.L (A0+0x3d4),A1> {}
<MI 217ac MOVE.L A1,-(A7)> Δ-4 {[4, 'A1']}
<POP 217ae-217b2 Naked> Σ-4 Δ+4 ↓ ←0x2178c
<MI 217ae MOVE.L (A7)+,(A0+0x3d0)> Δ+4 {}
<POP 217b2-217ba Epilogue> Σ0
@ 217ba
<LVAR 0x008 2(r)>
<LVAR -0x006 2(w)>
<LVAR -0x008 2(w)>
<LVAR -0x00e 2(w)>
<LVAR -0x012 @>
<POP 217ba-218fe Body> Δ+36
<POP 217ba-217d0 Prologue> Σ0 ↓
<POP 217d0-217de RegCacheLoad> Σ0 ↓
<POP 217de-21828 Naked> Σ0 ↓ →0x218cc
<MI 217de MOVE.W #0x21c0,D0> {}
<MI 217e2 MULS.W (A6+0x8),D0> {}
<MI 217e4 LEA.L 0x2578e,A0> {}
<MI 217ea LEA.L (A0+D0.W),A0> {}
<MI 217ee MOVE.W #0x3,(A6-0xe)> {}
<MI 217f4 MOVE.W (A6+0x8),D0> {}
<MI 217f6 ASL.W #0x8,D0> {}
<MI 217f8 MOVE.B (A0+0x23d4),D1> {}
<MI 217fc EXTB.W D1> {}
<MI 217fe ADD.W D1,D0> {}
<POP 0x21800 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21808 MOVE.W D0,(A6-0x8)> {}
<MI 2180c MOVE.L (A0+0x23d6),D0> {}
<POP 0x21810 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 2181a MOVE.W D0,(A6-0x6)> {}
<MI 2181e SUBQ.W #0x2,D1> {}
<MI 21820 CMPI.W #0x0019,D1> {}
<MI 21824 BHI 0x218cc> {}
<POP 21828-21832 Naked> Σ0 →0x2187c →0x2187c →0x218a6 →0x218a6 →0x21866 →0x21866 →0x21866 →0x21866 →0x21866 →0x21866 →0x21866 →0x21866 →0x21866 →0x21866 →0x218cc →0x218cc →0x21866 →0x21866 →0x21866 →0x21866 →0x21866 →0x21866 →0x218cc →0x218cc →0x218cc →0x21866
<MI 21828 ADD.W D1,D1> {}
<MI 2182a SWITCH D1.W> {}
<POP 21866-21876 Naked> Σ0 Δ-18 ↓ ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828
<Pointer.fp 0x21866 <LVAR -0x012 @>> Δ-4 {[@@-18]}
<Const 0x21868 0x0.4> Δ-4 {[@@-18]|[##0]}
<MI 2186a MOVE.W (A6+0x8),-(A7)> Δ-2 {[@@-18]|[##0]|[2, '(A6+0x8)']}
<MI 2186c ADD.W #0x10,(A7)> {[@@-18]|[##0]|[-2-]}
<Const 0x2186e 0x0.4> Δ-4 {[@@-18]|[##0]|[-2-]|[##0]}
<Const 0x21870 0x0.4> Δ-4 {[@@-18]|[##0]|[-2-]|[##0]|[##0]}
<Call 0x21872 0x21244> {[@@-18]|[##0]|[-2-]|[##0]|[##0]}
<POP 21876-2187c Naked> Σ-18 Δ+18 →0x218f6 ←0x218a0
<POP 21876-2187a StackAdj> Δ+18 {}
<MI 2187a BRA 0x218f6> {}
<POP 2187c-218a0 Naked> Σ0 Δ-18 ↓ ←0x21828 ←0x21828
<Pointer.fp 0x2187c <LVAR -0x012 @>> Δ-4 {[@@-18]}
<POP 2187e-21880 StackAdj> Δ-4 {[@@-18]|[-4-]}
<MI 21880 MOVE.B (A0+0x3d0),(A7)> {[@@-18]|[-4-]}
<MI 21884 MOVE.B (A0+0x3d1),(A7+0x1)> {[@@-18]|[-4-]}
<MI 2188a MOVE.B (A0+0x3d2),(A7+0x2)> {[@@-18]|[-4-]}
<MI 21890 MOVE.B (A0+0x3d3),(A7+0x3)> {[@@-18]|[-4-]}
<MI 21896 MOVE.W (A6+0x8),-(A7)> Δ-2 {[@@-18]|[-4-]|[2, '(A6+0x8)']}
<MI 21898 ADD.W #0x10,(A7)> {[@@-18]|[-6-]}
<Const 0x2189a 0x0.4> Δ-4 {[@@-18]|[-6-]|[##0]}
<MI 2189c MOVE.L (A0+0x23d6),-(A7)> Δ-4 {[@@-18]|[-6-]|[##0]|[4, '(A0+0x23d6)']}
<POP 218a0-218a6 Naked> Σ-18 →0x21876 ←0x218a6
<Call 0x218a0 0x213dc> {[-18-]}
<MI 218a4 BRA 0x21876> {[-18-]}
<POP 218a6-218cc Naked> Σ0 Δ-18 →0x218a0 ←0x21828 ←0x21828
<Pointer.fp 0x218a6 <LVAR -0x012 @>> Δ-4 {[@@-18]}
<POP 218a8-218aa StackAdj> Δ-4 {[@@-18]|[-4-]}
<MI 218aa MOVE.B (A0+0x3d0),(A7)> {[@@-18]|[-4-]}
<MI 218ae MOVE.B (A0+0x3d1),(A7+0x1)> {[@@-18]|[-4-]}
<MI 218b4 MOVE.B (A0+0x3d2),(A7+0x2)> {[@@-18]|[-4-]}
<MI 218ba MOVE.B (A0+0x3d3),(A7+0x3)> {[@@-18]|[-4-]}
<MI 218c0 MOVE.W (A6+0x8),-(A7)> Δ-2 {[@@-18]|[-4-]|[2, '(A6+0x8)']}
<MI 218c2 ADD.W #0x10,(A7)> {[@@-18]|[-6-]}
<MI 218c4 MOVE.L (A0+0x23d6),-(A7)> Δ-4 {[@@-18]|[-6-]|[4, '(A0+0x23d6)']}
<Const 0x218c8 0x0.4> Δ-4 {[@@-18]|[-6-]|[4, '(A0+0x23d6)']|[##0]}
<MI 218ca BRA 0x218a0> {[@@-18]|[-6-]|[4, '(A0+0x23d6)']|[##0]}
<POP 218cc-218f6 Naked> Σ0 ↓ ←0x217de ←0x21828 ←0x21828 ←0x21828 ←0x21828 ←0x21828
<Blob 0x218cc [26] @> Δ-26 {[«26""»]}
<POP 218d8-218da StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x218da 26> {[«26""»]|[$$Unsupported tape operation]}
<Call 0x218ee 0x20c42> {[«26""»]|[$$Unsupported tape operation]}
<POP 218f2-218f6 StackAdj> Δ+30 {}
<POP 218f6-218fe Epilogue> Σ0 ←0x21876
@ 218fe
<POP 218fe-219e8 Body>
<POP 218fe-21914 Prologue> Σ0 ↓
<POP 21914-2191a RegCacheLoad> Σ0 ↓
<POP 2191a-2194e Naked> Σ0 ↓
<Blob 0x2191a [14] @> Δ-14 {[«14""»]}
<POP 21926-21928 StackAdj> Δ-6 {[«14""»]|[-6-]}
<Lit 0x21928 14> {[«14""»]|[-2-]|[$$Exercise Tapes]}
<POP 21936-21938 StackAdj> Δ-2 {[«14""»]|[-2-]|[$$Exercise Tapes]|[-2-]}
<POP 21938-21939 StackAdj> Δ+2 {[«14""»]|[-2-]|[$$Exercise Tapes]}
<Const 0x21939 0x1.2> Δ-2 {[«14""»]|[-2-]|[$$Exercise Tapes]|[#1]}
<Call 0x2193a 0x103f0> {[«14""»]|[-2-]|[$$Exercise Tapes]|[#1]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 21940-21942 StackAdj> Δ+6 {[«14""»]|[-2-]}
<MI 21942 MOVE.B (A7)+,D0> Δ+2 {[«14""»]}
<MI 21944 EXTB.W D0> {[«14""»]}
<POP 0x21946 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«14""»]}
<POP 21948-2194a StackAdj> Δ+14 {}
<MI 2194a MOVE.B D0,D6> {}
<MI 2194c MOVEQ.L #0x00,D7> {}
<POP 2194e-21962 Naked> Σ0 ↓ →0x21970 ←0x219d6
<MI 2194e MOVE.W #0x21c0,D0> {}
<MI 21952 MULS.W D7,D0> {}
<MI 21954 LEA.L 0x2578e,A0> {}
<MI 2195a LEA.L (A0+D0.W),A0> {}
<MI 2195e TST.B D6> {}
<MI 21960 BEQ 0x21970> {}
<POP 21962-21970 Naked> Σ0 ↓ →0x21976
<POP 21962-21964 StackAdj> Δ-2 {[-2-]}
<MI 21964 MOVE.W D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x21966 0x21698> {[-2-]|[2, 'D7']}
<POP 2196a-2196c StackAdj> Δ+2 {[-2-]}
<MI 2196c TST.B (A7)+> Δ+2 {}
<MI 2196e BNE 0x21976> {}
<POP 21970-21976 Naked> Σ0 →0x219c8 ←0x2194e
<MI 21970 CLR.B (A0+0x22a)> {}
<MI 21974 BRA 0x219c8> {}
<POP 21976-219c8 Naked> Σ0 ↓ ←0x21962
<Blob 0x21976 [20] @> Δ-20 {[«20""»]}
<POP 21986-2198a StackAdj> Δ-10 {[«20""»]|[-10-]}
<Lit 0x2198a 19> {[«20""»]|[-6-]|[$$Exercise Tape unit_]}
<POP 2199a-2199c StackAdj> Δ-4 {[«20""»]|[-6-]|[$$Exercise Tape unit_]|[-4-]}
<MI 2199c MOVE.W D7,D0> {[«20""»]|[-6-]|[$$Exercise Tape unit_]|[-4-]}
<MI 2199e EXTW.L D0> {[«20""»]|[-6-]|[$$Exercise Tape unit_]|[-4-]}
<MI 219a0 MOVE.L D0,-(A7)> Δ-4 {[«20""»]|[-6-]|[$$Exercise Tape unit_]|[-4-]|[4, 'D0']}
<Call 0x219a2 0x102e4> {[«20""»]|[-6-]|[$$Exercise Tape unit_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 219a8-219aa StackAdj> Δ+4 {[«20""»]|[-6-]|[$$Exercise Tape unit_]|[-4-]}
<Call 0x219aa 0x102d0> {[«20""»]|[-6-]|[$$Exercise Tape unit_]|[-4-]}
StringCat2(a, b : String) : String
<POP 219b0-219b2 StackAdj> Δ+6 {[«20""»]|[-6-]|[-2-]}
<POP 219b2-219b3 StackAdj> Δ+2 {[«20""»]|[-6-]}
<Const 0x219b3 0x1.2> Δ-2 {[«20""»]|[-6-]|[#1]}
<Call 0x219b4 0x103f0> {[«20""»]|[-6-]|[#1]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 219ba-219bc StackAdj> Δ+6 {[«20""»]|[-2-]}
<MI 219bc MOVE.B (A7)+,D0> Δ+2 {[«20""»]}
<MI 219be EXTB.W D0> {[«20""»]}
<POP 0x219c0 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«20""»]}
<POP 219c2-219c4 StackAdj> Δ+20 {}
<MI 219c4 MOVE.B D0,(A0+0x22a)> {}
<POP 219c8-219ce Naked> Σ0 ↓ →0x219d6 ←0x21970
<MI 219c8 TST.B (A0+0x22a)> {}
<MI 219cc BEQ 0x219d6> {}
<POP 219ce-219d6 Naked> Σ0 ↓
<MI 219ce MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x219d0 0x21732> {[2, 'D7']}
<POP 219d4-219d6 StackAdj> Δ+2 {}
<POP 219d6-219e0 Naked> Σ0 ↓ →0x2194e ←0x219c8
<MI 219d6 ADDQ.W #0x1,D7> {}
<MI 219d8 CMPI.W #0x0003,D7> {}
<MI 219dc BLE 0x2194e> {}
<POP 219e0-219e8 Epilogue> Σ0
@ 219e8
<POP 219e8-21a40 Body>
<POP 219e8-219fe Prologue> Σ0 ↓
<POP 219fe-21a02 RegCacheLoad> Σ0 ↓
<POP 21a02-21a38 Naked> Σ0 ↓
<Blob 0x21a02 [4] @> Δ-4 {[«4""»]}
<Blob 0x21a06 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x21a0a [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 21a0e-21a10 StackAdj> Δ-6 {[«4""»]|[«4""»]|[«4""»]|[-6-]}
<Lit 0x21a10 12> {[«4""»]|[«4""»]|[«4""»]|[-2-]|[$$Exercise PAD]}
<POP 21a1e-21a20 StackAdj> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[-2-]|[$$Exercise PAD]|[-2-]}
<POP 21a20-21a21 StackAdj> Δ+2 {[«4""»]|[«4""»]|[«4""»]|[-2-]|[$$Exercise PAD]}
<Const 0x21a21 0x1.2> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[-2-]|[$$Exercise PAD]|[#1]}
<Call 0x21a22 0x103f0> {[«4""»]|[«4""»]|[«4""»]|[-2-]|[$$Exercise PAD]|[#1]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 21a28-21a2a StackAdj> Δ+6 {[«4""»]|[«4""»]|[«4""»]|[-2-]}
<MI 21a2a MOVE.B (A7)+,D0> Δ+2 {[«4""»]|[«4""»]|[«4""»]}
<MI 21a2c EXTB.W D0> {[«4""»]|[«4""»]|[«4""»]}
<POP 0x21a2e LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«4""»]|[«4""»]|[«4""»]}
<POP 21a30-21a32 StackAdj> Δ+12 {}
<MI 21a32 MOVE.B D0,0x2e518> {}
<POP 21a38-21a40 Epilogue> Σ0
@ 21a40
<POP 21a40-21c2c Body>
<POP 21a40-21a56 Prologue> Σ0 ↓
<POP 21a56-21a64 RegCacheLoad> Σ0 ↓
<POP 21a64-21a66 Naked> Σ0 ↓
<MI 21a64 MOVEQ.L #0x00,D7> {}
<POP 21a66-21a8c Naked> Σ0 ↓ →0x21c1c ←0x21c1c
<POP 0x21a66 LimitCheck 0x0 ≤ D7 ≤ 0x3> {}
<MI 21a6c MOVE.L D7,D4> {}
<MI 21a6e MOVE.L #0x21c0,D3> {}
<Call 0x21a74 0x1028c> {}
?muls_d3_d4
<MI 21a7a LEA.L 0x2578e,A0> {}
<MI 21a80 LEA.L (A0+D4.L),A0> {}
<MI 21a84 TST.B (A0+0x22a)> {}
<MI 21a88 BEQ 0x21c1c> {}
<POP 21a8c-21c1c Naked> Σ0 ↓
<Blob 0x21a8c [4] @> Δ-4 {[«4""»]}
<Blob 0x21a90 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x21a94 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x21a98 [2] @> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[«2""»]}
<POP 21a9c-21a9e StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-8-]}
<Lit 0x21a9e 12> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Tape Unit :_]}
<POP 21aac-21aae StackAdj> Δ-12 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-12-]}
<MI 21aae MOVE.L D7,-(A7)> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-12-]|[4, 'D7']}
<Call 0x21ab0 0x102e4> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-12-]|[4, 'D7']}
Long2String(a : Long) : String
<Lit 0x21ab6 2> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-12-]|[$$, ]}
<Call 0x21ac8 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-12-]|[$$, ]}
StringCat2(a, b : String) : String
<POP 21aca-21acc StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-8-]}
<Const 0x21acc 0x4.4> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-8-]|[##4]}
<Call 0x21ad0 0x102f8> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-8-]|[##4]}
LeftPad(a : String; b : Long) : String
<POP 21ad6-21ad8 StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-4-]}
<Call 0x21ad8 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21ada-21adc StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]}
<MI 21adc MOVEA.L (A7)+,A4> Δ+4 {[«4""»]|[«4""»]|[«4""»]|[«2""»]}
<POP 21ade-21adf StackAdj> Δ+14 ↓ {}
<Blob 0x21adf [10] @> Δ-10 {[«10""»]}
<POP 21aee-21af0 StackAdj> Δ-4 {[«10""»]|[-4-]}
<MI 21af0 MOVE.L A4,-(A7)> Δ-4 {[«10""»]|[-4-]|[4, 'A4']}
<POP 21af2-21af4 StackAdj> Δ-4 {[«10""»]|[-4-]|[4, 'A4']|[-4-]}
<Lit 0x21af4 9> {[«10""»]|[-4-]|[4, 'A4']|[$$Bytes =>_]}
<Call 0x21b06 0x102d0> {[«10""»]|[-4-]|[4, 'A4']|[$$Bytes =>_]}
StringCat2(a, b : String) : String
<POP 21b08-21b0a StackAdj> Δ+8 {[«10""»]|[-4-]}
<MI 21b0a MOVEA.L (A7)+,A4> Δ+4 {[«10""»]}
<POP 21b0c-21b0e StackAdj> Δ+2 {[-8-]}
<MI 21b0e MOVE.L A4,(A7)> {[-4-]|[4, 'A4']}
<POP 21b10-21b11 StackAdj> Δ-8 ↓ {[-4-]|[4, 'A4']|[-8-]}
<Blob 0x21b11 [8] (A0+0x23c)> Δ-8 {[-4-]|[4, 'A4']|[-8-]|[«8»]}
<Const 0x21b22 0xa.4> Δ-4 {[-4-]|[4, 'A4']|[-8-]|[«8»]|[##10]}
<Call 0x21b26 0x1035c> {[-4-]|[4, 'A4']|[-8-]|[«8»]|[##10]}
Quad2String(a : Quad; radix : Long ) : String
<POP 21b2c-21b2e StackAdj> Δ+12 {[-4-]|[4, 'A4']|[-8-]}
<Const 0x21b2e 0xb.4> Δ-4 {[-4-]|[4, 'A4']|[-8-]|[##11]}
<Call 0x21b32 0x102f8> {[-4-]|[4, 'A4']|[-8-]|[##11]}
LeftPad(a : String; b : Long) : String
<POP 21b38-21b3a StackAdj> Δ+8 {[-4-]|[4, 'A4']|[-4-]}
<Call 0x21b3a 0x102d0> {[-4-]|[4, 'A4']|[-4-]}
StringCat2(a, b : String) : String
<POP 21b3c-21b3e StackAdj> Δ+8 {[-4-]}
<MI 21b3e MOVEA.L (A7)+,A4> Δ+4 {}
<Blob 0x21b40 [4] @> Δ-4 {[«4""»]}
<Blob 0x21b44 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21b48-21b4a StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<MI 21b4a MOVE.L A4,-(A7)> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, 'A4']}
<POP 21b4c-21b4e StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[-4-]}
<Lit 0x21b4e 8> {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[$$soft =>_]}
<Call 0x21b5e 0x102d0> {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[$$soft =>_]}
StringCat2(a, b : String) : String
<POP 21b60-21b62 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<MI 21b62 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]|[«4""»]}
<MI 21b64 MOVE.L A4,(A7)> {[«4""»]|[4, 'A4']}
<POP 21b66-21b68 StackAdj> Δ-8 {[«4""»]|[4, 'A4']|[-8-]}
<MI 21b68 MOVE.L (A0+0x234),-(A7)> Δ-4 {[«4""»]|[4, 'A4']|[-8-]|[4, '(A0+0x234)']}
<Call 0x21b6c 0x102e4> {[«4""»]|[4, 'A4']|[-8-]|[4, '(A0+0x234)']}
Long2String(a : Long) : String
<POP 21b72-21b74 StackAdj> Δ+4 {[«4""»]|[4, 'A4']|[-8-]}
<Const 0x21b74 0x5.4> Δ-4 {[«4""»]|[4, 'A4']|[-8-]|[##5]}
<Call 0x21b78 0x102f8> {[«4""»]|[4, 'A4']|[-8-]|[##5]}
LeftPad(a : String; b : Long) : String
<POP 21b7e-21b80 StackAdj> Δ+8 {[«4""»]|[4, 'A4']|[-4-]}
<Call 0x21b80 0x102d0> {[«4""»]|[4, 'A4']|[-4-]}
StringCat2(a, b : String) : String
<POP 21b82-21b84 StackAdj> Δ+8 {[«4""»]}
<MI 21b84 MOVEA.L (A7)+,A4> Δ+4 {}
<Blob 0x21b86 [4] @> Δ-4 {[«4""»]}
<Blob 0x21b8a [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21b8e-21b90 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<MI 21b90 MOVE.L A4,-(A7)> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, 'A4']}
<POP 21b92-21b94 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[-4-]}
<Lit 0x21b94 8> {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[$$hard =>_]}
<Call 0x21ba4 0x102d0> {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[$$hard =>_]}
StringCat2(a, b : String) : String
<POP 21ba6-21ba8 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<MI 21ba8 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]|[«4""»]}
<MI 21baa MOVE.L A4,(A7)> {[«4""»]|[4, 'A4']}
<POP 21bac-21bae StackAdj> Δ-8 {[«4""»]|[4, 'A4']|[-8-]}
<MI 21bae MOVE.L (A0+0x230),-(A7)> Δ-4 {[«4""»]|[4, 'A4']|[-8-]|[4, '(A0+0x230)']}
<Call 0x21bb2 0x102e4> {[«4""»]|[4, 'A4']|[-8-]|[4, '(A0+0x230)']}
Long2String(a : Long) : String
<POP 21bb8-21bba StackAdj> Δ+4 {[«4""»]|[4, 'A4']|[-8-]}
<Const 0x21bba 0x5.4> Δ-4 {[«4""»]|[4, 'A4']|[-8-]|[##5]}
<Call 0x21bbe 0x102f8> {[«4""»]|[4, 'A4']|[-8-]|[##5]}
LeftPad(a : String; b : Long) : String
<POP 21bc4-21bc6 StackAdj> Δ+8 {[«4""»]|[4, 'A4']|[-4-]}
<Call 0x21bc6 0x102d0> {[«4""»]|[4, 'A4']|[-4-]}
StringCat2(a, b : String) : String
<POP 21bc8-21bca StackAdj> Δ+8 {[«4""»]}
<MI 21bca MOVEA.L (A7)+,A4> Δ+4 {}
<Blob 0x21bcc [4] @> Δ-4 {[«4""»]}
<Blob 0x21bd0 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21bd4-21bd6 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<MI 21bd6 MOVE.L A4,-(A7)> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, 'A4']}
<POP 21bd8-21bda StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[-4-]}
<Lit 0x21bda 8> {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[$$data =>_]}
<Call 0x21bea 0x102d0> {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[$$data =>_]}
StringCat2(a, b : String) : String
<POP 21bec-21bee StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<MI 21bee MOVEA.L (A7)+,A4> Δ+4 {[«4""»]|[«4""»]}
<MI 21bf0 MOVE.L A4,(A7)> {[«4""»]|[4, 'A4']}
<POP 21bf2-21bf4 StackAdj> Δ-8 {[«4""»]|[4, 'A4']|[-8-]}
<MI 21bf4 MOVE.L (A0+0x238),-(A7)> Δ-4 {[«4""»]|[4, 'A4']|[-8-]|[4, '(A0+0x238)']}
<Call 0x21bf8 0x102e4> {[«4""»]|[4, 'A4']|[-8-]|[4, '(A0+0x238)']}
Long2String(a : Long) : String
<POP 21bfe-21c00 StackAdj> Δ+4 {[«4""»]|[4, 'A4']|[-8-]}
<Const 0x21c00 0x5.4> Δ-4 {[«4""»]|[4, 'A4']|[-8-]|[##5]}
<Call 0x21c04 0x102f8> {[«4""»]|[4, 'A4']|[-8-]|[##5]}
LeftPad(a : String; b : Long) : String
<POP 21c0a-21c0c StackAdj> Δ+8 {[«4""»]|[4, 'A4']|[-4-]}
<Call 0x21c0c 0x102d0> {[«4""»]|[4, 'A4']|[-4-]}
StringCat2(a, b : String) : String
<POP 21c0e-21c10 StackAdj> Δ+8 {[«4""»]}
<MI 21c10 MOVEA.L (A7)+,A4> Δ+4 {}
<MI 21c12 MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']}
<Call 0x21c14 0x103e0> {[4, 'A4']}
WriteConsoleStringCrLf(str : String)
<POP 21c1a-21c1c StackAdj> Δ+4 {}
<POP 21c1c-21c24 Naked> Σ0 ↓ →0x21a66 ←0x21a66
<MI 21c1c ADDQ.L #0x1,D7> {}
<MI 21c1e CMP.L #0x03,D7> {}
<MI 21c20 BLE 0x21a66> {}
<POP 21c24-21c2c Epilogue> Σ0
@ 21c2c
<LVAR 0x008 4(r)>
<POP 21c2c-21cbc Body>
<POP 21c2c-21c42 Prologue> Σ0 ↓
<POP 21c42-21c4a RegCacheLoad> Σ0 ↓
<POP 21c4a-21c50 Naked> Σ0 ↓ →0x21c62
<MI 21c4a MOVEA.L (A4+0x8),A0> {}
<MI 21c4c TST.W (A0)> {}
<MI 21c4e BNE 0x21c62> {}
<POP 21c50-21c62 Naked> Σ0 →0x21cb4
<POP 21c50-21c52 StackAdj> Δ-4 {[-4-]}
<MI 21c52 MOVE.L (A4+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A4+0x8)']}
<MI 21c54 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A4+0x8)']|[4, '(A6+0x8)']}
<Call 0x21c56 0x102d0> {[-4-]|[4, '(A4+0x8)']|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 21c5c-21c5e StackAdj> Δ+8 {[-4-]}
<MI 21c5e MOVE.L (A7)+,(A4+0x8)> Δ+4 {}
<MI 21c60 BRA 0x21cb4> {}
<POP 21c62-21c78 Naked> Σ0 ↓ →0x21ca8 ←0x21c4a
<MI 21c62 MOVE.W (A0),D0> {}
<MI 21c64 EXTW.L D0> {}
<MI 21c66 ADDQ.L #0x2,D0> {}
<MI 21c68 MOVEA.L (A6+0x8),A0> {}
<MI 21c6a MOVE.W (A0),D1> {}
<MI 21c6c EXTW.L D1> {}
<MI 21c6e ADD.L D0,D1> {}
<MI 21c70 CMPI.L #0x00000050,D1> {}
<MI 21c76 BGT 0x21ca8> {}
<POP 21c78-21ca8 Naked> Σ0 →0x21cb4
<Blob 0x21c78 [2] @> Δ-2 {[«2""»]}
<POP 21c7c-21c7e StackAdj> Δ-4 {[«2""»]|[-4-]}
<MI 21c7e MOVE.L (A4+0x8),-(A7)> Δ-4 {[«2""»]|[-4-]|[4, '(A4+0x8)']}
<POP 21c80-21c82 StackAdj> Δ-4 {[«2""»]|[-4-]|[4, '(A4+0x8)']|[-4-]}
<Lit 0x21c82 2> {[«2""»]|[-4-]|[4, '(A4+0x8)']|[$$,_]}
<POP 21c94-21c96 StackAdj> Δ-4 {[«2""»]|[-4-]|[4, '(A4+0x8)']|[$$,_]|[-4-]}
<MI 21c96 MOVE.L (A6+0x8),(A7)> {[«2""»]|[-4-]|[4, '(A4+0x8)']|[$$,_]|[4, '(A6+0x8)']}
<Call 0x21c98 0x102d4> {[«2""»]|[-4-]|[4, '(A4+0x8)']|[$$,_]|[4, '(A6+0x8)']}
StringCat3(a, b, c : String) : String
<POP 21c9e-21ca2 StackAdj> Δ+12 {[«2""»]|[-4-]}
<MI 21ca2 MOVE.L (A7)+,(A4+0x8)> Δ+4 {[«2""»]}
<POP 21ca4-21ca6 StackAdj> Δ+2 {}
<MI 21ca6 BRA 0x21cb4> {}
<POP 21ca8-21cb4 Naked> Σ0 ↓ ←0x21c62
<MI 21ca8 MOVE.L (A4+0x8),-(A7)> Δ-4 {[4, '(A4+0x8)']}
<Call 0x21caa 0x103e0> {[4, '(A4+0x8)']}
WriteConsoleStringCrLf(str : String)
<POP 21cb0-21cb2 StackAdj> Δ+4 {}
<MI 21cb2 MOVE.L (A6+0x8),(A4+0x8)> {}
<POP 21cb4-21cbc Epilogue> Σ0 ←0x21c50 ←0x21c78
@ 21cbc
<LVAR 0x00a 4(r)>
<LVAR 0x008 2(r)>
<LVAR -0x006 @ 4(r)>
<LVAR -0x00e @ 4(r)>
<POP 21cbc-22a6c Body>
<POP 21cbc-21cd2 Prologue> Σ0 ↓
<POP 21cd2-21ce4 RegCacheLoad> Σ0 ↓
<POP 21ce4-21dca Naked> Σ0 Δ-4 ↓
<Pointer.fp 0x21ce4 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x21ce8 0x102b8> {[@@-6]}
NewString(VAR a : String)
<POP 21cee-21cf0 StackAdj> Δ+4 {}
<Pointer.fp 0x21cf0 <LVAR -0x00e @ 4(r)>> Δ-4 {[@@-14]}
<Call 0x21cf4 0x10304> {[@@-14]}
GetRtc() : TimeStamp
<POP 21cfa-21cfc StackAdj> Δ+4 {}
<MI 21cfc MOVE.W #0x21c0,D0> {}
<MI 21d00 MULS.W (A6+0x8),D0> {}
<MI 21d04 LEA.L 0x2578e,A0> {}
<MI 21d0a LEA.L (A0+D0.W),A0> {}
<MI 21d0e MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Blob 0x21d10 [4] @> Δ-4 {[4, 'A0']|[«4""»]}
<Blob 0x21d14 [4] @> Δ-4 {[4, 'A0']|[«4""»]|[«4""»]}
<Blob 0x21d18 [4] @> Δ-4 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]}
<Blob 0x21d1c [2] @> Δ-2 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]}
<Blob 0x21d20 [2] @> Δ-2 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]}
<POP 21d24-21d26 StackAdj> Δ-8 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-8-]}
<Lit 0x21d26 12> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]}
<POP 21d30-21d32 StackAdj> Δ-12 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-12-]}
<MI 21d32 MOVE.W (A6+0x8),D0> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-12-]}
<MI 21d36 EXTW.L D0> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-12-]}
<MI 21d38 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-12-]|[4, 'D0']}
<Call 0x21d3a 0x102e4> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-12-]|[4, 'D0']}
Long2String(a : Long) : String
<Lit 0x21d40 2> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-12-]|[$$, ]}
<Call 0x21d4e 0x102d0> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-12-]|[$$, ]}
StringCat2(a, b : String) : String
<POP 21d54-21d56 StackAdj> Δ+8 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-8-]}
<Const 0x21d56 0x4.4> Δ-4 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-8-]|[##4]}
<Call 0x21d5a 0x102f8> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-8-]|[##4]}
LeftPad(a : String; b : Long) : String
<MI 21d60 MOVE.L (A6-0xe),(A7)> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-8-]|[4, '(A6-0xe)']}
<Call 0x21d64 0x10308> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-8-]|[4, '(A6-0xe)']}
TimeToText()
<Lit 0x21d6a 2> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-8-]|[$$,_]}
<Call 0x21d78 0x102d8> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Tape Unit :_]|[-8-]|[$$,_]}
StringCat4(a, b, c, d : String) : String
<POP 21d7e-21d80 StackAdj> Δ+16 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]}
<Call 0x21d80 0x103d8> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21d86-21d88 StackAdj> Δ+16 {[4, 'A0']|[«4""»]}
<MI 21d88 MOVE.L (A6+0xa),(A7)> {[4, 'A0']|[4, '(A6+0xa)']}
<Call 0x21d8c 0x103d8> {[4, 'A0']|[4, '(A6+0xa)']}
WriteConsoleString(str : String)
<POP 21d92-21d94 StackAdj> Δ+4 {[4, 'A0']}
<Blob 0x21d94 [18] @> Δ-18 {[4, 'A0']|[«18""»]}
<POP 21da0-21da2 StackAdj> Δ-8 {[4, 'A0']|[«18""»]|[-8-]}
<Lit 0x21da2 18> {[4, 'A0']|[«18""»]|[-4-]|[$$ error, retries =>]}
<MI 21dac MOVE.L (A0+0x244),(A7)> {[4, 'A0']|[«18""»]|[-4-]|[4, '(A0+0x244)']}
<POP 21daa-21dac StackAdj> Δ-8 {[4, 'A0']|[«18""»]|[-4-]|[4, '(A0+0x244)']|[-8-]}
<Call 0x21db0 0x102e4> {[4, 'A0']|[«18""»]|[-4-]|[4, '(A0+0x244)']|[-8-]}
Long2String(a : Long) : String
<POP 21db6-21db8 StackAdj> Δ+4 {[4, 'A0']|[«18""»]|[-4-]|[4, '(A0+0x244)']|[-4-]}
<Call 0x21db8 0x102d0> {[4, 'A0']|[«18""»]|[-4-]|[4, '(A0+0x244)']|[-4-]}
StringCat2(a, b : String) : String
<POP 21dbe-21dc0 StackAdj> Δ+8 {[4, 'A0']|[«18""»]|[-4-]}
<Call 0x21dc0 0x103e0> {[4, 'A0']|[«18""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21dc6-21dc8 StackAdj> Δ+22 {[4, 'A0']}
<MI 21dc8 MOVEQ.L #0x00,D7> {[4, 'A0']}
<POP 21dca-21e2e Naked> Σ-4 ↓ →0x21dca ←0x21dca
<POP 0x21dca LimitCheck 0x0 ≤ D7 ≤ 0x7> {[-4-]}
<MI 21dd4 MOVE.L D7,D0> {[-4-]}
<MI 21dd6 ASL.L #0x2,D0> {[-4-]}
<MI 21dd8 LEA.L 0x20bf4,A0> {[-4-]}
<MI 21ddc MOVE.L (A0+D0.L),-(A7)> Δ-4 {[-4-]|[4, '(A0+D0.L)']}
<POP 21de0-21de2 StackAdj> Δ-8 {[-4-]|[4, '(A0+D0.L)']|[-8-]}
<Lit 0x21de2> {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]}
<Pointer.sp 0x21de2 8> Δ-4
<Const 0x21de6 0x1.2> Δ-2
<Const 0x21de8 0x4.2> Δ-2
<Call 0x21dec 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21dee-21df0 StackAdj> Δ+8
<POP 21dee-21df0 StackAdj> Δ-4 {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]|[-4-]}
<MI 21df0 MOVE.L D7,D0> {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]|[-4-]}
<MI 21df2 ASL.L #0x1,D0> {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]|[-4-]}
<MI 21df4 MOVEA.L (A7+0x10),A0> {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]|[-4-]}
<MI 21df8 LEA.L (A0+0x22a),A0> {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]|[-4-]}
<MI 21dfc LEA.L (A0+D0.L),A0> {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]|[-4-]}
<MI 21e00 CLR.L D0> {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]|[-4-]}
<MI 21e02 MOVE.W (A0+0x21b0),D0> {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]|[-4-]}
<MI 21e06 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]|[-4-]|[4, 'D0']}
<Const 0x21e08 0x4.4> Δ-4 {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]|[-4-]|[4, 'D0']|[##4]}
<Call 0x21e0c 0x102e8> {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]|[-4-]|[4, 'D0']|[##4]}
Long2HexString(val : Long; ndig : Long) : String
<POP 21e12-21e14 StackAdj> Δ+8 {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]|[-4-]}
<Call 0x21e14 0x102d0> {[-4-]|[4, '(A0+D0.L)']|[-4-]|[$$…]|[-4-]}
StringCat2(a, b : String) : String
<POP 21e1a-21e1c StackAdj> Δ+8 {[-4-]|[4, '(A0+D0.L)']|[-4-]}
<Call 0x21e1c 0x103d8> {[-4-]|[4, '(A0+D0.L)']|[-4-]}
WriteConsoleString(str : String)
<POP 21e22-21e24 StackAdj> Δ+8 {[-4-]}
<MI 21e24 ADDQ.L #0x1,D7> {[-4-]}
<MI 21e26 CMPI.L #0x00000007,D7> {[-4-]}
<MI 21e2c BLE 0x21dca> {[-4-]}
<POP 21e2e-21e40 Naked> Σ-4 ↓ →0x21e6a
<Call 0x21e2e 0x103dc> {[-4-]}
WriteConsoleCrLf(void)
<MI 21e34 MOVEA.L (A7),A0> {[-4-]}
<MI 21e36 MOVE.W (A0+0x23da),D0> {[-4-]}
<MI 21e3a ANDI.W #0x8000,D0> {[-4-]}
<MI 21e3e BEQ 0x21e6a> {[-4-]}
<POP 21e40-21e6a Naked> Σ-4 ↓
<Blob 0x21e40 [18] @> Δ-18 {[-4-]|[«18""»]}
<POP 21e50-21e52 StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]}
<Lit 0x21e52 17> {[-4-]|[«18""»]|[$$Special condition]}
<MI 21e60 LEA.L (A6-0xe),A4> {[-4-]|[«18""»]|[$$Special condition]}
<Call 0x21e64 0x21c2c> {[-4-]|[«18""»]|[$$Special condition]}
<POP 21e68-21e6a StackAdj> Δ+22 {[-4-]}
<POP 21e6a-21e74 Naked> Σ-4 ↓ →0x21ea0 ←0x21e2e
<MI 21e6a MOVE.W (A0+0x23da),D0> {[-4-]}
<MI 21e6e ANDI.W #0x4000,D0> {[-4-]}
<MI 21e72 BEQ 0x21ea0> {[-4-]}
<POP 21e74-21ea0 Naked> Σ-4 ↓
<Blob 0x21e74 [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 21e84-21e86 StackAdj> Δ-4 {[-4-]|[«20""»]|[-4-]}
<Lit 0x21e86 19> {[-4-]|[«20""»]|[$$UNIBUS parity error]}
<MI 21e94 LEA.L (A6-0xe),A4> {[-4-]|[«20""»]|[$$UNIBUS parity error]}
<Call 0x21e98 0x21c2c> {[-4-]|[«20""»]|[$$UNIBUS parity error]}
<POP 21e9c-21ea0 StackAdj> Δ+24 {[-4-]}
<POP 21ea0-21eaa Naked> Σ-4 ↓ →0x21ed8 ←0x21e6a
<MI 21ea0 MOVE.W (A0+0x23da),D0> {[-4-]}
<MI 21ea4 ANDI.W #0x1000,D0> {[-4-]}
<MI 21ea8 BEQ 0x21ed8> {[-4-]}
<POP 21eaa-21ed8 Naked> Σ-4 ↓
<Blob 0x21eaa [30] @> Δ-30 {[-4-]|[«30""»]}
<POP 21ebc-21ebe StackAdj> Δ-4 {[-4-]|[«30""»]|[-4-]}
<Lit 0x21ebe 29> {[-4-]|[«30""»]|[$$Register modification refused]}
<MI 21ecc LEA.L (A6-0xe),A4> {[-4-]|[«30""»]|[$$Register modification refused]}
<Call 0x21ed0 0x21c2c> {[-4-]|[«30""»]|[$$Register modification refused]}
<POP 21ed4-21ed8 StackAdj> Δ+34 {[-4-]}
<POP 21ed8-21ee2 Naked> Σ-4 ↓ →0x21f0e ←0x21ea0
<MI 21ed8 MOVE.W (A0+0x23da),D0> {[-4-]}
<MI 21edc ANDI.W #0x0800,D0> {[-4-]}
<MI 21ee0 BEQ 0x21f0e> {[-4-]}
<POP 21ee2-21f0e Naked> Σ-4 ↓
<Blob 0x21ee2 [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 21ef2-21ef4 StackAdj> Δ-4 {[-4-]|[«20""»]|[-4-]}
<Lit 0x21ef4 19> {[-4-]|[«20""»]|[$$Non-existant memory]}
<MI 21f02 LEA.L (A6-0xe),A4> {[-4-]|[«20""»]|[$$Non-existant memory]}
<Call 0x21f06 0x21c2c> {[-4-]|[«20""»]|[$$Non-existant memory]}
<POP 21f0a-21f0e StackAdj> Δ+24 {[-4-]}
<POP 21f0e-21f18 Naked> Σ-4 ↓ →0x21f44 ←0x21ed8
<MI 21f0e MOVE.W (A0+0x23da),D0> {[-4-]}
<MI 21f12 ANDI.W #0x0400,D0> {[-4-]}
<MI 21f16 BEQ 0x21f44> {[-4-]}
<POP 21f18-21f44 Naked> Σ-4 ↓
<Blob 0x21f18 [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 21f28-21f2a StackAdj> Δ-4 {[-4-]|[«20""»]|[-4-]}
<Lit 0x21f2a 19> {[-4-]|[«20""»]|[$$Need buffer address]}
<MI 21f38 LEA.L (A6-0xe),A4> {[-4-]|[«20""»]|[$$Need buffer address]}
<Call 0x21f3c 0x21c2c> {[-4-]|[«20""»]|[$$Need buffer address]}
<POP 21f40-21f44 StackAdj> Δ+24 {[-4-]}
<POP 21f44-21f4e Naked> Σ-4 ↓ →0x21f7a ←0x21f0e
<MI 21f44 MOVE.W (A0+0x23da),D0> {[-4-]}
<MI 21f48 ANDI.W #0x0080,D0> {[-4-]}
<MI 21f4c BNE 0x21f7a> {[-4-]}
<POP 21f4e-21f7a Naked> Σ-4 ↓
<Blob 0x21f4e [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 21f5e-21f60 StackAdj> Δ-4 {[-4-]|[«20""»]|[-4-]}
<Lit 0x21f60 19> {[-4-]|[«20""»]|[$$Subsystem not ready]}
<MI 21f6e LEA.L (A6-0xe),A4> {[-4-]|[«20""»]|[$$Subsystem not ready]}
<Call 0x21f72 0x21c2c> {[-4-]|[«20""»]|[$$Subsystem not ready]}
<POP 21f76-21f7a StackAdj> Δ+24 {[-4-]}
<POP 21f7a-21f84 Naked> Σ-4 ↓ →0x21fa6 ←0x21f44
<MI 21f7a MOVE.W (A0+0x23da),D0> {[-4-]}
<MI 21f7e ANDI.W #0x0040,D0> {[-4-]}
<MI 21f82 BEQ 0x21fa6> {[-4-]}
<POP 21f84-21fa6 Naked> Σ-4 ↓
<Blob 0x21f84 [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x21f88 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<POP 21f8c-21f8e StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x21f8e 8> {[-4-]|[«4""»]|[«4""»]|[$$Off-line]}
<MI 21f9c LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[$$Off-line]}
<Call 0x21fa0 0x21c2c> {[-4-]|[«4""»]|[«4""»]|[$$Off-line]}
<POP 21fa4-21fa6 StackAdj> Δ+12 {[-4-]}
<POP 21fa6-21fb0 Naked> Σ-4 ↓ →0x22628 ←0x21f7a
<MI 21fa6 MOVE.W (A0+0x23da),D0> {[-4-]}
<MI 21faa AND.W #0x01,D0> {[-4-]}
<MI 21fac BEQ 0x22628> {[-4-]}
<POP 21fb0-21fba Naked> Σ-4 ↓ →0x21fdc
<MI 21fb0 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 21fb4 ANDI.W #0x8000,D0> {[-4-]}
<MI 21fb8 BEQ 0x21fdc> {[-4-]}
<POP 21fba-21fdc Naked> Σ-4 ↓
<Blob 0x21fba [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x21fbe [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<POP 21fc2-21fc4 StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x21fc4 8> {[-4-]|[«4""»]|[«4""»]|[$$Filemark]}
<MI 21fd2 LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[$$Filemark]}
<Call 0x21fd6 0x21c2c> {[-4-]|[«4""»]|[«4""»]|[$$Filemark]}
<POP 21fda-21fdc StackAdj> Δ+12 {[-4-]}
<POP 21fdc-21fe6 Naked> Σ-4 ↓ →0x22012 ←0x21fb0
<MI 21fdc MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 21fe0 ANDI.W #0x4000,D0> {[-4-]}
<MI 21fe4 BEQ 0x22012> {[-4-]}
<POP 21fe6-22012 Naked> Σ-4 ↓
<Blob 0x21fe6 [14] @> Δ-14 {[-4-]|[«14""»]}
<POP 21ff8-21ffa StackAdj> Δ-4 {[-4-]|[«14""»]|[-4-]}
<Lit 0x21ffa 13> {[-4-]|[«14""»]|[$$End of medium]}
<MI 22008 LEA.L (A6-0xe),A4> {[-4-]|[«14""»]|[$$End of medium]}
<Call 0x2200c 0x21c2c> {[-4-]|[«14""»]|[$$End of medium]}
<POP 22010-22012 StackAdj> Δ+18 {[-4-]}
<POP 22012-2201c Naked> Σ-4 ↓ →0x22044 ←0x21fdc
<MI 22012 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 22016 ANDI.W #0x2000,D0> {[-4-]}
<MI 2201a BEQ 0x22044> {[-4-]}
<POP 2201c-22044 Naked> Σ-4 ↓
<Blob 0x2201c [26] @> Δ-26 {[-4-]|[«26""»]}
<POP 22028-2202a StackAdj> Δ-4 {[-4-]|[«26""»]|[-4-]}
<Lit 0x2202a 26> {[-4-]|[«26""»]|[$$Incorrect length indicator]}
<MI 22038 LEA.L (A6-0xe),A4> {[-4-]|[«26""»]|[$$Incorrect length indicator]}
<Call 0x2203c 0x21c2c> {[-4-]|[«26""»]|[$$Incorrect length indicator]}
<POP 22040-22044 StackAdj> Δ+30 {[-4-]}
<POP 22044-22052 Naked> Σ-4 ↓ →0x22080 ←0x22012
<MI 22044 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 22048 ANDI.W #0x0f00,D0> {[-4-]}
<MI 2204c CMPI.W #0x0200,D0> {[-4-]}
<MI 22050 BNE 0x22080> {[-4-]}
<POP 22052-22080 Naked> Σ-4 ↓
<Blob 0x22052 [10] @> Δ-10 {[-4-]|[«10""»]}
<POP 22064-22066 StackAdj> Δ-4 {[-4-]|[«10""»]|[-4-]}
<Lit 0x22066 9> {[-4-]|[«10""»]|[$$Not ready]}
<MI 22074 LEA.L (A6-0xe),A4> {[-4-]|[«10""»]|[$$Not ready]}
<Call 0x22078 0x21c2c> {[-4-]|[«10""»]|[$$Not ready]}
<POP 2207c-22080 StackAdj> Δ+14 {[-4-]}
<POP 22080-2208e Naked> Σ-4 ↓ →0x220b2 ←0x22044
<MI 22080 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 22084 ANDI.W #0x0f00,D0> {[-4-]}
<MI 22088 CMPI.W #0x0300,D0> {[-4-]}
<MI 2208c BNE 0x220b2> {[-4-]}
<POP 2208e-220b2 Naked> Σ-4 ↓
<Blob 0x2208e [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x22092 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x22096 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<POP 2209a-2209c StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x2209c 12> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Medium error]}
<MI 220a8 LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Medium error]}
<Call 0x220ac 0x21c2c> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Medium error]}
<POP 220b0-220b2 StackAdj> Δ+16 {[-4-]}
<POP 220b2-220c0 Naked> Σ-4 ↓ →0x220e6 ←0x22080
<MI 220b2 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 220b6 ANDI.W #0x0f00,D0> {[-4-]}
<MI 220ba CMPI.W #0x0400,D0> {[-4-]}
<MI 220be BNE 0x220e6> {[-4-]}
<POP 220c0-220e6 Naked> Σ-4 ↓
<Blob 0x220c0 [14] @> Δ-14 {[-4-]|[«14""»]}
<POP 220cc-220ce StackAdj> Δ-4 {[-4-]|[«14""»]|[-4-]}
<Lit 0x220ce 14> {[-4-]|[«14""»]|[$$Hardware error]}
<MI 220dc LEA.L (A6-0xe),A4> {[-4-]|[«14""»]|[$$Hardware error]}
<Call 0x220e0 0x21c2c> {[-4-]|[«14""»]|[$$Hardware error]}
<POP 220e4-220e6 StackAdj> Δ+18 {[-4-]}
<POP 220e6-220f4 Naked> Σ-4 ↓ →0x2211e ←0x220b2
<MI 220e6 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 220ea ANDI.W #0x0f00,D0> {[-4-]}
<MI 220ee CMPI.W #0x0500,D0> {[-4-]}
<MI 220f2 BNE 0x2211e> {[-4-]}
<POP 220f4-2211e Naked> Σ-4 ↓
<Blob 0x220f4 [16] @> Δ-16 {[-4-]|[«16""»]}
<POP 22104-22106 StackAdj> Δ-4 {[-4-]|[«16""»]|[-4-]}
<Lit 0x22106 15> {[-4-]|[«16""»]|[$$Illegal request]}
<MI 22114 LEA.L (A6-0xe),A4> {[-4-]|[«16""»]|[$$Illegal request]}
<Call 0x22118 0x21c2c> {[-4-]|[«16""»]|[$$Illegal request]}
<POP 2211c-2211e StackAdj> Δ+20 {[-4-]}
<POP 2211e-2212c Naked> Σ-4 ↓ →0x22152 ←0x220e6
<MI 2211e MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 22122 ANDI.W #0x0f00,D0> {[-4-]}
<MI 22126 CMPI.W #0x0600,D0> {[-4-]}
<MI 2212a BNE 0x22152> {[-4-]}
<POP 2212c-22152 Naked> Σ-4 ↓
<Blob 0x2212c [14] @> Δ-14 {[-4-]|[«14""»]}
<POP 22138-2213a StackAdj> Δ-4 {[-4-]|[«14""»]|[-4-]}
<Lit 0x2213a 14> {[-4-]|[«14""»]|[$$Unit attention]}
<MI 22148 LEA.L (A6-0xe),A4> {[-4-]|[«14""»]|[$$Unit attention]}
<Call 0x2214c 0x21c2c> {[-4-]|[«14""»]|[$$Unit attention]}
<POP 22150-22152 StackAdj> Δ+18 {[-4-]}
<POP 22152-22160 Naked> Σ-4 ↓ →0x22184 ←0x2211e
<MI 22152 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 22156 ANDI.W #0x0f00,D0> {[-4-]}
<MI 2215a CMPI.W #0x0700,D0> {[-4-]}
<MI 2215e BNE 0x22184> {[-4-]}
<POP 22160-22184 Naked> Σ-4 ↓
<Blob 0x22160 [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x22164 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x22168 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<POP 2216c-2216e StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x2216e 12> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Data protect]}
<MI 2217a LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Data protect]}
<Call 0x2217e 0x21c2c> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Data protect]}
<POP 22182-22184 StackAdj> Δ+16 {[-4-]}
<POP 22184-22192 Naked> Σ-4 ↓ →0x221bc ←0x22152
<MI 22184 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 22188 ANDI.W #0x0f00,D0> {[-4-]}
<MI 2218c CMPI.W #0x0800,D0> {[-4-]}
<MI 22190 BNE 0x221bc> {[-4-]}
<POP 22192-221bc Naked> Σ-4 ↓
<Blob 0x22192 [12] @> Δ-12 {[-4-]|[«12""»]}
<POP 221a2-221a4 StackAdj> Δ-4 {[-4-]|[«12""»]|[-4-]}
<Lit 0x221a4 11> {[-4-]|[«12""»]|[$$Blank check]}
<MI 221b2 LEA.L (A6-0xe),A4> {[-4-]|[«12""»]|[$$Blank check]}
<Call 0x221b6 0x21c2c> {[-4-]|[«12""»]|[$$Blank check]}
<POP 221ba-221bc StackAdj> Δ+16 {[-4-]}
<POP 221bc-221ca Naked> Σ-4 ↓ →0x221f4 ←0x22184
<MI 221bc MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 221c0 ANDI.W #0x0f00,D0> {[-4-]}
<MI 221c4 CMPI.W #0x0900,D0> {[-4-]}
<MI 221c8 BNE 0x221f4> {[-4-]}
<POP 221ca-221f4 Naked> Σ-4 ↓
<Blob 0x221ca [8] @> Δ-8 {[-4-]|[«8""»]}
<POP 221da-221dc StackAdj> Δ-4 {[-4-]|[«8""»]|[-4-]}
<Lit 0x221dc 7> {[-4-]|[«8""»]|[$$Exabyte]}
<MI 221ea LEA.L (A6-0xe),A4> {[-4-]|[«8""»]|[$$Exabyte]}
<Call 0x221ee 0x21c2c> {[-4-]|[«8""»]|[$$Exabyte]}
<POP 221f2-221f4 StackAdj> Δ+12 {[-4-]}
<POP 221f4-22202 Naked> Σ-4 ↓ →0x22226 ←0x221bc
<MI 221f4 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 221f8 ANDI.W #0x0f00,D0> {[-4-]}
<MI 221fc CMPI.W #0x0a00,D0> {[-4-]}
<MI 22200 BNE 0x22226> {[-4-]}
<POP 22202-22226 Naked> Σ-4 ↓
<Blob 0x22202 [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x22206 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x2220a [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<POP 2220e-22210 StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x22210 12> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Copy aborted]}
<MI 2221c LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Copy aborted]}
<Call 0x22220 0x21c2c> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Copy aborted]}
<POP 22224-22226 StackAdj> Δ+16 {[-4-]}
<POP 22226-22234 Naked> Σ-4 ↓ →0x2225e ←0x221f4
<MI 22226 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 2222a ANDI.W #0x0f00,D0> {[-4-]}
<MI 2222e CMPI.W #0x0b00,D0> {[-4-]}
<MI 22232 BNE 0x2225e> {[-4-]}
<POP 22234-2225e Naked> Σ-4 ↓
<Blob 0x22234 [16] @> Δ-16 {[-4-]|[«16""»]}
<POP 22244-22246 StackAdj> Δ-4 {[-4-]|[«16""»]|[-4-]}
<Lit 0x22246 15> {[-4-]|[«16""»]|[$$Aborted command]}
<MI 22254 LEA.L (A6-0xe),A4> {[-4-]|[«16""»]|[$$Aborted command]}
<Call 0x22258 0x21c2c> {[-4-]|[«16""»]|[$$Aborted command]}
<POP 2225c-2225e StackAdj> Δ+20 {[-4-]}
<POP 2225e-2226c Naked> Σ-4 ↓ →0x22296 ←0x22226
<MI 2225e MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 22262 ANDI.W #0x0f00,D0> {[-4-]}
<MI 22266 CMPI.W #0x0d00,D0> {[-4-]}
<MI 2226a BNE 0x22296> {[-4-]}
<POP 2226c-22296 Naked> Σ-4 ↓
<Blob 0x2226c [16] @> Δ-16 {[-4-]|[«16""»]}
<POP 2227c-2227e StackAdj> Δ-4 {[-4-]|[«16""»]|[-4-]}
<Lit 0x2227e 15> {[-4-]|[«16""»]|[$$Volume overflow]}
<MI 2228c LEA.L (A6-0xe),A4> {[-4-]|[«16""»]|[$$Volume overflow]}
<Call 0x22290 0x21c2c> {[-4-]|[«16""»]|[$$Volume overflow]}
<POP 22294-22296 StackAdj> Δ+20 {[-4-]}
<POP 22296-222a0 Naked> Σ-4 ↓ →0x222c8 ←0x2225e
<MI 22296 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 2229a ANDI.W #0x0080,D0> {[-4-]}
<MI 2229e BEQ 0x222c8> {[-4-]}
<POP 222a0-222c8 Naked> Σ-4 ↓
<Blob 0x222a0 [10] @> Δ-10 {[-4-]|[«10""»]}
<POP 222ac-222ae StackAdj> Δ-4 {[-4-]|[«10""»]|[-4-]}
<Lit 0x222ae 10> {[-4-]|[«10""»]|[$$Power Fail]}
<MI 222bc LEA.L (A6-0xe),A4> {[-4-]|[«10""»]|[$$Power Fail]}
<Call 0x222c0 0x21c2c> {[-4-]|[«10""»]|[$$Power Fail]}
<POP 222c4-222c8 StackAdj> Δ+14 {[-4-]}
<POP 222c8-222d2 Naked> Σ-4 ↓ →0x222fe ←0x22296
<MI 222c8 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 222cc ANDI.W #0x0040,D0> {[-4-]}
<MI 222d0 BEQ 0x222fe> {[-4-]}
<POP 222d2-222fe Naked> Σ-4 ↓
<Blob 0x222d2 [22] @> Δ-22 {[-4-]|[«22""»]}
<POP 222e2-222e4 StackAdj> Δ-4 {[-4-]|[«22""»]|[-4-]}
<Lit 0x222e4 21> {[-4-]|[«22""»]|[$$SCSI bus parity error]}
<MI 222f2 LEA.L (A6-0xe),A4> {[-4-]|[«22""»]|[$$SCSI bus parity error]}
<Call 0x222f6 0x21c2c> {[-4-]|[«22""»]|[$$SCSI bus parity error]}
<POP 222fa-222fe StackAdj> Δ+26 {[-4-]}
<POP 222fe-22308 Naked> Σ-4 ↓ →0x22336 ←0x222c8
<MI 222fe MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 22302 ANDI.W #0x0020,D0> {[-4-]}
<MI 22306 BEQ 0x22336> {[-4-]}
<POP 22308-22336 Naked> Σ-4 ↓
<Blob 0x22308 [30] @> Δ-30 {[-4-]|[«30""»]}
<POP 2231a-2231c StackAdj> Δ-4 {[-4-]|[«30""»]|[-4-]}
<Lit 0x2231c 29> {[-4-]|[«30""»]|[$$Formatted buffer parity error]}
<MI 2232a LEA.L (A6-0xe),A4> {[-4-]|[«30""»]|[$$Formatted buffer parity error]}
<Call 0x2232e 0x21c2c> {[-4-]|[«30""»]|[$$Formatted buffer parity error]}
<POP 22332-22336 StackAdj> Δ+34 {[-4-]}
<POP 22336-2233e Naked> Σ-4 ↓ →0x22368 ←0x222fe
<MI 22336 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 2233a AND.W #0x10,D0> {[-4-]}
<MI 2233c BEQ 0x22368> {[-4-]}
<POP 2233e-22368 Naked> Σ-4 ↓
<Blob 0x2233e [12] @> Δ-12 {[-4-]|[«12""»]}
<POP 2234e-22350 StackAdj> Δ-4 {[-4-]|[«12""»]|[-4-]}
<Lit 0x22350 11> {[-4-]|[«12""»]|[$$Media error]}
<MI 2235e LEA.L (A6-0xe),A4> {[-4-]|[«12""»]|[$$Media error]}
<Call 0x22362 0x21c2c> {[-4-]|[«12""»]|[$$Media error]}
<POP 22366-22368 StackAdj> Δ+16 {[-4-]}
<POP 22368-22372 Naked> Σ-4 ↓ →0x22398 ←0x22336
<MI 22368 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 2236c ANDI.W #0x0008,D0> {[-4-]}
<MI 22370 BEQ 0x22398> {[-4-]}
<POP 22372-22398 Naked> Σ-4 ↓
<Blob 0x22372 [22] @> Δ-22 {[-4-]|[«22""»]}
<POP 2237e-22380 StackAdj> Δ-4 {[-4-]|[«22""»]|[-4-]}
<Lit 0x22380 22> {[-4-]|[«22""»]|[$$Error counter overflow]}
<MI 2238c LEA.L (A6-0xe),A4> {[-4-]|[«22""»]|[$$Error counter overflow]}
<Call 0x22390 0x21c2c> {[-4-]|[«22""»]|[$$Error counter overflow]}
<POP 22394-22398 StackAdj> Δ+26 {[-4-]}
<POP 22398-223a2 Naked> Σ-4 ↓ →0x223cc ←0x22368
<MI 22398 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 2239c ANDI.W #0x0004,D0> {[-4-]}
<MI 223a0 BEQ 0x223cc> {[-4-]}
<POP 223a2-223cc Naked> Σ-4 ↓
<Blob 0x223a2 [18] @> Δ-18 {[-4-]|[«18""»]}
<POP 223b2-223b4 StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]}
<Lit 0x223b4 17> {[-4-]|[«18""»]|[$$Tape motion error]}
<MI 223c2 LEA.L (A6-0xe),A4> {[-4-]|[«18""»]|[$$Tape motion error]}
<Call 0x223c6 0x21c2c> {[-4-]|[«18""»]|[$$Tape motion error]}
<POP 223ca-223cc StackAdj> Δ+22 {[-4-]}
<POP 223cc-223d6 Naked> Σ-4 ↓ →0x223fe ←0x22398
<MI 223cc MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 223d0 ANDI.W #0x0002,D0> {[-4-]}
<MI 223d4 BEQ 0x223fe> {[-4-]}
<POP 223d6-223fe Naked> Σ-4 ↓
<Blob 0x223d6 [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x223da [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x223de [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<Blob 0x223e2 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 223e6-223e8 StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x223e8 16> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Tape not present]}
<MI 223f4 LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Tape not present]}
<Call 0x223f8 0x21c2c> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Tape not present]}
<POP 223fc-223fe StackAdj> Δ+20 {[-4-]}
<POP 223fe-22406 Naked> Σ-4 ↓ →0x22430 ←0x223cc
<MI 223fe MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 22402 AND.W #0x01,D0> {[-4-]}
<MI 22404 BEQ 0x22430> {[-4-]}
<POP 22406-22430 Naked> Σ-4 ↓
<Blob 0x22406 [18] @> Δ-18 {[-4-]|[«18""»]}
<POP 22416-22418 StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]}
<Lit 0x22418 17> {[-4-]|[«18""»]|[$$Beginning of tape]}
<MI 22426 LEA.L (A6-0xe),A4> {[-4-]|[«18""»]|[$$Beginning of tape]}
<Call 0x2242a 0x21c2c> {[-4-]|[«18""»]|[$$Beginning of tape]}
<POP 2242e-22430 StackAdj> Δ+22 {[-4-]}
<POP 22430-2243a Naked> Σ-4 ↓ →0x22460 ←0x223fe
<MI 22430 MOVE.W (A0+0x23e6),D0> {[-4-]}
<MI 22434 ANDI.W #0x8000,D0> {[-4-]}
<MI 22438 BEQ 0x22460> {[-4-]}
<POP 2243a-22460 Naked> Σ-4 ↓
<Blob 0x2243a [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 22446-22448 StackAdj> Δ-4 {[-4-]|[«20""»]|[-4-]}
<Lit 0x22448 20> {[-4-]|[«20""»]|[$$Transfer abort error]}
<MI 22454 LEA.L (A6-0xe),A4> {[-4-]|[«20""»]|[$$Transfer abort error]}
<Call 0x22458 0x21c2c> {[-4-]|[«20""»]|[$$Transfer abort error]}
<POP 2245c-22460 StackAdj> Δ+24 {[-4-]}
<POP 22460-2246a Naked> Σ-4 ↓ →0x22490 ←0x22430
<MI 22460 MOVE.W (A0+0x23e6),D0> {[-4-]}
<MI 22464 ANDI.W #0x4000,D0> {[-4-]}
<MI 22468 BEQ 0x22490> {[-4-]}
<POP 2246a-22490 Naked> Σ-4 ↓
<Blob 0x2246a [22] @> Δ-22 {[-4-]|[«22""»]}
<POP 22476-22478 StackAdj> Δ-4 {[-4-]|[«22""»]|[-4-]}
<Lit 0x22478 22> {[-4-]|[«22""»]|[$$Tape mark detect error]}
<MI 22484 LEA.L (A6-0xe),A4> {[-4-]|[«22""»]|[$$Tape mark detect error]}
<Call 0x22488 0x21c2c> {[-4-]|[«22""»]|[$$Tape mark detect error]}
<POP 2248c-22490 StackAdj> Δ+26 {[-4-]}
<POP 22490-2249a Naked> Σ-4 ↓ →0x224c6 ←0x22460
<MI 22490 MOVE.W (A0+0x23e6),D0> {[-4-]}
<MI 22494 ANDI.W #0x2000,D0> {[-4-]}
<MI 22498 BEQ 0x224c6> {[-4-]}
<POP 2249a-224c6 Naked> Σ-4 ↓
<Blob 0x2249a [14] @> Δ-14 {[-4-]|[«14""»]}
<POP 224ac-224ae StackAdj> Δ-4 {[-4-]|[«14""»]|[-4-]}
<Lit 0x224ae 13> {[-4-]|[«14""»]|[$$Write protect]}
<MI 224bc LEA.L (A6-0xe),A4> {[-4-]|[«14""»]|[$$Write protect]}
<Call 0x224c0 0x21c2c> {[-4-]|[«14""»]|[$$Write protect]}
<POP 224c4-224c6 StackAdj> Δ+18 {[-4-]}
<POP 224c6-224d0 Naked> Σ-4 ↓ →0x224f6 ←0x22490
<MI 224c6 MOVE.W (A0+0x23e6),D0> {[-4-]}
<MI 224ca ANDI.W #0x1000,D0> {[-4-]}
<MI 224ce BEQ 0x224f6> {[-4-]}
<POP 224d0-224f6 Naked> Σ-4 ↓
<Blob 0x224d0 [14] @> Δ-14 {[-4-]|[«14""»]}
<POP 224dc-224de StackAdj> Δ-4 {[-4-]|[«14""»]|[-4-]}
<Lit 0x224de 14> {[-4-]|[«14""»]|[$$Filemark error]}
<MI 224ec LEA.L (A6-0xe),A4> {[-4-]|[«14""»]|[$$Filemark error]}
<Call 0x224f0 0x21c2c> {[-4-]|[«14""»]|[$$Filemark error]}
<POP 224f4-224f6 StackAdj> Δ+18 {[-4-]}
<POP 224f6-22500 Naked> Σ-4 ↓ →0x2252a ←0x224c6
<MI 224f6 MOVE.W (A0+0x23e6),D0> {[-4-]}
<MI 224fa ANDI.W #0x0800,D0> {[-4-]}
<MI 224fe BEQ 0x2252a> {[-4-]}
<POP 22500-2252a Naked> Σ-4 ↓
<Blob 0x22500 [16] @> Δ-16 {[-4-]|[«16""»]}
<POP 22510-22512 StackAdj> Δ-4 {[-4-]|[«16""»]|[-4-]}
<Lit 0x22512 15> {[-4-]|[«16""»]|[$$Under run error]}
<MI 22520 LEA.L (A6-0xe),A4> {[-4-]|[«16""»]|[$$Under run error]}
<Call 0x22524 0x21c2c> {[-4-]|[«16""»]|[$$Under run error]}
<POP 22528-2252a StackAdj> Δ+20 {[-4-]}
<POP 2252a-22534 Naked> Σ-4 ↓ →0x22560 ←0x224f6
<MI 2252a MOVE.W (A0+0x23e6),D0> {[-4-]}
<MI 2252e ANDI.W #0x0400,D0> {[-4-]}
<MI 22532 BEQ 0x22560> {[-4-]}
<POP 22534-22560 Naked> Σ-4 ↓
<Blob 0x22534 [14] @> Δ-14 {[-4-]|[«14""»]}
<POP 22546-22548 StackAdj> Δ-4 {[-4-]|[«14""»]|[-4-]}
<Lit 0x22548 13> {[-4-]|[«14""»]|[$$Write error 1]}
<MI 22556 LEA.L (A6-0xe),A4> {[-4-]|[«14""»]|[$$Write error 1]}
<Call 0x2255a 0x21c2c> {[-4-]|[«14""»]|[$$Write error 1]}
<POP 2255e-22560 StackAdj> Δ+18 {[-4-]}
<POP 22560-2256a Naked> Σ-4 ↓ →0x2258e ←0x2252a
<MI 22560 MOVE.W (A0+0x23e6),D0> {[-4-]}
<MI 22564 ANDI.W #0x0200,D0> {[-4-]}
<MI 22568 BEQ 0x2258e> {[-4-]}
<POP 2256a-2258e Naked> Σ-4 ↓
<Blob 0x2256a [18] @> Δ-18 {[-4-]|[«18""»]}
<POP 22576-22578 StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]}
<Lit 0x22578 18> {[-4-]|[«18""»]|[$$Servo system error]}
<MI 22584 LEA.L (A6-0xe),A4> {[-4-]|[«18""»]|[$$Servo system error]}
<Call 0x22588 0x21c2c> {[-4-]|[«18""»]|[$$Servo system error]}
<POP 2258c-2258e StackAdj> Δ+22 {[-4-]}
<POP 2258e-22598 Naked> Σ-4 ↓ →0x225c2 ←0x22560
<MI 2258e MOVE.W (A0+0x23e6),D0> {[-4-]}
<MI 22592 ANDI.W #0x0100,D0> {[-4-]}
<MI 22596 BEQ 0x225c2> {[-4-]}
<POP 22598-225c2 Naked> Σ-4 ↓
<Blob 0x22598 [16] @> Δ-16 {[-4-]|[«16""»]}
<POP 225a8-225aa StackAdj> Δ-4 {[-4-]|[«16""»]|[-4-]}
<Lit 0x225aa 15> {[-4-]|[«16""»]|[$$Formatter error]}
<MI 225b8 LEA.L (A6-0xe),A4> {[-4-]|[«16""»]|[$$Formatter error]}
<Call 0x225bc 0x21c2c> {[-4-]|[«16""»]|[$$Formatter error]}
<POP 225c0-225c2 StackAdj> Δ+20 {[-4-]}
<POP 225c2-225cc Naked> Σ-4 ↓ →0x225f4 ←0x2258e
<MI 225c2 MOVE.W (A0+0x23e6),D0> {[-4-]}
<MI 225c6 ANDI.W #0x0002,D0> {[-4-]}
<MI 225ca BEQ 0x225f4> {[-4-]}
<POP 225cc-225f4 Naked> Σ-4 ↓
<Blob 0x225cc [26] @> Δ-26 {[-4-]|[«26""»]}
<POP 225d8-225da StackAdj> Δ-4 {[-4-]|[«26""»]|[-4-]}
<Lit 0x225da 26> {[-4-]|[«26""»]|[$$Write splice error - blank]}
<MI 225e8 LEA.L (A6-0xe),A4> {[-4-]|[«26""»]|[$$Write splice error - blank]}
<Call 0x225ec 0x21c2c> {[-4-]|[«26""»]|[$$Write splice error - blank]}
<POP 225f0-225f4 StackAdj> Δ+30 {[-4-]}
<POP 225f4-225fc Naked> Σ-4 ↓ →0x22624 ←0x225c2
<MI 225f4 MOVE.W (A0+0x23e6),D0> {[-4-]}
<MI 225f8 AND.W #0x01,D0> {[-4-]}
<MI 225fa BEQ 0x22624> {[-4-]}
<POP 225fc-22624 Naked> Σ-4 ↓
<Blob 0x225fc [30] @> Δ-30 {[-4-]|[«30""»]}
<POP 22608-2260a StackAdj> Δ-4 {[-4-]|[«30""»]|[-4-]}
<Lit 0x2260a 30> {[-4-]|[«30""»]|[$$Write splice error - overshoot]}
<MI 22618 LEA.L (A6-0xe),A4> {[-4-]|[«30""»]|[$$Write splice error - overshoot]}
<Call 0x2261c 0x21c2c> {[-4-]|[«30""»]|[$$Write splice error - overshoot]}
<POP 22620-22624 StackAdj> Δ+34 {[-4-]}
<POP 22624-22628 Naked> Σ-4 →0x22a58 ←0x225f4
<MI 22624 BRA 0x22a58> {[-4-]}
<POP 22628-22632 Naked> Σ-4 ↓ →0x22660 ←0x21fa6
<MI 22628 MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 2262c ANDI.W #0x8000,D0> {[-4-]}
<MI 22630 BEQ 0x22660> {[-4-]}
<POP 22632-22660 Naked> Σ-4 ↓
<Blob 0x22632 [10] @> Δ-10 {[-4-]|[«10""»]}
<POP 22644-22646 StackAdj> Δ-4 {[-4-]|[«10""»]|[-4-]}
<Lit 0x22646 9> {[-4-]|[«10""»]|[$$Tape mark]}
<MI 22654 LEA.L (A6-0xe),A4> {[-4-]|[«10""»]|[$$Tape mark]}
<Call 0x22658 0x21c2c> {[-4-]|[«10""»]|[$$Tape mark]}
<POP 2265c-22660 StackAdj> Δ+14 {[-4-]}
<POP 22660-2266a Naked> Σ-4 ↓ →0x22696 ←0x22628
<MI 22660 MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 22664 ANDI.W #0x4000,D0> {[-4-]}
<MI 22668 BEQ 0x22696> {[-4-]}
<POP 2266a-22696 Naked> Σ-4 ↓
<Blob 0x2266a [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 2267a-2267c StackAdj> Δ-4 {[-4-]|[«20""»]|[-4-]}
<Lit 0x2267c 19> {[-4-]|[«20""»]|[$$Record length short]}
<MI 2268a LEA.L (A6-0xe),A4> {[-4-]|[«20""»]|[$$Record length short]}
<Call 0x2268e 0x21c2c> {[-4-]|[«20""»]|[$$Record length short]}
<POP 22692-22696 StackAdj> Δ+24 {[-4-]}
<POP 22696-226a0 Naked> Σ-4 ↓ →0x226cc ←0x22660
<MI 22696 MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 2269a ANDI.W #0x2000,D0> {[-4-]}
<MI 2269e BEQ 0x226cc> {[-4-]}
<POP 226a0-226cc Naked> Σ-4 ↓
<Blob 0x226a0 [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 226b0-226b2 StackAdj> Δ-4 {[-4-]|[«20""»]|[-4-]}
<Lit 0x226b2 19> {[-4-]|[«20""»]|[$$Logical end of tape]}
<MI 226c0 LEA.L (A6-0xe),A4> {[-4-]|[«20""»]|[$$Logical end of tape]}
<Call 0x226c4 0x21c2c> {[-4-]|[«20""»]|[$$Logical end of tape]}
<POP 226c8-226cc StackAdj> Δ+24 {[-4-]}
<POP 226cc-226d6 Naked> Σ-4 ↓ →0x226fa ←0x22696
<MI 226cc MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 226d0 ANDI.W #0x1000,D0> {[-4-]}
<MI 226d4 BEQ 0x226fa> {[-4-]}
<POP 226d6-226fa Naked> Σ-4 ↓
<Blob 0x226d6 [18] @> Δ-18 {[-4-]|[«18""»]}
<POP 226e2-226e4 StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]}
<Lit 0x226e4 18> {[-4-]|[«18""»]|[$$Record length long]}
<MI 226f0 LEA.L (A6-0xe),A4> {[-4-]|[«18""»]|[$$Record length long]}
<Call 0x226f4 0x21c2c> {[-4-]|[«18""»]|[$$Record length long]}
<POP 226f8-226fa StackAdj> Δ+22 {[-4-]}
<POP 226fa-22704 Naked> Σ-4 ↓ →0x2272c ←0x226cc
<MI 226fa MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 226fe ANDI.W #0x0800,D0> {[-4-]}
<MI 22702 BEQ 0x2272c> {[-4-]}
<POP 22704-2272c Naked> Σ-4 ↓
<Blob 0x22704 [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x22708 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x2270c [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<Blob 0x22710 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 22714-22716 StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x22716 16> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Write lock error]}
<MI 22722 LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Write lock error]}
<Call 0x22726 0x21c2c> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Write lock error]}
<POP 2272a-2272c StackAdj> Δ+20 {[-4-]}
<POP 2272c-22736 Naked> Σ-4 ↓ →0x22764 ←0x226fa
<MI 2272c MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 22730 ANDI.W #0x0400,D0> {[-4-]}
<MI 22734 BEQ 0x22764> {[-4-]}
<POP 22736-22764 Naked> Σ-4 ↓
<Blob 0x22736 [24] @> Δ-24 {[-4-]|[«24""»]}
<POP 22748-2274a StackAdj> Δ-4 {[-4-]|[«24""»]|[-4-]}
<Lit 0x2274a 23> {[-4-]|[«24""»]|[$$Non-executable function]}
<MI 22758 LEA.L (A6-0xe),A4> {[-4-]|[«24""»]|[$$Non-executable function]}
<Call 0x2275c 0x21c2c> {[-4-]|[«24""»]|[$$Non-executable function]}
<POP 22760-22764 StackAdj> Δ+28 {[-4-]}
<POP 22764-2276e Naked> Σ-4 ↓ →0x22798 ←0x2272c
<MI 22764 MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 22768 ANDI.W #0x0200,D0> {[-4-]}
<MI 2276c BEQ 0x22798> {[-4-]}
<POP 2276e-22798 Naked> Σ-4 ↓
<Blob 0x2276e [16] @> Δ-16 {[-4-]|[«16""»]}
<POP 2277e-22780 StackAdj> Δ-4 {[-4-]|[«16""»]|[-4-]}
<Lit 0x22780 15> {[-4-]|[«16""»]|[$$Illegal command]}
<MI 2278e LEA.L (A6-0xe),A4> {[-4-]|[«16""»]|[$$Illegal command]}
<Call 0x22792 0x21c2c> {[-4-]|[«16""»]|[$$Illegal command]}
<POP 22796-22798 StackAdj> Δ+20 {[-4-]}
<POP 22798-227a2 Naked> Σ-4 ↓ →0x227cc ←0x22764
<MI 22798 MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 2279c ANDI.W #0x0100,D0> {[-4-]}
<MI 227a0 BEQ 0x227cc> {[-4-]}
<POP 227a2-227cc Naked> Σ-4 ↓
<Blob 0x227a2 [16] @> Δ-16 {[-4-]|[«16""»]}
<POP 227b2-227b4 StackAdj> Δ-4 {[-4-]|[«16""»]|[-4-]}
<Lit 0x227b4 15> {[-4-]|[«16""»]|[$$Illegal address]}
<MI 227c2 LEA.L (A6-0xe),A4> {[-4-]|[«16""»]|[$$Illegal address]}
<Call 0x227c6 0x21c2c> {[-4-]|[«16""»]|[$$Illegal address]}
<POP 227ca-227cc StackAdj> Δ+20 {[-4-]}
<POP 227cc-227d6 Naked> Σ-4 ↓ →0x227fc ←0x22798
<MI 227cc MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 227d0 ANDI.W #0x0080,D0> {[-4-]}
<MI 227d4 BEQ 0x227fc> {[-4-]}
<POP 227d6-227fc Naked> Σ-4 ↓
<Blob 0x227d6 [14] @> Δ-14 {[-4-]|[«14""»]}
<POP 227e2-227e4 StackAdj> Δ-4 {[-4-]|[«14""»]|[-4-]}
<Lit 0x227e4 14> {[-4-]|[«14""»]|[$$Formatter busy]}
<MI 227f2 LEA.L (A6-0xe),A4> {[-4-]|[«14""»]|[$$Formatter busy]}
<Call 0x227f6 0x21c2c> {[-4-]|[«14""»]|[$$Formatter busy]}
<POP 227fa-227fc StackAdj> Δ+18 {[-4-]}
<POP 227fc-22806 Naked> Σ-4 ↓ →0x22828 ←0x227cc
<MI 227fc MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 22800 ANDI.W #0x0040,D0> {[-4-]}
<MI 22804 BNE 0x22828> {[-4-]}
<POP 22806-22828 Naked> Σ-4 ↓
<Blob 0x22806 [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x2280a [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<POP 2280e-22810 StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x22810 8> {[-4-]|[«4""»]|[«4""»]|[$$Off-line]}
<MI 2281e LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[$$Off-line]}
<Call 0x22822 0x21c2c> {[-4-]|[«4""»]|[«4""»]|[$$Off-line]}
<POP 22826-22828 StackAdj> Δ+12 {[-4-]}
<POP 22828-22830 Naked> Σ-4 ↓ →0x22854 ←0x227fc
<MI 22828 MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 2282c AND.W #0x10,D0> {[-4-]}
<MI 2282e BEQ 0x22854> {[-4-]}
<POP 22830-22854 Naked> Σ-4 ↓
<Blob 0x22830 [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x22834 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x22838 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<POP 2283c-2283e StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x2283e 12> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Volume check]}
<MI 2284a LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Volume check]}
<Call 0x2284e 0x21c2c> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Volume check]}
<POP 22852-22854 StackAdj> Δ+16 {[-4-]}
<POP 22854-2285e Naked> Σ-4 ↓ →0x22882 ←0x22828
<MI 22854 MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 22858 ANDI.W #0x0004,D0> {[-4-]}
<MI 2285c BEQ 0x22882> {[-4-]}
<POP 2285e-22882 Naked> Σ-4 ↓
<Blob 0x2285e [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x22862 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x22866 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<POP 2286a-2286c StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x2286c 12> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Write locked]}
<MI 22878 LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Write locked]}
<Call 0x2287c 0x21c2c> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Write locked]}
<POP 22880-22882 StackAdj> Δ+16 {[-4-]}
<POP 22882-2288c Naked> Σ-4 ↓ →0x228b8 ←0x22854
<MI 22882 MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 22886 ANDI.W #0x0002,D0> {[-4-]}
<MI 2288a BEQ 0x228b8> {[-4-]}
<POP 2288c-228b8 Naked> Σ-4 ↓
<POP 2288c-2288e StackAdj> Δ-4 {[-8-]}
<POP 2288e-2288f StackAdj> Δ+2 {[-6-]}
<Blob 0x2288f [2] @> Δ-2 {[-6-]|[«2""»]}
<MI 22892 MOVE.B 0x20411,(A7+0x1)> {[-6-]|[«2""»]}
<MI 22898 MOVE.B 0x20412,(A7+0x2)> {[-6-]|[«2""»]}
<POP 2289e-228a0 StackAdj> Δ-4 {[-6-]|[«2""»]|[-4-]}
<Lit 0x228a0> {[-6-]|[«2""»]|[$$…]}
<Pointer.sp 0x228a0 4> Δ-4
<Const 0x228a4 0x1.2> Δ-2
<Const 0x228a6 0x3.2> Δ-2
<Call 0x228aa 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 228ac-228ae StackAdj> Δ+8
<MI 228ae LEA.L (A6-0xe),A4> {[-6-]|[«2""»]|[$$…]}
<Call 0x228b2 0x21c2c> {[-6-]|[«2""»]|[$$…]}
<POP 228b6-228b8 StackAdj> Δ+8 {[-4-]}
<POP 228b8-228c0 Naked> Σ-4 ↓ →0x228ec ←0x22882
<MI 228b8 MOVE.W (A0+0x23e2),D0> {[-4-]}
<MI 228bc AND.W #0x01,D0> {[-4-]}
<MI 228be BEQ 0x228ec> {[-4-]}
<POP 228c0-228ec Naked> Σ-4 ↓
<POP 228c0-228c2 StackAdj> Δ-4 {[-8-]}
<POP 228c2-228c3 StackAdj> Δ+2 {[-6-]}
<Blob 0x228c3 [2] @> Δ-2 {[-6-]|[«2""»]}
<MI 228c6 MOVE.B 0x20415,(A7+0x1)> {[-6-]|[«2""»]}
<MI 228cc MOVE.B 0x20416,(A7+0x2)> {[-6-]|[«2""»]}
<POP 228d2-228d4 StackAdj> Δ-4 {[-6-]|[«2""»]|[-4-]}
<Lit 0x228d4> {[-6-]|[«2""»]|[$$…]}
<Pointer.sp 0x228d4 4> Δ-4
<Const 0x228d8 0x1.2> Δ-2
<Const 0x228da 0x3.2> Δ-2
<Call 0x228de 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 228e0-228e2 StackAdj> Δ+8
<MI 228e2 LEA.L (A6-0xe),A4> {[-6-]|[«2""»]|[$$…]}
<Call 0x228e6 0x21c2c> {[-6-]|[«2""»]|[$$…]}
<POP 228ea-228ec StackAdj> Δ+8 {[-4-]}
<POP 228ec-228f6 Naked> Σ-4 ↓ →0x22924 ←0x228b8
<MI 228ec MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 228f0 ANDI.W #0x8000,D0> {[-4-]}
<MI 228f4 BEQ 0x22924> {[-4-]}
<POP 228f6-22924 Naked> Σ-4 ↓
<Blob 0x228f6 [10] @> Δ-10 {[-4-]|[«10""»]}
<POP 22908-2290a StackAdj> Δ-4 {[-4-]|[«10""»]|[-4-]}
<Lit 0x2290a 9> {[-4-]|[«10""»]|[$$Data late]}
<MI 22918 LEA.L (A6-0xe),A4> {[-4-]|[«10""»]|[$$Data late]}
<Call 0x2291c 0x21c2c> {[-4-]|[«10""»]|[$$Data late]}
<POP 22920-22924 StackAdj> Δ+14 {[-4-]}
<POP 22924-2292e Naked> Σ-4 ↓ →0x22958 ←0x228ec
<MI 22924 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 22928 ANDI.W #0x2000,D0> {[-4-]}
<MI 2292c BEQ 0x22958> {[-4-]}
<POP 2292e-22958 Naked> Σ-4 ↓
<Blob 0x2292e [18] @> Δ-18 {[-4-]|[«18""»]}
<POP 2293e-22940 StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]}
<Lit 0x22940 17> {[-4-]|[«18""»]|[$$Correctable error]}
<MI 2294e LEA.L (A6-0xe),A4> {[-4-]|[«18""»]|[$$Correctable error]}
<Call 0x22952 0x21c2c> {[-4-]|[«18""»]|[$$Correctable error]}
<POP 22956-22958 StackAdj> Δ+22 {[-4-]}
<POP 22958-22962 Naked> Σ-4 ↓ →0x2298e ←0x22924
<MI 22958 MOVE.W (A0+0x23e4),D0> {[-4-]}
<MI 2295c ANDI.W #0x0002,D0> {[-4-]}
<MI 22960 BEQ 0x2298e> {[-4-]}
<POP 22962-2298e Naked> Σ-4 ↓
<Blob 0x22962 [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 22972-22974 StackAdj> Δ-4 {[-4-]|[«20""»]|[-4-]}
<Lit 0x22974 19> {[-4-]|[«20""»]|[$$Uncorrectable error]}
<MI 22982 LEA.L (A6-0xe),A4> {[-4-]|[«20""»]|[$$Uncorrectable error]}
<Call 0x22986 0x21c2c> {[-4-]|[«20""»]|[$$Uncorrectable error]}
<POP 2298a-2298e StackAdj> Δ+24 {[-4-]}
<POP 2298e-22998 Naked> Σ-4 ↓ →0x229c4 ←0x22958
<MI 2298e MOVE.W (A0+0x23e6),D0> {[-4-]}
<MI 22992 ANDI.W #0x8000,D0> {[-4-]}
<MI 22996 BEQ 0x229c4> {[-4-]}
<POP 22998-229c4 Naked> Σ-4 ↓
<Blob 0x22998 [22] @> Δ-22 {[-4-]|[«22""»]}
<POP 229a8-229aa StackAdj> Δ-4 {[-4-]|[«22""»]|[-4-]}
<Lit 0x229aa 21> {[-4-]|[«22""»]|[$$Operation in progress]}
<MI 229b8 LEA.L (A6-0xe),A4> {[-4-]|[«22""»]|[$$Operation in progress]}
<Call 0x229bc 0x21c2c> {[-4-]|[«22""»]|[$$Operation in progress]}
<POP 229c0-229c4 StackAdj> Δ+26 {[-4-]}
<POP 229c4-229ce Naked> Σ-4 ↓ →0x229f4 ←0x2298e
<MI 229c4 MOVE.W (A0+0x23e8),D0> {[-4-]}
<MI 229c8 ANDI.W #0x0040,D0> {[-4-]}
<MI 229cc BEQ 0x229f4> {[-4-]}
<POP 229ce-229f4 Naked> Σ-4 ↓
<Blob 0x229ce [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 229da-229dc StackAdj> Δ-4 {[-4-]|[«20""»]|[-4-]}
<Lit 0x229dc 20> {[-4-]|[«20""»]|[$$Operation incomplete]}
<MI 229e8 LEA.L (A6-0xe),A4> {[-4-]|[«20""»]|[$$Operation incomplete]}
<Call 0x229ec 0x21c2c> {[-4-]|[«20""»]|[$$Operation incomplete]}
<POP 229f0-229f4 StackAdj> Δ+24 {[-4-]}
<POP 229f4-229fe Naked> Σ-4 ↓ →0x22a28 ←0x229c4
<MI 229f4 MOVE.W (A0+0x23e8),D0> {[-4-]}
<MI 229f8 ANDI.W #0x0020,D0> {[-4-]}
<MI 229fc BEQ 0x22a28> {[-4-]}
<POP 229fe-22a28 Naked> Σ-4 ↓
<Blob 0x229fe [8] @> Δ-8 {[-4-]|[«8""»]}
<POP 22a0e-22a10 StackAdj> Δ-4 {[-4-]|[«8""»]|[-4-]}
<Lit 0x22a10 7> {[-4-]|[«8""»]|[$$Reverse]}
<MI 22a1e LEA.L (A6-0xe),A4> {[-4-]|[«8""»]|[$$Reverse]}
<Call 0x22a22 0x21c2c> {[-4-]|[«8""»]|[$$Reverse]}
<POP 22a26-22a28 StackAdj> Δ+12 {[-4-]}
<POP 22a28-22a30 Naked> Σ-4 ↓ →0x22a58 ←0x229f4
<MI 22a28 MOVE.W (A0+0x23e8),D0> {[-4-]}
<MI 22a2c AND.W #0x01,D0> {[-4-]}
<MI 22a2e BEQ 0x22a58> {[-4-]}
<POP 22a30-22a58 Naked> Σ-4 ↓
<Blob 0x22a30 [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x22a34 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x22a38 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<Blob 0x22a3c [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 22a40-22a42 StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x22a42 16> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Reverse into BOT]}
<MI 22a4e LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Reverse into BOT]}
<Call 0x22a52 0x21c2c> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Reverse into BOT]}
<POP 22a56-22a58 StackAdj> Δ+20 {[-4-]}
<POP 22a58-22a64 Naked> Σ-4 Δ+4 ↓ ←0x22624 ←0x22a28
<MI 22a58 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']}
<Call 0x22a5c 0x103e0> {[-4-]|[4, '(A6-0x6)']}
WriteConsoleStringCrLf(str : String)
<POP 22a62-22a64 StackAdj> Δ+8 {}
<POP 22a64-22a6c Epilogue> Σ0
@ 22a6c
<LVAR 0x008 2(r)>
<POP 22a6c-22aca Body>
<POP 22a6c-22a82 Prologue> Σ0 ↓
<POP 22a82-22ac2 Naked> Σ0 ↓
<Blob 0x22a82 [4] @> Δ-4 {[«4""»]}
<POP 22a86-22a88 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x22a88 4> {[«4""»]|[$$Hard]}
<POP 22a9a-22a9c StackAdj> Δ-2 {[«4""»]|[$$Hard]|[-2-]}
<MI 22a9c MOVE.W (A6+0x8),(A7)> {[«4""»]|[$$Hard]|[2, '(A6+0x8)']}
<Call 0x22aa0 0x21cbc> {[«4""»]|[$$Hard]|[2, '(A6+0x8)']}
<POP 22aa4-22aa8 StackAdj> Δ+10 {}
<MI 22aa8 MOVE.W #0x21c0,D0> {}
<MI 22aac MULS.W (A6+0x8),D0> {}
<MI 22ab0 LEA.L 0x2578e,A0> {}
<MI 22ab6 LEA.L (A0+D0.W),A0> {}
<MI 22aba ADDQ.L #0x1,(A0+0x230)> {}
<MI 22abe CLR.L (A0+0x244)> {}
<POP 22ac2-22aca Epilogue> Σ0
@ 22aca
<LVAR 0x008 2(r)>
<POP 22aca-22b30 Body>
<POP 22aca-22ae0 Prologue> Σ0 ↓
<POP 22ae0-22b28 Naked> Σ0 ↓
<Blob 0x22ae0 [4] @> Δ-4 {[«4""»]}
<POP 22ae4-22ae6 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x22ae6 4> {[«4""»]|[$$Soft]}
<POP 22af8-22afa StackAdj> Δ-2 {[«4""»]|[$$Soft]|[-2-]}
<MI 22afa MOVE.W (A6+0x8),(A7)> {[«4""»]|[$$Soft]|[2, '(A6+0x8)']}
<Call 0x22afe 0x21cbc> {[«4""»]|[$$Soft]|[2, '(A6+0x8)']}
<POP 22b02-22b06 StackAdj> Δ+10 {}
<MI 22b06 MOVE.W #0x21c0,D0> {}
<MI 22b0a MULS.W (A6+0x8),D0> {}
<MI 22b0e LEA.L 0x2578e,A0> {}
<MI 22b14 LEA.L (A0+D0.W),A0> {}
<MI 22b18 MOVE.L (A0+0x234),D0> {}
<MI 22b1c ADD.L (A0+0x244),D0> {}
<MI 22b20 MOVE.L D0,(A0+0x234)> {}
<MI 22b24 CLR.L (A0+0x244)> {}
<POP 22b28-22b30 Epilogue> Σ0
@ 22b30
<LVAR 0x008 2(r)>
<POP 22b30-22b8a Body>
<POP 22b30-22b46 Prologue> Σ0 ↓
<POP 22b46-22b82 Naked> Σ0 ↓
<Blob 0x22b46 [4] @> Δ-4 {[«4""»]}
<POP 22b4a-22b4c StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x22b4c 4> {[«4""»]|[$$DATA]}
<POP 22b5e-22b60 StackAdj> Δ-2 {[«4""»]|[$$DATA]|[-2-]}
<MI 22b60 MOVE.W (A6+0x8),(A7)> {[«4""»]|[$$DATA]|[2, '(A6+0x8)']}
<Call 0x22b64 0x21cbc> {[«4""»]|[$$DATA]|[2, '(A6+0x8)']}
<POP 22b68-22b6c StackAdj> Δ+10 {}
<MI 22b6c MOVE.W #0x21c0,D0> {}
<MI 22b70 MULS.W (A6+0x8),D0> {}
<MI 22b74 LEA.L 0x2578e,A0> {}
<MI 22b7a LEA.L (A0+D0.W),A0> {}
<MI 22b7e ADDQ.L #0x1,(A0+0x238)> {}
<POP 22b82-22b8a Epilogue> Σ0
@ 22b8a
<LVAR 0x00c 2(r)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @>
<LVAR -0x004 2(r)>
<LVAR -0x006 2(r)>
<LVAR -0x008 2(w)>
<LVAR -0x00a 2(w)>
<LVAR -0x00c 2(r)>
<LVAR -0x00e 2(w)>
<LVAR -0x010 2(r)>
<LVAR -0x012 @ 2(r)>
<POP 22b8a-22bfe Body>
<POP 22b8a-22ba0 Prologue> Σ0 ↓
<POP 22ba0-22ba2 RegCacheLoad> Σ0 ↓
<POP 22ba2-22bf6 Naked> Σ0 ↓
<MI 22ba2 CLR.W (A6-0x12)> {}
<MI 22ba6 CLR.W (A6-0x10)> {}
<MI 22baa MOVE.W #0x3,(A6-0xe)> {}
<MI 22bb0 CLR.W (A6-0xc)> {}
<MI 22bb4 MOVE.W #0x4,(A6-0xa)> {}
<MI 22bba MOVE.W (A6+0xc),D0> {}
<MI 22bbe ASL.W #0x8,D0> {}
<MI 22bc0 ADDQ.W #0x1,D0> {}
<MI 22bc2 MOVE.W D0,(A6-0x8)> {}
<MI 22bc6 CLR.W (A6-0x6)> {}
<MI 22bca CLR.W (A6-0x4)> {}
<Pointer.fp 0x22bce <LVAR -0x012 @ 2(r)>> Δ-4 {[@@-18]}
<MI 22bd2 MOVEA.L (A6+0x8),A0> {[@@-18]}
<MI 22bd6 MOVE.L A0,-(A7)> Δ-4 {[@@-18]|[4, 'A0']}
<Const 0x22bd8 0x1c.2> Δ-2 {[@@-18]|[4, 'A0']|[#28]}
<Const 0x22bda 0x0.4> Δ-4 {[@@-18]|[4, 'A0']|[#28]|[##0]}
<Const 0x22bde 0x10.4> Δ-4 {[@@-18]|[4, 'A0']|[#28]|[##0]|[##16]}
<Call 0x22be2 0x21244> {[@@-18]|[4, 'A0']|[#28]|[##0]|[##16]}
<POP 22be6-22bea StackAdj> Δ+16 {[-2-]}
<POP 22bea-22beb StackAdj> Δ+2 {}
<Const 0x22beb 0x1c.2> Δ-2 {[#28]}
<Pointer.fp 0x22bec <LVAR -0x002 @>> Δ-4 {[#28]|[@@-2]}
<Call 0x22bf0 0x2115a> {[#28]|[@@-2]}
<POP 22bf4-22bf6 StackAdj> Δ+6 {}
<POP 22bf6-22bfe Epilogue> Σ0
@ 22bfe
<LVAR 0x008 2(r)>
<POP 22bfe-22c42 Body>
<POP 22bfe-22c14 Prologue> Σ0 ↓
<POP 22c14-22c3a Naked> Σ0 ↓
<MI 22c14 MOVE.W #0x21c0,D0> {}
<MI 22c18 MULS.W (A6+0x8),D0> {}
<MI 22c1c LEA.L 0x2578e,A0> {}
<MI 22c22 LEA.L (A0+D0.W),A0> {}
<MI 22c26 MOVE.B #0x0a,(A0+0x23d4)> {}
<MI 22c2c MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x22c30 0x217ba> {[2, '(A6+0x8)']}
<POP 22c34-22c36 StackAdj> Δ+2 {}
<MI 22c36 CLR.B (A0+0x22c)> {}
<POP 22c3a-22c42 Epilogue> Σ0
@ 22c42
<LVAR 0x00c 2(r)>
<LVAR 0x008 4(r)>
<POP 22c42-22d2e Body>
<POP 22c42-22c58 Prologue> Σ0 ↓
<POP 22c58-22c64 RegCacheLoad> Σ0 ↓
<POP 22c64-22c7e Naked> Σ0 ↓ →0x22cb6
<MI 22c64 MOVE.W #0x21c0,D0> {}
<MI 22c68 MULS.W (A6+0xc),D0> {}
<MI 22c6a LEA.L 0x2578e,A0> {}
<MI 22c70 LEA.L (A0+D0.W),A0> {}
<MI 22c74 MOVE.W (A0+0x23da),D0> {}
<MI 22c78 ANDI.W #0x0040,D0> {}
<MI 22c7c BEQ 0x22cb6> {}
<POP 22c7e-22cb6 Naked> Σ0 →0x22d26
<Blob 0x22c7e [12] @> Δ-12 {[«12""»]}
<POP 22c90-22c92 StackAdj> Δ-4 {[«12""»]|[-4-]}
<Lit 0x22c92 11> {[«12""»]|[$$Not on line]}
<POP 22c9e-22ca0 StackAdj> Δ-2 {[«12""»]|[$$Not on line]|[-2-]}
<MI 22ca0 MOVE.W (A6+0xc),(A7)> {[«12""»]|[$$Not on line]|[2, '(A6+0xc)']}
<Call 0x22ca2 0x21cbc> {[«12""»]|[$$Not on line]|[2, '(A6+0xc)']}
<POP 22ca6-22caa StackAdj> Δ+18 {}
<MI 22caa CLR.B (A0+0x22a)> {}
<MI 22cae SUBQ.L #0x1,0x2579e> {}
<MI 22cb4 BRA 0x22d26> {}
<POP 22cb6-22cc0 Naked> Σ0 ↓ →0x22cf6 ←0x22c64
<MI 22cb6 MOVE.W (A0+0x23e8),D0> {}
<MI 22cba ANDI.W #0x0008,D0> {}
<MI 22cbe BEQ 0x22cf6> {}
<POP 22cc0-22cec Naked> Σ0 ↓
<Blob 0x22cc0 [14] @> Δ-14 {[«14""»]}
<POP 22cd2-22cd4 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x22cd4 13> {[«14""»]|[$$Wrong density]}
<POP 22ce0-22ce2 StackAdj> Δ-2 {[«14""»]|[$$Wrong density]|[-2-]}
<MI 22ce2 MOVE.W (A6+0xc),(A7)> {[«14""»]|[$$Wrong density]|[2, '(A6+0xc)']}
<Call 0x22ce4 0x21cbc> {[«14""»]|[$$Wrong density]|[2, '(A6+0xc)']}
<POP 22ce8-22cec StackAdj> Δ+20 {}
<POP 22cec-22cf6 Naked> Σ0 →0x22d26 ←0x22d00
<MI 22cec MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<Call 0x22cee 0x22bfe> {[2, '(A6+0xc)']}
<POP 22cf2-22cf4 StackAdj> Δ+2 {}
<MI 22cf4 BRA 0x22d26> {}
<POP 22cf6-22d00 Naked> Σ0 ↓ →0x22d20 ←0x22cb6
<MI 22cf6 MOVE.W (A0+0x23e4),D0> {}
<MI 22cfa ANDI.W #0x0020,D0> {}
<MI 22cfe BEQ 0x22d20> {}
<POP 22d00-22d20 Naked> Σ0 →0x22cec
<Blob 0x22d00 [4] @> Δ-4 {[«4""»]}
<POP 22d04-22d06 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x22d06 4> {[«4""»]|[$$Tape]}
<POP 22d12-22d14 StackAdj> Δ-2 {[«4""»]|[$$Tape]|[-2-]}
<MI 22d14 MOVE.W (A6+0xc),(A7)> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<Call 0x22d16 0x21cbc> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<POP 22d1a-22d1e StackAdj> Δ+10 {}
<MI 22d1e BRA 0x22cec> {}
<POP 22d20-22d26 Naked> Σ0 ↓ ←0x22cf6
<MI 22d20 MOVEA.L (A6+0x8),A0> {}
<MI 22d24 MOVE.B #0x01,(A0)> {}
<POP 22d26-22d2e Epilogue> Σ0 ←0x22c7e ←0x22cec
@ 22d2e
<LVAR 0x00c 2(r)>
<POP 22d2e-22d72 Body>
<POP 22d2e-22d40 Prologue> Σ0 ↓
<POP 22d40-22d6e Naked> Σ0 ↓
<Blob 0x22d40 [4] @> Δ-4 {[«4""»]}
<POP 22d44-22d46 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x22d46 4> {[«4""»]|[$$Tape]}
<POP 22d58-22d5a StackAdj> Δ-2 {[«4""»]|[$$Tape]|[-2-]}
<MI 22d5a MOVE.W (A6+0xc),(A7)> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<Call 0x22d5e 0x21cbc> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<POP 22d62-22d64 StackAdj> Δ+8 {[-2-]}
<MI 22d64 MOVE.W (A6+0xc),(A7)> {[2, '(A6+0xc)']}
<Call 0x22d68 0x22bfe> {[2, '(A6+0xc)']}
<POP 22d6c-22d6e StackAdj> Δ+2 {}
<POP 22d6e-22d72 Epilogue> Σ0
@ 22d72
<LVAR 0x00c 2(r)>
<LVAR 0x008 4(r)>
<POP 22d72-22ef2 Body>
<POP 22d72-22d88 Prologue> Σ0 ↓
<POP 22d88-22da4 RegCacheLoad> Σ0 ↓
<POP 22da4-22dbe Naked> Σ0 ↓ →0x22e12
<MI 22da4 MOVE.W #0x21c0,D0> {}
<MI 22da8 MULS.W (A6+0xc),D0> {}
<MI 22daa LEA.L 0x2578e,A0> {}
<MI 22db0 LEA.L (A0+D0.W),A0> {}
<MI 22db4 MOVE.W (A0+0x23e2),D0> {}
<MI 22db8 ANDI.W #0x1000,D0> {}
<MI 22dbc BEQ 0x22e12> {}
<POP 22dbe-22dc6 Naked> Σ0 ↓ →0x22dee
<MI 22dbe MOVE.B (A0+0x22c),D0> {}
<MI 22dc2 CMP.B #0x2003,D0> {}
<MI 22dc4 BNE 0x22dee> {}
<POP 22dc6-22dee Naked> Σ0 →0x22e06
<Blob 0x22dc6 [12] @> Δ-12 {[«12""»]}
<POP 22dd6-22dd8 StackAdj> Δ-4 {[«12""»]|[-4-]}
<Lit 0x22dd8 11> {[«12""»]|[$$Record long]}
<POP 22de4-22de6 StackAdj> Δ-2 {[«12""»]|[$$Record long]|[-2-]}
<MI 22de6 MOVE.W (A6+0xc),(A7)> {[«12""»]|[$$Record long]|[2, '(A6+0xc)']}
<Call 0x22de8 0x21cbc> {[«12""»]|[$$Record long]|[2, '(A6+0xc)']}
<POP 22dea-22dec StackAdj> Δ+18 {}
<MI 22dec BRA 0x22e06> {}
<POP 22dee-22e06 Naked> Σ0 ↓ ←0x22dbe
<Blob 0x22dee [4] @> Δ-4 {[«4""»]}
<POP 22df2-22df4 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x22df4 4> {[«4""»]|[$$Tape]}
<POP 22dfe-22e00 StackAdj> Δ-2 {[«4""»]|[$$Tape]|[-2-]}
<MI 22e00 MOVE.W (A6+0xc),(A7)> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<Call 0x22e02 0x21cbc> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<POP 22e04-22e06 StackAdj> Δ+10 {}
<POP 22e06-22e12 Naked> Σ0 →0x22eea ←0x22dc6
<MI 22e06 MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<Call 0x22e08 0x22bfe> {[2, '(A6+0xc)']}
<POP 22e0c-22e0e StackAdj> Δ+2 {}
<MI 22e0e BRA 0x22eea> {}
<POP 22e12-22e1c Naked> Σ0 ↓ →0x22e74 ←0x22da4
<MI 22e12 MOVE.W (A0+0x23e2),D0> {}
<MI 22e16 ANDI.W #0x4000,D0> {}
<MI 22e1a BEQ 0x22e74> {}
<POP 22e1c-22e24 Naked> Σ0 ↓ →0x22e2c
<MI 22e1c MOVE.B (A0+0x22c),D0> {}
<MI 22e20 CMP.B #0x04,D0> {}
<MI 22e22 BNE 0x22e2c> {}
<POP 22e24-22e2c Naked> Σ0 →0x22e72
<MI 22e24 MOVEA.L (A6+0x8),A0> {}
<MI 22e28 MOVE.B #0x01,(A0)> {}
<MI 22e2a BRA 0x22e72> {}
<POP 22e2c-22e30 Naked> Σ0 ↓ →0x22e52 ←0x22e1c
<MI 22e2c CMP.B #0x2003,D0> {}
<MI 22e2e BNE 0x22e52> {}
<POP 22e30-22e52 Naked> Σ0 →0x22e6a
<Blob 0x22e30 [4] @> Δ-4 {[«4""»]}
<Blob 0x22e34 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x22e38 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 22e3c-22e3e StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x22e3e 12> {[«4""»]|[«4""»]|[«4""»]|[$$Record short]}
<POP 22e48-22e4a StackAdj> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[$$Record short]|[-2-]}
<MI 22e4a MOVE.W (A6+0xc),(A7)> {[«4""»]|[«4""»]|[«4""»]|[$$Record short]|[2, '(A6+0xc)']}
<Call 0x22e4c 0x21cbc> {[«4""»]|[«4""»]|[«4""»]|[$$Record short]|[2, '(A6+0xc)']}
<POP 22e4e-22e50 StackAdj> Δ+18 {}
<MI 22e50 BRA 0x22e6a> {}
<POP 22e52-22e6a Naked> Σ0 ↓ ←0x22e2c
<Blob 0x22e52 [4] @> Δ-4 {[«4""»]}
<POP 22e56-22e58 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x22e58 4> {[«4""»]|[$$Tape]}
<POP 22e62-22e64 StackAdj> Δ-2 {[«4""»]|[$$Tape]|[-2-]}
<MI 22e64 MOVE.W (A6+0xc),(A7)> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<Call 0x22e66 0x21cbc> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<POP 22e68-22e6a StackAdj> Δ+10 {}
<POP 22e6a-22e72 Naked> Σ0 ↓ ←0x22e30
<MI 22e6a MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<Call 0x22e6c 0x22bfe> {[2, '(A6+0xc)']}
<POP 22e70-22e72 StackAdj> Δ+2 {}
<POP 22e72-22e74 Naked> Σ0 →0x22eea ←0x22e24
<MI 22e72 BRA 0x22eea> {}
<POP 22e74-22e7e Naked> Σ0 ↓ →0x22eb2 ←0x22e12
<MI 22e74 MOVE.W (A0+0x23e2),D0> {}
<MI 22e78 ANDI.W #0x8000,D0> {}
<MI 22e7c BEQ 0x22eb2> {}
<POP 22e7e-22e86 Naked> Σ0 ↓ →0x22eb2
<MI 22e7e MOVE.B (A0+0x22c),D0> {}
<MI 22e82 CMP.B #0x2003,D0> {}
<MI 22e84 BNE 0x22eb2> {}
<POP 22e86-22eb2 Naked> Σ0 →0x22ee2
<Blob 0x22e86 [16] @> Δ-16 {[«16""»]}
<POP 22e98-22e9a StackAdj> Δ-4 {[«16""»]|[-4-]}
<Lit 0x22e9a 15> {[«16""»]|[$$Unexpected mark]}
<POP 22ea6-22ea8 StackAdj> Δ-2 {[«16""»]|[$$Unexpected mark]|[-2-]}
<MI 22ea8 MOVE.W (A6+0xc),(A7)> {[«16""»]|[$$Unexpected mark]|[2, '(A6+0xc)']}
<Call 0x22eaa 0x21cbc> {[«16""»]|[$$Unexpected mark]|[2, '(A6+0xc)']}
<POP 22eac-22eb0 StackAdj> Δ+22 {}
<MI 22eb0 BRA 0x22ee2> {}
<POP 22eb2-22eba Naked> Σ0 ↓ →0x22ec2 ←0x22e74 ←0x22e7e
<MI 22eb2 MOVE.W (A0+0x23e2),D0> {}
<MI 22eb6 AND.W #0x2003,D0> {}
<MI 22eb8 BNE 0x22ec2> {}
<POP 22eba-22ec2 Naked> Σ0 ↓ →0x22eca
<MI 22eba MOVE.W (A0+0x23e8),D0> {}
<MI 22ebe AND.W #0x01,D0> {}
<MI 22ec0 BEQ 0x22eca> {}
<POP 22ec2-22eca Naked> Σ0 →0x22eea ←0x22eb2
<MI 22ec2 MOVEA.L (A6+0x8),A0> {}
<MI 22ec6 MOVE.B #0x01,(A0)> {}
<MI 22ec8 BRA 0x22eea> {}
<POP 22eca-22ee2 Naked> Σ0 ↓ ←0x22eba
<Blob 0x22eca [4] @> Δ-4 {[«4""»]}
<POP 22ece-22ed0 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x22ed0 4> {[«4""»]|[$$Tape]}
<POP 22eda-22edc StackAdj> Δ-2 {[«4""»]|[$$Tape]|[-2-]}
<MI 22edc MOVE.W (A6+0xc),(A7)> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<Call 0x22ede 0x21cbc> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<POP 22ee0-22ee2 StackAdj> Δ+10 {}
<POP 22ee2-22eea Naked> Σ0 ↓ ←0x22e86
<MI 22ee2 MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<Call 0x22ee4 0x22bfe> {[2, '(A6+0xc)']}
<POP 22ee8-22eea StackAdj> Δ+2 {}
<POP 22eea-22ef2 Epilogue> Σ0 ←0x22e06 ←0x22e72 ←0x22ec2
@ 22ef2
<LVAR 0x00c 2(r)>
<LVAR 0x008 4(r)>
<POP 22ef2-22fd4 Body>
<POP 22ef2-22f08 Prologue> Σ0 ↓
<POP 22f08-22f14 RegCacheLoad> Σ0 ↓
<POP 22f14-22f2e Naked> Σ0 ↓ →0x22f64
<MI 22f14 MOVE.W #0x21c0,D0> {}
<MI 22f18 MULS.W (A6+0xc),D0> {}
<MI 22f1a LEA.L 0x2578e,A0> {}
<MI 22f20 LEA.L (A0+D0.W),A0> {}
<MI 22f24 MOVE.W (A0+0x23da),D0> {}
<MI 22f28 ANDI.W #0x0040,D0> {}
<MI 22f2c BEQ 0x22f64> {}
<POP 22f2e-22f58 Naked> Σ0 ↓
<Blob 0x22f2e [8] @> Δ-8 {[«8""»]}
<POP 22f3e-22f40 StackAdj> Δ-4 {[«8""»]|[-4-]}
<Lit 0x22f40 7> {[«8""»]|[$$On line]}
<POP 22f4c-22f4e StackAdj> Δ-2 {[«8""»]|[$$On line]|[-2-]}
<MI 22f4e MOVE.W (A6+0xc),(A7)> {[«8""»]|[$$On line]|[2, '(A6+0xc)']}
<Call 0x22f50 0x21cbc> {[«8""»]|[$$On line]|[2, '(A6+0xc)']}
<POP 22f54-22f58 StackAdj> Δ+14 {}
<POP 22f58-22f64 Naked> Σ0 →0x22fcc ←0x22f6e
<MI 22f58 CLR.B (A0+0x22a)> {}
<MI 22f5c SUBQ.L #0x1,0x2579e> {}
<MI 22f62 BRA 0x22fcc> {}
<POP 22f64-22f6e Naked> Σ0 ↓ →0x22f96 ←0x22f14
<MI 22f64 MOVE.W (A0+0x23e2),D0> {}
<MI 22f68 ANDI.W #0x0800,D0> {}
<MI 22f6c BEQ 0x22f96> {}
<POP 22f6e-22f96 Naked> Σ0 →0x22f58
<Blob 0x22f6e [10] @> Δ-10 {[«10""»]}
<POP 22f7a-22f7c StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x22f7c 10> {[«10""»]|[$$Write lock]}
<POP 22f88-22f8a StackAdj> Δ-2 {[«10""»]|[$$Write lock]|[-2-]}
<MI 22f8a MOVE.W (A6+0xc),(A7)> {[«10""»]|[$$Write lock]|[2, '(A6+0xc)']}
<Call 0x22f8c 0x21cbc> {[«10""»]|[$$Write lock]|[2, '(A6+0xc)']}
<POP 22f90-22f94 StackAdj> Δ+16 {}
<MI 22f94 BRA 0x22f58> {}
<POP 22f96-22fa0 Naked> Σ0 ↓ →0x22fa8 ←0x22f64
<MI 22f96 MOVE.W (A0+0x23e2),D0> {}
<MI 22f9a ANDI.W #0x0002,D0> {}
<MI 22f9e BEQ 0x22fa8> {}
<POP 22fa0-22fa8 Naked> Σ0 →0x22fcc
<MI 22fa0 MOVEA.L (A6+0x8),A0> {}
<MI 22fa4 MOVE.B #0x01,(A0)> {}
<MI 22fa6 BRA 0x22fcc> {}
<POP 22fa8-22fcc Naked> Σ0 ↓ ←0x22f96
<Blob 0x22fa8 [4] @> Δ-4 {[«4""»]}
<POP 22fac-22fae StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x22fae 4> {[«4""»]|[$$Tape]}
<POP 22fba-22fbc StackAdj> Δ-2 {[«4""»]|[$$Tape]|[-2-]}
<MI 22fbc MOVE.W (A6+0xc),(A7)> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<Call 0x22fbe 0x21cbc> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<POP 22fc2-22fc4 StackAdj> Δ+8 {[-2-]}
<MI 22fc4 MOVE.W (A6+0xc),(A7)> {[2, '(A6+0xc)']}
<Call 0x22fc6 0x22bfe> {[2, '(A6+0xc)']}
<POP 22fca-22fcc StackAdj> Δ+2 {}
<POP 22fcc-22fd4 Epilogue> Σ0 ←0x22f58 ←0x22fa0
@ 22fd4
<LVAR 0x00c 2(r)>
<POP 22fd4-23082 Body>
<POP 22fd4-22fea Prologue> Σ0 ↓
<POP 22fea-22ff2 RegCacheLoad> Σ0 ↓
<POP 22ff2-2300a Naked> Σ0 ↓ →0x2300e
<MI 22ff2 MOVE.W #0x21c0,D0> {}
<MI 22ff6 MULS.W (A6+0xc),D0> {}
<MI 22ff8 LEA.L 0x2578e,A0> {}
<MI 22ffe LEA.L (A0+D0.W),A0> {}
<MI 23002 MOVE.B (A0+0x22c),D0> {}
<MI 23006 CMP.B #0x03,D0> {}
<MI 23008 BEQ 0x2300e> {}
<POP 2300a-2300e Naked> Σ0 ↓ →0x23050
<MI 2300a CMP.B #0x02,D0> {}
<MI 2300c BNE 0x23050> {}
<POP 2300e-2301a Naked> Σ0 ↓ →0x2302a ←0x22ff2
<MI 2300e MOVE.L (A0+0x244),D1> {}
<MI 23012 CMPI.L #0x0000000a,D1> {}
<MI 23018 BLE 0x2302a> {}
<POP 2301a-2302a Naked> Σ0 →0x2304e
<MI 2301a MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<Call 0x2301c 0x22a6c> {[2, '(A6+0xc)']}
<MI 23020 MOVE.W (A6+0xc),(A7)> {[2, '(A6+0xc)']}
<Call 0x23022 0x22bfe> {[2, '(A6+0xc)']}
<POP 23026-23028 StackAdj> Δ+2 {}
<MI 23028 BRA 0x2304e> {}
<POP 2302a-23032 Naked> Σ0 ↓ →0x23042 ←0x2300e
<MI 2302a MOVE.W (A0+0x23da),D1> {}
<MI 2302e AND.W #0x02,D1> {}
<MI 23030 BNE 0x23042> {}
<POP 23032-23036 Naked> Σ0 ↓ →0x2303c
<MI 23032 CMP.B #0x03,D0> {}
<MI 23034 BNE 0x2303c> {}
<POP 23036-2303c Naked> Σ0 →0x23042
<MI 23036 MOVE.B #0x03,(A0+0x23d4)> {}
<MI 2303a BRA 0x23042> {}
<POP 2303c-23042 Naked> Σ0 ↓ ←0x23032
<MI 2303c MOVE.B #0x05,(A0+0x23d4)> {}
<POP 23042-2304e Naked> Σ0 ↓ ←0x2302a ←0x23036
<MI 23042 MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<Call 0x23044 0x217ba> {[2, '(A6+0xc)']}
<POP 23048-2304a StackAdj> Δ+2 {}
<MI 2304a ADDQ.L #0x1,(A0+0x244)> {}
<POP 2304e-23050 Naked> Σ0 →0x2307a ←0x2301a
<MI 2304e BRA 0x2307a> {}
<POP 23050-2307a Naked> Σ0 ↓ ←0x2300a
<Blob 0x23050 [4] @> Δ-4 {[«4""»]}
<POP 23054-23056 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x23056 4> {[«4""»]|[$$Tape]}
<POP 23068-2306a StackAdj> Δ-2 {[«4""»]|[$$Tape]|[-2-]}
<MI 2306a MOVE.W (A6+0xc),(A7)> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<Call 0x2306c 0x21cbc> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<POP 23070-23072 StackAdj> Δ+8 {[-2-]}
<MI 23072 MOVE.W (A6+0xc),(A7)> {[2, '(A6+0xc)']}
<Call 0x23074 0x22bfe> {[2, '(A6+0xc)']}
<POP 23078-2307a StackAdj> Δ+2 {}
<POP 2307a-23082 Epilogue> Σ0 ←0x2304e
@ 23082
<LVAR 0x00c 2(r)>
<POP 23082-230c6 Body>
<POP 23082-23094 Prologue> Σ0 ↓
<POP 23094-230c2 Naked> Σ0 ↓
<Blob 0x23094 [4] @> Δ-4 {[«4""»]}
<POP 23098-2309a StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x2309a 4> {[«4""»]|[$$Tape]}
<POP 230ac-230ae StackAdj> Δ-2 {[«4""»]|[$$Tape]|[-2-]}
<MI 230ae MOVE.W (A6+0xc),(A7)> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<Call 0x230b2 0x21cbc> {[«4""»]|[$$Tape]|[2, '(A6+0xc)']}
<POP 230b6-230b8 StackAdj> Δ+8 {[-2-]}
<MI 230b8 MOVE.W (A6+0xc),(A7)> {[2, '(A6+0xc)']}
<Call 0x230bc 0x22bfe> {[2, '(A6+0xc)']}
<POP 230c0-230c2 StackAdj> Δ+2 {}
<POP 230c2-230c6 Epilogue> Σ0
@ 230c6
<LVAR 0x00c 2(r)>
<POP 230c6-23126 Body>
<POP 230c6-230dc Prologue> Σ0 ↓
<POP 230dc-2311e Naked> Σ0 ↓
<Blob 0x230dc [4] @> Δ-4 {[«4""»]}
<POP 230e0-230e2 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x230e2 4> {[«4""»]|[$$Unit]}
<POP 230f4-230f6 StackAdj> Δ-2 {[«4""»]|[$$Unit]|[-2-]}
<MI 230f6 MOVE.W (A6+0xc),(A7)> {[«4""»]|[$$Unit]|[2, '(A6+0xc)']}
<Call 0x230fa 0x21cbc> {[«4""»]|[$$Unit]|[2, '(A6+0xc)']}
<POP 230fe-23102 StackAdj> Δ+10 {}
<MI 23102 MOVE.W #0x21c0,D0> {}
<MI 23106 MULS.W (A6+0xc),D0> {}
<MI 2310a LEA.L 0x2578e,A0> {}
<MI 23110 LEA.L (A0+D0.W),A0> {}
<MI 23114 CLR.B (A0+0x22a)> {}
<MI 23118 SUBQ.L #0x1,0x2579e> {}
<POP 2311e-23126 Epilogue> Σ0
@ 23126
<LVAR 0x00c 2(r)>
<LVAR 0x008 4(r)>
<POP 23126-231f6 Body> Δ+36
<POP 23126-2313c Prologue> Σ0 ↓
<POP 2313c-23142 RegCacheLoad> Σ0 ↓
<POP 23142-2316c Naked> Σ0 ↓ →0x23170
<MI 23142 MOVEA.L (A6+0x8),A0> {}
<MI 23146 CLR.B (A0)> {}
<MI 23148 MOVE.W #0x21c0,D0> {}
<MI 2314c MULS.W (A6+0xc),D0> {}
<MI 2314e LEA.L 0x2578e,A1> {}
<MI 23154 LEA.L (A1+D0.W),A1> {}
<MI 23158 MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<MI 2315a PEA.L (A1+0x23da)> Δ-4 {[2, '(A6+0xc)']|[4, '^(A1+0x23da)']}
<Call 0x2315e 0x22b8a> {[2, '(A6+0xc)']|[4, '^(A1+0x23da)']}
<POP 23162-23164 StackAdj> Δ+6 {}
<MI 23164 MOVE.W (A1+0x23e2),D0> {}
<MI 23168 AND.W #0x01,D0> {}
<MI 2316a BEQ 0x23170> {}
<POP 2316c-23170 Naked> Σ0 ↓
<MI 2316c MOVE.B #0x01,(A1+0x22b)> {}
<POP 23170-23196 Naked> Σ0 →0x231a6 →0x231b0 →0x231ba →0x231c4 →0x231ce →0x231d8 →0x231da →0x231e4 ←0x23142
<MI 23170 MOVE.W (A1+0x23da),D0> {}
<MI 23174 ANDI.W #0x000e,D0> {}
<MI 23178 LSR.W #0x1,D0> {}
<MI 2317a CLR.L D1> {}
<MI 2317c MOVE.W D0,D1> {}
<MI 2317e MOVE.L D1,D7> {}
<MI 23180 MOVE.L D7,D0> {}
<POP 0x23182 LimitCheck 0x0 ≤ D0 ≤ 0x7> {}
<MI 2318c ADD.W D0,D0> {}
<MI 2318e SWITCH D0.W> {}
<POP 231a6-231b0 Naked> Σ0 Δ-6 →0x231ec ←0x23170
<MI 231a6 MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<MI 231a8 PEA.L (A0)> Δ-4 {[2, '(A6+0xc)']|[4, '^(A0)']}
<Call 0x231aa 0x22c42> {[2, '(A6+0xc)']|[4, '^(A0)']}
<MI 231ae BRA 0x231ec> {[2, '(A6+0xc)']|[4, '^(A0)']}
<POP 231b0-231ba Naked> Σ0 Δ-6 →0x231ec ←0x23170
<MI 231b0 MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<MI 231b2 PEA.L (A0)> Δ-4 {[2, '(A6+0xc)']|[4, '^(A0)']}
<Call 0x231b4 0x22d2e> {[2, '(A6+0xc)']|[4, '^(A0)']}
<MI 231b8 BRA 0x231ec> {[2, '(A6+0xc)']|[4, '^(A0)']}
<POP 231ba-231c4 Naked> Σ0 Δ-6 →0x231ec ←0x23170
<MI 231ba MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<MI 231bc PEA.L (A0)> Δ-4 {[2, '(A6+0xc)']|[4, '^(A0)']}
<Call 0x231be 0x22d72> {[2, '(A6+0xc)']|[4, '^(A0)']}
<MI 231c2 BRA 0x231ec> {[2, '(A6+0xc)']|[4, '^(A0)']}
<POP 231c4-231ce Naked> Σ0 Δ-6 →0x231ec ←0x23170
<MI 231c4 MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<MI 231c6 PEA.L (A0)> Δ-4 {[2, '(A6+0xc)']|[4, '^(A0)']}
<Call 0x231c8 0x22ef2> {[2, '(A6+0xc)']|[4, '^(A0)']}
<MI 231cc BRA 0x231ec> {[2, '(A6+0xc)']|[4, '^(A0)']}
<POP 231ce-231d8 Naked> Σ0 Δ-6 →0x231ec ←0x23170 ←0x231d8
<MI 231ce MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<MI 231d0 PEA.L (A0)> Δ-4 {[2, '(A6+0xc)']|[4, '^(A0)']}
<Call 0x231d2 0x22fd4> {[2, '(A6+0xc)']|[4, '^(A0)']}
<MI 231d6 BRA 0x231ec> {[2, '(A6+0xc)']|[4, '^(A0)']}
<POP 231d8-231da Naked> Σ0 →0x231ce ←0x23170
<MI 231d8 BRA 0x231ce> {}
<POP 231da-231e4 Naked> Σ0 Δ-6 →0x231ec ←0x23170
<MI 231da MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<MI 231dc PEA.L (A0)> Δ-4 {[2, '(A6+0xc)']|[4, '^(A0)']}
<Call 0x231de 0x23082> {[2, '(A6+0xc)']|[4, '^(A0)']}
<MI 231e2 BRA 0x231ec> {[2, '(A6+0xc)']|[4, '^(A0)']}
<POP 231e4-231ec Naked> Σ0 Δ-6 ↓ ←0x23170
<MI 231e4 MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']}
<MI 231e6 PEA.L (A0)> Δ-4 {[2, '(A6+0xc)']|[4, '^(A0)']}
<Call 0x231e8 0x230c6> {[2, '(A6+0xc)']|[4, '^(A0)']}
<POP 231ec-231ee Naked> Σ-6 Δ+6 ↓ ←0x231a6 ←0x231b0 ←0x231ba ←0x231c4 ←0x231ce ←0x231da
<POP 231ec-231ee StackAdj> Δ+6 {}
<POP 231ee-231f6 Epilogue> Σ0
@ 231f6
<LVAR 0x008 2(r)>
<POP 231f6-2323c Body>
<POP 231f6-2320c Prologue> Σ0 ↓
<POP 2320c-23234 Naked> Σ0 ↓
<MI 2320c MOVE.W #0x21c0,D0> {}
<MI 23210 MULS.W (A6+0x8),D0> {}
<MI 23214 LEA.L 0x2578e,A0> {}
<MI 2321a LEA.L (A0+D0.W),A0> {}
<MI 2321e MOVE.B #0x0b,(A0+0x23d4)> {}
<MI 23224 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x23228 0x217ba> {[2, '(A6+0x8)']}
<POP 2322c-2322e StackAdj> Δ+2 {}
<MI 2322e MOVE.B #0x01,(A0+0x22c)> {}
<POP 23234-2323c Epilogue> Σ0
@ 2323c
<LVAR 0x008 2(r)>
<POP 2323c-23324 Body>
<POP 2323c-23252 Prologue> Σ0 ↓
<POP 23252-23254 RegCacheLoad> Σ0 ↓
<POP 23254-23280 Naked> Σ0 ↓ →0x23282
<POP 23254-23256 StackAdj> Δ-4 {[-4-]}
<Call 0x23256 0x20cc2> {[-4-]}
<MI 2325a MOVE.L (A7)+,D0> Δ+4 {}
<POP 0x2325c LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 23266 MOVE.W D0,D6> {}
<POP 23268-2326a StackAdj> Δ-4 {[-4-]}
<Const 0x2326a 0x12.4> Δ-4 {[-4-]|[##18]}
<Const 0x2326e 0x2000.4> Δ-4 {[-4-]|[##18]|[##8192]}
<Call 0x23272 0x20c68> {[-4-]|[##18]|[##8192]}
<POP 23276-23278 StackAdj> Δ+8 {[-4-]}
<MI 23278 MOVE.L (A7)+,D7> Δ+4 {}
<MI 2327a BTST.L #0x0,D7> {}
<MI 2327e BEQ 0x23282> {}
<POP 23280-23282 Naked> Σ0 ↓
<MI 23280 ADDQ.L #0x1,D7> {}
<POP 23282-2331c Naked> Σ0 ↓ ←0x23254
<MI 23282 MOVE.W #0x21c0,D0> {}
<MI 23286 MULS.W (A6+0x8),D0> {}
<MI 2328a LEA.L 0x2578e,A0> {}
<MI 23290 LEA.L (A0+D0.W),A0> {}
<POP 23294-23296 StackAdj> Δ-4 {[-4-]}
<MI 23296 MOVE.B (A0+0x3d0),(A7)> {[-4-]}
<MI 2329a MOVE.B (A0+0x3d1),(A7+0x1)> {[-4-]}
<MI 232a0 MOVE.B (A0+0x3d2),(A7+0x2)> {[-4-]}
<MI 232a6 MOVE.B (A0+0x3d3),(A7+0x3)> {[-4-]}
<MI 232ac MOVE.W D6,-(A7)> Δ-2 {[-4-]|[2, 'D6']}
<MI 232ae MOVE.L D7,D4> {[-4-]|[2, 'D6']}
<MI 232b0 MOVEQ.L #0x02,D3> {[-4-]|[2, 'D6']}
<Call 0x232b2 0x10294> {[-4-]|[2, 'D6']}
?divs_d3_d4
<POP 232b8-232ba StackAdj> Δ-2 {[-4-]|[2, 'D6']|[-2-]}
<POP 0x232ba LimitCheck 0x0 ≤ D4 ≤ 0xffff> {[-4-]|[2, 'D6']|[-2-]}
<MI 232c4 MOVE.W D4,(A7)> {[-4-]|[2, 'D6']|[2, 'D4']}
<Call 0x232c6 0x10236> {[-4-]|[2, 'D6']|[2, 'D4']}
KERNCALL_1b
<POP 232cc-232ce StackAdj> Δ+8 {}
<MI 232ce MOVE.B #0x04,(A0+0x23d4)> {}
<MI 232d4 MOVE.L D7,(A0+0x23d6)> {}
<MI 232d8 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x232dc 0x217ba> {[2, '(A6+0x8)']}
<POP 232e0-232e2 StackAdj> Δ+2 {}
<MI 232e2 MOVE.B #0x02,(A0+0x22c)> {}
<MI 232e8 MOVE.L (A0+0x248),D0> {}
<POP 0x232ec LimitCheck 0x0 ≤ D0 ≤ 0x3f> {}
<MI 232f2 MOVE.L D0,D4> {}
<MI 232f4 MOVEQ.L #0x06,D3> {}
<Call 0x232f6 0x1028c> {}
?muls_d3_d4
<MI 232fc LEA.L (A0+0x22a),A1> {}
<MI 23300 MOVE.W D6,(A1+D4.L+#0x26)> {}
<MI 23304 MOVE.L (A0+0x248),D0> {}
<POP 0x23308 LimitCheck 0x0 ≤ D0 ≤ 0x3f> {}
<MI 2330e MOVE.L D0,D4> {}
<MI 23310 MOVEQ.L #0x06,D3> {}
<Call 0x23312 0x1028c> {}
?muls_d3_d4
<MI 23318 MOVE.L D7,(A1+D4.L+#0x28)> {}
<POP 2331c-23324 Epilogue> Σ0
@ 23324
<LVAR 0x008 2(r)>
<POP 23324-23384 Body>
<POP 23324-2333a Prologue> Σ0 ↓
<POP 2333a-2337c Naked> Σ0 ↓
<MI 2333a MOVE.W #0x21c0,D0> {}
<MI 2333e MULS.W (A6+0x8),D0> {}
<MI 23342 LEA.L 0x2578e,A0> {}
<MI 23348 LEA.L (A0+D0.W),A0> {}
<POP 2334c-2334e StackAdj> Δ-4 {[-4-]}
<Const 0x2334e 0x1.4> Δ-4 {[-4-]|[##1]}
<MI 23352 MOVE.L (A0+0x24c),-(A7)> Δ-4 {[-4-]|[##1]|[4, '(A0+0x24c)']}
<Call 0x23356 0x20c68> {[-4-]|[##1]|[4, '(A0+0x24c)']}
<POP 2335a-2335c StackAdj> Δ+8 {[-4-]}
<MI 2335c MOVE.L (A7)+,D7> Δ+4 {}
<MI 2335e MOVE.B #0x07,(A0+0x23d4)> {}
<MI 23364 MOVE.L D7,(A0+0x23d6)> {}
<MI 23368 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x2336c 0x217ba> {[2, '(A6+0x8)']}
<POP 23370-23372 StackAdj> Δ+2 {}
<MI 23372 SUB.L D7,(A0+0x248)> {}
<MI 23376 MOVE.B #0x04,(A0+0x22c)> {}
<POP 2337c-23384 Epilogue> Σ0
@ 23384
<LVAR 0x008 2(r)>
<POP 23384-233d6 Body>
<POP 23384-2339a Prologue> Σ0 ↓
<POP 2339a-233ce Naked> Σ0 ↓
<MI 2339a MOVE.W #0x21c0,D0> {}
<MI 2339e MULS.W (A6+0x8),D0> {}
<MI 233a2 LEA.L 0x2578e,A0> {}
<MI 233a8 LEA.L (A0+D0.W),A0> {}
<MI 233ac MOVE.B #0x09,(A0+0x23d4)> {}
<MI 233b2 MOVE.L #0x1,(A0+0x23d6)> {}
<MI 233ba MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x233be 0x217ba> {[2, '(A6+0x8)']}
<POP 233c2-233c4 StackAdj> Δ+2 {}
<MI 233c4 CLR.L (A0+0x248)> {}
<MI 233c8 MOVE.B #0x05,(A0+0x22c)> {}
<POP 233ce-233d6 Epilogue> Σ0
@ 233d6
<LVAR 0x008 2(r)>
<POP 233d6-23424 Body>
<POP 233d6-233ec Prologue> Σ0 ↓
<POP 233ec-2341c Naked> Σ0 ↓
<MI 233ec MOVE.W #0x21c0,D0> {}
<MI 233f0 MULS.W (A6+0x8),D0> {}
<MI 233f4 LEA.L 0x2578e,A0> {}
<MI 233fa LEA.L (A0+D0.W),A0> {}
<MI 233fe MOVE.B #0x08,(A0+0x23d4)> {}
<MI 23404 MOVE.L #0x1,(A0+0x23d6)> {}
<MI 2340c MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x23410 0x217ba> {[2, '(A6+0x8)']}
<POP 23414-23416 StackAdj> Δ+2 {}
<MI 23416 MOVE.B #0x06,(A0+0x22c)> {}
<POP 2341c-23424 Epilogue> Σ0
@ 23424
<LVAR 0x00a 2(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 1(rw)>
<POP 23424-23536 Body> Δ+2
<POP 23424-2343a Prologue> Σ0 ↓
<POP 2343a-23446 RegCacheLoad> Σ0 ↓
<POP 23446-2345c Naked> Σ0 ↓ →0x23460
<MI 23446 MOVE.W #0x21c0,D0> {}
<MI 2344a MULS.W (A6+0xa),D0> {}
<MI 2344c LEA.L 0x2578e,A0> {}
<MI 23452 LEA.L (A0+D0.W),A0> {}
<MI 23456 TST.B (A6+0x8)> {}
<MI 2345a BEQ 0x23460> {}
<POP 2345c-23460 Naked> Σ0 →0x2346a
<MI 2345c MOVE.B #0x01,(A6-0x4)> {}
<MI 2345e BRA 0x2346a> {}
<POP 23460-2346a Naked> Σ0 ↓ ←0x23446
<MI 23460 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Pointer.fp 0x23462 <LVAR -0x004 @ 1(rw)>> Δ-4 {[2, '(A6+0xa)']|[@@-4]}
<Call 0x23464 0x23126> {[2, '(A6+0xa)']|[@@-4]}
<POP 23468-2346a StackAdj> Δ+6 {}
<POP 2346a-23470 Naked> Σ0 ↓ →0x2352e ←0x2345c
<MI 2346a TST.B (A6-0x4)> {}
<MI 2346c BEQ 0x2352e> {}
<POP 23470-23478 Naked> Σ0 ↓ →0x234b0
<MI 23470 TST.B 0x257a2> {}
<MI 23476 BEQ 0x234b0> {}
<POP 23478-23488 Naked> Σ0 ↓ →0x234b0
<POP 23478-2347a StackAdj> Δ-4 {[-4-]}
<MI 2347a MOVE.W (A6+0xa),-(A7)> Δ-2 {[-4-]|[2, '(A6+0xa)']}
<MI 2347c ADD.W #0x10,(A7)> {[-6-]}
<Call 0x2347e 0x211b0> {[-6-]}
<POP 23482-23484 StackAdj> Δ+2 {[-4-]}
<MI 23484 TST.L (A7)+> Δ+4 {}
<MI 23486 BEQ 0x234b0> {}
<POP 23488-234b0 Naked> Σ0 ↓
<Blob 0x23488 [34] @> Δ-34 {[«34""»]}
<POP 23494-23496 StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x23496 34> {[«34""»]|[$$Response from WRITE contained data]}
<Call 0x234a8 0x20c42> {[«34""»]|[$$Response from WRITE contained data]}
<POP 234ac-234b0 StackAdj> Δ+38 {}
<POP 234b0-23508 Naked> Σ0 ↓ →0x23510 ←0x23470 ←0x23478
<MI 234b0 MOVE.L (A0+0x248),D0> {}
<POP 0x234b4 LimitCheck 0x0 ≤ D0 ≤ 0x3f> {}
<MI 234be MOVE.L D0,D4> {}
<MI 234c0 MOVEQ.L #0x06,D3> {}
<Call 0x234c2 0x1028c> {}
?muls_d3_d4
<POP 234c8-234c9 StackAdj> Δ-8 ↓ {[-8-]}
<Blob 0x234c9 [8] (A0+0x23c)> Δ-8 {[-8-]|[«8»]}
<POP 234d8-234da StackAdj> Δ-8 {[-8-]|[«8»]|[-8-]}
<MI 234da LEA.L (A0+0x22a),A1> {[-8-]|[«8»]|[-8-]}
<MI 234de MOVE.L (A1+D4.L+#0x28),-(A7)> Δ-4 {[-8-]|[«8»]|[-8-]|[4, '(A1+D4.L+#0x28)']}
<Call 0x234e2 0x10354> {[-8-]|[«8»]|[-8-]|[4, '(A1+D4.L+#0x28)']}
Long2Quad(a : Long) : Quad
<POP 234e8-234ea StackAdj> Δ+4 {[-8-]|[«8»]|[-8-]}
<Call 0x234ea 0x10314> {[-8-]|[«8»]|[-8-]}
Add(a, b : Quad) : Quad
<POP 234f0-234f2 StackAdj> Δ+16 {[-8-]}
<MI 234f2 LEA.L (A0+0x23c),A1> {[-8-]}
<MI 234f6 MOVEA.L A7,A2> {[-8-]}
<BlockMove 8,A2,A1> {[-8-]}
<POP 23500-23502 StackAdj> Δ+8 {}
<MI 23502 TST.L (A0+0x244)> {}
<MI 23506 BEQ 0x23510> {}
<POP 23508-23510 Naked> Σ0 ↓
<MI 23508 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x2350a 0x22aca> {[2, '(A6+0xa)']}
<POP 2350e-23510 StackAdj> Δ+2 {}
<POP 23510-2351e Naked> Σ0 ↓ →0x23526 ←0x234b0
<MI 23510 ADDQ.L #0x1,(A0+0x248)> {}
<MI 23514 MOVE.L (A0+0x248),D0> {}
<MI 23518 CMP.L (A0+0x24c),D0> {}
<MI 2351c BGT 0x23526> {}
<POP 2351e-23526 Naked> Σ0 Δ-2 →0x2352c
<MI 2351e MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x23520 0x2323c> {[2, '(A6+0xa)']}
<MI 23524 BRA 0x2352c> {[2, '(A6+0xa)']}
<POP 23526-2352c Naked> Σ0 Δ-2 ↓ ←0x23510
<MI 23526 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x23528 0x23384> {[2, '(A6+0xa)']}
<POP 2352c-2352e Naked> Σ-2 Δ+2 ↓ ←0x2351e
<POP 2352c-2352e StackAdj> Δ+2 {}
<POP 2352e-23536 Epilogue> Σ0 ←0x2346a
@ 23536
<LVAR 0x008 2(r)>
<POP 23536-2359e Body>
<POP 23536-2354c Prologue> Σ0 ↓
<POP 2354c-23596 Naked> Σ0 ↓
<MI 2354c MOVE.W #0x21c0,D0> {}
<MI 23550 MULS.W (A6+0x8),D0> {}
<MI 23554 LEA.L 0x2578e,A0> {}
<MI 2355a LEA.L (A0+D0.W),A0> {}
<MI 2355e MOVE.B #0x02,(A0+0x23d4)> {}
<MI 23564 MOVE.L (A0+0x248),D0> {}
<POP 0x23568 LimitCheck 0x0 ≤ D0 ≤ 0x3f> {}
<MI 23572 MOVE.L D0,D4> {}
<MI 23574 MOVEQ.L #0x06,D3> {}
<Call 0x23576 0x1028c> {}
?muls_d3_d4
<MI 2357c LEA.L (A0+0x22a),A1> {}
<MI 23580 MOVE.L (A1+D4.L+#0x28),(A0+0x23d6)> {}
<MI 23586 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x2358a 0x217ba> {[2, '(A6+0x8)']}
<POP 2358e-23590 StackAdj> Δ+2 {}
<MI 23590 MOVE.B #0x03,(A1+0x2)> {}
<POP 23596-2359e Epilogue> Σ0
@ 2359e
<LVAR 0x008 2(r)>
<LVAR -0x002 @ 1(r)>
<POP 2359e-23638 Body>
<POP 2359e-235b4 Prologue> Σ0 ↓
<POP 235b4-235ba RegCacheLoad> Σ0 ↓
<POP 235ba-235de Naked> Σ0 ↓ →0x235e4
<MI 235ba MOVE.W #0x21c0,D0> {}
<MI 235be MULS.W (A6+0x8),D0> {}
<MI 235c0 LEA.L 0x2578e,A0> {}
<MI 235c6 LEA.L (A0+D0.W),A0> {}
<POP 235ca-235cc StackAdj> Δ-4 {[-4-]}
<Const 0x235cc 0x0.4> Δ-4 {[-4-]|[##0]}
<Const 0x235d0 0x1.4> Δ-4 {[-4-]|[##0]|[##1]}
<Call 0x235d4 0x20c68> {[-4-]|[##0]|[##1]}
<POP 235d8-235da StackAdj> Δ+8 {[-4-]}
<MI 235da TST.L (A7)+> Δ+4 {}
<MI 235dc BNE 0x235e4> {}
<POP 235de-235e4 Naked> Σ0 →0x235ea
<MI 235de MOVE.B #0x14,(A0+0x23d4)> {}
<MI 235e2 BRA 0x235ea> {}
<POP 235e4-235ea Naked> Σ0 ↓ ←0x235ba
<MI 235e4 MOVE.B #0x15,(A0+0x23d4)> {}
<POP 235ea-23606 Naked> Σ0 ↓ →0x23630 ←0x235de
<MI 235ea MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x235ec 0x217ba> {[2, '(A6+0x8)']}
<MI 235f0 MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']}
<MI 235f2 ADDI.W #0x0010,(A7)> {[-2-]}
<Pointer.fp 0x235f6 <LVAR -0x002 @ 1(r)>> Δ-4 {[-2-]|[@@-2]}
<Call 0x235fa 0x2115a> {[-2-]|[@@-2]}
<POP 235fe-23600 StackAdj> Δ+6 {}
<MI 23600 TST.B (A6-0x2)> {}
<MI 23604 BNE 0x23630> {}
<POP 23606-23630 Naked> Σ0 ↓
<Blob 0x23606 [14] @> Δ-14 {[«14""»]}
<POP 23612-23614 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x23614 14> {[«14""»]|[$$Density select]}
<POP 23626-23628 StackAdj> Δ-2 {[«14""»]|[$$Density select]|[-2-]}
<MI 23628 MOVE.W (A6+0x8),(A7)> {[«14""»]|[$$Density select]|[2, '(A6+0x8)']}
<Call 0x2362a 0x21cbc> {[«14""»]|[$$Density select]|[2, '(A6+0x8)']}
<POP 2362e-23630 StackAdj> Δ+20 {}
<POP 23630-23638 Epilogue> Σ0 ←0x235ea
@ 23638
<LVAR 0x008 2(r)>
<LVAR -0x002 @ 1(r)>
<POP 23638-236d2 Body>
<POP 23638-2364e Prologue> Σ0 ↓
<POP 2364e-23654 RegCacheLoad> Σ0 ↓
<POP 23654-23678 Naked> Σ0 ↓ →0x2367e
<MI 23654 MOVE.W #0x21c0,D0> {}
<MI 23658 MULS.W (A6+0x8),D0> {}
<MI 2365a LEA.L 0x2578e,A0> {}
<MI 23660 LEA.L (A0+D0.W),A0> {}
<POP 23664-23666 StackAdj> Δ-4 {[-4-]}
<Const 0x23666 0x0.4> Δ-4 {[-4-]|[##0]}
<Const 0x2366a 0x1.4> Δ-4 {[-4-]|[##0]|[##1]}
<Call 0x2366e 0x20c68> {[-4-]|[##0]|[##1]}
<POP 23672-23674 StackAdj> Δ+8 {[-4-]}
<MI 23674 TST.L (A7)+> Δ+4 {}
<MI 23676 BNE 0x2367e> {}
<POP 23678-2367e Naked> Σ0 →0x23684
<MI 23678 MOVE.B #0x12,(A0+0x23d4)> {}
<MI 2367c BRA 0x23684> {}
<POP 2367e-23684 Naked> Σ0 ↓ ←0x23654
<MI 2367e MOVE.B #0x13,(A0+0x23d4)> {}
<POP 23684-236a0 Naked> Σ0 ↓ →0x236ca ←0x23678
<MI 23684 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x23686 0x217ba> {[2, '(A6+0x8)']}
<MI 2368a MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']}
<MI 2368c ADDI.W #0x0010,(A7)> {[-2-]}
<Pointer.fp 0x23690 <LVAR -0x002 @ 1(r)>> Δ-4 {[-2-]|[@@-2]}
<Call 0x23694 0x2115a> {[-2-]|[@@-2]}
<POP 23698-2369a StackAdj> Δ+6 {}
<MI 2369a TST.B (A6-0x2)> {}
<MI 2369e BNE 0x236ca> {}
<POP 236a0-236ca Naked> Σ0 ↓
<Blob 0x236a0 [4] @> Δ-4 {[«4""»]}
<Blob 0x236a4 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x236a8 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 236ac-236ae StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x236ae 12> {[«4""»]|[«4""»]|[«4""»]|[$$Speed select]}
<POP 236c0-236c2 StackAdj> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[$$Speed select]|[-2-]}
<MI 236c2 MOVE.W (A6+0x8),(A7)> {[«4""»]|[«4""»]|[«4""»]|[$$Speed select]|[2, '(A6+0x8)']}
<Call 0x236c4 0x21cbc> {[«4""»]|[«4""»]|[«4""»]|[$$Speed select]|[2, '(A6+0x8)']}
<POP 236c8-236ca StackAdj> Δ+18 {}
<POP 236ca-236d2 Epilogue> Σ0 ←0x23684
@ 236d2
<LVAR 0x00a 2(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 1(rw)>
<POP 236d2-23894 Body> Δ+4
<POP 236d2-236e8 Prologue> Σ0 ↓
<POP 236e8-236f6 RegCacheLoad> Σ0 ↓
<POP 236f6-2370c Naked> Σ0 ↓ →0x23710
<MI 236f6 MOVE.W #0x21c0,D0> {}
<MI 236fa MULS.W (A6+0xa),D0> {}
<MI 236fc LEA.L 0x2578e,A0> {}
<MI 23702 LEA.L (A0+D0.W),A0> {}
<MI 23706 TST.B (A6+0x8)> {}
<MI 2370a BEQ 0x23710> {}
<POP 2370c-23710 Naked> Σ0 →0x2371a
<MI 2370c MOVE.B #0x01,(A6-0x4)> {}
<MI 2370e BRA 0x2371a> {}
<POP 23710-2371a Naked> Σ0 ↓ ←0x236f6
<MI 23710 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Pointer.fp 0x23712 <LVAR -0x004 @ 1(rw)>> Δ-4 {[2, '(A6+0xa)']|[@@-4]}
<Call 0x23714 0x23126> {[2, '(A6+0xa)']|[@@-4]}
<POP 23718-2371a StackAdj> Δ+6 {}
<POP 2371a-23720 Naked> Σ0 ↓ →0x2388c ←0x2370c
<MI 2371a TST.B (A6-0x4)> {}
<MI 2371c BEQ 0x2388c> {}
<POP 23720-23728 Naked> Σ0 ↓ →0x23782
<MI 23720 TST.B 0x257a2> {}
<MI 23726 BEQ 0x23782> {}
<POP 23728-23754 Naked> Σ0 ↓ →0x23782
<MI 23728 MOVE.L (A0+0x248),D0> {}
<POP 0x2372c LimitCheck 0x0 ≤ D0 ≤ 0x3f> {}
<MI 23732 MOVE.L D0,D4> {}
<MI 23734 MOVEQ.L #0x06,D3> {}
<Call 0x23736 0x1028c> {}
?muls_d3_d4
<POP 2373c-2373e StackAdj> Δ-4 {[-4-]}
<MI 2373e MOVE.W (A6+0xa),-(A7)> Δ-2 {[-4-]|[2, '(A6+0xa)']}
<MI 23740 ADD.W #0x10,(A7)> {[-6-]}
<Call 0x23742 0x211b0> {[-6-]}
<POP 23746-23748 StackAdj> Δ+2 {[-4-]}
<MI 23748 LEA.L (A0+0x22a),A1> {[-4-]}
<MI 2374c MOVE.L (A7)+,D0> Δ+4 {}
<MI 2374e CMP.L (A1+D4.L+#0x28),D0> {}
<MI 23752 BEQ 0x23782> {}
<POP 23754-23782 Naked> Σ0 ↓
<Blob 0x23754 [32] @> Δ-32 {[«32""»]}
<POP 23766-23768 StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x23768 31> {[«32""»]|[$$Response from READ is incorrect]}
<Call 0x2377a 0x20c42> {[«32""»]|[$$Response from READ is incorrect]}
<POP 2377e-23782 StackAdj> Δ+36 {}
<POP 23782-237d6 Naked> Σ0 ↓ →0x237de ←0x23720 ←0x23728
<MI 23782 MOVE.L (A0+0x248),D0> {}
<POP 0x23786 LimitCheck 0x0 ≤ D0 ≤ 0x3f> {}
<MI 2378c MOVE.L D0,D4> {}
<MI 2378e MOVEQ.L #0x06,D3> {}
<Call 0x23790 0x1028c> {}
?muls_d3_d4
<POP 23796-23797 StackAdj> Δ-8 ↓ {[-8-]}
<Blob 0x23797 [8] (A0+0x23c)> Δ-8 {[-8-]|[«8»]}
<POP 237a6-237a8 StackAdj> Δ-8 {[-8-]|[«8»]|[-8-]}
<MI 237a8 LEA.L (A0+0x22a),A1> {[-8-]|[«8»]|[-8-]}
<MI 237ac MOVE.L (A1+D4.L+#0x28),-(A7)> Δ-4 {[-8-]|[«8»]|[-8-]|[4, '(A1+D4.L+#0x28)']}
<Call 0x237b0 0x10354> {[-8-]|[«8»]|[-8-]|[4, '(A1+D4.L+#0x28)']}
Long2Quad(a : Long) : Quad
<POP 237b6-237b8 StackAdj> Δ+4 {[-8-]|[«8»]|[-8-]}
<Call 0x237b8 0x10314> {[-8-]|[«8»]|[-8-]}
Add(a, b : Quad) : Quad
<POP 237be-237c0 StackAdj> Δ+16 {[-8-]}
<MI 237c0 LEA.L (A0+0x23c),A1> {[-8-]}
<MI 237c4 MOVEA.L A7,A2> {[-8-]}
<BlockMove 8,A2,A1> {[-8-]}
<POP 237ce-237d0 StackAdj> Δ+8 {}
<MI 237d0 TST.L (A0+0x244)> {}
<MI 237d4 BEQ 0x237de> {}
<POP 237d6-237de Naked> Σ0 ↓
<MI 237d6 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x237d8 0x22aca> {[2, '(A6+0xa)']}
<POP 237dc-237de StackAdj> Δ+2 {}
<POP 237de-2383e Naked> Σ0 Δ-4 ↓ →0x23846 ←0x23782
<MI 237de MOVE.L (A0+0x248),D0> {}
<POP 0x237e2 LimitCheck 0x0 ≤ D0 ≤ 0x3f> {}
<MI 237e8 MOVE.L D0,D4> {}
<MI 237ea MOVEQ.L #0x06,D3> {}
<Call 0x237ec 0x1028c> {}
?muls_d3_d4
<MI 237f2 MOVE.L D4,-(A7)> Δ-4 {[4, 'D4']}
<MI 237f4 LEA.L (A0+0x22a),A1> {[4, 'D4']}
<POP 237f8-237fa StackAdj> Δ-6 {[4, 'D4']|[-6-]}
<MI 237fa MOVE.B (A1+0x1a6),(A7)> {[4, 'D4']|[-6-]}
<MI 237fe MOVE.B (A1+0x1a7),(A7+0x1)> {[4, 'D4']|[-6-]}
<MI 23804 MOVE.B (A1+0x1a8),(A7+0x2)> {[4, 'D4']|[-6-]}
<MI 2380a MOVE.B (A1+0x1a9),(A7+0x3)> {[4, 'D4']|[-6-]}
<MI 23810 MOVE.W (A1+D4.L+#0x26),-(A7)> Δ-2 {[4, 'D4']|[-6-]|[2, '(A1+D4.L+#0x26)']}
<MI 23814 MOVE.L (A7+0x8),D4> {[4, 'D4']|[-6-]|[2, '(A1+D4.L+#0x26)']}
<MI 23818 MOVE.L (A1+D4.L+#0x28),D4> {[4, 'D4']|[-6-]|[2, '(A1+D4.L+#0x26)']}
<MI 2381c MOVEQ.L #0x02,D3> {[4, 'D4']|[-6-]|[2, '(A1+D4.L+#0x26)']}
<Call 0x2381e 0x10294> {[4, 'D4']|[-6-]|[2, '(A1+D4.L+#0x26)']}
?divs_d3_d4
<POP 23824-23826 StackAdj> Δ-2 {[4, 'D4']|[-6-]|[2, '(A1+D4.L+#0x26)']|[-2-]}
<POP 0x23826 LimitCheck 0x0 ≤ D4 ≤ 0xffff> {[4, 'D4']|[-6-]|[2, '(A1+D4.L+#0x26)']|[-2-]}
<MI 23830 MOVE.W D4,(A7)> {[4, 'D4']|[-6-]|[2, '(A1+D4.L+#0x26)']|[2, 'D4']}
<Call 0x23832 0x10234> {[4, 'D4']|[-6-]|[2, '(A1+D4.L+#0x26)']|[2, 'D4']}
KERNCALL_1a
<POP 23838-2383a StackAdj> Δ+8 {[4, 'D4']|[-2-]}
<MI 2383a TST.B (A7)+> Δ+2 {[4, 'D4']}
<MI 2383c BNE 0x23846> {[4, 'D4']}
<POP 2383e-23846 Naked> Σ-4 ↓
<MI 2383e MOVE.W (A6+0xa),-(A7)> Δ-2 {[-4-]|[2, '(A6+0xa)']}
<Call 0x23840 0x22b30> {[-4-]|[2, '(A6+0xa)']}
<POP 23844-23846 StackAdj> Δ+2 {[-4-]}
<POP 23846-23854 Naked> Σ-4 ↓ →0x2385c ←0x237de
<MI 23846 ADDQ.L #0x1,(A0+0x248)> {[-4-]}
<MI 2384a MOVE.L (A0+0x248),D0> {[-4-]}
<MI 2384e CMP.L (A1+0x22),D0> {[-4-]}
<MI 23852 BGT 0x2385c> {[-4-]}
<POP 23854-2385c Naked> Σ-4 Δ-2 →0x23888
<MI 23854 MOVE.W (A6+0xa),-(A7)> Δ-2 {[-4-]|[2, '(A6+0xa)']}
<Call 0x23856 0x23536> {[-4-]|[2, '(A6+0xa)']}
<MI 2385a BRA 0x23888> {[-4-]|[2, '(A6+0xa)']}
<POP 2385c-2387a Naked> Σ-4 ↓ →0x23882 ←0x23846
<MI 2385c CLR.L (A0+0x248)> {[-4-]}
<POP 23860-23862 StackAdj> Δ-4 {[-8-]}
<Const 0x23862 0x10.4> Δ-4 {[-8-]|[##16]}
<Const 0x23866 0x3f.4> Δ-4 {[-8-]|[##16]|[##63]}
<Call 0x2386a 0x20c68> {[-8-]|[##16]|[##63]}
<POP 2386e-23870 StackAdj> Δ+8 {[-8-]}
<MI 23870 MOVE.L (A7)+,(A1+0x22)> Δ+4 {[-4-]}
<MI 23874 TST.B (A1+0x1)> {[-4-]}
<MI 23878 BEQ 0x23882> {[-4-]}
<POP 2387a-23882 Naked> Σ-4 Δ-2 →0x23888
<MI 2387a MOVE.W (A6+0xa),-(A7)> Δ-2 {[-4-]|[2, '(A6+0xa)']}
<Call 0x2387c 0x22bfe> {[-4-]|[2, '(A6+0xa)']}
<MI 23880 BRA 0x23888> {[-4-]|[2, '(A6+0xa)']}
<POP 23882-23888 Naked> Σ-4 Δ-2 ↓ ←0x2385c
<MI 23882 MOVE.W (A6+0xa),-(A7)> Δ-2 {[-4-]|[2, '(A6+0xa)']}
<Call 0x23884 0x231f6> {[-4-]|[2, '(A6+0xa)']}
<POP 23888-2388c Naked> Σ-6 Δ+6 ↓ ←0x23854 ←0x2387a
<POP 23888-2388a StackAdj> Δ+2 {[-4-]}
<POP 2388a-2388c StackAdj> Δ+4 {}
<POP 2388c-23894 Epilogue> Σ0 ←0x2371a
@ 23894
<LVAR 0x00a 2(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 1(rw)>
<POP 23894-238fa Body>
<POP 23894-238aa Prologue> Σ0 ↓
<POP 238aa-238b2 RegCacheLoad> Σ0 ↓
<POP 238b2-238c8 Naked> Σ0 ↓ →0x238ce
<MI 238b2 MOVE.W #0x21c0,D0> {}
<MI 238b6 MULS.W (A6+0xa),D0> {}
<MI 238b8 LEA.L 0x2578e,A0> {}
<MI 238be LEA.L (A0+D0.W),A0> {}
<MI 238c2 TST.B (A6+0x8)> {}
<MI 238c6 BEQ 0x238ce> {}
<POP 238c8-238ce Naked> Σ0 →0x238d8
<MI 238c8 MOVE.B #0x01,(A6-0x4)> {}
<MI 238cc BRA 0x238d8> {}
<POP 238ce-238d8 Naked> Σ0 ↓ ←0x238b2
<MI 238ce MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Pointer.fp 0x238d0 <LVAR -0x004 @ 1(rw)>> Δ-4 {[2, '(A6+0xa)']|[@@-4]}
<Call 0x238d2 0x23126> {[2, '(A6+0xa)']|[@@-4]}
<POP 238d6-238d8 StackAdj> Δ+6 {}
<POP 238d8-238dc Naked> Σ0 ↓ →0x238f2 ←0x238c8
<MI 238d8 TST.B (A6-0x4)> {}
<MI 238da BEQ 0x238f2> {}
<POP 238dc-238e2 Naked> Σ0 ↓ →0x238ea
<MI 238dc TST.L (A0+0x244)> {}
<MI 238e0 BEQ 0x238ea> {}
<POP 238e2-238ea Naked> Σ0 ↓
<MI 238e2 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x238e4 0x22aca> {[2, '(A6+0xa)']}
<POP 238e8-238ea StackAdj> Δ+2 {}
<POP 238ea-238f2 Naked> Σ0 ↓ ←0x238dc
<MI 238ea MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x238ec 0x23536> {[2, '(A6+0xa)']}
<POP 238f0-238f2 StackAdj> Δ+2 {}
<POP 238f2-238fa Epilogue> Σ0 ←0x238d8
@ 238fa
<LVAR 0x00a 2(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 1(rw)>
<POP 238fa-23960 Body>
<POP 238fa-23910 Prologue> Σ0 ↓
<POP 23910-23918 RegCacheLoad> Σ0 ↓
<POP 23918-2392e Naked> Σ0 ↓ →0x23934
<MI 23918 MOVE.W #0x21c0,D0> {}
<MI 2391c MULS.W (A6+0xa),D0> {}
<MI 2391e LEA.L 0x2578e,A0> {}
<MI 23924 LEA.L (A0+D0.W),A0> {}
<MI 23928 TST.B (A6+0x8)> {}
<MI 2392c BEQ 0x23934> {}
<POP 2392e-23934 Naked> Σ0 →0x2393e
<MI 2392e MOVE.B #0x01,(A6-0x4)> {}
<MI 23932 BRA 0x2393e> {}
<POP 23934-2393e Naked> Σ0 ↓ ←0x23918
<MI 23934 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Pointer.fp 0x23936 <LVAR -0x004 @ 1(rw)>> Δ-4 {[2, '(A6+0xa)']|[@@-4]}
<Call 0x23938 0x23126> {[2, '(A6+0xa)']|[@@-4]}
<POP 2393c-2393e StackAdj> Δ+6 {}
<POP 2393e-23942 Naked> Σ0 ↓ →0x23958 ←0x2392e
<MI 2393e TST.B (A6-0x4)> {}
<MI 23940 BEQ 0x23958> {}
<POP 23942-23948 Naked> Σ0 ↓ →0x23950
<MI 23942 TST.L (A0+0x244)> {}
<MI 23946 BEQ 0x23950> {}
<POP 23948-23950 Naked> Σ0 ↓
<MI 23948 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x2394a 0x22aca> {[2, '(A6+0xa)']}
<POP 2394e-23950 StackAdj> Δ+2 {}
<POP 23950-23958 Naked> Σ0 ↓ ←0x23942
<MI 23950 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x23952 0x233d6> {[2, '(A6+0xa)']}
<POP 23956-23958 StackAdj> Δ+2 {}
<POP 23958-23960 Epilogue> Σ0 ←0x2393e
@ 23960
<LVAR 0x00a 2(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 1(rw)>
<POP 23960-239c6 Body>
<POP 23960-23976 Prologue> Σ0 ↓
<POP 23976-2397e RegCacheLoad> Σ0 ↓
<POP 2397e-23994 Naked> Σ0 ↓ →0x2399a
<MI 2397e MOVE.W #0x21c0,D0> {}
<MI 23982 MULS.W (A6+0xa),D0> {}
<MI 23984 LEA.L 0x2578e,A0> {}
<MI 2398a LEA.L (A0+D0.W),A0> {}
<MI 2398e TST.B (A6+0x8)> {}
<MI 23992 BEQ 0x2399a> {}
<POP 23994-2399a Naked> Σ0 →0x239a4
<MI 23994 MOVE.B #0x01,(A6-0x4)> {}
<MI 23998 BRA 0x239a4> {}
<POP 2399a-239a4 Naked> Σ0 ↓ ←0x2397e
<MI 2399a MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Pointer.fp 0x2399c <LVAR -0x004 @ 1(rw)>> Δ-4 {[2, '(A6+0xa)']|[@@-4]}
<Call 0x2399e 0x23126> {[2, '(A6+0xa)']|[@@-4]}
<POP 239a2-239a4 StackAdj> Δ+6 {}
<POP 239a4-239a8 Naked> Σ0 ↓ →0x239be ←0x23994
<MI 239a4 TST.B (A6-0x4)> {}
<MI 239a6 BEQ 0x239be> {}
<POP 239a8-239ae Naked> Σ0 ↓ →0x239b6
<MI 239a8 TST.L (A0+0x244)> {}
<MI 239ac BEQ 0x239b6> {}
<POP 239ae-239b6 Naked> Σ0 ↓
<MI 239ae MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x239b0 0x22aca> {[2, '(A6+0xa)']}
<POP 239b4-239b6 StackAdj> Δ+2 {}
<POP 239b6-239be Naked> Σ0 ↓ ←0x239a8
<MI 239b6 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x239b8 0x23536> {[2, '(A6+0xa)']}
<POP 239bc-239be StackAdj> Δ+2 {}
<POP 239be-239c6 Epilogue> Σ0 ←0x239a4
@ 239c6
<LVAR 0x00a 2(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 1(rw)>
<POP 239c6-23a26 Body>
<POP 239c6-239dc Prologue> Σ0 ↓
<POP 239dc-239e4 RegCacheLoad> Σ0 ↓
<POP 239e4-239fa Naked> Σ0 ↓ →0x23a00
<MI 239e4 MOVE.W #0x21c0,D0> {}
<MI 239e8 MULS.W (A6+0xa),D0> {}
<MI 239ea LEA.L 0x2578e,A0> {}
<MI 239f0 LEA.L (A0+D0.W),A0> {}
<MI 239f4 TST.B (A6+0x8)> {}
<MI 239f8 BEQ 0x23a00> {}
<POP 239fa-23a00 Naked> Σ0 →0x23a0a
<MI 239fa MOVE.B #0x01,(A6-0x4)> {}
<MI 239fe BRA 0x23a0a> {}
<POP 23a00-23a0a Naked> Σ0 ↓ ←0x239e4
<MI 23a00 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Pointer.fp 0x23a02 <LVAR -0x004 @ 1(rw)>> Δ-4 {[2, '(A6+0xa)']|[@@-4]}
<Call 0x23a04 0x23126> {[2, '(A6+0xa)']|[@@-4]}
<POP 23a08-23a0a StackAdj> Δ+6 {}
<POP 23a0a-23a0e Naked> Σ0 ↓ →0x23a1e ←0x239fa
<MI 23a0a TST.B (A6-0x4)> {}
<MI 23a0c BEQ 0x23a1e> {}
<POP 23a0e-23a1e Naked> Σ0 ↓
<MI 23a0e CLR.B (A0+0x22b)> {}
<MI 23a12 CLR.L (A0+0x248)> {}
<MI 23a16 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x23a18 0x231f6> {[2, '(A6+0xa)']}
<POP 23a1c-23a1e StackAdj> Δ+2 {}
<POP 23a1e-23a26 Epilogue> Σ0 ←0x23a0a
@ 23a26
<LVAR 0x00a 2(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 1(rw)>
<POP 23a26-23a86 Body>
<POP 23a26-23a3c Prologue> Σ0 ↓
<POP 23a3c-23a44 RegCacheLoad> Σ0 ↓
<POP 23a44-23a5a Naked> Σ0 ↓ →0x23a60
<MI 23a44 MOVE.W #0x21c0,D0> {}
<MI 23a48 MULS.W (A6+0xa),D0> {}
<MI 23a4a LEA.L 0x2578e,A0> {}
<MI 23a50 LEA.L (A0+D0.W),A0> {}
<MI 23a54 TST.B (A6+0x8)> {}
<MI 23a58 BEQ 0x23a60> {}
<POP 23a5a-23a60 Naked> Σ0 →0x23a6a
<MI 23a5a MOVE.B #0x01,(A6-0x4)> {}
<MI 23a5e BRA 0x23a6a> {}
<POP 23a60-23a6a Naked> Σ0 ↓ ←0x23a44
<MI 23a60 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Pointer.fp 0x23a62 <LVAR -0x004 @ 1(rw)>> Δ-4 {[2, '(A6+0xa)']|[@@-4]}
<Call 0x23a64 0x23126> {[2, '(A6+0xa)']|[@@-4]}
<POP 23a68-23a6a StackAdj> Δ+6 {}
<POP 23a6a-23a6e Naked> Σ0 ↓ →0x23a7e ←0x23a5a
<MI 23a6a TST.B (A6-0x4)> {}
<MI 23a6c BEQ 0x23a7e> {}
<POP 23a6e-23a7e Naked> Σ0 ↓
<MI 23a6e CLR.B (A0+0x22b)> {}
<MI 23a72 CLR.L (A0+0x248)> {}
<MI 23a76 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x23a78 0x2323c> {[2, '(A6+0xa)']}
<POP 23a7c-23a7e StackAdj> Δ+2 {}
<POP 23a7e-23a86 Epilogue> Σ0 ←0x23a6a
@ 23a86
<POP 23a86-23ad2 Body>
<POP 23a86-23a9c Prologue> Σ0 ↓
<POP 23a9c-23a9e Naked> Σ0 ↓
<MI 23a9c MOVEQ.L #0x00,D7> {}
<POP 23a9e-23ab4 Naked> Σ0 ↓ →0x23ac2 ←0x23ac2
<MI 23a9e MOVE.W #0x21c0,D0> {}
<MI 23aa2 MULS.W D7,D0> {}
<MI 23aa4 LEA.L 0x2578e,A0> {}
<MI 23aaa LEA.L (A0+D0.W),A0> {}
<MI 23aae TST.B (A0+0x22a)> {}
<MI 23ab2 BEQ 0x23ac2> {}
<POP 23ab4-23ac2 Naked> Σ0 ↓
<MI 23ab4 MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x23ab6 0x22bfe> {[2, 'D7']}
<POP 23aba-23abc StackAdj> Δ+2 {}
<MI 23abc ADDQ.L #0x1,0x2579e> {}
<POP 23ac2-23aca Naked> Σ0 ↓ →0x23a9e ←0x23a9e
<MI 23ac2 ADDQ.W #0x1,D7> {}
<MI 23ac4 CMPI.W #0x0003,D7> {}
<MI 23ac8 BLE 0x23a9e> {}
<POP 23aca-23ad2 Epilogue> Σ0
@ 23ad2
<LVAR -0x001 @ 1(r)>
<LVAR -0x002 @ 1(r)>
<POP 23ad2-23bcc Body> Δ+24
<POP 23ad2-23ae8 Prologue> Σ0 ↓
<POP 23ae8-23aee RegCacheLoad> Σ0 ↓
<POP 23aee-23af0 Naked> Σ0 ↓
<MI 23aee MOVEQ.L #0x00,D7> {}
<POP 23af0-23b08 Naked> Σ0 ↓ →0x23bba ←0x23bba
<MI 23af0 MOVE.W #0x21c0,D0> {}
<MI 23af4 MULS.W D7,D0> {}
<MI 23af6 LEA.L 0x2578e,A0> {}
<MI 23afc LEA.L (A0+D0.W),A0> {}
<MI 23b00 TST.B (A0+0x22a)> {}
<MI 23b04 BEQ 0x23bba> {}
<POP 23b08-23b24 Naked> Σ0 ↓ →0x23bba
<MI 23b08 MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<MI 23b0a ADDI.W #0x0010,(A7)> {[-2-]}
<Pointer.fp 0x23b0e <LVAR -0x002 @ 1(r)>> Δ-4 {[-2-]|[@@-2]}
<Pointer.fp 0x23b12 <LVAR -0x001 @ 1(r)>> Δ-4 {[-2-]|[@@-2]|[@@-1]}
<Call 0x23b14 0x20e28> {[-2-]|[@@-2]|[@@-1]}
<POP 23b18-23b1c StackAdj> Δ+10 {}
<MI 23b1c TST.B (A6-0x2)> {}
<MI 23b20 BEQ 0x23bba> {}
<POP 23b24-23b3c Naked> Σ0 →0x23baa →0x23b4a →0x23b5a →0x23b9a →0x23b6a →0x23b7a →0x23b8a
<MI 23b24 MOVE.B (A0+0x22c),D0> {}
<MI 23b28 EXTB.W D0> {}
<POP 0x23b2a LimitCheck 0x0 ≤ D0 ≤ 0x6> {}
<MI 23b32 ADD.W D0,D0> {}
<MI 23b34 SWITCH D0.W> {}
<POP 23b4a-23b5a Naked> Σ0 Δ-4 →0x23bb8 ←0x23b24
<MI 23b4a MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<MI 23b4c MOVE.B (A6-0x1),D0> {[2, 'D7']}
<MI 23b4e EXTB.W D0> {[2, 'D7']}
<POP 0x23b50 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']}
<MI 23b52 MOVE.B D0,-(A7)> Δ-2 {[2, 'D7']|[2, 'D0']}
<Call 0x23b54 0x23a26> {[2, 'D7']|[2, 'D0']}
<MI 23b58 BRA 0x23bb8> {[2, 'D7']|[2, 'D0']}
<POP 23b5a-23b6a Naked> Σ0 Δ-4 →0x23bb8 ←0x23b24
<MI 23b5a MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<MI 23b5c MOVE.B (A6-0x1),D0> {[2, 'D7']}
<MI 23b5e EXTB.W D0> {[2, 'D7']}
<POP 0x23b60 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']}
<MI 23b62 MOVE.B D0,-(A7)> Δ-2 {[2, 'D7']|[2, 'D0']}
<Call 0x23b64 0x23424> {[2, 'D7']|[2, 'D0']}
<MI 23b68 BRA 0x23bb8> {[2, 'D7']|[2, 'D0']}
<POP 23b6a-23b7a Naked> Σ0 Δ-4 →0x23bb8 ←0x23b24
<MI 23b6a MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<MI 23b6c MOVE.B (A6-0x1),D0> {[2, 'D7']}
<MI 23b6e EXTB.W D0> {[2, 'D7']}
<POP 0x23b70 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']}
<MI 23b72 MOVE.B D0,-(A7)> Δ-2 {[2, 'D7']|[2, 'D0']}
<Call 0x23b74 0x23894> {[2, 'D7']|[2, 'D0']}
<MI 23b78 BRA 0x23bb8> {[2, 'D7']|[2, 'D0']}
<POP 23b7a-23b8a Naked> Σ0 Δ-4 →0x23bb8 ←0x23b24
<MI 23b7a MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<MI 23b7c MOVE.B (A6-0x1),D0> {[2, 'D7']}
<MI 23b7e EXTB.W D0> {[2, 'D7']}
<POP 0x23b80 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']}
<MI 23b82 MOVE.B D0,-(A7)> Δ-2 {[2, 'D7']|[2, 'D0']}
<Call 0x23b84 0x238fa> {[2, 'D7']|[2, 'D0']}
<MI 23b88 BRA 0x23bb8> {[2, 'D7']|[2, 'D0']}
<POP 23b8a-23b9a Naked> Σ0 Δ-4 →0x23bb8 ←0x23b24
<MI 23b8a MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<MI 23b8c MOVE.B (A6-0x1),D0> {[2, 'D7']}
<MI 23b8e EXTB.W D0> {[2, 'D7']}
<POP 0x23b90 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']}
<MI 23b92 MOVE.B D0,-(A7)> Δ-2 {[2, 'D7']|[2, 'D0']}
<Call 0x23b94 0x23960> {[2, 'D7']|[2, 'D0']}
<MI 23b98 BRA 0x23bb8> {[2, 'D7']|[2, 'D0']}
<POP 23b9a-23baa Naked> Σ0 Δ-4 →0x23bb8 ←0x23b24
<MI 23b9a MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<MI 23b9c MOVE.B (A6-0x1),D0> {[2, 'D7']}
<MI 23b9e EXTB.W D0> {[2, 'D7']}
<POP 0x23ba0 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']}
<MI 23ba2 MOVE.B D0,-(A7)> Δ-2 {[2, 'D7']|[2, 'D0']}
<Call 0x23ba4 0x236d2> {[2, 'D7']|[2, 'D0']}
<MI 23ba8 BRA 0x23bb8> {[2, 'D7']|[2, 'D0']}
<POP 23baa-23bb8 Naked> Σ0 Δ-4 ↓ ←0x23b24
<MI 23baa MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<MI 23bac MOVE.B (A6-0x1),D0> {[2, 'D7']}
<MI 23bae EXTB.W D0> {[2, 'D7']}
<POP 0x23bb0 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']}
<MI 23bb2 MOVE.B D0,-(A7)> Δ-2 {[2, 'D7']|[2, 'D0']}
<Call 0x23bb4 0x239c6> {[2, 'D7']|[2, 'D0']}
<POP 23bb8-23bba Naked> Σ-4 Δ+4 ↓ ←0x23b4a ←0x23b5a ←0x23b6a ←0x23b7a ←0x23b8a ←0x23b9a
<POP 23bb8-23bba StackAdj> Δ+4 {}
<POP 23bba-23bc4 Naked> Σ0 ↓ →0x23af0 ←0x23af0 ←0x23b08
<MI 23bba ADDQ.W #0x1,D7> {}
<MI 23bbc CMPI.W #0x0003,D7> {}
<MI 23bc0 BLE 0x23af0> {}
<POP 23bc4-23bcc Epilogue> Σ0
@ 23bcc
<LVAR -0x002 @>
<POP 23bcc-23c1a Body>
<POP 23bcc-23be2 Prologue> Σ0 ↓
<POP 23be2-23be4 Naked> Σ0 ↓
<MI 23be2 MOVEQ.L #0x00,D7> {}
<POP 23be4-23bfa Naked> Σ0 ↓ →0x23c0a ←0x23c0a
<MI 23be4 MOVE.W #0x21c0,D0> {}
<MI 23be8 MULS.W D7,D0> {}
<MI 23bea LEA.L 0x2578e,A0> {}
<MI 23bf0 LEA.L (A0+D0.W),A0> {}
<MI 23bf4 TST.B (A0+0x22a)> {}
<MI 23bf8 BEQ 0x23c0a> {}
<POP 23bfa-23c0a Naked> Σ0 ↓
<MI 23bfa MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<MI 23bfc ADDI.W #0x0010,(A7)> {[-2-]}
<Pointer.fp 0x23c00 <LVAR -0x002 @>> Δ-4 {[-2-]|[@@-2]}
<Call 0x23c04 0x2115a> {[-2-]|[@@-2]}
<POP 23c08-23c0a StackAdj> Δ+6 {}
<POP 23c0a-23c12 Naked> Σ0 ↓ →0x23be4 ←0x23be4
<MI 23c0a ADDQ.W #0x1,D7> {}
<MI 23c0c CMPI.W #0x0003,D7> {}
<MI 23c10 BLE 0x23be4> {}
<POP 23c12-23c1a Epilogue> Σ0
@ 23c1a
<LVAR 0x00a 1(rw)>
<LVAR 0x008 2(r)>
<LVAR -0x008 @ 2(r)>
<LVAR -0x00a @>
<LVAR -0x00c 2(r)>
<LVAR -0x00e 2(r)>
<LVAR -0x010 2(w)>
<LVAR -0x012 2(w)>
<LVAR -0x014 2(r)>
<LVAR -0x016 2(w)>
<LVAR -0x018 2(r)>
<LVAR -0x01a @ 2(r)>
<POP 23c1a-23c9e Body>
<POP 23c1a-23c30 Prologue> Σ0 ↓
<POP 23c30-23c32 RegCacheLoad> Σ0 ↓
<POP 23c32-23c92 Naked> Σ0 ↓ →0x23c96
<MI 23c32 CLR.W (A6-0x1a)> {}
<MI 23c36 CLR.W (A6-0x18)> {}
<MI 23c3a MOVE.W #0x2,(A6-0x16)> {}
<MI 23c40 CLR.W (A6-0x14)> {}
<MI 23c44 MOVE.W #0x4,(A6-0x12)> {}
<MI 23c4a MOVE.W (A6+0x8),D0> {}
<MI 23c4e ASL.W #0x8,D0> {}
<MI 23c50 MOVE.W D0,(A6-0x10)> {}
<MI 23c54 CLR.W (A6-0xe)> {}
<MI 23c58 CLR.W (A6-0xc)> {}
<Pointer.fp 0x23c5c <LVAR -0x01a @ 2(r)>> Δ-4 {[@@-26]}
<MI 23c60 LEA.L (A6-0x8),A0> {[@@-26]}
<MI 23c64 MOVE.L A0,-(A7)> Δ-4 {[@@-26]|[4, 'A0']}
<Const 0x23c66 0x1c.2> Δ-2 {[@@-26]|[4, 'A0']|[#28]}
<Const 0x23c68 0x0.4> Δ-4 {[@@-26]|[4, 'A0']|[#28]|[##0]}
<Const 0x23c6c 0x8.4> Δ-4 {[@@-26]|[4, 'A0']|[#28]|[##0]|[##8]}
<Call 0x23c70 0x21244> {[@@-26]|[4, 'A0']|[#28]|[##0]|[##8]}
<POP 23c74-23c78 StackAdj> Δ+16 {[-2-]}
<POP 23c78-23c79 StackAdj> Δ+2 {}
<Const 0x23c79 0x1c.2> Δ-2 {[#28]}
<Pointer.fp 0x23c7a <LVAR -0x00a @>> Δ-4 {[#28]|[@@-10]}
<Call 0x23c7e 0x2115a> {[#28]|[@@-10]}
<POP 23c82-23c84 StackAdj> Δ+6 {}
<MI 23c84 CLR.B (A6+0xa)> {}
<MI 23c88 MOVE.W (A6-0x8),D0> {}
<MI 23c8c CMPI.W #0x0001,D0> {}
<MI 23c90 BNE 0x23c96> {}
<POP 23c92-23c96 Naked> Σ0 ↓
<MI 23c92 ADDQ.B #0x1,(A6+0xa)> {}
<POP 23c96-23c9e Epilogue> Σ0 ←0x23c32
@ 23c9e
<LVAR 0x008 2(r)>
<LVAR -0x006 @ 1(r)>
<LVAR -0x3d6 2(r)>
<LVAR -0x3da 2(r)>
<LVAR -0x3fb 1(r)>
<LVAR -0x3fc 1(r)>
<LVAR -0x406 @>
<POP 23c9e-23dbe Body>
<POP 23c9e-23cb4 Prologue> Σ0 ↓
<POP 23cb4-23cba RegCacheLoad> Σ0 ↓
<POP 23cba-23cf4 Naked> Σ0 ↓ →0x23d40
<MI 23cba MOVE.W 0x10008,D0> {}
<POP 0x23cc0 LimitCheck 0x0 ≤ D0 ≤ 0xf> {}
<MI 23cc4 MOVE.W D0,D7> {}
<MI 23cc6 MOVE.W (A6+0x8),0x10008> {}
<Const 0x23ccc 0x2.2> Δ-2 {[#2]}
<Const 0x23cce 0x2.2> Δ-2 {[#2]|[#2]}
<Const 0x23cd0 0x1.4> Δ-4 {[#2]|[#2]|[##1]}
<MI 23cd4 LEA.L (A6-0x406),A0> {[#2]|[#2]|[##1]}
<MI 23cd8 MOVE.L A0,-(A7)> Δ-4 {[#2]|[#2]|[##1]|[4, 'A0']}
<Pointer.fp 0x23cda <LVAR -0x006 @ 1(r)>> Δ-4 {[#2]|[#2]|[##1]|[4, 'A0']|[@@-6]}
<Call 0x23cde 0x1036c> {[#2]|[#2]|[##1]|[4, 'A0']|[@@-6]}
RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
<POP 23ce4-23ce8 StackAdj> Δ+16 {}
<MI 23ce8 MOVE.W D7,0x10008> {}
<MI 23cee TST.B (A6-0x6)> {}
<MI 23cf2 BNE 0x23d40> {}
<POP 23cf4-23d40 Naked> Σ0 ↓
<Blob 0x23cf4 [28] @> Δ-28 {[«28""»]}
<Const 0x23d06 0xe.2> Δ-2 {[«28""»]|[#14]}
<POP 23d0a-23d0c StackAdj> Δ-8 {[«28""»]|[#14]|[-8-]}
<Lit 0x23d0c 27> {[«28""»]|[#14]|[-4-]|[$$Disk has no labels, unit :_]}
<POP 23d1e-23d20 StackAdj> Δ-4 {[«28""»]|[#14]|[-4-]|[$$Disk has no labels, unit :_]|[-4-]}
<MI 23d20 MOVE.W (A6+0x8),D0> {[«28""»]|[#14]|[-4-]|[$$Disk has no labels, unit :_]|[-4-]}
<MI 23d22 EXTW.L D0> {[«28""»]|[#14]|[-4-]|[$$Disk has no labels, unit :_]|[-4-]}
<MI 23d24 MOVE.L D0,-(A7)> Δ-4 {[«28""»]|[#14]|[-4-]|[$$Disk has no labels, unit :_]|[-4-]|[4, 'D0']}
<Call 0x23d26 0x102e4> {[«28""»]|[#14]|[-4-]|[$$Disk has no labels, unit :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 23d2c-23d2e StackAdj> Δ+4 {[«28""»]|[#14]|[-4-]|[$$Disk has no labels, unit :_]|[-4-]}
<Call 0x23d2e 0x102d0> {[«28""»]|[#14]|[-4-]|[$$Disk has no labels, unit :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 23d34-23d36 StackAdj> Δ+8 {[«28""»]|[#14]|[-4-]}
<Call 0x23d36 0x103b8> {[«28""»]|[#14]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 23d3c-23d40 StackAdj> Δ+34 {}
<POP 23d40-23db6 Naked> Σ0 ↓ ←0x23cba
<MI 23d40 MOVEQ.L #0x46,D0> {}
<MI 23d42 MULS.W (A6+0x8),D0> {}
<MI 23d44 LEA.L 0x2578e,A0> {}
<MI 23d4a LEA.L (A0+D0.W),A0> {}
<MI 23d4e ADDA.L #0x892a,A0> {}
<MI 23d54 CLR.L (A0+0x2)> {}
<MI 23d58 CLR.L (A0+0x6)> {}
<MI 23d5c CLR.L (A0+0xa)> {}
<MI 23d60 CLR.L D0> {}
<MI 23d62 MOVE.W (A6-0x3da),D0> {}
<MI 23d66 MOVE.L D0,(A0+0x1a)> {}
<MI 23d6a CLR.L D0> {}
<MI 23d6c MOVE.W (A6-0x3d6),D0> {}
<MI 23d70 MOVE.L D0,(A0+0x1e)> {}
<MI 23d74 CLR.L D0> {}
<MI 23d76 MOVE.B (A6-0x3fb),D0> {}
<MI 23d7a ASR.W #0x1,D0> {}
<MI 23d7c MOVE.W D0,(A0+0x24)> {}
<MI 23d80 CLR.L D0> {}
<MI 23d82 MOVE.B (A6-0x3fc),D0> {}
<MI 23d86 MOVE.W D0,(A0+0x22)> {}
<MI 23d8a MOVE.L (A0+0x1a),(A0+0x16)> {}
<MI 23d90 CLR.L (A0+0x12)> {}
<MI 23d94 CLR.L (A0+0xe)> {}
<POP 23d98-23d9a StackAdj> Δ-8 {[-8-]}
<Const 0x23d9a 0x0.4> Δ-4 {[-8-]|[##0]}
<Call 0x23d9e 0x10354> {[-8-]|[##0]}
Long2Quad(a : Long) : Quad
<POP 23da4-23da6 StackAdj> Δ+4 {[-8-]}
<MI 23da6 LEA.L (A0+0x3e),A0> {[-8-]}
<MI 23daa MOVEA.L A7,A1> {[-8-]}
<BlockMove 8,A1,A0> {[-8-]}
<POP 23db4-23db6 StackAdj> Δ+8 {}
<POP 23db6-23dbe Epilogue> Σ0
@ 23dbe
<POP 23dbe-23e1e Body>
<POP 23dbe-23dd4 Prologue> Σ0 ↓
<POP 23dd4-23dd6 RegCacheLoad> Σ0 ↓
<POP 23dd6-23e16 Naked> Σ0 ↓
<Blob 0x23dd6 [32] @> Δ-32 {[«32""»]}
<POP 23de6-23de8 StackAdj> Δ-8 {[«32""»]|[-8-]}
<Lit 0x23de8 31> {[«32""»]|[-4-]|[$$Enter report increment [1..500]]}
<Const 0x23dfc 0x1.4> Δ-4 {[«32""»]|[-4-]|[$$Enter report increment [1..500]]|[##1]}
<Const 0x23e00 0x1f4.4> Δ-4 {[«32""»]|[-4-]|[$$Enter report increment [1..500]]|[##1]|[##500]}
<Call 0x23e04 0x103ec> {[«32""»]|[-4-]|[$$Enter report increment [1..500]]|[##1]|[##500]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 23e0a-23e0e StackAdj> Δ+12 {[«32""»]|[-4-]}
<MI 23e0e MOVE.L (A7)+,0x2e526> Δ+4 {[«32""»]}
<POP 23e14-23e16 StackAdj> Δ+32 {}
<POP 23e16-23e1e Epilogue> Σ0
@ 23e1e
<POP 23e1e-23ffc Body>
<POP 23e1e-23e34 Prologue> Σ0 ↓
<POP 23e34-23e48 RegCacheLoad> Σ0 ↓
<POP 23e48-23e78 Naked> Σ0 ↓ →0x23eac
<Blob 0x23e48 [14] @> Δ-14 {[«14""»]}
<POP 23e54-23e56 StackAdj> Δ-6 {[«14""»]|[-6-]}
<Lit 0x23e56 14> {[«14""»]|[-2-]|[$$Exercise Disks]}
<POP 23e60-23e62 StackAdj> Δ-2 {[«14""»]|[-2-]|[$$Exercise Disks]|[-2-]}
<POP 23e62-23e63 StackAdj> Δ+2 {[«14""»]|[-2-]|[$$Exercise Disks]}
<Const 0x23e63 0x1.2> Δ-2 {[«14""»]|[-2-]|[$$Exercise Disks]|[#1]}
<Call 0x23e64 0x103f0> {[«14""»]|[-2-]|[$$Exercise Disks]|[#1]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 23e6a-23e6c StackAdj> Δ+6 {[«14""»]|[-2-]}
<MI 23e6c MOVE.B (A7)+,D0> Δ+2 {[«14""»]}
<MI 23e6e EXTB.W D0> {[«14""»]}
<POP 0x23e70 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«14""»]}
<POP 23e72-23e74 StackAdj> Δ+14 {}
<MI 23e74 MOVE.B D0,D6> {}
<MI 23e76 BEQ 0x23eac> {}
<POP 23e78-23eac Naked> Σ0 ↓
<Blob 0x23e78 [32] @> Δ-32 {[«32""»]}
<POP 23e88-23e8a StackAdj> Δ-6 {[«32""»]|[-6-]}
<Lit 0x23e8a 31> {[«32""»]|[-2-]|[$$Do all I/O to the same cylinder]}
<POP 23e96-23e98 StackAdj> Δ-2 {[«32""»]|[-2-]|[$$Do all I/O to the same cylinder]|[-2-]}
<MI 23e98 CLR.B (A7)> {[«32""»]|[-2-]|[$$Do all I/O to the same cylinder]|[-2-]}
<Call 0x23e9a 0x103f0> {[«32""»]|[-2-]|[$$Do all I/O to the same cylinder]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 23ea0-23ea2 StackAdj> Δ+6 {[«32""»]|[-2-]}
<MI 23ea2 MOVE.B (A7)+,D0> Δ+2 {[«32""»]}
<MI 23ea4 EXTB.W D0> {[«32""»]}
<POP 0x23ea6 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«32""»]}
<POP 23ea8-23eaa StackAdj> Δ+32 {}
<MI 23eaa MOVE.B D0,D5> {}
<POP 23eac-23eae Naked> Σ0 ↓ ←0x23e48
<MI 23eac MOVEQ.L #0x00,D7> {}
<POP 23eae-23ec6 Naked> Σ0 ↓ →0x23ed4 ←0x23f2c
<MI 23eae MOVEQ.L #0x46,D0> {}
<MI 23eb0 MULS.W D7,D0> {}
<MI 23eb2 LEA.L 0x2578e,A0> {}
<MI 23eb8 LEA.L (A0+D0.W),A0> {}
<MI 23ebc ADDA.L #0x892a,A0> {}
<MI 23ec2 TST.B D6> {}
<MI 23ec4 BEQ 0x23ed4> {}
<POP 23ec6-23ed4 Naked> Σ0 ↓ →0x23ed8
<POP 23ec6-23ec8 StackAdj> Δ-2 {[-2-]}
<MI 23ec8 MOVE.W D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x23eca 0x23c1a> {[-2-]|[2, 'D7']}
<POP 23ece-23ed0 StackAdj> Δ+2 {[-2-]}
<MI 23ed0 TST.B (A7)+> Δ+2 {}
<MI 23ed2 BNE 0x23ed8> {}
<POP 23ed4-23ed8 Naked> Σ0 →0x23f20 ←0x23eae
<MI 23ed4 CLR.B (A0)> {}
<MI 23ed6 BRA 0x23f20> {}
<POP 23ed8-23f20 Naked> Σ0 ↓ ←0x23ec6
<Blob 0x23ed8 [20] @> Δ-20 {[«20""»]}
<POP 23ee8-23eec StackAdj> Δ-10 {[«20""»]|[-10-]}
<Lit 0x23eec 19> {[«20""»]|[-6-]|[$$Exercise Disk unit_]}
<POP 23ef8-23efa StackAdj> Δ-4 {[«20""»]|[-6-]|[$$Exercise Disk unit_]|[-4-]}
<MI 23efa MOVE.W D7,D0> {[«20""»]|[-6-]|[$$Exercise Disk unit_]|[-4-]}
<MI 23efc EXTW.L D0> {[«20""»]|[-6-]|[$$Exercise Disk unit_]|[-4-]}
<MI 23efe MOVE.L D0,-(A7)> Δ-4 {[«20""»]|[-6-]|[$$Exercise Disk unit_]|[-4-]|[4, 'D0']}
<Call 0x23f00 0x102e4> {[«20""»]|[-6-]|[$$Exercise Disk unit_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 23f02-23f04 StackAdj> Δ+4 {[«20""»]|[-6-]|[$$Exercise Disk unit_]|[-4-]}
<Call 0x23f04 0x102d0> {[«20""»]|[-6-]|[$$Exercise Disk unit_]|[-4-]}
StringCat2(a, b : String) : String
<POP 23f0a-23f0c StackAdj> Δ+6 {[«20""»]|[-6-]|[-2-]}
<POP 23f0c-23f0d StackAdj> Δ+2 {[«20""»]|[-6-]}
<Const 0x23f0d 0x1.2> Δ-2 {[«20""»]|[-6-]|[#1]}
<Call 0x23f0e 0x103f0> {[«20""»]|[-6-]|[#1]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 23f14-23f16 StackAdj> Δ+6 {[«20""»]|[-2-]}
<MI 23f16 MOVE.B (A7)+,D0> Δ+2 {[«20""»]}
<MI 23f18 EXTB.W D0> {[«20""»]}
<POP 0x23f1a LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«20""»]}
<POP 23f1c-23f1e StackAdj> Δ+20 {}
<MI 23f1e MOVE.B D0,(A0)> {}
<POP 23f20-23f24 Naked> Σ0 ↓ →0x23f2c ←0x23ed4
<MI 23f20 TST.B (A0)> {}
<MI 23f22 BEQ 0x23f2c> {}
<POP 23f24-23f2c Naked> Σ0 ↓
<MI 23f24 MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x23f26 0x23c9e> {[2, 'D7']}
<POP 23f2a-23f2c StackAdj> Δ+2 {}
<POP 23f2c-23f36 Naked> Σ0 ↓ →0x23eae ←0x23f20
<MI 23f2c ADDQ.W #0x1,D7> {}
<MI 23f2e CMPI.W #0x000f,D7> {}
<MI 23f32 BLE 0x23eae> {}
<POP 23f36-23f38 Naked> Σ0 ↓
<MI 23f36 MOVEQ.L #0x00,D7> {}
<POP 23f38-23f52 Naked> Σ0 ↓ →0x23fea ←0x23fea
<MI 23f38 MOVEQ.L #0x46,D0> {}
<MI 23f3a MULS.W D7,D0> {}
<MI 23f3c LEA.L 0x2578e,A0> {}
<MI 23f42 LEA.L (A0+D0.W),A0> {}
<MI 23f46 ADDA.L #0x892a,A0> {}
<MI 23f4c TST.B (A0)> {}
<MI 23f4e BEQ 0x23fea> {}
<POP 23f52-23f56 Naked> Σ0 ↓ →0x23f5c
<MI 23f52 TST.B D5> {}
<MI 23f54 BEQ 0x23f5c> {}
<POP 23f56-23f5c Naked> Σ0 ↓
<MI 23f56 MOVE.L (A0+0x1a),(A0+0x1e)> {}
<POP 23f5c-23fea Naked> Σ0 ↓ ←0x23f52
<Blob 0x23f5c [14] @> Δ-14 {[«14""»]}
<Blob 0x23f6c [20] @> Δ-20 {[«14""»]|[«20""»]}
<Blob 0x23f7c [2] @> Δ-2 {[«14""»]|[«20""»]|[«2""»]}
<Blob 0x23f80 [2] @> Δ-2 {[«14""»]|[«20""»]|[«2""»]|[«2""»]}
<POP 23f84-23f86 StackAdj> Δ-8 {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-8-]}
<Lit 0x23f86 13> {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]}
<POP 23f92-23f94 StackAdj> Δ-4 {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]}
<MI 23f94 MOVE.W D7,D0> {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]}
<MI 23f96 EXTW.L D0> {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]}
<MI 23f98 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[4, 'D0']}
<Call 0x23f9a 0x102e4> {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<Lit 0x23f9c 19> {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[$$, using cylinders []}
<MI 23fa8 MOVE.L (A0+0x1a),(A7)> {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[4, '(A0+0x1a)']}
<POP 23fa6-23fa8 StackAdj> Δ-8 {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[4, '(A0+0x1a)']|[-8-]}
<Call 0x23fac 0x102e4> {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[4, '(A0+0x1a)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x23fae 2> {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[4, '(A0+0x1a)']|[-4-]|[$$..]}
<MI 23fba MOVE.L (A0+0x1e),-(A7)> Δ-4 {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[4, '(A0+0x1a)']|[-4-]|[$$..]|[4, '(A0+0x1e)']}
<POP 23fb8-23fba StackAdj> Δ-8 {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[4, '(A0+0x1a)']|[-4-]|[$$..]|[4, '(A0+0x1e)']|[-8-]}
<Call 0x23fbe 0x102e4> {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[4, '(A0+0x1a)']|[-4-]|[$$..]|[4, '(A0+0x1e)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x23fc0 2> {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[4, '(A0+0x1a)']|[-4-]|[$$..]|[4, '(A0+0x1e)']|[-4-]|[$$] ]}
<Call 0x23fce 0x102d0> {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[4, '(A0+0x1a)']|[-4-]|[$$..]|[4, '(A0+0x1e)']|[-4-]|[$$] ]}
StringCat2(a, b : String) : String
<POP 23fd4-23fd6 StackAdj> Δ+8 {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[4, '(A0+0x1a)']|[-4-]|[$$..]|[4, '(A0+0x1e)']}
<Call 0x23fd6 0x102e0> {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk unit =>_]|[-4-]|[4, '(A0+0x1a)']|[-4-]|[$$..]|[4, '(A0+0x1e)']}
StringCat6(a, b, c, d, e, f : String) : String
<POP 23fdc-23fe0 StackAdj> Δ+24 {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]}
<Call 0x23fe0 0x103e0> {[«14""»]|[«20""»]|[«2""»]|[«2""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23fe6-23fea StackAdj> Δ+42 {}
<POP 23fea-23ff4 Naked> Σ0 ↓ →0x23f38 ←0x23f38
<MI 23fea ADDQ.W #0x1,D7> {}
<MI 23fec CMPI.W #0x000f,D7> {}
<MI 23ff0 BLE 0x23f38> {}
<POP 23ff4-23ffc Epilogue> Σ0
@ 23ffc
<LVAR 0x00c 2(r)>
<LVAR 0x008 4(r)>
<LVAR -0x006 2(w)>
<LVAR -0x008 2(w)>
<LVAR -0x00c 2(w)>
<LVAR -0x010 @>
<LVAR -0x012 @>
<POP 23ffc-2405c Body>
<POP 23ffc-24012 Prologue> Σ0 ↓
<POP 24012-24014 RegCacheLoad> Σ0 ↓
<POP 24014-24054 Naked> Σ0 ↓
<MI 24014 MOVE.W #0x2,(A6-0xc)> {}
<MI 2401a MOVE.W #0x4,(A6-0x8)> {}
<MI 24020 MOVE.W (A6+0xc),D0> {}
<MI 24024 ASL.W #0x8,D0> {}
<MI 24026 ADDQ.W #0x1,D0> {}
<MI 24028 MOVE.W D0,(A6-0x6)> {}
<Pointer.fp 0x2402c <LVAR -0x010 @>> Δ-4 {[@@-16]}
<MI 24030 MOVEA.L (A6+0x8),A0> {[@@-16]}
<MI 24034 MOVE.L A0,-(A7)> Δ-4 {[@@-16]|[4, 'A0']}
<Const 0x24036 0x1c.2> Δ-2 {[@@-16]|[4, 'A0']|[#28]}
<Const 0x24038 0x0.4> Δ-4 {[@@-16]|[4, 'A0']|[#28]|[##0]}
<Const 0x2403c 0x16.4> Δ-4 {[@@-16]|[4, 'A0']|[#28]|[##0]|[##22]}
<Call 0x24040 0x21244> {[@@-16]|[4, 'A0']|[#28]|[##0]|[##22]}
<POP 24044-24048 StackAdj> Δ+16 {[-2-]}
<POP 24048-24049 StackAdj> Δ+2 {}
<Const 0x24049 0x1c.2> Δ-2 {[#28]}
<Pointer.fp 0x2404a <LVAR -0x012 @>> Δ-4 {[#28]|[@@-18]}
<Call 0x2404e 0x2115a> {[#28]|[@@-18]}
<POP 24052-24054 StackAdj> Δ+6 {}
<POP 24054-2405c Epilogue> Σ0
@ 2405c
<LVAR 0x008 2(r)>
<LVAR -0x008 2(w)>
<LVAR -0x00a 2(w)>
<LVAR -0x00c 2(w)>
<LVAR -0x00e 2(r)>
<LVAR -0x012 2(w)>
<LVAR -0x016 @ 2(w)>
<POP 2405c-24150 Body>
<POP 2405c-24072 Prologue> Σ0 ↓
<POP 24072-24084 RegCacheLoad> Σ0 ↓
<POP 24084-24148 Naked> Σ0 ↓
<MI 24084 MOVEQ.L #0x46,D0> {}
<MI 24086 MULS.W (A6+0x8),D0> {}
<MI 24088 LEA.L 0x2578e,A0> {}
<MI 2408e LEA.L (A0+D0.W),A0> {}
<MI 24092 ADDA.L #0x892a,A0> {}
<POP 24098-2409a StackAdj> Δ-4 {[-4-]}
<Call 0x2409a 0x20cc2> {[-4-]}
<MI 2409e MOVE.L (A7)+,D0> Δ+4 {}
<POP 0x240a0 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 240a6 MOVE.W D0,(A0+0x26)> {}
<POP 240aa-240ac StackAdj> Δ-4 {[-4-]}
<Const 0x240ac 0x0.4> Δ-4 {[-4-]|[##0]}
<MI 240ae CLR.L D0> {[-4-]|[##0]}
<MI 240b0 MOVE.W (A0+0x24),D0> {[-4-]|[##0]}
<MI 240b4 SUBQ.L #0x1,D0> {[-4-]|[##0]}
<MI 240b6 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[##0]|[4, 'D0']}
<Call 0x240b8 0x20c68> {[-4-]|[##0]|[4, 'D0']}
<POP 240ba-240bc StackAdj> Δ+8 {[-4-]}
<MI 240bc MOVE.L (A7)+,D0> Δ+4 {}
<MI 240be ASL.L #0x1,D0> {}
<MI 240c0 MOVE.L D0,(A0+0xe)> {}
<POP 240c4-240c6 StackAdj> Δ-4 {[-4-]}
<Const 0x240c6 0x0.4> Δ-4 {[-4-]|[##0]}
<MI 240c8 CLR.L D0> {[-4-]|[##0]}
<MI 240ca MOVE.W (A0+0x22),D0> {[-4-]|[##0]}
<MI 240ce SUBQ.L #0x1,D0> {[-4-]|[##0]}
<MI 240d0 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[##0]|[4, 'D0']}
<Call 0x240d2 0x20c68> {[-4-]|[##0]|[4, 'D0']}
<POP 240d4-240d6 StackAdj> Δ+8 {[-4-]}
<MI 240d6 MOVE.L (A7),(A0+0x12)> {[-4-]}
<MI 240da MOVE.L (A0+0x1a),-(A7)> Δ-4 {[-4-]|[4, '(A0+0x1a)']}
<MI 240de MOVE.L (A0+0x1e),-(A7)> Δ-4 {[-4-]|[4, '(A0+0x1a)']|[4, '(A0+0x1e)']}
<Call 0x240e2 0x20c68> {[-4-]|[4, '(A0+0x1a)']|[4, '(A0+0x1e)']}
<POP 240e4-240e6 StackAdj> Δ+8 {[-4-]}
<MI 240e6 MOVE.L (A7)+,(A0+0x16)> Δ+4 {}
<MI 240ea MOVE.W #0x100,(A6-0x16)> {}
<MI 240f0 MOVE.W #0x2,(A6-0x12)> {}
<MI 240f6 CLR.W (A6-0xe)> {}
<MI 240fa MOVE.W (A6+0x8),D0> {}
<MI 240fc ASL.W #0x8,D0> {}
<MI 240fe ADDI.W #0x000b,D0> {}
<MI 24102 MOVE.W D0,(A6-0xc)> {}
<MI 24106 MOVE.L (A0+0x16),D0> {}
<POP 0x2410a LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 24110 MOVE.W D0,(A6-0xa)> {}
<MI 24114 MOVE.L (A0+0x12),D0> {}
<MI 24118 ASL.L #0x8,D0> {}
<MI 2411a ADD.L (A0+0xe),D0> {}
<POP 0x2411e LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 24124 MOVE.W D0,(A6-0x8)> {}
<Pointer.fp 0x24128 <LVAR -0x016 @ 2(w)>> Δ-4 {[@@-22]}
<MI 2412c LEA.L (A0+0x26),A1> {[@@-22]}
<MI 24130 MOVE.L A1,-(A7)> Δ-4 {[@@-22]|[4, 'A1']}
<MI 24132 MOVE.W (A6+0x8),-(A7)> Δ-2 {[@@-22]|[4, 'A1']|[2, '(A6+0x8)']}
<Const 0x24134 0x2.4> Δ-4 {[@@-22]|[4, 'A1']|[2, '(A6+0x8)']|[##2]}
<Const 0x24138 0x0.4> Δ-4 {[@@-22]|[4, 'A1']|[2, '(A6+0x8)']|[##2]|[##0]}
<Call 0x2413a 0x21244> {[@@-22]|[4, 'A1']|[2, '(A6+0x8)']|[##2]|[##0]}
<POP 2413e-24142 StackAdj> Δ+18 {}
<MI 24142 MOVE.B #0x01,(A0+0x1)> {}
<POP 24148-24150 Epilogue> Σ0
@ 24150
<LVAR 0x008 2(r)>
<LVAR -0x004 2(w)>
<LVAR -0x006 2(w)>
<LVAR -0x008 2(w)>
<LVAR -0x00a 2(r)>
<LVAR -0x00e 2(w)>
<LVAR -0x012 @ 2(w)>
<POP 24150-241ec Body>
<POP 24150-24166 Prologue> Σ0 ↓
<POP 24166-2416a RegCacheLoad> Σ0 ↓
<POP 2416a-241e4 Naked> Σ0 ↓
<MI 2416a MOVEQ.L #0x46,D0> {}
<MI 2416c MULS.W (A6+0x8),D0> {}
<MI 2416e LEA.L 0x2578e,A0> {}
<MI 24174 LEA.L (A0+D0.W),A0> {}
<MI 24178 ADDA.L #0x892a,A0> {}
<MI 2417e MOVE.W #0x100,(A6-0x12)> {}
<MI 24184 MOVE.W #0x2,(A6-0xe)> {}
<MI 2418a CLR.W (A6-0xa)> {}
<MI 2418e MOVE.W (A6+0x8),D0> {}
<MI 24190 ASL.W #0x8,D0> {}
<MI 24192 ADDI.W #0x000c,D0> {}
<MI 24196 MOVE.W D0,(A6-0x8)> {}
<MI 2419a MOVE.L (A0+0x16),D0> {}
<POP 0x2419e LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 241a8 MOVE.W D0,(A6-0x6)> {}
<MI 241ac MOVE.L (A0+0x12),D0> {}
<MI 241b0 ASL.L #0x8,D0> {}
<MI 241b2 ADD.L (A0+0xe),D0> {}
<POP 0x241b6 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 241c0 MOVE.W D0,(A6-0x4)> {}
<Pointer.fp 0x241c4 <LVAR -0x012 @ 2(w)>> Δ-4 {[@@-18]}
<MI 241c8 LEA.L (A0+0x26),A1> {[@@-18]}
<MI 241cc MOVE.L A1,-(A7)> Δ-4 {[@@-18]|[4, 'A1']}
<MI 241ce MOVE.W (A6+0x8),-(A7)> Δ-2 {[@@-18]|[4, 'A1']|[2, '(A6+0x8)']}
<Const 0x241d0 0x2.4> Δ-4 {[@@-18]|[4, 'A1']|[2, '(A6+0x8)']|[##2]}
<Const 0x241d4 0x0.4> Δ-4 {[@@-18]|[4, 'A1']|[2, '(A6+0x8)']|[##2]|[##0]}
<Call 0x241d8 0x21244> {[@@-18]|[4, 'A1']|[2, '(A6+0x8)']|[##2]|[##0]}
<POP 241dc-241e0 StackAdj> Δ+18 {}
<MI 241e0 CLR.B (A0+0x1)> {}
<POP 241e4-241ec Epilogue> Σ0
@ 241ec
<LVAR 0x008 4(r)>
<POP 241ec-2427c Body>
<POP 241ec-24202 Prologue> Σ0 ↓
<POP 24202-2420a RegCacheLoad> Σ0 ↓
<POP 2420a-24210 Naked> Σ0 ↓ →0x24222
<MI 2420a MOVEA.L (A4+0x8),A0> {}
<MI 2420c TST.W (A0)> {}
<MI 2420e BNE 0x24222> {}
<POP 24210-24222 Naked> Σ0 →0x24274
<POP 24210-24212 StackAdj> Δ-4 {[-4-]}
<MI 24212 MOVE.L (A4+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A4+0x8)']}
<MI 24214 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A4+0x8)']|[4, '(A6+0x8)']}
<Call 0x24216 0x102d0> {[-4-]|[4, '(A4+0x8)']|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 2421c-2421e StackAdj> Δ+8 {[-4-]}
<MI 2421e MOVE.L (A7)+,(A4+0x8)> Δ+4 {}
<MI 24220 BRA 0x24274> {}
<POP 24222-24238 Naked> Σ0 ↓ →0x24268 ←0x2420a
<MI 24222 MOVE.W (A0),D0> {}
<MI 24224 EXTW.L D0> {}
<MI 24226 ADDQ.L #0x2,D0> {}
<MI 24228 MOVEA.L (A6+0x8),A0> {}
<MI 2422a MOVE.W (A0),D1> {}
<MI 2422c EXTW.L D1> {}
<MI 2422e ADD.L D0,D1> {}
<MI 24230 CMPI.L #0x00000050,D1> {}
<MI 24236 BGT 0x24268> {}
<POP 24238-24268 Naked> Σ0 →0x24274
<Blob 0x24238 [2] @> Δ-2 {[«2""»]}
<POP 2423c-2423e StackAdj> Δ-4 {[«2""»]|[-4-]}
<MI 2423e MOVE.L (A4+0x8),-(A7)> Δ-4 {[«2""»]|[-4-]|[4, '(A4+0x8)']}
<POP 24240-24242 StackAdj> Δ-4 {[«2""»]|[-4-]|[4, '(A4+0x8)']|[-4-]}
<Lit 0x24242 2> {[«2""»]|[-4-]|[4, '(A4+0x8)']|[$$,_]}
<POP 24254-24256 StackAdj> Δ-4 {[«2""»]|[-4-]|[4, '(A4+0x8)']|[$$,_]|[-4-]}
<MI 24256 MOVE.L (A6+0x8),(A7)> {[«2""»]|[-4-]|[4, '(A4+0x8)']|[$$,_]|[4, '(A6+0x8)']}
<Call 0x24258 0x102d4> {[«2""»]|[-4-]|[4, '(A4+0x8)']|[$$,_]|[4, '(A6+0x8)']}
StringCat3(a, b, c : String) : String
<POP 2425e-24262 StackAdj> Δ+12 {[«2""»]|[-4-]}
<MI 24262 MOVE.L (A7)+,(A4+0x8)> Δ+4 {[«2""»]}
<POP 24264-24266 StackAdj> Δ+2 {}
<MI 24266 BRA 0x24274> {}
<POP 24268-24274 Naked> Σ0 ↓ ←0x24222
<MI 24268 MOVE.L (A4+0x8),-(A7)> Δ-4 {[4, '(A4+0x8)']}
<Call 0x2426a 0x103e0> {[4, '(A4+0x8)']}
WriteConsoleStringCrLf(str : String)
<POP 24270-24272 StackAdj> Δ+4 {}
<MI 24272 MOVE.L (A6+0x8),(A4+0x8)> {}
<POP 24274-2427c Epilogue> Σ0 ←0x24210 ←0x24238
@ 2427c
<LVAR 0x00a 4(r)>
<LVAR 0x008 2(r)>
<LVAR -0x006 @ 4(r)>
<LVAR -0x00e @ 4(r)>
<POP 2427c-24b68 Body>
<POP 2427c-24292 Prologue> Σ0 ↓
<POP 24292-2429e RegCacheLoad> Σ0 ↓
<POP 2429e-2438a Naked> Σ0 Δ-4 ↓
<Pointer.fp 0x2429e <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x242a2 0x102b8> {[@@-6]}
NewString(VAR a : String)
<POP 242a8-242aa StackAdj> Δ+4 {}
<Pointer.fp 0x242aa <LVAR -0x00e @ 4(r)>> Δ-4 {[@@-14]}
<Call 0x242ae 0x10304> {[@@-14]}
GetRtc() : TimeStamp
<POP 242b4-242b6 StackAdj> Δ+4 {}
<MI 242b6 MOVEQ.L #0x46,D0> {}
<MI 242b8 MULS.W (A6+0x8),D0> {}
<MI 242bc LEA.L 0x2578e,A0> {}
<MI 242c2 LEA.L (A0+D0.W),A0> {}
<MI 242c6 ADDA.L #0x892a,A0> {}
<MI 242cc MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Blob 0x242ce [4] @> Δ-4 {[4, 'A0']|[«4""»]}
<Blob 0x242d2 [4] @> Δ-4 {[4, 'A0']|[«4""»]|[«4""»]}
<Blob 0x242d6 [4] @> Δ-4 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]}
<Blob 0x242da [2] @> Δ-2 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]}
<Blob 0x242de [2] @> Δ-2 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]}
<POP 242e2-242e4 StackAdj> Δ-8 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-8-]}
<Lit 0x242e4 12> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]}
<POP 242f0-242f2 StackAdj> Δ-12 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-12-]}
<MI 242f2 MOVE.W (A6+0x8),D0> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-12-]}
<MI 242f6 EXTW.L D0> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-12-]}
<MI 242f8 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-12-]|[4, 'D0']}
<Call 0x242fa 0x102e4> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-12-]|[4, 'D0']}
Long2String(a : Long) : String
<Lit 0x24300 2> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-12-]|[$$, ]}
<Call 0x2430e 0x102d0> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-12-]|[$$, ]}
StringCat2(a, b : String) : String
<POP 24314-24316 StackAdj> Δ+8 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-8-]}
<Const 0x24316 0x4.4> Δ-4 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-8-]|[##4]}
<Call 0x2431a 0x102f8> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-8-]|[##4]}
LeftPad(a : String; b : Long) : String
<MI 24320 MOVE.L (A6-0xe),(A7)> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-8-]|[4, '(A6-0xe)']}
<Call 0x24324 0x10308> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-8-]|[4, '(A6-0xe)']}
TimeToText()
<Lit 0x2432a 2> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-8-]|[$$,_]}
<Call 0x24338 0x102d8> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-8-]|[$$,_]}
StringCat4(a, b, c, d : String) : String
<POP 2433e-24340 StackAdj> Δ+16 {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]}
<Call 0x24340 0x103d8> {[4, 'A0']|[«4""»]|[«4""»]|[«4""»]|[«2""»]|[«2""»]|[-4-]}
WriteConsoleString(str : String)
<POP 24346-24348 StackAdj> Δ+20 {[4, 'A0']}
<Blob 0x24348 [18] @> Δ-18 {[4, 'A0']|[«18""»]}
<POP 24354-24356 StackAdj> Δ-4 {[4, 'A0']|[«18""»]|[-4-]}
<MI 24356 MOVE.L (A6+0xa),-(A7)> Δ-4 {[4, 'A0']|[«18""»]|[-4-]|[4, '(A6+0xa)']}
<POP 2435a-2435c StackAdj> Δ-4 {[4, 'A0']|[«18""»]|[-4-]|[4, '(A6+0xa)']|[-4-]}
<Lit 0x2435c 18> {[4, 'A0']|[«18""»]|[-4-]|[4, '(A6+0xa)']|[$$ error, retries =>]}
<MI 24368 MOVE.L (A0+0xa),(A7)> {[4, 'A0']|[«18""»]|[-4-]|[4, '(A6+0xa)']|[4, '(A0+0xa)']}
<POP 24366-24368 StackAdj> Δ-8 {[4, 'A0']|[«18""»]|[-4-]|[4, '(A6+0xa)']|[4, '(A0+0xa)']|[-8-]}
<Call 0x2436c 0x102e4> {[4, 'A0']|[«18""»]|[-4-]|[4, '(A6+0xa)']|[4, '(A0+0xa)']|[-8-]}
Long2String(a : Long) : String
<POP 24372-24374 StackAdj> Δ+4 {[4, 'A0']|[«18""»]|[-4-]|[4, '(A6+0xa)']|[4, '(A0+0xa)']|[-4-]}
<Call 0x24374 0x102d4> {[4, 'A0']|[«18""»]|[-4-]|[4, '(A6+0xa)']|[4, '(A0+0xa)']|[-4-]}
StringCat3(a, b, c : String) : String
<POP 2437a-2437e StackAdj> Δ+12 {[4, 'A0']|[«18""»]|[-4-]}
<Call 0x2437e 0x103e0> {[4, 'A0']|[«18""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 24384-24388 StackAdj> Δ+22 {[4, 'A0']}
<MI 24388 MOVEQ.L #0x00,D7> {[4, 'A0']}
<POP 2438a-24404 Naked> Σ-4 ↓ →0x2438a ←0x2438a
<POP 0x2438a LimitCheck 0x0 ≤ D7 ≤ 0x8> {[-4-]}
<MI 24394 MOVE.L D7,D4> {[-4-]}
<MI 24396 MOVEQ.L #0x05,D3> {[-4-]}
<Call 0x24398 0x1028c> {[-4-]}
?muls_d3_d4
<MI 2439e LEA.L 0x20c14,A0> {[-4-]}
<Blob 0x243a2 [6] (A0+D4.L)> Δ-6 {[-4-]|[«6»]}
<POP 243b2-243b4 StackAdj> Δ-8 {[-4-]|[«6»]|[-8-]}
<Lit 0x243b4> {[-4-]|[«6»]|[-4-]|[$$…]}
<Pointer.sp 0x243b4 8> Δ-4
<Const 0x243b8 0x1.2> Δ-2
<Const 0x243ba 0x5.2> Δ-2
<Call 0x243be 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 243c0-243c2 StackAdj> Δ+8
<POP 243c0-243c2 StackAdj> Δ-4 {[-4-]|[«6»]|[-4-]|[$$…]|[-4-]}
<POP 0x243c2 LimitCheck 0x0 ≤ D7 ≤ 0xa> {[-4-]|[«6»]|[-4-]|[$$…]|[-4-]}
<MI 243cc MOVE.L D7,D0> {[-4-]|[«6»]|[-4-]|[$$…]|[-4-]}
<MI 243ce ASL.L #0x1,D0> {[-4-]|[«6»]|[-4-]|[$$…]|[-4-]}
<MI 243d0 MOVEA.L (A7+0x12),A0> {[-4-]|[«6»]|[-4-]|[$$…]|[-4-]}
<MI 243d4 CLR.L D1> {[-4-]|[«6»]|[-4-]|[$$…]|[-4-]}
<MI 243d6 MOVE.W (A0+D0.L+#0x28),D1> {[-4-]|[«6»]|[-4-]|[$$…]|[-4-]}
<MI 243da MOVE.L D1,-(A7)> Δ-4 {[-4-]|[«6»]|[-4-]|[$$…]|[-4-]|[4, 'D1']}
<Const 0x243dc 0x4.4> Δ-4 {[-4-]|[«6»]|[-4-]|[$$…]|[-4-]|[4, 'D1']|[##4]}
<Call 0x243e0 0x102e8> {[-4-]|[«6»]|[-4-]|[$$…]|[-4-]|[4, 'D1']|[##4]}
Long2HexString(val : Long; ndig : Long) : String
<POP 243e6-243e8 StackAdj> Δ+8 {[-4-]|[«6»]|[-4-]|[$$…]|[-4-]}
<Call 0x243e8 0x102d0> {[-4-]|[«6»]|[-4-]|[$$…]|[-4-]}
StringCat2(a, b : String) : String
<POP 243ee-243f0 StackAdj> Δ+8 {[-4-]|[«6»]|[-4-]}
<Call 0x243f0 0x103d8> {[-4-]|[«6»]|[-4-]}
WriteConsoleString(str : String)
<POP 243f6-243fa StackAdj> Δ+10 {[-4-]}
<MI 243fa ADDQ.L #0x1,D7> {[-4-]}
<MI 243fc CMPI.L #0x00000008,D7> {[-4-]}
<MI 24402 BLE 0x2438a> {[-4-]}
<POP 24404-24416 Naked> Σ-4 ↓ →0x24444
<Call 0x24404 0x103dc> {[-4-]}
WriteConsoleCrLf(void)
<MI 2440a MOVEA.L (A7),A0> {[-4-]}
<MI 2440c MOVE.W (A0+0x28),D0> {[-4-]}
<MI 24410 ANDI.W #0x8000,D0> {[-4-]}
<MI 24414 BEQ 0x24444> {[-4-]}
<POP 24416-24444 Naked> Σ-4 ↓
<Blob 0x24416 [18] @> Δ-18 {[-4-]|[«18""»]}
<POP 24428-2442a StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]}
<Lit 0x2442a 17> {[-4-]|[«18""»]|[$$Special condition]}
<MI 24438 LEA.L (A6-0xe),A4> {[-4-]|[«18""»]|[$$Special condition]}
<Call 0x2443c 0x241ec> {[-4-]|[«18""»]|[$$Special condition]}
<POP 24440-24444 StackAdj> Δ+22 {[-4-]}
<POP 24444-2444e Naked> Σ-4 ↓ →0x24476 ←0x24404
<MI 24444 MOVE.W (A0+0x28),D0> {[-4-]}
<MI 24448 ANDI.W #0x4000,D0> {[-4-]}
<MI 2444c BEQ 0x24476> {[-4-]}
<POP 2444e-24476 Naked> Σ-4 ↓
<Blob 0x2444e [14] @> Δ-14 {[-4-]|[«14""»]}
<POP 2445a-2445c StackAdj> Δ-4 {[-4-]|[«14""»]|[-4-]}
<Lit 0x2445c 14> {[-4-]|[«14""»]|[$$Transfer error]}
<MI 2446a LEA.L (A6-0xe),A4> {[-4-]|[«14""»]|[$$Transfer error]}
<Call 0x2446e 0x241ec> {[-4-]|[«14""»]|[$$Transfer error]}
<POP 24472-24476 StackAdj> Δ+18 {[-4-]}
<POP 24476-24480 Naked> Σ-4 ↓ →0x244a8 ←0x24444
<MI 24476 MOVE.W (A0+0x28),D0> {[-4-]}
<MI 2447a ANDI.W #0x0800,D0> {[-4-]}
<MI 2447e BNE 0x244a8> {[-4-]}
<POP 24480-244a8 Naked> Σ-4 ↓
<Blob 0x24480 [22] @> Δ-22 {[-4-]|[«22""»]}
<POP 2448c-2448e StackAdj> Δ-4 {[-4-]|[«22""»]|[-4-]}
<Lit 0x2448e 22> {[-4-]|[«22""»]|[$$Drive is not available]}
<MI 2449c LEA.L (A6-0xe),A4> {[-4-]|[«22""»]|[$$Drive is not available]}
<Call 0x244a0 0x241ec> {[-4-]|[«22""»]|[$$Drive is not available]}
<POP 244a4-244a8 StackAdj> Δ+26 {[-4-]}
<POP 244a8-244b2 Naked> Σ-4 ↓ →0x244da ←0x24476
<MI 244a8 MOVE.W (A0+0x28),D0> {[-4-]}
<MI 244ac ANDI.W #0x0080,D0> {[-4-]}
<MI 244b0 BNE 0x244da> {[-4-]}
<POP 244b2-244da Naked> Σ-4 ↓
<Blob 0x244b2 [18] @> Δ-18 {[-4-]|[«18""»]}
<POP 244be-244c0 StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]}
<Lit 0x244c0 18> {[-4-]|[«18""»]|[$$Drive is not ready]}
<MI 244ce LEA.L (A6-0xe),A4> {[-4-]|[«18""»]|[$$Drive is not ready]}
<Call 0x244d2 0x241ec> {[-4-]|[«18""»]|[$$Drive is not ready]}
<POP 244d6-244da StackAdj> Δ+22 {[-4-]}
<POP 244da-244e4 Naked> Σ-4 ↓ →0x24512 ←0x244a8
<MI 244da MOVE.W (A0+0x2a),D0> {[-4-]}
<MI 244de ANDI.W #0x8000,D0> {[-4-]}
<MI 244e2 BEQ 0x24512> {[-4-]}
<POP 244e4-24512 Naked> Σ-4 ↓
<Blob 0x244e4 [10] @> Δ-10 {[-4-]|[«10""»]}
<POP 244f6-244f8 StackAdj> Δ-4 {[-4-]|[«10""»]|[-4-]}
<Lit 0x244f8 9> {[-4-]|[«10""»]|[$$Data late]}
<MI 24506 LEA.L (A6-0xe),A4> {[-4-]|[«10""»]|[$$Data late]}
<Call 0x2450a 0x241ec> {[-4-]|[«10""»]|[$$Data late]}
<POP 2450e-24512 StackAdj> Δ+14 {[-4-]}
<POP 24512-2451c Naked> Σ-4 ↓ →0x2454a ←0x244da
<MI 24512 MOVE.W (A0+0x2a),D0> {[-4-]}
<MI 24516 ANDI.W #0x4000,D0> {[-4-]}
<MI 2451a BEQ 0x2454a> {[-4-]}
<POP 2451c-2454a Naked> Σ-4 ↓
<Blob 0x2451c [18] @> Δ-18 {[-4-]|[«18""»]}
<POP 2452e-24530 StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]}
<Lit 0x24530 17> {[-4-]|[«18""»]|[$$Write check error]}
<MI 2453e LEA.L (A6-0xe),A4> {[-4-]|[«18""»]|[$$Write check error]}
<Call 0x24542 0x241ec> {[-4-]|[«18""»]|[$$Write check error]}
<POP 24546-2454a StackAdj> Δ+22 {[-4-]}
<POP 2454a-24554 Naked> Σ-4 ↓ →0x2457c ←0x24512
<MI 2454a MOVE.W (A0+0x2a),D0> {[-4-]}
<MI 2454e ANDI.W #0x1000,D0> {[-4-]}
<MI 24552 BEQ 0x2457c> {[-4-]}
<POP 24554-2457c Naked> Σ-4 ↓
<Blob 0x24554 [18] @> Δ-18 {[-4-]|[«18""»]}
<POP 24560-24562 StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]}
<Lit 0x24562 18> {[-4-]|[«18""»]|[$$Non-existent drive]}
<MI 24570 LEA.L (A6-0xe),A4> {[-4-]|[«18""»]|[$$Non-existent drive]}
<Call 0x24574 0x241ec> {[-4-]|[«18""»]|[$$Non-existent drive]}
<POP 24578-2457c StackAdj> Δ+22 {[-4-]}
<POP 2457c-24586 Naked> Σ-4 ↓ →0x245b2 ←0x2454a
<MI 2457c MOVE.W (A0+0x2a),D0> {[-4-]}
<MI 24580 ANDI.W #0x0800,D0> {[-4-]}
<MI 24584 BEQ 0x245b2> {[-4-]}
<POP 24586-245b2 Naked> Σ-4 ↓
<Blob 0x24586 [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 24596-24598 StackAdj> Δ-4 {[-4-]|[«20""»]|[-4-]}
<Lit 0x24598 19> {[-4-]|[«20""»]|[$$Non-existent memory]}
<MI 245a6 LEA.L (A6-0xe),A4> {[-4-]|[«20""»]|[$$Non-existent memory]}
<Call 0x245aa 0x241ec> {[-4-]|[«20""»]|[$$Non-existent memory]}
<POP 245ae-245b2 StackAdj> Δ+24 {[-4-]}
<POP 245b2-245bc Naked> Σ-4 ↓ →0x245ea ←0x2457c
<MI 245b2 MOVE.W (A0+0x2a),D0> {[-4-]}
<MI 245b6 ANDI.W #0x0400,D0> {[-4-]}
<MI 245ba BEQ 0x245ea> {[-4-]}
<POP 245bc-245ea Naked> Σ-4 ↓
<Blob 0x245bc [14] @> Δ-14 {[-4-]|[«14""»]}
<POP 245ce-245d0 StackAdj> Δ-4 {[-4-]|[«14""»]|[-4-]}
<Lit 0x245d0 13> {[-4-]|[«14""»]|[$$Program error]}
<MI 245de LEA.L (A6-0xe),A4> {[-4-]|[«14""»]|[$$Program error]}
<Call 0x245e2 0x241ec> {[-4-]|[«14""»]|[$$Program error]}
<POP 245e6-245ea StackAdj> Δ+18 {[-4-]}
<POP 245ea-245f4 Naked> Σ-4 ↓ →0x2461e ←0x245b2
<MI 245ea MOVE.W (A0+0x2a),D0> {[-4-]}
<MI 245ee ANDI.W #0x0200,D0> {[-4-]}
<MI 245f2 BEQ 0x2461e> {[-4-]}
<POP 245f4-2461e Naked> Σ-4 ↓
<Blob 0x245f4 [16] @> Δ-16 {[-4-]|[«16""»]}
<POP 24604-24606 StackAdj> Δ-4 {[-4-]|[«16""»]|[-4-]}
<Lit 0x24606 15> {[-4-]|[«16""»]|[$$Missed transfer]}
<MI 24614 LEA.L (A6-0xe),A4> {[-4-]|[«16""»]|[$$Missed transfer]}
<Call 0x24618 0x241ec> {[-4-]|[«16""»]|[$$Missed transfer]}
<POP 2461c-2461e StackAdj> Δ+20 {[-4-]}
<POP 2461e-24628 Naked> Σ-4 ↓ →0x24652 ←0x245ea
<MI 2461e MOVE.W (A0+0x2a),D0> {[-4-]}
<MI 24622 ANDI.W #0x0040,D0> {[-4-]}
<MI 24626 BNE 0x24652> {[-4-]}
<POP 24628-24652 Naked> Σ-4 ↓
<Blob 0x24628 [16] @> Δ-16 {[-4-]|[«16""»]}
<POP 24638-2463a StackAdj> Δ-4 {[-4-]|[«16""»]|[-4-]}
<Lit 0x2463a 15> {[-4-]|[«16""»]|[$$Input not ready]}
<MI 24648 LEA.L (A6-0xe),A4> {[-4-]|[«16""»]|[$$Input not ready]}
<Call 0x2464c 0x241ec> {[-4-]|[«16""»]|[$$Input not ready]}
<POP 24650-24652 StackAdj> Δ+20 {[-4-]}
<POP 24652-2465c Naked> Σ-4 ↓ →0x2468a ←0x2461e
<MI 24652 MOVE.W (A0+0x2a),D0> {[-4-]}
<MI 24656 ANDI.W #0x0004,D0> {[-4-]}
<MI 2465a BEQ 0x2468a> {[-4-]}
<POP 2465c-2468a Naked> Σ-4 ↓
<Blob 0x2465c [30] @> Δ-30 {[-4-]|[«30""»]}
<POP 2466e-24670 StackAdj> Δ-4 {[-4-]|[«30""»]|[-4-]}
<Lit 0x24670 29> {[-4-]|[«30""»]|[$$Bus address increment inhibit]}
<MI 2467e LEA.L (A6-0xe),A4> {[-4-]|[«30""»]|[$$Bus address increment inhibit]}
<Call 0x24682 0x241ec> {[-4-]|[«30""»]|[$$Bus address increment inhibit]}
<POP 24686-2468a StackAdj> Δ+34 {[-4-]}
<POP 2468a-24694 Naked> Σ-4 ↓ →0x246c2 ←0x24652
<MI 2468a MOVE.W (A0+0x2c),D0> {[-4-]}
<MI 2468e ANDI.W #0x2000,D0> {[-4-]}
<MI 24692 BEQ 0x246c2> {[-4-]}
<POP 24694-246c2 Naked> Σ-4 ↓
<Blob 0x24694 [24] @> Δ-24 {[-4-]|[«24""»]}
<POP 246a6-246a8 StackAdj> Δ-4 {[-4-]|[«24""»]|[-4-]}
<Lit 0x246a8 23> {[-4-]|[«24""»]|[$$Positioning in progress]}
<MI 246b6 LEA.L (A6-0xe),A4> {[-4-]|[«24""»]|[$$Positioning in progress]}
<Call 0x246ba 0x241ec> {[-4-]|[«24""»]|[$$Positioning in progress]}
<POP 246be-246c2 StackAdj> Δ+28 {[-4-]}
<POP 246c2-246cc Naked> Σ-4 ↓ →0x246f4 ←0x2468a
<MI 246c2 MOVE.W (A0+0x2c),D0> {[-4-]}
<MI 246c6 ANDI.W #0x1000,D0> {[-4-]}
<MI 246ca BNE 0x246f4> {[-4-]}
<POP 246cc-246f4 Naked> Σ-4 ↓
<Blob 0x246cc [18] @> Δ-18 {[-4-]|[«18""»]}
<POP 246d8-246da StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]}
<Lit 0x246da 18> {[-4-]|[«18""»]|[$$Medium not on-line]}
<MI 246e8 LEA.L (A6-0xe),A4> {[-4-]|[«18""»]|[$$Medium not on-line]}
<Call 0x246ec 0x241ec> {[-4-]|[«18""»]|[$$Medium not on-line]}
<POP 246f0-246f4 StackAdj> Δ+22 {[-4-]}
<POP 246f4-246fe Naked> Σ-4 ↓ →0x24724 ←0x246c2
<MI 246f4 MOVE.W (A0+0x2c),D0> {[-4-]}
<MI 246f8 ANDI.W #0x0800,D0> {[-4-]}
<MI 246fc BEQ 0x24724> {[-4-]}
<POP 246fe-24724 Naked> Σ-4 ↓
<Blob 0x246fe [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x24702 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x24706 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<POP 2470a-2470c StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x2470c 12> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Write locked]}
<MI 2471a LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Write locked]}
<Call 0x2471e 0x241ec> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Write locked]}
<POP 24722-24724 StackAdj> Δ+16 {[-4-]}
<POP 24724-2472e Naked> Σ-4 ↓ →0x24756 ←0x246f4
<MI 24724 MOVE.W (A0+0x2c),D0> {[-4-]}
<MI 24728 ANDI.W #0x0400,D0> {[-4-]}
<MI 2472c BEQ 0x24756> {[-4-]}
<POP 2472e-24756 Naked> Σ-4 ↓
<Blob 0x2472e [22] @> Δ-22 {[-4-]|[«22""»]}
<POP 2473a-2473c StackAdj> Δ-4 {[-4-]|[«22""»]|[-4-]}
<Lit 0x2473c 22> {[-4-]|[«22""»]|[$$Last sector transfered]}
<MI 2474a LEA.L (A6-0xe),A4> {[-4-]|[«22""»]|[$$Last sector transfered]}
<Call 0x2474e 0x241ec> {[-4-]|[«22""»]|[$$Last sector transfered]}
<POP 24752-24756 StackAdj> Δ+26 {[-4-]}
<POP 24756-24760 Naked> Σ-4 ↓ →0x2478e ←0x24724
<MI 24756 MOVE.W (A0+0x2c),D0> {[-4-]}
<MI 2475a ANDI.W #0x0100,D0> {[-4-]}
<MI 2475e BNE 0x2478e> {[-4-]}
<POP 24760-2478e Naked> Σ-4 ↓
<Blob 0x24760 [18] @> Δ-18 {[-4-]|[«18""»]}
<POP 24772-24774 StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]}
<Lit 0x24774 17> {[-4-]|[«18""»]|[$$Drive not present]}
<MI 24782 LEA.L (A6-0xe),A4> {[-4-]|[«18""»]|[$$Drive not present]}
<Call 0x24786 0x241ec> {[-4-]|[«18""»]|[$$Drive not present]}
<POP 2478a-2478e StackAdj> Δ+22 {[-4-]}
<POP 2478e-24798 Naked> Σ-4 ↓ →0x247c2 ←0x24756
<MI 2478e MOVE.W (A0+0x2c),D0> {[-4-]}
<MI 24792 ANDI.W #0x0080,D0> {[-4-]}
<MI 24796 BNE 0x247c2> {[-4-]}
<POP 24798-247c2 Naked> Σ-4 ↓
<Blob 0x24798 [16] @> Δ-16 {[-4-]|[«16""»]}
<POP 247a8-247aa StackAdj> Δ-4 {[-4-]|[«16""»]|[-4-]}
<Lit 0x247aa 15> {[-4-]|[«16""»]|[$$Drive not ready]}
<MI 247b8 LEA.L (A6-0xe),A4> {[-4-]|[«16""»]|[$$Drive not ready]}
<Call 0x247bc 0x241ec> {[-4-]|[«16""»]|[$$Drive not ready]}
<POP 247c0-247c2 StackAdj> Δ+20 {[-4-]}
<POP 247c2-247cc Naked> Σ-4 ↓ →0x247f4 ←0x2478e
<MI 247c2 MOVE.W (A0+0x2c),D0> {[-4-]}
<MI 247c6 ANDI.W #0x0040,D0> {[-4-]}
<MI 247ca BNE 0x247f4> {[-4-]}
<POP 247cc-247f4 Naked> Σ-4 ↓
<Blob 0x247cc [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x247d0 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x247d4 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<Blob 0x247d8 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 247dc-247de StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x247de 16> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Volume not valid]}
<MI 247ea LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Volume not valid]}
<Call 0x247ee 0x241ec> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Volume not valid]}
<POP 247f2-247f4 StackAdj> Δ+20 {[-4-]}
<POP 247f4-247fe Naked> Σ-4 ↓ →0x24826 ←0x247c2
<MI 247f4 MOVE.W (A0+0x2e),D0> {[-4-]}
<MI 247f8 ANDI.W #0x8000,D0> {[-4-]}
<MI 247fc BEQ 0x24826> {[-4-]}
<POP 247fe-24826 Naked> Σ-4 ↓
<Blob 0x247fe [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x24802 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x24806 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<Blob 0x2480a [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 2480e-24810 StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x24810 16> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Data check (ECC)]}
<MI 2481c LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Data check (ECC)]}
<Call 0x24820 0x241ec> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Data check (ECC)]}
<POP 24824-24826 StackAdj> Δ+20 {[-4-]}
<POP 24826-24830 Naked> Σ-4 ↓ →0x24858 ←0x247f4
<MI 24826 MOVE.W (A0+0x2e),D0> {[-4-]}
<MI 2482a ANDI.W #0x4000,D0> {[-4-]}
<MI 2482e BEQ 0x24858> {[-4-]}
<POP 24830-24858 Naked> Σ-4 ↓
<Blob 0x24830 [2] @> Δ-2 {[-4-]|[«2""»]}
<Blob 0x24834 [2] @> Δ-2 {[-4-]|[«2""»]|[«2""»]}
<Blob 0x24838 [2] @> Δ-2 {[-4-]|[«2""»]|[«2""»]|[«2""»]}
<POP 2483c-2483e StackAdj> Δ-4 {[-4-]|[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x2483e 6> {[-4-]|[«2""»]|[«2""»]|[«2""»]|[$$Unsafe]}
<MI 2484c LEA.L (A6-0xe),A4> {[-4-]|[«2""»]|[«2""»]|[«2""»]|[$$Unsafe]}
<Call 0x24850 0x241ec> {[-4-]|[«2""»]|[«2""»]|[«2""»]|[$$Unsafe]}
<POP 24854-24858 StackAdj> Δ+10 {[-4-]}
<POP 24858-24862 Naked> Σ-4 ↓ →0x24888 ←0x24826
<MI 24858 MOVE.W (A0+0x2e),D0> {[-4-]}
<MI 2485c ANDI.W #0x2000,D0> {[-4-]}
<MI 24860 BEQ 0x24888> {[-4-]}
<POP 24862-24888 Naked> Σ-4 ↓
<Blob 0x24862 [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 2486e-24870 StackAdj> Δ-4 {[-4-]|[«20""»]|[-4-]}
<Lit 0x24870 20> {[-4-]|[«20""»]|[$$Operation incomplete]}
<MI 2487c LEA.L (A6-0xe),A4> {[-4-]|[«20""»]|[$$Operation incomplete]}
<Call 0x24880 0x241ec> {[-4-]|[«20""»]|[$$Operation incomplete]}
<POP 24884-24888 StackAdj> Δ+24 {[-4-]}
<POP 24888-24892 Naked> Σ-4 ↓ →0x248ba ←0x24858
<MI 24888 MOVE.W (A0+0x2e),D0> {[-4-]}
<MI 2488c ANDI.W #0x1000,D0> {[-4-]}
<MI 24890 BEQ 0x248ba> {[-4-]}
<POP 24892-248ba Naked> Σ-4 ↓
<Blob 0x24892 [18] @> Δ-18 {[-4-]|[«18""»]}
<POP 2489e-248a0 StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]}
<Lit 0x248a0 18> {[-4-]|[«18""»]|[$$Drive timing error]}
<MI 248ae LEA.L (A6-0xe),A4> {[-4-]|[«18""»]|[$$Drive timing error]}
<Call 0x248b2 0x241ec> {[-4-]|[«18""»]|[$$Drive timing error]}
<POP 248b6-248ba StackAdj> Δ+22 {[-4-]}
<POP 248ba-248c4 Naked> Σ-4 ↓ →0x248ec ←0x24888
<MI 248ba MOVE.W (A0+0x2e),D0> {[-4-]}
<MI 248be ANDI.W #0x0800,D0> {[-4-]}
<MI 248c2 BEQ 0x248ec> {[-4-]}
<POP 248c4-248ec Naked> Σ-4 ↓
<Blob 0x248c4 [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x248c8 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x248cc [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<Blob 0x248d0 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 248d4-248d6 StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x248d6 16> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Write lock error]}
<MI 248e2 LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Write lock error]}
<Call 0x248e6 0x241ec> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Write lock error]}
<POP 248ea-248ec StackAdj> Δ+20 {[-4-]}
<POP 248ec-248f6 Naked> Σ-4 ↓ →0x24924 ←0x248ba
<MI 248ec MOVE.W (A0+0x2e),D0> {[-4-]}
<MI 248f0 ANDI.W #0x0400,D0> {[-4-]}
<MI 248f4 BEQ 0x24924> {[-4-]}
<POP 248f6-24924 Naked> Σ-4 ↓
<Blob 0x248f6 [22] @> Δ-22 {[-4-]|[«22""»]}
<POP 24908-2490a StackAdj> Δ-4 {[-4-]|[«22""»]|[-4-]}
<Lit 0x2490a 21> {[-4-]|[«22""»]|[$$Invalid address error]}
<MI 24918 LEA.L (A6-0xe),A4> {[-4-]|[«22""»]|[$$Invalid address error]}
<Call 0x2491c 0x241ec> {[-4-]|[«22""»]|[$$Invalid address error]}
<POP 24920-24924 StackAdj> Δ+26 {[-4-]}
<POP 24924-2492e Naked> Σ-4 ↓ →0x24956 ←0x248ec
<MI 24924 MOVE.W (A0+0x2e),D0> {[-4-]}
<MI 24928 ANDI.W #0x0200,D0> {[-4-]}
<MI 2492c BEQ 0x24956> {[-4-]}
<POP 2492e-24956 Naked> Σ-4 ↓
<Blob 0x2492e [22] @> Δ-22 {[-4-]|[«22""»]}
<POP 2493a-2493c StackAdj> Δ-4 {[-4-]|[«22""»]|[-4-]}
<Lit 0x2493c 22> {[-4-]|[«22""»]|[$$Address overflow error]}
<MI 2494a LEA.L (A6-0xe),A4> {[-4-]|[«22""»]|[$$Address overflow error]}
<Call 0x2494e 0x241ec> {[-4-]|[«22""»]|[$$Address overflow error]}
<POP 24952-24956 StackAdj> Δ+26 {[-4-]}
<POP 24956-24960 Naked> Σ-4 ↓ →0x24988 ←0x24924
<MI 24956 MOVE.W (A0+0x2e),D0> {[-4-]}
<MI 2495a ANDI.W #0x0100,D0> {[-4-]}
<MI 2495e BEQ 0x24988> {[-4-]}
<POP 24960-24988 Naked> Σ-4 ↓
<Blob 0x24960 [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x24964 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x24968 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<Blob 0x2496c [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 24970-24972 StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x24972 16> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Header CRC error]}
<MI 2497e LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Header CRC error]}
<Call 0x24982 0x241ec> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Header CRC error]}
<POP 24986-24988 StackAdj> Δ+20 {[-4-]}
<POP 24988-24992 Naked> Σ-4 ↓ →0x249b8 ←0x24956
<MI 24988 MOVE.W (A0+0x2e),D0> {[-4-]}
<MI 2498c ANDI.W #0x0080,D0> {[-4-]}
<MI 24990 BEQ 0x249b8> {[-4-]}
<POP 24992-249b8 Naked> Σ-4 ↓
<Blob 0x24992 [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 2499e-249a0 StackAdj> Δ-4 {[-4-]|[«20""»]|[-4-]}
<Lit 0x249a0 20> {[-4-]|[«20""»]|[$$Header compare error]}
<MI 249ac LEA.L (A6-0xe),A4> {[-4-]|[«20""»]|[$$Header compare error]}
<Call 0x249b0 0x241ec> {[-4-]|[«20""»]|[$$Header compare error]}
<POP 249b4-249b8 StackAdj> Δ+24 {[-4-]}
<POP 249b8-249c2 Naked> Σ-4 ↓ →0x249ea ←0x24988
<MI 249b8 MOVE.W (A0+0x2e),D0> {[-4-]}
<MI 249bc ANDI.W #0x0040,D0> {[-4-]}
<MI 249c0 BEQ 0x249ea> {[-4-]}
<POP 249c2-249ea Naked> Σ-4 ↓
<Blob 0x249c2 [14] @> Δ-14 {[-4-]|[«14""»]}
<POP 249ce-249d0 StackAdj> Δ-4 {[-4-]|[«14""»]|[-4-]}
<Lit 0x249d0 14> {[-4-]|[«14""»]|[$$Hard ECC error]}
<MI 249de LEA.L (A6-0xe),A4> {[-4-]|[«14""»]|[$$Hard ECC error]}
<Call 0x249e2 0x241ec> {[-4-]|[«14""»]|[$$Hard ECC error]}
<POP 249e6-249ea StackAdj> Δ+18 {[-4-]}
<POP 249ea-249f2 Naked> Σ-4 ↓ →0x24a18 ←0x249b8
<MI 249ea MOVE.W (A0+0x2e),D0> {[-4-]}
<MI 249ee AND.W #0x10,D0> {[-4-]}
<MI 249f0 BEQ 0x24a18> {[-4-]}
<POP 249f2-24a18 Naked> Σ-4 ↓
<Blob 0x249f2 [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x249f6 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x249fa [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<POP 249fe-24a00 StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x24a00 12> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Format error]}
<MI 24a0e LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Format error]}
<Call 0x24a12 0x241ec> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Format error]}
<POP 24a16-24a18 StackAdj> Δ+16 {[-4-]}
<POP 24a18-24a22 Naked> Σ-4 ↓ →0x24a50 ←0x249ea
<MI 24a18 MOVE.W (A0+0x2e),D0> {[-4-]}
<MI 24a1c ANDI.W #0x0004,D0> {[-4-]}
<MI 24a20 BEQ 0x24a50> {[-4-]}
<POP 24a22-24a50 Naked> Σ-4 ↓
<Blob 0x24a22 [30] @> Δ-30 {[-4-]|[«30""»]}
<POP 24a34-24a36 StackAdj> Δ-4 {[-4-]|[«30""»]|[-4-]}
<Lit 0x24a36 29> {[-4-]|[«30""»]|[$$Register modification refused]}
<MI 24a44 LEA.L (A6-0xe),A4> {[-4-]|[«30""»]|[$$Register modification refused]}
<Call 0x24a48 0x241ec> {[-4-]|[«30""»]|[$$Register modification refused]}
<POP 24a4c-24a50 StackAdj> Δ+34 {[-4-]}
<POP 24a50-24a58 Naked> Σ-4 ↓ →0x24a80 ←0x24a18
<MI 24a50 MOVE.W (A0+0x2e),D0> {[-4-]}
<MI 24a54 AND.W #0x01,D0> {[-4-]}
<MI 24a56 BEQ 0x24a80> {[-4-]}
<POP 24a58-24a80 Naked> Σ-4 ↓
<Blob 0x24a58 [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x24a5c [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x24a60 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<Blob 0x24a64 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 24a68-24a6a StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x24a6a 16> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Illegal function]}
<MI 24a76 LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Illegal function]}
<Call 0x24a7a 0x241ec> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Illegal function]}
<POP 24a7e-24a80 StackAdj> Δ+20 {[-4-]}
<POP 24a80-24a8a Naked> Σ-4 ↓ →0x24ab8 ←0x24a50
<MI 24a80 MOVE.W (A0+0x30),D0> {[-4-]}
<MI 24a84 ANDI.W #0x8000,D0> {[-4-]}
<MI 24a88 BEQ 0x24ab8> {[-4-]}
<POP 24a8a-24ab8 Naked> Σ-4 ↓
<Blob 0x24a8a [10] @> Δ-10 {[-4-]|[«10""»]}
<POP 24a9c-24a9e StackAdj> Δ-4 {[-4-]|[«10""»]|[-4-]}
<Lit 0x24a9e 9> {[-4-]|[«10""»]|[$$Bad block]}
<MI 24aac LEA.L (A6-0xe),A4> {[-4-]|[«10""»]|[$$Bad block]}
<Call 0x24ab0 0x241ec> {[-4-]|[«10""»]|[$$Bad block]}
<POP 24ab4-24ab8 StackAdj> Δ+14 {[-4-]}
<POP 24ab8-24ac2 Naked> Σ-4 ↓ →0x24aec ←0x24a80
<MI 24ab8 MOVE.W (A0+0x30),D0> {[-4-]}
<MI 24abc ANDI.W #0x4000,D0> {[-4-]}
<MI 24ac0 BEQ 0x24aec> {[-4-]}
<POP 24ac2-24aec Naked> Σ-4 ↓
<Blob 0x24ac2 [16] @> Δ-16 {[-4-]|[«16""»]}
<POP 24ad2-24ad4 StackAdj> Δ-4 {[-4-]|[«16""»]|[-4-]}
<Lit 0x24ad4 15> {[-4-]|[«16""»]|[$$Seek incomplete]}
<MI 24ae2 LEA.L (A6-0xe),A4> {[-4-]|[«16""»]|[$$Seek incomplete]}
<Call 0x24ae6 0x241ec> {[-4-]|[«16""»]|[$$Seek incomplete]}
<POP 24aea-24aec StackAdj> Δ+20 {[-4-]}
<POP 24aec-24af6 Naked> Σ-4 ↓ →0x24b24 ←0x24ab8
<MI 24aec MOVE.W (A0+0x30),D0> {[-4-]}
<MI 24af0 ANDI.W #0x1000,D0> {[-4-]}
<MI 24af4 BEQ 0x24b24> {[-4-]}
<POP 24af6-24b24 Naked> Σ-4 ↓
<Blob 0x24af6 [62] @> Δ-62 {[-4-]|[«62""»]}
<POP 24b08-24b0a StackAdj> Δ-4 {[-4-]|[«62""»]|[-4-]}
<Lit 0x24b0a 61> {[-4-]|[«62""»]|[$$Invalid command (volume not valid, off-line, or off cylinder)]}
<MI 24b18 LEA.L (A6-0xe),A4> {[-4-]|[«62""»]|[$$Invalid command (volume not valid, off-line, or off cylinder)]}
<Call 0x24b1c 0x241ec> {[-4-]|[«62""»]|[$$Invalid command (volume not valid, off-line, or off cylinder)]}
<POP 24b20-24b24 StackAdj> Δ+66 {[-4-]}
<POP 24b24-24b2e Naked> Σ-4 ↓ →0x24b54 ←0x24aec
<MI 24b24 MOVE.W (A0+0x30),D0> {[-4-]}
<MI 24b28 ANDI.W #0x0080,D0> {[-4-]}
<MI 24b2c BEQ 0x24b54> {[-4-]}
<POP 24b2e-24b54 Naked> Σ-4 ↓
<Blob 0x24b2e [4] @> Δ-4 {[-4-]|[«4""»]}
<Blob 0x24b32 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]}
<Blob 0x24b36 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]}
<POP 24b3a-24b3c StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x24b3c 12> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Device check]}
<MI 24b4a LEA.L (A6-0xe),A4> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Device check]}
<Call 0x24b4e 0x241ec> {[-4-]|[«4""»]|[«4""»]|[«4""»]|[$$Device check]}
<POP 24b52-24b54 StackAdj> Δ+16 {[-4-]}
<POP 24b54-24b60 Naked> Σ-4 Δ+4 ↓ ←0x24b24
<MI 24b54 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']}
<Call 0x24b58 0x103e0> {[-4-]|[4, '(A6-0x6)']}
WriteConsoleStringCrLf(str : String)
<POP 24b5e-24b60 StackAdj> Δ+8 {}
<POP 24b60-24b68 Epilogue> Σ0
@ 24b68
<LVAR 0x008 2(r)>
<POP 24b68-24bd2 Body>
<POP 24b68-24b7e Prologue> Σ0 ↓
<POP 24b7e-24b82 RegCacheLoad> Σ0 ↓
<POP 24b82-24bca Naked> Σ0 ↓
<Blob 0x24b82 [4] @> Δ-4 {[«4""»]}
<POP 24b86-24b88 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x24b88 4> {[«4""»]|[$$Hard]}
<POP 24b9a-24b9c StackAdj> Δ-2 {[«4""»]|[$$Hard]|[-2-]}
<MI 24b9c MOVE.W (A6+0x8),(A7)> {[«4""»]|[$$Hard]|[2, '(A6+0x8)']}
<Call 0x24b9e 0x2427c> {[«4""»]|[$$Hard]|[2, '(A6+0x8)']}
<POP 24ba2-24ba6 StackAdj> Δ+10 {}
<MI 24ba6 MOVEQ.L #0x46,D0> {}
<MI 24ba8 MULS.W (A6+0x8),D0> {}
<MI 24baa LEA.L 0x2578e,A0> {}
<MI 24bb0 LEA.L (A0+D0.W),A0> {}
<MI 24bb4 ADDA.L #0x892a,A0> {}
<MI 24bba CLR.L (A0+0xa)> {}
<MI 24bbe ADDQ.L #0x1,(A0+0x2)> {}
<MI 24bc2 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x24bc4 0x2405c> {[2, '(A6+0x8)']}
<POP 24bc8-24bca StackAdj> Δ+2 {}
<POP 24bca-24bd2 Epilogue> Σ0
@ 24bd2
<LVAR 0x008 2(r)>
<POP 24bd2-24c3c Body>
<POP 24bd2-24be8 Prologue> Σ0 ↓
<POP 24be8-24c34 Naked> Σ0 ↓
<Blob 0x24be8 [4] @> Δ-4 {[«4""»]}
<POP 24bec-24bee StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x24bee 4> {[«4""»]|[$$Soft]}
<POP 24c00-24c02 StackAdj> Δ-2 {[«4""»]|[$$Soft]|[-2-]}
<MI 24c02 MOVE.W (A6+0x8),(A7)> {[«4""»]|[$$Soft]|[2, '(A6+0x8)']}
<Call 0x24c06 0x2427c> {[«4""»]|[$$Soft]|[2, '(A6+0x8)']}
<POP 24c0a-24c0e StackAdj> Δ+10 {}
<MI 24c0e MOVEQ.L #0x46,D0> {}
<MI 24c10 MULS.W (A6+0x8),D0> {}
<MI 24c14 LEA.L 0x2578e,A0> {}
<MI 24c1a LEA.L (A0+D0.W),A0> {}
<MI 24c1e ADDA.L #0x892a,A0> {}
<MI 24c24 MOVE.L (A0+0x6),D0> {}
<MI 24c28 ADD.L (A0+0xa),D0> {}
<MI 24c2c MOVE.L D0,(A0+0x6)> {}
<MI 24c30 CLR.L (A0+0xa)> {}
<POP 24c34-24c3c Epilogue> Σ0
@ 24c3c
<LVAR 0x008 2(r)>
<LVAR -0x004 2(w)>
<LVAR -0x006 2(w)>
<LVAR -0x008 2(w)>
<LVAR -0x00a 2(r)>
<LVAR -0x00e 2(w)>
<LVAR -0x012 @ 2(w)>
<POP 24c3c-24d22 Body>
<POP 24c3c-24c52 Prologue> Σ0 ↓
<POP 24c52-24c56 RegCacheLoad> Σ0 ↓
<POP 24c56-24c86 Naked> Σ0 ↓ →0x24c92
<MI 24c56 MOVEQ.L #0x46,D0> {}
<MI 24c58 MULS.W (A6+0x8),D0> {}
<MI 24c5a LEA.L 0x2578e,A0> {}
<MI 24c60 LEA.L (A0+D0.W),A0> {}
<MI 24c64 ADDA.L #0x892a,A0> {}
<MI 24c6a MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<MI 24c6c PEA.L (A0+0x28)> Δ-4 {[2, '(A6+0x8)']|[4, '^(A0+0x28)']}
<Call 0x24c70 0x23ffc> {[2, '(A6+0x8)']|[4, '^(A0+0x28)']}
<POP 24c74-24c76 StackAdj> Δ+6 {}
<MI 24c76 ADDQ.L #0x1,(A0+0xa)> {}
<MI 24c7a MOVE.L (A0+0xa),D0> {}
<MI 24c7e CMPI.L #0x0000000a,D0> {}
<MI 24c84 BNE 0x24c92> {}
<POP 24c86-24c92 Naked> Σ0 →0x24d1a
<MI 24c86 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x24c88 0x24b68> {[2, '(A6+0x8)']}
<POP 24c8c-24c8e StackAdj> Δ+2 {}
<MI 24c8e BRA 0x24d1a> {}
<POP 24c92-24cba Naked> Σ0 →0x24cbe →0x24cc8 ←0x24c56
<MI 24c92 MOVE.W #0x100,(A6-0x12)> {}
<MI 24c98 MOVE.W #0x2,(A6-0xe)> {}
<MI 24c9e CLR.W (A6-0xa)> {}
<MI 24ca2 MOVE.B (A0+0x1),D0> {}
<MI 24ca6 EXTB.W D0> {}
<POP 0x24ca8 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 24cb0 ADD.W D0,D0> {}
<MI 24cb2 SWITCH D0.W> {}
<POP 24cbe-24cc8 Naked> Σ0 →0x24cd0 ←0x24c92
<MI 24cbe MOVE.W (A6+0x8),D0> {}
<MI 24cc0 ASL.W #0x8,D0> {}
<MI 24cc2 ADDI.W #0x000c,D0> {}
<MI 24cc6 BRA 0x24cd0> {}
<POP 24cc8-24cd0 Naked> Σ0 ↓ ←0x24c92
<MI 24cc8 MOVE.W (A6+0x8),D0> {}
<MI 24cca ASL.W #0x8,D0> {}
<MI 24ccc ADDI.W #0x000b,D0> {}
<POP 24cd0-24d1a Naked> Σ0 ↓ ←0x24cbe
<MI 24cd0 MOVE.W D0,(A6-0x8)> {}
<MI 24cd4 MOVE.L (A0+0x16),D0> {}
<POP 0x24cd8 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 24ce2 MOVE.W D0,(A6-0x6)> {}
<MI 24ce6 MOVE.L (A0+0x12),D0> {}
<MI 24cea ASL.L #0x8,D0> {}
<MI 24cec ADD.L (A0+0xe),D0> {}
<POP 0x24cf0 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 24cfa MOVE.W D0,(A6-0x4)> {}
<Pointer.fp 0x24cfe <LVAR -0x012 @ 2(w)>> Δ-4 {[@@-18]}
<MI 24d02 LEA.L (A0+0x26),A0> {[@@-18]}
<MI 24d06 MOVE.L A0,-(A7)> Δ-4 {[@@-18]|[4, 'A0']}
<MI 24d08 MOVE.W (A6+0x8),-(A7)> Δ-2 {[@@-18]|[4, 'A0']|[2, '(A6+0x8)']}
<Const 0x24d0a 0x2.4> Δ-4 {[@@-18]|[4, 'A0']|[2, '(A6+0x8)']|[##2]}
<Const 0x24d0e 0x0.4> Δ-4 {[@@-18]|[4, 'A0']|[2, '(A6+0x8)']|[##2]|[##0]}
<Call 0x24d12 0x21244> {[@@-18]|[4, 'A0']|[2, '(A6+0x8)']|[##2]|[##0]}
<POP 24d16-24d1a StackAdj> Δ+18 {}
<POP 24d1a-24d22 Epilogue> Σ0 ←0x24c86
@ 24d22
<LVAR 0x00a 2(r)>
<LVAR 0x008 1(r)>
<POP 24d22-24db4 Body> Δ+2
<POP 24d22-24d38 Prologue> Σ0 ↓
<POP 24d38-24d3e RegCacheLoad> Σ0 ↓
<POP 24d3e-24d44 Naked> Σ0 ↓ →0x24d4c
<MI 24d3e TST.B (A6+0x8)> {}
<MI 24d42 BNE 0x24d4c> {}
<POP 24d44-24d4c Naked> Σ0 Δ-2 →0x24daa
<MI 24d44 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x24d46 0x24c3c> {[2, '(A6+0xa)']}
<MI 24d4a BRA 0x24daa> {[2, '(A6+0xa)']}
<POP 24d4c-24d9c Naked> Σ0 ↓ →0x24da4 ←0x24d3e
<MI 24d4c MOVEQ.L #0x46,D0> {}
<MI 24d4e MULS.W (A6+0xa),D0> {}
<MI 24d50 LEA.L 0x2578e,A0> {}
<MI 24d56 LEA.L (A0+D0.W),A0> {}
<MI 24d5a ADDA.L #0x892a,A0> {}
<POP 24d60-24d61 StackAdj> Δ-8 ↓ {[-8-]}
<Blob 0x24d61 [8] (A0+0x3e)> Δ-8 {[-8-]|[«8»]}
<POP 24d70-24d72 StackAdj> Δ-8 {[-8-]|[«8»]|[-8-]}
<Const 0x24d72 0x400.4> Δ-4 {[-8-]|[«8»]|[-8-]|[##1024]}
<Call 0x24d76 0x10354> {[-8-]|[«8»]|[-8-]|[##1024]}
Long2Quad(a : Long) : Quad
<POP 24d7c-24d7e StackAdj> Δ+4 {[-8-]|[«8»]|[-8-]}
<Call 0x24d7e 0x10314> {[-8-]|[«8»]|[-8-]}
Add(a, b : Quad) : Quad
<POP 24d84-24d86 StackAdj> Δ+16 {[-8-]}
<MI 24d86 LEA.L (A0+0x3e),A1> {[-8-]}
<MI 24d8a MOVEA.L A7,A2> {[-8-]}
<BlockMove 8,A2,A1> {[-8-]}
<POP 24d94-24d96 StackAdj> Δ+8 {}
<MI 24d96 TST.L (A0+0xa)> {}
<MI 24d9a BEQ 0x24da4> {}
<POP 24d9c-24da4 Naked> Σ0 ↓
<MI 24d9c MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x24d9e 0x24bd2> {[2, '(A6+0xa)']}
<POP 24da2-24da4 StackAdj> Δ+2 {}
<POP 24da4-24daa Naked> Σ0 Δ-2 ↓ ←0x24d4c
<MI 24da4 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x24da6 0x2405c> {[2, '(A6+0xa)']}
<POP 24daa-24dac Naked> Σ-2 Δ+2 ↓ ←0x24d44
<POP 24daa-24dac StackAdj> Δ+2 {}
<POP 24dac-24db4 Epilogue> Σ0
@ 24db4
<LVAR 0x00a 2(r)>
<LVAR 0x008 1(r)>
<LVAR -0x010 2(r)>
<LVAR -0x018 @>
<POP 24db4-24e66 Body> Δ+2
<POP 24db4-24dca Prologue> Σ0 ↓
<POP 24dca-24dd0 RegCacheLoad> Σ0 ↓
<POP 24dd0-24dd6 Naked> Σ0 ↓ →0x24dfe
<MI 24dd0 TST.B (A6+0x8)> {}
<MI 24dd4 BNE 0x24dfe> {}
<POP 24dd6-24dec Naked> Σ0 ↓ →0x24df4
<MI 24dd6 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Pointer.fp 0x24dd8 <LVAR -0x018 @>> Δ-4 {[2, '(A6+0xa)']|[@@-24]}
<Call 0x24ddc 0x23ffc> {[2, '(A6+0xa)']|[@@-24]}
<POP 24de0-24de2 StackAdj> Δ+6 {}
<MI 24de2 MOVE.W (A6-0x10),D0> {}
<MI 24de6 ANDI.W #0x8000,D0> {}
<MI 24dea BEQ 0x24df4> {}
<POP 24dec-24df4 Naked> Σ0 Δ-2 →0x24dfa
<MI 24dec MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x24dee 0x2405c> {[2, '(A6+0xa)']}
<MI 24df2 BRA 0x24dfa> {[2, '(A6+0xa)']}
<POP 24df4-24dfa Naked> Σ0 Δ-2 ↓ ←0x24dd6
<MI 24df4 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x24df6 0x24c3c> {[2, '(A6+0xa)']}
<POP 24dfa-24dfe Naked> Σ-2 Δ+2 →0x24e5e ←0x24dec
<POP 24dfa-24dfc StackAdj> Δ+2 {}
<MI 24dfc BRA 0x24e5e> {}
<POP 24dfe-24e4e Naked> Σ0 ↓ →0x24e56 ←0x24dd0
<MI 24dfe MOVEQ.L #0x46,D0> {}
<MI 24e00 MULS.W (A6+0xa),D0> {}
<MI 24e02 LEA.L 0x2578e,A0> {}
<MI 24e08 LEA.L (A0+D0.W),A0> {}
<MI 24e0c ADDA.L #0x892a,A0> {}
<POP 24e12-24e13 StackAdj> Δ-8 ↓ {[-8-]}
<Blob 0x24e13 [8] (A0+0x3e)> Δ-8 {[-8-]|[«8»]}
<POP 24e22-24e24 StackAdj> Δ-8 {[-8-]|[«8»]|[-8-]}
<Const 0x24e24 0x400.4> Δ-4 {[-8-]|[«8»]|[-8-]|[##1024]}
<Call 0x24e28 0x10354> {[-8-]|[«8»]|[-8-]|[##1024]}
Long2Quad(a : Long) : Quad
<POP 24e2e-24e30 StackAdj> Δ+4 {[-8-]|[«8»]|[-8-]}
<Call 0x24e30 0x10314> {[-8-]|[«8»]|[-8-]}
Add(a, b : Quad) : Quad
<POP 24e36-24e38 StackAdj> Δ+16 {[-8-]}
<MI 24e38 LEA.L (A0+0x3e),A1> {[-8-]}
<MI 24e3c MOVEA.L A7,A2> {[-8-]}
<BlockMove 8,A2,A1> {[-8-]}
<POP 24e46-24e48 StackAdj> Δ+8 {}
<MI 24e48 TST.L (A0+0xa)> {}
<MI 24e4c BEQ 0x24e56> {}
<POP 24e4e-24e56 Naked> Σ0 ↓
<MI 24e4e MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x24e50 0x24bd2> {[2, '(A6+0xa)']}
<POP 24e54-24e56 StackAdj> Δ+2 {}
<POP 24e56-24e5e Naked> Σ0 ↓ ←0x24dfe
<MI 24e56 MOVE.W (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0xa)']}
<Call 0x24e58 0x24150> {[2, '(A6+0xa)']}
<POP 24e5c-24e5e StackAdj> Δ+2 {}
<POP 24e5e-24e66 Epilogue> Σ0 ←0x24dfa
@ 24e66
<POP 24e66-250da Body>
<POP 24e66-24e7c Prologue> Σ0 ↓
<POP 24e7c-24e8a RegCacheLoad> Σ0 ↓
<POP 24e8a-24e8c Naked> Σ0 ↓
<MI 24e8a MOVEQ.L #0x00,D7> {}
<POP 24e8c-24eb2 Naked> Σ0 ↓ →0x250ca ←0x250ca
<POP 0x24e8c LimitCheck 0x0 ≤ D7 ≤ 0xf> {}
<MI 24e92 MOVE.L D7,D4> {}
<MI 24e94 MOVEQ.L #0x46,D3> {}
<Call 0x24e96 0x1028c> {}
?muls_d3_d4
<MI 24e9c LEA.L 0x2578e,A0> {}
<MI 24ea2 LEA.L (A0+D4.L),A0> {}
<MI 24ea6 ADDA.L #0x892a,A0> {}
<MI 24eac TST.B (A0)> {}
<MI 24eae BEQ 0x250ca> {}
<POP 24eb2-250ca Naked> Σ0 ↓
<Blob 0x24eb2 [4] @> Δ-4 {[«4""»]}
<Blob 0x24eb6 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x24eba [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x24ebe [2] @> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[«2""»]}
<POP 24ec2-24ec4 StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-8-]}
<Lit 0x24ec4 12> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Disk Unit :_]}
<POP 24ed2-24ed4 StackAdj> Δ-12 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-12-]}
<MI 24ed4 MOVE.L D7,-(A7)> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-12-]|[4, 'D7']}
<Call 0x24ed6 0x102e4> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-12-]|[4, 'D7']}
Long2String(a : Long) : String
<Lit 0x24edc 2> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-12-]|[$$, ]}
<Call 0x24eec 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-12-]|[$$, ]}
StringCat2(a, b : String) : String
<POP 24eee-24ef0 StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-8-]}
<Const 0x24ef0 0x4.4> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-8-]|[##4]}
<Call 0x24ef4 0x102f8> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-8-]|[##4]}
LeftPad(a : String; b : Long) : String
<POP 24efa-24efc StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-4-]}
<Call 0x24efc 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]|[$$Disk Unit :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 24efe-24f00 StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«2""»]|[-4-]}
<MI 24f00 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]|[«4""»]|[«4""»]|[«2""»]}
<POP 24f02-24f03 StackAdj> Δ+14 ↓ {}
<Blob 0x24f03 [10] @> Δ-10 {[«10""»]}
<POP 24f12-24f14 StackAdj> Δ-4 {[«10""»]|[-4-]}
<MI 24f14 MOVE.L A4,-(A7)> Δ-4 {[«10""»]|[-4-]|[4, 'A4']}
<POP 24f16-24f18 StackAdj> Δ-4 {[«10""»]|[-4-]|[4, 'A4']|[-4-]}
<Lit 0x24f18 9> {[«10""»]|[-4-]|[4, 'A4']|[$$Bytes =>_]}
<Call 0x24f2a 0x102d0> {[«10""»]|[-4-]|[4, 'A4']|[$$Bytes =>_]}
StringCat2(a, b : String) : String
<POP 24f2c-24f2e StackAdj> Δ+8 {[«10""»]|[-4-]}
<MI 24f2e MOVEA.L (A7)+,A4> Δ+4 {[«10""»]}
<POP 24f30-24f32 StackAdj> Δ+2 {[-8-]}
<MI 24f32 MOVE.L A4,(A7)> {[-4-]|[4, 'A4']}
<POP 24f34-24f35 StackAdj> Δ-8 ↓ {[-4-]|[4, 'A4']|[-8-]}
<Blob 0x24f35 [8] (A0+0x3e)> Δ-8 {[-4-]|[4, 'A4']|[-8-]|[«8»]}
<Const 0x24f46 0xa.4> Δ-4 {[-4-]|[4, 'A4']|[-8-]|[«8»]|[##10]}
<Call 0x24f4a 0x1035c> {[-4-]|[4, 'A4']|[-8-]|[«8»]|[##10]}
Quad2String(a : Quad; radix : Long ) : String
<POP 24f50-24f52 StackAdj> Δ+12 {[-4-]|[4, 'A4']|[-8-]}
<Const 0x24f52 0xb.4> Δ-4 {[-4-]|[4, 'A4']|[-8-]|[##11]}
<Call 0x24f56 0x102f8> {[-4-]|[4, 'A4']|[-8-]|[##11]}
LeftPad(a : String; b : Long) : String
<POP 24f5c-24f5e StackAdj> Δ+8 {[-4-]|[4, 'A4']|[-4-]}
<Call 0x24f5e 0x102d0> {[-4-]|[4, 'A4']|[-4-]}
StringCat2(a, b : String) : String
<POP 24f60-24f62 StackAdj> Δ+8 {[-4-]}
<MI 24f62 MOVEA.L (A7)+,A4> Δ+4 {}
<Blob 0x24f64 [4] @> Δ-4 {[«4""»]}
<Blob 0x24f68 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 24f6c-24f6e StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<MI 24f6e MOVE.L A4,-(A7)> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, 'A4']}
<POP 24f70-24f72 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[-4-]}
<Lit 0x24f72 8> {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[$$soft =>_]}
<Call 0x24f84 0x102d0> {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[$$soft =>_]}
StringCat2(a, b : String) : String
<POP 24f86-24f88 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<MI 24f88 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]|[«4""»]}
<MI 24f8a MOVE.L A4,(A7)> {[«4""»]|[4, 'A4']}
<POP 24f8c-24f8e StackAdj> Δ-8 {[«4""»]|[4, 'A4']|[-8-]}
<MI 24f8e MOVE.L (A0+0x6),-(A7)> Δ-4 {[«4""»]|[4, 'A4']|[-8-]|[4, '(A0+0x6)']}
<Call 0x24f92 0x102e4> {[«4""»]|[4, 'A4']|[-8-]|[4, '(A0+0x6)']}
Long2String(a : Long) : String
<POP 24f98-24f9a StackAdj> Δ+4 {[«4""»]|[4, 'A4']|[-8-]}
<Const 0x24f9a 0x5.4> Δ-4 {[«4""»]|[4, 'A4']|[-8-]|[##5]}
<Call 0x24f9e 0x102f8> {[«4""»]|[4, 'A4']|[-8-]|[##5]}
LeftPad(a : String; b : Long) : String
<POP 24fa4-24fa6 StackAdj> Δ+8 {[«4""»]|[4, 'A4']|[-4-]}
<Call 0x24fa6 0x102d0> {[«4""»]|[4, 'A4']|[-4-]}
StringCat2(a, b : String) : String
<POP 24fa8-24faa StackAdj> Δ+8 {[«4""»]}
<MI 24faa MOVEA.L (A7)+,A4> Δ+4 {}
<Blob 0x24fac [4] @> Δ-4 {[«4""»]}
<Blob 0x24fb0 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 24fb4-24fb6 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<MI 24fb6 MOVE.L A4,-(A7)> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, 'A4']}
<POP 24fb8-24fba StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[-4-]}
<Lit 0x24fba 8> {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[$$hard =>_]}
<Call 0x24fcc 0x102d0> {[«4""»]|[«4""»]|[-4-]|[4, 'A4']|[$$hard =>_]}
StringCat2(a, b : String) : String
<POP 24fce-24fd0 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<MI 24fd0 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]|[«4""»]}
<MI 24fd2 MOVE.L A4,(A7)> {[«4""»]|[4, 'A4']}
<POP 24fd4-24fd6 StackAdj> Δ-8 {[«4""»]|[4, 'A4']|[-8-]}
<MI 24fd6 MOVE.L (A0+0x2),-(A7)> Δ-4 {[«4""»]|[4, 'A4']|[-8-]|[4, '(A0+0x2)']}
<Call 0x24fda 0x102e4> {[«4""»]|[4, 'A4']|[-8-]|[4, '(A0+0x2)']}
Long2String(a : Long) : String
<POP 24fe0-24fe2 StackAdj> Δ+4 {[«4""»]|[4, 'A4']|[-8-]}
<Const 0x24fe2 0x5.4> Δ-4 {[«4""»]|[4, 'A4']|[-8-]|[##5]}
<Call 0x24fe6 0x102f8> {[«4""»]|[4, 'A4']|[-8-]|[##5]}
LeftPad(a : String; b : Long) : String
<POP 24fec-24fee StackAdj> Δ+8 {[«4""»]|[4, 'A4']|[-4-]}
<Call 0x24fee 0x102d0> {[«4""»]|[4, 'A4']|[-4-]}
StringCat2(a, b : String) : String
<POP 24ff0-24ff2 StackAdj> Δ+8 {[«4""»]}
<MI 24ff2 MOVEA.L (A7)+,A4> Δ+4 {}
<Blob 0x24ff4 [2] @> Δ-2 {[«2""»]}
<POP 24ff8-24ffa StackAdj> Δ-4 {[«2""»]|[-4-]}
<MI 24ffa MOVE.L A4,-(A7)> Δ-4 {[«2""»]|[-4-]|[4, 'A4']}
<POP 24ffc-24ffe StackAdj> Δ-4 {[«2""»]|[-4-]|[4, 'A4']|[-4-]}
<Lit 0x24ffe 2> {[«2""»]|[-4-]|[4, 'A4']|[$$C:]}
<Call 0x2500e 0x102d0> {[«2""»]|[-4-]|[4, 'A4']|[$$C:]}
StringCat2(a, b : String) : String
<POP 25010-25012 StackAdj> Δ+8 {[«2""»]|[-4-]}
<MI 25012 MOVEA.L (A7)+,A4> Δ+4 {[«2""»]}
<POP 25014-25016 StackAdj> Δ-2 {[«2""»]|[-2-]}
<MI 25016 MOVE.L A4,-(A7)> Δ-4 {[«2""»]|[-2-]|[4, 'A4']}
<POP 25018-2501a StackAdj> Δ-8 {[«2""»]|[-2-]|[4, 'A4']|[-8-]}
<MI 2501a MOVE.L (A0+0x16),-(A7)> Δ-4 {[«2""»]|[-2-]|[4, 'A4']|[-8-]|[4, '(A0+0x16)']}
<Call 0x2501e 0x102e4> {[«2""»]|[-2-]|[4, 'A4']|[-8-]|[4, '(A0+0x16)']}
Long2String(a : Long) : String
<POP 25024-25026 StackAdj> Δ+4 {[«2""»]|[-2-]|[4, 'A4']|[-8-]}
<Const 0x25026 0x4.4> Δ-4 {[«2""»]|[-2-]|[4, 'A4']|[-8-]|[##4]}
<Call 0x2502a 0x102f8> {[«2""»]|[-2-]|[4, 'A4']|[-8-]|[##4]}
LeftPad(a : String; b : Long) : String
<POP 25030-25032 StackAdj> Δ+8 {[«2""»]|[-2-]|[4, 'A4']|[-4-]}
<Call 0x25032 0x102d0> {[«2""»]|[-2-]|[4, 'A4']|[-4-]}
StringCat2(a, b : String) : String
<POP 25034-25036 StackAdj> Δ+8 {[«2""»]|[-2-]}
<MI 25036 MOVEA.L (A7)+,A4> Δ+4 {}
<Blob 0x25038 [2] @> Δ-2 {[«2""»]}
<POP 2503c-2503e StackAdj> Δ-4 {[«2""»]|[-4-]}
<MI 2503e MOVE.L A4,-(A7)> Δ-4 {[«2""»]|[-4-]|[4, 'A4']}
<POP 25040-25042 StackAdj> Δ-4 {[«2""»]|[-4-]|[4, 'A4']|[-4-]}
<Lit 0x25042 2> {[«2""»]|[-4-]|[4, 'A4']|[$$T:]}
<Call 0x25052 0x102d0> {[«2""»]|[-4-]|[4, 'A4']|[$$T:]}
StringCat2(a, b : String) : String
<POP 25054-25056 StackAdj> Δ+8 {[«2""»]|[-4-]}
<MI 25056 MOVEA.L (A7)+,A4> Δ+4 {[«2""»]}
<POP 25058-2505a StackAdj> Δ-2 {[«2""»]|[-2-]}
<MI 2505a MOVE.L A4,-(A7)> Δ-4 {[«2""»]|[-2-]|[4, 'A4']}
<POP 2505c-2505e StackAdj> Δ-8 {[«2""»]|[-2-]|[4, 'A4']|[-8-]}
<MI 2505e MOVE.L (A0+0x12),-(A7)> Δ-4 {[«2""»]|[-2-]|[4, 'A4']|[-8-]|[4, '(A0+0x12)']}
<Call 0x25062 0x102e4> {[«2""»]|[-2-]|[4, 'A4']|[-8-]|[4, '(A0+0x12)']}
Long2String(a : Long) : String
<POP 25068-2506a StackAdj> Δ+4 {[«2""»]|[-2-]|[4, 'A4']|[-8-]}
<Const 0x2506a 0x3.4> Δ-4 {[«2""»]|[-2-]|[4, 'A4']|[-8-]|[##3]}
<Call 0x2506e 0x102f8> {[«2""»]|[-2-]|[4, 'A4']|[-8-]|[##3]}
LeftPad(a : String; b : Long) : String
<POP 25074-25076 StackAdj> Δ+8 {[«2""»]|[-2-]|[4, 'A4']|[-4-]}
<Call 0x25076 0x102d0> {[«2""»]|[-2-]|[4, 'A4']|[-4-]}
StringCat2(a, b : String) : String
<POP 25078-2507a StackAdj> Δ+8 {[«2""»]|[-2-]}
<MI 2507a MOVEA.L (A7)+,A4> Δ+4 {}
<Blob 0x2507c [2] @> Δ-2 {[«2""»]}
<POP 25080-25082 StackAdj> Δ-4 {[«2""»]|[-4-]}
<MI 25082 MOVE.L A4,-(A7)> Δ-4 {[«2""»]|[-4-]|[4, 'A4']}
<POP 25084-25086 StackAdj> Δ-4 {[«2""»]|[-4-]|[4, 'A4']|[-4-]}
<Lit 0x25086 2> {[«2""»]|[-4-]|[4, 'A4']|[$$S:]}
<Call 0x25096 0x102d0> {[«2""»]|[-4-]|[4, 'A4']|[$$S:]}
StringCat2(a, b : String) : String
<POP 25098-2509a StackAdj> Δ+8 {[«2""»]|[-4-]}
<MI 2509a MOVEA.L (A7)+,A4> Δ+4 {[«2""»]}
<POP 2509c-2509e StackAdj> Δ-2 {[«2""»]|[-2-]}
<MI 2509e MOVE.L A4,-(A7)> Δ-4 {[«2""»]|[-2-]|[4, 'A4']}
<POP 250a0-250a2 StackAdj> Δ-8 {[«2""»]|[-2-]|[4, 'A4']|[-8-]}
<MI 250a2 MOVE.L (A0+0xe),-(A7)> Δ-4 {[«2""»]|[-2-]|[4, 'A4']|[-8-]|[4, '(A0+0xe)']}
<Call 0x250a6 0x102e4> {[«2""»]|[-2-]|[4, 'A4']|[-8-]|[4, '(A0+0xe)']}
Long2String(a : Long) : String
<POP 250ac-250ae StackAdj> Δ+4 {[«2""»]|[-2-]|[4, 'A4']|[-8-]}
<Const 0x250ae 0x3.4> Δ-4 {[«2""»]|[-2-]|[4, 'A4']|[-8-]|[##3]}
<Call 0x250b2 0x102f8> {[«2""»]|[-2-]|[4, 'A4']|[-8-]|[##3]}
LeftPad(a : String; b : Long) : String
<POP 250b8-250ba StackAdj> Δ+8 {[«2""»]|[-2-]|[4, 'A4']|[-4-]}
<Call 0x250ba 0x102d0> {[«2""»]|[-2-]|[4, 'A4']|[-4-]}
StringCat2(a, b : String) : String
<POP 250bc-250be StackAdj> Δ+8 {[«2""»]|[-2-]}
<MI 250be MOVEA.L (A7)+,A4> Δ+4 {}
<MI 250c0 MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']}
<Call 0x250c2 0x103e0> {[4, 'A4']}
WriteConsoleStringCrLf(str : String)
<POP 250c8-250ca StackAdj> Δ+4 {}
<POP 250ca-250d2 Naked> Σ0 ↓ →0x24e8c ←0x24e8c
<MI 250ca ADDQ.L #0x1,D7> {}
<MI 250cc CMP.L #0x0f,D7> {}
<MI 250ce BLE 0x24e8c> {}
<POP 250d2-250da Epilogue> Σ0
@ 250da
<POP 250da-25128 Body>
<POP 250da-250f0 Prologue> Σ0 ↓
<POP 250f0-250f2 Naked> Σ0 ↓
<MI 250f0 MOVEQ.L #0x00,D7> {}
<POP 250f2-2510a Naked> Σ0 ↓ →0x25118 ←0x25118
<MI 250f2 MOVEQ.L #0x46,D0> {}
<MI 250f4 MULS.W D7,D0> {}
<MI 250f6 LEA.L 0x2578e,A0> {}
<MI 250fc LEA.L (A0+D0.W),A0> {}
<MI 25100 ADDA.L #0x892a,A0> {}
<MI 25106 TST.B (A0)> {}
<MI 25108 BEQ 0x25118> {}
<POP 2510a-25118 Naked> Σ0 ↓
<MI 2510a MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x2510c 0x2405c> {[2, 'D7']}
<POP 25110-25112 StackAdj> Δ+2 {}
<MI 25112 ADDQ.L #0x1,0x2579e> {}
<POP 25118-25120 Naked> Σ0 ↓ →0x250f2 ←0x250f2
<MI 25118 ADDQ.W #0x1,D7> {}
<MI 2511a CMPI.W #0x000f,D7> {}
<MI 2511e BLE 0x250f2> {}
<POP 25120-25128 Epilogue> Σ0
@ 25128
<LVAR -0x001 @ 1(r)>
<LVAR -0x002 @ 1(r)>
<POP 25128-251be Body> Δ+4
<POP 25128-2513e Prologue> Σ0 ↓
<POP 2513e-25144 RegCacheLoad> Σ0 ↓
<POP 25144-25146 Naked> Σ0 ↓
<MI 25144 MOVEQ.L #0x00,D7> {}
<POP 25146-2515e Naked> Σ0 ↓ →0x251ae ←0x251ae
<MI 25146 MOVEQ.L #0x46,D0> {}
<MI 25148 MULS.W D7,D0> {}
<MI 2514a LEA.L 0x2578e,A0> {}
<MI 25150 LEA.L (A0+D0.W),A0> {}
<MI 25154 ADDA.L #0x892a,A0> {}
<MI 2515a TST.B (A0)> {}
<MI 2515c BEQ 0x251ae> {}
<POP 2515e-25174 Naked> Σ0 ↓ →0x251ae
<MI 2515e MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<Pointer.fp 0x25160 <LVAR -0x002 @ 1(r)>> Δ-4 {[2, 'D7']|[@@-2]}
<Pointer.fp 0x25164 <LVAR -0x001 @ 1(r)>> Δ-4 {[2, 'D7']|[@@-2]|[@@-1]}
<Call 0x25166 0x20e28> {[2, 'D7']|[@@-2]|[@@-1]}
<POP 2516a-2516e StackAdj> Δ+10 {}
<MI 2516e TST.B (A6-0x2)> {}
<MI 25172 BEQ 0x251ae> {}
<POP 25174-2518a Naked> Σ0 →0x2518e →0x2519e
<MI 25174 MOVE.B (A0+0x1),D0> {}
<MI 25178 EXTB.W D0> {}
<POP 0x2517a LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 25180 ADD.W D0,D0> {}
<MI 25182 SWITCH D0.W> {}
<POP 2518e-2519e Naked> Σ0 Δ-4 →0x251ac ←0x25174
<MI 2518e MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<MI 25190 MOVE.B (A6-0x1),D0> {[2, 'D7']}
<MI 25192 EXTB.W D0> {[2, 'D7']}
<POP 0x25194 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']}
<MI 25196 MOVE.B D0,-(A7)> Δ-2 {[2, 'D7']|[2, 'D0']}
<Call 0x25198 0x24d22> {[2, 'D7']|[2, 'D0']}
<MI 2519c BRA 0x251ac> {[2, 'D7']|[2, 'D0']}
<POP 2519e-251ac Naked> Σ0 Δ-4 ↓ ←0x25174
<MI 2519e MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<MI 251a0 MOVE.B (A6-0x1),D0> {[2, 'D7']}
<MI 251a2 EXTB.W D0> {[2, 'D7']}
<POP 0x251a4 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']}
<MI 251a6 MOVE.B D0,-(A7)> Δ-2 {[2, 'D7']|[2, 'D0']}
<Call 0x251a8 0x24db4> {[2, 'D7']|[2, 'D0']}
<POP 251ac-251ae Naked> Σ-4 Δ+4 ↓ ←0x2518e
<POP 251ac-251ae StackAdj> Δ+4 {}
<POP 251ae-251b6 Naked> Σ0 ↓ →0x25146 ←0x25146 ←0x2515e
<MI 251ae ADDQ.W #0x1,D7> {}
<MI 251b0 CMPI.W #0x000f,D7> {}
<MI 251b4 BLE 0x25146> {}
<POP 251b6-251be Epilogue> Σ0
@ 251be
<LVAR -0x002 @>
<POP 251be-2520a Body>
<POP 251be-251d4 Prologue> Σ0 ↓
<POP 251d4-251d6 Naked> Σ0 ↓
<MI 251d4 MOVEQ.L #0x00,D7> {}
<POP 251d6-251ee Naked> Σ0 ↓ →0x251fa ←0x251fa
<MI 251d6 MOVEQ.L #0x46,D0> {}
<MI 251d8 MULS.W D7,D0> {}
<MI 251da LEA.L 0x2578e,A0> {}
<MI 251e0 LEA.L (A0+D0.W),A0> {}
<MI 251e4 ADDA.L #0x892a,A0> {}
<MI 251ea TST.B (A0)> {}
<MI 251ec BEQ 0x251fa> {}
<POP 251ee-251fa Naked> Σ0 ↓
<MI 251ee MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<Pointer.fp 0x251f0 <LVAR -0x002 @>> Δ-4 {[2, 'D7']|[@@-2]}
<Call 0x251f4 0x2115a> {[2, 'D7']|[@@-2]}
<POP 251f8-251fa StackAdj> Δ+6 {}
<POP 251fa-25202 Naked> Σ0 ↓ →0x251d6 ←0x251d6
<MI 251fa ADDQ.W #0x1,D7> {}
<MI 251fc CMPI.W #0x000f,D7> {}
<MI 25200 BLE 0x251d6> {}
<POP 25202-2520a Epilogue> Σ0
@ 2520a
<LVAR -0x004 @ 4(r)>
<POP 2520a-252c4 Body>
<POP 2520a-25220 Prologue> Σ0 ↓
<POP 25220-25228 RegCacheLoad> Σ0 ↓
<POP 25228-25238 Naked> Σ0 ↓ →0x2523e
<Pointer.fp 0x25228 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x2522c 0x10304> {[@@-4]}
GetRtc() : TimeStamp
<POP 25232-25234 StackAdj> Δ+4 {}
<MI 25234 TST.B 0x2e518> {}
<MI 25236 BEQ 0x2523e> {}
<POP 25238-2523e Naked> Σ0 ↓
<Call 0x25238 0x103dc> {}
WriteConsoleCrLf(void)
<POP 2523e-252b6 Naked> Σ0 ↓ →0x252bc ←0x25228
<Blob 0x2523e [10] @> Δ-10 {[«10""»]}
<Blob 0x2524a [22] @> Δ-22 {[«10""»]|[«22""»]}
<POP 2525c-2525e StackAdj> Δ-8 {[«10""»]|[«22""»]|[-8-]}
<Lit 0x2525e 10> {[«10""»]|[«22""»]|[-4-]|[$$Status at_]}
<MI 2526e MOVE.L (A6-0x4),(A7)> {[«10""»]|[«22""»]|[-4-]|[4, '(A6-0x4)']}
<POP 25268-2526e StackAdj> Δ-8 {[«10""»]|[«22""»]|[-4-]|[4, '(A6-0x4)']|[-8-]}
<Call 0x25272 0x10308> {[«10""»]|[«22""»]|[-4-]|[4, '(A6-0x4)']|[-8-]}
TimeToText()
<Lit 0x25278 21> {[«10""»]|[«22""»]|[-4-]|[4, '(A6-0x4)']|[-4-]|[$$, Testing started at_]}
<POP 25288-25289 StackAdj> Δ-4 {[«10""»]|[«22""»]|[-4-]|[4, '(A6-0x4)']|[-4-]|[$$, Testing started at_]|[-4-]}
<Blob 0x25289 [4] 0x257a4> Δ-4 {[«10""»]|[«22""»]|[-4-]|[4, '(A6-0x4)']|[-4-]|[$$, Testing started at_]|[-4-]|[«4»]}
<Call 0x2528e 0x10308> {[«10""»]|[«22""»]|[-4-]|[4, '(A6-0x4)']|[-4-]|[$$, Testing started at_]|[-4-]|[«4»]}
TimeToText()
<POP 25294-25296 StackAdj> Δ+4 {[«10""»]|[«22""»]|[-4-]|[4, '(A6-0x4)']|[-4-]|[$$, Testing started at_]|[-4-]}
<Call 0x25296 0x102d8> {[«10""»]|[«22""»]|[-4-]|[4, '(A6-0x4)']|[-4-]|[$$, Testing started at_]|[-4-]}
StringCat4(a, b, c, d : String) : String
<POP 2529c-252a0 StackAdj> Δ+16 {[«10""»]|[«22""»]|[-4-]}
<Call 0x252a0 0x103e0> {[«10""»]|[«22""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 252a6-252aa StackAdj> Δ+36 {}
<Call 0x252aa 0x21a40> {}
<Call 0x252ae 0x24e66> {}
<MI 252b2 TST.B 0x2e518> {}
<MI 252b4 BEQ 0x252bc> {}
<POP 252b6-252bc Naked> Σ0 ↓
<Call 0x252b6 0x103dc> {}
WriteConsoleCrLf(void)
<POP 252bc-252c4 Epilogue> Σ0 ←0x2523e
@ 252c4
<LVAR 0x008 1(rw)>
<LVAR -0x006 @ 1(r)>
<LVAR -0x008 @ 2(rw)>
<POP 252c4-25324 Body>
<POP 252c4-252da Prologue> Σ0 ↓
<POP 252da-252e0 RegCacheLoad> Σ0 ↓
<POP 252e0-252fa Naked> Σ0 ↓ →0x2531c
<MI 252e0 CLR.B (A6+0x8)> {}
<Const 0x252e4 0x1.2> Δ-2 {[#1]}
<Pointer.fp 0x252e6 <LVAR -0x006 @ 1(r)>> Δ-4 {[#1]|[@@-6]}
<Call 0x252ea 0x10212> {[#1]|[@@-6]}
KC09_PortStatus(Port : Word; VAR b: Byte)
<POP 252f0-252f2 StackAdj> Δ+6 {}
<MI 252f2 MOVE.B (A6-0x6),D0> {}
<MI 252f6 CMP.B #0x01,D0> {}
<MI 252f8 BNE 0x2531c> {}
<POP 252fa-25312 Naked> Σ0 ↓ →0x25318
<Const 0x252fa 0x1.2> Δ-2 {[#1]}
<Pointer.fp 0x252fc <LVAR -0x008 @ 2(rw)>> Δ-4 {[#1]|[@@-8]}
<Call 0x252fe 0x1020e> {[#1]|[@@-8]}
KC07_PortGetChar(port : Word ; VAR ret : Word)
<POP 25304-25306 StackAdj> Δ+6 {}
<MI 25306 ANDI.W #0x007f,(A6-0x8)> {}
<MI 2530a MOVE.W (A6-0x8),D0> {}
<MI 2530c CMPI.W #0x0007,D0> {}
<MI 25310 BNE 0x25318> {}
<POP 25312-25318 Naked> Σ0 →0x2531c
<MI 25312 MOVE.B #0x01,(A6+0x8)> {}
<MI 25316 BRA 0x2531c> {}
<POP 25318-2531c Naked> Σ0 ↓ ←0x252fa
<Call 0x25318 0x2520a> {}
<POP 2531c-25324 Epilogue> Σ0 ←0x252e0 ←0x25312
@ 25324
<POP 25324-253be Body>
<POP 25324-2533a Prologue> Σ0 ↓
<POP 2533a-25356 RegCacheLoad> Σ0 ↓
<POP 25356-2535e Naked> Σ0 ↓ →0x253b6
<MI 25356 TST.B 0x2e518> {}
<MI 2535c BEQ 0x253b6> {}
<POP 2535e-25370 Naked> Σ0 ↓ →0x2539c
<Const 0x2535e 0x2.2> Δ-2 {[#2]}
<Const 0x25360 0x2e52c.4> Δ-4 {[#2]|[##189740]}
<Call 0x25362 0x10212> {[#2]|[##189740]}
KC09_PortStatus(Port : Word; VAR b: Byte)
<POP 25368-2536a StackAdj> Δ+6 {}
<MI 2536a MOVE.B 0x2e52c,D0> {}
<MI 2536c CMP.B #0x01,D0> {}
<MI 2536e BNE 0x2539c> {}
<POP 25370-2538a Naked> Σ0 ↓ →0x2538c
<Const 0x25370 0x2.2> Δ-2 {[#2]}
<Const 0x25372 0x2e52e.4> Δ-4 {[#2]|[##189742]}
<Call 0x25374 0x1020e> {[#2]|[##189742]}
KC07_PortGetChar(port : Word ; VAR ret : Word)
<POP 2537a-2537c StackAdj> Δ+6 {}
<MI 2537c MOVE.W 0x2e52e,D0> {}
<MI 2537e ANDI.W #0x00ff,D0> {}
<MI 25382 MOVE.B D0,0x2e52a> {}
<MI 25384 CMPI.B #0x3a,D0> {}
<MI 25388 BNE 0x2538c> {}
<POP 2538a-2538c Naked> Σ0 ↓
<MI 2538a CLR.B 0x2e52b> {}
<POP 2538c-2539c Naked> Σ0 ↓ ←0x25370
<Const 0x2538c 0x1.2> Δ-2 {[#1]}
<MI 2538e CLR.L D1> {[#1]}
<MI 25390 MOVE.B D0,D1> {[#1]}
<MI 25392 MOVE.W D1,-(A7)> Δ-2 {[#1]|[2, 'D1']}
<Call 0x25394 0x1020c> {[#1]|[2, 'D1']}
KC06_PortPutChar(port : Word ; b : char)
<POP 2539a-2539c StackAdj> Δ+4 {}
<POP 2539c-253a0 Naked> Σ0 ↓ →0x253b6 ←0x2535e
<MI 2539c TST.B 0x2e52b> {}
<MI 2539e BNE 0x253b6> {}
<POP 253a0-253b6 Naked> Σ0 ↓
<MI 253a0 MOVE.B #0x10,0x2e52a> {}
<Const 0x253a4 0x2.2> Δ-2 {[#2]}
<MI 253a6 CLR.L D0> {[#2]}
<MI 253a8 MOVE.B 0x2e52a,D0> {[#2]}
<MI 253aa MOVE.W D0,-(A7)> Δ-2 {[#2]|[2, 'D0']}
<Call 0x253ac 0x1020c> {[#2]|[2, 'D0']}
KC06_PortPutChar(port : Word ; b : char)
<POP 253b2-253b4 StackAdj> Δ+4 {}
<MI 253b4 MOVE.B #0x01,0x2e52b> {}
<POP 253b6-253be Epilogue> Σ0 ←0x25356 ←0x2539c
@ 253be
START
<POP 253be--0001 Body>
<POP 253be-253c8 Prologue> Σ0
<POP 253c8-253e2 RegCacheLoad> Σ0 ↓
<POP 253e2-25496 Naked> Σ0 ↓ →0x254ba
<Call 0x253e2 0x10398> {}
FSCALL_10398
<MI 253e8 CLR.L 0x2579e> {}
<MI 253ee MOVE.L #0x01,0x25796> {}
<Blob 0x253f4 [24] @> Δ-24 {[«24""»]}
<POP 25406-25408 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x25408 23> {[«24""»]|[$$DFS based I/O exerciser]}
<Call 0x2541a 0x103e0> {[«24""»]|[$$DFS based I/O exerciser]}
WriteConsoleStringCrLf(str : String)
<POP 25420-25424 StackAdj> Δ+28 {}
<Call 0x25424 0x20d16> {}
<Call 0x25428 0x218fe> {}
<Call 0x2542c 0x23e1e> {}
<Call 0x25430 0x219e8> {}
<Call 0x25434 0x23dbe> {}
<Const 0x25438 0x257a4.4> Δ-4 {[##153508]}
<Call 0x2543e 0x10304> {[##153508]}
GetRtc() : TimeStamp
<POP 25440-25442 StackAdj> Δ+4 {}
<Call 0x25442 0x23a86> {}
<Call 0x25446 0x250da> {}
<Blob 0x2544a [48] @> Δ-48 {[«48""»]}
<POP 2545c-2545e StackAdj> Δ-4 {[«48""»]|[-4-]}
<Lit 0x2545e 47> {[«48""»]|[$$Type ^G to exit, any other character for status]}
<Call 0x25470 0x103e0> {[«48""»]|[$$Type ^G to exit, any other character for status]}
WriteConsoleStringCrLf(str : String)
<POP 25476-2547a StackAdj> Δ+52 {}
<Const 0x2547a 0x2e522.4> Δ-4 {[##189730]}
<Call 0x2547c 0x10304> {[##189730]}
GetRtc() : TimeStamp
<POP 2547e-25480 StackAdj> Δ+4 {}
<MI 25480 CLR.L D0> {}
<MI 25482 MOVE.W 0x2e522,D0> {}
<MI 25484 ADD.L 0x2e526,D0> {}
<POP 0x25486 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 2548c MOVE.W D0,0x2e522> {}
<MI 2548e TST.B 0x2e518> {}
<MI 25494 BEQ 0x254ba> {}
<POP 25496-254ba Naked> Σ0 ↓
<MI 25496 MOVE.B #0x10,0x2e52a> {}
<Const 0x2549e 0x2.2> Δ-2 {[#2]}
<MI 254a2 CLR.L D0> {[#2]}
<MI 254a4 MOVE.B 0x2e52a,D0> {[#2]}
<MI 254aa MOVE.W D0,-(A7)> Δ-2 {[#2]|[2, 'D0']}
<Call 0x254ac 0x1020c> {[#2]|[2, 'D0']}
KC06_PortPutChar(port : Word ; b : char)
<POP 254b2-254b4 StackAdj> Δ+4 {}
<MI 254b4 MOVE.B #0x01,0x2e52b> {}
<POP 254ba-254c4 Naked> Σ0 ↓ ←0x253e2
<Const 0x254ba 0x2e51e.4> Δ-4 {[##189726]}
<Call 0x254c0 0x10304> {[##189726]}
GetRtc() : TimeStamp
<POP 254c2-254c4 StackAdj> Δ+4 {}
<POP 254c4-254e8 Naked> Σ0 ↓ →0x25508 ←0x2553e
<Call 0x254c4 0x23ad2> {}
<Call 0x254c8 0x25128> {}
<Call 0x254cc 0x25324> {}
<Const 0x254d0 0x2e51a.4> Δ-4 {[##189722]}
<Call 0x254d6 0x10304> {[##189722]}
GetRtc() : TimeStamp
<POP 254d8-254da StackAdj> Δ+4 {}
<MI 254da MOVE.W 0x2e51e,D0> {}
<MI 254e0 CMP.W 0x2e51a,D0> {}
<MI 254e6 BLS 0x25508> {}
<POP 254e8-25508 Naked> Σ0 ↓
<Call 0x254e8 0x2520a> {}
<Const 0x254ec 0x2e51a.4> Δ-4 {[##189722]}
<Call 0x254f2 0x10304> {[##189722]}
GetRtc() : TimeStamp
<POP 254f4-254f6 StackAdj> Δ+4 {}
<MI 254f6 CLR.L D0> {}
<MI 254f8 MOVE.W 0x2e51a,D0> {}
<MI 254fe ADD.L 0x2e526,D0> {}
<POP 0x25500 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 25506 MOVE.W D0,0x2e522> {}
<POP 25508-2551c Naked> Σ0 ↓ →0x25534 ←0x254c4
<MI 25508 MOVE.W 0x2e51a,0x2e51e> {}
<MI 25512 MOVE.W 0x2e51a,D0> {}
<MI 25518 CMP.W 0x2e522,D0> {}
<MI 2551a BCS 0x25534> {}
<POP 2551c-25534 Naked> Σ0 ↓
<Call 0x2551c 0x2520a> {}
<Const 0x25520 0x2e522.4> Δ-4 {[##189730]}
<Call 0x25522 0x10304> {[##189730]}
GetRtc() : TimeStamp
<POP 25524-25526 StackAdj> Δ+4 {}
<MI 25526 CLR.L D0> {}
<MI 25528 MOVE.W 0x2e522,D0> {}
<MI 2552a ADD.L 0x2e526,D0> {}
<POP 0x2552c LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 25532 MOVE.W D0,0x2e522> {}
<POP 25534-2553e Naked> Σ0 ↓ →0x25548 ←0x25508
<POP 25534-25536 StackAdj> Δ-2 {[-2-]}
<Call 0x25536 0x252c4> {[-2-]}
<MI 2553a TST.B (A7)+> Δ+2 {}
<MI 2553c BNE 0x25548> {}
<POP 2553e-25548 Naked> Σ0 ↓ →0x254c4
<MI 2553e TST.L 0x2579e> {}
<MI 25544 BNE 0x254c4> {}
<POP 25548-25582 Naked> Σ0 ↓ ←0x25534
<Call 0x25548 0x23bcc> {}
<Call 0x2554c 0x251be> {}
<Blob 0x25550 [20] @> Δ-20 {[«20""»]}
<MI 25562 CLR.B -(A7)> Δ-2 {[«20""»]|[#0]}
<POP 25564-25566 StackAdj> Δ-4 {[«20""»]|[#0]|[-4-]}
<Lit 0x25566 19> {[«20""»]|[#0]|[$$I/O exerciser done.]}
<Call 0x25578 0x103b8> {[«20""»]|[#0]|[$$I/O exerciser done.]}
PopProgram(status : Byte; msg : String)
<POP 2557e-25582 StackAdj> Δ+26 {}
<POP 25582-25588 Naked> Σ0
<Call 0x25582 0x10284> {}
?exit
@ 25596
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 25596-255fe Body>
<POP 25596-255ac Prologue> Σ0 ↓
<POP 255ac-255f6 Naked> Σ0 ↓
<Blob 0x255ac [14] @> Δ-14 {[«14""»]}
<Const 0x255b8 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 255bc-255be StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x255be 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 255d0-255d2 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 255d2 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 255d6 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 255d8 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 255da MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x255dc 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 255e2-255e4 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x255e4 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 255ea-255ec StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x255ec 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 255f2-255f6 StackAdj> Δ+20 {}
<POP 255f6-255fe Epilogue> Σ0
@ 25652
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 25652-2578e Body>
<POP 25652-25668 Prologue> Σ0 ↓
<POP 25668-2567e RegCacheLoad> Σ0 ↓
<POP 2567e-256de Naked> Σ0 ↓ →0x25726
<Call 0x2567e 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x25684 [18] @> Δ-18 {[«18""»]}
<POP 25690-25692 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x25692 18> {[«18""»]|[$$Experiment error :]}
<Call 0x2569e 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 256a0-256a1 StackAdj> Δ+22 ↓ {}
<Blob 0x256a1 [14] @> Δ-14 {[«14""»]}
<POP 256b0-256b2 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x256b2 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 256bc-256be StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 256be MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x256c2 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 256c8-256ca StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x256ca 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 256d0-256d2 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x256d2 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 256d4-256d6 StackAdj> Δ+18 {}
<MI 256d6 MOVEA.L (A6+0xa),A0> {}
<MI 256da CMPA.W #0x01,A0> {}
<MI 256dc BEQ 0x25726> {}
<POP 256de-25726 Naked> Σ0 ↓
<Blob 0x256de [14] @> Δ-14 {[«14""»]}
<Blob 0x256ee [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 256fe-25700 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x25700 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 2570a-2570c StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x2570c> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x2570c 12> Δ-4
<Const 0x25710 0x1.2> Δ-2
<Const 0x25712 0x1e.2> Δ-2
<Call 0x25714 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 25716-25718 StackAdj> Δ+8
<Call 0x25718 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 2571e-25720 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x25720 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 25722-25726 StackAdj> Δ+48 {}
<POP 25726-25786 Naked> Σ0 ↓ ←0x2567e
<Blob 0x25726 [14] @> Δ-14 {[«14""»]}
<POP 25736-25738 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x25738 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 25742-25744 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 25744 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x25748 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 2574e-25750 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x25750 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 25756-25758 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x25758 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2575a-2575b StackAdj> Δ+18 ↓ {}
<Blob 0x2575b [24] @> Δ-24 {[«24""»]}
<Const 0x2576a 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 2576e-25770 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x25770 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x2577e 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 25784-25786 StackAdj> Δ+30 {}
<POP 25786-2578e Epilogue> Σ0
00020000 ; --------------------------------------------------------------------------------------
00020000 ; R1000.Disassembly modules:
00020000 ; import all
00020000 ; import kind.program
00020000 ; no ident.5a75bb88326d8ff6
00020000 ; --------------------------------------------------------------------------------------
00020000 stack.top:
00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END
00020004 00 02 53 be | S | .CODE START
00020008 00 01 02 88 | | .CODE FSCALL_10288
0002000c heap.top:
0002000c 00 02 e5 42 | B | .PTR 0x2e542
00020010 code.end:
00020010 00 02 57 8e | W | .PTR 0x2578e
00020014 00 00 00 00 | | .CONST 0x00000000
00020018 programfailurehandler:
00020018 00 02 55 96 | U | .CODE PROG_FAIL
0002001c experimentfailurehandler:
0002001c 00 02 56 52 | VR | .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 49 4f |@(#)IO | .XXX[0x6]
00020110 58 2c 32 2e 33 2c 39 30 |X,2.3,90| .XXX[0x18]
00020118 2f 31 32 2f 30 36 2c 31 |/12/06,1|
00020120 32 3a 34 30 3a 30 30 5c |2:40:00\|
00020128 53 69 6d 75 6c 61 74 65 |Simulate| .TXT 'Simulate packet requests'
00020140 52 65 73 70 6f 6e 73 65 |Response| .TXT 'Response queue data out of range'
00020160 49 6e 63 6f 72 72 65 63 |Incorrec| .TXT 'Incorrect Packet_Id '
00020174 49 6e 63 6f 72 72 65 63 |Incorrec| .TXT 'Incorrect Response_Kind '
0002018c 55 6e 65 78 70 65 63 74 |Unexpect| .TXT 'Unexpected response arrived '
000201a8 50 61 63 6b 65 74 20 61 |Packet a| .TXT 'Packet arrived out of order '
000201c4 54 6f 6f 20 6d 61 6e 79 |Too many| .TXT 'Too many responses arrived'
000201de 50 61 63 6b 65 74 20 73 |Packet s| .TXT 'Packet size too big '
000201f2 53 74 61 72 74 69 6e 67 |Starting| .TXT 'Starting new I/O on active handle '
00020214 53 74 61 72 74 69 6e 67 |Starting| .TXT 'Starting new I/O on active handle '
00020236 55 6e 73 75 70 70 6f 72 |Unsuppor| .TXT 'Unsupported tape operation'
00020250 45 78 65 72 63 69 73 65 |Exercise| .TXT 'Exercise Tapes'
0002025e 45 78 65 72 63 69 73 65 |Exercise| .TXT 'Exercise Tape unit_ '
00020272 45 78 65 72 |Exer | .TXT 'Exer'
00020276 63 69 73 65 |cise | .TXT 'cise'
0002027a 20 50 41 44 | PAD | .TXT ' PAD'
0002027e 54 61 70 65 |Tape | .TXT 'Tape'
00020282 20 55 6e 69 | Uni | .TXT ' Uni'
00020286 74 20 3a 5f |t :_ | .TXT 't :_'
0002028a 2c 20 |, | .TXT ', '
0002028c 42 79 74 65 73 20 3d 3e |Bytes =>| .TXT 'Bytes =>_ '
00020296 73 6f 66 74 |soft | .TXT 'soft'
0002029a 20 3d 3e 5f | =>_ | .TXT ' =>_'
0002029e 68 61 72 64 |hard | .TXT 'hard'
000202a2 20 3d 3e 5f | =>_ | .TXT ' =>_'
000202a6 64 61 74 61 |data | .TXT 'data'
000202aa 20 3d 3e 5f | =>_ | .TXT ' =>_'
000202ae 20 53 | S | .XXX[0x2]
000202b0 52 3d 20 48 44 3d 20 50 |R= HD= P| .XXX[0x18]
000202b8 4c 3d 20 52 43 3d 20 58 |L= RC= X|
000202c0 30 3d 20 58 31 3d 20 58 |0= X1= X|
000202c8 32 3d 20 58 33 3d |2= X3= | .XXX[0x6]
000202ce 53 70 65 63 69 61 6c 20 |Special | .TXT 'Special condition '
000202e0 55 4e 49 42 55 53 20 70 |UNIBUS p| .TXT 'UNIBUS parity error '
000202f4 52 65 67 69 73 74 65 72 |Register| .TXT 'Register modification refused '
00020312 4e 6f 6e 2d 65 78 69 73 |Non-exis| .TXT 'Non-existant memory '
00020326 4e 65 65 64 20 62 75 66 |Need buf| .TXT 'Need buffer address '
0002033a 53 75 62 73 79 73 74 65 |Subsyste| .TXT 'Subsystem not ready '
0002034e 4f 66 66 2d |Off- | .TXT 'Off-'
00020352 6c 69 6e 65 |line | .TXT 'line'
00020356 54 61 70 65 20 6d 61 72 |Tape mar| .TXT 'Tape mark '
00020360 52 65 63 6f 72 64 20 6c |Record l| .TXT 'Record length short '
00020374 4c 6f 67 69 63 61 6c 20 |Logical | .TXT 'Logical end of tape '
00020388 52 65 63 6f 72 64 20 6c |Record l| .TXT 'Record length long'
0002039a 57 72 69 74 |Writ | .TXT 'Writ'
0002039e 65 20 6c 6f |e lo | .TXT 'e lo'
000203a2 63 6b 20 65 |ck e | .TXT 'ck e'
000203a6 72 72 6f 72 |rror | .TXT 'rror'
000203aa 4e 6f 6e 2d 65 78 65 63 |Non-exec| .TXT 'Non-executable function '
000203c2 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal command '
000203d2 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal address '
000203e2 46 6f 72 6d 61 74 74 65 |Formatte| .TXT 'Formatter busy'
000203f0 4f 66 66 2d |Off- | .TXT 'Off-'
000203f4 6c 69 6e 65 |line | .TXT 'line'
000203f8 56 6f 6c 75 |Volu | .TXT 'Volu'
000203fc 6d 65 20 63 |me c | .TXT 'me c'
00020400 68 65 63 6b |heck | .TXT 'heck'
00020404 57 72 69 74 |Writ | .TXT 'Writ'
00020408 65 20 6c 6f |e lo | .TXT 'e lo'
0002040c 63 6b 65 64 |cked | .TXT 'cked'
00020410 42 4f |BO | .TXT 'BO'
00020412 54 20 |T | .XXX[0x2]
00020414 45 4f |EO | .TXT 'EO'
00020416 54 20 |T | .XXX[0x2]
00020418 44 61 74 61 20 6c 61 74 |Data lat| .TXT 'Data late '
00020422 43 6f 72 72 65 63 74 61 |Correcta| .TXT 'Correctable error '
00020434 55 6e 63 6f 72 72 65 63 |Uncorrec| .TXT 'Uncorrectable error '
00020448 4f 70 65 72 61 74 69 6f |Operatio| .TXT 'Operation in progress '
0002045e 4f 70 65 72 61 74 69 6f |Operatio| .TXT 'Operation incomplete'
00020472 52 65 76 65 72 73 65 20 |Reverse | .TXT 'Reverse '
0002047a 52 65 76 65 |Reve | .TXT 'Reve'
0002047e 72 73 65 20 |rse | .TXT 'rse '
00020482 69 6e 74 6f |into | .TXT 'into'
00020486 20 42 4f 54 | BOT | .TXT ' BOT'
0002048a 50 6f 77 65 72 20 46 61 |Power Fa| .TXT 'Power Fail'
00020494 53 43 53 49 20 62 75 73 |SCSI bus| .TXT 'SCSI bus parity error '
000204aa 46 6f 72 6d 61 74 74 65 |Formatte| .TXT 'Formatted buffer parity error '
000204c8 4d 65 64 69 61 20 65 72 |Media er| .TXT 'Media error '
000204d4 45 72 72 6f 72 20 63 6f |Error co| .TXT 'Error counter overflow'
000204ea 54 61 70 65 20 6d 6f 74 |Tape mot| .TXT 'Tape motion error '
000204fc 54 61 70 65 |Tape | .TXT 'Tape'
00020500 20 6e 6f 74 | not | .TXT ' not'
00020504 20 70 72 65 | pre | .TXT ' pre'
00020508 73 65 6e 74 |sent | .TXT 'sent'
0002050c 42 65 67 69 6e 6e 69 6e |Beginnin| .TXT 'Beginning of tape '
0002051e 54 72 61 6e 73 66 65 72 |Transfer| .TXT 'Transfer abort error'
00020532 54 61 70 65 20 6d 61 72 |Tape mar| .TXT 'Tape mark detect error'
00020548 57 72 69 74 65 20 70 72 |Write pr| .TXT 'Write protect '
00020556 46 69 6c 65 6d 61 72 6b |Filemark| .TXT 'Filemark error'
00020564 55 6e 64 65 72 20 72 75 |Under ru| .TXT 'Under run error '
00020574 57 72 69 74 65 20 65 72 |Write er| .TXT 'Write error 1 '
00020582 53 65 72 76 6f 20 73 79 |Servo sy| .TXT 'Servo system error'
00020594 46 6f 72 6d 61 74 74 65 |Formatte| .TXT 'Formatter error '
000205a4 57 72 69 74 65 20 73 70 |Write sp| .TXT 'Write splice error - blank'
000205be 57 72 69 74 65 20 73 70 |Write sp| .TXT 'Write splice error - overshoot'
000205dc 46 69 6c 65 |File | .TXT 'File'
000205e0 6d 61 72 6b |mark | .TXT 'mark'
000205e4 45 6e 64 20 6f 66 20 6d |End of m| .TXT 'End of medium '
000205f2 49 6e 63 6f 72 72 65 63 |Incorrec| .TXT 'Incorrect length indicator'
0002060c 4e 6f 74 20 72 65 61 64 |Not read| .TXT 'Not ready '
00020616 4d 65 64 69 |Medi | .TXT 'Medi'
0002061a 75 6d 20 65 |um e | .TXT 'um e'
0002061e 72 72 6f 72 |rror | .TXT 'rror'
00020622 48 61 72 64 77 61 72 65 |Hardware| .TXT 'Hardware error'
00020630 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal request '
00020640 55 6e 69 74 20 61 74 74 |Unit att| .TXT 'Unit attention'
0002064e 44 61 74 61 |Data | .TXT 'Data'
00020652 20 70 72 6f | pro | .TXT ' pro'
00020656 74 65 63 74 |tect | .TXT 'tect'
0002065a 42 6c 61 6e 6b 20 63 68 |Blank ch| .TXT 'Blank check '
00020666 45 78 61 62 79 74 65 20 |Exabyte | .TXT 'Exabyte '
0002066e 43 6f 70 79 |Copy | .TXT 'Copy'
00020672 20 61 62 6f | abo | .TXT ' abo'
00020676 72 74 65 64 |rted | .TXT 'rted'
0002067a 41 62 6f 72 74 65 64 20 |Aborted | .TXT 'Aborted command '
0002068a 56 6f 6c 75 6d 65 20 6f |Volume o| .TXT 'Volume overflow '
0002069a 2c 5f |,_ | .TXT ',_'
0002069c 54 61 70 65 |Tape | .TXT 'Tape'
000206a0 20 55 6e 69 | Uni | .TXT ' Uni'
000206a4 74 20 3a 5f |t :_ | .TXT 't :_'
000206a8 2c 20 |, | .TXT ', '
000206aa 2c 5f |,_ | .TXT ',_'
000206ac 20 65 72 72 6f 72 2c 20 | error, | .TXT ' error, retries =>'
000206be 48 61 72 64 |Hard | .TXT 'Hard'
000206c2 53 6f 66 74 |Soft | .TXT 'Soft'
000206c6 44 41 54 41 |DATA | .TXT 'DATA'
000206ca 4e 6f 74 20 6f 6e 20 6c |Not on l| .TXT 'Not on line '
000206d6 57 72 6f 6e 67 20 64 65 |Wrong de| .TXT 'Wrong density '
000206e4 54 61 70 65 |Tape | .TXT 'Tape'
000206e8 54 61 70 65 |Tape | .TXT 'Tape'
000206ec 52 65 63 6f 72 64 20 6c |Record l| .TXT 'Record long '
000206f8 54 61 70 65 |Tape | .TXT 'Tape'
000206fc 52 65 63 6f |Reco | .TXT 'Reco'
00020700 72 64 20 73 |rd s | .TXT 'rd s'
00020704 68 6f 72 74 |hort | .TXT 'hort'
00020708 54 61 70 65 |Tape | .TXT 'Tape'
0002070c 55 6e 65 78 70 65 63 74 |Unexpect| .TXT 'Unexpected mark '
0002071c 54 61 70 65 |Tape | .TXT 'Tape'
00020720 4f 6e 20 6c 69 6e 65 20 |On line | .TXT 'On line '
00020728 57 72 69 74 65 20 6c 6f |Write lo| .TXT 'Write lock'
00020732 54 61 70 65 |Tape | .TXT 'Tape'
00020736 54 61 70 65 |Tape | .TXT 'Tape'
0002073a 54 61 70 65 |Tape | .TXT 'Tape'
0002073e 55 6e 69 74 |Unit | .TXT 'Unit'
00020742 52 65 73 70 6f 6e 73 65 |Response| .TXT 'Response from WRITE contained data'
00020764 44 65 6e 73 69 74 79 20 |Density | .TXT 'Density select'
00020772 53 70 65 65 |Spee | .TXT 'Spee'
00020776 64 20 73 65 |d se | .TXT 'd se'
0002077a 6c 65 63 74 |lect | .TXT 'lect'
0002077e 52 65 73 70 6f 6e 73 65 |Response| .TXT 'Response from READ is incorrect '
0002079e 44 69 73 6b 20 68 61 73 |Disk has| .TXT 'Disk has no labels, unit :_ '
000207ba 45 6e 74 65 72 20 72 65 |Enter re| .TXT 'Enter report increment [1..500] '
000207da 45 78 65 72 63 69 73 65 |Exercise| .TXT 'Exercise Disks'
000207e8 44 6f 20 61 6c 6c 20 49 |Do all I| .TXT 'Do all I/O to the same cylinder '
00020808 45 78 65 72 63 69 73 65 |Exercise| .TXT 'Exercise Disk unit_ '
0002081c 44 69 73 6b 20 75 6e 69 |Disk uni| .TXT 'Disk unit =>_ '
0002082a 2c 20 75 73 69 6e 67 20 |, using | .TXT ', using cylinders [ '
0002083e 2e 2e |.. | .TXT '..'
00020840 5d 20 |] | .TXT '] '
00020842 20 43 53 31 3d 20 | CS1= | .XXX[0x6]
00020848 20 43 53 32 3d 20 20 44 | CS2= D| .XXX[0x30]
00020850 53 3d 20 20 20 45 52 31 |S= ER1|
00020858 3d 20 20 45 52 32 3d 20 |= ER2= |
00020860 20 45 43 31 3d 20 20 45 | EC1= E|
00020868 43 32 3d 20 20 44 43 3d |C2= DC=|
00020870 20 20 20 44 41 3d 20 20 | DA= |
00020878 53 70 65 63 69 61 6c 20 |Special | .TXT 'Special condition '
0002088a 54 72 61 6e 73 66 65 72 |Transfer| .TXT 'Transfer error'
00020898 44 72 69 76 65 20 69 73 |Drive is| .TXT 'Drive is not available'
000208ae 44 72 69 76 65 20 69 73 |Drive is| .TXT 'Drive is not ready'
000208c0 44 61 74 61 20 6c 61 74 |Data lat| .TXT 'Data late '
000208ca 57 72 69 74 65 20 63 68 |Write ch| .TXT 'Write check error '
000208dc 4e 6f 6e 2d 65 78 69 73 |Non-exis| .TXT 'Non-existent drive'
000208ee 4e 6f 6e 2d 65 78 69 73 |Non-exis| .TXT 'Non-existent memory '
00020902 50 72 6f 67 72 61 6d 20 |Program | .TXT 'Program error '
00020910 4d 69 73 73 65 64 20 74 |Missed t| .TXT 'Missed transfer '
00020920 49 6e 70 75 74 20 6e 6f |Input no| .TXT 'Input not ready '
00020930 42 75 73 20 61 64 64 72 |Bus addr| .TXT 'Bus address increment inhibit '
0002094e 50 6f 73 69 74 69 6f 6e |Position| .TXT 'Positioning in progress '
00020966 4d 65 64 69 75 6d 20 6e |Medium n| .TXT 'Medium not on-line'
00020978 57 72 69 74 |Writ | .TXT 'Writ'
0002097c 65 20 6c 6f |e lo | .TXT 'e lo'
00020980 63 6b 65 64 |cked | .TXT 'cked'
00020984 4c 61 73 74 20 73 65 63 |Last sec| .TXT 'Last sector transfered'
0002099a 44 72 69 76 65 20 6e 6f |Drive no| .TXT 'Drive not present '
000209ac 44 72 69 76 65 20 6e 6f |Drive no| .TXT 'Drive not ready '
000209bc 56 6f 6c 75 |Volu | .TXT 'Volu'
000209c0 6d 65 20 6e |me n | .TXT 'me n'
000209c4 6f 74 20 76 |ot v | .TXT 'ot v'
000209c8 61 6c 69 64 |alid | .TXT 'alid'
000209cc 44 61 74 61 |Data | .TXT 'Data'
000209d0 20 63 68 65 | che | .TXT ' che'
000209d4 63 6b 20 28 |ck ( | .TXT 'ck ('
000209d8 45 43 43 29 |ECC) | .TXT 'ECC)'
000209dc 55 6e |Un | .TXT 'Un'
000209de 73 61 |sa | .TXT 'sa'
000209e0 66 65 |fe | .TXT 'fe'
000209e2 4f 70 65 72 61 74 69 6f |Operatio| .TXT 'Operation incomplete'
000209f6 44 72 69 76 65 20 74 69 |Drive ti| .TXT 'Drive timing error'
00020a08 57 72 69 74 |Writ | .TXT 'Writ'
00020a0c 65 20 6c 6f |e lo | .TXT 'e lo'
00020a10 63 6b 20 65 |ck e | .TXT 'ck e'
00020a14 72 72 6f 72 |rror | .TXT 'rror'
00020a18 49 6e 76 61 6c 69 64 20 |Invalid | .TXT 'Invalid address error '
00020a2e 41 64 64 72 65 73 73 20 |Address | .TXT 'Address overflow error'
00020a44 48 65 61 64 |Head | .TXT 'Head'
00020a48 65 72 20 43 |er C | .TXT 'er C'
00020a4c 52 43 20 65 |RC e | .TXT 'RC e'
00020a50 72 72 6f 72 |rror | .TXT 'rror'
00020a54 48 65 61 64 65 72 20 63 |Header c| .TXT 'Header compare error'
00020a68 48 61 72 64 20 45 43 43 |Hard ECC| .TXT 'Hard ECC error'
00020a76 46 6f 72 6d |Form | .TXT 'Form'
00020a7a 61 74 20 65 |at e | .TXT 'at e'
00020a7e 72 72 6f 72 |rror | .TXT 'rror'
00020a82 52 65 67 69 73 74 65 72 |Register| .TXT 'Register modification refused '
00020aa0 49 6c 6c 65 |Ille | .TXT 'Ille'
00020aa4 67 61 6c 20 |gal | .TXT 'gal '
00020aa8 66 75 6e 63 |func | .TXT 'func'
00020aac 74 69 6f 6e |tion | .TXT 'tion'
00020ab0 42 61 64 20 62 6c 6f 63 |Bad bloc| .TXT 'Bad block '
00020aba 53 65 65 6b 20 69 6e 63 |Seek inc| .TXT 'Seek incomplete '
00020aca 49 6e 76 61 6c 69 64 20 |Invalid | .TXT 'Invalid command (volume not valid, off-line, or off cylinder) '
00020b08 44 65 76 69 |Devi | .TXT 'Devi'
00020b0c 63 65 20 63 |ce c | .TXT 'ce c'
00020b10 68 65 63 6b |heck | .TXT 'heck'
00020b14 2c 5f |,_ | .TXT ',_'
00020b16 44 69 73 6b |Disk | .TXT 'Disk'
00020b1a 20 55 6e 69 | Uni | .TXT ' Uni'
00020b1e 74 20 3a 5f |t :_ | .TXT 't :_'
00020b22 2c 20 |, | .TXT ', '
00020b24 2c 5f |,_ | .TXT ',_'
00020b26 20 65 72 72 6f 72 2c 20 | error, | .TXT ' error, retries =>'
00020b38 48 61 72 64 |Hard | .TXT 'Hard'
00020b3c 53 6f 66 74 |Soft | .TXT 'Soft'
00020b40 44 69 73 6b |Disk | .TXT 'Disk'
00020b44 20 55 6e 69 | Uni | .TXT ' Uni'
00020b48 74 20 3a 5f |t :_ | .TXT 't :_'
00020b4c 2c 20 |, | .TXT ', '
00020b4e 42 79 74 65 73 20 3d 3e |Bytes =>| .TXT 'Bytes =>_ '
00020b58 73 6f 66 74 |soft | .TXT 'soft'
00020b5c 20 3d 3e 5f | =>_ | .TXT ' =>_'
00020b60 68 61 72 64 |hard | .TXT 'hard'
00020b64 20 3d 3e 5f | =>_ | .TXT ' =>_'
00020b68 43 3a |C: | .TXT 'C:'
00020b6a 54 3a |T: | .TXT 'T:'
00020b6c 53 3a |S: | .TXT 'S:'
00020b6e 53 74 61 74 75 73 20 61 |Status a| .TXT 'Status at_'
00020b78 2c 20 54 65 73 74 69 6e |, Testin| .TXT ', Testing started at_ '
00020b8e 44 46 53 20 62 61 73 65 |DFS base| .TXT 'DFS based I/O exerciser '
00020ba6 54 79 70 65 20 5e 47 20 |Type ^G | .TXT 'Type ^G to exit, any other character for status '
00020bd6 49 2f 4f 20 65 78 65 72 |I/O exer| .TXT 'I/O exerciser done. '
00020bea 00 00 ff ff b6 db | | .XXX[0x6]
00020bf0 ed b6 aa aa 20 53 52 3d | SR=| .XXX[0x50]
00020bf8 20 48 44 3d 20 50 4c 3d | HD= PL=|
00020c00 20 52 43 3d 20 58 30 3d | RC= X0=|
00020c08 20 58 31 3d 20 58 32 3d | X1= X2=|
00020c10 20 58 33 3d 20 43 53 31 | X3= CS1|
00020c18 3d 20 43 53 32 3d 20 44 |= CS2= D|
00020c20 53 3d 20 20 45 52 31 3d |S= ER1=|
00020c28 20 45 52 32 3d 20 45 43 | ER2= EC|
00020c30 31 3d 20 45 43 32 3d 20 |1= EC2= |
00020c38 44 43 3d 20 20 44 41 3d |DC= DA=|
00020c40 20 00 | | .XXX[0x2]
00020c42 ; --------------------------------------------------------------------------------------
00020c42 ; OMSI PASCAL Function
00020c42 ; <LVAR 0x008 4(r)>
00020c42 ; --------------------------------------------------------------------------------------
00020c42 4e 56 ff f6 |NV | LINK.W A6,#0xfff6
00020c46 bf d5 | | CMPA.L (A5),A7
00020c48 62 06 |b | BHI 0x20c50
00020c4a 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020c4e 4e 76 |Nv | TRAPV
00020c50 de fc 00 0a | | ADDA.W #0xa,A7
00020c54 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7)
00020c58 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7)
00020c5c 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String)
00020c62 5c 4f |\O | ADDQ.L #0x6,A7
00020c64 4e 5e |N^ | UNLK A6
00020c66 4e 75 |Nu | RTS
00020c68 ; --------------------------------------------------------------------------------------
00020c68 ; OMSI PASCAL Function
00020c68 ; <LVAR 0x010 4(w)>
00020c68 ; <LVAR 0x00c 4(r)>
00020c68 ; <LVAR 0x008 4(r)>
00020c68 ; --------------------------------------------------------------------------------------
00020c68 4e 56 ff e4 |NV | LINK.W A6,#0xffe4
00020c6c bf d5 | | CMPA.L (A5),A7
00020c6e 62 06 |b | BHI 0x20c76
00020c70 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020c74 4e 76 |Nv | TRAPV
00020c76 de fc 00 18 | | ADDA.W #0x18,A7
00020c7a 48 e7 19 80 |H | MOVEM.L A0+D7+D4+D3,-(A7)
00020c7e 41 f9 00 02 57 9a |A W | LEA.L 0x2579a,A0
00020c84 28 10 |( | MOVE.L (A0),D4
00020c86 26 3c 00 00 01 a5 |&< | MOVE.L #0x1a5,D3
00020c8c 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4
00020c92 20 84 | | MOVE.L D4,(A0)
00020c94 52 90 |R | ADDQ.L #0x1,(A0)
00020c96 02 90 00 00 7f ff | | ANDI.L #0x00007fff,(A0)
00020c9c 2e 2e 00 08 |.. | MOVE.L (A6+0x8),D7
00020ca0 9e ae 00 0c | | SUB.L (A6+0xc),D7
00020ca4 52 87 |R | ADDQ.L #0x1,D7
00020ca6 28 10 |( | MOVE.L (A0),D4
00020ca8 26 07 |& | MOVE.L D7,D3
00020caa 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4
00020cb0 d6 ae 00 0c | | ADD.L (A6+0xc),D3
00020cb4 2e 03 |. | MOVE.L D3,D7
00020cb6 2d 47 00 10 |-G | MOVE.L D7,(A6+0x10)
00020cba 4c df 01 98 |L | MOVEM.L (A7)+,D3+D4+D7+A0
00020cbe 4e 5e |N^ | UNLK A6
00020cc0 4e 75 |Nu | RTS
00020cc2 ; --------------------------------------------------------------------------------------
00020cc2 ; OMSI PASCAL Function
00020cc2 ; <LVAR 0x008 4(w)>
00020cc2 ; --------------------------------------------------------------------------------------
00020cc2 4e 56 ff ec |NV | LINK.W A6,#0xffec
00020cc6 bf d5 | | CMPA.L (A5),A7
00020cc8 62 06 |b | BHI 0x20cd0
00020cca 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020cce 4e 76 |Nv | TRAPV
00020cd0 de fc 00 14 | | ADDA.W #0x14,A7
00020cd4 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7)
00020cd8 43 f9 00 02 57 96 |C W | LEA.L 0x25796,A1
00020cde 52 91 |R | ADDQ.L #0x1,(A1)
00020ce0 20 11 | | MOVE.L (A1),D0
00020ce2 0c 80 00 00 00 05 | | CMPI.L #0x00000005,D0
00020ce8 6f 06 |o | BLE 0x20cf0
00020cea 22 bc 00 00 00 01 |" | MOVE.L #0x1,(A1)
00020cf0 20 11 | | MOVE.L (A1),D0
00020cf2 53 80 |S | SUBQ.L #0x1,D0
00020cf4 0c 80 00 00 00 04 | | CMPI.L #0x00000004,D0
00020cfa 63 02 |c | BLS 0x20cfe
00020cfc 4e 4f |NO | TRAP #15
00020cfe e3 80 | | ASL.L #0x1,D0
00020d00 41 fa fe e8 |A | LEA.L 0x20bea,A0
00020d04 42 81 |B | CLR.L D1
00020d06 32 30 08 00 |20 | MOVE.W (A0+D0.L),D1
00020d0a 2d 41 00 08 |-A | MOVE.L D1,(A6+0x8)
00020d0e 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1
00020d12 4e 5e |N^ | UNLK A6
00020d14 4e 75 |Nu | RTS
00020d16 ; --------------------------------------------------------------------------------------
00020d16 ; OMSI PASCAL Function
00020d16 ; <LVAR -0x006 @>
00020d16 ; <LVAR -0x008 @ 1(r)>
00020d16 ; --------------------------------------------------------------------------------------
00020d16 4e 56 ff a2 |NV | LINK.W A6,#0xffa2
00020d1a bf d5 | | CMPA.L (A5),A7
00020d1c 62 06 |b | BHI 0x20d24
00020d1e 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020d22 4e 76 |Nv | TRAPV
00020d24 de fc 00 56 | V | ADDA.W #0x56,A7
00020d28 48 e7 ff e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00020d2c 43 f9 00 01 02 38 |C 8 | LEA.L KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word),A1
00020d32 45 f9 00 02 57 a2 |E W | LEA.L 0x257a2,A2
00020d38 72 0a |r | MOVEQ.L #0x0a,D1
00020d3a 74 01 |t | MOVEQ.L #0x01,D2
00020d3c 76 04 |v | MOVEQ.L #0x04,D3
00020d3e 78 18 |x | MOVEQ.L #0x18,D4
00020d40 7a 02 |z | MOVEQ.L #0x02,D5
00020d42 7c 1f || | MOVEQ.L #0x1f,D6
00020d44 41 fa f3 fa |A | LEA.L 0x20140,A0
00020d48 70 05 |p | MOVEQ.L #0x05,D0
00020d4a 2f 20 |/ | MOVE.L -(A0),-(A7)
00020d4c 51 c8 ff fc |Q | DBF D0,0x20d4a
00020d50 5d 4f |]O | SUBQ.L #0x6,A7
00020d52 48 6f 00 06 |Ho | PEA.L (A7+0x6)
00020d56 3f 02 |? | MOVE.W D2,-(A7)
00020d58 3f 04 |? | MOVE.W D4,-(A7)
00020d5a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00020d60 5c 4f |\O | ADDQ.L #0x6,A7
00020d62 1e 82 | | MOVE.B D2,(A7)
00020d64 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
00020d6a 5c 4f |\O | ADDQ.L #0x6,A7
00020d6c 10 1f | | MOVE.B (A7)+,D0
00020d6e 48 80 |H | EXTB.W D0
00020d70 41 82 |A | CHK.W D2,D0
00020d72 de c4 | | ADDA.W D4,A7
00020d74 14 80 | | MOVE.B D0,(A2)
00020d76 48 78 04 00 |Hx | PEA.L 0x400
00020d7a 41 f9 00 02 57 a8 |A W | LEA.L 0x257a8,A0
00020d80 2f 08 |/ | MOVE.L A0,-(A7)
00020d82 3f 03 |? | MOVE.W D3,-(A7)
00020d84 4e 91 |N | JSR (A1)
00020d86 de c1 | | ADDA.W D1,A7
00020d88 48 78 04 04 |Hx | PEA.L 0x404
00020d8c 41 f9 00 02 57 ac |A W | LEA.L 0x257ac,A0
00020d92 2f 08 |/ | MOVE.L A0,-(A7)
00020d94 3f 05 |? | MOVE.W D5,-(A7)
00020d96 4e 91 |N | JSR (A1)
00020d98 de c1 | | ADDA.W D1,A7
00020d9a 48 78 04 06 |Hx | PEA.L 0x406
00020d9e 41 f9 00 02 57 ae |A W | LEA.L 0x257ae,A0
00020da4 2f 08 |/ | MOVE.L A0,-(A7)
00020da6 3f 05 |? | MOVE.W D5,-(A7)
00020da8 4e 91 |N | JSR (A1)
00020daa de c1 | | ADDA.W D1,A7
00020dac 48 78 04 08 |Hx | PEA.L 0x408
00020db0 41 f9 00 02 57 b0 |A W | LEA.L 0x257b0,A0
00020db6 2f 08 |/ | MOVE.L A0,-(A7)
00020db8 3f 03 |? | MOVE.W D3,-(A7)
00020dba 4e 91 |N | JSR (A1)
00020dbc de c1 | | ADDA.W D1,A7
00020dbe 48 78 04 0c |Hx | PEA.L 0x40c
00020dc2 41 f9 00 02 57 b4 |A W | LEA.L 0x257b4,A0
00020dc8 2f 08 |/ | MOVE.L A0,-(A7)
00020dca 3f 03 |? | MOVE.W D3,-(A7)
00020dcc 4e 91 |N | JSR (A1)
00020dce de c1 | | ADDA.W D1,A7
00020dd0 4a 12 |J | TST.B (A2)
00020dd2 67 4c |gL | BEQ 0x20e20
00020dd4 7e 00 |~ | MOVEQ.L #0x00,D7
00020dd6 be 86 | | CMP.L D6,D7
00020dd8 63 02 |c | BLS 0x20ddc
00020dda 4e 4f |NO | TRAP #15
00020ddc 20 07 | | MOVE.L D7,D0
00020dde e9 80 | | ASL.L #0x4,D0
00020de0 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00020de6 42 30 08 2a |B0 * | CLR.B (A0+D0.L+#0x2a)
00020dea 42 30 08 2b |B0 + | CLR.B (A0+D0.L+#0x2b)
00020dee 42 30 08 2c |B0 , | CLR.B (A0+D0.L+#0x2c)
00020df2 42 70 08 2e |Bp . | CLR.W (A0+D0.L+#0x2e)
00020df6 42 70 08 30 |Bp 0 | CLR.W (A0+D0.L+#0x30)
00020dfa 42 b0 08 32 |B 2 | CLR.L (A0+D0.L+#0x32)
00020dfe 42 b0 08 36 |B 6 | CLR.L (A0+D0.L+#0x36)
00020e02 52 87 |R | ADDQ.L #0x1,D7
00020e04 be 86 | | CMP.L D6,D7
00020e06 6f ce |o | BLE 0x20dd6
00020e08 42 27 |B' | CLR.B -(A7)
00020e0a 48 6e ff f8 |Hn | PEA.L (A6-0x8)
00020e0e 48 6e ff fa |Hn | PEA.L (A6-0x6)
00020e12 4e b9 00 01 02 32 |N 2 | JSR KERNCALL_19
00020e18 de c1 | | ADDA.W D1,A7
00020e1a 4a 2e ff f8 |J. | TST.B (A6-0x8)
00020e1e 66 e8 |f | BNE 0x20e08
00020e20 4c df 07 ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2
00020e24 4e 5e |N^ | UNLK A6
00020e26 4e 75 |Nu | RTS
00020e28 ; --------------------------------------------------------------------------------------
00020e28 ; OMSI PASCAL Function
00020e28 ; <LVAR 0x010 2(r)>
00020e28 ; <LVAR 0x00c 4(r)>
00020e28 ; <LVAR 0x008 4(r)>
00020e28 ; <LVAR -0x009 1(r)>
00020e28 ; <LVAR -0x00a 1(r)>
00020e28 ; <LVAR -0x00c 1(r)>
00020e28 ; <LVAR -0x00f 1(r)>
00020e28 ; <LVAR -0x010 1(r)>
00020e28 ; <LVAR -0x011 1(r)>
00020e28 ; <LVAR -0x012 @>
00020e28 ; <LVAR -0x01c @ 2(r)>
00020e28 ; <LVAR -0x01e @ 1(r)>
00020e28 ; --------------------------------------------------------------------------------------
00020e28 4e 56 ff 70 |NV p | LINK.W A6,#0xff70
00020e2c bf d5 | | CMPA.L (A5),A7
00020e2e 62 06 |b | BHI 0x20e36
00020e30 44 fc 00 02 |D | MOVE.W #0x2,CCR
00020e34 4e 76 |Nv | TRAPV
00020e36 de fc 00 72 | r | ADDA.W #0x72,A7
00020e3a 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00020e3e 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00020e44 49 fa fd fc |I | LEA.L 0x20c42,A4
00020e48 4a 39 00 02 57 a2 |J9 W | TST.B 0x257a2
00020e4e 67 00 02 e8 |g | BEQ 0x21138
00020e52 7e 00 |~ | MOVEQ.L #0x00,D7
00020e54 10 07 | | MOVE.B D7,D0
00020e56 48 80 |H | EXTB.W D0
00020e58 41 bc 00 01 |A | CHK.W #0x1,D0
00020e5c 1f 00 | | MOVE.B D0,-(A7)
00020e5e 48 6e ff e2 |Hn | PEA.L (A6-0x1e)
00020e62 48 6e ff e4 |Hn | PEA.L (A6-0x1c)
00020e66 4e b9 00 01 02 32 |N 2 | JSR KERNCALL_19
00020e6c de fc 00 0a | | ADDA.W #0xa,A7
00020e70 4a 2e ff e2 |J. | TST.B (A6-0x1e)
00020e74 67 00 02 26 |g & | BEQ 0x2109c
00020e78 30 2e ff e4 |0. | MOVE.W (A6-0x1c),D0
00020e7c 0c 40 00 ff | @ | CMPI.W #0x00ff,D0
00020e80 63 24 |c$ | BLS 0x20ea6
00020e82 41 fa f2 dc |A | LEA.L 0x20160,A0
00020e86 72 07 |r | MOVEQ.L #0x07,D1
00020e88 2f 20 |/ | MOVE.L -(A0),-(A7)
00020e8a 51 c9 ff fc |Q | DBF D1,0x20e88
00020e8e 59 4f |YO | SUBQ.L #0x4,A7
00020e90 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020e94 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00020e98 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7)
00020e9c 4e 93 |N | JSR (A3)
00020e9e 50 4f |PO | ADDQ.L #0x8,A7
00020ea0 4e 94 |N | JSR (A4)
00020ea2 de fc 00 24 | $ | ADDA.W #0x24,A7
00020ea6 32 39 00 02 57 ae |29 W | MOVE.W 0x257ae,D1
00020eac c2 c0 | | MULU.W D0,D1
00020eae d2 b9 00 02 57 b0 | W | ADD.L 0x257b0,D1
00020eb4 2f 01 |/ | MOVE.L D1,-(A7)
00020eb6 41 ee ff ee |A | LEA.L (A6-0x12),A0
00020eba 2f 08 |/ | MOVE.L A0,-(A7)
00020ebc 3f 3c 00 10 |?< | MOVE.W #0x10,-(A7)
00020ec0 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
00020ec6 de fc 00 0a | | ADDA.W #0xa,A7
00020eca 42 81 |B | CLR.L D1
00020ecc 12 2e ff f6 | . | MOVE.B (A6-0xa),D1
00020ed0 34 01 |4 | MOVE.W D1,D2
00020ed2 e6 42 | B | ASR.W #0x3,D2
00020ed4 e9 42 | B | ASL.W #0x4,D2
00020ed6 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00020edc 2f 08 |/ | MOVE.L A0,-(A7)
00020ede 42 83 |B | CLR.L D3
00020ee0 16 2e ff f1 | . | MOVE.B (A6-0xf),D3
00020ee4 b6 40 | @ | CMP.W D0,D3
00020ee6 67 2a |g* | BEQ 0x20f12
00020ee8 9e fc 00 14 | | SUBA.W #0x14,A7
00020eec 22 4f |"O | MOVEA.L A7,A1
00020eee 45 fa f2 70 |E p | LEA.L 0x20160,A2
00020ef2 70 12 |p | MOVEQ.L #0x12,D0
00020ef4 12 da | | MOVE.B (A2)+,(A1)+
00020ef6 51 c8 ff fc |Q | DBF D0,0x20ef4
00020efa 59 4f |YO | SUBQ.L #0x4,A7
00020efc 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020f00 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00020f04 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
00020f08 4e 93 |N | JSR (A3)
00020f0a 50 4f |PO | ADDQ.L #0x8,A7
00020f0c 4e 94 |N | JSR (A4)
00020f0e de fc 00 18 | | ADDA.W #0x18,A7
00020f12 4a 2e ff f4 |J. | TST.B (A6-0xc)
00020f16 67 2a |g* | BEQ 0x20f42
00020f18 9e fc 00 18 | | SUBA.W #0x18,A7
00020f1c 22 4f |"O | MOVEA.L A7,A1
00020f1e 45 fa f2 54 |E T | LEA.L 0x20174,A2
00020f22 70 16 |p | MOVEQ.L #0x16,D0
00020f24 12 da | | MOVE.B (A2)+,(A1)+
00020f26 51 c8 ff fc |Q | DBF D0,0x20f24
00020f2a 59 4f |YO | SUBQ.L #0x4,A7
00020f2c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020f30 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00020f34 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7)
00020f38 4e 93 |N | JSR (A3)
00020f3a 50 4f |PO | ADDQ.L #0x8,A7
00020f3c 4e 94 |N | JSR (A4)
00020f3e de fc 00 1c | | ADDA.W #0x1c,A7
00020f42 4a 30 20 2b |J0 + | TST.B (A0+D2.W+#0x2b)
00020f46 66 2a |f* | BNE 0x20f72
00020f48 9e fc 00 1c | | SUBA.W #0x1c,A7
00020f4c 22 4f |"O | MOVEA.L A7,A1
00020f4e 45 fa f2 3c |E < | LEA.L 0x2018c,A2
00020f52 70 1a |p | MOVEQ.L #0x1a,D0
00020f54 12 da | | MOVE.B (A2)+,(A1)+
00020f56 51 c8 ff fc |Q | DBF D0,0x20f54
00020f5a 59 4f |YO | SUBQ.L #0x4,A7
00020f5c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020f60 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00020f64 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7)
00020f68 4e 93 |N | JSR (A3)
00020f6a 50 4f |PO | ADDQ.L #0x8,A7
00020f6c 4e 94 |N | JSR (A4)
00020f6e de fc 00 20 | | ADDA.W #0x20,A7
00020f72 30 01 |0 | MOVE.W D1,D0
00020f74 48 c0 |H | EXTW.L D0
00020f76 2f 00 |/ | MOVE.L D0,-(A7)
00020f78 42 81 |B | CLR.L D1
00020f7a 32 30 20 2e |20 . | MOVE.W (A0+D2.W+#0x2e),D1
00020f7e d2 80 | | ADD.L D0,D1
00020f80 48 c3 |H | EXTW.L D3
00020f82 b6 81 | | CMP.L D1,D3
00020f84 67 2a |g* | BEQ 0x20fb0
00020f86 9e fc 00 1c | | SUBA.W #0x1c,A7
00020f8a 22 4f |"O | MOVEA.L A7,A1
00020f8c 45 fa f2 1a |E | LEA.L 0x201a8,A2
00020f90 70 1a |p | MOVEQ.L #0x1a,D0
00020f92 12 da | | MOVE.B (A2)+,(A1)+
00020f94 51 c8 ff fc |Q | DBF D0,0x20f92
00020f98 59 4f |YO | SUBQ.L #0x4,A7
00020f9a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020f9e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00020fa2 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7)
00020fa6 4e 93 |N | JSR (A3)
00020fa8 50 4f |PO | ADDQ.L #0x8,A7
00020faa 4e 94 |N | JSR (A4)
00020fac de fc 00 20 | | ADDA.W #0x20,A7
00020fb0 42 80 |B | CLR.L D0
00020fb2 30 30 20 2e |00 . | MOVE.W (A0+D2.W+#0x2e),D0
00020fb6 52 80 |R | ADDQ.L #0x1,D0
00020fb8 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0
00020fbe 63 02 |c | BLS 0x20fc2
00020fc0 4e 4f |NO | TRAP #15
00020fc2 31 80 20 2e |1 . | MOVE.W D0,(A0+D2.W+#0x2e)
00020fc6 b0 70 20 30 | p 0 | CMP.W (A0+D2.W+#0x30),D0
00020fca 63 24 |c$ | BLS 0x20ff0
00020fcc 41 fa f2 10 |A | LEA.L 0x201de,A0
00020fd0 70 0c |p | MOVEQ.L #0x0c,D0
00020fd2 3f 20 |? | MOVE.W -(A0),-(A7)
00020fd4 51 c8 ff fc |Q | DBF D0,0x20fd2
00020fd8 59 4f |YO | SUBQ.L #0x4,A7
00020fda 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00020fde 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00020fe2 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7)
00020fe6 4e 93 |N | JSR (A3)
00020fe8 50 4f |PO | ADDQ.L #0x8,A7
00020fea 4e 94 |N | JSR (A4)
00020fec de fc 00 1e | | ADDA.W #0x1e,A7
00020ff0 10 2e ff f7 | . | MOVE.B (A6-0x9),D0
00020ff4 ee 08 | | LSR.B #0x7,D0
00020ff6 67 00 00 a2 |g | BEQ 0x2109a
00020ffa 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0
00020ffe 42 30 20 2b |B0 + | CLR.B (A0+D2.W+#0x2b)
00021002 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0
00021006 11 bc 00 01 20 2a | * | MOVE.B #0x01,(A0+D2.W+#0x2a)
0002100c 10 2e ff f7 | . | MOVE.B (A6-0x9),D0
00021010 ed 08 | | LSL.B #0x6,D0
00021012 ee 08 | | LSR.B #0x7,D0
00021014 11 80 20 2c | , | MOVE.B D0,(A0+D2.W+#0x2c)
00021018 4a b0 20 36 |J 6 | TST.L (A0+D2.W+#0x36)
0002101c 67 7c |g| | BEQ 0x2109a
0002101e 42 80 |B | CLR.L D0
00021020 10 2e ff ef | . | MOVE.B (A6-0x11),D0
00021024 e7 40 | @ | ASL.W #0x3,D0
00021026 42 81 |B | CLR.L D1
00021028 12 2e ff f0 | . | MOVE.B (A6-0x10),D1
0002102c 44 41 |DA | NEG.W D1
0002102e d2 40 | @ | ADD.W D0,D1
00021030 48 c1 |H | EXTW.L D1
00021032 b2 b0 20 36 | 6 | CMP.L (A0+D2.W+#0x36),D1
00021036 6f 2a |o* | BLE 0x21062
00021038 9e fc 00 14 | | SUBA.W #0x14,A7
0002103c 22 4f |"O | MOVEA.L A7,A1
0002103e 45 fa f1 9e |E | LEA.L 0x201de,A2
00021042 70 12 |p | MOVEQ.L #0x12,D0
00021044 12 da | | MOVE.B (A2)+,(A1)+
00021046 51 c8 ff fc |Q | DBF D0,0x21044
0002104a 59 4f |YO | SUBQ.L #0x4,A7
0002104c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021050 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00021054 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
00021058 4e 93 |N | JSR (A3)
0002105a 50 4f |PO | ADDQ.L #0x8,A7
0002105c 4e 94 |N | JSR (A4)
0002105e de fc 00 18 | | ADDA.W #0x18,A7
00021062 28 17 |( | MOVE.L (A7),D4
00021064 42 83 |B | CLR.L D3
00021066 36 39 00 02 57 ac |69 W | MOVE.W 0x257ac,D3
0002106c 4e b9 00 01 02 90 |N | JSR ?mulu_d3_d4
00021072 20 04 | | MOVE.L D4,D0
00021074 d0 b9 00 02 57 b4 | W | ADD.L 0x257b4,D0
0002107a 2f 00 |/ | MOVE.L D0,-(A7)
0002107c 2f 30 20 32 |/0 2 | MOVE.L (A0+D2.W+#0x32),-(A7)
00021080 20 30 20 36 | 0 6 | MOVE.L (A0+D2.W+#0x36),D0
00021084 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0
0002108a 63 02 |c | BLS 0x2108e
0002108c 4e 4f |NO | TRAP #15
0002108e 3f 00 |? | MOVE.W D0,-(A7)
00021090 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
00021096 de fc 00 0a | | ADDA.W #0xa,A7
0002109a 50 4f |PO | ADDQ.L #0x8,A7
0002109c 7e 00 |~ | MOVEQ.L #0x00,D7
0002109e 4a 2e ff e2 |J. | TST.B (A6-0x1e)
000210a2 66 00 fd b0 |f | BNE 0x20e54
000210a6 7e 01 |~ | MOVEQ.L #0x01,D7
000210a8 7c 00 || | MOVEQ.L #0x00,D6
000210aa 7a 00 |z | MOVEQ.L #0x00,D5
000210ac 70 00 |p | MOVEQ.L #0x00,D0
000210ae 0c 80 00 00 00 1f | | CMPI.L #0x0000001f,D0
000210b4 63 02 |c | BLS 0x210b8
000210b6 4e 4f |NO | TRAP #15
000210b8 22 00 |" | MOVE.L D0,D1
000210ba e9 81 | | ASL.L #0x4,D1
000210bc 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
000210c2 14 06 | | MOVE.B D6,D2
000210c4 84 30 18 2b | 0 + | OR.B (A0+D1.L+#0x2b),D2
000210c8 48 82 |H | EXTB.W D2
000210ca 45 bc 00 01 |E | CHK.W #0x1,D2
000210ce 1c 02 | | MOVE.B D2,D6
000210d0 14 05 | | MOVE.B D5,D2
000210d2 84 30 18 2a | 0 * | OR.B (A0+D1.L+#0x2a),D2
000210d6 48 82 |H | EXTB.W D2
000210d8 45 bc 00 01 |E | CHK.W #0x1,D2
000210dc 1a 02 | | MOVE.B D2,D5
000210de 52 80 |R | ADDQ.L #0x1,D0
000210e0 0c 80 00 00 00 1f | | CMPI.L #0x0000001f,D0
000210e6 6f c6 |o | BLE 0x210ae
000210e8 4a 05 |J | TST.B D5
000210ea 66 06 |f | BNE 0x210f2
000210ec 4a 06 |J | TST.B D6
000210ee 66 00 fd 64 |f d | BNE 0x20e54
000210f2 30 2e 00 10 |0. | MOVE.W (A6+0x10),D0
000210f6 41 bc 00 1f |A | CHK.W #0x1f,D0
000210fa 42 81 |B | CLR.L D1
000210fc 32 00 |2 | MOVE.W D0,D1
000210fe e9 81 | | ASL.L #0x4,D1
00021100 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00021106 4a 30 18 2a |J0 * | TST.B (A0+D1.L+#0x2a)
0002110a 67 1e |g | BEQ 0x2112a
0002110c 42 30 18 2a |B0 * | CLR.B (A0+D1.L+#0x2a)
00021110 22 6e 00 0c |"n | MOVEA.L (A6+0xc),A1
00021114 12 bc 00 01 | | MOVE.B #0x01,(A1)
00021118 22 6e 00 08 |"n | MOVEA.L (A6+0x8),A1
0002111c 10 30 18 2c | 0 , | MOVE.B (A0+D1.L+#0x2c),D0
00021120 48 80 |H | EXTB.W D0
00021122 41 bc 00 01 |A | CHK.W #0x1,D0
00021126 12 80 | | MOVE.B D0,(A1)
00021128 60 0c |` | BRA 0x21136
0002112a 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0
0002112e 42 10 |B | CLR.B (A0)
00021130 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0
00021134 42 10 |B | CLR.B (A0)
00021136 60 1a |` | BRA 0x21152
00021138 3f 2e 00 10 |?. | MOVE.W (A6+0x10),-(A7)
0002113c 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0
00021140 48 50 |HP | PEA.L (A0)
00021142 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0
00021146 48 50 |HP | PEA.L (A0)
00021148 4e b9 00 01 02 08 |N | JSR KERNCALL_04
0002114e de fc 00 0a | | ADDA.W #0xa,A7
00021152 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00021156 4e 5e |N^ | UNLK A6
00021158 4e 75 |Nu | RTS
0002115a ; --------------------------------------------------------------------------------------
0002115a ; OMSI PASCAL Function
0002115a ; <LVAR 0x00c 2(r)>
0002115a ; <LVAR 0x008 4(r)>
0002115a ; <LVAR -0x002 @ 1(r)>
0002115a ; --------------------------------------------------------------------------------------
0002115a 4e 56 ff ec |NV | LINK.W A6,#0xffec
0002115e bf d5 | | CMPA.L (A5),A7
00021160 62 06 |b | BHI 0x21168
00021162 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021166 4e 76 |Nv | TRAPV
00021168 de fc 00 12 | | ADDA.W #0x12,A7
0002116c 48 e7 00 80 |H | MOVEM.L A0,-(A7)
00021170 4a 39 00 02 57 a2 |J9 W | TST.B 0x257a2
00021176 67 1e |g | BEQ 0x21196
00021178 3f 2e 00 0c |?. | MOVE.W (A6+0xc),-(A7)
0002117c 48 6e ff fe |Hn | PEA.L (A6-0x2)
00021180 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0
00021184 48 50 |HP | PEA.L (A0)
00021186 4e ba fc a0 |N | JSR 0x20e28
0002118a de fc 00 0a | | ADDA.W #0xa,A7
0002118e 4a 2e ff fe |J. | TST.B (A6-0x2)
00021192 67 e4 |g | BEQ 0x21178
00021194 60 12 |` | BRA 0x211a8
00021196 3f 2e 00 0c |?. | MOVE.W (A6+0xc),-(A7)
0002119a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0
0002119e 48 50 |HP | PEA.L (A0)
000211a0 4e b9 00 01 02 06 |N | JSR KC03_Wait_Disk_IO(a : W; VAR status : Byte)
000211a6 5c 4f |\O | ADDQ.L #0x6,A7
000211a8 4c df 01 00 |L | MOVEM.L (A7)+,A0
000211ac 4e 5e |N^ | UNLK A6
000211ae 4e 75 |Nu | RTS
000211b0 ; --------------------------------------------------------------------------------------
000211b0 ; OMSI PASCAL Function
000211b0 ; <LVAR 0x00a 4(w)>
000211b0 ; <LVAR 0x008 2(r)>
000211b0 ; <LVAR -0x014 1(r)>
000211b0 ; <LVAR -0x015 1(r)>
000211b0 ; <LVAR -0x016 @>
000211b0 ; --------------------------------------------------------------------------------------
000211b0 4e 56 ff b0 |NV | LINK.W A6,#0xffb0
000211b4 bf d5 | | CMPA.L (A5),A7
000211b6 62 06 |b | BHI 0x211be
000211b8 44 fc 00 02 |D | MOVE.W #0x2,CCR
000211bc 4e 76 |Nv | TRAPV
000211be de fc 00 3a | : | ADDA.W #0x3a,A7
000211c2 48 e7 f9 c0 |H | MOVEM.L A1+A0+D7+D4+D3+D2+D1+D0,-(A7)
000211c6 42 80 |B | CLR.L D0
000211c8 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0
000211cc 2e 00 |. | MOVE.L D0,D7
000211ce e7 87 | | ASL.L #0x3,D7
000211d0 41 bc 00 1f |A | CHK.W #0x1f,D0
000211d4 48 c0 |H | EXTW.L D0
000211d6 e9 80 | | ASL.L #0x4,D0
000211d8 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
000211de 42 81 |B | CLR.L D1
000211e0 32 30 08 2e |20 . | MOVE.W (A0+D0.L+#0x2e),D1
000211e4 de 81 | | ADD.L D1,D7
000211e6 53 87 |S | SUBQ.L #0x1,D7
000211e8 28 07 |( | MOVE.L D7,D4
000211ea 42 83 |B | CLR.L D3
000211ec 36 39 00 02 57 ae |69 W | MOVE.W 0x257ae,D3
000211f2 4e b9 00 01 02 90 |N | JSR ?mulu_d3_d4
000211f8 22 04 |" | MOVE.L D4,D1
000211fa d2 b9 00 02 57 b0 | W | ADD.L 0x257b0,D1
00021200 2f 01 |/ | MOVE.L D1,-(A7)
00021202 43 ee ff ea |C | LEA.L (A6-0x16),A1
00021206 2f 09 |/ | MOVE.L A1,-(A7)
00021208 3f 3c 00 10 |?< | MOVE.W #0x10,-(A7)
0002120c 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
00021212 de fc 00 0a | | ADDA.W #0xa,A7
00021216 42 81 |B | CLR.L D1
00021218 12 2e ff eb | . | MOVE.B (A6-0x15),D1
0002121c e7 41 | A | ASL.W #0x3,D1
0002121e 42 82 |B | CLR.L D2
00021220 14 2e ff ec | . | MOVE.B (A6-0x14),D2
00021224 44 42 |DB | NEG.W D2
00021226 d4 41 | A | ADD.W D1,D2
00021228 42 81 |B | CLR.L D1
0002122a 32 30 08 2e |20 . | MOVE.W (A0+D0.L+#0x2e),D1
0002122e 53 81 |S | SUBQ.L #0x1,D1
00021230 e1 81 | | ASL.L #0x8,D1
00021232 e5 81 | | ASL.L #0x2,D1
00021234 48 c2 |H | EXTW.L D2
00021236 d2 82 | | ADD.L D2,D1
00021238 2d 41 00 0a |-A | MOVE.L D1,(A6+0xa)
0002123c 4c df 03 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1
00021240 4e 5e |N^ | UNLK A6
00021242 4e 75 |Nu | RTS
00021244 ; --------------------------------------------------------------------------------------
00021244 ; OMSI PASCAL Function
00021244 ; <LVAR 0x016 4(r)>
00021244 ; <LVAR 0x012 4(r)>
00021244 ; <LVAR 0x010 2(r)>
00021244 ; <LVAR 0x00c 4(r)>
00021244 ; <LVAR 0x008 4(r)>
00021244 ; <LVAR -0x004 4(w)>
00021244 ; <LVAR -0x007 1(w)>
00021244 ; <LVAR -0x008 1(w) 4(w)>
00021244 ; <LVAR -0x00a 1(w)>
00021244 ; <LVAR -0x00c 4(w)>
00021244 ; <LVAR -0x00d 1(w)>
00021244 ; <LVAR -0x00e 1(w)>
00021244 ; <LVAR -0x00f 1(w)>
00021244 ; <LVAR -0x010 @ 1(w) 4(w)>
00021244 ; --------------------------------------------------------------------------------------
00021244 4e 56 ff 80 |NV | LINK.W A6,#0xff80
00021248 bf d5 | | CMPA.L (A5),A7
0002124a 62 06 |b | BHI 0x21252
0002124c 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021250 4e 76 |Nv | TRAPV
00021252 de fc 00 6e | n | ADDA.W #0x6e,A7
00021256 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
0002125a 47 ee 00 0c |G | LEA.L (A6+0xc),A3
0002125e 49 ee 00 10 |I | LEA.L (A6+0x10),A4
00021262 74 01 |t | MOVEQ.L #0x01,D2
00021264 7a 0a |z | MOVEQ.L #0x0a,D5
00021266 2c 3c 00 00 00 ff |,< | MOVE.L #0xff,D6
0002126c 4a 39 00 02 57 a2 |J9 W | TST.B 0x257a2
00021272 67 00 01 4c |g L | BEQ 0x213c0
00021276 30 14 |0 | MOVE.W (A4),D0
00021278 41 bc 00 1f |A | CHK.W #0x1f,D0
0002127c 42 81 |B | CLR.L D1
0002127e 32 00 |2 | MOVE.W D0,D1
00021280 e9 81 | | ASL.L #0x4,D1
00021282 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00021288 42 80 |B | CLR.L D0
0002128a 30 14 |0 | MOVE.W (A4),D0
0002128c e7 80 | | ASL.L #0x3,D0
0002128e b0 86 | | CMP.L D6,D0
00021290 63 02 |c | BLS 0x21294
00021292 4e 4f |NO | TRAP #15
00021294 3e 00 |> | MOVE.W D0,D7
00021296 4a 30 18 2b |J0 + | TST.B (A0+D1.L+#0x2b)
0002129a 66 06 |f | BNE 0x212a2
0002129c 4a 30 18 2a |J0 * | TST.B (A0+D1.L+#0x2a)
000212a0 67 2e |g. | BEQ 0x212d0
000212a2 9e fc 00 22 | " | SUBA.W #0x22,A7
000212a6 22 4f |"O | MOVEA.L A7,A1
000212a8 45 fa ef 48 |E H | LEA.L 0x201f2,A2
000212ac 70 20 |p | MOVEQ.L #0x20,D0
000212ae 12 da | | MOVE.B (A2)+,(A1)+
000212b0 51 c8 ff fc |Q | DBF D0,0x212ae
000212b4 59 4f |YO | SUBQ.L #0x4,A7
000212b6 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000212ba 3f 02 |? | MOVE.W D2,-(A7)
000212bc 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7)
000212c0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
000212c6 50 4f |PO | ADDQ.L #0x8,A7
000212c8 4e ba f9 78 |N x | JSR 0x20c42
000212cc de fc 00 26 | & | ADDA.W #0x26,A7
000212d0 11 82 18 2b | + | MOVE.B D2,(A0+D1.L+#0x2b)
000212d4 42 70 18 2e |Bp . | CLR.W (A0+D1.L+#0x2e)
000212d8 31 82 18 30 |1 0 | MOVE.W D2,(A0+D1.L+#0x30)
000212dc 21 ae 00 12 18 32 |! 2 | MOVE.L (A6+0x12),(A0+D1.L+#0x32)
000212e2 21 ae 00 08 18 36 |! 6 | MOVE.L (A6+0x8),(A0+D1.L+#0x36)
000212e8 4a 93 |J | TST.L (A3)
000212ea 67 2a |g* | BEQ 0x21316
000212ec 30 39 00 02 57 ac |09 W | MOVE.W 0x257ac,D0
000212f2 c0 c7 | | MULU.W D7,D0
000212f4 2f 2e 00 12 |/. | MOVE.L (A6+0x12),-(A7)
000212f8 d0 b9 00 02 57 b4 | W | ADD.L 0x257b4,D0
000212fe 2f 00 |/ | MOVE.L D0,-(A7)
00021300 20 13 | | MOVE.L (A3),D0
00021302 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0
00021308 63 02 |c | BLS 0x2130c
0002130a 4e 4f |NO | TRAP #15
0002130c 3f 00 |? | MOVE.W D0,-(A7)
0002130e 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
00021314 de c5 | | ADDA.W D5,A7
00021316 20 6e 00 16 | n | MOVEA.L (A6+0x16),A0
0002131a 9e fc 00 10 | | SUBA.W #0x10,A7
0002131e 22 4f |"O | MOVEA.L A7,A1
00021320 70 0f |p | MOVEQ.L #0x0f,D0
00021322 12 d8 | | MOVE.B (A0)+,(A1)+
00021324 51 c8 ff fc |Q | DBF D0,0x21322
00021328 2d 5f ff f0 |-_ | MOVE.L (A7)+,(A6-0x10)
0002132c 2d 5f ff f4 |-_ | MOVE.L (A7)+,(A6-0xc)
00021330 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8)
00021334 2d 5f ff fc |-_ | MOVE.L (A7)+,(A6-0x4)
00021338 1d 7c 00 40 ff f0 | | @ | MOVE.B #0x40,(A6-0x10)
0002133e 20 13 | | MOVE.L (A3),D0
00021340 5e 80 |^ | ADDQ.L #0x7,D0
00021342 28 00 |( | MOVE.L D0,D4
00021344 76 08 |v | MOVEQ.L #0x08,D3
00021346 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4
0002134c 0c 84 00 00 00 80 | | CMPI.L #0x00000080,D4
00021352 63 02 |c | BLS 0x21356
00021354 4e 4f |NO | TRAP #15
00021356 1d 44 ff f1 | D | MOVE.B D4,(A6-0xf)
0002135a 42 80 |B | CLR.L D0
0002135c 10 04 | | MOVE.B D4,D0
0002135e e7 40 | @ | ASL.W #0x3,D0
00021360 48 c0 |H | EXTW.L D0
00021362 90 93 | | SUB.L (A3),D0
00021364 b0 86 | | CMP.L D6,D0
00021366 63 02 |c | BLS 0x2136a
00021368 4e 4f |NO | TRAP #15
0002136a 1d 40 ff f2 | @ | MOVE.B D0,(A6-0xe)
0002136e 4f 86 |O | CHK.W D6,D7
00021370 1d 47 ff f3 | G | MOVE.B D7,(A6-0xd)
00021374 1d 7c 00 0f ff f6 | | | MOVE.B #0x0f,(A6-0xa)
0002137a 1d 47 ff f8 | G | MOVE.B D7,(A6-0x8)
0002137e 00 2e 00 80 ff f9 | . | ORI.B #0x80,(A6-0x7)
00021384 02 2e 00 fe ff f9 | . | ANDI.B #0xfe,(A6-0x7)
0002138a 30 39 00 02 57 ae |09 W | MOVE.W 0x257ae,D0
00021390 c0 c7 | | MULU.W D7,D0
00021392 41 ee ff f0 |A | LEA.L (A6-0x10),A0
00021396 2f 08 |/ | MOVE.L A0,-(A7)
00021398 d0 b9 00 02 57 b0 | W | ADD.L 0x257b0,D0
0002139e 2f 00 |/ | MOVE.L D0,-(A7)
000213a0 3f 3c 00 10 |?< | MOVE.W #0x10,-(A7)
000213a4 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
000213aa de c5 | | ADDA.W D5,A7
000213ac 0c 47 ff ff | G | CMPI.W #0xffff,D7
000213b0 63 02 |c | BLS 0x213b4
000213b2 4e 4f |NO | TRAP #15
000213b4 3f 07 |? | MOVE.W D7,-(A7)
000213b6 4e b9 00 01 02 30 |N 0 | JSR KERNCALL_18
000213bc 54 4f |TO | ADDQ.L #0x2,A7
000213be 60 14 |` | BRA 0x213d4
000213c0 20 6e 00 16 | n | MOVEA.L (A6+0x16),A0
000213c4 48 50 |HP | PEA.L (A0)
000213c6 2f 2e 00 12 |/. | MOVE.L (A6+0x12),-(A7)
000213ca 3f 14 |? | MOVE.W (A4),-(A7)
000213cc 4e b9 00 01 02 04 |N | JSR KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
000213d2 de c5 | | ADDA.W D5,A7
000213d4 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
000213d8 4e 5e |N^ | UNLK A6
000213da 4e 75 |Nu | RTS
000213dc ; --------------------------------------------------------------------------------------
000213dc ; OMSI PASCAL Function
000213dc ; <LVAR 0x016 4(r)>
000213dc ; <LVAR 0x012 4(r)>
000213dc ; <LVAR 0x010 2(r)>
000213dc ; <LVAR 0x00c 4(rw)>
000213dc ; <LVAR 0x008 4(r)>
000213dc ; <LVAR -0x016 @ 2(w)>
000213dc ; <LVAR -0x01a 4(w)>
000213dc ; <LVAR -0x01d 1(w)>
000213dc ; <LVAR -0x01e 1(w) 4(w)>
000213dc ; <LVAR -0x020 1(w)>
000213dc ; <LVAR -0x022 4(w)>
000213dc ; <LVAR -0x023 1(w)>
000213dc ; <LVAR -0x024 1(rw)>
000213dc ; <LVAR -0x025 1(rw)>
000213dc ; <LVAR -0x026 @ 1(w) 4(w)>
000213dc ; --------------------------------------------------------------------------------------
000213dc 4e 56 ff 64 |NV d | LINK.W A6,#0xff64
000213e0 bf d5 | | CMPA.L (A5),A7
000213e2 62 06 |b | BHI 0x213ea
000213e4 44 fc 00 02 |D | MOVE.W #0x2,CCR
000213e8 4e 76 |Nv | TRAPV
000213ea de fc 00 6e | n | ADDA.W #0x6e,A7
000213ee 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
000213f2 47 ee ff da |G | LEA.L (A6-0x26),A3
000213f6 49 ee ff e3 |I | LEA.L (A6-0x1d),A4
000213fa 24 3c 00 00 00 ff |$< | MOVE.L #0xff,D2
00021400 4a 39 00 02 57 a2 |J9 W | TST.B 0x257a2
00021406 67 00 02 70 |g p | BEQ 0x21678
0002140a 30 2e 00 10 |0. | MOVE.W (A6+0x10),D0
0002140e 41 bc 00 1f |A | CHK.W #0x1f,D0
00021412 42 81 |B | CLR.L D1
00021414 32 00 |2 | MOVE.W D0,D1
00021416 e9 81 | | ASL.L #0x4,D1
00021418 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
0002141e 42 80 |B | CLR.L D0
00021420 30 2e 00 10 |0. | MOVE.W (A6+0x10),D0
00021424 e7 80 | | ASL.L #0x3,D0
00021426 b0 82 | | CMP.L D2,D0
00021428 63 02 |c | BLS 0x2142c
0002142a 4e 4f |NO | TRAP #15
0002142c 3a 00 |: | MOVE.W D0,D5
0002142e 4a 30 18 2b |J0 + | TST.B (A0+D1.L+#0x2b)
00021432 66 06 |f | BNE 0x2143a
00021434 4a 30 18 2a |J0 * | TST.B (A0+D1.L+#0x2a)
00021438 67 30 |g0 | BEQ 0x2146a
0002143a 9e fc 00 22 | " | SUBA.W #0x22,A7
0002143e 22 4f |"O | MOVEA.L A7,A1
00021440 45 fa ed d2 |E | LEA.L 0x20214,A2
00021444 70 20 |p | MOVEQ.L #0x20,D0
00021446 12 da | | MOVE.B (A2)+,(A1)+
00021448 51 c8 ff fc |Q | DBF D0,0x21446
0002144c 59 4f |YO | SUBQ.L #0x4,A7
0002144e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021452 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00021456 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7)
0002145a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021460 50 4f |PO | ADDQ.L #0x8,A7
00021462 4e ba f7 de |N | JSR 0x20c42
00021466 de fc 00 26 | & | ADDA.W #0x26,A7
0002146a 11 bc 00 01 18 2b | + | MOVE.B #0x01,(A0+D1.L+#0x2b)
00021470 42 70 18 2e |Bp . | CLR.W (A0+D1.L+#0x2e)
00021474 20 2e 00 08 | . | MOVE.L (A6+0x8),D0
00021478 06 80 00 00 03 ff | | ADDI.L #0x000003ff,D0
0002147e 28 00 |( | MOVE.L D0,D4
00021480 26 3c 00 00 04 00 |&< | MOVE.L #0x400,D3
00021486 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4
0002148c 0c 84 00 00 ff ff | | CMPI.L #0x0000ffff,D4
00021492 63 02 |c | BLS 0x21496
00021494 4e 4f |NO | TRAP #15
00021496 31 84 18 30 |1 0 | MOVE.W D4,(A0+D1.L+#0x30)
0002149a 4a 44 |JD | TST.W D4
0002149c 66 06 |f | BNE 0x214a4
0002149e 31 bc 00 01 18 30 |1 0 | MOVE.W #0x1,(A0+D1.L+#0x30)
000214a4 42 b0 18 32 |B 2 | CLR.L (A0+D1.L+#0x32)
000214a8 42 b0 18 36 |B 6 | CLR.L (A0+D1.L+#0x36)
000214ac 20 6e 00 16 | n | MOVEA.L (A6+0x16),A0
000214b0 9e fc 00 10 | | SUBA.W #0x10,A7
000214b4 22 4f |"O | MOVEA.L A7,A1
000214b6 70 0f |p | MOVEQ.L #0x0f,D0
000214b8 12 d8 | | MOVE.B (A0)+,(A1)+
000214ba 51 c8 ff fc |Q | DBF D0,0x214b8
000214be 26 9f |& | MOVE.L (A7)+,(A3)
000214c0 2d 5f ff de |-_ | MOVE.L (A7)+,(A6-0x22)
000214c4 2d 5f ff e2 |-_ | MOVE.L (A7)+,(A6-0x1e)
000214c8 2d 5f ff e6 |-_ | MOVE.L (A7)+,(A6-0x1a)
000214cc 4a ae 00 0c |J | TST.L (A6+0xc)
000214d0 66 00 00 ec |f | BNE 0x215be
000214d4 20 2e 00 08 | . | MOVE.L (A6+0x8),D0
000214d8 0c 80 00 00 04 00 | | CMPI.L #0x00000400,D0
000214de 6f 00 00 de |o | BLE 0x215be
000214e2 20 2e 00 08 | . | MOVE.L (A6+0x8),D0
000214e6 53 80 |S | SUBQ.L #0x1,D0
000214e8 28 00 |( | MOVE.L D0,D4
000214ea 26 3c 00 00 04 00 |&< | MOVE.L #0x400,D3
000214f0 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4
000214f6 0c 84 00 00 ff ff | | CMPI.L #0x0000ffff,D4
000214fc 63 02 |c | BLS 0x21500
000214fe 4e 4f |NO | TRAP #15
00021500 3d 44 ff ea |=D | MOVE.W D4,(A6-0x16)
00021504 42 80 |B | CLR.L D0
00021506 30 04 |0 | MOVE.W D4,D0
00021508 2f 00 |/ | MOVE.L D0,-(A7)
0002150a 7c 00 || | MOVEQ.L #0x00,D6
0002150c bc 97 | | CMP.L (A7),D6
0002150e 6e 2c |n, | BGT 0x2153c
00021510 0c 86 00 00 00 08 | | CMPI.L #0x00000008,D6
00021516 63 02 |c | BLS 0x2151a
00021518 4e 4f |NO | TRAP #15
0002151a 20 06 | | MOVE.L D6,D0
0002151c e3 80 | | ASL.L #0x1,D0
0002151e 32 05 |2 | MOVE.W D5,D1
00021520 48 c1 |H | EXTW.L D1
00021522 d2 86 | | ADD.L D6,D1
00021524 b2 82 | | CMP.L D2,D1
00021526 63 02 |c | BLS 0x2152a
00021528 4e 4f |NO | TRAP #15
0002152a 1d 81 08 ec | | MOVE.B D1,(A6+D0.L-#0x14)
0002152e bc 82 | | CMP.L D2,D6
00021530 63 02 |c | BLS 0x21534
00021532 4e 4f |NO | TRAP #15
00021534 1d 86 08 ed | | MOVE.B D6,(A6+D0.L-#0x13)
00021538 52 86 |R | ADDQ.L #0x1,D6
0002153a 68 d0 |h | BVC 0x2150c
0002153c 58 4f |XO | ADDQ.L #0x4,A7
0002153e 30 39 00 02 57 ac |09 W | MOVE.W 0x257ac,D0
00021544 c0 c5 | | MULU.W D5,D0
00021546 41 ee ff ea |A | LEA.L (A6-0x16),A0
0002154a 2f 08 |/ | MOVE.L A0,-(A7)
0002154c d0 b9 00 02 57 b4 | W | ADD.L 0x257b4,D0
00021552 2f 00 |/ | MOVE.L D0,-(A7)
00021554 3f 3c 00 14 |?< | MOVE.W #0x14,-(A7)
00021558 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
0002155e de fc 00 0a | | ADDA.W #0xa,A7
00021562 16 bc 00 40 | @ | MOVE.B #0x40,(A3)
00021566 42 2e ff db |B. | CLR.B (A6-0x25)
0002156a 42 2e ff dc |B. | CLR.B (A6-0x24)
0002156e 4b 82 |K | CHK.W D2,D5
00021570 1d 45 ff dd | E | MOVE.B D5,(A6-0x23)
00021574 1d 7c 00 0f ff e0 | | | MOVE.B #0x0f,(A6-0x20)
0002157a 1d 45 ff e2 | E | MOVE.B D5,(A6-0x1e)
0002157e 00 14 00 80 | | ORI.B #0x80,(A4)
00021582 00 14 00 01 | | ORI.B #0x01,(A4)
00021586 30 39 00 02 57 ae |09 W | MOVE.W 0x257ae,D0
0002158c c0 c5 | | MULU.W D5,D0
0002158e 20 4b | K | MOVEA.L A3,A0
00021590 2f 08 |/ | MOVE.L A0,-(A7)
00021592 d0 b9 00 02 57 b0 | W | ADD.L 0x257b0,D0
00021598 2f 00 |/ | MOVE.L D0,-(A7)
0002159a 3f 3c 00 10 |?< | MOVE.W #0x10,-(A7)
0002159e 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
000215a4 de fc 00 0a | | ADDA.W #0xa,A7
000215a8 0c 45 ff ff | E | CMPI.W #0xffff,D5
000215ac 63 02 |c | BLS 0x215b0
000215ae 4e 4f |NO | TRAP #15
000215b0 3f 05 |? | MOVE.W D5,-(A7)
000215b2 4e b9 00 01 02 30 |N 0 | JSR KERNCALL_18
000215b8 54 4f |TO | ADDQ.L #0x2,A7
000215ba 60 00 00 ba |` | BRA 0x21676
000215be 4b 82 |K | CHK.W D2,D5
000215c0 3e 05 |> | MOVE.W D5,D7
000215c2 16 bc 00 40 | @ | MOVE.B #0x40,(A3)
000215c6 4f 82 |O | CHK.W D2,D7
000215c8 1d 47 ff dd | G | MOVE.B D7,(A6-0x23)
000215cc 1d 7c 00 0f ff e0 | | | MOVE.B #0x0f,(A6-0x20)
000215d2 4b 82 |K | CHK.W D2,D5
000215d4 1d 45 ff e2 | E | MOVE.B D5,(A6-0x1e)
000215d8 02 14 00 fe | | ANDI.B #0xfe,(A4)
000215dc 20 2e 00 0c | . | MOVE.L (A6+0xc),D0
000215e0 0c 80 00 00 04 00 | | CMPI.L #0x00000400,D0
000215e6 6e 38 |n8 | BGT 0x21620
000215e8 22 00 |" | MOVE.L D0,D1
000215ea 5e 81 |^ | ADDQ.L #0x7,D1
000215ec 28 01 |( | MOVE.L D1,D4
000215ee 76 08 |v | MOVEQ.L #0x08,D3
000215f0 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4
000215f6 0c 84 00 00 00 80 | | CMPI.L #0x00000080,D4
000215fc 63 02 |c | BLS 0x21600
000215fe 4e 4f |NO | TRAP #15
00021600 1d 44 ff db | D | MOVE.B D4,(A6-0x25)
00021604 42 81 |B | CLR.L D1
00021606 12 04 | | MOVE.B D4,D1
00021608 e7 41 | A | ASL.W #0x3,D1
0002160a 48 c1 |H | EXTW.L D1
0002160c 44 80 |D | NEG.L D0
0002160e d0 81 | | ADD.L D1,D0
00021610 b0 82 | | CMP.L D2,D0
00021612 63 02 |c | BLS 0x21616
00021614 4e 4f |NO | TRAP #15
00021616 1d 40 ff dc | @ | MOVE.B D0,(A6-0x24)
0002161a 00 14 00 80 | | ORI.B #0x80,(A4)
0002161e 60 0e |` | BRA 0x2162e
00021620 1d 7c 00 80 ff db | | | MOVE.B #0x80,(A6-0x25)
00021626 42 2e ff dc |B. | CLR.B (A6-0x24)
0002162a 02 14 00 7f | | ANDI.B #0x7f,(A4)
0002162e 30 39 00 02 57 ae |09 W | MOVE.W 0x257ae,D0
00021634 c0 c7 | | MULU.W D7,D0
00021636 20 4b | K | MOVEA.L A3,A0
00021638 2f 08 |/ | MOVE.L A0,-(A7)
0002163a d0 b9 00 02 57 b0 | W | ADD.L 0x257b0,D0
00021640 2f 00 |/ | MOVE.L D0,-(A7)
00021642 3f 3c 00 10 |?< | MOVE.W #0x10,-(A7)
00021646 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
0002164c de fc 00 0a | | ADDA.W #0xa,A7
00021650 0c 47 ff ff | G | CMPI.W #0xffff,D7
00021654 63 02 |c | BLS 0x21658
00021656 4e 4f |NO | TRAP #15
00021658 3f 07 |? | MOVE.W D7,-(A7)
0002165a 4e b9 00 01 02 30 |N 0 | JSR KERNCALL_18
00021660 54 4f |TO | ADDQ.L #0x2,A7
00021662 30 07 |0 | MOVE.W D7,D0
00021664 52 40 |R@ | ADDQ.W #0x1,D0
00021666 41 82 |A | CHK.W D2,D0
00021668 3e 00 |> | MOVE.W D0,D7
0002166a 04 ae 00 00 04 00 00 0c | | SUBI.L #0x00000400,(A6+0xc)
00021672 6e 00 ff 4e |n N | BGT 0x215c2
00021676 60 18 |` | BRA 0x21690
00021678 20 6e 00 16 | n | MOVEA.L (A6+0x16),A0
0002167c 48 50 |HP | PEA.L (A0)
0002167e 2f 2e 00 12 |/. | MOVE.L (A6+0x12),-(A7)
00021682 3f 2e 00 10 |?. | MOVE.W (A6+0x10),-(A7)
00021686 4e b9 00 01 02 04 |N | JSR KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
0002168c de fc 00 0a | | ADDA.W #0xa,A7
00021690 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00021694 4e 5e |N^ | UNLK A6
00021696 4e 75 |Nu | RTS
00021698 ; --------------------------------------------------------------------------------------
00021698 ; OMSI PASCAL Function
00021698 ; <LVAR 0x00a 1(rw)>
00021698 ; <LVAR 0x008 2(r)>
00021698 ; <LVAR -0x008 2(r)>
00021698 ; <LVAR -0x010 2(r)>
00021698 ; <LVAR -0x014 @ 2(r)>
00021698 ; <LVAR -0x016 @>
00021698 ; <LVAR -0x018 2(r)>
00021698 ; <LVAR -0x01a 2(r)>
00021698 ; <LVAR -0x01c 2(w)>
00021698 ; <LVAR -0x01e 2(w)>
00021698 ; <LVAR -0x020 2(r)>
00021698 ; <LVAR -0x022 2(w)>
00021698 ; <LVAR -0x024 2(r)>
00021698 ; <LVAR -0x026 @ 2(r)>
00021698 ; --------------------------------------------------------------------------------------
00021698 4e 56 ff b4 |NV | LINK.W A6,#0xffb4
0002169c bf d5 | | CMPA.L (A5),A7
0002169e 62 06 |b | BHI 0x216a6
000216a0 44 fc 00 02 |D | MOVE.W #0x2,CCR
000216a4 4e 76 |Nv | TRAPV
000216a6 de fc 00 26 | & | ADDA.W #0x26,A7
000216aa 48 e7 e0 80 |H | MOVEM.L A0+D2+D1+D0,-(A7)
000216ae 72 1c |r | MOVEQ.L #0x1c,D1
000216b0 74 01 |t | MOVEQ.L #0x01,D2
000216b2 42 6e ff da |Bn | CLR.W (A6-0x26)
000216b6 42 6e ff dc |Bn | CLR.W (A6-0x24)
000216ba 3d 7c 00 03 ff de |=| | MOVE.W #0x3,(A6-0x22)
000216c0 42 6e ff e0 |Bn | CLR.W (A6-0x20)
000216c4 3d 7c 00 04 ff e2 |=| | MOVE.W #0x4,(A6-0x1e)
000216ca 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0
000216ce e1 40 | @ | ASL.W #0x8,D0
000216d0 3d 40 ff e4 |=@ | MOVE.W D0,(A6-0x1c)
000216d4 42 6e ff e6 |Bn | CLR.W (A6-0x1a)
000216d8 42 6e ff e8 |Bn | CLR.W (A6-0x18)
000216dc 48 6e ff da |Hn | PEA.L (A6-0x26)
000216e0 41 ee ff ec |A | LEA.L (A6-0x14),A0
000216e4 2f 08 |/ | MOVE.L A0,-(A7)
000216e6 3f 01 |? | MOVE.W D1,-(A7)
000216e8 48 78 00 00 |Hx | PEA.L 0x0
000216ec 48 78 00 14 |Hx | PEA.L 0x14
000216f0 4e ba fb 52 |N R | JSR 0x21244
000216f4 de fc 00 10 | | ADDA.W #0x10,A7
000216f8 3e 81 |> | MOVE.W D1,(A7)
000216fa 48 6e ff ea |Hn | PEA.L (A6-0x16)
000216fe 4e ba fa 5a |N Z | JSR 0x2115a
00021702 5c 4f |\O | ADDQ.L #0x6,A7
00021704 42 2e 00 0a |B. | CLR.B (A6+0xa)
00021708 30 2e ff ec |0. | MOVE.W (A6-0x14),D0
0002170c c0 42 | B | AND.W D2,D0
0002170e b0 42 | B | CMP.W D2,D0
00021710 66 18 |f | BNE 0x2172a
00021712 30 2e ff f0 |0. | MOVE.W (A6-0x10),D0
00021716 02 40 00 40 | @ @ | ANDI.W #0x0040,D0
0002171a 66 0e |f | BNE 0x2172a
0002171c 30 2e ff f8 |0. | MOVE.W (A6-0x8),D0
00021720 02 40 08 00 | @ | ANDI.W #0x0800,D0
00021724 66 04 |f | BNE 0x2172a
00021726 52 2e 00 0a |R. | ADDQ.B #0x1,(A6+0xa)
0002172a 4c df 01 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0
0002172e 4e 5e |N^ | UNLK A6
00021730 4e 75 |Nu | RTS
00021732 ; --------------------------------------------------------------------------------------
00021732 ; OMSI PASCAL Function
00021732 ; <LVAR 0x008 2(r)>
00021732 ; --------------------------------------------------------------------------------------
00021732 4e 56 ff de |NV | LINK.W A6,#0xffde
00021736 bf d5 | | CMPA.L (A5),A7
00021738 62 06 |b | BHI 0x21740
0002173a 44 fc 00 02 |D | MOVE.W #0x2,CCR
0002173e 4e 76 |Nv | TRAPV
00021740 de fc 00 1c | | ADDA.W #0x1c,A7
00021744 48 e7 81 c0 |H | MOVEM.L A1+A0+D7+D0,-(A7)
00021748 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
0002174c c1 ee 00 08 | | MULS.W (A6+0x8),D0
00021750 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00021756 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
0002175a 42 a8 02 30 |B 0 | CLR.L (A0+0x230)
0002175e 42 a8 02 34 |B 4 | CLR.L (A0+0x234)
00021762 42 a8 02 38 |B 8 | CLR.L (A0+0x238)
00021766 42 a8 02 44 |B D | CLR.L (A0+0x244)
0002176a 42 28 02 2b |B( + | CLR.B (A0+0x22b)
0002176e 42 28 02 2d |B( - | CLR.B (A0+0x22d)
00021772 11 7c 00 01 02 2e | | . | MOVE.B #0x01,(A0+0x22e)
00021778 21 7c 00 00 00 0a 02 4c |!| L| MOVE.L #0xa,(A0+0x24c)
00021780 42 a8 02 48 |B H | CLR.L (A0+0x248)
00021784 4a 39 00 02 57 a2 |J9 W | TST.B 0x257a2
0002178a 67 1c |g | BEQ 0x217a8
0002178c 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0
00021790 06 40 00 10 | @ | ADDI.W #0x0010,D0
00021794 e7 40 | @ | ASL.W #0x3,D0
00021796 c0 f9 00 02 57 ac | W | MULU.W 0x257ac,D0
0002179c d0 b9 00 02 57 b4 | W | ADD.L 0x257b4,D0
000217a2 2e 00 |. | MOVE.L D0,D7
000217a4 2f 07 |/ | MOVE.L D7,-(A7)
000217a6 60 06 |` | BRA 0x217ae
000217a8 43 e8 03 d4 |C | LEA.L (A0+0x3d4),A1
000217ac 2f 09 |/ | MOVE.L A1,-(A7)
000217ae 21 5f 03 d0 |!_ | MOVE.L (A7)+,(A0+0x3d0)
000217b2 4c df 03 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1
000217b6 4e 5e |N^ | UNLK A6
000217b8 4e 75 |Nu | RTS
000217ba ; --------------------------------------------------------------------------------------
000217ba ; OMSI PASCAL Function
000217ba ; <LVAR 0x008 2(r)>
000217ba ; <LVAR -0x006 2(w)>
000217ba ; <LVAR -0x008 2(w)>
000217ba ; <LVAR -0x00e 2(w)>
000217ba ; <LVAR -0x012 @>
000217ba ; --------------------------------------------------------------------------------------
000217ba 4e 56 ff a4 |NV | LINK.W A6,#0xffa4
000217be bf d5 | | CMPA.L (A5),A7
000217c0 62 06 |b | BHI 0x217c8
000217c2 44 fc 00 02 |D | MOVE.W #0x2,CCR
000217c6 4e 76 |Nv | TRAPV
000217c8 de fc 00 4a | J | ADDA.W #0x4a,A7
000217cc 48 e7 e0 f0 |H | MOVEM.L A3+A2+A1+A0+D2+D1+D0,-(A7)
000217d0 43 ee 00 08 |C | LEA.L (A6+0x8),A1
000217d4 45 f8 00 00 |E | LEA.L 0x0,A2
000217d8 47 ee ff ee |G | LEA.L (A6-0x12),A3
000217dc 74 10 |t | MOVEQ.L #0x10,D2
000217de 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
000217e2 c1 d1 | | MULS.W (A1),D0
000217e4 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
000217ea 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
000217ee 3d 7c 00 03 ff f2 |=| | MOVE.W #0x3,(A6-0xe)
000217f4 30 11 |0 | MOVE.W (A1),D0
000217f6 e1 40 | @ | ASL.W #0x8,D0
000217f8 12 28 23 d4 | (# | MOVE.B (A0+0x23d4),D1
000217fc 48 81 |H | EXTB.W D1
000217fe d0 41 | A | ADD.W D1,D0
00021800 0c 40 ff ff | @ | CMPI.W #0xffff,D0
00021804 63 02 |c | BLS 0x21808
00021806 4e 4f |NO | TRAP #15
00021808 3d 40 ff f8 |=@ | MOVE.W D0,(A6-0x8)
0002180c 20 28 23 d6 | (# | MOVE.L (A0+0x23d6),D0
00021810 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0
00021816 63 02 |c | BLS 0x2181a
00021818 4e 4f |NO | TRAP #15
0002181a 3d 40 ff fa |=@ | MOVE.W D0,(A6-0x6)
0002181e 55 41 |UA | SUBQ.W #0x2,D1
00021820 0c 41 00 19 | A | CMPI.W #0x0019,D1
00021824 62 00 00 a6 |b | BHI switch@0x2182a[0xe]
00021828 d2 41 | A | ADD.W D1,D1
0002182a 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W
00021832 00 4a | J | .CONST 0x4a ; [0x0] -> 0x2187c
00021834 00 4a | J | .CONST 0x4a ; [0x1] -> 0x2187c
00021836 00 74 | t | .CONST 0x74 ; [0x2] -> 0x218a6
00021838 00 74 | t | .CONST 0x74 ; [0x3] -> 0x218a6
0002183a 00 34 | 4 | .CONST 0x34 ; [0x4] -> 0x21866
0002183c 00 34 | 4 | .CONST 0x34 ; [0x5] -> 0x21866
0002183e 00 34 | 4 | .CONST 0x34 ; [0x6] -> 0x21866
00021840 00 34 | 4 | .CONST 0x34 ; [0x7] -> 0x21866
00021842 00 34 | 4 | .CONST 0x34 ; [0x8] -> 0x21866
00021844 00 34 | 4 | .CONST 0x34 ; [0x9] -> 0x21866
00021846 00 34 | 4 | .CONST 0x34 ; [0xa] -> 0x21866
00021848 00 34 | 4 | .CONST 0x34 ; [0xb] -> 0x21866
0002184a 00 34 | 4 | .CONST 0x34 ; [0xc] -> 0x21866
0002184c 00 34 | 4 | .CONST 0x34 ; [0xd] -> 0x21866
0002184e 00 9a | | .CONST 0x9a ; [0xe] -> 0x218cc
00021850 00 9a | | .CONST 0x9a ; [0xf] -> 0x218cc
00021852 00 34 | 4 | .CONST 0x34 ; [0x10] -> 0x21866
00021854 00 34 | 4 | .CONST 0x34 ; [0x11] -> 0x21866
00021856 00 34 | 4 | .CONST 0x34 ; [0x12] -> 0x21866
00021858 00 34 | 4 | .CONST 0x34 ; [0x13] -> 0x21866
0002185a 00 34 | 4 | .CONST 0x34 ; [0x14] -> 0x21866
0002185c 00 34 | 4 | .CONST 0x34 ; [0x15] -> 0x21866
0002185e 00 9a | | .CONST 0x9a ; [0x16] -> 0x218cc
00021860 00 9a | | .CONST 0x9a ; [0x17] -> 0x218cc
00021862 00 9a | | .CONST 0x9a ; [0x18] -> 0x218cc
00021864 00 34 | 4 | .CONST 0x34 ; [0x19] -> 0x21866
00021866 switch@0x2182a[0x10]:
00021866 switch@0x2182a[0x11]:
00021866 switch@0x2182a[0x12]:
00021866 switch@0x2182a[0x13]:
00021866 switch@0x2182a[0x14]:
00021866 switch@0x2182a[0x15]:
00021866 switch@0x2182a[0x19]:
00021866 switch@0x2182a[0x4]:
00021866 switch@0x2182a[0x5]:
00021866 switch@0x2182a[0x6]:
00021866 switch@0x2182a[0x7]:
00021866 switch@0x2182a[0x8]:
00021866 switch@0x2182a[0x9]:
00021866 switch@0x2182a[0xa]:
00021866 switch@0x2182a[0xb]:
00021866 switch@0x2182a[0xc]:
00021866 switch@0x2182a[0xd]:
00021866 48 53 |HS | PEA.L (A3)
00021868 48 52 |HR | PEA.L (A2)
0002186a 3f 11 |? | MOVE.W (A1),-(A7)
0002186c d5 57 | W | ADD.W D2,(A7)
0002186e 48 52 |HR | PEA.L (A2)
00021870 48 52 |HR | PEA.L (A2)
00021872 4e ba f9 d0 |N | JSR 0x21244
00021876 de fc 00 12 | | ADDA.W #0x12,A7
0002187a 60 7a |`z | BRA 0x218f6
0002187c switch@0x2182a[0x0]:
0002187c switch@0x2182a[0x1]:
0002187c 48 53 |HS | PEA.L (A3)
0002187e 59 4f |YO | SUBQ.L #0x4,A7
00021880 1e a8 03 d0 | | MOVE.B (A0+0x3d0),(A7)
00021884 1f 68 03 d1 00 01 | h | MOVE.B (A0+0x3d1),(A7+0x1)
0002188a 1f 68 03 d2 00 02 | h | MOVE.B (A0+0x3d2),(A7+0x2)
00021890 1f 68 03 d3 00 03 | h | MOVE.B (A0+0x3d3),(A7+0x3)
00021896 3f 11 |? | MOVE.W (A1),-(A7)
00021898 d5 57 | W | ADD.W D2,(A7)
0002189a 48 52 |HR | PEA.L (A2)
0002189c 2f 28 23 d6 |/(# | MOVE.L (A0+0x23d6),-(A7)
000218a0 4e ba fb 3a |N : | JSR 0x213dc
000218a4 60 d0 |` | BRA 0x21876
000218a6 switch@0x2182a[0x2]:
000218a6 switch@0x2182a[0x3]:
000218a6 48 53 |HS | PEA.L (A3)
000218a8 59 4f |YO | SUBQ.L #0x4,A7
000218aa 1e a8 03 d0 | | MOVE.B (A0+0x3d0),(A7)
000218ae 1f 68 03 d1 00 01 | h | MOVE.B (A0+0x3d1),(A7+0x1)
000218b4 1f 68 03 d2 00 02 | h | MOVE.B (A0+0x3d2),(A7+0x2)
000218ba 1f 68 03 d3 00 03 | h | MOVE.B (A0+0x3d3),(A7+0x3)
000218c0 3f 11 |? | MOVE.W (A1),-(A7)
000218c2 d5 57 | W | ADD.W D2,(A7)
000218c4 2f 28 23 d6 |/(# | MOVE.L (A0+0x23d6),-(A7)
000218c8 48 52 |HR | PEA.L (A2)
000218ca 60 d4 |` | BRA 0x218a0
000218cc switch@0x2182a[0x16]:
000218cc switch@0x2182a[0x17]:
000218cc switch@0x2182a[0x18]:
000218cc switch@0x2182a[0xe]:
000218cc switch@0x2182a[0xf]:
000218cc 41 fa e9 82 |A | LEA.L 0x20250,A0
000218d0 70 0c |p | MOVEQ.L #0x0c,D0
000218d2 3f 20 |? | MOVE.W -(A0),-(A7)
000218d4 51 c8 ff fc |Q | DBF D0,0x218d2
000218d8 59 4f |YO | SUBQ.L #0x4,A7
000218da 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000218de 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
000218e2 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7)
000218e6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
000218ec 50 4f |PO | ADDQ.L #0x8,A7
000218ee 4e ba f3 52 |N R | JSR 0x20c42
000218f2 de fc 00 1e | | ADDA.W #0x1e,A7
000218f6 4c df 0f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3
000218fa 4e 5e |N^ | UNLK A6
000218fc 4e 75 |Nu | RTS
000218fe ; --------------------------------------------------------------------------------------
000218fe ; OMSI PASCAL Function
000218fe ; --------------------------------------------------------------------------------------
000218fe 4e 56 ff a2 |NV | LINK.W A6,#0xffa2
00021902 bf d5 | | CMPA.L (A5),A7
00021904 62 06 |b | BHI 0x2190c
00021906 44 fc 00 02 |D | MOVE.W #0x2,CCR
0002190a 4e 76 |Nv | TRAPV
0002190c de fc 00 56 | V | ADDA.W #0x56,A7
00021910 48 e7 f3 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D3+D2+D1+D0,-(A7)
00021914 72 01 |r | MOVEQ.L #0x01,D1
00021916 74 0e |t | MOVEQ.L #0x0e,D2
00021918 76 14 |v | MOVEQ.L #0x14,D3
0002191a 41 fa e9 42 |A B | LEA.L 0x2025e,A0
0002191e 70 06 |p | MOVEQ.L #0x06,D0
00021920 3f 20 |? | MOVE.W -(A0),-(A7)
00021922 51 c8 ff fc |Q | DBF D0,0x21920
00021926 5d 4f |]O | SUBQ.L #0x6,A7
00021928 48 6f 00 06 |Ho | PEA.L (A7+0x6)
0002192c 3f 01 |? | MOVE.W D1,-(A7)
0002192e 3f 02 |? | MOVE.W D2,-(A7)
00021930 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021936 5c 4f |\O | ADDQ.L #0x6,A7
00021938 1e 81 | | MOVE.B D1,(A7)
0002193a 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
00021940 5c 4f |\O | ADDQ.L #0x6,A7
00021942 10 1f | | MOVE.B (A7)+,D0
00021944 48 80 |H | EXTB.W D0
00021946 41 81 |A | CHK.W D1,D0
00021948 de c2 | | ADDA.W D2,A7
0002194a 1c 00 | | MOVE.B D0,D6
0002194c 7e 00 |~ | MOVEQ.L #0x00,D7
0002194e 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00021952 c1 c7 | | MULS.W D7,D0
00021954 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
0002195a 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
0002195e 4a 06 |J | TST.B D6
00021960 67 0e |g | BEQ 0x21970
00021962 55 4f |UO | SUBQ.L #0x2,A7
00021964 3f 07 |? | MOVE.W D7,-(A7)
00021966 4e ba fd 30 |N 0 | JSR 0x21698
0002196a 54 4f |TO | ADDQ.L #0x2,A7
0002196c 4a 1f |J | TST.B (A7)+
0002196e 66 06 |f | BNE 0x21976
00021970 42 28 02 2a |B( * | CLR.B (A0+0x22a)
00021974 60 52 |`R | BRA 0x219c8
00021976 9e c3 | | SUBA.W D3,A7
00021978 22 4f |"O | MOVEA.L A7,A1
0002197a 45 fa e8 e2 |E | LEA.L 0x2025e,A2
0002197e 70 12 |p | MOVEQ.L #0x12,D0
00021980 12 da | | MOVE.B (A2)+,(A1)+
00021982 51 c8 ff fc |Q | DBF D0,0x21980
00021986 9e fc 00 0a | | SUBA.W #0xa,A7
0002198a 48 6f 00 0a |Ho | PEA.L (A7+0xa)
0002198e 3f 01 |? | MOVE.W D1,-(A7)
00021990 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
00021994 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
0002199a 58 4f |XO | ADDQ.L #0x4,A7
0002199c 30 07 |0 | MOVE.W D7,D0
0002199e 48 c0 |H | EXTW.L D0
000219a0 2f 00 |/ | MOVE.L D0,-(A7)
000219a2 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
000219a8 58 4f |XO | ADDQ.L #0x4,A7
000219aa 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
000219b0 5c 4f |\O | ADDQ.L #0x6,A7
000219b2 1e 81 | | MOVE.B D1,(A7)
000219b4 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
000219ba 5c 4f |\O | ADDQ.L #0x6,A7
000219bc 10 1f | | MOVE.B (A7)+,D0
000219be 48 80 |H | EXTB.W D0
000219c0 41 81 |A | CHK.W D1,D0
000219c2 de c3 | | ADDA.W D3,A7
000219c4 11 40 02 2a | @ * | MOVE.B D0,(A0+0x22a)
000219c8 4a 28 02 2a |J( * | TST.B (A0+0x22a)
000219cc 67 08 |g | BEQ 0x219d6
000219ce 3f 07 |? | MOVE.W D7,-(A7)
000219d0 4e ba fd 60 |N ` | JSR 0x21732
000219d4 54 4f |TO | ADDQ.L #0x2,A7
000219d6 52 47 |RG | ADDQ.W #0x1,D7
000219d8 0c 47 00 03 | G | CMPI.W #0x0003,D7
000219dc 6f 00 ff 70 |o p | BLE 0x2194e
000219e0 4c df 07 cf |L | MOVEM.L (A7)+,D0+D1+D2+D3+D6+D7+A0+A1+A2
000219e4 4e 5e |N^ | UNLK A6
000219e6 4e 75 |Nu | RTS
000219e8 ; --------------------------------------------------------------------------------------
000219e8 ; OMSI PASCAL Function
000219e8 ; --------------------------------------------------------------------------------------
000219e8 4e 56 ff d6 |NV | LINK.W A6,#0xffd6
000219ec bf d5 | | CMPA.L (A5),A7
000219ee 62 06 |b | BHI 0x219f6
000219f0 44 fc 00 02 |D | MOVE.W #0x2,CCR
000219f4 4e 76 |Nv | TRAPV
000219f6 de fc 00 2a | * | ADDA.W #0x2a,A7
000219fa 48 e7 e0 00 |H | MOVEM.L D2+D1+D0,-(A7)
000219fe 72 01 |r | MOVEQ.L #0x01,D1
00021a00 74 0c |t | MOVEQ.L #0x0c,D2
00021a02 2f 3a e8 76 |/: v | MOVE.L 0x2027a,-(A7)
00021a06 2f 3a e8 6e |/: n | MOVE.L 0x20276,-(A7)
00021a0a 2f 3a e8 66 |/: f | MOVE.L 0x20272,-(A7)
00021a0e 5d 4f |]O | SUBQ.L #0x6,A7
00021a10 48 6f 00 06 |Ho | PEA.L (A7+0x6)
00021a14 3f 01 |? | MOVE.W D1,-(A7)
00021a16 3f 02 |? | MOVE.W D2,-(A7)
00021a18 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021a1e 5c 4f |\O | ADDQ.L #0x6,A7
00021a20 1e 81 | | MOVE.B D1,(A7)
00021a22 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
00021a28 5c 4f |\O | ADDQ.L #0x6,A7
00021a2a 10 1f | | MOVE.B (A7)+,D0
00021a2c 48 80 |H | EXTB.W D0
00021a2e 41 81 |A | CHK.W D1,D0
00021a30 de c2 | | ADDA.W D2,A7
00021a32 13 c0 00 02 e5 18 | | MOVE.B D0,0x2e518
00021a38 4c df 00 07 |L | MOVEM.L (A7)+,D0+D1+D2
00021a3c 4e 5e |N^ | UNLK A6
00021a3e 4e 75 |Nu | RTS
00021a40 ; --------------------------------------------------------------------------------------
00021a40 ; OMSI PASCAL Function
00021a40 ; --------------------------------------------------------------------------------------
00021a40 4e 56 ff 8a |NV | LINK.W A6,#0xff8a
00021a44 bf d5 | | CMPA.L (A5),A7
00021a46 62 06 |b | BHI 0x21a4e
00021a48 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021a4c 4e 76 |Nv | TRAPV
00021a4e de fc 00 6e | n | ADDA.W #0x6e,A7
00021a52 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00021a56 47 f9 00 01 02 d0 |G | LEA.L StringCat2(a, b : String) : String,A3
00021a5c 72 01 |r | MOVEQ.L #0x01,D1
00021a5e 74 08 |t | MOVEQ.L #0x08,D2
00021a60 7a 03 |z | MOVEQ.L #0x03,D5
00021a62 7c 0c || | MOVEQ.L #0x0c,D6
00021a64 7e 00 |~ | MOVEQ.L #0x00,D7
00021a66 be 85 | | CMP.L D5,D7
00021a68 63 02 |c | BLS 0x21a6c
00021a6a 4e 4f |NO | TRAP #15
00021a6c 28 07 |( | MOVE.L D7,D4
00021a6e 26 3c 00 00 21 c0 |&< ! | MOVE.L #0x21c0,D3
00021a74 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4
00021a7a 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00021a80 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0
00021a84 4a 28 02 2a |J( * | TST.B (A0+0x22a)
00021a88 67 00 01 92 |g | BEQ 0x21c1c
00021a8c 2f 3a e7 f8 |/: | MOVE.L 0x20286,-(A7)
00021a90 2f 3a e7 f0 |/: | MOVE.L 0x20282,-(A7)
00021a94 2f 3a e7 e8 |/: | MOVE.L 0x2027e,-(A7)
00021a98 3f 3a e7 f0 |?: | MOVE.W 0x2028a,-(A7)
00021a9c 51 4f |QO | SUBQ.L #0x8,A7
00021a9e 48 6f 00 0a |Ho | PEA.L (A7+0xa)
00021aa2 3f 01 |? | MOVE.W D1,-(A7)
00021aa4 3f 06 |? | MOVE.W D6,-(A7)
00021aa6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021aac 59 4f |YO | SUBQ.L #0x4,A7
00021aae 2f 07 |/ | MOVE.L D7,-(A7)
00021ab0 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00021ab6 48 6f 00 18 |Ho | PEA.L (A7+0x18)
00021aba 3f 01 |? | MOVE.W D1,-(A7)
00021abc 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00021ac0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021ac6 50 4f |PO | ADDQ.L #0x8,A7
00021ac8 4e 93 |N | JSR (A3)
00021aca 50 4f |PO | ADDQ.L #0x8,A7
00021acc 48 78 00 04 |Hx | PEA.L 0x4
00021ad0 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
00021ad6 50 4f |PO | ADDQ.L #0x8,A7
00021ad8 4e 93 |N | JSR (A3)
00021ada 50 4f |PO | ADDQ.L #0x8,A7
00021adc 28 5f |(_ | MOVEA.L (A7)+,A4
00021ade 58 4f |XO | ADDQ.L #0x4,A7
00021ae0 22 4f |"O | MOVEA.L A7,A1
00021ae2 45 fa e7 a8 |E | LEA.L 0x2028c,A2
00021ae6 70 08 |p | MOVEQ.L #0x08,D0
00021ae8 12 da | | MOVE.B (A2)+,(A1)+
00021aea 51 c8 ff fc |Q | DBF D0,0x21ae8
00021aee 59 4f |YO | SUBQ.L #0x4,A7
00021af0 2f 0c |/ | MOVE.L A4,-(A7)
00021af2 59 4f |YO | SUBQ.L #0x4,A7
00021af4 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00021af8 3f 01 |? | MOVE.W D1,-(A7)
00021afa 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7)
00021afe 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021b04 50 4f |PO | ADDQ.L #0x8,A7
00021b06 4e 93 |N | JSR (A3)
00021b08 50 4f |PO | ADDQ.L #0x8,A7
00021b0a 28 5f |(_ | MOVEA.L (A7)+,A4
00021b0c 54 4f |TO | ADDQ.L #0x2,A7
00021b0e 2e 8c |. | MOVE.L A4,(A7)
00021b10 9e fc 00 10 | | SUBA.W #0x10,A7
00021b14 22 4f |"O | MOVEA.L A7,A1
00021b16 45 e8 02 3c |E < | LEA.L (A0+0x23c),A2
00021b1a 70 07 |p | MOVEQ.L #0x07,D0
00021b1c 12 da | | MOVE.B (A2)+,(A1)+
00021b1e 51 c8 ff fc |Q | DBF D0,0x21b1c
00021b22 48 78 00 0a |Hx | PEA.L 0xa
00021b26 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String
00021b2c de c6 | | ADDA.W D6,A7
00021b2e 48 78 00 0b |Hx | PEA.L 0xb
00021b32 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
00021b38 50 4f |PO | ADDQ.L #0x8,A7
00021b3a 4e 93 |N | JSR (A3)
00021b3c 50 4f |PO | ADDQ.L #0x8,A7
00021b3e 28 5f |(_ | MOVEA.L (A7)+,A4
00021b40 2f 3a e7 58 |/: X | MOVE.L 0x2029a,-(A7)
00021b44 2f 3a e7 50 |/: P | MOVE.L 0x20296,-(A7)
00021b48 59 4f |YO | SUBQ.L #0x4,A7
00021b4a 2f 0c |/ | MOVE.L A4,-(A7)
00021b4c 59 4f |YO | SUBQ.L #0x4,A7
00021b4e 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00021b52 3f 01 |? | MOVE.W D1,-(A7)
00021b54 3f 02 |? | MOVE.W D2,-(A7)
00021b56 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021b5c 50 4f |PO | ADDQ.L #0x8,A7
00021b5e 4e 93 |N | JSR (A3)
00021b60 50 4f |PO | ADDQ.L #0x8,A7
00021b62 28 5f |(_ | MOVEA.L (A7)+,A4
00021b64 2e 8c |. | MOVE.L A4,(A7)
00021b66 51 4f |QO | SUBQ.L #0x8,A7
00021b68 2f 28 02 34 |/( 4 | MOVE.L (A0+0x234),-(A7)
00021b6c 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00021b72 58 4f |XO | ADDQ.L #0x4,A7
00021b74 48 78 00 05 |Hx | PEA.L 0x5
00021b78 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
00021b7e 50 4f |PO | ADDQ.L #0x8,A7
00021b80 4e 93 |N | JSR (A3)
00021b82 50 4f |PO | ADDQ.L #0x8,A7
00021b84 28 5f |(_ | MOVEA.L (A7)+,A4
00021b86 2f 3a e7 1a |/: | MOVE.L 0x202a2,-(A7)
00021b8a 2f 3a e7 12 |/: | MOVE.L 0x2029e,-(A7)
00021b8e 59 4f |YO | SUBQ.L #0x4,A7
00021b90 2f 0c |/ | MOVE.L A4,-(A7)
00021b92 59 4f |YO | SUBQ.L #0x4,A7
00021b94 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00021b98 3f 01 |? | MOVE.W D1,-(A7)
00021b9a 3f 02 |? | MOVE.W D2,-(A7)
00021b9c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021ba2 50 4f |PO | ADDQ.L #0x8,A7
00021ba4 4e 93 |N | JSR (A3)
00021ba6 50 4f |PO | ADDQ.L #0x8,A7
00021ba8 28 5f |(_ | MOVEA.L (A7)+,A4
00021baa 2e 8c |. | MOVE.L A4,(A7)
00021bac 51 4f |QO | SUBQ.L #0x8,A7
00021bae 2f 28 02 30 |/( 0 | MOVE.L (A0+0x230),-(A7)
00021bb2 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00021bb8 58 4f |XO | ADDQ.L #0x4,A7
00021bba 48 78 00 05 |Hx | PEA.L 0x5
00021bbe 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
00021bc4 50 4f |PO | ADDQ.L #0x8,A7
00021bc6 4e 93 |N | JSR (A3)
00021bc8 50 4f |PO | ADDQ.L #0x8,A7
00021bca 28 5f |(_ | MOVEA.L (A7)+,A4
00021bcc 2f 3a e6 dc |/: | MOVE.L 0x202aa,-(A7)
00021bd0 2f 3a e6 d4 |/: | MOVE.L 0x202a6,-(A7)
00021bd4 59 4f |YO | SUBQ.L #0x4,A7
00021bd6 2f 0c |/ | MOVE.L A4,-(A7)
00021bd8 59 4f |YO | SUBQ.L #0x4,A7
00021bda 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00021bde 3f 01 |? | MOVE.W D1,-(A7)
00021be0 3f 02 |? | MOVE.W D2,-(A7)
00021be2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021be8 50 4f |PO | ADDQ.L #0x8,A7
00021bea 4e 93 |N | JSR (A3)
00021bec 50 4f |PO | ADDQ.L #0x8,A7
00021bee 28 5f |(_ | MOVEA.L (A7)+,A4
00021bf0 2e 8c |. | MOVE.L A4,(A7)
00021bf2 51 4f |QO | SUBQ.L #0x8,A7
00021bf4 2f 28 02 38 |/( 8 | MOVE.L (A0+0x238),-(A7)
00021bf8 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00021bfe 58 4f |XO | ADDQ.L #0x4,A7
00021c00 48 78 00 05 |Hx | PEA.L 0x5
00021c04 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
00021c0a 50 4f |PO | ADDQ.L #0x8,A7
00021c0c 4e 93 |N | JSR (A3)
00021c0e 50 4f |PO | ADDQ.L #0x8,A7
00021c10 28 5f |(_ | MOVEA.L (A7)+,A4
00021c12 2f 0c |/ | MOVE.L A4,-(A7)
00021c14 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021c1a 58 4f |XO | ADDQ.L #0x4,A7
00021c1c 52 87 |R | ADDQ.L #0x1,D7
00021c1e be 85 | | CMP.L D5,D7
00021c20 6f 00 fe 44 |o D | BLE 0x21a66
00021c24 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00021c28 4e 5e |N^ | UNLK A6
00021c2a 4e 75 |Nu | RTS
00021c2c ; --------------------------------------------------------------------------------------
00021c2c ; OMSI PASCAL Function
00021c2c ; <LVAR 0x008 4(r)>
00021c2c ; --------------------------------------------------------------------------------------
00021c2c 4e 56 ff ce |NV | LINK.W A6,#0xffce
00021c30 bf d5 | | CMPA.L (A5),A7
00021c32 62 06 |b | BHI 0x21c3a
00021c34 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021c38 4e 76 |Nv | TRAPV
00021c3a de fc 00 32 | 2 | ADDA.W #0x32,A7
00021c3e 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7)
00021c42 43 ec 00 08 |C | LEA.L (A4+0x8),A1
00021c46 45 ee 00 08 |E | LEA.L (A6+0x8),A2
00021c4a 20 51 | Q | MOVEA.L (A1),A0
00021c4c 4a 50 |JP | TST.W (A0)
00021c4e 66 12 |f | BNE 0x21c62
00021c50 59 4f |YO | SUBQ.L #0x4,A7
00021c52 2f 11 |/ | MOVE.L (A1),-(A7)
00021c54 2f 12 |/ | MOVE.L (A2),-(A7)
00021c56 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00021c5c 50 4f |PO | ADDQ.L #0x8,A7
00021c5e 22 9f |" | MOVE.L (A7)+,(A1)
00021c60 60 52 |`R | BRA 0x21cb4
00021c62 30 10 |0 | MOVE.W (A0),D0
00021c64 48 c0 |H | EXTW.L D0
00021c66 54 80 |T | ADDQ.L #0x2,D0
00021c68 20 52 | R | MOVEA.L (A2),A0
00021c6a 32 10 |2 | MOVE.W (A0),D1
00021c6c 48 c1 |H | EXTW.L D1
00021c6e d2 80 | | ADD.L D0,D1
00021c70 0c 81 00 00 00 50 | P | CMPI.L #0x00000050,D1
00021c76 6e 30 |n0 | BGT 0x21ca8
00021c78 3f 3a ea 20 |?: | MOVE.W 0x2069a,-(A7)
00021c7c 59 4f |YO | SUBQ.L #0x4,A7
00021c7e 2f 11 |/ | MOVE.L (A1),-(A7)
00021c80 59 4f |YO | SUBQ.L #0x4,A7
00021c82 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00021c86 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00021c8a 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00021c8e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00021c94 58 4f |XO | ADDQ.L #0x4,A7
00021c96 2e 92 |. | MOVE.L (A2),(A7)
00021c98 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String
00021c9e de fc 00 0c | | ADDA.W #0xc,A7
00021ca2 22 9f |" | MOVE.L (A7)+,(A1)
00021ca4 54 4f |TO | ADDQ.L #0x2,A7
00021ca6 60 0c |` | BRA 0x21cb4
00021ca8 2f 11 |/ | MOVE.L (A1),-(A7)
00021caa 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021cb0 58 4f |XO | ADDQ.L #0x4,A7
00021cb2 22 92 |" | MOVE.L (A2),(A1)
00021cb4 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2
00021cb8 4e 5e |N^ | UNLK A6
00021cba 4e 75 |Nu | RTS
00021cbc ; --------------------------------------------------------------------------------------
00021cbc ; OMSI PASCAL Function
00021cbc ; <LVAR 0x00a 4(r)>
00021cbc ; <LVAR 0x008 2(r)>
00021cbc ; <LVAR -0x006 @ 4(r)>
00021cbc ; <LVAR -0x00e @ 4(r)>
00021cbc ; --------------------------------------------------------------------------------------
00021cbc 4e 56 ff 86 |NV | LINK.W A6,#0xff86
00021cc0 bf d5 | | CMPA.L (A5),A7
00021cc2 62 06 |b | BHI 0x21cca
00021cc4 44 fc 00 02 |D | MOVE.W #0x2,CCR
00021cc8 4e 76 |Nv | TRAPV
00021cca de fc 00 6c | l | ADDA.W #0x6c,A7
00021cce 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00021cd2 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00021cd8 72 01 |r | MOVEQ.L #0x01,D1
00021cda 74 10 |t | MOVEQ.L #0x10,D2
00021cdc 76 14 |v | MOVEQ.L #0x14,D3
00021cde 78 12 |x | MOVEQ.L #0x12,D4
00021ce0 7a 0c |z | MOVEQ.L #0x0c,D5
00021ce2 7c 16 || | MOVEQ.L #0x16,D6
00021ce4 48 6e ff fa |Hn | PEA.L (A6-0x6)
00021ce8 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String)
00021cee 58 4f |XO | ADDQ.L #0x4,A7
00021cf0 48 6e ff f2 |Hn | PEA.L (A6-0xe)
00021cf4 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp
00021cfa 58 4f |XO | ADDQ.L #0x4,A7
00021cfc 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00021d00 c1 ee 00 08 | | MULS.W (A6+0x8),D0
00021d04 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00021d0a 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00021d0e 2f 08 |/ | MOVE.L A0,-(A7)
00021d10 2f 3a e9 92 |/: | MOVE.L 0x206a4,-(A7)
00021d14 2f 3a e9 8a |/: | MOVE.L 0x206a0,-(A7)
00021d18 2f 3a e9 82 |/: | MOVE.L 0x2069c,-(A7)
00021d1c 3f 3a e9 8a |?: | MOVE.W 0x206a8,-(A7)
00021d20 3f 3a e9 88 |?: | MOVE.W 0x206aa,-(A7)
00021d24 51 4f |QO | SUBQ.L #0x8,A7
00021d26 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00021d2a 3f 01 |? | MOVE.W D1,-(A7)
00021d2c 3f 05 |? | MOVE.W D5,-(A7)
00021d2e 4e 93 |N | JSR (A3)
00021d30 59 4f |YO | SUBQ.L #0x4,A7
00021d32 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0
00021d36 48 c0 |H | EXTW.L D0
00021d38 2f 00 |/ | MOVE.L D0,-(A7)
00021d3a 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00021d40 48 6f 00 1a |Ho | PEA.L (A7+0x1a)
00021d44 3f 01 |? | MOVE.W D1,-(A7)
00021d46 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00021d4a 4e 93 |N | JSR (A3)
00021d4c 50 4f |PO | ADDQ.L #0x8,A7
00021d4e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00021d54 50 4f |PO | ADDQ.L #0x8,A7
00021d56 48 78 00 04 |Hx | PEA.L 0x4
00021d5a 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
00021d60 2e ae ff f2 |. | MOVE.L (A6-0xe),(A7)
00021d64 4e b9 00 01 03 08 |N | JSR TimeToText()
00021d6a 48 6f 00 14 |Ho | PEA.L (A7+0x14)
00021d6e 3f 01 |? | MOVE.W D1,-(A7)
00021d70 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00021d74 4e 93 |N | JSR (A3)
00021d76 50 4f |PO | ADDQ.L #0x8,A7
00021d78 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String
00021d7e de c2 | | ADDA.W D2,A7
00021d80 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00021d86 de c2 | | ADDA.W D2,A7
00021d88 2e ae 00 0a |. | MOVE.L (A6+0xa),(A7)
00021d8c 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00021d92 58 4f |XO | ADDQ.L #0x4,A7
00021d94 43 fa e9 28 |C ( | LEA.L 0x206be,A1
00021d98 70 08 |p | MOVEQ.L #0x08,D0
00021d9a 3f 21 |?! | MOVE.W -(A1),-(A7)
00021d9c 51 c8 ff fc |Q | DBF D0,0x21d9a
00021da0 51 4f |QO | SUBQ.L #0x8,A7
00021da2 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00021da6 3f 01 |? | MOVE.W D1,-(A7)
00021da8 3f 04 |? | MOVE.W D4,-(A7)
00021daa 4e 93 |N | JSR (A3)
00021dac 2e a8 02 44 |. D | MOVE.L (A0+0x244),(A7)
00021db0 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00021db6 58 4f |XO | ADDQ.L #0x4,A7
00021db8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00021dbe 50 4f |PO | ADDQ.L #0x8,A7
00021dc0 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00021dc6 de c6 | | ADDA.W D6,A7
00021dc8 7e 00 |~ | MOVEQ.L #0x00,D7
00021dca 0c 87 00 00 00 07 | | CMPI.L #0x00000007,D7
00021dd0 63 02 |c | BLS 0x21dd4
00021dd2 4e 4f |NO | TRAP #15
00021dd4 20 07 | | MOVE.L D7,D0
00021dd6 e5 80 | | ASL.L #0x2,D0
00021dd8 41 fa ee 1a |A | LEA.L 0x20bf4,A0
00021ddc 2f 30 08 00 |/0 | MOVE.L (A0+D0.L),-(A7)
00021de0 51 4f |QO | SUBQ.L #0x8,A7
00021de2 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00021de6 3f 01 |? | MOVE.W D1,-(A7)
00021de8 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
00021dec 4e 93 |N | JSR (A3)
00021dee 58 4f |XO | ADDQ.L #0x4,A7
00021df0 20 07 | | MOVE.L D7,D0
00021df2 e3 80 | | ASL.L #0x1,D0
00021df4 20 6f 00 10 | o | MOVEA.L (A7+0x10),A0
00021df8 41 e8 02 2a |A * | LEA.L (A0+0x22a),A0
00021dfc 41 f0 08 00 |A | LEA.L (A0+D0.L),A0
00021e00 42 80 |B | CLR.L D0
00021e02 30 28 21 b0 |0(! | MOVE.W (A0+0x21b0),D0
00021e06 2f 00 |/ | MOVE.L D0,-(A7)
00021e08 48 78 00 04 |Hx | PEA.L 0x4
00021e0c 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
00021e12 50 4f |PO | ADDQ.L #0x8,A7
00021e14 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00021e1a 50 4f |PO | ADDQ.L #0x8,A7
00021e1c 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00021e22 50 4f |PO | ADDQ.L #0x8,A7
00021e24 52 87 |R | ADDQ.L #0x1,D7
00021e26 0c 87 00 00 00 07 | | CMPI.L #0x00000007,D7
00021e2c 6f 9c |o | BLE 0x21dca
00021e2e 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00021e34 20 57 | W | MOVEA.L (A7),A0
00021e36 30 28 23 da |0(# | MOVE.W (A0+0x23da),D0
00021e3a 02 40 80 00 | @ | ANDI.W #0x8000,D0
00021e3e 67 2a |g* | BEQ 0x21e6a
00021e40 9e c4 | | SUBA.W D4,A7
00021e42 22 4f |"O | MOVEA.L A7,A1
00021e44 45 fa e4 88 |E | LEA.L 0x202ce,A2
00021e48 70 10 |p | MOVEQ.L #0x10,D0
00021e4a 12 da | | MOVE.B (A2)+,(A1)+
00021e4c 51 c8 ff fc |Q | DBF D0,0x21e4a
00021e50 59 4f |YO | SUBQ.L #0x4,A7
00021e52 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021e56 3f 01 |? | MOVE.W D1,-(A7)
00021e58 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7)
00021e5c 4e 93 |N | JSR (A3)
00021e5e 50 4f |PO | ADDQ.L #0x8,A7
00021e60 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00021e64 4e ba fd c6 |N | JSR 0x21c2c
00021e68 de c6 | | ADDA.W D6,A7
00021e6a 30 28 23 da |0(# | MOVE.W (A0+0x23da),D0
00021e6e 02 40 40 00 | @@ | ANDI.W #0x4000,D0
00021e72 67 2c |g, | BEQ 0x21ea0
00021e74 9e c3 | | SUBA.W D3,A7
00021e76 22 4f |"O | MOVEA.L A7,A1
00021e78 45 fa e4 66 |E f | LEA.L 0x202e0,A2
00021e7c 70 12 |p | MOVEQ.L #0x12,D0
00021e7e 12 da | | MOVE.B (A2)+,(A1)+
00021e80 51 c8 ff fc |Q | DBF D0,0x21e7e
00021e84 59 4f |YO | SUBQ.L #0x4,A7
00021e86 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021e8a 3f 01 |? | MOVE.W D1,-(A7)
00021e8c 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
00021e90 4e 93 |N | JSR (A3)
00021e92 50 4f |PO | ADDQ.L #0x8,A7
00021e94 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00021e98 4e ba fd 92 |N | JSR 0x21c2c
00021e9c de fc 00 18 | | ADDA.W #0x18,A7
00021ea0 30 28 23 da |0(# | MOVE.W (A0+0x23da),D0
00021ea4 02 40 10 00 | @ | ANDI.W #0x1000,D0
00021ea8 67 2e |g. | BEQ 0x21ed8
00021eaa 9e fc 00 1e | | SUBA.W #0x1e,A7
00021eae 22 4f |"O | MOVEA.L A7,A1
00021eb0 45 fa e4 42 |E B | LEA.L 0x202f4,A2
00021eb4 70 1c |p | MOVEQ.L #0x1c,D0
00021eb6 12 da | | MOVE.B (A2)+,(A1)+
00021eb8 51 c8 ff fc |Q | DBF D0,0x21eb6
00021ebc 59 4f |YO | SUBQ.L #0x4,A7
00021ebe 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021ec2 3f 01 |? | MOVE.W D1,-(A7)
00021ec4 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7)
00021ec8 4e 93 |N | JSR (A3)
00021eca 50 4f |PO | ADDQ.L #0x8,A7
00021ecc 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00021ed0 4e ba fd 5a |N Z | JSR 0x21c2c
00021ed4 de fc 00 22 | " | ADDA.W #0x22,A7
00021ed8 30 28 23 da |0(# | MOVE.W (A0+0x23da),D0
00021edc 02 40 08 00 | @ | ANDI.W #0x0800,D0
00021ee0 67 2c |g, | BEQ 0x21f0e
00021ee2 9e c3 | | SUBA.W D3,A7
00021ee4 22 4f |"O | MOVEA.L A7,A1
00021ee6 45 fa e4 2a |E * | LEA.L 0x20312,A2
00021eea 70 12 |p | MOVEQ.L #0x12,D0
00021eec 12 da | | MOVE.B (A2)+,(A1)+
00021eee 51 c8 ff fc |Q | DBF D0,0x21eec
00021ef2 59 4f |YO | SUBQ.L #0x4,A7
00021ef4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021ef8 3f 01 |? | MOVE.W D1,-(A7)
00021efa 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
00021efe 4e 93 |N | JSR (A3)
00021f00 50 4f |PO | ADDQ.L #0x8,A7
00021f02 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00021f06 4e ba fd 24 |N $ | JSR 0x21c2c
00021f0a de fc 00 18 | | ADDA.W #0x18,A7
00021f0e 30 28 23 da |0(# | MOVE.W (A0+0x23da),D0
00021f12 02 40 04 00 | @ | ANDI.W #0x0400,D0
00021f16 67 2c |g, | BEQ 0x21f44
00021f18 9e c3 | | SUBA.W D3,A7
00021f1a 22 4f |"O | MOVEA.L A7,A1
00021f1c 45 fa e4 08 |E | LEA.L 0x20326,A2
00021f20 70 12 |p | MOVEQ.L #0x12,D0
00021f22 12 da | | MOVE.B (A2)+,(A1)+
00021f24 51 c8 ff fc |Q | DBF D0,0x21f22
00021f28 59 4f |YO | SUBQ.L #0x4,A7
00021f2a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021f2e 3f 01 |? | MOVE.W D1,-(A7)
00021f30 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
00021f34 4e 93 |N | JSR (A3)
00021f36 50 4f |PO | ADDQ.L #0x8,A7
00021f38 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00021f3c 4e ba fc ee |N | JSR 0x21c2c
00021f40 de fc 00 18 | | ADDA.W #0x18,A7
00021f44 30 28 23 da |0(# | MOVE.W (A0+0x23da),D0
00021f48 02 40 00 80 | @ | ANDI.W #0x0080,D0
00021f4c 66 2c |f, | BNE 0x21f7a
00021f4e 9e c3 | | SUBA.W D3,A7
00021f50 22 4f |"O | MOVEA.L A7,A1
00021f52 45 fa e3 e6 |E | LEA.L 0x2033a,A2
00021f56 70 12 |p | MOVEQ.L #0x12,D0
00021f58 12 da | | MOVE.B (A2)+,(A1)+
00021f5a 51 c8 ff fc |Q | DBF D0,0x21f58
00021f5e 59 4f |YO | SUBQ.L #0x4,A7
00021f60 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021f64 3f 01 |? | MOVE.W D1,-(A7)
00021f66 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
00021f6a 4e 93 |N | JSR (A3)
00021f6c 50 4f |PO | ADDQ.L #0x8,A7
00021f6e 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00021f72 4e ba fc b8 |N | JSR 0x21c2c
00021f76 de fc 00 18 | | ADDA.W #0x18,A7
00021f7a 30 28 23 da |0(# | MOVE.W (A0+0x23da),D0
00021f7e 02 40 00 40 | @ @ | ANDI.W #0x0040,D0
00021f82 67 22 |g" | BEQ 0x21fa6
00021f84 2f 3a e3 cc |/: | MOVE.L 0x20352,-(A7)
00021f88 2f 3a e3 c4 |/: | MOVE.L 0x2034e,-(A7)
00021f8c 59 4f |YO | SUBQ.L #0x4,A7
00021f8e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021f92 3f 01 |? | MOVE.W D1,-(A7)
00021f94 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7)
00021f98 4e 93 |N | JSR (A3)
00021f9a 50 4f |PO | ADDQ.L #0x8,A7
00021f9c 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00021fa0 4e ba fc 8a |N | JSR 0x21c2c
00021fa4 de c5 | | ADDA.W D5,A7
00021fa6 30 28 23 da |0(# | MOVE.W (A0+0x23da),D0
00021faa c0 41 | A | AND.W D1,D0
00021fac 67 00 06 7a |g z | BEQ 0x22628
00021fb0 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
00021fb4 02 40 80 00 | @ | ANDI.W #0x8000,D0
00021fb8 67 22 |g" | BEQ 0x21fdc
00021fba 2f 3a e6 24 |/: $ | MOVE.L 0x205e0,-(A7)
00021fbe 2f 3a e6 1c |/: | MOVE.L 0x205dc,-(A7)
00021fc2 59 4f |YO | SUBQ.L #0x4,A7
00021fc4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021fc8 3f 01 |? | MOVE.W D1,-(A7)
00021fca 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7)
00021fce 4e 93 |N | JSR (A3)
00021fd0 50 4f |PO | ADDQ.L #0x8,A7
00021fd2 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00021fd6 4e ba fc 54 |N T | JSR 0x21c2c
00021fda de c5 | | ADDA.W D5,A7
00021fdc 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
00021fe0 02 40 40 00 | @@ | ANDI.W #0x4000,D0
00021fe4 67 2c |g, | BEQ 0x22012
00021fe6 9e fc 00 0e | | SUBA.W #0xe,A7
00021fea 22 4f |"O | MOVEA.L A7,A1
00021fec 45 fa e5 f6 |E | LEA.L 0x205e4,A2
00021ff0 70 0c |p | MOVEQ.L #0x0c,D0
00021ff2 12 da | | MOVE.B (A2)+,(A1)+
00021ff4 51 c8 ff fc |Q | DBF D0,0x21ff2
00021ff8 59 4f |YO | SUBQ.L #0x4,A7
00021ffa 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00021ffe 3f 01 |? | MOVE.W D1,-(A7)
00022000 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7)
00022004 4e 93 |N | JSR (A3)
00022006 50 4f |PO | ADDQ.L #0x8,A7
00022008 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002200c 4e ba fc 1e |N | JSR 0x21c2c
00022010 de c4 | | ADDA.W D4,A7
00022012 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
00022016 02 40 20 00 | @ | ANDI.W #0x2000,D0
0002201a 67 28 |g( | BEQ 0x22044
0002201c 43 fa e5 ee |C | LEA.L 0x2060c,A1
00022020 70 0c |p | MOVEQ.L #0x0c,D0
00022022 3f 21 |?! | MOVE.W -(A1),-(A7)
00022024 51 c8 ff fc |Q | DBF D0,0x22022
00022028 59 4f |YO | SUBQ.L #0x4,A7
0002202a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002202e 3f 01 |? | MOVE.W D1,-(A7)
00022030 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7)
00022034 4e 93 |N | JSR (A3)
00022036 50 4f |PO | ADDQ.L #0x8,A7
00022038 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002203c 4e ba fb ee |N | JSR 0x21c2c
00022040 de fc 00 1e | | ADDA.W #0x1e,A7
00022044 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
00022048 02 40 0f 00 | @ | ANDI.W #0x0f00,D0
0002204c 0c 40 02 00 | @ | CMPI.W #0x0200,D0
00022050 66 2e |f. | BNE 0x22080
00022052 9e fc 00 0a | | SUBA.W #0xa,A7
00022056 22 4f |"O | MOVEA.L A7,A1
00022058 45 fa e5 b2 |E | LEA.L 0x2060c,A2
0002205c 70 08 |p | MOVEQ.L #0x08,D0
0002205e 12 da | | MOVE.B (A2)+,(A1)+
00022060 51 c8 ff fc |Q | DBF D0,0x2205e
00022064 59 4f |YO | SUBQ.L #0x4,A7
00022066 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002206a 3f 01 |? | MOVE.W D1,-(A7)
0002206c 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7)
00022070 4e 93 |N | JSR (A3)
00022072 50 4f |PO | ADDQ.L #0x8,A7
00022074 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022078 4e ba fb b2 |N | JSR 0x21c2c
0002207c de fc 00 0e | | ADDA.W #0xe,A7
00022080 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
00022084 02 40 0f 00 | @ | ANDI.W #0x0f00,D0
00022088 0c 40 03 00 | @ | CMPI.W #0x0300,D0
0002208c 66 24 |f$ | BNE 0x220b2
0002208e 2f 3a e5 8e |/: | MOVE.L 0x2061e,-(A7)
00022092 2f 3a e5 86 |/: | MOVE.L 0x2061a,-(A7)
00022096 2f 3a e5 7e |/: ~ | MOVE.L 0x20616,-(A7)
0002209a 59 4f |YO | SUBQ.L #0x4,A7
0002209c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000220a0 3f 01 |? | MOVE.W D1,-(A7)
000220a2 3f 05 |? | MOVE.W D5,-(A7)
000220a4 4e 93 |N | JSR (A3)
000220a6 50 4f |PO | ADDQ.L #0x8,A7
000220a8 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000220ac 4e ba fb 7e |N ~ | JSR 0x21c2c
000220b0 de c2 | | ADDA.W D2,A7
000220b2 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
000220b6 02 40 0f 00 | @ | ANDI.W #0x0f00,D0
000220ba 0c 40 04 00 | @ | CMPI.W #0x0400,D0
000220be 66 26 |f& | BNE 0x220e6
000220c0 43 fa e5 6e |C n | LEA.L 0x20630,A1
000220c4 70 06 |p | MOVEQ.L #0x06,D0
000220c6 3f 21 |?! | MOVE.W -(A1),-(A7)
000220c8 51 c8 ff fc |Q | DBF D0,0x220c6
000220cc 59 4f |YO | SUBQ.L #0x4,A7
000220ce 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000220d2 3f 01 |? | MOVE.W D1,-(A7)
000220d4 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
000220d8 4e 93 |N | JSR (A3)
000220da 50 4f |PO | ADDQ.L #0x8,A7
000220dc 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000220e0 4e ba fb 4a |N J | JSR 0x21c2c
000220e4 de c4 | | ADDA.W D4,A7
000220e6 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
000220ea 02 40 0f 00 | @ | ANDI.W #0x0f00,D0
000220ee 0c 40 05 00 | @ | CMPI.W #0x0500,D0
000220f2 66 2a |f* | BNE 0x2211e
000220f4 9e c2 | | SUBA.W D2,A7
000220f6 22 4f |"O | MOVEA.L A7,A1
000220f8 45 fa e5 36 |E 6 | LEA.L 0x20630,A2
000220fc 70 0e |p | MOVEQ.L #0x0e,D0
000220fe 12 da | | MOVE.B (A2)+,(A1)+
00022100 51 c8 ff fc |Q | DBF D0,0x220fe
00022104 59 4f |YO | SUBQ.L #0x4,A7
00022106 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002210a 3f 01 |? | MOVE.W D1,-(A7)
0002210c 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
00022110 4e 93 |N | JSR (A3)
00022112 50 4f |PO | ADDQ.L #0x8,A7
00022114 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022118 4e ba fb 12 |N | JSR 0x21c2c
0002211c de c3 | | ADDA.W D3,A7
0002211e 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
00022122 02 40 0f 00 | @ | ANDI.W #0x0f00,D0
00022126 0c 40 06 00 | @ | CMPI.W #0x0600,D0
0002212a 66 26 |f& | BNE 0x22152
0002212c 43 fa e5 20 |C | LEA.L 0x2064e,A1
00022130 70 06 |p | MOVEQ.L #0x06,D0
00022132 3f 21 |?! | MOVE.W -(A1),-(A7)
00022134 51 c8 ff fc |Q | DBF D0,0x22132
00022138 59 4f |YO | SUBQ.L #0x4,A7
0002213a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002213e 3f 01 |? | MOVE.W D1,-(A7)
00022140 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
00022144 4e 93 |N | JSR (A3)
00022146 50 4f |PO | ADDQ.L #0x8,A7
00022148 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002214c 4e ba fa de |N | JSR 0x21c2c
00022150 de c4 | | ADDA.W D4,A7
00022152 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
00022156 02 40 0f 00 | @ | ANDI.W #0x0f00,D0
0002215a 0c 40 07 00 | @ | CMPI.W #0x0700,D0
0002215e 66 24 |f$ | BNE 0x22184
00022160 2f 3a e4 f4 |/: | MOVE.L 0x20656,-(A7)
00022164 2f 3a e4 ec |/: | MOVE.L 0x20652,-(A7)
00022168 2f 3a e4 e4 |/: | MOVE.L 0x2064e,-(A7)
0002216c 59 4f |YO | SUBQ.L #0x4,A7
0002216e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022172 3f 01 |? | MOVE.W D1,-(A7)
00022174 3f 05 |? | MOVE.W D5,-(A7)
00022176 4e 93 |N | JSR (A3)
00022178 50 4f |PO | ADDQ.L #0x8,A7
0002217a 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002217e 4e ba fa ac |N | JSR 0x21c2c
00022182 de c2 | | ADDA.W D2,A7
00022184 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
00022188 02 40 0f 00 | @ | ANDI.W #0x0f00,D0
0002218c 0c 40 08 00 | @ | CMPI.W #0x0800,D0
00022190 66 2a |f* | BNE 0x221bc
00022192 9e c5 | | SUBA.W D5,A7
00022194 22 4f |"O | MOVEA.L A7,A1
00022196 45 fa e4 c2 |E | LEA.L 0x2065a,A2
0002219a 70 0a |p | MOVEQ.L #0x0a,D0
0002219c 12 da | | MOVE.B (A2)+,(A1)+
0002219e 51 c8 ff fc |Q | DBF D0,0x2219c
000221a2 59 4f |YO | SUBQ.L #0x4,A7
000221a4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000221a8 3f 01 |? | MOVE.W D1,-(A7)
000221aa 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7)
000221ae 4e 93 |N | JSR (A3)
000221b0 50 4f |PO | ADDQ.L #0x8,A7
000221b2 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000221b6 4e ba fa 74 |N t | JSR 0x21c2c
000221ba de c2 | | ADDA.W D2,A7
000221bc 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
000221c0 02 40 0f 00 | @ | ANDI.W #0x0f00,D0
000221c4 0c 40 09 00 | @ | CMPI.W #0x0900,D0
000221c8 66 2a |f* | BNE 0x221f4
000221ca 51 4f |QO | SUBQ.L #0x8,A7
000221cc 22 4f |"O | MOVEA.L A7,A1
000221ce 45 fa e4 96 |E | LEA.L 0x20666,A2
000221d2 70 06 |p | MOVEQ.L #0x06,D0
000221d4 12 da | | MOVE.B (A2)+,(A1)+
000221d6 51 c8 ff fc |Q | DBF D0,0x221d4
000221da 59 4f |YO | SUBQ.L #0x4,A7
000221dc 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000221e0 3f 01 |? | MOVE.W D1,-(A7)
000221e2 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7)
000221e6 4e 93 |N | JSR (A3)
000221e8 50 4f |PO | ADDQ.L #0x8,A7
000221ea 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000221ee 4e ba fa 3c |N < | JSR 0x21c2c
000221f2 de c5 | | ADDA.W D5,A7
000221f4 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
000221f8 02 40 0f 00 | @ | ANDI.W #0x0f00,D0
000221fc 0c 40 0a 00 | @ | CMPI.W #0x0a00,D0
00022200 66 24 |f$ | BNE 0x22226
00022202 2f 3a e4 72 |/: r | MOVE.L 0x20676,-(A7)
00022206 2f 3a e4 6a |/: j | MOVE.L 0x20672,-(A7)
0002220a 2f 3a e4 62 |/: b | MOVE.L 0x2066e,-(A7)
0002220e 59 4f |YO | SUBQ.L #0x4,A7
00022210 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022214 3f 01 |? | MOVE.W D1,-(A7)
00022216 3f 05 |? | MOVE.W D5,-(A7)
00022218 4e 93 |N | JSR (A3)
0002221a 50 4f |PO | ADDQ.L #0x8,A7
0002221c 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022220 4e ba fa 0a |N | JSR 0x21c2c
00022224 de c2 | | ADDA.W D2,A7
00022226 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
0002222a 02 40 0f 00 | @ | ANDI.W #0x0f00,D0
0002222e 0c 40 0b 00 | @ | CMPI.W #0x0b00,D0
00022232 66 2a |f* | BNE 0x2225e
00022234 9e c2 | | SUBA.W D2,A7
00022236 22 4f |"O | MOVEA.L A7,A1
00022238 45 fa e4 40 |E @ | LEA.L 0x2067a,A2
0002223c 70 0e |p | MOVEQ.L #0x0e,D0
0002223e 12 da | | MOVE.B (A2)+,(A1)+
00022240 51 c8 ff fc |Q | DBF D0,0x2223e
00022244 59 4f |YO | SUBQ.L #0x4,A7
00022246 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002224a 3f 01 |? | MOVE.W D1,-(A7)
0002224c 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
00022250 4e 93 |N | JSR (A3)
00022252 50 4f |PO | ADDQ.L #0x8,A7
00022254 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022258 4e ba f9 d2 |N | JSR 0x21c2c
0002225c de c3 | | ADDA.W D3,A7
0002225e 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
00022262 02 40 0f 00 | @ | ANDI.W #0x0f00,D0
00022266 0c 40 0d 00 | @ | CMPI.W #0x0d00,D0
0002226a 66 2a |f* | BNE 0x22296
0002226c 9e c2 | | SUBA.W D2,A7
0002226e 22 4f |"O | MOVEA.L A7,A1
00022270 45 fa e4 18 |E | LEA.L 0x2068a,A2
00022274 70 0e |p | MOVEQ.L #0x0e,D0
00022276 12 da | | MOVE.B (A2)+,(A1)+
00022278 51 c8 ff fc |Q | DBF D0,0x22276
0002227c 59 4f |YO | SUBQ.L #0x4,A7
0002227e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022282 3f 01 |? | MOVE.W D1,-(A7)
00022284 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
00022288 4e 93 |N | JSR (A3)
0002228a 50 4f |PO | ADDQ.L #0x8,A7
0002228c 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022290 4e ba f9 9a |N | JSR 0x21c2c
00022294 de c3 | | ADDA.W D3,A7
00022296 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
0002229a 02 40 00 80 | @ | ANDI.W #0x0080,D0
0002229e 67 28 |g( | BEQ 0x222c8
000222a0 43 fa e1 f2 |C | LEA.L 0x20494,A1
000222a4 70 04 |p | MOVEQ.L #0x04,D0
000222a6 3f 21 |?! | MOVE.W -(A1),-(A7)
000222a8 51 c8 ff fc |Q | DBF D0,0x222a6
000222ac 59 4f |YO | SUBQ.L #0x4,A7
000222ae 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000222b2 3f 01 |? | MOVE.W D1,-(A7)
000222b4 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7)
000222b8 4e 93 |N | JSR (A3)
000222ba 50 4f |PO | ADDQ.L #0x8,A7
000222bc 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000222c0 4e ba f9 6a |N j | JSR 0x21c2c
000222c4 de fc 00 0e | | ADDA.W #0xe,A7
000222c8 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
000222cc 02 40 00 40 | @ @ | ANDI.W #0x0040,D0
000222d0 67 2c |g, | BEQ 0x222fe
000222d2 9e c6 | | SUBA.W D6,A7
000222d4 22 4f |"O | MOVEA.L A7,A1
000222d6 45 fa e1 bc |E | LEA.L 0x20494,A2
000222da 70 14 |p | MOVEQ.L #0x14,D0
000222dc 12 da | | MOVE.B (A2)+,(A1)+
000222de 51 c8 ff fc |Q | DBF D0,0x222dc
000222e2 59 4f |YO | SUBQ.L #0x4,A7
000222e4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000222e8 3f 01 |? | MOVE.W D1,-(A7)
000222ea 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7)
000222ee 4e 93 |N | JSR (A3)
000222f0 50 4f |PO | ADDQ.L #0x8,A7
000222f2 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000222f6 4e ba f9 34 |N 4 | JSR 0x21c2c
000222fa de fc 00 1a | | ADDA.W #0x1a,A7
000222fe 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
00022302 02 40 00 20 | @ | ANDI.W #0x0020,D0
00022306 67 2e |g. | BEQ 0x22336
00022308 9e fc 00 1e | | SUBA.W #0x1e,A7
0002230c 22 4f |"O | MOVEA.L A7,A1
0002230e 45 fa e1 9a |E | LEA.L 0x204aa,A2
00022312 70 1c |p | MOVEQ.L #0x1c,D0
00022314 12 da | | MOVE.B (A2)+,(A1)+
00022316 51 c8 ff fc |Q | DBF D0,0x22314
0002231a 59 4f |YO | SUBQ.L #0x4,A7
0002231c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022320 3f 01 |? | MOVE.W D1,-(A7)
00022322 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7)
00022326 4e 93 |N | JSR (A3)
00022328 50 4f |PO | ADDQ.L #0x8,A7
0002232a 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002232e 4e ba f8 fc |N | JSR 0x21c2c
00022332 de fc 00 22 | " | ADDA.W #0x22,A7
00022336 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
0002233a c0 42 | B | AND.W D2,D0
0002233c 67 2a |g* | BEQ 0x22368
0002233e 9e c5 | | SUBA.W D5,A7
00022340 22 4f |"O | MOVEA.L A7,A1
00022342 45 fa e1 84 |E | LEA.L 0x204c8,A2
00022346 70 0a |p | MOVEQ.L #0x0a,D0
00022348 12 da | | MOVE.B (A2)+,(A1)+
0002234a 51 c8 ff fc |Q | DBF D0,0x22348
0002234e 59 4f |YO | SUBQ.L #0x4,A7
00022350 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022354 3f 01 |? | MOVE.W D1,-(A7)
00022356 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7)
0002235a 4e 93 |N | JSR (A3)
0002235c 50 4f |PO | ADDQ.L #0x8,A7
0002235e 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022362 4e ba f8 c8 |N | JSR 0x21c2c
00022366 de c2 | | ADDA.W D2,A7
00022368 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
0002236c 02 40 00 08 | @ | ANDI.W #0x0008,D0
00022370 67 26 |g& | BEQ 0x22398
00022372 43 fa e1 76 |C v | LEA.L 0x204ea,A1
00022376 70 0a |p | MOVEQ.L #0x0a,D0
00022378 3f 21 |?! | MOVE.W -(A1),-(A7)
0002237a 51 c8 ff fc |Q | DBF D0,0x22378
0002237e 59 4f |YO | SUBQ.L #0x4,A7
00022380 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022384 3f 01 |? | MOVE.W D1,-(A7)
00022386 3f 06 |? | MOVE.W D6,-(A7)
00022388 4e 93 |N | JSR (A3)
0002238a 50 4f |PO | ADDQ.L #0x8,A7
0002238c 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022390 4e ba f8 9a |N | JSR 0x21c2c
00022394 de fc 00 1a | | ADDA.W #0x1a,A7
00022398 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
0002239c 02 40 00 04 | @ | ANDI.W #0x0004,D0
000223a0 67 2a |g* | BEQ 0x223cc
000223a2 9e c4 | | SUBA.W D4,A7
000223a4 22 4f |"O | MOVEA.L A7,A1
000223a6 45 fa e1 42 |E B | LEA.L 0x204ea,A2
000223aa 70 10 |p | MOVEQ.L #0x10,D0
000223ac 12 da | | MOVE.B (A2)+,(A1)+
000223ae 51 c8 ff fc |Q | DBF D0,0x223ac
000223b2 59 4f |YO | SUBQ.L #0x4,A7
000223b4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000223b8 3f 01 |? | MOVE.W D1,-(A7)
000223ba 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7)
000223be 4e 93 |N | JSR (A3)
000223c0 50 4f |PO | ADDQ.L #0x8,A7
000223c2 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000223c6 4e ba f8 64 |N d | JSR 0x21c2c
000223ca de c6 | | ADDA.W D6,A7
000223cc 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
000223d0 02 40 00 02 | @ | ANDI.W #0x0002,D0
000223d4 67 28 |g( | BEQ 0x223fe
000223d6 2f 3a e1 30 |/: 0 | MOVE.L 0x20508,-(A7)
000223da 2f 3a e1 28 |/: ( | MOVE.L 0x20504,-(A7)
000223de 2f 3a e1 20 |/: | MOVE.L 0x20500,-(A7)
000223e2 2f 3a e1 18 |/: | MOVE.L 0x204fc,-(A7)
000223e6 59 4f |YO | SUBQ.L #0x4,A7
000223e8 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000223ec 3f 01 |? | MOVE.W D1,-(A7)
000223ee 3f 02 |? | MOVE.W D2,-(A7)
000223f0 4e 93 |N | JSR (A3)
000223f2 50 4f |PO | ADDQ.L #0x8,A7
000223f4 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000223f8 4e ba f8 32 |N 2 | JSR 0x21c2c
000223fc de c3 | | ADDA.W D3,A7
000223fe 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
00022402 c0 41 | A | AND.W D1,D0
00022404 67 2a |g* | BEQ 0x22430
00022406 9e c4 | | SUBA.W D4,A7
00022408 22 4f |"O | MOVEA.L A7,A1
0002240a 45 fa e1 00 |E | LEA.L 0x2050c,A2
0002240e 70 10 |p | MOVEQ.L #0x10,D0
00022410 12 da | | MOVE.B (A2)+,(A1)+
00022412 51 c8 ff fc |Q | DBF D0,0x22410
00022416 59 4f |YO | SUBQ.L #0x4,A7
00022418 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002241c 3f 01 |? | MOVE.W D1,-(A7)
0002241e 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7)
00022422 4e 93 |N | JSR (A3)
00022424 50 4f |PO | ADDQ.L #0x8,A7
00022426 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002242a 4e ba f8 00 |N | JSR 0x21c2c
0002242e de c6 | | ADDA.W D6,A7
00022430 30 28 23 e6 |0(# | MOVE.W (A0+0x23e6),D0
00022434 02 40 80 00 | @ | ANDI.W #0x8000,D0
00022438 67 26 |g& | BEQ 0x22460
0002243a 43 fa e0 f6 |C | LEA.L 0x20532,A1
0002243e 70 04 |p | MOVEQ.L #0x04,D0
00022440 2f 21 |/! | MOVE.L -(A1),-(A7)
00022442 51 c8 ff fc |Q | DBF D0,0x22440
00022446 59 4f |YO | SUBQ.L #0x4,A7
00022448 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002244c 3f 01 |? | MOVE.W D1,-(A7)
0002244e 3f 03 |? | MOVE.W D3,-(A7)
00022450 4e 93 |N | JSR (A3)
00022452 50 4f |PO | ADDQ.L #0x8,A7
00022454 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022458 4e ba f7 d2 |N | JSR 0x21c2c
0002245c de fc 00 18 | | ADDA.W #0x18,A7
00022460 30 28 23 e6 |0(# | MOVE.W (A0+0x23e6),D0
00022464 02 40 40 00 | @@ | ANDI.W #0x4000,D0
00022468 67 26 |g& | BEQ 0x22490
0002246a 43 fa e0 dc |C | LEA.L 0x20548,A1
0002246e 70 0a |p | MOVEQ.L #0x0a,D0
00022470 3f 21 |?! | MOVE.W -(A1),-(A7)
00022472 51 c8 ff fc |Q | DBF D0,0x22470
00022476 59 4f |YO | SUBQ.L #0x4,A7
00022478 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002247c 3f 01 |? | MOVE.W D1,-(A7)
0002247e 3f 06 |? | MOVE.W D6,-(A7)
00022480 4e 93 |N | JSR (A3)
00022482 50 4f |PO | ADDQ.L #0x8,A7
00022484 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022488 4e ba f7 a2 |N | JSR 0x21c2c
0002248c de fc 00 1a | | ADDA.W #0x1a,A7
00022490 30 28 23 e6 |0(# | MOVE.W (A0+0x23e6),D0
00022494 02 40 20 00 | @ | ANDI.W #0x2000,D0
00022498 67 2c |g, | BEQ 0x224c6
0002249a 9e fc 00 0e | | SUBA.W #0xe,A7
0002249e 22 4f |"O | MOVEA.L A7,A1
000224a0 45 fa e0 a6 |E | LEA.L 0x20548,A2
000224a4 70 0c |p | MOVEQ.L #0x0c,D0
000224a6 12 da | | MOVE.B (A2)+,(A1)+
000224a8 51 c8 ff fc |Q | DBF D0,0x224a6
000224ac 59 4f |YO | SUBQ.L #0x4,A7
000224ae 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000224b2 3f 01 |? | MOVE.W D1,-(A7)
000224b4 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7)
000224b8 4e 93 |N | JSR (A3)
000224ba 50 4f |PO | ADDQ.L #0x8,A7
000224bc 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000224c0 4e ba f7 6a |N j | JSR 0x21c2c
000224c4 de c4 | | ADDA.W D4,A7
000224c6 30 28 23 e6 |0(# | MOVE.W (A0+0x23e6),D0
000224ca 02 40 10 00 | @ | ANDI.W #0x1000,D0
000224ce 67 26 |g& | BEQ 0x224f6
000224d0 43 fa e0 92 |C | LEA.L 0x20564,A1
000224d4 70 06 |p | MOVEQ.L #0x06,D0
000224d6 3f 21 |?! | MOVE.W -(A1),-(A7)
000224d8 51 c8 ff fc |Q | DBF D0,0x224d6
000224dc 59 4f |YO | SUBQ.L #0x4,A7
000224de 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000224e2 3f 01 |? | MOVE.W D1,-(A7)
000224e4 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
000224e8 4e 93 |N | JSR (A3)
000224ea 50 4f |PO | ADDQ.L #0x8,A7
000224ec 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000224f0 4e ba f7 3a |N : | JSR 0x21c2c
000224f4 de c4 | | ADDA.W D4,A7
000224f6 30 28 23 e6 |0(# | MOVE.W (A0+0x23e6),D0
000224fa 02 40 08 00 | @ | ANDI.W #0x0800,D0
000224fe 67 2a |g* | BEQ 0x2252a
00022500 9e c2 | | SUBA.W D2,A7
00022502 22 4f |"O | MOVEA.L A7,A1
00022504 45 fa e0 5e |E ^ | LEA.L 0x20564,A2
00022508 70 0e |p | MOVEQ.L #0x0e,D0
0002250a 12 da | | MOVE.B (A2)+,(A1)+
0002250c 51 c8 ff fc |Q | DBF D0,0x2250a
00022510 59 4f |YO | SUBQ.L #0x4,A7
00022512 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022516 3f 01 |? | MOVE.W D1,-(A7)
00022518 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
0002251c 4e 93 |N | JSR (A3)
0002251e 50 4f |PO | ADDQ.L #0x8,A7
00022520 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022524 4e ba f7 06 |N | JSR 0x21c2c
00022528 de c3 | | ADDA.W D3,A7
0002252a 30 28 23 e6 |0(# | MOVE.W (A0+0x23e6),D0
0002252e 02 40 04 00 | @ | ANDI.W #0x0400,D0
00022532 67 2c |g, | BEQ 0x22560
00022534 9e fc 00 0e | | SUBA.W #0xe,A7
00022538 22 4f |"O | MOVEA.L A7,A1
0002253a 45 fa e0 38 |E 8 | LEA.L 0x20574,A2
0002253e 70 0c |p | MOVEQ.L #0x0c,D0
00022540 12 da | | MOVE.B (A2)+,(A1)+
00022542 51 c8 ff fc |Q | DBF D0,0x22540
00022546 59 4f |YO | SUBQ.L #0x4,A7
00022548 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002254c 3f 01 |? | MOVE.W D1,-(A7)
0002254e 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7)
00022552 4e 93 |N | JSR (A3)
00022554 50 4f |PO | ADDQ.L #0x8,A7
00022556 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002255a 4e ba f6 d0 |N | JSR 0x21c2c
0002255e de c4 | | ADDA.W D4,A7
00022560 30 28 23 e6 |0(# | MOVE.W (A0+0x23e6),D0
00022564 02 40 02 00 | @ | ANDI.W #0x0200,D0
00022568 67 24 |g$ | BEQ 0x2258e
0002256a 43 fa e0 28 |C ( | LEA.L 0x20594,A1
0002256e 70 08 |p | MOVEQ.L #0x08,D0
00022570 3f 21 |?! | MOVE.W -(A1),-(A7)
00022572 51 c8 ff fc |Q | DBF D0,0x22570
00022576 59 4f |YO | SUBQ.L #0x4,A7
00022578 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002257c 3f 01 |? | MOVE.W D1,-(A7)
0002257e 3f 04 |? | MOVE.W D4,-(A7)
00022580 4e 93 |N | JSR (A3)
00022582 50 4f |PO | ADDQ.L #0x8,A7
00022584 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022588 4e ba f6 a2 |N | JSR 0x21c2c
0002258c de c6 | | ADDA.W D6,A7
0002258e 30 28 23 e6 |0(# | MOVE.W (A0+0x23e6),D0
00022592 02 40 01 00 | @ | ANDI.W #0x0100,D0
00022596 67 2a |g* | BEQ 0x225c2
00022598 9e c2 | | SUBA.W D2,A7
0002259a 22 4f |"O | MOVEA.L A7,A1
0002259c 45 fa df f6 |E | LEA.L 0x20594,A2
000225a0 70 0e |p | MOVEQ.L #0x0e,D0
000225a2 12 da | | MOVE.B (A2)+,(A1)+
000225a4 51 c8 ff fc |Q | DBF D0,0x225a2
000225a8 59 4f |YO | SUBQ.L #0x4,A7
000225aa 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000225ae 3f 01 |? | MOVE.W D1,-(A7)
000225b0 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
000225b4 4e 93 |N | JSR (A3)
000225b6 50 4f |PO | ADDQ.L #0x8,A7
000225b8 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000225bc 4e ba f6 6e |N n | JSR 0x21c2c
000225c0 de c3 | | ADDA.W D3,A7
000225c2 30 28 23 e6 |0(# | MOVE.W (A0+0x23e6),D0
000225c6 02 40 00 02 | @ | ANDI.W #0x0002,D0
000225ca 67 28 |g( | BEQ 0x225f4
000225cc 43 fa df f0 |C | LEA.L 0x205be,A1
000225d0 70 0c |p | MOVEQ.L #0x0c,D0
000225d2 3f 21 |?! | MOVE.W -(A1),-(A7)
000225d4 51 c8 ff fc |Q | DBF D0,0x225d2
000225d8 59 4f |YO | SUBQ.L #0x4,A7
000225da 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000225de 3f 01 |? | MOVE.W D1,-(A7)
000225e0 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7)
000225e4 4e 93 |N | JSR (A3)
000225e6 50 4f |PO | ADDQ.L #0x8,A7
000225e8 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000225ec 4e ba f6 3e |N > | JSR 0x21c2c
000225f0 de fc 00 1e | | ADDA.W #0x1e,A7
000225f4 30 28 23 e6 |0(# | MOVE.W (A0+0x23e6),D0
000225f8 c0 41 | A | AND.W D1,D0
000225fa 67 28 |g( | BEQ 0x22624
000225fc 41 fa df de |A | LEA.L 0x205dc,A0
00022600 70 0e |p | MOVEQ.L #0x0e,D0
00022602 3f 20 |? | MOVE.W -(A0),-(A7)
00022604 51 c8 ff fc |Q | DBF D0,0x22602
00022608 59 4f |YO | SUBQ.L #0x4,A7
0002260a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002260e 3f 01 |? | MOVE.W D1,-(A7)
00022610 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7)
00022614 4e 93 |N | JSR (A3)
00022616 50 4f |PO | ADDQ.L #0x8,A7
00022618 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002261c 4e ba f6 0e |N | JSR 0x21c2c
00022620 de fc 00 22 | " | ADDA.W #0x22,A7
00022624 60 00 04 32 |` 2 | BRA 0x22a58
00022628 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
0002262c 02 40 80 00 | @ | ANDI.W #0x8000,D0
00022630 67 2e |g. | BEQ 0x22660
00022632 9e fc 00 0a | | SUBA.W #0xa,A7
00022636 22 4f |"O | MOVEA.L A7,A1
00022638 45 fa dd 1c |E | LEA.L 0x20356,A2
0002263c 70 08 |p | MOVEQ.L #0x08,D0
0002263e 12 da | | MOVE.B (A2)+,(A1)+
00022640 51 c8 ff fc |Q | DBF D0,0x2263e
00022644 59 4f |YO | SUBQ.L #0x4,A7
00022646 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002264a 3f 01 |? | MOVE.W D1,-(A7)
0002264c 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7)
00022650 4e 93 |N | JSR (A3)
00022652 50 4f |PO | ADDQ.L #0x8,A7
00022654 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022658 4e ba f5 d2 |N | JSR 0x21c2c
0002265c de fc 00 0e | | ADDA.W #0xe,A7
00022660 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
00022664 02 40 40 00 | @@ | ANDI.W #0x4000,D0
00022668 67 2c |g, | BEQ 0x22696
0002266a 9e c3 | | SUBA.W D3,A7
0002266c 22 4f |"O | MOVEA.L A7,A1
0002266e 45 fa dc f0 |E | LEA.L 0x20360,A2
00022672 70 12 |p | MOVEQ.L #0x12,D0
00022674 12 da | | MOVE.B (A2)+,(A1)+
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 01 |? | MOVE.W D1,-(A7)
00022682 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
00022686 4e 93 |N | JSR (A3)
00022688 50 4f |PO | ADDQ.L #0x8,A7
0002268a 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002268e 4e ba f5 9c |N | JSR 0x21c2c
00022692 de fc 00 18 | | ADDA.W #0x18,A7
00022696 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
0002269a 02 40 20 00 | @ | ANDI.W #0x2000,D0
0002269e 67 2c |g, | BEQ 0x226cc
000226a0 9e c3 | | SUBA.W D3,A7
000226a2 22 4f |"O | MOVEA.L A7,A1
000226a4 45 fa dc ce |E | LEA.L 0x20374,A2
000226a8 70 12 |p | MOVEQ.L #0x12,D0
000226aa 12 da | | MOVE.B (A2)+,(A1)+
000226ac 51 c8 ff fc |Q | DBF D0,0x226aa
000226b0 59 4f |YO | SUBQ.L #0x4,A7
000226b2 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000226b6 3f 01 |? | MOVE.W D1,-(A7)
000226b8 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
000226bc 4e 93 |N | JSR (A3)
000226be 50 4f |PO | ADDQ.L #0x8,A7
000226c0 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000226c4 4e ba f5 66 |N f | JSR 0x21c2c
000226c8 de fc 00 18 | | ADDA.W #0x18,A7
000226cc 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
000226d0 02 40 10 00 | @ | ANDI.W #0x1000,D0
000226d4 67 24 |g$ | BEQ 0x226fa
000226d6 43 fa dc c2 |C | LEA.L 0x2039a,A1
000226da 70 08 |p | MOVEQ.L #0x08,D0
000226dc 3f 21 |?! | MOVE.W -(A1),-(A7)
000226de 51 c8 ff fc |Q | DBF D0,0x226dc
000226e2 59 4f |YO | SUBQ.L #0x4,A7
000226e4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000226e8 3f 01 |? | MOVE.W D1,-(A7)
000226ea 3f 04 |? | MOVE.W D4,-(A7)
000226ec 4e 93 |N | JSR (A3)
000226ee 50 4f |PO | ADDQ.L #0x8,A7
000226f0 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000226f4 4e ba f5 36 |N 6 | JSR 0x21c2c
000226f8 de c6 | | ADDA.W D6,A7
000226fa 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
000226fe 02 40 08 00 | @ | ANDI.W #0x0800,D0
00022702 67 28 |g( | BEQ 0x2272c
00022704 2f 3a dc a0 |/: | MOVE.L 0x203a6,-(A7)
00022708 2f 3a dc 98 |/: | MOVE.L 0x203a2,-(A7)
0002270c 2f 3a dc 90 |/: | MOVE.L 0x2039e,-(A7)
00022710 2f 3a dc 88 |/: | MOVE.L 0x2039a,-(A7)
00022714 59 4f |YO | SUBQ.L #0x4,A7
00022716 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002271a 3f 01 |? | MOVE.W D1,-(A7)
0002271c 3f 02 |? | MOVE.W D2,-(A7)
0002271e 4e 93 |N | JSR (A3)
00022720 50 4f |PO | ADDQ.L #0x8,A7
00022722 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022726 4e ba f5 04 |N | JSR 0x21c2c
0002272a de c3 | | ADDA.W D3,A7
0002272c 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
00022730 02 40 04 00 | @ | ANDI.W #0x0400,D0
00022734 67 2e |g. | BEQ 0x22764
00022736 9e fc 00 18 | | SUBA.W #0x18,A7
0002273a 22 4f |"O | MOVEA.L A7,A1
0002273c 45 fa dc 6c |E l | LEA.L 0x203aa,A2
00022740 70 16 |p | MOVEQ.L #0x16,D0
00022742 12 da | | MOVE.B (A2)+,(A1)+
00022744 51 c8 ff fc |Q | DBF D0,0x22742
00022748 59 4f |YO | SUBQ.L #0x4,A7
0002274a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002274e 3f 01 |? | MOVE.W D1,-(A7)
00022750 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7)
00022754 4e 93 |N | JSR (A3)
00022756 50 4f |PO | ADDQ.L #0x8,A7
00022758 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002275c 4e ba f4 ce |N | JSR 0x21c2c
00022760 de fc 00 1c | | ADDA.W #0x1c,A7
00022764 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
00022768 02 40 02 00 | @ | ANDI.W #0x0200,D0
0002276c 67 2a |g* | BEQ 0x22798
0002276e 9e c2 | | SUBA.W D2,A7
00022770 22 4f |"O | MOVEA.L A7,A1
00022772 45 fa dc 4e |E N | LEA.L 0x203c2,A2
00022776 70 0e |p | MOVEQ.L #0x0e,D0
00022778 12 da | | MOVE.B (A2)+,(A1)+
0002277a 51 c8 ff fc |Q | DBF D0,0x22778
0002277e 59 4f |YO | SUBQ.L #0x4,A7
00022780 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022784 3f 01 |? | MOVE.W D1,-(A7)
00022786 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
0002278a 4e 93 |N | JSR (A3)
0002278c 50 4f |PO | ADDQ.L #0x8,A7
0002278e 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022792 4e ba f4 98 |N | JSR 0x21c2c
00022796 de c3 | | ADDA.W D3,A7
00022798 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
0002279c 02 40 01 00 | @ | ANDI.W #0x0100,D0
000227a0 67 2a |g* | BEQ 0x227cc
000227a2 9e c2 | | SUBA.W D2,A7
000227a4 22 4f |"O | MOVEA.L A7,A1
000227a6 45 fa dc 2a |E * | LEA.L 0x203d2,A2
000227aa 70 0e |p | MOVEQ.L #0x0e,D0
000227ac 12 da | | MOVE.B (A2)+,(A1)+
000227ae 51 c8 ff fc |Q | DBF D0,0x227ac
000227b2 59 4f |YO | SUBQ.L #0x4,A7
000227b4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000227b8 3f 01 |? | MOVE.W D1,-(A7)
000227ba 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
000227be 4e 93 |N | JSR (A3)
000227c0 50 4f |PO | ADDQ.L #0x8,A7
000227c2 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000227c6 4e ba f4 64 |N d | JSR 0x21c2c
000227ca de c3 | | ADDA.W D3,A7
000227cc 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
000227d0 02 40 00 80 | @ | ANDI.W #0x0080,D0
000227d4 67 26 |g& | BEQ 0x227fc
000227d6 43 fa dc 18 |C | LEA.L 0x203f0,A1
000227da 70 06 |p | MOVEQ.L #0x06,D0
000227dc 3f 21 |?! | MOVE.W -(A1),-(A7)
000227de 51 c8 ff fc |Q | DBF D0,0x227dc
000227e2 59 4f |YO | SUBQ.L #0x4,A7
000227e4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000227e8 3f 01 |? | MOVE.W D1,-(A7)
000227ea 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
000227ee 4e 93 |N | JSR (A3)
000227f0 50 4f |PO | ADDQ.L #0x8,A7
000227f2 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000227f6 4e ba f4 34 |N 4 | JSR 0x21c2c
000227fa de c4 | | ADDA.W D4,A7
000227fc 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
00022800 02 40 00 40 | @ @ | ANDI.W #0x0040,D0
00022804 66 22 |f" | BNE 0x22828
00022806 2f 3a db ec |/: | MOVE.L 0x203f4,-(A7)
0002280a 2f 3a db e4 |/: | MOVE.L 0x203f0,-(A7)
0002280e 59 4f |YO | SUBQ.L #0x4,A7
00022810 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022814 3f 01 |? | MOVE.W D1,-(A7)
00022816 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7)
0002281a 4e 93 |N | JSR (A3)
0002281c 50 4f |PO | ADDQ.L #0x8,A7
0002281e 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022822 4e ba f4 08 |N | JSR 0x21c2c
00022826 de c5 | | ADDA.W D5,A7
00022828 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
0002282c c0 42 | B | AND.W D2,D0
0002282e 67 24 |g$ | BEQ 0x22854
00022830 2f 3a db ce |/: | MOVE.L 0x20400,-(A7)
00022834 2f 3a db c6 |/: | MOVE.L 0x203fc,-(A7)
00022838 2f 3a db be |/: | MOVE.L 0x203f8,-(A7)
0002283c 59 4f |YO | SUBQ.L #0x4,A7
0002283e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022842 3f 01 |? | MOVE.W D1,-(A7)
00022844 3f 05 |? | MOVE.W D5,-(A7)
00022846 4e 93 |N | JSR (A3)
00022848 50 4f |PO | ADDQ.L #0x8,A7
0002284a 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002284e 4e ba f3 dc |N | JSR 0x21c2c
00022852 de c2 | | ADDA.W D2,A7
00022854 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
00022858 02 40 00 04 | @ | ANDI.W #0x0004,D0
0002285c 67 24 |g$ | BEQ 0x22882
0002285e 2f 3a db ac |/: | MOVE.L 0x2040c,-(A7)
00022862 2f 3a db a4 |/: | MOVE.L 0x20408,-(A7)
00022866 2f 3a db 9c |/: | MOVE.L 0x20404,-(A7)
0002286a 59 4f |YO | SUBQ.L #0x4,A7
0002286c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022870 3f 01 |? | MOVE.W D1,-(A7)
00022872 3f 05 |? | MOVE.W D5,-(A7)
00022874 4e 93 |N | JSR (A3)
00022876 50 4f |PO | ADDQ.L #0x8,A7
00022878 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002287c 4e ba f3 ae |N | JSR 0x21c2c
00022880 de c2 | | ADDA.W D2,A7
00022882 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
00022886 02 40 00 02 | @ | ANDI.W #0x0002,D0
0002288a 67 2c |g, | BEQ 0x228b8
0002288c 59 4f |YO | SUBQ.L #0x4,A7
0002288e 1e ba db 80 | | MOVE.B 0x20410,(A7)
00022892 1f 7a db 7d 00 01 | z } | MOVE.B 0x20411,(A7+0x1)
00022898 1f 7a db 78 00 02 | z x | MOVE.B 0x20412,(A7+0x2)
0002289e 59 4f |YO | SUBQ.L #0x4,A7
000228a0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000228a4 3f 01 |? | MOVE.W D1,-(A7)
000228a6 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7)
000228aa 4e 93 |N | JSR (A3)
000228ac 50 4f |PO | ADDQ.L #0x8,A7
000228ae 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000228b2 4e ba f3 78 |N x | JSR 0x21c2c
000228b6 50 4f |PO | ADDQ.L #0x8,A7
000228b8 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
000228bc c0 41 | A | AND.W D1,D0
000228be 67 2c |g, | BEQ 0x228ec
000228c0 59 4f |YO | SUBQ.L #0x4,A7
000228c2 1e ba db 50 | P | MOVE.B 0x20414,(A7)
000228c6 1f 7a db 4d 00 01 | z M | MOVE.B 0x20415,(A7+0x1)
000228cc 1f 7a db 48 00 02 | z H | MOVE.B 0x20416,(A7+0x2)
000228d2 59 4f |YO | SUBQ.L #0x4,A7
000228d4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000228d8 3f 01 |? | MOVE.W D1,-(A7)
000228da 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7)
000228de 4e 93 |N | JSR (A3)
000228e0 50 4f |PO | ADDQ.L #0x8,A7
000228e2 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000228e6 4e ba f3 44 |N D | JSR 0x21c2c
000228ea 50 4f |PO | ADDQ.L #0x8,A7
000228ec 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
000228f0 02 40 80 00 | @ | ANDI.W #0x8000,D0
000228f4 67 2e |g. | BEQ 0x22924
000228f6 9e fc 00 0a | | SUBA.W #0xa,A7
000228fa 22 4f |"O | MOVEA.L A7,A1
000228fc 45 fa db 1a |E | LEA.L 0x20418,A2
00022900 70 08 |p | MOVEQ.L #0x08,D0
00022902 12 da | | MOVE.B (A2)+,(A1)+
00022904 51 c8 ff fc |Q | DBF D0,0x22902
00022908 59 4f |YO | SUBQ.L #0x4,A7
0002290a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002290e 3f 01 |? | MOVE.W D1,-(A7)
00022910 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7)
00022914 4e 93 |N | JSR (A3)
00022916 50 4f |PO | ADDQ.L #0x8,A7
00022918 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002291c 4e ba f3 0e |N | JSR 0x21c2c
00022920 de fc 00 0e | | ADDA.W #0xe,A7
00022924 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
00022928 02 40 20 00 | @ | ANDI.W #0x2000,D0
0002292c 67 2a |g* | BEQ 0x22958
0002292e 9e c4 | | SUBA.W D4,A7
00022930 22 4f |"O | MOVEA.L A7,A1
00022932 45 fa da ee |E | LEA.L 0x20422,A2
00022936 70 10 |p | MOVEQ.L #0x10,D0
00022938 12 da | | MOVE.B (A2)+,(A1)+
0002293a 51 c8 ff fc |Q | DBF D0,0x22938
0002293e 59 4f |YO | SUBQ.L #0x4,A7
00022940 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022944 3f 01 |? | MOVE.W D1,-(A7)
00022946 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7)
0002294a 4e 93 |N | JSR (A3)
0002294c 50 4f |PO | ADDQ.L #0x8,A7
0002294e 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022952 4e ba f2 d8 |N | JSR 0x21c2c
00022956 de c6 | | ADDA.W D6,A7
00022958 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
0002295c 02 40 00 02 | @ | ANDI.W #0x0002,D0
00022960 67 2c |g, | BEQ 0x2298e
00022962 9e c3 | | SUBA.W D3,A7
00022964 22 4f |"O | MOVEA.L A7,A1
00022966 45 fa da cc |E | LEA.L 0x20434,A2
0002296a 70 12 |p | MOVEQ.L #0x12,D0
0002296c 12 da | | MOVE.B (A2)+,(A1)+
0002296e 51 c8 ff fc |Q | DBF D0,0x2296c
00022972 59 4f |YO | SUBQ.L #0x4,A7
00022974 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022978 3f 01 |? | MOVE.W D1,-(A7)
0002297a 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
0002297e 4e 93 |N | JSR (A3)
00022980 50 4f |PO | ADDQ.L #0x8,A7
00022982 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022986 4e ba f2 a4 |N | JSR 0x21c2c
0002298a de fc 00 18 | | ADDA.W #0x18,A7
0002298e 30 28 23 e6 |0(# | MOVE.W (A0+0x23e6),D0
00022992 02 40 80 00 | @ | ANDI.W #0x8000,D0
00022996 67 2c |g, | BEQ 0x229c4
00022998 9e c6 | | SUBA.W D6,A7
0002299a 22 4f |"O | MOVEA.L A7,A1
0002299c 45 fa da aa |E | LEA.L 0x20448,A2
000229a0 70 14 |p | MOVEQ.L #0x14,D0
000229a2 12 da | | MOVE.B (A2)+,(A1)+
000229a4 51 c8 ff fc |Q | DBF D0,0x229a2
000229a8 59 4f |YO | SUBQ.L #0x4,A7
000229aa 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000229ae 3f 01 |? | MOVE.W D1,-(A7)
000229b0 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7)
000229b4 4e 93 |N | JSR (A3)
000229b6 50 4f |PO | ADDQ.L #0x8,A7
000229b8 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000229bc 4e ba f2 6e |N n | JSR 0x21c2c
000229c0 de fc 00 1a | | ADDA.W #0x1a,A7
000229c4 30 28 23 e8 |0(# | MOVE.W (A0+0x23e8),D0
000229c8 02 40 00 40 | @ @ | ANDI.W #0x0040,D0
000229cc 67 26 |g& | BEQ 0x229f4
000229ce 43 fa da a2 |C | LEA.L 0x20472,A1
000229d2 70 04 |p | MOVEQ.L #0x04,D0
000229d4 2f 21 |/! | MOVE.L -(A1),-(A7)
000229d6 51 c8 ff fc |Q | DBF D0,0x229d4
000229da 59 4f |YO | SUBQ.L #0x4,A7
000229dc 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000229e0 3f 01 |? | MOVE.W D1,-(A7)
000229e2 3f 03 |? | MOVE.W D3,-(A7)
000229e4 4e 93 |N | JSR (A3)
000229e6 50 4f |PO | ADDQ.L #0x8,A7
000229e8 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000229ec 4e ba f2 3e |N > | JSR 0x21c2c
000229f0 de fc 00 18 | | ADDA.W #0x18,A7
000229f4 30 28 23 e8 |0(# | MOVE.W (A0+0x23e8),D0
000229f8 02 40 00 20 | @ | ANDI.W #0x0020,D0
000229fc 67 2a |g* | BEQ 0x22a28
000229fe 51 4f |QO | SUBQ.L #0x8,A7
00022a00 22 4f |"O | MOVEA.L A7,A1
00022a02 45 fa da 6e |E n | LEA.L 0x20472,A2
00022a06 70 06 |p | MOVEQ.L #0x06,D0
00022a08 12 da | | MOVE.B (A2)+,(A1)+
00022a0a 51 c8 ff fc |Q | DBF D0,0x22a08
00022a0e 59 4f |YO | SUBQ.L #0x4,A7
00022a10 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022a14 3f 01 |? | MOVE.W D1,-(A7)
00022a16 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7)
00022a1a 4e 93 |N | JSR (A3)
00022a1c 50 4f |PO | ADDQ.L #0x8,A7
00022a1e 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022a22 4e ba f2 08 |N | JSR 0x21c2c
00022a26 de c5 | | ADDA.W D5,A7
00022a28 30 28 23 e8 |0(# | MOVE.W (A0+0x23e8),D0
00022a2c c0 41 | A | AND.W D1,D0
00022a2e 67 28 |g( | BEQ 0x22a58
00022a30 2f 3a da 54 |/: T | MOVE.L 0x20486,-(A7)
00022a34 2f 3a da 4c |/: L | MOVE.L 0x20482,-(A7)
00022a38 2f 3a da 44 |/: D | MOVE.L 0x2047e,-(A7)
00022a3c 2f 3a da 3c |/: < | MOVE.L 0x2047a,-(A7)
00022a40 59 4f |YO | SUBQ.L #0x4,A7
00022a42 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022a46 3f 01 |? | MOVE.W D1,-(A7)
00022a48 3f 02 |? | MOVE.W D2,-(A7)
00022a4a 4e 93 |N | JSR (A3)
00022a4c 50 4f |PO | ADDQ.L #0x8,A7
00022a4e 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00022a52 4e ba f1 d8 |N | JSR 0x21c2c
00022a56 de c3 | | ADDA.W D3,A7
00022a58 2f 2e ff fa |/. | MOVE.L (A6-0x6),-(A7)
00022a5c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00022a62 50 4f |PO | ADDQ.L #0x8,A7
00022a64 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00022a68 4e 5e |N^ | UNLK A6
00022a6a 4e 75 |Nu | RTS
00022a6c ; --------------------------------------------------------------------------------------
00022a6c ; OMSI PASCAL Function
00022a6c ; <LVAR 0x008 2(r)>
00022a6c ; --------------------------------------------------------------------------------------
00022a6c 4e 56 ff de |NV | LINK.W A6,#0xffde
00022a70 bf d5 | | CMPA.L (A5),A7
00022a72 62 06 |b | BHI 0x22a7a
00022a74 44 fc 00 02 |D | MOVE.W #0x2,CCR
00022a78 4e 76 |Nv | TRAPV
00022a7a de fc 00 1c | | ADDA.W #0x1c,A7
00022a7e 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7)
00022a82 2f 3a dc 3a |/: : | MOVE.L 0x206be,-(A7)
00022a86 59 4f |YO | SUBQ.L #0x4,A7
00022a88 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022a8c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00022a90 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
00022a94 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00022a9a 5c 4f |\O | ADDQ.L #0x6,A7
00022a9c 3e ae 00 08 |> | MOVE.W (A6+0x8),(A7)
00022aa0 4e ba f2 1a |N | JSR 0x21cbc
00022aa4 de fc 00 0a | | ADDA.W #0xa,A7
00022aa8 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00022aac c1 ee 00 08 | | MULS.W (A6+0x8),D0
00022ab0 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00022ab6 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00022aba 52 a8 02 30 |R 0 | ADDQ.L #0x1,(A0+0x230)
00022abe 42 a8 02 44 |B D | CLR.L (A0+0x244)
00022ac2 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0
00022ac6 4e 5e |N^ | UNLK A6
00022ac8 4e 75 |Nu | RTS
00022aca ; --------------------------------------------------------------------------------------
00022aca ; OMSI PASCAL Function
00022aca ; <LVAR 0x008 2(r)>
00022aca ; --------------------------------------------------------------------------------------
00022aca 4e 56 ff e2 |NV | LINK.W A6,#0xffe2
00022ace bf d5 | | CMPA.L (A5),A7
00022ad0 62 06 |b | BHI 0x22ad8
00022ad2 44 fc 00 02 |D | MOVE.W #0x2,CCR
00022ad6 4e 76 |Nv | TRAPV
00022ad8 de fc 00 1c | | ADDA.W #0x1c,A7
00022adc 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7)
00022ae0 2f 3a db e0 |/: | MOVE.L 0x206c2,-(A7)
00022ae4 59 4f |YO | SUBQ.L #0x4,A7
00022ae6 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022aea 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00022aee 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
00022af2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00022af8 5c 4f |\O | ADDQ.L #0x6,A7
00022afa 3e ae 00 08 |> | MOVE.W (A6+0x8),(A7)
00022afe 4e ba f1 bc |N | JSR 0x21cbc
00022b02 de fc 00 0a | | ADDA.W #0xa,A7
00022b06 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00022b0a c1 ee 00 08 | | MULS.W (A6+0x8),D0
00022b0e 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00022b14 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00022b18 20 28 02 34 | ( 4 | MOVE.L (A0+0x234),D0
00022b1c d0 a8 02 44 | D | ADD.L (A0+0x244),D0
00022b20 21 40 02 34 |!@ 4 | MOVE.L D0,(A0+0x234)
00022b24 42 a8 02 44 |B D | CLR.L (A0+0x244)
00022b28 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0
00022b2c 4e 5e |N^ | UNLK A6
00022b2e 4e 75 |Nu | RTS
00022b30 ; --------------------------------------------------------------------------------------
00022b30 ; OMSI PASCAL Function
00022b30 ; <LVAR 0x008 2(r)>
00022b30 ; --------------------------------------------------------------------------------------
00022b30 4e 56 ff e2 |NV | LINK.W A6,#0xffe2
00022b34 bf d5 | | CMPA.L (A5),A7
00022b36 62 06 |b | BHI 0x22b3e
00022b38 44 fc 00 02 |D | MOVE.W #0x2,CCR
00022b3c 4e 76 |Nv | TRAPV
00022b3e de fc 00 1c | | ADDA.W #0x1c,A7
00022b42 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7)
00022b46 2f 3a db 7e |/: ~ | MOVE.L 0x206c6,-(A7)
00022b4a 59 4f |YO | SUBQ.L #0x4,A7
00022b4c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022b50 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00022b54 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
00022b58 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00022b5e 5c 4f |\O | ADDQ.L #0x6,A7
00022b60 3e ae 00 08 |> | MOVE.W (A6+0x8),(A7)
00022b64 4e ba f1 56 |N V | JSR 0x21cbc
00022b68 de fc 00 0a | | ADDA.W #0xa,A7
00022b6c 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00022b70 c1 ee 00 08 | | MULS.W (A6+0x8),D0
00022b74 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00022b7a 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00022b7e 52 a8 02 38 |R 8 | ADDQ.L #0x1,(A0+0x238)
00022b82 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0
00022b86 4e 5e |N^ | UNLK A6
00022b88 4e 75 |Nu | RTS
00022b8a ; --------------------------------------------------------------------------------------
00022b8a ; OMSI PASCAL Function
00022b8a ; <LVAR 0x00c 2(r)>
00022b8a ; <LVAR 0x008 4(r)>
00022b8a ; <LVAR -0x002 @>
00022b8a ; <LVAR -0x004 2(r)>
00022b8a ; <LVAR -0x006 2(r)>
00022b8a ; <LVAR -0x008 2(w)>
00022b8a ; <LVAR -0x00a 2(w)>
00022b8a ; <LVAR -0x00c 2(r)>
00022b8a ; <LVAR -0x00e 2(w)>
00022b8a ; <LVAR -0x010 2(r)>
00022b8a ; <LVAR -0x012 @ 2(r)>
00022b8a ; --------------------------------------------------------------------------------------
00022b8a 4e 56 ff cc |NV | LINK.W A6,#0xffcc
00022b8e bf d5 | | CMPA.L (A5),A7
00022b90 62 06 |b | BHI 0x22b98
00022b92 44 fc 00 02 |D | MOVE.W #0x2,CCR
00022b96 4e 76 |Nv | TRAPV
00022b98 de fc 00 22 | " | ADDA.W #0x22,A7
00022b9c 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7)
00022ba0 72 1c |r | MOVEQ.L #0x1c,D1
00022ba2 42 6e ff ee |Bn | CLR.W (A6-0x12)
00022ba6 42 6e ff f0 |Bn | CLR.W (A6-0x10)
00022baa 3d 7c 00 03 ff f2 |=| | MOVE.W #0x3,(A6-0xe)
00022bb0 42 6e ff f4 |Bn | CLR.W (A6-0xc)
00022bb4 3d 7c 00 04 ff f6 |=| | MOVE.W #0x4,(A6-0xa)
00022bba 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0
00022bbe e1 40 | @ | ASL.W #0x8,D0
00022bc0 52 40 |R@ | ADDQ.W #0x1,D0
00022bc2 3d 40 ff f8 |=@ | MOVE.W D0,(A6-0x8)
00022bc6 42 6e ff fa |Bn | CLR.W (A6-0x6)
00022bca 42 6e ff fc |Bn | CLR.W (A6-0x4)
00022bce 48 6e ff ee |Hn | PEA.L (A6-0x12)
00022bd2 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0
00022bd6 2f 08 |/ | MOVE.L A0,-(A7)
00022bd8 3f 01 |? | MOVE.W D1,-(A7)
00022bda 48 78 00 00 |Hx | PEA.L 0x0
00022bde 48 78 00 10 |Hx | PEA.L 0x10
00022be2 4e ba e6 60 |N ` | JSR 0x21244
00022be6 de fc 00 10 | | ADDA.W #0x10,A7
00022bea 3e 81 |> | MOVE.W D1,(A7)
00022bec 48 6e ff fe |Hn | PEA.L (A6-0x2)
00022bf0 4e ba e5 68 |N h | JSR 0x2115a
00022bf4 5c 4f |\O | ADDQ.L #0x6,A7
00022bf6 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0
00022bfa 4e 5e |N^ | UNLK A6
00022bfc 4e 75 |Nu | RTS
00022bfe ; --------------------------------------------------------------------------------------
00022bfe ; OMSI PASCAL Function
00022bfe ; <LVAR 0x008 2(r)>
00022bfe ; --------------------------------------------------------------------------------------
00022bfe 4e 56 ff ec |NV | LINK.W A6,#0xffec
00022c02 bf d5 | | CMPA.L (A5),A7
00022c04 62 06 |b | BHI 0x22c0c
00022c06 44 fc 00 02 |D | MOVE.W #0x2,CCR
00022c0a 4e 76 |Nv | TRAPV
00022c0c de fc 00 12 | | ADDA.W #0x12,A7
00022c10 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7)
00022c14 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00022c18 c1 ee 00 08 | | MULS.W (A6+0x8),D0
00022c1c 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00022c22 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00022c26 11 7c 00 0a 23 d4 | | # | MOVE.B #0x0a,(A0+0x23d4)
00022c2c 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7)
00022c30 4e ba eb 88 |N | JSR 0x217ba
00022c34 54 4f |TO | ADDQ.L #0x2,A7
00022c36 42 28 02 2c |B( , | CLR.B (A0+0x22c)
00022c3a 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0
00022c3e 4e 5e |N^ | UNLK A6
00022c40 4e 75 |Nu | RTS
00022c42 ; --------------------------------------------------------------------------------------
00022c42 ; OMSI PASCAL Function
00022c42 ; <LVAR 0x00c 2(r)>
00022c42 ; <LVAR 0x008 4(r)>
00022c42 ; --------------------------------------------------------------------------------------
00022c42 4e 56 ff c0 |NV | LINK.W A6,#0xffc0
00022c46 bf d5 | | CMPA.L (A5),A7
00022c48 62 06 |b | BHI 0x22c50
00022c4a 44 fc 00 02 |D | MOVE.W #0x2,CCR
00022c4e 4e 76 |Nv | TRAPV
00022c50 de fc 00 3e | > | ADDA.W #0x3e,A7
00022c54 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7)
00022c58 47 ee 00 0c |G | LEA.L (A6+0xc),A3
00022c5c 49 f9 00 01 02 c4 |I | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A4
00022c62 72 01 |r | MOVEQ.L #0x01,D1
00022c64 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00022c68 c1 d3 | | MULS.W (A3),D0
00022c6a 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00022c70 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00022c74 30 28 23 da |0(# | MOVE.W (A0+0x23da),D0
00022c78 02 40 00 40 | @ @ | ANDI.W #0x0040,D0
00022c7c 67 38 |g8 | BEQ 0x22cb6
00022c7e 9e fc 00 0c | | SUBA.W #0xc,A7
00022c82 22 4f |"O | MOVEA.L A7,A1
00022c84 45 fa da 44 |E D | LEA.L 0x206ca,A2
00022c88 70 0a |p | MOVEQ.L #0x0a,D0
00022c8a 12 da | | MOVE.B (A2)+,(A1)+
00022c8c 51 c8 ff fc |Q | DBF D0,0x22c8a
00022c90 59 4f |YO | SUBQ.L #0x4,A7
00022c92 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022c96 3f 01 |? | MOVE.W D1,-(A7)
00022c98 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7)
00022c9c 4e 94 |N | JSR (A4)
00022c9e 5c 4f |\O | ADDQ.L #0x6,A7
00022ca0 3e 93 |> | MOVE.W (A3),(A7)
00022ca2 4e ba f0 18 |N | JSR 0x21cbc
00022ca6 de fc 00 12 | | ADDA.W #0x12,A7
00022caa 42 28 02 2a |B( * | CLR.B (A0+0x22a)
00022cae 53 b9 00 02 57 9e |S W | SUBQ.L #0x1,0x2579e
00022cb4 60 70 |`p | BRA 0x22d26
00022cb6 30 28 23 e8 |0(# | MOVE.W (A0+0x23e8),D0
00022cba 02 40 00 08 | @ | ANDI.W #0x0008,D0
00022cbe 67 36 |g6 | BEQ 0x22cf6
00022cc0 9e fc 00 0e | | SUBA.W #0xe,A7
00022cc4 20 4f | O | MOVEA.L A7,A0
00022cc6 43 fa da 0e |C | LEA.L 0x206d6,A1
00022cca 70 0c |p | MOVEQ.L #0x0c,D0
00022ccc 10 d9 | | MOVE.B (A1)+,(A0)+
00022cce 51 c8 ff fc |Q | DBF D0,0x22ccc
00022cd2 59 4f |YO | SUBQ.L #0x4,A7
00022cd4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022cd8 3f 01 |? | MOVE.W D1,-(A7)
00022cda 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7)
00022cde 4e 94 |N | JSR (A4)
00022ce0 5c 4f |\O | ADDQ.L #0x6,A7
00022ce2 3e 93 |> | MOVE.W (A3),(A7)
00022ce4 4e ba ef d6 |N | JSR 0x21cbc
00022ce8 de fc 00 14 | | ADDA.W #0x14,A7
00022cec 3f 13 |? | MOVE.W (A3),-(A7)
00022cee 4e ba ff 0e |N | JSR 0x22bfe
00022cf2 54 4f |TO | ADDQ.L #0x2,A7
00022cf4 60 30 |`0 | BRA 0x22d26
00022cf6 30 28 23 e4 |0(# | MOVE.W (A0+0x23e4),D0
00022cfa 02 40 00 20 | @ | ANDI.W #0x0020,D0
00022cfe 67 20 |g | BEQ 0x22d20
00022d00 2f 3a d9 e2 |/: | MOVE.L 0x206e4,-(A7)
00022d04 59 4f |YO | SUBQ.L #0x4,A7
00022d06 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022d0a 3f 01 |? | MOVE.W D1,-(A7)
00022d0c 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
00022d10 4e 94 |N | JSR (A4)
00022d12 5c 4f |\O | ADDQ.L #0x6,A7
00022d14 3e 93 |> | MOVE.W (A3),(A7)
00022d16 4e ba ef a4 |N | JSR 0x21cbc
00022d1a de fc 00 0a | | ADDA.W #0xa,A7
00022d1e 60 cc |` | BRA 0x22cec
00022d20 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0
00022d24 10 81 | | MOVE.B D1,(A0)
00022d26 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4
00022d2a 4e 5e |N^ | UNLK A6
00022d2c 4e 75 |Nu | RTS
00022d2e ; --------------------------------------------------------------------------------------
00022d2e ; OMSI PASCAL Function
00022d2e ; <LVAR 0x00c 2(r)>
00022d2e ; --------------------------------------------------------------------------------------
00022d2e 4e 56 ff ea |NV | LINK.W A6,#0xffea
00022d32 bf d5 | | CMPA.L (A5),A7
00022d34 62 06 |b | BHI 0x22d3c
00022d36 44 fc 00 02 |D | MOVE.W #0x2,CCR
00022d3a 4e 76 |Nv | TRAPV
00022d3c de fc 00 14 | | ADDA.W #0x14,A7
00022d40 2f 3a d9 a6 |/: | MOVE.L 0x206e8,-(A7)
00022d44 59 4f |YO | SUBQ.L #0x4,A7
00022d46 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022d4a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00022d4e 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
00022d52 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00022d58 5c 4f |\O | ADDQ.L #0x6,A7
00022d5a 3e ae 00 0c |> | MOVE.W (A6+0xc),(A7)
00022d5e 4e ba ef 5c |N \ | JSR 0x21cbc
00022d62 50 4f |PO | ADDQ.L #0x8,A7
00022d64 3e ae 00 0c |> | MOVE.W (A6+0xc),(A7)
00022d68 4e ba fe 94 |N | JSR 0x22bfe
00022d6c 54 4f |TO | ADDQ.L #0x2,A7
00022d6e 4e 5e |N^ | UNLK A6
00022d70 4e 75 |Nu | RTS
00022d72 ; --------------------------------------------------------------------------------------
00022d72 ; OMSI PASCAL Function
00022d72 ; <LVAR 0x00c 2(r)>
00022d72 ; <LVAR 0x008 4(r)>
00022d72 ; --------------------------------------------------------------------------------------
00022d72 4e 56 ff aa |NV | LINK.W A6,#0xffaa
00022d76 bf d5 | | CMPA.L (A5),A7
00022d78 62 06 |b | BHI 0x22d80
00022d7a 44 fc 00 02 |D | MOVE.W #0x2,CCR
00022d7e 4e 76 |Nv | TRAPV
00022d80 de fc 00 54 | T | ADDA.W #0x54,A7
00022d84 48 e7 fe f8 |H | MOVEM.L A4+A3+A2+A1+A0+D6+D5+D4+D3+D2+D1+D0,-(A7)
00022d88 45 ee 00 0c |E | LEA.L (A6+0xc),A2
00022d8c 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00022d92 49 fa ef 28 |I ( | LEA.L 0x21cbc,A4
00022d96 72 01 |r | MOVEQ.L #0x01,D1
00022d98 74 04 |t | MOVEQ.L #0x04,D2
00022d9a 36 3c 20 03 |6< | MOVE.W #0x2003,D3
00022d9e 78 0a |x | MOVEQ.L #0x0a,D4
00022da0 7a 0c |z | MOVEQ.L #0x0c,D5
00022da2 7c 12 || | MOVEQ.L #0x12,D6
00022da4 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00022da8 c1 d2 | | MULS.W (A2),D0
00022daa 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00022db0 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00022db4 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
00022db8 02 40 10 00 | @ | ANDI.W #0x1000,D0
00022dbc 67 54 |gT | BEQ 0x22e12
00022dbe 10 28 02 2c | ( , | MOVE.B (A0+0x22c),D0
00022dc2 b0 03 | | CMP.B D3,D0
00022dc4 66 28 |f( | BNE 0x22dee
00022dc6 9e c5 | | SUBA.W D5,A7
00022dc8 20 4f | O | MOVEA.L A7,A0
00022dca 43 fa d9 20 |C | LEA.L 0x206ec,A1
00022dce 70 0a |p | MOVEQ.L #0x0a,D0
00022dd0 10 d9 | | MOVE.B (A1)+,(A0)+
00022dd2 51 c8 ff fc |Q | DBF D0,0x22dd0
00022dd6 59 4f |YO | SUBQ.L #0x4,A7
00022dd8 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022ddc 3f 01 |? | MOVE.W D1,-(A7)
00022dde 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7)
00022de2 4e 93 |N | JSR (A3)
00022de4 5c 4f |\O | ADDQ.L #0x6,A7
00022de6 3e 92 |> | MOVE.W (A2),(A7)
00022de8 4e 94 |N | JSR (A4)
00022dea de c6 | | ADDA.W D6,A7
00022dec 60 18 |` | BRA 0x22e06
00022dee 2f 3a d9 08 |/: | MOVE.L 0x206f8,-(A7)
00022df2 59 4f |YO | SUBQ.L #0x4,A7
00022df4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022df8 3f 01 |? | MOVE.W D1,-(A7)
00022dfa 3f 02 |? | MOVE.W D2,-(A7)
00022dfc 4e 93 |N | JSR (A3)
00022dfe 5c 4f |\O | ADDQ.L #0x6,A7
00022e00 3e 92 |> | MOVE.W (A2),(A7)
00022e02 4e 94 |N | JSR (A4)
00022e04 de c4 | | ADDA.W D4,A7
00022e06 3f 12 |? | MOVE.W (A2),-(A7)
00022e08 4e ba fd f4 |N | JSR 0x22bfe
00022e0c 54 4f |TO | ADDQ.L #0x2,A7
00022e0e 60 00 00 da |` | BRA 0x22eea
00022e12 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
00022e16 02 40 40 00 | @@ | ANDI.W #0x4000,D0
00022e1a 67 58 |gX | BEQ 0x22e74
00022e1c 10 28 02 2c | ( , | MOVE.B (A0+0x22c),D0
00022e20 b0 02 | | CMP.B D2,D0
00022e22 66 08 |f | BNE 0x22e2c
00022e24 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0
00022e28 10 81 | | MOVE.B D1,(A0)
00022e2a 60 46 |`F | BRA 0x22e72
00022e2c b0 03 | | CMP.B D3,D0
00022e2e 66 22 |f" | BNE 0x22e52
00022e30 2f 3a d8 d2 |/: | MOVE.L 0x20704,-(A7)
00022e34 2f 3a d8 ca |/: | MOVE.L 0x20700,-(A7)
00022e38 2f 3a d8 c2 |/: | MOVE.L 0x206fc,-(A7)
00022e3c 59 4f |YO | SUBQ.L #0x4,A7
00022e3e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022e42 3f 01 |? | MOVE.W D1,-(A7)
00022e44 3f 05 |? | MOVE.W D5,-(A7)
00022e46 4e 93 |N | JSR (A3)
00022e48 5c 4f |\O | ADDQ.L #0x6,A7
00022e4a 3e 92 |> | MOVE.W (A2),(A7)
00022e4c 4e 94 |N | JSR (A4)
00022e4e de c6 | | ADDA.W D6,A7
00022e50 60 18 |` | BRA 0x22e6a
00022e52 2f 3a d8 b4 |/: | MOVE.L 0x20708,-(A7)
00022e56 59 4f |YO | SUBQ.L #0x4,A7
00022e58 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022e5c 3f 01 |? | MOVE.W D1,-(A7)
00022e5e 3f 02 |? | MOVE.W D2,-(A7)
00022e60 4e 93 |N | JSR (A3)
00022e62 5c 4f |\O | ADDQ.L #0x6,A7
00022e64 3e 92 |> | MOVE.W (A2),(A7)
00022e66 4e 94 |N | JSR (A4)
00022e68 de c4 | | ADDA.W D4,A7
00022e6a 3f 12 |? | MOVE.W (A2),-(A7)
00022e6c 4e ba fd 90 |N | JSR 0x22bfe
00022e70 54 4f |TO | ADDQ.L #0x2,A7
00022e72 60 76 |`v | BRA 0x22eea
00022e74 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
00022e78 02 40 80 00 | @ | ANDI.W #0x8000,D0
00022e7c 67 34 |g4 | BEQ 0x22eb2
00022e7e 10 28 02 2c | ( , | MOVE.B (A0+0x22c),D0
00022e82 b0 03 | | CMP.B D3,D0
00022e84 66 2c |f, | BNE 0x22eb2
00022e86 9e fc 00 10 | | SUBA.W #0x10,A7
00022e8a 20 4f | O | MOVEA.L A7,A0
00022e8c 43 fa d8 7e |C ~ | LEA.L 0x2070c,A1
00022e90 70 0e |p | MOVEQ.L #0x0e,D0
00022e92 10 d9 | | MOVE.B (A1)+,(A0)+
00022e94 51 c8 ff fc |Q | DBF D0,0x22e92
00022e98 59 4f |YO | SUBQ.L #0x4,A7
00022e9a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022e9e 3f 01 |? | MOVE.W D1,-(A7)
00022ea0 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
00022ea4 4e 93 |N | JSR (A3)
00022ea6 5c 4f |\O | ADDQ.L #0x6,A7
00022ea8 3e 92 |> | MOVE.W (A2),(A7)
00022eaa 4e 94 |N | JSR (A4)
00022eac de fc 00 16 | | ADDA.W #0x16,A7
00022eb0 60 30 |`0 | BRA 0x22ee2
00022eb2 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
00022eb6 c0 43 | C | AND.W D3,D0
00022eb8 66 08 |f | BNE 0x22ec2
00022eba 30 28 23 e8 |0(# | MOVE.W (A0+0x23e8),D0
00022ebe c0 41 | A | AND.W D1,D0
00022ec0 67 08 |g | BEQ 0x22eca
00022ec2 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0
00022ec6 10 81 | | MOVE.B D1,(A0)
00022ec8 60 20 |` | BRA 0x22eea
00022eca 2f 3a d8 50 |/: P | MOVE.L 0x2071c,-(A7)
00022ece 59 4f |YO | SUBQ.L #0x4,A7
00022ed0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022ed4 3f 01 |? | MOVE.W D1,-(A7)
00022ed6 3f 02 |? | MOVE.W D2,-(A7)
00022ed8 4e 93 |N | JSR (A3)
00022eda 5c 4f |\O | ADDQ.L #0x6,A7
00022edc 3e 92 |> | MOVE.W (A2),(A7)
00022ede 4e 94 |N | JSR (A4)
00022ee0 de c4 | | ADDA.W D4,A7
00022ee2 3f 12 |? | MOVE.W (A2),-(A7)
00022ee4 4e ba fd 18 |N | JSR 0x22bfe
00022ee8 54 4f |TO | ADDQ.L #0x2,A7
00022eea 4c df 1f 7f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+A0+A1+A2+A3+A4
00022eee 4e 5e |N^ | UNLK A6
00022ef0 4e 75 |Nu | RTS
00022ef2 ; --------------------------------------------------------------------------------------
00022ef2 ; OMSI PASCAL Function
00022ef2 ; <LVAR 0x00c 2(r)>
00022ef2 ; <LVAR 0x008 4(r)>
00022ef2 ; --------------------------------------------------------------------------------------
00022ef2 4e 56 ff c4 |NV | LINK.W A6,#0xffc4
00022ef6 bf d5 | | CMPA.L (A5),A7
00022ef8 62 06 |b | BHI 0x22f00
00022efa 44 fc 00 02 |D | MOVE.W #0x2,CCR
00022efe 4e 76 |Nv | TRAPV
00022f00 de fc 00 3a | : | ADDA.W #0x3a,A7
00022f04 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7)
00022f08 47 ee 00 0c |G | LEA.L (A6+0xc),A3
00022f0c 49 f9 00 01 02 c4 |I | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A4
00022f12 72 01 |r | MOVEQ.L #0x01,D1
00022f14 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00022f18 c1 d3 | | MULS.W (A3),D0
00022f1a 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00022f20 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00022f24 30 28 23 da |0(# | MOVE.W (A0+0x23da),D0
00022f28 02 40 00 40 | @ @ | ANDI.W #0x0040,D0
00022f2c 67 36 |g6 | BEQ 0x22f64
00022f2e 51 4f |QO | SUBQ.L #0x8,A7
00022f30 22 4f |"O | MOVEA.L A7,A1
00022f32 45 fa d7 ec |E | LEA.L 0x20720,A2
00022f36 70 06 |p | MOVEQ.L #0x06,D0
00022f38 12 da | | MOVE.B (A2)+,(A1)+
00022f3a 51 c8 ff fc |Q | DBF D0,0x22f38
00022f3e 59 4f |YO | SUBQ.L #0x4,A7
00022f40 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022f44 3f 01 |? | MOVE.W D1,-(A7)
00022f46 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7)
00022f4a 4e 94 |N | JSR (A4)
00022f4c 5c 4f |\O | ADDQ.L #0x6,A7
00022f4e 3e 93 |> | MOVE.W (A3),(A7)
00022f50 4e ba ed 6a |N j | JSR 0x21cbc
00022f54 de fc 00 0e | | ADDA.W #0xe,A7
00022f58 42 28 02 2a |B( * | CLR.B (A0+0x22a)
00022f5c 53 b9 00 02 57 9e |S W | SUBQ.L #0x1,0x2579e
00022f62 60 68 |`h | BRA 0x22fcc
00022f64 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
00022f68 02 40 08 00 | @ | ANDI.W #0x0800,D0
00022f6c 67 28 |g( | BEQ 0x22f96
00022f6e 43 fa d7 c2 |C | LEA.L 0x20732,A1
00022f72 70 04 |p | MOVEQ.L #0x04,D0
00022f74 3f 21 |?! | MOVE.W -(A1),-(A7)
00022f76 51 c8 ff fc |Q | DBF D0,0x22f74
00022f7a 59 4f |YO | SUBQ.L #0x4,A7
00022f7c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022f80 3f 01 |? | MOVE.W D1,-(A7)
00022f82 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7)
00022f86 4e 94 |N | JSR (A4)
00022f88 5c 4f |\O | ADDQ.L #0x6,A7
00022f8a 3e 93 |> | MOVE.W (A3),(A7)
00022f8c 4e ba ed 2e |N . | JSR 0x21cbc
00022f90 de fc 00 10 | | ADDA.W #0x10,A7
00022f94 60 c2 |` | BRA 0x22f58
00022f96 30 28 23 e2 |0(# | MOVE.W (A0+0x23e2),D0
00022f9a 02 40 00 02 | @ | ANDI.W #0x0002,D0
00022f9e 67 08 |g | BEQ 0x22fa8
00022fa0 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0
00022fa4 10 81 | | MOVE.B D1,(A0)
00022fa6 60 24 |`$ | BRA 0x22fcc
00022fa8 2f 3a d7 88 |/: | MOVE.L 0x20732,-(A7)
00022fac 59 4f |YO | SUBQ.L #0x4,A7
00022fae 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00022fb2 3f 01 |? | MOVE.W D1,-(A7)
00022fb4 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
00022fb8 4e 94 |N | JSR (A4)
00022fba 5c 4f |\O | ADDQ.L #0x6,A7
00022fbc 3e 93 |> | MOVE.W (A3),(A7)
00022fbe 4e ba ec fc |N | JSR 0x21cbc
00022fc2 50 4f |PO | ADDQ.L #0x8,A7
00022fc4 3e 93 |> | MOVE.W (A3),(A7)
00022fc6 4e ba fc 36 |N 6 | JSR 0x22bfe
00022fca 54 4f |TO | ADDQ.L #0x2,A7
00022fcc 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4
00022fd0 4e 5e |N^ | UNLK A6
00022fd2 4e 75 |Nu | RTS
00022fd4 ; --------------------------------------------------------------------------------------
00022fd4 ; OMSI PASCAL Function
00022fd4 ; <LVAR 0x00c 2(r)>
00022fd4 ; --------------------------------------------------------------------------------------
00022fd4 4e 56 ff cc |NV | LINK.W A6,#0xffcc
00022fd8 bf d5 | | CMPA.L (A5),A7
00022fda 62 06 |b | BHI 0x22fe2
00022fdc 44 fc 00 02 |D | MOVE.W #0x2,CCR
00022fe0 4e 76 |Nv | TRAPV
00022fe2 de fc 00 32 | 2 | ADDA.W #0x32,A7
00022fe6 48 e7 f0 c0 |H | MOVEM.L A1+A0+D3+D2+D1+D0,-(A7)
00022fea 43 ee 00 0c |C | LEA.L (A6+0xc),A1
00022fee 74 03 |t | MOVEQ.L #0x03,D2
00022ff0 76 02 |v | MOVEQ.L #0x02,D3
00022ff2 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00022ff6 c1 d1 | | MULS.W (A1),D0
00022ff8 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00022ffe 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023002 10 28 02 2c | ( , | MOVE.B (A0+0x22c),D0
00023006 b0 02 | | CMP.B D2,D0
00023008 67 04 |g | BEQ 0x2300e
0002300a b0 03 | | CMP.B D3,D0
0002300c 66 42 |fB | BNE 0x23050
0002300e 22 28 02 44 |"( D | MOVE.L (A0+0x244),D1
00023012 0c 81 00 00 00 0a | | CMPI.L #0x0000000a,D1
00023018 6f 10 |o | BLE 0x2302a
0002301a 3f 11 |? | MOVE.W (A1),-(A7)
0002301c 4e ba fa 4e |N N | JSR 0x22a6c
00023020 3e 91 |> | MOVE.W (A1),(A7)
00023022 4e ba fb da |N | JSR 0x22bfe
00023026 54 4f |TO | ADDQ.L #0x2,A7
00023028 60 24 |`$ | BRA 0x2304e
0002302a 32 28 23 da |2(# | MOVE.W (A0+0x23da),D1
0002302e c2 43 | C | AND.W D3,D1
00023030 66 10 |f | BNE 0x23042
00023032 b0 02 | | CMP.B D2,D0
00023034 66 06 |f | BNE 0x2303c
00023036 11 42 23 d4 | B# | MOVE.B D2,(A0+0x23d4)
0002303a 60 06 |` | BRA 0x23042
0002303c 11 7c 00 05 23 d4 | | # | MOVE.B #0x05,(A0+0x23d4)
00023042 3f 11 |? | MOVE.W (A1),-(A7)
00023044 4e ba e7 74 |N t | JSR 0x217ba
00023048 54 4f |TO | ADDQ.L #0x2,A7
0002304a 52 a8 02 44 |R D | ADDQ.L #0x1,(A0+0x244)
0002304e 60 2a |`* | BRA 0x2307a
00023050 2f 3a d6 e4 |/: | MOVE.L 0x20736,-(A7)
00023054 59 4f |YO | SUBQ.L #0x4,A7
00023056 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002305a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
0002305e 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
00023062 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00023068 5c 4f |\O | ADDQ.L #0x6,A7
0002306a 3e 91 |> | MOVE.W (A1),(A7)
0002306c 4e ba ec 4e |N N | JSR 0x21cbc
00023070 50 4f |PO | ADDQ.L #0x8,A7
00023072 3e 91 |> | MOVE.W (A1),(A7)
00023074 4e ba fb 88 |N | JSR 0x22bfe
00023078 54 4f |TO | ADDQ.L #0x2,A7
0002307a 4c df 03 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1
0002307e 4e 5e |N^ | UNLK A6
00023080 4e 75 |Nu | RTS
00023082 ; --------------------------------------------------------------------------------------
00023082 ; OMSI PASCAL Function
00023082 ; <LVAR 0x00c 2(r)>
00023082 ; --------------------------------------------------------------------------------------
00023082 4e 56 ff ea |NV | LINK.W A6,#0xffea
00023086 bf d5 | | CMPA.L (A5),A7
00023088 62 06 |b | BHI 0x23090
0002308a 44 fc 00 02 |D | MOVE.W #0x2,CCR
0002308e 4e 76 |Nv | TRAPV
00023090 de fc 00 14 | | ADDA.W #0x14,A7
00023094 2f 3a d6 a4 |/: | MOVE.L 0x2073a,-(A7)
00023098 59 4f |YO | SUBQ.L #0x4,A7
0002309a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002309e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
000230a2 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
000230a6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
000230ac 5c 4f |\O | ADDQ.L #0x6,A7
000230ae 3e ae 00 0c |> | MOVE.W (A6+0xc),(A7)
000230b2 4e ba ec 08 |N | JSR 0x21cbc
000230b6 50 4f |PO | ADDQ.L #0x8,A7
000230b8 3e ae 00 0c |> | MOVE.W (A6+0xc),(A7)
000230bc 4e ba fb 40 |N @ | JSR 0x22bfe
000230c0 54 4f |TO | ADDQ.L #0x2,A7
000230c2 4e 5e |N^ | UNLK A6
000230c4 4e 75 |Nu | RTS
000230c6 ; --------------------------------------------------------------------------------------
000230c6 ; OMSI PASCAL Function
000230c6 ; <LVAR 0x00c 2(r)>
000230c6 ; --------------------------------------------------------------------------------------
000230c6 4e 56 ff e2 |NV | LINK.W A6,#0xffe2
000230ca bf d5 | | CMPA.L (A5),A7
000230cc 62 06 |b | BHI 0x230d4
000230ce 44 fc 00 02 |D | MOVE.W #0x2,CCR
000230d2 4e 76 |Nv | TRAPV
000230d4 de fc 00 1c | | ADDA.W #0x1c,A7
000230d8 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7)
000230dc 2f 3a d6 60 |/: ` | MOVE.L 0x2073e,-(A7)
000230e0 59 4f |YO | SUBQ.L #0x4,A7
000230e2 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000230e6 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
000230ea 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
000230ee 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
000230f4 5c 4f |\O | ADDQ.L #0x6,A7
000230f6 3e ae 00 0c |> | MOVE.W (A6+0xc),(A7)
000230fa 4e ba eb c0 |N | JSR 0x21cbc
000230fe de fc 00 0a | | ADDA.W #0xa,A7
00023102 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00023106 c1 ee 00 0c | | MULS.W (A6+0xc),D0
0002310a 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023110 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023114 42 28 02 2a |B( * | CLR.B (A0+0x22a)
00023118 53 b9 00 02 57 9e |S W | SUBQ.L #0x1,0x2579e
0002311e 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0
00023122 4e 5e |N^ | UNLK A6
00023124 4e 75 |Nu | RTS
00023126 ; --------------------------------------------------------------------------------------
00023126 ; OMSI PASCAL Function
00023126 ; <LVAR 0x00c 2(r)>
00023126 ; <LVAR 0x008 4(r)>
00023126 ; --------------------------------------------------------------------------------------
00023126 4e 56 ff b6 |NV | LINK.W A6,#0xffb6
0002312a bf d5 | | CMPA.L (A5),A7
0002312c 62 06 |b | BHI 0x23134
0002312e 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023132 4e 76 |Nv | TRAPV
00023134 de fc 00 34 | 4 | ADDA.W #0x34,A7
00023138 48 e7 e1 e0 |H | MOVEM.L A2+A1+A0+D7+D2+D1+D0,-(A7)
0002313c 45 ee 00 0c |E | LEA.L (A6+0xc),A2
00023140 74 01 |t | MOVEQ.L #0x01,D2
00023142 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0
00023146 42 10 |B | CLR.B (A0)
00023148 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
0002314c c1 d2 | | MULS.W (A2),D0
0002314e 43 f9 00 02 57 8e |C W | LEA.L 0x2578e,A1
00023154 43 f1 00 00 |C | LEA.L (A1+D0.W),A1
00023158 3f 12 |? | MOVE.W (A2),-(A7)
0002315a 48 69 23 da |Hi# | PEA.L (A1+0x23da)
0002315e 4e ba fa 2a |N * | JSR 0x22b8a
00023162 5c 4f |\O | ADDQ.L #0x6,A7
00023164 30 29 23 e2 |0)# | MOVE.W (A1+0x23e2),D0
00023168 c0 42 | B | AND.W D2,D0
0002316a 67 04 |g | BEQ 0x23170
0002316c 13 42 02 2b | B + | MOVE.B D2,(A1+0x22b)
00023170 30 29 23 da |0)# | MOVE.W (A1+0x23da),D0
00023174 02 40 00 0e | @ | ANDI.W #0x000e,D0
00023178 e2 48 | H | LSR.W #0x1,D0
0002317a 42 81 |B | CLR.L D1
0002317c 32 00 |2 | MOVE.W D0,D1
0002317e 2e 01 |. | MOVE.L D1,D7
00023180 20 07 | | MOVE.L D7,D0
00023182 0c 80 00 00 00 07 | | CMPI.L #0x00000007,D0
00023188 63 02 |c | BLS 0x2318c
0002318a 4e 4e |NN | TRAP #14
0002318c d0 40 | @ | ADD.W D0,D0
0002318e 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W
00023196 00 10 | | .CONST 0x10 ; [0x0] -> 0x231a6
00023198 00 1a | | .CONST 0x1a ; [0x1] -> 0x231b0
0002319a 00 24 | $ | .CONST 0x24 ; [0x2] -> 0x231ba
0002319c 00 2e | . | .CONST 0x2e ; [0x3] -> 0x231c4
0002319e 00 38 | 8 | .CONST 0x38 ; [0x4] -> 0x231ce
000231a0 00 42 | B | .CONST 0x42 ; [0x5] -> 0x231d8
000231a2 00 44 | D | .CONST 0x44 ; [0x6] -> 0x231da
000231a4 00 4e | N | .CONST 0x4e ; [0x7] -> 0x231e4
000231a6 switch@0x2318e[0x0]:
000231a6 3f 12 |? | MOVE.W (A2),-(A7)
000231a8 48 50 |HP | PEA.L (A0)
000231aa 4e ba fa 96 |N | JSR 0x22c42
000231ae 60 3c |`< | BRA 0x231ec
000231b0 switch@0x2318e[0x1]:
000231b0 3f 12 |? | MOVE.W (A2),-(A7)
000231b2 48 50 |HP | PEA.L (A0)
000231b4 4e ba fb 78 |N x | JSR 0x22d2e
000231b8 60 32 |`2 | BRA 0x231ec
000231ba switch@0x2318e[0x2]:
000231ba 3f 12 |? | MOVE.W (A2),-(A7)
000231bc 48 50 |HP | PEA.L (A0)
000231be 4e ba fb b2 |N | JSR 0x22d72
000231c2 60 28 |`( | BRA 0x231ec
000231c4 switch@0x2318e[0x3]:
000231c4 3f 12 |? | MOVE.W (A2),-(A7)
000231c6 48 50 |HP | PEA.L (A0)
000231c8 4e ba fd 28 |N ( | JSR 0x22ef2
000231cc 60 1e |` | BRA 0x231ec
000231ce switch@0x2318e[0x4]:
000231ce 3f 12 |? | MOVE.W (A2),-(A7)
000231d0 48 50 |HP | PEA.L (A0)
000231d2 4e ba fe 00 |N | JSR 0x22fd4
000231d6 60 14 |` | BRA 0x231ec
000231d8 switch@0x2318e[0x5]:
000231d8 60 f4 |` | BRA switch@0x2318e[0x4]
000231da switch@0x2318e[0x6]:
000231da 3f 12 |? | MOVE.W (A2),-(A7)
000231dc 48 50 |HP | PEA.L (A0)
000231de 4e ba fe a2 |N | JSR 0x23082
000231e2 60 08 |` | BRA 0x231ec
000231e4 switch@0x2318e[0x7]:
000231e4 3f 12 |? | MOVE.W (A2),-(A7)
000231e6 48 50 |HP | PEA.L (A0)
000231e8 4e ba fe dc |N | JSR 0x230c6
000231ec 5c 4f |\O | ADDQ.L #0x6,A7
000231ee 4c df 07 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1+A2
000231f2 4e 5e |N^ | UNLK A6
000231f4 4e 75 |Nu | RTS
000231f6 ; --------------------------------------------------------------------------------------
000231f6 ; OMSI PASCAL Function
000231f6 ; <LVAR 0x008 2(r)>
000231f6 ; --------------------------------------------------------------------------------------
000231f6 4e 56 ff ec |NV | LINK.W A6,#0xffec
000231fa bf d5 | | CMPA.L (A5),A7
000231fc 62 06 |b | BHI 0x23204
000231fe 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023202 4e 76 |Nv | TRAPV
00023204 de fc 00 12 | | ADDA.W #0x12,A7
00023208 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7)
0002320c 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00023210 c1 ee 00 08 | | MULS.W (A6+0x8),D0
00023214 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
0002321a 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
0002321e 11 7c 00 0b 23 d4 | | # | MOVE.B #0x0b,(A0+0x23d4)
00023224 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7)
00023228 4e ba e5 90 |N | JSR 0x217ba
0002322c 54 4f |TO | ADDQ.L #0x2,A7
0002322e 11 7c 00 01 02 2c | | , | MOVE.B #0x01,(A0+0x22c)
00023234 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0
00023238 4e 5e |N^ | UNLK A6
0002323a 4e 75 |Nu | RTS
0002323c ; --------------------------------------------------------------------------------------
0002323c ; OMSI PASCAL Function
0002323c ; <LVAR 0x008 2(r)>
0002323c ; --------------------------------------------------------------------------------------
0002323c 4e 56 ff c6 |NV | LINK.W A6,#0xffc6
00023240 bf d5 | | CMPA.L (A5),A7
00023242 62 06 |b | BHI 0x2324a
00023244 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023248 4e 76 |Nv | TRAPV
0002324a de fc 00 34 | 4 | ADDA.W #0x34,A7
0002324e 48 e7 db c0 |H | MOVEM.L A1+A0+D7+D6+D4+D3+D1+D0,-(A7)
00023252 72 3f |r? | MOVEQ.L #0x3f,D1
00023254 59 4f |YO | SUBQ.L #0x4,A7
00023256 4e ba da 6a |N j | JSR 0x20cc2
0002325a 20 1f | | MOVE.L (A7)+,D0
0002325c 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0
00023262 63 02 |c | BLS 0x23266
00023264 4e 4f |NO | TRAP #15
00023266 3c 00 |< | MOVE.W D0,D6
00023268 59 4f |YO | SUBQ.L #0x4,A7
0002326a 48 78 00 12 |Hx | PEA.L 0x12
0002326e 48 78 20 00 |Hx | PEA.L 0x2000
00023272 4e ba d9 f4 |N | JSR 0x20c68
00023276 50 4f |PO | ADDQ.L #0x8,A7
00023278 2e 1f |. | MOVE.L (A7)+,D7
0002327a 08 07 00 00 | | BTST.L #0x0,D7
0002327e 67 02 |g | BEQ 0x23282
00023280 52 87 |R | ADDQ.L #0x1,D7
00023282 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00023286 c1 ee 00 08 | | MULS.W (A6+0x8),D0
0002328a 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023290 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023294 59 4f |YO | SUBQ.L #0x4,A7
00023296 1e a8 03 d0 | | MOVE.B (A0+0x3d0),(A7)
0002329a 1f 68 03 d1 00 01 | h | MOVE.B (A0+0x3d1),(A7+0x1)
000232a0 1f 68 03 d2 00 02 | h | MOVE.B (A0+0x3d2),(A7+0x2)
000232a6 1f 68 03 d3 00 03 | h | MOVE.B (A0+0x3d3),(A7+0x3)
000232ac 3f 06 |? | MOVE.W D6,-(A7)
000232ae 28 07 |( | MOVE.L D7,D4
000232b0 76 02 |v | MOVEQ.L #0x02,D3
000232b2 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4
000232b8 55 4f |UO | SUBQ.L #0x2,A7
000232ba 0c 84 00 00 ff ff | | CMPI.L #0x0000ffff,D4
000232c0 63 02 |c | BLS 0x232c4
000232c2 4e 4f |NO | TRAP #15
000232c4 3e 84 |> | MOVE.W D4,(A7)
000232c6 4e b9 00 01 02 36 |N 6 | JSR KERNCALL_1b
000232cc 50 4f |PO | ADDQ.L #0x8,A7
000232ce 11 7c 00 04 23 d4 | | # | MOVE.B #0x04,(A0+0x23d4)
000232d4 21 47 23 d6 |!G# | MOVE.L D7,(A0+0x23d6)
000232d8 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7)
000232dc 4e ba e4 dc |N | JSR 0x217ba
000232e0 54 4f |TO | ADDQ.L #0x2,A7
000232e2 11 7c 00 02 02 2c | | , | MOVE.B #0x02,(A0+0x22c)
000232e8 20 28 02 48 | ( H | MOVE.L (A0+0x248),D0
000232ec b0 81 | | CMP.L D1,D0
000232ee 63 02 |c | BLS 0x232f2
000232f0 4e 4f |NO | TRAP #15
000232f2 28 00 |( | MOVE.L D0,D4
000232f4 76 06 |v | MOVEQ.L #0x06,D3
000232f6 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4
000232fc 43 e8 02 2a |C * | LEA.L (A0+0x22a),A1
00023300 33 86 48 26 |3 H& | MOVE.W D6,(A1+D4.L+#0x26)
00023304 20 28 02 48 | ( H | MOVE.L (A0+0x248),D0
00023308 b0 81 | | CMP.L D1,D0
0002330a 63 02 |c | BLS 0x2330e
0002330c 4e 4f |NO | TRAP #15
0002330e 28 00 |( | MOVE.L D0,D4
00023310 76 06 |v | MOVEQ.L #0x06,D3
00023312 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4
00023318 23 87 48 28 |# H( | MOVE.L D7,(A1+D4.L+#0x28)
0002331c 4c df 03 db |L | MOVEM.L (A7)+,D0+D1+D3+D4+D6+D7+A0+A1
00023320 4e 5e |N^ | UNLK A6
00023322 4e 75 |Nu | RTS
00023324 ; --------------------------------------------------------------------------------------
00023324 ; OMSI PASCAL Function
00023324 ; <LVAR 0x008 2(r)>
00023324 ; --------------------------------------------------------------------------------------
00023324 4e 56 ff da |NV | LINK.W A6,#0xffda ; Spelunked
00023328 bf d5 | | CMPA.L (A5),A7
0002332a 62 06 |b | BHI 0x23332
0002332c 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023330 4e 76 |Nv | TRAPV
00023332 de fc 00 20 | | ADDA.W #0x20,A7
00023336 48 e7 81 80 |H | MOVEM.L A0+D7+D0,-(A7)
0002333a 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
0002333e c1 ee 00 08 | | MULS.W (A6+0x8),D0
00023342 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023348 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
0002334c 59 4f |YO | SUBQ.L #0x4,A7
0002334e 48 78 00 01 |Hx | PEA.L 0x1
00023352 2f 28 02 4c |/( L | MOVE.L (A0+0x24c),-(A7)
00023356 4e ba d9 10 |N | JSR 0x20c68
0002335a 50 4f |PO | ADDQ.L #0x8,A7
0002335c 2e 1f |. | MOVE.L (A7)+,D7
0002335e 11 7c 00 07 23 d4 | | # | MOVE.B #0x07,(A0+0x23d4)
00023364 21 47 23 d6 |!G# | MOVE.L D7,(A0+0x23d6)
00023368 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7)
0002336c 4e ba e4 4c |N L | JSR 0x217ba
00023370 54 4f |TO | ADDQ.L #0x2,A7
00023372 9f a8 02 48 | H | SUB.L D7,(A0+0x248)
00023376 11 7c 00 04 02 2c | | , | MOVE.B #0x04,(A0+0x22c)
0002337c 4c df 01 81 |L | MOVEM.L (A7)+,D0+D7+A0
00023380 4e 5e |N^ | UNLK A6
00023382 4e 75 |Nu | RTS
00023384 ; --------------------------------------------------------------------------------------
00023384 ; OMSI PASCAL Function
00023384 ; <LVAR 0x008 2(r)>
00023384 ; --------------------------------------------------------------------------------------
00023384 4e 56 ff e8 |NV | LINK.W A6,#0xffe8
00023388 bf d5 | | CMPA.L (A5),A7
0002338a 62 06 |b | BHI 0x23392
0002338c 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023390 4e 76 |Nv | TRAPV
00023392 de fc 00 12 | | ADDA.W #0x12,A7
00023396 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7)
0002339a 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
0002339e c1 ee 00 08 | | MULS.W (A6+0x8),D0
000233a2 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
000233a8 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
000233ac 11 7c 00 09 23 d4 | | # | MOVE.B #0x09,(A0+0x23d4)
000233b2 21 7c 00 00 00 01 23 d6 |!| # | MOVE.L #0x1,(A0+0x23d6)
000233ba 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7)
000233be 4e ba e3 fa |N | JSR 0x217ba
000233c2 54 4f |TO | ADDQ.L #0x2,A7
000233c4 42 a8 02 48 |B H | CLR.L (A0+0x248)
000233c8 11 7c 00 05 02 2c | | , | MOVE.B #0x05,(A0+0x22c)
000233ce 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0
000233d2 4e 5e |N^ | UNLK A6
000233d4 4e 75 |Nu | RTS
000233d6 ; --------------------------------------------------------------------------------------
000233d6 ; OMSI PASCAL Function
000233d6 ; <LVAR 0x008 2(r)>
000233d6 ; --------------------------------------------------------------------------------------
000233d6 4e 56 ff e8 |NV | LINK.W A6,#0xffe8
000233da bf d5 | | CMPA.L (A5),A7
000233dc 62 06 |b | BHI 0x233e4
000233de 44 fc 00 02 |D | MOVE.W #0x2,CCR
000233e2 4e 76 |Nv | TRAPV
000233e4 de fc 00 12 | | ADDA.W #0x12,A7
000233e8 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7)
000233ec 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
000233f0 c1 ee 00 08 | | MULS.W (A6+0x8),D0
000233f4 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
000233fa 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
000233fe 11 7c 00 08 23 d4 | | # | MOVE.B #0x08,(A0+0x23d4)
00023404 21 7c 00 00 00 01 23 d6 |!| # | MOVE.L #0x1,(A0+0x23d6)
0002340c 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7)
00023410 4e ba e3 a8 |N | JSR 0x217ba
00023414 54 4f |TO | ADDQ.L #0x2,A7
00023416 11 7c 00 06 02 2c | | , | MOVE.B #0x06,(A0+0x22c)
0002341c 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0
00023420 4e 5e |N^ | UNLK A6
00023422 4e 75 |Nu | RTS
00023424 ; --------------------------------------------------------------------------------------
00023424 ; OMSI PASCAL Function
00023424 ; <LVAR 0x00a 2(r)>
00023424 ; <LVAR 0x008 1(r)>
00023424 ; <LVAR -0x004 @ 1(rw)>
00023424 ; --------------------------------------------------------------------------------------
00023424 4e 56 ff 9e |NV | LINK.W A6,#0xff9e
00023428 bf d5 | | CMPA.L (A5),A7
0002342a 62 06 |b | BHI 0x23432
0002342c 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023430 4e 76 |Nv | TRAPV
00023432 de fc 00 5e | ^ | ADDA.W #0x5e,A7
00023436 48 e7 f8 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7)
0002343a 47 ee 00 0a |G | LEA.L (A6+0xa),A3
0002343e 49 ee ff fc |I | LEA.L (A6-0x4),A4
00023442 72 10 |r | MOVEQ.L #0x10,D1
00023444 74 01 |t | MOVEQ.L #0x01,D2
00023446 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
0002344a c1 d3 | | MULS.W (A3),D0
0002344c 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023452 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023456 4a 2e 00 08 |J. | TST.B (A6+0x8)
0002345a 67 04 |g | BEQ 0x23460
0002345c 18 82 | | MOVE.B D2,(A4)
0002345e 60 0a |` | BRA 0x2346a
00023460 3f 13 |? | MOVE.W (A3),-(A7)
00023462 48 54 |HT | PEA.L (A4)
00023464 4e ba fc c0 |N | JSR 0x23126
00023468 5c 4f |\O | ADDQ.L #0x6,A7
0002346a 4a 14 |J | TST.B (A4)
0002346c 67 00 00 c0 |g | BEQ 0x2352e
00023470 4a 39 00 02 57 a2 |J9 W | TST.B 0x257a2
00023476 67 38 |g8 | BEQ 0x234b0
00023478 59 4f |YO | SUBQ.L #0x4,A7
0002347a 3f 13 |? | MOVE.W (A3),-(A7)
0002347c d3 57 | W | ADD.W D1,(A7)
0002347e 4e ba dd 30 |N 0 | JSR 0x211b0
00023482 54 4f |TO | ADDQ.L #0x2,A7
00023484 4a 9f |J | TST.L (A7)+
00023486 67 28 |g( | BEQ 0x234b0
00023488 43 fa d2 da |C | LEA.L 0x20764,A1
0002348c 70 10 |p | MOVEQ.L #0x10,D0
0002348e 3f 21 |?! | MOVE.W -(A1),-(A7)
00023490 51 c8 ff fc |Q | DBF D0,0x2348e
00023494 59 4f |YO | SUBQ.L #0x4,A7
00023496 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002349a 3f 02 |? | MOVE.W D2,-(A7)
0002349c 3f 3c 00 22 |?< " | MOVE.W #0x22,-(A7)
000234a0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
000234a6 50 4f |PO | ADDQ.L #0x8,A7
000234a8 4e ba d7 98 |N | JSR 0x20c42
000234ac de fc 00 26 | & | ADDA.W #0x26,A7
000234b0 20 28 02 48 | ( H | MOVE.L (A0+0x248),D0
000234b4 0c 80 00 00 00 3f | ? | CMPI.L #0x0000003f,D0
000234ba 63 02 |c | BLS 0x234be
000234bc 4e 4f |NO | TRAP #15
000234be 28 00 |( | MOVE.L D0,D4
000234c0 76 06 |v | MOVEQ.L #0x06,D3
000234c2 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4
000234c8 9e c1 | | SUBA.W D1,A7
000234ca 22 4f |"O | MOVEA.L A7,A1
000234cc 45 e8 02 3c |E < | LEA.L (A0+0x23c),A2
000234d0 70 07 |p | MOVEQ.L #0x07,D0
000234d2 12 da | | MOVE.B (A2)+,(A1)+
000234d4 51 c8 ff fc |Q | DBF D0,0x234d2
000234d8 51 4f |QO | SUBQ.L #0x8,A7
000234da 43 e8 02 2a |C * | LEA.L (A0+0x22a),A1
000234de 2f 31 48 28 |/1H( | MOVE.L (A1+D4.L+#0x28),-(A7)
000234e2 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad
000234e8 58 4f |XO | ADDQ.L #0x4,A7
000234ea 4e b9 00 01 03 14 |N | JSR Add(a, b : Quad) : Quad
000234f0 de c1 | | ADDA.W D1,A7
000234f2 43 e8 02 3c |C < | LEA.L (A0+0x23c),A1
000234f6 24 4f |$O | MOVEA.L A7,A2
000234f8 70 07 |p | MOVEQ.L #0x07,D0
000234fa 12 da | | MOVE.B (A2)+,(A1)+
000234fc 51 c8 ff fc |Q | DBF D0,0x234fa
00023500 50 4f |PO | ADDQ.L #0x8,A7
00023502 4a a8 02 44 |J D | TST.L (A0+0x244)
00023506 67 08 |g | BEQ 0x23510
00023508 3f 13 |? | MOVE.W (A3),-(A7)
0002350a 4e ba f5 be |N | JSR 0x22aca
0002350e 54 4f |TO | ADDQ.L #0x2,A7
00023510 52 a8 02 48 |R H | ADDQ.L #0x1,(A0+0x248)
00023514 20 28 02 48 | ( H | MOVE.L (A0+0x248),D0
00023518 b0 a8 02 4c | L | CMP.L (A0+0x24c),D0
0002351c 6e 08 |n | BGT 0x23526
0002351e 3f 13 |? | MOVE.W (A3),-(A7)
00023520 4e ba fd 1a |N | JSR 0x2323c
00023524 60 06 |` | BRA 0x2352c
00023526 3f 13 |? | MOVE.W (A3),-(A7)
00023528 4e ba fe 5a |N Z | JSR 0x23384
0002352c 54 4f |TO | ADDQ.L #0x2,A7
0002352e 4c df 1f 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4
00023532 4e 5e |N^ | UNLK A6
00023534 4e 75 |Nu | RTS
00023536 ; --------------------------------------------------------------------------------------
00023536 ; OMSI PASCAL Function
00023536 ; <LVAR 0x008 2(r)>
00023536 ; --------------------------------------------------------------------------------------
00023536 4e 56 ff d8 |NV | LINK.W A6,#0xffd8
0002353a bf d5 | | CMPA.L (A5),A7
0002353c 62 06 |b | BHI 0x23544
0002353e 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023542 4e 76 |Nv | TRAPV
00023544 de fc 00 26 | & | ADDA.W #0x26,A7
00023548 48 e7 98 c0 |H | MOVEM.L A1+A0+D4+D3+D0,-(A7)
0002354c 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00023550 c1 ee 00 08 | | MULS.W (A6+0x8),D0
00023554 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
0002355a 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
0002355e 11 7c 00 02 23 d4 | | # | MOVE.B #0x02,(A0+0x23d4)
00023564 20 28 02 48 | ( H | MOVE.L (A0+0x248),D0
00023568 0c 80 00 00 00 3f | ? | CMPI.L #0x0000003f,D0
0002356e 63 02 |c | BLS 0x23572
00023570 4e 4f |NO | TRAP #15
00023572 28 00 |( | MOVE.L D0,D4
00023574 76 06 |v | MOVEQ.L #0x06,D3
00023576 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4
0002357c 43 e8 02 2a |C * | LEA.L (A0+0x22a),A1
00023580 21 71 48 28 23 d6 |!qH(# | MOVE.L (A1+D4.L+#0x28),(A0+0x23d6)
00023586 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7)
0002358a 4e ba e2 2e |N . | JSR 0x217ba
0002358e 54 4f |TO | ADDQ.L #0x2,A7
00023590 13 7c 00 03 00 02 | | | MOVE.B #0x03,(A1+0x2)
00023596 4c df 03 19 |L | MOVEM.L (A7)+,D0+D3+D4+A0+A1
0002359a 4e 5e |N^ | UNLK A6
0002359c 4e 75 |Nu | RTS
0002359e ; --------------------------------------------------------------------------------------
0002359e ; OMSI PASCAL Function
0002359e ; <LVAR 0x008 2(r)>
0002359e ; <LVAR -0x002 @ 1(r)>
0002359e ; --------------------------------------------------------------------------------------
0002359e 4e 56 ff cc |NV | LINK.W A6,#0xffcc ; Spelunked
000235a2 bf d5 | | CMPA.L (A5),A7
000235a4 62 06 |b | BHI 0x235ac
000235a6 44 fc 00 02 |D | MOVE.W #0x2,CCR
000235aa 4e 76 |Nv | TRAPV
000235ac de fc 00 32 | 2 | ADDA.W #0x32,A7
000235b0 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7)
000235b4 43 ee 00 08 |C | LEA.L (A6+0x8),A1
000235b8 72 14 |r | MOVEQ.L #0x14,D1
000235ba 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
000235be c1 d1 | | MULS.W (A1),D0
000235c0 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
000235c6 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
000235ca 59 4f |YO | SUBQ.L #0x4,A7
000235cc 48 78 00 00 |Hx | PEA.L 0x0
000235d0 48 78 00 01 |Hx | PEA.L 0x1
000235d4 4e ba d6 92 |N | JSR 0x20c68
000235d8 50 4f |PO | ADDQ.L #0x8,A7
000235da 4a 9f |J | TST.L (A7)+
000235dc 66 06 |f | BNE 0x235e4
000235de 11 41 23 d4 | A# | MOVE.B D1,(A0+0x23d4)
000235e2 60 06 |` | BRA 0x235ea
000235e4 11 7c 00 15 23 d4 | | # | MOVE.B #0x15,(A0+0x23d4)
000235ea 3f 11 |? | MOVE.W (A1),-(A7)
000235ec 4e ba e1 cc |N | JSR 0x217ba
000235f0 3e 91 |> | MOVE.W (A1),(A7)
000235f2 06 57 00 10 | W | ADDI.W #0x0010,(A7)
000235f6 48 6e ff fe |Hn | PEA.L (A6-0x2)
000235fa 4e ba db 5e |N ^ | JSR 0x2115a
000235fe 5c 4f |\O | ADDQ.L #0x6,A7
00023600 4a 2e ff fe |J. | TST.B (A6-0x2)
00023604 66 2a |f* | BNE 0x23630
00023606 41 fa d1 6a |A j | LEA.L 0x20772,A0
0002360a 70 06 |p | MOVEQ.L #0x06,D0
0002360c 3f 20 |? | MOVE.W -(A0),-(A7)
0002360e 51 c8 ff fc |Q | DBF D0,0x2360c
00023612 59 4f |YO | SUBQ.L #0x4,A7
00023614 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00023618 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
0002361c 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
00023620 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00023626 5c 4f |\O | ADDQ.L #0x6,A7
00023628 3e 91 |> | MOVE.W (A1),(A7)
0002362a 4e ba e6 90 |N | JSR 0x21cbc
0002362e de c1 | | ADDA.W D1,A7
00023630 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1
00023634 4e 5e |N^ | UNLK A6
00023636 4e 75 |Nu | RTS
00023638 ; --------------------------------------------------------------------------------------
00023638 ; OMSI PASCAL Function
00023638 ; <LVAR 0x008 2(r)>
00023638 ; <LVAR -0x002 @ 1(r)>
00023638 ; --------------------------------------------------------------------------------------
00023638 4e 56 ff ce |NV | LINK.W A6,#0xffce ; Spelunked
0002363c bf d5 | | CMPA.L (A5),A7
0002363e 62 06 |b | BHI 0x23646
00023640 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023644 4e 76 |Nv | TRAPV
00023646 de fc 00 30 | 0 | ADDA.W #0x30,A7
0002364a 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7)
0002364e 43 ee 00 08 |C | LEA.L (A6+0x8),A1
00023652 72 12 |r | MOVEQ.L #0x12,D1
00023654 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00023658 c1 d1 | | MULS.W (A1),D0
0002365a 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023660 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023664 59 4f |YO | SUBQ.L #0x4,A7
00023666 48 78 00 00 |Hx | PEA.L 0x0
0002366a 48 78 00 01 |Hx | PEA.L 0x1
0002366e 4e ba d5 f8 |N | JSR 0x20c68
00023672 50 4f |PO | ADDQ.L #0x8,A7
00023674 4a 9f |J | TST.L (A7)+
00023676 66 06 |f | BNE 0x2367e
00023678 11 41 23 d4 | A# | MOVE.B D1,(A0+0x23d4)
0002367c 60 06 |` | BRA 0x23684
0002367e 11 7c 00 13 23 d4 | | # | MOVE.B #0x13,(A0+0x23d4)
00023684 3f 11 |? | MOVE.W (A1),-(A7)
00023686 4e ba e1 32 |N 2 | JSR 0x217ba
0002368a 3e 91 |> | MOVE.W (A1),(A7)
0002368c 06 57 00 10 | W | ADDI.W #0x0010,(A7)
00023690 48 6e ff fe |Hn | PEA.L (A6-0x2)
00023694 4e ba da c4 |N | JSR 0x2115a
00023698 5c 4f |\O | ADDQ.L #0x6,A7
0002369a 4a 2e ff fe |J. | TST.B (A6-0x2)
0002369e 66 2a |f* | BNE 0x236ca
000236a0 2f 3a d0 d8 |/: | MOVE.L 0x2077a,-(A7)
000236a4 2f 3a d0 d0 |/: | MOVE.L 0x20776,-(A7)
000236a8 2f 3a d0 c8 |/: | MOVE.L 0x20772,-(A7)
000236ac 59 4f |YO | SUBQ.L #0x4,A7
000236ae 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000236b2 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
000236b6 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7)
000236ba 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
000236c0 5c 4f |\O | ADDQ.L #0x6,A7
000236c2 3e 91 |> | MOVE.W (A1),(A7)
000236c4 4e ba e5 f6 |N | JSR 0x21cbc
000236c8 de c1 | | ADDA.W D1,A7
000236ca 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1
000236ce 4e 5e |N^ | UNLK A6
000236d0 4e 75 |Nu | RTS
000236d2 ; --------------------------------------------------------------------------------------
000236d2 ; OMSI PASCAL Function
000236d2 ; <LVAR 0x00a 2(r)>
000236d2 ; <LVAR 0x008 1(r)>
000236d2 ; <LVAR -0x004 @ 1(rw)>
000236d2 ; --------------------------------------------------------------------------------------
000236d2 4e 56 ff 98 |NV | LINK.W A6,#0xff98
000236d6 bf d5 | | CMPA.L (A5),A7
000236d8 62 06 |b | BHI 0x236e0
000236da 44 fc 00 02 |D | MOVE.W #0x2,CCR
000236de 4e 76 |Nv | TRAPV
000236e0 de fc 00 64 | d | ADDA.W #0x64,A7
000236e4 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
000236e8 47 ee 00 0a |G | LEA.L (A6+0xa),A3
000236ec 49 ee ff fc |I | LEA.L (A6-0x4),A4
000236f0 72 3f |r? | MOVEQ.L #0x3f,D1
000236f2 74 10 |t | MOVEQ.L #0x10,D2
000236f4 7a 01 |z | MOVEQ.L #0x01,D5
000236f6 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
000236fa c1 d3 | | MULS.W (A3),D0
000236fc 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023702 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023706 4a 2e 00 08 |J. | TST.B (A6+0x8)
0002370a 67 04 |g | BEQ 0x23710
0002370c 18 85 | | MOVE.B D5,(A4)
0002370e 60 0a |` | BRA 0x2371a
00023710 3f 13 |? | MOVE.W (A3),-(A7)
00023712 48 54 |HT | PEA.L (A4)
00023714 4e ba fa 10 |N | JSR 0x23126
00023718 5c 4f |\O | ADDQ.L #0x6,A7
0002371a 4a 14 |J | TST.B (A4)
0002371c 67 00 01 6e |g n | BEQ 0x2388c
00023720 4a 39 00 02 57 a2 |J9 W | TST.B 0x257a2
00023726 67 5a |gZ | BEQ 0x23782
00023728 20 28 02 48 | ( H | MOVE.L (A0+0x248),D0
0002372c b0 81 | | CMP.L D1,D0
0002372e 63 02 |c | BLS 0x23732
00023730 4e 4f |NO | TRAP #15
00023732 28 00 |( | MOVE.L D0,D4
00023734 76 06 |v | MOVEQ.L #0x06,D3
00023736 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4
0002373c 59 4f |YO | SUBQ.L #0x4,A7
0002373e 3f 13 |? | MOVE.W (A3),-(A7)
00023740 d5 57 | W | ADD.W D2,(A7)
00023742 4e ba da 6c |N l | JSR 0x211b0
00023746 54 4f |TO | ADDQ.L #0x2,A7
00023748 43 e8 02 2a |C * | LEA.L (A0+0x22a),A1
0002374c 20 1f | | MOVE.L (A7)+,D0
0002374e b0 b1 48 28 | H( | CMP.L (A1+D4.L+#0x28),D0
00023752 67 2e |g. | BEQ 0x23782
00023754 9e fc 00 20 | | SUBA.W #0x20,A7
00023758 22 4f |"O | MOVEA.L A7,A1
0002375a 45 fa d0 22 |E " | LEA.L 0x2077e,A2
0002375e 70 1e |p | MOVEQ.L #0x1e,D0
00023760 12 da | | MOVE.B (A2)+,(A1)+
00023762 51 c8 ff fc |Q | DBF D0,0x23760
00023766 59 4f |YO | SUBQ.L #0x4,A7
00023768 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002376c 3f 05 |? | MOVE.W D5,-(A7)
0002376e 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7)
00023772 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00023778 50 4f |PO | ADDQ.L #0x8,A7
0002377a 4e ba d4 c6 |N | JSR 0x20c42
0002377e de fc 00 24 | $ | ADDA.W #0x24,A7
00023782 20 28 02 48 | ( H | MOVE.L (A0+0x248),D0
00023786 b0 81 | | CMP.L D1,D0
00023788 63 02 |c | BLS 0x2378c
0002378a 4e 4f |NO | TRAP #15
0002378c 28 00 |( | MOVE.L D0,D4
0002378e 76 06 |v | MOVEQ.L #0x06,D3
00023790 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4
00023796 9e c2 | | SUBA.W D2,A7
00023798 22 4f |"O | MOVEA.L A7,A1
0002379a 45 e8 02 3c |E < | LEA.L (A0+0x23c),A2
0002379e 70 07 |p | MOVEQ.L #0x07,D0
000237a0 12 da | | MOVE.B (A2)+,(A1)+
000237a2 51 c8 ff fc |Q | DBF D0,0x237a0
000237a6 51 4f |QO | SUBQ.L #0x8,A7
000237a8 43 e8 02 2a |C * | LEA.L (A0+0x22a),A1
000237ac 2f 31 48 28 |/1H( | MOVE.L (A1+D4.L+#0x28),-(A7)
000237b0 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad
000237b6 58 4f |XO | ADDQ.L #0x4,A7
000237b8 4e b9 00 01 03 14 |N | JSR Add(a, b : Quad) : Quad
000237be de c2 | | ADDA.W D2,A7
000237c0 43 e8 02 3c |C < | LEA.L (A0+0x23c),A1
000237c4 24 4f |$O | MOVEA.L A7,A2
000237c6 70 07 |p | MOVEQ.L #0x07,D0
000237c8 12 da | | MOVE.B (A2)+,(A1)+
000237ca 51 c8 ff fc |Q | DBF D0,0x237c8
000237ce 50 4f |PO | ADDQ.L #0x8,A7
000237d0 4a a8 02 44 |J D | TST.L (A0+0x244)
000237d4 67 08 |g | BEQ 0x237de
000237d6 3f 13 |? | MOVE.W (A3),-(A7)
000237d8 4e ba f2 f0 |N | JSR 0x22aca
000237dc 54 4f |TO | ADDQ.L #0x2,A7
000237de 20 28 02 48 | ( H | MOVE.L (A0+0x248),D0
000237e2 b0 81 | | CMP.L D1,D0
000237e4 63 02 |c | BLS 0x237e8
000237e6 4e 4f |NO | TRAP #15
000237e8 28 00 |( | MOVE.L D0,D4
000237ea 76 06 |v | MOVEQ.L #0x06,D3
000237ec 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4
000237f2 2f 04 |/ | MOVE.L D4,-(A7)
000237f4 43 e8 02 2a |C * | LEA.L (A0+0x22a),A1
000237f8 5d 4f |]O | SUBQ.L #0x6,A7
000237fa 1e a9 01 a6 | | MOVE.B (A1+0x1a6),(A7)
000237fe 1f 69 01 a7 00 01 | i | MOVE.B (A1+0x1a7),(A7+0x1)
00023804 1f 69 01 a8 00 02 | i | MOVE.B (A1+0x1a8),(A7+0x2)
0002380a 1f 69 01 a9 00 03 | i | MOVE.B (A1+0x1a9),(A7+0x3)
00023810 3f 31 48 26 |?1H& | MOVE.W (A1+D4.L+#0x26),-(A7)
00023814 28 2f 00 08 |(/ | MOVE.L (A7+0x8),D4
00023818 28 31 48 28 |(1H( | MOVE.L (A1+D4.L+#0x28),D4
0002381c 76 02 |v | MOVEQ.L #0x02,D3
0002381e 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4
00023824 55 4f |UO | SUBQ.L #0x2,A7
00023826 0c 84 00 00 ff ff | | CMPI.L #0x0000ffff,D4
0002382c 63 02 |c | BLS 0x23830
0002382e 4e 4f |NO | TRAP #15
00023830 3e 84 |> | MOVE.W D4,(A7)
00023832 4e b9 00 01 02 34 |N 4 | JSR KERNCALL_1a
00023838 50 4f |PO | ADDQ.L #0x8,A7
0002383a 4a 1f |J | TST.B (A7)+
0002383c 66 08 |f | BNE 0x23846
0002383e 3f 13 |? | MOVE.W (A3),-(A7)
00023840 4e ba f2 ee |N | JSR 0x22b30
00023844 54 4f |TO | ADDQ.L #0x2,A7
00023846 52 a8 02 48 |R H | ADDQ.L #0x1,(A0+0x248)
0002384a 20 28 02 48 | ( H | MOVE.L (A0+0x248),D0
0002384e b0 a9 00 22 | " | CMP.L (A1+0x22),D0
00023852 6e 08 |n | BGT 0x2385c
00023854 3f 13 |? | MOVE.W (A3),-(A7)
00023856 4e ba fc de |N | JSR 0x23536
0002385a 60 2c |`, | BRA 0x23888
0002385c 42 a8 02 48 |B H | CLR.L (A0+0x248)
00023860 59 4f |YO | SUBQ.L #0x4,A7
00023862 48 78 00 10 |Hx | PEA.L 0x10
00023866 48 78 00 3f |Hx ? | PEA.L 0x3f
0002386a 4e ba d3 fc |N | JSR 0x20c68
0002386e 50 4f |PO | ADDQ.L #0x8,A7
00023870 23 5f 00 22 |#_ " | MOVE.L (A7)+,(A1+0x22)
00023874 4a 29 00 01 |J) | TST.B (A1+0x1)
00023878 67 08 |g | BEQ 0x23882
0002387a 3f 13 |? | MOVE.W (A3),-(A7)
0002387c 4e ba f3 80 |N | JSR 0x22bfe
00023880 60 06 |` | BRA 0x23888
00023882 3f 13 |? | MOVE.W (A3),-(A7)
00023884 4e ba f9 70 |N p | JSR 0x231f6
00023888 54 4f |TO | ADDQ.L #0x2,A7
0002388a 58 4f |XO | ADDQ.L #0x4,A7
0002388c 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
00023890 4e 5e |N^ | UNLK A6
00023892 4e 75 |Nu | RTS
00023894 ; --------------------------------------------------------------------------------------
00023894 ; OMSI PASCAL Function
00023894 ; <LVAR 0x00a 2(r)>
00023894 ; <LVAR 0x008 1(r)>
00023894 ; <LVAR -0x004 @ 1(rw)>
00023894 ; --------------------------------------------------------------------------------------
00023894 4e 56 ff de |NV | LINK.W A6,#0xffde
00023898 bf d5 | | CMPA.L (A5),A7
0002389a 62 06 |b | BHI 0x238a2
0002389c 44 fc 00 02 |D | MOVE.W #0x2,CCR
000238a0 4e 76 |Nv | TRAPV
000238a2 de fc 00 1e | | ADDA.W #0x1e,A7
000238a6 48 e7 80 e0 |H | MOVEM.L A2+A1+A0+D0,-(A7)
000238aa 43 ee 00 0a |C | LEA.L (A6+0xa),A1
000238ae 45 ee ff fc |E | LEA.L (A6-0x4),A2
000238b2 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
000238b6 c1 d1 | | MULS.W (A1),D0
000238b8 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
000238be 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
000238c2 4a 2e 00 08 |J. | TST.B (A6+0x8)
000238c6 67 06 |g | BEQ 0x238ce
000238c8 14 bc 00 01 | | MOVE.B #0x01,(A2)
000238cc 60 0a |` | BRA 0x238d8
000238ce 3f 11 |? | MOVE.W (A1),-(A7)
000238d0 48 52 |HR | PEA.L (A2)
000238d2 4e ba f8 52 |N R | JSR 0x23126
000238d6 5c 4f |\O | ADDQ.L #0x6,A7
000238d8 4a 12 |J | TST.B (A2)
000238da 67 16 |g | BEQ 0x238f2
000238dc 4a a8 02 44 |J D | TST.L (A0+0x244)
000238e0 67 08 |g | BEQ 0x238ea
000238e2 3f 11 |? | MOVE.W (A1),-(A7)
000238e4 4e ba f1 e4 |N | JSR 0x22aca
000238e8 54 4f |TO | ADDQ.L #0x2,A7
000238ea 3f 11 |? | MOVE.W (A1),-(A7)
000238ec 4e ba fc 48 |N H | JSR 0x23536
000238f0 54 4f |TO | ADDQ.L #0x2,A7
000238f2 4c df 07 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2
000238f6 4e 5e |N^ | UNLK A6
000238f8 4e 75 |Nu | RTS
000238fa ; --------------------------------------------------------------------------------------
000238fa ; OMSI PASCAL Function
000238fa ; <LVAR 0x00a 2(r)>
000238fa ; <LVAR 0x008 1(r)>
000238fa ; <LVAR -0x004 @ 1(rw)>
000238fa ; --------------------------------------------------------------------------------------
000238fa 4e 56 ff de |NV | LINK.W A6,#0xffde
000238fe bf d5 | | CMPA.L (A5),A7
00023900 62 06 |b | BHI 0x23908
00023902 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023906 4e 76 |Nv | TRAPV
00023908 de fc 00 1e | | ADDA.W #0x1e,A7
0002390c 48 e7 80 e0 |H | MOVEM.L A2+A1+A0+D0,-(A7)
00023910 43 ee 00 0a |C | LEA.L (A6+0xa),A1
00023914 45 ee ff fc |E | LEA.L (A6-0x4),A2
00023918 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
0002391c c1 d1 | | MULS.W (A1),D0
0002391e 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023924 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023928 4a 2e 00 08 |J. | TST.B (A6+0x8)
0002392c 67 06 |g | BEQ 0x23934
0002392e 14 bc 00 01 | | MOVE.B #0x01,(A2)
00023932 60 0a |` | BRA 0x2393e
00023934 3f 11 |? | MOVE.W (A1),-(A7)
00023936 48 52 |HR | PEA.L (A2)
00023938 4e ba f7 ec |N | JSR 0x23126
0002393c 5c 4f |\O | ADDQ.L #0x6,A7
0002393e 4a 12 |J | TST.B (A2)
00023940 67 16 |g | BEQ 0x23958
00023942 4a a8 02 44 |J D | TST.L (A0+0x244)
00023946 67 08 |g | BEQ 0x23950
00023948 3f 11 |? | MOVE.W (A1),-(A7)
0002394a 4e ba f1 7e |N ~ | JSR 0x22aca
0002394e 54 4f |TO | ADDQ.L #0x2,A7
00023950 3f 11 |? | MOVE.W (A1),-(A7)
00023952 4e ba fa 82 |N | JSR 0x233d6
00023956 54 4f |TO | ADDQ.L #0x2,A7
00023958 4c df 07 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2
0002395c 4e 5e |N^ | UNLK A6
0002395e 4e 75 |Nu | RTS
00023960 ; --------------------------------------------------------------------------------------
00023960 ; OMSI PASCAL Function
00023960 ; <LVAR 0x00a 2(r)>
00023960 ; <LVAR 0x008 1(r)>
00023960 ; <LVAR -0x004 @ 1(rw)>
00023960 ; --------------------------------------------------------------------------------------
00023960 4e 56 ff de |NV | LINK.W A6,#0xffde
00023964 bf d5 | | CMPA.L (A5),A7
00023966 62 06 |b | BHI 0x2396e
00023968 44 fc 00 02 |D | MOVE.W #0x2,CCR
0002396c 4e 76 |Nv | TRAPV
0002396e de fc 00 1e | | ADDA.W #0x1e,A7
00023972 48 e7 80 e0 |H | MOVEM.L A2+A1+A0+D0,-(A7)
00023976 43 ee 00 0a |C | LEA.L (A6+0xa),A1
0002397a 45 ee ff fc |E | LEA.L (A6-0x4),A2
0002397e 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00023982 c1 d1 | | MULS.W (A1),D0
00023984 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
0002398a 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
0002398e 4a 2e 00 08 |J. | TST.B (A6+0x8)
00023992 67 06 |g | BEQ 0x2399a
00023994 14 bc 00 01 | | MOVE.B #0x01,(A2)
00023998 60 0a |` | BRA 0x239a4
0002399a 3f 11 |? | MOVE.W (A1),-(A7)
0002399c 48 52 |HR | PEA.L (A2)
0002399e 4e ba f7 86 |N | JSR 0x23126
000239a2 5c 4f |\O | ADDQ.L #0x6,A7
000239a4 4a 12 |J | TST.B (A2)
000239a6 67 16 |g | BEQ 0x239be
000239a8 4a a8 02 44 |J D | TST.L (A0+0x244)
000239ac 67 08 |g | BEQ 0x239b6
000239ae 3f 11 |? | MOVE.W (A1),-(A7)
000239b0 4e ba f1 18 |N | JSR 0x22aca
000239b4 54 4f |TO | ADDQ.L #0x2,A7
000239b6 3f 11 |? | MOVE.W (A1),-(A7)
000239b8 4e ba fb 7c |N | | JSR 0x23536
000239bc 54 4f |TO | ADDQ.L #0x2,A7
000239be 4c df 07 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2
000239c2 4e 5e |N^ | UNLK A6
000239c4 4e 75 |Nu | RTS
000239c6 ; --------------------------------------------------------------------------------------
000239c6 ; OMSI PASCAL Function
000239c6 ; <LVAR 0x00a 2(r)>
000239c6 ; <LVAR 0x008 1(r)>
000239c6 ; <LVAR -0x004 @ 1(rw)>
000239c6 ; --------------------------------------------------------------------------------------
000239c6 4e 56 ff de |NV | LINK.W A6,#0xffde
000239ca bf d5 | | CMPA.L (A5),A7
000239cc 62 06 |b | BHI 0x239d4
000239ce 44 fc 00 02 |D | MOVE.W #0x2,CCR
000239d2 4e 76 |Nv | TRAPV
000239d4 de fc 00 1e | | ADDA.W #0x1e,A7
000239d8 48 e7 80 e0 |H | MOVEM.L A2+A1+A0+D0,-(A7)
000239dc 43 ee 00 0a |C | LEA.L (A6+0xa),A1
000239e0 45 ee ff fc |E | LEA.L (A6-0x4),A2
000239e4 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
000239e8 c1 d1 | | MULS.W (A1),D0
000239ea 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
000239f0 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
000239f4 4a 2e 00 08 |J. | TST.B (A6+0x8)
000239f8 67 06 |g | BEQ 0x23a00
000239fa 14 bc 00 01 | | MOVE.B #0x01,(A2)
000239fe 60 0a |` | BRA 0x23a0a
00023a00 3f 11 |? | MOVE.W (A1),-(A7)
00023a02 48 52 |HR | PEA.L (A2)
00023a04 4e ba f7 20 |N | JSR 0x23126
00023a08 5c 4f |\O | ADDQ.L #0x6,A7
00023a0a 4a 12 |J | TST.B (A2)
00023a0c 67 10 |g | BEQ 0x23a1e
00023a0e 42 28 02 2b |B( + | CLR.B (A0+0x22b)
00023a12 42 a8 02 48 |B H | CLR.L (A0+0x248)
00023a16 3f 11 |? | MOVE.W (A1),-(A7)
00023a18 4e ba f7 dc |N | JSR 0x231f6
00023a1c 54 4f |TO | ADDQ.L #0x2,A7
00023a1e 4c df 07 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2
00023a22 4e 5e |N^ | UNLK A6
00023a24 4e 75 |Nu | RTS
00023a26 ; --------------------------------------------------------------------------------------
00023a26 ; OMSI PASCAL Function
00023a26 ; <LVAR 0x00a 2(r)>
00023a26 ; <LVAR 0x008 1(r)>
00023a26 ; <LVAR -0x004 @ 1(rw)>
00023a26 ; --------------------------------------------------------------------------------------
00023a26 4e 56 ff de |NV | LINK.W A6,#0xffde
00023a2a bf d5 | | CMPA.L (A5),A7
00023a2c 62 06 |b | BHI 0x23a34
00023a2e 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023a32 4e 76 |Nv | TRAPV
00023a34 de fc 00 1e | | ADDA.W #0x1e,A7
00023a38 48 e7 80 e0 |H | MOVEM.L A2+A1+A0+D0,-(A7)
00023a3c 43 ee 00 0a |C | LEA.L (A6+0xa),A1
00023a40 45 ee ff fc |E | LEA.L (A6-0x4),A2
00023a44 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00023a48 c1 d1 | | MULS.W (A1),D0
00023a4a 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023a50 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023a54 4a 2e 00 08 |J. | TST.B (A6+0x8)
00023a58 67 06 |g | BEQ 0x23a60
00023a5a 14 bc 00 01 | | MOVE.B #0x01,(A2)
00023a5e 60 0a |` | BRA 0x23a6a
00023a60 3f 11 |? | MOVE.W (A1),-(A7)
00023a62 48 52 |HR | PEA.L (A2)
00023a64 4e ba f6 c0 |N | JSR 0x23126
00023a68 5c 4f |\O | ADDQ.L #0x6,A7
00023a6a 4a 12 |J | TST.B (A2)
00023a6c 67 10 |g | BEQ 0x23a7e
00023a6e 42 28 02 2b |B( + | CLR.B (A0+0x22b)
00023a72 42 a8 02 48 |B H | CLR.L (A0+0x248)
00023a76 3f 11 |? | MOVE.W (A1),-(A7)
00023a78 4e ba f7 c2 |N | JSR 0x2323c
00023a7c 54 4f |TO | ADDQ.L #0x2,A7
00023a7e 4c df 07 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2
00023a82 4e 5e |N^ | UNLK A6
00023a84 4e 75 |Nu | RTS
00023a86 ; --------------------------------------------------------------------------------------
00023a86 ; OMSI PASCAL Function
00023a86 ; --------------------------------------------------------------------------------------
00023a86 4e 56 ff e2 |NV | LINK.W A6,#0xffe2
00023a8a bf d5 | | CMPA.L (A5),A7
00023a8c 62 06 |b | BHI 0x23a94
00023a8e 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023a92 4e 76 |Nv | TRAPV
00023a94 de fc 00 1a | | ADDA.W #0x1a,A7
00023a98 48 e7 81 80 |H | MOVEM.L A0+D7+D0,-(A7)
00023a9c 7e 00 |~ | MOVEQ.L #0x00,D7
00023a9e 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00023aa2 c1 c7 | | MULS.W D7,D0
00023aa4 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023aaa 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023aae 4a 28 02 2a |J( * | TST.B (A0+0x22a)
00023ab2 67 0e |g | BEQ 0x23ac2
00023ab4 3f 07 |? | MOVE.W D7,-(A7)
00023ab6 4e ba f1 46 |N F | JSR 0x22bfe
00023aba 54 4f |TO | ADDQ.L #0x2,A7
00023abc 52 b9 00 02 57 9e |R W | ADDQ.L #0x1,0x2579e
00023ac2 52 47 |RG | ADDQ.W #0x1,D7
00023ac4 0c 47 00 03 | G | CMPI.W #0x0003,D7
00023ac8 6f d4 |o | BLE 0x23a9e
00023aca 4c df 01 81 |L | MOVEM.L (A7)+,D0+D7+A0
00023ace 4e 5e |N^ | UNLK A6
00023ad0 4e 75 |Nu | RTS
00023ad2 ; --------------------------------------------------------------------------------------
00023ad2 ; OMSI PASCAL Function
00023ad2 ; <LVAR -0x001 @ 1(r)>
00023ad2 ; <LVAR -0x002 @ 1(r)>
00023ad2 ; --------------------------------------------------------------------------------------
00023ad2 4e 56 ff d2 |NV | LINK.W A6,#0xffd2
00023ad6 bf d5 | | CMPA.L (A5),A7
00023ad8 62 06 |b | BHI 0x23ae0
00023ada 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023ade 4e 76 |Nv | TRAPV
00023ae0 de fc 00 2a | * | ADDA.W #0x2a,A7
00023ae4 48 e7 c1 c0 |H | MOVEM.L A1+A0+D7+D1+D0,-(A7)
00023ae8 43 ee ff ff |C | LEA.L (A6-0x1),A1
00023aec 72 01 |r | MOVEQ.L #0x01,D1
00023aee 7e 00 |~ | MOVEQ.L #0x00,D7
00023af0 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00023af4 c1 c7 | | MULS.W D7,D0
00023af6 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023afc 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023b00 4a 28 02 2a |J( * | TST.B (A0+0x22a)
00023b04 67 00 00 b4 |g | BEQ 0x23bba
00023b08 3f 07 |? | MOVE.W D7,-(A7)
00023b0a 06 57 00 10 | W | ADDI.W #0x0010,(A7)
00023b0e 48 6e ff fe |Hn | PEA.L (A6-0x2)
00023b12 48 51 |HQ | PEA.L (A1)
00023b14 4e ba d3 12 |N | JSR 0x20e28
00023b18 de fc 00 0a | | ADDA.W #0xa,A7
00023b1c 4a 2e ff fe |J. | TST.B (A6-0x2)
00023b20 67 00 00 98 |g | BEQ 0x23bba
00023b24 10 28 02 2c | ( , | MOVE.B (A0+0x22c),D0
00023b28 48 80 |H | EXTB.W D0
00023b2a 0c 40 00 06 | @ | CMPI.W #0x0006,D0
00023b2e 63 02 |c | BLS 0x23b32
00023b30 4e 4e |NN | TRAP #14
00023b32 d0 40 | @ | ADD.W D0,D0
00023b34 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W
00023b3c 00 6e | n | .CONST 0x6e ; [0x0] -> 0x23baa
00023b3e 00 0e | | .CONST 0xe ; [0x1] -> 0x23b4a
00023b40 00 1e | | .CONST 0x1e ; [0x2] -> 0x23b5a
00023b42 00 5e | ^ | .CONST 0x5e ; [0x3] -> 0x23b9a
00023b44 00 2e | . | .CONST 0x2e ; [0x4] -> 0x23b6a
00023b46 00 3e | > | .CONST 0x3e ; [0x5] -> 0x23b7a
00023b48 00 4e | N | .CONST 0x4e ; [0x6] -> 0x23b8a
00023b4a switch@0x23b34[0x1]:
00023b4a 3f 07 |? | MOVE.W D7,-(A7)
00023b4c 10 11 | | MOVE.B (A1),D0
00023b4e 48 80 |H | EXTB.W D0
00023b50 41 81 |A | CHK.W D1,D0
00023b52 1f 00 | | MOVE.B D0,-(A7)
00023b54 4e ba fe d0 |N | JSR 0x23a26
00023b58 60 5e |`^ | BRA 0x23bb8
00023b5a switch@0x23b34[0x2]:
00023b5a 3f 07 |? | MOVE.W D7,-(A7)
00023b5c 10 11 | | MOVE.B (A1),D0
00023b5e 48 80 |H | EXTB.W D0
00023b60 41 81 |A | CHK.W D1,D0
00023b62 1f 00 | | MOVE.B D0,-(A7)
00023b64 4e ba f8 be |N | JSR 0x23424
00023b68 60 4e |`N | BRA 0x23bb8
00023b6a switch@0x23b34[0x4]:
00023b6a 3f 07 |? | MOVE.W D7,-(A7)
00023b6c 10 11 | | MOVE.B (A1),D0
00023b6e 48 80 |H | EXTB.W D0
00023b70 41 81 |A | CHK.W D1,D0
00023b72 1f 00 | | MOVE.B D0,-(A7)
00023b74 4e ba fd 1e |N | JSR 0x23894
00023b78 60 3e |`> | BRA 0x23bb8
00023b7a switch@0x23b34[0x5]:
00023b7a 3f 07 |? | MOVE.W D7,-(A7)
00023b7c 10 11 | | MOVE.B (A1),D0
00023b7e 48 80 |H | EXTB.W D0
00023b80 41 81 |A | CHK.W D1,D0
00023b82 1f 00 | | MOVE.B D0,-(A7)
00023b84 4e ba fd 74 |N t | JSR 0x238fa
00023b88 60 2e |`. | BRA 0x23bb8
00023b8a switch@0x23b34[0x6]:
00023b8a 3f 07 |? | MOVE.W D7,-(A7)
00023b8c 10 11 | | MOVE.B (A1),D0
00023b8e 48 80 |H | EXTB.W D0
00023b90 41 81 |A | CHK.W D1,D0
00023b92 1f 00 | | MOVE.B D0,-(A7)
00023b94 4e ba fd ca |N | JSR 0x23960
00023b98 60 1e |` | BRA 0x23bb8
00023b9a switch@0x23b34[0x3]:
00023b9a 3f 07 |? | MOVE.W D7,-(A7)
00023b9c 10 11 | | MOVE.B (A1),D0
00023b9e 48 80 |H | EXTB.W D0
00023ba0 41 81 |A | CHK.W D1,D0
00023ba2 1f 00 | | MOVE.B D0,-(A7)
00023ba4 4e ba fb 2c |N , | JSR 0x236d2
00023ba8 60 0e |` | BRA 0x23bb8
00023baa switch@0x23b34[0x0]:
00023baa 3f 07 |? | MOVE.W D7,-(A7)
00023bac 10 11 | | MOVE.B (A1),D0
00023bae 48 80 |H | EXTB.W D0
00023bb0 41 81 |A | CHK.W D1,D0
00023bb2 1f 00 | | MOVE.B D0,-(A7)
00023bb4 4e ba fe 10 |N | JSR 0x239c6
00023bb8 58 4f |XO | ADDQ.L #0x4,A7
00023bba 52 47 |RG | ADDQ.W #0x1,D7
00023bbc 0c 47 00 03 | G | CMPI.W #0x0003,D7
00023bc0 6f 00 ff 2e |o . | BLE 0x23af0
00023bc4 4c df 03 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1
00023bc8 4e 5e |N^ | UNLK A6
00023bca 4e 75 |Nu | RTS
00023bcc ; --------------------------------------------------------------------------------------
00023bcc ; OMSI PASCAL Function
00023bcc ; <LVAR -0x002 @>
00023bcc ; --------------------------------------------------------------------------------------
00023bcc 4e 56 ff de |NV | LINK.W A6,#0xffde
00023bd0 bf d5 | | CMPA.L (A5),A7
00023bd2 62 06 |b | BHI 0x23bda
00023bd4 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023bd8 4e 76 |Nv | TRAPV
00023bda de fc 00 1e | | ADDA.W #0x1e,A7
00023bde 48 e7 81 80 |H | MOVEM.L A0+D7+D0,-(A7)
00023be2 7e 00 |~ | MOVEQ.L #0x00,D7
00023be4 30 3c 21 c0 |0<! | MOVE.W #0x21c0,D0
00023be8 c1 c7 | | MULS.W D7,D0
00023bea 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023bf0 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023bf4 4a 28 02 2a |J( * | TST.B (A0+0x22a)
00023bf8 67 10 |g | BEQ 0x23c0a
00023bfa 3f 07 |? | MOVE.W D7,-(A7)
00023bfc 06 57 00 10 | W | ADDI.W #0x0010,(A7)
00023c00 48 6e ff fe |Hn | PEA.L (A6-0x2)
00023c04 4e ba d5 54 |N T | JSR 0x2115a
00023c08 5c 4f |\O | ADDQ.L #0x6,A7
00023c0a 52 47 |RG | ADDQ.W #0x1,D7
00023c0c 0c 47 00 03 | G | CMPI.W #0x0003,D7
00023c10 6f d2 |o | BLE 0x23be4
00023c12 4c df 01 81 |L | MOVEM.L (A7)+,D0+D7+A0
00023c16 4e 5e |N^ | UNLK A6
00023c18 4e 75 |Nu | RTS
00023c1a ; --------------------------------------------------------------------------------------
00023c1a ; OMSI PASCAL Function
00023c1a ; <LVAR 0x00a 1(rw)>
00023c1a ; <LVAR 0x008 2(r)>
00023c1a ; <LVAR -0x008 @ 2(r)>
00023c1a ; <LVAR -0x00a @>
00023c1a ; <LVAR -0x00c 2(r)>
00023c1a ; <LVAR -0x00e 2(r)>
00023c1a ; <LVAR -0x010 2(w)>
00023c1a ; <LVAR -0x012 2(w)>
00023c1a ; <LVAR -0x014 2(r)>
00023c1a ; <LVAR -0x016 2(w)>
00023c1a ; <LVAR -0x018 2(r)>
00023c1a ; <LVAR -0x01a @ 2(r)>
00023c1a ; --------------------------------------------------------------------------------------
00023c1a 4e 56 ff c4 |NV | LINK.W A6,#0xffc4
00023c1e bf d5 | | CMPA.L (A5),A7
00023c20 62 06 |b | BHI 0x23c28
00023c22 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023c26 4e 76 |Nv | TRAPV
00023c28 de fc 00 22 | " | ADDA.W #0x22,A7
00023c2c 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7)
00023c30 72 1c |r | MOVEQ.L #0x1c,D1
00023c32 42 6e ff e6 |Bn | CLR.W (A6-0x1a)
00023c36 42 6e ff e8 |Bn | CLR.W (A6-0x18)
00023c3a 3d 7c 00 02 ff ea |=| | MOVE.W #0x2,(A6-0x16)
00023c40 42 6e ff ec |Bn | CLR.W (A6-0x14)
00023c44 3d 7c 00 04 ff ee |=| | MOVE.W #0x4,(A6-0x12)
00023c4a 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0
00023c4e e1 40 | @ | ASL.W #0x8,D0
00023c50 3d 40 ff f0 |=@ | MOVE.W D0,(A6-0x10)
00023c54 42 6e ff f2 |Bn | CLR.W (A6-0xe)
00023c58 42 6e ff f4 |Bn | CLR.W (A6-0xc)
00023c5c 48 6e ff e6 |Hn | PEA.L (A6-0x1a)
00023c60 41 ee ff f8 |A | LEA.L (A6-0x8),A0
00023c64 2f 08 |/ | MOVE.L A0,-(A7)
00023c66 3f 01 |? | MOVE.W D1,-(A7)
00023c68 48 78 00 00 |Hx | PEA.L 0x0
00023c6c 48 78 00 08 |Hx | PEA.L 0x8
00023c70 4e ba d5 d2 |N | JSR 0x21244
00023c74 de fc 00 10 | | ADDA.W #0x10,A7
00023c78 3e 81 |> | MOVE.W D1,(A7)
00023c7a 48 6e ff f6 |Hn | PEA.L (A6-0xa)
00023c7e 4e ba d4 da |N | JSR 0x2115a
00023c82 5c 4f |\O | ADDQ.L #0x6,A7
00023c84 42 2e 00 0a |B. | CLR.B (A6+0xa)
00023c88 30 2e ff f8 |0. | MOVE.W (A6-0x8),D0
00023c8c 0c 40 00 01 | @ | CMPI.W #0x0001,D0
00023c90 66 04 |f | BNE 0x23c96
00023c92 52 2e 00 0a |R. | ADDQ.B #0x1,(A6+0xa)
00023c96 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0
00023c9a 4e 5e |N^ | UNLK A6
00023c9c 4e 75 |Nu | RTS
00023c9e ; --------------------------------------------------------------------------------------
00023c9e ; OMSI PASCAL Function
00023c9e ; <LVAR 0x008 2(r)>
00023c9e ; <LVAR -0x006 @ 1(r)>
00023c9e ; <LVAR -0x3d6 2(r)>
00023c9e ; <LVAR -0x3da 2(r)>
00023c9e ; <LVAR -0x3fb 1(r)>
00023c9e ; <LVAR -0x3fc 1(r)>
00023c9e ; <LVAR -0x406 @>
00023c9e ; --------------------------------------------------------------------------------------
00023c9e 4e 56 fb b0 |NV | LINK.W A6,#0xfbb0
00023ca2 bf d5 | | CMPA.L (A5),A7
00023ca4 62 06 |b | BHI 0x23cac
00023ca6 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023caa 4e 76 |Nv | TRAPV
00023cac de fc 00 4a | J | ADDA.W #0x4a,A7
00023cb0 48 e7 c1 e0 |H | MOVEM.L A2+A1+A0+D7+D1+D0,-(A7)
00023cb4 45 ee 00 08 |E | LEA.L (A6+0x8),A2
00023cb8 72 02 |r | MOVEQ.L #0x02,D1
00023cba 30 39 00 01 00 08 |09 | MOVE.W 0x10008,D0
00023cc0 41 bc 00 0f |A | CHK.W #0xf,D0
00023cc4 3e 00 |> | MOVE.W D0,D7
00023cc6 33 d2 00 01 00 08 |3 | MOVE.W (A2),0x10008
00023ccc 1f 01 | | MOVE.B D1,-(A7)
00023cce 3f 01 |? | MOVE.W D1,-(A7)
00023cd0 48 78 00 01 |Hx | PEA.L 0x1
00023cd4 41 ee fb fa |A | LEA.L (A6-0x406),A0
00023cd8 2f 08 |/ | MOVE.L A0,-(A7)
00023cda 48 6e ff fa |Hn | PEA.L (A6-0x6)
00023cde 4e b9 00 01 03 6c |N l | JSR RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
00023ce4 de fc 00 10 | | ADDA.W #0x10,A7
00023ce8 33 c7 00 01 00 08 |3 | MOVE.W D7,0x10008
00023cee 4a 2e ff fa |J. | TST.B (A6-0x6)
00023cf2 66 4c |fL | BNE 0x23d40
00023cf4 9e fc 00 1c | | SUBA.W #0x1c,A7
00023cf8 20 4f | O | MOVEA.L A7,A0
00023cfa 43 fa ca a2 |C | LEA.L 0x2079e,A1
00023cfe 70 1a |p | MOVEQ.L #0x1a,D0
00023d00 10 d9 | | MOVE.B (A1)+,(A0)+
00023d02 51 c8 ff fc |Q | DBF D0,0x23d00
00023d06 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7)
00023d0a 51 4f |QO | SUBQ.L #0x8,A7
00023d0c 48 6f 00 0a |Ho | PEA.L (A7+0xa)
00023d10 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00023d14 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7)
00023d18 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00023d1e 58 4f |XO | ADDQ.L #0x4,A7
00023d20 30 12 |0 | MOVE.W (A2),D0
00023d22 48 c0 |H | EXTW.L D0
00023d24 2f 00 |/ | MOVE.L D0,-(A7)
00023d26 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00023d2c 58 4f |XO | ADDQ.L #0x4,A7
00023d2e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00023d34 50 4f |PO | ADDQ.L #0x8,A7
00023d36 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String)
00023d3c de fc 00 22 | " | ADDA.W #0x22,A7
00023d40 70 46 |pF | MOVEQ.L #0x46,D0
00023d42 c1 d2 | | MULS.W (A2),D0
00023d44 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023d4a 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023d4e d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
00023d54 42 a8 00 02 |B | CLR.L (A0+0x2)
00023d58 42 a8 00 06 |B | CLR.L (A0+0x6)
00023d5c 42 a8 00 0a |B | CLR.L (A0+0xa)
00023d60 42 80 |B | CLR.L D0
00023d62 30 2e fc 26 |0. & | MOVE.W (A6-0x3da),D0
00023d66 21 40 00 1a |!@ | MOVE.L D0,(A0+0x1a)
00023d6a 42 80 |B | CLR.L D0
00023d6c 30 2e fc 2a |0. * | MOVE.W (A6-0x3d6),D0
00023d70 21 40 00 1e |!@ | MOVE.L D0,(A0+0x1e)
00023d74 42 80 |B | CLR.L D0
00023d76 10 2e fc 05 | . | MOVE.B (A6-0x3fb),D0
00023d7a e2 40 | @ | ASR.W #0x1,D0
00023d7c 31 40 00 24 |1@ $ | MOVE.W D0,(A0+0x24)
00023d80 42 80 |B | CLR.L D0
00023d82 10 2e fc 04 | . | MOVE.B (A6-0x3fc),D0
00023d86 31 40 00 22 |1@ " | MOVE.W D0,(A0+0x22)
00023d8a 21 68 00 1a 00 16 |!h | MOVE.L (A0+0x1a),(A0+0x16)
00023d90 42 a8 00 12 |B | CLR.L (A0+0x12)
00023d94 42 a8 00 0e |B | CLR.L (A0+0xe)
00023d98 51 4f |QO | SUBQ.L #0x8,A7
00023d9a 48 78 00 00 |Hx | PEA.L 0x0
00023d9e 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad
00023da4 58 4f |XO | ADDQ.L #0x4,A7
00023da6 41 e8 00 3e |A > | LEA.L (A0+0x3e),A0
00023daa 22 4f |"O | MOVEA.L A7,A1
00023dac 70 07 |p | MOVEQ.L #0x07,D0
00023dae 10 d9 | | MOVE.B (A1)+,(A0)+
00023db0 51 c8 ff fc |Q | DBF D0,0x23dae
00023db4 50 4f |PO | ADDQ.L #0x8,A7
00023db6 4c df 07 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2
00023dba 4e 5e |N^ | UNLK A6
00023dbc 4e 75 |Nu | RTS
00023dbe ; --------------------------------------------------------------------------------------
00023dbe ; OMSI PASCAL Function
00023dbe ; --------------------------------------------------------------------------------------
00023dbe 4e 56 ff bc |NV | LINK.W A6,#0xffbc
00023dc2 bf d5 | | CMPA.L (A5),A7
00023dc4 62 06 |b | BHI 0x23dcc
00023dc6 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023dca 4e 76 |Nv | TRAPV
00023dcc de fc 00 44 | D | ADDA.W #0x44,A7
00023dd0 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7)
00023dd4 72 20 |r | MOVEQ.L #0x20,D1
00023dd6 9e c1 | | SUBA.W D1,A7
00023dd8 20 4f | O | MOVEA.L A7,A0
00023dda 43 fa c9 de |C | LEA.L 0x207ba,A1
00023dde 70 1e |p | MOVEQ.L #0x1e,D0
00023de0 10 d9 | | MOVE.B (A1)+,(A0)+
00023de2 51 c8 ff fc |Q | DBF D0,0x23de0
00023de6 51 4f |QO | SUBQ.L #0x8,A7
00023de8 48 6f 00 08 |Ho | PEA.L (A7+0x8)
00023dec 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00023df0 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7)
00023df4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00023dfa 50 4f |PO | ADDQ.L #0x8,A7
00023dfc 48 78 00 01 |Hx | PEA.L 0x1
00023e00 48 78 01 f4 |Hx | PEA.L 0x1f4
00023e04 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
00023e0a de fc 00 0c | | ADDA.W #0xc,A7
00023e0e 23 df 00 02 e5 26 |# & | MOVE.L (A7)+,0x2e526
00023e14 de c1 | | ADDA.W D1,A7
00023e16 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1
00023e1a 4e 5e |N^ | UNLK A6
00023e1c 4e 75 |Nu | RTS
00023e1e ; --------------------------------------------------------------------------------------
00023e1e ; OMSI PASCAL Function
00023e1e ; --------------------------------------------------------------------------------------
00023e1e 4e 56 ff 66 |NV f | LINK.W A6,#0xff66
00023e22 bf d5 | | CMPA.L (A5),A7
00023e24 62 06 |b | BHI 0x23e2c
00023e26 44 fc 00 02 |D | MOVE.W #0x2,CCR
00023e2a 4e 76 |Nv | TRAPV
00023e2c de fc 00 92 | | ADDA.W #0x92,A7
00023e30 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00023e34 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00023e3a 49 f9 00 01 02 e4 |I | LEA.L Long2String(a : Long) : String,A4
00023e40 72 01 |r | MOVEQ.L #0x01,D1
00023e42 74 0e |t | MOVEQ.L #0x0e,D2
00023e44 76 14 |v | MOVEQ.L #0x14,D3
00023e46 78 20 |x | MOVEQ.L #0x20,D4
00023e48 41 fa c9 9e |A | LEA.L 0x207e8,A0
00023e4c 70 06 |p | MOVEQ.L #0x06,D0
00023e4e 3f 20 |? | MOVE.W -(A0),-(A7)
00023e50 51 c8 ff fc |Q | DBF D0,0x23e4e
00023e54 5d 4f |]O | SUBQ.L #0x6,A7
00023e56 48 6f 00 06 |Ho | PEA.L (A7+0x6)
00023e5a 3f 01 |? | MOVE.W D1,-(A7)
00023e5c 3f 02 |? | MOVE.W D2,-(A7)
00023e5e 4e 93 |N | JSR (A3)
00023e60 5c 4f |\O | ADDQ.L #0x6,A7
00023e62 1e 81 | | MOVE.B D1,(A7)
00023e64 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
00023e6a 5c 4f |\O | ADDQ.L #0x6,A7
00023e6c 10 1f | | MOVE.B (A7)+,D0
00023e6e 48 80 |H | EXTB.W D0
00023e70 41 81 |A | CHK.W D1,D0
00023e72 de c2 | | ADDA.W D2,A7
00023e74 1c 00 | | MOVE.B D0,D6
00023e76 67 34 |g4 | BEQ 0x23eac
00023e78 9e c4 | | SUBA.W D4,A7
00023e7a 20 4f | O | MOVEA.L A7,A0
00023e7c 43 fa c9 6a |C j | LEA.L 0x207e8,A1
00023e80 70 1e |p | MOVEQ.L #0x1e,D0
00023e82 10 d9 | | MOVE.B (A1)+,(A0)+
00023e84 51 c8 ff fc |Q | DBF D0,0x23e82
00023e88 5d 4f |]O | SUBQ.L #0x6,A7
00023e8a 48 6f 00 06 |Ho | PEA.L (A7+0x6)
00023e8e 3f 01 |? | MOVE.W D1,-(A7)
00023e90 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7)
00023e94 4e 93 |N | JSR (A3)
00023e96 5c 4f |\O | ADDQ.L #0x6,A7
00023e98 42 17 |B | CLR.B (A7)
00023e9a 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
00023ea0 5c 4f |\O | ADDQ.L #0x6,A7
00023ea2 10 1f | | MOVE.B (A7)+,D0
00023ea4 48 80 |H | EXTB.W D0
00023ea6 41 81 |A | CHK.W D1,D0
00023ea8 de c4 | | ADDA.W D4,A7
00023eaa 1a 00 | | MOVE.B D0,D5
00023eac 7e 00 |~ | MOVEQ.L #0x00,D7
00023eae 70 46 |pF | MOVEQ.L #0x46,D0
00023eb0 c1 c7 | | MULS.W D7,D0
00023eb2 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023eb8 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023ebc d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
00023ec2 4a 06 |J | TST.B D6
00023ec4 67 0e |g | BEQ 0x23ed4
00023ec6 55 4f |UO | SUBQ.L #0x2,A7
00023ec8 3f 07 |? | MOVE.W D7,-(A7)
00023eca 4e ba fd 4e |N N | JSR 0x23c1a
00023ece 54 4f |TO | ADDQ.L #0x2,A7
00023ed0 4a 1f |J | TST.B (A7)+
00023ed2 66 04 |f | BNE 0x23ed8
00023ed4 42 10 |B | CLR.B (A0)
00023ed6 60 48 |`H | BRA 0x23f20
00023ed8 9e c3 | | SUBA.W D3,A7
00023eda 22 4f |"O | MOVEA.L A7,A1
00023edc 45 fa c9 2a |E * | LEA.L 0x20808,A2
00023ee0 70 12 |p | MOVEQ.L #0x12,D0
00023ee2 12 da | | MOVE.B (A2)+,(A1)+
00023ee4 51 c8 ff fc |Q | DBF D0,0x23ee2
00023ee8 9e fc 00 0a | | SUBA.W #0xa,A7
00023eec 48 6f 00 0a |Ho | PEA.L (A7+0xa)
00023ef0 3f 01 |? | MOVE.W D1,-(A7)
00023ef2 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
00023ef6 4e 93 |N | JSR (A3)
00023ef8 58 4f |XO | ADDQ.L #0x4,A7
00023efa 30 07 |0 | MOVE.W D7,D0
00023efc 48 c0 |H | EXTW.L D0
00023efe 2f 00 |/ | MOVE.L D0,-(A7)
00023f00 4e 94 |N | JSR (A4)
00023f02 58 4f |XO | ADDQ.L #0x4,A7
00023f04 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00023f0a 5c 4f |\O | ADDQ.L #0x6,A7
00023f0c 1e 81 | | MOVE.B D1,(A7)
00023f0e 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
00023f14 5c 4f |\O | ADDQ.L #0x6,A7
00023f16 10 1f | | MOVE.B (A7)+,D0
00023f18 48 80 |H | EXTB.W D0
00023f1a 41 81 |A | CHK.W D1,D0
00023f1c de c3 | | ADDA.W D3,A7
00023f1e 10 80 | | MOVE.B D0,(A0)
00023f20 4a 10 |J | TST.B (A0)
00023f22 67 08 |g | BEQ 0x23f2c
00023f24 3f 07 |? | MOVE.W D7,-(A7)
00023f26 4e ba fd 76 |N v | JSR 0x23c9e
00023f2a 54 4f |TO | ADDQ.L #0x2,A7
00023f2c 52 47 |RG | ADDQ.W #0x1,D7
00023f2e 0c 47 00 0f | G | CMPI.W #0x000f,D7
00023f32 6f 00 ff 7a |o z | BLE 0x23eae
00023f36 7e 00 |~ | MOVEQ.L #0x00,D7
00023f38 70 46 |pF | MOVEQ.L #0x46,D0
00023f3a c1 c7 | | MULS.W D7,D0
00023f3c 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00023f42 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00023f46 d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
00023f4c 4a 10 |J | TST.B (A0)
00023f4e 67 00 00 9a |g | BEQ 0x23fea
00023f52 4a 05 |J | TST.B D5
00023f54 67 06 |g | BEQ 0x23f5c
00023f56 21 68 00 1a 00 1e |!h | MOVE.L (A0+0x1a),(A0+0x1e)
00023f5c 9e c2 | | SUBA.W D2,A7
00023f5e 22 4f |"O | MOVEA.L A7,A1
00023f60 45 fa c8 ba |E | LEA.L 0x2081c,A2
00023f64 70 0c |p | MOVEQ.L #0x0c,D0
00023f66 12 da | | MOVE.B (A2)+,(A1)+
00023f68 51 c8 ff fc |Q | DBF D0,0x23f66
00023f6c 9e c3 | | SUBA.W D3,A7
00023f6e 22 4f |"O | MOVEA.L A7,A1
00023f70 45 fa c8 b8 |E | LEA.L 0x2082a,A2
00023f74 70 12 |p | MOVEQ.L #0x12,D0
00023f76 12 da | | MOVE.B (A2)+,(A1)+
00023f78 51 c8 ff fc |Q | DBF D0,0x23f76
00023f7c 3f 3a c8 c0 |?: | MOVE.W 0x2083e,-(A7)
00023f80 3f 3a c8 be |?: | MOVE.W 0x20840,-(A7)
00023f84 51 4f |QO | SUBQ.L #0x8,A7
00023f86 48 6f 00 20 |Ho | PEA.L (A7+0x20)
00023f8a 3f 01 |? | MOVE.W D1,-(A7)
00023f8c 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7)
00023f90 4e 93 |N | JSR (A3)
00023f92 58 4f |XO | ADDQ.L #0x4,A7
00023f94 30 07 |0 | MOVE.W D7,D0
00023f96 48 c0 |H | EXTW.L D0
00023f98 2f 00 |/ | MOVE.L D0,-(A7)
00023f9a 4e 94 |N | JSR (A4)
00023f9c 48 6f 00 14 |Ho | PEA.L (A7+0x14)
00023fa0 3f 01 |? | MOVE.W D1,-(A7)
00023fa2 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
00023fa6 4e 93 |N | JSR (A3)
00023fa8 2e a8 00 1a |. | MOVE.L (A0+0x1a),(A7)
00023fac 4e 94 |N | JSR (A4)
00023fae 48 6f 00 1a |Ho | PEA.L (A7+0x1a)
00023fb2 3f 01 |? | MOVE.W D1,-(A7)
00023fb4 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00023fb8 4e 93 |N | JSR (A3)
00023fba 2f 28 00 1e |/( | MOVE.L (A0+0x1e),-(A7)
00023fbe 4e 94 |N | JSR (A4)
00023fc0 48 6f 00 24 |Ho $ | PEA.L (A7+0x24)
00023fc4 3f 01 |? | MOVE.W D1,-(A7)
00023fc6 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00023fca 4e 93 |N | JSR (A3)
00023fcc 50 4f |PO | ADDQ.L #0x8,A7
00023fce 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00023fd4 50 4f |PO | ADDQ.L #0x8,A7
00023fd6 4e b9 00 01 02 e0 |N | JSR StringCat6(a, b, c, d, e, f : String) : String
00023fdc de fc 00 18 | | ADDA.W #0x18,A7
00023fe0 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00023fe6 de fc 00 2a | * | ADDA.W #0x2a,A7
00023fea 52 47 |RG | ADDQ.W #0x1,D7
00023fec 0c 47 00 0f | G | CMPI.W #0x000f,D7
00023ff0 6f 00 ff 46 |o F | BLE 0x23f38
00023ff4 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00023ff8 4e 5e |N^ | UNLK A6
00023ffa 4e 75 |Nu | RTS
00023ffc ; --------------------------------------------------------------------------------------
00023ffc ; OMSI PASCAL Function
00023ffc ; <LVAR 0x00c 2(r)>
00023ffc ; <LVAR 0x008 4(r)>
00023ffc ; <LVAR -0x006 2(w)>
00023ffc ; <LVAR -0x008 2(w)>
00023ffc ; <LVAR -0x00c 2(w)>
00023ffc ; <LVAR -0x010 @>
00023ffc ; <LVAR -0x012 @>
00023ffc ; --------------------------------------------------------------------------------------
00023ffc 4e 56 ff cc |NV | LINK.W A6,#0xffcc
00024000 bf d5 | | CMPA.L (A5),A7
00024002 62 06 |b | BHI 0x2400a
00024004 44 fc 00 02 |D | MOVE.W #0x2,CCR
00024008 4e 76 |Nv | TRAPV
0002400a de fc 00 22 | " | ADDA.W #0x22,A7
0002400e 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7)
00024012 72 1c |r | MOVEQ.L #0x1c,D1
00024014 3d 7c 00 02 ff f4 |=| | MOVE.W #0x2,(A6-0xc)
0002401a 3d 7c 00 04 ff f8 |=| | MOVE.W #0x4,(A6-0x8)
00024020 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0
00024024 e1 40 | @ | ASL.W #0x8,D0
00024026 52 40 |R@ | ADDQ.W #0x1,D0
00024028 3d 40 ff fa |=@ | MOVE.W D0,(A6-0x6)
0002402c 48 6e ff f0 |Hn | PEA.L (A6-0x10)
00024030 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0
00024034 2f 08 |/ | MOVE.L A0,-(A7)
00024036 3f 01 |? | MOVE.W D1,-(A7)
00024038 48 78 00 00 |Hx | PEA.L 0x0
0002403c 48 78 00 16 |Hx | PEA.L 0x16
00024040 4e ba d2 02 |N | JSR 0x21244
00024044 de fc 00 10 | | ADDA.W #0x10,A7
00024048 3e 81 |> | MOVE.W D1,(A7)
0002404a 48 6e ff ee |Hn | PEA.L (A6-0x12)
0002404e 4e ba d1 0a |N | JSR 0x2115a
00024052 5c 4f |\O | ADDQ.L #0x6,A7
00024054 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0
00024058 4e 5e |N^ | UNLK A6
0002405a 4e 75 |Nu | RTS
0002405c ; --------------------------------------------------------------------------------------
0002405c ; OMSI PASCAL Function
0002405c ; <LVAR 0x008 2(r)>
0002405c ; <LVAR -0x008 2(w)>
0002405c ; <LVAR -0x00a 2(w)>
0002405c ; <LVAR -0x00c 2(w)>
0002405c ; <LVAR -0x00e 2(r)>
0002405c ; <LVAR -0x012 2(w)>
0002405c ; <LVAR -0x016 @ 2(w)>
0002405c ; --------------------------------------------------------------------------------------
0002405c 4e 56 ff b4 |NV | LINK.W A6,#0xffb4
00024060 bf d5 | | CMPA.L (A5),A7
00024062 62 06 |b | BHI 0x2406a
00024064 44 fc 00 02 |D | MOVE.W #0x2,CCR
00024068 4e 76 |Nv | TRAPV
0002406a de fc 00 36 | 6 | ADDA.W #0x36,A7
0002406e 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7)
00024072 45 ee 00 08 |E | LEA.L (A6+0x8),A2
00024076 47 f8 00 00 |G | LEA.L 0x0,A3
0002407a 49 fa cb ec |I | LEA.L 0x20c68,A4
0002407e 22 3c 00 00 ff ff |"< | MOVE.L #0xffff,D1
00024084 70 46 |pF | MOVEQ.L #0x46,D0
00024086 c1 d2 | | MULS.W (A2),D0
00024088 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
0002408e 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00024092 d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
00024098 59 4f |YO | SUBQ.L #0x4,A7
0002409a 4e ba cc 26 |N & | JSR 0x20cc2
0002409e 20 1f | | MOVE.L (A7)+,D0
000240a0 b0 81 | | CMP.L D1,D0
000240a2 63 02 |c | BLS 0x240a6
000240a4 4e 4f |NO | TRAP #15
000240a6 31 40 00 26 |1@ & | MOVE.W D0,(A0+0x26)
000240aa 59 4f |YO | SUBQ.L #0x4,A7
000240ac 48 53 |HS | PEA.L (A3)
000240ae 42 80 |B | CLR.L D0
000240b0 30 28 00 24 |0( $ | MOVE.W (A0+0x24),D0
000240b4 53 80 |S | SUBQ.L #0x1,D0
000240b6 2f 00 |/ | MOVE.L D0,-(A7)
000240b8 4e 94 |N | JSR (A4)
000240ba 50 4f |PO | ADDQ.L #0x8,A7
000240bc 20 1f | | MOVE.L (A7)+,D0
000240be e3 80 | | ASL.L #0x1,D0
000240c0 21 40 00 0e |!@ | MOVE.L D0,(A0+0xe)
000240c4 59 4f |YO | SUBQ.L #0x4,A7
000240c6 48 53 |HS | PEA.L (A3)
000240c8 42 80 |B | CLR.L D0
000240ca 30 28 00 22 |0( " | MOVE.W (A0+0x22),D0
000240ce 53 80 |S | SUBQ.L #0x1,D0
000240d0 2f 00 |/ | MOVE.L D0,-(A7)
000240d2 4e 94 |N | JSR (A4)
000240d4 50 4f |PO | ADDQ.L #0x8,A7
000240d6 21 57 00 12 |!W | MOVE.L (A7),(A0+0x12)
000240da 2f 28 00 1a |/( | MOVE.L (A0+0x1a),-(A7)
000240de 2f 28 00 1e |/( | MOVE.L (A0+0x1e),-(A7)
000240e2 4e 94 |N | JSR (A4)
000240e4 50 4f |PO | ADDQ.L #0x8,A7
000240e6 21 5f 00 16 |!_ | MOVE.L (A7)+,(A0+0x16)
000240ea 3d 7c 01 00 ff ea |=| | MOVE.W #0x100,(A6-0x16)
000240f0 3d 7c 00 02 ff ee |=| | MOVE.W #0x2,(A6-0x12)
000240f6 42 6e ff f2 |Bn | CLR.W (A6-0xe)
000240fa 30 12 |0 | MOVE.W (A2),D0
000240fc e1 40 | @ | ASL.W #0x8,D0
000240fe 06 40 00 0b | @ | ADDI.W #0x000b,D0
00024102 3d 40 ff f4 |=@ | MOVE.W D0,(A6-0xc)
00024106 20 28 00 16 | ( | MOVE.L (A0+0x16),D0
0002410a b0 81 | | CMP.L D1,D0
0002410c 63 02 |c | BLS 0x24110
0002410e 4e 4f |NO | TRAP #15
00024110 3d 40 ff f6 |=@ | MOVE.W D0,(A6-0xa)
00024114 20 28 00 12 | ( | MOVE.L (A0+0x12),D0
00024118 e1 80 | | ASL.L #0x8,D0
0002411a d0 a8 00 0e | | ADD.L (A0+0xe),D0
0002411e b0 81 | | CMP.L D1,D0
00024120 63 02 |c | BLS 0x24124
00024122 4e 4f |NO | TRAP #15
00024124 3d 40 ff f8 |=@ | MOVE.W D0,(A6-0x8)
00024128 48 6e ff ea |Hn | PEA.L (A6-0x16)
0002412c 43 e8 00 26 |C & | LEA.L (A0+0x26),A1
00024130 2f 09 |/ | MOVE.L A1,-(A7)
00024132 3f 12 |? | MOVE.W (A2),-(A7)
00024134 48 78 00 02 |Hx | PEA.L 0x2
00024138 48 53 |HS | PEA.L (A3)
0002413a 4e ba d1 08 |N | JSR 0x21244
0002413e de fc 00 12 | | ADDA.W #0x12,A7
00024142 11 7c 00 01 00 01 | | | MOVE.B #0x01,(A0+0x1)
00024148 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4
0002414c 4e 5e |N^ | UNLK A6
0002414e 4e 75 |Nu | RTS
00024150 ; --------------------------------------------------------------------------------------
00024150 ; OMSI PASCAL Function
00024150 ; <LVAR 0x008 2(r)>
00024150 ; <LVAR -0x004 2(w)>
00024150 ; <LVAR -0x006 2(w)>
00024150 ; <LVAR -0x008 2(w)>
00024150 ; <LVAR -0x00a 2(r)>
00024150 ; <LVAR -0x00e 2(w)>
00024150 ; <LVAR -0x012 @ 2(w)>
00024150 ; --------------------------------------------------------------------------------------
00024150 4e 56 ff c4 |NV | LINK.W A6,#0xffc4
00024154 bf d5 | | CMPA.L (A5),A7
00024156 62 06 |b | BHI 0x2415e
00024158 44 fc 00 02 |D | MOVE.W #0x2,CCR
0002415c 4e 76 |Nv | TRAPV
0002415e de fc 00 2a | * | ADDA.W #0x2a,A7
00024162 48 e7 80 e0 |H | MOVEM.L A2+A1+A0+D0,-(A7)
00024166 45 ee 00 08 |E | LEA.L (A6+0x8),A2
0002416a 70 46 |pF | MOVEQ.L #0x46,D0
0002416c c1 d2 | | MULS.W (A2),D0
0002416e 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00024174 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00024178 d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
0002417e 3d 7c 01 00 ff ee |=| | MOVE.W #0x100,(A6-0x12)
00024184 3d 7c 00 02 ff f2 |=| | MOVE.W #0x2,(A6-0xe)
0002418a 42 6e ff f6 |Bn | CLR.W (A6-0xa)
0002418e 30 12 |0 | MOVE.W (A2),D0
00024190 e1 40 | @ | ASL.W #0x8,D0
00024192 06 40 00 0c | @ | ADDI.W #0x000c,D0
00024196 3d 40 ff f8 |=@ | MOVE.W D0,(A6-0x8)
0002419a 20 28 00 16 | ( | MOVE.L (A0+0x16),D0
0002419e 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0
000241a4 63 02 |c | BLS 0x241a8
000241a6 4e 4f |NO | TRAP #15
000241a8 3d 40 ff fa |=@ | MOVE.W D0,(A6-0x6)
000241ac 20 28 00 12 | ( | MOVE.L (A0+0x12),D0
000241b0 e1 80 | | ASL.L #0x8,D0
000241b2 d0 a8 00 0e | | ADD.L (A0+0xe),D0
000241b6 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0
000241bc 63 02 |c | BLS 0x241c0
000241be 4e 4f |NO | TRAP #15
000241c0 3d 40 ff fc |=@ | MOVE.W D0,(A6-0x4)
000241c4 48 6e ff ee |Hn | PEA.L (A6-0x12)
000241c8 43 e8 00 26 |C & | LEA.L (A0+0x26),A1
000241cc 2f 09 |/ | MOVE.L A1,-(A7)
000241ce 3f 12 |? | MOVE.W (A2),-(A7)
000241d0 48 78 00 02 |Hx | PEA.L 0x2
000241d4 48 78 00 00 |Hx | PEA.L 0x0
000241d8 4e ba d0 6a |N j | JSR 0x21244
000241dc de fc 00 12 | | ADDA.W #0x12,A7
000241e0 42 28 00 01 |B( | CLR.B (A0+0x1)
000241e4 4c df 07 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2
000241e8 4e 5e |N^ | UNLK A6
000241ea 4e 75 |Nu | RTS
000241ec ; --------------------------------------------------------------------------------------
000241ec ; OMSI PASCAL Function
000241ec ; <LVAR 0x008 4(r)>
000241ec ; --------------------------------------------------------------------------------------
000241ec 4e 56 ff ce |NV | LINK.W A6,#0xffce
000241f0 bf d5 | | CMPA.L (A5),A7
000241f2 62 06 |b | BHI 0x241fa
000241f4 44 fc 00 02 |D | MOVE.W #0x2,CCR
000241f8 4e 76 |Nv | TRAPV
000241fa de fc 00 32 | 2 | ADDA.W #0x32,A7
000241fe 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7)
00024202 43 ec 00 08 |C | LEA.L (A4+0x8),A1
00024206 45 ee 00 08 |E | LEA.L (A6+0x8),A2
0002420a 20 51 | Q | MOVEA.L (A1),A0
0002420c 4a 50 |JP | TST.W (A0)
0002420e 66 12 |f | BNE 0x24222
00024210 59 4f |YO | SUBQ.L #0x4,A7
00024212 2f 11 |/ | MOVE.L (A1),-(A7)
00024214 2f 12 |/ | MOVE.L (A2),-(A7)
00024216 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
0002421c 50 4f |PO | ADDQ.L #0x8,A7
0002421e 22 9f |" | MOVE.L (A7)+,(A1)
00024220 60 52 |`R | BRA 0x24274
00024222 30 10 |0 | MOVE.W (A0),D0
00024224 48 c0 |H | EXTW.L D0
00024226 54 80 |T | ADDQ.L #0x2,D0
00024228 20 52 | R | MOVEA.L (A2),A0
0002422a 32 10 |2 | MOVE.W (A0),D1
0002422c 48 c1 |H | EXTW.L D1
0002422e d2 80 | | ADD.L D0,D1
00024230 0c 81 00 00 00 50 | P | CMPI.L #0x00000050,D1
00024236 6e 30 |n0 | BGT 0x24268
00024238 3f 3a c8 da |?: | MOVE.W 0x20b14,-(A7)
0002423c 59 4f |YO | SUBQ.L #0x4,A7
0002423e 2f 11 |/ | MOVE.L (A1),-(A7)
00024240 59 4f |YO | SUBQ.L #0x4,A7
00024242 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00024246 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
0002424a 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
0002424e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00024254 58 4f |XO | ADDQ.L #0x4,A7
00024256 2e 92 |. | MOVE.L (A2),(A7)
00024258 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String
0002425e de fc 00 0c | | ADDA.W #0xc,A7
00024262 22 9f |" | MOVE.L (A7)+,(A1)
00024264 54 4f |TO | ADDQ.L #0x2,A7
00024266 60 0c |` | BRA 0x24274
00024268 2f 11 |/ | MOVE.L (A1),-(A7)
0002426a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00024270 58 4f |XO | ADDQ.L #0x4,A7
00024272 22 92 |" | MOVE.L (A2),(A1)
00024274 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2
00024278 4e 5e |N^ | UNLK A6
0002427a 4e 75 |Nu | RTS
0002427c ; --------------------------------------------------------------------------------------
0002427c ; OMSI PASCAL Function
0002427c ; <LVAR 0x00a 4(r)>
0002427c ; <LVAR 0x008 2(r)>
0002427c ; <LVAR -0x006 @ 4(r)>
0002427c ; <LVAR -0x00e @ 4(r)>
0002427c ; --------------------------------------------------------------------------------------
0002427c 4e 56 ff 6c |NV l | LINK.W A6,#0xff6c
00024280 bf d5 | | CMPA.L (A5),A7
00024282 62 06 |b | BHI 0x2428a
00024284 44 fc 00 02 |D | MOVE.W #0x2,CCR
00024288 4e 76 |Nv | TRAPV
0002428a de fc 00 86 | | ADDA.W #0x86,A7
0002428e 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00024292 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
00024298 74 01 |t | MOVEQ.L #0x01,D2
0002429a 7a 10 |z | MOVEQ.L #0x10,D5
0002429c 7c 14 || | MOVEQ.L #0x14,D6
0002429e 48 6e ff fa |Hn | PEA.L (A6-0x6)
000242a2 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String)
000242a8 58 4f |XO | ADDQ.L #0x4,A7
000242aa 48 6e ff f2 |Hn | PEA.L (A6-0xe)
000242ae 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp
000242b4 58 4f |XO | ADDQ.L #0x4,A7
000242b6 70 46 |pF | MOVEQ.L #0x46,D0
000242b8 c1 ee 00 08 | | MULS.W (A6+0x8),D0
000242bc 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
000242c2 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
000242c6 d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
000242cc 2f 08 |/ | MOVE.L A0,-(A7)
000242ce 2f 3a c8 4e |/: N | MOVE.L 0x20b1e,-(A7)
000242d2 2f 3a c8 46 |/: F | MOVE.L 0x20b1a,-(A7)
000242d6 2f 3a c8 3e |/: > | MOVE.L 0x20b16,-(A7)
000242da 3f 3a c8 46 |?: F | MOVE.W 0x20b22,-(A7)
000242de 3f 3a c8 44 |?: D | MOVE.W 0x20b24,-(A7)
000242e2 51 4f |QO | SUBQ.L #0x8,A7
000242e4 48 6f 00 0c |Ho | PEA.L (A7+0xc)
000242e8 3f 02 |? | MOVE.W D2,-(A7)
000242ea 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7)
000242ee 4e 93 |N | JSR (A3)
000242f0 59 4f |YO | SUBQ.L #0x4,A7
000242f2 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0
000242f6 48 c0 |H | EXTW.L D0
000242f8 2f 00 |/ | MOVE.L D0,-(A7)
000242fa 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00024300 48 6f 00 1a |Ho | PEA.L (A7+0x1a)
00024304 3f 02 |? | MOVE.W D2,-(A7)
00024306 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
0002430a 4e 93 |N | JSR (A3)
0002430c 50 4f |PO | ADDQ.L #0x8,A7
0002430e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00024314 50 4f |PO | ADDQ.L #0x8,A7
00024316 48 78 00 04 |Hx | PEA.L 0x4
0002431a 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
00024320 2e ae ff f2 |. | MOVE.L (A6-0xe),(A7)
00024324 4e b9 00 01 03 08 |N | JSR TimeToText()
0002432a 48 6f 00 14 |Ho | PEA.L (A7+0x14)
0002432e 3f 02 |? | MOVE.W D2,-(A7)
00024330 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
00024334 4e 93 |N | JSR (A3)
00024336 50 4f |PO | ADDQ.L #0x8,A7
00024338 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String
0002433e de c5 | | ADDA.W D5,A7
00024340 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
00024346 de c6 | | ADDA.W D6,A7
00024348 43 fa c7 ee |C | LEA.L 0x20b38,A1
0002434c 70 08 |p | MOVEQ.L #0x08,D0
0002434e 3f 21 |?! | MOVE.W -(A1),-(A7)
00024350 51 c8 ff fc |Q | DBF D0,0x2434e
00024354 59 4f |YO | SUBQ.L #0x4,A7
00024356 2f 2e 00 0a |/. | MOVE.L (A6+0xa),-(A7)
0002435a 59 4f |YO | SUBQ.L #0x4,A7
0002435c 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00024360 3f 02 |? | MOVE.W D2,-(A7)
00024362 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7)
00024366 4e 93 |N | JSR (A3)
00024368 2e a8 00 0a |. | MOVE.L (A0+0xa),(A7)
0002436c 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00024372 58 4f |XO | ADDQ.L #0x4,A7
00024374 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String
0002437a de fc 00 0c | | ADDA.W #0xc,A7
0002437e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00024384 de fc 00 16 | | ADDA.W #0x16,A7
00024388 7e 00 |~ | MOVEQ.L #0x00,D7
0002438a 0c 87 00 00 00 08 | | CMPI.L #0x00000008,D7
00024390 63 02 |c | BLS 0x24394
00024392 4e 4f |NO | TRAP #15
00024394 28 07 |( | MOVE.L D7,D4
00024396 76 05 |v | MOVEQ.L #0x05,D3
00024398 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4
0002439e 41 fa c8 74 |A t | LEA.L 0x20c14,A0
000243a2 5d 4f |]O | SUBQ.L #0x6,A7
000243a4 22 4f |"O | MOVEA.L A7,A1
000243a6 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0
000243aa 70 04 |p | MOVEQ.L #0x04,D0
000243ac 12 d8 | | MOVE.B (A0)+,(A1)+
000243ae 51 c8 ff fc |Q | DBF D0,0x243ac
000243b2 51 4f |QO | SUBQ.L #0x8,A7
000243b4 48 6f 00 08 |Ho | PEA.L (A7+0x8)
000243b8 3f 02 |? | MOVE.W D2,-(A7)
000243ba 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7)
000243be 4e 93 |N | JSR (A3)
000243c0 58 4f |XO | ADDQ.L #0x4,A7
000243c2 0c 87 00 00 00 0a | | CMPI.L #0x0000000a,D7
000243c8 63 02 |c | BLS 0x243cc
000243ca 4e 4f |NO | TRAP #15
000243cc 20 07 | | MOVE.L D7,D0
000243ce e3 80 | | ASL.L #0x1,D0
000243d0 20 6f 00 12 | o | MOVEA.L (A7+0x12),A0
000243d4 42 81 |B | CLR.L D1
000243d6 32 30 08 28 |20 ( | MOVE.W (A0+D0.L+#0x28),D1
000243da 2f 01 |/ | MOVE.L D1,-(A7)
000243dc 48 78 00 04 |Hx | PEA.L 0x4
000243e0 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String
000243e6 50 4f |PO | ADDQ.L #0x8,A7
000243e8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
000243ee 50 4f |PO | ADDQ.L #0x8,A7
000243f0 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String)
000243f6 de fc 00 0a | | ADDA.W #0xa,A7
000243fa 52 87 |R | ADDQ.L #0x1,D7
000243fc 0c 87 00 00 00 08 | | CMPI.L #0x00000008,D7
00024402 6f 86 |o | BLE 0x2438a
00024404 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
0002440a 20 57 | W | MOVEA.L (A7),A0
0002440c 30 28 00 28 |0( ( | MOVE.W (A0+0x28),D0
00024410 02 40 80 00 | @ | ANDI.W #0x8000,D0
00024414 67 2e |g. | BEQ 0x24444
00024416 9e fc 00 12 | | SUBA.W #0x12,A7
0002441a 22 4f |"O | MOVEA.L A7,A1
0002441c 45 fa c4 5a |E Z | LEA.L 0x20878,A2
00024420 70 10 |p | MOVEQ.L #0x10,D0
00024422 12 da | | MOVE.B (A2)+,(A1)+
00024424 51 c8 ff fc |Q | DBF D0,0x24422
00024428 59 4f |YO | SUBQ.L #0x4,A7
0002442a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002442e 3f 02 |? | MOVE.W D2,-(A7)
00024430 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7)
00024434 4e 93 |N | JSR (A3)
00024436 50 4f |PO | ADDQ.L #0x8,A7
00024438 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002443c 4e ba fd ae |N | JSR 0x241ec
00024440 de fc 00 16 | | ADDA.W #0x16,A7
00024444 30 28 00 28 |0( ( | MOVE.W (A0+0x28),D0
00024448 02 40 40 00 | @@ | ANDI.W #0x4000,D0
0002444c 67 28 |g( | BEQ 0x24476
0002444e 43 fa c4 48 |C H | LEA.L 0x20898,A1
00024452 70 06 |p | MOVEQ.L #0x06,D0
00024454 3f 21 |?! | MOVE.W -(A1),-(A7)
00024456 51 c8 ff fc |Q | DBF D0,0x24454
0002445a 59 4f |YO | SUBQ.L #0x4,A7
0002445c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024460 3f 02 |? | MOVE.W D2,-(A7)
00024462 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
00024466 4e 93 |N | JSR (A3)
00024468 50 4f |PO | ADDQ.L #0x8,A7
0002446a 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002446e 4e ba fd 7c |N | | JSR 0x241ec
00024472 de fc 00 12 | | ADDA.W #0x12,A7
00024476 30 28 00 28 |0( ( | MOVE.W (A0+0x28),D0
0002447a 02 40 08 00 | @ | ANDI.W #0x0800,D0
0002447e 66 28 |f( | BNE 0x244a8
00024480 43 fa c4 2c |C , | LEA.L 0x208ae,A1
00024484 70 0a |p | MOVEQ.L #0x0a,D0
00024486 3f 21 |?! | MOVE.W -(A1),-(A7)
00024488 51 c8 ff fc |Q | DBF D0,0x24486
0002448c 59 4f |YO | SUBQ.L #0x4,A7
0002448e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024492 3f 02 |? | MOVE.W D2,-(A7)
00024494 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7)
00024498 4e 93 |N | JSR (A3)
0002449a 50 4f |PO | ADDQ.L #0x8,A7
0002449c 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000244a0 4e ba fd 4a |N J | JSR 0x241ec
000244a4 de fc 00 1a | | ADDA.W #0x1a,A7
000244a8 30 28 00 28 |0( ( | MOVE.W (A0+0x28),D0
000244ac 02 40 00 80 | @ | ANDI.W #0x0080,D0
000244b0 66 28 |f( | BNE 0x244da
000244b2 43 fa c4 0c |C | LEA.L 0x208c0,A1
000244b6 70 08 |p | MOVEQ.L #0x08,D0
000244b8 3f 21 |?! | MOVE.W -(A1),-(A7)
000244ba 51 c8 ff fc |Q | DBF D0,0x244b8
000244be 59 4f |YO | SUBQ.L #0x4,A7
000244c0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000244c4 3f 02 |? | MOVE.W D2,-(A7)
000244c6 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7)
000244ca 4e 93 |N | JSR (A3)
000244cc 50 4f |PO | ADDQ.L #0x8,A7
000244ce 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000244d2 4e ba fd 18 |N | JSR 0x241ec
000244d6 de fc 00 16 | | ADDA.W #0x16,A7
000244da 30 28 00 2a |0( * | MOVE.W (A0+0x2a),D0
000244de 02 40 80 00 | @ | ANDI.W #0x8000,D0
000244e2 67 2e |g. | BEQ 0x24512
000244e4 9e fc 00 0a | | SUBA.W #0xa,A7
000244e8 22 4f |"O | MOVEA.L A7,A1
000244ea 45 fa c3 d4 |E | LEA.L 0x208c0,A2
000244ee 70 08 |p | MOVEQ.L #0x08,D0
000244f0 12 da | | MOVE.B (A2)+,(A1)+
000244f2 51 c8 ff fc |Q | DBF D0,0x244f0
000244f6 59 4f |YO | SUBQ.L #0x4,A7
000244f8 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000244fc 3f 02 |? | MOVE.W D2,-(A7)
000244fe 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7)
00024502 4e 93 |N | JSR (A3)
00024504 50 4f |PO | ADDQ.L #0x8,A7
00024506 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002450a 4e ba fc e0 |N | JSR 0x241ec
0002450e de fc 00 0e | | ADDA.W #0xe,A7
00024512 30 28 00 2a |0( * | MOVE.W (A0+0x2a),D0
00024516 02 40 40 00 | @@ | ANDI.W #0x4000,D0
0002451a 67 2e |g. | BEQ 0x2454a
0002451c 9e fc 00 12 | | SUBA.W #0x12,A7
00024520 22 4f |"O | MOVEA.L A7,A1
00024522 45 fa c3 a6 |E | LEA.L 0x208ca,A2
00024526 70 10 |p | MOVEQ.L #0x10,D0
00024528 12 da | | MOVE.B (A2)+,(A1)+
0002452a 51 c8 ff fc |Q | DBF D0,0x24528
0002452e 59 4f |YO | SUBQ.L #0x4,A7
00024530 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024534 3f 02 |? | MOVE.W D2,-(A7)
00024536 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7)
0002453a 4e 93 |N | JSR (A3)
0002453c 50 4f |PO | ADDQ.L #0x8,A7
0002453e 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024542 4e ba fc a8 |N | JSR 0x241ec
00024546 de fc 00 16 | | ADDA.W #0x16,A7
0002454a 30 28 00 2a |0( * | MOVE.W (A0+0x2a),D0
0002454e 02 40 10 00 | @ | ANDI.W #0x1000,D0
00024552 67 28 |g( | BEQ 0x2457c
00024554 43 fa c3 98 |C | LEA.L 0x208ee,A1
00024558 70 08 |p | MOVEQ.L #0x08,D0
0002455a 3f 21 |?! | MOVE.W -(A1),-(A7)
0002455c 51 c8 ff fc |Q | DBF D0,0x2455a
00024560 59 4f |YO | SUBQ.L #0x4,A7
00024562 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024566 3f 02 |? | MOVE.W D2,-(A7)
00024568 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7)
0002456c 4e 93 |N | JSR (A3)
0002456e 50 4f |PO | ADDQ.L #0x8,A7
00024570 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024574 4e ba fc 76 |N v | JSR 0x241ec
00024578 de fc 00 16 | | ADDA.W #0x16,A7
0002457c 30 28 00 2a |0( * | MOVE.W (A0+0x2a),D0
00024580 02 40 08 00 | @ | ANDI.W #0x0800,D0
00024584 67 2c |g, | BEQ 0x245b2
00024586 9e c6 | | SUBA.W D6,A7
00024588 22 4f |"O | MOVEA.L A7,A1
0002458a 45 fa c3 62 |E b | LEA.L 0x208ee,A2
0002458e 70 12 |p | MOVEQ.L #0x12,D0
00024590 12 da | | MOVE.B (A2)+,(A1)+
00024592 51 c8 ff fc |Q | DBF D0,0x24590
00024596 59 4f |YO | SUBQ.L #0x4,A7
00024598 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002459c 3f 02 |? | MOVE.W D2,-(A7)
0002459e 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
000245a2 4e 93 |N | JSR (A3)
000245a4 50 4f |PO | ADDQ.L #0x8,A7
000245a6 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000245aa 4e ba fc 40 |N @ | JSR 0x241ec
000245ae de fc 00 18 | | ADDA.W #0x18,A7
000245b2 30 28 00 2a |0( * | MOVE.W (A0+0x2a),D0
000245b6 02 40 04 00 | @ | ANDI.W #0x0400,D0
000245ba 67 2e |g. | BEQ 0x245ea
000245bc 9e fc 00 0e | | SUBA.W #0xe,A7
000245c0 22 4f |"O | MOVEA.L A7,A1
000245c2 45 fa c3 3e |E > | LEA.L 0x20902,A2
000245c6 70 0c |p | MOVEQ.L #0x0c,D0
000245c8 12 da | | MOVE.B (A2)+,(A1)+
000245ca 51 c8 ff fc |Q | DBF D0,0x245c8
000245ce 59 4f |YO | SUBQ.L #0x4,A7
000245d0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000245d4 3f 02 |? | MOVE.W D2,-(A7)
000245d6 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7)
000245da 4e 93 |N | JSR (A3)
000245dc 50 4f |PO | ADDQ.L #0x8,A7
000245de 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000245e2 4e ba fc 08 |N | JSR 0x241ec
000245e6 de fc 00 12 | | ADDA.W #0x12,A7
000245ea 30 28 00 2a |0( * | MOVE.W (A0+0x2a),D0
000245ee 02 40 02 00 | @ | ANDI.W #0x0200,D0
000245f2 67 2a |g* | BEQ 0x2461e
000245f4 9e c5 | | SUBA.W D5,A7
000245f6 22 4f |"O | MOVEA.L A7,A1
000245f8 45 fa c3 16 |E | LEA.L 0x20910,A2
000245fc 70 0e |p | MOVEQ.L #0x0e,D0
000245fe 12 da | | MOVE.B (A2)+,(A1)+
00024600 51 c8 ff fc |Q | DBF D0,0x245fe
00024604 59 4f |YO | SUBQ.L #0x4,A7
00024606 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002460a 3f 02 |? | MOVE.W D2,-(A7)
0002460c 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
00024610 4e 93 |N | JSR (A3)
00024612 50 4f |PO | ADDQ.L #0x8,A7
00024614 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024618 4e ba fb d2 |N | JSR 0x241ec
0002461c de c6 | | ADDA.W D6,A7
0002461e 30 28 00 2a |0( * | MOVE.W (A0+0x2a),D0
00024622 02 40 00 40 | @ @ | ANDI.W #0x0040,D0
00024626 66 2a |f* | BNE 0x24652
00024628 9e c5 | | SUBA.W D5,A7
0002462a 22 4f |"O | MOVEA.L A7,A1
0002462c 45 fa c2 f2 |E | LEA.L 0x20920,A2
00024630 70 0e |p | MOVEQ.L #0x0e,D0
00024632 12 da | | MOVE.B (A2)+,(A1)+
00024634 51 c8 ff fc |Q | DBF D0,0x24632
00024638 59 4f |YO | SUBQ.L #0x4,A7
0002463a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002463e 3f 02 |? | MOVE.W D2,-(A7)
00024640 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
00024644 4e 93 |N | JSR (A3)
00024646 50 4f |PO | ADDQ.L #0x8,A7
00024648 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002464c 4e ba fb 9e |N | JSR 0x241ec
00024650 de c6 | | ADDA.W D6,A7
00024652 30 28 00 2a |0( * | MOVE.W (A0+0x2a),D0
00024656 02 40 00 04 | @ | ANDI.W #0x0004,D0
0002465a 67 2e |g. | BEQ 0x2468a
0002465c 9e fc 00 1e | | SUBA.W #0x1e,A7
00024660 22 4f |"O | MOVEA.L A7,A1
00024662 45 fa c2 cc |E | LEA.L 0x20930,A2
00024666 70 1c |p | MOVEQ.L #0x1c,D0
00024668 12 da | | MOVE.B (A2)+,(A1)+
0002466a 51 c8 ff fc |Q | DBF D0,0x24668
0002466e 59 4f |YO | SUBQ.L #0x4,A7
00024670 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024674 3f 02 |? | MOVE.W D2,-(A7)
00024676 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7)
0002467a 4e 93 |N | JSR (A3)
0002467c 50 4f |PO | ADDQ.L #0x8,A7
0002467e 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024682 4e ba fb 68 |N h | JSR 0x241ec
00024686 de fc 00 22 | " | ADDA.W #0x22,A7
0002468a 30 28 00 2c |0( , | MOVE.W (A0+0x2c),D0
0002468e 02 40 20 00 | @ | ANDI.W #0x2000,D0
00024692 67 2e |g. | BEQ 0x246c2
00024694 9e fc 00 18 | | SUBA.W #0x18,A7
00024698 22 4f |"O | MOVEA.L A7,A1
0002469a 45 fa c2 b2 |E | LEA.L 0x2094e,A2
0002469e 70 16 |p | MOVEQ.L #0x16,D0
000246a0 12 da | | MOVE.B (A2)+,(A1)+
000246a2 51 c8 ff fc |Q | DBF D0,0x246a0
000246a6 59 4f |YO | SUBQ.L #0x4,A7
000246a8 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000246ac 3f 02 |? | MOVE.W D2,-(A7)
000246ae 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7)
000246b2 4e 93 |N | JSR (A3)
000246b4 50 4f |PO | ADDQ.L #0x8,A7
000246b6 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000246ba 4e ba fb 30 |N 0 | JSR 0x241ec
000246be de fc 00 1c | | ADDA.W #0x1c,A7
000246c2 30 28 00 2c |0( , | MOVE.W (A0+0x2c),D0
000246c6 02 40 10 00 | @ | ANDI.W #0x1000,D0
000246ca 66 28 |f( | BNE 0x246f4
000246cc 43 fa c2 aa |C | LEA.L 0x20978,A1
000246d0 70 08 |p | MOVEQ.L #0x08,D0
000246d2 3f 21 |?! | MOVE.W -(A1),-(A7)
000246d4 51 c8 ff fc |Q | DBF D0,0x246d2
000246d8 59 4f |YO | SUBQ.L #0x4,A7
000246da 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000246de 3f 02 |? | MOVE.W D2,-(A7)
000246e0 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7)
000246e4 4e 93 |N | JSR (A3)
000246e6 50 4f |PO | ADDQ.L #0x8,A7
000246e8 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000246ec 4e ba fa fe |N | JSR 0x241ec
000246f0 de fc 00 16 | | ADDA.W #0x16,A7
000246f4 30 28 00 2c |0( , | MOVE.W (A0+0x2c),D0
000246f8 02 40 08 00 | @ | ANDI.W #0x0800,D0
000246fc 67 26 |g& | BEQ 0x24724
000246fe 2f 3a c2 80 |/: | MOVE.L 0x20980,-(A7)
00024702 2f 3a c2 78 |/: x | MOVE.L 0x2097c,-(A7)
00024706 2f 3a c2 70 |/: p | MOVE.L 0x20978,-(A7)
0002470a 59 4f |YO | SUBQ.L #0x4,A7
0002470c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024710 3f 02 |? | MOVE.W D2,-(A7)
00024712 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7)
00024716 4e 93 |N | JSR (A3)
00024718 50 4f |PO | ADDQ.L #0x8,A7
0002471a 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002471e 4e ba fa cc |N | JSR 0x241ec
00024722 de c5 | | ADDA.W D5,A7
00024724 30 28 00 2c |0( , | MOVE.W (A0+0x2c),D0
00024728 02 40 04 00 | @ | ANDI.W #0x0400,D0
0002472c 67 28 |g( | BEQ 0x24756
0002472e 43 fa c2 6a |C j | LEA.L 0x2099a,A1
00024732 70 0a |p | MOVEQ.L #0x0a,D0
00024734 3f 21 |?! | MOVE.W -(A1),-(A7)
00024736 51 c8 ff fc |Q | DBF D0,0x24734
0002473a 59 4f |YO | SUBQ.L #0x4,A7
0002473c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024740 3f 02 |? | MOVE.W D2,-(A7)
00024742 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7)
00024746 4e 93 |N | JSR (A3)
00024748 50 4f |PO | ADDQ.L #0x8,A7
0002474a 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002474e 4e ba fa 9c |N | JSR 0x241ec
00024752 de fc 00 1a | | ADDA.W #0x1a,A7
00024756 30 28 00 2c |0( , | MOVE.W (A0+0x2c),D0
0002475a 02 40 01 00 | @ | ANDI.W #0x0100,D0
0002475e 66 2e |f. | BNE 0x2478e
00024760 9e fc 00 12 | | SUBA.W #0x12,A7
00024764 22 4f |"O | MOVEA.L A7,A1
00024766 45 fa c2 32 |E 2 | LEA.L 0x2099a,A2
0002476a 70 10 |p | MOVEQ.L #0x10,D0
0002476c 12 da | | MOVE.B (A2)+,(A1)+
0002476e 51 c8 ff fc |Q | DBF D0,0x2476c
00024772 59 4f |YO | SUBQ.L #0x4,A7
00024774 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024778 3f 02 |? | MOVE.W D2,-(A7)
0002477a 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7)
0002477e 4e 93 |N | JSR (A3)
00024780 50 4f |PO | ADDQ.L #0x8,A7
00024782 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024786 4e ba fa 64 |N d | JSR 0x241ec
0002478a de fc 00 16 | | ADDA.W #0x16,A7
0002478e 30 28 00 2c |0( , | MOVE.W (A0+0x2c),D0
00024792 02 40 00 80 | @ | ANDI.W #0x0080,D0
00024796 66 2a |f* | BNE 0x247c2
00024798 9e c5 | | SUBA.W D5,A7
0002479a 22 4f |"O | MOVEA.L A7,A1
0002479c 45 fa c2 0e |E | LEA.L 0x209ac,A2
000247a0 70 0e |p | MOVEQ.L #0x0e,D0
000247a2 12 da | | MOVE.B (A2)+,(A1)+
000247a4 51 c8 ff fc |Q | DBF D0,0x247a2
000247a8 59 4f |YO | SUBQ.L #0x4,A7
000247aa 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000247ae 3f 02 |? | MOVE.W D2,-(A7)
000247b0 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
000247b4 4e 93 |N | JSR (A3)
000247b6 50 4f |PO | ADDQ.L #0x8,A7
000247b8 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000247bc 4e ba fa 2e |N . | JSR 0x241ec
000247c0 de c6 | | ADDA.W D6,A7
000247c2 30 28 00 2c |0( , | MOVE.W (A0+0x2c),D0
000247c6 02 40 00 40 | @ @ | ANDI.W #0x0040,D0
000247ca 66 28 |f( | BNE 0x247f4
000247cc 2f 3a c1 fa |/: | MOVE.L 0x209c8,-(A7)
000247d0 2f 3a c1 f2 |/: | MOVE.L 0x209c4,-(A7)
000247d4 2f 3a c1 ea |/: | MOVE.L 0x209c0,-(A7)
000247d8 2f 3a c1 e2 |/: | MOVE.L 0x209bc,-(A7)
000247dc 59 4f |YO | SUBQ.L #0x4,A7
000247de 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000247e2 3f 02 |? | MOVE.W D2,-(A7)
000247e4 3f 05 |? | MOVE.W D5,-(A7)
000247e6 4e 93 |N | JSR (A3)
000247e8 50 4f |PO | ADDQ.L #0x8,A7
000247ea 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000247ee 4e ba f9 fc |N | JSR 0x241ec
000247f2 de c6 | | ADDA.W D6,A7
000247f4 30 28 00 2e |0( . | MOVE.W (A0+0x2e),D0
000247f8 02 40 80 00 | @ | ANDI.W #0x8000,D0
000247fc 67 28 |g( | BEQ 0x24826
000247fe 2f 3a c1 d8 |/: | MOVE.L 0x209d8,-(A7)
00024802 2f 3a c1 d0 |/: | MOVE.L 0x209d4,-(A7)
00024806 2f 3a c1 c8 |/: | MOVE.L 0x209d0,-(A7)
0002480a 2f 3a c1 c0 |/: | MOVE.L 0x209cc,-(A7)
0002480e 59 4f |YO | SUBQ.L #0x4,A7
00024810 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024814 3f 02 |? | MOVE.W D2,-(A7)
00024816 3f 05 |? | MOVE.W D5,-(A7)
00024818 4e 93 |N | JSR (A3)
0002481a 50 4f |PO | ADDQ.L #0x8,A7
0002481c 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024820 4e ba f9 ca |N | JSR 0x241ec
00024824 de c6 | | ADDA.W D6,A7
00024826 30 28 00 2e |0( . | MOVE.W (A0+0x2e),D0
0002482a 02 40 40 00 | @@ | ANDI.W #0x4000,D0
0002482e 67 28 |g( | BEQ 0x24858
00024830 3f 3a c1 ae |?: | MOVE.W 0x209e0,-(A7)
00024834 3f 3a c1 a8 |?: | MOVE.W 0x209de,-(A7)
00024838 3f 3a c1 a2 |?: | MOVE.W 0x209dc,-(A7)
0002483c 59 4f |YO | SUBQ.L #0x4,A7
0002483e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024842 3f 02 |? | MOVE.W D2,-(A7)
00024844 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7)
00024848 4e 93 |N | JSR (A3)
0002484a 50 4f |PO | ADDQ.L #0x8,A7
0002484c 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024850 4e ba f9 9a |N | JSR 0x241ec
00024854 de fc 00 0a | | ADDA.W #0xa,A7
00024858 30 28 00 2e |0( . | MOVE.W (A0+0x2e),D0
0002485c 02 40 20 00 | @ | ANDI.W #0x2000,D0
00024860 67 26 |g& | BEQ 0x24888
00024862 43 fa c1 92 |C | LEA.L 0x209f6,A1
00024866 70 04 |p | MOVEQ.L #0x04,D0
00024868 2f 21 |/! | MOVE.L -(A1),-(A7)
0002486a 51 c8 ff fc |Q | DBF D0,0x24868
0002486e 59 4f |YO | SUBQ.L #0x4,A7
00024870 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024874 3f 02 |? | MOVE.W D2,-(A7)
00024876 3f 06 |? | MOVE.W D6,-(A7)
00024878 4e 93 |N | JSR (A3)
0002487a 50 4f |PO | ADDQ.L #0x8,A7
0002487c 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024880 4e ba f9 6a |N j | JSR 0x241ec
00024884 de fc 00 18 | | ADDA.W #0x18,A7
00024888 30 28 00 2e |0( . | MOVE.W (A0+0x2e),D0
0002488c 02 40 10 00 | @ | ANDI.W #0x1000,D0
00024890 67 28 |g( | BEQ 0x248ba
00024892 43 fa c1 74 |C t | LEA.L 0x20a08,A1
00024896 70 08 |p | MOVEQ.L #0x08,D0
00024898 3f 21 |?! | MOVE.W -(A1),-(A7)
0002489a 51 c8 ff fc |Q | DBF D0,0x24898
0002489e 59 4f |YO | SUBQ.L #0x4,A7
000248a0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000248a4 3f 02 |? | MOVE.W D2,-(A7)
000248a6 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7)
000248aa 4e 93 |N | JSR (A3)
000248ac 50 4f |PO | ADDQ.L #0x8,A7
000248ae 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000248b2 4e ba f9 38 |N 8 | JSR 0x241ec
000248b6 de fc 00 16 | | ADDA.W #0x16,A7
000248ba 30 28 00 2e |0( . | MOVE.W (A0+0x2e),D0
000248be 02 40 08 00 | @ | ANDI.W #0x0800,D0
000248c2 67 28 |g( | BEQ 0x248ec
000248c4 2f 3a c1 4e |/: N | MOVE.L 0x20a14,-(A7)
000248c8 2f 3a c1 46 |/: F | MOVE.L 0x20a10,-(A7)
000248cc 2f 3a c1 3e |/: > | MOVE.L 0x20a0c,-(A7)
000248d0 2f 3a c1 36 |/: 6 | MOVE.L 0x20a08,-(A7)
000248d4 59 4f |YO | SUBQ.L #0x4,A7
000248d6 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000248da 3f 02 |? | MOVE.W D2,-(A7)
000248dc 3f 05 |? | MOVE.W D5,-(A7)
000248de 4e 93 |N | JSR (A3)
000248e0 50 4f |PO | ADDQ.L #0x8,A7
000248e2 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000248e6 4e ba f9 04 |N | JSR 0x241ec
000248ea de c6 | | ADDA.W D6,A7
000248ec 30 28 00 2e |0( . | MOVE.W (A0+0x2e),D0
000248f0 02 40 04 00 | @ | ANDI.W #0x0400,D0
000248f4 67 2e |g. | BEQ 0x24924
000248f6 9e fc 00 16 | | SUBA.W #0x16,A7
000248fa 22 4f |"O | MOVEA.L A7,A1
000248fc 45 fa c1 1a |E | LEA.L 0x20a18,A2
00024900 70 14 |p | MOVEQ.L #0x14,D0
00024902 12 da | | MOVE.B (A2)+,(A1)+
00024904 51 c8 ff fc |Q | DBF D0,0x24902
00024908 59 4f |YO | SUBQ.L #0x4,A7
0002490a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002490e 3f 02 |? | MOVE.W D2,-(A7)
00024910 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7)
00024914 4e 93 |N | JSR (A3)
00024916 50 4f |PO | ADDQ.L #0x8,A7
00024918 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002491c 4e ba f8 ce |N | JSR 0x241ec
00024920 de fc 00 1a | | ADDA.W #0x1a,A7
00024924 30 28 00 2e |0( . | MOVE.W (A0+0x2e),D0
00024928 02 40 02 00 | @ | ANDI.W #0x0200,D0
0002492c 67 28 |g( | BEQ 0x24956
0002492e 43 fa c1 14 |C | LEA.L 0x20a44,A1
00024932 70 0a |p | MOVEQ.L #0x0a,D0
00024934 3f 21 |?! | MOVE.W -(A1),-(A7)
00024936 51 c8 ff fc |Q | DBF D0,0x24934
0002493a 59 4f |YO | SUBQ.L #0x4,A7
0002493c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024940 3f 02 |? | MOVE.W D2,-(A7)
00024942 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7)
00024946 4e 93 |N | JSR (A3)
00024948 50 4f |PO | ADDQ.L #0x8,A7
0002494a 49 ee ff f2 |I | LEA.L (A6-0xe),A4
0002494e 4e ba f8 9c |N | JSR 0x241ec
00024952 de fc 00 1a | | ADDA.W #0x1a,A7
00024956 30 28 00 2e |0( . | MOVE.W (A0+0x2e),D0
0002495a 02 40 01 00 | @ | ANDI.W #0x0100,D0
0002495e 67 28 |g( | BEQ 0x24988
00024960 2f 3a c0 ee |/: | MOVE.L 0x20a50,-(A7)
00024964 2f 3a c0 e6 |/: | MOVE.L 0x20a4c,-(A7)
00024968 2f 3a c0 de |/: | MOVE.L 0x20a48,-(A7)
0002496c 2f 3a c0 d6 |/: | MOVE.L 0x20a44,-(A7)
00024970 59 4f |YO | SUBQ.L #0x4,A7
00024972 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024976 3f 02 |? | MOVE.W D2,-(A7)
00024978 3f 05 |? | MOVE.W D5,-(A7)
0002497a 4e 93 |N | JSR (A3)
0002497c 50 4f |PO | ADDQ.L #0x8,A7
0002497e 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024982 4e ba f8 68 |N h | JSR 0x241ec
00024986 de c6 | | ADDA.W D6,A7
00024988 30 28 00 2e |0( . | MOVE.W (A0+0x2e),D0
0002498c 02 40 00 80 | @ | ANDI.W #0x0080,D0
00024990 67 26 |g& | BEQ 0x249b8
00024992 43 fa c0 d4 |C | LEA.L 0x20a68,A1
00024996 70 04 |p | MOVEQ.L #0x04,D0
00024998 2f 21 |/! | MOVE.L -(A1),-(A7)
0002499a 51 c8 ff fc |Q | DBF D0,0x24998
0002499e 59 4f |YO | SUBQ.L #0x4,A7
000249a0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000249a4 3f 02 |? | MOVE.W D2,-(A7)
000249a6 3f 06 |? | MOVE.W D6,-(A7)
000249a8 4e 93 |N | JSR (A3)
000249aa 50 4f |PO | ADDQ.L #0x8,A7
000249ac 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000249b0 4e ba f8 3a |N : | JSR 0x241ec
000249b4 de fc 00 18 | | ADDA.W #0x18,A7
000249b8 30 28 00 2e |0( . | MOVE.W (A0+0x2e),D0
000249bc 02 40 00 40 | @ @ | ANDI.W #0x0040,D0
000249c0 67 28 |g( | BEQ 0x249ea
000249c2 43 fa c0 b2 |C | LEA.L 0x20a76,A1
000249c6 70 06 |p | MOVEQ.L #0x06,D0
000249c8 3f 21 |?! | MOVE.W -(A1),-(A7)
000249ca 51 c8 ff fc |Q | DBF D0,0x249c8
000249ce 59 4f |YO | SUBQ.L #0x4,A7
000249d0 48 6f 00 04 |Ho | PEA.L (A7+0x4)
000249d4 3f 02 |? | MOVE.W D2,-(A7)
000249d6 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
000249da 4e 93 |N | JSR (A3)
000249dc 50 4f |PO | ADDQ.L #0x8,A7
000249de 49 ee ff f2 |I | LEA.L (A6-0xe),A4
000249e2 4e ba f8 08 |N | JSR 0x241ec
000249e6 de fc 00 12 | | ADDA.W #0x12,A7
000249ea 30 28 00 2e |0( . | MOVE.W (A0+0x2e),D0
000249ee c0 45 | E | AND.W D5,D0
000249f0 67 26 |g& | BEQ 0x24a18
000249f2 2f 3a c0 8a |/: | MOVE.L 0x20a7e,-(A7)
000249f6 2f 3a c0 82 |/: | MOVE.L 0x20a7a,-(A7)
000249fa 2f 3a c0 7a |/: z | MOVE.L 0x20a76,-(A7)
000249fe 59 4f |YO | SUBQ.L #0x4,A7
00024a00 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024a04 3f 02 |? | MOVE.W D2,-(A7)
00024a06 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7)
00024a0a 4e 93 |N | JSR (A3)
00024a0c 50 4f |PO | ADDQ.L #0x8,A7
00024a0e 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024a12 4e ba f7 d8 |N | JSR 0x241ec
00024a16 de c5 | | ADDA.W D5,A7
00024a18 30 28 00 2e |0( . | MOVE.W (A0+0x2e),D0
00024a1c 02 40 00 04 | @ | ANDI.W #0x0004,D0
00024a20 67 2e |g. | BEQ 0x24a50
00024a22 9e fc 00 1e | | SUBA.W #0x1e,A7
00024a26 22 4f |"O | MOVEA.L A7,A1
00024a28 45 fa c0 58 |E X | LEA.L 0x20a82,A2
00024a2c 70 1c |p | MOVEQ.L #0x1c,D0
00024a2e 12 da | | MOVE.B (A2)+,(A1)+
00024a30 51 c8 ff fc |Q | DBF D0,0x24a2e
00024a34 59 4f |YO | SUBQ.L #0x4,A7
00024a36 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024a3a 3f 02 |? | MOVE.W D2,-(A7)
00024a3c 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7)
00024a40 4e 93 |N | JSR (A3)
00024a42 50 4f |PO | ADDQ.L #0x8,A7
00024a44 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024a48 4e ba f7 a2 |N | JSR 0x241ec
00024a4c de fc 00 22 | " | ADDA.W #0x22,A7
00024a50 30 28 00 2e |0( . | MOVE.W (A0+0x2e),D0
00024a54 c0 42 | B | AND.W D2,D0
00024a56 67 28 |g( | BEQ 0x24a80
00024a58 2f 3a c0 52 |/: R | MOVE.L 0x20aac,-(A7)
00024a5c 2f 3a c0 4a |/: J | MOVE.L 0x20aa8,-(A7)
00024a60 2f 3a c0 42 |/: B | MOVE.L 0x20aa4,-(A7)
00024a64 2f 3a c0 3a |/: : | MOVE.L 0x20aa0,-(A7)
00024a68 59 4f |YO | SUBQ.L #0x4,A7
00024a6a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024a6e 3f 02 |? | MOVE.W D2,-(A7)
00024a70 3f 05 |? | MOVE.W D5,-(A7)
00024a72 4e 93 |N | JSR (A3)
00024a74 50 4f |PO | ADDQ.L #0x8,A7
00024a76 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024a7a 4e ba f7 70 |N p | JSR 0x241ec
00024a7e de c6 | | ADDA.W D6,A7
00024a80 30 28 00 30 |0( 0 | MOVE.W (A0+0x30),D0
00024a84 02 40 80 00 | @ | ANDI.W #0x8000,D0
00024a88 67 2e |g. | BEQ 0x24ab8
00024a8a 9e fc 00 0a | | SUBA.W #0xa,A7
00024a8e 22 4f |"O | MOVEA.L A7,A1
00024a90 45 fa c0 1e |E | LEA.L 0x20ab0,A2
00024a94 70 08 |p | MOVEQ.L #0x08,D0
00024a96 12 da | | MOVE.B (A2)+,(A1)+
00024a98 51 c8 ff fc |Q | DBF D0,0x24a96
00024a9c 59 4f |YO | SUBQ.L #0x4,A7
00024a9e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024aa2 3f 02 |? | MOVE.W D2,-(A7)
00024aa4 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7)
00024aa8 4e 93 |N | JSR (A3)
00024aaa 50 4f |PO | ADDQ.L #0x8,A7
00024aac 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024ab0 4e ba f7 3a |N : | JSR 0x241ec
00024ab4 de fc 00 0e | | ADDA.W #0xe,A7
00024ab8 30 28 00 30 |0( 0 | MOVE.W (A0+0x30),D0
00024abc 02 40 40 00 | @@ | ANDI.W #0x4000,D0
00024ac0 67 2a |g* | BEQ 0x24aec
00024ac2 9e c5 | | SUBA.W D5,A7
00024ac4 22 4f |"O | MOVEA.L A7,A1
00024ac6 45 fa bf f2 |E | LEA.L 0x20aba,A2
00024aca 70 0e |p | MOVEQ.L #0x0e,D0
00024acc 12 da | | MOVE.B (A2)+,(A1)+
00024ace 51 c8 ff fc |Q | DBF D0,0x24acc
00024ad2 59 4f |YO | SUBQ.L #0x4,A7
00024ad4 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024ad8 3f 02 |? | MOVE.W D2,-(A7)
00024ada 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7)
00024ade 4e 93 |N | JSR (A3)
00024ae0 50 4f |PO | ADDQ.L #0x8,A7
00024ae2 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024ae6 4e ba f7 04 |N | JSR 0x241ec
00024aea de c6 | | ADDA.W D6,A7
00024aec 30 28 00 30 |0( 0 | MOVE.W (A0+0x30),D0
00024af0 02 40 10 00 | @ | ANDI.W #0x1000,D0
00024af4 67 2e |g. | BEQ 0x24b24
00024af6 9e fc 00 3e | > | SUBA.W #0x3e,A7
00024afa 22 4f |"O | MOVEA.L A7,A1
00024afc 45 fa bf cc |E | LEA.L 0x20aca,A2
00024b00 70 3c |p< | MOVEQ.L #0x3c,D0
00024b02 12 da | | MOVE.B (A2)+,(A1)+
00024b04 51 c8 ff fc |Q | DBF D0,0x24b02
00024b08 59 4f |YO | SUBQ.L #0x4,A7
00024b0a 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024b0e 3f 02 |? | MOVE.W D2,-(A7)
00024b10 3f 3c 00 3d |?< = | MOVE.W #0x3d,-(A7)
00024b14 4e 93 |N | JSR (A3)
00024b16 50 4f |PO | ADDQ.L #0x8,A7
00024b18 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024b1c 4e ba f6 ce |N | JSR 0x241ec
00024b20 de fc 00 42 | B | ADDA.W #0x42,A7
00024b24 30 28 00 30 |0( 0 | MOVE.W (A0+0x30),D0
00024b28 02 40 00 80 | @ | ANDI.W #0x0080,D0
00024b2c 67 26 |g& | BEQ 0x24b54
00024b2e 2f 3a bf e0 |/: | MOVE.L 0x20b10,-(A7)
00024b32 2f 3a bf d8 |/: | MOVE.L 0x20b0c,-(A7)
00024b36 2f 3a bf d0 |/: | MOVE.L 0x20b08,-(A7)
00024b3a 59 4f |YO | SUBQ.L #0x4,A7
00024b3c 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024b40 3f 02 |? | MOVE.W D2,-(A7)
00024b42 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7)
00024b46 4e 93 |N | JSR (A3)
00024b48 50 4f |PO | ADDQ.L #0x8,A7
00024b4a 49 ee ff f2 |I | LEA.L (A6-0xe),A4
00024b4e 4e ba f6 9c |N | JSR 0x241ec
00024b52 de c5 | | ADDA.W D5,A7
00024b54 2f 2e ff fa |/. | MOVE.L (A6-0x6),-(A7)
00024b58 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00024b5e 50 4f |PO | ADDQ.L #0x8,A7
00024b60 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
00024b64 4e 5e |N^ | UNLK A6
00024b66 4e 75 |Nu | RTS
00024b68 ; --------------------------------------------------------------------------------------
00024b68 ; OMSI PASCAL Function
00024b68 ; <LVAR 0x008 2(r)>
00024b68 ; --------------------------------------------------------------------------------------
00024b68 4e 56 ff da |NV | LINK.W A6,#0xffda
00024b6c bf d5 | | CMPA.L (A5),A7
00024b6e 62 06 |b | BHI 0x24b76
00024b70 44 fc 00 02 |D | MOVE.W #0x2,CCR
00024b74 4e 76 |Nv | TRAPV
00024b76 de fc 00 20 | | ADDA.W #0x20,A7
00024b7a 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7)
00024b7e 43 ee 00 08 |C | LEA.L (A6+0x8),A1
00024b82 2f 3a bf b4 |/: | MOVE.L 0x20b38,-(A7)
00024b86 59 4f |YO | SUBQ.L #0x4,A7
00024b88 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024b8c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00024b90 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
00024b94 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00024b9a 5c 4f |\O | ADDQ.L #0x6,A7
00024b9c 3e 91 |> | MOVE.W (A1),(A7)
00024b9e 4e ba f6 dc |N | JSR 0x2427c
00024ba2 de fc 00 0a | | ADDA.W #0xa,A7
00024ba6 70 46 |pF | MOVEQ.L #0x46,D0
00024ba8 c1 d1 | | MULS.W (A1),D0
00024baa 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00024bb0 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00024bb4 d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
00024bba 42 a8 00 0a |B | CLR.L (A0+0xa)
00024bbe 52 a8 00 02 |R | ADDQ.L #0x1,(A0+0x2)
00024bc2 3f 11 |? | MOVE.W (A1),-(A7)
00024bc4 4e ba f4 96 |N | JSR 0x2405c
00024bc8 54 4f |TO | ADDQ.L #0x2,A7
00024bca 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1
00024bce 4e 5e |N^ | UNLK A6
00024bd0 4e 75 |Nu | RTS
00024bd2 ; --------------------------------------------------------------------------------------
00024bd2 ; OMSI PASCAL Function
00024bd2 ; <LVAR 0x008 2(r)>
00024bd2 ; --------------------------------------------------------------------------------------
00024bd2 4e 56 ff e2 |NV | LINK.W A6,#0xffe2
00024bd6 bf d5 | | CMPA.L (A5),A7
00024bd8 62 06 |b | BHI 0x24be0
00024bda 44 fc 00 02 |D | MOVE.W #0x2,CCR
00024bde 4e 76 |Nv | TRAPV
00024be0 de fc 00 1c | | ADDA.W #0x1c,A7
00024be4 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7)
00024be8 2f 3a bf 52 |/: R | MOVE.L 0x20b3c,-(A7)
00024bec 59 4f |YO | SUBQ.L #0x4,A7
00024bee 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00024bf2 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
00024bf6 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7)
00024bfa 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00024c00 5c 4f |\O | ADDQ.L #0x6,A7
00024c02 3e ae 00 08 |> | MOVE.W (A6+0x8),(A7)
00024c06 4e ba f6 74 |N t | JSR 0x2427c
00024c0a de fc 00 0a | | ADDA.W #0xa,A7
00024c0e 70 46 |pF | MOVEQ.L #0x46,D0
00024c10 c1 ee 00 08 | | MULS.W (A6+0x8),D0
00024c14 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00024c1a 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00024c1e d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
00024c24 20 28 00 06 | ( | MOVE.L (A0+0x6),D0
00024c28 d0 a8 00 0a | | ADD.L (A0+0xa),D0
00024c2c 21 40 00 06 |!@ | MOVE.L D0,(A0+0x6)
00024c30 42 a8 00 0a |B | CLR.L (A0+0xa)
00024c34 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0
00024c38 4e 5e |N^ | UNLK A6
00024c3a 4e 75 |Nu | RTS
00024c3c ; --------------------------------------------------------------------------------------
00024c3c ; OMSI PASCAL Function
00024c3c ; <LVAR 0x008 2(r)>
00024c3c ; <LVAR -0x004 2(w)>
00024c3c ; <LVAR -0x006 2(w)>
00024c3c ; <LVAR -0x008 2(w)>
00024c3c ; <LVAR -0x00a 2(r)>
00024c3c ; <LVAR -0x00e 2(w)>
00024c3c ; <LVAR -0x012 @ 2(w)>
00024c3c ; --------------------------------------------------------------------------------------
00024c3c 4e 56 ff c8 |NV | LINK.W A6,#0xffc8
00024c40 bf d5 | | CMPA.L (A5),A7
00024c42 62 06 |b | BHI 0x24c4a
00024c44 44 fc 00 02 |D | MOVE.W #0x2,CCR
00024c48 4e 76 |Nv | TRAPV
00024c4a de fc 00 26 | & | ADDA.W #0x26,A7
00024c4e 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7)
00024c52 43 ee 00 08 |C | LEA.L (A6+0x8),A1
00024c56 70 46 |pF | MOVEQ.L #0x46,D0
00024c58 c1 d1 | | MULS.W (A1),D0
00024c5a 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00024c60 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00024c64 d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
00024c6a 3f 11 |? | MOVE.W (A1),-(A7)
00024c6c 48 68 00 28 |Hh ( | PEA.L (A0+0x28)
00024c70 4e ba f3 8a |N | JSR 0x23ffc
00024c74 5c 4f |\O | ADDQ.L #0x6,A7
00024c76 52 a8 00 0a |R | ADDQ.L #0x1,(A0+0xa)
00024c7a 20 28 00 0a | ( | MOVE.L (A0+0xa),D0
00024c7e 0c 80 00 00 00 0a | | CMPI.L #0x0000000a,D0
00024c84 66 0c |f | BNE 0x24c92
00024c86 3f 11 |? | MOVE.W (A1),-(A7)
00024c88 4e ba fe de |N | JSR 0x24b68
00024c8c 54 4f |TO | ADDQ.L #0x2,A7
00024c8e 60 00 00 8a |` | BRA 0x24d1a
00024c92 3d 7c 01 00 ff ee |=| | MOVE.W #0x100,(A6-0x12)
00024c98 3d 7c 00 02 ff f2 |=| | MOVE.W #0x2,(A6-0xe)
00024c9e 42 6e ff f6 |Bn | CLR.W (A6-0xa)
00024ca2 10 28 00 01 | ( | MOVE.B (A0+0x1),D0
00024ca6 48 80 |H | EXTB.W D0
00024ca8 0c 40 00 01 | @ | CMPI.W #0x0001,D0
00024cac 63 02 |c | BLS 0x24cb0
00024cae 4e 4e |NN | TRAP #14
00024cb0 d0 40 | @ | ADD.W D0,D0
00024cb2 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W
00024cba 00 04 | | .CONST 0x4 ; [0x0] -> 0x24cbe
00024cbc 00 0e | | .CONST 0xe ; [0x1] -> 0x24cc8
00024cbe switch@0x24cb2[0x0]:
00024cbe 30 11 |0 | MOVE.W (A1),D0
00024cc0 e1 40 | @ | ASL.W #0x8,D0
00024cc2 06 40 00 0c | @ | ADDI.W #0x000c,D0
00024cc6 60 08 |` | BRA 0x24cd0
00024cc8 switch@0x24cb2[0x1]:
00024cc8 30 11 |0 | MOVE.W (A1),D0
00024cca e1 40 | @ | ASL.W #0x8,D0
00024ccc 06 40 00 0b | @ | ADDI.W #0x000b,D0
00024cd0 3d 40 ff f8 |=@ | MOVE.W D0,(A6-0x8)
00024cd4 20 28 00 16 | ( | MOVE.L (A0+0x16),D0
00024cd8 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0
00024cde 63 02 |c | BLS 0x24ce2
00024ce0 4e 4f |NO | TRAP #15
00024ce2 3d 40 ff fa |=@ | MOVE.W D0,(A6-0x6)
00024ce6 20 28 00 12 | ( | MOVE.L (A0+0x12),D0
00024cea e1 80 | | ASL.L #0x8,D0
00024cec d0 a8 00 0e | | ADD.L (A0+0xe),D0
00024cf0 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0
00024cf6 63 02 |c | BLS 0x24cfa
00024cf8 4e 4f |NO | TRAP #15
00024cfa 3d 40 ff fc |=@ | MOVE.W D0,(A6-0x4)
00024cfe 48 6e ff ee |Hn | PEA.L (A6-0x12)
00024d02 41 e8 00 26 |A & | LEA.L (A0+0x26),A0
00024d06 2f 08 |/ | MOVE.L A0,-(A7)
00024d08 3f 11 |? | MOVE.W (A1),-(A7)
00024d0a 48 78 00 02 |Hx | PEA.L 0x2
00024d0e 48 78 00 00 |Hx | PEA.L 0x0
00024d12 4e ba c5 30 |N 0 | JSR 0x21244
00024d16 de fc 00 12 | | ADDA.W #0x12,A7
00024d1a 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1
00024d1e 4e 5e |N^ | UNLK A6
00024d20 4e 75 |Nu | RTS
00024d22 ; --------------------------------------------------------------------------------------
00024d22 ; OMSI PASCAL Function
00024d22 ; <LVAR 0x00a 2(r)>
00024d22 ; <LVAR 0x008 1(r)>
00024d22 ; --------------------------------------------------------------------------------------
00024d22 4e 56 ff c4 |NV | LINK.W A6,#0xffc4
00024d26 bf d5 | | CMPA.L (A5),A7
00024d28 62 06 |b | BHI 0x24d30
00024d2a 44 fc 00 02 |D | MOVE.W #0x2,CCR
00024d2e 4e 76 |Nv | TRAPV
00024d30 de fc 00 3c | < | ADDA.W #0x3c,A7
00024d34 48 e7 c0 f0 |H | MOVEM.L A3+A2+A1+A0+D1+D0,-(A7)
00024d38 47 ee 00 0a |G | LEA.L (A6+0xa),A3
00024d3c 72 10 |r | MOVEQ.L #0x10,D1
00024d3e 4a 2e 00 08 |J. | TST.B (A6+0x8)
00024d42 66 08 |f | BNE 0x24d4c
00024d44 3f 13 |? | MOVE.W (A3),-(A7)
00024d46 4e ba fe f4 |N | JSR 0x24c3c
00024d4a 60 5e |`^ | BRA 0x24daa
00024d4c 70 46 |pF | MOVEQ.L #0x46,D0
00024d4e c1 d3 | | MULS.W (A3),D0
00024d50 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00024d56 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00024d5a d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
00024d60 9e c1 | | SUBA.W D1,A7
00024d62 22 4f |"O | MOVEA.L A7,A1
00024d64 45 e8 00 3e |E > | LEA.L (A0+0x3e),A2
00024d68 70 07 |p | MOVEQ.L #0x07,D0
00024d6a 12 da | | MOVE.B (A2)+,(A1)+
00024d6c 51 c8 ff fc |Q | DBF D0,0x24d6a
00024d70 51 4f |QO | SUBQ.L #0x8,A7
00024d72 48 78 04 00 |Hx | PEA.L 0x400
00024d76 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad
00024d7c 58 4f |XO | ADDQ.L #0x4,A7
00024d7e 4e b9 00 01 03 14 |N | JSR Add(a, b : Quad) : Quad
00024d84 de c1 | | ADDA.W D1,A7
00024d86 43 e8 00 3e |C > | LEA.L (A0+0x3e),A1
00024d8a 24 4f |$O | MOVEA.L A7,A2
00024d8c 70 07 |p | MOVEQ.L #0x07,D0
00024d8e 12 da | | MOVE.B (A2)+,(A1)+
00024d90 51 c8 ff fc |Q | DBF D0,0x24d8e
00024d94 50 4f |PO | ADDQ.L #0x8,A7
00024d96 4a a8 00 0a |J | TST.L (A0+0xa)
00024d9a 67 08 |g | BEQ 0x24da4
00024d9c 3f 13 |? | MOVE.W (A3),-(A7)
00024d9e 4e ba fe 32 |N 2 | JSR 0x24bd2
00024da2 54 4f |TO | ADDQ.L #0x2,A7
00024da4 3f 13 |? | MOVE.W (A3),-(A7)
00024da6 4e ba f2 b4 |N | JSR 0x2405c
00024daa 54 4f |TO | ADDQ.L #0x2,A7
00024dac 4c df 0f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3
00024db0 4e 5e |N^ | UNLK A6
00024db2 4e 75 |Nu | RTS
00024db4 ; --------------------------------------------------------------------------------------
00024db4 ; OMSI PASCAL Function
00024db4 ; <LVAR 0x00a 2(r)>
00024db4 ; <LVAR 0x008 1(r)>
00024db4 ; <LVAR -0x010 2(r)>
00024db4 ; <LVAR -0x018 @>
00024db4 ; --------------------------------------------------------------------------------------
00024db4 4e 56 ff ac |NV | LINK.W A6,#0xffac
00024db8 bf d5 | | CMPA.L (A5),A7
00024dba 62 06 |b | BHI 0x24dc2
00024dbc 44 fc 00 02 |D | MOVE.W #0x2,CCR
00024dc0 4e 76 |Nv | TRAPV
00024dc2 de fc 00 3c | < | ADDA.W #0x3c,A7
00024dc6 48 e7 c0 f0 |H | MOVEM.L A3+A2+A1+A0+D1+D0,-(A7)
00024dca 47 ee 00 0a |G | LEA.L (A6+0xa),A3
00024dce 72 10 |r | MOVEQ.L #0x10,D1
00024dd0 4a 2e 00 08 |J. | TST.B (A6+0x8)
00024dd4 66 28 |f( | BNE 0x24dfe
00024dd6 3f 13 |? | MOVE.W (A3),-(A7)
00024dd8 48 6e ff e8 |Hn | PEA.L (A6-0x18)
00024ddc 4e ba f2 1e |N | JSR 0x23ffc
00024de0 5c 4f |\O | ADDQ.L #0x6,A7
00024de2 30 2e ff f0 |0. | MOVE.W (A6-0x10),D0
00024de6 02 40 80 00 | @ | ANDI.W #0x8000,D0
00024dea 67 08 |g | BEQ 0x24df4
00024dec 3f 13 |? | MOVE.W (A3),-(A7)
00024dee 4e ba f2 6c |N l | JSR 0x2405c
00024df2 60 06 |` | BRA 0x24dfa
00024df4 3f 13 |? | MOVE.W (A3),-(A7)
00024df6 4e ba fe 44 |N D | JSR 0x24c3c
00024dfa 54 4f |TO | ADDQ.L #0x2,A7
00024dfc 60 60 |`` | BRA 0x24e5e
00024dfe 70 46 |pF | MOVEQ.L #0x46,D0
00024e00 c1 d3 | | MULS.W (A3),D0
00024e02 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00024e08 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00024e0c d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
00024e12 9e c1 | | SUBA.W D1,A7
00024e14 22 4f |"O | MOVEA.L A7,A1
00024e16 45 e8 00 3e |E > | LEA.L (A0+0x3e),A2
00024e1a 70 07 |p | MOVEQ.L #0x07,D0
00024e1c 12 da | | MOVE.B (A2)+,(A1)+
00024e1e 51 c8 ff fc |Q | DBF D0,0x24e1c
00024e22 51 4f |QO | SUBQ.L #0x8,A7
00024e24 48 78 04 00 |Hx | PEA.L 0x400
00024e28 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad
00024e2e 58 4f |XO | ADDQ.L #0x4,A7
00024e30 4e b9 00 01 03 14 |N | JSR Add(a, b : Quad) : Quad
00024e36 de c1 | | ADDA.W D1,A7
00024e38 43 e8 00 3e |C > | LEA.L (A0+0x3e),A1
00024e3c 24 4f |$O | MOVEA.L A7,A2
00024e3e 70 07 |p | MOVEQ.L #0x07,D0
00024e40 12 da | | MOVE.B (A2)+,(A1)+
00024e42 51 c8 ff fc |Q | DBF D0,0x24e40
00024e46 50 4f |PO | ADDQ.L #0x8,A7
00024e48 4a a8 00 0a |J | TST.L (A0+0xa)
00024e4c 67 08 |g | BEQ 0x24e56
00024e4e 3f 13 |? | MOVE.W (A3),-(A7)
00024e50 4e ba fd 80 |N | JSR 0x24bd2
00024e54 54 4f |TO | ADDQ.L #0x2,A7
00024e56 3f 13 |? | MOVE.W (A3),-(A7)
00024e58 4e ba f2 f6 |N | JSR 0x24150
00024e5c 54 4f |TO | ADDQ.L #0x2,A7
00024e5e 4c df 0f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3
00024e62 4e 5e |N^ | UNLK A6
00024e64 4e 75 |Nu | RTS
00024e66 ; --------------------------------------------------------------------------------------
00024e66 ; OMSI PASCAL Function
00024e66 ; --------------------------------------------------------------------------------------
00024e66 4e 56 ff 8a |NV | LINK.W A6,#0xff8a
00024e6a bf d5 | | CMPA.L (A5),A7
00024e6c 62 06 |b | BHI 0x24e74
00024e6e 44 fc 00 02 |D | MOVE.W #0x2,CCR
00024e72 4e 76 |Nv | TRAPV
00024e74 de fc 00 6e | n | ADDA.W #0x6e,A7
00024e78 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7)
00024e7c 47 f9 00 01 02 d0 |G | LEA.L StringCat2(a, b : String) : String,A3
00024e82 72 01 |r | MOVEQ.L #0x01,D1
00024e84 74 02 |t | MOVEQ.L #0x02,D2
00024e86 7a 0f |z | MOVEQ.L #0x0f,D5
00024e88 7c 0c || | MOVEQ.L #0x0c,D6
00024e8a 7e 00 |~ | MOVEQ.L #0x00,D7
00024e8c be 85 | | CMP.L D5,D7
00024e8e 63 02 |c | BLS 0x24e92
00024e90 4e 4f |NO | TRAP #15
00024e92 28 07 |( | MOVE.L D7,D4
00024e94 76 46 |vF | MOVEQ.L #0x46,D3
00024e96 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4
00024e9c 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00024ea2 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0
00024ea6 d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
00024eac 4a 10 |J | TST.B (A0)
00024eae 67 00 02 1a |g | BEQ 0x250ca
00024eb2 2f 3a bc 94 |/: | MOVE.L 0x20b48,-(A7)
00024eb6 2f 3a bc 8c |/: | MOVE.L 0x20b44,-(A7)
00024eba 2f 3a bc 84 |/: | MOVE.L 0x20b40,-(A7)
00024ebe 3f 3a bc 8c |?: | MOVE.W 0x20b4c,-(A7)
00024ec2 51 4f |QO | SUBQ.L #0x8,A7
00024ec4 48 6f 00 0a |Ho | PEA.L (A7+0xa)
00024ec8 3f 01 |? | MOVE.W D1,-(A7)
00024eca 3f 06 |? | MOVE.W D6,-(A7)
00024ecc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00024ed2 59 4f |YO | SUBQ.L #0x4,A7
00024ed4 2f 07 |/ | MOVE.L D7,-(A7)
00024ed6 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00024edc 48 6f 00 18 |Ho | PEA.L (A7+0x18)
00024ee0 3f 01 |? | MOVE.W D1,-(A7)
00024ee2 3f 02 |? | MOVE.W D2,-(A7)
00024ee4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00024eea 50 4f |PO | ADDQ.L #0x8,A7
00024eec 4e 93 |N | JSR (A3)
00024eee 50 4f |PO | ADDQ.L #0x8,A7
00024ef0 48 78 00 04 |Hx | PEA.L 0x4
00024ef4 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
00024efa 50 4f |PO | ADDQ.L #0x8,A7
00024efc 4e 93 |N | JSR (A3)
00024efe 50 4f |PO | ADDQ.L #0x8,A7
00024f00 28 5f |(_ | MOVEA.L (A7)+,A4
00024f02 58 4f |XO | ADDQ.L #0x4,A7
00024f04 22 4f |"O | MOVEA.L A7,A1
00024f06 45 fa bc 46 |E F | LEA.L 0x20b4e,A2
00024f0a 70 08 |p | MOVEQ.L #0x08,D0
00024f0c 12 da | | MOVE.B (A2)+,(A1)+
00024f0e 51 c8 ff fc |Q | DBF D0,0x24f0c
00024f12 59 4f |YO | SUBQ.L #0x4,A7
00024f14 2f 0c |/ | MOVE.L A4,-(A7)
00024f16 59 4f |YO | SUBQ.L #0x4,A7
00024f18 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00024f1c 3f 01 |? | MOVE.W D1,-(A7)
00024f1e 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7)
00024f22 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00024f28 50 4f |PO | ADDQ.L #0x8,A7
00024f2a 4e 93 |N | JSR (A3)
00024f2c 50 4f |PO | ADDQ.L #0x8,A7
00024f2e 28 5f |(_ | MOVEA.L (A7)+,A4
00024f30 54 4f |TO | ADDQ.L #0x2,A7
00024f32 2e 8c |. | MOVE.L A4,(A7)
00024f34 9e fc 00 10 | | SUBA.W #0x10,A7
00024f38 22 4f |"O | MOVEA.L A7,A1
00024f3a 45 e8 00 3e |E > | LEA.L (A0+0x3e),A2
00024f3e 70 07 |p | MOVEQ.L #0x07,D0
00024f40 12 da | | MOVE.B (A2)+,(A1)+
00024f42 51 c8 ff fc |Q | DBF D0,0x24f40
00024f46 48 78 00 0a |Hx | PEA.L 0xa
00024f4a 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String
00024f50 de c6 | | ADDA.W D6,A7
00024f52 48 78 00 0b |Hx | PEA.L 0xb
00024f56 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
00024f5c 50 4f |PO | ADDQ.L #0x8,A7
00024f5e 4e 93 |N | JSR (A3)
00024f60 50 4f |PO | ADDQ.L #0x8,A7
00024f62 28 5f |(_ | MOVEA.L (A7)+,A4
00024f64 2f 3a bb f6 |/: | MOVE.L 0x20b5c,-(A7)
00024f68 2f 3a bb ee |/: | MOVE.L 0x20b58,-(A7)
00024f6c 59 4f |YO | SUBQ.L #0x4,A7
00024f6e 2f 0c |/ | MOVE.L A4,-(A7)
00024f70 59 4f |YO | SUBQ.L #0x4,A7
00024f72 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00024f76 3f 01 |? | MOVE.W D1,-(A7)
00024f78 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7)
00024f7c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00024f82 50 4f |PO | ADDQ.L #0x8,A7
00024f84 4e 93 |N | JSR (A3)
00024f86 50 4f |PO | ADDQ.L #0x8,A7
00024f88 28 5f |(_ | MOVEA.L (A7)+,A4
00024f8a 2e 8c |. | MOVE.L A4,(A7)
00024f8c 51 4f |QO | SUBQ.L #0x8,A7
00024f8e 2f 28 00 06 |/( | MOVE.L (A0+0x6),-(A7)
00024f92 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00024f98 58 4f |XO | ADDQ.L #0x4,A7
00024f9a 48 78 00 05 |Hx | PEA.L 0x5
00024f9e 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
00024fa4 50 4f |PO | ADDQ.L #0x8,A7
00024fa6 4e 93 |N | JSR (A3)
00024fa8 50 4f |PO | ADDQ.L #0x8,A7
00024faa 28 5f |(_ | MOVEA.L (A7)+,A4
00024fac 2f 3a bb b6 |/: | MOVE.L 0x20b64,-(A7)
00024fb0 2f 3a bb ae |/: | MOVE.L 0x20b60,-(A7)
00024fb4 59 4f |YO | SUBQ.L #0x4,A7
00024fb6 2f 0c |/ | MOVE.L A4,-(A7)
00024fb8 59 4f |YO | SUBQ.L #0x4,A7
00024fba 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00024fbe 3f 01 |? | MOVE.W D1,-(A7)
00024fc0 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7)
00024fc4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00024fca 50 4f |PO | ADDQ.L #0x8,A7
00024fcc 4e 93 |N | JSR (A3)
00024fce 50 4f |PO | ADDQ.L #0x8,A7
00024fd0 28 5f |(_ | MOVEA.L (A7)+,A4
00024fd2 2e 8c |. | MOVE.L A4,(A7)
00024fd4 51 4f |QO | SUBQ.L #0x8,A7
00024fd6 2f 28 00 02 |/( | MOVE.L (A0+0x2),-(A7)
00024fda 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00024fe0 58 4f |XO | ADDQ.L #0x4,A7
00024fe2 48 78 00 05 |Hx | PEA.L 0x5
00024fe6 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
00024fec 50 4f |PO | ADDQ.L #0x8,A7
00024fee 4e 93 |N | JSR (A3)
00024ff0 50 4f |PO | ADDQ.L #0x8,A7
00024ff2 28 5f |(_ | MOVEA.L (A7)+,A4
00024ff4 3f 3a bb 72 |?: r | MOVE.W 0x20b68,-(A7)
00024ff8 59 4f |YO | SUBQ.L #0x4,A7
00024ffa 2f 0c |/ | MOVE.L A4,-(A7)
00024ffc 59 4f |YO | SUBQ.L #0x4,A7
00024ffe 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00025002 3f 01 |? | MOVE.W D1,-(A7)
00025004 3f 02 |? | MOVE.W D2,-(A7)
00025006 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
0002500c 50 4f |PO | ADDQ.L #0x8,A7
0002500e 4e 93 |N | JSR (A3)
00025010 50 4f |PO | ADDQ.L #0x8,A7
00025012 28 5f |(_ | MOVEA.L (A7)+,A4
00025014 55 4f |UO | SUBQ.L #0x2,A7
00025016 2f 0c |/ | MOVE.L A4,-(A7)
00025018 51 4f |QO | SUBQ.L #0x8,A7
0002501a 2f 28 00 16 |/( | MOVE.L (A0+0x16),-(A7)
0002501e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00025024 58 4f |XO | ADDQ.L #0x4,A7
00025026 48 78 00 04 |Hx | PEA.L 0x4
0002502a 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
00025030 50 4f |PO | ADDQ.L #0x8,A7
00025032 4e 93 |N | JSR (A3)
00025034 50 4f |PO | ADDQ.L #0x8,A7
00025036 28 5f |(_ | MOVEA.L (A7)+,A4
00025038 3f 3a bb 30 |?: 0 | MOVE.W 0x20b6a,-(A7)
0002503c 59 4f |YO | SUBQ.L #0x4,A7
0002503e 2f 0c |/ | MOVE.L A4,-(A7)
00025040 59 4f |YO | SUBQ.L #0x4,A7
00025042 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00025046 3f 01 |? | MOVE.W D1,-(A7)
00025048 3f 02 |? | MOVE.W D2,-(A7)
0002504a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00025050 50 4f |PO | ADDQ.L #0x8,A7
00025052 4e 93 |N | JSR (A3)
00025054 50 4f |PO | ADDQ.L #0x8,A7
00025056 28 5f |(_ | MOVEA.L (A7)+,A4
00025058 55 4f |UO | SUBQ.L #0x2,A7
0002505a 2f 0c |/ | MOVE.L A4,-(A7)
0002505c 51 4f |QO | SUBQ.L #0x8,A7
0002505e 2f 28 00 12 |/( | MOVE.L (A0+0x12),-(A7)
00025062 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
00025068 58 4f |XO | ADDQ.L #0x4,A7
0002506a 48 78 00 03 |Hx | PEA.L 0x3
0002506e 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
00025074 50 4f |PO | ADDQ.L #0x8,A7
00025076 4e 93 |N | JSR (A3)
00025078 50 4f |PO | ADDQ.L #0x8,A7
0002507a 28 5f |(_ | MOVEA.L (A7)+,A4
0002507c 3f 3a ba ee |?: | MOVE.W 0x20b6c,-(A7)
00025080 59 4f |YO | SUBQ.L #0x4,A7
00025082 2f 0c |/ | MOVE.L A4,-(A7)
00025084 59 4f |YO | SUBQ.L #0x4,A7
00025086 48 6f 00 0c |Ho | PEA.L (A7+0xc)
0002508a 3f 01 |? | MOVE.W D1,-(A7)
0002508c 3f 02 |? | MOVE.W D2,-(A7)
0002508e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00025094 50 4f |PO | ADDQ.L #0x8,A7
00025096 4e 93 |N | JSR (A3)
00025098 50 4f |PO | ADDQ.L #0x8,A7
0002509a 28 5f |(_ | MOVEA.L (A7)+,A4
0002509c 55 4f |UO | SUBQ.L #0x2,A7
0002509e 2f 0c |/ | MOVE.L A4,-(A7)
000250a0 51 4f |QO | SUBQ.L #0x8,A7
000250a2 2f 28 00 0e |/( | MOVE.L (A0+0xe),-(A7)
000250a6 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
000250ac 58 4f |XO | ADDQ.L #0x4,A7
000250ae 48 78 00 03 |Hx | PEA.L 0x3
000250b2 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String
000250b8 50 4f |PO | ADDQ.L #0x8,A7
000250ba 4e 93 |N | JSR (A3)
000250bc 50 4f |PO | ADDQ.L #0x8,A7
000250be 28 5f |(_ | MOVEA.L (A7)+,A4
000250c0 2f 0c |/ | MOVE.L A4,-(A7)
000250c2 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
000250c8 58 4f |XO | ADDQ.L #0x4,A7
000250ca 52 87 |R | ADDQ.L #0x1,D7
000250cc be 85 | | CMP.L D5,D7
000250ce 6f 00 fd bc |o | BLE 0x24e8c
000250d2 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4
000250d6 4e 5e |N^ | UNLK A6
000250d8 4e 75 |Nu | RTS
000250da ; --------------------------------------------------------------------------------------
000250da ; OMSI PASCAL Function
000250da ; --------------------------------------------------------------------------------------
000250da 4e 56 ff e2 |NV | LINK.W A6,#0xffe2
000250de bf d5 | | CMPA.L (A5),A7
000250e0 62 06 |b | BHI 0x250e8
000250e2 44 fc 00 02 |D | MOVE.W #0x2,CCR
000250e6 4e 76 |Nv | TRAPV
000250e8 de fc 00 1a | | ADDA.W #0x1a,A7
000250ec 48 e7 81 80 |H | MOVEM.L A0+D7+D0,-(A7)
000250f0 7e 00 |~ | MOVEQ.L #0x00,D7
000250f2 70 46 |pF | MOVEQ.L #0x46,D0
000250f4 c1 c7 | | MULS.W D7,D0
000250f6 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
000250fc 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00025100 d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
00025106 4a 10 |J | TST.B (A0)
00025108 67 0e |g | BEQ 0x25118
0002510a 3f 07 |? | MOVE.W D7,-(A7)
0002510c 4e ba ef 4e |N N | JSR 0x2405c
00025110 54 4f |TO | ADDQ.L #0x2,A7
00025112 52 b9 00 02 57 9e |R W | ADDQ.L #0x1,0x2579e
00025118 52 47 |RG | ADDQ.W #0x1,D7
0002511a 0c 47 00 0f | G | CMPI.W #0x000f,D7
0002511e 6f d2 |o | BLE 0x250f2
00025120 4c df 01 81 |L | MOVEM.L (A7)+,D0+D7+A0
00025124 4e 5e |N^ | UNLK A6
00025126 4e 75 |Nu | RTS
00025128 ; --------------------------------------------------------------------------------------
00025128 ; OMSI PASCAL Function
00025128 ; <LVAR -0x001 @ 1(r)>
00025128 ; <LVAR -0x002 @ 1(r)>
00025128 ; --------------------------------------------------------------------------------------
00025128 4e 56 ff d2 |NV | LINK.W A6,#0xffd2
0002512c bf d5 | | CMPA.L (A5),A7
0002512e 62 06 |b | BHI 0x25136
00025130 44 fc 00 02 |D | MOVE.W #0x2,CCR
00025134 4e 76 |Nv | TRAPV
00025136 de fc 00 2a | * | ADDA.W #0x2a,A7
0002513a 48 e7 c1 c0 |H | MOVEM.L A1+A0+D7+D1+D0,-(A7)
0002513e 43 ee ff ff |C | LEA.L (A6-0x1),A1
00025142 72 01 |r | MOVEQ.L #0x01,D1
00025144 7e 00 |~ | MOVEQ.L #0x00,D7
00025146 70 46 |pF | MOVEQ.L #0x46,D0
00025148 c1 c7 | | MULS.W D7,D0
0002514a 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
00025150 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
00025154 d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
0002515a 4a 10 |J | TST.B (A0)
0002515c 67 50 |gP | BEQ 0x251ae
0002515e 3f 07 |? | MOVE.W D7,-(A7)
00025160 48 6e ff fe |Hn | PEA.L (A6-0x2)
00025164 48 51 |HQ | PEA.L (A1)
00025166 4e ba bc c0 |N | JSR 0x20e28
0002516a de fc 00 0a | | ADDA.W #0xa,A7
0002516e 4a 2e ff fe |J. | TST.B (A6-0x2)
00025172 67 3a |g: | BEQ 0x251ae
00025174 10 28 00 01 | ( | MOVE.B (A0+0x1),D0
00025178 48 80 |H | EXTB.W D0
0002517a b0 41 | A | CMP.W D1,D0
0002517c 63 02 |c | BLS 0x25180
0002517e 4e 4e |NN | TRAP #14
00025180 d0 40 | @ | ADD.W D0,D0
00025182 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W
0002518a 00 04 | | .CONST 0x4 ; [0x0] -> 0x2518e
0002518c 00 14 | | .CONST 0x14 ; [0x1] -> 0x2519e
0002518e switch@0x25182[0x0]:
0002518e 3f 07 |? | MOVE.W D7,-(A7)
00025190 10 11 | | MOVE.B (A1),D0
00025192 48 80 |H | EXTB.W D0
00025194 41 81 |A | CHK.W D1,D0
00025196 1f 00 | | MOVE.B D0,-(A7)
00025198 4e ba fb 88 |N | JSR 0x24d22
0002519c 60 0e |` | BRA 0x251ac
0002519e switch@0x25182[0x1]:
0002519e 3f 07 |? | MOVE.W D7,-(A7)
000251a0 10 11 | | MOVE.B (A1),D0
000251a2 48 80 |H | EXTB.W D0
000251a4 41 81 |A | CHK.W D1,D0
000251a6 1f 00 | | MOVE.B D0,-(A7)
000251a8 4e ba fc 0a |N | JSR 0x24db4
000251ac 58 4f |XO | ADDQ.L #0x4,A7
000251ae 52 47 |RG | ADDQ.W #0x1,D7
000251b0 0c 47 00 0f | G | CMPI.W #0x000f,D7
000251b4 6f 90 |o | BLE 0x25146
000251b6 4c df 03 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1
000251ba 4e 5e |N^ | UNLK A6
000251bc 4e 75 |Nu | RTS
000251be ; --------------------------------------------------------------------------------------
000251be ; OMSI PASCAL Function
000251be ; <LVAR -0x002 @>
000251be ; --------------------------------------------------------------------------------------
000251be 4e 56 ff de |NV | LINK.W A6,#0xffde
000251c2 bf d5 | | CMPA.L (A5),A7
000251c4 62 06 |b | BHI 0x251cc
000251c6 44 fc 00 02 |D | MOVE.W #0x2,CCR
000251ca 4e 76 |Nv | TRAPV
000251cc de fc 00 1e | | ADDA.W #0x1e,A7
000251d0 48 e7 81 80 |H | MOVEM.L A0+D7+D0,-(A7)
000251d4 7e 00 |~ | MOVEQ.L #0x00,D7
000251d6 70 46 |pF | MOVEQ.L #0x46,D0
000251d8 c1 c7 | | MULS.W D7,D0
000251da 41 f9 00 02 57 8e |A W | LEA.L 0x2578e,A0
000251e0 41 f0 00 00 |A | LEA.L (A0+D0.W),A0
000251e4 d1 fc 00 00 89 2a | * | ADDA.L #0x892a,A0
000251ea 4a 10 |J | TST.B (A0)
000251ec 67 0c |g | BEQ 0x251fa
000251ee 3f 07 |? | MOVE.W D7,-(A7)
000251f0 48 6e ff fe |Hn | PEA.L (A6-0x2)
000251f4 4e ba bf 64 |N d | JSR 0x2115a
000251f8 5c 4f |\O | ADDQ.L #0x6,A7
000251fa 52 47 |RG | ADDQ.W #0x1,D7
000251fc 0c 47 00 0f | G | CMPI.W #0x000f,D7
00025200 6f d4 |o | BLE 0x251d6
00025202 4c df 01 81 |L | MOVEM.L (A7)+,D0+D7+A0
00025206 4e 5e |N^ | UNLK A6
00025208 4e 75 |Nu | RTS
0002520a ; --------------------------------------------------------------------------------------
0002520a ; OMSI PASCAL Function
0002520a ; <LVAR -0x004 @ 4(r)>
0002520a ; --------------------------------------------------------------------------------------
0002520a 4e 56 ff ac |NV | LINK.W A6,#0xffac
0002520e bf d5 | | CMPA.L (A5),A7
00025210 62 06 |b | BHI 0x25218
00025212 44 fc 00 02 |D | MOVE.W #0x2,CCR
00025216 4e 76 |Nv | TRAPV
00025218 de fc 00 50 | P | ADDA.W #0x50,A7
0002521c 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7)
00025220 45 f9 00 02 e5 18 |E | LEA.L 0x2e518,A2
00025226 72 01 |r | MOVEQ.L #0x01,D1
00025228 48 6e ff fc |Hn | PEA.L (A6-0x4)
0002522c 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp
00025232 58 4f |XO | ADDQ.L #0x4,A7
00025234 4a 12 |J | TST.B (A2)
00025236 67 06 |g | BEQ 0x2523e
00025238 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
0002523e 41 fa b9 38 |A 8 | LEA.L 0x20b78,A0
00025242 70 04 |p | MOVEQ.L #0x04,D0
00025244 3f 20 |? | MOVE.W -(A0),-(A7)
00025246 51 c8 ff fc |Q | DBF D0,0x25244
0002524a 9e fc 00 16 | | SUBA.W #0x16,A7
0002524e 20 4f | O | MOVEA.L A7,A0
00025250 43 fa b9 26 |C & | LEA.L 0x20b78,A1
00025254 70 14 |p | MOVEQ.L #0x14,D0
00025256 10 d9 | | MOVE.B (A1)+,(A0)+
00025258 51 c8 ff fc |Q | DBF D0,0x25256
0002525c 51 4f |QO | SUBQ.L #0x8,A7
0002525e 48 6f 00 1e |Ho | PEA.L (A7+0x1e)
00025262 3f 01 |? | MOVE.W D1,-(A7)
00025264 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7)
00025268 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
0002526e 2e ae ff fc |. | MOVE.L (A6-0x4),(A7)
00025272 4e b9 00 01 03 08 |N | JSR TimeToText()
00025278 48 6f 00 10 |Ho | PEA.L (A7+0x10)
0002527c 3f 01 |? | MOVE.W D1,-(A7)
0002527e 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7)
00025282 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00025288 2e b9 00 02 57 a4 |. W | MOVE.L 0x257a4,(A7)
0002528e 4e b9 00 01 03 08 |N | JSR TimeToText()
00025294 58 4f |XO | ADDQ.L #0x4,A7
00025296 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String
0002529c de fc 00 10 | | ADDA.W #0x10,A7
000252a0 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
000252a6 de fc 00 24 | $ | ADDA.W #0x24,A7
000252aa 4e ba c7 94 |N | JSR 0x21a40
000252ae 4e ba fb b6 |N | JSR 0x24e66
000252b2 4a 12 |J | TST.B (A2)
000252b4 67 06 |g | BEQ 0x252bc
000252b6 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
000252bc 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2
000252c0 4e 5e |N^ | UNLK A6
000252c2 4e 75 |Nu | RTS
000252c4 ; --------------------------------------------------------------------------------------
000252c4 ; OMSI PASCAL Function
000252c4 ; <LVAR 0x008 1(rw)>
000252c4 ; <LVAR -0x006 @ 1(r)>
000252c4 ; <LVAR -0x008 @ 2(rw)>
000252c4 ; --------------------------------------------------------------------------------------
000252c4 4e 56 ff e2 |NV | LINK.W A6,#0xffe2
000252c8 bf d5 | | CMPA.L (A5),A7
000252ca 62 06 |b | BHI 0x252d2
000252cc 44 fc 00 02 |D | MOVE.W #0x2,CCR
000252d0 4e 76 |Nv | TRAPV
000252d2 de fc 00 16 | | ADDA.W #0x16,A7
000252d6 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7)
000252da 41 ee ff f8 |A | LEA.L (A6-0x8),A0
000252de 72 01 |r | MOVEQ.L #0x01,D1
000252e0 42 2e 00 08 |B. | CLR.B (A6+0x8)
000252e4 3f 01 |? | MOVE.W D1,-(A7)
000252e6 48 6e ff fa |Hn | PEA.L (A6-0x6)
000252ea 4e b9 00 01 02 12 |N | JSR KC09_PortStatus(Port : Word; VAR b: Byte)
000252f0 5c 4f |\O | ADDQ.L #0x6,A7
000252f2 10 2e ff fa | . | MOVE.B (A6-0x6),D0
000252f6 b0 01 | | CMP.B D1,D0
000252f8 66 22 |f" | BNE 0x2531c
000252fa 3f 01 |? | MOVE.W D1,-(A7)
000252fc 48 50 |HP | PEA.L (A0)
000252fe 4e b9 00 01 02 0e |N | JSR KC07_PortGetChar(port : Word ; VAR ret : Word)
00025304 5c 4f |\O | ADDQ.L #0x6,A7
00025306 02 50 00 7f | P | ANDI.W #0x007f,(A0)
0002530a 30 10 |0 | MOVE.W (A0),D0
0002530c 0c 40 00 07 | @ | CMPI.W #0x0007,D0
00025310 66 06 |f | BNE 0x25318
00025312 1d 41 00 08 | A | MOVE.B D1,(A6+0x8)
00025316 60 04 |` | BRA 0x2531c
00025318 4e ba fe f0 |N | JSR 0x2520a
0002531c 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0
00025320 4e 5e |N^ | UNLK A6
00025322 4e 75 |Nu | RTS
00025324 ; --------------------------------------------------------------------------------------
00025324 ; OMSI PASCAL Function
00025324 ; --------------------------------------------------------------------------------------
00025324 4e 56 ff d6 |NV | LINK.W A6,#0xffd6
00025328 bf d5 | | CMPA.L (A5),A7
0002532a 62 06 |b | BHI 0x25332
0002532c 44 fc 00 02 |D | MOVE.W #0x2,CCR
00025330 4e 76 |Nv | TRAPV
00025332 de fc 00 2a | * | ADDA.W #0x2a,A7
00025336 48 e7 f0 f0 |H | MOVEM.L A3+A2+A1+A0+D3+D2+D1+D0,-(A7)
0002533a 41 f9 00 02 e5 2a |A * | LEA.L 0x2e52a,A0
00025340 43 f9 00 02 e5 2b |C + | LEA.L 0x2e52b,A1
00025346 45 f9 00 02 e5 2c |E , | LEA.L 0x2e52c,A2
0002534c 47 f9 00 02 e5 2e |G . | LEA.L 0x2e52e,A3
00025352 74 02 |t | MOVEQ.L #0x02,D2
00025354 76 01 |v | MOVEQ.L #0x01,D3
00025356 4a 39 00 02 e5 18 |J9 | TST.B 0x2e518
0002535c 67 58 |gX | BEQ 0x253b6
0002535e 3f 02 |? | MOVE.W D2,-(A7)
00025360 48 52 |HR | PEA.L (A2)
00025362 4e b9 00 01 02 12 |N | JSR KC09_PortStatus(Port : Word; VAR b: Byte)
00025368 5c 4f |\O | ADDQ.L #0x6,A7
0002536a 10 12 | | MOVE.B (A2),D0
0002536c b0 03 | | CMP.B D3,D0
0002536e 66 2c |f, | BNE 0x2539c
00025370 3f 02 |? | MOVE.W D2,-(A7)
00025372 48 53 |HS | PEA.L (A3)
00025374 4e b9 00 01 02 0e |N | JSR KC07_PortGetChar(port : Word ; VAR ret : Word)
0002537a 5c 4f |\O | ADDQ.L #0x6,A7
0002537c 30 13 |0 | MOVE.W (A3),D0
0002537e 02 40 00 ff | @ | ANDI.W #0x00ff,D0
00025382 10 80 | | MOVE.B D0,(A0)
00025384 0c 00 00 3a | : | CMPI.B #0x3a,D0
00025388 66 02 |f | BNE 0x2538c
0002538a 42 11 |B | CLR.B (A1)
0002538c 3f 03 |? | MOVE.W D3,-(A7)
0002538e 42 81 |B | CLR.L D1
00025390 12 00 | | MOVE.B D0,D1
00025392 3f 01 |? | MOVE.W D1,-(A7)
00025394 4e b9 00 01 02 0c |N | JSR KC06_PortPutChar(port : Word ; b : char)
0002539a 58 4f |XO | ADDQ.L #0x4,A7
0002539c 4a 11 |J | TST.B (A1)
0002539e 66 16 |f | BNE 0x253b6
000253a0 10 bc 00 10 | | MOVE.B #0x10,(A0)
000253a4 3f 02 |? | MOVE.W D2,-(A7)
000253a6 42 80 |B | CLR.L D0
000253a8 10 10 | | MOVE.B (A0),D0
000253aa 3f 00 |? | MOVE.W D0,-(A7)
000253ac 4e b9 00 01 02 0c |N | JSR KC06_PortPutChar(port : Word ; b : char)
000253b2 58 4f |XO | ADDQ.L #0x4,A7
000253b4 12 83 | | MOVE.B D3,(A1)
000253b6 4c df 0f 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2+A3
000253ba 4e 5e |N^ | UNLK A6
000253bc 4e 75 |Nu | RTS
000253be ; --------------------------------------------------------------------------------------
000253be ; OMSI PASCAL Function
000253be ; --------------------------------------------------------------------------------------
000253be START:
000253be 4f fa 00 08 |O | LEA.L MAIN,A7
000253c2 4e f9 00 01 02 80 |N | JMP ?start_program
000253c8 MAIN:
000253c8 45 f9 00 02 e5 22 |E " | LEA.L 0x2e522,A2
000253ce 47 f9 00 01 03 04 |G | LEA.L GetRtc() : TimeStamp,A3
000253d4 49 f9 00 02 e5 26 |I & | LEA.L 0x2e526,A4
000253da 72 01 |r | MOVEQ.L #0x01,D1
000253dc 24 3c 00 00 ff ff |$< | MOVE.L #0xffff,D2
000253e2 4e b9 00 01 03 98 |N | JSR FSCALL_10398
000253e8 42 b9 00 02 57 9e |B W | CLR.L 0x2579e
000253ee 23 c1 00 02 57 96 |# W | MOVE.L D1,0x25796
000253f4 9e fc 00 18 | | SUBA.W #0x18,A7
000253f8 20 4f | O | MOVEA.L A7,A0
000253fa 43 fa b7 92 |C | LEA.L 0x20b8e,A1
000253fe 70 16 |p | MOVEQ.L #0x16,D0
00025400 10 d9 | | MOVE.B (A1)+,(A0)+
00025402 51 c8 ff fc |Q | DBF D0,0x25400
00025406 59 4f |YO | SUBQ.L #0x4,A7
00025408 48 6f 00 04 |Ho | PEA.L (A7+0x4)
0002540c 3f 01 |? | MOVE.W D1,-(A7)
0002540e 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7)
00025412 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00025418 50 4f |PO | ADDQ.L #0x8,A7
0002541a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00025420 de fc 00 1c | | ADDA.W #0x1c,A7
00025424 4e ba b8 f0 |N | JSR 0x20d16
00025428 4e ba c4 d4 |N | JSR 0x218fe
0002542c 4e ba e9 f0 |N | JSR 0x23e1e
00025430 4e ba c5 b6 |N | JSR 0x219e8
00025434 4e ba e9 88 |N | JSR 0x23dbe
00025438 48 79 00 02 57 a4 |Hy W | PEA.L 0x257a4
0002543e 4e 93 |N | JSR (A3)
00025440 58 4f |XO | ADDQ.L #0x4,A7
00025442 4e ba e6 42 |N B | JSR 0x23a86
00025446 4e ba fc 92 |N | JSR 0x250da
0002544a 9e fc 00 30 | 0 | SUBA.W #0x30,A7
0002544e 20 4f | O | MOVEA.L A7,A0
00025450 43 fa b7 54 |C T | LEA.L 0x20ba6,A1
00025454 70 2e |p. | MOVEQ.L #0x2e,D0
00025456 10 d9 | | MOVE.B (A1)+,(A0)+
00025458 51 c8 ff fc |Q | DBF D0,0x25456
0002545c 59 4f |YO | SUBQ.L #0x4,A7
0002545e 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00025462 3f 01 |? | MOVE.W D1,-(A7)
00025464 3f 3c 00 2f |?< / | MOVE.W #0x2f,-(A7)
00025468 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
0002546e 50 4f |PO | ADDQ.L #0x8,A7
00025470 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String)
00025476 de fc 00 34 | 4 | ADDA.W #0x34,A7
0002547a 48 52 |HR | PEA.L (A2)
0002547c 4e 93 |N | JSR (A3)
0002547e 58 4f |XO | ADDQ.L #0x4,A7
00025480 42 80 |B | CLR.L D0
00025482 30 12 |0 | MOVE.W (A2),D0
00025484 d0 94 | | ADD.L (A4),D0
00025486 b0 82 | | CMP.L D2,D0
00025488 63 02 |c | BLS 0x2548c
0002548a 4e 4f |NO | TRAP #15
0002548c 34 80 |4 | MOVE.W D0,(A2)
0002548e 4a 39 00 02 e5 18 |J9 | TST.B 0x2e518
00025494 67 24 |g$ | BEQ 0x254ba
00025496 13 fc 00 10 00 02 e5 2a | *| MOVE.B #0x10,0x2e52a
0002549e 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7)
000254a2 42 80 |B | CLR.L D0
000254a4 10 39 00 02 e5 2a | 9 * | MOVE.B 0x2e52a,D0
000254aa 3f 00 |? | MOVE.W D0,-(A7)
000254ac 4e b9 00 01 02 0c |N | JSR KC06_PortPutChar(port : Word ; b : char)
000254b2 58 4f |XO | ADDQ.L #0x4,A7
000254b4 13 c1 00 02 e5 2b | + | MOVE.B D1,0x2e52b
000254ba 48 79 00 02 e5 1e |Hy | PEA.L 0x2e51e
000254c0 4e 93 |N | JSR (A3)
000254c2 58 4f |XO | ADDQ.L #0x4,A7
000254c4 4e ba e6 0c |N | JSR 0x23ad2
000254c8 4e ba fc 5e |N ^ | JSR 0x25128
000254cc 4e ba fe 56 |N V | JSR 0x25324
000254d0 48 79 00 02 e5 1a |Hy | PEA.L 0x2e51a
000254d6 4e 93 |N | JSR (A3)
000254d8 58 4f |XO | ADDQ.L #0x4,A7
000254da 30 39 00 02 e5 1e |09 | MOVE.W 0x2e51e,D0
000254e0 b0 79 00 02 e5 1a | y | CMP.W 0x2e51a,D0
000254e6 63 20 |c | BLS 0x25508
000254e8 4e ba fd 20 |N | JSR 0x2520a
000254ec 48 79 00 02 e5 1a |Hy | PEA.L 0x2e51a
000254f2 4e 93 |N | JSR (A3)
000254f4 58 4f |XO | ADDQ.L #0x4,A7
000254f6 42 80 |B | CLR.L D0
000254f8 30 39 00 02 e5 1a |09 | MOVE.W 0x2e51a,D0
000254fe d0 94 | | ADD.L (A4),D0
00025500 b0 82 | | CMP.L D2,D0
00025502 63 02 |c | BLS 0x25506
00025504 4e 4f |NO | TRAP #15
00025506 34 80 |4 | MOVE.W D0,(A2)
00025508 33 f9 00 02 e5 1a 00 02 |3 | MOVE.W 0x2e51a,0x2e51e
00025510 e5 1e | |
00025512 30 39 00 02 e5 1a |09 | MOVE.W 0x2e51a,D0
00025518 b0 52 | R | CMP.W (A2),D0
0002551a 65 18 |e | BCS 0x25534
0002551c 4e ba fc ec |N | JSR 0x2520a
00025520 48 52 |HR | PEA.L (A2)
00025522 4e 93 |N | JSR (A3)
00025524 58 4f |XO | ADDQ.L #0x4,A7
00025526 42 80 |B | CLR.L D0
00025528 30 12 |0 | MOVE.W (A2),D0
0002552a d0 94 | | ADD.L (A4),D0
0002552c b0 82 | | CMP.L D2,D0
0002552e 63 02 |c | BLS 0x25532
00025530 4e 4f |NO | TRAP #15
00025532 34 80 |4 | MOVE.W D0,(A2)
00025534 55 4f |UO | SUBQ.L #0x2,A7
00025536 4e ba fd 8c |N | JSR 0x252c4
0002553a 4a 1f |J | TST.B (A7)+
0002553c 66 0a |f | BNE 0x25548
0002553e 4a b9 00 02 57 9e |J W | TST.L 0x2579e
00025544 66 00 ff 7e |f ~ | BNE 0x254c4
00025548 4e ba e6 82 |N | JSR 0x23bcc
0002554c 4e ba fc 70 |N p | JSR 0x251be
00025550 9e fc 00 14 | | SUBA.W #0x14,A7
00025554 20 4f | O | MOVEA.L A7,A0
00025556 43 fa b6 7e |C ~ | LEA.L 0x20bd6,A1
0002555a 70 12 |p | MOVEQ.L #0x12,D0
0002555c 10 d9 | | MOVE.B (A1)+,(A0)+
0002555e 51 c8 ff fc |Q | DBF D0,0x2555c
00025562 42 27 |B' | CLR.B -(A7)
00025564 59 4f |YO | SUBQ.L #0x4,A7
00025566 48 6f 00 06 |Ho | PEA.L (A7+0x6)
0002556a 3f 01 |? | MOVE.W D1,-(A7)
0002556c 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7)
00025570 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
00025576 50 4f |PO | ADDQ.L #0x8,A7
00025578 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String)
0002557e de fc 00 1a | | ADDA.W #0x1a,A7
00025582 4e b9 00 01 02 84 |N | JSR ?exit
00025588 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_'
00025596 ; --------------------------------------------------------------------------------------
00025596 ; OMSI PASCAL Function
00025596 ; <LVAR 0x008 1(r)>
00025596 ; --------------------------------------------------------------------------------------
00025596 PROG_FAIL:
00025596 4e 56 ff d2 |NV | LINK.W A6,#0xffd2
0002559a bf d5 | | CMPA.L (A5),A7
0002559c 62 06 |b | BHI 0x255a4
0002559e 44 fc 00 02 |D | MOVE.W #0x2,CCR
000255a2 4e 76 |Nv | TRAPV
000255a4 de fc 00 2c | , | ADDA.W #0x2c,A7
000255a8 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7)
000255ac 41 fa ff e8 |A | LEA.L PROG_FAIL,A0
000255b0 70 06 |p | MOVEQ.L #0x06,D0
000255b2 3f 20 |? | MOVE.W -(A0),-(A7)
000255b4 51 c8 ff fc |Q | DBF D0,0x255b2
000255b8 1f 3c 00 03 | < | MOVE.B #0x03,-(A7)
000255bc 51 4f |QO | SUBQ.L #0x8,A7
000255be 48 6f 00 0a |Ho | PEA.L (A7+0xa)
000255c2 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7)
000255c6 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7)
000255ca 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String
000255d0 58 4f |XO | ADDQ.L #0x4,A7
000255d2 10 2e 00 08 | . | MOVE.B (A6+0x8),D0
000255d6 48 80 |H | EXTB.W D0
000255d8 48 c0 |H | EXTW.L D0
000255da 2f 00 |/ | MOVE.L D0,-(A7)
000255dc 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String
000255e2 58 4f |XO | ADDQ.L #0x4,A7
000255e4 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
000255ea 50 4f |PO | ADDQ.L #0x8,A7
000255ec 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String)
000255f2 de fc 00 14 | | ADDA.W #0x14,A7
000255f6 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0
000255fa 4e 5e |N^ | UNLK A6
000255fc 4e 75 |Nu | RTS
000255fe 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ '
0002560c 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ '
0002561a 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ '
00025628 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :'
0002563a 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. '
00025652 ; --------------------------------------------------------------------------------------
00025652 ; OMSI PASCAL Function
00025652 ; <LVAR 0x00e 1(r)>
00025652 ; <LVAR 0x00a 4(r)>
00025652 ; <LVAR 0x008 1(r)>
00025652 ; --------------------------------------------------------------------------------------
00025652 EXP_FAIL:
00025652 4e 56 ff 8c |NV | LINK.W A6,#0xff8c
00025656 bf d5 | | CMPA.L (A5),A7
00025658 62 06 |b | BHI 0x25660
0002565a 44 fc 00 02 |D | MOVE.W #0x2,CCR
0002565e 4e 76 |Nv | TRAPV
00025660 de fc 00 74 | t | ADDA.W #0x74,A7
00025664 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7)
00025668 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3
0002566e 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4
00025674 72 01 |r | MOVEQ.L #0x01,D1
00025676 74 0d |t | MOVEQ.L #0x0d,D2
00025678 76 1e |v | MOVEQ.L #0x1e,D3
0002567a 78 12 |x | MOVEQ.L #0x12,D4
0002567c 7a 0e |z | MOVEQ.L #0x0e,D5
0002567e 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void)
00025684 41 fa ff b4 |A | LEA.L 0x2563a,A0
00025688 70 08 |p | MOVEQ.L #0x08,D0
0002568a 3f 20 |? | MOVE.W -(A0),-(A7)
0002568c 51 c8 ff fc |Q | DBF D0,0x2568a
00025690 59 4f |YO | SUBQ.L #0x4,A7
00025692 48 6f 00 04 |Ho | PEA.L (A7+0x4)
00025696 3f 01 |? | MOVE.W D1,-(A7)
00025698 3f 04 |? | MOVE.W D4,-(A7)
0002569a 4e 93 |N | JSR (A3)
0002569c 50 4f |PO | ADDQ.L #0x8,A7
0002569e 4e 94 |N | JSR (A4)
000256a0 50 4f |PO | ADDQ.L #0x8,A7
000256a2 20 4f | O | MOVEA.L A7,A0
000256a4 43 fa ff 58 |C X | LEA.L 0x255fe,A1
000256a8 70 0c |p | MOVEQ.L #0x0c,D0
000256aa 10 d9 | | MOVE.B (A1)+,(A0)+
000256ac 51 c8 ff fc |Q | DBF D0,0x256aa
000256b0 51 4f |QO | SUBQ.L #0x8,A7
000256b2 48 6f 00 08 |Ho | PEA.L (A7+0x8)
000256b6 3f 01 |? | MOVE.W D1,-(A7)
000256b8 3f 02 |? | MOVE.W D2,-(A7)
000256ba 4e 93 |N | JSR (A3)
000256bc 54 4f |TO | ADDQ.L #0x2,A7
000256be 1e ae 00 0e | | MOVE.B (A6+0xe),(A7)
000256c2 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String
000256c8 54 4f |TO | ADDQ.L #0x2,A7
000256ca 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
000256d0 50 4f |PO | ADDQ.L #0x8,A7
000256d2 4e 94 |N | JSR (A4)
000256d4 de c4 | | ADDA.W D4,A7
000256d6 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0
000256da b0 c1 | | CMPA.W D1,A0
000256dc 67 48 |gH | BEQ 0x25726
000256de 9e c5 | | SUBA.W D5,A7
000256e0 22 4f |"O | MOVEA.L A7,A1
000256e2 45 fa ff 28 |E ( | LEA.L 0x2560c,A2
000256e6 70 0c |p | MOVEQ.L #0x0c,D0
000256e8 12 da | | MOVE.B (A2)+,(A1)+
000256ea 51 c8 ff fc |Q | DBF D0,0x256e8
000256ee 9e c3 | | SUBA.W D3,A7
000256f0 22 4f |"O | MOVEA.L A7,A1
000256f2 41 e8 00 fc |A | LEA.L (A0+0xfc),A0
000256f6 70 1d |p | MOVEQ.L #0x1d,D0
000256f8 12 d8 | | MOVE.B (A0)+,(A1)+
000256fa 51 c8 ff fc |Q | DBF D0,0x256f8
000256fe 51 4f |QO | SUBQ.L #0x8,A7
00025700 48 6f 00 26 |Ho & | PEA.L (A7+0x26)
00025704 3f 01 |? | MOVE.W D1,-(A7)
00025706 3f 02 |? | MOVE.W D2,-(A7)
00025708 4e 93 |N | JSR (A3)
0002570a 58 4f |XO | ADDQ.L #0x4,A7
0002570c 48 6f 00 0c |Ho | PEA.L (A7+0xc)
00025710 3f 01 |? | MOVE.W D1,-(A7)
00025712 3f 03 |? | MOVE.W D3,-(A7)
00025714 4e 93 |N | JSR (A3)
00025716 50 4f |PO | ADDQ.L #0x8,A7
00025718 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
0002571e 50 4f |PO | ADDQ.L #0x8,A7
00025720 4e 94 |N | JSR (A4)
00025722 de fc 00 30 | 0 | ADDA.W #0x30,A7
00025726 9e c5 | | SUBA.W D5,A7
00025728 20 4f | O | MOVEA.L A7,A0
0002572a 43 fa fe ee |C | LEA.L 0x2561a,A1
0002572e 70 0c |p | MOVEQ.L #0x0c,D0
00025730 10 d9 | | MOVE.B (A1)+,(A0)+
00025732 51 c8 ff fc |Q | DBF D0,0x25730
00025736 51 4f |QO | SUBQ.L #0x8,A7
00025738 48 6f 00 08 |Ho | PEA.L (A7+0x8)
0002573c 3f 01 |? | MOVE.W D1,-(A7)
0002573e 3f 02 |? | MOVE.W D2,-(A7)
00025740 4e 93 |N | JSR (A3)
00025742 54 4f |TO | ADDQ.L #0x2,A7
00025744 1e ae 00 08 | | MOVE.B (A6+0x8),(A7)
00025748 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String)
0002574e 54 4f |TO | ADDQ.L #0x2,A7
00025750 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String
00025756 50 4f |PO | ADDQ.L #0x8,A7
00025758 4e 94 |N | JSR (A4)
0002575a 5d 4f |]O | SUBQ.L #0x6,A7
0002575c 20 4f | O | MOVEA.L A7,A0
0002575e 43 fa fe da |C | LEA.L 0x2563a,A1
00025762 70 16 |p | MOVEQ.L #0x16,D0
00025764 10 d9 | | MOVE.B (A1)+,(A0)+
00025766 51 c8 ff fc |Q | DBF D0,0x25764
0002576a 1f 3c 00 02 | < | MOVE.B #0x02,-(A7)
0002576e 59 4f |YO | SUBQ.L #0x4,A7
00025770 48 6f 00 06 |Ho | PEA.L (A7+0x6)
00025774 3f 01 |? | MOVE.W D1,-(A7)
00025776 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7)
0002577a 4e 93 |N | JSR (A3)
0002577c 50 4f |PO | ADDQ.L #0x8,A7
0002577e 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String)
00025784 de c3 | | ADDA.W D3,A7
00025786 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4
0002578a 4e 5e |N^ | UNLK A6
0002578c 4e 75 |Nu | RTS