|
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: 9728 (0x2600)
Types: M200
Notes: @(#)TRACE,1.1,92/07/09,12:00:00, M200_PROGRAM
Names: »TRACE.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »TRACE.M200«
@ 207e2
<LVAR 0x008 4(r)>
<POP 207e2-2082a Body>
<POP 207e2-207f8 Prologue> Σ0 ↓
<POP 207f8-2080e Naked> Σ0 ↓ →0x20822
<MI 207f8 MOVEA.L (A6+0x8),A0> {}
<POP 207fc-207fe StackAdj> Δ-2 {[-2-]}
<Call 0x207fe 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20804 MOVE.B (A7)+,D0> Δ+2 {}
<MI 20806 MOVE.B D0,(A0)> {}
<MI 20808 CMPI.B #0x61,D0> {}
<MI 2080c BCS 0x20822> {}
<POP 2080e-20814 Naked> Σ0 ↓ →0x20822
<MI 2080e CMPI.B #0x7a,D0> {}
<MI 20812 BHI 0x20822> {}
<POP 20814-20822 Naked> Σ0 ↓
<MI 20814 CLR.L D1> {}
<MI 20816 MOVE.B D0,D1> {}
<MI 20818 SUBI.W #0x0020,D1> {}
<POP 0x2081c LimitCheck 0x0 ≤ D1 ≤ 0xff> {}
<MI 20820 MOVE.B D1,(A0)> {}
<POP 20822-2082a Epilogue> Σ0 ←0x207f8 ←0x2080e
@ 2082a
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2082a-208ac Body>
<POP 2082a-20840 Prologue> Σ0 ↓
<POP 20840-2084a RegCacheLoad> Σ0 ↓
<POP 2084a-208a4 Naked> Σ0 ↓
<Blob 0x2084a [2] @> Δ-2 {[«2""»]}
<Blob 0x2084e [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x20852 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 20856-20858 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-8-]}
<Lit 0x20858 2> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ []}
<MI 20862 MOVE.L (A6+0xc),(A7)> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']}
<POP 20860-20862 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-8-]}
<Call 0x20866 0x102e4> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x2086c 2> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[$$; ]}
<MI 20876 MOVE.L (A6+0x8),(A7)> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']}
<POP 20874-20876 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-8-]}
<Call 0x2087a 0x102e4> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x20880 2> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-4-]|[$$H ]}
<Call 0x2088c 0x102dc> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-4-]|[$$H ]}
StringCat5(a, b, c, d, e : String) : String
<POP 20892-20896 StackAdj> Δ+20 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<MI 20896 MOVEA.L (A7)+,A4> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 20898-2089a StackAdj> Δ+6 {}
<MI 2089a MOVE.B #0x1b,(A4+0x2)> {}
<MI 208a0 MOVE.L A4,(A6+0x10)> {}
<POP 208a4-208ac Epilogue> Σ0
@ 208ac
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 208ac-2092e Body>
<POP 208ac-208c2 Prologue> Σ0 ↓
<POP 208c2-208cc RegCacheLoad> Σ0 ↓
<POP 208cc-20926 Naked> Σ0 ↓
<Blob 0x208cc [2] @> Δ-2 {[«2""»]}
<Blob 0x208d0 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x208d4 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 208d8-208da StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-8-]}
<Lit 0x208da 2> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ []}
<MI 208e4 MOVE.L (A6+0xc),(A7)> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']}
<POP 208e2-208e4 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-8-]}
<Call 0x208e8 0x102e4> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x208ee 2> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[$$; ]}
<MI 208f8 MOVE.L (A6+0x8),(A7)> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']}
<POP 208f6-208f8 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-8-]}
<Call 0x208fc 0x102e4> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x20902 2> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-4-]|[$$r ]}
<Call 0x2090e 0x102dc> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-4-]|[$$r ]}
StringCat5(a, b, c, d, e : String) : String
<POP 20914-20918 StackAdj> Δ+20 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<MI 20918 MOVEA.L (A7)+,A4> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 2091a-2091c StackAdj> Δ+6 {}
<MI 2091c MOVE.B #0x1b,(A4+0x2)> {}
<MI 20922 MOVE.L A4,(A6+0x10)> {}
<POP 20926-2092e Epilogue> Σ0
@ 2092e
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2092e-209b4 Body> Δ+8
<POP 2092e-20944 Prologue> Σ0 ↓
<POP 20944-20950 Naked> Σ0 ↓ →0x2095a
<MI 20944 MOVE.L (A6+0xc),D0> {}
<MI 20948 CMPI.L #0x00000044,D0> {}
<MI 2094e BNE 0x2095a> {}
<POP 20950-2095a Naked> Σ0 Δ-8 →0x20960
<POP 20950-20952 StackAdj> Δ-4 {[-4-]}
<Blob 0x20952 [4] 0x2350a> Δ-4 {[-4-]|[«4»]}
<MI 20958 BRA 0x20960> {[-4-]|[«4»]}
<POP 2095a-20960 Naked> Σ0 Δ-8 ↓ ←0x20944
<POP 2095a-2095c StackAdj> Δ-4 {[-4-]}
<Const 0x2095c 0x1.4> Δ-4 {[-4-]|[##1]}
<POP 20960-20972 Naked> Σ-8 Δ+4 ↓ ←0x20950
<Const 0x20960 0x1.4> Δ-4 {[-8-]|[##1]}
<Call 0x20964 0x2082a> {[-8-]|[##1]}
<POP 20968-2096a StackAdj> Δ+8 {[-4-]}
<MI 2096a MOVEA.L (A7)+,A4> Δ+4 {}
<MI 2096c MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 20970 MOVEQ.L #0x01,D7> {[4, '(A6+0x8)']}
<POP 20972-20976 Naked> Σ-4 ↓ →0x209a2 ←0x20976
<MI 20972 CMP.L (A7),D7> {[-4-]}
<MI 20974 BGT 0x209a2> {[-4-]}
<POP 20976-209a2 Naked> Σ-4 ↓ →0x20972
<MI 20976 MOVE.L A4,-(A7)> Δ-4 {[-4-]|[4, 'A4']}
<Const 0x20978 0x1b.2> Δ-2 {[-4-]|[4, 'A4']|[#27]}
<Call 0x2097c 0x102c0> {[-4-]|[4, 'A4']|[#27]}
AppendChar(MOD b : String; a : char)
<POP 20982-20984 StackAdj> Δ+2 {[-4-]|[4, 'A4']}
<MI 20984 MOVE.L A4,(A7)> {[-4-]|[4, 'A4']}
<MI 20986 MOVE.L (A6+0xc),D0> {[-4-]|[4, 'A4']}
<POP 0x2098a LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-4-]|[4, 'A4']}
<MI 20994 MOVE.B D0,-(A7)> Δ-2 {[-4-]|[4, 'A4']|[2, 'D0']}
<Call 0x20996 0x102c0> {[-4-]|[4, 'A4']|[2, 'D0']}
AppendChar(MOD b : String; a : char)
<POP 2099c-2099e StackAdj> Δ+6 {[-4-]}
<MI 2099e ADDQ.L #0x1,D7> {[-4-]}
<MI 209a0 BVC 0x20972> {[-4-]}
<POP 209a2-209ac Naked> Σ-4 Δ+4 ↓ ←0x20972
<MI 209a2 MOVE.L A4,(A7)> {[4, 'A4']}
<Call 0x209a4 0x103d8> {[4, 'A4']}
WriteConsoleString(str : String)
<POP 209aa-209ac StackAdj> Δ+4 {}
<POP 209ac-209b4 Epilogue> Σ0
@ 209b4
<LVAR 0x008 4(w)>
<POP 209b4-209fa Body>
<POP 209b4-209ca Prologue> Σ0 ↓
<POP 209ca-209f2 Naked> Σ0 ↓
<Blob 0x209ca [4] @> Δ-4 {[«4""»]}
<POP 209ce-209d0 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x209d0 4> {[«4""»]|[$$ [0J]}
<MI 209e4 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]}
<POP 209e6-209e8 StackAdj> Δ+4 {}
<MI 209e8 MOVE.B #0x1b,(A4+0x2)> {}
<MI 209ee MOVE.L A4,(A6+0x8)> {}
<POP 209f2-209fa Epilogue> Σ0
@ 209fa
<LVAR 0x008 4(w)>
<POP 209fa-20a48 Body>
<POP 209fa-20a10 Prologue> Σ0 ↓
<POP 20a10-20a40 Naked> Σ0 ↓
<Blob 0x20a10 [2] @> Δ-2 {[«2""»]}
<Blob 0x20a14 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x20a18 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 20a1c-20a1e StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x20a1e 6> {[«2""»]|[«2""»]|[«2""»]|[$$ [7;1m]}
<MI 20a32 MOVEA.L (A7)+,A4> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 20a34-20a36 StackAdj> Δ+6 {}
<MI 20a36 MOVE.B #0x1b,(A4+0x2)> {}
<MI 20a3c MOVE.L A4,(A6+0x8)> {}
<POP 20a40-20a48 Epilogue> Σ0
@ 20a48
<LVAR 0x008 4(w)>
<POP 20a48-20a8e Body>
<POP 20a48-20a5e Prologue> Σ0 ↓
<POP 20a5e-20a86 Naked> Σ0 ↓
<Blob 0x20a5e [4] @> Δ-4 {[«4""»]}
<POP 20a62-20a64 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x20a64 4> {[«4""»]|[$$ [0m]}
<MI 20a78 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]}
<POP 20a7a-20a7c StackAdj> Δ+4 {}
<MI 20a7c MOVE.B #0x1b,(A4+0x2)> {}
<MI 20a82 MOVE.L A4,(A6+0x8)> {}
<POP 20a86-20a8e Epilogue> Σ0
@ 20a8e
<LVAR 0x008 4(w)>
<POP 20a8e-20ad4 Body>
<POP 20a8e-20aa4 Prologue> Σ0 ↓
<POP 20aa4-20acc Naked> Σ0 ↓
<Blob 0x20aa4 [4] @> Δ-4 {[«4""»]}
<POP 20aa8-20aaa StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x20aaa 4> {[«4""»]|[$$ [0K]}
<MI 20abe MOVEA.L (A7)+,A4> Δ+4 {[«4""»]}
<POP 20ac0-20ac2 StackAdj> Δ+4 {}
<MI 20ac2 MOVE.B #0x1b,(A4+0x2)> {}
<MI 20ac8 MOVE.L A4,(A6+0x8)> {}
<POP 20acc-20ad4 Epilogue> Σ0
@ 20ad4
<LVAR 0x008 4(w)>
<POP 20ad4-20b74 Body>
<POP 20ad4-20aea Prologue> Σ0 ↓
<POP 20aea-20af2 RegCacheLoad> Σ0 ↓
<POP 20af2-20b2c Naked> Σ0 ↓
<POP 20af2-20af4 StackAdj> Δ-4 {[-4-]}
<POP 20af4-20af5 StackAdj> Δ+2 {[-2-]}
<Blob 0x20af5 [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 20af8 MOVE.B 0x20149,(A7+0x1)> {[-2-]|[«2""»]}
<MI 20afe MOVE.B 0x2014a,(A7+0x2)> {[-2-]|[«2""»]}
<POP 20b04-20b06 StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]}
<Lit 0x20b06> {[-2-]|[«2""»]|[$$…]}
<Pointer.sp 0x20b06 4> Δ-4
<Const 0x20b0a 0x1.2> Δ-2
<Const 0x20b0e 0x3.2> Δ-2
<Call 0x20b12 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20b18-20b1a StackAdj> Δ+8
<MI 20b1a MOVEA.L (A7)+,A4> Δ+4 {[-2-]|[«2""»]}
<POP 20b1c-20b1e StackAdj> Δ+4 {}
<MI 20b1e MOVE.B #0x1b,(A4+0x2)> {}
<MI 20b22 MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']}
<Call 0x20b24 0x103d8> {[4, 'A4']}
WriteConsoleString(str : String)
<POP 20b2a-20b2c StackAdj> Δ+4 {}
<POP 20b2c-20b36 Naked> Σ0 ↓ →0x20b2c ←0x20b2c
<POP 20b2c-20b2e StackAdj> Δ-2 {[-2-]}
<Call 0x20b2e 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b30 MOVE.B (A7)+,D7> Δ+2 {}
<MI 20b32 CMP.B #0x1b,D7> {}
<MI 20b34 BNE 0x20b2c> {}
<POP 20b36-20b4a Naked> Σ0 ↓ →0x20b54
<POP 20b36-20b38 StackAdj> Δ-2 {[-2-]}
<Call 0x20b38 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b3a MOVE.B (A7),D7> {[-2-]}
<Call 0x20b3c 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b3e MOVE.B (A7),D7> {[-2-]}
<Call 0x20b40 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b42 MOVE.B (A7)+,D7> Δ+2 {}
<MI 20b44 CMPI.B #0x31,D7> {}
<MI 20b48 BEQ 0x20b54> {}
<POP 20b4a-20b54 Naked> Σ0 →0x20b66
<MI 20b4a MOVE.L #0x40,(A6+0x8)> {}
<MI 20b52 BRA 0x20b66> {}
<POP 20b54-20b66 Naked> Σ0 ↓ ←0x20b36
<MI 20b54 MOVE.L #0x18,(A6+0x8)> {}
<POP 20b5c-20b5e StackAdj> Δ-2 {[-2-]}
<Call 0x20b5e 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b60 MOVE.B (A7),D7> {[-2-]}
<Call 0x20b62 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b64 MOVE.B (A7)+,D7> Δ+2 {}
<POP 20b66-20b6c Naked> Σ0 ↓ ←0x20b4a
<POP 20b66-20b68 StackAdj> Δ-2 {[-2-]}
<Call 0x20b68 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b6a MOVE.B (A7)+,D7> Δ+2 {}
<POP 20b6c-20b74 Epilogue> Σ0
@ 20b74
<POP 20b74-20be2 Body>
<POP 20b74-20b8a Prologue> Σ0 ↓
<POP 20b8a-20bda Naked> Σ0 ↓
<Blob 0x20b8a [10] @> Δ-10 {[«10""»]}
<POP 20b9c-20b9e StackAdj> Δ-8 {[«10""»]|[-8-]}
<Blob 0x20b9e [4] 0x23502> Δ-4 {[«10""»]|[-8-]|[«4»]}
<Const 0x20ba4 0x1.4> Δ-4 {[«10""»]|[-8-]|[«4»]|[##1]}
<Call 0x20ba8 0x2082a> {[«10""»]|[-8-]|[«4»]|[##1]}
<POP 20bac-20bae StackAdj> Δ+4 {[«10""»]|[-8-]|[«4»]}
<Lit 0x20bae 9> {[«10""»]|[-8-]|[$$Command:_]}
<POP 20bc0-20bc2 StackAdj> Δ-4 {[«10""»]|[-8-]|[$$Command:_]|[-4-]}
<Call 0x20bc2 0x20a8e> {[«10""»]|[-8-]|[$$Command:_]|[-4-]}
<Call 0x20bc6 0x102d4> {[«10""»]|[-8-]|[$$Command:_]|[-4-]}
StringCat3(a, b, c : String) : String
<POP 20bcc-20bd0 StackAdj> Δ+12 {[«10""»]|[-4-]}
<Call 0x20bd0 0x103d8> {[«10""»]|[-4-]}
WriteConsoleString(str : String)
<POP 20bd6-20bda StackAdj> Δ+14 {}
<POP 20bda-20be2 Epilogue> Σ0
@ 20be2
<LVAR 0x008 4(r)>
<POP 20be2-20c30 Body>
<POP 20be2-20bf4 Prologue> Σ0 ↓
<POP 20bf4-20c2c Naked> Σ0 ↓
<POP 20bf4-20bf6 StackAdj> Δ-8 {[-8-]}
<Blob 0x20bf6 [4] 0x23506> Δ-4 {[-8-]|[«4»]}
<Const 0x20bfc 0x1.4> Δ-4 {[-8-]|[«4»]|[##1]}
<Call 0x20c00 0x2082a> {[-8-]|[«4»]|[##1]}
<POP 20c04-20c06 StackAdj> Δ+4 {[-8-]|[«4»]}
<Call 0x20c06 0x209fa> {[-8-]|[«4»]}
<MI 20c0a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[«4»]|[4, '(A6+0x8)']}
<POP 20c0e-20c10 StackAdj> Δ-4 {[-8-]|[«4»]|[4, '(A6+0x8)']|[-4-]}
<Call 0x20c10 0x20a8e> {[-8-]|[«4»]|[4, '(A6+0x8)']|[-4-]}
<POP 20c14-20c16 StackAdj> Δ-4 {[-8-]|[«4»]|[4, '(A6+0x8)']|[-8-]}
<Call 0x20c16 0x20a48> {[-8-]|[«4»]|[4, '(A6+0x8)']|[-8-]}
<Call 0x20c1a 0x102dc> {[-8-]|[«4»]|[4, '(A6+0x8)']|[-8-]}
StringCat5(a, b, c, d, e : String) : String
<POP 20c20-20c24 StackAdj> Δ+20 {[-4-]}
<Call 0x20c24 0x103d8> {[-4-]}
WriteConsoleString(str : String)
<POP 20c2a-20c2c StackAdj> Δ+4 {}
<POP 20c2c-20c30 Epilogue> Σ0
@ 20c30
<LVAR 0x00a 1(w)>
<LVAR 0x008 2(r)>
<POP 20c30-20c6e Body>
<POP 20c30-20c46 Prologue> Σ0 ↓
<POP 20c46-20c50 Naked> Σ0 ↓ →0x20c5a
<MI 20c46 MOVE.W (A6+0x8),D0> {}
<MI 20c4a CMPI.W #0x000a,D0> {}
<MI 20c4e BGE 0x20c5a> {}
<POP 20c50-20c5a Naked> Σ0 →0x20c62
<MI 20c50 ADDI.W #0x0030,D0> {}
<POP 0x20c54 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20c58 BRA 0x20c62> {}
<POP 20c5a-20c62 Naked> Σ0 ↓ ←0x20c46
<MI 20c5a ADDI.W #0x0037,D0> {}
<POP 0x20c5e LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<POP 20c62-20c66 Naked> Σ0 ↓ ←0x20c50
<MI 20c62 MOVE.B D0,(A6+0xa)> {}
<POP 20c66-20c6e Epilogue> Σ0
@ 20c6e
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20c6e-20ca2 Body>
<POP 20c6e-20c84 Prologue> Σ0 ↓
<POP 20c84-20c8e Naked> Σ0 ↓ →0x20c94
<MI 20c84 MOVE.L (A6+0xc),D0> {}
<MI 20c88 CMP.L (A6+0x8),D0> {}
<MI 20c8c BGE 0x20c94> {}
<POP 20c8e-20c94 Naked> Σ0 →0x20c9a
<MI 20c8e MOVE.L D0,(A6+0x10)> {}
<MI 20c92 BRA 0x20c9a> {}
<POP 20c94-20c9a Naked> Σ0 ↓ ←0x20c84
<MI 20c94 MOVE.L (A6+0x8),(A6+0x10)> {}
<POP 20c9a-20ca2 Epilogue> Σ0 ←0x20c8e
@ 20ca2
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20ca2-20cd6 Body>
<POP 20ca2-20cb8 Prologue> Σ0 ↓
<POP 20cb8-20cc2 Naked> Σ0 ↓ →0x20cc8
<MI 20cb8 MOVE.L (A6+0xc),D0> {}
<MI 20cbc CMP.L (A6+0x8),D0> {}
<MI 20cc0 BLE 0x20cc8> {}
<POP 20cc2-20cc8 Naked> Σ0 →0x20cce
<MI 20cc2 MOVE.L D0,(A6+0x10)> {}
<MI 20cc6 BRA 0x20cce> {}
<POP 20cc8-20cce Naked> Σ0 ↓ ←0x20cb8
<MI 20cc8 MOVE.L (A6+0x8),(A6+0x10)> {}
<POP 20cce-20cd6 Epilogue> Σ0 ←0x20cc2
@ 20cd6
<LVAR 0x008 4(r)>
<LVAR -0x003 1(w)>
<LVAR -0x004 1(w) 2(r)>
<LVAR -0x008 2(rw)>
<LVAR -0x010 @>
<LVAR -0x018 @>
<LVAR -0x020 @>
<LVAR -0x028 @>
<LVAR -0x030 @>
<LVAR -0x038 @>
<LVAR -0x040 @>
<LVAR -0x048 @>
<LVAR -0x050 @>
<LVAR -0x058 @>
<LVAR -0x060 @>
<LVAR -0x068 @>
<LVAR -0x070 @>
<LVAR -0x078 @>
<LVAR -0x080 @>
<LVAR -0x088 @>
<LVAR -0x094 @ 4(rw)>
<POP 20cd6-20e6e Body> Δ-4
<POP 20cd6-20cec Prologue> Σ0 ↓
<POP 20cec-20d00 RegCacheLoad> Σ0 ↓
<POP 20d00-20d78 Naked> Σ0 ↓
<Blob 0x20d00 [34] @> Δ-34 {[«34""»]}
<POP 20d0c-20d0e StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x20d0e 34> {[«34""»]|[$$Loading trace data from IOC board.]}
<Call 0x20d22 0x103e0> {[«34""»]|[$$Loading trace data from IOC board.]}
WriteConsoleStringCrLf(str : String)
<POP 20d28-20d2c StackAdj> Δ+22 {[-16-]}
<MI 20d2c MOVE.L (A6+0x8),(A7)> {[-12-]|[4, '(A6+0x8)']}
<Const 0x20d30 0x10.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##16]}
<Call 0x20d34 0x10360> {[-12-]|[4, '(A6+0x8)']|[##16]}
?StringToInt64()
<POP 20d3a-20d3c StackAdj> Δ+8 {[-12-]}
<Call 0x20d3c 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 20d42-20d44 StackAdj> Δ+8 {[-4-]}
<MI 20d44 MOVE.L (A7)+,(A6-0x94)> Δ+4 {}
<MI 20d46 MOVE.L (A6-0x94),D0> {}
<MI 20d48 SUBQ.L #0x2,D0> {}
<MI 20d4a AND.L #0x7ff,D0> {}
<MI 20d4c MOVE.W D0,(A6-0x8)> {}
<MI 20d4e MOVE.W D0,D1> {}
<MI 20d50 LSR.W #0x8,D1> {}
<MI 20d52 MOVE.B D1,(A6-0x4)> {}
<MI 20d54 ANDI.W #0x00ff,D0> {}
<MI 20d58 MOVE.B D0,(A6-0x3)> {}
<MI 20d5c MOVE.W (A6-0x4),-(A7)> Δ-2 {[2, '(A6-0x4)']}
<MI 20d5e CLR.B -(A7)> Δ-2 {[2, '(A6-0x4)']|[#0]}
<Call 0x20d60 0x222ba> {[2, '(A6-0x4)']|[#0]}
exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1)
<POP 20d66-20d68 StackAdj> Δ+4 {}
<MI 20d68 MOVE.L #0x7fd,0x224ee> {}
<MI 20d72 MOVE.W #0x800,D7> {}
<MI 20d76 MOVEQ.L #0x00,D0> {}
<POP 20d78-20dc6 Naked> Σ0 Δ-4 ↓ ←0x20e3a
<MI 20d78 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<Pointer.fp 0x20d7a <LVAR -0x088 @>> Δ-4 {[4, 'D0']|[@@-136]}
<Pointer.fp 0x20d7e <LVAR -0x080 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]}
<Pointer.fp 0x20d82 <LVAR -0x078 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]}
<Pointer.fp 0x20d86 <LVAR -0x070 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]}
<Pointer.fp 0x20d8a <LVAR -0x068 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]}
<Pointer.fp 0x20d8e <LVAR -0x060 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]}
<Pointer.fp 0x20d92 <LVAR -0x058 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]}
<Pointer.fp 0x20d96 <LVAR -0x050 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]}
<Pointer.fp 0x20d9a <LVAR -0x048 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]}
<Pointer.fp 0x20d9e <LVAR -0x040 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]}
<Pointer.fp 0x20da2 <LVAR -0x038 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]}
<Pointer.fp 0x20da6 <LVAR -0x030 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]}
<Pointer.fp 0x20daa <LVAR -0x028 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]}
<Pointer.fp 0x20dae <LVAR -0x020 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]}
<Pointer.fp 0x20db2 <LVAR -0x018 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]|[@@-24]}
<Pointer.fp 0x20db6 <LVAR -0x010 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]|[@@-24]|[@@-16]}
<Call 0x20dba 0x22288> {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]|[@@-24]|[@@-16]}
exp_READ_TRACE_BLOCK.IOC(&Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8)
<POP 20dc0-20dc4 StackAdj> Δ+64 {[4, 'D0']}
<MI 20dc4 MOVEQ.L #0x00,D5> {[4, 'D0']}
<POP 20dc6-20dc8 Naked> Σ-4 ↓ ←0x20e28
<MI 20dc6 MOVEQ.L #0x00,D6> {[-4-]}
<POP 20dc8-20e28 Naked> Σ-4 ↓ →0x20dc8 ←0x20dc8
<MI 20dc8 CLR.L D0> {[-4-]}
<MI 20dca MOVE.W D7,D0> {[-4-]}
<MI 20dcc SUBQ.L #0x1,D0> {[-4-]}
<POP 0x20dce LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-4-]}
<MI 20dd8 MOVE.W D0,D7> {[-4-]}
<POP 0x20dda LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {[-4-]}
<MI 20ddc CLR.L D0> {[-4-]}
<MI 20dde MOVE.W D7,D0> {[-4-]}
<MI 20de0 ASL.L #0x1,D0> {[-4-]}
<MI 20de2 LEA.L 0x224e6,A0> {[-4-]}
<POP 0x20de8 LimitCheck 0x0 ≤ D5 ≤ 0xf> {[-4-]}
<MI 20dee MOVE.L D5,D1> {[-4-]}
<MI 20df0 ASL.L #0x3,D1> {[-4-]}
<MI 20df2 LEA.L (A6-0x94),A1> {[-4-]}
<MI 20df4 MOVE.L D6,D2> {[-4-]}
<MI 20df6 ASL.L #0x1,D2> {[-4-]}
<POP 0x20df8 LimitCheck 0x0 ≤ D2 ≤ 0x7> {[-4-]}
<MI 20e02 LEA.L (A1+D1.L),A1> {[-4-]}
<MI 20e06 MOVE.B (A1+D2.L+#0xc),(A0+D0.L+#0xc)> {[-4-]}
<MI 20e0c ADDQ.L #0x1,D2> {[-4-]}
<POP 0x20e0e LimitCheck 0x0 ≤ D2 ≤ 0x7> {[-4-]}
<MI 20e18 MOVE.B (A1+D2.L+#0xc),(A0+D0.L+#0xd)> {[-4-]}
<MI 20e1e ADDQ.L #0x1,D6> {[-4-]}
<MI 20e20 CMPI.L #0x00000003,D6> {[-4-]}
<MI 20e26 BLE 0x20dc8> {[-4-]}
<POP 20e28-20e2e Naked> Σ-4 ↓ →0x20dc6
<MI 20e28 ADDQ.L #0x1,D5> {[-4-]}
<MI 20e2a CMP.L #0x0f,D5> {[-4-]}
<MI 20e2c BLE 0x20dc6> {[-4-]}
<POP 20e2e-20e3a Naked> Σ-4 ↓ →0x20e40
<MI 20e2e MOVE.L (A7),D0> {[-4-]}
<MI 20e30 ADDQ.L #0x1,D0> {[-4-]}
<MI 20e32 CMPI.L #0x0000001f,D0> {[-4-]}
<MI 20e38 BGT 0x20e40> {[-4-]}
<POP 20e3a-20e40 Naked> Σ-4 Δ+4 →0x20d78
<POP 20e3a-20e3c StackAdj> Δ+4 {}
<MI 20e3c BRA 0x20d78> {}
<POP 20e40-20e66 Naked> Σ-4 Δ+4 ↓ ←0x20e2e
<POP 20e40-20e42 StackAdj> Δ+4 {}
<MI 20e42 CLR.L D0> {}
<MI 20e44 MOVE.W (A6-0x8),D0> {}
<MI 20e46 ADDQ.L #0x2,D0> {}
<MI 20e48 AND.L #0x7ff,D0> {}
<MI 20e4a MOVE.W D0,(A6-0x8)> {}
<MI 20e4c MOVE.W D0,D1> {}
<MI 20e4e LSR.W #0x8,D1> {}
<MI 20e50 MOVE.B D1,(A6-0x4)> {}
<MI 20e52 ANDI.W #0x00ff,D0> {}
<MI 20e56 MOVE.B D0,(A6-0x3)> {}
<MI 20e5a MOVE.W (A6-0x4),-(A7)> Δ-2 {[2, '(A6-0x4)']}
<MI 20e5c CLR.B -(A7)> Δ-2 {[2, '(A6-0x4)']|[#0]}
<Call 0x20e5e 0x222ba> {[2, '(A6-0x4)']|[#0]}
exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1)
<POP 20e64-20e66 StackAdj> Δ+4 {}
<POP 20e66-20e6e Epilogue> Σ0
@ 20e6e
<LVAR -0x004 @>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(rw)>
<LVAR -0x40c @>
<LVAR -0x80c @>
<LVAR -0x810 @>
<POP 20e6e-20fae Body>
<POP 20e6e-20e84 Prologue> Σ0 ↓
<POP 20e84-20e9c RegCacheLoad> Σ0 ↓
<POP 20e9c-20f60 Naked> Σ0 ↓
<Blob 0x20e9c [44] @> Δ-44 {[«44""»]}
<POP 20ea8-20eaa StackAdj> Δ-4 {[«44""»]|[-4-]}
<Lit 0x20eaa 44> {[«44""»]|[$$Loading trace data from crashdump disk file.]}
<Call 0x20ebc 0x103e0> {[«44""»]|[$$Loading trace data from crashdump disk file.]}
WriteConsoleStringCrLf(str : String)
<POP 20ec2-20ec6 StackAdj> Δ+48 {}
<Blob 0x20ec6 [22] @> Δ-22 {[«22""»]}
<POP 20ed2-20ed4 StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x20ed4 22> {[«22""»]|[$$CRASH_DUMP.SAVED_STATE]}
<MI 20ee6 MOVE.L (A7)+,(A6-0xc)> Δ+4 {[«22""»]}
<POP 20ee8-20eea StackAdj> Δ+18 {[-4-]}
<MI 20eea MOVE.L (A6-0xc),(A7)> {[4, '(A6-0xc)']}
<MI 20eec CLR.B -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]}
<Const 0x20eee 0x2.2> Δ-2 {[4, '(A6-0xc)']|[#0]|[#2]}
<Const 0x20ef0 0x0.4> Δ-4 {[4, '(A6-0xc)']|[#0]|[#2]|[##0]}
<Pointer.fp 0x20ef4 <LVAR -0x004 @>> Δ-4 {[4, '(A6-0xc)']|[#0]|[#2]|[##0]|[@@-4]}
<Pointer.fp 0x20ef6 <LVAR -0x008 @ 4(r)>> Δ-4 {[4, '(A6-0xc)']|[#0]|[#2]|[##0]|[@@-4]|[@@-8]}
<Call 0x20ef8 0x10380> {[4, '(A6-0xc)']|[#0]|[#2]|[##0]|[@@-4]|[@@-8]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 20efe-20f02 StackAdj> Δ+20 {}
<Pointer.fp 0x20f02 <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x20f04 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<MI 20f0a MOVE.L (A6-0x8),(A7)> {[4, '(A6-0x8)']}
<Const 0x20f0c 0xb.2> Δ-2 {[4, '(A6-0x8)']|[#11]}
<MI 20f10 CLR.W -(A7)> Δ-2 {[4, '(A6-0x8)']|[#11]|[#0]}
<Const 0x20f12 0x200.2> Δ-2 {[4, '(A6-0x8)']|[#11]|[#0]|[#512]}
<Const 0x20f16 0x2.2> Δ-2 {[4, '(A6-0x8)']|[#11]|[#0]|[#512]|[#2]}
<MI 20f18 LEA.L (A6-0x80c),A0> {[4, '(A6-0x8)']|[#11]|[#0]|[#512]|[#2]}
<MI 20f1c MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x8)']|[#11]|[#0]|[#512]|[#2]|[4, 'A0']}
<Pointer.fp 0x20f1e <LVAR -0x004 @>> Δ-4 {[4, '(A6-0x8)']|[#11]|[#0]|[#512]|[#2]|[4, 'A0']|[@@-4]}
<Call 0x20f20 0x10384> {[4, '(A6-0x8)']|[#11]|[#0]|[#512]|[#2]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 20f26-20f2a StackAdj> Δ+16 {[4, '(A6-0x8)']}
<MI 20f2a MOVE.L (A6-0x8),(A7)> {[4, '(A6-0x8)']}
<Const 0x20f2c 0xc.2> Δ-2 {[4, '(A6-0x8)']|[#12]}
<MI 20f30 CLR.W -(A7)> Δ-2 {[4, '(A6-0x8)']|[#12]|[#0]}
<Const 0x20f32 0x200.2> Δ-2 {[4, '(A6-0x8)']|[#12]|[#0]|[#512]}
<Const 0x20f36 0x2.2> Δ-2 {[4, '(A6-0x8)']|[#12]|[#0]|[#512]|[#2]}
<MI 20f38 LEA.L (A6-0x40c),A0> {[4, '(A6-0x8)']|[#12]|[#0]|[#512]|[#2]}
<MI 20f3c MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x8)']|[#12]|[#0]|[#512]|[#2]|[4, 'A0']}
<Pointer.fp 0x20f3e <LVAR -0x004 @>> Δ-4 {[4, '(A6-0x8)']|[#12]|[#0]|[#512]|[#2]|[4, 'A0']|[@@-4]}
<Call 0x20f40 0x10384> {[4, '(A6-0x8)']|[#12]|[#0]|[#512]|[#2]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 20f46-20f48 StackAdj> Δ+18 {[-2-]}
<MI 20f48 CLR.B (A7)> {[-2-]}
<Const 0x20f4a 0x2.2> Δ-2 {[-2-]|[#2]}
<Const 0x20f4c 0x1.4> Δ-4 {[-2-]|[#2]|[##1]}
<Pointer.fp 0x20f50 <LVAR -0x004 @>> Δ-4 {[-2-]|[#2]|[##1]|[@@-4]}
<Pointer.fp 0x20f52 <LVAR -0x008 @ 4(r)>> Δ-4 {[-2-]|[#2]|[##1]|[@@-4]|[@@-8]}
<Call 0x20f54 0x1038c> {[-2-]|[#2]|[##1]|[@@-4]|[@@-8]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 20f5a-20f5e StackAdj> Δ+16 {}
<MI 20f5e MOVEQ.L #0x00,D7> {}
<POP 20f60-20fa0 Naked> Σ0 ↓ →0x20f60 ←0x20f60
<POP 0x20f60 LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {}
<MI 20f6a MOVE.L D7,D0> {}
<MI 20f6c ASL.L #0x1,D0> {}
<MI 20f6e LEA.L 0x224e6,A0> {}
<MI 20f74 MOVE.L #0x3ff,D1> {}
<MI 20f76 SUB.L D7,D1> {}
<POP 0x20f78 LimitCheck 0x0 ≤ D1 ≤ 0x3ff> {}
<MI 20f7e ASL.L #0x1,D1> {}
<MI 20f80 LEA.L (A6-0x810),A1> {}
<MI 20f84 MOVE.W (A1+D1.L+#0x4),D2> {}
<MI 20f88 LSR.W #0x8,D2> {}
<MI 20f8a MOVE.B D2,(A0+D0.L+#0xc)> {}
<MI 20f8e MOVE.W (A1+D1.L+#0x4),D1> {}
<MI 20f92 ANDI.W #0x00ff,D1> {}
<MI 20f96 MOVE.B D1,(A0+D0.L+#0xd)> {}
<MI 20f9a ADDQ.L #0x1,D7> {}
<MI 20f9c CMP.L #0x3ff,D7> {}
<MI 20f9e BLE 0x20f60> {}
<POP 20fa0-20fa6 Naked> Σ0 ↓
<MI 20fa0 MOVE.L #0x3ff,0x224ee> {}
<POP 20fa6-20fae Epilogue> Σ0
@ 20fae
<LVAR -0x004 @ 4(rw)>
<POP 20fae-210ac Body> Δ+4
<POP 20fae-20fc4 Prologue> Σ0 ↓
<POP 20fc4-20fd8 RegCacheLoad> Σ0 ↓
<POP 20fd8-21036 Naked> Σ0 ↓ →0x2103e
<POP 20fd8-20fda StackAdj> Δ-4 {[-4-]}
<Call 0x20fda 0x20ad4> {[-4-]}
<MI 20fde MOVE.L (A7)+,D0> Δ+4 {}
<MI 20fe0 MOVE.L D0,0x23512> {}
<MI 20fe6 MOVE.L D0,D1> {}
<MI 20fe8 SUBQ.L #0x1,D1> {}
<MI 20fea MOVE.L D1,D2> {}
<MI 20fec ASL.L #0x1,D2> {}
<MI 20fee MOVE.L D2,0x234fa> {}
<MI 20ff4 MOVE.L D0,0x2350a> {}
<MI 20ff6 SUBQ.L #0x2,0x2350a> {}
<MI 20ff8 MOVE.L 0x2350a,D4> {}
<MI 20ffa MOVEQ.L #0x02,D3> {}
<Call 0x20ffc 0x10294> {}
?divs_d3_d4
<MI 21002 SUBQ.L #0x1,D4> {}
<MI 21004 MOVE.L D4,0x2351a> {}
<MI 2100a MOVE.L D0,0x23502> {}
<MI 21010 MOVE.L D1,0x23506> {}
<MI 21016 MOVE.L D0,D4> {}
<MI 21018 MOVEQ.L #0x06,D3> {}
<Call 0x2101a 0x10294> {}
?divs_d3_d4
<MI 21020 MOVE.L D4,0x2350e> {}
<POP 21026-21028 StackAdj> Δ-4 {[-4-]}
<Call 0x21028 0x103c4> {[-4-]}
GetArgv() : String
<MI 2102e MOVE.L (A7)+,(A6-0x4)> Δ+4 {}
<MI 21030 MOVEA.L (A6-0x4),A0> {}
<MI 21032 TST.W (A0)> {}
<MI 21034 BEQ 0x2103e> {}
<POP 21036-2103e Naked> Σ0 Δ-4 →0x2104a
<MI 21036 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<Call 0x21038 0x20cd6> {[4, '(A6-0x4)']}
<MI 2103c BRA 0x2104a> {[4, '(A6-0x4)']}
<POP 2103e-2104a Naked> Σ0 Δ-4 ↓ ←0x20fd8
<Call 0x2103e 0x20e6e> {}
<Pointer.fp 0x21042 <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x21044 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 2104a-210a4 Naked> Σ-4 Δ+4 ↓ ←0x21036
<POP 2104a-2104c StackAdj> Δ+4 {}
<MI 2104c MOVE.L 0x224ee,0x234f2> {}
<MI 21052 ADDQ.L #0x1,0x234f2> {}
<POP 21054-21056 StackAdj> Δ-4 {[-4-]}
<Const 0x21056 0x1.4> Δ-4 {[-4-]|[##1]}
<Blob 0x21058 [4] 0x2350a> Δ-4 {[-4-]|[##1]|[«4»]}
<Call 0x2105a 0x208ac> {[-4-]|[##1]|[«4»]}
<POP 2105e-21060 StackAdj> Δ+8 {[-4-]}
<MI 21060 MOVEA.L (A7)+,A0> Δ+4 {}
<MI 21062 MOVE.L A0,(A6-0x4)> {}
<MI 21064 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Const 0x21066 0x1b.2> Δ-2 {[4, 'A0']|[#27]}
<Call 0x2106a 0x102c0> {[4, 'A0']|[#27]}
AppendChar(MOD b : String; a : char)
<POP 21070-21072 StackAdj> Δ+2 {[4, 'A0']}
<MI 21072 MOVE.L A0,(A7)> {[4, 'A0']}
<Const 0x21074 0x3d.2> Δ-2 {[4, 'A0']|[#61]}
<Call 0x21078 0x102c0> {[4, 'A0']|[#61]}
AppendChar(MOD b : String; a : char)
<POP 2107e-21080 StackAdj> Δ+2 {[4, 'A0']}
<MI 21080 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']|[4, 'A0']}
<POP 21082-21084 StackAdj> Δ-4 {[4, 'A0']|[4, 'A0']|[-4-]}
<Const 0x21084 0x1.4> Δ-4 {[4, 'A0']|[4, 'A0']|[-4-]|[##1]}
<Const 0x21086 0x1.4> Δ-4 {[4, 'A0']|[4, 'A0']|[-4-]|[##1]|[##1]}
<Call 0x21088 0x2082a> {[4, 'A0']|[4, 'A0']|[-4-]|[##1]|[##1]}
<POP 2108c-2108e StackAdj> Δ+4 {[4, 'A0']|[4, 'A0']|[-4-]|[##1]}
<Call 0x2108e 0x209b4> {[4, 'A0']|[4, 'A0']|[-4-]|[##1]}
<Call 0x21092 0x102d4> {[4, 'A0']|[4, 'A0']|[-4-]|[##1]}
StringCat3(a, b, c : String) : String
<POP 21098-2109c StackAdj> Δ+12 {[4, 'A0']}
<Call 0x2109c 0x103d8> {[4, 'A0']}
WriteConsoleString(str : String)
<POP 210a2-210a4 StackAdj> Δ+4 {}
<POP 210a4-210ac Epilogue> Σ0
@ 210ac
<LVAR 0x00a 4(w)>
<LVAR 0x008 2(r)>
<LVAR -0x006 @ 4(rw)>
<POP 210ac-21540 Body> Δ+738
<POP 210ac-210c2 Prologue> Σ0 ↓
<POP 210c2-210d4 RegCacheLoad> Σ0 ↓
<POP 210d4-210de Naked> Σ0 ↓ →0x2110a
<MI 210d4 MOVE.W (A6+0x8),D0> {}
<MI 210d8 CMPI.W #0x0146,D0> {}
<MI 210dc BNE 0x2110a> {}
<POP 210de-2110a Naked> Σ0 →0x21534
<Blob 0x210de [12] @> Δ-12 {[«12""»]}
<POP 210f0-210f2 StackAdj> Δ-4 {[«12""»]|[-4-]}
<Lit 0x210f2 11> {[«12""»]|[$$ADA_DEFINED]}
<MI 21100 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«12""»]}
<POP 21102-21106 StackAdj> Δ+12 {}
<MI 21106 BRA 0x21534> {}
<POP 2110a-21110 Naked> Σ0 ↓ →0x2112c ←0x210d4
<MI 2110a CMPI.W #0x0147,D0> {}
<MI 2110e BNE 0x2112c> {}
<POP 21110-21126 Naked> Σ0 Δ-4 ↓
<Blob 0x21110 [4] @> Δ-4 {[«4""»]}
<POP 21114-21116 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x21116 4> {[«4""»]|[$$MILD]}
<MI 21124 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«4""»]}
<POP 21126-2112c Naked> Σ-4 Δ+4 →0x21534 ←0x21162
<POP 21126-21128 StackAdj> Δ+4 {}
<MI 21128 BRA 0x21534> {}
<POP 2112c-21132 Naked> Σ0 ↓ →0x21156 ←0x2110a
<MI 2112c CMPI.W #0x01f9,D0> {}
<MI 21130 BNE 0x21156> {}
<POP 21132-21156 Naked> Σ0 →0x21534
<Blob 0x21132 [2] @> Δ-2 {[«2""»]}
<Blob 0x21136 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x2113a [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 2113e-21140 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x21140 6> {[«2""»]|[«2""»]|[«2""»]|[$$SEVERE]}
<MI 2114e MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 21150-21152 StackAdj> Δ+6 {}
<MI 21152 BRA 0x21534> {}
<POP 21156-2115c Naked> Σ0 ↓ →0x21162 ←0x2112c
<MI 21156 CMPI.W #0x0100,D0> {}
<MI 2115a BCS 0x21162> {}
<POP 2115c-21162 Naked> Σ0 ↓ →0x2116c
<MI 2115c CMPI.W #0x01ff,D0> {}
<MI 21160 BLS 0x2116c> {}
<POP 21162-2116c Naked> Σ0 Δ-4 →0x21126 ←0x21156
<Pointer.fp 0x21162 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x21164 0x102b8> {[@@-6]}
NewString(VAR a : String)
<MI 2116a BRA 0x21126> {[@@-6]}
<POP 2116c-2118e Naked> Σ0 →0x211ce →0x211fa →0x21214 →0x2123a →0x21260 →0x2128c →0x212a0 →0x212ae →0x212c4 →0x212e6 →0x212f6 →0x21306 →0x2132e →0x21350 →0x21372 →0x21388 →0x21398 →0x213ac →0x213ba →0x213ca →0x213ea →0x21412 →0x21422 →0x21436 →0x2144a →0x2145e →0x21478 →0x21488 →0x2149c →0x214b0 →0x214c4 →0x214de ←0x2115c
<MI 2116c MOVE.W D0,D1> {}
<MI 2116e ANDI.W #0x0007,D1> {}
<MI 21172 CLR.L D2> {}
<MI 21174 MOVE.W D1,D2> {}
<MI 21176 MOVE.L D2,D7> {}
<MI 21178 LSR.W #0x3,D0> {}
<MI 2117a SUB.W #0x20,D0> {}
<POP 0x2117c LimitCheck 0x0 ≤ D0 ≤ 0x1f> {}
<MI 21184 ADD.W D0,D0> {}
<MI 21186 SWITCH D0.W> {}
<POP 211ce-211e0 Naked> Σ0 Δ-26 ↓ ←0x2116c
<Blob 0x211ce [26] @> Δ-26 {[«26""»]}
<POP 211e0-211ec Naked> Σ-26 Δ-12 ↓ ←0x21372
<POP 211e0-211e2 StackAdj> Δ-4 {[-30-]}
<Pointer.sp 0x211e2 4> Δ-4 {[-30-]|[^^4]}
<Const 0x211e6 0x1.2> Δ-2 {[-30-]|[^^4]|[#1]}
<Const 0x211e8 0x19.2> Δ-2 {[-30-]|[^^4]|[#1]|[#25]}
<POP 211ec-211fa Naked> Σ-38 Δ+38 →0x21506 ←0x21206
<Call 0x211ec 0x102c4> {[-38-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 211ee-211f0 StackAdj> Δ+8 {[-30-]}
<MI 211f0 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-26-]}
<POP 211f2-211f6 StackAdj> Δ+26 {}
<MI 211f6 BRA 0x21506> {}
<POP 211fa-21206 Naked> Σ0 Δ-26 ↓ ←0x2116c
<Blob 0x211fa [26] @> Δ-26 {[«26""»]}
<POP 21206-21214 Naked> Σ-26 Δ-12 →0x211ec ←0x21388 ←0x21478
<POP 21206-21208 StackAdj> Δ-4 {[-30-]}
<Pointer.sp 0x21208 4> Δ-4 {[-30-]|[^^4]}
<Const 0x2120c 0x1.2> Δ-2 {[-30-]|[^^4]|[#1]}
<Const 0x2120e 0x1a.2> Δ-2 {[-30-]|[^^4]|[#1]|[#26]}
<MI 21212 BRA 0x211ec> {[-30-]|[^^4]|[#1]|[#26]}
<POP 21214-21220 Naked> Σ0 Δ-24 ↓ ←0x2116c
<Blob 0x21214 [24] @> Δ-24 {[«24""»]}
<POP 21220-2122c Naked> Σ-24 Δ-12 ↓ ←0x212e6 ←0x213ba ←0x21412
<POP 21220-21222 StackAdj> Δ-4 {[-28-]}
<Pointer.sp 0x21222 4> Δ-4 {[-28-]|[^^4]}
<Const 0x21226 0x1.2> Δ-2 {[-28-]|[^^4]|[#1]}
<Const 0x21228 0x18.2> Δ-2 {[-28-]|[^^4]|[#1]|[#24]}
<POP 2122c-2123a Naked> Σ-36 Δ+36 →0x21506 ←0x212c4
<Call 0x2122c 0x102c4> {[-36-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2122e-21230 StackAdj> Δ+8 {[-28-]}
<MI 21230 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-24-]}
<POP 21232-21236 StackAdj> Δ+24 {}
<MI 21236 BRA 0x21506> {}
<POP 2123a-21246 Naked> Σ0 Δ-22 ↓ ←0x2116c
<Blob 0x2123a [22] @> Δ-22 {[«22""»]}
<POP 21246-21252 Naked> Σ-22 Δ-12 ↓ ←0x212a0 ←0x212f6
<POP 21246-21248 StackAdj> Δ-4 {[-26-]}
<Pointer.sp 0x21248 4> Δ-4 {[-26-]|[^^4]}
<Const 0x2124c 0x1.2> Δ-2 {[-26-]|[^^4]|[#1]}
<Const 0x2124e 0x16.2> Δ-2 {[-26-]|[^^4]|[#1]|[#22]}
<POP 21252-21260 Naked> Σ-34 Δ+34 →0x21506 ←0x21350
<Call 0x21252 0x102c4> {[-34-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21254-21256 StackAdj> Δ+8 {[-26-]}
<MI 21256 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-22-]}
<POP 21258-2125c StackAdj> Δ+22 {}
<MI 2125c BRA 0x21506> {}
<POP 21260-21272 Naked> Σ0 Δ-18 ↓ ←0x2116c
<Blob 0x21260 [18] @> Δ-18 {[«18""»]}
<POP 21272-2128c Naked> Σ-18 Δ+18 →0x21506 ←0x2128c
<POP 21272-21274 StackAdj> Δ-4 {[-22-]}
<Lit 0x21274> {[-18-]|[$$…]}
<Pointer.sp 0x21274 4> Δ-4
<Const 0x21278 0x1.2> Δ-2
<Const 0x2127a 0x11.2> Δ-2
<Call 0x2127e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21280-21282 StackAdj> Δ+8
<MI 21282 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-18-]}
<POP 21284-21288 StackAdj> Δ+18 {}
<MI 21288 BRA 0x21506> {}
<POP 2128c-212a0 Naked> Σ0 Δ-18 →0x21272 ←0x2116c
<Blob 0x2128c [18] @> Δ-18 {[«18""»]}
<MI 2129e BRA 0x21272> {[«18""»]}
<POP 212a0-212ae Naked> Σ0 Δ-22 →0x21246 ←0x2116c
<Blob 0x212a0 [22] @> Δ-22 {[«22""»]}
<MI 212ac BRA 0x21246> {[«22""»]}
<POP 212ae-212c4 Naked> Σ0 Δ-28 →0x214f0 ←0x2116c
<Blob 0x212ae [28] @> Δ-28 {[«28""»]}
<MI 212c0 BRA 0x214f0> {[«28""»]}
<POP 212c4-212e6 Naked> Σ0 Δ-36 →0x2122c ←0x2116c
<Blob 0x212c4 [24] @> Δ-24 {[«24""»]}
<POP 212d6-212d8 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Pointer.sp 0x212d8 4> Δ-4 {[«24""»]|[-4-]|[^^4]}
<Const 0x212dc 0x1.2> Δ-2 {[«24""»]|[-4-]|[^^4]|[#1]}
<Const 0x212de 0x17.2> Δ-2 {[«24""»]|[-4-]|[^^4]|[#1]|[#23]}
<MI 212e2 BRA 0x2122c> {[«24""»]|[-4-]|[^^4]|[#1]|[#23]}
<POP 212e6-212f6 Naked> Σ0 Δ-24 →0x21220 ←0x2116c
<Blob 0x212e6 [24] @> Δ-24 {[«24""»]}
<MI 212f2 BRA 0x21220> {[«24""»]}
<POP 212f6-21306 Naked> Σ0 Δ-22 →0x21246 ←0x2116c
<Blob 0x212f6 [22] @> Δ-22 {[«22""»]}
<MI 21302 BRA 0x21246> {[«22""»]}
<POP 21306-21316 Naked> Σ0 Δ-34 ↓ ←0x2116c
<Blob 0x21306 [34] @> Δ-34 {[«34""»]}
<POP 21316-21322 Naked> Σ-34 Δ-12 ↓ ←0x21398 ←0x21422 ←0x21436 ←0x2144a
<POP 21316-21318 StackAdj> Δ-4 {[-38-]}
<Pointer.sp 0x21318 4> Δ-4 {[-38-]|[^^4]}
<Const 0x2131c 0x1.2> Δ-2 {[-38-]|[^^4]|[#1]}
<Const 0x2131e 0x21.2> Δ-2 {[-38-]|[^^4]|[#1]|[#33]}
<POP 21322-2132e Naked> Σ-46 Δ+46 →0x21506 ←0x2145e
<Call 0x21322 0x102c4> {[-46-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21324-21326 StackAdj> Δ+8 {[-38-]}
<MI 21326 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-34-]}
<POP 21328-2132a StackAdj> Δ+34 {}
<MI 2132a BRA 0x21506> {}
<POP 2132e-2133a Naked> Σ0 Δ-30 ↓ ←0x2116c
<Blob 0x2132e [30] @> Δ-30 {[«30""»]}
<POP 2133a-21344 Naked> Σ-30 Δ-12 ↓ ←0x213ac
<POP 2133a-2133c StackAdj> Δ-4 {[-34-]}
<Pointer.sp 0x2133c 4> Δ-4 {[-34-]|[^^4]}
<Const 0x21340 0x1.2> Δ-2 {[-34-]|[^^4]|[#1]}
<Const 0x21342 0x1e.2> Δ-2 {[-34-]|[^^4]|[#1]|[#30]}
<POP 21344-21350 Naked> Σ-42 Δ+42 →0x21506 ←0x213da
<Call 0x21344 0x102c4> {[-42-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21346-21348 StackAdj> Δ+8 {[-34-]}
<MI 21348 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-30-]}
<POP 2134a-2134c StackAdj> Δ+30 {}
<MI 2134c BRA 0x21506> {}
<POP 21350-21372 Naked> Σ0 Δ-34 →0x21252 ←0x2116c
<Blob 0x21350 [22] @> Δ-22 {[«22""»]}
<POP 21362-21364 StackAdj> Δ-4 {[«22""»]|[-4-]}
<Pointer.sp 0x21364 4> Δ-4 {[«22""»]|[-4-]|[^^4]}
<Const 0x21368 0x1.2> Δ-2 {[«22""»]|[-4-]|[^^4]|[#1]}
<Const 0x2136a 0x15.2> Δ-2 {[«22""»]|[-4-]|[^^4]|[#1]|[#21]}
<MI 2136e BRA 0x21252> {[«22""»]|[-4-]|[^^4]|[#1]|[#21]}
<POP 21372-21388 Naked> Σ0 Δ-26 →0x211e0 ←0x2116c
<Blob 0x21372 [26] @> Δ-26 {[«26""»]}
<MI 21384 BRA 0x211e0> {[«26""»]}
<POP 21388-21398 Naked> Σ0 Δ-26 →0x21206 ←0x2116c
<Blob 0x21388 [26] @> Δ-26 {[«26""»]}
<MI 21394 BRA 0x21206> {[«26""»]}
<POP 21398-213ac Naked> Σ0 Δ-34 →0x21316 ←0x2116c
<Blob 0x21398 [34] @> Δ-34 {[«34""»]}
<MI 213a8 BRA 0x21316> {[«34""»]}
<POP 213ac-213ba Naked> Σ0 Δ-30 →0x2133a ←0x2116c
<Blob 0x213ac [30] @> Δ-30 {[«30""»]}
<MI 213b8 BRA 0x2133a> {[«30""»]}
<POP 213ba-213ca Naked> Σ0 Δ-24 →0x21220 ←0x2116c
<Blob 0x213ba [24] @> Δ-24 {[«24""»]}
<MI 213c6 BRA 0x21220> {[«24""»]}
<POP 213ca-213da Naked> Σ0 Δ-30 ↓ ←0x2116c
<Blob 0x213ca [30] @> Δ-30 {[«30""»]}
<POP 213da-213ea Naked> Σ-30 Δ-12 →0x21344 ←0x2149c ←0x214b0
<POP 213da-213dc StackAdj> Δ-4 {[-34-]}
<Pointer.sp 0x213dc 4> Δ-4 {[-34-]|[^^4]}
<Const 0x213e0 0x1.2> Δ-2 {[-34-]|[^^4]|[#1]}
<Const 0x213e2 0x1d.2> Δ-2 {[-34-]|[^^4]|[#1]|[#29]}
<MI 213e6 BRA 0x21344> {[-34-]|[^^4]|[#1]|[#29]}
<POP 213ea-213fa Naked> Σ0 Δ-32 ↓ ←0x2116c
<Blob 0x213ea [32] @> Δ-32 {[«32""»]}
<POP 213fa-21412 Naked> Σ-32 Δ+32 →0x21506 ←0x21488
<POP 213fa-213fc StackAdj> Δ-4 {[-36-]}
<Lit 0x213fc> {[-32-]|[$$…]}
<Pointer.sp 0x213fc 4> Δ-4
<Const 0x21400 0x1.2> Δ-2
<Const 0x21402 0x1f.2> Δ-2
<Call 0x21406 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21408-2140a StackAdj> Δ+8
<MI 2140a MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-32-]}
<POP 2140c-2140e StackAdj> Δ+32 {}
<MI 2140e BRA 0x21506> {}
<POP 21412-21422 Naked> Σ0 Δ-24 →0x21220 ←0x2116c
<Blob 0x21412 [24] @> Δ-24 {[«24""»]}
<MI 2141e BRA 0x21220> {[«24""»]}
<POP 21422-21436 Naked> Σ0 Δ-34 →0x21316 ←0x2116c
<Blob 0x21422 [34] @> Δ-34 {[«34""»]}
<MI 21432 BRA 0x21316> {[«34""»]}
<POP 21436-2144a Naked> Σ0 Δ-34 →0x21316 ←0x2116c
<Blob 0x21436 [34] @> Δ-34 {[«34""»]}
<MI 21446 BRA 0x21316> {[«34""»]}
<POP 2144a-2145e Naked> Σ0 Δ-34 →0x21316 ←0x2116c
<Blob 0x2144a [34] @> Δ-34 {[«34""»]}
<MI 2145a BRA 0x21316> {[«34""»]}
<POP 2145e-21478 Naked> Σ0 Δ-46 →0x21322 ←0x2116c
<Blob 0x2145e [34] @> Δ-34 {[«34""»]}
<POP 2146a-2146c StackAdj> Δ-4 {[«34""»]|[-4-]}
<Pointer.sp 0x2146c 4> Δ-4 {[«34""»]|[-4-]|[^^4]}
<Const 0x21470 0x1.2> Δ-2 {[«34""»]|[-4-]|[^^4]|[#1]}
<Const 0x21472 0x22.2> Δ-2 {[«34""»]|[-4-]|[^^4]|[#1]|[#34]}
<MI 21474 BRA 0x21322> {[«34""»]|[-4-]|[^^4]|[#1]|[#34]}
<POP 21478-21488 Naked> Σ0 Δ-26 →0x21206 ←0x2116c
<Blob 0x21478 [26] @> Δ-26 {[«26""»]}
<MI 21484 BRA 0x21206> {[«26""»]}
<POP 21488-2149c Naked> Σ0 Δ-32 →0x213fa ←0x2116c
<Blob 0x21488 [32] @> Δ-32 {[«32""»]}
<MI 21498 BRA 0x213fa> {[«32""»]}
<POP 2149c-214b0 Naked> Σ0 Δ-30 →0x213da ←0x2116c
<Blob 0x2149c [30] @> Δ-30 {[«30""»]}
<MI 214ac BRA 0x213da> {[«30""»]}
<POP 214b0-214c4 Naked> Σ0 Δ-30 →0x213da ←0x2116c
<Blob 0x214b0 [30] @> Δ-30 {[«30""»]}
<MI 214c0 BRA 0x213da> {[«30""»]}
<POP 214c4-214de Naked> Σ0 Δ-40 →0x214fc ←0x2116c
<Blob 0x214c4 [28] @> Δ-28 {[«28""»]}
<POP 214d0-214d2 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Pointer.sp 0x214d2 4> Δ-4 {[«28""»]|[-4-]|[^^4]}
<Const 0x214d6 0x1.2> Δ-2 {[«28""»]|[-4-]|[^^4]|[#1]}
<Const 0x214d8 0x1c.2> Δ-2 {[«28""»]|[-4-]|[^^4]|[#1]|[#28]}
<MI 214dc BRA 0x214fc> {[«28""»]|[-4-]|[^^4]|[#1]|[#28]}
<POP 214de-214f0 Naked> Σ0 Δ-28 ↓ ←0x2116c
<Blob 0x214de [28] @> Δ-28 {[«28""»]}
<POP 214f0-214fc Naked> Σ-28 Δ-12 ↓ ←0x212ae
<POP 214f0-214f2 StackAdj> Δ-4 {[-32-]}
<Pointer.sp 0x214f2 4> Δ-4 {[-32-]|[^^4]}
<Const 0x214f6 0x1.2> Δ-2 {[-32-]|[^^4]|[#1]}
<Const 0x214f8 0x1b.2> Δ-2 {[-32-]|[^^4]|[#1]|[#27]}
<POP 214fc-21506 Naked> Σ-40 Δ+40 ↓ ←0x214c4
<Call 0x214fc 0x102c4> {[-40-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 214fe-21500 StackAdj> Δ+8 {[-32-]}
<MI 21500 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-28-]}
<POP 21502-21506 StackAdj> Δ+28 {}
<POP 21506-21534 Naked> Σ0 ↓ ←0x211ec ←0x2122c ←0x21252 ←0x21272 ←0x21322 ←0x21344 ←0x213fa
<Blob 0x21506 [2] @> Δ-2 {[«2""»]}
<POP 2150a-2150c StackAdj> Δ-4 {[«2""»]|[-4-]}
<MI 2150c MOVE.L (A6-0x6),-(A7)> Δ-4 {[«2""»]|[-4-]|[4, '(A6-0x6)']}
<POP 2150e-21510 StackAdj> Δ-4 {[«2""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
<Lit 0x21510 2> {[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$+ ]}
<MI 2151c MOVE.L D7,(A7)> {[«2""»]|[-4-]|[4, '(A6-0x6)']|[4, 'D7']}
<POP 2151a-2151c StackAdj> Δ-8 {[«2""»]|[-4-]|[4, '(A6-0x6)']|[4, 'D7']|[-8-]}
<Call 0x2151e 0x102e4> {[«2""»]|[-4-]|[4, '(A6-0x6)']|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 21524-21526 StackAdj> Δ+4 {[«2""»]|[-4-]|[4, '(A6-0x6)']|[4, 'D7']|[-4-]}
<Call 0x21526 0x102d4> {[«2""»]|[-4-]|[4, '(A6-0x6)']|[4, 'D7']|[-4-]}
StringCat3(a, b, c : String) : String
<POP 2152c-21530 StackAdj> Δ+12 {[«2""»]|[-4-]}
<MI 21530 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«2""»]}
<POP 21532-21534 StackAdj> Δ+2 {}
<POP 21534-21538 Naked> Σ0 ↓ ←0x210de ←0x21126 ←0x21132
<MI 21534 MOVE.L (A6-0x6),(A6+0xa)> {}
<POP 21538-21540 Epilogue> Σ0
@ 21540
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 21540-21700 Body> Δ+6
<POP 21540-21556 Prologue> Σ0 ↓
<POP 21556-21564 RegCacheLoad> Σ0 ↓
<POP 21564-215ac Naked> Σ0 ↓ →0x215c4
<MI 21564 MOVE.L (A6+0x8),D0> {}
<POP 0x21566 LimitCheck 0x0 ≤ D0 ≤ 0x7ff> {}
<MI 21570 ASL.L #0x1,D0> {}
<MI 21572 LEA.L 0x224e6,A0> {}
<MI 21578 CLR.L D1> {}
<MI 2157a MOVE.B (A0+D0.L+#0xc),D1> {}
<MI 2157e ASL.W #0x8,D1> {}
<MI 21580 CLR.L D2> {}
<MI 21582 MOVE.B (A0+D0.L+#0xd),D2> {}
<MI 21586 ADD.W D1,D2> {}
<MI 21588 MOVE.W D2,D7> {}
<POP 2158a-2158c StackAdj> Δ-8 {[-8-]}
<MI 2158c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Call 0x2158e 0x102e4> {[-8-]|[4, '(A6+0x8)']}
Long2String(a : Long) : String
<POP 21594-21596 StackAdj> Δ+4 {[-8-]}
<Const 0x21596 0x5.4> Δ-4 {[-8-]|[##5]}
<Call 0x2159a 0x102f4> {[-8-]|[##5]}
RightPad(a : String; b : Long) : String
<POP 215a0-215a2 StackAdj> Δ+8 {[-4-]}
<MI 215a2 MOVEA.L (A7)+,A3> Δ+4 {}
<MI 215a4 MOVE.L (A6+0x8),D0> {}
<MI 215a6 CMP.L (A4+0x24),D0> {}
<MI 215aa BNE 0x215c4> {}
<POP 215ac-215c4 Naked> Σ0 ↓
<POP 215ac-215ae StackAdj> Δ-8 {[-8-]}
<Call 0x215ae 0x209fa> {[-8-]}
<MI 215b2 MOVE.L A3,-(A7)> Δ-4 {[-8-]|[4, 'A3']}
<POP 215b4-215b6 StackAdj> Δ-4 {[-8-]|[4, 'A3']|[-4-]}
<Call 0x215b6 0x20a48> {[-8-]|[4, 'A3']|[-4-]}
<Call 0x215ba 0x102d4> {[-8-]|[4, 'A3']|[-4-]}
StringCat3(a, b, c : String) : String
<POP 215c0-215c2 StackAdj> Δ+12 {[-4-]}
<MI 215c2 MOVEA.L (A7)+,A3> Δ+4 {}
<POP 215c4-215e4 Naked> Σ0 ↓ →0x215ea ←0x21564
<POP 215c4-215c6 StackAdj> Δ-8 {[-8-]}
<MI 215c6 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6+0xc)']}
<Const 0x215ca 0x1.4> Δ-4 {[-8-]|[4, '(A6+0xc)']|[##1]}
<Call 0x215ce 0x2082a> {[-8-]|[4, '(A6+0xc)']|[##1]}
<POP 215d2-215d4 StackAdj> Δ+4 {[-8-]|[4, '(A6+0xc)']}
<MI 215d4 MOVE.L A3,(A7)> {[-8-]|[4, 'A3']}
<Call 0x215d6 0x102d0> {[-8-]|[4, 'A3']}
StringCat2(a, b : String) : String
<POP 215d8-215da StackAdj> Δ+8 {[-4-]}
<MI 215da MOVEA.L (A7)+,A3> Δ+4 {}
<MI 215dc MOVE.W D7,D0> {}
<MI 215de ANDI.W #0x4000,D0> {}
<MI 215e2 BEQ 0x215ea> {}
<POP 215e4-215ea Naked> Σ0 Δ-2 →0x215ee
<Blob 0x215e4 [2] @> Δ-2 {[«2""»]}
<MI 215e8 BRA 0x215ee> {[«2""»]}
<POP 215ea-215ee Naked> Σ0 Δ-2 ↓ ←0x215c4
<Blob 0x215ea [2] @> Δ-2 {[«2""»]}
<POP 215ee-21616 Naked> Σ-2 Δ+2 ↓ →0x2162a ←0x215e4
<POP 215ee-215f0 StackAdj> Δ-4 {[-6-]}
<MI 215f0 MOVE.L A3,-(A7)> Δ-4 {[-6-]|[4, 'A3']}
<POP 215f2-215f4 StackAdj> Δ-4 {[-6-]|[4, 'A3']|[-4-]}
<Lit 0x215f4> {[-6-]|[4, 'A3']|[$$…]}
<Pointer.sp 0x215f4 12> Δ-4
<Const 0x215f8 0x1.2> Δ-2
<Const 0x215fa 0x2.2> Δ-2
<Call 0x215fe 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21604-21606 StackAdj> Δ+8
<Call 0x21606 0x102d0> {[-6-]|[4, 'A3']|[$$…]}
StringCat2(a, b : String) : String
<POP 21608-2160a StackAdj> Δ+8 {[-6-]}
<MI 2160a MOVEA.L (A7)+,A3> Δ+4 {[-2-]}
<POP 2160c-2160e StackAdj> Δ+2 {}
<MI 2160e MOVE.W D7,D0> {}
<MI 21610 ANDI.W #0x8000,D0> {}
<MI 21614 BEQ 0x2162a> {}
<POP 21616-2162a Naked> Σ0 Δ-4 →0x2163c
<POP 21616-21618 StackAdj> Δ-4 {[-4-]}
<POP 21618-21619 StackAdj> Δ+2 {[-2-]}
<Blob 0x21619 [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 2161c MOVE.B 0x20575,(A7+0x1)> {[-2-]|[«2""»]}
<MI 21622 MOVE.B 0x20576,(A7+0x2)> {[-2-]|[«2""»]}
<MI 21628 BRA 0x2163c> {[-2-]|[«2""»]}
<POP 2162a-2163c Naked> Σ0 Δ-4 ↓ ←0x215ee
<POP 2162a-2162c StackAdj> Δ-4 {[-4-]}
<POP 2162c-2162d StackAdj> Δ+2 {[-2-]}
<Blob 0x2162d [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 21630 MOVE.B 0x20579,(A7+0x1)> {[-2-]|[«2""»]}
<MI 21636 MOVE.B 0x2057a,(A7+0x2)> {[-2-]|[«2""»]}
<POP 2163c-21686 Naked> Σ-4 Δ+4 ↓ →0x216b6 ←0x21616
<POP 2163c-2163e StackAdj> Δ-4 {[-8-]}
<MI 2163e MOVE.L A3,-(A7)> Δ-4 {[-8-]|[4, 'A3']}
<POP 21640-21642 StackAdj> Δ-4 {[-8-]|[4, 'A3']|[-4-]}
<Lit 0x21642> {[-8-]|[4, 'A3']|[$$…]}
<Pointer.sp 0x21642 12> Δ-4
<Const 0x21646 0x1.2> Δ-2
<Const 0x21648 0x3.2> Δ-2
<Call 0x2164c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21652-21654 StackAdj> Δ+8
<Call 0x21654 0x102d0> {[-8-]|[4, 'A3']|[$$…]}
StringCat2(a, b : String) : String
<POP 21656-21658 StackAdj> Δ+8 {[-8-]}
<MI 21658 MOVEA.L (A7)+,A3> Δ+4 {[-4-]}
<POP 2165a-2165c StackAdj> Δ+4 {}
<POP 2165c-2165e StackAdj> Δ-4 {[-4-]}
<MI 2165e MOVE.L A3,-(A7)> Δ-4 {[-4-]|[4, 'A3']}
<POP 21660-21662 StackAdj> Δ-4 {[-4-]|[4, 'A3']|[-4-]}
<MI 21662 MOVE.W D7,D0> {[-4-]|[4, 'A3']|[-4-]}
<MI 21664 ANDI.W #0x3fff,D0> {[-4-]|[4, 'A3']|[-4-]}
<MI 21668 CLR.L D1> {[-4-]|[4, 'A3']|[-4-]}
<MI 2166a MOVE.W D0,D1> {[-4-]|[4, 'A3']|[-4-]}
<MI 2166c MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'A3']|[-4-]|[4, 'D1']}
<Const 0x2166e 0x4.4> Δ-4 {[-4-]|[4, 'A3']|[-4-]|[4, 'D1']|[##4]}
<Call 0x21672 0x102e8> {[-4-]|[4, 'A3']|[-4-]|[4, 'D1']|[##4]}
Long2HexString(val : Long; ndig : Long) : String
<POP 21678-2167a StackAdj> Δ+8 {[-4-]|[4, 'A3']|[-4-]}
<Call 0x2167a 0x102d0> {[-4-]|[4, 'A3']|[-4-]}
StringCat2(a, b : String) : String
<POP 2167c-2167e StackAdj> Δ+8 {[-4-]}
<MI 2167e MOVEA.L (A7)+,A3> Δ+4 {}
<MI 21680 TST.B (A4+0x22)> {}
<MI 21684 BEQ 0x216b6> {}
<POP 21686-216b6 Naked> Σ0 ↓
<Blob 0x21686 [4] @> Δ-4 {[«4""»]}
<POP 2168a-2168c StackAdj> Δ-4 {[«4""»]|[-4-]}
<MI 2168c MOVE.L A3,-(A7)> Δ-4 {[«4""»]|[-4-]|[4, 'A3']}
<POP 2168e-21690 StackAdj> Δ-4 {[«4""»]|[-4-]|[4, 'A3']|[-4-]}
<Lit 0x21690 4> {[«4""»]|[-4-]|[4, 'A3']|[$$ _]}
<POP 216a0-216a2 StackAdj> Δ-6 {[«4""»]|[-4-]|[4, 'A3']|[$$ _]|[-6-]}
<MI 216a2 MOVE.W D7,(A7)> {[«4""»]|[-4-]|[4, 'A3']|[$$ _]|[-4-]|[2, 'D7']}
<Call 0x216a4 0x210ac> {[«4""»]|[-4-]|[4, 'A3']|[$$ _]|[-4-]|[2, 'D7']}
<POP 216a8-216aa StackAdj> Δ+2 {[«4""»]|[-4-]|[4, 'A3']|[$$ _]|[-4-]}
<Call 0x216aa 0x102d4> {[«4""»]|[-4-]|[4, 'A3']|[$$ _]|[-4-]}
StringCat3(a, b, c : String) : String
<POP 216b0-216b2 StackAdj> Δ+12 {[«4""»]|[-4-]}
<MI 216b2 MOVEA.L (A7)+,A3> Δ+4 {[«4""»]}
<POP 216b4-216b6 StackAdj> Δ+4 {}
<POP 216b6-216f8 Naked> Σ0 ↓ ←0x2163c
<MI 216b6 MOVE.L A3,-(A7)> Δ-4 {[4, 'A3']}
<Const 0x216b8 0x1b.2> Δ-2 {[4, 'A3']|[#27]}
<Call 0x216bc 0x102c0> {[4, 'A3']|[#27]}
AppendChar(MOD b : String; a : char)
<POP 216c2-216c4 StackAdj> Δ+2 {[4, 'A3']}
<MI 216c4 MOVE.L A3,(A7)> {[4, 'A3']}
<Const 0x216c6 0x5b.2> Δ-2 {[4, 'A3']|[#91]}
<Call 0x216ca 0x102c0> {[4, 'A3']|[#91]}
AppendChar(MOD b : String; a : char)
<POP 216d0-216d2 StackAdj> Δ+2 {[4, 'A3']}
<MI 216d2 MOVE.L A3,(A7)> {[4, 'A3']}
<Const 0x216d4 0x30.2> Δ-2 {[4, 'A3']|[#48]}
<Call 0x216d8 0x102c0> {[4, 'A3']|[#48]}
AppendChar(MOD b : String; a : char)
<POP 216de-216e0 StackAdj> Δ+2 {[4, 'A3']}
<MI 216e0 MOVE.L A3,(A7)> {[4, 'A3']}
<Const 0x216e2 0x4b.2> Δ-2 {[4, 'A3']|[#75]}
<Call 0x216e6 0x102c0> {[4, 'A3']|[#75]}
AppendChar(MOD b : String; a : char)
<POP 216ec-216ee StackAdj> Δ+2 {[4, 'A3']}
<MI 216ee MOVE.L A3,(A7)> {[4, 'A3']}
<Call 0x216f0 0x103d8> {[4, 'A3']}
WriteConsoleString(str : String)
<POP 216f6-216f8 StackAdj> Δ+4 {}
<POP 216f8-21700 Epilogue> Σ0
@ 21700
<LVAR 0x00a 4(r)>
<LVAR -0x004 4(rw)>
<LVAR -0x006 1(w)>
<LVAR -0x007 1(rw)>
<LVAR -0x008 1(rw)>
<LVAR -0x00c 4(rw)>
<LVAR -0x01a @>
<POP 21700-21924 Body>
<POP 21700-21716 Prologue> Σ0 ↓
<POP 21716-2172c RegCacheLoad> Σ0 ↓
<POP 2172c-21736 Naked> Σ0 ↓ →0x21738
<MI 2172c MOVE.L 0x234fa,D0> {}
<MI 2172e SUB.L 0x2351a,D0> {}
<MI 21730 NEG.L D0> {}
<MI 21732 ADD.L (A6+0xa),D0> {}
<MI 21734 BPL 0x21738> {}
<POP 21736-21738 Naked> Σ0 ↓
<MI 21736 NEG.L D0> {}
<POP 21738-21742 Naked> Σ0 ↓ →0x2174a ←0x2172c
<MI 21738 MOVE.L D0,(A6-0xc)> {}
<MI 2173c MOVEQ.L #0x00,D1> {}
<MI 2173e CMP.L 0x2351a,D0> {}
<MI 21740 BGE 0x2174a> {}
<POP 21742-2174a Naked> Σ0 ↓ →0x2174c
<MI 21742 TST.B 0x2351f> {}
<MI 21748 BEQ 0x2174c> {}
<POP 2174a-2174c Naked> Σ0 ↓ ←0x21738
<MI 2174a ADDQ.B #0x1,D1> {}
<POP 2174c-21762 Naked> Σ0 ↓ →0x2176e ←0x21742
<MI 2174c EXTB.W D1> {}
<POP 0x2174e LimitCheck 0x0 ≤ D1 ≤ 0x1> {}
<MI 21752 MOVE.B D1,(A6-0x6)> {}
<MI 21756 CLR.B (A6-0x8)> {}
<MI 2175a CMP.L 0x2350e,D0> {}
<MI 21760 BLE 0x2176e> {}
<POP 21762-2176a Naked> Σ0 ↓ →0x2176e
<MI 21762 MOVE.B D1,D0> {}
<MI 21764 NEG.B D0> {}
<MI 21766 ADDQ.B #0x1,D0> {}
<MI 21768 BEQ 0x2176e> {}
<POP 2176a-2176e Naked> Σ0 ↓
<MI 2176a ADDQ.B #0x1,(A6-0x8)> {}
<POP 2176e-21784 Naked> Σ0 ↓ →0x217a2 ←0x2174c ←0x21762
<MI 2176e MOVE.B (A6-0x8),(A6-0x7)> {}
<MI 21774 OR.B D1,(A6-0x7)> {}
<MI 21778 NEG.B (A6-0x7)> {}
<MI 2177c ADDQ.B #0x1,(A6-0x7)> {}
<MI 21780 TST.B D1> {}
<MI 21782 BNE 0x217a2> {}
<POP 21784-217a2 Naked> Σ0 →0x217fc
<MI 21784 MOVE.L 0x234fa,D0> {}
<MI 21786 SUB.L 0x234fe,D0> {}
<MI 2178c ADDQ.L #0x1,D0> {}
<MI 2178e MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<Blob 0x21790 [4] 0x234fe> Δ-4 {[4, 'D0']|[«4»]}
<MI 21796 LEA.L (A6-0x1a),A4> {[4, 'D0']|[«4»]}
<Call 0x2179a 0x21540> {[4, 'D0']|[«4»]}
<POP 2179e-217a0 StackAdj> Δ+8 {}
<MI 217a0 BRA 0x217fc> {}
<POP 217a2-217da Naked> Σ0 ↓ →0x217ea ←0x2176e
<POP 217a2-217a4 StackAdj> Δ-4 {[-4-]}
<MI 217a4 MOVE.L (A6+0xa),D0> {[-4-]}
<MI 217a6 ADD.L 0x2351a,D0> {[-4-]}
<MI 217a8 ADDQ.L #0x1,D0> {[-4-]}
<MI 217aa MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<Blob 0x217ac [4] 0x224ee> Δ-4 {[-4-]|[4, 'D0']|[«4»]}
<Call 0x217b2 0x20c6e> {[-4-]|[4, 'D0']|[«4»]}
<POP 217b6-217b8 StackAdj> Δ+8 {[-4-]}
<MI 217b8 MOVE.L (A7),0x234f6> {[-4-]}
<MI 217ba MOVE.L (A6+0xa),D0> {[-4-]}
<MI 217bc SUB.L 0x2351a,D0> {[-4-]}
<MI 217be MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<Const 0x217c0 0x0.4> Δ-4 {[-4-]|[4, 'D0']|[##0]}
<Call 0x217c4 0x20ca2> {[-4-]|[4, 'D0']|[##0]}
<POP 217c8-217ca StackAdj> Δ+8 {[-4-]}
<MI 217ca MOVE.L (A7)+,D6> Δ+4 {}
<MI 217cc MOVE.L 0x224ee,D0> {}
<MI 217d2 SUB.L 0x2351a,D0> {}
<MI 217d4 ADDQ.L #0x1,D0> {}
<MI 217d6 CMP.L (A6+0xa),D0> {}
<MI 217d8 BGT 0x217ea> {}
<POP 217da-217ea Naked> Σ0 ↓
<MI 217da MOVE.L 0x2350a,D6> {}
<MI 217e0 SUBQ.L #0x1,D6> {}
<MI 217e2 NEG.L D6> {}
<MI 217e4 ADD.L 0x224ee,D6> {}
<POP 217ea-217f0 Naked> Σ0 ↓ →0x217f8 ←0x217a2
<MI 217ea MOVE.L (A6+0xa),D0> {}
<MI 217ec CMP.L 0x2351a,D0> {}
<MI 217ee BGE 0x217f8> {}
<POP 217f0-217f8 Naked> Σ0 ↓
<MI 217f0 MOVE.L 0x2350a,0x234f6> {}
<MI 217f6 SUBQ.L #0x1,0x234f6> {}
<POP 217f8-217fc Naked> Σ0 ↓ ←0x217ea
<MI 217f8 MOVEQ.L #0x01,D7> {}
<MI 217fa MOVE.L 0x234f6,0x234fa> {}
<POP 217fc-21802 Naked> Σ0 ↓ →0x2180c ←0x21784
<MI 217fc TST.B (A6-0x7)> {}
<MI 21800 BEQ 0x2180c> {}
<POP 21802-2180c Naked> Σ0 ↓
<MI 21802 MOVE.L (A6+0xa),0x234f6> {}
<MI 21804 MOVE.L (A6+0xa),D6> {}
<MI 21806 MOVE.L 0x234fa,D7> {}
<MI 21808 SUB.L (A6+0xa),D7> {}
<MI 2180a ADDQ.L #0x1,D7> {}
<POP 2180c-21814 Naked> Σ0 ↓ →0x218b4 ←0x217fc
<MI 2180c TST.B (A6-0x8)> {}
<MI 21810 BEQ 0x218b4> {}
<POP 21814-21830 Naked> Σ0 ↓ →0x2186c
<MI 21814 MOVE.L 0x234fa,D0> {}
<MI 21816 SUB.L (A6+0xa),D0> {}
<MI 21818 ADDQ.L #0x1,D0> {}
<MI 2181a MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 2181c MOVE.L (A6+0xa),-(A7)> Δ-4 {[4, 'D0']|[4, '(A6+0xa)']}
<MI 2181e LEA.L (A6-0x1a),A4> {[4, 'D0']|[4, '(A6+0xa)']}
<Call 0x21822 0x21540> {[4, 'D0']|[4, '(A6+0xa)']}
<POP 21826-21828 StackAdj> Δ+8 {}
<MI 21828 MOVE.L 0x234fa,D0> {}
<MI 2182a SUB.L 0x2351a,D0> {}
<MI 2182c CMP.L (A6+0xa),D0> {}
<MI 2182e BGE 0x2186c> {}
<POP 21830-2186c Naked> Σ0 →0x218b4
<POP 21830-21832 StackAdj> Δ-4 {[-4-]}
<MI 21832 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6-0xc)']}
<MI 21836 MOVE.L 0x224ee,D0> {[-4-]|[4, '(A6-0xc)']}
<MI 2183c SUB.L 0x234fa,D0> {[-4-]|[4, '(A6-0xc)']}
<MI 2183e MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, '(A6-0xc)']|[4, 'D0']}
<Call 0x21840 0x20c6e> {[-4-]|[4, '(A6-0xc)']|[4, 'D0']}
<POP 21844-21846 StackAdj> Δ+8 {[-4-]}
<MI 21846 MOVE.L (A7)+,(A6-0x4)> Δ+4 {}
<Const 0x2184a 0x4d.4> Δ-4 {[##77]}
<MI 2184e MOVE.L (A6-0x4),-(A7)> Δ-4 {[##77]|[4, '(A6-0x4)']}
<Call 0x21852 0x2092e> {[##77]|[4, '(A6-0x4)']}
<POP 21856-21858 StackAdj> Δ+8 {}
<MI 21858 MOVE.L 0x234fa,D6> {}
<MI 2185a ADDQ.L #0x1,D6> {}
<MI 2185c MOVE.L D6,D0> {}
<MI 2185e ADD.L (A6-0x4),D0> {}
<MI 21862 SUBQ.L #0x1,D0> {}
<MI 21864 MOVE.L D0,0x234f6> {}
<MI 21866 MOVEQ.L #0x01,D7> {}
<MI 21868 MOVE.L D0,0x234fa> {}
<MI 2186a BRA 0x218b4> {}
<POP 2186c-218b4 Naked> Σ0 ↓ ←0x21814
<POP 2186c-2186e StackAdj> Δ-4 {[-4-]}
<MI 2186e MOVE.L (A6-0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6-0xc)']}
<Blob 0x21872 [4] 0x2350a> Δ-4 {[-4-]|[4, '(A6-0xc)']|[«4»]}
<MI 21878 SUBQ.L #0x1,(A7)> {[-4-]|[4, '(A6-0xc)']|[-4-]}
<MI 2187a MOVE.L 0x234fa,D0> {[-4-]|[4, '(A6-0xc)']|[-4-]}
<MI 2187c SUB.L (A7),D0> {[-4-]|[4, '(A6-0xc)']|[-4-]}
<MI 2187e MOVE.L D0,(A7)> {[-4-]|[4, '(A6-0xc)']|[4, 'D0']}
<Call 0x21880 0x20c6e> {[-4-]|[4, '(A6-0xc)']|[4, 'D0']}
<POP 21884-21886 StackAdj> Δ+8 {[-4-]}
<MI 21886 MOVE.L (A7)+,D0> Δ+4 {}
<MI 21888 MOVE.L D0,(A6-0x4)> {}
<Const 0x2188c 0x44.4> Δ-4 {[##68]}
<MI 21890 MOVE.L D0,-(A7)> Δ-4 {[##68]|[4, 'D0']}
<Call 0x21892 0x2092e> {[##68]|[4, 'D0']}
<POP 21896-21898 StackAdj> Δ+8 {}
<MI 21898 MOVE.L 0x234fa,D1> {}
<MI 2189a SUB.L 0x2350a,D1> {}
<MI 218a0 MOVE.L D1,0x234f6> {}
<MI 218a2 SUB.L D0,D1> {}
<MI 218a4 ADDQ.L #0x1,D1> {}
<MI 218a6 MOVE.L D1,D6> {}
<MI 218a8 MOVE.L 0x2350a,D7> {}
<MI 218ae ADDQ.L #0x1,D7> {}
<MI 218b0 SUB.L D0,D7> {}
<MI 218b2 SUB.L D0,0x234fa> {}
<POP 218b4-218bc Naked> Σ0 Δ-4 ↓ →0x218d0 ←0x2180c ←0x21830
<MI 218b4 MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']}
<MI 218b6 MOVE.L 0x234f6,D5> {[4, 'D6']}
<MI 218b8 CMP.L (A7),D5> {[4, 'D6']}
<MI 218ba BLT 0x218d0> {[4, 'D6']}
<POP 218bc-218d0 Naked> Σ-4 ↓
<MI 218bc MOVE.L (A7),D0> {[-4-]}
<POP 0x218be LimitCheck D5> {[-4-]}
<MI 218be CMPI.L #0x7fffffff,D5>
<MI 218c4 BGT 0x218ce>
<POP 0x218c6 LimitCheck D0> {[-4-]}
<MI 218c6 CMPI.L #0x80000001,D0>
<MI 218cc BGE 0x218d0>
<MI 218ce TRAP #15>
<POP 218d0-218d4 Naked> Σ-4 ↓ →0x218e8 ←0x218b4 ←0x218d4
<MI 218d0 CMP.L (A7),D5> {[-4-]}
<MI 218d2 BLT 0x218e8> {[-4-]}
<POP 218d4-218e8 Naked> Σ-4 ↓ →0x218d0
<MI 218d4 MOVE.L D7,-(A7)> Δ-4 {[-4-]|[4, 'D7']}
<MI 218d6 MOVE.L D5,-(A7)> Δ-4 {[-4-]|[4, 'D7']|[4, 'D5']}
<MI 218d8 LEA.L (A6-0x1a),A4> {[-4-]|[4, 'D7']|[4, 'D5']}
<Call 0x218dc 0x21540> {[-4-]|[4, 'D7']|[4, 'D5']}
<POP 218e0-218e2 StackAdj> Δ+8 {[-4-]}
<MI 218e2 ADDQ.L #0x1,D7> {[-4-]}
<MI 218e4 SUBQ.L #0x1,D5> {[-4-]}
<MI 218e6 BVC 0x218d0> {[-4-]}
<POP 218e8-2191c Naked> Σ-4 Δ+4 ↓ ←0x218d0
<POP 218e8-218ea StackAdj> Δ+4 {}
<MI 218ea MOVE.L (A6+0xa),0x234fe> {}
<MI 218f0 CLR.B 0x2351f> {}
<POP 218f6-218f8 StackAdj> Δ-8 {[-8-]}
<Blob 0x218f8 [4] 0x23506> Δ-4 {[-8-]|[«4»]}
<Const 0x218fe 0x1.4> Δ-4 {[-8-]|[«4»]|[##1]}
<Call 0x21902 0x2082a> {[-8-]|[«4»]|[##1]}
<POP 21906-21908 StackAdj> Δ+4 {[-8-]|[«4»]}
<Call 0x21908 0x209b4> {[-8-]|[«4»]}
<Call 0x2190c 0x102d0> {[-8-]|[«4»]}
StringCat2(a, b : String) : String
<POP 21912-21914 StackAdj> Δ+8 {[-4-]}
<Call 0x21914 0x103d8> {[-4-]}
WriteConsoleString(str : String)
<POP 2191a-2191c StackAdj> Δ+4 {}
<POP 2191c-21924 Epilogue> Σ0
@ 21924
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x004 4(w)>
<LVAR -0x006 @>
<LVAR -0x00a 4(r)>
<LVAR -0x00e @ 4(r)>
<LVAR -0x014 1(rw) 2(rw)>
<LVAR -0x01a @ 4(rw)>
<LVAR -0x01e @ 4(r)>
<LVAR -0x020 @>
<POP 21924-21a60 Body>
<POP 21924-2193a Prologue> Σ0 ↓
<POP 2193a-2194a RegCacheLoad> Σ0 ↓
<POP 2194a-21974 Naked> Σ0 ↓
<MI 2194a MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Const 0x2194e 0x1.2> Δ-2 {[4, '(A6+0xc)']|[#1]}
<Const 0x21950 0x1.2> Δ-2 {[4, '(A6+0xc)']|[#1]|[#1]}
<MI 21952 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0xc)']|[#1]|[#1]|[4, '(A6+0x8)']}
<Pointer.fp 0x21956 <LVAR -0x020 @>> Δ-4 {[4, '(A6+0xc)']|[#1]|[#1]|[4, '(A6+0x8)']|[@@-32]}
<Pointer.fp 0x2195a <LVAR -0x01e @ 4(r)>> Δ-4 {[4, '(A6+0xc)']|[#1]|[#1]|[4, '(A6+0x8)']|[@@-32]|[@@-30]}
<Call 0x2195c 0x10380> {[4, '(A6+0xc)']|[#1]|[#1]|[4, '(A6+0x8)']|[@@-32]|[@@-30]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 21962-21966 StackAdj> Δ+20 {}
<MI 21966 MOVE.L (A6+0x8),D0> {}
<MI 2196a ASL.L #0x7,D0> {}
<MI 2196c SUBQ.L #0x1,D0> {}
<MI 2196e MOVE.L D0,(A6-0x4)> {}
<MI 21972 MOVE.L D0,D5> {}
<POP 21974-2197a Naked> Σ0 ↓ →0x21a36 ←0x219bc
<MI 21974 TST.L D5> {}
<MI 21976 BLT 0x21a36> {}
<POP 2197a-219a8 Naked> Σ0 ↓ →0x219ac
<Pointer.fp 0x2197a <LVAR -0x01a @ 4(rw)>> Δ-4 {[@@-26]}
<Call 0x2197c 0x102b8> {[@@-26]}
NewString(VAR a : String)
<POP 21982-21984 StackAdj> Δ+4 {}
<POP 0x21984 LimitCheck 0x0 ≤ D5 ≤ 0x7ff> {}
<MI 2198e MOVE.L D5,D0> {}
<MI 21990 ASL.L #0x1,D0> {}
<MI 21992 LEA.L 0x224e6,A0> {}
<MI 21998 MOVE.W (A0+D0.L+#0xc),(A6-0x14)> {}
<MI 2199c CLR.L D0> {}
<MI 2199e MOVE.B (A6-0x14),D0> {}
<MI 219a0 MOVE.W D0,D1> {}
<MI 219a2 ANDI.W #0x0040,D1> {}
<MI 219a6 BEQ 0x219ac> {}
<POP 219a8-219ac Naked> Σ0 →0x219ae
<MI 219a8 MOVEQ.L #0x48,D7> {}
<MI 219aa BRA 0x219ae> {}
<POP 219ac-219ae Naked> Σ0 ↓ ←0x2197a
<MI 219ac MOVEQ.L #0x20,D7> {}
<POP 219ae-219b6 Naked> Σ0 ↓ →0x219ba ←0x219a8
<MI 219ae MOVE.W D0,D1> {}
<MI 219b0 ANDI.W #0x0080,D1> {}
<MI 219b4 BEQ 0x219ba> {}
<POP 219b6-219ba Naked> Σ0 →0x219bc
<MI 219b6 MOVEQ.L #0x43,D6> {}
<MI 219b8 BRA 0x219bc> {}
<POP 219ba-219bc Naked> Σ0 ↓ ←0x219ae
<MI 219ba MOVEQ.L #0x20,D6> {}
<POP 219bc-21a36 Naked> Σ0 ↓ →0x21974 ←0x219b6
<MI 219bc ANDI.W #0x003f,D0> {}
<MI 219c0 MOVE.B D0,(A6-0x14)> {}
<MI 219c2 MOVE.W (A6-0x14),-(A7)> Δ-2 {[2, '(A6-0x14)']}
<MI 219c4 PEA.L (A7)> Δ-4 {[2, '(A6-0x14)']|[4, '^(A7)']}
<Const 0x219c6 0x0.4> Δ-4 {[2, '(A6-0x14)']|[4, '^(A7)']|[##0]}
<Const 0x219ca 0x1.4> Δ-4 {[2, '(A6-0x14)']|[4, '^(A7)']|[##0]|[##1]}
<Pointer.fp 0x219ce <LVAR -0x00e @ 4(r)>> Δ-4 {[2, '(A6-0x14)']|[4, '^(A7)']|[##0]|[##1]|[@@-14]}
<Call 0x219d2 0x104b4> {[2, '(A6-0x14)']|[4, '^(A7)']|[##0]|[##1]|[@@-14]}
?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
<POP 219d8-219dc StackAdj> Δ+14 {[2, '(A6-0x14)']|[-2-]}
<MI 219dc MOVE.L (A6-0x1a),(A7)> {[4, '(A6-0x1a)']}
<MI 219de MOVE.B D7,-(A7)> Δ-2 {[4, '(A6-0x1a)']|[2, 'D7']}
<Call 0x219e0 0x102c0> {[4, '(A6-0x1a)']|[2, 'D7']}
AppendChar(MOD b : String; a : char)
<POP 219e6-219e8 StackAdj> Δ+2 {[4, '(A6-0x1a)']}
<MI 219e8 MOVE.L (A6-0x1a),(A7)> {[4, '(A6-0x1a)']}
<MI 219ea MOVE.B D6,-(A7)> Δ-2 {[4, '(A6-0x1a)']|[2, 'D6']}
<Call 0x219ec 0x102c0> {[4, '(A6-0x1a)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 219f2-219f4 StackAdj> Δ+2 {[4, '(A6-0x1a)']}
<MI 219f4 MOVE.L (A6-0x1a),-(A7)> Δ-4 {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']}
<POP 219f6-219f8 StackAdj> Δ-4 {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]}
<MI 219f8 MOVE.L (A6-0xa),-(A7)> Δ-4 {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]|[4, '(A6-0xa)']}
<MI 219fc MOVE.L (A6-0xe),-(A7)> Δ-4 {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']}
<Const 0x21a00 0x10.4> Δ-4 {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[##16]}
<Call 0x21a04 0x1035c> {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[##16]}
Quad2String(a : Quad; radix : Long ) : String
<POP 21a0a-21a0c StackAdj> Δ+12 {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]}
<Call 0x21a0c 0x102d0> {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]}
StringCat2(a, b : String) : String
<POP 21a12-21a14 StackAdj> Δ+8 {[4, '(A6-0x1a)']}
<MI 21a14 MOVE.L (A7)+,(A6-0x1a)> Δ+4 {}
<MI 21a16 MOVE.L (A6-0x1e),-(A7)> Δ-4 {[4, '(A6-0x1e)']}
<MI 21a18 MOVE.L (A6-0x1a),-(A7)> Δ-4 {[4, '(A6-0x1e)']|[4, '(A6-0x1a)']}
<Pointer.fp 0x21a1a <LVAR -0x006 @>> Δ-4 {[4, '(A6-0x1e)']|[4, '(A6-0x1a)']|[@@-6]}
<Call 0x21a1e 0x10440> {[4, '(A6-0x1e)']|[4, '(A6-0x1a)']|[@@-6]}
FSCALL_10440
<POP 21a24-21a26 StackAdj> Δ+12 {}
<Pointer.fp 0x21a26 <LVAR -0x01a @ 4(rw)>> Δ-4 {[@@-26]}
<Call 0x21a28 0x102bc> {[@@-26]}
FreeString(VAR a : String)
<POP 21a2e-21a30 StackAdj> Δ+4 {}
<MI 21a30 SUBQ.L #0x1,D5> {}
<MI 21a32 BVC 0x21974> {}
<POP 21a36-21a58 Naked> Σ0 ↓ ←0x21974
<MI 21a36 MOVE.L (A6-0x1e),-(A7)> Δ-4 {[4, '(A6-0x1e)']}
<Call 0x21a38 0x10448> {[4, '(A6-0x1e)']}
FSCALL_10448
<POP 21a3e-21a40 StackAdj> Δ+2 {[-2-]}
<MI 21a40 CLR.B (A7)> {[-2-]}
<Const 0x21a42 0x1.2> Δ-2 {[-2-]|[#1]}
<MI 21a44 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-2-]|[#1]|[4, '(A6+0xc)']}
<Pointer.fp 0x21a48 <LVAR -0x020 @>> Δ-4 {[-2-]|[#1]|[4, '(A6+0xc)']|[@@-32]}
<Pointer.fp 0x21a4c <LVAR -0x01e @ 4(r)>> Δ-4 {[-2-]|[#1]|[4, '(A6+0xc)']|[@@-32]|[@@-30]}
<Call 0x21a4e 0x1038c> {[-2-]|[#1]|[4, '(A6+0xc)']|[@@-32]|[@@-30]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 21a54-21a58 StackAdj> Δ+16 {}
<POP 21a58-21a60 Epilogue> Σ0
@ 21a60
<LVAR 0x008 4(r)>
<POP 21a60-21b16 Body>
<POP 21a60-21a76 Prologue> Σ0 ↓
<POP 21a76-21a80 RegCacheLoad> Σ0 ↓
<POP 21a80-21a9c Naked> Σ0 ↓ →0x21aa2
<Call 0x21a80 0x20b74> {}
<POP 21a84-21a86 StackAdj> Δ-2 {[-2-]}
<Call 0x21a86 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 21a88 MOVE.B (A7)+,D7> Δ+2 {}
<MI 21a8a CLR.L D0> {}
<MI 21a8c MOVE.B D7,D0> {}
<MI 21a8e LEA.L 0x207a2,A0> {}
<MI 21a92 MOVE.W D0,D1> {}
<MI 21a94 LSR.W #0x3,D1> {}
<MI 21a96 BTST.B D0,(A0+D1.W)> {}
<MI 21a9a BEQ 0x21aa2> {}
<POP 21a9c-21aa2 Naked> Σ0 ↓
<MI 21a9c ANDI.W #0x005f,D0> {}
<MI 21aa0 MOVE.B D0,D7> {}
<POP 21aa2-21aa8 Naked> Σ0 ↓ →0x21aae ←0x21a80
<MI 21aa2 CMPI.B #0x1b,D7> {}
<MI 21aa6 BEQ 0x21aae> {}
<POP 21aa8-21aae Naked> Σ0 →0x21b0e
<MI 21aa8 MOVEA.L (A6+0x8),A0> {}
<MI 21aaa MOVE.B D7,(A0)> {}
<MI 21aac BRA 0x21b0e> {}
<POP 21aae-21aba Naked> Σ0 ↓ →0x21abc ←0x21aa2
<POP 21aae-21ab0 StackAdj> Δ-2 {[-2-]}
<Call 0x21ab0 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 21ab2 MOVE.B (A7)+,D0> Δ+2 {}
<MI 21ab4 CMPI.B #0x4f,D0> {}
<MI 21ab8 BEQ 0x21abc> {}
<POP 21aba-21abc Naked> Σ0 →0x21b08
<MI 21aba BRA 0x21b08> {}
<POP 21abc-21ace Naked> Σ0 ↓ →0x21b08 ←0x21aae
<POP 21abc-21abe StackAdj> Δ-2 {[-2-]}
<Call 0x21abe 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 21ac0 CLR.L D0> {[-2-]}
<MI 21ac2 MOVE.B (A7)+,D0> Δ+2 {}
<MI 21ac4 SUBI.W #0x006e,D0> {}
<MI 21ac8 CMPI.W #0x0007,D0> {}
<MI 21acc BHI 0x21b08> {}
<POP 21ace-21ad8 Naked> Σ0 →0x21b00 →0x21b08 →0x21af8 →0x21b08 →0x21b08 →0x21b08 →0x21ae8 →0x21af0
<MI 21ace ADD.W D0,D0> {}
<MI 21ad0 SWITCH D0.W> {}
<POP 21ae8-21af0 Naked> Σ0 →0x21b0e ←0x21ace
<MI 21ae8 MOVEA.L (A6+0x8),A0> {}
<MI 21aea MOVE.B #0x50,(A0)> {}
<MI 21aee BRA 0x21b0e> {}
<POP 21af0-21af8 Naked> Σ0 →0x21b0e ←0x21ace
<MI 21af0 MOVEA.L (A6+0x8),A0> {}
<MI 21af2 MOVE.B #0x4e,(A0)> {}
<MI 21af6 BRA 0x21b0e> {}
<POP 21af8-21b00 Naked> Σ0 →0x21b0e ←0x21ace
<MI 21af8 MOVEA.L (A6+0x8),A0> {}
<MI 21afa MOVE.B #0x42,(A0)> {}
<MI 21afe BRA 0x21b0e> {}
<POP 21b00-21b08 Naked> Σ0 →0x21b0e ←0x21ace
<MI 21b00 MOVEA.L (A6+0x8),A0> {}
<MI 21b02 MOVE.B #0x5a,(A0)> {}
<MI 21b06 BRA 0x21b0e> {}
<POP 21b08-21b0e Naked> Σ0 ↓ ←0x21aba ←0x21abc ←0x21ace ←0x21ace ←0x21ace ←0x21ace
<MI 21b08 MOVEA.L (A6+0x8),A0> {}
<MI 21b0a MOVE.B #0x3f,(A0)> {}
<POP 21b0e-21b16 Epilogue> Σ0 ←0x21aa8 ←0x21ae8 ←0x21af0 ←0x21af8 ←0x21b00
@ 21b16
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 1(r)>
<POP 21b16-21be0 Body>
<POP 21b16-21b2c Prologue> Σ0 ↓
<POP 21b2c-21b2e RegCacheLoad> Σ0 ↓
<POP 21b2e-21b3e Naked> Σ0 ↓
<MI 21b2e MOVEQ.L #0x00,D7> {}
<MI 21b30 MOVEQ.L #0x00,D6> {}
<MI 21b32 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x21b36 0x103d8> {[4, '(A6+0xc)']}
WriteConsoleString(str : String)
<POP 21b3c-21b3e StackAdj> Δ+4 {}
<POP 21b3e-21b52 Naked> Σ0 ↓ →0x21bbc ←0x21bba
<Pointer.fp 0x21b3e <LVAR -0x008 @ 1(r)>> Δ-4 {[@@-8]}
<Call 0x21b42 0x207e2> {[@@-8]}
<POP 21b46-21b48 StackAdj> Δ+4 {}
<MI 21b48 MOVE.B (A6-0x8),D0> {}
<MI 21b4c CMPI.B #0x0d,D0> {}
<MI 21b50 BEQ 0x21bbc> {}
<POP 21b52-21b64 Naked> Σ0 ↓ →0x21b72
<MI 21b52 CLR.L D1> {}
<MI 21b54 MOVE.B D0,D1> {}
<MI 21b56 LEA.L 0x207c2,A0> {}
<MI 21b5a MOVE.W D1,D0> {}
<MI 21b5c LSR.W #0x3,D0> {}
<MI 21b5e BTST.B D1,(A0+D0.W)> {}
<MI 21b62 BNE 0x21b72> {}
<POP 21b64-21b72 Naked> Σ0 →0x21bba
<Const 0x21b64 0x7.2> Δ-2 {[#7]}
<Call 0x21b68 0x103d0> {[#7]}
WriteConsoleChar(chr : char)
<POP 21b6e-21b70 StackAdj> Δ+2 {}
<MI 21b70 BRA 0x21bba> {}
<POP 21b72-21b82 Naked> Σ0 ↓ →0x21b9a ←0x21b52
<MI 21b72 MOVE.B D1,-(A7)> Δ-2 {[2, 'D1']}
<Call 0x21b74 0x103d0> {[2, 'D1']}
WriteConsoleChar(chr : char)
<POP 21b7a-21b7c StackAdj> Δ+2 {}
<MI 21b7c CMPI.B #0x39,D1> {}
<MI 21b80 BGT 0x21b9a> {}
<POP 21b82-21b9a Naked> Σ0 →0x21bb6
<MI 21b82 MOVE.W D7,D0> {}
<MI 21b84 MULU.W #0x10,D0> {}
<MI 21b86 SUBI.W #0x0030,D1> {}
<MI 21b8a EXTW.L D1> {}
<MI 21b8c ADD.L D0,D1> {}
<POP 0x21b8e LimitCheck 0x0 ≤ D1 ≤ 0xffff> {}
<MI 21b98 BRA 0x21bb6> {}
<POP 21b9a-21bb6 Naked> Σ0 ↓ ←0x21b72
<MI 21b9a MOVE.W D7,D0> {}
<MI 21b9c MULU.W #0x10,D0> {}
<MI 21b9e SUBI.W #0x0041,D1> {}
<MI 21ba2 EXTW.L D1> {}
<MI 21ba4 ADD.L D0,D1> {}
<MI 21ba6 ADDI.L #0x0000000a,D1> {}
<POP 0x21bac LimitCheck 0x0 ≤ D1 ≤ 0xffff> {}
<POP 21bb6-21bba Naked> Σ0 ↓ ←0x21b82
<MI 21bb6 MOVE.W D1,D7> {}
<MI 21bb8 ADDQ.L #0x1,D6> {}
<POP 21bba-21bbc Naked> Σ0 →0x21b3e ←0x21b64
<MI 21bba BRA 0x21b3e> {}
<POP 21bbc-21bc0 Naked> Σ0 ↓ →0x21bd8 ←0x21b3e
<MI 21bbc TST.L D6> {}
<MI 21bbe BEQ 0x21bd8> {}
<POP 21bc0-21bd8 Naked> Σ0 ↓
<MI 21bc0 MOVEA.L (A6+0x8),A0> {}
<MI 21bc4 MOVE.W D7,D0> {}
<MI 21bc6 ANDI.W #0x3f00,D0> {}
<MI 21bca LSR.W #0x8,D0> {}
<MI 21bcc MOVE.B D0,(A0)> {}
<MI 21bce MOVE.W D7,D0> {}
<MI 21bd0 ANDI.W #0x00ff,D0> {}
<MI 21bd4 MOVE.B D0,(A0+0x1)> {}
<POP 21bd8-21be0 Epilogue> Σ0 ←0x21bbc
@ 21be0
<LVAR 0x008 4(r)>
<POP 21be0-21c70 Body>
<POP 21be0-21bf6 Prologue> Σ0 ↓
<POP 21bf6-21c02 RegCacheLoad> Σ0 ↓
<POP 21c02-21c06 Naked> Σ0 ↓ →0x21c14
<MI 21c02 TST.L (A6+0x8)> {}
<MI 21c04 BLT 0x21c14> {}
<POP 21c06-21c0c Naked> Σ0 ↓ →0x21c14
<MI 21c06 MOVE.L (A6+0x8),D0> {}
<MI 21c08 CMP.L 0x224ee,D0> {}
<MI 21c0a BGT 0x21c14> {}
<POP 21c0c-21c14 Naked> Σ0 →0x21c68
<MI 21c0c MOVE.L (A6+0x8),0x23516> {}
<MI 21c12 BRA 0x21c68> {}
<POP 21c14-21c68 Naked> Σ0 ↓ ←0x21c02 ←0x21c06
<MI 21c14 CLR.B 0x2351e> {}
<Blob 0x21c1a [24] @> Δ-24 {[«24""»]}
<Blob 0x21c26 [2] @> Δ-2 {[«24""»]|[«2""»]}
<POP 21c2a-21c2c StackAdj> Δ-8 {[«24""»]|[«2""»]|[-8-]}
<Lit 0x21c2c 24> {[«24""»]|[«2""»]|[-4-]|[$$Offset must be in [0 .._]}
<POP 21c3c-21c3d StackAdj> Δ-4 {[«24""»]|[«2""»]|[-4-]|[$$Offset must be in [0 .._]|[-4-]}
<Blob 0x21c3d [4] 0x224ee> Δ-4 {[«24""»]|[«2""»]|[-4-]|[$$Offset must be in [0 .._]|[-4-]|[«4»]}
<Call 0x21c3e 0x102e4> {[«24""»]|[«2""»]|[-4-]|[$$Offset must be in [0 .._]|[-4-]|[«4»]}
Long2String(a : Long) : String
<Lit 0x21c44 2> {[«24""»]|[«2""»]|[-4-]|[$$Offset must be in [0 .._]|[-4-]|[$$] ]}
<Call 0x21c56 0x102d4> {[«24""»]|[«2""»]|[-4-]|[$$Offset must be in [0 .._]|[-4-]|[$$] ]}
StringCat3(a, b, c : String) : String
<POP 21c5c-21c60 StackAdj> Δ+12 {[«24""»]|[«2""»]|[-4-]}
<Call 0x21c60 0x20be2> {[«24""»]|[«2""»]|[-4-]}
<POP 21c64-21c68 StackAdj> Δ+30 {}
<POP 21c68-21c70 Epilogue> Σ0 ←0x21c0c
@ 21c70
<LVAR 0x00e 1(r)>
<LVAR 0x00d 1(r)>
<LVAR 0x00c 1(r)>
<LVAR 0x008 4(r)>
<LVAR -0x003 1(r)>
<LVAR -0x004 1(r) 2(w)>
<POP 21c70-21d42 Body> Δ-4
<POP 21c70-21c86 Prologue> Σ0 ↓
<POP 21c86-21c9c RegCacheLoad> Σ0 ↓
<POP 21c9c-21caa Naked> Σ0 ↓ →0x21cf8
<MI 21c9c MOVEA.L (A6+0x8),A0> {}
<MI 21c9e MOVE.L #0xffffffff,(A0)> {}
<MI 21ca4 TST.B (A6+0xe)> {}
<MI 21ca8 BEQ 0x21cf8> {}
<POP 21caa-21cb6 Naked> Σ0 Δ-4 ↓
<MI 21caa MOVE.L 0x23516,D0> {}
<MI 21cac ADDQ.L #0x1,D0> {}
<Blob 0x21cae [4] 0x224ee> Δ-4 {[«4»]}
<MI 21cb4 MOVE.L D0,D7> {[«4»]}
<POP 21cb6-21cba Naked> Σ-4 ↓ →0x21cf4 ←0x21cf0
<MI 21cb6 CMP.L (A7),D7> {[-4-]}
<MI 21cb8 BGT 0x21cf4> {[-4-]}
<POP 21cba-21cde Naked> Σ-4 ↓ →0x21cf0
<POP 0x21cba LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {[-4-]}
<MI 21cc4 MOVE.L D7,D0> {[-4-]}
<MI 21cc6 ASL.L #0x1,D0> {[-4-]}
<MI 21cc8 LEA.L 0x224e6,A0> {[-4-]}
<MI 21cca MOVE.W (A0+D0.L+#0xc),(A6-0x4)> {[-4-]}
<MI 21cce CLR.L D0> {[-4-]}
<MI 21cd0 MOVE.B (A6-0x4),D0> {[-4-]}
<MI 21cd2 AND.W #0x3f,D0> {[-4-]}
<MI 21cd4 CLR.L D1> {[-4-]}
<MI 21cd6 MOVE.B (A6+0xc),D1> {[-4-]}
<MI 21cda CMP.W D0,D1> {[-4-]}
<MI 21cdc BNE 0x21cf0> {[-4-]}
<POP 21cde-21ce8 Naked> Σ-4 ↓ →0x21cf0
<MI 21cde MOVE.B (A6+0xd),D0> {[-4-]}
<MI 21ce2 CMP.B (A6-0x3),D0> {[-4-]}
<MI 21ce6 BNE 0x21cf0> {[-4-]}
<POP 21ce8-21cf0 Naked> Σ-4 Δ+4 →0x21d3a
<MI 21ce8 MOVEA.L (A6+0x8),A0> {[-4-]}
<MI 21cea MOVE.L D7,(A0)> {[-4-]}
<POP 21cec-21cee StackAdj> Δ+4 {}
<MI 21cee BRA 0x21d3a> {}
<POP 21cf0-21cf4 Naked> Σ-4 ↓ →0x21cb6 ←0x21cba ←0x21cde
<MI 21cf0 ADDQ.L #0x1,D7> {[-4-]}
<MI 21cf2 BVC 0x21cb6> {[-4-]}
<POP 21cf4-21cf8 Naked> Σ-4 Δ+4 →0x21d3a ←0x21cb6
<POP 21cf4-21cf6 StackAdj> Δ+4 {}
<MI 21cf6 BRA 0x21d3a> {}
<POP 21cf8-21cfe Naked> Σ0 ↓ ←0x21c9c
<MI 21cf8 MOVE.L 0x23516,D0> {}
<MI 21cfa SUBQ.L #0x1,D0> {}
<MI 21cfc MOVE.L D0,D7> {}
<POP 21cfe-21d02 Naked> Σ0 ↓ →0x21d3a ←0x21d36
<MI 21cfe TST.L D7> {}
<MI 21d00 BLT 0x21d3a> {}
<POP 21d02-21d26 Naked> Σ0 ↓ →0x21d36
<POP 0x21d02 LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {}
<MI 21d0c MOVE.L D7,D0> {}
<MI 21d0e ASL.L #0x1,D0> {}
<MI 21d10 LEA.L 0x224e6,A0> {}
<MI 21d12 MOVE.W (A0+D0.L+#0xc),(A6-0x4)> {}
<MI 21d16 CLR.L D0> {}
<MI 21d18 MOVE.B (A6-0x4),D0> {}
<MI 21d1a AND.W #0x3f,D0> {}
<MI 21d1c CLR.L D1> {}
<MI 21d1e MOVE.B (A6+0xc),D1> {}
<MI 21d22 CMP.W D0,D1> {}
<MI 21d24 BNE 0x21d36> {}
<POP 21d26-21d30 Naked> Σ0 ↓ →0x21d36
<MI 21d26 MOVE.B (A6+0xd),D0> {}
<MI 21d2a CMP.B (A6-0x3),D0> {}
<MI 21d2e BNE 0x21d36> {}
<POP 21d30-21d36 Naked> Σ0 →0x21d3a
<MI 21d30 MOVEA.L (A6+0x8),A0> {}
<MI 21d32 MOVE.L D7,(A0)> {}
<MI 21d34 BRA 0x21d3a> {}
<POP 21d36-21d3a Naked> Σ0 ↓ →0x21cfe ←0x21d02 ←0x21d26
<MI 21d36 SUBQ.L #0x1,D7> {}
<MI 21d38 BVC 0x21cfe> {}
<POP 21d3a-21d42 Epilogue> Σ0 ←0x21ce8 ←0x21cf4 ←0x21cfe ←0x21d30
@ 21d42
<POP 21d42-21fa8 Body>
<POP 21d42-21d58 Prologue> Σ0 ↓
<POP 21d58-21d72 RegCacheLoad> Σ0 ↓
<POP 21d72-21fa0 Naked> Σ0 ↓
<Blob 0x21d72 [18] @> Δ-18 {[«18""»]}
<Blob 0x21d7e [14] @> Δ-14 {[«18""»]|[«14""»]}
<POP 21d90-21d92 StackAdj> Δ-8 {[«18""»]|[«14""»]|[-8-]}
<Call 0x21d92 0x209fa> {[«18""»]|[«14""»]|[-8-]}
<POP 21d96-21d98 StackAdj> Δ-4 {[«18""»]|[«14""»]|[-12-]}
<Const 0x21d98 0x1.4> Δ-4 {[«18""»]|[«14""»]|[-12-]|[##1]}
<Const 0x21d9c 0x2d.4> Δ-4 {[«18""»]|[«14""»]|[-12-]|[##1]|[##45]}
<Call 0x21d9e 0x2082a> {[«18""»]|[«14""»]|[-12-]|[##1]|[##45]}
<POP 21da0-21da2 StackAdj> Δ+4 {[«18""»]|[«14""»]|[-12-]|[##1]}
<Lit 0x21da2 18> {[«18""»]|[«14""»]|[-12-]|[$$B - Put cursor at_]}
<POP 21dae-21daf StackAdj> Δ-4 {[«18""»]|[«14""»]|[-12-]|[$$B - Put cursor at_]|[-4-]}
<Blob 0x21daf [4] 0x224ee> Δ-4 {[«18""»]|[«14""»]|[-12-]|[$$B - Put cursor at_]|[-4-]|[«4»]}
<Call 0x21db4 0x102e4> {[«18""»]|[«14""»]|[-12-]|[$$B - Put cursor at_]|[-4-]|[«4»]}
Long2String(a : Long) : String
<Lit 0x21dba 13> {[«18""»]|[«14""»]|[-12-]|[$$B - Put cursor at_]|[-4-]|[$$ _]}
<Call 0x21dc8 0x102dc> {[«18""»]|[«14""»]|[-12-]|[$$B - Put cursor at_]|[-4-]|[$$ _]}
StringCat5(a, b, c, d, e : String) : String
<POP 21dce-21dd0 StackAdj> Δ+20 {[«18""»]|[«14""»]|[-4-]}
<Call 0x21dd0 0x103d8> {[«18""»]|[«14""»]|[-4-]}
WriteConsoleString(str : String)
<MI 21dd6 MOVEA.L A7,A0> {[«18""»]|[«14""»]|[-4-]}
<MI 21dd8 LEA.L 0x205ba,A1> {[«18""»]|[«14""»]|[-4-]}
<BlockMove 35,A1,A0> {[«18""»]|[«14""»]|[-4-]}
<Blob 0x21de4 [36] @> Δ-36 {[«18""»]|[«14""»]|[-4-]|[«36""»]}
<Blob 0x21df4 [36] @> Δ-36 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]}
<POP 21e04-21e06 StackAdj> Δ-8 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]}
<Const 0x21e06 0x2.4> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[##2]}
<Const 0x21e0a 0x2d.4> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[##2]|[##45]}
<Call 0x21e0c 0x2082a> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[##2]|[##45]}
<POP 21e0e-21e10 StackAdj> Δ+4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[##2]}
<Lit 0x21e10> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]}
<Pointer.sp 0x21e10 84> Δ-4
<Const 0x21e14 0x1.2> Δ-2
<Const 0x21e16 0x23.2> Δ-2
<Call 0x21e18 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21e1a-21e1c StackAdj> Δ+8
<POP 21e1a-21e1c StackAdj> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]}
<Const 0x21e1c 0x3.4> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[##3]}
<Const 0x21e20 0x2d.4> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[##3]|[##45]}
<Call 0x21e22 0x2082a> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[##3]|[##45]}
<POP 21e24-21e26 StackAdj> Δ+4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[##3]}
<Lit 0x21e26 35> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]}
<POP 21e30-21e32 StackAdj> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]|[-4-]}
<Const 0x21e32 0x4.4> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]|[-4-]|[##4]}
<Const 0x21e36 0x2d.4> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]|[-4-]|[##4]|[##45]}
<Call 0x21e38 0x2082a> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]|[-4-]|[##4]|[##45]}
<POP 21e3a-21e3c StackAdj> Δ+4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]|[-4-]|[##4]}
<Lit 0x21e3c 35> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]|[-4-]|[$$N - Move cursor forward 1 _]}
<Call 0x21e48 0x102e0> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]|[-4-]|[$$N - Move cursor forward 1 _]}
StringCat6(a, b, c, d, e, f : String) : String
<POP 21e4e-21e50 StackAdj> Δ+24 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-4-]}
<Call 0x21e50 0x103d8> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21e56-21e57 StackAdj> Δ+112 ↓ {}
<Blob 0x21e57 [36] @> Δ-36 {[«36""»]}
<Blob 0x21e66 [36] @> Δ-36 {[«36""»]|[«36""»]}
<Blob 0x21e76 [36] @> Δ-36 {[«36""»]|[«36""»]|[«36""»]}
<POP 21e86-21e88 StackAdj> Δ-8 {[«36""»]|[«36""»]|[«36""»]|[-8-]}
<Const 0x21e88 0x5.4> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[##5]}
<Const 0x21e8c 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[##5]|[##45]}
<Call 0x21e8e 0x2082a> {[«36""»]|[«36""»]|[«36""»]|[-8-]|[##5]|[##45]}
<POP 21e90-21e92 StackAdj> Δ+4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[##5]}
<Lit 0x21e92 35> {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]}
<POP 21e9c-21e9e StackAdj> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]}
<Const 0x21e9e 0x6.4> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[##6]}
<Const 0x21ea2 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[##6]|[##45]}
<Call 0x21ea4 0x2082a> {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[##6]|[##45]}
<POP 21ea6-21ea8 StackAdj> Δ+4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[##6]}
<Lit 0x21ea8 35> {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]}
<POP 21eb2-21eb4 StackAdj> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]|[-4-]}
<Const 0x21eb4 0x7.4> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]|[-4-]|[##7]}
<Const 0x21eb8 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]|[-4-]|[##7]|[##45]}
<Call 0x21eba 0x2082a> {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]|[-4-]|[##7]|[##45]}
<POP 21ebc-21ebe StackAdj> Δ+4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]|[-4-]|[##7]}
<Lit 0x21ebe 35> {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]|[-4-]|[$$R - Reverse search, forward in time]}
<Call 0x21eca 0x102e0> {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]|[-4-]|[$$R - Reverse search, forward in time]}
StringCat6(a, b, c, d, e, f : String) : String
<POP 21ed0-21ed2 StackAdj> Δ+24 {[«36""»]|[«36""»]|[«36""»]|[-4-]}
<Call 0x21ed2 0x103d8> {[«36""»]|[«36""»]|[«36""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21ed8-21ed9 StackAdj> Δ+112 ↓ {}
<Blob 0x21ed9 [36] @> Δ-36 {[«36""»]}
<Blob 0x21ee8 [36] @> Δ-36 {[«36""»]|[«36""»]}
<POP 21ef8-21efa StackAdj> Δ-8 {[«36""»]|[«36""»]|[-8-]}
<Const 0x21efa 0x8.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[##8]}
<Const 0x21efe 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[##8]|[##45]}
<Call 0x21f00 0x2082a> {[«36""»]|[«36""»]|[-8-]|[##8]|[##45]}
<POP 21f02-21f04 StackAdj> Δ+4 {[«36""»]|[«36""»]|[-8-]|[##8]}
<Lit 0x21f04 35> {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]}
<POP 21f0e-21f10 StackAdj> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]}
<Const 0x21f10 0x9.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]|[##9]}
<Const 0x21f14 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]|[##9]|[##45]}
<Call 0x21f16 0x2082a> {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]|[##9]|[##45]}
<POP 21f18-21f1a StackAdj> Δ+4 {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]|[##9]}
<Lit 0x21f1a 35> {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]|[$$F - Write trace info to file _]}
<Call 0x21f26 0x102d8> {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]|[$$F - Write trace info to file _]}
StringCat4(a, b, c, d : String) : String
<POP 21f2c-21f30 StackAdj> Δ+16 {[«36""»]|[«36""»]|[-4-]}
<Call 0x21f30 0x103d8> {[«36""»]|[«36""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21f36-21f37 StackAdj> Δ+76 ↓ {}
<Blob 0x21f37 [36] @> Δ-36 {[«36""»]}
<Blob 0x21f48 [36] @> Δ-36 {[«36""»]|[«36""»]}
<POP 21f58-21f5a StackAdj> Δ-8 {[«36""»]|[«36""»]|[-8-]}
<Const 0x21f5a 0xa.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[##10]}
<Const 0x21f5e 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[##10]|[##45]}
<Call 0x21f60 0x2082a> {[«36""»]|[«36""»]|[-8-]|[##10]|[##45]}
<POP 21f62-21f64 StackAdj> Δ+4 {[«36""»]|[«36""»]|[-8-]|[##10]}
<Lit 0x21f64 35> {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]}
<POP 21f6e-21f70 StackAdj> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]}
<Const 0x21f70 0xb.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[##11]}
<Const 0x21f74 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[##11]|[##45]}
<Call 0x21f76 0x2082a> {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[##11]|[##45]}
<POP 21f78-21f7a StackAdj> Δ+4 {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[##11]}
<Lit 0x21f7a 35> {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[$$? - This stuff again _]}
<POP 21f84-21f86 StackAdj> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[$$? - This stuff again _]|[-4-]}
<Call 0x21f86 0x20a48> {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[$$? - This stuff again _]|[-4-]}
<Call 0x21f8a 0x102dc> {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[$$? - This stuff again _]|[-4-]}
StringCat5(a, b, c, d, e : String) : String
<POP 21f90-21f92 StackAdj> Δ+20 {[«36""»]|[«36""»]|[-4-]}
<Call 0x21f92 0x103d8> {[«36""»]|[«36""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21f98-21f9a StackAdj> Δ+76 {}
<MI 21f9a CLR.B 0x2351e> {}
<POP 21fa0-21fa8 Epilogue> Σ0
@ 21fa8
START
<POP 21fa8--0001 Body> Δ+12
<POP 21fa8-21fb2 Prologue> Σ0
<POP 21fb2-21fd2 RegCacheLoad> Σ0 ↓
<POP 21fd2-21ff2 Naked> Σ0 ↓
<Call 0x21fd2 0x10398> {}
FSCALL_10398
<Const 0x21fd8 0x0.4> Δ-4 {[##0]}
<Call 0x21fdc 0x104d8> {[##0]}
ExpInit(a : Long)
<POP 21fe2-21fe4 StackAdj> Δ+4 {}
<Call 0x21fe4 0x20fae> {}
<MI 21fe8 CLR.B 0x2352a> {}
<MI 21fea MOVE.L 0x2351a,0x23516> {}
<MI 21ff0 MOVE.B #0x01,0x2351e> {}
<POP 21ff2-21ff6 Naked> Σ0 ↓ →0x2202a ←0x2227e
<MI 21ff2 TST.B 0x2351e> {}
<MI 21ff4 BEQ 0x2202a> {}
<POP 21ff6-2202a Naked> Σ0 ↓
<Blob 0x21ff6 [4] 0x23516> Δ-4 {[«4»]}
<Blob 0x21ff8 [2] 0x2352a> Δ-2 {[«4»]|[«2»]}
<Call 0x21ffa 0x21700> {[«4»]|[«2»]}
<POP 21ffe-21fff StackAdj> Δ+6 ↓ {}
<Blob 0x21fff [12] @> Δ-12 {[«12""»]}
<POP 2200e-22010 StackAdj> Δ-4 {[«12""»]|[-4-]}
<Lit 0x22010 11> {[«12""»]|[$$Micro TRACE]}
<Call 0x22022 0x20be2> {[«12""»]|[$$Micro TRACE]}
<POP 22026-2202a StackAdj> Δ+16 {}
<POP 2202a-2204c Naked> Σ0 ↓ →0x22256 ←0x21ff2
<MI 2202a MOVE.B #0x01,0x2351e> {}
<Const 0x2202c 0x23520.4> Δ-4 {[##144672]}
<Call 0x22032 0x21a60> {[##144672]}
<POP 22036-22038 StackAdj> Δ+4 {}
<MI 22038 CLR.L D0> {}
<MI 2203a MOVE.B 0x23520,D0> {}
<MI 22040 SUBI.W #0x003f,D0> {}
<MI 22044 CMPI.W #0x001b,D0> {}
<MI 22048 BHI 0x22256> {}
<POP 2204c-22056 Naked> Σ0 →0x2208e →0x22256 →0x22256 →0x22098 →0x22256 →0x22256 →0x22256 →0x220a8 →0x22256 →0x22256 →0x22256 →0x22256 →0x22256 →0x2212a →0x22256 →0x22138 →0x22140 →0x22174 →0x22256 →0x2217c →0x2217c →0x22256 →0x22256 →0x22256 →0x22256 →0x2220a →0x22256 →0x2224e
<MI 2204c ADD.W D0,D0> {}
<MI 2204e SWITCH D0.W> {}
<POP 2208e-22092 Naked> Σ0 ↓ ←0x2204c
<Call 0x2208e 0x21d42> {}
<POP 22092-22098 Naked> Σ0 →0x2227e ←0x220a8
<MI 22092 CLR.B 0x2351e> {}
<MI 22094 BRA 0x2227e> {}
<POP 22098-2209e Naked> Σ0 Δ-4 ↓ ←0x2204c
<Blob 0x22098 [4] 0x224ee> Δ-4 {[«4»]}
<POP 2209e-220a8 Naked> Σ-4 Δ+4 →0x2227e ←0x22138 ←0x22174 ←0x2224e
<Call 0x2209e 0x21be0> {[-4-]}
<POP 220a2-220a4 StackAdj> Δ+4 {}
<MI 220a4 BRA 0x2227e> {}
<POP 220a8-2212a Naked> Σ0 →0x22092 ←0x2204c
<Blob 0x220a8 [10] @> Δ-10 {[«10""»]}
<POP 220b8-220ba StackAdj> Δ-8 {[«10""»]|[-8-]}
<Lit 0x220ba 9> {[«10""»]|[-4-]|[$$Filename:]}
<Call 0x220ca 0x103e4> {[«10""»]|[-4-]|[$$Filename:]}
AskConsoleString(prompt : String) : String
<POP 220d0-220d2 StackAdj> Δ+4 {[«10""»]|[-4-]}
<MI 220d2 MOVE.L (A7)+,0x2352c> Δ+4 {[«10""»]}
<POP 220d8-220d9 StackAdj> Δ+10 ↓ {}
<Blob 0x220d9 [32] @> Δ-32 {[«32""»]}
<POP 220e8-220ea StackAdj> Δ-8 {[«32""»]|[-8-]}
<Lit 0x220ea 31> {[«32""»]|[-4-]|[$$Number of 128 word blocks (1): ]}
<Const 0x220fc 0x1.4> Δ-4 {[«32""»]|[-4-]|[$$Number of 128 word blocks (1): ]|[##1]}
<Const 0x22100 0x7.4> Δ-4 {[«32""»]|[-4-]|[$$Number of 128 word blocks (1): ]|[##1]|[##7]}
<Call 0x22104 0x103ec> {[«32""»]|[-4-]|[$$Number of 128 word blocks (1): ]|[##1]|[##7]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 2210a-2210c StackAdj> Δ+12 {[«32""»]|[-4-]}
<MI 2210c MOVE.L (A7)+,0x23526> Δ+4 {[«32""»]}
<POP 22112-22114 StackAdj> Δ+28 {[-4-]}
<POP 22114-22115 StackAdj> Δ+4 {}
<Blob 0x22115 [4] 0x2352c> Δ-4 {[«4»]}
<Blob 0x2211a [4] 0x23526> Δ-4 {[«4»]|[«4»]}
<Call 0x22120 0x21924> {[«4»]|[«4»]}
<POP 22124-22126 StackAdj> Δ+8 {}
<MI 22126 BRA 0x22092> {}
<POP 2212a-22138 Naked> Σ0 →0x2227e ←0x2204c
<MI 2212a NEG.B 0x2352a> {}
<MI 2212c ADDQ.B #0x1,0x2352a> {}
<MI 2212e MOVE.B #0x01,0x2351f> {}
<MI 22134 BRA 0x2227e> {}
<POP 22138-22140 Naked> Σ0 Δ-4 →0x2209e ←0x2204c
<Blob 0x22138 [4] 0x23516> Δ-4 {[«4»]}
<MI 2213a SUBQ.L #0x1,(A7)> {[-4-]}
<MI 2213c BRA 0x2209e> {[-4-]}
<POP 22140-22174 Naked> Σ0 →0x2227e ←0x2204c
<Blob 0x22140 [10] @> Δ-10 {[«10""»]}
<POP 22150-22152 StackAdj> Δ-8 {[«10""»]|[-8-]}
<Lit 0x22152 9> {[«10""»]|[-4-]|[$$ Offset: ]}
<Call 0x22162 0x103e8> {[«10""»]|[-4-]|[$$ Offset: ]}
AskOnConsoleInt(prompt: String) : Long
<POP 22168-2216a StackAdj> Δ+4 {[«10""»]|[-4-]}
<Call 0x2216a 0x21be0> {[«10""»]|[-4-]}
<POP 2216e-22170 StackAdj> Δ+14 {}
<MI 22170 BRA 0x2227e> {}
<POP 22174-2217c Naked> Σ0 Δ-4 →0x2209e ←0x2204c
<Blob 0x22174 [4] 0x23516> Δ-4 {[«4»]}
<MI 22176 ADDQ.L #0x1,(A7)> {[-4-]}
<MI 22178 BRA 0x2209e> {[-4-]}
<POP 2217c-221b6 Naked> Σ0 Δ-2 ↓ →0x221b8 ←0x2204c ←0x2204c
<Blob 0x2217c [14] @> Δ-14 {[«14""»]}
<POP 22188-2218a StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x2218a 14> {[«14""»]|[$$Microaddress:_]}
<Const 0x2219a 0x23530.4> Δ-4 {[«14""»]|[$$Microaddress:_]|[##144688]}
<Call 0x221a0 0x21b16> {[«14""»]|[$$Microaddress:_]|[##144688]}
<POP 221a4-221a8 StackAdj> Δ+20 {[-2-]}
<MI 221a8 CLR.B (A7)> {[-2-]}
<MI 221aa MOVE.B 0x23520,D0> {[-2-]}
<MI 221b0 CMPI.B #0x53,D0> {[-2-]}
<MI 221b4 BNE 0x221b8> {[-2-]}
<POP 221b6-221b8 Naked> Σ-2 ↓
<MI 221b6 ADDQ.B #0x1,(A7)> {[-2-]}
<POP 221b8-221d2 Naked> Σ-2 Δ+2 ↓ →0x221e0 ←0x2217c
<Blob 0x221b8 [2] 0x23530> Δ-2 {[-2-]|[«2»]}
<Const 0x221be 0x23522.4> Δ-4 {[-2-]|[«2»]|[##144674]}
<Call 0x221c4 0x21c70> {[-2-]|[«2»]|[##144674]}
<POP 221c8-221ca StackAdj> Δ+8 {}
<MI 221ca TST.L 0x23522> {}
<MI 221d0 BLT 0x221e0> {}
<POP 221d2-221e0 Naked> Σ0 →0x22208
<Blob 0x221d2 [4] 0x23522> Δ-4 {[«4»]}
<Call 0x221d8 0x21be0> {[«4»]}
<POP 221dc-221de StackAdj> Δ+4 {}
<MI 221de BRA 0x22208> {}
<POP 221e0-22208 Naked> Σ0 ↓ ←0x221b8
<Blob 0x221e0 [22] @> Δ-22 {[«22""»]}
<POP 221ec-221ee StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x221ee 22> {[«22""»]|[$$Microaddress not found]}
<Call 0x221fe 0x20be2> {[«22""»]|[$$Microaddress not found]}
<POP 22202-22206 StackAdj> Δ+26 {}
<MI 22206 CLR.B 0x2351e> {}
<POP 22208-2220a Naked> Σ0 →0x2227e ←0x221d2
<MI 22208 BRA 0x2227e> {}
<POP 2220a-2224e Naked> Σ0 →0x2227e ←0x2204c
<POP 2220a-2220c StackAdj> Δ-8 {[-8-]}
<Const 0x2220c 0x1.4> Δ-4 {[-8-]|[##1]}
<Blob 0x22210 [4] 0x23512> Δ-4 {[-8-]|[##1]|[«4»]}
<Call 0x22216 0x208ac> {[-8-]|[##1]|[«4»]}
<POP 2221a-2221c StackAdj> Δ+4 {[-8-]|[##1]}
<Const 0x2221c 0x1.4> Δ-4 {[-8-]|[##1]|[##1]}
<Const 0x22220 0x1.4> Δ-4 {[-8-]|[##1]|[##1]|[##1]}
<Call 0x22224 0x2082a> {[-8-]|[##1]|[##1]|[##1]}
<POP 22228-2222a StackAdj> Δ+4 {[-8-]|[##1]|[##1]}
<Call 0x2222a 0x209b4> {[-8-]|[##1]|[##1]}
<Call 0x2222e 0x102d4> {[-8-]|[##1]|[##1]}
StringCat3(a, b, c : String) : String
<POP 22234-22236 StackAdj> Δ+12 {[-4-]}
<Call 0x22236 0x103d8> {[-4-]}
WriteConsoleString(str : String)
<POP 2223c-2223e StackAdj> Δ+2 {[-2-]}
<MI 2223e CLR.B (A7)> {[-2-]}
<Const 0x22240 0x1.4> Δ-4 {[-2-]|[##1]}
<Call 0x22244 0x103b8> {[-2-]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 2224a-2224c StackAdj> Δ+6 {}
<MI 2224c BRA 0x2227e> {}
<POP 2224e-22256 Naked> Σ0 Δ-4 →0x2209e ←0x2204c
<Const 0x2224e 0x0.4> Δ-4 {[##0]}
<MI 22252 BRA 0x2209e> {[##0]}
<POP 22256-2227e Naked> Σ0 ↓ ←0x2202a ←0x2204c ←0x2204c ←0x2204c ←0x2204c ←0x2204c ←0x2204c ←0x2204c ←0x2204c ←0x2204c ←0x2204c ←0x2204c ←0x2204c ←0x2204c ←0x2204c ←0x2204c ←0x2204c ←0x2204c
<MI 22256 CLR.B 0x2351e> {}
<Blob 0x22258 [28] @> Δ-28 {[«28""»]}
<POP 22264-22266 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x22266 28> {[«28""»]|[$$Illegal Command - ? for help]}
<Call 0x22276 0x20be2> {[«28""»]|[$$Illegal Command - ? for help]}
<POP 2227a-2227e StackAdj> Δ+32 {}
<POP 2227e-22282 Naked> Σ0 →0x21ff2 ←0x22092 ←0x2209e ←0x2212a ←0x22140 ←0x22208 ←0x2220a
<MI 2227e BRA 0x21ff2> {}
<POP 22288-2228e Naked> Σ0
<Call 0x22288 0x10568> {}
Run_Experiment()
@ 222ee
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 222ee-22356 Body>
<POP 222ee-22304 Prologue> Σ0 ↓
<POP 22304-2234e Naked> Σ0 ↓
<Blob 0x22304 [14] @> Δ-14 {[«14""»]}
<Const 0x22310 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 22314-22316 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x22316 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 22328-2232a StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2232a MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2232e EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 22330 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 22332 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x22334 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 2233a-2233c StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x2233c 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 22342-22344 StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x22344 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 2234a-2234e StackAdj> Δ+20 {}
<POP 2234e-22356 Epilogue> Σ0
@ 223aa
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 223aa-224e6 Body>
<POP 223aa-223c0 Prologue> Σ0 ↓
<POP 223c0-223d6 RegCacheLoad> Σ0 ↓
<POP 223d6-22436 Naked> Σ0 ↓ →0x2247e
<Call 0x223d6 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x223dc [18] @> Δ-18 {[«18""»]}
<POP 223e8-223ea StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x223ea 18> {[«18""»]|[$$Experiment error :]}
<Call 0x223f6 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 223f8-223f9 StackAdj> Δ+22 ↓ {}
<Blob 0x223f9 [14] @> Δ-14 {[«14""»]}
<POP 22408-2240a StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x2240a 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 22414-22416 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 22416 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x2241a 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 22420-22422 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x22422 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 22428-2242a StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x2242a 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2242c-2242e StackAdj> Δ+18 {}
<MI 2242e MOVEA.L (A6+0xa),A0> {}
<MI 22432 CMPA.W #0x01,A0> {}
<MI 22434 BEQ 0x2247e> {}
<POP 22436-2247e Naked> Σ0 ↓
<Blob 0x22436 [14] @> Δ-14 {[«14""»]}
<Blob 0x22446 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 22456-22458 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x22458 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 22462-22464 StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x22464> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x22464 12> Δ-4
<Const 0x22468 0x1.2> Δ-2
<Const 0x2246a 0x1e.2> Δ-2
<Call 0x2246c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2246e-22470 StackAdj> Δ+8
<Call 0x22470 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 22476-22478 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x22478 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2247a-2247e StackAdj> Δ+48 {}
<POP 2247e-224de Naked> Σ0 ↓ ←0x223d6
<Blob 0x2247e [14] @> Δ-14 {[«14""»]}
<POP 2248e-22490 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x22490 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 2249a-2249c StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 2249c MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x224a0 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 224a6-224a8 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x224a8 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 224ae-224b0 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x224b0 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 224b2-224b3 StackAdj> Δ+18 ↓ {}
<Blob 0x224b3 [24] @> Δ-24 {[«24""»]}
<Const 0x224c2 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 224c6-224c8 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x224c8 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x224d6 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 224dc-224de StackAdj> Δ+30 {}
<POP 224de-224e6 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.16225dde3ed854bc 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 1f a8 | | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 35 42 | 5B | .PTR 0x23542 00020010 code.end: 00020010 00 02 24 e6 | $ | .PTR 0x224e6 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 22 ee | " | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 23 aa | # | .CODE EXP_FAIL 00020020 00 00 00 00 | | .CONST 0x00000000 00020024 exp_init_done: 00020024 00 | | .CONST 0x00 00020025 00 | | .CONST 0x00 00020026 00 00 | | .CONST 0x0000 00020028 00 00 | | .CONST 0x0000 0002002a 00 00 | | .XXX[0x2] 0002002c 00 00 | | .CONST 0x0000 0002002e 00 00 | | .CONST 0x0000 00020030 00 00 | | .CONST 0x0000 00020032 00 00 00 00 00 00 | | .XXX[0x6] 00020038 00 00 00 00 00 00 00 00 | | .BLANK 00[0xb0] 000200e8 00 00 00 00 | | .XXX[0x4] 000200ec 00 00 00 00 | | .PTR 0x0 000200f0 is_open_ERROR_LOG: 000200f0 00 | | .CONST 0x0 000200f1 write_error_ERROR_LOG: 000200f1 00 | | .CONST 0x0 000200f2 00 00 00 00 | | .CONST 0x00000000 000200f6 00 00 00 00 | | .CONST 0x00000000 000200fa 00 | | .CONST 0x00 000200fb 00 | | .CONST 0x00 000200fc file_ERROR_LOG: 000200fc 00 00 00 00 | | .CONST 0x00000000 00020100 00 00 00 00 | | .CONST 0x00000000 00020104 00 00 | | .CONST 0x0000 00020106 00 00 | | .CONST 0x0000 00020108 somekindoffsflag: 00020108 00 | | .CONST 0x00 00020109 00 | | .CONST 0x00 0002010a 40 28 23 29 54 52 |@(#)TR | .XXX[0x6] 00020110 41 43 45 2c 31 2e 31 2c |ACE,1.1,| .XXX[0x18] 00020118 39 32 2f 30 37 2f 30 39 |92/07/09| 00020120 2c 31 32 3a 30 30 3a 30 |,12:00:0| 00020128 30 5c |0\ | .XXX[0x2] 0002012a 20 5b | [ | .TXT ' [' 0002012c 3b 20 |; | .TXT '; ' 0002012e 48 20 |H | .TXT 'H ' 00020130 20 5b | [ | .TXT ' [' 00020132 3b 20 |; | .TXT '; ' 00020134 72 20 |r | .TXT 'r ' 00020136 20 5b 30 4a | [0J | .TXT ' [0J' 0002013a 20 5b | [ | .TXT ' [' 0002013c 37 3b |7; | .TXT '7;' 0002013e 31 6d |1m | .TXT '1m' 00020140 20 5b 30 6d | [0m | .TXT ' [0m' 00020144 20 5b 30 4b | [0K | .TXT ' [0K' 00020148 20 5b | [ | .TXT ' [' 0002014a 63 20 |c | .XXX[0x2] 0002014c 43 6f 6d 6d 61 6e 64 3a |Command:| .TXT 'Command:_ ' 00020156 50 72 |Pr | .XXX[0x2] 00020158 6f 67 72 61 6d 20 69 6e |ogram in| .XXX[0x30] 00020160 76 6f 63 61 74 69 6f 6e |vocation| 00020168 20 65 72 72 6f 72 2c 20 | error, | 00020170 6e 6f 6e 2d 69 6e 74 65 |non-inte| 00020178 67 65 72 20 63 6f 6d 6d |ger comm| 00020180 61 6e 64 20 6c 69 6e 65 |and line| 00020188 4c 6f 61 64 69 6e 67 20 |Loading | .TXT 'Loading trace data from IOC board.' 000201aa 4c 6f 61 64 69 6e 67 20 |Loading | .TXT 'Loading trace data from crashdump disk file.' 000201d6 43 52 41 53 48 5f 44 55 |CRASH_DU| .TXT 'CRASH_DUMP.SAVED_STATE' 000201ec 41 44 41 5f 44 45 46 49 |ADA_DEFI| .TXT 'ADA_DEFINED ' 000201f8 4d 49 4c 44 |MILD | .TXT 'MILD' 000201fc 53 45 |SE | .TXT 'SE' 000201fe 56 45 |VE | .TXT 'VE' 00020200 52 45 |RE | .TXT 'RE' 00020202 45 56 45 4e 54 53 2e 53 |EVENTS.S| .TXT 'EVENTS.STOP_MACHINE_EVENT ' 0002021c 45 56 45 4e 54 53 2e 47 |EVENTS.G| .TXT 'EVENTS.GENERAL_TIMER_EVENT' 00020236 45 56 45 4e 54 53 2e 53 |EVENTS.S| .TXT 'EVENTS.SLICE_TIMER_EVENT' 0002024e 2a 20 55 6e 64 65 66 69 |* Undefi| .TXT '* Undefined_event_0118' 00020264 49 4f 2e 52 45 43 45 49 |IO.RECEI| .TXT 'IO.RECEIVE_PACKET ' 00020276 49 4f 2e 52 45 43 45 49 |IO.RECEI| .TXT 'IO.RECEIVE_STATUS ' 00020288 2a 20 55 6e 64 65 66 69 |* Undefi| .TXT '* Undefined_event_0130' 0002029e 45 56 45 4e 54 53 2e 52 |EVENTS.R| .TXT 'EVENTS.REFRESH_MEMORY_EVENT ' 000202ba 45 56 45 4e 54 53 2e 49 |EVENTS.I| .TXT 'EVENTS.IBUF_EMPTY_EVENT ' 000202d2 45 56 45 4e 54 53 2e 42 |EVENTS.B| .TXT 'EVENTS.BREAK_CLASS_EVENT' 000202ea 2a 20 55 6e 64 65 66 69 |* Undefi| .TXT '* Undefined_event_0150' 00020300 45 56 45 4e 54 53 2e 54 |EVENTS.T| .TXT 'EVENTS.TOS_OPTIMIZATION_ERR_EVENT ' 00020322 45 56 45 4e 54 53 2e 52 |EVENTS.R| .TXT 'EVENTS.RESOLVE_REFERENCE_EVENT' 00020340 2a 20 55 6e 64 65 66 69 |* Undefi| .TXT '* Undefined_event_168 ' 00020356 45 56 45 4e 54 53 2e 43 |EVENTS.C| .TXT 'EVENTS.CSA_OVERFLOW_EVENT ' 00020370 45 56 45 4e 54 53 2e 43 |EVENTS.C| .TXT 'EVENTS.CSA_UNDERFLOW_EVENT' 0002038a 50 41 47 45 5f 46 41 55 |PAGE_FAU| .TXT 'PAGE_FAULT.MEMORY_EXCEPTION_EVENT ' 000203ac 45 56 45 4e 54 53 2e 43 |EVENTS.C| .TXT 'EVENTS.CORRECTABLE_ERROR_EVENT' 000203ca 45 56 45 4e 54 53 2e 4d |EVENTS.M| .TXT 'EVENTS.MICRO_BREAK_EVENT' 000203e2 45 56 45 4e 54 53 2e 45 |EVENTS.E| .TXT 'EVENTS.EXIT_CHECK_ERROR_EVENT ' 00020400 45 56 45 4e 54 53 2e 46 |EVENTS.F| .TXT 'EVENTS.FIELD_NUMBER_ERROR_EVENT ' 00020420 45 56 45 4e 54 53 2e 43 |EVENTS.C| .TXT 'EVENTS.CLASS_ERROR_EVENT' 00020438 45 56 45 4e 54 53 2e 42 |EVENTS.B| .TXT 'EVENTS.BINARY_EQ_PRIVACY_CK_EVENT ' 0002045a 45 56 45 4e 54 53 2e 42 |EVENTS.B| .TXT 'EVENTS.BINARY_OP_PRIVACY_CK_EVENT ' 0002047c 45 56 45 4e 54 53 2e 54 |EVENTS.T| .TXT 'EVENTS.TOS_OP_PRIVACY_CHECK_EVENT ' 0002049e 45 56 45 4e 54 53 2e 4e |EVENTS.N| .TXT 'EVENTS.NTOS_OP_PRIVACY_CHECK_EVENT' 000204c0 45 56 45 4e 54 53 2e 50 |EVENTS.P| .TXT 'EVENTS.PAGE_CROSSING_EVENT' 000204da 45 56 45 4e 54 53 2e 53 |EVENTS.S| .TXT 'EVENTS.SYSTEM_CLASS_ERROR_EVENT ' 000204fa 49 4f 2e 52 45 43 45 49 |IO.RECEI| .TXT 'IO.RECEIVE_PACKET_MICRO_EVENT ' 00020518 49 4f 2e 52 45 43 45 49 |IO.RECEI| .TXT 'IO.RECEIVE_STATUS_MICRO_EVENT ' 00020536 49 4f 2e 58 46 45 52 5f |IO.XFER_| .TXT 'IO.XFER_COMPLETE_MICRO_EVENT' 00020552 45 56 45 4e 54 53 2e 55 |EVENTS.U| .TXT 'EVENTS.UNIMPLEMENTED_OPCODE ' 0002056e 2b 20 |+ | .TXT '+ ' 00020570 20 48 | H | .TXT ' H' 00020572 20 5f | _ | .TXT ' _' 00020574 20 43 | C | .TXT ' C' 00020576 5f 20 |_ | .XXX[0x2] 00020578 20 20 | | .TXT ' ' 0002057a 5f 20 |_ | .XXX[0x2] 0002057c 20 20 20 5f | _ | .TXT ' _' 00020580 4f 66 66 73 65 74 20 6d |Offset m| .TXT 'Offset must be in [0 .._' 00020598 5d 20 |] | .TXT '] ' 0002059a 42 20 2d 20 50 75 74 20 |B - Put | .TXT 'B - Put cursor at_' 000205ac 20 20 20 20 20 20 20 20 | | .TXT ' _ ' 000205ba 5a 20 2d 20 50 75 |Z - Pu | .XXX[0x6] 000205c0 74 20 63 75 72 73 6f 72 |t cursor| .XXX[0x18] 000205c8 20 61 74 20 30 20 20 20 | at 0 | 000205d0 20 20 20 20 20 20 20 20 | | 000205d8 20 20 20 20 5f 20 | _ | .XXX[0x6] 000205de 4f 20 2d 20 50 75 74 20 |O - Put | .TXT 'O - Put cursor at desired offset _ ' 00020602 4e 20 2d 20 4d 6f 76 65 |N - Move| .TXT 'N - Move cursor forward 1 _ ' 00020626 50 20 2d 20 4d 6f 76 65 |P - Move| .TXT 'P - Move cursor back 1 _ ' 0002064a 53 20 2d 20 53 65 61 72 |S - Sear| .TXT 'S - Search back in time for uaddr _ ' 0002066e 52 20 2d 20 52 65 76 65 |R - Reve| .TXT 'R - Reverse search, forward in time ' 00020692 4c 20 2d 20 44 69 73 70 |L - Disp| .TXT 'L - Display label - Incomplete _ ' 000206b6 46 20 2d 20 57 72 69 74 |F - Writ| .TXT 'F - Write trace info to file _ ' 000206da 58 20 2d 20 45 78 69 74 |X - Exit| .TXT 'X - Exit _ ' 000206fe 3f 20 2d 20 54 68 69 73 |? - This| .TXT '? - This stuff again _ ' 00020722 4e 75 6d 62 65 72 20 6f |Number o| .TXT 'Number of 128 word blocks (1): ' 00020742 4d 69 63 72 6f 20 54 52 |Micro TR| .TXT 'Micro TRACE ' 0002074e 46 69 6c 65 6e 61 6d 65 |Filename| .TXT 'Filename: ' 00020758 20 4f 66 66 73 65 74 3a | Offset:| .TXT ' Offset: ' 00020762 4d 69 63 72 6f 61 64 64 |Microadd| .TXT 'Microaddress:_' 00020770 4d 69 63 72 6f 61 64 64 |Microadd| .TXT 'Microaddress not found' 00020786 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal Command - ? for help' 000207a2 00 00 00 00 00 00 | | .XXX[0x6] 000207a8 00 00 00 00 00 00 fe ff | | .XXX[0x10] 000207b0 ff 07 00 00 00 00 00 00 | | 000207b8 00 00 00 00 00 00 00 00 | | .BLANK 00[0x10] 000207c8 ff 03 7e 00 00 00 00 00 | ~ | .XXX[0x8] 000207d0 00 00 00 00 00 00 00 00 | | .BLANK 00[0x10] 000207e0 00 00 | | .XXX[0x2] 000207e2 ; -------------------------------------------------------------------------------------- 000207e2 ; OMSI PASCAL Function 000207e2 ; <LVAR 0x008 4(r)> 000207e2 ; -------------------------------------------------------------------------------------- 000207e2 4e 56 ff ea |NV | LINK.W A6,#0xffea 000207e6 bf d5 | | CMPA.L (A5),A7 000207e8 62 06 |b | BHI 0x207f0 000207ea 44 fc 00 02 |D | MOVE.W #0x2,CCR 000207ee 4e 76 |Nv | TRAPV 000207f0 de fc 00 16 | | ADDA.W #0x16,A7 000207f4 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 000207f8 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000207fc 55 4f |UO | SUBQ.L #0x2,A7 000207fe 4e b9 00 01 03 d4 |N | JSR ReadChar() : Byte 00020804 10 1f | | MOVE.B (A7)+,D0 00020806 10 80 | | MOVE.B D0,(A0) 00020808 0c 00 00 61 | a | CMPI.B #0x61,D0 0002080c 65 14 |e | BCS 0x20822 0002080e 0c 00 00 7a | z | CMPI.B #0x7a,D0 00020812 62 0e |b | BHI 0x20822 00020814 42 81 |B | CLR.L D1 00020816 12 00 | | MOVE.B D0,D1 00020818 04 41 00 20 | A | SUBI.W #0x0020,D1 0002081c 43 bc 00 ff |C | CHK.W #0xff,D1 00020820 10 81 | | MOVE.B D1,(A0) 00020822 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00020826 4e 5e |N^ | UNLK A6 00020828 4e 75 |Nu | RTS 0002082a ; -------------------------------------------------------------------------------------- 0002082a ; OMSI PASCAL Function 0002082a ; <LVAR 0x010 4(w)> 0002082a ; <LVAR 0x00c 4(r)> 0002082a ; <LVAR 0x008 4(r)> 0002082a ; -------------------------------------------------------------------------------------- 0002082a 4e 56 ff c2 |NV | LINK.W A6,#0xffc2 0002082e bf d5 | | CMPA.L (A5),A7 00020830 62 06 |b | BHI 0x20838 00020832 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020836 4e 76 |Nv | TRAPV 00020838 de fc 00 3a | : | ADDA.W #0x3a,A7 0002083c 48 e7 c0 88 |H | MOVEM.L A4+A0+D1+D0,-(A7) 00020840 41 f9 00 01 02 c4 |A | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A0 00020846 70 01 |p | MOVEQ.L #0x01,D0 00020848 72 02 |r | MOVEQ.L #0x02,D1 0002084a 3f 3a f8 de |?: | MOVE.W 0x2012a,-(A7) 0002084e 3f 3a f8 dc |?: | MOVE.W 0x2012c,-(A7) 00020852 3f 3a f8 da |?: | MOVE.W 0x2012e,-(A7) 00020856 51 4f |QO | SUBQ.L #0x8,A7 00020858 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002085c 3f 00 |? | MOVE.W D0,-(A7) 0002085e 3f 01 |? | MOVE.W D1,-(A7) 00020860 4e 90 |N | JSR (A0) 00020862 2e ae 00 0c |. | MOVE.L (A6+0xc),(A7) 00020866 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002086c 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00020870 3f 00 |? | MOVE.W D0,-(A7) 00020872 3f 01 |? | MOVE.W D1,-(A7) 00020874 4e 90 |N | JSR (A0) 00020876 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 0002087a 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00020880 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00020884 3f 00 |? | MOVE.W D0,-(A7) 00020886 3f 01 |? | MOVE.W D1,-(A7) 00020888 4e 90 |N | JSR (A0) 0002088a 50 4f |PO | ADDQ.L #0x8,A7 0002088c 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 00020892 de fc 00 14 | | ADDA.W #0x14,A7 00020896 28 5f |(_ | MOVEA.L (A7)+,A4 00020898 5c 4f |\O | ADDQ.L #0x6,A7 0002089a 19 7c 00 1b 00 02 | | | MOVE.B #0x1b,(A4+0x2) 000208a0 2d 4c 00 10 |-L | MOVE.L A4,(A6+0x10) 000208a4 4c df 11 03 |L | MOVEM.L (A7)+,D0+D1+A0+A4 000208a8 4e 5e |N^ | UNLK A6 000208aa 4e 75 |Nu | RTS 000208ac ; -------------------------------------------------------------------------------------- 000208ac ; OMSI PASCAL Function 000208ac ; <LVAR 0x010 4(w)> 000208ac ; <LVAR 0x00c 4(r)> 000208ac ; <LVAR 0x008 4(r)> 000208ac ; -------------------------------------------------------------------------------------- 000208ac 4e 56 ff c2 |NV | LINK.W A6,#0xffc2 000208b0 bf d5 | | CMPA.L (A5),A7 000208b2 62 06 |b | BHI 0x208ba 000208b4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000208b8 4e 76 |Nv | TRAPV 000208ba de fc 00 3a | : | ADDA.W #0x3a,A7 000208be 48 e7 c0 88 |H | MOVEM.L A4+A0+D1+D0,-(A7) 000208c2 41 f9 00 01 02 c4 |A | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A0 000208c8 70 01 |p | MOVEQ.L #0x01,D0 000208ca 72 02 |r | MOVEQ.L #0x02,D1 000208cc 3f 3a f8 62 |?: b | MOVE.W 0x20130,-(A7) 000208d0 3f 3a f8 60 |?: ` | MOVE.W 0x20132,-(A7) 000208d4 3f 3a f8 5e |?: ^ | MOVE.W 0x20134,-(A7) 000208d8 51 4f |QO | SUBQ.L #0x8,A7 000208da 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000208de 3f 00 |? | MOVE.W D0,-(A7) 000208e0 3f 01 |? | MOVE.W D1,-(A7) 000208e2 4e 90 |N | JSR (A0) 000208e4 2e ae 00 0c |. | MOVE.L (A6+0xc),(A7) 000208e8 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000208ee 48 6f 00 12 |Ho | PEA.L (A7+0x12) 000208f2 3f 00 |? | MOVE.W D0,-(A7) 000208f4 3f 01 |? | MOVE.W D1,-(A7) 000208f6 4e 90 |N | JSR (A0) 000208f8 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 000208fc 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00020902 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00020906 3f 00 |? | MOVE.W D0,-(A7) 00020908 3f 01 |? | MOVE.W D1,-(A7) 0002090a 4e 90 |N | JSR (A0) 0002090c 50 4f |PO | ADDQ.L #0x8,A7 0002090e 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 00020914 de fc 00 14 | | ADDA.W #0x14,A7 00020918 28 5f |(_ | MOVEA.L (A7)+,A4 0002091a 5c 4f |\O | ADDQ.L #0x6,A7 0002091c 19 7c 00 1b 00 02 | | | MOVE.B #0x1b,(A4+0x2) 00020922 2d 4c 00 10 |-L | MOVE.L A4,(A6+0x10) 00020926 4c df 11 03 |L | MOVEM.L (A7)+,D0+D1+A0+A4 0002092a 4e 5e |N^ | UNLK A6 0002092c 4e 75 |Nu | RTS 0002092e ; -------------------------------------------------------------------------------------- 0002092e ; OMSI PASCAL Function 0002092e ; <LVAR 0x00c 4(r)> 0002092e ; <LVAR 0x008 4(r)> 0002092e ; -------------------------------------------------------------------------------------- 0002092e 4e 56 ff da |NV | LINK.W A6,#0xffda 00020932 bf d5 | | CMPA.L (A5),A7 00020934 62 06 |b | BHI 0x2093c 00020936 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002093a 4e 76 |Nv | TRAPV 0002093c de fc 00 1e | | ADDA.W #0x1e,A7 00020940 48 e7 81 08 |H | MOVEM.L A4+D7+D0,-(A7) 00020944 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00020948 0c 80 00 00 00 44 | D | CMPI.L #0x00000044,D0 0002094e 66 0a |f | BNE 0x2095a 00020950 59 4f |YO | SUBQ.L #0x4,A7 00020952 2f 39 00 02 35 0a |/9 5 | MOVE.L 0x2350a,-(A7) 00020958 60 06 |` | BRA 0x20960 0002095a 59 4f |YO | SUBQ.L #0x4,A7 0002095c 48 78 00 01 |Hx | PEA.L 0x1 00020960 48 78 00 01 |Hx | PEA.L 0x1 00020964 4e ba fe c4 |N | JSR 0x2082a 00020968 50 4f |PO | ADDQ.L #0x8,A7 0002096a 28 5f |(_ | MOVEA.L (A7)+,A4 0002096c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020970 7e 01 |~ | MOVEQ.L #0x01,D7 00020972 be 97 | | CMP.L (A7),D7 00020974 6e 2c |n, | BGT 0x209a2 00020976 2f 0c |/ | MOVE.L A4,-(A7) 00020978 1f 3c 00 1b | < | MOVE.B #0x1b,-(A7) 0002097c 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00020982 54 4f |TO | ADDQ.L #0x2,A7 00020984 2e 8c |. | MOVE.L A4,(A7) 00020986 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 0002098a 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 00020990 63 02 |c | BLS 0x20994 00020992 4e 4f |NO | TRAP #15 00020994 1f 00 | | MOVE.B D0,-(A7) 00020996 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 0002099c 5c 4f |\O | ADDQ.L #0x6,A7 0002099e 52 87 |R | ADDQ.L #0x1,D7 000209a0 68 d0 |h | BVC 0x20972 000209a2 2e 8c |. | MOVE.L A4,(A7) 000209a4 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000209aa 58 4f |XO | ADDQ.L #0x4,A7 000209ac 4c df 10 81 |L | MOVEM.L (A7)+,D0+D7+A4 000209b0 4e 5e |N^ | UNLK A6 000209b2 4e 75 |Nu | RTS 000209b4 ; -------------------------------------------------------------------------------------- 000209b4 ; OMSI PASCAL Function 000209b4 ; <LVAR 0x008 4(w)> 000209b4 ; -------------------------------------------------------------------------------------- 000209b4 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 000209b8 bf d5 | | CMPA.L (A5),A7 000209ba 62 06 |b | BHI 0x209c2 000209bc 44 fc 00 02 |D | MOVE.W #0x2,CCR 000209c0 4e 76 |Nv | TRAPV 000209c2 de fc 00 18 | | ADDA.W #0x18,A7 000209c6 48 e7 00 08 |H | MOVEM.L A4,-(A7) 000209ca 2f 3a f7 6a |/: j | MOVE.L 0x20136,-(A7) 000209ce 59 4f |YO | SUBQ.L #0x4,A7 000209d0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000209d4 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000209d8 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 000209dc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000209e2 50 4f |PO | ADDQ.L #0x8,A7 000209e4 28 5f |(_ | MOVEA.L (A7)+,A4 000209e6 58 4f |XO | ADDQ.L #0x4,A7 000209e8 19 7c 00 1b 00 02 | | | MOVE.B #0x1b,(A4+0x2) 000209ee 2d 4c 00 08 |-L | MOVE.L A4,(A6+0x8) 000209f2 4c df 10 00 |L | MOVEM.L (A7)+,A4 000209f6 4e 5e |N^ | UNLK A6 000209f8 4e 75 |Nu | RTS 000209fa ; -------------------------------------------------------------------------------------- 000209fa ; OMSI PASCAL Function 000209fa ; <LVAR 0x008 4(w)> 000209fa ; -------------------------------------------------------------------------------------- 000209fa 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 000209fe bf d5 | | CMPA.L (A5),A7 00020a00 62 06 |b | BHI 0x20a08 00020a02 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020a06 4e 76 |Nv | TRAPV 00020a08 de fc 00 1a | | ADDA.W #0x1a,A7 00020a0c 48 e7 00 08 |H | MOVEM.L A4,-(A7) 00020a10 3f 3a f7 2c |?: , | MOVE.W 0x2013e,-(A7) 00020a14 3f 3a f7 26 |?: & | MOVE.W 0x2013c,-(A7) 00020a18 3f 3a f7 20 |?: | MOVE.W 0x2013a,-(A7) 00020a1c 59 4f |YO | SUBQ.L #0x4,A7 00020a1e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a22 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020a26 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00020a2a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020a30 50 4f |PO | ADDQ.L #0x8,A7 00020a32 28 5f |(_ | MOVEA.L (A7)+,A4 00020a34 5c 4f |\O | ADDQ.L #0x6,A7 00020a36 19 7c 00 1b 00 02 | | | MOVE.B #0x1b,(A4+0x2) 00020a3c 2d 4c 00 08 |-L | MOVE.L A4,(A6+0x8) 00020a40 4c df 10 00 |L | MOVEM.L (A7)+,A4 00020a44 4e 5e |N^ | UNLK A6 00020a46 4e 75 |Nu | RTS 00020a48 ; -------------------------------------------------------------------------------------- 00020a48 ; OMSI PASCAL Function 00020a48 ; <LVAR 0x008 4(w)> 00020a48 ; -------------------------------------------------------------------------------------- 00020a48 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 00020a4c bf d5 | | CMPA.L (A5),A7 00020a4e 62 06 |b | BHI 0x20a56 00020a50 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020a54 4e 76 |Nv | TRAPV 00020a56 de fc 00 18 | | ADDA.W #0x18,A7 00020a5a 48 e7 00 08 |H | MOVEM.L A4,-(A7) 00020a5e 2f 3a f6 e0 |/: | MOVE.L 0x20140,-(A7) 00020a62 59 4f |YO | SUBQ.L #0x4,A7 00020a64 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a68 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020a6c 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020a70 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020a76 50 4f |PO | ADDQ.L #0x8,A7 00020a78 28 5f |(_ | MOVEA.L (A7)+,A4 00020a7a 58 4f |XO | ADDQ.L #0x4,A7 00020a7c 19 7c 00 1b 00 02 | | | MOVE.B #0x1b,(A4+0x2) 00020a82 2d 4c 00 08 |-L | MOVE.L A4,(A6+0x8) 00020a86 4c df 10 00 |L | MOVEM.L (A7)+,A4 00020a8a 4e 5e |N^ | UNLK A6 00020a8c 4e 75 |Nu | RTS 00020a8e ; -------------------------------------------------------------------------------------- 00020a8e ; OMSI PASCAL Function 00020a8e ; <LVAR 0x008 4(w)> 00020a8e ; -------------------------------------------------------------------------------------- 00020a8e 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 00020a92 bf d5 | | CMPA.L (A5),A7 00020a94 62 06 |b | BHI 0x20a9c 00020a96 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020a9a 4e 76 |Nv | TRAPV 00020a9c de fc 00 18 | | ADDA.W #0x18,A7 00020aa0 48 e7 00 08 |H | MOVEM.L A4,-(A7) 00020aa4 2f 3a f6 9e |/: | MOVE.L 0x20144,-(A7) 00020aa8 59 4f |YO | SUBQ.L #0x4,A7 00020aaa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020aae 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020ab2 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020ab6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020abc 50 4f |PO | ADDQ.L #0x8,A7 00020abe 28 5f |(_ | MOVEA.L (A7)+,A4 00020ac0 58 4f |XO | ADDQ.L #0x4,A7 00020ac2 19 7c 00 1b 00 02 | | | MOVE.B #0x1b,(A4+0x2) 00020ac8 2d 4c 00 08 |-L | MOVE.L A4,(A6+0x8) 00020acc 4c df 10 00 |L | MOVEM.L (A7)+,A4 00020ad0 4e 5e |N^ | UNLK A6 00020ad2 4e 75 |Nu | RTS 00020ad4 ; -------------------------------------------------------------------------------------- 00020ad4 ; OMSI PASCAL Function 00020ad4 ; <LVAR 0x008 4(w)> 00020ad4 ; -------------------------------------------------------------------------------------- 00020ad4 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 00020ad8 bf d5 | | CMPA.L (A5),A7 00020ada 62 06 |b | BHI 0x20ae2 00020adc 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020ae0 4e 76 |Nv | TRAPV 00020ae2 de fc 00 24 | $ | ADDA.W #0x24,A7 00020ae6 48 e7 81 88 |H | MOVEM.L A4+A0+D7+D0,-(A7) 00020aea 41 f9 00 01 03 d4 |A | LEA.L ReadChar() : Byte,A0 00020af0 70 1b |p | MOVEQ.L #0x1b,D0 00020af2 59 4f |YO | SUBQ.L #0x4,A7 00020af4 1e ba f6 52 | R | MOVE.B 0x20148,(A7) 00020af8 1f 7a f6 4f 00 01 | z O | MOVE.B 0x20149,(A7+0x1) 00020afe 1f 7a f6 4a 00 02 | z J | MOVE.B 0x2014a,(A7+0x2) 00020b04 59 4f |YO | SUBQ.L #0x4,A7 00020b06 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020b0a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020b0e 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00020b12 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020b18 50 4f |PO | ADDQ.L #0x8,A7 00020b1a 28 5f |(_ | MOVEA.L (A7)+,A4 00020b1c 58 4f |XO | ADDQ.L #0x4,A7 00020b1e 19 40 00 02 | @ | MOVE.B D0,(A4+0x2) 00020b22 2f 0c |/ | MOVE.L A4,-(A7) 00020b24 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00020b2a 58 4f |XO | ADDQ.L #0x4,A7 00020b2c 55 4f |UO | SUBQ.L #0x2,A7 00020b2e 4e 90 |N | JSR (A0) 00020b30 1e 1f | | MOVE.B (A7)+,D7 00020b32 be 00 | | CMP.B D0,D7 00020b34 66 f6 |f | BNE 0x20b2c 00020b36 55 4f |UO | SUBQ.L #0x2,A7 00020b38 4e 90 |N | JSR (A0) 00020b3a 1e 17 | | MOVE.B (A7),D7 00020b3c 4e 90 |N | JSR (A0) 00020b3e 1e 17 | | MOVE.B (A7),D7 00020b40 4e 90 |N | JSR (A0) 00020b42 1e 1f | | MOVE.B (A7)+,D7 00020b44 0c 07 00 31 | 1 | CMPI.B #0x31,D7 00020b48 67 0a |g | BEQ 0x20b54 00020b4a 2d 7c 00 00 00 40 00 08 |-| @ | MOVE.L #0x40,(A6+0x8) 00020b52 60 12 |` | BRA 0x20b66 00020b54 2d 7c 00 00 00 18 00 08 |-| | MOVE.L #0x18,(A6+0x8) 00020b5c 55 4f |UO | SUBQ.L #0x2,A7 00020b5e 4e 90 |N | JSR (A0) 00020b60 1e 17 | | MOVE.B (A7),D7 00020b62 4e 90 |N | JSR (A0) 00020b64 1e 1f | | MOVE.B (A7)+,D7 00020b66 55 4f |UO | SUBQ.L #0x2,A7 00020b68 4e 90 |N | JSR (A0) 00020b6a 1e 1f | | MOVE.B (A7)+,D7 00020b6c 4c df 11 81 |L | MOVEM.L (A7)+,D0+D7+A0+A4 00020b70 4e 5e |N^ | UNLK A6 00020b72 4e 75 |Nu | RTS 00020b74 ; -------------------------------------------------------------------------------------- 00020b74 ; OMSI PASCAL Function 00020b74 ; -------------------------------------------------------------------------------------- 00020b74 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00020b78 bf d5 | | CMPA.L (A5),A7 00020b7a 62 06 |b | BHI 0x20b82 00020b7c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020b80 4e 76 |Nv | TRAPV 00020b82 de fc 00 2e | . | ADDA.W #0x2e,A7 00020b86 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00020b8a 9e fc 00 0a | | SUBA.W #0xa,A7 00020b8e 20 4f | O | MOVEA.L A7,A0 00020b90 43 fa f5 ba |C | LEA.L 0x2014c,A1 00020b94 70 08 |p | MOVEQ.L #0x08,D0 00020b96 10 d9 | | MOVE.B (A1)+,(A0)+ 00020b98 51 c8 ff fc |Q | DBF D0,0x20b96 00020b9c 51 4f |QO | SUBQ.L #0x8,A7 00020b9e 2f 39 00 02 35 02 |/9 5 | MOVE.L 0x23502,-(A7) 00020ba4 48 78 00 01 |Hx | PEA.L 0x1 00020ba8 4e ba fc 80 |N | JSR 0x2082a 00020bac 58 4f |XO | ADDQ.L #0x4,A7 00020bae 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00020bb2 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020bb6 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00020bba 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020bc0 58 4f |XO | ADDQ.L #0x4,A7 00020bc2 4e ba fe ca |N | JSR 0x20a8e 00020bc6 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00020bcc de fc 00 0c | | ADDA.W #0xc,A7 00020bd0 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00020bd6 de fc 00 0e | | ADDA.W #0xe,A7 00020bda 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00020bde 4e 5e |N^ | UNLK A6 00020be0 4e 75 |Nu | RTS 00020be2 ; -------------------------------------------------------------------------------------- 00020be2 ; OMSI PASCAL Function 00020be2 ; <LVAR 0x008 4(r)> 00020be2 ; -------------------------------------------------------------------------------------- 00020be2 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 00020be6 bf d5 | | CMPA.L (A5),A7 00020be8 62 06 |b | BHI 0x20bf0 00020bea 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020bee 4e 76 |Nv | TRAPV 00020bf0 de fc 00 1c | | ADDA.W #0x1c,A7 00020bf4 51 4f |QO | SUBQ.L #0x8,A7 00020bf6 2f 39 00 02 35 06 |/9 5 | MOVE.L 0x23506,-(A7) 00020bfc 48 78 00 01 |Hx | PEA.L 0x1 00020c00 4e ba fc 28 |N ( | JSR 0x2082a 00020c04 58 4f |XO | ADDQ.L #0x4,A7 00020c06 4e ba fd f2 |N | JSR 0x209fa 00020c0a 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020c0e 59 4f |YO | SUBQ.L #0x4,A7 00020c10 4e ba fe 7c |N | | JSR 0x20a8e 00020c14 59 4f |YO | SUBQ.L #0x4,A7 00020c16 4e ba fe 30 |N 0 | JSR 0x20a48 00020c1a 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 00020c20 de fc 00 14 | | ADDA.W #0x14,A7 00020c24 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00020c2a 58 4f |XO | ADDQ.L #0x4,A7 00020c2c 4e 5e |N^ | UNLK A6 00020c2e 4e 75 |Nu | RTS 00020c30 ; -------------------------------------------------------------------------------------- 00020c30 ; OMSI PASCAL Function 00020c30 ; <LVAR 0x00a 1(w)> 00020c30 ; <LVAR 0x008 2(r)> 00020c30 ; -------------------------------------------------------------------------------------- 00020c30 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 ; Spelunked 00020c34 bf d5 | | CMPA.L (A5),A7 00020c36 62 06 |b | BHI 0x20c3e 00020c38 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020c3c 4e 76 |Nv | TRAPV 00020c3e de fc 00 0a | | ADDA.W #0xa,A7 00020c42 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00020c46 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00020c4a 0c 40 00 0a | @ | CMPI.W #0x000a,D0 00020c4e 6c 0a |l | BGE 0x20c5a 00020c50 06 40 00 30 | @ 0 | ADDI.W #0x0030,D0 00020c54 41 bc 00 ff |A | CHK.W #0xff,D0 00020c58 60 08 |` | BRA 0x20c62 00020c5a 06 40 00 37 | @ 7 | ADDI.W #0x0037,D0 00020c5e 41 bc 00 ff |A | CHK.W #0xff,D0 00020c62 1d 40 00 0a | @ | MOVE.B D0,(A6+0xa) 00020c66 4c df 00 01 |L | MOVEM.L (A7)+,D0 00020c6a 4e 5e |N^ | UNLK A6 00020c6c 4e 75 |Nu | RTS 00020c6e ; -------------------------------------------------------------------------------------- 00020c6e ; OMSI PASCAL Function 00020c6e ; <LVAR 0x010 4(w)> 00020c6e ; <LVAR 0x00c 4(r)> 00020c6e ; <LVAR 0x008 4(r)> 00020c6e ; -------------------------------------------------------------------------------------- 00020c6e 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 00020c72 bf d5 | | CMPA.L (A5),A7 00020c74 62 06 |b | BHI 0x20c7c 00020c76 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020c7a 4e 76 |Nv | TRAPV 00020c7c de fc 00 0c | | ADDA.W #0xc,A7 00020c80 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00020c84 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00020c88 b0 ae 00 08 | | CMP.L (A6+0x8),D0 00020c8c 6c 06 |l | BGE 0x20c94 00020c8e 2d 40 00 10 |-@ | MOVE.L D0,(A6+0x10) 00020c92 60 06 |` | BRA 0x20c9a 00020c94 2d 6e 00 08 00 10 |-n | MOVE.L (A6+0x8),(A6+0x10) 00020c9a 4c df 00 01 |L | MOVEM.L (A7)+,D0 00020c9e 4e 5e |N^ | UNLK A6 00020ca0 4e 75 |Nu | RTS 00020ca2 ; -------------------------------------------------------------------------------------- 00020ca2 ; OMSI PASCAL Function 00020ca2 ; <LVAR 0x010 4(w)> 00020ca2 ; <LVAR 0x00c 4(r)> 00020ca2 ; <LVAR 0x008 4(r)> 00020ca2 ; -------------------------------------------------------------------------------------- 00020ca2 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 00020ca6 bf d5 | | CMPA.L (A5),A7 00020ca8 62 06 |b | BHI 0x20cb0 00020caa 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020cae 4e 76 |Nv | TRAPV 00020cb0 de fc 00 0c | | ADDA.W #0xc,A7 00020cb4 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00020cb8 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00020cbc b0 ae 00 08 | | CMP.L (A6+0x8),D0 00020cc0 6f 06 |o | BLE 0x20cc8 00020cc2 2d 40 00 10 |-@ | MOVE.L D0,(A6+0x10) 00020cc6 60 06 |` | BRA 0x20cce 00020cc8 2d 6e 00 08 00 10 |-n | MOVE.L (A6+0x8),(A6+0x10) 00020cce 4c df 00 01 |L | MOVEM.L (A7)+,D0 00020cd2 4e 5e |N^ | UNLK A6 00020cd4 4e 75 |Nu | RTS 00020cd6 ; -------------------------------------------------------------------------------------- 00020cd6 ; OMSI PASCAL Function 00020cd6 ; <LVAR 0x008 4(r)> 00020cd6 ; <LVAR -0x003 1(w)> 00020cd6 ; <LVAR -0x004 1(w) 2(r)> 00020cd6 ; <LVAR -0x008 2(rw)> 00020cd6 ; <LVAR -0x010 @> 00020cd6 ; <LVAR -0x018 @> 00020cd6 ; <LVAR -0x020 @> 00020cd6 ; <LVAR -0x028 @> 00020cd6 ; <LVAR -0x030 @> 00020cd6 ; <LVAR -0x038 @> 00020cd6 ; <LVAR -0x040 @> 00020cd6 ; <LVAR -0x048 @> 00020cd6 ; <LVAR -0x050 @> 00020cd6 ; <LVAR -0x058 @> 00020cd6 ; <LVAR -0x060 @> 00020cd6 ; <LVAR -0x068 @> 00020cd6 ; <LVAR -0x070 @> 00020cd6 ; <LVAR -0x078 @> 00020cd6 ; <LVAR -0x080 @> 00020cd6 ; <LVAR -0x088 @> 00020cd6 ; <LVAR -0x094 @ 4(rw)> 00020cd6 ; -------------------------------------------------------------------------------------- 00020cd6 4e 56 fe ec |NV | LINK.W A6,#0xfeec 00020cda bf d5 | | CMPA.L (A5),A7 00020cdc 62 06 |b | BHI 0x20ce4 00020cde 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020ce2 4e 76 |Nv | TRAPV 00020ce4 de fc 00 80 | | ADDA.W #0x80,A7 00020ce8 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020cec 45 ee ff fc |E | LEA.L (A6-0x4),A2 00020cf0 47 ee ff 6c |G l | LEA.L (A6-0x94),A3 00020cf4 49 ee ff f8 |I | LEA.L (A6-0x8),A4 00020cf8 26 3c 00 00 07 ff |&< | MOVE.L #0x7ff,D3 00020cfe 78 0f |x | MOVEQ.L #0x0f,D4 00020d00 41 fa f4 a8 |A | LEA.L 0x201aa,A0 00020d04 70 10 |p | MOVEQ.L #0x10,D0 00020d06 3f 20 |? | MOVE.W -(A0),-(A7) 00020d08 51 c8 ff fc |Q | DBF D0,0x20d06 00020d0c 59 4f |YO | SUBQ.L #0x4,A7 00020d0e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020d12 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020d16 3f 3c 00 22 |?< " | MOVE.W #0x22,-(A7) 00020d1a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020d20 50 4f |PO | ADDQ.L #0x8,A7 00020d22 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00020d28 de fc 00 16 | | ADDA.W #0x16,A7 00020d2c 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00020d30 48 78 00 10 |Hx | PEA.L 0x10 00020d34 4e b9 00 01 03 60 |N ` | JSR ?StringToInt64() 00020d3a 50 4f |PO | ADDQ.L #0x8,A7 00020d3c 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00020d42 50 4f |PO | ADDQ.L #0x8,A7 00020d44 26 9f |& | MOVE.L (A7)+,(A3) 00020d46 20 13 | | MOVE.L (A3),D0 00020d48 55 80 |U | SUBQ.L #0x2,D0 00020d4a c0 83 | | AND.L D3,D0 00020d4c 38 80 |8 | MOVE.W D0,(A4) 00020d4e 32 00 |2 | MOVE.W D0,D1 00020d50 e0 49 | I | LSR.W #0x8,D1 00020d52 14 81 | | MOVE.B D1,(A2) 00020d54 02 40 00 ff | @ | ANDI.W #0x00ff,D0 00020d58 1d 40 ff fd | @ | MOVE.B D0,(A6-0x3) 00020d5c 3f 12 |? | MOVE.W (A2),-(A7) 00020d5e 42 27 |B' | CLR.B -(A7) 00020d60 4e b9 00 02 22 ba |N " | JSR exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1) 00020d66 58 4f |XO | ADDQ.L #0x4,A7 00020d68 23 fc 00 00 07 fd 00 02 |# | MOVE.L #0x7fd,0x224ee 00020d70 24 ee |$ | 00020d72 3e 3c 08 00 |>< | MOVE.W #0x800,D7 00020d76 70 00 |p | MOVEQ.L #0x00,D0 00020d78 2f 00 |/ | MOVE.L D0,-(A7) 00020d7a 48 6e ff 78 |Hn x | PEA.L (A6-0x88) 00020d7e 48 6e ff 80 |Hn | PEA.L (A6-0x80) 00020d82 48 6e ff 88 |Hn | PEA.L (A6-0x78) 00020d86 48 6e ff 90 |Hn | PEA.L (A6-0x70) 00020d8a 48 6e ff 98 |Hn | PEA.L (A6-0x68) 00020d8e 48 6e ff a0 |Hn | PEA.L (A6-0x60) 00020d92 48 6e ff a8 |Hn | PEA.L (A6-0x58) 00020d96 48 6e ff b0 |Hn | PEA.L (A6-0x50) 00020d9a 48 6e ff b8 |Hn | PEA.L (A6-0x48) 00020d9e 48 6e ff c0 |Hn | PEA.L (A6-0x40) 00020da2 48 6e ff c8 |Hn | PEA.L (A6-0x38) 00020da6 48 6e ff d0 |Hn | PEA.L (A6-0x30) 00020daa 48 6e ff d8 |Hn | PEA.L (A6-0x28) 00020dae 48 6e ff e0 |Hn | PEA.L (A6-0x20) 00020db2 48 6e ff e8 |Hn | PEA.L (A6-0x18) 00020db6 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00020dba 4e b9 00 02 22 88 |N " | JSR exp_READ_TRACE_BLOCK.IOC(&Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8) 00020dc0 de fc 00 40 | @ | ADDA.W #0x40,A7 00020dc4 7a 00 |z | MOVEQ.L #0x00,D5 00020dc6 7c 00 || | MOVEQ.L #0x00,D6 00020dc8 42 80 |B | CLR.L D0 00020dca 30 07 |0 | MOVE.W D7,D0 00020dcc 53 80 |S | SUBQ.L #0x1,D0 00020dce 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00020dd4 63 02 |c | BLS 0x20dd8 00020dd6 4e 4f |NO | TRAP #15 00020dd8 3e 00 |> | MOVE.W D0,D7 00020dda 4f 83 |O | CHK.W D3,D7 00020ddc 42 80 |B | CLR.L D0 00020dde 30 07 |0 | MOVE.W D7,D0 00020de0 e3 80 | | ASL.L #0x1,D0 00020de2 41 f9 00 02 24 e6 |A $ | LEA.L 0x224e6,A0 00020de8 ba 84 | | CMP.L D4,D5 00020dea 63 02 |c | BLS 0x20dee 00020dec 4e 4f |NO | TRAP #15 00020dee 22 05 |" | MOVE.L D5,D1 00020df0 e7 81 | | ASL.L #0x3,D1 00020df2 22 4b |"K | MOVEA.L A3,A1 00020df4 24 06 |$ | MOVE.L D6,D2 00020df6 e3 82 | | ASL.L #0x1,D2 00020df8 0c 82 00 00 00 07 | | CMPI.L #0x00000007,D2 00020dfe 63 02 |c | BLS 0x20e02 00020e00 4e 4f |NO | TRAP #15 00020e02 43 f1 18 00 |C | LEA.L (A1+D1.L),A1 00020e06 11 b1 28 0c 08 0c | ( | MOVE.B (A1+D2.L+#0xc),(A0+D0.L+#0xc) 00020e0c 52 82 |R | ADDQ.L #0x1,D2 00020e0e 0c 82 00 00 00 07 | | CMPI.L #0x00000007,D2 00020e14 63 02 |c | BLS 0x20e18 00020e16 4e 4f |NO | TRAP #15 00020e18 11 b1 28 0c 08 0d | ( | MOVE.B (A1+D2.L+#0xc),(A0+D0.L+#0xd) 00020e1e 52 86 |R | ADDQ.L #0x1,D6 00020e20 0c 86 00 00 00 03 | | CMPI.L #0x00000003,D6 00020e26 6f a0 |o | BLE 0x20dc8 00020e28 52 85 |R | ADDQ.L #0x1,D5 00020e2a ba 84 | | CMP.L D4,D5 00020e2c 6f 98 |o | BLE 0x20dc6 00020e2e 20 17 | | MOVE.L (A7),D0 00020e30 52 80 |R | ADDQ.L #0x1,D0 00020e32 0c 80 00 00 00 1f | | CMPI.L #0x0000001f,D0 00020e38 6e 06 |n | BGT 0x20e40 00020e3a 58 4f |XO | ADDQ.L #0x4,A7 00020e3c 60 00 ff 3a |` : | BRA 0x20d78 00020e40 58 4f |XO | ADDQ.L #0x4,A7 00020e42 42 80 |B | CLR.L D0 00020e44 30 14 |0 | MOVE.W (A4),D0 00020e46 54 80 |T | ADDQ.L #0x2,D0 00020e48 c0 83 | | AND.L D3,D0 00020e4a 38 80 |8 | MOVE.W D0,(A4) 00020e4c 32 00 |2 | MOVE.W D0,D1 00020e4e e0 49 | I | LSR.W #0x8,D1 00020e50 14 81 | | MOVE.B D1,(A2) 00020e52 02 40 00 ff | @ | ANDI.W #0x00ff,D0 00020e56 1d 40 ff fd | @ | MOVE.B D0,(A6-0x3) 00020e5a 3f 12 |? | MOVE.W (A2),-(A7) 00020e5c 42 27 |B' | CLR.B -(A7) 00020e5e 4e b9 00 02 22 ba |N " | JSR exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1) 00020e64 58 4f |XO | ADDQ.L #0x4,A7 00020e66 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00020e6a 4e 5e |N^ | UNLK A6 00020e6c 4e 75 |Nu | RTS 00020e6e ; -------------------------------------------------------------------------------------- 00020e6e ; OMSI PASCAL Function 00020e6e ; <LVAR -0x004 @> 00020e6e ; <LVAR -0x008 @ 4(r)> 00020e6e ; <LVAR -0x00c @ 4(rw)> 00020e6e ; <LVAR -0x40c @> 00020e6e ; <LVAR -0x80c @> 00020e6e ; <LVAR -0x810 @> 00020e6e ; -------------------------------------------------------------------------------------- 00020e6e 4e 56 f7 80 |NV | LINK.W A6,#0xf780 00020e72 bf d5 | | CMPA.L (A5),A7 00020e74 62 06 |b | BHI 0x20e7c 00020e76 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020e7a 4e 76 |Nv | TRAPV 00020e7c de fc 00 70 | p | ADDA.W #0x70,A7 00020e80 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020e84 45 ee ff fc |E | LEA.L (A6-0x4),A2 00020e88 47 ee ff f8 |G | LEA.L (A6-0x8),A3 00020e8c 49 ee ff f4 |I | LEA.L (A6-0xc),A4 00020e90 76 02 |v | MOVEQ.L #0x02,D3 00020e92 28 3c 00 00 03 ff |(< | MOVE.L #0x3ff,D4 00020e98 7a 01 |z | MOVEQ.L #0x01,D5 00020e9a 7c 12 || | MOVEQ.L #0x12,D6 00020e9c 41 fa f3 38 |A 8 | LEA.L 0x201d6,A0 00020ea0 70 0a |p | MOVEQ.L #0x0a,D0 00020ea2 2f 20 |/ | MOVE.L -(A0),-(A7) 00020ea4 51 c8 ff fc |Q | DBF D0,0x20ea2 00020ea8 59 4f |YO | SUBQ.L #0x4,A7 00020eaa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020eae 3f 05 |? | MOVE.W D5,-(A7) 00020eb0 3f 3c 00 2c |?< , | MOVE.W #0x2c,-(A7) 00020eb4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020eba 50 4f |PO | ADDQ.L #0x8,A7 00020ebc 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00020ec2 de fc 00 30 | 0 | ADDA.W #0x30,A7 00020ec6 41 fa f3 24 |A $ | LEA.L 0x201ec,A0 00020eca 70 0a |p | MOVEQ.L #0x0a,D0 00020ecc 3f 20 |? | MOVE.W -(A0),-(A7) 00020ece 51 c8 ff fc |Q | DBF D0,0x20ecc 00020ed2 59 4f |YO | SUBQ.L #0x4,A7 00020ed4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020ed8 3f 05 |? | MOVE.W D5,-(A7) 00020eda 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 00020ede 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020ee4 50 4f |PO | ADDQ.L #0x8,A7 00020ee6 28 9f |( | MOVE.L (A7)+,(A4) 00020ee8 de c6 | | ADDA.W D6,A7 00020eea 2e 94 |. | MOVE.L (A4),(A7) 00020eec 42 27 |B' | CLR.B -(A7) 00020eee 1f 03 | | MOVE.B D3,-(A7) 00020ef0 48 78 00 00 |Hx | PEA.L 0x0 00020ef4 48 52 |HR | PEA.L (A2) 00020ef6 48 53 |HS | PEA.L (A3) 00020ef8 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00020efe de fc 00 14 | | ADDA.W #0x14,A7 00020f02 48 54 |HT | PEA.L (A4) 00020f04 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020f0a 2e 93 |. | MOVE.L (A3),(A7) 00020f0c 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00020f10 42 67 |Bg | CLR.W -(A7) 00020f12 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020f16 1f 03 | | MOVE.B D3,-(A7) 00020f18 41 ee f7 f4 |A | LEA.L (A6-0x80c),A0 00020f1c 2f 08 |/ | MOVE.L A0,-(A7) 00020f1e 48 52 |HR | PEA.L (A2) 00020f20 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020f26 de fc 00 10 | | ADDA.W #0x10,A7 00020f2a 2e 93 |. | MOVE.L (A3),(A7) 00020f2c 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7) 00020f30 42 67 |Bg | CLR.W -(A7) 00020f32 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020f36 1f 03 | | MOVE.B D3,-(A7) 00020f38 41 ee fb f4 |A | LEA.L (A6-0x40c),A0 00020f3c 2f 08 |/ | MOVE.L A0,-(A7) 00020f3e 48 52 |HR | PEA.L (A2) 00020f40 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020f46 de c6 | | ADDA.W D6,A7 00020f48 42 17 |B | CLR.B (A7) 00020f4a 1f 03 | | MOVE.B D3,-(A7) 00020f4c 48 78 00 01 |Hx | PEA.L 0x1 00020f50 48 52 |HR | PEA.L (A2) 00020f52 48 53 |HS | PEA.L (A3) 00020f54 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00020f5a de fc 00 10 | | ADDA.W #0x10,A7 00020f5e 7e 00 |~ | MOVEQ.L #0x00,D7 00020f60 0c 87 00 00 07 ff | | CMPI.L #0x000007ff,D7 00020f66 63 02 |c | BLS 0x20f6a 00020f68 4e 4f |NO | TRAP #15 00020f6a 20 07 | | MOVE.L D7,D0 00020f6c e3 80 | | ASL.L #0x1,D0 00020f6e 41 f9 00 02 24 e6 |A $ | LEA.L 0x224e6,A0 00020f74 22 04 |" | MOVE.L D4,D1 00020f76 92 87 | | SUB.L D7,D1 00020f78 b2 84 | | CMP.L D4,D1 00020f7a 63 02 |c | BLS 0x20f7e 00020f7c 4e 4f |NO | TRAP #15 00020f7e e3 81 | | ASL.L #0x1,D1 00020f80 43 ee f7 f0 |C | LEA.L (A6-0x810),A1 00020f84 34 31 18 04 |41 | MOVE.W (A1+D1.L+#0x4),D2 00020f88 e0 4a | J | LSR.W #0x8,D2 00020f8a 11 82 08 0c | | MOVE.B D2,(A0+D0.L+#0xc) 00020f8e 32 31 18 04 |21 | MOVE.W (A1+D1.L+#0x4),D1 00020f92 02 41 00 ff | A | ANDI.W #0x00ff,D1 00020f96 11 81 08 0d | | MOVE.B D1,(A0+D0.L+#0xd) 00020f9a 52 87 |R | ADDQ.L #0x1,D7 00020f9c be 84 | | CMP.L D4,D7 00020f9e 6f c0 |o | BLE 0x20f60 00020fa0 23 c4 00 02 24 ee |# $ | MOVE.L D4,0x224ee 00020fa6 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00020faa 4e 5e |N^ | UNLK A6 00020fac 4e 75 |Nu | RTS 00020fae ; -------------------------------------------------------------------------------------- 00020fae ; OMSI PASCAL Function 00020fae ; <LVAR -0x004 @ 4(rw)> 00020fae ; -------------------------------------------------------------------------------------- 00020fae 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 00020fb2 bf d5 | | CMPA.L (A5),A7 00020fb4 62 06 |b | BHI 0x20fbc 00020fb6 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020fba 4e 76 |Nv | TRAPV 00020fbc de fc 00 44 | D | ADDA.W #0x44,A7 00020fc0 48 e7 f8 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7) 00020fc4 43 f9 00 02 35 0a |C 5 | LEA.L 0x2350a,A1 00020fca 45 ee ff fc |E | LEA.L (A6-0x4),A2 00020fce 47 f9 00 02 34 f2 |G 4 | LEA.L 0x234f2,A3 00020fd4 49 f8 00 01 |I | LEA.L 0x1,A4 00020fd8 59 4f |YO | SUBQ.L #0x4,A7 00020fda 4e ba fa f8 |N | JSR 0x20ad4 00020fde 20 1f | | MOVE.L (A7)+,D0 00020fe0 23 c0 00 02 35 12 |# 5 | MOVE.L D0,0x23512 00020fe6 22 00 |" | MOVE.L D0,D1 00020fe8 53 81 |S | SUBQ.L #0x1,D1 00020fea 24 01 |$ | MOVE.L D1,D2 00020fec e3 82 | | ASL.L #0x1,D2 00020fee 23 c2 00 02 34 fa |# 4 | MOVE.L D2,0x234fa 00020ff4 22 80 |" | MOVE.L D0,(A1) 00020ff6 55 91 |U | SUBQ.L #0x2,(A1) 00020ff8 28 11 |( | MOVE.L (A1),D4 00020ffa 76 02 |v | MOVEQ.L #0x02,D3 00020ffc 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00021002 53 84 |S | SUBQ.L #0x1,D4 00021004 23 c4 00 02 35 1a |# 5 | MOVE.L D4,0x2351a 0002100a 23 c0 00 02 35 02 |# 5 | MOVE.L D0,0x23502 00021010 23 c1 00 02 35 06 |# 5 | MOVE.L D1,0x23506 00021016 28 00 |( | MOVE.L D0,D4 00021018 76 06 |v | MOVEQ.L #0x06,D3 0002101a 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00021020 23 c4 00 02 35 0e |# 5 | MOVE.L D4,0x2350e 00021026 59 4f |YO | SUBQ.L #0x4,A7 00021028 4e b9 00 01 03 c4 |N | JSR GetArgv() : String 0002102e 24 9f |$ | MOVE.L (A7)+,(A2) 00021030 20 52 | R | MOVEA.L (A2),A0 00021032 4a 50 |JP | TST.W (A0) 00021034 67 08 |g | BEQ 0x2103e 00021036 2f 12 |/ | MOVE.L (A2),-(A7) 00021038 4e ba fc 9c |N | JSR 0x20cd6 0002103c 60 0c |` | BRA 0x2104a 0002103e 4e ba fe 2e |N . | JSR 0x20e6e 00021042 48 52 |HR | PEA.L (A2) 00021044 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002104a 58 4f |XO | ADDQ.L #0x4,A7 0002104c 26 b9 00 02 24 ee |& $ | MOVE.L 0x224ee,(A3) 00021052 52 93 |R | ADDQ.L #0x1,(A3) 00021054 59 4f |YO | SUBQ.L #0x4,A7 00021056 48 54 |HT | PEA.L (A4) 00021058 2f 11 |/ | MOVE.L (A1),-(A7) 0002105a 4e ba f8 50 |N P | JSR 0x208ac 0002105e 50 4f |PO | ADDQ.L #0x8,A7 00021060 20 5f | _ | MOVEA.L (A7)+,A0 00021062 24 88 |$ | MOVE.L A0,(A2) 00021064 2f 08 |/ | MOVE.L A0,-(A7) 00021066 1f 3c 00 1b | < | MOVE.B #0x1b,-(A7) 0002106a 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00021070 54 4f |TO | ADDQ.L #0x2,A7 00021072 2e 88 |. | MOVE.L A0,(A7) 00021074 1f 3c 00 3d | < = | MOVE.B #0x3d,-(A7) 00021078 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 0002107e 54 4f |TO | ADDQ.L #0x2,A7 00021080 2f 08 |/ | MOVE.L A0,-(A7) 00021082 59 4f |YO | SUBQ.L #0x4,A7 00021084 48 54 |HT | PEA.L (A4) 00021086 48 54 |HT | PEA.L (A4) 00021088 4e ba f7 a0 |N | JSR 0x2082a 0002108c 58 4f |XO | ADDQ.L #0x4,A7 0002108e 4e ba f9 24 |N $ | JSR 0x209b4 00021092 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00021098 de fc 00 0c | | ADDA.W #0xc,A7 0002109c 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000210a2 58 4f |XO | ADDQ.L #0x4,A7 000210a4 4c df 1f 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4 000210a8 4e 5e |N^ | UNLK A6 000210aa 4e 75 |Nu | RTS 000210ac ; -------------------------------------------------------------------------------------- 000210ac ; OMSI PASCAL Function 000210ac ; <LVAR 0x00a 4(w)> 000210ac ; <LVAR 0x008 2(r)> 000210ac ; <LVAR -0x006 @ 4(rw)> 000210ac ; -------------------------------------------------------------------------------------- 000210ac 4e 56 ff 92 |NV | LINK.W A6,#0xff92 000210b0 bf d5 | | CMPA.L (A5),A7 000210b2 62 06 |b | BHI 0x210ba 000210b4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000210b8 4e 76 |Nv | TRAPV 000210ba de fc 00 64 | d | ADDA.W #0x64,A7 000210be 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000210c2 45 ee ff fa |E | LEA.L (A6-0x6),A2 000210c6 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 000210cc 76 01 |v | MOVEQ.L #0x01,D3 000210ce 78 22 |x" | MOVEQ.L #0x22,D4 000210d0 7a 1e |z | MOVEQ.L #0x1e,D5 000210d2 7c 20 || | MOVEQ.L #0x20,D6 000210d4 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 000210d8 0c 40 01 46 | @ F | CMPI.W #0x0146,D0 000210dc 66 2c |f, | BNE 0x2110a 000210de 9e fc 00 0c | | SUBA.W #0xc,A7 000210e2 20 4f | O | MOVEA.L A7,A0 000210e4 43 fa f1 06 |C | LEA.L 0x201ec,A1 000210e8 70 0a |p | MOVEQ.L #0x0a,D0 000210ea 10 d9 | | MOVE.B (A1)+,(A0)+ 000210ec 51 c8 ff fc |Q | DBF D0,0x210ea 000210f0 59 4f |YO | SUBQ.L #0x4,A7 000210f2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000210f6 3f 03 |? | MOVE.W D3,-(A7) 000210f8 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 000210fc 4e 93 |N | JSR (A3) 000210fe 50 4f |PO | ADDQ.L #0x8,A7 00021100 24 9f |$ | MOVE.L (A7)+,(A2) 00021102 de fc 00 0c | | ADDA.W #0xc,A7 00021106 60 00 04 2c |` , | BRA 0x21534 0002110a 0c 40 01 47 | @ G | CMPI.W #0x0147,D0 0002110e 66 1c |f | BNE 0x2112c 00021110 2f 3a f0 e6 |/: | MOVE.L 0x201f8,-(A7) 00021114 59 4f |YO | SUBQ.L #0x4,A7 00021116 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002111a 3f 03 |? | MOVE.W D3,-(A7) 0002111c 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00021120 4e 93 |N | JSR (A3) 00021122 50 4f |PO | ADDQ.L #0x8,A7 00021124 24 9f |$ | MOVE.L (A7)+,(A2) 00021126 58 4f |XO | ADDQ.L #0x4,A7 00021128 60 00 04 0a |` | BRA 0x21534 0002112c 0c 40 01 f9 | @ | CMPI.W #0x01f9,D0 00021130 66 24 |f$ | BNE 0x21156 00021132 3f 3a f0 cc |?: | MOVE.W 0x20200,-(A7) 00021136 3f 3a f0 c6 |?: | MOVE.W 0x201fe,-(A7) 0002113a 3f 3a f0 c0 |?: | MOVE.W 0x201fc,-(A7) 0002113e 59 4f |YO | SUBQ.L #0x4,A7 00021140 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021144 3f 03 |? | MOVE.W D3,-(A7) 00021146 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 0002114a 4e 93 |N | JSR (A3) 0002114c 50 4f |PO | ADDQ.L #0x8,A7 0002114e 24 9f |$ | MOVE.L (A7)+,(A2) 00021150 5c 4f |\O | ADDQ.L #0x6,A7 00021152 60 00 03 e0 |` | BRA 0x21534 00021156 0c 40 01 00 | @ | CMPI.W #0x0100,D0 0002115a 65 06 |e | BCS 0x21162 0002115c 0c 40 01 ff | @ | CMPI.W #0x01ff,D0 00021160 63 0a |c | BLS 0x2116c 00021162 48 52 |HR | PEA.L (A2) 00021164 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 0002116a 60 ba |` | BRA 0x21126 0002116c 32 00 |2 | MOVE.W D0,D1 0002116e 02 41 00 07 | A | ANDI.W #0x0007,D1 00021172 42 82 |B | CLR.L D2 00021174 34 01 |4 | MOVE.W D1,D2 00021176 2e 02 |. | MOVE.L D2,D7 00021178 e6 48 | H | LSR.W #0x3,D0 0002117a 90 46 | F | SUB.W D6,D0 0002117c 0c 40 00 1f | @ | CMPI.W #0x001f,D0 00021180 63 02 |c | BLS 0x21184 00021182 4e 4e |NN | TRAP #14 00021184 d0 40 | @ | ADD.W D0,D0 00021186 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 0002118e 00 40 | @ | .CONST 0x40 ; [0x0] -> 0x211ce 00021190 00 6c | l | .CONST 0x6c ; [0x1] -> 0x211fa 00021192 00 86 | | .CONST 0x86 ; [0x2] -> 0x21214 00021194 00 ac | | .CONST 0xac ; [0x3] -> 0x2123a 00021196 00 d2 | | .CONST 0xd2 ; [0x4] -> 0x21260 00021198 00 fe | | .CONST 0xfe ; [0x5] -> 0x2128c 0002119a 01 12 | | .CONST 0x112 ; [0x6] -> 0x212a0 0002119c 01 20 | | .CONST 0x120 ; [0x7] -> 0x212ae 0002119e 01 36 | 6 | .CONST 0x136 ; [0x8] -> 0x212c4 000211a0 01 58 | X | .CONST 0x158 ; [0x9] -> 0x212e6 000211a2 01 68 | h | .CONST 0x168 ; [0xa] -> 0x212f6 000211a4 01 78 | x | .CONST 0x178 ; [0xb] -> 0x21306 000211a6 01 a0 | | .CONST 0x1a0 ; [0xc] -> 0x2132e 000211a8 01 c2 | | .CONST 0x1c2 ; [0xd] -> 0x21350 000211aa 01 e4 | | .CONST 0x1e4 ; [0xe] -> 0x21372 000211ac 01 fa | | .CONST 0x1fa ; [0xf] -> 0x21388 000211ae 02 0a | | .CONST 0x20a ; [0x10] -> 0x21398 000211b0 02 1e | | .CONST 0x21e ; [0x11] -> 0x213ac 000211b2 02 2c | , | .CONST 0x22c ; [0x12] -> 0x213ba 000211b4 02 3c | < | .CONST 0x23c ; [0x13] -> 0x213ca 000211b6 02 5c | \ | .CONST 0x25c ; [0x14] -> 0x213ea 000211b8 02 84 | | .CONST 0x284 ; [0x15] -> 0x21412 000211ba 02 94 | | .CONST 0x294 ; [0x16] -> 0x21422 000211bc 02 a8 | | .CONST 0x2a8 ; [0x17] -> 0x21436 000211be 02 bc | | .CONST 0x2bc ; [0x18] -> 0x2144a 000211c0 02 d0 | | .CONST 0x2d0 ; [0x19] -> 0x2145e 000211c2 02 ea | | .CONST 0x2ea ; [0x1a] -> 0x21478 000211c4 02 fa | | .CONST 0x2fa ; [0x1b] -> 0x21488 000211c6 03 0e | | .CONST 0x30e ; [0x1c] -> 0x2149c 000211c8 03 22 | " | .CONST 0x322 ; [0x1d] -> 0x214b0 000211ca 03 36 | 6 | .CONST 0x336 ; [0x1e] -> 0x214c4 000211cc 03 50 | P | .CONST 0x350 ; [0x1f] -> 0x214de 000211ce switch@0x21186[0x0]: 000211ce 9e fc 00 1a | | SUBA.W #0x1a,A7 000211d2 20 4f | O | MOVEA.L A7,A0 000211d4 43 fa f0 2c |C , | LEA.L 0x20202,A1 000211d8 70 18 |p | MOVEQ.L #0x18,D0 000211da 10 d9 | | MOVE.B (A1)+,(A0)+ 000211dc 51 c8 ff fc |Q | DBF D0,0x211da 000211e0 59 4f |YO | SUBQ.L #0x4,A7 000211e2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000211e6 3f 03 |? | MOVE.W D3,-(A7) 000211e8 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000211ec 4e 93 |N | JSR (A3) 000211ee 50 4f |PO | ADDQ.L #0x8,A7 000211f0 24 9f |$ | MOVE.L (A7)+,(A2) 000211f2 de fc 00 1a | | ADDA.W #0x1a,A7 000211f6 60 00 03 0e |` | BRA 0x21506 000211fa switch@0x21186[0x1]: 000211fa 41 fa f0 3a |A : | LEA.L 0x20236,A0 000211fe 70 0c |p | MOVEQ.L #0x0c,D0 00021200 3f 20 |? | MOVE.W -(A0),-(A7) 00021202 51 c8 ff fc |Q | DBF D0,0x21200 00021206 59 4f |YO | SUBQ.L #0x4,A7 00021208 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002120c 3f 03 |? | MOVE.W D3,-(A7) 0002120e 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 00021212 60 d8 |` | BRA 0x211ec 00021214 switch@0x21186[0x2]: 00021214 41 fa f0 38 |A 8 | LEA.L 0x2024e,A0 00021218 70 05 |p | MOVEQ.L #0x05,D0 0002121a 2f 20 |/ | MOVE.L -(A0),-(A7) 0002121c 51 c8 ff fc |Q | DBF D0,0x2121a 00021220 59 4f |YO | SUBQ.L #0x4,A7 00021222 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021226 3f 03 |? | MOVE.W D3,-(A7) 00021228 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 0002122c 4e 93 |N | JSR (A3) 0002122e 50 4f |PO | ADDQ.L #0x8,A7 00021230 24 9f |$ | MOVE.L (A7)+,(A2) 00021232 de fc 00 18 | | ADDA.W #0x18,A7 00021236 60 00 02 ce |` | BRA 0x21506 0002123a switch@0x21186[0x3]: 0002123a 41 fa f0 28 |A ( | LEA.L 0x20264,A0 0002123e 70 0a |p | MOVEQ.L #0x0a,D0 00021240 3f 20 |? | MOVE.W -(A0),-(A7) 00021242 51 c8 ff fc |Q | DBF D0,0x21240 00021246 59 4f |YO | SUBQ.L #0x4,A7 00021248 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002124c 3f 03 |? | MOVE.W D3,-(A7) 0002124e 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 00021252 4e 93 |N | JSR (A3) 00021254 50 4f |PO | ADDQ.L #0x8,A7 00021256 24 9f |$ | MOVE.L (A7)+,(A2) 00021258 de fc 00 16 | | ADDA.W #0x16,A7 0002125c 60 00 02 a8 |` | BRA 0x21506 00021260 switch@0x21186[0x4]: 00021260 9e fc 00 12 | | SUBA.W #0x12,A7 00021264 20 4f | O | MOVEA.L A7,A0 00021266 43 fa ef fc |C | LEA.L 0x20264,A1 0002126a 70 10 |p | MOVEQ.L #0x10,D0 0002126c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002126e 51 c8 ff fc |Q | DBF D0,0x2126c 00021272 59 4f |YO | SUBQ.L #0x4,A7 00021274 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021278 3f 03 |? | MOVE.W D3,-(A7) 0002127a 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 0002127e 4e 93 |N | JSR (A3) 00021280 50 4f |PO | ADDQ.L #0x8,A7 00021282 24 9f |$ | MOVE.L (A7)+,(A2) 00021284 de fc 00 12 | | ADDA.W #0x12,A7 00021288 60 00 02 7c |` | | BRA 0x21506 0002128c switch@0x21186[0x5]: 0002128c 9e fc 00 12 | | SUBA.W #0x12,A7 00021290 20 4f | O | MOVEA.L A7,A0 00021292 43 fa ef e2 |C | LEA.L 0x20276,A1 00021296 70 10 |p | MOVEQ.L #0x10,D0 00021298 10 d9 | | MOVE.B (A1)+,(A0)+ 0002129a 51 c8 ff fc |Q | DBF D0,0x21298 0002129e 60 d2 |` | BRA 0x21272 000212a0 switch@0x21186[0x6]: 000212a0 41 fa ef fc |A | LEA.L 0x2029e,A0 000212a4 70 0a |p | MOVEQ.L #0x0a,D0 000212a6 3f 20 |? | MOVE.W -(A0),-(A7) 000212a8 51 c8 ff fc |Q | DBF D0,0x212a6 000212ac 60 98 |` | BRA 0x21246 000212ae switch@0x21186[0x7]: 000212ae 9e fc 00 1c | | SUBA.W #0x1c,A7 000212b2 20 4f | O | MOVEA.L A7,A0 000212b4 43 fa ef e8 |C | LEA.L 0x2029e,A1 000212b8 70 1a |p | MOVEQ.L #0x1a,D0 000212ba 10 d9 | | MOVE.B (A1)+,(A0)+ 000212bc 51 c8 ff fc |Q | DBF D0,0x212ba 000212c0 60 00 02 2e |` . | BRA 0x214f0 000212c4 switch@0x21186[0x8]: 000212c4 9e fc 00 18 | | SUBA.W #0x18,A7 000212c8 20 4f | O | MOVEA.L A7,A0 000212ca 43 fa ef ee |C | LEA.L 0x202ba,A1 000212ce 70 16 |p | MOVEQ.L #0x16,D0 000212d0 10 d9 | | MOVE.B (A1)+,(A0)+ 000212d2 51 c8 ff fc |Q | DBF D0,0x212d0 000212d6 59 4f |YO | SUBQ.L #0x4,A7 000212d8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000212dc 3f 03 |? | MOVE.W D3,-(A7) 000212de 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 000212e2 60 00 ff 48 |` H | BRA 0x2122c 000212e6 switch@0x21186[0x9]: 000212e6 41 fa f0 02 |A | LEA.L 0x202ea,A0 000212ea 70 05 |p | MOVEQ.L #0x05,D0 000212ec 2f 20 |/ | MOVE.L -(A0),-(A7) 000212ee 51 c8 ff fc |Q | DBF D0,0x212ec 000212f2 60 00 ff 2c |` , | BRA 0x21220 000212f6 switch@0x21186[0xa]: 000212f6 41 fa f0 08 |A | LEA.L 0x20300,A0 000212fa 70 0a |p | MOVEQ.L #0x0a,D0 000212fc 3f 20 |? | MOVE.W -(A0),-(A7) 000212fe 51 c8 ff fc |Q | DBF D0,0x212fc 00021302 60 00 ff 42 |` B | BRA 0x21246 00021306 switch@0x21186[0xb]: 00021306 9e c4 | | SUBA.W D4,A7 00021308 20 4f | O | MOVEA.L A7,A0 0002130a 43 fa ef f4 |C | LEA.L 0x20300,A1 0002130e 70 20 |p | MOVEQ.L #0x20,D0 00021310 10 d9 | | MOVE.B (A1)+,(A0)+ 00021312 51 c8 ff fc |Q | DBF D0,0x21310 00021316 59 4f |YO | SUBQ.L #0x4,A7 00021318 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002131c 3f 03 |? | MOVE.W D3,-(A7) 0002131e 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 00021322 4e 93 |N | JSR (A3) 00021324 50 4f |PO | ADDQ.L #0x8,A7 00021326 24 9f |$ | MOVE.L (A7)+,(A2) 00021328 de c4 | | ADDA.W D4,A7 0002132a 60 00 01 da |` | BRA 0x21506 0002132e switch@0x21186[0xc]: 0002132e 41 fa f0 10 |A | LEA.L 0x20340,A0 00021332 70 0e |p | MOVEQ.L #0x0e,D0 00021334 3f 20 |? | MOVE.W -(A0),-(A7) 00021336 51 c8 ff fc |Q | DBF D0,0x21334 0002133a 59 4f |YO | SUBQ.L #0x4,A7 0002133c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021340 3f 03 |? | MOVE.W D3,-(A7) 00021342 3f 05 |? | MOVE.W D5,-(A7) 00021344 4e 93 |N | JSR (A3) 00021346 50 4f |PO | ADDQ.L #0x8,A7 00021348 24 9f |$ | MOVE.L (A7)+,(A2) 0002134a de c5 | | ADDA.W D5,A7 0002134c 60 00 01 b8 |` | BRA 0x21506 00021350 switch@0x21186[0xd]: 00021350 9e fc 00 16 | | SUBA.W #0x16,A7 00021354 20 4f | O | MOVEA.L A7,A0 00021356 43 fa ef e8 |C | LEA.L 0x20340,A1 0002135a 70 14 |p | MOVEQ.L #0x14,D0 0002135c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002135e 51 c8 ff fc |Q | DBF D0,0x2135c 00021362 59 4f |YO | SUBQ.L #0x4,A7 00021364 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021368 3f 03 |? | MOVE.W D3,-(A7) 0002136a 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 0002136e 60 00 fe e2 |` | BRA 0x21252 00021372 switch@0x21186[0xe]: 00021372 9e fc 00 1a | | SUBA.W #0x1a,A7 00021376 20 4f | O | MOVEA.L A7,A0 00021378 43 fa ef dc |C | LEA.L 0x20356,A1 0002137c 70 18 |p | MOVEQ.L #0x18,D0 0002137e 10 d9 | | MOVE.B (A1)+,(A0)+ 00021380 51 c8 ff fc |Q | DBF D0,0x2137e 00021384 60 00 fe 5a |` Z | BRA 0x211e0 00021388 switch@0x21186[0xf]: 00021388 41 fa f0 00 |A | LEA.L 0x2038a,A0 0002138c 70 0c |p | MOVEQ.L #0x0c,D0 0002138e 3f 20 |? | MOVE.W -(A0),-(A7) 00021390 51 c8 ff fc |Q | DBF D0,0x2138e 00021394 60 00 fe 70 |` p | BRA 0x21206 00021398 switch@0x21186[0x10]: 00021398 9e c4 | | SUBA.W D4,A7 0002139a 20 4f | O | MOVEA.L A7,A0 0002139c 43 fa ef ec |C | LEA.L 0x2038a,A1 000213a0 70 20 |p | MOVEQ.L #0x20,D0 000213a2 10 d9 | | MOVE.B (A1)+,(A0)+ 000213a4 51 c8 ff fc |Q | DBF D0,0x213a2 000213a8 60 00 ff 6c |` l | BRA 0x21316 000213ac switch@0x21186[0x11]: 000213ac 41 fa f0 1c |A | LEA.L 0x203ca,A0 000213b0 70 0e |p | MOVEQ.L #0x0e,D0 000213b2 3f 20 |? | MOVE.W -(A0),-(A7) 000213b4 51 c8 ff fc |Q | DBF D0,0x213b2 000213b8 60 80 |` | BRA 0x2133a 000213ba switch@0x21186[0x12]: 000213ba 41 fa f0 26 |A & | LEA.L 0x203e2,A0 000213be 70 05 |p | MOVEQ.L #0x05,D0 000213c0 2f 20 |/ | MOVE.L -(A0),-(A7) 000213c2 51 c8 ff fc |Q | DBF D0,0x213c0 000213c6 60 00 fe 58 |` X | BRA 0x21220 000213ca switch@0x21186[0x13]: 000213ca 9e c5 | | SUBA.W D5,A7 000213cc 20 4f | O | MOVEA.L A7,A0 000213ce 43 fa f0 12 |C | LEA.L 0x203e2,A1 000213d2 70 1c |p | MOVEQ.L #0x1c,D0 000213d4 10 d9 | | MOVE.B (A1)+,(A0)+ 000213d6 51 c8 ff fc |Q | DBF D0,0x213d4 000213da 59 4f |YO | SUBQ.L #0x4,A7 000213dc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000213e0 3f 03 |? | MOVE.W D3,-(A7) 000213e2 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 000213e6 60 00 ff 5c |` \ | BRA 0x21344 000213ea switch@0x21186[0x14]: 000213ea 9e c6 | | SUBA.W D6,A7 000213ec 20 4f | O | MOVEA.L A7,A0 000213ee 43 fa f0 10 |C | LEA.L 0x20400,A1 000213f2 70 1e |p | MOVEQ.L #0x1e,D0 000213f4 10 d9 | | MOVE.B (A1)+,(A0)+ 000213f6 51 c8 ff fc |Q | DBF D0,0x213f4 000213fa 59 4f |YO | SUBQ.L #0x4,A7 000213fc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021400 3f 03 |? | MOVE.W D3,-(A7) 00021402 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7) 00021406 4e 93 |N | JSR (A3) 00021408 50 4f |PO | ADDQ.L #0x8,A7 0002140a 24 9f |$ | MOVE.L (A7)+,(A2) 0002140c de c6 | | ADDA.W D6,A7 0002140e 60 00 00 f6 |` | BRA 0x21506 00021412 switch@0x21186[0x15]: 00021412 41 fa f0 24 |A $ | LEA.L 0x20438,A0 00021416 70 05 |p | MOVEQ.L #0x05,D0 00021418 2f 20 |/ | MOVE.L -(A0),-(A7) 0002141a 51 c8 ff fc |Q | DBF D0,0x21418 0002141e 60 00 fe 00 |` | BRA 0x21220 00021422 switch@0x21186[0x16]: 00021422 9e c4 | | SUBA.W D4,A7 00021424 20 4f | O | MOVEA.L A7,A0 00021426 43 fa f0 10 |C | LEA.L 0x20438,A1 0002142a 70 20 |p | MOVEQ.L #0x20,D0 0002142c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002142e 51 c8 ff fc |Q | DBF D0,0x2142c 00021432 60 00 fe e2 |` | BRA 0x21316 00021436 switch@0x21186[0x17]: 00021436 9e c4 | | SUBA.W D4,A7 00021438 20 4f | O | MOVEA.L A7,A0 0002143a 43 fa f0 1e |C | LEA.L 0x2045a,A1 0002143e 70 20 |p | MOVEQ.L #0x20,D0 00021440 10 d9 | | MOVE.B (A1)+,(A0)+ 00021442 51 c8 ff fc |Q | DBF D0,0x21440 00021446 60 00 fe ce |` | BRA 0x21316 0002144a switch@0x21186[0x18]: 0002144a 9e c4 | | SUBA.W D4,A7 0002144c 20 4f | O | MOVEA.L A7,A0 0002144e 43 fa f0 2c |C , | LEA.L 0x2047c,A1 00021452 70 20 |p | MOVEQ.L #0x20,D0 00021454 10 d9 | | MOVE.B (A1)+,(A0)+ 00021456 51 c8 ff fc |Q | DBF D0,0x21454 0002145a 60 00 fe ba |` | BRA 0x21316 0002145e switch@0x21186[0x19]: 0002145e 41 fa f0 60 |A ` | LEA.L 0x204c0,A0 00021462 70 10 |p | MOVEQ.L #0x10,D0 00021464 3f 20 |? | MOVE.W -(A0),-(A7) 00021466 51 c8 ff fc |Q | DBF D0,0x21464 0002146a 59 4f |YO | SUBQ.L #0x4,A7 0002146c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021470 3f 03 |? | MOVE.W D3,-(A7) 00021472 3f 04 |? | MOVE.W D4,-(A7) 00021474 60 00 fe ac |` | BRA 0x21322 00021478 switch@0x21186[0x1a]: 00021478 41 fa f0 60 |A ` | LEA.L 0x204da,A0 0002147c 70 0c |p | MOVEQ.L #0x0c,D0 0002147e 3f 20 |? | MOVE.W -(A0),-(A7) 00021480 51 c8 ff fc |Q | DBF D0,0x2147e 00021484 60 00 fd 80 |` | BRA 0x21206 00021488 switch@0x21186[0x1b]: 00021488 9e c6 | | SUBA.W D6,A7 0002148a 20 4f | O | MOVEA.L A7,A0 0002148c 43 fa f0 4c |C L | LEA.L 0x204da,A1 00021490 70 1e |p | MOVEQ.L #0x1e,D0 00021492 10 d9 | | MOVE.B (A1)+,(A0)+ 00021494 51 c8 ff fc |Q | DBF D0,0x21492 00021498 60 00 ff 60 |` ` | BRA 0x213fa 0002149c switch@0x21186[0x1c]: 0002149c 9e c5 | | SUBA.W D5,A7 0002149e 20 4f | O | MOVEA.L A7,A0 000214a0 43 fa f0 58 |C X | LEA.L 0x204fa,A1 000214a4 70 1c |p | MOVEQ.L #0x1c,D0 000214a6 10 d9 | | MOVE.B (A1)+,(A0)+ 000214a8 51 c8 ff fc |Q | DBF D0,0x214a6 000214ac 60 00 ff 2c |` , | BRA 0x213da 000214b0 switch@0x21186[0x1d]: 000214b0 9e c5 | | SUBA.W D5,A7 000214b2 20 4f | O | MOVEA.L A7,A0 000214b4 43 fa f0 62 |C b | LEA.L 0x20518,A1 000214b8 70 1c |p | MOVEQ.L #0x1c,D0 000214ba 10 d9 | | MOVE.B (A1)+,(A0)+ 000214bc 51 c8 ff fc |Q | DBF D0,0x214ba 000214c0 60 00 ff 18 |` | BRA 0x213da 000214c4 switch@0x21186[0x1e]: 000214c4 41 fa f0 8c |A | LEA.L 0x20552,A0 000214c8 70 06 |p | MOVEQ.L #0x06,D0 000214ca 2f 20 |/ | MOVE.L -(A0),-(A7) 000214cc 51 c8 ff fc |Q | DBF D0,0x214ca 000214d0 59 4f |YO | SUBQ.L #0x4,A7 000214d2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000214d6 3f 03 |? | MOVE.W D3,-(A7) 000214d8 3f 3c 00 1c |?< | MOVE.W #0x1c,-(A7) 000214dc 60 1e |` | BRA 0x214fc 000214de switch@0x21186[0x1f]: 000214de 9e fc 00 1c | | SUBA.W #0x1c,A7 000214e2 20 4f | O | MOVEA.L A7,A0 000214e4 43 fa f0 6c |C l | LEA.L 0x20552,A1 000214e8 70 1a |p | MOVEQ.L #0x1a,D0 000214ea 10 d9 | | MOVE.B (A1)+,(A0)+ 000214ec 51 c8 ff fc |Q | DBF D0,0x214ea 000214f0 59 4f |YO | SUBQ.L #0x4,A7 000214f2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000214f6 3f 03 |? | MOVE.W D3,-(A7) 000214f8 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 000214fc 4e 93 |N | JSR (A3) 000214fe 50 4f |PO | ADDQ.L #0x8,A7 00021500 24 9f |$ | MOVE.L (A7)+,(A2) 00021502 de fc 00 1c | | ADDA.W #0x1c,A7 00021506 3f 3a f0 66 |?: f | MOVE.W 0x2056e,-(A7) 0002150a 59 4f |YO | SUBQ.L #0x4,A7 0002150c 2f 12 |/ | MOVE.L (A2),-(A7) 0002150e 59 4f |YO | SUBQ.L #0x4,A7 00021510 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021514 3f 03 |? | MOVE.W D3,-(A7) 00021516 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 0002151a 4e 93 |N | JSR (A3) 0002151c 2e 87 |. | MOVE.L D7,(A7) 0002151e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021524 58 4f |XO | ADDQ.L #0x4,A7 00021526 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 0002152c de fc 00 0c | | ADDA.W #0xc,A7 00021530 24 9f |$ | MOVE.L (A7)+,(A2) 00021532 54 4f |TO | ADDQ.L #0x2,A7 00021534 2d 52 00 0a |-R | MOVE.L (A2),(A6+0xa) 00021538 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 0002153c 4e 5e |N^ | UNLK A6 0002153e 4e 75 |Nu | RTS 00021540 ; -------------------------------------------------------------------------------------- 00021540 ; OMSI PASCAL Function 00021540 ; <LVAR 0x00c 4(r)> 00021540 ; <LVAR 0x008 4(r)> 00021540 ; -------------------------------------------------------------------------------------- 00021540 4e 56 ff b0 |NV | LINK.W A6,#0xffb0 00021544 bf d5 | | CMPA.L (A5),A7 00021546 62 06 |b | BHI 0x2154e 00021548 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002154c 4e 76 |Nv | TRAPV 0002154e de fc 00 44 | D | ADDA.W #0x44,A7 00021552 48 e7 f9 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 00021556 43 f9 00 01 02 d0 |C | LEA.L StringCat2(a, b : String) : String,A1 0002155c 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00021560 76 01 |v | MOVEQ.L #0x01,D3 00021562 78 0c |x | MOVEQ.L #0x0c,D4 00021564 20 12 | | MOVE.L (A2),D0 00021566 0c 80 00 00 07 ff | | CMPI.L #0x000007ff,D0 0002156c 63 02 |c | BLS 0x21570 0002156e 4e 4f |NO | TRAP #15 00021570 e3 80 | | ASL.L #0x1,D0 00021572 41 f9 00 02 24 e6 |A $ | LEA.L 0x224e6,A0 00021578 42 81 |B | CLR.L D1 0002157a 12 30 08 0c | 0 | MOVE.B (A0+D0.L+#0xc),D1 0002157e e1 41 | A | ASL.W #0x8,D1 00021580 42 82 |B | CLR.L D2 00021582 14 30 08 0d | 0 | MOVE.B (A0+D0.L+#0xd),D2 00021586 d4 41 | A | ADD.W D1,D2 00021588 3e 02 |> | MOVE.W D2,D7 0002158a 51 4f |QO | SUBQ.L #0x8,A7 0002158c 2f 12 |/ | MOVE.L (A2),-(A7) 0002158e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021594 58 4f |XO | ADDQ.L #0x4,A7 00021596 48 78 00 05 |Hx | PEA.L 0x5 0002159a 4e b9 00 01 02 f4 |N | JSR RightPad(a : String; b : Long) : String 000215a0 50 4f |PO | ADDQ.L #0x8,A7 000215a2 26 5f |&_ | MOVEA.L (A7)+,A3 000215a4 20 12 | | MOVE.L (A2),D0 000215a6 b0 ac 00 24 | $ | CMP.L (A4+0x24),D0 000215aa 66 18 |f | BNE 0x215c4 000215ac 51 4f |QO | SUBQ.L #0x8,A7 000215ae 4e ba f4 4a |N J | JSR 0x209fa 000215b2 2f 0b |/ | MOVE.L A3,-(A7) 000215b4 59 4f |YO | SUBQ.L #0x4,A7 000215b6 4e ba f4 90 |N | JSR 0x20a48 000215ba 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 000215c0 de c4 | | ADDA.W D4,A7 000215c2 26 5f |&_ | MOVEA.L (A7)+,A3 000215c4 51 4f |QO | SUBQ.L #0x8,A7 000215c6 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000215ca 48 78 00 01 |Hx | PEA.L 0x1 000215ce 4e ba f2 5a |N Z | JSR 0x2082a 000215d2 58 4f |XO | ADDQ.L #0x4,A7 000215d4 2e 8b |. | MOVE.L A3,(A7) 000215d6 4e 91 |N | JSR (A1) 000215d8 50 4f |PO | ADDQ.L #0x8,A7 000215da 26 5f |&_ | MOVEA.L (A7)+,A3 000215dc 30 07 |0 | MOVE.W D7,D0 000215de 02 40 40 00 | @@ | ANDI.W #0x4000,D0 000215e2 67 06 |g | BEQ 0x215ea 000215e4 3f 3a ef 8a |?: | MOVE.W 0x20570,-(A7) 000215e8 60 04 |` | BRA 0x215ee 000215ea 3f 3a ef 86 |?: | MOVE.W 0x20572,-(A7) 000215ee 59 4f |YO | SUBQ.L #0x4,A7 000215f0 2f 0b |/ | MOVE.L A3,-(A7) 000215f2 59 4f |YO | SUBQ.L #0x4,A7 000215f4 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000215f8 3f 03 |? | MOVE.W D3,-(A7) 000215fa 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 000215fe 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021604 50 4f |PO | ADDQ.L #0x8,A7 00021606 4e 91 |N | JSR (A1) 00021608 50 4f |PO | ADDQ.L #0x8,A7 0002160a 26 5f |&_ | MOVEA.L (A7)+,A3 0002160c 54 4f |TO | ADDQ.L #0x2,A7 0002160e 30 07 |0 | MOVE.W D7,D0 00021610 02 40 80 00 | @ | ANDI.W #0x8000,D0 00021614 67 14 |g | BEQ 0x2162a 00021616 59 4f |YO | SUBQ.L #0x4,A7 00021618 1e ba ef 5a | Z | MOVE.B 0x20574,(A7) 0002161c 1f 7a ef 57 00 01 | z W | MOVE.B 0x20575,(A7+0x1) 00021622 1f 7a ef 52 00 02 | z R | MOVE.B 0x20576,(A7+0x2) 00021628 60 12 |` | BRA 0x2163c 0002162a 59 4f |YO | SUBQ.L #0x4,A7 0002162c 1e ba ef 4a | J | MOVE.B 0x20578,(A7) 00021630 1f 7a ef 47 00 01 | z G | MOVE.B 0x20579,(A7+0x1) 00021636 1f 7a ef 42 00 02 | z B | MOVE.B 0x2057a,(A7+0x2) 0002163c 59 4f |YO | SUBQ.L #0x4,A7 0002163e 2f 0b |/ | MOVE.L A3,-(A7) 00021640 59 4f |YO | SUBQ.L #0x4,A7 00021642 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021646 3f 03 |? | MOVE.W D3,-(A7) 00021648 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 0002164c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021652 50 4f |PO | ADDQ.L #0x8,A7 00021654 4e 91 |N | JSR (A1) 00021656 50 4f |PO | ADDQ.L #0x8,A7 00021658 26 5f |&_ | MOVEA.L (A7)+,A3 0002165a 58 4f |XO | ADDQ.L #0x4,A7 0002165c 59 4f |YO | SUBQ.L #0x4,A7 0002165e 2f 0b |/ | MOVE.L A3,-(A7) 00021660 59 4f |YO | SUBQ.L #0x4,A7 00021662 30 07 |0 | MOVE.W D7,D0 00021664 02 40 3f ff | @? | ANDI.W #0x3fff,D0 00021668 42 81 |B | CLR.L D1 0002166a 32 00 |2 | MOVE.W D0,D1 0002166c 2f 01 |/ | MOVE.L D1,-(A7) 0002166e 48 78 00 04 |Hx | PEA.L 0x4 00021672 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00021678 50 4f |PO | ADDQ.L #0x8,A7 0002167a 4e 91 |N | JSR (A1) 0002167c 50 4f |PO | ADDQ.L #0x8,A7 0002167e 26 5f |&_ | MOVEA.L (A7)+,A3 00021680 4a 2c 00 22 |J, " | TST.B (A4+0x22) 00021684 67 30 |g0 | BEQ 0x216b6 00021686 2f 3a ee f4 |/: | MOVE.L 0x2057c,-(A7) 0002168a 59 4f |YO | SUBQ.L #0x4,A7 0002168c 2f 0b |/ | MOVE.L A3,-(A7) 0002168e 59 4f |YO | SUBQ.L #0x4,A7 00021690 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021694 3f 03 |? | MOVE.W D3,-(A7) 00021696 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 0002169a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000216a0 54 4f |TO | ADDQ.L #0x2,A7 000216a2 3e 87 |> | MOVE.W D7,(A7) 000216a4 4e ba fa 06 |N | JSR 0x210ac 000216a8 54 4f |TO | ADDQ.L #0x2,A7 000216aa 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 000216b0 de c4 | | ADDA.W D4,A7 000216b2 26 5f |&_ | MOVEA.L (A7)+,A3 000216b4 58 4f |XO | ADDQ.L #0x4,A7 000216b6 2f 0b |/ | MOVE.L A3,-(A7) 000216b8 1f 3c 00 1b | < | MOVE.B #0x1b,-(A7) 000216bc 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000216c2 54 4f |TO | ADDQ.L #0x2,A7 000216c4 2e 8b |. | MOVE.L A3,(A7) 000216c6 1f 3c 00 5b | < [ | MOVE.B #0x5b,-(A7) 000216ca 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000216d0 54 4f |TO | ADDQ.L #0x2,A7 000216d2 2e 8b |. | MOVE.L A3,(A7) 000216d4 1f 3c 00 30 | < 0 | MOVE.B #0x30,-(A7) 000216d8 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000216de 54 4f |TO | ADDQ.L #0x2,A7 000216e0 2e 8b |. | MOVE.L A3,(A7) 000216e2 1f 3c 00 4b | < K | MOVE.B #0x4b,-(A7) 000216e6 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000216ec 54 4f |TO | ADDQ.L #0x2,A7 000216ee 2e 8b |. | MOVE.L A3,(A7) 000216f0 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000216f6 58 4f |XO | ADDQ.L #0x4,A7 000216f8 4c df 0f 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3 000216fc 4e 5e |N^ | UNLK A6 000216fe 4e 75 |Nu | RTS 00021700 ; -------------------------------------------------------------------------------------- 00021700 ; OMSI PASCAL Function 00021700 ; <LVAR 0x00a 4(r)> 00021700 ; <LVAR -0x004 4(rw)> 00021700 ; <LVAR -0x006 1(w)> 00021700 ; <LVAR -0x007 1(rw)> 00021700 ; <LVAR -0x008 1(rw)> 00021700 ; <LVAR -0x00c 4(rw)> 00021700 ; <LVAR -0x01a @> 00021700 ; -------------------------------------------------------------------------------------- 00021700 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 00021704 bf d5 | | CMPA.L (A5),A7 00021706 62 06 |b | BHI 0x2170e 00021708 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002170c 4e 76 |Nv | TRAPV 0002170e de fc 00 3e | > | ADDA.W #0x3e,A7 00021712 48 e7 c7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 00021716 41 f9 00 02 34 fa |A 4 | LEA.L 0x234fa,A0 0002171c 43 f9 00 02 34 f6 |C 4 | LEA.L 0x234f6,A1 00021722 45 f9 00 02 35 1a |E 5 | LEA.L 0x2351a,A2 00021728 47 ee 00 0a |G | LEA.L (A6+0xa),A3 0002172c 20 10 | | MOVE.L (A0),D0 0002172e 90 92 | | SUB.L (A2),D0 00021730 44 80 |D | NEG.L D0 00021732 d0 93 | | ADD.L (A3),D0 00021734 6a 02 |j | BPL 0x21738 00021736 44 80 |D | NEG.L D0 00021738 2d 40 ff f4 |-@ | MOVE.L D0,(A6-0xc) 0002173c 72 00 |r | MOVEQ.L #0x00,D1 0002173e b0 92 | | CMP.L (A2),D0 00021740 6c 08 |l | BGE 0x2174a 00021742 4a 39 00 02 35 1f |J9 5 | TST.B 0x2351f 00021748 67 02 |g | BEQ 0x2174c 0002174a 52 01 |R | ADDQ.B #0x1,D1 0002174c 48 81 |H | EXTB.W D1 0002174e 43 bc 00 01 |C | CHK.W #0x1,D1 00021752 1d 41 ff fa | A | MOVE.B D1,(A6-0x6) 00021756 42 2e ff f8 |B. | CLR.B (A6-0x8) 0002175a b0 b9 00 02 35 0e | 5 | CMP.L 0x2350e,D0 00021760 6f 0c |o | BLE 0x2176e 00021762 10 01 | | MOVE.B D1,D0 00021764 44 00 |D | NEG.B D0 00021766 52 00 |R | ADDQ.B #0x1,D0 00021768 67 04 |g | BEQ 0x2176e 0002176a 52 2e ff f8 |R. | ADDQ.B #0x1,(A6-0x8) 0002176e 1d 6e ff f8 ff f9 | n | MOVE.B (A6-0x8),(A6-0x7) 00021774 83 2e ff f9 | . | OR.B D1,(A6-0x7) 00021778 44 2e ff f9 |D. | NEG.B (A6-0x7) 0002177c 52 2e ff f9 |R. | ADDQ.B #0x1,(A6-0x7) 00021780 4a 01 |J | TST.B D1 00021782 66 1e |f | BNE 0x217a2 00021784 20 10 | | MOVE.L (A0),D0 00021786 90 b9 00 02 34 fe | 4 | SUB.L 0x234fe,D0 0002178c 52 80 |R | ADDQ.L #0x1,D0 0002178e 2f 00 |/ | MOVE.L D0,-(A7) 00021790 2f 39 00 02 34 fe |/9 4 | MOVE.L 0x234fe,-(A7) 00021796 49 ee ff e6 |I | LEA.L (A6-0x1a),A4 0002179a 4e ba fd a4 |N | JSR 0x21540 0002179e 50 4f |PO | ADDQ.L #0x8,A7 000217a0 60 5a |`Z | BRA 0x217fc 000217a2 59 4f |YO | SUBQ.L #0x4,A7 000217a4 20 13 | | MOVE.L (A3),D0 000217a6 d0 92 | | ADD.L (A2),D0 000217a8 52 80 |R | ADDQ.L #0x1,D0 000217aa 2f 00 |/ | MOVE.L D0,-(A7) 000217ac 2f 39 00 02 24 ee |/9 $ | MOVE.L 0x224ee,-(A7) 000217b2 4e ba f4 ba |N | JSR 0x20c6e 000217b6 50 4f |PO | ADDQ.L #0x8,A7 000217b8 22 97 |" | MOVE.L (A7),(A1) 000217ba 20 13 | | MOVE.L (A3),D0 000217bc 90 92 | | SUB.L (A2),D0 000217be 2f 00 |/ | MOVE.L D0,-(A7) 000217c0 48 78 00 00 |Hx | PEA.L 0x0 000217c4 4e ba f4 dc |N | JSR 0x20ca2 000217c8 50 4f |PO | ADDQ.L #0x8,A7 000217ca 2c 1f |, | MOVE.L (A7)+,D6 000217cc 20 39 00 02 24 ee | 9 $ | MOVE.L 0x224ee,D0 000217d2 90 92 | | SUB.L (A2),D0 000217d4 52 80 |R | ADDQ.L #0x1,D0 000217d6 b0 93 | | CMP.L (A3),D0 000217d8 6e 10 |n | BGT 0x217ea 000217da 2c 39 00 02 35 0a |,9 5 | MOVE.L 0x2350a,D6 000217e0 53 86 |S | SUBQ.L #0x1,D6 000217e2 44 86 |D | NEG.L D6 000217e4 dc b9 00 02 24 ee | $ | ADD.L 0x224ee,D6 000217ea 20 13 | | MOVE.L (A3),D0 000217ec b0 92 | | CMP.L (A2),D0 000217ee 6c 08 |l | BGE 0x217f8 000217f0 22 b9 00 02 35 0a |" 5 | MOVE.L 0x2350a,(A1) 000217f6 53 91 |S | SUBQ.L #0x1,(A1) 000217f8 7e 01 |~ | MOVEQ.L #0x01,D7 000217fa 20 91 | | MOVE.L (A1),(A0) 000217fc 4a 2e ff f9 |J. | TST.B (A6-0x7) 00021800 67 0a |g | BEQ 0x2180c 00021802 22 93 |" | MOVE.L (A3),(A1) 00021804 2c 13 |, | MOVE.L (A3),D6 00021806 2e 10 |. | MOVE.L (A0),D7 00021808 9e 93 | | SUB.L (A3),D7 0002180a 52 87 |R | ADDQ.L #0x1,D7 0002180c 4a 2e ff f8 |J. | TST.B (A6-0x8) 00021810 67 00 00 a2 |g | BEQ 0x218b4 00021814 20 10 | | MOVE.L (A0),D0 00021816 90 93 | | SUB.L (A3),D0 00021818 52 80 |R | ADDQ.L #0x1,D0 0002181a 2f 00 |/ | MOVE.L D0,-(A7) 0002181c 2f 13 |/ | MOVE.L (A3),-(A7) 0002181e 49 ee ff e6 |I | LEA.L (A6-0x1a),A4 00021822 4e ba fd 1c |N | JSR 0x21540 00021826 50 4f |PO | ADDQ.L #0x8,A7 00021828 20 10 | | MOVE.L (A0),D0 0002182a 90 92 | | SUB.L (A2),D0 0002182c b0 93 | | CMP.L (A3),D0 0002182e 6c 3c |l< | BGE 0x2186c 00021830 59 4f |YO | SUBQ.L #0x4,A7 00021832 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00021836 20 39 00 02 24 ee | 9 $ | MOVE.L 0x224ee,D0 0002183c 90 90 | | SUB.L (A0),D0 0002183e 2f 00 |/ | MOVE.L D0,-(A7) 00021840 4e ba f4 2c |N , | JSR 0x20c6e 00021844 50 4f |PO | ADDQ.L #0x8,A7 00021846 2d 5f ff fc |-_ | MOVE.L (A7)+,(A6-0x4) 0002184a 48 78 00 4d |Hx M | PEA.L 0x4d 0002184e 2f 2e ff fc |/. | MOVE.L (A6-0x4),-(A7) 00021852 4e ba f0 da |N | JSR 0x2092e 00021856 50 4f |PO | ADDQ.L #0x8,A7 00021858 2c 10 |, | MOVE.L (A0),D6 0002185a 52 86 |R | ADDQ.L #0x1,D6 0002185c 20 06 | | MOVE.L D6,D0 0002185e d0 ae ff fc | | ADD.L (A6-0x4),D0 00021862 53 80 |S | SUBQ.L #0x1,D0 00021864 22 80 |" | MOVE.L D0,(A1) 00021866 7e 01 |~ | MOVEQ.L #0x01,D7 00021868 20 80 | | MOVE.L D0,(A0) 0002186a 60 48 |`H | BRA 0x218b4 0002186c 59 4f |YO | SUBQ.L #0x4,A7 0002186e 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00021872 2f 39 00 02 35 0a |/9 5 | MOVE.L 0x2350a,-(A7) 00021878 53 97 |S | SUBQ.L #0x1,(A7) 0002187a 20 10 | | MOVE.L (A0),D0 0002187c 90 97 | | SUB.L (A7),D0 0002187e 2e 80 |. | MOVE.L D0,(A7) 00021880 4e ba f3 ec |N | JSR 0x20c6e 00021884 50 4f |PO | ADDQ.L #0x8,A7 00021886 20 1f | | MOVE.L (A7)+,D0 00021888 2d 40 ff fc |-@ | MOVE.L D0,(A6-0x4) 0002188c 48 78 00 44 |Hx D | PEA.L 0x44 00021890 2f 00 |/ | MOVE.L D0,-(A7) 00021892 4e ba f0 9a |N | JSR 0x2092e 00021896 50 4f |PO | ADDQ.L #0x8,A7 00021898 22 10 |" | MOVE.L (A0),D1 0002189a 92 b9 00 02 35 0a | 5 | SUB.L 0x2350a,D1 000218a0 22 81 |" | MOVE.L D1,(A1) 000218a2 92 80 | | SUB.L D0,D1 000218a4 52 81 |R | ADDQ.L #0x1,D1 000218a6 2c 01 |, | MOVE.L D1,D6 000218a8 2e 39 00 02 35 0a |.9 5 | MOVE.L 0x2350a,D7 000218ae 52 87 |R | ADDQ.L #0x1,D7 000218b0 9e 80 | | SUB.L D0,D7 000218b2 91 90 | | SUB.L D0,(A0) 000218b4 2f 06 |/ | MOVE.L D6,-(A7) 000218b6 2a 11 |* | MOVE.L (A1),D5 000218b8 ba 97 | | CMP.L (A7),D5 000218ba 6d 14 |m | BLT 0x218d0 000218bc 20 17 | | MOVE.L (A7),D0 000218be 0c 85 7f ff ff ff | | CMPI.L #0x7fffffff,D5 000218c4 6e 08 |n | BGT 0x218ce 000218c6 0c 80 80 00 00 01 | | CMPI.L #0x80000001,D0 000218cc 6c 02 |l | BGE 0x218d0 000218ce 4e 4f |NO | TRAP #15 000218d0 ba 97 | | CMP.L (A7),D5 000218d2 6d 14 |m | BLT 0x218e8 000218d4 2f 07 |/ | MOVE.L D7,-(A7) 000218d6 2f 05 |/ | MOVE.L D5,-(A7) 000218d8 49 ee ff e6 |I | LEA.L (A6-0x1a),A4 000218dc 4e ba fc 62 |N b | JSR 0x21540 000218e0 50 4f |PO | ADDQ.L #0x8,A7 000218e2 52 87 |R | ADDQ.L #0x1,D7 000218e4 53 85 |S | SUBQ.L #0x1,D5 000218e6 68 e8 |h | BVC 0x218d0 000218e8 58 4f |XO | ADDQ.L #0x4,A7 000218ea 23 d3 00 02 34 fe |# 4 | MOVE.L (A3),0x234fe 000218f0 42 39 00 02 35 1f |B9 5 | CLR.B 0x2351f 000218f6 51 4f |QO | SUBQ.L #0x8,A7 000218f8 2f 39 00 02 35 06 |/9 5 | MOVE.L 0x23506,-(A7) 000218fe 48 78 00 01 |Hx | PEA.L 0x1 00021902 4e ba ef 26 |N & | JSR 0x2082a 00021906 58 4f |XO | ADDQ.L #0x4,A7 00021908 4e ba f0 aa |N | JSR 0x209b4 0002190c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021912 50 4f |PO | ADDQ.L #0x8,A7 00021914 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 0002191a 58 4f |XO | ADDQ.L #0x4,A7 0002191c 4c df 1f e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3+A4 00021920 4e 5e |N^ | UNLK A6 00021922 4e 75 |Nu | RTS 00021924 ; -------------------------------------------------------------------------------------- 00021924 ; OMSI PASCAL Function 00021924 ; <LVAR 0x00c 4(r)> 00021924 ; <LVAR 0x008 4(r)> 00021924 ; <LVAR -0x004 4(w)> 00021924 ; <LVAR -0x006 @> 00021924 ; <LVAR -0x00a 4(r)> 00021924 ; <LVAR -0x00e @ 4(r)> 00021924 ; <LVAR -0x014 1(rw) 2(rw)> 00021924 ; <LVAR -0x01a @ 4(rw)> 00021924 ; <LVAR -0x01e @ 4(r)> 00021924 ; <LVAR -0x020 @> 00021924 ; -------------------------------------------------------------------------------------- 00021924 4e 56 ff 94 |NV | LINK.W A6,#0xff94 00021928 bf d5 | | CMPA.L (A5),A7 0002192a 62 06 |b | BHI 0x21932 0002192c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021930 4e 76 |Nv | TRAPV 00021932 de fc 00 4c | L | ADDA.W #0x4c,A7 00021936 48 e7 f7 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D3+D2+D1+D0,-(A7) 0002193a 43 ee ff e6 |C | LEA.L (A6-0x1a),A1 0002193e 45 ee ff e2 |E | LEA.L (A6-0x1e),A2 00021942 47 ee ff ec |G | LEA.L (A6-0x14),A3 00021946 74 01 |t | MOVEQ.L #0x01,D2 00021948 76 0c |v | MOVEQ.L #0x0c,D3 0002194a 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 0002194e 1f 02 | | MOVE.B D2,-(A7) 00021950 1f 02 | | MOVE.B D2,-(A7) 00021952 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00021956 48 6e ff e0 |Hn | PEA.L (A6-0x20) 0002195a 48 52 |HR | PEA.L (A2) 0002195c 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00021962 de fc 00 14 | | ADDA.W #0x14,A7 00021966 20 2e 00 08 | . | MOVE.L (A6+0x8),D0 0002196a ef 80 | | ASL.L #0x7,D0 0002196c 53 80 |S | SUBQ.L #0x1,D0 0002196e 2d 40 ff fc |-@ | MOVE.L D0,(A6-0x4) 00021972 2a 00 |* | MOVE.L D0,D5 00021974 4a 85 |J | TST.L D5 00021976 6d 00 00 be |m | BLT 0x21a36 0002197a 48 51 |HQ | PEA.L (A1) 0002197c 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00021982 58 4f |XO | ADDQ.L #0x4,A7 00021984 0c 85 00 00 07 ff | | CMPI.L #0x000007ff,D5 0002198a 63 02 |c | BLS 0x2198e 0002198c 4e 4f |NO | TRAP #15 0002198e 20 05 | | MOVE.L D5,D0 00021990 e3 80 | | ASL.L #0x1,D0 00021992 41 f9 00 02 24 e6 |A $ | LEA.L 0x224e6,A0 00021998 36 b0 08 0c |6 | MOVE.W (A0+D0.L+#0xc),(A3) 0002199c 42 80 |B | CLR.L D0 0002199e 10 13 | | MOVE.B (A3),D0 000219a0 32 00 |2 | MOVE.W D0,D1 000219a2 02 41 00 40 | A @ | ANDI.W #0x0040,D1 000219a6 67 04 |g | BEQ 0x219ac 000219a8 7e 48 |~H | MOVEQ.L #0x48,D7 000219aa 60 02 |` | BRA 0x219ae 000219ac 7e 20 |~ | MOVEQ.L #0x20,D7 000219ae 32 00 |2 | MOVE.W D0,D1 000219b0 02 41 00 80 | A | ANDI.W #0x0080,D1 000219b4 67 04 |g | BEQ 0x219ba 000219b6 7c 43 ||C | MOVEQ.L #0x43,D6 000219b8 60 02 |` | BRA 0x219bc 000219ba 7c 20 || | MOVEQ.L #0x20,D6 000219bc 02 40 00 3f | @ ? | ANDI.W #0x003f,D0 000219c0 16 80 | | MOVE.B D0,(A3) 000219c2 3f 13 |? | MOVE.W (A3),-(A7) 000219c4 48 57 |HW | PEA.L (A7) 000219c6 48 78 00 00 |Hx | PEA.L 0x0 000219ca 48 78 00 01 |Hx | PEA.L 0x1 000219ce 48 6e ff f2 |Hn | PEA.L (A6-0xe) 000219d2 4e b9 00 01 04 b4 |N | JSR ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q) 000219d8 de fc 00 0e | | ADDA.W #0xe,A7 000219dc 2e 91 |. | MOVE.L (A1),(A7) 000219de 1f 07 | | MOVE.B D7,-(A7) 000219e0 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000219e6 54 4f |TO | ADDQ.L #0x2,A7 000219e8 2e 91 |. | MOVE.L (A1),(A7) 000219ea 1f 06 | | MOVE.B D6,-(A7) 000219ec 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000219f2 54 4f |TO | ADDQ.L #0x2,A7 000219f4 2f 11 |/ | MOVE.L (A1),-(A7) 000219f6 59 4f |YO | SUBQ.L #0x4,A7 000219f8 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 000219fc 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 00021a00 48 78 00 10 |Hx | PEA.L 0x10 00021a04 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 00021a0a de c3 | | ADDA.W D3,A7 00021a0c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021a12 50 4f |PO | ADDQ.L #0x8,A7 00021a14 22 9f |" | MOVE.L (A7)+,(A1) 00021a16 2f 12 |/ | MOVE.L (A2),-(A7) 00021a18 2f 11 |/ | MOVE.L (A1),-(A7) 00021a1a 48 6e ff fa |Hn | PEA.L (A6-0x6) 00021a1e 4e b9 00 01 04 40 |N @ | JSR FSCALL_10440 00021a24 de c3 | | ADDA.W D3,A7 00021a26 48 51 |HQ | PEA.L (A1) 00021a28 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021a2e 58 4f |XO | ADDQ.L #0x4,A7 00021a30 53 85 |S | SUBQ.L #0x1,D5 00021a32 68 00 ff 40 |h @ | BVC 0x21974 00021a36 2f 12 |/ | MOVE.L (A2),-(A7) 00021a38 4e b9 00 01 04 48 |N H | JSR FSCALL_10448 00021a3e 54 4f |TO | ADDQ.L #0x2,A7 00021a40 42 17 |B | CLR.B (A7) 00021a42 1f 02 | | MOVE.B D2,-(A7) 00021a44 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00021a48 48 6e ff e0 |Hn | PEA.L (A6-0x20) 00021a4c 48 52 |HR | PEA.L (A2) 00021a4e 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00021a54 de fc 00 10 | | ADDA.W #0x10,A7 00021a58 4c df 0f ef |L | MOVEM.L (A7)+,D0+D1+D2+D3+D5+D6+D7+A0+A1+A2+A3 00021a5c 4e 5e |N^ | UNLK A6 00021a5e 4e 75 |Nu | RTS 00021a60 ; -------------------------------------------------------------------------------------- 00021a60 ; OMSI PASCAL Function 00021a60 ; <LVAR 0x008 4(r)> 00021a60 ; -------------------------------------------------------------------------------------- 00021a60 4e 56 ff de |NV | LINK.W A6,#0xffde 00021a64 bf d5 | | CMPA.L (A5),A7 00021a66 62 06 |b | BHI 0x21a6e 00021a68 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021a6c 4e 76 |Nv | TRAPV 00021a6e de fc 00 1e | | ADDA.W #0x1e,A7 00021a72 48 e7 c1 e0 |H | MOVEM.L A2+A1+A0+D7+D1+D0,-(A7) 00021a76 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00021a7a 45 f9 00 01 03 d4 |E | LEA.L ReadChar() : Byte,A2 00021a80 4e ba f0 f2 |N | JSR 0x20b74 00021a84 55 4f |UO | SUBQ.L #0x2,A7 00021a86 4e 92 |N | JSR (A2) 00021a88 1e 1f | | MOVE.B (A7)+,D7 00021a8a 42 80 |B | CLR.L D0 00021a8c 10 07 | | MOVE.B D7,D0 00021a8e 41 fa ed 12 |A | LEA.L 0x207a2,A0 00021a92 32 00 |2 | MOVE.W D0,D1 00021a94 e6 49 | I | LSR.W #0x3,D1 00021a96 01 30 10 00 | 0 | BTST.B D0,(A0+D1.W) 00021a9a 67 06 |g | BEQ 0x21aa2 00021a9c 02 40 00 5f | @ _ | ANDI.W #0x005f,D0 00021aa0 1e 00 | | MOVE.B D0,D7 00021aa2 0c 07 00 1b | | CMPI.B #0x1b,D7 00021aa6 67 06 |g | BEQ 0x21aae 00021aa8 20 51 | Q | MOVEA.L (A1),A0 00021aaa 10 87 | | MOVE.B D7,(A0) 00021aac 60 60 |`` | BRA 0x21b0e 00021aae 55 4f |UO | SUBQ.L #0x2,A7 00021ab0 4e 92 |N | JSR (A2) 00021ab2 10 1f | | MOVE.B (A7)+,D0 00021ab4 0c 00 00 4f | O | CMPI.B #0x4f,D0 00021ab8 67 02 |g | BEQ 0x21abc 00021aba 60 4c |`L | BRA switch@0x21ad0[0x1] 00021abc 55 4f |UO | SUBQ.L #0x2,A7 00021abe 4e 92 |N | JSR (A2) 00021ac0 42 80 |B | CLR.L D0 00021ac2 10 1f | | MOVE.B (A7)+,D0 00021ac4 04 40 00 6e | @ n | SUBI.W #0x006e,D0 00021ac8 0c 40 00 07 | @ | CMPI.W #0x0007,D0 00021acc 62 3a |b: | BHI switch@0x21ad0[0x1] 00021ace d0 40 | @ | ADD.W D0,D0 00021ad0 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00021ad8 00 28 | ( | .CONST 0x28 ; [0x0] -> 0x21b00 00021ada 00 30 | 0 | .CONST 0x30 ; [0x1] -> 0x21b08 00021adc 00 20 | | .CONST 0x20 ; [0x2] -> 0x21af8 00021ade 00 30 | 0 | .CONST 0x30 ; [0x3] -> 0x21b08 00021ae0 00 30 | 0 | .CONST 0x30 ; [0x4] -> 0x21b08 00021ae2 00 30 | 0 | .CONST 0x30 ; [0x5] -> 0x21b08 00021ae4 00 10 | | .CONST 0x10 ; [0x6] -> 0x21ae8 00021ae6 00 18 | | .CONST 0x18 ; [0x7] -> 0x21af0 00021ae8 switch@0x21ad0[0x6]: 00021ae8 20 51 | Q | MOVEA.L (A1),A0 00021aea 10 bc 00 50 | P | MOVE.B #0x50,(A0) 00021aee 60 1e |` | BRA 0x21b0e 00021af0 switch@0x21ad0[0x7]: 00021af0 20 51 | Q | MOVEA.L (A1),A0 00021af2 10 bc 00 4e | N | MOVE.B #0x4e,(A0) 00021af6 60 16 |` | BRA 0x21b0e 00021af8 switch@0x21ad0[0x2]: 00021af8 20 51 | Q | MOVEA.L (A1),A0 00021afa 10 bc 00 42 | B | MOVE.B #0x42,(A0) 00021afe 60 0e |` | BRA 0x21b0e 00021b00 switch@0x21ad0[0x0]: 00021b00 20 51 | Q | MOVEA.L (A1),A0 00021b02 10 bc 00 5a | Z | MOVE.B #0x5a,(A0) 00021b06 60 06 |` | BRA 0x21b0e 00021b08 switch@0x21ad0[0x1]: 00021b08 switch@0x21ad0[0x3]: 00021b08 switch@0x21ad0[0x4]: 00021b08 switch@0x21ad0[0x5]: 00021b08 20 51 | Q | MOVEA.L (A1),A0 00021b0a 10 bc 00 3f | ? | MOVE.B #0x3f,(A0) 00021b0e 4c df 07 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2 00021b12 4e 5e |N^ | UNLK A6 00021b14 4e 75 |Nu | RTS 00021b16 ; -------------------------------------------------------------------------------------- 00021b16 ; OMSI PASCAL Function 00021b16 ; <LVAR 0x00c 4(r)> 00021b16 ; <LVAR 0x008 4(r)> 00021b16 ; <LVAR -0x008 @ 1(r)> 00021b16 ; -------------------------------------------------------------------------------------- 00021b16 4e 56 ff d6 |NV | LINK.W A6,#0xffd6 00021b1a bf d5 | | CMPA.L (A5),A7 00021b1c 62 06 |b | BHI 0x21b24 00021b1e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021b22 4e 76 |Nv | TRAPV 00021b24 de fc 00 22 | " | ADDA.W #0x22,A7 00021b28 48 e7 e3 80 |H | MOVEM.L A0+D7+D6+D2+D1+D0,-(A7) 00021b2c 74 10 |t | MOVEQ.L #0x10,D2 00021b2e 7e 00 |~ | MOVEQ.L #0x00,D7 00021b30 7c 00 || | MOVEQ.L #0x00,D6 00021b32 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00021b36 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021b3c 58 4f |XO | ADDQ.L #0x4,A7 00021b3e 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00021b42 4e ba ec 9e |N | JSR 0x207e2 00021b46 58 4f |XO | ADDQ.L #0x4,A7 00021b48 10 2e ff f8 | . | MOVE.B (A6-0x8),D0 00021b4c 0c 00 00 0d | | CMPI.B #0x0d,D0 00021b50 67 6a |gj | BEQ 0x21bbc 00021b52 42 81 |B | CLR.L D1 00021b54 12 00 | | MOVE.B D0,D1 00021b56 41 fa ec 6a |A j | LEA.L 0x207c2,A0 00021b5a 30 01 |0 | MOVE.W D1,D0 00021b5c e6 48 | H | LSR.W #0x3,D0 00021b5e 03 30 00 00 | 0 | BTST.B D1,(A0+D0.W) 00021b62 66 0e |f | BNE 0x21b72 00021b64 1f 3c 00 07 | < | MOVE.B #0x07,-(A7) 00021b68 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char) 00021b6e 54 4f |TO | ADDQ.L #0x2,A7 00021b70 60 48 |`H | BRA 0x21bba 00021b72 1f 01 | | MOVE.B D1,-(A7) 00021b74 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char) 00021b7a 54 4f |TO | ADDQ.L #0x2,A7 00021b7c 0c 01 00 39 | 9 | CMPI.B #0x39,D1 00021b80 6e 18 |n | BGT 0x21b9a 00021b82 30 07 |0 | MOVE.W D7,D0 00021b84 c0 c2 | | MULU.W D2,D0 00021b86 04 41 00 30 | A 0 | SUBI.W #0x0030,D1 00021b8a 48 c1 |H | EXTW.L D1 00021b8c d2 80 | | ADD.L D0,D1 00021b8e 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 00021b94 63 02 |c | BLS 0x21b98 00021b96 4e 4f |NO | TRAP #15 00021b98 60 1c |` | BRA 0x21bb6 00021b9a 30 07 |0 | MOVE.W D7,D0 00021b9c c0 c2 | | MULU.W D2,D0 00021b9e 04 41 00 41 | A A | SUBI.W #0x0041,D1 00021ba2 48 c1 |H | EXTW.L D1 00021ba4 d2 80 | | ADD.L D0,D1 00021ba6 06 81 00 00 00 0a | | ADDI.L #0x0000000a,D1 00021bac 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 00021bb2 63 02 |c | BLS 0x21bb6 00021bb4 4e 4f |NO | TRAP #15 00021bb6 3e 01 |> | MOVE.W D1,D7 00021bb8 52 86 |R | ADDQ.L #0x1,D6 00021bba 60 82 |` | BRA 0x21b3e 00021bbc 4a 86 |J | TST.L D6 00021bbe 67 18 |g | BEQ 0x21bd8 00021bc0 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021bc4 30 07 |0 | MOVE.W D7,D0 00021bc6 02 40 3f 00 | @? | ANDI.W #0x3f00,D0 00021bca e0 48 | H | LSR.W #0x8,D0 00021bcc 10 80 | | MOVE.B D0,(A0) 00021bce 30 07 |0 | MOVE.W D7,D0 00021bd0 02 40 00 ff | @ | ANDI.W #0x00ff,D0 00021bd4 11 40 00 01 | @ | MOVE.B D0,(A0+0x1) 00021bd8 4c df 01 c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0 00021bdc 4e 5e |N^ | UNLK A6 00021bde 4e 75 |Nu | RTS 00021be0 ; -------------------------------------------------------------------------------------- 00021be0 ; OMSI PASCAL Function 00021be0 ; <LVAR 0x008 4(r)> 00021be0 ; -------------------------------------------------------------------------------------- 00021be0 4e 56 ff b6 |NV | LINK.W A6,#0xffb6 00021be4 bf d5 | | CMPA.L (A5),A7 00021be6 62 06 |b | BHI 0x21bee 00021be8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021bec 4e 76 |Nv | TRAPV 00021bee de fc 00 4a | J | ADDA.W #0x4a,A7 00021bf2 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00021bf6 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00021bfa 45 f9 00 02 24 ee |E $ | LEA.L 0x224ee,A2 00021c00 72 01 |r | MOVEQ.L #0x01,D1 00021c02 4a 91 |J | TST.L (A1) 00021c04 6d 0e |m | BLT 0x21c14 00021c06 20 11 | | MOVE.L (A1),D0 00021c08 b0 92 | | CMP.L (A2),D0 00021c0a 6e 08 |n | BGT 0x21c14 00021c0c 23 d1 00 02 35 16 |# 5 | MOVE.L (A1),0x23516 00021c12 60 54 |`T | BRA 0x21c68 00021c14 42 39 00 02 35 1e |B9 5 | CLR.B 0x2351e 00021c1a 41 fa e9 7c |A | | LEA.L 0x20598,A0 00021c1e 70 05 |p | MOVEQ.L #0x05,D0 00021c20 2f 20 |/ | MOVE.L -(A0),-(A7) 00021c22 51 c8 ff fc |Q | DBF D0,0x21c20 00021c26 3f 3a e9 70 |?: p | MOVE.W 0x20598,-(A7) 00021c2a 51 4f |QO | SUBQ.L #0x8,A7 00021c2c 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00021c30 3f 01 |? | MOVE.W D1,-(A7) 00021c32 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00021c36 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021c3c 2e 92 |. | MOVE.L (A2),(A7) 00021c3e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021c44 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00021c48 3f 01 |? | MOVE.W D1,-(A7) 00021c4a 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00021c4e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021c54 50 4f |PO | ADDQ.L #0x8,A7 00021c56 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00021c5c de fc 00 0c | | ADDA.W #0xc,A7 00021c60 4e ba ef 80 |N | JSR 0x20be2 00021c64 de fc 00 1e | | ADDA.W #0x1e,A7 00021c68 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00021c6c 4e 5e |N^ | UNLK A6 00021c6e 4e 75 |Nu | RTS 00021c70 ; -------------------------------------------------------------------------------------- 00021c70 ; OMSI PASCAL Function 00021c70 ; <LVAR 0x00e 1(r)> 00021c70 ; <LVAR 0x00d 1(r)> 00021c70 ; <LVAR 0x00c 1(r)> 00021c70 ; <LVAR 0x008 4(r)> 00021c70 ; <LVAR -0x003 1(r)> 00021c70 ; <LVAR -0x004 1(r) 2(w)> 00021c70 ; -------------------------------------------------------------------------------------- 00021c70 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00021c74 bf d5 | | CMPA.L (A5),A7 00021c76 62 06 |b | BHI 0x21c7e 00021c78 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021c7c 4e 76 |Nv | TRAPV 00021c7e de fc 00 30 | 0 | ADDA.W #0x30,A7 00021c82 48 e7 e1 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D2+D1+D0,-(A7) 00021c86 43 ee ff fc |C | LEA.L (A6-0x4),A1 00021c8a 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00021c8e 47 f9 00 02 35 16 |G 5 | LEA.L 0x23516,A3 00021c94 49 f9 00 02 24 e6 |I $ | LEA.L 0x224e6,A4 00021c9a 74 3f |t? | MOVEQ.L #0x3f,D2 00021c9c 20 52 | R | MOVEA.L (A2),A0 00021c9e 20 bc ff ff ff ff | | MOVE.L #0xffffffff,(A0) 00021ca4 4a 2e 00 0e |J. | TST.B (A6+0xe) 00021ca8 67 4e |gN | BEQ 0x21cf8 00021caa 20 13 | | MOVE.L (A3),D0 00021cac 52 80 |R | ADDQ.L #0x1,D0 00021cae 2f 39 00 02 24 ee |/9 $ | MOVE.L 0x224ee,-(A7) 00021cb4 2e 00 |. | MOVE.L D0,D7 00021cb6 be 97 | | CMP.L (A7),D7 00021cb8 6e 3a |n: | BGT 0x21cf4 00021cba 0c 87 00 00 07 ff | | CMPI.L #0x000007ff,D7 00021cc0 63 02 |c | BLS 0x21cc4 00021cc2 4e 4f |NO | TRAP #15 00021cc4 20 07 | | MOVE.L D7,D0 00021cc6 e3 80 | | ASL.L #0x1,D0 00021cc8 20 4c | L | MOVEA.L A4,A0 00021cca 32 b0 08 0c |2 | MOVE.W (A0+D0.L+#0xc),(A1) 00021cce 42 80 |B | CLR.L D0 00021cd0 10 11 | | MOVE.B (A1),D0 00021cd2 c0 42 | B | AND.W D2,D0 00021cd4 42 81 |B | CLR.L D1 00021cd6 12 2e 00 0c | . | MOVE.B (A6+0xc),D1 00021cda b2 40 | @ | CMP.W D0,D1 00021cdc 66 12 |f | BNE 0x21cf0 00021cde 10 2e 00 0d | . | MOVE.B (A6+0xd),D0 00021ce2 b0 2e ff fd | . | CMP.B (A6-0x3),D0 00021ce6 66 08 |f | BNE 0x21cf0 00021ce8 20 52 | R | MOVEA.L (A2),A0 00021cea 20 87 | | MOVE.L D7,(A0) 00021cec 58 4f |XO | ADDQ.L #0x4,A7 00021cee 60 4a |`J | BRA 0x21d3a 00021cf0 52 87 |R | ADDQ.L #0x1,D7 00021cf2 68 c2 |h | BVC 0x21cb6 00021cf4 58 4f |XO | ADDQ.L #0x4,A7 00021cf6 60 42 |`B | BRA 0x21d3a 00021cf8 20 13 | | MOVE.L (A3),D0 00021cfa 53 80 |S | SUBQ.L #0x1,D0 00021cfc 2e 00 |. | MOVE.L D0,D7 00021cfe 4a 87 |J | TST.L D7 00021d00 6d 38 |m8 | BLT 0x21d3a 00021d02 0c 87 00 00 07 ff | | CMPI.L #0x000007ff,D7 00021d08 63 02 |c | BLS 0x21d0c 00021d0a 4e 4f |NO | TRAP #15 00021d0c 20 07 | | MOVE.L D7,D0 00021d0e e3 80 | | ASL.L #0x1,D0 00021d10 20 4c | L | MOVEA.L A4,A0 00021d12 32 b0 08 0c |2 | MOVE.W (A0+D0.L+#0xc),(A1) 00021d16 42 80 |B | CLR.L D0 00021d18 10 11 | | MOVE.B (A1),D0 00021d1a c0 42 | B | AND.W D2,D0 00021d1c 42 81 |B | CLR.L D1 00021d1e 12 2e 00 0c | . | MOVE.B (A6+0xc),D1 00021d22 b2 40 | @ | CMP.W D0,D1 00021d24 66 10 |f | BNE 0x21d36 00021d26 10 2e 00 0d | . | MOVE.B (A6+0xd),D0 00021d2a b0 2e ff fd | . | CMP.B (A6-0x3),D0 00021d2e 66 06 |f | BNE 0x21d36 00021d30 20 52 | R | MOVEA.L (A2),A0 00021d32 20 87 | | MOVE.L D7,(A0) 00021d34 60 04 |` | BRA 0x21d3a 00021d36 53 87 |S | SUBQ.L #0x1,D7 00021d38 68 c4 |h | BVC 0x21cfe 00021d3a 4c df 1f 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1+A2+A3+A4 00021d3e 4e 5e |N^ | UNLK A6 00021d40 4e 75 |Nu | RTS 00021d42 ; -------------------------------------------------------------------------------------- 00021d42 ; OMSI PASCAL Function 00021d42 ; -------------------------------------------------------------------------------------- 00021d42 4e 56 ff 3c |NV < | LINK.W A6,#0xff3c 00021d46 bf d5 | | CMPA.L (A5),A7 00021d48 62 06 |b | BHI 0x21d50 00021d4a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021d4e 4e 76 |Nv | TRAPV 00021d50 de fc 00 c4 | | ADDA.W #0xc4,A7 00021d54 48 e7 fe f8 |H | MOVEM.L A4+A3+A2+A1+A0+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021d58 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021d5e 47 f8 00 2d |G - | LEA.L 0x2d,A3 00021d62 49 fa ea c6 |I | LEA.L 0x2082a,A4 00021d66 72 01 |r | MOVEQ.L #0x01,D1 00021d68 74 23 |t# | MOVEQ.L #0x23,D2 00021d6a 76 24 |v$ | MOVEQ.L #0x24,D3 00021d6c 78 4c |xL | MOVEQ.L #0x4c,D4 00021d6e 7a 14 |z | MOVEQ.L #0x14,D5 00021d70 7c 18 || | MOVEQ.L #0x18,D6 00021d72 41 fa e8 38 |A 8 | LEA.L 0x205ac,A0 00021d76 70 08 |p | MOVEQ.L #0x08,D0 00021d78 3f 20 |? | MOVE.W -(A0),-(A7) 00021d7a 51 c8 ff fc |Q | DBF D0,0x21d78 00021d7e 9e fc 00 0e | | SUBA.W #0xe,A7 00021d82 20 4f | O | MOVEA.L A7,A0 00021d84 43 fa e8 26 |C & | LEA.L 0x205ac,A1 00021d88 70 0c |p | MOVEQ.L #0x0c,D0 00021d8a 10 d9 | | MOVE.B (A1)+,(A0)+ 00021d8c 51 c8 ff fc |Q | DBF D0,0x21d8a 00021d90 51 4f |QO | SUBQ.L #0x8,A7 00021d92 4e ba ec 66 |N f | JSR 0x209fa 00021d96 59 4f |YO | SUBQ.L #0x4,A7 00021d98 48 78 00 01 |Hx | PEA.L 0x1 00021d9c 48 53 |HS | PEA.L (A3) 00021d9e 4e 94 |N | JSR (A4) 00021da0 58 4f |XO | ADDQ.L #0x4,A7 00021da2 48 6f 00 1e |Ho | PEA.L (A7+0x1e) 00021da6 3f 01 |? | MOVE.W D1,-(A7) 00021da8 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00021dac 4e 92 |N | JSR (A2) 00021dae 2e b9 00 02 24 ee |. $ | MOVE.L 0x224ee,(A7) 00021db4 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021dba 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00021dbe 3f 01 |? | MOVE.W D1,-(A7) 00021dc0 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 00021dc4 4e 92 |N | JSR (A2) 00021dc6 50 4f |PO | ADDQ.L #0x8,A7 00021dc8 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 00021dce de c5 | | ADDA.W D5,A7 00021dd0 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021dd6 20 4f | O | MOVEA.L A7,A0 00021dd8 43 fa e7 e0 |C | LEA.L 0x205ba,A1 00021ddc 70 22 |p" | MOVEQ.L #0x22,D0 00021dde 10 d9 | | MOVE.B (A1)+,(A0)+ 00021de0 51 c8 ff fc |Q | DBF D0,0x21dde 00021de4 9e c3 | | SUBA.W D3,A7 00021de6 20 4f | O | MOVEA.L A7,A0 00021de8 43 fa e7 f4 |C | LEA.L 0x205de,A1 00021dec 70 22 |p" | MOVEQ.L #0x22,D0 00021dee 10 d9 | | MOVE.B (A1)+,(A0)+ 00021df0 51 c8 ff fc |Q | DBF D0,0x21dee 00021df4 9e c3 | | SUBA.W D3,A7 00021df6 20 4f | O | MOVEA.L A7,A0 00021df8 43 fa e8 08 |C | LEA.L 0x20602,A1 00021dfc 70 22 |p" | MOVEQ.L #0x22,D0 00021dfe 10 d9 | | MOVE.B (A1)+,(A0)+ 00021e00 51 c8 ff fc |Q | DBF D0,0x21dfe 00021e04 51 4f |QO | SUBQ.L #0x8,A7 00021e06 48 78 00 02 |Hx | PEA.L 0x2 00021e0a 48 53 |HS | PEA.L (A3) 00021e0c 4e 94 |N | JSR (A4) 00021e0e 58 4f |XO | ADDQ.L #0x4,A7 00021e10 48 6f 00 54 |Ho T | PEA.L (A7+0x54) 00021e14 3f 01 |? | MOVE.W D1,-(A7) 00021e16 3f 02 |? | MOVE.W D2,-(A7) 00021e18 4e 92 |N | JSR (A2) 00021e1a 58 4f |XO | ADDQ.L #0x4,A7 00021e1c 48 78 00 03 |Hx | PEA.L 0x3 00021e20 48 53 |HS | PEA.L (A3) 00021e22 4e 94 |N | JSR (A4) 00021e24 58 4f |XO | ADDQ.L #0x4,A7 00021e26 48 6f 00 38 |Ho 8 | PEA.L (A7+0x38) 00021e2a 3f 01 |? | MOVE.W D1,-(A7) 00021e2c 3f 02 |? | MOVE.W D2,-(A7) 00021e2e 4e 92 |N | JSR (A2) 00021e30 58 4f |XO | ADDQ.L #0x4,A7 00021e32 48 78 00 04 |Hx | PEA.L 0x4 00021e36 48 53 |HS | PEA.L (A3) 00021e38 4e 94 |N | JSR (A4) 00021e3a 58 4f |XO | ADDQ.L #0x4,A7 00021e3c 48 6f 00 1c |Ho | PEA.L (A7+0x1c) 00021e40 3f 01 |? | MOVE.W D1,-(A7) 00021e42 3f 02 |? | MOVE.W D2,-(A7) 00021e44 4e 92 |N | JSR (A2) 00021e46 50 4f |PO | ADDQ.L #0x8,A7 00021e48 4e b9 00 01 02 e0 |N | JSR StringCat6(a, b, c, d, e, f : String) : String 00021e4e de c6 | | ADDA.W D6,A7 00021e50 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021e56 de c4 | | ADDA.W D4,A7 00021e58 20 4f | O | MOVEA.L A7,A0 00021e5a 43 fa e7 ca |C | LEA.L 0x20626,A1 00021e5e 70 22 |p" | MOVEQ.L #0x22,D0 00021e60 10 d9 | | MOVE.B (A1)+,(A0)+ 00021e62 51 c8 ff fc |Q | DBF D0,0x21e60 00021e66 9e c3 | | SUBA.W D3,A7 00021e68 20 4f | O | MOVEA.L A7,A0 00021e6a 43 fa e7 de |C | LEA.L 0x2064a,A1 00021e6e 70 22 |p" | MOVEQ.L #0x22,D0 00021e70 10 d9 | | MOVE.B (A1)+,(A0)+ 00021e72 51 c8 ff fc |Q | DBF D0,0x21e70 00021e76 9e c3 | | SUBA.W D3,A7 00021e78 20 4f | O | MOVEA.L A7,A0 00021e7a 43 fa e7 f2 |C | LEA.L 0x2066e,A1 00021e7e 70 22 |p" | MOVEQ.L #0x22,D0 00021e80 10 d9 | | MOVE.B (A1)+,(A0)+ 00021e82 51 c8 ff fc |Q | DBF D0,0x21e80 00021e86 51 4f |QO | SUBQ.L #0x8,A7 00021e88 48 78 00 05 |Hx | PEA.L 0x5 00021e8c 48 53 |HS | PEA.L (A3) 00021e8e 4e 94 |N | JSR (A4) 00021e90 58 4f |XO | ADDQ.L #0x4,A7 00021e92 48 6f 00 54 |Ho T | PEA.L (A7+0x54) 00021e96 3f 01 |? | MOVE.W D1,-(A7) 00021e98 3f 02 |? | MOVE.W D2,-(A7) 00021e9a 4e 92 |N | JSR (A2) 00021e9c 58 4f |XO | ADDQ.L #0x4,A7 00021e9e 48 78 00 06 |Hx | PEA.L 0x6 00021ea2 48 53 |HS | PEA.L (A3) 00021ea4 4e 94 |N | JSR (A4) 00021ea6 58 4f |XO | ADDQ.L #0x4,A7 00021ea8 48 6f 00 38 |Ho 8 | PEA.L (A7+0x38) 00021eac 3f 01 |? | MOVE.W D1,-(A7) 00021eae 3f 02 |? | MOVE.W D2,-(A7) 00021eb0 4e 92 |N | JSR (A2) 00021eb2 58 4f |XO | ADDQ.L #0x4,A7 00021eb4 48 78 00 07 |Hx | PEA.L 0x7 00021eb8 48 53 |HS | PEA.L (A3) 00021eba 4e 94 |N | JSR (A4) 00021ebc 58 4f |XO | ADDQ.L #0x4,A7 00021ebe 48 6f 00 1c |Ho | PEA.L (A7+0x1c) 00021ec2 3f 01 |? | MOVE.W D1,-(A7) 00021ec4 3f 02 |? | MOVE.W D2,-(A7) 00021ec6 4e 92 |N | JSR (A2) 00021ec8 50 4f |PO | ADDQ.L #0x8,A7 00021eca 4e b9 00 01 02 e0 |N | JSR StringCat6(a, b, c, d, e, f : String) : String 00021ed0 de c6 | | ADDA.W D6,A7 00021ed2 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021ed8 de c4 | | ADDA.W D4,A7 00021eda 20 4f | O | MOVEA.L A7,A0 00021edc 43 fa e7 b4 |C | LEA.L 0x20692,A1 00021ee0 70 22 |p" | MOVEQ.L #0x22,D0 00021ee2 10 d9 | | MOVE.B (A1)+,(A0)+ 00021ee4 51 c8 ff fc |Q | DBF D0,0x21ee2 00021ee8 9e c3 | | SUBA.W D3,A7 00021eea 20 4f | O | MOVEA.L A7,A0 00021eec 43 fa e7 c8 |C | LEA.L 0x206b6,A1 00021ef0 70 22 |p" | MOVEQ.L #0x22,D0 00021ef2 10 d9 | | MOVE.B (A1)+,(A0)+ 00021ef4 51 c8 ff fc |Q | DBF D0,0x21ef2 00021ef8 51 4f |QO | SUBQ.L #0x8,A7 00021efa 48 78 00 08 |Hx | PEA.L 0x8 00021efe 48 53 |HS | PEA.L (A3) 00021f00 4e 94 |N | JSR (A4) 00021f02 58 4f |XO | ADDQ.L #0x4,A7 00021f04 48 6f 00 30 |Ho 0 | PEA.L (A7+0x30) 00021f08 3f 01 |? | MOVE.W D1,-(A7) 00021f0a 3f 02 |? | MOVE.W D2,-(A7) 00021f0c 4e 92 |N | JSR (A2) 00021f0e 58 4f |XO | ADDQ.L #0x4,A7 00021f10 48 78 00 09 |Hx | PEA.L 0x9 00021f14 48 53 |HS | PEA.L (A3) 00021f16 4e 94 |N | JSR (A4) 00021f18 58 4f |XO | ADDQ.L #0x4,A7 00021f1a 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00021f1e 3f 01 |? | MOVE.W D1,-(A7) 00021f20 3f 02 |? | MOVE.W D2,-(A7) 00021f22 4e 92 |N | JSR (A2) 00021f24 50 4f |PO | ADDQ.L #0x8,A7 00021f26 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00021f2c de fc 00 10 | | ADDA.W #0x10,A7 00021f30 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021f36 de fc 00 28 | ( | ADDA.W #0x28,A7 00021f3a 20 4f | O | MOVEA.L A7,A0 00021f3c 43 fa e7 9c |C | LEA.L 0x206da,A1 00021f40 70 22 |p" | MOVEQ.L #0x22,D0 00021f42 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f44 51 c8 ff fc |Q | DBF D0,0x21f42 00021f48 9e c3 | | SUBA.W D3,A7 00021f4a 20 4f | O | MOVEA.L A7,A0 00021f4c 43 fa e7 b0 |C | LEA.L 0x206fe,A1 00021f50 70 22 |p" | MOVEQ.L #0x22,D0 00021f52 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f54 51 c8 ff fc |Q | DBF D0,0x21f52 00021f58 51 4f |QO | SUBQ.L #0x8,A7 00021f5a 48 78 00 0a |Hx | PEA.L 0xa 00021f5e 48 53 |HS | PEA.L (A3) 00021f60 4e 94 |N | JSR (A4) 00021f62 58 4f |XO | ADDQ.L #0x4,A7 00021f64 48 6f 00 30 |Ho 0 | PEA.L (A7+0x30) 00021f68 3f 01 |? | MOVE.W D1,-(A7) 00021f6a 3f 02 |? | MOVE.W D2,-(A7) 00021f6c 4e 92 |N | JSR (A2) 00021f6e 58 4f |XO | ADDQ.L #0x4,A7 00021f70 48 78 00 0b |Hx | PEA.L 0xb 00021f74 48 53 |HS | PEA.L (A3) 00021f76 4e 94 |N | JSR (A4) 00021f78 58 4f |XO | ADDQ.L #0x4,A7 00021f7a 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00021f7e 3f 01 |? | MOVE.W D1,-(A7) 00021f80 3f 02 |? | MOVE.W D2,-(A7) 00021f82 4e 92 |N | JSR (A2) 00021f84 58 4f |XO | ADDQ.L #0x4,A7 00021f86 4e ba ea c0 |N | JSR 0x20a48 00021f8a 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 00021f90 de c5 | | ADDA.W D5,A7 00021f92 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021f98 de c4 | | ADDA.W D4,A7 00021f9a 42 39 00 02 35 1e |B9 5 | CLR.B 0x2351e 00021fa0 4c df 1f 7f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+A0+A1+A2+A3+A4 00021fa4 4e 5e |N^ | UNLK A6 00021fa6 4e 75 |Nu | RTS 00021fa8 ; -------------------------------------------------------------------------------------- 00021fa8 ; OMSI PASCAL Function 00021fa8 ; -------------------------------------------------------------------------------------- 00021fa8 START: 00021fa8 4f fa 00 08 |O | LEA.L MAIN,A7 00021fac 4e f9 00 01 02 80 |N | JMP ?start_program 00021fb2 MAIN: 00021fb2 45 f9 00 02 35 1e |E 5 | LEA.L 0x2351e,A2 00021fb8 47 f9 00 02 35 2a |G 5* | LEA.L 0x2352a,A3 00021fbe 49 f9 00 02 35 16 |I 5 | LEA.L 0x23516,A4 00021fc4 72 01 |r | MOVEQ.L #0x01,D1 00021fc6 74 0a |t | MOVEQ.L #0x0a,D2 00021fc8 76 09 |v | MOVEQ.L #0x09,D3 00021fca 78 16 |x | MOVEQ.L #0x16,D4 00021fcc 7a 0c |z | MOVEQ.L #0x0c,D5 00021fce 7c 1c || | MOVEQ.L #0x1c,D6 00021fd0 7e 0e |~ | MOVEQ.L #0x0e,D7 00021fd2 4e b9 00 01 03 98 |N | JSR FSCALL_10398 00021fd8 48 78 00 00 |Hx | PEA.L 0x0 00021fdc 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 00021fe2 58 4f |XO | ADDQ.L #0x4,A7 00021fe4 4e ba ef c8 |N | JSR 0x20fae 00021fe8 42 13 |B | CLR.B (A3) 00021fea 28 b9 00 02 35 1a |( 5 | MOVE.L 0x2351a,(A4) 00021ff0 14 81 | | MOVE.B D1,(A2) 00021ff2 4a 12 |J | TST.B (A2) 00021ff4 67 34 |g4 | BEQ 0x2202a 00021ff6 2f 14 |/ | MOVE.L (A4),-(A7) 00021ff8 1f 13 | | MOVE.B (A3),-(A7) 00021ffa 4e ba f7 04 |N | JSR 0x21700 00021ffe 5d 4f |]O | SUBQ.L #0x6,A7 00022000 20 4f | O | MOVEA.L A7,A0 00022002 43 fa e7 3e |C > | LEA.L 0x20742,A1 00022006 70 0a |p | MOVEQ.L #0x0a,D0 00022008 10 d9 | | MOVE.B (A1)+,(A0)+ 0002200a 51 c8 ff fc |Q | DBF D0,0x22008 0002200e 59 4f |YO | SUBQ.L #0x4,A7 00022010 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022014 3f 01 |? | MOVE.W D1,-(A7) 00022016 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 0002201a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022020 50 4f |PO | ADDQ.L #0x8,A7 00022022 4e ba eb be |N | JSR 0x20be2 00022026 de fc 00 10 | | ADDA.W #0x10,A7 0002202a 14 81 | | MOVE.B D1,(A2) 0002202c 48 79 00 02 35 20 |Hy 5 | PEA.L 0x23520 00022032 4e ba fa 2c |N , | JSR 0x21a60 00022036 58 4f |XO | ADDQ.L #0x4,A7 00022038 42 80 |B | CLR.L D0 0002203a 10 39 00 02 35 20 | 9 5 | MOVE.B 0x23520,D0 00022040 04 40 00 3f | @ ? | SUBI.W #0x003f,D0 00022044 0c 40 00 1b | @ | CMPI.W #0x001b,D0 00022048 62 00 02 0c |b | BHI switch@0x2204e[0x1] 0002204c d0 40 | @ | ADD.W D0,D0 0002204e 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00022056 00 38 | 8 | .CONST 0x38 ; [0x0] -> 0x2208e 00022058 02 00 | | .CONST 0x200 ; [0x1] -> 0x22256 0002205a 02 00 | | .CONST 0x200 ; [0x2] -> 0x22256 0002205c 00 42 | B | .CONST 0x42 ; [0x3] -> 0x22098 0002205e 02 00 | | .CONST 0x200 ; [0x4] -> 0x22256 00022060 02 00 | | .CONST 0x200 ; [0x5] -> 0x22256 00022062 02 00 | | .CONST 0x200 ; [0x6] -> 0x22256 00022064 00 52 | R | .CONST 0x52 ; [0x7] -> 0x220a8 00022066 02 00 | | .CONST 0x200 ; [0x8] -> 0x22256 00022068 02 00 | | .CONST 0x200 ; [0x9] -> 0x22256 0002206a 02 00 | | .CONST 0x200 ; [0xa] -> 0x22256 0002206c 02 00 | | .CONST 0x200 ; [0xb] -> 0x22256 0002206e 02 00 | | .CONST 0x200 ; [0xc] -> 0x22256 00022070 00 d4 | | .CONST 0xd4 ; [0xd] -> 0x2212a 00022072 02 00 | | .CONST 0x200 ; [0xe] -> 0x22256 00022074 00 e2 | | .CONST 0xe2 ; [0xf] -> 0x22138 00022076 00 ea | | .CONST 0xea ; [0x10] -> 0x22140 00022078 01 1e | | .CONST 0x11e ; [0x11] -> 0x22174 0002207a 02 00 | | .CONST 0x200 ; [0x12] -> 0x22256 0002207c 01 26 | & | .CONST 0x126 ; [0x13] -> 0x2217c 0002207e 01 26 | & | .CONST 0x126 ; [0x14] -> 0x2217c 00022080 02 00 | | .CONST 0x200 ; [0x15] -> 0x22256 00022082 02 00 | | .CONST 0x200 ; [0x16] -> 0x22256 00022084 02 00 | | .CONST 0x200 ; [0x17] -> 0x22256 00022086 02 00 | | .CONST 0x200 ; [0x18] -> 0x22256 00022088 01 b4 | | .CONST 0x1b4 ; [0x19] -> 0x2220a 0002208a 02 00 | | .CONST 0x200 ; [0x1a] -> 0x22256 0002208c 01 f8 | | .CONST 0x1f8 ; [0x1b] -> 0x2224e 0002208e switch@0x2204e[0x0]: 0002208e 4e ba fc b2 |N | JSR 0x21d42 00022092 42 12 |B | CLR.B (A2) 00022094 60 00 01 e8 |` | BRA 0x2227e 00022098 switch@0x2204e[0x3]: 00022098 2f 39 00 02 24 ee |/9 $ | MOVE.L 0x224ee,-(A7) 0002209e 4e ba fb 40 |N @ | JSR 0x21be0 000220a2 58 4f |XO | ADDQ.L #0x4,A7 000220a4 60 00 01 d8 |` | BRA 0x2227e 000220a8 switch@0x2204e[0x7]: 000220a8 9e c2 | | SUBA.W D2,A7 000220aa 20 4f | O | MOVEA.L A7,A0 000220ac 43 fa e6 a0 |C | LEA.L 0x2074e,A1 000220b0 70 08 |p | MOVEQ.L #0x08,D0 000220b2 10 d9 | | MOVE.B (A1)+,(A0)+ 000220b4 51 c8 ff fc |Q | DBF D0,0x220b2 000220b8 51 4f |QO | SUBQ.L #0x8,A7 000220ba 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000220be 3f 01 |? | MOVE.W D1,-(A7) 000220c0 3f 03 |? | MOVE.W D3,-(A7) 000220c2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000220c8 50 4f |PO | ADDQ.L #0x8,A7 000220ca 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 000220d0 58 4f |XO | ADDQ.L #0x4,A7 000220d2 23 df 00 02 35 2c |# 5, | MOVE.L (A7)+,0x2352c 000220d8 9e c4 | | SUBA.W D4,A7 000220da 20 4f | O | MOVEA.L A7,A0 000220dc 43 fa e6 44 |C D | LEA.L 0x20722,A1 000220e0 70 1e |p | MOVEQ.L #0x1e,D0 000220e2 10 d9 | | MOVE.B (A1)+,(A0)+ 000220e4 51 c8 ff fc |Q | DBF D0,0x220e2 000220e8 51 4f |QO | SUBQ.L #0x8,A7 000220ea 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000220ee 3f 01 |? | MOVE.W D1,-(A7) 000220f0 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7) 000220f4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000220fa 50 4f |PO | ADDQ.L #0x8,A7 000220fc 48 78 00 01 |Hx | PEA.L 0x1 00022100 48 78 00 07 |Hx | PEA.L 0x7 00022104 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 0002210a de c5 | | ADDA.W D5,A7 0002210c 23 df 00 02 35 26 |# 5& | MOVE.L (A7)+,0x23526 00022112 de c6 | | ADDA.W D6,A7 00022114 2e b9 00 02 35 2c |. 5, | MOVE.L 0x2352c,(A7) 0002211a 2f 39 00 02 35 26 |/9 5& | MOVE.L 0x23526,-(A7) 00022120 4e ba f8 02 |N | JSR 0x21924 00022124 50 4f |PO | ADDQ.L #0x8,A7 00022126 60 00 ff 6a |` j | BRA 0x22092 0002212a switch@0x2204e[0xd]: 0002212a 44 13 |D | NEG.B (A3) 0002212c 52 13 |R | ADDQ.B #0x1,(A3) 0002212e 13 c1 00 02 35 1f | 5 | MOVE.B D1,0x2351f 00022134 60 00 01 48 |` H | BRA 0x2227e 00022138 switch@0x2204e[0xf]: 00022138 2f 14 |/ | MOVE.L (A4),-(A7) 0002213a 53 97 |S | SUBQ.L #0x1,(A7) 0002213c 60 00 ff 60 |` ` | BRA 0x2209e 00022140 switch@0x2204e[0x10]: 00022140 9e c2 | | SUBA.W D2,A7 00022142 20 4f | O | MOVEA.L A7,A0 00022144 43 fa e6 12 |C | LEA.L 0x20758,A1 00022148 70 08 |p | MOVEQ.L #0x08,D0 0002214a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002214c 51 c8 ff fc |Q | DBF D0,0x2214a 00022150 51 4f |QO | SUBQ.L #0x8,A7 00022152 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022156 3f 01 |? | MOVE.W D1,-(A7) 00022158 3f 03 |? | MOVE.W D3,-(A7) 0002215a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022160 50 4f |PO | ADDQ.L #0x8,A7 00022162 4e b9 00 01 03 e8 |N | JSR AskOnConsoleInt(prompt: String) : Long 00022168 58 4f |XO | ADDQ.L #0x4,A7 0002216a 4e ba fa 74 |N t | JSR 0x21be0 0002216e de c7 | | ADDA.W D7,A7 00022170 60 00 01 0c |` | BRA 0x2227e 00022174 switch@0x2204e[0x11]: 00022174 2f 14 |/ | MOVE.L (A4),-(A7) 00022176 52 97 |R | ADDQ.L #0x1,(A7) 00022178 60 00 ff 24 |` $ | BRA 0x2209e 0002217c switch@0x2204e[0x13]: 0002217c switch@0x2204e[0x14]: 0002217c 41 fa e5 f2 |A | LEA.L 0x20770,A0 00022180 70 06 |p | MOVEQ.L #0x06,D0 00022182 3f 20 |? | MOVE.W -(A0),-(A7) 00022184 51 c8 ff fc |Q | DBF D0,0x22182 00022188 59 4f |YO | SUBQ.L #0x4,A7 0002218a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002218e 3f 01 |? | MOVE.W D1,-(A7) 00022190 3f 07 |? | MOVE.W D7,-(A7) 00022192 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022198 50 4f |PO | ADDQ.L #0x8,A7 0002219a 48 79 00 02 35 30 |Hy 50 | PEA.L 0x23530 000221a0 4e ba f9 74 |N t | JSR 0x21b16 000221a4 de fc 00 14 | | ADDA.W #0x14,A7 000221a8 42 17 |B | CLR.B (A7) 000221aa 10 39 00 02 35 20 | 9 5 | MOVE.B 0x23520,D0 000221b0 0c 00 00 53 | S | CMPI.B #0x53,D0 000221b4 66 02 |f | BNE 0x221b8 000221b6 52 17 |R | ADDQ.B #0x1,(A7) 000221b8 3f 39 00 02 35 30 |?9 50 | MOVE.W 0x23530,-(A7) 000221be 48 79 00 02 35 22 |Hy 5" | PEA.L 0x23522 000221c4 4e ba fa aa |N | JSR 0x21c70 000221c8 50 4f |PO | ADDQ.L #0x8,A7 000221ca 4a b9 00 02 35 22 |J 5" | TST.L 0x23522 000221d0 6d 0e |m | BLT 0x221e0 000221d2 2f 39 00 02 35 22 |/9 5" | MOVE.L 0x23522,-(A7) 000221d8 4e ba fa 06 |N | JSR 0x21be0 000221dc 58 4f |XO | ADDQ.L #0x4,A7 000221de 60 28 |`( | BRA 0x22208 000221e0 41 fa e5 a4 |A | LEA.L 0x20786,A0 000221e4 70 0a |p | MOVEQ.L #0x0a,D0 000221e6 3f 20 |? | MOVE.W -(A0),-(A7) 000221e8 51 c8 ff fc |Q | DBF D0,0x221e6 000221ec 59 4f |YO | SUBQ.L #0x4,A7 000221ee 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000221f2 3f 01 |? | MOVE.W D1,-(A7) 000221f4 3f 04 |? | MOVE.W D4,-(A7) 000221f6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000221fc 50 4f |PO | ADDQ.L #0x8,A7 000221fe 4e ba e9 e2 |N | JSR 0x20be2 00022202 de fc 00 1a | | ADDA.W #0x1a,A7 00022206 42 12 |B | CLR.B (A2) 00022208 60 74 |`t | BRA 0x2227e 0002220a switch@0x2204e[0x19]: 0002220a 51 4f |QO | SUBQ.L #0x8,A7 0002220c 48 78 00 01 |Hx | PEA.L 0x1 00022210 2f 39 00 02 35 12 |/9 5 | MOVE.L 0x23512,-(A7) 00022216 4e ba e6 94 |N | JSR 0x208ac 0002221a 58 4f |XO | ADDQ.L #0x4,A7 0002221c 48 78 00 01 |Hx | PEA.L 0x1 00022220 48 78 00 01 |Hx | PEA.L 0x1 00022224 4e ba e6 04 |N | JSR 0x2082a 00022228 58 4f |XO | ADDQ.L #0x4,A7 0002222a 4e ba e7 88 |N | JSR 0x209b4 0002222e 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00022234 de c5 | | ADDA.W D5,A7 00022236 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 0002223c 54 4f |TO | ADDQ.L #0x2,A7 0002223e 42 17 |B | CLR.B (A7) 00022240 48 78 00 01 |Hx | PEA.L 0x1 00022244 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002224a 5c 4f |\O | ADDQ.L #0x6,A7 0002224c 60 30 |`0 | BRA 0x2227e 0002224e switch@0x2204e[0x1b]: 0002224e 48 78 00 00 |Hx | PEA.L 0x0 00022252 60 00 fe 4a |` J | BRA 0x2209e 00022256 switch@0x2204e[0x12]: 00022256 switch@0x2204e[0x15]: 00022256 switch@0x2204e[0x16]: 00022256 switch@0x2204e[0x17]: 00022256 switch@0x2204e[0x18]: 00022256 switch@0x2204e[0x1]: 00022256 switch@0x2204e[0x1a]: 00022256 switch@0x2204e[0x2]: 00022256 switch@0x2204e[0x4]: 00022256 switch@0x2204e[0x5]: 00022256 switch@0x2204e[0x6]: 00022256 switch@0x2204e[0x8]: 00022256 switch@0x2204e[0x9]: 00022256 switch@0x2204e[0xa]: 00022256 switch@0x2204e[0xb]: 00022256 switch@0x2204e[0xc]: 00022256 switch@0x2204e[0xe]: 00022256 42 12 |B | CLR.B (A2) 00022258 41 fa e5 48 |A H | LEA.L 0x207a2,A0 0002225c 70 06 |p | MOVEQ.L #0x06,D0 0002225e 2f 20 |/ | MOVE.L -(A0),-(A7) 00022260 51 c8 ff fc |Q | DBF D0,0x2225e 00022264 59 4f |YO | SUBQ.L #0x4,A7 00022266 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002226a 3f 01 |? | MOVE.W D1,-(A7) 0002226c 3f 06 |? | MOVE.W D6,-(A7) 0002226e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022274 50 4f |PO | ADDQ.L #0x8,A7 00022276 4e ba e9 6a |N j | JSR 0x20be2 0002227a de fc 00 20 | | ADDA.W #0x20,A7 0002227e 60 00 fd 72 |` r | BRA 0x21ff2 00022282 4e b9 00 01 02 84 |N | .XXX[0x6] 00022288 exp_READ_TRACE_BLOCK.IOC(&Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8, &Sr_8): 00022288 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002228e 00 48 | H | .CONST 0x0048 ; Stack-delta 00022290 14 52 45 41 44 5f 54 52 | READ_TR| .TXT 20,'READ_TRACE_BLOCK.IOC' 000222a5 00 | | .CONST 0x0 000222a6 04 | | .CONST 0x4 ; DIPROC address 000222a7 10 | | .CONST 0x10 ; Output Parameters 000222a8 00 | | .CONST 0x0 ; Input Parameters 000222a9 07 | | .CONST 0x7 ; Out arg [8] 000222aa 07 | | .CONST 0x7 ; Out arg [8] 000222ab 07 | | .CONST 0x7 ; Out arg [8] 000222ac 07 | | .CONST 0x7 ; Out arg [8] 000222ad 07 | | .CONST 0x7 ; Out arg [8] 000222ae 07 | | .CONST 0x7 ; Out arg [8] 000222af 07 | | .CONST 0x7 ; Out arg [8] 000222b0 07 | | .CONST 0x7 ; Out arg [8] 000222b1 07 | | .CONST 0x7 ; Out arg [8] 000222b2 07 | | .CONST 0x7 ; Out arg [8] 000222b3 07 | | .CONST 0x7 ; Out arg [8] 000222b4 07 | | .CONST 0x7 ; Out arg [8] 000222b5 07 | | .CONST 0x7 ; Out arg [8] 000222b6 07 | | .CONST 0x7 ; Out arg [8] 000222b7 07 | | .CONST 0x7 ; Out arg [8] 000222b8 07 | | .CONST 0x7 ; Out arg [8] 000222b9 00 | | .PAD 0x0 000222ba exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1): 000222ba 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000222c0 00 0c | | .CONST 0x000c ; Stack-delta 000222c2 16 4c 4f 41 44 5f 54 52 | LOAD_TR| .TXT 22,'LOAD_TRACE_ADDRESS.IOC' 000222d9 00 | | .CONST 0x0 000222da 04 | | .CONST 0x4 ; DIPROC address 000222db 00 | | .CONST 0x0 ; Output Parameters 000222dc 02 | | .CONST 0x2 ; Input Parameters 000222dd 01 | | .CONST 0x1 ; In arg [2] 000222de 00 | | .CONST 0x0 ; In arg [1] 000222df 00 | | .PAD 0x0 000222e0 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 000222ee ; -------------------------------------------------------------------------------------- 000222ee ; OMSI PASCAL Function 000222ee ; <LVAR 0x008 1(r)> 000222ee ; -------------------------------------------------------------------------------------- 000222ee PROG_FAIL: 000222ee 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 000222f2 bf d5 | | CMPA.L (A5),A7 000222f4 62 06 |b | BHI 0x222fc 000222f6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000222fa 4e 76 |Nv | TRAPV 000222fc de fc 00 2c | , | ADDA.W #0x2c,A7 00022300 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00022304 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 00022308 70 06 |p | MOVEQ.L #0x06,D0 0002230a 3f 20 |? | MOVE.W -(A0),-(A7) 0002230c 51 c8 ff fc |Q | DBF D0,0x2230a 00022310 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00022314 51 4f |QO | SUBQ.L #0x8,A7 00022316 48 6f 00 0a |Ho | PEA.L (A7+0xa) 0002231a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002231e 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00022322 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022328 58 4f |XO | ADDQ.L #0x4,A7 0002232a 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 0002232e 48 80 |H | EXTB.W D0 00022330 48 c0 |H | EXTW.L D0 00022332 2f 00 |/ | MOVE.L D0,-(A7) 00022334 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002233a 58 4f |XO | ADDQ.L #0x4,A7 0002233c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022342 50 4f |PO | ADDQ.L #0x8,A7 00022344 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002234a de fc 00 14 | | ADDA.W #0x14,A7 0002234e 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00022352 4e 5e |N^ | UNLK A6 00022354 4e 75 |Nu | RTS 00022356 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 00022364 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00022372 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00022380 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00022392 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 000223aa ; -------------------------------------------------------------------------------------- 000223aa ; OMSI PASCAL Function 000223aa ; <LVAR 0x00e 1(r)> 000223aa ; <LVAR 0x00a 4(r)> 000223aa ; <LVAR 0x008 1(r)> 000223aa ; -------------------------------------------------------------------------------------- 000223aa EXP_FAIL: 000223aa 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 000223ae bf d5 | | CMPA.L (A5),A7 000223b0 62 06 |b | BHI 0x223b8 000223b2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000223b6 4e 76 |Nv | TRAPV 000223b8 de fc 00 74 | t | ADDA.W #0x74,A7 000223bc 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 000223c0 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 000223c6 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 000223cc 72 01 |r | MOVEQ.L #0x01,D1 000223ce 74 0d |t | MOVEQ.L #0x0d,D2 000223d0 76 1e |v | MOVEQ.L #0x1e,D3 000223d2 78 12 |x | MOVEQ.L #0x12,D4 000223d4 7a 0e |z | MOVEQ.L #0x0e,D5 000223d6 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000223dc 41 fa ff b4 |A | LEA.L 0x22392,A0 000223e0 70 08 |p | MOVEQ.L #0x08,D0 000223e2 3f 20 |? | MOVE.W -(A0),-(A7) 000223e4 51 c8 ff fc |Q | DBF D0,0x223e2 000223e8 59 4f |YO | SUBQ.L #0x4,A7 000223ea 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000223ee 3f 01 |? | MOVE.W D1,-(A7) 000223f0 3f 04 |? | MOVE.W D4,-(A7) 000223f2 4e 93 |N | JSR (A3) 000223f4 50 4f |PO | ADDQ.L #0x8,A7 000223f6 4e 94 |N | JSR (A4) 000223f8 50 4f |PO | ADDQ.L #0x8,A7 000223fa 20 4f | O | MOVEA.L A7,A0 000223fc 43 fa ff 58 |C X | LEA.L 0x22356,A1 00022400 70 0c |p | MOVEQ.L #0x0c,D0 00022402 10 d9 | | MOVE.B (A1)+,(A0)+ 00022404 51 c8 ff fc |Q | DBF D0,0x22402 00022408 51 4f |QO | SUBQ.L #0x8,A7 0002240a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002240e 3f 01 |? | MOVE.W D1,-(A7) 00022410 3f 02 |? | MOVE.W D2,-(A7) 00022412 4e 93 |N | JSR (A3) 00022414 54 4f |TO | ADDQ.L #0x2,A7 00022416 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 0002241a 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00022420 54 4f |TO | ADDQ.L #0x2,A7 00022422 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022428 50 4f |PO | ADDQ.L #0x8,A7 0002242a 4e 94 |N | JSR (A4) 0002242c de c4 | | ADDA.W D4,A7 0002242e 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00022432 b0 c1 | | CMPA.W D1,A0 00022434 67 48 |gH | BEQ 0x2247e 00022436 9e c5 | | SUBA.W D5,A7 00022438 22 4f |"O | MOVEA.L A7,A1 0002243a 45 fa ff 28 |E ( | LEA.L 0x22364,A2 0002243e 70 0c |p | MOVEQ.L #0x0c,D0 00022440 12 da | | MOVE.B (A2)+,(A1)+ 00022442 51 c8 ff fc |Q | DBF D0,0x22440 00022446 9e c3 | | SUBA.W D3,A7 00022448 22 4f |"O | MOVEA.L A7,A1 0002244a 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 0002244e 70 1d |p | MOVEQ.L #0x1d,D0 00022450 12 d8 | | MOVE.B (A0)+,(A1)+ 00022452 51 c8 ff fc |Q | DBF D0,0x22450 00022456 51 4f |QO | SUBQ.L #0x8,A7 00022458 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 0002245c 3f 01 |? | MOVE.W D1,-(A7) 0002245e 3f 02 |? | MOVE.W D2,-(A7) 00022460 4e 93 |N | JSR (A3) 00022462 58 4f |XO | ADDQ.L #0x4,A7 00022464 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00022468 3f 01 |? | MOVE.W D1,-(A7) 0002246a 3f 03 |? | MOVE.W D3,-(A7) 0002246c 4e 93 |N | JSR (A3) 0002246e 50 4f |PO | ADDQ.L #0x8,A7 00022470 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022476 50 4f |PO | ADDQ.L #0x8,A7 00022478 4e 94 |N | JSR (A4) 0002247a de fc 00 30 | 0 | ADDA.W #0x30,A7 0002247e 9e c5 | | SUBA.W D5,A7 00022480 20 4f | O | MOVEA.L A7,A0 00022482 43 fa fe ee |C | LEA.L 0x22372,A1 00022486 70 0c |p | MOVEQ.L #0x0c,D0 00022488 10 d9 | | MOVE.B (A1)+,(A0)+ 0002248a 51 c8 ff fc |Q | DBF D0,0x22488 0002248e 51 4f |QO | SUBQ.L #0x8,A7 00022490 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022494 3f 01 |? | MOVE.W D1,-(A7) 00022496 3f 02 |? | MOVE.W D2,-(A7) 00022498 4e 93 |N | JSR (A3) 0002249a 54 4f |TO | ADDQ.L #0x2,A7 0002249c 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 000224a0 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 000224a6 54 4f |TO | ADDQ.L #0x2,A7 000224a8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000224ae 50 4f |PO | ADDQ.L #0x8,A7 000224b0 4e 94 |N | JSR (A4) 000224b2 5d 4f |]O | SUBQ.L #0x6,A7 000224b4 20 4f | O | MOVEA.L A7,A0 000224b6 43 fa fe da |C | LEA.L 0x22392,A1 000224ba 70 16 |p | MOVEQ.L #0x16,D0 000224bc 10 d9 | | MOVE.B (A1)+,(A0)+ 000224be 51 c8 ff fc |Q | DBF D0,0x224bc 000224c2 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000224c6 59 4f |YO | SUBQ.L #0x4,A7 000224c8 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000224cc 3f 01 |? | MOVE.W D1,-(A7) 000224ce 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 000224d2 4e 93 |N | JSR (A3) 000224d4 50 4f |PO | ADDQ.L #0x8,A7 000224d6 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000224dc de c3 | | ADDA.W D3,A7 000224de 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 000224e2 4e 5e |N^ | UNLK A6 000224e4 4e 75 |Nu | RTS