|
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: 23040 (0x5a00)
Types: M200
Notes: @(#)EXPMON,2.1,90/12/04,17:18:19, M200_PROGRAM
Names: »EXPMON.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »EXPMON.M200«
@ 2055c
<LVAR 0x008 4(r)>
<POP 2055c-205f6 Body>
<POP 2055c-20572 Prologue> Σ0 ↓
<POP 20572-2057c RegCacheLoad> Σ0 ↓
<POP 2057c-205ee Naked> Σ0 ↓
<Blob 0x2057c [32] @> Δ-32 {[«32""»]}
<MI 2058e MOVEA.L 0x2597c,A0> {[«32""»]}
<Blob 0x20590 [30] (A0+0xfc)> Δ-30 {[«32""»]|[«30»]}
<POP 205a0-205a2 StackAdj> Δ-8 {[«32""»]|[«30»]|[-8-]}
<Lit 0x205a2 31> {[«32""»]|[«30»]|[-4-]|[$$Recoverable experiment error :_]}
<POP 205b2-205b4 StackAdj> Δ-4 {[«32""»]|[«30»]|[-4-]|[$$Recoverable experiment error :_]|[-4-]}
<Lit 0x205b4> {[«32""»]|[«30»]|[-4-]|[$$Recoverable experiment error :_]|[$$…]}
<Pointer.sp 0x205b4 12> Δ-4
<Const 0x205b8 0x1.2> Δ-2
<Const 0x205ba 0x1e.2> Δ-2
<Call 0x205bc 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 205c2-205c4 StackAdj> Δ+8
<Call 0x205c4 0x102d0> {[«32""»]|[«30»]|[-4-]|[$$Recoverable experiment error :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 205ca-205cc StackAdj> Δ+8 {[«32""»]|[«30»]|[-4-]}
<MI 205cc MOVEA.L (A7)+,A4> Δ+4 {[«32""»]|[«30»]}
<POP 205ce-205d2 StackAdj> Δ+62 {}
<Const 0x205d2 0x2597c.4> Δ-4 {[##153980]}
<Call 0x205d4 0x10496> {[##153980]}
ExpClose(exp : Pointer)
<MI 205da MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<Call 0x205de 0x103e0> {[4, '(A6+0x8)']}
WriteConsoleStringCrLf(str : String)
<MI 205e4 MOVE.L A4,(A7)> {[4, 'A4']}
<Call 0x205e6 0x21e62> {[4, 'A4']}
<POP 205ec-205ee StackAdj> Δ+4 {}
<POP 205ee-205f6 Epilogue> Σ0
@ 205f6
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 205f6-2065a Body>
<POP 205f6-2060c Prologue> Σ0 ↓
<POP 2060c-20652 Naked> Σ0 ↓
<Blob 0x2060c [4] @> Δ-4 {[«4""»]}
<Blob 0x20610 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x20614 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 20618-2061a StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[-8-]}
<Lit 0x2061a 12> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Words error_]}
<POP 2062c-2062e StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Words error_]|[-4-]}
<MI 2062e MOVE.B (A6+0x8),D0> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Words error_]|[-4-]}
<MI 20632 EXTB.W D0> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Words error_]|[-4-]}
<MI 20634 EXTW.L D0> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Words error_]|[-4-]}
<MI 20636 MOVE.L D0,-(A7)> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Words error_]|[-4-]|[4, 'D0']}
<Call 0x20638 0x102e4> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Words error_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 2063e-20640 StackAdj> Δ+4 {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Words error_]|[-4-]}
<Call 0x20640 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Words error_]|[-4-]}
StringCat2(a, b : String) : String
<POP 20646-20648 StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Call 0x20648 0x21e62> {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<POP 2064e-20652 StackAdj> Δ+16 {}
<POP 20652-2065a Epilogue> Σ0
@ 2065a
<LVAR 0x00c @ 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x00a @ 4(rw)>
<POP 2065a-2071c Body>
<POP 2065a-20670 Prologue> Σ0 ↓
<POP 20670-2067a RegCacheLoad> Σ0 ↓
<POP 2067a-2067c Naked> Σ0 ↓
<MI 2067a MOVEQ.L #0x00,D7> {}
<POP 2067c-206c6 Naked> Σ0 ↓ →0x206ce ←0x206ce
<MI 2067c MOVE.B D7,D0> {}
<MI 2067e EXTB.W D0> {}
<MI 20680 ASL.W #0x2,D0> {}
<MI 20682 LEA.L 0x25974,A0> {}
<MI 20688 MOVE.L (A0+D0.W+#0x4c),-(A7)> Δ-4 {[4, '(A0+D0.W+#0x4c)']}
<POP 2068c-2068e StackAdj> Δ-4 {[4, '(A0+D0.W+#0x4c)']|[-4-]}
<Lit 0x2068e> {[4, '(A0+D0.W+#0x4c)']|[$$…]}
<Pointer.sp 0x2068e 4> Δ-4
<Const 0x20692 0x1.2> Δ-2
<Const 0x20694 0x4.2> Δ-2
<Call 0x20698 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2069e-206a0 StackAdj> Δ+8
<MI 206a0 MOVE.L (A7)+,(A6-0xa)> Δ+4 {[4, '(A0+D0.W+#0x4c)']}
<POP 206a2-206a4 StackAdj> Δ+2 {[-2-]}
<MI 206a4 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-2-]|[4, '(A6+0xc)']}
<MI 206a6 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-2-]|[4, '(A6+0xc)']|[4, '(A6-0xa)']}
<Call 0x206a8 0x102c8> {[-2-]|[4, '(A6+0xc)']|[4, '(A6-0xa)']}
StringEqual(a, b : String) : Byte
<POP 206ae-206b0 StackAdj> Δ+8 {[-2-]}
<MI 206b0 MOVE.B (A7)+,D0> Δ+2 {}
<MI 206b2 EXTB.W D0> {}
<POP 0x206b4 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 206b6 MOVE.B D0,D6> {}
<Pointer.fp 0x206b8 <LVAR -0x00a @ 4(rw)>> Δ-4 {[@@-10]}
<Call 0x206ba 0x102bc> {[@@-10]}
FreeString(VAR a : String)
<POP 206c0-206c2 StackAdj> Δ+4 {}
<MI 206c2 TST.B D6> {}
<MI 206c4 BEQ 0x206ce> {}
<POP 206c6-206ce Naked> Σ0 →0x2070a
<MI 206c6 MOVEA.L (A6+0x8),A0> {}
<MI 206ca MOVE.B D7,(A0)> {}
<MI 206cc BRA 0x2070a> {}
<POP 206ce-206d6 Naked> Σ0 ↓ →0x2067c ←0x2067c
<MI 206ce ADDQ.B #0x1,D7> {}
<MI 206d0 CMPI.B #0x0f,D7> {}
<MI 206d4 BLE 0x2067c> {}
<POP 206d6-2070a Naked> Σ0 ↓
<Blob 0x206d6 [20] @> Δ-20 {[«20""»]}
<POP 206e2-206e4 StackAdj> Δ-8 {[«20""»]|[-8-]}
<Lit 0x206e4 20> {[«20""»]|[-4-]|[$$Unknown board name:_]}
<POP 206f4-206f6 StackAdj> Δ-4 {[«20""»]|[-4-]|[$$Unknown board name:_]|[-4-]}
<MI 206f6 MOVE.L (A6+0xc),(A7)> {[«20""»]|[-4-]|[$$Unknown board name:_]|[4, '(A6+0xc)']}
<Call 0x206f8 0x102d0> {[«20""»]|[-4-]|[$$Unknown board name:_]|[4, '(A6+0xc)']}
StringCat2(a, b : String) : String
<POP 206fe-20700 StackAdj> Δ+8 {[«20""»]|[-4-]}
<Call 0x20700 0x21e62> {[«20""»]|[-4-]}
<POP 20706-2070a StackAdj> Δ+24 {}
<POP 2070a-20714 Naked> Σ0 ↓ ←0x206c6
<Pointer.fp 0x2070a <LVAR 0x00c @ 4(r)>> Δ-4 {[@@12]}
<Call 0x2070c 0x102bc> {[@@12]}
FreeString(VAR a : String)
<POP 20712-20714 StackAdj> Δ+4 {}
<POP 20714-2071c Epilogue> Σ0
@ 2071c
<LVAR 0x00c 1(rw)>
<LVAR 0x008 4(r)>
<LVAR -0x006 @ 4(rw)>
<POP 2071c-207f0 Body>
<POP 2071c-20732 Prologue> Σ0 ↓
<POP 20732-2073c RegCacheLoad> Σ0 ↓
<POP 2073c-2073e Naked> Σ0 ↓
<MI 2073c MOVEQ.L #0x00,D7> {}
<POP 2073e-2079c Naked> Σ0 ↓ →0x207ae ←0x207ae
<POP 0x2073e LimitCheck 0x0 ≤ D7 ≤ 0x7> {}
<MI 20744 MOVE.L D7,D4> {}
<MI 20746 MOVEQ.L #0x0a,D3> {}
<Call 0x20748 0x1028c> {}
?muls_d3_d4
<MI 2074e LEA.L 0x2050c,A0> {}
<Blob 0x20752 [10] (A0+D4.L)> Δ-10 {[«10»]}
<POP 20762-20764 StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x20764> {[«10»]|[$$…]}
<Pointer.sp 0x20764 4> Δ-4
<Const 0x20768 0x1.2> Δ-2
<Const 0x2076a 0xa.2> Δ-2
<Call 0x2076c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20772-20774 StackAdj> Δ+8
<MI 20774 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«10»]}
<POP 20776-20778 StackAdj> Δ+4 {[-6-]}
<MI 20778 MOVE.L (A6+0x8),(A7)> {[-2-]|[4, '(A6+0x8)']}
<MI 2077c MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x2077e 0x102c8> {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x6)']}
StringEqual(a, b : String) : Byte
<POP 20784-20786 StackAdj> Δ+8 {[-2-]}
<MI 20786 MOVE.B (A7)+,D0> Δ+2 {}
<MI 20788 EXTB.W D0> {}
<POP 0x2078a LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 2078c MOVE.B D0,D6> {}
<Pointer.fp 0x2078e <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x20790 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 20796-20798 StackAdj> Δ+4 {}
<MI 20798 TST.B D6> {}
<MI 2079a BEQ 0x207ae> {}
<POP 2079c-207a8 Naked> Σ0 ↓ →0x207ac
<MI 2079c CLR.B (A6+0xc)> {}
<MI 207a0 CMPI.L #0x00000004,D7> {}
<MI 207a6 BGE 0x207ac> {}
<POP 207a8-207ac Naked> Σ0 ↓
<MI 207a8 ADDQ.B #0x1,(A6+0xc)> {}
<POP 207ac-207ae Naked> Σ0 →0x207e8 ←0x2079c
<MI 207ac BRA 0x207e8> {}
<POP 207ae-207b4 Naked> Σ0 ↓ →0x2073e ←0x2073e
<MI 207ae ADDQ.L #0x1,D7> {}
<MI 207b0 CMP.L #0x07,D7> {}
<MI 207b2 BLE 0x2073e> {}
<POP 207b4-207e8 Naked> Σ0 ↓
<Blob 0x207b4 [18] @> Δ-18 {[«18""»]}
<POP 207c0-207c2 StackAdj> Δ-8 {[«18""»]|[-8-]}
<Lit 0x207c2 18> {[«18""»]|[-4-]|[$$Illegal boolean :_]}
<POP 207d2-207d4 StackAdj> Δ-4 {[«18""»]|[-4-]|[$$Illegal boolean :_]|[-4-]}
<MI 207d4 MOVE.L (A6+0x8),(A7)> {[«18""»]|[-4-]|[$$Illegal boolean :_]|[4, '(A6+0x8)']}
<Call 0x207d8 0x102d0> {[«18""»]|[-4-]|[$$Illegal boolean :_]|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 207de-207e0 StackAdj> Δ+8 {[«18""»]|[-4-]}
<Call 0x207e0 0x2055c> {[«18""»]|[-4-]}
<POP 207e4-207e8 StackAdj> Δ+22 {}
<POP 207e8-207f0 Epilogue> Σ0 ←0x207ac
@ 207f0
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 207f0-20a14 Body>
<POP 207f0-20806 Prologue> Σ0 ↓
<POP 20806-20812 RegCacheLoad> Σ0 ↓
<POP 20812-20816 Naked> Σ0 Δ-4 ↓
<MI 20812 MOVEA.L (A6+0xc),A0> {}
<MI 20814 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<POP 20816-2081e Naked> Σ-4 ↓ →0x2087c ←0x20858
<MI 20816 MOVEA.L (A7),A0> {[-4-]}
<MI 20818 MOVE.W (A0),D0> {[-4-]}
<MI 2081a CMP.W #0x01,D0> {[-4-]}
<MI 2081c BLE 0x2087c> {[-4-]}
<POP 2081e-20828 Naked> Σ-4 ↓ →0x2087c
<MI 2081e MOVE.B (A0+0x2),D1> {[-4-]}
<MI 20822 CMPI.B #0x30,D1> {[-4-]}
<MI 20826 BNE 0x2087c> {[-4-]}
<POP 20828-20830 Naked> Σ-4 Δ-4 ↓
<MI 20828 MOVE.W D0,D1> {[-4-]}
<MI 2082a EXTW.L D1> {[-4-]}
<MI 2082c MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'D1']}
<MI 2082e MOVEQ.L #0x02,D7> {[-4-]|[4, 'D1']}
<POP 20830-20834 Naked> Σ-8 ↓ →0x20858 ←0x20834
<MI 20830 CMP.L (A7),D7> {[-8-]}
<MI 20832 BGT 0x20858> {[-8-]}
<POP 20834-20858 Naked> Σ-8 ↓ →0x20830
<MI 20834 MOVE.L D7,D0> {[-8-]}
<MI 20836 SUBQ.L #0x1,D0> {[-8-]}
<MI 20838 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x2083a LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-8-]}
<MI 20840 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 20844 MOVE.L D7,D1> {[-8-]}
<MI 20846 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x20848 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 2084e MOVE.B (A0+D1.L+#0x2),(A0+D0.L+#0x2)> {[-8-]}
<MI 20854 ADDQ.L #0x1,D7> {[-8-]}
<MI 20856 BVC 0x20830> {[-8-]}
<POP 20858-2087c Naked> Σ-8 Δ+4 →0x20816 ←0x20830
<POP 20858-2085a StackAdj> Δ+4 {[-4-]}
<MI 2085a MOVEA.L (A7),A0> {[-4-]}
<MI 2085c MOVE.W (A0),D0> {[-4-]}
<MI 2085e EXTW.L D0> {[-4-]}
<MI 20860 SUBQ.L #0x1,D0> {[-4-]}
<POP 0x20862 LimitCheck -0x8000 ≤ D0 ≤ 0x7fff> {[-4-]}
<MI 20878 MOVE.W D0,(A0)> {[-4-]}
<MI 2087a BRA 0x20816> {[-4-]}
<POP 2087c-20886 Naked> Σ-4 ↓ →0x208be ←0x20816 ←0x2081e
<MI 2087c MOVE.L (A6+0x8),D1> {[-4-]}
<MI 2087e ASL.L #0x1,D1> {[-4-]}
<MI 20880 EXTW.L D0> {[-4-]}
<MI 20882 CMP.L D1,D0> {[-4-]}
<MI 20884 BLE 0x208be> {[-4-]}
<POP 20886-208be Naked> Σ-4 ↓
<Blob 0x20886 [22] @> Δ-22 {[-4-]|[«22""»]}
<POP 20898-2089a StackAdj> Δ-8 {[-4-]|[«22""»]|[-8-]}
<Lit 0x2089a 21> {[-4-]|[«22""»]|[-4-]|[$$Parameter too long :_]}
<POP 208aa-208ac StackAdj> Δ-4 {[-4-]|[«22""»]|[-4-]|[$$Parameter too long :_]|[-4-]}
<MI 208ac MOVE.L (A6+0xc),(A7)> {[-4-]|[«22""»]|[-4-]|[$$Parameter too long :_]|[4, '(A6+0xc)']}
<Call 0x208ae 0x102d0> {[-4-]|[«22""»]|[-4-]|[$$Parameter too long :_]|[4, '(A6+0xc)']}
StringCat2(a, b : String) : String
<POP 208b4-208b6 StackAdj> Δ+8 {[-4-]|[«22""»]|[-4-]}
<Call 0x208b6 0x2055c> {[-4-]|[«22""»]|[-4-]}
<POP 208ba-208be StackAdj> Δ+26 {[-4-]}
<POP 208be-208c8 Naked> Σ-4 Δ-4 ↓ ←0x2087c
<MI 208be MOVEA.L (A7),A0> {[-4-]}
<MI 208c0 MOVE.W (A0),D0> {[-4-]}
<MI 208c2 EXTW.L D0> {[-4-]}
<MI 208c4 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<MI 208c6 MOVEQ.L #0x01,D7> {[-4-]|[4, 'D0']}
<POP 208c8-208cc Naked> Σ-8 ↓ →0x20932 ←0x2092e
<MI 208c8 CMP.L (A7),D7> {[-8-]}
<MI 208ca BGT 0x20932> {[-8-]}
<POP 208cc-208e4 Naked> Σ-8 ↓ →0x208ea
<MI 208cc MOVE.L D7,D0> {[-8-]}
<MI 208ce SUBQ.L #0x1,D0> {[-8-]}
<POP 0x208d0 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-8-]}
<MI 208d6 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 208da MOVE.B (A0+D0.L+#0x2),D1> {[-8-]}
<MI 208de CMPI.B #0x30,D1> {[-8-]}
<MI 208e2 BCS 0x208ea> {[-8-]}
<POP 208e4-208ea Naked> Σ-8 ↓ →0x2092e
<MI 208e4 CMPI.B #0x39,D1> {[-8-]}
<MI 208e8 BLS 0x2092e> {[-8-]}
<POP 208ea-208f0 Naked> Σ-8 ↓ →0x208f6 ←0x208cc
<MI 208ea CMPI.B #0x41,D1> {[-8-]}
<MI 208ee BCS 0x208f6> {[-8-]}
<POP 208f0-208f6 Naked> Σ-8 ↓ →0x2092e
<MI 208f0 CMPI.B #0x46,D1> {[-8-]}
<MI 208f4 BLS 0x2092e> {[-8-]}
<POP 208f6-2092e Naked> Σ-8 ↓ ←0x208ea
<Blob 0x208f6 [28] @> Δ-28 {[-8-]|[«28""»]}
<POP 20908-2090a StackAdj> Δ-8 {[-8-]|[«28""»]|[-8-]}
<Lit 0x2090a 27> {[-8-]|[«28""»]|[-4-]|[$$Illegal STRING parameter :_]}
<POP 2091a-2091c StackAdj> Δ-4 {[-8-]|[«28""»]|[-4-]|[$$Illegal STRING parameter :_]|[-4-]}
<MI 2091c MOVE.L (A6+0xc),(A7)> {[-8-]|[«28""»]|[-4-]|[$$Illegal STRING parameter :_]|[4, '(A6+0xc)']}
<Call 0x2091e 0x102d0> {[-8-]|[«28""»]|[-4-]|[$$Illegal STRING parameter :_]|[4, '(A6+0xc)']}
StringCat2(a, b : String) : String
<POP 20924-20926 StackAdj> Δ+8 {[-8-]|[«28""»]|[-4-]}
<Call 0x20926 0x2055c> {[-8-]|[«28""»]|[-4-]}
<POP 2092a-2092e StackAdj> Δ+32 {[-8-]}
<POP 2092e-20932 Naked> Σ-8 ↓ →0x208c8 ←0x208e4 ←0x208f0
<MI 2092e ADDQ.L #0x1,D7> {[-8-]}
<MI 20930 BVC 0x208c8> {[-8-]}
<POP 20932-2093e Naked> Σ-8 ↓ ←0x208c8
<POP 20932-20934 StackAdj> Δ+4 {[-4-]}
<MI 20934 MOVEA.L (A7),A0> {[-4-]}
<MI 20936 MOVE.W (A0),D0> {[-4-]}
<MI 20938 EXTW.L D0> {[-4-]}
<MI 2093a MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<MI 2093c MOVEQ.L #0x01,D7> {[-4-]|[4, 'D0']}
<POP 2093e-20942 Naked> Σ-8 ↓ →0x20984 ←0x20968
<MI 2093e CMP.L (A7),D7> {[-8-]}
<MI 20940 BGT 0x20984> {[-8-]}
<POP 20942-20966 Naked> Σ-8 ↓ →0x20968
<MI 20942 MOVE.L D7,D0> {[-8-]}
<MI 20944 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x20946 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-8-]}
<MI 2094c MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 20950 CLR.L D1> {[-8-]}
<MI 20952 MOVE.B (A0+D0.L+#0x2),D1> {[-8-]}
<MI 20956 SUBI.W #0x0030,D1> {[-8-]}
<MI 2095a EXTW.L D1> {[-8-]}
<MI 2095c MOVE.L D1,D6> {[-8-]}
<MI 2095e CMPI.L #0x00000009,D6> {[-8-]}
<MI 20964 BLE 0x20968> {[-8-]}
<POP 20966-20968 Naked> Σ-8 ↓
<MI 20966 SUBQ.L #0x7,D6> {[-8-]}
<POP 20968-20984 Naked> Σ-8 ↓ →0x2093e ←0x20942
<MI 20968 MOVE.L D7,D0> {[-8-]}
<MI 2096a SUBQ.L #0x1,D0> {[-8-]}
<POP 0x2096c LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-8-]}
<POP 0x20972 LimitCheck 0x0 ≤ D6 ≤ 0xff> {[-8-]}
<MI 2097c MOVE.B D6,(A0+D0.L+#0x2)> {[-8-]}
<MI 20980 ADDQ.L #0x1,D7> {[-8-]}
<MI 20982 BVC 0x2093e> {[-8-]}
<POP 20984-20994 Naked> Σ-8 Δ+4 ↓ →0x20a0a ←0x2093e
<POP 20984-20986 StackAdj> Δ+4 {[-4-]}
<MI 20986 MOVEA.L (A7),A0> {[-4-]}
<MI 20988 MOVE.L (A6+0x8),D0> {[-4-]}
<MI 2098a ASL.L #0x1,D0> {[-4-]}
<MI 2098c MOVE.W (A0),D1> {[-4-]}
<MI 2098e EXTW.L D1> {[-4-]}
<MI 20990 CMP.L D0,D1> {[-4-]}
<MI 20992 BEQ 0x20a0a> {[-4-]}
<POP 20994-209a4 Naked> Σ-4 ↓
<MI 20994 MOVEQ.L #0x02,D4> {[-4-]}
<MI 20996 MOVE.L (A6+0x8),D3> {[-4-]}
<Call 0x20998 0x1028c> {[-4-]}
?muls_d3_d4
<MI 2099e MOVE.L D4,D6> {[-4-]}
<MI 209a0 SUB.L D1,D6> {[-4-]}
<MI 209a2 MOVE.L D1,D7> {[-4-]}
<POP 209a4-209a8 Naked> Σ-4 ↓ →0x209ca ←0x209a8
<MI 209a4 CMP.L #0x01,D7> {[-4-]}
<MI 209a6 BLT 0x209ca> {[-4-]}
<POP 209a8-209ca Naked> Σ-4 ↓ →0x209a4
<MI 209a8 MOVE.L D7,D0> {[-4-]}
<MI 209aa ADD.L D6,D0> {[-4-]}
<MI 209ac SUBQ.L #0x1,D0> {[-4-]}
<POP 0x209ae LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-4-]}
<MI 209b4 MOVEA.L (A7),A0> {[-4-]}
<MI 209b6 MOVE.L D7,D1> {[-4-]}
<MI 209b8 SUBQ.L #0x1,D1> {[-4-]}
<POP 0x209ba LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-4-]}
<MI 209c0 MOVE.B (A0+D1.L+#0x2),(A0+D0.L+#0x2)> {[-4-]}
<MI 209c6 SUBQ.L #0x1,D7> {[-4-]}
<MI 209c8 BVC 0x209a4> {[-4-]}
<POP 209ca-209ce Naked> Σ-4 Δ-4 ↓ ←0x209a4
<MI 209ca MOVE.L D6,-(A7)> Δ-4 {[-4-]|[4, 'D6']}
<MI 209cc MOVEQ.L #0x01,D7> {[-4-]|[4, 'D6']}
<POP 209ce-209d2 Naked> Σ-8 ↓ →0x209e8 ←0x209d2
<MI 209ce CMP.L (A7),D7> {[-8-]}
<MI 209d0 BGT 0x209e8> {[-8-]}
<POP 209d2-209e8 Naked> Σ-8 ↓ →0x209ce
<MI 209d2 MOVE.L D7,D0> {[-8-]}
<MI 209d4 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x209d6 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-8-]}
<MI 209dc MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 209e0 CLR.B (A0+D0.L+#0x2)> {[-8-]}
<MI 209e4 ADDQ.L #0x1,D7> {[-8-]}
<MI 209e6 BVC 0x209ce> {[-8-]}
<POP 209e8-20a0a Naked> Σ-8 Δ+4 ↓ ←0x209ce
<POP 209e8-209ea StackAdj> Δ+4 {[-4-]}
<MI 209ea MOVEA.L (A7),A0> {[-4-]}
<MI 209ec MOVE.W (A0),D0> {[-4-]}
<MI 209ee EXTW.L D0> {[-4-]}
<MI 209f0 ADD.L D6,D0> {[-4-]}
<POP 0x209f2 LimitCheck -0x8000 ≤ D0 ≤ 0x7fff> {[-4-]}
<MI 20a08 MOVE.W D0,(A0)> {[-4-]}
<POP 20a0a-20a0c Naked> Σ-4 Δ+4 ↓ ←0x20984
<POP 20a0a-20a0c StackAdj> Δ+4 {}
<POP 20a0c-20a14 Epilogue> Σ0
@ 20a14
<LVAR 0x008 4(r)>
<LVAR -0x00e @ 4(rw)>
<LVAR -0x010 1(rw)>
<POP 20a14-20b50 Body> Δ-4
<POP 20a14-20a2a Prologue> Σ0 ↓
<POP 20a2a-20a3c RegCacheLoad> Σ0 ↓
<POP 20a3c-20a44 Naked> Σ0 Δ-4 ↓
<MI 20a3c CLR.B (A6-0x10)> {}
<MI 20a3e MOVEQ.L #0x03,D5> {}
<MI 20a40 MOVEA.L 0x2597c,A0> {}
<MI 20a42 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<POP 20a44-20a52 Naked> Σ-4 Δ-4 ↓ →0x20b46 ←0x20b3e
<MI 20a44 MOVEA.L (A7),A0> {[-4-]}
<MI 20a46 MOVEA.L (A0+0xf4),A1> {[-4-]}
<MI 20a4a MOVE.L A1,-(A7)> Δ-4 {[-4-]|[4, 'A1']}
<MI 20a4c CMPA.W #0x01,A1> {[-4-]|[4, 'A1']}
<MI 20a4e BEQ 0x20b46> {[-4-]|[4, 'A1']}
<POP 20a52-20a58 Naked> Σ-8 ↓ →0x20b46
<MI 20a52 TST.B (A6-0x10)> {[-8-]}
<MI 20a54 BNE 0x20b46> {[-8-]}
<POP 20a58-20a5e Naked> Σ-8 ↓ →0x20a64
<MI 20a58 MOVE.B (A1),D0> {[-8-]}
<MI 20a5a LSR.B #0x7,D0> {[-8-]}
<MI 20a5c BNE 0x20a64> {[-8-]}
<POP 20a5e-20a64 Naked> Σ-8 →0x20b3e
<MI 20a5e MOVE.B #0x01,(A6-0x10)> {[-8-]}
<MI 20a60 BRA 0x20b3e> {[-8-]}
<POP 20a64-20a7e Naked> Σ-8 ↓ →0x20a9e ←0x20a58
<POP 20a64-20a66 StackAdj> Δ-4 {[-12-]}
<MI 20a66 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<MI 20a6a MOVE.L D5,-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<Call 0x20a6c 0x22b8a> {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<POP 20a72-20a74 StackAdj> Δ+8 {[-12-]}
<MI 20a74 MOVE.L (A7)+,(A6-0xe)> Δ+4 {[-8-]}
<MI 20a76 MOVE.B (A1),D0> {[-8-]}
<MI 20a78 LSL.B #0x1,D0> {[-8-]}
<MI 20a7a LSR.B #0x7,D0> {[-8-]}
<MI 20a7c BEQ 0x20a9e> {[-8-]}
<POP 20a7e-20a9e Naked> Σ-8 →0x20b34
<Blob 0x20a7e [4] 0x2597c> Δ-4 {[-8-]|[«4»]}
<POP 20a80-20a82 StackAdj> Δ-2 {[-8-]|[«4»]|[-2-]}
<MI 20a82 MOVE.L (A6-0xe),-(A7)> Δ-4 {[-8-]|[«4»]|[-2-]|[4, '(A6-0xe)']}
<Call 0x20a84 0x2071c> {[-8-]|[«4»]|[-2-]|[4, '(A6-0xe)']}
<POP 20a88-20a8a StackAdj> Δ+4 {[-8-]|[«4»]|[-2-]}
<MI 20a8a MOVE.B (A7),D0> {[-8-]|[«4»]|[-2-]}
<MI 20a8c EXTB.W D0> {[-8-]|[«4»]|[-2-]}
<POP 0x20a8e LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-8-]|[«4»]|[-2-]}
<MI 20a90 MOVE.B D0,(A7)> {[-8-]|[«4»]|[-2-]}
<Call 0x20a92 0x1046c> {[-8-]|[«4»]|[-2-]}
ExpInputFlag(exp : Pointer; val : Word)
<POP 20a98-20a9a StackAdj> Δ+6 {[-8-]}
<MI 20a9a BRA 0x20b34> {[-8-]}
<POP 20a9e-20ac0 Naked> Σ-8 Δ-4 ↓ ←0x20a64
<MI 20a9e MOVE.L (A6-0xe),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xe)']}
<MI 20aa0 CLR.L D0> {[-8-]|[4, '(A6-0xe)']}
<MI 20aa2 MOVE.B (A1),D0> {[-8-]|[4, '(A6-0xe)']}
<MI 20aa4 LSL.B #0x2,D0> {[-8-]|[4, '(A6-0xe)']}
<MI 20aa6 LSR.B #0x2,D0> {[-8-]|[4, '(A6-0xe)']}
<MI 20aa8 MOVE.L D0,-(A7)> Δ-4 {[-8-]|[4, '(A6-0xe)']|[4, 'D0']}
<Call 0x20aaa 0x207f0> {[-8-]|[4, '(A6-0xe)']|[4, 'D0']}
<POP 20aae-20ab0 StackAdj> Δ+8 {[-8-]}
<MI 20ab0 CLR.L D0> {[-8-]}
<MI 20ab2 MOVE.B (A1),D0> {[-8-]}
<MI 20ab4 LSL.B #0x2,D0> {[-8-]}
<MI 20ab6 LSR.B #0x2,D0> {[-8-]}
<MI 20ab8 SUBQ.W #0x1,D0> {[-8-]}
<MI 20aba EXTW.L D0> {[-8-]}
<MI 20abc MOVE.L D0,-(A7)> Δ-4 {[-8-]|[4, 'D0']}
<MI 20abe MOVEQ.L #0x00,D7> {[-8-]|[4, 'D0']}
<POP 20ac0-20ac4 Naked> Σ-12 ↓ →0x20b26 ←0x20ac4
<MI 20ac0 CMP.L (A7),D7> {[-12-]}
<MI 20ac2 BGT 0x20b26> {[-12-]}
<POP 20ac4-20b26 Naked> Σ-12 ↓ →0x20ac0
<MI 20ac4 MOVEA.L (A6-0xe),A0> {[-12-]}
<MI 20ac6 MOVE.L D7,D0> {[-12-]}
<MI 20ac8 ADD.L D7,D0> {[-12-]}
<MI 20aca MOVE.L D0,D1> {[-12-]}
<MI 20acc ADDQ.L #0x1,D1> {[-12-]}
<MI 20ace SUBQ.L #0x1,D1> {[-12-]}
<POP 0x20ad0 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-12-]}
<MI 20ad6 CLR.L D2> {[-12-]}
<MI 20ad8 MOVE.B (A0+D1.L+#0x2),D2> {[-12-]}
<MI 20adc ASL.W #0x4,D2> {[-12-]}
<MI 20ade ADDQ.L #0x2,D0> {[-12-]}
<MI 20ae0 SUBQ.L #0x1,D0> {[-12-]}
<POP 0x20ae2 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-12-]}
<MI 20ae8 CLR.L D1> {[-12-]}
<MI 20aea MOVE.B (A0+D0.L+#0x2),D1> {[-12-]}
<MI 20aee ADD.W D2,D1> {[-12-]}
<MI 20af0 EXTW.L D1> {[-12-]}
<MI 20af2 MOVE.L D1,D6> {[-12-]}
<MI 20af4 MOVEA.L (A7+0x4),A0> {[-12-]}
<MI 20af8 CLR.L D0> {[-12-]}
<MI 20afa MOVE.B (A0+0x1),D0> {[-12-]}
<MI 20afe ADD.L D7,D0> {[-12-]}
<MI 20b00 SUBI.L #0x00000010,D0> {[-12-]}
<POP 0x20b06 LimitCheck 0x0 ≤ D0 ≤ 0xef> {[-12-]}
<MI 20b10 MOVEA.L (A7+0x8),A0> {[-12-]}
<POP 0x20b14 LimitCheck 0x0 ≤ D6 ≤ 0xff> {[-12-]}
<MI 20b1e MOVE.B D6,(A0+D0.L+#0x4)> {[-12-]}
<MI 20b22 ADDQ.L #0x1,D7> {[-12-]}
<MI 20b24 BVC 0x20ac0> {[-12-]}
<POP 20b26-20b34 Naked> Σ-12 Δ+4 ↓ ←0x20ac0
<POP 20b26-20b28 StackAdj> Δ+4 {[-8-]}
<MI 20b28 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 20b2c MOVEA.L (A7),A1> {[-8-]}
<MI 20b2e MOVE.L (A1+0x2),(A0+0xf4)> {[-8-]}
<POP 20b34-20b3e Naked> Σ-8 ↓ ←0x20a7e
<Pointer.fp 0x20b34 <LVAR -0x00e @ 4(rw)>> Δ-4 {[-8-]|[@@-14]}
<Call 0x20b36 0x102bc> {[-8-]|[@@-14]}
FreeString(VAR a : String)
<POP 20b3c-20b3e StackAdj> Δ+4 {[-8-]}
<POP 20b3e-20b46 Naked> Σ-8 Δ+4 →0x20a44 ←0x20a5e
<MI 20b3e ADDQ.L #0x1,D5> {[-8-]}
<POP 20b40-20b42 StackAdj> Δ+4 {[-4-]}
<MI 20b42 BRA 0x20a44> {[-4-]}
<POP 20b46-20b48 Naked> Σ-8 Δ+8 ↓ ←0x20a44 ←0x20a52
<POP 20b46-20b48 StackAdj> Δ+8 {}
<POP 20b48-20b50 Epilogue> Σ0
@ 20b50
<LVAR -0x00e 4(r)>
<LVAR -0x012 @ 4(r)>
<LVAR -0x01b @>
<LVAR -0x022 @>
<LVAR -0x024 2(r)>
<LVAR -0x026 2(r)>
<LVAR -0x028 @ 2(r)>
<LVAR -0x02d @>
<LVAR -0x02e 1(r)>
<LVAR -0x02f 1(r)>
<LVAR -0x030 1(r)>
<LVAR -0x031 @ 1(r)>
<LVAR -0x032 1(r)>
<LVAR -0x033 1(r)>
<LVAR -0x034 @ 1(r)>
<LVAR -0x036 @ 2(r)>
<LVAR -0x037 @ 1(r)>
<LVAR -0x038 @ 1(r)>
<LVAR -0x03c @ 4(rw)>
<LVAR -0x040 @ 4(w)>
<POP 20b50-20e64 Body> Δ+68
<POP 20b50-20b66 Prologue> Σ0 ↓
<POP 20b66-20b78 RegCacheLoad> Σ0 ↓
<POP 20b78-20b88 Naked> Σ0 Δ-4 ↓
<POP 20b78-20b7a StackAdj> Δ-4 {[-4-]}
<Call 0x20b7a 0x21ea2> {[-4-]}
<MI 20b80 MOVE.L (A7)+,(A6-0x40)> Δ+4 {}
<MI 20b84 MOVEA.L 0x2597c,A0> {}
<MI 20b86 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<POP 20b88-20b94 Naked> Σ-4 ↓ →0x20e5a ←0x20e3a
<MI 20b88 MOVEA.L (A7),A0> {[-4-]}
<MI 20b8a MOVEA.L (A0+0xf4),A1> {[-4-]}
<MI 20b8e CMPA.W #0x01,A1> {[-4-]}
<MI 20b90 BEQ 0x20e5a> {[-4-]}
<POP 20b94-20b9c Naked> Σ-4 ↓ →0x20bfe
<MI 20b94 MOVE.B (A1),D0> {[-4-]}
<MI 20b96 LSL.B #0x1,D0> {[-4-]}
<MI 20b98 LSR.B #0x7,D0> {[-4-]}
<MI 20b9a BEQ 0x20bfe> {[-4-]}
<POP 20b9c-20bb0 Naked> Σ-4 ↓ →0x20bd0
<Blob 0x20b9c [4] 0x2597c> Δ-4 {[-4-]|[«4»]}
<Pointer.fp 0x20b9e <LVAR -0x038 @ 1(r)>> Δ-4 {[-4-]|[«4»]|[@@-56]}
<Call 0x20ba2 0x10478> {[-4-]|[«4»]|[@@-56]}
ExpOutputFlag(exp : Pointer; VAR status : Bool)
<POP 20ba8-20baa StackAdj> Δ+8 {[-4-]}
<MI 20baa TST.B (A6-0x38)> {[-4-]}
<MI 20bae BEQ 0x20bd0> {[-4-]}
<POP 20bb0-20bd0 Naked> Σ-4 →0x20bfa
<Blob 0x20bb0 [4] @> Δ-4 {[-4-]|[«4""»]}
<POP 20bb4-20bb6 StackAdj> Δ-4 {[-4-]|[«4""»]|[-4-]}
<Lit 0x20bb6 4> {[-4-]|[«4""»]|[$$TRUE]}
<MI 20bc8 MOVE.L (A7)+,(A6-0x3c)> Δ+4 {[-4-]|[«4""»]}
<POP 20bcc-20bce StackAdj> Δ+4 {[-4-]}
<MI 20bce BRA 0x20bfa> {[-4-]}
<POP 20bd0-20bfa Naked> Σ-4 ↓ ←0x20b9c
<Blob 0x20bd0 [6] @> Δ-6 {[-4-]|[«6""»]}
<POP 20be0-20be2 StackAdj> Δ-4 {[-4-]|[«6""»]|[-4-]}
<Lit 0x20be2 5> {[-4-]|[«6""»]|[$$FALSE]}
<MI 20bf4 MOVE.L (A7)+,(A6-0x3c)> Δ+4 {[-4-]|[«6""»]}
<POP 20bf8-20bfa StackAdj> Δ+6 {[-4-]}
<POP 20bfa-20bfe Naked> Σ-4 →0x20e20 ←0x20bb0
<MI 20bfa BRA 0x20e20> {[-4-]}
<POP 20bfe-20c1c Naked> Σ-4 →0x20c2c →0x20c5a →0x20c7c →0x20cba →0x20cee →0x20d2c →0x20d56 →0x20d82 ←0x20b94
<MI 20bfe CLR.L D0> {[-4-]}
<MI 20c00 MOVE.B (A1),D0> {[-4-]}
<MI 20c02 LSL.B #0x2,D0> {[-4-]}
<MI 20c04 LSR.B #0x2,D0> {[-4-]}
<MI 20c06 MOVE.W D0,D1> {[-4-]}
<MI 20c08 SUBQ.W #0x1,D1> {[-4-]}
<POP 0x20c0a LimitCheck 0x0 ≤ D1 ≤ 0x7> {[-4-]}
<MI 20c12 ADD.W D1,D1> {[-4-]}
<MI 20c14 SWITCH D1.W> {[-4-]}
<POP 20c2c-20c48 Naked> Σ-4 Δ-14 ↓ ←0x20bfe
<Blob 0x20c2c [4] 0x2597c> Δ-4 {[-4-]|[«4»]}
<Pointer.fp 0x20c2e <LVAR -0x037 @ 1(r)>> Δ-4 {[-4-]|[«4»]|[@@-55]}
<Const 0x20c32 0x0.4> Δ-4 {[-4-]|[«4»]|[@@-55]|[##0]}
<Const 0x20c34 0x0.4> Δ-4 {[-4-]|[«4»]|[@@-55]|[##0]|[##0]}
<Call 0x20c36 0x10472> {[-4-]|[«4»]|[@@-55]|[##0]|[##0]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 20c3c-20c3e StackAdj> Δ+14 {[-4-]|[-2-]}
<MI 20c3e MOVE.B (A6-0x37),(A7)> {[-6-]}
<MI 20c42 PEA.L (A7)> Δ-4 {[-6-]|[4, '^(A7)']}
<Const 0x20c44 0x0.4> Δ-4 {[-6-]|[4, '^(A7)']|[##0]}
<Const 0x20c46 0x0.4> Δ-4 {[-6-]|[4, '^(A7)']|[##0]|[##0]}
<POP 20c48-20c5a Naked> Σ-18 Δ+14 →0x20dba ←0x20c5a
<Pointer.fp 0x20c48 <LVAR -0x012 @ 4(r)>> Δ-4 {[-18-]|[@@-18]}
<Call 0x20c4c 0x104b4> {[-18-]|[@@-18]}
?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
<POP 20c52-20c56 StackAdj> Δ+18 {[-4-]}
<MI 20c56 BRA 0x20dba> {[-4-]}
<POP 20c5a-20c7c Naked> Σ-4 Δ-14 →0x20c48 ←0x20bfe
<Blob 0x20c5a [4] 0x2597c> Δ-4 {[-4-]|[«4»]}
<Pointer.fp 0x20c5c <LVAR -0x036 @ 2(r)>> Δ-4 {[-4-]|[«4»]|[@@-54]}
<Const 0x20c60 0x0.4> Δ-4 {[-4-]|[«4»]|[@@-54]|[##0]}
<Const 0x20c62 0x1.4> Δ-4 {[-4-]|[«4»]|[@@-54]|[##0]|[##1]}
<Call 0x20c66 0x10472> {[-4-]|[«4»]|[@@-54]|[##0]|[##1]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 20c6c-20c6e StackAdj> Δ+14 {[-4-]|[-2-]}
<MI 20c6e MOVE.W (A6-0x36),(A7)> {[-4-]|[2, '(A6-0x36)']}
<MI 20c72 PEA.L (A7)> Δ-4 {[-4-]|[2, '(A6-0x36)']|[4, '^(A7)']}
<Const 0x20c74 0x0.4> Δ-4 {[-4-]|[2, '(A6-0x36)']|[4, '^(A7)']|[##0]}
<Const 0x20c76 0x1.4> Δ-4 {[-4-]|[2, '(A6-0x36)']|[4, '^(A7)']|[##0]|[##1]}
<MI 20c7a BRA 0x20c48> {[-4-]|[2, '(A6-0x36)']|[4, '^(A7)']|[##0]|[##1]}
<POP 20c7c-20ca8 Naked> Σ-4 Δ-16 ↓ ←0x20bfe
<Blob 0x20c7c [4] 0x2597c> Δ-4 {[-4-]|[«4»]}
<Pointer.fp 0x20c7e <LVAR -0x034 @ 1(r)>> Δ-4 {[-4-]|[«4»]|[@@-52]}
<Const 0x20c82 0x0.4> Δ-4 {[-4-]|[«4»]|[@@-52]|[##0]}
<Const 0x20c84 0x2.4> Δ-4 {[-4-]|[«4»]|[@@-52]|[##0]|[##2]}
<Call 0x20c88 0x10472> {[-4-]|[«4»]|[@@-52]|[##0]|[##2]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 20c8e-20c90 StackAdj> Δ+12 {[-4-]|[«4»]}
<MI 20c90 MOVE.B (A6-0x34),(A7)> {[-4-]|[-4-]}
<MI 20c94 MOVE.B (A6-0x33),(A7+0x1)> {[-4-]|[-4-]}
<MI 20c9a MOVE.B (A6-0x32),(A7+0x2)> {[-4-]|[-4-]}
<MI 20ca0 PEA.L (A7)> Δ-4 {[-4-]|[-4-]|[4, '^(A7)']}
<Const 0x20ca2 0x0.4> Δ-4 {[-4-]|[-4-]|[4, '^(A7)']|[##0]}
<Const 0x20ca4 0x2.4> Δ-4 {[-4-]|[-4-]|[4, '^(A7)']|[##0]|[##2]}
<POP 20ca8-20cba Naked> Σ-20 Δ+16 →0x20dba ←0x20cba
<Pointer.fp 0x20ca8 <LVAR -0x012 @ 4(r)>> Δ-4 {[-20-]|[@@-18]}
<Call 0x20cac 0x104b4> {[-20-]|[@@-18]}
?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
<POP 20cb2-20cb6 StackAdj> Δ+20 {[-4-]}
<MI 20cb6 BRA 0x20dba> {[-4-]}
<POP 20cba-20cee Naked> Σ-4 Δ-16 →0x20ca8 ←0x20bfe
<Blob 0x20cba [4] 0x2597c> Δ-4 {[-4-]|[«4»]}
<Pointer.fp 0x20cbc <LVAR -0x031 @ 1(r)>> Δ-4 {[-4-]|[«4»]|[@@-49]}
<Const 0x20cc0 0x0.4> Δ-4 {[-4-]|[«4»]|[@@-49]|[##0]}
<Const 0x20cc2 0x3.4> Δ-4 {[-4-]|[«4»]|[@@-49]|[##0]|[##3]}
<Call 0x20cc6 0x10472> {[-4-]|[«4»]|[@@-49]|[##0]|[##3]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 20ccc-20cce StackAdj> Δ+12 {[-4-]|[«4»]}
<MI 20cce MOVE.B (A6-0x31),(A7)> {[-4-]|[-4-]}
<MI 20cd2 MOVE.B (A6-0x30),(A7+0x1)> {[-4-]|[-4-]}
<MI 20cd8 MOVE.B (A6-0x2f),(A7+0x2)> {[-4-]|[-4-]}
<MI 20cde MOVE.B (A6-0x2e),(A7+0x3)> {[-4-]|[-4-]}
<MI 20ce4 PEA.L (A7)> Δ-4 {[-4-]|[-4-]|[4, '^(A7)']}
<Const 0x20ce6 0x0.4> Δ-4 {[-4-]|[-4-]|[4, '^(A7)']|[##0]}
<Const 0x20ce8 0x3.4> Δ-4 {[-4-]|[-4-]|[4, '^(A7)']|[##0]|[##3]}
<MI 20cec BRA 0x20ca8> {[-4-]|[-4-]|[4, '^(A7)']|[##0]|[##3]}
<POP 20cee-20d1a Naked> Σ-4 Δ-18 ↓ ←0x20bfe
<Blob 0x20cee [4] 0x2597c> Δ-4 {[-4-]|[«4»]}
<Pointer.fp 0x20cf0 <LVAR -0x02d @>> Δ-4 {[-4-]|[«4»]|[@@-45]}
<Const 0x20cf4 0x0.4> Δ-4 {[-4-]|[«4»]|[@@-45]|[##0]}
<Const 0x20cf6 0x4.4> Δ-4 {[-4-]|[«4»]|[@@-45]|[##0]|[##4]}
<Call 0x20cfa 0x10472> {[-4-]|[«4»]|[@@-45]|[##0]|[##4]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 20d00-20d01 StackAdj> Δ+16 ↓ {[-4-]}
<Blob 0x20d01 [6] (A6-0x2d)> Δ-6 {[-4-]|[«6»]}
<MI 20d12 PEA.L (A7)> Δ-4 {[-4-]|[«6»]|[4, '^(A7)']}
<Const 0x20d14 0x0.4> Δ-4 {[-4-]|[«6»]|[4, '^(A7)']|[##0]}
<Const 0x20d16 0x4.4> Δ-4 {[-4-]|[«6»]|[4, '^(A7)']|[##0]|[##4]}
<POP 20d1a-20d2c Naked> Σ-22 Δ+18 →0x20dba ←0x20d2c
<Pointer.fp 0x20d1a <LVAR -0x012 @ 4(r)>> Δ-4 {[-22-]|[@@-18]}
<Call 0x20d1e 0x104b4> {[-22-]|[@@-18]}
?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
<POP 20d24-20d28 StackAdj> Δ+22 {[-4-]}
<MI 20d28 BRA 0x20dba> {[-4-]}
<POP 20d2c-20d56 Naked> Σ-4 Δ-18 →0x20d1a ←0x20bfe
<Blob 0x20d2c [4] 0x2597c> Δ-4 {[-4-]|[«4»]}
<Pointer.fp 0x20d2e <LVAR -0x028 @ 2(r)>> Δ-4 {[-4-]|[«4»]|[@@-40]}
<Const 0x20d32 0x0.4> Δ-4 {[-4-]|[«4»]|[@@-40]|[##0]}
<Const 0x20d34 0x5.4> Δ-4 {[-4-]|[«4»]|[@@-40]|[##0]|[##5]}
<Call 0x20d38 0x10472> {[-4-]|[«4»]|[@@-40]|[##0]|[##5]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 20d3e-20d40 StackAdj> Δ+14 {[-4-]|[-2-]}
<MI 20d40 MOVE.W (A6-0x24),(A7)> {[-4-]|[2, '(A6-0x24)']}
<MI 20d44 MOVE.W (A6-0x26),-(A7)> Δ-2 {[-4-]|[2, '(A6-0x24)']|[2, '(A6-0x26)']}
<MI 20d48 MOVE.W (A6-0x28),-(A7)> Δ-2 {[-4-]|[2, '(A6-0x24)']|[2, '(A6-0x26)']|[2, '(A6-0x28)']}
<MI 20d4c PEA.L (A7)> Δ-4 {[-4-]|[2, '(A6-0x24)']|[2, '(A6-0x26)']|[2, '(A6-0x28)']|[4, '^(A7)']}
<Const 0x20d4e 0x0.4> Δ-4 {[-4-]|[2, '(A6-0x24)']|[2, '(A6-0x26)']|[2, '(A6-0x28)']|[4, '^(A7)']|[##0]}
<Const 0x20d50 0x5.4> Δ-4 {[-4-]|[2, '(A6-0x24)']|[2, '(A6-0x26)']|[2, '(A6-0x28)']|[4, '^(A7)']|[##0]|[##5]}
<MI 20d54 BRA 0x20d1a> {[-4-]|[2, '(A6-0x24)']|[2, '(A6-0x26)']|[2, '(A6-0x28)']|[4, '^(A7)']|[##0]|[##5]}
<POP 20d56-20d82 Naked> Σ-4 Δ-20 →0x20dac ←0x20bfe
<Blob 0x20d56 [4] 0x2597c> Δ-4 {[-4-]|[«4»]}
<Pointer.fp 0x20d58 <LVAR -0x022 @>> Δ-4 {[-4-]|[«4»]|[@@-34]}
<Const 0x20d5c 0x0.4> Δ-4 {[-4-]|[«4»]|[@@-34]|[##0]}
<Const 0x20d5e 0x6.4> Δ-4 {[-4-]|[«4»]|[@@-34]|[##0]|[##6]}
<Call 0x20d62 0x10472> {[-4-]|[«4»]|[@@-34]|[##0]|[##6]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 20d68-20d69 StackAdj> Δ+16 ↓ {[-4-]}
<Blob 0x20d69 [8] (A6-0x22)> Δ-8 {[-4-]|[«8»]}
<MI 20d78 PEA.L (A7)> Δ-4 {[-4-]|[«8»]|[4, '^(A7)']}
<Const 0x20d7a 0x0.4> Δ-4 {[-4-]|[«8»]|[4, '^(A7)']|[##0]}
<Const 0x20d7c 0x6.4> Δ-4 {[-4-]|[«8»]|[4, '^(A7)']|[##0]|[##6]}
<MI 20d80 BRA 0x20dac> {[-4-]|[«8»]|[4, '^(A7)']|[##0]|[##6]}
<POP 20d82-20dac Naked> Σ-4 Δ-20 ↓ ←0x20bfe
<Blob 0x20d82 [4] 0x2597c> Δ-4 {[-4-]|[«4»]}
<Pointer.fp 0x20d84 <LVAR -0x01b @>> Δ-4 {[-4-]|[«4»]|[@@-27]}
<Const 0x20d88 0x0.4> Δ-4 {[-4-]|[«4»]|[@@-27]|[##0]}
<Const 0x20d8a 0x7.4> Δ-4 {[-4-]|[«4»]|[@@-27]|[##0]|[##7]}
<Call 0x20d8e 0x10472> {[-4-]|[«4»]|[@@-27]|[##0]|[##7]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 20d94-20d95 StackAdj> Δ+16 ↓ {[-4-]}
<Blob 0x20d95 [8] (A6-0x1b)> Δ-8 {[-4-]|[«8»]}
<MI 20da4 PEA.L (A7)> Δ-4 {[-4-]|[«8»]|[4, '^(A7)']}
<Const 0x20da6 0x0.4> Δ-4 {[-4-]|[«8»]|[4, '^(A7)']|[##0]}
<Const 0x20da8 0x7.4> Δ-4 {[-4-]|[«8»]|[4, '^(A7)']|[##0]|[##7]}
<POP 20dac-20dba Naked> Σ-24 Δ+20 ↓ ←0x20d56
<Pointer.fp 0x20dac <LVAR -0x012 @ 4(r)>> Δ-4 {[-24-]|[@@-18]}
<Call 0x20db0 0x104b4> {[-24-]|[@@-18]}
?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
<POP 20db6-20dba StackAdj> Δ+24 {[-4-]}
<POP 20dba-20dd0 Naked> Σ-4 ↓ ←0x20c48 ←0x20ca8 ←0x20d1a
<Pointer.fp 0x20dba <LVAR -0x03c @ 4(rw)>> Δ-4 {[-4-]|[@@-60]}
<Call 0x20dbe 0x102b8> {[-4-]|[@@-60]}
NewString(VAR a : String)
<POP 20dc4-20dc6 StackAdj> Δ+4 {[-4-]}
<MI 20dc6 NEG.W D0> {[-4-]}
<MI 20dc8 ADDQ.W #0x8,D0> {[-4-]}
<MI 20dca ASL.W #0x1,D0> {[-4-]}
<MI 20dcc EXTW.L D0> {[-4-]}
<MI 20dce MOVE.L D0,D7> {[-4-]}
<POP 20dd0-20dd4 Naked> Σ-4 ↓ →0x20e20 ←0x20dd4
<MI 20dd0 CMP.L #0x0f,D7> {[-4-]}
<MI 20dd2 BGT 0x20e20> {[-4-]}
<POP 20dd4-20e20 Naked> Σ-4 ↓ →0x20dd0
<POP 20dd4-20dd6 StackAdj> Δ-12 {[-16-]}
<MI 20dd6 MOVE.L (A6-0xe),-(A7)> Δ-4 {[-16-]|[4, '(A6-0xe)']}
<MI 20dda MOVE.L (A6-0x12),-(A7)> Δ-4 {[-16-]|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
<MI 20dde MOVE.L D7,D0> {[-16-]|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
<MI 20de0 ASL.L #0x2,D0> {[-16-]|[4, '(A6-0xe)']|[4, '(A6-0x12)']}
<MI 20de2 MOVE.L D0,-(A7)> Δ-4 {[-16-]|[4, '(A6-0xe)']|[4, '(A6-0x12)']|[4, 'D0']}
<Const 0x20de4 0x4.4> Δ-4 {[-16-]|[4, '(A6-0xe)']|[4, '(A6-0x12)']|[4, 'D0']|[##4]}
<Call 0x20de8 0x1034c> {[-16-]|[4, '(A6-0xe)']|[4, '(A6-0x12)']|[4, 'D0']|[##4]}
FSCALL_1034c
<POP 20dee-20df2 StackAdj> Δ+16 {[-16-]}
<Call 0x20df2 0x10350> {[-16-]}
Quad2Long(a : Quad) : Long
<POP 20df8-20dfa StackAdj> Δ+8 {[-8-]}
<MI 20dfa MOVE.L (A7)+,D6> Δ+4 {[-4-]}
<MI 20dfc MOVE.L (A6-0x3c),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x3c)']}
<MI 20e00 MOVE.L D6,D0> {[-4-]|[4, '(A6-0x3c)']}
<MI 20e02 ADDQ.L #0x1,D0> {[-4-]|[4, '(A6-0x3c)']}
<MI 20e04 SUBQ.L #0x1,D0> {[-4-]|[4, '(A6-0x3c)']}
<POP 0x20e06 LimitCheck 0x0 ≤ D0 ≤ 0xf> {[-4-]|[4, '(A6-0x3c)']}
<MI 20e0c LEA.L 0x20278,A0> {[-4-]|[4, '(A6-0x3c)']}
<MI 20e10 MOVE.B (A0+D0.L),-(A7)> Δ-2 {[-4-]|[4, '(A6-0x3c)']|[2, '(A0+D0.L)']}
<Call 0x20e14 0x102c0> {[-4-]|[4, '(A6-0x3c)']|[2, '(A0+D0.L)']}
AppendChar(MOD b : String; a : char)
<POP 20e1a-20e1c StackAdj> Δ+6 {[-4-]}
<MI 20e1c ADDQ.L #0x1,D7> {[-4-]}
<MI 20e1e BVC 0x20dd0> {[-4-]}
<POP 20e20-20e2a Naked> Σ-4 ↓ →0x20e3a ←0x20bfa ←0x20dd0
<MI 20e20 MOVEA.L (A7),A0> {[-4-]}
<MI 20e22 MOVEA.L (A0+0xf4),A0> {[-4-]}
<MI 20e26 CMPA.W #0x01,A0> {[-4-]}
<MI 20e28 BEQ 0x20e3a> {[-4-]}
<POP 20e2a-20e3a Naked> Σ-4 ↓
<MI 20e2a MOVE.L (A6-0x3c),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x3c)']}
<Const 0x20e2e 0x2c.2> Δ-2 {[-4-]|[4, '(A6-0x3c)']|[#44]}
<Call 0x20e32 0x102c0> {[-4-]|[4, '(A6-0x3c)']|[#44]}
AppendChar(MOD b : String; a : char)
<POP 20e38-20e3a StackAdj> Δ+6 {[-4-]}
<POP 20e3a-20e5a Naked> Σ-4 →0x20b88 ←0x20e20
<Pointer.fp 0x20e3a <LVAR -0x040 @ 4(w)>> Δ-4 {[-4-]|[@@-64]}
<MI 20e3e MOVE.L (A6-0x3c),-(A7)> Δ-4 {[-4-]|[@@-64]|[4, '(A6-0x3c)']}
<Call 0x20e42 0x22440> {[-4-]|[@@-64]|[4, '(A6-0x3c)']}
<POP 20e48-20e4a StackAdj> Δ+8 {[-4-]}
<Pointer.fp 0x20e4a <LVAR -0x03c @ 4(rw)>> Δ-4 {[-4-]|[@@-60]}
<Call 0x20e4e 0x102bc> {[-4-]|[@@-60]}
FreeString(VAR a : String)
<POP 20e54-20e56 StackAdj> Δ+4 {[-4-]}
<MI 20e56 BRA 0x20b88> {[-4-]}
<POP 20e5a-20e5c Naked> Σ-4 Δ+4 ↓ ←0x20b88
<POP 20e5a-20e5c StackAdj> Δ+4 {}
<POP 20e5c-20e64 Epilogue> Σ0
@ 20e64
<LVAR 0x008 1(r)>
<LVAR -0x003 @ 1(r)>
<LVAR -0x004 @>
<LVAR -0x008 @ 4(rw)>
<LVAR -0x00a @ 1(r)>
<POP 20e64-21098 Body> Δ+48
<POP 20e64-20e7a Prologue> Σ0 ↓
<POP 20e7a-20e90 RegCacheLoad> Σ0 ↓
<POP 20e90-20ea0 Naked> Σ0 ↓ →0x20ec2
<MI 20e90 MOVEQ.L #0x00,D7> {}
<MI 20e92 MOVE.B (A6+0x8),D0> {}
<MI 20e94 EXTB.W D0> {}
<MI 20e96 LEA.L 0x2047c,A0> {}
<MI 20e9a TST.B (A0+D0.W)> {}
<MI 20e9e BNE 0x20ec2> {}
<POP 20ea0-20ec2 Naked> Σ0 ↓
<Blob 0x20ea0 [38] @> Δ-38 {[«38""»]}
<POP 20eac-20eae StackAdj> Δ-4 {[«38""»]|[-4-]}
<Lit 0x20eae 38> {[«38""»]|[$$Can't execute multi-board experiments!]}
<Call 0x20ebc 0x2055c> {[«38""»]|[$$Can't execute multi-board experiments!]}
<POP 20ebe-20ec2 StackAdj> Δ+42 {}
<POP 20ec2-20eee Naked> Σ0 ↓ →0x20f12 ←0x20e90
<MI 20ec2 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Blob 0x20ec4 [4] 0x2597c> Δ-4 {[2, 'D0']|[«4»]}
<Call 0x20eca 0x1047e> {[2, 'D0']|[«4»]}
ExpXmit(adr : Byte; b : Pointer)
<POP 20ed0-20ed2 StackAdj> Δ+4 {[2, 'D0']}
<MI 20ed2 MOVE.B D0,(A7)> {[-2-]}
<Pointer.fp 0x20ed4 <LVAR -0x00a @ 1(r)>> Δ-4 {[-2-]|[@@-10]}
<Pointer.fp 0x20ed8 <LVAR -0x004 @>> Δ-4 {[-2-]|[@@-10]|[@@-4]}
<Pointer.fp 0x20edc <LVAR -0x003 @ 1(r)>> Δ-4 {[-2-]|[@@-10]|[@@-4]|[@@-3]}
<Call 0x20ee0 0x10484> {[-2-]|[@@-10]|[@@-4]|[@@-3]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 20ee6-20ee8 StackAdj> Δ+14 {}
<MI 20ee8 TST.B (A6-0x3)> {}
<MI 20eec BNE 0x20f12> {}
<POP 20eee-20f12 Naked> Σ0 ↓
<Blob 0x20eee [16] @> Δ-16 {[«16""»]}
<POP 20efe-20f00 StackAdj> Δ-4 {[«16""»]|[-4-]}
<Lit 0x20f00 15> {[«16""»]|[$$8751 I/O error!]}
<Call 0x20f0e 0x2055c> {[«16""»]|[$$8751 I/O error!]}
<POP 20f10-20f12 StackAdj> Δ+20 {}
<POP 20f12-20f24 Naked> Σ0 ↓ →0x2103c ←0x20ec2 ←0x2108a
<MI 20f12 MOVE.B (A6-0xa),D0> {}
<MI 20f16 EXTB.W D0> {}
<MI 20f18 MOVE.W D0,D1> {}
<MI 20f1a SUBQ.W #0x1,D1> {}
<MI 20f1c CMPI.W #0x0008,D1> {}
<MI 20f20 BHI 0x2103c> {}
<POP 20f24-20f2e Naked> Σ0 →0x20f40 →0x20f96 →0x20f96 →0x20f46 →0x20f6a →0x20f86 →0x2103c →0x2103c →0x20f78
<MI 20f24 ADD.W D1,D1> {}
<MI 20f26 SWITCH D1.W> {}
<POP 20f40-20f46 Naked> Σ0 →0x21070 ←0x20f24
<MI 20f40 MOVEQ.L #0x01,D7> {}
<MI 20f42 BRA 0x21070> {}
<POP 20f46-20f52 Naked> Σ0 Δ-20 ↓ ←0x20f24
<Blob 0x20f46 [20] @> Δ-20 {[«20""»]}
<POP 20f52-20f6a Naked> Σ-20 Δ+20 →0x21070 ←0x20f6a ←0x20f78
<POP 20f52-20f54 StackAdj> Δ-4 {[-24-]}
<Lit 0x20f54> {[-20-]|[$$…]}
<Pointer.sp 0x20f54 4> Δ-4
<Const 0x20f58 0x1.2> Δ-2
<Const 0x20f5a 0x14.2> Δ-2
<Call 0x20f5c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20f5e-20f60 StackAdj> Δ+8
<Call 0x20f60 0x2055c> {[-20-]|[$$…]}
<POP 20f62-20f66 StackAdj> Δ+24 {}
<MI 20f66 BRA 0x21070> {}
<POP 20f6a-20f78 Naked> Σ0 Δ-20 →0x20f52 ←0x20f24
<Blob 0x20f6a [20] @> Δ-20 {[«20""»]}
<MI 20f76 BRA 0x20f52> {[«20""»]}
<POP 20f78-20f86 Naked> Σ0 Δ-20 →0x20f52 ←0x20f24
<Blob 0x20f78 [20] @> Δ-20 {[«20""»]}
<MI 20f84 BRA 0x20f52> {[«20""»]}
<POP 20f86-20f90 Naked> Σ0 Δ-4 ↓ ←0x20f24
<Const 0x20f86 0x28b.4> Δ-4 {[##651]}
<Call 0x20f8a 0x10224> {[##651]}
KC12_Sleep(dur: Long)
<POP 20f90-20f96 Naked> Σ-4 Δ+4 →0x21070 ←0x2102e
<POP 20f90-20f92 StackAdj> Δ+4 {}
<MI 20f92 BRA 0x21070> {}
<POP 20f96-2100c Naked> Σ0 ↓ →0x21010 ←0x20f24 ←0x20f24
<Blob 0x20f96 [10] @> Δ-10 {[«10""»]}
<Blob 0x20fa8 [60] @> Δ-60 {[«10""»]|[«60""»]}
<POP 20fb4-20fb6 StackAdj> Δ-16 {[«10""»]|[«60""»]|[-16-]}
<Lit 0x20fb6 9> {[«10""»]|[«60""»]|[-12-]|[$$Board is_]}
<POP 20fc2-20fc4 StackAdj> Δ-6 {[«10""»]|[«60""»]|[-12-]|[$$Board is_]|[-6-]}
<MI 20fc4 MOVE.B D0,(A7)> {[«10""»]|[«60""»]|[-12-]|[$$Board is_]|[-6-]}
<Call 0x20fc6 0x104a2> {[«10""»]|[«60""»]|[-12-]|[$$Board is_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 20fcc-20fce StackAdj> Δ-2 {[«10""»]|[«60""»]|[-12-]|[$$Board is_]|[-8-]}
<Lit 0x20fce 60> {[«10""»]|[«60""»]|[-12-]|[$$Board is_]|[-4-]|[$$, type "C" to continue the experiment or "E" to end it :_ ]}
<Call 0x20fdc 0x102d4> {[«10""»]|[«60""»]|[-12-]|[$$Board is_]|[-4-]|[$$, type "C" to continue the experiment or "E" to end it :_ ]}
StringCat3(a, b, c : String) : String
<POP 20fe2-20fe6 StackAdj> Δ+12 {[«10""»]|[«60""»]|[-12-]}
<Call 0x20fe6 0x103e4> {[«10""»]|[«60""»]|[-12-]}
AskConsoleString(prompt : String) : String
<POP 20fec-20fee StackAdj> Δ+4 {[«10""»]|[«60""»]|[-8-]}
<Call 0x20fee 0x102f0> {[«10""»]|[«60""»]|[-8-]}
ToUpper(a : String) : String
<POP 20ff4-20ff6 StackAdj> Δ+4 {[«10""»]|[«60""»]|[-4-]}
<MI 20ff6 MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«10""»]|[«60""»]}
<POP 20ffa-20ffe StackAdj> Δ+70 {}
<MI 20ffe MOVEA.L (A6-0x8),A0> {}
<MI 21002 MOVE.B (A0+0x2),D1> {}
<MI 21006 CMPI.B #0x45,D1> {}
<MI 2100a BNE 0x21010> {}
<POP 2100c-21010 Naked> Σ0 →0x2102e
<MI 2100c MOVEQ.L #0x01,D7> {}
<MI 2100e BRA 0x2102e> {}
<POP 21010-21016 Naked> Σ0 ↓ →0x2102e ←0x20f96
<MI 21010 CMPI.B #0x43,D1> {}
<MI 21014 BNE 0x2102e> {}
<POP 21016-2101c Naked> Σ0 ↓ →0x21022
<MI 21016 CMPI.B #0x03,D0> {}
<MI 2101a BNE 0x21022> {}
<POP 2101c-21022 Naked> Σ0 Δ-4 →0x21026
<MI 2101c MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<MI 2101e CLR.B -(A7)> Δ-2 {[2, '(A6+0x8)']|[#0]}
<MI 21020 BRA 0x21026> {[2, '(A6+0x8)']|[#0]}
<POP 21022-21026 Naked> Σ0 Δ-4 ↓ ←0x21016
<MI 21022 MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Const 0x21024 0x1.2> Δ-2 {[2, '(A6+0x8)']|[#1]}
<POP 21026-2102e Naked> Σ-4 Δ+4 ↓ ←0x2101c
<Call 0x21026 0x1048a> {[-4-]}
DiProcCmd(board : Byte; cmd : Byte)
<POP 2102c-2102e StackAdj> Δ+4 {}
<POP 2102e-2103c Naked> Σ0 Δ-4 →0x20f90 ←0x2100c ←0x21010
<Pointer.fp 0x2102e <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x21032 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<MI 21038 BRA 0x20f90> {[@@-8]}
<POP 2103c-21070 Naked> Σ0 ↓ ←0x20f12 ←0x20f24 ←0x20f24
<Blob 0x2103c [28] @> Δ-28 {[«28""»]}
<POP 21048-2104a StackAdj> Δ-8 {[«28""»]|[-8-]}
<Lit 0x2104a 28> {[«28""»]|[-4-]|[$$Can't handle board status =_]}
<POP 21056-21058 StackAdj> Δ-6 {[«28""»]|[-4-]|[$$Can't handle board status =_]|[-6-]}
<MI 21058 MOVE.B D0,(A7)> {[«28""»]|[-4-]|[$$Can't handle board status =_]|[-6-]}
<Call 0x2105a 0x104a2> {[«28""»]|[-4-]|[$$Can't handle board status =_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 21060-21062 StackAdj> Δ+2 {[«28""»]|[-4-]|[$$Can't handle board status =_]|[-4-]}
<Call 0x21062 0x102d0> {[«28""»]|[-4-]|[$$Can't handle board status =_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21068-2106a StackAdj> Δ+8 {[«28""»]|[-4-]}
<Call 0x2106a 0x2055c> {[«28""»]|[-4-]}
<POP 2106c-21070 StackAdj> Δ+32 {}
<POP 21070-21074 Naked> Σ0 ↓ →0x2108a ←0x20f40 ←0x20f52 ←0x20f90
<MI 21070 TST.B D7> {}
<MI 21072 BNE 0x2108a> {}
<POP 21074-2108a Naked> Σ0 ↓
<MI 21074 MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Pointer.fp 0x21076 <LVAR -0x00a @ 1(r)>> Δ-4 {[2, '(A6+0x8)']|[@@-10]}
<Pointer.fp 0x2107a <LVAR -0x004 @>> Δ-4 {[2, '(A6+0x8)']|[@@-10]|[@@-4]}
<Pointer.fp 0x2107e <LVAR -0x003 @ 1(r)>> Δ-4 {[2, '(A6+0x8)']|[@@-10]|[@@-4]|[@@-3]}
<Call 0x21082 0x10484> {[2, '(A6+0x8)']|[@@-10]|[@@-4]|[@@-3]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 21088-2108a StackAdj> Δ+14 {}
<POP 2108a-21090 Naked> Σ0 ↓ →0x20f12 ←0x21070
<MI 2108a TST.B D7> {}
<MI 2108c BEQ 0x20f12> {}
<POP 21090-21098 Epilogue> Σ0
@ 21098
<LVAR 0x008 4(r)>
<LVAR -0x004 4(rw)>
<LVAR -0x00e @ 1(r)>
<LVAR -0x014 @ 1(r)>
<POP 21098-21228 Body>
<POP 21098-210ae Prologue> Σ0 ↓
<POP 210ae-210c0 RegCacheLoad> Σ0 ↓
<POP 210c0-210d6 Naked> Σ0 ↓ →0x21100
<POP 210c0-210c2 StackAdj> Δ-4 {[-4-]}
<MI 210c2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x210c4 0x2226e> {[-4-]|[4, '(A6+0x8)']}
<POP 210ca-210cc StackAdj> Δ+4 {[-4-]}
<MI 210cc MOVE.L (A7)+,D6> Δ+4 {}
<MI 210ce CMPI.L #0x00000002,D6> {}
<MI 210d4 BGE 0x21100> {}
<POP 210d6-21100 Naked> Σ0 ↓
<Blob 0x210d6 [30] @> Δ-30 {[«30""»]}
<POP 210e6-210e8 StackAdj> Δ-4 {[«30""»]|[-4-]}
<Lit 0x210e8 29> {[«30""»]|[$$Insufficient arguments to XEQ]}
<Call 0x210f8 0x21e62> {[«30""»]|[$$Insufficient arguments to XEQ]}
<POP 210fe-21100 StackAdj> Δ+34 {}
<POP 21100-2116e Naked> Σ0 ↓ ←0x210c0
<POP 21100-21102 StackAdj> Δ-4 {[-4-]}
<MI 21102 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x21104 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x21108 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 2110e-21110 StackAdj> Δ+8 {[-4-]}
<Pointer.fp 0x21110 <LVAR -0x014 @ 1(r)>> Δ-4 {[-4-]|[@@-20]}
<Call 0x21114 0x2065a> {[-4-]|[@@-20]}
<POP 21118-2111a StackAdj> Δ+8 {}
<MI 2111a MOVE.B (A6-0x14),D0> {}
<MI 2111e EXTB.W D0> {}
<MI 21120 ASL.W #0x2,D0> {}
<MI 21122 LEA.L 0x25974,A0> {}
<MI 21128 MOVE.L (A0+D0.W+#0xc),-(A7)> Δ-4 {[4, '(A0+D0.W+#0xc)']}
<POP 2112c-2112e StackAdj> Δ-8 {[4, '(A0+D0.W+#0xc)']|[-8-]}
<MI 2112e MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A0+D0.W+#0xc)']|[-8-]|[4, '(A6+0x8)']}
<Const 0x21130 0x2.4> Δ-4 {[4, '(A0+D0.W+#0xc)']|[-8-]|[4, '(A6+0x8)']|[##2]}
<Call 0x21134 0x22b8a> {[4, '(A0+D0.W+#0xc)']|[-8-]|[4, '(A6+0x8)']|[##2]}
<POP 2113a-2113c StackAdj> Δ+4 {[4, '(A0+D0.W+#0xc)']|[-8-]|[4, '(A6+0x8)']}
<Lit 0x2113c> {[4, '(A0+D0.W+#0xc)']|[-8-]|[$$…]}
<Pointer.sp 0x2113c 12> Δ-4
<Const 0x21140 0x1.2> Δ-2
<Const 0x21142 0x4.2> Δ-2
<Call 0x21146 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2114c-2114e StackAdj> Δ+8
<Call 0x2114e 0x102d0> {[4, '(A0+D0.W+#0xc)']|[-8-]|[$$…]}
StringCat2(a, b : String) : String
<POP 21154-21156 StackAdj> Δ+8 {[4, '(A0+D0.W+#0xc)']|[-4-]}
<MI 21156 MOVEA.L (A7)+,A4> Δ+4 {[4, '(A0+D0.W+#0xc)']}
<MI 21158 MOVE.L A4,(A7)> {[4, 'A4']}
<Const 0x2115a 0x2597c.4> Δ-4 {[4, 'A4']|[##153980]}
<Call 0x2115c 0x10460> {[4, 'A4']|[##153980]}
ExpLoad(a : String; b: Pointer)
<POP 21162-21164 StackAdj> Δ+8 {}
<MI 21164 MOVEA.L 0x2597c,A0> {}
<MI 21166 MOVE.L (A0+0xf8),(A6-0x4)> {}
<MI 2116c MOVEQ.L #0x02,D7> {}
<POP 2116e-21176 Naked> Σ0 ↓ →0x21186 ←0x2117e
<MI 2116e MOVEA.L (A6-0x4),A0> {}
<MI 21172 CMPA.W #0x01,A0> {}
<MI 21174 BEQ 0x21186> {}
<POP 21176-2117c Naked> Σ0 ↓ →0x2117e
<MI 21176 MOVE.B (A0),D0> {}
<MI 21178 LSR.B #0x7,D0> {}
<MI 2117a BEQ 0x2117e> {}
<POP 2117c-2117e Naked> Σ0 ↓
<MI 2117c ADDQ.L #0x1,D7> {}
<POP 2117e-21186 Naked> Σ0 →0x2116e ←0x21176
<MI 2117e MOVE.L (A0+0x2),(A6-0x4)> {}
<MI 21184 BRA 0x2116e> {}
<POP 21186-2118a Naked> Σ0 ↓ →0x211b2 ←0x2116e
<MI 21186 CMP.L D6,D7> {}
<MI 21188 BEQ 0x211b2> {}
<POP 2118a-211b2 Naked> Σ0 ↓
<Blob 0x2118a [30] @> Δ-30 {[«30""»]}
<POP 2119a-2119c StackAdj> Δ-4 {[«30""»]|[-4-]}
<Lit 0x2119c 29> {[«30""»]|[$$Insufficient arguments to XEQ]}
<Call 0x211ac 0x2055c> {[«30""»]|[$$Insufficient arguments to XEQ]}
<POP 211b0-211b2 StackAdj> Δ+34 {}
<POP 211b2-211ce Naked> Σ0 ↓ →0x21216 ←0x21186
<MI 211b2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<Call 0x211b4 0x20a14> {[4, '(A6+0x8)']}
<POP 211b8-211ba StackAdj> Δ+2 {[-2-]}
<MI 211ba MOVE.B (A6-0x14),(A7)> {[-2-]}
<Call 0x211be 0x20e64> {[-2-]}
<POP 211c2-211c4 StackAdj> Δ+2 {}
<MI 211c4 MOVEA.L 0x2597c,A0> {}
<MI 211c6 MOVE.B (A0+0x11c),D0> {}
<MI 211ca LSR.B #0x7,D0> {}
<MI 211cc BEQ 0x21216> {}
<POP 211ce-211ea Naked> Σ0 ↓ →0x21212
<MI 211ce MOVE.B (A6-0x14),-(A7)> Δ-2 {[2, '(A6-0x14)']}
<Blob 0x211d2 [4] 0x2597c> Δ-4 {[2, '(A6-0x14)']|[«4»]}
<Pointer.fp 0x211d4 <LVAR -0x00e @ 1(r)>> Δ-4 {[2, '(A6-0x14)']|[«4»]|[@@-14]}
<Call 0x211d8 0x10490> {[2, '(A6-0x14)']|[«4»]|[@@-14]}
ExpUpload(adr: Byte; ptr: Pointer; VAR status : Byte)
<POP 211de-211e2 StackAdj> Δ+10 {}
<MI 211e2 MOVE.B (A6-0xe),D0> {}
<MI 211e6 CMP.B #0x01,D0> {}
<MI 211e8 BEQ 0x21212> {}
<POP 211ea-21212 Naked> Σ0 ↓
<Blob 0x211ea [24] @> Δ-24 {[«24""»]}
<POP 211f6-211f8 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x211f8 24> {[«24""»]|[$$I/O error during upload!]}
<Call 0x2120a 0x2055c> {[«24""»]|[$$I/O error during upload!]}
<POP 2120e-21212 StackAdj> Δ+28 {}
<POP 21212-21216 Naked> Σ0 ↓ ←0x211ce
<Call 0x21212 0x20b50> {}
<POP 21216-21220 Naked> Σ0 ↓ ←0x211b2
<Const 0x21216 0x2597c.4> Δ-4 {[##153980]}
<Call 0x21218 0x10496> {[##153980]}
ExpClose(exp : Pointer)
<POP 2121e-21220 StackAdj> Δ+4 {}
<POP 21220-21228 Epilogue> Σ0
@ 21228
<LVAR 0x008 4(r)>
<LVAR -0x001 @>
<LVAR -0x002 @ 1(r)>
<LVAR -0x007 @ 1(r)>
<LVAR -0x008 @ 1(r)>
<POP 21228-21346 Body> Δ+26
<POP 21228-2123e Prologue> Σ0 ↓
<POP 2123e-21242 RegCacheLoad> Σ0 ↓
<POP 21242-21288 Naked> Σ0 ↓ →0x212b2
<Blob 0x21242 [10] @> Δ-10 {[«10""»]}
<MI 2124e MOVE.L (A6+0x8),-(A7)> Δ-4 {[«10""»]|[4, '(A6+0x8)']}
<Const 0x21252 0x1.4> Δ-4 {[«10""»]|[4, '(A6+0x8)']|[##1]}
<Call 0x21256 0x222a4> {[«10""»]|[4, '(A6+0x8)']|[##1]}
<POP 2125c-2125e StackAdj> Δ+10 {[-8-]}
<MI 2125e MOVE.L (A6+0x8),(A7)> {[-4-]|[4, '(A6+0x8)']}
<Const 0x21262 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x21266 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 2126c-2126e StackAdj> Δ+8 {[-4-]}
<Pointer.fp 0x2126e <LVAR -0x008 @ 1(r)>> Δ-4 {[-4-]|[@@-8]}
<Call 0x21272 0x2065a> {[-4-]|[@@-8]}
<POP 21276-21278 StackAdj> Δ+8 {}
<MI 21278 MOVE.B (A6-0x8),D0> {}
<MI 2127c EXTB.W D0> {}
<MI 2127e LEA.L 0x2047c,A0> {}
<MI 21282 TST.B (A0+D0.W)> {}
<MI 21286 BNE 0x212b2> {}
<POP 21288-212b2 Naked> Σ0 ↓
<Blob 0x21288 [30] @> Δ-30 {[«30""»]}
<POP 21294-21296 StackAdj> Δ-4 {[«30""»]|[-4-]}
<Lit 0x21296 30> {[«30""»]|[$$Can't poll non-unique board id]}
<Call 0x212a8 0x21e62> {[«30""»]|[$$Can't poll non-unique board id]}
<POP 212ae-212b2 StackAdj> Δ+34 {}
<POP 212b2-212e2 Naked> Σ0 ↓ →0x21304 ←0x21242
<MI 212b2 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Pointer.fp 0x212b4 <LVAR -0x007 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-7]}
<Pointer.fp 0x212b8 <LVAR -0x002 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-7]|[@@-2]}
<Pointer.fp 0x212bc <LVAR -0x001 @>> Δ-4 {[2, 'D0']|[@@-7]|[@@-2]|[@@-1]}
<Call 0x212c0 0x10484> {[2, 'D0']|[@@-7]|[@@-2]|[@@-1]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 212c6-212c8 StackAdj> Δ+10 {[2, 'D0']|[-2-]}
<MI 212c8 MOVE.B (A6-0x7),D0> {[2, 'D0']|[-2-]}
<MI 212cc EXTB.W D0> {[2, 'D0']|[-2-]}
<MI 212ce EXTW.L D0> {[2, 'D0']|[-2-]}
<MI 212d0 MOVE.L D0,-(A7)> Δ-4 {[2, 'D0']|[-2-]|[4, 'D0']}
<Call 0x212d2 0x102e4> {[2, 'D0']|[-2-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 212d8-212da StackAdj> Δ+4 {[2, 'D0']|[-2-]}
<MI 212da MOVEA.L (A7)+,A4> Δ+4 {}
<MI 212dc TST.B (A6-0x2)> {}
<MI 212e0 BEQ 0x21304> {}
<POP 212e2-21304 Naked> Σ0 Δ-26 →0x21320
<Blob 0x212e2 [6] @> Δ-6 {[«6""»]}
<POP 212f2-212f4 StackAdj> Δ-4 {[«6""»]|[-4-]}
<MI 212f4 MOVE.L A4,-(A7)> Δ-4 {[«6""»]|[-4-]|[4, 'A4']}
<POP 212f6-212f8 StackAdj> Δ-4 {[«6""»]|[-4-]|[4, 'A4']|[-4-]}
<Pointer.sp 0x212f8 12> Δ-4 {[«6""»]|[-4-]|[4, 'A4']|[-4-]|[^^12]}
<Const 0x212fc 0x1.2> Δ-2 {[«6""»]|[-4-]|[4, 'A4']|[-4-]|[^^12]|[#1]}
<Const 0x212fe 0x5.2> Δ-2 {[«6""»]|[-4-]|[4, 'A4']|[-4-]|[^^12]|[#1]|[#5]}
<MI 21302 BRA 0x21320> {[«6""»]|[-4-]|[4, 'A4']|[-4-]|[^^12]|[#1]|[#5]}
<POP 21304-21320 Naked> Σ0 Δ-26 ↓ ←0x212b2
<Blob 0x21304 [2] @> Δ-2 {[«2""»]}
<Blob 0x21308 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x2130c [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 21310-21312 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<MI 21312 MOVE.L A4,-(A7)> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'A4']}
<POP 21314-21316 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'A4']|[-4-]}
<Pointer.sp 0x21316 12> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'A4']|[-4-]|[^^12]}
<Const 0x2131a 0x1.2> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'A4']|[-4-]|[^^12]|[#1]}
<Const 0x2131c 0x6.2> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, 'A4']|[-4-]|[^^12]|[#1]|[#6]}
<POP 21320-2133e Naked> Σ-26 Δ+26 ↓ ←0x212e2
<Call 0x21320 0x102c4> {[-26-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21326-21328 StackAdj> Δ+8 {[-18-]}
<Call 0x21328 0x102d0> {[-18-]}
StringCat2(a, b : String) : String
<POP 2132e-21330 StackAdj> Δ+8 {[-10-]}
<MI 21330 MOVEA.L (A7)+,A4> Δ+4 {[-6-]}
<POP 21332-21334 StackAdj> Δ+6 {}
<MI 21334 MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']}
<Call 0x21336 0x22c2c> {[4, 'A4']}
<POP 2133c-2133e StackAdj> Δ+4 {}
<POP 2133e-21346 Epilogue> Σ0
@ 21346
<LVAR 0x008 4(r)>
<LVAR -0x001 @>
<LVAR -0x002 @>
<LVAR -0x003 @ 1(r)>
<LVAR -0x004 @ 1(r)>
<POP 21346-2140c Body> Δ+4
<POP 21346-2135c Prologue> Σ0 ↓
<POP 2135c-21362 RegCacheLoad> Σ0 ↓
<POP 21362-213ba Naked> Σ0 ↓ →0x213c8
<Blob 0x21362 [10] @> Δ-10 {[«10""»]}
<MI 2136e MOVE.L (A6+0x8),-(A7)> Δ-4 {[«10""»]|[4, '(A6+0x8)']}
<Const 0x21372 0x1.4> Δ-4 {[«10""»]|[4, '(A6+0x8)']|[##1]}
<Call 0x21376 0x222a4> {[«10""»]|[4, '(A6+0x8)']|[##1]}
<POP 2137c-21380 StackAdj> Δ+10 {[-8-]}
<MI 21380 MOVE.L (A6+0x8),(A7)> {[-4-]|[4, '(A6+0x8)']}
<Const 0x21384 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x21388 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 2138e-21390 StackAdj> Δ+8 {[-4-]}
<Pointer.fp 0x21390 <LVAR -0x004 @ 1(r)>> Δ-4 {[-4-]|[@@-4]}
<Call 0x21392 0x2065a> {[-4-]|[@@-4]}
<POP 21396-21398 StackAdj> Δ+6 {[-2-]}
<MI 21398 MOVE.B (A6-0x4),(A7)> {[-2-]}
<Pointer.fp 0x2139a <LVAR -0x003 @ 1(r)>> Δ-4 {[-2-]|[@@-3]}
<Pointer.fp 0x2139e <LVAR -0x002 @>> Δ-4 {[-2-]|[@@-3]|[@@-2]}
<Pointer.fp 0x213a2 <LVAR -0x001 @>> Δ-4 {[-2-]|[@@-3]|[@@-2]|[@@-1]}
<Call 0x213a6 0x10484> {[-2-]|[@@-3]|[@@-2]|[@@-1]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 213ac-213b0 StackAdj> Δ+14 {}
<MI 213b0 MOVE.B (A6-0x3),D0> {}
<MI 213b4 CMPI.B #0x03,D0> {}
<MI 213b8 BNE 0x213c8> {}
<POP 213ba-213be Naked> Σ0 Δ-4 ↓
<MI 213ba MOVE.B (A6-0x4),-(A7)> Δ-2 {[2, '(A6-0x4)']}
<MI 213bc CLR.B -(A7)> Δ-2 {[2, '(A6-0x4)']|[#0]}
<POP 213be-213c8 Naked> Σ-4 Δ+4 →0x21404 ←0x213ce
<Call 0x213be 0x1048a> {[-4-]}
DiProcCmd(board : Byte; cmd : Byte)
<POP 213c4-213c6 StackAdj> Δ+4 {}
<MI 213c6 BRA 0x21404> {}
<POP 213c8-213ce Naked> Σ0 ↓ →0x213d4 ←0x21362
<MI 213c8 CMPI.B #0x02,D0> {}
<MI 213cc BNE 0x213d4> {}
<POP 213ce-213d4 Naked> Σ0 Δ-4 →0x213be
<MI 213ce MOVE.B (A6-0x4),-(A7)> Δ-2 {[2, '(A6-0x4)']}
<Const 0x213d0 0x1.2> Δ-2 {[2, '(A6-0x4)']|[#1]}
<MI 213d2 BRA 0x213be> {[2, '(A6-0x4)']|[#1]}
<POP 213d4-21404 Naked> Σ0 ↓ ←0x213c8
<Blob 0x213d4 [32] @> Δ-32 {[«32""»]}
<POP 213e6-213e8 StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x213e8 31> {[«32""»]|[$$Board is not paused or looping!]}
<Call 0x213fa 0x21e62> {[«32""»]|[$$Board is not paused or looping!]}
<POP 21400-21404 StackAdj> Δ+36 {}
<POP 21404-2140c Epilogue> Σ0 ←0x213be
@ 2140c
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 1(r)>
<POP 2140c-21472 Body>
<POP 2140c-21422 Prologue> Σ0 ↓
<POP 21422-2146a Naked> Σ0 ↓
<Blob 0x21422 [10] @> Δ-10 {[«10""»]}
<MI 2142e MOVE.L (A6+0x8),-(A7)> Δ-4 {[«10""»]|[4, '(A6+0x8)']}
<Const 0x21432 0x1.4> Δ-4 {[«10""»]|[4, '(A6+0x8)']|[##1]}
<Call 0x21436 0x222a4> {[«10""»]|[4, '(A6+0x8)']|[##1]}
<POP 2143c-21440 StackAdj> Δ+10 {[-8-]}
<MI 21440 MOVE.L (A6+0x8),(A7)> {[-4-]|[4, '(A6+0x8)']}
<Const 0x21444 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x21448 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 2144e-21450 StackAdj> Δ+8 {[-4-]}
<Pointer.fp 0x21450 <LVAR -0x004 @ 1(r)>> Δ-4 {[-4-]|[@@-4]}
<Call 0x21454 0x2065a> {[-4-]|[@@-4]}
<POP 21458-2145a StackAdj> Δ+6 {[-2-]}
<MI 2145a MOVE.B (A6-0x4),(A7)> {[-2-]}
<Const 0x2145e 0x2.2> Δ-2 {[-2-]|[#2]}
<Call 0x21462 0x1048a> {[-2-]|[#2]}
DiProcCmd(board : Byte; cmd : Byte)
<POP 21468-2146a StackAdj> Δ+4 {}
<POP 2146a-21472 Epilogue> Σ0
@ 21472
<LVAR 0x00c 1(w)>
<LVAR 0x008 4(r)>
<LVAR -0x006 @ 4(rw)>
<POP 21472-21500 Body>
<POP 21472-21488 Prologue> Σ0 ↓
<POP 21488-21492 RegCacheLoad> Σ0 ↓
<POP 21492-21498 Naked> Σ0 ↓
<MI 21492 MOVE.B #0x09,(A6+0xc)> {}
<MI 21496 MOVEQ.L #0x00,D7> {}
<POP 21498-214ec Naked> Σ0 ↓ →0x214f2 ←0x214f2
<MI 21498 MOVE.B D7,D0> {}
<MI 2149a EXTB.W D0> {}
<MI 2149c MULS.W #0x0c,D0> {}
<MI 2149e LEA.L 0x2048c,A0> {}
<Blob 0x214a2 [12] (A0+D0.W)> Δ-12 {[«12»]}
<POP 214b2-214b4 StackAdj> Δ-4 {[«12»]|[-4-]}
<Lit 0x214b4> {[«12»]|[$$…]}
<Pointer.sp 0x214b4 4> Δ-4
<Const 0x214b8 0x1.2> Δ-2
<Const 0x214ba 0xc.2> Δ-2
<Call 0x214bc 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 214c2-214c4 StackAdj> Δ+8
<MI 214c4 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«12»]}
<POP 214c6-214c8 StackAdj> Δ+6 {[-6-]}
<MI 214c8 MOVE.L (A6-0x6),(A7)> {[-2-]|[4, '(A6-0x6)']}
<MI 214ca MOVE.L (A6+0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x6)']|[4, '(A6+0x8)']}
<Call 0x214ce 0x102c8> {[-2-]|[4, '(A6-0x6)']|[4, '(A6+0x8)']}
StringEqual(a, b : String) : Byte
<POP 214d4-214d6 StackAdj> Δ+8 {[-2-]}
<MI 214d6 MOVE.B (A7)+,D0> Δ+2 {}
<MI 214d8 EXTB.W D0> {}
<POP 0x214da LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 214dc MOVE.B D0,D6> {}
<Pointer.fp 0x214de <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x214e0 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 214e6-214e8 StackAdj> Δ+4 {}
<MI 214e8 TST.B D6> {}
<MI 214ea BEQ 0x214f2> {}
<POP 214ec-214f2 Naked> Σ0 →0x214f8
<MI 214ec MOVE.B D7,(A6+0xc)> {}
<MI 214f0 BRA 0x214f8> {}
<POP 214f2-214f8 Naked> Σ0 ↓ →0x21498 ←0x21498
<MI 214f2 ADDQ.B #0x1,D7> {}
<MI 214f4 CMP.B #0x09,D7> {}
<MI 214f6 BLE 0x21498> {}
<POP 214f8-21500 Epilogue> Σ0 ←0x214ec
@ 21500
<LVAR 0x008 1(r)>
<POP 21500-2158a Body>
<POP 21500-21516 Prologue> Σ0 ↓
<POP 21516-21518 RegCacheLoad> Σ0 ↓
<POP 21518-2152e Naked> Σ0 →0x21554 →0x21532
<MI 21518 MOVE.B (A6+0x8),D0> {}
<MI 2151c EXTB.W D0> {}
<POP 0x2151e LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 21524 ADD.W D0,D0> {}
<MI 21526 SWITCH D0.W> {}
<POP 21532-21554 Naked> Σ0 →0x21582 ←0x21518
<Blob 0x21532 [4] @> Δ-4 {[«4""»]}
<POP 21536-21538 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x21538 4> {[«4""»]|[$$TRUE]}
<Call 0x2154a 0x22c2c> {[«4""»]|[$$TRUE]}
<POP 21550-21552 StackAdj> Δ+8 {}
<MI 21552 BRA 0x21582> {}
<POP 21554-21582 Naked> Σ0 ↓ ←0x21518
<Blob 0x21554 [6] @> Δ-6 {[«6""»]}
<POP 21564-21566 StackAdj> Δ-4 {[«6""»]|[-4-]}
<Lit 0x21566 5> {[«6""»]|[$$FALSE]}
<Call 0x21578 0x22c2c> {[«6""»]|[$$FALSE]}
<POP 2157e-21582 StackAdj> Δ+10 {}
<POP 21582-2158a Epilogue> Σ0 ←0x21532
@ 2158a
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2158a-21674 Body> Δ+20
<POP 2158a-215a0 Prologue> Σ0 ↓
<POP 215a0-215ac RegCacheLoad> Σ0 ↓
<POP 215ac-215d4 Naked> Σ0 →0x215e8 →0x215f2 →0x215fa →0x21602 →0x2160a →0x21624 →0x21636 →0x21648 →0x2165a →0x2166a
<MI 215ac MOVEA.L (A6+0x8),A0> {}
<MI 215b0 MOVE.B #0x01,(A0)> {}
<POP 215b2-215b4 StackAdj> Δ-2 {[-2-]}
<MI 215b4 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x10)']}
<Call 0x215b8 0x21472> {[-2-]|[4, '(A6+0x10)']}
<POP 215bc-215be StackAdj> Δ+4 {[-2-]}
<MI 215be MOVE.B (A7)+,D0> Δ+2 {}
<MI 215c0 EXTB.W D0> {}
<POP 0x215c2 LimitCheck 0x0 ≤ D0 ≤ 0x9> {}
<MI 215ca ADD.W D0,D0> {}
<MI 215cc SWITCH D0.W> {}
<POP 215e8-215ee Naked> Σ0 Δ-4 ↓ ←0x215ac
<MI 215e8 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x215ea 0x21098> {[4, '(A6+0xc)']}
<POP 215ee-215f2 Naked> Σ-4 Δ+4 →0x2166c ←0x215f2 ←0x215fa ←0x21602
<POP 215ee-215f0 StackAdj> Δ+4 {}
<MI 215f0 BRA 0x2166c> {}
<POP 215f2-215fa Naked> Σ0 Δ-4 →0x215ee ←0x215ac
<MI 215f2 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x215f4 0x21228> {[4, '(A6+0xc)']}
<MI 215f8 BRA 0x215ee> {[4, '(A6+0xc)']}
<POP 215fa-21602 Naked> Σ0 Δ-4 →0x215ee ←0x215ac
<MI 215fa MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x215fc 0x2140c> {[4, '(A6+0xc)']}
<MI 21600 BRA 0x215ee> {[4, '(A6+0xc)']}
<POP 21602-2160a Naked> Σ0 Δ-4 →0x215ee ←0x215ac
<MI 21602 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x21604 0x21346> {[4, '(A6+0xc)']}
<MI 21608 BRA 0x215ee> {[4, '(A6+0xc)']}
<POP 2160a-2161a Naked> Σ0 Δ-2 ↓ ←0x215ac
<POP 2160a-2160c StackAdj> Δ-2 {[-2-]}
<Const 0x2160c 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x21610 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 21612-21614 StackAdj> Δ+2 {[-2-]}
<MI 21614 MOVE.B (A7),D0> {[-2-]}
<MI 21616 EXTB.W D0> {[-2-]}
<POP 0x21618 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-2-]}
<POP 2161a-21624 Naked> Σ-2 Δ+2 →0x2166c ←0x21624 ←0x21636 ←0x21648 ←0x2165a
<MI 2161a MOVE.B D0,(A7)> {[-2-]}
<Call 0x2161c 0x21500> {[-2-]}
<POP 21620-21622 StackAdj> Δ+2 {}
<MI 21622 BRA 0x2166c> {}
<POP 21624-21636 Naked> Σ0 Δ-2 →0x2161a ←0x215ac
<POP 21624-21626 StackAdj> Δ-2 {[-2-]}
<Const 0x21626 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x2162a 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2162c-2162e StackAdj> Δ+2 {[-2-]}
<MI 2162e MOVE.B (A7),D0> {[-2-]}
<MI 21630 EXTB.W D0> {[-2-]}
<POP 0x21632 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-2-]}
<MI 21634 BRA 0x2161a> {[-2-]}
<POP 21636-21648 Naked> Σ0 Δ-2 →0x2161a ←0x215ac
<POP 21636-21638 StackAdj> Δ-2 {[-2-]}
<Const 0x21638 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x2163c 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2163e-21640 StackAdj> Δ+2 {[-2-]}
<MI 21640 MOVE.B (A7),D0> {[-2-]}
<MI 21642 EXTB.W D0> {[-2-]}
<POP 0x21644 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-2-]}
<MI 21646 BRA 0x2161a> {[-2-]}
<POP 21648-2165a Naked> Σ0 Δ-2 →0x2161a ←0x215ac
<POP 21648-2164a StackAdj> Δ-2 {[-2-]}
<Const 0x2164a 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x2164e 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 21650-21652 StackAdj> Δ+2 {[-2-]}
<MI 21652 MOVE.B (A7),D0> {[-2-]}
<MI 21654 EXTB.W D0> {[-2-]}
<POP 0x21656 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-2-]}
<MI 21658 BRA 0x2161a> {[-2-]}
<POP 2165a-2166a Naked> Σ0 Δ-2 →0x2161a ←0x215ac
<POP 2165a-2165c StackAdj> Δ-2 {[-2-]}
<Call 0x2165c 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 21662 MOVE.B (A7),D0> {[-2-]}
<MI 21664 EXTB.W D0> {[-2-]}
<POP 0x21666 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-2-]}
<MI 21668 BRA 0x2161a> {[-2-]}
<POP 2166a-2166c Naked> Σ0 ↓ ←0x215ac
<MI 2166a CLR.B (A0)> {}
<POP 2166c-21674 Epilogue> Σ0 ←0x215ee ←0x2161a
@ 21674
<LVAR 0x008 4(r)>
<POP 21674-21784 Body>
<POP 21674-2168a Prologue> Σ0 ↓
<POP 2168a-2169c RegCacheLoad> Σ0 ↓
<POP 2169c-216f2 Naked> Σ0 ↓ →0x21708
<Call 0x2169c 0x10398> {}
FSCALL_10398
<MI 216a2 MOVEA.L (A6+0x8),A0> {}
<MI 216a6 LEA.L 0x2040e,A1> {}
<BlockMove 10,A1,A0> {}
<Const 0x216b2 0x0.4> Δ-4 {[##0]}
<Call 0x216b6 0x104d8> {[##0]}
ExpInit(a : Long)
<POP 216bc-216be StackAdj> Δ+4 {}
<MI 216be MOVE.L 0x20418,0x25980> {}
<MI 216c6 MOVE.L 0x2041c,0x25988> {}
<MI 216ce MOVE.L 0x20420,0x2598c> {}
<MI 216d6 MOVE.L 0x20424,0x25998> {}
<MI 216de MOVE.L 0x20428,0x2599c> {}
<POP 216e6-216e8 StackAdj> Δ-2 {[-2-]}
<Call 0x216e8 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 216ee TST.B (A7)+> Δ+2 {}
<MI 216f0 BEQ 0x21708> {}
<POP 216f2-21708 Naked> Σ0 →0x2171c
<MI 216f2 MOVE.L 0x2042c,0x259b0> {}
<MI 216f6 MOVE.L 0x20430,0x259b4> {}
<MI 216fa MOVE.L 0x20434,0x259b8> {}
<MI 216fe MOVE.L 0x20438,0x259bc> {}
<MI 21706 BRA 0x2171c> {}
<POP 21708-2171c Naked> Σ0 ↓ ←0x2169c
<MI 21708 MOVE.L 0x2043c,0x259b0> {}
<MI 2170c MOVE.L 0x20440,0x259b4> {}
<MI 21710 MOVE.L 0x20444,0x259b8> {}
<MI 21714 MOVE.L 0x20448,0x259bc> {}
<POP 2171c-2177c Naked> Σ0 ↓ ←0x216f2
<MI 2171c MOVE.L 0x2044c,0x25990> {}
<MI 21724 MOVE.L 0x20450,0x259c0> {}
<MI 2172c MOVE.L 0x20454,0x259c8> {}
<MI 21734 MOVE.L 0x20458,0x259cc> {}
<MI 2173c MOVE.L 0x2045c,0x259d8> {}
<MI 21744 MOVE.L 0x20460,0x259dc> {}
<MI 2174c MOVE.L 0x20464,0x259f0> {}
<MI 21754 MOVE.L 0x20468,0x259f4> {}
<MI 2175c MOVE.L 0x2046c,0x259f8> {}
<MI 21764 MOVE.L 0x20470,0x259fc> {}
<MI 2176c MOVE.L 0x20474,0x259d4> {}
<MI 21774 MOVE.L 0x20478,0x259d0> {}
<POP 2177c-21784 Epilogue> Σ0
@ 21e20
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(w)>
<POP 21e20-21e62 Body>
<POP 21e20-21e36 Prologue> Σ0 ↓
<POP 21e36-21e3a Naked> Σ0 ↓
<MI 21e36 MOVEA.L (A6+0x8),A4> {}
<POP 21e3a-21e40 Naked> Σ0 ↓ →0x21e5a ←0x21e40
<MI 21e3a CMPA.W #0x1,A4> {}
<MI 21e3e BEQ 0x21e5a> {}
<POP 21e40-21e5a Naked> Σ0 →0x21e3a
<MI 21e40 MOVE.L A4,(A6-0x4)> {}
<MI 21e44 MOVEA.L (A4+0x8),A4> {}
<Pointer.fp 0x21e48 <LVAR -0x004 @ 4(w)>> Δ-4 {[@@-4]}
<Const 0x21e4c 0xc.4> Δ-4 {[@@-4]|[##12]}
<Call 0x21e50 0x102a8> {[@@-4]|[##12]}
Free2(a : Pointer; b : Long)
<POP 21e56-21e58 StackAdj> Δ+8 {}
<MI 21e58 BRA 0x21e3a> {}
<POP 21e5a-21e62 Epilogue> Σ0 ←0x21e3a
@ 21e62
<LVAR 0x008 4(r)>
<POP 21e62--0001 Body>
<POP 21e62-21e78 Prologue> Σ0 ↓
<POP 21e78-21e82 Naked> Σ0 ↓ →0x21e8c
<MI 21e78 MOVEA.L (A6+0x8),A0> {}
<MI 21e7c CMPA.W #0x1,A0> {}
<MI 21e80 BEQ 0x21e8c> {}
<POP 21e82-21e8c Naked> Σ0 ↓
<MI 21e82 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Call 0x21e84 0x103e0> {[4, 'A0']}
WriteConsoleStringCrLf(str : String)
<POP 21e8a-21e8c StackAdj> Δ+4 {}
<POP 21e8c-21e9a Naked> Σ0 ←0x21e78
<POP 21e8c-21e9a Bailout> {}
<MI 21e8c MOVEA.L (A5+0x8),A7>
<MI 21e90 MOVEA.W #0x0,A6>
<MI 21e94 JMP 0x257cc>
@ 21ea2
<LVAR 0x008 4(w)>
<POP 21ea2-21ec0 Body>
<POP 21ea2-21eb4 Prologue> Σ0 ↓
<POP 21eb4-21ebc Naked> Σ0 ↓
<MI 21eb4 MOVE.L 0x27a08,(A6+0x8)> {}
<POP 21ebc-21ec0 Epilogue> Σ0
@ 21ec0
<LVAR 0x008 1(rw)>
<POP 21ec0-21efe Body>
<POP 21ec0-21ed6 Prologue> Σ0 ↓
<POP 21ed6-21ee4 Naked> Σ0 ↓ →0x21eea
<MI 21ed6 MOVE.L 0x27a08,D0> {}
<MI 21edc CMP.L 0x27a0c,D0> {}
<MI 21ee2 BLE 0x21eea> {}
<POP 21ee4-21eea Naked> Σ0 →0x21ef6
<MI 21ee4 CLR.B (A6+0x8)> {}
<MI 21ee8 BRA 0x21ef6> {}
<POP 21eea-21ef6 Naked> Σ0 ↓ ←0x21ed6
<MI 21eea LEA.L 0x25a00,A0> {}
<MI 21ef0 MOVE.B (A0+D0.L+#0x7),(A6+0x8)> {}
<POP 21ef6-21efe Epilogue> Σ0 ←0x21ee4
@ 21efe
<LVAR 0x008 1(rw)>
<POP 21efe-21f42 Body>
<POP 21efe-21f14 Prologue> Σ0 ↓
<POP 21f14-21f1a RegCacheLoad> Σ0 ↓
<POP 21f1a-21f24 Naked> Σ0 ↓ →0x21f2a
<MI 21f1a MOVE.L 0x27a08,D0> {}
<MI 21f1c CMP.L 0x27a0c,D0> {}
<MI 21f22 BLE 0x21f2a> {}
<POP 21f24-21f2a Naked> Σ0 →0x21f36
<MI 21f24 CLR.B (A6+0x8)> {}
<MI 21f28 BRA 0x21f36> {}
<POP 21f2a-21f36 Naked> Σ0 ↓ ←0x21f1a
<MI 21f2a LEA.L 0x25a00,A0> {}
<MI 21f30 MOVE.B (A0+D0.L+#0x7),(A6+0x8)> {}
<POP 21f36-21f3a Naked> Σ0 ↓ ←0x21f24
<MI 21f36 ADDQ.L #0x1,D0> {}
<MI 21f38 MOVE.L D0,0x27a08> {}
<POP 21f3a-21f42 Epilogue> Σ0
@ 21f42
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 21f42-2201c Body>
<POP 21f42-21f58 Prologue> Σ0 ↓
<POP 21f58-21f6a RegCacheLoad> Σ0 ↓
<POP 21f6a-21f76 Naked> Σ0 ↓ →0x21f80 ←0x22010
<POP 21f6a-21f6c StackAdj> Δ-2 {[-2-]}
<Call 0x21f6c 0x21ec0> {[-2-]}
<MI 21f70 MOVE.B (A7)+,D0> Δ+2 {}
<MI 21f72 CMP.B #0x5b,D0> {}
<MI 21f74 BNE 0x21f80> {}
<POP 21f76-21f80 Naked> Σ0 →0x22010
<Call 0x21f76 0x252ca> {}
<MI 21f7c BRA 0x22010> {}
<POP 21f80-21f8c Naked> Σ0 ↓ →0x21fa4 ←0x21f6a
<MI 21f80 MOVE.L 0x27a08,D6> {}
<POP 21f82-21f84 StackAdj> Δ-2 {[-2-]}
<Call 0x21f84 0x21efe> {[-2-]}
<MI 21f88 MOVE.B (A7)+,D5> Δ+2 {}
<MI 21f8a BNE 0x21fa4> {}
<POP 21f8c-21fa2 Naked> Σ0 →0x22014
<MI 21f8c MOVEA.L (A6+0xc),A0> {}
<MI 21f90 LEA.L 0x21d7a,A1> {}
<BlockMove 8,A1,A0> {}
<MI 21f9c MOVEA.L (A6+0x8),A0> {}
<MI 21f9e MOVE.B #0x02,(A0)> {}
<MI 21fa0 BRA 0x22014> {}
<POP 21fa4-21fa8 Naked> Σ0 ↓ →0x21fb0 ←0x21f80
<MI 21fa4 CMP.B #0x2c,D5> {}
<MI 21fa6 BNE 0x21fb0> {}
<POP 21fa8-21fb0 Naked> Σ0 →0x22000
<MI 21fa8 MOVEA.L (A6+0x8),A0> {}
<MI 21faa MOVE.B #0x03,(A0)> {}
<MI 21fae BRA 0x22000> {}
<POP 21fb0-21fb4 Naked> Σ0 ↓ →0x21fbc ←0x21fa4
<MI 21fb0 CMP.B #0x3b,D5> {}
<MI 21fb2 BNE 0x21fbc> {}
<POP 21fb4-21fbc Naked> Σ0 →0x22000
<MI 21fb4 MOVEA.L (A6+0x8),A0> {}
<MI 21fb6 MOVE.B #0x01,(A0)> {}
<MI 21fba BRA 0x22000> {}
<POP 21fbc-21fc2 Naked> Σ0 ↓ →0x21fc8 ←0x21fb0
<MI 21fbc CMPI.B #0x5d,D5> {}
<MI 21fc0 BNE 0x21fc8> {}
<POP 21fc2-21fc8 Naked> Σ0 →0x22000
<MI 21fc2 MOVEA.L (A6+0x8),A0> {}
<MI 21fc4 MOVE.B #0x02,(A0)> {}
<MI 21fc6 BRA 0x22000> {}
<POP 21fc8-21fcc Naked> Σ0 ↓ ←0x21fbc
<MI 21fc8 MOVEA.L (A6+0x8),A0> {}
<MI 21fca CLR.B (A0)> {}
<POP 21fcc-21fd8 Naked> Σ0 ↓ →0x21fe0 ←0x21ffe
<POP 21fcc-21fce StackAdj> Δ-2 {[-2-]}
<Call 0x21fce 0x21ec0> {[-2-]}
<MI 21fd2 MOVE.B (A7)+,D7> Δ+2 {}
<MI 21fd4 CMP.B #0x5b,D7> {}
<MI 21fd6 BNE 0x21fe0> {}
<POP 21fd8-21fe0 Naked> Σ0 →0x21ffe
<Call 0x21fd8 0x252ca> {}
<MI 21fde BRA 0x21ffe> {}
<POP 21fe0-21fe4 Naked> Σ0 ↓ →0x21ff2 ←0x21fcc
<MI 21fe0 CMP.B #0x3b,D7> {}
<MI 21fe2 BEQ 0x21ff2> {}
<POP 21fe4-21fe8 Naked> Σ0 ↓ →0x21ff2
<MI 21fe4 CMP.B #0x2c,D7> {}
<MI 21fe6 BEQ 0x21ff2> {}
<POP 21fe8-21fee Naked> Σ0 ↓ →0x21ff2
<MI 21fe8 CMPI.B #0x5d,D7> {}
<MI 21fec BEQ 0x21ff2> {}
<POP 21fee-21ff2 Naked> Σ0 ↓ →0x21ff6
<MI 21fee TST.B D7> {}
<MI 21ff0 BNE 0x21ff6> {}
<POP 21ff2-21ff4 Naked> Σ0 →0x22000 ←0x21fe0 ←0x21fe4 ←0x21fe8
<MI 21ff2 BRA 0x22000> {}
<POP 21ff6-21ffe Naked> Σ0 ↓ ←0x21fee
<POP 21ff6-21ff8 StackAdj> Δ-2 {[-2-]}
<Call 0x21ff8 0x21efe> {[-2-]}
<MI 21ffc MOVE.B (A7)+,D7> Δ+2 {}
<POP 21ffe-22000 Naked> Σ0 →0x21fcc ←0x21fd8
<MI 21ffe BRA 0x21fcc> {}
<POP 22000-22010 Naked> Σ0 →0x22014 ←0x21fa8 ←0x21fb4 ←0x21fc2 ←0x21ff2
<MI 22000 MOVEA.L (A6+0xc),A0> {}
<MI 22004 MOVE.L D6,(A0)> {}
<MI 22006 MOVE.L 0x27a08,(A0+0x4)> {}
<MI 2200a SUBQ.L #0x1,(A0+0x4)> {}
<MI 2200e BRA 0x22014> {}
<POP 22010-22014 Naked> Σ0 →0x21f6a ←0x21f76
<MI 22010 BRA 0x21f6a> {}
<POP 22014-2201c Epilogue> Σ0 ←0x21f8c ←0x22000
@ 2201c
<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 2201c-220ba Body>
<POP 2201c-22032 Prologue> Σ0 ↓
<POP 22032-2203c RegCacheLoad> Σ0 ↓
<POP 2203c-22048 Naked> Σ0 ↓ →0x2204e
<MI 2203c MOVEA.L (A6+0x8),A0> {}
<MI 22040 MOVE.B (A0),D0> {}
<MI 22042 CMPI.B #0x01,D0> {}
<MI 22046 BEQ 0x2204e> {}
<POP 22048-2204e Naked> Σ0 ↓ →0x2205c
<MI 22048 CMPI.B #0x02,D0> {}
<MI 2204c BNE 0x2205c> {}
<POP 2204e-2205c Naked> Σ0 →0x22098 ←0x2203c
<MI 2204e MOVE.L 0x21d7a,(A6-0xc)> {}
<MI 22052 MOVE.L 0x21d7e,(A6-0x8)> {}
<MI 22058 MOVE.B D0,(A6-0x4)> {}
<MI 2205a BRA 0x22098> {}
<POP 2205c-2206e Naked> Σ0 ↓ →0x2208a ←0x22048 ←0x22092
<Pointer.fp 0x2205c <LVAR -0x00c @ 4(w)>> Δ-4 {[@@-12]}
<Pointer.fp 0x2205e <LVAR -0x004 @ 1(rw)>> Δ-4 {[@@-12]|[@@-4]}
<Call 0x22060 0x21f42> {[@@-12]|[@@-4]}
<POP 22064-22066 StackAdj> Δ+8 {}
<MI 22066 MOVEA.L (A6+0x8),A0> {}
<MI 2206a TST.B (A6-0x4)> {}
<MI 2206c BEQ 0x2208a> {}
<POP 2206e-22074 Naked> Σ0 ↓ →0x2208a
<MI 2206e MOVE.B (A0),D0> {}
<MI 22070 CMP.B #0x03,D0> {}
<MI 22072 BNE 0x2208a> {}
<POP 22074-2208a Naked> Σ0 →0x22092
<MI 22074 MOVE.B (A6-0x4),D0> {}
<MI 22076 EXTB.W D0> {}
<POP 0x22078 LimitCheck 0x0 ≤ D0 ≤ 0x3> {}
<MI 2207a MOVE.B D0,(A0)> {}
<MI 2207c MOVE.L 0x21d7a,(A6-0xc)> {}
<MI 22080 MOVE.L 0x21d7e,(A6-0x8)> {}
<MI 22086 CLR.B (A6-0x4)> {}
<MI 22088 BRA 0x22092> {}
<POP 2208a-22092 Naked> Σ0 ↓ ←0x2205c ←0x2206e
<MI 2208a MOVE.B (A6-0x4),D0> {}
<MI 2208c EXTB.W D0> {}
<POP 0x2208e LimitCheck 0x0 ≤ D0 ≤ 0x3> {}
<MI 22090 MOVE.B D0,(A0)> {}
<POP 22092-22098 Naked> Σ0 ↓ →0x2205c ←0x22074
<MI 22092 MOVE.B (A6-0x4),D0> {}
<MI 22094 CMP.B #0x03,D0> {}
<MI 22096 BEQ 0x2205c> {}
<POP 22098-220b2 Naked> Σ0 ↓ ←0x2204e
<MI 22098 MOVEA.L (A6+0x10),A0> {}
<MI 2209c LEA.L (A6-0xc),A1> {}
<BlockMove 8,A1,A0> {}
<MI 220a6 MOVEA.L (A6+0xc),A0> {}
<MI 220aa MOVE.B (A6-0x4),D0> {}
<MI 220ac EXTB.W D0> {}
<POP 0x220ae LimitCheck 0x0 ≤ D0 ≤ 0x3> {}
<MI 220b0 MOVE.B D0,(A0)> {}
<POP 220b2-220ba Epilogue> Σ0
@ 220ba
<LVAR 0x008 4(rw)>
<LVAR -0x004 1(rw)>
<LVAR -0x010 2(rw)>
<POP 220ba-221c2 Body>
<POP 220ba-220d0 Prologue> Σ0 ↓
<POP 220d0-220de RegCacheLoad> Σ0 ↓
<POP 220de-220f6 Naked> Σ0 Δ-4 ↓
<MI 220de MOVEQ.L #0x01,D6> {}
<MI 220e0 CLR.W (A6-0x10)> {}
<MI 220e2 MOVEQ.L #0x01,D5> {}
<POP 220e4-220e6 StackAdj> Δ-4 {[-4-]}
<MI 220e6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x220e8 0x102f0> {[-4-]|[4, '(A6+0x8)']}
ToUpper(a : String) : String
<POP 220ee-220f0 StackAdj> Δ+4 {[-4-]}
<MI 220f0 MOVE.L (A7)+,(A6+0x8)> Δ+4 {}
<MI 220f2 MOVEA.L (A6+0x8),A0> {}
<MI 220f4 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<POP 220f6-22102 Naked> Σ-4 ↓ →0x221b0 ←0x22196
<MI 220f6 MOVEA.L (A7),A0> {[-4-]}
<MI 220f8 MOVE.W (A0),D0> {[-4-]}
<MI 220fa EXTW.L D0> {[-4-]}
<MI 220fc CMP.L D0,D6> {[-4-]}
<MI 220fe BGT 0x221b0> {[-4-]}
<POP 22102-22114 Naked> Σ-4 ↓ →0x22116
<MI 22102 CLR.L D0> {[-4-]}
<MI 22104 MOVE.B (A0+D6.L+#0x1),D0> {[-4-]}
<MI 22108 ANDI.W #0x007f,D0> {[-4-]}
<MI 2210c MOVE.B D0,(A6-0x4)> {[-4-]}
<MI 2210e CMPI.B #0x09,D0> {[-4-]}
<MI 22112 BNE 0x22116> {[-4-]}
<POP 22114-22116 Naked> Σ-4 ↓
<MI 22114 MOVE.B #0x20,(A6-0x4)> {[-4-]}
<POP 22116-22122 Naked> Σ-4 ↓ →0x22152 ←0x22102
<MI 22116 CLR.L D0> {[-4-]}
<MI 22118 MOVE.B (A6-0x4),D0> {[-4-]}
<MI 2211a SUB.W #0x20,D0> {[-4-]}
<MI 2211c CMPI.W #0x000c,D0> {[-4-]}
<MI 22120 BHI 0x22152> {[-4-]}
<POP 22122-2212c Naked> Σ-4 →0x2214a →0x22146 →0x22152 →0x22152 →0x22152 →0x22152 →0x22152 →0x22152 →0x22152 →0x22152 →0x22152 →0x22152 →0x2214e
<MI 22122 ADD.W D0,D0> {[-4-]}
<MI 22124 SWITCH D0.W> {[-4-]}
<POP 22146-22148 Naked> Σ-4 →0x221b0 ←0x22122
<MI 22146 BRA 0x221b0> {[-4-]}
<POP 2214a-2214e Naked> Σ-4 →0x22154 ←0x22122
<MI 2214a MOVEQ.L #0x00,D7> {[-4-]}
<MI 2214c BRA 0x22154> {[-4-]}
<POP 2214e-22152 Naked> Σ-4 →0x22154 ←0x22122
<MI 2214e MOVEQ.L #0x01,D7> {[-4-]}
<MI 22150 BRA 0x22154> {[-4-]}
<POP 22152-22154 Naked> Σ-4 ↓ ←0x22116 ←0x22122 ←0x22122 ←0x22122 ←0x22122 ←0x22122 ←0x22122 ←0x22122 ←0x22122 ←0x22122 ←0x22122
<MI 22152 MOVEQ.L #0x02,D7> {[-4-]}
<POP 22154-22178 Naked> Σ-4 →0x2217e →0x22180 →0x2218a ←0x2214a ←0x2214e
<MI 22154 MOVEQ.L #0x03,D0> {[-4-]}
<MI 22156 MULS.W (A6-0x10),D0> {[-4-]}
<MI 22158 LEA.L 0x21d82,A0> {[-4-]}
<MI 2215c LEA.L (A0+D0.W),A0> {[-4-]}
<MI 22160 CLR.L D0> {[-4-]}
<MI 22162 MOVE.B (A0+D7.W),D0> {[-4-]}
<POP 0x22166 LimitCheck 0x0 ≤ D0 ≤ 0x2> {[-4-]}
<MI 2216e ADD.W D0,D0> {[-4-]}
<MI 22170 SWITCH D0.W> {[-4-]}
<POP 2217e-22180 Naked> Σ-4 →0x22196 ←0x22154
<MI 2217e BRA 0x22196> {[-4-]}
<POP 22180-2218a Naked> Σ-4 →0x22196 ←0x22154
<MI 22180 MOVEA.L (A7),A0> {[-4-]}
<MI 22182 MOVE.B (A6-0x4),(A0+D5.L+#0x1)> {[-4-]}
<MI 22186 ADDQ.L #0x1,D5> {[-4-]}
<MI 22188 BRA 0x22196> {[-4-]}
<POP 2218a-22196 Naked> Σ-4 ↓ ←0x22154
<MI 2218a MOVEA.L (A7),A0> {[-4-]}
<MI 2218c MOVE.B #0x2c,(A0+D5.L+#0x1)> {[-4-]}
<MI 22192 ADDQ.L #0x1,D5> {[-4-]}
<MI 22194 SUBQ.L #0x1,D6> {[-4-]}
<POP 22196-221b0 Naked> Σ-4 →0x220f6 ←0x2217e ←0x22180
<MI 22196 MOVEQ.L #0x03,D0> {[-4-]}
<MI 22198 MULS.W (A6-0x10),D0> {[-4-]}
<MI 2219a LEA.L 0x21d8b,A0> {[-4-]}
<MI 2219e LEA.L (A0+D0.W),A0> {[-4-]}
<MI 221a2 CLR.L D0> {[-4-]}
<MI 221a4 MOVE.B (A0+D7.W),D0> {[-4-]}
<MI 221a8 MOVE.W D0,(A6-0x10)> {[-4-]}
<MI 221aa ADDQ.L #0x1,D6> {[-4-]}
<MI 221ac BRA 0x220f6> {[-4-]}
<POP 221b0-221ba Naked> Σ-4 Δ+4 ↓ ←0x220f6 ←0x22146
<MI 221b0 MOVEA.L (A7),A0> {[-4-]}
<MI 221b2 MOVE.L D5,D0> {[-4-]}
<MI 221b4 SUBQ.L #0x1,D0> {[-4-]}
<MI 221b6 MOVE.W D0,(A0)> {[-4-]}
<POP 221b8-221ba StackAdj> Δ+4 {}
<POP 221ba-221c2 Epilogue> Σ0
@ 221c2
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @ 1(r)>
<LVAR -0x00a @>
<LVAR -0x00e @ 4(r)>
<LVAR -0x014 @ 1(r)>
<POP 221c2-2226e Body>
<POP 221c2-221d8 Prologue> Σ0 ↓
<POP 221d8-221de RegCacheLoad> Σ0 ↓
<POP 221de-221ec Naked> Σ0 ↓ →0x221f4
<POP 221de-221e0 StackAdj> Δ-2 {[-2-]}
<Call 0x221e0 0x21ec0> {[-2-]}
<MI 221e4 MOVE.B (A7)+,D0> Δ+2 {}
<MI 221e6 CMPI.B #0x5b,D0> {}
<MI 221ea BNE 0x221f4> {}
<POP 221ec-221f4 Naked> Σ0 ↓
<POP 221ec-221ee StackAdj> Δ-2 {[-2-]}
<Call 0x221ee 0x21efe> {[-2-]}
<MI 221f2 MOVE.B (A7)+,D7> Δ+2 {}
<POP 221f4-221fe Naked> Σ0 ↓ ←0x221de
<MI 221f4 MOVEA.L (A6+0xc),A0> {}
<MI 221f8 MOVE.L #0x01,(A0)> {}
<MI 221fa CLR.B (A6-0x14)> {}
<POP 221fe-22218 Naked> Σ0 ↓ →0x2224e ←0x2224e
<Pointer.fp 0x221fe <LVAR -0x00a @>> Δ-4 {[@@-10]}
<Pointer.fp 0x22202 <LVAR -0x002 @ 1(r)>> Δ-4 {[@@-10]|[@@-2]}
<Pointer.fp 0x22206 <LVAR -0x014 @ 1(r)>> Δ-4 {[@@-10]|[@@-2]|[@@-20]}
<Call 0x2220a 0x2201c> {[@@-10]|[@@-2]|[@@-20]}
<POP 2220e-22212 StackAdj> Δ+12 {}
<MI 22212 TST.B (A6-0x2)> {}
<MI 22216 BNE 0x2224e> {}
<POP 22218-22244 Naked> Σ0 ↓ →0x22248
<Pointer.fp 0x22218 <LVAR -0x00e @ 4(r)>> Δ-4 {[@@-14]}
<Const 0x2221a 0xc.4> Δ-4 {[@@-14]|[##12]}
<Call 0x2221e 0x1029c> {[@@-14]|[##12]}
Malloc1(length : Long) : Pointer
<POP 22224-22226 StackAdj> Δ+8 {}
<MI 22226 MOVEA.L (A6-0xe),A0> {}
<MI 22228 MOVEA.L A0,A1> {}
<MI 2222a LEA.L (A6-0xa),A2> {}
<BlockMove 8,A2,A1> {}
<MI 22236 MOVE.L #0x01,(A0+0x8)> {}
<MI 2223a MOVEA.L (A6+0xc),A0> {}
<MI 2223e MOVEA.L (A0),A1> {}
<MI 22240 CMPA.W #0x01,A1> {}
<MI 22242 BNE 0x22248> {}
<POP 22244-22248 Naked> Σ0 →0x2224c
<MI 22244 MOVE.L (A6-0xe),(A0)> {}
<MI 22246 BRA 0x2224c> {}
<POP 22248-2224c Naked> Σ0 ↓ ←0x22218
<MI 22248 MOVE.L (A6-0xe),(A4+0x8)> {}
<POP 2224c-2224e Naked> Σ0 ↓ ←0x22244
<MI 2224c MOVEA.L (A6-0xe),A4> {}
<POP 2224e-22254 Naked> Σ0 ↓ →0x221fe ←0x221fe
<MI 2224e TST.B (A6-0x2)> {}
<MI 22252 BEQ 0x221fe> {}
<POP 22254-22264 Naked> Σ0 ↓ →0x22266
<MI 22254 MOVEA.L (A6+0x8),A0> {}
<MI 22258 CLR.B (A0)> {}
<MI 2225a MOVE.B (A6-0x2),D0> {}
<MI 2225e CMPI.B #0x02,D0> {}
<MI 22262 BNE 0x22266> {}
<POP 22264-22266 Naked> Σ0 ↓
<MI 22264 ADDQ.B #0x1,(A0)> {}
<POP 22266-2226e Epilogue> Σ0 ←0x22254
@ 2226e
<LVAR 0x00c 4(w)>
<LVAR 0x008 4(r)>
<POP 2226e-222a4 Body>
<POP 2226e-22284 Prologue> Σ0 ↓
<POP 22284-2228a Naked> Σ0 ↓
<MI 22284 MOVEQ.L #-0x01,D7> {}
<MI 22286 MOVEA.L (A6+0x8),A4> {}
<POP 2228a-22290 Naked> Σ0 ↓ →0x22298 ←0x22290
<MI 2228a CMPA.W #0x1,A4> {}
<MI 2228e BEQ 0x22298> {}
<POP 22290-22298 Naked> Σ0 →0x2228a
<MI 22290 ADDQ.L #0x1,D7> {}
<MI 22292 MOVEA.L (A4+0x8),A4> {}
<MI 22296 BRA 0x2228a> {}
<POP 22298-2229c Naked> Σ0 ↓ ←0x2228a
<MI 22298 MOVE.L D7,(A6+0xc)> {}
<POP 2229c-222a4 Epilogue> Σ0
@ 222a4
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 222a4-22330 Body>
<POP 222a4-222ba Prologue> Σ0 ↓
<POP 222ba-222bc RegCacheLoad> Σ0 ↓
<POP 222bc-222d0 Naked> Σ0 ↓ →0x22328
<POP 222bc-222be StackAdj> Δ-4 {[-4-]}
<MI 222be MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<Call 0x222c2 0x2226e> {[-4-]|[4, '(A6+0xc)']}
<POP 222c6-222c8 StackAdj> Δ+4 {[-4-]}
<MI 222c8 MOVE.L (A7)+,D0> Δ+4 {}
<MI 222ca CMP.L (A6+0x8),D0> {}
<MI 222ce BEQ 0x22328> {}
<POP 222d0-22328 Naked> Σ0 ↓
<MI 222d0 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x222d4 0x21e20> {[4, '(A6+0xc)']}
<POP 222d8-222da StackAdj> Δ+4 {}
<Blob 0x222da [32] @> Δ-32 {[«32""»]}
<Blob 0x222e6 [10] (A6+0x1a)> Δ-10 {[«32""»]|[«10»]}
<POP 222f2-222f4 StackAdj> Δ-8 {[«32""»]|[«10»]|[-8-]}
<Lit 0x222f4 32> {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]}
<POP 22304-22306 StackAdj> Δ-4 {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]|[-4-]}
<Lit 0x22306> {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]|[$$…]}
<Pointer.sp 0x22306 12> Δ-4
<Const 0x2230a 0x1.2> Δ-2
<Const 0x2230c 0xa.2> Δ-2
<Call 0x22310 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22316-22318 StackAdj> Δ+8
<Call 0x22318 0x102d0> {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 2231e-22320 StackAdj> Δ+8 {[«32""»]|[«10»]|[-4-]}
<Call 0x22320 0x21e62> {[«32""»]|[«10»]|[-4-]}
<POP 22324-22328 StackAdj> Δ+46 {}
<POP 22328-22330 Epilogue> Σ0 ←0x222bc
@ 22330
<LVAR 0x014 1(rw)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22330-223b6 Body> Δ-4
<POP 22330-22346 Prologue> Σ0 ↓
<POP 22346-2235a Naked> Σ0 ↓ →0x223a8
<MI 22346 CLR.B (A6+0x14)> {}
<MI 2234a MOVE.L (A6+0x10),D0> {}
<MI 2234e ADD.L (A6+0x8),D0> {}
<MI 22352 CMP.L 0x27a0c,D0> {}
<MI 22358 BGT 0x223a8> {}
<POP 2235a-22360 Naked> Σ0 Δ-4 ↓
<MI 2235a MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 2235e MOVEQ.L #0x01,D7> {[4, '(A6+0x8)']}
<POP 22360-22364 Naked> Σ-4 ↓ →0x223a6 ←0x223a2
<MI 22360 CMP.L (A7),D7> {[-4-]}
<MI 22362 BGT 0x223a6> {[-4-]}
<POP 22364-2239e Naked> Σ-4 ↓ →0x223a2
<MI 22364 MOVE.L (A6+0x10),D0> {[-4-]}
<MI 22368 ADD.L D7,D0> {[-4-]}
<MI 2236a SUBQ.L #0x1,D0> {[-4-]}
<POP 0x2236c LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {[-4-]}
<MI 22376 LEA.L 0x25a00,A0> {[-4-]}
<MI 2237c MOVE.L (A6+0xc),D1> {[-4-]}
<MI 22380 ADD.L D7,D1> {[-4-]}
<MI 22382 SUBQ.L #0x1,D1> {[-4-]}
<MI 22384 SUBQ.L #0x1,D1> {[-4-]}
<POP 0x22386 LimitCheck 0x0 ≤ D1 ≤ 0x3e> {[-4-]}
<MI 22390 LEA.L 0x21966,A1> {[-4-]}
<MI 22394 MOVE.B (A0+D0.L+#0x8),D0> {[-4-]}
<MI 22398 CMP.B (A1+D1.L),D0> {[-4-]}
<MI 2239c BEQ 0x223a2> {[-4-]}
<POP 2239e-223a2 Naked> Σ-4 Δ+4 →0x223ae
<POP 2239e-223a0 StackAdj> Δ+4 {}
<MI 223a0 BRA 0x223ae> {}
<POP 223a2-223a6 Naked> Σ-4 ↓ →0x22360 ←0x22364
<MI 223a2 ADDQ.L #0x1,D7> {[-4-]}
<MI 223a4 BVC 0x22360> {[-4-]}
<POP 223a6-223a8 Naked> Σ-4 Δ+4 ↓ ←0x22360
<POP 223a6-223a8 StackAdj> Δ+4 {}
<POP 223a8-223ae Naked> Σ0 ↓ ←0x22346
<MI 223a8 MOVE.B #0x01,(A6+0x14)> {}
<POP 223ae-223b6 Epilogue> Σ0 ←0x2239e
@ 223b6
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 223b6-22440 Body>
<POP 223b6-223cc Prologue> Σ0 ↓
<POP 223cc-223d6 RegCacheLoad> Σ0 ↓
<POP 223d6-223da Naked> Σ0 ↓ →0x22418
<MI 223d6 TST.L (A6+0x8)> {}
<MI 223d8 BGE 0x22418> {}
<POP 223da-223e8 Naked> Σ0 ↓ →0x22418
<MI 223da MOVE.L (A6+0x8),D0> {}
<MI 223dc NEG.L D0> {}
<MI 223de ADD.L 0x27a0c,D0> {}
<MI 223e0 CMPI.L #0x00002000,D0> {}
<MI 223e6 BLE 0x22418> {}
<POP 223e8-22418 Naked> Σ0 ↓
<Blob 0x223e8 [28] @> Δ-28 {[«28""»]}
<POP 223fa-223fc StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x223fc 27> {[«28""»]|[$$Evaluation buffer overflow.]}
<Call 0x22410 0x21e62> {[«28""»]|[$$Evaluation buffer overflow.]}
<POP 22414-22418 StackAdj> Δ+32 {}
<POP 22418-22438 Naked> Σ0 ↓ ←0x223d6 ←0x223da
<MI 22418 LEA.L 0x25a08,A0> {}
<MI 2241e MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Blob 0x22420 [4] 0x27a0c> Δ-4 {[4, 'A0']|[«4»]}
<MI 22422 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, 'A0']|[«4»]|[4, '(A6+0xc)']}
<MI 22426 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, 'A0']|[«4»]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x22428 0x10364> {[4, 'A0']|[«4»]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
MovStringTail(Base, Len, Ptr, Delta)
<POP 2242e-22432 StackAdj> Δ+16 {}
<MI 22432 MOVE.L 0x27a0c,D0> {}
<MI 22434 SUB.L (A6+0x8),D0> {}
<MI 22436 MOVE.L D0,0x27a0c> {}
<POP 22438-22440 Epilogue> Σ0
@ 22440
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22440-224ca Body>
<POP 22440-22456 Prologue> Σ0 ↓
<POP 22456-2245a RegCacheLoad> Σ0 ↓
<POP 2245a-2247a Naked> Σ0 Δ-8 ↓
<MI 2245a MOVEA.L (A6+0x8),A0> {}
<MI 2245e MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 22460 MOVEA.L (A6+0xc),A1> {[4, 'A0']}
<MI 22462 MOVE.L (A1),-(A7)> Δ-4 {[4, 'A0']|[4, '(A1)']}
<MI 22464 MOVE.W (A0),D0> {[4, 'A0']|[4, '(A1)']}
<MI 22466 EXTW.L D0> {[4, 'A0']|[4, '(A1)']}
<MI 22468 NEG.L D0> {[4, 'A0']|[4, '(A1)']}
<MI 2246a MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, '(A1)']|[4, 'D0']}
<Call 0x2246c 0x223b6> {[4, 'A0']|[4, '(A1)']|[4, 'D0']}
<POP 22470-22472 StackAdj> Δ+8 {[4, 'A0']}
<MI 22472 MOVE.W (A0),D0> {[4, 'A0']}
<MI 22474 EXTW.L D0> {[4, 'A0']}
<MI 22476 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<MI 22478 MOVEQ.L #0x01,D7> {[4, 'A0']|[4, 'D0']}
<POP 2247a-2247e Naked> Σ-8 ↓ →0x224b4 ←0x2247e
<MI 2247a CMP.L (A7),D7> {[-8-]}
<MI 2247c BGT 0x224b4> {[-8-]}
<POP 2247e-224b4 Naked> Σ-8 ↓ →0x2247a
<MI 2247e MOVEA.L (A6+0xc),A0> {[-8-]}
<MI 22480 MOVE.L D7,D0> {[-8-]}
<MI 22482 ADD.L (A0),D0> {[-8-]}
<MI 22484 SUBQ.L #0x1,D0> {[-8-]}
<MI 22486 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x22488 LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {[-8-]}
<MI 22492 LEA.L 0x25a00,A0> {[-8-]}
<MI 22498 MOVE.L D7,D1> {[-8-]}
<MI 2249a SUBQ.L #0x1,D1> {[-8-]}
<POP 0x2249c LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 224a6 MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 224aa MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8)> {[-8-]}
<MI 224b0 ADDQ.L #0x1,D7> {[-8-]}
<MI 224b2 BVC 0x2247a> {[-8-]}
<POP 224b4-224c2 Naked> Σ-8 Δ+8 ↓ ←0x2247a
<POP 224b4-224b6 StackAdj> Δ+4 {[-4-]}
<MI 224b6 MOVEA.L (A6+0xc),A0> {[-4-]}
<MI 224b8 MOVEA.L (A7),A1> {[-4-]}
<MI 224ba MOVE.W (A1),D0> {[-4-]}
<MI 224bc EXTW.L D0> {[-4-]}
<MI 224be ADD.L D0,(A0)> {[-4-]}
<POP 224c0-224c2 StackAdj> Δ+4 {}
<POP 224c2-224ca Epilogue> Σ0
@ 224ca
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 224ca-2264a Body>
<POP 224ca-224e0 Prologue> Σ0 ↓
<POP 224e0-224ee RegCacheLoad> Σ0 ↓
<POP 224ee-22500 Naked> Σ0 ↓
<MI 224ee MOVEQ.L #0x00,D7> {}
<MI 224f0 MOVEA.L (A6+0xc),A0> {}
<MI 224f4 CLR.L (A0)> {}
<MI 224f6 MOVEA.L (A6+0x8),A0> {}
<MI 224f8 CLR.L (A0)> {}
<MI 224fa MOVE.L 0x27a08,D6> {}
<POP 22500-22520 Naked> Σ0 ↓ →0x225f2 ←0x225fc ←0x22602
<MI 22500 MOVE.L D6,D0> {}
<MI 22502 SUBQ.L #0x1,D0> {}
<POP 0x22504 LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {}
<MI 2250e LEA.L 0x25a00,A0> {}
<MI 22514 MOVE.B (A0+D0.L+#0x8),D0> {}
<MI 22518 CMPI.B #0x5b,D0> {}
<MI 2251c BNE 0x225f2> {}
<POP 22520-22534 Naked> Σ0 ↓ →0x225b2
<POP 22520-22522 StackAdj> Δ-2 {[-2-]}
<MI 22522 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x22524 0x1.4> Δ-4 {[-2-]|[4, 'D6']|[##1]}
<Const 0x22528 0x3.4> Δ-4 {[-2-]|[4, 'D6']|[##1]|[##3]}
<Call 0x2252c 0x22330> {[-2-]|[4, 'D6']|[##1]|[##3]}
<POP 2252e-22530 StackAdj> Δ+12 {[-2-]}
<MI 22530 TST.B (A7)+> Δ+2 {}
<MI 22532 BNE 0x225b2> {}
<POP 22534-22546 Naked> Σ0 ↓ →0x225b2
<POP 22534-22536 StackAdj> Δ-2 {[-2-]}
<MI 22536 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x22538 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##4]}
<Const 0x2253a 0x3.4> Δ-4 {[-2-]|[4, 'D6']|[##4]|[##3]}
<Call 0x2253e 0x22330> {[-2-]|[4, 'D6']|[##4]|[##3]}
<POP 22540-22542 StackAdj> Δ+12 {[-2-]}
<MI 22542 TST.B (A7)+> Δ+2 {}
<MI 22544 BNE 0x225b2> {}
<POP 22546-22558 Naked> Σ0 ↓ →0x225b2
<POP 22546-22548 StackAdj> Δ-2 {[-2-]}
<MI 22548 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x2254a 0x7.4> Δ-4 {[-2-]|[4, 'D6']|[##7]}
<Const 0x2254e 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##7]|[##4]}
<Call 0x22550 0x22330> {[-2-]|[4, 'D6']|[##7]|[##4]}
<POP 22552-22554 StackAdj> Δ+12 {[-2-]}
<MI 22554 TST.B (A7)+> Δ+2 {}
<MI 22556 BNE 0x225b2> {}
<POP 22558-2256a Naked> Σ0 ↓ →0x225b2
<POP 22558-2255a StackAdj> Δ-2 {[-2-]}
<MI 2255a MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x2255c 0xb.4> Δ-4 {[-2-]|[4, 'D6']|[##11]}
<Const 0x22560 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##11]|[##4]}
<Call 0x22562 0x22330> {[-2-]|[4, 'D6']|[##11]|[##4]}
<POP 22564-22566 StackAdj> Δ+12 {[-2-]}
<MI 22566 TST.B (A7)+> Δ+2 {}
<MI 22568 BNE 0x225b2> {}
<POP 2256a-2257c Naked> Σ0 ↓ →0x225b2
<POP 2256a-2256c StackAdj> Δ-2 {[-2-]}
<MI 2256c MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x2256e 0xf.4> Δ-4 {[-2-]|[4, 'D6']|[##15]}
<Const 0x22572 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##15]|[##4]}
<Call 0x22574 0x22330> {[-2-]|[4, 'D6']|[##15]|[##4]}
<POP 22576-22578 StackAdj> Δ+12 {[-2-]}
<MI 22578 TST.B (A7)+> Δ+2 {}
<MI 2257a BNE 0x225b2> {}
<POP 2257c-2258e Naked> Σ0 ↓ →0x225b2
<POP 2257c-2257e StackAdj> Δ-2 {[-2-]}
<MI 2257e MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x22580 0x13.4> Δ-4 {[-2-]|[4, 'D6']|[##19]}
<Const 0x22584 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##19]|[##4]}
<Call 0x22586 0x22330> {[-2-]|[4, 'D6']|[##19]|[##4]}
<POP 22588-2258a StackAdj> Δ+12 {[-2-]}
<MI 2258a TST.B (A7)+> Δ+2 {}
<MI 2258c BNE 0x225b2> {}
<POP 2258e-225a0 Naked> Σ0 ↓ →0x225b2
<POP 2258e-22590 StackAdj> Δ-2 {[-2-]}
<MI 22590 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x22592 0x17.4> Δ-4 {[-2-]|[4, 'D6']|[##23]}
<Const 0x22596 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##23]|[##4]}
<Call 0x22598 0x22330> {[-2-]|[4, 'D6']|[##23]|[##4]}
<POP 2259a-2259c StackAdj> Δ+12 {[-2-]}
<MI 2259c TST.B (A7)+> Δ+2 {}
<MI 2259e BNE 0x225b2> {}
<POP 225a0-225b2 Naked> Σ0 ↓ →0x225b6
<POP 225a0-225a2 StackAdj> Δ-2 {[-2-]}
<MI 225a2 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x225a4 0x1b.4> Δ-4 {[-2-]|[4, 'D6']|[##27]}
<Const 0x225a8 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##27]|[##4]}
<Call 0x225aa 0x22330> {[-2-]|[4, 'D6']|[##27]|[##4]}
<POP 225ac-225ae StackAdj> Δ+12 {[-2-]}
<MI 225ae TST.B (A7)+> Δ+2 {}
<MI 225b0 BEQ 0x225b6> {}
<POP 225b2-225b6 Naked> Σ0 →0x225f2 ←0x22520 ←0x22534 ←0x22546 ←0x22558 ←0x2256a ←0x2257c ←0x2258e
<MI 225b2 ADDQ.L #0x1,D7> {}
<MI 225b4 BRA 0x225f2> {}
<POP 225b6-225ba Naked> Σ0 ↓ →0x225d6 ←0x225a0
<MI 225b6 TST.L D7> {}
<MI 225b8 BNE 0x225d6> {}
<POP 225ba-225ce Naked> Σ0 ↓ →0x225d6
<POP 225ba-225bc StackAdj> Δ-2 {[-2-]}
<MI 225bc MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x225be 0x1f.4> Δ-4 {[-2-]|[4, 'D6']|[##31]}
<Const 0x225c2 0x5.4> Δ-4 {[-2-]|[4, 'D6']|[##31]|[##5]}
<Call 0x225c6 0x22330> {[-2-]|[4, 'D6']|[##31]|[##5]}
<POP 225c8-225ca StackAdj> Δ+12 {[-2-]}
<MI 225ca TST.B (A7)+> Δ+2 {}
<MI 225cc BEQ 0x225d6> {}
<POP 225ce-225d2 Naked> Σ0 ↓
<MI 225ce MOVEA.L (A6+0xc),A0> {}
<POP 225d2-225d6 Naked> Σ0 →0x225f2 ←0x225ec
<MI 225d2 MOVE.L D6,(A0)> {}
<MI 225d4 BRA 0x225f2> {}
<POP 225d6-225e8 Naked> Σ0 ↓ →0x225f2 ←0x225b6 ←0x225ba
<POP 225d6-225d8 StackAdj> Δ-2 {[-2-]}
<MI 225d8 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x225da 0x24.4> Δ-4 {[-2-]|[4, 'D6']|[##36]}
<Const 0x225de 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##36]|[##4]}
<Call 0x225e0 0x22330> {[-2-]|[4, 'D6']|[##36]|[##4]}
<POP 225e2-225e4 StackAdj> Δ+12 {[-2-]}
<MI 225e4 TST.B (A7)+> Δ+2 {}
<MI 225e6 BEQ 0x225f2> {}
<POP 225e8-225ec Naked> Σ0 ↓ →0x225f0
<MI 225e8 TST.L D7> {}
<MI 225ea BNE 0x225f0> {}
<POP 225ec-225f0 Naked> Σ0 →0x225d2
<MI 225ec MOVEA.L (A6+0x8),A0> {}
<MI 225ee BRA 0x225d2> {}
<POP 225f0-225f2 Naked> Σ0 ↓ ←0x225e8
<MI 225f0 SUBQ.L #0x1,D7> {}
<POP 225f2-225fc Naked> Σ0 ↓ →0x2260a ←0x22500 ←0x225b2 ←0x225d2 ←0x225d6
<MI 225f2 ADDQ.L #0x1,D6> {}
<MI 225f4 CMP.L 0x27a0c,D6> {}
<MI 225fa BGT 0x2260a> {}
<POP 225fc-22602 Naked> Σ0 ↓ →0x22500
<MI 225fc TST.L D7> {}
<MI 225fe BNE 0x22500> {}
<POP 22602-2260a Naked> Σ0 ↓ →0x22500
<MI 22602 MOVEA.L (A6+0x8),A0> {}
<MI 22604 TST.L (A0)> {}
<MI 22606 BEQ 0x22500> {}
<POP 2260a-22612 Naked> Σ0 ↓ →0x22642 ←0x225f2
<MI 2260a CMP.L 0x27a0c,D6> {}
<MI 22610 BLE 0x22642> {}
<POP 22612-22642 Naked> Σ0 ↓
<Blob 0x22612 [28] @> Δ-28 {[«28""»]}
<POP 22624-22626 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x22626 27> {[«28""»]|[$$Unbalanced [ELSE] or [END]!]}
<Call 0x2263a 0x21e62> {[«28""»]|[$$Unbalanced [ELSE] or [END]!]}
<POP 2263e-22642 StackAdj> Δ+32 {}
<POP 22642-2264a Epilogue> Σ0 ←0x2260a
@ 2264a
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 @ 4(rw)>
<POP 2264a-22690 Body>
<POP 2264a-22660 Prologue> Σ0 ↓
<POP 22660-22668 RegCacheLoad> Σ0 ↓
<POP 22668-22676 Naked> Σ0 ↓ →0x22678
<Pointer.fp 0x22668 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Pointer.fp 0x2266a <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-8]|[@@-4]}
<Call 0x2266c 0x224ca> {[@@-8]|[@@-4]}
<POP 22670-22672 StackAdj> Δ+8 {}
<MI 22672 TST.L (A6-0x8)> {}
<MI 22674 BNE 0x22678> {}
<POP 22676-22678 Naked> Σ0 ↓
<MI 22676 MOVE.L (A6-0x4),(A6-0x8)> {}
<POP 22678-22688 Naked> Σ0 ↓ ←0x22668
<MI 22678 MOVE.L (A6-0x4),D0> {}
<MI 2267a ADDQ.L #0x5,D0> {}
<MI 2267c MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 2267e SUB.L (A6-0x8),D0> {[4, 'D0']}
<MI 22680 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']|[4, 'D0']}
<Call 0x22682 0x223b6> {[4, 'D0']|[4, 'D0']}
<POP 22686-22688 StackAdj> Δ+8 {}
<POP 22688-22690 Epilogue> Σ0
@ 22690
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 @ 4(r)>
<POP 22690-226ec Body>
<POP 22690-226a6 Prologue> Σ0 ↓
<POP 226a6-226ae RegCacheLoad> Σ0 ↓
<POP 226ae-226bc Naked> Σ0 ↓ →0x226c2
<Pointer.fp 0x226ae <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Pointer.fp 0x226b0 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-8]|[@@-4]}
<Call 0x226b2 0x224ca> {[@@-8]|[@@-4]}
<POP 226b6-226b8 StackAdj> Δ+8 {}
<MI 226b8 TST.L (A6-0x8)> {}
<MI 226ba BNE 0x226c2> {}
<POP 226bc-226c2 Naked> Σ0 →0x226d4
<MI 226bc MOVE.L (A6-0x4),D0> {}
<MI 226be ADDQ.L #0x5,D0> {}
<MI 226c0 BRA 0x226d4> {}
<POP 226c2-226d4 Naked> Σ0 ↓ ←0x226ae
<MI 226c2 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 226c4 ADDQ.L #0x5,(A7)> {[-4-]}
<Const 0x226c6 0x5.4> Δ-4 {[-4-]|[##5]}
<Call 0x226ca 0x223b6> {[-4-]|[##5]}
<POP 226ce-226d0 StackAdj> Δ+8 {}
<MI 226d0 MOVE.L (A6-0x8),D0> {}
<MI 226d2 ADDQ.L #0x6,D0> {}
<POP 226d4-226e4 Naked> Σ0 ↓ ←0x226bc
<MI 226d4 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 226d6 SUB.L 0x27a08,D0> {[4, 'D0']}
<MI 226dc MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']|[4, 'D0']}
<Call 0x226de 0x223b6> {[4, 'D0']|[4, 'D0']}
<POP 226e2-226e4 StackAdj> Δ+8 {}
<POP 226e4-226ec Epilogue> Σ0
@ 226ec
<LVAR 0x008 4(r)>
<LVAR -0x004 @>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(rw)>
<LVAR -0x010 4(rw)>
<LVAR -0x014 4(rw)>
<POP 226ec-22800 Body>
<POP 226ec-22702 Prologue> Σ0 ↓
<POP 22702-2271a RegCacheLoad> Σ0 ↓
<POP 2271a-2271e Naked> Σ0 ↓ →0x22728
<MI 2271a TST.B 0x27a1a> {}
<MI 2271c BEQ 0x22728> {}
<POP 2271e-22722 Naked> Σ0 ↓ →0x22728
<MI 2271e TST.L 0x27a20> {}
<MI 22720 BNE 0x22728> {}
<POP 22722-22728 Naked> Σ0 ↓
<MI 22722 MOVE.L (A6+0x8),0x27a20> {}
<MI 22726 SUBQ.L #0x1,0x27a20> {}
<POP 22728-2272e Naked> Σ0 ↓ →0x227f8 ←0x2271a ←0x2271e
<MI 22728 TST.B 0x27a1a> {}
<MI 2272a BNE 0x227f8> {}
<POP 2272e-22762 Naked> Σ0 ↓ →0x2277c
<MI 2272e MOVE.L (A6+0x8),0x27a08> {}
<MI 22732 ADDQ.L #0x6,0x27a08> {}
<Pointer.fp 0x22734 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Pointer.fp 0x22736 <LVAR -0x004 @>> Δ-4 {[@@-8]|[@@-4]}
<Call 0x2273a 0x221c2> {[@@-8]|[@@-4]}
<POP 2273e-22740 StackAdj> Δ+8 {}
<Blob 0x22740 [10] @> Δ-10 {[«10""»]}
<MI 2274c MOVE.L (A6-0x8),-(A7)> Δ-4 {[«10""»]|[4, '(A6-0x8)']}
<Const 0x2274e 0x0.4> Δ-4 {[«10""»]|[4, '(A6-0x8)']|[##0]}
<Call 0x22752 0x222a4> {[«10""»]|[4, '(A6-0x8)']|[##0]}
<POP 22756-2275a StackAdj> Δ+18 {}
<MI 2275a TST.B 0x27a24> {}
<MI 22760 BEQ 0x2277c> {}
<POP 22762-2277c Naked> Σ0 →0x22790
<POP 22762-22764 StackAdj> Δ-8 {[-8-]}
<MI 22764 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x8)']}
<Const 0x22766 0x0.4> Δ-4 {[-8-]|[4, '(A6-0x8)']|[##0]}
<Call 0x2276a 0x22bbc> {[-8-]|[4, '(A6-0x8)']|[##0]}
<POP 22770-22772 StackAdj> Δ+8 {[-8-]}
<MI 22772 MOVE.L (A7)+,(A6-0x14)> Δ+4 {[-4-]}
<MI 22776 MOVE.L (A7)+,(A6-0x10)> Δ+4 {}
<MI 2277a BRA 0x22790> {}
<POP 2277c-22790 Naked> Σ0 ↓ ←0x2272e
<POP 2277c-2277e StackAdj> Δ-4 {[-4-]}
<MI 2277e MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x8)']}
<Const 0x22780 0x0.4> Δ-4 {[-4-]|[4, '(A6-0x8)']|[##0]}
<Call 0x22784 0x22b8a> {[-4-]|[4, '(A6-0x8)']|[##0]}
<POP 2278a-2278c StackAdj> Δ+8 {[-4-]}
<MI 2278c MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<POP 22790-227a6 Naked> Σ0 ↓ →0x227d0 ←0x22762
<MI 22790 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<Call 0x22792 0x21e20> {[4, '(A6-0x8)']}
<POP 22796-22798 StackAdj> Δ+4 {}
<MI 22798 MOVE.L 0x27a08,0x27a1c> {}
<MI 2279e TST.B 0x27a24> {}
<MI 227a4 BEQ 0x227d0> {}
<POP 227a6-227d0 Naked> Σ0 →0x227f8
<POP 227a6-227a8 StackAdj> Δ-2 {[-2-]}
<MI 227a8 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x10)']}
<MI 227ac MOVE.L (A6-0x14),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<Blob 0x227b0 [4] 0x27a2e> Δ-4 {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[«4»]}
<Blob 0x227b6 [4] 0x27a2a> Δ-4 {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[«4»]|[«4»]}
<Call 0x227bc 0x1032c> {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[«4»]|[«4»]}
IsEqual(a, b : Quad) : Bool
<POP 227c2-227c6 StackAdj> Δ+16 {[-2-]}
<MI 227c6 MOVE.B (A7)+,D0> Δ+2 {}
<MI 227c8 EXTB.W D0> {}
<POP 0x227ca LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 227cc MOVE.B D0,0x27a1a> {}
<MI 227ce BRA 0x227f8> {}
<POP 227d0-227f8 Naked> Σ0 ↓ ←0x22790
<POP 227d0-227d2 StackAdj> Δ-2 {[-2-]}
<MI 227d2 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-2-]|[4, '(A6-0xc)']}
<Blob 0x227d6 [4] 0x27a26> Δ-4 {[-2-]|[4, '(A6-0xc)']|[«4»]}
<Call 0x227dc 0x102c8> {[-2-]|[4, '(A6-0xc)']|[«4»]}
StringEqual(a, b : String) : Byte
<POP 227e2-227e4 StackAdj> Δ+8 {[-2-]}
<MI 227e4 MOVE.B (A7)+,D0> Δ+2 {}
<MI 227e6 EXTB.W D0> {}
<POP 0x227e8 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 227ea MOVE.B D0,0x27a1a> {}
<Pointer.fp 0x227ec <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x227f0 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<POP 227f6-227f8 StackAdj> Δ+4 {}
<POP 227f8-22800 Epilogue> Σ0 ←0x22728 ←0x227a6
@ 22800
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22800-22982 Body>
<POP 22800-22816 Prologue> Σ0 ↓
<POP 22816-2282a RegCacheLoad> Σ0 ↓
<POP 2282a-2283e Naked> Σ0 ↓
<MI 2282a CLR.B 0x27a1a> {}
<MI 2282c CLR.L 0x27a1c> {}
<MI 22832 CLR.L 0x27a20> {}
<MI 22834 MOVEQ.L #0x00,D7> {}
<MI 22836 MOVEQ.L #0x00,D6> {}
<MI 22838 MOVE.L 0x27a08,D5> {}
<POP 2283e-22844 Naked> Σ0 ↓ →0x228e2 ←0x228de
<MI 2283e TST.L D6> {}
<MI 22840 BNE 0x228e2> {}
<POP 22844-2284e Naked> Σ0 ↓ →0x228e2
<MI 22844 CMP.L 0x27a0c,D5> {}
<MI 2284a BGT 0x228e2> {}
<POP 2284e-2286c Naked> Σ0 ↓ →0x228d8
<MI 2284e MOVE.L D5,D0> {}
<MI 22850 SUBQ.L #0x1,D0> {}
<POP 0x22852 LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {}
<MI 2285c LEA.L 0x25a00,A0> {}
<MI 22862 MOVE.B (A0+D0.L+#0x8),D0> {}
<MI 22866 CMPI.B #0x5b,D0> {}
<MI 2286a BNE 0x228d8> {}
<POP 2286c-22880 Naked> Σ0 ↓ →0x22894
<POP 2286c-2286e StackAdj> Δ-2 {[-2-]}
<MI 2286e MOVE.L D5,-(A7)> Δ-4 {[-2-]|[4, 'D5']}
<Const 0x22870 0x28.4> Δ-4 {[-2-]|[4, 'D5']|[##40]}
<Const 0x22874 0x5.4> Δ-4 {[-2-]|[4, 'D5']|[##40]|[##5]}
<Call 0x22878 0x22330> {[-2-]|[4, 'D5']|[##40]|[##5]}
<POP 2287a-2287c StackAdj> Δ+12 {[-2-]}
<MI 2287c TST.B (A7)+> Δ+2 {}
<MI 2287e BNE 0x22894> {}
<POP 22880-22894 Naked> Σ0 ↓ →0x22898
<POP 22880-22882 StackAdj> Δ-2 {[-2-]}
<MI 22882 MOVE.L D5,-(A7)> Δ-4 {[-2-]|[4, 'D5']}
<Const 0x22884 0x2d.4> Δ-4 {[-2-]|[4, 'D5']|[##45]}
<Const 0x22888 0x6.4> Δ-4 {[-2-]|[4, 'D5']|[##45]|[##6]}
<Call 0x2288c 0x22330> {[-2-]|[4, 'D5']|[##45]|[##6]}
<POP 2288e-22890 StackAdj> Δ+12 {[-2-]}
<MI 22890 TST.B (A7)+> Δ+2 {}
<MI 22892 BEQ 0x22898> {}
<POP 22894-22898 Naked> Σ0 →0x228d8 ←0x2286c
<MI 22894 ADDQ.L #0x1,D7> {}
<MI 22896 BRA 0x228d8> {}
<POP 22898-2289c Naked> Σ0 ↓ →0x228ba ←0x22880
<MI 22898 TST.L D7> {}
<MI 2289a BNE 0x228ba> {}
<POP 2289c-228b0 Naked> Σ0 ↓ →0x228ba
<POP 2289c-2289e StackAdj> Δ-2 {[-2-]}
<MI 2289e MOVE.L D5,-(A7)> Δ-4 {[-2-]|[4, 'D5']}
<Const 0x228a0 0x33.4> Δ-4 {[-2-]|[4, 'D5']|[##51]}
<Const 0x228a4 0x5.4> Δ-4 {[-2-]|[4, 'D5']|[##51]|[##5]}
<Call 0x228a8 0x22330> {[-2-]|[4, 'D5']|[##51]|[##5]}
<POP 228aa-228ac StackAdj> Δ+12 {[-2-]}
<MI 228ac TST.B (A7)+> Δ+2 {}
<MI 228ae BEQ 0x228ba> {}
<POP 228b0-228ba Naked> Σ0 →0x228d8
<MI 228b0 MOVE.L D5,-(A7)> Δ-4 {[4, 'D5']}
<Call 0x228b2 0x226ec> {[4, 'D5']}
<POP 228b6-228b8 StackAdj> Δ+4 {}
<MI 228b8 BRA 0x228d8> {}
<POP 228ba-228ce Naked> Σ0 ↓ →0x228d8 ←0x22898 ←0x2289c
<POP 228ba-228bc StackAdj> Δ-2 {[-2-]}
<MI 228bc MOVE.L D5,-(A7)> Δ-4 {[-2-]|[4, 'D5']}
<Const 0x228be 0x38.4> Δ-4 {[-2-]|[4, 'D5']|[##56]}
<Const 0x228c2 0x8.4> Δ-4 {[-2-]|[4, 'D5']|[##56]|[##8]}
<Call 0x228c6 0x22330> {[-2-]|[4, 'D5']|[##56]|[##8]}
<POP 228c8-228ca StackAdj> Δ+12 {[-2-]}
<MI 228ca TST.B (A7)+> Δ+2 {}
<MI 228cc BEQ 0x228d8> {}
<POP 228ce-228d2 Naked> Σ0 ↓ →0x228d6
<MI 228ce TST.L D7> {}
<MI 228d0 BNE 0x228d6> {}
<POP 228d2-228d6 Naked> Σ0 →0x228d8
<MI 228d2 MOVE.L D5,D6> {}
<MI 228d4 BRA 0x228d8> {}
<POP 228d6-228d8 Naked> Σ0 ↓ ←0x228ce
<MI 228d6 SUBQ.L #0x1,D7> {}
<POP 228d8-228dc Naked> Σ0 ↓ →0x228de ←0x2284e ←0x22894 ←0x228b0 ←0x228ba ←0x228d2
<MI 228d8 TST.L D6> {}
<MI 228da BNE 0x228de> {}
<POP 228dc-228de Naked> Σ0 ↓
<MI 228dc ADDQ.L #0x1,D5> {}
<POP 228de-228e2 Naked> Σ0 →0x2283e ←0x228d8
<MI 228de BRA 0x2283e> {}
<POP 228e2-228ea Naked> Σ0 ↓ →0x228f8 ←0x2283e ←0x22844
<MI 228e2 TST.B 0x27a24> {}
<MI 228e8 BNE 0x228f8> {}
<POP 228ea-228f8 Naked> Σ0 ↓
<Const 0x228ea 0x27a26.4> Δ-4 {[##162342]}
<Call 0x228f0 0x102bc> {[##162342]}
FreeString(VAR a : String)
<POP 228f6-228f8 StackAdj> Δ+4 {}
<POP 228f8-228fc Naked> Σ0 ↓ →0x22924 ←0x228e2
<MI 228f8 TST.B 0x27a1a> {}
<MI 228fa BNE 0x22924> {}
<POP 228fc-22924 Naked> Σ0 ↓
<Blob 0x228fc [26] @> Δ-26 {[«26""»]}
<POP 22908-2290a StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x2290a 26> {[«26""»]|[$$No case alternative found!]}
<Call 0x2291c 0x21e62> {[«26""»]|[$$No case alternative found!]}
<POP 22920-22924 StackAdj> Δ+30 {}
<POP 22924-22928 Naked> Σ0 ↓ →0x22956 ←0x228f8
<MI 22924 TST.L D6> {}
<MI 22926 BNE 0x22956> {}
<POP 22928-22956 Naked> Σ0 ↓
<Blob 0x22928 [20] @> Δ-20 {[«20""»]}
<POP 2293a-2293c StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x2293c 19> {[«20""»]|[$$No [ENDCASE] found!]}
<Call 0x2294e 0x21e62> {[«20""»]|[$$No [ENDCASE] found!]}
<POP 22952-22956 StackAdj> Δ+24 {}
<POP 22956-2296a Naked> Σ0 ↓ →0x22974 ←0x22924
<MI 22956 MOVEA.L (A6+0x8),A0> {}
<MI 2295a MOVE.L D6,(A0)> {}
<MI 2295c MOVEA.L (A6+0x10),A0> {}
<MI 22960 MOVE.L 0x27a1c,(A0)> {}
<MI 22966 TST.L 0x27a20> {}
<MI 22968 BNE 0x22974> {}
<POP 2296a-22974 Naked> Σ0 →0x2297a
<MI 2296a MOVEA.L (A6+0xc),A0> {}
<MI 2296e MOVE.L D6,(A0)> {}
<MI 22970 SUBQ.L #0x1,(A0)> {}
<MI 22972 BRA 0x2297a> {}
<POP 22974-2297a Naked> Σ0 ↓ ←0x22956
<MI 22974 MOVEA.L (A6+0xc),A0> {}
<MI 22978 MOVE.L 0x27a20,(A0)> {}
<POP 2297a-22982 Epilogue> Σ0 ←0x2296a
@ 22982
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x010 @ 4(r)>
<POP 22982-229f6 Body>
<POP 22982-22998 Prologue> Σ0 ↓
<POP 22998-229a2 RegCacheLoad> Σ0 ↓
<POP 229a2-229ee Naked> Σ0 ↓
<MI 229a2 MOVE.L 0x27a08,D6> {}
<MI 229a4 CLR.B 0x27a24> {}
<MI 229aa MOVE.L (A6+0x8),0x27a26> {}
<MI 229b2 MOVE.L 0x27a08,D7> {}
<Pointer.fp 0x229b4 <LVAR -0x010 @ 4(r)>> Δ-4 {[@@-16]}
<Pointer.fp 0x229b6 <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-16]|[@@-12]}
<Pointer.fp 0x229ba <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-16]|[@@-12]|[@@-8]}
<Call 0x229be 0x22800> {[@@-16]|[@@-12]|[@@-8]}
<POP 229c2-229c6 StackAdj> Δ+12 {}
<MI 229c6 MOVE.L D6,0x27a08> {}
<MI 229c8 MOVE.L (A6-0x8),D0> {}
<MI 229cc ADDI.L #0x00000009,D0> {}
<MI 229d2 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 229d4 SUB.L (A6-0xc),D0> {[4, 'D0']}
<MI 229d8 SUBQ.L #0x1,D0> {[4, 'D0']}
<MI 229da MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']|[4, 'D0']}
<Call 0x229dc 0x223b6> {[4, 'D0']|[4, 'D0']}
<POP 229e0-229e2 StackAdj> Δ+4 {[4, 'D0']}
<MI 229e2 MOVE.L (A6-0x10),(A7)> {[4, '(A6-0x10)']}
<MI 229e4 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']|[4, '(A6-0x10)']}
<MI 229e6 SUB.L D7,(A7)> {[4, '(A6-0x10)']|[-4-]}
<Call 0x229e8 0x223b6> {[4, '(A6-0x10)']|[-4-]}
<POP 229ec-229ee StackAdj> Δ+8 {}
<POP 229ee-229f6 Epilogue> Σ0
@ 229f6
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x010 @ 4(r)>
<POP 229f6-22a74 Body>
<POP 229f6-22a0c Prologue> Σ0 ↓
<POP 22a0c-22a16 RegCacheLoad> Σ0 ↓
<POP 22a16-22a6c Naked> Σ0 ↓
<MI 22a16 MOVE.L 0x27a08,D6> {}
<MI 22a18 MOVE.B #0x01,0x27a24> {}
<MI 22a20 MOVE.L (A6+0x8),0x27a2a> {}
<MI 22a28 MOVE.L (A6+0xc),0x27a2e> {}
<MI 22a30 MOVE.L 0x27a08,D7> {}
<Pointer.fp 0x22a32 <LVAR -0x010 @ 4(r)>> Δ-4 {[@@-16]}
<Pointer.fp 0x22a34 <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-16]|[@@-12]}
<Pointer.fp 0x22a38 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-16]|[@@-12]|[@@-8]}
<Call 0x22a3c 0x22800> {[@@-16]|[@@-12]|[@@-8]}
<POP 22a40-22a44 StackAdj> Δ+12 {}
<MI 22a44 MOVE.L D6,0x27a08> {}
<MI 22a46 MOVE.L (A6-0x8),D0> {}
<MI 22a4a ADDI.L #0x00000009,D0> {}
<MI 22a50 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 22a52 SUB.L (A6-0xc),D0> {[4, 'D0']}
<MI 22a56 SUBQ.L #0x1,D0> {[4, 'D0']}
<MI 22a58 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']|[4, 'D0']}
<Call 0x22a5a 0x223b6> {[4, 'D0']|[4, 'D0']}
<POP 22a5e-22a60 StackAdj> Δ+4 {[4, 'D0']}
<MI 22a60 MOVE.L (A6-0x10),(A7)> {[4, '(A6-0x10)']}
<MI 22a62 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']|[4, '(A6-0x10)']}
<MI 22a64 SUB.L D7,(A7)> {[4, '(A6-0x10)']|[-4-]}
<Call 0x22a66 0x223b6> {[4, '(A6-0x10)']|[-4-]}
<POP 22a6a-22a6c StackAdj> Δ+8 {}
<POP 22a6c-22a74 Epilogue> Σ0
@ 22a74
<LVAR 0x010 4(rw)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22a74-22aac Body>
<POP 22a74-22a8a Prologue> Σ0 ↓
<POP 22a8a-22a90 Naked> Σ0 ↓ →0x22a96
<MI 22a8a TST.L (A6+0x8)> {}
<MI 22a8e BNE 0x22a96> {}
<POP 22a90-22a96 Naked> Σ0 →0x22aa4
<MI 22a90 CLR.L (A6+0x10)> {}
<MI 22a94 BRA 0x22aa4> {}
<POP 22a96-22aa4 Naked> Σ0 ↓ ←0x22a8a
<MI 22a96 MOVE.L (A6+0xc),D0> {}
<MI 22a9a SUB.L (A6+0x8),D0> {}
<MI 22a9e ADDQ.L #0x1,D0> {}
<MI 22aa0 MOVE.L D0,(A6+0x10)> {}
<POP 22aa4-22aac Epilogue> Σ0 ←0x22a90
@ 22aac
<LVAR 0x014 4(w)>
<LVAR 0x010 @ 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22aac-22b0e Body> Δ-4
<POP 22aac-22ac2 Prologue> Σ0 ↓
<POP 22ac2-22ad8 Naked> Σ0 Δ-4 ↓
<MI 22ac2 MOVEA.L (A6+0xc),A4> {}
<MI 22ac6 MOVE.L 0x21d7a,(A6+0x10)> {}
<MI 22acc MOVE.L 0x21d7e,(A6+0x14)> {}
<MI 22ad2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 22ad6 MOVEQ.L #0x00,D7> {[4, '(A6+0x8)']}
<POP 22ad8-22adc Naked> Σ-4 ↓ →0x22b04 ←0x22b00
<MI 22ad8 CMP.L (A7),D7> {[-4-]}
<MI 22ada BGT 0x22b04> {[-4-]}
<POP 22adc-22ae2 Naked> Σ-4 ↓ →0x22ae6
<MI 22adc CMPA.W #0x1,A4> {[-4-]}
<MI 22ae0 BNE 0x22ae6> {[-4-]}
<POP 22ae2-22ae6 Naked> Σ-4 Δ+4 →0x22b06
<POP 22ae2-22ae4 StackAdj> Δ+4 {}
<MI 22ae4 BRA 0x22b06> {}
<POP 22ae6-22aec Naked> Σ-4 ↓ →0x22afc ←0x22adc
<MI 22ae6 CMP.L (A6+0x8),D7> {[-4-]}
<MI 22aea BNE 0x22afc> {[-4-]}
<POP 22aec-22afc Naked> Σ-4 →0x22b00
<MI 22aec LEA.L (A6+0x10),A0> {[-4-]}
<MI 22af0 MOVEA.L A4,A1> {[-4-]}
<BlockMove 8,A1,A0> {[-4-]}
<MI 22afa BRA 0x22b00> {[-4-]}
<POP 22afc-22b00 Naked> Σ-4 ↓ ←0x22ae6
<MI 22afc MOVEA.L (A4+0x8),A4> {[-4-]}
<POP 22b00-22b04 Naked> Σ-4 ↓ →0x22ad8 ←0x22aec
<MI 22b00 ADDQ.L #0x1,D7> {[-4-]}
<MI 22b02 BVC 0x22ad8> {[-4-]}
<POP 22b04-22b06 Naked> Σ-4 Δ+4 ↓ ←0x22ad8
<POP 22b04-22b06 StackAdj> Δ+4 {}
<POP 22b06-22b0e Epilogue> Σ0 ←0x22ae2
@ 22b0e
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 4(r)>
<POP 22b0e-22b8a Body> Δ-4
<POP 22b0e-22b24 Prologue> Σ0 ↓
<POP 22b24-22b28 RegCacheLoad> Σ0 ↓
<POP 22b28-22b40 Naked> Σ0 Δ-4 ↓
<Pointer.fp 0x22b28 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Call 0x22b2a 0x102b8> {[@@-8]}
NewString(VAR a : String)
<MI 22b30 MOVE.L (A6+0xc),-(A7)> Δ-4 {[@@-8]|[4, '(A6+0xc)']}
<MI 22b34 MOVE.L (A6+0x8),-(A7)> Δ-4 {[@@-8]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x22b38 0x22a74> {[@@-8]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 22b3c-22b3e StackAdj> Δ+8 {[@@-8]}
<MI 22b3e MOVEQ.L #0x01,D7> {[@@-8]}
<POP 22b40-22b44 Naked> Σ-4 ↓ →0x22b7c ←0x22b6c
<MI 22b40 CMP.L (A7),D7> {[-4-]}
<MI 22b42 BGT 0x22b7c> {[-4-]}
<POP 22b44-22b68 Naked> Σ-4 ↓ →0x22b6c
<MI 22b44 MOVE.L D7,D0> {[-4-]}
<MI 22b46 ADD.L (A6+0x8),D0> {[-4-]}
<MI 22b4a SUBQ.L #0x1,D0> {[-4-]}
<MI 22b4c SUBQ.L #0x1,D0> {[-4-]}
<POP 0x22b4e LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {[-4-]}
<MI 22b58 LEA.L 0x25a00,A0> {[-4-]}
<MI 22b5e MOVE.B (A0+D0.L+#0x8),D6> {[-4-]}
<MI 22b62 CMPI.B #0x2f,D6> {[-4-]}
<MI 22b66 BNE 0x22b6c> {[-4-]}
<POP 22b68-22b6c Naked> Σ-4 Δ+4 →0x22b7e
<POP 22b68-22b6a StackAdj> Δ+4 {}
<MI 22b6a BRA 0x22b7e> {}
<POP 22b6c-22b7c Naked> Σ-4 ↓ →0x22b40 ←0x22b44
<MI 22b6c MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x8)']}
<MI 22b6e MOVE.B D6,-(A7)> Δ-2 {[-4-]|[4, '(A6-0x8)']|[2, 'D6']}
<Call 0x22b70 0x102c0> {[-4-]|[4, '(A6-0x8)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 22b76-22b78 StackAdj> Δ+6 {[-4-]}
<MI 22b78 ADDQ.L #0x1,D7> {[-4-]}
<MI 22b7a BVC 0x22b40> {[-4-]}
<POP 22b7c-22b7e Naked> Σ-4 Δ+4 ↓ ←0x22b40
<POP 22b7c-22b7e StackAdj> Δ+4 {}
<POP 22b7e-22b82 Naked> Σ0 ↓ ←0x22b68
<MI 22b7e MOVE.L (A6-0x8),(A6+0x10)> {}
<POP 22b82-22b8a Epilogue> Σ0
@ 22b8a
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22b8a-22bbc Body>
<POP 22b8a-22b9c Prologue> Σ0 ↓
<POP 22b9c-22bb8 Naked> Σ0 ↓
<POP 22b9c-22ba0 StackAdj> Δ-12 {[-12-]}
<MI 22ba0 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']}
<MI 22ba4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x22ba8 0x22aac> {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 22bac-22bae StackAdj> Δ+8 {[-12-]}
<Call 0x22bae 0x22b0e> {[-12-]}
<POP 22bb2-22bb4 StackAdj> Δ+8 {[-4-]}
<MI 22bb4 MOVE.L (A7)+,(A6+0x10)> Δ+4 {}
<POP 22bb8-22bbc Epilogue> Σ0
@ 22bbc
<LVAR 0x014 4(w)>
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22bbc-22bf8 Body>
<POP 22bbc-22bce Prologue> Σ0 ↓
<POP 22bce-22bf4 Naked> Σ0 ↓
<POP 22bce-22bd2 StackAdj> Δ-12 {[-12-]}
<MI 22bd2 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']}
<MI 22bd6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x22bda 0x22b8a> {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 22bde-22be0 StackAdj> Δ+8 {[-12-]}
<Const 0x22be0 0x10.4> Δ-4 {[-12-]|[##16]}
<Call 0x22be4 0x10360> {[-12-]|[##16]}
?StringToInt64()
<POP 22bea-22bec StackAdj> Δ+8 {[-8-]}
<MI 22bec MOVE.L (A7)+,(A6+0x10)> Δ+4 {[-4-]}
<MI 22bf0 MOVE.L (A7)+,(A6+0x14)> Δ+4 {}
<POP 22bf4-22bf8 Epilogue> Σ0
@ 22bf8
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22bf8-22c2c Body>
<POP 22bf8-22c0a Prologue> Σ0 ↓
<POP 22c0a-22c28 Naked> Σ0 ↓
<POP 22c0a-22c0e StackAdj> Δ-12 {[-12-]}
<MI 22c0e MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']}
<MI 22c12 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x22c16 0x22bbc> {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 22c1a-22c1c StackAdj> Δ+8 {[-12-]}
<Call 0x22c1c 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 22c22-22c24 StackAdj> Δ+8 {[-4-]}
<MI 22c24 MOVE.L (A7)+,(A6+0x10)> Δ+4 {}
<POP 22c28-22c2c Epilogue> Σ0
@ 22c2c
<LVAR 0x008 @ 4(r)>
<POP 22c2c-22cb4 Body>
<POP 22c2c-22c42 Prologue> Σ0 ↓
<POP 22c42-22c48 RegCacheLoad> Σ0 ↓
<POP 22c48-22c66 Naked> Σ0 Δ-8 ↓
<MI 22c48 MOVEA.L (A6+0x8),A0> {}
<MI 22c4c MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Blob 0x22c4e [4] 0x27a08> Δ-4 {[4, 'A0']|[«4»]}
<MI 22c50 MOVE.W (A0),D0> {[4, 'A0']|[«4»]}
<MI 22c52 EXTW.L D0> {[4, 'A0']|[«4»]}
<MI 22c54 NEG.L D0> {[4, 'A0']|[«4»]}
<MI 22c56 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[«4»]|[4, 'D0']}
<Call 0x22c58 0x223b6> {[4, 'A0']|[«4»]|[4, 'D0']}
<POP 22c5c-22c5e StackAdj> Δ+8 {[4, 'A0']}
<MI 22c5e MOVE.W (A0),D0> {[4, 'A0']}
<MI 22c60 EXTW.L D0> {[4, 'A0']}
<MI 22c62 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<MI 22c64 MOVEQ.L #0x01,D7> {[4, 'A0']|[4, 'D0']}
<POP 22c66-22c6a Naked> Σ-8 ↓ →0x22c9e ←0x22c6a
<MI 22c66 CMP.L (A7),D7> {[-8-]}
<MI 22c68 BGT 0x22c9e> {[-8-]}
<POP 22c6a-22c9e Naked> Σ-8 ↓ →0x22c66
<MI 22c6a MOVE.L D7,D0> {[-8-]}
<MI 22c6c ADD.L 0x27a08,D0> {[-8-]}
<MI 22c6e SUBQ.L #0x1,D0> {[-8-]}
<MI 22c70 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x22c72 LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {[-8-]}
<MI 22c7c LEA.L 0x25a00,A0> {[-8-]}
<MI 22c82 MOVE.L D7,D1> {[-8-]}
<MI 22c84 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x22c86 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 22c90 MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 22c94 MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8)> {[-8-]}
<MI 22c9a ADDQ.L #0x1,D7> {[-8-]}
<MI 22c9c BVC 0x22c66> {[-8-]}
<POP 22c9e-22cac Naked> Σ-8 Δ+8 ↓ ←0x22c66
<POP 22c9e-22ca0 StackAdj> Δ+8 {}
<Pointer.fp 0x22ca0 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x22ca4 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 22caa-22cac StackAdj> Δ+4 {}
<POP 22cac-22cb4 Epilogue> Σ0
@ 22cb4
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22cb4-22ce8 Body>
<POP 22cb4-22cc6 Prologue> Σ0 ↓
<POP 22cc6-22ce4 Naked> Σ0 ↓
<POP 22cc6-22cc8 StackAdj> Δ-4 {[-4-]}
<MI 22cc8 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 22ccc MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Const 0x22cd0 0x10.4> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[##16]}
<Call 0x22cd4 0x1035c> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[##16]}
Quad2String(a : Quad; radix : Long ) : String
<POP 22cda-22cde StackAdj> Δ+12 {[-4-]}
<Call 0x22cde 0x22c2c> {[-4-]}
<POP 22ce2-22ce4 StackAdj> Δ+4 {}
<POP 22ce4-22ce8 Epilogue> Σ0
@ 22ce8
<LVAR 0x008 4(r)>
<POP 22ce8-22d12 Body>
<POP 22ce8-22cfa Prologue> Σ0 ↓
<POP 22cfa-22d0e Naked> Σ0 ↓
<POP 22cfa-22cfc StackAdj> Δ-4 {[-4-]}
<MI 22cfc MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x22d00 0x102e4> {[-4-]|[4, '(A6+0x8)']}
Long2String(a : Long) : String
<POP 22d06-22d08 StackAdj> Δ+4 {[-4-]}
<Call 0x22d08 0x22c2c> {[-4-]}
<POP 22d0c-22d0e StackAdj> Δ+4 {}
<POP 22d0e-22d12 Epilogue> Σ0
@ 22d12
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 4(rw)>
<POP 22d12-22de2 Body>
<POP 22d12-22d28 Prologue> Σ0 ↓
<POP 22d28-22d30 RegCacheLoad> Σ0 ↓
<POP 22d30-22d42 Naked> Σ0 ↓
<MI 22d30 MOVEA.L (A6+0x8),A0> {}
<MI 22d34 MOVE.L (A0+0x8),(A6-0x8)> {}
<Pointer.fp 0x22d38 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x22d3a 0x102b8> {[@@-4]}
NewString(VAR a : String)
<POP 22d40-22d42 StackAdj> Δ+4 {}
<POP 22d42-22d4c Naked> Σ0 ↓ →0x22dd0 ←0x22db8
<MI 22d42 MOVEA.L (A6-0x8),A0> {}
<MI 22d44 CMPA.W #0x1,A0> {}
<MI 22d48 BEQ 0x22dd0> {}
<POP 22d4c-22d50 Naked> Σ0 ↓ →0x22db8
<MI 22d4c TST.L (A0)> {}
<MI 22d4e BEQ 0x22db8> {}
<POP 22d50-22d5a Naked> Σ0 Δ-4 ↓ →0x22d6e
<MI 22d50 MOVE.L (A0+0x4),-(A7)> Δ-4 {[4, '(A0+0x4)']}
<MI 22d54 MOVE.L (A0),D7> {[4, '(A0+0x4)']}
<MI 22d56 CMP.L (A7),D7> {[4, '(A0+0x4)']}
<MI 22d58 BGT 0x22d6e> {[4, '(A0+0x4)']}
<POP 22d5a-22d6e Naked> Σ-4 ↓
<MI 22d5a MOVE.L (A7),D0> {[-4-]}
<POP 0x22d5c LimitCheck -0x7fffffff ≤ D7> {[-4-]}
<MI 22d5c CMPI.L #0x80000001,D7>
<MI 22d62 BLT 0x22d6c>
<POP 0x22d64 LimitCheck D0 ≤ 0x7fffffff> {[-4-]}
<MI 22d64 CMPI.L #0x7fffffff,D0>
<MI 22d6a BLE 0x22d6e>
<MI 22d6c TRAP #15>
<POP 22d6e-22d72 Naked> Σ-4 ↓ →0x22db6 ←0x22d50 ←0x22db2
<MI 22d6e CMP.L (A7),D7> {[-4-]}
<MI 22d70 BGT 0x22db6> {[-4-]}
<POP 22d72-22d9e Naked> Σ-4 ↓ →0x22db2
<MI 22d72 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']}
<MI 22d74 MOVE.L D7,D0> {[-4-]|[4, '(A6-0x4)']}
<MI 22d76 SUBQ.L #0x1,D0> {[-4-]|[4, '(A6-0x4)']}
<POP 0x22d78 LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {[-4-]|[4, '(A6-0x4)']}
<MI 22d82 LEA.L 0x25a00,A0> {[-4-]|[4, '(A6-0x4)']}
<MI 22d88 MOVE.B (A0+D0.L+#0x8),-(A7)> Δ-2 {[-4-]|[4, '(A6-0x4)']|[2, '(A0+D0.L+#0x8)']}
<Call 0x22d8c 0x102c0> {[-4-]|[4, '(A6-0x4)']|[2, '(A0+D0.L+#0x8)']}
AppendChar(MOD b : String; a : char)
<POP 22d92-22d94 StackAdj> Δ+6 {[-4-]}
<MI 22d94 MOVEA.L (A6-0x4),A0> {[-4-]}
<MI 22d96 MOVE.W (A0),D0> {[-4-]}
<MI 22d98 CMPI.W #0x007a,D0> {[-4-]}
<MI 22d9c BLT 0x22db2> {[-4-]}
<POP 22d9e-22db2 Naked> Σ-4 ↓
<MI 22d9e MOVE.L (A6-0x4),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']}
<Call 0x22da0 0x103d8> {[-4-]|[4, '(A6-0x4)']}
WriteConsoleString(str : String)
<POP 22da6-22da8 StackAdj> Δ+4 {[-4-]}
<Pointer.fp 0x22da8 <LVAR -0x004 @ 4(r)>> Δ-4 {[-4-]|[@@-4]}
<Call 0x22daa 0x102b8> {[-4-]|[@@-4]}
NewString(VAR a : String)
<POP 22db0-22db2 StackAdj> Δ+4 {[-4-]}
<POP 22db2-22db6 Naked> Σ-4 ↓ →0x22d6e ←0x22d72
<MI 22db2 ADDQ.L #0x1,D7> {[-4-]}
<MI 22db4 BVC 0x22d6e> {[-4-]}
<POP 22db6-22db8 Naked> Σ-4 Δ+4 ↓ ←0x22d6e
<POP 22db6-22db8 StackAdj> Δ+4 {}
<POP 22db8-22dd0 Naked> Σ0 →0x22d42 ←0x22d4c
<MI 22db8 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<Const 0x22dba 0x20.2> Δ-2 {[4, '(A6-0x4)']|[#32]}
<Call 0x22dbe 0x102c0> {[4, '(A6-0x4)']|[#32]}
AppendChar(MOD b : String; a : char)
<POP 22dc4-22dc6 StackAdj> Δ+6 {}
<MI 22dc6 MOVEA.L (A6-0x8),A0> {}
<MI 22dc8 MOVE.L (A0+0x8),(A6-0x8)> {}
<MI 22dcc BRA 0x22d42> {}
<POP 22dd0-22dda Naked> Σ0 ↓ ←0x22d42
<MI 22dd0 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<Call 0x22dd2 0x103e0> {[4, '(A6-0x4)']}
WriteConsoleStringCrLf(str : String)
<POP 22dd8-22dda StackAdj> Δ+4 {}
<POP 22dda-22de2 Epilogue> Σ0
@ 22de2
<LVAR 0x008 @ 4(r)>
<LVAR -0x003 @ 1(r)>
<LVAR -0x004 @ 1(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(rw)>
<POP 22de2-22eec Body>
<POP 22de2-22df8 Prologue> Σ0 ↓
<POP 22df8-22e0a RegCacheLoad> Σ0 ↓
<POP 22e0a-22e50 Naked> Σ0 ↓ →0x22e86
<Blob 0x22e0a [4] @> Δ-4 {[«4""»]}
<POP 22e0e-22e10 StackAdj> Δ-8 {[«4""»]|[-8-]}
<MI 22e10 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«4""»]|[-8-]|[4, '(A6+0x8)']}
<Call 0x22e12 0x102cc> {[«4""»]|[-8-]|[4, '(A6+0x8)']}
StringDup(a : String) : String
<Lit 0x22e18 4> {[«4""»]|[-8-]|[$$.HLP]}
<Call 0x22e2a 0x102d0> {[«4""»]|[-8-]|[$$.HLP]}
StringCat2(a, b : String) : String
<POP 22e30-22e32 StackAdj> Δ+8 {[«4""»]|[-4-]}
<MI 22e32 MOVE.L (A7)+,(A6-0xc)> Δ+4 {[«4""»]}
<MI 22e34 MOVE.L (A6-0xc),(A7)> {[4, '(A6-0xc)']}
<MI 22e36 CLR.B -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]}
<MI 22e38 CLR.B -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]|[#0]}
<Const 0x22e3a 0x0.4> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[##0]}
<Pointer.fp 0x22e3e <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[##0]|[@@-4]}
<Pointer.fp 0x22e40 <LVAR -0x008 @ 4(r)>> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[##0]|[@@-4]|[@@-8]}
<Call 0x22e42 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 22e48-22e4c StackAdj> Δ+20 {}
<MI 22e4c TST.B (A6-0x4)> {}
<MI 22e4e BEQ 0x22e86> {}
<POP 22e50-22e86 Naked> Σ0 →0x22eda
<Blob 0x22e50 [22] @> Δ-22 {[«22""»]}
<POP 22e5c-22e5e StackAdj> Δ-8 {[«22""»]|[-8-]}
<Lit 0x22e5e 22> {[«22""»]|[-4-]|[$$No help available for_]}
<POP 22e6e-22e70 StackAdj> Δ-4 {[«22""»]|[-4-]|[$$No help available for_]|[-4-]}
<MI 22e70 MOVE.L (A6+0x8),(A7)> {[«22""»]|[-4-]|[$$No help available for_]|[4, '(A6+0x8)']}
<Call 0x22e72 0x102d0> {[«22""»]|[-4-]|[$$No help available for_]|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 22e78-22e7a StackAdj> Δ+8 {[«22""»]|[-4-]}
<Call 0x22e7a 0x103e0> {[«22""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22e80-22e84 StackAdj> Δ+26 {}
<MI 22e84 BRA 0x22eda> {}
<POP 22e86-22e9e Naked> Σ0 ↓ →0x22eb2 ←0x22e0a ←0x22eb2
<MI 22e86 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<Pointer.fp 0x22e88 <LVAR 0x008 @ 4(r)>> Δ-4 {[4, '(A6-0x8)']|[@@8]}
<Pointer.fp 0x22e8a <LVAR -0x003 @ 1(r)>> Δ-4 {[4, '(A6-0x8)']|[@@8]|[@@-3]}
<Call 0x22e8e 0x1043c> {[4, '(A6-0x8)']|[@@8]|[@@-3]}
FileReadLine(file : File; VAR a : String; VAR b : Byte)
<POP 22e94-22e98 StackAdj> Δ+12 {}
<MI 22e98 TST.B (A6-0x3)> {}
<MI 22e9c BNE 0x22eb2> {}
<POP 22e9e-22eb2 Naked> Σ0 ↓
<POP 22e9e-22ea0 StackAdj> Δ-4 {[-4-]}
<MI 22ea0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x22ea2 0x102cc> {[-4-]|[4, '(A6+0x8)']}
StringDup(a : String) : String
<POP 22ea8-22eaa StackAdj> Δ+4 {[-4-]}
<Call 0x22eaa 0x103e0> {[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22eb0-22eb2 StackAdj> Δ+4 {}
<POP 22eb2-22eb8 Naked> Σ0 ↓ →0x22e86 ←0x22e86
<MI 22eb2 TST.B (A6-0x3)> {}
<MI 22eb6 BEQ 0x22e86> {}
<POP 22eb8-22eda Naked> Σ0 ↓
<MI 22eb8 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x22eba 0x2.2> Δ-2 {[#0]|[#2]}
<Const 0x22ebe 0x1.4> Δ-4 {[#0]|[#2]|[##1]}
<Pointer.fp 0x22ec2 <LVAR -0x004 @ 1(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-4]}
<Pointer.fp 0x22ec4 <LVAR -0x008 @ 4(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-4]|[@@-8]}
<Call 0x22ec6 0x1038c> {[#0]|[#2]|[##1]|[@@-4]|[@@-8]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 22ecc-22ed0 StackAdj> Δ+16 {}
<Pointer.fp 0x22ed0 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x22ed2 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 22ed8-22eda StackAdj> Δ+4 {}
<POP 22eda-22ee4 Naked> Σ0 ↓ ←0x22e50
<Pointer.fp 0x22eda <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x22edc 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<POP 22ee2-22ee4 StackAdj> Δ+4 {}
<POP 22ee4-22eec Epilogue> Σ0
@ 22eec
<LVAR 0x008 4(r)>
<POP 22eec-22f6e Body>
<POP 22eec-22f02 Prologue> Σ0 ↓
<POP 22f02-22f12 Naked> Σ0 ↓ →0x22f40
<POP 22f02-22f04 StackAdj> Δ-4 {[-4-]}
<MI 22f04 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x22f08 0x2226e> {[-4-]|[4, '(A6+0x8)']}
<POP 22f0c-22f0e StackAdj> Δ+4 {[-4-]}
<MI 22f0e MOVE.L (A7)+,D6> Δ+4 {}
<MI 22f10 BNE 0x22f40> {}
<POP 22f12-22f40 Naked> Σ0 →0x22f66
<Blob 0x22f12 [10] 0x27a1a> Δ-10 {[«10»]}
<POP 22f20-22f22 StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x22f22> {[«10»]|[$$…]}
<Pointer.sp 0x22f22 4> Δ-4
<Const 0x22f26 0x1.2> Δ-2
<Const 0x22f2a 0xa.2> Δ-2
<Call 0x22f2e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22f34-22f36 StackAdj> Δ+8
<Call 0x22f36 0x22de2> {[«10»]|[$$…]}
<POP 22f3a-22f3e StackAdj> Δ+14 {}
<MI 22f3e BRA 0x22f66> {}
<POP 22f40-22f44 Naked> Σ0 Δ-4 ↓ ←0x22f02
<MI 22f40 MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']}
<MI 22f42 MOVEQ.L #0x01,D7> {[4, 'D6']}
<POP 22f44-22f48 Naked> Σ-4 ↓ →0x22f64 ←0x22f48
<MI 22f44 CMP.L (A7),D7> {[-4-]}
<MI 22f46 BGT 0x22f64> {[-4-]}
<POP 22f48-22f64 Naked> Σ-4 ↓ →0x22f44
<POP 22f48-22f4a StackAdj> Δ-4 {[-8-]}
<MI 22f4a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<MI 22f4e MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x22f50 0x22b8a> {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<POP 22f54-22f56 StackAdj> Δ+8 {[-8-]}
<MI 22f56 MOVEA.L (A7)+,A4> Δ+4 {[-4-]}
<MI 22f58 MOVE.L A4,-(A7)> Δ-4 {[-4-]|[4, 'A4']}
<Call 0x22f5a 0x22de2> {[-4-]|[4, 'A4']}
<POP 22f5e-22f60 StackAdj> Δ+4 {[-4-]}
<MI 22f60 ADDQ.L #0x1,D7> {[-4-]}
<MI 22f62 BVC 0x22f44> {[-4-]}
<POP 22f64-22f66 Naked> Σ-4 Δ+4 ↓ ←0x22f44
<POP 22f64-22f66 StackAdj> Δ+4 {}
<POP 22f66-22f6e Epilogue> Σ0 ←0x22f12
@ 22f6e
<LVAR 0x00c @>
<LVAR 0x008 @ 4(r)>
<LVAR -0x020 @>
<POP 22f6e-22ff0 Body>
<POP 22f6e-22f84 Prologue> Σ0 ↓
<POP 22f84-22f86 RegCacheLoad> Σ0 ↓
<POP 22f86-22f88 Naked> Σ0 ↓
<MI 22f86 MOVEQ.L #0x01,D7> {}
<POP 22f88-22f94 Naked> Σ0 ↓ →0x22fa4 ←0x22fc2
<MI 22f88 MOVEA.L (A6+0x8),A0> {}
<MI 22f8c MOVE.W (A0),D0> {}
<MI 22f8e EXTW.L D0> {}
<MI 22f90 CMP.L D0,D7> {}
<MI 22f92 BLE 0x22fa4> {}
<POP 22f94-22fa4 Naked> Σ0 →0x22fc2
<MI 22f94 MOVE.L D7,D0> {}
<MI 22f96 SUBQ.L #0x1,D0> {}
<POP 0x22f98 LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 22f9e CLR.B (A6+D0.L-#0x20)> {}
<MI 22fa2 BRA 0x22fc2> {}
<POP 22fa4-22fc2 Naked> Σ0 ↓ ←0x22f88
<MI 22fa4 MOVE.L D7,D0> {}
<MI 22fa6 SUBQ.L #0x1,D0> {}
<POP 0x22fa8 LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 22fae MOVE.L D7,D1> {}
<MI 22fb0 SUBQ.L #0x1,D1> {}
<POP 0x22fb2 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {}
<MI 22fbc MOVE.B (A0+D1.L+#0x2),(A6+D0.L-#0x20)> {}
<POP 22fc2-22fcc Naked> Σ0 ↓ →0x22f88 ←0x22f94
<MI 22fc2 ADDQ.L #0x1,D7> {}
<MI 22fc4 CMPI.L #0x0000001e,D7> {}
<MI 22fca BLE 0x22f88> {}
<POP 22fcc-22fe8 Naked> Σ0 ↓
<Pointer.fp 0x22fcc <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x22fd0 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 22fd6-22fd8 StackAdj> Δ+4 {}
<MI 22fd8 LEA.L (A6+0xc),A0> {}
<MI 22fdc LEA.L (A6-0x20),A1> {}
<BlockMove 30,A1,A0> {}
<POP 22fe8-22ff0 Epilogue> Σ0
@ 22ff0
<LVAR 0x026 4(w)>
<LVAR 0x008 @>
<LVAR -0x006 4(rw)>
<POP 22ff0-23044 Body>
<POP 22ff0-23006 Prologue> Σ0 ↓
<POP 23006-2300a RegCacheLoad> Σ0 ↓
<POP 2300a-23012 Naked> Σ0 ↓
<MI 2300a MOVEQ.L #0x00,D7> {}
<MI 2300c MOVE.L 0x27a32,(A6-0x6)> {}
<POP 23012-2301a Naked> Σ0 ↓ →0x23038 ←0x23036
<MI 23012 MOVEA.L (A6-0x6),A0> {}
<MI 23014 CMPA.W #0x1,A0> {}
<MI 23018 BEQ 0x23038> {}
<POP 2301a-2301e Naked> Σ0 ↓ →0x23038
<MI 2301a TST.B D7> {}
<MI 2301c BNE 0x23038> {}
<POP 2301e-23026 Naked> Σ0 ↓
<MI 2301e MOVEA.L A0,A1> {}
<MI 23020 LEA.L (A6+0x8),A2> {}
<MI 23024 MOVEQ.L #0x1d,D0> {}
<POP 23026-2302c Naked> Σ0 ↓ →0x23026 ←0x23026
<MI 23026 CMPM.B (A1)+,(A2)+> {}
<MI 23028 DBNE D0,0x23026> {}
<POP 2302c-2302e Naked> Σ0 ↓ →0x23032
<MI 2302c BNE 0x23032> {}
<POP 2302e-23032 Naked> Σ0 →0x23036
<MI 2302e MOVEQ.L #0x01,D7> {}
<MI 23030 BRA 0x23036> {}
<POP 23032-23036 Naked> Σ0 ↓ ←0x2302c
<MI 23032 MOVE.L (A0+0x26),(A6-0x6)> {}
<POP 23036-23038 Naked> Σ0 →0x23012 ←0x2302e
<MI 23036 BRA 0x23012> {}
<POP 23038-2303c Naked> Σ0 ↓ ←0x23012 ←0x2301a
<MI 23038 MOVE.L A0,(A6+0x26)> {}
<POP 2303c-23044 Epilogue> Σ0
@ 23044
<LVAR 0x008 @ 4(r)>
<POP 23044-230ca Body>
<POP 23044-2305a Prologue> Σ0 ↓
<POP 2305a-23066 RegCacheLoad> Σ0 ↓
<POP 23066-2306c Naked> Σ0 ↓ →0x230c2
<MI 23066 MOVEA.L (A6+0x8),A0> {}
<MI 23068 CMPA.W #0x01,A0> {}
<MI 2306a BEQ 0x230c2> {}
<POP 2306c-23072 Naked> Σ0 ↓ →0x23082
<MI 2306c TST.L (A0+0x1e)> {}
<MI 23070 BEQ 0x23082> {}
<POP 23072-23082 Naked> Σ0 ↓
<MI 23072 MOVE.L (A0+0x22),-(A7)> Δ-4 {[4, '(A0+0x22)']}
<MI 23076 MOVE.L (A0+0x1e),-(A7)> Δ-4 {[4, '(A0+0x22)']|[4, '(A0+0x1e)']}
<Call 0x2307a 0x102a4> {[4, '(A0+0x22)']|[4, '(A0+0x1e)']}
Free1(a : Pointer; b : Long)
<POP 23080-23082 StackAdj> Δ+8 {}
<POP 23082-23088 Naked> Σ0 ↓ ←0x2306c
<MI 23082 MOVEQ.L #0x00,D7> {}
<MI 23084 MOVEA.W #0x01,A4> {}
<MI 23086 MOVEA.L 0x27a32,A3> {}
<POP 23088-2308c Naked> Σ0 ↓ →0x230a0 ←0x2309e
<MI 23088 CMPA.W #0x01,A3> {}
<MI 2308a BEQ 0x230a0> {}
<POP 2308c-23090 Naked> Σ0 ↓ →0x230a0
<MI 2308c TST.B D7> {}
<MI 2308e BNE 0x230a0> {}
<POP 23090-23094 Naked> Σ0 ↓ →0x23098
<MI 23090 CMPA.L (A6+0x8),A3> {}
<MI 23092 BNE 0x23098> {}
<POP 23094-23098 Naked> Σ0 →0x2309e
<MI 23094 MOVEQ.L #0x01,D7> {}
<MI 23096 BRA 0x2309e> {}
<POP 23098-2309e Naked> Σ0 ↓ ←0x23090
<MI 23098 MOVEA.L A3,A4> {}
<MI 2309a MOVEA.L (A3+0x26),A3> {}
<POP 2309e-230a0 Naked> Σ0 →0x23088 ←0x23094
<MI 2309e BRA 0x23088> {}
<POP 230a0-230a4 Naked> Σ0 ↓ →0x230c2 ←0x23088 ←0x2308c
<MI 230a0 TST.B D7> {}
<MI 230a2 BEQ 0x230c2> {}
<POP 230a4-230a8 Naked> Σ0 ↓ →0x230ae
<MI 230a4 CMPA.W #0x01,A4> {}
<MI 230a6 BNE 0x230ae> {}
<POP 230a8-230ae Naked> Σ0 →0x230b4
<MI 230a8 MOVE.L (A3+0x26),0x27a32> {}
<MI 230ac BRA 0x230b4> {}
<POP 230ae-230b4 Naked> Σ0 ↓ ←0x230a4
<MI 230ae MOVE.L (A3+0x26),(A4+0x26)> {}
<POP 230b4-230c2 Naked> Σ0 ↓ ←0x230a8
<Pointer.fp 0x230b4 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Const 0x230b6 0x2a.4> Δ-4 {[@@8]|[##42]}
<Call 0x230ba 0x102a8> {[@@8]|[##42]}
Free2(a : Pointer; b : Long)
<POP 230c0-230c2 StackAdj> Δ+8 {}
<POP 230c2-230ca Epilogue> Σ0 ←0x23066 ←0x230a0
@ 230ca
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x006 @ 4(rw)>
<LVAR -0x024 @>
<POP 230ca-23188 Body>
<POP 230ca-230e0 Prologue> Σ0 ↓
<POP 230e0-230ea RegCacheLoad> Σ0 ↓
<POP 230ea-23108 Naked> Σ0 ↓ →0x2310a
<POP 230ea-230ec StackAdj> Δ-30 {[-30-]}
<MI 230ec MOVEA.L (A6+0xc),A0> {[-30-]}
<MI 230f0 MOVE.L (A0),-(A7)> Δ-4 {[-30-]|[4, '(A0)']}
<Call 0x230f2 0x22f6e> {[-30-]|[4, '(A0)']}
<POP 230f6-230f8 StackAdj> Δ+4 {[-30-]}
<MI 230f8 LEA.L (A6-0x24),A0> {[-30-]}
<POP 230fc-23104 StackPop> Δ+30 {[-30-]}
<BlockMove 30,A7,A0> Δ+30
<MI 23104 TST.L (A6+0x8)> {[-30-]}
<MI 23106 BGE 0x2310a> {[-30-]}
<POP 23108-2310a Naked> Σ0 ↓
<MI 23108 CLR.L (A6+0x8)> {}
<POP 2310a-23126 Naked> Σ0 ↓ →0x23138 ←0x230ea
<POP 2310a-2310c StackAdj> Δ-4 {[-4-]}
<Blob 0x2310c [30] (A6-0x6)> Δ-30 {[-4-]|[«30»]}
<Call 0x23116 0x22ff0> {[-4-]|[«30»]}
<POP 2311a-2311c StackAdj> Δ+30 {[-4-]}
<MI 2311c MOVE.L (A7)+,(A6-0x6)> Δ+4 {}
<MI 2311e MOVEA.L (A6-0x6),A0> {}
<MI 23120 CMPA.W #0x1,A0> {}
<MI 23124 BEQ 0x23138> {}
<POP 23126-2312e Naked> Σ0 ↓ →0x23130
<MI 23126 MOVE.L (A0+0x1e),D0> {}
<MI 2312a CMP.L (A6+0x8),D0> {}
<MI 2312c BNE 0x23130> {}
<POP 2312e-23130 Naked> Σ0 →0x2317c
<MI 2312e BRA 0x2317c> {}
<POP 23130-23138 Naked> Σ0 ↓ ←0x23126
<MI 23130 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x23132 0x23044> {[4, '(A6-0x6)']}
<POP 23136-23138 StackAdj> Δ+4 {}
<POP 23138-2316c Naked> Σ0 ↓ →0x2317c ←0x2310a
<Pointer.fp 0x23138 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Const 0x2313a 0x2a.4> Δ-4 {[@@-6]|[##42]}
<Call 0x2313e 0x1029c> {[@@-6]|[##42]}
Malloc1(length : Long) : Pointer
<POP 23144-23146 StackAdj> Δ+8 {}
<MI 23146 MOVEA.L (A6-0x6),A0> {}
<MI 23148 MOVE.L 0x27a32,(A0+0x26)> {}
<MI 23150 MOVE.L (A6-0x6),0x27a32> {}
<MI 23156 MOVEA.L A0,A1> {}
<MI 23158 LEA.L (A6-0x24),A2> {}
<BlockMove 30,A2,A1> {}
<MI 23164 MOVE.L (A6+0x8),(A0+0x1e)> {}
<MI 23168 TST.L (A6+0x8)> {}
<MI 2316a BEQ 0x2317c> {}
<POP 2316c-2317c Naked> Σ0 ↓
<POP 2316c-2316e StackAdj> Δ-4 {[-4-]}
<MI 2316e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x23170 0x102a0> {[-4-]|[4, '(A6+0x8)']}
Malloc2(VAR dst : Pointer; length : Word)
<POP 23176-23178 StackAdj> Δ+4 {[-4-]}
<MI 23178 MOVE.L (A7)+,(A0+0x22)> Δ+4 {}
<POP 2317c-23180 Naked> Σ0 ↓ ←0x2312e ←0x23138
<MI 2317c MOVE.L (A6-0x6),(A6+0x10)> {}
<POP 23180-23188 Epilogue> Σ0
@ 23188
<LVAR 0x00c @>
<LVAR 0x008 @ 4(r)>
<LVAR -0x008 4(rw)>
<POP 23188-23212 Body>
<POP 23188-2319e Prologue> Σ0 ↓
<POP 2319e-231a2 RegCacheLoad> Σ0 ↓
<POP 231a2-231c0 Naked> Σ0 ↓ →0x23200
<MI 231a2 MOVEA.L (A6+0x8),A0> {}
<MI 231a4 MOVE.W (A0),D0> {}
<MI 231a6 EXTW.L D0> {}
<MI 231a8 MOVE.L D0,D6> {}
<POP 231aa-231ac StackAdj> Δ-4 {[-4-]}
<Pointer.fp 0x231ac <LVAR 0x00c @>> Δ-4 {[-4-]|[@@12]}
<MI 231b0 MOVE.L D6,-(A7)> Δ-4 {[-4-]|[@@12]|[4, 'D6']}
<Call 0x231b2 0x230ca> {[-4-]|[@@12]|[4, 'D6']}
<POP 231b6-231b8 StackAdj> Δ+8 {[-4-]}
<MI 231b8 MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 231bc TST.L D6> {}
<MI 231be BEQ 0x23200> {}
<POP 231c0-231ce Naked> Σ0 Δ-8 ↓
<MI 231c0 MOVEA.L (A6-0x8),A0> {}
<MI 231c4 MOVEA.L (A0+0x22),A0> {}
<MI 231c8 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 231ca MOVE.L D6,-(A7)> Δ-4 {[4, 'A0']|[4, 'D6']}
<MI 231cc MOVEQ.L #0x01,D7> {[4, 'A0']|[4, 'D6']}
<POP 231ce-231d2 Naked> Σ-8 ↓ →0x231fe ←0x231d2
<MI 231ce CMP.L (A7),D7> {[-8-]}
<MI 231d0 BGT 0x231fe> {[-8-]}
<POP 231d2-231fe Naked> Σ-8 ↓ →0x231ce
<MI 231d2 MOVE.L D7,D0> {[-8-]}
<MI 231d4 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x231d6 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {[-8-]}
<MI 231e0 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 231e4 MOVEA.L (A6+0x8),A1> {[-8-]}
<MI 231e6 MOVE.L D7,D1> {[-8-]}
<MI 231e8 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x231ea LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 231f4 MOVE.B (A1+D1.L+#0x2),(A0+D0.L)> {[-8-]}
<MI 231fa ADDQ.L #0x1,D7> {[-8-]}
<MI 231fc BVC 0x231ce> {[-8-]}
<POP 231fe-23200 Naked> Σ-8 Δ+8 ↓ ←0x231ce
<POP 231fe-23200 StackAdj> Δ+8 {}
<POP 23200-2320a Naked> Σ0 ↓ ←0x231a2
<Pointer.fp 0x23200 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x23202 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 23208-2320a StackAdj> Δ+4 {}
<POP 2320a-23212 Epilogue> Σ0
@ 23212
<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 23212-2337e Body>
<POP 23212-23228 Prologue> Σ0 ↓
<POP 23228-23236 RegCacheLoad> Σ0 ↓
<POP 23236-23248 Naked> Σ0 ↓ →0x23276
<POP 23236-23238 StackAdj> Δ-4 {[-4-]}
<MI 23238 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x2323a 0x2226e> {[-4-]|[4, '(A6+0x8)']}
<POP 2323e-23240 StackAdj> Δ+4 {[-4-]}
<MI 23240 MOVE.L (A7)+,(A6-0x10)> Δ+4 {}
<MI 23242 MOVE.L (A6-0x10),D0> {}
<MI 23244 CMP.L #0x01,D0> {}
<MI 23246 BGE 0x23276> {}
<POP 23248-23276 Naked> Σ0 ↓
<Blob 0x23248 [26] @> Δ-26 {[«26""»]}
<POP 2325a-2325c StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x2325c 25> {[«26""»]|[$$Too few arguments for SET]}
<Call 0x2326e 0x21e62> {[«26""»]|[$$Too few arguments for SET]}
<POP 23272-23276 StackAdj> Δ+30 {}
<POP 23276-2327c Naked> Σ0 Δ-4 ↓ ←0x23236
<MI 23276 CLR.L (A6-0xc)> {}
<MI 23278 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 2327a MOVEQ.L #0x02,D6> {[4, 'D0']}
<POP 2327c-23280 Naked> Σ-4 ↓ →0x2329e ←0x23280
<MI 2327c CMP.L (A7),D6> {[-4-]}
<MI 2327e BGT 0x2329e> {[-4-]}
<POP 23280-2329e Naked> Σ-4 ↓ →0x2327c
<POP 23280-23284 StackAdj> Δ-12 {[-16-]}
<MI 23284 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<MI 23286 MOVE.L D6,-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
<Call 0x23288 0x22aac> {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
<POP 2328c-2328e StackAdj> Δ+8 {[-16-]}
<Call 0x2328e 0x22a74> {[-16-]}
<POP 23292-23294 StackAdj> Δ+8 {[-8-]}
<MI 23294 MOVE.L (A6-0xc),D0> {[-8-]}
<MI 23296 ADD.L (A7)+,D0> Δ+4 {[-4-]}
<MI 23298 MOVE.L D0,(A6-0xc)> {[-4-]}
<MI 2329a ADDQ.L #0x1,D6> {[-4-]}
<MI 2329c BVC 0x2327c> {[-4-]}
<POP 2329e-232ce Naked> Σ-4 Δ+4 ↓ →0x23376 ←0x2327c
<POP 2329e-232a0 StackAdj> Δ+4 {}
<MI 232a0 MOVE.L (A6-0x10),D0> {}
<MI 232a2 SUBQ.L #0x2,D0> {}
<MI 232a4 ADD.L D0,(A6-0xc)> {}
<POP 232a6-232a8 StackAdj> Δ-4 {[-4-]}
<MI 232a8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x232aa 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x232ae 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 232b2-232b4 StackAdj> Δ+8 {[-4-]}
<MI 232b4 MOVE.L (A7),(A6-0x4)> {[-4-]}
<Pointer.fp 0x232b8 <LVAR -0x004 @ 4(w)>> Δ-4 {[-4-]|[@@-4]}
<MI 232bc MOVE.L (A6-0xc),-(A7)> Δ-4 {[-4-]|[@@-4]|[4, '(A6-0xc)']}
<Call 0x232be 0x230ca> {[-4-]|[@@-4]|[4, '(A6-0xc)']}
<POP 232c2-232c4 StackAdj> Δ+8 {[-4-]}
<MI 232c4 MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 232c8 TST.L (A6-0xc)> {}
<MI 232ca BLE 0x23376> {}
<POP 232ce-232de Naked> Σ0 Δ-8 ↓
<MI 232ce MOVEA.L (A6-0x8),A0> {}
<MI 232d2 MOVEA.L (A0+0x22),A0> {}
<MI 232d6 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 232d8 MOVEQ.L #0x01,D7> {[4, 'A0']}
<MI 232da MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, 'A0']|[4, '(A6-0x10)']}
<MI 232dc MOVEQ.L #0x02,D6> {[4, 'A0']|[4, '(A6-0x10)']}
<POP 232de-232e4 Naked> Σ-8 ↓ →0x23374 ←0x2336e
<MI 232de CMP.L (A7),D6> {[-8-]}
<MI 232e0 BGT 0x23374> {[-8-]}
<POP 232e4-23304 Naked> Σ-8 Δ-4 ↓ →0x23318
<POP 232e4-232e6 StackAdj> Δ-8 {[-16-]}
<MI 232e6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<MI 232e8 MOVE.L D6,-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
<Call 0x232ea 0x22aac> {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
<POP 232ee-232f0 StackAdj> Δ+8 {[-16-]}
<MI 232f0 MOVE.L (A7)+,(A6-0x20)> Δ+4 {[-12-]}
<MI 232f4 MOVE.L (A7)+,(A6-0x1c)> Δ+4 {[-8-]}
<MI 232f8 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x1c)']}
<MI 232fc MOVE.L (A6-0x20),D5> {[-8-]|[4, '(A6-0x1c)']}
<MI 23300 CMP.L (A7),D5> {[-8-]|[4, '(A6-0x1c)']}
<MI 23302 BGT 0x23318> {[-8-]|[4, '(A6-0x1c)']}
<POP 23304-23318 Naked> Σ-12 ↓
<MI 23304 MOVE.L (A7),D0> {[-12-]}
<POP 0x23306 LimitCheck -0x7fffffff ≤ D5> {[-12-]}
<MI 23306 CMPI.L #0x80000001,D5>
<MI 2330c BLT 0x23316>
<POP 0x2330e LimitCheck D0 ≤ 0x7fffffff> {[-12-]}
<MI 2330e CMPI.L #0x7fffffff,D0>
<MI 23314 BLE 0x23318>
<MI 23316 TRAP #15>
<POP 23318-2331c Naked> Σ-12 ↓ →0x2334e ←0x232e4 ←0x2331c
<MI 23318 CMP.L (A7),D5> {[-12-]}
<MI 2331a BGT 0x2334e> {[-12-]}
<POP 2331c-2334e Naked> Σ-12 ↓ →0x23318
<MI 2331c MOVE.L D7,D0> {[-12-]}
<MI 2331e SUBQ.L #0x1,D0> {[-12-]}
<POP 0x23320 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {[-12-]}
<MI 2332a MOVEA.L (A7+0x8),A0> {[-12-]}
<MI 2332e MOVE.L D5,D1> {[-12-]}
<MI 23330 SUBQ.L #0x1,D1> {[-12-]}
<POP 0x23332 LimitCheck 0x0 ≤ D1 ≤ 0x1fff> {[-12-]}
<MI 2333c LEA.L 0x25a00,A1> {[-12-]}
<MI 23342 MOVE.B (A1+D1.L+#0x8),(A0+D0.L)> {[-12-]}
<MI 23348 ADDQ.L #0x1,D7> {[-12-]}
<MI 2334a ADDQ.L #0x1,D5> {[-12-]}
<MI 2334c BVC 0x23318> {[-12-]}
<POP 2334e-23354 Naked> Σ-12 Δ+4 ↓ →0x2336e ←0x23318
<POP 2334e-23350 StackAdj> Δ+4 {[-8-]}
<MI 23350 CMP.L (A6-0x10),D6> {[-8-]}
<MI 23352 BEQ 0x2336e> {[-8-]}
<POP 23354-2336e Naked> Σ-8 ↓
<MI 23354 MOVE.L D7,D0> {[-8-]}
<MI 23356 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x23358 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {[-8-]}
<MI 23362 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 23366 MOVE.B #0x2c,(A0+D0.L)> {[-8-]}
<MI 2336c ADDQ.L #0x1,D7> {[-8-]}
<POP 2336e-23374 Naked> Σ-8 ↓ →0x232de ←0x2334e
<MI 2336e ADDQ.L #0x1,D6> {[-8-]}
<MI 23370 BVC 0x232de> {[-8-]}
<POP 23374-23376 Naked> Σ-8 Δ+8 ↓ ←0x232de
<POP 23374-23376 StackAdj> Δ+8 {}
<POP 23376-2337e Epilogue> Σ0 ←0x2329e
@ 2337e
<LVAR 0x008 4(r)>
<LVAR -0x00c 4(rw)>
<POP 2337e-2346c Body>
<POP 2337e-23394 Prologue> Σ0 ↓
<POP 23394-2339c RegCacheLoad> Σ0 ↓
<POP 2339c-233ce Naked> Σ0 ↓ →0x23410
<POP 2339c-2339e StackAdj> Δ-4 {[-4-]}
<MI 2339e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x233a2 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x233a6 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 233aa-233ac StackAdj> Δ+8 {[-4-]}
<MI 233ac MOVEA.L (A7)+,A4> Δ+4 {}
<POP 233ae-233b2 StackAdj> Δ-34 {[-34-]}
<MI 233b2 MOVE.L A4,-(A7)> Δ-4 {[-34-]|[4, 'A4']}
<Call 0x233b4 0x22f6e> {[-34-]|[4, 'A4']}
<POP 233b8-233ba StackAdj> Δ+4 {[-34-]}
<Call 0x233ba 0x22ff0> {[-34-]}
<POP 233be-233c2 StackAdj> Δ+30 {[-4-]}
<MI 233c2 MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 233c6 MOVEA.L (A6-0xc),A0> {}
<MI 233ca CMPA.W #0x01,A0> {}
<MI 233cc BNE 0x23410> {}
<POP 233ce-23410 Naked> Σ0 ↓
<Blob 0x233ce [20] @> Δ-20 {[«20""»]}
<POP 233e0-233e2 StackAdj> Δ-8 {[«20""»]|[-8-]}
<Lit 0x233e2 19> {[«20""»]|[-4-]|[$$Unknown variable :_]}
<MI 233f2 MOVE.L (A6+0x8),(A7)> {[«20""»]|[-4-]|[4, '(A6+0x8)']}
<POP 233ec-233f2 StackAdj> Δ-8 {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]}
<Const 0x233f6 0x1.4> Δ-4 {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]|[##1]}
<Call 0x233fa 0x22b8a> {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]|[##1]}
<POP 233fe-23400 StackAdj> Δ+8 {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
<Call 0x23400 0x102d0> {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
StringCat2(a, b : String) : String
<POP 23406-23408 StackAdj> Δ+8 {[«20""»]|[-4-]}
<Call 0x23408 0x21e62> {[«20""»]|[-4-]}
<POP 2340c-23410 StackAdj> Δ+24 {}
<POP 23410-23426 Naked> Σ0 Δ-8 ↓ ←0x2339c
<MI 23410 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Blob 0x23412 [4] 0x27a08> Δ-4 {[4, 'A0']|[«4»]}
<MI 23414 MOVE.L (A0+0x1e),-(A7)> Δ-4 {[4, 'A0']|[«4»]|[4, '(A0+0x1e)']}
<MI 23418 NEG.L (A7)> {[4, 'A0']|[«4»]|[4, '(A0+0x1e)']}
<Call 0x2341a 0x223b6> {[4, 'A0']|[«4»]|[4, '(A0+0x1e)']}
<POP 2341e-23420 StackAdj> Δ+4 {[4, 'A0']|[«4»]}
<MI 23420 MOVE.L (A0+0x1e),(A7)> {[4, 'A0']|[4, '(A0+0x1e)']}
<MI 23424 MOVEQ.L #0x01,D7> {[4, 'A0']|[4, '(A0+0x1e)']}
<POP 23426-2342a Naked> Σ-8 ↓ →0x23462 ←0x2342a
<MI 23426 CMP.L (A7),D7> {[-8-]}
<MI 23428 BGT 0x23462> {[-8-]}
<POP 2342a-23462 Naked> Σ-8 ↓ →0x23426
<MI 2342a MOVE.L D7,D0> {[-8-]}
<MI 2342c ADD.L 0x27a08,D0> {[-8-]}
<MI 2342e SUBQ.L #0x1,D0> {[-8-]}
<MI 23430 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x23432 LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {[-8-]}
<MI 2343c LEA.L 0x25a00,A0> {[-8-]}
<MI 23442 MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 23446 MOVEA.L (A1+0x22),A1> {[-8-]}
<MI 2344a MOVE.L D7,D1> {[-8-]}
<MI 2344c SUBQ.L #0x1,D1> {[-8-]}
<POP 0x2344e LimitCheck 0x0 ≤ D1 ≤ 0x3ff> {[-8-]}
<MI 23458 MOVE.B (A1+D1.L),(A0+D0.L+#0x8)> {[-8-]}
<MI 2345e ADDQ.L #0x1,D7> {[-8-]}
<MI 23460 BVC 0x23426> {[-8-]}
<POP 23462-23464 Naked> Σ-8 Δ+8 ↓ ←0x23426
<POP 23462-23464 StackAdj> Δ+8 {}
<POP 23464-2346c Epilogue> Σ0
@ 2346c
<LVAR -0x004 4(rw)>
<POP 2346c-234ce Body>
<POP 2346c-23482 Prologue> Σ0 ↓
<POP 23482-2348a RegCacheLoad> Σ0 ↓
<POP 2348a-23490 Naked> Σ0 ↓
<MI 2348a MOVE.L 0x27a32,(A6-0x4)> {}
<POP 23490-23496 Naked> Σ0 ↓ →0x234c6 ←0x23496
<MI 23490 MOVEA.L (A6-0x4),A0> {}
<MI 23492 CMPA.W #0x01,A0> {}
<MI 23494 BEQ 0x234c6> {}
<POP 23496-234c6 Naked> Σ0 →0x23490
<POP 23496-23498 StackAdj> Δ-30 {[-30-]}
<MI 23498 MOVEA.L A7,A1> {[-30-]}
<MI 2349a MOVEA.L A0,A2> {[-30-]}
<BlockMove 30,A2,A1> {[-30-]}
<POP 234a4-234a6 StackAdj> Δ-4 {[-34-]}
<Lit 0x234a6> {[-30-]|[$$…]}
<Pointer.sp 0x234a6 4> Δ-4
<Const 0x234aa 0x1.2> Δ-2
<Const 0x234ac 0x1e.2> Δ-2
<Call 0x234ae 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 234b4-234b6 StackAdj> Δ+8
<Call 0x234b6 0x103e0> {[-30-]|[$$…]}
WriteConsoleStringCrLf(str : String)
<POP 234bc-234c0 StackAdj> Δ+34 {}
<MI 234c0 MOVE.L (A0+0x26),(A6-0x4)> {}
<MI 234c4 BRA 0x23490> {}
<POP 234c6-234ce Epilogue> Σ0 ←0x23490
@ 234ce
<LVAR 0x008 4(r)>
<POP 234ce-2350a Body>
<POP 234ce-234e0 Prologue> Σ0 ↓
<POP 234e0-23506 Naked> Σ0 ↓
<POP 234e0-234e4 StackAdj> Δ-38 {[-38-]}
<MI 234e4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-38-]|[4, '(A6+0x8)']}
<Const 0x234e8 0x1.4> Δ-4 {[-38-]|[4, '(A6+0x8)']|[##1]}
<Call 0x234ec 0x22b8a> {[-38-]|[4, '(A6+0x8)']|[##1]}
<POP 234f0-234f2 StackAdj> Δ+8 {[-38-]}
<Call 0x234f2 0x22f6e> {[-38-]}
<POP 234f6-234f8 StackAdj> Δ+4 {[-34-]}
<Call 0x234f8 0x22ff0> {[-34-]}
<POP 234fc-23500 StackAdj> Δ+30 {[-4-]}
<Call 0x23500 0x23044> {[-4-]}
<POP 23504-23506 StackAdj> Δ+4 {}
<POP 23506-2350a Epilogue> Σ0
@ 2350a
<POP 2350a-23538 Body>
<POP 2350a-2351c Prologue> Σ0 ↓
<POP 2351c-23534 Naked> Σ0 ↓
<POP 2351c-2351e StackAdj> Δ-8 {[-8-]}
<Call 0x2351e 0x103cc> {[-8-]}
GetPushLevel() : Long
<Call 0x23524 0x102e4> {[-8-]}
Long2String(a : Long) : String
<POP 2352a-2352c StackAdj> Δ+4 {[-4-]}
<Call 0x2352c 0x103e0> {[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23532-23534 StackAdj> Δ+4 {}
<POP 23534-23538 Epilogue> Σ0
@ 23538
<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 23538-23860 Body>
<POP 23538-2354e Prologue> Σ0 ↓
<POP 2354e-23566 RegCacheLoad> Σ0 ↓
<POP 23566-23576 Naked> Σ0 ↓ →0x2359e
<POP 23566-23568 StackAdj> Δ-4 {[-4-]}
<MI 23568 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x2356a 0x2226e> {[-4-]|[4, '(A6+0x8)']}
<POP 2356e-23570 StackAdj> Δ+4 {[-4-]}
<MI 23570 MOVE.L (A7)+,(A6-0x2c)> Δ+4 {}
<MI 23574 BNE 0x2359e> {}
<POP 23576-2359e Naked> Σ0 →0x235ae
<POP 23576-23578 StackAdj> Δ-4 {[-4-]}
<POP 23578-23579 StackAdj> Δ+2 {[-2-]}
<Blob 0x23579 [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 2357c MOVE.B 0x21a71,(A7+0x1)> {[-2-]|[«2""»]}
<MI 23582 MOVE.B 0x21a72,(A7+0x2)> {[-2-]|[«2""»]}
<POP 23588-2358a StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]}
<Lit 0x2358a> {[-2-]|[«2""»]|[$$…]}
<Pointer.sp 0x2358a 4> Δ-4
<Const 0x2358e 0x1.2> Δ-2
<Const 0x23590 0x3.2> Δ-2
<Call 0x23594 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23596-23598 StackAdj> Δ+8
<MI 23598 MOVE.L (A7)+,(A6-0x3c)> Δ+4 {[-2-]|[«2""»]}
<POP 2359a-2359c StackAdj> Δ+4 {}
<MI 2359c BRA 0x235ae> {}
<POP 2359e-235ae Naked> Σ0 ↓ ←0x23566
<POP 2359e-235a0 StackAdj> Δ-4 {[-4-]}
<MI 235a0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x235a2 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x235a6 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 235aa-235ac StackAdj> Δ+8 {[-4-]}
<MI 235ac MOVE.L (A7)+,(A6-0x3c)> Δ+4 {}
<POP 235ae-235fe Naked> Σ0 ↓ →0x2360c ←0x23576
<Blob 0x235ae [6] @> Δ-6 {[«6""»]}
<POP 235be-235c0 StackAdj> Δ-4 {[«6""»]|[-4-]}
<MI 235c0 MOVE.L (A6-0x3c),-(A7)> Δ-4 {[«6""»]|[-4-]|[4, '(A6-0x3c)']}
<POP 235c2-235c4 StackAdj> Δ-4 {[«6""»]|[-4-]|[4, '(A6-0x3c)']|[-4-]}
<Lit 0x235c4 5> {[«6""»]|[-4-]|[4, '(A6-0x3c)']|[$$.M200]}
<Call 0x235d2 0x102d0> {[«6""»]|[-4-]|[4, '(A6-0x3c)']|[$$.M200]}
StringCat2(a, b : String) : String
<POP 235d8-235da StackAdj> Δ+8 {[«6""»]|[-4-]}
<MI 235da MOVE.L (A7)+,(A6-0x3c)> Δ+4 {[«6""»]}
<POP 235dc-235de StackAdj> Δ+2 {[-4-]}
<MI 235de MOVE.L (A6-0x3c),(A7)> {[4, '(A6-0x3c)']}
<MI 235e0 CLR.B -(A7)> Δ-2 {[4, '(A6-0x3c)']|[#0]}
<Const 0x235e2 0x1.2> Δ-2 {[4, '(A6-0x3c)']|[#0]|[#1]}
<Const 0x235e4 0x0.4> Δ-4 {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]}
<Pointer.fp 0x235e8 <LVAR -0x038 @ 1(r)>> Δ-4 {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]|[@@-56]}
<Pointer.fp 0x235ec <LVAR -0x036 @ 4(r)>> Δ-4 {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]|[@@-56]|[@@-54]}
<Call 0x235f0 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 235f6-235f8 StackAdj> Δ+20 {}
<MI 235f8 TST.B (A6-0x38)> {}
<MI 235fc BEQ 0x2360c> {}
<POP 235fe-2360c Naked> Σ0 →0x23858
<Pointer.fp 0x235fe <LVAR -0x03c @ 4(rw)>> Δ-4 {[@@-60]}
<Call 0x23600 0x102bc> {[@@-60]}
FreeString(VAR a : String)
<POP 23606-23608 StackAdj> Δ+4 {}
<MI 23608 BRA 0x23858> {}
<POP 2360c-23652 Naked> Σ0 ↓ →0x23688 ←0x235ae
<MI 2360c MOVEA.L (A6-0x36),A0> {}
<MI 23610 MOVE.B (A0+0x3f),D0> {}
<MI 23614 LSL.B #0x6,D0> {}
<MI 23616 LSR.B #0x7,D0> {}
<MI 23618 MOVE.B D0,(A6-0x32)> {}
<MI 2361c CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x2361e 0x1.2> Δ-2 {[#0]|[#1]}
<Const 0x23620 0x1.4> Δ-4 {[#0]|[#1]|[##1]}
<Pointer.fp 0x23624 <LVAR -0x038 @ 1(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-56]}
<Pointer.fp 0x23628 <LVAR -0x036 @ 4(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-56]|[@@-54]}
<Call 0x2362c 0x1038c> {[#0]|[#1]|[##1]|[@@-56]|[@@-54]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 23632-23636 StackAdj> Δ+16 {}
<MI 23636 MOVEA.L (A6-0x3c),A0> {}
<MI 23638 MOVE.W (A0),D1> {}
<MI 2363a EXTW.L D1> {}
<MI 2363c SUBQ.L #0x5,D1> {}
<POP 0x2363e LimitCheck -0x8000 ≤ D1 ≤ 0x7fff> {}
<MI 2364c MOVE.W D1,(A0)> {}
<MI 2364e TST.B D0> {}
<MI 23650 BNE 0x23688> {}
<POP 23652-23688 Naked> Σ0 →0x23858
<Blob 0x23652 [18] @> Δ-18 {[«18""»]}
<POP 2365e-23660 StackAdj> Δ-4 {[«18""»]|[-4-]}
<MI 23660 MOVE.L (A6-0x3c),-(A7)> Δ-4 {[«18""»]|[-4-]|[4, '(A6-0x3c)']}
<POP 23662-23664 StackAdj> Δ-4 {[«18""»]|[-4-]|[4, '(A6-0x3c)']|[-4-]}
<Lit 0x23664 18> {[«18""»]|[-4-]|[4, '(A6-0x3c)']|[$$ is not a program.]}
<Call 0x23672 0x102d0> {[«18""»]|[-4-]|[4, '(A6-0x3c)']|[$$ is not a program.]}
StringCat2(a, b : String) : String
<POP 23678-2367a StackAdj> Δ+8 {[«18""»]|[-4-]}
<Call 0x2367a 0x103e0> {[«18""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23680-23684 StackAdj> Δ+22 {}
<MI 23684 BRA 0x23858> {}
<POP 23688-236a2 Naked> Σ0 Δ-8 ↓ ←0x2360c
<Pointer.fp 0x23688 <LVAR -0x030 @ 4(r)>> Δ-4 {[@@-48]}
<Call 0x2368c 0x102b8> {[@@-48]}
NewString(VAR a : String)
<POP 23692-23694 StackAdj> Δ+4 {}
<MI 23694 MOVEA.L (A6-0x30),A0> {}
<MI 23698 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2369a MOVEQ.L #0x01,D7> {[4, 'A0']}
<MI 2369c MOVE.L (A6-0x2c),-(A7)> Δ-4 {[4, 'A0']|[4, '(A6-0x2c)']}
<MI 236a0 MOVEQ.L #0x02,D5> {[4, 'A0']|[4, '(A6-0x2c)']}
<POP 236a2-236a8 Naked> Σ-8 ↓ →0x2373a ←0x23734
<MI 236a2 CMP.L (A7),D5> {[-8-]}
<MI 236a4 BGT 0x2373a> {[-8-]}
<POP 236a8-236c8 Naked> Σ-8 Δ-4 ↓ →0x236dc
<POP 236a8-236aa StackAdj> Δ-8 {[-16-]}
<MI 236aa MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<MI 236ac MOVE.L D5,-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, 'D5']}
<Call 0x236ae 0x22aac> {[-16-]|[4, '(A6+0x8)']|[4, 'D5']}
<POP 236b2-236b4 StackAdj> Δ+8 {[-16-]}
<MI 236b4 MOVE.L (A7)+,(A6-0x28)> Δ+4 {[-12-]}
<MI 236b8 MOVE.L (A7)+,(A6-0x24)> Δ+4 {[-8-]}
<MI 236bc MOVE.L (A6-0x24),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x24)']}
<MI 236c0 MOVE.L (A6-0x28),D6> {[-8-]|[4, '(A6-0x24)']}
<MI 236c4 CMP.L (A7),D6> {[-8-]|[4, '(A6-0x24)']}
<MI 236c6 BGT 0x236dc> {[-8-]|[4, '(A6-0x24)']}
<POP 236c8-236dc Naked> Σ-12 ↓
<MI 236c8 MOVE.L (A7),D0> {[-12-]}
<POP 0x236ca LimitCheck -0x7fffffff ≤ D6> {[-12-]}
<MI 236ca CMPI.L #0x80000001,D6>
<MI 236d0 BLT 0x236da>
<POP 0x236d2 LimitCheck D0 ≤ 0x7fffffff> {[-12-]}
<MI 236d2 CMPI.L #0x7fffffff,D0>
<MI 236d8 BLE 0x236dc>
<MI 236da TRAP #15>
<POP 236dc-236e0 Naked> Σ-12 ↓ →0x23712 ←0x236a8 ←0x236e0
<MI 236dc CMP.L (A7),D6> {[-12-]}
<MI 236de BGT 0x23712> {[-12-]}
<POP 236e0-23712 Naked> Σ-12 ↓ →0x236dc
<MI 236e0 MOVE.L D7,D0> {[-12-]}
<MI 236e2 SUBQ.L #0x1,D0> {[-12-]}
<POP 0x236e4 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-12-]}
<MI 236ee MOVEA.L (A7+0x8),A0> {[-12-]}
<MI 236f2 MOVE.L D6,D1> {[-12-]}
<MI 236f4 SUBQ.L #0x1,D1> {[-12-]}
<POP 0x236f6 LimitCheck 0x0 ≤ D1 ≤ 0x1fff> {[-12-]}
<MI 23700 LEA.L 0x25a00,A1> {[-12-]}
<MI 23706 MOVE.B (A1+D1.L+#0x8),(A0+D0.L+#0x2)> {[-12-]}
<MI 2370c ADDQ.L #0x1,D7> {[-12-]}
<MI 2370e ADDQ.L #0x1,D6> {[-12-]}
<MI 23710 BVC 0x236dc> {[-12-]}
<POP 23712-2371a Naked> Σ-12 Δ+4 ↓ →0x23734 ←0x236dc
<POP 23712-23714 StackAdj> Δ+4 {[-8-]}
<MI 23714 CMP.L (A6-0x2c),D5> {[-8-]}
<MI 23718 BEQ 0x23734> {[-8-]}
<POP 2371a-23734 Naked> Σ-8 ↓
<MI 2371a MOVE.L D7,D0> {[-8-]}
<MI 2371c SUBQ.L #0x1,D0> {[-8-]}
<POP 0x2371e LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-8-]}
<MI 23728 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 2372c MOVE.B #0x2c,(A0+D0.L+#0x2)> {[-8-]}
<MI 23732 ADDQ.L #0x1,D7> {[-8-]}
<POP 23734-2373a Naked> Σ-8 ↓ →0x236a2 ←0x23712
<MI 23734 ADDQ.L #0x1,D5> {[-8-]}
<MI 23736 BVC 0x236a2> {[-8-]}
<POP 2373a-237ea Naked> Σ-8 Δ+8 ↓ →0x237f0 ←0x236a2
<POP 2373a-2373c StackAdj> Δ+4 {[-4-]}
<MI 2373c MOVEA.L (A7),A0> {[-4-]}
<MI 2373e MOVE.L D7,D0> {[-4-]}
<MI 23740 SUBQ.L #0x1,D0> {[-4-]}
<POP 0x23742 LimitCheck -0x8000 ≤ D0 ≤ 0x7fff> {[-4-]}
<MI 23750 MOVE.W D0,(A0)> {[-4-]}
<POP 23752-23754 StackAdj> Δ+2 {[-2-]}
<POP 23754-23755 StackAdj> Δ+2 {}
<Blob 0x23755 [2] @> Δ-2 {[«2""»]}
<Blob 0x23758 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x2375c [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 23760-23762 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x23762 6> {[«2""»]|[«2""»]|[«2""»]|[$$STATUS]}
<MI 23770 MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 23774-23776 StackAdj> Δ+2 {[«2""»]|[«2""»]}
<MI 23776 MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<Const 0x23778 0x0.4> Δ-4 {[4, '(A6+0x8)']|[##0]}
<MI 2377c MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']}
<Pointer.fp 0x23780 <LVAR -0x010 @ 4(r)>> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-16]}
<Pointer.fp 0x23784 <LVAR -0x013 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-16]|[@@-19]}
<Call 0x23788 0x25144> {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-16]|[@@-19]}
<POP 2378e-23790 StackAdj> Δ+20 {}
<Pointer.fp 0x23790 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x23794 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 2379a-2379c StackAdj> Δ+2 {[-2-]}
<POP 2379c-2379d StackAdj> Δ+2 {}
<Blob 0x2379d [2] @> Δ-2 {[«2""»]}
<Blob 0x237a0 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x237a4 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 237a8-237aa StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x237aa 6> {[«2""»]|[«2""»]|[«2""»]|[$$RESULT]}
<MI 237b8 MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 237bc-237be StackAdj> Δ+2 {[«2""»]|[«2""»]}
<MI 237be MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<Const 0x237c0 0x0.4> Δ-4 {[4, '(A6+0x8)']|[##0]}
<MI 237c4 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']}
<Pointer.fp 0x237c8 <LVAR -0x00c @ 4(r)>> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-12]}
<Pointer.fp 0x237cc <LVAR -0x012 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-12]|[@@-18]}
<Call 0x237d0 0x25144> {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-12]|[@@-18]}
<POP 237d6-237d8 StackAdj> Δ+20 {}
<Pointer.fp 0x237d8 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x237dc 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 237e2-237e4 StackAdj> Δ+4 {}
<MI 237e4 TST.B (A6-0x13)> {}
<MI 237e8 BNE 0x237f0> {}
<POP 237ea-237f0 Naked> Σ0 ↓ →0x237f6
<MI 237ea TST.B (A6-0x12)> {}
<MI 237ee BEQ 0x237f6> {}
<POP 237f0-237f6 Naked> Σ0 →0x237fa ←0x2373a
<MI 237f0 CLR.B (A6-0x4)> {}
<MI 237f4 BRA 0x237fa> {}
<POP 237f6-237fa Naked> Σ0 ↓ ←0x237ea
<MI 237f6 MOVE.B #0x01,(A6-0x4)> {}
<POP 237fa-23820 Naked> Σ0 ↓ →0x23840 ←0x237f0
<MI 237fa MOVE.L (A6-0x3c),-(A7)> Δ-4 {[4, '(A6-0x3c)']}
<MI 237fc MOVE.L (A6-0x30),-(A7)> Δ-4 {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
<MI 23800 MOVE.B (A6-0x4),D0> {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
<MI 23804 EXTB.W D0> {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
<POP 0x23806 LimitCheck 0x0 ≤ D0 ≤ 0x2> {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
<MI 2380a MOVE.B D0,-(A7)> Δ-2 {[4, '(A6-0x3c)']|[4, '(A6-0x30)']|[2, 'D0']}
<Pointer.fp 0x2380c <LVAR -0x014 @ 1(r)>> Δ-4 {[4, '(A6-0x3c)']|[4, '(A6-0x30)']|[2, 'D0']|[@@-20]}
<Call 0x23810 0x103b0> {[4, '(A6-0x3c)']|[4, '(A6-0x30)']|[2, 'D0']|[@@-20]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 23816-2381a StackAdj> Δ+14 {}
<MI 2381a TST.B (A6-0x13)> {}
<MI 2381e BEQ 0x23840> {}
<POP 23820-23840 Naked> Σ0 ↓
<MI 23820 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']}
<POP 23824-23826 StackAdj> Δ-4 {[4, '(A6-0x10)']|[-4-]}
<MI 23826 MOVE.B (A6-0x14),D0> {[4, '(A6-0x10)']|[-4-]}
<MI 2382a EXTB.W D0> {[4, '(A6-0x10)']|[-4-]}
<POP 0x2382c LimitCheck 0x0 ≤ D0 ≤ 0xe> {[4, '(A6-0x10)']|[-4-]}
<MI 23830 MOVE.B D0,-(A7)> Δ-2 {[4, '(A6-0x10)']|[-4-]|[2, 'D0']}
<Call 0x23832 0x103c0> {[4, '(A6-0x10)']|[-4-]|[2, 'D0']}
ExpErrMsg(a: Byte) : String
<POP 23838-2383a StackAdj> Δ+2 {[4, '(A6-0x10)']|[-4-]}
<Call 0x2383a 0x23188> {[4, '(A6-0x10)']|[-4-]}
<POP 2383e-23840 StackAdj> Δ+8 {}
<POP 23840-23846 Naked> Σ0 ↓ →0x23858 ←0x237fa
<MI 23840 TST.B (A6-0x12)> {}
<MI 23844 BEQ 0x23858> {}
<POP 23846-23858 Naked> Σ0 ↓
<MI 23846 MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']}
<POP 2384a-2384c StackAdj> Δ-4 {[4, '(A6-0xc)']|[-4-]}
<Call 0x2384c 0x103c8> {[4, '(A6-0xc)']|[-4-]}
FSCALL_103c8
<Call 0x23852 0x23188> {[4, '(A6-0xc)']|[-4-]}
<POP 23856-23858 StackAdj> Δ+8 {}
<POP 23858-23860 Epilogue> Σ0 ←0x235fe ←0x23652 ←0x23840
@ 23860
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(rw)>
<LVAR -0x008 @ 4(rw)>
<POP 23860-238d8 Body>
<POP 23860-23876 Prologue> Σ0 ↓
<POP 23876-2387e RegCacheLoad> Σ0 ↓
<POP 2387e-238b2 Naked> Σ0 ↓ →0x238b8
<POP 2387e-23880 StackAdj> Δ-4 {[-4-]}
<MI 23880 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23884 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23888 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 2388c-2388e StackAdj> Δ+8 {[-4-]}
<MI 2388e MOVE.L (A7),(A6-0x8)> {[-4-]}
<MI 23890 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23894 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x23898 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 2389c-2389e StackAdj> Δ+8 {[-4-]}
<MI 2389e MOVE.L (A7),(A6-0x4)> {[-4-]}
<POP 238a0-238a2 StackAdj> Δ+2 {[-2-]}
<MI 238a2 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x8)']}
<MI 238a4 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
<Call 0x238a6 0x102c8> {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
StringEqual(a, b : String) : Byte
<POP 238ac-238ae StackAdj> Δ+8 {[-2-]}
<MI 238ae TST.B (A7)+> Δ+2 {}
<MI 238b0 BEQ 0x238b8> {}
<POP 238b2-238b8 Naked> Σ0 →0x238bc
<Call 0x238b2 0x2264a> {}
<MI 238b6 BRA 0x238bc> {}
<POP 238b8-238bc Naked> Σ0 ↓ ←0x2387e
<Call 0x238b8 0x22690> {}
<POP 238bc-238d0 Naked> Σ0 ↓ ←0x238b2
<Pointer.fp 0x238bc <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x238be 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 238c4-238c6 StackAdj> Δ+4 {}
<Pointer.fp 0x238c6 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x238c8 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 238ce-238d0 StackAdj> Δ+4 {}
<POP 238d0-238d8 Epilogue> Σ0
@ 238d8
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(rw)>
<LVAR -0x008 @ 4(rw)>
<POP 238d8-23950 Body>
<POP 238d8-238ee Prologue> Σ0 ↓
<POP 238ee-238f6 RegCacheLoad> Σ0 ↓
<POP 238f6-2392a Naked> Σ0 ↓ →0x23930
<POP 238f6-238f8 StackAdj> Δ-4 {[-4-]}
<MI 238f8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x238fc 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23900 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 23904-23906 StackAdj> Δ+8 {[-4-]}
<MI 23906 MOVE.L (A7),(A6-0x8)> {[-4-]}
<MI 23908 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x2390c 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x23910 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 23914-23916 StackAdj> Δ+8 {[-4-]}
<MI 23916 MOVE.L (A7),(A6-0x4)> {[-4-]}
<POP 23918-2391a StackAdj> Δ+2 {[-2-]}
<MI 2391a MOVE.L (A6-0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x8)']}
<MI 2391c MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
<Call 0x2391e 0x102c8> {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
StringEqual(a, b : String) : Byte
<POP 23924-23926 StackAdj> Δ+8 {[-2-]}
<MI 23926 TST.B (A7)+> Δ+2 {}
<MI 23928 BNE 0x23930> {}
<POP 2392a-23930 Naked> Σ0 →0x23934
<Call 0x2392a 0x2264a> {}
<MI 2392e BRA 0x23934> {}
<POP 23930-23934 Naked> Σ0 ↓ ←0x238f6
<Call 0x23930 0x22690> {}
<POP 23934-23948 Naked> Σ0 ↓ ←0x2392a
<Pointer.fp 0x23934 <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x23936 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 2393c-2393e StackAdj> Δ+4 {}
<Pointer.fp 0x2393e <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x23940 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 23946-23948 StackAdj> Δ+4 {}
<POP 23948-23950 Epilogue> Σ0
@ 23950
<LVAR 0x008 4(r)>
<POP 23950-2397c Body>
<POP 23950-23962 Prologue> Σ0 ↓
<POP 23962-23978 Naked> Σ0 ↓
<POP 23962-23964 StackAdj> Δ-4 {[-4-]}
<MI 23964 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23968 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2396c 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 23970-23972 StackAdj> Δ+8 {[-4-]}
<Call 0x23972 0x22982> {[-4-]}
<POP 23976-23978 StackAdj> Δ+4 {}
<POP 23978-2397c Epilogue> Σ0
@ 2397c
<LVAR 0x008 4(r)>
<LVAR -0x014 @ 4(rw)>
<POP 2397c-23a7c Body>
<POP 2397c-23992 Prologue> Σ0 ↓
<POP 23992-2399c RegCacheLoad> Σ0 ↓
<POP 2399c-239fa Naked> Σ0 ↓ →0x23a2a
<POP 2399c-2399e StackAdj> Δ-4 {[-4-]}
<MI 2399e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x239a0 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x239a4 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 239a8-239aa StackAdj> Δ+8 {[-4-]}
<MI 239aa MOVE.L (A7),(A6-0x14)> {[-4-]}
<MI 239ac MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x239ae 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x239b2 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 239b6-239b8 StackAdj> Δ+8 {[-4-]}
<MI 239b8 MOVEA.L (A7)+,A4> Δ+4 {}
<POP 239ba-239be StackAdj> Δ-12 {[-12-]}
<MI 239be MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<Const 0x239c0 0x3.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##3]}
<Call 0x239c4 0x22bbc> {[-12-]|[4, '(A6+0x8)']|[##3]}
<POP 239c8-239ca StackAdj> Δ+8 {[-12-]}
<Call 0x239ca 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 239d0-239d2 StackAdj> Δ+8 {[-4-]}
<MI 239d2 MOVE.L (A7),D6> {[-4-]}
<POP 239d4-239d6 StackAdj> Δ-8 {[-12-]}
<MI 239d6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<Const 0x239d8 0x4.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##4]}
<Call 0x239dc 0x22bbc> {[-12-]|[4, '(A6+0x8)']|[##4]}
<POP 239e0-239e2 StackAdj> Δ+8 {[-12-]}
<Call 0x239e2 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 239e8-239ea StackAdj> Δ+8 {[-4-]}
<MI 239ea MOVE.L (A7)+,D5> Δ+4 {}
<MI 239ec MOVE.L D6,D0> {}
<MI 239ee ADD.L D5,D0> {}
<MI 239f0 SUBQ.L #0x1,D0> {}
<MI 239f2 MOVE.W (A4),D1> {}
<MI 239f4 EXTW.L D1> {}
<MI 239f6 CMP.L D1,D0> {}
<MI 239f8 BLE 0x23a2a> {}
<POP 239fa-23a2a Naked> Σ0 ↓
<Blob 0x239fa [32] @> Δ-32 {[«32""»]}
<POP 23a0c-23a0e StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x23a0e 31> {[«32""»]|[$$Offset/Length error in [INSERT]]}
<Call 0x23a22 0x21e62> {[«32""»]|[$$Offset/Length error in [INSERT]]}
<POP 23a26-23a2a StackAdj> Δ+36 {}
<POP 23a2a-23a36 Naked> Σ0 Δ-8 ↓ ←0x2399c
<MI 23a2a MOVEA.L (A6-0x14),A0> {}
<MI 23a2c MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 23a2e MOVE.W (A0),D0> {[4, 'A0']}
<MI 23a30 EXTW.L D0> {[4, 'A0']}
<MI 23a32 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<MI 23a34 MOVEQ.L #0x01,D7> {[4, 'A0']|[4, 'D0']}
<POP 23a36-23a3a Naked> Σ-8 ↓ →0x23a60 ←0x23a3a
<MI 23a36 CMP.L (A7),D7> {[-8-]}
<MI 23a38 BGT 0x23a60> {[-8-]}
<POP 23a3a-23a60 Naked> Σ-8 ↓ →0x23a36
<MI 23a3a MOVE.L D6,D0> {[-8-]}
<MI 23a3c ADD.L D7,D0> {[-8-]}
<MI 23a3e SUBQ.L #0x1,D0> {[-8-]}
<MI 23a40 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x23a42 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-8-]}
<MI 23a48 MOVE.L D7,D1> {[-8-]}
<MI 23a4a SUBQ.L #0x1,D1> {[-8-]}
<POP 0x23a4c LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 23a52 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 23a56 MOVE.B (A0+D1.L+#0x2),(A4+D0.L+#0x2)> {[-8-]}
<MI 23a5c ADDQ.L #0x1,D7> {[-8-]}
<MI 23a5e BVC 0x23a36> {[-8-]}
<POP 23a60-23a74 Naked> Σ-8 Δ+8 ↓ ←0x23a36
<POP 23a60-23a62 StackAdj> Δ+4 {[-4-]}
<MI 23a62 MOVE.L A4,(A7)> {[4, 'A4']}
<Call 0x23a64 0x22c2c> {[4, 'A4']}
<POP 23a68-23a6a StackAdj> Δ+4 {}
<Pointer.fp 0x23a6a <LVAR -0x014 @ 4(rw)>> Δ-4 {[@@-20]}
<Call 0x23a6c 0x102bc> {[@@-20]}
FreeString(VAR a : String)
<POP 23a72-23a74 StackAdj> Δ+4 {}
<POP 23a74-23a7c Epilogue> Σ0
@ 23a7c
<LVAR 0x008 4(r)>
<LVAR -0x010 @ 4(r)>
<LVAR -0x014 @ 4(rw)>
<POP 23a7c-23b62 Body>
<POP 23a7c-23a92 Prologue> Σ0 ↓
<POP 23a92-23aa0 RegCacheLoad> Σ0 ↓
<POP 23aa0-23af8 Naked> Σ0 ↓ →0x23afe
<POP 23aa0-23aa2 StackAdj> Δ-4 {[-4-]}
<MI 23aa2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23aa4 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23aa8 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 23aac-23aae StackAdj> Δ+8 {[-4-]}
<MI 23aae MOVE.L (A7)+,(A6-0x14)> Δ+4 {}
<Pointer.fp 0x23ab0 <LVAR -0x010 @ 4(r)>> Δ-4 {[@@-16]}
<Call 0x23ab2 0x102b8> {[@@-16]}
NewString(VAR a : String)
<POP 23ab8-23aba StackAdj> Δ-8 {[@@-16]|[-8-]}
<MI 23aba MOVE.L (A6+0x8),-(A7)> Δ-4 {[@@-16]|[-8-]|[4, '(A6+0x8)']}
<Const 0x23abc 0x2.4> Δ-4 {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##2]}
<Call 0x23ac0 0x22bbc> {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##2]}
<POP 23ac4-23ac6 StackAdj> Δ+8 {[@@-16]|[-8-]}
<Call 0x23ac6 0x10350> {[@@-16]|[-8-]}
Quad2Long(a : Quad) : Long
<POP 23acc-23ace StackAdj> Δ+8 {[@@-16]}
<MI 23ace MOVE.L (A7),D5> {[@@-16]}
<POP 23ad0-23ad2 StackAdj> Δ-8 {[@@-16]|[-8-]}
<MI 23ad2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[@@-16]|[-8-]|[4, '(A6+0x8)']}
<Const 0x23ad4 0x3.4> Δ-4 {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##3]}
<Call 0x23ad8 0x22bbc> {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##3]}
<POP 23adc-23ade StackAdj> Δ+8 {[@@-16]|[-8-]}
<Call 0x23ade 0x10350> {[@@-16]|[-8-]}
Quad2Long(a : Quad) : Long
<POP 23ae4-23ae6 StackAdj> Δ+8 {[@@-16]}
<MI 23ae6 MOVE.L (A7)+,D6> Δ+4 {}
<MI 23ae8 MOVEA.L (A6-0x14),A0> {}
<MI 23aea MOVE.L D5,D0> {}
<MI 23aec ADD.L D6,D0> {}
<MI 23aee SUBQ.L #0x1,D0> {}
<MI 23af0 MOVE.W (A0),D1> {}
<MI 23af2 EXTW.L D1> {}
<MI 23af4 CMP.L D1,D0> {}
<MI 23af6 BLE 0x23afe> {}
<POP 23af8-23afe Naked> Σ0 ↓
<MI 23af8 ADDQ.L #0x1,D1> {}
<MI 23afa SUB.L D5,D1> {}
<MI 23afc MOVE.L D1,D6> {}
<POP 23afe-23b02 Naked> Σ0 Δ-4 ↓ ←0x23aa0
<MI 23afe MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']}
<MI 23b00 MOVEQ.L #0x01,D7> {[4, 'D6']}
<POP 23b02-23b06 Naked> Σ-4 ↓ →0x23b2c ←0x23b06
<MI 23b02 CMP.L (A7),D7> {[-4-]}
<MI 23b04 BGT 0x23b2c> {[-4-]}
<POP 23b06-23b2c Naked> Σ-4 ↓ →0x23b02
<MI 23b06 MOVEA.L (A6-0x10),A0> {[-4-]}
<MI 23b08 MOVE.L D7,D0> {[-4-]}
<MI 23b0a SUBQ.L #0x1,D0> {[-4-]}
<POP 0x23b0c LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-4-]}
<MI 23b12 MOVEA.L (A6-0x14),A1> {[-4-]}
<MI 23b14 MOVE.L D7,D1> {[-4-]}
<MI 23b16 ADD.L D5,D1> {[-4-]}
<MI 23b18 SUBQ.L #0x1,D1> {[-4-]}
<MI 23b1a SUBQ.L #0x1,D1> {[-4-]}
<POP 0x23b1c LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-4-]}
<MI 23b22 MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x2)> {[-4-]}
<MI 23b28 ADDQ.L #0x1,D7> {[-4-]}
<MI 23b2a BVC 0x23b02> {[-4-]}
<POP 23b2c-23b5a Naked> Σ-4 Δ+4 ↓ ←0x23b02
<POP 23b2c-23b2e StackAdj> Δ+4 {}
<MI 23b2e MOVEA.L (A6-0x10),A0> {}
<POP 0x23b30 LimitCheck -0x8000 ≤ D6 ≤ 0x7fff> {}
<MI 23b46 MOVE.W D6,(A0)> {}
<MI 23b48 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']}
<Call 0x23b4a 0x22c2c> {[4, '(A6-0x10)']}
<POP 23b4e-23b50 StackAdj> Δ+4 {}
<Pointer.fp 0x23b50 <LVAR -0x014 @ 4(rw)>> Δ-4 {[@@-20]}
<Call 0x23b52 0x102bc> {[@@-20]}
FreeString(VAR a : String)
<POP 23b58-23b5a StackAdj> Δ+4 {}
<POP 23b5a-23b62 Epilogue> Σ0
@ 23b62
<LVAR 0x008 4(r)>
<POP 23b62-23b8e Body>
<POP 23b62-23b74 Prologue> Σ0 ↓
<POP 23b74-23b8a Naked> Σ0 ↓
<POP 23b74-23b76 StackAdj> Δ-8 {[-8-]}
<MI 23b76 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x23b7a 0x1.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23b7e 0x22bbc> {[-8-]|[4, '(A6+0x8)']|[##1]}
<POP 23b82-23b84 StackAdj> Δ+8 {[-8-]}
<Call 0x23b84 0x229f6> {[-8-]}
<POP 23b88-23b8a StackAdj> Δ+8 {}
<POP 23b8a-23b8e Epilogue> Σ0
@ 23b8e
<LVAR 0x008 4(r)>
<POP 23b8e-23bda Body>
<POP 23b8e-23ba0 Prologue> Σ0 ↓
<POP 23ba0-23bcc Naked> Σ0 ↓ →0x23bd2
<POP 23ba0-23ba4 StackAdj> Δ-10 {[-10-]}
<MI 23ba4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x23ba8 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23bac 0x22bbc> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 23bb0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23bb4 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23bb8 0x22bbc> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23bbc-23bbe StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23bbe 0x1032c> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsEqual(a, b : Quad) : Bool
<POP 23bc4-23bc8 StackAdj> Δ+16 {[-2-]}
<MI 23bc8 TST.B (A7)+> Δ+2 {}
<MI 23bca BEQ 0x23bd2> {}
<POP 23bcc-23bd2 Naked> Σ0 →0x23bd6
<Call 0x23bcc 0x2264a> {}
<MI 23bd0 BRA 0x23bd6> {}
<POP 23bd2-23bd6 Naked> Σ0 ↓ ←0x23ba0
<Call 0x23bd2 0x22690> {}
<POP 23bd6-23bda Epilogue> Σ0 ←0x23bcc
@ 23bda
<LVAR 0x008 4(r)>
<POP 23bda-23c26 Body>
<POP 23bda-23bec Prologue> Σ0 ↓
<POP 23bec-23c18 Naked> Σ0 ↓ →0x23c1e
<POP 23bec-23bf0 StackAdj> Δ-10 {[-10-]}
<MI 23bf0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x23bf4 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23bf8 0x22bbc> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 23bfc MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23c00 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23c04 0x22bbc> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23c08-23c0a StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23c0a 0x1032c> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsEqual(a, b : Quad) : Bool
<POP 23c10-23c14 StackAdj> Δ+16 {[-2-]}
<MI 23c14 TST.B (A7)+> Δ+2 {}
<MI 23c16 BNE 0x23c1e> {}
<POP 23c18-23c1e Naked> Σ0 →0x23c22
<Call 0x23c18 0x2264a> {}
<MI 23c1c BRA 0x23c22> {}
<POP 23c1e-23c22 Naked> Σ0 ↓ ←0x23bec
<Call 0x23c1e 0x22690> {}
<POP 23c22-23c26 Epilogue> Σ0 ←0x23c18
@ 23c26
<LVAR 0x008 4(r)>
<POP 23c26-23c72 Body>
<POP 23c26-23c38 Prologue> Σ0 ↓
<POP 23c38-23c64 Naked> Σ0 ↓ →0x23c6a
<POP 23c38-23c3c StackAdj> Δ-10 {[-10-]}
<MI 23c3c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x23c40 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23c44 0x22bbc> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 23c48 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23c4c 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23c50 0x22bbc> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23c54-23c56 StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23c56 0x10328> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsSmaller(a, b : Quad) : Bool
<POP 23c5c-23c60 StackAdj> Δ+16 {[-2-]}
<MI 23c60 TST.B (A7)+> Δ+2 {}
<MI 23c62 BEQ 0x23c6a> {}
<POP 23c64-23c6a Naked> Σ0 →0x23c6e
<Call 0x23c64 0x2264a> {}
<MI 23c68 BRA 0x23c6e> {}
<POP 23c6a-23c6e Naked> Σ0 ↓ ←0x23c38
<Call 0x23c6a 0x22690> {}
<POP 23c6e-23c72 Epilogue> Σ0 ←0x23c64
@ 23c72
<LVAR 0x008 4(r)>
<POP 23c72-23cbe Body>
<POP 23c72-23c84 Prologue> Σ0 ↓
<POP 23c84-23cb0 Naked> Σ0 ↓ →0x23cb6
<POP 23c84-23c88 StackAdj> Δ-10 {[-10-]}
<MI 23c88 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x23c8c 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23c90 0x22bbc> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 23c94 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23c98 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23c9c 0x22bbc> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23ca0-23ca2 StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23ca2 0x10324> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsGreater(a, b : Quad) : Bool
<POP 23ca8-23cac StackAdj> Δ+16 {[-2-]}
<MI 23cac TST.B (A7)+> Δ+2 {}
<MI 23cae BEQ 0x23cb6> {}
<POP 23cb0-23cb6 Naked> Σ0 →0x23cba
<Call 0x23cb0 0x2264a> {}
<MI 23cb4 BRA 0x23cba> {}
<POP 23cb6-23cba Naked> Σ0 ↓ ←0x23c84
<Call 0x23cb6 0x22690> {}
<POP 23cba-23cbe Epilogue> Σ0 ←0x23cb0
@ 23cbe
<LVAR 0x008 4(r)>
<POP 23cbe-23d0a Body>
<POP 23cbe-23cd0 Prologue> Σ0 ↓
<POP 23cd0-23cfc Naked> Σ0 ↓ →0x23d02
<POP 23cd0-23cd4 StackAdj> Δ-10 {[-10-]}
<MI 23cd4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x23cd8 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23cdc 0x22bbc> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 23ce0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23ce4 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23ce8 0x22bbc> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23cec-23cee StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23cee 0x10324> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsGreater(a, b : Quad) : Bool
<POP 23cf4-23cf8 StackAdj> Δ+16 {[-2-]}
<MI 23cf8 TST.B (A7)+> Δ+2 {}
<MI 23cfa BNE 0x23d02> {}
<POP 23cfc-23d02 Naked> Σ0 →0x23d06
<Call 0x23cfc 0x2264a> {}
<MI 23d00 BRA 0x23d06> {}
<POP 23d02-23d06 Naked> Σ0 ↓ ←0x23cd0
<Call 0x23d02 0x22690> {}
<POP 23d06-23d0a Epilogue> Σ0 ←0x23cfc
@ 23d0a
<LVAR 0x008 4(r)>
<POP 23d0a-23d56 Body>
<POP 23d0a-23d1c Prologue> Σ0 ↓
<POP 23d1c-23d48 Naked> Σ0 ↓ →0x23d4e
<POP 23d1c-23d20 StackAdj> Δ-10 {[-10-]}
<MI 23d20 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x23d24 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23d28 0x22bbc> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 23d2c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23d30 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23d34 0x22bbc> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23d38-23d3a StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23d3a 0x10328> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsSmaller(a, b : Quad) : Bool
<POP 23d40-23d44 StackAdj> Δ+16 {[-2-]}
<MI 23d44 TST.B (A7)+> Δ+2 {}
<MI 23d46 BNE 0x23d4e> {}
<POP 23d48-23d4e Naked> Σ0 →0x23d52
<Call 0x23d48 0x2264a> {}
<MI 23d4c BRA 0x23d52> {}
<POP 23d4e-23d52 Naked> Σ0 ↓ ←0x23d1c
<Call 0x23d4e 0x22690> {}
<POP 23d52-23d56 Epilogue> Σ0 ←0x23d48
@ 23d56
<LVAR 0x008 4(r)>
<POP 23d56-23da0 Body>
<POP 23d56-23d6c Prologue> Σ0 ↓
<POP 23d6c-23d6e RegCacheLoad> Σ0 ↓
<POP 23d6e-23d98 Naked> Σ0 ↓
<POP 23d6e-23d70 StackAdj> Δ-16 {[-16-]}
<MI 23d70 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23d74 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23d78 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23d7c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23d80 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23d84 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23d88-23d8a StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23d8a 0x10314> {[-16-]|[4, '(A6+0x8)']|[##1]}
Add(a, b : Quad) : Quad
<POP 23d90-23d92 StackAdj> Δ+16 {[-8-]}
<Call 0x23d92 0x22cb4> {[-8-]}
<POP 23d96-23d98 StackAdj> Δ+8 {}
<POP 23d98-23da0 Epilogue> Σ0
@ 23da0
<LVAR 0x008 4(r)>
<POP 23da0-23dea Body>
<POP 23da0-23db6 Prologue> Σ0 ↓
<POP 23db6-23db8 RegCacheLoad> Σ0 ↓
<POP 23db8-23de2 Naked> Σ0 ↓
<POP 23db8-23dba StackAdj> Δ-16 {[-16-]}
<MI 23dba MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23dbe 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23dc2 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23dc6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23dca 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23dce 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23dd2-23dd4 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23dd4 0x10318> {[-16-]|[4, '(A6+0x8)']|[##1]}
Subtract(a, b : Quad) : Quad
<POP 23dda-23ddc StackAdj> Δ+16 {[-8-]}
<Call 0x23ddc 0x22cb4> {[-8-]}
<POP 23de0-23de2 StackAdj> Δ+8 {}
<POP 23de2-23dea Epilogue> Σ0
@ 23dea
<LVAR 0x008 4(r)>
<POP 23dea-23e34 Body>
<POP 23dea-23e00 Prologue> Σ0 ↓
<POP 23e00-23e02 RegCacheLoad> Σ0 ↓
<POP 23e02-23e2c Naked> Σ0 ↓
<POP 23e02-23e04 StackAdj> Δ-16 {[-16-]}
<MI 23e04 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23e08 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23e0c 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23e10 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23e14 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23e18 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23e1c-23e1e StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23e1e 0x1031c> {[-16-]|[4, '(A6+0x8)']|[##1]}
Multiply(a, b : Quad) : Quad
<POP 23e24-23e26 StackAdj> Δ+16 {[-8-]}
<Call 0x23e26 0x22cb4> {[-8-]}
<POP 23e2a-23e2c StackAdj> Δ+8 {}
<POP 23e2c-23e34 Epilogue> Σ0
@ 23e34
<LVAR 0x008 4(r)>
<POP 23e34-23e7e Body>
<POP 23e34-23e4a Prologue> Σ0 ↓
<POP 23e4a-23e4c RegCacheLoad> Σ0 ↓
<POP 23e4c-23e76 Naked> Σ0 ↓
<POP 23e4c-23e4e StackAdj> Δ-16 {[-16-]}
<MI 23e4e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23e52 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23e56 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23e5a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23e5e 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23e62 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23e66-23e68 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23e68 0x10320> {[-16-]|[4, '(A6+0x8)']|[##1]}
Divide(a, b : Quad) : Quad
<POP 23e6e-23e70 StackAdj> Δ+16 {[-8-]}
<Call 0x23e70 0x22cb4> {[-8-]}
<POP 23e74-23e76 StackAdj> Δ+8 {}
<POP 23e76-23e7e Epilogue> Σ0
@ 23e7e
<LVAR 0x008 4(r)>
<POP 23e7e-23ec8 Body>
<POP 23e7e-23e94 Prologue> Σ0 ↓
<POP 23e94-23e96 RegCacheLoad> Σ0 ↓
<POP 23e96-23ec0 Naked> Σ0 ↓
<POP 23e96-23e98 StackAdj> Δ-16 {[-16-]}
<MI 23e98 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23e9c 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23ea0 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23ea4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23ea8 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23eac 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23eb0-23eb2 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23eb2 0x10358> {[-16-]|[4, '(A6+0x8)']|[##1]}
Modulus(a, b : Quad) : Quad
<POP 23eb8-23eba StackAdj> Δ+16 {[-8-]}
<Call 0x23eba 0x22cb4> {[-8-]}
<POP 23ebe-23ec0 StackAdj> Δ+8 {}
<POP 23ec0-23ec8 Epilogue> Σ0
@ 23ec8
<LVAR 0x008 4(r)>
<POP 23ec8-23f12 Body>
<POP 23ec8-23ede Prologue> Σ0 ↓
<POP 23ede-23ee0 RegCacheLoad> Σ0 ↓
<POP 23ee0-23f0a Naked> Σ0 ↓
<POP 23ee0-23ee2 StackAdj> Δ-16 {[-16-]}
<MI 23ee2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23ee6 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23eea 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23eee MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23ef2 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23ef6 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23efa-23efc StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23efc 0x10334> {[-16-]|[4, '(A6+0x8)']|[##1]}
BitOr(a, b : Quad) : Quad
<POP 23f02-23f04 StackAdj> Δ+16 {[-8-]}
<Call 0x23f04 0x22cb4> {[-8-]}
<POP 23f08-23f0a StackAdj> Δ+8 {}
<POP 23f0a-23f12 Epilogue> Σ0
@ 23f12
<LVAR 0x008 4(r)>
<POP 23f12-23f5c Body>
<POP 23f12-23f28 Prologue> Σ0 ↓
<POP 23f28-23f2a RegCacheLoad> Σ0 ↓
<POP 23f2a-23f54 Naked> Σ0 ↓
<POP 23f2a-23f2c StackAdj> Δ-16 {[-16-]}
<MI 23f2c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23f30 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23f34 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23f38 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23f3c 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23f40 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23f44-23f46 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23f46 0x10330> {[-16-]|[4, '(A6+0x8)']|[##1]}
BitAnd(a, b : Quad) : Quad
<POP 23f4c-23f4e StackAdj> Δ+16 {[-8-]}
<Call 0x23f4e 0x22cb4> {[-8-]}
<POP 23f52-23f54 StackAdj> Δ+8 {}
<POP 23f54-23f5c Epilogue> Σ0
@ 23f5c
<LVAR 0x008 4(r)>
<POP 23f5c-23fa6 Body>
<POP 23f5c-23f72 Prologue> Σ0 ↓
<POP 23f72-23f74 RegCacheLoad> Σ0 ↓
<POP 23f74-23f9e Naked> Σ0 ↓
<POP 23f74-23f76 StackAdj> Δ-16 {[-16-]}
<MI 23f76 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23f7a 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23f7e 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23f82 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23f86 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23f8a 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23f8e-23f90 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23f90 0x10340> {[-16-]|[4, '(A6+0x8)']|[##1]}
BitXor(a, b : Quad) : Quad
<POP 23f96-23f98 StackAdj> Δ+16 {[-8-]}
<Call 0x23f98 0x22cb4> {[-8-]}
<POP 23f9c-23f9e StackAdj> Δ+8 {}
<POP 23f9e-23fa6 Epilogue> Σ0
@ 23fa6
<LVAR 0x008 4(r)>
<POP 23fa6-23fea Body>
<POP 23fa6-23fb8 Prologue> Σ0 ↓
<POP 23fb8-23fe6 Naked> Σ0 ↓
<POP 23fb8-23fbc StackAdj> Δ-16 {[-16-]}
<MI 23fbc MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23fc0 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23fc4 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23fc8 MOVE.L (A6+0x8),(A7)> {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']}
<Const 0x23fcc 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
<Call 0x23fd0 0x22bf8> {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
<POP 23fd4-23fd6 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']}
<Call 0x23fd6 0x10344> {[-16-]|[4, '(A6+0x8)']}
BitShift(a : Quad ; howmuch : integer) : Quad
<POP 23fdc-23fe0 StackAdj> Δ+12 {[-8-]}
<Call 0x23fe0 0x22cb4> {[-8-]}
<POP 23fe4-23fe6 StackAdj> Δ+8 {}
<POP 23fe6-23fea Epilogue> Σ0
@ 23fea
<LVAR 0x008 4(r)>
<POP 23fea-24030 Body>
<POP 23fea-23ffc Prologue> Σ0 ↓
<POP 23ffc-2402c Naked> Σ0 ↓
<POP 23ffc-24000 StackAdj> Δ-16 {[-16-]}
<MI 24000 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x24004 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24008 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 2400c MOVE.L (A6+0x8),(A7)> {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']}
<Const 0x24010 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
<Call 0x24014 0x22bf8> {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
<POP 24018-2401a StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']}
<MI 2401a NEG.L (A7)> {[-16-]|[4, '(A6+0x8)']}
<Call 0x2401c 0x10344> {[-16-]|[4, '(A6+0x8)']}
BitShift(a : Quad ; howmuch : integer) : Quad
<POP 24022-24026 StackAdj> Δ+12 {[-8-]}
<Call 0x24026 0x22cb4> {[-8-]}
<POP 2402a-2402c StackAdj> Δ+8 {}
<POP 2402c-24030 Epilogue> Σ0
@ 24030
<LVAR 0x008 4(r)>
<POP 24030-24066 Body>
<POP 24030-24042 Prologue> Σ0 ↓
<POP 24042-24062 Naked> Σ0 ↓
<POP 24042-24046 StackAdj> Δ-16 {[-16-]}
<MI 24046 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x2404a 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2404e 0x22bbc> {[-16-]|[4, '(A6+0x8)']|[##1]}
<POP 24052-24054 StackAdj> Δ+8 {[-16-]}
<Call 0x24054 0x10338> {[-16-]}
BitNot(a : Quad) : Quad
<POP 2405a-2405c StackAdj> Δ+8 {[-8-]}
<Call 0x2405c 0x22cb4> {[-8-]}
<POP 24060-24062 StackAdj> Δ+8 {}
<POP 24062-24066 Epilogue> Σ0
@ 24066
<LVAR 0x008 4(r)>
<LVAR -0x00c 4(rw)>
<LVAR -0x010 4(rw)>
<LVAR -0x014 4(rw)>
<LVAR -0x018 4(rw)>
<POP 24066-240f6 Body>
<POP 24066-2407c Prologue> Σ0 ↓
<POP 2407c-24080 RegCacheLoad> Σ0 ↓
<POP 24080-240ee Naked> Σ0 ↓
<POP 24080-24082 StackAdj> Δ-8 {[-8-]}
<MI 24082 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x24084 0x1.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24088 0x22bbc> {[-8-]|[4, '(A6+0x8)']|[##1]}
<POP 2408c-2408e StackAdj> Δ+8 {[-8-]}
<MI 2408e MOVE.L (A7)+,(A6-0x18)> Δ+4 {[-4-]}
<MI 24092 MOVE.L (A7),(A6-0x14)> {[-4-]}
<POP 24096-24098 StackAdj> Δ-4 {[-8-]}
<MI 24098 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x2409a 0x2.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##2]}
<Call 0x2409e 0x22bbc> {[-8-]|[4, '(A6+0x8)']|[##2]}
<POP 240a2-240a4 StackAdj> Δ+8 {[-8-]}
<MI 240a4 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 240a8 MOVE.L (A7),(A6-0xc)> {[-4-]}
<MI 240ac MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x240ae 0x3.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##3]}
<Call 0x240b2 0x22bf8> {[-4-]|[4, '(A6+0x8)']|[##3]}
<POP 240b6-240b8 StackAdj> Δ+8 {[-4-]}
<MI 240b8 MOVE.L (A7),D7> {[-4-]}
<MI 240ba MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x240bc 0x4.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##4]}
<Call 0x240c0 0x22bf8> {[-4-]|[4, '(A6+0x8)']|[##4]}
<POP 240c4-240c6 StackAdj> Δ+8 {[-4-]}
<MI 240c6 MOVE.L (A7),D6> {[-4-]}
<POP 240c8-240ca StackAdj> Δ-4 {[-8-]}
<MI 240ca MOVE.L (A6-0x14),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']}
<MI 240ce MOVE.L (A6-0x18),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']}
<MI 240d2 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']}
<MI 240d6 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<MI 240da MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']}
<MI 240dc MOVE.L D6,-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
<Call 0x240de 0x10348> {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
?BitField_something_()
<POP 240e4-240e8 StackAdj> Δ+24 {[-8-]}
<Call 0x240e8 0x22cb4> {[-8-]}
<POP 240ec-240ee StackAdj> Δ+8 {}
<POP 240ee-240f6 Epilogue> Σ0
@ 240f6
<LVAR 0x008 4(r)>
<LVAR -0x00c 4(rw)>
<LVAR -0x010 4(rw)>
<POP 240f6-24168 Body>
<POP 240f6-2410c Prologue> Σ0 ↓
<POP 2410c-24110 RegCacheLoad> Σ0 ↓
<POP 24110-24160 Naked> Σ0 ↓
<POP 24110-24112 StackAdj> Δ-8 {[-8-]}
<MI 24112 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x24114 0x1.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24118 0x22bbc> {[-8-]|[4, '(A6+0x8)']|[##1]}
<POP 2411c-2411e StackAdj> Δ+8 {[-8-]}
<MI 2411e MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 24122 MOVE.L (A7),(A6-0xc)> {[-4-]}
<MI 24126 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x24128 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x2412c 0x22bf8> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 24130-24132 StackAdj> Δ+8 {[-4-]}
<MI 24132 MOVE.L (A7),D7> {[-4-]}
<MI 24134 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x24136 0x3.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##3]}
<Call 0x2413a 0x22bf8> {[-4-]|[4, '(A6+0x8)']|[##3]}
<POP 2413e-24140 StackAdj> Δ+8 {[-4-]}
<MI 24140 MOVE.L (A7),D6> {[-4-]}
<POP 24142-24144 StackAdj> Δ-4 {[-8-]}
<MI 24144 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']}
<MI 24148 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<MI 2414c MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']}
<MI 2414e MOVE.L D6,-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
<Call 0x24150 0x1034c> {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
FSCALL_1034c
<POP 24156-2415a StackAdj> Δ+16 {[-8-]}
<Call 0x2415a 0x22cb4> {[-8-]}
<POP 2415e-24160 StackAdj> Δ+8 {}
<POP 24160-24168 Epilogue> Σ0
@ 24168
<LVAR 0x008 4(r)>
<POP 24168-241da Body>
<POP 24168-2417e Prologue> Σ0 ↓
<POP 2417e-2418c Naked> Σ0 Δ-4 ↓
<POP 2417e-24180 StackAdj> Δ-4 {[-4-]}
<MI 24180 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x24184 0x2226e> {[-4-]|[4, '(A6+0x8)']}
<POP 24188-2418a StackAdj> Δ+4 {[-4-]}
<MI 2418a MOVEQ.L #0x01,D7> {[-4-]}
<POP 2418c-24190 Naked> Σ-4 ↓ →0x241b6 ←0x24190
<MI 2418c CMP.L (A7),D7> {[-4-]}
<MI 2418e BGT 0x241b6> {[-4-]}
<POP 24190-241b6 Naked> Σ-4 ↓ →0x2418c
<POP 24190-24192 StackAdj> Δ-4 {[-8-]}
<MI 24192 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<MI 24196 MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x24198 0x22b8a> {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<POP 2419c-2419e StackAdj> Δ+8 {[-8-]}
<Call 0x2419e 0x103d8> {[-8-]}
WriteConsoleString(str : String)
<POP 241a4-241a6 StackAdj> Δ+2 {[-6-]}
<POP 241a6-241a7 StackAdj> Δ+2 {[-4-]}
<Const 0x241a7 0x20.2> Δ-2 {[-4-]|[#32]}
<Call 0x241aa 0x103d0> {[-4-]|[#32]}
WriteConsoleChar(chr : char)
<POP 241b0-241b2 StackAdj> Δ+2 {[-4-]}
<MI 241b2 ADDQ.L #0x1,D7> {[-4-]}
<MI 241b4 BVC 0x2418c> {[-4-]}
<POP 241b6-241d2 Naked> Σ-4 Δ+4 ↓ ←0x2418c
<Const 0x241b6 0x1.4> Δ-4 {[-4-]|[##1]}
<Call 0x241ba 0x103e4> {[-4-]|[##1]}
AskConsoleString(prompt : String) : String
<POP 241c0-241c2 StackAdj> Δ+4 {[-4-]}
<MI 241c2 MOVEA.L (A7)+,A4> Δ+4 {}
<MI 241c4 MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']}
<Call 0x241c6 0x220ba> {[4, 'A4']}
<MI 241ca MOVE.L A4,(A7)> {[4, 'A4']}
<Call 0x241cc 0x22c2c> {[4, 'A4']}
<POP 241d0-241d2 StackAdj> Δ+4 {}
<POP 241d2-241da Epilogue> Σ0
@ 241da
<LVAR 0x008 4(r)>
<POP 241da-2425c Body>
<POP 241da-241f0 Prologue> Σ0 ↓
<POP 241f0-241f6 RegCacheLoad> Σ0 ↓
<POP 241f6-24254 Naked> Σ0 ↓
<POP 241f6-241f8 StackAdj> Δ-4 {[-4-]}
<MI 241f8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x241fa 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x241fe 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 24202-24204 StackAdj> Δ+8 {[-4-]}
<MI 24204 MOVEA.L (A7)+,A4> Δ+4 {}
<POP 24206-24208 StackAdj> Δ-12 {[-12-]}
<MI 24208 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<Const 0x2420a 0x2.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##2]}
<Call 0x2420e 0x22bbc> {[-12-]|[4, '(A6+0x8)']|[##2]}
<POP 24212-24214 StackAdj> Δ+8 {[-12-]}
<Call 0x24214 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 2421a-2421c StackAdj> Δ+8 {[-4-]}
<MI 2421c MOVE.L (A7),D7> {[-4-]}
<POP 2421e-24220 StackAdj> Δ-8 {[-12-]}
<MI 24220 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<Const 0x24222 0x3.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##3]}
<Call 0x24226 0x22bbc> {[-12-]|[4, '(A6+0x8)']|[##3]}
<POP 2422a-2422c StackAdj> Δ+8 {[-12-]}
<Call 0x2422c 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 24232-24234 StackAdj> Δ+8 {[-4-]}
<MI 24234 MOVE.L (A7),D6> {[-4-]}
<POP 24236-24238 StackAdj> Δ-8 {[-12-]}
<MI 24238 MOVE.L A4,-(A7)> Δ-4 {[-12-]|[4, 'A4']}
<MI 2423a MOVE.L D7,-(A7)> Δ-4 {[-12-]|[4, 'A4']|[4, 'D7']}
<Call 0x2423c 0x10360> {[-12-]|[4, 'A4']|[4, 'D7']}
?StringToInt64()
<POP 24242-24244 StackAdj> Δ+4 {[-12-]|[4, 'A4']}
<MI 24244 MOVE.L D6,(A7)> {[-12-]|[4, 'D6']}
<Call 0x24246 0x1035c> {[-12-]|[4, 'D6']}
Quad2String(a : Quad; radix : Long ) : String
<POP 2424c-2424e StackAdj> Δ+12 {[-4-]}
<Call 0x2424e 0x22c2c> {[-4-]}
<POP 24252-24254 StackAdj> Δ+4 {}
<POP 24254-2425c Epilogue> Σ0
@ 2425c
<LVAR 0x008 4(r)>
<LVAR -0x00a 2(r)>
<LVAR -0x00c 4(rw)>
<LVAR -0x010 4(rw)>
<POP 2425c-242dc Body>
<POP 2425c-24272 Prologue> Σ0 ↓
<POP 24272-2427a RegCacheLoad> Σ0 ↓
<POP 2427a-24292 Naked> Σ0 ↓
<POP 2427a-2427c StackAdj> Δ-8 {[-8-]}
<MI 2427c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x24280 0x1.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##1]}
<Call 0x24284 0x22bbc> {[-8-]|[4, '(A6+0x8)']|[##1]}
<POP 24288-2428a StackAdj> Δ+8 {[-8-]}
<MI 2428a MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 2428c MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 2428e MOVEQ.L #0x00,D7> {}
<MI 24290 MOVEQ.L #0x00,D6> {}
<POP 24292-242c2 Naked> Σ0 ↓ →0x24292 ←0x24292
<MI 24292 MOVE.W (A6-0xa),D0> {}
<MI 24296 ANDI.W #0x0001,D0> {}
<MI 2429a CLR.L D1> {}
<MI 2429c MOVE.W D0,D1> {}
<MI 2429e ADD.L D1,D7> {}
<POP 242a0-242a2 StackAdj> Δ-8 {[-8-]}
<MI 242a2 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']}
<MI 242a4 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<Const 0x242a6 0xffffffff.4> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[##4294967295]}
<Call 0x242aa 0x10344> {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[##4294967295]}
BitShift(a : Quad ; howmuch : integer) : Quad
<POP 242b0-242b4 StackAdj> Δ+12 {[-8-]}
<MI 242b4 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 242b6 MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 242b8 ADDQ.L #0x1,D6> {}
<MI 242ba CMPI.L #0x0000003f,D6> {}
<MI 242c0 BLE 0x24292> {}
<POP 242c2-242d4 Naked> Σ0 ↓
<POP 242c2-242c4 StackAdj> Δ-8 {[-8-]}
<MI 242c4 MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, 'D7']}
<Call 0x242c6 0x10354> {[-8-]|[4, 'D7']}
Long2Quad(a : Long) : Quad
<POP 242cc-242ce StackAdj> Δ+4 {[-8-]}
<Call 0x242ce 0x22cb4> {[-8-]}
<POP 242d2-242d4 StackAdj> Δ+8 {}
<POP 242d4-242dc Epilogue> Σ0
@ 242dc
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 1(r)>
<POP 242dc-243a0 Body>
<POP 242dc-242f2 Prologue> Σ0 ↓
<POP 242f2-242fc RegCacheLoad> Σ0 ↓
<POP 242fc-24300 Naked> Σ0 ↓ →0x24332
<MI 242fc TST.B 0x27a3a> {}
<MI 242fe BNE 0x24332> {}
<POP 24300-24332 Naked> Σ0 ↓
<Blob 0x24300 [28] @> Δ-28 {[«28""»]}
<POP 24312-24314 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x24314 27> {[«28""»]|[$$REPEATing, type ^G to exit.]}
<Call 0x24326 0x103e0> {[«28""»]|[$$REPEATing, type ^G to exit.]}
WriteConsoleStringCrLf(str : String)
<POP 2432c-24330 StackAdj> Δ+32 {}
<MI 24330 MOVE.B #0x01,0x27a3a> {}
<POP 24332-2435c Naked> Σ0 ↓ →0x24372 ←0x242fc
<POP 24332-24334 StackAdj> Δ-6 {[-6-]}
<Call 0x24334 0x103f8> {[-6-]}
GetConsoleConfig() : Long
<MI 2433a MOVE.L (A7)+,D0> Δ+4 {[-2-]}
<POP 0x2433c LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-2-]}
<MI 24346 MOVE.W D0,(A7)> {[2, 'D0']}
<Pointer.fp 0x24348 <LVAR -0x004 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-4]}
<Call 0x2434c 0x10212> {[2, 'D0']|[@@-4]}
KC09_PortStatus(Port : Word; VAR b: Byte)
<POP 24352-24354 StackAdj> Δ+6 {}
<MI 24354 MOVE.B (A6-0x4),D0> {}
<MI 24358 CMP.B #0x01,D0> {}
<MI 2435a BEQ 0x24372> {}
<POP 2435c-24372 Naked> Σ0
<MI 2435c MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<Call 0x24360 0x21e20> {[4, '(A6+0x8)']}
<POP 24364-24366 StackAdj> Δ+4 {}
<POP 24366-24372 Bailout> {}
<MI 24366 MOVEA.L (A5+0x8),A7>
<MI 2436a MOVEA.W #0x00,A6>
<MI 2436c JMP 0x25792>
<POP 24372-24382 Naked> Σ0 ↓ →0x24398 ←0x24332
<POP 24372-24374 StackAdj> Δ-2 {[-2-]}
<Call 0x24374 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 2437a MOVE.B (A7)+,D0> Δ+2 {}
<MI 2437c CMPI.B #0x07,D0> {}
<MI 24380 BEQ 0x24398> {}
<POP 24382-24398 Naked> Σ0
<MI 24382 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<Call 0x24386 0x21e20> {[4, '(A6+0x8)']}
<POP 2438a-2438c StackAdj> Δ+4 {}
<POP 2438c-24398 Bailout> {}
<MI 2438c MOVEA.L (A5+0x8),A7>
<MI 24390 MOVEA.W #0x00,A6>
<MI 24392 JMP 0x25792>
<POP 24398-243a0 Epilogue> Σ0 ←0x24372
@ 243a0
<POP 243a0-243c0 Body>
<POP 243a0-243b2 Prologue> Σ0 ↓
<POP 243b2-243bc Naked> Σ0 ↓
<Const 0x243b2 0xc8.4> Δ-4 {[##200]}
<Call 0x243b6 0x22ce8> {[##200]}
<POP 243ba-243bc StackAdj> Δ+4 {}
<POP 243bc-243c0 Epilogue> Σ0
@ 243c0
<LVAR 0x008 4(r)>
<LVAR -0x00c @ 4(r)>
<POP 243c0-2446c Body>
<POP 243c0-243d6 Prologue> Σ0 ↓
<POP 243d6-243da RegCacheLoad> Σ0 ↓
<POP 243da-243ee Naked> Σ0 Δ-4 ↓
<Pointer.fp 0x243da <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-12]}
<Call 0x243dc 0x102b8> {[@@-12]}
NewString(VAR a : String)
<MI 243e2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[@@-12]|[4, '(A6+0x8)']}
<Call 0x243e6 0x2226e> {[@@-12]|[4, '(A6+0x8)']}
<POP 243ea-243ec StackAdj> Δ+4 {[@@-12]}
<MI 243ec MOVEQ.L #0x01,D7> {[@@-12]}
<POP 243ee-243f2 Naked> Σ-4 ↓ →0x2445c ←0x24458
<MI 243ee CMP.L (A7),D7> {[-4-]}
<MI 243f0 BGT 0x2445c> {[-4-]}
<POP 243f2-24404 Naked> Σ-4 ↓ →0x24424
<POP 243f2-243f4 StackAdj> Δ-4 {[-8-]}
<MI 243f4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<MI 243f8 MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x243fa 0x22bf8> {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<POP 243fe-24400 StackAdj> Δ+8 {[-8-]}
<MI 24400 MOVE.L (A7)+,D6> Δ+4 {[-4-]}
<MI 24402 BLT 0x24424> {[-4-]}
<POP 24404-2440c Naked> Σ-4 ↓ →0x24424
<MI 24404 CMPI.L #0x000000ff,D6> {[-4-]}
<MI 2440a BGT 0x24424> {[-4-]}
<POP 2440c-24424 Naked> Σ-4 →0x24458
<MI 2440c MOVE.L (A6-0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6-0xc)']}
<POP 0x2440e LimitCheck 0x0 ≤ D6 ≤ 0xff> {[-4-]|[4, '(A6-0xc)']}
<MI 24418 MOVE.B D6,-(A7)> Δ-2 {[-4-]|[4, '(A6-0xc)']|[2, 'D6']}
<Call 0x2441a 0x102c0> {[-4-]|[4, '(A6-0xc)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 24420-24422 StackAdj> Δ+6 {[-4-]}
<MI 24422 BRA 0x24458> {[-4-]}
<POP 24424-24458 Naked> Σ-4 ↓ ←0x243f2 ←0x24404
<Pointer.fp 0x24424 <LVAR -0x00c @ 4(r)>> Δ-4 {[-4-]|[@@-12]}
<Call 0x24426 0x102bc> {[-4-]|[@@-12]}
FreeString(VAR a : String)
<POP 2442c-2442e StackAdj> Δ+4 {[-4-]}
<Blob 0x2442e [28] @> Δ-28 {[-4-]|[«28""»]}
<POP 2443a-2443c StackAdj> Δ-4 {[-4-]|[«28""»]|[-4-]}
<Lit 0x2443c 28> {[-4-]|[«28""»]|[$$ASCII argument out of range.]}
<Call 0x24450 0x21e62> {[-4-]|[«28""»]|[$$ASCII argument out of range.]}
<POP 24454-24458 StackAdj> Δ+32 {[-4-]}
<POP 24458-2445c Naked> Σ-4 ↓ →0x243ee ←0x2440c
<MI 24458 ADDQ.L #0x1,D7> {[-4-]}
<MI 2445a BVC 0x243ee> {[-4-]}
<POP 2445c-24464 Naked> Σ-4 Δ+4 ↓ ←0x243ee
<MI 2445c MOVE.L (A6-0xc),(A7)> {[4, '(A6-0xc)']}
<Call 0x2445e 0x22c2c> {[4, '(A6-0xc)']}
<POP 24462-24464 StackAdj> Δ+4 {}
<POP 24464-2446c Epilogue> Σ0
@ 2446c
<LVAR 0x008 4(r)>
<POP 2446c-244ee Body>
<POP 2446c-24482 Prologue> Σ0 ↓
<POP 24482-24486 RegCacheLoad> Σ0 ↓
<POP 24486-2449a Naked> Σ0 ↓ →0x244b4
<POP 24486-24488 StackAdj> Δ-4 {[-4-]}
<MI 24488 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x2448a 0x2226e> {[-4-]|[4, '(A6+0x8)']}
<POP 2448e-24490 StackAdj> Δ+4 {[-4-]}
<MI 24490 MOVE.L (A7)+,D6> Δ+4 {}
<MI 24492 CMPI.L #0x00000001,D6> {}
<MI 24498 BGE 0x244b4> {}
<POP 2449a-244b4 Naked> Σ0 ↓
<Blob 0x2449a [10] @> Δ-10 {[«10""»]}
<MI 244a6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«10""»]|[4, '(A6+0x8)']}
<Const 0x244a8 0x1.4> Δ-4 {[«10""»]|[4, '(A6+0x8)']|[##1]}
<Call 0x244ac 0x222a4> {[«10""»]|[4, '(A6+0x8)']|[##1]}
<POP 244b0-244b4 StackAdj> Δ+18 {}
<POP 244b4-244d4 Naked> Σ0 ↓ →0x244e6 ←0x24486
<POP 244b4-244b8 StackAdj> Δ-12 {[-12-]}
<MI 244b8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<Const 0x244ba 0x1.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##1]}
<Call 0x244be 0x22bbc> {[-12-]|[4, '(A6+0x8)']|[##1]}
<POP 244c2-244c4 StackAdj> Δ+8 {[-12-]}
<Call 0x244c4 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 244ca-244cc StackAdj> Δ+8 {[-4-]}
<MI 244cc MOVE.L (A7)+,D7> Δ+4 {}
<MI 244ce ADDQ.L #0x1,D7> {}
<MI 244d0 CMP.L D6,D7> {}
<MI 244d2 BGT 0x244e6> {}
<POP 244d4-244e6 Naked> Σ0 ↓
<POP 244d4-244d6 StackAdj> Δ-4 {[-4-]}
<MI 244d6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<MI 244d8 MOVE.L D7,-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x244da 0x22b8a> {[-4-]|[4, '(A6+0x8)']|[4, 'D7']}
<POP 244de-244e0 StackAdj> Δ+8 {[-4-]}
<Call 0x244e0 0x22c2c> {[-4-]}
<POP 244e4-244e6 StackAdj> Δ+4 {}
<POP 244e6-244ee Epilogue> Σ0 ←0x244b4
@ 244ee
<LVAR 0x00c 1(rw)>
<LVAR 0x008 4(r)>
<POP 244ee-245a6 Body> Δ-8
<POP 244ee-24504 Prologue> Σ0 ↓
<POP 24504-24514 Naked> Σ0 Δ-4 ↓
<MI 24504 CLR.B (A6+0xc)> {}
<MI 24508 MOVEA.L (A6+0x8),A0> {}
<MI 2450c MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2450e MOVEQ.L #0x00,D0> {[4, 'A0']}
<MI 24510 ADDQ.W #0x1,D0> {[4, 'A0']}
<MI 24512 MOVE.B D0,D6> {[4, 'A0']}
<POP 24514-2451c Naked> Σ-4 ↓ →0x2459c ←0x24596
<MI 24514 CMPI.B #0x2c,D6> {[-4-]}
<MI 24518 BGT 0x2459c> {[-4-]}
<POP 2451c-24542 Naked> Σ-4 ↓ →0x24596
<MI 2451c LEA.L 0x21d4c,A0> {[-4-]}
<MI 24520 MOVE.B D6,D0> {[-4-]}
<MI 24522 EXTB.W D0> {[-4-]}
<MI 24524 EXTW.L D0> {[-4-]}
<MI 24526 ROR.L #0x1,D0> {[-4-]}
<MI 24528 ADDA.W D0,A0> {[-4-]}
<MI 2452a SWAP.W D0> {[-4-]}
<MI 2452c ROL.W #0x3,D0> {[-4-]}
<MI 2452e CLR.L D1> {[-4-]}
<MI 24530 MOVE.B (A0),D1> {[-4-]}
<MI 24532 LSL.B D0,D1> {[-4-]}
<MI 24534 LSR.B #0x4,D1> {[-4-]}
<MI 24536 MOVE.L D1,D5> {[-4-]}
<MI 24538 MOVEA.L (A7),A0> {[-4-]}
<MI 2453a MOVE.W (A0),D0> {[-4-]}
<MI 2453c EXTW.L D0> {[-4-]}
<MI 2453e CMP.L D0,D5> {[-4-]}
<MI 24540 BNE 0x24596> {[-4-]}
<POP 24542-24546 Naked> Σ-4 Δ-4 ↓
<MI 24542 MOVE.L D5,-(A7)> Δ-4 {[-4-]|[4, 'D5']}
<MI 24544 MOVEQ.L #0x01,D7> {[-4-]|[4, 'D5']}
<POP 24546-2454a Naked> Σ-8 ↓ →0x2458c ←0x24588
<MI 24546 CMP.L (A7),D7> {[-8-]}
<MI 24548 BGT 0x2458c> {[-8-]}
<POP 2454a-24584 Naked> Σ-8 ↓ →0x24588
<MI 2454a MOVE.B D6,D0> {[-8-]}
<MI 2454c EXTB.W D0> {[-8-]}
<MI 2454e MULS.W #0xa,D0> {[-8-]}
<MI 24552 MOVE.L D7,D1> {[-8-]}
<MI 24554 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x24556 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 24560 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 24564 LEA.L 0x21b8a,A1> {[-8-]}
<MI 24568 MOVE.L D7,D2> {[-8-]}
<MI 2456a SUBQ.L #0x1,D2> {[-8-]}
<POP 0x2456c LimitCheck 0x0 ≤ D2 ≤ 0x9> {[-8-]}
<MI 24576 LEA.L (A1+D0.W),A1> {[-8-]}
<MI 2457a MOVE.B (A0+D1.L+#0x2),D0> {[-8-]}
<MI 2457e CMP.B (A1+D2.L),D0> {[-8-]}
<MI 24582 BEQ 0x24588> {[-8-]}
<POP 24584-24588 Naked> Σ-8 Δ+4 →0x24596
<POP 24584-24586 StackAdj> Δ+4 {[-4-]}
<MI 24586 BRA 0x24596> {[-4-]}
<POP 24588-2458c Naked> Σ-8 ↓ →0x24546 ←0x2454a
<MI 24588 ADDQ.L #0x1,D7> {[-8-]}
<MI 2458a BVC 0x24546> {[-8-]}
<POP 2458c-24596 Naked> Σ-8 Δ+8 →0x2459e ←0x24546
<POP 2458c-2458e StackAdj> Δ+4 {[-4-]}
<MI 2458e MOVE.B D6,(A6+0xc)> {[-4-]}
<POP 24592-24594 StackAdj> Δ+4 {}
<MI 24594 BRA 0x2459e> {}
<POP 24596-2459c Naked> Σ-4 ↓ →0x24514 ←0x2451c ←0x24584
<MI 24596 ADDQ.B #0x1,D6> {[-4-]}
<MI 24598 BVC 0x24514> {[-4-]}
<POP 2459c-2459e Naked> Σ-4 Δ+4 ↓ ←0x24514
<POP 2459c-2459e StackAdj> Δ+4 {}
<POP 2459e-245a6 Epilogue> Σ0 ←0x2458c
@ 245a6
<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 245a6-246e2 Body>
<POP 245a6-245bc Prologue> Σ0 ↓
<POP 245bc-245ca RegCacheLoad> Σ0 ↓
<POP 245ca-24636 Naked> Σ0 ↓ →0x24680
<POP 245ca-245cc StackAdj> Δ-4 {[-4-]}
<MI 245cc MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<Call 0x245d0 0x102cc> {[-4-]|[4, '(A6+0xc)']}
StringDup(a : String) : String
<POP 245d6-245d8 StackAdj> Δ+4 {[-4-]}
<MI 245d8 MOVE.L (A7)+,(A6-0x10)> Δ+4 {}
<MI 245da MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']}
<Const 0x245dc 0x2e.2> Δ-2 {[4, '(A6-0x10)']|[#46]}
<Call 0x245e0 0x102c0> {[4, '(A6-0x10)']|[#46]}
AppendChar(MOD b : String; a : char)
<POP 245e6-245e8 StackAdj> Δ+6 {}
<Blob 0x245e8 [10] 0x27a1a> Δ-10 {[«10»]}
<POP 245f6-245f8 StackAdj> Δ-4 {[«10»]|[-4-]}
<MI 245f8 MOVE.L (A6-0x10),-(A7)> Δ-4 {[«10»]|[-4-]|[4, '(A6-0x10)']}
<POP 245fa-245fc StackAdj> Δ-4 {[«10»]|[-4-]|[4, '(A6-0x10)']|[-4-]}
<Lit 0x245fc> {[«10»]|[-4-]|[4, '(A6-0x10)']|[$$…]}
<Pointer.sp 0x245fc 12> Δ-4
<Const 0x24600 0x1.2> Δ-2
<Const 0x24602 0xa.2> Δ-2
<Call 0x24606 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2460c-2460e StackAdj> Δ+8
<Call 0x2460e 0x102d0> {[«10»]|[-4-]|[4, '(A6-0x10)']|[$$…]}
StringCat2(a, b : String) : String
<POP 24614-24616 StackAdj> Δ+8 {[«10»]|[-4-]}
<MI 24616 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[«10»]}
<POP 24618-2461a StackAdj> Δ+6 {[-4-]}
<MI 2461a MOVE.L (A6-0x10),(A7)> {[4, '(A6-0x10)']}
<MI 2461c CLR.B -(A7)> Δ-2 {[4, '(A6-0x10)']|[#0]}
<Const 0x2461e 0x1.2> Δ-2 {[4, '(A6-0x10)']|[#0]|[#1]}
<Const 0x24620 0x0.4> Δ-4 {[4, '(A6-0x10)']|[#0]|[#1]|[##0]}
<Pointer.fp 0x24624 <LVAR -0x002 @ 1(r)>> Δ-4 {[4, '(A6-0x10)']|[#0]|[#1]|[##0]|[@@-2]}
<Pointer.fp 0x24626 <LVAR -0x00c @ 4(r)>> Δ-4 {[4, '(A6-0x10)']|[#0]|[#1]|[##0]|[@@-2]|[@@-12]}
<Call 0x24628 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 2462e-24632 StackAdj> Δ+20 {}
<MI 24632 TST.B (A6-0x2)> {}
<MI 24634 BEQ 0x24680> {}
<POP 24636-24680 Naked> Σ0 ↓
<Pointer.fp 0x24636 <LVAR -0x010 @ 4(rw)>> Δ-4 {[@@-16]}
<Call 0x24638 0x102bc> {[@@-16]}
FreeString(VAR a : String)
<MI 2463e MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<Call 0x24642 0x21e20> {[4, '(A6+0x8)']}
<POP 24646-24647 StackAdj> Δ+4 ↓ {}
<Blob 0x24647 [26] @> Δ-26 {[«26""»]}
<POP 24658-2465a StackAdj> Δ-8 {[«26""»]|[-8-]}
<Lit 0x2465a 25> {[«26""»]|[-4-]|[$$Not a command or macro :_]}
<POP 2466a-2466c StackAdj> Δ-4 {[«26""»]|[-4-]|[$$Not a command or macro :_]|[-4-]}
<MI 2466c MOVE.L (A6+0xc),(A7)> {[«26""»]|[-4-]|[$$Not a command or macro :_]|[4, '(A6+0xc)']}
<Call 0x24670 0x102d0> {[«26""»]|[-4-]|[$$Not a command or macro :_]|[4, '(A6+0xc)']}
StringCat2(a, b : String) : String
<POP 24676-24678 StackAdj> Δ+8 {[«26""»]|[-4-]}
<Call 0x24678 0x21e62> {[«26""»]|[-4-]}
<POP 2467c-24680 StackAdj> Δ+30 {}
<POP 24680-24688 Naked> Σ0 ↓ ←0x245ca
<MI 24680 MOVE.L 0x27a08,(A6-0x6)> {}
<POP 24688-246a0 Naked> Σ0 ↓ →0x246b4 ←0x246b4
<MI 24688 MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']}
<Pointer.fp 0x2468a <LVAR -0x010 @ 4(rw)>> Δ-4 {[4, '(A6-0xc)']|[@@-16]}
<Pointer.fp 0x2468c <LVAR -0x008 @ 1(r)>> Δ-4 {[4, '(A6-0xc)']|[@@-16]|[@@-8]}
<Call 0x24690 0x1043c> {[4, '(A6-0xc)']|[@@-16]|[@@-8]}
FileReadLine(file : File; VAR a : String; VAR b : Byte)
<POP 24696-2469a StackAdj> Δ+12 {}
<MI 2469a MOVEA.L (A6-0x10),A0> {}
<MI 2469c TST.W (A0)> {}
<MI 2469e BEQ 0x246b4> {}
<POP 246a0-246b4 Naked> Σ0 ↓
<MI 246a0 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']}
<Call 0x246a2 0x220ba> {[4, '(A6-0x10)']}
<POP 246a6-246a8 StackAdj> Δ+4 {}
<Pointer.fp 0x246a8 <LVAR -0x006 @ 4(w)>> Δ-4 {[@@-6]}
<MI 246ac MOVE.L (A6-0x10),-(A7)> Δ-4 {[@@-6]|[4, '(A6-0x10)']}
<Call 0x246ae 0x22440> {[@@-6]|[4, '(A6-0x10)']}
<POP 246b2-246b4 StackAdj> Δ+8 {}
<POP 246b4-246ba Naked> Σ0 ↓ →0x24688 ←0x24688
<MI 246b4 TST.B (A6-0x8)> {}
<MI 246b8 BEQ 0x24688> {}
<POP 246ba-246da Naked> Σ0 ↓
<MI 246ba CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x246bc 0x1.2> Δ-2 {[#0]|[#1]}
<Const 0x246be 0x1.4> Δ-4 {[#0]|[#1]|[##1]}
<Pointer.fp 0x246c2 <LVAR -0x002 @ 1(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-2]}
<Pointer.fp 0x246c4 <LVAR -0x00c @ 4(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-2]|[@@-12]}
<Call 0x246c6 0x1038c> {[#0]|[#1]|[##1]|[@@-2]|[@@-12]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 246cc-246d0 StackAdj> Δ+16 {}
<Pointer.fp 0x246d0 <LVAR -0x010 @ 4(rw)>> Δ-4 {[@@-16]}
<Call 0x246d2 0x102bc> {[@@-16]}
FreeString(VAR a : String)
<POP 246d8-246da StackAdj> Δ+4 {}
<POP 246da-246e2 Epilogue> Σ0
@ 246e2
<LVAR 0x014 1(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 246e2-24722 Body>
<POP 246e2-246f8 Prologue> Σ0 ↓
<POP 246f8-2471a Naked> Σ0 ↓
<MI 246f8 MOVE.L (A6+0xc),D0> {}
<MI 246fc ADD.L (A6+0x8),D0> {}
<MI 24700 SUBQ.L #0x1,D0> {}
<MI 24702 SUBQ.L #0x1,D0> {}
<POP 0x24704 LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {}
<MI 2470e LEA.L 0x25a00,A0> {}
<MI 24714 MOVE.B (A0+D0.L+#0x8),(A6+0x14)> {}
<POP 2471a-24722 Epilogue> Σ0
@ 24722
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 1(r)>
<LVAR -0x008 @ 4(r)>
<POP 24722-2479e Body>
<POP 24722-24738 Prologue> Σ0 ↓
<POP 24738-24760 Naked> Σ0 ↓ →0x24790
<POP 24738-2473a StackAdj> Δ-4 {[-4-]}
<MI 2473a MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 2473e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x24742 0x22b0e> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 24746-24748 StackAdj> Δ+8 {[-4-]}
<Pointer.fp 0x24748 <LVAR -0x004 @ 1(r)>> Δ-4 {[-4-]|[@@-4]}
<Pointer.fp 0x2474c <LVAR -0x008 @ 4(r)>> Δ-4 {[-4-]|[@@-4]|[@@-8]}
<Call 0x24750 0x102ec> {[-4-]|[@@-4]|[@@-8]}
String2Long(src : String; VAR status : Bool; VAR retval : Long)
<POP 24756-2475a StackAdj> Δ+12 {}
<MI 2475a TST.B (A6-0x4)> {}
<MI 2475e BNE 0x24790> {}
<POP 24760-24790 Naked> Σ0 ↓
<Blob 0x24760 [24] @> Δ-24 {[«24""»]}
<POP 24772-24774 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x24774 23> {[«24""»]|[$$Illegal marker argument]}
<Call 0x24788 0x21e62> {[«24""»]|[$$Illegal marker argument]}
<POP 2478c-24790 StackAdj> Δ+28 {}
<POP 24790-24796 Naked> Σ0 ↓ ←0x24738
<MI 24790 MOVE.L (A6-0x8),(A6+0x10)> {}
<POP 24796-2479e Epilogue> Σ0
@ 2479e
<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 2479e-248c6 Body>
<POP 2479e-247b4 Prologue> Σ0 ↓
<POP 247b4-247c4 RegCacheLoad> Σ0 ↓
<POP 247c4-247de Naked> Σ0 Δ-4 ↓
<MI 247c4 MOVEQ.L #0x00,D7> {}
<MI 247c6 MOVE.L (A6+0x14),(A6-0x20)> {}
<MI 247ca MOVE.L 0x27a08,D0> {}
<MI 247d0 SUB.L (A6+0x14),D0> {}
<MI 247d4 MOVE.L D0,(A6-0x14)> {}
<MI 247d6 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 247da MOVE.L (A6+0x10),D5> {[4, '(A6+0xc)']}
<POP 247de-247e2 Naked> Σ-4 ↓ →0x2480e ←0x2480a
<MI 247de CMP.L (A7),D5> {[-4-]}
<MI 247e0 BGT 0x2480e> {[-4-]}
<POP 247e2-24808 Naked> Σ-4 ↓ →0x2480a
<POP 247e2-247e4 StackAdj> Δ-8 {[-12-]}
<MI 247e4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<MI 247e8 MOVE.L D5,-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<Call 0x247ea 0x22aac> {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<POP 247ee-247f0 StackAdj> Δ+8 {[-12-]}
<MI 247f0 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-8-]}
<MI 247f2 MOVE.L (A7),(A6-0xc)> {[-8-]}
<MI 247f4 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']}
<MI 247f6 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<Call 0x247f8 0x22a74> {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<POP 247fc-247fe StackAdj> Δ+8 {[-8-]}
<MI 247fe MOVE.L (A7)+,D6> Δ+4 {[-4-]}
<MI 24800 ADD.L D6,D7> {[-4-]}
<MI 24802 CMP.L (A6+0xc),D5> {[-4-]}
<MI 24806 BGE 0x2480a> {[-4-]}
<POP 24808-2480a Naked> Σ-4 ↓
<MI 24808 ADDQ.L #0x1,D7> {[-4-]}
<POP 2480a-2480e Naked> Σ-4 ↓ →0x247de ←0x247e2
<MI 2480a ADDQ.L #0x1,D5> {[-4-]}
<MI 2480c BVC 0x247de> {[-4-]}
<POP 2480e-2481c Naked> Σ-4 Δ+4 ↓ →0x24828 ←0x247de
<POP 2480e-24810 StackAdj> Δ+4 {}
<MI 24810 MOVE.L (A6-0x20),D0> {}
<MI 24812 ADD.L (A6-0x14),D0> {}
<MI 24814 MOVE.L D0,(A6-0x18)> {}
<MI 24818 CMP.L (A6-0x14),D7> {}
<MI 2481a BEQ 0x24828> {}
<POP 2481c-24828 Naked> Σ0 ↓
<MI 2481c MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 2481e MOVE.L (A6-0x14),-(A7)> Δ-4 {[4, 'D0']|[4, '(A6-0x14)']}
<MI 24820 SUB.L D7,(A7)> {[4, 'D0']|[-4-]}
<Call 0x24822 0x223b6> {[4, 'D0']|[-4-]}
<POP 24826-24828 StackAdj> Δ+8 {}
<POP 24828-24830 Naked> Σ0 Δ-4 ↓ ←0x2480e
<MI 24828 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 2482c MOVE.L (A6+0x10),D5> {[4, '(A6+0xc)']}
<POP 24830-24836 Naked> Σ-4 ↓ →0x248bc ←0x248b6
<MI 24830 CMP.L (A7),D5> {[-4-]}
<MI 24832 BGT 0x248bc> {[-4-]}
<POP 24836-24858 Naked> Σ-4 Δ-4 ↓
<POP 24836-24838 StackAdj> Δ-8 {[-12-]}
<MI 24838 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<MI 2483c MOVE.L D5,-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<Call 0x2483e 0x22aac> {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<POP 24842-24844 StackAdj> Δ+8 {[-12-]}
<MI 24844 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-8-]}
<MI 24846 MOVE.L (A7),(A6-0xc)> {[-8-]}
<MI 24848 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']}
<MI 2484a MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<Call 0x2484c 0x22a74> {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<POP 24850-24852 StackAdj> Δ+8 {[-8-]}
<MI 24852 MOVE.L (A7)+,D6> Δ+4 {[-4-]}
<MI 24854 MOVE.L D6,-(A7)> Δ-4 {[-4-]|[4, 'D6']}
<MI 24856 MOVEQ.L #0x01,D0> {[-4-]|[4, 'D6']}
<POP 24858-2485c Naked> Σ-8 ↓ →0x2488c ←0x2485c
<MI 24858 CMP.L (A7),D0> {[-8-]}
<MI 2485a BGT 0x2488c> {[-8-]}
<POP 2485c-2488c Naked> Σ-8 ↓ →0x24858
<MI 2485c MOVE.L (A6-0x20),D1> {[-8-]}
<MI 2485e ADD.L D0,D1> {[-8-]}
<MI 24860 SUBQ.L #0x1,D1> {[-8-]}
<MI 24862 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x24864 LimitCheck 0x0 ≤ D1 ≤ 0x1fff> {[-8-]}
<MI 2486e LEA.L 0x25a00,A0> {[-8-]}
<POP 24874-24876 StackAdj> Δ-2 {[-10-]}
<MI 24876 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-10-]|[4, '(A6-0xc)']}
<MI 24878 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-10-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<MI 2487a MOVE.L D0,-(A7)> Δ-4 {[-10-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D0']}
<Call 0x2487c 0x246e2> {[-10-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D0']}
<POP 24880-24884 StackAdj> Δ+12 {[-10-]}
<MI 24884 MOVE.B (A7)+,(A0+D1.L+#0x8)> Δ+2 {[-8-]}
<MI 24888 ADDQ.L #0x1,D0> {[-8-]}
<MI 2488a BVC 0x24858> {[-8-]}
<POP 2488c-24894 Naked> Σ-8 Δ+4 ↓ →0x248b6 ←0x24858
<POP 2488c-2488e StackAdj> Δ+4 {[-4-]}
<MI 2488e CMP.L (A6+0xc),D5> {[-4-]}
<MI 24892 BGE 0x248b6> {[-4-]}
<POP 24894-248b6 Naked> Σ-4 ↓
<MI 24894 MOVE.L (A6-0x20),D0> {[-4-]}
<MI 24896 ADD.L D6,D0> {[-4-]}
<MI 24898 MOVE.L D0,D1> {[-4-]}
<MI 2489a SUBQ.L #0x1,D1> {[-4-]}
<POP 0x2489c LimitCheck 0x0 ≤ D1 ≤ 0x1fff> {[-4-]}
<MI 248a6 LEA.L 0x25a00,A0> {[-4-]}
<MI 248ac MOVE.B #0x2c,(A0+D1.L+#0x8)> {[-4-]}
<MI 248b2 ADDQ.L #0x1,D0> {[-4-]}
<MI 248b4 MOVE.L D0,(A6-0x20)> {[-4-]}
<POP 248b6-248bc Naked> Σ-4 ↓ →0x24830 ←0x2488c
<MI 248b6 ADDQ.L #0x1,D5> {[-4-]}
<MI 248b8 BVC 0x24830> {[-4-]}
<POP 248bc-248be Naked> Σ-4 Δ+4 ↓ ←0x24830
<POP 248bc-248be StackAdj> Δ+4 {}
<POP 248be-248c6 Epilogue> Σ0
@ 248c6
<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 248c6-249bc Body> Δ-12
<POP 248c6-248dc Prologue> Σ0 ↓
<POP 248dc-248f2 RegCacheLoad> Σ0 ↓
<POP 248f2-2491c Naked> Σ0 Δ-4 ↓
<POP 248f2-248f4 StackAdj> Δ-4 {[-4-]}
<MI 248f4 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 248f6 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<Call 0x248f8 0x22a74> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<POP 248fc-248fe StackAdj> Δ+8 {[-4-]}
<MI 248fe MOVE.L (A7),(A6-0xc)> {[-4-]}
<MI 24900 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 24904 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x24908 0x22a74> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 2490c-2490e StackAdj> Δ+8 {[-4-]}
<MI 2490e MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 24910 ADDQ.L #0x1,(A6-0x8)> {}
<MI 24912 MOVE.L (A6-0xc),D0> {}
<MI 24914 SUB.L (A6-0x8),D0> {}
<MI 24916 ADDQ.L #0x1,D0> {}
<MI 24918 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 2491a MOVEQ.L #0x01,D0> {[4, 'D0']}
<POP 2491c-24922 Naked> Σ-4 ↓ →0x249ae ←0x249a6
<MI 2491c CMP.L (A7),D0> {[-4-]}
<MI 2491e BGT 0x249ae> {[-4-]}
<POP 24922-2492e Naked> Σ-4 Δ-8 ↓
<MI 24922 MOVE.L D0,(A6-0x18)> {[-4-]}
<MI 24926 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<MI 24928 MOVEQ.L #0x00,D6> {[-4-]|[4, 'D0']}
<MI 2492a MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
<MI 2492c MOVEQ.L #0x01,D5> {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
<POP 2492e-24932 Naked> Σ-12 ↓ →0x24974 ←0x2496e
<MI 2492e CMP.L (A7),D5> {[-12-]}
<MI 24930 BGT 0x24974> {[-12-]}
<POP 24932-2493a Naked> Σ-12 ↓ →0x2493e
<MI 24932 CMPI.L #0x00000001,D5> {[-12-]}
<MI 24938 BNE 0x2493e> {[-12-]}
<POP 2493a-2493e Naked> Σ-12 →0x24952
<MI 2493a MOVEQ.L #0x2f,D7> {[-12-]}
<MI 2493c BRA 0x24952> {[-12-]}
<POP 2493e-24952 Naked> Σ-12 ↓ ←0x24932
<POP 2493e-24940 StackAdj> Δ-2 {[-14-]}
<MI 24940 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-14-]|[4, '(A6+0xc)']}
<MI 24944 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 24948 MOVE.L D5,-(A7)> Δ-4 {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D5']}
<MI 2494a SUBQ.L #0x1,(A7)> {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[-4-]}
<Call 0x2494c 0x246e2> {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[-4-]}
<POP 2494e-24950 StackAdj> Δ+12 {[-14-]}
<MI 24950 MOVE.B (A7)+,D7> Δ+2 {[-12-]}
<POP 24952-2496a Naked> Σ-12 ↓ →0x2496e ←0x2493a
<POP 24952-24954 StackAdj> Δ-2 {[-14-]}
<MI 24954 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-14-]|[4, '(A6+0x14)']}
<MI 24956 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 24958 MOVE.L (A7+0xe),D0> {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 2495c ADD.L D5,D0> {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 2495e SUBQ.L #0x1,D0> {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 24960 MOVE.L D0,-(A7)> Δ-4 {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
<Call 0x24962 0x246e2> {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
<POP 24964-24966 StackAdj> Δ+12 {[-14-]}
<MI 24966 CMP.B (A7)+,D7> Δ+2 {[-12-]}
<MI 24968 BEQ 0x2496e> {[-12-]}
<POP 2496a-2496e Naked> Σ-12 Δ+4 →0x24976
<POP 2496a-2496c StackAdj> Δ+4 {[-8-]}
<MI 2496c BRA 0x24976> {[-8-]}
<POP 2496e-24974 Naked> Σ-12 ↓ →0x2492e ←0x24952
<MI 2496e MOVE.L D5,D6> {[-12-]}
<MI 24970 ADDQ.L #0x1,D5> {[-12-]}
<MI 24972 BVC 0x2492e> {[-12-]}
<POP 24974-24976 Naked> Σ-12 Δ+4 ↓ ←0x2492e
<POP 24974-24976 StackAdj> Δ+4 {[-8-]}
<POP 24976-2497a Naked> Σ-8 ↓ →0x249a6 ←0x2496a
<MI 24976 CMP.L (A6-0x8),D6> {[-8-]}
<MI 24978 BNE 0x249a6> {[-8-]}
<POP 2497a-24986 Naked> Σ-8 ↓ →0x24988
<MI 2497a MOVE.L (A7),D0> {[-8-]}
<MI 2497c MOVE.L D0,(A6+0x18)> {[-8-]}
<MI 24980 ADD.L (A6-0x8),D0> {[-8-]}
<MI 24982 CMP.L (A6-0xc),D0> {[-8-]}
<MI 24984 BLT 0x24988> {[-8-]}
<POP 24986-24988 Naked> Σ-8 →0x249a2
<MI 24986 BRA 0x249a2> {[-8-]}
<POP 24988-2499c Naked> Σ-8 ↓ →0x249a2 ←0x2497a
<POP 24988-2498a StackAdj> Δ-2 {[-10-]}
<MI 2498a MOVE.L (A6+0x14),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']}
<MI 2498c MOVE.L (A6+0x10),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 2498e MOVE.L D0,-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
<Call 0x24990 0x246e2> {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
<POP 24992-24994 StackAdj> Δ+12 {[-10-]}
<MI 24994 MOVE.B (A7)+,D7> Δ+2 {[-8-]}
<MI 24996 CMPI.B #0x2f,D7> {[-8-]}
<MI 2499a BEQ 0x249a2> {[-8-]}
<POP 2499c-249a2 Naked> Σ-8 ↓ →0x249a6
<MI 2499c CMPI.B #0x3d,D7> {[-8-]}
<MI 249a0 BNE 0x249a6> {[-8-]}
<POP 249a2-249a6 Naked> Σ-8 Δ+8 →0x249b4 ←0x24986 ←0x24988
<POP 249a2-249a4 StackAdj> Δ+8 {}
<MI 249a4 BRA 0x249b4> {}
<POP 249a6-249ae Naked> Σ-8 Δ+4 ↓ →0x2491c ←0x24976 ←0x2499c
<MI 249a6 MOVE.L (A7)+,D0> Δ+4 {[-4-]}
<MI 249a8 ADDQ.L #0x1,D0> {[-4-]}
<MI 249aa BVC 0x2491c> {[-4-]}
<POP 249ae-249b4 Naked> Σ-4 Δ+4 ↓ ←0x2491c
<POP 249ae-249b0 StackAdj> Δ+4 {}
<MI 249b0 CLR.L (A6+0x18)> {}
<POP 249b4-249bc Epilogue> Σ0 ←0x249a2
@ 249bc
<LVAR 0x018 4(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 249bc-24a50 Body> Δ-4
<POP 249bc-249d2 Prologue> Σ0 ↓
<POP 249d2-249dc RegCacheLoad> Σ0 ↓
<POP 249dc-249f6 Naked> Σ0 ↓ →0x24a48
<POP 249dc-249de StackAdj> Δ-4 {[-4-]}
<MI 249de MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 249e0 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 249e2 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 249e6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x249ea 0x248c6> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 249ee-249f2 StackAdj> Δ+16 {[-4-]}
<MI 249f2 MOVE.L (A7)+,D5> Δ+4 {}
<MI 249f4 BLE 0x24a48> {}
<POP 249f6-24a16 Naked> Σ0 Δ-4 ↓
<MI 249f6 MOVE.L (A6+0x18),-(A7)> Δ-4 {[4, '(A6+0x18)']}
<Const 0x249fa 0x2f.2> Δ-2 {[4, '(A6+0x18)']|[#47]}
<Call 0x249fc 0x102c0> {[4, '(A6+0x18)']|[#47]}
AppendChar(MOD b : String; a : char)
<POP 24a02-24a04 StackAdj> Δ+6 {}
<MI 24a04 MOVE.L D5,D0> {}
<MI 24a06 ADDQ.L #0x1,D0> {}
<POP 24a08-24a0a StackAdj> Δ-4 {[-4-]}
<MI 24a0a MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 24a0c MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<Call 0x24a0e 0x22a74> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<POP 24a12-24a14 StackAdj> Δ+8 {[-4-]}
<MI 24a14 MOVE.L D0,D6> {[-4-]}
<POP 24a16-24a1a Naked> Σ-4 ↓ →0x24a46 ←0x24a34
<MI 24a16 CMP.L (A7),D6> {[-4-]}
<MI 24a18 BGT 0x24a46> {[-4-]}
<POP 24a1a-24a30 Naked> Σ-4 ↓ →0x24a34
<POP 24a1a-24a1c StackAdj> Δ-2 {[-6-]}
<MI 24a1c MOVE.L (A6+0x14),-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']}
<MI 24a1e MOVE.L (A6+0x10),-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 24a20 MOVE.L D6,-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
<Call 0x24a22 0x246e2> {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
<POP 24a26-24a2a StackAdj> Δ+12 {[-6-]}
<MI 24a2a MOVE.B (A7)+,D7> Δ+2 {[-4-]}
<MI 24a2c CMP.B #0x2f,D7> {[-4-]}
<MI 24a2e BNE 0x24a34> {[-4-]}
<POP 24a30-24a34 Naked> Σ-4 Δ+4 →0x24a48
<POP 24a30-24a32 StackAdj> Δ+4 {}
<MI 24a32 BRA 0x24a48> {}
<POP 24a34-24a46 Naked> Σ-4 ↓ →0x24a16 ←0x24a1a
<MI 24a34 MOVE.L (A6+0x18),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x18)']}
<MI 24a38 MOVE.B D7,-(A7)> Δ-2 {[-4-]|[4, '(A6+0x18)']|[2, 'D7']}
<Call 0x24a3a 0x102c0> {[-4-]|[4, '(A6+0x18)']|[2, 'D7']}
AppendChar(MOD b : String; a : char)
<POP 24a40-24a42 StackAdj> Δ+6 {[-4-]}
<MI 24a42 ADDQ.L #0x1,D6> {[-4-]}
<MI 24a44 BVC 0x24a16> {[-4-]}
<POP 24a46-24a48 Naked> Σ-4 Δ+4 ↓ ←0x24a16
<POP 24a46-24a48 StackAdj> Δ+4 {}
<POP 24a48-24a50 Epilogue> Σ0 ←0x249dc ←0x24a30
@ 24a50
<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 24a50-24b06 Body> Δ-8
<POP 24a50-24a66 Prologue> Σ0 ↓
<POP 24a66-24a74 RegCacheLoad> Σ0 ↓
<POP 24a74-24a90 Naked> Σ0 ↓ →0x24afe
<POP 24a74-24a76 StackAdj> Δ-4 {[-4-]}
<MI 24a76 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 24a78 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 24a7a MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 24a7e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x24a82 0x248c6> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 24a86-24a8a StackAdj> Δ+16 {[-4-]}
<MI 24a8a MOVE.L (A7)+,(A6-0x14)> Δ+4 {}
<MI 24a8e BLE 0x24afe> {}
<POP 24a90-24aa4 Naked> Σ0 Δ-4 ↓
<POP 24a90-24a92 StackAdj> Δ-4 {[-4-]}
<MI 24a92 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 24a94 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<Call 0x24a96 0x22a74> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<POP 24a9a-24a9c StackAdj> Δ+8 {[-4-]}
<MI 24a9c MOVE.L (A7)+,(A6-0x6)> Δ+4 {}
<MI 24a9e MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<MI 24aa0 MOVE.L (A6-0x14),D5> {[4, '(A6-0x6)']}
<POP 24aa4-24aa8 Naked> Σ-4 ↓ →0x24afc ←0x24af8
<MI 24aa4 CMP.L (A7),D5> {[-4-]}
<MI 24aa6 BGT 0x24afc> {[-4-]}
<POP 24aa8-24abe Naked> Σ-4 ↓ →0x24af8
<POP 24aa8-24aaa StackAdj> Δ-2 {[-6-]}
<MI 24aaa MOVE.L (A6+0x14),-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']}
<MI 24aac MOVE.L (A6+0x10),-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 24aae MOVE.L D5,-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D5']}
<Call 0x24ab0 0x246e2> {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D5']}
<POP 24ab4-24ab6 StackAdj> Δ+12 {[-6-]}
<MI 24ab6 MOVE.B (A7)+,D0> Δ+2 {[-4-]}
<MI 24ab8 CMPI.B #0x3d,D0> {[-4-]}
<MI 24abc BNE 0x24af8> {[-4-]}
<POP 24abe-24ac6 Naked> Σ-4 Δ-4 ↓
<MI 24abe MOVE.L D5,D0> {[-4-]}
<MI 24ac0 ADDQ.L #0x1,D0> {[-4-]}
<MI 24ac2 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']}
<MI 24ac4 MOVE.L D0,D6> {[-4-]|[4, '(A6-0x6)']}
<POP 24ac6-24aca Naked> Σ-8 ↓ →0x24af6 ←0x24ae4
<MI 24ac6 CMP.L (A7),D6> {[-8-]}
<MI 24ac8 BGT 0x24af6> {[-8-]}
<POP 24aca-24ae0 Naked> Σ-8 ↓ →0x24ae4
<POP 24aca-24acc StackAdj> Δ-2 {[-10-]}
<MI 24acc MOVE.L (A6+0x14),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']}
<MI 24ace MOVE.L (A6+0x10),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 24ad0 MOVE.L D6,-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
<Call 0x24ad2 0x246e2> {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
<POP 24ad6-24ad8 StackAdj> Δ+12 {[-10-]}
<MI 24ad8 MOVE.B (A7)+,D7> Δ+2 {[-8-]}
<MI 24ada CMPI.B #0x2f,D7> {[-8-]}
<MI 24ade BNE 0x24ae4> {[-8-]}
<POP 24ae0-24ae4 Naked> Σ-8 Δ+8 →0x24afe
<POP 24ae0-24ae2 StackAdj> Δ+8 {}
<MI 24ae2 BRA 0x24afe> {}
<POP 24ae4-24af6 Naked> Σ-8 ↓ →0x24ac6 ←0x24aca
<MI 24ae4 MOVE.L (A6+0x18),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x18)']}
<MI 24ae8 MOVE.B D7,-(A7)> Δ-2 {[-8-]|[4, '(A6+0x18)']|[2, 'D7']}
<Call 0x24aea 0x102c0> {[-8-]|[4, '(A6+0x18)']|[2, 'D7']}
AppendChar(MOD b : String; a : char)
<POP 24af0-24af2 StackAdj> Δ+6 {[-8-]}
<MI 24af2 ADDQ.L #0x1,D6> {[-8-]}
<MI 24af4 BVC 0x24ac6> {[-8-]}
<POP 24af6-24af8 Naked> Σ-8 Δ+4 ↓ ←0x24ac6
<POP 24af6-24af8 StackAdj> Δ+4 {[-4-]}
<POP 24af8-24afc Naked> Σ-4 ↓ →0x24aa4 ←0x24aa8
<MI 24af8 ADDQ.L #0x1,D5> {[-4-]}
<MI 24afa BVC 0x24aa4> {[-4-]}
<POP 24afc-24afe Naked> Σ-4 Δ+4 ↓ ←0x24aa4
<POP 24afc-24afe StackAdj> Δ+4 {}
<POP 24afe-24b06 Epilogue> Σ0 ←0x24a74 ←0x24ae0
@ 24b06
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 24b06-24b8c Body> Δ-4
<POP 24b06-24b1c Prologue> Σ0 ↓
<POP 24b1c-24b26 RegCacheLoad> Σ0 ↓
<POP 24b26-24b38 Naked> Σ0 Δ-4 ↓
<POP 24b26-24b28 StackAdj> Δ-4 {[-4-]}
<MI 24b28 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 24b2a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x24b2c 0x22a74> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 24b30-24b32 StackAdj> Δ+8 {[-4-]}
<MI 24b32 MOVE.L (A7)+,D5> Δ+4 {}
<MI 24b34 MOVE.L D5,-(A7)> Δ-4 {[4, 'D5']}
<MI 24b36 MOVEQ.L #0x01,D6> {[4, 'D5']}
<POP 24b38-24b3c Naked> Σ-4 ↓ →0x24b82 ←0x24b7e
<MI 24b38 CMP.L (A7),D6> {[-4-]}
<MI 24b3a BGT 0x24b82> {[-4-]}
<POP 24b3c-24b52 Naked> Σ-4 ↓ →0x24b7e
<POP 24b3c-24b3e StackAdj> Δ-2 {[-6-]}
<MI 24b3e MOVE.L (A6+0xc),-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']}
<MI 24b40 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 24b42 MOVE.L D6,-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D6']}
<Call 0x24b44 0x246e2> {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D6']}
<POP 24b48-24b4a StackAdj> Δ+12 {[-6-]}
<MI 24b4a MOVE.B (A7)+,D0> Δ+2 {[-4-]}
<MI 24b4c CMPI.B #0x2f,D0> {[-4-]}
<MI 24b50 BNE 0x24b7e> {[-4-]}
<POP 24b52-24b56 Naked> Σ-4 Δ-4 ↓
<MI 24b52 MOVE.L D5,-(A7)> Δ-4 {[-4-]|[4, 'D5']}
<MI 24b54 MOVE.L D6,D7> {[-4-]|[4, 'D5']}
<POP 24b56-24b5a Naked> Σ-8 ↓ →0x24b78 ←0x24b5a
<MI 24b56 CMP.L (A7),D7> {[-8-]}
<MI 24b58 BGT 0x24b78> {[-8-]}
<POP 24b5a-24b78 Naked> Σ-8 ↓ →0x24b56
<MI 24b5a MOVE.L (A6+0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x10)']}
<POP 24b5e-24b60 StackAdj> Δ-2 {[-8-]|[4, '(A6+0x10)']|[-2-]}
<MI 24b60 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']}
<MI 24b62 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 24b64 MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x24b66 0x246e2> {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
<POP 24b6a-24b6c StackAdj> Δ+12 {[-8-]|[4, '(A6+0x10)']|[-2-]}
<Call 0x24b6c 0x102c0> {[-8-]|[4, '(A6+0x10)']|[-2-]}
AppendChar(MOD b : String; a : char)
<POP 24b72-24b74 StackAdj> Δ+6 {[-8-]}
<MI 24b74 ADDQ.L #0x1,D7> {[-8-]}
<MI 24b76 BVC 0x24b56> {[-8-]}
<POP 24b78-24b7e Naked> Σ-8 Δ+8 →0x24b84 ←0x24b56
<POP 24b78-24b7a StackAdj> Δ+4 {[-4-]}
<POP 24b7a-24b7c StackAdj> Δ+4 {}
<MI 24b7c BRA 0x24b84> {}
<POP 24b7e-24b82 Naked> Σ-4 ↓ →0x24b38 ←0x24b3c
<MI 24b7e ADDQ.L #0x1,D6> {[-4-]}
<MI 24b80 BVC 0x24b38> {[-4-]}
<POP 24b82-24b84 Naked> Σ-4 Δ+4 ↓ ←0x24b38
<POP 24b82-24b84 StackAdj> Δ+4 {}
<POP 24b84-24b8c Epilogue> Σ0 ←0x24b78
@ 24b8c
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 24b8c-24bfc Body> Δ-4
<POP 24b8c-24ba2 Prologue> Σ0 ↓
<POP 24ba2-24bba Naked> Σ0 Δ-4 ↓
<MI 24ba2 MOVEA.L (A6+0x10),A0> {}
<MI 24ba6 CLR.W (A0)> {}
<POP 24ba8-24baa StackAdj> Δ-4 {[-4-]}
<MI 24baa MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 24bae MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x24bb2 0x22a74> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 24bb6-24bb8 StackAdj> Δ+8 {[-4-]}
<MI 24bb8 MOVEQ.L #0x01,D7> {[-4-]}
<POP 24bba-24bbe Naked> Σ-4 ↓ →0x24bf2 ←0x24bee
<MI 24bba CMP.L (A7),D7> {[-4-]}
<MI 24bbc BGT 0x24bf2> {[-4-]}
<POP 24bbe-24bda Naked> Σ-4 ↓ →0x24bea
<POP 24bbe-24bc0 StackAdj> Δ-2 {[-6-]}
<MI 24bc0 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']}
<MI 24bc4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 24bc8 MOVE.L D7,-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x24bca 0x246e2> {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
<POP 24bce-24bd2 StackAdj> Δ+12 {[-6-]}
<MI 24bd2 MOVE.B (A7)+,D6> Δ+2 {[-4-]}
<MI 24bd4 CMPI.B #0x2f,D6> {[-4-]}
<MI 24bd8 BEQ 0x24bea> {[-4-]}
<POP 24bda-24bea Naked> Σ-4 →0x24bee
<MI 24bda MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x10)']}
<MI 24bde MOVE.B D6,-(A7)> Δ-2 {[-4-]|[4, '(A6+0x10)']|[2, 'D6']}
<Call 0x24be0 0x102c0> {[-4-]|[4, '(A6+0x10)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 24be6-24be8 StackAdj> Δ+6 {[-4-]}
<MI 24be8 BRA 0x24bee> {[-4-]}
<POP 24bea-24bee Naked> Σ-4 Δ+4 →0x24bf4 ←0x24bbe
<POP 24bea-24bec StackAdj> Δ+4 {}
<MI 24bec BRA 0x24bf4> {}
<POP 24bee-24bf2 Naked> Σ-4 ↓ →0x24bba ←0x24bda
<MI 24bee ADDQ.L #0x1,D7> {[-4-]}
<MI 24bf0 BVC 0x24bba> {[-4-]}
<POP 24bf2-24bf4 Naked> Σ-4 Δ+4 ↓ ←0x24bba
<POP 24bf2-24bf4 StackAdj> Δ+4 {}
<POP 24bf4-24bfc Epilogue> Σ0 ←0x24bea
@ 24bfc
<POP 24bfc-24c44 Body>
<POP 24bfc-24c12 Prologue> Σ0 ↓
<POP 24c12-24c3c Naked> Σ0 ↓
<Blob 0x24c12 [34] @> Δ-34 {[«34""»]}
<POP 24c1e-24c20 StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x24c20 34> {[«34""»]|[$$Switch exclusion is unimplemented.]}
<Call 0x24c34 0x21e62> {[«34""»]|[$$Switch exclusion is unimplemented.]}
<POP 24c38-24c3c StackAdj> Δ+38 {}
<POP 24c3c-24c44 Epilogue> Σ0
@ 24c44
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x006 4(rw)>
<POP 24c44-24d7e Body>
<POP 24c44-24c5a Prologue> Σ0 ↓
<POP 24c5a-24c70 RegCacheLoad> Σ0 ↓
<POP 24c70-24c7e Naked> Σ0 ↓ →0x24c86
<MI 24c70 MOVE.L 0x27a08,(A6-0x6)> {}
<POP 24c74-24c76 StackAdj> Δ-2 {[-2-]}
<Call 0x24c76 0x21efe> {[-2-]}
<MI 24c78 MOVE.B (A7)+,D7> Δ+2 {}
<MI 24c7a CMP.B #0x25,D7> {}
<MI 24c7c BNE 0x24c86> {}
<POP 24c7e-24c86 Naked> Σ0 →0x24d66
<MI 24c7e MOVEA.L (A6+0xc),A0> {}
<MI 24c80 CLR.L (A0)> {}
<MI 24c82 BRA 0x24d66> {}
<POP 24c86-24c8a Naked> Σ0 ↓ →0x24c96 ←0x24c70
<MI 24c86 CMP.B #0x2d,D7> {}
<MI 24c88 BNE 0x24c96> {}
<POP 24c8a-24c96 Naked> Σ0 →0x24d66
<MI 24c8a MOVEA.L (A6+0xc),A0> {}
<MI 24c8c MOVE.L #0x1,(A0)> {}
<MI 24c92 BRA 0x24d66> {}
<POP 24c96-24c9c Naked> Σ0 ↓ →0x24ca8 ←0x24c86
<MI 24c96 CMPI.B #0x2f,D7> {}
<MI 24c9a BNE 0x24ca8> {}
<POP 24c9c-24ca8 Naked> Σ0 →0x24d66
<MI 24c9c MOVEA.L (A6+0xc),A0> {}
<MI 24c9e MOVE.L #0x4,(A0)> {}
<MI 24ca4 BRA 0x24d66> {}
<POP 24ca8-24cae Naked> Σ0 ↓ →0x24cba ←0x24c96
<MI 24ca8 CMPI.B #0x3d,D7> {}
<MI 24cac BNE 0x24cba> {}
<POP 24cae-24cba Naked> Σ0 →0x24d66
<MI 24cae MOVEA.L (A6+0xc),A0> {}
<MI 24cb0 MOVE.L #0x5,(A0)> {}
<MI 24cb6 BRA 0x24d66> {}
<POP 24cba-24cc0 Naked> Σ0 ↓ →0x24ccc ←0x24ca8
<MI 24cba CMPI.B #0x5c,D7> {}
<MI 24cbe BNE 0x24ccc> {}
<POP 24cc0-24ccc Naked> Σ0 →0x24d66
<MI 24cc0 MOVEA.L (A6+0xc),A0> {}
<MI 24cc2 MOVE.L #0x6,(A0)> {}
<MI 24cc8 BRA 0x24d66> {}
<POP 24ccc-24cd0 Naked> Σ0 ↓ →0x24cfc ←0x24cba
<MI 24ccc TST.B D7> {}
<MI 24cce BNE 0x24cfc> {}
<POP 24cd0-24cfc Naked> Σ0 →0x24d66
<Blob 0x24cd0 [24] @> Δ-24 {[«24""»]}
<POP 24cdc-24cde StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x24cde 24> {[«24""»]|[$$Illegal argument marker.]}
<Call 0x24cf2 0x21e62> {[«24""»]|[$$Illegal argument marker.]}
<POP 24cf6-24cfa StackAdj> Δ+28 {}
<MI 24cfa BRA 0x24d66> {}
<POP 24cfc-24d00 Naked> Σ0 ↓ →0x24d2c ←0x24ccc
<MI 24cfc CMP.B #0x30,D7> {}
<MI 24cfe BCS 0x24d2c> {}
<POP 24d00-24d04 Naked> Σ0 ↓ →0x24d2c
<MI 24d00 CMP.B #0x39,D7> {}
<MI 24d02 BHI 0x24d2c> {}
<POP 24d04-24d0c Naked> Σ0 ↓
<MI 24d04 MOVEA.L (A6+0xc),A0> {}
<MI 24d06 MOVE.L #0x2,(A0)> {}
<POP 24d0c-24d18 Naked> Σ0 ↓ →0x24d22 ←0x24d26
<POP 24d0c-24d0e StackAdj> Δ-2 {[-2-]}
<Call 0x24d0e 0x21ec0> {[-2-]}
<MI 24d12 MOVE.B (A7)+,D7> Δ+2 {}
<MI 24d14 CMP.B #0x30,D7> {}
<MI 24d16 BCS 0x24d22> {}
<POP 24d18-24d1c Naked> Σ0 ↓ →0x24d22
<MI 24d18 CMP.B #0x39,D7> {}
<MI 24d1a BHI 0x24d22> {}
<POP 24d1c-24d22 Naked> Σ0 ↓
<POP 24d1c-24d1e StackAdj> Δ-2 {[-2-]}
<Call 0x24d1e 0x21efe> {[-2-]}
<MI 24d20 MOVE.B (A7)+,D6> Δ+2 {}
<POP 24d22-24d26 Naked> Σ0 ↓ →0x24d2a ←0x24d0c ←0x24d18
<MI 24d22 CMP.B #0x30,D7> {}
<MI 24d24 BCS 0x24d2a> {}
<POP 24d26-24d2a Naked> Σ0 ↓ →0x24d0c
<MI 24d26 CMP.B #0x39,D7> {}
<MI 24d28 BLS 0x24d0c> {}
<POP 24d2a-24d2c Naked> Σ0 →0x24d66 ←0x24d22
<MI 24d2a BRA 0x24d66> {}
<POP 24d2c-24d36 Naked> Σ0 ↓ ←0x24cfc ←0x24d00
<MI 24d2c MOVEA.L (A6+0xc),A0> {}
<MI 24d2e MOVE.L #0x3,(A0)> {}
<MI 24d34 MOVEQ.L #0x00,D5> {}
<POP 24d36-24d42 Naked> Σ0 ↓ →0x24d58 ←0x24d62
<POP 24d36-24d38 StackAdj> Δ-2 {[-2-]}
<Call 0x24d38 0x21ec0> {[-2-]}
<MI 24d3c MOVE.B (A7)+,D7> Δ+2 {}
<MI 24d3e CMP.B #0x25,D7> {}
<MI 24d40 BEQ 0x24d58> {}
<POP 24d42-24d46 Naked> Σ0 ↓ →0x24d58
<MI 24d42 CMP.B #0x2d,D7> {}
<MI 24d44 BEQ 0x24d58> {}
<POP 24d46-24d4c Naked> Σ0 ↓ →0x24d58
<MI 24d46 CMPI.B #0x2f,D7> {}
<MI 24d4a BEQ 0x24d58> {}
<POP 24d4c-24d52 Naked> Σ0 ↓ →0x24d58
<MI 24d4c CMPI.B #0x3d,D7> {}
<MI 24d50 BEQ 0x24d58> {}
<POP 24d52-24d58 Naked> Σ0 ↓ →0x24d5c
<MI 24d52 CMPI.B #0x5c,D7> {}
<MI 24d56 BNE 0x24d5c> {}
<POP 24d58-24d5c Naked> Σ0 →0x24d62 ←0x24d36 ←0x24d42 ←0x24d46 ←0x24d4c
<MI 24d58 MOVEQ.L #0x01,D5> {}
<MI 24d5a BRA 0x24d62> {}
<POP 24d5c-24d62 Naked> Σ0 ↓ ←0x24d52
<POP 24d5c-24d5e StackAdj> Δ-2 {[-2-]}
<Call 0x24d5e 0x21efe> {[-2-]}
<MI 24d60 MOVE.B (A7)+,D6> Δ+2 {}
<POP 24d62-24d66 Naked> Σ0 ↓ →0x24d36 ←0x24d58
<MI 24d62 TST.B D5> {}
<MI 24d64 BEQ 0x24d36> {}
<POP 24d66-24d76 Naked> Σ0 ↓ ←0x24c7e ←0x24c8a ←0x24c9c ←0x24cae ←0x24cc0 ←0x24cd0 ←0x24d2a
<MI 24d66 MOVEA.L (A6+0x8),A0> {}
<MI 24d6a MOVE.L (A6-0x6),(A0)> {}
<MI 24d6e MOVE.L 0x27a08,(A0+0x4)> {}
<MI 24d72 SUBQ.L #0x1,(A0+0x4)> {}
<POP 24d76-24d7e Epilogue> Σ0
@ 24d7e
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 24d7e-24e04 Body>
<POP 24d7e-24d94 Prologue> Σ0 ↓
<POP 24d94-24d98 RegCacheLoad> Σ0 ↓
<POP 24d98-24db2 Naked> Σ0 Δ-4 ↓ →0x24dbe
<MI 24d98 MOVEA.L (A6+0x8),A0> {}
<MI 24d9c MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 24d9e MOVE.L 0x27a08,D6> {[4, 'A0']}
<MI 24da4 SUB.L (A6+0xc),D6> {[4, 'A0']}
<MI 24da6 MOVE.L (A6+0xc),D5> {[4, 'A0']}
<MI 24da8 ADD.L D6,D5> {[4, 'A0']}
<MI 24daa MOVE.W (A0),D0> {[4, 'A0']}
<MI 24dac EXTW.L D0> {[4, 'A0']}
<MI 24dae CMP.L D6,D0> {[4, 'A0']}
<MI 24db0 BEQ 0x24dbe> {[4, 'A0']}
<POP 24db2-24dbe Naked> Σ-4 ↓
<MI 24db2 MOVE.L D5,-(A7)> Δ-4 {[-4-]|[4, 'D5']}
<MI 24db4 MOVE.L D6,-(A7)> Δ-4 {[-4-]|[4, 'D5']|[4, 'D6']}
<MI 24db6 SUB.L D0,(A7)> {[-4-]|[4, 'D5']|[-4-]}
<Call 0x24db8 0x223b6> {[-4-]|[4, 'D5']|[-4-]}
<POP 24dbc-24dbe StackAdj> Δ+8 {[-4-]}
<POP 24dbe-24dc2 Naked> Σ-4 Δ-4 ↓ ←0x24d98
<MI 24dbe MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<MI 24dc0 MOVEQ.L #0x01,D7> {[-4-]|[4, 'D0']}
<POP 24dc2-24dc6 Naked> Σ-8 ↓ →0x24dfa ←0x24dc6
<MI 24dc2 CMP.L (A7),D7> {[-8-]}
<MI 24dc4 BGT 0x24dfa> {[-8-]}
<POP 24dc6-24dfa Naked> Σ-8 ↓ →0x24dc2
<MI 24dc6 MOVE.L (A6+0xc),D0> {[-8-]}
<MI 24dc8 ADD.L D7,D0> {[-8-]}
<MI 24dca SUBQ.L #0x1,D0> {[-8-]}
<MI 24dcc SUBQ.L #0x1,D0> {[-8-]}
<POP 0x24dce LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {[-8-]}
<MI 24dd8 LEA.L 0x25a00,A0> {[-8-]}
<MI 24dde MOVE.L D7,D1> {[-8-]}
<MI 24de0 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x24de2 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 24dec MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 24df0 MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8)> {[-8-]}
<MI 24df6 ADDQ.L #0x1,D7> {[-8-]}
<MI 24df8 BVC 0x24dc2> {[-8-]}
<POP 24dfa-24dfc Naked> Σ-8 Δ+8 ↓ ←0x24dc2
<POP 24dfa-24dfc StackAdj> Δ+8 {}
<POP 24dfc-24e04 Epilogue> Σ0
@ 24e04
<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 24e04-2504c Body> Δ+56
<POP 24e04-24e1a Prologue> Σ0 ↓
<POP 24e1a-24e2c RegCacheLoad> Σ0 ↓
<POP 24e2c-24e50 Naked> Σ0 ↓
<MI 24e2c MOVE.L 0x27a08,(A6-0x28)> {}
<Pointer.fp 0x24e34 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Call 0x24e36 0x102b8> {[@@-8]}
NewString(VAR a : String)
<POP 24e3c-24e3e StackAdj> Δ+4 {}
<Pointer.fp 0x24e3e <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-12]}
<Pointer.fp 0x24e42 <LVAR -0x014 @ 4(r)>> Δ-4 {[@@-12]|[@@-20]}
<Call 0x24e44 0x24c44> {[@@-12]|[@@-20]}
<POP 24e48-24e4a StackAdj> Δ+8 {}
<MI 24e4a CLR.L (A6-0x34)> {}
<MI 24e4e MOVEQ.L #0x00,D7> {}
<POP 24e50-24e64 Naked> Σ0 →0x24e8e →0x24e98 →0x24eac →0x24ec8 →0x24ecc →0x24eda →0x24eee →0x24ef4 →0x24ef6 →0x24f0c →0x24f1a →0x24f32 →0x24f46 →0x24f5a →0x24f70 →0x24f72 →0x24f8c →0x24fa2 →0x24fb0 →0x24fb2 →0x24fb4 ←0x25028
<MI 24e50 MOVE.L (A6-0x34),D0> {}
<POP 0x24e54 LimitCheck 0x0 ≤ D0 ≤ 0x14> {}
<MI 24e5a ADD.W D0,D0> {}
<MI 24e5c SWITCH D0.W> {}
<POP 24e8e-24e98 Naked> Σ0 →0x24fde ←0x24e50
<MI 24e8e MOVEQ.L #0x00,D6> {}
<MI 24e90 MOVE.L (A6+0x8),D5> {}
<MI 24e94 BRA 0x24fde> {}
<POP 24e98-24eac Naked> Σ0 →0x24fde ←0x24e50
<POP 24e98-24e9a StackAdj> Δ-4 {[-4-]}
<MI 24e9a MOVE.L (A6-0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x10)']}
<MI 24e9e MOVE.L (A6-0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<Call 0x24ea0 0x24722> {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<POP 24ea4-24ea6 StackAdj> Δ+8 {[-4-]}
<MI 24ea6 MOVE.L (A7)+,D6> Δ+4 {}
<MI 24ea8 BRA 0x24fde> {}
<POP 24eac-24eb4 Naked> Σ0 Δ-12 ↓ ←0x24e50
<MI 24eac MOVE.L (A6-0x28),-(A7)> Δ-4 {[4, '(A6-0x28)']}
<MI 24eb0 MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, 'D6']}
<MI 24eb2 MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, 'D6']|[4, 'D6']}
<POP 24eb4-24ec4 Naked> Σ-12 Δ+12 →0x2503a ←0x24ecc
<MI 24eb4 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']}
<Call 0x24eb8 0x2479e> {[-12-]|[4, '(A6+0xc)']}
<POP 24ebc-24ec0 StackAdj> Δ+16 {}
<MI 24ec0 BRA 0x2503a> {}
<POP 24ec8-24ecc Naked> Σ0 →0x24fde ←0x24e50
<MI 24ec8 BRA 0x24fde> {}
<POP 24ecc-24ed6 Naked> Σ0 Δ-12 →0x24eb4 ←0x24e50
<MI 24ecc MOVE.L (A6-0x28),-(A7)> Δ-4 {[4, '(A6-0x28)']}
<MI 24ed0 MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, 'D6']}
<MI 24ed2 MOVE.L D5,-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, 'D6']|[4, 'D5']}
<MI 24ed4 BRA 0x24eb4> {[4, '(A6-0x28)']|[4, 'D6']|[4, 'D5']}
<POP 24eda-24eee Naked> Σ0 →0x24fde ←0x24e50 ←0x24ef4
<POP 24eda-24edc StackAdj> Δ-4 {[-4-]}
<MI 24edc MOVE.L (A6-0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x10)']}
<MI 24ee0 MOVE.L (A6-0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<Call 0x24ee2 0x24722> {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<POP 24ee6-24ee8 StackAdj> Δ+8 {[-4-]}
<MI 24ee8 MOVE.L (A7)+,D5> Δ+4 {}
<MI 24eea BRA 0x24fde> {}
<POP 24eee-24ef4 Naked> Σ0 →0x24fde ←0x24e50
<MI 24eee MOVEQ.L #0x01,D6> {}
<MI 24ef0 BRA 0x24fde> {}
<POP 24ef4-24ef6 Naked> Σ0 →0x24eda ←0x24e50
<MI 24ef4 BRA 0x24eda> {}
<POP 24ef6-24f0c Naked> Σ0 →0x24fde ←0x24e50
<POP 24ef6-24ef8 StackAdj> Δ-8 {[-8-]}
<MI 24ef8 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6+0xc)']}
<MI 24efc MOVE.L D6,-(A7)> Δ-4 {[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<Call 0x24efe 0x22aac> {[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<POP 24f02-24f04 StackAdj> Δ+8 {[-8-]}
<MI 24f04 MOVE.L (A7)+,(A6-0x24)> Δ+4 {[-4-]}
<MI 24f06 MOVE.L (A7)+,(A6-0x20)> Δ+4 {}
<MI 24f08 BRA 0x24fde> {}
<POP 24f0c-24f1a Naked> Σ0 →0x24fde ←0x24e50
<MI 24f0c MOVE.L (A6-0x14),(A6-0x1c)> {}
<MI 24f10 MOVE.L (A6-0x10),(A6-0x18)> {}
<MI 24f16 BRA 0x24fde> {}
<POP 24f1a-24f2c Naked> Σ0 Δ-20 ↓ ←0x24e50
<MI 24f1a MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 24f1c MOVE.L (A6-0x20),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
<MI 24f1e MOVE.L (A6-0x24),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<MI 24f20 MOVE.L (A6-0x18),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']}
<MI 24f24 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<Call 0x24f28 0x24a50> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<POP 24f2c-24f32 Naked> Σ-20 Δ+20 →0x24fde ←0x24f32
<POP 24f2c-24f2e StackAdj> Δ+20 {}
<MI 24f2e BRA 0x24fde> {}
<POP 24f32-24f46 Naked> Σ0 Δ-20 →0x24f2c ←0x24e50
<MI 24f32 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 24f34 MOVE.L (A6-0x20),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
<MI 24f36 MOVE.L (A6-0x24),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<MI 24f38 MOVE.L (A6-0x18),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']}
<MI 24f3c MOVE.L (A6-0x1c),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<Call 0x24f40 0x249bc> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<MI 24f44 BRA 0x24f2c> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<POP 24f46-24f50 Naked> Σ0 Δ-12 ↓ ←0x24e50
<MI 24f46 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 24f48 MOVE.L (A6-0x20),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
<MI 24f4a MOVE.L (A6-0x24),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<Call 0x24f4c 0x24b06> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<POP 24f50-24f54 Naked> Σ-12 Δ+12 ↓ ←0x24f8c
<POP 24f50-24f54 StackAdj> Δ+12 {}
<POP 24f54-24f5a Naked> Σ0 →0x24fde ←0x24f5a ←0x24f70 ←0x24fb2
<MI 24f54 MOVEQ.L #0x01,D7> {}
<MI 24f56 BRA 0x24fde> {}
<POP 24f5a-24f70 Naked> Σ0 →0x24f54 ←0x24e50
<MI 24f5a MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 24f5c MOVE.L (A6-0x20),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
<MI 24f5e MOVE.L (A6-0x24),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<MI 24f60 MOVE.L (A6-0x18),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']}
<MI 24f64 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<Call 0x24f68 0x249bc> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<POP 24f6c-24f6e StackAdj> Δ+20 {}
<MI 24f6e BRA 0x24f54> {}
<POP 24f70-24f72 Naked> Σ0 →0x24f54 ←0x24e50
<MI 24f70 BRA 0x24f54> {}
<POP 24f72-24f86 Naked> Σ0 Δ-12 ↓ ←0x24e50
<MI 24f72 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<POP 24f74-24f76 StackAdj> Δ-8 {[4, '(A6-0x8)']|[-8-]}
<MI 24f76 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']}
<MI 24f7a MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<Call 0x24f7c 0x22aac> {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<POP 24f80-24f82 StackAdj> Δ+8 {[4, '(A6-0x8)']|[-8-]}
<Call 0x24f82 0x24b06> {[4, '(A6-0x8)']|[-8-]}
<POP 24f86-24f8c Naked> Σ-12 Δ+12 →0x24fde ←0x24fa2
<POP 24f86-24f8a StackAdj> Δ+12 {}
<MI 24f8a BRA 0x24fde> {}
<POP 24f8c-24fa2 Naked> Σ0 Δ-12 →0x24f50 ←0x24e50
<MI 24f8c MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<POP 24f8e-24f90 StackAdj> Δ-8 {[4, '(A6-0x8)']|[-8-]}
<MI 24f90 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']}
<MI 24f94 MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<Call 0x24f96 0x22aac> {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<POP 24f9a-24f9c StackAdj> Δ+8 {[4, '(A6-0x8)']|[-8-]}
<Call 0x24f9c 0x24b8c> {[4, '(A6-0x8)']|[-8-]}
<MI 24fa0 BRA 0x24f50> {[4, '(A6-0x8)']|[-8-]}
<POP 24fa2-24fb0 Naked> Σ0 Δ-12 →0x24f86 ←0x24e50
<MI 24fa2 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 24fa4 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x10)']}
<MI 24fa8 MOVE.L (A6-0x14),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<Call 0x24faa 0x24bfc> {[4, '(A6-0x8)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<MI 24fae BRA 0x24f86> {[4, '(A6-0x8)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<POP 24fb0-24fb2 Naked> Σ0 →0x24fde ←0x24e50
<MI 24fb0 BRA 0x24fde> {}
<POP 24fb2-24fb4 Naked> Σ0 →0x24f54 ←0x24e50
<MI 24fb2 BRA 0x24f54> {}
<POP 24fb4-24fde Naked> Σ0 ↓ ←0x24e50
<Blob 0x24fb4 [24] @> Δ-24 {[«24""»]}
<POP 24fc0-24fc2 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x24fc2 24> {[«24""»]|[$$Illegal argument marker.]}
<Call 0x24fd6 0x21e62> {[«24""»]|[$$Illegal argument marker.]}
<POP 24fda-24fde StackAdj> Δ+28 {}
<POP 24fde-24fe2 Naked> Σ0 ↓ →0x25028 ←0x24e8e ←0x24e98 ←0x24ec8 ←0x24eda ←0x24eee ←0x24ef6 ←0x24f0c ←0x24f2c ←0x24f54 ←0x24f86 ←0x24fb0
<MI 24fde TST.B D7> {}
<MI 24fe0 BNE 0x25028> {}
<POP 24fe2-25028 Naked> Σ0 ↓
<Pointer.fp 0x24fe2 <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-12]}
<Pointer.fp 0x24fe6 <LVAR -0x014 @ 4(r)>> Δ-4 {[@@-12]|[@@-20]}
<Call 0x24fe8 0x24c44> {[@@-12]|[@@-20]}
<POP 24fec-24fee StackAdj> Δ+8 {}
<MI 24fee MOVE.L (A6-0x34),D0> {}
<POP 0x24ff2 LimitCheck 0x0 ≤ D0 ≤ 0x13> {}
<MI 24ffc MOVE.L D0,D4> {}
<MI 24ffe MOVEQ.L #0x07,D3> {}
<Call 0x25000 0x1028c> {}
?muls_d3_d4
<MI 25006 LEA.L 0x21d94,A0> {}
<MI 2500a MOVE.L (A6-0xc),D0> {}
<POP 0x2500e LimitCheck 0x0 ≤ D0 ≤ 0x6> {}
<MI 25018 LEA.L (A0+D4.L),A0> {}
<MI 2501c MOVE.B (A0+D0.L),D1> {}
<MI 25020 EXTB.W D1> {}
<MI 25022 EXTW.L D1> {}
<MI 25024 MOVE.L D1,(A6-0x34)> {}
<POP 25028-2502e Naked> Σ0 ↓ →0x24e50 ←0x24fde
<MI 25028 TST.B D7> {}
<MI 2502a BEQ 0x24e50> {}
<POP 2502e-2503a Naked> Σ0 ↓
<MI 2502e MOVE.L (A6-0x28),-(A7)> Δ-4 {[4, '(A6-0x28)']}
<MI 25032 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, '(A6-0x8)']}
<Call 0x25034 0x24d7e> {[4, '(A6-0x28)']|[4, '(A6-0x8)']}
<POP 25038-2503a StackAdj> Δ+8 {}
<POP 2503a-25044 Naked> Σ0 ↓ ←0x24eb4
<Pointer.fp 0x2503a <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Call 0x2503c 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 25042-25044 StackAdj> Δ+4 {}
<POP 25044-2504c Epilogue> Σ0
@ 2504c
<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 2504c-25144 Body> Δ-12
<POP 2504c-25062 Prologue> Σ0 ↓
<POP 25062-25074 RegCacheLoad> Σ0 ↓
<POP 25074-2509c Naked> Σ0 Δ-4 ↓
<MI 25074 CLR.L (A6+0x14)> {}
<POP 25078-2507a StackAdj> Δ-4 {[-4-]}
<MI 2507a MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x10)']}
<MI 2507c MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<Call 0x2507e 0x22a74> {[-4-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<POP 25082-25084 StackAdj> Δ+8 {[-4-]}
<MI 25084 MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 25086 MOVEA.L (A6+0x8),A0> {}
<MI 2508a MOVE.W (A0),D0> {}
<MI 2508c EXTW.L D0> {}
<MI 2508e ADDQ.L #0x1,D0> {}
<MI 25090 MOVE.L D0,(A6-0x8)> {}
<MI 25092 NEG.L D0> {}
<MI 25094 ADD.L (A6-0xc),D0> {}
<MI 25096 ADDQ.L #0x1,D0> {}
<MI 25098 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 2509a MOVEQ.L #0x01,D0> {[4, 'D0']}
<POP 2509c-250a2 Naked> Σ-4 ↓ →0x2513a ←0x25132
<MI 2509c CMP.L (A7),D0> {[-4-]}
<MI 2509e BGT 0x2513a> {[-4-]}
<POP 250a2-250ae Naked> Σ-4 Δ-8 ↓
<MI 250a2 MOVE.L D0,(A6-0x18)> {[-4-]}
<MI 250a6 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<MI 250a8 MOVEQ.L #0x00,D6> {[-4-]|[4, 'D0']}
<MI 250aa MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
<MI 250ac MOVEQ.L #0x01,D5> {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
<POP 250ae-250b2 Naked> Σ-12 ↓ →0x250fa ←0x250f4
<MI 250ae CMP.L (A7),D5> {[-12-]}
<MI 250b0 BGT 0x250fa> {[-12-]}
<POP 250b2-250ba Naked> Σ-12 ↓ →0x250be
<MI 250b2 CMPI.L #0x00000001,D5> {[-12-]}
<MI 250b8 BNE 0x250be> {[-12-]}
<POP 250ba-250be Naked> Σ-12 →0x250d6
<MI 250ba MOVEQ.L #0x2f,D7> {[-12-]}
<MI 250bc BRA 0x250d6> {[-12-]}
<POP 250be-250d6 Naked> Σ-12 ↓ ←0x250b2
<MI 250be MOVEA.L (A6+0x8),A0> {[-12-]}
<MI 250c2 MOVE.L D5,D0> {[-12-]}
<MI 250c4 SUBQ.L #0x1,D0> {[-12-]}
<MI 250c6 SUBQ.L #0x1,D0> {[-12-]}
<POP 0x250c8 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-12-]}
<MI 250d2 MOVE.B (A0+D0.L+#0x2),D7> {[-12-]}
<POP 250d6-250f0 Naked> Σ-12 ↓ →0x250f4 ←0x250ba
<POP 250d6-250d8 StackAdj> Δ-2 {[-14-]}
<MI 250d8 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-14-]|[4, '(A6+0x10)']}
<MI 250da MOVE.L (A6+0xc),-(A7)> Δ-4 {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 250dc MOVE.L (A7+0xe),D0> {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 250e0 ADD.L D5,D0> {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 250e2 SUBQ.L #0x1,D0> {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 250e4 MOVE.L D0,-(A7)> Δ-4 {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D0']}
<Call 0x250e6 0x246e2> {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D0']}
<POP 250ea-250ec StackAdj> Δ+12 {[-14-]}
<MI 250ec CMP.B (A7)+,D7> Δ+2 {[-12-]}
<MI 250ee BEQ 0x250f4> {[-12-]}
<POP 250f0-250f4 Naked> Σ-12 Δ+4 →0x250fc
<POP 250f0-250f2 StackAdj> Δ+4 {[-8-]}
<MI 250f2 BRA 0x250fc> {[-8-]}
<POP 250f4-250fa Naked> Σ-12 ↓ →0x250ae ←0x250d6
<MI 250f4 MOVE.L D5,D6> {[-12-]}
<MI 250f6 ADDQ.L #0x1,D5> {[-12-]}
<MI 250f8 BVC 0x250ae> {[-12-]}
<POP 250fa-250fc Naked> Σ-12 Δ+4 ↓ ←0x250ae
<POP 250fa-250fc StackAdj> Δ+4 {[-8-]}
<POP 250fc-25100 Naked> Σ-8 ↓ →0x25132 ←0x250f0
<MI 250fc CMP.L (A6-0x8),D6> {[-8-]}
<MI 250fe BNE 0x25132> {[-8-]}
<POP 25100-2510a Naked> Σ-8 ↓ →0x25130
<MI 25100 MOVE.L (A7),D0> {[-8-]}
<MI 25102 MOVE.L D0,D1> {[-8-]}
<MI 25104 ADD.L (A6-0x8),D1> {[-8-]}
<MI 25106 CMP.L (A6-0xc),D1> {[-8-]}
<MI 25108 BGE 0x25130> {[-8-]}
<POP 2510a-25120 Naked> Σ-8 ↓ →0x25126
<POP 2510a-2510c StackAdj> Δ-2 {[-10-]}
<MI 2510c MOVE.L (A6+0x10),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x10)']}
<MI 2510e MOVE.L (A6+0xc),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 25110 MOVE.L D1,-(A7)> Δ-4 {[-10-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D1']}
<Call 0x25112 0x246e2> {[-10-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D1']}
<POP 25116-25118 StackAdj> Δ+12 {[-10-]}
<MI 25118 MOVE.B (A7)+,D7> Δ+2 {[-8-]}
<MI 2511a CMPI.B #0x2f,D7> {[-8-]}
<MI 2511e BEQ 0x25126> {[-8-]}
<POP 25120-25126 Naked> Σ-8 ↓ →0x2512e
<MI 25120 CMPI.B #0x3d,D7> {[-8-]}
<MI 25124 BNE 0x2512e> {[-8-]}
<POP 25126-2512e Naked> Σ-8 Δ+8 →0x2513c ←0x2510a ←0x25130
<MI 25126 MOVE.L D0,(A6+0x14)> {[-8-]}
<POP 2512a-2512c StackAdj> Δ+8 {}
<MI 2512c BRA 0x2513c> {}
<POP 2512e-25130 Naked> Σ-8 →0x25132 ←0x25120
<MI 2512e BRA 0x25132> {[-8-]}
<POP 25130-25132 Naked> Σ-8 →0x25126 ←0x25100
<MI 25130 BRA 0x25126> {[-8-]}
<POP 25132-2513a Naked> Σ-8 Δ+4 ↓ →0x2509c ←0x250fc ←0x2512e
<MI 25132 MOVE.L (A7)+,D0> Δ+4 {[-4-]}
<MI 25134 ADDQ.L #0x1,D0> {[-4-]}
<MI 25136 BVC 0x2509c> {[-4-]}
<POP 2513a-2513c Naked> Σ-4 Δ+4 ↓ ←0x2509c
<POP 2513a-2513c StackAdj> Δ+4 {}
<POP 2513c-25144 Epilogue> Σ0 ←0x25126
@ 25144
<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 25144-2522c Body> Δ-12
<POP 25144-2515a Prologue> Σ0 ↓
<POP 2515a-2516a RegCacheLoad> Σ0 ↓
<POP 2516a-25190 Naked> Σ0 ↓ →0x25224
<MI 2516a MOVEA.L (A6+0x8),A0> {}
<MI 2516e CLR.B (A0)> {}
<MI 25170 MOVEA.L (A6+0xc),A1> {}
<MI 25174 MOVE.L #0x01,(A1)> {}
<POP 25176-25178 StackAdj> Δ-8 {[-8-]}
<MI 25178 MOVE.L (A6+0x18),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x18)']}
<MI 2517c MOVE.L (A6+0x14),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x18)']|[4, '(A6+0x14)']}
<Call 0x25180 0x22aac> {[-8-]|[4, '(A6+0x18)']|[4, '(A6+0x14)']}
<POP 25184-25186 StackAdj> Δ+8 {[-8-]}
<MI 25186 MOVE.L (A7)+,(A6-0x1c)> Δ+4 {[-4-]}
<MI 25188 MOVE.L (A7)+,(A6-0x18)> Δ+4 {}
<MI 2518a TST.L (A6-0x1c)> {}
<MI 2518c BEQ 0x25224> {}
<POP 25190-251a6 Naked> Σ0 ↓ →0x25224
<POP 25190-25192 StackAdj> Δ-4 {[-4-]}
<MI 25192 MOVE.L (A6-0x18),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x18)']}
<MI 25194 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<MI 25196 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, '(A6+0x10)']}
<Call 0x2519a 0x2504c> {[-4-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, '(A6+0x10)']}
<POP 2519e-251a0 StackAdj> Δ+12 {[-4-]}
<MI 251a0 MOVE.L (A7)+,(A6-0x14)> Δ+4 {}
<MI 251a4 BEQ 0x25224> {}
<POP 251a6-251c6 Naked> Σ0 Δ-4 ↓
<MI 251a6 MOVE.B #0x01,(A0)> {}
<MI 251a8 PEA.L (A1)> Δ-4 {[4, '^(A1)']}
<Call 0x251aa 0x102b8> {[4, '^(A1)']}
NewString(VAR a : String)
<MI 251b0 MOVE.L (A6-0x18),-(A7)> Δ-4 {[4, '^(A1)']|[4, '(A6-0x18)']}
<MI 251b2 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[4, '^(A1)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<Call 0x251b4 0x22a74> {[4, '^(A1)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<POP 251b8-251ba StackAdj> Δ+8 {[4, '^(A1)']}
<MI 251ba MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 251bc MOVE.L (A6-0x14),D0> {}
<MI 251c0 ADDQ.L #0x1,D0> {}
<MI 251c2 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 251c4 MOVE.L D0,D5> {[4, '(A6-0x8)']}
<POP 251c6-251ca Naked> Σ-4 ↓ →0x25222 ←0x2521e
<MI 251c6 CMP.L (A7),D5> {[-4-]}
<MI 251c8 BGT 0x25222> {[-4-]}
<POP 251ca-251e0 Naked> Σ-4 ↓ →0x2521e
<POP 251ca-251cc StackAdj> Δ-2 {[-6-]}
<MI 251cc MOVE.L (A6-0x18),-(A7)> Δ-4 {[-6-]|[4, '(A6-0x18)']}
<MI 251ce MOVE.L (A6-0x1c),-(A7)> Δ-4 {[-6-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<MI 251d0 MOVE.L D5,-(A7)> Δ-4 {[-6-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D5']}
<Call 0x251d2 0x246e2> {[-6-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D5']}
<POP 251d6-251d8 StackAdj> Δ+12 {[-6-]}
<MI 251d8 MOVE.B (A7)+,D0> Δ+2 {[-4-]}
<MI 251da CMPI.B #0x3d,D0> {[-4-]}
<MI 251de BNE 0x2521e> {[-4-]}
<POP 251e0-251e8 Naked> Σ-4 Δ-4 ↓
<MI 251e0 MOVE.L D5,D0> {[-4-]}
<MI 251e2 ADDQ.L #0x1,D0> {[-4-]}
<MI 251e4 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x8)']}
<MI 251e6 MOVE.L D0,D7> {[-4-]|[4, '(A6-0x8)']}
<POP 251e8-251ec Naked> Σ-8 ↓ →0x2521a ←0x25206
<MI 251e8 CMP.L (A7),D7> {[-8-]}
<MI 251ea BGT 0x2521a> {[-8-]}
<POP 251ec-25202 Naked> Σ-8 ↓ →0x25206
<POP 251ec-251ee StackAdj> Δ-2 {[-10-]}
<MI 251ee MOVE.L (A6-0x18),-(A7)> Δ-4 {[-10-]|[4, '(A6-0x18)']}
<MI 251f0 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[-10-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<MI 251f2 MOVE.L D7,-(A7)> Δ-4 {[-10-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D7']}
<Call 0x251f4 0x246e2> {[-10-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D7']}
<POP 251f8-251fa StackAdj> Δ+12 {[-10-]}
<MI 251fa MOVE.B (A7)+,D6> Δ+2 {[-8-]}
<MI 251fc CMPI.B #0x2f,D6> {[-8-]}
<MI 25200 BNE 0x25206> {[-8-]}
<POP 25202-25206 Naked> Σ-8 Δ+8 →0x25224
<POP 25202-25204 StackAdj> Δ+8 {}
<MI 25204 BRA 0x25224> {}
<POP 25206-2521a Naked> Σ-8 ↓ →0x251e8 ←0x251ec
<MI 25206 MOVEA.L (A6+0xc),A0> {[-8-]}
<MI 2520a MOVE.L (A0),-(A7)> Δ-4 {[-8-]|[4, '(A0)']}
<MI 2520c MOVE.B D6,-(A7)> Δ-2 {[-8-]|[4, '(A0)']|[2, 'D6']}
<Call 0x2520e 0x102c0> {[-8-]|[4, '(A0)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 25214-25216 StackAdj> Δ+6 {[-8-]}
<MI 25216 ADDQ.L #0x1,D7> {[-8-]}
<MI 25218 BVC 0x251e8> {[-8-]}
<POP 2521a-2521e Naked> Σ-8 Δ+8 →0x25224 ←0x251e8
<POP 2521a-2521c StackAdj> Δ+8 {}
<MI 2521c BRA 0x25224> {}
<POP 2521e-25222 Naked> Σ-4 ↓ →0x251c6 ←0x251ca
<MI 2521e ADDQ.L #0x1,D5> {[-4-]}
<MI 25220 BVC 0x251c6> {[-4-]}
<POP 25222-25224 Naked> Σ-4 Δ+4 ↓ ←0x251c6
<POP 25222-25224 StackAdj> Δ+4 {}
<POP 25224-2522c Epilogue> Σ0 ←0x2516a ←0x25190 ←0x25202 ←0x2521a
@ 2522c
<LVAR 0x00c @ 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x010 @ 1(r)>
<POP 2522c-252ca Body>
<POP 2522c-25242 Prologue> Σ0 ↓
<POP 25242-25250 RegCacheLoad> Σ0 ↓
<POP 25250-25268 Naked> Σ0 ↓ →0x252b8
<MI 25250 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 25252 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Pointer.fp 0x25254 <LVAR -0x010 @ 1(r)>> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-16]}
<Call 0x25258 0x2158a> {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-16]}
<POP 2525e-25262 StackAdj> Δ+12 {}
<MI 25262 TST.B (A6-0x10)> {}
<MI 25266 BNE 0x252b8> {}
<POP 25268-25282 Naked> Σ0 ↓
<MI 25268 MOVE.L 0x27a08,D7> {}
<POP 2526a-2526c StackAdj> Δ-4 {[-4-]}
<MI 2526c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x2526e 0x2226e> {[-4-]|[4, '(A6+0x8)']}
<POP 25272-25274 StackAdj> Δ+4 {[-4-]}
<MI 25274 MOVE.L (A7)+,D6> Δ+4 {}
<MI 25276 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 25278 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x2527a 0x245a6> {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 2527e-25280 StackAdj> Δ+8 {}
<MI 25280 MOVE.L 0x27a08,D5> {}
<POP 25282-252a0 Naked> Σ0 ↓ →0x252ac ←0x252ac
<MI 25282 MOVE.L D7,D0> {}
<MI 25284 SUBQ.L #0x1,D0> {}
<POP 0x25286 LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {}
<MI 25290 LEA.L 0x25a00,A0> {}
<MI 25296 MOVE.B (A0+D0.L+#0x8),D0> {}
<MI 2529a CMPI.B #0x25,D0> {}
<MI 2529e BNE 0x252ac> {}
<POP 252a0-252ac Naked> Σ0 ↓
<MI 252a0 MOVE.L D7,0x27a08> {}
<MI 252a2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 252a4 MOVE.L D6,-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, 'D6']}
<Call 0x252a6 0x24e04> {[4, '(A6+0x8)']|[4, 'D6']}
<POP 252aa-252ac StackAdj> Δ+8 {}
<POP 252ac-252b6 Naked> Σ0 ↓ →0x25282 ←0x25282
<MI 252ac ADDQ.L #0x1,D7> {}
<MI 252ae CMP.L 0x27a0c,D7> {}
<MI 252b4 BLE 0x25282> {}
<POP 252b6-252b8 Naked> Σ0 ↓
<MI 252b6 MOVE.L D5,0x27a08> {}
<POP 252b8-252c2 Naked> Σ0 ↓ ←0x25250
<Pointer.fp 0x252b8 <LVAR 0x00c @ 4(r)>> Δ-4 {[@@12]}
<Call 0x252ba 0x102bc> {[@@12]}
FreeString(VAR a : String)
<POP 252c0-252c2 StackAdj> Δ+4 {}
<POP 252c2-252ca Epilogue> Σ0
@ 252ca
<LVAR -0x006 @ 4(r)>
<LVAR -0x00a @ 4(rw)>
<LVAR -0x00b 1(w)>
<LVAR -0x00c @ 1(r)>
<POP 252ca-255e8 Body> Δ+152
<POP 252ca-252e0 Prologue> Σ0 ↓
<POP 252e0-252ee RegCacheLoad> Σ0 ↓
<POP 252ee-25314 Naked> Σ0 ↓ →0x255ca ←0x255ca
<MI 252ee MOVE.L 0x27a08,D7> {}
<Pointer.fp 0x252f0 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Pointer.fp 0x252f2 <LVAR -0x00c @ 1(r)>> Δ-4 {[@@-6]|[@@-12]}
<Call 0x252f6 0x221c2> {[@@-6]|[@@-12]}
<POP 252fa-252fc StackAdj> Δ+8 {}
<MI 252fc MOVE.L 0x27a08,D6> {}
<POP 252fe-25300 StackAdj> Δ-4 {[-4-]}
<MI 25300 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']}
<Call 0x25302 0x2226e> {[-4-]|[4, '(A6-0x6)']}
<POP 25306-25308 StackAdj> Δ+4 {[-4-]}
<MI 25308 MOVE.L (A7)+,D0> Δ+4 {}
<MI 2530a CMPI.L #0xffffffff,D0> {}
<MI 25310 BEQ 0x255ca> {}
<POP 25314-2533e Naked> Σ0 ↓ →0x2534c
<POP 25314-25316 StackAdj> Δ-4 {[-4-]}
<MI 25316 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']}
<Const 0x25318 0x0.4> Δ-4 {[-4-]|[4, '(A6-0x6)']|[##0]}
<Call 0x2531c 0x22b8a> {[-4-]|[4, '(A6-0x6)']|[##0]}
<POP 25320-25322 StackAdj> Δ+8 {[-4-]}
<MI 25322 MOVE.L (A7),(A6-0xa)> {[-4-]}
<POP 25324-25326 StackAdj> Δ+2 {[-2-]}
<MI 25326 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-2-]|[4, '(A6-0xa)']}
<Call 0x25328 0x244ee> {[-2-]|[4, '(A6-0xa)']}
<POP 2532c-2532e StackAdj> Δ+4 {[-2-]}
<MI 2532e MOVE.B (A7)+,D0> Δ+2 {}
<MI 25330 EXTB.W D0> {}
<POP 0x25332 LimitCheck 0x0 ≤ D0 ≤ 0x2c> {}
<MI 25336 MOVE.B D0,(A6-0xb)> {}
<MI 2533a TST.B D0> {}
<MI 2533c BNE 0x2534c> {}
<POP 2533e-2534c Naked> Σ0 →0x255c2
<MI 2533e MOVE.L (A6-0xa),-(A7)> Δ-4 {[4, '(A6-0xa)']}
<MI 25340 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0xa)']|[4, '(A6-0x6)']}
<Call 0x25342 0x2522c> {[4, '(A6-0xa)']|[4, '(A6-0x6)']}
<POP 25346-25348 StackAdj> Δ+8 {}
<MI 25348 BRA 0x255c2> {}
<POP 2534c-25382 Naked> Σ0 ↓ →0x253ae ←0x25314
<Pointer.fp 0x2534c <LVAR -0x00a @ 4(rw)>> Δ-4 {[@@-10]}
<Call 0x2534e 0x102bc> {[@@-10]}
FreeString(VAR a : String)
<POP 25354-25356 StackAdj> Δ+4 {}
<MI 25356 MOVE.B D0,D1> {}
<MI 25358 EXTB.W D1> {}
<POP 0x2535a LimitCheck 0x0 ≤ D1 ≤ 0x2c> {}
<MI 2535e LEA.L 0x21d63,A0> {}
<MI 25362 MOVE.W D1,D0> {}
<MI 25364 EXTW.L D0> {}
<MI 25366 MOVE.L D0,D2> {}
<MI 25368 ROR.L #0x1,D2> {}
<MI 2536a ADDA.W D2,A0> {}
<MI 2536c SWAP.W D2> {}
<MI 2536e ROL.W #0x3,D2> {}
<MI 25370 CLR.L D3> {}
<MI 25372 MOVE.B (A0),D3> {}
<MI 25374 LSL.B D2,D3> {}
<MI 25376 LSR.B #0x4,D3> {}
<MI 25378 MOVE.L D3,D5> {}
<MI 2537a CMPI.L #0x0000000f,D5> {}
<MI 25380 BEQ 0x253ae> {}
<POP 25382-253ae Naked> Σ0 ↓
<MI 25382 MOVE.L D0,D4> {}
<MI 25384 MOVEQ.L #0x0a,D3> {}
<Call 0x25386 0x1028c> {}
?muls_d3_d4
<MI 2538c LEA.L 0x21b8a,A0> {}
<Blob 0x25390 [10] (A0+D4.W)> Δ-10 {[«10»]}
<MI 253a2 MOVE.L (A6-0x6),-(A7)> Δ-4 {[«10»]|[4, '(A6-0x6)']}
<MI 253a4 MOVE.L D5,-(A7)> Δ-4 {[«10»]|[4, '(A6-0x6)']|[4, 'D5']}
<Call 0x253a6 0x222a4> {[«10»]|[4, '(A6-0x6)']|[4, 'D5']}
<POP 253aa-253ae StackAdj> Δ+18 {}
<POP 253ae-253c2 Naked> Σ0 →0x2541a →0x25426 →0x25438 →0x25446 →0x255b4 →0x2544e →0x25452 →0x2545a →0x25462 →0x2546a →0x25472 →0x2547a →0x25482 →0x2548a →0x25492 →0x2549a →0x254a4 →0x254ae →0x254b8 →0x254c2 →0x254cc →0x254d6 →0x254e0 →0x254ea →0x254f4 →0x254fe →0x25508 →0x25512 →0x2551c →0x25526 →0x25530 →0x2553a →0x25544 →0x2554e →0x25558 →0x25562 →0x2556c →0x25576 →0x2557c →0x25586 →0x25590 →0x2559a →0x255a0 →0x255aa ←0x2534c
<MI 253ae SUBQ.W #0x1,D1> {}
<POP 0x253b0 LimitCheck 0x0 ≤ D1 ≤ 0x2b> {}
<MI 253b8 ADD.W D1,D1> {}
<MI 253ba SWITCH D1.W> {}
<POP 2541a-25420 Naked> Σ0 Δ-4 ↓ ←0x253ae
<MI 2541a MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2541c 0x22d12> {[4, '(A6-0x6)']}
<POP 25420-25426 Naked> Σ-4 Δ+4 →0x255c2 ←0x25438 ←0x25446 ←0x25452 ←0x2545a ←0x25462 ←0x2546a ←0x25472 ←0x2547a ←0x25482 ←0x2548a ←0x25492 ←0x2549a ←0x254a4 ←0x254ae ←0x254b8 ←0x254c2 ←0x254cc ←0x254d6 ←0x254e0 ←0x254ea ←0x254f4 ←0x254fe ←0x25508 ←0x25512 ←0x2551c ←0x25526 ←0x25530 ←0x2553a ←0x25544 ←0x2554e ←0x25558 ←0x25562 ←0x2556c ←0x2557c ←0x25586 ←0x25590 ←0x255a0 ←0x255aa
<POP 25420-25422 StackAdj> Δ+4 {}
<MI 25422 BRA 0x255c2> {}
<POP 25426-25438 Naked> Σ0 →0x255c2 ←0x253ae
<MI 25426 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x25428 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x2542c 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 25432-25434 StackAdj> Δ+6 {}
<MI 25434 BRA 0x255c2> {}
<POP 25438-25446 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<POP 25438-2543a StackAdj> Δ-4 {[-4-]}
<Call 0x2543a 0x102ac> {[-4-]}
FSCALL_102ac
<Call 0x25440 0x22ce8> {[-4-]}
<MI 25444 BRA 0x25420> {[-4-]}
<POP 25446-2544e Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25446 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25448 0x22eec> {[4, '(A6-0x6)']}
<MI 2544c BRA 0x25420> {[4, '(A6-0x6)']}
<POP 2544e-25452 Naked> Σ0 →0x255c2 ←0x253ae
<MI 2544e BRA 0x255c2> {}
<POP 25452-2545a Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25452 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25454 0x23212> {[4, '(A6-0x6)']}
<MI 25458 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 2545a-25462 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 2545a MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2545c 0x2337e> {[4, '(A6-0x6)']}
<MI 25460 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25462-2546a Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25462 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25464 0x2346c> {[4, '(A6-0x6)']}
<MI 25468 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 2546a-25472 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 2546a MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2546c 0x23860> {[4, '(A6-0x6)']}
<MI 25470 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25472-2547a Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25472 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25474 0x238d8> {[4, '(A6-0x6)']}
<MI 25478 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 2547a-25482 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 2547a MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2547c 0x23950> {[4, '(A6-0x6)']}
<MI 25480 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25482-2548a Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25482 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25484 0x2397c> {[4, '(A6-0x6)']}
<MI 25488 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 2548a-25492 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 2548a MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2548c 0x23a7c> {[4, '(A6-0x6)']}
<MI 25490 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25492-2549a Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25492 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25494 0x23b62> {[4, '(A6-0x6)']}
<MI 25498 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 2549a-254a4 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 2549a MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2549c 0x23b8e> {[4, '(A6-0x6)']}
<MI 254a0 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 254a4-254ae Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 254a4 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x254a6 0x23bda> {[4, '(A6-0x6)']}
<MI 254aa BRA 0x25420> {[4, '(A6-0x6)']}
<POP 254ae-254b8 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 254ae MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x254b0 0x23c26> {[4, '(A6-0x6)']}
<MI 254b4 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 254b8-254c2 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 254b8 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x254ba 0x23c72> {[4, '(A6-0x6)']}
<MI 254be BRA 0x25420> {[4, '(A6-0x6)']}
<POP 254c2-254cc Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 254c2 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x254c4 0x23cbe> {[4, '(A6-0x6)']}
<MI 254c8 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 254cc-254d6 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 254cc MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x254ce 0x23d0a> {[4, '(A6-0x6)']}
<MI 254d2 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 254d6-254e0 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 254d6 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x254d8 0x23d56> {[4, '(A6-0x6)']}
<MI 254dc BRA 0x25420> {[4, '(A6-0x6)']}
<POP 254e0-254ea Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 254e0 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x254e2 0x23da0> {[4, '(A6-0x6)']}
<MI 254e6 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 254ea-254f4 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 254ea MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x254ec 0x23dea> {[4, '(A6-0x6)']}
<MI 254f0 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 254f4-254fe Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 254f4 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x254f6 0x23e34> {[4, '(A6-0x6)']}
<MI 254fa BRA 0x25420> {[4, '(A6-0x6)']}
<POP 254fe-25508 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 254fe MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25500 0x23e7e> {[4, '(A6-0x6)']}
<MI 25504 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25508-25512 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25508 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2550a 0x23ec8> {[4, '(A6-0x6)']}
<MI 2550e BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25512-2551c Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25512 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25514 0x23f12> {[4, '(A6-0x6)']}
<MI 25518 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 2551c-25526 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 2551c MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2551e 0x23f5c> {[4, '(A6-0x6)']}
<MI 25522 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25526-25530 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25526 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25528 0x23fa6> {[4, '(A6-0x6)']}
<MI 2552c BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25530-2553a Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25530 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25532 0x23fea> {[4, '(A6-0x6)']}
<MI 25536 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 2553a-25544 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 2553a MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2553c 0x24030> {[4, '(A6-0x6)']}
<MI 25540 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25544-2554e Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25544 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25546 0x24066> {[4, '(A6-0x6)']}
<MI 2554a BRA 0x25420> {[4, '(A6-0x6)']}
<POP 2554e-25558 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 2554e MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25550 0x240f6> {[4, '(A6-0x6)']}
<MI 25554 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25558-25562 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25558 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2555a 0x24168> {[4, '(A6-0x6)']}
<MI 2555e BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25562-2556c Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25562 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25564 0x234ce> {[4, '(A6-0x6)']}
<MI 25568 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 2556c-25576 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 2556c MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2556e 0x23538> {[4, '(A6-0x6)']}
<MI 25572 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25576-2557c Naked> Σ0 →0x255c2 ←0x253ae
<Call 0x25576 0x2350a> {}
<MI 2557a BRA 0x255c2> {}
<POP 2557c-25586 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 2557c MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2557e 0x241da> {[4, '(A6-0x6)']}
<MI 25582 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25586-25590 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25586 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25588 0x2425c> {[4, '(A6-0x6)']}
<MI 2558c BRA 0x25420> {[4, '(A6-0x6)']}
<POP 25590-2559a Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 25590 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25592 0x242dc> {[4, '(A6-0x6)']}
<MI 25596 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 2559a-255a0 Naked> Σ0 →0x255c2 ←0x253ae
<Call 0x2559a 0x243a0> {}
<MI 2559e BRA 0x255c2> {}
<POP 255a0-255aa Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 255a0 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x255a2 0x243c0> {[4, '(A6-0x6)']}
<MI 255a6 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 255aa-255b4 Naked> Σ0 Δ-4 →0x25420 ←0x253ae
<MI 255aa MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x255ac 0x2446c> {[4, '(A6-0x6)']}
<MI 255b0 BRA 0x25420> {[4, '(A6-0x6)']}
<POP 255b4-255c2 Naked> Σ0 ←0x253ae
<POP 255b4-255c2 Bailout> {}
<MI 255b4 MOVEA.L (A5+0x8),A7>
<MI 255b8 MOVEA.W #0x0,A6>
<MI 255bc JMP 0x257cc>
<POP 255c2-255ca Naked> Σ0 ↓ ←0x2533e ←0x25420 ←0x25426 ←0x2544e ←0x25576 ←0x2559a
<MI 255c2 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x255c4 0x21e20> {[4, '(A6-0x6)']}
<POP 255c8-255ca StackAdj> Δ+4 {}
<POP 255ca-255e0 Naked> Σ0 ↓ →0x252ee ←0x252ee
<MI 255ca MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']}
<MI 255cc MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']|[4, 'D6']}
<MI 255ce SUB.L D7,(A7)> {[4, 'D6']|[-4-]}
<Call 0x255d0 0x223b6> {[4, 'D6']|[-4-]}
<POP 255d4-255d6 StackAdj> Δ+8 {}
<MI 255d6 MOVE.L D7,0x27a08> {}
<MI 255d8 TST.B (A6-0xc)> {}
<MI 255dc BEQ 0x252ee> {}
<POP 255e0-255e8 Epilogue> Σ0
@ 255e8
START
<POP 255e8--0001 Body>
<POP 255e8-255f2 Prologue> Σ0
<POP 255f2-25622 Naked> Σ0 ↓ →0x2568a
<MI 255f2 MOVE.L #0x1,0x27a32> {}
<POP 255fc-255fe StackAdj> Δ-4 {[-4-]}
<Call 0x255fe 0x103c4> {[-4-]}
GetArgv() : String
<MI 25604 MOVE.L (A7)+,0x27a36> Δ+4 {}
<Const 0x2560a 0x27a10.4> Δ-4 {[##162320]}
<Call 0x25610 0x21674> {[##162320]}
<POP 25616-25618 StackAdj> Δ+4 {}
<MI 25618 MOVEA.L 0x27a36,A0> {}
<MI 2561e TST.W (A0)> {}
<MI 25620 BLE 0x2568a> {}
<POP 25622-2568a Naked> Σ0 →0x256c4
<Blob 0x25622 [8] @> Δ-8 {[«8""»]}
<Blob 0x25632 [8] @> Δ-8 {[«8""»]|[«8""»]}
<POP 25642-25644 StackAdj> Δ-8 {[«8""»]|[«8""»]|[-8-]}
<Lit 0x25644 7> {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]}
<POP 25656-25658 StackAdj> Δ-4 {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[-4-]}
<POP 25658-25659 StackAdj> Δ+4 {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]}
<Blob 0x25659 [4] 0x27a36> Δ-4 {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]}
<POP 2565e-25660 StackAdj> Δ-4 {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]|[-4-]}
<Lit 0x25660 7> {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]|[$$][BYE];]}
<Call 0x25674 0x102d4> {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]|[$$][BYE];]}
StringCat3(a, b, c : String) : String
<POP 2567a-2567e StackAdj> Δ+12 {[«8""»]|[«8""»]|[-4-]}
<MI 2567e MOVE.L (A7)+,0x27a36> Δ+4 {[«8""»]|[«8""»]}
<POP 25684-25688 StackAdj> Δ+16 {}
<MI 25688 BRA 0x256c4> {}
<POP 2568a-256c4 Naked> Σ0 ↓ ←0x255f2
<Const 0x2568a 0x27a36.4> Δ-4 {[##162358]}
<Call 0x25690 0x102bc> {[##162358]}
FreeString(VAR a : String)
<POP 25696-25697 StackAdj> Δ+4 ↓ {}
<Blob 0x25697 [8] @> Δ-8 {[«8""»]}
<POP 256a6-256a8 StackAdj> Δ-4 {[«8""»]|[-4-]}
<Lit 0x256a8 7> {[«8""»]|[$$[INIT];]}
<MI 256bc MOVE.L (A7)+,0x27a36> Δ+4 {[«8""»]}
<POP 256c2-256c4 StackAdj> Δ+8 {}
<POP 256c4-256cc Naked> Σ0 ↓ ←0x25622
<MI 256c4 MOVE.B #0x01,0x27a40> {}
<POP 256cc-256d4 Naked> Σ0 ↓ →0x256de ←0x257da
<MI 256cc TST.B 0x27a40> {}
<MI 256d2 BEQ 0x256de> {}
<POP 256d4-256de Naked> Σ0 →0x2578c
<MI 256d4 CLR.B 0x27a40> {}
<MI 256da BRA 0x2578c> {}
<POP 256de-2578c Naked> Σ0 ↓ ←0x256cc
<Blob 0x256de [10] 0x27a1a> Δ-10 {[«10»]}
<Blob 0x256ec [2] @> Δ-2 {[«10»]|[«2""»]}
<POP 256f0-256f4 StackAdj> Δ-12 {[«10»]|[«2""»]|[-12-]}
<Lit 0x256f4> {[«10»]|[«2""»]|[-8-]|[$$…]}
<Pointer.sp 0x256f4 14> Δ-4
<Const 0x256f8 0x1.2> Δ-2
<Const 0x256fc 0xa.2> Δ-2
<Call 0x25700 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 25706-25708 StackAdj> Δ+8
<POP 25706-25708 StackAdj> Δ-4 {[«10»]|[«2""»]|[-8-]|[$$…]|[-4-]}
<Lit 0x25708 2> {[«10»]|[«2""»]|[-8-]|[$$…]|[$$>_]}
<Call 0x2571c 0x102d0> {[«10»]|[«2""»]|[-8-]|[$$…]|[$$>_]}
StringCat2(a, b : String) : String
<POP 25722-25724 StackAdj> Δ+8 {[«10»]|[«2""»]|[-8-]}
<Call 0x25724 0x103e4> {[«10»]|[«2""»]|[-8-]}
AskConsoleString(prompt : String) : String
<POP 2572a-2572c StackAdj> Δ+4 {[«10»]|[«2""»]|[-4-]}
<MI 2572c MOVE.L (A7)+,0x27a3c> Δ+4 {[«10»]|[«2""»]}
<POP 25732-25734 StackAdj> Δ+8 {[-4-]}
<POP 25734-25735 StackAdj> Δ+4 {}
<Blob 0x25735 [4] 0x27a3c> Δ-4 {[«4»]}
<Call 0x2573a 0x220ba> {[«4»]}
<POP 2573e-25740 StackAdj> Δ+2 {[-2-]}
<POP 25740-25741 StackAdj> Δ+2 {}
<Blob 0x25741 [2] @> Δ-2 {[«2""»]}
<Blob 0x25744 [2] @> Δ-2 {[«2""»]|[«2""»]}
<POP 25748-2574a StackAdj> Δ-8 {[«2""»]|[«2""»]|[-8-]}
<Lit 0x2574a 2> {[«2""»]|[«2""»]|[-4-]|[$$[ ]}
<POP 2575c-2575e StackAdj> Δ-4 {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[-4-]}
<POP 2575e-2575f StackAdj> Δ+4 {[«2""»]|[«2""»]|[-4-]|[$$[ ]}
<Blob 0x2575f [4] 0x27a3c> Δ-4 {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]}
<POP 25764-25766 StackAdj> Δ-4 {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]|[-4-]}
<Lit 0x25766 2> {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]|[$$];]}
<Call 0x2577a 0x102d4> {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]|[$$];]}
StringCat3(a, b, c : String) : String
<POP 25780-25784 StackAdj> Δ+12 {[«2""»]|[«2""»]|[-4-]}
<MI 25784 MOVE.L (A7)+,0x27a36> Δ+4 {[«2""»]|[«2""»]}
<POP 2578a-2578c StackAdj> Δ+4 {}
<POP 2578c-257b8 Naked> Σ0 ↓ ←0x256d4
<MI 2578c CLR.B 0x27a3a> {}
<MI 25792 MOVE.L #0x1,0x27a08> {}
<MI 2579c CLR.L 0x27a0c> {}
<POP 257a2-257a4 StackAdj> Δ-4 {[-4-]}
<Blob 0x257a4 [4] 0x27a36> Δ-4 {[-4-]|[«4»]}
<Call 0x257aa 0x102cc> {[-4-]|[«4»]}
StringDup(a : String) : String
<POP 257b0-257b2 StackAdj> Δ+4 {[-4-]}
<Call 0x257b2 0x22c2c> {[-4-]}
<POP 257b6-257b8 StackAdj> Δ+4 {}
<POP 257b8-257c6 Naked> Σ0 ↓ →0x257cc ←0x257c6
<MI 257b8 MOVE.L 0x27a08,D0> {}
<MI 257be CMP.L 0x27a0c,D0> {}
<MI 257c4 BGT 0x257cc> {}
<POP 257c6-257cc Naked> Σ0 →0x257b8
<Call 0x257c6 0x252ca> {}
<MI 257ca BRA 0x257b8> {}
<POP 257cc-257da Naked> Σ0 ↓ ←0x257b8
<Const 0x257cc 0x27a36.4> Δ-4 {[##162358]}
<Call 0x257d2 0x102bc> {[##162358]}
FreeString(VAR a : String)
<POP 257d8-257da StackAdj> Δ+4 {}
<POP 257da-257de Naked> Σ0 →0x256cc
<MI 257da BRA 0x256cc> {}
@ 25838
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 25838-25974 Body>
<POP 25838-2584e Prologue> Σ0 ↓
<POP 2584e-25864 RegCacheLoad> Σ0 ↓
<POP 25864-258c4 Naked> Σ0 ↓ →0x2590c
<Call 0x25864 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x2586a [18] @> Δ-18 {[«18""»]}
<POP 25876-25878 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x25878 18> {[«18""»]|[$$Experiment error :]}
<Call 0x25884 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 25886-25887 StackAdj> Δ+22 ↓ {}
<Blob 0x25887 [14] @> Δ-14 {[«14""»]}
<POP 25896-25898 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x25898 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 258a2-258a4 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 258a4 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x258a8 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 258ae-258b0 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x258b0 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 258b6-258b8 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x258b8 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 258ba-258bc StackAdj> Δ+18 {}
<MI 258bc MOVEA.L (A6+0xa),A0> {}
<MI 258c0 CMPA.W #0x01,A0> {}
<MI 258c2 BEQ 0x2590c> {}
<POP 258c4-2590c Naked> Σ0 ↓
<Blob 0x258c4 [14] @> Δ-14 {[«14""»]}
<Blob 0x258d4 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 258e4-258e6 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x258e6 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 258f0-258f2 StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x258f2> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x258f2 12> Δ-4
<Const 0x258f6 0x1.2> Δ-2
<Const 0x258f8 0x1e.2> Δ-2
<Call 0x258fa 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 258fc-258fe StackAdj> Δ+8
<Call 0x258fe 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 25904-25906 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x25906 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 25908-2590c StackAdj> Δ+48 {}
<POP 2590c-2596c Naked> Σ0 ↓ ←0x25864
<Blob 0x2590c [14] @> Δ-14 {[«14""»]}
<POP 2591c-2591e StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x2591e 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 25928-2592a StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 2592a MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x2592e 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 25934-25936 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x25936 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 2593c-2593e StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x2593e 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 25940-25941 StackAdj> Δ+18 ↓ {}
<Blob 0x25941 [24] @> Δ-24 {[«24""»]}
<Const 0x25950 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 25954-25956 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x25956 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x25964 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 2596a-2596c StackAdj> Δ+30 {}
<POP 2596c-25974 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; import ident.5dfdd8182e2a5ffb 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 55 e8 | U | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 7a 4c | zL | .PTR 0x27a4c 00020010 code.end: 00020010 00 02 59 74 | Yt | .PTR 0x25974 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 05 f6 | | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 58 38 | X8 | .CODE EXP_FAIL 00020020 00 00 00 00 | | .CONST 0x00000000 00020024 exp_init_done: 00020024 00 | | .CONST 0x00 00020025 00 | | .CONST 0x00 00020026 00 00 | | .CONST 0x0000 00020028 00 00 | | .CONST 0x0000 0002002a 00 00 | | .XXX[0x2] 0002002c 00 00 | | .CONST 0x0000 0002002e 00 00 | | .CONST 0x0000 00020030 00 00 | | .CONST 0x0000 00020032 00 00 00 00 00 00 | | .XXX[0x6] 00020038 00 00 00 00 00 00 00 00 | | .BLANK 00[0xb0] 000200e8 00 00 00 00 | | .XXX[0x4] 000200ec 00 00 00 00 | | .PTR 0x0 000200f0 is_open_ERROR_LOG: 000200f0 00 | | .CONST 0x0 000200f1 write_error_ERROR_LOG: 000200f1 00 | | .CONST 0x0 000200f2 00 00 00 00 | | .CONST 0x00000000 000200f6 00 00 00 00 | | .CONST 0x00000000 000200fa 00 | | .CONST 0x00 000200fb 00 | | .CONST 0x00 000200fc file_ERROR_LOG: 000200fc 00 00 00 00 | | .CONST 0x00000000 00020100 00 00 00 00 | | .CONST 0x00000000 00020104 00 00 | | .CONST 0x0000 00020106 00 00 | | .CONST 0x0000 00020108 somekindoffsflag: 00020108 00 | | .CONST 0x00 00020109 00 | | .CONST 0x00 0002010a 40 28 23 29 45 58 |@(#)EX | .XXX[0x6] 00020110 50 4d 4f 4e 2c 32 2e 31 |PMON,2.1| .XXX[0x90] 00020118 2c 39 30 2f 31 32 2f 30 |,90/12/0| 00020120 34 2c 31 37 3a 31 38 3a |4,17:18:| 00020128 31 39 5c 20 58 45 51 20 |19\ XEQ | 00020130 20 20 20 20 20 20 20 20 | | 00020138 50 4f 4c 4c 20 20 20 20 |POLL | 00020140 20 20 20 20 52 45 53 45 | RESE| 00020148 54 20 20 20 20 20 20 20 |T | 00020150 43 4f 4e 54 49 4e 55 45 |CONTINUE| 00020158 20 20 20 20 4d 45 4d 30 | MEM0| 00020160 5f 45 58 49 53 54 53 20 |_EXISTS | 00020168 4d 45 4d 31 5f 45 58 49 |MEM1_EXI| 00020170 53 54 53 20 4d 45 4d 32 |STS MEM2| 00020178 5f 45 58 49 53 54 53 20 |_EXISTS | 00020180 4d 45 4d 33 5f 45 58 49 |MEM3_EXI| 00020188 53 54 53 20 51 55 41 44 |STS QUAD| 00020190 5f 44 45 4e 53 49 54 59 |_DENSITY| 00020198 21 40 23 24 25 5e 26 2a |!@#$%^&*| 000201a0 28 29 20 20 |() | .XXX[0x4] 000201a4 52 65 63 6f 76 65 72 61 |Recovera| .TXT 'Recoverable experiment error :_ ' 000201c4 57 6f 72 64 |Word | .TXT 'Word' 000201c8 73 20 65 72 |s er | .TXT 's er' 000201cc 72 6f 72 5f |ror_ | .TXT 'ror_' 000201d0 55 6e 6b 6e 6f 77 6e 20 |Unknown | .TXT 'Unknown board name:_' 000201e4 59 45 53 20 |YES | .XXX[0x4] 000201e8 20 20 20 20 20 20 59 20 | Y | .XXX[0x48] 000201f0 20 20 20 20 20 20 20 20 | | 000201f8 54 52 55 45 20 20 20 20 |TRUE | 00020200 20 20 54 20 20 20 20 20 | T | 00020208 20 20 20 20 4e 4f 20 20 | NO | 00020210 20 20 20 20 20 20 4e 20 | N | 00020218 20 20 20 20 20 20 20 20 | | 00020220 46 41 4c 53 45 20 20 20 |FALSE | 00020228 20 20 46 20 20 20 20 20 | F | 00020230 20 20 20 20 | | .XXX[0x4] 00020234 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal boolean :_' 00020246 50 61 72 61 6d 65 74 65 |Paramete| .TXT 'Parameter too long :_ ' 0002025c 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal STRING parameter :_ ' 00020278 30 31 32 33 34 35 36 37 |01234567| .XXX[0x10] 00020280 38 39 41 42 43 44 45 46 |89ABCDEF| 00020288 54 52 55 45 |TRUE | .TXT 'TRUE' 0002028c 46 41 4c 53 45 20 |FALSE | .TXT 'FALSE ' 00020292 2c 20 74 79 70 65 20 22 |, type "| .TXT ', type "C" to continue the experiment or "E" to end it :_ ' 000202ce 43 61 6e 27 74 20 65 78 |Can't ex| .TXT 'Can't execute multi-board experiments!' 000202f4 38 37 35 31 20 49 2f 4f |8751 I/O| .TXT '8751 I/O error! ' 00020304 38 37 35 31 20 69 6e 74 |8751 int| .TXT '8751 internal error!' 00020318 42 6f 61 72 64 20 77 61 |Board wa| .TXT 'Board was reset! ' 0002032c 42 6f 61 72 64 20 74 69 |Board ti| .TXT 'Board timed out! ' 00020340 42 6f 61 72 64 20 69 73 |Board is| .TXT 'Board is_ ' 0002034a 43 61 6e 27 74 20 68 61 |Can't ha| .TXT 'Can't handle board status =_' 00020366 49 6e 73 75 66 66 69 63 |Insuffic| .TXT 'Insufficient arguments to XEQ ' 00020384 49 2f 4f 20 65 72 72 6f |I/O erro| .TXT 'I/O error during upload!' 0002039c 50 6f 6c 6c 20 20 20 20 |Poll | .TXT 'Poll ' 000203a6 43 61 6e 27 74 20 70 6f |Can't po| .TXT 'Can't poll non-unique board id' 000203c4 2c 54 52 55 45 20 |,TRUE | .TXT ',TRUE ' 000203ca 2c 46 |,F | .TXT ',F' 000203cc 41 4c |AL | .TXT 'AL' 000203ce 53 45 |SE | .TXT 'SE' 000203d0 43 6f 6e 74 69 6e 75 65 |Continue| .TXT 'Continue ' 000203da 42 6f 61 72 64 20 69 73 |Board is| .TXT 'Board is not paused or looping! ' 000203fa 52 65 73 65 74 20 20 20 |Reset | .TXT 'Reset ' 00020404 54 52 55 45 |TRUE | .TXT 'TRUE' 00020408 46 41 4c 53 45 20 |FALSE | .TXT 'FALSE ' 0002040e 45 4d |EM | .XXX[0x2] 00020410 20 20 20 20 20 20 20 20 | | .XXX[0x8] 00020418 2e 49 4f 41 |.IOA | .TXT '.IOA' 0002041c 2e 53 45 51 |.SEQ | .TXT '.SEQ' 00020420 2e 46 49 55 |.FIU | .TXT '.FIU' 00020424 2e 54 59 50 |.TYP | .TXT '.TYP' 00020428 2e 56 41 4c |.VAL | .TXT '.VAL' 0002042c 2e 4d 45 4d |.MEM | .TXT '.MEM' 00020430 2e 4d 45 4d |.MEM | .TXT '.MEM' 00020434 2e 4d 45 4d |.MEM | .TXT '.MEM' 00020438 2e 4d 45 4d |.MEM | .TXT '.MEM' 0002043c 2e 4d 33 32 |.M32 | .TXT '.M32' 00020440 2e 4d 33 32 |.M32 | .TXT '.M32' 00020444 2e 4d 33 32 |.M32 | .TXT '.M32' 00020448 2e 4d 33 32 |.M32 | .TXT '.M32' 0002044c 2e 49 4f 43 |.IOC | .TXT '.IOC' 00020450 49 4f 41 20 |IOA | .TXT 'IOA ' 00020454 53 45 51 20 |SEQ | .TXT 'SEQ ' 00020458 46 49 55 20 |FIU | .TXT 'FIU ' 0002045c 54 59 50 20 |TYP | .TXT 'TYP ' 00020460 56 41 4c 20 |VAL | .TXT 'VAL ' 00020464 4d 45 4d 30 |MEM0 | .TXT 'MEM0' 00020468 4d 45 4d 31 |MEM1 | .TXT 'MEM1' 0002046c 4d 45 4d 32 |MEM2 | .TXT 'MEM2' 00020470 4d 45 4d 33 |MEM3 | .TXT 'MEM3' 00020474 41 4c 4c 20 |ALL | .TXT 'ALL ' 00020478 49 4f 43 20 |IOC | .TXT 'IOC ' 0002047c 01 01 01 01 | | .XXX[0x4] 00020480 01 00 01 01 00 00 00 00 | | .XXX[0x8] 00020488 01 01 01 01 | | .XXX[0x4] 0002048c 58 45 51 20 20 20 20 20 |XEQ | .TXT 'XEQ ' 00020498 50 4f 4c 4c 20 20 20 20 |POLL | .TXT 'POLL ' 000204a4 52 45 53 45 54 20 20 20 |RESET | .TXT 'RESET ' 000204b0 43 4f 4e 54 49 4e 55 45 |CONTINUE| .TXT 'CONTINUE ' 000204bc 4d 45 4d 30 5f 45 58 49 |MEM0_EXI| .TXT 'MEM0_EXISTS ' 000204c8 4d 45 4d 31 5f 45 58 49 |MEM1_EXI| .TXT 'MEM1_EXISTS ' 000204d4 4d 45 4d 32 5f 45 58 49 |MEM2_EXI| .TXT 'MEM2_EXISTS ' 000204e0 4d 45 4d 33 5f 45 58 49 |MEM3_EXI| .TXT 'MEM3_EXISTS ' 000204ec 51 55 41 44 5f 44 45 4e |QUAD_DEN| .TXT 'QUAD_DENSITY' 000204f8 21 40 23 24 25 5e 26 2a |!@#$%^&*| .TXT '!@#$%^&*()' 00020502 20 20 00 00 00 00 00 00 | | .TXT ' \x00\x00\x00\x00\x00\x00\x00\x00' 0002050c 59 45 53 20 20 20 20 20 |YES | .TXT 'YES ' 00020516 59 20 20 20 20 20 20 20 |Y | .TXT 'Y ' 00020520 54 52 55 45 20 20 20 20 |TRUE | .TXT 'TRUE ' 0002052a 54 20 20 20 20 20 20 20 |T | .TXT 'T ' 00020534 4e 4f 20 20 20 20 20 20 |NO | .TXT 'NO ' 0002053e 4e 20 20 20 20 20 20 20 |N | .TXT 'N ' 00020548 46 41 4c 53 45 20 20 20 |FALSE | .TXT 'FALSE ' 00020552 46 20 20 20 20 20 20 20 |F | .TXT 'F ' 0002055c ; -------------------------------------------------------------------------------------- 0002055c ; OMSI PASCAL Function 0002055c ; <LVAR 0x008 4(r)> 0002055c ; -------------------------------------------------------------------------------------- 0002055c 4e 56 ff 8a |NV | LINK.W A6,#0xff8a 00020560 bf d5 | | CMPA.L (A5),A7 00020562 62 06 |b | BHI 0x2056a 00020564 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020568 4e 76 |Nv | TRAPV 0002056a de fc 00 72 | r | ADDA.W #0x72,A7 0002056e 48 e7 e0 e8 |H | MOVEM.L A4+A2+A1+A0+D2+D1+D0,-(A7) 00020572 45 f9 00 02 59 7c |E Y| | LEA.L 0x2597c,A2 00020578 72 1e |r | MOVEQ.L #0x1e,D1 0002057a 74 01 |t | MOVEQ.L #0x01,D2 0002057c 9e fc 00 20 | | SUBA.W #0x20,A7 00020580 20 4f | O | MOVEA.L A7,A0 00020582 43 fa fc 20 |C | LEA.L 0x201a4,A1 00020586 70 1e |p | MOVEQ.L #0x1e,D0 00020588 10 d9 | | MOVE.B (A1)+,(A0)+ 0002058a 51 c8 ff fc |Q | DBF D0,0x20588 0002058e 20 52 | R | MOVEA.L (A2),A0 00020590 9e c1 | | SUBA.W D1,A7 00020592 22 4f |"O | MOVEA.L A7,A1 00020594 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00020598 70 1d |p | MOVEQ.L #0x1d,D0 0002059a 12 d8 | | MOVE.B (A0)+,(A1)+ 0002059c 51 c8 ff fc |Q | DBF D0,0x2059a 000205a0 51 4f |QO | SUBQ.L #0x8,A7 000205a2 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 000205a6 3f 02 |? | MOVE.W D2,-(A7) 000205a8 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7) 000205ac 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000205b2 58 4f |XO | ADDQ.L #0x4,A7 000205b4 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000205b8 3f 02 |? | MOVE.W D2,-(A7) 000205ba 3f 01 |? | MOVE.W D1,-(A7) 000205bc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000205c2 50 4f |PO | ADDQ.L #0x8,A7 000205c4 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000205ca 50 4f |PO | ADDQ.L #0x8,A7 000205cc 28 5f |(_ | MOVEA.L (A7)+,A4 000205ce de fc 00 3e | > | ADDA.W #0x3e,A7 000205d2 48 52 |HR | PEA.L (A2) 000205d4 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000205da 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 000205de 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000205e4 2e 8c |. | MOVE.L A4,(A7) 000205e6 4e b9 00 02 1e 62 |N b | JSR 0x21e62 000205ec 58 4f |XO | ADDQ.L #0x4,A7 000205ee 4c df 17 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A4 000205f2 4e 5e |N^ | UNLK A6 000205f4 4e 75 |Nu | RTS 000205f6 ; -------------------------------------------------------------------------------------- 000205f6 ; OMSI PASCAL Function 000205f6 ; <LVAR 0x008 1(r)> 000205f6 ; -------------------------------------------------------------------------------------- 000205f6 PROG_FAIL: 000205f6 4e 56 ff da |NV | LINK.W A6,#0xffda 000205fa bf d5 | | CMPA.L (A5),A7 000205fc 62 06 |b | BHI 0x20604 000205fe 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020602 4e 76 |Nv | TRAPV 00020604 de fc 00 24 | $ | ADDA.W #0x24,A7 00020608 48 e7 80 00 |H | MOVEM.L D0,-(A7) 0002060c 2f 3a fb be |/: | MOVE.L 0x201cc,-(A7) 00020610 2f 3a fb b6 |/: | MOVE.L 0x201c8,-(A7) 00020614 2f 3a fb ae |/: | MOVE.L 0x201c4,-(A7) 00020618 51 4f |QO | SUBQ.L #0x8,A7 0002061a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002061e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020622 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7) 00020626 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002062c 58 4f |XO | ADDQ.L #0x4,A7 0002062e 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00020632 48 80 |H | EXTB.W D0 00020634 48 c0 |H | EXTW.L D0 00020636 2f 00 |/ | MOVE.L D0,-(A7) 00020638 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002063e 58 4f |XO | ADDQ.L #0x4,A7 00020640 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020646 50 4f |PO | ADDQ.L #0x8,A7 00020648 4e b9 00 02 1e 62 |N b | JSR 0x21e62 0002064e de fc 00 10 | | ADDA.W #0x10,A7 00020652 4c df 00 01 |L | MOVEM.L (A7)+,D0 00020656 4e 5e |N^ | UNLK A6 00020658 4e 75 |Nu | RTS 0002065a ; -------------------------------------------------------------------------------------- 0002065a ; OMSI PASCAL Function 0002065a ; <LVAR 0x00c @ 4(r)> 0002065a ; <LVAR 0x008 4(r)> 0002065a ; <LVAR -0x00a @ 4(rw)> 0002065a ; -------------------------------------------------------------------------------------- 0002065a 4e 56 ff b0 |NV | LINK.W A6,#0xffb0 0002065e bf d5 | | CMPA.L (A5),A7 00020660 62 06 |b | BHI 0x20668 00020662 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020666 4e 76 |Nv | TRAPV 00020668 de fc 00 44 | D | ADDA.W #0x44,A7 0002066c 48 e7 c3 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D1+D0,-(A7) 00020670 43 ee ff f6 |C | LEA.L (A6-0xa),A1 00020674 45 ee 00 0c |E | LEA.L (A6+0xc),A2 00020678 72 01 |r | MOVEQ.L #0x01,D1 0002067a 7e 00 |~ | MOVEQ.L #0x00,D7 0002067c 10 07 | | MOVE.B D7,D0 0002067e 48 80 |H | EXTB.W D0 00020680 e5 40 | @ | ASL.W #0x2,D0 00020682 41 f9 00 02 59 74 |A Yt | LEA.L 0x25974,A0 00020688 2f 30 00 4c |/0 L | MOVE.L (A0+D0.W+#0x4c),-(A7) 0002068c 59 4f |YO | SUBQ.L #0x4,A7 0002068e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020692 3f 01 |? | MOVE.W D1,-(A7) 00020694 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020698 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002069e 50 4f |PO | ADDQ.L #0x8,A7 000206a0 22 9f |" | MOVE.L (A7)+,(A1) 000206a2 54 4f |TO | ADDQ.L #0x2,A7 000206a4 2f 12 |/ | MOVE.L (A2),-(A7) 000206a6 2f 11 |/ | MOVE.L (A1),-(A7) 000206a8 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000206ae 50 4f |PO | ADDQ.L #0x8,A7 000206b0 10 1f | | MOVE.B (A7)+,D0 000206b2 48 80 |H | EXTB.W D0 000206b4 41 81 |A | CHK.W D1,D0 000206b6 1c 00 | | MOVE.B D0,D6 000206b8 48 51 |HQ | PEA.L (A1) 000206ba 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000206c0 58 4f |XO | ADDQ.L #0x4,A7 000206c2 4a 06 |J | TST.B D6 000206c4 67 08 |g | BEQ 0x206ce 000206c6 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000206ca 10 87 | | MOVE.B D7,(A0) 000206cc 60 3c |`< | BRA 0x2070a 000206ce 52 07 |R | ADDQ.B #0x1,D7 000206d0 0c 07 00 0f | | CMPI.B #0x0f,D7 000206d4 6f a6 |o | BLE 0x2067c 000206d6 41 fa fb 0c |A | LEA.L 0x201e4,A0 000206da 70 04 |p | MOVEQ.L #0x04,D0 000206dc 2f 20 |/ | MOVE.L -(A0),-(A7) 000206de 51 c8 ff fc |Q | DBF D0,0x206dc 000206e2 51 4f |QO | SUBQ.L #0x8,A7 000206e4 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000206e8 3f 01 |? | MOVE.W D1,-(A7) 000206ea 3f 3c 00 14 |?< | MOVE.W #0x14,-(A7) 000206ee 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000206f4 58 4f |XO | ADDQ.L #0x4,A7 000206f6 2e 92 |. | MOVE.L (A2),(A7) 000206f8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000206fe 50 4f |PO | ADDQ.L #0x8,A7 00020700 4e b9 00 02 1e 62 |N b | JSR 0x21e62 00020706 de fc 00 18 | | ADDA.W #0x18,A7 0002070a 48 52 |HR | PEA.L (A2) 0002070c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020712 58 4f |XO | ADDQ.L #0x4,A7 00020714 4c df 07 c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0+A1+A2 00020718 4e 5e |N^ | UNLK A6 0002071a 4e 75 |Nu | RTS 0002071c ; -------------------------------------------------------------------------------------- 0002071c ; OMSI PASCAL Function 0002071c ; <LVAR 0x00c 1(rw)> 0002071c ; <LVAR 0x008 4(r)> 0002071c ; <LVAR -0x006 @ 4(rw)> 0002071c ; -------------------------------------------------------------------------------------- 0002071c 4e 56 ff a2 |NV | LINK.W A6,#0xffa2 00020720 bf d5 | | CMPA.L (A5),A7 00020722 62 06 |b | BHI 0x2072a 00020724 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020728 4e 76 |Nv | TRAPV 0002072a de fc 00 52 | R | ADDA.W #0x52,A7 0002072e 48 e7 ff e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020732 45 ee ff fa |E | LEA.L (A6-0x6),A2 00020736 72 01 |r | MOVEQ.L #0x01,D1 00020738 74 07 |t | MOVEQ.L #0x07,D2 0002073a 7a 0a |z | MOVEQ.L #0x0a,D5 0002073c 7e 00 |~ | MOVEQ.L #0x00,D7 0002073e be 82 | | CMP.L D2,D7 00020740 63 02 |c | BLS 0x20744 00020742 4e 4f |NO | TRAP #15 00020744 28 07 |( | MOVE.L D7,D4 00020746 76 0a |v | MOVEQ.L #0x0a,D3 00020748 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 0002074e 41 fa fd bc |A | LEA.L 0x2050c,A0 00020752 9e c5 | | SUBA.W D5,A7 00020754 22 4f |"O | MOVEA.L A7,A1 00020756 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0 0002075a 70 09 |p | MOVEQ.L #0x09,D0 0002075c 12 d8 | | MOVE.B (A0)+,(A1)+ 0002075e 51 c8 ff fc |Q | DBF D0,0x2075c 00020762 59 4f |YO | SUBQ.L #0x4,A7 00020764 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020768 3f 01 |? | MOVE.W D1,-(A7) 0002076a 3f 05 |? | MOVE.W D5,-(A7) 0002076c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020772 50 4f |PO | ADDQ.L #0x8,A7 00020774 24 9f |$ | MOVE.L (A7)+,(A2) 00020776 58 4f |XO | ADDQ.L #0x4,A7 00020778 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 0002077c 2f 12 |/ | MOVE.L (A2),-(A7) 0002077e 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00020784 50 4f |PO | ADDQ.L #0x8,A7 00020786 10 1f | | MOVE.B (A7)+,D0 00020788 48 80 |H | EXTB.W D0 0002078a 41 81 |A | CHK.W D1,D0 0002078c 1c 00 | | MOVE.B D0,D6 0002078e 48 52 |HR | PEA.L (A2) 00020790 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020796 58 4f |XO | ADDQ.L #0x4,A7 00020798 4a 06 |J | TST.B D6 0002079a 67 12 |g | BEQ 0x207ae 0002079c 42 2e 00 0c |B. | CLR.B (A6+0xc) 000207a0 0c 87 00 00 00 04 | | CMPI.L #0x00000004,D7 000207a6 6c 04 |l | BGE 0x207ac 000207a8 52 2e 00 0c |R. | ADDQ.B #0x1,(A6+0xc) 000207ac 60 3a |`: | BRA 0x207e8 000207ae 52 87 |R | ADDQ.L #0x1,D7 000207b0 be 82 | | CMP.L D2,D7 000207b2 6f 8a |o | BLE 0x2073e 000207b4 41 fa fa 90 |A | LEA.L 0x20246,A0 000207b8 70 08 |p | MOVEQ.L #0x08,D0 000207ba 3f 20 |? | MOVE.W -(A0),-(A7) 000207bc 51 c8 ff fc |Q | DBF D0,0x207ba 000207c0 51 4f |QO | SUBQ.L #0x8,A7 000207c2 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000207c6 3f 01 |? | MOVE.W D1,-(A7) 000207c8 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 000207cc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000207d2 58 4f |XO | ADDQ.L #0x4,A7 000207d4 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 000207d8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000207de 50 4f |PO | ADDQ.L #0x8,A7 000207e0 4e ba fd 7a |N z | JSR 0x2055c 000207e4 de fc 00 16 | | ADDA.W #0x16,A7 000207e8 4c df 07 ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2 000207ec 4e 5e |N^ | UNLK A6 000207ee 4e 75 |Nu | RTS 000207f0 ; -------------------------------------------------------------------------------------- 000207f0 ; OMSI PASCAL Function 000207f0 ; <LVAR 0x00c 4(r)> 000207f0 ; <LVAR 0x008 4(r)> 000207f0 ; -------------------------------------------------------------------------------------- 000207f0 4e 56 ff 82 |NV | LINK.W A6,#0xff82 000207f4 bf d5 | | CMPA.L (A5),A7 000207f6 62 06 |b | BHI 0x207fe 000207f8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000207fc 4e 76 |Nv | TRAPV 000207fe de fc 00 76 | v | ADDA.W #0x76,A7 00020802 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020806 47 ee 00 0c |G | LEA.L (A6+0xc),A3 0002080a 49 ee 00 08 |I | LEA.L (A6+0x8),A4 0002080e 74 7d |t} | MOVEQ.L #0x7d,D2 00020810 7a 01 |z | MOVEQ.L #0x01,D5 00020812 20 53 | S | MOVEA.L (A3),A0 00020814 2f 08 |/ | MOVE.L A0,-(A7) 00020816 20 57 | W | MOVEA.L (A7),A0 00020818 30 10 |0 | MOVE.W (A0),D0 0002081a b0 45 | E | CMP.W D5,D0 0002081c 6f 5e |o^ | BLE 0x2087c 0002081e 12 28 00 02 | ( | MOVE.B (A0+0x2),D1 00020822 0c 01 00 30 | 0 | CMPI.B #0x30,D1 00020826 66 54 |fT | BNE 0x2087c 00020828 32 00 |2 | MOVE.W D0,D1 0002082a 48 c1 |H | EXTW.L D1 0002082c 2f 01 |/ | MOVE.L D1,-(A7) 0002082e 7e 02 |~ | MOVEQ.L #0x02,D7 00020830 be 97 | | CMP.L (A7),D7 00020832 6e 24 |n$ | BGT 0x20858 00020834 20 07 | | MOVE.L D7,D0 00020836 53 80 |S | SUBQ.L #0x1,D0 00020838 53 80 |S | SUBQ.L #0x1,D0 0002083a b0 82 | | CMP.L D2,D0 0002083c 63 02 |c | BLS 0x20840 0002083e 4e 4f |NO | TRAP #15 00020840 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00020844 22 07 |" | MOVE.L D7,D1 00020846 53 81 |S | SUBQ.L #0x1,D1 00020848 b2 82 | | CMP.L D2,D1 0002084a 63 02 |c | BLS 0x2084e 0002084c 4e 4f |NO | TRAP #15 0002084e 11 b0 18 02 08 02 | | MOVE.B (A0+D1.L+#0x2),(A0+D0.L+#0x2) 00020854 52 87 |R | ADDQ.L #0x1,D7 00020856 68 d8 |h | BVC 0x20830 00020858 58 4f |XO | ADDQ.L #0x4,A7 0002085a 20 57 | W | MOVEA.L (A7),A0 0002085c 30 10 |0 | MOVE.W (A0),D0 0002085e 48 c0 |H | EXTW.L D0 00020860 53 80 |S | SUBQ.L #0x1,D0 00020862 04 80 ff ff 80 00 | | SUBI.L #0xffff8000,D0 00020868 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 0002086e 63 02 |c | BLS 0x20872 00020870 4e 4f |NO | TRAP #15 00020872 06 80 ff ff 80 00 | | ADDI.L #0xffff8000,D0 00020878 30 80 |0 | MOVE.W D0,(A0) 0002087a 60 9a |` | BRA 0x20816 0002087c 22 14 |" | MOVE.L (A4),D1 0002087e e3 81 | | ASL.L #0x1,D1 00020880 48 c0 |H | EXTW.L D0 00020882 b0 81 | | CMP.L D1,D0 00020884 6f 38 |o8 | BLE 0x208be 00020886 9e fc 00 16 | | SUBA.W #0x16,A7 0002088a 22 4f |"O | MOVEA.L A7,A1 0002088c 45 fa f9 b8 |E | LEA.L 0x20246,A2 00020890 70 14 |p | MOVEQ.L #0x14,D0 00020892 12 da | | MOVE.B (A2)+,(A1)+ 00020894 51 c8 ff fc |Q | DBF D0,0x20892 00020898 51 4f |QO | SUBQ.L #0x8,A7 0002089a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002089e 3f 05 |? | MOVE.W D5,-(A7) 000208a0 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 000208a4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000208aa 58 4f |XO | ADDQ.L #0x4,A7 000208ac 2e 93 |. | MOVE.L (A3),(A7) 000208ae 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000208b4 50 4f |PO | ADDQ.L #0x8,A7 000208b6 4e ba fc a4 |N | JSR 0x2055c 000208ba de fc 00 1a | | ADDA.W #0x1a,A7 000208be 20 57 | W | MOVEA.L (A7),A0 000208c0 30 10 |0 | MOVE.W (A0),D0 000208c2 48 c0 |H | EXTW.L D0 000208c4 2f 00 |/ | MOVE.L D0,-(A7) 000208c6 7e 01 |~ | MOVEQ.L #0x01,D7 000208c8 be 97 | | CMP.L (A7),D7 000208ca 6e 66 |nf | BGT 0x20932 000208cc 20 07 | | MOVE.L D7,D0 000208ce 53 80 |S | SUBQ.L #0x1,D0 000208d0 b0 82 | | CMP.L D2,D0 000208d2 63 02 |c | BLS 0x208d6 000208d4 4e 4f |NO | TRAP #15 000208d6 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 000208da 12 30 08 02 | 0 | MOVE.B (A0+D0.L+#0x2),D1 000208de 0c 01 00 30 | 0 | CMPI.B #0x30,D1 000208e2 65 06 |e | BCS 0x208ea 000208e4 0c 01 00 39 | 9 | CMPI.B #0x39,D1 000208e8 63 44 |cD | BLS 0x2092e 000208ea 0c 01 00 41 | A | CMPI.B #0x41,D1 000208ee 65 06 |e | BCS 0x208f6 000208f0 0c 01 00 46 | F | CMPI.B #0x46,D1 000208f4 63 38 |c8 | BLS 0x2092e 000208f6 9e fc 00 1c | | SUBA.W #0x1c,A7 000208fa 20 4f | O | MOVEA.L A7,A0 000208fc 43 fa f9 5e |C ^ | LEA.L 0x2025c,A1 00020900 70 1a |p | MOVEQ.L #0x1a,D0 00020902 10 d9 | | MOVE.B (A1)+,(A0)+ 00020904 51 c8 ff fc |Q | DBF D0,0x20902 00020908 51 4f |QO | SUBQ.L #0x8,A7 0002090a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002090e 3f 05 |? | MOVE.W D5,-(A7) 00020910 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 00020914 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002091a 58 4f |XO | ADDQ.L #0x4,A7 0002091c 2e 93 |. | MOVE.L (A3),(A7) 0002091e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020924 50 4f |PO | ADDQ.L #0x8,A7 00020926 4e ba fc 34 |N 4 | JSR 0x2055c 0002092a de fc 00 20 | | ADDA.W #0x20,A7 0002092e 52 87 |R | ADDQ.L #0x1,D7 00020930 68 96 |h | BVC 0x208c8 00020932 58 4f |XO | ADDQ.L #0x4,A7 00020934 20 57 | W | MOVEA.L (A7),A0 00020936 30 10 |0 | MOVE.W (A0),D0 00020938 48 c0 |H | EXTW.L D0 0002093a 2f 00 |/ | MOVE.L D0,-(A7) 0002093c 7e 01 |~ | MOVEQ.L #0x01,D7 0002093e be 97 | | CMP.L (A7),D7 00020940 6e 42 |nB | BGT 0x20984 00020942 20 07 | | MOVE.L D7,D0 00020944 53 80 |S | SUBQ.L #0x1,D0 00020946 b0 82 | | CMP.L D2,D0 00020948 63 02 |c | BLS 0x2094c 0002094a 4e 4f |NO | TRAP #15 0002094c 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00020950 42 81 |B | CLR.L D1 00020952 12 30 08 02 | 0 | MOVE.B (A0+D0.L+#0x2),D1 00020956 04 41 00 30 | A 0 | SUBI.W #0x0030,D1 0002095a 48 c1 |H | EXTW.L D1 0002095c 2c 01 |, | MOVE.L D1,D6 0002095e 0c 86 00 00 00 09 | | CMPI.L #0x00000009,D6 00020964 6f 02 |o | BLE 0x20968 00020966 5f 86 |_ | SUBQ.L #0x7,D6 00020968 20 07 | | MOVE.L D7,D0 0002096a 53 80 |S | SUBQ.L #0x1,D0 0002096c b0 82 | | CMP.L D2,D0 0002096e 63 02 |c | BLS 0x20972 00020970 4e 4f |NO | TRAP #15 00020972 0c 86 00 00 00 ff | | CMPI.L #0x000000ff,D6 00020978 63 02 |c | BLS 0x2097c 0002097a 4e 4f |NO | TRAP #15 0002097c 11 86 08 02 | | MOVE.B D6,(A0+D0.L+#0x2) 00020980 52 87 |R | ADDQ.L #0x1,D7 00020982 68 ba |h | BVC 0x2093e 00020984 58 4f |XO | ADDQ.L #0x4,A7 00020986 20 57 | W | MOVEA.L (A7),A0 00020988 20 14 | | MOVE.L (A4),D0 0002098a e3 80 | | ASL.L #0x1,D0 0002098c 32 10 |2 | MOVE.W (A0),D1 0002098e 48 c1 |H | EXTW.L D1 00020990 b2 80 | | CMP.L D0,D1 00020992 67 76 |gv | BEQ 0x20a0a 00020994 78 02 |x | MOVEQ.L #0x02,D4 00020996 26 14 |& | MOVE.L (A4),D3 00020998 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 0002099e 2c 04 |, | MOVE.L D4,D6 000209a0 9c 81 | | SUB.L D1,D6 000209a2 2e 01 |. | MOVE.L D1,D7 000209a4 be 85 | | CMP.L D5,D7 000209a6 6d 22 |m" | BLT 0x209ca 000209a8 20 07 | | MOVE.L D7,D0 000209aa d0 86 | | ADD.L D6,D0 000209ac 53 80 |S | SUBQ.L #0x1,D0 000209ae b0 82 | | CMP.L D2,D0 000209b0 63 02 |c | BLS 0x209b4 000209b2 4e 4f |NO | TRAP #15 000209b4 20 57 | W | MOVEA.L (A7),A0 000209b6 22 07 |" | MOVE.L D7,D1 000209b8 53 81 |S | SUBQ.L #0x1,D1 000209ba b2 82 | | CMP.L D2,D1 000209bc 63 02 |c | BLS 0x209c0 000209be 4e 4f |NO | TRAP #15 000209c0 11 b0 18 02 08 02 | | MOVE.B (A0+D1.L+#0x2),(A0+D0.L+#0x2) 000209c6 53 87 |S | SUBQ.L #0x1,D7 000209c8 68 da |h | BVC 0x209a4 000209ca 2f 06 |/ | MOVE.L D6,-(A7) 000209cc 7e 01 |~ | MOVEQ.L #0x01,D7 000209ce be 97 | | CMP.L (A7),D7 000209d0 6e 16 |n | BGT 0x209e8 000209d2 20 07 | | MOVE.L D7,D0 000209d4 53 80 |S | SUBQ.L #0x1,D0 000209d6 b0 82 | | CMP.L D2,D0 000209d8 63 02 |c | BLS 0x209dc 000209da 4e 4f |NO | TRAP #15 000209dc 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 000209e0 42 30 08 02 |B0 | CLR.B (A0+D0.L+#0x2) 000209e4 52 87 |R | ADDQ.L #0x1,D7 000209e6 68 e6 |h | BVC 0x209ce 000209e8 58 4f |XO | ADDQ.L #0x4,A7 000209ea 20 57 | W | MOVEA.L (A7),A0 000209ec 30 10 |0 | MOVE.W (A0),D0 000209ee 48 c0 |H | EXTW.L D0 000209f0 d0 86 | | ADD.L D6,D0 000209f2 04 80 ff ff 80 00 | | SUBI.L #0xffff8000,D0 000209f8 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 000209fe 63 02 |c | BLS 0x20a02 00020a00 4e 4f |NO | TRAP #15 00020a02 06 80 ff ff 80 00 | | ADDI.L #0xffff8000,D0 00020a08 30 80 |0 | MOVE.W D0,(A0) 00020a0a 58 4f |XO | ADDQ.L #0x4,A7 00020a0c 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00020a10 4e 5e |N^ | UNLK A6 00020a12 4e 75 |Nu | RTS 00020a14 ; -------------------------------------------------------------------------------------- 00020a14 ; OMSI PASCAL Function 00020a14 ; <LVAR 0x008 4(r)> 00020a14 ; <LVAR -0x00e @ 4(rw)> 00020a14 ; <LVAR -0x010 1(rw)> 00020a14 ; -------------------------------------------------------------------------------------- 00020a14 4e 56 ff 9c |NV | LINK.W A6,#0xff9c 00020a18 bf d5 | | CMPA.L (A5),A7 00020a1a 62 06 |b | BHI 0x20a22 00020a1c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020a20 4e 76 |Nv | TRAPV 00020a22 de fc 00 50 | P | ADDA.W #0x50,A7 00020a26 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020a2a 45 ee ff f2 |E | LEA.L (A6-0xe),A2 00020a2e 47 ee ff f0 |G | LEA.L (A6-0x10),A3 00020a32 49 f9 00 02 59 7c |I Y| | LEA.L 0x2597c,A4 00020a38 76 01 |v | MOVEQ.L #0x01,D3 00020a3a 78 7d |x} | MOVEQ.L #0x7d,D4 00020a3c 42 13 |B | CLR.B (A3) 00020a3e 7a 03 |z | MOVEQ.L #0x03,D5 00020a40 20 54 | T | MOVEA.L (A4),A0 00020a42 2f 08 |/ | MOVE.L A0,-(A7) 00020a44 20 57 | W | MOVEA.L (A7),A0 00020a46 22 68 00 f4 |"h | MOVEA.L (A0+0xf4),A1 00020a4a 2f 09 |/ | MOVE.L A1,-(A7) 00020a4c b2 c3 | | CMPA.W D3,A1 00020a4e 67 00 00 f6 |g | BEQ 0x20b46 00020a52 4a 13 |J | TST.B (A3) 00020a54 66 00 00 f0 |f | BNE 0x20b46 00020a58 10 11 | | MOVE.B (A1),D0 00020a5a ee 08 | | LSR.B #0x7,D0 00020a5c 66 06 |f | BNE 0x20a64 00020a5e 16 83 | | MOVE.B D3,(A3) 00020a60 60 00 00 dc |` | BRA 0x20b3e 00020a64 59 4f |YO | SUBQ.L #0x4,A7 00020a66 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020a6a 2f 05 |/ | MOVE.L D5,-(A7) 00020a6c 4e b9 00 02 2b 8a |N + | JSR 0x22b8a 00020a72 50 4f |PO | ADDQ.L #0x8,A7 00020a74 24 9f |$ | MOVE.L (A7)+,(A2) 00020a76 10 11 | | MOVE.B (A1),D0 00020a78 e3 08 | | LSL.B #0x1,D0 00020a7a ee 08 | | LSR.B #0x7,D0 00020a7c 67 20 |g | BEQ 0x20a9e 00020a7e 2f 14 |/ | MOVE.L (A4),-(A7) 00020a80 55 4f |UO | SUBQ.L #0x2,A7 00020a82 2f 12 |/ | MOVE.L (A2),-(A7) 00020a84 4e ba fc 96 |N | JSR 0x2071c 00020a88 58 4f |XO | ADDQ.L #0x4,A7 00020a8a 10 17 | | MOVE.B (A7),D0 00020a8c 48 80 |H | EXTB.W D0 00020a8e 41 83 |A | CHK.W D3,D0 00020a90 1e 80 | | MOVE.B D0,(A7) 00020a92 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 00020a98 5c 4f |\O | ADDQ.L #0x6,A7 00020a9a 60 00 00 98 |` | BRA 0x20b34 00020a9e 2f 12 |/ | MOVE.L (A2),-(A7) 00020aa0 42 80 |B | CLR.L D0 00020aa2 10 11 | | MOVE.B (A1),D0 00020aa4 e5 08 | | LSL.B #0x2,D0 00020aa6 e4 08 | | LSR.B #0x2,D0 00020aa8 2f 00 |/ | MOVE.L D0,-(A7) 00020aaa 4e ba fd 44 |N D | JSR 0x207f0 00020aae 50 4f |PO | ADDQ.L #0x8,A7 00020ab0 42 80 |B | CLR.L D0 00020ab2 10 11 | | MOVE.B (A1),D0 00020ab4 e5 08 | | LSL.B #0x2,D0 00020ab6 e4 08 | | LSR.B #0x2,D0 00020ab8 53 40 |S@ | SUBQ.W #0x1,D0 00020aba 48 c0 |H | EXTW.L D0 00020abc 2f 00 |/ | MOVE.L D0,-(A7) 00020abe 7e 00 |~ | MOVEQ.L #0x00,D7 00020ac0 be 97 | | CMP.L (A7),D7 00020ac2 6e 62 |nb | BGT 0x20b26 00020ac4 20 52 | R | MOVEA.L (A2),A0 00020ac6 20 07 | | MOVE.L D7,D0 00020ac8 d0 87 | | ADD.L D7,D0 00020aca 22 00 |" | MOVE.L D0,D1 00020acc 52 81 |R | ADDQ.L #0x1,D1 00020ace 53 81 |S | SUBQ.L #0x1,D1 00020ad0 b2 84 | | CMP.L D4,D1 00020ad2 63 02 |c | BLS 0x20ad6 00020ad4 4e 4f |NO | TRAP #15 00020ad6 42 82 |B | CLR.L D2 00020ad8 14 30 18 02 | 0 | MOVE.B (A0+D1.L+#0x2),D2 00020adc e9 42 | B | ASL.W #0x4,D2 00020ade 54 80 |T | ADDQ.L #0x2,D0 00020ae0 53 80 |S | SUBQ.L #0x1,D0 00020ae2 b0 84 | | CMP.L D4,D0 00020ae4 63 02 |c | BLS 0x20ae8 00020ae6 4e 4f |NO | TRAP #15 00020ae8 42 81 |B | CLR.L D1 00020aea 12 30 08 02 | 0 | MOVE.B (A0+D0.L+#0x2),D1 00020aee d2 42 | B | ADD.W D2,D1 00020af0 48 c1 |H | EXTW.L D1 00020af2 2c 01 |, | MOVE.L D1,D6 00020af4 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00020af8 42 80 |B | CLR.L D0 00020afa 10 28 00 01 | ( | MOVE.B (A0+0x1),D0 00020afe d0 87 | | ADD.L D7,D0 00020b00 04 80 00 00 00 10 | | SUBI.L #0x00000010,D0 00020b06 0c 80 00 00 00 ef | | CMPI.L #0x000000ef,D0 00020b0c 63 02 |c | BLS 0x20b10 00020b0e 4e 4f |NO | TRAP #15 00020b10 20 6f 00 08 | o | MOVEA.L (A7+0x8),A0 00020b14 0c 86 00 00 00 ff | | CMPI.L #0x000000ff,D6 00020b1a 63 02 |c | BLS 0x20b1e 00020b1c 4e 4f |NO | TRAP #15 00020b1e 11 86 08 04 | | MOVE.B D6,(A0+D0.L+#0x4) 00020b22 52 87 |R | ADDQ.L #0x1,D7 00020b24 68 9a |h | BVC 0x20ac0 00020b26 58 4f |XO | ADDQ.L #0x4,A7 00020b28 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00020b2c 22 57 |"W | MOVEA.L (A7),A1 00020b2e 21 69 00 02 00 f4 |!i | MOVE.L (A1+0x2),(A0+0xf4) 00020b34 48 52 |HR | PEA.L (A2) 00020b36 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020b3c 58 4f |XO | ADDQ.L #0x4,A7 00020b3e 52 85 |R | ADDQ.L #0x1,D5 00020b40 58 4f |XO | ADDQ.L #0x4,A7 00020b42 60 00 ff 00 |` | BRA 0x20a44 00020b46 50 4f |PO | ADDQ.L #0x8,A7 00020b48 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00020b4c 4e 5e |N^ | UNLK A6 00020b4e 4e 75 |Nu | RTS 00020b50 ; -------------------------------------------------------------------------------------- 00020b50 ; OMSI PASCAL Function 00020b50 ; <LVAR -0x00e 4(r)> 00020b50 ; <LVAR -0x012 @ 4(r)> 00020b50 ; <LVAR -0x01b @> 00020b50 ; <LVAR -0x022 @> 00020b50 ; <LVAR -0x024 2(r)> 00020b50 ; <LVAR -0x026 2(r)> 00020b50 ; <LVAR -0x028 @ 2(r)> 00020b50 ; <LVAR -0x02d @> 00020b50 ; <LVAR -0x02e 1(r)> 00020b50 ; <LVAR -0x02f 1(r)> 00020b50 ; <LVAR -0x030 1(r)> 00020b50 ; <LVAR -0x031 @ 1(r)> 00020b50 ; <LVAR -0x032 1(r)> 00020b50 ; <LVAR -0x033 1(r)> 00020b50 ; <LVAR -0x034 @ 1(r)> 00020b50 ; <LVAR -0x036 @ 2(r)> 00020b50 ; <LVAR -0x037 @ 1(r)> 00020b50 ; <LVAR -0x038 @ 1(r)> 00020b50 ; <LVAR -0x03c @ 4(rw)> 00020b50 ; <LVAR -0x040 @ 4(w)> 00020b50 ; -------------------------------------------------------------------------------------- 00020b50 4e 56 ff 5c |NV \ | LINK.W A6,#0xff5c 00020b54 bf d5 | | CMPA.L (A5),A7 00020b56 62 06 |b | BHI 0x20b5e 00020b58 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020b5c 4e 76 |Nv | TRAPV 00020b5e de fc 00 60 | ` | ADDA.W #0x60,A7 00020b62 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020b66 47 f9 00 02 59 7c |G Y| | LEA.L 0x2597c,A3 00020b6c 49 f8 00 00 |I | LEA.L 0x0,A4 00020b70 74 01 |t | MOVEQ.L #0x01,D2 00020b72 76 0e |v | MOVEQ.L #0x0e,D3 00020b74 78 0c |x | MOVEQ.L #0x0c,D4 00020b76 7a 0f |z | MOVEQ.L #0x0f,D5 00020b78 59 4f |YO | SUBQ.L #0x4,A7 00020b7a 4e b9 00 02 1e a2 |N | JSR 0x21ea2 00020b80 2d 5f ff c0 |-_ | MOVE.L (A7)+,(A6-0x40) 00020b84 20 53 | S | MOVEA.L (A3),A0 00020b86 2f 08 |/ | MOVE.L A0,-(A7) 00020b88 20 57 | W | MOVEA.L (A7),A0 00020b8a 22 68 00 f4 |"h | MOVEA.L (A0+0xf4),A1 00020b8e b2 c2 | | CMPA.W D2,A1 00020b90 67 00 02 c8 |g | BEQ 0x20e5a 00020b94 10 11 | | MOVE.B (A1),D0 00020b96 e3 08 | | LSL.B #0x1,D0 00020b98 ee 08 | | LSR.B #0x7,D0 00020b9a 67 62 |gb | BEQ 0x20bfe 00020b9c 2f 13 |/ | MOVE.L (A3),-(A7) 00020b9e 48 6e ff c8 |Hn | PEA.L (A6-0x38) 00020ba2 4e b9 00 01 04 78 |N x | JSR ExpOutputFlag(exp : Pointer; VAR status : Bool) 00020ba8 50 4f |PO | ADDQ.L #0x8,A7 00020baa 4a 2e ff c8 |J. | TST.B (A6-0x38) 00020bae 67 20 |g | BEQ 0x20bd0 00020bb0 2f 3a f6 d6 |/: | MOVE.L 0x20288,-(A7) 00020bb4 59 4f |YO | SUBQ.L #0x4,A7 00020bb6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020bba 3f 02 |? | MOVE.W D2,-(A7) 00020bbc 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020bc0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020bc6 50 4f |PO | ADDQ.L #0x8,A7 00020bc8 2d 5f ff c4 |-_ | MOVE.L (A7)+,(A6-0x3c) 00020bcc 58 4f |XO | ADDQ.L #0x4,A7 00020bce 60 2a |`* | BRA 0x20bfa 00020bd0 5d 4f |]O | SUBQ.L #0x6,A7 00020bd2 22 4f |"O | MOVEA.L A7,A1 00020bd4 45 fa f6 b6 |E | LEA.L 0x2028c,A2 00020bd8 70 04 |p | MOVEQ.L #0x04,D0 00020bda 12 da | | MOVE.B (A2)+,(A1)+ 00020bdc 51 c8 ff fc |Q | DBF D0,0x20bda 00020be0 59 4f |YO | SUBQ.L #0x4,A7 00020be2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020be6 3f 02 |? | MOVE.W D2,-(A7) 00020be8 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00020bec 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020bf2 50 4f |PO | ADDQ.L #0x8,A7 00020bf4 2d 5f ff c4 |-_ | MOVE.L (A7)+,(A6-0x3c) 00020bf8 5c 4f |\O | ADDQ.L #0x6,A7 00020bfa 60 00 02 24 |` $ | BRA 0x20e20 00020bfe 42 80 |B | CLR.L D0 00020c00 10 11 | | MOVE.B (A1),D0 00020c02 e5 08 | | LSL.B #0x2,D0 00020c04 e4 08 | | LSR.B #0x2,D0 00020c06 32 00 |2 | MOVE.W D0,D1 00020c08 53 41 |SA | SUBQ.W #0x1,D1 00020c0a 0c 41 00 07 | A | CMPI.W #0x0007,D1 00020c0e 63 02 |c | BLS 0x20c12 00020c10 4e 4e |NN | TRAP #14 00020c12 d2 41 | A | ADD.W D1,D1 00020c14 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W 00020c1c 00 10 | | .CONST 0x10 ; [0x0] -> 0x20c2c 00020c1e 00 3e | > | .CONST 0x3e ; [0x1] -> 0x20c5a 00020c20 00 60 | ` | .CONST 0x60 ; [0x2] -> 0x20c7c 00020c22 00 9e | | .CONST 0x9e ; [0x3] -> 0x20cba 00020c24 00 d2 | | .CONST 0xd2 ; [0x4] -> 0x20cee 00020c26 01 10 | | .CONST 0x110 ; [0x5] -> 0x20d2c 00020c28 01 3a | : | .CONST 0x13a ; [0x6] -> 0x20d56 00020c2a 01 66 | f | .CONST 0x166 ; [0x7] -> 0x20d82 00020c2c switch@0x20c14[0x0]: 00020c2c 2f 13 |/ | MOVE.L (A3),-(A7) 00020c2e 48 6e ff c9 |Hn | PEA.L (A6-0x37) 00020c32 48 54 |HT | PEA.L (A4) 00020c34 48 54 |HT | PEA.L (A4) 00020c36 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 00020c3c de c3 | | ADDA.W D3,A7 00020c3e 1e ae ff c9 | | MOVE.B (A6-0x37),(A7) 00020c42 48 57 |HW | PEA.L (A7) 00020c44 48 54 |HT | PEA.L (A4) 00020c46 48 54 |HT | PEA.L (A4) 00020c48 48 6e ff ee |Hn | PEA.L (A6-0x12) 00020c4c 4e b9 00 01 04 b4 |N | JSR ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q) 00020c52 de fc 00 12 | | ADDA.W #0x12,A7 00020c56 60 00 01 62 |` b | BRA 0x20dba 00020c5a switch@0x20c14[0x1]: 00020c5a 2f 13 |/ | MOVE.L (A3),-(A7) 00020c5c 48 6e ff ca |Hn | PEA.L (A6-0x36) 00020c60 48 54 |HT | PEA.L (A4) 00020c62 48 78 00 01 |Hx | PEA.L 0x1 00020c66 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 00020c6c de c3 | | ADDA.W D3,A7 00020c6e 3e ae ff ca |> | MOVE.W (A6-0x36),(A7) 00020c72 48 57 |HW | PEA.L (A7) 00020c74 48 54 |HT | PEA.L (A4) 00020c76 48 78 00 01 |Hx | PEA.L 0x1 00020c7a 60 cc |` | BRA 0x20c48 00020c7c switch@0x20c14[0x2]: 00020c7c 2f 13 |/ | MOVE.L (A3),-(A7) 00020c7e 48 6e ff cc |Hn | PEA.L (A6-0x34) 00020c82 48 54 |HT | PEA.L (A4) 00020c84 48 78 00 02 |Hx | PEA.L 0x2 00020c88 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 00020c8e de c4 | | ADDA.W D4,A7 00020c90 1e ae ff cc | | MOVE.B (A6-0x34),(A7) 00020c94 1f 6e ff cd 00 01 | n | MOVE.B (A6-0x33),(A7+0x1) 00020c9a 1f 6e ff ce 00 02 | n | MOVE.B (A6-0x32),(A7+0x2) 00020ca0 48 57 |HW | PEA.L (A7) 00020ca2 48 54 |HT | PEA.L (A4) 00020ca4 48 78 00 02 |Hx | PEA.L 0x2 00020ca8 48 6e ff ee |Hn | PEA.L (A6-0x12) 00020cac 4e b9 00 01 04 b4 |N | JSR ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q) 00020cb2 de fc 00 14 | | ADDA.W #0x14,A7 00020cb6 60 00 01 02 |` | BRA 0x20dba 00020cba switch@0x20c14[0x3]: 00020cba 2f 13 |/ | MOVE.L (A3),-(A7) 00020cbc 48 6e ff cf |Hn | PEA.L (A6-0x31) 00020cc0 48 54 |HT | PEA.L (A4) 00020cc2 48 78 00 03 |Hx | PEA.L 0x3 00020cc6 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 00020ccc de c4 | | ADDA.W D4,A7 00020cce 1e ae ff cf | | MOVE.B (A6-0x31),(A7) 00020cd2 1f 6e ff d0 00 01 | n | MOVE.B (A6-0x30),(A7+0x1) 00020cd8 1f 6e ff d1 00 02 | n | MOVE.B (A6-0x2f),(A7+0x2) 00020cde 1f 6e ff d2 00 03 | n | MOVE.B (A6-0x2e),(A7+0x3) 00020ce4 48 57 |HW | PEA.L (A7) 00020ce6 48 54 |HT | PEA.L (A4) 00020ce8 48 78 00 03 |Hx | PEA.L 0x3 00020cec 60 ba |` | BRA 0x20ca8 00020cee switch@0x20c14[0x4]: 00020cee 2f 13 |/ | MOVE.L (A3),-(A7) 00020cf0 48 6e ff d3 |Hn | PEA.L (A6-0x2d) 00020cf4 48 54 |HT | PEA.L (A4) 00020cf6 48 78 00 04 |Hx | PEA.L 0x4 00020cfa 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 00020d00 de fc 00 0a | | ADDA.W #0xa,A7 00020d04 22 4f |"O | MOVEA.L A7,A1 00020d06 45 ee ff d3 |E | LEA.L (A6-0x2d),A2 00020d0a 72 04 |r | MOVEQ.L #0x04,D1 00020d0c 12 da | | MOVE.B (A2)+,(A1)+ 00020d0e 51 c9 ff fc |Q | DBF D1,0x20d0c 00020d12 48 57 |HW | PEA.L (A7) 00020d14 48 54 |HT | PEA.L (A4) 00020d16 48 78 00 04 |Hx | PEA.L 0x4 00020d1a 48 6e ff ee |Hn | PEA.L (A6-0x12) 00020d1e 4e b9 00 01 04 b4 |N | JSR ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q) 00020d24 de fc 00 16 | | ADDA.W #0x16,A7 00020d28 60 00 00 90 |` | BRA 0x20dba 00020d2c switch@0x20c14[0x5]: 00020d2c 2f 13 |/ | MOVE.L (A3),-(A7) 00020d2e 48 6e ff d8 |Hn | PEA.L (A6-0x28) 00020d32 48 54 |HT | PEA.L (A4) 00020d34 48 78 00 05 |Hx | PEA.L 0x5 00020d38 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 00020d3e de c3 | | ADDA.W D3,A7 00020d40 3e ae ff dc |> | MOVE.W (A6-0x24),(A7) 00020d44 3f 2e ff da |?. | MOVE.W (A6-0x26),-(A7) 00020d48 3f 2e ff d8 |?. | MOVE.W (A6-0x28),-(A7) 00020d4c 48 57 |HW | PEA.L (A7) 00020d4e 48 54 |HT | PEA.L (A4) 00020d50 48 78 00 05 |Hx | PEA.L 0x5 00020d54 60 c4 |` | BRA 0x20d1a 00020d56 switch@0x20c14[0x6]: 00020d56 2f 13 |/ | MOVE.L (A3),-(A7) 00020d58 48 6e ff de |Hn | PEA.L (A6-0x22) 00020d5c 48 54 |HT | PEA.L (A4) 00020d5e 48 78 00 06 |Hx | PEA.L 0x6 00020d62 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 00020d68 50 4f |PO | ADDQ.L #0x8,A7 00020d6a 22 4f |"O | MOVEA.L A7,A1 00020d6c 45 ee ff de |E | LEA.L (A6-0x22),A2 00020d70 72 06 |r | MOVEQ.L #0x06,D1 00020d72 12 da | | MOVE.B (A2)+,(A1)+ 00020d74 51 c9 ff fc |Q | DBF D1,0x20d72 00020d78 48 57 |HW | PEA.L (A7) 00020d7a 48 54 |HT | PEA.L (A4) 00020d7c 48 78 00 06 |Hx | PEA.L 0x6 00020d80 60 2a |`* | BRA 0x20dac 00020d82 switch@0x20c14[0x7]: 00020d82 2f 13 |/ | MOVE.L (A3),-(A7) 00020d84 48 6e ff e5 |Hn | PEA.L (A6-0x1b) 00020d88 48 54 |HT | PEA.L (A4) 00020d8a 48 78 00 07 |Hx | PEA.L 0x7 00020d8e 4e b9 00 01 04 72 |N r | JSR ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) 00020d94 50 4f |PO | ADDQ.L #0x8,A7 00020d96 22 4f |"O | MOVEA.L A7,A1 00020d98 45 ee ff e5 |E | LEA.L (A6-0x1b),A2 00020d9c 72 07 |r | MOVEQ.L #0x07,D1 00020d9e 12 da | | MOVE.B (A2)+,(A1)+ 00020da0 51 c9 ff fc |Q | DBF D1,0x20d9e 00020da4 48 57 |HW | PEA.L (A7) 00020da6 48 54 |HT | PEA.L (A4) 00020da8 48 78 00 07 |Hx | PEA.L 0x7 00020dac 48 6e ff ee |Hn | PEA.L (A6-0x12) 00020db0 4e b9 00 01 04 b4 |N | JSR ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q) 00020db6 de fc 00 18 | | ADDA.W #0x18,A7 00020dba 48 6e ff c4 |Hn | PEA.L (A6-0x3c) 00020dbe 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00020dc4 58 4f |XO | ADDQ.L #0x4,A7 00020dc6 44 40 |D@ | NEG.W D0 00020dc8 50 40 |P@ | ADDQ.W #0x8,D0 00020dca e3 40 | @ | ASL.W #0x1,D0 00020dcc 48 c0 |H | EXTW.L D0 00020dce 2e 00 |. | MOVE.L D0,D7 00020dd0 be 85 | | CMP.L D5,D7 00020dd2 6e 4c |nL | BGT 0x20e20 00020dd4 9e c4 | | SUBA.W D4,A7 00020dd6 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 00020dda 2f 2e ff ee |/. | MOVE.L (A6-0x12),-(A7) 00020dde 20 07 | | MOVE.L D7,D0 00020de0 e5 80 | | ASL.L #0x2,D0 00020de2 2f 00 |/ | MOVE.L D0,-(A7) 00020de4 48 78 00 04 |Hx | PEA.L 0x4 00020de8 4e b9 00 01 03 4c |N L | JSR FSCALL_1034c 00020dee de fc 00 10 | | ADDA.W #0x10,A7 00020df2 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00020df8 50 4f |PO | ADDQ.L #0x8,A7 00020dfa 2c 1f |, | MOVE.L (A7)+,D6 00020dfc 2f 2e ff c4 |/. | MOVE.L (A6-0x3c),-(A7) 00020e00 20 06 | | MOVE.L D6,D0 00020e02 52 80 |R | ADDQ.L #0x1,D0 00020e04 53 80 |S | SUBQ.L #0x1,D0 00020e06 b0 85 | | CMP.L D5,D0 00020e08 63 02 |c | BLS 0x20e0c 00020e0a 4e 4f |NO | TRAP #15 00020e0c 41 fa f4 6a |A j | LEA.L 0x20278,A0 00020e10 1f 30 08 00 | 0 | MOVE.B (A0+D0.L),-(A7) 00020e14 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00020e1a 5c 4f |\O | ADDQ.L #0x6,A7 00020e1c 52 87 |R | ADDQ.L #0x1,D7 00020e1e 68 b0 |h | BVC 0x20dd0 00020e20 20 57 | W | MOVEA.L (A7),A0 00020e22 20 68 00 f4 | h | MOVEA.L (A0+0xf4),A0 00020e26 b0 c2 | | CMPA.W D2,A0 00020e28 67 10 |g | BEQ 0x20e3a 00020e2a 2f 2e ff c4 |/. | MOVE.L (A6-0x3c),-(A7) 00020e2e 1f 3c 00 2c | < , | MOVE.B #0x2c,-(A7) 00020e32 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00020e38 5c 4f |\O | ADDQ.L #0x6,A7 00020e3a 48 6e ff c0 |Hn | PEA.L (A6-0x40) 00020e3e 2f 2e ff c4 |/. | MOVE.L (A6-0x3c),-(A7) 00020e42 4e b9 00 02 24 40 |N $@ | JSR 0x22440 00020e48 50 4f |PO | ADDQ.L #0x8,A7 00020e4a 48 6e ff c4 |Hn | PEA.L (A6-0x3c) 00020e4e 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020e54 58 4f |XO | ADDQ.L #0x4,A7 00020e56 60 00 fd 30 |` 0 | BRA 0x20b88 00020e5a 58 4f |XO | ADDQ.L #0x4,A7 00020e5c 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00020e60 4e 5e |N^ | UNLK A6 00020e62 4e 75 |Nu | RTS 00020e64 ; -------------------------------------------------------------------------------------- 00020e64 ; OMSI PASCAL Function 00020e64 ; <LVAR 0x008 1(r)> 00020e64 ; <LVAR -0x003 @ 1(r)> 00020e64 ; <LVAR -0x004 @> 00020e64 ; <LVAR -0x008 @ 4(rw)> 00020e64 ; <LVAR -0x00a @ 1(r)> 00020e64 ; -------------------------------------------------------------------------------------- 00020e64 4e 56 ff 5a |NV Z | LINK.W A6,#0xff5a 00020e68 bf d5 | | CMPA.L (A5),A7 00020e6a 62 06 |b | BHI 0x20e72 00020e6c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020e70 4e 76 |Nv | TRAPV 00020e72 de fc 00 9c | | ADDA.W #0x9c,A7 00020e76 48 e7 fd f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D5+D4+D3+D2+D1+D0,-(A7) 00020e7a 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00020e80 47 ee 00 08 |G | LEA.L (A6+0x8),A3 00020e84 49 fa f6 d6 |I | LEA.L 0x2055c,A4 00020e88 74 01 |t | MOVEQ.L #0x01,D2 00020e8a 76 0e |v | MOVEQ.L #0x0e,D3 00020e8c 78 10 |x | MOVEQ.L #0x10,D4 00020e8e 7a 14 |z | MOVEQ.L #0x14,D5 00020e90 7e 00 |~ | MOVEQ.L #0x00,D7 00020e92 10 13 | | MOVE.B (A3),D0 00020e94 48 80 |H | EXTB.W D0 00020e96 41 fa f5 e4 |A | LEA.L 0x2047c,A0 00020e9a 4a 30 00 00 |J0 | TST.B (A0+D0.W) 00020e9e 66 22 |f" | BNE 0x20ec2 00020ea0 41 fa f4 52 |A R | LEA.L 0x202f4,A0 00020ea4 72 12 |r | MOVEQ.L #0x12,D1 00020ea6 3f 20 |? | MOVE.W -(A0),-(A7) 00020ea8 51 c9 ff fc |Q | DBF D1,0x20ea6 00020eac 59 4f |YO | SUBQ.L #0x4,A7 00020eae 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020eb2 3f 02 |? | MOVE.W D2,-(A7) 00020eb4 3f 3c 00 26 |?< & | MOVE.W #0x26,-(A7) 00020eb8 4e 92 |N | JSR (A2) 00020eba 50 4f |PO | ADDQ.L #0x8,A7 00020ebc 4e 94 |N | JSR (A4) 00020ebe de fc 00 2a | * | ADDA.W #0x2a,A7 00020ec2 1f 00 | | MOVE.B D0,-(A7) 00020ec4 2f 39 00 02 59 7c |/9 Y| | MOVE.L 0x2597c,-(A7) 00020eca 4e b9 00 01 04 7e |N ~ | JSR ExpXmit(adr : Byte; b : Pointer) 00020ed0 58 4f |XO | ADDQ.L #0x4,A7 00020ed2 1e 80 | | MOVE.B D0,(A7) 00020ed4 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00020ed8 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020edc 48 6e ff fd |Hn | PEA.L (A6-0x3) 00020ee0 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 00020ee6 de c3 | | ADDA.W D3,A7 00020ee8 4a 2e ff fd |J. | TST.B (A6-0x3) 00020eec 66 24 |f$ | BNE 0x20f12 00020eee 9e c4 | | SUBA.W D4,A7 00020ef0 20 4f | O | MOVEA.L A7,A0 00020ef2 43 fa f4 00 |C | LEA.L 0x202f4,A1 00020ef6 70 0e |p | MOVEQ.L #0x0e,D0 00020ef8 10 d9 | | MOVE.B (A1)+,(A0)+ 00020efa 51 c8 ff fc |Q | DBF D0,0x20ef8 00020efe 59 4f |YO | SUBQ.L #0x4,A7 00020f00 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020f04 3f 02 |? | MOVE.W D2,-(A7) 00020f06 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00020f0a 4e 92 |N | JSR (A2) 00020f0c 50 4f |PO | ADDQ.L #0x8,A7 00020f0e 4e 94 |N | JSR (A4) 00020f10 de c5 | | ADDA.W D5,A7 00020f12 10 2e ff f6 | . | MOVE.B (A6-0xa),D0 00020f16 48 80 |H | EXTB.W D0 00020f18 32 00 |2 | MOVE.W D0,D1 00020f1a 53 41 |SA | SUBQ.W #0x1,D1 00020f1c 0c 41 00 08 | A | CMPI.W #0x0008,D1 00020f20 62 00 01 1a |b | BHI switch@0x20f26[0x6] 00020f24 d2 41 | A | ADD.W D1,D1 00020f26 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W 00020f2e 00 12 | | .CONST 0x12 ; [0x0] -> 0x20f40 00020f30 00 68 | h | .CONST 0x68 ; [0x1] -> 0x20f96 00020f32 00 68 | h | .CONST 0x68 ; [0x2] -> 0x20f96 00020f34 00 18 | | .CONST 0x18 ; [0x3] -> 0x20f46 00020f36 00 3c | < | .CONST 0x3c ; [0x4] -> 0x20f6a 00020f38 00 58 | X | .CONST 0x58 ; [0x5] -> 0x20f86 00020f3a 01 0e | | .CONST 0x10e ; [0x6] -> 0x2103c 00020f3c 01 0e | | .CONST 0x10e ; [0x7] -> 0x2103c 00020f3e 00 4a | J | .CONST 0x4a ; [0x8] -> 0x20f78 00020f40 switch@0x20f26[0x0]: 00020f40 7e 01 |~ | MOVEQ.L #0x01,D7 00020f42 60 00 01 2c |` , | BRA 0x21070 00020f46 switch@0x20f26[0x3]: 00020f46 41 fa f3 d0 |A | LEA.L 0x20318,A0 00020f4a 70 04 |p | MOVEQ.L #0x04,D0 00020f4c 2f 20 |/ | MOVE.L -(A0),-(A7) 00020f4e 51 c8 ff fc |Q | DBF D0,0x20f4c 00020f52 59 4f |YO | SUBQ.L #0x4,A7 00020f54 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020f58 3f 02 |? | MOVE.W D2,-(A7) 00020f5a 3f 05 |? | MOVE.W D5,-(A7) 00020f5c 4e 92 |N | JSR (A2) 00020f5e 50 4f |PO | ADDQ.L #0x8,A7 00020f60 4e 94 |N | JSR (A4) 00020f62 de fc 00 18 | | ADDA.W #0x18,A7 00020f66 60 00 01 08 |` | BRA 0x21070 00020f6a switch@0x20f26[0x4]: 00020f6a 41 fa f3 c0 |A | LEA.L 0x2032c,A0 00020f6e 70 04 |p | MOVEQ.L #0x04,D0 00020f70 2f 20 |/ | MOVE.L -(A0),-(A7) 00020f72 51 c8 ff fc |Q | DBF D0,0x20f70 00020f76 60 da |` | BRA 0x20f52 00020f78 switch@0x20f26[0x8]: 00020f78 41 fa f3 c6 |A | LEA.L 0x20340,A0 00020f7c 70 04 |p | MOVEQ.L #0x04,D0 00020f7e 2f 20 |/ | MOVE.L -(A0),-(A7) 00020f80 51 c8 ff fc |Q | DBF D0,0x20f7e 00020f84 60 cc |` | BRA 0x20f52 00020f86 switch@0x20f26[0x5]: 00020f86 48 78 02 8b |Hx | PEA.L 0x28b 00020f8a 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 00020f90 58 4f |XO | ADDQ.L #0x4,A7 00020f92 60 00 00 dc |` | BRA 0x21070 00020f96 switch@0x20f26[0x1]: 00020f96 switch@0x20f26[0x2]: 00020f96 9e fc 00 0a | | SUBA.W #0xa,A7 00020f9a 20 4f | O | MOVEA.L A7,A0 00020f9c 43 fa f3 a2 |C | LEA.L 0x20340,A1 00020fa0 72 08 |r | MOVEQ.L #0x08,D1 00020fa2 10 d9 | | MOVE.B (A1)+,(A0)+ 00020fa4 51 c9 ff fc |Q | DBF D1,0x20fa2 00020fa8 41 fa f3 24 |A $ | LEA.L 0x202ce,A0 00020fac 72 0e |r | MOVEQ.L #0x0e,D1 00020fae 2f 20 |/ | MOVE.L -(A0),-(A7) 00020fb0 51 c9 ff fc |Q | DBF D1,0x20fae 00020fb4 9e c4 | | SUBA.W D4,A7 00020fb6 48 6f 00 4c |Ho L | PEA.L (A7+0x4c) 00020fba 3f 02 |? | MOVE.W D2,-(A7) 00020fbc 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00020fc0 4e 92 |N | JSR (A2) 00020fc2 54 4f |TO | ADDQ.L #0x2,A7 00020fc4 1e 80 | | MOVE.B D0,(A7) 00020fc6 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00020fcc 55 4f |UO | SUBQ.L #0x2,A7 00020fce 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00020fd2 3f 02 |? | MOVE.W D2,-(A7) 00020fd4 3f 3c 00 3c |?< < | MOVE.W #0x3c,-(A7) 00020fd8 4e 92 |N | JSR (A2) 00020fda 50 4f |PO | ADDQ.L #0x8,A7 00020fdc 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00020fe2 de fc 00 0c | | ADDA.W #0xc,A7 00020fe6 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00020fec 58 4f |XO | ADDQ.L #0x4,A7 00020fee 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00020ff4 58 4f |XO | ADDQ.L #0x4,A7 00020ff6 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 00020ffa de fc 00 46 | F | ADDA.W #0x46,A7 00020ffe 20 6e ff f8 | n | MOVEA.L (A6-0x8),A0 00021002 12 28 00 02 | ( | MOVE.B (A0+0x2),D1 00021006 0c 01 00 45 | E | CMPI.B #0x45,D1 0002100a 66 04 |f | BNE 0x21010 0002100c 7e 01 |~ | MOVEQ.L #0x01,D7 0002100e 60 1e |` | BRA 0x2102e 00021010 0c 01 00 43 | C | CMPI.B #0x43,D1 00021014 66 18 |f | BNE 0x2102e 00021016 0c 00 00 03 | | CMPI.B #0x03,D0 0002101a 66 06 |f | BNE 0x21022 0002101c 1f 13 | | MOVE.B (A3),-(A7) 0002101e 42 27 |B' | CLR.B -(A7) 00021020 60 04 |` | BRA 0x21026 00021022 1f 13 | | MOVE.B (A3),-(A7) 00021024 1f 02 | | MOVE.B D2,-(A7) 00021026 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 0002102c 58 4f |XO | ADDQ.L #0x4,A7 0002102e 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00021032 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021038 60 00 ff 56 |` V | BRA 0x20f90 0002103c switch@0x20f26[0x6]: 0002103c switch@0x20f26[0x7]: 0002103c 41 fa f3 28 |A ( | LEA.L 0x20366,A0 00021040 72 06 |r | MOVEQ.L #0x06,D1 00021042 2f 20 |/ | MOVE.L -(A0),-(A7) 00021044 51 c9 ff fc |Q | DBF D1,0x21042 00021048 51 4f |QO | SUBQ.L #0x8,A7 0002104a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002104e 3f 02 |? | MOVE.W D2,-(A7) 00021050 3f 3c 00 1c |?< | MOVE.W #0x1c,-(A7) 00021054 4e 92 |N | JSR (A2) 00021056 54 4f |TO | ADDQ.L #0x2,A7 00021058 1e 80 | | MOVE.B D0,(A7) 0002105a 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00021060 54 4f |TO | ADDQ.L #0x2,A7 00021062 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021068 50 4f |PO | ADDQ.L #0x8,A7 0002106a 4e 94 |N | JSR (A4) 0002106c de fc 00 20 | | ADDA.W #0x20,A7 00021070 4a 07 |J | TST.B D7 00021072 66 16 |f | BNE 0x2108a 00021074 1f 13 | | MOVE.B (A3),-(A7) 00021076 48 6e ff f6 |Hn | PEA.L (A6-0xa) 0002107a 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002107e 48 6e ff fd |Hn | PEA.L (A6-0x3) 00021082 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 00021088 de c3 | | ADDA.W D3,A7 0002108a 4a 07 |J | TST.B D7 0002108c 67 00 fe 84 |g | BEQ 0x20f12 00021090 4c df 1f bf |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D7+A0+A1+A2+A3+A4 00021094 4e 5e |N^ | UNLK A6 00021096 4e 75 |Nu | RTS 00021098 ; -------------------------------------------------------------------------------------- 00021098 ; OMSI PASCAL Function 00021098 ; <LVAR 0x008 4(r)> 00021098 ; <LVAR -0x004 4(rw)> 00021098 ; <LVAR -0x00e @ 1(r)> 00021098 ; <LVAR -0x014 @ 1(r)> 00021098 ; -------------------------------------------------------------------------------------- 00021098 4e 56 ff 8e |NV | LINK.W A6,#0xff8e 0002109c bf d5 | | CMPA.L (A5),A7 0002109e 62 06 |b | BHI 0x210a6 000210a0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000210a4 4e 76 |Nv | TRAPV 000210a6 de fc 00 5e | ^ | ADDA.W #0x5e,A7 000210aa 48 e7 fb f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7) 000210ae 45 f9 00 02 59 7c |E Y| | LEA.L 0x2597c,A2 000210b4 47 ee 00 08 |G | LEA.L (A6+0x8),A3 000210b8 72 01 |r | MOVEQ.L #0x01,D1 000210ba 74 1e |t | MOVEQ.L #0x1e,D2 000210bc 76 1d |v | MOVEQ.L #0x1d,D3 000210be 78 22 |x" | MOVEQ.L #0x22,D4 000210c0 59 4f |YO | SUBQ.L #0x4,A7 000210c2 2f 13 |/ | MOVE.L (A3),-(A7) 000210c4 4e b9 00 02 22 6e |N "n | JSR 0x2226e 000210ca 58 4f |XO | ADDQ.L #0x4,A7 000210cc 2c 1f |, | MOVE.L (A7)+,D6 000210ce 0c 86 00 00 00 02 | | CMPI.L #0x00000002,D6 000210d4 6c 2a |l* | BGE 0x21100 000210d6 9e c2 | | SUBA.W D2,A7 000210d8 20 4f | O | MOVEA.L A7,A0 000210da 43 fa f2 8a |C | LEA.L 0x20366,A1 000210de 70 1c |p | MOVEQ.L #0x1c,D0 000210e0 10 d9 | | MOVE.B (A1)+,(A0)+ 000210e2 51 c8 ff fc |Q | DBF D0,0x210e0 000210e6 59 4f |YO | SUBQ.L #0x4,A7 000210e8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000210ec 3f 01 |? | MOVE.W D1,-(A7) 000210ee 3f 03 |? | MOVE.W D3,-(A7) 000210f0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000210f6 50 4f |PO | ADDQ.L #0x8,A7 000210f8 4e b9 00 02 1e 62 |N b | JSR 0x21e62 000210fe de c4 | | ADDA.W D4,A7 00021100 59 4f |YO | SUBQ.L #0x4,A7 00021102 2f 13 |/ | MOVE.L (A3),-(A7) 00021104 48 78 00 01 |Hx | PEA.L 0x1 00021108 4e b9 00 02 2b 8a |N + | JSR 0x22b8a 0002110e 50 4f |PO | ADDQ.L #0x8,A7 00021110 48 6e ff ec |Hn | PEA.L (A6-0x14) 00021114 4e ba f5 44 |N D | JSR 0x2065a 00021118 50 4f |PO | ADDQ.L #0x8,A7 0002111a 10 2e ff ec | . | MOVE.B (A6-0x14),D0 0002111e 48 80 |H | EXTB.W D0 00021120 e5 40 | @ | ASL.W #0x2,D0 00021122 41 f9 00 02 59 74 |A Yt | LEA.L 0x25974,A0 00021128 2f 30 00 0c |/0 | MOVE.L (A0+D0.W+#0xc),-(A7) 0002112c 51 4f |QO | SUBQ.L #0x8,A7 0002112e 2f 13 |/ | MOVE.L (A3),-(A7) 00021130 48 78 00 02 |Hx | PEA.L 0x2 00021134 4e b9 00 02 2b 8a |N + | JSR 0x22b8a 0002113a 58 4f |XO | ADDQ.L #0x4,A7 0002113c 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021140 3f 01 |? | MOVE.W D1,-(A7) 00021142 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00021146 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002114c 50 4f |PO | ADDQ.L #0x8,A7 0002114e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021154 50 4f |PO | ADDQ.L #0x8,A7 00021156 28 5f |(_ | MOVEA.L (A7)+,A4 00021158 2e 8c |. | MOVE.L A4,(A7) 0002115a 48 52 |HR | PEA.L (A2) 0002115c 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00021162 50 4f |PO | ADDQ.L #0x8,A7 00021164 20 52 | R | MOVEA.L (A2),A0 00021166 2d 68 00 f8 ff fc |-h | MOVE.L (A0+0xf8),(A6-0x4) 0002116c 7e 02 |~ | MOVEQ.L #0x02,D7 0002116e 20 6e ff fc | n | MOVEA.L (A6-0x4),A0 00021172 b0 c1 | | CMPA.W D1,A0 00021174 67 10 |g | BEQ 0x21186 00021176 10 10 | | MOVE.B (A0),D0 00021178 ee 08 | | LSR.B #0x7,D0 0002117a 67 02 |g | BEQ 0x2117e 0002117c 52 87 |R | ADDQ.L #0x1,D7 0002117e 2d 68 00 02 ff fc |-h | MOVE.L (A0+0x2),(A6-0x4) 00021184 60 e8 |` | BRA 0x2116e 00021186 be 86 | | CMP.L D6,D7 00021188 67 28 |g( | BEQ 0x211b2 0002118a 9e c2 | | SUBA.W D2,A7 0002118c 20 4f | O | MOVEA.L A7,A0 0002118e 43 fa f1 d6 |C | LEA.L 0x20366,A1 00021192 70 1c |p | MOVEQ.L #0x1c,D0 00021194 10 d9 | | MOVE.B (A1)+,(A0)+ 00021196 51 c8 ff fc |Q | DBF D0,0x21194 0002119a 59 4f |YO | SUBQ.L #0x4,A7 0002119c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000211a0 3f 01 |? | MOVE.W D1,-(A7) 000211a2 3f 03 |? | MOVE.W D3,-(A7) 000211a4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000211aa 50 4f |PO | ADDQ.L #0x8,A7 000211ac 4e ba f3 ae |N | JSR 0x2055c 000211b0 de c4 | | ADDA.W D4,A7 000211b2 2f 13 |/ | MOVE.L (A3),-(A7) 000211b4 4e ba f8 5e |N ^ | JSR 0x20a14 000211b8 54 4f |TO | ADDQ.L #0x2,A7 000211ba 1e ae ff ec | | MOVE.B (A6-0x14),(A7) 000211be 4e ba fc a4 |N | JSR 0x20e64 000211c2 54 4f |TO | ADDQ.L #0x2,A7 000211c4 20 52 | R | MOVEA.L (A2),A0 000211c6 10 28 01 1c | ( | MOVE.B (A0+0x11c),D0 000211ca ee 08 | | LSR.B #0x7,D0 000211cc 67 48 |gH | BEQ 0x21216 000211ce 1f 2e ff ec | . | MOVE.B (A6-0x14),-(A7) 000211d2 2f 12 |/ | MOVE.L (A2),-(A7) 000211d4 48 6e ff f2 |Hn | PEA.L (A6-0xe) 000211d8 4e b9 00 01 04 90 |N | JSR ExpUpload(adr: Byte; ptr: Pointer; VAR status : Byte) 000211de de fc 00 0a | | ADDA.W #0xa,A7 000211e2 10 2e ff f2 | . | MOVE.B (A6-0xe),D0 000211e6 b0 01 | | CMP.B D1,D0 000211e8 67 28 |g( | BEQ 0x21212 000211ea 41 fa f1 b0 |A | LEA.L 0x2039c,A0 000211ee 70 05 |p | MOVEQ.L #0x05,D0 000211f0 2f 20 |/ | MOVE.L -(A0),-(A7) 000211f2 51 c8 ff fc |Q | DBF D0,0x211f0 000211f6 59 4f |YO | SUBQ.L #0x4,A7 000211f8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000211fc 3f 01 |? | MOVE.W D1,-(A7) 000211fe 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00021202 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021208 50 4f |PO | ADDQ.L #0x8,A7 0002120a 4e ba f3 50 |N P | JSR 0x2055c 0002120e de fc 00 1c | | ADDA.W #0x1c,A7 00021212 4e ba f9 3c |N < | JSR 0x20b50 00021216 48 52 |HR | PEA.L (A2) 00021218 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 0002121e 58 4f |XO | ADDQ.L #0x4,A7 00021220 4c df 1f df |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2+A3+A4 00021224 4e 5e |N^ | UNLK A6 00021226 4e 75 |Nu | RTS 00021228 ; -------------------------------------------------------------------------------------- 00021228 ; OMSI PASCAL Function 00021228 ; <LVAR 0x008 4(r)> 00021228 ; <LVAR -0x001 @> 00021228 ; <LVAR -0x002 @ 1(r)> 00021228 ; <LVAR -0x007 @ 1(r)> 00021228 ; <LVAR -0x008 @ 1(r)> 00021228 ; -------------------------------------------------------------------------------------- 00021228 4e 56 ff ac |NV | LINK.W A6,#0xffac 0002122c bf d5 | | CMPA.L (A5),A7 0002122e 62 06 |b | BHI 0x21236 00021230 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021234 4e 76 |Nv | TRAPV 00021236 de fc 00 4c | L | ADDA.W #0x4c,A7 0002123a 48 e7 f0 c8 |H | MOVEM.L A4+A1+A0+D3+D2+D1+D0,-(A7) 0002123e 74 01 |t | MOVEQ.L #0x01,D2 00021240 76 0a |v | MOVEQ.L #0x0a,D3 00021242 41 fa f1 62 |A b | LEA.L 0x203a6,A0 00021246 70 04 |p | MOVEQ.L #0x04,D0 00021248 3f 20 |? | MOVE.W -(A0),-(A7) 0002124a 51 c8 ff fc |Q | DBF D0,0x21248 0002124e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00021252 48 78 00 01 |Hx | PEA.L 0x1 00021256 4e b9 00 02 22 a4 |N " | JSR 0x222a4 0002125c de c3 | | ADDA.W D3,A7 0002125e 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00021262 48 78 00 01 |Hx | PEA.L 0x1 00021266 4e b9 00 02 2b 8a |N + | JSR 0x22b8a 0002126c 50 4f |PO | ADDQ.L #0x8,A7 0002126e 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00021272 4e ba f3 e6 |N | JSR 0x2065a 00021276 50 4f |PO | ADDQ.L #0x8,A7 00021278 10 2e ff f8 | . | MOVE.B (A6-0x8),D0 0002127c 48 80 |H | EXTB.W D0 0002127e 41 fa f1 fc |A | LEA.L 0x2047c,A0 00021282 4a 30 00 00 |J0 | TST.B (A0+D0.W) 00021286 66 2a |f* | BNE 0x212b2 00021288 41 fa f1 3a |A : | LEA.L 0x203c4,A0 0002128c 72 0e |r | MOVEQ.L #0x0e,D1 0002128e 3f 20 |? | MOVE.W -(A0),-(A7) 00021290 51 c9 ff fc |Q | DBF D1,0x2128e 00021294 59 4f |YO | SUBQ.L #0x4,A7 00021296 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002129a 3f 02 |? | MOVE.W D2,-(A7) 0002129c 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 000212a0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000212a6 50 4f |PO | ADDQ.L #0x8,A7 000212a8 4e b9 00 02 1e 62 |N b | JSR 0x21e62 000212ae de fc 00 22 | " | ADDA.W #0x22,A7 000212b2 1f 00 | | MOVE.B D0,-(A7) 000212b4 48 6e ff f9 |Hn | PEA.L (A6-0x7) 000212b8 48 6e ff fe |Hn | PEA.L (A6-0x2) 000212bc 48 6e ff ff |Hn | PEA.L (A6-0x1) 000212c0 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 000212c6 de c3 | | ADDA.W D3,A7 000212c8 10 2e ff f9 | . | MOVE.B (A6-0x7),D0 000212cc 48 80 |H | EXTB.W D0 000212ce 48 c0 |H | EXTW.L D0 000212d0 2f 00 |/ | MOVE.L D0,-(A7) 000212d2 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000212d8 58 4f |XO | ADDQ.L #0x4,A7 000212da 28 5f |(_ | MOVEA.L (A7)+,A4 000212dc 4a 2e ff fe |J. | TST.B (A6-0x2) 000212e0 67 22 |g" | BEQ 0x21304 000212e2 5d 4f |]O | SUBQ.L #0x6,A7 000212e4 20 4f | O | MOVEA.L A7,A0 000212e6 43 fa f0 dc |C | LEA.L 0x203c4,A1 000212ea 70 04 |p | MOVEQ.L #0x04,D0 000212ec 10 d9 | | MOVE.B (A1)+,(A0)+ 000212ee 51 c8 ff fc |Q | DBF D0,0x212ec 000212f2 59 4f |YO | SUBQ.L #0x4,A7 000212f4 2f 0c |/ | MOVE.L A4,-(A7) 000212f6 59 4f |YO | SUBQ.L #0x4,A7 000212f8 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000212fc 3f 02 |? | MOVE.W D2,-(A7) 000212fe 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00021302 60 1c |` | BRA 0x21320 00021304 3f 3a f0 c8 |?: | MOVE.W 0x203ce,-(A7) 00021308 3f 3a f0 c2 |?: | MOVE.W 0x203cc,-(A7) 0002130c 3f 3a f0 bc |?: | MOVE.W 0x203ca,-(A7) 00021310 59 4f |YO | SUBQ.L #0x4,A7 00021312 2f 0c |/ | MOVE.L A4,-(A7) 00021314 59 4f |YO | SUBQ.L #0x4,A7 00021316 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002131a 3f 02 |? | MOVE.W D2,-(A7) 0002131c 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00021320 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021326 50 4f |PO | ADDQ.L #0x8,A7 00021328 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002132e 50 4f |PO | ADDQ.L #0x8,A7 00021330 28 5f |(_ | MOVEA.L (A7)+,A4 00021332 5c 4f |\O | ADDQ.L #0x6,A7 00021334 2f 0c |/ | MOVE.L A4,-(A7) 00021336 4e b9 00 02 2c 2c |N ,, | JSR 0x22c2c 0002133c 58 4f |XO | ADDQ.L #0x4,A7 0002133e 4c df 13 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A4 00021342 4e 5e |N^ | UNLK A6 00021344 4e 75 |Nu | RTS 00021346 ; -------------------------------------------------------------------------------------- 00021346 ; OMSI PASCAL Function 00021346 ; <LVAR 0x008 4(r)> 00021346 ; <LVAR -0x001 @> 00021346 ; <LVAR -0x002 @> 00021346 ; <LVAR -0x003 @ 1(r)> 00021346 ; <LVAR -0x004 @ 1(r)> 00021346 ; -------------------------------------------------------------------------------------- 00021346 4e 56 ff b6 |NV | LINK.W A6,#0xffb6 0002134a bf d5 | | CMPA.L (A5),A7 0002134c 62 06 |b | BHI 0x21354 0002134e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021352 4e 76 |Nv | TRAPV 00021354 de fc 00 46 | F | ADDA.W #0x46,A7 00021358 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 0002135c 45 ee ff fc |E | LEA.L (A6-0x4),A2 00021360 72 01 |r | MOVEQ.L #0x01,D1 00021362 41 fa f0 76 |A v | LEA.L 0x203da,A0 00021366 70 04 |p | MOVEQ.L #0x04,D0 00021368 3f 20 |? | MOVE.W -(A0),-(A7) 0002136a 51 c8 ff fc |Q | DBF D0,0x21368 0002136e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00021372 48 78 00 01 |Hx | PEA.L 0x1 00021376 4e b9 00 02 22 a4 |N " | JSR 0x222a4 0002137c de fc 00 0a | | ADDA.W #0xa,A7 00021380 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00021384 48 78 00 01 |Hx | PEA.L 0x1 00021388 4e b9 00 02 2b 8a |N + | JSR 0x22b8a 0002138e 50 4f |PO | ADDQ.L #0x8,A7 00021390 48 52 |HR | PEA.L (A2) 00021392 4e ba f2 c6 |N | JSR 0x2065a 00021396 5c 4f |\O | ADDQ.L #0x6,A7 00021398 1e 92 | | MOVE.B (A2),(A7) 0002139a 48 6e ff fd |Hn | PEA.L (A6-0x3) 0002139e 48 6e ff fe |Hn | PEA.L (A6-0x2) 000213a2 48 6e ff ff |Hn | PEA.L (A6-0x1) 000213a6 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 000213ac de fc 00 0e | | ADDA.W #0xe,A7 000213b0 10 2e ff fd | . | MOVE.B (A6-0x3),D0 000213b4 0c 00 00 03 | | CMPI.B #0x03,D0 000213b8 66 0e |f | BNE 0x213c8 000213ba 1f 12 | | MOVE.B (A2),-(A7) 000213bc 42 27 |B' | CLR.B -(A7) 000213be 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 000213c4 58 4f |XO | ADDQ.L #0x4,A7 000213c6 60 3c |`< | BRA 0x21404 000213c8 0c 00 00 02 | | CMPI.B #0x02,D0 000213cc 66 06 |f | BNE 0x213d4 000213ce 1f 12 | | MOVE.B (A2),-(A7) 000213d0 1f 01 | | MOVE.B D1,-(A7) 000213d2 60 ea |` | BRA 0x213be 000213d4 9e fc 00 20 | | SUBA.W #0x20,A7 000213d8 20 4f | O | MOVEA.L A7,A0 000213da 43 fa ef fe |C | LEA.L 0x203da,A1 000213de 70 1e |p | MOVEQ.L #0x1e,D0 000213e0 10 d9 | | MOVE.B (A1)+,(A0)+ 000213e2 51 c8 ff fc |Q | DBF D0,0x213e0 000213e6 59 4f |YO | SUBQ.L #0x4,A7 000213e8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000213ec 3f 01 |? | MOVE.W D1,-(A7) 000213ee 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7) 000213f2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000213f8 50 4f |PO | ADDQ.L #0x8,A7 000213fa 4e b9 00 02 1e 62 |N b | JSR 0x21e62 00021400 de fc 00 24 | $ | ADDA.W #0x24,A7 00021404 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00021408 4e 5e |N^ | UNLK A6 0002140a 4e 75 |Nu | RTS 0002140c ; -------------------------------------------------------------------------------------- 0002140c ; OMSI PASCAL Function 0002140c ; <LVAR 0x008 4(r)> 0002140c ; <LVAR -0x004 @ 1(r)> 0002140c ; -------------------------------------------------------------------------------------- 0002140c 4e 56 ff de |NV | LINK.W A6,#0xffde 00021410 bf d5 | | CMPA.L (A5),A7 00021412 62 06 |b | BHI 0x2141a 00021414 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021418 4e 76 |Nv | TRAPV 0002141a de fc 00 1e | | ADDA.W #0x1e,A7 0002141e 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00021422 41 fa ef e0 |A | LEA.L 0x20404,A0 00021426 70 04 |p | MOVEQ.L #0x04,D0 00021428 3f 20 |? | MOVE.W -(A0),-(A7) 0002142a 51 c8 ff fc |Q | DBF D0,0x21428 0002142e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00021432 48 78 00 01 |Hx | PEA.L 0x1 00021436 4e b9 00 02 22 a4 |N " | JSR 0x222a4 0002143c de fc 00 0a | | ADDA.W #0xa,A7 00021440 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00021444 48 78 00 01 |Hx | PEA.L 0x1 00021448 4e b9 00 02 2b 8a |N + | JSR 0x22b8a 0002144e 50 4f |PO | ADDQ.L #0x8,A7 00021450 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021454 4e ba f2 04 |N | JSR 0x2065a 00021458 5c 4f |\O | ADDQ.L #0x6,A7 0002145a 1e ae ff fc | | MOVE.B (A6-0x4),(A7) 0002145e 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00021462 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 00021468 58 4f |XO | ADDQ.L #0x4,A7 0002146a 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 0002146e 4e 5e |N^ | UNLK A6 00021470 4e 75 |Nu | RTS 00021472 ; -------------------------------------------------------------------------------------- 00021472 ; OMSI PASCAL Function 00021472 ; <LVAR 0x00c 1(w)> 00021472 ; <LVAR 0x008 4(r)> 00021472 ; <LVAR -0x006 @ 4(rw)> 00021472 ; -------------------------------------------------------------------------------------- 00021472 4e 56 ff b4 |NV | LINK.W A6,#0xffb4 00021476 bf d5 | | CMPA.L (A5),A7 00021478 62 06 |b | BHI 0x21480 0002147a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002147e 4e 76 |Nv | TRAPV 00021480 de fc 00 44 | D | ADDA.W #0x44,A7 00021484 48 e7 f3 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D3+D2+D1+D0,-(A7) 00021488 45 ee ff fa |E | LEA.L (A6-0x6),A2 0002148c 72 0c |r | MOVEQ.L #0x0c,D1 0002148e 74 09 |t | MOVEQ.L #0x09,D2 00021490 76 01 |v | MOVEQ.L #0x01,D3 00021492 1d 42 00 0c | B | MOVE.B D2,(A6+0xc) 00021496 7e 00 |~ | MOVEQ.L #0x00,D7 00021498 10 07 | | MOVE.B D7,D0 0002149a 48 80 |H | EXTB.W D0 0002149c c1 c1 | | MULS.W D1,D0 0002149e 41 fa ef ec |A | LEA.L 0x2048c,A0 000214a2 9e c1 | | SUBA.W D1,A7 000214a4 22 4f |"O | MOVEA.L A7,A1 000214a6 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 000214aa 70 0b |p | MOVEQ.L #0x0b,D0 000214ac 12 d8 | | MOVE.B (A0)+,(A1)+ 000214ae 51 c8 ff fc |Q | DBF D0,0x214ac 000214b2 59 4f |YO | SUBQ.L #0x4,A7 000214b4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000214b8 3f 03 |? | MOVE.W D3,-(A7) 000214ba 3f 01 |? | MOVE.W D1,-(A7) 000214bc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000214c2 50 4f |PO | ADDQ.L #0x8,A7 000214c4 24 9f |$ | MOVE.L (A7)+,(A2) 000214c6 5c 4f |\O | ADDQ.L #0x6,A7 000214c8 2e 92 |. | MOVE.L (A2),(A7) 000214ca 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000214ce 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000214d4 50 4f |PO | ADDQ.L #0x8,A7 000214d6 10 1f | | MOVE.B (A7)+,D0 000214d8 48 80 |H | EXTB.W D0 000214da 41 83 |A | CHK.W D3,D0 000214dc 1c 00 | | MOVE.B D0,D6 000214de 48 52 |HR | PEA.L (A2) 000214e0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000214e6 58 4f |XO | ADDQ.L #0x4,A7 000214e8 4a 06 |J | TST.B D6 000214ea 67 06 |g | BEQ 0x214f2 000214ec 1d 47 00 0c | G | MOVE.B D7,(A6+0xc) 000214f0 60 06 |` | BRA 0x214f8 000214f2 52 07 |R | ADDQ.B #0x1,D7 000214f4 be 02 | | CMP.B D2,D7 000214f6 6f a0 |o | BLE 0x21498 000214f8 4c df 07 cf |L | MOVEM.L (A7)+,D0+D1+D2+D3+D6+D7+A0+A1+A2 000214fc 4e 5e |N^ | UNLK A6 000214fe 4e 75 |Nu | RTS 00021500 ; -------------------------------------------------------------------------------------- 00021500 ; OMSI PASCAL Function 00021500 ; <LVAR 0x008 1(r)> 00021500 ; -------------------------------------------------------------------------------------- 00021500 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00021504 bf d5 | | CMPA.L (A5),A7 00021506 62 06 |b | BHI 0x2150e 00021508 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002150c 4e 76 |Nv | TRAPV 0002150e de fc 00 26 | & | ADDA.W #0x26,A7 00021512 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7) 00021516 72 01 |r | MOVEQ.L #0x01,D1 00021518 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 0002151c 48 80 |H | EXTB.W D0 0002151e b0 41 | A | CMP.W D1,D0 00021520 63 02 |c | BLS 0x21524 00021522 4e 4e |NN | TRAP #14 00021524 d0 40 | @ | ADD.W D0,D0 00021526 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 0002152e 00 26 | & | .CONST 0x26 ; [0x0] -> 0x21554 00021530 00 04 | | .CONST 0x4 ; [0x1] -> 0x21532 00021532 switch@0x21526[0x1]: 00021532 2f 3a ee d0 |/: | MOVE.L 0x20404,-(A7) 00021536 59 4f |YO | SUBQ.L #0x4,A7 00021538 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002153c 3f 01 |? | MOVE.W D1,-(A7) 0002153e 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00021542 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021548 50 4f |PO | ADDQ.L #0x8,A7 0002154a 4e b9 00 02 2c 2c |N ,, | JSR 0x22c2c 00021550 50 4f |PO | ADDQ.L #0x8,A7 00021552 60 2e |`. | BRA 0x21582 00021554 switch@0x21526[0x0]: 00021554 5d 4f |]O | SUBQ.L #0x6,A7 00021556 20 4f | O | MOVEA.L A7,A0 00021558 43 fa ee ae |C | LEA.L 0x20408,A1 0002155c 70 04 |p | MOVEQ.L #0x04,D0 0002155e 10 d9 | | MOVE.B (A1)+,(A0)+ 00021560 51 c8 ff fc |Q | DBF D0,0x2155e 00021564 59 4f |YO | SUBQ.L #0x4,A7 00021566 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002156a 3f 01 |? | MOVE.W D1,-(A7) 0002156c 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00021570 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021576 50 4f |PO | ADDQ.L #0x8,A7 00021578 4e b9 00 02 2c 2c |N ,, | JSR 0x22c2c 0002157e de fc 00 0a | | ADDA.W #0xa,A7 00021582 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1 00021586 4e 5e |N^ | UNLK A6 00021588 4e 75 |Nu | RTS 0002158a ; -------------------------------------------------------------------------------------- 0002158a ; OMSI PASCAL Function 0002158a ; <LVAR 0x010 4(r)> 0002158a ; <LVAR 0x00c 4(r)> 0002158a ; <LVAR 0x008 4(r)> 0002158a ; -------------------------------------------------------------------------------------- 0002158a 4e 56 ff de |NV | LINK.W A6,#0xffde 0002158e bf d5 | | CMPA.L (A5),A7 00021590 62 06 |b | BHI 0x21598 00021592 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021596 4e 76 |Nv | TRAPV 00021598 de fc 00 22 | " | ADDA.W #0x22,A7 0002159c 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000215a0 43 ee 00 0c |C | LEA.L (A6+0xc),A1 000215a4 45 f9 00 01 04 c0 |E | LEA.L HasBoard(diproc_addr: Byte) : Byte,A2 000215aa 72 01 |r | MOVEQ.L #0x01,D1 000215ac 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000215b0 10 81 | | MOVE.B D1,(A0) 000215b2 55 4f |UO | SUBQ.L #0x2,A7 000215b4 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 000215b8 4e ba fe b8 |N | JSR 0x21472 000215bc 58 4f |XO | ADDQ.L #0x4,A7 000215be 10 1f | | MOVE.B (A7)+,D0 000215c0 48 80 |H | EXTB.W D0 000215c2 0c 40 00 09 | @ | CMPI.W #0x0009,D0 000215c6 63 02 |c | BLS 0x215ca 000215c8 4e 4e |NN | TRAP #14 000215ca d0 40 | @ | ADD.W D0,D0 000215cc 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000215d4 00 14 | | .CONST 0x14 ; [0x0] -> 0x215e8 000215d6 00 1e | | .CONST 0x1e ; [0x1] -> 0x215f2 000215d8 00 26 | & | .CONST 0x26 ; [0x2] -> 0x215fa 000215da 00 2e | . | .CONST 0x2e ; [0x3] -> 0x21602 000215dc 00 36 | 6 | .CONST 0x36 ; [0x4] -> 0x2160a 000215de 00 50 | P | .CONST 0x50 ; [0x5] -> 0x21624 000215e0 00 62 | b | .CONST 0x62 ; [0x6] -> 0x21636 000215e2 00 74 | t | .CONST 0x74 ; [0x7] -> 0x21648 000215e4 00 86 | | .CONST 0x86 ; [0x8] -> 0x2165a 000215e6 00 96 | | .CONST 0x96 ; [0x9] -> 0x2166a 000215e8 switch@0x215cc[0x0]: 000215e8 2f 11 |/ | MOVE.L (A1),-(A7) 000215ea 4e ba fa ac |N | JSR 0x21098 000215ee 58 4f |XO | ADDQ.L #0x4,A7 000215f0 60 7a |`z | BRA 0x2166c 000215f2 switch@0x215cc[0x1]: 000215f2 2f 11 |/ | MOVE.L (A1),-(A7) 000215f4 4e ba fc 32 |N 2 | JSR 0x21228 000215f8 60 f4 |` | BRA 0x215ee 000215fa switch@0x215cc[0x2]: 000215fa 2f 11 |/ | MOVE.L (A1),-(A7) 000215fc 4e ba fe 0e |N | JSR 0x2140c 00021600 60 ec |` | BRA 0x215ee 00021602 switch@0x215cc[0x3]: 00021602 2f 11 |/ | MOVE.L (A1),-(A7) 00021604 4e ba fd 40 |N @ | JSR 0x21346 00021608 60 e4 |` | BRA 0x215ee 0002160a switch@0x215cc[0x4]: 0002160a 55 4f |UO | SUBQ.L #0x2,A7 0002160c 1f 3c 00 0c | < | MOVE.B #0x0c,-(A7) 00021610 4e 92 |N | JSR (A2) 00021612 54 4f |TO | ADDQ.L #0x2,A7 00021614 10 17 | | MOVE.B (A7),D0 00021616 48 80 |H | EXTB.W D0 00021618 41 81 |A | CHK.W D1,D0 0002161a 1e 80 | | MOVE.B D0,(A7) 0002161c 4e ba fe e2 |N | JSR 0x21500 00021620 54 4f |TO | ADDQ.L #0x2,A7 00021622 60 48 |`H | BRA 0x2166c 00021624 switch@0x215cc[0x5]: 00021624 55 4f |UO | SUBQ.L #0x2,A7 00021626 1f 3c 00 0d | < | MOVE.B #0x0d,-(A7) 0002162a 4e 92 |N | JSR (A2) 0002162c 54 4f |TO | ADDQ.L #0x2,A7 0002162e 10 17 | | MOVE.B (A7),D0 00021630 48 80 |H | EXTB.W D0 00021632 41 81 |A | CHK.W D1,D0 00021634 60 e4 |` | BRA 0x2161a 00021636 switch@0x215cc[0x6]: 00021636 55 4f |UO | SUBQ.L #0x2,A7 00021638 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 0002163c 4e 92 |N | JSR (A2) 0002163e 54 4f |TO | ADDQ.L #0x2,A7 00021640 10 17 | | MOVE.B (A7),D0 00021642 48 80 |H | EXTB.W D0 00021644 41 81 |A | CHK.W D1,D0 00021646 60 d2 |` | BRA 0x2161a 00021648 switch@0x215cc[0x7]: 00021648 55 4f |UO | SUBQ.L #0x2,A7 0002164a 1f 3c 00 0f | < | MOVE.B #0x0f,-(A7) 0002164e 4e 92 |N | JSR (A2) 00021650 54 4f |TO | ADDQ.L #0x2,A7 00021652 10 17 | | MOVE.B (A7),D0 00021654 48 80 |H | EXTB.W D0 00021656 41 81 |A | CHK.W D1,D0 00021658 60 c0 |` | BRA 0x2161a 0002165a switch@0x215cc[0x8]: 0002165a 55 4f |UO | SUBQ.L #0x2,A7 0002165c 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00021662 10 17 | | MOVE.B (A7),D0 00021664 48 80 |H | EXTB.W D0 00021666 41 81 |A | CHK.W D1,D0 00021668 60 b0 |` | BRA 0x2161a 0002166a switch@0x215cc[0x9]: 0002166a 42 10 |B | CLR.B (A0) 0002166c 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00021670 4e 5e |N^ | UNLK A6 00021672 4e 75 |Nu | RTS 00021674 ; -------------------------------------------------------------------------------------- 00021674 ; OMSI PASCAL Function 00021674 ; <LVAR 0x008 4(r)> 00021674 ; -------------------------------------------------------------------------------------- 00021674 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00021678 bf d5 | | CMPA.L (A5),A7 0002167a 62 06 |b | BHI 0x21682 0002167c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021680 4e 76 |Nv | TRAPV 00021682 de fc 00 20 | | ADDA.W #0x20,A7 00021686 48 e7 80 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D0,-(A7) 0002168a 45 f9 00 02 59 b0 |E Y | LEA.L 0x259b0,A2 00021690 47 f9 00 02 59 b4 |G Y | LEA.L 0x259b4,A3 00021696 49 f9 00 02 59 b8 |I Y | LEA.L 0x259b8,A4 0002169c 4e b9 00 01 03 98 |N | JSR FSCALL_10398 000216a2 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000216a6 43 fa ed 66 |C f | LEA.L 0x2040e,A1 000216aa 70 09 |p | MOVEQ.L #0x09,D0 000216ac 10 d9 | | MOVE.B (A1)+,(A0)+ 000216ae 51 c8 ff fc |Q | DBF D0,0x216ac 000216b2 48 78 00 00 |Hx | PEA.L 0x0 000216b6 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 000216bc 58 4f |XO | ADDQ.L #0x4,A7 000216be 23 fa ed 58 00 02 59 80 |# X Y | MOVE.L 0x20418,0x25980 000216c6 23 fa ed 54 00 02 59 88 |# T Y | MOVE.L 0x2041c,0x25988 000216ce 23 fa ed 50 00 02 59 8c |# P Y | MOVE.L 0x20420,0x2598c 000216d6 23 fa ed 4c 00 02 59 98 |# L Y | MOVE.L 0x20424,0x25998 000216de 23 fa ed 48 00 02 59 9c |# H Y | MOVE.L 0x20428,0x2599c 000216e6 55 4f |UO | SUBQ.L #0x2,A7 000216e8 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000216ee 4a 1f |J | TST.B (A7)+ 000216f0 67 16 |g | BEQ 0x21708 000216f2 24 ba ed 38 |$ 8 | MOVE.L 0x2042c,(A2) 000216f6 26 ba ed 38 |& 8 | MOVE.L 0x20430,(A3) 000216fa 28 ba ed 38 |( 8 | MOVE.L 0x20434,(A4) 000216fe 23 fa ed 38 00 02 59 bc |# 8 Y | MOVE.L 0x20438,0x259bc 00021706 60 14 |` | BRA 0x2171c 00021708 24 ba ed 32 |$ 2 | MOVE.L 0x2043c,(A2) 0002170c 26 ba ed 32 |& 2 | MOVE.L 0x20440,(A3) 00021710 28 ba ed 32 |( 2 | MOVE.L 0x20444,(A4) 00021714 23 fa ed 32 00 02 59 bc |# 2 Y | MOVE.L 0x20448,0x259bc 0002171c 23 fa ed 2e 00 02 59 90 |# . Y | MOVE.L 0x2044c,0x25990 00021724 23 fa ed 2a 00 02 59 c0 |# * Y | MOVE.L 0x20450,0x259c0 0002172c 23 fa ed 26 00 02 59 c8 |# & Y | MOVE.L 0x20454,0x259c8 00021734 23 fa ed 22 00 02 59 cc |# " Y | MOVE.L 0x20458,0x259cc 0002173c 23 fa ed 1e 00 02 59 d8 |# Y | MOVE.L 0x2045c,0x259d8 00021744 23 fa ed 1a 00 02 59 dc |# Y | MOVE.L 0x20460,0x259dc 0002174c 23 fa ed 16 00 02 59 f0 |# Y | MOVE.L 0x20464,0x259f0 00021754 23 fa ed 12 00 02 59 f4 |# Y | MOVE.L 0x20468,0x259f4 0002175c 23 fa ed 0e 00 02 59 f8 |# Y | MOVE.L 0x2046c,0x259f8 00021764 23 fa ed 0a 00 02 59 fc |# Y | MOVE.L 0x20470,0x259fc 0002176c 23 fa ed 06 00 02 59 d4 |# Y | MOVE.L 0x20474,0x259d4 00021774 23 fa ed 02 00 02 59 d0 |# Y | MOVE.L 0x20478,0x259d0 0002177c 4c df 1f 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2+A3+A4 00021780 4e 5e |N^ | UNLK A6 00021782 4e 75 |Nu | RTS 00021784 ; -------------------------------------------------------------------------------------- 00021784 ; COMMAND TABLE 00021784 ; -------------------------------------------------------------------------------------- 00021784 COMMAND_TABLE_21784: 00021784 21 40 23 24 25 5e 26 2a |!@#$%^&*| .TXT '!@#$%^&*()' 0002178e 57 52 49 54 45 20 20 20 |WRITE | .TXT 'WRITE ' 00021798 42 59 45 20 20 20 20 20 |BYE | .TXT 'BYE ' 000217a2 48 45 41 50 20 20 20 20 |HEAP | .TXT 'HEAP ' 000217ac 48 45 4c 50 20 20 20 20 |HELP | .TXT 'HELP ' 000217b6 41 42 4f 52 54 20 20 20 |ABORT | .TXT 'ABORT ' 000217c0 43 4f 4d 4d 45 4e 54 20 |COMMENT | .TXT 'COMMENT ' 000217ca 53 45 54 20 20 20 20 20 |SET | .TXT 'SET ' 000217d4 56 41 52 20 20 20 20 20 |VAR | .TXT 'VAR ' 000217de 56 41 52 53 20 20 20 20 |VARS | .TXT 'VARS ' 000217e8 45 51 20 20 20 20 20 20 |EQ | .TXT 'EQ ' 000217f2 4e 45 20 20 20 20 20 20 |NE | .TXT 'NE ' 000217fc 43 41 53 45 20 20 20 20 |CASE | .TXT 'CASE ' 00021806 49 4e 53 45 52 54 20 20 |INSERT | .TXT 'INSERT ' 00021810 45 58 54 52 41 43 54 20 |EXTRACT | .TXT 'EXTRACT ' 0002181a 23 43 41 53 45 20 20 20 |#CASE | .TXT '#CASE ' 00021824 23 45 51 20 20 20 20 20 |#EQ | .TXT '#EQ ' 0002182e 23 4e 45 20 20 20 20 20 |#NE | .TXT '#NE ' 00021838 23 4c 54 20 20 20 20 20 |#LT | .TXT '#LT ' 00021842 23 47 54 20 20 20 20 20 |#GT | .TXT '#GT ' 0002184c 23 4c 45 20 20 20 20 20 |#LE | .TXT '#LE ' 00021856 23 47 45 20 20 20 20 20 |#GE | .TXT '#GE ' 00021860 41 44 44 20 20 20 20 20 |ADD | .TXT 'ADD ' 0002186a 53 55 42 20 20 20 20 20 |SUB | .TXT 'SUB ' 00021874 4d 55 4c 20 20 20 20 20 |MUL | .TXT 'MUL ' 0002187e 44 49 56 20 20 20 20 20 |DIV | .TXT 'DIV ' 00021888 4d 4f 44 20 20 20 20 20 |MOD | .TXT 'MOD ' 00021892 4f 52 20 20 20 20 20 20 |OR | .TXT 'OR ' 0002189c 41 4e 44 20 20 20 20 20 |AND | .TXT 'AND ' 000218a6 58 4f 52 20 20 20 20 20 |XOR | .TXT 'XOR ' 000218b0 4c 53 48 49 46 54 20 20 |LSHIFT | .TXT 'LSHIFT ' 000218ba 52 53 48 49 46 54 20 20 |RSHIFT | .TXT 'RSHIFT ' 000218c4 4e 4f 54 20 20 20 20 20 |NOT | .TXT 'NOT ' 000218ce 23 49 4e 53 45 52 54 20 |#INSERT | .TXT '#INSERT ' 000218d8 23 45 58 54 52 41 43 54 |#EXTRACT| .TXT '#EXTRACT ' 000218e2 52 45 41 44 20 20 20 20 |READ | .TXT 'READ ' 000218ec 4b 49 4c 4c 20 20 20 20 |KILL | .TXT 'KILL ' 000218f6 50 55 53 48 20 20 20 20 |PUSH | .TXT 'PUSH ' 00021900 4c 45 56 45 4c 20 20 20 |LEVEL | .TXT 'LEVEL ' 0002190a 43 4f 4e 56 45 52 54 20 |CONVERT | .TXT 'CONVERT ' 00021914 43 4f 55 4e 54 5f 4f 4e |COUNT_ON| .TXT 'COUNT_ONES' 0002191e 52 45 50 45 41 54 20 20 |REPEAT | .TXT 'REPEAT ' 00021928 4d 4f 44 45 4c 20 20 20 |MODEL | .TXT 'MODEL ' 00021932 41 53 43 49 49 20 20 20 |ASCII | .TXT 'ASCII ' 0002193c 41 52 47 20 20 20 20 20 |ARG | .TXT 'ARG ' 00021946 57 72 6f 6e 67 20 6e 75 |Wrong nu| .TXT 'Wrong number of arguments for :_' 00021966 45 51 |EQ | .XXX[0x2] 00021968 2c 4e 45 2c 23 45 51 2c |,NE,#EQ,| .XXX[0x38] 00021970 23 4e 45 2c 23 4c 54 2c |#NE,#LT,| 00021978 23 47 54 2c 23 4c 45 2c |#GT,#LE,| 00021980 23 47 45 2c 45 4c 53 45 |#GE,ELSE| 00021988 5d 45 4e 44 5d 43 41 53 |]END]CAS| 00021990 45 2c 23 43 41 53 45 2c |E,#CASE,| 00021998 57 48 45 4e 2c 45 4e 44 |WHEN,END| 000219a0 43 41 53 45 5d 20 |CASE] | .XXX[0x6] 000219a6 45 76 61 6c 75 61 74 69 |Evaluati| .TXT 'Evaluation buffer overflow. ' 000219c2 55 6e 62 61 6c 61 6e 63 |Unbalanc| .TXT 'Unbalanced [ELSE] or [END]! ' 000219de 5b 57 48 45 4e 20 5d 20 |[WHEN ] | .TXT '[WHEN ] ' 000219e8 4e 6f 20 63 61 73 65 20 |No case | .TXT 'No case alternative found!' 00021a02 4e 6f 20 5b 45 4e 44 43 |No [ENDC| .TXT 'No [ENDCASE] found! ' 00021a16 4e 6f 20 68 65 6c 70 20 |No help | .TXT 'No help available for_' 00021a2c 2e 48 4c 50 |.HLP | .TXT '.HLP' 00021a30 54 6f 6f 20 66 65 77 20 |Too few | .TXT 'Too few arguments for SET ' 00021a4a 55 6e 6b 6e 6f 77 6e 20 |Unknown | .TXT 'Unknown variable :_ ' 00021a5e 20 69 73 20 6e 6f 74 20 | is not | .TXT ' is not a program.' 00021a70 43 4c |CL | .TXT 'CL' 00021a72 49 20 |I | .XXX[0x2] 00021a74 2e 4d 32 30 30 20 |.M200 | .TXT '.M200 ' 00021a7a 53 54 |ST | .TXT 'ST' 00021a7c 41 54 |AT | .TXT 'AT' 00021a7e 55 53 |US | .TXT 'US' 00021a80 52 45 |RE | .TXT 'RE' 00021a82 53 55 |SU | .TXT 'SU' 00021a84 4c 54 |LT | .TXT 'LT' 00021a86 4f 66 66 73 65 74 2f 4c |Offset/L| .TXT 'Offset/Length error in [INSERT] ' 00021aa6 52 45 50 45 41 54 69 6e |REPEATin| .TXT 'REPEATing, type ^G to exit. ' 00021ac2 41 53 43 49 49 20 61 72 |ASCII ar| .TXT 'ASCII argument out of range.' 00021ade 5b 41 52 47 20 69 5d 20 |[ARG i] | .TXT '[ARG i] ' 00021ae8 4e 6f 74 20 61 20 63 6f |Not a co| .TXT 'Not a command or macro :_ ' 00021b02 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal marker argument ' 00021b1a 53 77 69 74 63 68 20 65 |Switch e| .TXT 'Switch exclusion is unimplemented.' 00021b3c 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal argument marker.' 00021b54 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal argument marker.' 00021b6c 5b 49 4e 49 54 5d 5b 20 |[INIT][ | .TXT '[INIT][ ' 00021b74 5d 5b 42 59 45 5d 3b 20 |][BYE]; | .TXT '][BYE]; ' 00021b7c 5b 49 4e 49 54 5d 3b 20 |[INIT]; | .TXT '[INIT]; ' 00021b84 3e 5f |>_ | .TXT '>_' 00021b86 5b 20 |[ | .TXT '[ ' 00021b88 5d 3b |]; | .TXT '];' 00021b8a ; -------------------------------------------------------------------------------------- 00021b8a ; COMMAND TABLE 00021b8a ; -------------------------------------------------------------------------------------- 00021b8a COMMAND_TABLE_21b8a: 00021b8a 21 40 23 24 25 5e 26 2a |!@#$%^&*| .TXT '!@#$%^&*()' 00021b94 57 52 49 54 45 20 20 20 |WRITE | .TXT 'WRITE ' 00021b9e 42 59 45 20 20 20 20 20 |BYE | .TXT 'BYE ' 00021ba8 48 45 41 50 20 20 20 20 |HEAP | .TXT 'HEAP ' 00021bb2 48 45 4c 50 20 20 20 20 |HELP | .TXT 'HELP ' 00021bbc 41 42 4f 52 54 20 20 20 |ABORT | .TXT 'ABORT ' 00021bc6 43 4f 4d 4d 45 4e 54 20 |COMMENT | .TXT 'COMMENT ' 00021bd0 53 45 54 20 20 20 20 20 |SET | .TXT 'SET ' 00021bda 56 41 52 20 20 20 20 20 |VAR | .TXT 'VAR ' 00021be4 56 41 52 53 20 20 20 20 |VARS | .TXT 'VARS ' 00021bee 45 51 20 20 20 20 20 20 |EQ | .TXT 'EQ ' 00021bf8 4e 45 20 20 20 20 20 20 |NE | .TXT 'NE ' 00021c02 43 41 53 45 20 20 20 20 |CASE | .TXT 'CASE ' 00021c0c 49 4e 53 45 52 54 20 20 |INSERT | .TXT 'INSERT ' 00021c16 45 58 54 52 41 43 54 20 |EXTRACT | .TXT 'EXTRACT ' 00021c20 23 43 41 53 45 20 20 20 |#CASE | .TXT '#CASE ' 00021c2a 23 45 51 20 20 20 20 20 |#EQ | .TXT '#EQ ' 00021c34 23 4e 45 20 20 20 20 20 |#NE | .TXT '#NE ' 00021c3e 23 4c 54 20 20 20 20 20 |#LT | .TXT '#LT ' 00021c48 23 47 54 20 20 20 20 20 |#GT | .TXT '#GT ' 00021c52 23 4c 45 20 20 20 20 20 |#LE | .TXT '#LE ' 00021c5c 23 47 45 20 20 20 20 20 |#GE | .TXT '#GE ' 00021c66 41 44 44 20 20 20 20 20 |ADD | .TXT 'ADD ' 00021c70 53 55 42 20 20 20 20 20 |SUB | .TXT 'SUB ' 00021c7a 4d 55 4c 20 20 20 20 20 |MUL | .TXT 'MUL ' 00021c84 44 49 56 20 20 20 20 20 |DIV | .TXT 'DIV ' 00021c8e 4d 4f 44 20 20 20 20 20 |MOD | .TXT 'MOD ' 00021c98 4f 52 20 20 20 20 20 20 |OR | .TXT 'OR ' 00021ca2 41 4e 44 20 20 20 20 20 |AND | .TXT 'AND ' 00021cac 58 4f 52 20 20 20 20 20 |XOR | .TXT 'XOR ' 00021cb6 4c 53 48 49 46 54 20 20 |LSHIFT | .TXT 'LSHIFT ' 00021cc0 52 53 48 49 46 54 20 20 |RSHIFT | .TXT 'RSHIFT ' 00021cca 4e 4f 54 20 20 20 20 20 |NOT | .TXT 'NOT ' 00021cd4 23 49 4e 53 45 52 54 20 |#INSERT | .TXT '#INSERT ' 00021cde 23 45 58 54 52 41 43 54 |#EXTRACT| .TXT '#EXTRACT ' 00021ce8 52 45 41 44 20 20 20 20 |READ | .TXT 'READ ' 00021cf2 4b 49 4c 4c 20 20 20 20 |KILL | .TXT 'KILL ' 00021cfc 50 55 53 48 20 20 20 20 |PUSH | .TXT 'PUSH ' 00021d06 4c 45 56 45 4c 20 20 20 |LEVEL | .TXT 'LEVEL ' 00021d10 43 4f 4e 56 45 52 54 20 |CONVERT | .TXT 'CONVERT ' 00021d1a 43 4f 55 4e 54 5f 4f 4e |COUNT_ON| .TXT 'COUNT_ONES' 00021d24 52 45 50 45 41 54 20 20 |REPEAT | .TXT 'REPEAT ' 00021d2e 4d 4f 44 45 4c 20 20 20 |MODEL | .TXT 'MODEL ' 00021d38 41 53 43 49 49 20 20 20 |ASCII | .TXT 'ASCII ' 00021d42 41 52 47 20 20 20 20 20 |ARG | .TXT 'ARG ' 00021d4c a5 34 45 73 | 4Es | .XXX[0x4] 00021d50 34 22 46 75 33 33 33 33 |4"Fu3333| .XXX[0x98] 00021d58 33 32 33 66 37 84 44 57 |323f7 DW| 00021d60 a6 55 30 0f 00 f0 ff 10 | U0 | 00021d68 22 14 31 22 22 22 22 22 |" 1"""""| 00021d70 22 22 22 14 3f 1f 03 10 |""" ? | 00021d78 0f f0 00 00 00 00 ff ff | | 00021d80 ff ff 00 01 01 00 01 01 | | 00021d88 00 01 02 00 00 01 02 00 | | 00021d90 01 02 00 01 14 06 01 14 | | 00021d98 08 14 0f 02 03 14 14 08 | | 00021da0 14 0f 14 14 14 14 14 14 | | 00021da8 14 04 14 05 14 14 14 14 | | 00021db0 14 14 14 14 14 14 14 04 | | 00021db8 14 14 14 14 14 14 04 14 | | 00021dc0 07 14 14 14 14 04 14 14 | | 00021dc8 14 14 14 14 0c 14 14 09 | | 00021dd0 14 14 14 0d 14 14 14 0b | | 00021dd8 0a 14 0e 14 14 14 08 14 | | 00021de0 14 0c 14 14 09 14 14 14 | | 00021de8 14 14 14 14 14 14 14 14 | | .BLANK 14[0x10] 00021df8 14 14 14 14 14 10 14 14 | | .XXX[0x28] 00021e00 11 14 14 14 14 14 14 14 | | 00021e08 14 14 14 13 14 14 14 14 | | 00021e10 14 12 14 14 14 11 14 14 | | 00021e18 14 14 14 14 14 14 14 14 | | 00021e20 ; -------------------------------------------------------------------------------------- 00021e20 ; OMSI PASCAL Function 00021e20 ; <LVAR 0x008 4(r)> 00021e20 ; <LVAR -0x004 @ 4(w)> 00021e20 ; -------------------------------------------------------------------------------------- 00021e20 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 00021e24 bf d5 | | CMPA.L (A5),A7 00021e26 62 06 |b | BHI 0x21e2e 00021e28 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021e2c 4e 76 |Nv | TRAPV 00021e2e de fc 00 10 | | ADDA.W #0x10,A7 00021e32 48 e7 00 08 |H | MOVEM.L A4,-(A7) 00021e36 28 6e 00 08 |(n | MOVEA.L (A6+0x8),A4 00021e3a b8 fc 00 01 | | CMPA.W #0x1,A4 00021e3e 67 1a |g | BEQ 0x21e5a 00021e40 2d 4c ff fc |-L | MOVE.L A4,(A6-0x4) 00021e44 28 6c 00 08 |(l | MOVEA.L (A4+0x8),A4 00021e48 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021e4c 48 78 00 0c |Hx | PEA.L 0xc 00021e50 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 00021e56 50 4f |PO | ADDQ.L #0x8,A7 00021e58 60 e0 |` | BRA 0x21e3a 00021e5a 4c df 10 00 |L | MOVEM.L (A7)+,A4 00021e5e 4e 5e |N^ | UNLK A6 00021e60 4e 75 |Nu | RTS 00021e62 ; -------------------------------------------------------------------------------------- 00021e62 ; OMSI PASCAL Function 00021e62 ; <LVAR 0x008 4(r)> 00021e62 ; -------------------------------------------------------------------------------------- 00021e62 4e 56 ff f0 |NV | LINK.W A6,#0xfff0 00021e66 bf d5 | | CMPA.L (A5),A7 00021e68 62 06 |b | BHI 0x21e70 00021e6a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021e6e 4e 76 |Nv | TRAPV 00021e70 de fc 00 10 | | ADDA.W #0x10,A7 00021e74 48 e7 00 80 |H | MOVEM.L A0,-(A7) 00021e78 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021e7c b0 fc 00 01 | | CMPA.W #0x1,A0 00021e80 67 0a |g | BEQ 0x21e8c 00021e82 2f 08 |/ | MOVE.L A0,-(A7) 00021e84 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021e8a 58 4f |XO | ADDQ.L #0x4,A7 00021e8c 2e 6d 00 08 |.m | MOVEA.L (A5+0x8),A7 00021e90 3c 7c 00 00 |<| | MOVEA.W #0x0,A6 00021e94 4e f9 00 02 57 cc |N W | JMP 0x257cc 00021e9a 4c df 01 00 4e 5e |L N^ | .XXX[0x6] 00021ea0 4e 75 |Nu | .XXX[0x2] 00021ea2 ; -------------------------------------------------------------------------------------- 00021ea2 ; OMSI PASCAL Function 00021ea2 ; <LVAR 0x008 4(w)> 00021ea2 ; -------------------------------------------------------------------------------------- 00021ea2 4e 56 ff fc |NV | LINK.W A6,#0xfffc 00021ea6 bf d5 | | CMPA.L (A5),A7 00021ea8 62 06 |b | BHI 0x21eb0 00021eaa 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021eae 4e 76 |Nv | TRAPV 00021eb0 de fc 00 04 | | ADDA.W #0x4,A7 00021eb4 2d 79 00 02 7a 08 00 08 |-y z | MOVE.L 0x27a08,(A6+0x8) 00021ebc 4e 5e |N^ | UNLK A6 00021ebe 4e 75 |Nu | RTS 00021ec0 ; -------------------------------------------------------------------------------------- 00021ec0 ; OMSI PASCAL Function 00021ec0 ; <LVAR 0x008 1(rw)> 00021ec0 ; -------------------------------------------------------------------------------------- 00021ec0 4e 56 ff f0 |NV | LINK.W A6,#0xfff0 00021ec4 bf d5 | | CMPA.L (A5),A7 00021ec6 62 06 |b | BHI 0x21ece 00021ec8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021ecc 4e 76 |Nv | TRAPV 00021ece de fc 00 10 | | ADDA.W #0x10,A7 00021ed2 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00021ed6 20 39 00 02 7a 08 | 9 z | MOVE.L 0x27a08,D0 00021edc b0 b9 00 02 7a 0c | z | CMP.L 0x27a0c,D0 00021ee2 6f 06 |o | BLE 0x21eea 00021ee4 42 2e 00 08 |B. | CLR.B (A6+0x8) 00021ee8 60 0c |` | BRA 0x21ef6 00021eea 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 00021ef0 1d 70 08 07 00 08 | p | MOVE.B (A0+D0.L+#0x7),(A6+0x8) 00021ef6 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00021efa 4e 5e |N^ | UNLK A6 00021efc 4e 75 |Nu | RTS 00021efe ; -------------------------------------------------------------------------------------- 00021efe ; OMSI PASCAL Function 00021efe ; <LVAR 0x008 1(rw)> 00021efe ; -------------------------------------------------------------------------------------- 00021efe 4e 56 ff ec |NV | LINK.W A6,#0xffec 00021f02 bf d5 | | CMPA.L (A5),A7 00021f04 62 06 |b | BHI 0x21f0c 00021f06 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021f0a 4e 76 |Nv | TRAPV 00021f0c de fc 00 14 | | ADDA.W #0x14,A7 00021f10 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00021f14 43 f9 00 02 7a 08 |C z | LEA.L 0x27a08,A1 00021f1a 20 11 | | MOVE.L (A1),D0 00021f1c b0 b9 00 02 7a 0c | z | CMP.L 0x27a0c,D0 00021f22 6f 06 |o | BLE 0x21f2a 00021f24 42 2e 00 08 |B. | CLR.B (A6+0x8) 00021f28 60 0c |` | BRA 0x21f36 00021f2a 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 00021f30 1d 70 08 07 00 08 | p | MOVE.B (A0+D0.L+#0x7),(A6+0x8) 00021f36 52 80 |R | ADDQ.L #0x1,D0 00021f38 22 80 |" | MOVE.L D0,(A1) 00021f3a 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00021f3e 4e 5e |N^ | UNLK A6 00021f40 4e 75 |Nu | RTS 00021f42 ; -------------------------------------------------------------------------------------- 00021f42 ; OMSI PASCAL Function 00021f42 ; <LVAR 0x00c 4(r)> 00021f42 ; <LVAR 0x008 4(r)> 00021f42 ; -------------------------------------------------------------------------------------- 00021f42 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 00021f46 bf d5 | | CMPA.L (A5),A7 00021f48 62 06 |b | BHI 0x21f50 00021f4a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021f4e 4e 76 |Nv | TRAPV 00021f50 de fc 00 38 | 8 | ADDA.W #0x38,A7 00021f54 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021f58 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00021f5c 47 f9 00 02 7a 08 |G z | LEA.L 0x27a08,A3 00021f62 72 5b |r[ | MOVEQ.L #0x5b,D1 00021f64 74 02 |t | MOVEQ.L #0x02,D2 00021f66 76 2c |v, | MOVEQ.L #0x2c,D3 00021f68 78 3b |x; | MOVEQ.L #0x3b,D4 00021f6a 55 4f |UO | SUBQ.L #0x2,A7 00021f6c 4e ba ff 52 |N R | JSR 0x21ec0 00021f70 10 1f | | MOVE.B (A7)+,D0 00021f72 b0 01 | | CMP.B D1,D0 00021f74 66 0a |f | BNE 0x21f80 00021f76 4e b9 00 02 52 ca |N R | JSR 0x252ca 00021f7c 60 00 00 92 |` | BRA 0x22010 00021f80 2c 13 |, | MOVE.L (A3),D6 00021f82 55 4f |UO | SUBQ.L #0x2,A7 00021f84 4e ba ff 78 |N x | JSR 0x21efe 00021f88 1a 1f | | MOVE.B (A7)+,D5 00021f8a 66 18 |f | BNE 0x21fa4 00021f8c 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00021f90 43 fa fd e8 |C | LEA.L 0x21d7a,A1 00021f94 70 07 |p | MOVEQ.L #0x07,D0 00021f96 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f98 51 c8 ff fc |Q | DBF D0,0x21f96 00021f9c 20 52 | R | MOVEA.L (A2),A0 00021f9e 10 82 | | MOVE.B D2,(A0) 00021fa0 60 72 |`r | BRA 0x22014 00021fa2 60 5c |`\ | .XXX[0x2] 00021fa4 ba 03 | | CMP.B D3,D5 00021fa6 66 08 |f | BNE 0x21fb0 00021fa8 20 52 | R | MOVEA.L (A2),A0 00021faa 10 bc 00 03 | | MOVE.B #0x03,(A0) 00021fae 60 50 |`P | BRA 0x22000 00021fb0 ba 04 | | CMP.B D4,D5 00021fb2 66 08 |f | BNE 0x21fbc 00021fb4 20 52 | R | MOVEA.L (A2),A0 00021fb6 10 bc 00 01 | | MOVE.B #0x01,(A0) 00021fba 60 44 |`D | BRA 0x22000 00021fbc 0c 05 00 5d | ] | CMPI.B #0x5d,D5 00021fc0 66 06 |f | BNE 0x21fc8 00021fc2 20 52 | R | MOVEA.L (A2),A0 00021fc4 10 82 | | MOVE.B D2,(A0) 00021fc6 60 38 |`8 | BRA 0x22000 00021fc8 20 52 | R | MOVEA.L (A2),A0 00021fca 42 10 |B | CLR.B (A0) 00021fcc 55 4f |UO | SUBQ.L #0x2,A7 00021fce 4e ba fe f0 |N | JSR 0x21ec0 00021fd2 1e 1f | | MOVE.B (A7)+,D7 00021fd4 be 01 | | CMP.B D1,D7 00021fd6 66 08 |f | BNE 0x21fe0 00021fd8 4e b9 00 02 52 ca |N R | JSR 0x252ca 00021fde 60 1e |` | BRA 0x21ffe 00021fe0 be 04 | | CMP.B D4,D7 00021fe2 67 0e |g | BEQ 0x21ff2 00021fe4 be 03 | | CMP.B D3,D7 00021fe6 67 0a |g | BEQ 0x21ff2 00021fe8 0c 07 00 5d | ] | CMPI.B #0x5d,D7 00021fec 67 04 |g | BEQ 0x21ff2 00021fee 4a 07 |J | TST.B D7 00021ff0 66 04 |f | BNE 0x21ff6 00021ff2 60 0c |` | BRA 0x22000 00021ff4 60 08 |` | .XXX[0x2] 00021ff6 55 4f |UO | SUBQ.L #0x2,A7 00021ff8 4e ba ff 04 |N | JSR 0x21efe 00021ffc 1e 1f | | MOVE.B (A7)+,D7 00021ffe 60 cc |` | BRA 0x21fcc 00022000 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00022004 20 86 | | MOVE.L D6,(A0) 00022006 21 53 00 04 |!S | MOVE.L (A3),(A0+0x4) 0002200a 53 a8 00 04 |S | SUBQ.L #0x1,(A0+0x4) 0002200e 60 04 |` | BRA 0x22014 00022010 60 00 ff 58 |` X | BRA 0x21f6a 00022014 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 00022018 4e 5e |N^ | UNLK A6 0002201a 4e 75 |Nu | RTS 0002201c ; -------------------------------------------------------------------------------------- 0002201c ; OMSI PASCAL Function 0002201c ; <LVAR 0x010 4(r)> 0002201c ; <LVAR 0x00c 4(r)> 0002201c ; <LVAR 0x008 4(r)> 0002201c ; <LVAR -0x004 @ 1(rw)> 0002201c ; <LVAR -0x008 4(w)> 0002201c ; <LVAR -0x00c @ 4(w)> 0002201c ; -------------------------------------------------------------------------------------- 0002201c 4e 56 ff ca |NV | LINK.W A6,#0xffca 00022020 bf d5 | | CMPA.L (A5),A7 00022022 62 06 |b | BHI 0x2202a 00022024 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022028 4e 76 |Nv | TRAPV 0002202a de fc 00 2a | * | ADDA.W #0x2a,A7 0002202e 48 e7 c0 f0 |H | MOVEM.L A3+A2+A1+A0+D1+D0,-(A7) 00022032 45 ee ff fc |E | LEA.L (A6-0x4),A2 00022036 47 ee ff f4 |G | LEA.L (A6-0xc),A3 0002203a 72 03 |r | MOVEQ.L #0x03,D1 0002203c 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022040 10 10 | | MOVE.B (A0),D0 00022042 0c 00 00 01 | | CMPI.B #0x01,D0 00022046 67 06 |g | BEQ 0x2204e 00022048 0c 00 00 02 | | CMPI.B #0x02,D0 0002204c 66 0e |f | BNE 0x2205c 0002204e 26 ba fd 2a |& * | MOVE.L 0x21d7a,(A3) 00022052 2d 7a fd 2a ff f8 |-z * | MOVE.L 0x21d7e,(A6-0x8) 00022058 14 80 | | MOVE.B D0,(A2) 0002205a 60 3c |`< | BRA 0x22098 0002205c 48 53 |HS | PEA.L (A3) 0002205e 48 52 |HR | PEA.L (A2) 00022060 4e ba fe e0 |N | JSR 0x21f42 00022064 50 4f |PO | ADDQ.L #0x8,A7 00022066 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002206a 4a 12 |J | TST.B (A2) 0002206c 67 1c |g | BEQ 0x2208a 0002206e 10 10 | | MOVE.B (A0),D0 00022070 b0 01 | | CMP.B D1,D0 00022072 66 16 |f | BNE 0x2208a 00022074 10 12 | | MOVE.B (A2),D0 00022076 48 80 |H | EXTB.W D0 00022078 41 81 |A | CHK.W D1,D0 0002207a 10 80 | | MOVE.B D0,(A0) 0002207c 26 ba fc fc |& | MOVE.L 0x21d7a,(A3) 00022080 2d 7a fc fc ff f8 |-z | MOVE.L 0x21d7e,(A6-0x8) 00022086 42 12 |B | CLR.B (A2) 00022088 60 08 |` | BRA 0x22092 0002208a 10 12 | | MOVE.B (A2),D0 0002208c 48 80 |H | EXTB.W D0 0002208e 41 81 |A | CHK.W D1,D0 00022090 10 80 | | MOVE.B D0,(A0) 00022092 10 12 | | MOVE.B (A2),D0 00022094 b0 01 | | CMP.B D1,D0 00022096 67 c4 |g | BEQ 0x2205c 00022098 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 0002209c 22 4b |"K | MOVEA.L A3,A1 0002209e 70 07 |p | MOVEQ.L #0x07,D0 000220a0 10 d9 | | MOVE.B (A1)+,(A0)+ 000220a2 51 c8 ff fc |Q | DBF D0,0x220a0 000220a6 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000220aa 10 12 | | MOVE.B (A2),D0 000220ac 48 80 |H | EXTB.W D0 000220ae 41 81 |A | CHK.W D1,D0 000220b0 10 80 | | MOVE.B D0,(A0) 000220b2 4c df 0f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3 000220b6 4e 5e |N^ | UNLK A6 000220b8 4e 75 |Nu | RTS 000220ba ; -------------------------------------------------------------------------------------- 000220ba ; OMSI PASCAL Function 000220ba ; <LVAR 0x008 4(rw)> 000220ba ; <LVAR -0x004 1(rw)> 000220ba ; <LVAR -0x010 2(rw)> 000220ba ; -------------------------------------------------------------------------------------- 000220ba 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 000220be bf d5 | | CMPA.L (A5),A7 000220c0 62 06 |b | BHI 0x220c8 000220c2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000220c6 4e 76 |Nv | TRAPV 000220c8 de fc 00 30 | 0 | ADDA.W #0x30,A7 000220cc 48 e7 c7 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 000220d0 43 ee ff f0 |C | LEA.L (A6-0x10),A1 000220d4 45 ee ff fc |E | LEA.L (A6-0x4),A2 000220d8 47 ee 00 08 |G | LEA.L (A6+0x8),A3 000220dc 72 20 |r | MOVEQ.L #0x20,D1 000220de 7c 01 || | MOVEQ.L #0x01,D6 000220e0 42 51 |BQ | CLR.W (A1) 000220e2 7a 01 |z | MOVEQ.L #0x01,D5 000220e4 59 4f |YO | SUBQ.L #0x4,A7 000220e6 2f 13 |/ | MOVE.L (A3),-(A7) 000220e8 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 000220ee 58 4f |XO | ADDQ.L #0x4,A7 000220f0 26 9f |& | MOVE.L (A7)+,(A3) 000220f2 20 53 | S | MOVEA.L (A3),A0 000220f4 2f 08 |/ | MOVE.L A0,-(A7) 000220f6 20 57 | W | MOVEA.L (A7),A0 000220f8 30 10 |0 | MOVE.W (A0),D0 000220fa 48 c0 |H | EXTW.L D0 000220fc bc 80 | | CMP.L D0,D6 000220fe 6e 00 00 b0 |n | BGT 0x221b0 00022102 42 80 |B | CLR.L D0 00022104 10 30 68 01 | 0h | MOVE.B (A0+D6.L+#0x1),D0 00022108 02 40 00 7f | @ | ANDI.W #0x007f,D0 0002210c 14 80 | | MOVE.B D0,(A2) 0002210e 0c 00 00 09 | | CMPI.B #0x09,D0 00022112 66 02 |f | BNE 0x22116 00022114 14 81 | | MOVE.B D1,(A2) 00022116 42 80 |B | CLR.L D0 00022118 10 12 | | MOVE.B (A2),D0 0002211a 90 41 | A | SUB.W D1,D0 0002211c 0c 40 00 0c | @ | CMPI.W #0x000c,D0 00022120 62 30 |b0 | BHI switch@0x22124[0x2] 00022122 d0 40 | @ | ADD.W D0,D0 00022124 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 0002212c 00 1e | | .CONST 0x1e ; [0x0] -> 0x2214a 0002212e 00 1a | | .CONST 0x1a ; [0x1] -> 0x22146 00022130 00 26 | & | .CONST 0x26 ; [0x2] -> 0x22152 00022132 00 26 | & | .CONST 0x26 ; [0x3] -> 0x22152 00022134 00 26 | & | .CONST 0x26 ; [0x4] -> 0x22152 00022136 00 26 | & | .CONST 0x26 ; [0x5] -> 0x22152 00022138 00 26 | & | .CONST 0x26 ; [0x6] -> 0x22152 0002213a 00 26 | & | .CONST 0x26 ; [0x7] -> 0x22152 0002213c 00 26 | & | .CONST 0x26 ; [0x8] -> 0x22152 0002213e 00 26 | & | .CONST 0x26 ; [0x9] -> 0x22152 00022140 00 26 | & | .CONST 0x26 ; [0xa] -> 0x22152 00022142 00 26 | & | .CONST 0x26 ; [0xb] -> 0x22152 00022144 00 22 | " | .CONST 0x22 ; [0xc] -> 0x2214e 00022146 switch@0x22124[0x1]: 00022146 60 68 |`h | BRA 0x221b0 00022148 60 0a |` | .XXX[0x2] 0002214a switch@0x22124[0x0]: 0002214a 7e 00 |~ | MOVEQ.L #0x00,D7 0002214c 60 06 |` | BRA 0x22154 0002214e switch@0x22124[0xc]: 0002214e 7e 01 |~ | MOVEQ.L #0x01,D7 00022150 60 02 |` | BRA 0x22154 00022152 switch@0x22124[0x2]: 00022152 switch@0x22124[0x3]: 00022152 switch@0x22124[0x4]: 00022152 switch@0x22124[0x5]: 00022152 switch@0x22124[0x6]: 00022152 switch@0x22124[0x7]: 00022152 switch@0x22124[0x8]: 00022152 switch@0x22124[0x9]: 00022152 switch@0x22124[0xa]: 00022152 switch@0x22124[0xb]: 00022152 7e 02 |~ | MOVEQ.L #0x02,D7 00022154 70 03 |p | MOVEQ.L #0x03,D0 00022156 c1 d1 | | MULS.W (A1),D0 00022158 41 fa fc 28 |A ( | LEA.L 0x21d82,A0 0002215c 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00022160 42 80 |B | CLR.L D0 00022162 10 30 70 00 | 0p | MOVE.B (A0+D7.W),D0 00022166 0c 40 00 02 | @ | CMPI.W #0x0002,D0 0002216a 63 02 |c | BLS 0x2216e 0002216c 4e 4e |NN | TRAP #14 0002216e d0 40 | @ | ADD.W D0,D0 00022170 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00022178 00 06 | | .CONST 0x6 ; [0x0] -> 0x2217e 0002217a 00 08 | | .CONST 0x8 ; [0x1] -> 0x22180 0002217c 00 12 | | .CONST 0x12 ; [0x2] -> 0x2218a 0002217e switch@0x22170[0x0]: 0002217e 60 16 |` | BRA 0x22196 00022180 switch@0x22170[0x1]: 00022180 20 57 | W | MOVEA.L (A7),A0 00022182 11 92 58 01 | X | MOVE.B (A2),(A0+D5.L+#0x1) 00022186 52 85 |R | ADDQ.L #0x1,D5 00022188 60 0c |` | BRA 0x22196 0002218a switch@0x22170[0x2]: 0002218a 20 57 | W | MOVEA.L (A7),A0 0002218c 11 bc 00 2c 58 01 | ,X | MOVE.B #0x2c,(A0+D5.L+#0x1) 00022192 52 85 |R | ADDQ.L #0x1,D5 00022194 53 86 |S | SUBQ.L #0x1,D6 00022196 70 03 |p | MOVEQ.L #0x03,D0 00022198 c1 d1 | | MULS.W (A1),D0 0002219a 41 fa fb ef |A | LEA.L 0x21d8b,A0 0002219e 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 000221a2 42 80 |B | CLR.L D0 000221a4 10 30 70 00 | 0p | MOVE.B (A0+D7.W),D0 000221a8 32 80 |2 | MOVE.W D0,(A1) 000221aa 52 86 |R | ADDQ.L #0x1,D6 000221ac 60 00 ff 48 |` H | BRA 0x220f6 000221b0 20 57 | W | MOVEA.L (A7),A0 000221b2 20 05 | | MOVE.L D5,D0 000221b4 53 80 |S | SUBQ.L #0x1,D0 000221b6 30 80 |0 | MOVE.W D0,(A0) 000221b8 58 4f |XO | ADDQ.L #0x4,A7 000221ba 4c df 0f e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3 000221be 4e 5e |N^ | UNLK A6 000221c0 4e 75 |Nu | RTS 000221c2 ; -------------------------------------------------------------------------------------- 000221c2 ; OMSI PASCAL Function 000221c2 ; <LVAR 0x00c 4(r)> 000221c2 ; <LVAR 0x008 4(r)> 000221c2 ; <LVAR -0x002 @ 1(r)> 000221c2 ; <LVAR -0x00a @> 000221c2 ; <LVAR -0x00e @ 4(r)> 000221c2 ; <LVAR -0x014 @ 1(r)> 000221c2 ; -------------------------------------------------------------------------------------- 000221c2 4e 56 ff bc |NV | LINK.W A6,#0xffbc 000221c6 bf d5 | | CMPA.L (A5),A7 000221c8 62 06 |b | BHI 0x221d0 000221ca 44 fc 00 02 |D | MOVE.W #0x2,CCR 000221ce 4e 76 |Nv | TRAPV 000221d0 de fc 00 30 | 0 | ADDA.W #0x30,A7 000221d4 48 e7 c1 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D1+D0,-(A7) 000221d8 47 ee ff f2 |G | LEA.L (A6-0xe),A3 000221dc 72 01 |r | MOVEQ.L #0x01,D1 000221de 55 4f |UO | SUBQ.L #0x2,A7 000221e0 4e ba fc de |N | JSR 0x21ec0 000221e4 10 1f | | MOVE.B (A7)+,D0 000221e6 0c 00 00 5b | [ | CMPI.B #0x5b,D0 000221ea 66 08 |f | BNE 0x221f4 000221ec 55 4f |UO | SUBQ.L #0x2,A7 000221ee 4e ba fd 0e |N | JSR 0x21efe 000221f2 1e 1f | | MOVE.B (A7)+,D7 000221f4 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000221f8 20 81 | | MOVE.L D1,(A0) 000221fa 42 2e ff ec |B. | CLR.B (A6-0x14) 000221fe 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00022202 48 6e ff fe |Hn | PEA.L (A6-0x2) 00022206 48 6e ff ec |Hn | PEA.L (A6-0x14) 0002220a 4e ba fe 10 |N | JSR 0x2201c 0002220e de fc 00 0c | | ADDA.W #0xc,A7 00022212 4a 2e ff fe |J. | TST.B (A6-0x2) 00022216 66 36 |f6 | BNE 0x2224e 00022218 48 53 |HS | PEA.L (A3) 0002221a 48 78 00 0c |Hx | PEA.L 0xc 0002221e 4e b9 00 01 02 9c |N | JSR Malloc1(length : Long) : Pointer 00022224 50 4f |PO | ADDQ.L #0x8,A7 00022226 20 53 | S | MOVEA.L (A3),A0 00022228 22 48 |"H | MOVEA.L A0,A1 0002222a 45 ee ff f6 |E | LEA.L (A6-0xa),A2 0002222e 70 07 |p | MOVEQ.L #0x07,D0 00022230 12 da | | MOVE.B (A2)+,(A1)+ 00022232 51 c8 ff fc |Q | DBF D0,0x22230 00022236 21 41 00 08 |!A | MOVE.L D1,(A0+0x8) 0002223a 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 0002223e 22 50 |"P | MOVEA.L (A0),A1 00022240 b2 c1 | | CMPA.W D1,A1 00022242 66 04 |f | BNE 0x22248 00022244 20 93 | | MOVE.L (A3),(A0) 00022246 60 04 |` | BRA 0x2224c 00022248 29 53 00 08 |)S | MOVE.L (A3),(A4+0x8) 0002224c 28 53 |(S | MOVEA.L (A3),A4 0002224e 4a 2e ff fe |J. | TST.B (A6-0x2) 00022252 67 aa |g | BEQ 0x221fe 00022254 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022258 42 10 |B | CLR.B (A0) 0002225a 10 2e ff fe | . | MOVE.B (A6-0x2),D0 0002225e 0c 00 00 02 | | CMPI.B #0x02,D0 00022262 66 02 |f | BNE 0x22266 00022264 52 10 |R | ADDQ.B #0x1,(A0) 00022266 4c df 1f 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2+A3+A4 0002226a 4e 5e |N^ | UNLK A6 0002226c 4e 75 |Nu | RTS 0002226e ; -------------------------------------------------------------------------------------- 0002226e ; OMSI PASCAL Function 0002226e ; <LVAR 0x00c 4(w)> 0002226e ; <LVAR 0x008 4(r)> 0002226e ; -------------------------------------------------------------------------------------- 0002226e 4e 56 ff ec |NV | LINK.W A6,#0xffec 00022272 bf d5 | | CMPA.L (A5),A7 00022274 62 06 |b | BHI 0x2227c 00022276 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002227a 4e 76 |Nv | TRAPV 0002227c de fc 00 0c | | ADDA.W #0xc,A7 00022280 48 e7 01 08 |H | MOVEM.L A4+D7,-(A7) 00022284 7e ff |~ | MOVEQ.L #-0x01,D7 00022286 28 6e 00 08 |(n | MOVEA.L (A6+0x8),A4 0002228a b8 fc 00 01 | | CMPA.W #0x1,A4 0002228e 67 08 |g | BEQ 0x22298 00022290 52 87 |R | ADDQ.L #0x1,D7 00022292 28 6c 00 08 |(l | MOVEA.L (A4+0x8),A4 00022296 60 f2 |` | BRA 0x2228a 00022298 2d 47 00 0c |-G | MOVE.L D7,(A6+0xc) 0002229c 4c df 10 80 |L | MOVEM.L (A7)+,D7+A4 000222a0 4e 5e |N^ | UNLK A6 000222a2 4e 75 |Nu | RTS 000222a4 ; -------------------------------------------------------------------------------------- 000222a4 ; OMSI PASCAL Function 000222a4 ; <LVAR 0x00c 4(r)> 000222a4 ; <LVAR 0x008 4(r)> 000222a4 ; -------------------------------------------------------------------------------------- 000222a4 4e 56 ff b0 |NV | LINK.W A6,#0xffb0 000222a8 bf d5 | | CMPA.L (A5),A7 000222aa 62 06 |b | BHI 0x222b2 000222ac 44 fc 00 02 |D | MOVE.W #0x2,CCR 000222b0 4e 76 |Nv | TRAPV 000222b2 de fc 00 4e | N | ADDA.W #0x4e,A7 000222b6 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 000222ba 72 01 |r | MOVEQ.L #0x01,D1 000222bc 59 4f |YO | SUBQ.L #0x4,A7 000222be 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000222c2 4e ba ff aa |N | JSR 0x2226e 000222c6 58 4f |XO | ADDQ.L #0x4,A7 000222c8 20 1f | | MOVE.L (A7)+,D0 000222ca b0 ae 00 08 | | CMP.L (A6+0x8),D0 000222ce 67 58 |gX | BEQ 0x22328 000222d0 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000222d4 4e ba fb 4a |N J | JSR 0x21e20 000222d8 58 4f |XO | ADDQ.L #0x4,A7 000222da 41 fa f6 8a |A | LEA.L 0x21966,A0 000222de 70 07 |p | MOVEQ.L #0x07,D0 000222e0 2f 20 |/ | MOVE.L -(A0),-(A7) 000222e2 51 c8 ff fc |Q | DBF D0,0x222e0 000222e6 41 ee 00 1a |A | LEA.L (A6+0x1a),A0 000222ea 70 04 |p | MOVEQ.L #0x04,D0 000222ec 3f 20 |? | MOVE.W -(A0),-(A7) 000222ee 51 c8 ff fc |Q | DBF D0,0x222ec 000222f2 51 4f |QO | SUBQ.L #0x8,A7 000222f4 48 6f 00 12 |Ho | PEA.L (A7+0x12) 000222f8 3f 01 |? | MOVE.W D1,-(A7) 000222fa 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7) 000222fe 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022304 58 4f |XO | ADDQ.L #0x4,A7 00022306 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002230a 3f 01 |? | MOVE.W D1,-(A7) 0002230c 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00022310 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022316 50 4f |PO | ADDQ.L #0x8,A7 00022318 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002231e 50 4f |PO | ADDQ.L #0x8,A7 00022320 4e ba fb 40 |N @ | JSR 0x21e62 00022324 de fc 00 2e | . | ADDA.W #0x2e,A7 00022328 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 0002232c 4e 5e |N^ | UNLK A6 0002232e 4e 75 |Nu | RTS 00022330 ; -------------------------------------------------------------------------------------- 00022330 ; OMSI PASCAL Function 00022330 ; <LVAR 0x014 1(rw)> 00022330 ; <LVAR 0x010 4(r)> 00022330 ; <LVAR 0x00c 4(r)> 00022330 ; <LVAR 0x008 4(r)> 00022330 ; -------------------------------------------------------------------------------------- 00022330 4e 56 ff dc |NV | LINK.W A6,#0xffdc ; Spelunked 00022334 bf d5 | | CMPA.L (A5),A7 00022336 62 06 |b | BHI 0x2233e 00022338 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002233c 4e 76 |Nv | TRAPV 0002233e de fc 00 20 | | ADDA.W #0x20,A7 00022342 48 e7 c1 c0 |H | MOVEM.L A1+A0+D7+D1+D0,-(A7) 00022346 42 2e 00 14 |B. | CLR.B (A6+0x14) 0002234a 20 2e 00 10 | . | MOVE.L (A6+0x10),D0 0002234e d0 ae 00 08 | | ADD.L (A6+0x8),D0 00022352 b0 b9 00 02 7a 0c | z | CMP.L 0x27a0c,D0 00022358 6e 4e |nN | BGT 0x223a8 0002235a 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002235e 7e 01 |~ | MOVEQ.L #0x01,D7 00022360 be 97 | | CMP.L (A7),D7 00022362 6e 42 |nB | BGT 0x223a6 00022364 20 2e 00 10 | . | MOVE.L (A6+0x10),D0 00022368 d0 87 | | ADD.L D7,D0 0002236a 53 80 |S | SUBQ.L #0x1,D0 0002236c 0c 80 00 00 1f ff | | CMPI.L #0x00001fff,D0 00022372 63 02 |c | BLS 0x22376 00022374 4e 4f |NO | TRAP #15 00022376 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 0002237c 22 2e 00 0c |". | MOVE.L (A6+0xc),D1 00022380 d2 87 | | ADD.L D7,D1 00022382 53 81 |S | SUBQ.L #0x1,D1 00022384 53 81 |S | SUBQ.L #0x1,D1 00022386 0c 81 00 00 00 3e | > | CMPI.L #0x0000003e,D1 0002238c 63 02 |c | BLS 0x22390 0002238e 4e 4f |NO | TRAP #15 00022390 43 fa f5 d4 |C | LEA.L 0x21966,A1 00022394 10 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D0 00022398 b0 31 18 00 | 1 | CMP.B (A1+D1.L),D0 0002239c 67 04 |g | BEQ 0x223a2 0002239e 58 4f |XO | ADDQ.L #0x4,A7 000223a0 60 0c |` | BRA 0x223ae 000223a2 52 87 |R | ADDQ.L #0x1,D7 000223a4 68 ba |h | BVC 0x22360 000223a6 58 4f |XO | ADDQ.L #0x4,A7 000223a8 1d 7c 00 01 00 14 | | | MOVE.B #0x01,(A6+0x14) 000223ae 4c df 03 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1 000223b2 4e 5e |N^ | UNLK A6 000223b4 4e 75 |Nu | RTS 000223b6 ; -------------------------------------------------------------------------------------- 000223b6 ; OMSI PASCAL Function 000223b6 ; <LVAR 0x00c 4(r)> 000223b6 ; <LVAR 0x008 4(r)> 000223b6 ; -------------------------------------------------------------------------------------- 000223b6 4e 56 ff bc |NV | LINK.W A6,#0xffbc 000223ba bf d5 | | CMPA.L (A5),A7 000223bc 62 06 |b | BHI 0x223c4 000223be 44 fc 00 02 |D | MOVE.W #0x2,CCR 000223c2 4e 76 |Nv | TRAPV 000223c4 de fc 00 40 | @ | ADDA.W #0x40,A7 000223c8 48 e7 80 f0 |H | MOVEM.L A3+A2+A1+A0+D0,-(A7) 000223cc 45 f9 00 02 7a 0c |E z | LEA.L 0x27a0c,A2 000223d2 47 ee 00 08 |G | LEA.L (A6+0x8),A3 000223d6 4a 93 |J | TST.L (A3) 000223d8 6c 3e |l> | BGE 0x22418 000223da 20 13 | | MOVE.L (A3),D0 000223dc 44 80 |D | NEG.L D0 000223de d0 92 | | ADD.L (A2),D0 000223e0 0c 80 00 00 20 00 | | CMPI.L #0x00002000,D0 000223e6 6f 30 |o0 | BLE 0x22418 000223e8 9e fc 00 1c | | SUBA.W #0x1c,A7 000223ec 20 4f | O | MOVEA.L A7,A0 000223ee 43 fa f5 b6 |C | LEA.L 0x219a6,A1 000223f2 70 1a |p | MOVEQ.L #0x1a,D0 000223f4 10 d9 | | MOVE.B (A1)+,(A0)+ 000223f6 51 c8 ff fc |Q | DBF D0,0x223f4 000223fa 59 4f |YO | SUBQ.L #0x4,A7 000223fc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022400 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022404 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 00022408 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002240e 50 4f |PO | ADDQ.L #0x8,A7 00022410 4e ba fa 50 |N P | JSR 0x21e62 00022414 de fc 00 20 | | ADDA.W #0x20,A7 00022418 41 f9 00 02 5a 08 |A Z | LEA.L 0x25a08,A0 0002241e 2f 08 |/ | MOVE.L A0,-(A7) 00022420 2f 12 |/ | MOVE.L (A2),-(A7) 00022422 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00022426 2f 13 |/ | MOVE.L (A3),-(A7) 00022428 4e b9 00 01 03 64 |N d | JSR MovStringTail(Base, Len, Ptr, Delta) 0002242e de fc 00 10 | | ADDA.W #0x10,A7 00022432 20 12 | | MOVE.L (A2),D0 00022434 90 93 | | SUB.L (A3),D0 00022436 24 80 |$ | MOVE.L D0,(A2) 00022438 4c df 0f 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2+A3 0002243c 4e 5e |N^ | UNLK A6 0002243e 4e 75 |Nu | RTS 00022440 ; -------------------------------------------------------------------------------------- 00022440 ; OMSI PASCAL Function 00022440 ; <LVAR 0x00c 4(r)> 00022440 ; <LVAR 0x008 4(r)> 00022440 ; -------------------------------------------------------------------------------------- 00022440 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 00022444 bf d5 | | CMPA.L (A5),A7 00022446 62 06 |b | BHI 0x2244e 00022448 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002244c 4e 76 |Nv | TRAPV 0002244e de fc 00 28 | ( | ADDA.W #0x28,A7 00022452 48 e7 c1 e0 |H | MOVEM.L A2+A1+A0+D7+D1+D0,-(A7) 00022456 45 ee 00 0c |E | LEA.L (A6+0xc),A2 0002245a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002245e 2f 08 |/ | MOVE.L A0,-(A7) 00022460 22 52 |"R | MOVEA.L (A2),A1 00022462 2f 11 |/ | MOVE.L (A1),-(A7) 00022464 30 10 |0 | MOVE.W (A0),D0 00022466 48 c0 |H | EXTW.L D0 00022468 44 80 |D | NEG.L D0 0002246a 2f 00 |/ | MOVE.L D0,-(A7) 0002246c 4e ba ff 48 |N H | JSR 0x223b6 00022470 50 4f |PO | ADDQ.L #0x8,A7 00022472 30 10 |0 | MOVE.W (A0),D0 00022474 48 c0 |H | EXTW.L D0 00022476 2f 00 |/ | MOVE.L D0,-(A7) 00022478 7e 01 |~ | MOVEQ.L #0x01,D7 0002247a be 97 | | CMP.L (A7),D7 0002247c 6e 36 |n6 | BGT 0x224b4 0002247e 20 52 | R | MOVEA.L (A2),A0 00022480 20 07 | | MOVE.L D7,D0 00022482 d0 90 | | ADD.L (A0),D0 00022484 53 80 |S | SUBQ.L #0x1,D0 00022486 53 80 |S | SUBQ.L #0x1,D0 00022488 0c 80 00 00 1f ff | | CMPI.L #0x00001fff,D0 0002248e 63 02 |c | BLS 0x22492 00022490 4e 4f |NO | TRAP #15 00022492 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 00022498 22 07 |" | MOVE.L D7,D1 0002249a 53 81 |S | SUBQ.L #0x1,D1 0002249c 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 000224a2 63 02 |c | BLS 0x224a6 000224a4 4e 4f |NO | TRAP #15 000224a6 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 000224aa 11 b1 18 02 08 08 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8) 000224b0 52 87 |R | ADDQ.L #0x1,D7 000224b2 68 c6 |h | BVC 0x2247a 000224b4 58 4f |XO | ADDQ.L #0x4,A7 000224b6 20 52 | R | MOVEA.L (A2),A0 000224b8 22 57 |"W | MOVEA.L (A7),A1 000224ba 30 11 |0 | MOVE.W (A1),D0 000224bc 48 c0 |H | EXTW.L D0 000224be d1 90 | | ADD.L D0,(A0) 000224c0 58 4f |XO | ADDQ.L #0x4,A7 000224c2 4c df 07 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2 000224c6 4e 5e |N^ | UNLK A6 000224c8 4e 75 |Nu | RTS 000224ca ; -------------------------------------------------------------------------------------- 000224ca ; OMSI PASCAL Function 000224ca ; <LVAR 0x00c 4(r)> 000224ca ; <LVAR 0x008 4(r)> 000224ca ; -------------------------------------------------------------------------------------- 000224ca 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 000224ce bf d5 | | CMPA.L (A5),A7 000224d0 62 06 |b | BHI 0x224d8 000224d2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000224d6 4e 76 |Nv | TRAPV 000224d8 de fc 00 50 | P | ADDA.W #0x50,A7 000224dc 48 e7 c3 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D1+D0,-(A7) 000224e0 45 fa fe 4e |E N | LEA.L 0x22330,A2 000224e4 47 f8 00 04 |G | LEA.L 0x4,A3 000224e8 49 ee 00 08 |I | LEA.L (A6+0x8),A4 000224ec 72 0c |r | MOVEQ.L #0x0c,D1 000224ee 7e 00 |~ | MOVEQ.L #0x00,D7 000224f0 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000224f4 42 90 |B | CLR.L (A0) 000224f6 20 54 | T | MOVEA.L (A4),A0 000224f8 42 90 |B | CLR.L (A0) 000224fa 2c 39 00 02 7a 08 |,9 z | MOVE.L 0x27a08,D6 00022500 20 06 | | MOVE.L D6,D0 00022502 53 80 |S | SUBQ.L #0x1,D0 00022504 0c 80 00 00 1f ff | | CMPI.L #0x00001fff,D0 0002250a 63 02 |c | BLS 0x2250e 0002250c 4e 4f |NO | TRAP #15 0002250e 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 00022514 10 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D0 00022518 0c 00 00 5b | [ | CMPI.B #0x5b,D0 0002251c 66 00 00 d4 |f | BNE 0x225f2 00022520 55 4f |UO | SUBQ.L #0x2,A7 00022522 2f 06 |/ | MOVE.L D6,-(A7) 00022524 48 78 00 01 |Hx | PEA.L 0x1 00022528 48 78 00 03 |Hx | PEA.L 0x3 0002252c 4e 92 |N | JSR (A2) 0002252e de c1 | | ADDA.W D1,A7 00022530 4a 1f |J | TST.B (A7)+ 00022532 66 7e |f~ | BNE 0x225b2 00022534 55 4f |UO | SUBQ.L #0x2,A7 00022536 2f 06 |/ | MOVE.L D6,-(A7) 00022538 48 53 |HS | PEA.L (A3) 0002253a 48 78 00 03 |Hx | PEA.L 0x3 0002253e 4e 92 |N | JSR (A2) 00022540 de c1 | | ADDA.W D1,A7 00022542 4a 1f |J | TST.B (A7)+ 00022544 66 6c |fl | BNE 0x225b2 00022546 55 4f |UO | SUBQ.L #0x2,A7 00022548 2f 06 |/ | MOVE.L D6,-(A7) 0002254a 48 78 00 07 |Hx | PEA.L 0x7 0002254e 48 53 |HS | PEA.L (A3) 00022550 4e 92 |N | JSR (A2) 00022552 de c1 | | ADDA.W D1,A7 00022554 4a 1f |J | TST.B (A7)+ 00022556 66 5a |fZ | BNE 0x225b2 00022558 55 4f |UO | SUBQ.L #0x2,A7 0002255a 2f 06 |/ | MOVE.L D6,-(A7) 0002255c 48 78 00 0b |Hx | PEA.L 0xb 00022560 48 53 |HS | PEA.L (A3) 00022562 4e 92 |N | JSR (A2) 00022564 de c1 | | ADDA.W D1,A7 00022566 4a 1f |J | TST.B (A7)+ 00022568 66 48 |fH | BNE 0x225b2 0002256a 55 4f |UO | SUBQ.L #0x2,A7 0002256c 2f 06 |/ | MOVE.L D6,-(A7) 0002256e 48 78 00 0f |Hx | PEA.L 0xf 00022572 48 53 |HS | PEA.L (A3) 00022574 4e 92 |N | JSR (A2) 00022576 de c1 | | ADDA.W D1,A7 00022578 4a 1f |J | TST.B (A7)+ 0002257a 66 36 |f6 | BNE 0x225b2 0002257c 55 4f |UO | SUBQ.L #0x2,A7 0002257e 2f 06 |/ | MOVE.L D6,-(A7) 00022580 48 78 00 13 |Hx | PEA.L 0x13 00022584 48 53 |HS | PEA.L (A3) 00022586 4e 92 |N | JSR (A2) 00022588 de c1 | | ADDA.W D1,A7 0002258a 4a 1f |J | TST.B (A7)+ 0002258c 66 24 |f$ | BNE 0x225b2 0002258e 55 4f |UO | SUBQ.L #0x2,A7 00022590 2f 06 |/ | MOVE.L D6,-(A7) 00022592 48 78 00 17 |Hx | PEA.L 0x17 00022596 48 53 |HS | PEA.L (A3) 00022598 4e 92 |N | JSR (A2) 0002259a de c1 | | ADDA.W D1,A7 0002259c 4a 1f |J | TST.B (A7)+ 0002259e 66 12 |f | BNE 0x225b2 000225a0 55 4f |UO | SUBQ.L #0x2,A7 000225a2 2f 06 |/ | MOVE.L D6,-(A7) 000225a4 48 78 00 1b |Hx | PEA.L 0x1b 000225a8 48 53 |HS | PEA.L (A3) 000225aa 4e 92 |N | JSR (A2) 000225ac de c1 | | ADDA.W D1,A7 000225ae 4a 1f |J | TST.B (A7)+ 000225b0 67 04 |g | BEQ 0x225b6 000225b2 52 87 |R | ADDQ.L #0x1,D7 000225b4 60 3c |`< | BRA 0x225f2 000225b6 4a 87 |J | TST.L D7 000225b8 66 1c |f | BNE 0x225d6 000225ba 55 4f |UO | SUBQ.L #0x2,A7 000225bc 2f 06 |/ | MOVE.L D6,-(A7) 000225be 48 78 00 1f |Hx | PEA.L 0x1f 000225c2 48 78 00 05 |Hx | PEA.L 0x5 000225c6 4e 92 |N | JSR (A2) 000225c8 de c1 | | ADDA.W D1,A7 000225ca 4a 1f |J | TST.B (A7)+ 000225cc 67 08 |g | BEQ 0x225d6 000225ce 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000225d2 20 86 | | MOVE.L D6,(A0) 000225d4 60 1c |` | BRA 0x225f2 000225d6 55 4f |UO | SUBQ.L #0x2,A7 000225d8 2f 06 |/ | MOVE.L D6,-(A7) 000225da 48 78 00 24 |Hx $ | PEA.L 0x24 000225de 48 53 |HS | PEA.L (A3) 000225e0 4e 92 |N | JSR (A2) 000225e2 de c1 | | ADDA.W D1,A7 000225e4 4a 1f |J | TST.B (A7)+ 000225e6 67 0a |g | BEQ 0x225f2 000225e8 4a 87 |J | TST.L D7 000225ea 66 04 |f | BNE 0x225f0 000225ec 20 54 | T | MOVEA.L (A4),A0 000225ee 60 e2 |` | BRA 0x225d2 000225f0 53 87 |S | SUBQ.L #0x1,D7 000225f2 52 86 |R | ADDQ.L #0x1,D6 000225f4 bc b9 00 02 7a 0c | z | CMP.L 0x27a0c,D6 000225fa 6e 0e |n | BGT 0x2260a 000225fc 4a 87 |J | TST.L D7 000225fe 66 00 ff 00 |f | BNE 0x22500 00022602 20 54 | T | MOVEA.L (A4),A0 00022604 4a 90 |J | TST.L (A0) 00022606 67 00 fe f8 |g | BEQ 0x22500 0002260a bc b9 00 02 7a 0c | z | CMP.L 0x27a0c,D6 00022610 6f 30 |o0 | BLE 0x22642 00022612 9e fc 00 1c | | SUBA.W #0x1c,A7 00022616 20 4f | O | MOVEA.L A7,A0 00022618 43 fa f3 a8 |C | LEA.L 0x219c2,A1 0002261c 70 1a |p | MOVEQ.L #0x1a,D0 0002261e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022620 51 c8 ff fc |Q | DBF D0,0x2261e 00022624 59 4f |YO | SUBQ.L #0x4,A7 00022626 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002262a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002262e 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 00022632 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022638 50 4f |PO | ADDQ.L #0x8,A7 0002263a 4e ba f8 26 |N & | JSR 0x21e62 0002263e de fc 00 20 | | ADDA.W #0x20,A7 00022642 4c df 1f c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0+A1+A2+A3+A4 00022646 4e 5e |N^ | UNLK A6 00022648 4e 75 |Nu | RTS 0002264a ; -------------------------------------------------------------------------------------- 0002264a ; OMSI PASCAL Function 0002264a ; <LVAR -0x004 @ 4(r)> 0002264a ; <LVAR -0x008 @ 4(rw)> 0002264a ; -------------------------------------------------------------------------------------- 0002264a 4e 56 ff dc |NV | LINK.W A6,#0xffdc 0002264e bf d5 | | CMPA.L (A5),A7 00022650 62 06 |b | BHI 0x22658 00022652 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022656 4e 76 |Nv | TRAPV 00022658 de fc 00 1c | | ADDA.W #0x1c,A7 0002265c 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00022660 41 ee ff f8 |A | LEA.L (A6-0x8),A0 00022664 43 ee ff fc |C | LEA.L (A6-0x4),A1 00022668 48 50 |HP | PEA.L (A0) 0002266a 48 51 |HQ | PEA.L (A1) 0002266c 4e ba fe 5c |N \ | JSR 0x224ca 00022670 50 4f |PO | ADDQ.L #0x8,A7 00022672 4a 90 |J | TST.L (A0) 00022674 66 02 |f | BNE 0x22678 00022676 20 91 | | MOVE.L (A1),(A0) 00022678 20 11 | | MOVE.L (A1),D0 0002267a 5a 80 |Z | ADDQ.L #0x5,D0 0002267c 2f 00 |/ | MOVE.L D0,-(A7) 0002267e 90 90 | | SUB.L (A0),D0 00022680 2f 00 |/ | MOVE.L D0,-(A7) 00022682 4e ba fd 32 |N 2 | JSR 0x223b6 00022686 50 4f |PO | ADDQ.L #0x8,A7 00022688 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 0002268c 4e 5e |N^ | UNLK A6 0002268e 4e 75 |Nu | RTS 00022690 ; -------------------------------------------------------------------------------------- 00022690 ; OMSI PASCAL Function 00022690 ; <LVAR -0x004 @ 4(r)> 00022690 ; <LVAR -0x008 @ 4(r)> 00022690 ; -------------------------------------------------------------------------------------- 00022690 4e 56 ff dc |NV | LINK.W A6,#0xffdc 00022694 bf d5 | | CMPA.L (A5),A7 00022696 62 06 |b | BHI 0x2269e 00022698 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002269c 4e 76 |Nv | TRAPV 0002269e de fc 00 1c | | ADDA.W #0x1c,A7 000226a2 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 000226a6 41 ee ff f8 |A | LEA.L (A6-0x8),A0 000226aa 43 ee ff fc |C | LEA.L (A6-0x4),A1 000226ae 48 50 |HP | PEA.L (A0) 000226b0 48 51 |HQ | PEA.L (A1) 000226b2 4e ba fe 16 |N | JSR 0x224ca 000226b6 50 4f |PO | ADDQ.L #0x8,A7 000226b8 4a 90 |J | TST.L (A0) 000226ba 66 06 |f | BNE 0x226c2 000226bc 20 11 | | MOVE.L (A1),D0 000226be 5a 80 |Z | ADDQ.L #0x5,D0 000226c0 60 12 |` | BRA 0x226d4 000226c2 2f 11 |/ | MOVE.L (A1),-(A7) 000226c4 5a 97 |Z | ADDQ.L #0x5,(A7) 000226c6 48 78 00 05 |Hx | PEA.L 0x5 000226ca 4e ba fc ea |N | JSR 0x223b6 000226ce 50 4f |PO | ADDQ.L #0x8,A7 000226d0 20 10 | | MOVE.L (A0),D0 000226d2 5c 80 |\ | ADDQ.L #0x6,D0 000226d4 2f 00 |/ | MOVE.L D0,-(A7) 000226d6 90 b9 00 02 7a 08 | z | SUB.L 0x27a08,D0 000226dc 2f 00 |/ | MOVE.L D0,-(A7) 000226de 4e ba fc d6 |N | JSR 0x223b6 000226e2 50 4f |PO | ADDQ.L #0x8,A7 000226e4 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 000226e8 4e 5e |N^ | UNLK A6 000226ea 4e 75 |Nu | RTS 000226ec ; -------------------------------------------------------------------------------------- 000226ec ; OMSI PASCAL Function 000226ec ; <LVAR 0x008 4(r)> 000226ec ; <LVAR -0x004 @> 000226ec ; <LVAR -0x008 @ 4(r)> 000226ec ; <LVAR -0x00c @ 4(rw)> 000226ec ; <LVAR -0x010 4(rw)> 000226ec ; <LVAR -0x014 4(rw)> 000226ec ; -------------------------------------------------------------------------------------- 000226ec 4e 56 ff ba |NV | LINK.W A6,#0xffba 000226f0 bf d5 | | CMPA.L (A5),A7 000226f2 62 06 |b | BHI 0x226fa 000226f4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000226f8 4e 76 |Nv | TRAPV 000226fa de fc 00 32 | 2 | ADDA.W #0x32,A7 000226fe 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 00022702 43 f9 00 02 7a 1a |C z | LEA.L 0x27a1a,A1 00022708 45 f9 00 02 7a 20 |E z | LEA.L 0x27a20,A2 0002270e 47 f9 00 02 7a 08 |G z | LEA.L 0x27a08,A3 00022714 49 ee ff f8 |I | LEA.L (A6-0x8),A4 00022718 72 01 |r | MOVEQ.L #0x01,D1 0002271a 4a 11 |J | TST.B (A1) 0002271c 67 0a |g | BEQ 0x22728 0002271e 4a 92 |J | TST.L (A2) 00022720 66 06 |f | BNE 0x22728 00022722 24 ae 00 08 |$ | MOVE.L (A6+0x8),(A2) 00022726 53 92 |S | SUBQ.L #0x1,(A2) 00022728 4a 11 |J | TST.B (A1) 0002272a 66 00 00 cc |f | BNE 0x227f8 0002272e 26 ae 00 08 |& | MOVE.L (A6+0x8),(A3) 00022732 5c 93 |\ | ADDQ.L #0x6,(A3) 00022734 48 54 |HT | PEA.L (A4) 00022736 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002273a 4e ba fa 86 |N | JSR 0x221c2 0002273e 50 4f |PO | ADDQ.L #0x8,A7 00022740 41 fa f2 a6 |A | LEA.L 0x219e8,A0 00022744 70 04 |p | MOVEQ.L #0x04,D0 00022746 3f 20 |? | MOVE.W -(A0),-(A7) 00022748 51 c8 ff fc |Q | DBF D0,0x22746 0002274c 2f 14 |/ | MOVE.L (A4),-(A7) 0002274e 48 78 00 00 |Hx | PEA.L 0x0 00022752 4e ba fb 50 |N P | JSR 0x222a4 00022756 de fc 00 12 | | ADDA.W #0x12,A7 0002275a 4a 39 00 02 7a 24 |J9 z$ | TST.B 0x27a24 00022760 67 1a |g | BEQ 0x2277c 00022762 51 4f |QO | SUBQ.L #0x8,A7 00022764 2f 14 |/ | MOVE.L (A4),-(A7) 00022766 48 78 00 00 |Hx | PEA.L 0x0 0002276a 4e b9 00 02 2b bc |N + | JSR 0x22bbc 00022770 50 4f |PO | ADDQ.L #0x8,A7 00022772 2d 5f ff ec |-_ | MOVE.L (A7)+,(A6-0x14) 00022776 2d 5f ff f0 |-_ | MOVE.L (A7)+,(A6-0x10) 0002277a 60 14 |` | BRA 0x22790 0002277c 59 4f |YO | SUBQ.L #0x4,A7 0002277e 2f 14 |/ | MOVE.L (A4),-(A7) 00022780 48 78 00 00 |Hx | PEA.L 0x0 00022784 4e b9 00 02 2b 8a |N + | JSR 0x22b8a 0002278a 50 4f |PO | ADDQ.L #0x8,A7 0002278c 2d 5f ff f4 |-_ | MOVE.L (A7)+,(A6-0xc) 00022790 2f 14 |/ | MOVE.L (A4),-(A7) 00022792 4e ba f6 8c |N | JSR 0x21e20 00022796 58 4f |XO | ADDQ.L #0x4,A7 00022798 23 d3 00 02 7a 1c |# z | MOVE.L (A3),0x27a1c 0002279e 4a 39 00 02 7a 24 |J9 z$ | TST.B 0x27a24 000227a4 67 2a |g* | BEQ 0x227d0 000227a6 55 4f |UO | SUBQ.L #0x2,A7 000227a8 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 000227ac 2f 2e ff ec |/. | MOVE.L (A6-0x14),-(A7) 000227b0 2f 39 00 02 7a 2e |/9 z. | MOVE.L 0x27a2e,-(A7) 000227b6 2f 39 00 02 7a 2a |/9 z* | MOVE.L 0x27a2a,-(A7) 000227bc 4e b9 00 01 03 2c |N , | JSR IsEqual(a, b : Quad) : Bool 000227c2 de fc 00 10 | | ADDA.W #0x10,A7 000227c6 10 1f | | MOVE.B (A7)+,D0 000227c8 48 80 |H | EXTB.W D0 000227ca 41 81 |A | CHK.W D1,D0 000227cc 12 80 | | MOVE.B D0,(A1) 000227ce 60 28 |`( | BRA 0x227f8 000227d0 55 4f |UO | SUBQ.L #0x2,A7 000227d2 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 000227d6 2f 39 00 02 7a 26 |/9 z& | MOVE.L 0x27a26,-(A7) 000227dc 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000227e2 50 4f |PO | ADDQ.L #0x8,A7 000227e4 10 1f | | MOVE.B (A7)+,D0 000227e6 48 80 |H | EXTB.W D0 000227e8 41 81 |A | CHK.W D1,D0 000227ea 12 80 | | MOVE.B D0,(A1) 000227ec 48 6e ff f4 |Hn | PEA.L (A6-0xc) 000227f0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000227f6 58 4f |XO | ADDQ.L #0x4,A7 000227f8 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 000227fc 4e 5e |N^ | UNLK A6 000227fe 4e 75 |Nu | RTS 00022800 ; -------------------------------------------------------------------------------------- 00022800 ; OMSI PASCAL Function 00022800 ; <LVAR 0x010 4(r)> 00022800 ; <LVAR 0x00c 4(r)> 00022800 ; <LVAR 0x008 4(r)> 00022800 ; -------------------------------------------------------------------------------------- 00022800 4e 56 ff 9e |NV | LINK.W A6,#0xff9e 00022804 bf d5 | | CMPA.L (A5),A7 00022806 62 06 |b | BHI 0x2280e 00022808 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002280c 4e 76 |Nv | TRAPV 0002280e de fc 00 56 | V | ADDA.W #0x56,A7 00022812 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00022816 45 f9 00 02 7a 20 |E z | LEA.L 0x27a20,A2 0002281c 47 fa fb 12 |G | LEA.L 0x22330,A3 00022820 49 f9 00 02 7a 1a |I z | LEA.L 0x27a1a,A4 00022826 72 0c |r | MOVEQ.L #0x0c,D1 00022828 74 01 |t | MOVEQ.L #0x01,D2 0002282a 42 14 |B | CLR.B (A4) 0002282c 42 b9 00 02 7a 1c |B z | CLR.L 0x27a1c 00022832 42 92 |B | CLR.L (A2) 00022834 7e 00 |~ | MOVEQ.L #0x00,D7 00022836 7c 00 || | MOVEQ.L #0x00,D6 00022838 2a 39 00 02 7a 08 |*9 z | MOVE.L 0x27a08,D5 0002283e 4a 86 |J | TST.L D6 00022840 66 00 00 a0 |f | BNE 0x228e2 00022844 ba b9 00 02 7a 0c | z | CMP.L 0x27a0c,D5 0002284a 6e 00 00 96 |n | BGT 0x228e2 0002284e 20 05 | | MOVE.L D5,D0 00022850 53 80 |S | SUBQ.L #0x1,D0 00022852 0c 80 00 00 1f ff | | CMPI.L #0x00001fff,D0 00022858 63 02 |c | BLS 0x2285c 0002285a 4e 4f |NO | TRAP #15 0002285c 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 00022862 10 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D0 00022866 0c 00 00 5b | [ | CMPI.B #0x5b,D0 0002286a 66 6c |fl | BNE 0x228d8 0002286c 55 4f |UO | SUBQ.L #0x2,A7 0002286e 2f 05 |/ | MOVE.L D5,-(A7) 00022870 48 78 00 28 |Hx ( | PEA.L 0x28 00022874 48 78 00 05 |Hx | PEA.L 0x5 00022878 4e 93 |N | JSR (A3) 0002287a de c1 | | ADDA.W D1,A7 0002287c 4a 1f |J | TST.B (A7)+ 0002287e 66 14 |f | BNE 0x22894 00022880 55 4f |UO | SUBQ.L #0x2,A7 00022882 2f 05 |/ | MOVE.L D5,-(A7) 00022884 48 78 00 2d |Hx - | PEA.L 0x2d 00022888 48 78 00 06 |Hx | PEA.L 0x6 0002288c 4e 93 |N | JSR (A3) 0002288e de c1 | | ADDA.W D1,A7 00022890 4a 1f |J | TST.B (A7)+ 00022892 67 04 |g | BEQ 0x22898 00022894 52 87 |R | ADDQ.L #0x1,D7 00022896 60 40 |`@ | BRA 0x228d8 00022898 4a 87 |J | TST.L D7 0002289a 66 1e |f | BNE 0x228ba 0002289c 55 4f |UO | SUBQ.L #0x2,A7 0002289e 2f 05 |/ | MOVE.L D5,-(A7) 000228a0 48 78 00 33 |Hx 3 | PEA.L 0x33 000228a4 48 78 00 05 |Hx | PEA.L 0x5 000228a8 4e 93 |N | JSR (A3) 000228aa de c1 | | ADDA.W D1,A7 000228ac 4a 1f |J | TST.B (A7)+ 000228ae 67 0a |g | BEQ 0x228ba 000228b0 2f 05 |/ | MOVE.L D5,-(A7) 000228b2 4e ba fe 38 |N 8 | JSR 0x226ec 000228b6 58 4f |XO | ADDQ.L #0x4,A7 000228b8 60 1e |` | BRA 0x228d8 000228ba 55 4f |UO | SUBQ.L #0x2,A7 000228bc 2f 05 |/ | MOVE.L D5,-(A7) 000228be 48 78 00 38 |Hx 8 | PEA.L 0x38 000228c2 48 78 00 08 |Hx | PEA.L 0x8 000228c6 4e 93 |N | JSR (A3) 000228c8 de c1 | | ADDA.W D1,A7 000228ca 4a 1f |J | TST.B (A7)+ 000228cc 67 0a |g | BEQ 0x228d8 000228ce 4a 87 |J | TST.L D7 000228d0 66 04 |f | BNE 0x228d6 000228d2 2c 05 |, | MOVE.L D5,D6 000228d4 60 02 |` | BRA 0x228d8 000228d6 53 87 |S | SUBQ.L #0x1,D7 000228d8 4a 86 |J | TST.L D6 000228da 66 02 |f | BNE 0x228de 000228dc 52 85 |R | ADDQ.L #0x1,D5 000228de 60 00 ff 5e |` ^ | BRA 0x2283e 000228e2 4a 39 00 02 7a 24 |J9 z$ | TST.B 0x27a24 000228e8 66 0e |f | BNE 0x228f8 000228ea 48 79 00 02 7a 26 |Hy z& | PEA.L 0x27a26 000228f0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000228f6 58 4f |XO | ADDQ.L #0x4,A7 000228f8 4a 14 |J | TST.B (A4) 000228fa 66 28 |f( | BNE 0x22924 000228fc 41 fa f1 04 |A | LEA.L 0x21a02,A0 00022900 70 0c |p | MOVEQ.L #0x0c,D0 00022902 3f 20 |? | MOVE.W -(A0),-(A7) 00022904 51 c8 ff fc |Q | DBF D0,0x22902 00022908 59 4f |YO | SUBQ.L #0x4,A7 0002290a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002290e 3f 02 |? | MOVE.W D2,-(A7) 00022910 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 00022914 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002291a 50 4f |PO | ADDQ.L #0x8,A7 0002291c 4e ba f5 44 |N D | JSR 0x21e62 00022920 de fc 00 1e | | ADDA.W #0x1e,A7 00022924 4a 86 |J | TST.L D6 00022926 66 2e |f. | BNE 0x22956 00022928 9e fc 00 14 | | SUBA.W #0x14,A7 0002292c 20 4f | O | MOVEA.L A7,A0 0002292e 43 fa f0 d2 |C | LEA.L 0x21a02,A1 00022932 70 12 |p | MOVEQ.L #0x12,D0 00022934 10 d9 | | MOVE.B (A1)+,(A0)+ 00022936 51 c8 ff fc |Q | DBF D0,0x22934 0002293a 59 4f |YO | SUBQ.L #0x4,A7 0002293c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022940 3f 02 |? | MOVE.W D2,-(A7) 00022942 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00022946 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002294c 50 4f |PO | ADDQ.L #0x8,A7 0002294e 4e ba f5 12 |N | JSR 0x21e62 00022952 de fc 00 18 | | ADDA.W #0x18,A7 00022956 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002295a 20 86 | | MOVE.L D6,(A0) 0002295c 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00022960 20 b9 00 02 7a 1c | z | MOVE.L 0x27a1c,(A0) 00022966 4a 92 |J | TST.L (A2) 00022968 66 0a |f | BNE 0x22974 0002296a 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 0002296e 20 86 | | MOVE.L D6,(A0) 00022970 53 90 |S | SUBQ.L #0x1,(A0) 00022972 60 06 |` | BRA 0x2297a 00022974 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00022978 20 92 | | MOVE.L (A2),(A0) 0002297a 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 0002297e 4e 5e |N^ | UNLK A6 00022980 4e 75 |Nu | RTS 00022982 ; -------------------------------------------------------------------------------------- 00022982 ; OMSI PASCAL Function 00022982 ; <LVAR 0x008 4(r)> 00022982 ; <LVAR -0x008 @ 4(r)> 00022982 ; <LVAR -0x00c @ 4(r)> 00022982 ; <LVAR -0x010 @ 4(r)> 00022982 ; -------------------------------------------------------------------------------------- 00022982 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00022986 bf d5 | | CMPA.L (A5),A7 00022988 62 06 |b | BHI 0x22990 0002298a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002298e 4e 76 |Nv | TRAPV 00022990 de fc 00 24 | $ | ADDA.W #0x24,A7 00022994 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 00022998 41 f9 00 02 7a 08 |A z | LEA.L 0x27a08,A0 0002299e 43 ee ff f0 |C | LEA.L (A6-0x10),A1 000229a2 2c 10 |, | MOVE.L (A0),D6 000229a4 42 39 00 02 7a 24 |B9 z$ | CLR.B 0x27a24 000229aa 23 ee 00 08 00 02 7a 26 |# z&| MOVE.L (A6+0x8),0x27a26 000229b2 2e 10 |. | MOVE.L (A0),D7 000229b4 48 51 |HQ | PEA.L (A1) 000229b6 48 6e ff f4 |Hn | PEA.L (A6-0xc) 000229ba 48 6e ff f8 |Hn | PEA.L (A6-0x8) 000229be 4e ba fe 40 |N @ | JSR 0x22800 000229c2 de fc 00 0c | | ADDA.W #0xc,A7 000229c6 20 86 | | MOVE.L D6,(A0) 000229c8 20 2e ff f8 | . | MOVE.L (A6-0x8),D0 000229cc 06 80 00 00 00 09 | | ADDI.L #0x00000009,D0 000229d2 2f 00 |/ | MOVE.L D0,-(A7) 000229d4 90 ae ff f4 | | SUB.L (A6-0xc),D0 000229d8 53 80 |S | SUBQ.L #0x1,D0 000229da 2f 00 |/ | MOVE.L D0,-(A7) 000229dc 4e ba f9 d8 |N | JSR 0x223b6 000229e0 58 4f |XO | ADDQ.L #0x4,A7 000229e2 2e 91 |. | MOVE.L (A1),(A7) 000229e4 2f 11 |/ | MOVE.L (A1),-(A7) 000229e6 9f 97 | | SUB.L D7,(A7) 000229e8 4e ba f9 cc |N | JSR 0x223b6 000229ec 50 4f |PO | ADDQ.L #0x8,A7 000229ee 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 000229f2 4e 5e |N^ | UNLK A6 000229f4 4e 75 |Nu | RTS 000229f6 ; -------------------------------------------------------------------------------------- 000229f6 ; OMSI PASCAL Function 000229f6 ; <LVAR 0x00c 4(r)> 000229f6 ; <LVAR 0x008 4(r)> 000229f6 ; <LVAR -0x008 @ 4(r)> 000229f6 ; <LVAR -0x00c @ 4(r)> 000229f6 ; <LVAR -0x010 @ 4(r)> 000229f6 ; -------------------------------------------------------------------------------------- 000229f6 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 000229fa bf d5 | | CMPA.L (A5),A7 000229fc 62 06 |b | BHI 0x22a04 000229fe 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022a02 4e 76 |Nv | TRAPV 00022a04 de fc 00 24 | $ | ADDA.W #0x24,A7 00022a08 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 00022a0c 41 f9 00 02 7a 08 |A z | LEA.L 0x27a08,A0 00022a12 43 ee ff f0 |C | LEA.L (A6-0x10),A1 00022a16 2c 10 |, | MOVE.L (A0),D6 00022a18 13 fc 00 01 00 02 7a 24 | z$| MOVE.B #0x01,0x27a24 00022a20 23 ee 00 08 00 02 7a 2a |# z*| MOVE.L (A6+0x8),0x27a2a 00022a28 23 ee 00 0c 00 02 7a 2e |# z.| MOVE.L (A6+0xc),0x27a2e 00022a30 2e 10 |. | MOVE.L (A0),D7 00022a32 48 51 |HQ | PEA.L (A1) 00022a34 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00022a38 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00022a3c 4e ba fd c2 |N | JSR 0x22800 00022a40 de fc 00 0c | | ADDA.W #0xc,A7 00022a44 20 86 | | MOVE.L D6,(A0) 00022a46 20 2e ff f8 | . | MOVE.L (A6-0x8),D0 00022a4a 06 80 00 00 00 09 | | ADDI.L #0x00000009,D0 00022a50 2f 00 |/ | MOVE.L D0,-(A7) 00022a52 90 ae ff f4 | | SUB.L (A6-0xc),D0 00022a56 53 80 |S | SUBQ.L #0x1,D0 00022a58 2f 00 |/ | MOVE.L D0,-(A7) 00022a5a 4e ba f9 5a |N Z | JSR 0x223b6 00022a5e 58 4f |XO | ADDQ.L #0x4,A7 00022a60 2e 91 |. | MOVE.L (A1),(A7) 00022a62 2f 11 |/ | MOVE.L (A1),-(A7) 00022a64 9f 97 | | SUB.L D7,(A7) 00022a66 4e ba f9 4e |N N | JSR 0x223b6 00022a6a 50 4f |PO | ADDQ.L #0x8,A7 00022a6c 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 00022a70 4e 5e |N^ | UNLK A6 00022a72 4e 75 |Nu | RTS 00022a74 ; -------------------------------------------------------------------------------------- 00022a74 ; OMSI PASCAL Function 00022a74 ; <LVAR 0x010 4(rw)> 00022a74 ; <LVAR 0x00c 4(r)> 00022a74 ; <LVAR 0x008 4(r)> 00022a74 ; -------------------------------------------------------------------------------------- 00022a74 4e 56 ff f8 |NV | LINK.W A6,#0xfff8 00022a78 bf d5 | | CMPA.L (A5),A7 00022a7a 62 06 |b | BHI 0x22a82 00022a7c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022a80 4e 76 |Nv | TRAPV 00022a82 de fc 00 08 | | ADDA.W #0x8,A7 00022a86 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00022a8a 4a ae 00 08 |J | TST.L (A6+0x8) 00022a8e 66 06 |f | BNE 0x22a96 00022a90 42 ae 00 10 |B | CLR.L (A6+0x10) 00022a94 60 0e |` | BRA 0x22aa4 00022a96 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00022a9a 90 ae 00 08 | | SUB.L (A6+0x8),D0 00022a9e 52 80 |R | ADDQ.L #0x1,D0 00022aa0 2d 40 00 10 |-@ | MOVE.L D0,(A6+0x10) 00022aa4 4c df 00 01 |L | MOVEM.L (A7)+,D0 00022aa8 4e 5e |N^ | UNLK A6 00022aaa 4e 75 |Nu | RTS 00022aac ; -------------------------------------------------------------------------------------- 00022aac ; OMSI PASCAL Function 00022aac ; <LVAR 0x014 4(w)> 00022aac ; <LVAR 0x010 @ 4(w)> 00022aac ; <LVAR 0x00c 4(r)> 00022aac ; <LVAR 0x008 4(r)> 00022aac ; -------------------------------------------------------------------------------------- 00022aac 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00022ab0 bf d5 | | CMPA.L (A5),A7 00022ab2 62 06 |b | BHI 0x22aba 00022ab4 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022ab8 4e 76 |Nv | TRAPV 00022aba de fc 00 20 | | ADDA.W #0x20,A7 00022abe 48 e7 81 c8 |H | MOVEM.L A4+A1+A0+D7+D0,-(A7) 00022ac2 28 6e 00 0c |(n | MOVEA.L (A6+0xc),A4 00022ac6 2d 7a f2 b2 00 10 |-z | MOVE.L 0x21d7a,(A6+0x10) 00022acc 2d 7a f2 b0 00 14 |-z | MOVE.L 0x21d7e,(A6+0x14) 00022ad2 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022ad6 7e 00 |~ | MOVEQ.L #0x00,D7 00022ad8 be 97 | | CMP.L (A7),D7 00022ada 6e 28 |n( | BGT 0x22b04 00022adc b8 fc 00 01 | | CMPA.W #0x1,A4 00022ae0 66 04 |f | BNE 0x22ae6 00022ae2 58 4f |XO | ADDQ.L #0x4,A7 00022ae4 60 20 |` | BRA 0x22b06 00022ae6 be ae 00 08 | | CMP.L (A6+0x8),D7 00022aea 66 10 |f | BNE 0x22afc 00022aec 41 ee 00 10 |A | LEA.L (A6+0x10),A0 00022af0 22 4c |"L | MOVEA.L A4,A1 00022af2 70 07 |p | MOVEQ.L #0x07,D0 00022af4 10 d9 | | MOVE.B (A1)+,(A0)+ 00022af6 51 c8 ff fc |Q | DBF D0,0x22af4 00022afa 60 04 |` | BRA 0x22b00 00022afc 28 6c 00 08 |(l | MOVEA.L (A4+0x8),A4 00022b00 52 87 |R | ADDQ.L #0x1,D7 00022b02 68 d4 |h | BVC 0x22ad8 00022b04 58 4f |XO | ADDQ.L #0x4,A7 00022b06 4c df 13 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1+A4 00022b0a 4e 5e |N^ | UNLK A6 00022b0c 4e 75 |Nu | RTS 00022b0e ; -------------------------------------------------------------------------------------- 00022b0e ; OMSI PASCAL Function 00022b0e ; <LVAR 0x010 4(w)> 00022b0e ; <LVAR 0x00c 4(r)> 00022b0e ; <LVAR 0x008 4(r)> 00022b0e ; <LVAR -0x008 @ 4(r)> 00022b0e ; -------------------------------------------------------------------------------------- 00022b0e 4e 56 ff ce |NV | LINK.W A6,#0xffce 00022b12 bf d5 | | CMPA.L (A5),A7 00022b14 62 06 |b | BHI 0x22b1c 00022b16 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022b1a 4e 76 |Nv | TRAPV 00022b1c de fc 00 26 | & | ADDA.W #0x26,A7 00022b20 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 00022b24 43 ee ff f8 |C | LEA.L (A6-0x8),A1 00022b28 48 51 |HQ | PEA.L (A1) 00022b2a 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00022b30 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00022b34 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022b38 4e ba ff 3a |N : | JSR 0x22a74 00022b3c 50 4f |PO | ADDQ.L #0x8,A7 00022b3e 7e 01 |~ | MOVEQ.L #0x01,D7 00022b40 be 97 | | CMP.L (A7),D7 00022b42 6e 38 |n8 | BGT 0x22b7c 00022b44 20 07 | | MOVE.L D7,D0 00022b46 d0 ae 00 08 | | ADD.L (A6+0x8),D0 00022b4a 53 80 |S | SUBQ.L #0x1,D0 00022b4c 53 80 |S | SUBQ.L #0x1,D0 00022b4e 0c 80 00 00 1f ff | | CMPI.L #0x00001fff,D0 00022b54 63 02 |c | BLS 0x22b58 00022b56 4e 4f |NO | TRAP #15 00022b58 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 00022b5e 1c 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D6 00022b62 0c 06 00 2f | / | CMPI.B #0x2f,D6 00022b66 66 04 |f | BNE 0x22b6c 00022b68 58 4f |XO | ADDQ.L #0x4,A7 00022b6a 60 12 |` | BRA 0x22b7e 00022b6c 2f 11 |/ | MOVE.L (A1),-(A7) 00022b6e 1f 06 | | MOVE.B D6,-(A7) 00022b70 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00022b76 5c 4f |\O | ADDQ.L #0x6,A7 00022b78 52 87 |R | ADDQ.L #0x1,D7 00022b7a 68 c4 |h | BVC 0x22b40 00022b7c 58 4f |XO | ADDQ.L #0x4,A7 00022b7e 2d 51 00 10 |-Q | MOVE.L (A1),(A6+0x10) 00022b82 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 00022b86 4e 5e |N^ | UNLK A6 00022b88 4e 75 |Nu | RTS 00022b8a ; -------------------------------------------------------------------------------------- 00022b8a ; OMSI PASCAL Function 00022b8a ; <LVAR 0x010 4(w)> 00022b8a ; <LVAR 0x00c 4(r)> 00022b8a ; <LVAR 0x008 4(r)> 00022b8a ; -------------------------------------------------------------------------------------- 00022b8a 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 00022b8e bf d5 | | CMPA.L (A5),A7 00022b90 62 06 |b | BHI 0x22b98 00022b92 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022b96 4e 76 |Nv | TRAPV 00022b98 de fc 00 18 | | ADDA.W #0x18,A7 00022b9c 9e fc 00 0c | | SUBA.W #0xc,A7 00022ba0 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00022ba4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022ba8 4e ba ff 02 |N | JSR 0x22aac 00022bac 50 4f |PO | ADDQ.L #0x8,A7 00022bae 4e ba ff 5e |N ^ | JSR 0x22b0e 00022bb2 50 4f |PO | ADDQ.L #0x8,A7 00022bb4 2d 5f 00 10 |-_ | MOVE.L (A7)+,(A6+0x10) 00022bb8 4e 5e |N^ | UNLK A6 00022bba 4e 75 |Nu | RTS 00022bbc ; -------------------------------------------------------------------------------------- 00022bbc ; OMSI PASCAL Function 00022bbc ; <LVAR 0x014 4(w)> 00022bbc ; <LVAR 0x010 4(w)> 00022bbc ; <LVAR 0x00c 4(r)> 00022bbc ; <LVAR 0x008 4(r)> 00022bbc ; -------------------------------------------------------------------------------------- 00022bbc 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 00022bc0 bf d5 | | CMPA.L (A5),A7 00022bc2 62 06 |b | BHI 0x22bca 00022bc4 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022bc8 4e 76 |Nv | TRAPV 00022bca de fc 00 18 | | ADDA.W #0x18,A7 00022bce 9e fc 00 0c | | SUBA.W #0xc,A7 00022bd2 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00022bd6 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022bda 4e ba ff ae |N | JSR 0x22b8a 00022bde 50 4f |PO | ADDQ.L #0x8,A7 00022be0 48 78 00 10 |Hx | PEA.L 0x10 00022be4 4e b9 00 01 03 60 |N ` | JSR ?StringToInt64() 00022bea 50 4f |PO | ADDQ.L #0x8,A7 00022bec 2d 5f 00 10 |-_ | MOVE.L (A7)+,(A6+0x10) 00022bf0 2d 5f 00 14 |-_ | MOVE.L (A7)+,(A6+0x14) 00022bf4 4e 5e |N^ | UNLK A6 00022bf6 4e 75 |Nu | RTS 00022bf8 ; -------------------------------------------------------------------------------------- 00022bf8 ; OMSI PASCAL Function 00022bf8 ; <LVAR 0x010 4(w)> 00022bf8 ; <LVAR 0x00c 4(r)> 00022bf8 ; <LVAR 0x008 4(r)> 00022bf8 ; -------------------------------------------------------------------------------------- 00022bf8 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 00022bfc bf d5 | | CMPA.L (A5),A7 00022bfe 62 06 |b | BHI 0x22c06 00022c00 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022c04 4e 76 |Nv | TRAPV 00022c06 de fc 00 18 | | ADDA.W #0x18,A7 00022c0a 9e fc 00 0c | | SUBA.W #0xc,A7 00022c0e 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00022c12 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022c16 4e ba ff a4 |N | JSR 0x22bbc 00022c1a 50 4f |PO | ADDQ.L #0x8,A7 00022c1c 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00022c22 50 4f |PO | ADDQ.L #0x8,A7 00022c24 2d 5f 00 10 |-_ | MOVE.L (A7)+,(A6+0x10) 00022c28 4e 5e |N^ | UNLK A6 00022c2a 4e 75 |Nu | RTS 00022c2c ; -------------------------------------------------------------------------------------- 00022c2c ; OMSI PASCAL Function 00022c2c ; <LVAR 0x008 @ 4(r)> 00022c2c ; -------------------------------------------------------------------------------------- 00022c2c 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 00022c30 bf d5 | | CMPA.L (A5),A7 00022c32 62 06 |b | BHI 0x22c3a 00022c34 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022c38 4e 76 |Nv | TRAPV 00022c3a de fc 00 28 | ( | ADDA.W #0x28,A7 00022c3e 48 e7 c1 e0 |H | MOVEM.L A2+A1+A0+D7+D1+D0,-(A7) 00022c42 45 f9 00 02 7a 08 |E z | LEA.L 0x27a08,A2 00022c48 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022c4c 2f 08 |/ | MOVE.L A0,-(A7) 00022c4e 2f 12 |/ | MOVE.L (A2),-(A7) 00022c50 30 10 |0 | MOVE.W (A0),D0 00022c52 48 c0 |H | EXTW.L D0 00022c54 44 80 |D | NEG.L D0 00022c56 2f 00 |/ | MOVE.L D0,-(A7) 00022c58 4e ba f7 5c |N \ | JSR 0x223b6 00022c5c 50 4f |PO | ADDQ.L #0x8,A7 00022c5e 30 10 |0 | MOVE.W (A0),D0 00022c60 48 c0 |H | EXTW.L D0 00022c62 2f 00 |/ | MOVE.L D0,-(A7) 00022c64 7e 01 |~ | MOVEQ.L #0x01,D7 00022c66 be 97 | | CMP.L (A7),D7 00022c68 6e 34 |n4 | BGT 0x22c9e 00022c6a 20 07 | | MOVE.L D7,D0 00022c6c d0 92 | | ADD.L (A2),D0 00022c6e 53 80 |S | SUBQ.L #0x1,D0 00022c70 53 80 |S | SUBQ.L #0x1,D0 00022c72 0c 80 00 00 1f ff | | CMPI.L #0x00001fff,D0 00022c78 63 02 |c | BLS 0x22c7c 00022c7a 4e 4f |NO | TRAP #15 00022c7c 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 00022c82 22 07 |" | MOVE.L D7,D1 00022c84 53 81 |S | SUBQ.L #0x1,D1 00022c86 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00022c8c 63 02 |c | BLS 0x22c90 00022c8e 4e 4f |NO | TRAP #15 00022c90 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 00022c94 11 b1 18 02 08 08 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8) 00022c9a 52 87 |R | ADDQ.L #0x1,D7 00022c9c 68 c8 |h | BVC 0x22c66 00022c9e 50 4f |PO | ADDQ.L #0x8,A7 00022ca0 48 6e 00 08 |Hn | PEA.L (A6+0x8) 00022ca4 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022caa 58 4f |XO | ADDQ.L #0x4,A7 00022cac 4c df 07 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2 00022cb0 4e 5e |N^ | UNLK A6 00022cb2 4e 75 |Nu | RTS 00022cb4 ; -------------------------------------------------------------------------------------- 00022cb4 ; OMSI PASCAL Function 00022cb4 ; <LVAR 0x00c 4(r)> 00022cb4 ; <LVAR 0x008 4(r)> 00022cb4 ; -------------------------------------------------------------------------------------- 00022cb4 4e 56 ff ec |NV | LINK.W A6,#0xffec 00022cb8 bf d5 | | CMPA.L (A5),A7 00022cba 62 06 |b | BHI 0x22cc2 00022cbc 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022cc0 4e 76 |Nv | TRAPV 00022cc2 de fc 00 14 | | ADDA.W #0x14,A7 00022cc6 59 4f |YO | SUBQ.L #0x4,A7 00022cc8 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00022ccc 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022cd0 48 78 00 10 |Hx | PEA.L 0x10 00022cd4 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 00022cda de fc 00 0c | | ADDA.W #0xc,A7 00022cde 4e ba ff 4c |N L | JSR 0x22c2c 00022ce2 58 4f |XO | ADDQ.L #0x4,A7 00022ce4 4e 5e |N^ | UNLK A6 00022ce6 4e 75 |Nu | RTS 00022ce8 ; -------------------------------------------------------------------------------------- 00022ce8 ; OMSI PASCAL Function 00022ce8 ; <LVAR 0x008 4(r)> 00022ce8 ; -------------------------------------------------------------------------------------- 00022ce8 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 00022cec bf d5 | | CMPA.L (A5),A7 00022cee 62 06 |b | BHI 0x22cf6 00022cf0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022cf4 4e 76 |Nv | TRAPV 00022cf6 de fc 00 0c | | ADDA.W #0xc,A7 00022cfa 59 4f |YO | SUBQ.L #0x4,A7 00022cfc 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022d00 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00022d06 58 4f |XO | ADDQ.L #0x4,A7 00022d08 4e ba ff 22 |N " | JSR 0x22c2c 00022d0c 58 4f |XO | ADDQ.L #0x4,A7 00022d0e 4e 5e |N^ | UNLK A6 00022d10 4e 75 |Nu | RTS 00022d12 ; -------------------------------------------------------------------------------------- 00022d12 ; OMSI PASCAL Function 00022d12 ; <LVAR 0x008 4(r)> 00022d12 ; <LVAR -0x004 @ 4(r)> 00022d12 ; <LVAR -0x008 4(rw)> 00022d12 ; -------------------------------------------------------------------------------------- 00022d12 4e 56 ff ca |NV | LINK.W A6,#0xffca 00022d16 bf d5 | | CMPA.L (A5),A7 00022d18 62 06 |b | BHI 0x22d20 00022d1a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022d1e 4e 76 |Nv | TRAPV 00022d20 de fc 00 2a | * | ADDA.W #0x2a,A7 00022d24 48 e7 81 e0 |H | MOVEM.L A2+A1+A0+D7+D0,-(A7) 00022d28 43 ee ff fc |C | LEA.L (A6-0x4),A1 00022d2c 45 ee ff f8 |E | LEA.L (A6-0x8),A2 00022d30 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022d34 24 a8 00 08 |$ | MOVE.L (A0+0x8),(A2) 00022d38 48 51 |HQ | PEA.L (A1) 00022d3a 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00022d40 58 4f |XO | ADDQ.L #0x4,A7 00022d42 20 52 | R | MOVEA.L (A2),A0 00022d44 b0 fc 00 01 | | CMPA.W #0x1,A0 00022d48 67 00 00 86 |g | BEQ 0x22dd0 00022d4c 4a 90 |J | TST.L (A0) 00022d4e 67 68 |gh | BEQ 0x22db8 00022d50 2f 28 00 04 |/( | MOVE.L (A0+0x4),-(A7) 00022d54 2e 10 |. | MOVE.L (A0),D7 00022d56 be 97 | | CMP.L (A7),D7 00022d58 6e 14 |n | BGT 0x22d6e 00022d5a 20 17 | | MOVE.L (A7),D0 00022d5c 0c 87 80 00 00 01 | | CMPI.L #0x80000001,D7 00022d62 6d 08 |m | BLT 0x22d6c 00022d64 0c 80 7f ff ff ff | | CMPI.L #0x7fffffff,D0 00022d6a 6f 02 |o | BLE 0x22d6e 00022d6c 4e 4f |NO | TRAP #15 00022d6e be 97 | | CMP.L (A7),D7 00022d70 6e 44 |nD | BGT 0x22db6 00022d72 2f 11 |/ | MOVE.L (A1),-(A7) 00022d74 20 07 | | MOVE.L D7,D0 00022d76 53 80 |S | SUBQ.L #0x1,D0 00022d78 0c 80 00 00 1f ff | | CMPI.L #0x00001fff,D0 00022d7e 63 02 |c | BLS 0x22d82 00022d80 4e 4f |NO | TRAP #15 00022d82 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 00022d88 1f 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),-(A7) 00022d8c 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00022d92 5c 4f |\O | ADDQ.L #0x6,A7 00022d94 20 51 | Q | MOVEA.L (A1),A0 00022d96 30 10 |0 | MOVE.W (A0),D0 00022d98 0c 40 00 7a | @ z | CMPI.W #0x007a,D0 00022d9c 6d 14 |m | BLT 0x22db2 00022d9e 2f 11 |/ | MOVE.L (A1),-(A7) 00022da0 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00022da6 58 4f |XO | ADDQ.L #0x4,A7 00022da8 48 51 |HQ | PEA.L (A1) 00022daa 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00022db0 58 4f |XO | ADDQ.L #0x4,A7 00022db2 52 87 |R | ADDQ.L #0x1,D7 00022db4 68 b8 |h | BVC 0x22d6e 00022db6 58 4f |XO | ADDQ.L #0x4,A7 00022db8 2f 11 |/ | MOVE.L (A1),-(A7) 00022dba 1f 3c 00 20 | < | MOVE.B #0x20,-(A7) 00022dbe 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00022dc4 5c 4f |\O | ADDQ.L #0x6,A7 00022dc6 20 52 | R | MOVEA.L (A2),A0 00022dc8 24 a8 00 08 |$ | MOVE.L (A0+0x8),(A2) 00022dcc 60 00 ff 74 |` t | BRA 0x22d42 00022dd0 2f 11 |/ | MOVE.L (A1),-(A7) 00022dd2 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022dd8 58 4f |XO | ADDQ.L #0x4,A7 00022dda 4c df 07 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1+A2 00022dde 4e 5e |N^ | UNLK A6 00022de0 4e 75 |Nu | RTS 00022de2 ; -------------------------------------------------------------------------------------- 00022de2 ; OMSI PASCAL Function 00022de2 ; <LVAR 0x008 @ 4(r)> 00022de2 ; <LVAR -0x003 @ 1(r)> 00022de2 ; <LVAR -0x004 @ 1(r)> 00022de2 ; <LVAR -0x008 @ 4(r)> 00022de2 ; <LVAR -0x00c @ 4(rw)> 00022de2 ; -------------------------------------------------------------------------------------- 00022de2 4e 56 ff ae |NV | LINK.W A6,#0xffae 00022de6 bf d5 | | CMPA.L (A5),A7 00022de8 62 06 |b | BHI 0x22df0 00022dea 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022dee 4e 76 |Nv | TRAPV 00022df0 de fc 00 46 | F | ADDA.W #0x46,A7 00022df4 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 00022df8 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00022dfc 45 ee ff f4 |E | LEA.L (A6-0xc),A2 00022e00 47 ee ff fc |G | LEA.L (A6-0x4),A3 00022e04 49 ee ff f8 |I | LEA.L (A6-0x8),A4 00022e08 72 01 |r | MOVEQ.L #0x01,D1 00022e0a 2f 3a ec 20 |/: | MOVE.L 0x21a2c,-(A7) 00022e0e 51 4f |QO | SUBQ.L #0x8,A7 00022e10 2f 11 |/ | MOVE.L (A1),-(A7) 00022e12 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00022e18 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00022e1c 3f 01 |? | MOVE.W D1,-(A7) 00022e1e 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00022e22 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022e28 50 4f |PO | ADDQ.L #0x8,A7 00022e2a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022e30 50 4f |PO | ADDQ.L #0x8,A7 00022e32 24 9f |$ | MOVE.L (A7)+,(A2) 00022e34 2e 92 |. | MOVE.L (A2),(A7) 00022e36 42 27 |B' | CLR.B -(A7) 00022e38 42 27 |B' | CLR.B -(A7) 00022e3a 48 78 00 00 |Hx | PEA.L 0x0 00022e3e 48 53 |HS | PEA.L (A3) 00022e40 48 54 |HT | PEA.L (A4) 00022e42 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00022e48 de fc 00 14 | | ADDA.W #0x14,A7 00022e4c 4a 13 |J | TST.B (A3) 00022e4e 67 36 |g6 | BEQ 0x22e86 00022e50 41 fa eb da |A | LEA.L 0x21a2c,A0 00022e54 70 0a |p | MOVEQ.L #0x0a,D0 00022e56 3f 20 |? | MOVE.W -(A0),-(A7) 00022e58 51 c8 ff fc |Q | DBF D0,0x22e56 00022e5c 51 4f |QO | SUBQ.L #0x8,A7 00022e5e 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022e62 3f 01 |? | MOVE.W D1,-(A7) 00022e64 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 00022e68 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022e6e 58 4f |XO | ADDQ.L #0x4,A7 00022e70 2e 91 |. | MOVE.L (A1),(A7) 00022e72 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022e78 50 4f |PO | ADDQ.L #0x8,A7 00022e7a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022e80 de fc 00 1a | | ADDA.W #0x1a,A7 00022e84 60 54 |`T | BRA 0x22eda 00022e86 2f 14 |/ | MOVE.L (A4),-(A7) 00022e88 48 51 |HQ | PEA.L (A1) 00022e8a 48 6e ff fd |Hn | PEA.L (A6-0x3) 00022e8e 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 00022e94 de fc 00 0c | | ADDA.W #0xc,A7 00022e98 4a 2e ff fd |J. | TST.B (A6-0x3) 00022e9c 66 14 |f | BNE 0x22eb2 00022e9e 59 4f |YO | SUBQ.L #0x4,A7 00022ea0 2f 11 |/ | MOVE.L (A1),-(A7) 00022ea2 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00022ea8 58 4f |XO | ADDQ.L #0x4,A7 00022eaa 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022eb0 58 4f |XO | ADDQ.L #0x4,A7 00022eb2 4a 2e ff fd |J. | TST.B (A6-0x3) 00022eb6 67 ce |g | BEQ 0x22e86 00022eb8 42 27 |B' | CLR.B -(A7) 00022eba 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00022ebe 48 78 00 01 |Hx | PEA.L 0x1 00022ec2 48 53 |HS | PEA.L (A3) 00022ec4 48 54 |HT | PEA.L (A4) 00022ec6 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00022ecc de fc 00 10 | | ADDA.W #0x10,A7 00022ed0 48 51 |HQ | PEA.L (A1) 00022ed2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022ed8 58 4f |XO | ADDQ.L #0x4,A7 00022eda 48 52 |HR | PEA.L (A2) 00022edc 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022ee2 58 4f |XO | ADDQ.L #0x4,A7 00022ee4 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 00022ee8 4e 5e |N^ | UNLK A6 00022eea 4e 75 |Nu | RTS 00022eec ; -------------------------------------------------------------------------------------- 00022eec ; OMSI PASCAL Function 00022eec ; <LVAR 0x008 4(r)> 00022eec ; -------------------------------------------------------------------------------------- 00022eec 4e 56 ff c6 |NV | LINK.W A6,#0xffc6 00022ef0 bf d5 | | CMPA.L (A5),A7 00022ef2 62 06 |b | BHI 0x22efa 00022ef4 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022ef8 4e 76 |Nv | TRAPV 00022efa de fc 00 2e | . | ADDA.W #0x2e,A7 00022efe 48 e7 83 88 |H | MOVEM.L A4+A0+D7+D6+D0,-(A7) 00022f02 59 4f |YO | SUBQ.L #0x4,A7 00022f04 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022f08 4e ba f3 64 |N d | JSR 0x2226e 00022f0c 58 4f |XO | ADDQ.L #0x4,A7 00022f0e 2c 1f |, | MOVE.L (A7)+,D6 00022f10 66 2e |f. | BNE 0x22f40 00022f12 41 f9 00 02 7a 1a |A z | LEA.L 0x27a1a,A0 00022f18 70 04 |p | MOVEQ.L #0x04,D0 00022f1a 3f 20 |? | MOVE.W -(A0),-(A7) 00022f1c 51 c8 ff fc |Q | DBF D0,0x22f1a 00022f20 59 4f |YO | SUBQ.L #0x4,A7 00022f22 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022f26 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022f2a 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00022f2e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022f34 50 4f |PO | ADDQ.L #0x8,A7 00022f36 4e ba fe aa |N | JSR 0x22de2 00022f3a de fc 00 0e | | ADDA.W #0xe,A7 00022f3e 60 26 |`& | BRA 0x22f66 00022f40 2f 06 |/ | MOVE.L D6,-(A7) 00022f42 7e 01 |~ | MOVEQ.L #0x01,D7 00022f44 be 97 | | CMP.L (A7),D7 00022f46 6e 1c |n | BGT 0x22f64 00022f48 59 4f |YO | SUBQ.L #0x4,A7 00022f4a 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022f4e 2f 07 |/ | MOVE.L D7,-(A7) 00022f50 4e ba fc 38 |N 8 | JSR 0x22b8a 00022f54 50 4f |PO | ADDQ.L #0x8,A7 00022f56 28 5f |(_ | MOVEA.L (A7)+,A4 00022f58 2f 0c |/ | MOVE.L A4,-(A7) 00022f5a 4e ba fe 86 |N | JSR 0x22de2 00022f5e 58 4f |XO | ADDQ.L #0x4,A7 00022f60 52 87 |R | ADDQ.L #0x1,D7 00022f62 68 e0 |h | BVC 0x22f44 00022f64 58 4f |XO | ADDQ.L #0x4,A7 00022f66 4c df 11 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A4 00022f6a 4e 5e |N^ | UNLK A6 00022f6c 4e 75 |Nu | RTS 00022f6e ; -------------------------------------------------------------------------------------- 00022f6e ; OMSI PASCAL Function 00022f6e ; <LVAR 0x00c @> 00022f6e ; <LVAR 0x008 @ 4(r)> 00022f6e ; <LVAR -0x020 @> 00022f6e ; -------------------------------------------------------------------------------------- 00022f6e 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 00022f72 bf d5 | | CMPA.L (A5),A7 00022f74 62 06 |b | BHI 0x22f7c 00022f76 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022f7a 4e 76 |Nv | TRAPV 00022f7c de fc 00 24 | $ | ADDA.W #0x24,A7 00022f80 48 e7 e1 c0 |H | MOVEM.L A1+A0+D7+D2+D1+D0,-(A7) 00022f84 74 1d |t | MOVEQ.L #0x1d,D2 00022f86 7e 01 |~ | MOVEQ.L #0x01,D7 00022f88 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022f8c 30 10 |0 | MOVE.W (A0),D0 00022f8e 48 c0 |H | EXTW.L D0 00022f90 be 80 | | CMP.L D0,D7 00022f92 6f 10 |o | BLE 0x22fa4 00022f94 20 07 | | MOVE.L D7,D0 00022f96 53 80 |S | SUBQ.L #0x1,D0 00022f98 b0 82 | | CMP.L D2,D0 00022f9a 63 02 |c | BLS 0x22f9e 00022f9c 4e 4f |NO | TRAP #15 00022f9e 42 36 08 e0 |B6 | CLR.B (A6+D0.L-#0x20) 00022fa2 60 1e |` | BRA 0x22fc2 00022fa4 20 07 | | MOVE.L D7,D0 00022fa6 53 80 |S | SUBQ.L #0x1,D0 00022fa8 b0 82 | | CMP.L D2,D0 00022faa 63 02 |c | BLS 0x22fae 00022fac 4e 4f |NO | TRAP #15 00022fae 22 07 |" | MOVE.L D7,D1 00022fb0 53 81 |S | SUBQ.L #0x1,D1 00022fb2 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00022fb8 63 02 |c | BLS 0x22fbc 00022fba 4e 4f |NO | TRAP #15 00022fbc 1d b0 18 02 08 e0 | | MOVE.B (A0+D1.L+#0x2),(A6+D0.L-#0x20) 00022fc2 52 87 |R | ADDQ.L #0x1,D7 00022fc4 0c 87 00 00 00 1e | | CMPI.L #0x0000001e,D7 00022fca 6f bc |o | BLE 0x22f88 00022fcc 48 6e 00 08 |Hn | PEA.L (A6+0x8) 00022fd0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022fd6 58 4f |XO | ADDQ.L #0x4,A7 00022fd8 41 ee 00 0c |A | LEA.L (A6+0xc),A0 00022fdc 43 ee ff e0 |C | LEA.L (A6-0x20),A1 00022fe0 70 0e |p | MOVEQ.L #0x0e,D0 00022fe2 30 d9 |0 | MOVE.W (A1)+,(A0)+ 00022fe4 51 c8 ff fc |Q | DBF D0,0x22fe2 00022fe8 4c df 03 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1 00022fec 4e 5e |N^ | UNLK A6 00022fee 4e 75 |Nu | RTS 00022ff0 ; -------------------------------------------------------------------------------------- 00022ff0 ; OMSI PASCAL Function 00022ff0 ; <LVAR 0x026 4(w)> 00022ff0 ; <LVAR 0x008 @> 00022ff0 ; <LVAR -0x006 4(rw)> 00022ff0 ; -------------------------------------------------------------------------------------- 00022ff0 4e 56 ff d6 |NV | LINK.W A6,#0xffd6 00022ff4 bf d5 | | CMPA.L (A5),A7 00022ff6 62 06 |b | BHI 0x22ffe 00022ff8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022ffc 4e 76 |Nv | TRAPV 00022ffe de fc 00 24 | $ | ADDA.W #0x24,A7 00023002 48 e7 c1 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D1+D0,-(A7) 00023006 47 ee ff fa |G | LEA.L (A6-0x6),A3 0002300a 7e 00 |~ | MOVEQ.L #0x00,D7 0002300c 26 b9 00 02 7a 32 |& z2 | MOVE.L 0x27a32,(A3) 00023012 20 53 | S | MOVEA.L (A3),A0 00023014 b0 fc 00 01 | | CMPA.W #0x1,A0 00023018 67 1e |g | BEQ 0x23038 0002301a 4a 07 |J | TST.B D7 0002301c 66 1a |f | BNE 0x23038 0002301e 22 48 |"H | MOVEA.L A0,A1 00023020 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00023024 70 1d |p | MOVEQ.L #0x1d,D0 00023026 b5 09 | | CMPM.B (A1)+,(A2)+ 00023028 56 c8 ff fc |V | DBNE D0,0x23026 0002302c 66 04 |f | BNE 0x23032 0002302e 7e 01 |~ | MOVEQ.L #0x01,D7 00023030 60 04 |` | BRA 0x23036 00023032 26 a8 00 26 |& & | MOVE.L (A0+0x26),(A3) 00023036 60 da |` | BRA 0x23012 00023038 2d 48 00 26 |-H & | MOVE.L A0,(A6+0x26) 0002303c 4c df 0f 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2+A3 00023040 4e 5e |N^ | UNLK A6 00023042 4e 75 |Nu | RTS 00023044 ; -------------------------------------------------------------------------------------- 00023044 ; OMSI PASCAL Function 00023044 ; <LVAR 0x008 @ 4(r)> 00023044 ; -------------------------------------------------------------------------------------- 00023044 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00023048 bf d5 | | CMPA.L (A5),A7 0002304a 62 06 |b | BHI 0x23052 0002304c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023050 4e 76 |Nv | TRAPV 00023052 de fc 00 2c | , | ADDA.W #0x2c,A7 00023056 48 e7 81 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D0,-(A7) 0002305a 43 ee 00 08 |C | LEA.L (A6+0x8),A1 0002305e 45 f9 00 02 7a 32 |E z2 | LEA.L 0x27a32,A2 00023064 70 01 |p | MOVEQ.L #0x01,D0 00023066 20 51 | Q | MOVEA.L (A1),A0 00023068 b0 c0 | | CMPA.W D0,A0 0002306a 67 56 |gV | BEQ 0x230c2 0002306c 4a a8 00 1e |J | TST.L (A0+0x1e) 00023070 67 10 |g | BEQ 0x23082 00023072 2f 28 00 22 |/( " | MOVE.L (A0+0x22),-(A7) 00023076 2f 28 00 1e |/( | MOVE.L (A0+0x1e),-(A7) 0002307a 4e b9 00 01 02 a4 |N | JSR Free1(a : Pointer; b : Long) 00023080 50 4f |PO | ADDQ.L #0x8,A7 00023082 7e 00 |~ | MOVEQ.L #0x00,D7 00023084 38 40 |8@ | MOVEA.W D0,A4 00023086 26 52 |&R | MOVEA.L (A2),A3 00023088 b6 c0 | | CMPA.W D0,A3 0002308a 67 14 |g | BEQ 0x230a0 0002308c 4a 07 |J | TST.B D7 0002308e 66 10 |f | BNE 0x230a0 00023090 b7 d1 | | CMPA.L (A1),A3 00023092 66 04 |f | BNE 0x23098 00023094 7e 01 |~ | MOVEQ.L #0x01,D7 00023096 60 06 |` | BRA 0x2309e 00023098 28 4b |(K | MOVEA.L A3,A4 0002309a 26 6b 00 26 |&k & | MOVEA.L (A3+0x26),A3 0002309e 60 e8 |` | BRA 0x23088 000230a0 4a 07 |J | TST.B D7 000230a2 67 1e |g | BEQ 0x230c2 000230a4 b8 c0 | | CMPA.W D0,A4 000230a6 66 06 |f | BNE 0x230ae 000230a8 24 ab 00 26 |$ & | MOVE.L (A3+0x26),(A2) 000230ac 60 06 |` | BRA 0x230b4 000230ae 29 6b 00 26 00 26 |)k & & | MOVE.L (A3+0x26),(A4+0x26) 000230b4 48 51 |HQ | PEA.L (A1) 000230b6 48 78 00 2a |Hx * | PEA.L 0x2a 000230ba 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 000230c0 50 4f |PO | ADDQ.L #0x8,A7 000230c2 4c df 1f 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1+A2+A3+A4 000230c6 4e 5e |N^ | UNLK A6 000230c8 4e 75 |Nu | RTS 000230ca ; -------------------------------------------------------------------------------------- 000230ca ; OMSI PASCAL Function 000230ca ; <LVAR 0x010 4(w)> 000230ca ; <LVAR 0x00c 4(r)> 000230ca ; <LVAR 0x008 4(r)> 000230ca ; <LVAR -0x006 @ 4(rw)> 000230ca ; <LVAR -0x024 @> 000230ca ; -------------------------------------------------------------------------------------- 000230ca 4e 56 ff 9a |NV | LINK.W A6,#0xff9a 000230ce bf d5 | | CMPA.L (A5),A7 000230d0 62 06 |b | BHI 0x230d8 000230d2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000230d6 4e 76 |Nv | TRAPV 000230d8 de fc 00 42 | B | ADDA.W #0x42,A7 000230dc 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 000230e0 47 ee ff fa |G | LEA.L (A6-0x6),A3 000230e4 49 ee 00 08 |I | LEA.L (A6+0x8),A4 000230e8 72 1e |r | MOVEQ.L #0x1e,D1 000230ea 9e c1 | | SUBA.W D1,A7 000230ec 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000230f0 2f 10 |/ | MOVE.L (A0),-(A7) 000230f2 4e ba fe 7a |N z | JSR 0x22f6e 000230f6 58 4f |XO | ADDQ.L #0x4,A7 000230f8 41 ee ff dc |A | LEA.L (A6-0x24),A0 000230fc 70 0e |p | MOVEQ.L #0x0e,D0 000230fe 30 df |0 | MOVE.W (A7)+,(A0)+ 00023100 51 c8 ff fc |Q | DBF D0,0x230fe 00023104 4a 94 |J | TST.L (A4) 00023106 6c 02 |l | BGE 0x2310a 00023108 42 94 |B | CLR.L (A4) 0002310a 59 4f |YO | SUBQ.L #0x4,A7 0002310c 20 4b | K | MOVEA.L A3,A0 0002310e 70 0e |p | MOVEQ.L #0x0e,D0 00023110 3f 20 |? | MOVE.W -(A0),-(A7) 00023112 51 c8 ff fc |Q | DBF D0,0x23110 00023116 4e ba fe d8 |N | JSR 0x22ff0 0002311a de c1 | | ADDA.W D1,A7 0002311c 26 9f |& | MOVE.L (A7)+,(A3) 0002311e 20 53 | S | MOVEA.L (A3),A0 00023120 b0 fc 00 01 | | CMPA.W #0x1,A0 00023124 67 12 |g | BEQ 0x23138 00023126 20 28 00 1e | ( | MOVE.L (A0+0x1e),D0 0002312a b0 94 | | CMP.L (A4),D0 0002312c 66 02 |f | BNE 0x23130 0002312e 60 4c |`L | BRA 0x2317c 00023130 2f 13 |/ | MOVE.L (A3),-(A7) 00023132 4e ba ff 10 |N | JSR 0x23044 00023136 58 4f |XO | ADDQ.L #0x4,A7 00023138 48 53 |HS | PEA.L (A3) 0002313a 48 78 00 2a |Hx * | PEA.L 0x2a 0002313e 4e b9 00 01 02 9c |N | JSR Malloc1(length : Long) : Pointer 00023144 50 4f |PO | ADDQ.L #0x8,A7 00023146 20 53 | S | MOVEA.L (A3),A0 00023148 21 79 00 02 7a 32 00 26 |!y z2 &| MOVE.L 0x27a32,(A0+0x26) 00023150 23 d3 00 02 7a 32 |# z2 | MOVE.L (A3),0x27a32 00023156 22 48 |"H | MOVEA.L A0,A1 00023158 45 ee ff dc |E | LEA.L (A6-0x24),A2 0002315c 70 1d |p | MOVEQ.L #0x1d,D0 0002315e 12 da | | MOVE.B (A2)+,(A1)+ 00023160 51 c8 ff fc |Q | DBF D0,0x2315e 00023164 21 54 00 1e |!T | MOVE.L (A4),(A0+0x1e) 00023168 4a 94 |J | TST.L (A4) 0002316a 67 10 |g | BEQ 0x2317c 0002316c 59 4f |YO | SUBQ.L #0x4,A7 0002316e 2f 14 |/ | MOVE.L (A4),-(A7) 00023170 4e b9 00 01 02 a0 |N | JSR Malloc2(VAR dst : Pointer; length : Word) 00023176 58 4f |XO | ADDQ.L #0x4,A7 00023178 21 5f 00 22 |!_ " | MOVE.L (A7)+,(A0+0x22) 0002317c 2d 53 00 10 |-S | MOVE.L (A3),(A6+0x10) 00023180 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 00023184 4e 5e |N^ | UNLK A6 00023186 4e 75 |Nu | RTS 00023188 ; -------------------------------------------------------------------------------------- 00023188 ; OMSI PASCAL Function 00023188 ; <LVAR 0x00c @> 00023188 ; <LVAR 0x008 @ 4(r)> 00023188 ; <LVAR -0x008 4(rw)> 00023188 ; -------------------------------------------------------------------------------------- 00023188 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 0002318c bf d5 | | CMPA.L (A5),A7 0002318e 62 06 |b | BHI 0x23196 00023190 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023194 4e 76 |Nv | TRAPV 00023196 de fc 00 2c | , | ADDA.W #0x2c,A7 0002319a 48 e7 c3 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D1+D0,-(A7) 0002319e 45 ee 00 08 |E | LEA.L (A6+0x8),A2 000231a2 20 52 | R | MOVEA.L (A2),A0 000231a4 30 10 |0 | MOVE.W (A0),D0 000231a6 48 c0 |H | EXTW.L D0 000231a8 2c 00 |, | MOVE.L D0,D6 000231aa 59 4f |YO | SUBQ.L #0x4,A7 000231ac 48 6e 00 0c |Hn | PEA.L (A6+0xc) 000231b0 2f 06 |/ | MOVE.L D6,-(A7) 000231b2 4e ba ff 16 |N | JSR 0x230ca 000231b6 50 4f |PO | ADDQ.L #0x8,A7 000231b8 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 000231bc 4a 86 |J | TST.L D6 000231be 67 40 |g@ | BEQ 0x23200 000231c0 20 6e ff f8 | n | MOVEA.L (A6-0x8),A0 000231c4 20 68 00 22 | h " | MOVEA.L (A0+0x22),A0 000231c8 2f 08 |/ | MOVE.L A0,-(A7) 000231ca 2f 06 |/ | MOVE.L D6,-(A7) 000231cc 7e 01 |~ | MOVEQ.L #0x01,D7 000231ce be 97 | | CMP.L (A7),D7 000231d0 6e 2c |n, | BGT 0x231fe 000231d2 20 07 | | MOVE.L D7,D0 000231d4 53 80 |S | SUBQ.L #0x1,D0 000231d6 0c 80 00 00 03 ff | | CMPI.L #0x000003ff,D0 000231dc 63 02 |c | BLS 0x231e0 000231de 4e 4f |NO | TRAP #15 000231e0 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 000231e4 22 52 |"R | MOVEA.L (A2),A1 000231e6 22 07 |" | MOVE.L D7,D1 000231e8 53 81 |S | SUBQ.L #0x1,D1 000231ea 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 000231f0 63 02 |c | BLS 0x231f4 000231f2 4e 4f |NO | TRAP #15 000231f4 11 b1 18 02 08 00 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L) 000231fa 52 87 |R | ADDQ.L #0x1,D7 000231fc 68 d0 |h | BVC 0x231ce 000231fe 50 4f |PO | ADDQ.L #0x8,A7 00023200 48 52 |HR | PEA.L (A2) 00023202 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023208 58 4f |XO | ADDQ.L #0x4,A7 0002320a 4c df 07 c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0+A1+A2 0002320e 4e 5e |N^ | UNLK A6 00023210 4e 75 |Nu | RTS 00023212 ; -------------------------------------------------------------------------------------- 00023212 ; OMSI PASCAL Function 00023212 ; <LVAR 0x008 4(r)> 00023212 ; <LVAR -0x004 @ 4(w)> 00023212 ; <LVAR -0x008 4(rw)> 00023212 ; <LVAR -0x00c 4(rw)> 00023212 ; <LVAR -0x010 4(rw)> 00023212 ; <LVAR -0x01c 4(rw)> 00023212 ; <LVAR -0x020 4(rw)> 00023212 ; -------------------------------------------------------------------------------------- 00023212 4e 56 ff 82 |NV | LINK.W A6,#0xff82 00023216 bf d5 | | CMPA.L (A5),A7 00023218 62 06 |b | BHI 0x23220 0002321a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002321e 4e 76 |Nv | TRAPV 00023220 de fc 00 5a | Z | ADDA.W #0x5a,A7 00023224 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00023228 45 ee ff f4 |E | LEA.L (A6-0xc),A2 0002322c 47 ee ff f0 |G | LEA.L (A6-0x10),A3 00023230 49 ee 00 08 |I | LEA.L (A6+0x8),A4 00023234 74 01 |t | MOVEQ.L #0x01,D2 00023236 59 4f |YO | SUBQ.L #0x4,A7 00023238 2f 14 |/ | MOVE.L (A4),-(A7) 0002323a 4e ba f0 32 |N 2 | JSR 0x2226e 0002323e 58 4f |XO | ADDQ.L #0x4,A7 00023240 26 9f |& | MOVE.L (A7)+,(A3) 00023242 20 13 | | MOVE.L (A3),D0 00023244 b0 82 | | CMP.L D2,D0 00023246 6c 2e |l. | BGE 0x23276 00023248 9e fc 00 1a | | SUBA.W #0x1a,A7 0002324c 20 4f | O | MOVEA.L A7,A0 0002324e 43 fa e7 e0 |C | LEA.L 0x21a30,A1 00023252 72 18 |r | MOVEQ.L #0x18,D1 00023254 10 d9 | | MOVE.B (A1)+,(A0)+ 00023256 51 c9 ff fc |Q | DBF D1,0x23254 0002325a 59 4f |YO | SUBQ.L #0x4,A7 0002325c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023260 3f 02 |? | MOVE.W D2,-(A7) 00023262 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00023266 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002326c 50 4f |PO | ADDQ.L #0x8,A7 0002326e 4e ba eb f2 |N | JSR 0x21e62 00023272 de fc 00 1e | | ADDA.W #0x1e,A7 00023276 42 92 |B | CLR.L (A2) 00023278 2f 00 |/ | MOVE.L D0,-(A7) 0002327a 7c 02 || | MOVEQ.L #0x02,D6 0002327c bc 97 | | CMP.L (A7),D6 0002327e 6e 1e |n | BGT 0x2329e 00023280 9e fc 00 0c | | SUBA.W #0xc,A7 00023284 2f 14 |/ | MOVE.L (A4),-(A7) 00023286 2f 06 |/ | MOVE.L D6,-(A7) 00023288 4e ba f8 22 |N " | JSR 0x22aac 0002328c 50 4f |PO | ADDQ.L #0x8,A7 0002328e 4e ba f7 e4 |N | JSR 0x22a74 00023292 50 4f |PO | ADDQ.L #0x8,A7 00023294 20 12 | | MOVE.L (A2),D0 00023296 d0 9f | | ADD.L (A7)+,D0 00023298 24 80 |$ | MOVE.L D0,(A2) 0002329a 52 86 |R | ADDQ.L #0x1,D6 0002329c 68 de |h | BVC 0x2327c 0002329e 58 4f |XO | ADDQ.L #0x4,A7 000232a0 20 13 | | MOVE.L (A3),D0 000232a2 55 80 |U | SUBQ.L #0x2,D0 000232a4 d1 92 | | ADD.L D0,(A2) 000232a6 59 4f |YO | SUBQ.L #0x4,A7 000232a8 2f 14 |/ | MOVE.L (A4),-(A7) 000232aa 48 78 00 01 |Hx | PEA.L 0x1 000232ae 4e ba f8 da |N | JSR 0x22b8a 000232b2 50 4f |PO | ADDQ.L #0x8,A7 000232b4 2d 57 ff fc |-W | MOVE.L (A7),(A6-0x4) 000232b8 48 6e ff fc |Hn | PEA.L (A6-0x4) 000232bc 2f 12 |/ | MOVE.L (A2),-(A7) 000232be 4e ba fe 0a |N | JSR 0x230ca 000232c2 50 4f |PO | ADDQ.L #0x8,A7 000232c4 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 000232c8 4a 92 |J | TST.L (A2) 000232ca 6f 00 00 aa |o | BLE 0x23376 000232ce 20 6e ff f8 | n | MOVEA.L (A6-0x8),A0 000232d2 20 68 00 22 | h " | MOVEA.L (A0+0x22),A0 000232d6 2f 08 |/ | MOVE.L A0,-(A7) 000232d8 7e 01 |~ | MOVEQ.L #0x01,D7 000232da 2f 13 |/ | MOVE.L (A3),-(A7) 000232dc 7c 02 || | MOVEQ.L #0x02,D6 000232de bc 97 | | CMP.L (A7),D6 000232e0 6e 00 00 92 |n | BGT 0x23374 000232e4 51 4f |QO | SUBQ.L #0x8,A7 000232e6 2f 14 |/ | MOVE.L (A4),-(A7) 000232e8 2f 06 |/ | MOVE.L D6,-(A7) 000232ea 4e ba f7 c0 |N | JSR 0x22aac 000232ee 50 4f |PO | ADDQ.L #0x8,A7 000232f0 2d 5f ff e0 |-_ | MOVE.L (A7)+,(A6-0x20) 000232f4 2d 5f ff e4 |-_ | MOVE.L (A7)+,(A6-0x1c) 000232f8 2f 2e ff e4 |/. | MOVE.L (A6-0x1c),-(A7) 000232fc 2a 2e ff e0 |*. | MOVE.L (A6-0x20),D5 00023300 ba 97 | | CMP.L (A7),D5 00023302 6e 14 |n | BGT 0x23318 00023304 20 17 | | MOVE.L (A7),D0 00023306 0c 85 80 00 00 01 | | CMPI.L #0x80000001,D5 0002330c 6d 08 |m | BLT 0x23316 0002330e 0c 80 7f ff ff ff | | CMPI.L #0x7fffffff,D0 00023314 6f 02 |o | BLE 0x23318 00023316 4e 4f |NO | TRAP #15 00023318 ba 97 | | CMP.L (A7),D5 0002331a 6e 32 |n2 | BGT 0x2334e 0002331c 20 07 | | MOVE.L D7,D0 0002331e 53 80 |S | SUBQ.L #0x1,D0 00023320 0c 80 00 00 03 ff | | CMPI.L #0x000003ff,D0 00023326 63 02 |c | BLS 0x2332a 00023328 4e 4f |NO | TRAP #15 0002332a 20 6f 00 08 | o | MOVEA.L (A7+0x8),A0 0002332e 22 05 |" | MOVE.L D5,D1 00023330 53 81 |S | SUBQ.L #0x1,D1 00023332 0c 81 00 00 1f ff | | CMPI.L #0x00001fff,D1 00023338 63 02 |c | BLS 0x2333c 0002333a 4e 4f |NO | TRAP #15 0002333c 43 f9 00 02 5a 00 |C Z | LEA.L 0x25a00,A1 00023342 11 b1 18 08 08 00 | | MOVE.B (A1+D1.L+#0x8),(A0+D0.L) 00023348 52 87 |R | ADDQ.L #0x1,D7 0002334a 52 85 |R | ADDQ.L #0x1,D5 0002334c 68 ca |h | BVC 0x23318 0002334e 58 4f |XO | ADDQ.L #0x4,A7 00023350 bc 93 | | CMP.L (A3),D6 00023352 67 1a |g | BEQ 0x2336e 00023354 20 07 | | MOVE.L D7,D0 00023356 53 80 |S | SUBQ.L #0x1,D0 00023358 0c 80 00 00 03 ff | | CMPI.L #0x000003ff,D0 0002335e 63 02 |c | BLS 0x23362 00023360 4e 4f |NO | TRAP #15 00023362 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00023366 11 bc 00 2c 08 00 | , | MOVE.B #0x2c,(A0+D0.L) 0002336c 52 87 |R | ADDQ.L #0x1,D7 0002336e 52 86 |R | ADDQ.L #0x1,D6 00023370 68 00 ff 6c |h l | BVC 0x232de 00023374 50 4f |PO | ADDQ.L #0x8,A7 00023376 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 0002337a 4e 5e |N^ | UNLK A6 0002337c 4e 75 |Nu | RTS 0002337e ; -------------------------------------------------------------------------------------- 0002337e ; OMSI PASCAL Function 0002337e ; <LVAR 0x008 4(r)> 0002337e ; <LVAR -0x00c 4(rw)> 0002337e ; -------------------------------------------------------------------------------------- 0002337e 4e 56 ff a0 |NV | LINK.W A6,#0xffa0 00023382 bf d5 | | CMPA.L (A5),A7 00023384 62 06 |b | BHI 0x2338c 00023386 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002338a 4e 76 |Nv | TRAPV 0002338c de fc 00 54 | T | ADDA.W #0x54,A7 00023390 48 e7 e1 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D2+D1+D0,-(A7) 00023394 47 f9 00 02 7a 08 |G z | LEA.L 0x27a08,A3 0002339a 74 01 |t | MOVEQ.L #0x01,D2 0002339c 59 4f |YO | SUBQ.L #0x4,A7 0002339e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000233a2 48 78 00 01 |Hx | PEA.L 0x1 000233a6 4e ba f7 e2 |N | JSR 0x22b8a 000233aa 50 4f |PO | ADDQ.L #0x8,A7 000233ac 28 5f |(_ | MOVEA.L (A7)+,A4 000233ae 9e fc 00 22 | " | SUBA.W #0x22,A7 000233b2 2f 0c |/ | MOVE.L A4,-(A7) 000233b4 4e ba fb b8 |N | JSR 0x22f6e 000233b8 58 4f |XO | ADDQ.L #0x4,A7 000233ba 4e ba fc 34 |N 4 | JSR 0x22ff0 000233be de fc 00 1e | | ADDA.W #0x1e,A7 000233c2 2d 5f ff f4 |-_ | MOVE.L (A7)+,(A6-0xc) 000233c6 20 6e ff f4 | n | MOVEA.L (A6-0xc),A0 000233ca b0 c2 | | CMPA.W D2,A0 000233cc 66 42 |fB | BNE 0x23410 000233ce 9e fc 00 14 | | SUBA.W #0x14,A7 000233d2 22 4f |"O | MOVEA.L A7,A1 000233d4 45 fa e6 74 |E t | LEA.L 0x21a4a,A2 000233d8 70 12 |p | MOVEQ.L #0x12,D0 000233da 12 da | | MOVE.B (A2)+,(A1)+ 000233dc 51 c8 ff fc |Q | DBF D0,0x233da 000233e0 51 4f |QO | SUBQ.L #0x8,A7 000233e2 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000233e6 3f 02 |? | MOVE.W D2,-(A7) 000233e8 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 000233ec 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000233f2 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 000233f6 48 78 00 01 |Hx | PEA.L 0x1 000233fa 4e ba f7 8e |N | JSR 0x22b8a 000233fe 50 4f |PO | ADDQ.L #0x8,A7 00023400 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023406 50 4f |PO | ADDQ.L #0x8,A7 00023408 4e ba ea 58 |N X | JSR 0x21e62 0002340c de fc 00 18 | | ADDA.W #0x18,A7 00023410 2f 08 |/ | MOVE.L A0,-(A7) 00023412 2f 13 |/ | MOVE.L (A3),-(A7) 00023414 2f 28 00 1e |/( | MOVE.L (A0+0x1e),-(A7) 00023418 44 97 |D | NEG.L (A7) 0002341a 4e ba ef 9a |N | JSR 0x223b6 0002341e 58 4f |XO | ADDQ.L #0x4,A7 00023420 2e a8 00 1e |. | MOVE.L (A0+0x1e),(A7) 00023424 7e 01 |~ | MOVEQ.L #0x01,D7 00023426 be 97 | | CMP.L (A7),D7 00023428 6e 38 |n8 | BGT 0x23462 0002342a 20 07 | | MOVE.L D7,D0 0002342c d0 93 | | ADD.L (A3),D0 0002342e 53 80 |S | SUBQ.L #0x1,D0 00023430 53 80 |S | SUBQ.L #0x1,D0 00023432 0c 80 00 00 1f ff | | CMPI.L #0x00001fff,D0 00023438 63 02 |c | BLS 0x2343c 0002343a 4e 4f |NO | TRAP #15 0002343c 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 00023442 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 00023446 22 69 00 22 |"i " | MOVEA.L (A1+0x22),A1 0002344a 22 07 |" | MOVE.L D7,D1 0002344c 53 81 |S | SUBQ.L #0x1,D1 0002344e 0c 81 00 00 03 ff | | CMPI.L #0x000003ff,D1 00023454 63 02 |c | BLS 0x23458 00023456 4e 4f |NO | TRAP #15 00023458 11 b1 18 00 08 08 | | MOVE.B (A1+D1.L),(A0+D0.L+#0x8) 0002345e 52 87 |R | ADDQ.L #0x1,D7 00023460 68 c4 |h | BVC 0x23426 00023462 50 4f |PO | ADDQ.L #0x8,A7 00023464 4c df 1f 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1+A2+A3+A4 00023468 4e 5e |N^ | UNLK A6 0002346a 4e 75 |Nu | RTS 0002346c ; -------------------------------------------------------------------------------------- 0002346c ; OMSI PASCAL Function 0002346c ; <LVAR -0x004 4(rw)> 0002346c ; -------------------------------------------------------------------------------------- 0002346c 4e 56 ff ae |NV | LINK.W A6,#0xffae 00023470 bf d5 | | CMPA.L (A5),A7 00023472 62 06 |b | BHI 0x2347a 00023474 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023478 4e 76 |Nv | TRAPV 0002347a de fc 00 4e | N | ADDA.W #0x4e,A7 0002347e 48 e7 e0 f0 |H | MOVEM.L A3+A2+A1+A0+D2+D1+D0,-(A7) 00023482 47 ee ff fc |G | LEA.L (A6-0x4),A3 00023486 72 01 |r | MOVEQ.L #0x01,D1 00023488 74 1e |t | MOVEQ.L #0x1e,D2 0002348a 26 b9 00 02 7a 32 |& z2 | MOVE.L 0x27a32,(A3) 00023490 20 53 | S | MOVEA.L (A3),A0 00023492 b0 c1 | | CMPA.W D1,A0 00023494 67 30 |g0 | BEQ 0x234c6 00023496 9e c2 | | SUBA.W D2,A7 00023498 22 4f |"O | MOVEA.L A7,A1 0002349a 24 48 |$H | MOVEA.L A0,A2 0002349c 70 1d |p | MOVEQ.L #0x1d,D0 0002349e 12 da | | MOVE.B (A2)+,(A1)+ 000234a0 51 c8 ff fc |Q | DBF D0,0x2349e 000234a4 59 4f |YO | SUBQ.L #0x4,A7 000234a6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000234aa 3f 01 |? | MOVE.W D1,-(A7) 000234ac 3f 02 |? | MOVE.W D2,-(A7) 000234ae 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000234b4 50 4f |PO | ADDQ.L #0x8,A7 000234b6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000234bc de fc 00 22 | " | ADDA.W #0x22,A7 000234c0 26 a8 00 26 |& & | MOVE.L (A0+0x26),(A3) 000234c4 60 ca |` | BRA 0x23490 000234c6 4c df 0f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3 000234ca 4e 5e |N^ | UNLK A6 000234cc 4e 75 |Nu | RTS 000234ce ; -------------------------------------------------------------------------------------- 000234ce ; OMSI PASCAL Function 000234ce ; <LVAR 0x008 4(r)> 000234ce ; -------------------------------------------------------------------------------------- 000234ce 4e 56 ff ce |NV | LINK.W A6,#0xffce 000234d2 bf d5 | | CMPA.L (A5),A7 000234d4 62 06 |b | BHI 0x234dc 000234d6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000234da 4e 76 |Nv | TRAPV 000234dc de fc 00 32 | 2 | ADDA.W #0x32,A7 000234e0 9e fc 00 26 | & | SUBA.W #0x26,A7 000234e4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000234e8 48 78 00 01 |Hx | PEA.L 0x1 000234ec 4e ba f6 9c |N | JSR 0x22b8a 000234f0 50 4f |PO | ADDQ.L #0x8,A7 000234f2 4e ba fa 7a |N z | JSR 0x22f6e 000234f6 58 4f |XO | ADDQ.L #0x4,A7 000234f8 4e ba fa f6 |N | JSR 0x22ff0 000234fc de fc 00 1e | | ADDA.W #0x1e,A7 00023500 4e ba fb 42 |N B | JSR 0x23044 00023504 58 4f |XO | ADDQ.L #0x4,A7 00023506 4e 5e |N^ | UNLK A6 00023508 4e 75 |Nu | RTS 0002350a ; -------------------------------------------------------------------------------------- 0002350a ; OMSI PASCAL Function 0002350a ; -------------------------------------------------------------------------------------- 0002350a 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 0002350e bf d5 | | CMPA.L (A5),A7 00023510 62 06 |b | BHI 0x23518 00023512 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023516 4e 76 |Nv | TRAPV 00023518 de fc 00 0c | | ADDA.W #0xc,A7 0002351c 51 4f |QO | SUBQ.L #0x8,A7 0002351e 4e b9 00 01 03 cc |N | JSR GetPushLevel() : Long 00023524 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002352a 58 4f |XO | ADDQ.L #0x4,A7 0002352c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023532 58 4f |XO | ADDQ.L #0x4,A7 00023534 4e 5e |N^ | UNLK A6 00023536 4e 75 |Nu | RTS 00023538 ; -------------------------------------------------------------------------------------- 00023538 ; OMSI PASCAL Function 00023538 ; <LVAR 0x008 4(r)> 00023538 ; <LVAR -0x004 1(rw)> 00023538 ; <LVAR -0x008 @ 4(rw)> 00023538 ; <LVAR -0x00c @ 4(r)> 00023538 ; <LVAR -0x010 @ 4(r)> 00023538 ; <LVAR -0x012 @ 1(r)> 00023538 ; <LVAR -0x013 @ 1(r)> 00023538 ; <LVAR -0x014 @ 1(r)> 00023538 ; <LVAR -0x024 4(rw)> 00023538 ; <LVAR -0x028 4(rw)> 00023538 ; <LVAR -0x02c 4(rw)> 00023538 ; <LVAR -0x030 @ 4(r)> 00023538 ; <LVAR -0x032 1(w)> 00023538 ; <LVAR -0x036 @ 4(r)> 00023538 ; <LVAR -0x038 @ 1(r)> 00023538 ; <LVAR -0x03c @ 4(rw)> 00023538 ; -------------------------------------------------------------------------------------- 00023538 4e 56 ff 64 |NV d | LINK.W A6,#0xff64 0002353c bf d5 | | CMPA.L (A5),A7 0002353e 62 06 |b | BHI 0x23546 00023540 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023544 4e 76 |Nv | TRAPV 00023546 de fc 00 60 | ` | ADDA.W #0x60,A7 0002354a 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002354e 45 ee ff c4 |E | LEA.L (A6-0x3c),A2 00023552 47 ee 00 08 |G | LEA.L (A6+0x8),A3 00023556 49 f9 00 01 02 c4 |I | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A4 0002355c 74 01 |t | MOVEQ.L #0x01,D2 0002355e 76 14 |v | MOVEQ.L #0x14,D3 00023560 28 3c ff ff 80 00 |(< | MOVE.L #0xffff8000,D4 00023566 59 4f |YO | SUBQ.L #0x4,A7 00023568 2f 13 |/ | MOVE.L (A3),-(A7) 0002356a 4e ba ed 02 |N | JSR 0x2226e 0002356e 58 4f |XO | ADDQ.L #0x4,A7 00023570 2d 5f ff d4 |-_ | MOVE.L (A7)+,(A6-0x2c) 00023574 66 28 |f( | BNE 0x2359e 00023576 59 4f |YO | SUBQ.L #0x4,A7 00023578 1e ba e4 f6 | | MOVE.B 0x21a70,(A7) 0002357c 1f 7a e4 f3 00 01 | z | MOVE.B 0x21a71,(A7+0x1) 00023582 1f 7a e4 ee 00 02 | z | MOVE.B 0x21a72,(A7+0x2) 00023588 59 4f |YO | SUBQ.L #0x4,A7 0002358a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002358e 3f 02 |? | MOVE.W D2,-(A7) 00023590 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00023594 4e 94 |N | JSR (A4) 00023596 50 4f |PO | ADDQ.L #0x8,A7 00023598 24 9f |$ | MOVE.L (A7)+,(A2) 0002359a 58 4f |XO | ADDQ.L #0x4,A7 0002359c 60 10 |` | BRA 0x235ae 0002359e 59 4f |YO | SUBQ.L #0x4,A7 000235a0 2f 13 |/ | MOVE.L (A3),-(A7) 000235a2 48 78 00 01 |Hx | PEA.L 0x1 000235a6 4e ba f5 e2 |N | JSR 0x22b8a 000235aa 50 4f |PO | ADDQ.L #0x8,A7 000235ac 24 9f |$ | MOVE.L (A7)+,(A2) 000235ae 5d 4f |]O | SUBQ.L #0x6,A7 000235b0 20 4f | O | MOVEA.L A7,A0 000235b2 43 fa e4 c0 |C | LEA.L 0x21a74,A1 000235b6 70 04 |p | MOVEQ.L #0x04,D0 000235b8 10 d9 | | MOVE.B (A1)+,(A0)+ 000235ba 51 c8 ff fc |Q | DBF D0,0x235b8 000235be 59 4f |YO | SUBQ.L #0x4,A7 000235c0 2f 12 |/ | MOVE.L (A2),-(A7) 000235c2 59 4f |YO | SUBQ.L #0x4,A7 000235c4 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000235c8 3f 02 |? | MOVE.W D2,-(A7) 000235ca 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 000235ce 4e 94 |N | JSR (A4) 000235d0 50 4f |PO | ADDQ.L #0x8,A7 000235d2 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000235d8 50 4f |PO | ADDQ.L #0x8,A7 000235da 24 9f |$ | MOVE.L (A7)+,(A2) 000235dc 54 4f |TO | ADDQ.L #0x2,A7 000235de 2e 92 |. | MOVE.L (A2),(A7) 000235e0 42 27 |B' | CLR.B -(A7) 000235e2 1f 02 | | MOVE.B D2,-(A7) 000235e4 48 78 00 00 |Hx | PEA.L 0x0 000235e8 48 6e ff c8 |Hn | PEA.L (A6-0x38) 000235ec 48 6e ff ca |Hn | PEA.L (A6-0x36) 000235f0 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000235f6 de c3 | | ADDA.W D3,A7 000235f8 4a 2e ff c8 |J. | TST.B (A6-0x38) 000235fc 67 0e |g | BEQ 0x2360c 000235fe 48 52 |HR | PEA.L (A2) 00023600 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023606 58 4f |XO | ADDQ.L #0x4,A7 00023608 60 00 02 4e |` N | BRA 0x23858 0002360c 20 6e ff ca | n | MOVEA.L (A6-0x36),A0 00023610 10 28 00 3f | ( ? | MOVE.B (A0+0x3f),D0 00023614 ed 08 | | LSL.B #0x6,D0 00023616 ee 08 | | LSR.B #0x7,D0 00023618 1d 40 ff ce | @ | MOVE.B D0,(A6-0x32) 0002361c 42 27 |B' | CLR.B -(A7) 0002361e 1f 02 | | MOVE.B D2,-(A7) 00023620 48 78 00 01 |Hx | PEA.L 0x1 00023624 48 6e ff c8 |Hn | PEA.L (A6-0x38) 00023628 48 6e ff ca |Hn | PEA.L (A6-0x36) 0002362c 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00023632 de fc 00 10 | | ADDA.W #0x10,A7 00023636 20 52 | R | MOVEA.L (A2),A0 00023638 32 10 |2 | MOVE.W (A0),D1 0002363a 48 c1 |H | EXTW.L D1 0002363c 5b 81 |[ | SUBQ.L #0x5,D1 0002363e 92 84 | | SUB.L D4,D1 00023640 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 00023646 63 02 |c | BLS 0x2364a 00023648 4e 4f |NO | TRAP #15 0002364a d2 84 | | ADD.L D4,D1 0002364c 30 81 |0 | MOVE.W D1,(A0) 0002364e 4a 00 |J | TST.B D0 00023650 66 36 |f6 | BNE 0x23688 00023652 41 fa e4 1c |A | LEA.L 0x21a70,A0 00023656 70 08 |p | MOVEQ.L #0x08,D0 00023658 3f 20 |? | MOVE.W -(A0),-(A7) 0002365a 51 c8 ff fc |Q | DBF D0,0x23658 0002365e 59 4f |YO | SUBQ.L #0x4,A7 00023660 2f 12 |/ | MOVE.L (A2),-(A7) 00023662 59 4f |YO | SUBQ.L #0x4,A7 00023664 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00023668 3f 02 |? | MOVE.W D2,-(A7) 0002366a 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 0002366e 4e 94 |N | JSR (A4) 00023670 50 4f |PO | ADDQ.L #0x8,A7 00023672 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023678 50 4f |PO | ADDQ.L #0x8,A7 0002367a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023680 de fc 00 16 | | ADDA.W #0x16,A7 00023684 60 00 01 d2 |` | BRA 0x23858 00023688 48 6e ff d0 |Hn | PEA.L (A6-0x30) 0002368c 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00023692 58 4f |XO | ADDQ.L #0x4,A7 00023694 20 6e ff d0 | n | MOVEA.L (A6-0x30),A0 00023698 2f 08 |/ | MOVE.L A0,-(A7) 0002369a 7e 01 |~ | MOVEQ.L #0x01,D7 0002369c 2f 2e ff d4 |/. | MOVE.L (A6-0x2c),-(A7) 000236a0 7a 02 |z | MOVEQ.L #0x02,D5 000236a2 ba 97 | | CMP.L (A7),D5 000236a4 6e 00 00 94 |n | BGT 0x2373a 000236a8 51 4f |QO | SUBQ.L #0x8,A7 000236aa 2f 13 |/ | MOVE.L (A3),-(A7) 000236ac 2f 05 |/ | MOVE.L D5,-(A7) 000236ae 4e ba f3 fc |N | JSR 0x22aac 000236b2 50 4f |PO | ADDQ.L #0x8,A7 000236b4 2d 5f ff d8 |-_ | MOVE.L (A7)+,(A6-0x28) 000236b8 2d 5f ff dc |-_ | MOVE.L (A7)+,(A6-0x24) 000236bc 2f 2e ff dc |/. | MOVE.L (A6-0x24),-(A7) 000236c0 2c 2e ff d8 |,. | MOVE.L (A6-0x28),D6 000236c4 bc 97 | | CMP.L (A7),D6 000236c6 6e 14 |n | BGT 0x236dc 000236c8 20 17 | | MOVE.L (A7),D0 000236ca 0c 86 80 00 00 01 | | CMPI.L #0x80000001,D6 000236d0 6d 08 |m | BLT 0x236da 000236d2 0c 80 7f ff ff ff | | CMPI.L #0x7fffffff,D0 000236d8 6f 02 |o | BLE 0x236dc 000236da 4e 4f |NO | TRAP #15 000236dc bc 97 | | CMP.L (A7),D6 000236de 6e 32 |n2 | BGT 0x23712 000236e0 20 07 | | MOVE.L D7,D0 000236e2 53 80 |S | SUBQ.L #0x1,D0 000236e4 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 000236ea 63 02 |c | BLS 0x236ee 000236ec 4e 4f |NO | TRAP #15 000236ee 20 6f 00 08 | o | MOVEA.L (A7+0x8),A0 000236f2 22 06 |" | MOVE.L D6,D1 000236f4 53 81 |S | SUBQ.L #0x1,D1 000236f6 0c 81 00 00 1f ff | | CMPI.L #0x00001fff,D1 000236fc 63 02 |c | BLS 0x23700 000236fe 4e 4f |NO | TRAP #15 00023700 43 f9 00 02 5a 00 |C Z | LEA.L 0x25a00,A1 00023706 11 b1 18 08 08 02 | | MOVE.B (A1+D1.L+#0x8),(A0+D0.L+#0x2) 0002370c 52 87 |R | ADDQ.L #0x1,D7 0002370e 52 86 |R | ADDQ.L #0x1,D6 00023710 68 ca |h | BVC 0x236dc 00023712 58 4f |XO | ADDQ.L #0x4,A7 00023714 ba ae ff d4 | | CMP.L (A6-0x2c),D5 00023718 67 1a |g | BEQ 0x23734 0002371a 20 07 | | MOVE.L D7,D0 0002371c 53 80 |S | SUBQ.L #0x1,D0 0002371e 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 00023724 63 02 |c | BLS 0x23728 00023726 4e 4f |NO | TRAP #15 00023728 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 0002372c 11 bc 00 2c 08 02 | , | MOVE.B #0x2c,(A0+D0.L+#0x2) 00023732 52 87 |R | ADDQ.L #0x1,D7 00023734 52 85 |R | ADDQ.L #0x1,D5 00023736 68 00 ff 6a |h j | BVC 0x236a2 0002373a 58 4f |XO | ADDQ.L #0x4,A7 0002373c 20 57 | W | MOVEA.L (A7),A0 0002373e 20 07 | | MOVE.L D7,D0 00023740 53 80 |S | SUBQ.L #0x1,D0 00023742 90 84 | | SUB.L D4,D0 00023744 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 0002374a 63 02 |c | BLS 0x2374e 0002374c 4e 4f |NO | TRAP #15 0002374e d0 84 | | ADD.L D4,D0 00023750 30 80 |0 | MOVE.W D0,(A0) 00023752 54 4f |TO | ADDQ.L #0x2,A7 00023754 3e ba e3 28 |> ( | MOVE.W 0x21a7e,(A7) 00023758 3f 3a e3 22 |?: " | MOVE.W 0x21a7c,-(A7) 0002375c 3f 3a e3 1c |?: | MOVE.W 0x21a7a,-(A7) 00023760 59 4f |YO | SUBQ.L #0x4,A7 00023762 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023766 3f 02 |? | MOVE.W D2,-(A7) 00023768 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 0002376c 4e 94 |N | JSR (A4) 0002376e 50 4f |PO | ADDQ.L #0x8,A7 00023770 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 00023774 54 4f |TO | ADDQ.L #0x2,A7 00023776 2e 93 |. | MOVE.L (A3),(A7) 00023778 48 78 00 00 |Hx | PEA.L 0x0 0002377c 2f 2e ff f8 |/. | MOVE.L (A6-0x8),-(A7) 00023780 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00023784 48 6e ff ed |Hn | PEA.L (A6-0x13) 00023788 4e b9 00 02 51 44 |N QD | JSR 0x25144 0002378e de c3 | | ADDA.W D3,A7 00023790 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00023794 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002379a 54 4f |TO | ADDQ.L #0x2,A7 0002379c 3e ba e2 e6 |> | MOVE.W 0x21a84,(A7) 000237a0 3f 3a e2 e0 |?: | MOVE.W 0x21a82,-(A7) 000237a4 3f 3a e2 da |?: | MOVE.W 0x21a80,-(A7) 000237a8 59 4f |YO | SUBQ.L #0x4,A7 000237aa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000237ae 3f 02 |? | MOVE.W D2,-(A7) 000237b0 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 000237b4 4e 94 |N | JSR (A4) 000237b6 50 4f |PO | ADDQ.L #0x8,A7 000237b8 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 000237bc 54 4f |TO | ADDQ.L #0x2,A7 000237be 2e 93 |. | MOVE.L (A3),(A7) 000237c0 48 78 00 00 |Hx | PEA.L 0x0 000237c4 2f 2e ff f8 |/. | MOVE.L (A6-0x8),-(A7) 000237c8 48 6e ff f4 |Hn | PEA.L (A6-0xc) 000237cc 48 6e ff ee |Hn | PEA.L (A6-0x12) 000237d0 4e b9 00 02 51 44 |N QD | JSR 0x25144 000237d6 de c3 | | ADDA.W D3,A7 000237d8 48 6e ff f8 |Hn | PEA.L (A6-0x8) 000237dc 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000237e2 58 4f |XO | ADDQ.L #0x4,A7 000237e4 4a 2e ff ed |J. | TST.B (A6-0x13) 000237e8 66 06 |f | BNE 0x237f0 000237ea 4a 2e ff ee |J. | TST.B (A6-0x12) 000237ee 67 06 |g | BEQ 0x237f6 000237f0 42 2e ff fc |B. | CLR.B (A6-0x4) 000237f4 60 04 |` | BRA 0x237fa 000237f6 1d 42 ff fc | B | MOVE.B D2,(A6-0x4) 000237fa 2f 12 |/ | MOVE.L (A2),-(A7) 000237fc 2f 2e ff d0 |/. | MOVE.L (A6-0x30),-(A7) 00023800 10 2e ff fc | . | MOVE.B (A6-0x4),D0 00023804 48 80 |H | EXTB.W D0 00023806 41 bc 00 02 |A | CHK.W #0x2,D0 0002380a 1f 00 | | MOVE.B D0,-(A7) 0002380c 48 6e ff ec |Hn | PEA.L (A6-0x14) 00023810 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00023816 de fc 00 0e | | ADDA.W #0xe,A7 0002381a 4a 2e ff ed |J. | TST.B (A6-0x13) 0002381e 67 20 |g | BEQ 0x23840 00023820 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 00023824 59 4f |YO | SUBQ.L #0x4,A7 00023826 10 2e ff ec | . | MOVE.B (A6-0x14),D0 0002382a 48 80 |H | EXTB.W D0 0002382c 41 bc 00 0e |A | CHK.W #0xe,D0 00023830 1f 00 | | MOVE.B D0,-(A7) 00023832 4e b9 00 01 03 c0 |N | JSR ExpErrMsg(a: Byte) : String 00023838 54 4f |TO | ADDQ.L #0x2,A7 0002383a 4e ba f9 4c |N L | JSR 0x23188 0002383e 50 4f |PO | ADDQ.L #0x8,A7 00023840 4a 2e ff ee |J. | TST.B (A6-0x12) 00023844 67 12 |g | BEQ 0x23858 00023846 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 0002384a 59 4f |YO | SUBQ.L #0x4,A7 0002384c 4e b9 00 01 03 c8 |N | JSR FSCALL_103c8 00023852 4e ba f9 34 |N 4 | JSR 0x23188 00023856 50 4f |PO | ADDQ.L #0x8,A7 00023858 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 0002385c 4e 5e |N^ | UNLK A6 0002385e 4e 75 |Nu | RTS 00023860 ; -------------------------------------------------------------------------------------- 00023860 ; OMSI PASCAL Function 00023860 ; <LVAR 0x008 4(r)> 00023860 ; <LVAR -0x004 @ 4(rw)> 00023860 ; <LVAR -0x008 @ 4(rw)> 00023860 ; -------------------------------------------------------------------------------------- 00023860 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00023864 bf d5 | | CMPA.L (A5),A7 00023866 62 06 |b | BHI 0x2386e 00023868 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002386c 4e 76 |Nv | TRAPV 0002386e de fc 00 18 | | ADDA.W #0x18,A7 00023872 48 e7 00 c0 |H | MOVEM.L A1+A0,-(A7) 00023876 41 ee ff f8 |A | LEA.L (A6-0x8),A0 0002387a 43 ee ff fc |C | LEA.L (A6-0x4),A1 0002387e 59 4f |YO | SUBQ.L #0x4,A7 00023880 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023884 48 78 00 01 |Hx | PEA.L 0x1 00023888 4e ba f3 00 |N | JSR 0x22b8a 0002388c 50 4f |PO | ADDQ.L #0x8,A7 0002388e 20 97 | | MOVE.L (A7),(A0) 00023890 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023894 48 78 00 02 |Hx | PEA.L 0x2 00023898 4e ba f2 f0 |N | JSR 0x22b8a 0002389c 50 4f |PO | ADDQ.L #0x8,A7 0002389e 22 97 |" | MOVE.L (A7),(A1) 000238a0 54 4f |TO | ADDQ.L #0x2,A7 000238a2 2f 10 |/ | MOVE.L (A0),-(A7) 000238a4 2f 11 |/ | MOVE.L (A1),-(A7) 000238a6 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000238ac 50 4f |PO | ADDQ.L #0x8,A7 000238ae 4a 1f |J | TST.B (A7)+ 000238b0 67 06 |g | BEQ 0x238b8 000238b2 4e ba ed 96 |N | JSR 0x2264a 000238b6 60 04 |` | BRA 0x238bc 000238b8 4e ba ed d6 |N | JSR 0x22690 000238bc 48 51 |HQ | PEA.L (A1) 000238be 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000238c4 58 4f |XO | ADDQ.L #0x4,A7 000238c6 48 50 |HP | PEA.L (A0) 000238c8 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000238ce 58 4f |XO | ADDQ.L #0x4,A7 000238d0 4c df 03 00 |L | MOVEM.L (A7)+,A0+A1 000238d4 4e 5e |N^ | UNLK A6 000238d6 4e 75 |Nu | RTS 000238d8 ; -------------------------------------------------------------------------------------- 000238d8 ; OMSI PASCAL Function 000238d8 ; <LVAR 0x008 4(r)> 000238d8 ; <LVAR -0x004 @ 4(rw)> 000238d8 ; <LVAR -0x008 @ 4(rw)> 000238d8 ; -------------------------------------------------------------------------------------- 000238d8 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 000238dc bf d5 | | CMPA.L (A5),A7 000238de 62 06 |b | BHI 0x238e6 000238e0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000238e4 4e 76 |Nv | TRAPV 000238e6 de fc 00 18 | | ADDA.W #0x18,A7 000238ea 48 e7 00 c0 |H | MOVEM.L A1+A0,-(A7) 000238ee 41 ee ff f8 |A | LEA.L (A6-0x8),A0 000238f2 43 ee ff fc |C | LEA.L (A6-0x4),A1 000238f6 59 4f |YO | SUBQ.L #0x4,A7 000238f8 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000238fc 48 78 00 01 |Hx | PEA.L 0x1 00023900 4e ba f2 88 |N | JSR 0x22b8a 00023904 50 4f |PO | ADDQ.L #0x8,A7 00023906 20 97 | | MOVE.L (A7),(A0) 00023908 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002390c 48 78 00 02 |Hx | PEA.L 0x2 00023910 4e ba f2 78 |N x | JSR 0x22b8a 00023914 50 4f |PO | ADDQ.L #0x8,A7 00023916 22 97 |" | MOVE.L (A7),(A1) 00023918 54 4f |TO | ADDQ.L #0x2,A7 0002391a 2f 10 |/ | MOVE.L (A0),-(A7) 0002391c 2f 11 |/ | MOVE.L (A1),-(A7) 0002391e 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00023924 50 4f |PO | ADDQ.L #0x8,A7 00023926 4a 1f |J | TST.B (A7)+ 00023928 66 06 |f | BNE 0x23930 0002392a 4e ba ed 1e |N | JSR 0x2264a 0002392e 60 04 |` | BRA 0x23934 00023930 4e ba ed 5e |N ^ | JSR 0x22690 00023934 48 51 |HQ | PEA.L (A1) 00023936 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002393c 58 4f |XO | ADDQ.L #0x4,A7 0002393e 48 50 |HP | PEA.L (A0) 00023940 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023946 58 4f |XO | ADDQ.L #0x4,A7 00023948 4c df 03 00 |L | MOVEM.L (A7)+,A0+A1 0002394c 4e 5e |N^ | UNLK A6 0002394e 4e 75 |Nu | RTS 00023950 ; -------------------------------------------------------------------------------------- 00023950 ; OMSI PASCAL Function 00023950 ; <LVAR 0x008 4(r)> 00023950 ; -------------------------------------------------------------------------------------- 00023950 4e 56 ff f0 |NV | LINK.W A6,#0xfff0 00023954 bf d5 | | CMPA.L (A5),A7 00023956 62 06 |b | BHI 0x2395e 00023958 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002395c 4e 76 |Nv | TRAPV 0002395e de fc 00 10 | | ADDA.W #0x10,A7 00023962 59 4f |YO | SUBQ.L #0x4,A7 00023964 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023968 48 78 00 01 |Hx | PEA.L 0x1 0002396c 4e ba f2 1c |N | JSR 0x22b8a 00023970 50 4f |PO | ADDQ.L #0x8,A7 00023972 4e ba f0 0e |N | JSR 0x22982 00023976 58 4f |XO | ADDQ.L #0x4,A7 00023978 4e 5e |N^ | UNLK A6 0002397a 4e 75 |Nu | RTS 0002397c ; -------------------------------------------------------------------------------------- 0002397c ; OMSI PASCAL Function 0002397c ; <LVAR 0x008 4(r)> 0002397c ; <LVAR -0x014 @ 4(rw)> 0002397c ; -------------------------------------------------------------------------------------- 0002397c 4e 56 ff 90 |NV | LINK.W A6,#0xff90 00023980 bf d5 | | CMPA.L (A5),A7 00023982 62 06 |b | BHI 0x2398a 00023984 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023988 4e 76 |Nv | TRAPV 0002398a de fc 00 5c | \ | ADDA.W #0x5c,A7 0002398e 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00023992 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00023996 47 ee ff ec |G | LEA.L (A6-0x14),A3 0002399a 74 7d |t} | MOVEQ.L #0x7d,D2 0002399c 59 4f |YO | SUBQ.L #0x4,A7 0002399e 2f 12 |/ | MOVE.L (A2),-(A7) 000239a0 48 78 00 01 |Hx | PEA.L 0x1 000239a4 4e ba f1 e4 |N | JSR 0x22b8a 000239a8 50 4f |PO | ADDQ.L #0x8,A7 000239aa 26 97 |& | MOVE.L (A7),(A3) 000239ac 2f 12 |/ | MOVE.L (A2),-(A7) 000239ae 48 78 00 02 |Hx | PEA.L 0x2 000239b2 4e ba f1 d6 |N | JSR 0x22b8a 000239b6 50 4f |PO | ADDQ.L #0x8,A7 000239b8 28 5f |(_ | MOVEA.L (A7)+,A4 000239ba 9e fc 00 0c | | SUBA.W #0xc,A7 000239be 2f 12 |/ | MOVE.L (A2),-(A7) 000239c0 48 78 00 03 |Hx | PEA.L 0x3 000239c4 4e ba f1 f6 |N | JSR 0x22bbc 000239c8 50 4f |PO | ADDQ.L #0x8,A7 000239ca 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 000239d0 50 4f |PO | ADDQ.L #0x8,A7 000239d2 2c 17 |, | MOVE.L (A7),D6 000239d4 51 4f |QO | SUBQ.L #0x8,A7 000239d6 2f 12 |/ | MOVE.L (A2),-(A7) 000239d8 48 78 00 04 |Hx | PEA.L 0x4 000239dc 4e ba f1 de |N | JSR 0x22bbc 000239e0 50 4f |PO | ADDQ.L #0x8,A7 000239e2 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 000239e8 50 4f |PO | ADDQ.L #0x8,A7 000239ea 2a 1f |* | MOVE.L (A7)+,D5 000239ec 20 06 | | MOVE.L D6,D0 000239ee d0 85 | | ADD.L D5,D0 000239f0 53 80 |S | SUBQ.L #0x1,D0 000239f2 32 14 |2 | MOVE.W (A4),D1 000239f4 48 c1 |H | EXTW.L D1 000239f6 b0 81 | | CMP.L D1,D0 000239f8 6f 30 |o0 | BLE 0x23a2a 000239fa 9e fc 00 20 | | SUBA.W #0x20,A7 000239fe 20 4f | O | MOVEA.L A7,A0 00023a00 43 fa e0 84 |C | LEA.L 0x21a86,A1 00023a04 70 1e |p | MOVEQ.L #0x1e,D0 00023a06 10 d9 | | MOVE.B (A1)+,(A0)+ 00023a08 51 c8 ff fc |Q | DBF D0,0x23a06 00023a0c 59 4f |YO | SUBQ.L #0x4,A7 00023a0e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023a12 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023a16 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7) 00023a1a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023a20 50 4f |PO | ADDQ.L #0x8,A7 00023a22 4e ba e4 3e |N > | JSR 0x21e62 00023a26 de fc 00 24 | $ | ADDA.W #0x24,A7 00023a2a 20 53 | S | MOVEA.L (A3),A0 00023a2c 2f 08 |/ | MOVE.L A0,-(A7) 00023a2e 30 10 |0 | MOVE.W (A0),D0 00023a30 48 c0 |H | EXTW.L D0 00023a32 2f 00 |/ | MOVE.L D0,-(A7) 00023a34 7e 01 |~ | MOVEQ.L #0x01,D7 00023a36 be 97 | | CMP.L (A7),D7 00023a38 6e 26 |n& | BGT 0x23a60 00023a3a 20 06 | | MOVE.L D6,D0 00023a3c d0 87 | | ADD.L D7,D0 00023a3e 53 80 |S | SUBQ.L #0x1,D0 00023a40 53 80 |S | SUBQ.L #0x1,D0 00023a42 b0 82 | | CMP.L D2,D0 00023a44 63 02 |c | BLS 0x23a48 00023a46 4e 4f |NO | TRAP #15 00023a48 22 07 |" | MOVE.L D7,D1 00023a4a 53 81 |S | SUBQ.L #0x1,D1 00023a4c b2 82 | | CMP.L D2,D1 00023a4e 63 02 |c | BLS 0x23a52 00023a50 4e 4f |NO | TRAP #15 00023a52 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00023a56 19 b0 18 02 08 02 | | MOVE.B (A0+D1.L+#0x2),(A4+D0.L+#0x2) 00023a5c 52 87 |R | ADDQ.L #0x1,D7 00023a5e 68 d6 |h | BVC 0x23a36 00023a60 58 4f |XO | ADDQ.L #0x4,A7 00023a62 2e 8c |. | MOVE.L A4,(A7) 00023a64 4e ba f1 c6 |N | JSR 0x22c2c 00023a68 58 4f |XO | ADDQ.L #0x4,A7 00023a6a 48 53 |HS | PEA.L (A3) 00023a6c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023a72 58 4f |XO | ADDQ.L #0x4,A7 00023a74 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 00023a78 4e 5e |N^ | UNLK A6 00023a7a 4e 75 |Nu | RTS 00023a7c ; -------------------------------------------------------------------------------------- 00023a7c ; OMSI PASCAL Function 00023a7c ; <LVAR 0x008 4(r)> 00023a7c ; <LVAR -0x010 @ 4(r)> 00023a7c ; <LVAR -0x014 @ 4(rw)> 00023a7c ; -------------------------------------------------------------------------------------- 00023a7c 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 00023a80 bf d5 | | CMPA.L (A5),A7 00023a82 62 06 |b | BHI 0x23a8a 00023a84 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023a88 4e 76 |Nv | TRAPV 00023a8a de fc 00 44 | D | ADDA.W #0x44,A7 00023a8e 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00023a92 45 ee ff ec |E | LEA.L (A6-0x14),A2 00023a96 47 ee ff f0 |G | LEA.L (A6-0x10),A3 00023a9a 49 ee 00 08 |I | LEA.L (A6+0x8),A4 00023a9e 74 7d |t} | MOVEQ.L #0x7d,D2 00023aa0 59 4f |YO | SUBQ.L #0x4,A7 00023aa2 2f 14 |/ | MOVE.L (A4),-(A7) 00023aa4 48 78 00 01 |Hx | PEA.L 0x1 00023aa8 4e ba f0 e0 |N | JSR 0x22b8a 00023aac 50 4f |PO | ADDQ.L #0x8,A7 00023aae 24 9f |$ | MOVE.L (A7)+,(A2) 00023ab0 48 53 |HS | PEA.L (A3) 00023ab2 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00023ab8 51 4f |QO | SUBQ.L #0x8,A7 00023aba 2f 14 |/ | MOVE.L (A4),-(A7) 00023abc 48 78 00 02 |Hx | PEA.L 0x2 00023ac0 4e ba f0 fa |N | JSR 0x22bbc 00023ac4 50 4f |PO | ADDQ.L #0x8,A7 00023ac6 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00023acc 50 4f |PO | ADDQ.L #0x8,A7 00023ace 2a 17 |* | MOVE.L (A7),D5 00023ad0 51 4f |QO | SUBQ.L #0x8,A7 00023ad2 2f 14 |/ | MOVE.L (A4),-(A7) 00023ad4 48 78 00 03 |Hx | PEA.L 0x3 00023ad8 4e ba f0 e2 |N | JSR 0x22bbc 00023adc 50 4f |PO | ADDQ.L #0x8,A7 00023ade 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00023ae4 50 4f |PO | ADDQ.L #0x8,A7 00023ae6 2c 1f |, | MOVE.L (A7)+,D6 00023ae8 20 52 | R | MOVEA.L (A2),A0 00023aea 20 05 | | MOVE.L D5,D0 00023aec d0 86 | | ADD.L D6,D0 00023aee 53 80 |S | SUBQ.L #0x1,D0 00023af0 32 10 |2 | MOVE.W (A0),D1 00023af2 48 c1 |H | EXTW.L D1 00023af4 b0 81 | | CMP.L D1,D0 00023af6 6f 06 |o | BLE 0x23afe 00023af8 52 81 |R | ADDQ.L #0x1,D1 00023afa 92 85 | | SUB.L D5,D1 00023afc 2c 01 |, | MOVE.L D1,D6 00023afe 2f 06 |/ | MOVE.L D6,-(A7) 00023b00 7e 01 |~ | MOVEQ.L #0x01,D7 00023b02 be 97 | | CMP.L (A7),D7 00023b04 6e 26 |n& | BGT 0x23b2c 00023b06 20 53 | S | MOVEA.L (A3),A0 00023b08 20 07 | | MOVE.L D7,D0 00023b0a 53 80 |S | SUBQ.L #0x1,D0 00023b0c b0 82 | | CMP.L D2,D0 00023b0e 63 02 |c | BLS 0x23b12 00023b10 4e 4f |NO | TRAP #15 00023b12 22 52 |"R | MOVEA.L (A2),A1 00023b14 22 07 |" | MOVE.L D7,D1 00023b16 d2 85 | | ADD.L D5,D1 00023b18 53 81 |S | SUBQ.L #0x1,D1 00023b1a 53 81 |S | SUBQ.L #0x1,D1 00023b1c b2 82 | | CMP.L D2,D1 00023b1e 63 02 |c | BLS 0x23b22 00023b20 4e 4f |NO | TRAP #15 00023b22 11 b1 18 02 08 02 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x2) 00023b28 52 87 |R | ADDQ.L #0x1,D7 00023b2a 68 d6 |h | BVC 0x23b02 00023b2c 58 4f |XO | ADDQ.L #0x4,A7 00023b2e 20 53 | S | MOVEA.L (A3),A0 00023b30 04 86 ff ff 80 00 | | SUBI.L #0xffff8000,D6 00023b36 0c 86 00 00 ff ff | | CMPI.L #0x0000ffff,D6 00023b3c 63 02 |c | BLS 0x23b40 00023b3e 4e 4f |NO | TRAP #15 00023b40 06 86 ff ff 80 00 | | ADDI.L #0xffff8000,D6 00023b46 30 86 |0 | MOVE.W D6,(A0) 00023b48 2f 13 |/ | MOVE.L (A3),-(A7) 00023b4a 4e ba f0 e0 |N | JSR 0x22c2c 00023b4e 58 4f |XO | ADDQ.L #0x4,A7 00023b50 48 52 |HR | PEA.L (A2) 00023b52 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023b58 58 4f |XO | ADDQ.L #0x4,A7 00023b5a 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 00023b5e 4e 5e |N^ | UNLK A6 00023b60 4e 75 |Nu | RTS 00023b62 ; -------------------------------------------------------------------------------------- 00023b62 ; OMSI PASCAL Function 00023b62 ; <LVAR 0x008 4(r)> 00023b62 ; -------------------------------------------------------------------------------------- 00023b62 4e 56 ff ec |NV | LINK.W A6,#0xffec 00023b66 bf d5 | | CMPA.L (A5),A7 00023b68 62 06 |b | BHI 0x23b70 00023b6a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023b6e 4e 76 |Nv | TRAPV 00023b70 de fc 00 14 | | ADDA.W #0x14,A7 00023b74 51 4f |QO | SUBQ.L #0x8,A7 00023b76 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023b7a 48 78 00 01 |Hx | PEA.L 0x1 00023b7e 4e ba f0 3c |N < | JSR 0x22bbc 00023b82 50 4f |PO | ADDQ.L #0x8,A7 00023b84 4e ba ee 70 |N p | JSR 0x229f6 00023b88 50 4f |PO | ADDQ.L #0x8,A7 00023b8a 4e 5e |N^ | UNLK A6 00023b8c 4e 75 |Nu | RTS 00023b8e ; -------------------------------------------------------------------------------------- 00023b8e ; OMSI PASCAL Function 00023b8e ; <LVAR 0x008 4(r)> 00023b8e ; -------------------------------------------------------------------------------------- 00023b8e 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00023b92 bf d5 | | CMPA.L (A5),A7 00023b94 62 06 |b | BHI 0x23b9c 00023b96 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023b9a 4e 76 |Nv | TRAPV 00023b9c de fc 00 1e | | ADDA.W #0x1e,A7 00023ba0 9e fc 00 0a | | SUBA.W #0xa,A7 00023ba4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023ba8 48 78 00 01 |Hx | PEA.L 0x1 00023bac 4e ba f0 0e |N | JSR 0x22bbc 00023bb0 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023bb4 48 78 00 02 |Hx | PEA.L 0x2 00023bb8 4e ba f0 02 |N | JSR 0x22bbc 00023bbc 50 4f |PO | ADDQ.L #0x8,A7 00023bbe 4e b9 00 01 03 2c |N , | JSR IsEqual(a, b : Quad) : Bool 00023bc4 de fc 00 10 | | ADDA.W #0x10,A7 00023bc8 4a 1f |J | TST.B (A7)+ 00023bca 67 06 |g | BEQ 0x23bd2 00023bcc 4e ba ea 7c |N | | JSR 0x2264a 00023bd0 60 04 |` | BRA 0x23bd6 00023bd2 4e ba ea bc |N | JSR 0x22690 00023bd6 4e 5e |N^ | UNLK A6 00023bd8 4e 75 |Nu | RTS 00023bda ; -------------------------------------------------------------------------------------- 00023bda ; OMSI PASCAL Function 00023bda ; <LVAR 0x008 4(r)> 00023bda ; -------------------------------------------------------------------------------------- 00023bda 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00023bde bf d5 | | CMPA.L (A5),A7 00023be0 62 06 |b | BHI 0x23be8 00023be2 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023be6 4e 76 |Nv | TRAPV 00023be8 de fc 00 1e | | ADDA.W #0x1e,A7 00023bec 9e fc 00 0a | | SUBA.W #0xa,A7 00023bf0 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023bf4 48 78 00 01 |Hx | PEA.L 0x1 00023bf8 4e ba ef c2 |N | JSR 0x22bbc 00023bfc 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023c00 48 78 00 02 |Hx | PEA.L 0x2 00023c04 4e ba ef b6 |N | JSR 0x22bbc 00023c08 50 4f |PO | ADDQ.L #0x8,A7 00023c0a 4e b9 00 01 03 2c |N , | JSR IsEqual(a, b : Quad) : Bool 00023c10 de fc 00 10 | | ADDA.W #0x10,A7 00023c14 4a 1f |J | TST.B (A7)+ 00023c16 66 06 |f | BNE 0x23c1e 00023c18 4e ba ea 30 |N 0 | JSR 0x2264a 00023c1c 60 04 |` | BRA 0x23c22 00023c1e 4e ba ea 70 |N p | JSR 0x22690 00023c22 4e 5e |N^ | UNLK A6 00023c24 4e 75 |Nu | RTS 00023c26 ; -------------------------------------------------------------------------------------- 00023c26 ; OMSI PASCAL Function 00023c26 ; <LVAR 0x008 4(r)> 00023c26 ; -------------------------------------------------------------------------------------- 00023c26 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00023c2a bf d5 | | CMPA.L (A5),A7 00023c2c 62 06 |b | BHI 0x23c34 00023c2e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023c32 4e 76 |Nv | TRAPV 00023c34 de fc 00 1e | | ADDA.W #0x1e,A7 00023c38 9e fc 00 0a | | SUBA.W #0xa,A7 00023c3c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023c40 48 78 00 01 |Hx | PEA.L 0x1 00023c44 4e ba ef 76 |N v | JSR 0x22bbc 00023c48 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023c4c 48 78 00 02 |Hx | PEA.L 0x2 00023c50 4e ba ef 6a |N j | JSR 0x22bbc 00023c54 50 4f |PO | ADDQ.L #0x8,A7 00023c56 4e b9 00 01 03 28 |N ( | JSR IsSmaller(a, b : Quad) : Bool 00023c5c de fc 00 10 | | ADDA.W #0x10,A7 00023c60 4a 1f |J | TST.B (A7)+ 00023c62 67 06 |g | BEQ 0x23c6a 00023c64 4e ba e9 e4 |N | JSR 0x2264a 00023c68 60 04 |` | BRA 0x23c6e 00023c6a 4e ba ea 24 |N $ | JSR 0x22690 00023c6e 4e 5e |N^ | UNLK A6 00023c70 4e 75 |Nu | RTS 00023c72 ; -------------------------------------------------------------------------------------- 00023c72 ; OMSI PASCAL Function 00023c72 ; <LVAR 0x008 4(r)> 00023c72 ; -------------------------------------------------------------------------------------- 00023c72 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00023c76 bf d5 | | CMPA.L (A5),A7 00023c78 62 06 |b | BHI 0x23c80 00023c7a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023c7e 4e 76 |Nv | TRAPV 00023c80 de fc 00 1e | | ADDA.W #0x1e,A7 00023c84 9e fc 00 0a | | SUBA.W #0xa,A7 00023c88 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023c8c 48 78 00 01 |Hx | PEA.L 0x1 00023c90 4e ba ef 2a |N * | JSR 0x22bbc 00023c94 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023c98 48 78 00 02 |Hx | PEA.L 0x2 00023c9c 4e ba ef 1e |N | JSR 0x22bbc 00023ca0 50 4f |PO | ADDQ.L #0x8,A7 00023ca2 4e b9 00 01 03 24 |N $ | JSR IsGreater(a, b : Quad) : Bool 00023ca8 de fc 00 10 | | ADDA.W #0x10,A7 00023cac 4a 1f |J | TST.B (A7)+ 00023cae 67 06 |g | BEQ 0x23cb6 00023cb0 4e ba e9 98 |N | JSR 0x2264a 00023cb4 60 04 |` | BRA 0x23cba 00023cb6 4e ba e9 d8 |N | JSR 0x22690 00023cba 4e 5e |N^ | UNLK A6 00023cbc 4e 75 |Nu | RTS 00023cbe ; -------------------------------------------------------------------------------------- 00023cbe ; OMSI PASCAL Function 00023cbe ; <LVAR 0x008 4(r)> 00023cbe ; -------------------------------------------------------------------------------------- 00023cbe 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00023cc2 bf d5 | | CMPA.L (A5),A7 00023cc4 62 06 |b | BHI 0x23ccc 00023cc6 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023cca 4e 76 |Nv | TRAPV 00023ccc de fc 00 1e | | ADDA.W #0x1e,A7 00023cd0 9e fc 00 0a | | SUBA.W #0xa,A7 00023cd4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023cd8 48 78 00 01 |Hx | PEA.L 0x1 00023cdc 4e ba ee de |N | JSR 0x22bbc 00023ce0 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023ce4 48 78 00 02 |Hx | PEA.L 0x2 00023ce8 4e ba ee d2 |N | JSR 0x22bbc 00023cec 50 4f |PO | ADDQ.L #0x8,A7 00023cee 4e b9 00 01 03 24 |N $ | JSR IsGreater(a, b : Quad) : Bool 00023cf4 de fc 00 10 | | ADDA.W #0x10,A7 00023cf8 4a 1f |J | TST.B (A7)+ 00023cfa 66 06 |f | BNE 0x23d02 00023cfc 4e ba e9 4c |N L | JSR 0x2264a 00023d00 60 04 |` | BRA 0x23d06 00023d02 4e ba e9 8c |N | JSR 0x22690 00023d06 4e 5e |N^ | UNLK A6 00023d08 4e 75 |Nu | RTS 00023d0a ; -------------------------------------------------------------------------------------- 00023d0a ; OMSI PASCAL Function 00023d0a ; <LVAR 0x008 4(r)> 00023d0a ; -------------------------------------------------------------------------------------- 00023d0a 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00023d0e bf d5 | | CMPA.L (A5),A7 00023d10 62 06 |b | BHI 0x23d18 00023d12 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023d16 4e 76 |Nv | TRAPV 00023d18 de fc 00 1e | | ADDA.W #0x1e,A7 00023d1c 9e fc 00 0a | | SUBA.W #0xa,A7 00023d20 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023d24 48 78 00 01 |Hx | PEA.L 0x1 00023d28 4e ba ee 92 |N | JSR 0x22bbc 00023d2c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023d30 48 78 00 02 |Hx | PEA.L 0x2 00023d34 4e ba ee 86 |N | JSR 0x22bbc 00023d38 50 4f |PO | ADDQ.L #0x8,A7 00023d3a 4e b9 00 01 03 28 |N ( | JSR IsSmaller(a, b : Quad) : Bool 00023d40 de fc 00 10 | | ADDA.W #0x10,A7 00023d44 4a 1f |J | TST.B (A7)+ 00023d46 66 06 |f | BNE 0x23d4e 00023d48 4e ba e9 00 |N | JSR 0x2264a 00023d4c 60 04 |` | BRA 0x23d52 00023d4e 4e ba e9 40 |N @ | JSR 0x22690 00023d52 4e 5e |N^ | UNLK A6 00023d54 4e 75 |Nu | RTS 00023d56 ; -------------------------------------------------------------------------------------- 00023d56 ; OMSI PASCAL Function 00023d56 ; <LVAR 0x008 4(r)> 00023d56 ; -------------------------------------------------------------------------------------- 00023d56 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023d5a bf d5 | | CMPA.L (A5),A7 00023d5c 62 06 |b | BHI 0x23d64 00023d5e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023d62 4e 76 |Nv | TRAPV 00023d64 de fc 00 28 | ( | ADDA.W #0x28,A7 00023d68 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023d6c 70 10 |p | MOVEQ.L #0x10,D0 00023d6e 9e c0 | | SUBA.W D0,A7 00023d70 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023d74 48 78 00 01 |Hx | PEA.L 0x1 00023d78 4e ba ee 42 |N B | JSR 0x22bbc 00023d7c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023d80 48 78 00 02 |Hx | PEA.L 0x2 00023d84 4e ba ee 36 |N 6 | JSR 0x22bbc 00023d88 50 4f |PO | ADDQ.L #0x8,A7 00023d8a 4e b9 00 01 03 14 |N | JSR Add(a, b : Quad) : Quad 00023d90 de c0 | | ADDA.W D0,A7 00023d92 4e ba ef 20 |N | JSR 0x22cb4 00023d96 50 4f |PO | ADDQ.L #0x8,A7 00023d98 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023d9c 4e 5e |N^ | UNLK A6 00023d9e 4e 75 |Nu | RTS 00023da0 ; -------------------------------------------------------------------------------------- 00023da0 ; OMSI PASCAL Function 00023da0 ; <LVAR 0x008 4(r)> 00023da0 ; -------------------------------------------------------------------------------------- 00023da0 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023da4 bf d5 | | CMPA.L (A5),A7 00023da6 62 06 |b | BHI 0x23dae 00023da8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023dac 4e 76 |Nv | TRAPV 00023dae de fc 00 28 | ( | ADDA.W #0x28,A7 00023db2 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023db6 70 10 |p | MOVEQ.L #0x10,D0 00023db8 9e c0 | | SUBA.W D0,A7 00023dba 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023dbe 48 78 00 01 |Hx | PEA.L 0x1 00023dc2 4e ba ed f8 |N | JSR 0x22bbc 00023dc6 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023dca 48 78 00 02 |Hx | PEA.L 0x2 00023dce 4e ba ed ec |N | JSR 0x22bbc 00023dd2 50 4f |PO | ADDQ.L #0x8,A7 00023dd4 4e b9 00 01 03 18 |N | JSR Subtract(a, b : Quad) : Quad 00023dda de c0 | | ADDA.W D0,A7 00023ddc 4e ba ee d6 |N | JSR 0x22cb4 00023de0 50 4f |PO | ADDQ.L #0x8,A7 00023de2 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023de6 4e 5e |N^ | UNLK A6 00023de8 4e 75 |Nu | RTS 00023dea ; -------------------------------------------------------------------------------------- 00023dea ; OMSI PASCAL Function 00023dea ; <LVAR 0x008 4(r)> 00023dea ; -------------------------------------------------------------------------------------- 00023dea 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023dee bf d5 | | CMPA.L (A5),A7 00023df0 62 06 |b | BHI 0x23df8 00023df2 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023df6 4e 76 |Nv | TRAPV 00023df8 de fc 00 28 | ( | ADDA.W #0x28,A7 00023dfc 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023e00 70 10 |p | MOVEQ.L #0x10,D0 00023e02 9e c0 | | SUBA.W D0,A7 00023e04 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023e08 48 78 00 01 |Hx | PEA.L 0x1 00023e0c 4e ba ed ae |N | JSR 0x22bbc 00023e10 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023e14 48 78 00 02 |Hx | PEA.L 0x2 00023e18 4e ba ed a2 |N | JSR 0x22bbc 00023e1c 50 4f |PO | ADDQ.L #0x8,A7 00023e1e 4e b9 00 01 03 1c |N | JSR Multiply(a, b : Quad) : Quad 00023e24 de c0 | | ADDA.W D0,A7 00023e26 4e ba ee 8c |N | JSR 0x22cb4 00023e2a 50 4f |PO | ADDQ.L #0x8,A7 00023e2c 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023e30 4e 5e |N^ | UNLK A6 00023e32 4e 75 |Nu | RTS 00023e34 ; -------------------------------------------------------------------------------------- 00023e34 ; OMSI PASCAL Function 00023e34 ; <LVAR 0x008 4(r)> 00023e34 ; -------------------------------------------------------------------------------------- 00023e34 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023e38 bf d5 | | CMPA.L (A5),A7 00023e3a 62 06 |b | BHI 0x23e42 00023e3c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023e40 4e 76 |Nv | TRAPV 00023e42 de fc 00 28 | ( | ADDA.W #0x28,A7 00023e46 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023e4a 70 10 |p | MOVEQ.L #0x10,D0 00023e4c 9e c0 | | SUBA.W D0,A7 00023e4e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023e52 48 78 00 01 |Hx | PEA.L 0x1 00023e56 4e ba ed 64 |N d | JSR 0x22bbc 00023e5a 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023e5e 48 78 00 02 |Hx | PEA.L 0x2 00023e62 4e ba ed 58 |N X | JSR 0x22bbc 00023e66 50 4f |PO | ADDQ.L #0x8,A7 00023e68 4e b9 00 01 03 20 |N | JSR Divide(a, b : Quad) : Quad 00023e6e de c0 | | ADDA.W D0,A7 00023e70 4e ba ee 42 |N B | JSR 0x22cb4 00023e74 50 4f |PO | ADDQ.L #0x8,A7 00023e76 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023e7a 4e 5e |N^ | UNLK A6 00023e7c 4e 75 |Nu | RTS 00023e7e ; -------------------------------------------------------------------------------------- 00023e7e ; OMSI PASCAL Function 00023e7e ; <LVAR 0x008 4(r)> 00023e7e ; -------------------------------------------------------------------------------------- 00023e7e 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023e82 bf d5 | | CMPA.L (A5),A7 00023e84 62 06 |b | BHI 0x23e8c 00023e86 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023e8a 4e 76 |Nv | TRAPV 00023e8c de fc 00 28 | ( | ADDA.W #0x28,A7 00023e90 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023e94 70 10 |p | MOVEQ.L #0x10,D0 00023e96 9e c0 | | SUBA.W D0,A7 00023e98 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023e9c 48 78 00 01 |Hx | PEA.L 0x1 00023ea0 4e ba ed 1a |N | JSR 0x22bbc 00023ea4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023ea8 48 78 00 02 |Hx | PEA.L 0x2 00023eac 4e ba ed 0e |N | JSR 0x22bbc 00023eb0 50 4f |PO | ADDQ.L #0x8,A7 00023eb2 4e b9 00 01 03 58 |N X | JSR Modulus(a, b : Quad) : Quad 00023eb8 de c0 | | ADDA.W D0,A7 00023eba 4e ba ed f8 |N | JSR 0x22cb4 00023ebe 50 4f |PO | ADDQ.L #0x8,A7 00023ec0 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023ec4 4e 5e |N^ | UNLK A6 00023ec6 4e 75 |Nu | RTS 00023ec8 ; -------------------------------------------------------------------------------------- 00023ec8 ; OMSI PASCAL Function 00023ec8 ; <LVAR 0x008 4(r)> 00023ec8 ; -------------------------------------------------------------------------------------- 00023ec8 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023ecc bf d5 | | CMPA.L (A5),A7 00023ece 62 06 |b | BHI 0x23ed6 00023ed0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023ed4 4e 76 |Nv | TRAPV 00023ed6 de fc 00 28 | ( | ADDA.W #0x28,A7 00023eda 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023ede 70 10 |p | MOVEQ.L #0x10,D0 00023ee0 9e c0 | | SUBA.W D0,A7 00023ee2 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023ee6 48 78 00 01 |Hx | PEA.L 0x1 00023eea 4e ba ec d0 |N | JSR 0x22bbc 00023eee 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023ef2 48 78 00 02 |Hx | PEA.L 0x2 00023ef6 4e ba ec c4 |N | JSR 0x22bbc 00023efa 50 4f |PO | ADDQ.L #0x8,A7 00023efc 4e b9 00 01 03 34 |N 4 | JSR BitOr(a, b : Quad) : Quad 00023f02 de c0 | | ADDA.W D0,A7 00023f04 4e ba ed ae |N | JSR 0x22cb4 00023f08 50 4f |PO | ADDQ.L #0x8,A7 00023f0a 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023f0e 4e 5e |N^ | UNLK A6 00023f10 4e 75 |Nu | RTS 00023f12 ; -------------------------------------------------------------------------------------- 00023f12 ; OMSI PASCAL Function 00023f12 ; <LVAR 0x008 4(r)> 00023f12 ; -------------------------------------------------------------------------------------- 00023f12 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023f16 bf d5 | | CMPA.L (A5),A7 00023f18 62 06 |b | BHI 0x23f20 00023f1a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023f1e 4e 76 |Nv | TRAPV 00023f20 de fc 00 28 | ( | ADDA.W #0x28,A7 00023f24 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023f28 70 10 |p | MOVEQ.L #0x10,D0 00023f2a 9e c0 | | SUBA.W D0,A7 00023f2c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023f30 48 78 00 01 |Hx | PEA.L 0x1 00023f34 4e ba ec 86 |N | JSR 0x22bbc 00023f38 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023f3c 48 78 00 02 |Hx | PEA.L 0x2 00023f40 4e ba ec 7a |N z | JSR 0x22bbc 00023f44 50 4f |PO | ADDQ.L #0x8,A7 00023f46 4e b9 00 01 03 30 |N 0 | JSR BitAnd(a, b : Quad) : Quad 00023f4c de c0 | | ADDA.W D0,A7 00023f4e 4e ba ed 64 |N d | JSR 0x22cb4 00023f52 50 4f |PO | ADDQ.L #0x8,A7 00023f54 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023f58 4e 5e |N^ | UNLK A6 00023f5a 4e 75 |Nu | RTS 00023f5c ; -------------------------------------------------------------------------------------- 00023f5c ; OMSI PASCAL Function 00023f5c ; <LVAR 0x008 4(r)> 00023f5c ; -------------------------------------------------------------------------------------- 00023f5c 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023f60 bf d5 | | CMPA.L (A5),A7 00023f62 62 06 |b | BHI 0x23f6a 00023f64 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023f68 4e 76 |Nv | TRAPV 00023f6a de fc 00 28 | ( | ADDA.W #0x28,A7 00023f6e 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023f72 70 10 |p | MOVEQ.L #0x10,D0 00023f74 9e c0 | | SUBA.W D0,A7 00023f76 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023f7a 48 78 00 01 |Hx | PEA.L 0x1 00023f7e 4e ba ec 3c |N < | JSR 0x22bbc 00023f82 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023f86 48 78 00 02 |Hx | PEA.L 0x2 00023f8a 4e ba ec 30 |N 0 | JSR 0x22bbc 00023f8e 50 4f |PO | ADDQ.L #0x8,A7 00023f90 4e b9 00 01 03 40 |N @ | JSR BitXor(a, b : Quad) : Quad 00023f96 de c0 | | ADDA.W D0,A7 00023f98 4e ba ed 1a |N | JSR 0x22cb4 00023f9c 50 4f |PO | ADDQ.L #0x8,A7 00023f9e 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023fa2 4e 5e |N^ | UNLK A6 00023fa4 4e 75 |Nu | RTS 00023fa6 ; -------------------------------------------------------------------------------------- 00023fa6 ; OMSI PASCAL Function 00023fa6 ; <LVAR 0x008 4(r)> 00023fa6 ; -------------------------------------------------------------------------------------- 00023fa6 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00023faa bf d5 | | CMPA.L (A5),A7 00023fac 62 06 |b | BHI 0x23fb4 00023fae 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023fb2 4e 76 |Nv | TRAPV 00023fb4 de fc 00 20 | | ADDA.W #0x20,A7 00023fb8 9e fc 00 10 | | SUBA.W #0x10,A7 00023fbc 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023fc0 48 78 00 01 |Hx | PEA.L 0x1 00023fc4 4e ba eb f6 |N | JSR 0x22bbc 00023fc8 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00023fcc 48 78 00 02 |Hx | PEA.L 0x2 00023fd0 4e ba ec 26 |N & | JSR 0x22bf8 00023fd4 50 4f |PO | ADDQ.L #0x8,A7 00023fd6 4e b9 00 01 03 44 |N D | JSR BitShift(a : Quad ; howmuch : integer) : Quad 00023fdc de fc 00 0c | | ADDA.W #0xc,A7 00023fe0 4e ba ec d2 |N | JSR 0x22cb4 00023fe4 50 4f |PO | ADDQ.L #0x8,A7 00023fe6 4e 5e |N^ | UNLK A6 00023fe8 4e 75 |Nu | RTS 00023fea ; -------------------------------------------------------------------------------------- 00023fea ; OMSI PASCAL Function 00023fea ; <LVAR 0x008 4(r)> 00023fea ; -------------------------------------------------------------------------------------- 00023fea 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00023fee bf d5 | | CMPA.L (A5),A7 00023ff0 62 06 |b | BHI 0x23ff8 00023ff2 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023ff6 4e 76 |Nv | TRAPV 00023ff8 de fc 00 20 | | ADDA.W #0x20,A7 00023ffc 9e fc 00 10 | | SUBA.W #0x10,A7 00024000 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024004 48 78 00 01 |Hx | PEA.L 0x1 00024008 4e ba eb b2 |N | JSR 0x22bbc 0002400c 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00024010 48 78 00 02 |Hx | PEA.L 0x2 00024014 4e ba eb e2 |N | JSR 0x22bf8 00024018 50 4f |PO | ADDQ.L #0x8,A7 0002401a 44 97 |D | NEG.L (A7) 0002401c 4e b9 00 01 03 44 |N D | JSR BitShift(a : Quad ; howmuch : integer) : Quad 00024022 de fc 00 0c | | ADDA.W #0xc,A7 00024026 4e ba ec 8c |N | JSR 0x22cb4 0002402a 50 4f |PO | ADDQ.L #0x8,A7 0002402c 4e 5e |N^ | UNLK A6 0002402e 4e 75 |Nu | RTS 00024030 ; -------------------------------------------------------------------------------------- 00024030 ; OMSI PASCAL Function 00024030 ; <LVAR 0x008 4(r)> 00024030 ; -------------------------------------------------------------------------------------- 00024030 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 00024034 bf d5 | | CMPA.L (A5),A7 00024036 62 06 |b | BHI 0x2403e 00024038 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002403c 4e 76 |Nv | TRAPV 0002403e de fc 00 1c | | ADDA.W #0x1c,A7 00024042 9e fc 00 10 | | SUBA.W #0x10,A7 00024046 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002404a 48 78 00 01 |Hx | PEA.L 0x1 0002404e 4e ba eb 6c |N l | JSR 0x22bbc 00024052 50 4f |PO | ADDQ.L #0x8,A7 00024054 4e b9 00 01 03 38 |N 8 | JSR BitNot(a : Quad) : Quad 0002405a 50 4f |PO | ADDQ.L #0x8,A7 0002405c 4e ba ec 56 |N V | JSR 0x22cb4 00024060 50 4f |PO | ADDQ.L #0x8,A7 00024062 4e 5e |N^ | UNLK A6 00024064 4e 75 |Nu | RTS 00024066 ; -------------------------------------------------------------------------------------- 00024066 ; OMSI PASCAL Function 00024066 ; <LVAR 0x008 4(r)> 00024066 ; <LVAR -0x00c 4(rw)> 00024066 ; <LVAR -0x010 4(rw)> 00024066 ; <LVAR -0x014 4(rw)> 00024066 ; <LVAR -0x018 4(rw)> 00024066 ; -------------------------------------------------------------------------------------- 00024066 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 0002406a bf d5 | | CMPA.L (A5),A7 0002406c 62 06 |b | BHI 0x24074 0002406e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024072 4e 76 |Nv | TRAPV 00024074 de fc 00 30 | 0 | ADDA.W #0x30,A7 00024078 48 e7 03 80 |H | MOVEM.L A0+D7+D6,-(A7) 0002407c 41 ee 00 08 |A | LEA.L (A6+0x8),A0 00024080 51 4f |QO | SUBQ.L #0x8,A7 00024082 2f 10 |/ | MOVE.L (A0),-(A7) 00024084 48 78 00 01 |Hx | PEA.L 0x1 00024088 4e ba eb 32 |N 2 | JSR 0x22bbc 0002408c 50 4f |PO | ADDQ.L #0x8,A7 0002408e 2d 5f ff e8 |-_ | MOVE.L (A7)+,(A6-0x18) 00024092 2d 57 ff ec |-W | MOVE.L (A7),(A6-0x14) 00024096 59 4f |YO | SUBQ.L #0x4,A7 00024098 2f 10 |/ | MOVE.L (A0),-(A7) 0002409a 48 78 00 02 |Hx | PEA.L 0x2 0002409e 4e ba eb 1c |N | JSR 0x22bbc 000240a2 50 4f |PO | ADDQ.L #0x8,A7 000240a4 2d 5f ff f0 |-_ | MOVE.L (A7)+,(A6-0x10) 000240a8 2d 57 ff f4 |-W | MOVE.L (A7),(A6-0xc) 000240ac 2f 10 |/ | MOVE.L (A0),-(A7) 000240ae 48 78 00 03 |Hx | PEA.L 0x3 000240b2 4e ba eb 44 |N D | JSR 0x22bf8 000240b6 50 4f |PO | ADDQ.L #0x8,A7 000240b8 2e 17 |. | MOVE.L (A7),D7 000240ba 2f 10 |/ | MOVE.L (A0),-(A7) 000240bc 48 78 00 04 |Hx | PEA.L 0x4 000240c0 4e ba eb 36 |N 6 | JSR 0x22bf8 000240c4 50 4f |PO | ADDQ.L #0x8,A7 000240c6 2c 17 |, | MOVE.L (A7),D6 000240c8 59 4f |YO | SUBQ.L #0x4,A7 000240ca 2f 2e ff ec |/. | MOVE.L (A6-0x14),-(A7) 000240ce 2f 2e ff e8 |/. | MOVE.L (A6-0x18),-(A7) 000240d2 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 000240d6 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 000240da 2f 07 |/ | MOVE.L D7,-(A7) 000240dc 2f 06 |/ | MOVE.L D6,-(A7) 000240de 4e b9 00 01 03 48 |N H | JSR ?BitField_something_() 000240e4 de fc 00 18 | | ADDA.W #0x18,A7 000240e8 4e ba eb ca |N | JSR 0x22cb4 000240ec 50 4f |PO | ADDQ.L #0x8,A7 000240ee 4c df 01 c0 |L | MOVEM.L (A7)+,D6+D7+A0 000240f2 4e 5e |N^ | UNLK A6 000240f4 4e 75 |Nu | RTS 000240f6 ; -------------------------------------------------------------------------------------- 000240f6 ; OMSI PASCAL Function 000240f6 ; <LVAR 0x008 4(r)> 000240f6 ; <LVAR -0x00c 4(rw)> 000240f6 ; <LVAR -0x010 4(rw)> 000240f6 ; -------------------------------------------------------------------------------------- 000240f6 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 000240fa bf d5 | | CMPA.L (A5),A7 000240fc 62 06 |b | BHI 0x24104 000240fe 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024102 4e 76 |Nv | TRAPV 00024104 de fc 00 28 | ( | ADDA.W #0x28,A7 00024108 48 e7 03 80 |H | MOVEM.L A0+D7+D6,-(A7) 0002410c 41 ee 00 08 |A | LEA.L (A6+0x8),A0 00024110 51 4f |QO | SUBQ.L #0x8,A7 00024112 2f 10 |/ | MOVE.L (A0),-(A7) 00024114 48 78 00 01 |Hx | PEA.L 0x1 00024118 4e ba ea a2 |N | JSR 0x22bbc 0002411c 50 4f |PO | ADDQ.L #0x8,A7 0002411e 2d 5f ff f0 |-_ | MOVE.L (A7)+,(A6-0x10) 00024122 2d 57 ff f4 |-W | MOVE.L (A7),(A6-0xc) 00024126 2f 10 |/ | MOVE.L (A0),-(A7) 00024128 48 78 00 02 |Hx | PEA.L 0x2 0002412c 4e ba ea ca |N | JSR 0x22bf8 00024130 50 4f |PO | ADDQ.L #0x8,A7 00024132 2e 17 |. | MOVE.L (A7),D7 00024134 2f 10 |/ | MOVE.L (A0),-(A7) 00024136 48 78 00 03 |Hx | PEA.L 0x3 0002413a 4e ba ea bc |N | JSR 0x22bf8 0002413e 50 4f |PO | ADDQ.L #0x8,A7 00024140 2c 17 |, | MOVE.L (A7),D6 00024142 59 4f |YO | SUBQ.L #0x4,A7 00024144 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00024148 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 0002414c 2f 07 |/ | MOVE.L D7,-(A7) 0002414e 2f 06 |/ | MOVE.L D6,-(A7) 00024150 4e b9 00 01 03 4c |N L | JSR FSCALL_1034c 00024156 de fc 00 10 | | ADDA.W #0x10,A7 0002415a 4e ba eb 58 |N X | JSR 0x22cb4 0002415e 50 4f |PO | ADDQ.L #0x8,A7 00024160 4c df 01 c0 |L | MOVEM.L (A7)+,D6+D7+A0 00024164 4e 5e |N^ | UNLK A6 00024166 4e 75 |Nu | RTS 00024168 ; -------------------------------------------------------------------------------------- 00024168 ; OMSI PASCAL Function 00024168 ; <LVAR 0x008 4(r)> 00024168 ; -------------------------------------------------------------------------------------- 00024168 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 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 20 | | ADDA.W #0x20,A7 0002417a 48 e7 01 08 |H | MOVEM.L A4+D7,-(A7) 0002417e 59 4f |YO | SUBQ.L #0x4,A7 00024180 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024184 4e ba e0 e8 |N | JSR 0x2226e 00024188 58 4f |XO | ADDQ.L #0x4,A7 0002418a 7e 01 |~ | MOVEQ.L #0x01,D7 0002418c be 97 | | CMP.L (A7),D7 0002418e 6e 26 |n& | BGT 0x241b6 00024190 59 4f |YO | SUBQ.L #0x4,A7 00024192 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024196 2f 07 |/ | MOVE.L D7,-(A7) 00024198 4e ba e9 f0 |N | JSR 0x22b8a 0002419c 50 4f |PO | ADDQ.L #0x8,A7 0002419e 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000241a4 54 4f |TO | ADDQ.L #0x2,A7 000241a6 1e bc 00 20 | | MOVE.B #0x20,(A7) 000241aa 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char) 000241b0 54 4f |TO | ADDQ.L #0x2,A7 000241b2 52 87 |R | ADDQ.L #0x1,D7 000241b4 68 d6 |h | BVC 0x2418c 000241b6 48 78 00 01 |Hx | PEA.L 0x1 000241ba 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 000241c0 58 4f |XO | ADDQ.L #0x4,A7 000241c2 28 5f |(_ | MOVEA.L (A7)+,A4 000241c4 2f 0c |/ | MOVE.L A4,-(A7) 000241c6 4e ba de f2 |N | JSR 0x220ba 000241ca 2e 8c |. | MOVE.L A4,(A7) 000241cc 4e ba ea 5e |N ^ | JSR 0x22c2c 000241d0 58 4f |XO | ADDQ.L #0x4,A7 000241d2 4c df 10 80 |L | MOVEM.L (A7)+,D7+A4 000241d6 4e 5e |N^ | UNLK A6 000241d8 4e 75 |Nu | RTS 000241da ; -------------------------------------------------------------------------------------- 000241da ; OMSI PASCAL Function 000241da ; <LVAR 0x008 4(r)> 000241da ; -------------------------------------------------------------------------------------- 000241da 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 000241de bf d5 | | CMPA.L (A5),A7 000241e0 62 06 |b | BHI 0x241e8 000241e2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000241e6 4e 76 |Nv | TRAPV 000241e8 de fc 00 2c | , | ADDA.W #0x2c,A7 000241ec 48 e7 83 88 |H | MOVEM.L A4+A0+D7+D6+D0,-(A7) 000241f0 41 ee 00 08 |A | LEA.L (A6+0x8),A0 000241f4 70 0c |p | MOVEQ.L #0x0c,D0 000241f6 59 4f |YO | SUBQ.L #0x4,A7 000241f8 2f 10 |/ | MOVE.L (A0),-(A7) 000241fa 48 78 00 01 |Hx | PEA.L 0x1 000241fe 4e ba e9 8a |N | JSR 0x22b8a 00024202 50 4f |PO | ADDQ.L #0x8,A7 00024204 28 5f |(_ | MOVEA.L (A7)+,A4 00024206 9e c0 | | SUBA.W D0,A7 00024208 2f 10 |/ | MOVE.L (A0),-(A7) 0002420a 48 78 00 02 |Hx | PEA.L 0x2 0002420e 4e ba e9 ac |N | JSR 0x22bbc 00024212 50 4f |PO | ADDQ.L #0x8,A7 00024214 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 0002421a 50 4f |PO | ADDQ.L #0x8,A7 0002421c 2e 17 |. | MOVE.L (A7),D7 0002421e 51 4f |QO | SUBQ.L #0x8,A7 00024220 2f 10 |/ | MOVE.L (A0),-(A7) 00024222 48 78 00 03 |Hx | PEA.L 0x3 00024226 4e ba e9 94 |N | JSR 0x22bbc 0002422a 50 4f |PO | ADDQ.L #0x8,A7 0002422c 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00024232 50 4f |PO | ADDQ.L #0x8,A7 00024234 2c 17 |, | MOVE.L (A7),D6 00024236 51 4f |QO | SUBQ.L #0x8,A7 00024238 2f 0c |/ | MOVE.L A4,-(A7) 0002423a 2f 07 |/ | MOVE.L D7,-(A7) 0002423c 4e b9 00 01 03 60 |N ` | JSR ?StringToInt64() 00024242 58 4f |XO | ADDQ.L #0x4,A7 00024244 2e 86 |. | MOVE.L D6,(A7) 00024246 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 0002424c de c0 | | ADDA.W D0,A7 0002424e 4e ba e9 dc |N | JSR 0x22c2c 00024252 58 4f |XO | ADDQ.L #0x4,A7 00024254 4c df 11 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A4 00024258 4e 5e |N^ | UNLK A6 0002425a 4e 75 |Nu | RTS 0002425c ; -------------------------------------------------------------------------------------- 0002425c ; OMSI PASCAL Function 0002425c ; <LVAR 0x008 4(r)> 0002425c ; <LVAR -0x00a 2(r)> 0002425c ; <LVAR -0x00c 4(rw)> 0002425c ; <LVAR -0x010 4(rw)> 0002425c ; -------------------------------------------------------------------------------------- 0002425c 4e 56 ff bc |NV | LINK.W A6,#0xffbc 00024260 bf d5 | | CMPA.L (A5),A7 00024262 62 06 |b | BHI 0x2426a 00024264 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024268 4e 76 |Nv | TRAPV 0002426a de fc 00 34 | 4 | ADDA.W #0x34,A7 0002426e 48 e7 c3 c0 |H | MOVEM.L A1+A0+D7+D6+D1+D0,-(A7) 00024272 41 ee ff f0 |A | LEA.L (A6-0x10),A0 00024276 43 ee ff f4 |C | LEA.L (A6-0xc),A1 0002427a 51 4f |QO | SUBQ.L #0x8,A7 0002427c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024280 48 78 00 01 |Hx | PEA.L 0x1 00024284 4e ba e9 36 |N 6 | JSR 0x22bbc 00024288 50 4f |PO | ADDQ.L #0x8,A7 0002428a 20 9f | | MOVE.L (A7)+,(A0) 0002428c 22 9f |" | MOVE.L (A7)+,(A1) 0002428e 7e 00 |~ | MOVEQ.L #0x00,D7 00024290 7c 00 || | MOVEQ.L #0x00,D6 00024292 30 2e ff f6 |0. | MOVE.W (A6-0xa),D0 00024296 02 40 00 01 | @ | ANDI.W #0x0001,D0 0002429a 42 81 |B | CLR.L D1 0002429c 32 00 |2 | MOVE.W D0,D1 0002429e de 81 | | ADD.L D1,D7 000242a0 51 4f |QO | SUBQ.L #0x8,A7 000242a2 2f 11 |/ | MOVE.L (A1),-(A7) 000242a4 2f 10 |/ | MOVE.L (A0),-(A7) 000242a6 48 78 ff ff |Hx | PEA.L 0xffffffff 000242aa 4e b9 00 01 03 44 |N D | JSR BitShift(a : Quad ; howmuch : integer) : Quad 000242b0 de fc 00 0c | | ADDA.W #0xc,A7 000242b4 20 9f | | MOVE.L (A7)+,(A0) 000242b6 22 9f |" | MOVE.L (A7)+,(A1) 000242b8 52 86 |R | ADDQ.L #0x1,D6 000242ba 0c 86 00 00 00 3f | ? | CMPI.L #0x0000003f,D6 000242c0 6f d0 |o | BLE 0x24292 000242c2 51 4f |QO | SUBQ.L #0x8,A7 000242c4 2f 07 |/ | MOVE.L D7,-(A7) 000242c6 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad 000242cc 58 4f |XO | ADDQ.L #0x4,A7 000242ce 4e ba e9 e4 |N | JSR 0x22cb4 000242d2 50 4f |PO | ADDQ.L #0x8,A7 000242d4 4c df 03 c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0+A1 000242d8 4e 5e |N^ | UNLK A6 000242da 4e 75 |Nu | RTS 000242dc ; -------------------------------------------------------------------------------------- 000242dc ; OMSI PASCAL Function 000242dc ; <LVAR 0x008 4(r)> 000242dc ; <LVAR -0x004 @ 1(r)> 000242dc ; -------------------------------------------------------------------------------------- 000242dc 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 000242e0 bf d5 | | CMPA.L (A5),A7 000242e2 62 06 |b | BHI 0x242ea 000242e4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000242e8 4e 76 |Nv | TRAPV 000242ea de fc 00 44 | D | ADDA.W #0x44,A7 000242ee 48 e7 e0 e0 |H | MOVEM.L A2+A1+A0+D2+D1+D0,-(A7) 000242f2 45 f9 00 02 7a 3a |E z: | LEA.L 0x27a3a,A2 000242f8 72 01 |r | MOVEQ.L #0x01,D1 000242fa 74 00 |t | MOVEQ.L #0x00,D2 000242fc 4a 12 |J | TST.B (A2) 000242fe 66 32 |f2 | BNE 0x24332 00024300 9e fc 00 1c | | SUBA.W #0x1c,A7 00024304 20 4f | O | MOVEA.L A7,A0 00024306 43 fa d7 9e |C | LEA.L 0x21aa6,A1 0002430a 70 1a |p | MOVEQ.L #0x1a,D0 0002430c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002430e 51 c8 ff fc |Q | DBF D0,0x2430c 00024312 59 4f |YO | SUBQ.L #0x4,A7 00024314 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024318 3f 01 |? | MOVE.W D1,-(A7) 0002431a 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 0002431e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024324 50 4f |PO | ADDQ.L #0x8,A7 00024326 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002432c de fc 00 20 | | ADDA.W #0x20,A7 00024330 14 81 | | MOVE.B D1,(A2) 00024332 5d 4f |]O | SUBQ.L #0x6,A7 00024334 4e b9 00 01 03 f8 |N | JSR GetConsoleConfig() : Long 0002433a 20 1f | | MOVE.L (A7)+,D0 0002433c 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00024342 63 02 |c | BLS 0x24346 00024344 4e 4f |NO | TRAP #15 00024346 3e 80 |> | MOVE.W D0,(A7) 00024348 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002434c 4e b9 00 01 02 12 |N | JSR KC09_PortStatus(Port : Word; VAR b: Byte) 00024352 5c 4f |\O | ADDQ.L #0x6,A7 00024354 10 2e ff fc | . | MOVE.B (A6-0x4),D0 00024358 b0 01 | | CMP.B D1,D0 0002435a 67 16 |g | BEQ 0x24372 0002435c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024360 4e ba da be |N | JSR 0x21e20 00024364 58 4f |XO | ADDQ.L #0x4,A7 00024366 2e 6d 00 08 |.m | MOVEA.L (A5+0x8),A7 0002436a 3c 42 |<B | MOVEA.W D2,A6 0002436c 4e f9 00 02 57 92 |N W | JMP 0x25792 00024372 55 4f |UO | SUBQ.L #0x2,A7 00024374 4e b9 00 01 03 d4 |N | JSR ReadChar() : Byte 0002437a 10 1f | | MOVE.B (A7)+,D0 0002437c 0c 00 00 07 | | CMPI.B #0x07,D0 00024380 67 16 |g | BEQ 0x24398 00024382 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024386 4e ba da 98 |N | JSR 0x21e20 0002438a 58 4f |XO | ADDQ.L #0x4,A7 0002438c 2e 6d 00 08 |.m | MOVEA.L (A5+0x8),A7 00024390 3c 42 |<B | MOVEA.W D2,A6 00024392 4e f9 00 02 57 92 |N W | JMP 0x25792 00024398 4c df 07 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2 0002439c 4e 5e |N^ | UNLK A6 0002439e 4e 75 |Nu | RTS 000243a0 ; -------------------------------------------------------------------------------------- 000243a0 ; OMSI PASCAL Function 000243a0 ; -------------------------------------------------------------------------------------- 000243a0 4e 56 ff f8 |NV | LINK.W A6,#0xfff8 000243a4 bf d5 | | CMPA.L (A5),A7 000243a6 62 06 |b | BHI 0x243ae 000243a8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000243ac 4e 76 |Nv | TRAPV 000243ae de fc 00 08 | | ADDA.W #0x8,A7 000243b2 48 78 00 c8 |Hx | PEA.L 0xc8 000243b6 4e ba e9 30 |N 0 | JSR 0x22ce8 000243ba 58 4f |XO | ADDQ.L #0x4,A7 000243bc 4e 5e |N^ | UNLK A6 000243be 4e 75 |Nu | RTS 000243c0 ; -------------------------------------------------------------------------------------- 000243c0 ; OMSI PASCAL Function 000243c0 ; <LVAR 0x008 4(r)> 000243c0 ; <LVAR -0x00c @ 4(r)> 000243c0 ; -------------------------------------------------------------------------------------- 000243c0 4e 56 ff ac |NV | LINK.W A6,#0xffac 000243c4 bf d5 | | CMPA.L (A5),A7 000243c6 62 06 |b | BHI 0x243ce 000243c8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000243cc 4e 76 |Nv | TRAPV 000243ce de fc 00 48 | H | ADDA.W #0x48,A7 000243d2 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 000243d6 43 ee ff f4 |C | LEA.L (A6-0xc),A1 000243da 48 51 |HQ | PEA.L (A1) 000243dc 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000243e2 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000243e6 4e ba de 86 |N | JSR 0x2226e 000243ea 58 4f |XO | ADDQ.L #0x4,A7 000243ec 7e 01 |~ | MOVEQ.L #0x01,D7 000243ee be 97 | | CMP.L (A7),D7 000243f0 6e 6a |nj | BGT 0x2445c 000243f2 59 4f |YO | SUBQ.L #0x4,A7 000243f4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000243f8 2f 07 |/ | MOVE.L D7,-(A7) 000243fa 4e ba e7 fc |N | JSR 0x22bf8 000243fe 50 4f |PO | ADDQ.L #0x8,A7 00024400 2c 1f |, | MOVE.L (A7)+,D6 00024402 6d 20 |m | BLT 0x24424 00024404 0c 86 00 00 00 ff | | CMPI.L #0x000000ff,D6 0002440a 6e 18 |n | BGT 0x24424 0002440c 2f 11 |/ | MOVE.L (A1),-(A7) 0002440e 0c 86 00 00 00 ff | | CMPI.L #0x000000ff,D6 00024414 63 02 |c | BLS 0x24418 00024416 4e 4f |NO | TRAP #15 00024418 1f 06 | | MOVE.B D6,-(A7) 0002441a 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00024420 5c 4f |\O | ADDQ.L #0x6,A7 00024422 60 34 |`4 | BRA 0x24458 00024424 48 51 |HQ | PEA.L (A1) 00024426 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002442c 58 4f |XO | ADDQ.L #0x4,A7 0002442e 41 fa d6 ae |A | LEA.L 0x21ade,A0 00024432 70 06 |p | MOVEQ.L #0x06,D0 00024434 2f 20 |/ | MOVE.L -(A0),-(A7) 00024436 51 c8 ff fc |Q | DBF D0,0x24434 0002443a 59 4f |YO | SUBQ.L #0x4,A7 0002443c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024440 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00024444 3f 3c 00 1c |?< | MOVE.W #0x1c,-(A7) 00024448 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002444e 50 4f |PO | ADDQ.L #0x8,A7 00024450 4e ba da 10 |N | JSR 0x21e62 00024454 de fc 00 20 | | ADDA.W #0x20,A7 00024458 52 87 |R | ADDQ.L #0x1,D7 0002445a 68 92 |h | BVC 0x243ee 0002445c 2e 91 |. | MOVE.L (A1),(A7) 0002445e 4e ba e7 cc |N | JSR 0x22c2c 00024462 58 4f |XO | ADDQ.L #0x4,A7 00024464 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 00024468 4e 5e |N^ | UNLK A6 0002446a 4e 75 |Nu | RTS 0002446c ; -------------------------------------------------------------------------------------- 0002446c ; OMSI PASCAL Function 0002446c ; <LVAR 0x008 4(r)> 0002446c ; -------------------------------------------------------------------------------------- 0002446c 4e 56 ff cc |NV | LINK.W A6,#0xffcc 00024470 bf d5 | | CMPA.L (A5),A7 00024472 62 06 |b | BHI 0x2447a 00024474 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024478 4e 76 |Nv | TRAPV 0002447a de fc 00 2c | , | ADDA.W #0x2c,A7 0002447e 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 00024482 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00024486 59 4f |YO | SUBQ.L #0x4,A7 00024488 2f 11 |/ | MOVE.L (A1),-(A7) 0002448a 4e ba dd e2 |N | JSR 0x2226e 0002448e 58 4f |XO | ADDQ.L #0x4,A7 00024490 2c 1f |, | MOVE.L (A7)+,D6 00024492 0c 86 00 00 00 01 | | CMPI.L #0x00000001,D6 00024498 6c 1a |l | BGE 0x244b4 0002449a 41 fa d6 4c |A L | LEA.L 0x21ae8,A0 0002449e 70 04 |p | MOVEQ.L #0x04,D0 000244a0 3f 20 |? | MOVE.W -(A0),-(A7) 000244a2 51 c8 ff fc |Q | DBF D0,0x244a0 000244a6 2f 11 |/ | MOVE.L (A1),-(A7) 000244a8 48 78 00 01 |Hx | PEA.L 0x1 000244ac 4e ba dd f6 |N | JSR 0x222a4 000244b0 de fc 00 12 | | ADDA.W #0x12,A7 000244b4 9e fc 00 0c | | SUBA.W #0xc,A7 000244b8 2f 11 |/ | MOVE.L (A1),-(A7) 000244ba 48 78 00 01 |Hx | PEA.L 0x1 000244be 4e ba e6 fc |N | JSR 0x22bbc 000244c2 50 4f |PO | ADDQ.L #0x8,A7 000244c4 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 000244ca 50 4f |PO | ADDQ.L #0x8,A7 000244cc 2e 1f |. | MOVE.L (A7)+,D7 000244ce 52 87 |R | ADDQ.L #0x1,D7 000244d0 be 86 | | CMP.L D6,D7 000244d2 6e 12 |n | BGT 0x244e6 000244d4 59 4f |YO | SUBQ.L #0x4,A7 000244d6 2f 11 |/ | MOVE.L (A1),-(A7) 000244d8 2f 07 |/ | MOVE.L D7,-(A7) 000244da 4e ba e6 ae |N | JSR 0x22b8a 000244de 50 4f |PO | ADDQ.L #0x8,A7 000244e0 4e ba e7 4a |N J | JSR 0x22c2c 000244e4 58 4f |XO | ADDQ.L #0x4,A7 000244e6 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 000244ea 4e 5e |N^ | UNLK A6 000244ec 4e 75 |Nu | RTS 000244ee ; -------------------------------------------------------------------------------------- 000244ee ; OMSI PASCAL Function 000244ee ; <LVAR 0x00c 1(rw)> 000244ee ; <LVAR 0x008 4(r)> 000244ee ; -------------------------------------------------------------------------------------- 000244ee 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 000244f2 bf d5 | | CMPA.L (A5),A7 000244f4 62 06 |b | BHI 0x244fc 000244f6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000244fa 4e 76 |Nv | TRAPV 000244fc de fc 00 34 | 4 | ADDA.W #0x34,A7 00024500 48 e7 e7 c0 |H | MOVEM.L A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00024504 42 2e 00 0c |B. | CLR.B (A6+0xc) 00024508 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002450c 2f 08 |/ | MOVE.L A0,-(A7) 0002450e 70 00 |p | MOVEQ.L #0x00,D0 00024510 52 40 |R@ | ADDQ.W #0x1,D0 00024512 1c 00 | | MOVE.B D0,D6 00024514 0c 06 00 2c | , | CMPI.B #0x2c,D6 00024518 6e 00 00 82 |n | BGT 0x2459c 0002451c 41 fa d8 2e |A . | LEA.L 0x21d4c,A0 00024520 10 06 | | MOVE.B D6,D0 00024522 48 80 |H | EXTB.W D0 00024524 48 c0 |H | EXTW.L D0 00024526 e2 98 | | ROR.L #0x1,D0 00024528 d0 c0 | | ADDA.W D0,A0 0002452a 48 40 |H@ | SWAP.W D0 0002452c e7 58 | X | ROL.W #0x3,D0 0002452e 42 81 |B | CLR.L D1 00024530 12 10 | | MOVE.B (A0),D1 00024532 e1 29 | ) | LSL.B D0,D1 00024534 e8 09 | | LSR.B #0x4,D1 00024536 2a 01 |* | MOVE.L D1,D5 00024538 20 57 | W | MOVEA.L (A7),A0 0002453a 30 10 |0 | MOVE.W (A0),D0 0002453c 48 c0 |H | EXTW.L D0 0002453e ba 80 | | CMP.L D0,D5 00024540 66 54 |fT | BNE 0x24596 00024542 2f 05 |/ | MOVE.L D5,-(A7) 00024544 7e 01 |~ | MOVEQ.L #0x01,D7 00024546 be 97 | | CMP.L (A7),D7 00024548 6e 42 |nB | BGT 0x2458c 0002454a 10 06 | | MOVE.B D6,D0 0002454c 48 80 |H | EXTB.W D0 0002454e c1 fc 00 0a | | MULS.W #0xa,D0 00024552 22 07 |" | MOVE.L D7,D1 00024554 53 81 |S | SUBQ.L #0x1,D1 00024556 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 0002455c 63 02 |c | BLS 0x24560 0002455e 4e 4f |NO | TRAP #15 00024560 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00024564 43 fa d6 24 |C $ | LEA.L COMMAND_TABLE_21b8a,A1 00024568 24 07 |$ | MOVE.L D7,D2 0002456a 53 82 |S | SUBQ.L #0x1,D2 0002456c 0c 82 00 00 00 09 | | CMPI.L #0x00000009,D2 00024572 63 02 |c | BLS 0x24576 00024574 4e 4f |NO | TRAP #15 00024576 43 f1 00 00 |C | LEA.L (A1+D0.W),A1 0002457a 10 30 18 02 | 0 | MOVE.B (A0+D1.L+#0x2),D0 0002457e b0 31 28 00 | 1( | CMP.B (A1+D2.L),D0 00024582 67 04 |g | BEQ 0x24588 00024584 58 4f |XO | ADDQ.L #0x4,A7 00024586 60 0e |` | BRA 0x24596 00024588 52 87 |R | ADDQ.L #0x1,D7 0002458a 68 ba |h | BVC 0x24546 0002458c 58 4f |XO | ADDQ.L #0x4,A7 0002458e 1d 46 00 0c | F | MOVE.B D6,(A6+0xc) 00024592 58 4f |XO | ADDQ.L #0x4,A7 00024594 60 08 |` | BRA 0x2459e 00024596 52 06 |R | ADDQ.B #0x1,D6 00024598 68 00 ff 7a |h z | BVC 0x24514 0002459c 58 4f |XO | ADDQ.L #0x4,A7 0002459e 4c df 03 e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1 000245a2 4e 5e |N^ | UNLK A6 000245a4 4e 75 |Nu | RTS 000245a6 ; -------------------------------------------------------------------------------------- 000245a6 ; OMSI PASCAL Function 000245a6 ; <LVAR 0x00c 4(r)> 000245a6 ; <LVAR 0x008 4(r)> 000245a6 ; <LVAR -0x002 @ 1(r)> 000245a6 ; <LVAR -0x006 @ 4(w)> 000245a6 ; <LVAR -0x008 @ 1(r)> 000245a6 ; <LVAR -0x00c @ 4(r)> 000245a6 ; <LVAR -0x010 @ 4(rw)> 000245a6 ; -------------------------------------------------------------------------------------- 000245a6 4e 56 ff a6 |NV | LINK.W A6,#0xffa6 000245aa bf d5 | | CMPA.L (A5),A7 000245ac 62 06 |b | BHI 0x245b4 000245ae 44 fc 00 02 |D | MOVE.W #0x2,CCR 000245b2 4e 76 |Nv | TRAPV 000245b4 de fc 00 4a | J | ADDA.W #0x4a,A7 000245b8 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 000245bc 45 ee ff f0 |E | LEA.L (A6-0x10),A2 000245c0 47 ee ff fe |G | LEA.L (A6-0x2),A3 000245c4 49 ee ff f4 |I | LEA.L (A6-0xc),A4 000245c8 72 01 |r | MOVEQ.L #0x01,D1 000245ca 59 4f |YO | SUBQ.L #0x4,A7 000245cc 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000245d0 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 000245d6 58 4f |XO | ADDQ.L #0x4,A7 000245d8 24 9f |$ | MOVE.L (A7)+,(A2) 000245da 2f 12 |/ | MOVE.L (A2),-(A7) 000245dc 1f 3c 00 2e | < . | MOVE.B #0x2e,-(A7) 000245e0 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000245e6 5c 4f |\O | ADDQ.L #0x6,A7 000245e8 41 f9 00 02 7a 1a |A z | LEA.L 0x27a1a,A0 000245ee 70 04 |p | MOVEQ.L #0x04,D0 000245f0 3f 20 |? | MOVE.W -(A0),-(A7) 000245f2 51 c8 ff fc |Q | DBF D0,0x245f0 000245f6 59 4f |YO | SUBQ.L #0x4,A7 000245f8 2f 12 |/ | MOVE.L (A2),-(A7) 000245fa 59 4f |YO | SUBQ.L #0x4,A7 000245fc 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00024600 3f 01 |? | MOVE.W D1,-(A7) 00024602 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00024606 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002460c 50 4f |PO | ADDQ.L #0x8,A7 0002460e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024614 50 4f |PO | ADDQ.L #0x8,A7 00024616 24 9f |$ | MOVE.L (A7)+,(A2) 00024618 5c 4f |\O | ADDQ.L #0x6,A7 0002461a 2e 92 |. | MOVE.L (A2),(A7) 0002461c 42 27 |B' | CLR.B -(A7) 0002461e 1f 01 | | MOVE.B D1,-(A7) 00024620 48 78 00 00 |Hx | PEA.L 0x0 00024624 48 53 |HS | PEA.L (A3) 00024626 48 54 |HT | PEA.L (A4) 00024628 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 0002462e de fc 00 14 | | ADDA.W #0x14,A7 00024632 4a 13 |J | TST.B (A3) 00024634 67 4a |gJ | BEQ 0x24680 00024636 48 52 |HR | PEA.L (A2) 00024638 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002463e 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00024642 4e ba d7 dc |N | JSR 0x21e20 00024646 9e fc 00 16 | | SUBA.W #0x16,A7 0002464a 20 4f | O | MOVEA.L A7,A0 0002464c 43 fa d4 9a |C | LEA.L 0x21ae8,A1 00024650 70 18 |p | MOVEQ.L #0x18,D0 00024652 10 d9 | | MOVE.B (A1)+,(A0)+ 00024654 51 c8 ff fc |Q | DBF D0,0x24652 00024658 51 4f |QO | SUBQ.L #0x8,A7 0002465a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002465e 3f 01 |? | MOVE.W D1,-(A7) 00024660 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00024664 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002466a 58 4f |XO | ADDQ.L #0x4,A7 0002466c 2e ae 00 0c |. | MOVE.L (A6+0xc),(A7) 00024670 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024676 50 4f |PO | ADDQ.L #0x8,A7 00024678 4e ba d7 e8 |N | JSR 0x21e62 0002467c de fc 00 1e | | ADDA.W #0x1e,A7 00024680 2d 79 00 02 7a 08 ff fa |-y z | MOVE.L 0x27a08,(A6-0x6) 00024688 2f 14 |/ | MOVE.L (A4),-(A7) 0002468a 48 52 |HR | PEA.L (A2) 0002468c 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00024690 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 00024696 de fc 00 0c | | ADDA.W #0xc,A7 0002469a 20 52 | R | MOVEA.L (A2),A0 0002469c 4a 50 |JP | TST.W (A0) 0002469e 67 14 |g | BEQ 0x246b4 000246a0 2f 12 |/ | MOVE.L (A2),-(A7) 000246a2 4e ba da 16 |N | JSR 0x220ba 000246a6 58 4f |XO | ADDQ.L #0x4,A7 000246a8 48 6e ff fa |Hn | PEA.L (A6-0x6) 000246ac 2f 12 |/ | MOVE.L (A2),-(A7) 000246ae 4e ba dd 90 |N | JSR 0x22440 000246b2 50 4f |PO | ADDQ.L #0x8,A7 000246b4 4a 2e ff f8 |J. | TST.B (A6-0x8) 000246b8 67 ce |g | BEQ 0x24688 000246ba 42 27 |B' | CLR.B -(A7) 000246bc 1f 01 | | MOVE.B D1,-(A7) 000246be 48 78 00 01 |Hx | PEA.L 0x1 000246c2 48 53 |HS | PEA.L (A3) 000246c4 48 54 |HT | PEA.L (A4) 000246c6 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000246cc de fc 00 10 | | ADDA.W #0x10,A7 000246d0 48 52 |HR | PEA.L (A2) 000246d2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000246d8 58 4f |XO | ADDQ.L #0x4,A7 000246da 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 000246de 4e 5e |N^ | UNLK A6 000246e0 4e 75 |Nu | RTS 000246e2 ; -------------------------------------------------------------------------------------- 000246e2 ; OMSI PASCAL Function 000246e2 ; <LVAR 0x014 1(w)> 000246e2 ; <LVAR 0x00c 4(r)> 000246e2 ; <LVAR 0x008 4(r)> 000246e2 ; -------------------------------------------------------------------------------------- 000246e2 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 000246e6 bf d5 | | CMPA.L (A5),A7 000246e8 62 06 |b | BHI 0x246f0 000246ea 44 fc 00 02 |D | MOVE.W #0x2,CCR 000246ee 4e 76 |Nv | TRAPV 000246f0 de fc 00 0c | | ADDA.W #0xc,A7 000246f4 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 000246f8 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 000246fc d0 ae 00 08 | | ADD.L (A6+0x8),D0 00024700 53 80 |S | SUBQ.L #0x1,D0 00024702 53 80 |S | SUBQ.L #0x1,D0 00024704 0c 80 00 00 1f ff | | CMPI.L #0x00001fff,D0 0002470a 63 02 |c | BLS 0x2470e 0002470c 4e 4f |NO | TRAP #15 0002470e 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 00024714 1d 70 08 08 00 14 | p | MOVE.B (A0+D0.L+#0x8),(A6+0x14) 0002471a 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 0002471e 4e 5e |N^ | UNLK A6 00024720 4e 75 |Nu | RTS 00024722 ; -------------------------------------------------------------------------------------- 00024722 ; OMSI PASCAL Function 00024722 ; <LVAR 0x010 4(w)> 00024722 ; <LVAR 0x00c 4(r)> 00024722 ; <LVAR 0x008 4(r)> 00024722 ; <LVAR -0x004 @ 1(r)> 00024722 ; <LVAR -0x008 @ 4(r)> 00024722 ; -------------------------------------------------------------------------------------- 00024722 4e 56 ff c4 |NV | LINK.W A6,#0xffc4 00024726 bf d5 | | CMPA.L (A5),A7 00024728 62 06 |b | BHI 0x24730 0002472a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002472e 4e 76 |Nv | TRAPV 00024730 de fc 00 34 | 4 | ADDA.W #0x34,A7 00024734 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00024738 59 4f |YO | SUBQ.L #0x4,A7 0002473a 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 0002473e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024742 4e ba e3 ca |N | JSR 0x22b0e 00024746 50 4f |PO | ADDQ.L #0x8,A7 00024748 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002474c 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00024750 4e b9 00 01 02 ec |N | JSR String2Long(src : String; VAR status : Bool; VAR retval : Long) 00024756 de fc 00 0c | | ADDA.W #0xc,A7 0002475a 4a 2e ff fc |J. | TST.B (A6-0x4) 0002475e 66 30 |f0 | BNE 0x24790 00024760 9e fc 00 18 | | SUBA.W #0x18,A7 00024764 20 4f | O | MOVEA.L A7,A0 00024766 43 fa d3 9a |C | LEA.L 0x21b02,A1 0002476a 70 16 |p | MOVEQ.L #0x16,D0 0002476c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002476e 51 c8 ff fc |Q | DBF D0,0x2476c 00024772 59 4f |YO | SUBQ.L #0x4,A7 00024774 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024778 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002477c 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00024780 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024786 50 4f |PO | ADDQ.L #0x8,A7 00024788 4e ba d6 d8 |N | JSR 0x21e62 0002478c de fc 00 1c | | ADDA.W #0x1c,A7 00024790 2d 6e ff f8 00 10 |-n | MOVE.L (A6-0x8),(A6+0x10) 00024796 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 0002479a 4e 5e |N^ | UNLK A6 0002479c 4e 75 |Nu | RTS 0002479e ; -------------------------------------------------------------------------------------- 0002479e ; OMSI PASCAL Function 0002479e ; <LVAR 0x014 4(r)> 0002479e ; <LVAR 0x010 4(r)> 0002479e ; <LVAR 0x00c 4(r)> 0002479e ; <LVAR 0x008 4(r)> 0002479e ; <LVAR -0x00c 4(rw)> 0002479e ; <LVAR -0x010 4(rw)> 0002479e ; <LVAR -0x014 4(rw)> 0002479e ; <LVAR -0x018 4(w)> 0002479e ; <LVAR -0x020 4(rw)> 0002479e ; -------------------------------------------------------------------------------------- 0002479e 4e 56 ff 8e |NV | LINK.W A6,#0xff8e 000247a2 bf d5 | | CMPA.L (A5),A7 000247a4 62 06 |b | BHI 0x247ac 000247a6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000247aa 4e 76 |Nv | TRAPV 000247ac de fc 00 4e | N | ADDA.W #0x4e,A7 000247b0 48 e7 c7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 000247b4 43 ee ff e0 |C | LEA.L (A6-0x20),A1 000247b8 45 ee ff f0 |E | LEA.L (A6-0x10),A2 000247bc 47 ee ff f4 |G | LEA.L (A6-0xc),A3 000247c0 49 ee ff ec |I | LEA.L (A6-0x14),A4 000247c4 7e 00 |~ | MOVEQ.L #0x00,D7 000247c6 22 ae 00 14 |" | MOVE.L (A6+0x14),(A1) 000247ca 20 39 00 02 7a 08 | 9 z | MOVE.L 0x27a08,D0 000247d0 90 ae 00 14 | | SUB.L (A6+0x14),D0 000247d4 28 80 |( | MOVE.L D0,(A4) 000247d6 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000247da 2a 2e 00 10 |*. | MOVE.L (A6+0x10),D5 000247de ba 97 | | CMP.L (A7),D5 000247e0 6e 2c |n, | BGT 0x2480e 000247e2 51 4f |QO | SUBQ.L #0x8,A7 000247e4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000247e8 2f 05 |/ | MOVE.L D5,-(A7) 000247ea 4e ba e2 c0 |N | JSR 0x22aac 000247ee 50 4f |PO | ADDQ.L #0x8,A7 000247f0 24 9f |$ | MOVE.L (A7)+,(A2) 000247f2 26 97 |& | MOVE.L (A7),(A3) 000247f4 2f 13 |/ | MOVE.L (A3),-(A7) 000247f6 2f 12 |/ | MOVE.L (A2),-(A7) 000247f8 4e ba e2 7a |N z | JSR 0x22a74 000247fc 50 4f |PO | ADDQ.L #0x8,A7 000247fe 2c 1f |, | MOVE.L (A7)+,D6 00024800 de 86 | | ADD.L D6,D7 00024802 ba ae 00 0c | | CMP.L (A6+0xc),D5 00024806 6c 02 |l | BGE 0x2480a 00024808 52 87 |R | ADDQ.L #0x1,D7 0002480a 52 85 |R | ADDQ.L #0x1,D5 0002480c 68 d0 |h | BVC 0x247de 0002480e 58 4f |XO | ADDQ.L #0x4,A7 00024810 20 11 | | MOVE.L (A1),D0 00024812 d0 94 | | ADD.L (A4),D0 00024814 2d 40 ff e8 |-@ | MOVE.L D0,(A6-0x18) 00024818 be 94 | | CMP.L (A4),D7 0002481a 67 0c |g | BEQ 0x24828 0002481c 2f 00 |/ | MOVE.L D0,-(A7) 0002481e 2f 14 |/ | MOVE.L (A4),-(A7) 00024820 9f 97 | | SUB.L D7,(A7) 00024822 4e ba db 92 |N | JSR 0x223b6 00024826 50 4f |PO | ADDQ.L #0x8,A7 00024828 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 0002482c 2a 2e 00 10 |*. | MOVE.L (A6+0x10),D5 00024830 ba 97 | | CMP.L (A7),D5 00024832 6e 00 00 88 |n | BGT 0x248bc 00024836 51 4f |QO | SUBQ.L #0x8,A7 00024838 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002483c 2f 05 |/ | MOVE.L D5,-(A7) 0002483e 4e ba e2 6c |N l | JSR 0x22aac 00024842 50 4f |PO | ADDQ.L #0x8,A7 00024844 24 9f |$ | MOVE.L (A7)+,(A2) 00024846 26 97 |& | MOVE.L (A7),(A3) 00024848 2f 13 |/ | MOVE.L (A3),-(A7) 0002484a 2f 12 |/ | MOVE.L (A2),-(A7) 0002484c 4e ba e2 26 |N & | JSR 0x22a74 00024850 50 4f |PO | ADDQ.L #0x8,A7 00024852 2c 1f |, | MOVE.L (A7)+,D6 00024854 2f 06 |/ | MOVE.L D6,-(A7) 00024856 70 01 |p | MOVEQ.L #0x01,D0 00024858 b0 97 | | CMP.L (A7),D0 0002485a 6e 30 |n0 | BGT 0x2488c 0002485c 22 11 |" | MOVE.L (A1),D1 0002485e d2 80 | | ADD.L D0,D1 00024860 53 81 |S | SUBQ.L #0x1,D1 00024862 53 81 |S | SUBQ.L #0x1,D1 00024864 0c 81 00 00 1f ff | | CMPI.L #0x00001fff,D1 0002486a 63 02 |c | BLS 0x2486e 0002486c 4e 4f |NO | TRAP #15 0002486e 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 00024874 55 4f |UO | SUBQ.L #0x2,A7 00024876 2f 13 |/ | MOVE.L (A3),-(A7) 00024878 2f 12 |/ | MOVE.L (A2),-(A7) 0002487a 2f 00 |/ | MOVE.L D0,-(A7) 0002487c 4e ba fe 64 |N d | JSR 0x246e2 00024880 de fc 00 0c | | ADDA.W #0xc,A7 00024884 11 9f 18 08 | | MOVE.B (A7)+,(A0+D1.L+#0x8) 00024888 52 80 |R | ADDQ.L #0x1,D0 0002488a 68 cc |h | BVC 0x24858 0002488c 58 4f |XO | ADDQ.L #0x4,A7 0002488e ba ae 00 0c | | CMP.L (A6+0xc),D5 00024892 6c 22 |l" | BGE 0x248b6 00024894 20 11 | | MOVE.L (A1),D0 00024896 d0 86 | | ADD.L D6,D0 00024898 22 00 |" | MOVE.L D0,D1 0002489a 53 81 |S | SUBQ.L #0x1,D1 0002489c 0c 81 00 00 1f ff | | CMPI.L #0x00001fff,D1 000248a2 63 02 |c | BLS 0x248a6 000248a4 4e 4f |NO | TRAP #15 000248a6 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 000248ac 11 bc 00 2c 18 08 | , | MOVE.B #0x2c,(A0+D1.L+#0x8) 000248b2 52 80 |R | ADDQ.L #0x1,D0 000248b4 22 80 |" | MOVE.L D0,(A1) 000248b6 52 85 |R | ADDQ.L #0x1,D5 000248b8 68 00 ff 76 |h v | BVC 0x24830 000248bc 58 4f |XO | ADDQ.L #0x4,A7 000248be 4c df 1f e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3+A4 000248c2 4e 5e |N^ | UNLK A6 000248c4 4e 75 |Nu | RTS 000248c6 ; -------------------------------------------------------------------------------------- 000248c6 ; OMSI PASCAL Function 000248c6 ; <LVAR 0x018 4(rw)> 000248c6 ; <LVAR 0x014 4(r)> 000248c6 ; <LVAR 0x010 4(r)> 000248c6 ; <LVAR 0x00c 4(r)> 000248c6 ; <LVAR 0x008 4(r)> 000248c6 ; <LVAR -0x008 4(rw)> 000248c6 ; <LVAR -0x00c 4(rw)> 000248c6 ; <LVAR -0x018 4(w)> 000248c6 ; -------------------------------------------------------------------------------------- 000248c6 4e 56 ff 9e |NV | LINK.W A6,#0xff9e 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 4a | J | ADDA.W #0x4a,A7 000248d8 48 e7 c7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 000248dc 41 ee ff f8 |A | LEA.L (A6-0x8),A0 000248e0 43 ee 00 14 |C | LEA.L (A6+0x14),A1 000248e4 45 ee 00 10 |E | LEA.L (A6+0x10),A2 000248e8 47 ee ff f4 |G | LEA.L (A6-0xc),A3 000248ec 49 fa fd f4 |I | LEA.L 0x246e2,A4 000248f0 72 0c |r | MOVEQ.L #0x0c,D1 000248f2 59 4f |YO | SUBQ.L #0x4,A7 000248f4 2f 11 |/ | MOVE.L (A1),-(A7) 000248f6 2f 12 |/ | MOVE.L (A2),-(A7) 000248f8 4e ba e1 7a |N z | JSR 0x22a74 000248fc 50 4f |PO | ADDQ.L #0x8,A7 000248fe 26 97 |& | MOVE.L (A7),(A3) 00024900 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024904 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024908 4e ba e1 6a |N j | JSR 0x22a74 0002490c 50 4f |PO | ADDQ.L #0x8,A7 0002490e 20 9f | | MOVE.L (A7)+,(A0) 00024910 52 90 |R | ADDQ.L #0x1,(A0) 00024912 20 13 | | MOVE.L (A3),D0 00024914 90 90 | | SUB.L (A0),D0 00024916 52 80 |R | ADDQ.L #0x1,D0 00024918 2f 00 |/ | MOVE.L D0,-(A7) 0002491a 70 01 |p | MOVEQ.L #0x01,D0 0002491c b0 97 | | CMP.L (A7),D0 0002491e 6e 00 00 8e |n | BGT 0x249ae 00024922 2d 40 ff e8 |-@ | MOVE.L D0,(A6-0x18) 00024926 2f 00 |/ | MOVE.L D0,-(A7) 00024928 7c 00 || | MOVEQ.L #0x00,D6 0002492a 2f 10 |/ | MOVE.L (A0),-(A7) 0002492c 7a 01 |z | MOVEQ.L #0x01,D5 0002492e ba 97 | | CMP.L (A7),D5 00024930 6e 42 |nB | BGT 0x24974 00024932 0c 85 00 00 00 01 | | CMPI.L #0x00000001,D5 00024938 66 04 |f | BNE 0x2493e 0002493a 7e 2f |~/ | MOVEQ.L #0x2f,D7 0002493c 60 14 |` | BRA 0x24952 0002493e 55 4f |UO | SUBQ.L #0x2,A7 00024940 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024944 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024948 2f 05 |/ | MOVE.L D5,-(A7) 0002494a 53 97 |S | SUBQ.L #0x1,(A7) 0002494c 4e 94 |N | JSR (A4) 0002494e de c1 | | ADDA.W D1,A7 00024950 1e 1f | | MOVE.B (A7)+,D7 00024952 55 4f |UO | SUBQ.L #0x2,A7 00024954 2f 11 |/ | MOVE.L (A1),-(A7) 00024956 2f 12 |/ | MOVE.L (A2),-(A7) 00024958 20 2f 00 0e | / | MOVE.L (A7+0xe),D0 0002495c d0 85 | | ADD.L D5,D0 0002495e 53 80 |S | SUBQ.L #0x1,D0 00024960 2f 00 |/ | MOVE.L D0,-(A7) 00024962 4e 94 |N | JSR (A4) 00024964 de c1 | | ADDA.W D1,A7 00024966 be 1f | | CMP.B (A7)+,D7 00024968 67 04 |g | BEQ 0x2496e 0002496a 58 4f |XO | ADDQ.L #0x4,A7 0002496c 60 08 |` | BRA 0x24976 0002496e 2c 05 |, | MOVE.L D5,D6 00024970 52 85 |R | ADDQ.L #0x1,D5 00024972 68 ba |h | BVC 0x2492e 00024974 58 4f |XO | ADDQ.L #0x4,A7 00024976 bc 90 | | CMP.L (A0),D6 00024978 66 2c |f, | BNE 0x249a6 0002497a 20 17 | | MOVE.L (A7),D0 0002497c 2d 40 00 18 |-@ | MOVE.L D0,(A6+0x18) 00024980 d0 90 | | ADD.L (A0),D0 00024982 b0 93 | | CMP.L (A3),D0 00024984 6d 02 |m | BLT 0x24988 00024986 60 1a |` | BRA 0x249a2 00024988 55 4f |UO | SUBQ.L #0x2,A7 0002498a 2f 11 |/ | MOVE.L (A1),-(A7) 0002498c 2f 12 |/ | MOVE.L (A2),-(A7) 0002498e 2f 00 |/ | MOVE.L D0,-(A7) 00024990 4e 94 |N | JSR (A4) 00024992 de c1 | | ADDA.W D1,A7 00024994 1e 1f | | MOVE.B (A7)+,D7 00024996 0c 07 00 2f | / | CMPI.B #0x2f,D7 0002499a 67 06 |g | BEQ 0x249a2 0002499c 0c 07 00 3d | = | CMPI.B #0x3d,D7 000249a0 66 04 |f | BNE 0x249a6 000249a2 50 4f |PO | ADDQ.L #0x8,A7 000249a4 60 0e |` | BRA 0x249b4 000249a6 20 1f | | MOVE.L (A7)+,D0 000249a8 52 80 |R | ADDQ.L #0x1,D0 000249aa 68 00 ff 70 |h p | BVC 0x2491c 000249ae 58 4f |XO | ADDQ.L #0x4,A7 000249b0 42 ae 00 18 |B | CLR.L (A6+0x18) 000249b4 4c df 1f e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3+A4 000249b8 4e 5e |N^ | UNLK A6 000249ba 4e 75 |Nu | RTS 000249bc ; -------------------------------------------------------------------------------------- 000249bc ; OMSI PASCAL Function 000249bc ; <LVAR 0x018 4(r)> 000249bc ; <LVAR 0x014 4(r)> 000249bc ; <LVAR 0x010 4(r)> 000249bc ; <LVAR 0x00c 4(r)> 000249bc ; <LVAR 0x008 4(r)> 000249bc ; -------------------------------------------------------------------------------------- 000249bc 4e 56 ff be |NV | LINK.W A6,#0xffbe 000249c0 bf d5 | | CMPA.L (A5),A7 000249c2 62 06 |b | BHI 0x249ca 000249c4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000249c8 4e 76 |Nv | TRAPV 000249ca de fc 00 36 | 6 | ADDA.W #0x36,A7 000249ce 48 e7 c7 c0 |H | MOVEM.L A1+A0+D7+D6+D5+D1+D0,-(A7) 000249d2 41 ee 00 14 |A | LEA.L (A6+0x14),A0 000249d6 43 ee 00 10 |C | LEA.L (A6+0x10),A1 000249da 72 2f |r/ | MOVEQ.L #0x2f,D1 000249dc 59 4f |YO | SUBQ.L #0x4,A7 000249de 2f 10 |/ | MOVE.L (A0),-(A7) 000249e0 2f 11 |/ | MOVE.L (A1),-(A7) 000249e2 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000249e6 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000249ea 4e ba fe da |N | JSR 0x248c6 000249ee de fc 00 10 | | ADDA.W #0x10,A7 000249f2 2a 1f |* | MOVE.L (A7)+,D5 000249f4 6f 52 |oR | BLE 0x24a48 000249f6 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 000249fa 1f 01 | | MOVE.B D1,-(A7) 000249fc 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00024a02 5c 4f |\O | ADDQ.L #0x6,A7 00024a04 20 05 | | MOVE.L D5,D0 00024a06 52 80 |R | ADDQ.L #0x1,D0 00024a08 59 4f |YO | SUBQ.L #0x4,A7 00024a0a 2f 10 |/ | MOVE.L (A0),-(A7) 00024a0c 2f 11 |/ | MOVE.L (A1),-(A7) 00024a0e 4e ba e0 64 |N d | JSR 0x22a74 00024a12 50 4f |PO | ADDQ.L #0x8,A7 00024a14 2c 00 |, | MOVE.L D0,D6 00024a16 bc 97 | | CMP.L (A7),D6 00024a18 6e 2c |n, | BGT 0x24a46 00024a1a 55 4f |UO | SUBQ.L #0x2,A7 00024a1c 2f 10 |/ | MOVE.L (A0),-(A7) 00024a1e 2f 11 |/ | MOVE.L (A1),-(A7) 00024a20 2f 06 |/ | MOVE.L D6,-(A7) 00024a22 4e ba fc be |N | JSR 0x246e2 00024a26 de fc 00 0c | | ADDA.W #0xc,A7 00024a2a 1e 1f | | MOVE.B (A7)+,D7 00024a2c be 01 | | CMP.B D1,D7 00024a2e 66 04 |f | BNE 0x24a34 00024a30 58 4f |XO | ADDQ.L #0x4,A7 00024a32 60 14 |` | BRA 0x24a48 00024a34 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 00024a38 1f 07 | | MOVE.B D7,-(A7) 00024a3a 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00024a40 5c 4f |\O | ADDQ.L #0x6,A7 00024a42 52 86 |R | ADDQ.L #0x1,D6 00024a44 68 d0 |h | BVC 0x24a16 00024a46 58 4f |XO | ADDQ.L #0x4,A7 00024a48 4c df 03 e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1 00024a4c 4e 5e |N^ | UNLK A6 00024a4e 4e 75 |Nu | RTS 00024a50 ; -------------------------------------------------------------------------------------- 00024a50 ; OMSI PASCAL Function 00024a50 ; <LVAR 0x018 4(r)> 00024a50 ; <LVAR 0x014 4(r)> 00024a50 ; <LVAR 0x010 4(r)> 00024a50 ; <LVAR 0x00c 4(r)> 00024a50 ; <LVAR 0x008 4(r)> 00024a50 ; <LVAR -0x006 4(rw)> 00024a50 ; <LVAR -0x014 4(rw)> 00024a50 ; -------------------------------------------------------------------------------------- 00024a50 4e 56 ff aa |NV | LINK.W A6,#0xffaa 00024a54 bf d5 | | CMPA.L (A5),A7 00024a56 62 06 |b | BHI 0x24a5e 00024a58 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024a5c 4e 76 |Nv | TRAPV 00024a5e de fc 00 42 | B | ADDA.W #0x42,A7 00024a62 48 e7 c7 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 00024a66 41 ee 00 14 |A | LEA.L (A6+0x14),A0 00024a6a 43 ee 00 10 |C | LEA.L (A6+0x10),A1 00024a6e 45 ee ff fa |E | LEA.L (A6-0x6),A2 00024a72 72 0c |r | MOVEQ.L #0x0c,D1 00024a74 59 4f |YO | SUBQ.L #0x4,A7 00024a76 2f 10 |/ | MOVE.L (A0),-(A7) 00024a78 2f 11 |/ | MOVE.L (A1),-(A7) 00024a7a 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024a7e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024a82 4e ba fe 42 |N B | JSR 0x248c6 00024a86 de fc 00 10 | | ADDA.W #0x10,A7 00024a8a 2d 5f ff ec |-_ | MOVE.L (A7)+,(A6-0x14) 00024a8e 6f 6e |on | BLE 0x24afe 00024a90 59 4f |YO | SUBQ.L #0x4,A7 00024a92 2f 10 |/ | MOVE.L (A0),-(A7) 00024a94 2f 11 |/ | MOVE.L (A1),-(A7) 00024a96 4e ba df dc |N | JSR 0x22a74 00024a9a 50 4f |PO | ADDQ.L #0x8,A7 00024a9c 24 9f |$ | MOVE.L (A7)+,(A2) 00024a9e 2f 12 |/ | MOVE.L (A2),-(A7) 00024aa0 2a 2e ff ec |*. | MOVE.L (A6-0x14),D5 00024aa4 ba 97 | | CMP.L (A7),D5 00024aa6 6e 54 |nT | BGT 0x24afc 00024aa8 55 4f |UO | SUBQ.L #0x2,A7 00024aaa 2f 10 |/ | MOVE.L (A0),-(A7) 00024aac 2f 11 |/ | MOVE.L (A1),-(A7) 00024aae 2f 05 |/ | MOVE.L D5,-(A7) 00024ab0 4e ba fc 30 |N 0 | JSR 0x246e2 00024ab4 de c1 | | ADDA.W D1,A7 00024ab6 10 1f | | MOVE.B (A7)+,D0 00024ab8 0c 00 00 3d | = | CMPI.B #0x3d,D0 00024abc 66 3a |f: | BNE 0x24af8 00024abe 20 05 | | MOVE.L D5,D0 00024ac0 52 80 |R | ADDQ.L #0x1,D0 00024ac2 2f 12 |/ | MOVE.L (A2),-(A7) 00024ac4 2c 00 |, | MOVE.L D0,D6 00024ac6 bc 97 | | CMP.L (A7),D6 00024ac8 6e 2c |n, | BGT 0x24af6 00024aca 55 4f |UO | SUBQ.L #0x2,A7 00024acc 2f 10 |/ | MOVE.L (A0),-(A7) 00024ace 2f 11 |/ | MOVE.L (A1),-(A7) 00024ad0 2f 06 |/ | MOVE.L D6,-(A7) 00024ad2 4e ba fc 0e |N | JSR 0x246e2 00024ad6 de c1 | | ADDA.W D1,A7 00024ad8 1e 1f | | MOVE.B (A7)+,D7 00024ada 0c 07 00 2f | / | CMPI.B #0x2f,D7 00024ade 66 04 |f | BNE 0x24ae4 00024ae0 50 4f |PO | ADDQ.L #0x8,A7 00024ae2 60 1a |` | BRA 0x24afe 00024ae4 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 00024ae8 1f 07 | | MOVE.B D7,-(A7) 00024aea 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00024af0 5c 4f |\O | ADDQ.L #0x6,A7 00024af2 52 86 |R | ADDQ.L #0x1,D6 00024af4 68 d0 |h | BVC 0x24ac6 00024af6 58 4f |XO | ADDQ.L #0x4,A7 00024af8 52 85 |R | ADDQ.L #0x1,D5 00024afa 68 a8 |h | BVC 0x24aa4 00024afc 58 4f |XO | ADDQ.L #0x4,A7 00024afe 4c df 07 e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2 00024b02 4e 5e |N^ | UNLK A6 00024b04 4e 75 |Nu | RTS 00024b06 ; -------------------------------------------------------------------------------------- 00024b06 ; OMSI PASCAL Function 00024b06 ; <LVAR 0x010 4(r)> 00024b06 ; <LVAR 0x00c 4(r)> 00024b06 ; <LVAR 0x008 4(r)> 00024b06 ; -------------------------------------------------------------------------------------- 00024b06 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 00024b0a bf d5 | | CMPA.L (A5),A7 00024b0c 62 06 |b | BHI 0x24b14 00024b0e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024b12 4e 76 |Nv | TRAPV 00024b14 de fc 00 42 | B | ADDA.W #0x42,A7 00024b18 48 e7 c7 c0 |H | MOVEM.L A1+A0+D7+D6+D5+D1+D0,-(A7) 00024b1c 41 ee 00 0c |A | LEA.L (A6+0xc),A0 00024b20 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00024b24 72 0c |r | MOVEQ.L #0x0c,D1 00024b26 59 4f |YO | SUBQ.L #0x4,A7 00024b28 2f 10 |/ | MOVE.L (A0),-(A7) 00024b2a 2f 11 |/ | MOVE.L (A1),-(A7) 00024b2c 4e ba df 46 |N F | JSR 0x22a74 00024b30 50 4f |PO | ADDQ.L #0x8,A7 00024b32 2a 1f |* | MOVE.L (A7)+,D5 00024b34 2f 05 |/ | MOVE.L D5,-(A7) 00024b36 7c 01 || | MOVEQ.L #0x01,D6 00024b38 bc 97 | | CMP.L (A7),D6 00024b3a 6e 46 |nF | BGT 0x24b82 00024b3c 55 4f |UO | SUBQ.L #0x2,A7 00024b3e 2f 10 |/ | MOVE.L (A0),-(A7) 00024b40 2f 11 |/ | MOVE.L (A1),-(A7) 00024b42 2f 06 |/ | MOVE.L D6,-(A7) 00024b44 4e ba fb 9c |N | JSR 0x246e2 00024b48 de c1 | | ADDA.W D1,A7 00024b4a 10 1f | | MOVE.B (A7)+,D0 00024b4c 0c 00 00 2f | / | CMPI.B #0x2f,D0 00024b50 66 2c |f, | BNE 0x24b7e 00024b52 2f 05 |/ | MOVE.L D5,-(A7) 00024b54 2e 06 |. | MOVE.L D6,D7 00024b56 be 97 | | CMP.L (A7),D7 00024b58 6e 1e |n | BGT 0x24b78 00024b5a 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 00024b5e 55 4f |UO | SUBQ.L #0x2,A7 00024b60 2f 10 |/ | MOVE.L (A0),-(A7) 00024b62 2f 11 |/ | MOVE.L (A1),-(A7) 00024b64 2f 07 |/ | MOVE.L D7,-(A7) 00024b66 4e ba fb 7a |N z | JSR 0x246e2 00024b6a de c1 | | ADDA.W D1,A7 00024b6c 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00024b72 5c 4f |\O | ADDQ.L #0x6,A7 00024b74 52 87 |R | ADDQ.L #0x1,D7 00024b76 68 de |h | BVC 0x24b56 00024b78 58 4f |XO | ADDQ.L #0x4,A7 00024b7a 58 4f |XO | ADDQ.L #0x4,A7 00024b7c 60 06 |` | BRA 0x24b84 00024b7e 52 86 |R | ADDQ.L #0x1,D6 00024b80 68 b6 |h | BVC 0x24b38 00024b82 58 4f |XO | ADDQ.L #0x4,A7 00024b84 4c df 03 e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1 00024b88 4e 5e |N^ | UNLK A6 00024b8a 4e 75 |Nu | RTS 00024b8c ; -------------------------------------------------------------------------------------- 00024b8c ; OMSI PASCAL Function 00024b8c ; <LVAR 0x010 4(r)> 00024b8c ; <LVAR 0x00c 4(r)> 00024b8c ; <LVAR 0x008 4(r)> 00024b8c ; -------------------------------------------------------------------------------------- 00024b8c 4e 56 ff ce |NV | LINK.W A6,#0xffce 00024b90 bf d5 | | CMPA.L (A5),A7 00024b92 62 06 |b | BHI 0x24b9a 00024b94 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024b98 4e 76 |Nv | TRAPV 00024b9a de fc 00 2a | * | ADDA.W #0x2a,A7 00024b9e 48 e7 03 80 |H | MOVEM.L A0+D7+D6,-(A7) 00024ba2 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00024ba6 42 50 |BP | CLR.W (A0) 00024ba8 59 4f |YO | SUBQ.L #0x4,A7 00024baa 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024bae 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024bb2 4e ba de c0 |N | JSR 0x22a74 00024bb6 50 4f |PO | ADDQ.L #0x8,A7 00024bb8 7e 01 |~ | MOVEQ.L #0x01,D7 00024bba be 97 | | CMP.L (A7),D7 00024bbc 6e 34 |n4 | BGT 0x24bf2 00024bbe 55 4f |UO | SUBQ.L #0x2,A7 00024bc0 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024bc4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024bc8 2f 07 |/ | MOVE.L D7,-(A7) 00024bca 4e ba fb 16 |N | JSR 0x246e2 00024bce de fc 00 0c | | ADDA.W #0xc,A7 00024bd2 1c 1f | | MOVE.B (A7)+,D6 00024bd4 0c 06 00 2f | / | CMPI.B #0x2f,D6 00024bd8 67 10 |g | BEQ 0x24bea 00024bda 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 00024bde 1f 06 | | MOVE.B D6,-(A7) 00024be0 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00024be6 5c 4f |\O | ADDQ.L #0x6,A7 00024be8 60 04 |` | BRA 0x24bee 00024bea 58 4f |XO | ADDQ.L #0x4,A7 00024bec 60 06 |` | BRA 0x24bf4 00024bee 52 87 |R | ADDQ.L #0x1,D7 00024bf0 68 c8 |h | BVC 0x24bba 00024bf2 58 4f |XO | ADDQ.L #0x4,A7 00024bf4 4c df 01 c0 |L | MOVEM.L (A7)+,D6+D7+A0 00024bf8 4e 5e |N^ | UNLK A6 00024bfa 4e 75 |Nu | RTS 00024bfc ; -------------------------------------------------------------------------------------- 00024bfc ; OMSI PASCAL Function 00024bfc ; -------------------------------------------------------------------------------------- 00024bfc 4e 56 ff c6 |NV | LINK.W A6,#0xffc6 00024c00 bf d5 | | CMPA.L (A5),A7 00024c02 62 06 |b | BHI 0x24c0a 00024c04 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024c08 4e 76 |Nv | TRAPV 00024c0a de fc 00 3a | : | ADDA.W #0x3a,A7 00024c0e 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00024c12 41 fa cf 28 |A ( | LEA.L 0x21b3c,A0 00024c16 70 10 |p | MOVEQ.L #0x10,D0 00024c18 3f 20 |? | MOVE.W -(A0),-(A7) 00024c1a 51 c8 ff fc |Q | DBF D0,0x24c18 00024c1e 59 4f |YO | SUBQ.L #0x4,A7 00024c20 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024c24 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00024c28 3f 3c 00 22 |?< " | MOVE.W #0x22,-(A7) 00024c2c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024c32 50 4f |PO | ADDQ.L #0x8,A7 00024c34 4e ba d2 2c |N , | JSR 0x21e62 00024c38 de fc 00 26 | & | ADDA.W #0x26,A7 00024c3c 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00024c40 4e 5e |N^ | UNLK A6 00024c42 4e 75 |Nu | RTS 00024c44 ; -------------------------------------------------------------------------------------- 00024c44 ; OMSI PASCAL Function 00024c44 ; <LVAR 0x00c 4(r)> 00024c44 ; <LVAR 0x008 4(r)> 00024c44 ; <LVAR -0x006 4(rw)> 00024c44 ; -------------------------------------------------------------------------------------- 00024c44 4e 56 ff a0 |NV | LINK.W A6,#0xffa0 00024c48 bf d5 | | CMPA.L (A5),A7 00024c4a 62 06 |b | BHI 0x24c52 00024c4c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024c50 4e 76 |Nv | TRAPV 00024c52 de fc 00 58 | X | ADDA.W #0x58,A7 00024c56 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00024c5a 43 ee 00 0c |C | LEA.L (A6+0xc),A1 00024c5e 45 f9 00 02 7a 08 |E z | LEA.L 0x27a08,A2 00024c64 47 fa d2 98 |G | LEA.L 0x21efe,A3 00024c68 72 30 |r0 | MOVEQ.L #0x30,D1 00024c6a 74 39 |t9 | MOVEQ.L #0x39,D2 00024c6c 76 25 |v% | MOVEQ.L #0x25,D3 00024c6e 78 2d |x- | MOVEQ.L #0x2d,D4 00024c70 2d 52 ff fa |-R | MOVE.L (A2),(A6-0x6) 00024c74 55 4f |UO | SUBQ.L #0x2,A7 00024c76 4e 93 |N | JSR (A3) 00024c78 1e 1f | | MOVE.B (A7)+,D7 00024c7a be 03 | | CMP.B D3,D7 00024c7c 66 08 |f | BNE 0x24c86 00024c7e 20 51 | Q | MOVEA.L (A1),A0 00024c80 42 90 |B | CLR.L (A0) 00024c82 60 00 00 e2 |` | BRA 0x24d66 00024c86 be 04 | | CMP.B D4,D7 00024c88 66 0c |f | BNE 0x24c96 00024c8a 20 51 | Q | MOVEA.L (A1),A0 00024c8c 20 bc 00 00 00 01 | | MOVE.L #0x1,(A0) 00024c92 60 00 00 d2 |` | BRA 0x24d66 00024c96 0c 07 00 2f | / | CMPI.B #0x2f,D7 00024c9a 66 0c |f | BNE 0x24ca8 00024c9c 20 51 | Q | MOVEA.L (A1),A0 00024c9e 20 bc 00 00 00 04 | | MOVE.L #0x4,(A0) 00024ca4 60 00 00 c0 |` | BRA 0x24d66 00024ca8 0c 07 00 3d | = | CMPI.B #0x3d,D7 00024cac 66 0c |f | BNE 0x24cba 00024cae 20 51 | Q | MOVEA.L (A1),A0 00024cb0 20 bc 00 00 00 05 | | MOVE.L #0x5,(A0) 00024cb6 60 00 00 ae |` | BRA 0x24d66 00024cba 0c 07 00 5c | \ | CMPI.B #0x5c,D7 00024cbe 66 0c |f | BNE 0x24ccc 00024cc0 20 51 | Q | MOVEA.L (A1),A0 00024cc2 20 bc 00 00 00 06 | | MOVE.L #0x6,(A0) 00024cc8 60 00 00 9c |` | BRA 0x24d66 00024ccc 4a 07 |J | TST.B D7 00024cce 66 2c |f, | BNE 0x24cfc 00024cd0 41 fa ce 82 |A | LEA.L 0x21b54,A0 00024cd4 70 05 |p | MOVEQ.L #0x05,D0 00024cd6 2f 20 |/ | MOVE.L -(A0),-(A7) 00024cd8 51 c8 ff fc |Q | DBF D0,0x24cd6 00024cdc 59 4f |YO | SUBQ.L #0x4,A7 00024cde 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024ce2 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00024ce6 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00024cea 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024cf0 50 4f |PO | ADDQ.L #0x8,A7 00024cf2 4e ba d1 6e |N n | JSR 0x21e62 00024cf6 de fc 00 1c | | ADDA.W #0x1c,A7 00024cfa 60 6a |`j | BRA 0x24d66 00024cfc be 01 | | CMP.B D1,D7 00024cfe 65 2c |e, | BCS 0x24d2c 00024d00 be 02 | | CMP.B D2,D7 00024d02 62 28 |b( | BHI 0x24d2c 00024d04 20 51 | Q | MOVEA.L (A1),A0 00024d06 20 bc 00 00 00 02 | | MOVE.L #0x2,(A0) 00024d0c 55 4f |UO | SUBQ.L #0x2,A7 00024d0e 4e ba d1 b0 |N | JSR 0x21ec0 00024d12 1e 1f | | MOVE.B (A7)+,D7 00024d14 be 01 | | CMP.B D1,D7 00024d16 65 0a |e | BCS 0x24d22 00024d18 be 02 | | CMP.B D2,D7 00024d1a 62 06 |b | BHI 0x24d22 00024d1c 55 4f |UO | SUBQ.L #0x2,A7 00024d1e 4e 93 |N | JSR (A3) 00024d20 1c 1f | | MOVE.B (A7)+,D6 00024d22 be 01 | | CMP.B D1,D7 00024d24 65 04 |e | BCS 0x24d2a 00024d26 be 02 | | CMP.B D2,D7 00024d28 63 e2 |c | BLS 0x24d0c 00024d2a 60 3a |`: | BRA 0x24d66 00024d2c 20 51 | Q | MOVEA.L (A1),A0 00024d2e 20 bc 00 00 00 03 | | MOVE.L #0x3,(A0) 00024d34 7a 00 |z | MOVEQ.L #0x00,D5 00024d36 55 4f |UO | SUBQ.L #0x2,A7 00024d38 4e ba d1 86 |N | JSR 0x21ec0 00024d3c 1e 1f | | MOVE.B (A7)+,D7 00024d3e be 03 | | CMP.B D3,D7 00024d40 67 16 |g | BEQ 0x24d58 00024d42 be 04 | | CMP.B D4,D7 00024d44 67 12 |g | BEQ 0x24d58 00024d46 0c 07 00 2f | / | CMPI.B #0x2f,D7 00024d4a 67 0c |g | BEQ 0x24d58 00024d4c 0c 07 00 3d | = | CMPI.B #0x3d,D7 00024d50 67 06 |g | BEQ 0x24d58 00024d52 0c 07 00 5c | \ | CMPI.B #0x5c,D7 00024d56 66 04 |f | BNE 0x24d5c 00024d58 7a 01 |z | MOVEQ.L #0x01,D5 00024d5a 60 06 |` | BRA 0x24d62 00024d5c 55 4f |UO | SUBQ.L #0x2,A7 00024d5e 4e 93 |N | JSR (A3) 00024d60 1c 1f | | MOVE.B (A7)+,D6 00024d62 4a 05 |J | TST.B D5 00024d64 67 d0 |g | BEQ 0x24d36 00024d66 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024d6a 20 ae ff fa | | MOVE.L (A6-0x6),(A0) 00024d6e 21 52 00 04 |!R | MOVE.L (A2),(A0+0x4) 00024d72 53 a8 00 04 |S | SUBQ.L #0x1,(A0+0x4) 00024d76 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 00024d7a 4e 5e |N^ | UNLK A6 00024d7c 4e 75 |Nu | RTS 00024d7e ; -------------------------------------------------------------------------------------- 00024d7e ; OMSI PASCAL Function 00024d7e ; <LVAR 0x00c 4(r)> 00024d7e ; <LVAR 0x008 4(r)> 00024d7e ; -------------------------------------------------------------------------------------- 00024d7e 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 00024d82 bf d5 | | CMPA.L (A5),A7 00024d84 62 06 |b | BHI 0x24d8c 00024d86 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024d8a 4e 76 |Nv | TRAPV 00024d8c de fc 00 34 | 4 | ADDA.W #0x34,A7 00024d90 48 e7 c7 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 00024d94 45 ee 00 0c |E | LEA.L (A6+0xc),A2 00024d98 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024d9c 2f 08 |/ | MOVE.L A0,-(A7) 00024d9e 2c 39 00 02 7a 08 |,9 z | MOVE.L 0x27a08,D6 00024da4 9c 92 | | SUB.L (A2),D6 00024da6 2a 12 |* | MOVE.L (A2),D5 00024da8 da 86 | | ADD.L D6,D5 00024daa 30 10 |0 | MOVE.W (A0),D0 00024dac 48 c0 |H | EXTW.L D0 00024dae b0 86 | | CMP.L D6,D0 00024db0 67 0c |g | BEQ 0x24dbe 00024db2 2f 05 |/ | MOVE.L D5,-(A7) 00024db4 2f 06 |/ | MOVE.L D6,-(A7) 00024db6 91 97 | | SUB.L D0,(A7) 00024db8 4e ba d5 fc |N | JSR 0x223b6 00024dbc 50 4f |PO | ADDQ.L #0x8,A7 00024dbe 2f 00 |/ | MOVE.L D0,-(A7) 00024dc0 7e 01 |~ | MOVEQ.L #0x01,D7 00024dc2 be 97 | | CMP.L (A7),D7 00024dc4 6e 34 |n4 | BGT 0x24dfa 00024dc6 20 12 | | MOVE.L (A2),D0 00024dc8 d0 87 | | ADD.L D7,D0 00024dca 53 80 |S | SUBQ.L #0x1,D0 00024dcc 53 80 |S | SUBQ.L #0x1,D0 00024dce 0c 80 00 00 1f ff | | CMPI.L #0x00001fff,D0 00024dd4 63 02 |c | BLS 0x24dd8 00024dd6 4e 4f |NO | TRAP #15 00024dd8 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 00024dde 22 07 |" | MOVE.L D7,D1 00024de0 53 81 |S | SUBQ.L #0x1,D1 00024de2 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00024de8 63 02 |c | BLS 0x24dec 00024dea 4e 4f |NO | TRAP #15 00024dec 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 00024df0 11 b1 18 02 08 08 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8) 00024df6 52 87 |R | ADDQ.L #0x1,D7 00024df8 68 c8 |h | BVC 0x24dc2 00024dfa 50 4f |PO | ADDQ.L #0x8,A7 00024dfc 4c df 07 e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2 00024e00 4e 5e |N^ | UNLK A6 00024e02 4e 75 |Nu | RTS 00024e04 ; -------------------------------------------------------------------------------------- 00024e04 ; OMSI PASCAL Function 00024e04 ; <LVAR 0x00c 4(r)> 00024e04 ; <LVAR 0x008 4(r)> 00024e04 ; <LVAR -0x008 @ 4(r)> 00024e04 ; <LVAR -0x00c @ 4(r)> 00024e04 ; <LVAR -0x010 4(r)> 00024e04 ; <LVAR -0x014 @ 4(r)> 00024e04 ; <LVAR -0x018 4(rw)> 00024e04 ; <LVAR -0x01c 4(rw)> 00024e04 ; <LVAR -0x020 4(rw)> 00024e04 ; <LVAR -0x024 4(rw)> 00024e04 ; <LVAR -0x028 4(rw)> 00024e04 ; <LVAR -0x034 4(rw)> 00024e04 ; -------------------------------------------------------------------------------------- 00024e04 4e 56 ff 70 |NV p | LINK.W A6,#0xff70 00024e08 bf d5 | | CMPA.L (A5),A7 00024e0a 62 06 |b | BHI 0x24e12 00024e0c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024e10 4e 76 |Nv | TRAPV 00024e12 de fc 00 5c | \ | ADDA.W #0x5c,A7 00024e16 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00024e1a 43 ee ff f8 |C | LEA.L (A6-0x8),A1 00024e1e 45 ee ff ec |E | LEA.L (A6-0x14),A2 00024e22 47 ee ff dc |G | LEA.L (A6-0x24),A3 00024e26 49 ee ff e0 |I | LEA.L (A6-0x20),A4 00024e2a 74 14 |t | MOVEQ.L #0x14,D2 00024e2c 2d 79 00 02 7a 08 ff d8 |-y z | MOVE.L 0x27a08,(A6-0x28) 00024e34 48 51 |HQ | PEA.L (A1) 00024e36 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00024e3c 58 4f |XO | ADDQ.L #0x4,A7 00024e3e 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00024e42 48 52 |HR | PEA.L (A2) 00024e44 4e ba fd fe |N | JSR 0x24c44 00024e48 50 4f |PO | ADDQ.L #0x8,A7 00024e4a 42 ae ff cc |B | CLR.L (A6-0x34) 00024e4e 7e 00 |~ | MOVEQ.L #0x00,D7 00024e50 20 2e ff cc | . | MOVE.L (A6-0x34),D0 00024e54 b0 82 | | CMP.L D2,D0 00024e56 63 02 |c | BLS 0x24e5a 00024e58 4e 4e |NN | TRAP #14 00024e5a d0 40 | @ | ADD.W D0,D0 00024e5c 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00024e64 00 2a | * | .CONST 0x2a ; [0x0] -> 0x24e8e 00024e66 00 34 | 4 | .CONST 0x34 ; [0x1] -> 0x24e98 00024e68 00 48 | H | .CONST 0x48 ; [0x2] -> 0x24eac 00024e6a 00 64 | d | .CONST 0x64 ; [0x3] -> 0x24ec8 00024e6c 00 68 | h | .CONST 0x68 ; [0x4] -> 0x24ecc 00024e6e 00 76 | v | .CONST 0x76 ; [0x5] -> 0x24eda 00024e70 00 8a | | .CONST 0x8a ; [0x6] -> 0x24eee 00024e72 00 90 | | .CONST 0x90 ; [0x7] -> 0x24ef4 00024e74 00 92 | | .CONST 0x92 ; [0x8] -> 0x24ef6 00024e76 00 a8 | | .CONST 0xa8 ; [0x9] -> 0x24f0c 00024e78 00 b6 | | .CONST 0xb6 ; [0xa] -> 0x24f1a 00024e7a 00 ce | | .CONST 0xce ; [0xb] -> 0x24f32 00024e7c 00 e2 | | .CONST 0xe2 ; [0xc] -> 0x24f46 00024e7e 00 f6 | | .CONST 0xf6 ; [0xd] -> 0x24f5a 00024e80 01 0c | | .CONST 0x10c ; [0xe] -> 0x24f70 00024e82 01 0e | | .CONST 0x10e ; [0xf] -> 0x24f72 00024e84 01 28 | ( | .CONST 0x128 ; [0x10] -> 0x24f8c 00024e86 01 3e | > | .CONST 0x13e ; [0x11] -> 0x24fa2 00024e88 01 4c | L | .CONST 0x14c ; [0x12] -> 0x24fb0 00024e8a 01 4e | N | .CONST 0x14e ; [0x13] -> 0x24fb2 00024e8c 01 50 | P | .CONST 0x150 ; [0x14] -> 0x24fb4 00024e8e switch@0x24e5c[0x0]: 00024e8e 7c 00 || | MOVEQ.L #0x00,D6 00024e90 2a 2e 00 08 |*. | MOVE.L (A6+0x8),D5 00024e94 60 00 01 48 |` H | BRA 0x24fde 00024e98 switch@0x24e5c[0x1]: 00024e98 59 4f |YO | SUBQ.L #0x4,A7 00024e9a 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 00024e9e 2f 12 |/ | MOVE.L (A2),-(A7) 00024ea0 4e ba f8 80 |N | JSR 0x24722 00024ea4 50 4f |PO | ADDQ.L #0x8,A7 00024ea6 2c 1f |, | MOVE.L (A7)+,D6 00024ea8 60 00 01 34 |` 4 | BRA 0x24fde 00024eac switch@0x24e5c[0x2]: 00024eac 2f 2e ff d8 |/. | MOVE.L (A6-0x28),-(A7) 00024eb0 2f 06 |/ | MOVE.L D6,-(A7) 00024eb2 2f 06 |/ | MOVE.L D6,-(A7) 00024eb4 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024eb8 4e ba f8 e4 |N | JSR 0x2479e 00024ebc de fc 00 10 | | ADDA.W #0x10,A7 00024ec0 60 00 01 78 |` x | BRA 0x2503a 00024ec4 60 00 01 18 |` | .XXX[0x4] 00024ec8 switch@0x24e5c[0x3]: 00024ec8 60 00 01 14 |` | BRA 0x24fde 00024ecc switch@0x24e5c[0x4]: 00024ecc 2f 2e ff d8 |/. | MOVE.L (A6-0x28),-(A7) 00024ed0 2f 06 |/ | MOVE.L D6,-(A7) 00024ed2 2f 05 |/ | MOVE.L D5,-(A7) 00024ed4 60 de |` | BRA 0x24eb4 00024ed6 60 00 |` | .XXX[0x2] 00024ed8 01 06 | | .XXX[0x2] 00024eda switch@0x24e5c[0x5]: 00024eda 59 4f |YO | SUBQ.L #0x4,A7 00024edc 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 00024ee0 2f 12 |/ | MOVE.L (A2),-(A7) 00024ee2 4e ba f8 3e |N > | JSR 0x24722 00024ee6 50 4f |PO | ADDQ.L #0x8,A7 00024ee8 2a 1f |* | MOVE.L (A7)+,D5 00024eea 60 00 00 f2 |` | BRA 0x24fde 00024eee switch@0x24e5c[0x6]: 00024eee 7c 01 || | MOVEQ.L #0x01,D6 00024ef0 60 00 00 ec |` | BRA 0x24fde 00024ef4 switch@0x24e5c[0x7]: 00024ef4 60 e4 |` | BRA switch@0x24e5c[0x5] 00024ef6 switch@0x24e5c[0x8]: 00024ef6 51 4f |QO | SUBQ.L #0x8,A7 00024ef8 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024efc 2f 06 |/ | MOVE.L D6,-(A7) 00024efe 4e ba db ac |N | JSR 0x22aac 00024f02 50 4f |PO | ADDQ.L #0x8,A7 00024f04 26 9f |& | MOVE.L (A7)+,(A3) 00024f06 28 9f |( | MOVE.L (A7)+,(A4) 00024f08 60 00 00 d4 |` | BRA 0x24fde 00024f0c switch@0x24e5c[0x9]: 00024f0c 2d 52 ff e4 |-R | MOVE.L (A2),(A6-0x1c) 00024f10 2d 6e ff f0 ff e8 |-n | MOVE.L (A6-0x10),(A6-0x18) 00024f16 60 00 00 c6 |` | BRA 0x24fde 00024f1a switch@0x24e5c[0xa]: 00024f1a 2f 11 |/ | MOVE.L (A1),-(A7) 00024f1c 2f 14 |/ | MOVE.L (A4),-(A7) 00024f1e 2f 13 |/ | MOVE.L (A3),-(A7) 00024f20 2f 2e ff e8 |/. | MOVE.L (A6-0x18),-(A7) 00024f24 2f 2e ff e4 |/. | MOVE.L (A6-0x1c),-(A7) 00024f28 4e ba fb 26 |N & | JSR 0x24a50 00024f2c de c2 | | ADDA.W D2,A7 00024f2e 60 00 00 ae |` | BRA 0x24fde 00024f32 switch@0x24e5c[0xb]: 00024f32 2f 11 |/ | MOVE.L (A1),-(A7) 00024f34 2f 14 |/ | MOVE.L (A4),-(A7) 00024f36 2f 13 |/ | MOVE.L (A3),-(A7) 00024f38 2f 2e ff e8 |/. | MOVE.L (A6-0x18),-(A7) 00024f3c 2f 2e ff e4 |/. | MOVE.L (A6-0x1c),-(A7) 00024f40 4e ba fa 7a |N z | JSR 0x249bc 00024f44 60 e6 |` | BRA 0x24f2c 00024f46 switch@0x24e5c[0xc]: 00024f46 2f 11 |/ | MOVE.L (A1),-(A7) 00024f48 2f 14 |/ | MOVE.L (A4),-(A7) 00024f4a 2f 13 |/ | MOVE.L (A3),-(A7) 00024f4c 4e ba fb b8 |N | JSR 0x24b06 00024f50 de fc 00 0c | | ADDA.W #0xc,A7 00024f54 7e 01 |~ | MOVEQ.L #0x01,D7 00024f56 60 00 00 86 |` | BRA 0x24fde 00024f5a switch@0x24e5c[0xd]: 00024f5a 2f 11 |/ | MOVE.L (A1),-(A7) 00024f5c 2f 14 |/ | MOVE.L (A4),-(A7) 00024f5e 2f 13 |/ | MOVE.L (A3),-(A7) 00024f60 2f 2e ff e8 |/. | MOVE.L (A6-0x18),-(A7) 00024f64 2f 2e ff e4 |/. | MOVE.L (A6-0x1c),-(A7) 00024f68 4e ba fa 52 |N R | JSR 0x249bc 00024f6c de c2 | | ADDA.W D2,A7 00024f6e 60 e4 |` | BRA 0x24f54 00024f70 switch@0x24e5c[0xe]: 00024f70 60 e2 |` | BRA 0x24f54 00024f72 switch@0x24e5c[0xf]: 00024f72 2f 11 |/ | MOVE.L (A1),-(A7) 00024f74 51 4f |QO | SUBQ.L #0x8,A7 00024f76 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024f7a 2f 06 |/ | MOVE.L D6,-(A7) 00024f7c 4e ba db 2e |N . | JSR 0x22aac 00024f80 50 4f |PO | ADDQ.L #0x8,A7 00024f82 4e ba fb 82 |N | JSR 0x24b06 00024f86 de fc 00 0c | | ADDA.W #0xc,A7 00024f8a 60 52 |`R | BRA 0x24fde 00024f8c switch@0x24e5c[0x10]: 00024f8c 2f 11 |/ | MOVE.L (A1),-(A7) 00024f8e 51 4f |QO | SUBQ.L #0x8,A7 00024f90 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024f94 2f 06 |/ | MOVE.L D6,-(A7) 00024f96 4e ba db 14 |N | JSR 0x22aac 00024f9a 50 4f |PO | ADDQ.L #0x8,A7 00024f9c 4e ba fb ee |N | JSR 0x24b8c 00024fa0 60 ae |` | BRA 0x24f50 00024fa2 switch@0x24e5c[0x11]: 00024fa2 2f 11 |/ | MOVE.L (A1),-(A7) 00024fa4 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 00024fa8 2f 12 |/ | MOVE.L (A2),-(A7) 00024faa 4e ba fc 50 |N P | JSR 0x24bfc 00024fae 60 d6 |` | BRA 0x24f86 00024fb0 switch@0x24e5c[0x12]: 00024fb0 60 2c |`, | BRA 0x24fde 00024fb2 switch@0x24e5c[0x13]: 00024fb2 60 a0 |` | BRA 0x24f54 00024fb4 switch@0x24e5c[0x14]: 00024fb4 41 fa cb b6 |A | LEA.L 0x21b6c,A0 00024fb8 70 05 |p | MOVEQ.L #0x05,D0 00024fba 2f 20 |/ | MOVE.L -(A0),-(A7) 00024fbc 51 c8 ff fc |Q | DBF D0,0x24fba 00024fc0 59 4f |YO | SUBQ.L #0x4,A7 00024fc2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024fc6 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00024fca 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00024fce 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024fd4 50 4f |PO | ADDQ.L #0x8,A7 00024fd6 4e ba ce 8a |N | JSR 0x21e62 00024fda de fc 00 1c | | ADDA.W #0x1c,A7 00024fde 4a 07 |J | TST.B D7 00024fe0 66 46 |fF | BNE 0x25028 00024fe2 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00024fe6 48 52 |HR | PEA.L (A2) 00024fe8 4e ba fc 5a |N Z | JSR 0x24c44 00024fec 50 4f |PO | ADDQ.L #0x8,A7 00024fee 20 2e ff cc | . | MOVE.L (A6-0x34),D0 00024ff2 0c 80 00 00 00 13 | | CMPI.L #0x00000013,D0 00024ff8 63 02 |c | BLS 0x24ffc 00024ffa 4e 4f |NO | TRAP #15 00024ffc 28 00 |( | MOVE.L D0,D4 00024ffe 76 07 |v | MOVEQ.L #0x07,D3 00025000 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00025006 41 fa cd 8c |A | LEA.L 0x21d94,A0 0002500a 20 2e ff f4 | . | MOVE.L (A6-0xc),D0 0002500e 0c 80 00 00 00 06 | | CMPI.L #0x00000006,D0 00025014 63 02 |c | BLS 0x25018 00025016 4e 4f |NO | TRAP #15 00025018 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0 0002501c 12 30 08 00 | 0 | MOVE.B (A0+D0.L),D1 00025020 48 81 |H | EXTB.W D1 00025022 48 c1 |H | EXTW.L D1 00025024 2d 41 ff cc |-A | MOVE.L D1,(A6-0x34) 00025028 4a 07 |J | TST.B D7 0002502a 67 00 fe 24 |g $ | BEQ 0x24e50 0002502e 2f 2e ff d8 |/. | MOVE.L (A6-0x28),-(A7) 00025032 2f 11 |/ | MOVE.L (A1),-(A7) 00025034 4e ba fd 48 |N H | JSR 0x24d7e 00025038 50 4f |PO | ADDQ.L #0x8,A7 0002503a 48 51 |HQ | PEA.L (A1) 0002503c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00025042 58 4f |XO | ADDQ.L #0x4,A7 00025044 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00025048 4e 5e |N^ | UNLK A6 0002504a 4e 75 |Nu | RTS 0002504c ; -------------------------------------------------------------------------------------- 0002504c ; OMSI PASCAL Function 0002504c ; <LVAR 0x014 4(rw)> 0002504c ; <LVAR 0x010 4(r)> 0002504c ; <LVAR 0x00c 4(r)> 0002504c ; <LVAR 0x008 4(r)> 0002504c ; <LVAR -0x008 4(rw)> 0002504c ; <LVAR -0x00c 4(rw)> 0002504c ; <LVAR -0x018 4(w)> 0002504c ; -------------------------------------------------------------------------------------- 0002504c 4e 56 ff 96 |NV | LINK.W A6,#0xff96 00025050 bf d5 | | CMPA.L (A5),A7 00025052 62 06 |b | BHI 0x2505a 00025054 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025058 4e 76 |Nv | TRAPV 0002505a de fc 00 52 | R | ADDA.W #0x52,A7 0002505e 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00025062 43 ee ff f8 |C | LEA.L (A6-0x8),A1 00025066 45 ee 00 10 |E | LEA.L (A6+0x10),A2 0002506a 47 ee 00 0c |G | LEA.L (A6+0xc),A3 0002506e 49 ee ff f4 |I | LEA.L (A6-0xc),A4 00025072 74 0c |t | MOVEQ.L #0x0c,D2 00025074 42 ae 00 14 |B | CLR.L (A6+0x14) 00025078 59 4f |YO | SUBQ.L #0x4,A7 0002507a 2f 12 |/ | MOVE.L (A2),-(A7) 0002507c 2f 13 |/ | MOVE.L (A3),-(A7) 0002507e 4e ba d9 f4 |N | JSR 0x22a74 00025082 50 4f |PO | ADDQ.L #0x8,A7 00025084 28 9f |( | MOVE.L (A7)+,(A4) 00025086 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002508a 30 10 |0 | MOVE.W (A0),D0 0002508c 48 c0 |H | EXTW.L D0 0002508e 52 80 |R | ADDQ.L #0x1,D0 00025090 22 80 |" | MOVE.L D0,(A1) 00025092 44 80 |D | NEG.L D0 00025094 d0 94 | | ADD.L (A4),D0 00025096 52 80 |R | ADDQ.L #0x1,D0 00025098 2f 00 |/ | MOVE.L D0,-(A7) 0002509a 70 01 |p | MOVEQ.L #0x01,D0 0002509c b0 97 | | CMP.L (A7),D0 0002509e 6e 00 00 9a |n | BGT 0x2513a 000250a2 2d 40 ff e8 |-@ | MOVE.L D0,(A6-0x18) 000250a6 2f 00 |/ | MOVE.L D0,-(A7) 000250a8 7c 00 || | MOVEQ.L #0x00,D6 000250aa 2f 11 |/ | MOVE.L (A1),-(A7) 000250ac 7a 01 |z | MOVEQ.L #0x01,D5 000250ae ba 97 | | CMP.L (A7),D5 000250b0 6e 48 |nH | BGT 0x250fa 000250b2 0c 85 00 00 00 01 | | CMPI.L #0x00000001,D5 000250b8 66 04 |f | BNE 0x250be 000250ba 7e 2f |~/ | MOVEQ.L #0x2f,D7 000250bc 60 18 |` | BRA 0x250d6 000250be 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000250c2 20 05 | | MOVE.L D5,D0 000250c4 53 80 |S | SUBQ.L #0x1,D0 000250c6 53 80 |S | SUBQ.L #0x1,D0 000250c8 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 000250ce 63 02 |c | BLS 0x250d2 000250d0 4e 4f |NO | TRAP #15 000250d2 1e 30 08 02 | 0 | MOVE.B (A0+D0.L+#0x2),D7 000250d6 55 4f |UO | SUBQ.L #0x2,A7 000250d8 2f 12 |/ | MOVE.L (A2),-(A7) 000250da 2f 13 |/ | MOVE.L (A3),-(A7) 000250dc 20 2f 00 0e | / | MOVE.L (A7+0xe),D0 000250e0 d0 85 | | ADD.L D5,D0 000250e2 53 80 |S | SUBQ.L #0x1,D0 000250e4 2f 00 |/ | MOVE.L D0,-(A7) 000250e6 4e ba f5 fa |N | JSR 0x246e2 000250ea de c2 | | ADDA.W D2,A7 000250ec be 1f | | CMP.B (A7)+,D7 000250ee 67 04 |g | BEQ 0x250f4 000250f0 58 4f |XO | ADDQ.L #0x4,A7 000250f2 60 08 |` | BRA 0x250fc 000250f4 2c 05 |, | MOVE.L D5,D6 000250f6 52 85 |R | ADDQ.L #0x1,D5 000250f8 68 b4 |h | BVC 0x250ae 000250fa 58 4f |XO | ADDQ.L #0x4,A7 000250fc bc 91 | | CMP.L (A1),D6 000250fe 66 32 |f2 | BNE 0x25132 00025100 20 17 | | MOVE.L (A7),D0 00025102 22 00 |" | MOVE.L D0,D1 00025104 d2 91 | | ADD.L (A1),D1 00025106 b2 94 | | CMP.L (A4),D1 00025108 6c 26 |l& | BGE 0x25130 0002510a 55 4f |UO | SUBQ.L #0x2,A7 0002510c 2f 12 |/ | MOVE.L (A2),-(A7) 0002510e 2f 13 |/ | MOVE.L (A3),-(A7) 00025110 2f 01 |/ | MOVE.L D1,-(A7) 00025112 4e ba f5 ce |N | JSR 0x246e2 00025116 de c2 | | ADDA.W D2,A7 00025118 1e 1f | | MOVE.B (A7)+,D7 0002511a 0c 07 00 2f | / | CMPI.B #0x2f,D7 0002511e 67 06 |g | BEQ 0x25126 00025120 0c 07 00 3d | = | CMPI.B #0x3d,D7 00025124 66 08 |f | BNE 0x2512e 00025126 2d 40 00 14 |-@ | MOVE.L D0,(A6+0x14) 0002512a 50 4f |PO | ADDQ.L #0x8,A7 0002512c 60 0e |` | BRA 0x2513c 0002512e 60 02 |` | BRA 0x25132 00025130 60 f4 |` | BRA 0x25126 00025132 20 1f | | MOVE.L (A7)+,D0 00025134 52 80 |R | ADDQ.L #0x1,D0 00025136 68 00 ff 64 |h d | BVC 0x2509c 0002513a 58 4f |XO | ADDQ.L #0x4,A7 0002513c 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 00025140 4e 5e |N^ | UNLK A6 00025142 4e 75 |Nu | RTS 00025144 ; -------------------------------------------------------------------------------------- 00025144 ; OMSI PASCAL Function 00025144 ; <LVAR 0x018 4(r)> 00025144 ; <LVAR 0x014 4(r)> 00025144 ; <LVAR 0x010 4(r)> 00025144 ; <LVAR 0x00c 4(r)> 00025144 ; <LVAR 0x008 4(r)> 00025144 ; <LVAR -0x008 4(rw)> 00025144 ; <LVAR -0x014 4(rw)> 00025144 ; <LVAR -0x018 4(rw)> 00025144 ; <LVAR -0x01c 4(rw)> 00025144 ; -------------------------------------------------------------------------------------- 00025144 4e 56 ff 8e |NV | LINK.W A6,#0xff8e 00025148 bf d5 | | CMPA.L (A5),A7 0002514a 62 06 |b | BHI 0x25152 0002514c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025150 4e 76 |Nv | TRAPV 00025152 de fc 00 56 | V | ADDA.W #0x56,A7 00025156 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 0002515a 45 ee ff e4 |E | LEA.L (A6-0x1c),A2 0002515e 47 ee ff e8 |G | LEA.L (A6-0x18),A3 00025162 49 ee ff f8 |I | LEA.L (A6-0x8),A4 00025166 72 0c |r | MOVEQ.L #0x0c,D1 00025168 74 01 |t | MOVEQ.L #0x01,D2 0002516a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002516e 42 10 |B | CLR.B (A0) 00025170 22 6e 00 0c |"n | MOVEA.L (A6+0xc),A1 00025174 22 82 |" | MOVE.L D2,(A1) 00025176 51 4f |QO | SUBQ.L #0x8,A7 00025178 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 0002517c 2f 2e 00 14 |/. | MOVE.L (A6+0x14),-(A7) 00025180 4e ba d9 2a |N * | JSR 0x22aac 00025184 50 4f |PO | ADDQ.L #0x8,A7 00025186 24 9f |$ | MOVE.L (A7)+,(A2) 00025188 26 9f |& | MOVE.L (A7)+,(A3) 0002518a 4a 92 |J | TST.L (A2) 0002518c 67 00 00 96 |g | BEQ 0x25224 00025190 59 4f |YO | SUBQ.L #0x4,A7 00025192 2f 13 |/ | MOVE.L (A3),-(A7) 00025194 2f 12 |/ | MOVE.L (A2),-(A7) 00025196 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 0002519a 4e ba fe b0 |N | JSR 0x2504c 0002519e de c1 | | ADDA.W D1,A7 000251a0 2d 5f ff ec |-_ | MOVE.L (A7)+,(A6-0x14) 000251a4 67 7e |g~ | BEQ 0x25224 000251a6 10 82 | | MOVE.B D2,(A0) 000251a8 48 51 |HQ | PEA.L (A1) 000251aa 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000251b0 2f 13 |/ | MOVE.L (A3),-(A7) 000251b2 2f 12 |/ | MOVE.L (A2),-(A7) 000251b4 4e ba d8 be |N | JSR 0x22a74 000251b8 50 4f |PO | ADDQ.L #0x8,A7 000251ba 28 9f |( | MOVE.L (A7)+,(A4) 000251bc 20 2e ff ec | . | MOVE.L (A6-0x14),D0 000251c0 52 80 |R | ADDQ.L #0x1,D0 000251c2 2f 14 |/ | MOVE.L (A4),-(A7) 000251c4 2a 00 |* | MOVE.L D0,D5 000251c6 ba 97 | | CMP.L (A7),D5 000251c8 6e 58 |nX | BGT 0x25222 000251ca 55 4f |UO | SUBQ.L #0x2,A7 000251cc 2f 13 |/ | MOVE.L (A3),-(A7) 000251ce 2f 12 |/ | MOVE.L (A2),-(A7) 000251d0 2f 05 |/ | MOVE.L D5,-(A7) 000251d2 4e ba f5 0e |N | JSR 0x246e2 000251d6 de c1 | | ADDA.W D1,A7 000251d8 10 1f | | MOVE.B (A7)+,D0 000251da 0c 00 00 3d | = | CMPI.B #0x3d,D0 000251de 66 3e |f> | BNE 0x2521e 000251e0 20 05 | | MOVE.L D5,D0 000251e2 52 80 |R | ADDQ.L #0x1,D0 000251e4 2f 14 |/ | MOVE.L (A4),-(A7) 000251e6 2e 00 |. | MOVE.L D0,D7 000251e8 be 97 | | CMP.L (A7),D7 000251ea 6e 2e |n. | BGT 0x2521a 000251ec 55 4f |UO | SUBQ.L #0x2,A7 000251ee 2f 13 |/ | MOVE.L (A3),-(A7) 000251f0 2f 12 |/ | MOVE.L (A2),-(A7) 000251f2 2f 07 |/ | MOVE.L D7,-(A7) 000251f4 4e ba f4 ec |N | JSR 0x246e2 000251f8 de c1 | | ADDA.W D1,A7 000251fa 1c 1f | | MOVE.B (A7)+,D6 000251fc 0c 06 00 2f | / | CMPI.B #0x2f,D6 00025200 66 04 |f | BNE 0x25206 00025202 50 4f |PO | ADDQ.L #0x8,A7 00025204 60 1e |` | BRA 0x25224 00025206 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 0002520a 2f 10 |/ | MOVE.L (A0),-(A7) 0002520c 1f 06 | | MOVE.B D6,-(A7) 0002520e 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00025214 5c 4f |\O | ADDQ.L #0x6,A7 00025216 52 87 |R | ADDQ.L #0x1,D7 00025218 68 ce |h | BVC 0x251e8 0002521a 50 4f |PO | ADDQ.L #0x8,A7 0002521c 60 06 |` | BRA 0x25224 0002521e 52 85 |R | ADDQ.L #0x1,D5 00025220 68 a4 |h | BVC 0x251c6 00025222 58 4f |XO | ADDQ.L #0x4,A7 00025224 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 00025228 4e 5e |N^ | UNLK A6 0002522a 4e 75 |Nu | RTS 0002522c ; -------------------------------------------------------------------------------------- 0002522c ; OMSI PASCAL Function 0002522c ; <LVAR 0x00c @ 4(r)> 0002522c ; <LVAR 0x008 4(r)> 0002522c ; <LVAR -0x010 @ 1(r)> 0002522c ; -------------------------------------------------------------------------------------- 0002522c 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 00025230 bf d5 | | CMPA.L (A5),A7 00025232 62 06 |b | BHI 0x2523a 00025234 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025238 4e 76 |Nv | TRAPV 0002523a de fc 00 30 | 0 | ADDA.W #0x30,A7 0002523e 48 e7 87 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D0,-(A7) 00025242 43 f9 00 02 7a 08 |C z | LEA.L 0x27a08,A1 00025248 45 ee 00 08 |E | LEA.L (A6+0x8),A2 0002524c 47 ee 00 0c |G | LEA.L (A6+0xc),A3 00025250 2f 13 |/ | MOVE.L (A3),-(A7) 00025252 2f 12 |/ | MOVE.L (A2),-(A7) 00025254 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00025258 4e b9 00 02 15 8a |N | JSR 0x2158a 0002525e de fc 00 0c | | ADDA.W #0xc,A7 00025262 4a 2e ff f0 |J. | TST.B (A6-0x10) 00025266 66 50 |fP | BNE 0x252b8 00025268 2e 11 |. | MOVE.L (A1),D7 0002526a 59 4f |YO | SUBQ.L #0x4,A7 0002526c 2f 12 |/ | MOVE.L (A2),-(A7) 0002526e 4e ba cf fe |N | JSR 0x2226e 00025272 58 4f |XO | ADDQ.L #0x4,A7 00025274 2c 1f |, | MOVE.L (A7)+,D6 00025276 2f 13 |/ | MOVE.L (A3),-(A7) 00025278 2f 12 |/ | MOVE.L (A2),-(A7) 0002527a 4e ba f3 2a |N * | JSR 0x245a6 0002527e 50 4f |PO | ADDQ.L #0x8,A7 00025280 2a 11 |* | MOVE.L (A1),D5 00025282 20 07 | | MOVE.L D7,D0 00025284 53 80 |S | SUBQ.L #0x1,D0 00025286 0c 80 00 00 1f ff | | CMPI.L #0x00001fff,D0 0002528c 63 02 |c | BLS 0x25290 0002528e 4e 4f |NO | TRAP #15 00025290 41 f9 00 02 5a 00 |A Z | LEA.L 0x25a00,A0 00025296 10 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D0 0002529a 0c 00 00 25 | % | CMPI.B #0x25,D0 0002529e 66 0c |f | BNE 0x252ac 000252a0 22 87 |" | MOVE.L D7,(A1) 000252a2 2f 12 |/ | MOVE.L (A2),-(A7) 000252a4 2f 06 |/ | MOVE.L D6,-(A7) 000252a6 4e ba fb 5c |N \ | JSR 0x24e04 000252aa 50 4f |PO | ADDQ.L #0x8,A7 000252ac 52 87 |R | ADDQ.L #0x1,D7 000252ae be b9 00 02 7a 0c | z | CMP.L 0x27a0c,D7 000252b4 6f cc |o | BLE 0x25282 000252b6 22 85 |" | MOVE.L D5,(A1) 000252b8 48 53 |HS | PEA.L (A3) 000252ba 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000252c0 58 4f |XO | ADDQ.L #0x4,A7 000252c2 4c df 0f e1 |L | MOVEM.L (A7)+,D0+D5+D6+D7+A0+A1+A2+A3 000252c6 4e 5e |N^ | UNLK A6 000252c8 4e 75 |Nu | RTS 000252ca ; -------------------------------------------------------------------------------------- 000252ca ; OMSI PASCAL Function 000252ca ; <LVAR -0x006 @ 4(r)> 000252ca ; <LVAR -0x00a @ 4(rw)> 000252ca ; <LVAR -0x00b 1(w)> 000252ca ; <LVAR -0x00c @ 1(r)> 000252ca ; -------------------------------------------------------------------------------------- 000252ca 4e 56 ff 94 |NV | LINK.W A6,#0xff94 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 54 | T | ADDA.W #0x54,A7 000252dc 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000252e0 45 ee ff fa |E | LEA.L (A6-0x6),A2 000252e4 47 f9 00 02 7a 08 |G z | LEA.L 0x27a08,A3 000252ea 49 ee ff f6 |I | LEA.L (A6-0xa),A4 000252ee 2e 13 |. | MOVE.L (A3),D7 000252f0 48 52 |HR | PEA.L (A2) 000252f2 48 6e ff f4 |Hn | PEA.L (A6-0xc) 000252f6 4e ba ce ca |N | JSR 0x221c2 000252fa 50 4f |PO | ADDQ.L #0x8,A7 000252fc 2c 13 |, | MOVE.L (A3),D6 000252fe 59 4f |YO | SUBQ.L #0x4,A7 00025300 2f 12 |/ | MOVE.L (A2),-(A7) 00025302 4e ba cf 6a |N j | JSR 0x2226e 00025306 58 4f |XO | ADDQ.L #0x4,A7 00025308 20 1f | | MOVE.L (A7)+,D0 0002530a 0c 80 ff ff ff ff | | CMPI.L #0xffffffff,D0 00025310 67 00 02 b8 |g | BEQ 0x255ca 00025314 59 4f |YO | SUBQ.L #0x4,A7 00025316 2f 12 |/ | MOVE.L (A2),-(A7) 00025318 48 78 00 00 |Hx | PEA.L 0x0 0002531c 4e ba d8 6c |N l | JSR 0x22b8a 00025320 50 4f |PO | ADDQ.L #0x8,A7 00025322 28 97 |( | MOVE.L (A7),(A4) 00025324 54 4f |TO | ADDQ.L #0x2,A7 00025326 2f 14 |/ | MOVE.L (A4),-(A7) 00025328 4e ba f1 c4 |N | JSR 0x244ee 0002532c 58 4f |XO | ADDQ.L #0x4,A7 0002532e 10 1f | | MOVE.B (A7)+,D0 00025330 48 80 |H | EXTB.W D0 00025332 41 bc 00 2c |A , | CHK.W #0x2c,D0 00025336 1d 40 ff f5 | @ | MOVE.B D0,(A6-0xb) 0002533a 4a 00 |J | TST.B D0 0002533c 66 0e |f | BNE 0x2534c 0002533e 2f 14 |/ | MOVE.L (A4),-(A7) 00025340 2f 12 |/ | MOVE.L (A2),-(A7) 00025342 4e ba fe e8 |N | JSR 0x2522c 00025346 50 4f |PO | ADDQ.L #0x8,A7 00025348 60 00 02 78 |` x | BRA 0x255c2 0002534c 48 54 |HT | PEA.L (A4) 0002534e 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00025354 58 4f |XO | ADDQ.L #0x4,A7 00025356 12 00 | | MOVE.B D0,D1 00025358 48 81 |H | EXTB.W D1 0002535a 43 bc 00 2c |C , | CHK.W #0x2c,D1 0002535e 41 fa ca 03 |A | LEA.L 0x21d63,A0 00025362 30 01 |0 | MOVE.W D1,D0 00025364 48 c0 |H | EXTW.L D0 00025366 24 00 |$ | MOVE.L D0,D2 00025368 e2 9a | | ROR.L #0x1,D2 0002536a d0 c2 | | ADDA.W D2,A0 0002536c 48 42 |HB | SWAP.W D2 0002536e e7 5a | Z | ROL.W #0x3,D2 00025370 42 83 |B | CLR.L D3 00025372 16 10 | | MOVE.B (A0),D3 00025374 e5 2b | + | LSL.B D2,D3 00025376 e8 0b | | LSR.B #0x4,D3 00025378 2a 03 |* | MOVE.L D3,D5 0002537a 0c 85 00 00 00 0f | | CMPI.L #0x0000000f,D5 00025380 67 2c |g, | BEQ 0x253ae 00025382 28 00 |( | MOVE.L D0,D4 00025384 76 0a |v | MOVEQ.L #0x0a,D3 00025386 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 0002538c 41 fa c7 fc |A | LEA.L COMMAND_TABLE_21b8a,A0 00025390 9e fc 00 0a | | SUBA.W #0xa,A7 00025394 22 4f |"O | MOVEA.L A7,A1 00025396 41 f0 40 00 |A @ | LEA.L (A0+D4.W),A0 0002539a 70 09 |p | MOVEQ.L #0x09,D0 0002539c 12 d8 | | MOVE.B (A0)+,(A1)+ 0002539e 51 c8 ff fc |Q | DBF D0,0x2539c 000253a2 2f 12 |/ | MOVE.L (A2),-(A7) 000253a4 2f 05 |/ | MOVE.L D5,-(A7) 000253a6 4e ba ce fc |N | JSR 0x222a4 000253aa de fc 00 12 | | ADDA.W #0x12,A7 000253ae 53 41 |SA | SUBQ.W #0x1,D1 000253b0 0c 41 00 2b | A + | CMPI.W #0x002b,D1 000253b4 63 02 |c | BLS 0x253b8 000253b6 4e 4e |NN | TRAP #14 000253b8 d2 41 | A | ADD.W D1,D1 000253ba 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W 000253c2 00 58 | X | .CONST 0x58 ; [0x0] -> 0x2541a 000253c4 00 64 | d | .CONST 0x64 ; [0x1] -> 0x25426 000253c6 00 76 | v | .CONST 0x76 ; [0x2] -> 0x25438 000253c8 00 84 | | .CONST 0x84 ; [0x3] -> 0x25446 000253ca 01 f2 | | .CONST 0x1f2 ; [0x4] -> 0x255b4 000253cc 00 8c | | .CONST 0x8c ; [0x5] -> 0x2544e 000253ce 00 90 | | .CONST 0x90 ; [0x6] -> 0x25452 000253d0 00 98 | | .CONST 0x98 ; [0x7] -> 0x2545a 000253d2 00 a0 | | .CONST 0xa0 ; [0x8] -> 0x25462 000253d4 00 a8 | | .CONST 0xa8 ; [0x9] -> 0x2546a 000253d6 00 b0 | | .CONST 0xb0 ; [0xa] -> 0x25472 000253d8 00 b8 | | .CONST 0xb8 ; [0xb] -> 0x2547a 000253da 00 c0 | | .CONST 0xc0 ; [0xc] -> 0x25482 000253dc 00 c8 | | .CONST 0xc8 ; [0xd] -> 0x2548a 000253de 00 d0 | | .CONST 0xd0 ; [0xe] -> 0x25492 000253e0 00 d8 | | .CONST 0xd8 ; [0xf] -> 0x2549a 000253e2 00 e2 | | .CONST 0xe2 ; [0x10] -> 0x254a4 000253e4 00 ec | | .CONST 0xec ; [0x11] -> 0x254ae 000253e6 00 f6 | | .CONST 0xf6 ; [0x12] -> 0x254b8 000253e8 01 00 | | .CONST 0x100 ; [0x13] -> 0x254c2 000253ea 01 0a | | .CONST 0x10a ; [0x14] -> 0x254cc 000253ec 01 14 | | .CONST 0x114 ; [0x15] -> 0x254d6 000253ee 01 1e | | .CONST 0x11e ; [0x16] -> 0x254e0 000253f0 01 28 | ( | .CONST 0x128 ; [0x17] -> 0x254ea 000253f2 01 32 | 2 | .CONST 0x132 ; [0x18] -> 0x254f4 000253f4 01 3c | < | .CONST 0x13c ; [0x19] -> 0x254fe 000253f6 01 46 | F | .CONST 0x146 ; [0x1a] -> 0x25508 000253f8 01 50 | P | .CONST 0x150 ; [0x1b] -> 0x25512 000253fa 01 5a | Z | .CONST 0x15a ; [0x1c] -> 0x2551c 000253fc 01 64 | d | .CONST 0x164 ; [0x1d] -> 0x25526 000253fe 01 6e | n | .CONST 0x16e ; [0x1e] -> 0x25530 00025400 01 78 | x | .CONST 0x178 ; [0x1f] -> 0x2553a 00025402 01 82 | | .CONST 0x182 ; [0x20] -> 0x25544 00025404 01 8c | | .CONST 0x18c ; [0x21] -> 0x2554e 00025406 01 96 | | .CONST 0x196 ; [0x22] -> 0x25558 00025408 01 a0 | | .CONST 0x1a0 ; [0x23] -> 0x25562 0002540a 01 aa | | .CONST 0x1aa ; [0x24] -> 0x2556c 0002540c 01 b4 | | .CONST 0x1b4 ; [0x25] -> 0x25576 0002540e 01 ba | | .CONST 0x1ba ; [0x26] -> 0x2557c 00025410 01 c4 | | .CONST 0x1c4 ; [0x27] -> 0x25586 00025412 01 ce | | .CONST 0x1ce ; [0x28] -> 0x25590 00025414 01 d8 | | .CONST 0x1d8 ; [0x29] -> 0x2559a 00025416 01 de | | .CONST 0x1de ; [0x2a] -> 0x255a0 00025418 01 e8 | | .CONST 0x1e8 ; [0x2b] -> 0x255aa 0002541a switch@0x253ba[0x0]: 0002541a 2f 12 |/ | MOVE.L (A2),-(A7) 0002541c 4e ba d8 f4 |N | JSR 0x22d12 00025420 58 4f |XO | ADDQ.L #0x4,A7 00025422 60 00 01 9e |` | BRA 0x255c2 00025426 switch@0x253ba[0x1]: 00025426 42 27 |B' | CLR.B -(A7) 00025428 48 78 00 01 |Hx | PEA.L 0x1 0002542c 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00025432 5c 4f |\O | ADDQ.L #0x6,A7 00025434 60 00 01 8c |` | BRA 0x255c2 00025438 switch@0x253ba[0x2]: 00025438 59 4f |YO | SUBQ.L #0x4,A7 0002543a 4e b9 00 01 02 ac |N | JSR FSCALL_102ac 00025440 4e ba d8 a6 |N | JSR 0x22ce8 00025444 60 da |` | BRA 0x25420 00025446 switch@0x253ba[0x3]: 00025446 2f 12 |/ | MOVE.L (A2),-(A7) 00025448 4e ba da a2 |N | JSR 0x22eec 0002544c 60 d2 |` | BRA 0x25420 0002544e switch@0x253ba[0x5]: 0002544e 60 00 01 72 |` r | BRA 0x255c2 00025452 switch@0x253ba[0x6]: 00025452 2f 12 |/ | MOVE.L (A2),-(A7) 00025454 4e ba dd bc |N | JSR 0x23212 00025458 60 c6 |` | BRA 0x25420 0002545a switch@0x253ba[0x7]: 0002545a 2f 12 |/ | MOVE.L (A2),-(A7) 0002545c 4e ba df 20 |N | JSR 0x2337e 00025460 60 be |` | BRA 0x25420 00025462 switch@0x253ba[0x8]: 00025462 2f 12 |/ | MOVE.L (A2),-(A7) 00025464 4e ba e0 06 |N | JSR 0x2346c 00025468 60 b6 |` | BRA 0x25420 0002546a switch@0x253ba[0x9]: 0002546a 2f 12 |/ | MOVE.L (A2),-(A7) 0002546c 4e ba e3 f2 |N | JSR 0x23860 00025470 60 ae |` | BRA 0x25420 00025472 switch@0x253ba[0xa]: 00025472 2f 12 |/ | MOVE.L (A2),-(A7) 00025474 4e ba e4 62 |N b | JSR 0x238d8 00025478 60 a6 |` | BRA 0x25420 0002547a switch@0x253ba[0xb]: 0002547a 2f 12 |/ | MOVE.L (A2),-(A7) 0002547c 4e ba e4 d2 |N | JSR 0x23950 00025480 60 9e |` | BRA 0x25420 00025482 switch@0x253ba[0xc]: 00025482 2f 12 |/ | MOVE.L (A2),-(A7) 00025484 4e ba e4 f6 |N | JSR 0x2397c 00025488 60 96 |` | BRA 0x25420 0002548a switch@0x253ba[0xd]: 0002548a 2f 12 |/ | MOVE.L (A2),-(A7) 0002548c 4e ba e5 ee |N | JSR 0x23a7c 00025490 60 8e |` | BRA 0x25420 00025492 switch@0x253ba[0xe]: 00025492 2f 12 |/ | MOVE.L (A2),-(A7) 00025494 4e ba e6 cc |N | JSR 0x23b62 00025498 60 86 |` | BRA 0x25420 0002549a switch@0x253ba[0xf]: 0002549a 2f 12 |/ | MOVE.L (A2),-(A7) 0002549c 4e ba e6 f0 |N | JSR 0x23b8e 000254a0 60 00 ff 7e |` ~ | BRA 0x25420 000254a4 switch@0x253ba[0x10]: 000254a4 2f 12 |/ | MOVE.L (A2),-(A7) 000254a6 4e ba e7 32 |N 2 | JSR 0x23bda 000254aa 60 00 ff 74 |` t | BRA 0x25420 000254ae switch@0x253ba[0x11]: 000254ae 2f 12 |/ | MOVE.L (A2),-(A7) 000254b0 4e ba e7 74 |N t | JSR 0x23c26 000254b4 60 00 ff 6a |` j | BRA 0x25420 000254b8 switch@0x253ba[0x12]: 000254b8 2f 12 |/ | MOVE.L (A2),-(A7) 000254ba 4e ba e7 b6 |N | JSR 0x23c72 000254be 60 00 ff 60 |` ` | BRA 0x25420 000254c2 switch@0x253ba[0x13]: 000254c2 2f 12 |/ | MOVE.L (A2),-(A7) 000254c4 4e ba e7 f8 |N | JSR 0x23cbe 000254c8 60 00 ff 56 |` V | BRA 0x25420 000254cc switch@0x253ba[0x14]: 000254cc 2f 12 |/ | MOVE.L (A2),-(A7) 000254ce 4e ba e8 3a |N : | JSR 0x23d0a 000254d2 60 00 ff 4c |` L | BRA 0x25420 000254d6 switch@0x253ba[0x15]: 000254d6 2f 12 |/ | MOVE.L (A2),-(A7) 000254d8 4e ba e8 7c |N | | JSR 0x23d56 000254dc 60 00 ff 42 |` B | BRA 0x25420 000254e0 switch@0x253ba[0x16]: 000254e0 2f 12 |/ | MOVE.L (A2),-(A7) 000254e2 4e ba e8 bc |N | JSR 0x23da0 000254e6 60 00 ff 38 |` 8 | BRA 0x25420 000254ea switch@0x253ba[0x17]: 000254ea 2f 12 |/ | MOVE.L (A2),-(A7) 000254ec 4e ba e8 fc |N | JSR 0x23dea 000254f0 60 00 ff 2e |` . | BRA 0x25420 000254f4 switch@0x253ba[0x18]: 000254f4 2f 12 |/ | MOVE.L (A2),-(A7) 000254f6 4e ba e9 3c |N < | JSR 0x23e34 000254fa 60 00 ff 24 |` $ | BRA 0x25420 000254fe switch@0x253ba[0x19]: 000254fe 2f 12 |/ | MOVE.L (A2),-(A7) 00025500 4e ba e9 7c |N | | JSR 0x23e7e 00025504 60 00 ff 1a |` | BRA 0x25420 00025508 switch@0x253ba[0x1a]: 00025508 2f 12 |/ | MOVE.L (A2),-(A7) 0002550a 4e ba e9 bc |N | JSR 0x23ec8 0002550e 60 00 ff 10 |` | BRA 0x25420 00025512 switch@0x253ba[0x1b]: 00025512 2f 12 |/ | MOVE.L (A2),-(A7) 00025514 4e ba e9 fc |N | JSR 0x23f12 00025518 60 00 ff 06 |` | BRA 0x25420 0002551c switch@0x253ba[0x1c]: 0002551c 2f 12 |/ | MOVE.L (A2),-(A7) 0002551e 4e ba ea 3c |N < | JSR 0x23f5c 00025522 60 00 fe fc |` | BRA 0x25420 00025526 switch@0x253ba[0x1d]: 00025526 2f 12 |/ | MOVE.L (A2),-(A7) 00025528 4e ba ea 7c |N | | JSR 0x23fa6 0002552c 60 00 fe f2 |` | BRA 0x25420 00025530 switch@0x253ba[0x1e]: 00025530 2f 12 |/ | MOVE.L (A2),-(A7) 00025532 4e ba ea b6 |N | JSR 0x23fea 00025536 60 00 fe e8 |` | BRA 0x25420 0002553a switch@0x253ba[0x1f]: 0002553a 2f 12 |/ | MOVE.L (A2),-(A7) 0002553c 4e ba ea f2 |N | JSR 0x24030 00025540 60 00 fe de |` | BRA 0x25420 00025544 switch@0x253ba[0x20]: 00025544 2f 12 |/ | MOVE.L (A2),-(A7) 00025546 4e ba eb 1e |N | JSR 0x24066 0002554a 60 00 fe d4 |` | BRA 0x25420 0002554e switch@0x253ba[0x21]: 0002554e 2f 12 |/ | MOVE.L (A2),-(A7) 00025550 4e ba eb a4 |N | JSR 0x240f6 00025554 60 00 fe ca |` | BRA 0x25420 00025558 switch@0x253ba[0x22]: 00025558 2f 12 |/ | MOVE.L (A2),-(A7) 0002555a 4e ba ec 0c |N | JSR 0x24168 0002555e 60 00 fe c0 |` | BRA 0x25420 00025562 switch@0x253ba[0x23]: 00025562 2f 12 |/ | MOVE.L (A2),-(A7) 00025564 4e ba df 68 |N h | JSR 0x234ce 00025568 60 00 fe b6 |` | BRA 0x25420 0002556c switch@0x253ba[0x24]: 0002556c 2f 12 |/ | MOVE.L (A2),-(A7) 0002556e 4e ba df c8 |N | JSR 0x23538 00025572 60 00 fe ac |` | BRA 0x25420 00025576 switch@0x253ba[0x25]: 00025576 4e ba df 92 |N | JSR 0x2350a 0002557a 60 46 |`F | BRA 0x255c2 0002557c switch@0x253ba[0x26]: 0002557c 2f 12 |/ | MOVE.L (A2),-(A7) 0002557e 4e ba ec 5a |N Z | JSR 0x241da 00025582 60 00 fe 9c |` | BRA 0x25420 00025586 switch@0x253ba[0x27]: 00025586 2f 12 |/ | MOVE.L (A2),-(A7) 00025588 4e ba ec d2 |N | JSR 0x2425c 0002558c 60 00 fe 92 |` | BRA 0x25420 00025590 switch@0x253ba[0x28]: 00025590 2f 12 |/ | MOVE.L (A2),-(A7) 00025592 4e ba ed 48 |N H | JSR 0x242dc 00025596 60 00 fe 88 |` | BRA 0x25420 0002559a switch@0x253ba[0x29]: 0002559a 4e ba ee 04 |N | JSR 0x243a0 0002559e 60 22 |`" | BRA 0x255c2 000255a0 switch@0x253ba[0x2a]: 000255a0 2f 12 |/ | MOVE.L (A2),-(A7) 000255a2 4e ba ee 1c |N | JSR 0x243c0 000255a6 60 00 fe 78 |` x | BRA 0x25420 000255aa switch@0x253ba[0x2b]: 000255aa 2f 12 |/ | MOVE.L (A2),-(A7) 000255ac 4e ba ee be |N | JSR 0x2446c 000255b0 60 00 fe 6e |` n | BRA 0x25420 000255b4 switch@0x253ba[0x4]: 000255b4 2e 6d 00 08 |.m | MOVEA.L (A5+0x8),A7 000255b8 3c 7c 00 00 |<| | MOVEA.W #0x0,A6 000255bc 4e f9 00 02 57 cc |N W | JMP 0x257cc 000255c2 2f 12 |/ | MOVE.L (A2),-(A7) 000255c4 4e ba c8 5a |N Z | JSR 0x21e20 000255c8 58 4f |XO | ADDQ.L #0x4,A7 000255ca 2f 06 |/ | MOVE.L D6,-(A7) 000255cc 2f 06 |/ | MOVE.L D6,-(A7) 000255ce 9f 97 | | SUB.L D7,(A7) 000255d0 4e ba cd e4 |N | JSR 0x223b6 000255d4 50 4f |PO | ADDQ.L #0x8,A7 000255d6 26 87 |& | MOVE.L D7,(A3) 000255d8 4a 2e ff f4 |J. | TST.B (A6-0xc) 000255dc 67 00 fd 10 |g | BEQ 0x252ee 000255e0 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000255e4 4e 5e |N^ | UNLK A6 000255e6 4e 75 |Nu | RTS 000255e8 ; -------------------------------------------------------------------------------------- 000255e8 ; OMSI PASCAL Function 000255e8 ; -------------------------------------------------------------------------------------- 000255e8 START: 000255e8 4f fa 00 08 |O | LEA.L MAIN,A7 000255ec 4e f9 00 01 02 80 |N | JMP ?start_program 000255f2 MAIN: 000255f2 23 fc 00 00 00 01 00 02 |# | MOVE.L #0x1,0x27a32 000255fa 7a 32 |z2 | 000255fc 59 4f |YO | SUBQ.L #0x4,A7 000255fe 4e b9 00 01 03 c4 |N | JSR GetArgv() : String 00025604 23 df 00 02 7a 36 |# z6 | MOVE.L (A7)+,0x27a36 0002560a 48 79 00 02 7a 10 |Hy z | PEA.L 0x27a10 00025610 4e b9 00 02 16 74 |N t | JSR 0x21674 00025616 58 4f |XO | ADDQ.L #0x4,A7 00025618 20 79 00 02 7a 36 | y z6 | MOVEA.L 0x27a36,A0 0002561e 4a 50 |JP | TST.W (A0) 00025620 6f 68 |oh | BLE 0x2568a 00025622 51 4f |QO | SUBQ.L #0x8,A7 00025624 20 4f | O | MOVEA.L A7,A0 00025626 43 fa c5 44 |C D | LEA.L 0x21b6c,A1 0002562a 70 06 |p | MOVEQ.L #0x06,D0 0002562c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002562e 51 c8 ff fc |Q | DBF D0,0x2562c 00025632 51 4f |QO | SUBQ.L #0x8,A7 00025634 20 4f | O | MOVEA.L A7,A0 00025636 43 fa c5 3c |C < | LEA.L 0x21b74,A1 0002563a 70 06 |p | MOVEQ.L #0x06,D0 0002563c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002563e 51 c8 ff fc |Q | DBF D0,0x2563c 00025642 51 4f |QO | SUBQ.L #0x8,A7 00025644 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00025648 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002564c 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 00025650 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025656 58 4f |XO | ADDQ.L #0x4,A7 00025658 2e b9 00 02 7a 36 |. z6 | MOVE.L 0x27a36,(A7) 0002565e 59 4f |YO | SUBQ.L #0x4,A7 00025660 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00025664 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025668 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 0002566c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025672 50 4f |PO | ADDQ.L #0x8,A7 00025674 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 0002567a de fc 00 0c | | ADDA.W #0xc,A7 0002567e 23 df 00 02 7a 36 |# z6 | MOVE.L (A7)+,0x27a36 00025684 de fc 00 10 | | ADDA.W #0x10,A7 00025688 60 3a |`: | BRA 0x256c4 0002568a 48 79 00 02 7a 36 |Hy z6 | PEA.L 0x27a36 00025690 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00025696 59 4f |YO | SUBQ.L #0x4,A7 00025698 20 4f | O | MOVEA.L A7,A0 0002569a 43 fa c4 e0 |C | LEA.L 0x21b7c,A1 0002569e 70 06 |p | MOVEQ.L #0x06,D0 000256a0 10 d9 | | MOVE.B (A1)+,(A0)+ 000256a2 51 c8 ff fc |Q | DBF D0,0x256a0 000256a6 59 4f |YO | SUBQ.L #0x4,A7 000256a8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000256ac 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000256b0 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 000256b4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000256ba 50 4f |PO | ADDQ.L #0x8,A7 000256bc 23 df 00 02 7a 36 |# z6 | MOVE.L (A7)+,0x27a36 000256c2 50 4f |PO | ADDQ.L #0x8,A7 000256c4 13 fc 00 01 00 02 7a 40 | z@| MOVE.B #0x01,0x27a40 000256cc 4a 39 00 02 7a 40 |J9 z@ | TST.B 0x27a40 000256d2 67 0a |g | BEQ 0x256de 000256d4 42 39 00 02 7a 40 |B9 z@ | CLR.B 0x27a40 000256da 60 00 00 b0 |` | BRA 0x2578c 000256de 41 f9 00 02 7a 1a |A z | LEA.L 0x27a1a,A0 000256e4 70 04 |p | MOVEQ.L #0x04,D0 000256e6 3f 20 |? | MOVE.W -(A0),-(A7) 000256e8 51 c8 ff fc |Q | DBF D0,0x256e6 000256ec 3f 3a c4 96 |?: | MOVE.W 0x21b84,-(A7) 000256f0 9e fc 00 0c | | SUBA.W #0xc,A7 000256f4 48 6f 00 0e |Ho | PEA.L (A7+0xe) 000256f8 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000256fc 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00025700 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025706 58 4f |XO | ADDQ.L #0x4,A7 00025708 48 6f 00 10 |Ho | PEA.L (A7+0x10) 0002570c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025710 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00025714 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002571a 50 4f |PO | ADDQ.L #0x8,A7 0002571c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00025722 50 4f |PO | ADDQ.L #0x8,A7 00025724 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 0002572a 58 4f |XO | ADDQ.L #0x4,A7 0002572c 23 df 00 02 7a 3c |# z< | MOVE.L (A7)+,0x27a3c 00025732 50 4f |PO | ADDQ.L #0x8,A7 00025734 2e b9 00 02 7a 3c |. z< | MOVE.L 0x27a3c,(A7) 0002573a 4e ba c9 7e |N ~ | JSR 0x220ba 0002573e 54 4f |TO | ADDQ.L #0x2,A7 00025740 3e ba c4 44 |> D | MOVE.W 0x21b86,(A7) 00025744 3f 3a c4 42 |?: B | MOVE.W 0x21b88,-(A7) 00025748 51 4f |QO | SUBQ.L #0x8,A7 0002574a 48 6f 00 0a |Ho | PEA.L (A7+0xa) 0002574e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025752 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00025756 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002575c 58 4f |XO | ADDQ.L #0x4,A7 0002575e 2e b9 00 02 7a 3c |. z< | MOVE.L 0x27a3c,(A7) 00025764 59 4f |YO | SUBQ.L #0x4,A7 00025766 48 6f 00 10 |Ho | PEA.L (A7+0x10) 0002576a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002576e 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00025772 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025778 50 4f |PO | ADDQ.L #0x8,A7 0002577a 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00025780 de fc 00 0c | | ADDA.W #0xc,A7 00025784 23 df 00 02 7a 36 |# z6 | MOVE.L (A7)+,0x27a36 0002578a 58 4f |XO | ADDQ.L #0x4,A7 0002578c 42 39 00 02 7a 3a |B9 z: | CLR.B 0x27a3a 00025792 23 fc 00 00 00 01 00 02 |# | MOVE.L #0x1,0x27a08 0002579a 7a 08 |z | 0002579c 42 b9 00 02 7a 0c |B z | CLR.L 0x27a0c 000257a2 59 4f |YO | SUBQ.L #0x4,A7 000257a4 2f 39 00 02 7a 36 |/9 z6 | MOVE.L 0x27a36,-(A7) 000257aa 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 000257b0 58 4f |XO | ADDQ.L #0x4,A7 000257b2 4e ba d4 78 |N x | JSR 0x22c2c 000257b6 58 4f |XO | ADDQ.L #0x4,A7 000257b8 20 39 00 02 7a 08 | 9 z | MOVE.L 0x27a08,D0 000257be b0 b9 00 02 7a 0c | z | CMP.L 0x27a0c,D0 000257c4 6e 06 |n | BGT 0x257cc 000257c6 4e ba fb 02 |N | JSR 0x252ca 000257ca 60 ec |` | BRA 0x257b8 000257cc 48 79 00 02 7a 36 |Hy z6 | PEA.L 0x27a36 000257d2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000257d8 58 4f |XO | ADDQ.L #0x4,A7 000257da 60 00 fe f0 |` | BRA 0x256cc 000257de 4e b9 |N | .XXX[0x2] 000257e0 00 01 02 84 | | .XXX[0x4] 000257e4 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 000257f2 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00025800 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 0002580e 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00025820 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 00025838 ; -------------------------------------------------------------------------------------- 00025838 ; OMSI PASCAL Function 00025838 ; <LVAR 0x00e 1(r)> 00025838 ; <LVAR 0x00a 4(r)> 00025838 ; <LVAR 0x008 1(r)> 00025838 ; -------------------------------------------------------------------------------------- 00025838 EXP_FAIL: 00025838 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 0002583c bf d5 | | CMPA.L (A5),A7 0002583e 62 06 |b | BHI 0x25846 00025840 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025844 4e 76 |Nv | TRAPV 00025846 de fc 00 74 | t | ADDA.W #0x74,A7 0002584a 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 0002584e 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00025854 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 0002585a 72 01 |r | MOVEQ.L #0x01,D1 0002585c 74 0d |t | MOVEQ.L #0x0d,D2 0002585e 76 1e |v | MOVEQ.L #0x1e,D3 00025860 78 12 |x | MOVEQ.L #0x12,D4 00025862 7a 0e |z | MOVEQ.L #0x0e,D5 00025864 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 0002586a 41 fa ff b4 |A | LEA.L 0x25820,A0 0002586e 70 08 |p | MOVEQ.L #0x08,D0 00025870 3f 20 |? | MOVE.W -(A0),-(A7) 00025872 51 c8 ff fc |Q | DBF D0,0x25870 00025876 59 4f |YO | SUBQ.L #0x4,A7 00025878 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002587c 3f 01 |? | MOVE.W D1,-(A7) 0002587e 3f 04 |? | MOVE.W D4,-(A7) 00025880 4e 93 |N | JSR (A3) 00025882 50 4f |PO | ADDQ.L #0x8,A7 00025884 4e 94 |N | JSR (A4) 00025886 50 4f |PO | ADDQ.L #0x8,A7 00025888 20 4f | O | MOVEA.L A7,A0 0002588a 43 fa ff 58 |C X | LEA.L 0x257e4,A1 0002588e 70 0c |p | MOVEQ.L #0x0c,D0 00025890 10 d9 | | MOVE.B (A1)+,(A0)+ 00025892 51 c8 ff fc |Q | DBF D0,0x25890 00025896 51 4f |QO | SUBQ.L #0x8,A7 00025898 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002589c 3f 01 |? | MOVE.W D1,-(A7) 0002589e 3f 02 |? | MOVE.W D2,-(A7) 000258a0 4e 93 |N | JSR (A3) 000258a2 54 4f |TO | ADDQ.L #0x2,A7 000258a4 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 000258a8 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 000258ae 54 4f |TO | ADDQ.L #0x2,A7 000258b0 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000258b6 50 4f |PO | ADDQ.L #0x8,A7 000258b8 4e 94 |N | JSR (A4) 000258ba de c4 | | ADDA.W D4,A7 000258bc 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 000258c0 b0 c1 | | CMPA.W D1,A0 000258c2 67 48 |gH | BEQ 0x2590c 000258c4 9e c5 | | SUBA.W D5,A7 000258c6 22 4f |"O | MOVEA.L A7,A1 000258c8 45 fa ff 28 |E ( | LEA.L 0x257f2,A2 000258cc 70 0c |p | MOVEQ.L #0x0c,D0 000258ce 12 da | | MOVE.B (A2)+,(A1)+ 000258d0 51 c8 ff fc |Q | DBF D0,0x258ce 000258d4 9e c3 | | SUBA.W D3,A7 000258d6 22 4f |"O | MOVEA.L A7,A1 000258d8 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 000258dc 70 1d |p | MOVEQ.L #0x1d,D0 000258de 12 d8 | | MOVE.B (A0)+,(A1)+ 000258e0 51 c8 ff fc |Q | DBF D0,0x258de 000258e4 51 4f |QO | SUBQ.L #0x8,A7 000258e6 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 000258ea 3f 01 |? | MOVE.W D1,-(A7) 000258ec 3f 02 |? | MOVE.W D2,-(A7) 000258ee 4e 93 |N | JSR (A3) 000258f0 58 4f |XO | ADDQ.L #0x4,A7 000258f2 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000258f6 3f 01 |? | MOVE.W D1,-(A7) 000258f8 3f 03 |? | MOVE.W D3,-(A7) 000258fa 4e 93 |N | JSR (A3) 000258fc 50 4f |PO | ADDQ.L #0x8,A7 000258fe 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00025904 50 4f |PO | ADDQ.L #0x8,A7 00025906 4e 94 |N | JSR (A4) 00025908 de fc 00 30 | 0 | ADDA.W #0x30,A7 0002590c 9e c5 | | SUBA.W D5,A7 0002590e 20 4f | O | MOVEA.L A7,A0 00025910 43 fa fe ee |C | LEA.L 0x25800,A1 00025914 70 0c |p | MOVEQ.L #0x0c,D0 00025916 10 d9 | | MOVE.B (A1)+,(A0)+ 00025918 51 c8 ff fc |Q | DBF D0,0x25916 0002591c 51 4f |QO | SUBQ.L #0x8,A7 0002591e 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00025922 3f 01 |? | MOVE.W D1,-(A7) 00025924 3f 02 |? | MOVE.W D2,-(A7) 00025926 4e 93 |N | JSR (A3) 00025928 54 4f |TO | ADDQ.L #0x2,A7 0002592a 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 0002592e 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00025934 54 4f |TO | ADDQ.L #0x2,A7 00025936 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002593c 50 4f |PO | ADDQ.L #0x8,A7 0002593e 4e 94 |N | JSR (A4) 00025940 5d 4f |]O | SUBQ.L #0x6,A7 00025942 20 4f | O | MOVEA.L A7,A0 00025944 43 fa fe da |C | LEA.L 0x25820,A1 00025948 70 16 |p | MOVEQ.L #0x16,D0 0002594a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002594c 51 c8 ff fc |Q | DBF D0,0x2594a 00025950 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00025954 59 4f |YO | SUBQ.L #0x4,A7 00025956 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002595a 3f 01 |? | MOVE.W D1,-(A7) 0002595c 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00025960 4e 93 |N | JSR (A3) 00025962 50 4f |PO | ADDQ.L #0x8,A7 00025964 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002596a de c3 | | ADDA.W D3,A7 0002596c 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00025970 4e 5e |N^ | UNLK A6 00025972 4e 75 |Nu | RTS