|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 27648 (0x6c00)
Types: M200
Notes: M200_PROGRAM
Names: »RDIAG.M200«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »RDIAG.M200«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »RDIAG.M200«
└─ ⟦this⟧ »RDIAG.M200«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »RDIAG.M200«
@ 20c5e
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 20c5e-20cc6 Body>
<POP 20c5e-20c74 Prologue> Σ0 ↓
<POP 20c74-20cbe Naked> Σ0 ↓
<Blob 0x20c74 [14] @> Δ-14 {[«14""»]}
<Const 0x20c80 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 20c84-20c86 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x20c86 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 20c98-20c9a StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 20c9a MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 20c9e EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 20ca0 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 20ca2 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x20ca4 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 20caa-20cac StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x20cac 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 20cb2-20cb4 StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x20cb4 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 20cba-20cbe StackAdj> Δ+20 {}
<POP 20cbe-20cc6 Epilogue> Σ0
@ 20cc6
<LVAR 0x02a 4(r)>
<LVAR 0x028 1(r)>
<LVAR 0x026 1(r)>
<LVAR 0x024 1(r)>
<LVAR 0x020 4(r)>
<LVAR 0x01c 4(r)>
<LVAR 0x018 4(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20cc6-20df0 Body>
<POP 20cc6-20cdc Prologue> Σ0 ↓
<POP 20cdc-20cea RegCacheLoad> Σ0 ↓
<POP 20cea-20d8a Naked> Σ0 ↓ →0x20de8
<Blob 0x20cea [2] @> Δ-2 {[«2""»]}
<POP 20cee-20cf0 StackAdj> Δ-4 {[«2""»]|[-4-]}
<POP 20cf0-20cf1 StackAdj> Δ+2 {[«2""»]|[-2-]}
<Blob 0x20cf1 [2] @> Δ-2 {[«2""»]|[-2-]|[«2""»]}
<MI 20cf4 MOVE.B 0x20127,(A7+0x1)> {[«2""»]|[-2-]|[«2""»]}
<MI 20cfa MOVE.B 0x20128,(A7+0x2)> {[«2""»]|[-2-]|[«2""»]}
<POP 20d00-20d02 StackAdj> Δ-8 {[«2""»]|[-2-]|[«2""»]|[-8-]}
<Lit 0x20d02 2> {[«2""»]|[-2-]|[«2""»]|[-4-]|[$$P ]}
<MI 20d12 MOVE.L (A6+0x2a),(A7)> {[«2""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6+0x2a)']}
<POP 20d0c-20d12 StackAdj> Δ-8 {[«2""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6+0x2a)']|[-8-]}
<Call 0x20d16 0x102e4> {[«2""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6+0x2a)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x20d1c> {[«2""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6+0x2a)']|[-4-]|[$$…]}
<Pointer.sp 0x20d1c 16> Δ-4
<Const 0x20d20 0x1.2> Δ-2
<Const 0x20d22 0x3.2> Δ-2
<Call 0x20d26 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20d2c-20d2e StackAdj> Δ+8
<Call 0x20d2e 0x102d4> {[«2""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6+0x2a)']|[-4-]|[$$…]}
StringCat3(a, b, c : String) : String
<POP 20d34-20d36 StackAdj> Δ+12 {[«2""»]|[-2-]|[«2""»]|[-4-]}
<MI 20d36 MOVEA.L (A7)+,A4> Δ+4 {[«2""»]|[-2-]|[«2""»]}
<POP 20d38-20d3a StackAdj> Δ+6 {}
<Call 0x20d3a 0x10538> {}
IPC_Init(void)
<MI 20d40 MOVE.B (A6+0x28),-(A7)> Δ-2 {[2, '(A6+0x28)']}
<MI 20d44 PEA.L (A7)> Δ-4 {[2, '(A6+0x28)']|[4, '^(A7)']}
<Const 0x20d46 0x0.4> Δ-4 {[2, '(A6+0x28)']|[4, '^(A7)']|[##0]}
<Const 0x20d48 0x0.4> Δ-4 {[2, '(A6+0x28)']|[4, '^(A7)']|[##0]|[##0]}
<Call 0x20d4a 0x104fc> {[2, '(A6+0x28)']|[4, '^(A7)']|[##0]|[##0]}
IPC_PutVar(src : Pointer; length : Long ; type : Long)
<POP 20d50-20d52 StackAdj> Δ+12 {[2, '(A6+0x28)']}
<MI 20d52 MOVE.B (A6+0x26),(A7)> {[-2-]}
<Call 0x20d56 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<MI 20d5c MOVE.B (A6+0x24),(A7)> {[-2-]}
<Call 0x20d60 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 20d66-20d68 StackAdj> Δ+2 {}
<Call 0x20d68 0x10514> {}
IPC_PutEnd(void)
<MI 20d6e MOVEA.L (A6+0x8),A0> {}
<MI 20d72 MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']}
<Const 0x20d74 0x1.4> Δ-4 {[4, 'A4']|[##1]}
<Const 0x20d78 0x1.2> Δ-2 {[4, 'A4']|[##1]|[#1]}
<MI 20d7a PEA.L (A0)> Δ-4 {[4, 'A4']|[##1]|[#1]|[4, '^(A0)']}
<Call 0x20d7c 0x103b0> {[4, 'A4']|[##1]|[#1]|[4, '^(A0)']}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 20d82-20d86 StackAdj> Δ+14 {}
<MI 20d86 TST.B (A0)> {}
<MI 20d88 BNE 0x20de8> {}
<POP 20d8a-20de8 Naked> Σ0 ↓
<Call 0x20d8a 0x10538> {}
IPC_Init(void)
<MI 20d90 MOVEA.L (A6+0x20),A0> {}
<MI 20d94 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20d96 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20d9c-20d9e StackAdj> Δ+4 {}
<MI 20d9e MOVEA.L (A6+0x1c),A0> {}
<MI 20da2 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20da4 0x1052c> {[4, '^(A0)']}
IPC_GetString(VAR retval : String)
<POP 20da6-20da8 StackAdj> Δ+4 {}
<MI 20da8 MOVEA.L (A6+0x18),A0> {}
<MI 20dac PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20dae 0x1052c> {[4, '^(A0)']}
IPC_GetString(VAR retval : String)
<POP 20db0-20db2 StackAdj> Δ+4 {}
<MI 20db2 MOVEA.L (A6+0x14),A0> {}
<MI 20db6 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20db8 0x1052c> {[4, '^(A0)']}
IPC_GetString(VAR retval : String)
<POP 20dba-20dbc StackAdj> Δ+4 {}
<MI 20dbc MOVEA.L (A6+0x10),A0> {}
<MI 20dc0 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Const 0x20dc2 0x0.4> Δ-4 {[4, '^(A0)']|[##0]}
<Const 0x20dc4 0x0.4> Δ-4 {[4, '^(A0)']|[##0]|[##0]}
<Call 0x20dc6 0x10520> {[4, '^(A0)']|[##0]|[##0]}
IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long)
<POP 20dcc-20dce StackAdj> Δ+12 {}
<MI 20dce MOVEA.L (A6+0xc),A0> {}
<MI 20dd2 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Const 0x20dd4 0x0.4> Δ-4 {[4, '^(A0)']|[##0]}
<Const 0x20dd6 0x7.4> Δ-4 {[4, '^(A0)']|[##0]|[##7]}
<Call 0x20dda 0x10520> {[4, '^(A0)']|[##0]|[##7]}
IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long)
<POP 20de0-20de2 StackAdj> Δ+12 {}
<Call 0x20de2 0x1051a> {}
IPC_GetEnd(void)
<POP 20de8-20df0 Epilogue> Σ0 ←0x20cea
@ 20df0
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20df0-20e4e Body>
<POP 20df0-20e06 Prologue> Σ0 ↓
<POP 20e06-20e46 Naked> Σ0 ↓
<Call 0x20e06 0x10538> {}
IPC_Init(void)
<MI 20e0c MOVEA.L (A6+0x10),A0> {}
<MI 20e10 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Const 0x20e12 0x0.4> Δ-4 {[4, '^(A0)']|[##0]}
<Const 0x20e16 0x0.4> Δ-4 {[4, '^(A0)']|[##0]|[##0]}
<Call 0x20e1a 0x10520> {[4, '^(A0)']|[##0]|[##0]}
IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long)
<POP 20e20-20e24 StackAdj> Δ+12 {}
<MI 20e24 MOVEA.L (A6+0xc),A0> {}
<MI 20e28 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20e2a 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20e30-20e32 StackAdj> Δ+4 {}
<MI 20e32 MOVEA.L (A6+0x8),A0> {}
<MI 20e36 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20e38 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20e3e-20e40 StackAdj> Δ+4 {}
<Call 0x20e40 0x1051a> {}
IPC_GetEnd(void)
<POP 20e46-20e4e Epilogue> Σ0
@ 20e4e
<LVAR 0x01e 1(r)>
<LVAR 0x01a 4(r)>
<LVAR 0x016 4(r)>
<LVAR 0x012 4(r)>
<LVAR 0x010 1(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20e4e-20ede Body>
<POP 20e4e-20e64 Prologue> Σ0 ↓
<POP 20e64-20e6e RegCacheLoad> Σ0 ↓
<POP 20e6e-20ed6 Naked> Σ0 ↓
<Call 0x20e6e 0x10538> {}
IPC_Init(void)
<MI 20e74 MOVE.B (A6+0x1e),-(A7)> Δ-2 {[2, '(A6+0x1e)']}
<Call 0x20e78 0x10502> {[2, '(A6+0x1e)']}
IPC_PutBool(a : Bool)
<POP 20e7e-20e80 StackAdj> Δ+2 {}
<MI 20e80 MOVE.L (A6+0x1a),-(A7)> Δ-4 {[4, '(A6+0x1a)']}
<Call 0x20e84 0x10508> {[4, '(A6+0x1a)']}
IPC_PutString(a : String)
<MI 20e86 MOVE.L (A6+0x16),(A7)> {[4, '(A6+0x16)']}
<Call 0x20e8a 0x10508> {[4, '(A6+0x16)']}
IPC_PutString(a : String)
<MI 20e8c MOVE.L (A6+0x12),(A7)> {[4, '(A6+0x12)']}
<Call 0x20e90 0x10508> {[4, '(A6+0x12)']}
IPC_PutString(a : String)
<POP 20e92-20e94 StackAdj> Δ+2 {[-2-]}
<MI 20e94 MOVE.B (A6+0x10),(A7)> {[-2-]}
<MI 20e98 PEA.L (A7)> Δ-4 {[-2-]|[4, '^(A7)']}
<Const 0x20e9a 0x0.4> Δ-4 {[-2-]|[4, '^(A7)']|[##0]}
<Const 0x20e9c 0x0.4> Δ-4 {[-2-]|[4, '^(A7)']|[##0]|[##0]}
<Call 0x20e9e 0x104fc> {[-2-]|[4, '^(A7)']|[##0]|[##0]}
IPC_PutVar(src : Pointer; length : Long ; type : Long)
<POP 20ea4-20ea8 StackAdj> Δ+10 {[-2-]|[-2-]}
<MI 20ea8 MOVE.L (A6+0xc),(A7)> {[4, '(A6+0xc)']}
<MI 20eac MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 20eb0 PEA.L (A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '^(A7)']}
<Const 0x20eb2 0x0.4> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '^(A7)']|[##0]}
<Const 0x20eb4 0x7.4> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '^(A7)']|[##0]|[##7]}
<Call 0x20eb8 0x104fc> {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, '^(A7)']|[##0]|[##7]}
IPC_PutVar(src : Pointer; length : Long ; type : Long)
<POP 20ebe-20ec2 StackAdj> Δ+20 {}
<Call 0x20ec2 0x10514> {}
IPC_PutEnd(void)
<MI 20ec8 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x20eca 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x20ece 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 20ed4-20ed6 StackAdj> Δ+6 {}
<POP 20ed6-20ede Epilogue> Σ0
@ 20ede
<LVAR 0x024 4(r)>
<LVAR 0x022 1(r)>
<LVAR 0x020 1(r)>
<LVAR 0x01c 4(r)>
<LVAR 0x018 4(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20ede-20fda Body>
<POP 20ede-20ef4 Prologue> Σ0 ↓
<POP 20ef4-20efc RegCacheLoad> Σ0 ↓
<POP 20efc-20f76 Naked> Σ0 ↓ →0x20fd2
<Call 0x20efc 0x10538> {}
IPC_Init(void)
<MI 20f02 MOVE.B (A6+0x22),-(A7)> Δ-2 {[2, '(A6+0x22)']}
<Call 0x20f06 0x10502> {[2, '(A6+0x22)']}
IPC_PutBool(a : Bool)
<MI 20f0c MOVE.B (A6+0x20),(A7)> {[-2-]}
<Call 0x20f10 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 20f16-20f18 StackAdj> Δ+2 {}
<Call 0x20f18 0x10514> {}
IPC_PutEnd(void)
<Blob 0x20f1e [4] @> Δ-4 {[«4""»]}
<Blob 0x20f22 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x20f26 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 20f2a-20f2c StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[-8-]}
<Lit 0x20f2c 12> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Running FRU_]}
<MI 20f3a MOVE.L (A6+0x24),(A7)> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x24)']}
<POP 20f34-20f3a StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x24)']|[-8-]}
<Call 0x20f3e 0x102cc> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x24)']|[-8-]}
StringDup(a : String) : String
<POP 20f44-20f46 StackAdj> Δ+4 {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x24)']|[-4-]}
<Call 0x20f46 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x24)']|[-4-]}
StringCat2(a, b : String) : String
<POP 20f4c-20f4e StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Call 0x20f4e 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 20f54-20f58 StackAdj> Δ+16 {}
<MI 20f58 MOVEA.L (A6+0x8),A0> {}
<MI 20f5c MOVE.L (A6+0x24),-(A7)> Δ-4 {[4, '(A6+0x24)']}
<Const 0x20f60 0x1.4> Δ-4 {[4, '(A6+0x24)']|[##1]}
<Const 0x20f64 0x1.2> Δ-2 {[4, '(A6+0x24)']|[##1]|[#1]}
<MI 20f66 PEA.L (A0)> Δ-4 {[4, '(A6+0x24)']|[##1]|[#1]|[4, '^(A0)']}
<Call 0x20f68 0x103b0> {[4, '(A6+0x24)']|[##1]|[#1]|[4, '^(A0)']}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 20f6e-20f72 StackAdj> Δ+14 {}
<MI 20f72 TST.B (A0)> {}
<MI 20f74 BNE 0x20fd2> {}
<POP 20f76-20fd2 Naked> Σ0 ↓
<Call 0x20f76 0x10538> {}
IPC_Init(void)
<MI 20f7c MOVEA.L (A6+0x1c),A0> {}
<MI 20f80 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20f82 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20f88-20f8a StackAdj> Δ+4 {}
<MI 20f8a MOVEA.L (A6+0x18),A0> {}
<MI 20f8e PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20f90 0x1052c> {[4, '^(A0)']}
IPC_GetString(VAR retval : String)
<POP 20f96-20f98 StackAdj> Δ+4 {}
<MI 20f98 MOVEA.L (A6+0x14),A0> {}
<MI 20f9c PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20f9e 0x1052c> {[4, '^(A0)']}
IPC_GetString(VAR retval : String)
<POP 20fa4-20fa6 StackAdj> Δ+4 {}
<MI 20fa6 MOVEA.L (A6+0x10),A0> {}
<MI 20faa PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Const 0x20fac 0x0.4> Δ-4 {[4, '^(A0)']|[##0]}
<Const 0x20fae 0x0.4> Δ-4 {[4, '^(A0)']|[##0]|[##0]}
<Call 0x20fb0 0x10520> {[4, '^(A0)']|[##0]|[##0]}
IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long)
<POP 20fb6-20fb8 StackAdj> Δ+12 {}
<MI 20fb8 MOVEA.L (A6+0xc),A0> {}
<MI 20fbc PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Const 0x20fbe 0x0.4> Δ-4 {[4, '^(A0)']|[##0]}
<Const 0x20fc0 0x7.4> Δ-4 {[4, '^(A0)']|[##0]|[##7]}
<Call 0x20fc4 0x10520> {[4, '^(A0)']|[##0]|[##7]}
IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long)
<POP 20fca-20fcc StackAdj> Δ+12 {}
<Call 0x20fcc 0x1051a> {}
IPC_GetEnd(void)
<POP 20fd2-20fda Epilogue> Σ0 ←0x20efc
@ 20fda
<LVAR 0x028 1(r)>
<LVAR 0x024 4(r)>
<LVAR 0x022 1(r)>
<LVAR 0x020 1(r)>
<LVAR 0x01c 4(r)>
<LVAR 0x018 4(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20fda-210e8 Body>
<POP 20fda-20ff0 Prologue> Σ0 ↓
<POP 20ff0-20ff8 RegCacheLoad> Σ0 ↓
<POP 20ff8-21084 Naked> Σ0 ↓ →0x210e0
<Call 0x20ff8 0x10538> {}
IPC_Init(void)
<MI 20ffe MOVE.B (A6+0x28),-(A7)> Δ-2 {[2, '(A6+0x28)']}
<MI 21002 PEA.L (A7)> Δ-4 {[2, '(A6+0x28)']|[4, '^(A7)']}
<Const 0x21004 0x0.4> Δ-4 {[2, '(A6+0x28)']|[4, '^(A7)']|[##0]}
<Const 0x21006 0x0.4> Δ-4 {[2, '(A6+0x28)']|[4, '^(A7)']|[##0]|[##0]}
<Call 0x21008 0x104fc> {[2, '(A6+0x28)']|[4, '^(A7)']|[##0]|[##0]}
IPC_PutVar(src : Pointer; length : Long ; type : Long)
<POP 2100e-21010 StackAdj> Δ+12 {[2, '(A6+0x28)']}
<MI 21010 MOVE.B (A6+0x22),(A7)> {[-2-]}
<Call 0x21014 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<MI 2101a MOVE.B (A6+0x20),(A7)> {[-2-]}
<Call 0x2101e 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 21024-21026 StackAdj> Δ+2 {}
<Call 0x21026 0x10514> {}
IPC_PutEnd(void)
<Blob 0x2102c [4] @> Δ-4 {[«4""»]}
<Blob 0x21030 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x21034 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 21038-2103a StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[-8-]}
<Lit 0x2103a 12> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Running FRU_]}
<MI 21048 MOVE.L (A6+0x24),(A7)> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x24)']}
<POP 21042-21048 StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x24)']|[-8-]}
<Call 0x2104c 0x102cc> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x24)']|[-8-]}
StringDup(a : String) : String
<POP 21052-21054 StackAdj> Δ+4 {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x24)']|[-4-]}
<Call 0x21054 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x24)']|[-4-]}
StringCat2(a, b : String) : String
<POP 2105a-2105c StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Call 0x2105c 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21062-21066 StackAdj> Δ+16 {}
<MI 21066 MOVEA.L (A6+0x8),A0> {}
<MI 2106a MOVE.L (A6+0x24),-(A7)> Δ-4 {[4, '(A6+0x24)']}
<Const 0x2106e 0x1.4> Δ-4 {[4, '(A6+0x24)']|[##1]}
<Const 0x21072 0x1.2> Δ-2 {[4, '(A6+0x24)']|[##1]|[#1]}
<MI 21074 PEA.L (A0)> Δ-4 {[4, '(A6+0x24)']|[##1]|[#1]|[4, '^(A0)']}
<Call 0x21076 0x103b0> {[4, '(A6+0x24)']|[##1]|[#1]|[4, '^(A0)']}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 2107c-21080 StackAdj> Δ+14 {}
<MI 21080 TST.B (A0)> {}
<MI 21082 BNE 0x210e0> {}
<POP 21084-210e0 Naked> Σ0 ↓
<Call 0x21084 0x10538> {}
IPC_Init(void)
<MI 2108a MOVEA.L (A6+0x1c),A0> {}
<MI 2108e PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x21090 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 21096-21098 StackAdj> Δ+4 {}
<MI 21098 MOVEA.L (A6+0x18),A0> {}
<MI 2109c PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x2109e 0x1052c> {[4, '^(A0)']}
IPC_GetString(VAR retval : String)
<POP 210a4-210a6 StackAdj> Δ+4 {}
<MI 210a6 MOVEA.L (A6+0x14),A0> {}
<MI 210aa PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x210ac 0x1052c> {[4, '^(A0)']}
IPC_GetString(VAR retval : String)
<POP 210b2-210b4 StackAdj> Δ+4 {}
<MI 210b4 MOVEA.L (A6+0x10),A0> {}
<MI 210b8 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Const 0x210ba 0x0.4> Δ-4 {[4, '^(A0)']|[##0]}
<Const 0x210bc 0x0.4> Δ-4 {[4, '^(A0)']|[##0]|[##0]}
<Call 0x210be 0x10520> {[4, '^(A0)']|[##0]|[##0]}
IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long)
<POP 210c4-210c6 StackAdj> Δ+12 {}
<MI 210c6 MOVEA.L (A6+0xc),A0> {}
<MI 210ca PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Const 0x210cc 0x0.4> Δ-4 {[4, '^(A0)']|[##0]}
<Const 0x210ce 0x7.4> Δ-4 {[4, '^(A0)']|[##0]|[##7]}
<Call 0x210d2 0x10520> {[4, '^(A0)']|[##0]|[##7]}
IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long)
<POP 210d8-210da StackAdj> Δ+12 {}
<Call 0x210da 0x1051a> {}
IPC_GetEnd(void)
<POP 210e0-210e8 Epilogue> Σ0 ←0x20ff8
@ 210e8
<LVAR 0x02c 1(r)>
<LVAR 0x028 4(r)>
<LVAR 0x026 1(r)>
<LVAR 0x024 1(r)>
<LVAR 0x022 1(r)>
<LVAR 0x020 1(r)>
<LVAR 0x01c 4(r)>
<LVAR 0x018 4(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 210e8-21200 Body>
<POP 210e8-210fe Prologue> Σ0 ↓
<POP 210fe-2110c RegCacheLoad> Σ0 ↓
<POP 2110c-2119c Naked> Σ0 ↓ →0x211f8
<Call 0x2110c 0x10538> {}
IPC_Init(void)
<MI 21112 MOVE.B (A6+0x2c),-(A7)> Δ-2 {[2, '(A6+0x2c)']}
<MI 21116 PEA.L (A7)> Δ-4 {[2, '(A6+0x2c)']|[4, '^(A7)']}
<Const 0x21118 0x0.4> Δ-4 {[2, '(A6+0x2c)']|[4, '^(A7)']|[##0]}
<Const 0x2111a 0x0.4> Δ-4 {[2, '(A6+0x2c)']|[4, '^(A7)']|[##0]|[##0]}
<Call 0x2111c 0x104fc> {[2, '(A6+0x2c)']|[4, '^(A7)']|[##0]|[##0]}
IPC_PutVar(src : Pointer; length : Long ; type : Long)
<POP 21122-21124 StackAdj> Δ+12 {[2, '(A6+0x2c)']}
<MI 21124 MOVE.B (A6+0x26),(A7)> {[-2-]}
<Call 0x21128 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<MI 2112a MOVE.B (A6+0x24),(A7)> {[-2-]}
<Call 0x2112e 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<MI 21130 MOVE.B (A6+0x22),(A7)> {[-2-]}
<Call 0x21134 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<MI 21136 MOVE.B (A6+0x20),(A7)> {[-2-]}
<Call 0x2113a 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 2113c-2113e StackAdj> Δ+2 {}
<Call 0x2113e 0x10514> {}
IPC_PutEnd(void)
<Blob 0x21144 [4] @> Δ-4 {[«4""»]}
<Blob 0x21148 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x2114c [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 21150-21152 StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[-8-]}
<Lit 0x21152 12> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Running FRU_]}
<MI 21160 MOVE.L (A6+0x28),(A7)> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x28)']}
<POP 2115a-21160 StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x28)']|[-8-]}
<Call 0x21164 0x102cc> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x28)']|[-8-]}
StringDup(a : String) : String
<POP 2116a-2116c StackAdj> Δ+4 {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x28)']|[-4-]}
<Call 0x2116c 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x28)']|[-4-]}
StringCat2(a, b : String) : String
<POP 21172-21174 StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Call 0x21174 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2117a-2117e StackAdj> Δ+16 {}
<MI 2117e MOVEA.L (A6+0x8),A0> {}
<MI 21182 MOVE.L (A6+0x28),-(A7)> Δ-4 {[4, '(A6+0x28)']}
<Const 0x21186 0x1.4> Δ-4 {[4, '(A6+0x28)']|[##1]}
<Const 0x2118a 0x1.2> Δ-2 {[4, '(A6+0x28)']|[##1]|[#1]}
<MI 2118c PEA.L (A0)> Δ-4 {[4, '(A6+0x28)']|[##1]|[#1]|[4, '^(A0)']}
<Call 0x2118e 0x103b0> {[4, '(A6+0x28)']|[##1]|[#1]|[4, '^(A0)']}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 21194-21198 StackAdj> Δ+14 {}
<MI 21198 TST.B (A0)> {}
<MI 2119a BNE 0x211f8> {}
<POP 2119c-211f8 Naked> Σ0 ↓
<Call 0x2119c 0x10538> {}
IPC_Init(void)
<MI 211a2 MOVEA.L (A6+0x1c),A0> {}
<MI 211a6 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x211a8 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 211ae-211b0 StackAdj> Δ+4 {}
<MI 211b0 MOVEA.L (A6+0x18),A0> {}
<MI 211b4 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x211b6 0x1052c> {[4, '^(A0)']}
IPC_GetString(VAR retval : String)
<POP 211bc-211be StackAdj> Δ+4 {}
<MI 211be MOVEA.L (A6+0x14),A0> {}
<MI 211c2 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x211c4 0x1052c> {[4, '^(A0)']}
IPC_GetString(VAR retval : String)
<POP 211ca-211cc StackAdj> Δ+4 {}
<MI 211cc MOVEA.L (A6+0x10),A0> {}
<MI 211d0 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Const 0x211d2 0x0.4> Δ-4 {[4, '^(A0)']|[##0]}
<Const 0x211d4 0x0.4> Δ-4 {[4, '^(A0)']|[##0]|[##0]}
<Call 0x211d6 0x10520> {[4, '^(A0)']|[##0]|[##0]}
IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long)
<POP 211dc-211de StackAdj> Δ+12 {}
<MI 211de MOVEA.L (A6+0xc),A0> {}
<MI 211e2 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Const 0x211e4 0x0.4> Δ-4 {[4, '^(A0)']|[##0]}
<Const 0x211e6 0x7.4> Δ-4 {[4, '^(A0)']|[##0]|[##7]}
<Call 0x211ea 0x10520> {[4, '^(A0)']|[##0]|[##7]}
IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long)
<POP 211f0-211f2 StackAdj> Δ+12 {}
<Call 0x211f2 0x1051a> {}
IPC_GetEnd(void)
<POP 211f8-21200 Epilogue> Σ0 ←0x2110c
@ 21200
<LVAR -0x004 @>
<POP 21200-21270 Body>
<POP 21200-21216 Prologue> Σ0 ↓
<POP 21216-21218 RegCacheLoad> Σ0 ↓
<POP 21218-21268 Naked> Σ0 ↓
<Call 0x21218 0x10538> {}
IPC_Init(void)
<Const 0x2121e 0x1.2> Δ-2 {[#1]}
<Call 0x21220 0x10502> {[#1]}
IPC_PutBool(a : Bool)
<POP 21226-21228 StackAdj> Δ+2 {}
<Call 0x21228 0x10514> {}
IPC_PutEnd(void)
<Blob 0x2122e [10] @> Δ-10 {[«10""»]}
<POP 21240-21242 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x21242 9> {[«10""»]|[$$CONFIGURE]}
<Const 0x21254 0x1.4> Δ-4 {[«10""»]|[$$CONFIGURE]|[##1]}
<Const 0x21258 0x1.2> Δ-2 {[«10""»]|[$$CONFIGURE]|[##1]|[#1]}
<Pointer.fp 0x2125a <LVAR -0x004 @>> Δ-4 {[«10""»]|[$$CONFIGURE]|[##1]|[#1]|[@@-4]}
<Call 0x2125e 0x103b0> {[«10""»]|[$$CONFIGURE]|[##1]|[#1]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 21264-21268 StackAdj> Δ+24 {}
<POP 21268-21270 Epilogue> Σ0
@ 21270
<LVAR 0x014 1(w)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 @ 4(r)>
<LVAR -0x006 @ 4(r)>
<LVAR -0x008 @ 1(r)>
<POP 21270-212d2 Body>
<POP 21270-21286 Prologue> Σ0 ↓
<POP 21286-2128a RegCacheLoad> Σ0 ↓
<POP 2128a-212ba Naked> Σ0 ↓ →0x212c4
<MI 2128a MOVE.L (A6+0x10),-(A7)> Δ-4 {[4, '(A6+0x10)']}
<MI 2128e MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 21292 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Pointer.fp 0x21296 <LVAR -0x006 @ 4(r)>> Δ-4 {[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-6]}
<Pointer.fp 0x21298 <LVAR -0x008 @ 1(r)>> Δ-4 {[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-6]|[@@-8]}
<Call 0x2129c 0x260e4> {[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-6]|[@@-8]}
<POP 212a2-212a6 StackAdj> Δ+20 {}
<Pointer.fp 0x212a6 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x212aa 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 212b0-212b2 StackAdj> Δ+4 {}
<MI 212b2 MOVEA.L (A6-0x6),A0> {}
<MI 212b4 CMPA.W #0x1,A0> {}
<MI 212b8 BEQ 0x212c4> {}
<POP 212ba-212c4 Naked> Σ0 ↓
<Pointer.fp 0x212ba <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x212bc 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 212c2-212c4 StackAdj> Δ+4 {}
<POP 212c4-212ca Naked> Σ0 ↓ ←0x2128a
<MI 212c4 MOVE.B (A6-0x8),(A6+0x14)> {}
<POP 212ca-212d2 Epilogue> Σ0
@ 212d2
<LVAR -0x004 @>
<POP 212d2-21348 Body>
<POP 212d2-212e8 Prologue> Σ0 ↓
<POP 212e8-212ea RegCacheLoad> Σ0 ↓
<POP 212ea-21340 Naked> Σ0 ↓
<Call 0x212ea 0x105b6> {}
R1000_Reset_L(void)
<Call 0x212f0 0x10538> {}
IPC_Init(void)
<Const 0x212f6 0x1.2> Δ-2 {[#1]}
<Call 0x212f8 0x10502> {[#1]}
IPC_PutBool(a : Bool)
<POP 212fe-21300 StackAdj> Δ+2 {}
<Call 0x21300 0x10514> {}
IPC_PutEnd(void)
<Blob 0x21306 [10] @> Δ-10 {[«10""»]}
<POP 21318-2131a StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x2131a 9> {[«10""»]|[$$CONFIGURE]}
<Const 0x2132c 0x1.4> Δ-4 {[«10""»]|[$$CONFIGURE]|[##1]}
<Const 0x21330 0x1.2> Δ-2 {[«10""»]|[$$CONFIGURE]|[##1]|[#1]}
<Pointer.fp 0x21332 <LVAR -0x004 @>> Δ-4 {[«10""»]|[$$CONFIGURE]|[##1]|[#1]|[@@-4]}
<Call 0x21336 0x103b0> {[«10""»]|[$$CONFIGURE]|[##1]|[#1]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 2133c-21340 StackAdj> Δ+24 {}
<POP 21340-21348 Epilogue> Σ0
@ 21348
<POP 21348-2150e Body>
<POP 21348-2135e Prologue> Σ0 ↓
<POP 2135e-21370 RegCacheLoad> Σ0 ↓
<POP 21370-2137a Naked> Σ0 ↓ →0x214e0
<MI 21370 TST.B 0x26956> {}
<MI 21376 BNE 0x214e0> {}
<POP 2137a-21464 Naked> Σ0 ↓
<Blob 0x2137a [8] @> Δ-8 {[«8""»]}
<POP 2138a-2138c StackAdj> Δ-4 {[«8""»]|[-4-]}
<Blob 0x2138c [4] 0x26958> Δ-4 {[«8""»]|[-4-]|[«4»]}
<POP 21392-21394 StackAdj> Δ-4 {[«8""»]|[-4-]|[«4»]|[-4-]}
<Lit 0x21394 7> {[«8""»]|[-4-]|[«4»]|[$$ Failed]}
<Call 0x213a0 0x102d0> {[«8""»]|[-4-]|[«4»]|[$$ Failed]}
StringCat2(a, b : String) : String
<POP 213a6-213a8 StackAdj> Δ+8 {[«8""»]|[-4-]}
<Call 0x213a8 0x103e0> {[«8""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 213ae-213b0 StackAdj> Δ+12 {}
<Blob 0x213b0 [36] @> Δ-36 {[«36""»]}
<POP 213bc-213be StackAdj> Δ-8 {[«36""»]|[-8-]}
<Lit 0x213be 36> {[«36""»]|[-4-]|[$$The test that found the failure was_]}
<POP 213ca-213cb StackAdj> Δ-4 {[«36""»]|[-4-]|[$$The test that found the failure was_]|[-4-]}
<Blob 0x213cb [4] 0x2695c> Δ-4 {[«36""»]|[-4-]|[$$The test that found the failure was_]|[-4-]|[«4»]}
<Call 0x213cc 0x102cc> {[«36""»]|[-4-]|[$$The test that found the failure was_]|[-4-]|[«4»]}
StringDup(a : String) : String
<POP 213d2-213d4 StackAdj> Δ+4 {[«36""»]|[-4-]|[$$The test that found the failure was_]|[-4-]}
<Call 0x213d4 0x102d0> {[«36""»]|[-4-]|[$$The test that found the failure was_]|[-4-]}
StringCat2(a, b : String) : String
<POP 213da-213dc StackAdj> Δ+8 {[«36""»]|[-4-]}
<Call 0x213dc 0x103e0> {[«36""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 213e2-213e6 StackAdj> Δ+40 {}
<Call 0x213e6 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x213ec [4] @> Δ-4 {[«4""»]}
<Blob 0x213f0 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 213f4-213f6 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Blob 0x213f6 [4] 0x2695c> Δ-4 {[«4""»]|[«4""»]|[-4-]|[«4»]}
<POP 213f8-213fa StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]|[«4»]|[-4-]}
<Lit 0x213fa 8> {[«4""»]|[«4""»]|[-4-]|[«4»]|[$$.ERRMESS]}
<Call 0x21408 0x102d0> {[«4""»]|[«4""»]|[-4-]|[«4»]|[$$.ERRMESS]}
StringCat2(a, b : String) : String
<POP 2140e-21410 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<MI 21410 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]|[«4""»]}
<POP 21412-21414 StackAdj> Δ+4 {[«4""»]}
<MI 21414 MOVE.L A4,(A7)> {[4, 'A4']}
<Blob 0x21416 [4] 0x26960> Δ-4 {[4, 'A4']|[«4»]}
<MI 2141c CLR.L D0> {[4, 'A4']|[«4»]}
<MI 2141e MOVE.B 0x26964,D0> {[4, 'A4']|[«4»]}
<MI 21424 MOVE.L D0,-(A7)> Δ-4 {[4, 'A4']|[«4»]|[4, 'D0']}
<Call 0x21426 0x1044c> {[4, 'A4']|[«4»]|[4, 'D0']}
WriteErrorMessage(file : String; txt : String; number : Long) : Bool
<POP 2142c-2142e StackAdj> Δ+12 {}
<Const 0x2142e 0x26960.4> Δ-4 {[##158048]}
<Call 0x21434 0x102bc> {[##158048]}
FreeString(VAR a : String)
<POP 2143a-2143c StackAdj> Δ+4 {}
<Blob 0x2143c [26] @> Δ-26 {[«26""»]}
<POP 21448-2144a StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x2144a 26> {[«26""»]|[$$Field replaceable units :_]}
<Call 0x21458 0x103e0> {[«26""»]|[$$Field replaceable units :_]}
WriteConsoleStringCrLf(str : String)
<POP 2145e-21462 StackAdj> Δ+30 {}
<MI 21462 MOVEQ.L #0x00,D7> {}
<POP 21464-21486 Naked> Σ0 ↓ →0x214ac ←0x214ac
<POP 0x21464 LimitCheck 0x0 ≤ D7 ≤ 0x7> {}
<MI 2146a LEA.L 0x2694e,A0> {}
<MI 21470 CLR.L D0> {}
<MI 21472 MOVE.B (A0+D7.L+#0x17),D0> {}
<MI 21476 MOVE.L D0,D5> {}
<MI 21478 MOVE.B D5,-(A7)> Δ-2 {[2, 'D5']}
<MI 2147a MOVE.B (A7)+,D0> Δ+2 {}
<MI 2147c EXTB.W D0> {}
<POP 0x2147e LimitCheck 0x0 ≤ D0 ≤ 0x4f> {}
<MI 21482 MOVE.B D0,D6> {}
<MI 21484 BEQ 0x214ac> {}
<POP 21486-214ac Naked> Σ0 ↓
<Blob 0x21486 [4] @> Δ-4 {[«4""»]}
<Blob 0x2148a [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x2148e [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 21492-21494 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x21494 12> {[«4""»]|[«4""»]|[«4""»]|[$$FRU_LITS.TXT]}
<POP 2149e-214a0 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[$$FRU_LITS.TXT]|[-4-]}
<MI 214a0 MOVE.L D5,(A7)> {[«4""»]|[«4""»]|[«4""»]|[$$FRU_LITS.TXT]|[4, 'D5']}
<Call 0x214a2 0x10450> {[«4""»]|[«4""»]|[«4""»]|[$$FRU_LITS.TXT]|[4, 'D5']}
FS_10450(&, &)
<POP 214a8-214ac StackAdj> Δ+20 {}
<POP 214ac-214b2 Naked> Σ0 ↓ →0x21464 ←0x21464
<MI 214ac ADDQ.L #0x1,D7> {}
<MI 214ae CMP.L #0x07,D7> {}
<MI 214b0 BLE 0x21464> {}
<POP 214b2-214e0 Naked> Σ0 →0x21506
<Blob 0x214b2 [18] @> Δ-18 {[«18""»]}
<POP 214c4-214c6 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x214c6 17> {[«18""»]|[$$Diagnostic Failed]}
<Call 0x214d4 0x22e28> {[«18""»]|[$$Diagnostic Failed]}
<POP 214da-214de StackAdj> Δ+22 {}
<MI 214de BRA 0x21506> {}
<POP 214e0-21506 Naked> Σ0 ↓ ←0x21370
<Const 0x214e0 0x26960.4> Δ-4 {[##158048]}
<Call 0x214e6 0x102bc> {[##158048]}
FreeString(VAR a : String)
<POP 214ec-214ee StackAdj> Δ+4 {}
<Const 0x214ee 0x2695c.4> Δ-4 {[##158044]}
<Call 0x214f0 0x102bc> {[##158044]}
FreeString(VAR a : String)
<POP 214f6-214f8 StackAdj> Δ+4 {}
<Const 0x214f8 0x26958.4> Δ-4 {[##158040]}
<Call 0x214fe 0x102bc> {[##158040]}
FreeString(VAR a : String)
<POP 21504-21506 StackAdj> Δ+4 {}
<POP 21506-2150e Epilogue> Σ0 ←0x214b2
@ 2150e
CMD_INIT_STATE(?)
<LVAR -0x004 @ 1(r)>
<POP 2150e-2159e Body>
<POP 2150e-21524 Prologue> Σ0 ↓
<POP 21524-21526 RegCacheLoad> Σ0 ↓
<POP 21526-2158a Naked> Σ0 ↓ →0x21596
<Call 0x21526 0x212d2> {}
<Call 0x2152a 0x10538> {}
IPC_Init(void)
<MI 21530 MOVE.B 0x2696e,D0> {}
<MI 21536 EXTB.W D0> {}
<POP 0x21538 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 2153a MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x2153c 0x10502> {[2, 'D0']}
IPC_PutBool(a : Bool)
<POP 21542-21544 StackAdj> Δ+2 {}
<Call 0x21544 0x10514> {}
IPC_PutEnd(void)
<Blob 0x2154a [10] @> Δ-10 {[«10""»]}
<POP 2155c-2155e StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x2155e 9> {[«10""»]|[$$INITSTATE]}
<Const 0x21570 0x1.4> Δ-4 {[«10""»]|[$$INITSTATE]|[##1]}
<Const 0x21574 0x1.2> Δ-2 {[«10""»]|[$$INITSTATE]|[##1]|[#1]}
<Pointer.fp 0x21576 <LVAR -0x004 @ 1(r)>> Δ-4 {[«10""»]|[$$INITSTATE]|[##1]|[#1]|[@@-4]}
<Call 0x2157a 0x103b0> {[«10""»]|[$$INITSTATE]|[##1]|[#1]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 21580-21584 StackAdj> Δ+24 {}
<MI 21584 TST.B (A6-0x4)> {}
<MI 21588 BEQ 0x21596> {}
<POP 2158a-21596 Naked> Σ0 ↓
<Const 0x2158a 0x1.4> Δ-4 {[##1]}
<Call 0x2158e 0x22e28> {[##1]}
<POP 21594-21596 StackAdj> Δ+4 {}
<POP 21596-2159e Epilogue> Σ0 ←0x21526
@ 2159e
<LVAR 0x008 1(r)>
<LVAR -0x001 @ 1(r)>
<LVAR -0x002 1(rw)>
<POP 2159e-2162a Body>
<POP 2159e-215b4 Prologue> Σ0 ↓
<POP 215b4-215b6 RegCacheLoad> Σ0 ↓
<POP 215b6-21612 Naked> Σ0 ↓ →0x2161e
<MI 215b6 MOVE.B (A6+0x8),(A6-0x2)> {}
<Const 0x215bc 0x1.4> Δ-4 {[##1]}
<MI 215c0 MOVE.B (A6-0x2),-(A7)> Δ-2 {[##1]|[2, '(A6-0x2)']}
<MI 215c4 MOVE.B 0x2696d,D0> {[##1]|[2, '(A6-0x2)']}
<MI 215ca EXTB.W D0> {[##1]|[2, '(A6-0x2)']}
<POP 0x215cc LimitCheck 0x0 ≤ D0 ≤ 0x1> {[##1]|[2, '(A6-0x2)']}
<MI 215ce MOVE.B D0,-(A7)> Δ-2 {[##1]|[2, '(A6-0x2)']|[2, 'D0']}
<MI 215d0 MOVE.B 0x2696e,D0> {[##1]|[2, '(A6-0x2)']|[2, 'D0']}
<MI 215d6 EXTB.W D0> {[##1]|[2, '(A6-0x2)']|[2, 'D0']}
<POP 0x215d8 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[##1]|[2, '(A6-0x2)']|[2, 'D0']}
<MI 215da MOVE.B D0,-(A7)> Δ-2 {[##1]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']}
<Const 0x215dc 0x26956.4> Δ-4 {[##1]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]}
<Const 0x215e2 0x26958.4> Δ-4 {[##1]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]}
<Const 0x215e8 0x2695c.4> Δ-4 {[##1]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]}
<Const 0x215ee 0x26960.4> Δ-4 {[##1]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]}
<Const 0x215f4 0x26964.4> Δ-4 {[##1]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]|[##158052]}
<Const 0x215fa 0x26965.4> Δ-4 {[##1]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]|[##158052]|[##158053]}
<Pointer.fp 0x21600 <LVAR -0x001 @ 1(r)>> Δ-4 {[##1]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]|[##158052]|[##158053]|[@@-1]}
<Call 0x21604 0x20cc6> {[##1]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]|[##158052]|[##158053]|[@@-1]}
<POP 21608-2160c StackAdj> Δ+38 {}
<MI 2160c TST.B (A6-0x1)> {}
<MI 21610 BEQ 0x2161e> {}
<POP 21612-2161e Naked> Σ0 ↓
<Const 0x21612 0x1.4> Δ-4 {[##1]}
<Call 0x21616 0x22e28> {[##1]}
<POP 2161c-2161e StackAdj> Δ+4 {}
<POP 2161e-21622 Naked> Σ0 ↓ ←0x215b6
<Call 0x2161e 0x21348> {}
<POP 21622-2162a Epilogue> Σ0
@ 2162a
<LVAR 0x008 1(r)>
<LVAR -0x001 @ 1(r)>
<LVAR -0x002 1(rw)>
<POP 2162a-216ba Body>
<POP 2162a-21640 Prologue> Σ0 ↓
<POP 21640-21642 RegCacheLoad> Σ0 ↓
<POP 21642-216a2 Naked> Σ0 ↓ →0x216ae
<Call 0x21642 0x2150e> {}
CMD_INIT_STATE(?)
<MI 21646 MOVE.B (A6+0x8),(A6-0x2)> {}
<Const 0x2164c 0x2.4> Δ-4 {[##2]}
<MI 21650 MOVE.B (A6-0x2),-(A7)> Δ-2 {[##2]|[2, '(A6-0x2)']}
<MI 21654 MOVE.B 0x2696d,D0> {[##2]|[2, '(A6-0x2)']}
<MI 2165a EXTB.W D0> {[##2]|[2, '(A6-0x2)']}
<POP 0x2165c LimitCheck 0x0 ≤ D0 ≤ 0x1> {[##2]|[2, '(A6-0x2)']}
<MI 2165e MOVE.B D0,-(A7)> Δ-2 {[##2]|[2, '(A6-0x2)']|[2, 'D0']}
<MI 21660 MOVE.B 0x2696e,D0> {[##2]|[2, '(A6-0x2)']|[2, 'D0']}
<MI 21666 EXTB.W D0> {[##2]|[2, '(A6-0x2)']|[2, 'D0']}
<POP 0x21668 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[##2]|[2, '(A6-0x2)']|[2, 'D0']}
<MI 2166a MOVE.B D0,-(A7)> Δ-2 {[##2]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']}
<Const 0x2166c 0x26956.4> Δ-4 {[##2]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]}
<Const 0x21672 0x26958.4> Δ-4 {[##2]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]}
<Const 0x21678 0x2695c.4> Δ-4 {[##2]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]}
<Const 0x2167e 0x26960.4> Δ-4 {[##2]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]}
<Const 0x21684 0x26964.4> Δ-4 {[##2]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]|[##158052]}
<Const 0x2168a 0x26965.4> Δ-4 {[##2]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]|[##158052]|[##158053]}
<Pointer.fp 0x21690 <LVAR -0x001 @ 1(r)>> Δ-4 {[##2]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]|[##158052]|[##158053]|[@@-1]}
<Call 0x21694 0x20cc6> {[##2]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]|[##158052]|[##158053]|[@@-1]}
<POP 21698-2169c StackAdj> Δ+38 {}
<MI 2169c TST.B (A6-0x1)> {}
<MI 216a0 BEQ 0x216ae> {}
<POP 216a2-216ae Naked> Σ0 ↓
<Const 0x216a2 0x1.4> Δ-4 {[##1]}
<Call 0x216a6 0x22e28> {[##1]}
<POP 216ac-216ae StackAdj> Δ+4 {}
<POP 216ae-216b2 Naked> Σ0 ↓ ←0x21642
<Call 0x216ae 0x21348> {}
<POP 216b2-216ba Epilogue> Σ0
@ 216ba
<LVAR 0x008 1(r)>
<LVAR -0x001 @ 1(r)>
<LVAR -0x002 1(rw)>
<POP 216ba-21746 Body>
<POP 216ba-216d0 Prologue> Σ0 ↓
<POP 216d0-216d2 RegCacheLoad> Σ0 ↓
<POP 216d2-2172e Naked> Σ0 ↓ →0x2173a
<MI 216d2 MOVE.B (A6+0x8),(A6-0x2)> {}
<Const 0x216d8 0x3.4> Δ-4 {[##3]}
<MI 216dc MOVE.B (A6-0x2),-(A7)> Δ-2 {[##3]|[2, '(A6-0x2)']}
<MI 216e0 MOVE.B 0x2696d,D0> {[##3]|[2, '(A6-0x2)']}
<MI 216e6 EXTB.W D0> {[##3]|[2, '(A6-0x2)']}
<POP 0x216e8 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[##3]|[2, '(A6-0x2)']}
<MI 216ea MOVE.B D0,-(A7)> Δ-2 {[##3]|[2, '(A6-0x2)']|[2, 'D0']}
<MI 216ec MOVE.B 0x2696e,D0> {[##3]|[2, '(A6-0x2)']|[2, 'D0']}
<MI 216f2 EXTB.W D0> {[##3]|[2, '(A6-0x2)']|[2, 'D0']}
<POP 0x216f4 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[##3]|[2, '(A6-0x2)']|[2, 'D0']}
<MI 216f6 MOVE.B D0,-(A7)> Δ-2 {[##3]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']}
<Const 0x216f8 0x26956.4> Δ-4 {[##3]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]}
<Const 0x216fe 0x26958.4> Δ-4 {[##3]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]}
<Const 0x21704 0x2695c.4> Δ-4 {[##3]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]}
<Const 0x2170a 0x26960.4> Δ-4 {[##3]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]}
<Const 0x21710 0x26964.4> Δ-4 {[##3]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]|[##158052]}
<Const 0x21716 0x26965.4> Δ-4 {[##3]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]|[##158052]|[##158053]}
<Pointer.fp 0x2171c <LVAR -0x001 @ 1(r)>> Δ-4 {[##3]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]|[##158052]|[##158053]|[@@-1]}
<Call 0x21720 0x20cc6> {[##3]|[2, '(A6-0x2)']|[2, 'D0']|[2, 'D0']|[##158038]|[##158040]|[##158044]|[##158048]|[##158052]|[##158053]|[@@-1]}
<POP 21724-21728 StackAdj> Δ+38 {}
<MI 21728 TST.B (A6-0x1)> {}
<MI 2172c BEQ 0x2173a> {}
<POP 2172e-2173a Naked> Σ0 ↓
<Const 0x2172e 0x1.4> Δ-4 {[##1]}
<Call 0x21732 0x22e28> {[##1]}
<POP 21738-2173a StackAdj> Δ+4 {}
<POP 2173a-2173e Naked> Σ0 ↓ ←0x216d2
<Call 0x2173a 0x21348> {}
<POP 2173e-21746 Epilogue> Σ0
@ 21746
CMD_TEST(?)
<LVAR 0x008 4(r)>
<LVAR -0x008 4(rw)>
<LVAR -0x00e @ 4(rw)>
<LVAR -0x014 @ 4(rw)>
<POP 21746-2192c Body>
<POP 21746-2175c Prologue> Σ0 ↓
<POP 2175c-21770 RegCacheLoad> Σ0 ↓
<POP 21770-2179c Naked> Σ0 Δ-2 ↓ →0x2179e
<MI 21770 MOVE.L #0x3,(A6-0x8)> {}
<Blob 0x21776 [2] @> Δ-2 {[«2""»]}
<POP 2177a-2177c StackAdj> Δ-2 {[«2""»]|[-2-]}
<MI 2177c MOVE.L (A6+0x8),-(A7)> Δ-4 {[«2""»]|[-2-]|[4, '(A6+0x8)']}
<Const 0x2177e 0x0.4> Δ-4 {[«2""»]|[-2-]|[4, '(A6+0x8)']|[##0]}
<POP 21782-21784 StackAdj> Δ-4 {[«2""»]|[-2-]|[4, '(A6+0x8)']|[##0]|[-4-]}
<Lit 0x21784 2> {[«2""»]|[-2-]|[4, '(A6+0x8)']|[##0]|[$$1 ]}
<Call 0x21790 0x21270> {[«2""»]|[-2-]|[4, '(A6+0x8)']|[##0]|[$$1 ]}
<POP 21794-21798 StackAdj> Δ+12 {[«2""»]|[-2-]}
<MI 21798 TST.B (A7)+> Δ+2 {[«2""»]}
<MI 2179a BEQ 0x2179e> {[«2""»]}
<POP 2179c-2179e Naked> Σ-2 ↓
<MI 2179c MOVE.L #0x01,(A6-0x8)> {[-2-]}
<POP 2179e-217c4 Naked> Σ-2 ↓ →0x217c6 ←0x21770
<POP 2179e-2179f StackAdj> Δ+2 {}
<Blob 0x2179f [2] @> Δ-2 {[«2""»]}
<POP 217a2-217a4 StackAdj> Δ-2 {[«2""»]|[-2-]}
<MI 217a4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«2""»]|[-2-]|[4, '(A6+0x8)']}
<Const 0x217a6 0x0.4> Δ-4 {[«2""»]|[-2-]|[4, '(A6+0x8)']|[##0]}
<POP 217aa-217ac StackAdj> Δ-4 {[«2""»]|[-2-]|[4, '(A6+0x8)']|[##0]|[-4-]}
<Lit 0x217ac 2> {[«2""»]|[-2-]|[4, '(A6+0x8)']|[##0]|[$$2 ]}
<Call 0x217b8 0x21270> {[«2""»]|[-2-]|[4, '(A6+0x8)']|[##0]|[$$2 ]}
<POP 217bc-217c0 StackAdj> Δ+12 {[«2""»]|[-2-]}
<MI 217c0 TST.B (A7)+> Δ+2 {[«2""»]}
<MI 217c2 BEQ 0x217c6> {[«2""»]}
<POP 217c4-217c6 Naked> Σ-2 ↓
<MI 217c4 MOVE.L #0x02,(A6-0x8)> {[-2-]}
<POP 217c6-217f6 Naked> Σ-2 Δ+2 ↓ ←0x2179e
<POP 217c6-217c8 StackAdj> Δ+2 {}
<Blob 0x217c8 [10] @> Δ-10 {[«10""»]}
<MI 217d4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«10""»]|[4, '(A6+0x8)']}
<Const 0x217d6 0x1.4> Δ-4 {[«10""»]|[4, '(A6+0x8)']|[##1]}
<Call 0x217da 0x23272> {[«10""»]|[4, '(A6+0x8)']|[##1]}
<POP 217e0-217e2 StackAdj> Δ+10 {[-8-]}
<MI 217e2 MOVE.L (A6+0x8),(A7)> {[-4-]|[4, '(A6+0x8)']}
<Const 0x217e4 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x217e8 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 217ee-217f0 StackAdj> Δ+8 {[-4-]}
<MI 217f0 MOVE.L (A7)+,(A6-0x14)> Δ+4 {}
<MI 217f4 MOVEQ.L #0x00,D7> {}
<POP 217f6-217fc Naked> Σ0 ↓ →0x21826 ←0x21880
<MI 217f6 MOVE.B D7,D5> {}
<MI 217f8 CMP.B #0x02,D7> {}
<MI 217fa BNE 0x21826> {}
<POP 217fc-21826 Naked> Σ0 →0x21854
<POP 217fc-217fe StackAdj> Δ-4 {[-4-]}
<POP 217fe-217ff StackAdj> Δ+2 {[-2-]}
<Blob 0x217ff [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 21802 MOVE.B 0x2023b,(A7+0x1)> {[-2-]|[«2""»]}
<MI 21808 MOVE.B 0x2023c,(A7+0x2)> {[-2-]|[«2""»]}
<POP 2180e-21810 StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]}
<Lit 0x21810> {[-2-]|[«2""»]|[$$…]}
<Pointer.sp 0x21810 4> Δ-4
<Const 0x21814 0x1.2> Δ-2
<Const 0x21816 0x3.2> Δ-2
<Call 0x2181a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2181c-2181e StackAdj> Δ+8
<MI 2181e MOVE.L (A7)+,(A6-0xe)> Δ+4 {[-2-]|[«2""»]}
<POP 21822-21824 StackAdj> Δ+4 {}
<MI 21824 BRA 0x21854> {}
<POP 21826-21854 Naked> Σ0 ↓ ←0x217f6
<MI 21826 MOVE.B D7,D0> {}
<MI 21828 EXTB.W D0> {}
<MI 2182a MULS.W #0x0a,D0> {}
<MI 2182c LEA.L 0x2095c,A0> {}
<Blob 0x21830 [10] (A0+D0.W)> Δ-10 {[«10»]}
<POP 21840-21842 StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x21842> {[«10»]|[$$…]}
<Pointer.sp 0x21842 4> Δ-4
<Const 0x21846 0x1.2> Δ-2
<Const 0x21848 0xa.2> Δ-2
<Call 0x2184a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2184c-2184e StackAdj> Δ+8
<MI 2184e MOVE.L (A7)+,(A6-0xe)> Δ+4 {[«10»]}
<POP 21852-21854 StackAdj> Δ+10 {}
<POP 21854-2187e Naked> Σ0 ↓ →0x21880 ←0x217fc
<POP 21854-21856 StackAdj> Δ-2 {[-2-]}
<MI 21856 MOVE.L (A6-0x14),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x14)']}
<MI 2185a MOVE.L (A6-0xe),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x14)']|[4, '(A6-0xe)']}
<Call 0x2185e 0x102c8> {[-2-]|[4, '(A6-0x14)']|[4, '(A6-0xe)']}
StringEqual(a, b : String) : Byte
<POP 21864-21866 StackAdj> Δ+8 {[-2-]}
<MI 21866 MOVE.B (A7)+,D0> Δ+2 {}
<MI 21868 EXTB.W D0> {}
<POP 0x2186a LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 2186c MOVE.B D0,D6> {}
<Pointer.fp 0x2186e <LVAR -0x00e @ 4(rw)>> Δ-4 {[@@-14]}
<Call 0x21872 0x102bc> {[@@-14]}
FreeString(VAR a : String)
<POP 21878-2187a StackAdj> Δ+4 {}
<MI 2187a TST.B D6> {}
<MI 2187c BEQ 0x21880> {}
<POP 2187e-21880 Naked> Σ0 →0x2188a
<MI 2187e BRA 0x2188a> {}
<POP 21880-2188a Naked> Σ0 ↓ →0x217f6 ←0x21854
<MI 21880 ADDQ.B #0x1,D7> {}
<MI 21882 CMPI.B #0x0b,D7> {}
<MI 21886 BLE 0x217f6> {}
<POP 2188a-2188e Naked> Σ0 ↓ →0x218c6 ←0x2187e
<MI 2188a TST.B D6> {}
<MI 2188c BNE 0x218c6> {}
<POP 2188e-218c6 Naked> Σ0 →0x21900
<Blob 0x2188e [4] @> Δ-4 {[«4""»]}
<Blob 0x21892 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x21896 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x2189a [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 2189e-218a0 StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]}
<Lit 0x218a0 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Not a valid FRU_]}
<POP 218ac-218ae StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Not a valid FRU_]|[-4-]}
<MI 218ae MOVE.L (A6-0x14),(A7)> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Not a valid FRU_]|[4, '(A6-0x14)']}
<Call 0x218b2 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Not a valid FRU_]|[4, '(A6-0x14)']}
StringCat2(a, b : String) : String
<POP 218b8-218ba StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Call 0x218ba 0x22e28> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<POP 218c0-218c4 StackAdj> Δ+20 {}
<MI 218c4 BRA 0x21900> {}
<POP 218c6-218e8 Naked> Σ0 ↓ →0x218f0 ←0x2188a
<Pointer.fp 0x218c6 <LVAR -0x014 @ 4(rw)>> Δ-4 {[@@-20]}
<Call 0x218ca 0x102bc> {[@@-20]}
FreeString(VAR a : String)
<POP 218d0-218d2 StackAdj> Δ+4 {}
<MI 218d2 MOVE.B D5,D0> {}
<MI 218d4 EXTB.W D0> {}
<POP 0x218d6 LimitCheck 0x0 ≤ D0 ≤ 0xb> {}
<MI 218da MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x218dc 0x2159e> {[2, 'D0']}
<POP 218e0-218e2 StackAdj> Δ+2 {}
<MI 218e2 MOVE.L (A6-0x8),D1> {}
<MI 218e4 CMP.L #0x01,D1> {}
<MI 218e6 BLE 0x218f0> {}
<POP 218e8-218f0 Naked> Σ0 ↓
<MI 218e8 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x218ea 0x2162a> {[2, 'D0']}
<POP 218ee-218f0 StackAdj> Δ+2 {}
<POP 218f0-218f8 Naked> Σ0 ↓ →0x21900 ←0x218c6
<MI 218f0 CMPI.L #0x00000003,D1> {}
<MI 218f6 BNE 0x21900> {}
<POP 218f8-21900 Naked> Σ0 ↓
<MI 218f8 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x218fa 0x216ba> {[2, 'D0']}
<POP 218fe-21900 StackAdj> Δ+2 {}
<POP 21900-21924 Naked> Σ0 ↓ ←0x2188e ←0x218f0
<Blob 0x21900 [2] @> Δ-2 {[«2""»]}
<Blob 0x21904 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x21908 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 2190c-2190e StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x2190e 6> {[«2""»]|[«2""»]|[«2""»]|[$$PASSED]}
<Call 0x2191c 0x103e0> {[«2""»]|[«2""»]|[«2""»]|[$$PASSED]}
WriteConsoleStringCrLf(str : String)
<POP 21922-21924 StackAdj> Δ+10 {}
<POP 21924-2192c Epilogue> Σ0
@ 2192c
<LVAR 0x00c 1(w)>
<LVAR 0x008 4(r)>
<LVAR -0x006 @ 4(rw)>
<POP 2192c-219f0 Body>
<POP 2192c-21942 Prologue> Σ0 ↓
<POP 21942-2194a RegCacheLoad> Σ0 ↓
<POP 2194a-21950 Naked> Σ0 ↓
<MI 2194a MOVE.B #0x01,(A6+0xc)> {}
<MI 2194e MOVEQ.L #0x00,D7> {}
<POP 21950-21956 Naked> Σ0 ↓ →0x21982 ←0x219de
<MI 21950 CMPI.B #0x04,D7> {}
<MI 21954 BNE 0x21982> {}
<POP 21956-21982 Naked> Σ0 →0x219b2
<POP 21956-21958 StackAdj> Δ-4 {[-4-]}
<POP 21958-21959 StackAdj> Δ+2 {[-2-]}
<Blob 0x21959 [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 2195c MOVE.B 0x202f5,(A7+0x1)> {[-2-]|[«2""»]}
<MI 21962 MOVE.B 0x202f6,(A7+0x2)> {[-2-]|[«2""»]}
<POP 21968-2196a StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]}
<Lit 0x2196a> {[-2-]|[«2""»]|[$$…]}
<Pointer.sp 0x2196a 4> Δ-4
<Const 0x2196e 0x1.2> Δ-2
<Const 0x21970 0x3.2> Δ-2
<Call 0x21974 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2197a-2197c StackAdj> Δ+8
<MI 2197c MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-2-]|[«2""»]}
<POP 2197e-21980 StackAdj> Δ+4 {}
<MI 21980 BRA 0x219b2> {}
<POP 21982-219b2 Naked> Σ0 ↓ ←0x21950
<MI 21982 MOVE.B D7,D0> {}
<MI 21984 EXTB.W D0> {}
<MI 21986 MULS.W #0x0a,D0> {}
<MI 21988 LEA.L 0x209d4,A0> {}
<Blob 0x2198c [10] (A0+D0.W)> Δ-10 {[«10»]}
<POP 2199c-2199e StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x2199e> {[«10»]|[$$…]}
<Pointer.sp 0x2199e 4> Δ-4
<Const 0x219a2 0x1.2> Δ-2
<Const 0x219a4 0xa.2> Δ-2
<Call 0x219a6 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 219ac-219ae StackAdj> Δ+8
<MI 219ae MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«10»]}
<POP 219b0-219b2 StackAdj> Δ+10 {}
<POP 219b2-219d8 Naked> Σ0 ↓ →0x219de ←0x21956
<POP 219b2-219b4 StackAdj> Δ-2 {[-2-]}
<MI 219b4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']}
<MI 219b8 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x219ba 0x102c8> {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x6)']}
StringEqual(a, b : String) : Byte
<POP 219c0-219c2 StackAdj> Δ+8 {[-2-]}
<MI 219c2 MOVE.B (A7)+,D0> Δ+2 {}
<MI 219c4 EXTB.W D0> {}
<POP 0x219c6 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 219c8 MOVE.B D0,D6> {}
<Pointer.fp 0x219ca <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x219cc 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 219d2-219d4 StackAdj> Δ+4 {}
<MI 219d4 TST.B D6> {}
<MI 219d6 BEQ 0x219de> {}
<POP 219d8-219de Naked> Σ0 →0x219e8
<MI 219d8 MOVE.B D7,(A6+0xc)> {}
<MI 219dc BRA 0x219e8> {}
<POP 219de-219e8 Naked> Σ0 ↓ →0x21950 ←0x219b2
<MI 219de ADDQ.B #0x1,D7> {}
<MI 219e0 CMPI.B #0x0f,D7> {}
<MI 219e4 BLE 0x21950> {}
<POP 219e8-219f0 Epilogue> Σ0 ←0x219d8
@ 219f0
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(rw)>
<POP 219f0-21ae2 Body> Δ+4
<POP 219f0-21a06 Prologue> Σ0 ↓
<POP 21a06-21a0e RegCacheLoad> Σ0 ↓
<POP 21a0e-21a10 Naked> Σ0 ↓
<MI 21a0e MOVEQ.L #0x00,D7> {}
<POP 21a10-21a18 Naked> Σ0 ↓ →0x21a44 ←0x21ac0
<MI 21a10 CMPI.L #0x00000002,D7> {}
<MI 21a16 BNE 0x21a44> {}
<POP 21a18-21a40 Naked> Σ0 Δ-4 ↓
<POP 21a18-21a1a StackAdj> Δ-4 {[-4-]}
<POP 21a1a-21a1b StackAdj> Δ+2 {[-2-]}
<Blob 0x21a1b [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 21a1e MOVE.B 0x20439,(A7+0x1)> {[-2-]|[«2""»]}
<MI 21a24 MOVE.B 0x2043a,(A7+0x2)> {[-2-]|[«2""»]}
<POP 21a2a-21a2c StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]}
<Lit 0x21a2c> {[-2-]|[«2""»]|[$$…]}
<Pointer.sp 0x21a2c 4> Δ-4
<Const 0x21a30 0x1.2> Δ-2
<Const 0x21a32 0x3.2> Δ-2
<Call 0x21a36 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21a3c-21a3e StackAdj> Δ+8
<MI 21a3e MOVE.L (A7)+,(A6-0x4)> Δ+4 {[-2-]|[«2""»]}
<POP 21a40-21a44 Naked> Σ-4 Δ+4 →0x21a94 ←0x21a4c
<POP 21a40-21a42 StackAdj> Δ+4 {}
<MI 21a42 BRA 0x21a94> {}
<POP 21a44-21a4c Naked> Σ0 ↓ →0x21a56 ←0x21a10
<MI 21a44 CMPI.L #0x00000016,D7> {}
<MI 21a4a BNE 0x21a56> {}
<POP 21a4c-21a56 Naked> Σ0 Δ-4 →0x21a40
<Pointer.fp 0x21a4c <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x21a4e 0x102b8> {[@@-4]}
NewString(VAR a : String)
<MI 21a54 BRA 0x21a40> {[@@-4]}
<POP 21a56-21a94 Naked> Σ0 ↓ ←0x21a44
<POP 0x21a56 LimitCheck 0x0 ≤ D7 ≤ 0x1f> {}
<MI 21a60 MOVE.L D7,D4> {}
<MI 21a62 MOVEQ.L #0x0a,D3> {}
<Call 0x21a64 0x1028c> {}
?muls_d3_d4
<MI 21a6a LEA.L 0x20a74,A0> {}
<Blob 0x21a6e [10] (A0+D4.L)> Δ-10 {[«10»]}
<POP 21a7e-21a80 StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x21a80> {[«10»]|[$$…]}
<Pointer.sp 0x21a80 4> Δ-4
<Const 0x21a84 0x1.2> Δ-2
<Const 0x21a86 0xa.2> Δ-2
<Call 0x21a88 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21a8e-21a90 StackAdj> Δ+8
<MI 21a90 MOVE.L (A7)+,(A6-0x4)> Δ+4 {[«10»]}
<POP 21a92-21a94 StackAdj> Δ+10 {}
<POP 21a94-21ac0 Naked> Σ0 ↓ →0x21aca ←0x21a40
<MI 21a94 MOVEA.L (A6+0x8),A0> {}
<POP 21a98-21a9a StackAdj> Δ-2 {[-2-]}
<MI 21a9a MOVE.L (A6+0x10),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x10)']}
<MI 21a9e MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x10)']|[4, '(A6-0x4)']}
<Call 0x21aa0 0x102c8> {[-2-]|[4, '(A6+0x10)']|[4, '(A6-0x4)']}
StringEqual(a, b : String) : Byte
<POP 21aa6-21aa8 StackAdj> Δ+8 {[-2-]}
<MI 21aa8 MOVE.B (A7)+,D0> Δ+2 {}
<MI 21aaa EXTB.W D0> {}
<POP 0x21aac LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 21aae MOVE.B D0,(A0)> {}
<Pointer.fp 0x21ab0 <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x21ab2 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 21ab8-21aba StackAdj> Δ+4 {}
<MI 21aba ADDQ.L #0x1,D7> {}
<MI 21abc TST.B D0> {}
<MI 21abe BNE 0x21aca> {}
<POP 21ac0-21aca Naked> Σ0 ↓ →0x21a10
<MI 21ac0 CMPI.L #0x00000020,D7> {}
<MI 21ac6 BNE 0x21a10> {}
<POP 21aca-21ada Naked> Σ0 ↓ ←0x21a94
<MI 21aca MOVEA.L (A6+0xc),A0> {}
<POP 0x21ace LimitCheck 0x0 ≤ D7 ≤ 0xff> {}
<MI 21ad8 MOVE.B D7,(A0)> {}
<POP 21ada-21ae2 Epilogue> Σ0
@ 21ae2
CMD_RUN(?)
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 1(r)>
<LVAR -0x008 @ 4(rw)>
<LVAR -0x00e @ 4(rw)>
<LVAR -0x012 @ 4(rw)>
<LVAR -0x016 @ 4(rw)>
<LVAR -0x017 @ 1(rw)>
<LVAR -0x018 @ 1(r)>
<POP 21ae2-21ea4 Body>
<POP 21ae2-21af8 Prologue> Σ0 ↓
<POP 21af8-21b0e RegCacheLoad> Σ0 ↓
<POP 21b0e-21b26 Naked> Σ0 ↓ →0x21de4
<POP 21b0e-21b10 StackAdj> Δ-4 {[-4-]}
<MI 21b10 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x21b12 0x2323c> {[-4-]|[4, '(A6+0x8)']}
<POP 21b18-21b1a StackAdj> Δ+4 {[-4-]}
<MI 21b1a MOVE.L (A7)+,D0> Δ+4 {}
<MI 21b1c CMPI.L #0x00000002,D0> {}
<MI 21b22 BNE 0x21de4> {}
<POP 21b26-21bc4 Naked> Σ0 ↓ →0x21cdc
<POP 21b26-21b28 StackAdj> Δ-4 {[-4-]}
<MI 21b28 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x21b2a 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x21b2e 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 21b34-21b36 StackAdj> Δ+8 {[-4-]}
<MI 21b36 MOVE.L (A7),0x26958> {[-4-]}
<POP 21b38-21b39 StackAdj> Δ+4 ↓ {}
<Blob 0x21b39 [8] @> Δ-8 {[«8""»]}
<POP 21b48-21b4a StackAdj> Δ-4 {[«8""»]|[-4-]}
<Lit 0x21b4a 7> {[«8""»]|[$$P2UCODE]}
<MI 21b56 MOVE.L (A7)+,(A6-0x12)> Δ+4 {[«8""»]}
<MI 21b5a MOVEA.L A7,A0> {[«8""»]}
<MI 21b5c LEA.L 0x20468,A1> {[«8""»]}
<BlockMove 7,A1,A0> {[«8""»]}
<POP 21b68-21b6a StackAdj> Δ-4 {[«8""»]|[-4-]}
<Lit 0x21b6a 7> {[«8""»]|[$$P2UCODE]}
<MI 21b76 MOVE.L (A7)+,(A6-0xe)> Δ+4 {[«8""»]}
<POP 21b7a-21b7c StackAdj> Δ+2 {[-6-]}
<MI 21b7c MOVE.L (A6-0x12),(A7)> {[-2-]|[4, '(A6-0x12)']}
<Blob 0x21b80 [4] 0x26958> Δ-4 {[-2-]|[4, '(A6-0x12)']|[«4»]}
<Call 0x21b82 0x102c8> {[-2-]|[4, '(A6-0x12)']|[«4»]}
StringEqual(a, b : String) : Byte
<POP 21b88-21b8a StackAdj> Δ+2 {[-2-]|[4, '(A6-0x12)']|[-2-]}
<MI 21b8a MOVE.L (A6-0xe),(A7)> {[-2-]|[-2-]|[4, '(A6-0xe)']}
<Blob 0x21b8e [4] 0x26958> Δ-4 {[-2-]|[-2-]|[4, '(A6-0xe)']|[«4»]}
<Call 0x21b90 0x102c8> {[-2-]|[-2-]|[4, '(A6-0xe)']|[«4»]}
StringEqual(a, b : String) : Byte
<POP 21b96-21b98 StackAdj> Δ+8 {[-2-]|[-2-]}
<MI 21b98 MOVE.B (A7+0x2),D0> {[-2-]|[-2-]}
<MI 21b9c OR.B (A7)+,D0> Δ+2 {[-2-]}
<POP 21b9e-21ba0 StackAdj> Δ+2 {}
<MI 21ba0 EXTB.W D0> {}
<POP 0x21ba2 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 21ba4 MOVE.B D0,D7> {}
<Pointer.fp 0x21ba6 <LVAR -0x012 @ 4(rw)>> Δ-4 {[@@-18]}
<Call 0x21baa 0x102bc> {[@@-18]}
FreeString(VAR a : String)
<POP 21bb0-21bb2 StackAdj> Δ+4 {}
<Pointer.fp 0x21bb2 <LVAR -0x00e @ 4(rw)>> Δ-4 {[@@-14]}
<Call 0x21bb6 0x102bc> {[@@-14]}
FreeString(VAR a : String)
<POP 21bbc-21bbe StackAdj> Δ+4 {}
<MI 21bbe TST.B D7> {}
<MI 21bc0 BEQ 0x21cdc> {}
<POP 21bc4-21bf0 Naked> Σ0 ↓ →0x21c28
<POP 21bc4-21bc6 StackAdj> Δ-4 {[-4-]}
<MI 21bc6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x21bc8 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x21bcc 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 21bd2-21bd4 StackAdj> Δ+8 {[-4-]}
<MI 21bd4 MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 21bd8 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<Pointer.fp 0x21bdc <LVAR -0x017 @ 1(rw)>> Δ-4 {[4, '(A6-0x8)']|[@@-23]}
<Pointer.fp 0x21be0 <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6-0x8)']|[@@-23]|[@@-4]}
<Call 0x21be4 0x219f0> {[4, '(A6-0x8)']|[@@-23]|[@@-4]}
<POP 21be8-21bea StackAdj> Δ+12 {}
<MI 21bea TST.B (A6-0x4)> {}
<MI 21bee BNE 0x21c28> {}
<POP 21bf0-21c28 Naked> Σ0 ↓
<Blob 0x21bf0 [16] @> Δ-16 {[«16""»]}
<POP 21c02-21c04 StackAdj> Δ-8 {[«16""»]|[-8-]}
<Lit 0x21c04 15> {[«16""»]|[-4-]|[$$Unknown test :_]}
<POP 21c10-21c12 StackAdj> Δ-4 {[«16""»]|[-4-]|[$$Unknown test :_]|[-4-]}
<MI 21c12 MOVE.L (A6-0x8),(A7)> {[«16""»]|[-4-]|[$$Unknown test :_]|[4, '(A6-0x8)']}
<Call 0x21c16 0x102d0> {[«16""»]|[-4-]|[$$Unknown test :_]|[4, '(A6-0x8)']}
StringCat2(a, b : String) : String
<POP 21c1c-21c1e StackAdj> Δ+8 {[«16""»]|[-4-]}
<Call 0x21c1e 0x22e28> {[«16""»]|[-4-]}
<POP 21c24-21c28 StackAdj> Δ+20 {}
<POP 21c28-21cdc Naked> Σ0 →0x21de2 ←0x21bc4
<Pointer.fp 0x21c28 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x21c2c 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 21c32-21c34 StackAdj> Δ+2 {[-2-]}
<Blob 0x21c34 [4] 0x26972> Δ-4 {[-2-]|[«4»]}
<Blob 0x21c3a [4] 0x26958> Δ-4 {[-2-]|[«4»]|[«4»]}
<Call 0x21c3c 0x102c8> {[-2-]|[«4»]|[«4»]}
StringEqual(a, b : String) : Byte
<POP 21c42-21c44 StackAdj> Δ+8 {[-2-]}
<MI 21c44 MOVE.B (A7)+,D0> Δ+2 {}
<MI 21c46 EXTB.W D0> {}
<POP 0x21c48 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 21c4a MOVE.B D0,0x26970> {}
<MI 21c50 NEG.B D0> {}
<MI 21c52 ADDQ.B #0x1,D0> {}
<MI 21c54 OR.B 0x2696f,D0> {}
<MI 21c5a EXTB.W D0> {}
<POP 0x21c5c LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 21c5e MOVE.B D0,D6> {}
<Const 0x21c60 0x26972.4> Δ-4 {[##158066]}
<Call 0x21c66 0x102bc> {[##158066]}
FreeString(VAR a : String)
<Blob 0x21c6c [4] 0x26958> Δ-4 {[##158066]|[«4»]}
<Call 0x21c6e 0x102cc> {[##158066]|[«4»]}
StringDup(a : String) : String
<POP 21c74-21c76 StackAdj> Δ+4 {[##158066]}
<MI 21c76 MOVE.L (A7)+,0x26972> Δ+4 {}
<MI 21c7c MOVE.B D6,D0> {}
<MI 21c7e EXTB.W D0> {}
<POP 0x21c80 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 21c82 MOVE.B (A6-0x17),-(A7)> Δ-2 {[2, '(A6-0x17)']}
<POP 21c86-21c88 StackAdj> Δ-4 {[2, '(A6-0x17)']|[-4-]}
<Blob 0x21c88 [4] 0x26958> Δ-4 {[2, '(A6-0x17)']|[-4-]|[«4»]}
<Call 0x21c8a 0x102cc> {[2, '(A6-0x17)']|[-4-]|[«4»]}
StringDup(a : String) : String
<POP 21c90-21c92 StackAdj> Δ+4 {[2, '(A6-0x17)']|[-4-]}
<MI 21c92 MOVE.B 0x2696d,D1> {[2, '(A6-0x17)']|[-4-]}
<MI 21c98 EXTB.W D1> {[2, '(A6-0x17)']|[-4-]}
<POP 0x21c9a LimitCheck 0x0 ≤ D1 ≤ 0x1> {[2, '(A6-0x17)']|[-4-]}
<MI 21c9c MOVE.B D1,-(A7)> Δ-2 {[2, '(A6-0x17)']|[-4-]|[2, 'D1']}
<MI 21c9e MOVE.B 0x2696e,D1> {[2, '(A6-0x17)']|[-4-]|[2, 'D1']}
<MI 21ca4 EXTB.W D1> {[2, '(A6-0x17)']|[-4-]|[2, 'D1']}
<POP 0x21ca6 LimitCheck 0x0 ≤ D1 ≤ 0x1> {[2, '(A6-0x17)']|[-4-]|[2, 'D1']}
<MI 21ca8 MOVE.B D1,-(A7)> Δ-2 {[2, '(A6-0x17)']|[-4-]|[2, 'D1']|[2, 'D1']}
<MI 21caa MOVE.B D0,-(A7)> Δ-2 {[2, '(A6-0x17)']|[-4-]|[2, 'D1']|[2, 'D1']|[2, 'D0']}
<MI 21cac MOVE.B D0,-(A7)> Δ-2 {[2, '(A6-0x17)']|[-4-]|[2, 'D1']|[2, 'D1']|[2, 'D0']|[2, 'D0']}
<Const 0x21cae 0x26956.4> Δ-4 {[2, '(A6-0x17)']|[-4-]|[2, 'D1']|[2, 'D1']|[2, 'D0']|[2, 'D0']|[##158038]}
<Const 0x21cb4 0x2695c.4> Δ-4 {[2, '(A6-0x17)']|[-4-]|[2, 'D1']|[2, 'D1']|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]}
<Const 0x21cba 0x26960.4> Δ-4 {[2, '(A6-0x17)']|[-4-]|[2, 'D1']|[2, 'D1']|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]}
<Const 0x21cc0 0x26964.4> Δ-4 {[2, '(A6-0x17)']|[-4-]|[2, 'D1']|[2, 'D1']|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]|[##158052]}
<Const 0x21cc6 0x26965.4> Δ-4 {[2, '(A6-0x17)']|[-4-]|[2, 'D1']|[2, 'D1']|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]|[##158052]|[##158053]}
<Pointer.fp 0x21ccc <LVAR -0x018 @ 1(r)>> Δ-4 {[2, '(A6-0x17)']|[-4-]|[2, 'D1']|[2, 'D1']|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]|[##158052]|[##158053]|[@@-24]}
<Call 0x21cd0 0x210e8> {[2, '(A6-0x17)']|[-4-]|[2, 'D1']|[2, 'D1']|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]|[##158052]|[##158053]|[@@-24]}
<POP 21cd4-21cd8 StackAdj> Δ+38 {}
<MI 21cd8 BRA 0x21de2> {}
<POP 21cdc-21d14 Naked> Σ0 ↓ →0x21d4c ←0x21b26
<POP 21cdc-21cde StackAdj> Δ-4 {[-4-]}
<MI 21cde MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x21ce0 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x21ce4 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 21cea-21cec StackAdj> Δ+8 {[-4-]}
<MI 21cec MOVE.L (A7),(A6-0x16)> {[-4-]}
<POP 21cf0-21cf2 StackAdj> Δ+2 {[-2-]}
<MI 21cf2 MOVE.L (A6-0x16),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x16)']}
<Call 0x21cf6 0x2192c> {[-2-]|[4, '(A6-0x16)']}
<POP 21cfa-21cfc StackAdj> Δ+4 {[-2-]}
<MI 21cfc MOVE.B (A7)+,D0> Δ+2 {}
<MI 21cfe EXTB.W D0> {}
<POP 0x21d00 LimitCheck 0x0 ≤ D0 ≤ 0xf> {}
<MI 21d04 MOVE.B D0,D5> {}
<MI 21d06 MOVE.B D5,D0> {}
<MI 21d08 EXTB.W D0> {}
<MI 21d0a MOVE.W D0,D1> {}
<MI 21d0c SUBQ.W #0x2,D1> {}
<MI 21d0e CMPI.W #0x000d,D1> {}
<MI 21d12 BHI 0x21d4c> {}
<POP 21d14-21d1e Naked> Σ0 →0x21d3a →0x21d3a →0x21d3a →0x21d3a →0x21d3a →0x21d3a →0x21d3a →0x21d4c →0x21d4c →0x21d4c →0x21d3a →0x21d3a →0x21d3a →0x21d3a
<MI 21d14 ADD.W D1,D1> {}
<MI 21d16 SWITCH D1.W> {}
<POP 21d3a-21d4c Naked> Σ0 →0x21d84 ←0x21d14 ←0x21d14 ←0x21d14 ←0x21d14 ←0x21d14 ←0x21d14 ←0x21d14 ←0x21d14 ←0x21d14 ←0x21d14 ←0x21d14
<MI 21d3a EXTW.L D0> {}
<POP 0x21d3c LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 21d46 MOVE.B D0,(A6-0x17)> {}
<MI 21d4a BRA 0x21d84> {}
<POP 21d4c-21d84 Naked> Σ0 ↓ ←0x21cdc ←0x21d14 ←0x21d14 ←0x21d14
<Blob 0x21d4c [36] @> Δ-36 {[«36""»]}
<POP 21d5e-21d60 StackAdj> Δ-8 {[«36""»]|[-8-]}
<Lit 0x21d60 35> {[«36""»]|[-4-]|[$$Illegal board name for RUN command_]}
<POP 21d6c-21d6e StackAdj> Δ-4 {[«36""»]|[-4-]|[$$Illegal board name for RUN command_]|[-4-]}
<MI 21d6e MOVE.L (A6-0x16),(A7)> {[«36""»]|[-4-]|[$$Illegal board name for RUN command_]|[4, '(A6-0x16)']}
<Call 0x21d72 0x102d0> {[«36""»]|[-4-]|[$$Illegal board name for RUN command_]|[4, '(A6-0x16)']}
StringCat2(a, b : String) : String
<POP 21d78-21d7a StackAdj> Δ+8 {[«36""»]|[-4-]}
<Call 0x21d7a 0x22e28> {[«36""»]|[-4-]}
<POP 21d80-21d84 StackAdj> Δ+40 {}
<POP 21d84-21de2 Naked> Σ0 ↓ ←0x21d3a
<Pointer.fp 0x21d84 <LVAR -0x016 @ 4(rw)>> Δ-4 {[@@-22]}
<Call 0x21d88 0x102bc> {[@@-22]}
FreeString(VAR a : String)
<POP 21d8e-21d90 StackAdj> Δ+2 {[-2-]}
<MI 21d90 MOVE.B (A6-0x17),(A7)> {[-2-]}
<POP 21d94-21d96 StackAdj> Δ-4 {[-6-]}
<Blob 0x21d96 [4] 0x26958> Δ-4 {[-6-]|[«4»]}
<Call 0x21d98 0x102cc> {[-6-]|[«4»]}
StringDup(a : String) : String
<POP 21d9e-21da0 StackAdj> Δ+4 {[-6-]}
<MI 21da0 MOVE.B 0x2696d,D0> {[-6-]}
<MI 21da6 EXTB.W D0> {[-6-]}
<POP 0x21da8 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-6-]}
<MI 21daa MOVE.B D0,-(A7)> Δ-2 {[-6-]|[2, 'D0']}
<MI 21dac MOVE.B 0x2696e,D0> {[-6-]|[2, 'D0']}
<MI 21db2 EXTB.W D0> {[-6-]|[2, 'D0']}
<POP 0x21db4 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-6-]|[2, 'D0']}
<MI 21db6 MOVE.B D0,-(A7)> Δ-2 {[-6-]|[2, 'D0']|[2, 'D0']}
<Const 0x21db8 0x26956.4> Δ-4 {[-6-]|[2, 'D0']|[2, 'D0']|[##158038]}
<Const 0x21dbe 0x2695c.4> Δ-4 {[-6-]|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]}
<Const 0x21dc4 0x26960.4> Δ-4 {[-6-]|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]}
<Const 0x21dca 0x26964.4> Δ-4 {[-6-]|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]|[##158052]}
<Const 0x21dd0 0x26965.4> Δ-4 {[-6-]|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]|[##158052]|[##158053]}
<Pointer.fp 0x21dd6 <LVAR -0x018 @ 1(r)>> Δ-4 {[-6-]|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]|[##158052]|[##158053]|[@@-24]}
<Call 0x21dda 0x20fda> {[-6-]|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]|[##158052]|[##158053]|[@@-24]}
<POP 21dde-21de2 StackAdj> Δ+34 {}
<POP 21de2-21de4 Naked> Σ0 →0x21e5c ←0x21c28
<MI 21de2 BRA 0x21e5c> {}
<POP 21de4-21e5c Naked> Σ0 ↓ ←0x21b0e
<Blob 0x21de4 [10] @> Δ-10 {[«10""»]}
<MI 21df0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«10""»]|[4, '(A6+0x8)']}
<Const 0x21df2 0x1.4> Δ-4 {[«10""»]|[4, '(A6+0x8)']|[##1]}
<Call 0x21df6 0x23272> {[«10""»]|[4, '(A6+0x8)']|[##1]}
<POP 21dfc-21e00 StackAdj> Δ+10 {[-8-]}
<MI 21e00 MOVE.L (A6+0x8),(A7)> {[-4-]|[4, '(A6+0x8)']}
<Const 0x21e02 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x21e06 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 21e0c-21e0e StackAdj> Δ+8 {[-4-]}
<MI 21e0e MOVE.L (A7),0x26958> {[-4-]}
<Blob 0x21e10 [4] 0x26958> Δ-4 {[-4-]|[«4»]}
<Call 0x21e12 0x102cc> {[-4-]|[«4»]}
StringDup(a : String) : String
<POP 21e18-21e1a StackAdj> Δ+4 {[-4-]}
<MI 21e1a MOVE.B 0x2696d,D0> {[-4-]}
<MI 21e20 EXTB.W D0> {[-4-]}
<POP 0x21e22 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-4-]}
<MI 21e24 MOVE.B D0,-(A7)> Δ-2 {[-4-]|[2, 'D0']}
<MI 21e26 MOVE.B 0x2696e,D0> {[-4-]|[2, 'D0']}
<MI 21e2c EXTB.W D0> {[-4-]|[2, 'D0']}
<POP 0x21e2e LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-4-]|[2, 'D0']}
<MI 21e30 MOVE.B D0,-(A7)> Δ-2 {[-4-]|[2, 'D0']|[2, 'D0']}
<Const 0x21e32 0x26956.4> Δ-4 {[-4-]|[2, 'D0']|[2, 'D0']|[##158038]}
<Const 0x21e38 0x2695c.4> Δ-4 {[-4-]|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]}
<Const 0x21e3e 0x26960.4> Δ-4 {[-4-]|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]}
<Const 0x21e44 0x26964.4> Δ-4 {[-4-]|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]|[##158052]}
<Const 0x21e4a 0x26965.4> Δ-4 {[-4-]|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]|[##158052]|[##158053]}
<Pointer.fp 0x21e50 <LVAR -0x018 @ 1(r)>> Δ-4 {[-4-]|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]|[##158052]|[##158053]|[@@-24]}
<Call 0x21e54 0x20ede> {[-4-]|[2, 'D0']|[2, 'D0']|[##158038]|[##158044]|[##158048]|[##158052]|[##158053]|[@@-24]}
<POP 21e58-21e5c StackAdj> Δ+32 {}
<POP 21e5c-21e62 Naked> Σ0 ↓ →0x21e6e ←0x21de2
<MI 21e5c TST.B (A6-0x18)> {}
<MI 21e60 BEQ 0x21e6e> {}
<POP 21e62-21e6e Naked> Σ0 ↓
<Const 0x21e62 0x1.4> Δ-4 {[##1]}
<Call 0x21e66 0x22e28> {[##1]}
<POP 21e6c-21e6e StackAdj> Δ+4 {}
<POP 21e6e-21e9c Naked> Σ0 ↓ ←0x21e5c
<Call 0x21e6e 0x21348> {}
<Blob 0x21e72 [12] @> Δ-12 {[«12""»]}
<POP 21e82-21e84 StackAdj> Δ-4 {[«12""»]|[-4-]}
<Lit 0x21e84 11> {[«12""»]|[$$TEST PASSED]}
<Call 0x21e92 0x103e0> {[«12""»]|[$$TEST PASSED]}
WriteConsoleStringCrLf(str : String)
<POP 21e98-21e9c StackAdj> Δ+16 {}
<POP 21e9c-21ea4 Epilogue> Σ0
@ 21ea4
CMD_ERRMESS(?)
<LVAR 0x008 4(r)>
<LVAR -0x00c @ 4(rw)>
<POP 21ea4-21f80 Body> Δ+12
<POP 21ea4-21eba Prologue> Σ0 ↓
<POP 21eba-21ec4 RegCacheLoad> Σ0 ↓
<POP 21ec4-21edc Naked> Σ0 ↓ →0x21ee6
<MI 21ec4 MOVE.L #0x01,(A6-0xc)> {}
<POP 21ec6-21ec8 StackAdj> Δ-4 {[-4-]}
<MI 21ec8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x21eca 0x2323c> {[-4-]|[4, '(A6+0x8)']}
<POP 21ed0-21ed2 StackAdj> Δ+4 {[-4-]}
<MI 21ed2 MOVE.L (A7)+,D0> Δ+4 {}
<MI 21ed4 CMPI.L #0x00000002,D0> {}
<MI 21eda BNE 0x21ee6> {}
<POP 21edc-21ee6 Naked> Σ0 Δ-12 →0x21f18
<POP 21edc-21ede StackAdj> Δ-4 {[-4-]}
<MI 21ede MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x21ee0 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<MI 21ee4 BRA 0x21f18> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 21ee6-21f18 Naked> Σ0 Δ-12 ↓ ←0x21ec4
<Blob 0x21ee6 [10] @> Δ-10 {[«10""»]}
<MI 21ef2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«10""»]|[4, '(A6+0x8)']}
<Const 0x21ef4 0x3.4> Δ-4 {[«10""»]|[4, '(A6+0x8)']|[##3]}
<Call 0x21ef8 0x23272> {[«10""»]|[4, '(A6+0x8)']|[##3]}
<POP 21efe-21f02 StackAdj> Δ+10 {[-8-]}
<MI 21f02 MOVE.L (A6+0x8),(A7)> {[-4-]|[4, '(A6+0x8)']}
<Const 0x21f04 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x21f08 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 21f0e-21f10 StackAdj> Δ+8 {[-4-]}
<MI 21f10 MOVE.L (A7),(A6-0xc)> {[-4-]}
<MI 21f12 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x21f14 0x3.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##3]}
<POP 21f18-21f6e Naked> Σ-12 Δ+12 ↓ →0x21f78 ←0x21edc
<Call 0x21f18 0x23bd4> {[-12-]}
<POP 21f1e-21f20 StackAdj> Δ+8 {[-4-]}
<MI 21f20 MOVE.L (A7)+,D7> Δ+4 {}
<Blob 0x21f22 [4] @> Δ-4 {[«4""»]}
<Blob 0x21f26 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21f2a-21f2c StackAdj> Δ-8 {[«4""»]|[«4""»]|[-8-]}
<MI 21f2c MOVE.L (A6+0x8),-(A7)> Δ-4 {[«4""»]|[«4""»]|[-8-]|[4, '(A6+0x8)']}
<Const 0x21f2e 0x1.4> Δ-4 {[«4""»]|[«4""»]|[-8-]|[4, '(A6+0x8)']|[##1]}
<Call 0x21f32 0x23b66> {[«4""»]|[«4""»]|[-8-]|[4, '(A6+0x8)']|[##1]}
<POP 21f38-21f3a StackAdj> Δ+4 {[«4""»]|[«4""»]|[-8-]|[4, '(A6+0x8)']}
<Lit 0x21f3a 8> {[«4""»]|[«4""»]|[-8-]|[$$.ERRMESS]}
<Call 0x21f4c 0x102d0> {[«4""»]|[«4""»]|[-8-]|[$$.ERRMESS]}
StringCat2(a, b : String) : String
<POP 21f52-21f54 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<MI 21f54 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]|[«4""»]}
<POP 21f56-21f58 StackAdj> Δ+4 {[«4""»]}
<MI 21f58 MOVE.L A4,(A7)> {[4, 'A4']}
<MI 21f5a MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, 'A4']|[4, '(A6-0xc)']}
<MI 21f5c MOVE.L D7,-(A7)> Δ-4 {[4, 'A4']|[4, '(A6-0xc)']|[4, 'D7']}
<Call 0x21f5e 0x1044c> {[4, 'A4']|[4, '(A6-0xc)']|[4, 'D7']}
WriteErrorMessage(file : String; txt : String; number : Long) : Bool
<POP 21f64-21f68 StackAdj> Δ+12 {}
<MI 21f68 MOVEA.L (A6-0xc),A0> {}
<MI 21f6a CMPA.W #0x01,A0> {}
<MI 21f6c BEQ 0x21f78> {}
<POP 21f6e-21f78 Naked> Σ0 ↓
<Pointer.fp 0x21f6e <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x21f70 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<POP 21f76-21f78 StackAdj> Δ+4 {}
<POP 21f78-21f80 Epilogue> Σ0 ←0x21f18
@ 21f80
<LVAR 0x016 1(rw)>
<LVAR 0x008 4(r)>
<LVAR -0x006 @ 4(rw)>
<LVAR -0x00a @ 4(rw)>
<POP 21f80-22096 Body>
<POP 21f80-21f96 Prologue> Σ0 ↓
<POP 21f96-21fa6 RegCacheLoad> Σ0 ↓
<POP 21fa6-22000 Naked> Σ0 ↓ →0x22006
<Blob 0x21fa6 [10] (A6+0x16)> Δ-10 {[«10»]}
<MI 21fb2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«10»]|[4, '(A6+0x8)']}
<Const 0x21fb6 0x1.4> Δ-4 {[«10»]|[4, '(A6+0x8)']|[##1]}
<Call 0x21fba 0x23272> {[«10»]|[4, '(A6+0x8)']|[##1]}
<POP 21fc0-21fc4 StackAdj> Δ+10 {[-8-]}
<MI 21fc4 MOVE.L (A6+0x8),(A7)> {[-4-]|[4, '(A6+0x8)']}
<Const 0x21fc8 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x21fcc 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 21fd2-21fd4 StackAdj> Δ+8 {[-4-]}
<MI 21fd4 MOVE.L (A7)+,(A6-0xa)> Δ+4 {}
<Blob 0x21fd6 [2] @> Δ-2 {[«2""»]}
<POP 21fda-21fdc StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x21fdc 2> {[«2""»]|[$$ON]}
<MI 21fee MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«2""»]}
<MI 21ff0 MOVE.L (A6-0xa),-(A7)> Δ-4 {[«2""»]|[4, '(A6-0xa)']}
<MI 21ff2 MOVE.L (A6-0x6),-(A7)> Δ-4 {[«2""»]|[4, '(A6-0xa)']|[4, '(A6-0x6)']}
<Call 0x21ff4 0x102c8> {[«2""»]|[4, '(A6-0xa)']|[4, '(A6-0x6)']}
StringEqual(a, b : String) : Byte
<POP 21ffa-21ffc StackAdj> Δ+8 {[«2""»]}
<MI 21ffc TST.B (A7)+> Δ+2 {}
<MI 21ffe BEQ 0x22006> {}
<POP 22000-22006 Naked> Σ0 →0x22082
<MI 22000 MOVE.B #0x01,(A6+0x16)> {}
<MI 22004 BRA 0x22082> {}
<POP 22006-22042 Naked> Σ0 ↓ →0x22048 ←0x21fa6
<Pointer.fp 0x22006 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x22008 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 2200a-2200b StackAdj> Δ+2 {[-2-]}
<Blob 0x2200b [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 2200e MOVE.B 0x204ab,(A7+0x1)> {[-2-]|[«2""»]}
<MI 22014 MOVE.B 0x204ac,(A7+0x2)> {[-2-]|[«2""»]}
<POP 2201a-2201c StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]}
<Lit 0x2201c> {[-2-]|[«2""»]|[$$…]}
<Pointer.sp 0x2201c 4> Δ-4
<Const 0x22020 0x1.2> Δ-2
<Const 0x22022 0x3.2> Δ-2
<Call 0x22026 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2202c-2202e StackAdj> Δ+8
<MI 2202e MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-2-]|[«2""»]}
<POP 22030-22032 StackAdj> Δ+2 {[-2-]}
<MI 22032 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-2-]|[4, '(A6-0xa)']}
<MI 22034 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[4, '(A6-0xa)']|[4, '(A6-0x6)']}
<Call 0x22036 0x102c8> {[-2-]|[4, '(A6-0xa)']|[4, '(A6-0x6)']}
StringEqual(a, b : String) : Byte
<POP 2203c-2203e StackAdj> Δ+8 {[-2-]}
<MI 2203e TST.B (A7)+> Δ+2 {}
<MI 22040 BEQ 0x22048> {}
<POP 22042-22048 Naked> Σ0 →0x22082
<MI 22042 CLR.B (A6+0x16)> {}
<MI 22046 BRA 0x22082> {}
<POP 22048-22082 Naked> Σ0 ↓ ←0x22006
<Pointer.fp 0x22048 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x2204a 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 2204c-2204e StackAdj> Δ+4 {}
<Pointer.fp 0x2204e <LVAR -0x00a @ 4(rw)>> Δ-4 {[@@-10]}
<Call 0x22050 0x102bc> {[@@-10]}
FreeString(VAR a : String)
<POP 22052-22053 StackAdj> Δ+4 ↓ {}
<Blob 0x22053 [36] @> Δ-36 {[«36""»]}
<POP 22064-22066 StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x22066 35> {[«36""»]|[$$Arguments for command are ON or OFF]}
<Call 0x22078 0x22e28> {[«36""»]|[$$Arguments for command are ON or OFF]}
<POP 2207e-22082 StackAdj> Δ+40 {}
<POP 22082-2208e Naked> Σ0 ↓ ←0x22000 ←0x22042
<Pointer.fp 0x22082 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x22084 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 22086-22088 StackAdj> Δ+4 {}
<Pointer.fp 0x22088 <LVAR -0x00a @ 4(rw)>> Δ-4 {[@@-10]}
<Call 0x2208a 0x102bc> {[@@-10]}
FreeString(VAR a : String)
<POP 2208c-2208e StackAdj> Δ+4 {}
<POP 2208e-22096 Epilogue> Σ0
@ 22096
CMD_ISOLATE(?)
<LVAR 0x008 4(r)>
<POP 22096-220dc Body>
<POP 22096-220ac Prologue> Σ0 ↓
<POP 220ac-220d4 Naked> Σ0 ↓
<POP 220ac-220ae StackAdj> Δ-2 {[-2-]}
<Blob 0x220ae [10] @> Δ-10 {[-2-]|[«10""»]}
<MI 220ba MOVE.L (A6+0x8),-(A7)> Δ-4 {[-2-]|[«10""»]|[4, '(A6+0x8)']}
<Call 0x220be 0x21f80> {[-2-]|[«10""»]|[4, '(A6+0x8)']}
<POP 220c2-220c6 StackAdj> Δ+14 {[-2-]}
<MI 220c6 MOVE.B (A7)+,D0> Δ+2 {}
<MI 220c8 EXTB.W D0> {}
<POP 0x220ca LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 220ce MOVE.B D0,0x2696d> {}
<POP 220d4-220dc Epilogue> Σ0
@ 220dc
CMD_TRACE(?)
<LVAR 0x008 4(r)>
<POP 220dc-22122 Body>
<POP 220dc-220f2 Prologue> Σ0 ↓
<POP 220f2-2211a Naked> Σ0 ↓
<POP 220f2-220f4 StackAdj> Δ-2 {[-2-]}
<Blob 0x220f4 [10] @> Δ-10 {[-2-]|[«10""»]}
<MI 22100 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-2-]|[«10""»]|[4, '(A6+0x8)']}
<Call 0x22104 0x21f80> {[-2-]|[«10""»]|[4, '(A6+0x8)']}
<POP 22108-2210c StackAdj> Δ+14 {[-2-]}
<MI 2210c MOVE.B (A7)+,D0> Δ+2 {}
<MI 2210e EXTB.W D0> {}
<POP 0x22110 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 22114 MOVE.B D0,0x2696e> {}
<POP 2211a-22122 Epilogue> Σ0
@ 22122
CMD_ULOAD(?)
<LVAR 0x008 4(r)>
<POP 22122-22168 Body>
<POP 22122-22138 Prologue> Σ0 ↓
<POP 22138-22160 Naked> Σ0 ↓
<POP 22138-2213a StackAdj> Δ-2 {[-2-]}
<Blob 0x2213a [10] @> Δ-10 {[-2-]|[«10""»]}
<MI 22146 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-2-]|[«10""»]|[4, '(A6+0x8)']}
<Call 0x2214a 0x21f80> {[-2-]|[«10""»]|[4, '(A6+0x8)']}
<POP 2214e-22152 StackAdj> Δ+14 {[-2-]}
<MI 22152 MOVE.B (A7)+,D0> Δ+2 {}
<MI 22154 EXTB.W D0> {}
<POP 0x22156 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 2215a MOVE.B D0,0x2696f> {}
<POP 22160-22168 Epilogue> Σ0
@ 22168
MATCH_POWER_MARGINS(?)
<LVAR 0x00c 1(w)>
<LVAR 0x008 4(r)>
<LVAR -0x006 @ 4(rw)>
<POP 22168-221f8 Body>
<POP 22168-2217e Prologue> Σ0 ↓
<POP 2217e-22186 RegCacheLoad> Σ0 ↓
<POP 22186-22188 Naked> Σ0 ↓
<MI 22186 MOVEQ.L #0x00,D7> {}
<POP 22188-221de Naked> Σ0 ↓ →0x221e2 ←0x221e6
<MI 22188 MOVE.B D7,D0> {}
<MI 2218a EXTB.W D0> {}
<MI 2218c MOVEQ.L #0x0a,D1> {}
<MI 2218e MULS.W D0,D1> {}
<MI 22190 LEA.L 0x20bb4,A0> {}
<Blob 0x22194 [10] (A0+D1.W)> Δ-10 {[«10»]}
<POP 221a4-221a6 StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x221a6> {[«10»]|[$$…]}
<Pointer.sp 0x221a6 4> Δ-4
<Const 0x221aa 0x1.2> Δ-2
<Const 0x221ac 0xa.2> Δ-2
<Call 0x221ae 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 221b4-221b6 StackAdj> Δ+8
<MI 221b6 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«10»]}
<POP 221b8-221ba StackAdj> Δ+4 {[-6-]}
<MI 221ba MOVE.L (A6+0x8),(A7)> {[-2-]|[4, '(A6+0x8)']}
<MI 221be MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x221c0 0x102c8> {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x6)']}
StringEqual(a, b : String) : Byte
<POP 221c6-221c8 StackAdj> Δ+8 {[-2-]}
<MI 221c8 MOVE.B (A7)+,D1> Δ+2 {}
<MI 221ca EXTB.W D1> {}
<POP 0x221cc LimitCheck 0x0 ≤ D1 ≤ 0x1> {}
<MI 221ce MOVE.B D1,D6> {}
<Pointer.fp 0x221d0 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x221d2 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 221d8-221da StackAdj> Δ+4 {}
<MI 221da TST.B D6> {}
<MI 221dc BNE 0x221e2> {}
<POP 221de-221e2 Naked> Σ0 ↓
<MI 221de ADDQ.W #0x1,D0> {}
<MI 221e0 MOVE.B D0,D7> {}
<POP 221e2-221e6 Naked> Σ0 ↓ →0x221ec ←0x22188
<MI 221e2 TST.B D6> {}
<MI 221e4 BNE 0x221ec> {}
<POP 221e6-221ec Naked> Σ0 ↓ →0x22188
<MI 221e6 CMPI.B #0x03,D7> {}
<MI 221ea BNE 0x22188> {}
<POP 221ec-221f0 Naked> Σ0 ↓ ←0x221e2
<MI 221ec MOVE.B D7,(A6+0xc)> {}
<POP 221f0-221f8 Epilogue> Σ0
@ 221f8
MATCH_CLOCK_MARGINS(?)
<LVAR 0x00c 1(w)>
<LVAR 0x008 4(r)>
<LVAR -0x006 @ 4(rw)>
<POP 221f8-22288 Body>
<POP 221f8-2220e Prologue> Σ0 ↓
<POP 2220e-22216 RegCacheLoad> Σ0 ↓
<POP 22216-22218 Naked> Σ0 ↓
<MI 22216 MOVEQ.L #0x00,D7> {}
<POP 22218-2226e Naked> Σ0 ↓ →0x22272 ←0x22276
<MI 22218 MOVE.B D7,D0> {}
<MI 2221a EXTB.W D0> {}
<MI 2221c MOVEQ.L #0x0a,D1> {}
<MI 2221e MULS.W D0,D1> {}
<MI 22220 LEA.L 0x20bdc,A0> {}
<Blob 0x22224 [10] (A0+D1.W)> Δ-10 {[«10»]}
<POP 22234-22236 StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x22236> {[«10»]|[$$…]}
<Pointer.sp 0x22236 4> Δ-4
<Const 0x2223a 0x1.2> Δ-2
<Const 0x2223c 0xa.2> Δ-2
<Call 0x2223e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22244-22246 StackAdj> Δ+8
<MI 22246 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«10»]}
<POP 22248-2224a StackAdj> Δ+4 {[-6-]}
<MI 2224a MOVE.L (A6+0x8),(A7)> {[-2-]|[4, '(A6+0x8)']}
<MI 2224e MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x22250 0x102c8> {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x6)']}
StringEqual(a, b : String) : Byte
<POP 22256-22258 StackAdj> Δ+8 {[-2-]}
<MI 22258 MOVE.B (A7)+,D1> Δ+2 {}
<MI 2225a EXTB.W D1> {}
<POP 0x2225c LimitCheck 0x0 ≤ D1 ≤ 0x1> {}
<MI 2225e MOVE.B D1,D6> {}
<Pointer.fp 0x22260 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x22262 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 22268-2226a StackAdj> Δ+4 {}
<MI 2226a TST.B D6> {}
<MI 2226c BNE 0x22272> {}
<POP 2226e-22272 Naked> Σ0 ↓
<MI 2226e ADDQ.W #0x1,D0> {}
<MI 22270 MOVE.B D0,D7> {}
<POP 22272-22276 Naked> Σ0 ↓ →0x2227c ←0x22218
<MI 22272 TST.B D6> {}
<MI 22274 BNE 0x2227c> {}
<POP 22276-2227c Naked> Σ0 ↓ →0x22218
<MI 22276 CMPI.B #0x03,D7> {}
<MI 2227a BNE 0x22218> {}
<POP 2227c-22280 Naked> Σ0 ↓ ←0x22272
<MI 2227c MOVE.B D7,(A6+0xc)> {}
<POP 22280-22288 Epilogue> Σ0
@ 22288
CMD_MARGIN(?)
<LVAR 0x008 4(r)>
<LVAR -0x00a @ 4(rw)>
<LVAR -0x00e @ 4(rw)>
<LVAR -0x012 @ 4(rw)>
<POP 22288-22472 Body>
<POP 22288-2229e Prologue> Σ0 ↓
<POP 2229e-222b2 RegCacheLoad> Σ0 ↓
<POP 222b2-2232c Naked> Σ0 ↓ →0x22384
<MI 222b2 MOVEQ.L #0x00,D7> {}
<Blob 0x222b4 [10] @> Δ-10 {[«10""»]}
<MI 222c0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«10""»]|[4, '(A6+0x8)']}
<Const 0x222c4 0x2.4> Δ-4 {[«10""»]|[4, '(A6+0x8)']|[##2]}
<Call 0x222c8 0x23272> {[«10""»]|[4, '(A6+0x8)']|[##2]}
<POP 222ce-222d2 StackAdj> Δ+10 {[-8-]}
<MI 222d2 MOVE.L (A6+0x8),(A7)> {[-4-]|[4, '(A6+0x8)']}
<Const 0x222d6 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x222da 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 222e0-222e2 StackAdj> Δ+8 {[-4-]}
<MI 222e2 MOVE.L (A7),(A6-0x12)> {[-4-]}
<MI 222e6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x222ea 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x222ee 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 222f4-222f6 StackAdj> Δ+8 {[-4-]}
<MI 222f6 MOVE.L (A7),(A6-0xe)> {[-4-]}
<POP 222fa-222fb StackAdj> Δ+4 ↓ {}
<Blob 0x222fb [6] @> Δ-6 {[«6""»]}
<POP 2230a-2230c StackAdj> Δ-4 {[«6""»]|[-4-]}
<Lit 0x2230c 5> {[«6""»]|[$$POWER]}
<MI 22318 MOVE.L (A7)+,(A6-0xa)> Δ+4 {[«6""»]}
<MI 2231a MOVE.L (A6-0x12),(A7)> {[-2-]|[4, '(A6-0x12)']}
<MI 2231e MOVE.L (A6-0xa),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x12)']|[4, '(A6-0xa)']}
<Call 0x22320 0x102c8> {[-2-]|[4, '(A6-0x12)']|[4, '(A6-0xa)']}
StringEqual(a, b : String) : Byte
<POP 22326-22328 StackAdj> Δ+8 {[-2-]}
<MI 22328 TST.B (A7)+> Δ+2 {}
<MI 2232a BEQ 0x22384> {}
<POP 2232c-22344 Naked> Σ0 ↓ →0x22360
<POP 2232c-2232e StackAdj> Δ-2 {[-2-]}
<MI 2232e MOVE.L (A6-0xe),-(A7)> Δ-4 {[-2-]|[4, '(A6-0xe)']}
<Call 0x22332 0x22168> {[-2-]|[4, '(A6-0xe)']}
MATCH_POWER_MARGINS(?)
<POP 22336-22338 StackAdj> Δ+4 {[-2-]}
<MI 22338 MOVE.B (A7)+,D0> Δ+2 {}
<MI 2233a EXTB.W D0> {}
<POP 0x2233c LimitCheck 0x0 ≤ D0 ≤ 0x3> {}
<MI 2233e MOVE.B D0,D6> {}
<MI 22340 CMP.B #0x03,D6> {}
<MI 22342 BEQ 0x22360> {}
<POP 22344-22360 Naked> Σ0 →0x22380
<MI 22344 MOVE.B D6,D0> {}
<MI 22346 EXTB.W D0> {}
<MI 22348 EXTW.L D0> {}
<POP 0x2234a LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 22354 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x22356 0x1022e> {[2, 'D0']}
KC17_Power_Margin
<POP 2235c-2235e StackAdj> Δ+2 {}
<MI 2235e BRA 0x22380> {}
<POP 22360-22380 Naked> Σ0 ↓ ←0x2232c
<Blob 0x22360 [50] @> Δ-50 {[«50""»]}
<POP 2236c-2236e StackAdj> Δ-4 {[«50""»]|[-4-]}
<Lit 0x2236e 50> {[«50""»]|[$$ERROR - POWER can be margined HIGH, NORMAL, or LOW]}
<MI 2237a MOVEA.L (A7)+,A4> Δ+4 {[«50""»]}
<POP 2237c-2237e StackAdj> Δ+50 {}
<MI 2237e MOVEQ.L #0x01,D7> {}
<POP 22380-22384 Naked> Σ0 →0x2243a ←0x22344
<MI 22380 BRA 0x2243a> {}
<POP 22384-223be Naked> Σ0 ↓ →0x22416 ←0x222b2
<Pointer.fp 0x22384 <LVAR -0x00a @ 4(rw)>> Δ-4 {[@@-10]}
<Call 0x22386 0x102bc> {[@@-10]}
FreeString(VAR a : String)
<POP 2238c-2238d StackAdj> Δ+4 ↓ {}
<Blob 0x2238d [6] @> Δ-6 {[«6""»]}
<POP 2239c-2239e StackAdj> Δ-4 {[«6""»]|[-4-]}
<Lit 0x2239e 5> {[«6""»]|[$$CLOCK]}
<MI 223aa MOVE.L (A7)+,(A6-0xa)> Δ+4 {[«6""»]}
<MI 223ac MOVE.L (A6-0x12),(A7)> {[-2-]|[4, '(A6-0x12)']}
<MI 223b0 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x12)']|[4, '(A6-0xa)']}
<Call 0x223b2 0x102c8> {[-2-]|[4, '(A6-0x12)']|[4, '(A6-0xa)']}
StringEqual(a, b : String) : Byte
<POP 223b8-223ba StackAdj> Δ+8 {[-2-]}
<MI 223ba TST.B (A7)+> Δ+2 {}
<MI 223bc BEQ 0x22416> {}
<POP 223be-223d4 Naked> Σ0 ↓ →0x223d8
<POP 223be-223c0 StackAdj> Δ-2 {[-2-]}
<MI 223c0 MOVE.L (A6-0xe),-(A7)> Δ-4 {[-2-]|[4, '(A6-0xe)']}
<Call 0x223c4 0x221f8> {[-2-]|[4, '(A6-0xe)']}
MATCH_CLOCK_MARGINS(?)
<POP 223c8-223ca StackAdj> Δ+4 {[-2-]}
<MI 223ca MOVE.B (A7)+,D0> Δ+2 {}
<MI 223cc EXTB.W D0> {}
<POP 0x223ce LimitCheck 0x0 ≤ D0 ≤ 0x3> {}
<MI 223d0 MOVE.B D0,D6> {}
<MI 223d2 BEQ 0x223d8> {}
<POP 223d4-223d8 Naked> Σ0 ↓ →0x223f4
<MI 223d4 CMP.B #0x01,D6> {}
<MI 223d6 BNE 0x223f4> {}
<POP 223d8-223f4 Naked> Σ0 →0x22414 ←0x223be
<MI 223d8 MOVE.B D6,D0> {}
<MI 223da EXTB.W D0> {}
<MI 223dc EXTW.L D0> {}
<POP 0x223de LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 223e8 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x223ea 0x1022c> {[2, 'D0']}
KC16_Clock_Margin
<POP 223f0-223f2 StackAdj> Δ+2 {}
<MI 223f2 BRA 0x22414> {}
<POP 223f4-22414 Naked> Σ0 ↓ ←0x223d4
<Blob 0x223f4 [44] @> Δ-44 {[«44""»]}
<POP 22400-22402 StackAdj> Δ-4 {[«44""»]|[-4-]}
<Lit 0x22402 44> {[«44""»]|[$$ERROR - CLOCK can be margined FAST or NORMAL]}
<MI 2240e MOVEA.L (A7)+,A4> Δ+4 {[«44""»]}
<POP 22410-22412 StackAdj> Δ+44 {}
<MI 22412 MOVEQ.L #0x01,D7> {}
<POP 22414-22416 Naked> Σ0 →0x2243a ←0x223d8
<MI 22414 BRA 0x2243a> {}
<POP 22416-2243a Naked> Σ0 ↓ ←0x22384
<Blob 0x22416 [42] @> Δ-42 {[«42""»]}
<POP 22422-22424 StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x22424 42> {[«42""»]|[$$ERROR - You can only margin POWER or CLOCK]}
<MI 22432 MOVEA.L (A7)+,A4> Δ+4 {[«42""»]}
<POP 22434-22438 StackAdj> Δ+42 {}
<MI 22438 MOVEQ.L #0x01,D7> {}
<POP 2243a-22460 Naked> Σ0 ↓ →0x2246a ←0x22380 ←0x22414
<Pointer.fp 0x2243a <LVAR -0x012 @ 4(rw)>> Δ-4 {[@@-18]}
<Call 0x2243e 0x102bc> {[@@-18]}
FreeString(VAR a : String)
<POP 22444-22446 StackAdj> Δ+4 {}
<Pointer.fp 0x22446 <LVAR -0x00e @ 4(rw)>> Δ-4 {[@@-14]}
<Call 0x2244a 0x102bc> {[@@-14]}
FreeString(VAR a : String)
<POP 22450-22452 StackAdj> Δ+4 {}
<Pointer.fp 0x22452 <LVAR -0x00a @ 4(rw)>> Δ-4 {[@@-10]}
<Call 0x22454 0x102bc> {[@@-10]}
FreeString(VAR a : String)
<POP 2245a-2245c StackAdj> Δ+4 {}
<MI 2245c TST.B D7> {}
<MI 2245e BEQ 0x2246a> {}
<POP 22460-2246a Naked> Σ0 ↓
<MI 22460 MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']}
<Call 0x22462 0x103e0> {[4, 'A4']}
WriteConsoleStringCrLf(str : String)
<POP 22468-2246a StackAdj> Δ+4 {}
<POP 2246a-22472 Epilogue> Σ0 ←0x2243a
@ 22472
MATCH_CMDS(?)
<LVAR 0x00c 4(w)>
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 4(rw)>
<POP 22472-22518 Body>
<POP 22472-22488 Prologue> Σ0 ↓
<POP 22488-22490 RegCacheLoad> Σ0 ↓
<POP 22490-2249a Naked> Σ0 ↓
<MI 22490 MOVE.L #0xffffffff,(A6+0xc)> {}
<MI 22498 MOVEQ.L #0x01,D7> {}
<POP 2249a-22500 Naked> Σ0 ↓ →0x22506 ←0x22506
<MI 2249a MOVE.L D7,D0> {}
<MI 2249c SUBQ.L #0x1,D0> {}
<POP 0x2249e LimitCheck 0x0 ≤ D0 ≤ 0x8> {}
<MI 224a8 MOVE.L D0,D4> {}
<MI 224aa MOVEQ.L #0x0a,D3> {}
<Call 0x224ac 0x1028c> {}
?muls_d3_d4
<MI 224b2 LEA.L 0x20c04,A0> {}
<Blob 0x224b6 [10] (A0+D4.L)> Δ-10 {[«10»]}
<POP 224c6-224c8 StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x224c8> {[«10»]|[$$…]}
<Pointer.sp 0x224c8 4> Δ-4
<Const 0x224cc 0x1.2> Δ-2
<Const 0x224ce 0xa.2> Δ-2
<Call 0x224d0 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 224d6-224d8 StackAdj> Δ+8
<MI 224d8 MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«10»]}
<POP 224da-224dc StackAdj> Δ+4 {[-6-]}
<MI 224dc MOVE.L (A6+0x8),(A7)> {[-2-]|[4, '(A6+0x8)']}
<MI 224e0 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x8)']}
<Call 0x224e2 0x102c8> {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x8)']}
StringEqual(a, b : String) : Byte
<POP 224e8-224ea StackAdj> Δ+8 {[-2-]}
<MI 224ea MOVE.B (A7)+,D0> Δ+2 {}
<MI 224ec EXTB.W D0> {}
<POP 0x224ee LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 224f0 MOVE.B D0,D6> {}
<Pointer.fp 0x224f2 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x224f4 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 224fa-224fc StackAdj> Δ+4 {}
<MI 224fc TST.B D6> {}
<MI 224fe BEQ 0x22506> {}
<POP 22500-22506 Naked> Σ0 →0x22510
<MI 22500 MOVE.L D7,(A6+0xc)> {}
<MI 22504 BRA 0x22510> {}
<POP 22506-22510 Naked> Σ0 ↓ →0x2249a ←0x2249a
<MI 22506 ADDQ.L #0x1,D7> {}
<MI 22508 CMPI.L #0x00000009,D7> {}
<MI 2250e BLE 0x2249a> {}
<POP 22510-22518 Epilogue> Σ0 ←0x22500
@ 22518
CMD_POWERDOWN(?)
<POP 22518-225dc Body>
<POP 22518-2252e Prologue> Σ0 ↓
<POP 2252e-2253e RegCacheLoad> Σ0 ↓
<POP 2253e-22546 Naked> Σ0 ↓ →0x2256e
<MI 2253e TST.B 0x26957> {}
<MI 22544 BEQ 0x2256e> {}
<POP 22546-2256e Naked> Σ0 →0x225d4
<Blob 0x22546 [44] @> Δ-44 {[«44""»]}
<POP 22556-22558 StackAdj> Δ-4 {[«44""»]|[-4-]}
<Lit 0x22558 43> {[«44""»]|[$$Multi-processors do not have power control!]}
<Call 0x22566 0x103e0> {[«44""»]|[$$Multi-processors do not have power control!]}
WriteConsoleStringCrLf(str : String)
<POP 22568-2256c StackAdj> Δ+48 {}
<MI 2256c BRA 0x225d4> {}
<POP 2256e-225d4 Naked> Σ0 ↓ ←0x2253e
<Blob 0x2256e [70] @> Δ-70 {[«70""»]}
<POP 2257a-2257c StackAdj> Δ-4 {[«70""»]|[-4-]}
<Lit 0x2257c 70> {[«70""»]|[$$This is a Series 200 R1000 Processor. Power to this processor may not]}
<Call 0x2258a 0x103e0> {[«70""»]|[$$This is a Series 200 R1000 Processor. Power to this processor may not]}
WriteConsoleStringCrLf(str : String)
<POP 2258c-2258d StackAdj> Δ+74 ↓ {}
<Blob 0x2258d [72] @> Δ-72 {[«72""»]}
<POP 2259c-2259e StackAdj> Δ-4 {[«72""»]|[-4-]}
<Lit 0x2259e 71> {[«72""»]|[$$be controlled programatically. To turn the processor off or on use the]}
<Call 0x225ac 0x103e0> {[«72""»]|[$$be controlled programatically. To turn the processor off or on use the]}
WriteConsoleStringCrLf(str : String)
<POP 225ae-225af StackAdj> Δ+76 ↓ {}
<Blob 0x225af [40] @> Δ-40 {[«40""»]}
<POP 225c0-225c2 StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x225c2 39> {[«40""»]|[$$key switch on the System Control Panel.]}
<Call 0x225d0 0x103e0> {[«40""»]|[$$key switch on the System Control Panel.]}
WriteConsoleStringCrLf(str : String)
<POP 225d2-225d4 StackAdj> Δ+44 {}
<POP 225d4-225dc Epilogue> Σ0 ←0x22546
@ 225dc
DISPATCH_CMDS(?)
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 225dc-22682 Body> Δ+24
<POP 225dc-225f2 Prologue> Σ0 ↓
<POP 225f2-225f6 RegCacheLoad> Σ0 ↓
<POP 225f6-22616 Naked> Σ0 ↓ →0x22678
<MI 225f6 MOVEA.L (A6+0x8),A0> {}
<MI 225fa MOVE.B #0x01,(A0)> {}
<POP 225fe-22600 StackAdj> Δ-4 {[-4-]}
<MI 22600 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x10)']}
<Call 0x22604 0x22472> {[-4-]|[4, '(A6+0x10)']}
MATCH_CMDS(?)
<POP 22608-2260a StackAdj> Δ+4 {[-4-]}
<MI 2260a MOVE.L (A7)+,D0> Δ+4 {}
<MI 2260c SUBQ.L #0x1,D0> {}
<MI 2260e CMPI.L #0x00000008,D0> {}
<MI 22614 BHI 0x22678> {}
<POP 22616-22620 Naked> Σ0 →0x22632 →0x2263c →0x22644 →0x2264c →0x22652 →0x2265a →0x22662 →0x2266a →0x22672
<MI 22616 ADD.W D0,D0> {}
<MI 22618 SWITCH D0.W> {}
<POP 22632-22638 Naked> Σ0 Δ-4 ↓ ←0x22616
<MI 22632 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x22634 0x21746> {[4, '(A6+0xc)']}
CMD_TEST(?)
<POP 22638-2263c Naked> Σ-4 Δ+4 →0x2267a ←0x2263c ←0x22644 ←0x22652 ←0x2265a ←0x22662 ←0x2266a
<POP 22638-2263a StackAdj> Δ+4 {}
<MI 2263a BRA 0x2267a> {}
<POP 2263c-22644 Naked> Σ0 Δ-4 →0x22638 ←0x22616
<MI 2263c MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x2263e 0x21ae2> {[4, '(A6+0xc)']}
CMD_RUN(?)
<MI 22642 BRA 0x22638> {[4, '(A6+0xc)']}
<POP 22644-2264c Naked> Σ0 Δ-4 →0x22638 ←0x22616
<MI 22644 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x22646 0x21ea4> {[4, '(A6+0xc)']}
CMD_ERRMESS(?)
<MI 2264a BRA 0x22638> {[4, '(A6+0xc)']}
<POP 2264c-22652 Naked> Σ0 →0x2267a ←0x22616
<Call 0x2264c 0x2150e> {}
CMD_INIT_STATE(?)
<MI 22650 BRA 0x2267a> {}
<POP 22652-2265a Naked> Σ0 Δ-4 →0x22638 ←0x22616
<MI 22652 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x22654 0x22096> {[4, '(A6+0xc)']}
CMD_ISOLATE(?)
<MI 22658 BRA 0x22638> {[4, '(A6+0xc)']}
<POP 2265a-22662 Naked> Σ0 Δ-4 →0x22638 ←0x22616
<MI 2265a MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x2265c 0x220dc> {[4, '(A6+0xc)']}
CMD_TRACE(?)
<MI 22660 BRA 0x22638> {[4, '(A6+0xc)']}
<POP 22662-2266a Naked> Σ0 Δ-4 →0x22638 ←0x22616
<MI 22662 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x22664 0x22122> {[4, '(A6+0xc)']}
CMD_ULOAD(?)
<MI 22668 BRA 0x22638> {[4, '(A6+0xc)']}
<POP 2266a-22672 Naked> Σ0 Δ-4 →0x22638 ←0x22616
<MI 2266a MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x2266c 0x22288> {[4, '(A6+0xc)']}
CMD_MARGIN(?)
<MI 22670 BRA 0x22638> {[4, '(A6+0xc)']}
<POP 22672-22678 Naked> Σ0 →0x2267a ←0x22616
<Call 0x22672 0x22518> {}
CMD_POWERDOWN(?)
<MI 22676 BRA 0x2267a> {}
<POP 22678-2267a Naked> Σ0 ↓ ←0x225f6
<MI 22678 CLR.B (A0)> {}
<POP 2267a-22682 Epilogue> Σ0 ←0x22638 ←0x2264c ←0x22672
@ 22682
<LVAR 0x008 4(r)>
<LVAR -0x002 @ 1(r)>
<LVAR -0x008 @ 1(r)>
<POP 22682-22764 Body>
<POP 22682-22698 Prologue> Σ0 ↓
<POP 22698-226a0 RegCacheLoad> Σ0 ↓
<POP 226a0-226f6 Naked> Σ0 ↓ →0x226fc
<Call 0x226a0 0x10398> {}
FSCALL_10398
<MI 226a6 MOVE.B #0x01,0x2696d> {}
<MI 226ac MOVE.B #0x01,0x2696e> {}
<MI 226b2 MOVE.B #0x01,0x2696f> {}
<MI 226b8 CLR.B 0x26970> {}
<Const 0x226be 0x26972.4> Δ-4 {[##158066]}
<Call 0x226c4 0x102b8> {[##158066]}
NewString(VAR a : String)
<POP 226ca-226cc StackAdj> Δ+4 {}
<MI 226cc MOVEA.L (A6+0x8),A0> {}
<MI 226d0 LEA.L 0x20952,A1> {}
<BlockMove 10,A1,A0> {}
<Call 0x226dc 0x21200> {}
<Pointer.fp 0x226e0 <LVAR -0x008 @ 1(r)>> Δ-4 {[@@-8]}
<Pointer.fp 0x226e4 <LVAR -0x002 @ 1(r)>> Δ-4 {[@@-8]|[@@-2]}
<Call 0x226e8 0x1057a> {[@@-8]|[@@-2]}
Read_HARDWARE.M200_CONFIG(a : Pointer; VAR status : Bool)
<POP 226ee-226f0 StackAdj> Δ+8 {}
<MI 226f0 TST.B (A6-0x2)> {}
<MI 226f4 BEQ 0x226fc> {}
<POP 226f6-226fc Naked> Σ0 →0x226fe
<MI 226f6 MOVE.B (A6-0x8),0x26957> {}
<MI 226fa BRA 0x226fe> {}
<POP 226fc-226fe Naked> Σ0 ↓ ←0x226a0
<MI 226fc CLR.B 0x26957> {}
<POP 226fe-22702 Naked> Σ0 ↓ →0x2275c ←0x226f6
<MI 226fe TST.B 0x26957> {}
<MI 22700 BEQ 0x2275c> {}
<POP 22702-2275c Naked> Σ0 ↓
<Blob 0x22702 [36] @> Δ-36 {[«36""»]}
<POP 22714-22716 StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x22716 35> {[«36""»]|[$$Warning: This is a multi-processor!]}
<Call 0x22728 0x103e0> {[«36""»]|[$$Warning: This is a multi-processor!]}
WriteConsoleStringCrLf(str : String)
<POP 2272e-22732 StackAdj> Δ+40 {}
<Blob 0x22732 [44] @> Δ-44 {[«44""»]}
<POP 2273e-22740 StackAdj> Δ-4 {[«44""»]|[-4-]}
<Lit 0x22740 44> {[«44""»]|[$$Running certain FRU's may crash other nodes!]}
<Call 0x22752 0x103e0> {[«44""»]|[$$Running certain FRU's may crash other nodes!]}
WriteConsoleStringCrLf(str : String)
<POP 22758-2275c StackAdj> Δ+48 {}
<POP 2275c-22764 Epilogue> Σ0 ←0x226fe
@ 22de6
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(w)>
<POP 22de6-22e28 Body>
<POP 22de6-22dfc Prologue> Σ0 ↓
<POP 22dfc-22e00 Naked> Σ0 ↓
<MI 22dfc MOVEA.L (A6+0x8),A4> {}
<POP 22e00-22e06 Naked> Σ0 ↓ →0x22e20 ←0x22e06
<MI 22e00 CMPA.W #0x1,A4> {}
<MI 22e04 BEQ 0x22e20> {}
<POP 22e06-22e20 Naked> Σ0 →0x22e00
<MI 22e06 MOVE.L A4,(A6-0x4)> {}
<MI 22e0a MOVEA.L (A4+0x8),A4> {}
<Pointer.fp 0x22e0e <LVAR -0x004 @ 4(w)>> Δ-4 {[@@-4]}
<Const 0x22e12 0xc.4> Δ-4 {[@@-4]|[##12]}
<Call 0x22e16 0x102a8> {[@@-4]|[##12]}
Free2(a : Pointer; b : Long)
<POP 22e1c-22e1e StackAdj> Δ+8 {}
<MI 22e1e BRA 0x22e00> {}
<POP 22e20-22e28 Epilogue> Σ0 ←0x22e00
@ 22e28
<LVAR 0x008 4(r)>
<POP 22e28-22e68 Body>
<POP 22e28-22e3e Prologue> Σ0 ↓
<POP 22e3e-22e48 Naked> Σ0 ↓ →0x22e52
<MI 22e3e MOVEA.L (A6+0x8),A0> {}
<MI 22e42 CMPA.W #0x1,A0> {}
<MI 22e46 BEQ 0x22e52> {}
<POP 22e48-22e52 Naked> Σ0 ↓
<MI 22e48 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Call 0x22e4a 0x103e0> {[4, 'A0']}
WriteConsoleStringCrLf(str : String)
<POP 22e50-22e52 StackAdj> Δ+4 {}
<POP 22e52-22e60 Naked> Σ0 ←0x22e3e
<POP 22e52-22e60 Bailout> {}
<MI 22e52 MOVEA.L (A5+0x8),A7>
<MI 22e56 MOVEA.W #0x0,A6>
<MI 22e5a JMP 0x267a4>
<POP 22e60-22e68 Epilogue> Σ0
@ 22e68
<LVAR 0x008 4(w)>
<POP 22e68-22e86 Body>
<POP 22e68-22e7a Prologue> Σ0 ↓
<POP 22e7a-22e82 Naked> Σ0 ↓
<MI 22e7a MOVE.L 0x2797e,(A6+0x8)> {}
<POP 22e82-22e86 Epilogue> Σ0
@ 22e86
<LVAR 0x008 1(rw)>
<POP 22e86-22ec4 Body>
<POP 22e86-22e9c Prologue> Σ0 ↓
<POP 22e9c-22eaa Naked> Σ0 ↓ →0x22eb0
<MI 22e9c MOVE.L 0x2797e,D0> {}
<MI 22ea2 CMP.L 0x27982,D0> {}
<MI 22ea8 BLE 0x22eb0> {}
<POP 22eaa-22eb0 Naked> Σ0 →0x22ebc
<MI 22eaa CLR.B (A6+0x8)> {}
<MI 22eae BRA 0x22ebc> {}
<POP 22eb0-22ebc Naked> Σ0 ↓ ←0x22e9c
<MI 22eb0 LEA.L 0x26976,A0> {}
<MI 22eb6 MOVE.B (A0+D0.L+#0x7),(A6+0x8)> {}
<POP 22ebc-22ec4 Epilogue> Σ0 ←0x22eaa
@ 22ec4
<LVAR 0x008 1(rw)>
<POP 22ec4-22f08 Body>
<POP 22ec4-22eda Prologue> Σ0 ↓
<POP 22eda-22ee0 RegCacheLoad> Σ0 ↓
<POP 22ee0-22eea Naked> Σ0 ↓ →0x22ef0
<MI 22ee0 MOVE.L 0x2797e,D0> {}
<MI 22ee2 CMP.L 0x27982,D0> {}
<MI 22ee8 BLE 0x22ef0> {}
<POP 22eea-22ef0 Naked> Σ0 →0x22efc
<MI 22eea CLR.B (A6+0x8)> {}
<MI 22eee BRA 0x22efc> {}
<POP 22ef0-22efc Naked> Σ0 ↓ ←0x22ee0
<MI 22ef0 LEA.L 0x26976,A0> {}
<MI 22ef6 MOVE.B (A0+D0.L+#0x7),(A6+0x8)> {}
<POP 22efc-22f00 Naked> Σ0 ↓ ←0x22eea
<MI 22efc ADDQ.L #0x1,D0> {}
<MI 22efe MOVE.L D0,0x2797e> {}
<POP 22f00-22f08 Epilogue> Σ0
@ 22f08
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22f08-22fe6 Body>
<POP 22f08-22f1e Prologue> Σ0 ↓
<POP 22f1e-22f30 RegCacheLoad> Σ0 ↓
<POP 22f30-22f3c Naked> Σ0 ↓ →0x22f48 ←0x22fd8
<POP 22f30-22f32 StackAdj> Δ-2 {[-2-]}
<Call 0x22f32 0x22e86> {[-2-]}
<MI 22f36 MOVE.B (A7)+,D0> Δ+2 {}
<MI 22f38 CMP.B #0x5b,D0> {}
<MI 22f3a BNE 0x22f48> {}
<POP 22f3c-22f48 Naked> Σ0 →0x22fd8
<Call 0x22f3c 0x2626c> {}
<MI 22f42 BRA 0x22fd8> {}
<POP 22f48-22f54 Naked> Σ0 ↓ →0x22f6c ←0x22f30
<MI 22f48 MOVE.L 0x2797e,D6> {}
<POP 22f4a-22f4c StackAdj> Δ-2 {[-2-]}
<Call 0x22f4c 0x22ec4> {[-2-]}
<MI 22f50 MOVE.B (A7)+,D5> Δ+2 {}
<MI 22f52 BNE 0x22f6c> {}
<POP 22f54-22f6a Naked> Σ0 →0x22fde
<MI 22f54 MOVEA.L (A6+0xc),A0> {}
<MI 22f58 LEA.L 0x22d40,A1> {}
<BlockMove 8,A1,A0> {}
<MI 22f64 MOVEA.L (A6+0x8),A0> {}
<MI 22f66 MOVE.B #0x02,(A0)> {}
<MI 22f68 BRA 0x22fde> {}
<POP 22f6c-22f70 Naked> Σ0 ↓ →0x22f78 ←0x22f48
<MI 22f6c CMP.B #0x2c,D5> {}
<MI 22f6e BNE 0x22f78> {}
<POP 22f70-22f78 Naked> Σ0 →0x22fc8
<MI 22f70 MOVEA.L (A6+0x8),A0> {}
<MI 22f72 MOVE.B #0x03,(A0)> {}
<MI 22f76 BRA 0x22fc8> {}
<POP 22f78-22f7c Naked> Σ0 ↓ →0x22f84 ←0x22f6c
<MI 22f78 CMP.B #0x3b,D5> {}
<MI 22f7a BNE 0x22f84> {}
<POP 22f7c-22f84 Naked> Σ0 →0x22fc8
<MI 22f7c MOVEA.L (A6+0x8),A0> {}
<MI 22f7e MOVE.B #0x01,(A0)> {}
<MI 22f82 BRA 0x22fc8> {}
<POP 22f84-22f8a Naked> Σ0 ↓ →0x22f90 ←0x22f78
<MI 22f84 CMPI.B #0x5d,D5> {}
<MI 22f88 BNE 0x22f90> {}
<POP 22f8a-22f90 Naked> Σ0 →0x22fc8
<MI 22f8a MOVEA.L (A6+0x8),A0> {}
<MI 22f8c MOVE.B #0x02,(A0)> {}
<MI 22f8e BRA 0x22fc8> {}
<POP 22f90-22f94 Naked> Σ0 ↓ ←0x22f84
<MI 22f90 MOVEA.L (A6+0x8),A0> {}
<MI 22f92 CLR.B (A0)> {}
<POP 22f94-22fa0 Naked> Σ0 ↓ →0x22fa8 ←0x22fc6
<POP 22f94-22f96 StackAdj> Δ-2 {[-2-]}
<Call 0x22f96 0x22e86> {[-2-]}
<MI 22f9a MOVE.B (A7)+,D7> Δ+2 {}
<MI 22f9c CMP.B #0x5b,D7> {}
<MI 22f9e BNE 0x22fa8> {}
<POP 22fa0-22fa8 Naked> Σ0 →0x22fc6
<Call 0x22fa0 0x2626c> {}
<MI 22fa6 BRA 0x22fc6> {}
<POP 22fa8-22fac Naked> Σ0 ↓ →0x22fba ←0x22f94
<MI 22fa8 CMP.B #0x3b,D7> {}
<MI 22faa BEQ 0x22fba> {}
<POP 22fac-22fb0 Naked> Σ0 ↓ →0x22fba
<MI 22fac CMP.B #0x2c,D7> {}
<MI 22fae BEQ 0x22fba> {}
<POP 22fb0-22fb6 Naked> Σ0 ↓ →0x22fba
<MI 22fb0 CMPI.B #0x5d,D7> {}
<MI 22fb4 BEQ 0x22fba> {}
<POP 22fb6-22fba Naked> Σ0 ↓ →0x22fbe
<MI 22fb6 TST.B D7> {}
<MI 22fb8 BNE 0x22fbe> {}
<POP 22fba-22fbc Naked> Σ0 →0x22fc8 ←0x22fa8 ←0x22fac ←0x22fb0
<MI 22fba BRA 0x22fc8> {}
<POP 22fbe-22fc6 Naked> Σ0 ↓ ←0x22fb6
<POP 22fbe-22fc0 StackAdj> Δ-2 {[-2-]}
<Call 0x22fc0 0x22ec4> {[-2-]}
<MI 22fc4 MOVE.B (A7)+,D7> Δ+2 {}
<POP 22fc6-22fc8 Naked> Σ0 →0x22f94 ←0x22fa0
<MI 22fc6 BRA 0x22f94> {}
<POP 22fc8-22fd8 Naked> Σ0 →0x22fde ←0x22f70 ←0x22f7c ←0x22f8a ←0x22fba
<MI 22fc8 MOVEA.L (A6+0xc),A0> {}
<MI 22fcc MOVE.L D6,(A0)> {}
<MI 22fce MOVE.L 0x2797e,(A0+0x4)> {}
<MI 22fd2 SUBQ.L #0x1,(A0+0x4)> {}
<MI 22fd6 BRA 0x22fde> {}
<POP 22fd8-22fde Naked> Σ0 →0x22f30 ←0x22f3c
<MI 22fd8 BRA 0x22f30> {}
<POP 22fde-22fe6 Epilogue> Σ0 ←0x22f54 ←0x22fc8
@ 22fe6
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 1(rw)>
<LVAR -0x008 4(w)>
<LVAR -0x00c @ 4(w)>
<POP 22fe6-23084 Body>
<POP 22fe6-22ffc Prologue> Σ0 ↓
<POP 22ffc-23006 RegCacheLoad> Σ0 ↓
<POP 23006-23012 Naked> Σ0 ↓ →0x23018
<MI 23006 MOVEA.L (A6+0x8),A0> {}
<MI 2300a MOVE.B (A0),D0> {}
<MI 2300c CMPI.B #0x01,D0> {}
<MI 23010 BEQ 0x23018> {}
<POP 23012-23018 Naked> Σ0 ↓ →0x23026
<MI 23012 CMPI.B #0x02,D0> {}
<MI 23016 BNE 0x23026> {}
<POP 23018-23026 Naked> Σ0 →0x23062 ←0x23006
<MI 23018 MOVE.L 0x22d40,(A6-0xc)> {}
<MI 2301c MOVE.L 0x22d44,(A6-0x8)> {}
<MI 23022 MOVE.B D0,(A6-0x4)> {}
<MI 23024 BRA 0x23062> {}
<POP 23026-23038 Naked> Σ0 ↓ →0x23054 ←0x23012 ←0x2305c
<Pointer.fp 0x23026 <LVAR -0x00c @ 4(w)>> Δ-4 {[@@-12]}
<Pointer.fp 0x23028 <LVAR -0x004 @ 1(rw)>> Δ-4 {[@@-12]|[@@-4]}
<Call 0x2302a 0x22f08> {[@@-12]|[@@-4]}
<POP 2302e-23030 StackAdj> Δ+8 {}
<MI 23030 MOVEA.L (A6+0x8),A0> {}
<MI 23034 TST.B (A6-0x4)> {}
<MI 23036 BEQ 0x23054> {}
<POP 23038-2303e Naked> Σ0 ↓ →0x23054
<MI 23038 MOVE.B (A0),D0> {}
<MI 2303a CMP.B #0x03,D0> {}
<MI 2303c BNE 0x23054> {}
<POP 2303e-23054 Naked> Σ0 →0x2305c
<MI 2303e MOVE.B (A6-0x4),D0> {}
<MI 23040 EXTB.W D0> {}
<POP 0x23042 LimitCheck 0x0 ≤ D0 ≤ 0x3> {}
<MI 23044 MOVE.B D0,(A0)> {}
<MI 23046 MOVE.L 0x22d40,(A6-0xc)> {}
<MI 2304a MOVE.L 0x22d44,(A6-0x8)> {}
<MI 23050 CLR.B (A6-0x4)> {}
<MI 23052 BRA 0x2305c> {}
<POP 23054-2305c Naked> Σ0 ↓ ←0x23026 ←0x23038
<MI 23054 MOVE.B (A6-0x4),D0> {}
<MI 23056 EXTB.W D0> {}
<POP 0x23058 LimitCheck 0x0 ≤ D0 ≤ 0x3> {}
<MI 2305a MOVE.B D0,(A0)> {}
<POP 2305c-23062 Naked> Σ0 ↓ →0x23026 ←0x2303e
<MI 2305c MOVE.B (A6-0x4),D0> {}
<MI 2305e CMP.B #0x03,D0> {}
<MI 23060 BEQ 0x23026> {}
<POP 23062-2307c Naked> Σ0 ↓ ←0x23018
<MI 23062 MOVEA.L (A6+0x10),A0> {}
<MI 23066 LEA.L (A6-0xc),A1> {}
<BlockMove 8,A1,A0> {}
<MI 23070 MOVEA.L (A6+0xc),A0> {}
<MI 23074 MOVE.B (A6-0x4),D0> {}
<MI 23076 EXTB.W D0> {}
<POP 0x23078 LimitCheck 0x0 ≤ D0 ≤ 0x3> {}
<MI 2307a MOVE.B D0,(A0)> {}
<POP 2307c-23084 Epilogue> Σ0
@ 23084
<LVAR 0x008 4(rw)>
<LVAR -0x004 1(rw)>
<LVAR -0x010 2(rw)>
<POP 23084-23190 Body>
<POP 23084-2309a Prologue> Σ0 ↓
<POP 2309a-230a8 RegCacheLoad> Σ0 ↓
<POP 230a8-230c0 Naked> Σ0 Δ-4 ↓
<MI 230a8 MOVEQ.L #0x01,D6> {}
<MI 230aa CLR.W (A6-0x10)> {}
<MI 230ac MOVEQ.L #0x01,D5> {}
<POP 230ae-230b0 StackAdj> Δ-4 {[-4-]}
<MI 230b0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x230b2 0x102f0> {[-4-]|[4, '(A6+0x8)']}
ToUpper(a : String) : String
<POP 230b8-230ba StackAdj> Δ+4 {[-4-]}
<MI 230ba MOVE.L (A7)+,(A6+0x8)> Δ+4 {}
<MI 230bc MOVEA.L (A6+0x8),A0> {}
<MI 230be MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<POP 230c0-230ce Naked> Σ-4 ↓ →0x2317e ←0x23162
<MI 230c0 MOVEA.L (A7),A0> {[-4-]}
<MI 230c2 MOVE.W (A0),D0> {[-4-]}
<MI 230c4 EXTW.L D0> {[-4-]}
<MI 230c6 CMP.L D0,D6> {[-4-]}
<MI 230c8 BGT 0x2317e> {[-4-]}
<POP 230ce-230e0 Naked> Σ-4 ↓ →0x230e2
<MI 230ce CLR.L D0> {[-4-]}
<MI 230d0 MOVE.B (A0+D6.L+#0x1),D0> {[-4-]}
<MI 230d4 ANDI.W #0x007f,D0> {[-4-]}
<MI 230d8 MOVE.B D0,(A6-0x4)> {[-4-]}
<MI 230da CMPI.B #0x09,D0> {[-4-]}
<MI 230de BNE 0x230e2> {[-4-]}
<POP 230e0-230e2 Naked> Σ-4 ↓
<MI 230e0 MOVE.B #0x20,(A6-0x4)> {[-4-]}
<POP 230e2-230ee Naked> Σ-4 ↓ →0x2311e ←0x230ce
<MI 230e2 CLR.L D0> {[-4-]}
<MI 230e4 MOVE.B (A6-0x4),D0> {[-4-]}
<MI 230e6 SUB.W #0x20,D0> {[-4-]}
<MI 230e8 CMPI.W #0x000c,D0> {[-4-]}
<MI 230ec BHI 0x2311e> {[-4-]}
<POP 230ee-230f8 Naked> Σ-4 →0x23116 →0x23112 →0x2311e →0x2311e →0x2311e →0x2311e →0x2311e →0x2311e →0x2311e →0x2311e →0x2311e →0x2311e →0x2311a
<MI 230ee ADD.W D0,D0> {[-4-]}
<MI 230f0 SWITCH D0.W> {[-4-]}
<POP 23112-23114 Naked> Σ-4 →0x2317e ←0x230ee
<MI 23112 BRA 0x2317e> {[-4-]}
<POP 23116-2311a Naked> Σ-4 →0x23120 ←0x230ee
<MI 23116 MOVEQ.L #0x00,D7> {[-4-]}
<MI 23118 BRA 0x23120> {[-4-]}
<POP 2311a-2311e Naked> Σ-4 →0x23120 ←0x230ee
<MI 2311a MOVEQ.L #0x01,D7> {[-4-]}
<MI 2311c BRA 0x23120> {[-4-]}
<POP 2311e-23120 Naked> Σ-4 ↓ ←0x230e2 ←0x230ee ←0x230ee ←0x230ee ←0x230ee ←0x230ee ←0x230ee ←0x230ee ←0x230ee ←0x230ee ←0x230ee
<MI 2311e MOVEQ.L #0x02,D7> {[-4-]}
<POP 23120-23144 Naked> Σ-4 →0x2314a →0x2314c →0x23156 ←0x23116 ←0x2311a
<MI 23120 MOVEQ.L #0x03,D0> {[-4-]}
<MI 23122 MULS.W (A6-0x10),D0> {[-4-]}
<MI 23124 LEA.L 0x22d48,A0> {[-4-]}
<MI 23128 LEA.L (A0+D0.W),A0> {[-4-]}
<MI 2312c CLR.L D0> {[-4-]}
<MI 2312e MOVE.B (A0+D7.W),D0> {[-4-]}
<POP 0x23132 LimitCheck 0x0 ≤ D0 ≤ 0x2> {[-4-]}
<MI 2313a ADD.W D0,D0> {[-4-]}
<MI 2313c SWITCH D0.W> {[-4-]}
<POP 2314a-2314c Naked> Σ-4 →0x23162 ←0x23120
<MI 2314a BRA 0x23162> {[-4-]}
<POP 2314c-23156 Naked> Σ-4 →0x23162 ←0x23120
<MI 2314c MOVEA.L (A7),A0> {[-4-]}
<MI 2314e MOVE.B (A6-0x4),(A0+D5.L+#0x1)> {[-4-]}
<MI 23152 ADDQ.L #0x1,D5> {[-4-]}
<MI 23154 BRA 0x23162> {[-4-]}
<POP 23156-23162 Naked> Σ-4 ↓ ←0x23120
<MI 23156 MOVEA.L (A7),A0> {[-4-]}
<MI 23158 MOVE.B #0x2c,(A0+D5.L+#0x1)> {[-4-]}
<MI 2315e ADDQ.L #0x1,D5> {[-4-]}
<MI 23160 SUBQ.L #0x1,D6> {[-4-]}
<POP 23162-2317e Naked> Σ-4 →0x230c0 ←0x2314a ←0x2314c
<MI 23162 MOVEQ.L #0x03,D0> {[-4-]}
<MI 23164 MULS.W (A6-0x10),D0> {[-4-]}
<MI 23166 LEA.L 0x22d51,A0> {[-4-]}
<MI 2316a LEA.L (A0+D0.W),A0> {[-4-]}
<MI 2316e CLR.L D0> {[-4-]}
<MI 23170 MOVE.B (A0+D7.W),D0> {[-4-]}
<MI 23174 MOVE.W D0,(A6-0x10)> {[-4-]}
<MI 23176 ADDQ.L #0x1,D6> {[-4-]}
<MI 23178 BRA 0x230c0> {[-4-]}
<POP 2317e-23188 Naked> Σ-4 Δ+4 ↓ ←0x230c0 ←0x23112
<MI 2317e MOVEA.L (A7),A0> {[-4-]}
<MI 23180 MOVE.L D5,D0> {[-4-]}
<MI 23182 SUBQ.L #0x1,D0> {[-4-]}
<MI 23184 MOVE.W D0,(A0)> {[-4-]}
<POP 23186-23188 StackAdj> Δ+4 {}
<POP 23188-23190 Epilogue> Σ0
@ 23190
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @ 1(r)>
<LVAR -0x00a @>
<LVAR -0x00e @ 4(r)>
<LVAR -0x014 @ 1(r)>
<POP 23190-2323c Body>
<POP 23190-231a6 Prologue> Σ0 ↓
<POP 231a6-231ac RegCacheLoad> Σ0 ↓
<POP 231ac-231ba Naked> Σ0 ↓ →0x231c2
<POP 231ac-231ae StackAdj> Δ-2 {[-2-]}
<Call 0x231ae 0x22e86> {[-2-]}
<MI 231b2 MOVE.B (A7)+,D0> Δ+2 {}
<MI 231b4 CMPI.B #0x5b,D0> {}
<MI 231b8 BNE 0x231c2> {}
<POP 231ba-231c2 Naked> Σ0 ↓
<POP 231ba-231bc StackAdj> Δ-2 {[-2-]}
<Call 0x231bc 0x22ec4> {[-2-]}
<MI 231c0 MOVE.B (A7)+,D7> Δ+2 {}
<POP 231c2-231cc Naked> Σ0 ↓ ←0x231ac
<MI 231c2 MOVEA.L (A6+0xc),A0> {}
<MI 231c6 MOVE.L #0x01,(A0)> {}
<MI 231c8 CLR.B (A6-0x14)> {}
<POP 231cc-231e6 Naked> Σ0 ↓ →0x2321c ←0x2321c
<Pointer.fp 0x231cc <LVAR -0x00a @>> Δ-4 {[@@-10]}
<Pointer.fp 0x231d0 <LVAR -0x002 @ 1(r)>> Δ-4 {[@@-10]|[@@-2]}
<Pointer.fp 0x231d4 <LVAR -0x014 @ 1(r)>> Δ-4 {[@@-10]|[@@-2]|[@@-20]}
<Call 0x231d8 0x22fe6> {[@@-10]|[@@-2]|[@@-20]}
<POP 231dc-231e0 StackAdj> Δ+12 {}
<MI 231e0 TST.B (A6-0x2)> {}
<MI 231e4 BNE 0x2321c> {}
<POP 231e6-23212 Naked> Σ0 ↓ →0x23216
<Pointer.fp 0x231e6 <LVAR -0x00e @ 4(r)>> Δ-4 {[@@-14]}
<Const 0x231e8 0xc.4> Δ-4 {[@@-14]|[##12]}
<Call 0x231ec 0x1029c> {[@@-14]|[##12]}
Malloc1(length : Long) : Pointer
<POP 231f2-231f4 StackAdj> Δ+8 {}
<MI 231f4 MOVEA.L (A6-0xe),A0> {}
<MI 231f6 MOVEA.L A0,A1> {}
<MI 231f8 LEA.L (A6-0xa),A2> {}
<BlockMove 8,A2,A1> {}
<MI 23204 MOVE.L #0x01,(A0+0x8)> {}
<MI 23208 MOVEA.L (A6+0xc),A0> {}
<MI 2320c MOVEA.L (A0),A1> {}
<MI 2320e CMPA.W #0x01,A1> {}
<MI 23210 BNE 0x23216> {}
<POP 23212-23216 Naked> Σ0 →0x2321a
<MI 23212 MOVE.L (A6-0xe),(A0)> {}
<MI 23214 BRA 0x2321a> {}
<POP 23216-2321a Naked> Σ0 ↓ ←0x231e6
<MI 23216 MOVE.L (A6-0xe),(A4+0x8)> {}
<POP 2321a-2321c Naked> Σ0 ↓ ←0x23212
<MI 2321a MOVEA.L (A6-0xe),A4> {}
<POP 2321c-23222 Naked> Σ0 ↓ →0x231cc ←0x231cc
<MI 2321c TST.B (A6-0x2)> {}
<MI 23220 BEQ 0x231cc> {}
<POP 23222-23232 Naked> Σ0 ↓ →0x23234
<MI 23222 MOVEA.L (A6+0x8),A0> {}
<MI 23226 CLR.B (A0)> {}
<MI 23228 MOVE.B (A6-0x2),D0> {}
<MI 2322c CMPI.B #0x02,D0> {}
<MI 23230 BNE 0x23234> {}
<POP 23232-23234 Naked> Σ0 ↓
<MI 23232 ADDQ.B #0x1,(A0)> {}
<POP 23234-2323c Epilogue> Σ0 ←0x23222
@ 2323c
<LVAR 0x00c 4(w)>
<LVAR 0x008 4(r)>
<POP 2323c-23272 Body>
<POP 2323c-23252 Prologue> Σ0 ↓
<POP 23252-23258 Naked> Σ0 ↓
<MI 23252 MOVEQ.L #-0x01,D7> {}
<MI 23254 MOVEA.L (A6+0x8),A4> {}
<POP 23258-2325e Naked> Σ0 ↓ →0x23266 ←0x2325e
<MI 23258 CMPA.W #0x1,A4> {}
<MI 2325c BEQ 0x23266> {}
<POP 2325e-23266 Naked> Σ0 →0x23258
<MI 2325e ADDQ.L #0x1,D7> {}
<MI 23260 MOVEA.L (A4+0x8),A4> {}
<MI 23264 BRA 0x23258> {}
<POP 23266-2326a Naked> Σ0 ↓ ←0x23258
<MI 23266 MOVE.L D7,(A6+0xc)> {}
<POP 2326a-23272 Epilogue> Σ0
@ 23272
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 23272-232fe Body>
<POP 23272-23288 Prologue> Σ0 ↓
<POP 23288-2328a RegCacheLoad> Σ0 ↓
<POP 2328a-2329e Naked> Σ0 ↓ →0x232f6
<POP 2328a-2328c StackAdj> Δ-4 {[-4-]}
<MI 2328c MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<Call 0x23290 0x2323c> {[-4-]|[4, '(A6+0xc)']}
<POP 23294-23296 StackAdj> Δ+4 {[-4-]}
<MI 23296 MOVE.L (A7)+,D0> Δ+4 {}
<MI 23298 CMP.L (A6+0x8),D0> {}
<MI 2329c BEQ 0x232f6> {}
<POP 2329e-232f6 Naked> Σ0 ↓
<MI 2329e MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x232a2 0x22de6> {[4, '(A6+0xc)']}
<POP 232a6-232a8 StackAdj> Δ+4 {}
<Blob 0x232a8 [32] @> Δ-32 {[«32""»]}
<Blob 0x232b4 [10] (A6+0x1a)> Δ-10 {[«32""»]|[«10»]}
<POP 232c0-232c2 StackAdj> Δ-8 {[«32""»]|[«10»]|[-8-]}
<Lit 0x232c2 32> {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]}
<POP 232d2-232d4 StackAdj> Δ-4 {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]|[-4-]}
<Lit 0x232d4> {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]|[$$…]}
<Pointer.sp 0x232d4 12> Δ-4
<Const 0x232d8 0x1.2> Δ-2
<Const 0x232da 0xa.2> Δ-2
<Call 0x232de 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 232e4-232e6 StackAdj> Δ+8
<Call 0x232e6 0x102d0> {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 232ec-232ee StackAdj> Δ+8 {[«32""»]|[«10»]|[-4-]}
<Call 0x232ee 0x22e28> {[«32""»]|[«10»]|[-4-]}
<POP 232f2-232f6 StackAdj> Δ+46 {}
<POP 232f6-232fe Epilogue> Σ0 ←0x2328a
@ 232fe
<LVAR 0x014 1(rw)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 232fe-23384 Body> Δ-4
<POP 232fe-23314 Prologue> Σ0 ↓
<POP 23314-23328 Naked> Σ0 ↓ →0x23376
<MI 23314 CLR.B (A6+0x14)> {}
<MI 23318 MOVE.L (A6+0x10),D0> {}
<MI 2331c ADD.L (A6+0x8),D0> {}
<MI 23320 CMP.L 0x27982,D0> {}
<MI 23326 BGT 0x23376> {}
<POP 23328-2332e Naked> Σ0 Δ-4 ↓
<MI 23328 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 2332c MOVEQ.L #0x01,D7> {[4, '(A6+0x8)']}
<POP 2332e-23332 Naked> Σ-4 ↓ →0x23374 ←0x23370
<MI 2332e CMP.L (A7),D7> {[-4-]}
<MI 23330 BGT 0x23374> {[-4-]}
<POP 23332-2336c Naked> Σ-4 ↓ →0x23370
<MI 23332 MOVE.L (A6+0x10),D0> {[-4-]}
<MI 23336 ADD.L D7,D0> {[-4-]}
<MI 23338 SUBQ.L #0x1,D0> {[-4-]}
<POP 0x2333a LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-4-]}
<MI 23344 LEA.L 0x26976,A0> {[-4-]}
<MI 2334a MOVE.L (A6+0xc),D1> {[-4-]}
<MI 2334e ADD.L D7,D1> {[-4-]}
<MI 23350 SUBQ.L #0x1,D1> {[-4-]}
<MI 23352 SUBQ.L #0x1,D1> {[-4-]}
<POP 0x23354 LimitCheck 0x0 ≤ D1 ≤ 0x3e> {[-4-]}
<MI 2335e LEA.L 0x2293c,A1> {[-4-]}
<MI 23362 MOVE.B (A0+D0.L+#0x8),D0> {[-4-]}
<MI 23366 CMP.B (A1+D1.L),D0> {[-4-]}
<MI 2336a BEQ 0x23370> {[-4-]}
<POP 2336c-23370 Naked> Σ-4 Δ+4 →0x2337c
<POP 2336c-2336e StackAdj> Δ+4 {}
<MI 2336e BRA 0x2337c> {}
<POP 23370-23374 Naked> Σ-4 ↓ →0x2332e ←0x23332
<MI 23370 ADDQ.L #0x1,D7> {[-4-]}
<MI 23372 BVC 0x2332e> {[-4-]}
<POP 23374-23376 Naked> Σ-4 Δ+4 ↓ ←0x2332e
<POP 23374-23376 StackAdj> Δ+4 {}
<POP 23376-2337c Naked> Σ0 ↓ ←0x23314
<MI 23376 MOVE.B #0x01,(A6+0x14)> {}
<POP 2337c-23384 Epilogue> Σ0 ←0x2336c
@ 23384
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 23384-2340e Body>
<POP 23384-2339a Prologue> Σ0 ↓
<POP 2339a-233a4 RegCacheLoad> Σ0 ↓
<POP 233a4-233a8 Naked> Σ0 ↓ →0x233e6
<MI 233a4 TST.L (A6+0x8)> {}
<MI 233a6 BGE 0x233e6> {}
<POP 233a8-233b6 Naked> Σ0 ↓ →0x233e6
<MI 233a8 MOVE.L (A6+0x8),D0> {}
<MI 233aa NEG.L D0> {}
<MI 233ac ADD.L 0x27982,D0> {}
<MI 233ae CMPI.L #0x00001000,D0> {}
<MI 233b4 BLE 0x233e6> {}
<POP 233b6-233e6 Naked> Σ0 ↓
<Blob 0x233b6 [28] @> Δ-28 {[«28""»]}
<POP 233c8-233ca StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x233ca 27> {[«28""»]|[$$Evaluation buffer overflow.]}
<Call 0x233de 0x22e28> {[«28""»]|[$$Evaluation buffer overflow.]}
<POP 233e2-233e6 StackAdj> Δ+32 {}
<POP 233e6-23406 Naked> Σ0 ↓ ←0x233a4 ←0x233a8
<MI 233e6 LEA.L 0x2697e,A0> {}
<MI 233ec MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Blob 0x233ee [4] 0x27982> Δ-4 {[4, 'A0']|[«4»]}
<MI 233f0 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, 'A0']|[«4»]|[4, '(A6+0xc)']}
<MI 233f4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, 'A0']|[«4»]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x233f6 0x10364> {[4, 'A0']|[«4»]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
MovStringTail(Base, Len, Ptr, Delta)
<POP 233fc-23400 StackAdj> Δ+16 {}
<MI 23400 MOVE.L 0x27982,D0> {}
<MI 23402 SUB.L (A6+0x8),D0> {}
<MI 23404 MOVE.L D0,0x27982> {}
<POP 23406-2340e Epilogue> Σ0
@ 2340e
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2340e-23498 Body>
<POP 2340e-23424 Prologue> Σ0 ↓
<POP 23424-23428 RegCacheLoad> Σ0 ↓
<POP 23428-23448 Naked> Σ0 Δ-8 ↓
<MI 23428 MOVEA.L (A6+0x8),A0> {}
<MI 2342c MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2342e MOVEA.L (A6+0xc),A1> {[4, 'A0']}
<MI 23430 MOVE.L (A1),-(A7)> Δ-4 {[4, 'A0']|[4, '(A1)']}
<MI 23432 MOVE.W (A0),D0> {[4, 'A0']|[4, '(A1)']}
<MI 23434 EXTW.L D0> {[4, 'A0']|[4, '(A1)']}
<MI 23436 NEG.L D0> {[4, 'A0']|[4, '(A1)']}
<MI 23438 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, '(A1)']|[4, 'D0']}
<Call 0x2343a 0x23384> {[4, 'A0']|[4, '(A1)']|[4, 'D0']}
<POP 2343e-23440 StackAdj> Δ+8 {[4, 'A0']}
<MI 23440 MOVE.W (A0),D0> {[4, 'A0']}
<MI 23442 EXTW.L D0> {[4, 'A0']}
<MI 23444 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<MI 23446 MOVEQ.L #0x01,D7> {[4, 'A0']|[4, 'D0']}
<POP 23448-2344c Naked> Σ-8 ↓ →0x23482 ←0x2344c
<MI 23448 CMP.L (A7),D7> {[-8-]}
<MI 2344a BGT 0x23482> {[-8-]}
<POP 2344c-23482 Naked> Σ-8 ↓ →0x23448
<MI 2344c MOVEA.L (A6+0xc),A0> {[-8-]}
<MI 2344e MOVE.L D7,D0> {[-8-]}
<MI 23450 ADD.L (A0),D0> {[-8-]}
<MI 23452 SUBQ.L #0x1,D0> {[-8-]}
<MI 23454 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x23456 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-8-]}
<MI 23460 LEA.L 0x26976,A0> {[-8-]}
<MI 23466 MOVE.L D7,D1> {[-8-]}
<MI 23468 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x2346a LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 23474 MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 23478 MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8)> {[-8-]}
<MI 2347e ADDQ.L #0x1,D7> {[-8-]}
<MI 23480 BVC 0x23448> {[-8-]}
<POP 23482-23490 Naked> Σ-8 Δ+8 ↓ ←0x23448
<POP 23482-23484 StackAdj> Δ+4 {[-4-]}
<MI 23484 MOVEA.L (A6+0xc),A0> {[-4-]}
<MI 23486 MOVEA.L (A7),A1> {[-4-]}
<MI 23488 MOVE.W (A1),D0> {[-4-]}
<MI 2348a EXTW.L D0> {[-4-]}
<MI 2348c ADD.L D0,(A0)> {[-4-]}
<POP 2348e-23490 StackAdj> Δ+4 {}
<POP 23490-23498 Epilogue> Σ0
@ 23498
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 23498-2361e Body>
<POP 23498-234ae Prologue> Σ0 ↓
<POP 234ae-234bc RegCacheLoad> Σ0 ↓
<POP 234bc-234ce Naked> Σ0 ↓
<MI 234bc MOVEQ.L #0x00,D7> {}
<MI 234be MOVEA.L (A6+0xc),A0> {}
<MI 234c2 CLR.L (A0)> {}
<MI 234c4 MOVEA.L (A6+0x8),A0> {}
<MI 234c6 CLR.L (A0)> {}
<MI 234c8 MOVE.L 0x2797e,D6> {}
<POP 234ce-234f0 Naked> Σ0 ↓ →0x235c2 ←0x235cc ←0x235d4
<MI 234ce MOVE.L D6,D0> {}
<MI 234d0 SUBQ.L #0x1,D0> {}
<POP 0x234d2 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {}
<MI 234dc LEA.L 0x26976,A0> {}
<MI 234e2 MOVE.B (A0+D0.L+#0x8),D0> {}
<MI 234e6 CMPI.B #0x5b,D0> {}
<MI 234ea BNE 0x235c2> {}
<POP 234f0-23504 Naked> Σ0 ↓ →0x23582
<POP 234f0-234f2 StackAdj> Δ-2 {[-2-]}
<MI 234f2 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x234f4 0x1.4> Δ-4 {[-2-]|[4, 'D6']|[##1]}
<Const 0x234f8 0x3.4> Δ-4 {[-2-]|[4, 'D6']|[##1]|[##3]}
<Call 0x234fc 0x232fe> {[-2-]|[4, 'D6']|[##1]|[##3]}
<POP 234fe-23500 StackAdj> Δ+12 {[-2-]}
<MI 23500 TST.B (A7)+> Δ+2 {}
<MI 23502 BNE 0x23582> {}
<POP 23504-23516 Naked> Σ0 ↓ →0x23582
<POP 23504-23506 StackAdj> Δ-2 {[-2-]}
<MI 23506 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x23508 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##4]}
<Const 0x2350a 0x3.4> Δ-4 {[-2-]|[4, 'D6']|[##4]|[##3]}
<Call 0x2350e 0x232fe> {[-2-]|[4, 'D6']|[##4]|[##3]}
<POP 23510-23512 StackAdj> Δ+12 {[-2-]}
<MI 23512 TST.B (A7)+> Δ+2 {}
<MI 23514 BNE 0x23582> {}
<POP 23516-23528 Naked> Σ0 ↓ →0x23582
<POP 23516-23518 StackAdj> Δ-2 {[-2-]}
<MI 23518 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x2351a 0x7.4> Δ-4 {[-2-]|[4, 'D6']|[##7]}
<Const 0x2351e 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##7]|[##4]}
<Call 0x23520 0x232fe> {[-2-]|[4, 'D6']|[##7]|[##4]}
<POP 23522-23524 StackAdj> Δ+12 {[-2-]}
<MI 23524 TST.B (A7)+> Δ+2 {}
<MI 23526 BNE 0x23582> {}
<POP 23528-2353a Naked> Σ0 ↓ →0x23582
<POP 23528-2352a StackAdj> Δ-2 {[-2-]}
<MI 2352a MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x2352c 0xb.4> Δ-4 {[-2-]|[4, 'D6']|[##11]}
<Const 0x23530 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##11]|[##4]}
<Call 0x23532 0x232fe> {[-2-]|[4, 'D6']|[##11]|[##4]}
<POP 23534-23536 StackAdj> Δ+12 {[-2-]}
<MI 23536 TST.B (A7)+> Δ+2 {}
<MI 23538 BNE 0x23582> {}
<POP 2353a-2354c Naked> Σ0 ↓ →0x23582
<POP 2353a-2353c StackAdj> Δ-2 {[-2-]}
<MI 2353c MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x2353e 0xf.4> Δ-4 {[-2-]|[4, 'D6']|[##15]}
<Const 0x23542 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##15]|[##4]}
<Call 0x23544 0x232fe> {[-2-]|[4, 'D6']|[##15]|[##4]}
<POP 23546-23548 StackAdj> Δ+12 {[-2-]}
<MI 23548 TST.B (A7)+> Δ+2 {}
<MI 2354a BNE 0x23582> {}
<POP 2354c-2355e Naked> Σ0 ↓ →0x23582
<POP 2354c-2354e StackAdj> Δ-2 {[-2-]}
<MI 2354e MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x23550 0x13.4> Δ-4 {[-2-]|[4, 'D6']|[##19]}
<Const 0x23554 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##19]|[##4]}
<Call 0x23556 0x232fe> {[-2-]|[4, 'D6']|[##19]|[##4]}
<POP 23558-2355a StackAdj> Δ+12 {[-2-]}
<MI 2355a TST.B (A7)+> Δ+2 {}
<MI 2355c BNE 0x23582> {}
<POP 2355e-23570 Naked> Σ0 ↓ →0x23582
<POP 2355e-23560 StackAdj> Δ-2 {[-2-]}
<MI 23560 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x23562 0x17.4> Δ-4 {[-2-]|[4, 'D6']|[##23]}
<Const 0x23566 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##23]|[##4]}
<Call 0x23568 0x232fe> {[-2-]|[4, 'D6']|[##23]|[##4]}
<POP 2356a-2356c StackAdj> Δ+12 {[-2-]}
<MI 2356c TST.B (A7)+> Δ+2 {}
<MI 2356e BNE 0x23582> {}
<POP 23570-23582 Naked> Σ0 ↓ →0x23586
<POP 23570-23572 StackAdj> Δ-2 {[-2-]}
<MI 23572 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x23574 0x1b.4> Δ-4 {[-2-]|[4, 'D6']|[##27]}
<Const 0x23578 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##27]|[##4]}
<Call 0x2357a 0x232fe> {[-2-]|[4, 'D6']|[##27]|[##4]}
<POP 2357c-2357e StackAdj> Δ+12 {[-2-]}
<MI 2357e TST.B (A7)+> Δ+2 {}
<MI 23580 BEQ 0x23586> {}
<POP 23582-23586 Naked> Σ0 →0x235c2 ←0x234f0 ←0x23504 ←0x23516 ←0x23528 ←0x2353a ←0x2354c ←0x2355e
<MI 23582 ADDQ.L #0x1,D7> {}
<MI 23584 BRA 0x235c2> {}
<POP 23586-2358a Naked> Σ0 ↓ →0x235a6 ←0x23570
<MI 23586 TST.L D7> {}
<MI 23588 BNE 0x235a6> {}
<POP 2358a-2359e Naked> Σ0 ↓ →0x235a6
<POP 2358a-2358c StackAdj> Δ-2 {[-2-]}
<MI 2358c MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x2358e 0x1f.4> Δ-4 {[-2-]|[4, 'D6']|[##31]}
<Const 0x23592 0x5.4> Δ-4 {[-2-]|[4, 'D6']|[##31]|[##5]}
<Call 0x23596 0x232fe> {[-2-]|[4, 'D6']|[##31]|[##5]}
<POP 23598-2359a StackAdj> Δ+12 {[-2-]}
<MI 2359a TST.B (A7)+> Δ+2 {}
<MI 2359c BEQ 0x235a6> {}
<POP 2359e-235a2 Naked> Σ0 ↓
<MI 2359e MOVEA.L (A6+0xc),A0> {}
<POP 235a2-235a6 Naked> Σ0 →0x235c2 ←0x235bc
<MI 235a2 MOVE.L D6,(A0)> {}
<MI 235a4 BRA 0x235c2> {}
<POP 235a6-235b8 Naked> Σ0 ↓ →0x235c2 ←0x23586 ←0x2358a
<POP 235a6-235a8 StackAdj> Δ-2 {[-2-]}
<MI 235a8 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x235aa 0x24.4> Δ-4 {[-2-]|[4, 'D6']|[##36]}
<Const 0x235ae 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##36]|[##4]}
<Call 0x235b0 0x232fe> {[-2-]|[4, 'D6']|[##36]|[##4]}
<POP 235b2-235b4 StackAdj> Δ+12 {[-2-]}
<MI 235b4 TST.B (A7)+> Δ+2 {}
<MI 235b6 BEQ 0x235c2> {}
<POP 235b8-235bc Naked> Σ0 ↓ →0x235c0
<MI 235b8 TST.L D7> {}
<MI 235ba BNE 0x235c0> {}
<POP 235bc-235c0 Naked> Σ0 →0x235a2
<MI 235bc MOVEA.L (A6+0x8),A0> {}
<MI 235be BRA 0x235a2> {}
<POP 235c0-235c2 Naked> Σ0 ↓ ←0x235b8
<MI 235c0 SUBQ.L #0x1,D7> {}
<POP 235c2-235cc Naked> Σ0 ↓ →0x235de ←0x234ce ←0x23582 ←0x235a2 ←0x235a6
<MI 235c2 ADDQ.L #0x1,D6> {}
<MI 235c4 CMP.L 0x27982,D6> {}
<MI 235ca BGT 0x235de> {}
<POP 235cc-235d4 Naked> Σ0 ↓ →0x234ce
<MI 235cc TST.L D7> {}
<MI 235ce BNE 0x234ce> {}
<POP 235d4-235de Naked> Σ0 ↓ →0x234ce
<MI 235d4 MOVEA.L (A6+0x8),A0> {}
<MI 235d6 TST.L (A0)> {}
<MI 235d8 BEQ 0x234ce> {}
<POP 235de-235e6 Naked> Σ0 ↓ →0x23616 ←0x235c2
<MI 235de CMP.L 0x27982,D6> {}
<MI 235e4 BLE 0x23616> {}
<POP 235e6-23616 Naked> Σ0 ↓
<Blob 0x235e6 [28] @> Δ-28 {[«28""»]}
<POP 235f8-235fa StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x235fa 27> {[«28""»]|[$$Unbalanced [ELSE] or [END]!]}
<Call 0x2360e 0x22e28> {[«28""»]|[$$Unbalanced [ELSE] or [END]!]}
<POP 23612-23616 StackAdj> Δ+32 {}
<POP 23616-2361e Epilogue> Σ0 ←0x235de
@ 2361e
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 @ 4(rw)>
<POP 2361e-23664 Body>
<POP 2361e-23634 Prologue> Σ0 ↓
<POP 23634-2363c RegCacheLoad> Σ0 ↓
<POP 2363c-2364a Naked> Σ0 ↓ →0x2364c
<Pointer.fp 0x2363c <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Pointer.fp 0x2363e <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-8]|[@@-4]}
<Call 0x23640 0x23498> {[@@-8]|[@@-4]}
<POP 23644-23646 StackAdj> Δ+8 {}
<MI 23646 TST.L (A6-0x8)> {}
<MI 23648 BNE 0x2364c> {}
<POP 2364a-2364c Naked> Σ0 ↓
<MI 2364a MOVE.L (A6-0x4),(A6-0x8)> {}
<POP 2364c-2365c Naked> Σ0 ↓ ←0x2363c
<MI 2364c MOVE.L (A6-0x4),D0> {}
<MI 2364e ADDQ.L #0x5,D0> {}
<MI 23650 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 23652 SUB.L (A6-0x8),D0> {[4, 'D0']}
<MI 23654 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']|[4, 'D0']}
<Call 0x23656 0x23384> {[4, 'D0']|[4, 'D0']}
<POP 2365a-2365c StackAdj> Δ+8 {}
<POP 2365c-23664 Epilogue> Σ0
@ 23664
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 @ 4(r)>
<POP 23664-236c0 Body>
<POP 23664-2367a Prologue> Σ0 ↓
<POP 2367a-23682 RegCacheLoad> Σ0 ↓
<POP 23682-23690 Naked> Σ0 ↓ →0x23696
<Pointer.fp 0x23682 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Pointer.fp 0x23684 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-8]|[@@-4]}
<Call 0x23686 0x23498> {[@@-8]|[@@-4]}
<POP 2368a-2368c StackAdj> Δ+8 {}
<MI 2368c TST.L (A6-0x8)> {}
<MI 2368e BNE 0x23696> {}
<POP 23690-23696 Naked> Σ0 →0x236a8
<MI 23690 MOVE.L (A6-0x4),D0> {}
<MI 23692 ADDQ.L #0x5,D0> {}
<MI 23694 BRA 0x236a8> {}
<POP 23696-236a8 Naked> Σ0 ↓ ←0x23682
<MI 23696 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 23698 ADDQ.L #0x5,(A7)> {[-4-]}
<Const 0x2369a 0x5.4> Δ-4 {[-4-]|[##5]}
<Call 0x2369e 0x23384> {[-4-]|[##5]}
<POP 236a2-236a4 StackAdj> Δ+8 {}
<MI 236a4 MOVE.L (A6-0x8),D0> {}
<MI 236a6 ADDQ.L #0x6,D0> {}
<POP 236a8-236b8 Naked> Σ0 ↓ ←0x23690
<MI 236a8 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 236aa SUB.L 0x2797e,D0> {[4, 'D0']}
<MI 236b0 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']|[4, 'D0']}
<Call 0x236b2 0x23384> {[4, 'D0']|[4, 'D0']}
<POP 236b6-236b8 StackAdj> Δ+8 {}
<POP 236b8-236c0 Epilogue> Σ0
@ 236c0
<LVAR 0x008 4(r)>
<LVAR -0x004 @>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(rw)>
<LVAR -0x010 4(rw)>
<LVAR -0x014 4(rw)>
<POP 236c0-237d6 Body>
<POP 236c0-236d6 Prologue> Σ0 ↓
<POP 236d6-236ee RegCacheLoad> Σ0 ↓
<POP 236ee-236f2 Naked> Σ0 ↓ →0x236fc
<MI 236ee TST.B 0x27990> {}
<MI 236f0 BEQ 0x236fc> {}
<POP 236f2-236f6 Naked> Σ0 ↓ →0x236fc
<MI 236f2 TST.L 0x27996> {}
<MI 236f4 BNE 0x236fc> {}
<POP 236f6-236fc Naked> Σ0 ↓
<MI 236f6 MOVE.L (A6+0x8),0x27996> {}
<MI 236fa SUBQ.L #0x1,0x27996> {}
<POP 236fc-23704 Naked> Σ0 ↓ →0x237ce ←0x236ee ←0x236f2
<MI 236fc TST.B 0x27990> {}
<MI 236fe BNE 0x237ce> {}
<POP 23704-23738 Naked> Σ0 ↓ →0x23752
<MI 23704 MOVE.L (A6+0x8),0x2797e> {}
<MI 23708 ADDQ.L #0x6,0x2797e> {}
<Pointer.fp 0x2370a <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Pointer.fp 0x2370c <LVAR -0x004 @>> Δ-4 {[@@-8]|[@@-4]}
<Call 0x23710 0x23190> {[@@-8]|[@@-4]}
<POP 23714-23716 StackAdj> Δ+8 {}
<Blob 0x23716 [10] @> Δ-10 {[«10""»]}
<MI 23722 MOVE.L (A6-0x8),-(A7)> Δ-4 {[«10""»]|[4, '(A6-0x8)']}
<Const 0x23724 0x0.4> Δ-4 {[«10""»]|[4, '(A6-0x8)']|[##0]}
<Call 0x23728 0x23272> {[«10""»]|[4, '(A6-0x8)']|[##0]}
<POP 2372c-23730 StackAdj> Δ+18 {}
<MI 23730 TST.B 0x2799a> {}
<MI 23736 BEQ 0x23752> {}
<POP 23738-23752 Naked> Σ0 →0x23766
<POP 23738-2373a StackAdj> Δ-8 {[-8-]}
<MI 2373a MOVE.L (A6-0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x8)']}
<Const 0x2373c 0x0.4> Δ-4 {[-8-]|[4, '(A6-0x8)']|[##0]}
<Call 0x23740 0x23b98> {[-8-]|[4, '(A6-0x8)']|[##0]}
<POP 23746-23748 StackAdj> Δ+8 {[-8-]}
<MI 23748 MOVE.L (A7)+,(A6-0x14)> Δ+4 {[-4-]}
<MI 2374c MOVE.L (A7)+,(A6-0x10)> Δ+4 {}
<MI 23750 BRA 0x23766> {}
<POP 23752-23766 Naked> Σ0 ↓ ←0x23704
<POP 23752-23754 StackAdj> Δ-4 {[-4-]}
<MI 23754 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x8)']}
<Const 0x23756 0x0.4> Δ-4 {[-4-]|[4, '(A6-0x8)']|[##0]}
<Call 0x2375a 0x23b66> {[-4-]|[4, '(A6-0x8)']|[##0]}
<POP 23760-23762 StackAdj> Δ+8 {[-4-]}
<MI 23762 MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<POP 23766-2377c Naked> Σ0 ↓ →0x237a6 ←0x23738
<MI 23766 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<Call 0x23768 0x22de6> {[4, '(A6-0x8)']}
<POP 2376c-2376e StackAdj> Δ+4 {}
<MI 2376e MOVE.L 0x2797e,0x27992> {}
<MI 23774 TST.B 0x2799a> {}
<MI 2377a BEQ 0x237a6> {}
<POP 2377c-237a6 Naked> Σ0 →0x237ce
<POP 2377c-2377e StackAdj> Δ-2 {[-2-]}
<MI 2377e MOVE.L (A6-0x10),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x10)']}
<MI 23782 MOVE.L (A6-0x14),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<Blob 0x23786 [4] 0x279a4> Δ-4 {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[«4»]}
<Blob 0x2378c [4] 0x279a0> Δ-4 {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[«4»]|[«4»]}
<Call 0x23792 0x1032c> {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[«4»]|[«4»]}
IsEqual(a, b : Quad) : Bool
<POP 23798-2379c StackAdj> Δ+16 {[-2-]}
<MI 2379c MOVE.B (A7)+,D0> Δ+2 {}
<MI 2379e EXTB.W D0> {}
<POP 0x237a0 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 237a2 MOVE.B D0,0x27990> {}
<MI 237a4 BRA 0x237ce> {}
<POP 237a6-237ce Naked> Σ0 ↓ ←0x23766
<POP 237a6-237a8 StackAdj> Δ-2 {[-2-]}
<MI 237a8 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-2-]|[4, '(A6-0xc)']}
<Blob 0x237ac [4] 0x2799c> Δ-4 {[-2-]|[4, '(A6-0xc)']|[«4»]}
<Call 0x237b2 0x102c8> {[-2-]|[4, '(A6-0xc)']|[«4»]}
StringEqual(a, b : String) : Byte
<POP 237b8-237ba StackAdj> Δ+8 {[-2-]}
<MI 237ba MOVE.B (A7)+,D0> Δ+2 {}
<MI 237bc EXTB.W D0> {}
<POP 0x237be LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 237c0 MOVE.B D0,0x27990> {}
<Pointer.fp 0x237c2 <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x237c6 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<POP 237cc-237ce StackAdj> Δ+4 {}
<POP 237ce-237d6 Epilogue> Σ0 ←0x236fc ←0x2377c
@ 237d6
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 237d6-2395e Body>
<POP 237d6-237ec Prologue> Σ0 ↓
<POP 237ec-23800 RegCacheLoad> Σ0 ↓
<POP 23800-23814 Naked> Σ0 ↓
<MI 23800 CLR.B 0x27990> {}
<MI 23802 CLR.L 0x27992> {}
<MI 23808 CLR.L 0x27996> {}
<MI 2380a MOVEQ.L #0x00,D7> {}
<MI 2380c MOVEQ.L #0x00,D6> {}
<MI 2380e MOVE.L 0x2797e,D5> {}
<POP 23814-2381c Naked> Σ0 ↓ →0x238be ←0x238b8
<MI 23814 TST.L D6> {}
<MI 23816 BNE 0x238be> {}
<POP 2381c-23828 Naked> Σ0 ↓ →0x238be
<MI 2381c CMP.L 0x27982,D5> {}
<MI 23822 BGT 0x238be> {}
<POP 23828-23846 Naked> Σ0 ↓ →0x238b2
<MI 23828 MOVE.L D5,D0> {}
<MI 2382a SUBQ.L #0x1,D0> {}
<POP 0x2382c LimitCheck 0x0 ≤ D0 ≤ 0xfff> {}
<MI 23836 LEA.L 0x26976,A0> {}
<MI 2383c MOVE.B (A0+D0.L+#0x8),D0> {}
<MI 23840 CMPI.B #0x5b,D0> {}
<MI 23844 BNE 0x238b2> {}
<POP 23846-2385a Naked> Σ0 ↓ →0x2386e
<POP 23846-23848 StackAdj> Δ-2 {[-2-]}
<MI 23848 MOVE.L D5,-(A7)> Δ-4 {[-2-]|[4, 'D5']}
<Const 0x2384a 0x28.4> Δ-4 {[-2-]|[4, 'D5']|[##40]}
<Const 0x2384e 0x5.4> Δ-4 {[-2-]|[4, 'D5']|[##40]|[##5]}
<Call 0x23852 0x232fe> {[-2-]|[4, 'D5']|[##40]|[##5]}
<POP 23854-23856 StackAdj> Δ+12 {[-2-]}
<MI 23856 TST.B (A7)+> Δ+2 {}
<MI 23858 BNE 0x2386e> {}
<POP 2385a-2386e Naked> Σ0 ↓ →0x23872
<POP 2385a-2385c StackAdj> Δ-2 {[-2-]}
<MI 2385c MOVE.L D5,-(A7)> Δ-4 {[-2-]|[4, 'D5']}
<Const 0x2385e 0x2d.4> Δ-4 {[-2-]|[4, 'D5']|[##45]}
<Const 0x23862 0x6.4> Δ-4 {[-2-]|[4, 'D5']|[##45]|[##6]}
<Call 0x23866 0x232fe> {[-2-]|[4, 'D5']|[##45]|[##6]}
<POP 23868-2386a StackAdj> Δ+12 {[-2-]}
<MI 2386a TST.B (A7)+> Δ+2 {}
<MI 2386c BEQ 0x23872> {}
<POP 2386e-23872 Naked> Σ0 →0x238b2 ←0x23846
<MI 2386e ADDQ.L #0x1,D7> {}
<MI 23870 BRA 0x238b2> {}
<POP 23872-23876 Naked> Σ0 ↓ →0x23894 ←0x2385a
<MI 23872 TST.L D7> {}
<MI 23874 BNE 0x23894> {}
<POP 23876-2388a Naked> Σ0 ↓ →0x23894
<POP 23876-23878 StackAdj> Δ-2 {[-2-]}
<MI 23878 MOVE.L D5,-(A7)> Δ-4 {[-2-]|[4, 'D5']}
<Const 0x2387a 0x33.4> Δ-4 {[-2-]|[4, 'D5']|[##51]}
<Const 0x2387e 0x5.4> Δ-4 {[-2-]|[4, 'D5']|[##51]|[##5]}
<Call 0x23882 0x232fe> {[-2-]|[4, 'D5']|[##51]|[##5]}
<POP 23884-23886 StackAdj> Δ+12 {[-2-]}
<MI 23886 TST.B (A7)+> Δ+2 {}
<MI 23888 BEQ 0x23894> {}
<POP 2388a-23894 Naked> Σ0 →0x238b2
<MI 2388a MOVE.L D5,-(A7)> Δ-4 {[4, 'D5']}
<Call 0x2388c 0x236c0> {[4, 'D5']}
<POP 23890-23892 StackAdj> Δ+4 {}
<MI 23892 BRA 0x238b2> {}
<POP 23894-238a8 Naked> Σ0 ↓ →0x238b2 ←0x23872 ←0x23876
<POP 23894-23896 StackAdj> Δ-2 {[-2-]}
<MI 23896 MOVE.L D5,-(A7)> Δ-4 {[-2-]|[4, 'D5']}
<Const 0x23898 0x38.4> Δ-4 {[-2-]|[4, 'D5']|[##56]}
<Const 0x2389c 0x8.4> Δ-4 {[-2-]|[4, 'D5']|[##56]|[##8]}
<Call 0x238a0 0x232fe> {[-2-]|[4, 'D5']|[##56]|[##8]}
<POP 238a2-238a4 StackAdj> Δ+12 {[-2-]}
<MI 238a4 TST.B (A7)+> Δ+2 {}
<MI 238a6 BEQ 0x238b2> {}
<POP 238a8-238ac Naked> Σ0 ↓ →0x238b0
<MI 238a8 TST.L D7> {}
<MI 238aa BNE 0x238b0> {}
<POP 238ac-238b0 Naked> Σ0 →0x238b2
<MI 238ac MOVE.L D5,D6> {}
<MI 238ae BRA 0x238b2> {}
<POP 238b0-238b2 Naked> Σ0 ↓ ←0x238a8
<MI 238b0 SUBQ.L #0x1,D7> {}
<POP 238b2-238b6 Naked> Σ0 ↓ →0x238b8 ←0x23828 ←0x2386e ←0x2388a ←0x23894 ←0x238ac
<MI 238b2 TST.L D6> {}
<MI 238b4 BNE 0x238b8> {}
<POP 238b6-238b8 Naked> Σ0 ↓
<MI 238b6 ADDQ.L #0x1,D5> {}
<POP 238b8-238be Naked> Σ0 →0x23814 ←0x238b2
<MI 238b8 BRA 0x23814> {}
<POP 238be-238c6 Naked> Σ0 ↓ →0x238d4 ←0x23814 ←0x2381c
<MI 238be TST.B 0x2799a> {}
<MI 238c4 BNE 0x238d4> {}
<POP 238c6-238d4 Naked> Σ0 ↓
<Const 0x238c6 0x2799c.4> Δ-4 {[##162204]}
<Call 0x238cc 0x102bc> {[##162204]}
FreeString(VAR a : String)
<POP 238d2-238d4 StackAdj> Δ+4 {}
<POP 238d4-238d8 Naked> Σ0 ↓ →0x23900 ←0x238be
<MI 238d4 TST.B 0x27990> {}
<MI 238d6 BNE 0x23900> {}
<POP 238d8-23900 Naked> Σ0 ↓
<Blob 0x238d8 [26] @> Δ-26 {[«26""»]}
<POP 238e4-238e6 StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x238e6 26> {[«26""»]|[$$No case alternative found!]}
<Call 0x238f8 0x22e28> {[«26""»]|[$$No case alternative found!]}
<POP 238fc-23900 StackAdj> Δ+30 {}
<POP 23900-23904 Naked> Σ0 ↓ →0x23932 ←0x238d4
<MI 23900 TST.L D6> {}
<MI 23902 BNE 0x23932> {}
<POP 23904-23932 Naked> Σ0 ↓
<Blob 0x23904 [20] @> Δ-20 {[«20""»]}
<POP 23916-23918 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x23918 19> {[«20""»]|[$$No [ENDCASE] found!]}
<Call 0x2392a 0x22e28> {[«20""»]|[$$No [ENDCASE] found!]}
<POP 2392e-23932 StackAdj> Δ+24 {}
<POP 23932-23946 Naked> Σ0 ↓ →0x23950 ←0x23900
<MI 23932 MOVEA.L (A6+0x8),A0> {}
<MI 23936 MOVE.L D6,(A0)> {}
<MI 23938 MOVEA.L (A6+0x10),A0> {}
<MI 2393c MOVE.L 0x27992,(A0)> {}
<MI 23942 TST.L 0x27996> {}
<MI 23944 BNE 0x23950> {}
<POP 23946-23950 Naked> Σ0 →0x23956
<MI 23946 MOVEA.L (A6+0xc),A0> {}
<MI 2394a MOVE.L D6,(A0)> {}
<MI 2394c SUBQ.L #0x1,(A0)> {}
<MI 2394e BRA 0x23956> {}
<POP 23950-23956 Naked> Σ0 ↓ ←0x23932
<MI 23950 MOVEA.L (A6+0xc),A0> {}
<MI 23954 MOVE.L 0x27996,(A0)> {}
<POP 23956-2395e Epilogue> Σ0 ←0x23946
@ 2395e
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x010 @ 4(r)>
<POP 2395e-239d2 Body>
<POP 2395e-23974 Prologue> Σ0 ↓
<POP 23974-2397e RegCacheLoad> Σ0 ↓
<POP 2397e-239ca Naked> Σ0 ↓
<MI 2397e MOVE.L 0x2797e,D6> {}
<MI 23980 CLR.B 0x2799a> {}
<MI 23986 MOVE.L (A6+0x8),0x2799c> {}
<MI 2398e MOVE.L 0x2797e,D7> {}
<Pointer.fp 0x23990 <LVAR -0x010 @ 4(r)>> Δ-4 {[@@-16]}
<Pointer.fp 0x23992 <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-16]|[@@-12]}
<Pointer.fp 0x23996 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-16]|[@@-12]|[@@-8]}
<Call 0x2399a 0x237d6> {[@@-16]|[@@-12]|[@@-8]}
<POP 2399e-239a2 StackAdj> Δ+12 {}
<MI 239a2 MOVE.L D6,0x2797e> {}
<MI 239a4 MOVE.L (A6-0x8),D0> {}
<MI 239a8 ADDI.L #0x00000009,D0> {}
<MI 239ae MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 239b0 SUB.L (A6-0xc),D0> {[4, 'D0']}
<MI 239b4 SUBQ.L #0x1,D0> {[4, 'D0']}
<MI 239b6 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']|[4, 'D0']}
<Call 0x239b8 0x23384> {[4, 'D0']|[4, 'D0']}
<POP 239bc-239be StackAdj> Δ+4 {[4, 'D0']}
<MI 239be MOVE.L (A6-0x10),(A7)> {[4, '(A6-0x10)']}
<MI 239c0 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']|[4, '(A6-0x10)']}
<MI 239c2 SUB.L D7,(A7)> {[4, '(A6-0x10)']|[-4-]}
<Call 0x239c4 0x23384> {[4, '(A6-0x10)']|[-4-]}
<POP 239c8-239ca StackAdj> Δ+8 {}
<POP 239ca-239d2 Epilogue> Σ0
@ 239d2
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x010 @ 4(r)>
<POP 239d2-23a50 Body>
<POP 239d2-239e8 Prologue> Σ0 ↓
<POP 239e8-239f2 RegCacheLoad> Σ0 ↓
<POP 239f2-23a48 Naked> Σ0 ↓
<MI 239f2 MOVE.L 0x2797e,D6> {}
<MI 239f4 MOVE.B #0x01,0x2799a> {}
<MI 239fc MOVE.L (A6+0x8),0x279a0> {}
<MI 23a04 MOVE.L (A6+0xc),0x279a4> {}
<MI 23a0c MOVE.L 0x2797e,D7> {}
<Pointer.fp 0x23a0e <LVAR -0x010 @ 4(r)>> Δ-4 {[@@-16]}
<Pointer.fp 0x23a10 <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-16]|[@@-12]}
<Pointer.fp 0x23a14 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-16]|[@@-12]|[@@-8]}
<Call 0x23a18 0x237d6> {[@@-16]|[@@-12]|[@@-8]}
<POP 23a1c-23a20 StackAdj> Δ+12 {}
<MI 23a20 MOVE.L D6,0x2797e> {}
<MI 23a22 MOVE.L (A6-0x8),D0> {}
<MI 23a26 ADDI.L #0x00000009,D0> {}
<MI 23a2c MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 23a2e SUB.L (A6-0xc),D0> {[4, 'D0']}
<MI 23a32 SUBQ.L #0x1,D0> {[4, 'D0']}
<MI 23a34 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']|[4, 'D0']}
<Call 0x23a36 0x23384> {[4, 'D0']|[4, 'D0']}
<POP 23a3a-23a3c StackAdj> Δ+4 {[4, 'D0']}
<MI 23a3c MOVE.L (A6-0x10),(A7)> {[4, '(A6-0x10)']}
<MI 23a3e MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']|[4, '(A6-0x10)']}
<MI 23a40 SUB.L D7,(A7)> {[4, '(A6-0x10)']|[-4-]}
<Call 0x23a42 0x23384> {[4, '(A6-0x10)']|[-4-]}
<POP 23a46-23a48 StackAdj> Δ+8 {}
<POP 23a48-23a50 Epilogue> Σ0
@ 23a50
<LVAR 0x010 4(rw)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 23a50-23a88 Body>
<POP 23a50-23a66 Prologue> Σ0 ↓
<POP 23a66-23a6c Naked> Σ0 ↓ →0x23a72
<MI 23a66 TST.L (A6+0x8)> {}
<MI 23a6a BNE 0x23a72> {}
<POP 23a6c-23a72 Naked> Σ0 →0x23a80
<MI 23a6c CLR.L (A6+0x10)> {}
<MI 23a70 BRA 0x23a80> {}
<POP 23a72-23a80 Naked> Σ0 ↓ ←0x23a66
<MI 23a72 MOVE.L (A6+0xc),D0> {}
<MI 23a76 SUB.L (A6+0x8),D0> {}
<MI 23a7a ADDQ.L #0x1,D0> {}
<MI 23a7c MOVE.L D0,(A6+0x10)> {}
<POP 23a80-23a88 Epilogue> Σ0 ←0x23a6c
@ 23a88
<LVAR 0x014 4(w)>
<LVAR 0x010 @ 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 23a88-23aea Body> Δ-4
<POP 23a88-23a9e Prologue> Σ0 ↓
<POP 23a9e-23ab4 Naked> Σ0 Δ-4 ↓
<MI 23a9e MOVEA.L (A6+0xc),A4> {}
<MI 23aa2 MOVE.L 0x22d40,(A6+0x10)> {}
<MI 23aa8 MOVE.L 0x22d44,(A6+0x14)> {}
<MI 23aae MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 23ab2 MOVEQ.L #0x00,D7> {[4, '(A6+0x8)']}
<POP 23ab4-23ab8 Naked> Σ-4 ↓ →0x23ae0 ←0x23adc
<MI 23ab4 CMP.L (A7),D7> {[-4-]}
<MI 23ab6 BGT 0x23ae0> {[-4-]}
<POP 23ab8-23abe Naked> Σ-4 ↓ →0x23ac2
<MI 23ab8 CMPA.W #0x1,A4> {[-4-]}
<MI 23abc BNE 0x23ac2> {[-4-]}
<POP 23abe-23ac2 Naked> Σ-4 Δ+4 →0x23ae2
<POP 23abe-23ac0 StackAdj> Δ+4 {}
<MI 23ac0 BRA 0x23ae2> {}
<POP 23ac2-23ac8 Naked> Σ-4 ↓ →0x23ad8 ←0x23ab8
<MI 23ac2 CMP.L (A6+0x8),D7> {[-4-]}
<MI 23ac6 BNE 0x23ad8> {[-4-]}
<POP 23ac8-23ad8 Naked> Σ-4 →0x23adc
<MI 23ac8 LEA.L (A6+0x10),A0> {[-4-]}
<MI 23acc MOVEA.L A4,A1> {[-4-]}
<BlockMove 8,A1,A0> {[-4-]}
<MI 23ad6 BRA 0x23adc> {[-4-]}
<POP 23ad8-23adc Naked> Σ-4 ↓ ←0x23ac2
<MI 23ad8 MOVEA.L (A4+0x8),A4> {[-4-]}
<POP 23adc-23ae0 Naked> Σ-4 ↓ →0x23ab4 ←0x23ac8
<MI 23adc ADDQ.L #0x1,D7> {[-4-]}
<MI 23ade BVC 0x23ab4> {[-4-]}
<POP 23ae0-23ae2 Naked> Σ-4 Δ+4 ↓ ←0x23ab4
<POP 23ae0-23ae2 StackAdj> Δ+4 {}
<POP 23ae2-23aea Epilogue> Σ0 ←0x23abe
@ 23aea
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 4(r)>
<POP 23aea-23b66 Body> Δ-4
<POP 23aea-23b00 Prologue> Σ0 ↓
<POP 23b00-23b04 RegCacheLoad> Σ0 ↓
<POP 23b04-23b1c Naked> Σ0 Δ-4 ↓
<Pointer.fp 0x23b04 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Call 0x23b06 0x102b8> {[@@-8]}
NewString(VAR a : String)
<MI 23b0c MOVE.L (A6+0xc),-(A7)> Δ-4 {[@@-8]|[4, '(A6+0xc)']}
<MI 23b10 MOVE.L (A6+0x8),-(A7)> Δ-4 {[@@-8]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x23b14 0x23a50> {[@@-8]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 23b18-23b1a StackAdj> Δ+8 {[@@-8]}
<MI 23b1a MOVEQ.L #0x01,D7> {[@@-8]}
<POP 23b1c-23b20 Naked> Σ-4 ↓ →0x23b58 ←0x23b48
<MI 23b1c CMP.L (A7),D7> {[-4-]}
<MI 23b1e BGT 0x23b58> {[-4-]}
<POP 23b20-23b44 Naked> Σ-4 ↓ →0x23b48
<MI 23b20 MOVE.L D7,D0> {[-4-]}
<MI 23b22 ADD.L (A6+0x8),D0> {[-4-]}
<MI 23b26 SUBQ.L #0x1,D0> {[-4-]}
<MI 23b28 SUBQ.L #0x1,D0> {[-4-]}
<POP 0x23b2a LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-4-]}
<MI 23b34 LEA.L 0x26976,A0> {[-4-]}
<MI 23b3a MOVE.B (A0+D0.L+#0x8),D6> {[-4-]}
<MI 23b3e CMPI.B #0x2f,D6> {[-4-]}
<MI 23b42 BNE 0x23b48> {[-4-]}
<POP 23b44-23b48 Naked> Σ-4 Δ+4 →0x23b5a
<POP 23b44-23b46 StackAdj> Δ+4 {}
<MI 23b46 BRA 0x23b5a> {}
<POP 23b48-23b58 Naked> Σ-4 ↓ →0x23b1c ←0x23b20
<MI 23b48 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x8)']}
<MI 23b4a MOVE.B D6,-(A7)> Δ-2 {[-4-]|[4, '(A6-0x8)']|[2, 'D6']}
<Call 0x23b4c 0x102c0> {[-4-]|[4, '(A6-0x8)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 23b52-23b54 StackAdj> Δ+6 {[-4-]}
<MI 23b54 ADDQ.L #0x1,D7> {[-4-]}
<MI 23b56 BVC 0x23b1c> {[-4-]}
<POP 23b58-23b5a Naked> Σ-4 Δ+4 ↓ ←0x23b1c
<POP 23b58-23b5a StackAdj> Δ+4 {}
<POP 23b5a-23b5e Naked> Σ0 ↓ ←0x23b44
<MI 23b5a MOVE.L (A6-0x8),(A6+0x10)> {}
<POP 23b5e-23b66 Epilogue> Σ0
@ 23b66
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 23b66-23b98 Body>
<POP 23b66-23b78 Prologue> Σ0 ↓
<POP 23b78-23b94 Naked> Σ0 ↓
<POP 23b78-23b7c StackAdj> Δ-12 {[-12-]}
<MI 23b7c MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']}
<MI 23b80 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x23b84 0x23a88> {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 23b88-23b8a StackAdj> Δ+8 {[-12-]}
<Call 0x23b8a 0x23aea> {[-12-]}
<POP 23b8e-23b90 StackAdj> Δ+8 {[-4-]}
<MI 23b90 MOVE.L (A7)+,(A6+0x10)> Δ+4 {}
<POP 23b94-23b98 Epilogue> Σ0
@ 23b98
<LVAR 0x014 4(w)>
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 23b98-23bd4 Body>
<POP 23b98-23baa Prologue> Σ0 ↓
<POP 23baa-23bd0 Naked> Σ0 ↓
<POP 23baa-23bae StackAdj> Δ-12 {[-12-]}
<MI 23bae MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']}
<MI 23bb2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x23bb6 0x23b66> {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 23bba-23bbc StackAdj> Δ+8 {[-12-]}
<Const 0x23bbc 0x10.4> Δ-4 {[-12-]|[##16]}
<Call 0x23bc0 0x10360> {[-12-]|[##16]}
?StringToInt64()
<POP 23bc6-23bc8 StackAdj> Δ+8 {[-8-]}
<MI 23bc8 MOVE.L (A7)+,(A6+0x10)> Δ+4 {[-4-]}
<MI 23bcc MOVE.L (A7)+,(A6+0x14)> Δ+4 {}
<POP 23bd0-23bd4 Epilogue> Σ0
@ 23bd4
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 23bd4-23c08 Body>
<POP 23bd4-23be6 Prologue> Σ0 ↓
<POP 23be6-23c04 Naked> Σ0 ↓
<POP 23be6-23bea StackAdj> Δ-12 {[-12-]}
<MI 23bea MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']}
<MI 23bee MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x23bf2 0x23b98> {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 23bf6-23bf8 StackAdj> Δ+8 {[-12-]}
<Call 0x23bf8 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 23bfe-23c00 StackAdj> Δ+8 {[-4-]}
<MI 23c00 MOVE.L (A7)+,(A6+0x10)> Δ+4 {}
<POP 23c04-23c08 Epilogue> Σ0
@ 23c08
<LVAR 0x008 @ 4(r)>
<POP 23c08-23c90 Body>
<POP 23c08-23c1e Prologue> Σ0 ↓
<POP 23c1e-23c24 RegCacheLoad> Σ0 ↓
<POP 23c24-23c42 Naked> Σ0 Δ-8 ↓
<MI 23c24 MOVEA.L (A6+0x8),A0> {}
<MI 23c28 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Blob 0x23c2a [4] 0x2797e> Δ-4 {[4, 'A0']|[«4»]}
<MI 23c2c MOVE.W (A0),D0> {[4, 'A0']|[«4»]}
<MI 23c2e EXTW.L D0> {[4, 'A0']|[«4»]}
<MI 23c30 NEG.L D0> {[4, 'A0']|[«4»]}
<MI 23c32 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[«4»]|[4, 'D0']}
<Call 0x23c34 0x23384> {[4, 'A0']|[«4»]|[4, 'D0']}
<POP 23c38-23c3a StackAdj> Δ+8 {[4, 'A0']}
<MI 23c3a MOVE.W (A0),D0> {[4, 'A0']}
<MI 23c3c EXTW.L D0> {[4, 'A0']}
<MI 23c3e MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<MI 23c40 MOVEQ.L #0x01,D7> {[4, 'A0']|[4, 'D0']}
<POP 23c42-23c46 Naked> Σ-8 ↓ →0x23c7a ←0x23c46
<MI 23c42 CMP.L (A7),D7> {[-8-]}
<MI 23c44 BGT 0x23c7a> {[-8-]}
<POP 23c46-23c7a Naked> Σ-8 ↓ →0x23c42
<MI 23c46 MOVE.L D7,D0> {[-8-]}
<MI 23c48 ADD.L 0x2797e,D0> {[-8-]}
<MI 23c4a SUBQ.L #0x1,D0> {[-8-]}
<MI 23c4c SUBQ.L #0x1,D0> {[-8-]}
<POP 0x23c4e LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-8-]}
<MI 23c58 LEA.L 0x26976,A0> {[-8-]}
<MI 23c5e MOVE.L D7,D1> {[-8-]}
<MI 23c60 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x23c62 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 23c6c MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 23c70 MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8)> {[-8-]}
<MI 23c76 ADDQ.L #0x1,D7> {[-8-]}
<MI 23c78 BVC 0x23c42> {[-8-]}
<POP 23c7a-23c88 Naked> Σ-8 Δ+8 ↓ ←0x23c42
<POP 23c7a-23c7c StackAdj> Δ+8 {}
<Pointer.fp 0x23c7c <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x23c80 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 23c86-23c88 StackAdj> Δ+4 {}
<POP 23c88-23c90 Epilogue> Σ0
@ 23c90
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 23c90-23cc4 Body>
<POP 23c90-23ca2 Prologue> Σ0 ↓
<POP 23ca2-23cc0 Naked> Σ0 ↓
<POP 23ca2-23ca4 StackAdj> Δ-4 {[-4-]}
<MI 23ca4 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 23ca8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Const 0x23cac 0x10.4> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[##16]}
<Call 0x23cb0 0x1035c> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[##16]}
Quad2String(a : Quad; radix : Long ) : String
<POP 23cb6-23cba StackAdj> Δ+12 {[-4-]}
<Call 0x23cba 0x23c08> {[-4-]}
<POP 23cbe-23cc0 StackAdj> Δ+4 {}
<POP 23cc0-23cc4 Epilogue> Σ0
@ 23cc4
<LVAR 0x008 4(r)>
<POP 23cc4-23cee Body>
<POP 23cc4-23cd6 Prologue> Σ0 ↓
<POP 23cd6-23cea Naked> Σ0 ↓
<POP 23cd6-23cd8 StackAdj> Δ-4 {[-4-]}
<MI 23cd8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x23cdc 0x102e4> {[-4-]|[4, '(A6+0x8)']}
Long2String(a : Long) : String
<POP 23ce2-23ce4 StackAdj> Δ+4 {[-4-]}
<Call 0x23ce4 0x23c08> {[-4-]}
<POP 23ce8-23cea StackAdj> Δ+4 {}
<POP 23cea-23cee Epilogue> Σ0
@ 23cee
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 4(rw)>
<POP 23cee-23dc2 Body>
<POP 23cee-23d04 Prologue> Σ0 ↓
<POP 23d04-23d0c RegCacheLoad> Σ0 ↓
<POP 23d0c-23d1e Naked> Σ0 ↓
<MI 23d0c MOVEA.L (A6+0x8),A0> {}
<MI 23d10 MOVE.L (A0+0x8),(A6-0x8)> {}
<Pointer.fp 0x23d14 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x23d16 0x102b8> {[@@-4]}
NewString(VAR a : String)
<POP 23d1c-23d1e StackAdj> Δ+4 {}
<POP 23d1e-23d2a Naked> Σ0 ↓ →0x23db0 ←0x23d96
<MI 23d1e MOVEA.L (A6-0x8),A0> {}
<MI 23d20 CMPA.W #0x1,A0> {}
<MI 23d24 BEQ 0x23db0> {}
<POP 23d2a-23d2e Naked> Σ0 ↓ →0x23d96
<MI 23d2a TST.L (A0)> {}
<MI 23d2c BEQ 0x23d96> {}
<POP 23d2e-23d38 Naked> Σ0 Δ-4 ↓ →0x23d4c
<MI 23d2e MOVE.L (A0+0x4),-(A7)> Δ-4 {[4, '(A0+0x4)']}
<MI 23d32 MOVE.L (A0),D7> {[4, '(A0+0x4)']}
<MI 23d34 CMP.L (A7),D7> {[4, '(A0+0x4)']}
<MI 23d36 BGT 0x23d4c> {[4, '(A0+0x4)']}
<POP 23d38-23d4c Naked> Σ-4 ↓
<MI 23d38 MOVE.L (A7),D0> {[-4-]}
<POP 0x23d3a LimitCheck -0x7fffffff ≤ D7> {[-4-]}
<MI 23d3a CMPI.L #0x80000001,D7>
<MI 23d40 BLT 0x23d4a>
<POP 0x23d42 LimitCheck D0 ≤ 0x7fffffff> {[-4-]}
<MI 23d42 CMPI.L #0x7fffffff,D0>
<MI 23d48 BLE 0x23d4c>
<MI 23d4a TRAP #15>
<POP 23d4c-23d50 Naked> Σ-4 ↓ →0x23d94 ←0x23d2e ←0x23d90
<MI 23d4c CMP.L (A7),D7> {[-4-]}
<MI 23d4e BGT 0x23d94> {[-4-]}
<POP 23d50-23d7c Naked> Σ-4 ↓ →0x23d90
<MI 23d50 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']}
<MI 23d52 MOVE.L D7,D0> {[-4-]|[4, '(A6-0x4)']}
<MI 23d54 SUBQ.L #0x1,D0> {[-4-]|[4, '(A6-0x4)']}
<POP 0x23d56 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-4-]|[4, '(A6-0x4)']}
<MI 23d60 LEA.L 0x26976,A0> {[-4-]|[4, '(A6-0x4)']}
<MI 23d66 MOVE.B (A0+D0.L+#0x8),-(A7)> Δ-2 {[-4-]|[4, '(A6-0x4)']|[2, '(A0+D0.L+#0x8)']}
<Call 0x23d6a 0x102c0> {[-4-]|[4, '(A6-0x4)']|[2, '(A0+D0.L+#0x8)']}
AppendChar(MOD b : String; a : char)
<POP 23d70-23d72 StackAdj> Δ+6 {[-4-]}
<MI 23d72 MOVEA.L (A6-0x4),A0> {[-4-]}
<MI 23d74 MOVE.W (A0),D0> {[-4-]}
<MI 23d76 CMPI.W #0x007a,D0> {[-4-]}
<MI 23d7a BLT 0x23d90> {[-4-]}
<POP 23d7c-23d90 Naked> Σ-4 ↓
<MI 23d7c MOVE.L (A6-0x4),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']}
<Call 0x23d7e 0x103d8> {[-4-]|[4, '(A6-0x4)']}
WriteConsoleString(str : String)
<POP 23d84-23d86 StackAdj> Δ+4 {[-4-]}
<Pointer.fp 0x23d86 <LVAR -0x004 @ 4(r)>> Δ-4 {[-4-]|[@@-4]}
<Call 0x23d88 0x102b8> {[-4-]|[@@-4]}
NewString(VAR a : String)
<POP 23d8e-23d90 StackAdj> Δ+4 {[-4-]}
<POP 23d90-23d94 Naked> Σ-4 ↓ →0x23d4c ←0x23d50
<MI 23d90 ADDQ.L #0x1,D7> {[-4-]}
<MI 23d92 BVC 0x23d4c> {[-4-]}
<POP 23d94-23d96 Naked> Σ-4 Δ+4 ↓ ←0x23d4c
<POP 23d94-23d96 StackAdj> Δ+4 {}
<POP 23d96-23db0 Naked> Σ0 →0x23d1e ←0x23d2a
<MI 23d96 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<Const 0x23d98 0x20.2> Δ-2 {[4, '(A6-0x4)']|[#32]}
<Call 0x23d9c 0x102c0> {[4, '(A6-0x4)']|[#32]}
AppendChar(MOD b : String; a : char)
<POP 23da2-23da4 StackAdj> Δ+6 {}
<MI 23da4 MOVEA.L (A6-0x8),A0> {}
<MI 23da6 MOVE.L (A0+0x8),(A6-0x8)> {}
<MI 23daa BRA 0x23d1e> {}
<POP 23db0-23dba Naked> Σ0 ↓ ←0x23d1e
<MI 23db0 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<Call 0x23db2 0x103e0> {[4, '(A6-0x4)']}
WriteConsoleStringCrLf(str : String)
<POP 23db8-23dba StackAdj> Δ+4 {}
<POP 23dba-23dc2 Epilogue> Σ0
@ 23dc2
TRY_HLP_FILE(?)
<LVAR 0x008 @ 4(r)>
<LVAR -0x003 @ 1(r)>
<LVAR -0x004 @ 1(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(rw)>
<POP 23dc2-23ecc Body>
<POP 23dc2-23dd8 Prologue> Σ0 ↓
<POP 23dd8-23dea RegCacheLoad> Σ0 ↓
<POP 23dea-23e30 Naked> Σ0 ↓ →0x23e66
<Blob 0x23dea [4] @> Δ-4 {[«4""»]}
<POP 23dee-23df0 StackAdj> Δ-8 {[«4""»]|[-8-]}
<MI 23df0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«4""»]|[-8-]|[4, '(A6+0x8)']}
<Call 0x23df2 0x102cc> {[«4""»]|[-8-]|[4, '(A6+0x8)']}
StringDup(a : String) : String
<Lit 0x23df8 4> {[«4""»]|[-8-]|[$$.HLP]}
<Call 0x23e0a 0x102d0> {[«4""»]|[-8-]|[$$.HLP]}
StringCat2(a, b : String) : String
<POP 23e10-23e12 StackAdj> Δ+8 {[«4""»]|[-4-]}
<MI 23e12 MOVE.L (A7)+,(A6-0xc)> Δ+4 {[«4""»]}
<MI 23e14 MOVE.L (A6-0xc),(A7)> {[4, '(A6-0xc)']}
<MI 23e16 CLR.B -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]}
<MI 23e18 CLR.B -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]|[#0]}
<Const 0x23e1a 0x0.4> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[##0]}
<Pointer.fp 0x23e1e <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[##0]|[@@-4]}
<Pointer.fp 0x23e20 <LVAR -0x008 @ 4(r)>> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[##0]|[@@-4]|[@@-8]}
<Call 0x23e22 0x10380> {[4, '(A6-0xc)']|[#0]|[#0]|[##0]|[@@-4]|[@@-8]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 23e28-23e2c StackAdj> Δ+20 {}
<MI 23e2c TST.B (A6-0x4)> {}
<MI 23e2e BEQ 0x23e66> {}
<POP 23e30-23e66 Naked> Σ0 →0x23eba
<Blob 0x23e30 [22] @> Δ-22 {[«22""»]}
<POP 23e3c-23e3e StackAdj> Δ-8 {[«22""»]|[-8-]}
<Lit 0x23e3e 22> {[«22""»]|[-4-]|[$$No help available for_]}
<POP 23e4e-23e50 StackAdj> Δ-4 {[«22""»]|[-4-]|[$$No help available for_]|[-4-]}
<MI 23e50 MOVE.L (A6+0x8),(A7)> {[«22""»]|[-4-]|[$$No help available for_]|[4, '(A6+0x8)']}
<Call 0x23e52 0x102d0> {[«22""»]|[-4-]|[$$No help available for_]|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 23e58-23e5a StackAdj> Δ+8 {[«22""»]|[-4-]}
<Call 0x23e5a 0x103e0> {[«22""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23e60-23e64 StackAdj> Δ+26 {}
<MI 23e64 BRA 0x23eba> {}
<POP 23e66-23e7e Naked> Σ0 ↓ →0x23e92 ←0x23dea ←0x23e92
<MI 23e66 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<Pointer.fp 0x23e68 <LVAR 0x008 @ 4(r)>> Δ-4 {[4, '(A6-0x8)']|[@@8]}
<Pointer.fp 0x23e6a <LVAR -0x003 @ 1(r)>> Δ-4 {[4, '(A6-0x8)']|[@@8]|[@@-3]}
<Call 0x23e6e 0x1043c> {[4, '(A6-0x8)']|[@@8]|[@@-3]}
FileReadLine(file : File; VAR a : String; VAR b : Byte)
<POP 23e74-23e78 StackAdj> Δ+12 {}
<MI 23e78 TST.B (A6-0x3)> {}
<MI 23e7c BNE 0x23e92> {}
<POP 23e7e-23e92 Naked> Σ0 ↓
<POP 23e7e-23e80 StackAdj> Δ-4 {[-4-]}
<MI 23e80 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x23e82 0x102cc> {[-4-]|[4, '(A6+0x8)']}
StringDup(a : String) : String
<POP 23e88-23e8a StackAdj> Δ+4 {[-4-]}
<Call 0x23e8a 0x103e0> {[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23e90-23e92 StackAdj> Δ+4 {}
<POP 23e92-23e98 Naked> Σ0 ↓ →0x23e66 ←0x23e66
<MI 23e92 TST.B (A6-0x3)> {}
<MI 23e96 BEQ 0x23e66> {}
<POP 23e98-23eba Naked> Σ0 ↓
<MI 23e98 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x23e9a 0x2.2> Δ-2 {[#0]|[#2]}
<Const 0x23e9e 0x1.4> Δ-4 {[#0]|[#2]|[##1]}
<Pointer.fp 0x23ea2 <LVAR -0x004 @ 1(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-4]}
<Pointer.fp 0x23ea4 <LVAR -0x008 @ 4(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-4]|[@@-8]}
<Call 0x23ea6 0x1038c> {[#0]|[#2]|[##1]|[@@-4]|[@@-8]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 23eac-23eb0 StackAdj> Δ+16 {}
<Pointer.fp 0x23eb0 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x23eb2 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 23eb8-23eba StackAdj> Δ+4 {}
<POP 23eba-23ec4 Naked> Σ0 ↓ ←0x23e30
<Pointer.fp 0x23eba <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x23ebc 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<POP 23ec2-23ec4 StackAdj> Δ+4 {}
<POP 23ec4-23ecc Epilogue> Σ0
@ 23ecc
<LVAR 0x008 4(r)>
<POP 23ecc-23f4e Body>
<POP 23ecc-23ee2 Prologue> Σ0 ↓
<POP 23ee2-23ef2 Naked> Σ0 ↓ →0x23f20
<POP 23ee2-23ee4 StackAdj> Δ-4 {[-4-]}
<MI 23ee4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x23ee8 0x2323c> {[-4-]|[4, '(A6+0x8)']}
<POP 23eec-23eee StackAdj> Δ+4 {[-4-]}
<MI 23eee MOVE.L (A7)+,D6> Δ+4 {}
<MI 23ef0 BNE 0x23f20> {}
<POP 23ef2-23f20 Naked> Σ0 →0x23f46
<Blob 0x23ef2 [10] 0x27990> Δ-10 {[«10»]}
<POP 23f00-23f02 StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x23f02> {[«10»]|[$$…]}
<Pointer.sp 0x23f02 4> Δ-4
<Const 0x23f06 0x1.2> Δ-2
<Const 0x23f0a 0xa.2> Δ-2
<Call 0x23f0e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23f14-23f16 StackAdj> Δ+8
<Call 0x23f16 0x23dc2> {[«10»]|[$$…]}
TRY_HLP_FILE(?)
<POP 23f1a-23f1e StackAdj> Δ+14 {}
<MI 23f1e BRA 0x23f46> {}
<POP 23f20-23f24 Naked> Σ0 Δ-4 ↓ ←0x23ee2
<MI 23f20 MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']}
<MI 23f22 MOVEQ.L #0x01,D7> {[4, 'D6']}
<POP 23f24-23f28 Naked> Σ-4 ↓ →0x23f44 ←0x23f28
<MI 23f24 CMP.L (A7),D7> {[-4-]}
<MI 23f26 BGT 0x23f44> {[-4-]}
<POP 23f28-23f44 Naked> Σ-4 ↓ →0x23f24
<POP 23f28-23f2a StackAdj> Δ-4 {[-8-]}
<MI 23f2a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<MI 23f2e MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x23f30 0x23b66> {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<POP 23f34-23f36 StackAdj> Δ+8 {[-8-]}
<MI 23f36 MOVEA.L (A7)+,A4> Δ+4 {[-4-]}
<MI 23f38 MOVE.L A4,-(A7)> Δ-4 {[-4-]|[4, 'A4']}
<Call 0x23f3a 0x23dc2> {[-4-]|[4, 'A4']}
TRY_HLP_FILE(?)
<POP 23f3e-23f40 StackAdj> Δ+4 {[-4-]}
<MI 23f40 ADDQ.L #0x1,D7> {[-4-]}
<MI 23f42 BVC 0x23f24> {[-4-]}
<POP 23f44-23f46 Naked> Σ-4 Δ+4 ↓ ←0x23f24
<POP 23f44-23f46 StackAdj> Δ+4 {}
<POP 23f46-23f4e Epilogue> Σ0 ←0x23ef2
@ 23f4e
<LVAR 0x00c @>
<LVAR 0x008 @ 4(r)>
<LVAR -0x020 @>
<POP 23f4e-23fd0 Body>
<POP 23f4e-23f64 Prologue> Σ0 ↓
<POP 23f64-23f66 RegCacheLoad> Σ0 ↓
<POP 23f66-23f68 Naked> Σ0 ↓
<MI 23f66 MOVEQ.L #0x01,D7> {}
<POP 23f68-23f74 Naked> Σ0 ↓ →0x23f84 ←0x23fa2
<MI 23f68 MOVEA.L (A6+0x8),A0> {}
<MI 23f6c MOVE.W (A0),D0> {}
<MI 23f6e EXTW.L D0> {}
<MI 23f70 CMP.L D0,D7> {}
<MI 23f72 BLE 0x23f84> {}
<POP 23f74-23f84 Naked> Σ0 →0x23fa2
<MI 23f74 MOVE.L D7,D0> {}
<MI 23f76 SUBQ.L #0x1,D0> {}
<POP 0x23f78 LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 23f7e CLR.B (A6+D0.L-#0x20)> {}
<MI 23f82 BRA 0x23fa2> {}
<POP 23f84-23fa2 Naked> Σ0 ↓ ←0x23f68
<MI 23f84 MOVE.L D7,D0> {}
<MI 23f86 SUBQ.L #0x1,D0> {}
<POP 0x23f88 LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 23f8e MOVE.L D7,D1> {}
<MI 23f90 SUBQ.L #0x1,D1> {}
<POP 0x23f92 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {}
<MI 23f9c MOVE.B (A0+D1.L+#0x2),(A6+D0.L-#0x20)> {}
<POP 23fa2-23fac Naked> Σ0 ↓ →0x23f68 ←0x23f74
<MI 23fa2 ADDQ.L #0x1,D7> {}
<MI 23fa4 CMPI.L #0x0000001e,D7> {}
<MI 23faa BLE 0x23f68> {}
<POP 23fac-23fc8 Naked> Σ0 ↓
<Pointer.fp 0x23fac <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x23fb0 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 23fb6-23fb8 StackAdj> Δ+4 {}
<MI 23fb8 LEA.L (A6+0xc),A0> {}
<MI 23fbc LEA.L (A6-0x20),A1> {}
<BlockMove 30,A1,A0> {}
<POP 23fc8-23fd0 Epilogue> Σ0
@ 23fd0
<LVAR 0x026 4(w)>
<LVAR 0x008 @>
<LVAR -0x006 4(rw)>
<POP 23fd0-24024 Body>
<POP 23fd0-23fe6 Prologue> Σ0 ↓
<POP 23fe6-23fea RegCacheLoad> Σ0 ↓
<POP 23fea-23ff2 Naked> Σ0 ↓
<MI 23fea MOVEQ.L #0x00,D7> {}
<MI 23fec MOVE.L 0x279a8,(A6-0x6)> {}
<POP 23ff2-23ffa Naked> Σ0 ↓ →0x24018 ←0x24016
<MI 23ff2 MOVEA.L (A6-0x6),A0> {}
<MI 23ff4 CMPA.W #0x1,A0> {}
<MI 23ff8 BEQ 0x24018> {}
<POP 23ffa-23ffe Naked> Σ0 ↓ →0x24018
<MI 23ffa TST.B D7> {}
<MI 23ffc BNE 0x24018> {}
<POP 23ffe-24006 Naked> Σ0 ↓
<MI 23ffe MOVEA.L A0,A1> {}
<MI 24000 LEA.L (A6+0x8),A2> {}
<MI 24004 MOVEQ.L #0x1d,D0> {}
<POP 24006-2400c Naked> Σ0 ↓ →0x24006 ←0x24006
<MI 24006 CMPM.B (A1)+,(A2)+> {}
<MI 24008 DBNE D0,0x24006> {}
<POP 2400c-2400e Naked> Σ0 ↓ →0x24012
<MI 2400c BNE 0x24012> {}
<POP 2400e-24012 Naked> Σ0 →0x24016
<MI 2400e MOVEQ.L #0x01,D7> {}
<MI 24010 BRA 0x24016> {}
<POP 24012-24016 Naked> Σ0 ↓ ←0x2400c
<MI 24012 MOVE.L (A0+0x26),(A6-0x6)> {}
<POP 24016-24018 Naked> Σ0 →0x23ff2 ←0x2400e
<MI 24016 BRA 0x23ff2> {}
<POP 24018-2401c Naked> Σ0 ↓ ←0x23ff2 ←0x23ffa
<MI 24018 MOVE.L A0,(A6+0x26)> {}
<POP 2401c-24024 Epilogue> Σ0
@ 24024
<LVAR 0x008 @ 4(r)>
<POP 24024-240aa Body>
<POP 24024-2403a Prologue> Σ0 ↓
<POP 2403a-24046 RegCacheLoad> Σ0 ↓
<POP 24046-2404c Naked> Σ0 ↓ →0x240a2
<MI 24046 MOVEA.L (A6+0x8),A0> {}
<MI 24048 CMPA.W #0x01,A0> {}
<MI 2404a BEQ 0x240a2> {}
<POP 2404c-24052 Naked> Σ0 ↓ →0x24062
<MI 2404c TST.L (A0+0x1e)> {}
<MI 24050 BEQ 0x24062> {}
<POP 24052-24062 Naked> Σ0 ↓
<MI 24052 MOVE.L (A0+0x22),-(A7)> Δ-4 {[4, '(A0+0x22)']}
<MI 24056 MOVE.L (A0+0x1e),-(A7)> Δ-4 {[4, '(A0+0x22)']|[4, '(A0+0x1e)']}
<Call 0x2405a 0x102a4> {[4, '(A0+0x22)']|[4, '(A0+0x1e)']}
Free1(a : Pointer; b : Long)
<POP 24060-24062 StackAdj> Δ+8 {}
<POP 24062-24068 Naked> Σ0 ↓ ←0x2404c
<MI 24062 MOVEQ.L #0x00,D7> {}
<MI 24064 MOVEA.W #0x01,A4> {}
<MI 24066 MOVEA.L 0x279a8,A3> {}
<POP 24068-2406c Naked> Σ0 ↓ →0x24080 ←0x2407e
<MI 24068 CMPA.W #0x01,A3> {}
<MI 2406a BEQ 0x24080> {}
<POP 2406c-24070 Naked> Σ0 ↓ →0x24080
<MI 2406c TST.B D7> {}
<MI 2406e BNE 0x24080> {}
<POP 24070-24074 Naked> Σ0 ↓ →0x24078
<MI 24070 CMPA.L (A6+0x8),A3> {}
<MI 24072 BNE 0x24078> {}
<POP 24074-24078 Naked> Σ0 →0x2407e
<MI 24074 MOVEQ.L #0x01,D7> {}
<MI 24076 BRA 0x2407e> {}
<POP 24078-2407e Naked> Σ0 ↓ ←0x24070
<MI 24078 MOVEA.L A3,A4> {}
<MI 2407a MOVEA.L (A3+0x26),A3> {}
<POP 2407e-24080 Naked> Σ0 →0x24068 ←0x24074
<MI 2407e BRA 0x24068> {}
<POP 24080-24084 Naked> Σ0 ↓ →0x240a2 ←0x24068 ←0x2406c
<MI 24080 TST.B D7> {}
<MI 24082 BEQ 0x240a2> {}
<POP 24084-24088 Naked> Σ0 ↓ →0x2408e
<MI 24084 CMPA.W #0x01,A4> {}
<MI 24086 BNE 0x2408e> {}
<POP 24088-2408e Naked> Σ0 →0x24094
<MI 24088 MOVE.L (A3+0x26),0x279a8> {}
<MI 2408c BRA 0x24094> {}
<POP 2408e-24094 Naked> Σ0 ↓ ←0x24084
<MI 2408e MOVE.L (A3+0x26),(A4+0x26)> {}
<POP 24094-240a2 Naked> Σ0 ↓ ←0x24088
<Pointer.fp 0x24094 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Const 0x24096 0x2a.4> Δ-4 {[@@8]|[##42]}
<Call 0x2409a 0x102a8> {[@@8]|[##42]}
Free2(a : Pointer; b : Long)
<POP 240a0-240a2 StackAdj> Δ+8 {}
<POP 240a2-240aa Epilogue> Σ0 ←0x24046 ←0x24080
@ 240aa
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x006 @ 4(rw)>
<LVAR -0x024 @>
<POP 240aa-24168 Body>
<POP 240aa-240c0 Prologue> Σ0 ↓
<POP 240c0-240ca RegCacheLoad> Σ0 ↓
<POP 240ca-240e8 Naked> Σ0 ↓ →0x240ea
<POP 240ca-240cc StackAdj> Δ-30 {[-30-]}
<MI 240cc MOVEA.L (A6+0xc),A0> {[-30-]}
<MI 240d0 MOVE.L (A0),-(A7)> Δ-4 {[-30-]|[4, '(A0)']}
<Call 0x240d2 0x23f4e> {[-30-]|[4, '(A0)']}
<POP 240d6-240d8 StackAdj> Δ+4 {[-30-]}
<MI 240d8 LEA.L (A6-0x24),A0> {[-30-]}
<POP 240dc-240e4 StackPop> Δ+30 {[-30-]}
<BlockMove 30,A7,A0> Δ+30
<MI 240e4 TST.L (A6+0x8)> {[-30-]}
<MI 240e6 BGE 0x240ea> {[-30-]}
<POP 240e8-240ea Naked> Σ0 ↓
<MI 240e8 CLR.L (A6+0x8)> {}
<POP 240ea-24106 Naked> Σ0 ↓ →0x24118 ←0x240ca
<POP 240ea-240ec StackAdj> Δ-4 {[-4-]}
<Blob 0x240ec [30] (A6-0x6)> Δ-30 {[-4-]|[«30»]}
<Call 0x240f6 0x23fd0> {[-4-]|[«30»]}
<POP 240fa-240fc StackAdj> Δ+30 {[-4-]}
<MI 240fc MOVE.L (A7)+,(A6-0x6)> Δ+4 {}
<MI 240fe MOVEA.L (A6-0x6),A0> {}
<MI 24100 CMPA.W #0x1,A0> {}
<MI 24104 BEQ 0x24118> {}
<POP 24106-2410e Naked> Σ0 ↓ →0x24110
<MI 24106 MOVE.L (A0+0x1e),D0> {}
<MI 2410a CMP.L (A6+0x8),D0> {}
<MI 2410c BNE 0x24110> {}
<POP 2410e-24110 Naked> Σ0 →0x2415c
<MI 2410e BRA 0x2415c> {}
<POP 24110-24118 Naked> Σ0 ↓ ←0x24106
<MI 24110 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24112 0x24024> {[4, '(A6-0x6)']}
<POP 24116-24118 StackAdj> Δ+4 {}
<POP 24118-2414c Naked> Σ0 ↓ →0x2415c ←0x240ea
<Pointer.fp 0x24118 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Const 0x2411a 0x2a.4> Δ-4 {[@@-6]|[##42]}
<Call 0x2411e 0x1029c> {[@@-6]|[##42]}
Malloc1(length : Long) : Pointer
<POP 24124-24126 StackAdj> Δ+8 {}
<MI 24126 MOVEA.L (A6-0x6),A0> {}
<MI 24128 MOVE.L 0x279a8,(A0+0x26)> {}
<MI 24130 MOVE.L (A6-0x6),0x279a8> {}
<MI 24136 MOVEA.L A0,A1> {}
<MI 24138 LEA.L (A6-0x24),A2> {}
<BlockMove 30,A2,A1> {}
<MI 24144 MOVE.L (A6+0x8),(A0+0x1e)> {}
<MI 24148 TST.L (A6+0x8)> {}
<MI 2414a BEQ 0x2415c> {}
<POP 2414c-2415c Naked> Σ0 ↓
<POP 2414c-2414e StackAdj> Δ-4 {[-4-]}
<MI 2414e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x24150 0x102a0> {[-4-]|[4, '(A6+0x8)']}
Malloc2(VAR dst : Pointer; length : Word)
<POP 24156-24158 StackAdj> Δ+4 {[-4-]}
<MI 24158 MOVE.L (A7)+,(A0+0x22)> Δ+4 {}
<POP 2415c-24160 Naked> Σ0 ↓ ←0x2410e ←0x24118
<MI 2415c MOVE.L (A6-0x6),(A6+0x10)> {}
<POP 24160-24168 Epilogue> Σ0
@ 24168
<LVAR 0x00c @>
<LVAR 0x008 @ 4(r)>
<LVAR -0x008 4(rw)>
<POP 24168-241f2 Body>
<POP 24168-2417e Prologue> Σ0 ↓
<POP 2417e-24182 RegCacheLoad> Σ0 ↓
<POP 24182-241a0 Naked> Σ0 ↓ →0x241e0
<MI 24182 MOVEA.L (A6+0x8),A0> {}
<MI 24184 MOVE.W (A0),D0> {}
<MI 24186 EXTW.L D0> {}
<MI 24188 MOVE.L D0,D6> {}
<POP 2418a-2418c StackAdj> Δ-4 {[-4-]}
<Pointer.fp 0x2418c <LVAR 0x00c @>> Δ-4 {[-4-]|[@@12]}
<MI 24190 MOVE.L D6,-(A7)> Δ-4 {[-4-]|[@@12]|[4, 'D6']}
<Call 0x24192 0x240aa> {[-4-]|[@@12]|[4, 'D6']}
<POP 24196-24198 StackAdj> Δ+8 {[-4-]}
<MI 24198 MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 2419c TST.L D6> {}
<MI 2419e BEQ 0x241e0> {}
<POP 241a0-241ae Naked> Σ0 Δ-8 ↓
<MI 241a0 MOVEA.L (A6-0x8),A0> {}
<MI 241a4 MOVEA.L (A0+0x22),A0> {}
<MI 241a8 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 241aa MOVE.L D6,-(A7)> Δ-4 {[4, 'A0']|[4, 'D6']}
<MI 241ac MOVEQ.L #0x01,D7> {[4, 'A0']|[4, 'D6']}
<POP 241ae-241b2 Naked> Σ-8 ↓ →0x241de ←0x241b2
<MI 241ae CMP.L (A7),D7> {[-8-]}
<MI 241b0 BGT 0x241de> {[-8-]}
<POP 241b2-241de Naked> Σ-8 ↓ →0x241ae
<MI 241b2 MOVE.L D7,D0> {[-8-]}
<MI 241b4 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x241b6 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {[-8-]}
<MI 241c0 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 241c4 MOVEA.L (A6+0x8),A1> {[-8-]}
<MI 241c6 MOVE.L D7,D1> {[-8-]}
<MI 241c8 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x241ca LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 241d4 MOVE.B (A1+D1.L+#0x2),(A0+D0.L)> {[-8-]}
<MI 241da ADDQ.L #0x1,D7> {[-8-]}
<MI 241dc BVC 0x241ae> {[-8-]}
<POP 241de-241e0 Naked> Σ-8 Δ+8 ↓ ←0x241ae
<POP 241de-241e0 StackAdj> Δ+8 {}
<POP 241e0-241ea Naked> Σ0 ↓ ←0x24182
<Pointer.fp 0x241e0 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x241e2 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 241e8-241ea StackAdj> Δ+4 {}
<POP 241ea-241f2 Epilogue> Σ0
@ 241f2
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(w)>
<LVAR -0x008 4(rw)>
<LVAR -0x00c 4(rw)>
<LVAR -0x010 4(rw)>
<LVAR -0x01c 4(rw)>
<LVAR -0x020 4(rw)>
<POP 241f2-24364 Body>
<POP 241f2-24208 Prologue> Σ0 ↓
<POP 24208-24216 RegCacheLoad> Σ0 ↓
<POP 24216-24228 Naked> Σ0 ↓ →0x24256
<POP 24216-24218 StackAdj> Δ-4 {[-4-]}
<MI 24218 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x2421a 0x2323c> {[-4-]|[4, '(A6+0x8)']}
<POP 2421e-24220 StackAdj> Δ+4 {[-4-]}
<MI 24220 MOVE.L (A7)+,(A6-0x10)> Δ+4 {}
<MI 24222 MOVE.L (A6-0x10),D0> {}
<MI 24224 CMP.L #0x01,D0> {}
<MI 24226 BGE 0x24256> {}
<POP 24228-24256 Naked> Σ0 ↓
<Blob 0x24228 [26] @> Δ-26 {[«26""»]}
<POP 2423a-2423c StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x2423c 25> {[«26""»]|[$$Too few arguments for SET]}
<Call 0x2424e 0x22e28> {[«26""»]|[$$Too few arguments for SET]}
<POP 24252-24256 StackAdj> Δ+30 {}
<POP 24256-2425c Naked> Σ0 Δ-4 ↓ ←0x24216
<MI 24256 CLR.L (A6-0xc)> {}
<MI 24258 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 2425a MOVEQ.L #0x02,D6> {[4, 'D0']}
<POP 2425c-24260 Naked> Σ-4 ↓ →0x2427e ←0x24260
<MI 2425c CMP.L (A7),D6> {[-4-]}
<MI 2425e BGT 0x2427e> {[-4-]}
<POP 24260-2427e Naked> Σ-4 ↓ →0x2425c
<POP 24260-24264 StackAdj> Δ-12 {[-16-]}
<MI 24264 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<MI 24266 MOVE.L D6,-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
<Call 0x24268 0x23a88> {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
<POP 2426c-2426e StackAdj> Δ+8 {[-16-]}
<Call 0x2426e 0x23a50> {[-16-]}
<POP 24272-24274 StackAdj> Δ+8 {[-8-]}
<MI 24274 MOVE.L (A6-0xc),D0> {[-8-]}
<MI 24276 ADD.L (A7)+,D0> Δ+4 {[-4-]}
<MI 24278 MOVE.L D0,(A6-0xc)> {[-4-]}
<MI 2427a ADDQ.L #0x1,D6> {[-4-]}
<MI 2427c BVC 0x2425c> {[-4-]}
<POP 2427e-242b0 Naked> Σ-4 Δ+4 ↓ →0x2435c ←0x2425c
<POP 2427e-24280 StackAdj> Δ+4 {}
<MI 24280 MOVE.L (A6-0x10),D0> {}
<MI 24282 SUBQ.L #0x2,D0> {}
<MI 24284 ADD.L D0,(A6-0xc)> {}
<POP 24286-24288 StackAdj> Δ-4 {[-4-]}
<MI 24288 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x2428a 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2428e 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 24292-24294 StackAdj> Δ+8 {[-4-]}
<MI 24294 MOVE.L (A7),(A6-0x4)> {[-4-]}
<Pointer.fp 0x24298 <LVAR -0x004 @ 4(w)>> Δ-4 {[-4-]|[@@-4]}
<MI 2429c MOVE.L (A6-0xc),-(A7)> Δ-4 {[-4-]|[@@-4]|[4, '(A6-0xc)']}
<Call 0x2429e 0x240aa> {[-4-]|[@@-4]|[4, '(A6-0xc)']}
<POP 242a2-242a4 StackAdj> Δ+8 {[-4-]}
<MI 242a4 MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 242a8 TST.L (A6-0xc)> {}
<MI 242aa BLE 0x2435c> {}
<POP 242b0-242c0 Naked> Σ0 Δ-8 ↓
<MI 242b0 MOVEA.L (A6-0x8),A0> {}
<MI 242b4 MOVEA.L (A0+0x22),A0> {}
<MI 242b8 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 242ba MOVEQ.L #0x01,D7> {[4, 'A0']}
<MI 242bc MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, 'A0']|[4, '(A6-0x10)']}
<MI 242be MOVEQ.L #0x02,D6> {[4, 'A0']|[4, '(A6-0x10)']}
<POP 242c0-242c8 Naked> Σ-8 ↓ →0x2435a ←0x24352
<MI 242c0 CMP.L (A7),D6> {[-8-]}
<MI 242c2 BGT 0x2435a> {[-8-]}
<POP 242c8-242e8 Naked> Σ-8 Δ-4 ↓ →0x242fc
<POP 242c8-242ca StackAdj> Δ-8 {[-16-]}
<MI 242ca MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<MI 242cc MOVE.L D6,-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
<Call 0x242ce 0x23a88> {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
<POP 242d2-242d4 StackAdj> Δ+8 {[-16-]}
<MI 242d4 MOVE.L (A7)+,(A6-0x20)> Δ+4 {[-12-]}
<MI 242d8 MOVE.L (A7)+,(A6-0x1c)> Δ+4 {[-8-]}
<MI 242dc MOVE.L (A6-0x1c),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x1c)']}
<MI 242e0 MOVE.L (A6-0x20),D5> {[-8-]|[4, '(A6-0x1c)']}
<MI 242e4 CMP.L (A7),D5> {[-8-]|[4, '(A6-0x1c)']}
<MI 242e6 BGT 0x242fc> {[-8-]|[4, '(A6-0x1c)']}
<POP 242e8-242fc Naked> Σ-12 ↓
<MI 242e8 MOVE.L (A7),D0> {[-12-]}
<POP 0x242ea LimitCheck -0x7fffffff ≤ D5> {[-12-]}
<MI 242ea CMPI.L #0x80000001,D5>
<MI 242f0 BLT 0x242fa>
<POP 0x242f2 LimitCheck D0 ≤ 0x7fffffff> {[-12-]}
<MI 242f2 CMPI.L #0x7fffffff,D0>
<MI 242f8 BLE 0x242fc>
<MI 242fa TRAP #15>
<POP 242fc-24300 Naked> Σ-12 ↓ →0x24332 ←0x242c8 ←0x24300
<MI 242fc CMP.L (A7),D5> {[-12-]}
<MI 242fe BGT 0x24332> {[-12-]}
<POP 24300-24332 Naked> Σ-12 ↓ →0x242fc
<MI 24300 MOVE.L D7,D0> {[-12-]}
<MI 24302 SUBQ.L #0x1,D0> {[-12-]}
<POP 0x24304 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {[-12-]}
<MI 2430e MOVEA.L (A7+0x8),A0> {[-12-]}
<MI 24312 MOVE.L D5,D1> {[-12-]}
<MI 24314 SUBQ.L #0x1,D1> {[-12-]}
<POP 0x24316 LimitCheck 0x0 ≤ D1 ≤ 0xfff> {[-12-]}
<MI 24320 LEA.L 0x26976,A1> {[-12-]}
<MI 24326 MOVE.B (A1+D1.L+#0x8),(A0+D0.L)> {[-12-]}
<MI 2432c ADDQ.L #0x1,D7> {[-12-]}
<MI 2432e ADDQ.L #0x1,D5> {[-12-]}
<MI 24330 BVC 0x242fc> {[-12-]}
<POP 24332-24338 Naked> Σ-12 Δ+4 ↓ →0x24352 ←0x242fc
<POP 24332-24334 StackAdj> Δ+4 {[-8-]}
<MI 24334 CMP.L (A6-0x10),D6> {[-8-]}
<MI 24336 BEQ 0x24352> {[-8-]}
<POP 24338-24352 Naked> Σ-8 ↓
<MI 24338 MOVE.L D7,D0> {[-8-]}
<MI 2433a SUBQ.L #0x1,D0> {[-8-]}
<POP 0x2433c LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {[-8-]}
<MI 24346 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 2434a MOVE.B #0x2c,(A0+D0.L)> {[-8-]}
<MI 24350 ADDQ.L #0x1,D7> {[-8-]}
<POP 24352-2435a Naked> Σ-8 ↓ →0x242c0 ←0x24332
<MI 24352 ADDQ.L #0x1,D6> {[-8-]}
<MI 24354 BVC 0x242c0> {[-8-]}
<POP 2435a-2435c Naked> Σ-8 Δ+8 ↓ ←0x242c0
<POP 2435a-2435c StackAdj> Δ+8 {}
<POP 2435c-24364 Epilogue> Σ0 ←0x2427e
@ 24364
<LVAR 0x008 4(r)>
<LVAR -0x00c 4(rw)>
<POP 24364-24452 Body>
<POP 24364-2437a Prologue> Σ0 ↓
<POP 2437a-24382 RegCacheLoad> Σ0 ↓
<POP 24382-243b4 Naked> Σ0 ↓ →0x243f6
<POP 24382-24384 StackAdj> Δ-4 {[-4-]}
<MI 24384 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x24388 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2438c 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 24390-24392 StackAdj> Δ+8 {[-4-]}
<MI 24392 MOVEA.L (A7)+,A4> Δ+4 {}
<POP 24394-24398 StackAdj> Δ-34 {[-34-]}
<MI 24398 MOVE.L A4,-(A7)> Δ-4 {[-34-]|[4, 'A4']}
<Call 0x2439a 0x23f4e> {[-34-]|[4, 'A4']}
<POP 2439e-243a0 StackAdj> Δ+4 {[-34-]}
<Call 0x243a0 0x23fd0> {[-34-]}
<POP 243a4-243a8 StackAdj> Δ+30 {[-4-]}
<MI 243a8 MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 243ac MOVEA.L (A6-0xc),A0> {}
<MI 243b0 CMPA.W #0x01,A0> {}
<MI 243b2 BNE 0x243f6> {}
<POP 243b4-243f6 Naked> Σ0 ↓
<Blob 0x243b4 [20] @> Δ-20 {[«20""»]}
<POP 243c6-243c8 StackAdj> Δ-8 {[«20""»]|[-8-]}
<Lit 0x243c8 19> {[«20""»]|[-4-]|[$$Unknown variable :_]}
<MI 243d8 MOVE.L (A6+0x8),(A7)> {[«20""»]|[-4-]|[4, '(A6+0x8)']}
<POP 243d2-243d8 StackAdj> Δ-8 {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]}
<Const 0x243dc 0x1.4> Δ-4 {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]|[##1]}
<Call 0x243e0 0x23b66> {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]|[##1]}
<POP 243e4-243e6 StackAdj> Δ+8 {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
<Call 0x243e6 0x102d0> {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
StringCat2(a, b : String) : String
<POP 243ec-243ee StackAdj> Δ+8 {[«20""»]|[-4-]}
<Call 0x243ee 0x22e28> {[«20""»]|[-4-]}
<POP 243f2-243f6 StackAdj> Δ+24 {}
<POP 243f6-2440c Naked> Σ0 Δ-8 ↓ ←0x24382
<MI 243f6 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Blob 0x243f8 [4] 0x2797e> Δ-4 {[4, 'A0']|[«4»]}
<MI 243fa MOVE.L (A0+0x1e),-(A7)> Δ-4 {[4, 'A0']|[«4»]|[4, '(A0+0x1e)']}
<MI 243fe NEG.L (A7)> {[4, 'A0']|[«4»]|[4, '(A0+0x1e)']}
<Call 0x24400 0x23384> {[4, 'A0']|[«4»]|[4, '(A0+0x1e)']}
<POP 24404-24406 StackAdj> Δ+4 {[4, 'A0']|[«4»]}
<MI 24406 MOVE.L (A0+0x1e),(A7)> {[4, 'A0']|[4, '(A0+0x1e)']}
<MI 2440a MOVEQ.L #0x01,D7> {[4, 'A0']|[4, '(A0+0x1e)']}
<POP 2440c-24410 Naked> Σ-8 ↓ →0x24448 ←0x24410
<MI 2440c CMP.L (A7),D7> {[-8-]}
<MI 2440e BGT 0x24448> {[-8-]}
<POP 24410-24448 Naked> Σ-8 ↓ →0x2440c
<MI 24410 MOVE.L D7,D0> {[-8-]}
<MI 24412 ADD.L 0x2797e,D0> {[-8-]}
<MI 24414 SUBQ.L #0x1,D0> {[-8-]}
<MI 24416 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x24418 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-8-]}
<MI 24422 LEA.L 0x26976,A0> {[-8-]}
<MI 24428 MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 2442c MOVEA.L (A1+0x22),A1> {[-8-]}
<MI 24430 MOVE.L D7,D1> {[-8-]}
<MI 24432 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x24434 LimitCheck 0x0 ≤ D1 ≤ 0x3ff> {[-8-]}
<MI 2443e MOVE.B (A1+D1.L),(A0+D0.L+#0x8)> {[-8-]}
<MI 24444 ADDQ.L #0x1,D7> {[-8-]}
<MI 24446 BVC 0x2440c> {[-8-]}
<POP 24448-2444a Naked> Σ-8 Δ+8 ↓ ←0x2440c
<POP 24448-2444a StackAdj> Δ+8 {}
<POP 2444a-24452 Epilogue> Σ0
@ 24452
<LVAR -0x004 4(rw)>
<POP 24452-244b4 Body>
<POP 24452-24468 Prologue> Σ0 ↓
<POP 24468-24470 RegCacheLoad> Σ0 ↓
<POP 24470-24476 Naked> Σ0 ↓
<MI 24470 MOVE.L 0x279a8,(A6-0x4)> {}
<POP 24476-2447c Naked> Σ0 ↓ →0x244ac ←0x2447c
<MI 24476 MOVEA.L (A6-0x4),A0> {}
<MI 24478 CMPA.W #0x01,A0> {}
<MI 2447a BEQ 0x244ac> {}
<POP 2447c-244ac Naked> Σ0 →0x24476
<POP 2447c-2447e StackAdj> Δ-30 {[-30-]}
<MI 2447e MOVEA.L A7,A1> {[-30-]}
<MI 24480 MOVEA.L A0,A2> {[-30-]}
<BlockMove 30,A2,A1> {[-30-]}
<POP 2448a-2448c StackAdj> Δ-4 {[-34-]}
<Lit 0x2448c> {[-30-]|[$$…]}
<Pointer.sp 0x2448c 4> Δ-4
<Const 0x24490 0x1.2> Δ-2
<Const 0x24492 0x1e.2> Δ-2
<Call 0x24494 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2449a-2449c StackAdj> Δ+8
<Call 0x2449c 0x103e0> {[-30-]|[$$…]}
WriteConsoleStringCrLf(str : String)
<POP 244a2-244a6 StackAdj> Δ+34 {}
<MI 244a6 MOVE.L (A0+0x26),(A6-0x4)> {}
<MI 244aa BRA 0x24476> {}
<POP 244ac-244b4 Epilogue> Σ0 ←0x24476
@ 244b4
<LVAR 0x008 4(r)>
<POP 244b4-244f0 Body>
<POP 244b4-244c6 Prologue> Σ0 ↓
<POP 244c6-244ec Naked> Σ0 ↓
<POP 244c6-244ca StackAdj> Δ-38 {[-38-]}
<MI 244ca MOVE.L (A6+0x8),-(A7)> Δ-4 {[-38-]|[4, '(A6+0x8)']}
<Const 0x244ce 0x1.4> Δ-4 {[-38-]|[4, '(A6+0x8)']|[##1]}
<Call 0x244d2 0x23b66> {[-38-]|[4, '(A6+0x8)']|[##1]}
<POP 244d6-244d8 StackAdj> Δ+8 {[-38-]}
<Call 0x244d8 0x23f4e> {[-38-]}
<POP 244dc-244de StackAdj> Δ+4 {[-34-]}
<Call 0x244de 0x23fd0> {[-34-]}
<POP 244e2-244e6 StackAdj> Δ+30 {[-4-]}
<Call 0x244e6 0x24024> {[-4-]}
<POP 244ea-244ec StackAdj> Δ+4 {}
<POP 244ec-244f0 Epilogue> Σ0
@ 244f0
<POP 244f0-2451e Body>
<POP 244f0-24502 Prologue> Σ0 ↓
<POP 24502-2451a Naked> Σ0 ↓
<POP 24502-24504 StackAdj> Δ-8 {[-8-]}
<Call 0x24504 0x103cc> {[-8-]}
GetPushLevel() : Long
<Call 0x2450a 0x102e4> {[-8-]}
Long2String(a : Long) : String
<POP 24510-24512 StackAdj> Δ+4 {[-4-]}
<Call 0x24512 0x103e0> {[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 24518-2451a StackAdj> Δ+4 {}
<POP 2451a-2451e Epilogue> Σ0
@ 2451e
<LVAR 0x008 4(r)>
<LVAR -0x004 1(rw)>
<LVAR -0x008 @ 4(rw)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x010 @ 4(r)>
<LVAR -0x012 @ 1(r)>
<LVAR -0x013 @ 1(r)>
<LVAR -0x014 @ 1(r)>
<LVAR -0x024 4(rw)>
<LVAR -0x028 4(rw)>
<LVAR -0x02c 4(rw)>
<LVAR -0x030 @ 4(r)>
<LVAR -0x032 1(w)>
<LVAR -0x036 @ 4(r)>
<LVAR -0x038 @ 1(r)>
<LVAR -0x03c @ 4(rw)>
<POP 2451e-2484e Body>
<POP 2451e-24534 Prologue> Σ0 ↓
<POP 24534-2454c RegCacheLoad> Σ0 ↓
<POP 2454c-2455c Naked> Σ0 ↓ →0x24584
<POP 2454c-2454e StackAdj> Δ-4 {[-4-]}
<MI 2454e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x24550 0x2323c> {[-4-]|[4, '(A6+0x8)']}
<POP 24554-24556 StackAdj> Δ+4 {[-4-]}
<MI 24556 MOVE.L (A7)+,(A6-0x2c)> Δ+4 {}
<MI 2455a BNE 0x24584> {}
<POP 2455c-24584 Naked> Σ0 →0x24594
<POP 2455c-2455e StackAdj> Δ-4 {[-4-]}
<POP 2455e-2455f StackAdj> Δ+2 {[-2-]}
<Blob 0x2455f [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 24562 MOVE.B 0x22a47,(A7+0x1)> {[-2-]|[«2""»]}
<MI 24568 MOVE.B 0x22a48,(A7+0x2)> {[-2-]|[«2""»]}
<POP 2456e-24570 StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]}
<Lit 0x24570> {[-2-]|[«2""»]|[$$…]}
<Pointer.sp 0x24570 4> Δ-4
<Const 0x24574 0x1.2> Δ-2
<Const 0x24576 0x3.2> Δ-2
<Call 0x2457a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2457c-2457e StackAdj> Δ+8
<MI 2457e MOVE.L (A7)+,(A6-0x3c)> Δ+4 {[-2-]|[«2""»]}
<POP 24580-24582 StackAdj> Δ+4 {}
<MI 24582 BRA 0x24594> {}
<POP 24584-24594 Naked> Σ0 ↓ ←0x2454c
<POP 24584-24586 StackAdj> Δ-4 {[-4-]}
<MI 24586 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x24588 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2458c 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 24590-24592 StackAdj> Δ+8 {[-4-]}
<MI 24592 MOVE.L (A7)+,(A6-0x3c)> Δ+4 {}
<POP 24594-245e4 Naked> Σ0 ↓ →0x245f4 ←0x2455c
<Blob 0x24594 [6] @> Δ-6 {[«6""»]}
<POP 245a4-245a6 StackAdj> Δ-4 {[«6""»]|[-4-]}
<MI 245a6 MOVE.L (A6-0x3c),-(A7)> Δ-4 {[«6""»]|[-4-]|[4, '(A6-0x3c)']}
<POP 245a8-245aa StackAdj> Δ-4 {[«6""»]|[-4-]|[4, '(A6-0x3c)']|[-4-]}
<Lit 0x245aa 5> {[«6""»]|[-4-]|[4, '(A6-0x3c)']|[$$.M200]}
<Call 0x245b8 0x102d0> {[«6""»]|[-4-]|[4, '(A6-0x3c)']|[$$.M200]}
StringCat2(a, b : String) : String
<POP 245be-245c0 StackAdj> Δ+8 {[«6""»]|[-4-]}
<MI 245c0 MOVE.L (A7)+,(A6-0x3c)> Δ+4 {[«6""»]}
<POP 245c2-245c4 StackAdj> Δ+6 {}
<MI 245c4 MOVE.L (A6-0x3c),-(A7)> Δ-4 {[4, '(A6-0x3c)']}
<MI 245c6 CLR.B -(A7)> Δ-2 {[4, '(A6-0x3c)']|[#0]}
<Const 0x245c8 0x1.2> Δ-2 {[4, '(A6-0x3c)']|[#0]|[#1]}
<Const 0x245ca 0x0.4> Δ-4 {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]}
<Pointer.fp 0x245ce <LVAR -0x038 @ 1(r)>> Δ-4 {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]|[@@-56]}
<Pointer.fp 0x245d2 <LVAR -0x036 @ 4(r)>> Δ-4 {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]|[@@-56]|[@@-54]}
<Call 0x245d6 0x10380> {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]|[@@-56]|[@@-54]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 245dc-245de StackAdj> Δ+20 {}
<MI 245de TST.B (A6-0x38)> {}
<MI 245e2 BEQ 0x245f4> {}
<POP 245e4-245f4 Naked> Σ0 →0x24846
<Pointer.fp 0x245e4 <LVAR -0x03c @ 4(rw)>> Δ-4 {[@@-60]}
<Call 0x245e6 0x102bc> {[@@-60]}
FreeString(VAR a : String)
<POP 245ec-245ee StackAdj> Δ+4 {}
<MI 245ee BRA 0x24846> {}
<POP 245f4-2463a Naked> Σ0 ↓ →0x24672 ←0x24594
<MI 245f4 MOVEA.L (A6-0x36),A0> {}
<MI 245f8 MOVE.B (A0+0x3f),D0> {}
<MI 245fc LSL.B #0x6,D0> {}
<MI 245fe LSR.B #0x7,D0> {}
<MI 24600 MOVE.B D0,(A6-0x32)> {}
<MI 24604 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x24606 0x1.2> Δ-2 {[#0]|[#1]}
<Const 0x24608 0x1.4> Δ-4 {[#0]|[#1]|[##1]}
<Pointer.fp 0x2460c <LVAR -0x038 @ 1(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-56]}
<Pointer.fp 0x24610 <LVAR -0x036 @ 4(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-56]|[@@-54]}
<Call 0x24614 0x1038c> {[#0]|[#1]|[##1]|[@@-56]|[@@-54]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 2461a-2461e StackAdj> Δ+16 {}
<MI 2461e MOVEA.L (A6-0x3c),A0> {}
<MI 24620 MOVE.W (A0),D1> {}
<MI 24622 EXTW.L D1> {}
<MI 24624 SUBQ.L #0x5,D1> {}
<POP 0x24626 LimitCheck -0x8000 ≤ D1 ≤ 0x7fff> {}
<MI 24634 MOVE.W D1,(A0)> {}
<MI 24636 TST.B D0> {}
<MI 24638 BNE 0x24672> {}
<POP 2463a-24672 Naked> Σ0 →0x24846
<Blob 0x2463a [18] @> Δ-18 {[«18""»]}
<POP 24646-24648 StackAdj> Δ-4 {[«18""»]|[-4-]}
<MI 24648 MOVE.L (A6-0x3c),-(A7)> Δ-4 {[«18""»]|[-4-]|[4, '(A6-0x3c)']}
<POP 2464a-2464c StackAdj> Δ-4 {[«18""»]|[-4-]|[4, '(A6-0x3c)']|[-4-]}
<Lit 0x2464c 18> {[«18""»]|[-4-]|[4, '(A6-0x3c)']|[$$ is not a program.]}
<Call 0x2465a 0x102d0> {[«18""»]|[-4-]|[4, '(A6-0x3c)']|[$$ is not a program.]}
StringCat2(a, b : String) : String
<POP 24660-24662 StackAdj> Δ+8 {[«18""»]|[-4-]}
<Call 0x24662 0x103e0> {[«18""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 24668-2466c StackAdj> Δ+22 {}
<MI 2466c BRA 0x24846> {}
<POP 24672-2468c Naked> Σ0 Δ-8 ↓ ←0x245f4
<Pointer.fp 0x24672 <LVAR -0x030 @ 4(r)>> Δ-4 {[@@-48]}
<Call 0x24676 0x102b8> {[@@-48]}
NewString(VAR a : String)
<POP 2467c-2467e StackAdj> Δ+4 {}
<MI 2467e MOVEA.L (A6-0x30),A0> {}
<MI 24682 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 24684 MOVEQ.L #0x01,D7> {[4, 'A0']}
<MI 24686 MOVE.L (A6-0x2c),-(A7)> Δ-4 {[4, 'A0']|[4, '(A6-0x2c)']}
<MI 2468a MOVEQ.L #0x02,D5> {[4, 'A0']|[4, '(A6-0x2c)']}
<POP 2468c-24694 Naked> Σ-8 ↓ →0x24728 ←0x24720
<MI 2468c CMP.L (A7),D5> {[-8-]}
<MI 2468e BGT 0x24728> {[-8-]}
<POP 24694-246b4 Naked> Σ-8 Δ-4 ↓ →0x246c8
<POP 24694-24696 StackAdj> Δ-8 {[-16-]}
<MI 24696 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<MI 24698 MOVE.L D5,-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, 'D5']}
<Call 0x2469a 0x23a88> {[-16-]|[4, '(A6+0x8)']|[4, 'D5']}
<POP 2469e-246a0 StackAdj> Δ+8 {[-16-]}
<MI 246a0 MOVE.L (A7)+,(A6-0x28)> Δ+4 {[-12-]}
<MI 246a4 MOVE.L (A7)+,(A6-0x24)> Δ+4 {[-8-]}
<MI 246a8 MOVE.L (A6-0x24),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x24)']}
<MI 246ac MOVE.L (A6-0x28),D6> {[-8-]|[4, '(A6-0x24)']}
<MI 246b0 CMP.L (A7),D6> {[-8-]|[4, '(A6-0x24)']}
<MI 246b2 BGT 0x246c8> {[-8-]|[4, '(A6-0x24)']}
<POP 246b4-246c8 Naked> Σ-12 ↓
<MI 246b4 MOVE.L (A7),D0> {[-12-]}
<POP 0x246b6 LimitCheck -0x7fffffff ≤ D6> {[-12-]}
<MI 246b6 CMPI.L #0x80000001,D6>
<MI 246bc BLT 0x246c6>
<POP 0x246be LimitCheck D0 ≤ 0x7fffffff> {[-12-]}
<MI 246be CMPI.L #0x7fffffff,D0>
<MI 246c4 BLE 0x246c8>
<MI 246c6 TRAP #15>
<POP 246c8-246cc Naked> Σ-12 ↓ →0x246fe ←0x24694 ←0x246cc
<MI 246c8 CMP.L (A7),D6> {[-12-]}
<MI 246ca BGT 0x246fe> {[-12-]}
<POP 246cc-246fe Naked> Σ-12 ↓ →0x246c8
<MI 246cc MOVE.L D7,D0> {[-12-]}
<MI 246ce SUBQ.L #0x1,D0> {[-12-]}
<POP 0x246d0 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-12-]}
<MI 246da MOVEA.L (A7+0x8),A0> {[-12-]}
<MI 246de MOVE.L D6,D1> {[-12-]}
<MI 246e0 SUBQ.L #0x1,D1> {[-12-]}
<POP 0x246e2 LimitCheck 0x0 ≤ D1 ≤ 0xfff> {[-12-]}
<MI 246ec LEA.L 0x26976,A1> {[-12-]}
<MI 246f2 MOVE.B (A1+D1.L+#0x8),(A0+D0.L+#0x2)> {[-12-]}
<MI 246f8 ADDQ.L #0x1,D7> {[-12-]}
<MI 246fa ADDQ.L #0x1,D6> {[-12-]}
<MI 246fc BVC 0x246c8> {[-12-]}
<POP 246fe-24706 Naked> Σ-12 Δ+4 ↓ →0x24720 ←0x246c8
<POP 246fe-24700 StackAdj> Δ+4 {[-8-]}
<MI 24700 CMP.L (A6-0x2c),D5> {[-8-]}
<MI 24704 BEQ 0x24720> {[-8-]}
<POP 24706-24720 Naked> Σ-8 ↓
<MI 24706 MOVE.L D7,D0> {[-8-]}
<MI 24708 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x2470a LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-8-]}
<MI 24714 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 24718 MOVE.B #0x2c,(A0+D0.L+#0x2)> {[-8-]}
<MI 2471e ADDQ.L #0x1,D7> {[-8-]}
<POP 24720-24728 Naked> Σ-8 ↓ →0x2468c ←0x246fe
<MI 24720 ADDQ.L #0x1,D5> {[-8-]}
<MI 24722 BVC 0x2468c> {[-8-]}
<POP 24728-247d8 Naked> Σ-8 Δ+8 ↓ →0x247de ←0x2468c
<POP 24728-2472a StackAdj> Δ+4 {[-4-]}
<MI 2472a MOVEA.L (A7),A0> {[-4-]}
<MI 2472c MOVE.L D7,D0> {[-4-]}
<MI 2472e SUBQ.L #0x1,D0> {[-4-]}
<POP 0x24730 LimitCheck -0x8000 ≤ D0 ≤ 0x7fff> {[-4-]}
<MI 2473e MOVE.W D0,(A0)> {[-4-]}
<POP 24740-24742 StackAdj> Δ+2 {[-2-]}
<POP 24742-24743 StackAdj> Δ+2 {}
<Blob 0x24743 [2] @> Δ-2 {[«2""»]}
<Blob 0x24746 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x2474a [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 2474e-24750 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x24750 6> {[«2""»]|[«2""»]|[«2""»]|[$$STATUS]}
<MI 2475e MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 24762-24764 StackAdj> Δ+2 {[«2""»]|[«2""»]}
<MI 24764 MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<Const 0x24766 0x0.4> Δ-4 {[4, '(A6+0x8)']|[##0]}
<MI 2476a MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']}
<Pointer.fp 0x2476e <LVAR -0x010 @ 4(r)>> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-16]}
<Pointer.fp 0x24772 <LVAR -0x013 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-16]|[@@-19]}
<Call 0x24776 0x260e4> {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-16]|[@@-19]}
<POP 2477c-2477e StackAdj> Δ+20 {}
<Pointer.fp 0x2477e <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x24782 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 24788-2478a StackAdj> Δ+2 {[-2-]}
<POP 2478a-2478b StackAdj> Δ+2 {}
<Blob 0x2478b [2] @> Δ-2 {[«2""»]}
<Blob 0x2478e [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x24792 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 24796-24798 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x24798 6> {[«2""»]|[«2""»]|[«2""»]|[$$RESULT]}
<MI 247a6 MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 247aa-247ac StackAdj> Δ+2 {[«2""»]|[«2""»]}
<MI 247ac MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<Const 0x247ae 0x0.4> Δ-4 {[4, '(A6+0x8)']|[##0]}
<MI 247b2 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']}
<Pointer.fp 0x247b6 <LVAR -0x00c @ 4(r)>> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-12]}
<Pointer.fp 0x247ba <LVAR -0x012 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-12]|[@@-18]}
<Call 0x247be 0x260e4> {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-12]|[@@-18]}
<POP 247c4-247c6 StackAdj> Δ+20 {}
<Pointer.fp 0x247c6 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x247ca 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 247d0-247d2 StackAdj> Δ+4 {}
<MI 247d2 TST.B (A6-0x13)> {}
<MI 247d6 BNE 0x247de> {}
<POP 247d8-247de Naked> Σ0 ↓ →0x247e4
<MI 247d8 TST.B (A6-0x12)> {}
<MI 247dc BEQ 0x247e4> {}
<POP 247de-247e4 Naked> Σ0 →0x247e8 ←0x24728
<MI 247de CLR.B (A6-0x4)> {}
<MI 247e2 BRA 0x247e8> {}
<POP 247e4-247e8 Naked> Σ0 ↓ ←0x247d8
<MI 247e4 MOVE.B #0x01,(A6-0x4)> {}
<POP 247e8-2480e Naked> Σ0 ↓ →0x2482e ←0x247de
<MI 247e8 MOVE.L (A6-0x3c),-(A7)> Δ-4 {[4, '(A6-0x3c)']}
<MI 247ea MOVE.L (A6-0x30),-(A7)> Δ-4 {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
<MI 247ee MOVE.B (A6-0x4),D0> {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
<MI 247f2 EXTB.W D0> {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
<POP 0x247f4 LimitCheck 0x0 ≤ D0 ≤ 0x2> {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
<MI 247f8 MOVE.B D0,-(A7)> Δ-2 {[4, '(A6-0x3c)']|[4, '(A6-0x30)']|[2, 'D0']}
<Pointer.fp 0x247fa <LVAR -0x014 @ 1(r)>> Δ-4 {[4, '(A6-0x3c)']|[4, '(A6-0x30)']|[2, 'D0']|[@@-20]}
<Call 0x247fe 0x103b0> {[4, '(A6-0x3c)']|[4, '(A6-0x30)']|[2, 'D0']|[@@-20]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 24804-24808 StackAdj> Δ+14 {}
<MI 24808 TST.B (A6-0x13)> {}
<MI 2480c BEQ 0x2482e> {}
<POP 2480e-2482e Naked> Σ0 ↓
<MI 2480e MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']}
<POP 24812-24814 StackAdj> Δ-4 {[4, '(A6-0x10)']|[-4-]}
<MI 24814 MOVE.B (A6-0x14),D0> {[4, '(A6-0x10)']|[-4-]}
<MI 24818 EXTB.W D0> {[4, '(A6-0x10)']|[-4-]}
<POP 0x2481a LimitCheck 0x0 ≤ D0 ≤ 0xe> {[4, '(A6-0x10)']|[-4-]}
<MI 2481e MOVE.B D0,-(A7)> Δ-2 {[4, '(A6-0x10)']|[-4-]|[2, 'D0']}
<Call 0x24820 0x103c0> {[4, '(A6-0x10)']|[-4-]|[2, 'D0']}
ExpErrMsg(a: Byte) : String
<POP 24826-24828 StackAdj> Δ+2 {[4, '(A6-0x10)']|[-4-]}
<Call 0x24828 0x24168> {[4, '(A6-0x10)']|[-4-]}
<POP 2482c-2482e StackAdj> Δ+8 {}
<POP 2482e-24834 Naked> Σ0 ↓ →0x24846 ←0x247e8
<MI 2482e TST.B (A6-0x12)> {}
<MI 24832 BEQ 0x24846> {}
<POP 24834-24846 Naked> Σ0 ↓
<MI 24834 MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']}
<POP 24838-2483a StackAdj> Δ-4 {[4, '(A6-0xc)']|[-4-]}
<Call 0x2483a 0x103c8> {[4, '(A6-0xc)']|[-4-]}
FSCALL_103c8
<Call 0x24840 0x24168> {[4, '(A6-0xc)']|[-4-]}
<POP 24844-24846 StackAdj> Δ+8 {}
<POP 24846-2484e Epilogue> Σ0 ←0x245e4 ←0x2463a ←0x2482e
@ 2484e
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(rw)>
<LVAR -0x008 @ 4(rw)>
<POP 2484e-248c6 Body>
<POP 2484e-24864 Prologue> Σ0 ↓
<POP 24864-2486c RegCacheLoad> Σ0 ↓
<POP 2486c-248a0 Naked> Σ0 ↓ →0x248a6
<POP 2486c-2486e StackAdj> Δ-4 {[-4-]}
<MI 2486e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x24872 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24876 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 2487a-2487c StackAdj> Δ+8 {[-4-]}
<MI 2487c MOVE.L (A7),(A6-0x8)> {[-4-]}
<MI 2487e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x24882 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x24886 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 2488a-2488c StackAdj> Δ+8 {[-4-]}
<MI 2488c MOVE.L (A7),(A6-0x4)> {[-4-]}
<POP 2488e-24890 StackAdj> Δ+2 {[-2-]}
<MI 24890 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x8)']}
<MI 24892 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
<Call 0x24894 0x102c8> {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
StringEqual(a, b : String) : Byte
<POP 2489a-2489c StackAdj> Δ+8 {[-2-]}
<MI 2489c TST.B (A7)+> Δ+2 {}
<MI 2489e BEQ 0x248a6> {}
<POP 248a0-248a6 Naked> Σ0 →0x248aa
<Call 0x248a0 0x2361e> {}
<MI 248a4 BRA 0x248aa> {}
<POP 248a6-248aa Naked> Σ0 ↓ ←0x2486c
<Call 0x248a6 0x23664> {}
<POP 248aa-248be Naked> Σ0 ↓ ←0x248a0
<Pointer.fp 0x248aa <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x248ac 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 248b2-248b4 StackAdj> Δ+4 {}
<Pointer.fp 0x248b4 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x248b6 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 248bc-248be StackAdj> Δ+4 {}
<POP 248be-248c6 Epilogue> Σ0
@ 248c6
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(rw)>
<LVAR -0x008 @ 4(rw)>
<POP 248c6-2493e Body>
<POP 248c6-248dc Prologue> Σ0 ↓
<POP 248dc-248e4 RegCacheLoad> Σ0 ↓
<POP 248e4-24918 Naked> Σ0 ↓ →0x2491e
<POP 248e4-248e6 StackAdj> Δ-4 {[-4-]}
<MI 248e6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x248ea 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x248ee 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 248f2-248f4 StackAdj> Δ+8 {[-4-]}
<MI 248f4 MOVE.L (A7),(A6-0x8)> {[-4-]}
<MI 248f6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x248fa 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x248fe 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 24902-24904 StackAdj> Δ+8 {[-4-]}
<MI 24904 MOVE.L (A7),(A6-0x4)> {[-4-]}
<POP 24906-24908 StackAdj> Δ+2 {[-2-]}
<MI 24908 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x8)']}
<MI 2490a MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
<Call 0x2490c 0x102c8> {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
StringEqual(a, b : String) : Byte
<POP 24912-24914 StackAdj> Δ+8 {[-2-]}
<MI 24914 TST.B (A7)+> Δ+2 {}
<MI 24916 BNE 0x2491e> {}
<POP 24918-2491e Naked> Σ0 →0x24922
<Call 0x24918 0x2361e> {}
<MI 2491c BRA 0x24922> {}
<POP 2491e-24922 Naked> Σ0 ↓ ←0x248e4
<Call 0x2491e 0x23664> {}
<POP 24922-24936 Naked> Σ0 ↓ ←0x24918
<Pointer.fp 0x24922 <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x24924 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 2492a-2492c StackAdj> Δ+4 {}
<Pointer.fp 0x2492c <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x2492e 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 24934-24936 StackAdj> Δ+4 {}
<POP 24936-2493e Epilogue> Σ0
@ 2493e
<LVAR 0x008 4(r)>
<POP 2493e-2496a Body>
<POP 2493e-24950 Prologue> Σ0 ↓
<POP 24950-24966 Naked> Σ0 ↓
<POP 24950-24952 StackAdj> Δ-4 {[-4-]}
<MI 24952 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x24956 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2495a 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 2495e-24960 StackAdj> Δ+8 {[-4-]}
<Call 0x24960 0x2395e> {[-4-]}
<POP 24964-24966 StackAdj> Δ+4 {}
<POP 24966-2496a Epilogue> Σ0
@ 2496a
<LVAR 0x008 4(r)>
<LVAR -0x014 @ 4(rw)>
<POP 2496a-24a6a Body>
<POP 2496a-24980 Prologue> Σ0 ↓
<POP 24980-2498a RegCacheLoad> Σ0 ↓
<POP 2498a-249e8 Naked> Σ0 ↓ →0x24a18
<POP 2498a-2498c StackAdj> Δ-4 {[-4-]}
<MI 2498c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x2498e 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24992 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 24996-24998 StackAdj> Δ+8 {[-4-]}
<MI 24998 MOVE.L (A7),(A6-0x14)> {[-4-]}
<MI 2499a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x2499c 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x249a0 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 249a4-249a6 StackAdj> Δ+8 {[-4-]}
<MI 249a6 MOVEA.L (A7)+,A4> Δ+4 {}
<POP 249a8-249ac StackAdj> Δ-12 {[-12-]}
<MI 249ac MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<Const 0x249ae 0x3.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##3]}
<Call 0x249b2 0x23b98> {[-12-]|[4, '(A6+0x8)']|[##3]}
<POP 249b6-249b8 StackAdj> Δ+8 {[-12-]}
<Call 0x249b8 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 249be-249c0 StackAdj> Δ+8 {[-4-]}
<MI 249c0 MOVE.L (A7),D6> {[-4-]}
<POP 249c2-249c4 StackAdj> Δ-8 {[-12-]}
<MI 249c4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<Const 0x249c6 0x4.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##4]}
<Call 0x249ca 0x23b98> {[-12-]|[4, '(A6+0x8)']|[##4]}
<POP 249ce-249d0 StackAdj> Δ+8 {[-12-]}
<Call 0x249d0 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 249d6-249d8 StackAdj> Δ+8 {[-4-]}
<MI 249d8 MOVE.L (A7)+,D5> Δ+4 {}
<MI 249da MOVE.L D6,D0> {}
<MI 249dc ADD.L D5,D0> {}
<MI 249de SUBQ.L #0x1,D0> {}
<MI 249e0 MOVE.W (A4),D1> {}
<MI 249e2 EXTW.L D1> {}
<MI 249e4 CMP.L D1,D0> {}
<MI 249e6 BLE 0x24a18> {}
<POP 249e8-24a18 Naked> Σ0 ↓
<Blob 0x249e8 [32] @> Δ-32 {[«32""»]}
<POP 249fa-249fc StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x249fc 31> {[«32""»]|[$$Offset/Length error in [INSERT]]}
<Call 0x24a10 0x22e28> {[«32""»]|[$$Offset/Length error in [INSERT]]}
<POP 24a14-24a18 StackAdj> Δ+36 {}
<POP 24a18-24a24 Naked> Σ0 Δ-8 ↓ ←0x2498a
<MI 24a18 MOVEA.L (A6-0x14),A0> {}
<MI 24a1a MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 24a1c MOVE.W (A0),D0> {[4, 'A0']}
<MI 24a1e EXTW.L D0> {[4, 'A0']}
<MI 24a20 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<MI 24a22 MOVEQ.L #0x01,D7> {[4, 'A0']|[4, 'D0']}
<POP 24a24-24a28 Naked> Σ-8 ↓ →0x24a4e ←0x24a28
<MI 24a24 CMP.L (A7),D7> {[-8-]}
<MI 24a26 BGT 0x24a4e> {[-8-]}
<POP 24a28-24a4e Naked> Σ-8 ↓ →0x24a24
<MI 24a28 MOVE.L D6,D0> {[-8-]}
<MI 24a2a ADD.L D7,D0> {[-8-]}
<MI 24a2c SUBQ.L #0x1,D0> {[-8-]}
<MI 24a2e SUBQ.L #0x1,D0> {[-8-]}
<POP 0x24a30 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-8-]}
<MI 24a36 MOVE.L D7,D1> {[-8-]}
<MI 24a38 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x24a3a LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 24a40 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 24a44 MOVE.B (A0+D1.L+#0x2),(A4+D0.L+#0x2)> {[-8-]}
<MI 24a4a ADDQ.L #0x1,D7> {[-8-]}
<MI 24a4c BVC 0x24a24> {[-8-]}
<POP 24a4e-24a62 Naked> Σ-8 Δ+8 ↓ ←0x24a24
<POP 24a4e-24a50 StackAdj> Δ+4 {[-4-]}
<MI 24a50 MOVE.L A4,(A7)> {[4, 'A4']}
<Call 0x24a52 0x23c08> {[4, 'A4']}
<POP 24a56-24a58 StackAdj> Δ+4 {}
<Pointer.fp 0x24a58 <LVAR -0x014 @ 4(rw)>> Δ-4 {[@@-20]}
<Call 0x24a5a 0x102bc> {[@@-20]}
FreeString(VAR a : String)
<POP 24a60-24a62 StackAdj> Δ+4 {}
<POP 24a62-24a6a Epilogue> Σ0
@ 24a6a
<LVAR 0x008 4(r)>
<LVAR -0x010 @ 4(r)>
<LVAR -0x014 @ 4(rw)>
<POP 24a6a-24b50 Body>
<POP 24a6a-24a80 Prologue> Σ0 ↓
<POP 24a80-24a8e RegCacheLoad> Σ0 ↓
<POP 24a8e-24ae6 Naked> Σ0 ↓ →0x24aec
<POP 24a8e-24a90 StackAdj> Δ-4 {[-4-]}
<MI 24a90 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x24a92 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24a96 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 24a9a-24a9c StackAdj> Δ+8 {[-4-]}
<MI 24a9c MOVE.L (A7)+,(A6-0x14)> Δ+4 {}
<Pointer.fp 0x24a9e <LVAR -0x010 @ 4(r)>> Δ-4 {[@@-16]}
<Call 0x24aa0 0x102b8> {[@@-16]}
NewString(VAR a : String)
<POP 24aa6-24aa8 StackAdj> Δ-8 {[@@-16]|[-8-]}
<MI 24aa8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[@@-16]|[-8-]|[4, '(A6+0x8)']}
<Const 0x24aaa 0x2.4> Δ-4 {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##2]}
<Call 0x24aae 0x23b98> {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##2]}
<POP 24ab2-24ab4 StackAdj> Δ+8 {[@@-16]|[-8-]}
<Call 0x24ab4 0x10350> {[@@-16]|[-8-]}
Quad2Long(a : Quad) : Long
<POP 24aba-24abc StackAdj> Δ+8 {[@@-16]}
<MI 24abc MOVE.L (A7),D5> {[@@-16]}
<POP 24abe-24ac0 StackAdj> Δ-8 {[@@-16]|[-8-]}
<MI 24ac0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[@@-16]|[-8-]|[4, '(A6+0x8)']}
<Const 0x24ac2 0x3.4> Δ-4 {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##3]}
<Call 0x24ac6 0x23b98> {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##3]}
<POP 24aca-24acc StackAdj> Δ+8 {[@@-16]|[-8-]}
<Call 0x24acc 0x10350> {[@@-16]|[-8-]}
Quad2Long(a : Quad) : Long
<POP 24ad2-24ad4 StackAdj> Δ+8 {[@@-16]}
<MI 24ad4 MOVE.L (A7)+,D6> Δ+4 {}
<MI 24ad6 MOVEA.L (A6-0x14),A0> {}
<MI 24ad8 MOVE.L D5,D0> {}
<MI 24ada ADD.L D6,D0> {}
<MI 24adc SUBQ.L #0x1,D0> {}
<MI 24ade MOVE.W (A0),D1> {}
<MI 24ae0 EXTW.L D1> {}
<MI 24ae2 CMP.L D1,D0> {}
<MI 24ae4 BLE 0x24aec> {}
<POP 24ae6-24aec Naked> Σ0 ↓
<MI 24ae6 ADDQ.L #0x1,D1> {}
<MI 24ae8 SUB.L D5,D1> {}
<MI 24aea MOVE.L D1,D6> {}
<POP 24aec-24af0 Naked> Σ0 Δ-4 ↓ ←0x24a8e
<MI 24aec MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']}
<MI 24aee MOVEQ.L #0x01,D7> {[4, 'D6']}
<POP 24af0-24af4 Naked> Σ-4 ↓ →0x24b1a ←0x24af4
<MI 24af0 CMP.L (A7),D7> {[-4-]}
<MI 24af2 BGT 0x24b1a> {[-4-]}
<POP 24af4-24b1a Naked> Σ-4 ↓ →0x24af0
<MI 24af4 MOVEA.L (A6-0x10),A0> {[-4-]}
<MI 24af6 MOVE.L D7,D0> {[-4-]}
<MI 24af8 SUBQ.L #0x1,D0> {[-4-]}
<POP 0x24afa LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-4-]}
<MI 24b00 MOVEA.L (A6-0x14),A1> {[-4-]}
<MI 24b02 MOVE.L D7,D1> {[-4-]}
<MI 24b04 ADD.L D5,D1> {[-4-]}
<MI 24b06 SUBQ.L #0x1,D1> {[-4-]}
<MI 24b08 SUBQ.L #0x1,D1> {[-4-]}
<POP 0x24b0a LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-4-]}
<MI 24b10 MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x2)> {[-4-]}
<MI 24b16 ADDQ.L #0x1,D7> {[-4-]}
<MI 24b18 BVC 0x24af0> {[-4-]}
<POP 24b1a-24b48 Naked> Σ-4 Δ+4 ↓ ←0x24af0
<POP 24b1a-24b1c StackAdj> Δ+4 {}
<MI 24b1c MOVEA.L (A6-0x10),A0> {}
<POP 0x24b1e LimitCheck -0x8000 ≤ D6 ≤ 0x7fff> {}
<MI 24b34 MOVE.W D6,(A0)> {}
<MI 24b36 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']}
<Call 0x24b38 0x23c08> {[4, '(A6-0x10)']}
<POP 24b3c-24b3e StackAdj> Δ+4 {}
<Pointer.fp 0x24b3e <LVAR -0x014 @ 4(rw)>> Δ-4 {[@@-20]}
<Call 0x24b40 0x102bc> {[@@-20]}
FreeString(VAR a : String)
<POP 24b46-24b48 StackAdj> Δ+4 {}
<POP 24b48-24b50 Epilogue> Σ0
@ 24b50
<LVAR 0x008 4(r)>
<POP 24b50-24b7c Body>
<POP 24b50-24b62 Prologue> Σ0 ↓
<POP 24b62-24b78 Naked> Σ0 ↓
<POP 24b62-24b64 StackAdj> Δ-8 {[-8-]}
<MI 24b64 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x24b68 0x1.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24b6c 0x23b98> {[-8-]|[4, '(A6+0x8)']|[##1]}
<POP 24b70-24b72 StackAdj> Δ+8 {[-8-]}
<Call 0x24b72 0x239d2> {[-8-]}
<POP 24b76-24b78 StackAdj> Δ+8 {}
<POP 24b78-24b7c Epilogue> Σ0
@ 24b7c
<LVAR 0x008 4(r)>
<POP 24b7c-24bc8 Body>
<POP 24b7c-24b8e Prologue> Σ0 ↓
<POP 24b8e-24bba Naked> Σ0 ↓ →0x24bc0
<POP 24b8e-24b92 StackAdj> Δ-10 {[-10-]}
<MI 24b92 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x24b96 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24b9a 0x23b98> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 24b9e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24ba2 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24ba6 0x23b98> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24baa-24bac StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24bac 0x1032c> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsEqual(a, b : Quad) : Bool
<POP 24bb2-24bb6 StackAdj> Δ+16 {[-2-]}
<MI 24bb6 TST.B (A7)+> Δ+2 {}
<MI 24bb8 BEQ 0x24bc0> {}
<POP 24bba-24bc0 Naked> Σ0 →0x24bc4
<Call 0x24bba 0x2361e> {}
<MI 24bbe BRA 0x24bc4> {}
<POP 24bc0-24bc4 Naked> Σ0 ↓ ←0x24b8e
<Call 0x24bc0 0x23664> {}
<POP 24bc4-24bc8 Epilogue> Σ0 ←0x24bba
@ 24bc8
<LVAR 0x008 4(r)>
<POP 24bc8-24c14 Body>
<POP 24bc8-24bda Prologue> Σ0 ↓
<POP 24bda-24c06 Naked> Σ0 ↓ →0x24c0c
<POP 24bda-24bde StackAdj> Δ-10 {[-10-]}
<MI 24bde MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x24be2 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24be6 0x23b98> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 24bea MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24bee 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24bf2 0x23b98> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24bf6-24bf8 StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24bf8 0x1032c> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsEqual(a, b : Quad) : Bool
<POP 24bfe-24c02 StackAdj> Δ+16 {[-2-]}
<MI 24c02 TST.B (A7)+> Δ+2 {}
<MI 24c04 BNE 0x24c0c> {}
<POP 24c06-24c0c Naked> Σ0 →0x24c10
<Call 0x24c06 0x2361e> {}
<MI 24c0a BRA 0x24c10> {}
<POP 24c0c-24c10 Naked> Σ0 ↓ ←0x24bda
<Call 0x24c0c 0x23664> {}
<POP 24c10-24c14 Epilogue> Σ0 ←0x24c06
@ 24c14
<LVAR 0x008 4(r)>
<POP 24c14-24c60 Body>
<POP 24c14-24c26 Prologue> Σ0 ↓
<POP 24c26-24c52 Naked> Σ0 ↓ →0x24c58
<POP 24c26-24c2a StackAdj> Δ-10 {[-10-]}
<MI 24c2a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x24c2e 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24c32 0x23b98> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 24c36 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24c3a 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24c3e 0x23b98> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24c42-24c44 StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24c44 0x10328> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsSmaller(a, b : Quad) : Bool
<POP 24c4a-24c4e StackAdj> Δ+16 {[-2-]}
<MI 24c4e TST.B (A7)+> Δ+2 {}
<MI 24c50 BEQ 0x24c58> {}
<POP 24c52-24c58 Naked> Σ0 →0x24c5c
<Call 0x24c52 0x2361e> {}
<MI 24c56 BRA 0x24c5c> {}
<POP 24c58-24c5c Naked> Σ0 ↓ ←0x24c26
<Call 0x24c58 0x23664> {}
<POP 24c5c-24c60 Epilogue> Σ0 ←0x24c52
@ 24c60
<LVAR 0x008 4(r)>
<POP 24c60-24cac Body>
<POP 24c60-24c72 Prologue> Σ0 ↓
<POP 24c72-24c9e Naked> Σ0 ↓ →0x24ca4
<POP 24c72-24c76 StackAdj> Δ-10 {[-10-]}
<MI 24c76 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x24c7a 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24c7e 0x23b98> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 24c82 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24c86 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24c8a 0x23b98> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24c8e-24c90 StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24c90 0x10324> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsGreater(a, b : Quad) : Bool
<POP 24c96-24c9a StackAdj> Δ+16 {[-2-]}
<MI 24c9a TST.B (A7)+> Δ+2 {}
<MI 24c9c BEQ 0x24ca4> {}
<POP 24c9e-24ca4 Naked> Σ0 →0x24ca8
<Call 0x24c9e 0x2361e> {}
<MI 24ca2 BRA 0x24ca8> {}
<POP 24ca4-24ca8 Naked> Σ0 ↓ ←0x24c72
<Call 0x24ca4 0x23664> {}
<POP 24ca8-24cac Epilogue> Σ0 ←0x24c9e
@ 24cac
<LVAR 0x008 4(r)>
<POP 24cac-24cf8 Body>
<POP 24cac-24cbe Prologue> Σ0 ↓
<POP 24cbe-24cea Naked> Σ0 ↓ →0x24cf0
<POP 24cbe-24cc2 StackAdj> Δ-10 {[-10-]}
<MI 24cc2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x24cc6 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24cca 0x23b98> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 24cce MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24cd2 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24cd6 0x23b98> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24cda-24cdc StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24cdc 0x10324> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsGreater(a, b : Quad) : Bool
<POP 24ce2-24ce6 StackAdj> Δ+16 {[-2-]}
<MI 24ce6 TST.B (A7)+> Δ+2 {}
<MI 24ce8 BNE 0x24cf0> {}
<POP 24cea-24cf0 Naked> Σ0 →0x24cf4
<Call 0x24cea 0x2361e> {}
<MI 24cee BRA 0x24cf4> {}
<POP 24cf0-24cf4 Naked> Σ0 ↓ ←0x24cbe
<Call 0x24cf0 0x23664> {}
<POP 24cf4-24cf8 Epilogue> Σ0 ←0x24cea
@ 24cf8
<LVAR 0x008 4(r)>
<POP 24cf8-24d44 Body>
<POP 24cf8-24d0a Prologue> Σ0 ↓
<POP 24d0a-24d36 Naked> Σ0 ↓ →0x24d3c
<POP 24d0a-24d0e StackAdj> Δ-10 {[-10-]}
<MI 24d0e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x24d12 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24d16 0x23b98> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 24d1a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24d1e 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24d22 0x23b98> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24d26-24d28 StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24d28 0x10328> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsSmaller(a, b : Quad) : Bool
<POP 24d2e-24d32 StackAdj> Δ+16 {[-2-]}
<MI 24d32 TST.B (A7)+> Δ+2 {}
<MI 24d34 BNE 0x24d3c> {}
<POP 24d36-24d3c Naked> Σ0 →0x24d40
<Call 0x24d36 0x2361e> {}
<MI 24d3a BRA 0x24d40> {}
<POP 24d3c-24d40 Naked> Σ0 ↓ ←0x24d0a
<Call 0x24d3c 0x23664> {}
<POP 24d40-24d44 Epilogue> Σ0 ←0x24d36
@ 24d44
<LVAR 0x008 4(r)>
<POP 24d44-24d8e Body>
<POP 24d44-24d5a Prologue> Σ0 ↓
<POP 24d5a-24d5c RegCacheLoad> Σ0 ↓
<POP 24d5c-24d86 Naked> Σ0 ↓
<POP 24d5c-24d5e StackAdj> Δ-16 {[-16-]}
<MI 24d5e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x24d62 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24d66 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 24d6a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24d6e 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24d72 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24d76-24d78 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24d78 0x10314> {[-16-]|[4, '(A6+0x8)']|[##1]}
Add(a, b : Quad) : Quad
<POP 24d7e-24d80 StackAdj> Δ+16 {[-8-]}
<Call 0x24d80 0x23c90> {[-8-]}
<POP 24d84-24d86 StackAdj> Δ+8 {}
<POP 24d86-24d8e Epilogue> Σ0
@ 24d8e
<LVAR 0x008 4(r)>
<POP 24d8e-24dd8 Body>
<POP 24d8e-24da4 Prologue> Σ0 ↓
<POP 24da4-24da6 RegCacheLoad> Σ0 ↓
<POP 24da6-24dd0 Naked> Σ0 ↓
<POP 24da6-24da8 StackAdj> Δ-16 {[-16-]}
<MI 24da8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x24dac 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24db0 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 24db4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24db8 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24dbc 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24dc0-24dc2 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24dc2 0x10318> {[-16-]|[4, '(A6+0x8)']|[##1]}
Subtract(a, b : Quad) : Quad
<POP 24dc8-24dca StackAdj> Δ+16 {[-8-]}
<Call 0x24dca 0x23c90> {[-8-]}
<POP 24dce-24dd0 StackAdj> Δ+8 {}
<POP 24dd0-24dd8 Epilogue> Σ0
@ 24dd8
<LVAR 0x008 4(r)>
<POP 24dd8-24e22 Body>
<POP 24dd8-24dee Prologue> Σ0 ↓
<POP 24dee-24df0 RegCacheLoad> Σ0 ↓
<POP 24df0-24e1a Naked> Σ0 ↓
<POP 24df0-24df2 StackAdj> Δ-16 {[-16-]}
<MI 24df2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x24df6 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24dfa 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 24dfe MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24e02 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24e06 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24e0a-24e0c StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24e0c 0x1031c> {[-16-]|[4, '(A6+0x8)']|[##1]}
Multiply(a, b : Quad) : Quad
<POP 24e12-24e14 StackAdj> Δ+16 {[-8-]}
<Call 0x24e14 0x23c90> {[-8-]}
<POP 24e18-24e1a StackAdj> Δ+8 {}
<POP 24e1a-24e22 Epilogue> Σ0
@ 24e22
<LVAR 0x008 4(r)>
<POP 24e22-24e6c Body>
<POP 24e22-24e38 Prologue> Σ0 ↓
<POP 24e38-24e3a RegCacheLoad> Σ0 ↓
<POP 24e3a-24e64 Naked> Σ0 ↓
<POP 24e3a-24e3c StackAdj> Δ-16 {[-16-]}
<MI 24e3c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x24e40 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24e44 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 24e48 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24e4c 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24e50 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24e54-24e56 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24e56 0x10320> {[-16-]|[4, '(A6+0x8)']|[##1]}
Divide(a, b : Quad) : Quad
<POP 24e5c-24e5e StackAdj> Δ+16 {[-8-]}
<Call 0x24e5e 0x23c90> {[-8-]}
<POP 24e62-24e64 StackAdj> Δ+8 {}
<POP 24e64-24e6c Epilogue> Σ0
@ 24e6c
<LVAR 0x008 4(r)>
<POP 24e6c-24eb6 Body>
<POP 24e6c-24e82 Prologue> Σ0 ↓
<POP 24e82-24e84 RegCacheLoad> Σ0 ↓
<POP 24e84-24eae Naked> Σ0 ↓
<POP 24e84-24e86 StackAdj> Δ-16 {[-16-]}
<MI 24e86 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x24e8a 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24e8e 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 24e92 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24e96 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24e9a 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24e9e-24ea0 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24ea0 0x10358> {[-16-]|[4, '(A6+0x8)']|[##1]}
Modulus(a, b : Quad) : Quad
<POP 24ea6-24ea8 StackAdj> Δ+16 {[-8-]}
<Call 0x24ea8 0x23c90> {[-8-]}
<POP 24eac-24eae StackAdj> Δ+8 {}
<POP 24eae-24eb6 Epilogue> Σ0
@ 24eb6
<LVAR 0x008 4(r)>
<POP 24eb6-24f00 Body>
<POP 24eb6-24ecc Prologue> Σ0 ↓
<POP 24ecc-24ece RegCacheLoad> Σ0 ↓
<POP 24ece-24ef8 Naked> Σ0 ↓
<POP 24ece-24ed0 StackAdj> Δ-16 {[-16-]}
<MI 24ed0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x24ed4 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24ed8 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 24edc MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24ee0 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24ee4 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24ee8-24eea StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24eea 0x10334> {[-16-]|[4, '(A6+0x8)']|[##1]}
BitOr(a, b : Quad) : Quad
<POP 24ef0-24ef2 StackAdj> Δ+16 {[-8-]}
<Call 0x24ef2 0x23c90> {[-8-]}
<POP 24ef6-24ef8 StackAdj> Δ+8 {}
<POP 24ef8-24f00 Epilogue> Σ0
@ 24f00
<LVAR 0x008 4(r)>
<POP 24f00-24f4a Body>
<POP 24f00-24f16 Prologue> Σ0 ↓
<POP 24f16-24f18 RegCacheLoad> Σ0 ↓
<POP 24f18-24f42 Naked> Σ0 ↓
<POP 24f18-24f1a StackAdj> Δ-16 {[-16-]}
<MI 24f1a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x24f1e 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24f22 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 24f26 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24f2a 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24f2e 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24f32-24f34 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24f34 0x10330> {[-16-]|[4, '(A6+0x8)']|[##1]}
BitAnd(a, b : Quad) : Quad
<POP 24f3a-24f3c StackAdj> Δ+16 {[-8-]}
<Call 0x24f3c 0x23c90> {[-8-]}
<POP 24f40-24f42 StackAdj> Δ+8 {}
<POP 24f42-24f4a Epilogue> Σ0
@ 24f4a
<LVAR 0x008 4(r)>
<POP 24f4a-24f94 Body>
<POP 24f4a-24f60 Prologue> Σ0 ↓
<POP 24f60-24f62 RegCacheLoad> Σ0 ↓
<POP 24f62-24f8c Naked> Σ0 ↓
<POP 24f62-24f64 StackAdj> Δ-16 {[-16-]}
<MI 24f64 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x24f68 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24f6c 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 24f70 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x24f74 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x24f78 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 24f7c-24f7e StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24f7e 0x10340> {[-16-]|[4, '(A6+0x8)']|[##1]}
BitXor(a, b : Quad) : Quad
<POP 24f84-24f86 StackAdj> Δ+16 {[-8-]}
<Call 0x24f86 0x23c90> {[-8-]}
<POP 24f8a-24f8c StackAdj> Δ+8 {}
<POP 24f8c-24f94 Epilogue> Σ0
@ 24f94
<LVAR 0x008 4(r)>
<POP 24f94-24fd8 Body>
<POP 24f94-24fa6 Prologue> Σ0 ↓
<POP 24fa6-24fd4 Naked> Σ0 ↓
<POP 24fa6-24faa StackAdj> Δ-16 {[-16-]}
<MI 24faa MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x24fae 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24fb2 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 24fb6 MOVE.L (A6+0x8),(A7)> {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']}
<Const 0x24fba 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
<Call 0x24fbe 0x23bd4> {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
<POP 24fc2-24fc4 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']}
<Call 0x24fc4 0x10344> {[-16-]|[4, '(A6+0x8)']}
BitShift(a : Quad ; howmuch : integer) : Quad
<POP 24fca-24fce StackAdj> Δ+12 {[-8-]}
<Call 0x24fce 0x23c90> {[-8-]}
<POP 24fd2-24fd4 StackAdj> Δ+8 {}
<POP 24fd4-24fd8 Epilogue> Σ0
@ 24fd8
<LVAR 0x008 4(r)>
<POP 24fd8-2501e Body>
<POP 24fd8-24fea Prologue> Σ0 ↓
<POP 24fea-2501a Naked> Σ0 ↓
<POP 24fea-24fee StackAdj> Δ-16 {[-16-]}
<MI 24fee MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x24ff2 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24ff6 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 24ffa MOVE.L (A6+0x8),(A7)> {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']}
<Const 0x24ffe 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
<Call 0x25002 0x23bd4> {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
<POP 25006-25008 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']}
<MI 25008 NEG.L (A7)> {[-16-]|[4, '(A6+0x8)']}
<Call 0x2500a 0x10344> {[-16-]|[4, '(A6+0x8)']}
BitShift(a : Quad ; howmuch : integer) : Quad
<POP 25010-25014 StackAdj> Δ+12 {[-8-]}
<Call 0x25014 0x23c90> {[-8-]}
<POP 25018-2501a StackAdj> Δ+8 {}
<POP 2501a-2501e Epilogue> Σ0
@ 2501e
<LVAR 0x008 4(r)>
<POP 2501e-25054 Body>
<POP 2501e-25030 Prologue> Σ0 ↓
<POP 25030-25050 Naked> Σ0 ↓
<POP 25030-25034 StackAdj> Δ-16 {[-16-]}
<MI 25034 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x25038 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2503c 0x23b98> {[-16-]|[4, '(A6+0x8)']|[##1]}
<POP 25040-25042 StackAdj> Δ+8 {[-16-]}
<Call 0x25042 0x10338> {[-16-]}
BitNot(a : Quad) : Quad
<POP 25048-2504a StackAdj> Δ+8 {[-8-]}
<Call 0x2504a 0x23c90> {[-8-]}
<POP 2504e-25050 StackAdj> Δ+8 {}
<POP 25050-25054 Epilogue> Σ0
@ 25054
<LVAR 0x008 4(r)>
<LVAR -0x00c 4(rw)>
<LVAR -0x010 4(rw)>
<LVAR -0x014 4(rw)>
<LVAR -0x018 4(rw)>
<POP 25054-250e4 Body>
<POP 25054-2506a Prologue> Σ0 ↓
<POP 2506a-2506e RegCacheLoad> Σ0 ↓
<POP 2506e-250dc Naked> Σ0 ↓
<POP 2506e-25070 StackAdj> Δ-8 {[-8-]}
<MI 25070 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x25072 0x1.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##1]}
<Call 0x25076 0x23b98> {[-8-]|[4, '(A6+0x8)']|[##1]}
<POP 2507a-2507c StackAdj> Δ+8 {[-8-]}
<MI 2507c MOVE.L (A7)+,(A6-0x18)> Δ+4 {[-4-]}
<MI 25080 MOVE.L (A7),(A6-0x14)> {[-4-]}
<POP 25084-25086 StackAdj> Δ-4 {[-8-]}
<MI 25086 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x25088 0x2.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##2]}
<Call 0x2508c 0x23b98> {[-8-]|[4, '(A6+0x8)']|[##2]}
<POP 25090-25092 StackAdj> Δ+8 {[-8-]}
<MI 25092 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 25096 MOVE.L (A7),(A6-0xc)> {[-4-]}
<MI 2509a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x2509c 0x3.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##3]}
<Call 0x250a0 0x23bd4> {[-4-]|[4, '(A6+0x8)']|[##3]}
<POP 250a4-250a6 StackAdj> Δ+8 {[-4-]}
<MI 250a6 MOVE.L (A7),D7> {[-4-]}
<MI 250a8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x250aa 0x4.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##4]}
<Call 0x250ae 0x23bd4> {[-4-]|[4, '(A6+0x8)']|[##4]}
<POP 250b2-250b4 StackAdj> Δ+8 {[-4-]}
<MI 250b4 MOVE.L (A7),D6> {[-4-]}
<POP 250b6-250b8 StackAdj> Δ-4 {[-8-]}
<MI 250b8 MOVE.L (A6-0x14),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']}
<MI 250bc MOVE.L (A6-0x18),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']}
<MI 250c0 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']}
<MI 250c4 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<MI 250c8 MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']}
<MI 250ca MOVE.L D6,-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
<Call 0x250cc 0x10348> {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
?BitField_something_()
<POP 250d2-250d6 StackAdj> Δ+24 {[-8-]}
<Call 0x250d6 0x23c90> {[-8-]}
<POP 250da-250dc StackAdj> Δ+8 {}
<POP 250dc-250e4 Epilogue> Σ0
@ 250e4
<LVAR 0x008 4(r)>
<LVAR -0x00c 4(rw)>
<LVAR -0x010 4(rw)>
<POP 250e4-25156 Body>
<POP 250e4-250fa Prologue> Σ0 ↓
<POP 250fa-250fe RegCacheLoad> Σ0 ↓
<POP 250fe-2514e Naked> Σ0 ↓
<POP 250fe-25100 StackAdj> Δ-8 {[-8-]}
<MI 25100 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x25102 0x1.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##1]}
<Call 0x25106 0x23b98> {[-8-]|[4, '(A6+0x8)']|[##1]}
<POP 2510a-2510c StackAdj> Δ+8 {[-8-]}
<MI 2510c MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 25110 MOVE.L (A7),(A6-0xc)> {[-4-]}
<MI 25114 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x25116 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x2511a 0x23bd4> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 2511e-25120 StackAdj> Δ+8 {[-4-]}
<MI 25120 MOVE.L (A7),D7> {[-4-]}
<MI 25122 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x25124 0x3.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##3]}
<Call 0x25128 0x23bd4> {[-4-]|[4, '(A6+0x8)']|[##3]}
<POP 2512c-2512e StackAdj> Δ+8 {[-4-]}
<MI 2512e MOVE.L (A7),D6> {[-4-]}
<POP 25130-25132 StackAdj> Δ-4 {[-8-]}
<MI 25132 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']}
<MI 25136 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<MI 2513a MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']}
<MI 2513c MOVE.L D6,-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
<Call 0x2513e 0x1034c> {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
FSCALL_1034c
<POP 25144-25148 StackAdj> Δ+16 {[-8-]}
<Call 0x25148 0x23c90> {[-8-]}
<POP 2514c-2514e StackAdj> Δ+8 {}
<POP 2514e-25156 Epilogue> Σ0
@ 25156
<LVAR 0x008 4(r)>
<POP 25156-251c8 Body>
<POP 25156-2516c Prologue> Σ0 ↓
<POP 2516c-2517a Naked> Σ0 Δ-4 ↓
<POP 2516c-2516e StackAdj> Δ-4 {[-4-]}
<MI 2516e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x25172 0x2323c> {[-4-]|[4, '(A6+0x8)']}
<POP 25176-25178 StackAdj> Δ+4 {[-4-]}
<MI 25178 MOVEQ.L #0x01,D7> {[-4-]}
<POP 2517a-2517e Naked> Σ-4 ↓ →0x251a4 ←0x2517e
<MI 2517a CMP.L (A7),D7> {[-4-]}
<MI 2517c BGT 0x251a4> {[-4-]}
<POP 2517e-251a4 Naked> Σ-4 ↓ →0x2517a
<POP 2517e-25180 StackAdj> Δ-4 {[-8-]}
<MI 25180 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<MI 25184 MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x25186 0x23b66> {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<POP 2518a-2518c StackAdj> Δ+8 {[-8-]}
<Call 0x2518c 0x103d8> {[-8-]}
WriteConsoleString(str : String)
<POP 25192-25194 StackAdj> Δ+2 {[-6-]}
<POP 25194-25195 StackAdj> Δ+2 {[-4-]}
<Const 0x25195 0x20.2> Δ-2 {[-4-]|[#32]}
<Call 0x25198 0x103d0> {[-4-]|[#32]}
WriteConsoleChar(chr : char)
<POP 2519e-251a0 StackAdj> Δ+2 {[-4-]}
<MI 251a0 ADDQ.L #0x1,D7> {[-4-]}
<MI 251a2 BVC 0x2517a> {[-4-]}
<POP 251a4-251c0 Naked> Σ-4 Δ+4 ↓ ←0x2517a
<Const 0x251a4 0x1.4> Δ-4 {[-4-]|[##1]}
<Call 0x251a8 0x103e4> {[-4-]|[##1]}
AskConsoleString(prompt : String) : String
<POP 251ae-251b0 StackAdj> Δ+4 {[-4-]}
<MI 251b0 MOVEA.L (A7)+,A4> Δ+4 {}
<MI 251b2 MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']}
<Call 0x251b4 0x23084> {[4, 'A4']}
<MI 251b8 MOVE.L A4,(A7)> {[4, 'A4']}
<Call 0x251ba 0x23c08> {[4, 'A4']}
<POP 251be-251c0 StackAdj> Δ+4 {}
<POP 251c0-251c8 Epilogue> Σ0
@ 251c8
<LVAR 0x008 4(r)>
<POP 251c8-2524a Body>
<POP 251c8-251de Prologue> Σ0 ↓
<POP 251de-251e4 RegCacheLoad> Σ0 ↓
<POP 251e4-25242 Naked> Σ0 ↓
<POP 251e4-251e6 StackAdj> Δ-4 {[-4-]}
<MI 251e6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x251e8 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x251ec 0x23b66> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 251f0-251f2 StackAdj> Δ+8 {[-4-]}
<MI 251f2 MOVEA.L (A7)+,A4> Δ+4 {}
<POP 251f4-251f6 StackAdj> Δ-12 {[-12-]}
<MI 251f6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<Const 0x251f8 0x2.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##2]}
<Call 0x251fc 0x23b98> {[-12-]|[4, '(A6+0x8)']|[##2]}
<POP 25200-25202 StackAdj> Δ+8 {[-12-]}
<Call 0x25202 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 25208-2520a StackAdj> Δ+8 {[-4-]}
<MI 2520a MOVE.L (A7),D7> {[-4-]}
<POP 2520c-2520e StackAdj> Δ-8 {[-12-]}
<MI 2520e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<Const 0x25210 0x3.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##3]}
<Call 0x25214 0x23b98> {[-12-]|[4, '(A6+0x8)']|[##3]}
<POP 25218-2521a StackAdj> Δ+8 {[-12-]}
<Call 0x2521a 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 25220-25222 StackAdj> Δ+8 {[-4-]}
<MI 25222 MOVE.L (A7),D6> {[-4-]}
<POP 25224-25226 StackAdj> Δ-8 {[-12-]}
<MI 25226 MOVE.L A4,-(A7)> Δ-4 {[-12-]|[4, 'A4']}
<MI 25228 MOVE.L D7,-(A7)> Δ-4 {[-12-]|[4, 'A4']|[4, 'D7']}
<Call 0x2522a 0x10360> {[-12-]|[4, 'A4']|[4, 'D7']}
?StringToInt64()
<POP 25230-25232 StackAdj> Δ+4 {[-12-]|[4, 'A4']}
<MI 25232 MOVE.L D6,(A7)> {[-12-]|[4, 'D6']}
<Call 0x25234 0x1035c> {[-12-]|[4, 'D6']}
Quad2String(a : Quad; radix : Long ) : String
<POP 2523a-2523c StackAdj> Δ+12 {[-4-]}
<Call 0x2523c 0x23c08> {[-4-]}
<POP 25240-25242 StackAdj> Δ+4 {}
<POP 25242-2524a Epilogue> Σ0
@ 2524a
<LVAR 0x008 4(r)>
<LVAR -0x00a 2(r)>
<LVAR -0x00c 4(rw)>
<LVAR -0x010 4(rw)>
<POP 2524a-252ca Body>
<POP 2524a-25260 Prologue> Σ0 ↓
<POP 25260-25268 RegCacheLoad> Σ0 ↓
<POP 25268-25280 Naked> Σ0 ↓
<POP 25268-2526a StackAdj> Δ-8 {[-8-]}
<MI 2526a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x2526e 0x1.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##1]}
<Call 0x25272 0x23b98> {[-8-]|[4, '(A6+0x8)']|[##1]}
<POP 25276-25278 StackAdj> Δ+8 {[-8-]}
<MI 25278 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 2527a MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 2527c MOVEQ.L #0x00,D7> {}
<MI 2527e MOVEQ.L #0x00,D6> {}
<POP 25280-252b0 Naked> Σ0 ↓ →0x25280 ←0x25280
<MI 25280 MOVE.W (A6-0xa),D0> {}
<MI 25284 ANDI.W #0x0001,D0> {}
<MI 25288 CLR.L D1> {}
<MI 2528a MOVE.W D0,D1> {}
<MI 2528c ADD.L D1,D7> {}
<POP 2528e-25290 StackAdj> Δ-8 {[-8-]}
<MI 25290 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']}
<MI 25292 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<Const 0x25294 0xffffffff.4> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[##4294967295]}
<Call 0x25298 0x10344> {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[##4294967295]}
BitShift(a : Quad ; howmuch : integer) : Quad
<POP 2529e-252a2 StackAdj> Δ+12 {[-8-]}
<MI 252a2 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 252a4 MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 252a6 ADDQ.L #0x1,D6> {}
<MI 252a8 CMPI.L #0x0000003f,D6> {}
<MI 252ae BLE 0x25280> {}
<POP 252b0-252c2 Naked> Σ0 ↓
<POP 252b0-252b2 StackAdj> Δ-8 {[-8-]}
<MI 252b2 MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, 'D7']}
<Call 0x252b4 0x10354> {[-8-]|[4, 'D7']}
Long2Quad(a : Long) : Quad
<POP 252ba-252bc StackAdj> Δ+4 {[-8-]}
<Call 0x252bc 0x23c90> {[-8-]}
<POP 252c0-252c2 StackAdj> Δ+8 {}
<POP 252c2-252ca Epilogue> Σ0
@ 252ca
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 1(r)>
<POP 252ca-2538e Body>
<POP 252ca-252e0 Prologue> Σ0 ↓
<POP 252e0-252ea RegCacheLoad> Σ0 ↓
<POP 252ea-252ee Naked> Σ0 ↓ →0x25320
<MI 252ea TST.B 0x279b0> {}
<MI 252ec BNE 0x25320> {}
<POP 252ee-25320 Naked> Σ0 ↓
<Blob 0x252ee [28] @> Δ-28 {[«28""»]}
<POP 25300-25302 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x25302 27> {[«28""»]|[$$REPEATing, type ^G to exit.]}
<Call 0x25314 0x103e0> {[«28""»]|[$$REPEATing, type ^G to exit.]}
WriteConsoleStringCrLf(str : String)
<POP 2531a-2531e StackAdj> Δ+32 {}
<MI 2531e MOVE.B #0x01,0x279b0> {}
<POP 25320-2534a Naked> Σ0 ↓ →0x25360 ←0x252ea
<POP 25320-25322 StackAdj> Δ-6 {[-6-]}
<Call 0x25322 0x103f8> {[-6-]}
GetConsoleConfig() : Long
<MI 25328 MOVE.L (A7)+,D0> Δ+4 {[-2-]}
<POP 0x2532a LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-2-]}
<MI 25334 MOVE.W D0,(A7)> {[2, 'D0']}
<Pointer.fp 0x25336 <LVAR -0x004 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-4]}
<Call 0x2533a 0x10212> {[2, 'D0']|[@@-4]}
KC09_PortStatus(Port : Word; VAR b: Byte)
<POP 25340-25342 StackAdj> Δ+6 {}
<MI 25342 MOVE.B (A6-0x4),D0> {}
<MI 25346 CMP.B #0x01,D0> {}
<MI 25348 BEQ 0x25360> {}
<POP 2534a-25360 Naked> Σ0
<MI 2534a MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<Call 0x2534e 0x22de6> {[4, '(A6+0x8)']}
<POP 25352-25354 StackAdj> Δ+4 {}
<POP 25354-25360 Bailout> {}
<MI 25354 MOVEA.L (A5+0x8),A7>
<MI 25358 MOVEA.W #0x00,A6>
<MI 2535a JMP 0x2676a>
<POP 25360-25370 Naked> Σ0 ↓ →0x25386 ←0x25320
<POP 25360-25362 StackAdj> Δ-2 {[-2-]}
<Call 0x25362 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 25368 MOVE.B (A7)+,D0> Δ+2 {}
<MI 2536a CMPI.B #0x07,D0> {}
<MI 2536e BEQ 0x25386> {}
<POP 25370-25386 Naked> Σ0
<MI 25370 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<Call 0x25374 0x22de6> {[4, '(A6+0x8)']}
<POP 25378-2537a StackAdj> Δ+4 {}
<POP 2537a-25386 Bailout> {}
<MI 2537a MOVEA.L (A5+0x8),A7>
<MI 2537e MOVEA.W #0x00,A6>
<MI 25380 JMP 0x2676a>
<POP 25386-2538e Epilogue> Σ0 ←0x25360
@ 2538e
<POP 2538e-253ae Body>
<POP 2538e-253a0 Prologue> Σ0 ↓
<POP 253a0-253aa Naked> Σ0 ↓
<Const 0x253a0 0xc8.4> Δ-4 {[##200]}
<Call 0x253a4 0x23cc4> {[##200]}
<POP 253a8-253aa StackAdj> Δ+4 {}
<POP 253aa-253ae Epilogue> Σ0
@ 253ae
<LVAR 0x008 4(r)>
<LVAR -0x00c @ 4(r)>
<POP 253ae-2545a Body>
<POP 253ae-253c4 Prologue> Σ0 ↓
<POP 253c4-253c8 RegCacheLoad> Σ0 ↓
<POP 253c8-253dc Naked> Σ0 Δ-4 ↓
<Pointer.fp 0x253c8 <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-12]}
<Call 0x253ca 0x102b8> {[@@-12]}
NewString(VAR a : String)
<MI 253d0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[@@-12]|[4, '(A6+0x8)']}
<Call 0x253d4 0x2323c> {[@@-12]|[4, '(A6+0x8)']}
<POP 253d8-253da StackAdj> Δ+4 {[@@-12]}
<MI 253da MOVEQ.L #0x01,D7> {[@@-12]}
<POP 253dc-253e0 Naked> Σ-4 ↓ →0x2544a ←0x25446
<MI 253dc CMP.L (A7),D7> {[-4-]}
<MI 253de BGT 0x2544a> {[-4-]}
<POP 253e0-253f2 Naked> Σ-4 ↓ →0x25412
<POP 253e0-253e2 StackAdj> Δ-4 {[-8-]}
<MI 253e2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<MI 253e6 MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x253e8 0x23bd4> {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<POP 253ec-253ee StackAdj> Δ+8 {[-8-]}
<MI 253ee MOVE.L (A7)+,D6> Δ+4 {[-4-]}
<MI 253f0 BLT 0x25412> {[-4-]}
<POP 253f2-253fa Naked> Σ-4 ↓ →0x25412
<MI 253f2 CMPI.L #0x000000ff,D6> {[-4-]}
<MI 253f8 BGT 0x25412> {[-4-]}
<POP 253fa-25412 Naked> Σ-4 →0x25446
<MI 253fa MOVE.L (A6-0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6-0xc)']}
<POP 0x253fc LimitCheck 0x0 ≤ D6 ≤ 0xff> {[-4-]|[4, '(A6-0xc)']}
<MI 25406 MOVE.B D6,-(A7)> Δ-2 {[-4-]|[4, '(A6-0xc)']|[2, 'D6']}
<Call 0x25408 0x102c0> {[-4-]|[4, '(A6-0xc)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 2540e-25410 StackAdj> Δ+6 {[-4-]}
<MI 25410 BRA 0x25446> {[-4-]}
<POP 25412-25446 Naked> Σ-4 ↓ ←0x253e0 ←0x253f2
<Pointer.fp 0x25412 <LVAR -0x00c @ 4(r)>> Δ-4 {[-4-]|[@@-12]}
<Call 0x25414 0x102bc> {[-4-]|[@@-12]}
FreeString(VAR a : String)
<POP 2541a-2541c StackAdj> Δ+4 {[-4-]}
<Blob 0x2541c [28] @> Δ-28 {[-4-]|[«28""»]}
<POP 25428-2542a StackAdj> Δ-4 {[-4-]|[«28""»]|[-4-]}
<Lit 0x2542a 28> {[-4-]|[«28""»]|[$$ASCII argument out of range.]}
<Call 0x2543e 0x22e28> {[-4-]|[«28""»]|[$$ASCII argument out of range.]}
<POP 25442-25446 StackAdj> Δ+32 {[-4-]}
<POP 25446-2544a Naked> Σ-4 ↓ →0x253dc ←0x253fa
<MI 25446 ADDQ.L #0x1,D7> {[-4-]}
<MI 25448 BVC 0x253dc> {[-4-]}
<POP 2544a-25452 Naked> Σ-4 Δ+4 ↓ ←0x253dc
<MI 2544a MOVE.L (A6-0xc),(A7)> {[4, '(A6-0xc)']}
<Call 0x2544c 0x23c08> {[4, '(A6-0xc)']}
<POP 25450-25452 StackAdj> Δ+4 {}
<POP 25452-2545a Epilogue> Σ0
@ 2545a
<LVAR 0x00c 1(rw)>
<LVAR 0x008 4(r)>
<POP 2545a-25516 Body> Δ-8
<POP 2545a-25470 Prologue> Σ0 ↓
<POP 25470-25480 Naked> Σ0 Δ-4 ↓
<MI 25470 CLR.B (A6+0xc)> {}
<MI 25474 MOVEA.L (A6+0x8),A0> {}
<MI 25478 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2547a MOVEQ.L #0x00,D0> {[4, 'A0']}
<MI 2547c ADDQ.W #0x1,D0> {[4, 'A0']}
<MI 2547e MOVE.B D0,D6> {[4, 'A0']}
<POP 25480-2548a Naked> Σ-4 ↓ →0x2550c ←0x25504
<MI 25480 CMPI.B #0x2b,D6> {[-4-]}
<MI 25484 BGT 0x2550c> {[-4-]}
<POP 2548a-254b0 Naked> Σ-4 ↓ →0x25504
<MI 2548a LEA.L 0x22d14,A0> {[-4-]}
<MI 2548e MOVE.B D6,D0> {[-4-]}
<MI 25490 EXTB.W D0> {[-4-]}
<MI 25492 EXTW.L D0> {[-4-]}
<MI 25494 ROR.L #0x1,D0> {[-4-]}
<MI 25496 ADDA.W D0,A0> {[-4-]}
<MI 25498 SWAP.W D0> {[-4-]}
<MI 2549a ROL.W #0x3,D0> {[-4-]}
<MI 2549c CLR.L D1> {[-4-]}
<MI 2549e MOVE.B (A0),D1> {[-4-]}
<MI 254a0 LSL.B D0,D1> {[-4-]}
<MI 254a2 LSR.B #0x4,D1> {[-4-]}
<MI 254a4 MOVE.L D1,D5> {[-4-]}
<MI 254a6 MOVEA.L (A7),A0> {[-4-]}
<MI 254a8 MOVE.W (A0),D0> {[-4-]}
<MI 254aa EXTW.L D0> {[-4-]}
<MI 254ac CMP.L D0,D5> {[-4-]}
<MI 254ae BNE 0x25504> {[-4-]}
<POP 254b0-254b4 Naked> Σ-4 Δ-4 ↓
<MI 254b0 MOVE.L D5,-(A7)> Δ-4 {[-4-]|[4, 'D5']}
<MI 254b2 MOVEQ.L #0x01,D7> {[-4-]|[4, 'D5']}
<POP 254b4-254b8 Naked> Σ-8 ↓ →0x254fa ←0x254f6
<MI 254b4 CMP.L (A7),D7> {[-8-]}
<MI 254b6 BGT 0x254fa> {[-8-]}
<POP 254b8-254f2 Naked> Σ-8 ↓ →0x254f6
<MI 254b8 MOVE.B D6,D0> {[-8-]}
<MI 254ba EXTB.W D0> {[-8-]}
<MI 254bc MULS.W #0xa,D0> {[-8-]}
<MI 254c0 MOVE.L D7,D1> {[-8-]}
<MI 254c2 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x254c4 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 254ce MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 254d2 LEA.L 0x22b5c,A1> {[-8-]}
<MI 254d6 MOVE.L D7,D2> {[-8-]}
<MI 254d8 SUBQ.L #0x1,D2> {[-8-]}
<POP 0x254da LimitCheck 0x0 ≤ D2 ≤ 0x9> {[-8-]}
<MI 254e4 LEA.L (A1+D0.W),A1> {[-8-]}
<MI 254e8 MOVE.B (A0+D1.L+#0x2),D0> {[-8-]}
<MI 254ec CMP.B (A1+D2.L),D0> {[-8-]}
<MI 254f0 BEQ 0x254f6> {[-8-]}
<POP 254f2-254f6 Naked> Σ-8 Δ+4 →0x25504
<POP 254f2-254f4 StackAdj> Δ+4 {[-4-]}
<MI 254f4 BRA 0x25504> {[-4-]}
<POP 254f6-254fa Naked> Σ-8 ↓ →0x254b4 ←0x254b8
<MI 254f6 ADDQ.L #0x1,D7> {[-8-]}
<MI 254f8 BVC 0x254b4> {[-8-]}
<POP 254fa-25504 Naked> Σ-8 Δ+8 →0x2550e ←0x254b4
<POP 254fa-254fc StackAdj> Δ+4 {[-4-]}
<MI 254fc MOVE.B D6,(A6+0xc)> {[-4-]}
<POP 25500-25502 StackAdj> Δ+4 {}
<MI 25502 BRA 0x2550e> {}
<POP 25504-2550c Naked> Σ-4 ↓ →0x25480 ←0x2548a ←0x254f2
<MI 25504 ADDQ.B #0x1,D6> {[-4-]}
<MI 25506 BVC 0x25480> {[-4-]}
<POP 2550c-2550e Naked> Σ-4 Δ+4 ↓ ←0x25480
<POP 2550c-2550e StackAdj> Δ+4 {}
<POP 2550e-25516 Epilogue> Σ0 ←0x254fa
@ 25516
TRY_SCRIPT_FILE(?)
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @ 1(r)>
<LVAR -0x006 @ 4(w)>
<LVAR -0x008 @ 1(r)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x010 @ 4(rw)>
<POP 25516-25652 Body>
<POP 25516-2552c Prologue> Σ0 ↓
<POP 2552c-2553a RegCacheLoad> Σ0 ↓
<POP 2553a-255a6 Naked> Σ0 ↓ →0x255f0
<POP 2553a-2553c StackAdj> Δ-4 {[-4-]}
<MI 2553c MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<Call 0x25540 0x102cc> {[-4-]|[4, '(A6+0xc)']}
StringDup(a : String) : String
<POP 25546-25548 StackAdj> Δ+4 {[-4-]}
<MI 25548 MOVE.L (A7)+,(A6-0x10)> Δ+4 {}
<MI 2554a MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']}
<Const 0x2554c 0x2e.2> Δ-2 {[4, '(A6-0x10)']|[#46]}
<Call 0x25550 0x102c0> {[4, '(A6-0x10)']|[#46]}
AppendChar(MOD b : String; a : char)
<POP 25556-25558 StackAdj> Δ+6 {}
<Blob 0x25558 [10] 0x27990> Δ-10 {[«10»]}
<POP 25566-25568 StackAdj> Δ-4 {[«10»]|[-4-]}
<MI 25568 MOVE.L (A6-0x10),-(A7)> Δ-4 {[«10»]|[-4-]|[4, '(A6-0x10)']}
<POP 2556a-2556c StackAdj> Δ-4 {[«10»]|[-4-]|[4, '(A6-0x10)']|[-4-]}
<Lit 0x2556c> {[«10»]|[-4-]|[4, '(A6-0x10)']|[$$…]}
<Pointer.sp 0x2556c 12> Δ-4
<Const 0x25570 0x1.2> Δ-2
<Const 0x25572 0xa.2> Δ-2
<Call 0x25576 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2557c-2557e StackAdj> Δ+8
<Call 0x2557e 0x102d0> {[«10»]|[-4-]|[4, '(A6-0x10)']|[$$…]}
StringCat2(a, b : String) : String
<POP 25584-25586 StackAdj> Δ+8 {[«10»]|[-4-]}
<MI 25586 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[«10»]}
<POP 25588-2558a StackAdj> Δ+6 {[-4-]}
<MI 2558a MOVE.L (A6-0x10),(A7)> {[4, '(A6-0x10)']}
<MI 2558c CLR.B -(A7)> Δ-2 {[4, '(A6-0x10)']|[#0]}
<Const 0x2558e 0x1.2> Δ-2 {[4, '(A6-0x10)']|[#0]|[#1]}
<Const 0x25590 0x0.4> Δ-4 {[4, '(A6-0x10)']|[#0]|[#1]|[##0]}
<Pointer.fp 0x25594 <LVAR -0x002 @ 1(r)>> Δ-4 {[4, '(A6-0x10)']|[#0]|[#1]|[##0]|[@@-2]}
<Pointer.fp 0x25596 <LVAR -0x00c @ 4(r)>> Δ-4 {[4, '(A6-0x10)']|[#0]|[#1]|[##0]|[@@-2]|[@@-12]}
<Call 0x25598 0x10380> {[4, '(A6-0x10)']|[#0]|[#1]|[##0]|[@@-2]|[@@-12]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 2559e-255a2 StackAdj> Δ+20 {}
<MI 255a2 TST.B (A6-0x2)> {}
<MI 255a4 BEQ 0x255f0> {}
<POP 255a6-255f0 Naked> Σ0 ↓
<Pointer.fp 0x255a6 <LVAR -0x010 @ 4(rw)>> Δ-4 {[@@-16]}
<Call 0x255a8 0x102bc> {[@@-16]}
FreeString(VAR a : String)
<MI 255ae MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<Call 0x255b2 0x22de6> {[4, '(A6+0x8)']}
<POP 255b6-255b7 StackAdj> Δ+4 ↓ {}
<Blob 0x255b7 [26] @> Δ-26 {[«26""»]}
<POP 255c8-255ca StackAdj> Δ-8 {[«26""»]|[-8-]}
<Lit 0x255ca 25> {[«26""»]|[-4-]|[$$Not a command or macro :_]}
<POP 255da-255dc StackAdj> Δ-4 {[«26""»]|[-4-]|[$$Not a command or macro :_]|[-4-]}
<MI 255dc MOVE.L (A6+0xc),(A7)> {[«26""»]|[-4-]|[$$Not a command or macro :_]|[4, '(A6+0xc)']}
<Call 0x255e0 0x102d0> {[«26""»]|[-4-]|[$$Not a command or macro :_]|[4, '(A6+0xc)']}
StringCat2(a, b : String) : String
<POP 255e6-255e8 StackAdj> Δ+8 {[«26""»]|[-4-]}
<Call 0x255e8 0x22e28> {[«26""»]|[-4-]}
<POP 255ec-255f0 StackAdj> Δ+30 {}
<POP 255f0-255f8 Naked> Σ0 ↓ ←0x2553a
<MI 255f0 MOVE.L 0x2797e,(A6-0x6)> {}
<POP 255f8-25610 Naked> Σ0 ↓ →0x25624 ←0x25624
<MI 255f8 MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']}
<Pointer.fp 0x255fa <LVAR -0x010 @ 4(rw)>> Δ-4 {[4, '(A6-0xc)']|[@@-16]}
<Pointer.fp 0x255fc <LVAR -0x008 @ 1(r)>> Δ-4 {[4, '(A6-0xc)']|[@@-16]|[@@-8]}
<Call 0x25600 0x1043c> {[4, '(A6-0xc)']|[@@-16]|[@@-8]}
FileReadLine(file : File; VAR a : String; VAR b : Byte)
<POP 25606-2560a StackAdj> Δ+12 {}
<MI 2560a MOVEA.L (A6-0x10),A0> {}
<MI 2560c TST.W (A0)> {}
<MI 2560e BEQ 0x25624> {}
<POP 25610-25624 Naked> Σ0 ↓
<MI 25610 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']}
<Call 0x25612 0x23084> {[4, '(A6-0x10)']}
<POP 25616-25618 StackAdj> Δ+4 {}
<Pointer.fp 0x25618 <LVAR -0x006 @ 4(w)>> Δ-4 {[@@-6]}
<MI 2561c MOVE.L (A6-0x10),-(A7)> Δ-4 {[@@-6]|[4, '(A6-0x10)']}
<Call 0x2561e 0x2340e> {[@@-6]|[4, '(A6-0x10)']}
<POP 25622-25624 StackAdj> Δ+8 {}
<POP 25624-2562a Naked> Σ0 ↓ →0x255f8 ←0x255f8
<MI 25624 TST.B (A6-0x8)> {}
<MI 25628 BEQ 0x255f8> {}
<POP 2562a-2564a Naked> Σ0 ↓
<MI 2562a CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x2562c 0x1.2> Δ-2 {[#0]|[#1]}
<Const 0x2562e 0x1.4> Δ-4 {[#0]|[#1]|[##1]}
<Pointer.fp 0x25632 <LVAR -0x002 @ 1(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-2]}
<Pointer.fp 0x25634 <LVAR -0x00c @ 4(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-2]|[@@-12]}
<Call 0x25636 0x1038c> {[#0]|[#1]|[##1]|[@@-2]|[@@-12]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 2563c-25640 StackAdj> Δ+16 {}
<Pointer.fp 0x25640 <LVAR -0x010 @ 4(rw)>> Δ-4 {[@@-16]}
<Call 0x25642 0x102bc> {[@@-16]}
FreeString(VAR a : String)
<POP 25648-2564a StackAdj> Δ+4 {}
<POP 2564a-25652 Epilogue> Σ0
@ 25652
<LVAR 0x014 1(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 25652-25692 Body>
<POP 25652-25668 Prologue> Σ0 ↓
<POP 25668-2568a Naked> Σ0 ↓
<MI 25668 MOVE.L (A6+0xc),D0> {}
<MI 2566c ADD.L (A6+0x8),D0> {}
<MI 25670 SUBQ.L #0x1,D0> {}
<MI 25672 SUBQ.L #0x1,D0> {}
<POP 0x25674 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {}
<MI 2567e LEA.L 0x26976,A0> {}
<MI 25684 MOVE.B (A0+D0.L+#0x8),(A6+0x14)> {}
<POP 2568a-25692 Epilogue> Σ0
@ 25692
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 1(r)>
<LVAR -0x008 @ 4(r)>
<POP 25692-2570e Body>
<POP 25692-256a8 Prologue> Σ0 ↓
<POP 256a8-256d0 Naked> Σ0 ↓ →0x25700
<POP 256a8-256aa StackAdj> Δ-4 {[-4-]}
<MI 256aa MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 256ae MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x256b2 0x23aea> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 256b6-256b8 StackAdj> Δ+8 {[-4-]}
<Pointer.fp 0x256b8 <LVAR -0x004 @ 1(r)>> Δ-4 {[-4-]|[@@-4]}
<Pointer.fp 0x256bc <LVAR -0x008 @ 4(r)>> Δ-4 {[-4-]|[@@-4]|[@@-8]}
<Call 0x256c0 0x102ec> {[-4-]|[@@-4]|[@@-8]}
String2Long(src : String; VAR status : Bool; VAR retval : Long)
<POP 256c6-256ca StackAdj> Δ+12 {}
<MI 256ca TST.B (A6-0x4)> {}
<MI 256ce BNE 0x25700> {}
<POP 256d0-25700 Naked> Σ0 ↓
<Blob 0x256d0 [24] @> Δ-24 {[«24""»]}
<POP 256e2-256e4 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x256e4 23> {[«24""»]|[$$Illegal marker argument]}
<Call 0x256f8 0x22e28> {[«24""»]|[$$Illegal marker argument]}
<POP 256fc-25700 StackAdj> Δ+28 {}
<POP 25700-25706 Naked> Σ0 ↓ ←0x256a8
<MI 25700 MOVE.L (A6-0x8),(A6+0x10)> {}
<POP 25706-2570e Epilogue> Σ0
@ 2570e
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x00c 4(rw)>
<LVAR -0x010 4(rw)>
<LVAR -0x014 4(rw)>
<LVAR -0x018 4(w)>
<LVAR -0x020 4(rw)>
<POP 2570e-2583a Body>
<POP 2570e-25724 Prologue> Σ0 ↓
<POP 25724-25734 RegCacheLoad> Σ0 ↓
<POP 25734-2574e Naked> Σ0 Δ-4 ↓
<MI 25734 MOVEQ.L #0x00,D7> {}
<MI 25736 MOVE.L (A6+0x14),(A6-0x20)> {}
<MI 2573a MOVE.L 0x2797e,D0> {}
<MI 25740 SUB.L (A6+0x14),D0> {}
<MI 25744 MOVE.L D0,(A6-0x14)> {}
<MI 25746 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 2574a MOVE.L (A6+0x10),D5> {[4, '(A6+0xc)']}
<POP 2574e-25752 Naked> Σ-4 ↓ →0x2577e ←0x2577a
<MI 2574e CMP.L (A7),D5> {[-4-]}
<MI 25750 BGT 0x2577e> {[-4-]}
<POP 25752-25778 Naked> Σ-4 ↓ →0x2577a
<POP 25752-25754 StackAdj> Δ-8 {[-12-]}
<MI 25754 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<MI 25758 MOVE.L D5,-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<Call 0x2575a 0x23a88> {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<POP 2575e-25760 StackAdj> Δ+8 {[-12-]}
<MI 25760 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-8-]}
<MI 25762 MOVE.L (A7),(A6-0xc)> {[-8-]}
<MI 25764 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']}
<MI 25766 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<Call 0x25768 0x23a50> {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<POP 2576c-2576e StackAdj> Δ+8 {[-8-]}
<MI 2576e MOVE.L (A7)+,D6> Δ+4 {[-4-]}
<MI 25770 ADD.L D6,D7> {[-4-]}
<MI 25772 CMP.L (A6+0xc),D5> {[-4-]}
<MI 25776 BGE 0x2577a> {[-4-]}
<POP 25778-2577a Naked> Σ-4 ↓
<MI 25778 ADDQ.L #0x1,D7> {[-4-]}
<POP 2577a-2577e Naked> Σ-4 ↓ →0x2574e ←0x25752
<MI 2577a ADDQ.L #0x1,D5> {[-4-]}
<MI 2577c BVC 0x2574e> {[-4-]}
<POP 2577e-2578c Naked> Σ-4 Δ+4 ↓ →0x25798 ←0x2574e
<POP 2577e-25780 StackAdj> Δ+4 {}
<MI 25780 MOVE.L (A6-0x20),D0> {}
<MI 25782 ADD.L (A6-0x14),D0> {}
<MI 25784 MOVE.L D0,(A6-0x18)> {}
<MI 25788 CMP.L (A6-0x14),D7> {}
<MI 2578a BEQ 0x25798> {}
<POP 2578c-25798 Naked> Σ0 ↓
<MI 2578c MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 2578e MOVE.L (A6-0x14),-(A7)> Δ-4 {[4, 'D0']|[4, '(A6-0x14)']}
<MI 25790 SUB.L D7,(A7)> {[4, 'D0']|[-4-]}
<Call 0x25792 0x23384> {[4, 'D0']|[-4-]}
<POP 25796-25798 StackAdj> Δ+8 {}
<POP 25798-257a0 Naked> Σ0 Δ-4 ↓ ←0x2577e
<MI 25798 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 2579c MOVE.L (A6+0x10),D5> {[4, '(A6+0xc)']}
<POP 257a0-257a8 Naked> Σ-4 ↓ →0x25830 ←0x25828
<MI 257a0 CMP.L (A7),D5> {[-4-]}
<MI 257a2 BGT 0x25830> {[-4-]}
<POP 257a8-257ca Naked> Σ-4 Δ-4 ↓
<POP 257a8-257aa StackAdj> Δ-8 {[-12-]}
<MI 257aa MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<MI 257ae MOVE.L D5,-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<Call 0x257b0 0x23a88> {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<POP 257b4-257b6 StackAdj> Δ+8 {[-12-]}
<MI 257b6 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-8-]}
<MI 257b8 MOVE.L (A7),(A6-0xc)> {[-8-]}
<MI 257ba MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']}
<MI 257bc MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<Call 0x257be 0x23a50> {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<POP 257c2-257c4 StackAdj> Δ+8 {[-8-]}
<MI 257c4 MOVE.L (A7)+,D6> Δ+4 {[-4-]}
<MI 257c6 MOVE.L D6,-(A7)> Δ-4 {[-4-]|[4, 'D6']}
<MI 257c8 MOVEQ.L #0x01,D0> {[-4-]|[4, 'D6']}
<POP 257ca-257ce Naked> Σ-8 ↓ →0x257fe ←0x257ce
<MI 257ca CMP.L (A7),D0> {[-8-]}
<MI 257cc BGT 0x257fe> {[-8-]}
<POP 257ce-257fe Naked> Σ-8 ↓ →0x257ca
<MI 257ce MOVE.L (A6-0x20),D1> {[-8-]}
<MI 257d0 ADD.L D0,D1> {[-8-]}
<MI 257d2 SUBQ.L #0x1,D1> {[-8-]}
<MI 257d4 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x257d6 LimitCheck 0x0 ≤ D1 ≤ 0xfff> {[-8-]}
<MI 257e0 LEA.L 0x26976,A0> {[-8-]}
<POP 257e6-257e8 StackAdj> Δ-2 {[-10-]}
<MI 257e8 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-10-]|[4, '(A6-0xc)']}
<MI 257ea MOVE.L (A6-0x10),-(A7)> Δ-4 {[-10-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<MI 257ec MOVE.L D0,-(A7)> Δ-4 {[-10-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D0']}
<Call 0x257ee 0x25652> {[-10-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D0']}
<POP 257f2-257f6 StackAdj> Δ+12 {[-10-]}
<MI 257f6 MOVE.B (A7)+,(A0+D1.L+#0x8)> Δ+2 {[-8-]}
<MI 257fa ADDQ.L #0x1,D0> {[-8-]}
<MI 257fc BVC 0x257ca> {[-8-]}
<POP 257fe-25806 Naked> Σ-8 Δ+4 ↓ →0x25828 ←0x257ca
<POP 257fe-25800 StackAdj> Δ+4 {[-4-]}
<MI 25800 CMP.L (A6+0xc),D5> {[-4-]}
<MI 25804 BGE 0x25828> {[-4-]}
<POP 25806-25828 Naked> Σ-4 ↓
<MI 25806 MOVE.L (A6-0x20),D0> {[-4-]}
<MI 25808 ADD.L D6,D0> {[-4-]}
<MI 2580a MOVE.L D0,D1> {[-4-]}
<MI 2580c SUBQ.L #0x1,D1> {[-4-]}
<POP 0x2580e LimitCheck 0x0 ≤ D1 ≤ 0xfff> {[-4-]}
<MI 25818 LEA.L 0x26976,A0> {[-4-]}
<MI 2581e MOVE.B #0x2c,(A0+D1.L+#0x8)> {[-4-]}
<MI 25824 ADDQ.L #0x1,D0> {[-4-]}
<MI 25826 MOVE.L D0,(A6-0x20)> {[-4-]}
<POP 25828-25830 Naked> Σ-4 ↓ →0x257a0 ←0x257fe
<MI 25828 ADDQ.L #0x1,D5> {[-4-]}
<MI 2582a BVC 0x257a0> {[-4-]}
<POP 25830-25832 Naked> Σ-4 Δ+4 ↓ ←0x257a0
<POP 25830-25832 StackAdj> Δ+4 {}
<POP 25832-2583a Epilogue> Σ0
@ 2583a
<LVAR 0x018 4(rw)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 4(rw)>
<LVAR -0x00c 4(rw)>
<LVAR -0x018 4(w)>
<POP 2583a-25934 Body> Δ-12
<POP 2583a-25850 Prologue> Σ0 ↓
<POP 25850-25866 RegCacheLoad> Σ0 ↓
<POP 25866-25890 Naked> Σ0 Δ-4 ↓
<POP 25866-25868 StackAdj> Δ-4 {[-4-]}
<MI 25868 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 2586a MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<Call 0x2586c 0x23a50> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<POP 25870-25872 StackAdj> Δ+8 {[-4-]}
<MI 25872 MOVE.L (A7),(A6-0xc)> {[-4-]}
<MI 25874 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 25878 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x2587c 0x23a50> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 25880-25882 StackAdj> Δ+8 {[-4-]}
<MI 25882 MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 25884 ADDQ.L #0x1,(A6-0x8)> {}
<MI 25886 MOVE.L (A6-0xc),D0> {}
<MI 25888 SUB.L (A6-0x8),D0> {}
<MI 2588a ADDQ.L #0x1,D0> {}
<MI 2588c MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 2588e MOVEQ.L #0x01,D0> {[4, 'D0']}
<POP 25890-25898 Naked> Σ-4 ↓ →0x25926 ←0x2591c
<MI 25890 CMP.L (A7),D0> {[-4-]}
<MI 25892 BGT 0x25926> {[-4-]}
<POP 25898-258a4 Naked> Σ-4 Δ-8 ↓
<MI 25898 MOVE.L D0,(A6-0x18)> {[-4-]}
<MI 2589c MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<MI 2589e MOVEQ.L #0x00,D6> {[-4-]|[4, 'D0']}
<MI 258a0 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
<MI 258a2 MOVEQ.L #0x01,D5> {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
<POP 258a4-258a8 Naked> Σ-12 ↓ →0x258ea ←0x258e4
<MI 258a4 CMP.L (A7),D5> {[-12-]}
<MI 258a6 BGT 0x258ea> {[-12-]}
<POP 258a8-258b0 Naked> Σ-12 ↓ →0x258b4
<MI 258a8 CMPI.L #0x00000001,D5> {[-12-]}
<MI 258ae BNE 0x258b4> {[-12-]}
<POP 258b0-258b4 Naked> Σ-12 →0x258c8
<MI 258b0 MOVEQ.L #0x2f,D7> {[-12-]}
<MI 258b2 BRA 0x258c8> {[-12-]}
<POP 258b4-258c8 Naked> Σ-12 ↓ ←0x258a8
<POP 258b4-258b6 StackAdj> Δ-2 {[-14-]}
<MI 258b6 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-14-]|[4, '(A6+0xc)']}
<MI 258ba MOVE.L (A6+0x8),-(A7)> Δ-4 {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 258be MOVE.L D5,-(A7)> Δ-4 {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D5']}
<MI 258c0 SUBQ.L #0x1,(A7)> {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[-4-]}
<Call 0x258c2 0x25652> {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[-4-]}
<POP 258c4-258c6 StackAdj> Δ+12 {[-14-]}
<MI 258c6 MOVE.B (A7)+,D7> Δ+2 {[-12-]}
<POP 258c8-258e0 Naked> Σ-12 ↓ →0x258e4 ←0x258b0
<POP 258c8-258ca StackAdj> Δ-2 {[-14-]}
<MI 258ca MOVE.L (A6+0x14),-(A7)> Δ-4 {[-14-]|[4, '(A6+0x14)']}
<MI 258cc MOVE.L (A6+0x10),-(A7)> Δ-4 {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 258ce MOVE.L (A7+0xe),D0> {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 258d2 ADD.L D5,D0> {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 258d4 SUBQ.L #0x1,D0> {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 258d6 MOVE.L D0,-(A7)> Δ-4 {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
<Call 0x258d8 0x25652> {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
<POP 258da-258dc StackAdj> Δ+12 {[-14-]}
<MI 258dc CMP.B (A7)+,D7> Δ+2 {[-12-]}
<MI 258de BEQ 0x258e4> {[-12-]}
<POP 258e0-258e4 Naked> Σ-12 Δ+4 →0x258ec
<POP 258e0-258e2 StackAdj> Δ+4 {[-8-]}
<MI 258e2 BRA 0x258ec> {[-8-]}
<POP 258e4-258ea Naked> Σ-12 ↓ →0x258a4 ←0x258c8
<MI 258e4 MOVE.L D5,D6> {[-12-]}
<MI 258e6 ADDQ.L #0x1,D5> {[-12-]}
<MI 258e8 BVC 0x258a4> {[-12-]}
<POP 258ea-258ec Naked> Σ-12 Δ+4 ↓ ←0x258a4
<POP 258ea-258ec StackAdj> Δ+4 {[-8-]}
<POP 258ec-258f0 Naked> Σ-8 ↓ →0x2591c ←0x258e0
<MI 258ec CMP.L (A6-0x8),D6> {[-8-]}
<MI 258ee BNE 0x2591c> {[-8-]}
<POP 258f0-258fc Naked> Σ-8 ↓ →0x258fe
<MI 258f0 MOVE.L (A7),D0> {[-8-]}
<MI 258f2 MOVE.L D0,(A6+0x18)> {[-8-]}
<MI 258f6 ADD.L (A6-0x8),D0> {[-8-]}
<MI 258f8 CMP.L (A6-0xc),D0> {[-8-]}
<MI 258fa BLT 0x258fe> {[-8-]}
<POP 258fc-258fe Naked> Σ-8 →0x25918
<MI 258fc BRA 0x25918> {[-8-]}
<POP 258fe-25912 Naked> Σ-8 ↓ →0x25918 ←0x258f0
<POP 258fe-25900 StackAdj> Δ-2 {[-10-]}
<MI 25900 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']}
<MI 25902 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 25904 MOVE.L D0,-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
<Call 0x25906 0x25652> {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
<POP 25908-2590a StackAdj> Δ+12 {[-10-]}
<MI 2590a MOVE.B (A7)+,D7> Δ+2 {[-8-]}
<MI 2590c CMPI.B #0x2f,D7> {[-8-]}
<MI 25910 BEQ 0x25918> {[-8-]}
<POP 25912-25918 Naked> Σ-8 ↓ →0x2591c
<MI 25912 CMPI.B #0x3d,D7> {[-8-]}
<MI 25916 BNE 0x2591c> {[-8-]}
<POP 25918-2591c Naked> Σ-8 Δ+8 →0x2592c ←0x258fc ←0x258fe
<POP 25918-2591a StackAdj> Δ+8 {}
<MI 2591a BRA 0x2592c> {}
<POP 2591c-25926 Naked> Σ-8 Δ+4 ↓ →0x25890 ←0x258ec ←0x25912
<MI 2591c MOVE.L (A7)+,D0> Δ+4 {[-4-]}
<MI 2591e ADDQ.L #0x1,D0> {[-4-]}
<MI 25920 BVC 0x25890> {[-4-]}
<POP 25926-2592c Naked> Σ-4 Δ+4 ↓ ←0x25890
<POP 25926-25928 StackAdj> Δ+4 {}
<MI 25928 CLR.L (A6+0x18)> {}
<POP 2592c-25934 Epilogue> Σ0 ←0x25918
@ 25934
<LVAR 0x018 4(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 25934-259c8 Body> Δ-4
<POP 25934-2594a Prologue> Σ0 ↓
<POP 2594a-25954 RegCacheLoad> Σ0 ↓
<POP 25954-2596e Naked> Σ0 ↓ →0x259c0
<POP 25954-25956 StackAdj> Δ-4 {[-4-]}
<MI 25956 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 25958 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 2595a MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 2595e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x25962 0x2583a> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 25966-2596a StackAdj> Δ+16 {[-4-]}
<MI 2596a MOVE.L (A7)+,D5> Δ+4 {}
<MI 2596c BLE 0x259c0> {}
<POP 2596e-2598e Naked> Σ0 Δ-4 ↓
<MI 2596e MOVE.L (A6+0x18),-(A7)> Δ-4 {[4, '(A6+0x18)']}
<Const 0x25972 0x2f.2> Δ-2 {[4, '(A6+0x18)']|[#47]}
<Call 0x25974 0x102c0> {[4, '(A6+0x18)']|[#47]}
AppendChar(MOD b : String; a : char)
<POP 2597a-2597c StackAdj> Δ+6 {}
<MI 2597c MOVE.L D5,D0> {}
<MI 2597e ADDQ.L #0x1,D0> {}
<POP 25980-25982 StackAdj> Δ-4 {[-4-]}
<MI 25982 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 25984 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<Call 0x25986 0x23a50> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<POP 2598a-2598c StackAdj> Δ+8 {[-4-]}
<MI 2598c MOVE.L D0,D6> {[-4-]}
<POP 2598e-25992 Naked> Σ-4 ↓ →0x259be ←0x259ac
<MI 2598e CMP.L (A7),D6> {[-4-]}
<MI 25990 BGT 0x259be> {[-4-]}
<POP 25992-259a8 Naked> Σ-4 ↓ →0x259ac
<POP 25992-25994 StackAdj> Δ-2 {[-6-]}
<MI 25994 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']}
<MI 25996 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 25998 MOVE.L D6,-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
<Call 0x2599a 0x25652> {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
<POP 2599e-259a2 StackAdj> Δ+12 {[-6-]}
<MI 259a2 MOVE.B (A7)+,D7> Δ+2 {[-4-]}
<MI 259a4 CMP.B #0x2f,D7> {[-4-]}
<MI 259a6 BNE 0x259ac> {[-4-]}
<POP 259a8-259ac Naked> Σ-4 Δ+4 →0x259c0
<POP 259a8-259aa StackAdj> Δ+4 {}
<MI 259aa BRA 0x259c0> {}
<POP 259ac-259be Naked> Σ-4 ↓ →0x2598e ←0x25992
<MI 259ac MOVE.L (A6+0x18),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x18)']}
<MI 259b0 MOVE.B D7,-(A7)> Δ-2 {[-4-]|[4, '(A6+0x18)']|[2, 'D7']}
<Call 0x259b2 0x102c0> {[-4-]|[4, '(A6+0x18)']|[2, 'D7']}
AppendChar(MOD b : String; a : char)
<POP 259b8-259ba StackAdj> Δ+6 {[-4-]}
<MI 259ba ADDQ.L #0x1,D6> {[-4-]}
<MI 259bc BVC 0x2598e> {[-4-]}
<POP 259be-259c0 Naked> Σ-4 Δ+4 ↓ ←0x2598e
<POP 259be-259c0 StackAdj> Δ+4 {}
<POP 259c0-259c8 Epilogue> Σ0 ←0x25954 ←0x259a8
@ 259c8
<LVAR 0x018 4(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x006 4(rw)>
<LVAR -0x014 4(rw)>
<POP 259c8-25a7e Body> Δ-8
<POP 259c8-259de Prologue> Σ0 ↓
<POP 259de-259ec RegCacheLoad> Σ0 ↓
<POP 259ec-25a08 Naked> Σ0 ↓ →0x25a76
<POP 259ec-259ee StackAdj> Δ-4 {[-4-]}
<MI 259ee MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 259f0 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 259f2 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 259f6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x259fa 0x2583a> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 259fe-25a02 StackAdj> Δ+16 {[-4-]}
<MI 25a02 MOVE.L (A7)+,(A6-0x14)> Δ+4 {}
<MI 25a06 BLE 0x25a76> {}
<POP 25a08-25a1c Naked> Σ0 Δ-4 ↓
<POP 25a08-25a0a StackAdj> Δ-4 {[-4-]}
<MI 25a0a MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 25a0c MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<Call 0x25a0e 0x23a50> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<POP 25a12-25a14 StackAdj> Δ+8 {[-4-]}
<MI 25a14 MOVE.L (A7)+,(A6-0x6)> Δ+4 {}
<MI 25a16 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<MI 25a18 MOVE.L (A6-0x14),D5> {[4, '(A6-0x6)']}
<POP 25a1c-25a20 Naked> Σ-4 ↓ →0x25a74 ←0x25a70
<MI 25a1c CMP.L (A7),D5> {[-4-]}
<MI 25a1e BGT 0x25a74> {[-4-]}
<POP 25a20-25a36 Naked> Σ-4 ↓ →0x25a70
<POP 25a20-25a22 StackAdj> Δ-2 {[-6-]}
<MI 25a22 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']}
<MI 25a24 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 25a26 MOVE.L D5,-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D5']}
<Call 0x25a28 0x25652> {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D5']}
<POP 25a2c-25a2e StackAdj> Δ+12 {[-6-]}
<MI 25a2e MOVE.B (A7)+,D0> Δ+2 {[-4-]}
<MI 25a30 CMPI.B #0x3d,D0> {[-4-]}
<MI 25a34 BNE 0x25a70> {[-4-]}
<POP 25a36-25a3e Naked> Σ-4 Δ-4 ↓
<MI 25a36 MOVE.L D5,D0> {[-4-]}
<MI 25a38 ADDQ.L #0x1,D0> {[-4-]}
<MI 25a3a MOVE.L (A6-0x6),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']}
<MI 25a3c MOVE.L D0,D6> {[-4-]|[4, '(A6-0x6)']}
<POP 25a3e-25a42 Naked> Σ-8 ↓ →0x25a6e ←0x25a5c
<MI 25a3e CMP.L (A7),D6> {[-8-]}
<MI 25a40 BGT 0x25a6e> {[-8-]}
<POP 25a42-25a58 Naked> Σ-8 ↓ →0x25a5c
<POP 25a42-25a44 StackAdj> Δ-2 {[-10-]}
<MI 25a44 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']}
<MI 25a46 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 25a48 MOVE.L D6,-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
<Call 0x25a4a 0x25652> {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
<POP 25a4e-25a50 StackAdj> Δ+12 {[-10-]}
<MI 25a50 MOVE.B (A7)+,D7> Δ+2 {[-8-]}
<MI 25a52 CMPI.B #0x2f,D7> {[-8-]}
<MI 25a56 BNE 0x25a5c> {[-8-]}
<POP 25a58-25a5c Naked> Σ-8 Δ+8 →0x25a76
<POP 25a58-25a5a StackAdj> Δ+8 {}
<MI 25a5a BRA 0x25a76> {}
<POP 25a5c-25a6e Naked> Σ-8 ↓ →0x25a3e ←0x25a42
<MI 25a5c MOVE.L (A6+0x18),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x18)']}
<MI 25a60 MOVE.B D7,-(A7)> Δ-2 {[-8-]|[4, '(A6+0x18)']|[2, 'D7']}
<Call 0x25a62 0x102c0> {[-8-]|[4, '(A6+0x18)']|[2, 'D7']}
AppendChar(MOD b : String; a : char)
<POP 25a68-25a6a StackAdj> Δ+6 {[-8-]}
<MI 25a6a ADDQ.L #0x1,D6> {[-8-]}
<MI 25a6c BVC 0x25a3e> {[-8-]}
<POP 25a6e-25a70 Naked> Σ-8 Δ+4 ↓ ←0x25a3e
<POP 25a6e-25a70 StackAdj> Δ+4 {[-4-]}
<POP 25a70-25a74 Naked> Σ-4 ↓ →0x25a1c ←0x25a20
<MI 25a70 ADDQ.L #0x1,D5> {[-4-]}
<MI 25a72 BVC 0x25a1c> {[-4-]}
<POP 25a74-25a76 Naked> Σ-4 Δ+4 ↓ ←0x25a1c
<POP 25a74-25a76 StackAdj> Δ+4 {}
<POP 25a76-25a7e Epilogue> Σ0 ←0x259ec ←0x25a58
@ 25a7e
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 25a7e-25b04 Body> Δ-4
<POP 25a7e-25a94 Prologue> Σ0 ↓
<POP 25a94-25a9e RegCacheLoad> Σ0 ↓
<POP 25a9e-25ab0 Naked> Σ0 Δ-4 ↓
<POP 25a9e-25aa0 StackAdj> Δ-4 {[-4-]}
<MI 25aa0 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 25aa2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x25aa4 0x23a50> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 25aa8-25aaa StackAdj> Δ+8 {[-4-]}
<MI 25aaa MOVE.L (A7)+,D5> Δ+4 {}
<MI 25aac MOVE.L D5,-(A7)> Δ-4 {[4, 'D5']}
<MI 25aae MOVEQ.L #0x01,D6> {[4, 'D5']}
<POP 25ab0-25ab4 Naked> Σ-4 ↓ →0x25afa ←0x25af6
<MI 25ab0 CMP.L (A7),D6> {[-4-]}
<MI 25ab2 BGT 0x25afa> {[-4-]}
<POP 25ab4-25aca Naked> Σ-4 ↓ →0x25af6
<POP 25ab4-25ab6 StackAdj> Δ-2 {[-6-]}
<MI 25ab6 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']}
<MI 25ab8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 25aba MOVE.L D6,-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D6']}
<Call 0x25abc 0x25652> {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D6']}
<POP 25ac0-25ac2 StackAdj> Δ+12 {[-6-]}
<MI 25ac2 MOVE.B (A7)+,D0> Δ+2 {[-4-]}
<MI 25ac4 CMPI.B #0x2f,D0> {[-4-]}
<MI 25ac8 BNE 0x25af6> {[-4-]}
<POP 25aca-25ace Naked> Σ-4 Δ-4 ↓
<MI 25aca MOVE.L D5,-(A7)> Δ-4 {[-4-]|[4, 'D5']}
<MI 25acc MOVE.L D6,D7> {[-4-]|[4, 'D5']}
<POP 25ace-25ad2 Naked> Σ-8 ↓ →0x25af0 ←0x25ad2
<MI 25ace CMP.L (A7),D7> {[-8-]}
<MI 25ad0 BGT 0x25af0> {[-8-]}
<POP 25ad2-25af0 Naked> Σ-8 ↓ →0x25ace
<MI 25ad2 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x10)']}
<POP 25ad6-25ad8 StackAdj> Δ-2 {[-8-]|[4, '(A6+0x10)']|[-2-]}
<MI 25ad8 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']}
<MI 25ada MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 25adc MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x25ade 0x25652> {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
<POP 25ae2-25ae4 StackAdj> Δ+12 {[-8-]|[4, '(A6+0x10)']|[-2-]}
<Call 0x25ae4 0x102c0> {[-8-]|[4, '(A6+0x10)']|[-2-]}
AppendChar(MOD b : String; a : char)
<POP 25aea-25aec StackAdj> Δ+6 {[-8-]}
<MI 25aec ADDQ.L #0x1,D7> {[-8-]}
<MI 25aee BVC 0x25ace> {[-8-]}
<POP 25af0-25af6 Naked> Σ-8 Δ+8 →0x25afc ←0x25ace
<POP 25af0-25af2 StackAdj> Δ+4 {[-4-]}
<POP 25af2-25af4 StackAdj> Δ+4 {}
<MI 25af4 BRA 0x25afc> {}
<POP 25af6-25afa Naked> Σ-4 ↓ →0x25ab0 ←0x25ab4
<MI 25af6 ADDQ.L #0x1,D6> {[-4-]}
<MI 25af8 BVC 0x25ab0> {[-4-]}
<POP 25afa-25afc Naked> Σ-4 Δ+4 ↓ ←0x25ab0
<POP 25afa-25afc StackAdj> Δ+4 {}
<POP 25afc-25b04 Epilogue> Σ0 ←0x25af0
@ 25b04
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 25b04-25b74 Body> Δ-4
<POP 25b04-25b1a Prologue> Σ0 ↓
<POP 25b1a-25b32 Naked> Σ0 Δ-4 ↓
<MI 25b1a MOVEA.L (A6+0x10),A0> {}
<MI 25b1e CLR.W (A0)> {}
<POP 25b20-25b22 StackAdj> Δ-4 {[-4-]}
<MI 25b22 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 25b26 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x25b2a 0x23a50> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 25b2e-25b30 StackAdj> Δ+8 {[-4-]}
<MI 25b30 MOVEQ.L #0x01,D7> {[-4-]}
<POP 25b32-25b36 Naked> Σ-4 ↓ →0x25b6a ←0x25b66
<MI 25b32 CMP.L (A7),D7> {[-4-]}
<MI 25b34 BGT 0x25b6a> {[-4-]}
<POP 25b36-25b52 Naked> Σ-4 ↓ →0x25b62
<POP 25b36-25b38 StackAdj> Δ-2 {[-6-]}
<MI 25b38 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']}
<MI 25b3c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 25b40 MOVE.L D7,-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x25b42 0x25652> {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
<POP 25b46-25b4a StackAdj> Δ+12 {[-6-]}
<MI 25b4a MOVE.B (A7)+,D6> Δ+2 {[-4-]}
<MI 25b4c CMPI.B #0x2f,D6> {[-4-]}
<MI 25b50 BEQ 0x25b62> {[-4-]}
<POP 25b52-25b62 Naked> Σ-4 →0x25b66
<MI 25b52 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x10)']}
<MI 25b56 MOVE.B D6,-(A7)> Δ-2 {[-4-]|[4, '(A6+0x10)']|[2, 'D6']}
<Call 0x25b58 0x102c0> {[-4-]|[4, '(A6+0x10)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 25b5e-25b60 StackAdj> Δ+6 {[-4-]}
<MI 25b60 BRA 0x25b66> {[-4-]}
<POP 25b62-25b66 Naked> Σ-4 Δ+4 →0x25b6c ←0x25b36
<POP 25b62-25b64 StackAdj> Δ+4 {}
<MI 25b64 BRA 0x25b6c> {}
<POP 25b66-25b6a Naked> Σ-4 ↓ →0x25b32 ←0x25b52
<MI 25b66 ADDQ.L #0x1,D7> {[-4-]}
<MI 25b68 BVC 0x25b32> {[-4-]}
<POP 25b6a-25b6c Naked> Σ-4 Δ+4 ↓ ←0x25b32
<POP 25b6a-25b6c StackAdj> Δ+4 {}
<POP 25b6c-25b74 Epilogue> Σ0 ←0x25b62
@ 25b74
<POP 25b74-25bbc Body>
<POP 25b74-25b8a Prologue> Σ0 ↓
<POP 25b8a-25bb4 Naked> Σ0 ↓
<Blob 0x25b8a [34] @> Δ-34 {[«34""»]}
<POP 25b96-25b98 StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x25b98 34> {[«34""»]|[$$Switch exclusion is unimplemented.]}
<Call 0x25bac 0x22e28> {[«34""»]|[$$Switch exclusion is unimplemented.]}
<POP 25bb0-25bb4 StackAdj> Δ+38 {}
<POP 25bb4-25bbc Epilogue> Σ0
@ 25bbc
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x006 4(rw)>
<POP 25bbc-25d00 Body>
<POP 25bbc-25bd2 Prologue> Σ0 ↓
<POP 25bd2-25be8 RegCacheLoad> Σ0 ↓
<POP 25be8-25bf6 Naked> Σ0 ↓ →0x25c00
<MI 25be8 MOVE.L 0x2797e,(A6-0x6)> {}
<POP 25bec-25bee StackAdj> Δ-2 {[-2-]}
<Call 0x25bee 0x22ec4> {[-2-]}
<MI 25bf0 MOVE.B (A7)+,D7> Δ+2 {}
<MI 25bf2 CMP.B #0x25,D7> {}
<MI 25bf4 BNE 0x25c00> {}
<POP 25bf6-25c00 Naked> Σ0 →0x25ce8
<MI 25bf6 MOVEA.L (A6+0xc),A0> {}
<MI 25bf8 CLR.L (A0)> {}
<MI 25bfa BRA 0x25ce8> {}
<POP 25c00-25c04 Naked> Σ0 ↓ →0x25c12 ←0x25be8
<MI 25c00 CMP.B #0x2d,D7> {}
<MI 25c02 BNE 0x25c12> {}
<POP 25c04-25c12 Naked> Σ0 →0x25ce8
<MI 25c04 MOVEA.L (A6+0xc),A0> {}
<MI 25c06 MOVE.L #0x1,(A0)> {}
<MI 25c0c BRA 0x25ce8> {}
<POP 25c12-25c18 Naked> Σ0 ↓ →0x25c26 ←0x25c00
<MI 25c12 CMPI.B #0x2f,D7> {}
<MI 25c16 BNE 0x25c26> {}
<POP 25c18-25c26 Naked> Σ0 →0x25ce8
<MI 25c18 MOVEA.L (A6+0xc),A0> {}
<MI 25c1a MOVE.L #0x4,(A0)> {}
<MI 25c20 BRA 0x25ce8> {}
<POP 25c26-25c2c Naked> Σ0 ↓ →0x25c3a ←0x25c12
<MI 25c26 CMPI.B #0x3d,D7> {}
<MI 25c2a BNE 0x25c3a> {}
<POP 25c2c-25c3a Naked> Σ0 →0x25ce8
<MI 25c2c MOVEA.L (A6+0xc),A0> {}
<MI 25c2e MOVE.L #0x5,(A0)> {}
<MI 25c34 BRA 0x25ce8> {}
<POP 25c3a-25c40 Naked> Σ0 ↓ →0x25c4e ←0x25c26
<MI 25c3a CMPI.B #0x5c,D7> {}
<MI 25c3e BNE 0x25c4e> {}
<POP 25c40-25c4e Naked> Σ0 →0x25ce8
<MI 25c40 MOVEA.L (A6+0xc),A0> {}
<MI 25c42 MOVE.L #0x6,(A0)> {}
<MI 25c48 BRA 0x25ce8> {}
<POP 25c4e-25c52 Naked> Σ0 ↓ →0x25c7e ←0x25c3a
<MI 25c4e TST.B D7> {}
<MI 25c50 BNE 0x25c7e> {}
<POP 25c52-25c7e Naked> Σ0 →0x25ce8
<Blob 0x25c52 [24] @> Δ-24 {[«24""»]}
<POP 25c5e-25c60 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x25c60 24> {[«24""»]|[$$Illegal argument marker.]}
<Call 0x25c74 0x22e28> {[«24""»]|[$$Illegal argument marker.]}
<POP 25c78-25c7c StackAdj> Δ+28 {}
<MI 25c7c BRA 0x25ce8> {}
<POP 25c7e-25c82 Naked> Σ0 ↓ →0x25cae ←0x25c4e
<MI 25c7e CMP.B #0x30,D7> {}
<MI 25c80 BCS 0x25cae> {}
<POP 25c82-25c86 Naked> Σ0 ↓ →0x25cae
<MI 25c82 CMP.B #0x39,D7> {}
<MI 25c84 BHI 0x25cae> {}
<POP 25c86-25c8e Naked> Σ0 ↓
<MI 25c86 MOVEA.L (A6+0xc),A0> {}
<MI 25c88 MOVE.L #0x2,(A0)> {}
<POP 25c8e-25c9a Naked> Σ0 ↓ →0x25ca4 ←0x25ca8
<POP 25c8e-25c90 StackAdj> Δ-2 {[-2-]}
<Call 0x25c90 0x22e86> {[-2-]}
<MI 25c94 MOVE.B (A7)+,D7> Δ+2 {}
<MI 25c96 CMP.B #0x30,D7> {}
<MI 25c98 BCS 0x25ca4> {}
<POP 25c9a-25c9e Naked> Σ0 ↓ →0x25ca4
<MI 25c9a CMP.B #0x39,D7> {}
<MI 25c9c BHI 0x25ca4> {}
<POP 25c9e-25ca4 Naked> Σ0 ↓
<POP 25c9e-25ca0 StackAdj> Δ-2 {[-2-]}
<Call 0x25ca0 0x22ec4> {[-2-]}
<MI 25ca2 MOVE.B (A7)+,D6> Δ+2 {}
<POP 25ca4-25ca8 Naked> Σ0 ↓ →0x25cac ←0x25c8e ←0x25c9a
<MI 25ca4 CMP.B #0x30,D7> {}
<MI 25ca6 BCS 0x25cac> {}
<POP 25ca8-25cac Naked> Σ0 ↓ →0x25c8e
<MI 25ca8 CMP.B #0x39,D7> {}
<MI 25caa BLS 0x25c8e> {}
<POP 25cac-25cae Naked> Σ0 →0x25ce8 ←0x25ca4
<MI 25cac BRA 0x25ce8> {}
<POP 25cae-25cb8 Naked> Σ0 ↓ ←0x25c7e ←0x25c82
<MI 25cae MOVEA.L (A6+0xc),A0> {}
<MI 25cb0 MOVE.L #0x3,(A0)> {}
<MI 25cb6 MOVEQ.L #0x00,D5> {}
<POP 25cb8-25cc4 Naked> Σ0 ↓ →0x25cda ←0x25ce4
<POP 25cb8-25cba StackAdj> Δ-2 {[-2-]}
<Call 0x25cba 0x22e86> {[-2-]}
<MI 25cbe MOVE.B (A7)+,D7> Δ+2 {}
<MI 25cc0 CMP.B #0x25,D7> {}
<MI 25cc2 BEQ 0x25cda> {}
<POP 25cc4-25cc8 Naked> Σ0 ↓ →0x25cda
<MI 25cc4 CMP.B #0x2d,D7> {}
<MI 25cc6 BEQ 0x25cda> {}
<POP 25cc8-25cce Naked> Σ0 ↓ →0x25cda
<MI 25cc8 CMPI.B #0x2f,D7> {}
<MI 25ccc BEQ 0x25cda> {}
<POP 25cce-25cd4 Naked> Σ0 ↓ →0x25cda
<MI 25cce CMPI.B #0x3d,D7> {}
<MI 25cd2 BEQ 0x25cda> {}
<POP 25cd4-25cda Naked> Σ0 ↓ →0x25cde
<MI 25cd4 CMPI.B #0x5c,D7> {}
<MI 25cd8 BNE 0x25cde> {}
<POP 25cda-25cde Naked> Σ0 →0x25ce4 ←0x25cb8 ←0x25cc4 ←0x25cc8 ←0x25cce
<MI 25cda MOVEQ.L #0x01,D5> {}
<MI 25cdc BRA 0x25ce4> {}
<POP 25cde-25ce4 Naked> Σ0 ↓ ←0x25cd4
<POP 25cde-25ce0 StackAdj> Δ-2 {[-2-]}
<Call 0x25ce0 0x22ec4> {[-2-]}
<MI 25ce2 MOVE.B (A7)+,D6> Δ+2 {}
<POP 25ce4-25ce8 Naked> Σ0 ↓ →0x25cb8 ←0x25cda
<MI 25ce4 TST.B D5> {}
<MI 25ce6 BEQ 0x25cb8> {}
<POP 25ce8-25cf8 Naked> Σ0 ↓ ←0x25bf6 ←0x25c04 ←0x25c18 ←0x25c2c ←0x25c40 ←0x25c52 ←0x25cac
<MI 25ce8 MOVEA.L (A6+0x8),A0> {}
<MI 25cec MOVE.L (A6-0x6),(A0)> {}
<MI 25cf0 MOVE.L 0x2797e,(A0+0x4)> {}
<MI 25cf4 SUBQ.L #0x1,(A0+0x4)> {}
<POP 25cf8-25d00 Epilogue> Σ0
@ 25d00
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 25d00-25d86 Body>
<POP 25d00-25d16 Prologue> Σ0 ↓
<POP 25d16-25d1a RegCacheLoad> Σ0 ↓
<POP 25d1a-25d34 Naked> Σ0 Δ-4 ↓ →0x25d40
<MI 25d1a MOVEA.L (A6+0x8),A0> {}
<MI 25d1e MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 25d20 MOVE.L 0x2797e,D6> {[4, 'A0']}
<MI 25d26 SUB.L (A6+0xc),D6> {[4, 'A0']}
<MI 25d28 MOVE.L (A6+0xc),D5> {[4, 'A0']}
<MI 25d2a ADD.L D6,D5> {[4, 'A0']}
<MI 25d2c MOVE.W (A0),D0> {[4, 'A0']}
<MI 25d2e EXTW.L D0> {[4, 'A0']}
<MI 25d30 CMP.L D6,D0> {[4, 'A0']}
<MI 25d32 BEQ 0x25d40> {[4, 'A0']}
<POP 25d34-25d40 Naked> Σ-4 ↓
<MI 25d34 MOVE.L D5,-(A7)> Δ-4 {[-4-]|[4, 'D5']}
<MI 25d36 MOVE.L D6,-(A7)> Δ-4 {[-4-]|[4, 'D5']|[4, 'D6']}
<MI 25d38 SUB.L D0,(A7)> {[-4-]|[4, 'D5']|[-4-]}
<Call 0x25d3a 0x23384> {[-4-]|[4, 'D5']|[-4-]}
<POP 25d3e-25d40 StackAdj> Δ+8 {[-4-]}
<POP 25d40-25d44 Naked> Σ-4 Δ-4 ↓ ←0x25d1a
<MI 25d40 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<MI 25d42 MOVEQ.L #0x01,D7> {[-4-]|[4, 'D0']}
<POP 25d44-25d48 Naked> Σ-8 ↓ →0x25d7c ←0x25d48
<MI 25d44 CMP.L (A7),D7> {[-8-]}
<MI 25d46 BGT 0x25d7c> {[-8-]}
<POP 25d48-25d7c Naked> Σ-8 ↓ →0x25d44
<MI 25d48 MOVE.L (A6+0xc),D0> {[-8-]}
<MI 25d4a ADD.L D7,D0> {[-8-]}
<MI 25d4c SUBQ.L #0x1,D0> {[-8-]}
<MI 25d4e SUBQ.L #0x1,D0> {[-8-]}
<POP 0x25d50 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-8-]}
<MI 25d5a LEA.L 0x26976,A0> {[-8-]}
<MI 25d60 MOVE.L D7,D1> {[-8-]}
<MI 25d62 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x25d64 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 25d6e MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 25d72 MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8)> {[-8-]}
<MI 25d78 ADDQ.L #0x1,D7> {[-8-]}
<MI 25d7a BVC 0x25d44> {[-8-]}
<POP 25d7c-25d7e Naked> Σ-8 Δ+8 ↓ ←0x25d44
<POP 25d7c-25d7e StackAdj> Δ+8 {}
<POP 25d7e-25d86 Epilogue> Σ0
@ 25d86
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x010 4(r)>
<LVAR -0x014 @ 4(r)>
<LVAR -0x018 4(rw)>
<LVAR -0x01c 4(rw)>
<LVAR -0x020 4(rw)>
<LVAR -0x024 4(rw)>
<LVAR -0x028 4(rw)>
<LVAR -0x034 4(rw)>
<POP 25d86-25fe8 Body> Δ+56
<POP 25d86-25d9c Prologue> Σ0 ↓
<POP 25d9c-25dae RegCacheLoad> Σ0 ↓
<POP 25dae-25dd2 Naked> Σ0 ↓
<MI 25dae MOVE.L 0x2797e,(A6-0x28)> {}
<Pointer.fp 0x25db6 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Call 0x25db8 0x102b8> {[@@-8]}
NewString(VAR a : String)
<POP 25dbe-25dc0 StackAdj> Δ+4 {}
<Pointer.fp 0x25dc0 <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-12]}
<Pointer.fp 0x25dc4 <LVAR -0x014 @ 4(r)>> Δ-4 {[@@-12]|[@@-20]}
<Call 0x25dc6 0x25bbc> {[@@-12]|[@@-20]}
<POP 25dca-25dcc StackAdj> Δ+8 {}
<MI 25dcc CLR.L (A6-0x34)> {}
<MI 25dd0 MOVEQ.L #0x00,D7> {}
<POP 25dd2-25de6 Naked> Σ0 →0x25e10 →0x25e1c →0x25e32 →0x25e52 →0x25e58 →0x25e68 →0x25e7e →0x25e86 →0x25e88 →0x25ea0 →0x25eb0 →0x25eca →0x25ede →0x25ef4 →0x25f0a →0x25f0c →0x25f26 →0x25f3c →0x25f4a →0x25f4c →0x25f4e ←0x25fc2
<MI 25dd2 MOVE.L (A6-0x34),D0> {}
<POP 0x25dd6 LimitCheck 0x0 ≤ D0 ≤ 0x14> {}
<MI 25ddc ADD.W D0,D0> {}
<MI 25dde SWITCH D0.W> {}
<POP 25e10-25e1c Naked> Σ0 →0x25f78 ←0x25dd2
<MI 25e10 MOVEQ.L #0x00,D6> {}
<MI 25e12 MOVE.L (A6+0x8),D5> {}
<MI 25e16 BRA 0x25f78> {}
<POP 25e1c-25e32 Naked> Σ0 →0x25f78 ←0x25dd2
<POP 25e1c-25e1e StackAdj> Δ-4 {[-4-]}
<MI 25e1e MOVE.L (A6-0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x10)']}
<MI 25e22 MOVE.L (A6-0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<Call 0x25e24 0x25692> {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<POP 25e28-25e2a StackAdj> Δ+8 {[-4-]}
<MI 25e2a MOVE.L (A7)+,D6> Δ+4 {}
<MI 25e2c BRA 0x25f78> {}
<POP 25e32-25e3a Naked> Σ0 Δ-12 ↓ ←0x25dd2
<MI 25e32 MOVE.L (A6-0x28),-(A7)> Δ-4 {[4, '(A6-0x28)']}
<MI 25e36 MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, 'D6']}
<MI 25e38 MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, 'D6']|[4, 'D6']}
<POP 25e3a-25e4c Naked> Σ-12 Δ+12 →0x25fd6 ←0x25e58
<MI 25e3a MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']}
<Call 0x25e3e 0x2570e> {[-12-]|[4, '(A6+0xc)']}
<POP 25e42-25e46 StackAdj> Δ+16 {}
<MI 25e46 BRA 0x25fd6> {}
<POP 25e52-25e58 Naked> Σ0 →0x25f78 ←0x25dd2
<MI 25e52 BRA 0x25f78> {}
<POP 25e58-25e62 Naked> Σ0 Δ-12 →0x25e3a ←0x25dd2
<MI 25e58 MOVE.L (A6-0x28),-(A7)> Δ-4 {[4, '(A6-0x28)']}
<MI 25e5c MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, 'D6']}
<MI 25e5e MOVE.L D5,-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, 'D6']|[4, 'D5']}
<MI 25e60 BRA 0x25e3a> {[4, '(A6-0x28)']|[4, 'D6']|[4, 'D5']}
<POP 25e68-25e7e Naked> Σ0 →0x25f78 ←0x25dd2 ←0x25e86
<POP 25e68-25e6a StackAdj> Δ-4 {[-4-]}
<MI 25e6a MOVE.L (A6-0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x10)']}
<MI 25e6e MOVE.L (A6-0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<Call 0x25e70 0x25692> {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<POP 25e74-25e76 StackAdj> Δ+8 {[-4-]}
<MI 25e76 MOVE.L (A7)+,D5> Δ+4 {}
<MI 25e78 BRA 0x25f78> {}
<POP 25e7e-25e86 Naked> Σ0 →0x25f78 ←0x25dd2
<MI 25e7e MOVEQ.L #0x01,D6> {}
<MI 25e80 BRA 0x25f78> {}
<POP 25e86-25e88 Naked> Σ0 →0x25e68 ←0x25dd2
<MI 25e86 BRA 0x25e68> {}
<POP 25e88-25ea0 Naked> Σ0 →0x25f78 ←0x25dd2
<POP 25e88-25e8a StackAdj> Δ-8 {[-8-]}
<MI 25e8a MOVE.L (A6+0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6+0xc)']}
<MI 25e8e MOVE.L D6,-(A7)> Δ-4 {[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<Call 0x25e90 0x23a88> {[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<POP 25e94-25e96 StackAdj> Δ+8 {[-8-]}
<MI 25e96 MOVE.L (A7)+,(A6-0x24)> Δ+4 {[-4-]}
<MI 25e98 MOVE.L (A7)+,(A6-0x20)> Δ+4 {}
<MI 25e9a BRA 0x25f78> {}
<POP 25ea0-25eb0 Naked> Σ0 →0x25f78 ←0x25dd2
<MI 25ea0 MOVE.L (A6-0x14),(A6-0x1c)> {}
<MI 25ea4 MOVE.L (A6-0x10),(A6-0x18)> {}
<MI 25eaa BRA 0x25f78> {}
<POP 25eb0-25ec2 Naked> Σ0 Δ-20 ↓ ←0x25dd2
<MI 25eb0 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 25eb2 MOVE.L (A6-0x20),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
<MI 25eb4 MOVE.L (A6-0x24),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<MI 25eb6 MOVE.L (A6-0x18),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']}
<MI 25eba MOVE.L (A6-0x1c),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<Call 0x25ebe 0x259c8> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<POP 25ec2-25eca Naked> Σ-20 Δ+20 →0x25f78 ←0x25eca
<POP 25ec2-25ec4 StackAdj> Δ+20 {}
<MI 25ec4 BRA 0x25f78> {}
<POP 25eca-25ede Naked> Σ0 Δ-20 →0x25ec2 ←0x25dd2
<MI 25eca MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 25ecc MOVE.L (A6-0x20),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
<MI 25ece MOVE.L (A6-0x24),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<MI 25ed0 MOVE.L (A6-0x18),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']}
<MI 25ed4 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<Call 0x25ed8 0x25934> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<MI 25edc BRA 0x25ec2> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<POP 25ede-25ee8 Naked> Σ0 Δ-12 ↓ ←0x25dd2
<MI 25ede MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 25ee0 MOVE.L (A6-0x20),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
<MI 25ee2 MOVE.L (A6-0x24),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<Call 0x25ee4 0x25a7e> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<POP 25ee8-25eec Naked> Σ-12 Δ+12 ↓ ←0x25f26
<POP 25ee8-25eec StackAdj> Δ+12 {}
<POP 25eec-25ef4 Naked> Σ0 →0x25f78 ←0x25ef4 ←0x25f0a ←0x25f4c
<MI 25eec MOVEQ.L #0x01,D7> {}
<MI 25eee BRA 0x25f78> {}
<POP 25ef4-25f0a Naked> Σ0 →0x25eec ←0x25dd2
<MI 25ef4 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 25ef6 MOVE.L (A6-0x20),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
<MI 25ef8 MOVE.L (A6-0x24),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<MI 25efa MOVE.L (A6-0x18),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']}
<MI 25efe MOVE.L (A6-0x1c),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<Call 0x25f02 0x25934> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<POP 25f06-25f08 StackAdj> Δ+20 {}
<MI 25f08 BRA 0x25eec> {}
<POP 25f0a-25f0c Naked> Σ0 →0x25eec ←0x25dd2
<MI 25f0a BRA 0x25eec> {}
<POP 25f0c-25f20 Naked> Σ0 Δ-12 ↓ ←0x25dd2
<MI 25f0c MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<POP 25f0e-25f10 StackAdj> Δ-8 {[4, '(A6-0x8)']|[-8-]}
<MI 25f10 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']}
<MI 25f14 MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<Call 0x25f16 0x23a88> {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<POP 25f1a-25f1c StackAdj> Δ+8 {[4, '(A6-0x8)']|[-8-]}
<Call 0x25f1c 0x25a7e> {[4, '(A6-0x8)']|[-8-]}
<POP 25f20-25f26 Naked> Σ-12 Δ+12 →0x25f78 ←0x25f3c
<POP 25f20-25f24 StackAdj> Δ+12 {}
<MI 25f24 BRA 0x25f78> {}
<POP 25f26-25f3c Naked> Σ0 Δ-12 →0x25ee8 ←0x25dd2
<MI 25f26 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<POP 25f28-25f2a StackAdj> Δ-8 {[4, '(A6-0x8)']|[-8-]}
<MI 25f2a MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']}
<MI 25f2e MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<Call 0x25f30 0x23a88> {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<POP 25f34-25f36 StackAdj> Δ+8 {[4, '(A6-0x8)']|[-8-]}
<Call 0x25f36 0x25b04> {[4, '(A6-0x8)']|[-8-]}
<MI 25f3a BRA 0x25ee8> {[4, '(A6-0x8)']|[-8-]}
<POP 25f3c-25f4a Naked> Σ0 Δ-12 →0x25f20 ←0x25dd2
<MI 25f3c MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 25f3e MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x10)']}
<MI 25f42 MOVE.L (A6-0x14),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<Call 0x25f44 0x25b74> {[4, '(A6-0x8)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<MI 25f48 BRA 0x25f20> {[4, '(A6-0x8)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<POP 25f4a-25f4c Naked> Σ0 →0x25f78 ←0x25dd2
<MI 25f4a BRA 0x25f78> {}
<POP 25f4c-25f4e Naked> Σ0 →0x25eec ←0x25dd2
<MI 25f4c BRA 0x25eec> {}
<POP 25f4e-25f78 Naked> Σ0 ↓ ←0x25dd2
<Blob 0x25f4e [24] @> Δ-24 {[«24""»]}
<POP 25f5a-25f5c StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x25f5c 24> {[«24""»]|[$$Illegal argument marker.]}
<Call 0x25f70 0x22e28> {[«24""»]|[$$Illegal argument marker.]}
<POP 25f74-25f78 StackAdj> Δ+28 {}
<POP 25f78-25f7c Naked> Σ0 ↓ →0x25fc2 ←0x25e10 ←0x25e1c ←0x25e52 ←0x25e68 ←0x25e7e ←0x25e88 ←0x25ea0 ←0x25ec2 ←0x25eec ←0x25f20 ←0x25f4a
<MI 25f78 TST.B D7> {}
<MI 25f7a BNE 0x25fc2> {}
<POP 25f7c-25fc2 Naked> Σ0 ↓
<Pointer.fp 0x25f7c <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-12]}
<Pointer.fp 0x25f80 <LVAR -0x014 @ 4(r)>> Δ-4 {[@@-12]|[@@-20]}
<Call 0x25f82 0x25bbc> {[@@-12]|[@@-20]}
<POP 25f86-25f88 StackAdj> Δ+8 {}
<MI 25f88 MOVE.L (A6-0x34),D0> {}
<POP 0x25f8c LimitCheck 0x0 ≤ D0 ≤ 0x13> {}
<MI 25f96 MOVE.L D0,D4> {}
<MI 25f98 MOVEQ.L #0x07,D3> {}
<Call 0x25f9a 0x1028c> {}
?muls_d3_d4
<MI 25fa0 LEA.L 0x22d5a,A0> {}
<MI 25fa4 MOVE.L (A6-0xc),D0> {}
<POP 0x25fa8 LimitCheck 0x0 ≤ D0 ≤ 0x6> {}
<MI 25fb2 LEA.L (A0+D4.L),A0> {}
<MI 25fb6 MOVE.B (A0+D0.L),D1> {}
<MI 25fba EXTB.W D1> {}
<MI 25fbc EXTW.L D1> {}
<MI 25fbe MOVE.L D1,(A6-0x34)> {}
<POP 25fc2-25fca Naked> Σ0 ↓ →0x25dd2 ←0x25f78
<MI 25fc2 TST.B D7> {}
<MI 25fc4 BEQ 0x25dd2> {}
<POP 25fca-25fd6 Naked> Σ0 ↓
<MI 25fca MOVE.L (A6-0x28),-(A7)> Δ-4 {[4, '(A6-0x28)']}
<MI 25fce MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, '(A6-0x8)']}
<Call 0x25fd0 0x25d00> {[4, '(A6-0x28)']|[4, '(A6-0x8)']}
<POP 25fd4-25fd6 StackAdj> Δ+8 {}
<POP 25fd6-25fe0 Naked> Σ0 ↓ ←0x25e3a
<Pointer.fp 0x25fd6 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Call 0x25fd8 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 25fde-25fe0 StackAdj> Δ+4 {}
<POP 25fe0-25fe8 Epilogue> Σ0
@ 25fe8
<LVAR 0x014 4(rw)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 4(rw)>
<LVAR -0x00c 4(rw)>
<LVAR -0x018 4(w)>
<POP 25fe8-260e4 Body> Δ-12
<POP 25fe8-25ffe Prologue> Σ0 ↓
<POP 25ffe-26010 RegCacheLoad> Σ0 ↓
<POP 26010-26038 Naked> Σ0 Δ-4 ↓
<MI 26010 CLR.L (A6+0x14)> {}
<POP 26014-26016 StackAdj> Δ-4 {[-4-]}
<MI 26016 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x10)']}
<MI 26018 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<Call 0x2601a 0x23a50> {[-4-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<POP 2601e-26020 StackAdj> Δ+8 {[-4-]}
<MI 26020 MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 26022 MOVEA.L (A6+0x8),A0> {}
<MI 26026 MOVE.W (A0),D0> {}
<MI 26028 EXTW.L D0> {}
<MI 2602a ADDQ.L #0x1,D0> {}
<MI 2602c MOVE.L D0,(A6-0x8)> {}
<MI 2602e NEG.L D0> {}
<MI 26030 ADD.L (A6-0xc),D0> {}
<MI 26032 ADDQ.L #0x1,D0> {}
<MI 26034 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 26036 MOVEQ.L #0x01,D0> {[4, 'D0']}
<POP 26038-26040 Naked> Σ-4 ↓ →0x260da ←0x260d0
<MI 26038 CMP.L (A7),D0> {[-4-]}
<MI 2603a BGT 0x260da> {[-4-]}
<POP 26040-2604c Naked> Σ-4 Δ-8 ↓
<MI 26040 MOVE.L D0,(A6-0x18)> {[-4-]}
<MI 26044 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<MI 26046 MOVEQ.L #0x00,D6> {[-4-]|[4, 'D0']}
<MI 26048 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
<MI 2604a MOVEQ.L #0x01,D5> {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
<POP 2604c-26050 Naked> Σ-12 ↓ →0x26098 ←0x26092
<MI 2604c CMP.L (A7),D5> {[-12-]}
<MI 2604e BGT 0x26098> {[-12-]}
<POP 26050-26058 Naked> Σ-12 ↓ →0x2605c
<MI 26050 CMPI.L #0x00000001,D5> {[-12-]}
<MI 26056 BNE 0x2605c> {[-12-]}
<POP 26058-2605c Naked> Σ-12 →0x26074
<MI 26058 MOVEQ.L #0x2f,D7> {[-12-]}
<MI 2605a BRA 0x26074> {[-12-]}
<POP 2605c-26074 Naked> Σ-12 ↓ ←0x26050
<MI 2605c MOVEA.L (A6+0x8),A0> {[-12-]}
<MI 26060 MOVE.L D5,D0> {[-12-]}
<MI 26062 SUBQ.L #0x1,D0> {[-12-]}
<MI 26064 SUBQ.L #0x1,D0> {[-12-]}
<POP 0x26066 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-12-]}
<MI 26070 MOVE.B (A0+D0.L+#0x2),D7> {[-12-]}
<POP 26074-2608e Naked> Σ-12 ↓ →0x26092 ←0x26058
<POP 26074-26076 StackAdj> Δ-2 {[-14-]}
<MI 26076 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-14-]|[4, '(A6+0x10)']}
<MI 26078 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 2607a MOVE.L (A7+0xe),D0> {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 2607e ADD.L D5,D0> {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 26080 SUBQ.L #0x1,D0> {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 26082 MOVE.L D0,-(A7)> Δ-4 {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D0']}
<Call 0x26084 0x25652> {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D0']}
<POP 26088-2608a StackAdj> Δ+12 {[-14-]}
<MI 2608a CMP.B (A7)+,D7> Δ+2 {[-12-]}
<MI 2608c BEQ 0x26092> {[-12-]}
<POP 2608e-26092 Naked> Σ-12 Δ+4 →0x2609a
<POP 2608e-26090 StackAdj> Δ+4 {[-8-]}
<MI 26090 BRA 0x2609a> {[-8-]}
<POP 26092-26098 Naked> Σ-12 ↓ →0x2604c ←0x26074
<MI 26092 MOVE.L D5,D6> {[-12-]}
<MI 26094 ADDQ.L #0x1,D5> {[-12-]}
<MI 26096 BVC 0x2604c> {[-12-]}
<POP 26098-2609a Naked> Σ-12 Δ+4 ↓ ←0x2604c
<POP 26098-2609a StackAdj> Δ+4 {[-8-]}
<POP 2609a-2609e Naked> Σ-8 ↓ →0x260d0 ←0x2608e
<MI 2609a CMP.L (A6-0x8),D6> {[-8-]}
<MI 2609c BNE 0x260d0> {[-8-]}
<POP 2609e-260a8 Naked> Σ-8 ↓ →0x260ce
<MI 2609e MOVE.L (A7),D0> {[-8-]}
<MI 260a0 MOVE.L D0,D1> {[-8-]}
<MI 260a2 ADD.L (A6-0x8),D1> {[-8-]}
<MI 260a4 CMP.L (A6-0xc),D1> {[-8-]}
<MI 260a6 BGE 0x260ce> {[-8-]}
<POP 260a8-260be Naked> Σ-8 ↓ →0x260c4
<POP 260a8-260aa StackAdj> Δ-2 {[-10-]}
<MI 260aa MOVE.L (A6+0x10),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x10)']}
<MI 260ac MOVE.L (A6+0xc),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 260ae MOVE.L D1,-(A7)> Δ-4 {[-10-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D1']}
<Call 0x260b0 0x25652> {[-10-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D1']}
<POP 260b4-260b6 StackAdj> Δ+12 {[-10-]}
<MI 260b6 MOVE.B (A7)+,D7> Δ+2 {[-8-]}
<MI 260b8 CMPI.B #0x2f,D7> {[-8-]}
<MI 260bc BEQ 0x260c4> {[-8-]}
<POP 260be-260c4 Naked> Σ-8 ↓ →0x260cc
<MI 260be CMPI.B #0x3d,D7> {[-8-]}
<MI 260c2 BNE 0x260cc> {[-8-]}
<POP 260c4-260cc Naked> Σ-8 Δ+8 →0x260dc ←0x260a8 ←0x260ce
<MI 260c4 MOVE.L D0,(A6+0x14)> {[-8-]}
<POP 260c8-260ca StackAdj> Δ+8 {}
<MI 260ca BRA 0x260dc> {}
<POP 260cc-260ce Naked> Σ-8 →0x260d0 ←0x260be
<MI 260cc BRA 0x260d0> {[-8-]}
<POP 260ce-260d0 Naked> Σ-8 →0x260c4 ←0x2609e
<MI 260ce BRA 0x260c4> {[-8-]}
<POP 260d0-260da Naked> Σ-8 Δ+4 ↓ →0x26038 ←0x2609a ←0x260cc
<MI 260d0 MOVE.L (A7)+,D0> Δ+4 {[-4-]}
<MI 260d2 ADDQ.L #0x1,D0> {[-4-]}
<MI 260d4 BVC 0x26038> {[-4-]}
<POP 260da-260dc Naked> Σ-4 Δ+4 ↓ ←0x26038
<POP 260da-260dc StackAdj> Δ+4 {}
<POP 260dc-260e4 Epilogue> Σ0 ←0x260c4
@ 260e4
<LVAR 0x018 4(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 4(rw)>
<LVAR -0x014 4(rw)>
<LVAR -0x018 4(rw)>
<LVAR -0x01c 4(rw)>
<POP 260e4-261ce Body> Δ-12
<POP 260e4-260fa Prologue> Σ0 ↓
<POP 260fa-2610a RegCacheLoad> Σ0 ↓
<POP 2610a-26132 Naked> Σ0 ↓ →0x261c6
<MI 2610a MOVEA.L (A6+0x8),A0> {}
<MI 2610e CLR.B (A0)> {}
<MI 26110 MOVEA.L (A6+0xc),A1> {}
<MI 26114 MOVE.L #0x01,(A1)> {}
<POP 26116-26118 StackAdj> Δ-8 {[-8-]}
<MI 26118 MOVE.L (A6+0x18),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x18)']}
<MI 2611c MOVE.L (A6+0x14),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x18)']|[4, '(A6+0x14)']}
<Call 0x26120 0x23a88> {[-8-]|[4, '(A6+0x18)']|[4, '(A6+0x14)']}
<POP 26124-26126 StackAdj> Δ+8 {[-8-]}
<MI 26126 MOVE.L (A7)+,(A6-0x1c)> Δ+4 {[-4-]}
<MI 26128 MOVE.L (A7)+,(A6-0x18)> Δ+4 {}
<MI 2612a TST.L (A6-0x1c)> {}
<MI 2612c BEQ 0x261c6> {}
<POP 26132-26148 Naked> Σ0 ↓ →0x261c6
<POP 26132-26134 StackAdj> Δ-4 {[-4-]}
<MI 26134 MOVE.L (A6-0x18),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x18)']}
<MI 26136 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<MI 26138 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, '(A6+0x10)']}
<Call 0x2613c 0x25fe8> {[-4-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, '(A6+0x10)']}
<POP 26140-26142 StackAdj> Δ+12 {[-4-]}
<MI 26142 MOVE.L (A7)+,(A6-0x14)> Δ+4 {}
<MI 26146 BEQ 0x261c6> {}
<POP 26148-26168 Naked> Σ0 Δ-4 ↓
<MI 26148 MOVE.B #0x01,(A0)> {}
<MI 2614a PEA.L (A1)> Δ-4 {[4, '^(A1)']}
<Call 0x2614c 0x102b8> {[4, '^(A1)']}
NewString(VAR a : String)
<MI 26152 MOVE.L (A6-0x18),-(A7)> Δ-4 {[4, '^(A1)']|[4, '(A6-0x18)']}
<MI 26154 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[4, '^(A1)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<Call 0x26156 0x23a50> {[4, '^(A1)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<POP 2615a-2615c StackAdj> Δ+8 {[4, '^(A1)']}
<MI 2615c MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 2615e MOVE.L (A6-0x14),D0> {}
<MI 26162 ADDQ.L #0x1,D0> {}
<MI 26164 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 26166 MOVE.L D0,D5> {[4, '(A6-0x8)']}
<POP 26168-2616c Naked> Σ-4 ↓ →0x261c4 ←0x261c0
<MI 26168 CMP.L (A7),D5> {[-4-]}
<MI 2616a BGT 0x261c4> {[-4-]}
<POP 2616c-26182 Naked> Σ-4 ↓ →0x261c0
<POP 2616c-2616e StackAdj> Δ-2 {[-6-]}
<MI 2616e MOVE.L (A6-0x18),-(A7)> Δ-4 {[-6-]|[4, '(A6-0x18)']}
<MI 26170 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[-6-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<MI 26172 MOVE.L D5,-(A7)> Δ-4 {[-6-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D5']}
<Call 0x26174 0x25652> {[-6-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D5']}
<POP 26178-2617a StackAdj> Δ+12 {[-6-]}
<MI 2617a MOVE.B (A7)+,D0> Δ+2 {[-4-]}
<MI 2617c CMPI.B #0x3d,D0> {[-4-]}
<MI 26180 BNE 0x261c0> {[-4-]}
<POP 26182-2618a Naked> Σ-4 Δ-4 ↓
<MI 26182 MOVE.L D5,D0> {[-4-]}
<MI 26184 ADDQ.L #0x1,D0> {[-4-]}
<MI 26186 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x8)']}
<MI 26188 MOVE.L D0,D7> {[-4-]|[4, '(A6-0x8)']}
<POP 2618a-2618e Naked> Σ-8 ↓ →0x261bc ←0x261a8
<MI 2618a CMP.L (A7),D7> {[-8-]}
<MI 2618c BGT 0x261bc> {[-8-]}
<POP 2618e-261a4 Naked> Σ-8 ↓ →0x261a8
<POP 2618e-26190 StackAdj> Δ-2 {[-10-]}
<MI 26190 MOVE.L (A6-0x18),-(A7)> Δ-4 {[-10-]|[4, '(A6-0x18)']}
<MI 26192 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[-10-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<MI 26194 MOVE.L D7,-(A7)> Δ-4 {[-10-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D7']}
<Call 0x26196 0x25652> {[-10-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D7']}
<POP 2619a-2619c StackAdj> Δ+12 {[-10-]}
<MI 2619c MOVE.B (A7)+,D6> Δ+2 {[-8-]}
<MI 2619e CMPI.B #0x2f,D6> {[-8-]}
<MI 261a2 BNE 0x261a8> {[-8-]}
<POP 261a4-261a8 Naked> Σ-8 Δ+8 →0x261c6
<POP 261a4-261a6 StackAdj> Δ+8 {}
<MI 261a6 BRA 0x261c6> {}
<POP 261a8-261bc Naked> Σ-8 ↓ →0x2618a ←0x2618e
<MI 261a8 MOVEA.L (A6+0xc),A0> {[-8-]}
<MI 261ac MOVE.L (A0),-(A7)> Δ-4 {[-8-]|[4, '(A0)']}
<MI 261ae MOVE.B D6,-(A7)> Δ-2 {[-8-]|[4, '(A0)']|[2, 'D6']}
<Call 0x261b0 0x102c0> {[-8-]|[4, '(A0)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 261b6-261b8 StackAdj> Δ+6 {[-8-]}
<MI 261b8 ADDQ.L #0x1,D7> {[-8-]}
<MI 261ba BVC 0x2618a> {[-8-]}
<POP 261bc-261c0 Naked> Σ-8 Δ+8 →0x261c6 ←0x2618a
<POP 261bc-261be StackAdj> Δ+8 {}
<MI 261be BRA 0x261c6> {}
<POP 261c0-261c4 Naked> Σ-4 ↓ →0x26168 ←0x2616c
<MI 261c0 ADDQ.L #0x1,D5> {[-4-]}
<MI 261c2 BVC 0x26168> {[-4-]}
<POP 261c4-261c6 Naked> Σ-4 Δ+4 ↓ ←0x26168
<POP 261c4-261c6 StackAdj> Δ+4 {}
<POP 261c6-261ce Epilogue> Σ0 ←0x2610a ←0x26132 ←0x261a4 ←0x261bc
@ 261ce
<LVAR 0x00c @ 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x010 @ 1(r)>
<POP 261ce-2626c Body>
<POP 261ce-261e4 Prologue> Σ0 ↓
<POP 261e4-261f2 RegCacheLoad> Σ0 ↓
<POP 261f2-2620a Naked> Σ0 ↓ →0x2625a
<MI 261f2 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 261f4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Pointer.fp 0x261f6 <LVAR -0x010 @ 1(r)>> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-16]}
<Call 0x261fa 0x225dc> {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-16]}
DISPATCH_CMDS(?)
<POP 26200-26204 StackAdj> Δ+12 {}
<MI 26204 TST.B (A6-0x10)> {}
<MI 26208 BNE 0x2625a> {}
<POP 2620a-26224 Naked> Σ0 ↓
<MI 2620a MOVE.L 0x2797e,D7> {}
<POP 2620c-2620e StackAdj> Δ-4 {[-4-]}
<MI 2620e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x26210 0x2323c> {[-4-]|[4, '(A6+0x8)']}
<POP 26214-26216 StackAdj> Δ+4 {[-4-]}
<MI 26216 MOVE.L (A7)+,D6> Δ+4 {}
<MI 26218 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 2621a MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x2621c 0x25516> {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
TRY_SCRIPT_FILE(?)
<POP 26220-26222 StackAdj> Δ+8 {}
<MI 26222 MOVE.L 0x2797e,D5> {}
<POP 26224-26242 Naked> Σ0 ↓ →0x2624e ←0x2624e
<MI 26224 MOVE.L D7,D0> {}
<MI 26226 SUBQ.L #0x1,D0> {}
<POP 0x26228 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {}
<MI 26232 LEA.L 0x26976,A0> {}
<MI 26238 MOVE.B (A0+D0.L+#0x8),D0> {}
<MI 2623c CMPI.B #0x25,D0> {}
<MI 26240 BNE 0x2624e> {}
<POP 26242-2624e Naked> Σ0 ↓
<MI 26242 MOVE.L D7,0x2797e> {}
<MI 26244 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 26246 MOVE.L D6,-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, 'D6']}
<Call 0x26248 0x25d86> {[4, '(A6+0x8)']|[4, 'D6']}
<POP 2624c-2624e StackAdj> Δ+8 {}
<POP 2624e-26258 Naked> Σ0 ↓ →0x26224 ←0x26224
<MI 2624e ADDQ.L #0x1,D7> {}
<MI 26250 CMP.L 0x27982,D7> {}
<MI 26256 BLE 0x26224> {}
<POP 26258-2625a Naked> Σ0 ↓
<MI 26258 MOVE.L D5,0x2797e> {}
<POP 2625a-26264 Naked> Σ0 ↓ ←0x261f2
<Pointer.fp 0x2625a <LVAR 0x00c @ 4(r)>> Δ-4 {[@@12]}
<Call 0x2625c 0x102bc> {[@@12]}
FreeString(VAR a : String)
<POP 26262-26264 StackAdj> Δ+4 {}
<POP 26264-2626c Epilogue> Σ0
@ 2626c
<LVAR -0x006 @ 4(r)>
<LVAR -0x00a @ 4(rw)>
<LVAR -0x00b 1(w)>
<LVAR -0x00c @ 1(r)>
<POP 2626c-265be Body> Δ+148
<POP 2626c-26282 Prologue> Σ0 ↓
<POP 26282-26290 RegCacheLoad> Σ0 ↓
<POP 26290-262b8 Naked> Σ0 ↓ →0x2659e ←0x2659e
<MI 26290 MOVE.L 0x2797e,D7> {}
<Pointer.fp 0x26292 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Pointer.fp 0x26294 <LVAR -0x00c @ 1(r)>> Δ-4 {[@@-6]|[@@-12]}
<Call 0x26298 0x23190> {[@@-6]|[@@-12]}
<POP 2629c-2629e StackAdj> Δ+8 {}
<MI 2629e MOVE.L 0x2797e,D6> {}
<POP 262a0-262a2 StackAdj> Δ-4 {[-4-]}
<MI 262a2 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']}
<Call 0x262a4 0x2323c> {[-4-]|[4, '(A6-0x6)']}
<POP 262a8-262aa StackAdj> Δ+4 {[-4-]}
<MI 262aa MOVE.L (A7)+,D0> Δ+4 {}
<MI 262ac CMPI.L #0xffffffff,D0> {}
<MI 262b2 BEQ 0x2659e> {}
<POP 262b8-262e2 Naked> Σ0 ↓ →0x262f2
<POP 262b8-262ba StackAdj> Δ-4 {[-4-]}
<MI 262ba MOVE.L (A6-0x6),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']}
<Const 0x262bc 0x0.4> Δ-4 {[-4-]|[4, '(A6-0x6)']|[##0]}
<Call 0x262c0 0x23b66> {[-4-]|[4, '(A6-0x6)']|[##0]}
<POP 262c4-262c6 StackAdj> Δ+8 {[-4-]}
<MI 262c6 MOVE.L (A7),(A6-0xa)> {[-4-]}
<POP 262c8-262ca StackAdj> Δ+2 {[-2-]}
<MI 262ca MOVE.L (A6-0xa),-(A7)> Δ-4 {[-2-]|[4, '(A6-0xa)']}
<Call 0x262cc 0x2545a> {[-2-]|[4, '(A6-0xa)']}
<POP 262d0-262d2 StackAdj> Δ+4 {[-2-]}
<MI 262d2 MOVE.B (A7)+,D0> Δ+2 {}
<MI 262d4 EXTB.W D0> {}
<POP 0x262d6 LimitCheck 0x0 ≤ D0 ≤ 0x2b> {}
<MI 262da MOVE.B D0,(A6-0xb)> {}
<MI 262de TST.B D0> {}
<MI 262e0 BNE 0x262f2> {}
<POP 262e2-262f2 Naked> Σ0 →0x26596
<MI 262e2 MOVE.L (A6-0xa),-(A7)> Δ-4 {[4, '(A6-0xa)']}
<MI 262e4 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0xa)']|[4, '(A6-0x6)']}
<Call 0x262e6 0x261ce> {[4, '(A6-0xa)']|[4, '(A6-0x6)']}
<POP 262ea-262ec StackAdj> Δ+8 {}
<MI 262ec BRA 0x26596> {}
<POP 262f2-26328 Naked> Σ0 ↓ →0x26354 ←0x262b8
<Pointer.fp 0x262f2 <LVAR -0x00a @ 4(rw)>> Δ-4 {[@@-10]}
<Call 0x262f4 0x102bc> {[@@-10]}
FreeString(VAR a : String)
<POP 262fa-262fc StackAdj> Δ+4 {}
<MI 262fc MOVE.B D0,D1> {}
<MI 262fe EXTB.W D1> {}
<POP 0x26300 LimitCheck 0x0 ≤ D1 ≤ 0x2b> {}
<MI 26304 LEA.L 0x22d2a,A0> {}
<MI 26308 MOVE.W D1,D0> {}
<MI 2630a EXTW.L D0> {}
<MI 2630c MOVE.L D0,D2> {}
<MI 2630e ROR.L #0x1,D2> {}
<MI 26310 ADDA.W D2,A0> {}
<MI 26312 SWAP.W D2> {}
<MI 26314 ROL.W #0x3,D2> {}
<MI 26316 CLR.L D3> {}
<MI 26318 MOVE.B (A0),D3> {}
<MI 2631a LSL.B D2,D3> {}
<MI 2631c LSR.B #0x4,D3> {}
<MI 2631e MOVE.L D3,D5> {}
<MI 26320 CMPI.L #0x0000000f,D5> {}
<MI 26326 BEQ 0x26354> {}
<POP 26328-26354 Naked> Σ0 ↓
<MI 26328 MOVE.L D0,D4> {}
<MI 2632a MOVEQ.L #0x0a,D3> {}
<Call 0x2632c 0x1028c> {}
?muls_d3_d4
<MI 26332 LEA.L 0x22b5c,A0> {}
<Blob 0x26336 [10] (A0+D4.W)> Δ-10 {[«10»]}
<MI 26348 MOVE.L (A6-0x6),-(A7)> Δ-4 {[«10»]|[4, '(A6-0x6)']}
<MI 2634a MOVE.L D5,-(A7)> Δ-4 {[«10»]|[4, '(A6-0x6)']|[4, 'D5']}
<Call 0x2634c 0x23272> {[«10»]|[4, '(A6-0x6)']|[4, 'D5']}
<POP 26350-26354 StackAdj> Δ+18 {}
<POP 26354-26368 Naked> Σ0 →0x263be →0x263cc →0x263e0 →0x263ee →0x26588 →0x263f6 →0x263fc →0x26404 →0x2640c →0x26414 →0x2641c →0x26424 →0x2642c →0x26434 →0x2643c →0x26444 →0x26450 →0x2645c →0x26468 →0x26474 →0x26480 →0x2648c →0x26498 →0x264a4 →0x264b0 →0x264bc →0x264c8 →0x264d4 →0x264e0 →0x264ec →0x264f8 →0x26504 →0x26510 →0x2651c →0x26528 →0x26534 →0x26540 →0x2654c →0x26552 →0x2655e →0x2656a →0x26576 →0x2657c ←0x262f2
<MI 26354 SUBQ.W #0x1,D1> {}
<POP 0x26356 LimitCheck 0x0 ≤ D1 ≤ 0x2a> {}
<MI 2635e ADD.W D1,D1> {}
<MI 26360 SWITCH D1.W> {}
<POP 263be-263c4 Naked> Σ0 Δ-4 ↓ ←0x26354
<MI 263be MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x263c0 0x23cee> {[4, '(A6-0x6)']}
<POP 263c4-263cc Naked> Σ-4 Δ+4 →0x26596 ←0x263e0 ←0x263ee ←0x263fc ←0x26404 ←0x2640c ←0x26414 ←0x2641c ←0x26424 ←0x2642c ←0x26434 ←0x2643c ←0x26444 ←0x26450 ←0x2645c ←0x26468 ←0x26474 ←0x26480 ←0x2648c ←0x26498 ←0x264a4 ←0x264b0 ←0x264bc ←0x264c8 ←0x264d4 ←0x264e0 ←0x264ec ←0x264f8 ←0x26504 ←0x26510 ←0x2651c ←0x26528 ←0x26534 ←0x26540 ←0x26552 ←0x2655e ←0x2656a ←0x2657c
<POP 263c4-263c6 StackAdj> Δ+4 {}
<MI 263c6 BRA 0x26596> {}
<POP 263cc-263e0 Naked> Σ0 →0x26596 ←0x26354
<MI 263cc CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x263ce 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x263d2 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 263d8-263da StackAdj> Δ+6 {}
<MI 263da BRA 0x26596> {}
<POP 263e0-263ee Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<POP 263e0-263e2 StackAdj> Δ-4 {[-4-]}
<Call 0x263e2 0x102ac> {[-4-]}
FSCALL_102ac
<Call 0x263e8 0x23cc4> {[-4-]}
<MI 263ec BRA 0x263c4> {[-4-]}
<POP 263ee-263f6 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 263ee MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x263f0 0x23ecc> {[4, '(A6-0x6)']}
<MI 263f4 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 263f6-263fc Naked> Σ0 →0x26596 ←0x26354
<MI 263f6 BRA 0x26596> {}
<POP 263fc-26404 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 263fc MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x263fe 0x241f2> {[4, '(A6-0x6)']}
<MI 26402 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26404-2640c Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26404 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26406 0x24364> {[4, '(A6-0x6)']}
<MI 2640a BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 2640c-26414 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 2640c MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2640e 0x24452> {[4, '(A6-0x6)']}
<MI 26412 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26414-2641c Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26414 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26416 0x2484e> {[4, '(A6-0x6)']}
<MI 2641a BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 2641c-26424 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 2641c MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2641e 0x248c6> {[4, '(A6-0x6)']}
<MI 26422 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26424-2642c Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26424 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26426 0x2493e> {[4, '(A6-0x6)']}
<MI 2642a BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 2642c-26434 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 2642c MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2642e 0x2496a> {[4, '(A6-0x6)']}
<MI 26432 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26434-2643c Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26434 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26436 0x24a6a> {[4, '(A6-0x6)']}
<MI 2643a BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 2643c-26444 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 2643c MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2643e 0x24b50> {[4, '(A6-0x6)']}
<MI 26442 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26444-26450 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26444 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26446 0x24b7c> {[4, '(A6-0x6)']}
<MI 2644a BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26450-2645c Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26450 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26452 0x24bc8> {[4, '(A6-0x6)']}
<MI 26456 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 2645c-26468 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 2645c MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2645e 0x24c14> {[4, '(A6-0x6)']}
<MI 26462 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26468-26474 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26468 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2646a 0x24c60> {[4, '(A6-0x6)']}
<MI 2646e BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26474-26480 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26474 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26476 0x24cac> {[4, '(A6-0x6)']}
<MI 2647a BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26480-2648c Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26480 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26482 0x24cf8> {[4, '(A6-0x6)']}
<MI 26486 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 2648c-26498 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 2648c MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2648e 0x24d44> {[4, '(A6-0x6)']}
<MI 26492 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26498-264a4 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26498 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2649a 0x24d8e> {[4, '(A6-0x6)']}
<MI 2649e BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 264a4-264b0 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 264a4 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x264a6 0x24dd8> {[4, '(A6-0x6)']}
<MI 264aa BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 264b0-264bc Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 264b0 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x264b2 0x24e22> {[4, '(A6-0x6)']}
<MI 264b6 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 264bc-264c8 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 264bc MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x264be 0x24e6c> {[4, '(A6-0x6)']}
<MI 264c2 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 264c8-264d4 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 264c8 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x264ca 0x24eb6> {[4, '(A6-0x6)']}
<MI 264ce BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 264d4-264e0 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 264d4 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x264d6 0x24f00> {[4, '(A6-0x6)']}
<MI 264da BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 264e0-264ec Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 264e0 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x264e2 0x24f4a> {[4, '(A6-0x6)']}
<MI 264e6 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 264ec-264f8 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 264ec MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x264ee 0x24f94> {[4, '(A6-0x6)']}
<MI 264f2 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 264f8-26504 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 264f8 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x264fa 0x24fd8> {[4, '(A6-0x6)']}
<MI 264fe BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26504-26510 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26504 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26506 0x2501e> {[4, '(A6-0x6)']}
<MI 2650a BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26510-2651c Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26510 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26512 0x25054> {[4, '(A6-0x6)']}
<MI 26516 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 2651c-26528 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 2651c MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2651e 0x250e4> {[4, '(A6-0x6)']}
<MI 26522 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26528-26534 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26528 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2652a 0x25156> {[4, '(A6-0x6)']}
<MI 2652e BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26534-26540 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26534 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26536 0x244b4> {[4, '(A6-0x6)']}
<MI 2653a BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26540-2654c Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26540 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26542 0x2451e> {[4, '(A6-0x6)']}
<MI 26546 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 2654c-26552 Naked> Σ0 →0x26596 ←0x26354
<Call 0x2654c 0x244f0> {}
<MI 26550 BRA 0x26596> {}
<POP 26552-2655e Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 26552 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26554 0x251c8> {[4, '(A6-0x6)']}
<MI 26558 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 2655e-2656a Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 2655e MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26560 0x2524a> {[4, '(A6-0x6)']}
<MI 26564 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 2656a-26576 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 2656a MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2656c 0x252ca> {[4, '(A6-0x6)']}
<MI 26570 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26576-2657c Naked> Σ0 →0x26596 ←0x26354
<Call 0x26576 0x2538e> {}
<MI 2657a BRA 0x26596> {}
<POP 2657c-26588 Naked> Σ0 Δ-4 →0x263c4 ←0x26354
<MI 2657c MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2657e 0x253ae> {[4, '(A6-0x6)']}
<MI 26582 BRA 0x263c4> {[4, '(A6-0x6)']}
<POP 26588-26596 Naked> Σ0 ←0x26354
<POP 26588-26596 Bailout> {}
<MI 26588 MOVEA.L (A5+0x8),A7>
<MI 2658c MOVEA.W #0x0,A6>
<MI 26590 JMP 0x267a4>
<POP 26596-2659e Naked> Σ0 ↓ ←0x262e2 ←0x263c4 ←0x263cc ←0x263f6 ←0x2654c ←0x26576
<MI 26596 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x26598 0x22de6> {[4, '(A6-0x6)']}
<POP 2659c-2659e StackAdj> Δ+4 {}
<POP 2659e-265b6 Naked> Σ0 ↓ →0x26290 ←0x26290
<MI 2659e MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']}
<MI 265a0 MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']|[4, 'D6']}
<MI 265a2 SUB.L D7,(A7)> {[4, 'D6']|[-4-]}
<Call 0x265a4 0x23384> {[4, 'D6']|[-4-]}
<POP 265a8-265aa StackAdj> Δ+8 {}
<MI 265aa MOVE.L D7,0x2797e> {}
<MI 265ac TST.B (A6-0xc)> {}
<MI 265b0 BEQ 0x26290> {}
<POP 265b6-265be Epilogue> Σ0
@ 265be
START
<POP 265be--0001 Body>
<POP 265be-265c8 Prologue> Σ0
<POP 265c8-265f8 Naked> Σ0 ↓ →0x26660
<MI 265c8 MOVE.L #0x1,0x279a8> {}
<POP 265d2-265d4 StackAdj> Δ-4 {[-4-]}
<Call 0x265d4 0x103c4> {[-4-]}
GetArgv() : String
<MI 265da MOVE.L (A7)+,0x279ac> Δ+4 {}
<Const 0x265e0 0x27986.4> Δ-4 {[##162182]}
<Call 0x265e6 0x22682> {[##162182]}
<POP 265ec-265ee StackAdj> Δ+4 {}
<MI 265ee MOVEA.L 0x279ac,A0> {}
<MI 265f4 TST.W (A0)> {}
<MI 265f6 BLE 0x26660> {}
<POP 265f8-26660 Naked> Σ0 →0x2669a
<Blob 0x265f8 [8] @> Δ-8 {[«8""»]}
<Blob 0x26608 [8] @> Δ-8 {[«8""»]|[«8""»]}
<POP 26618-2661a StackAdj> Δ-8 {[«8""»]|[«8""»]|[-8-]}
<Lit 0x2661a 7> {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]}
<POP 2662c-2662e StackAdj> Δ-4 {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[-4-]}
<POP 2662e-2662f StackAdj> Δ+4 {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]}
<Blob 0x2662f [4] 0x279ac> Δ-4 {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]}
<POP 26634-26636 StackAdj> Δ-4 {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]|[-4-]}
<Lit 0x26636 7> {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]|[$$][BYE];]}
<Call 0x2664a 0x102d4> {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]|[$$][BYE];]}
StringCat3(a, b, c : String) : String
<POP 26650-26654 StackAdj> Δ+12 {[«8""»]|[«8""»]|[-4-]}
<MI 26654 MOVE.L (A7)+,0x279ac> Δ+4 {[«8""»]|[«8""»]}
<POP 2665a-2665e StackAdj> Δ+16 {}
<MI 2665e BRA 0x2669a> {}
<POP 26660-2669a Naked> Σ0 ↓ ←0x265c8
<Const 0x26660 0x279ac.4> Δ-4 {[##162220]}
<Call 0x26666 0x102bc> {[##162220]}
FreeString(VAR a : String)
<POP 2666c-2666d StackAdj> Δ+4 ↓ {}
<Blob 0x2666d [8] @> Δ-8 {[«8""»]}
<POP 2667c-2667e StackAdj> Δ-4 {[«8""»]|[-4-]}
<Lit 0x2667e 7> {[«8""»]|[$$[INIT];]}
<MI 26692 MOVE.L (A7)+,0x279ac> Δ+4 {[«8""»]}
<POP 26698-2669a StackAdj> Δ+8 {}
<POP 2669a-266a2 Naked> Σ0 ↓ ←0x265f8
<MI 2669a MOVE.B #0x01,0x279b6> {}
<POP 266a2-266aa Naked> Σ0 ↓ →0x266b6 ←0x267b2
<MI 266a2 TST.B 0x279b6> {}
<MI 266a8 BEQ 0x266b6> {}
<POP 266aa-266b6 Naked> Σ0 →0x26764
<MI 266aa CLR.B 0x279b6> {}
<MI 266b0 BRA 0x26764> {}
<POP 266b6-26764 Naked> Σ0 ↓ ←0x266a2
<Blob 0x266b6 [10] 0x27990> Δ-10 {[«10»]}
<Blob 0x266c4 [2] @> Δ-2 {[«10»]|[«2""»]}
<POP 266c8-266cc StackAdj> Δ-12 {[«10»]|[«2""»]|[-12-]}
<Lit 0x266cc> {[«10»]|[«2""»]|[-8-]|[$$…]}
<Pointer.sp 0x266cc 14> Δ-4
<Const 0x266d0 0x1.2> Δ-2
<Const 0x266d4 0xa.2> Δ-2
<Call 0x266d8 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 266de-266e0 StackAdj> Δ+8
<POP 266de-266e0 StackAdj> Δ-4 {[«10»]|[«2""»]|[-8-]|[$$…]|[-4-]}
<Lit 0x266e0 2> {[«10»]|[«2""»]|[-8-]|[$$…]|[$$>_]}
<Call 0x266f4 0x102d0> {[«10»]|[«2""»]|[-8-]|[$$…]|[$$>_]}
StringCat2(a, b : String) : String
<POP 266fa-266fc StackAdj> Δ+8 {[«10»]|[«2""»]|[-8-]}
<Call 0x266fc 0x103e4> {[«10»]|[«2""»]|[-8-]}
AskConsoleString(prompt : String) : String
<POP 26702-26704 StackAdj> Δ+4 {[«10»]|[«2""»]|[-4-]}
<MI 26704 MOVE.L (A7)+,0x279b2> Δ+4 {[«10»]|[«2""»]}
<POP 2670a-2670c StackAdj> Δ+8 {[-4-]}
<POP 2670c-2670d StackAdj> Δ+4 {}
<Blob 0x2670d [4] 0x279b2> Δ-4 {[«4»]}
<Call 0x26712 0x23084> {[«4»]}
<POP 26716-26718 StackAdj> Δ+2 {[-2-]}
<POP 26718-26719 StackAdj> Δ+2 {}
<Blob 0x26719 [2] @> Δ-2 {[«2""»]}
<Blob 0x2671c [2] @> Δ-2 {[«2""»]|[«2""»]}
<POP 26720-26722 StackAdj> Δ-8 {[«2""»]|[«2""»]|[-8-]}
<Lit 0x26722 2> {[«2""»]|[«2""»]|[-4-]|[$$[ ]}
<POP 26734-26736 StackAdj> Δ-4 {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[-4-]}
<POP 26736-26737 StackAdj> Δ+4 {[«2""»]|[«2""»]|[-4-]|[$$[ ]}
<Blob 0x26737 [4] 0x279b2> Δ-4 {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]}
<POP 2673c-2673e StackAdj> Δ-4 {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]|[-4-]}
<Lit 0x2673e 2> {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]|[$$];]}
<Call 0x26752 0x102d4> {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]|[$$];]}
StringCat3(a, b, c : String) : String
<POP 26758-2675c StackAdj> Δ+12 {[«2""»]|[«2""»]|[-4-]}
<MI 2675c MOVE.L (A7)+,0x279ac> Δ+4 {[«2""»]|[«2""»]}
<POP 26762-26764 StackAdj> Δ+4 {}
<POP 26764-26790 Naked> Σ0 ↓ ←0x266aa
<MI 26764 CLR.B 0x279b0> {}
<MI 2676a MOVE.L #0x1,0x2797e> {}
<MI 26774 CLR.L 0x27982> {}
<POP 2677a-2677c StackAdj> Δ-4 {[-4-]}
<Blob 0x2677c [4] 0x279ac> Δ-4 {[-4-]|[«4»]}
<Call 0x26782 0x102cc> {[-4-]|[«4»]}
StringDup(a : String) : String
<POP 26788-2678a StackAdj> Δ+4 {[-4-]}
<Call 0x2678a 0x23c08> {[-4-]}
<POP 2678e-26790 StackAdj> Δ+4 {}
<POP 26790-2679e Naked> Σ0 ↓ →0x267a4 ←0x2679e
<MI 26790 MOVE.L 0x2797e,D0> {}
<MI 26796 CMP.L 0x27982,D0> {}
<MI 2679c BGT 0x267a4> {}
<POP 2679e-267a4 Naked> Σ0 →0x26790
<Call 0x2679e 0x2626c> {}
<MI 267a2 BRA 0x26790> {}
<POP 267a4-267b2 Naked> Σ0 ↓ ←0x26790
<Const 0x267a4 0x279ac.4> Δ-4 {[##162220]}
<Call 0x267aa 0x102bc> {[##162220]}
FreeString(VAR a : String)
<POP 267b0-267b2 StackAdj> Δ+4 {}
<POP 267b2-267b8 Naked> Σ0 →0x266a2
<MI 267b2 BRA 0x266a2> {}
@ 26812
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 26812-2694e Body>
<POP 26812-26828 Prologue> Σ0 ↓
<POP 26828-2683e RegCacheLoad> Σ0 ↓
<POP 2683e-2689e Naked> Σ0 ↓ →0x268e6
<Call 0x2683e 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x26844 [18] @> Δ-18 {[«18""»]}
<POP 26850-26852 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x26852 18> {[«18""»]|[$$Experiment error :]}
<Call 0x2685e 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 26860-26861 StackAdj> Δ+22 ↓ {}
<Blob 0x26861 [14] @> Δ-14 {[«14""»]}
<POP 26870-26872 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x26872 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 2687c-2687e StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 2687e MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x26882 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 26888-2688a StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x2688a 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 26890-26892 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x26892 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 26894-26896 StackAdj> Δ+18 {}
<MI 26896 MOVEA.L (A6+0xa),A0> {}
<MI 2689a CMPA.W #0x01,A0> {}
<MI 2689c BEQ 0x268e6> {}
<POP 2689e-268e6 Naked> Σ0 ↓
<Blob 0x2689e [14] @> Δ-14 {[«14""»]}
<Blob 0x268ae [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 268be-268c0 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x268c0 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 268ca-268cc StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x268cc> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x268cc 12> Δ-4
<Const 0x268d0 0x1.2> Δ-2
<Const 0x268d2 0x1e.2> Δ-2
<Call 0x268d4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 268d6-268d8 StackAdj> Δ+8
<Call 0x268d8 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 268de-268e0 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x268e0 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 268e2-268e6 StackAdj> Δ+48 {}
<POP 268e6-26946 Naked> Σ0 ↓ ←0x2683e
<Blob 0x268e6 [14] @> Δ-14 {[«14""»]}
<POP 268f6-268f8 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x268f8 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 26902-26904 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 26904 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x26908 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 2690e-26910 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x26910 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 26916-26918 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x26918 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2691a-2691b StackAdj> Δ+18 ↓ {}
<Blob 0x2691b [24] @> Δ-24 {[«24""»]}
<Const 0x2692a 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 2692e-26930 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x26930 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x2693e 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 26944-26946 StackAdj> Δ+30 {}
<POP 26946-2694e Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; import ident.87714101b3ba6986 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 65 be | e | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 79 c2 | y | .PTR 0x279c2 00020010 code.end: 00020010 00 02 69 4e | iN | .PTR 0x2694e 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 0c 5e | ^ | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 68 12 | h | .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 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 00020118 52 75 6e 6e |Runn | .TXT 'Runn' 0002011c 69 6e 67 20 |ing | .TXT 'ing ' 00020120 46 52 55 5f |FRU_ | .TXT 'FRU_' 00020124 50 20 |P | .TXT 'P ' 00020126 46 52 |FR | .TXT 'FR' 00020128 55 20 |U | .XXX[0x2] 0002012a 43 4f 4e 46 49 47 55 52 |CONFIGUR| .TXT 'CONFIGURE ' 00020134 43 4f 4e 46 49 47 55 52 |CONFIGUR| .TXT 'CONFIGURE ' 0002013e 20 46 61 69 6c 65 64 20 | Failed | .TXT ' Failed ' 00020146 54 68 65 20 74 65 73 74 |The test| .TXT 'The test that found the failure was_' 0002016a 2e 45 52 52 |.ERR | .TXT '.ERR' 0002016e 4d 45 53 53 |MESS | .TXT 'MESS' 00020172 46 69 65 6c 64 20 72 65 |Field re| .TXT 'Field replaceable units :_' 0002018c 46 52 55 5f |FRU_ | .TXT 'FRU_' 00020190 4c 49 54 53 |LITS | .TXT 'LITS' 00020194 2e 54 58 54 |.TXT | .TXT '.TXT' 00020198 44 69 61 67 6e 6f 73 74 |Diagnost| .TXT 'Diagnostic Failed ' 000201aa 49 4e 49 54 53 54 41 54 |INITSTAT| .TXT 'INITSTATE ' 000201b4 41 4c 4c 20 20 20 20 20 |ALL | .TXT 'ALL ' 000201be 49 4f 41 20 20 20 20 20 |IOA | .TXT 'IOA ' 000201c8 53 59 53 20 20 20 20 20 |SYS | .TXT 'SYS ' 000201d2 56 41 4c 20 20 20 20 20 |VAL | .TXT 'VAL ' 000201dc 54 59 50 20 20 20 20 20 |TYP | .TXT 'TYP ' 000201e6 53 45 51 20 20 20 20 20 |SEQ | .TXT 'SEQ ' 000201f0 46 49 55 20 20 20 20 20 |FIU | .TXT 'FIU ' 000201fa 4d 45 4d 30 20 20 20 20 |MEM0 | .TXT 'MEM0 ' 00020204 4d 45 4d 31 20 20 20 20 |MEM1 | .TXT 'MEM1 ' 0002020e 4d 45 4d 32 20 20 20 20 |MEM2 | .TXT 'MEM2 ' 00020218 4d 45 4d 33 20 20 20 20 |MEM3 | .TXT 'MEM3 ' 00020222 46 4f 52 45 50 4c 41 4e |FOREPLAN| .TXT 'FOREPLANE ' 0002022c 31 20 |1 | .TXT '1 ' 0002022e 32 20 |2 | .TXT '2 ' 00020230 54 45 53 54 5f 46 52 55 |TEST_FRU| .TXT 'TEST_FRU ' 0002023a 49 4f |IO | .TXT 'IO' 0002023c 43 20 |C | .XXX[0x2] 0002023e 4e 6f 74 20 |Not | .TXT 'Not ' 00020242 61 20 76 61 |a va | .TXT 'a va' 00020246 6c 69 64 20 |lid | .TXT 'lid ' 0002024a 46 52 55 5f |FRU_ | .TXT 'FRU_' 0002024e 50 41 |PA | .TXT 'PA' 00020250 53 53 |SS | .TXT 'SS' 00020252 45 44 |ED | .TXT 'ED' 00020254 49 4f 41 20 |IOA | .XXX[0x4] 00020258 20 20 20 20 20 20 | | .XXX[0x6] 0002025e 57 49 44 47 45 54 20 20 |WIDGET | .TXT 'WIDGET ' 00020268 53 45 51 20 20 20 20 20 |SEQ | .TXT 'SEQ ' 00020272 46 49 55 20 20 20 20 20 |FIU | .TXT 'FIU ' 0002027c 53 59 53 20 20 20 20 20 |SYS | .TXT 'SYS ' 00020286 41 4c 4c 20 20 20 20 20 |ALL | .TXT 'ALL ' 00020290 54 59 50 20 20 20 20 20 |TYP | .TXT 'TYP ' 0002029a 56 41 4c 20 20 20 20 20 |VAL | .TXT 'VAL ' 000202a4 41 4c 4c 4d 45 4d 20 20 |ALLMEM | .TXT 'ALLMEM ' 000202ae 46 49 55 5f 4d 45 4d 20 |FIU_MEM | .TXT 'FIU_MEM ' 000202b8 54 56 53 53 20 20 20 20 |TVSS | .TXT 'TVSS ' 000202c2 4e 4f 54 5f 4d 45 4d 20 |NOT_MEM | .TXT 'NOT_MEM ' 000202cc 4d 45 4d 30 20 20 20 20 |MEM0 | .TXT 'MEM0 ' 000202d6 4d 45 4d 31 20 20 20 20 |MEM1 | .TXT 'MEM1 ' 000202e0 4d 45 4d 32 20 20 20 20 |MEM2 | .TXT 'MEM2 ' 000202ea 4d 45 4d 33 20 20 20 20 |MEM3 | .TXT 'MEM3 ' 000202f4 49 4f |IO | .TXT 'IO' 000202f6 43 20 |C | .XXX[0x2] 000202f8 41 4c 4c 20 20 20 20 20 |ALL | .TXT 'ALL ' 00020302 43 4f 4e 44 20 20 20 20 |COND | .TXT 'COND ' 0002030c 53 59 53 20 20 20 20 20 |SYS | .TXT 'SYS ' 00020316 56 41 4c 20 20 20 20 20 |VAL | .TXT 'VAL ' 00020320 54 59 50 20 20 20 20 20 |TYP | .TXT 'TYP ' 0002032a 53 45 51 20 20 20 20 20 |SEQ | .TXT 'SEQ ' 00020334 46 49 55 20 20 20 20 20 |FIU | .TXT 'FIU ' 0002033e 4d 45 4d 20 20 20 20 20 |MEM | .TXT 'MEM ' 00020348 43 53 41 20 20 20 20 20 |CSA | .TXT 'CSA ' 00020352 4d 4d 20 20 20 20 20 20 |MM | .TXT 'MM ' 0002035c 50 52 49 56 20 20 20 20 |PRIV | .TXT 'PRIV ' 00020366 43 4c 41 53 53 20 20 20 |CLASS | .TXT 'CLASS ' 00020370 20 20 20 20 20 20 20 20 | | .BLANK 20[0x38] 000203a8 20 20 20 20 | | .BLANK 20[0x4] 000203ac 54 41 47 53 20 20 20 20 |TAGS | .TXT 'TAGS ' 000203b6 44 52 41 4d 20 20 20 20 |DRAM | .TXT 'DRAM ' 000203c0 56 52 46 20 20 20 20 20 |VRF | .TXT 'VRF ' 000203ca 54 52 46 20 20 20 20 20 |TRF | .TXT 'TRF ' 000203d4 53 59 53 42 55 46 46 45 |SYSBUFFE| .TXT 'SYSBUFFERS' 000203de 44 49 53 50 20 20 20 20 |DISP | .TXT 'DISP ' 000203e8 45 43 43 20 20 20 20 20 |ECC | .TXT 'ECC ' 000203f2 54 49 4d 45 52 53 20 20 |TIMERS | .TXT 'TIMERS ' 000203fc 50 41 54 48 53 20 20 20 |PATHS | .TXT 'PATHS ' 00020406 53 50 41 52 45 30 20 20 |SPARE0 | .TXT 'SPARE0 ' 00020410 53 50 41 52 45 31 20 20 |SPARE1 | .TXT 'SPARE1 ' 0002041a 53 50 41 52 45 32 20 20 |SPARE2 | .TXT 'SPARE2 ' 00020424 53 50 41 52 45 33 20 20 |SPARE3 | .TXT 'SPARE3 ' 0002042e 53 50 41 52 45 34 20 20 |SPARE4 | .TXT 'SPARE4 ' 00020438 49 4f |IO | .TXT 'IO' 0002043a 43 20 |C | .XXX[0x2] 0002043c 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal board name for RUN command_ ' 00020460 50 32 55 43 4f 44 45 20 |P2UCODE | .TXT 'P2UCODE ' 00020468 50 33 55 43 4f 44 45 20 |P3UCODE | .XXX[0x8] 00020470 55 6e 6b 6e 6f 77 6e 20 |Unknown | .TXT 'Unknown test :_ ' 00020480 52 55 4e 20 20 20 20 20 |RUN | .TXT 'RUN ' 0002048a 54 45 53 54 20 50 41 53 |TEST PAS| .TXT 'TEST PASSED ' 00020496 2e 45 52 52 |.ERR | .TXT '.ERR' 0002049a 4d 45 53 53 |MESS | .TXT 'MESS' 0002049e 45 52 52 4d 45 53 53 20 |ERRMESS | .TXT 'ERRMESS ' 000204a8 4f 4e |ON | .TXT 'ON' 000204aa 4f 46 |OF | .TXT 'OF' 000204ac 46 20 |F | .XXX[0x2] 000204ae 41 72 67 75 6d 65 6e 74 |Argument| .TXT 'Arguments for command are ON or OFF ' 000204d2 49 53 4f 4c 41 54 45 20 |ISOLATE | .TXT 'ISOLATE ' 000204dc 54 52 41 43 45 20 20 20 |TRACE | .TXT 'TRACE ' 000204e6 55 4c 4f 41 44 20 20 20 |ULOAD | .TXT 'ULOAD ' 000204f0 4e 4f 52 4d 41 4c 20 20 |NORMAL | .TXT 'NORMAL ' 000204fa 48 49 47 48 20 20 20 20 |HIGH | .TXT 'HIGH ' 00020504 4c 4f 57 20 20 20 20 20 |LOW | .TXT 'LOW ' 0002050e 49 4c 4c 45 47 41 4c 20 |ILLEGAL | .TXT 'ILLEGAL ' 00020518 4e 4f 52 4d 41 4c 20 20 |NORMAL | .TXT 'NORMAL ' 00020522 46 41 53 54 20 20 20 20 |FAST | .TXT 'FAST ' 0002052c 49 4c 4c 45 47 41 4c 20 |ILLEGAL | .TXT 'ILLEGAL ' 00020536 49 4c 4c 45 47 41 4c 20 |ILLEGAL | .TXT 'ILLEGAL ' 00020540 45 52 52 4f 52 20 2d 20 |ERROR - | .TXT 'ERROR - POWER can be margined HIGH, NORMAL, or LOW' 00020572 45 52 52 4f 52 20 2d 20 |ERROR - | .TXT 'ERROR - CLOCK can be margined FAST or NORMAL' 0002059e 45 52 52 4f 52 20 2d 20 |ERROR - | .TXT 'ERROR - You can only margin POWER or CLOCK' 000205c8 4d 41 52 47 49 4e 20 20 |MARGIN | .TXT 'MARGIN ' 000205d2 50 4f 57 45 52 20 |POWER | .TXT 'POWER ' 000205d8 43 4c 4f 43 4b 20 |CLOCK | .TXT 'CLOCK ' 000205de 54 45 53 54 20 20 20 20 |TEST | .TXT 'TEST ' 000205e8 52 55 4e 20 20 20 20 20 |RUN | .TXT 'RUN ' 000205f2 45 52 52 4d 45 53 53 20 |ERRMESS | .TXT 'ERRMESS ' 000205fc 49 4e 49 54 5f 53 54 41 |INIT_STA| .TXT 'INIT_STATE' 00020606 49 53 4f 4c 41 54 45 20 |ISOLATE | .TXT 'ISOLATE ' 00020610 54 52 41 43 45 20 20 20 |TRACE | .TXT 'TRACE ' 0002061a 55 4c 4f 41 44 20 20 20 |ULOAD | .TXT 'ULOAD ' 00020624 4d 41 52 47 49 4e 20 20 |MARGIN | .TXT 'MARGIN ' 0002062e 50 4f 57 45 52 44 4f 57 |POWERDOW| .TXT 'POWERDOWN ' 00020638 54 68 69 73 20 69 73 20 |This is | .XXX[0x1e8] 00020640 61 20 53 65 72 69 65 73 |a Series| 00020648 20 31 30 30 20 52 31 30 | 100 R10| 00020650 30 30 20 50 72 6f 63 65 |00 Proce| 00020658 73 73 6f 72 2e 20 20 54 |ssor. T| 00020660 68 65 20 70 72 6f 63 65 |he proce| 00020668 73 73 6f 72 20 62 6f 61 |ssor boa| 00020670 72 64 73 20 6d 61 79 20 |rds may | 00020678 62 65 70 6f 77 65 72 65 |bepowere| 00020680 64 20 6f 66 66 20 61 6e |d off an| 00020688 64 20 6f 6e 20 75 6e 64 |d on und| 00020690 65 72 20 70 72 6f 67 72 |er progr| 00020698 61 6d 20 63 6f 6e 74 72 |am contr| 000206a0 6f 6c 2e 20 20 54 68 65 |ol. The| 000206a8 20 49 2f 4f 20 41 64 61 | I/O Ada| 000206b0 70 74 6f 72 20 28 49 4f |ptor (IO| 000206b8 41 29 20 70 6f 77 65 72 |A) power| 000206c0 69 73 20 63 6f 6e 74 72 |is contr| 000206c8 6f 6c 6c 65 64 20 6f 6e |olled on| 000206d0 6c 79 20 62 79 20 74 68 |ly by th| 000206d8 65 20 66 72 6f 6e 74 20 |e front | 000206e0 70 61 6e 65 6c 20 6b 65 |panel ke| 000206e8 79 20 73 77 69 74 63 68 |y switch| 000206f0 2e 20 20 54 68 69 73 20 |. This | 000206f8 63 6f 6d 6d 61 6e 64 20 |command | 00020700 6d 61 79 20 6f 6e 6c 79 |may only| 00020708 20 62 65 20 75 73 65 64 | be used| 00020710 20 74 6f 20 72 65 6d 6f | to remo| 00020718 76 65 20 70 6f 77 65 72 |ve power| 00020720 20 66 72 6f 6d 20 74 68 | from th| 00020728 65 20 53 59 53 2c 20 54 |e SYS, T| 00020730 59 50 2c 20 56 41 4c 2c |YP, VAL,| 00020738 20 53 45 51 2c 20 46 49 | SEQ, FI| 00020740 55 2c 20 61 6e 64 20 4d |U, and M| 00020748 45 4d 62 6f 61 72 64 73 |EMboards| 00020750 2e 20 44 6f 20 79 6f 75 |. Do you| 00020758 20 72 65 61 6c 6c 79 20 | really | 00020760 77 61 6e 74 20 74 6f 20 |want to | 00020768 74 75 72 6e 20 74 68 65 |turn the| 00020770 20 52 31 30 30 30 20 70 | R1000 p| 00020778 72 6f 63 65 73 73 6f 72 |rocessor| 00020780 20 70 6f 77 65 72 20 6f | power o| 00020788 66 66 54 68 65 20 52 31 |ffThe R1| 00020790 30 30 30 20 70 72 6f 63 |000 proc| 00020798 65 73 73 6f 72 20 70 6f |essor po| 000207a0 77 65 72 20 68 61 73 20 |wer has | 000207a8 62 65 65 6e 20 74 75 72 |been tur| 000207b0 6e 65 64 20 6f 66 66 2e |ned off.| 000207b8 20 20 49 4f 41 20 70 6f | IOA po| 000207c0 77 65 72 20 69 73 20 73 |wer is s| 000207c8 74 69 6c 6c 20 6f 6e 21 |till on!| 000207d0 59 6f 75 20 6d 61 79 20 |You may | 000207d8 63 68 61 6e 67 65 20 43 |change C| 000207e0 50 55 20 62 6f 61 72 64 |PU board| 000207e8 73 20 6e 6f 77 2e 41 72 |s now.Ar| 000207f0 65 20 79 6f 75 20 72 65 |e you re| 000207f8 61 64 79 20 74 6f 20 74 |ady to t| 00020800 75 72 6e 20 74 68 65 20 |urn the | 00020808 52 31 30 30 30 20 70 72 |R1000 pr| 00020810 6f 63 65 73 73 6f 72 20 |ocessor | 00020818 70 6f 77 65 72 20 6f 6e |power on| 00020820 54 68 69 73 20 69 73 20 |This is | .TXT 'This is a Series 200 R1000 Processor. Power to this processor may not' 00020866 62 65 20 63 6f 6e 74 72 |be contr| .TXT 'be controlled programatically. To turn the processor off or on use the ' 000208ae 6b 65 79 20 73 77 69 74 |key swit| .TXT 'key switch on the System Control Panel. ' 000208d6 4d 75 6c 74 69 2d 70 72 |Multi-pr| .TXT 'Multi-processors do not have power control! ' 00020902 57 61 72 6e 69 6e 67 3a |Warning:| .TXT 'Warning: This is a multi-processor! ' 00020926 52 75 6e 6e 69 6e 67 20 |Running | .TXT 'Running certain FRU's may crash other nodes!' 00020952 t_DIAG_: 00020952 44 49 41 47 20 20 20 20 |DIAG | .TXT 'DIAG ' 0002095c 41 4c 4c 20 20 20 20 20 |ALL | .TXT 'ALL ' 00020966 49 4f 41 20 20 20 20 20 |IOA | .TXT 'IOA ' 00020970 53 59 53 20 20 20 20 20 |SYS | .TXT 'SYS ' 0002097a 56 41 4c 20 20 20 20 20 |VAL | .TXT 'VAL ' 00020984 54 59 50 20 20 20 20 20 |TYP | .TXT 'TYP ' 0002098e 53 45 51 20 20 20 20 20 |SEQ | .TXT 'SEQ ' 00020998 46 49 55 20 20 20 20 20 |FIU | .TXT 'FIU ' 000209a2 4d 45 4d 30 20 20 20 20 |MEM0 | .TXT 'MEM0 ' 000209ac 4d 45 4d 31 20 20 20 20 |MEM1 | .TXT 'MEM1 ' 000209b6 4d 45 4d 32 20 20 20 20 |MEM2 | .TXT 'MEM2 ' 000209c0 4d 45 4d 33 20 20 20 20 |MEM3 | .TXT 'MEM3 ' 000209ca 46 4f 52 45 50 4c 41 4e |FOREPLAN| .TXT 'FOREPLANE ' 000209d4 49 4f 41 20 20 20 20 20 |IOA | .TXT 'IOA ' 000209de 57 49 44 47 45 54 20 20 |WIDGET | .TXT 'WIDGET ' 000209e8 53 45 51 20 20 20 20 20 |SEQ | .TXT 'SEQ ' 000209f2 46 49 55 20 20 20 20 20 |FIU | .TXT 'FIU ' 000209fc 53 59 53 20 20 20 20 20 |SYS | .TXT 'SYS ' 00020a06 41 4c 4c 20 20 20 20 20 |ALL | .TXT 'ALL ' 00020a10 54 59 50 20 20 20 20 20 |TYP | .TXT 'TYP ' 00020a1a 56 41 4c 20 20 20 20 20 |VAL | .TXT 'VAL ' 00020a24 41 4c 4c 4d 45 4d 20 20 |ALLMEM | .TXT 'ALLMEM ' 00020a2e 46 49 55 5f 4d 45 4d 20 |FIU_MEM | .TXT 'FIU_MEM ' 00020a38 54 56 53 53 20 20 20 20 |TVSS | .TXT 'TVSS ' 00020a42 4e 4f 54 5f 4d 45 4d 20 |NOT_MEM | .TXT 'NOT_MEM ' 00020a4c 4d 45 4d 30 20 20 20 20 |MEM0 | .TXT 'MEM0 ' 00020a56 4d 45 4d 31 20 20 20 20 |MEM1 | .TXT 'MEM1 ' 00020a60 4d 45 4d 32 20 20 20 20 |MEM2 | .TXT 'MEM2 ' 00020a6a 4d 45 4d 33 20 20 20 20 |MEM3 | .TXT 'MEM3 ' 00020a74 TXTTBL__ALL_COND_SYS_VAL...: 00020a74 41 4c 4c 20 20 20 20 20 |ALL | .TXT 'ALL ' 00020a7e 43 4f 4e 44 20 20 20 20 |COND | .TXT 'COND ' 00020a88 53 59 53 20 20 20 20 20 |SYS | .TXT 'SYS ' 00020a92 56 41 4c 20 20 20 20 20 |VAL | .TXT 'VAL ' 00020a9c 54 59 50 20 20 20 20 20 |TYP | .TXT 'TYP ' 00020aa6 53 45 51 20 20 20 20 20 |SEQ | .TXT 'SEQ ' 00020ab0 46 49 55 20 20 20 20 20 |FIU | .TXT 'FIU ' 00020aba 4d 45 4d 20 20 20 20 20 |MEM | .TXT 'MEM ' 00020ac4 43 53 41 20 20 20 20 20 |CSA | .TXT 'CSA ' 00020ace 4d 4d 20 20 20 20 20 20 |MM | .TXT 'MM ' 00020ad8 50 52 49 56 20 20 20 20 |PRIV | .TXT 'PRIV ' 00020ae2 43 4c 41 53 53 20 20 20 |CLASS | .TXT 'CLASS ' 00020aec 20 20 20 20 20 20 20 20 | | .TXT ' ' 00020af6 20 20 20 20 20 20 20 20 | | .TXT ' ' 00020b00 20 20 20 20 20 20 20 20 | | .TXT ' ' 00020b0a 20 20 20 20 20 20 20 20 | | .TXT ' ' 00020b14 20 20 20 20 20 20 20 20 | | .TXT ' ' 00020b1e 20 20 20 20 20 20 20 20 | | .TXT ' ' 00020b28 54 41 47 53 20 20 20 20 |TAGS | .TXT 'TAGS ' 00020b32 44 52 41 4d 20 20 20 20 |DRAM | .TXT 'DRAM ' 00020b3c 56 52 46 20 20 20 20 20 |VRF | .TXT 'VRF ' 00020b46 54 52 46 20 20 20 20 20 |TRF | .TXT 'TRF ' 00020b50 53 59 53 42 55 46 46 45 |SYSBUFFE| .TXT 'SYSBUFFERS' 00020b5a 44 49 53 50 20 20 20 20 |DISP | .TXT 'DISP ' 00020b64 45 43 43 20 20 20 20 20 |ECC | .TXT 'ECC ' 00020b6e 54 49 4d 45 52 53 20 20 |TIMERS | .TXT 'TIMERS ' 00020b78 50 41 54 48 53 20 20 20 |PATHS | .TXT 'PATHS ' 00020b82 53 50 41 52 45 30 20 20 |SPARE0 | .TXT 'SPARE0 ' 00020b8c 53 50 41 52 45 31 20 20 |SPARE1 | .TXT 'SPARE1 ' 00020b96 53 50 41 52 45 32 20 20 |SPARE2 | .TXT 'SPARE2 ' 00020ba0 53 50 41 52 45 33 20 20 |SPARE3 | .TXT 'SPARE3 ' 00020baa 53 50 41 52 45 34 20 20 |SPARE4 | .TXT 'SPARE4 ' 00020bb4 TXTTBL_POWER_MARGINS: 00020bb4 4e 4f 52 4d 41 4c 20 20 |NORMAL | .TXT 'NORMAL ' 00020bbe 48 49 47 48 20 20 20 20 |HIGH | .TXT 'HIGH ' 00020bc8 4c 4f 57 20 20 20 20 20 |LOW | .TXT 'LOW ' 00020bd2 49 4c 4c 45 47 41 4c 20 |ILLEGAL | .TXT 'ILLEGAL ' 00020bdc TXTTBL_CLOCK_MARGINS: 00020bdc 4e 4f 52 4d 41 4c 20 20 |NORMAL | .TXT 'NORMAL ' 00020be6 46 41 53 54 20 20 20 20 |FAST | .TXT 'FAST ' 00020bf0 49 4c 4c 45 47 41 4c 20 |ILLEGAL | .TXT 'ILLEGAL ' 00020bfa 49 4c 4c 45 47 41 4c 20 |ILLEGAL | .TXT 'ILLEGAL ' 00020c04 TXTTBL_CMDS: 00020c04 54 45 53 54 20 20 20 20 |TEST | .TXT 'TEST ' 00020c0e 52 55 4e 20 20 20 20 20 |RUN | .TXT 'RUN ' 00020c18 45 52 52 4d 45 53 53 20 |ERRMESS | .TXT 'ERRMESS ' 00020c22 49 4e 49 54 5f 53 54 41 |INIT_STA| .TXT 'INIT_STATE' 00020c2c 49 53 4f 4c 41 54 45 20 |ISOLATE | .TXT 'ISOLATE ' 00020c36 54 52 41 43 45 20 20 20 |TRACE | .TXT 'TRACE ' 00020c40 55 4c 4f 41 44 20 20 20 |ULOAD | .TXT 'ULOAD ' 00020c4a 4d 41 52 47 49 4e 20 20 |MARGIN | .TXT 'MARGIN ' 00020c54 50 4f 57 45 52 44 4f 57 |POWERDOW| .TXT 'POWERDOWN ' 00020c5e ; -------------------------------------------------------------------------------------- 00020c5e ; OMSI PASCAL Function 00020c5e ; <LVAR 0x008 1(r)> 00020c5e ; -------------------------------------------------------------------------------------- 00020c5e PROG_FAIL: 00020c5e 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00020c62 bf d5 | | CMPA.L (A5),A7 00020c64 62 06 |b | BHI 0x20c6c 00020c66 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020c6a 4e 76 |Nv | TRAPV 00020c6c de fc 00 2c | , | ADDA.W #0x2c,A7 00020c70 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00020c74 41 fa f4 a2 |A | LEA.L 0x20118,A0 00020c78 70 06 |p | MOVEQ.L #0x06,D0 00020c7a 3f 20 |? | MOVE.W -(A0),-(A7) 00020c7c 51 c8 ff fc |Q | DBF D0,0x20c7a 00020c80 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00020c84 51 4f |QO | SUBQ.L #0x8,A7 00020c86 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00020c8a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020c8e 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00020c92 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020c98 58 4f |XO | ADDQ.L #0x4,A7 00020c9a 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00020c9e 48 80 |H | EXTB.W D0 00020ca0 48 c0 |H | EXTW.L D0 00020ca2 2f 00 |/ | MOVE.L D0,-(A7) 00020ca4 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00020caa 58 4f |XO | ADDQ.L #0x4,A7 00020cac 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020cb2 50 4f |PO | ADDQ.L #0x8,A7 00020cb4 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020cba de fc 00 14 | | ADDA.W #0x14,A7 00020cbe 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00020cc2 4e 5e |N^ | UNLK A6 00020cc4 4e 75 |Nu | RTS 00020cc6 ; -------------------------------------------------------------------------------------- 00020cc6 ; OMSI PASCAL Function 00020cc6 ; <LVAR 0x02a 4(r)> 00020cc6 ; <LVAR 0x028 1(r)> 00020cc6 ; <LVAR 0x026 1(r)> 00020cc6 ; <LVAR 0x024 1(r)> 00020cc6 ; <LVAR 0x020 4(r)> 00020cc6 ; <LVAR 0x01c 4(r)> 00020cc6 ; <LVAR 0x018 4(r)> 00020cc6 ; <LVAR 0x014 4(r)> 00020cc6 ; <LVAR 0x010 4(r)> 00020cc6 ; <LVAR 0x00c 4(r)> 00020cc6 ; <LVAR 0x008 4(r)> 00020cc6 ; -------------------------------------------------------------------------------------- 00020cc6 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 00020cca bf d5 | | CMPA.L (A5),A7 00020ccc 62 06 |b | BHI 0x20cd4 00020cce 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020cd2 4e 76 |Nv | TRAPV 00020cd4 de fc 00 3a | : | ADDA.W #0x3a,A7 00020cd8 48 e7 c0 e8 |H | MOVEM.L A4+A2+A1+A0+D1+D0,-(A7) 00020cdc 43 f8 00 00 |C | LEA.L 0x0,A1 00020ce0 45 f9 00 01 05 2c |E , | LEA.L IPC_GetString(VAR retval : String),A2 00020ce6 70 0c |p | MOVEQ.L #0x0c,D0 00020ce8 72 01 |r | MOVEQ.L #0x01,D1 00020cea 3f 3a f4 38 |?: 8 | MOVE.W 0x20124,-(A7) 00020cee 59 4f |YO | SUBQ.L #0x4,A7 00020cf0 1e ba f4 34 | 4 | MOVE.B 0x20126,(A7) 00020cf4 1f 7a f4 31 00 01 | z 1 | MOVE.B 0x20127,(A7+0x1) 00020cfa 1f 7a f4 2c 00 02 | z , | MOVE.B 0x20128,(A7+0x2) 00020d00 51 4f |QO | SUBQ.L #0x8,A7 00020d02 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00020d06 3f 01 |? | MOVE.W D1,-(A7) 00020d08 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00020d0c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020d12 2e ae 00 2a |. * | MOVE.L (A6+0x2a),(A7) 00020d16 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00020d1c 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00020d20 3f 01 |? | MOVE.W D1,-(A7) 00020d22 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00020d26 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020d2c 50 4f |PO | ADDQ.L #0x8,A7 00020d2e 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00020d34 de c0 | | ADDA.W D0,A7 00020d36 28 5f |(_ | MOVEA.L (A7)+,A4 00020d38 5c 4f |\O | ADDQ.L #0x6,A7 00020d3a 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020d40 1f 2e 00 28 | . ( | MOVE.B (A6+0x28),-(A7) 00020d44 48 57 |HW | PEA.L (A7) 00020d46 48 51 |HQ | PEA.L (A1) 00020d48 48 51 |HQ | PEA.L (A1) 00020d4a 4e b9 00 01 04 fc |N | JSR IPC_PutVar(src : Pointer; length : Long ; type : Long) 00020d50 de c0 | | ADDA.W D0,A7 00020d52 1e ae 00 26 | & | MOVE.B (A6+0x26),(A7) 00020d56 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00020d5c 1e ae 00 24 | $ | MOVE.B (A6+0x24),(A7) 00020d60 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00020d66 54 4f |TO | ADDQ.L #0x2,A7 00020d68 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 00020d6e 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020d72 2f 0c |/ | MOVE.L A4,-(A7) 00020d74 48 78 00 01 |Hx | PEA.L 0x1 00020d78 1f 01 | | MOVE.B D1,-(A7) 00020d7a 48 50 |HP | PEA.L (A0) 00020d7c 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00020d82 de fc 00 0e | | ADDA.W #0xe,A7 00020d86 4a 10 |J | TST.B (A0) 00020d88 66 5e |f^ | BNE 0x20de8 00020d8a 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020d90 20 6e 00 20 | n | MOVEA.L (A6+0x20),A0 00020d94 48 50 |HP | PEA.L (A0) 00020d96 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020d9c 58 4f |XO | ADDQ.L #0x4,A7 00020d9e 20 6e 00 1c | n | MOVEA.L (A6+0x1c),A0 00020da2 48 50 |HP | PEA.L (A0) 00020da4 4e 92 |N | JSR (A2) 00020da6 58 4f |XO | ADDQ.L #0x4,A7 00020da8 20 6e 00 18 | n | MOVEA.L (A6+0x18),A0 00020dac 48 50 |HP | PEA.L (A0) 00020dae 4e 92 |N | JSR (A2) 00020db0 58 4f |XO | ADDQ.L #0x4,A7 00020db2 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00020db6 48 50 |HP | PEA.L (A0) 00020db8 4e 92 |N | JSR (A2) 00020dba 58 4f |XO | ADDQ.L #0x4,A7 00020dbc 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00020dc0 48 50 |HP | PEA.L (A0) 00020dc2 48 51 |HQ | PEA.L (A1) 00020dc4 48 51 |HQ | PEA.L (A1) 00020dc6 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 00020dcc de c0 | | ADDA.W D0,A7 00020dce 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00020dd2 48 50 |HP | PEA.L (A0) 00020dd4 48 51 |HQ | PEA.L (A1) 00020dd6 48 78 00 07 |Hx | PEA.L 0x7 00020dda 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 00020de0 de c0 | | ADDA.W D0,A7 00020de2 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 00020de8 4c df 17 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A4 00020dec 4e 5e |N^ | UNLK A6 00020dee 4e 75 |Nu | RTS 00020df0 ; -------------------------------------------------------------------------------------- 00020df0 ; OMSI PASCAL Function 00020df0 ; <LVAR 0x010 4(r)> 00020df0 ; <LVAR 0x00c 4(r)> 00020df0 ; <LVAR 0x008 4(r)> 00020df0 ; -------------------------------------------------------------------------------------- 00020df0 4e 56 ff ec |NV | LINK.W A6,#0xffec 00020df4 bf d5 | | CMPA.L (A5),A7 00020df6 62 06 |b | BHI 0x20dfe 00020df8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020dfc 4e 76 |Nv | TRAPV 00020dfe de fc 00 14 | | ADDA.W #0x14,A7 00020e02 48 e7 00 80 |H | MOVEM.L A0,-(A7) 00020e06 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020e0c 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00020e10 48 50 |HP | PEA.L (A0) 00020e12 48 78 00 00 |Hx | PEA.L 0x0 00020e16 48 78 00 00 |Hx | PEA.L 0x0 00020e1a 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 00020e20 de fc 00 0c | | ADDA.W #0xc,A7 00020e24 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00020e28 48 50 |HP | PEA.L (A0) 00020e2a 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020e30 58 4f |XO | ADDQ.L #0x4,A7 00020e32 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020e36 48 50 |HP | PEA.L (A0) 00020e38 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020e3e 58 4f |XO | ADDQ.L #0x4,A7 00020e40 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 00020e46 4c df 01 00 |L | MOVEM.L (A7)+,A0 00020e4a 4e 5e |N^ | UNLK A6 00020e4c 4e 75 |Nu | RTS 00020e4e ; -------------------------------------------------------------------------------------- 00020e4e ; OMSI PASCAL Function 00020e4e ; <LVAR 0x01e 1(r)> 00020e4e ; <LVAR 0x01a 4(r)> 00020e4e ; <LVAR 0x016 4(r)> 00020e4e ; <LVAR 0x012 4(r)> 00020e4e ; <LVAR 0x010 1(r)> 00020e4e ; <LVAR 0x00c 4(r)> 00020e4e ; <LVAR 0x008 4(r)> 00020e4e ; -------------------------------------------------------------------------------------- 00020e4e 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00020e52 bf d5 | | CMPA.L (A5),A7 00020e54 62 06 |b | BHI 0x20e5c 00020e56 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020e5a 4e 76 |Nv | TRAPV 00020e5c de fc 00 20 | | ADDA.W #0x20,A7 00020e60 48 e7 00 c0 |H | MOVEM.L A1+A0,-(A7) 00020e64 41 f9 00 01 05 08 |A | LEA.L IPC_PutString(a : String),A0 00020e6a 43 f8 00 00 |C | LEA.L 0x0,A1 00020e6e 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020e74 1f 2e 00 1e | . | MOVE.B (A6+0x1e),-(A7) 00020e78 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00020e7e 54 4f |TO | ADDQ.L #0x2,A7 00020e80 2f 2e 00 1a |/. | MOVE.L (A6+0x1a),-(A7) 00020e84 4e 90 |N | JSR (A0) 00020e86 2e ae 00 16 |. | MOVE.L (A6+0x16),(A7) 00020e8a 4e 90 |N | JSR (A0) 00020e8c 2e ae 00 12 |. | MOVE.L (A6+0x12),(A7) 00020e90 4e 90 |N | JSR (A0) 00020e92 54 4f |TO | ADDQ.L #0x2,A7 00020e94 1e ae 00 10 | | MOVE.B (A6+0x10),(A7) 00020e98 48 57 |HW | PEA.L (A7) 00020e9a 48 51 |HQ | PEA.L (A1) 00020e9c 48 51 |HQ | PEA.L (A1) 00020e9e 4e b9 00 01 04 fc |N | JSR IPC_PutVar(src : Pointer; length : Long ; type : Long) 00020ea4 de fc 00 0a | | ADDA.W #0xa,A7 00020ea8 2e ae 00 0c |. | MOVE.L (A6+0xc),(A7) 00020eac 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020eb0 48 57 |HW | PEA.L (A7) 00020eb2 48 51 |HQ | PEA.L (A1) 00020eb4 48 78 00 07 |Hx | PEA.L 0x7 00020eb8 4e b9 00 01 04 fc |N | JSR IPC_PutVar(src : Pointer; length : Long ; type : Long) 00020ebe de fc 00 14 | | ADDA.W #0x14,A7 00020ec2 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 00020ec8 42 27 |B' | CLR.B -(A7) 00020eca 48 78 00 01 |Hx | PEA.L 0x1 00020ece 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020ed4 5c 4f |\O | ADDQ.L #0x6,A7 00020ed6 4c df 03 00 |L | MOVEM.L (A7)+,A0+A1 00020eda 4e 5e |N^ | UNLK A6 00020edc 4e 75 |Nu | RTS 00020ede ; -------------------------------------------------------------------------------------- 00020ede ; OMSI PASCAL Function 00020ede ; <LVAR 0x024 4(r)> 00020ede ; <LVAR 0x022 1(r)> 00020ede ; <LVAR 0x020 1(r)> 00020ede ; <LVAR 0x01c 4(r)> 00020ede ; <LVAR 0x018 4(r)> 00020ede ; <LVAR 0x014 4(r)> 00020ede ; <LVAR 0x010 4(r)> 00020ede ; <LVAR 0x00c 4(r)> 00020ede ; <LVAR 0x008 4(r)> 00020ede ; -------------------------------------------------------------------------------------- 00020ede 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 00020ee2 bf d5 | | CMPA.L (A5),A7 00020ee4 62 06 |b | BHI 0x20eec 00020ee6 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020eea 4e 76 |Nv | TRAPV 00020eec de fc 00 30 | 0 | ADDA.W #0x30,A7 00020ef0 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7) 00020ef4 43 f8 00 00 |C | LEA.L 0x0,A1 00020ef8 70 0c |p | MOVEQ.L #0x0c,D0 00020efa 72 01 |r | MOVEQ.L #0x01,D1 00020efc 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020f02 1f 2e 00 22 | . " | MOVE.B (A6+0x22),-(A7) 00020f06 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00020f0c 1e ae 00 20 | | MOVE.B (A6+0x20),(A7) 00020f10 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00020f16 54 4f |TO | ADDQ.L #0x2,A7 00020f18 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 00020f1e 2f 3a f2 00 |/: | MOVE.L 0x20120,-(A7) 00020f22 2f 3a f1 f8 |/: | MOVE.L 0x2011c,-(A7) 00020f26 2f 3a f1 f0 |/: | MOVE.L 0x20118,-(A7) 00020f2a 51 4f |QO | SUBQ.L #0x8,A7 00020f2c 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020f30 3f 01 |? | MOVE.W D1,-(A7) 00020f32 3f 00 |? | MOVE.W D0,-(A7) 00020f34 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020f3a 2e ae 00 24 |. $ | MOVE.L (A6+0x24),(A7) 00020f3e 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00020f44 58 4f |XO | ADDQ.L #0x4,A7 00020f46 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020f4c 50 4f |PO | ADDQ.L #0x8,A7 00020f4e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00020f54 de fc 00 10 | | ADDA.W #0x10,A7 00020f58 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020f5c 2f 2e 00 24 |/. $ | MOVE.L (A6+0x24),-(A7) 00020f60 48 78 00 01 |Hx | PEA.L 0x1 00020f64 1f 01 | | MOVE.B D1,-(A7) 00020f66 48 50 |HP | PEA.L (A0) 00020f68 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00020f6e de fc 00 0e | | ADDA.W #0xe,A7 00020f72 4a 10 |J | TST.B (A0) 00020f74 66 5c |f\ | BNE 0x20fd2 00020f76 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020f7c 20 6e 00 1c | n | MOVEA.L (A6+0x1c),A0 00020f80 48 50 |HP | PEA.L (A0) 00020f82 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020f88 58 4f |XO | ADDQ.L #0x4,A7 00020f8a 20 6e 00 18 | n | MOVEA.L (A6+0x18),A0 00020f8e 48 50 |HP | PEA.L (A0) 00020f90 4e b9 00 01 05 2c |N , | JSR IPC_GetString(VAR retval : String) 00020f96 58 4f |XO | ADDQ.L #0x4,A7 00020f98 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00020f9c 48 50 |HP | PEA.L (A0) 00020f9e 4e b9 00 01 05 2c |N , | JSR IPC_GetString(VAR retval : String) 00020fa4 58 4f |XO | ADDQ.L #0x4,A7 00020fa6 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00020faa 48 50 |HP | PEA.L (A0) 00020fac 48 51 |HQ | PEA.L (A1) 00020fae 48 51 |HQ | PEA.L (A1) 00020fb0 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 00020fb6 de c0 | | ADDA.W D0,A7 00020fb8 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00020fbc 48 50 |HP | PEA.L (A0) 00020fbe 48 51 |HQ | PEA.L (A1) 00020fc0 48 78 00 07 |Hx | PEA.L 0x7 00020fc4 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 00020fca de c0 | | ADDA.W D0,A7 00020fcc 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 00020fd2 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1 00020fd6 4e 5e |N^ | UNLK A6 00020fd8 4e 75 |Nu | RTS 00020fda ; -------------------------------------------------------------------------------------- 00020fda ; OMSI PASCAL Function 00020fda ; <LVAR 0x028 1(r)> 00020fda ; <LVAR 0x024 4(r)> 00020fda ; <LVAR 0x022 1(r)> 00020fda ; <LVAR 0x020 1(r)> 00020fda ; <LVAR 0x01c 4(r)> 00020fda ; <LVAR 0x018 4(r)> 00020fda ; <LVAR 0x014 4(r)> 00020fda ; <LVAR 0x010 4(r)> 00020fda ; <LVAR 0x00c 4(r)> 00020fda ; <LVAR 0x008 4(r)> 00020fda ; -------------------------------------------------------------------------------------- 00020fda 4e 56 ff ce |NV | LINK.W A6,#0xffce 00020fde bf d5 | | CMPA.L (A5),A7 00020fe0 62 06 |b | BHI 0x20fe8 00020fe2 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020fe6 4e 76 |Nv | TRAPV 00020fe8 de fc 00 30 | 0 | ADDA.W #0x30,A7 00020fec 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7) 00020ff0 43 f8 00 00 |C | LEA.L 0x0,A1 00020ff4 70 0c |p | MOVEQ.L #0x0c,D0 00020ff6 72 01 |r | MOVEQ.L #0x01,D1 00020ff8 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020ffe 1f 2e 00 28 | . ( | MOVE.B (A6+0x28),-(A7) 00021002 48 57 |HW | PEA.L (A7) 00021004 48 51 |HQ | PEA.L (A1) 00021006 48 51 |HQ | PEA.L (A1) 00021008 4e b9 00 01 04 fc |N | JSR IPC_PutVar(src : Pointer; length : Long ; type : Long) 0002100e de c0 | | ADDA.W D0,A7 00021010 1e ae 00 22 | " | MOVE.B (A6+0x22),(A7) 00021014 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 0002101a 1e ae 00 20 | | MOVE.B (A6+0x20),(A7) 0002101e 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00021024 54 4f |TO | ADDQ.L #0x2,A7 00021026 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 0002102c 2f 3a f0 f2 |/: | MOVE.L 0x20120,-(A7) 00021030 2f 3a f0 ea |/: | MOVE.L 0x2011c,-(A7) 00021034 2f 3a f0 e2 |/: | MOVE.L 0x20118,-(A7) 00021038 51 4f |QO | SUBQ.L #0x8,A7 0002103a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002103e 3f 01 |? | MOVE.W D1,-(A7) 00021040 3f 00 |? | MOVE.W D0,-(A7) 00021042 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021048 2e ae 00 24 |. $ | MOVE.L (A6+0x24),(A7) 0002104c 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00021052 58 4f |XO | ADDQ.L #0x4,A7 00021054 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002105a 50 4f |PO | ADDQ.L #0x8,A7 0002105c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021062 de fc 00 10 | | ADDA.W #0x10,A7 00021066 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002106a 2f 2e 00 24 |/. $ | MOVE.L (A6+0x24),-(A7) 0002106e 48 78 00 01 |Hx | PEA.L 0x1 00021072 1f 01 | | MOVE.B D1,-(A7) 00021074 48 50 |HP | PEA.L (A0) 00021076 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 0002107c de fc 00 0e | | ADDA.W #0xe,A7 00021080 4a 10 |J | TST.B (A0) 00021082 66 5c |f\ | BNE 0x210e0 00021084 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 0002108a 20 6e 00 1c | n | MOVEA.L (A6+0x1c),A0 0002108e 48 50 |HP | PEA.L (A0) 00021090 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00021096 58 4f |XO | ADDQ.L #0x4,A7 00021098 20 6e 00 18 | n | MOVEA.L (A6+0x18),A0 0002109c 48 50 |HP | PEA.L (A0) 0002109e 4e b9 00 01 05 2c |N , | JSR IPC_GetString(VAR retval : String) 000210a4 58 4f |XO | ADDQ.L #0x4,A7 000210a6 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 000210aa 48 50 |HP | PEA.L (A0) 000210ac 4e b9 00 01 05 2c |N , | JSR IPC_GetString(VAR retval : String) 000210b2 58 4f |XO | ADDQ.L #0x4,A7 000210b4 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 000210b8 48 50 |HP | PEA.L (A0) 000210ba 48 51 |HQ | PEA.L (A1) 000210bc 48 51 |HQ | PEA.L (A1) 000210be 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 000210c4 de c0 | | ADDA.W D0,A7 000210c6 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000210ca 48 50 |HP | PEA.L (A0) 000210cc 48 51 |HQ | PEA.L (A1) 000210ce 48 78 00 07 |Hx | PEA.L 0x7 000210d2 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 000210d8 de c0 | | ADDA.W D0,A7 000210da 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 000210e0 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1 000210e4 4e 5e |N^ | UNLK A6 000210e6 4e 75 |Nu | RTS 000210e8 ; -------------------------------------------------------------------------------------- 000210e8 ; OMSI PASCAL Function 000210e8 ; <LVAR 0x02c 1(r)> 000210e8 ; <LVAR 0x028 4(r)> 000210e8 ; <LVAR 0x026 1(r)> 000210e8 ; <LVAR 0x024 1(r)> 000210e8 ; <LVAR 0x022 1(r)> 000210e8 ; <LVAR 0x020 1(r)> 000210e8 ; <LVAR 0x01c 4(r)> 000210e8 ; <LVAR 0x018 4(r)> 000210e8 ; <LVAR 0x014 4(r)> 000210e8 ; <LVAR 0x010 4(r)> 000210e8 ; <LVAR 0x00c 4(r)> 000210e8 ; <LVAR 0x008 4(r)> 000210e8 ; -------------------------------------------------------------------------------------- 000210e8 4e 56 ff ca |NV | LINK.W A6,#0xffca 000210ec bf d5 | | CMPA.L (A5),A7 000210ee 62 06 |b | BHI 0x210f6 000210f0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000210f4 4e 76 |Nv | TRAPV 000210f6 de fc 00 34 | 4 | ADDA.W #0x34,A7 000210fa 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000210fe 43 f8 00 00 |C | LEA.L 0x0,A1 00021102 45 f9 00 01 05 02 |E | LEA.L IPC_PutBool(a : Bool),A2 00021108 70 0c |p | MOVEQ.L #0x0c,D0 0002110a 72 01 |r | MOVEQ.L #0x01,D1 0002110c 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00021112 1f 2e 00 2c | . , | MOVE.B (A6+0x2c),-(A7) 00021116 48 57 |HW | PEA.L (A7) 00021118 48 51 |HQ | PEA.L (A1) 0002111a 48 51 |HQ | PEA.L (A1) 0002111c 4e b9 00 01 04 fc |N | JSR IPC_PutVar(src : Pointer; length : Long ; type : Long) 00021122 de c0 | | ADDA.W D0,A7 00021124 1e ae 00 26 | & | MOVE.B (A6+0x26),(A7) 00021128 4e 92 |N | JSR (A2) 0002112a 1e ae 00 24 | $ | MOVE.B (A6+0x24),(A7) 0002112e 4e 92 |N | JSR (A2) 00021130 1e ae 00 22 | " | MOVE.B (A6+0x22),(A7) 00021134 4e 92 |N | JSR (A2) 00021136 1e ae 00 20 | | MOVE.B (A6+0x20),(A7) 0002113a 4e 92 |N | JSR (A2) 0002113c 54 4f |TO | ADDQ.L #0x2,A7 0002113e 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 00021144 2f 3a ef da |/: | MOVE.L 0x20120,-(A7) 00021148 2f 3a ef d2 |/: | MOVE.L 0x2011c,-(A7) 0002114c 2f 3a ef ca |/: | MOVE.L 0x20118,-(A7) 00021150 51 4f |QO | SUBQ.L #0x8,A7 00021152 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021156 3f 01 |? | MOVE.W D1,-(A7) 00021158 3f 00 |? | MOVE.W D0,-(A7) 0002115a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021160 2e ae 00 28 |. ( | MOVE.L (A6+0x28),(A7) 00021164 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 0002116a 58 4f |XO | ADDQ.L #0x4,A7 0002116c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021172 50 4f |PO | ADDQ.L #0x8,A7 00021174 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002117a de fc 00 10 | | ADDA.W #0x10,A7 0002117e 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021182 2f 2e 00 28 |/. ( | MOVE.L (A6+0x28),-(A7) 00021186 48 78 00 01 |Hx | PEA.L 0x1 0002118a 1f 01 | | MOVE.B D1,-(A7) 0002118c 48 50 |HP | PEA.L (A0) 0002118e 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00021194 de fc 00 0e | | ADDA.W #0xe,A7 00021198 4a 10 |J | TST.B (A0) 0002119a 66 5c |f\ | BNE 0x211f8 0002119c 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000211a2 20 6e 00 1c | n | MOVEA.L (A6+0x1c),A0 000211a6 48 50 |HP | PEA.L (A0) 000211a8 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 000211ae 58 4f |XO | ADDQ.L #0x4,A7 000211b0 20 6e 00 18 | n | MOVEA.L (A6+0x18),A0 000211b4 48 50 |HP | PEA.L (A0) 000211b6 4e b9 00 01 05 2c |N , | JSR IPC_GetString(VAR retval : String) 000211bc 58 4f |XO | ADDQ.L #0x4,A7 000211be 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 000211c2 48 50 |HP | PEA.L (A0) 000211c4 4e b9 00 01 05 2c |N , | JSR IPC_GetString(VAR retval : String) 000211ca 58 4f |XO | ADDQ.L #0x4,A7 000211cc 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 000211d0 48 50 |HP | PEA.L (A0) 000211d2 48 51 |HQ | PEA.L (A1) 000211d4 48 51 |HQ | PEA.L (A1) 000211d6 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 000211dc de c0 | | ADDA.W D0,A7 000211de 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000211e2 48 50 |HP | PEA.L (A0) 000211e4 48 51 |HQ | PEA.L (A1) 000211e6 48 78 00 07 |Hx | PEA.L 0x7 000211ea 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 000211f0 de c0 | | ADDA.W D0,A7 000211f2 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 000211f8 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 000211fc 4e 5e |N^ | UNLK A6 000211fe 4e 75 |Nu | RTS 00021200 ; -------------------------------------------------------------------------------------- 00021200 ; OMSI PASCAL Function 00021200 ; <LVAR -0x004 @> 00021200 ; -------------------------------------------------------------------------------------- 00021200 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 00021204 bf d5 | | CMPA.L (A5),A7 00021206 62 06 |b | BHI 0x2120e 00021208 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002120c 4e 76 |Nv | TRAPV 0002120e de fc 00 2c | , | ADDA.W #0x2c,A7 00021212 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7) 00021216 72 01 |r | MOVEQ.L #0x01,D1 00021218 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 0002121e 1f 01 | | MOVE.B D1,-(A7) 00021220 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00021226 54 4f |TO | ADDQ.L #0x2,A7 00021228 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 0002122e 9e fc 00 0a | | SUBA.W #0xa,A7 00021232 20 4f | O | MOVEA.L A7,A0 00021234 43 fa ee f4 |C | LEA.L 0x2012a,A1 00021238 70 08 |p | MOVEQ.L #0x08,D0 0002123a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002123c 51 c8 ff fc |Q | DBF D0,0x2123a 00021240 59 4f |YO | SUBQ.L #0x4,A7 00021242 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021246 3f 01 |? | MOVE.W D1,-(A7) 00021248 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 0002124c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021252 50 4f |PO | ADDQ.L #0x8,A7 00021254 48 78 00 01 |Hx | PEA.L 0x1 00021258 1f 01 | | MOVE.B D1,-(A7) 0002125a 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002125e 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00021264 de fc 00 18 | | ADDA.W #0x18,A7 00021268 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1 0002126c 4e 5e |N^ | UNLK A6 0002126e 4e 75 |Nu | RTS 00021270 ; -------------------------------------------------------------------------------------- 00021270 ; OMSI PASCAL Function 00021270 ; <LVAR 0x014 1(w)> 00021270 ; <LVAR 0x010 4(r)> 00021270 ; <LVAR 0x00c 4(r)> 00021270 ; <LVAR 0x008 @ 4(r)> 00021270 ; <LVAR -0x006 @ 4(r)> 00021270 ; <LVAR -0x008 @ 1(r)> 00021270 ; -------------------------------------------------------------------------------------- 00021270 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00021274 bf d5 | | CMPA.L (A5),A7 00021276 62 06 |b | BHI 0x2127e 00021278 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002127c 4e 76 |Nv | TRAPV 0002127e de fc 00 20 | | ADDA.W #0x20,A7 00021282 48 e7 00 c0 |H | MOVEM.L A1+A0,-(A7) 00021286 43 ee ff fa |C | LEA.L (A6-0x6),A1 0002128a 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 0002128e 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00021292 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00021296 48 51 |HQ | PEA.L (A1) 00021298 48 6e ff f8 |Hn | PEA.L (A6-0x8) 0002129c 4e b9 00 02 60 e4 |N ` | JSR 0x260e4 000212a2 de fc 00 14 | | ADDA.W #0x14,A7 000212a6 48 6e 00 08 |Hn | PEA.L (A6+0x8) 000212aa 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000212b0 58 4f |XO | ADDQ.L #0x4,A7 000212b2 20 51 | Q | MOVEA.L (A1),A0 000212b4 b0 fc 00 01 | | CMPA.W #0x1,A0 000212b8 67 0a |g | BEQ 0x212c4 000212ba 48 51 |HQ | PEA.L (A1) 000212bc 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000212c2 58 4f |XO | ADDQ.L #0x4,A7 000212c4 1d 6e ff f8 00 14 | n | MOVE.B (A6-0x8),(A6+0x14) 000212ca 4c df 03 00 |L | MOVEM.L (A7)+,A0+A1 000212ce 4e 5e |N^ | UNLK A6 000212d0 4e 75 |Nu | RTS 000212d2 ; -------------------------------------------------------------------------------------- 000212d2 ; OMSI PASCAL Function 000212d2 ; <LVAR -0x004 @> 000212d2 ; -------------------------------------------------------------------------------------- 000212d2 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 000212d6 bf d5 | | CMPA.L (A5),A7 000212d8 62 06 |b | BHI 0x212e0 000212da 44 fc 00 02 |D | MOVE.W #0x2,CCR 000212de 4e 76 |Nv | TRAPV 000212e0 de fc 00 2c | , | ADDA.W #0x2c,A7 000212e4 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7) 000212e8 72 01 |r | MOVEQ.L #0x01,D1 000212ea 4e b9 00 01 05 b6 |N | JSR R1000_Reset_L(void) 000212f0 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000212f6 1f 01 | | MOVE.B D1,-(A7) 000212f8 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 000212fe 54 4f |TO | ADDQ.L #0x2,A7 00021300 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 00021306 9e fc 00 0a | | SUBA.W #0xa,A7 0002130a 20 4f | O | MOVEA.L A7,A0 0002130c 43 fa ee 26 |C & | LEA.L 0x20134,A1 00021310 70 08 |p | MOVEQ.L #0x08,D0 00021312 10 d9 | | MOVE.B (A1)+,(A0)+ 00021314 51 c8 ff fc |Q | DBF D0,0x21312 00021318 59 4f |YO | SUBQ.L #0x4,A7 0002131a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002131e 3f 01 |? | MOVE.W D1,-(A7) 00021320 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00021324 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002132a 50 4f |PO | ADDQ.L #0x8,A7 0002132c 48 78 00 01 |Hx | PEA.L 0x1 00021330 1f 01 | | MOVE.B D1,-(A7) 00021332 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021336 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 0002133c de fc 00 18 | | ADDA.W #0x18,A7 00021340 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1 00021344 4e 5e |N^ | UNLK A6 00021346 4e 75 |Nu | RTS 00021348 ; -------------------------------------------------------------------------------------- 00021348 ; OMSI PASCAL Function 00021348 ; -------------------------------------------------------------------------------------- 00021348 4e 56 ff 88 |NV | LINK.W A6,#0xff88 0002134c bf d5 | | CMPA.L (A5),A7 0002134e 62 06 |b | BHI 0x21356 00021350 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021354 4e 76 |Nv | TRAPV 00021356 de fc 00 68 | h | ADDA.W #0x68,A7 0002135a 48 e7 f7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D3+D2+D1+D0,-(A7) 0002135e 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021364 47 f9 00 02 69 5c |G i\ | LEA.L 0x2695c,A3 0002136a 72 01 |r | MOVEQ.L #0x01,D1 0002136c 74 07 |t | MOVEQ.L #0x07,D2 0002136e 76 0c |v | MOVEQ.L #0x0c,D3 00021370 4a 39 00 02 69 56 |J9 iV | TST.B 0x26956 00021376 66 00 01 68 |f h | BNE 0x214e0 0002137a 51 4f |QO | SUBQ.L #0x8,A7 0002137c 20 4f | O | MOVEA.L A7,A0 0002137e 43 fa ed be |C | LEA.L 0x2013e,A1 00021382 70 06 |p | MOVEQ.L #0x06,D0 00021384 10 d9 | | MOVE.B (A1)+,(A0)+ 00021386 51 c8 ff fc |Q | DBF D0,0x21384 0002138a 59 4f |YO | SUBQ.L #0x4,A7 0002138c 2f 39 00 02 69 58 |/9 iX | MOVE.L 0x26958,-(A7) 00021392 59 4f |YO | SUBQ.L #0x4,A7 00021394 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021398 3f 01 |? | MOVE.W D1,-(A7) 0002139a 3f 02 |? | MOVE.W D2,-(A7) 0002139c 4e 92 |N | JSR (A2) 0002139e 50 4f |PO | ADDQ.L #0x8,A7 000213a0 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000213a6 50 4f |PO | ADDQ.L #0x8,A7 000213a8 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000213ae de c3 | | ADDA.W D3,A7 000213b0 41 fa ed b8 |A | LEA.L 0x2016a,A0 000213b4 70 08 |p | MOVEQ.L #0x08,D0 000213b6 2f 20 |/ | MOVE.L -(A0),-(A7) 000213b8 51 c8 ff fc |Q | DBF D0,0x213b6 000213bc 51 4f |QO | SUBQ.L #0x8,A7 000213be 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000213c2 3f 01 |? | MOVE.W D1,-(A7) 000213c4 3f 3c 00 24 |?< $ | MOVE.W #0x24,-(A7) 000213c8 4e 92 |N | JSR (A2) 000213ca 2e 93 |. | MOVE.L (A3),(A7) 000213cc 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 000213d2 58 4f |XO | ADDQ.L #0x4,A7 000213d4 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000213da 50 4f |PO | ADDQ.L #0x8,A7 000213dc 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000213e2 de fc 00 28 | ( | ADDA.W #0x28,A7 000213e6 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000213ec 2f 3a ed 80 |/: | MOVE.L 0x2016e,-(A7) 000213f0 2f 3a ed 78 |/: x | MOVE.L 0x2016a,-(A7) 000213f4 59 4f |YO | SUBQ.L #0x4,A7 000213f6 2f 13 |/ | MOVE.L (A3),-(A7) 000213f8 59 4f |YO | SUBQ.L #0x4,A7 000213fa 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000213fe 3f 01 |? | MOVE.W D1,-(A7) 00021400 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00021404 4e 92 |N | JSR (A2) 00021406 50 4f |PO | ADDQ.L #0x8,A7 00021408 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002140e 50 4f |PO | ADDQ.L #0x8,A7 00021410 28 5f |(_ | MOVEA.L (A7)+,A4 00021412 58 4f |XO | ADDQ.L #0x4,A7 00021414 2e 8c |. | MOVE.L A4,(A7) 00021416 2f 39 00 02 69 60 |/9 i` | MOVE.L 0x26960,-(A7) 0002141c 42 80 |B | CLR.L D0 0002141e 10 39 00 02 69 64 | 9 id | MOVE.B 0x26964,D0 00021424 2f 00 |/ | MOVE.L D0,-(A7) 00021426 4e b9 00 01 04 4c |N L | JSR WriteErrorMessage(file : String; txt : String; number : Long) : Bool 0002142c de c3 | | ADDA.W D3,A7 0002142e 48 79 00 02 69 60 |Hy i` | PEA.L 0x26960 00021434 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002143a 58 4f |XO | ADDQ.L #0x4,A7 0002143c 41 fa ed 4e |A N | LEA.L 0x2018c,A0 00021440 70 0c |p | MOVEQ.L #0x0c,D0 00021442 3f 20 |? | MOVE.W -(A0),-(A7) 00021444 51 c8 ff fc |Q | DBF D0,0x21442 00021448 59 4f |YO | SUBQ.L #0x4,A7 0002144a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002144e 3f 01 |? | MOVE.W D1,-(A7) 00021450 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 00021454 4e 92 |N | JSR (A2) 00021456 50 4f |PO | ADDQ.L #0x8,A7 00021458 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002145e de fc 00 1e | | ADDA.W #0x1e,A7 00021462 7e 00 |~ | MOVEQ.L #0x00,D7 00021464 be 82 | | CMP.L D2,D7 00021466 63 02 |c | BLS 0x2146a 00021468 4e 4f |NO | TRAP #15 0002146a 41 f9 00 02 69 4e |A iN | LEA.L 0x2694e,A0 00021470 42 80 |B | CLR.L D0 00021472 10 30 78 17 | 0x | MOVE.B (A0+D7.L+#0x17),D0 00021476 2a 00 |* | MOVE.L D0,D5 00021478 1f 05 | | MOVE.B D5,-(A7) 0002147a 10 1f | | MOVE.B (A7)+,D0 0002147c 48 80 |H | EXTB.W D0 0002147e 41 bc 00 4f |A O | CHK.W #0x4f,D0 00021482 1c 00 | | MOVE.B D0,D6 00021484 67 26 |g& | BEQ 0x214ac 00021486 2f 3a ed 0c |/: | MOVE.L 0x20194,-(A7) 0002148a 2f 3a ed 04 |/: | MOVE.L 0x20190,-(A7) 0002148e 2f 3a ec fc |/: | MOVE.L 0x2018c,-(A7) 00021492 59 4f |YO | SUBQ.L #0x4,A7 00021494 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021498 3f 01 |? | MOVE.W D1,-(A7) 0002149a 3f 03 |? | MOVE.W D3,-(A7) 0002149c 4e 92 |N | JSR (A2) 0002149e 58 4f |XO | ADDQ.L #0x4,A7 000214a0 2e 85 |. | MOVE.L D5,(A7) 000214a2 4e b9 00 01 04 50 |N P | JSR FS_10450(&, &) 000214a8 de fc 00 14 | | ADDA.W #0x14,A7 000214ac 52 87 |R | ADDQ.L #0x1,D7 000214ae be 82 | | CMP.L D2,D7 000214b0 6f b2 |o | BLE 0x21464 000214b2 9e fc 00 12 | | SUBA.W #0x12,A7 000214b6 20 4f | O | MOVEA.L A7,A0 000214b8 43 fa ec de |C | LEA.L 0x20198,A1 000214bc 70 10 |p | MOVEQ.L #0x10,D0 000214be 10 d9 | | MOVE.B (A1)+,(A0)+ 000214c0 51 c8 ff fc |Q | DBF D0,0x214be 000214c4 59 4f |YO | SUBQ.L #0x4,A7 000214c6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000214ca 3f 01 |? | MOVE.W D1,-(A7) 000214cc 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 000214d0 4e 92 |N | JSR (A2) 000214d2 50 4f |PO | ADDQ.L #0x8,A7 000214d4 4e b9 00 02 2e 28 |N .( | JSR 0x22e28 000214da de fc 00 16 | | ADDA.W #0x16,A7 000214de 60 26 |`& | BRA 0x21506 000214e0 48 79 00 02 69 60 |Hy i` | PEA.L 0x26960 000214e6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000214ec 58 4f |XO | ADDQ.L #0x4,A7 000214ee 48 53 |HS | PEA.L (A3) 000214f0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000214f6 58 4f |XO | ADDQ.L #0x4,A7 000214f8 48 79 00 02 69 58 |Hy iX | PEA.L 0x26958 000214fe 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021504 58 4f |XO | ADDQ.L #0x4,A7 00021506 4c df 1f ef |L | MOVEM.L (A7)+,D0+D1+D2+D3+D5+D6+D7+A0+A1+A2+A3+A4 0002150a 4e 5e |N^ | UNLK A6 0002150c 4e 75 |Nu | RTS 0002150e ; -------------------------------------------------------------------------------------- 0002150e ; OMSI PASCAL Function 0002150e ; <LVAR -0x004 @ 1(r)> 0002150e ; -------------------------------------------------------------------------------------- 0002150e CMD_INIT_STATE(?): 0002150e 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 00021512 bf d5 | | CMPA.L (A5),A7 00021514 62 06 |b | BHI 0x2151c 00021516 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002151a 4e 76 |Nv | TRAPV 0002151c de fc 00 2c | , | ADDA.W #0x2c,A7 00021520 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7) 00021524 72 01 |r | MOVEQ.L #0x01,D1 00021526 4e ba fd aa |N | JSR 0x212d2 0002152a 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00021530 10 39 00 02 69 6e | 9 in | MOVE.B 0x2696e,D0 00021536 48 80 |H | EXTB.W D0 00021538 41 81 |A | CHK.W D1,D0 0002153a 1f 00 | | MOVE.B D0,-(A7) 0002153c 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00021542 54 4f |TO | ADDQ.L #0x2,A7 00021544 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 0002154a 9e fc 00 0a | | SUBA.W #0xa,A7 0002154e 20 4f | O | MOVEA.L A7,A0 00021550 43 fa ec 58 |C X | LEA.L 0x201aa,A1 00021554 70 08 |p | MOVEQ.L #0x08,D0 00021556 10 d9 | | MOVE.B (A1)+,(A0)+ 00021558 51 c8 ff fc |Q | DBF D0,0x21556 0002155c 59 4f |YO | SUBQ.L #0x4,A7 0002155e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021562 3f 01 |? | MOVE.W D1,-(A7) 00021564 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00021568 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002156e 50 4f |PO | ADDQ.L #0x8,A7 00021570 48 78 00 01 |Hx | PEA.L 0x1 00021574 1f 01 | | MOVE.B D1,-(A7) 00021576 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002157a 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00021580 de fc 00 18 | | ADDA.W #0x18,A7 00021584 4a 2e ff fc |J. | TST.B (A6-0x4) 00021588 67 0c |g | BEQ 0x21596 0002158a 48 78 00 01 |Hx | PEA.L 0x1 0002158e 4e b9 00 02 2e 28 |N .( | JSR 0x22e28 00021594 58 4f |XO | ADDQ.L #0x4,A7 00021596 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1 0002159a 4e 5e |N^ | UNLK A6 0002159c 4e 75 |Nu | RTS 0002159e ; -------------------------------------------------------------------------------------- 0002159e ; OMSI PASCAL Function 0002159e ; <LVAR 0x008 1(r)> 0002159e ; <LVAR -0x001 @ 1(r)> 0002159e ; <LVAR -0x002 1(rw)> 0002159e ; -------------------------------------------------------------------------------------- 0002159e 4e 56 ff cc |NV | LINK.W A6,#0xffcc 000215a2 bf d5 | | CMPA.L (A5),A7 000215a4 62 06 |b | BHI 0x215ac 000215a6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000215aa 4e 76 |Nv | TRAPV 000215ac de fc 00 32 | 2 | ADDA.W #0x32,A7 000215b0 48 e7 c0 00 |H | MOVEM.L D1+D0,-(A7) 000215b4 72 01 |r | MOVEQ.L #0x01,D1 000215b6 1d 6e 00 08 ff fe | n | MOVE.B (A6+0x8),(A6-0x2) 000215bc 48 78 00 01 |Hx | PEA.L 0x1 000215c0 1f 2e ff fe | . | MOVE.B (A6-0x2),-(A7) 000215c4 10 39 00 02 69 6d | 9 im | MOVE.B 0x2696d,D0 000215ca 48 80 |H | EXTB.W D0 000215cc 41 81 |A | CHK.W D1,D0 000215ce 1f 00 | | MOVE.B D0,-(A7) 000215d0 10 39 00 02 69 6e | 9 in | MOVE.B 0x2696e,D0 000215d6 48 80 |H | EXTB.W D0 000215d8 41 81 |A | CHK.W D1,D0 000215da 1f 00 | | MOVE.B D0,-(A7) 000215dc 48 79 00 02 69 56 |Hy iV | PEA.L 0x26956 000215e2 48 79 00 02 69 58 |Hy iX | PEA.L 0x26958 000215e8 48 79 00 02 69 5c |Hy i\ | PEA.L 0x2695c 000215ee 48 79 00 02 69 60 |Hy i` | PEA.L 0x26960 000215f4 48 79 00 02 69 64 |Hy id | PEA.L 0x26964 000215fa 48 79 00 02 69 65 |Hy ie | PEA.L 0x26965 00021600 48 6e ff ff |Hn | PEA.L (A6-0x1) 00021604 4e ba f6 c0 |N | JSR 0x20cc6 00021608 de fc 00 26 | & | ADDA.W #0x26,A7 0002160c 4a 2e ff ff |J. | TST.B (A6-0x1) 00021610 67 0c |g | BEQ 0x2161e 00021612 48 78 00 01 |Hx | PEA.L 0x1 00021616 4e b9 00 02 2e 28 |N .( | JSR 0x22e28 0002161c 58 4f |XO | ADDQ.L #0x4,A7 0002161e 4e ba fd 28 |N ( | JSR 0x21348 00021622 4c df 00 03 |L | MOVEM.L (A7)+,D0+D1 00021626 4e 5e |N^ | UNLK A6 00021628 4e 75 |Nu | RTS 0002162a ; -------------------------------------------------------------------------------------- 0002162a ; OMSI PASCAL Function 0002162a ; <LVAR 0x008 1(r)> 0002162a ; <LVAR -0x001 @ 1(r)> 0002162a ; <LVAR -0x002 1(rw)> 0002162a ; -------------------------------------------------------------------------------------- 0002162a 4e 56 ff cc |NV | LINK.W A6,#0xffcc 0002162e bf d5 | | CMPA.L (A5),A7 00021630 62 06 |b | BHI 0x21638 00021632 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021636 4e 76 |Nv | TRAPV 00021638 de fc 00 32 | 2 | ADDA.W #0x32,A7 0002163c 48 e7 c0 00 |H | MOVEM.L D1+D0,-(A7) 00021640 72 01 |r | MOVEQ.L #0x01,D1 00021642 4e ba fe ca |N | JSR CMD_INIT_STATE(?) 00021646 1d 6e 00 08 ff fe | n | MOVE.B (A6+0x8),(A6-0x2) 0002164c 48 78 00 02 |Hx | PEA.L 0x2 00021650 1f 2e ff fe | . | MOVE.B (A6-0x2),-(A7) 00021654 10 39 00 02 69 6d | 9 im | MOVE.B 0x2696d,D0 0002165a 48 80 |H | EXTB.W D0 0002165c 41 81 |A | CHK.W D1,D0 0002165e 1f 00 | | MOVE.B D0,-(A7) 00021660 10 39 00 02 69 6e | 9 in | MOVE.B 0x2696e,D0 00021666 48 80 |H | EXTB.W D0 00021668 41 81 |A | CHK.W D1,D0 0002166a 1f 00 | | MOVE.B D0,-(A7) 0002166c 48 79 00 02 69 56 |Hy iV | PEA.L 0x26956 00021672 48 79 00 02 69 58 |Hy iX | PEA.L 0x26958 00021678 48 79 00 02 69 5c |Hy i\ | PEA.L 0x2695c 0002167e 48 79 00 02 69 60 |Hy i` | PEA.L 0x26960 00021684 48 79 00 02 69 64 |Hy id | PEA.L 0x26964 0002168a 48 79 00 02 69 65 |Hy ie | PEA.L 0x26965 00021690 48 6e ff ff |Hn | PEA.L (A6-0x1) 00021694 4e ba f6 30 |N 0 | JSR 0x20cc6 00021698 de fc 00 26 | & | ADDA.W #0x26,A7 0002169c 4a 2e ff ff |J. | TST.B (A6-0x1) 000216a0 67 0c |g | BEQ 0x216ae 000216a2 48 78 00 01 |Hx | PEA.L 0x1 000216a6 4e b9 00 02 2e 28 |N .( | JSR 0x22e28 000216ac 58 4f |XO | ADDQ.L #0x4,A7 000216ae 4e ba fc 98 |N | JSR 0x21348 000216b2 4c df 00 03 |L | MOVEM.L (A7)+,D0+D1 000216b6 4e 5e |N^ | UNLK A6 000216b8 4e 75 |Nu | RTS 000216ba ; -------------------------------------------------------------------------------------- 000216ba ; OMSI PASCAL Function 000216ba ; <LVAR 0x008 1(r)> 000216ba ; <LVAR -0x001 @ 1(r)> 000216ba ; <LVAR -0x002 1(rw)> 000216ba ; -------------------------------------------------------------------------------------- 000216ba 4e 56 ff cc |NV | LINK.W A6,#0xffcc 000216be bf d5 | | CMPA.L (A5),A7 000216c0 62 06 |b | BHI 0x216c8 000216c2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000216c6 4e 76 |Nv | TRAPV 000216c8 de fc 00 32 | 2 | ADDA.W #0x32,A7 000216cc 48 e7 c0 00 |H | MOVEM.L D1+D0,-(A7) 000216d0 72 01 |r | MOVEQ.L #0x01,D1 000216d2 1d 6e 00 08 ff fe | n | MOVE.B (A6+0x8),(A6-0x2) 000216d8 48 78 00 03 |Hx | PEA.L 0x3 000216dc 1f 2e ff fe | . | MOVE.B (A6-0x2),-(A7) 000216e0 10 39 00 02 69 6d | 9 im | MOVE.B 0x2696d,D0 000216e6 48 80 |H | EXTB.W D0 000216e8 41 81 |A | CHK.W D1,D0 000216ea 1f 00 | | MOVE.B D0,-(A7) 000216ec 10 39 00 02 69 6e | 9 in | MOVE.B 0x2696e,D0 000216f2 48 80 |H | EXTB.W D0 000216f4 41 81 |A | CHK.W D1,D0 000216f6 1f 00 | | MOVE.B D0,-(A7) 000216f8 48 79 00 02 69 56 |Hy iV | PEA.L 0x26956 000216fe 48 79 00 02 69 58 |Hy iX | PEA.L 0x26958 00021704 48 79 00 02 69 5c |Hy i\ | PEA.L 0x2695c 0002170a 48 79 00 02 69 60 |Hy i` | PEA.L 0x26960 00021710 48 79 00 02 69 64 |Hy id | PEA.L 0x26964 00021716 48 79 00 02 69 65 |Hy ie | PEA.L 0x26965 0002171c 48 6e ff ff |Hn | PEA.L (A6-0x1) 00021720 4e ba f5 a4 |N | JSR 0x20cc6 00021724 de fc 00 26 | & | ADDA.W #0x26,A7 00021728 4a 2e ff ff |J. | TST.B (A6-0x1) 0002172c 67 0c |g | BEQ 0x2173a 0002172e 48 78 00 01 |Hx | PEA.L 0x1 00021732 4e b9 00 02 2e 28 |N .( | JSR 0x22e28 00021738 58 4f |XO | ADDQ.L #0x4,A7 0002173a 4e ba fc 0c |N | JSR 0x21348 0002173e 4c df 00 03 |L | MOVEM.L (A7)+,D0+D1 00021742 4e 5e |N^ | UNLK A6 00021744 4e 75 |Nu | RTS 00021746 ; -------------------------------------------------------------------------------------- 00021746 ; OMSI PASCAL Function 00021746 ; <LVAR 0x008 4(r)> 00021746 ; <LVAR -0x008 4(rw)> 00021746 ; <LVAR -0x00e @ 4(rw)> 00021746 ; <LVAR -0x014 @ 4(rw)> 00021746 ; -------------------------------------------------------------------------------------- 00021746 CMD_TEST(?): 00021746 4e 56 ff 94 |NV | LINK.W A6,#0xff94 0002174a bf d5 | | CMPA.L (A5),A7 0002174c 62 06 |b | BHI 0x21754 0002174e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021752 4e 76 |Nv | TRAPV 00021754 de fc 00 58 | X | ADDA.W #0x58,A7 00021758 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002175c 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021762 47 ee ff f8 |G | LEA.L (A6-0x8),A3 00021766 49 ee 00 08 |I | LEA.L (A6+0x8),A4 0002176a 74 01 |t | MOVEQ.L #0x01,D2 0002176c 76 0a |v | MOVEQ.L #0x0a,D3 0002176e 78 02 |x | MOVEQ.L #0x02,D4 00021770 26 bc 00 00 00 03 |& | MOVE.L #0x3,(A3) 00021776 3f 3a ea b4 |?: | MOVE.W 0x2022c,-(A7) 0002177a 55 4f |UO | SUBQ.L #0x2,A7 0002177c 2f 14 |/ | MOVE.L (A4),-(A7) 0002177e 48 78 00 00 |Hx | PEA.L 0x0 00021782 59 4f |YO | SUBQ.L #0x4,A7 00021784 48 6f 00 0e |Ho | PEA.L (A7+0xe) 00021788 3f 02 |? | MOVE.W D2,-(A7) 0002178a 3f 04 |? | MOVE.W D4,-(A7) 0002178c 4e 92 |N | JSR (A2) 0002178e 50 4f |PO | ADDQ.L #0x8,A7 00021790 4e ba fa de |N | JSR 0x21270 00021794 de fc 00 0c | | ADDA.W #0xc,A7 00021798 4a 1f |J | TST.B (A7)+ 0002179a 67 02 |g | BEQ 0x2179e 0002179c 26 82 |& | MOVE.L D2,(A3) 0002179e 3e ba ea 8e |> | MOVE.W 0x2022e,(A7) 000217a2 55 4f |UO | SUBQ.L #0x2,A7 000217a4 2f 14 |/ | MOVE.L (A4),-(A7) 000217a6 48 78 00 00 |Hx | PEA.L 0x0 000217aa 59 4f |YO | SUBQ.L #0x4,A7 000217ac 48 6f 00 0e |Ho | PEA.L (A7+0xe) 000217b0 3f 02 |? | MOVE.W D2,-(A7) 000217b2 3f 04 |? | MOVE.W D4,-(A7) 000217b4 4e 92 |N | JSR (A2) 000217b6 50 4f |PO | ADDQ.L #0x8,A7 000217b8 4e ba fa b6 |N | JSR 0x21270 000217bc de fc 00 0c | | ADDA.W #0xc,A7 000217c0 4a 1f |J | TST.B (A7)+ 000217c2 67 02 |g | BEQ 0x217c6 000217c4 26 84 |& | MOVE.L D4,(A3) 000217c6 54 4f |TO | ADDQ.L #0x2,A7 000217c8 41 fa ea 70 |A p | LEA.L 0x2023a,A0 000217cc 70 04 |p | MOVEQ.L #0x04,D0 000217ce 3f 20 |? | MOVE.W -(A0),-(A7) 000217d0 51 c8 ff fc |Q | DBF D0,0x217ce 000217d4 2f 14 |/ | MOVE.L (A4),-(A7) 000217d6 48 78 00 01 |Hx | PEA.L 0x1 000217da 4e b9 00 02 32 72 |N 2r | JSR 0x23272 000217e0 de c3 | | ADDA.W D3,A7 000217e2 2e 94 |. | MOVE.L (A4),(A7) 000217e4 48 78 00 01 |Hx | PEA.L 0x1 000217e8 4e b9 00 02 3b 66 |N ;f | JSR 0x23b66 000217ee 50 4f |PO | ADDQ.L #0x8,A7 000217f0 2d 5f ff ec |-_ | MOVE.L (A7)+,(A6-0x14) 000217f4 7e 00 |~ | MOVEQ.L #0x00,D7 000217f6 1a 07 | | MOVE.B D7,D5 000217f8 be 04 | | CMP.B D4,D7 000217fa 66 2a |f* | BNE 0x21826 000217fc 59 4f |YO | SUBQ.L #0x4,A7 000217fe 1e ba ea 3a | : | MOVE.B 0x2023a,(A7) 00021802 1f 7a ea 37 00 01 | z 7 | MOVE.B 0x2023b,(A7+0x1) 00021808 1f 7a ea 32 00 02 | z 2 | MOVE.B 0x2023c,(A7+0x2) 0002180e 59 4f |YO | SUBQ.L #0x4,A7 00021810 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021814 3f 02 |? | MOVE.W D2,-(A7) 00021816 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 0002181a 4e 92 |N | JSR (A2) 0002181c 50 4f |PO | ADDQ.L #0x8,A7 0002181e 2d 5f ff f2 |-_ | MOVE.L (A7)+,(A6-0xe) 00021822 58 4f |XO | ADDQ.L #0x4,A7 00021824 60 2e |`. | BRA 0x21854 00021826 10 07 | | MOVE.B D7,D0 00021828 48 80 |H | EXTB.W D0 0002182a c1 c3 | | MULS.W D3,D0 0002182c 41 fa f1 2e |A . | LEA.L 0x2095c,A0 00021830 9e c3 | | SUBA.W D3,A7 00021832 22 4f |"O | MOVEA.L A7,A1 00021834 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00021838 70 09 |p | MOVEQ.L #0x09,D0 0002183a 12 d8 | | MOVE.B (A0)+,(A1)+ 0002183c 51 c8 ff fc |Q | DBF D0,0x2183a 00021840 59 4f |YO | SUBQ.L #0x4,A7 00021842 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021846 3f 02 |? | MOVE.W D2,-(A7) 00021848 3f 03 |? | MOVE.W D3,-(A7) 0002184a 4e 92 |N | JSR (A2) 0002184c 50 4f |PO | ADDQ.L #0x8,A7 0002184e 2d 5f ff f2 |-_ | MOVE.L (A7)+,(A6-0xe) 00021852 de c3 | | ADDA.W D3,A7 00021854 55 4f |UO | SUBQ.L #0x2,A7 00021856 2f 2e ff ec |/. | MOVE.L (A6-0x14),-(A7) 0002185a 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 0002185e 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00021864 50 4f |PO | ADDQ.L #0x8,A7 00021866 10 1f | | MOVE.B (A7)+,D0 00021868 48 80 |H | EXTB.W D0 0002186a 41 82 |A | CHK.W D2,D0 0002186c 1c 00 | | MOVE.B D0,D6 0002186e 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00021872 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021878 58 4f |XO | ADDQ.L #0x4,A7 0002187a 4a 06 |J | TST.B D6 0002187c 67 02 |g | BEQ 0x21880 0002187e 60 0a |` | BRA 0x2188a 00021880 52 07 |R | ADDQ.B #0x1,D7 00021882 0c 07 00 0b | | CMPI.B #0x0b,D7 00021886 6f 00 ff 6e |o n | BLE 0x217f6 0002188a 4a 06 |J | TST.B D6 0002188c 66 38 |f8 | BNE 0x218c6 0002188e 2f 3a e9 ba |/: | MOVE.L 0x2024a,-(A7) 00021892 2f 3a e9 b2 |/: | MOVE.L 0x20246,-(A7) 00021896 2f 3a e9 aa |/: | MOVE.L 0x20242,-(A7) 0002189a 2f 3a e9 a2 |/: | MOVE.L 0x2023e,-(A7) 0002189e 51 4f |QO | SUBQ.L #0x8,A7 000218a0 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000218a4 3f 02 |? | MOVE.W D2,-(A7) 000218a6 3f 3c 00 10 |?< | MOVE.W #0x10,-(A7) 000218aa 4e 92 |N | JSR (A2) 000218ac 58 4f |XO | ADDQ.L #0x4,A7 000218ae 2e ae ff ec |. | MOVE.L (A6-0x14),(A7) 000218b2 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000218b8 50 4f |PO | ADDQ.L #0x8,A7 000218ba 4e b9 00 02 2e 28 |N .( | JSR 0x22e28 000218c0 de fc 00 14 | | ADDA.W #0x14,A7 000218c4 60 3a |`: | BRA 0x21900 000218c6 48 6e ff ec |Hn | PEA.L (A6-0x14) 000218ca 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000218d0 58 4f |XO | ADDQ.L #0x4,A7 000218d2 10 05 | | MOVE.B D5,D0 000218d4 48 80 |H | EXTB.W D0 000218d6 41 bc 00 0b |A | CHK.W #0xb,D0 000218da 1f 00 | | MOVE.B D0,-(A7) 000218dc 4e ba fc c0 |N | JSR 0x2159e 000218e0 54 4f |TO | ADDQ.L #0x2,A7 000218e2 22 13 |" | MOVE.L (A3),D1 000218e4 b2 82 | | CMP.L D2,D1 000218e6 6f 08 |o | BLE 0x218f0 000218e8 1f 00 | | MOVE.B D0,-(A7) 000218ea 4e ba fd 3e |N > | JSR 0x2162a 000218ee 54 4f |TO | ADDQ.L #0x2,A7 000218f0 0c 81 00 00 00 03 | | CMPI.L #0x00000003,D1 000218f6 66 08 |f | BNE 0x21900 000218f8 1f 00 | | MOVE.B D0,-(A7) 000218fa 4e ba fd be |N | JSR 0x216ba 000218fe 54 4f |TO | ADDQ.L #0x2,A7 00021900 3f 3a e9 50 |?: P | MOVE.W 0x20252,-(A7) 00021904 3f 3a e9 4a |?: J | MOVE.W 0x20250,-(A7) 00021908 3f 3a e9 44 |?: D | MOVE.W 0x2024e,-(A7) 0002190c 59 4f |YO | SUBQ.L #0x4,A7 0002190e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021912 3f 02 |? | MOVE.W D2,-(A7) 00021914 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00021918 4e 92 |N | JSR (A2) 0002191a 50 4f |PO | ADDQ.L #0x8,A7 0002191c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021922 de c3 | | ADDA.W D3,A7 00021924 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00021928 4e 5e |N^ | UNLK A6 0002192a 4e 75 |Nu | RTS 0002192c ; -------------------------------------------------------------------------------------- 0002192c ; OMSI PASCAL Function 0002192c ; <LVAR 0x00c 1(w)> 0002192c ; <LVAR 0x008 4(r)> 0002192c ; <LVAR -0x006 @ 4(rw)> 0002192c ; -------------------------------------------------------------------------------------- 0002192c 4e 56 ff ba |NV | LINK.W A6,#0xffba 00021930 bf d5 | | CMPA.L (A5),A7 00021932 62 06 |b | BHI 0x2193a 00021934 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021938 4e 76 |Nv | TRAPV 0002193a de fc 00 3e | > | ADDA.W #0x3e,A7 0002193e 48 e7 e3 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D2+D1+D0,-(A7) 00021942 45 ee ff fa |E | LEA.L (A6-0x6),A2 00021946 72 01 |r | MOVEQ.L #0x01,D1 00021948 74 0a |t | MOVEQ.L #0x0a,D2 0002194a 1d 41 00 0c | A | MOVE.B D1,(A6+0xc) 0002194e 7e 00 |~ | MOVEQ.L #0x00,D7 00021950 0c 07 00 04 | | CMPI.B #0x04,D7 00021954 66 2c |f, | BNE 0x21982 00021956 59 4f |YO | SUBQ.L #0x4,A7 00021958 1e ba e9 9a | | MOVE.B 0x202f4,(A7) 0002195c 1f 7a e9 97 00 01 | z | MOVE.B 0x202f5,(A7+0x1) 00021962 1f 7a e9 92 00 02 | z | MOVE.B 0x202f6,(A7+0x2) 00021968 59 4f |YO | SUBQ.L #0x4,A7 0002196a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002196e 3f 01 |? | MOVE.W D1,-(A7) 00021970 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00021974 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002197a 50 4f |PO | ADDQ.L #0x8,A7 0002197c 24 9f |$ | MOVE.L (A7)+,(A2) 0002197e 58 4f |XO | ADDQ.L #0x4,A7 00021980 60 30 |`0 | BRA 0x219b2 00021982 10 07 | | MOVE.B D7,D0 00021984 48 80 |H | EXTB.W D0 00021986 c1 c2 | | MULS.W D2,D0 00021988 41 fa f0 4a |A J | LEA.L 0x209d4,A0 0002198c 9e c2 | | SUBA.W D2,A7 0002198e 22 4f |"O | MOVEA.L A7,A1 00021990 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00021994 70 09 |p | MOVEQ.L #0x09,D0 00021996 12 d8 | | MOVE.B (A0)+,(A1)+ 00021998 51 c8 ff fc |Q | DBF D0,0x21996 0002199c 59 4f |YO | SUBQ.L #0x4,A7 0002199e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000219a2 3f 01 |? | MOVE.W D1,-(A7) 000219a4 3f 02 |? | MOVE.W D2,-(A7) 000219a6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000219ac 50 4f |PO | ADDQ.L #0x8,A7 000219ae 24 9f |$ | MOVE.L (A7)+,(A2) 000219b0 de c2 | | ADDA.W D2,A7 000219b2 55 4f |UO | SUBQ.L #0x2,A7 000219b4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000219b8 2f 12 |/ | MOVE.L (A2),-(A7) 000219ba 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000219c0 50 4f |PO | ADDQ.L #0x8,A7 000219c2 10 1f | | MOVE.B (A7)+,D0 000219c4 48 80 |H | EXTB.W D0 000219c6 41 81 |A | CHK.W D1,D0 000219c8 1c 00 | | MOVE.B D0,D6 000219ca 48 52 |HR | PEA.L (A2) 000219cc 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000219d2 58 4f |XO | ADDQ.L #0x4,A7 000219d4 4a 06 |J | TST.B D6 000219d6 67 06 |g | BEQ 0x219de 000219d8 1d 47 00 0c | G | MOVE.B D7,(A6+0xc) 000219dc 60 0a |` | BRA 0x219e8 000219de 52 07 |R | ADDQ.B #0x1,D7 000219e0 0c 07 00 0f | | CMPI.B #0x0f,D7 000219e4 6f 00 ff 6a |o j | BLE 0x21950 000219e8 4c df 07 c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0+A1+A2 000219ec 4e 5e |N^ | UNLK A6 000219ee 4e 75 |Nu | RTS 000219f0 ; -------------------------------------------------------------------------------------- 000219f0 ; OMSI PASCAL Function 000219f0 ; <LVAR 0x010 4(r)> 000219f0 ; <LVAR 0x00c 4(r)> 000219f0 ; <LVAR 0x008 4(r)> 000219f0 ; <LVAR -0x004 @ 4(rw)> 000219f0 ; -------------------------------------------------------------------------------------- 000219f0 4e 56 ff ba |NV | LINK.W A6,#0xffba 000219f4 bf d5 | | CMPA.L (A5),A7 000219f6 62 06 |b | BHI 0x219fe 000219f8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000219fc 4e 76 |Nv | TRAPV 000219fe de fc 00 3e | > | ADDA.W #0x3e,A7 00021a02 48 e7 f9 e0 |H | MOVEM.L A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 00021a06 45 ee ff fc |E | LEA.L (A6-0x4),A2 00021a0a 72 01 |r | MOVEQ.L #0x01,D1 00021a0c 74 0a |t | MOVEQ.L #0x0a,D2 00021a0e 7e 00 |~ | MOVEQ.L #0x00,D7 00021a10 0c 87 00 00 00 02 | | CMPI.L #0x00000002,D7 00021a16 66 2c |f, | BNE 0x21a44 00021a18 59 4f |YO | SUBQ.L #0x4,A7 00021a1a 1e ba ea 1c | | MOVE.B 0x20438,(A7) 00021a1e 1f 7a ea 19 00 01 | z | MOVE.B 0x20439,(A7+0x1) 00021a24 1f 7a ea 14 00 02 | z | MOVE.B 0x2043a,(A7+0x2) 00021a2a 59 4f |YO | SUBQ.L #0x4,A7 00021a2c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021a30 3f 01 |? | MOVE.W D1,-(A7) 00021a32 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00021a36 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021a3c 50 4f |PO | ADDQ.L #0x8,A7 00021a3e 24 9f |$ | MOVE.L (A7)+,(A2) 00021a40 58 4f |XO | ADDQ.L #0x4,A7 00021a42 60 50 |`P | BRA 0x21a94 00021a44 0c 87 00 00 00 16 | | CMPI.L #0x00000016,D7 00021a4a 66 0a |f | BNE 0x21a56 00021a4c 48 52 |HR | PEA.L (A2) 00021a4e 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00021a54 60 ea |` | BRA 0x21a40 00021a56 0c 87 00 00 00 1f | | CMPI.L #0x0000001f,D7 00021a5c 63 02 |c | BLS 0x21a60 00021a5e 4e 4f |NO | TRAP #15 00021a60 28 07 |( | MOVE.L D7,D4 00021a62 76 0a |v | MOVEQ.L #0x0a,D3 00021a64 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00021a6a 41 fa f0 08 |A | LEA.L TXTTBL__ALL_COND_SYS_VAL...,A0 00021a6e 9e c2 | | SUBA.W D2,A7 00021a70 22 4f |"O | MOVEA.L A7,A1 00021a72 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0 00021a76 70 09 |p | MOVEQ.L #0x09,D0 00021a78 12 d8 | | MOVE.B (A0)+,(A1)+ 00021a7a 51 c8 ff fc |Q | DBF D0,0x21a78 00021a7e 59 4f |YO | SUBQ.L #0x4,A7 00021a80 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021a84 3f 01 |? | MOVE.W D1,-(A7) 00021a86 3f 02 |? | MOVE.W D2,-(A7) 00021a88 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021a8e 50 4f |PO | ADDQ.L #0x8,A7 00021a90 24 9f |$ | MOVE.L (A7)+,(A2) 00021a92 de c2 | | ADDA.W D2,A7 00021a94 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021a98 55 4f |UO | SUBQ.L #0x2,A7 00021a9a 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 00021a9e 2f 12 |/ | MOVE.L (A2),-(A7) 00021aa0 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00021aa6 50 4f |PO | ADDQ.L #0x8,A7 00021aa8 10 1f | | MOVE.B (A7)+,D0 00021aaa 48 80 |H | EXTB.W D0 00021aac 41 81 |A | CHK.W D1,D0 00021aae 10 80 | | MOVE.B D0,(A0) 00021ab0 48 52 |HR | PEA.L (A2) 00021ab2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021ab8 58 4f |XO | ADDQ.L #0x4,A7 00021aba 52 87 |R | ADDQ.L #0x1,D7 00021abc 4a 00 |J | TST.B D0 00021abe 66 0a |f | BNE 0x21aca 00021ac0 0c 87 00 00 00 20 | | CMPI.L #0x00000020,D7 00021ac6 66 00 ff 48 |f H | BNE 0x21a10 00021aca 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00021ace 0c 87 00 00 00 ff | | CMPI.L #0x000000ff,D7 00021ad4 63 02 |c | BLS 0x21ad8 00021ad6 4e 4f |NO | TRAP #15 00021ad8 10 87 | | MOVE.B D7,(A0) 00021ada 4c df 07 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2 00021ade 4e 5e |N^ | UNLK A6 00021ae0 4e 75 |Nu | RTS 00021ae2 ; -------------------------------------------------------------------------------------- 00021ae2 ; OMSI PASCAL Function 00021ae2 ; <LVAR 0x008 4(r)> 00021ae2 ; <LVAR -0x004 @ 1(r)> 00021ae2 ; <LVAR -0x008 @ 4(rw)> 00021ae2 ; <LVAR -0x00e @ 4(rw)> 00021ae2 ; <LVAR -0x012 @ 4(rw)> 00021ae2 ; <LVAR -0x016 @ 4(rw)> 00021ae2 ; <LVAR -0x017 @ 1(rw)> 00021ae2 ; <LVAR -0x018 @ 1(r)> 00021ae2 ; -------------------------------------------------------------------------------------- 00021ae2 CMD_RUN(?): 00021ae2 4e 56 ff 7a |NV z | LINK.W A6,#0xff7a 00021ae6 bf d5 | | CMPA.L (A5),A7 00021ae8 62 06 |b | BHI 0x21af0 00021aea 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021aee 4e 76 |Nv | TRAPV 00021af0 de fc 00 6e | n | ADDA.W #0x6e,A7 00021af4 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021af8 45 f9 00 02 69 58 |E iX | LEA.L 0x26958,A2 00021afe 47 ee 00 08 |G | LEA.L (A6+0x8),A3 00021b02 49 f9 00 01 02 c4 |I | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A4 00021b08 74 01 |t | MOVEQ.L #0x01,D2 00021b0a 76 07 |v | MOVEQ.L #0x07,D3 00021b0c 78 0c |x | MOVEQ.L #0x0c,D4 00021b0e 59 4f |YO | SUBQ.L #0x4,A7 00021b10 2f 13 |/ | MOVE.L (A3),-(A7) 00021b12 4e b9 00 02 32 3c |N 2< | JSR 0x2323c 00021b18 58 4f |XO | ADDQ.L #0x4,A7 00021b1a 20 1f | | MOVE.L (A7)+,D0 00021b1c 0c 80 00 00 00 02 | | CMPI.L #0x00000002,D0 00021b22 66 00 02 c0 |f | BNE 0x21de4 00021b26 59 4f |YO | SUBQ.L #0x4,A7 00021b28 2f 13 |/ | MOVE.L (A3),-(A7) 00021b2a 48 78 00 02 |Hx | PEA.L 0x2 00021b2e 4e b9 00 02 3b 66 |N ;f | JSR 0x23b66 00021b34 50 4f |PO | ADDQ.L #0x8,A7 00021b36 24 97 |$ | MOVE.L (A7),(A2) 00021b38 59 4f |YO | SUBQ.L #0x4,A7 00021b3a 20 4f | O | MOVEA.L A7,A0 00021b3c 43 fa e9 22 |C " | LEA.L 0x20460,A1 00021b40 70 06 |p | MOVEQ.L #0x06,D0 00021b42 10 d9 | | MOVE.B (A1)+,(A0)+ 00021b44 51 c8 ff fc |Q | DBF D0,0x21b42 00021b48 59 4f |YO | SUBQ.L #0x4,A7 00021b4a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021b4e 3f 02 |? | MOVE.W D2,-(A7) 00021b50 3f 03 |? | MOVE.W D3,-(A7) 00021b52 4e 94 |N | JSR (A4) 00021b54 50 4f |PO | ADDQ.L #0x8,A7 00021b56 2d 5f ff ee |-_ | MOVE.L (A7)+,(A6-0x12) 00021b5a 20 4f | O | MOVEA.L A7,A0 00021b5c 43 fa e9 0a |C | LEA.L 0x20468,A1 00021b60 70 06 |p | MOVEQ.L #0x06,D0 00021b62 10 d9 | | MOVE.B (A1)+,(A0)+ 00021b64 51 c8 ff fc |Q | DBF D0,0x21b62 00021b68 59 4f |YO | SUBQ.L #0x4,A7 00021b6a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021b6e 3f 02 |? | MOVE.W D2,-(A7) 00021b70 3f 03 |? | MOVE.W D3,-(A7) 00021b72 4e 94 |N | JSR (A4) 00021b74 50 4f |PO | ADDQ.L #0x8,A7 00021b76 2d 5f ff f2 |-_ | MOVE.L (A7)+,(A6-0xe) 00021b7a 54 4f |TO | ADDQ.L #0x2,A7 00021b7c 2e ae ff ee |. | MOVE.L (A6-0x12),(A7) 00021b80 2f 12 |/ | MOVE.L (A2),-(A7) 00021b82 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00021b88 54 4f |TO | ADDQ.L #0x2,A7 00021b8a 2e ae ff f2 |. | MOVE.L (A6-0xe),(A7) 00021b8e 2f 12 |/ | MOVE.L (A2),-(A7) 00021b90 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00021b96 50 4f |PO | ADDQ.L #0x8,A7 00021b98 10 2f 00 02 | / | MOVE.B (A7+0x2),D0 00021b9c 80 1f | | OR.B (A7)+,D0 00021b9e 54 4f |TO | ADDQ.L #0x2,A7 00021ba0 48 80 |H | EXTB.W D0 00021ba2 41 82 |A | CHK.W D2,D0 00021ba4 1e 00 | | MOVE.B D0,D7 00021ba6 48 6e ff ee |Hn | PEA.L (A6-0x12) 00021baa 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021bb0 58 4f |XO | ADDQ.L #0x4,A7 00021bb2 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00021bb6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021bbc 58 4f |XO | ADDQ.L #0x4,A7 00021bbe 4a 07 |J | TST.B D7 00021bc0 67 00 01 1a |g | BEQ 0x21cdc 00021bc4 59 4f |YO | SUBQ.L #0x4,A7 00021bc6 2f 13 |/ | MOVE.L (A3),-(A7) 00021bc8 48 78 00 01 |Hx | PEA.L 0x1 00021bcc 4e b9 00 02 3b 66 |N ;f | JSR 0x23b66 00021bd2 50 4f |PO | ADDQ.L #0x8,A7 00021bd4 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 00021bd8 2f 2e ff f8 |/. | MOVE.L (A6-0x8),-(A7) 00021bdc 48 6e ff e9 |Hn | PEA.L (A6-0x17) 00021be0 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021be4 4e ba fe 0a |N | JSR 0x219f0 00021be8 de c4 | | ADDA.W D4,A7 00021bea 4a 2e ff fc |J. | TST.B (A6-0x4) 00021bee 66 38 |f8 | BNE 0x21c28 00021bf0 9e fc 00 10 | | SUBA.W #0x10,A7 00021bf4 20 4f | O | MOVEA.L A7,A0 00021bf6 43 fa e8 78 |C x | LEA.L 0x20470,A1 00021bfa 70 0e |p | MOVEQ.L #0x0e,D0 00021bfc 10 d9 | | MOVE.B (A1)+,(A0)+ 00021bfe 51 c8 ff fc |Q | DBF D0,0x21bfc 00021c02 51 4f |QO | SUBQ.L #0x8,A7 00021c04 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021c08 3f 02 |? | MOVE.W D2,-(A7) 00021c0a 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00021c0e 4e 94 |N | JSR (A4) 00021c10 58 4f |XO | ADDQ.L #0x4,A7 00021c12 2e ae ff f8 |. | MOVE.L (A6-0x8),(A7) 00021c16 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021c1c 50 4f |PO | ADDQ.L #0x8,A7 00021c1e 4e b9 00 02 2e 28 |N .( | JSR 0x22e28 00021c24 de fc 00 14 | | ADDA.W #0x14,A7 00021c28 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00021c2c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021c32 54 4f |TO | ADDQ.L #0x2,A7 00021c34 2f 39 00 02 69 72 |/9 ir | MOVE.L 0x26972,-(A7) 00021c3a 2f 12 |/ | MOVE.L (A2),-(A7) 00021c3c 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00021c42 50 4f |PO | ADDQ.L #0x8,A7 00021c44 10 1f | | MOVE.B (A7)+,D0 00021c46 48 80 |H | EXTB.W D0 00021c48 41 82 |A | CHK.W D2,D0 00021c4a 13 c0 00 02 69 70 | ip | MOVE.B D0,0x26970 00021c50 44 00 |D | NEG.B D0 00021c52 52 00 |R | ADDQ.B #0x1,D0 00021c54 80 39 00 02 69 6f | 9 io | OR.B 0x2696f,D0 00021c5a 48 80 |H | EXTB.W D0 00021c5c 41 82 |A | CHK.W D2,D0 00021c5e 1c 00 | | MOVE.B D0,D6 00021c60 48 79 00 02 69 72 |Hy ir | PEA.L 0x26972 00021c66 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021c6c 2f 12 |/ | MOVE.L (A2),-(A7) 00021c6e 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00021c74 58 4f |XO | ADDQ.L #0x4,A7 00021c76 23 df 00 02 69 72 |# ir | MOVE.L (A7)+,0x26972 00021c7c 10 06 | | MOVE.B D6,D0 00021c7e 48 80 |H | EXTB.W D0 00021c80 41 82 |A | CHK.W D2,D0 00021c82 1f 2e ff e9 | . | MOVE.B (A6-0x17),-(A7) 00021c86 59 4f |YO | SUBQ.L #0x4,A7 00021c88 2f 12 |/ | MOVE.L (A2),-(A7) 00021c8a 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00021c90 58 4f |XO | ADDQ.L #0x4,A7 00021c92 12 39 00 02 69 6d | 9 im | MOVE.B 0x2696d,D1 00021c98 48 81 |H | EXTB.W D1 00021c9a 43 82 |C | CHK.W D2,D1 00021c9c 1f 01 | | MOVE.B D1,-(A7) 00021c9e 12 39 00 02 69 6e | 9 in | MOVE.B 0x2696e,D1 00021ca4 48 81 |H | EXTB.W D1 00021ca6 43 82 |C | CHK.W D2,D1 00021ca8 1f 01 | | MOVE.B D1,-(A7) 00021caa 1f 00 | | MOVE.B D0,-(A7) 00021cac 1f 00 | | MOVE.B D0,-(A7) 00021cae 48 79 00 02 69 56 |Hy iV | PEA.L 0x26956 00021cb4 48 79 00 02 69 5c |Hy i\ | PEA.L 0x2695c 00021cba 48 79 00 02 69 60 |Hy i` | PEA.L 0x26960 00021cc0 48 79 00 02 69 64 |Hy id | PEA.L 0x26964 00021cc6 48 79 00 02 69 65 |Hy ie | PEA.L 0x26965 00021ccc 48 6e ff e8 |Hn | PEA.L (A6-0x18) 00021cd0 4e ba f4 16 |N | JSR 0x210e8 00021cd4 de fc 00 26 | & | ADDA.W #0x26,A7 00021cd8 60 00 01 08 |` | BRA 0x21de2 00021cdc 59 4f |YO | SUBQ.L #0x4,A7 00021cde 2f 13 |/ | MOVE.L (A3),-(A7) 00021ce0 48 78 00 01 |Hx | PEA.L 0x1 00021ce4 4e b9 00 02 3b 66 |N ;f | JSR 0x23b66 00021cea 50 4f |PO | ADDQ.L #0x8,A7 00021cec 2d 57 ff ea |-W | MOVE.L (A7),(A6-0x16) 00021cf0 54 4f |TO | ADDQ.L #0x2,A7 00021cf2 2f 2e ff ea |/. | MOVE.L (A6-0x16),-(A7) 00021cf6 4e ba fc 34 |N 4 | JSR 0x2192c 00021cfa 58 4f |XO | ADDQ.L #0x4,A7 00021cfc 10 1f | | MOVE.B (A7)+,D0 00021cfe 48 80 |H | EXTB.W D0 00021d00 41 bc 00 0f |A | CHK.W #0xf,D0 00021d04 1a 00 | | MOVE.B D0,D5 00021d06 10 05 | | MOVE.B D5,D0 00021d08 48 80 |H | EXTB.W D0 00021d0a 32 00 |2 | MOVE.W D0,D1 00021d0c 55 41 |UA | SUBQ.W #0x2,D1 00021d0e 0c 41 00 0d | A | CMPI.W #0x000d,D1 00021d12 62 38 |b8 | BHI switch@0x21d16[0x7] 00021d14 d2 41 | A | ADD.W D1,D1 00021d16 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W 00021d1e 00 1c | | .CONST 0x1c ; [0x0] -> 0x21d3a 00021d20 00 1c | | .CONST 0x1c ; [0x1] -> 0x21d3a 00021d22 00 1c | | .CONST 0x1c ; [0x2] -> 0x21d3a 00021d24 00 1c | | .CONST 0x1c ; [0x3] -> 0x21d3a 00021d26 00 1c | | .CONST 0x1c ; [0x4] -> 0x21d3a 00021d28 00 1c | | .CONST 0x1c ; [0x5] -> 0x21d3a 00021d2a 00 1c | | .CONST 0x1c ; [0x6] -> 0x21d3a 00021d2c 00 2e | . | .CONST 0x2e ; [0x7] -> 0x21d4c 00021d2e 00 2e | . | .CONST 0x2e ; [0x8] -> 0x21d4c 00021d30 00 2e | . | .CONST 0x2e ; [0x9] -> 0x21d4c 00021d32 00 1c | | .CONST 0x1c ; [0xa] -> 0x21d3a 00021d34 00 1c | | .CONST 0x1c ; [0xb] -> 0x21d3a 00021d36 00 1c | | .CONST 0x1c ; [0xc] -> 0x21d3a 00021d38 00 1c | | .CONST 0x1c ; [0xd] -> 0x21d3a 00021d3a switch@0x21d16[0x0]: 00021d3a switch@0x21d16[0x1]: 00021d3a switch@0x21d16[0x2]: 00021d3a switch@0x21d16[0x3]: 00021d3a switch@0x21d16[0x4]: 00021d3a switch@0x21d16[0x5]: 00021d3a switch@0x21d16[0x6]: 00021d3a switch@0x21d16[0xa]: 00021d3a switch@0x21d16[0xb]: 00021d3a switch@0x21d16[0xc]: 00021d3a switch@0x21d16[0xd]: 00021d3a 48 c0 |H | EXTW.L D0 00021d3c 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 00021d42 63 02 |c | BLS 0x21d46 00021d44 4e 4f |NO | TRAP #15 00021d46 1d 40 ff e9 | @ | MOVE.B D0,(A6-0x17) 00021d4a 60 38 |`8 | BRA 0x21d84 00021d4c switch@0x21d16[0x7]: 00021d4c switch@0x21d16[0x8]: 00021d4c switch@0x21d16[0x9]: 00021d4c 9e fc 00 24 | $ | SUBA.W #0x24,A7 00021d50 20 4f | O | MOVEA.L A7,A0 00021d52 43 fa e6 e8 |C | LEA.L 0x2043c,A1 00021d56 70 22 |p" | MOVEQ.L #0x22,D0 00021d58 10 d9 | | MOVE.B (A1)+,(A0)+ 00021d5a 51 c8 ff fc |Q | DBF D0,0x21d58 00021d5e 51 4f |QO | SUBQ.L #0x8,A7 00021d60 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021d64 3f 02 |? | MOVE.W D2,-(A7) 00021d66 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 00021d6a 4e 94 |N | JSR (A4) 00021d6c 58 4f |XO | ADDQ.L #0x4,A7 00021d6e 2e ae ff ea |. | MOVE.L (A6-0x16),(A7) 00021d72 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021d78 50 4f |PO | ADDQ.L #0x8,A7 00021d7a 4e b9 00 02 2e 28 |N .( | JSR 0x22e28 00021d80 de fc 00 28 | ( | ADDA.W #0x28,A7 00021d84 48 6e ff ea |Hn | PEA.L (A6-0x16) 00021d88 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021d8e 54 4f |TO | ADDQ.L #0x2,A7 00021d90 1e ae ff e9 | | MOVE.B (A6-0x17),(A7) 00021d94 59 4f |YO | SUBQ.L #0x4,A7 00021d96 2f 12 |/ | MOVE.L (A2),-(A7) 00021d98 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00021d9e 58 4f |XO | ADDQ.L #0x4,A7 00021da0 10 39 00 02 69 6d | 9 im | MOVE.B 0x2696d,D0 00021da6 48 80 |H | EXTB.W D0 00021da8 41 82 |A | CHK.W D2,D0 00021daa 1f 00 | | MOVE.B D0,-(A7) 00021dac 10 39 00 02 69 6e | 9 in | MOVE.B 0x2696e,D0 00021db2 48 80 |H | EXTB.W D0 00021db4 41 82 |A | CHK.W D2,D0 00021db6 1f 00 | | MOVE.B D0,-(A7) 00021db8 48 79 00 02 69 56 |Hy iV | PEA.L 0x26956 00021dbe 48 79 00 02 69 5c |Hy i\ | PEA.L 0x2695c 00021dc4 48 79 00 02 69 60 |Hy i` | PEA.L 0x26960 00021dca 48 79 00 02 69 64 |Hy id | PEA.L 0x26964 00021dd0 48 79 00 02 69 65 |Hy ie | PEA.L 0x26965 00021dd6 48 6e ff e8 |Hn | PEA.L (A6-0x18) 00021dda 4e ba f1 fe |N | JSR 0x20fda 00021dde de fc 00 22 | " | ADDA.W #0x22,A7 00021de2 60 78 |`x | BRA 0x21e5c 00021de4 41 fa e6 a4 |A | LEA.L 0x2048a,A0 00021de8 70 04 |p | MOVEQ.L #0x04,D0 00021dea 3f 20 |? | MOVE.W -(A0),-(A7) 00021dec 51 c8 ff fc |Q | DBF D0,0x21dea 00021df0 2f 13 |/ | MOVE.L (A3),-(A7) 00021df2 48 78 00 01 |Hx | PEA.L 0x1 00021df6 4e b9 00 02 32 72 |N 2r | JSR 0x23272 00021dfc de fc 00 0a | | ADDA.W #0xa,A7 00021e00 2e 93 |. | MOVE.L (A3),(A7) 00021e02 48 78 00 01 |Hx | PEA.L 0x1 00021e06 4e b9 00 02 3b 66 |N ;f | JSR 0x23b66 00021e0c 50 4f |PO | ADDQ.L #0x8,A7 00021e0e 24 97 |$ | MOVE.L (A7),(A2) 00021e10 2f 12 |/ | MOVE.L (A2),-(A7) 00021e12 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00021e18 58 4f |XO | ADDQ.L #0x4,A7 00021e1a 10 39 00 02 69 6d | 9 im | MOVE.B 0x2696d,D0 00021e20 48 80 |H | EXTB.W D0 00021e22 41 82 |A | CHK.W D2,D0 00021e24 1f 00 | | MOVE.B D0,-(A7) 00021e26 10 39 00 02 69 6e | 9 in | MOVE.B 0x2696e,D0 00021e2c 48 80 |H | EXTB.W D0 00021e2e 41 82 |A | CHK.W D2,D0 00021e30 1f 00 | | MOVE.B D0,-(A7) 00021e32 48 79 00 02 69 56 |Hy iV | PEA.L 0x26956 00021e38 48 79 00 02 69 5c |Hy i\ | PEA.L 0x2695c 00021e3e 48 79 00 02 69 60 |Hy i` | PEA.L 0x26960 00021e44 48 79 00 02 69 64 |Hy id | PEA.L 0x26964 00021e4a 48 79 00 02 69 65 |Hy ie | PEA.L 0x26965 00021e50 48 6e ff e8 |Hn | PEA.L (A6-0x18) 00021e54 4e ba f0 88 |N | JSR 0x20ede 00021e58 de fc 00 20 | | ADDA.W #0x20,A7 00021e5c 4a 2e ff e8 |J. | TST.B (A6-0x18) 00021e60 67 0c |g | BEQ 0x21e6e 00021e62 48 78 00 01 |Hx | PEA.L 0x1 00021e66 4e b9 00 02 2e 28 |N .( | JSR 0x22e28 00021e6c 58 4f |XO | ADDQ.L #0x4,A7 00021e6e 4e ba f4 d8 |N | JSR 0x21348 00021e72 9e c4 | | SUBA.W D4,A7 00021e74 20 4f | O | MOVEA.L A7,A0 00021e76 43 fa e6 12 |C | LEA.L 0x2048a,A1 00021e7a 70 0a |p | MOVEQ.L #0x0a,D0 00021e7c 10 d9 | | MOVE.B (A1)+,(A0)+ 00021e7e 51 c8 ff fc |Q | DBF D0,0x21e7c 00021e82 59 4f |YO | SUBQ.L #0x4,A7 00021e84 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021e88 3f 02 |? | MOVE.W D2,-(A7) 00021e8a 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00021e8e 4e 94 |N | JSR (A4) 00021e90 50 4f |PO | ADDQ.L #0x8,A7 00021e92 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021e98 de fc 00 10 | | ADDA.W #0x10,A7 00021e9c 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00021ea0 4e 5e |N^ | UNLK A6 00021ea2 4e 75 |Nu | RTS 00021ea4 ; -------------------------------------------------------------------------------------- 00021ea4 ; OMSI PASCAL Function 00021ea4 ; <LVAR 0x008 4(r)> 00021ea4 ; <LVAR -0x00c @ 4(rw)> 00021ea4 ; -------------------------------------------------------------------------------------- 00021ea4 CMD_ERRMESS(?): 00021ea4 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 00021ea8 bf d5 | | CMPA.L (A5),A7 00021eaa 62 06 |b | BHI 0x21eb2 00021eac 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021eb0 4e 76 |Nv | TRAPV 00021eb2 de fc 00 3c | < | ADDA.W #0x3c,A7 00021eb6 48 e7 c1 e8 |H | MOVEM.L A4+A2+A1+A0+D7+D1+D0,-(A7) 00021eba 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00021ebe 45 ee ff f4 |E | LEA.L (A6-0xc),A2 00021ec2 72 01 |r | MOVEQ.L #0x01,D1 00021ec4 24 81 |$ | MOVE.L D1,(A2) 00021ec6 59 4f |YO | SUBQ.L #0x4,A7 00021ec8 2f 11 |/ | MOVE.L (A1),-(A7) 00021eca 4e b9 00 02 32 3c |N 2< | JSR 0x2323c 00021ed0 58 4f |XO | ADDQ.L #0x4,A7 00021ed2 20 1f | | MOVE.L (A7)+,D0 00021ed4 0c 80 00 00 00 02 | | CMPI.L #0x00000002,D0 00021eda 66 0a |f | BNE 0x21ee6 00021edc 59 4f |YO | SUBQ.L #0x4,A7 00021ede 2f 11 |/ | MOVE.L (A1),-(A7) 00021ee0 48 78 00 02 |Hx | PEA.L 0x2 00021ee4 60 32 |`2 | BRA 0x21f18 00021ee6 41 fa e5 c0 |A | LEA.L 0x204a8,A0 00021eea 70 04 |p | MOVEQ.L #0x04,D0 00021eec 3f 20 |? | MOVE.W -(A0),-(A7) 00021eee 51 c8 ff fc |Q | DBF D0,0x21eec 00021ef2 2f 11 |/ | MOVE.L (A1),-(A7) 00021ef4 48 78 00 03 |Hx | PEA.L 0x3 00021ef8 4e b9 00 02 32 72 |N 2r | JSR 0x23272 00021efe de fc 00 0a | | ADDA.W #0xa,A7 00021f02 2e 91 |. | MOVE.L (A1),(A7) 00021f04 48 78 00 02 |Hx | PEA.L 0x2 00021f08 4e b9 00 02 3b 66 |N ;f | JSR 0x23b66 00021f0e 50 4f |PO | ADDQ.L #0x8,A7 00021f10 24 97 |$ | MOVE.L (A7),(A2) 00021f12 2f 11 |/ | MOVE.L (A1),-(A7) 00021f14 48 78 00 03 |Hx | PEA.L 0x3 00021f18 4e b9 00 02 3b d4 |N ; | JSR 0x23bd4 00021f1e 50 4f |PO | ADDQ.L #0x8,A7 00021f20 2e 1f |. | MOVE.L (A7)+,D7 00021f22 2f 3a e5 76 |/: v | MOVE.L 0x2049a,-(A7) 00021f26 2f 3a e5 6e |/: n | MOVE.L 0x20496,-(A7) 00021f2a 51 4f |QO | SUBQ.L #0x8,A7 00021f2c 2f 11 |/ | MOVE.L (A1),-(A7) 00021f2e 48 78 00 01 |Hx | PEA.L 0x1 00021f32 4e b9 00 02 3b 66 |N ;f | JSR 0x23b66 00021f38 58 4f |XO | ADDQ.L #0x4,A7 00021f3a 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021f3e 3f 01 |? | MOVE.W D1,-(A7) 00021f40 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00021f44 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021f4a 50 4f |PO | ADDQ.L #0x8,A7 00021f4c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021f52 50 4f |PO | ADDQ.L #0x8,A7 00021f54 28 5f |(_ | MOVEA.L (A7)+,A4 00021f56 58 4f |XO | ADDQ.L #0x4,A7 00021f58 2e 8c |. | MOVE.L A4,(A7) 00021f5a 2f 12 |/ | MOVE.L (A2),-(A7) 00021f5c 2f 07 |/ | MOVE.L D7,-(A7) 00021f5e 4e b9 00 01 04 4c |N L | JSR WriteErrorMessage(file : String; txt : String; number : Long) : Bool 00021f64 de fc 00 0c | | ADDA.W #0xc,A7 00021f68 20 52 | R | MOVEA.L (A2),A0 00021f6a b0 c1 | | CMPA.W D1,A0 00021f6c 67 0a |g | BEQ 0x21f78 00021f6e 48 52 |HR | PEA.L (A2) 00021f70 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021f76 58 4f |XO | ADDQ.L #0x4,A7 00021f78 4c df 17 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2+A4 00021f7c 4e 5e |N^ | UNLK A6 00021f7e 4e 75 |Nu | RTS 00021f80 ; -------------------------------------------------------------------------------------- 00021f80 ; OMSI PASCAL Function 00021f80 ; <LVAR 0x016 1(rw)> 00021f80 ; <LVAR 0x008 4(r)> 00021f80 ; <LVAR -0x006 @ 4(rw)> 00021f80 ; <LVAR -0x00a @ 4(rw)> 00021f80 ; -------------------------------------------------------------------------------------- 00021f80 4e 56 ff a6 |NV | LINK.W A6,#0xffa6 00021f84 bf d5 | | CMPA.L (A5),A7 00021f86 62 06 |b | BHI 0x21f8e 00021f88 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021f8c 4e 76 |Nv | TRAPV 00021f8e de fc 00 50 | P | ADDA.W #0x50,A7 00021f92 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 00021f96 45 ee ff fa |E | LEA.L (A6-0x6),A2 00021f9a 47 ee ff f6 |G | LEA.L (A6-0xa),A3 00021f9e 49 f9 00 01 02 bc |I | LEA.L FreeString(VAR a : String),A4 00021fa4 72 01 |r | MOVEQ.L #0x01,D1 00021fa6 41 ee 00 16 |A | LEA.L (A6+0x16),A0 00021faa 70 04 |p | MOVEQ.L #0x04,D0 00021fac 3f 20 |? | MOVE.W -(A0),-(A7) 00021fae 51 c8 ff fc |Q | DBF D0,0x21fac 00021fb2 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00021fb6 48 78 00 01 |Hx | PEA.L 0x1 00021fba 4e b9 00 02 32 72 |N 2r | JSR 0x23272 00021fc0 de fc 00 0a | | ADDA.W #0xa,A7 00021fc4 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00021fc8 48 78 00 01 |Hx | PEA.L 0x1 00021fcc 4e b9 00 02 3b 66 |N ;f | JSR 0x23b66 00021fd2 50 4f |PO | ADDQ.L #0x8,A7 00021fd4 26 9f |& | MOVE.L (A7)+,(A3) 00021fd6 3f 3a e4 d0 |?: | MOVE.W 0x204a8,-(A7) 00021fda 59 4f |YO | SUBQ.L #0x4,A7 00021fdc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021fe0 3f 01 |? | MOVE.W D1,-(A7) 00021fe2 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00021fe6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021fec 50 4f |PO | ADDQ.L #0x8,A7 00021fee 24 9f |$ | MOVE.L (A7)+,(A2) 00021ff0 2f 13 |/ | MOVE.L (A3),-(A7) 00021ff2 2f 12 |/ | MOVE.L (A2),-(A7) 00021ff4 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00021ffa 50 4f |PO | ADDQ.L #0x8,A7 00021ffc 4a 1f |J | TST.B (A7)+ 00021ffe 67 06 |g | BEQ 0x22006 00022000 1d 41 00 16 | A | MOVE.B D1,(A6+0x16) 00022004 60 7c |`| | BRA 0x22082 00022006 48 52 |HR | PEA.L (A2) 00022008 4e 94 |N | JSR (A4) 0002200a 1e ba e4 9e | | MOVE.B 0x204aa,(A7) 0002200e 1f 7a e4 9b 00 01 | z | MOVE.B 0x204ab,(A7+0x1) 00022014 1f 7a e4 96 00 02 | z | MOVE.B 0x204ac,(A7+0x2) 0002201a 59 4f |YO | SUBQ.L #0x4,A7 0002201c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022020 3f 01 |? | MOVE.W D1,-(A7) 00022022 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00022026 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002202c 50 4f |PO | ADDQ.L #0x8,A7 0002202e 24 9f |$ | MOVE.L (A7)+,(A2) 00022030 54 4f |TO | ADDQ.L #0x2,A7 00022032 2f 13 |/ | MOVE.L (A3),-(A7) 00022034 2f 12 |/ | MOVE.L (A2),-(A7) 00022036 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 0002203c 50 4f |PO | ADDQ.L #0x8,A7 0002203e 4a 1f |J | TST.B (A7)+ 00022040 67 06 |g | BEQ 0x22048 00022042 42 2e 00 16 |B. | CLR.B (A6+0x16) 00022046 60 3a |`: | BRA 0x22082 00022048 48 52 |HR | PEA.L (A2) 0002204a 4e 94 |N | JSR (A4) 0002204c 58 4f |XO | ADDQ.L #0x4,A7 0002204e 48 53 |HS | PEA.L (A3) 00022050 4e 94 |N | JSR (A4) 00022052 9e fc 00 20 | | SUBA.W #0x20,A7 00022056 20 4f | O | MOVEA.L A7,A0 00022058 43 fa e4 54 |C T | LEA.L 0x204ae,A1 0002205c 70 22 |p" | MOVEQ.L #0x22,D0 0002205e 10 d9 | | MOVE.B (A1)+,(A0)+ 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 23 |?< # | MOVE.W #0x23,-(A7) 00022070 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022076 50 4f |PO | ADDQ.L #0x8,A7 00022078 4e b9 00 02 2e 28 |N .( | JSR 0x22e28 0002207e de fc 00 28 | ( | ADDA.W #0x28,A7 00022082 48 52 |HR | PEA.L (A2) 00022084 4e 94 |N | JSR (A4) 00022086 58 4f |XO | ADDQ.L #0x4,A7 00022088 48 53 |HS | PEA.L (A3) 0002208a 4e 94 |N | JSR (A4) 0002208c 58 4f |XO | ADDQ.L #0x4,A7 0002208e 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 00022092 4e 5e |N^ | UNLK A6 00022094 4e 75 |Nu | RTS 00022096 ; -------------------------------------------------------------------------------------- 00022096 ; OMSI PASCAL Function 00022096 ; <LVAR 0x008 4(r)> 00022096 ; -------------------------------------------------------------------------------------- 00022096 CMD_ISOLATE(?): 00022096 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 0002209a bf d5 | | CMPA.L (A5),A7 0002209c 62 06 |b | BHI 0x220a4 0002209e 44 fc 00 02 |D | MOVE.W #0x2,CCR 000220a2 4e 76 |Nv | TRAPV 000220a4 de fc 00 1c | | ADDA.W #0x1c,A7 000220a8 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 000220ac 55 4f |UO | SUBQ.L #0x2,A7 000220ae 41 fa e4 2c |A , | LEA.L 0x204dc,A0 000220b2 70 04 |p | MOVEQ.L #0x04,D0 000220b4 3f 20 |? | MOVE.W -(A0),-(A7) 000220b6 51 c8 ff fc |Q | DBF D0,0x220b4 000220ba 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000220be 4e ba fe c0 |N | JSR 0x21f80 000220c2 de fc 00 0e | | ADDA.W #0xe,A7 000220c6 10 1f | | MOVE.B (A7)+,D0 000220c8 48 80 |H | EXTB.W D0 000220ca 41 bc 00 01 |A | CHK.W #0x1,D0 000220ce 13 c0 00 02 69 6d | im | MOVE.B D0,0x2696d 000220d4 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 000220d8 4e 5e |N^ | UNLK A6 000220da 4e 75 |Nu | RTS 000220dc ; -------------------------------------------------------------------------------------- 000220dc ; OMSI PASCAL Function 000220dc ; <LVAR 0x008 4(r)> 000220dc ; -------------------------------------------------------------------------------------- 000220dc CMD_TRACE(?): 000220dc 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 000220e0 bf d5 | | CMPA.L (A5),A7 000220e2 62 06 |b | BHI 0x220ea 000220e4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000220e8 4e 76 |Nv | TRAPV 000220ea de fc 00 1c | | ADDA.W #0x1c,A7 000220ee 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 000220f2 55 4f |UO | SUBQ.L #0x2,A7 000220f4 41 fa e3 f0 |A | LEA.L 0x204e6,A0 000220f8 70 04 |p | MOVEQ.L #0x04,D0 000220fa 3f 20 |? | MOVE.W -(A0),-(A7) 000220fc 51 c8 ff fc |Q | DBF D0,0x220fa 00022100 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022104 4e ba fe 7a |N z | JSR 0x21f80 00022108 de fc 00 0e | | ADDA.W #0xe,A7 0002210c 10 1f | | MOVE.B (A7)+,D0 0002210e 48 80 |H | EXTB.W D0 00022110 41 bc 00 01 |A | CHK.W #0x1,D0 00022114 13 c0 00 02 69 6e | in | MOVE.B D0,0x2696e 0002211a 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 0002211e 4e 5e |N^ | UNLK A6 00022120 4e 75 |Nu | RTS 00022122 ; -------------------------------------------------------------------------------------- 00022122 ; OMSI PASCAL Function 00022122 ; <LVAR 0x008 4(r)> 00022122 ; -------------------------------------------------------------------------------------- 00022122 CMD_ULOAD(?): 00022122 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 00022126 bf d5 | | CMPA.L (A5),A7 00022128 62 06 |b | BHI 0x22130 0002212a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002212e 4e 76 |Nv | TRAPV 00022130 de fc 00 1c | | ADDA.W #0x1c,A7 00022134 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00022138 55 4f |UO | SUBQ.L #0x2,A7 0002213a 41 fa e3 b4 |A | LEA.L 0x204f0,A0 0002213e 70 04 |p | MOVEQ.L #0x04,D0 00022140 3f 20 |? | MOVE.W -(A0),-(A7) 00022142 51 c8 ff fc |Q | DBF D0,0x22140 00022146 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002214a 4e ba fe 34 |N 4 | JSR 0x21f80 0002214e de fc 00 0e | | ADDA.W #0xe,A7 00022152 10 1f | | MOVE.B (A7)+,D0 00022154 48 80 |H | EXTB.W D0 00022156 41 bc 00 01 |A | CHK.W #0x1,D0 0002215a 13 c0 00 02 69 6f | io | MOVE.B D0,0x2696f 00022160 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00022164 4e 5e |N^ | UNLK A6 00022166 4e 75 |Nu | RTS 00022168 ; -------------------------------------------------------------------------------------- 00022168 ; OMSI PASCAL Function 00022168 ; <LVAR 0x00c 1(w)> 00022168 ; <LVAR 0x008 4(r)> 00022168 ; <LVAR -0x006 @ 4(rw)> 00022168 ; -------------------------------------------------------------------------------------- 00022168 MATCH_POWER_MARGINS(?): 00022168 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 0002216c bf d5 | | CMPA.L (A5),A7 0002216e 62 06 |b | BHI 0x22176 00022170 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022174 4e 76 |Nv | TRAPV 00022176 de fc 00 40 | @ | ADDA.W #0x40,A7 0002217a 48 e7 f3 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D3+D2+D1+D0,-(A7) 0002217e 45 ee ff fa |E | LEA.L (A6-0x6),A2 00022182 74 0a |t | MOVEQ.L #0x0a,D2 00022184 76 01 |v | MOVEQ.L #0x01,D3 00022186 7e 00 |~ | MOVEQ.L #0x00,D7 00022188 10 07 | | MOVE.B D7,D0 0002218a 48 80 |H | EXTB.W D0 0002218c 72 0a |r | MOVEQ.L #0x0a,D1 0002218e c3 c0 | | MULS.W D0,D1 00022190 41 fa ea 22 |A " | LEA.L TXTTBL_POWER_MARGINS,A0 00022194 9e c2 | | SUBA.W D2,A7 00022196 22 4f |"O | MOVEA.L A7,A1 00022198 41 f0 10 00 |A | LEA.L (A0+D1.W),A0 0002219c 72 09 |r | MOVEQ.L #0x09,D1 0002219e 12 d8 | | MOVE.B (A0)+,(A1)+ 000221a0 51 c9 ff fc |Q | DBF D1,0x2219e 000221a4 59 4f |YO | SUBQ.L #0x4,A7 000221a6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000221aa 3f 03 |? | MOVE.W D3,-(A7) 000221ac 3f 02 |? | MOVE.W D2,-(A7) 000221ae 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000221b4 50 4f |PO | ADDQ.L #0x8,A7 000221b6 24 9f |$ | MOVE.L (A7)+,(A2) 000221b8 58 4f |XO | ADDQ.L #0x4,A7 000221ba 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 000221be 2f 12 |/ | MOVE.L (A2),-(A7) 000221c0 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000221c6 50 4f |PO | ADDQ.L #0x8,A7 000221c8 12 1f | | MOVE.B (A7)+,D1 000221ca 48 81 |H | EXTB.W D1 000221cc 43 83 |C | CHK.W D3,D1 000221ce 1c 01 | | MOVE.B D1,D6 000221d0 48 52 |HR | PEA.L (A2) 000221d2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000221d8 58 4f |XO | ADDQ.L #0x4,A7 000221da 4a 06 |J | TST.B D6 000221dc 66 04 |f | BNE 0x221e2 000221de 52 40 |R@ | ADDQ.W #0x1,D0 000221e0 1e 00 | | MOVE.B D0,D7 000221e2 4a 06 |J | TST.B D6 000221e4 66 06 |f | BNE 0x221ec 000221e6 0c 07 00 03 | | CMPI.B #0x03,D7 000221ea 66 9c |f | BNE 0x22188 000221ec 1d 47 00 0c | G | MOVE.B D7,(A6+0xc) 000221f0 4c df 07 cf |L | MOVEM.L (A7)+,D0+D1+D2+D3+D6+D7+A0+A1+A2 000221f4 4e 5e |N^ | UNLK A6 000221f6 4e 75 |Nu | RTS 000221f8 ; -------------------------------------------------------------------------------------- 000221f8 ; OMSI PASCAL Function 000221f8 ; <LVAR 0x00c 1(w)> 000221f8 ; <LVAR 0x008 4(r)> 000221f8 ; <LVAR -0x006 @ 4(rw)> 000221f8 ; -------------------------------------------------------------------------------------- 000221f8 MATCH_CLOCK_MARGINS(?): 000221f8 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 000221fc bf d5 | | CMPA.L (A5),A7 000221fe 62 06 |b | BHI 0x22206 00022200 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022204 4e 76 |Nv | TRAPV 00022206 de fc 00 40 | @ | ADDA.W #0x40,A7 0002220a 48 e7 f3 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D3+D2+D1+D0,-(A7) 0002220e 45 ee ff fa |E | LEA.L (A6-0x6),A2 00022212 74 0a |t | MOVEQ.L #0x0a,D2 00022214 76 01 |v | MOVEQ.L #0x01,D3 00022216 7e 00 |~ | MOVEQ.L #0x00,D7 00022218 10 07 | | MOVE.B D7,D0 0002221a 48 80 |H | EXTB.W D0 0002221c 72 0a |r | MOVEQ.L #0x0a,D1 0002221e c3 c0 | | MULS.W D0,D1 00022220 41 fa e9 ba |A | LEA.L TXTTBL_CLOCK_MARGINS,A0 00022224 9e c2 | | SUBA.W D2,A7 00022226 22 4f |"O | MOVEA.L A7,A1 00022228 41 f0 10 00 |A | LEA.L (A0+D1.W),A0 0002222c 72 09 |r | MOVEQ.L #0x09,D1 0002222e 12 d8 | | MOVE.B (A0)+,(A1)+ 00022230 51 c9 ff fc |Q | DBF D1,0x2222e 00022234 59 4f |YO | SUBQ.L #0x4,A7 00022236 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002223a 3f 03 |? | MOVE.W D3,-(A7) 0002223c 3f 02 |? | MOVE.W D2,-(A7) 0002223e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022244 50 4f |PO | ADDQ.L #0x8,A7 00022246 24 9f |$ | MOVE.L (A7)+,(A2) 00022248 58 4f |XO | ADDQ.L #0x4,A7 0002224a 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 0002224e 2f 12 |/ | MOVE.L (A2),-(A7) 00022250 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00022256 50 4f |PO | ADDQ.L #0x8,A7 00022258 12 1f | | MOVE.B (A7)+,D1 0002225a 48 81 |H | EXTB.W D1 0002225c 43 83 |C | CHK.W D3,D1 0002225e 1c 01 | | MOVE.B D1,D6 00022260 48 52 |HR | PEA.L (A2) 00022262 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022268 58 4f |XO | ADDQ.L #0x4,A7 0002226a 4a 06 |J | TST.B D6 0002226c 66 04 |f | BNE 0x22272 0002226e 52 40 |R@ | ADDQ.W #0x1,D0 00022270 1e 00 | | MOVE.B D0,D7 00022272 4a 06 |J | TST.B D6 00022274 66 06 |f | BNE 0x2227c 00022276 0c 07 00 03 | | CMPI.B #0x03,D7 0002227a 66 9c |f | BNE 0x22218 0002227c 1d 47 00 0c | G | MOVE.B D7,(A6+0xc) 00022280 4c df 07 cf |L | MOVEM.L (A7)+,D0+D1+D2+D3+D6+D7+A0+A1+A2 00022284 4e 5e |N^ | UNLK A6 00022286 4e 75 |Nu | RTS 00022288 ; -------------------------------------------------------------------------------------- 00022288 ; OMSI PASCAL Function 00022288 ; <LVAR 0x008 4(r)> 00022288 ; <LVAR -0x00a @ 4(rw)> 00022288 ; <LVAR -0x00e @ 4(rw)> 00022288 ; <LVAR -0x012 @ 4(rw)> 00022288 ; -------------------------------------------------------------------------------------- 00022288 CMD_MARGIN(?): 00022288 4e 56 ff 76 |NV v | LINK.W A6,#0xff76 0002228c bf d5 | | CMPA.L (A5),A7 0002228e 62 06 |b | BHI 0x22296 00022290 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022294 4e 76 |Nv | TRAPV 00022296 de fc 00 76 | v | ADDA.W #0x76,A7 0002229a 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002229e 45 ee ff f6 |E | LEA.L (A6-0xa),A2 000222a2 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 000222a8 72 01 |r | MOVEQ.L #0x01,D1 000222aa 74 03 |t | MOVEQ.L #0x03,D2 000222ac 76 05 |v | MOVEQ.L #0x05,D3 000222ae 78 32 |x2 | MOVEQ.L #0x32,D4 000222b0 7a 2c |z, | MOVEQ.L #0x2c,D5 000222b2 7e 00 |~ | MOVEQ.L #0x00,D7 000222b4 41 fa e3 1c |A | LEA.L 0x205d2,A0 000222b8 70 04 |p | MOVEQ.L #0x04,D0 000222ba 3f 20 |? | MOVE.W -(A0),-(A7) 000222bc 51 c8 ff fc |Q | DBF D0,0x222ba 000222c0 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000222c4 48 78 00 02 |Hx | PEA.L 0x2 000222c8 4e b9 00 02 32 72 |N 2r | JSR 0x23272 000222ce de fc 00 0a | | ADDA.W #0xa,A7 000222d2 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 000222d6 48 78 00 01 |Hx | PEA.L 0x1 000222da 4e b9 00 02 3b 66 |N ;f | JSR 0x23b66 000222e0 50 4f |PO | ADDQ.L #0x8,A7 000222e2 2d 57 ff ee |-W | MOVE.L (A7),(A6-0x12) 000222e6 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000222ea 48 78 00 02 |Hx | PEA.L 0x2 000222ee 4e b9 00 02 3b 66 |N ;f | JSR 0x23b66 000222f4 50 4f |PO | ADDQ.L #0x8,A7 000222f6 2d 57 ff f2 |-W | MOVE.L (A7),(A6-0xe) 000222fa 55 4f |UO | SUBQ.L #0x2,A7 000222fc 20 4f | O | MOVEA.L A7,A0 000222fe 43 fa e2 d2 |C | LEA.L 0x205d2,A1 00022302 70 04 |p | MOVEQ.L #0x04,D0 00022304 10 d9 | | MOVE.B (A1)+,(A0)+ 00022306 51 c8 ff fc |Q | DBF D0,0x22304 0002230a 59 4f |YO | SUBQ.L #0x4,A7 0002230c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022310 3f 01 |? | MOVE.W D1,-(A7) 00022312 3f 03 |? | MOVE.W D3,-(A7) 00022314 4e 93 |N | JSR (A3) 00022316 50 4f |PO | ADDQ.L #0x8,A7 00022318 24 9f |$ | MOVE.L (A7)+,(A2) 0002231a 2e ae ff ee |. | MOVE.L (A6-0x12),(A7) 0002231e 2f 12 |/ | MOVE.L (A2),-(A7) 00022320 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00022326 50 4f |PO | ADDQ.L #0x8,A7 00022328 4a 1f |J | TST.B (A7)+ 0002232a 67 58 |gX | BEQ 0x22384 0002232c 55 4f |UO | SUBQ.L #0x2,A7 0002232e 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 00022332 4e ba fe 34 |N 4 | JSR MATCH_POWER_MARGINS(?) 00022336 58 4f |XO | ADDQ.L #0x4,A7 00022338 10 1f | | MOVE.B (A7)+,D0 0002233a 48 80 |H | EXTB.W D0 0002233c 41 82 |A | CHK.W D2,D0 0002233e 1c 00 | | MOVE.B D0,D6 00022340 bc 02 | | CMP.B D2,D6 00022342 67 1c |g | BEQ 0x22360 00022344 10 06 | | MOVE.B D6,D0 00022346 48 80 |H | EXTB.W D0 00022348 48 c0 |H | EXTW.L D0 0002234a 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00022350 63 02 |c | BLS 0x22354 00022352 4e 4f |NO | TRAP #15 00022354 3f 00 |? | MOVE.W D0,-(A7) 00022356 4e b9 00 01 02 2e |N . | JSR KC17_Power_Margin 0002235c 54 4f |TO | ADDQ.L #0x2,A7 0002235e 60 20 |` | BRA 0x22380 00022360 41 fa e2 10 |A | LEA.L 0x20572,A0 00022364 70 18 |p | MOVEQ.L #0x18,D0 00022366 3f 20 |? | MOVE.W -(A0),-(A7) 00022368 51 c8 ff fc |Q | DBF D0,0x22366 0002236c 59 4f |YO | SUBQ.L #0x4,A7 0002236e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022372 3f 01 |? | MOVE.W D1,-(A7) 00022374 3f 04 |? | MOVE.W D4,-(A7) 00022376 4e 93 |N | JSR (A3) 00022378 50 4f |PO | ADDQ.L #0x8,A7 0002237a 28 5f |(_ | MOVEA.L (A7)+,A4 0002237c de c4 | | ADDA.W D4,A7 0002237e 7e 01 |~ | MOVEQ.L #0x01,D7 00022380 60 00 00 b8 |` | BRA 0x2243a 00022384 48 52 |HR | PEA.L (A2) 00022386 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002238c 55 4f |UO | SUBQ.L #0x2,A7 0002238e 20 4f | O | MOVEA.L A7,A0 00022390 43 fa e2 46 |C F | LEA.L 0x205d8,A1 00022394 70 04 |p | MOVEQ.L #0x04,D0 00022396 10 d9 | | MOVE.B (A1)+,(A0)+ 00022398 51 c8 ff fc |Q | DBF D0,0x22396 0002239c 59 4f |YO | SUBQ.L #0x4,A7 0002239e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000223a2 3f 01 |? | MOVE.W D1,-(A7) 000223a4 3f 03 |? | MOVE.W D3,-(A7) 000223a6 4e 93 |N | JSR (A3) 000223a8 50 4f |PO | ADDQ.L #0x8,A7 000223aa 24 9f |$ | MOVE.L (A7)+,(A2) 000223ac 2e ae ff ee |. | MOVE.L (A6-0x12),(A7) 000223b0 2f 12 |/ | MOVE.L (A2),-(A7) 000223b2 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000223b8 50 4f |PO | ADDQ.L #0x8,A7 000223ba 4a 1f |J | TST.B (A7)+ 000223bc 67 58 |gX | BEQ 0x22416 000223be 55 4f |UO | SUBQ.L #0x2,A7 000223c0 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 000223c4 4e ba fe 32 |N 2 | JSR MATCH_CLOCK_MARGINS(?) 000223c8 58 4f |XO | ADDQ.L #0x4,A7 000223ca 10 1f | | MOVE.B (A7)+,D0 000223cc 48 80 |H | EXTB.W D0 000223ce 41 82 |A | CHK.W D2,D0 000223d0 1c 00 | | MOVE.B D0,D6 000223d2 67 04 |g | BEQ 0x223d8 000223d4 bc 01 | | CMP.B D1,D6 000223d6 66 1c |f | BNE 0x223f4 000223d8 10 06 | | MOVE.B D6,D0 000223da 48 80 |H | EXTB.W D0 000223dc 48 c0 |H | EXTW.L D0 000223de 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 000223e4 63 02 |c | BLS 0x223e8 000223e6 4e 4f |NO | TRAP #15 000223e8 3f 00 |? | MOVE.W D0,-(A7) 000223ea 4e b9 00 01 02 2c |N , | JSR KC16_Clock_Margin 000223f0 54 4f |TO | ADDQ.L #0x2,A7 000223f2 60 20 |` | BRA 0x22414 000223f4 41 fa e1 a8 |A | LEA.L 0x2059e,A0 000223f8 70 0a |p | MOVEQ.L #0x0a,D0 000223fa 2f 20 |/ | MOVE.L -(A0),-(A7) 000223fc 51 c8 ff fc |Q | DBF D0,0x223fa 00022400 59 4f |YO | SUBQ.L #0x4,A7 00022402 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022406 3f 01 |? | MOVE.W D1,-(A7) 00022408 3f 05 |? | MOVE.W D5,-(A7) 0002240a 4e 93 |N | JSR (A3) 0002240c 50 4f |PO | ADDQ.L #0x8,A7 0002240e 28 5f |(_ | MOVEA.L (A7)+,A4 00022410 de c5 | | ADDA.W D5,A7 00022412 7e 01 |~ | MOVEQ.L #0x01,D7 00022414 60 24 |`$ | BRA 0x2243a 00022416 41 fa e1 b0 |A | LEA.L 0x205c8,A0 0002241a 70 14 |p | MOVEQ.L #0x14,D0 0002241c 3f 20 |? | MOVE.W -(A0),-(A7) 0002241e 51 c8 ff fc |Q | DBF D0,0x2241c 00022422 59 4f |YO | SUBQ.L #0x4,A7 00022424 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022428 3f 01 |? | MOVE.W D1,-(A7) 0002242a 3f 3c 00 2a |?< * | MOVE.W #0x2a,-(A7) 0002242e 4e 93 |N | JSR (A3) 00022430 50 4f |PO | ADDQ.L #0x8,A7 00022432 28 5f |(_ | MOVEA.L (A7)+,A4 00022434 de fc 00 2a | * | ADDA.W #0x2a,A7 00022438 7e 01 |~ | MOVEQ.L #0x01,D7 0002243a 48 6e ff ee |Hn | PEA.L (A6-0x12) 0002243e 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022444 58 4f |XO | ADDQ.L #0x4,A7 00022446 48 6e ff f2 |Hn | PEA.L (A6-0xe) 0002244a 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022450 58 4f |XO | ADDQ.L #0x4,A7 00022452 48 52 |HR | PEA.L (A2) 00022454 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002245a 58 4f |XO | ADDQ.L #0x4,A7 0002245c 4a 07 |J | TST.B D7 0002245e 67 0a |g | BEQ 0x2246a 00022460 2f 0c |/ | MOVE.L A4,-(A7) 00022462 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022468 58 4f |XO | ADDQ.L #0x4,A7 0002246a 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 0002246e 4e 5e |N^ | UNLK A6 00022470 4e 75 |Nu | RTS 00022472 ; -------------------------------------------------------------------------------------- 00022472 ; OMSI PASCAL Function 00022472 ; <LVAR 0x00c 4(w)> 00022472 ; <LVAR 0x008 4(r)> 00022472 ; <LVAR -0x008 @ 4(rw)> 00022472 ; -------------------------------------------------------------------------------------- 00022472 MATCH_CMDS(?): 00022472 4e 56 ff ae |NV | LINK.W A6,#0xffae 00022476 bf d5 | | CMPA.L (A5),A7 00022478 62 06 |b | BHI 0x22480 0002247a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002247e 4e 76 |Nv | TRAPV 00022480 de fc 00 46 | F | ADDA.W #0x46,A7 00022484 48 e7 fb e0 |H | MOVEM.L A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7) 00022488 45 ee ff f8 |E | LEA.L (A6-0x8),A2 0002248c 72 0a |r | MOVEQ.L #0x0a,D1 0002248e 74 01 |t | MOVEQ.L #0x01,D2 00022490 2d 7c ff ff ff ff 00 0c |-| | MOVE.L #0xffffffff,(A6+0xc) 00022498 7e 01 |~ | MOVEQ.L #0x01,D7 0002249a 20 07 | | MOVE.L D7,D0 0002249c 53 80 |S | SUBQ.L #0x1,D0 0002249e 0c 80 00 00 00 08 | | CMPI.L #0x00000008,D0 000224a4 63 02 |c | BLS 0x224a8 000224a6 4e 4f |NO | TRAP #15 000224a8 28 00 |( | MOVE.L D0,D4 000224aa 76 0a |v | MOVEQ.L #0x0a,D3 000224ac 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 000224b2 41 fa e7 50 |A P | LEA.L TXTTBL_CMDS,A0 000224b6 9e c1 | | SUBA.W D1,A7 000224b8 22 4f |"O | MOVEA.L A7,A1 000224ba 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0 000224be 70 09 |p | MOVEQ.L #0x09,D0 000224c0 12 d8 | | MOVE.B (A0)+,(A1)+ 000224c2 51 c8 ff fc |Q | DBF D0,0x224c0 000224c6 59 4f |YO | SUBQ.L #0x4,A7 000224c8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000224cc 3f 02 |? | MOVE.W D2,-(A7) 000224ce 3f 01 |? | MOVE.W D1,-(A7) 000224d0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000224d6 50 4f |PO | ADDQ.L #0x8,A7 000224d8 24 9f |$ | MOVE.L (A7)+,(A2) 000224da 58 4f |XO | ADDQ.L #0x4,A7 000224dc 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 000224e0 2f 12 |/ | MOVE.L (A2),-(A7) 000224e2 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000224e8 50 4f |PO | ADDQ.L #0x8,A7 000224ea 10 1f | | MOVE.B (A7)+,D0 000224ec 48 80 |H | EXTB.W D0 000224ee 41 82 |A | CHK.W D2,D0 000224f0 1c 00 | | MOVE.B D0,D6 000224f2 48 52 |HR | PEA.L (A2) 000224f4 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000224fa 58 4f |XO | ADDQ.L #0x4,A7 000224fc 4a 06 |J | TST.B D6 000224fe 67 06 |g | BEQ 0x22506 00022500 2d 47 00 0c |-G | MOVE.L D7,(A6+0xc) 00022504 60 0a |` | BRA 0x22510 00022506 52 87 |R | ADDQ.L #0x1,D7 00022508 0c 87 00 00 00 09 | | CMPI.L #0x00000009,D7 0002250e 6f 8a |o | BLE 0x2249a 00022510 4c df 07 df |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2 00022514 4e 5e |N^ | UNLK A6 00022516 4e 75 |Nu | RTS 00022518 ; -------------------------------------------------------------------------------------- 00022518 ; OMSI PASCAL Function 00022518 ; -------------------------------------------------------------------------------------- 00022518 CMD_POWERDOWN(?): 00022518 4e 56 ff 88 |NV | LINK.W A6,#0xff88 0002251c bf d5 | | CMPA.L (A5),A7 0002251e 62 06 |b | BHI 0x22526 00022520 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022524 4e 76 |Nv | TRAPV 00022526 de fc 00 74 | t | ADDA.W #0x74,A7 0002252a 48 e7 e0 f0 |H | MOVEM.L A3+A2+A1+A0+D2+D1+D0,-(A7) 0002252e 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00022534 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3 0002253a 72 01 |r | MOVEQ.L #0x01,D1 0002253c 74 2c |t, | MOVEQ.L #0x2c,D2 0002253e 4a 39 00 02 69 57 |J9 iW | TST.B 0x26957 00022544 67 28 |g( | BEQ 0x2256e 00022546 9e c2 | | SUBA.W D2,A7 00022548 20 4f | O | MOVEA.L A7,A0 0002254a 43 fa e3 8a |C | LEA.L 0x208d6,A1 0002254e 70 2a |p* | MOVEQ.L #0x2a,D0 00022550 10 d9 | | MOVE.B (A1)+,(A0)+ 00022552 51 c8 ff fc |Q | DBF D0,0x22550 00022556 59 4f |YO | SUBQ.L #0x4,A7 00022558 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002255c 3f 01 |? | MOVE.W D1,-(A7) 0002255e 3f 3c 00 2b |?< + | MOVE.W #0x2b,-(A7) 00022562 4e 92 |N | JSR (A2) 00022564 50 4f |PO | ADDQ.L #0x8,A7 00022566 4e 93 |N | JSR (A3) 00022568 de fc 00 30 | 0 | ADDA.W #0x30,A7 0002256c 60 66 |`f | BRA 0x225d4 0002256e 41 fa e2 f6 |A | LEA.L 0x20866,A0 00022572 70 22 |p" | MOVEQ.L #0x22,D0 00022574 3f 20 |? | MOVE.W -(A0),-(A7) 00022576 51 c8 ff fc |Q | DBF D0,0x22574 0002257a 59 4f |YO | SUBQ.L #0x4,A7 0002257c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022580 3f 01 |? | MOVE.W D1,-(A7) 00022582 3f 3c 00 46 |?< F | MOVE.W #0x46,-(A7) 00022586 4e 92 |N | JSR (A2) 00022588 50 4f |PO | ADDQ.L #0x8,A7 0002258a 4e 93 |N | JSR (A3) 0002258c 54 4f |TO | ADDQ.L #0x2,A7 0002258e 20 4f | O | MOVEA.L A7,A0 00022590 43 fa e2 d4 |C | LEA.L 0x20866,A1 00022594 70 46 |pF | MOVEQ.L #0x46,D0 00022596 10 d9 | | MOVE.B (A1)+,(A0)+ 00022598 51 c8 ff fc |Q | DBF D0,0x22596 0002259c 59 4f |YO | SUBQ.L #0x4,A7 0002259e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000225a2 3f 01 |? | MOVE.W D1,-(A7) 000225a4 3f 3c 00 47 |?< G | MOVE.W #0x47,-(A7) 000225a8 4e 92 |N | JSR (A2) 000225aa 50 4f |PO | ADDQ.L #0x8,A7 000225ac 4e 93 |N | JSR (A3) 000225ae de fc 00 24 | $ | ADDA.W #0x24,A7 000225b2 20 4f | O | MOVEA.L A7,A0 000225b4 43 fa e2 f8 |C | LEA.L 0x208ae,A1 000225b8 70 26 |p& | MOVEQ.L #0x26,D0 000225ba 10 d9 | | MOVE.B (A1)+,(A0)+ 000225bc 51 c8 ff fc |Q | DBF D0,0x225ba 000225c0 59 4f |YO | SUBQ.L #0x4,A7 000225c2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000225c6 3f 01 |? | MOVE.W D1,-(A7) 000225c8 3f 3c 00 27 |?< ' | MOVE.W #0x27,-(A7) 000225cc 4e 92 |N | JSR (A2) 000225ce 50 4f |PO | ADDQ.L #0x8,A7 000225d0 4e 93 |N | JSR (A3) 000225d2 de c2 | | ADDA.W D2,A7 000225d4 4c df 0f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3 000225d8 4e 5e |N^ | UNLK A6 000225da 4e 75 |Nu | RTS 000225dc ; -------------------------------------------------------------------------------------- 000225dc ; OMSI PASCAL Function 000225dc ; <LVAR 0x010 4(r)> 000225dc ; <LVAR 0x00c 4(r)> 000225dc ; <LVAR 0x008 4(r)> 000225dc ; -------------------------------------------------------------------------------------- 000225dc DISPATCH_CMDS(?): 000225dc 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 000225e0 bf d5 | | CMPA.L (A5),A7 000225e2 62 06 |b | BHI 0x225ea 000225e4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000225e8 4e 76 |Nv | TRAPV 000225ea de fc 00 1c | | ADDA.W #0x1c,A7 000225ee 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 000225f2 43 ee 00 0c |C | LEA.L (A6+0xc),A1 000225f6 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000225fa 10 bc 00 01 | | MOVE.B #0x01,(A0) 000225fe 59 4f |YO | SUBQ.L #0x4,A7 00022600 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 00022604 4e ba fe 6c |N l | JSR MATCH_CMDS(?) 00022608 58 4f |XO | ADDQ.L #0x4,A7 0002260a 20 1f | | MOVE.L (A7)+,D0 0002260c 53 80 |S | SUBQ.L #0x1,D0 0002260e 0c 80 00 00 00 08 | | CMPI.L #0x00000008,D0 00022614 62 62 |bb | BHI 0x22678 00022616 d0 40 | @ | ADD.W D0,D0 00022618 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00022620 00 12 | | .CONST 0x12 ; [0x0] -> 0x22632 00022622 00 1c | | .CONST 0x1c ; [0x1] -> 0x2263c 00022624 00 24 | $ | .CONST 0x24 ; [0x2] -> 0x22644 00022626 00 2c | , | .CONST 0x2c ; [0x3] -> 0x2264c 00022628 00 32 | 2 | .CONST 0x32 ; [0x4] -> 0x22652 0002262a 00 3a | : | .CONST 0x3a ; [0x5] -> 0x2265a 0002262c 00 42 | B | .CONST 0x42 ; [0x6] -> 0x22662 0002262e 00 4a | J | .CONST 0x4a ; [0x7] -> 0x2266a 00022630 00 52 | R | .CONST 0x52 ; [0x8] -> 0x22672 00022632 switch@0x22618[0x0]: 00022632 2f 11 |/ | MOVE.L (A1),-(A7) 00022634 4e ba f1 10 |N | JSR CMD_TEST(?) 00022638 58 4f |XO | ADDQ.L #0x4,A7 0002263a 60 3e |`> | BRA 0x2267a 0002263c switch@0x22618[0x1]: 0002263c 2f 11 |/ | MOVE.L (A1),-(A7) 0002263e 4e ba f4 a2 |N | JSR CMD_RUN(?) 00022642 60 f4 |` | BRA 0x22638 00022644 switch@0x22618[0x2]: 00022644 2f 11 |/ | MOVE.L (A1),-(A7) 00022646 4e ba f8 5c |N \ | JSR CMD_ERRMESS(?) 0002264a 60 ec |` | BRA 0x22638 0002264c switch@0x22618[0x3]: 0002264c 4e ba ee c0 |N | JSR CMD_INIT_STATE(?) 00022650 60 28 |`( | BRA 0x2267a 00022652 switch@0x22618[0x4]: 00022652 2f 11 |/ | MOVE.L (A1),-(A7) 00022654 4e ba fa 40 |N @ | JSR CMD_ISOLATE(?) 00022658 60 de |` | BRA 0x22638 0002265a switch@0x22618[0x5]: 0002265a 2f 11 |/ | MOVE.L (A1),-(A7) 0002265c 4e ba fa 7e |N ~ | JSR CMD_TRACE(?) 00022660 60 d6 |` | BRA 0x22638 00022662 switch@0x22618[0x6]: 00022662 2f 11 |/ | MOVE.L (A1),-(A7) 00022664 4e ba fa bc |N | JSR CMD_ULOAD(?) 00022668 60 ce |` | BRA 0x22638 0002266a switch@0x22618[0x7]: 0002266a 2f 11 |/ | MOVE.L (A1),-(A7) 0002266c 4e ba fc 1a |N | JSR CMD_MARGIN(?) 00022670 60 c6 |` | BRA 0x22638 00022672 switch@0x22618[0x8]: 00022672 4e ba fe a4 |N | JSR CMD_POWERDOWN(?) 00022676 60 02 |` | BRA 0x2267a 00022678 42 10 |B | CLR.B (A0) 0002267a 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 0002267e 4e 5e |N^ | UNLK A6 00022680 4e 75 |Nu | RTS 00022682 ; -------------------------------------------------------------------------------------- 00022682 ; OMSI PASCAL Function 00022682 ; <LVAR 0x008 4(r)> 00022682 ; <LVAR -0x002 @ 1(r)> 00022682 ; <LVAR -0x008 @ 1(r)> 00022682 ; -------------------------------------------------------------------------------------- 00022682 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 00022686 bf d5 | | CMPA.L (A5),A7 00022688 62 06 |b | BHI 0x22690 0002268a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002268e 4e 76 |Nv | TRAPV 00022690 de fc 00 50 | P | ADDA.W #0x50,A7 00022694 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00022698 45 f9 00 02 69 57 |E iW | LEA.L 0x26957,A2 0002269e 72 01 |r | MOVEQ.L #0x01,D1 000226a0 4e b9 00 01 03 98 |N | JSR FSCALL_10398 000226a6 13 c1 00 02 69 6d | im | MOVE.B D1,0x2696d 000226ac 13 c1 00 02 69 6e | in | MOVE.B D1,0x2696e 000226b2 13 c1 00 02 69 6f | io | MOVE.B D1,0x2696f 000226b8 42 39 00 02 69 70 |B9 ip | CLR.B 0x26970 000226be 48 79 00 02 69 72 |Hy ir | PEA.L 0x26972 000226c4 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000226ca 58 4f |XO | ADDQ.L #0x4,A7 000226cc 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000226d0 43 fa e2 80 |C | LEA.L t_DIAG_,A1 000226d4 70 09 |p | MOVEQ.L #0x09,D0 000226d6 10 d9 | | MOVE.B (A1)+,(A0)+ 000226d8 51 c8 ff fc |Q | DBF D0,0x226d6 000226dc 4e ba eb 22 |N " | JSR 0x21200 000226e0 48 6e ff f8 |Hn | PEA.L (A6-0x8) 000226e4 48 6e ff fe |Hn | PEA.L (A6-0x2) 000226e8 4e b9 00 01 05 7a |N z | JSR Read_HARDWARE.M200_CONFIG(a : Pointer; VAR status : Bool) 000226ee 50 4f |PO | ADDQ.L #0x8,A7 000226f0 4a 2e ff fe |J. | TST.B (A6-0x2) 000226f4 67 06 |g | BEQ 0x226fc 000226f6 14 ae ff f8 | | MOVE.B (A6-0x8),(A2) 000226fa 60 02 |` | BRA 0x226fe 000226fc 42 12 |B | CLR.B (A2) 000226fe 4a 12 |J | TST.B (A2) 00022700 67 5a |gZ | BEQ 0x2275c 00022702 9e fc 00 24 | $ | SUBA.W #0x24,A7 00022706 20 4f | O | MOVEA.L A7,A0 00022708 43 fa e1 f8 |C | LEA.L 0x20902,A1 0002270c 70 22 |p" | MOVEQ.L #0x22,D0 0002270e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022710 51 c8 ff fc |Q | DBF D0,0x2270e 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 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 00022720 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022726 50 4f |PO | ADDQ.L #0x8,A7 00022728 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002272e de fc 00 28 | ( | ADDA.W #0x28,A7 00022732 41 fa e2 1e |A | LEA.L t_DIAG_,A0 00022736 70 0a |p | MOVEQ.L #0x0a,D0 00022738 2f 20 |/ | MOVE.L -(A0),-(A7) 0002273a 51 c8 ff fc |Q | DBF D0,0x22738 0002273e 59 4f |YO | SUBQ.L #0x4,A7 00022740 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022744 3f 01 |? | MOVE.W D1,-(A7) 00022746 3f 3c 00 2c |?< , | MOVE.W #0x2c,-(A7) 0002274a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022750 50 4f |PO | ADDQ.L #0x8,A7 00022752 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022758 de fc 00 30 | 0 | ADDA.W #0x30,A7 0002275c 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00022760 4e 5e |N^ | UNLK A6 00022762 4e 75 |Nu | RTS 00022764 ; -------------------------------------------------------------------------------------- 00022764 ; COMMAND TABLE 00022764 ; -------------------------------------------------------------------------------------- 00022764 COMMAND_TABLE_22764: 00022764 21 40 23 24 25 5e 26 2a |!@#$%^&*| .TXT '!@#$%^&*()' 0002276e 57 52 49 54 45 20 20 20 |WRITE | .TXT 'WRITE ' 00022778 42 59 45 20 20 20 20 20 |BYE | .TXT 'BYE ' 00022782 48 45 41 50 20 20 20 20 |HEAP | .TXT 'HEAP ' 0002278c 48 45 4c 50 20 20 20 20 |HELP | .TXT 'HELP ' 00022796 41 42 4f 52 54 20 20 20 |ABORT | .TXT 'ABORT ' 000227a0 43 4f 4d 4d 45 4e 54 20 |COMMENT | .TXT 'COMMENT ' 000227aa 53 45 54 20 20 20 20 20 |SET | .TXT 'SET ' 000227b4 56 41 52 20 20 20 20 20 |VAR | .TXT 'VAR ' 000227be 56 41 52 53 20 20 20 20 |VARS | .TXT 'VARS ' 000227c8 45 51 20 20 20 20 20 20 |EQ | .TXT 'EQ ' 000227d2 4e 45 20 20 20 20 20 20 |NE | .TXT 'NE ' 000227dc 43 41 53 45 20 20 20 20 |CASE | .TXT 'CASE ' 000227e6 49 4e 53 45 52 54 20 20 |INSERT | .TXT 'INSERT ' 000227f0 45 58 54 52 41 43 54 20 |EXTRACT | .TXT 'EXTRACT ' 000227fa 23 43 41 53 45 20 20 20 |#CASE | .TXT '#CASE ' 00022804 23 45 51 20 20 20 20 20 |#EQ | .TXT '#EQ ' 0002280e 23 4e 45 20 20 20 20 20 |#NE | .TXT '#NE ' 00022818 23 4c 54 20 20 20 20 20 |#LT | .TXT '#LT ' 00022822 23 47 54 20 20 20 20 20 |#GT | .TXT '#GT ' 0002282c 23 4c 45 20 20 20 20 20 |#LE | .TXT '#LE ' 00022836 23 47 45 20 20 20 20 20 |#GE | .TXT '#GE ' 00022840 41 44 44 20 20 20 20 20 |ADD | .TXT 'ADD ' 0002284a 53 55 42 20 20 20 20 20 |SUB | .TXT 'SUB ' 00022854 4d 55 4c 20 20 20 20 20 |MUL | .TXT 'MUL ' 0002285e 44 49 56 20 20 20 20 20 |DIV | .TXT 'DIV ' 00022868 4d 4f 44 20 20 20 20 20 |MOD | .TXT 'MOD ' 00022872 4f 52 20 20 20 20 20 20 |OR | .TXT 'OR ' 0002287c 41 4e 44 20 20 20 20 20 |AND | .TXT 'AND ' 00022886 58 4f 52 20 20 20 20 20 |XOR | .TXT 'XOR ' 00022890 4c 53 48 49 46 54 20 20 |LSHIFT | .TXT 'LSHIFT ' 0002289a 52 53 48 49 46 54 20 20 |RSHIFT | .TXT 'RSHIFT ' 000228a4 4e 4f 54 20 20 20 20 20 |NOT | .TXT 'NOT ' 000228ae 23 49 4e 53 45 52 54 20 |#INSERT | .TXT '#INSERT ' 000228b8 23 45 58 54 52 41 43 54 |#EXTRACT| .TXT '#EXTRACT ' 000228c2 52 45 41 44 20 20 20 20 |READ | .TXT 'READ ' 000228cc 4b 49 4c 4c 20 20 20 20 |KILL | .TXT 'KILL ' 000228d6 50 55 53 48 20 20 20 20 |PUSH | .TXT 'PUSH ' 000228e0 4c 45 56 45 4c 20 20 20 |LEVEL | .TXT 'LEVEL ' 000228ea 43 4f 4e 56 45 52 54 20 |CONVERT | .TXT 'CONVERT ' 000228f4 43 4f 55 4e 54 5f 4f 4e |COUNT_ON| .TXT 'COUNT_ONES' 000228fe 52 45 50 45 41 54 20 20 |REPEAT | .TXT 'REPEAT ' 00022908 4d 4f 44 45 4c 20 20 20 |MODEL | .TXT 'MODEL ' 00022912 41 53 43 49 49 20 20 20 |ASCII | .TXT 'ASCII ' 0002291c 57 72 6f 6e 67 20 6e 75 |Wrong nu| .TXT 'Wrong number of arguments for :_' 0002293c 45 51 2c 4e |EQ,N | .XXX[0x4] 00022940 45 2c 23 45 51 2c 23 4e |E,#EQ,#N| .XXX[0x38] 00022948 45 2c 23 4c 54 2c 23 47 |E,#LT,#G| 00022950 54 2c 23 4c 45 2c 23 47 |T,#LE,#G| 00022958 45 2c 45 4c 53 45 5d 45 |E,ELSE]E| 00022960 4e 44 5d 43 41 53 45 2c |ND]CASE,| 00022968 23 43 41 53 45 2c 57 48 |#CASE,WH| 00022970 45 4e 2c 45 4e 44 43 41 |EN,ENDCA| 00022978 53 45 5d 20 |SE] | .XXX[0x4] 0002297c 45 76 61 6c 75 61 74 69 |Evaluati| .TXT 'Evaluation buffer overflow. ' 00022998 55 6e 62 61 6c 61 6e 63 |Unbalanc| .TXT 'Unbalanced [ELSE] or [END]! ' 000229b4 5b 57 48 45 4e 20 5d 20 |[WHEN ] | .TXT '[WHEN ] ' 000229be 4e 6f 20 63 61 73 65 20 |No case | .TXT 'No case alternative found!' 000229d8 4e 6f 20 5b 45 4e 44 43 |No [ENDC| .TXT 'No [ENDCASE] found! ' 000229ec 4e 6f 20 68 65 6c 70 20 |No help | .TXT 'No help available for_' 00022a02 2e 48 4c 50 |.HLP | .TXT '.HLP' 00022a06 54 6f 6f 20 66 65 77 20 |Too few | .TXT 'Too few arguments for SET ' 00022a20 55 6e 6b 6e 6f 77 6e 20 |Unknown | .TXT 'Unknown variable :_ ' 00022a34 20 69 73 20 6e 6f 74 20 | is not | .TXT ' is not a program.' 00022a46 43 4c |CL | .TXT 'CL' 00022a48 49 20 2e 4d 31 30 30 20 |I .M100 | .XXX[0x8] 00022a50 2e 4d 32 30 30 20 |.M200 | .TXT '.M200 ' 00022a56 53 54 |ST | .TXT 'ST' 00022a58 41 54 |AT | .TXT 'AT' 00022a5a 55 53 |US | .TXT 'US' 00022a5c 52 45 |RE | .TXT 'RE' 00022a5e 53 55 |SU | .TXT 'SU' 00022a60 4c 54 |LT | .TXT 'LT' 00022a62 4f 66 66 73 65 74 2f 4c |Offset/L| .TXT 'Offset/Length error in [INSERT] ' 00022a82 52 45 50 45 41 54 69 6e |REPEATin| .TXT 'REPEATing, type ^G to exit. ' 00022a9e 41 53 43 49 49 20 61 72 |ASCII ar| .TXT 'ASCII argument out of range.' 00022aba 4e 6f 74 20 61 20 63 6f |Not a co| .TXT 'Not a command or macro :_ ' 00022ad4 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal marker argument ' 00022aec 53 77 69 74 63 68 20 65 |Switch e| .TXT 'Switch exclusion is unimplemented.' 00022b0e 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal argument marker.' 00022b26 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal argument marker.' 00022b3e 5b 49 4e 49 54 5d 5b 20 |[INIT][ | .TXT '[INIT][ ' 00022b46 5d 5b 42 59 45 5d 3b 20 |][BYE]; | .TXT '][BYE]; ' 00022b4e 5b 49 4e 49 54 5d 3b 20 |[INIT]; | .TXT '[INIT]; ' 00022b56 3e 5f |>_ | .TXT '>_' 00022b58 5b 20 |[ | .TXT '[ ' 00022b5a 5d 3b |]; | .TXT '];' 00022b5c ; -------------------------------------------------------------------------------------- 00022b5c ; COMMAND TABLE 00022b5c ; -------------------------------------------------------------------------------------- 00022b5c COMMAND_TABLE_22b5c: 00022b5c 21 40 23 24 25 5e 26 2a |!@#$%^&*| .TXT '!@#$%^&*()' 00022b66 57 52 49 54 45 20 20 20 |WRITE | .TXT 'WRITE ' 00022b70 42 59 45 20 20 20 20 20 |BYE | .TXT 'BYE ' 00022b7a 48 45 41 50 20 20 20 20 |HEAP | .TXT 'HEAP ' 00022b84 48 45 4c 50 20 20 20 20 |HELP | .TXT 'HELP ' 00022b8e 41 42 4f 52 54 20 20 20 |ABORT | .TXT 'ABORT ' 00022b98 43 4f 4d 4d 45 4e 54 20 |COMMENT | .TXT 'COMMENT ' 00022ba2 53 45 54 20 20 20 20 20 |SET | .TXT 'SET ' 00022bac 56 41 52 20 20 20 20 20 |VAR | .TXT 'VAR ' 00022bb6 56 41 52 53 20 20 20 20 |VARS | .TXT 'VARS ' 00022bc0 45 51 20 20 20 20 20 20 |EQ | .TXT 'EQ ' 00022bca 4e 45 20 20 20 20 20 20 |NE | .TXT 'NE ' 00022bd4 43 41 53 45 20 20 20 20 |CASE | .TXT 'CASE ' 00022bde 49 4e 53 45 52 54 20 20 |INSERT | .TXT 'INSERT ' 00022be8 45 58 54 52 41 43 54 20 |EXTRACT | .TXT 'EXTRACT ' 00022bf2 23 43 41 53 45 20 20 20 |#CASE | .TXT '#CASE ' 00022bfc 23 45 51 20 20 20 20 20 |#EQ | .TXT '#EQ ' 00022c06 23 4e 45 20 20 20 20 20 |#NE | .TXT '#NE ' 00022c10 23 4c 54 20 20 20 20 20 |#LT | .TXT '#LT ' 00022c1a 23 47 54 20 20 20 20 20 |#GT | .TXT '#GT ' 00022c24 23 4c 45 20 20 20 20 20 |#LE | .TXT '#LE ' 00022c2e 23 47 45 20 20 20 20 20 |#GE | .TXT '#GE ' 00022c38 41 44 44 20 20 20 20 20 |ADD | .TXT 'ADD ' 00022c42 53 55 42 20 20 20 20 20 |SUB | .TXT 'SUB ' 00022c4c 4d 55 4c 20 20 20 20 20 |MUL | .TXT 'MUL ' 00022c56 44 49 56 20 20 20 20 20 |DIV | .TXT 'DIV ' 00022c60 4d 4f 44 20 20 20 20 20 |MOD | .TXT 'MOD ' 00022c6a 4f 52 20 20 20 20 20 20 |OR | .TXT 'OR ' 00022c74 41 4e 44 20 20 20 20 20 |AND | .TXT 'AND ' 00022c7e 58 4f 52 20 20 20 20 20 |XOR | .TXT 'XOR ' 00022c88 4c 53 48 49 46 54 20 20 |LSHIFT | .TXT 'LSHIFT ' 00022c92 52 53 48 49 46 54 20 20 |RSHIFT | .TXT 'RSHIFT ' 00022c9c 4e 4f 54 20 20 20 20 20 |NOT | .TXT 'NOT ' 00022ca6 23 49 4e 53 45 52 54 20 |#INSERT | .TXT '#INSERT ' 00022cb0 23 45 58 54 52 41 43 54 |#EXTRACT| .TXT '#EXTRACT ' 00022cba 52 45 41 44 20 20 20 20 |READ | .TXT 'READ ' 00022cc4 4b 49 4c 4c 20 20 20 20 |KILL | .TXT 'KILL ' 00022cce 50 55 53 48 20 20 20 20 |PUSH | .TXT 'PUSH ' 00022cd8 4c 45 56 45 4c 20 20 20 |LEVEL | .TXT 'LEVEL ' 00022ce2 43 4f 4e 56 45 52 54 20 |CONVERT | .TXT 'CONVERT ' 00022cec 43 4f 55 4e 54 5f 4f 4e |COUNT_ON| .TXT 'COUNT_ONES' 00022cf6 52 45 50 45 41 54 20 20 |REPEAT | .TXT 'REPEAT ' 00022d00 4d 4f 44 45 4c 20 20 20 |MODEL | .TXT 'MODEL ' 00022d0a 41 53 43 49 49 20 20 20 |ASCII | .TXT 'ASCII ' 00022d14 a5 34 45 73 | 4Es | .XXX[0x4] 00022d18 34 22 46 75 33 33 33 33 |4"Fu3333| .XXX[0x98] 00022d20 33 32 33 66 37 84 44 57 |323f7 DW| 00022d28 a6 55 0f 00 f0 ff 10 22 | U "| 00022d30 14 31 22 22 22 22 22 22 | 1""""""| 00022d38 22 22 14 3f 1f 03 10 0f |"" ? | 00022d40 00 00 00 00 ff ff ff ff | | 00022d48 00 01 01 00 01 01 00 01 | | 00022d50 02 00 00 01 02 00 01 02 | | 00022d58 00 01 14 06 01 14 08 14 | | 00022d60 0f 02 03 14 14 08 14 0f | | 00022d68 14 14 14 14 14 14 14 04 | | 00022d70 14 05 14 14 14 14 14 14 | | 00022d78 14 14 14 14 14 04 14 14 | | 00022d80 14 14 14 14 04 14 07 14 | | 00022d88 14 14 14 04 14 14 14 14 | | 00022d90 14 14 0c 14 14 09 14 14 | | 00022d98 14 0d 14 14 14 0b 0a 14 | | 00022da0 0e 14 14 14 08 14 14 0c | | 00022da8 14 14 09 14 14 14 14 14 | | 00022db0 14 14 14 14 14 14 14 14 | | .BLANK 14[0x10] 00022dc0 14 14 14 10 14 14 11 14 | | .XXX[0x20] 00022dc8 14 14 14 14 14 14 14 14 | | 00022dd0 14 13 14 14 14 14 14 12 | | 00022dd8 14 14 14 11 14 14 14 14 | | 00022de0 14 14 14 14 14 14 | | .XXX[0x6] 00022de6 ; -------------------------------------------------------------------------------------- 00022de6 ; OMSI PASCAL Function 00022de6 ; <LVAR 0x008 4(r)> 00022de6 ; <LVAR -0x004 @ 4(w)> 00022de6 ; -------------------------------------------------------------------------------------- 00022de6 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 00022dea bf d5 | | CMPA.L (A5),A7 00022dec 62 06 |b | BHI 0x22df4 00022dee 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022df2 4e 76 |Nv | TRAPV 00022df4 de fc 00 10 | | ADDA.W #0x10,A7 00022df8 48 e7 00 08 |H | MOVEM.L A4,-(A7) 00022dfc 28 6e 00 08 |(n | MOVEA.L (A6+0x8),A4 00022e00 b8 fc 00 01 | | CMPA.W #0x1,A4 00022e04 67 1a |g | BEQ 0x22e20 00022e06 2d 4c ff fc |-L | MOVE.L A4,(A6-0x4) 00022e0a 28 6c 00 08 |(l | MOVEA.L (A4+0x8),A4 00022e0e 48 6e ff fc |Hn | PEA.L (A6-0x4) 00022e12 48 78 00 0c |Hx | PEA.L 0xc 00022e16 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 00022e1c 50 4f |PO | ADDQ.L #0x8,A7 00022e1e 60 e0 |` | BRA 0x22e00 00022e20 4c df 10 00 |L | MOVEM.L (A7)+,A4 00022e24 4e 5e |N^ | UNLK A6 00022e26 4e 75 |Nu | RTS 00022e28 ; -------------------------------------------------------------------------------------- 00022e28 ; OMSI PASCAL Function 00022e28 ; <LVAR 0x008 4(r)> 00022e28 ; -------------------------------------------------------------------------------------- 00022e28 4e 56 ff f0 |NV | LINK.W A6,#0xfff0 00022e2c bf d5 | | CMPA.L (A5),A7 00022e2e 62 06 |b | BHI 0x22e36 00022e30 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022e34 4e 76 |Nv | TRAPV 00022e36 de fc 00 10 | | ADDA.W #0x10,A7 00022e3a 48 e7 00 80 |H | MOVEM.L A0,-(A7) 00022e3e 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022e42 b0 fc 00 01 | | CMPA.W #0x1,A0 00022e46 67 0a |g | BEQ 0x22e52 00022e48 2f 08 |/ | MOVE.L A0,-(A7) 00022e4a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022e50 58 4f |XO | ADDQ.L #0x4,A7 00022e52 2e 6d 00 08 |.m | MOVEA.L (A5+0x8),A7 00022e56 3c 7c 00 00 |<| | MOVEA.W #0x0,A6 00022e5a 4e f9 00 02 67 a4 |N g | JMP 0x267a4 00022e60 4c df 01 00 |L | MOVEM.L (A7)+,A0 00022e64 4e 5e |N^ | UNLK A6 00022e66 4e 75 |Nu | RTS 00022e68 ; -------------------------------------------------------------------------------------- 00022e68 ; OMSI PASCAL Function 00022e68 ; <LVAR 0x008 4(w)> 00022e68 ; -------------------------------------------------------------------------------------- 00022e68 4e 56 ff fc |NV | LINK.W A6,#0xfffc 00022e6c bf d5 | | CMPA.L (A5),A7 00022e6e 62 06 |b | BHI 0x22e76 00022e70 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022e74 4e 76 |Nv | TRAPV 00022e76 de fc 00 04 | | ADDA.W #0x4,A7 00022e7a 2d 79 00 02 79 7e 00 08 |-y y~ | MOVE.L 0x2797e,(A6+0x8) 00022e82 4e 5e |N^ | UNLK A6 00022e84 4e 75 |Nu | RTS 00022e86 ; -------------------------------------------------------------------------------------- 00022e86 ; OMSI PASCAL Function 00022e86 ; <LVAR 0x008 1(rw)> 00022e86 ; -------------------------------------------------------------------------------------- 00022e86 4e 56 ff f0 |NV | LINK.W A6,#0xfff0 00022e8a bf d5 | | CMPA.L (A5),A7 00022e8c 62 06 |b | BHI 0x22e94 00022e8e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022e92 4e 76 |Nv | TRAPV 00022e94 de fc 00 10 | | ADDA.W #0x10,A7 00022e98 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00022e9c 20 39 00 02 79 7e | 9 y~ | MOVE.L 0x2797e,D0 00022ea2 b0 b9 00 02 79 82 | y | CMP.L eval_buffer?,D0 00022ea8 6f 06 |o | BLE 0x22eb0 00022eaa 42 2e 00 08 |B. | CLR.B (A6+0x8) 00022eae 60 0c |` | BRA 0x22ebc 00022eb0 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 00022eb6 1d 70 08 07 00 08 | p | MOVE.B (A0+D0.L+#0x7),(A6+0x8) 00022ebc 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00022ec0 4e 5e |N^ | UNLK A6 00022ec2 4e 75 |Nu | RTS 00022ec4 ; -------------------------------------------------------------------------------------- 00022ec4 ; OMSI PASCAL Function 00022ec4 ; <LVAR 0x008 1(rw)> 00022ec4 ; -------------------------------------------------------------------------------------- 00022ec4 4e 56 ff ec |NV | LINK.W A6,#0xffec 00022ec8 bf d5 | | CMPA.L (A5),A7 00022eca 62 06 |b | BHI 0x22ed2 00022ecc 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022ed0 4e 76 |Nv | TRAPV 00022ed2 de fc 00 14 | | ADDA.W #0x14,A7 00022ed6 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00022eda 43 f9 00 02 79 7e |C y~ | LEA.L 0x2797e,A1 00022ee0 20 11 | | MOVE.L (A1),D0 00022ee2 b0 b9 00 02 79 82 | y | CMP.L eval_buffer?,D0 00022ee8 6f 06 |o | BLE 0x22ef0 00022eea 42 2e 00 08 |B. | CLR.B (A6+0x8) 00022eee 60 0c |` | BRA 0x22efc 00022ef0 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 00022ef6 1d 70 08 07 00 08 | p | MOVE.B (A0+D0.L+#0x7),(A6+0x8) 00022efc 52 80 |R | ADDQ.L #0x1,D0 00022efe 22 80 |" | MOVE.L D0,(A1) 00022f00 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00022f04 4e 5e |N^ | UNLK A6 00022f06 4e 75 |Nu | RTS 00022f08 ; -------------------------------------------------------------------------------------- 00022f08 ; OMSI PASCAL Function 00022f08 ; <LVAR 0x00c 4(r)> 00022f08 ; <LVAR 0x008 4(r)> 00022f08 ; -------------------------------------------------------------------------------------- 00022f08 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 00022f0c bf d5 | | CMPA.L (A5),A7 00022f0e 62 06 |b | BHI 0x22f16 00022f10 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022f14 4e 76 |Nv | TRAPV 00022f16 de fc 00 38 | 8 | ADDA.W #0x38,A7 00022f1a 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022f1e 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00022f22 47 f9 00 02 79 7e |G y~ | LEA.L 0x2797e,A3 00022f28 72 5b |r[ | MOVEQ.L #0x5b,D1 00022f2a 74 02 |t | MOVEQ.L #0x02,D2 00022f2c 76 2c |v, | MOVEQ.L #0x2c,D3 00022f2e 78 3b |x; | MOVEQ.L #0x3b,D4 00022f30 55 4f |UO | SUBQ.L #0x2,A7 00022f32 4e ba ff 52 |N R | JSR 0x22e86 00022f36 10 1f | | MOVE.B (A7)+,D0 00022f38 b0 01 | | CMP.B D1,D0 00022f3a 66 0c |f | BNE 0x22f48 00022f3c 4e b9 00 02 62 6c |N bl | JSR 0x2626c 00022f42 60 ff 00 00 00 94 |` | BRA 0x22fd8 00022f48 2c 13 |, | MOVE.L (A3),D6 00022f4a 55 4f |UO | SUBQ.L #0x2,A7 00022f4c 4e ba ff 76 |N v | JSR 0x22ec4 00022f50 1a 1f | | MOVE.B (A7)+,D5 00022f52 66 18 |f | BNE 0x22f6c 00022f54 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00022f58 43 fa fd e6 |C | LEA.L 0x22d40,A1 00022f5c 70 07 |p | MOVEQ.L #0x07,D0 00022f5e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022f60 51 c8 ff fc |Q | DBF D0,0x22f5e 00022f64 20 52 | R | MOVEA.L (A2),A0 00022f66 10 82 | | MOVE.B D2,(A0) 00022f68 60 74 |`t | BRA 0x22fde 00022f6a 60 5c |`\ | .XXX[0x2] 00022f6c ba 03 | | CMP.B D3,D5 00022f6e 66 08 |f | BNE 0x22f78 00022f70 20 52 | R | MOVEA.L (A2),A0 00022f72 10 bc 00 03 | | MOVE.B #0x03,(A0) 00022f76 60 50 |`P | BRA 0x22fc8 00022f78 ba 04 | | CMP.B D4,D5 00022f7a 66 08 |f | BNE 0x22f84 00022f7c 20 52 | R | MOVEA.L (A2),A0 00022f7e 10 bc 00 01 | | MOVE.B #0x01,(A0) 00022f82 60 44 |`D | BRA 0x22fc8 00022f84 0c 05 00 5d | ] | CMPI.B #0x5d,D5 00022f88 66 06 |f | BNE 0x22f90 00022f8a 20 52 | R | MOVEA.L (A2),A0 00022f8c 10 82 | | MOVE.B D2,(A0) 00022f8e 60 38 |`8 | BRA 0x22fc8 00022f90 20 52 | R | MOVEA.L (A2),A0 00022f92 42 10 |B | CLR.B (A0) 00022f94 55 4f |UO | SUBQ.L #0x2,A7 00022f96 4e ba fe ee |N | JSR 0x22e86 00022f9a 1e 1f | | MOVE.B (A7)+,D7 00022f9c be 01 | | CMP.B D1,D7 00022f9e 66 08 |f | BNE 0x22fa8 00022fa0 4e b9 00 02 62 6c |N bl | JSR 0x2626c 00022fa6 60 1e |` | BRA 0x22fc6 00022fa8 be 04 | | CMP.B D4,D7 00022faa 67 0e |g | BEQ 0x22fba 00022fac be 03 | | CMP.B D3,D7 00022fae 67 0a |g | BEQ 0x22fba 00022fb0 0c 07 00 5d | ] | CMPI.B #0x5d,D7 00022fb4 67 04 |g | BEQ 0x22fba 00022fb6 4a 07 |J | TST.B D7 00022fb8 66 04 |f | BNE 0x22fbe 00022fba 60 0c |` | BRA 0x22fc8 00022fbc 60 08 |` | .XXX[0x2] 00022fbe 55 4f |UO | SUBQ.L #0x2,A7 00022fc0 4e ba ff 02 |N | JSR 0x22ec4 00022fc4 1e 1f | | MOVE.B (A7)+,D7 00022fc6 60 cc |` | BRA 0x22f94 00022fc8 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00022fcc 20 86 | | MOVE.L D6,(A0) 00022fce 21 53 00 04 |!S | MOVE.L (A3),(A0+0x4) 00022fd2 53 a8 00 04 |S | SUBQ.L #0x1,(A0+0x4) 00022fd6 60 06 |` | BRA 0x22fde 00022fd8 60 ff ff ff ff 56 |` V | BRA 0x22f30 00022fde 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 00022fe2 4e 5e |N^ | UNLK A6 00022fe4 4e 75 |Nu | RTS 00022fe6 ; -------------------------------------------------------------------------------------- 00022fe6 ; OMSI PASCAL Function 00022fe6 ; <LVAR 0x010 4(r)> 00022fe6 ; <LVAR 0x00c 4(r)> 00022fe6 ; <LVAR 0x008 4(r)> 00022fe6 ; <LVAR -0x004 @ 1(rw)> 00022fe6 ; <LVAR -0x008 4(w)> 00022fe6 ; <LVAR -0x00c @ 4(w)> 00022fe6 ; -------------------------------------------------------------------------------------- 00022fe6 4e 56 ff ca |NV | LINK.W A6,#0xffca 00022fea bf d5 | | CMPA.L (A5),A7 00022fec 62 06 |b | BHI 0x22ff4 00022fee 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022ff2 4e 76 |Nv | TRAPV 00022ff4 de fc 00 2a | * | ADDA.W #0x2a,A7 00022ff8 48 e7 c0 f0 |H | MOVEM.L A3+A2+A1+A0+D1+D0,-(A7) 00022ffc 45 ee ff fc |E | LEA.L (A6-0x4),A2 00023000 47 ee ff f4 |G | LEA.L (A6-0xc),A3 00023004 72 03 |r | MOVEQ.L #0x03,D1 00023006 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002300a 10 10 | | MOVE.B (A0),D0 0002300c 0c 00 00 01 | | CMPI.B #0x01,D0 00023010 67 06 |g | BEQ 0x23018 00023012 0c 00 00 02 | | CMPI.B #0x02,D0 00023016 66 0e |f | BNE 0x23026 00023018 26 ba fd 26 |& & | MOVE.L 0x22d40,(A3) 0002301c 2d 7a fd 26 ff f8 |-z & | MOVE.L 0x22d44,(A6-0x8) 00023022 14 80 | | MOVE.B D0,(A2) 00023024 60 3c |`< | BRA 0x23062 00023026 48 53 |HS | PEA.L (A3) 00023028 48 52 |HR | PEA.L (A2) 0002302a 4e ba fe dc |N | JSR 0x22f08 0002302e 50 4f |PO | ADDQ.L #0x8,A7 00023030 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023034 4a 12 |J | TST.B (A2) 00023036 67 1c |g | BEQ 0x23054 00023038 10 10 | | MOVE.B (A0),D0 0002303a b0 01 | | CMP.B D1,D0 0002303c 66 16 |f | BNE 0x23054 0002303e 10 12 | | MOVE.B (A2),D0 00023040 48 80 |H | EXTB.W D0 00023042 41 81 |A | CHK.W D1,D0 00023044 10 80 | | MOVE.B D0,(A0) 00023046 26 ba fc f8 |& | MOVE.L 0x22d40,(A3) 0002304a 2d 7a fc f8 ff f8 |-z | MOVE.L 0x22d44,(A6-0x8) 00023050 42 12 |B | CLR.B (A2) 00023052 60 08 |` | BRA 0x2305c 00023054 10 12 | | MOVE.B (A2),D0 00023056 48 80 |H | EXTB.W D0 00023058 41 81 |A | CHK.W D1,D0 0002305a 10 80 | | MOVE.B D0,(A0) 0002305c 10 12 | | MOVE.B (A2),D0 0002305e b0 01 | | CMP.B D1,D0 00023060 67 c4 |g | BEQ 0x23026 00023062 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00023066 22 4b |"K | MOVEA.L A3,A1 00023068 70 07 |p | MOVEQ.L #0x07,D0 0002306a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002306c 51 c8 ff fc |Q | DBF D0,0x2306a 00023070 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00023074 10 12 | | MOVE.B (A2),D0 00023076 48 80 |H | EXTB.W D0 00023078 41 81 |A | CHK.W D1,D0 0002307a 10 80 | | MOVE.B D0,(A0) 0002307c 4c df 0f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3 00023080 4e 5e |N^ | UNLK A6 00023082 4e 75 |Nu | RTS 00023084 ; -------------------------------------------------------------------------------------- 00023084 ; OMSI PASCAL Function 00023084 ; <LVAR 0x008 4(rw)> 00023084 ; <LVAR -0x004 1(rw)> 00023084 ; <LVAR -0x010 2(rw)> 00023084 ; -------------------------------------------------------------------------------------- 00023084 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 00023088 bf d5 | | CMPA.L (A5),A7 0002308a 62 06 |b | BHI 0x23092 0002308c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023090 4e 76 |Nv | TRAPV 00023092 de fc 00 30 | 0 | ADDA.W #0x30,A7 00023096 48 e7 c7 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 0002309a 43 ee ff f0 |C | LEA.L (A6-0x10),A1 0002309e 45 ee ff fc |E | LEA.L (A6-0x4),A2 000230a2 47 ee 00 08 |G | LEA.L (A6+0x8),A3 000230a6 72 20 |r | MOVEQ.L #0x20,D1 000230a8 7c 01 || | MOVEQ.L #0x01,D6 000230aa 42 51 |BQ | CLR.W (A1) 000230ac 7a 01 |z | MOVEQ.L #0x01,D5 000230ae 59 4f |YO | SUBQ.L #0x4,A7 000230b0 2f 13 |/ | MOVE.L (A3),-(A7) 000230b2 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 000230b8 58 4f |XO | ADDQ.L #0x4,A7 000230ba 26 9f |& | MOVE.L (A7)+,(A3) 000230bc 20 53 | S | MOVEA.L (A3),A0 000230be 2f 08 |/ | MOVE.L A0,-(A7) 000230c0 20 57 | W | MOVEA.L (A7),A0 000230c2 30 10 |0 | MOVE.W (A0),D0 000230c4 48 c0 |H | EXTW.L D0 000230c6 bc 80 | | CMP.L D0,D6 000230c8 6e ff 00 00 00 b4 |n | BGT 0x2317e 000230ce 42 80 |B | CLR.L D0 000230d0 10 30 68 01 | 0h | MOVE.B (A0+D6.L+#0x1),D0 000230d4 02 40 00 7f | @ | ANDI.W #0x007f,D0 000230d8 14 80 | | MOVE.B D0,(A2) 000230da 0c 00 00 09 | | CMPI.B #0x09,D0 000230de 66 02 |f | BNE 0x230e2 000230e0 14 81 | | MOVE.B D1,(A2) 000230e2 42 80 |B | CLR.L D0 000230e4 10 12 | | MOVE.B (A2),D0 000230e6 90 41 | A | SUB.W D1,D0 000230e8 0c 40 00 0c | @ | CMPI.W #0x000c,D0 000230ec 62 30 |b0 | BHI switch@0x230f0[0x2] 000230ee d0 40 | @ | ADD.W D0,D0 000230f0 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000230f8 00 1e | | .CONST 0x1e ; [0x0] -> 0x23116 000230fa 00 1a | | .CONST 0x1a ; [0x1] -> 0x23112 000230fc 00 26 | & | .CONST 0x26 ; [0x2] -> 0x2311e 000230fe 00 26 | & | .CONST 0x26 ; [0x3] -> 0x2311e 00023100 00 26 | & | .CONST 0x26 ; [0x4] -> 0x2311e 00023102 00 26 | & | .CONST 0x26 ; [0x5] -> 0x2311e 00023104 00 26 | & | .CONST 0x26 ; [0x6] -> 0x2311e 00023106 00 26 | & | .CONST 0x26 ; [0x7] -> 0x2311e 00023108 00 26 | & | .CONST 0x26 ; [0x8] -> 0x2311e 0002310a 00 26 | & | .CONST 0x26 ; [0x9] -> 0x2311e 0002310c 00 26 | & | .CONST 0x26 ; [0xa] -> 0x2311e 0002310e 00 26 | & | .CONST 0x26 ; [0xb] -> 0x2311e 00023110 00 22 | " | .CONST 0x22 ; [0xc] -> 0x2311a 00023112 switch@0x230f0[0x1]: 00023112 60 6a |`j | BRA 0x2317e 00023114 60 0a |` | .XXX[0x2] 00023116 switch@0x230f0[0x0]: 00023116 7e 00 |~ | MOVEQ.L #0x00,D7 00023118 60 06 |` | BRA 0x23120 0002311a switch@0x230f0[0xc]: 0002311a 7e 01 |~ | MOVEQ.L #0x01,D7 0002311c 60 02 |` | BRA 0x23120 0002311e switch@0x230f0[0x2]: 0002311e switch@0x230f0[0x3]: 0002311e switch@0x230f0[0x4]: 0002311e switch@0x230f0[0x5]: 0002311e switch@0x230f0[0x6]: 0002311e switch@0x230f0[0x7]: 0002311e switch@0x230f0[0x8]: 0002311e switch@0x230f0[0x9]: 0002311e switch@0x230f0[0xa]: 0002311e switch@0x230f0[0xb]: 0002311e 7e 02 |~ | MOVEQ.L #0x02,D7 00023120 70 03 |p | MOVEQ.L #0x03,D0 00023122 c1 d1 | | MULS.W (A1),D0 00023124 41 fa fc 22 |A " | LEA.L 0x22d48,A0 00023128 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 0002312c 42 80 |B | CLR.L D0 0002312e 10 30 70 00 | 0p | MOVE.B (A0+D7.W),D0 00023132 0c 40 00 02 | @ | CMPI.W #0x0002,D0 00023136 63 02 |c | BLS 0x2313a 00023138 4e 4e |NN | TRAP #14 0002313a d0 40 | @ | ADD.W D0,D0 0002313c 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00023144 00 06 | | .CONST 0x6 ; [0x0] -> 0x2314a 00023146 00 08 | | .CONST 0x8 ; [0x1] -> 0x2314c 00023148 00 12 | | .CONST 0x12 ; [0x2] -> 0x23156 0002314a switch@0x2313c[0x0]: 0002314a 60 16 |` | BRA 0x23162 0002314c switch@0x2313c[0x1]: 0002314c 20 57 | W | MOVEA.L (A7),A0 0002314e 11 92 58 01 | X | MOVE.B (A2),(A0+D5.L+#0x1) 00023152 52 85 |R | ADDQ.L #0x1,D5 00023154 60 0c |` | BRA 0x23162 00023156 switch@0x2313c[0x2]: 00023156 20 57 | W | MOVEA.L (A7),A0 00023158 11 bc 00 2c 58 01 | ,X | MOVE.B #0x2c,(A0+D5.L+#0x1) 0002315e 52 85 |R | ADDQ.L #0x1,D5 00023160 53 86 |S | SUBQ.L #0x1,D6 00023162 70 03 |p | MOVEQ.L #0x03,D0 00023164 c1 d1 | | MULS.W (A1),D0 00023166 41 fa fb e9 |A | LEA.L 0x22d51,A0 0002316a 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 0002316e 42 80 |B | CLR.L D0 00023170 10 30 70 00 | 0p | MOVE.B (A0+D7.W),D0 00023174 32 80 |2 | MOVE.W D0,(A1) 00023176 52 86 |R | ADDQ.L #0x1,D6 00023178 60 ff ff ff ff 46 |` F | BRA 0x230c0 0002317e 20 57 | W | MOVEA.L (A7),A0 00023180 20 05 | | MOVE.L D5,D0 00023182 53 80 |S | SUBQ.L #0x1,D0 00023184 30 80 |0 | MOVE.W D0,(A0) 00023186 58 4f |XO | ADDQ.L #0x4,A7 00023188 4c df 0f e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3 0002318c 4e 5e |N^ | UNLK A6 0002318e 4e 75 |Nu | RTS 00023190 ; -------------------------------------------------------------------------------------- 00023190 ; OMSI PASCAL Function 00023190 ; <LVAR 0x00c 4(r)> 00023190 ; <LVAR 0x008 4(r)> 00023190 ; <LVAR -0x002 @ 1(r)> 00023190 ; <LVAR -0x00a @> 00023190 ; <LVAR -0x00e @ 4(r)> 00023190 ; <LVAR -0x014 @ 1(r)> 00023190 ; -------------------------------------------------------------------------------------- 00023190 4e 56 ff bc |NV | LINK.W A6,#0xffbc 00023194 bf d5 | | CMPA.L (A5),A7 00023196 62 06 |b | BHI 0x2319e 00023198 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002319c 4e 76 |Nv | TRAPV 0002319e de fc 00 30 | 0 | ADDA.W #0x30,A7 000231a2 48 e7 c1 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D1+D0,-(A7) 000231a6 47 ee ff f2 |G | LEA.L (A6-0xe),A3 000231aa 72 01 |r | MOVEQ.L #0x01,D1 000231ac 55 4f |UO | SUBQ.L #0x2,A7 000231ae 4e ba fc d6 |N | JSR 0x22e86 000231b2 10 1f | | MOVE.B (A7)+,D0 000231b4 0c 00 00 5b | [ | CMPI.B #0x5b,D0 000231b8 66 08 |f | BNE 0x231c2 000231ba 55 4f |UO | SUBQ.L #0x2,A7 000231bc 4e ba fd 06 |N | JSR 0x22ec4 000231c0 1e 1f | | MOVE.B (A7)+,D7 000231c2 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000231c6 20 81 | | MOVE.L D1,(A0) 000231c8 42 2e ff ec |B. | CLR.B (A6-0x14) 000231cc 48 6e ff f6 |Hn | PEA.L (A6-0xa) 000231d0 48 6e ff fe |Hn | PEA.L (A6-0x2) 000231d4 48 6e ff ec |Hn | PEA.L (A6-0x14) 000231d8 4e ba fe 0c |N | JSR 0x22fe6 000231dc de fc 00 0c | | ADDA.W #0xc,A7 000231e0 4a 2e ff fe |J. | TST.B (A6-0x2) 000231e4 66 36 |f6 | BNE 0x2321c 000231e6 48 53 |HS | PEA.L (A3) 000231e8 48 78 00 0c |Hx | PEA.L 0xc 000231ec 4e b9 00 01 02 9c |N | JSR Malloc1(length : Long) : Pointer 000231f2 50 4f |PO | ADDQ.L #0x8,A7 000231f4 20 53 | S | MOVEA.L (A3),A0 000231f6 22 48 |"H | MOVEA.L A0,A1 000231f8 45 ee ff f6 |E | LEA.L (A6-0xa),A2 000231fc 70 07 |p | MOVEQ.L #0x07,D0 000231fe 12 da | | MOVE.B (A2)+,(A1)+ 00023200 51 c8 ff fc |Q | DBF D0,0x231fe 00023204 21 41 00 08 |!A | MOVE.L D1,(A0+0x8) 00023208 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 0002320c 22 50 |"P | MOVEA.L (A0),A1 0002320e b2 c1 | | CMPA.W D1,A1 00023210 66 04 |f | BNE 0x23216 00023212 20 93 | | MOVE.L (A3),(A0) 00023214 60 04 |` | BRA 0x2321a 00023216 29 53 00 08 |)S | MOVE.L (A3),(A4+0x8) 0002321a 28 53 |(S | MOVEA.L (A3),A4 0002321c 4a 2e ff fe |J. | TST.B (A6-0x2) 00023220 67 aa |g | BEQ 0x231cc 00023222 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023226 42 10 |B | CLR.B (A0) 00023228 10 2e ff fe | . | MOVE.B (A6-0x2),D0 0002322c 0c 00 00 02 | | CMPI.B #0x02,D0 00023230 66 02 |f | BNE 0x23234 00023232 52 10 |R | ADDQ.B #0x1,(A0) 00023234 4c df 1f 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2+A3+A4 00023238 4e 5e |N^ | UNLK A6 0002323a 4e 75 |Nu | RTS 0002323c ; -------------------------------------------------------------------------------------- 0002323c ; OMSI PASCAL Function 0002323c ; <LVAR 0x00c 4(w)> 0002323c ; <LVAR 0x008 4(r)> 0002323c ; -------------------------------------------------------------------------------------- 0002323c 4e 56 ff ec |NV | LINK.W A6,#0xffec 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 0c | | ADDA.W #0xc,A7 0002324e 48 e7 01 08 |H | MOVEM.L A4+D7,-(A7) 00023252 7e ff |~ | MOVEQ.L #-0x01,D7 00023254 28 6e 00 08 |(n | MOVEA.L (A6+0x8),A4 00023258 b8 fc 00 01 | | CMPA.W #0x1,A4 0002325c 67 08 |g | BEQ 0x23266 0002325e 52 87 |R | ADDQ.L #0x1,D7 00023260 28 6c 00 08 |(l | MOVEA.L (A4+0x8),A4 00023264 60 f2 |` | BRA 0x23258 00023266 2d 47 00 0c |-G | MOVE.L D7,(A6+0xc) 0002326a 4c df 10 80 |L | MOVEM.L (A7)+,D7+A4 0002326e 4e 5e |N^ | UNLK A6 00023270 4e 75 |Nu | RTS 00023272 ; -------------------------------------------------------------------------------------- 00023272 ; OMSI PASCAL Function 00023272 ; <LVAR 0x00c 4(r)> 00023272 ; <LVAR 0x008 4(r)> 00023272 ; -------------------------------------------------------------------------------------- 00023272 4e 56 ff b0 |NV | LINK.W A6,#0xffb0 00023276 bf d5 | | CMPA.L (A5),A7 00023278 62 06 |b | BHI 0x23280 0002327a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002327e 4e 76 |Nv | TRAPV 00023280 de fc 00 4e | N | ADDA.W #0x4e,A7 00023284 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00023288 72 01 |r | MOVEQ.L #0x01,D1 0002328a 59 4f |YO | SUBQ.L #0x4,A7 0002328c 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00023290 4e ba ff aa |N | JSR 0x2323c 00023294 58 4f |XO | ADDQ.L #0x4,A7 00023296 20 1f | | MOVE.L (A7)+,D0 00023298 b0 ae 00 08 | | CMP.L (A6+0x8),D0 0002329c 67 58 |gX | BEQ 0x232f6 0002329e 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000232a2 4e ba fb 42 |N B | JSR 0x22de6 000232a6 58 4f |XO | ADDQ.L #0x4,A7 000232a8 41 fa f6 92 |A | LEA.L 0x2293c,A0 000232ac 70 07 |p | MOVEQ.L #0x07,D0 000232ae 2f 20 |/ | MOVE.L -(A0),-(A7) 000232b0 51 c8 ff fc |Q | DBF D0,0x232ae 000232b4 41 ee 00 1a |A | LEA.L (A6+0x1a),A0 000232b8 70 04 |p | MOVEQ.L #0x04,D0 000232ba 3f 20 |? | MOVE.W -(A0),-(A7) 000232bc 51 c8 ff fc |Q | DBF D0,0x232ba 000232c0 51 4f |QO | SUBQ.L #0x8,A7 000232c2 48 6f 00 12 |Ho | PEA.L (A7+0x12) 000232c6 3f 01 |? | MOVE.W D1,-(A7) 000232c8 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7) 000232cc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000232d2 58 4f |XO | ADDQ.L #0x4,A7 000232d4 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000232d8 3f 01 |? | MOVE.W D1,-(A7) 000232da 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 000232de 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000232e4 50 4f |PO | ADDQ.L #0x8,A7 000232e6 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000232ec 50 4f |PO | ADDQ.L #0x8,A7 000232ee 4e ba fb 38 |N 8 | JSR 0x22e28 000232f2 de fc 00 2e | . | ADDA.W #0x2e,A7 000232f6 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 000232fa 4e 5e |N^ | UNLK A6 000232fc 4e 75 |Nu | RTS 000232fe ; -------------------------------------------------------------------------------------- 000232fe ; OMSI PASCAL Function 000232fe ; <LVAR 0x014 1(rw)> 000232fe ; <LVAR 0x010 4(r)> 000232fe ; <LVAR 0x00c 4(r)> 000232fe ; <LVAR 0x008 4(r)> 000232fe ; -------------------------------------------------------------------------------------- 000232fe 4e 56 ff dc |NV | LINK.W A6,#0xffdc 00023302 bf d5 | | CMPA.L (A5),A7 00023304 62 06 |b | BHI 0x2330c 00023306 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002330a 4e 76 |Nv | TRAPV 0002330c de fc 00 20 | | ADDA.W #0x20,A7 00023310 48 e7 c1 c0 |H | MOVEM.L A1+A0+D7+D1+D0,-(A7) 00023314 42 2e 00 14 |B. | CLR.B (A6+0x14) 00023318 20 2e 00 10 | . | MOVE.L (A6+0x10),D0 0002331c d0 ae 00 08 | | ADD.L (A6+0x8),D0 00023320 b0 b9 00 02 79 82 | y | CMP.L eval_buffer?,D0 00023326 6e 4e |nN | BGT 0x23376 00023328 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002332c 7e 01 |~ | MOVEQ.L #0x01,D7 0002332e be 97 | | CMP.L (A7),D7 00023330 6e 42 |nB | BGT 0x23374 00023332 20 2e 00 10 | . | MOVE.L (A6+0x10),D0 00023336 d0 87 | | ADD.L D7,D0 00023338 53 80 |S | SUBQ.L #0x1,D0 0002333a 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 00023340 63 02 |c | BLS 0x23344 00023342 4e 4f |NO | TRAP #15 00023344 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 0002334a 22 2e 00 0c |". | MOVE.L (A6+0xc),D1 0002334e d2 87 | | ADD.L D7,D1 00023350 53 81 |S | SUBQ.L #0x1,D1 00023352 53 81 |S | SUBQ.L #0x1,D1 00023354 0c 81 00 00 00 3e | > | CMPI.L #0x0000003e,D1 0002335a 63 02 |c | BLS 0x2335e 0002335c 4e 4f |NO | TRAP #15 0002335e 43 fa f5 dc |C | LEA.L 0x2293c,A1 00023362 10 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D0 00023366 b0 31 18 00 | 1 | CMP.B (A1+D1.L),D0 0002336a 67 04 |g | BEQ 0x23370 0002336c 58 4f |XO | ADDQ.L #0x4,A7 0002336e 60 0c |` | BRA 0x2337c 00023370 52 87 |R | ADDQ.L #0x1,D7 00023372 68 ba |h | BVC 0x2332e 00023374 58 4f |XO | ADDQ.L #0x4,A7 00023376 1d 7c 00 01 00 14 | | | MOVE.B #0x01,(A6+0x14) 0002337c 4c df 03 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1 00023380 4e 5e |N^ | UNLK A6 00023382 4e 75 |Nu | RTS 00023384 ; -------------------------------------------------------------------------------------- 00023384 ; OMSI PASCAL Function 00023384 ; <LVAR 0x00c 4(r)> 00023384 ; <LVAR 0x008 4(r)> 00023384 ; -------------------------------------------------------------------------------------- 00023384 4e 56 ff bc |NV | LINK.W A6,#0xffbc 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 40 | @ | ADDA.W #0x40,A7 00023396 48 e7 80 f0 |H | MOVEM.L A3+A2+A1+A0+D0,-(A7) 0002339a 45 f9 00 02 79 82 |E y | LEA.L eval_buffer?,A2 000233a0 47 ee 00 08 |G | LEA.L (A6+0x8),A3 000233a4 4a 93 |J | TST.L (A3) 000233a6 6c 3e |l> | BGE 0x233e6 000233a8 20 13 | | MOVE.L (A3),D0 000233aa 44 80 |D | NEG.L D0 000233ac d0 92 | | ADD.L (A2),D0 000233ae 0c 80 00 00 10 00 | | CMPI.L #0x00001000,D0 000233b4 6f 30 |o0 | BLE 0x233e6 000233b6 9e fc 00 1c | | SUBA.W #0x1c,A7 000233ba 20 4f | O | MOVEA.L A7,A0 000233bc 43 fa f5 be |C | LEA.L 0x2297c,A1 000233c0 70 1a |p | MOVEQ.L #0x1a,D0 000233c2 10 d9 | | MOVE.B (A1)+,(A0)+ 000233c4 51 c8 ff fc |Q | DBF D0,0x233c2 000233c8 59 4f |YO | SUBQ.L #0x4,A7 000233ca 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000233ce 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000233d2 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 000233d6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000233dc 50 4f |PO | ADDQ.L #0x8,A7 000233de 4e ba fa 48 |N H | JSR 0x22e28 000233e2 de fc 00 20 | | ADDA.W #0x20,A7 000233e6 41 f9 00 02 69 7e |A i~ | LEA.L 0x2697e,A0 000233ec 2f 08 |/ | MOVE.L A0,-(A7) 000233ee 2f 12 |/ | MOVE.L (A2),-(A7) 000233f0 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000233f4 2f 13 |/ | MOVE.L (A3),-(A7) 000233f6 4e b9 00 01 03 64 |N d | JSR MovStringTail(Base, Len, Ptr, Delta) 000233fc de fc 00 10 | | ADDA.W #0x10,A7 00023400 20 12 | | MOVE.L (A2),D0 00023402 90 93 | | SUB.L (A3),D0 00023404 24 80 |$ | MOVE.L D0,(A2) 00023406 4c df 0f 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2+A3 0002340a 4e 5e |N^ | UNLK A6 0002340c 4e 75 |Nu | RTS 0002340e ; -------------------------------------------------------------------------------------- 0002340e ; OMSI PASCAL Function 0002340e ; <LVAR 0x00c 4(r)> 0002340e ; <LVAR 0x008 4(r)> 0002340e ; -------------------------------------------------------------------------------------- 0002340e 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 00023412 bf d5 | | CMPA.L (A5),A7 00023414 62 06 |b | BHI 0x2341c 00023416 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002341a 4e 76 |Nv | TRAPV 0002341c de fc 00 28 | ( | ADDA.W #0x28,A7 00023420 48 e7 c1 e0 |H | MOVEM.L A2+A1+A0+D7+D1+D0,-(A7) 00023424 45 ee 00 0c |E | LEA.L (A6+0xc),A2 00023428 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002342c 2f 08 |/ | MOVE.L A0,-(A7) 0002342e 22 52 |"R | MOVEA.L (A2),A1 00023430 2f 11 |/ | MOVE.L (A1),-(A7) 00023432 30 10 |0 | MOVE.W (A0),D0 00023434 48 c0 |H | EXTW.L D0 00023436 44 80 |D | NEG.L D0 00023438 2f 00 |/ | MOVE.L D0,-(A7) 0002343a 4e ba ff 48 |N H | JSR 0x23384 0002343e 50 4f |PO | ADDQ.L #0x8,A7 00023440 30 10 |0 | MOVE.W (A0),D0 00023442 48 c0 |H | EXTW.L D0 00023444 2f 00 |/ | MOVE.L D0,-(A7) 00023446 7e 01 |~ | MOVEQ.L #0x01,D7 00023448 be 97 | | CMP.L (A7),D7 0002344a 6e 36 |n6 | BGT 0x23482 0002344c 20 52 | R | MOVEA.L (A2),A0 0002344e 20 07 | | MOVE.L D7,D0 00023450 d0 90 | | ADD.L (A0),D0 00023452 53 80 |S | SUBQ.L #0x1,D0 00023454 53 80 |S | SUBQ.L #0x1,D0 00023456 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 0002345c 63 02 |c | BLS 0x23460 0002345e 4e 4f |NO | TRAP #15 00023460 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 00023466 22 07 |" | MOVE.L D7,D1 00023468 53 81 |S | SUBQ.L #0x1,D1 0002346a 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00023470 63 02 |c | BLS 0x23474 00023472 4e 4f |NO | TRAP #15 00023474 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 00023478 11 b1 18 02 08 08 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8) 0002347e 52 87 |R | ADDQ.L #0x1,D7 00023480 68 c6 |h | BVC 0x23448 00023482 58 4f |XO | ADDQ.L #0x4,A7 00023484 20 52 | R | MOVEA.L (A2),A0 00023486 22 57 |"W | MOVEA.L (A7),A1 00023488 30 11 |0 | MOVE.W (A1),D0 0002348a 48 c0 |H | EXTW.L D0 0002348c d1 90 | | ADD.L D0,(A0) 0002348e 58 4f |XO | ADDQ.L #0x4,A7 00023490 4c df 07 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2 00023494 4e 5e |N^ | UNLK A6 00023496 4e 75 |Nu | RTS 00023498 ; -------------------------------------------------------------------------------------- 00023498 ; OMSI PASCAL Function 00023498 ; <LVAR 0x00c 4(r)> 00023498 ; <LVAR 0x008 4(r)> 00023498 ; -------------------------------------------------------------------------------------- 00023498 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 0002349c bf d5 | | CMPA.L (A5),A7 0002349e 62 06 |b | BHI 0x234a6 000234a0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000234a4 4e 76 |Nv | TRAPV 000234a6 de fc 00 50 | P | ADDA.W #0x50,A7 000234aa 48 e7 c3 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D1+D0,-(A7) 000234ae 45 fa fe 4e |E N | LEA.L 0x232fe,A2 000234b2 47 f8 00 04 |G | LEA.L 0x4,A3 000234b6 49 ee 00 08 |I | LEA.L (A6+0x8),A4 000234ba 72 0c |r | MOVEQ.L #0x0c,D1 000234bc 7e 00 |~ | MOVEQ.L #0x00,D7 000234be 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000234c2 42 90 |B | CLR.L (A0) 000234c4 20 54 | T | MOVEA.L (A4),A0 000234c6 42 90 |B | CLR.L (A0) 000234c8 2c 39 00 02 79 7e |,9 y~ | MOVE.L 0x2797e,D6 000234ce 20 06 | | MOVE.L D6,D0 000234d0 53 80 |S | SUBQ.L #0x1,D0 000234d2 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 000234d8 63 02 |c | BLS 0x234dc 000234da 4e 4f |NO | TRAP #15 000234dc 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 000234e2 10 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D0 000234e6 0c 00 00 5b | [ | CMPI.B #0x5b,D0 000234ea 66 ff 00 00 00 d6 |f | BNE 0x235c2 000234f0 55 4f |UO | SUBQ.L #0x2,A7 000234f2 2f 06 |/ | MOVE.L D6,-(A7) 000234f4 48 78 00 01 |Hx | PEA.L 0x1 000234f8 48 78 00 03 |Hx | PEA.L 0x3 000234fc 4e 92 |N | JSR (A2) 000234fe de c1 | | ADDA.W D1,A7 00023500 4a 1f |J | TST.B (A7)+ 00023502 66 7e |f~ | BNE 0x23582 00023504 55 4f |UO | SUBQ.L #0x2,A7 00023506 2f 06 |/ | MOVE.L D6,-(A7) 00023508 48 53 |HS | PEA.L (A3) 0002350a 48 78 00 03 |Hx | PEA.L 0x3 0002350e 4e 92 |N | JSR (A2) 00023510 de c1 | | ADDA.W D1,A7 00023512 4a 1f |J | TST.B (A7)+ 00023514 66 6c |fl | BNE 0x23582 00023516 55 4f |UO | SUBQ.L #0x2,A7 00023518 2f 06 |/ | MOVE.L D6,-(A7) 0002351a 48 78 00 07 |Hx | PEA.L 0x7 0002351e 48 53 |HS | PEA.L (A3) 00023520 4e 92 |N | JSR (A2) 00023522 de c1 | | ADDA.W D1,A7 00023524 4a 1f |J | TST.B (A7)+ 00023526 66 5a |fZ | BNE 0x23582 00023528 55 4f |UO | SUBQ.L #0x2,A7 0002352a 2f 06 |/ | MOVE.L D6,-(A7) 0002352c 48 78 00 0b |Hx | PEA.L 0xb 00023530 48 53 |HS | PEA.L (A3) 00023532 4e 92 |N | JSR (A2) 00023534 de c1 | | ADDA.W D1,A7 00023536 4a 1f |J | TST.B (A7)+ 00023538 66 48 |fH | BNE 0x23582 0002353a 55 4f |UO | SUBQ.L #0x2,A7 0002353c 2f 06 |/ | MOVE.L D6,-(A7) 0002353e 48 78 00 0f |Hx | PEA.L 0xf 00023542 48 53 |HS | PEA.L (A3) 00023544 4e 92 |N | JSR (A2) 00023546 de c1 | | ADDA.W D1,A7 00023548 4a 1f |J | TST.B (A7)+ 0002354a 66 36 |f6 | BNE 0x23582 0002354c 55 4f |UO | SUBQ.L #0x2,A7 0002354e 2f 06 |/ | MOVE.L D6,-(A7) 00023550 48 78 00 13 |Hx | PEA.L 0x13 00023554 48 53 |HS | PEA.L (A3) 00023556 4e 92 |N | JSR (A2) 00023558 de c1 | | ADDA.W D1,A7 0002355a 4a 1f |J | TST.B (A7)+ 0002355c 66 24 |f$ | BNE 0x23582 0002355e 55 4f |UO | SUBQ.L #0x2,A7 00023560 2f 06 |/ | MOVE.L D6,-(A7) 00023562 48 78 00 17 |Hx | PEA.L 0x17 00023566 48 53 |HS | PEA.L (A3) 00023568 4e 92 |N | JSR (A2) 0002356a de c1 | | ADDA.W D1,A7 0002356c 4a 1f |J | TST.B (A7)+ 0002356e 66 12 |f | BNE 0x23582 00023570 55 4f |UO | SUBQ.L #0x2,A7 00023572 2f 06 |/ | MOVE.L D6,-(A7) 00023574 48 78 00 1b |Hx | PEA.L 0x1b 00023578 48 53 |HS | PEA.L (A3) 0002357a 4e 92 |N | JSR (A2) 0002357c de c1 | | ADDA.W D1,A7 0002357e 4a 1f |J | TST.B (A7)+ 00023580 67 04 |g | BEQ 0x23586 00023582 52 87 |R | ADDQ.L #0x1,D7 00023584 60 3c |`< | BRA 0x235c2 00023586 4a 87 |J | TST.L D7 00023588 66 1c |f | BNE 0x235a6 0002358a 55 4f |UO | SUBQ.L #0x2,A7 0002358c 2f 06 |/ | MOVE.L D6,-(A7) 0002358e 48 78 00 1f |Hx | PEA.L 0x1f 00023592 48 78 00 05 |Hx | PEA.L 0x5 00023596 4e 92 |N | JSR (A2) 00023598 de c1 | | ADDA.W D1,A7 0002359a 4a 1f |J | TST.B (A7)+ 0002359c 67 08 |g | BEQ 0x235a6 0002359e 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000235a2 20 86 | | MOVE.L D6,(A0) 000235a4 60 1c |` | BRA 0x235c2 000235a6 55 4f |UO | SUBQ.L #0x2,A7 000235a8 2f 06 |/ | MOVE.L D6,-(A7) 000235aa 48 78 00 24 |Hx $ | PEA.L 0x24 000235ae 48 53 |HS | PEA.L (A3) 000235b0 4e 92 |N | JSR (A2) 000235b2 de c1 | | ADDA.W D1,A7 000235b4 4a 1f |J | TST.B (A7)+ 000235b6 67 0a |g | BEQ 0x235c2 000235b8 4a 87 |J | TST.L D7 000235ba 66 04 |f | BNE 0x235c0 000235bc 20 54 | T | MOVEA.L (A4),A0 000235be 60 e2 |` | BRA 0x235a2 000235c0 53 87 |S | SUBQ.L #0x1,D7 000235c2 52 86 |R | ADDQ.L #0x1,D6 000235c4 bc b9 00 02 79 82 | y | CMP.L eval_buffer?,D6 000235ca 6e 12 |n | BGT 0x235de 000235cc 4a 87 |J | TST.L D7 000235ce 66 ff ff ff fe fe |f | BNE 0x234ce 000235d4 20 54 | T | MOVEA.L (A4),A0 000235d6 4a 90 |J | TST.L (A0) 000235d8 67 ff ff ff fe f4 |g | BEQ 0x234ce 000235de bc b9 00 02 79 82 | y | CMP.L eval_buffer?,D6 000235e4 6f 30 |o0 | BLE 0x23616 000235e6 9e fc 00 1c | | SUBA.W #0x1c,A7 000235ea 20 4f | O | MOVEA.L A7,A0 000235ec 43 fa f3 aa |C | LEA.L 0x22998,A1 000235f0 70 1a |p | MOVEQ.L #0x1a,D0 000235f2 10 d9 | | MOVE.B (A1)+,(A0)+ 000235f4 51 c8 ff fc |Q | DBF D0,0x235f2 000235f8 59 4f |YO | SUBQ.L #0x4,A7 000235fa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000235fe 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023602 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 00023606 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002360c 50 4f |PO | ADDQ.L #0x8,A7 0002360e 4e ba f8 18 |N | JSR 0x22e28 00023612 de fc 00 20 | | ADDA.W #0x20,A7 00023616 4c df 1f c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0+A1+A2+A3+A4 0002361a 4e 5e |N^ | UNLK A6 0002361c 4e 75 |Nu | RTS 0002361e ; -------------------------------------------------------------------------------------- 0002361e ; OMSI PASCAL Function 0002361e ; <LVAR -0x004 @ 4(r)> 0002361e ; <LVAR -0x008 @ 4(rw)> 0002361e ; -------------------------------------------------------------------------------------- 0002361e 4e 56 ff dc |NV | LINK.W A6,#0xffdc 00023622 bf d5 | | CMPA.L (A5),A7 00023624 62 06 |b | BHI 0x2362c 00023626 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002362a 4e 76 |Nv | TRAPV 0002362c de fc 00 1c | | ADDA.W #0x1c,A7 00023630 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00023634 41 ee ff f8 |A | LEA.L (A6-0x8),A0 00023638 43 ee ff fc |C | LEA.L (A6-0x4),A1 0002363c 48 50 |HP | PEA.L (A0) 0002363e 48 51 |HQ | PEA.L (A1) 00023640 4e ba fe 56 |N V | JSR 0x23498 00023644 50 4f |PO | ADDQ.L #0x8,A7 00023646 4a 90 |J | TST.L (A0) 00023648 66 02 |f | BNE 0x2364c 0002364a 20 91 | | MOVE.L (A1),(A0) 0002364c 20 11 | | MOVE.L (A1),D0 0002364e 5a 80 |Z | ADDQ.L #0x5,D0 00023650 2f 00 |/ | MOVE.L D0,-(A7) 00023652 90 90 | | SUB.L (A0),D0 00023654 2f 00 |/ | MOVE.L D0,-(A7) 00023656 4e ba fd 2c |N , | JSR 0x23384 0002365a 50 4f |PO | ADDQ.L #0x8,A7 0002365c 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00023660 4e 5e |N^ | UNLK A6 00023662 4e 75 |Nu | RTS 00023664 ; -------------------------------------------------------------------------------------- 00023664 ; OMSI PASCAL Function 00023664 ; <LVAR -0x004 @ 4(r)> 00023664 ; <LVAR -0x008 @ 4(r)> 00023664 ; -------------------------------------------------------------------------------------- 00023664 4e 56 ff dc |NV | LINK.W A6,#0xffdc 00023668 bf d5 | | CMPA.L (A5),A7 0002366a 62 06 |b | BHI 0x23672 0002366c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023670 4e 76 |Nv | TRAPV 00023672 de fc 00 1c | | ADDA.W #0x1c,A7 00023676 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 0002367a 41 ee ff f8 |A | LEA.L (A6-0x8),A0 0002367e 43 ee ff fc |C | LEA.L (A6-0x4),A1 00023682 48 50 |HP | PEA.L (A0) 00023684 48 51 |HQ | PEA.L (A1) 00023686 4e ba fe 10 |N | JSR 0x23498 0002368a 50 4f |PO | ADDQ.L #0x8,A7 0002368c 4a 90 |J | TST.L (A0) 0002368e 66 06 |f | BNE 0x23696 00023690 20 11 | | MOVE.L (A1),D0 00023692 5a 80 |Z | ADDQ.L #0x5,D0 00023694 60 12 |` | BRA 0x236a8 00023696 2f 11 |/ | MOVE.L (A1),-(A7) 00023698 5a 97 |Z | ADDQ.L #0x5,(A7) 0002369a 48 78 00 05 |Hx | PEA.L 0x5 0002369e 4e ba fc e4 |N | JSR 0x23384 000236a2 50 4f |PO | ADDQ.L #0x8,A7 000236a4 20 10 | | MOVE.L (A0),D0 000236a6 5c 80 |\ | ADDQ.L #0x6,D0 000236a8 2f 00 |/ | MOVE.L D0,-(A7) 000236aa 90 b9 00 02 79 7e | y~ | SUB.L 0x2797e,D0 000236b0 2f 00 |/ | MOVE.L D0,-(A7) 000236b2 4e ba fc d0 |N | JSR 0x23384 000236b6 50 4f |PO | ADDQ.L #0x8,A7 000236b8 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 000236bc 4e 5e |N^ | UNLK A6 000236be 4e 75 |Nu | RTS 000236c0 ; -------------------------------------------------------------------------------------- 000236c0 ; OMSI PASCAL Function 000236c0 ; <LVAR 0x008 4(r)> 000236c0 ; <LVAR -0x004 @> 000236c0 ; <LVAR -0x008 @ 4(r)> 000236c0 ; <LVAR -0x00c @ 4(rw)> 000236c0 ; <LVAR -0x010 4(rw)> 000236c0 ; <LVAR -0x014 4(rw)> 000236c0 ; -------------------------------------------------------------------------------------- 000236c0 4e 56 ff ba |NV | LINK.W A6,#0xffba 000236c4 bf d5 | | CMPA.L (A5),A7 000236c6 62 06 |b | BHI 0x236ce 000236c8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000236cc 4e 76 |Nv | TRAPV 000236ce de fc 00 32 | 2 | ADDA.W #0x32,A7 000236d2 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 000236d6 43 f9 00 02 79 90 |C y | LEA.L 0x27990,A1 000236dc 45 f9 00 02 79 96 |E y | LEA.L 0x27996,A2 000236e2 47 f9 00 02 79 7e |G y~ | LEA.L 0x2797e,A3 000236e8 49 ee ff f8 |I | LEA.L (A6-0x8),A4 000236ec 72 01 |r | MOVEQ.L #0x01,D1 000236ee 4a 11 |J | TST.B (A1) 000236f0 67 0a |g | BEQ 0x236fc 000236f2 4a 92 |J | TST.L (A2) 000236f4 66 06 |f | BNE 0x236fc 000236f6 24 ae 00 08 |$ | MOVE.L (A6+0x8),(A2) 000236fa 53 92 |S | SUBQ.L #0x1,(A2) 000236fc 4a 11 |J | TST.B (A1) 000236fe 66 ff 00 00 00 ce |f | BNE 0x237ce 00023704 26 ae 00 08 |& | MOVE.L (A6+0x8),(A3) 00023708 5c 93 |\ | ADDQ.L #0x6,(A3) 0002370a 48 54 |HT | PEA.L (A4) 0002370c 48 6e ff fc |Hn | PEA.L (A6-0x4) 00023710 4e ba fa 7e |N ~ | JSR 0x23190 00023714 50 4f |PO | ADDQ.L #0x8,A7 00023716 41 fa f2 a6 |A | LEA.L 0x229be,A0 0002371a 70 04 |p | MOVEQ.L #0x04,D0 0002371c 3f 20 |? | MOVE.W -(A0),-(A7) 0002371e 51 c8 ff fc |Q | DBF D0,0x2371c 00023722 2f 14 |/ | MOVE.L (A4),-(A7) 00023724 48 78 00 00 |Hx | PEA.L 0x0 00023728 4e ba fb 48 |N H | JSR 0x23272 0002372c de fc 00 12 | | ADDA.W #0x12,A7 00023730 4a 39 00 02 79 9a |J9 y | TST.B 0x2799a 00023736 67 1a |g | BEQ 0x23752 00023738 51 4f |QO | SUBQ.L #0x8,A7 0002373a 2f 14 |/ | MOVE.L (A4),-(A7) 0002373c 48 78 00 00 |Hx | PEA.L 0x0 00023740 4e b9 00 02 3b 98 |N ; | JSR 0x23b98 00023746 50 4f |PO | ADDQ.L #0x8,A7 00023748 2d 5f ff ec |-_ | MOVE.L (A7)+,(A6-0x14) 0002374c 2d 5f ff f0 |-_ | MOVE.L (A7)+,(A6-0x10) 00023750 60 14 |` | BRA 0x23766 00023752 59 4f |YO | SUBQ.L #0x4,A7 00023754 2f 14 |/ | MOVE.L (A4),-(A7) 00023756 48 78 00 00 |Hx | PEA.L 0x0 0002375a 4e b9 00 02 3b 66 |N ;f | JSR 0x23b66 00023760 50 4f |PO | ADDQ.L #0x8,A7 00023762 2d 5f ff f4 |-_ | MOVE.L (A7)+,(A6-0xc) 00023766 2f 14 |/ | MOVE.L (A4),-(A7) 00023768 4e ba f6 7c |N | | JSR 0x22de6 0002376c 58 4f |XO | ADDQ.L #0x4,A7 0002376e 23 d3 00 02 79 92 |# y | MOVE.L (A3),0x27992 00023774 4a 39 00 02 79 9a |J9 y | TST.B 0x2799a 0002377a 67 2a |g* | BEQ 0x237a6 0002377c 55 4f |UO | SUBQ.L #0x2,A7 0002377e 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 00023782 2f 2e ff ec |/. | MOVE.L (A6-0x14),-(A7) 00023786 2f 39 00 02 79 a4 |/9 y | MOVE.L 0x279a4,-(A7) 0002378c 2f 39 00 02 79 a0 |/9 y | MOVE.L 0x279a0,-(A7) 00023792 4e b9 00 01 03 2c |N , | JSR IsEqual(a, b : Quad) : Bool 00023798 de fc 00 10 | | ADDA.W #0x10,A7 0002379c 10 1f | | MOVE.B (A7)+,D0 0002379e 48 80 |H | EXTB.W D0 000237a0 41 81 |A | CHK.W D1,D0 000237a2 12 80 | | MOVE.B D0,(A1) 000237a4 60 28 |`( | BRA 0x237ce 000237a6 55 4f |UO | SUBQ.L #0x2,A7 000237a8 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 000237ac 2f 39 00 02 79 9c |/9 y | MOVE.L 0x2799c,-(A7) 000237b2 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000237b8 50 4f |PO | ADDQ.L #0x8,A7 000237ba 10 1f | | MOVE.B (A7)+,D0 000237bc 48 80 |H | EXTB.W D0 000237be 41 81 |A | CHK.W D1,D0 000237c0 12 80 | | MOVE.B D0,(A1) 000237c2 48 6e ff f4 |Hn | PEA.L (A6-0xc) 000237c6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000237cc 58 4f |XO | ADDQ.L #0x4,A7 000237ce 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 000237d2 4e 5e |N^ | UNLK A6 000237d4 4e 75 |Nu | RTS 000237d6 ; -------------------------------------------------------------------------------------- 000237d6 ; OMSI PASCAL Function 000237d6 ; <LVAR 0x010 4(r)> 000237d6 ; <LVAR 0x00c 4(r)> 000237d6 ; <LVAR 0x008 4(r)> 000237d6 ; -------------------------------------------------------------------------------------- 000237d6 4e 56 ff 9e |NV | LINK.W A6,#0xff9e 000237da bf d5 | | CMPA.L (A5),A7 000237dc 62 06 |b | BHI 0x237e4 000237de 44 fc 00 02 |D | MOVE.W #0x2,CCR 000237e2 4e 76 |Nv | TRAPV 000237e4 de fc 00 56 | V | ADDA.W #0x56,A7 000237e8 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 000237ec 45 f9 00 02 79 96 |E y | LEA.L 0x27996,A2 000237f2 47 fa fb 0a |G | LEA.L 0x232fe,A3 000237f6 49 f9 00 02 79 90 |I y | LEA.L 0x27990,A4 000237fc 72 0c |r | MOVEQ.L #0x0c,D1 000237fe 74 01 |t | MOVEQ.L #0x01,D2 00023800 42 14 |B | CLR.B (A4) 00023802 42 b9 00 02 79 92 |B y | CLR.L 0x27992 00023808 42 92 |B | CLR.L (A2) 0002380a 7e 00 |~ | MOVEQ.L #0x00,D7 0002380c 7c 00 || | MOVEQ.L #0x00,D6 0002380e 2a 39 00 02 79 7e |*9 y~ | MOVE.L 0x2797e,D5 00023814 4a 86 |J | TST.L D6 00023816 66 ff 00 00 00 a6 |f | BNE 0x238be 0002381c ba b9 00 02 79 82 | y | CMP.L eval_buffer?,D5 00023822 6e ff 00 00 00 9a |n | BGT 0x238be 00023828 20 05 | | MOVE.L D5,D0 0002382a 53 80 |S | SUBQ.L #0x1,D0 0002382c 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 00023832 63 02 |c | BLS 0x23836 00023834 4e 4f |NO | TRAP #15 00023836 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 0002383c 10 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D0 00023840 0c 00 00 5b | [ | CMPI.B #0x5b,D0 00023844 66 6c |fl | BNE 0x238b2 00023846 55 4f |UO | SUBQ.L #0x2,A7 00023848 2f 05 |/ | MOVE.L D5,-(A7) 0002384a 48 78 00 28 |Hx ( | PEA.L 0x28 0002384e 48 78 00 05 |Hx | PEA.L 0x5 00023852 4e 93 |N | JSR (A3) 00023854 de c1 | | ADDA.W D1,A7 00023856 4a 1f |J | TST.B (A7)+ 00023858 66 14 |f | BNE 0x2386e 0002385a 55 4f |UO | SUBQ.L #0x2,A7 0002385c 2f 05 |/ | MOVE.L D5,-(A7) 0002385e 48 78 00 2d |Hx - | PEA.L 0x2d 00023862 48 78 00 06 |Hx | PEA.L 0x6 00023866 4e 93 |N | JSR (A3) 00023868 de c1 | | ADDA.W D1,A7 0002386a 4a 1f |J | TST.B (A7)+ 0002386c 67 04 |g | BEQ 0x23872 0002386e 52 87 |R | ADDQ.L #0x1,D7 00023870 60 40 |`@ | BRA 0x238b2 00023872 4a 87 |J | TST.L D7 00023874 66 1e |f | BNE 0x23894 00023876 55 4f |UO | SUBQ.L #0x2,A7 00023878 2f 05 |/ | MOVE.L D5,-(A7) 0002387a 48 78 00 33 |Hx 3 | PEA.L 0x33 0002387e 48 78 00 05 |Hx | PEA.L 0x5 00023882 4e 93 |N | JSR (A3) 00023884 de c1 | | ADDA.W D1,A7 00023886 4a 1f |J | TST.B (A7)+ 00023888 67 0a |g | BEQ 0x23894 0002388a 2f 05 |/ | MOVE.L D5,-(A7) 0002388c 4e ba fe 32 |N 2 | JSR 0x236c0 00023890 58 4f |XO | ADDQ.L #0x4,A7 00023892 60 1e |` | BRA 0x238b2 00023894 55 4f |UO | SUBQ.L #0x2,A7 00023896 2f 05 |/ | MOVE.L D5,-(A7) 00023898 48 78 00 38 |Hx 8 | PEA.L 0x38 0002389c 48 78 00 08 |Hx | PEA.L 0x8 000238a0 4e 93 |N | JSR (A3) 000238a2 de c1 | | ADDA.W D1,A7 000238a4 4a 1f |J | TST.B (A7)+ 000238a6 67 0a |g | BEQ 0x238b2 000238a8 4a 87 |J | TST.L D7 000238aa 66 04 |f | BNE 0x238b0 000238ac 2c 05 |, | MOVE.L D5,D6 000238ae 60 02 |` | BRA 0x238b2 000238b0 53 87 |S | SUBQ.L #0x1,D7 000238b2 4a 86 |J | TST.L D6 000238b4 66 02 |f | BNE 0x238b8 000238b6 52 85 |R | ADDQ.L #0x1,D5 000238b8 60 ff ff ff ff 5a |` Z | BRA 0x23814 000238be 4a 39 00 02 79 9a |J9 y | TST.B 0x2799a 000238c4 66 0e |f | BNE 0x238d4 000238c6 48 79 00 02 79 9c |Hy y | PEA.L 0x2799c 000238cc 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000238d2 58 4f |XO | ADDQ.L #0x4,A7 000238d4 4a 14 |J | TST.B (A4) 000238d6 66 28 |f( | BNE 0x23900 000238d8 41 fa f0 fe |A | LEA.L 0x229d8,A0 000238dc 70 0c |p | MOVEQ.L #0x0c,D0 000238de 3f 20 |? | MOVE.W -(A0),-(A7) 000238e0 51 c8 ff fc |Q | DBF D0,0x238de 000238e4 59 4f |YO | SUBQ.L #0x4,A7 000238e6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000238ea 3f 02 |? | MOVE.W D2,-(A7) 000238ec 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 000238f0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000238f6 50 4f |PO | ADDQ.L #0x8,A7 000238f8 4e ba f5 2e |N . | JSR 0x22e28 000238fc de fc 00 1e | | ADDA.W #0x1e,A7 00023900 4a 86 |J | TST.L D6 00023902 66 2e |f. | BNE 0x23932 00023904 9e fc 00 14 | | SUBA.W #0x14,A7 00023908 20 4f | O | MOVEA.L A7,A0 0002390a 43 fa f0 cc |C | LEA.L 0x229d8,A1 0002390e 70 12 |p | MOVEQ.L #0x12,D0 00023910 10 d9 | | MOVE.B (A1)+,(A0)+ 00023912 51 c8 ff fc |Q | DBF D0,0x23910 00023916 59 4f |YO | SUBQ.L #0x4,A7 00023918 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002391c 3f 02 |? | MOVE.W D2,-(A7) 0002391e 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00023922 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023928 50 4f |PO | ADDQ.L #0x8,A7 0002392a 4e ba f4 fc |N | JSR 0x22e28 0002392e de fc 00 18 | | ADDA.W #0x18,A7 00023932 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023936 20 86 | | MOVE.L D6,(A0) 00023938 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 0002393c 20 b9 00 02 79 92 | y | MOVE.L 0x27992,(A0) 00023942 4a 92 |J | TST.L (A2) 00023944 66 0a |f | BNE 0x23950 00023946 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 0002394a 20 86 | | MOVE.L D6,(A0) 0002394c 53 90 |S | SUBQ.L #0x1,(A0) 0002394e 60 06 |` | BRA 0x23956 00023950 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00023954 20 92 | | MOVE.L (A2),(A0) 00023956 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 0002395a 4e 5e |N^ | UNLK A6 0002395c 4e 75 |Nu | RTS 0002395e ; -------------------------------------------------------------------------------------- 0002395e ; OMSI PASCAL Function 0002395e ; <LVAR 0x008 4(r)> 0002395e ; <LVAR -0x008 @ 4(r)> 0002395e ; <LVAR -0x00c @ 4(r)> 0002395e ; <LVAR -0x010 @ 4(r)> 0002395e ; -------------------------------------------------------------------------------------- 0002395e 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00023962 bf d5 | | CMPA.L (A5),A7 00023964 62 06 |b | BHI 0x2396c 00023966 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002396a 4e 76 |Nv | TRAPV 0002396c de fc 00 24 | $ | ADDA.W #0x24,A7 00023970 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 00023974 41 f9 00 02 79 7e |A y~ | LEA.L 0x2797e,A0 0002397a 43 ee ff f0 |C | LEA.L (A6-0x10),A1 0002397e 2c 10 |, | MOVE.L (A0),D6 00023980 42 39 00 02 79 9a |B9 y | CLR.B 0x2799a 00023986 23 ee 00 08 00 02 79 9c |# y | MOVE.L (A6+0x8),0x2799c 0002398e 2e 10 |. | MOVE.L (A0),D7 00023990 48 51 |HQ | PEA.L (A1) 00023992 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00023996 48 6e ff f8 |Hn | PEA.L (A6-0x8) 0002399a 4e ba fe 3a |N : | JSR 0x237d6 0002399e de fc 00 0c | | ADDA.W #0xc,A7 000239a2 20 86 | | MOVE.L D6,(A0) 000239a4 20 2e ff f8 | . | MOVE.L (A6-0x8),D0 000239a8 06 80 00 00 00 09 | | ADDI.L #0x00000009,D0 000239ae 2f 00 |/ | MOVE.L D0,-(A7) 000239b0 90 ae ff f4 | | SUB.L (A6-0xc),D0 000239b4 53 80 |S | SUBQ.L #0x1,D0 000239b6 2f 00 |/ | MOVE.L D0,-(A7) 000239b8 4e ba f9 ca |N | JSR 0x23384 000239bc 58 4f |XO | ADDQ.L #0x4,A7 000239be 2e 91 |. | MOVE.L (A1),(A7) 000239c0 2f 11 |/ | MOVE.L (A1),-(A7) 000239c2 9f 97 | | SUB.L D7,(A7) 000239c4 4e ba f9 be |N | JSR 0x23384 000239c8 50 4f |PO | ADDQ.L #0x8,A7 000239ca 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 000239ce 4e 5e |N^ | UNLK A6 000239d0 4e 75 |Nu | RTS 000239d2 ; -------------------------------------------------------------------------------------- 000239d2 ; OMSI PASCAL Function 000239d2 ; <LVAR 0x00c 4(r)> 000239d2 ; <LVAR 0x008 4(r)> 000239d2 ; <LVAR -0x008 @ 4(r)> 000239d2 ; <LVAR -0x00c @ 4(r)> 000239d2 ; <LVAR -0x010 @ 4(r)> 000239d2 ; -------------------------------------------------------------------------------------- 000239d2 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 000239d6 bf d5 | | CMPA.L (A5),A7 000239d8 62 06 |b | BHI 0x239e0 000239da 44 fc 00 02 |D | MOVE.W #0x2,CCR 000239de 4e 76 |Nv | TRAPV 000239e0 de fc 00 24 | $ | ADDA.W #0x24,A7 000239e4 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 000239e8 41 f9 00 02 79 7e |A y~ | LEA.L 0x2797e,A0 000239ee 43 ee ff f0 |C | LEA.L (A6-0x10),A1 000239f2 2c 10 |, | MOVE.L (A0),D6 000239f4 13 fc 00 01 00 02 79 9a | y | MOVE.B #0x01,0x2799a 000239fc 23 ee 00 08 00 02 79 a0 |# y | MOVE.L (A6+0x8),0x279a0 00023a04 23 ee 00 0c 00 02 79 a4 |# y | MOVE.L (A6+0xc),0x279a4 00023a0c 2e 10 |. | MOVE.L (A0),D7 00023a0e 48 51 |HQ | PEA.L (A1) 00023a10 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00023a14 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00023a18 4e ba fd bc |N | JSR 0x237d6 00023a1c de fc 00 0c | | ADDA.W #0xc,A7 00023a20 20 86 | | MOVE.L D6,(A0) 00023a22 20 2e ff f8 | . | MOVE.L (A6-0x8),D0 00023a26 06 80 00 00 00 09 | | ADDI.L #0x00000009,D0 00023a2c 2f 00 |/ | MOVE.L D0,-(A7) 00023a2e 90 ae ff f4 | | SUB.L (A6-0xc),D0 00023a32 53 80 |S | SUBQ.L #0x1,D0 00023a34 2f 00 |/ | MOVE.L D0,-(A7) 00023a36 4e ba f9 4c |N L | JSR 0x23384 00023a3a 58 4f |XO | ADDQ.L #0x4,A7 00023a3c 2e 91 |. | MOVE.L (A1),(A7) 00023a3e 2f 11 |/ | MOVE.L (A1),-(A7) 00023a40 9f 97 | | SUB.L D7,(A7) 00023a42 4e ba f9 40 |N @ | JSR 0x23384 00023a46 50 4f |PO | ADDQ.L #0x8,A7 00023a48 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 00023a4c 4e 5e |N^ | UNLK A6 00023a4e 4e 75 |Nu | RTS 00023a50 ; -------------------------------------------------------------------------------------- 00023a50 ; OMSI PASCAL Function 00023a50 ; <LVAR 0x010 4(rw)> 00023a50 ; <LVAR 0x00c 4(r)> 00023a50 ; <LVAR 0x008 4(r)> 00023a50 ; -------------------------------------------------------------------------------------- 00023a50 4e 56 ff f8 |NV | LINK.W A6,#0xfff8 00023a54 bf d5 | | CMPA.L (A5),A7 00023a56 62 06 |b | BHI 0x23a5e 00023a58 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023a5c 4e 76 |Nv | TRAPV 00023a5e de fc 00 08 | | ADDA.W #0x8,A7 00023a62 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023a66 4a ae 00 08 |J | TST.L (A6+0x8) 00023a6a 66 06 |f | BNE 0x23a72 00023a6c 42 ae 00 10 |B | CLR.L (A6+0x10) 00023a70 60 0e |` | BRA 0x23a80 00023a72 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00023a76 90 ae 00 08 | | SUB.L (A6+0x8),D0 00023a7a 52 80 |R | ADDQ.L #0x1,D0 00023a7c 2d 40 00 10 |-@ | MOVE.L D0,(A6+0x10) 00023a80 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023a84 4e 5e |N^ | UNLK A6 00023a86 4e 75 |Nu | RTS 00023a88 ; -------------------------------------------------------------------------------------- 00023a88 ; OMSI PASCAL Function 00023a88 ; <LVAR 0x014 4(w)> 00023a88 ; <LVAR 0x010 @ 4(w)> 00023a88 ; <LVAR 0x00c 4(r)> 00023a88 ; <LVAR 0x008 4(r)> 00023a88 ; -------------------------------------------------------------------------------------- 00023a88 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023a8c bf d5 | | CMPA.L (A5),A7 00023a8e 62 06 |b | BHI 0x23a96 00023a90 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023a94 4e 76 |Nv | TRAPV 00023a96 de fc 00 20 | | ADDA.W #0x20,A7 00023a9a 48 e7 81 c8 |H | MOVEM.L A4+A1+A0+D7+D0,-(A7) 00023a9e 28 6e 00 0c |(n | MOVEA.L (A6+0xc),A4 00023aa2 2d 7a f2 9c 00 10 |-z | MOVE.L 0x22d40,(A6+0x10) 00023aa8 2d 7a f2 9a 00 14 |-z | MOVE.L 0x22d44,(A6+0x14) 00023aae 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023ab2 7e 00 |~ | MOVEQ.L #0x00,D7 00023ab4 be 97 | | CMP.L (A7),D7 00023ab6 6e 28 |n( | BGT 0x23ae0 00023ab8 b8 fc 00 01 | | CMPA.W #0x1,A4 00023abc 66 04 |f | BNE 0x23ac2 00023abe 58 4f |XO | ADDQ.L #0x4,A7 00023ac0 60 20 |` | BRA 0x23ae2 00023ac2 be ae 00 08 | | CMP.L (A6+0x8),D7 00023ac6 66 10 |f | BNE 0x23ad8 00023ac8 41 ee 00 10 |A | LEA.L (A6+0x10),A0 00023acc 22 4c |"L | MOVEA.L A4,A1 00023ace 70 07 |p | MOVEQ.L #0x07,D0 00023ad0 10 d9 | | MOVE.B (A1)+,(A0)+ 00023ad2 51 c8 ff fc |Q | DBF D0,0x23ad0 00023ad6 60 04 |` | BRA 0x23adc 00023ad8 28 6c 00 08 |(l | MOVEA.L (A4+0x8),A4 00023adc 52 87 |R | ADDQ.L #0x1,D7 00023ade 68 d4 |h | BVC 0x23ab4 00023ae0 58 4f |XO | ADDQ.L #0x4,A7 00023ae2 4c df 13 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1+A4 00023ae6 4e 5e |N^ | UNLK A6 00023ae8 4e 75 |Nu | RTS 00023aea ; -------------------------------------------------------------------------------------- 00023aea ; OMSI PASCAL Function 00023aea ; <LVAR 0x010 4(w)> 00023aea ; <LVAR 0x00c 4(r)> 00023aea ; <LVAR 0x008 4(r)> 00023aea ; <LVAR -0x008 @ 4(r)> 00023aea ; -------------------------------------------------------------------------------------- 00023aea 4e 56 ff ce |NV | LINK.W A6,#0xffce 00023aee bf d5 | | CMPA.L (A5),A7 00023af0 62 06 |b | BHI 0x23af8 00023af2 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023af6 4e 76 |Nv | TRAPV 00023af8 de fc 00 26 | & | ADDA.W #0x26,A7 00023afc 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 00023b00 43 ee ff f8 |C | LEA.L (A6-0x8),A1 00023b04 48 51 |HQ | PEA.L (A1) 00023b06 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00023b0c 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00023b10 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023b14 4e ba ff 3a |N : | JSR 0x23a50 00023b18 50 4f |PO | ADDQ.L #0x8,A7 00023b1a 7e 01 |~ | MOVEQ.L #0x01,D7 00023b1c be 97 | | CMP.L (A7),D7 00023b1e 6e 38 |n8 | BGT 0x23b58 00023b20 20 07 | | MOVE.L D7,D0 00023b22 d0 ae 00 08 | | ADD.L (A6+0x8),D0 00023b26 53 80 |S | SUBQ.L #0x1,D0 00023b28 53 80 |S | SUBQ.L #0x1,D0 00023b2a 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 00023b30 63 02 |c | BLS 0x23b34 00023b32 4e 4f |NO | TRAP #15 00023b34 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 00023b3a 1c 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D6 00023b3e 0c 06 00 2f | / | CMPI.B #0x2f,D6 00023b42 66 04 |f | BNE 0x23b48 00023b44 58 4f |XO | ADDQ.L #0x4,A7 00023b46 60 12 |` | BRA 0x23b5a 00023b48 2f 11 |/ | MOVE.L (A1),-(A7) 00023b4a 1f 06 | | MOVE.B D6,-(A7) 00023b4c 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00023b52 5c 4f |\O | ADDQ.L #0x6,A7 00023b54 52 87 |R | ADDQ.L #0x1,D7 00023b56 68 c4 |h | BVC 0x23b1c 00023b58 58 4f |XO | ADDQ.L #0x4,A7 00023b5a 2d 51 00 10 |-Q | MOVE.L (A1),(A6+0x10) 00023b5e 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 00023b62 4e 5e |N^ | UNLK A6 00023b64 4e 75 |Nu | RTS 00023b66 ; -------------------------------------------------------------------------------------- 00023b66 ; OMSI PASCAL Function 00023b66 ; <LVAR 0x010 4(w)> 00023b66 ; <LVAR 0x00c 4(r)> 00023b66 ; <LVAR 0x008 4(r)> 00023b66 ; -------------------------------------------------------------------------------------- 00023b66 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 00023b6a bf d5 | | CMPA.L (A5),A7 00023b6c 62 06 |b | BHI 0x23b74 00023b6e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023b72 4e 76 |Nv | TRAPV 00023b74 de fc 00 18 | | ADDA.W #0x18,A7 00023b78 9e fc 00 0c | | SUBA.W #0xc,A7 00023b7c 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00023b80 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023b84 4e ba ff 02 |N | JSR 0x23a88 00023b88 50 4f |PO | ADDQ.L #0x8,A7 00023b8a 4e ba ff 5e |N ^ | JSR 0x23aea 00023b8e 50 4f |PO | ADDQ.L #0x8,A7 00023b90 2d 5f 00 10 |-_ | MOVE.L (A7)+,(A6+0x10) 00023b94 4e 5e |N^ | UNLK A6 00023b96 4e 75 |Nu | RTS 00023b98 ; -------------------------------------------------------------------------------------- 00023b98 ; OMSI PASCAL Function 00023b98 ; <LVAR 0x014 4(w)> 00023b98 ; <LVAR 0x010 4(w)> 00023b98 ; <LVAR 0x00c 4(r)> 00023b98 ; <LVAR 0x008 4(r)> 00023b98 ; -------------------------------------------------------------------------------------- 00023b98 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 00023b9c bf d5 | | CMPA.L (A5),A7 00023b9e 62 06 |b | BHI 0x23ba6 00023ba0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023ba4 4e 76 |Nv | TRAPV 00023ba6 de fc 00 18 | | ADDA.W #0x18,A7 00023baa 9e fc 00 0c | | SUBA.W #0xc,A7 00023bae 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00023bb2 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023bb6 4e ba ff ae |N | JSR 0x23b66 00023bba 50 4f |PO | ADDQ.L #0x8,A7 00023bbc 48 78 00 10 |Hx | PEA.L 0x10 00023bc0 4e b9 00 01 03 60 |N ` | JSR ?StringToInt64() 00023bc6 50 4f |PO | ADDQ.L #0x8,A7 00023bc8 2d 5f 00 10 |-_ | MOVE.L (A7)+,(A6+0x10) 00023bcc 2d 5f 00 14 |-_ | MOVE.L (A7)+,(A6+0x14) 00023bd0 4e 5e |N^ | UNLK A6 00023bd2 4e 75 |Nu | RTS 00023bd4 ; -------------------------------------------------------------------------------------- 00023bd4 ; OMSI PASCAL Function 00023bd4 ; <LVAR 0x010 4(w)> 00023bd4 ; <LVAR 0x00c 4(r)> 00023bd4 ; <LVAR 0x008 4(r)> 00023bd4 ; -------------------------------------------------------------------------------------- 00023bd4 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 00023bd8 bf d5 | | CMPA.L (A5),A7 00023bda 62 06 |b | BHI 0x23be2 00023bdc 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023be0 4e 76 |Nv | TRAPV 00023be2 de fc 00 18 | | ADDA.W #0x18,A7 00023be6 9e fc 00 0c | | SUBA.W #0xc,A7 00023bea 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00023bee 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023bf2 4e ba ff a4 |N | JSR 0x23b98 00023bf6 50 4f |PO | ADDQ.L #0x8,A7 00023bf8 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00023bfe 50 4f |PO | ADDQ.L #0x8,A7 00023c00 2d 5f 00 10 |-_ | MOVE.L (A7)+,(A6+0x10) 00023c04 4e 5e |N^ | UNLK A6 00023c06 4e 75 |Nu | RTS 00023c08 ; -------------------------------------------------------------------------------------- 00023c08 ; OMSI PASCAL Function 00023c08 ; <LVAR 0x008 @ 4(r)> 00023c08 ; -------------------------------------------------------------------------------------- 00023c08 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 00023c0c bf d5 | | CMPA.L (A5),A7 00023c0e 62 06 |b | BHI 0x23c16 00023c10 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023c14 4e 76 |Nv | TRAPV 00023c16 de fc 00 28 | ( | ADDA.W #0x28,A7 00023c1a 48 e7 c1 e0 |H | MOVEM.L A2+A1+A0+D7+D1+D0,-(A7) 00023c1e 45 f9 00 02 79 7e |E y~ | LEA.L 0x2797e,A2 00023c24 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023c28 2f 08 |/ | MOVE.L A0,-(A7) 00023c2a 2f 12 |/ | MOVE.L (A2),-(A7) 00023c2c 30 10 |0 | MOVE.W (A0),D0 00023c2e 48 c0 |H | EXTW.L D0 00023c30 44 80 |D | NEG.L D0 00023c32 2f 00 |/ | MOVE.L D0,-(A7) 00023c34 4e ba f7 4e |N N | JSR 0x23384 00023c38 50 4f |PO | ADDQ.L #0x8,A7 00023c3a 30 10 |0 | MOVE.W (A0),D0 00023c3c 48 c0 |H | EXTW.L D0 00023c3e 2f 00 |/ | MOVE.L D0,-(A7) 00023c40 7e 01 |~ | MOVEQ.L #0x01,D7 00023c42 be 97 | | CMP.L (A7),D7 00023c44 6e 34 |n4 | BGT 0x23c7a 00023c46 20 07 | | MOVE.L D7,D0 00023c48 d0 92 | | ADD.L (A2),D0 00023c4a 53 80 |S | SUBQ.L #0x1,D0 00023c4c 53 80 |S | SUBQ.L #0x1,D0 00023c4e 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 00023c54 63 02 |c | BLS 0x23c58 00023c56 4e 4f |NO | TRAP #15 00023c58 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 00023c5e 22 07 |" | MOVE.L D7,D1 00023c60 53 81 |S | SUBQ.L #0x1,D1 00023c62 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00023c68 63 02 |c | BLS 0x23c6c 00023c6a 4e 4f |NO | TRAP #15 00023c6c 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 00023c70 11 b1 18 02 08 08 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8) 00023c76 52 87 |R | ADDQ.L #0x1,D7 00023c78 68 c8 |h | BVC 0x23c42 00023c7a 50 4f |PO | ADDQ.L #0x8,A7 00023c7c 48 6e 00 08 |Hn | PEA.L (A6+0x8) 00023c80 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023c86 58 4f |XO | ADDQ.L #0x4,A7 00023c88 4c df 07 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2 00023c8c 4e 5e |N^ | UNLK A6 00023c8e 4e 75 |Nu | RTS 00023c90 ; -------------------------------------------------------------------------------------- 00023c90 ; OMSI PASCAL Function 00023c90 ; <LVAR 0x00c 4(r)> 00023c90 ; <LVAR 0x008 4(r)> 00023c90 ; -------------------------------------------------------------------------------------- 00023c90 4e 56 ff ec |NV | LINK.W A6,#0xffec 00023c94 bf d5 | | CMPA.L (A5),A7 00023c96 62 06 |b | BHI 0x23c9e 00023c98 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023c9c 4e 76 |Nv | TRAPV 00023c9e de fc 00 14 | | ADDA.W #0x14,A7 00023ca2 59 4f |YO | SUBQ.L #0x4,A7 00023ca4 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00023ca8 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023cac 48 78 00 10 |Hx | PEA.L 0x10 00023cb0 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 00023cb6 de fc 00 0c | | ADDA.W #0xc,A7 00023cba 4e ba ff 4c |N L | JSR 0x23c08 00023cbe 58 4f |XO | ADDQ.L #0x4,A7 00023cc0 4e 5e |N^ | UNLK A6 00023cc2 4e 75 |Nu | RTS 00023cc4 ; -------------------------------------------------------------------------------------- 00023cc4 ; OMSI PASCAL Function 00023cc4 ; <LVAR 0x008 4(r)> 00023cc4 ; -------------------------------------------------------------------------------------- 00023cc4 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 00023cc8 bf d5 | | CMPA.L (A5),A7 00023cca 62 06 |b | BHI 0x23cd2 00023ccc 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023cd0 4e 76 |Nv | TRAPV 00023cd2 de fc 00 0c | | ADDA.W #0xc,A7 00023cd6 59 4f |YO | SUBQ.L #0x4,A7 00023cd8 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023cdc 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00023ce2 58 4f |XO | ADDQ.L #0x4,A7 00023ce4 4e ba ff 22 |N " | JSR 0x23c08 00023ce8 58 4f |XO | ADDQ.L #0x4,A7 00023cea 4e 5e |N^ | UNLK A6 00023cec 4e 75 |Nu | RTS 00023cee ; -------------------------------------------------------------------------------------- 00023cee ; OMSI PASCAL Function 00023cee ; <LVAR 0x008 4(r)> 00023cee ; <LVAR -0x004 @ 4(r)> 00023cee ; <LVAR -0x008 4(rw)> 00023cee ; -------------------------------------------------------------------------------------- 00023cee 4e 56 ff ca |NV | LINK.W A6,#0xffca 00023cf2 bf d5 | | CMPA.L (A5),A7 00023cf4 62 06 |b | BHI 0x23cfc 00023cf6 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023cfa 4e 76 |Nv | TRAPV 00023cfc de fc 00 2a | * | ADDA.W #0x2a,A7 00023d00 48 e7 81 e0 |H | MOVEM.L A2+A1+A0+D7+D0,-(A7) 00023d04 43 ee ff fc |C | LEA.L (A6-0x4),A1 00023d08 45 ee ff f8 |E | LEA.L (A6-0x8),A2 00023d0c 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023d10 24 a8 00 08 |$ | MOVE.L (A0+0x8),(A2) 00023d14 48 51 |HQ | PEA.L (A1) 00023d16 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00023d1c 58 4f |XO | ADDQ.L #0x4,A7 00023d1e 20 52 | R | MOVEA.L (A2),A0 00023d20 b0 fc 00 01 | | CMPA.W #0x1,A0 00023d24 67 ff 00 00 00 8a |g | BEQ 0x23db0 00023d2a 4a 90 |J | TST.L (A0) 00023d2c 67 68 |gh | BEQ 0x23d96 00023d2e 2f 28 00 04 |/( | MOVE.L (A0+0x4),-(A7) 00023d32 2e 10 |. | MOVE.L (A0),D7 00023d34 be 97 | | CMP.L (A7),D7 00023d36 6e 14 |n | BGT 0x23d4c 00023d38 20 17 | | MOVE.L (A7),D0 00023d3a 0c 87 80 00 00 01 | | CMPI.L #0x80000001,D7 00023d40 6d 08 |m | BLT 0x23d4a 00023d42 0c 80 7f ff ff ff | | CMPI.L #0x7fffffff,D0 00023d48 6f 02 |o | BLE 0x23d4c 00023d4a 4e 4f |NO | TRAP #15 00023d4c be 97 | | CMP.L (A7),D7 00023d4e 6e 44 |nD | BGT 0x23d94 00023d50 2f 11 |/ | MOVE.L (A1),-(A7) 00023d52 20 07 | | MOVE.L D7,D0 00023d54 53 80 |S | SUBQ.L #0x1,D0 00023d56 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 00023d5c 63 02 |c | BLS 0x23d60 00023d5e 4e 4f |NO | TRAP #15 00023d60 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 00023d66 1f 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),-(A7) 00023d6a 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00023d70 5c 4f |\O | ADDQ.L #0x6,A7 00023d72 20 51 | Q | MOVEA.L (A1),A0 00023d74 30 10 |0 | MOVE.W (A0),D0 00023d76 0c 40 00 7a | @ z | CMPI.W #0x007a,D0 00023d7a 6d 14 |m | BLT 0x23d90 00023d7c 2f 11 |/ | MOVE.L (A1),-(A7) 00023d7e 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00023d84 58 4f |XO | ADDQ.L #0x4,A7 00023d86 48 51 |HQ | PEA.L (A1) 00023d88 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00023d8e 58 4f |XO | ADDQ.L #0x4,A7 00023d90 52 87 |R | ADDQ.L #0x1,D7 00023d92 68 b8 |h | BVC 0x23d4c 00023d94 58 4f |XO | ADDQ.L #0x4,A7 00023d96 2f 11 |/ | MOVE.L (A1),-(A7) 00023d98 1f 3c 00 20 | < | MOVE.B #0x20,-(A7) 00023d9c 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00023da2 5c 4f |\O | ADDQ.L #0x6,A7 00023da4 20 52 | R | MOVEA.L (A2),A0 00023da6 24 a8 00 08 |$ | MOVE.L (A0+0x8),(A2) 00023daa 60 ff ff ff ff 72 |` r | BRA 0x23d1e 00023db0 2f 11 |/ | MOVE.L (A1),-(A7) 00023db2 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023db8 58 4f |XO | ADDQ.L #0x4,A7 00023dba 4c df 07 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1+A2 00023dbe 4e 5e |N^ | UNLK A6 00023dc0 4e 75 |Nu | RTS 00023dc2 ; -------------------------------------------------------------------------------------- 00023dc2 ; OMSI PASCAL Function 00023dc2 ; <LVAR 0x008 @ 4(r)> 00023dc2 ; <LVAR -0x003 @ 1(r)> 00023dc2 ; <LVAR -0x004 @ 1(r)> 00023dc2 ; <LVAR -0x008 @ 4(r)> 00023dc2 ; <LVAR -0x00c @ 4(rw)> 00023dc2 ; -------------------------------------------------------------------------------------- 00023dc2 TRY_HLP_FILE(?): 00023dc2 4e 56 ff ae |NV | LINK.W A6,#0xffae 00023dc6 bf d5 | | CMPA.L (A5),A7 00023dc8 62 06 |b | BHI 0x23dd0 00023dca 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023dce 4e 76 |Nv | TRAPV 00023dd0 de fc 00 46 | F | ADDA.W #0x46,A7 00023dd4 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 00023dd8 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00023ddc 45 ee ff f4 |E | LEA.L (A6-0xc),A2 00023de0 47 ee ff fc |G | LEA.L (A6-0x4),A3 00023de4 49 ee ff f8 |I | LEA.L (A6-0x8),A4 00023de8 72 01 |r | MOVEQ.L #0x01,D1 00023dea 2f 3a ec 16 |/: | MOVE.L 0x22a02,-(A7) 00023dee 51 4f |QO | SUBQ.L #0x8,A7 00023df0 2f 11 |/ | MOVE.L (A1),-(A7) 00023df2 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00023df8 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00023dfc 3f 01 |? | MOVE.W D1,-(A7) 00023dfe 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00023e02 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023e08 50 4f |PO | ADDQ.L #0x8,A7 00023e0a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023e10 50 4f |PO | ADDQ.L #0x8,A7 00023e12 24 9f |$ | MOVE.L (A7)+,(A2) 00023e14 2e 92 |. | MOVE.L (A2),(A7) 00023e16 42 27 |B' | CLR.B -(A7) 00023e18 42 27 |B' | CLR.B -(A7) 00023e1a 48 78 00 00 |Hx | PEA.L 0x0 00023e1e 48 53 |HS | PEA.L (A3) 00023e20 48 54 |HT | PEA.L (A4) 00023e22 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00023e28 de fc 00 14 | | ADDA.W #0x14,A7 00023e2c 4a 13 |J | TST.B (A3) 00023e2e 67 36 |g6 | BEQ 0x23e66 00023e30 41 fa eb d0 |A | LEA.L 0x22a02,A0 00023e34 70 0a |p | MOVEQ.L #0x0a,D0 00023e36 3f 20 |? | MOVE.W -(A0),-(A7) 00023e38 51 c8 ff fc |Q | DBF D0,0x23e36 00023e3c 51 4f |QO | SUBQ.L #0x8,A7 00023e3e 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023e42 3f 01 |? | MOVE.W D1,-(A7) 00023e44 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 00023e48 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023e4e 58 4f |XO | ADDQ.L #0x4,A7 00023e50 2e 91 |. | MOVE.L (A1),(A7) 00023e52 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023e58 50 4f |PO | ADDQ.L #0x8,A7 00023e5a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023e60 de fc 00 1a | | ADDA.W #0x1a,A7 00023e64 60 54 |`T | BRA 0x23eba 00023e66 2f 14 |/ | MOVE.L (A4),-(A7) 00023e68 48 51 |HQ | PEA.L (A1) 00023e6a 48 6e ff fd |Hn | PEA.L (A6-0x3) 00023e6e 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 00023e74 de fc 00 0c | | ADDA.W #0xc,A7 00023e78 4a 2e ff fd |J. | TST.B (A6-0x3) 00023e7c 66 14 |f | BNE 0x23e92 00023e7e 59 4f |YO | SUBQ.L #0x4,A7 00023e80 2f 11 |/ | MOVE.L (A1),-(A7) 00023e82 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00023e88 58 4f |XO | ADDQ.L #0x4,A7 00023e8a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023e90 58 4f |XO | ADDQ.L #0x4,A7 00023e92 4a 2e ff fd |J. | TST.B (A6-0x3) 00023e96 67 ce |g | BEQ 0x23e66 00023e98 42 27 |B' | CLR.B -(A7) 00023e9a 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00023e9e 48 78 00 01 |Hx | PEA.L 0x1 00023ea2 48 53 |HS | PEA.L (A3) 00023ea4 48 54 |HT | PEA.L (A4) 00023ea6 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00023eac de fc 00 10 | | ADDA.W #0x10,A7 00023eb0 48 51 |HQ | PEA.L (A1) 00023eb2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023eb8 58 4f |XO | ADDQ.L #0x4,A7 00023eba 48 52 |HR | PEA.L (A2) 00023ebc 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023ec2 58 4f |XO | ADDQ.L #0x4,A7 00023ec4 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 00023ec8 4e 5e |N^ | UNLK A6 00023eca 4e 75 |Nu | RTS 00023ecc ; -------------------------------------------------------------------------------------- 00023ecc ; OMSI PASCAL Function 00023ecc ; <LVAR 0x008 4(r)> 00023ecc ; -------------------------------------------------------------------------------------- 00023ecc 4e 56 ff c6 |NV | LINK.W A6,#0xffc6 00023ed0 bf d5 | | CMPA.L (A5),A7 00023ed2 62 06 |b | BHI 0x23eda 00023ed4 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023ed8 4e 76 |Nv | TRAPV 00023eda de fc 00 2e | . | ADDA.W #0x2e,A7 00023ede 48 e7 83 88 |H | MOVEM.L A4+A0+D7+D6+D0,-(A7) 00023ee2 59 4f |YO | SUBQ.L #0x4,A7 00023ee4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023ee8 4e ba f3 52 |N R | JSR 0x2323c 00023eec 58 4f |XO | ADDQ.L #0x4,A7 00023eee 2c 1f |, | MOVE.L (A7)+,D6 00023ef0 66 2e |f. | BNE 0x23f20 00023ef2 41 f9 00 02 79 90 |A y | LEA.L 0x27990,A0 00023ef8 70 04 |p | MOVEQ.L #0x04,D0 00023efa 3f 20 |? | MOVE.W -(A0),-(A7) 00023efc 51 c8 ff fc |Q | DBF D0,0x23efa 00023f00 59 4f |YO | SUBQ.L #0x4,A7 00023f02 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023f06 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023f0a 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00023f0e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023f14 50 4f |PO | ADDQ.L #0x8,A7 00023f16 4e ba fe aa |N | JSR TRY_HLP_FILE(?) 00023f1a de fc 00 0e | | ADDA.W #0xe,A7 00023f1e 60 26 |`& | BRA 0x23f46 00023f20 2f 06 |/ | MOVE.L D6,-(A7) 00023f22 7e 01 |~ | MOVEQ.L #0x01,D7 00023f24 be 97 | | CMP.L (A7),D7 00023f26 6e 1c |n | BGT 0x23f44 00023f28 59 4f |YO | SUBQ.L #0x4,A7 00023f2a 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023f2e 2f 07 |/ | MOVE.L D7,-(A7) 00023f30 4e ba fc 34 |N 4 | JSR 0x23b66 00023f34 50 4f |PO | ADDQ.L #0x8,A7 00023f36 28 5f |(_ | MOVEA.L (A7)+,A4 00023f38 2f 0c |/ | MOVE.L A4,-(A7) 00023f3a 4e ba fe 86 |N | JSR TRY_HLP_FILE(?) 00023f3e 58 4f |XO | ADDQ.L #0x4,A7 00023f40 52 87 |R | ADDQ.L #0x1,D7 00023f42 68 e0 |h | BVC 0x23f24 00023f44 58 4f |XO | ADDQ.L #0x4,A7 00023f46 4c df 11 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A4 00023f4a 4e 5e |N^ | UNLK A6 00023f4c 4e 75 |Nu | RTS 00023f4e ; -------------------------------------------------------------------------------------- 00023f4e ; OMSI PASCAL Function 00023f4e ; <LVAR 0x00c @> 00023f4e ; <LVAR 0x008 @ 4(r)> 00023f4e ; <LVAR -0x020 @> 00023f4e ; -------------------------------------------------------------------------------------- 00023f4e 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 00023f52 bf d5 | | CMPA.L (A5),A7 00023f54 62 06 |b | BHI 0x23f5c 00023f56 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023f5a 4e 76 |Nv | TRAPV 00023f5c de fc 00 24 | $ | ADDA.W #0x24,A7 00023f60 48 e7 e1 c0 |H | MOVEM.L A1+A0+D7+D2+D1+D0,-(A7) 00023f64 74 1d |t | MOVEQ.L #0x1d,D2 00023f66 7e 01 |~ | MOVEQ.L #0x01,D7 00023f68 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023f6c 30 10 |0 | MOVE.W (A0),D0 00023f6e 48 c0 |H | EXTW.L D0 00023f70 be 80 | | CMP.L D0,D7 00023f72 6f 10 |o | BLE 0x23f84 00023f74 20 07 | | MOVE.L D7,D0 00023f76 53 80 |S | SUBQ.L #0x1,D0 00023f78 b0 82 | | CMP.L D2,D0 00023f7a 63 02 |c | BLS 0x23f7e 00023f7c 4e 4f |NO | TRAP #15 00023f7e 42 36 08 e0 |B6 | CLR.B (A6+D0.L-#0x20) 00023f82 60 1e |` | BRA 0x23fa2 00023f84 20 07 | | MOVE.L D7,D0 00023f86 53 80 |S | SUBQ.L #0x1,D0 00023f88 b0 82 | | CMP.L D2,D0 00023f8a 63 02 |c | BLS 0x23f8e 00023f8c 4e 4f |NO | TRAP #15 00023f8e 22 07 |" | MOVE.L D7,D1 00023f90 53 81 |S | SUBQ.L #0x1,D1 00023f92 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00023f98 63 02 |c | BLS 0x23f9c 00023f9a 4e 4f |NO | TRAP #15 00023f9c 1d b0 18 02 08 e0 | | MOVE.B (A0+D1.L+#0x2),(A6+D0.L-#0x20) 00023fa2 52 87 |R | ADDQ.L #0x1,D7 00023fa4 0c 87 00 00 00 1e | | CMPI.L #0x0000001e,D7 00023faa 6f bc |o | BLE 0x23f68 00023fac 48 6e 00 08 |Hn | PEA.L (A6+0x8) 00023fb0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023fb6 58 4f |XO | ADDQ.L #0x4,A7 00023fb8 41 ee 00 0c |A | LEA.L (A6+0xc),A0 00023fbc 43 ee ff e0 |C | LEA.L (A6-0x20),A1 00023fc0 70 0e |p | MOVEQ.L #0x0e,D0 00023fc2 30 d9 |0 | MOVE.W (A1)+,(A0)+ 00023fc4 51 c8 ff fc |Q | DBF D0,0x23fc2 00023fc8 4c df 03 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1 00023fcc 4e 5e |N^ | UNLK A6 00023fce 4e 75 |Nu | RTS 00023fd0 ; -------------------------------------------------------------------------------------- 00023fd0 ; OMSI PASCAL Function 00023fd0 ; <LVAR 0x026 4(w)> 00023fd0 ; <LVAR 0x008 @> 00023fd0 ; <LVAR -0x006 4(rw)> 00023fd0 ; -------------------------------------------------------------------------------------- 00023fd0 4e 56 ff d6 |NV | LINK.W A6,#0xffd6 00023fd4 bf d5 | | CMPA.L (A5),A7 00023fd6 62 06 |b | BHI 0x23fde 00023fd8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023fdc 4e 76 |Nv | TRAPV 00023fde de fc 00 24 | $ | ADDA.W #0x24,A7 00023fe2 48 e7 c1 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D1+D0,-(A7) 00023fe6 47 ee ff fa |G | LEA.L (A6-0x6),A3 00023fea 7e 00 |~ | MOVEQ.L #0x00,D7 00023fec 26 b9 00 02 79 a8 |& y | MOVE.L 0x279a8,(A3) 00023ff2 20 53 | S | MOVEA.L (A3),A0 00023ff4 b0 fc 00 01 | | CMPA.W #0x1,A0 00023ff8 67 1e |g | BEQ 0x24018 00023ffa 4a 07 |J | TST.B D7 00023ffc 66 1a |f | BNE 0x24018 00023ffe 22 48 |"H | MOVEA.L A0,A1 00024000 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00024004 70 1d |p | MOVEQ.L #0x1d,D0 00024006 b5 09 | | CMPM.B (A1)+,(A2)+ 00024008 56 c8 ff fc |V | DBNE D0,0x24006 0002400c 66 04 |f | BNE 0x24012 0002400e 7e 01 |~ | MOVEQ.L #0x01,D7 00024010 60 04 |` | BRA 0x24016 00024012 26 a8 00 26 |& & | MOVE.L (A0+0x26),(A3) 00024016 60 da |` | BRA 0x23ff2 00024018 2d 48 00 26 |-H & | MOVE.L A0,(A6+0x26) 0002401c 4c df 0f 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2+A3 00024020 4e 5e |N^ | UNLK A6 00024022 4e 75 |Nu | RTS 00024024 ; -------------------------------------------------------------------------------------- 00024024 ; OMSI PASCAL Function 00024024 ; <LVAR 0x008 @ 4(r)> 00024024 ; -------------------------------------------------------------------------------------- 00024024 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00024028 bf d5 | | CMPA.L (A5),A7 0002402a 62 06 |b | BHI 0x24032 0002402c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024030 4e 76 |Nv | TRAPV 00024032 de fc 00 2c | , | ADDA.W #0x2c,A7 00024036 48 e7 81 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D0,-(A7) 0002403a 43 ee 00 08 |C | LEA.L (A6+0x8),A1 0002403e 45 f9 00 02 79 a8 |E y | LEA.L 0x279a8,A2 00024044 70 01 |p | MOVEQ.L #0x01,D0 00024046 20 51 | Q | MOVEA.L (A1),A0 00024048 b0 c0 | | CMPA.W D0,A0 0002404a 67 56 |gV | BEQ 0x240a2 0002404c 4a a8 00 1e |J | TST.L (A0+0x1e) 00024050 67 10 |g | BEQ 0x24062 00024052 2f 28 00 22 |/( " | MOVE.L (A0+0x22),-(A7) 00024056 2f 28 00 1e |/( | MOVE.L (A0+0x1e),-(A7) 0002405a 4e b9 00 01 02 a4 |N | JSR Free1(a : Pointer; b : Long) 00024060 50 4f |PO | ADDQ.L #0x8,A7 00024062 7e 00 |~ | MOVEQ.L #0x00,D7 00024064 38 40 |8@ | MOVEA.W D0,A4 00024066 26 52 |&R | MOVEA.L (A2),A3 00024068 b6 c0 | | CMPA.W D0,A3 0002406a 67 14 |g | BEQ 0x24080 0002406c 4a 07 |J | TST.B D7 0002406e 66 10 |f | BNE 0x24080 00024070 b7 d1 | | CMPA.L (A1),A3 00024072 66 04 |f | BNE 0x24078 00024074 7e 01 |~ | MOVEQ.L #0x01,D7 00024076 60 06 |` | BRA 0x2407e 00024078 28 4b |(K | MOVEA.L A3,A4 0002407a 26 6b 00 26 |&k & | MOVEA.L (A3+0x26),A3 0002407e 60 e8 |` | BRA 0x24068 00024080 4a 07 |J | TST.B D7 00024082 67 1e |g | BEQ 0x240a2 00024084 b8 c0 | | CMPA.W D0,A4 00024086 66 06 |f | BNE 0x2408e 00024088 24 ab 00 26 |$ & | MOVE.L (A3+0x26),(A2) 0002408c 60 06 |` | BRA 0x24094 0002408e 29 6b 00 26 00 26 |)k & & | MOVE.L (A3+0x26),(A4+0x26) 00024094 48 51 |HQ | PEA.L (A1) 00024096 48 78 00 2a |Hx * | PEA.L 0x2a 0002409a 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 000240a0 50 4f |PO | ADDQ.L #0x8,A7 000240a2 4c df 1f 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1+A2+A3+A4 000240a6 4e 5e |N^ | UNLK A6 000240a8 4e 75 |Nu | RTS 000240aa ; -------------------------------------------------------------------------------------- 000240aa ; OMSI PASCAL Function 000240aa ; <LVAR 0x010 4(w)> 000240aa ; <LVAR 0x00c 4(r)> 000240aa ; <LVAR 0x008 4(r)> 000240aa ; <LVAR -0x006 @ 4(rw)> 000240aa ; <LVAR -0x024 @> 000240aa ; -------------------------------------------------------------------------------------- 000240aa 4e 56 ff 9a |NV | LINK.W A6,#0xff9a 000240ae bf d5 | | CMPA.L (A5),A7 000240b0 62 06 |b | BHI 0x240b8 000240b2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000240b6 4e 76 |Nv | TRAPV 000240b8 de fc 00 42 | B | ADDA.W #0x42,A7 000240bc 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 000240c0 47 ee ff fa |G | LEA.L (A6-0x6),A3 000240c4 49 ee 00 08 |I | LEA.L (A6+0x8),A4 000240c8 72 1e |r | MOVEQ.L #0x1e,D1 000240ca 9e c1 | | SUBA.W D1,A7 000240cc 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000240d0 2f 10 |/ | MOVE.L (A0),-(A7) 000240d2 4e ba fe 7a |N z | JSR 0x23f4e 000240d6 58 4f |XO | ADDQ.L #0x4,A7 000240d8 41 ee ff dc |A | LEA.L (A6-0x24),A0 000240dc 70 0e |p | MOVEQ.L #0x0e,D0 000240de 30 df |0 | MOVE.W (A7)+,(A0)+ 000240e0 51 c8 ff fc |Q | DBF D0,0x240de 000240e4 4a 94 |J | TST.L (A4) 000240e6 6c 02 |l | BGE 0x240ea 000240e8 42 94 |B | CLR.L (A4) 000240ea 59 4f |YO | SUBQ.L #0x4,A7 000240ec 20 4b | K | MOVEA.L A3,A0 000240ee 70 0e |p | MOVEQ.L #0x0e,D0 000240f0 3f 20 |? | MOVE.W -(A0),-(A7) 000240f2 51 c8 ff fc |Q | DBF D0,0x240f0 000240f6 4e ba fe d8 |N | JSR 0x23fd0 000240fa de c1 | | ADDA.W D1,A7 000240fc 26 9f |& | MOVE.L (A7)+,(A3) 000240fe 20 53 | S | MOVEA.L (A3),A0 00024100 b0 fc 00 01 | | CMPA.W #0x1,A0 00024104 67 12 |g | BEQ 0x24118 00024106 20 28 00 1e | ( | MOVE.L (A0+0x1e),D0 0002410a b0 94 | | CMP.L (A4),D0 0002410c 66 02 |f | BNE 0x24110 0002410e 60 4c |`L | BRA 0x2415c 00024110 2f 13 |/ | MOVE.L (A3),-(A7) 00024112 4e ba ff 10 |N | JSR 0x24024 00024116 58 4f |XO | ADDQ.L #0x4,A7 00024118 48 53 |HS | PEA.L (A3) 0002411a 48 78 00 2a |Hx * | PEA.L 0x2a 0002411e 4e b9 00 01 02 9c |N | JSR Malloc1(length : Long) : Pointer 00024124 50 4f |PO | ADDQ.L #0x8,A7 00024126 20 53 | S | MOVEA.L (A3),A0 00024128 21 79 00 02 79 a8 00 26 |!y y &| MOVE.L 0x279a8,(A0+0x26) 00024130 23 d3 00 02 79 a8 |# y | MOVE.L (A3),0x279a8 00024136 22 48 |"H | MOVEA.L A0,A1 00024138 45 ee ff dc |E | LEA.L (A6-0x24),A2 0002413c 70 1d |p | MOVEQ.L #0x1d,D0 0002413e 12 da | | MOVE.B (A2)+,(A1)+ 00024140 51 c8 ff fc |Q | DBF D0,0x2413e 00024144 21 54 00 1e |!T | MOVE.L (A4),(A0+0x1e) 00024148 4a 94 |J | TST.L (A4) 0002414a 67 10 |g | BEQ 0x2415c 0002414c 59 4f |YO | SUBQ.L #0x4,A7 0002414e 2f 14 |/ | MOVE.L (A4),-(A7) 00024150 4e b9 00 01 02 a0 |N | JSR Malloc2(VAR dst : Pointer; length : Word) 00024156 58 4f |XO | ADDQ.L #0x4,A7 00024158 21 5f 00 22 |!_ " | MOVE.L (A7)+,(A0+0x22) 0002415c 2d 53 00 10 |-S | MOVE.L (A3),(A6+0x10) 00024160 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 00024164 4e 5e |N^ | UNLK A6 00024166 4e 75 |Nu | RTS 00024168 ; -------------------------------------------------------------------------------------- 00024168 ; OMSI PASCAL Function 00024168 ; <LVAR 0x00c @> 00024168 ; <LVAR 0x008 @ 4(r)> 00024168 ; <LVAR -0x008 4(rw)> 00024168 ; -------------------------------------------------------------------------------------- 00024168 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 0002416c bf d5 | | CMPA.L (A5),A7 0002416e 62 06 |b | BHI 0x24176 00024170 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024174 4e 76 |Nv | TRAPV 00024176 de fc 00 2c | , | ADDA.W #0x2c,A7 0002417a 48 e7 c3 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D1+D0,-(A7) 0002417e 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00024182 20 52 | R | MOVEA.L (A2),A0 00024184 30 10 |0 | MOVE.W (A0),D0 00024186 48 c0 |H | EXTW.L D0 00024188 2c 00 |, | MOVE.L D0,D6 0002418a 59 4f |YO | SUBQ.L #0x4,A7 0002418c 48 6e 00 0c |Hn | PEA.L (A6+0xc) 00024190 2f 06 |/ | MOVE.L D6,-(A7) 00024192 4e ba ff 16 |N | JSR 0x240aa 00024196 50 4f |PO | ADDQ.L #0x8,A7 00024198 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 0002419c 4a 86 |J | TST.L D6 0002419e 67 40 |g@ | BEQ 0x241e0 000241a0 20 6e ff f8 | n | MOVEA.L (A6-0x8),A0 000241a4 20 68 00 22 | h " | MOVEA.L (A0+0x22),A0 000241a8 2f 08 |/ | MOVE.L A0,-(A7) 000241aa 2f 06 |/ | MOVE.L D6,-(A7) 000241ac 7e 01 |~ | MOVEQ.L #0x01,D7 000241ae be 97 | | CMP.L (A7),D7 000241b0 6e 2c |n, | BGT 0x241de 000241b2 20 07 | | MOVE.L D7,D0 000241b4 53 80 |S | SUBQ.L #0x1,D0 000241b6 0c 80 00 00 03 ff | | CMPI.L #0x000003ff,D0 000241bc 63 02 |c | BLS 0x241c0 000241be 4e 4f |NO | TRAP #15 000241c0 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 000241c4 22 52 |"R | MOVEA.L (A2),A1 000241c6 22 07 |" | MOVE.L D7,D1 000241c8 53 81 |S | SUBQ.L #0x1,D1 000241ca 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 000241d0 63 02 |c | BLS 0x241d4 000241d2 4e 4f |NO | TRAP #15 000241d4 11 b1 18 02 08 00 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L) 000241da 52 87 |R | ADDQ.L #0x1,D7 000241dc 68 d0 |h | BVC 0x241ae 000241de 50 4f |PO | ADDQ.L #0x8,A7 000241e0 48 52 |HR | PEA.L (A2) 000241e2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000241e8 58 4f |XO | ADDQ.L #0x4,A7 000241ea 4c df 07 c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0+A1+A2 000241ee 4e 5e |N^ | UNLK A6 000241f0 4e 75 |Nu | RTS 000241f2 ; -------------------------------------------------------------------------------------- 000241f2 ; OMSI PASCAL Function 000241f2 ; <LVAR 0x008 4(r)> 000241f2 ; <LVAR -0x004 @ 4(w)> 000241f2 ; <LVAR -0x008 4(rw)> 000241f2 ; <LVAR -0x00c 4(rw)> 000241f2 ; <LVAR -0x010 4(rw)> 000241f2 ; <LVAR -0x01c 4(rw)> 000241f2 ; <LVAR -0x020 4(rw)> 000241f2 ; -------------------------------------------------------------------------------------- 000241f2 4e 56 ff 82 |NV | LINK.W A6,#0xff82 000241f6 bf d5 | | CMPA.L (A5),A7 000241f8 62 06 |b | BHI 0x24200 000241fa 44 fc 00 02 |D | MOVE.W #0x2,CCR 000241fe 4e 76 |Nv | TRAPV 00024200 de fc 00 5a | Z | ADDA.W #0x5a,A7 00024204 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00024208 45 ee ff f4 |E | LEA.L (A6-0xc),A2 0002420c 47 ee ff f0 |G | LEA.L (A6-0x10),A3 00024210 49 ee 00 08 |I | LEA.L (A6+0x8),A4 00024214 74 01 |t | MOVEQ.L #0x01,D2 00024216 59 4f |YO | SUBQ.L #0x4,A7 00024218 2f 14 |/ | MOVE.L (A4),-(A7) 0002421a 4e ba f0 20 |N | JSR 0x2323c 0002421e 58 4f |XO | ADDQ.L #0x4,A7 00024220 26 9f |& | MOVE.L (A7)+,(A3) 00024222 20 13 | | MOVE.L (A3),D0 00024224 b0 82 | | CMP.L D2,D0 00024226 6c 2e |l. | BGE 0x24256 00024228 9e fc 00 1a | | SUBA.W #0x1a,A7 0002422c 20 4f | O | MOVEA.L A7,A0 0002422e 43 fa e7 d6 |C | LEA.L 0x22a06,A1 00024232 72 18 |r | MOVEQ.L #0x18,D1 00024234 10 d9 | | MOVE.B (A1)+,(A0)+ 00024236 51 c9 ff fc |Q | DBF D1,0x24234 0002423a 59 4f |YO | SUBQ.L #0x4,A7 0002423c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024240 3f 02 |? | MOVE.W D2,-(A7) 00024242 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00024246 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002424c 50 4f |PO | ADDQ.L #0x8,A7 0002424e 4e ba eb d8 |N | JSR 0x22e28 00024252 de fc 00 1e | | ADDA.W #0x1e,A7 00024256 42 92 |B | CLR.L (A2) 00024258 2f 00 |/ | MOVE.L D0,-(A7) 0002425a 7c 02 || | MOVEQ.L #0x02,D6 0002425c bc 97 | | CMP.L (A7),D6 0002425e 6e 1e |n | BGT 0x2427e 00024260 9e fc 00 0c | | SUBA.W #0xc,A7 00024264 2f 14 |/ | MOVE.L (A4),-(A7) 00024266 2f 06 |/ | MOVE.L D6,-(A7) 00024268 4e ba f8 1e |N | JSR 0x23a88 0002426c 50 4f |PO | ADDQ.L #0x8,A7 0002426e 4e ba f7 e0 |N | JSR 0x23a50 00024272 50 4f |PO | ADDQ.L #0x8,A7 00024274 20 12 | | MOVE.L (A2),D0 00024276 d0 9f | | ADD.L (A7)+,D0 00024278 24 80 |$ | MOVE.L D0,(A2) 0002427a 52 86 |R | ADDQ.L #0x1,D6 0002427c 68 de |h | BVC 0x2425c 0002427e 58 4f |XO | ADDQ.L #0x4,A7 00024280 20 13 | | MOVE.L (A3),D0 00024282 55 80 |U | SUBQ.L #0x2,D0 00024284 d1 92 | | ADD.L D0,(A2) 00024286 59 4f |YO | SUBQ.L #0x4,A7 00024288 2f 14 |/ | MOVE.L (A4),-(A7) 0002428a 48 78 00 01 |Hx | PEA.L 0x1 0002428e 4e ba f8 d6 |N | JSR 0x23b66 00024292 50 4f |PO | ADDQ.L #0x8,A7 00024294 2d 57 ff fc |-W | MOVE.L (A7),(A6-0x4) 00024298 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002429c 2f 12 |/ | MOVE.L (A2),-(A7) 0002429e 4e ba fe 0a |N | JSR 0x240aa 000242a2 50 4f |PO | ADDQ.L #0x8,A7 000242a4 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 000242a8 4a 92 |J | TST.L (A2) 000242aa 6f ff 00 00 00 b0 |o | BLE 0x2435c 000242b0 20 6e ff f8 | n | MOVEA.L (A6-0x8),A0 000242b4 20 68 00 22 | h " | MOVEA.L (A0+0x22),A0 000242b8 2f 08 |/ | MOVE.L A0,-(A7) 000242ba 7e 01 |~ | MOVEQ.L #0x01,D7 000242bc 2f 13 |/ | MOVE.L (A3),-(A7) 000242be 7c 02 || | MOVEQ.L #0x02,D6 000242c0 bc 97 | | CMP.L (A7),D6 000242c2 6e ff 00 00 00 96 |n | BGT 0x2435a 000242c8 51 4f |QO | SUBQ.L #0x8,A7 000242ca 2f 14 |/ | MOVE.L (A4),-(A7) 000242cc 2f 06 |/ | MOVE.L D6,-(A7) 000242ce 4e ba f7 b8 |N | JSR 0x23a88 000242d2 50 4f |PO | ADDQ.L #0x8,A7 000242d4 2d 5f ff e0 |-_ | MOVE.L (A7)+,(A6-0x20) 000242d8 2d 5f ff e4 |-_ | MOVE.L (A7)+,(A6-0x1c) 000242dc 2f 2e ff e4 |/. | MOVE.L (A6-0x1c),-(A7) 000242e0 2a 2e ff e0 |*. | MOVE.L (A6-0x20),D5 000242e4 ba 97 | | CMP.L (A7),D5 000242e6 6e 14 |n | BGT 0x242fc 000242e8 20 17 | | MOVE.L (A7),D0 000242ea 0c 85 80 00 00 01 | | CMPI.L #0x80000001,D5 000242f0 6d 08 |m | BLT 0x242fa 000242f2 0c 80 7f ff ff ff | | CMPI.L #0x7fffffff,D0 000242f8 6f 02 |o | BLE 0x242fc 000242fa 4e 4f |NO | TRAP #15 000242fc ba 97 | | CMP.L (A7),D5 000242fe 6e 32 |n2 | BGT 0x24332 00024300 20 07 | | MOVE.L D7,D0 00024302 53 80 |S | SUBQ.L #0x1,D0 00024304 0c 80 00 00 03 ff | | CMPI.L #0x000003ff,D0 0002430a 63 02 |c | BLS 0x2430e 0002430c 4e 4f |NO | TRAP #15 0002430e 20 6f 00 08 | o | MOVEA.L (A7+0x8),A0 00024312 22 05 |" | MOVE.L D5,D1 00024314 53 81 |S | SUBQ.L #0x1,D1 00024316 0c 81 00 00 0f ff | | CMPI.L #0x00000fff,D1 0002431c 63 02 |c | BLS 0x24320 0002431e 4e 4f |NO | TRAP #15 00024320 43 f9 00 02 69 76 |C iv | LEA.L 0x26976,A1 00024326 11 b1 18 08 08 00 | | MOVE.B (A1+D1.L+#0x8),(A0+D0.L) 0002432c 52 87 |R | ADDQ.L #0x1,D7 0002432e 52 85 |R | ADDQ.L #0x1,D5 00024330 68 ca |h | BVC 0x242fc 00024332 58 4f |XO | ADDQ.L #0x4,A7 00024334 bc 93 | | CMP.L (A3),D6 00024336 67 1a |g | BEQ 0x24352 00024338 20 07 | | MOVE.L D7,D0 0002433a 53 80 |S | SUBQ.L #0x1,D0 0002433c 0c 80 00 00 03 ff | | CMPI.L #0x000003ff,D0 00024342 63 02 |c | BLS 0x24346 00024344 4e 4f |NO | TRAP #15 00024346 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 0002434a 11 bc 00 2c 08 00 | , | MOVE.B #0x2c,(A0+D0.L) 00024350 52 87 |R | ADDQ.L #0x1,D7 00024352 52 86 |R | ADDQ.L #0x1,D6 00024354 68 ff ff ff ff 6a |h j | BVC 0x242c0 0002435a 50 4f |PO | ADDQ.L #0x8,A7 0002435c 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 00024360 4e 5e |N^ | UNLK A6 00024362 4e 75 |Nu | RTS 00024364 ; -------------------------------------------------------------------------------------- 00024364 ; OMSI PASCAL Function 00024364 ; <LVAR 0x008 4(r)> 00024364 ; <LVAR -0x00c 4(rw)> 00024364 ; -------------------------------------------------------------------------------------- 00024364 4e 56 ff a0 |NV | LINK.W A6,#0xffa0 00024368 bf d5 | | CMPA.L (A5),A7 0002436a 62 06 |b | BHI 0x24372 0002436c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024370 4e 76 |Nv | TRAPV 00024372 de fc 00 54 | T | ADDA.W #0x54,A7 00024376 48 e7 e1 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D2+D1+D0,-(A7) 0002437a 47 f9 00 02 79 7e |G y~ | LEA.L 0x2797e,A3 00024380 74 01 |t | MOVEQ.L #0x01,D2 00024382 59 4f |YO | SUBQ.L #0x4,A7 00024384 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024388 48 78 00 01 |Hx | PEA.L 0x1 0002438c 4e ba f7 d8 |N | JSR 0x23b66 00024390 50 4f |PO | ADDQ.L #0x8,A7 00024392 28 5f |(_ | MOVEA.L (A7)+,A4 00024394 9e fc 00 22 | " | SUBA.W #0x22,A7 00024398 2f 0c |/ | MOVE.L A4,-(A7) 0002439a 4e ba fb b2 |N | JSR 0x23f4e 0002439e 58 4f |XO | ADDQ.L #0x4,A7 000243a0 4e ba fc 2e |N . | JSR 0x23fd0 000243a4 de fc 00 1e | | ADDA.W #0x1e,A7 000243a8 2d 5f ff f4 |-_ | MOVE.L (A7)+,(A6-0xc) 000243ac 20 6e ff f4 | n | MOVEA.L (A6-0xc),A0 000243b0 b0 c2 | | CMPA.W D2,A0 000243b2 66 42 |fB | BNE 0x243f6 000243b4 9e fc 00 14 | | SUBA.W #0x14,A7 000243b8 22 4f |"O | MOVEA.L A7,A1 000243ba 45 fa e6 64 |E d | LEA.L 0x22a20,A2 000243be 70 12 |p | MOVEQ.L #0x12,D0 000243c0 12 da | | MOVE.B (A2)+,(A1)+ 000243c2 51 c8 ff fc |Q | DBF D0,0x243c0 000243c6 51 4f |QO | SUBQ.L #0x8,A7 000243c8 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000243cc 3f 02 |? | MOVE.W D2,-(A7) 000243ce 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 000243d2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000243d8 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 000243dc 48 78 00 01 |Hx | PEA.L 0x1 000243e0 4e ba f7 84 |N | JSR 0x23b66 000243e4 50 4f |PO | ADDQ.L #0x8,A7 000243e6 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000243ec 50 4f |PO | ADDQ.L #0x8,A7 000243ee 4e ba ea 38 |N 8 | JSR 0x22e28 000243f2 de fc 00 18 | | ADDA.W #0x18,A7 000243f6 2f 08 |/ | MOVE.L A0,-(A7) 000243f8 2f 13 |/ | MOVE.L (A3),-(A7) 000243fa 2f 28 00 1e |/( | MOVE.L (A0+0x1e),-(A7) 000243fe 44 97 |D | NEG.L (A7) 00024400 4e ba ef 82 |N | JSR 0x23384 00024404 58 4f |XO | ADDQ.L #0x4,A7 00024406 2e a8 00 1e |. | MOVE.L (A0+0x1e),(A7) 0002440a 7e 01 |~ | MOVEQ.L #0x01,D7 0002440c be 97 | | CMP.L (A7),D7 0002440e 6e 38 |n8 | BGT 0x24448 00024410 20 07 | | MOVE.L D7,D0 00024412 d0 93 | | ADD.L (A3),D0 00024414 53 80 |S | SUBQ.L #0x1,D0 00024416 53 80 |S | SUBQ.L #0x1,D0 00024418 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 0002441e 63 02 |c | BLS 0x24422 00024420 4e 4f |NO | TRAP #15 00024422 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 00024428 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 0002442c 22 69 00 22 |"i " | MOVEA.L (A1+0x22),A1 00024430 22 07 |" | MOVE.L D7,D1 00024432 53 81 |S | SUBQ.L #0x1,D1 00024434 0c 81 00 00 03 ff | | CMPI.L #0x000003ff,D1 0002443a 63 02 |c | BLS 0x2443e 0002443c 4e 4f |NO | TRAP #15 0002443e 11 b1 18 00 08 08 | | MOVE.B (A1+D1.L),(A0+D0.L+#0x8) 00024444 52 87 |R | ADDQ.L #0x1,D7 00024446 68 c4 |h | BVC 0x2440c 00024448 50 4f |PO | ADDQ.L #0x8,A7 0002444a 4c df 1f 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1+A2+A3+A4 0002444e 4e 5e |N^ | UNLK A6 00024450 4e 75 |Nu | RTS 00024452 ; -------------------------------------------------------------------------------------- 00024452 ; OMSI PASCAL Function 00024452 ; <LVAR -0x004 4(rw)> 00024452 ; -------------------------------------------------------------------------------------- 00024452 4e 56 ff ae |NV | LINK.W A6,#0xffae 00024456 bf d5 | | CMPA.L (A5),A7 00024458 62 06 |b | BHI 0x24460 0002445a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002445e 4e 76 |Nv | TRAPV 00024460 de fc 00 4e | N | ADDA.W #0x4e,A7 00024464 48 e7 e0 f0 |H | MOVEM.L A3+A2+A1+A0+D2+D1+D0,-(A7) 00024468 47 ee ff fc |G | LEA.L (A6-0x4),A3 0002446c 72 01 |r | MOVEQ.L #0x01,D1 0002446e 74 1e |t | MOVEQ.L #0x1e,D2 00024470 26 b9 00 02 79 a8 |& y | MOVE.L 0x279a8,(A3) 00024476 20 53 | S | MOVEA.L (A3),A0 00024478 b0 c1 | | CMPA.W D1,A0 0002447a 67 30 |g0 | BEQ 0x244ac 0002447c 9e c2 | | SUBA.W D2,A7 0002447e 22 4f |"O | MOVEA.L A7,A1 00024480 24 48 |$H | MOVEA.L A0,A2 00024482 70 1d |p | MOVEQ.L #0x1d,D0 00024484 12 da | | MOVE.B (A2)+,(A1)+ 00024486 51 c8 ff fc |Q | DBF D0,0x24484 0002448a 59 4f |YO | SUBQ.L #0x4,A7 0002448c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024490 3f 01 |? | MOVE.W D1,-(A7) 00024492 3f 02 |? | MOVE.W D2,-(A7) 00024494 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002449a 50 4f |PO | ADDQ.L #0x8,A7 0002449c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000244a2 de fc 00 22 | " | ADDA.W #0x22,A7 000244a6 26 a8 00 26 |& & | MOVE.L (A0+0x26),(A3) 000244aa 60 ca |` | BRA 0x24476 000244ac 4c df 0f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3 000244b0 4e 5e |N^ | UNLK A6 000244b2 4e 75 |Nu | RTS 000244b4 ; -------------------------------------------------------------------------------------- 000244b4 ; OMSI PASCAL Function 000244b4 ; <LVAR 0x008 4(r)> 000244b4 ; -------------------------------------------------------------------------------------- 000244b4 4e 56 ff ce |NV | LINK.W A6,#0xffce 000244b8 bf d5 | | CMPA.L (A5),A7 000244ba 62 06 |b | BHI 0x244c2 000244bc 44 fc 00 02 |D | MOVE.W #0x2,CCR 000244c0 4e 76 |Nv | TRAPV 000244c2 de fc 00 32 | 2 | ADDA.W #0x32,A7 000244c6 9e fc 00 26 | & | SUBA.W #0x26,A7 000244ca 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000244ce 48 78 00 01 |Hx | PEA.L 0x1 000244d2 4e ba f6 92 |N | JSR 0x23b66 000244d6 50 4f |PO | ADDQ.L #0x8,A7 000244d8 4e ba fa 74 |N t | JSR 0x23f4e 000244dc 58 4f |XO | ADDQ.L #0x4,A7 000244de 4e ba fa f0 |N | JSR 0x23fd0 000244e2 de fc 00 1e | | ADDA.W #0x1e,A7 000244e6 4e ba fb 3c |N < | JSR 0x24024 000244ea 58 4f |XO | ADDQ.L #0x4,A7 000244ec 4e 5e |N^ | UNLK A6 000244ee 4e 75 |Nu | RTS 000244f0 ; -------------------------------------------------------------------------------------- 000244f0 ; OMSI PASCAL Function 000244f0 ; -------------------------------------------------------------------------------------- 000244f0 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 000244f4 bf d5 | | CMPA.L (A5),A7 000244f6 62 06 |b | BHI 0x244fe 000244f8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000244fc 4e 76 |Nv | TRAPV 000244fe de fc 00 0c | | ADDA.W #0xc,A7 00024502 51 4f |QO | SUBQ.L #0x8,A7 00024504 4e b9 00 01 03 cc |N | JSR GetPushLevel() : Long 0002450a 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00024510 58 4f |XO | ADDQ.L #0x4,A7 00024512 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00024518 58 4f |XO | ADDQ.L #0x4,A7 0002451a 4e 5e |N^ | UNLK A6 0002451c 4e 75 |Nu | RTS 0002451e ; -------------------------------------------------------------------------------------- 0002451e ; OMSI PASCAL Function 0002451e ; <LVAR 0x008 4(r)> 0002451e ; <LVAR -0x004 1(rw)> 0002451e ; <LVAR -0x008 @ 4(rw)> 0002451e ; <LVAR -0x00c @ 4(r)> 0002451e ; <LVAR -0x010 @ 4(r)> 0002451e ; <LVAR -0x012 @ 1(r)> 0002451e ; <LVAR -0x013 @ 1(r)> 0002451e ; <LVAR -0x014 @ 1(r)> 0002451e ; <LVAR -0x024 4(rw)> 0002451e ; <LVAR -0x028 4(rw)> 0002451e ; <LVAR -0x02c 4(rw)> 0002451e ; <LVAR -0x030 @ 4(r)> 0002451e ; <LVAR -0x032 1(w)> 0002451e ; <LVAR -0x036 @ 4(r)> 0002451e ; <LVAR -0x038 @ 1(r)> 0002451e ; <LVAR -0x03c @ 4(rw)> 0002451e ; -------------------------------------------------------------------------------------- 0002451e 4e 56 ff 64 |NV d | LINK.W A6,#0xff64 00024522 bf d5 | | CMPA.L (A5),A7 00024524 62 06 |b | BHI 0x2452c 00024526 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002452a 4e 76 |Nv | TRAPV 0002452c de fc 00 60 | ` | ADDA.W #0x60,A7 00024530 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00024534 45 ee ff c4 |E | LEA.L (A6-0x3c),A2 00024538 47 ee 00 08 |G | LEA.L (A6+0x8),A3 0002453c 49 f9 00 01 02 c4 |I | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A4 00024542 74 01 |t | MOVEQ.L #0x01,D2 00024544 76 14 |v | MOVEQ.L #0x14,D3 00024546 28 3c ff ff 80 00 |(< | MOVE.L #0xffff8000,D4 0002454c 59 4f |YO | SUBQ.L #0x4,A7 0002454e 2f 13 |/ | MOVE.L (A3),-(A7) 00024550 4e ba ec ea |N | JSR 0x2323c 00024554 58 4f |XO | ADDQ.L #0x4,A7 00024556 2d 5f ff d4 |-_ | MOVE.L (A7)+,(A6-0x2c) 0002455a 66 28 |f( | BNE 0x24584 0002455c 59 4f |YO | SUBQ.L #0x4,A7 0002455e 1e ba e4 e6 | | MOVE.B 0x22a46,(A7) 00024562 1f 7a e4 e3 00 01 | z | MOVE.B 0x22a47,(A7+0x1) 00024568 1f 7a e4 de 00 02 | z | MOVE.B 0x22a48,(A7+0x2) 0002456e 59 4f |YO | SUBQ.L #0x4,A7 00024570 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024574 3f 02 |? | MOVE.W D2,-(A7) 00024576 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 0002457a 4e 94 |N | JSR (A4) 0002457c 50 4f |PO | ADDQ.L #0x8,A7 0002457e 24 9f |$ | MOVE.L (A7)+,(A2) 00024580 58 4f |XO | ADDQ.L #0x4,A7 00024582 60 10 |` | BRA 0x24594 00024584 59 4f |YO | SUBQ.L #0x4,A7 00024586 2f 13 |/ | MOVE.L (A3),-(A7) 00024588 48 78 00 01 |Hx | PEA.L 0x1 0002458c 4e ba f5 d8 |N | JSR 0x23b66 00024590 50 4f |PO | ADDQ.L #0x8,A7 00024592 24 9f |$ | MOVE.L (A7)+,(A2) 00024594 5d 4f |]O | SUBQ.L #0x6,A7 00024596 20 4f | O | MOVEA.L A7,A0 00024598 43 fa e4 b6 |C | LEA.L 0x22a50,A1 0002459c 70 04 |p | MOVEQ.L #0x04,D0 0002459e 10 d9 | | MOVE.B (A1)+,(A0)+ 000245a0 51 c8 ff fc |Q | DBF D0,0x2459e 000245a4 59 4f |YO | SUBQ.L #0x4,A7 000245a6 2f 12 |/ | MOVE.L (A2),-(A7) 000245a8 59 4f |YO | SUBQ.L #0x4,A7 000245aa 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000245ae 3f 02 |? | MOVE.W D2,-(A7) 000245b0 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 000245b4 4e 94 |N | JSR (A4) 000245b6 50 4f |PO | ADDQ.L #0x8,A7 000245b8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000245be 50 4f |PO | ADDQ.L #0x8,A7 000245c0 24 9f |$ | MOVE.L (A7)+,(A2) 000245c2 5c 4f |\O | ADDQ.L #0x6,A7 000245c4 2f 12 |/ | MOVE.L (A2),-(A7) 000245c6 42 27 |B' | CLR.B -(A7) 000245c8 1f 02 | | MOVE.B D2,-(A7) 000245ca 48 78 00 00 |Hx | PEA.L 0x0 000245ce 48 6e ff c8 |Hn | PEA.L (A6-0x38) 000245d2 48 6e ff ca |Hn | PEA.L (A6-0x36) 000245d6 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000245dc de c3 | | ADDA.W D3,A7 000245de 4a 2e ff c8 |J. | TST.B (A6-0x38) 000245e2 67 10 |g | BEQ 0x245f4 000245e4 48 52 |HR | PEA.L (A2) 000245e6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000245ec 58 4f |XO | ADDQ.L #0x4,A7 000245ee 60 ff 00 00 02 56 |` V | BRA 0x24846 000245f4 20 6e ff ca | n | MOVEA.L (A6-0x36),A0 000245f8 10 28 00 3f | ( ? | MOVE.B (A0+0x3f),D0 000245fc ed 08 | | LSL.B #0x6,D0 000245fe ee 08 | | LSR.B #0x7,D0 00024600 1d 40 ff ce | @ | MOVE.B D0,(A6-0x32) 00024604 42 27 |B' | CLR.B -(A7) 00024606 1f 02 | | MOVE.B D2,-(A7) 00024608 48 78 00 01 |Hx | PEA.L 0x1 0002460c 48 6e ff c8 |Hn | PEA.L (A6-0x38) 00024610 48 6e ff ca |Hn | PEA.L (A6-0x36) 00024614 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 0002461a de fc 00 10 | | ADDA.W #0x10,A7 0002461e 20 52 | R | MOVEA.L (A2),A0 00024620 32 10 |2 | MOVE.W (A0),D1 00024622 48 c1 |H | EXTW.L D1 00024624 5b 81 |[ | SUBQ.L #0x5,D1 00024626 92 84 | | SUB.L D4,D1 00024628 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 0002462e 63 02 |c | BLS 0x24632 00024630 4e 4f |NO | TRAP #15 00024632 d2 84 | | ADD.L D4,D1 00024634 30 81 |0 | MOVE.W D1,(A0) 00024636 4a 00 |J | TST.B D0 00024638 66 38 |f8 | BNE 0x24672 0002463a 41 fa e4 0a |A | LEA.L 0x22a46,A0 0002463e 70 08 |p | MOVEQ.L #0x08,D0 00024640 3f 20 |? | MOVE.W -(A0),-(A7) 00024642 51 c8 ff fc |Q | DBF D0,0x24640 00024646 59 4f |YO | SUBQ.L #0x4,A7 00024648 2f 12 |/ | MOVE.L (A2),-(A7) 0002464a 59 4f |YO | SUBQ.L #0x4,A7 0002464c 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00024650 3f 02 |? | MOVE.W D2,-(A7) 00024652 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00024656 4e 94 |N | JSR (A4) 00024658 50 4f |PO | ADDQ.L #0x8,A7 0002465a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024660 50 4f |PO | ADDQ.L #0x8,A7 00024662 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00024668 de fc 00 16 | | ADDA.W #0x16,A7 0002466c 60 ff 00 00 01 d8 |` | BRA 0x24846 00024672 48 6e ff d0 |Hn | PEA.L (A6-0x30) 00024676 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 0002467c 58 4f |XO | ADDQ.L #0x4,A7 0002467e 20 6e ff d0 | n | MOVEA.L (A6-0x30),A0 00024682 2f 08 |/ | MOVE.L A0,-(A7) 00024684 7e 01 |~ | MOVEQ.L #0x01,D7 00024686 2f 2e ff d4 |/. | MOVE.L (A6-0x2c),-(A7) 0002468a 7a 02 |z | MOVEQ.L #0x02,D5 0002468c ba 97 | | CMP.L (A7),D5 0002468e 6e ff 00 00 00 98 |n | BGT 0x24728 00024694 51 4f |QO | SUBQ.L #0x8,A7 00024696 2f 13 |/ | MOVE.L (A3),-(A7) 00024698 2f 05 |/ | MOVE.L D5,-(A7) 0002469a 4e ba f3 ec |N | JSR 0x23a88 0002469e 50 4f |PO | ADDQ.L #0x8,A7 000246a0 2d 5f ff d8 |-_ | MOVE.L (A7)+,(A6-0x28) 000246a4 2d 5f ff dc |-_ | MOVE.L (A7)+,(A6-0x24) 000246a8 2f 2e ff dc |/. | MOVE.L (A6-0x24),-(A7) 000246ac 2c 2e ff d8 |,. | MOVE.L (A6-0x28),D6 000246b0 bc 97 | | CMP.L (A7),D6 000246b2 6e 14 |n | BGT 0x246c8 000246b4 20 17 | | MOVE.L (A7),D0 000246b6 0c 86 80 00 00 01 | | CMPI.L #0x80000001,D6 000246bc 6d 08 |m | BLT 0x246c6 000246be 0c 80 7f ff ff ff | | CMPI.L #0x7fffffff,D0 000246c4 6f 02 |o | BLE 0x246c8 000246c6 4e 4f |NO | TRAP #15 000246c8 bc 97 | | CMP.L (A7),D6 000246ca 6e 32 |n2 | BGT 0x246fe 000246cc 20 07 | | MOVE.L D7,D0 000246ce 53 80 |S | SUBQ.L #0x1,D0 000246d0 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 000246d6 63 02 |c | BLS 0x246da 000246d8 4e 4f |NO | TRAP #15 000246da 20 6f 00 08 | o | MOVEA.L (A7+0x8),A0 000246de 22 06 |" | MOVE.L D6,D1 000246e0 53 81 |S | SUBQ.L #0x1,D1 000246e2 0c 81 00 00 0f ff | | CMPI.L #0x00000fff,D1 000246e8 63 02 |c | BLS 0x246ec 000246ea 4e 4f |NO | TRAP #15 000246ec 43 f9 00 02 69 76 |C iv | LEA.L 0x26976,A1 000246f2 11 b1 18 08 08 02 | | MOVE.B (A1+D1.L+#0x8),(A0+D0.L+#0x2) 000246f8 52 87 |R | ADDQ.L #0x1,D7 000246fa 52 86 |R | ADDQ.L #0x1,D6 000246fc 68 ca |h | BVC 0x246c8 000246fe 58 4f |XO | ADDQ.L #0x4,A7 00024700 ba ae ff d4 | | CMP.L (A6-0x2c),D5 00024704 67 1a |g | BEQ 0x24720 00024706 20 07 | | MOVE.L D7,D0 00024708 53 80 |S | SUBQ.L #0x1,D0 0002470a 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 00024710 63 02 |c | BLS 0x24714 00024712 4e 4f |NO | TRAP #15 00024714 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00024718 11 bc 00 2c 08 02 | , | MOVE.B #0x2c,(A0+D0.L+#0x2) 0002471e 52 87 |R | ADDQ.L #0x1,D7 00024720 52 85 |R | ADDQ.L #0x1,D5 00024722 68 ff ff ff ff 68 |h h | BVC 0x2468c 00024728 58 4f |XO | ADDQ.L #0x4,A7 0002472a 20 57 | W | MOVEA.L (A7),A0 0002472c 20 07 | | MOVE.L D7,D0 0002472e 53 80 |S | SUBQ.L #0x1,D0 00024730 90 84 | | SUB.L D4,D0 00024732 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00024738 63 02 |c | BLS 0x2473c 0002473a 4e 4f |NO | TRAP #15 0002473c d0 84 | | ADD.L D4,D0 0002473e 30 80 |0 | MOVE.W D0,(A0) 00024740 54 4f |TO | ADDQ.L #0x2,A7 00024742 3e ba e3 16 |> | MOVE.W 0x22a5a,(A7) 00024746 3f 3a e3 10 |?: | MOVE.W 0x22a58,-(A7) 0002474a 3f 3a e3 0a |?: | MOVE.W 0x22a56,-(A7) 0002474e 59 4f |YO | SUBQ.L #0x4,A7 00024750 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024754 3f 02 |? | MOVE.W D2,-(A7) 00024756 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 0002475a 4e 94 |N | JSR (A4) 0002475c 50 4f |PO | ADDQ.L #0x8,A7 0002475e 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 00024762 54 4f |TO | ADDQ.L #0x2,A7 00024764 2e 93 |. | MOVE.L (A3),(A7) 00024766 48 78 00 00 |Hx | PEA.L 0x0 0002476a 2f 2e ff f8 |/. | MOVE.L (A6-0x8),-(A7) 0002476e 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00024772 48 6e ff ed |Hn | PEA.L (A6-0x13) 00024776 4e b9 00 02 60 e4 |N ` | JSR 0x260e4 0002477c de c3 | | ADDA.W D3,A7 0002477e 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00024782 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00024788 54 4f |TO | ADDQ.L #0x2,A7 0002478a 3e ba e2 d4 |> | MOVE.W 0x22a60,(A7) 0002478e 3f 3a e2 ce |?: | MOVE.W 0x22a5e,-(A7) 00024792 3f 3a e2 c8 |?: | MOVE.W 0x22a5c,-(A7) 00024796 59 4f |YO | SUBQ.L #0x4,A7 00024798 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002479c 3f 02 |? | MOVE.W D2,-(A7) 0002479e 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 000247a2 4e 94 |N | JSR (A4) 000247a4 50 4f |PO | ADDQ.L #0x8,A7 000247a6 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 000247aa 54 4f |TO | ADDQ.L #0x2,A7 000247ac 2e 93 |. | MOVE.L (A3),(A7) 000247ae 48 78 00 00 |Hx | PEA.L 0x0 000247b2 2f 2e ff f8 |/. | MOVE.L (A6-0x8),-(A7) 000247b6 48 6e ff f4 |Hn | PEA.L (A6-0xc) 000247ba 48 6e ff ee |Hn | PEA.L (A6-0x12) 000247be 4e b9 00 02 60 e4 |N ` | JSR 0x260e4 000247c4 de c3 | | ADDA.W D3,A7 000247c6 48 6e ff f8 |Hn | PEA.L (A6-0x8) 000247ca 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000247d0 58 4f |XO | ADDQ.L #0x4,A7 000247d2 4a 2e ff ed |J. | TST.B (A6-0x13) 000247d6 66 06 |f | BNE 0x247de 000247d8 4a 2e ff ee |J. | TST.B (A6-0x12) 000247dc 67 06 |g | BEQ 0x247e4 000247de 42 2e ff fc |B. | CLR.B (A6-0x4) 000247e2 60 04 |` | BRA 0x247e8 000247e4 1d 42 ff fc | B | MOVE.B D2,(A6-0x4) 000247e8 2f 12 |/ | MOVE.L (A2),-(A7) 000247ea 2f 2e ff d0 |/. | MOVE.L (A6-0x30),-(A7) 000247ee 10 2e ff fc | . | MOVE.B (A6-0x4),D0 000247f2 48 80 |H | EXTB.W D0 000247f4 41 bc 00 02 |A | CHK.W #0x2,D0 000247f8 1f 00 | | MOVE.B D0,-(A7) 000247fa 48 6e ff ec |Hn | PEA.L (A6-0x14) 000247fe 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00024804 de fc 00 0e | | ADDA.W #0xe,A7 00024808 4a 2e ff ed |J. | TST.B (A6-0x13) 0002480c 67 20 |g | BEQ 0x2482e 0002480e 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 00024812 59 4f |YO | SUBQ.L #0x4,A7 00024814 10 2e ff ec | . | MOVE.B (A6-0x14),D0 00024818 48 80 |H | EXTB.W D0 0002481a 41 bc 00 0e |A | CHK.W #0xe,D0 0002481e 1f 00 | | MOVE.B D0,-(A7) 00024820 4e b9 00 01 03 c0 |N | JSR ExpErrMsg(a: Byte) : String 00024826 54 4f |TO | ADDQ.L #0x2,A7 00024828 4e ba f9 3e |N > | JSR 0x24168 0002482c 50 4f |PO | ADDQ.L #0x8,A7 0002482e 4a 2e ff ee |J. | TST.B (A6-0x12) 00024832 67 12 |g | BEQ 0x24846 00024834 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00024838 59 4f |YO | SUBQ.L #0x4,A7 0002483a 4e b9 00 01 03 c8 |N | JSR FSCALL_103c8 00024840 4e ba f9 26 |N & | JSR 0x24168 00024844 50 4f |PO | ADDQ.L #0x8,A7 00024846 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 0002484a 4e 5e |N^ | UNLK A6 0002484c 4e 75 |Nu | RTS 0002484e ; -------------------------------------------------------------------------------------- 0002484e ; OMSI PASCAL Function 0002484e ; <LVAR 0x008 4(r)> 0002484e ; <LVAR -0x004 @ 4(rw)> 0002484e ; <LVAR -0x008 @ 4(rw)> 0002484e ; -------------------------------------------------------------------------------------- 0002484e 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00024852 bf d5 | | CMPA.L (A5),A7 00024854 62 06 |b | BHI 0x2485c 00024856 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002485a 4e 76 |Nv | TRAPV 0002485c de fc 00 18 | | ADDA.W #0x18,A7 00024860 48 e7 00 c0 |H | MOVEM.L A1+A0,-(A7) 00024864 41 ee ff f8 |A | LEA.L (A6-0x8),A0 00024868 43 ee ff fc |C | LEA.L (A6-0x4),A1 0002486c 59 4f |YO | SUBQ.L #0x4,A7 0002486e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024872 48 78 00 01 |Hx | PEA.L 0x1 00024876 4e ba f2 ee |N | JSR 0x23b66 0002487a 50 4f |PO | ADDQ.L #0x8,A7 0002487c 20 97 | | MOVE.L (A7),(A0) 0002487e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024882 48 78 00 02 |Hx | PEA.L 0x2 00024886 4e ba f2 de |N | JSR 0x23b66 0002488a 50 4f |PO | ADDQ.L #0x8,A7 0002488c 22 97 |" | MOVE.L (A7),(A1) 0002488e 54 4f |TO | ADDQ.L #0x2,A7 00024890 2f 10 |/ | MOVE.L (A0),-(A7) 00024892 2f 11 |/ | MOVE.L (A1),-(A7) 00024894 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 0002489a 50 4f |PO | ADDQ.L #0x8,A7 0002489c 4a 1f |J | TST.B (A7)+ 0002489e 67 06 |g | BEQ 0x248a6 000248a0 4e ba ed 7c |N | | JSR 0x2361e 000248a4 60 04 |` | BRA 0x248aa 000248a6 4e ba ed bc |N | JSR 0x23664 000248aa 48 51 |HQ | PEA.L (A1) 000248ac 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000248b2 58 4f |XO | ADDQ.L #0x4,A7 000248b4 48 50 |HP | PEA.L (A0) 000248b6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000248bc 58 4f |XO | ADDQ.L #0x4,A7 000248be 4c df 03 00 |L | MOVEM.L (A7)+,A0+A1 000248c2 4e 5e |N^ | UNLK A6 000248c4 4e 75 |Nu | RTS 000248c6 ; -------------------------------------------------------------------------------------- 000248c6 ; OMSI PASCAL Function 000248c6 ; <LVAR 0x008 4(r)> 000248c6 ; <LVAR -0x004 @ 4(rw)> 000248c6 ; <LVAR -0x008 @ 4(rw)> 000248c6 ; -------------------------------------------------------------------------------------- 000248c6 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 000248ca bf d5 | | CMPA.L (A5),A7 000248cc 62 06 |b | BHI 0x248d4 000248ce 44 fc 00 02 |D | MOVE.W #0x2,CCR 000248d2 4e 76 |Nv | TRAPV 000248d4 de fc 00 18 | | ADDA.W #0x18,A7 000248d8 48 e7 00 c0 |H | MOVEM.L A1+A0,-(A7) 000248dc 41 ee ff f8 |A | LEA.L (A6-0x8),A0 000248e0 43 ee ff fc |C | LEA.L (A6-0x4),A1 000248e4 59 4f |YO | SUBQ.L #0x4,A7 000248e6 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000248ea 48 78 00 01 |Hx | PEA.L 0x1 000248ee 4e ba f2 76 |N v | JSR 0x23b66 000248f2 50 4f |PO | ADDQ.L #0x8,A7 000248f4 20 97 | | MOVE.L (A7),(A0) 000248f6 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000248fa 48 78 00 02 |Hx | PEA.L 0x2 000248fe 4e ba f2 66 |N f | JSR 0x23b66 00024902 50 4f |PO | ADDQ.L #0x8,A7 00024904 22 97 |" | MOVE.L (A7),(A1) 00024906 54 4f |TO | ADDQ.L #0x2,A7 00024908 2f 10 |/ | MOVE.L (A0),-(A7) 0002490a 2f 11 |/ | MOVE.L (A1),-(A7) 0002490c 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00024912 50 4f |PO | ADDQ.L #0x8,A7 00024914 4a 1f |J | TST.B (A7)+ 00024916 66 06 |f | BNE 0x2491e 00024918 4e ba ed 04 |N | JSR 0x2361e 0002491c 60 04 |` | BRA 0x24922 0002491e 4e ba ed 44 |N D | JSR 0x23664 00024922 48 51 |HQ | PEA.L (A1) 00024924 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002492a 58 4f |XO | ADDQ.L #0x4,A7 0002492c 48 50 |HP | PEA.L (A0) 0002492e 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00024934 58 4f |XO | ADDQ.L #0x4,A7 00024936 4c df 03 00 |L | MOVEM.L (A7)+,A0+A1 0002493a 4e 5e |N^ | UNLK A6 0002493c 4e 75 |Nu | RTS 0002493e ; -------------------------------------------------------------------------------------- 0002493e ; OMSI PASCAL Function 0002493e ; <LVAR 0x008 4(r)> 0002493e ; -------------------------------------------------------------------------------------- 0002493e 4e 56 ff f0 |NV | LINK.W A6,#0xfff0 00024942 bf d5 | | CMPA.L (A5),A7 00024944 62 06 |b | BHI 0x2494c 00024946 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002494a 4e 76 |Nv | TRAPV 0002494c de fc 00 10 | | ADDA.W #0x10,A7 00024950 59 4f |YO | SUBQ.L #0x4,A7 00024952 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024956 48 78 00 01 |Hx | PEA.L 0x1 0002495a 4e ba f2 0a |N | JSR 0x23b66 0002495e 50 4f |PO | ADDQ.L #0x8,A7 00024960 4e ba ef fc |N | JSR 0x2395e 00024964 58 4f |XO | ADDQ.L #0x4,A7 00024966 4e 5e |N^ | UNLK A6 00024968 4e 75 |Nu | RTS 0002496a ; -------------------------------------------------------------------------------------- 0002496a ; OMSI PASCAL Function 0002496a ; <LVAR 0x008 4(r)> 0002496a ; <LVAR -0x014 @ 4(rw)> 0002496a ; -------------------------------------------------------------------------------------- 0002496a 4e 56 ff 90 |NV | LINK.W A6,#0xff90 0002496e bf d5 | | CMPA.L (A5),A7 00024970 62 06 |b | BHI 0x24978 00024972 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024976 4e 76 |Nv | TRAPV 00024978 de fc 00 5c | \ | ADDA.W #0x5c,A7 0002497c 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00024980 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00024984 47 ee ff ec |G | LEA.L (A6-0x14),A3 00024988 74 7d |t} | MOVEQ.L #0x7d,D2 0002498a 59 4f |YO | SUBQ.L #0x4,A7 0002498c 2f 12 |/ | MOVE.L (A2),-(A7) 0002498e 48 78 00 01 |Hx | PEA.L 0x1 00024992 4e ba f1 d2 |N | JSR 0x23b66 00024996 50 4f |PO | ADDQ.L #0x8,A7 00024998 26 97 |& | MOVE.L (A7),(A3) 0002499a 2f 12 |/ | MOVE.L (A2),-(A7) 0002499c 48 78 00 02 |Hx | PEA.L 0x2 000249a0 4e ba f1 c4 |N | JSR 0x23b66 000249a4 50 4f |PO | ADDQ.L #0x8,A7 000249a6 28 5f |(_ | MOVEA.L (A7)+,A4 000249a8 9e fc 00 0c | | SUBA.W #0xc,A7 000249ac 2f 12 |/ | MOVE.L (A2),-(A7) 000249ae 48 78 00 03 |Hx | PEA.L 0x3 000249b2 4e ba f1 e4 |N | JSR 0x23b98 000249b6 50 4f |PO | ADDQ.L #0x8,A7 000249b8 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 000249be 50 4f |PO | ADDQ.L #0x8,A7 000249c0 2c 17 |, | MOVE.L (A7),D6 000249c2 51 4f |QO | SUBQ.L #0x8,A7 000249c4 2f 12 |/ | MOVE.L (A2),-(A7) 000249c6 48 78 00 04 |Hx | PEA.L 0x4 000249ca 4e ba f1 cc |N | JSR 0x23b98 000249ce 50 4f |PO | ADDQ.L #0x8,A7 000249d0 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 000249d6 50 4f |PO | ADDQ.L #0x8,A7 000249d8 2a 1f |* | MOVE.L (A7)+,D5 000249da 20 06 | | MOVE.L D6,D0 000249dc d0 85 | | ADD.L D5,D0 000249de 53 80 |S | SUBQ.L #0x1,D0 000249e0 32 14 |2 | MOVE.W (A4),D1 000249e2 48 c1 |H | EXTW.L D1 000249e4 b0 81 | | CMP.L D1,D0 000249e6 6f 30 |o0 | BLE 0x24a18 000249e8 9e fc 00 20 | | SUBA.W #0x20,A7 000249ec 20 4f | O | MOVEA.L A7,A0 000249ee 43 fa e0 72 |C r | LEA.L 0x22a62,A1 000249f2 70 1e |p | MOVEQ.L #0x1e,D0 000249f4 10 d9 | | MOVE.B (A1)+,(A0)+ 000249f6 51 c8 ff fc |Q | DBF D0,0x249f4 000249fa 59 4f |YO | SUBQ.L #0x4,A7 000249fc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024a00 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00024a04 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7) 00024a08 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024a0e 50 4f |PO | ADDQ.L #0x8,A7 00024a10 4e ba e4 16 |N | JSR 0x22e28 00024a14 de fc 00 24 | $ | ADDA.W #0x24,A7 00024a18 20 53 | S | MOVEA.L (A3),A0 00024a1a 2f 08 |/ | MOVE.L A0,-(A7) 00024a1c 30 10 |0 | MOVE.W (A0),D0 00024a1e 48 c0 |H | EXTW.L D0 00024a20 2f 00 |/ | MOVE.L D0,-(A7) 00024a22 7e 01 |~ | MOVEQ.L #0x01,D7 00024a24 be 97 | | CMP.L (A7),D7 00024a26 6e 26 |n& | BGT 0x24a4e 00024a28 20 06 | | MOVE.L D6,D0 00024a2a d0 87 | | ADD.L D7,D0 00024a2c 53 80 |S | SUBQ.L #0x1,D0 00024a2e 53 80 |S | SUBQ.L #0x1,D0 00024a30 b0 82 | | CMP.L D2,D0 00024a32 63 02 |c | BLS 0x24a36 00024a34 4e 4f |NO | TRAP #15 00024a36 22 07 |" | MOVE.L D7,D1 00024a38 53 81 |S | SUBQ.L #0x1,D1 00024a3a b2 82 | | CMP.L D2,D1 00024a3c 63 02 |c | BLS 0x24a40 00024a3e 4e 4f |NO | TRAP #15 00024a40 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00024a44 19 b0 18 02 08 02 | | MOVE.B (A0+D1.L+#0x2),(A4+D0.L+#0x2) 00024a4a 52 87 |R | ADDQ.L #0x1,D7 00024a4c 68 d6 |h | BVC 0x24a24 00024a4e 58 4f |XO | ADDQ.L #0x4,A7 00024a50 2e 8c |. | MOVE.L A4,(A7) 00024a52 4e ba f1 b4 |N | JSR 0x23c08 00024a56 58 4f |XO | ADDQ.L #0x4,A7 00024a58 48 53 |HS | PEA.L (A3) 00024a5a 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00024a60 58 4f |XO | ADDQ.L #0x4,A7 00024a62 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 00024a66 4e 5e |N^ | UNLK A6 00024a68 4e 75 |Nu | RTS 00024a6a ; -------------------------------------------------------------------------------------- 00024a6a ; OMSI PASCAL Function 00024a6a ; <LVAR 0x008 4(r)> 00024a6a ; <LVAR -0x010 @ 4(r)> 00024a6a ; <LVAR -0x014 @ 4(rw)> 00024a6a ; -------------------------------------------------------------------------------------- 00024a6a 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 00024a6e bf d5 | | CMPA.L (A5),A7 00024a70 62 06 |b | BHI 0x24a78 00024a72 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024a76 4e 76 |Nv | TRAPV 00024a78 de fc 00 44 | D | ADDA.W #0x44,A7 00024a7c 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00024a80 45 ee ff ec |E | LEA.L (A6-0x14),A2 00024a84 47 ee ff f0 |G | LEA.L (A6-0x10),A3 00024a88 49 ee 00 08 |I | LEA.L (A6+0x8),A4 00024a8c 74 7d |t} | MOVEQ.L #0x7d,D2 00024a8e 59 4f |YO | SUBQ.L #0x4,A7 00024a90 2f 14 |/ | MOVE.L (A4),-(A7) 00024a92 48 78 00 01 |Hx | PEA.L 0x1 00024a96 4e ba f0 ce |N | JSR 0x23b66 00024a9a 50 4f |PO | ADDQ.L #0x8,A7 00024a9c 24 9f |$ | MOVE.L (A7)+,(A2) 00024a9e 48 53 |HS | PEA.L (A3) 00024aa0 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00024aa6 51 4f |QO | SUBQ.L #0x8,A7 00024aa8 2f 14 |/ | MOVE.L (A4),-(A7) 00024aaa 48 78 00 02 |Hx | PEA.L 0x2 00024aae 4e ba f0 e8 |N | JSR 0x23b98 00024ab2 50 4f |PO | ADDQ.L #0x8,A7 00024ab4 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00024aba 50 4f |PO | ADDQ.L #0x8,A7 00024abc 2a 17 |* | MOVE.L (A7),D5 00024abe 51 4f |QO | SUBQ.L #0x8,A7 00024ac0 2f 14 |/ | MOVE.L (A4),-(A7) 00024ac2 48 78 00 03 |Hx | PEA.L 0x3 00024ac6 4e ba f0 d0 |N | JSR 0x23b98 00024aca 50 4f |PO | ADDQ.L #0x8,A7 00024acc 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00024ad2 50 4f |PO | ADDQ.L #0x8,A7 00024ad4 2c 1f |, | MOVE.L (A7)+,D6 00024ad6 20 52 | R | MOVEA.L (A2),A0 00024ad8 20 05 | | MOVE.L D5,D0 00024ada d0 86 | | ADD.L D6,D0 00024adc 53 80 |S | SUBQ.L #0x1,D0 00024ade 32 10 |2 | MOVE.W (A0),D1 00024ae0 48 c1 |H | EXTW.L D1 00024ae2 b0 81 | | CMP.L D1,D0 00024ae4 6f 06 |o | BLE 0x24aec 00024ae6 52 81 |R | ADDQ.L #0x1,D1 00024ae8 92 85 | | SUB.L D5,D1 00024aea 2c 01 |, | MOVE.L D1,D6 00024aec 2f 06 |/ | MOVE.L D6,-(A7) 00024aee 7e 01 |~ | MOVEQ.L #0x01,D7 00024af0 be 97 | | CMP.L (A7),D7 00024af2 6e 26 |n& | BGT 0x24b1a 00024af4 20 53 | S | MOVEA.L (A3),A0 00024af6 20 07 | | MOVE.L D7,D0 00024af8 53 80 |S | SUBQ.L #0x1,D0 00024afa b0 82 | | CMP.L D2,D0 00024afc 63 02 |c | BLS 0x24b00 00024afe 4e 4f |NO | TRAP #15 00024b00 22 52 |"R | MOVEA.L (A2),A1 00024b02 22 07 |" | MOVE.L D7,D1 00024b04 d2 85 | | ADD.L D5,D1 00024b06 53 81 |S | SUBQ.L #0x1,D1 00024b08 53 81 |S | SUBQ.L #0x1,D1 00024b0a b2 82 | | CMP.L D2,D1 00024b0c 63 02 |c | BLS 0x24b10 00024b0e 4e 4f |NO | TRAP #15 00024b10 11 b1 18 02 08 02 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x2) 00024b16 52 87 |R | ADDQ.L #0x1,D7 00024b18 68 d6 |h | BVC 0x24af0 00024b1a 58 4f |XO | ADDQ.L #0x4,A7 00024b1c 20 53 | S | MOVEA.L (A3),A0 00024b1e 04 86 ff ff 80 00 | | SUBI.L #0xffff8000,D6 00024b24 0c 86 00 00 ff ff | | CMPI.L #0x0000ffff,D6 00024b2a 63 02 |c | BLS 0x24b2e 00024b2c 4e 4f |NO | TRAP #15 00024b2e 06 86 ff ff 80 00 | | ADDI.L #0xffff8000,D6 00024b34 30 86 |0 | MOVE.W D6,(A0) 00024b36 2f 13 |/ | MOVE.L (A3),-(A7) 00024b38 4e ba f0 ce |N | JSR 0x23c08 00024b3c 58 4f |XO | ADDQ.L #0x4,A7 00024b3e 48 52 |HR | PEA.L (A2) 00024b40 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00024b46 58 4f |XO | ADDQ.L #0x4,A7 00024b48 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 00024b4c 4e 5e |N^ | UNLK A6 00024b4e 4e 75 |Nu | RTS 00024b50 ; -------------------------------------------------------------------------------------- 00024b50 ; OMSI PASCAL Function 00024b50 ; <LVAR 0x008 4(r)> 00024b50 ; -------------------------------------------------------------------------------------- 00024b50 4e 56 ff ec |NV | LINK.W A6,#0xffec 00024b54 bf d5 | | CMPA.L (A5),A7 00024b56 62 06 |b | BHI 0x24b5e 00024b58 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024b5c 4e 76 |Nv | TRAPV 00024b5e de fc 00 14 | | ADDA.W #0x14,A7 00024b62 51 4f |QO | SUBQ.L #0x8,A7 00024b64 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024b68 48 78 00 01 |Hx | PEA.L 0x1 00024b6c 4e ba f0 2a |N * | JSR 0x23b98 00024b70 50 4f |PO | ADDQ.L #0x8,A7 00024b72 4e ba ee 5e |N ^ | JSR 0x239d2 00024b76 50 4f |PO | ADDQ.L #0x8,A7 00024b78 4e 5e |N^ | UNLK A6 00024b7a 4e 75 |Nu | RTS 00024b7c ; -------------------------------------------------------------------------------------- 00024b7c ; OMSI PASCAL Function 00024b7c ; <LVAR 0x008 4(r)> 00024b7c ; -------------------------------------------------------------------------------------- 00024b7c 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00024b80 bf d5 | | CMPA.L (A5),A7 00024b82 62 06 |b | BHI 0x24b8a 00024b84 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024b88 4e 76 |Nv | TRAPV 00024b8a de fc 00 1e | | ADDA.W #0x1e,A7 00024b8e 9e fc 00 0a | | SUBA.W #0xa,A7 00024b92 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024b96 48 78 00 01 |Hx | PEA.L 0x1 00024b9a 4e ba ef fc |N | JSR 0x23b98 00024b9e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024ba2 48 78 00 02 |Hx | PEA.L 0x2 00024ba6 4e ba ef f0 |N | JSR 0x23b98 00024baa 50 4f |PO | ADDQ.L #0x8,A7 00024bac 4e b9 00 01 03 2c |N , | JSR IsEqual(a, b : Quad) : Bool 00024bb2 de fc 00 10 | | ADDA.W #0x10,A7 00024bb6 4a 1f |J | TST.B (A7)+ 00024bb8 67 06 |g | BEQ 0x24bc0 00024bba 4e ba ea 62 |N b | JSR 0x2361e 00024bbe 60 04 |` | BRA 0x24bc4 00024bc0 4e ba ea a2 |N | JSR 0x23664 00024bc4 4e 5e |N^ | UNLK A6 00024bc6 4e 75 |Nu | RTS 00024bc8 ; -------------------------------------------------------------------------------------- 00024bc8 ; OMSI PASCAL Function 00024bc8 ; <LVAR 0x008 4(r)> 00024bc8 ; -------------------------------------------------------------------------------------- 00024bc8 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00024bcc bf d5 | | CMPA.L (A5),A7 00024bce 62 06 |b | BHI 0x24bd6 00024bd0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024bd4 4e 76 |Nv | TRAPV 00024bd6 de fc 00 1e | | ADDA.W #0x1e,A7 00024bda 9e fc 00 0a | | SUBA.W #0xa,A7 00024bde 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024be2 48 78 00 01 |Hx | PEA.L 0x1 00024be6 4e ba ef b0 |N | JSR 0x23b98 00024bea 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024bee 48 78 00 02 |Hx | PEA.L 0x2 00024bf2 4e ba ef a4 |N | JSR 0x23b98 00024bf6 50 4f |PO | ADDQ.L #0x8,A7 00024bf8 4e b9 00 01 03 2c |N , | JSR IsEqual(a, b : Quad) : Bool 00024bfe de fc 00 10 | | ADDA.W #0x10,A7 00024c02 4a 1f |J | TST.B (A7)+ 00024c04 66 06 |f | BNE 0x24c0c 00024c06 4e ba ea 16 |N | JSR 0x2361e 00024c0a 60 04 |` | BRA 0x24c10 00024c0c 4e ba ea 56 |N V | JSR 0x23664 00024c10 4e 5e |N^ | UNLK A6 00024c12 4e 75 |Nu | RTS 00024c14 ; -------------------------------------------------------------------------------------- 00024c14 ; OMSI PASCAL Function 00024c14 ; <LVAR 0x008 4(r)> 00024c14 ; -------------------------------------------------------------------------------------- 00024c14 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00024c18 bf d5 | | CMPA.L (A5),A7 00024c1a 62 06 |b | BHI 0x24c22 00024c1c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024c20 4e 76 |Nv | TRAPV 00024c22 de fc 00 1e | | ADDA.W #0x1e,A7 00024c26 9e fc 00 0a | | SUBA.W #0xa,A7 00024c2a 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024c2e 48 78 00 01 |Hx | PEA.L 0x1 00024c32 4e ba ef 64 |N d | JSR 0x23b98 00024c36 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024c3a 48 78 00 02 |Hx | PEA.L 0x2 00024c3e 4e ba ef 58 |N X | JSR 0x23b98 00024c42 50 4f |PO | ADDQ.L #0x8,A7 00024c44 4e b9 00 01 03 28 |N ( | JSR IsSmaller(a, b : Quad) : Bool 00024c4a de fc 00 10 | | ADDA.W #0x10,A7 00024c4e 4a 1f |J | TST.B (A7)+ 00024c50 67 06 |g | BEQ 0x24c58 00024c52 4e ba e9 ca |N | JSR 0x2361e 00024c56 60 04 |` | BRA 0x24c5c 00024c58 4e ba ea 0a |N | JSR 0x23664 00024c5c 4e 5e |N^ | UNLK A6 00024c5e 4e 75 |Nu | RTS 00024c60 ; -------------------------------------------------------------------------------------- 00024c60 ; OMSI PASCAL Function 00024c60 ; <LVAR 0x008 4(r)> 00024c60 ; -------------------------------------------------------------------------------------- 00024c60 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00024c64 bf d5 | | CMPA.L (A5),A7 00024c66 62 06 |b | BHI 0x24c6e 00024c68 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024c6c 4e 76 |Nv | TRAPV 00024c6e de fc 00 1e | | ADDA.W #0x1e,A7 00024c72 9e fc 00 0a | | SUBA.W #0xa,A7 00024c76 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024c7a 48 78 00 01 |Hx | PEA.L 0x1 00024c7e 4e ba ef 18 |N | JSR 0x23b98 00024c82 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024c86 48 78 00 02 |Hx | PEA.L 0x2 00024c8a 4e ba ef 0c |N | JSR 0x23b98 00024c8e 50 4f |PO | ADDQ.L #0x8,A7 00024c90 4e b9 00 01 03 24 |N $ | JSR IsGreater(a, b : Quad) : Bool 00024c96 de fc 00 10 | | ADDA.W #0x10,A7 00024c9a 4a 1f |J | TST.B (A7)+ 00024c9c 67 06 |g | BEQ 0x24ca4 00024c9e 4e ba e9 7e |N ~ | JSR 0x2361e 00024ca2 60 04 |` | BRA 0x24ca8 00024ca4 4e ba e9 be |N | JSR 0x23664 00024ca8 4e 5e |N^ | UNLK A6 00024caa 4e 75 |Nu | RTS 00024cac ; -------------------------------------------------------------------------------------- 00024cac ; OMSI PASCAL Function 00024cac ; <LVAR 0x008 4(r)> 00024cac ; -------------------------------------------------------------------------------------- 00024cac 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00024cb0 bf d5 | | CMPA.L (A5),A7 00024cb2 62 06 |b | BHI 0x24cba 00024cb4 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024cb8 4e 76 |Nv | TRAPV 00024cba de fc 00 1e | | ADDA.W #0x1e,A7 00024cbe 9e fc 00 0a | | SUBA.W #0xa,A7 00024cc2 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024cc6 48 78 00 01 |Hx | PEA.L 0x1 00024cca 4e ba ee cc |N | JSR 0x23b98 00024cce 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024cd2 48 78 00 02 |Hx | PEA.L 0x2 00024cd6 4e ba ee c0 |N | JSR 0x23b98 00024cda 50 4f |PO | ADDQ.L #0x8,A7 00024cdc 4e b9 00 01 03 24 |N $ | JSR IsGreater(a, b : Quad) : Bool 00024ce2 de fc 00 10 | | ADDA.W #0x10,A7 00024ce6 4a 1f |J | TST.B (A7)+ 00024ce8 66 06 |f | BNE 0x24cf0 00024cea 4e ba e9 32 |N 2 | JSR 0x2361e 00024cee 60 04 |` | BRA 0x24cf4 00024cf0 4e ba e9 72 |N r | JSR 0x23664 00024cf4 4e 5e |N^ | UNLK A6 00024cf6 4e 75 |Nu | RTS 00024cf8 ; -------------------------------------------------------------------------------------- 00024cf8 ; OMSI PASCAL Function 00024cf8 ; <LVAR 0x008 4(r)> 00024cf8 ; -------------------------------------------------------------------------------------- 00024cf8 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00024cfc bf d5 | | CMPA.L (A5),A7 00024cfe 62 06 |b | BHI 0x24d06 00024d00 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024d04 4e 76 |Nv | TRAPV 00024d06 de fc 00 1e | | ADDA.W #0x1e,A7 00024d0a 9e fc 00 0a | | SUBA.W #0xa,A7 00024d0e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024d12 48 78 00 01 |Hx | PEA.L 0x1 00024d16 4e ba ee 80 |N | JSR 0x23b98 00024d1a 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024d1e 48 78 00 02 |Hx | PEA.L 0x2 00024d22 4e ba ee 74 |N t | JSR 0x23b98 00024d26 50 4f |PO | ADDQ.L #0x8,A7 00024d28 4e b9 00 01 03 28 |N ( | JSR IsSmaller(a, b : Quad) : Bool 00024d2e de fc 00 10 | | ADDA.W #0x10,A7 00024d32 4a 1f |J | TST.B (A7)+ 00024d34 66 06 |f | BNE 0x24d3c 00024d36 4e ba e8 e6 |N | JSR 0x2361e 00024d3a 60 04 |` | BRA 0x24d40 00024d3c 4e ba e9 26 |N & | JSR 0x23664 00024d40 4e 5e |N^ | UNLK A6 00024d42 4e 75 |Nu | RTS 00024d44 ; -------------------------------------------------------------------------------------- 00024d44 ; OMSI PASCAL Function 00024d44 ; <LVAR 0x008 4(r)> 00024d44 ; -------------------------------------------------------------------------------------- 00024d44 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00024d48 bf d5 | | CMPA.L (A5),A7 00024d4a 62 06 |b | BHI 0x24d52 00024d4c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024d50 4e 76 |Nv | TRAPV 00024d52 de fc 00 28 | ( | ADDA.W #0x28,A7 00024d56 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00024d5a 70 10 |p | MOVEQ.L #0x10,D0 00024d5c 9e c0 | | SUBA.W D0,A7 00024d5e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024d62 48 78 00 01 |Hx | PEA.L 0x1 00024d66 4e ba ee 30 |N 0 | JSR 0x23b98 00024d6a 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024d6e 48 78 00 02 |Hx | PEA.L 0x2 00024d72 4e ba ee 24 |N $ | JSR 0x23b98 00024d76 50 4f |PO | ADDQ.L #0x8,A7 00024d78 4e b9 00 01 03 14 |N | JSR Add(a, b : Quad) : Quad 00024d7e de c0 | | ADDA.W D0,A7 00024d80 4e ba ef 0e |N | JSR 0x23c90 00024d84 50 4f |PO | ADDQ.L #0x8,A7 00024d86 4c df 00 01 |L | MOVEM.L (A7)+,D0 00024d8a 4e 5e |N^ | UNLK A6 00024d8c 4e 75 |Nu | RTS 00024d8e ; -------------------------------------------------------------------------------------- 00024d8e ; OMSI PASCAL Function 00024d8e ; <LVAR 0x008 4(r)> 00024d8e ; -------------------------------------------------------------------------------------- 00024d8e 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00024d92 bf d5 | | CMPA.L (A5),A7 00024d94 62 06 |b | BHI 0x24d9c 00024d96 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024d9a 4e 76 |Nv | TRAPV 00024d9c de fc 00 28 | ( | ADDA.W #0x28,A7 00024da0 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00024da4 70 10 |p | MOVEQ.L #0x10,D0 00024da6 9e c0 | | SUBA.W D0,A7 00024da8 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024dac 48 78 00 01 |Hx | PEA.L 0x1 00024db0 4e ba ed e6 |N | JSR 0x23b98 00024db4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024db8 48 78 00 02 |Hx | PEA.L 0x2 00024dbc 4e ba ed da |N | JSR 0x23b98 00024dc0 50 4f |PO | ADDQ.L #0x8,A7 00024dc2 4e b9 00 01 03 18 |N | JSR Subtract(a, b : Quad) : Quad 00024dc8 de c0 | | ADDA.W D0,A7 00024dca 4e ba ee c4 |N | JSR 0x23c90 00024dce 50 4f |PO | ADDQ.L #0x8,A7 00024dd0 4c df 00 01 |L | MOVEM.L (A7)+,D0 00024dd4 4e 5e |N^ | UNLK A6 00024dd6 4e 75 |Nu | RTS 00024dd8 ; -------------------------------------------------------------------------------------- 00024dd8 ; OMSI PASCAL Function 00024dd8 ; <LVAR 0x008 4(r)> 00024dd8 ; -------------------------------------------------------------------------------------- 00024dd8 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00024ddc bf d5 | | CMPA.L (A5),A7 00024dde 62 06 |b | BHI 0x24de6 00024de0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024de4 4e 76 |Nv | TRAPV 00024de6 de fc 00 28 | ( | ADDA.W #0x28,A7 00024dea 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00024dee 70 10 |p | MOVEQ.L #0x10,D0 00024df0 9e c0 | | SUBA.W D0,A7 00024df2 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024df6 48 78 00 01 |Hx | PEA.L 0x1 00024dfa 4e ba ed 9c |N | JSR 0x23b98 00024dfe 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024e02 48 78 00 02 |Hx | PEA.L 0x2 00024e06 4e ba ed 90 |N | JSR 0x23b98 00024e0a 50 4f |PO | ADDQ.L #0x8,A7 00024e0c 4e b9 00 01 03 1c |N | JSR Multiply(a, b : Quad) : Quad 00024e12 de c0 | | ADDA.W D0,A7 00024e14 4e ba ee 7a |N z | JSR 0x23c90 00024e18 50 4f |PO | ADDQ.L #0x8,A7 00024e1a 4c df 00 01 |L | MOVEM.L (A7)+,D0 00024e1e 4e 5e |N^ | UNLK A6 00024e20 4e 75 |Nu | RTS 00024e22 ; -------------------------------------------------------------------------------------- 00024e22 ; OMSI PASCAL Function 00024e22 ; <LVAR 0x008 4(r)> 00024e22 ; -------------------------------------------------------------------------------------- 00024e22 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00024e26 bf d5 | | CMPA.L (A5),A7 00024e28 62 06 |b | BHI 0x24e30 00024e2a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024e2e 4e 76 |Nv | TRAPV 00024e30 de fc 00 28 | ( | ADDA.W #0x28,A7 00024e34 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00024e38 70 10 |p | MOVEQ.L #0x10,D0 00024e3a 9e c0 | | SUBA.W D0,A7 00024e3c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024e40 48 78 00 01 |Hx | PEA.L 0x1 00024e44 4e ba ed 52 |N R | JSR 0x23b98 00024e48 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024e4c 48 78 00 02 |Hx | PEA.L 0x2 00024e50 4e ba ed 46 |N F | JSR 0x23b98 00024e54 50 4f |PO | ADDQ.L #0x8,A7 00024e56 4e b9 00 01 03 20 |N | JSR Divide(a, b : Quad) : Quad 00024e5c de c0 | | ADDA.W D0,A7 00024e5e 4e ba ee 30 |N 0 | JSR 0x23c90 00024e62 50 4f |PO | ADDQ.L #0x8,A7 00024e64 4c df 00 01 |L | MOVEM.L (A7)+,D0 00024e68 4e 5e |N^ | UNLK A6 00024e6a 4e 75 |Nu | RTS 00024e6c ; -------------------------------------------------------------------------------------- 00024e6c ; OMSI PASCAL Function 00024e6c ; <LVAR 0x008 4(r)> 00024e6c ; -------------------------------------------------------------------------------------- 00024e6c 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00024e70 bf d5 | | CMPA.L (A5),A7 00024e72 62 06 |b | BHI 0x24e7a 00024e74 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024e78 4e 76 |Nv | TRAPV 00024e7a de fc 00 28 | ( | ADDA.W #0x28,A7 00024e7e 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00024e82 70 10 |p | MOVEQ.L #0x10,D0 00024e84 9e c0 | | SUBA.W D0,A7 00024e86 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024e8a 48 78 00 01 |Hx | PEA.L 0x1 00024e8e 4e ba ed 08 |N | JSR 0x23b98 00024e92 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024e96 48 78 00 02 |Hx | PEA.L 0x2 00024e9a 4e ba ec fc |N | JSR 0x23b98 00024e9e 50 4f |PO | ADDQ.L #0x8,A7 00024ea0 4e b9 00 01 03 58 |N X | JSR Modulus(a, b : Quad) : Quad 00024ea6 de c0 | | ADDA.W D0,A7 00024ea8 4e ba ed e6 |N | JSR 0x23c90 00024eac 50 4f |PO | ADDQ.L #0x8,A7 00024eae 4c df 00 01 |L | MOVEM.L (A7)+,D0 00024eb2 4e 5e |N^ | UNLK A6 00024eb4 4e 75 |Nu | RTS 00024eb6 ; -------------------------------------------------------------------------------------- 00024eb6 ; OMSI PASCAL Function 00024eb6 ; <LVAR 0x008 4(r)> 00024eb6 ; -------------------------------------------------------------------------------------- 00024eb6 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00024eba bf d5 | | CMPA.L (A5),A7 00024ebc 62 06 |b | BHI 0x24ec4 00024ebe 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024ec2 4e 76 |Nv | TRAPV 00024ec4 de fc 00 28 | ( | ADDA.W #0x28,A7 00024ec8 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00024ecc 70 10 |p | MOVEQ.L #0x10,D0 00024ece 9e c0 | | SUBA.W D0,A7 00024ed0 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024ed4 48 78 00 01 |Hx | PEA.L 0x1 00024ed8 4e ba ec be |N | JSR 0x23b98 00024edc 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024ee0 48 78 00 02 |Hx | PEA.L 0x2 00024ee4 4e ba ec b2 |N | JSR 0x23b98 00024ee8 50 4f |PO | ADDQ.L #0x8,A7 00024eea 4e b9 00 01 03 34 |N 4 | JSR BitOr(a, b : Quad) : Quad 00024ef0 de c0 | | ADDA.W D0,A7 00024ef2 4e ba ed 9c |N | JSR 0x23c90 00024ef6 50 4f |PO | ADDQ.L #0x8,A7 00024ef8 4c df 00 01 |L | MOVEM.L (A7)+,D0 00024efc 4e 5e |N^ | UNLK A6 00024efe 4e 75 |Nu | RTS 00024f00 ; -------------------------------------------------------------------------------------- 00024f00 ; OMSI PASCAL Function 00024f00 ; <LVAR 0x008 4(r)> 00024f00 ; -------------------------------------------------------------------------------------- 00024f00 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00024f04 bf d5 | | CMPA.L (A5),A7 00024f06 62 06 |b | BHI 0x24f0e 00024f08 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024f0c 4e 76 |Nv | TRAPV 00024f0e de fc 00 28 | ( | ADDA.W #0x28,A7 00024f12 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00024f16 70 10 |p | MOVEQ.L #0x10,D0 00024f18 9e c0 | | SUBA.W D0,A7 00024f1a 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024f1e 48 78 00 01 |Hx | PEA.L 0x1 00024f22 4e ba ec 74 |N t | JSR 0x23b98 00024f26 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024f2a 48 78 00 02 |Hx | PEA.L 0x2 00024f2e 4e ba ec 68 |N h | JSR 0x23b98 00024f32 50 4f |PO | ADDQ.L #0x8,A7 00024f34 4e b9 00 01 03 30 |N 0 | JSR BitAnd(a, b : Quad) : Quad 00024f3a de c0 | | ADDA.W D0,A7 00024f3c 4e ba ed 52 |N R | JSR 0x23c90 00024f40 50 4f |PO | ADDQ.L #0x8,A7 00024f42 4c df 00 01 |L | MOVEM.L (A7)+,D0 00024f46 4e 5e |N^ | UNLK A6 00024f48 4e 75 |Nu | RTS 00024f4a ; -------------------------------------------------------------------------------------- 00024f4a ; OMSI PASCAL Function 00024f4a ; <LVAR 0x008 4(r)> 00024f4a ; -------------------------------------------------------------------------------------- 00024f4a 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00024f4e bf d5 | | CMPA.L (A5),A7 00024f50 62 06 |b | BHI 0x24f58 00024f52 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024f56 4e 76 |Nv | TRAPV 00024f58 de fc 00 28 | ( | ADDA.W #0x28,A7 00024f5c 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00024f60 70 10 |p | MOVEQ.L #0x10,D0 00024f62 9e c0 | | SUBA.W D0,A7 00024f64 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024f68 48 78 00 01 |Hx | PEA.L 0x1 00024f6c 4e ba ec 2a |N * | JSR 0x23b98 00024f70 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024f74 48 78 00 02 |Hx | PEA.L 0x2 00024f78 4e ba ec 1e |N | JSR 0x23b98 00024f7c 50 4f |PO | ADDQ.L #0x8,A7 00024f7e 4e b9 00 01 03 40 |N @ | JSR BitXor(a, b : Quad) : Quad 00024f84 de c0 | | ADDA.W D0,A7 00024f86 4e ba ed 08 |N | JSR 0x23c90 00024f8a 50 4f |PO | ADDQ.L #0x8,A7 00024f8c 4c df 00 01 |L | MOVEM.L (A7)+,D0 00024f90 4e 5e |N^ | UNLK A6 00024f92 4e 75 |Nu | RTS 00024f94 ; -------------------------------------------------------------------------------------- 00024f94 ; OMSI PASCAL Function 00024f94 ; <LVAR 0x008 4(r)> 00024f94 ; -------------------------------------------------------------------------------------- 00024f94 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00024f98 bf d5 | | CMPA.L (A5),A7 00024f9a 62 06 |b | BHI 0x24fa2 00024f9c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024fa0 4e 76 |Nv | TRAPV 00024fa2 de fc 00 20 | | ADDA.W #0x20,A7 00024fa6 9e fc 00 10 | | SUBA.W #0x10,A7 00024faa 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024fae 48 78 00 01 |Hx | PEA.L 0x1 00024fb2 4e ba eb e4 |N | JSR 0x23b98 00024fb6 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00024fba 48 78 00 02 |Hx | PEA.L 0x2 00024fbe 4e ba ec 14 |N | JSR 0x23bd4 00024fc2 50 4f |PO | ADDQ.L #0x8,A7 00024fc4 4e b9 00 01 03 44 |N D | JSR BitShift(a : Quad ; howmuch : integer) : Quad 00024fca de fc 00 0c | | ADDA.W #0xc,A7 00024fce 4e ba ec c0 |N | JSR 0x23c90 00024fd2 50 4f |PO | ADDQ.L #0x8,A7 00024fd4 4e 5e |N^ | UNLK A6 00024fd6 4e 75 |Nu | RTS 00024fd8 ; -------------------------------------------------------------------------------------- 00024fd8 ; OMSI PASCAL Function 00024fd8 ; <LVAR 0x008 4(r)> 00024fd8 ; -------------------------------------------------------------------------------------- 00024fd8 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00024fdc bf d5 | | CMPA.L (A5),A7 00024fde 62 06 |b | BHI 0x24fe6 00024fe0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024fe4 4e 76 |Nv | TRAPV 00024fe6 de fc 00 20 | | ADDA.W #0x20,A7 00024fea 9e fc 00 10 | | SUBA.W #0x10,A7 00024fee 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024ff2 48 78 00 01 |Hx | PEA.L 0x1 00024ff6 4e ba eb a0 |N | JSR 0x23b98 00024ffa 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00024ffe 48 78 00 02 |Hx | PEA.L 0x2 00025002 4e ba eb d0 |N | JSR 0x23bd4 00025006 50 4f |PO | ADDQ.L #0x8,A7 00025008 44 97 |D | NEG.L (A7) 0002500a 4e b9 00 01 03 44 |N D | JSR BitShift(a : Quad ; howmuch : integer) : Quad 00025010 de fc 00 0c | | ADDA.W #0xc,A7 00025014 4e ba ec 7a |N z | JSR 0x23c90 00025018 50 4f |PO | ADDQ.L #0x8,A7 0002501a 4e 5e |N^ | UNLK A6 0002501c 4e 75 |Nu | RTS 0002501e ; -------------------------------------------------------------------------------------- 0002501e ; OMSI PASCAL Function 0002501e ; <LVAR 0x008 4(r)> 0002501e ; -------------------------------------------------------------------------------------- 0002501e 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 00025022 bf d5 | | CMPA.L (A5),A7 00025024 62 06 |b | BHI 0x2502c 00025026 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002502a 4e 76 |Nv | TRAPV 0002502c de fc 00 1c | | ADDA.W #0x1c,A7 00025030 9e fc 00 10 | | SUBA.W #0x10,A7 00025034 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00025038 48 78 00 01 |Hx | PEA.L 0x1 0002503c 4e ba eb 5a |N Z | JSR 0x23b98 00025040 50 4f |PO | ADDQ.L #0x8,A7 00025042 4e b9 00 01 03 38 |N 8 | JSR BitNot(a : Quad) : Quad 00025048 50 4f |PO | ADDQ.L #0x8,A7 0002504a 4e ba ec 44 |N D | JSR 0x23c90 0002504e 50 4f |PO | ADDQ.L #0x8,A7 00025050 4e 5e |N^ | UNLK A6 00025052 4e 75 |Nu | RTS 00025054 ; -------------------------------------------------------------------------------------- 00025054 ; OMSI PASCAL Function 00025054 ; <LVAR 0x008 4(r)> 00025054 ; <LVAR -0x00c 4(rw)> 00025054 ; <LVAR -0x010 4(rw)> 00025054 ; <LVAR -0x014 4(rw)> 00025054 ; <LVAR -0x018 4(rw)> 00025054 ; -------------------------------------------------------------------------------------- 00025054 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 00025058 bf d5 | | CMPA.L (A5),A7 0002505a 62 06 |b | BHI 0x25062 0002505c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025060 4e 76 |Nv | TRAPV 00025062 de fc 00 30 | 0 | ADDA.W #0x30,A7 00025066 48 e7 03 80 |H | MOVEM.L A0+D7+D6,-(A7) 0002506a 41 ee 00 08 |A | LEA.L (A6+0x8),A0 0002506e 51 4f |QO | SUBQ.L #0x8,A7 00025070 2f 10 |/ | MOVE.L (A0),-(A7) 00025072 48 78 00 01 |Hx | PEA.L 0x1 00025076 4e ba eb 20 |N | JSR 0x23b98 0002507a 50 4f |PO | ADDQ.L #0x8,A7 0002507c 2d 5f ff e8 |-_ | MOVE.L (A7)+,(A6-0x18) 00025080 2d 57 ff ec |-W | MOVE.L (A7),(A6-0x14) 00025084 59 4f |YO | SUBQ.L #0x4,A7 00025086 2f 10 |/ | MOVE.L (A0),-(A7) 00025088 48 78 00 02 |Hx | PEA.L 0x2 0002508c 4e ba eb 0a |N | JSR 0x23b98 00025090 50 4f |PO | ADDQ.L #0x8,A7 00025092 2d 5f ff f0 |-_ | MOVE.L (A7)+,(A6-0x10) 00025096 2d 57 ff f4 |-W | MOVE.L (A7),(A6-0xc) 0002509a 2f 10 |/ | MOVE.L (A0),-(A7) 0002509c 48 78 00 03 |Hx | PEA.L 0x3 000250a0 4e ba eb 32 |N 2 | JSR 0x23bd4 000250a4 50 4f |PO | ADDQ.L #0x8,A7 000250a6 2e 17 |. | MOVE.L (A7),D7 000250a8 2f 10 |/ | MOVE.L (A0),-(A7) 000250aa 48 78 00 04 |Hx | PEA.L 0x4 000250ae 4e ba eb 24 |N $ | JSR 0x23bd4 000250b2 50 4f |PO | ADDQ.L #0x8,A7 000250b4 2c 17 |, | MOVE.L (A7),D6 000250b6 59 4f |YO | SUBQ.L #0x4,A7 000250b8 2f 2e ff ec |/. | MOVE.L (A6-0x14),-(A7) 000250bc 2f 2e ff e8 |/. | MOVE.L (A6-0x18),-(A7) 000250c0 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 000250c4 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 000250c8 2f 07 |/ | MOVE.L D7,-(A7) 000250ca 2f 06 |/ | MOVE.L D6,-(A7) 000250cc 4e b9 00 01 03 48 |N H | JSR ?BitField_something_() 000250d2 de fc 00 18 | | ADDA.W #0x18,A7 000250d6 4e ba eb b8 |N | JSR 0x23c90 000250da 50 4f |PO | ADDQ.L #0x8,A7 000250dc 4c df 01 c0 |L | MOVEM.L (A7)+,D6+D7+A0 000250e0 4e 5e |N^ | UNLK A6 000250e2 4e 75 |Nu | RTS 000250e4 ; -------------------------------------------------------------------------------------- 000250e4 ; OMSI PASCAL Function 000250e4 ; <LVAR 0x008 4(r)> 000250e4 ; <LVAR -0x00c 4(rw)> 000250e4 ; <LVAR -0x010 4(rw)> 000250e4 ; -------------------------------------------------------------------------------------- 000250e4 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 000250e8 bf d5 | | CMPA.L (A5),A7 000250ea 62 06 |b | BHI 0x250f2 000250ec 44 fc 00 02 |D | MOVE.W #0x2,CCR 000250f0 4e 76 |Nv | TRAPV 000250f2 de fc 00 28 | ( | ADDA.W #0x28,A7 000250f6 48 e7 03 80 |H | MOVEM.L A0+D7+D6,-(A7) 000250fa 41 ee 00 08 |A | LEA.L (A6+0x8),A0 000250fe 51 4f |QO | SUBQ.L #0x8,A7 00025100 2f 10 |/ | MOVE.L (A0),-(A7) 00025102 48 78 00 01 |Hx | PEA.L 0x1 00025106 4e ba ea 90 |N | JSR 0x23b98 0002510a 50 4f |PO | ADDQ.L #0x8,A7 0002510c 2d 5f ff f0 |-_ | MOVE.L (A7)+,(A6-0x10) 00025110 2d 57 ff f4 |-W | MOVE.L (A7),(A6-0xc) 00025114 2f 10 |/ | MOVE.L (A0),-(A7) 00025116 48 78 00 02 |Hx | PEA.L 0x2 0002511a 4e ba ea b8 |N | JSR 0x23bd4 0002511e 50 4f |PO | ADDQ.L #0x8,A7 00025120 2e 17 |. | MOVE.L (A7),D7 00025122 2f 10 |/ | MOVE.L (A0),-(A7) 00025124 48 78 00 03 |Hx | PEA.L 0x3 00025128 4e ba ea aa |N | JSR 0x23bd4 0002512c 50 4f |PO | ADDQ.L #0x8,A7 0002512e 2c 17 |, | MOVE.L (A7),D6 00025130 59 4f |YO | SUBQ.L #0x4,A7 00025132 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00025136 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 0002513a 2f 07 |/ | MOVE.L D7,-(A7) 0002513c 2f 06 |/ | MOVE.L D6,-(A7) 0002513e 4e b9 00 01 03 4c |N L | JSR FSCALL_1034c 00025144 de fc 00 10 | | ADDA.W #0x10,A7 00025148 4e ba eb 46 |N F | JSR 0x23c90 0002514c 50 4f |PO | ADDQ.L #0x8,A7 0002514e 4c df 01 c0 |L | MOVEM.L (A7)+,D6+D7+A0 00025152 4e 5e |N^ | UNLK A6 00025154 4e 75 |Nu | RTS 00025156 ; -------------------------------------------------------------------------------------- 00025156 ; OMSI PASCAL Function 00025156 ; <LVAR 0x008 4(r)> 00025156 ; -------------------------------------------------------------------------------------- 00025156 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 0002515a bf d5 | | CMPA.L (A5),A7 0002515c 62 06 |b | BHI 0x25164 0002515e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025162 4e 76 |Nv | TRAPV 00025164 de fc 00 20 | | ADDA.W #0x20,A7 00025168 48 e7 01 08 |H | MOVEM.L A4+D7,-(A7) 0002516c 59 4f |YO | SUBQ.L #0x4,A7 0002516e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00025172 4e ba e0 c8 |N | JSR 0x2323c 00025176 58 4f |XO | ADDQ.L #0x4,A7 00025178 7e 01 |~ | MOVEQ.L #0x01,D7 0002517a be 97 | | CMP.L (A7),D7 0002517c 6e 26 |n& | BGT 0x251a4 0002517e 59 4f |YO | SUBQ.L #0x4,A7 00025180 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00025184 2f 07 |/ | MOVE.L D7,-(A7) 00025186 4e ba e9 de |N | JSR 0x23b66 0002518a 50 4f |PO | ADDQ.L #0x8,A7 0002518c 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00025192 54 4f |TO | ADDQ.L #0x2,A7 00025194 1e bc 00 20 | | MOVE.B #0x20,(A7) 00025198 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char) 0002519e 54 4f |TO | ADDQ.L #0x2,A7 000251a0 52 87 |R | ADDQ.L #0x1,D7 000251a2 68 d6 |h | BVC 0x2517a 000251a4 48 78 00 01 |Hx | PEA.L 0x1 000251a8 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 000251ae 58 4f |XO | ADDQ.L #0x4,A7 000251b0 28 5f |(_ | MOVEA.L (A7)+,A4 000251b2 2f 0c |/ | MOVE.L A4,-(A7) 000251b4 4e ba de ce |N | JSR 0x23084 000251b8 2e 8c |. | MOVE.L A4,(A7) 000251ba 4e ba ea 4c |N L | JSR 0x23c08 000251be 58 4f |XO | ADDQ.L #0x4,A7 000251c0 4c df 10 80 |L | MOVEM.L (A7)+,D7+A4 000251c4 4e 5e |N^ | UNLK A6 000251c6 4e 75 |Nu | RTS 000251c8 ; -------------------------------------------------------------------------------------- 000251c8 ; OMSI PASCAL Function 000251c8 ; <LVAR 0x008 4(r)> 000251c8 ; -------------------------------------------------------------------------------------- 000251c8 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 000251cc bf d5 | | CMPA.L (A5),A7 000251ce 62 06 |b | BHI 0x251d6 000251d0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000251d4 4e 76 |Nv | TRAPV 000251d6 de fc 00 2c | , | ADDA.W #0x2c,A7 000251da 48 e7 83 88 |H | MOVEM.L A4+A0+D7+D6+D0,-(A7) 000251de 41 ee 00 08 |A | LEA.L (A6+0x8),A0 000251e2 70 0c |p | MOVEQ.L #0x0c,D0 000251e4 59 4f |YO | SUBQ.L #0x4,A7 000251e6 2f 10 |/ | MOVE.L (A0),-(A7) 000251e8 48 78 00 01 |Hx | PEA.L 0x1 000251ec 4e ba e9 78 |N x | JSR 0x23b66 000251f0 50 4f |PO | ADDQ.L #0x8,A7 000251f2 28 5f |(_ | MOVEA.L (A7)+,A4 000251f4 9e c0 | | SUBA.W D0,A7 000251f6 2f 10 |/ | MOVE.L (A0),-(A7) 000251f8 48 78 00 02 |Hx | PEA.L 0x2 000251fc 4e ba e9 9a |N | JSR 0x23b98 00025200 50 4f |PO | ADDQ.L #0x8,A7 00025202 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00025208 50 4f |PO | ADDQ.L #0x8,A7 0002520a 2e 17 |. | MOVE.L (A7),D7 0002520c 51 4f |QO | SUBQ.L #0x8,A7 0002520e 2f 10 |/ | MOVE.L (A0),-(A7) 00025210 48 78 00 03 |Hx | PEA.L 0x3 00025214 4e ba e9 82 |N | JSR 0x23b98 00025218 50 4f |PO | ADDQ.L #0x8,A7 0002521a 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00025220 50 4f |PO | ADDQ.L #0x8,A7 00025222 2c 17 |, | MOVE.L (A7),D6 00025224 51 4f |QO | SUBQ.L #0x8,A7 00025226 2f 0c |/ | MOVE.L A4,-(A7) 00025228 2f 07 |/ | MOVE.L D7,-(A7) 0002522a 4e b9 00 01 03 60 |N ` | JSR ?StringToInt64() 00025230 58 4f |XO | ADDQ.L #0x4,A7 00025232 2e 86 |. | MOVE.L D6,(A7) 00025234 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 0002523a de c0 | | ADDA.W D0,A7 0002523c 4e ba e9 ca |N | JSR 0x23c08 00025240 58 4f |XO | ADDQ.L #0x4,A7 00025242 4c df 11 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A4 00025246 4e 5e |N^ | UNLK A6 00025248 4e 75 |Nu | RTS 0002524a ; -------------------------------------------------------------------------------------- 0002524a ; OMSI PASCAL Function 0002524a ; <LVAR 0x008 4(r)> 0002524a ; <LVAR -0x00a 2(r)> 0002524a ; <LVAR -0x00c 4(rw)> 0002524a ; <LVAR -0x010 4(rw)> 0002524a ; -------------------------------------------------------------------------------------- 0002524a 4e 56 ff bc |NV | LINK.W A6,#0xffbc 0002524e bf d5 | | CMPA.L (A5),A7 00025250 62 06 |b | BHI 0x25258 00025252 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025256 4e 76 |Nv | TRAPV 00025258 de fc 00 34 | 4 | ADDA.W #0x34,A7 0002525c 48 e7 c3 c0 |H | MOVEM.L A1+A0+D7+D6+D1+D0,-(A7) 00025260 41 ee ff f0 |A | LEA.L (A6-0x10),A0 00025264 43 ee ff f4 |C | LEA.L (A6-0xc),A1 00025268 51 4f |QO | SUBQ.L #0x8,A7 0002526a 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002526e 48 78 00 01 |Hx | PEA.L 0x1 00025272 4e ba e9 24 |N $ | JSR 0x23b98 00025276 50 4f |PO | ADDQ.L #0x8,A7 00025278 20 9f | | MOVE.L (A7)+,(A0) 0002527a 22 9f |" | MOVE.L (A7)+,(A1) 0002527c 7e 00 |~ | MOVEQ.L #0x00,D7 0002527e 7c 00 || | MOVEQ.L #0x00,D6 00025280 30 2e ff f6 |0. | MOVE.W (A6-0xa),D0 00025284 02 40 00 01 | @ | ANDI.W #0x0001,D0 00025288 42 81 |B | CLR.L D1 0002528a 32 00 |2 | MOVE.W D0,D1 0002528c de 81 | | ADD.L D1,D7 0002528e 51 4f |QO | SUBQ.L #0x8,A7 00025290 2f 11 |/ | MOVE.L (A1),-(A7) 00025292 2f 10 |/ | MOVE.L (A0),-(A7) 00025294 48 78 ff ff |Hx | PEA.L 0xffffffff 00025298 4e b9 00 01 03 44 |N D | JSR BitShift(a : Quad ; howmuch : integer) : Quad 0002529e de fc 00 0c | | ADDA.W #0xc,A7 000252a2 20 9f | | MOVE.L (A7)+,(A0) 000252a4 22 9f |" | MOVE.L (A7)+,(A1) 000252a6 52 86 |R | ADDQ.L #0x1,D6 000252a8 0c 86 00 00 00 3f | ? | CMPI.L #0x0000003f,D6 000252ae 6f d0 |o | BLE 0x25280 000252b0 51 4f |QO | SUBQ.L #0x8,A7 000252b2 2f 07 |/ | MOVE.L D7,-(A7) 000252b4 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad 000252ba 58 4f |XO | ADDQ.L #0x4,A7 000252bc 4e ba e9 d2 |N | JSR 0x23c90 000252c0 50 4f |PO | ADDQ.L #0x8,A7 000252c2 4c df 03 c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0+A1 000252c6 4e 5e |N^ | UNLK A6 000252c8 4e 75 |Nu | RTS 000252ca ; -------------------------------------------------------------------------------------- 000252ca ; OMSI PASCAL Function 000252ca ; <LVAR 0x008 4(r)> 000252ca ; <LVAR -0x004 @ 1(r)> 000252ca ; -------------------------------------------------------------------------------------- 000252ca 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 000252ce bf d5 | | CMPA.L (A5),A7 000252d0 62 06 |b | BHI 0x252d8 000252d2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000252d6 4e 76 |Nv | TRAPV 000252d8 de fc 00 44 | D | ADDA.W #0x44,A7 000252dc 48 e7 e0 e0 |H | MOVEM.L A2+A1+A0+D2+D1+D0,-(A7) 000252e0 45 f9 00 02 79 b0 |E y | LEA.L 0x279b0,A2 000252e6 72 01 |r | MOVEQ.L #0x01,D1 000252e8 74 00 |t | MOVEQ.L #0x00,D2 000252ea 4a 12 |J | TST.B (A2) 000252ec 66 32 |f2 | BNE 0x25320 000252ee 9e fc 00 1c | | SUBA.W #0x1c,A7 000252f2 20 4f | O | MOVEA.L A7,A0 000252f4 43 fa d7 8c |C | LEA.L 0x22a82,A1 000252f8 70 1a |p | MOVEQ.L #0x1a,D0 000252fa 10 d9 | | MOVE.B (A1)+,(A0)+ 000252fc 51 c8 ff fc |Q | DBF D0,0x252fa 00025300 59 4f |YO | SUBQ.L #0x4,A7 00025302 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00025306 3f 01 |? | MOVE.W D1,-(A7) 00025308 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 0002530c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025312 50 4f |PO | ADDQ.L #0x8,A7 00025314 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002531a de fc 00 20 | | ADDA.W #0x20,A7 0002531e 14 81 | | MOVE.B D1,(A2) 00025320 5d 4f |]O | SUBQ.L #0x6,A7 00025322 4e b9 00 01 03 f8 |N | JSR GetConsoleConfig() : Long 00025328 20 1f | | MOVE.L (A7)+,D0 0002532a 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00025330 63 02 |c | BLS 0x25334 00025332 4e 4f |NO | TRAP #15 00025334 3e 80 |> | MOVE.W D0,(A7) 00025336 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002533a 4e b9 00 01 02 12 |N | JSR KC09_PortStatus(Port : Word; VAR b: Byte) 00025340 5c 4f |\O | ADDQ.L #0x6,A7 00025342 10 2e ff fc | . | MOVE.B (A6-0x4),D0 00025346 b0 01 | | CMP.B D1,D0 00025348 67 16 |g | BEQ 0x25360 0002534a 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002534e 4e ba da 96 |N | JSR 0x22de6 00025352 58 4f |XO | ADDQ.L #0x4,A7 00025354 2e 6d 00 08 |.m | MOVEA.L (A5+0x8),A7 00025358 3c 42 |<B | MOVEA.W D2,A6 0002535a 4e f9 00 02 67 6a |N gj | JMP 0x2676a 00025360 55 4f |UO | SUBQ.L #0x2,A7 00025362 4e b9 00 01 03 d4 |N | JSR ReadChar() : Byte 00025368 10 1f | | MOVE.B (A7)+,D0 0002536a 0c 00 00 07 | | CMPI.B #0x07,D0 0002536e 67 16 |g | BEQ 0x25386 00025370 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00025374 4e ba da 70 |N p | JSR 0x22de6 00025378 58 4f |XO | ADDQ.L #0x4,A7 0002537a 2e 6d 00 08 |.m | MOVEA.L (A5+0x8),A7 0002537e 3c 42 |<B | MOVEA.W D2,A6 00025380 4e f9 00 02 67 6a |N gj | JMP 0x2676a 00025386 4c df 07 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2 0002538a 4e 5e |N^ | UNLK A6 0002538c 4e 75 |Nu | RTS 0002538e ; -------------------------------------------------------------------------------------- 0002538e ; OMSI PASCAL Function 0002538e ; -------------------------------------------------------------------------------------- 0002538e 4e 56 ff f8 |NV | LINK.W A6,#0xfff8 00025392 bf d5 | | CMPA.L (A5),A7 00025394 62 06 |b | BHI 0x2539c 00025396 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002539a 4e 76 |Nv | TRAPV 0002539c de fc 00 08 | | ADDA.W #0x8,A7 000253a0 48 78 00 c8 |Hx | PEA.L 0xc8 000253a4 4e ba e9 1e |N | JSR 0x23cc4 000253a8 58 4f |XO | ADDQ.L #0x4,A7 000253aa 4e 5e |N^ | UNLK A6 000253ac 4e 75 |Nu | RTS 000253ae ; -------------------------------------------------------------------------------------- 000253ae ; OMSI PASCAL Function 000253ae ; <LVAR 0x008 4(r)> 000253ae ; <LVAR -0x00c @ 4(r)> 000253ae ; -------------------------------------------------------------------------------------- 000253ae 4e 56 ff ac |NV | LINK.W A6,#0xffac 000253b2 bf d5 | | CMPA.L (A5),A7 000253b4 62 06 |b | BHI 0x253bc 000253b6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000253ba 4e 76 |Nv | TRAPV 000253bc de fc 00 48 | H | ADDA.W #0x48,A7 000253c0 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 000253c4 43 ee ff f4 |C | LEA.L (A6-0xc),A1 000253c8 48 51 |HQ | PEA.L (A1) 000253ca 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000253d0 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000253d4 4e ba de 66 |N f | JSR 0x2323c 000253d8 58 4f |XO | ADDQ.L #0x4,A7 000253da 7e 01 |~ | MOVEQ.L #0x01,D7 000253dc be 97 | | CMP.L (A7),D7 000253de 6e 6a |nj | BGT 0x2544a 000253e0 59 4f |YO | SUBQ.L #0x4,A7 000253e2 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000253e6 2f 07 |/ | MOVE.L D7,-(A7) 000253e8 4e ba e7 ea |N | JSR 0x23bd4 000253ec 50 4f |PO | ADDQ.L #0x8,A7 000253ee 2c 1f |, | MOVE.L (A7)+,D6 000253f0 6d 20 |m | BLT 0x25412 000253f2 0c 86 00 00 00 ff | | CMPI.L #0x000000ff,D6 000253f8 6e 18 |n | BGT 0x25412 000253fa 2f 11 |/ | MOVE.L (A1),-(A7) 000253fc 0c 86 00 00 00 ff | | CMPI.L #0x000000ff,D6 00025402 63 02 |c | BLS 0x25406 00025404 4e 4f |NO | TRAP #15 00025406 1f 06 | | MOVE.B D6,-(A7) 00025408 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 0002540e 5c 4f |\O | ADDQ.L #0x6,A7 00025410 60 34 |`4 | BRA 0x25446 00025412 48 51 |HQ | PEA.L (A1) 00025414 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002541a 58 4f |XO | ADDQ.L #0x4,A7 0002541c 41 fa d6 9c |A | LEA.L 0x22aba,A0 00025420 70 06 |p | MOVEQ.L #0x06,D0 00025422 2f 20 |/ | MOVE.L -(A0),-(A7) 00025424 51 c8 ff fc |Q | DBF D0,0x25422 00025428 59 4f |YO | SUBQ.L #0x4,A7 0002542a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002542e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025432 3f 3c 00 1c |?< | MOVE.W #0x1c,-(A7) 00025436 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002543c 50 4f |PO | ADDQ.L #0x8,A7 0002543e 4e ba d9 e8 |N | JSR 0x22e28 00025442 de fc 00 20 | | ADDA.W #0x20,A7 00025446 52 87 |R | ADDQ.L #0x1,D7 00025448 68 92 |h | BVC 0x253dc 0002544a 2e 91 |. | MOVE.L (A1),(A7) 0002544c 4e ba e7 ba |N | JSR 0x23c08 00025450 58 4f |XO | ADDQ.L #0x4,A7 00025452 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 00025456 4e 5e |N^ | UNLK A6 00025458 4e 75 |Nu | RTS 0002545a ; -------------------------------------------------------------------------------------- 0002545a ; OMSI PASCAL Function 0002545a ; <LVAR 0x00c 1(rw)> 0002545a ; <LVAR 0x008 4(r)> 0002545a ; -------------------------------------------------------------------------------------- 0002545a 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 0002545e bf d5 | | CMPA.L (A5),A7 00025460 62 06 |b | BHI 0x25468 00025462 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025466 4e 76 |Nv | TRAPV 00025468 de fc 00 34 | 4 | ADDA.W #0x34,A7 0002546c 48 e7 e7 c0 |H | MOVEM.L A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00025470 42 2e 00 0c |B. | CLR.B (A6+0xc) 00025474 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00025478 2f 08 |/ | MOVE.L A0,-(A7) 0002547a 70 00 |p | MOVEQ.L #0x00,D0 0002547c 52 40 |R@ | ADDQ.W #0x1,D0 0002547e 1c 00 | | MOVE.B D0,D6 00025480 0c 06 00 2b | + | CMPI.B #0x2b,D6 00025484 6e ff 00 00 00 86 |n | BGT 0x2550c 0002548a 41 fa d8 88 |A | LEA.L 0x22d14,A0 0002548e 10 06 | | MOVE.B D6,D0 00025490 48 80 |H | EXTB.W D0 00025492 48 c0 |H | EXTW.L D0 00025494 e2 98 | | ROR.L #0x1,D0 00025496 d0 c0 | | ADDA.W D0,A0 00025498 48 40 |H@ | SWAP.W D0 0002549a e7 58 | X | ROL.W #0x3,D0 0002549c 42 81 |B | CLR.L D1 0002549e 12 10 | | MOVE.B (A0),D1 000254a0 e1 29 | ) | LSL.B D0,D1 000254a2 e8 09 | | LSR.B #0x4,D1 000254a4 2a 01 |* | MOVE.L D1,D5 000254a6 20 57 | W | MOVEA.L (A7),A0 000254a8 30 10 |0 | MOVE.W (A0),D0 000254aa 48 c0 |H | EXTW.L D0 000254ac ba 80 | | CMP.L D0,D5 000254ae 66 54 |fT | BNE 0x25504 000254b0 2f 05 |/ | MOVE.L D5,-(A7) 000254b2 7e 01 |~ | MOVEQ.L #0x01,D7 000254b4 be 97 | | CMP.L (A7),D7 000254b6 6e 42 |nB | BGT 0x254fa 000254b8 10 06 | | MOVE.B D6,D0 000254ba 48 80 |H | EXTB.W D0 000254bc c1 fc 00 0a | | MULS.W #0xa,D0 000254c0 22 07 |" | MOVE.L D7,D1 000254c2 53 81 |S | SUBQ.L #0x1,D1 000254c4 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 000254ca 63 02 |c | BLS 0x254ce 000254cc 4e 4f |NO | TRAP #15 000254ce 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 000254d2 43 fa d6 88 |C | LEA.L COMMAND_TABLE_22b5c,A1 000254d6 24 07 |$ | MOVE.L D7,D2 000254d8 53 82 |S | SUBQ.L #0x1,D2 000254da 0c 82 00 00 00 09 | | CMPI.L #0x00000009,D2 000254e0 63 02 |c | BLS 0x254e4 000254e2 4e 4f |NO | TRAP #15 000254e4 43 f1 00 00 |C | LEA.L (A1+D0.W),A1 000254e8 10 30 18 02 | 0 | MOVE.B (A0+D1.L+#0x2),D0 000254ec b0 31 28 00 | 1( | CMP.B (A1+D2.L),D0 000254f0 67 04 |g | BEQ 0x254f6 000254f2 58 4f |XO | ADDQ.L #0x4,A7 000254f4 60 0e |` | BRA 0x25504 000254f6 52 87 |R | ADDQ.L #0x1,D7 000254f8 68 ba |h | BVC 0x254b4 000254fa 58 4f |XO | ADDQ.L #0x4,A7 000254fc 1d 46 00 0c | F | MOVE.B D6,(A6+0xc) 00025500 58 4f |XO | ADDQ.L #0x4,A7 00025502 60 0a |` | BRA 0x2550e 00025504 52 06 |R | ADDQ.B #0x1,D6 00025506 68 ff ff ff ff 78 |h x | BVC 0x25480 0002550c 58 4f |XO | ADDQ.L #0x4,A7 0002550e 4c df 03 e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1 00025512 4e 5e |N^ | UNLK A6 00025514 4e 75 |Nu | RTS 00025516 ; -------------------------------------------------------------------------------------- 00025516 ; OMSI PASCAL Function 00025516 ; <LVAR 0x00c 4(r)> 00025516 ; <LVAR 0x008 4(r)> 00025516 ; <LVAR -0x002 @ 1(r)> 00025516 ; <LVAR -0x006 @ 4(w)> 00025516 ; <LVAR -0x008 @ 1(r)> 00025516 ; <LVAR -0x00c @ 4(r)> 00025516 ; <LVAR -0x010 @ 4(rw)> 00025516 ; -------------------------------------------------------------------------------------- 00025516 TRY_SCRIPT_FILE(?): 00025516 4e 56 ff a6 |NV | LINK.W A6,#0xffa6 0002551a bf d5 | | CMPA.L (A5),A7 0002551c 62 06 |b | BHI 0x25524 0002551e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025522 4e 76 |Nv | TRAPV 00025524 de fc 00 4a | J | ADDA.W #0x4a,A7 00025528 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 0002552c 45 ee ff f0 |E | LEA.L (A6-0x10),A2 00025530 47 ee ff fe |G | LEA.L (A6-0x2),A3 00025534 49 ee ff f4 |I | LEA.L (A6-0xc),A4 00025538 72 01 |r | MOVEQ.L #0x01,D1 0002553a 59 4f |YO | SUBQ.L #0x4,A7 0002553c 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00025540 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00025546 58 4f |XO | ADDQ.L #0x4,A7 00025548 24 9f |$ | MOVE.L (A7)+,(A2) 0002554a 2f 12 |/ | MOVE.L (A2),-(A7) 0002554c 1f 3c 00 2e | < . | MOVE.B #0x2e,-(A7) 00025550 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00025556 5c 4f |\O | ADDQ.L #0x6,A7 00025558 41 f9 00 02 79 90 |A y | LEA.L 0x27990,A0 0002555e 70 04 |p | MOVEQ.L #0x04,D0 00025560 3f 20 |? | MOVE.W -(A0),-(A7) 00025562 51 c8 ff fc |Q | DBF D0,0x25560 00025566 59 4f |YO | SUBQ.L #0x4,A7 00025568 2f 12 |/ | MOVE.L (A2),-(A7) 0002556a 59 4f |YO | SUBQ.L #0x4,A7 0002556c 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00025570 3f 01 |? | MOVE.W D1,-(A7) 00025572 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00025576 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002557c 50 4f |PO | ADDQ.L #0x8,A7 0002557e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00025584 50 4f |PO | ADDQ.L #0x8,A7 00025586 24 9f |$ | MOVE.L (A7)+,(A2) 00025588 5c 4f |\O | ADDQ.L #0x6,A7 0002558a 2e 92 |. | MOVE.L (A2),(A7) 0002558c 42 27 |B' | CLR.B -(A7) 0002558e 1f 01 | | MOVE.B D1,-(A7) 00025590 48 78 00 00 |Hx | PEA.L 0x0 00025594 48 53 |HS | PEA.L (A3) 00025596 48 54 |HT | PEA.L (A4) 00025598 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 0002559e de fc 00 14 | | ADDA.W #0x14,A7 000255a2 4a 13 |J | TST.B (A3) 000255a4 67 4a |gJ | BEQ 0x255f0 000255a6 48 52 |HR | PEA.L (A2) 000255a8 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000255ae 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 000255b2 4e ba d8 32 |N 2 | JSR 0x22de6 000255b6 9e fc 00 16 | | SUBA.W #0x16,A7 000255ba 20 4f | O | MOVEA.L A7,A0 000255bc 43 fa d4 fc |C | LEA.L 0x22aba,A1 000255c0 70 18 |p | MOVEQ.L #0x18,D0 000255c2 10 d9 | | MOVE.B (A1)+,(A0)+ 000255c4 51 c8 ff fc |Q | DBF D0,0x255c2 000255c8 51 4f |QO | SUBQ.L #0x8,A7 000255ca 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000255ce 3f 01 |? | MOVE.W D1,-(A7) 000255d0 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000255d4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000255da 58 4f |XO | ADDQ.L #0x4,A7 000255dc 2e ae 00 0c |. | MOVE.L (A6+0xc),(A7) 000255e0 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000255e6 50 4f |PO | ADDQ.L #0x8,A7 000255e8 4e ba d8 3e |N > | JSR 0x22e28 000255ec de fc 00 1e | | ADDA.W #0x1e,A7 000255f0 2d 79 00 02 79 7e ff fa |-y y~ | MOVE.L 0x2797e,(A6-0x6) 000255f8 2f 14 |/ | MOVE.L (A4),-(A7) 000255fa 48 52 |HR | PEA.L (A2) 000255fc 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00025600 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 00025606 de fc 00 0c | | ADDA.W #0xc,A7 0002560a 20 52 | R | MOVEA.L (A2),A0 0002560c 4a 50 |JP | TST.W (A0) 0002560e 67 14 |g | BEQ 0x25624 00025610 2f 12 |/ | MOVE.L (A2),-(A7) 00025612 4e ba da 70 |N p | JSR 0x23084 00025616 58 4f |XO | ADDQ.L #0x4,A7 00025618 48 6e ff fa |Hn | PEA.L (A6-0x6) 0002561c 2f 12 |/ | MOVE.L (A2),-(A7) 0002561e 4e ba dd ee |N | JSR 0x2340e 00025622 50 4f |PO | ADDQ.L #0x8,A7 00025624 4a 2e ff f8 |J. | TST.B (A6-0x8) 00025628 67 ce |g | BEQ 0x255f8 0002562a 42 27 |B' | CLR.B -(A7) 0002562c 1f 01 | | MOVE.B D1,-(A7) 0002562e 48 78 00 01 |Hx | PEA.L 0x1 00025632 48 53 |HS | PEA.L (A3) 00025634 48 54 |HT | PEA.L (A4) 00025636 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 0002563c de fc 00 10 | | ADDA.W #0x10,A7 00025640 48 52 |HR | PEA.L (A2) 00025642 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00025648 58 4f |XO | ADDQ.L #0x4,A7 0002564a 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 0002564e 4e 5e |N^ | UNLK A6 00025650 4e 75 |Nu | RTS 00025652 ; -------------------------------------------------------------------------------------- 00025652 ; OMSI PASCAL Function 00025652 ; <LVAR 0x014 1(w)> 00025652 ; <LVAR 0x00c 4(r)> 00025652 ; <LVAR 0x008 4(r)> 00025652 ; -------------------------------------------------------------------------------------- 00025652 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 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 0c | | ADDA.W #0xc,A7 00025664 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00025668 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 0002566c d0 ae 00 08 | | ADD.L (A6+0x8),D0 00025670 53 80 |S | SUBQ.L #0x1,D0 00025672 53 80 |S | SUBQ.L #0x1,D0 00025674 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 0002567a 63 02 |c | BLS 0x2567e 0002567c 4e 4f |NO | TRAP #15 0002567e 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 00025684 1d 70 08 08 00 14 | p | MOVE.B (A0+D0.L+#0x8),(A6+0x14) 0002568a 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 0002568e 4e 5e |N^ | UNLK A6 00025690 4e 75 |Nu | RTS 00025692 ; -------------------------------------------------------------------------------------- 00025692 ; OMSI PASCAL Function 00025692 ; <LVAR 0x010 4(w)> 00025692 ; <LVAR 0x00c 4(r)> 00025692 ; <LVAR 0x008 4(r)> 00025692 ; <LVAR -0x004 @ 1(r)> 00025692 ; <LVAR -0x008 @ 4(r)> 00025692 ; -------------------------------------------------------------------------------------- 00025692 4e 56 ff c4 |NV | LINK.W A6,#0xffc4 00025696 bf d5 | | CMPA.L (A5),A7 00025698 62 06 |b | BHI 0x256a0 0002569a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002569e 4e 76 |Nv | TRAPV 000256a0 de fc 00 34 | 4 | ADDA.W #0x34,A7 000256a4 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 000256a8 59 4f |YO | SUBQ.L #0x4,A7 000256aa 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000256ae 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000256b2 4e ba e4 36 |N 6 | JSR 0x23aea 000256b6 50 4f |PO | ADDQ.L #0x8,A7 000256b8 48 6e ff fc |Hn | PEA.L (A6-0x4) 000256bc 48 6e ff f8 |Hn | PEA.L (A6-0x8) 000256c0 4e b9 00 01 02 ec |N | JSR String2Long(src : String; VAR status : Bool; VAR retval : Long) 000256c6 de fc 00 0c | | ADDA.W #0xc,A7 000256ca 4a 2e ff fc |J. | TST.B (A6-0x4) 000256ce 66 30 |f0 | BNE 0x25700 000256d0 9e fc 00 18 | | SUBA.W #0x18,A7 000256d4 20 4f | O | MOVEA.L A7,A0 000256d6 43 fa d3 fc |C | LEA.L 0x22ad4,A1 000256da 70 16 |p | MOVEQ.L #0x16,D0 000256dc 10 d9 | | MOVE.B (A1)+,(A0)+ 000256de 51 c8 ff fc |Q | DBF D0,0x256dc 000256e2 59 4f |YO | SUBQ.L #0x4,A7 000256e4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000256e8 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000256ec 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 000256f0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000256f6 50 4f |PO | ADDQ.L #0x8,A7 000256f8 4e ba d7 2e |N . | JSR 0x22e28 000256fc de fc 00 1c | | ADDA.W #0x1c,A7 00025700 2d 6e ff f8 00 10 |-n | MOVE.L (A6-0x8),(A6+0x10) 00025706 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 0002570a 4e 5e |N^ | UNLK A6 0002570c 4e 75 |Nu | RTS 0002570e ; -------------------------------------------------------------------------------------- 0002570e ; OMSI PASCAL Function 0002570e ; <LVAR 0x014 4(r)> 0002570e ; <LVAR 0x010 4(r)> 0002570e ; <LVAR 0x00c 4(r)> 0002570e ; <LVAR 0x008 4(r)> 0002570e ; <LVAR -0x00c 4(rw)> 0002570e ; <LVAR -0x010 4(rw)> 0002570e ; <LVAR -0x014 4(rw)> 0002570e ; <LVAR -0x018 4(w)> 0002570e ; <LVAR -0x020 4(rw)> 0002570e ; -------------------------------------------------------------------------------------- 0002570e 4e 56 ff 8e |NV | LINK.W A6,#0xff8e 00025712 bf d5 | | CMPA.L (A5),A7 00025714 62 06 |b | BHI 0x2571c 00025716 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002571a 4e 76 |Nv | TRAPV 0002571c de fc 00 4e | N | ADDA.W #0x4e,A7 00025720 48 e7 c7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 00025724 43 ee ff e0 |C | LEA.L (A6-0x20),A1 00025728 45 ee ff f0 |E | LEA.L (A6-0x10),A2 0002572c 47 ee ff f4 |G | LEA.L (A6-0xc),A3 00025730 49 ee ff ec |I | LEA.L (A6-0x14),A4 00025734 7e 00 |~ | MOVEQ.L #0x00,D7 00025736 22 ae 00 14 |" | MOVE.L (A6+0x14),(A1) 0002573a 20 39 00 02 79 7e | 9 y~ | MOVE.L 0x2797e,D0 00025740 90 ae 00 14 | | SUB.L (A6+0x14),D0 00025744 28 80 |( | MOVE.L D0,(A4) 00025746 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 0002574a 2a 2e 00 10 |*. | MOVE.L (A6+0x10),D5 0002574e ba 97 | | CMP.L (A7),D5 00025750 6e 2c |n, | BGT 0x2577e 00025752 51 4f |QO | SUBQ.L #0x8,A7 00025754 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00025758 2f 05 |/ | MOVE.L D5,-(A7) 0002575a 4e ba e3 2c |N , | JSR 0x23a88 0002575e 50 4f |PO | ADDQ.L #0x8,A7 00025760 24 9f |$ | MOVE.L (A7)+,(A2) 00025762 26 97 |& | MOVE.L (A7),(A3) 00025764 2f 13 |/ | MOVE.L (A3),-(A7) 00025766 2f 12 |/ | MOVE.L (A2),-(A7) 00025768 4e ba e2 e6 |N | JSR 0x23a50 0002576c 50 4f |PO | ADDQ.L #0x8,A7 0002576e 2c 1f |, | MOVE.L (A7)+,D6 00025770 de 86 | | ADD.L D6,D7 00025772 ba ae 00 0c | | CMP.L (A6+0xc),D5 00025776 6c 02 |l | BGE 0x2577a 00025778 52 87 |R | ADDQ.L #0x1,D7 0002577a 52 85 |R | ADDQ.L #0x1,D5 0002577c 68 d0 |h | BVC 0x2574e 0002577e 58 4f |XO | ADDQ.L #0x4,A7 00025780 20 11 | | MOVE.L (A1),D0 00025782 d0 94 | | ADD.L (A4),D0 00025784 2d 40 ff e8 |-@ | MOVE.L D0,(A6-0x18) 00025788 be 94 | | CMP.L (A4),D7 0002578a 67 0c |g | BEQ 0x25798 0002578c 2f 00 |/ | MOVE.L D0,-(A7) 0002578e 2f 14 |/ | MOVE.L (A4),-(A7) 00025790 9f 97 | | SUB.L D7,(A7) 00025792 4e ba db f0 |N | JSR 0x23384 00025796 50 4f |PO | ADDQ.L #0x8,A7 00025798 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 0002579c 2a 2e 00 10 |*. | MOVE.L (A6+0x10),D5 000257a0 ba 97 | | CMP.L (A7),D5 000257a2 6e ff 00 00 00 8c |n | BGT 0x25830 000257a8 51 4f |QO | SUBQ.L #0x8,A7 000257aa 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000257ae 2f 05 |/ | MOVE.L D5,-(A7) 000257b0 4e ba e2 d6 |N | JSR 0x23a88 000257b4 50 4f |PO | ADDQ.L #0x8,A7 000257b6 24 9f |$ | MOVE.L (A7)+,(A2) 000257b8 26 97 |& | MOVE.L (A7),(A3) 000257ba 2f 13 |/ | MOVE.L (A3),-(A7) 000257bc 2f 12 |/ | MOVE.L (A2),-(A7) 000257be 4e ba e2 90 |N | JSR 0x23a50 000257c2 50 4f |PO | ADDQ.L #0x8,A7 000257c4 2c 1f |, | MOVE.L (A7)+,D6 000257c6 2f 06 |/ | MOVE.L D6,-(A7) 000257c8 70 01 |p | MOVEQ.L #0x01,D0 000257ca b0 97 | | CMP.L (A7),D0 000257cc 6e 30 |n0 | BGT 0x257fe 000257ce 22 11 |" | MOVE.L (A1),D1 000257d0 d2 80 | | ADD.L D0,D1 000257d2 53 81 |S | SUBQ.L #0x1,D1 000257d4 53 81 |S | SUBQ.L #0x1,D1 000257d6 0c 81 00 00 0f ff | | CMPI.L #0x00000fff,D1 000257dc 63 02 |c | BLS 0x257e0 000257de 4e 4f |NO | TRAP #15 000257e0 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 000257e6 55 4f |UO | SUBQ.L #0x2,A7 000257e8 2f 13 |/ | MOVE.L (A3),-(A7) 000257ea 2f 12 |/ | MOVE.L (A2),-(A7) 000257ec 2f 00 |/ | MOVE.L D0,-(A7) 000257ee 4e ba fe 62 |N b | JSR 0x25652 000257f2 de fc 00 0c | | ADDA.W #0xc,A7 000257f6 11 9f 18 08 | | MOVE.B (A7)+,(A0+D1.L+#0x8) 000257fa 52 80 |R | ADDQ.L #0x1,D0 000257fc 68 cc |h | BVC 0x257ca 000257fe 58 4f |XO | ADDQ.L #0x4,A7 00025800 ba ae 00 0c | | CMP.L (A6+0xc),D5 00025804 6c 22 |l" | BGE 0x25828 00025806 20 11 | | MOVE.L (A1),D0 00025808 d0 86 | | ADD.L D6,D0 0002580a 22 00 |" | MOVE.L D0,D1 0002580c 53 81 |S | SUBQ.L #0x1,D1 0002580e 0c 81 00 00 0f ff | | CMPI.L #0x00000fff,D1 00025814 63 02 |c | BLS 0x25818 00025816 4e 4f |NO | TRAP #15 00025818 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 0002581e 11 bc 00 2c 18 08 | , | MOVE.B #0x2c,(A0+D1.L+#0x8) 00025824 52 80 |R | ADDQ.L #0x1,D0 00025826 22 80 |" | MOVE.L D0,(A1) 00025828 52 85 |R | ADDQ.L #0x1,D5 0002582a 68 ff ff ff ff 74 |h t | BVC 0x257a0 00025830 58 4f |XO | ADDQ.L #0x4,A7 00025832 4c df 1f e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3+A4 00025836 4e 5e |N^ | UNLK A6 00025838 4e 75 |Nu | RTS 0002583a ; -------------------------------------------------------------------------------------- 0002583a ; OMSI PASCAL Function 0002583a ; <LVAR 0x018 4(rw)> 0002583a ; <LVAR 0x014 4(r)> 0002583a ; <LVAR 0x010 4(r)> 0002583a ; <LVAR 0x00c 4(r)> 0002583a ; <LVAR 0x008 4(r)> 0002583a ; <LVAR -0x008 4(rw)> 0002583a ; <LVAR -0x00c 4(rw)> 0002583a ; <LVAR -0x018 4(w)> 0002583a ; -------------------------------------------------------------------------------------- 0002583a 4e 56 ff 9e |NV | LINK.W A6,#0xff9e 0002583e bf d5 | | CMPA.L (A5),A7 00025840 62 06 |b | BHI 0x25848 00025842 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025846 4e 76 |Nv | TRAPV 00025848 de fc 00 4a | J | ADDA.W #0x4a,A7 0002584c 48 e7 c7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 00025850 41 ee ff f8 |A | LEA.L (A6-0x8),A0 00025854 43 ee 00 14 |C | LEA.L (A6+0x14),A1 00025858 45 ee 00 10 |E | LEA.L (A6+0x10),A2 0002585c 47 ee ff f4 |G | LEA.L (A6-0xc),A3 00025860 49 fa fd f0 |I | LEA.L 0x25652,A4 00025864 72 0c |r | MOVEQ.L #0x0c,D1 00025866 59 4f |YO | SUBQ.L #0x4,A7 00025868 2f 11 |/ | MOVE.L (A1),-(A7) 0002586a 2f 12 |/ | MOVE.L (A2),-(A7) 0002586c 4e ba e1 e2 |N | JSR 0x23a50 00025870 50 4f |PO | ADDQ.L #0x8,A7 00025872 26 97 |& | MOVE.L (A7),(A3) 00025874 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00025878 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002587c 4e ba e1 d2 |N | JSR 0x23a50 00025880 50 4f |PO | ADDQ.L #0x8,A7 00025882 20 9f | | MOVE.L (A7)+,(A0) 00025884 52 90 |R | ADDQ.L #0x1,(A0) 00025886 20 13 | | MOVE.L (A3),D0 00025888 90 90 | | SUB.L (A0),D0 0002588a 52 80 |R | ADDQ.L #0x1,D0 0002588c 2f 00 |/ | MOVE.L D0,-(A7) 0002588e 70 01 |p | MOVEQ.L #0x01,D0 00025890 b0 97 | | CMP.L (A7),D0 00025892 6e ff 00 00 00 92 |n | BGT 0x25926 00025898 2d 40 ff e8 |-@ | MOVE.L D0,(A6-0x18) 0002589c 2f 00 |/ | MOVE.L D0,-(A7) 0002589e 7c 00 || | MOVEQ.L #0x00,D6 000258a0 2f 10 |/ | MOVE.L (A0),-(A7) 000258a2 7a 01 |z | MOVEQ.L #0x01,D5 000258a4 ba 97 | | CMP.L (A7),D5 000258a6 6e 42 |nB | BGT 0x258ea 000258a8 0c 85 00 00 00 01 | | CMPI.L #0x00000001,D5 000258ae 66 04 |f | BNE 0x258b4 000258b0 7e 2f |~/ | MOVEQ.L #0x2f,D7 000258b2 60 14 |` | BRA 0x258c8 000258b4 55 4f |UO | SUBQ.L #0x2,A7 000258b6 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000258ba 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000258be 2f 05 |/ | MOVE.L D5,-(A7) 000258c0 53 97 |S | SUBQ.L #0x1,(A7) 000258c2 4e 94 |N | JSR (A4) 000258c4 de c1 | | ADDA.W D1,A7 000258c6 1e 1f | | MOVE.B (A7)+,D7 000258c8 55 4f |UO | SUBQ.L #0x2,A7 000258ca 2f 11 |/ | MOVE.L (A1),-(A7) 000258cc 2f 12 |/ | MOVE.L (A2),-(A7) 000258ce 20 2f 00 0e | / | MOVE.L (A7+0xe),D0 000258d2 d0 85 | | ADD.L D5,D0 000258d4 53 80 |S | SUBQ.L #0x1,D0 000258d6 2f 00 |/ | MOVE.L D0,-(A7) 000258d8 4e 94 |N | JSR (A4) 000258da de c1 | | ADDA.W D1,A7 000258dc be 1f | | CMP.B (A7)+,D7 000258de 67 04 |g | BEQ 0x258e4 000258e0 58 4f |XO | ADDQ.L #0x4,A7 000258e2 60 08 |` | BRA 0x258ec 000258e4 2c 05 |, | MOVE.L D5,D6 000258e6 52 85 |R | ADDQ.L #0x1,D5 000258e8 68 ba |h | BVC 0x258a4 000258ea 58 4f |XO | ADDQ.L #0x4,A7 000258ec bc 90 | | CMP.L (A0),D6 000258ee 66 2c |f, | BNE 0x2591c 000258f0 20 17 | | MOVE.L (A7),D0 000258f2 2d 40 00 18 |-@ | MOVE.L D0,(A6+0x18) 000258f6 d0 90 | | ADD.L (A0),D0 000258f8 b0 93 | | CMP.L (A3),D0 000258fa 6d 02 |m | BLT 0x258fe 000258fc 60 1a |` | BRA 0x25918 000258fe 55 4f |UO | SUBQ.L #0x2,A7 00025900 2f 11 |/ | MOVE.L (A1),-(A7) 00025902 2f 12 |/ | MOVE.L (A2),-(A7) 00025904 2f 00 |/ | MOVE.L D0,-(A7) 00025906 4e 94 |N | JSR (A4) 00025908 de c1 | | ADDA.W D1,A7 0002590a 1e 1f | | MOVE.B (A7)+,D7 0002590c 0c 07 00 2f | / | CMPI.B #0x2f,D7 00025910 67 06 |g | BEQ 0x25918 00025912 0c 07 00 3d | = | CMPI.B #0x3d,D7 00025916 66 04 |f | BNE 0x2591c 00025918 50 4f |PO | ADDQ.L #0x8,A7 0002591a 60 10 |` | BRA 0x2592c 0002591c 20 1f | | MOVE.L (A7)+,D0 0002591e 52 80 |R | ADDQ.L #0x1,D0 00025920 68 ff ff ff ff 6e |h n | BVC 0x25890 00025926 58 4f |XO | ADDQ.L #0x4,A7 00025928 42 ae 00 18 |B | CLR.L (A6+0x18) 0002592c 4c df 1f e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3+A4 00025930 4e 5e |N^ | UNLK A6 00025932 4e 75 |Nu | RTS 00025934 ; -------------------------------------------------------------------------------------- 00025934 ; OMSI PASCAL Function 00025934 ; <LVAR 0x018 4(r)> 00025934 ; <LVAR 0x014 4(r)> 00025934 ; <LVAR 0x010 4(r)> 00025934 ; <LVAR 0x00c 4(r)> 00025934 ; <LVAR 0x008 4(r)> 00025934 ; -------------------------------------------------------------------------------------- 00025934 4e 56 ff be |NV | LINK.W A6,#0xffbe 00025938 bf d5 | | CMPA.L (A5),A7 0002593a 62 06 |b | BHI 0x25942 0002593c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025940 4e 76 |Nv | TRAPV 00025942 de fc 00 36 | 6 | ADDA.W #0x36,A7 00025946 48 e7 c7 c0 |H | MOVEM.L A1+A0+D7+D6+D5+D1+D0,-(A7) 0002594a 41 ee 00 14 |A | LEA.L (A6+0x14),A0 0002594e 43 ee 00 10 |C | LEA.L (A6+0x10),A1 00025952 72 2f |r/ | MOVEQ.L #0x2f,D1 00025954 59 4f |YO | SUBQ.L #0x4,A7 00025956 2f 10 |/ | MOVE.L (A0),-(A7) 00025958 2f 11 |/ | MOVE.L (A1),-(A7) 0002595a 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 0002595e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00025962 4e ba fe d6 |N | JSR 0x2583a 00025966 de fc 00 10 | | ADDA.W #0x10,A7 0002596a 2a 1f |* | MOVE.L (A7)+,D5 0002596c 6f 52 |oR | BLE 0x259c0 0002596e 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 00025972 1f 01 | | MOVE.B D1,-(A7) 00025974 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 0002597a 5c 4f |\O | ADDQ.L #0x6,A7 0002597c 20 05 | | MOVE.L D5,D0 0002597e 52 80 |R | ADDQ.L #0x1,D0 00025980 59 4f |YO | SUBQ.L #0x4,A7 00025982 2f 10 |/ | MOVE.L (A0),-(A7) 00025984 2f 11 |/ | MOVE.L (A1),-(A7) 00025986 4e ba e0 c8 |N | JSR 0x23a50 0002598a 50 4f |PO | ADDQ.L #0x8,A7 0002598c 2c 00 |, | MOVE.L D0,D6 0002598e bc 97 | | CMP.L (A7),D6 00025990 6e 2c |n, | BGT 0x259be 00025992 55 4f |UO | SUBQ.L #0x2,A7 00025994 2f 10 |/ | MOVE.L (A0),-(A7) 00025996 2f 11 |/ | MOVE.L (A1),-(A7) 00025998 2f 06 |/ | MOVE.L D6,-(A7) 0002599a 4e ba fc b6 |N | JSR 0x25652 0002599e de fc 00 0c | | ADDA.W #0xc,A7 000259a2 1e 1f | | MOVE.B (A7)+,D7 000259a4 be 01 | | CMP.B D1,D7 000259a6 66 04 |f | BNE 0x259ac 000259a8 58 4f |XO | ADDQ.L #0x4,A7 000259aa 60 14 |` | BRA 0x259c0 000259ac 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 000259b0 1f 07 | | MOVE.B D7,-(A7) 000259b2 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000259b8 5c 4f |\O | ADDQ.L #0x6,A7 000259ba 52 86 |R | ADDQ.L #0x1,D6 000259bc 68 d0 |h | BVC 0x2598e 000259be 58 4f |XO | ADDQ.L #0x4,A7 000259c0 4c df 03 e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1 000259c4 4e 5e |N^ | UNLK A6 000259c6 4e 75 |Nu | RTS 000259c8 ; -------------------------------------------------------------------------------------- 000259c8 ; OMSI PASCAL Function 000259c8 ; <LVAR 0x018 4(r)> 000259c8 ; <LVAR 0x014 4(r)> 000259c8 ; <LVAR 0x010 4(r)> 000259c8 ; <LVAR 0x00c 4(r)> 000259c8 ; <LVAR 0x008 4(r)> 000259c8 ; <LVAR -0x006 4(rw)> 000259c8 ; <LVAR -0x014 4(rw)> 000259c8 ; -------------------------------------------------------------------------------------- 000259c8 4e 56 ff aa |NV | LINK.W A6,#0xffaa 000259cc bf d5 | | CMPA.L (A5),A7 000259ce 62 06 |b | BHI 0x259d6 000259d0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000259d4 4e 76 |Nv | TRAPV 000259d6 de fc 00 42 | B | ADDA.W #0x42,A7 000259da 48 e7 c7 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 000259de 41 ee 00 14 |A | LEA.L (A6+0x14),A0 000259e2 43 ee 00 10 |C | LEA.L (A6+0x10),A1 000259e6 45 ee ff fa |E | LEA.L (A6-0x6),A2 000259ea 72 0c |r | MOVEQ.L #0x0c,D1 000259ec 59 4f |YO | SUBQ.L #0x4,A7 000259ee 2f 10 |/ | MOVE.L (A0),-(A7) 000259f0 2f 11 |/ | MOVE.L (A1),-(A7) 000259f2 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000259f6 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000259fa 4e ba fe 3e |N > | JSR 0x2583a 000259fe de fc 00 10 | | ADDA.W #0x10,A7 00025a02 2d 5f ff ec |-_ | MOVE.L (A7)+,(A6-0x14) 00025a06 6f 6e |on | BLE 0x25a76 00025a08 59 4f |YO | SUBQ.L #0x4,A7 00025a0a 2f 10 |/ | MOVE.L (A0),-(A7) 00025a0c 2f 11 |/ | MOVE.L (A1),-(A7) 00025a0e 4e ba e0 40 |N @ | JSR 0x23a50 00025a12 50 4f |PO | ADDQ.L #0x8,A7 00025a14 24 9f |$ | MOVE.L (A7)+,(A2) 00025a16 2f 12 |/ | MOVE.L (A2),-(A7) 00025a18 2a 2e ff ec |*. | MOVE.L (A6-0x14),D5 00025a1c ba 97 | | CMP.L (A7),D5 00025a1e 6e 54 |nT | BGT 0x25a74 00025a20 55 4f |UO | SUBQ.L #0x2,A7 00025a22 2f 10 |/ | MOVE.L (A0),-(A7) 00025a24 2f 11 |/ | MOVE.L (A1),-(A7) 00025a26 2f 05 |/ | MOVE.L D5,-(A7) 00025a28 4e ba fc 28 |N ( | JSR 0x25652 00025a2c de c1 | | ADDA.W D1,A7 00025a2e 10 1f | | MOVE.B (A7)+,D0 00025a30 0c 00 00 3d | = | CMPI.B #0x3d,D0 00025a34 66 3a |f: | BNE 0x25a70 00025a36 20 05 | | MOVE.L D5,D0 00025a38 52 80 |R | ADDQ.L #0x1,D0 00025a3a 2f 12 |/ | MOVE.L (A2),-(A7) 00025a3c 2c 00 |, | MOVE.L D0,D6 00025a3e bc 97 | | CMP.L (A7),D6 00025a40 6e 2c |n, | BGT 0x25a6e 00025a42 55 4f |UO | SUBQ.L #0x2,A7 00025a44 2f 10 |/ | MOVE.L (A0),-(A7) 00025a46 2f 11 |/ | MOVE.L (A1),-(A7) 00025a48 2f 06 |/ | MOVE.L D6,-(A7) 00025a4a 4e ba fc 06 |N | JSR 0x25652 00025a4e de c1 | | ADDA.W D1,A7 00025a50 1e 1f | | MOVE.B (A7)+,D7 00025a52 0c 07 00 2f | / | CMPI.B #0x2f,D7 00025a56 66 04 |f | BNE 0x25a5c 00025a58 50 4f |PO | ADDQ.L #0x8,A7 00025a5a 60 1a |` | BRA 0x25a76 00025a5c 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 00025a60 1f 07 | | MOVE.B D7,-(A7) 00025a62 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00025a68 5c 4f |\O | ADDQ.L #0x6,A7 00025a6a 52 86 |R | ADDQ.L #0x1,D6 00025a6c 68 d0 |h | BVC 0x25a3e 00025a6e 58 4f |XO | ADDQ.L #0x4,A7 00025a70 52 85 |R | ADDQ.L #0x1,D5 00025a72 68 a8 |h | BVC 0x25a1c 00025a74 58 4f |XO | ADDQ.L #0x4,A7 00025a76 4c df 07 e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2 00025a7a 4e 5e |N^ | UNLK A6 00025a7c 4e 75 |Nu | RTS 00025a7e ; -------------------------------------------------------------------------------------- 00025a7e ; OMSI PASCAL Function 00025a7e ; <LVAR 0x010 4(r)> 00025a7e ; <LVAR 0x00c 4(r)> 00025a7e ; <LVAR 0x008 4(r)> 00025a7e ; -------------------------------------------------------------------------------------- 00025a7e 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 00025a82 bf d5 | | CMPA.L (A5),A7 00025a84 62 06 |b | BHI 0x25a8c 00025a86 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025a8a 4e 76 |Nv | TRAPV 00025a8c de fc 00 42 | B | ADDA.W #0x42,A7 00025a90 48 e7 c7 c0 |H | MOVEM.L A1+A0+D7+D6+D5+D1+D0,-(A7) 00025a94 41 ee 00 0c |A | LEA.L (A6+0xc),A0 00025a98 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00025a9c 72 0c |r | MOVEQ.L #0x0c,D1 00025a9e 59 4f |YO | SUBQ.L #0x4,A7 00025aa0 2f 10 |/ | MOVE.L (A0),-(A7) 00025aa2 2f 11 |/ | MOVE.L (A1),-(A7) 00025aa4 4e ba df aa |N | JSR 0x23a50 00025aa8 50 4f |PO | ADDQ.L #0x8,A7 00025aaa 2a 1f |* | MOVE.L (A7)+,D5 00025aac 2f 05 |/ | MOVE.L D5,-(A7) 00025aae 7c 01 || | MOVEQ.L #0x01,D6 00025ab0 bc 97 | | CMP.L (A7),D6 00025ab2 6e 46 |nF | BGT 0x25afa 00025ab4 55 4f |UO | SUBQ.L #0x2,A7 00025ab6 2f 10 |/ | MOVE.L (A0),-(A7) 00025ab8 2f 11 |/ | MOVE.L (A1),-(A7) 00025aba 2f 06 |/ | MOVE.L D6,-(A7) 00025abc 4e ba fb 94 |N | JSR 0x25652 00025ac0 de c1 | | ADDA.W D1,A7 00025ac2 10 1f | | MOVE.B (A7)+,D0 00025ac4 0c 00 00 2f | / | CMPI.B #0x2f,D0 00025ac8 66 2c |f, | BNE 0x25af6 00025aca 2f 05 |/ | MOVE.L D5,-(A7) 00025acc 2e 06 |. | MOVE.L D6,D7 00025ace be 97 | | CMP.L (A7),D7 00025ad0 6e 1e |n | BGT 0x25af0 00025ad2 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 00025ad6 55 4f |UO | SUBQ.L #0x2,A7 00025ad8 2f 10 |/ | MOVE.L (A0),-(A7) 00025ada 2f 11 |/ | MOVE.L (A1),-(A7) 00025adc 2f 07 |/ | MOVE.L D7,-(A7) 00025ade 4e ba fb 72 |N r | JSR 0x25652 00025ae2 de c1 | | ADDA.W D1,A7 00025ae4 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00025aea 5c 4f |\O | ADDQ.L #0x6,A7 00025aec 52 87 |R | ADDQ.L #0x1,D7 00025aee 68 de |h | BVC 0x25ace 00025af0 58 4f |XO | ADDQ.L #0x4,A7 00025af2 58 4f |XO | ADDQ.L #0x4,A7 00025af4 60 06 |` | BRA 0x25afc 00025af6 52 86 |R | ADDQ.L #0x1,D6 00025af8 68 b6 |h | BVC 0x25ab0 00025afa 58 4f |XO | ADDQ.L #0x4,A7 00025afc 4c df 03 e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1 00025b00 4e 5e |N^ | UNLK A6 00025b02 4e 75 |Nu | RTS 00025b04 ; -------------------------------------------------------------------------------------- 00025b04 ; OMSI PASCAL Function 00025b04 ; <LVAR 0x010 4(r)> 00025b04 ; <LVAR 0x00c 4(r)> 00025b04 ; <LVAR 0x008 4(r)> 00025b04 ; -------------------------------------------------------------------------------------- 00025b04 4e 56 ff ce |NV | LINK.W A6,#0xffce 00025b08 bf d5 | | CMPA.L (A5),A7 00025b0a 62 06 |b | BHI 0x25b12 00025b0c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025b10 4e 76 |Nv | TRAPV 00025b12 de fc 00 2a | * | ADDA.W #0x2a,A7 00025b16 48 e7 03 80 |H | MOVEM.L A0+D7+D6,-(A7) 00025b1a 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00025b1e 42 50 |BP | CLR.W (A0) 00025b20 59 4f |YO | SUBQ.L #0x4,A7 00025b22 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00025b26 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00025b2a 4e ba df 24 |N $ | JSR 0x23a50 00025b2e 50 4f |PO | ADDQ.L #0x8,A7 00025b30 7e 01 |~ | MOVEQ.L #0x01,D7 00025b32 be 97 | | CMP.L (A7),D7 00025b34 6e 34 |n4 | BGT 0x25b6a 00025b36 55 4f |UO | SUBQ.L #0x2,A7 00025b38 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00025b3c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00025b40 2f 07 |/ | MOVE.L D7,-(A7) 00025b42 4e ba fb 0e |N | JSR 0x25652 00025b46 de fc 00 0c | | ADDA.W #0xc,A7 00025b4a 1c 1f | | MOVE.B (A7)+,D6 00025b4c 0c 06 00 2f | / | CMPI.B #0x2f,D6 00025b50 67 10 |g | BEQ 0x25b62 00025b52 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 00025b56 1f 06 | | MOVE.B D6,-(A7) 00025b58 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00025b5e 5c 4f |\O | ADDQ.L #0x6,A7 00025b60 60 04 |` | BRA 0x25b66 00025b62 58 4f |XO | ADDQ.L #0x4,A7 00025b64 60 06 |` | BRA 0x25b6c 00025b66 52 87 |R | ADDQ.L #0x1,D7 00025b68 68 c8 |h | BVC 0x25b32 00025b6a 58 4f |XO | ADDQ.L #0x4,A7 00025b6c 4c df 01 c0 |L | MOVEM.L (A7)+,D6+D7+A0 00025b70 4e 5e |N^ | UNLK A6 00025b72 4e 75 |Nu | RTS 00025b74 ; -------------------------------------------------------------------------------------- 00025b74 ; OMSI PASCAL Function 00025b74 ; -------------------------------------------------------------------------------------- 00025b74 4e 56 ff c6 |NV | LINK.W A6,#0xffc6 00025b78 bf d5 | | CMPA.L (A5),A7 00025b7a 62 06 |b | BHI 0x25b82 00025b7c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025b80 4e 76 |Nv | TRAPV 00025b82 de fc 00 3a | : | ADDA.W #0x3a,A7 00025b86 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00025b8a 41 fa cf 82 |A | LEA.L 0x22b0e,A0 00025b8e 70 10 |p | MOVEQ.L #0x10,D0 00025b90 3f 20 |? | MOVE.W -(A0),-(A7) 00025b92 51 c8 ff fc |Q | DBF D0,0x25b90 00025b96 59 4f |YO | SUBQ.L #0x4,A7 00025b98 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00025b9c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025ba0 3f 3c 00 22 |?< " | MOVE.W #0x22,-(A7) 00025ba4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025baa 50 4f |PO | ADDQ.L #0x8,A7 00025bac 4e ba d2 7a |N z | JSR 0x22e28 00025bb0 de fc 00 26 | & | ADDA.W #0x26,A7 00025bb4 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00025bb8 4e 5e |N^ | UNLK A6 00025bba 4e 75 |Nu | RTS 00025bbc ; -------------------------------------------------------------------------------------- 00025bbc ; OMSI PASCAL Function 00025bbc ; <LVAR 0x00c 4(r)> 00025bbc ; <LVAR 0x008 4(r)> 00025bbc ; <LVAR -0x006 4(rw)> 00025bbc ; -------------------------------------------------------------------------------------- 00025bbc 4e 56 ff a0 |NV | LINK.W A6,#0xffa0 00025bc0 bf d5 | | CMPA.L (A5),A7 00025bc2 62 06 |b | BHI 0x25bca 00025bc4 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025bc8 4e 76 |Nv | TRAPV 00025bca de fc 00 58 | X | ADDA.W #0x58,A7 00025bce 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00025bd2 43 ee 00 0c |C | LEA.L (A6+0xc),A1 00025bd6 45 f9 00 02 79 7e |E y~ | LEA.L 0x2797e,A2 00025bdc 47 fa d2 e6 |G | LEA.L 0x22ec4,A3 00025be0 72 30 |r0 | MOVEQ.L #0x30,D1 00025be2 74 39 |t9 | MOVEQ.L #0x39,D2 00025be4 76 25 |v% | MOVEQ.L #0x25,D3 00025be6 78 2d |x- | MOVEQ.L #0x2d,D4 00025be8 2d 52 ff fa |-R | MOVE.L (A2),(A6-0x6) 00025bec 55 4f |UO | SUBQ.L #0x2,A7 00025bee 4e 93 |N | JSR (A3) 00025bf0 1e 1f | | MOVE.B (A7)+,D7 00025bf2 be 03 | | CMP.B D3,D7 00025bf4 66 0a |f | BNE 0x25c00 00025bf6 20 51 | Q | MOVEA.L (A1),A0 00025bf8 42 90 |B | CLR.L (A0) 00025bfa 60 ff 00 00 00 ec |` | BRA 0x25ce8 00025c00 be 04 | | CMP.B D4,D7 00025c02 66 0e |f | BNE 0x25c12 00025c04 20 51 | Q | MOVEA.L (A1),A0 00025c06 20 bc 00 00 00 01 | | MOVE.L #0x1,(A0) 00025c0c 60 ff 00 00 00 da |` | BRA 0x25ce8 00025c12 0c 07 00 2f | / | CMPI.B #0x2f,D7 00025c16 66 0e |f | BNE 0x25c26 00025c18 20 51 | Q | MOVEA.L (A1),A0 00025c1a 20 bc 00 00 00 04 | | MOVE.L #0x4,(A0) 00025c20 60 ff 00 00 00 c6 |` | BRA 0x25ce8 00025c26 0c 07 00 3d | = | CMPI.B #0x3d,D7 00025c2a 66 0e |f | BNE 0x25c3a 00025c2c 20 51 | Q | MOVEA.L (A1),A0 00025c2e 20 bc 00 00 00 05 | | MOVE.L #0x5,(A0) 00025c34 60 ff 00 00 00 b2 |` | BRA 0x25ce8 00025c3a 0c 07 00 5c | \ | CMPI.B #0x5c,D7 00025c3e 66 0e |f | BNE 0x25c4e 00025c40 20 51 | Q | MOVEA.L (A1),A0 00025c42 20 bc 00 00 00 06 | | MOVE.L #0x6,(A0) 00025c48 60 ff 00 00 00 9e |` | BRA 0x25ce8 00025c4e 4a 07 |J | TST.B D7 00025c50 66 2c |f, | BNE 0x25c7e 00025c52 41 fa ce d2 |A | LEA.L 0x22b26,A0 00025c56 70 05 |p | MOVEQ.L #0x05,D0 00025c58 2f 20 |/ | MOVE.L -(A0),-(A7) 00025c5a 51 c8 ff fc |Q | DBF D0,0x25c58 00025c5e 59 4f |YO | SUBQ.L #0x4,A7 00025c60 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00025c64 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025c68 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00025c6c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025c72 50 4f |PO | ADDQ.L #0x8,A7 00025c74 4e ba d1 b2 |N | JSR 0x22e28 00025c78 de fc 00 1c | | ADDA.W #0x1c,A7 00025c7c 60 6a |`j | BRA 0x25ce8 00025c7e be 01 | | CMP.B D1,D7 00025c80 65 2c |e, | BCS 0x25cae 00025c82 be 02 | | CMP.B D2,D7 00025c84 62 28 |b( | BHI 0x25cae 00025c86 20 51 | Q | MOVEA.L (A1),A0 00025c88 20 bc 00 00 00 02 | | MOVE.L #0x2,(A0) 00025c8e 55 4f |UO | SUBQ.L #0x2,A7 00025c90 4e ba d1 f4 |N | JSR 0x22e86 00025c94 1e 1f | | MOVE.B (A7)+,D7 00025c96 be 01 | | CMP.B D1,D7 00025c98 65 0a |e | BCS 0x25ca4 00025c9a be 02 | | CMP.B D2,D7 00025c9c 62 06 |b | BHI 0x25ca4 00025c9e 55 4f |UO | SUBQ.L #0x2,A7 00025ca0 4e 93 |N | JSR (A3) 00025ca2 1c 1f | | MOVE.B (A7)+,D6 00025ca4 be 01 | | CMP.B D1,D7 00025ca6 65 04 |e | BCS 0x25cac 00025ca8 be 02 | | CMP.B D2,D7 00025caa 63 e2 |c | BLS 0x25c8e 00025cac 60 3a |`: | BRA 0x25ce8 00025cae 20 51 | Q | MOVEA.L (A1),A0 00025cb0 20 bc 00 00 00 03 | | MOVE.L #0x3,(A0) 00025cb6 7a 00 |z | MOVEQ.L #0x00,D5 00025cb8 55 4f |UO | SUBQ.L #0x2,A7 00025cba 4e ba d1 ca |N | JSR 0x22e86 00025cbe 1e 1f | | MOVE.B (A7)+,D7 00025cc0 be 03 | | CMP.B D3,D7 00025cc2 67 16 |g | BEQ 0x25cda 00025cc4 be 04 | | CMP.B D4,D7 00025cc6 67 12 |g | BEQ 0x25cda 00025cc8 0c 07 00 2f | / | CMPI.B #0x2f,D7 00025ccc 67 0c |g | BEQ 0x25cda 00025cce 0c 07 00 3d | = | CMPI.B #0x3d,D7 00025cd2 67 06 |g | BEQ 0x25cda 00025cd4 0c 07 00 5c | \ | CMPI.B #0x5c,D7 00025cd8 66 04 |f | BNE 0x25cde 00025cda 7a 01 |z | MOVEQ.L #0x01,D5 00025cdc 60 06 |` | BRA 0x25ce4 00025cde 55 4f |UO | SUBQ.L #0x2,A7 00025ce0 4e 93 |N | JSR (A3) 00025ce2 1c 1f | | MOVE.B (A7)+,D6 00025ce4 4a 05 |J | TST.B D5 00025ce6 67 d0 |g | BEQ 0x25cb8 00025ce8 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00025cec 20 ae ff fa | | MOVE.L (A6-0x6),(A0) 00025cf0 21 52 00 04 |!R | MOVE.L (A2),(A0+0x4) 00025cf4 53 a8 00 04 |S | SUBQ.L #0x1,(A0+0x4) 00025cf8 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 00025cfc 4e 5e |N^ | UNLK A6 00025cfe 4e 75 |Nu | RTS 00025d00 ; -------------------------------------------------------------------------------------- 00025d00 ; OMSI PASCAL Function 00025d00 ; <LVAR 0x00c 4(r)> 00025d00 ; <LVAR 0x008 4(r)> 00025d00 ; -------------------------------------------------------------------------------------- 00025d00 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 00025d04 bf d5 | | CMPA.L (A5),A7 00025d06 62 06 |b | BHI 0x25d0e 00025d08 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025d0c 4e 76 |Nv | TRAPV 00025d0e de fc 00 34 | 4 | ADDA.W #0x34,A7 00025d12 48 e7 c7 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 00025d16 45 ee 00 0c |E | LEA.L (A6+0xc),A2 00025d1a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00025d1e 2f 08 |/ | MOVE.L A0,-(A7) 00025d20 2c 39 00 02 79 7e |,9 y~ | MOVE.L 0x2797e,D6 00025d26 9c 92 | | SUB.L (A2),D6 00025d28 2a 12 |* | MOVE.L (A2),D5 00025d2a da 86 | | ADD.L D6,D5 00025d2c 30 10 |0 | MOVE.W (A0),D0 00025d2e 48 c0 |H | EXTW.L D0 00025d30 b0 86 | | CMP.L D6,D0 00025d32 67 0c |g | BEQ 0x25d40 00025d34 2f 05 |/ | MOVE.L D5,-(A7) 00025d36 2f 06 |/ | MOVE.L D6,-(A7) 00025d38 91 97 | | SUB.L D0,(A7) 00025d3a 4e ba d6 48 |N H | JSR 0x23384 00025d3e 50 4f |PO | ADDQ.L #0x8,A7 00025d40 2f 00 |/ | MOVE.L D0,-(A7) 00025d42 7e 01 |~ | MOVEQ.L #0x01,D7 00025d44 be 97 | | CMP.L (A7),D7 00025d46 6e 34 |n4 | BGT 0x25d7c 00025d48 20 12 | | MOVE.L (A2),D0 00025d4a d0 87 | | ADD.L D7,D0 00025d4c 53 80 |S | SUBQ.L #0x1,D0 00025d4e 53 80 |S | SUBQ.L #0x1,D0 00025d50 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 00025d56 63 02 |c | BLS 0x25d5a 00025d58 4e 4f |NO | TRAP #15 00025d5a 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 00025d60 22 07 |" | MOVE.L D7,D1 00025d62 53 81 |S | SUBQ.L #0x1,D1 00025d64 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00025d6a 63 02 |c | BLS 0x25d6e 00025d6c 4e 4f |NO | TRAP #15 00025d6e 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 00025d72 11 b1 18 02 08 08 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8) 00025d78 52 87 |R | ADDQ.L #0x1,D7 00025d7a 68 c8 |h | BVC 0x25d44 00025d7c 50 4f |PO | ADDQ.L #0x8,A7 00025d7e 4c df 07 e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2 00025d82 4e 5e |N^ | UNLK A6 00025d84 4e 75 |Nu | RTS 00025d86 ; -------------------------------------------------------------------------------------- 00025d86 ; OMSI PASCAL Function 00025d86 ; <LVAR 0x00c 4(r)> 00025d86 ; <LVAR 0x008 4(r)> 00025d86 ; <LVAR -0x008 @ 4(r)> 00025d86 ; <LVAR -0x00c @ 4(r)> 00025d86 ; <LVAR -0x010 4(r)> 00025d86 ; <LVAR -0x014 @ 4(r)> 00025d86 ; <LVAR -0x018 4(rw)> 00025d86 ; <LVAR -0x01c 4(rw)> 00025d86 ; <LVAR -0x020 4(rw)> 00025d86 ; <LVAR -0x024 4(rw)> 00025d86 ; <LVAR -0x028 4(rw)> 00025d86 ; <LVAR -0x034 4(rw)> 00025d86 ; -------------------------------------------------------------------------------------- 00025d86 4e 56 ff 70 |NV p | LINK.W A6,#0xff70 00025d8a bf d5 | | CMPA.L (A5),A7 00025d8c 62 06 |b | BHI 0x25d94 00025d8e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025d92 4e 76 |Nv | TRAPV 00025d94 de fc 00 5c | \ | ADDA.W #0x5c,A7 00025d98 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00025d9c 43 ee ff f8 |C | LEA.L (A6-0x8),A1 00025da0 45 ee ff ec |E | LEA.L (A6-0x14),A2 00025da4 47 ee ff dc |G | LEA.L (A6-0x24),A3 00025da8 49 ee ff e0 |I | LEA.L (A6-0x20),A4 00025dac 74 14 |t | MOVEQ.L #0x14,D2 00025dae 2d 79 00 02 79 7e ff d8 |-y y~ | MOVE.L 0x2797e,(A6-0x28) 00025db6 48 51 |HQ | PEA.L (A1) 00025db8 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00025dbe 58 4f |XO | ADDQ.L #0x4,A7 00025dc0 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00025dc4 48 52 |HR | PEA.L (A2) 00025dc6 4e ba fd f4 |N | JSR 0x25bbc 00025dca 50 4f |PO | ADDQ.L #0x8,A7 00025dcc 42 ae ff cc |B | CLR.L (A6-0x34) 00025dd0 7e 00 |~ | MOVEQ.L #0x00,D7 00025dd2 20 2e ff cc | . | MOVE.L (A6-0x34),D0 00025dd6 b0 82 | | CMP.L D2,D0 00025dd8 63 02 |c | BLS 0x25ddc 00025dda 4e 4e |NN | TRAP #14 00025ddc d0 40 | @ | ADD.W D0,D0 00025dde 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00025de6 00 2a | * | .CONST 0x2a ; [0x0] -> 0x25e10 00025de8 00 36 | 6 | .CONST 0x36 ; [0x1] -> 0x25e1c 00025dea 00 4c | L | .CONST 0x4c ; [0x2] -> 0x25e32 00025dec 00 6c | l | .CONST 0x6c ; [0x3] -> 0x25e52 00025dee 00 72 | r | .CONST 0x72 ; [0x4] -> 0x25e58 00025df0 00 82 | | .CONST 0x82 ; [0x5] -> 0x25e68 00025df2 00 98 | | .CONST 0x98 ; [0x6] -> 0x25e7e 00025df4 00 a0 | | .CONST 0xa0 ; [0x7] -> 0x25e86 00025df6 00 a2 | | .CONST 0xa2 ; [0x8] -> 0x25e88 00025df8 00 ba | | .CONST 0xba ; [0x9] -> 0x25ea0 00025dfa 00 ca | | .CONST 0xca ; [0xa] -> 0x25eb0 00025dfc 00 e4 | | .CONST 0xe4 ; [0xb] -> 0x25eca 00025dfe 00 f8 | | .CONST 0xf8 ; [0xc] -> 0x25ede 00025e00 01 0e | | .CONST 0x10e ; [0xd] -> 0x25ef4 00025e02 01 24 | $ | .CONST 0x124 ; [0xe] -> 0x25f0a 00025e04 01 26 | & | .CONST 0x126 ; [0xf] -> 0x25f0c 00025e06 01 40 | @ | .CONST 0x140 ; [0x10] -> 0x25f26 00025e08 01 56 | V | .CONST 0x156 ; [0x11] -> 0x25f3c 00025e0a 01 64 | d | .CONST 0x164 ; [0x12] -> 0x25f4a 00025e0c 01 66 | f | .CONST 0x166 ; [0x13] -> 0x25f4c 00025e0e 01 68 | h | .CONST 0x168 ; [0x14] -> 0x25f4e 00025e10 switch@0x25dde[0x0]: 00025e10 7c 00 || | MOVEQ.L #0x00,D6 00025e12 2a 2e 00 08 |*. | MOVE.L (A6+0x8),D5 00025e16 60 ff 00 00 01 60 |` ` | BRA 0x25f78 00025e1c switch@0x25dde[0x1]: 00025e1c 59 4f |YO | SUBQ.L #0x4,A7 00025e1e 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 00025e22 2f 12 |/ | MOVE.L (A2),-(A7) 00025e24 4e ba f8 6c |N l | JSR 0x25692 00025e28 50 4f |PO | ADDQ.L #0x8,A7 00025e2a 2c 1f |, | MOVE.L (A7)+,D6 00025e2c 60 ff 00 00 01 4a |` J | BRA 0x25f78 00025e32 switch@0x25dde[0x2]: 00025e32 2f 2e ff d8 |/. | MOVE.L (A6-0x28),-(A7) 00025e36 2f 06 |/ | MOVE.L D6,-(A7) 00025e38 2f 06 |/ | MOVE.L D6,-(A7) 00025e3a 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00025e3e 4e ba f8 ce |N | JSR 0x2570e 00025e42 de fc 00 10 | | ADDA.W #0x10,A7 00025e46 60 ff 00 00 01 8e |` | BRA 0x25fd6 00025e4c 60 ff 00 00 |` | .XXX[0x4] 00025e50 01 2a | * | .XXX[0x2] 00025e52 switch@0x25dde[0x3]: 00025e52 60 ff 00 00 01 24 |` $ | BRA 0x25f78 00025e58 switch@0x25dde[0x4]: 00025e58 2f 2e ff d8 |/. | MOVE.L (A6-0x28),-(A7) 00025e5c 2f 06 |/ | MOVE.L D6,-(A7) 00025e5e 2f 05 |/ | MOVE.L D5,-(A7) 00025e60 60 d8 |` | BRA 0x25e3a 00025e62 60 ff 00 00 01 14 |` | .XXX[0x6] 00025e68 switch@0x25dde[0x5]: 00025e68 59 4f |YO | SUBQ.L #0x4,A7 00025e6a 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 00025e6e 2f 12 |/ | MOVE.L (A2),-(A7) 00025e70 4e ba f8 20 |N | JSR 0x25692 00025e74 50 4f |PO | ADDQ.L #0x8,A7 00025e76 2a 1f |* | MOVE.L (A7)+,D5 00025e78 60 ff 00 00 00 fe |` | BRA 0x25f78 00025e7e switch@0x25dde[0x6]: 00025e7e 7c 01 || | MOVEQ.L #0x01,D6 00025e80 60 ff 00 00 00 f6 |` | BRA 0x25f78 00025e86 switch@0x25dde[0x7]: 00025e86 60 e0 |` | BRA switch@0x25dde[0x5] 00025e88 switch@0x25dde[0x8]: 00025e88 51 4f |QO | SUBQ.L #0x8,A7 00025e8a 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00025e8e 2f 06 |/ | MOVE.L D6,-(A7) 00025e90 4e ba db f6 |N | JSR 0x23a88 00025e94 50 4f |PO | ADDQ.L #0x8,A7 00025e96 26 9f |& | MOVE.L (A7)+,(A3) 00025e98 28 9f |( | MOVE.L (A7)+,(A4) 00025e9a 60 ff 00 00 00 dc |` | BRA 0x25f78 00025ea0 switch@0x25dde[0x9]: 00025ea0 2d 52 ff e4 |-R | MOVE.L (A2),(A6-0x1c) 00025ea4 2d 6e ff f0 ff e8 |-n | MOVE.L (A6-0x10),(A6-0x18) 00025eaa 60 ff 00 00 00 cc |` | BRA 0x25f78 00025eb0 switch@0x25dde[0xa]: 00025eb0 2f 11 |/ | MOVE.L (A1),-(A7) 00025eb2 2f 14 |/ | MOVE.L (A4),-(A7) 00025eb4 2f 13 |/ | MOVE.L (A3),-(A7) 00025eb6 2f 2e ff e8 |/. | MOVE.L (A6-0x18),-(A7) 00025eba 2f 2e ff e4 |/. | MOVE.L (A6-0x1c),-(A7) 00025ebe 4e ba fb 08 |N | JSR 0x259c8 00025ec2 de c2 | | ADDA.W D2,A7 00025ec4 60 ff 00 00 00 b2 |` | BRA 0x25f78 00025eca switch@0x25dde[0xb]: 00025eca 2f 11 |/ | MOVE.L (A1),-(A7) 00025ecc 2f 14 |/ | MOVE.L (A4),-(A7) 00025ece 2f 13 |/ | MOVE.L (A3),-(A7) 00025ed0 2f 2e ff e8 |/. | MOVE.L (A6-0x18),-(A7) 00025ed4 2f 2e ff e4 |/. | MOVE.L (A6-0x1c),-(A7) 00025ed8 4e ba fa 5a |N Z | JSR 0x25934 00025edc 60 e4 |` | BRA 0x25ec2 00025ede switch@0x25dde[0xc]: 00025ede 2f 11 |/ | MOVE.L (A1),-(A7) 00025ee0 2f 14 |/ | MOVE.L (A4),-(A7) 00025ee2 2f 13 |/ | MOVE.L (A3),-(A7) 00025ee4 4e ba fb 98 |N | JSR 0x25a7e 00025ee8 de fc 00 0c | | ADDA.W #0xc,A7 00025eec 7e 01 |~ | MOVEQ.L #0x01,D7 00025eee 60 ff 00 00 00 88 |` | BRA 0x25f78 00025ef4 switch@0x25dde[0xd]: 00025ef4 2f 11 |/ | MOVE.L (A1),-(A7) 00025ef6 2f 14 |/ | MOVE.L (A4),-(A7) 00025ef8 2f 13 |/ | MOVE.L (A3),-(A7) 00025efa 2f 2e ff e8 |/. | MOVE.L (A6-0x18),-(A7) 00025efe 2f 2e ff e4 |/. | MOVE.L (A6-0x1c),-(A7) 00025f02 4e ba fa 30 |N 0 | JSR 0x25934 00025f06 de c2 | | ADDA.W D2,A7 00025f08 60 e2 |` | BRA 0x25eec 00025f0a switch@0x25dde[0xe]: 00025f0a 60 e0 |` | BRA 0x25eec 00025f0c switch@0x25dde[0xf]: 00025f0c 2f 11 |/ | MOVE.L (A1),-(A7) 00025f0e 51 4f |QO | SUBQ.L #0x8,A7 00025f10 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00025f14 2f 06 |/ | MOVE.L D6,-(A7) 00025f16 4e ba db 70 |N p | JSR 0x23a88 00025f1a 50 4f |PO | ADDQ.L #0x8,A7 00025f1c 4e ba fb 60 |N ` | JSR 0x25a7e 00025f20 de fc 00 0c | | ADDA.W #0xc,A7 00025f24 60 52 |`R | BRA 0x25f78 00025f26 switch@0x25dde[0x10]: 00025f26 2f 11 |/ | MOVE.L (A1),-(A7) 00025f28 51 4f |QO | SUBQ.L #0x8,A7 00025f2a 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00025f2e 2f 06 |/ | MOVE.L D6,-(A7) 00025f30 4e ba db 56 |N V | JSR 0x23a88 00025f34 50 4f |PO | ADDQ.L #0x8,A7 00025f36 4e ba fb cc |N | JSR 0x25b04 00025f3a 60 ac |` | BRA 0x25ee8 00025f3c switch@0x25dde[0x11]: 00025f3c 2f 11 |/ | MOVE.L (A1),-(A7) 00025f3e 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 00025f42 2f 12 |/ | MOVE.L (A2),-(A7) 00025f44 4e ba fc 2e |N . | JSR 0x25b74 00025f48 60 d6 |` | BRA 0x25f20 00025f4a switch@0x25dde[0x12]: 00025f4a 60 2c |`, | BRA 0x25f78 00025f4c switch@0x25dde[0x13]: 00025f4c 60 9e |` | BRA 0x25eec 00025f4e switch@0x25dde[0x14]: 00025f4e 41 fa cb ee |A | LEA.L 0x22b3e,A0 00025f52 70 05 |p | MOVEQ.L #0x05,D0 00025f54 2f 20 |/ | MOVE.L -(A0),-(A7) 00025f56 51 c8 ff fc |Q | DBF D0,0x25f54 00025f5a 59 4f |YO | SUBQ.L #0x4,A7 00025f5c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00025f60 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025f64 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00025f68 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025f6e 50 4f |PO | ADDQ.L #0x8,A7 00025f70 4e ba ce b6 |N | JSR 0x22e28 00025f74 de fc 00 1c | | ADDA.W #0x1c,A7 00025f78 4a 07 |J | TST.B D7 00025f7a 66 46 |fF | BNE 0x25fc2 00025f7c 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00025f80 48 52 |HR | PEA.L (A2) 00025f82 4e ba fc 38 |N 8 | JSR 0x25bbc 00025f86 50 4f |PO | ADDQ.L #0x8,A7 00025f88 20 2e ff cc | . | MOVE.L (A6-0x34),D0 00025f8c 0c 80 00 00 00 13 | | CMPI.L #0x00000013,D0 00025f92 63 02 |c | BLS 0x25f96 00025f94 4e 4f |NO | TRAP #15 00025f96 28 00 |( | MOVE.L D0,D4 00025f98 76 07 |v | MOVEQ.L #0x07,D3 00025f9a 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00025fa0 41 fa cd b8 |A | LEA.L 0x22d5a,A0 00025fa4 20 2e ff f4 | . | MOVE.L (A6-0xc),D0 00025fa8 0c 80 00 00 00 06 | | CMPI.L #0x00000006,D0 00025fae 63 02 |c | BLS 0x25fb2 00025fb0 4e 4f |NO | TRAP #15 00025fb2 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0 00025fb6 12 30 08 00 | 0 | MOVE.B (A0+D0.L),D1 00025fba 48 81 |H | EXTB.W D1 00025fbc 48 c1 |H | EXTW.L D1 00025fbe 2d 41 ff cc |-A | MOVE.L D1,(A6-0x34) 00025fc2 4a 07 |J | TST.B D7 00025fc4 67 ff ff ff fe 0c |g | BEQ 0x25dd2 00025fca 2f 2e ff d8 |/. | MOVE.L (A6-0x28),-(A7) 00025fce 2f 11 |/ | MOVE.L (A1),-(A7) 00025fd0 4e ba fd 2e |N . | JSR 0x25d00 00025fd4 50 4f |PO | ADDQ.L #0x8,A7 00025fd6 48 51 |HQ | PEA.L (A1) 00025fd8 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00025fde 58 4f |XO | ADDQ.L #0x4,A7 00025fe0 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00025fe4 4e 5e |N^ | UNLK A6 00025fe6 4e 75 |Nu | RTS 00025fe8 ; -------------------------------------------------------------------------------------- 00025fe8 ; OMSI PASCAL Function 00025fe8 ; <LVAR 0x014 4(rw)> 00025fe8 ; <LVAR 0x010 4(r)> 00025fe8 ; <LVAR 0x00c 4(r)> 00025fe8 ; <LVAR 0x008 4(r)> 00025fe8 ; <LVAR -0x008 4(rw)> 00025fe8 ; <LVAR -0x00c 4(rw)> 00025fe8 ; <LVAR -0x018 4(w)> 00025fe8 ; -------------------------------------------------------------------------------------- 00025fe8 4e 56 ff 96 |NV | LINK.W A6,#0xff96 00025fec bf d5 | | CMPA.L (A5),A7 00025fee 62 06 |b | BHI 0x25ff6 00025ff0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025ff4 4e 76 |Nv | TRAPV 00025ff6 de fc 00 52 | R | ADDA.W #0x52,A7 00025ffa 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00025ffe 43 ee ff f8 |C | LEA.L (A6-0x8),A1 00026002 45 ee 00 10 |E | LEA.L (A6+0x10),A2 00026006 47 ee 00 0c |G | LEA.L (A6+0xc),A3 0002600a 49 ee ff f4 |I | LEA.L (A6-0xc),A4 0002600e 74 0c |t | MOVEQ.L #0x0c,D2 00026010 42 ae 00 14 |B | CLR.L (A6+0x14) 00026014 59 4f |YO | SUBQ.L #0x4,A7 00026016 2f 12 |/ | MOVE.L (A2),-(A7) 00026018 2f 13 |/ | MOVE.L (A3),-(A7) 0002601a 4e ba da 34 |N 4 | JSR 0x23a50 0002601e 50 4f |PO | ADDQ.L #0x8,A7 00026020 28 9f |( | MOVE.L (A7)+,(A4) 00026022 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00026026 30 10 |0 | MOVE.W (A0),D0 00026028 48 c0 |H | EXTW.L D0 0002602a 52 80 |R | ADDQ.L #0x1,D0 0002602c 22 80 |" | MOVE.L D0,(A1) 0002602e 44 80 |D | NEG.L D0 00026030 d0 94 | | ADD.L (A4),D0 00026032 52 80 |R | ADDQ.L #0x1,D0 00026034 2f 00 |/ | MOVE.L D0,-(A7) 00026036 70 01 |p | MOVEQ.L #0x01,D0 00026038 b0 97 | | CMP.L (A7),D0 0002603a 6e ff 00 00 00 9e |n | BGT 0x260da 00026040 2d 40 ff e8 |-@ | MOVE.L D0,(A6-0x18) 00026044 2f 00 |/ | MOVE.L D0,-(A7) 00026046 7c 00 || | MOVEQ.L #0x00,D6 00026048 2f 11 |/ | MOVE.L (A1),-(A7) 0002604a 7a 01 |z | MOVEQ.L #0x01,D5 0002604c ba 97 | | CMP.L (A7),D5 0002604e 6e 48 |nH | BGT 0x26098 00026050 0c 85 00 00 00 01 | | CMPI.L #0x00000001,D5 00026056 66 04 |f | BNE 0x2605c 00026058 7e 2f |~/ | MOVEQ.L #0x2f,D7 0002605a 60 18 |` | BRA 0x26074 0002605c 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00026060 20 05 | | MOVE.L D5,D0 00026062 53 80 |S | SUBQ.L #0x1,D0 00026064 53 80 |S | SUBQ.L #0x1,D0 00026066 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 0002606c 63 02 |c | BLS 0x26070 0002606e 4e 4f |NO | TRAP #15 00026070 1e 30 08 02 | 0 | MOVE.B (A0+D0.L+#0x2),D7 00026074 55 4f |UO | SUBQ.L #0x2,A7 00026076 2f 12 |/ | MOVE.L (A2),-(A7) 00026078 2f 13 |/ | MOVE.L (A3),-(A7) 0002607a 20 2f 00 0e | / | MOVE.L (A7+0xe),D0 0002607e d0 85 | | ADD.L D5,D0 00026080 53 80 |S | SUBQ.L #0x1,D0 00026082 2f 00 |/ | MOVE.L D0,-(A7) 00026084 4e ba f5 cc |N | JSR 0x25652 00026088 de c2 | | ADDA.W D2,A7 0002608a be 1f | | CMP.B (A7)+,D7 0002608c 67 04 |g | BEQ 0x26092 0002608e 58 4f |XO | ADDQ.L #0x4,A7 00026090 60 08 |` | BRA 0x2609a 00026092 2c 05 |, | MOVE.L D5,D6 00026094 52 85 |R | ADDQ.L #0x1,D5 00026096 68 b4 |h | BVC 0x2604c 00026098 58 4f |XO | ADDQ.L #0x4,A7 0002609a bc 91 | | CMP.L (A1),D6 0002609c 66 32 |f2 | BNE 0x260d0 0002609e 20 17 | | MOVE.L (A7),D0 000260a0 22 00 |" | MOVE.L D0,D1 000260a2 d2 91 | | ADD.L (A1),D1 000260a4 b2 94 | | CMP.L (A4),D1 000260a6 6c 26 |l& | BGE 0x260ce 000260a8 55 4f |UO | SUBQ.L #0x2,A7 000260aa 2f 12 |/ | MOVE.L (A2),-(A7) 000260ac 2f 13 |/ | MOVE.L (A3),-(A7) 000260ae 2f 01 |/ | MOVE.L D1,-(A7) 000260b0 4e ba f5 a0 |N | JSR 0x25652 000260b4 de c2 | | ADDA.W D2,A7 000260b6 1e 1f | | MOVE.B (A7)+,D7 000260b8 0c 07 00 2f | / | CMPI.B #0x2f,D7 000260bc 67 06 |g | BEQ 0x260c4 000260be 0c 07 00 3d | = | CMPI.B #0x3d,D7 000260c2 66 08 |f | BNE 0x260cc 000260c4 2d 40 00 14 |-@ | MOVE.L D0,(A6+0x14) 000260c8 50 4f |PO | ADDQ.L #0x8,A7 000260ca 60 10 |` | BRA 0x260dc 000260cc 60 02 |` | BRA 0x260d0 000260ce 60 f4 |` | BRA 0x260c4 000260d0 20 1f | | MOVE.L (A7)+,D0 000260d2 52 80 |R | ADDQ.L #0x1,D0 000260d4 68 ff ff ff ff 62 |h b | BVC 0x26038 000260da 58 4f |XO | ADDQ.L #0x4,A7 000260dc 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 000260e0 4e 5e |N^ | UNLK A6 000260e2 4e 75 |Nu | RTS 000260e4 ; -------------------------------------------------------------------------------------- 000260e4 ; OMSI PASCAL Function 000260e4 ; <LVAR 0x018 4(r)> 000260e4 ; <LVAR 0x014 4(r)> 000260e4 ; <LVAR 0x010 4(r)> 000260e4 ; <LVAR 0x00c 4(r)> 000260e4 ; <LVAR 0x008 4(r)> 000260e4 ; <LVAR -0x008 4(rw)> 000260e4 ; <LVAR -0x014 4(rw)> 000260e4 ; <LVAR -0x018 4(rw)> 000260e4 ; <LVAR -0x01c 4(rw)> 000260e4 ; -------------------------------------------------------------------------------------- 000260e4 4e 56 ff 8e |NV | LINK.W A6,#0xff8e 000260e8 bf d5 | | CMPA.L (A5),A7 000260ea 62 06 |b | BHI 0x260f2 000260ec 44 fc 00 02 |D | MOVE.W #0x2,CCR 000260f0 4e 76 |Nv | TRAPV 000260f2 de fc 00 56 | V | ADDA.W #0x56,A7 000260f6 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 000260fa 45 ee ff e4 |E | LEA.L (A6-0x1c),A2 000260fe 47 ee ff e8 |G | LEA.L (A6-0x18),A3 00026102 49 ee ff f8 |I | LEA.L (A6-0x8),A4 00026106 72 0c |r | MOVEQ.L #0x0c,D1 00026108 74 01 |t | MOVEQ.L #0x01,D2 0002610a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002610e 42 10 |B | CLR.B (A0) 00026110 22 6e 00 0c |"n | MOVEA.L (A6+0xc),A1 00026114 22 82 |" | MOVE.L D2,(A1) 00026116 51 4f |QO | SUBQ.L #0x8,A7 00026118 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 0002611c 2f 2e 00 14 |/. | MOVE.L (A6+0x14),-(A7) 00026120 4e ba d9 66 |N f | JSR 0x23a88 00026124 50 4f |PO | ADDQ.L #0x8,A7 00026126 24 9f |$ | MOVE.L (A7)+,(A2) 00026128 26 9f |& | MOVE.L (A7)+,(A3) 0002612a 4a 92 |J | TST.L (A2) 0002612c 67 ff 00 00 00 98 |g | BEQ 0x261c6 00026132 59 4f |YO | SUBQ.L #0x4,A7 00026134 2f 13 |/ | MOVE.L (A3),-(A7) 00026136 2f 12 |/ | MOVE.L (A2),-(A7) 00026138 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 0002613c 4e ba fe aa |N | JSR 0x25fe8 00026140 de c1 | | ADDA.W D1,A7 00026142 2d 5f ff ec |-_ | MOVE.L (A7)+,(A6-0x14) 00026146 67 7e |g~ | BEQ 0x261c6 00026148 10 82 | | MOVE.B D2,(A0) 0002614a 48 51 |HQ | PEA.L (A1) 0002614c 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00026152 2f 13 |/ | MOVE.L (A3),-(A7) 00026154 2f 12 |/ | MOVE.L (A2),-(A7) 00026156 4e ba d8 f8 |N | JSR 0x23a50 0002615a 50 4f |PO | ADDQ.L #0x8,A7 0002615c 28 9f |( | MOVE.L (A7)+,(A4) 0002615e 20 2e ff ec | . | MOVE.L (A6-0x14),D0 00026162 52 80 |R | ADDQ.L #0x1,D0 00026164 2f 14 |/ | MOVE.L (A4),-(A7) 00026166 2a 00 |* | MOVE.L D0,D5 00026168 ba 97 | | CMP.L (A7),D5 0002616a 6e 58 |nX | BGT 0x261c4 0002616c 55 4f |UO | SUBQ.L #0x2,A7 0002616e 2f 13 |/ | MOVE.L (A3),-(A7) 00026170 2f 12 |/ | MOVE.L (A2),-(A7) 00026172 2f 05 |/ | MOVE.L D5,-(A7) 00026174 4e ba f4 dc |N | JSR 0x25652 00026178 de c1 | | ADDA.W D1,A7 0002617a 10 1f | | MOVE.B (A7)+,D0 0002617c 0c 00 00 3d | = | CMPI.B #0x3d,D0 00026180 66 3e |f> | BNE 0x261c0 00026182 20 05 | | MOVE.L D5,D0 00026184 52 80 |R | ADDQ.L #0x1,D0 00026186 2f 14 |/ | MOVE.L (A4),-(A7) 00026188 2e 00 |. | MOVE.L D0,D7 0002618a be 97 | | CMP.L (A7),D7 0002618c 6e 2e |n. | BGT 0x261bc 0002618e 55 4f |UO | SUBQ.L #0x2,A7 00026190 2f 13 |/ | MOVE.L (A3),-(A7) 00026192 2f 12 |/ | MOVE.L (A2),-(A7) 00026194 2f 07 |/ | MOVE.L D7,-(A7) 00026196 4e ba f4 ba |N | JSR 0x25652 0002619a de c1 | | ADDA.W D1,A7 0002619c 1c 1f | | MOVE.B (A7)+,D6 0002619e 0c 06 00 2f | / | CMPI.B #0x2f,D6 000261a2 66 04 |f | BNE 0x261a8 000261a4 50 4f |PO | ADDQ.L #0x8,A7 000261a6 60 1e |` | BRA 0x261c6 000261a8 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000261ac 2f 10 |/ | MOVE.L (A0),-(A7) 000261ae 1f 06 | | MOVE.B D6,-(A7) 000261b0 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000261b6 5c 4f |\O | ADDQ.L #0x6,A7 000261b8 52 87 |R | ADDQ.L #0x1,D7 000261ba 68 ce |h | BVC 0x2618a 000261bc 50 4f |PO | ADDQ.L #0x8,A7 000261be 60 06 |` | BRA 0x261c6 000261c0 52 85 |R | ADDQ.L #0x1,D5 000261c2 68 a4 |h | BVC 0x26168 000261c4 58 4f |XO | ADDQ.L #0x4,A7 000261c6 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 000261ca 4e 5e |N^ | UNLK A6 000261cc 4e 75 |Nu | RTS 000261ce ; -------------------------------------------------------------------------------------- 000261ce ; OMSI PASCAL Function 000261ce ; <LVAR 0x00c @ 4(r)> 000261ce ; <LVAR 0x008 4(r)> 000261ce ; <LVAR -0x010 @ 1(r)> 000261ce ; -------------------------------------------------------------------------------------- 000261ce 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 000261d2 bf d5 | | CMPA.L (A5),A7 000261d4 62 06 |b | BHI 0x261dc 000261d6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000261da 4e 76 |Nv | TRAPV 000261dc de fc 00 30 | 0 | ADDA.W #0x30,A7 000261e0 48 e7 87 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D0,-(A7) 000261e4 43 f9 00 02 79 7e |C y~ | LEA.L 0x2797e,A1 000261ea 45 ee 00 08 |E | LEA.L (A6+0x8),A2 000261ee 47 ee 00 0c |G | LEA.L (A6+0xc),A3 000261f2 2f 13 |/ | MOVE.L (A3),-(A7) 000261f4 2f 12 |/ | MOVE.L (A2),-(A7) 000261f6 48 6e ff f0 |Hn | PEA.L (A6-0x10) 000261fa 4e b9 00 02 25 dc |N % | JSR DISPATCH_CMDS(?) 00026200 de fc 00 0c | | ADDA.W #0xc,A7 00026204 4a 2e ff f0 |J. | TST.B (A6-0x10) 00026208 66 50 |fP | BNE 0x2625a 0002620a 2e 11 |. | MOVE.L (A1),D7 0002620c 59 4f |YO | SUBQ.L #0x4,A7 0002620e 2f 12 |/ | MOVE.L (A2),-(A7) 00026210 4e ba d0 2a |N * | JSR 0x2323c 00026214 58 4f |XO | ADDQ.L #0x4,A7 00026216 2c 1f |, | MOVE.L (A7)+,D6 00026218 2f 13 |/ | MOVE.L (A3),-(A7) 0002621a 2f 12 |/ | MOVE.L (A2),-(A7) 0002621c 4e ba f2 f8 |N | JSR TRY_SCRIPT_FILE(?) 00026220 50 4f |PO | ADDQ.L #0x8,A7 00026222 2a 11 |* | MOVE.L (A1),D5 00026224 20 07 | | MOVE.L D7,D0 00026226 53 80 |S | SUBQ.L #0x1,D0 00026228 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 0002622e 63 02 |c | BLS 0x26232 00026230 4e 4f |NO | TRAP #15 00026232 41 f9 00 02 69 76 |A iv | LEA.L 0x26976,A0 00026238 10 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D0 0002623c 0c 00 00 25 | % | CMPI.B #0x25,D0 00026240 66 0c |f | BNE 0x2624e 00026242 22 87 |" | MOVE.L D7,(A1) 00026244 2f 12 |/ | MOVE.L (A2),-(A7) 00026246 2f 06 |/ | MOVE.L D6,-(A7) 00026248 4e ba fb 3c |N < | JSR 0x25d86 0002624c 50 4f |PO | ADDQ.L #0x8,A7 0002624e 52 87 |R | ADDQ.L #0x1,D7 00026250 be b9 00 02 79 82 | y | CMP.L eval_buffer?,D7 00026256 6f cc |o | BLE 0x26224 00026258 22 85 |" | MOVE.L D5,(A1) 0002625a 48 53 |HS | PEA.L (A3) 0002625c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00026262 58 4f |XO | ADDQ.L #0x4,A7 00026264 4c df 0f e1 |L | MOVEM.L (A7)+,D0+D5+D6+D7+A0+A1+A2+A3 00026268 4e 5e |N^ | UNLK A6 0002626a 4e 75 |Nu | RTS 0002626c ; -------------------------------------------------------------------------------------- 0002626c ; OMSI PASCAL Function 0002626c ; <LVAR -0x006 @ 4(r)> 0002626c ; <LVAR -0x00a @ 4(rw)> 0002626c ; <LVAR -0x00b 1(w)> 0002626c ; <LVAR -0x00c @ 1(r)> 0002626c ; -------------------------------------------------------------------------------------- 0002626c 4e 56 ff 94 |NV | LINK.W A6,#0xff94 00026270 bf d5 | | CMPA.L (A5),A7 00026272 62 06 |b | BHI 0x2627a 00026274 44 fc 00 02 |D | MOVE.W #0x2,CCR 00026278 4e 76 |Nv | TRAPV 0002627a de fc 00 54 | T | ADDA.W #0x54,A7 0002627e 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00026282 45 ee ff fa |E | LEA.L (A6-0x6),A2 00026286 47 f9 00 02 79 7e |G y~ | LEA.L 0x2797e,A3 0002628c 49 ee ff f6 |I | LEA.L (A6-0xa),A4 00026290 2e 13 |. | MOVE.L (A3),D7 00026292 48 52 |HR | PEA.L (A2) 00026294 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00026298 4e ba ce f6 |N | JSR 0x23190 0002629c 50 4f |PO | ADDQ.L #0x8,A7 0002629e 2c 13 |, | MOVE.L (A3),D6 000262a0 59 4f |YO | SUBQ.L #0x4,A7 000262a2 2f 12 |/ | MOVE.L (A2),-(A7) 000262a4 4e ba cf 96 |N | JSR 0x2323c 000262a8 58 4f |XO | ADDQ.L #0x4,A7 000262aa 20 1f | | MOVE.L (A7)+,D0 000262ac 0c 80 ff ff ff ff | | CMPI.L #0xffffffff,D0 000262b2 67 ff 00 00 02 ea |g | BEQ 0x2659e 000262b8 59 4f |YO | SUBQ.L #0x4,A7 000262ba 2f 12 |/ | MOVE.L (A2),-(A7) 000262bc 48 78 00 00 |Hx | PEA.L 0x0 000262c0 4e ba d8 a4 |N | JSR 0x23b66 000262c4 50 4f |PO | ADDQ.L #0x8,A7 000262c6 28 97 |( | MOVE.L (A7),(A4) 000262c8 54 4f |TO | ADDQ.L #0x2,A7 000262ca 2f 14 |/ | MOVE.L (A4),-(A7) 000262cc 4e ba f1 8c |N | JSR 0x2545a 000262d0 58 4f |XO | ADDQ.L #0x4,A7 000262d2 10 1f | | MOVE.B (A7)+,D0 000262d4 48 80 |H | EXTB.W D0 000262d6 41 bc 00 2b |A + | CHK.W #0x2b,D0 000262da 1d 40 ff f5 | @ | MOVE.B D0,(A6-0xb) 000262de 4a 00 |J | TST.B D0 000262e0 66 10 |f | BNE 0x262f2 000262e2 2f 14 |/ | MOVE.L (A4),-(A7) 000262e4 2f 12 |/ | MOVE.L (A2),-(A7) 000262e6 4e ba fe e6 |N | JSR 0x261ce 000262ea 50 4f |PO | ADDQ.L #0x8,A7 000262ec 60 ff 00 00 02 a8 |` | BRA 0x26596 000262f2 48 54 |HT | PEA.L (A4) 000262f4 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000262fa 58 4f |XO | ADDQ.L #0x4,A7 000262fc 12 00 | | MOVE.B D0,D1 000262fe 48 81 |H | EXTB.W D1 00026300 43 bc 00 2b |C + | CHK.W #0x2b,D1 00026304 41 fa ca 24 |A $ | LEA.L 0x22d2a,A0 00026308 30 01 |0 | MOVE.W D1,D0 0002630a 48 c0 |H | EXTW.L D0 0002630c 24 00 |$ | MOVE.L D0,D2 0002630e e2 9a | | ROR.L #0x1,D2 00026310 d0 c2 | | ADDA.W D2,A0 00026312 48 42 |HB | SWAP.W D2 00026314 e7 5a | Z | ROL.W #0x3,D2 00026316 42 83 |B | CLR.L D3 00026318 16 10 | | MOVE.B (A0),D3 0002631a e5 2b | + | LSL.B D2,D3 0002631c e8 0b | | LSR.B #0x4,D3 0002631e 2a 03 |* | MOVE.L D3,D5 00026320 0c 85 00 00 00 0f | | CMPI.L #0x0000000f,D5 00026326 67 2c |g, | BEQ 0x26354 00026328 28 00 |( | MOVE.L D0,D4 0002632a 76 0a |v | MOVEQ.L #0x0a,D3 0002632c 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00026332 41 fa c8 28 |A ( | LEA.L COMMAND_TABLE_22b5c,A0 00026336 9e fc 00 0a | | SUBA.W #0xa,A7 0002633a 22 4f |"O | MOVEA.L A7,A1 0002633c 41 f0 40 00 |A @ | LEA.L (A0+D4.W),A0 00026340 70 09 |p | MOVEQ.L #0x09,D0 00026342 12 d8 | | MOVE.B (A0)+,(A1)+ 00026344 51 c8 ff fc |Q | DBF D0,0x26342 00026348 2f 12 |/ | MOVE.L (A2),-(A7) 0002634a 2f 05 |/ | MOVE.L D5,-(A7) 0002634c 4e ba cf 24 |N $ | JSR 0x23272 00026350 de fc 00 12 | | ADDA.W #0x12,A7 00026354 53 41 |SA | SUBQ.W #0x1,D1 00026356 0c 41 00 2a | A * | CMPI.W #0x002a,D1 0002635a 63 02 |c | BLS 0x2635e 0002635c 4e 4e |NN | TRAP #14 0002635e d2 41 | A | ADD.W D1,D1 00026360 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W 00026368 00 56 | V | .CONST 0x56 ; [0x0] -> 0x263be 0002636a 00 64 | d | .CONST 0x64 ; [0x1] -> 0x263cc 0002636c 00 78 | x | .CONST 0x78 ; [0x2] -> 0x263e0 0002636e 00 86 | | .CONST 0x86 ; [0x3] -> 0x263ee 00026370 02 20 | | .CONST 0x220 ; [0x4] -> 0x26588 00026372 00 8e | | .CONST 0x8e ; [0x5] -> 0x263f6 00026374 00 94 | | .CONST 0x94 ; [0x6] -> 0x263fc 00026376 00 9c | | .CONST 0x9c ; [0x7] -> 0x26404 00026378 00 a4 | | .CONST 0xa4 ; [0x8] -> 0x2640c 0002637a 00 ac | | .CONST 0xac ; [0x9] -> 0x26414 0002637c 00 b4 | | .CONST 0xb4 ; [0xa] -> 0x2641c 0002637e 00 bc | | .CONST 0xbc ; [0xb] -> 0x26424 00026380 00 c4 | | .CONST 0xc4 ; [0xc] -> 0x2642c 00026382 00 cc | | .CONST 0xcc ; [0xd] -> 0x26434 00026384 00 d4 | | .CONST 0xd4 ; [0xe] -> 0x2643c 00026386 00 dc | | .CONST 0xdc ; [0xf] -> 0x26444 00026388 00 e8 | | .CONST 0xe8 ; [0x10] -> 0x26450 0002638a 00 f4 | | .CONST 0xf4 ; [0x11] -> 0x2645c 0002638c 01 00 | | .CONST 0x100 ; [0x12] -> 0x26468 0002638e 01 0c | | .CONST 0x10c ; [0x13] -> 0x26474 00026390 01 18 | | .CONST 0x118 ; [0x14] -> 0x26480 00026392 01 24 | $ | .CONST 0x124 ; [0x15] -> 0x2648c 00026394 01 30 | 0 | .CONST 0x130 ; [0x16] -> 0x26498 00026396 01 3c | < | .CONST 0x13c ; [0x17] -> 0x264a4 00026398 01 48 | H | .CONST 0x148 ; [0x18] -> 0x264b0 0002639a 01 54 | T | .CONST 0x154 ; [0x19] -> 0x264bc 0002639c 01 60 | ` | .CONST 0x160 ; [0x1a] -> 0x264c8 0002639e 01 6c | l | .CONST 0x16c ; [0x1b] -> 0x264d4 000263a0 01 78 | x | .CONST 0x178 ; [0x1c] -> 0x264e0 000263a2 01 84 | | .CONST 0x184 ; [0x1d] -> 0x264ec 000263a4 01 90 | | .CONST 0x190 ; [0x1e] -> 0x264f8 000263a6 01 9c | | .CONST 0x19c ; [0x1f] -> 0x26504 000263a8 01 a8 | | .CONST 0x1a8 ; [0x20] -> 0x26510 000263aa 01 b4 | | .CONST 0x1b4 ; [0x21] -> 0x2651c 000263ac 01 c0 | | .CONST 0x1c0 ; [0x22] -> 0x26528 000263ae 01 cc | | .CONST 0x1cc ; [0x23] -> 0x26534 000263b0 01 d8 | | .CONST 0x1d8 ; [0x24] -> 0x26540 000263b2 01 e4 | | .CONST 0x1e4 ; [0x25] -> 0x2654c 000263b4 01 ea | | .CONST 0x1ea ; [0x26] -> 0x26552 000263b6 01 f6 | | .CONST 0x1f6 ; [0x27] -> 0x2655e 000263b8 02 02 | | .CONST 0x202 ; [0x28] -> 0x2656a 000263ba 02 0e | | .CONST 0x20e ; [0x29] -> 0x26576 000263bc 02 14 | | .CONST 0x214 ; [0x2a] -> 0x2657c 000263be switch@0x26360[0x0]: 000263be 2f 12 |/ | MOVE.L (A2),-(A7) 000263c0 4e ba d9 2c |N , | JSR 0x23cee 000263c4 58 4f |XO | ADDQ.L #0x4,A7 000263c6 60 ff 00 00 01 ce |` | BRA 0x26596 000263cc switch@0x26360[0x1]: 000263cc 42 27 |B' | CLR.B -(A7) 000263ce 48 78 00 01 |Hx | PEA.L 0x1 000263d2 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000263d8 5c 4f |\O | ADDQ.L #0x6,A7 000263da 60 ff 00 00 01 ba |` | BRA 0x26596 000263e0 switch@0x26360[0x2]: 000263e0 59 4f |YO | SUBQ.L #0x4,A7 000263e2 4e b9 00 01 02 ac |N | JSR FSCALL_102ac 000263e8 4e ba d8 da |N | JSR 0x23cc4 000263ec 60 d6 |` | BRA 0x263c4 000263ee switch@0x26360[0x3]: 000263ee 2f 12 |/ | MOVE.L (A2),-(A7) 000263f0 4e ba da da |N | JSR 0x23ecc 000263f4 60 ce |` | BRA 0x263c4 000263f6 switch@0x26360[0x5]: 000263f6 60 ff 00 00 01 9e |` | BRA 0x26596 000263fc switch@0x26360[0x6]: 000263fc 2f 12 |/ | MOVE.L (A2),-(A7) 000263fe 4e ba dd f2 |N | JSR 0x241f2 00026402 60 c0 |` | BRA 0x263c4 00026404 switch@0x26360[0x7]: 00026404 2f 12 |/ | MOVE.L (A2),-(A7) 00026406 4e ba df 5c |N \ | JSR 0x24364 0002640a 60 b8 |` | BRA 0x263c4 0002640c switch@0x26360[0x8]: 0002640c 2f 12 |/ | MOVE.L (A2),-(A7) 0002640e 4e ba e0 42 |N B | JSR 0x24452 00026412 60 b0 |` | BRA 0x263c4 00026414 switch@0x26360[0x9]: 00026414 2f 12 |/ | MOVE.L (A2),-(A7) 00026416 4e ba e4 36 |N 6 | JSR 0x2484e 0002641a 60 a8 |` | BRA 0x263c4 0002641c switch@0x26360[0xa]: 0002641c 2f 12 |/ | MOVE.L (A2),-(A7) 0002641e 4e ba e4 a6 |N | JSR 0x248c6 00026422 60 a0 |` | BRA 0x263c4 00026424 switch@0x26360[0xb]: 00026424 2f 12 |/ | MOVE.L (A2),-(A7) 00026426 4e ba e5 16 |N | JSR 0x2493e 0002642a 60 98 |` | BRA 0x263c4 0002642c switch@0x26360[0xc]: 0002642c 2f 12 |/ | MOVE.L (A2),-(A7) 0002642e 4e ba e5 3a |N : | JSR 0x2496a 00026432 60 90 |` | BRA 0x263c4 00026434 switch@0x26360[0xd]: 00026434 2f 12 |/ | MOVE.L (A2),-(A7) 00026436 4e ba e6 32 |N 2 | JSR 0x24a6a 0002643a 60 88 |` | BRA 0x263c4 0002643c switch@0x26360[0xe]: 0002643c 2f 12 |/ | MOVE.L (A2),-(A7) 0002643e 4e ba e7 10 |N | JSR 0x24b50 00026442 60 80 |` | BRA 0x263c4 00026444 switch@0x26360[0xf]: 00026444 2f 12 |/ | MOVE.L (A2),-(A7) 00026446 4e ba e7 34 |N 4 | JSR 0x24b7c 0002644a 60 ff ff ff ff 78 |` x | BRA 0x263c4 00026450 switch@0x26360[0x10]: 00026450 2f 12 |/ | MOVE.L (A2),-(A7) 00026452 4e ba e7 74 |N t | JSR 0x24bc8 00026456 60 ff ff ff ff 6c |` l | BRA 0x263c4 0002645c switch@0x26360[0x11]: 0002645c 2f 12 |/ | MOVE.L (A2),-(A7) 0002645e 4e ba e7 b4 |N | JSR 0x24c14 00026462 60 ff ff ff ff 60 |` ` | BRA 0x263c4 00026468 switch@0x26360[0x12]: 00026468 2f 12 |/ | MOVE.L (A2),-(A7) 0002646a 4e ba e7 f4 |N | JSR 0x24c60 0002646e 60 ff ff ff ff 54 |` T | BRA 0x263c4 00026474 switch@0x26360[0x13]: 00026474 2f 12 |/ | MOVE.L (A2),-(A7) 00026476 4e ba e8 34 |N 4 | JSR 0x24cac 0002647a 60 ff ff ff ff 48 |` H | BRA 0x263c4 00026480 switch@0x26360[0x14]: 00026480 2f 12 |/ | MOVE.L (A2),-(A7) 00026482 4e ba e8 74 |N t | JSR 0x24cf8 00026486 60 ff ff ff ff 3c |` < | BRA 0x263c4 0002648c switch@0x26360[0x15]: 0002648c 2f 12 |/ | MOVE.L (A2),-(A7) 0002648e 4e ba e8 b4 |N | JSR 0x24d44 00026492 60 ff ff ff ff 30 |` 0 | BRA 0x263c4 00026498 switch@0x26360[0x16]: 00026498 2f 12 |/ | MOVE.L (A2),-(A7) 0002649a 4e ba e8 f2 |N | JSR 0x24d8e 0002649e 60 ff ff ff ff 24 |` $ | BRA 0x263c4 000264a4 switch@0x26360[0x17]: 000264a4 2f 12 |/ | MOVE.L (A2),-(A7) 000264a6 4e ba e9 30 |N 0 | JSR 0x24dd8 000264aa 60 ff ff ff ff 18 |` | BRA 0x263c4 000264b0 switch@0x26360[0x18]: 000264b0 2f 12 |/ | MOVE.L (A2),-(A7) 000264b2 4e ba e9 6e |N n | JSR 0x24e22 000264b6 60 ff ff ff ff 0c |` | BRA 0x263c4 000264bc switch@0x26360[0x19]: 000264bc 2f 12 |/ | MOVE.L (A2),-(A7) 000264be 4e ba e9 ac |N | JSR 0x24e6c 000264c2 60 ff ff ff ff 00 |` | BRA 0x263c4 000264c8 switch@0x26360[0x1a]: 000264c8 2f 12 |/ | MOVE.L (A2),-(A7) 000264ca 4e ba e9 ea |N | JSR 0x24eb6 000264ce 60 ff ff ff fe f4 |` | BRA 0x263c4 000264d4 switch@0x26360[0x1b]: 000264d4 2f 12 |/ | MOVE.L (A2),-(A7) 000264d6 4e ba ea 28 |N ( | JSR 0x24f00 000264da 60 ff ff ff fe e8 |` | BRA 0x263c4 000264e0 switch@0x26360[0x1c]: 000264e0 2f 12 |/ | MOVE.L (A2),-(A7) 000264e2 4e ba ea 66 |N f | JSR 0x24f4a 000264e6 60 ff ff ff fe dc |` | BRA 0x263c4 000264ec switch@0x26360[0x1d]: 000264ec 2f 12 |/ | MOVE.L (A2),-(A7) 000264ee 4e ba ea a4 |N | JSR 0x24f94 000264f2 60 ff ff ff fe d0 |` | BRA 0x263c4 000264f8 switch@0x26360[0x1e]: 000264f8 2f 12 |/ | MOVE.L (A2),-(A7) 000264fa 4e ba ea dc |N | JSR 0x24fd8 000264fe 60 ff ff ff fe c4 |` | BRA 0x263c4 00026504 switch@0x26360[0x1f]: 00026504 2f 12 |/ | MOVE.L (A2),-(A7) 00026506 4e ba eb 16 |N | JSR 0x2501e 0002650a 60 ff ff ff fe b8 |` | BRA 0x263c4 00026510 switch@0x26360[0x20]: 00026510 2f 12 |/ | MOVE.L (A2),-(A7) 00026512 4e ba eb 40 |N @ | JSR 0x25054 00026516 60 ff ff ff fe ac |` | BRA 0x263c4 0002651c switch@0x26360[0x21]: 0002651c 2f 12 |/ | MOVE.L (A2),-(A7) 0002651e 4e ba eb c4 |N | JSR 0x250e4 00026522 60 ff ff ff fe a0 |` | BRA 0x263c4 00026528 switch@0x26360[0x22]: 00026528 2f 12 |/ | MOVE.L (A2),-(A7) 0002652a 4e ba ec 2a |N * | JSR 0x25156 0002652e 60 ff ff ff fe 94 |` | BRA 0x263c4 00026534 switch@0x26360[0x23]: 00026534 2f 12 |/ | MOVE.L (A2),-(A7) 00026536 4e ba df 7c |N | | JSR 0x244b4 0002653a 60 ff ff ff fe 88 |` | BRA 0x263c4 00026540 switch@0x26360[0x24]: 00026540 2f 12 |/ | MOVE.L (A2),-(A7) 00026542 4e ba df da |N | JSR 0x2451e 00026546 60 ff ff ff fe 7c |` | | BRA 0x263c4 0002654c switch@0x26360[0x25]: 0002654c 4e ba df a2 |N | JSR 0x244f0 00026550 60 44 |`D | BRA 0x26596 00026552 switch@0x26360[0x26]: 00026552 2f 12 |/ | MOVE.L (A2),-(A7) 00026554 4e ba ec 72 |N r | JSR 0x251c8 00026558 60 ff ff ff fe 6a |` j | BRA 0x263c4 0002655e switch@0x26360[0x27]: 0002655e 2f 12 |/ | MOVE.L (A2),-(A7) 00026560 4e ba ec e8 |N | JSR 0x2524a 00026564 60 ff ff ff fe 5e |` ^ | BRA 0x263c4 0002656a switch@0x26360[0x28]: 0002656a 2f 12 |/ | MOVE.L (A2),-(A7) 0002656c 4e ba ed 5c |N \ | JSR 0x252ca 00026570 60 ff ff ff fe 52 |` R | BRA 0x263c4 00026576 switch@0x26360[0x29]: 00026576 4e ba ee 16 |N | JSR 0x2538e 0002657a 60 1a |` | BRA 0x26596 0002657c switch@0x26360[0x2a]: 0002657c 2f 12 |/ | MOVE.L (A2),-(A7) 0002657e 4e ba ee 2e |N . | JSR 0x253ae 00026582 60 ff ff ff fe 40 |` @ | BRA 0x263c4 00026588 switch@0x26360[0x4]: 00026588 2e 6d 00 08 |.m | MOVEA.L (A5+0x8),A7 0002658c 3c 7c 00 00 |<| | MOVEA.W #0x0,A6 00026590 4e f9 00 02 67 a4 |N g | JMP 0x267a4 00026596 2f 12 |/ | MOVE.L (A2),-(A7) 00026598 4e ba c8 4c |N L | JSR 0x22de6 0002659c 58 4f |XO | ADDQ.L #0x4,A7 0002659e 2f 06 |/ | MOVE.L D6,-(A7) 000265a0 2f 06 |/ | MOVE.L D6,-(A7) 000265a2 9f 97 | | SUB.L D7,(A7) 000265a4 4e ba cd de |N | JSR 0x23384 000265a8 50 4f |PO | ADDQ.L #0x8,A7 000265aa 26 87 |& | MOVE.L D7,(A3) 000265ac 4a 2e ff f4 |J. | TST.B (A6-0xc) 000265b0 67 ff ff ff fc de |g | BEQ 0x26290 000265b6 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000265ba 4e 5e |N^ | UNLK A6 000265bc 4e 75 |Nu | RTS 000265be ; -------------------------------------------------------------------------------------- 000265be ; OMSI PASCAL Function 000265be ; -------------------------------------------------------------------------------------- 000265be START: 000265be 4f fa 00 08 |O | LEA.L MAIN,A7 000265c2 4e f9 00 01 02 80 |N | JMP ?start_program 000265c8 MAIN: 000265c8 23 fc 00 00 00 01 00 02 |# | MOVE.L #0x1,0x279a8 000265d0 79 a8 |y | 000265d2 59 4f |YO | SUBQ.L #0x4,A7 000265d4 4e b9 00 01 03 c4 |N | JSR GetArgv() : String 000265da 23 df 00 02 79 ac |# y | MOVE.L (A7)+,0x279ac 000265e0 48 79 00 02 79 86 |Hy y | PEA.L 0x27986 000265e6 4e b9 00 02 26 82 |N & | JSR 0x22682 000265ec 58 4f |XO | ADDQ.L #0x4,A7 000265ee 20 79 00 02 79 ac | y y | MOVEA.L 0x279ac,A0 000265f4 4a 50 |JP | TST.W (A0) 000265f6 6f 68 |oh | BLE 0x26660 000265f8 51 4f |QO | SUBQ.L #0x8,A7 000265fa 20 4f | O | MOVEA.L A7,A0 000265fc 43 fa c5 40 |C @ | LEA.L 0x22b3e,A1 00026600 70 06 |p | MOVEQ.L #0x06,D0 00026602 10 d9 | | MOVE.B (A1)+,(A0)+ 00026604 51 c8 ff fc |Q | DBF D0,0x26602 00026608 51 4f |QO | SUBQ.L #0x8,A7 0002660a 20 4f | O | MOVEA.L A7,A0 0002660c 43 fa c5 38 |C 8 | LEA.L 0x22b46,A1 00026610 70 06 |p | MOVEQ.L #0x06,D0 00026612 10 d9 | | MOVE.B (A1)+,(A0)+ 00026614 51 c8 ff fc |Q | DBF D0,0x26612 00026618 51 4f |QO | SUBQ.L #0x8,A7 0002661a 48 6f 00 10 |Ho | PEA.L (A7+0x10) 0002661e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026622 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 00026626 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002662c 58 4f |XO | ADDQ.L #0x4,A7 0002662e 2e b9 00 02 79 ac |. y | MOVE.L 0x279ac,(A7) 00026634 59 4f |YO | SUBQ.L #0x4,A7 00026636 48 6f 00 10 |Ho | PEA.L (A7+0x10) 0002663a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002663e 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 00026642 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00026648 50 4f |PO | ADDQ.L #0x8,A7 0002664a 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00026650 de fc 00 0c | | ADDA.W #0xc,A7 00026654 23 df 00 02 79 ac |# y | MOVE.L (A7)+,0x279ac 0002665a de fc 00 10 | | ADDA.W #0x10,A7 0002665e 60 3a |`: | BRA 0x2669a 00026660 48 79 00 02 79 ac |Hy y | PEA.L 0x279ac 00026666 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002666c 59 4f |YO | SUBQ.L #0x4,A7 0002666e 20 4f | O | MOVEA.L A7,A0 00026670 43 fa c4 dc |C | LEA.L 0x22b4e,A1 00026674 70 06 |p | MOVEQ.L #0x06,D0 00026676 10 d9 | | MOVE.B (A1)+,(A0)+ 00026678 51 c8 ff fc |Q | DBF D0,0x26676 0002667c 59 4f |YO | SUBQ.L #0x4,A7 0002667e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00026682 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026686 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 0002668a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00026690 50 4f |PO | ADDQ.L #0x8,A7 00026692 23 df 00 02 79 ac |# y | MOVE.L (A7)+,0x279ac 00026698 50 4f |PO | ADDQ.L #0x8,A7 0002669a 13 fc 00 01 00 02 79 b6 | y | MOVE.B #0x01,0x279b6 000266a2 4a 39 00 02 79 b6 |J9 y | TST.B 0x279b6 000266a8 67 0c |g | BEQ 0x266b6 000266aa 42 39 00 02 79 b6 |B9 y | CLR.B 0x279b6 000266b0 60 ff 00 00 00 b2 |` | BRA 0x26764 000266b6 41 f9 00 02 79 90 |A y | LEA.L 0x27990,A0 000266bc 70 04 |p | MOVEQ.L #0x04,D0 000266be 3f 20 |? | MOVE.W -(A0),-(A7) 000266c0 51 c8 ff fc |Q | DBF D0,0x266be 000266c4 3f 3a c4 90 |?: | MOVE.W 0x22b56,-(A7) 000266c8 9e fc 00 0c | | SUBA.W #0xc,A7 000266cc 48 6f 00 0e |Ho | PEA.L (A7+0xe) 000266d0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000266d4 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 000266d8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000266de 58 4f |XO | ADDQ.L #0x4,A7 000266e0 48 6f 00 10 |Ho | PEA.L (A7+0x10) 000266e4 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000266e8 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 000266ec 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000266f2 50 4f |PO | ADDQ.L #0x8,A7 000266f4 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000266fa 50 4f |PO | ADDQ.L #0x8,A7 000266fc 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00026702 58 4f |XO | ADDQ.L #0x4,A7 00026704 23 df 00 02 79 b2 |# y | MOVE.L (A7)+,0x279b2 0002670a 50 4f |PO | ADDQ.L #0x8,A7 0002670c 2e b9 00 02 79 b2 |. y | MOVE.L 0x279b2,(A7) 00026712 4e ba c9 70 |N p | JSR 0x23084 00026716 54 4f |TO | ADDQ.L #0x2,A7 00026718 3e ba c4 3e |> > | MOVE.W 0x22b58,(A7) 0002671c 3f 3a c4 3c |?: < | MOVE.W 0x22b5a,-(A7) 00026720 51 4f |QO | SUBQ.L #0x8,A7 00026722 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00026726 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002672a 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 0002672e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00026734 58 4f |XO | ADDQ.L #0x4,A7 00026736 2e b9 00 02 79 b2 |. y | MOVE.L 0x279b2,(A7) 0002673c 59 4f |YO | SUBQ.L #0x4,A7 0002673e 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00026742 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026746 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 0002674a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00026750 50 4f |PO | ADDQ.L #0x8,A7 00026752 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00026758 de fc 00 0c | | ADDA.W #0xc,A7 0002675c 23 df 00 02 79 ac |# y | MOVE.L (A7)+,0x279ac 00026762 58 4f |XO | ADDQ.L #0x4,A7 00026764 42 39 00 02 79 b0 |B9 y | CLR.B 0x279b0 0002676a 23 fc 00 00 00 01 00 02 |# | MOVE.L #0x1,0x2797e 00026772 79 7e |y~ | 00026774 42 b9 00 02 79 82 |B y | CLR.L eval_buffer? 0002677a 59 4f |YO | SUBQ.L #0x4,A7 0002677c 2f 39 00 02 79 ac |/9 y | MOVE.L 0x279ac,-(A7) 00026782 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00026788 58 4f |XO | ADDQ.L #0x4,A7 0002678a 4e ba d4 7c |N | | JSR 0x23c08 0002678e 58 4f |XO | ADDQ.L #0x4,A7 00026790 20 39 00 02 79 7e | 9 y~ | MOVE.L 0x2797e,D0 00026796 b0 b9 00 02 79 82 | y | CMP.L eval_buffer?,D0 0002679c 6e 06 |n | BGT 0x267a4 0002679e 4e ba fa cc |N | JSR 0x2626c 000267a2 60 ec |` | BRA 0x26790 000267a4 48 79 00 02 79 ac |Hy y | PEA.L 0x279ac 000267aa 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000267b0 58 4f |XO | ADDQ.L #0x4,A7 000267b2 60 ff ff ff fe ee |` | BRA 0x266a2 000267b8 4e b9 00 01 02 84 |N | .XXX[0x6] 000267be 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 000267cc 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 000267da 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 000267e8 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 000267fa 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 00026812 ; -------------------------------------------------------------------------------------- 00026812 ; OMSI PASCAL Function 00026812 ; <LVAR 0x00e 1(r)> 00026812 ; <LVAR 0x00a 4(r)> 00026812 ; <LVAR 0x008 1(r)> 00026812 ; -------------------------------------------------------------------------------------- 00026812 EXP_FAIL: 00026812 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 00026816 bf d5 | | CMPA.L (A5),A7 00026818 62 06 |b | BHI 0x26820 0002681a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002681e 4e 76 |Nv | TRAPV 00026820 de fc 00 74 | t | ADDA.W #0x74,A7 00026824 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00026828 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 0002682e 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 00026834 72 01 |r | MOVEQ.L #0x01,D1 00026836 74 0d |t | MOVEQ.L #0x0d,D2 00026838 76 1e |v | MOVEQ.L #0x1e,D3 0002683a 78 12 |x | MOVEQ.L #0x12,D4 0002683c 7a 0e |z | MOVEQ.L #0x0e,D5 0002683e 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00026844 41 fa ff b4 |A | LEA.L 0x267fa,A0 00026848 70 08 |p | MOVEQ.L #0x08,D0 0002684a 3f 20 |? | MOVE.W -(A0),-(A7) 0002684c 51 c8 ff fc |Q | DBF D0,0x2684a 00026850 59 4f |YO | SUBQ.L #0x4,A7 00026852 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00026856 3f 01 |? | MOVE.W D1,-(A7) 00026858 3f 04 |? | MOVE.W D4,-(A7) 0002685a 4e 93 |N | JSR (A3) 0002685c 50 4f |PO | ADDQ.L #0x8,A7 0002685e 4e 94 |N | JSR (A4) 00026860 50 4f |PO | ADDQ.L #0x8,A7 00026862 20 4f | O | MOVEA.L A7,A0 00026864 43 fa ff 58 |C X | LEA.L 0x267be,A1 00026868 70 0c |p | MOVEQ.L #0x0c,D0 0002686a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002686c 51 c8 ff fc |Q | DBF D0,0x2686a 00026870 51 4f |QO | SUBQ.L #0x8,A7 00026872 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00026876 3f 01 |? | MOVE.W D1,-(A7) 00026878 3f 02 |? | MOVE.W D2,-(A7) 0002687a 4e 93 |N | JSR (A3) 0002687c 54 4f |TO | ADDQ.L #0x2,A7 0002687e 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00026882 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00026888 54 4f |TO | ADDQ.L #0x2,A7 0002688a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00026890 50 4f |PO | ADDQ.L #0x8,A7 00026892 4e 94 |N | JSR (A4) 00026894 de c4 | | ADDA.W D4,A7 00026896 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 0002689a b0 c1 | | CMPA.W D1,A0 0002689c 67 48 |gH | BEQ 0x268e6 0002689e 9e c5 | | SUBA.W D5,A7 000268a0 22 4f |"O | MOVEA.L A7,A1 000268a2 45 fa ff 28 |E ( | LEA.L 0x267cc,A2 000268a6 70 0c |p | MOVEQ.L #0x0c,D0 000268a8 12 da | | MOVE.B (A2)+,(A1)+ 000268aa 51 c8 ff fc |Q | DBF D0,0x268a8 000268ae 9e c3 | | SUBA.W D3,A7 000268b0 22 4f |"O | MOVEA.L A7,A1 000268b2 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 000268b6 70 1d |p | MOVEQ.L #0x1d,D0 000268b8 12 d8 | | MOVE.B (A0)+,(A1)+ 000268ba 51 c8 ff fc |Q | DBF D0,0x268b8 000268be 51 4f |QO | SUBQ.L #0x8,A7 000268c0 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 000268c4 3f 01 |? | MOVE.W D1,-(A7) 000268c6 3f 02 |? | MOVE.W D2,-(A7) 000268c8 4e 93 |N | JSR (A3) 000268ca 58 4f |XO | ADDQ.L #0x4,A7 000268cc 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000268d0 3f 01 |? | MOVE.W D1,-(A7) 000268d2 3f 03 |? | MOVE.W D3,-(A7) 000268d4 4e 93 |N | JSR (A3) 000268d6 50 4f |PO | ADDQ.L #0x8,A7 000268d8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000268de 50 4f |PO | ADDQ.L #0x8,A7 000268e0 4e 94 |N | JSR (A4) 000268e2 de fc 00 30 | 0 | ADDA.W #0x30,A7 000268e6 9e c5 | | SUBA.W D5,A7 000268e8 20 4f | O | MOVEA.L A7,A0 000268ea 43 fa fe ee |C | LEA.L 0x267da,A1 000268ee 70 0c |p | MOVEQ.L #0x0c,D0 000268f0 10 d9 | | MOVE.B (A1)+,(A0)+ 000268f2 51 c8 ff fc |Q | DBF D0,0x268f0 000268f6 51 4f |QO | SUBQ.L #0x8,A7 000268f8 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000268fc 3f 01 |? | MOVE.W D1,-(A7) 000268fe 3f 02 |? | MOVE.W D2,-(A7) 00026900 4e 93 |N | JSR (A3) 00026902 54 4f |TO | ADDQ.L #0x2,A7 00026904 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00026908 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 0002690e 54 4f |TO | ADDQ.L #0x2,A7 00026910 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00026916 50 4f |PO | ADDQ.L #0x8,A7 00026918 4e 94 |N | JSR (A4) 0002691a 5d 4f |]O | SUBQ.L #0x6,A7 0002691c 20 4f | O | MOVEA.L A7,A0 0002691e 43 fa fe da |C | LEA.L 0x267fa,A1 00026922 70 16 |p | MOVEQ.L #0x16,D0 00026924 10 d9 | | MOVE.B (A1)+,(A0)+ 00026926 51 c8 ff fc |Q | DBF D0,0x26924 0002692a 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 0002692e 59 4f |YO | SUBQ.L #0x4,A7 00026930 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00026934 3f 01 |? | MOVE.W D1,-(A7) 00026936 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 0002693a 4e 93 |N | JSR (A3) 0002693c 50 4f |PO | ADDQ.L #0x8,A7 0002693e 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00026944 de c3 | | ADDA.W D3,A7 00026946 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 0002694a 4e 5e |N^ | UNLK A6 0002694c 4e 75 |Nu | RTS