|
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: M200_PROGRAM
Names: »TRACE.M200«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »TRACE.M200«
@ 207c2
<LVAR 0x008 4(r)>
<POP 207c2-2080a Body>
<POP 207c2-207d8 Prologue> Σ0 ↓
<POP 207d8-207ee Naked> Σ0 ↓ →0x20802
<MI 207d8 MOVEA.L (A6+0x8),A0> {}
<POP 207dc-207de StackAdj> Δ-2 {[-2-]}
<Call 0x207de 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 207e4 MOVE.B (A7)+,D0> Δ+2 {}
<MI 207e6 MOVE.B D0,(A0)> {}
<MI 207e8 CMPI.B #0x61,D0> {}
<MI 207ec BCS 0x20802> {}
<POP 207ee-207f4 Naked> Σ0 ↓ →0x20802
<MI 207ee CMPI.B #0x7a,D0> {}
<MI 207f2 BHI 0x20802> {}
<POP 207f4-20802 Naked> Σ0 ↓
<MI 207f4 CLR.L D1> {}
<MI 207f6 MOVE.B D0,D1> {}
<MI 207f8 SUBI.W #0x0020,D1> {}
<POP 0x207fc LimitCheck 0x0 ≤ D1 ≤ 0xff> {}
<MI 20800 MOVE.B D1,(A0)> {}
<POP 20802-2080a Epilogue> Σ0 ←0x207d8 ←0x207ee
@ 2080a
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2080a-2088c Body>
<POP 2080a-20820 Prologue> Σ0 ↓
<POP 20820-2082a RegCacheLoad> Σ0 ↓
<POP 2082a-20884 Naked> Σ0 ↓
<Blob 0x2082a [2] @> Δ-2 {[«2""»]}
<Blob 0x2082e [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x20832 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 20836-20838 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-8-]}
<Lit 0x20838 2> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ []}
<MI 20842 MOVE.L (A6+0xc),(A7)> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']}
<POP 20840-20842 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-8-]}
<Call 0x20846 0x102e4> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x2084c 2> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[$$; ]}
<MI 20856 MOVE.L (A6+0x8),(A7)> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']}
<POP 20854-20856 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-8-]}
<Call 0x2085a 0x102e4> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x20860 2> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-4-]|[$$H ]}
<Call 0x2086c 0x102dc> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-4-]|[$$H ]}
StringCat5(a, b, c, d, e : String) : String
<POP 20872-20876 StackAdj> Δ+20 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<MI 20876 MOVEA.L (A7)+,A4> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 20878-2087a StackAdj> Δ+6 {}
<MI 2087a MOVE.B #0x1b,(A4+0x2)> {}
<MI 20880 MOVE.L A4,(A6+0x10)> {}
<POP 20884-2088c Epilogue> Σ0
@ 2088c
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2088c-2090e Body>
<POP 2088c-208a2 Prologue> Σ0 ↓
<POP 208a2-208ac RegCacheLoad> Σ0 ↓
<POP 208ac-20906 Naked> Σ0 ↓
<Blob 0x208ac [2] @> Δ-2 {[«2""»]}
<Blob 0x208b0 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x208b4 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 208b8-208ba StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-8-]}
<Lit 0x208ba 2> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$ []}
<MI 208c4 MOVE.L (A6+0xc),(A7)> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']}
<POP 208c2-208c4 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-8-]}
<Call 0x208c8 0x102e4> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x208ce 2> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[$$; ]}
<MI 208d8 MOVE.L (A6+0x8),(A7)> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']}
<POP 208d6-208d8 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-8-]}
<Call 0x208dc 0x102e4> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x208e2 2> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-4-]|[$$r ]}
<Call 0x208ee 0x102dc> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-4-]|[$$r ]}
StringCat5(a, b, c, d, e : String) : String
<POP 208f4-208f8 StackAdj> Δ+20 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<MI 208f8 MOVEA.L (A7)+,A4> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 208fa-208fc StackAdj> Δ+6 {}
<MI 208fc MOVE.B #0x1b,(A4+0x2)> {}
<MI 20902 MOVE.L A4,(A6+0x10)> {}
<POP 20906-2090e Epilogue> Σ0
@ 2090e
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2090e-20994 Body> Δ+8
<POP 2090e-20924 Prologue> Σ0 ↓
<POP 20924-20930 Naked> Σ0 ↓ →0x2093a
<MI 20924 MOVE.L (A6+0xc),D0> {}
<MI 20928 CMPI.L #0x00000044,D0> {}
<MI 2092e BNE 0x2093a> {}
<POP 20930-2093a Naked> Σ0 Δ-8 →0x20940
<POP 20930-20932 StackAdj> Δ-4 {[-4-]}
<Blob 0x20932 [4] 0x234ea> Δ-4 {[-4-]|[«4»]}
<MI 20938 BRA 0x20940> {[-4-]|[«4»]}
<POP 2093a-20940 Naked> Σ0 Δ-8 ↓ ←0x20924
<POP 2093a-2093c StackAdj> Δ-4 {[-4-]}
<Const 0x2093c 0x1.4> Δ-4 {[-4-]|[##1]}
<POP 20940-20952 Naked> Σ-8 Δ+4 ↓ ←0x20930
<Const 0x20940 0x1.4> Δ-4 {[-8-]|[##1]}
<Call 0x20944 0x2080a> {[-8-]|[##1]}
<POP 20948-2094a StackAdj> Δ+8 {[-4-]}
<MI 2094a MOVEA.L (A7)+,A4> Δ+4 {}
<MI 2094c MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 20950 MOVEQ.L #0x01,D7> {[4, '(A6+0x8)']}
<POP 20952-20956 Naked> Σ-4 ↓ →0x20982 ←0x20956
<MI 20952 CMP.L (A7),D7> {[-4-]}
<MI 20954 BGT 0x20982> {[-4-]}
<POP 20956-20982 Naked> Σ-4 ↓ →0x20952
<MI 20956 MOVE.L A4,-(A7)> Δ-4 {[-4-]|[4, 'A4']}
<Const 0x20958 0x1b.2> Δ-2 {[-4-]|[4, 'A4']|[#27]}
<Call 0x2095c 0x102c0> {[-4-]|[4, 'A4']|[#27]}
AppendChar(MOD b : String; a : char)
<POP 20962-20964 StackAdj> Δ+2 {[-4-]|[4, 'A4']}
<MI 20964 MOVE.L A4,(A7)> {[-4-]|[4, 'A4']}
<MI 20966 MOVE.L (A6+0xc),D0> {[-4-]|[4, 'A4']}
<POP 0x2096a LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-4-]|[4, 'A4']}
<MI 20974 MOVE.B D0,-(A7)> Δ-2 {[-4-]|[4, 'A4']|[2, 'D0']}
<Call 0x20976 0x102c0> {[-4-]|[4, 'A4']|[2, 'D0']}
AppendChar(MOD b : String; a : char)
<POP 2097c-2097e StackAdj> Δ+6 {[-4-]}
<MI 2097e ADDQ.L #0x1,D7> {[-4-]}
<MI 20980 BVC 0x20952> {[-4-]}
<POP 20982-2098c Naked> Σ-4 Δ+4 ↓ ←0x20952
<MI 20982 MOVE.L A4,(A7)> {[4, 'A4']}
<Call 0x20984 0x103d8> {[4, 'A4']}
WriteConsoleString(str : String)
<POP 2098a-2098c StackAdj> Δ+4 {}
<POP 2098c-20994 Epilogue> Σ0
@ 20994
<LVAR 0x008 4(w)>
<POP 20994-209da Body>
<POP 20994-209aa Prologue> Σ0 ↓
<POP 209aa-209d2 Naked> Σ0 ↓
<Blob 0x209aa [4] @> Δ-4 {[«4""»]}
<POP 209ae-209b0 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x209b0 4> {[«4""»]|[$$ [0J]}
<MI 209c4 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]}
<POP 209c6-209c8 StackAdj> Δ+4 {}
<MI 209c8 MOVE.B #0x1b,(A4+0x2)> {}
<MI 209ce MOVE.L A4,(A6+0x8)> {}
<POP 209d2-209da Epilogue> Σ0
@ 209da
<LVAR 0x008 4(w)>
<POP 209da-20a28 Body>
<POP 209da-209f0 Prologue> Σ0 ↓
<POP 209f0-20a20 Naked> Σ0 ↓
<Blob 0x209f0 [2] @> Δ-2 {[«2""»]}
<Blob 0x209f4 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x209f8 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 209fc-209fe StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x209fe 6> {[«2""»]|[«2""»]|[«2""»]|[$$ [7;1m]}
<MI 20a12 MOVEA.L (A7)+,A4> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 20a14-20a16 StackAdj> Δ+6 {}
<MI 20a16 MOVE.B #0x1b,(A4+0x2)> {}
<MI 20a1c MOVE.L A4,(A6+0x8)> {}
<POP 20a20-20a28 Epilogue> Σ0
@ 20a28
<LVAR 0x008 4(w)>
<POP 20a28-20a6e Body>
<POP 20a28-20a3e Prologue> Σ0 ↓
<POP 20a3e-20a66 Naked> Σ0 ↓
<Blob 0x20a3e [4] @> Δ-4 {[«4""»]}
<POP 20a42-20a44 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x20a44 4> {[«4""»]|[$$ [0m]}
<MI 20a58 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]}
<POP 20a5a-20a5c StackAdj> Δ+4 {}
<MI 20a5c MOVE.B #0x1b,(A4+0x2)> {}
<MI 20a62 MOVE.L A4,(A6+0x8)> {}
<POP 20a66-20a6e Epilogue> Σ0
@ 20a6e
<LVAR 0x008 4(w)>
<POP 20a6e-20ab4 Body>
<POP 20a6e-20a84 Prologue> Σ0 ↓
<POP 20a84-20aac Naked> Σ0 ↓
<Blob 0x20a84 [4] @> Δ-4 {[«4""»]}
<POP 20a88-20a8a StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x20a8a 4> {[«4""»]|[$$ [0K]}
<MI 20a9e MOVEA.L (A7)+,A4> Δ+4 {[«4""»]}
<POP 20aa0-20aa2 StackAdj> Δ+4 {}
<MI 20aa2 MOVE.B #0x1b,(A4+0x2)> {}
<MI 20aa8 MOVE.L A4,(A6+0x8)> {}
<POP 20aac-20ab4 Epilogue> Σ0
@ 20ab4
<LVAR 0x008 4(w)>
<POP 20ab4-20b54 Body>
<POP 20ab4-20aca Prologue> Σ0 ↓
<POP 20aca-20ad2 RegCacheLoad> Σ0 ↓
<POP 20ad2-20b0c Naked> Σ0 ↓
<POP 20ad2-20ad4 StackAdj> Δ-4 {[-4-]}
<POP 20ad4-20ad5 StackAdj> Δ+2 {[-2-]}
<Blob 0x20ad5 [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 20ad8 MOVE.B 0x20129,(A7+0x1)> {[-2-]|[«2""»]}
<MI 20ade MOVE.B 0x2012a,(A7+0x2)> {[-2-]|[«2""»]}
<POP 20ae4-20ae6 StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]}
<Lit 0x20ae6> {[-2-]|[«2""»]|[$$…]}
<Pointer.sp 0x20ae6 4> Δ-4
<Const 0x20aea 0x1.2> Δ-2
<Const 0x20aee 0x3.2> Δ-2
<Call 0x20af2 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20af8-20afa StackAdj> Δ+8
<MI 20afa MOVEA.L (A7)+,A4> Δ+4 {[-2-]|[«2""»]}
<POP 20afc-20afe StackAdj> Δ+4 {}
<MI 20afe MOVE.B #0x1b,(A4+0x2)> {}
<MI 20b02 MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']}
<Call 0x20b04 0x103d8> {[4, 'A4']}
WriteConsoleString(str : String)
<POP 20b0a-20b0c StackAdj> Δ+4 {}
<POP 20b0c-20b16 Naked> Σ0 ↓ →0x20b0c ←0x20b0c
<POP 20b0c-20b0e StackAdj> Δ-2 {[-2-]}
<Call 0x20b0e 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b10 MOVE.B (A7)+,D7> Δ+2 {}
<MI 20b12 CMP.B #0x1b,D7> {}
<MI 20b14 BNE 0x20b0c> {}
<POP 20b16-20b2a Naked> Σ0 ↓ →0x20b34
<POP 20b16-20b18 StackAdj> Δ-2 {[-2-]}
<Call 0x20b18 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b1a MOVE.B (A7),D7> {[-2-]}
<Call 0x20b1c 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b1e MOVE.B (A7),D7> {[-2-]}
<Call 0x20b20 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b22 MOVE.B (A7)+,D7> Δ+2 {}
<MI 20b24 CMPI.B #0x31,D7> {}
<MI 20b28 BEQ 0x20b34> {}
<POP 20b2a-20b34 Naked> Σ0 →0x20b46
<MI 20b2a MOVE.L #0x40,(A6+0x8)> {}
<MI 20b32 BRA 0x20b46> {}
<POP 20b34-20b46 Naked> Σ0 ↓ ←0x20b16
<MI 20b34 MOVE.L #0x18,(A6+0x8)> {}
<POP 20b3c-20b3e StackAdj> Δ-2 {[-2-]}
<Call 0x20b3e 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b40 MOVE.B (A7),D7> {[-2-]}
<Call 0x20b42 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b44 MOVE.B (A7)+,D7> Δ+2 {}
<POP 20b46-20b4c Naked> Σ0 ↓ ←0x20b2a
<POP 20b46-20b48 StackAdj> Δ-2 {[-2-]}
<Call 0x20b48 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 20b4a MOVE.B (A7)+,D7> Δ+2 {}
<POP 20b4c-20b54 Epilogue> Σ0
@ 20b54
<POP 20b54-20bc2 Body>
<POP 20b54-20b6a Prologue> Σ0 ↓
<POP 20b6a-20bba Naked> Σ0 ↓
<Blob 0x20b6a [10] @> Δ-10 {[«10""»]}
<POP 20b7c-20b7e StackAdj> Δ-8 {[«10""»]|[-8-]}
<Blob 0x20b7e [4] 0x234e2> Δ-4 {[«10""»]|[-8-]|[«4»]}
<Const 0x20b84 0x1.4> Δ-4 {[«10""»]|[-8-]|[«4»]|[##1]}
<Call 0x20b88 0x2080a> {[«10""»]|[-8-]|[«4»]|[##1]}
<POP 20b8c-20b8e StackAdj> Δ+4 {[«10""»]|[-8-]|[«4»]}
<Lit 0x20b8e 9> {[«10""»]|[-8-]|[$$Command:_]}
<POP 20ba0-20ba2 StackAdj> Δ-4 {[«10""»]|[-8-]|[$$Command:_]|[-4-]}
<Call 0x20ba2 0x20a6e> {[«10""»]|[-8-]|[$$Command:_]|[-4-]}
<Call 0x20ba6 0x102d4> {[«10""»]|[-8-]|[$$Command:_]|[-4-]}
StringCat3(a, b, c : String) : String
<POP 20bac-20bb0 StackAdj> Δ+12 {[«10""»]|[-4-]}
<Call 0x20bb0 0x103d8> {[«10""»]|[-4-]}
WriteConsoleString(str : String)
<POP 20bb6-20bba StackAdj> Δ+14 {}
<POP 20bba-20bc2 Epilogue> Σ0
@ 20bc2
<LVAR 0x008 4(r)>
<POP 20bc2-20c10 Body>
<POP 20bc2-20bd4 Prologue> Σ0 ↓
<POP 20bd4-20c0c Naked> Σ0 ↓
<POP 20bd4-20bd6 StackAdj> Δ-8 {[-8-]}
<Blob 0x20bd6 [4] 0x234e6> Δ-4 {[-8-]|[«4»]}
<Const 0x20bdc 0x1.4> Δ-4 {[-8-]|[«4»]|[##1]}
<Call 0x20be0 0x2080a> {[-8-]|[«4»]|[##1]}
<POP 20be4-20be6 StackAdj> Δ+4 {[-8-]|[«4»]}
<Call 0x20be6 0x209da> {[-8-]|[«4»]}
<MI 20bea MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[«4»]|[4, '(A6+0x8)']}
<POP 20bee-20bf0 StackAdj> Δ-4 {[-8-]|[«4»]|[4, '(A6+0x8)']|[-4-]}
<Call 0x20bf0 0x20a6e> {[-8-]|[«4»]|[4, '(A6+0x8)']|[-4-]}
<POP 20bf4-20bf6 StackAdj> Δ-4 {[-8-]|[«4»]|[4, '(A6+0x8)']|[-8-]}
<Call 0x20bf6 0x20a28> {[-8-]|[«4»]|[4, '(A6+0x8)']|[-8-]}
<Call 0x20bfa 0x102dc> {[-8-]|[«4»]|[4, '(A6+0x8)']|[-8-]}
StringCat5(a, b, c, d, e : String) : String
<POP 20c00-20c04 StackAdj> Δ+20 {[-4-]}
<Call 0x20c04 0x103d8> {[-4-]}
WriteConsoleString(str : String)
<POP 20c0a-20c0c StackAdj> Δ+4 {}
<POP 20c0c-20c10 Epilogue> Σ0
@ 20c10
<LVAR 0x00a 1(w)>
<LVAR 0x008 2(r)>
<POP 20c10-20c4e Body>
<POP 20c10-20c26 Prologue> Σ0 ↓
<POP 20c26-20c30 Naked> Σ0 ↓ →0x20c3a
<MI 20c26 MOVE.W (A6+0x8),D0> {}
<MI 20c2a CMPI.W #0x000a,D0> {}
<MI 20c2e BGE 0x20c3a> {}
<POP 20c30-20c3a Naked> Σ0 →0x20c42
<MI 20c30 ADDI.W #0x0030,D0> {}
<POP 0x20c34 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20c38 BRA 0x20c42> {}
<POP 20c3a-20c42 Naked> Σ0 ↓ ←0x20c26
<MI 20c3a ADDI.W #0x0037,D0> {}
<POP 0x20c3e LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<POP 20c42-20c46 Naked> Σ0 ↓ ←0x20c30
<MI 20c42 MOVE.B D0,(A6+0xa)> {}
<POP 20c46-20c4e Epilogue> Σ0
@ 20c4e
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20c4e-20c82 Body>
<POP 20c4e-20c64 Prologue> Σ0 ↓
<POP 20c64-20c6e Naked> Σ0 ↓ →0x20c74
<MI 20c64 MOVE.L (A6+0xc),D0> {}
<MI 20c68 CMP.L (A6+0x8),D0> {}
<MI 20c6c BGE 0x20c74> {}
<POP 20c6e-20c74 Naked> Σ0 →0x20c7a
<MI 20c6e MOVE.L D0,(A6+0x10)> {}
<MI 20c72 BRA 0x20c7a> {}
<POP 20c74-20c7a Naked> Σ0 ↓ ←0x20c64
<MI 20c74 MOVE.L (A6+0x8),(A6+0x10)> {}
<POP 20c7a-20c82 Epilogue> Σ0 ←0x20c6e
@ 20c82
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 20c82-20cb6 Body>
<POP 20c82-20c98 Prologue> Σ0 ↓
<POP 20c98-20ca2 Naked> Σ0 ↓ →0x20ca8
<MI 20c98 MOVE.L (A6+0xc),D0> {}
<MI 20c9c CMP.L (A6+0x8),D0> {}
<MI 20ca0 BLE 0x20ca8> {}
<POP 20ca2-20ca8 Naked> Σ0 →0x20cae
<MI 20ca2 MOVE.L D0,(A6+0x10)> {}
<MI 20ca6 BRA 0x20cae> {}
<POP 20ca8-20cae Naked> Σ0 ↓ ←0x20c98
<MI 20ca8 MOVE.L (A6+0x8),(A6+0x10)> {}
<POP 20cae-20cb6 Epilogue> Σ0 ←0x20ca2
@ 20cb6
<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 20cb6-20e4e Body> Δ-4
<POP 20cb6-20ccc Prologue> Σ0 ↓
<POP 20ccc-20ce0 RegCacheLoad> Σ0 ↓
<POP 20ce0-20d58 Naked> Σ0 ↓
<Blob 0x20ce0 [34] @> Δ-34 {[«34""»]}
<POP 20cec-20cee StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x20cee 34> {[«34""»]|[$$Loading trace data from IOC board.]}
<Call 0x20d02 0x103e0> {[«34""»]|[$$Loading trace data from IOC board.]}
WriteConsoleStringCrLf(str : String)
<POP 20d08-20d0c StackAdj> Δ+22 {[-16-]}
<MI 20d0c MOVE.L (A6+0x8),(A7)> {[-12-]|[4, '(A6+0x8)']}
<Const 0x20d10 0x10.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##16]}
<Call 0x20d14 0x10360> {[-12-]|[4, '(A6+0x8)']|[##16]}
?StringToInt64()
<POP 20d1a-20d1c StackAdj> Δ+8 {[-12-]}
<Call 0x20d1c 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 20d22-20d24 StackAdj> Δ+8 {[-4-]}
<MI 20d24 MOVE.L (A7)+,(A6-0x94)> Δ+4 {}
<MI 20d26 MOVE.L (A6-0x94),D0> {}
<MI 20d28 SUBQ.L #0x2,D0> {}
<MI 20d2a AND.L #0x7ff,D0> {}
<MI 20d2c MOVE.W D0,(A6-0x8)> {}
<MI 20d2e MOVE.W D0,D1> {}
<MI 20d30 LSR.W #0x8,D1> {}
<MI 20d32 MOVE.B D1,(A6-0x4)> {}
<MI 20d34 ANDI.W #0x00ff,D0> {}
<MI 20d38 MOVE.B D0,(A6-0x3)> {}
<MI 20d3c MOVE.W (A6-0x4),-(A7)> Δ-2 {[2, '(A6-0x4)']}
<MI 20d3e CLR.B -(A7)> Δ-2 {[2, '(A6-0x4)']|[#0]}
<Call 0x20d40 0x2229a> {[2, '(A6-0x4)']|[#0]}
exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1)
<POP 20d46-20d48 StackAdj> Δ+4 {}
<MI 20d48 MOVE.L #0x7fd,0x224ce> {}
<MI 20d52 MOVE.W #0x800,D7> {}
<MI 20d56 MOVEQ.L #0x00,D0> {}
<POP 20d58-20da6 Naked> Σ0 Δ-4 ↓ ←0x20e1a
<MI 20d58 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<Pointer.fp 0x20d5a <LVAR -0x088 @>> Δ-4 {[4, 'D0']|[@@-136]}
<Pointer.fp 0x20d5e <LVAR -0x080 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]}
<Pointer.fp 0x20d62 <LVAR -0x078 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]}
<Pointer.fp 0x20d66 <LVAR -0x070 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]}
<Pointer.fp 0x20d6a <LVAR -0x068 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]}
<Pointer.fp 0x20d6e <LVAR -0x060 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]}
<Pointer.fp 0x20d72 <LVAR -0x058 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]}
<Pointer.fp 0x20d76 <LVAR -0x050 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]}
<Pointer.fp 0x20d7a <LVAR -0x048 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]}
<Pointer.fp 0x20d7e <LVAR -0x040 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]}
<Pointer.fp 0x20d82 <LVAR -0x038 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]}
<Pointer.fp 0x20d86 <LVAR -0x030 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]}
<Pointer.fp 0x20d8a <LVAR -0x028 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]}
<Pointer.fp 0x20d8e <LVAR -0x020 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]}
<Pointer.fp 0x20d92 <LVAR -0x018 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]|[@@-24]}
<Pointer.fp 0x20d96 <LVAR -0x010 @>> Δ-4 {[4, 'D0']|[@@-136]|[@@-128]|[@@-120]|[@@-112]|[@@-104]|[@@-96]|[@@-88]|[@@-80]|[@@-72]|[@@-64]|[@@-56]|[@@-48]|[@@-40]|[@@-32]|[@@-24]|[@@-16]}
<Call 0x20d9a 0x22268> {[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 20da0-20da4 StackAdj> Δ+64 {[4, 'D0']}
<MI 20da4 MOVEQ.L #0x00,D5> {[4, 'D0']}
<POP 20da6-20da8 Naked> Σ-4 ↓ ←0x20e08
<MI 20da6 MOVEQ.L #0x00,D6> {[-4-]}
<POP 20da8-20e08 Naked> Σ-4 ↓ →0x20da8 ←0x20da8
<MI 20da8 CLR.L D0> {[-4-]}
<MI 20daa MOVE.W D7,D0> {[-4-]}
<MI 20dac SUBQ.L #0x1,D0> {[-4-]}
<POP 0x20dae LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-4-]}
<MI 20db8 MOVE.W D0,D7> {[-4-]}
<POP 0x20dba LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {[-4-]}
<MI 20dbc CLR.L D0> {[-4-]}
<MI 20dbe MOVE.W D7,D0> {[-4-]}
<MI 20dc0 ASL.L #0x1,D0> {[-4-]}
<MI 20dc2 LEA.L 0x224c6,A0> {[-4-]}
<POP 0x20dc8 LimitCheck 0x0 ≤ D5 ≤ 0xf> {[-4-]}
<MI 20dce MOVE.L D5,D1> {[-4-]}
<MI 20dd0 ASL.L #0x3,D1> {[-4-]}
<MI 20dd2 LEA.L (A6-0x94),A1> {[-4-]}
<MI 20dd4 MOVE.L D6,D2> {[-4-]}
<MI 20dd6 ASL.L #0x1,D2> {[-4-]}
<POP 0x20dd8 LimitCheck 0x0 ≤ D2 ≤ 0x7> {[-4-]}
<MI 20de2 LEA.L (A1+D1.L),A1> {[-4-]}
<MI 20de6 MOVE.B (A1+D2.L+#0xc),(A0+D0.L+#0xc)> {[-4-]}
<MI 20dec ADDQ.L #0x1,D2> {[-4-]}
<POP 0x20dee LimitCheck 0x0 ≤ D2 ≤ 0x7> {[-4-]}
<MI 20df8 MOVE.B (A1+D2.L+#0xc),(A0+D0.L+#0xd)> {[-4-]}
<MI 20dfe ADDQ.L #0x1,D6> {[-4-]}
<MI 20e00 CMPI.L #0x00000003,D6> {[-4-]}
<MI 20e06 BLE 0x20da8> {[-4-]}
<POP 20e08-20e0e Naked> Σ-4 ↓ →0x20da6
<MI 20e08 ADDQ.L #0x1,D5> {[-4-]}
<MI 20e0a CMP.L #0x0f,D5> {[-4-]}
<MI 20e0c BLE 0x20da6> {[-4-]}
<POP 20e0e-20e1a Naked> Σ-4 ↓ →0x20e20
<MI 20e0e MOVE.L (A7),D0> {[-4-]}
<MI 20e10 ADDQ.L #0x1,D0> {[-4-]}
<MI 20e12 CMPI.L #0x0000001f,D0> {[-4-]}
<MI 20e18 BGT 0x20e20> {[-4-]}
<POP 20e1a-20e20 Naked> Σ-4 Δ+4 →0x20d58
<POP 20e1a-20e1c StackAdj> Δ+4 {}
<MI 20e1c BRA 0x20d58> {}
<POP 20e20-20e46 Naked> Σ-4 Δ+4 ↓ ←0x20e0e
<POP 20e20-20e22 StackAdj> Δ+4 {}
<MI 20e22 CLR.L D0> {}
<MI 20e24 MOVE.W (A6-0x8),D0> {}
<MI 20e26 ADDQ.L #0x2,D0> {}
<MI 20e28 AND.L #0x7ff,D0> {}
<MI 20e2a MOVE.W D0,(A6-0x8)> {}
<MI 20e2c MOVE.W D0,D1> {}
<MI 20e2e LSR.W #0x8,D1> {}
<MI 20e30 MOVE.B D1,(A6-0x4)> {}
<MI 20e32 ANDI.W #0x00ff,D0> {}
<MI 20e36 MOVE.B D0,(A6-0x3)> {}
<MI 20e3a MOVE.W (A6-0x4),-(A7)> Δ-2 {[2, '(A6-0x4)']}
<MI 20e3c CLR.B -(A7)> Δ-2 {[2, '(A6-0x4)']|[#0]}
<Call 0x20e3e 0x2229a> {[2, '(A6-0x4)']|[#0]}
exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1)
<POP 20e44-20e46 StackAdj> Δ+4 {}
<POP 20e46-20e4e Epilogue> Σ0
@ 20e4e
<LVAR -0x004 @>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(rw)>
<LVAR -0x40c @>
<LVAR -0x80c @>
<LVAR -0x810 @>
<POP 20e4e-20f8e Body>
<POP 20e4e-20e64 Prologue> Σ0 ↓
<POP 20e64-20e7c RegCacheLoad> Σ0 ↓
<POP 20e7c-20f40 Naked> Σ0 ↓
<Blob 0x20e7c [44] @> Δ-44 {[«44""»]}
<POP 20e88-20e8a StackAdj> Δ-4 {[«44""»]|[-4-]}
<Lit 0x20e8a 44> {[«44""»]|[$$Loading trace data from crashdump disk file.]}
<Call 0x20e9c 0x103e0> {[«44""»]|[$$Loading trace data from crashdump disk file.]}
WriteConsoleStringCrLf(str : String)
<POP 20ea2-20ea6 StackAdj> Δ+48 {}
<Blob 0x20ea6 [22] @> Δ-22 {[«22""»]}
<POP 20eb2-20eb4 StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x20eb4 22> {[«22""»]|[$$CRASH_DUMP.SAVED_STATE]}
<MI 20ec6 MOVE.L (A7)+,(A6-0xc)> Δ+4 {[«22""»]}
<POP 20ec8-20eca StackAdj> Δ+18 {[-4-]}
<MI 20eca MOVE.L (A6-0xc),(A7)> {[4, '(A6-0xc)']}
<MI 20ecc CLR.B -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]}
<Const 0x20ece 0x2.2> Δ-2 {[4, '(A6-0xc)']|[#0]|[#2]}
<Const 0x20ed0 0x0.4> Δ-4 {[4, '(A6-0xc)']|[#0]|[#2]|[##0]}
<Pointer.fp 0x20ed4 <LVAR -0x004 @>> Δ-4 {[4, '(A6-0xc)']|[#0]|[#2]|[##0]|[@@-4]}
<Pointer.fp 0x20ed6 <LVAR -0x008 @ 4(r)>> Δ-4 {[4, '(A6-0xc)']|[#0]|[#2]|[##0]|[@@-4]|[@@-8]}
<Call 0x20ed8 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 20ede-20ee2 StackAdj> Δ+20 {}
<Pointer.fp 0x20ee2 <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x20ee4 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<MI 20eea MOVE.L (A6-0x8),(A7)> {[4, '(A6-0x8)']}
<Const 0x20eec 0xb.2> Δ-2 {[4, '(A6-0x8)']|[#11]}
<MI 20ef0 CLR.W -(A7)> Δ-2 {[4, '(A6-0x8)']|[#11]|[#0]}
<Const 0x20ef2 0x200.2> Δ-2 {[4, '(A6-0x8)']|[#11]|[#0]|[#512]}
<Const 0x20ef6 0x2.2> Δ-2 {[4, '(A6-0x8)']|[#11]|[#0]|[#512]|[#2]}
<MI 20ef8 LEA.L (A6-0x80c),A0> {[4, '(A6-0x8)']|[#11]|[#0]|[#512]|[#2]}
<MI 20efc MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x8)']|[#11]|[#0]|[#512]|[#2]|[4, 'A0']}
<Pointer.fp 0x20efe <LVAR -0x004 @>> Δ-4 {[4, '(A6-0x8)']|[#11]|[#0]|[#512]|[#2]|[4, 'A0']|[@@-4]}
<Call 0x20f00 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 20f06-20f0a StackAdj> Δ+16 {[4, '(A6-0x8)']}
<MI 20f0a MOVE.L (A6-0x8),(A7)> {[4, '(A6-0x8)']}
<Const 0x20f0c 0xc.2> Δ-2 {[4, '(A6-0x8)']|[#12]}
<MI 20f10 CLR.W -(A7)> Δ-2 {[4, '(A6-0x8)']|[#12]|[#0]}
<Const 0x20f12 0x200.2> Δ-2 {[4, '(A6-0x8)']|[#12]|[#0]|[#512]}
<Const 0x20f16 0x2.2> Δ-2 {[4, '(A6-0x8)']|[#12]|[#0]|[#512]|[#2]}
<MI 20f18 LEA.L (A6-0x40c),A0> {[4, '(A6-0x8)']|[#12]|[#0]|[#512]|[#2]}
<MI 20f1c MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x8)']|[#12]|[#0]|[#512]|[#2]|[4, 'A0']}
<Pointer.fp 0x20f1e <LVAR -0x004 @>> Δ-4 {[4, '(A6-0x8)']|[#12]|[#0]|[#512]|[#2]|[4, 'A0']|[@@-4]}
<Call 0x20f20 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 20f26-20f28 StackAdj> Δ+18 {[-2-]}
<MI 20f28 CLR.B (A7)> {[-2-]}
<Const 0x20f2a 0x2.2> Δ-2 {[-2-]|[#2]}
<Const 0x20f2c 0x1.4> Δ-4 {[-2-]|[#2]|[##1]}
<Pointer.fp 0x20f30 <LVAR -0x004 @>> Δ-4 {[-2-]|[#2]|[##1]|[@@-4]}
<Pointer.fp 0x20f32 <LVAR -0x008 @ 4(r)>> Δ-4 {[-2-]|[#2]|[##1]|[@@-4]|[@@-8]}
<Call 0x20f34 0x1038c> {[-2-]|[#2]|[##1]|[@@-4]|[@@-8]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 20f3a-20f3e StackAdj> Δ+16 {}
<MI 20f3e MOVEQ.L #0x00,D7> {}
<POP 20f40-20f80 Naked> Σ0 ↓ →0x20f40 ←0x20f40
<POP 0x20f40 LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {}
<MI 20f4a MOVE.L D7,D0> {}
<MI 20f4c ASL.L #0x1,D0> {}
<MI 20f4e LEA.L 0x224c6,A0> {}
<MI 20f54 MOVE.L #0x3ff,D1> {}
<MI 20f56 SUB.L D7,D1> {}
<POP 0x20f58 LimitCheck 0x0 ≤ D1 ≤ 0x3ff> {}
<MI 20f5e ASL.L #0x1,D1> {}
<MI 20f60 LEA.L (A6-0x810),A1> {}
<MI 20f64 MOVE.W (A1+D1.L+#0x4),D2> {}
<MI 20f68 LSR.W #0x8,D2> {}
<MI 20f6a MOVE.B D2,(A0+D0.L+#0xc)> {}
<MI 20f6e MOVE.W (A1+D1.L+#0x4),D1> {}
<MI 20f72 ANDI.W #0x00ff,D1> {}
<MI 20f76 MOVE.B D1,(A0+D0.L+#0xd)> {}
<MI 20f7a ADDQ.L #0x1,D7> {}
<MI 20f7c CMP.L #0x3ff,D7> {}
<MI 20f7e BLE 0x20f40> {}
<POP 20f80-20f86 Naked> Σ0 ↓
<MI 20f80 MOVE.L #0x3ff,0x224ce> {}
<POP 20f86-20f8e Epilogue> Σ0
@ 20f8e
<LVAR -0x004 @ 4(rw)>
<POP 20f8e-2108c Body> Δ+4
<POP 20f8e-20fa4 Prologue> Σ0 ↓
<POP 20fa4-20fb8 RegCacheLoad> Σ0 ↓
<POP 20fb8-21016 Naked> Σ0 ↓ →0x2101e
<POP 20fb8-20fba StackAdj> Δ-4 {[-4-]}
<Call 0x20fba 0x20ab4> {[-4-]}
<MI 20fbe MOVE.L (A7)+,D0> Δ+4 {}
<MI 20fc0 MOVE.L D0,0x234f2> {}
<MI 20fc6 MOVE.L D0,D1> {}
<MI 20fc8 SUBQ.L #0x1,D1> {}
<MI 20fca MOVE.L D1,D2> {}
<MI 20fcc ASL.L #0x1,D2> {}
<MI 20fce MOVE.L D2,0x234da> {}
<MI 20fd4 MOVE.L D0,0x234ea> {}
<MI 20fd6 SUBQ.L #0x2,0x234ea> {}
<MI 20fd8 MOVE.L 0x234ea,D4> {}
<MI 20fda MOVEQ.L #0x02,D3> {}
<Call 0x20fdc 0x10294> {}
?divs_d3_d4
<MI 20fe2 SUBQ.L #0x1,D4> {}
<MI 20fe4 MOVE.L D4,0x234fa> {}
<MI 20fea MOVE.L D0,0x234e2> {}
<MI 20ff0 MOVE.L D1,0x234e6> {}
<MI 20ff6 MOVE.L D0,D4> {}
<MI 20ff8 MOVEQ.L #0x06,D3> {}
<Call 0x20ffa 0x10294> {}
?divs_d3_d4
<MI 21000 MOVE.L D4,0x234ee> {}
<POP 21006-21008 StackAdj> Δ-4 {[-4-]}
<Call 0x21008 0x103c4> {[-4-]}
GetArgv() : String
<MI 2100e MOVE.L (A7)+,(A6-0x4)> Δ+4 {}
<MI 21010 MOVEA.L (A6-0x4),A0> {}
<MI 21012 TST.W (A0)> {}
<MI 21014 BEQ 0x2101e> {}
<POP 21016-2101e Naked> Σ0 Δ-4 →0x2102a
<MI 21016 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<Call 0x21018 0x20cb6> {[4, '(A6-0x4)']}
<MI 2101c BRA 0x2102a> {[4, '(A6-0x4)']}
<POP 2101e-2102a Naked> Σ0 Δ-4 ↓ ←0x20fb8
<Call 0x2101e 0x20e4e> {}
<Pointer.fp 0x21022 <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x21024 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 2102a-21084 Naked> Σ-4 Δ+4 ↓ ←0x21016
<POP 2102a-2102c StackAdj> Δ+4 {}
<MI 2102c MOVE.L 0x224ce,0x234d2> {}
<MI 21032 ADDQ.L #0x1,0x234d2> {}
<POP 21034-21036 StackAdj> Δ-4 {[-4-]}
<Const 0x21036 0x1.4> Δ-4 {[-4-]|[##1]}
<Blob 0x21038 [4] 0x234ea> Δ-4 {[-4-]|[##1]|[«4»]}
<Call 0x2103a 0x2088c> {[-4-]|[##1]|[«4»]}
<POP 2103e-21040 StackAdj> Δ+8 {[-4-]}
<MI 21040 MOVEA.L (A7)+,A0> Δ+4 {}
<MI 21042 MOVE.L A0,(A6-0x4)> {}
<MI 21044 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Const 0x21046 0x1b.2> Δ-2 {[4, 'A0']|[#27]}
<Call 0x2104a 0x102c0> {[4, 'A0']|[#27]}
AppendChar(MOD b : String; a : char)
<POP 21050-21052 StackAdj> Δ+2 {[4, 'A0']}
<MI 21052 MOVE.L A0,(A7)> {[4, 'A0']}
<Const 0x21054 0x3d.2> Δ-2 {[4, 'A0']|[#61]}
<Call 0x21058 0x102c0> {[4, 'A0']|[#61]}
AppendChar(MOD b : String; a : char)
<POP 2105e-21060 StackAdj> Δ+2 {[4, 'A0']}
<MI 21060 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']|[4, 'A0']}
<POP 21062-21064 StackAdj> Δ-4 {[4, 'A0']|[4, 'A0']|[-4-]}
<Const 0x21064 0x1.4> Δ-4 {[4, 'A0']|[4, 'A0']|[-4-]|[##1]}
<Const 0x21066 0x1.4> Δ-4 {[4, 'A0']|[4, 'A0']|[-4-]|[##1]|[##1]}
<Call 0x21068 0x2080a> {[4, 'A0']|[4, 'A0']|[-4-]|[##1]|[##1]}
<POP 2106c-2106e StackAdj> Δ+4 {[4, 'A0']|[4, 'A0']|[-4-]|[##1]}
<Call 0x2106e 0x20994> {[4, 'A0']|[4, 'A0']|[-4-]|[##1]}
<Call 0x21072 0x102d4> {[4, 'A0']|[4, 'A0']|[-4-]|[##1]}
StringCat3(a, b, c : String) : String
<POP 21078-2107c StackAdj> Δ+12 {[4, 'A0']}
<Call 0x2107c 0x103d8> {[4, 'A0']}
WriteConsoleString(str : String)
<POP 21082-21084 StackAdj> Δ+4 {}
<POP 21084-2108c Epilogue> Σ0
@ 2108c
<LVAR 0x00a 4(w)>
<LVAR 0x008 2(r)>
<LVAR -0x006 @ 4(rw)>
<POP 2108c-21520 Body> Δ+738
<POP 2108c-210a2 Prologue> Σ0 ↓
<POP 210a2-210b4 RegCacheLoad> Σ0 ↓
<POP 210b4-210be Naked> Σ0 ↓ →0x210ea
<MI 210b4 MOVE.W (A6+0x8),D0> {}
<MI 210b8 CMPI.W #0x0146,D0> {}
<MI 210bc BNE 0x210ea> {}
<POP 210be-210ea Naked> Σ0 →0x21514
<Blob 0x210be [12] @> Δ-12 {[«12""»]}
<POP 210d0-210d2 StackAdj> Δ-4 {[«12""»]|[-4-]}
<Lit 0x210d2 11> {[«12""»]|[$$ADA_DEFINED]}
<MI 210e0 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«12""»]}
<POP 210e2-210e6 StackAdj> Δ+12 {}
<MI 210e6 BRA 0x21514> {}
<POP 210ea-210f0 Naked> Σ0 ↓ →0x2110c ←0x210b4
<MI 210ea CMPI.W #0x0147,D0> {}
<MI 210ee BNE 0x2110c> {}
<POP 210f0-21106 Naked> Σ0 Δ-4 ↓
<Blob 0x210f0 [4] @> Δ-4 {[«4""»]}
<POP 210f4-210f6 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x210f6 4> {[«4""»]|[$$MILD]}
<MI 21104 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«4""»]}
<POP 21106-2110c Naked> Σ-4 Δ+4 →0x21514 ←0x21142
<POP 21106-21108 StackAdj> Δ+4 {}
<MI 21108 BRA 0x21514> {}
<POP 2110c-21112 Naked> Σ0 ↓ →0x21136 ←0x210ea
<MI 2110c CMPI.W #0x01f9,D0> {}
<MI 21110 BNE 0x21136> {}
<POP 21112-21136 Naked> Σ0 →0x21514
<Blob 0x21112 [2] @> Δ-2 {[«2""»]}
<Blob 0x21116 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x2111a [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 2111e-21120 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x21120 6> {[«2""»]|[«2""»]|[«2""»]|[$$SEVERE]}
<MI 2112e MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 21130-21132 StackAdj> Δ+6 {}
<MI 21132 BRA 0x21514> {}
<POP 21136-2113c Naked> Σ0 ↓ →0x21142 ←0x2110c
<MI 21136 CMPI.W #0x0100,D0> {}
<MI 2113a BCS 0x21142> {}
<POP 2113c-21142 Naked> Σ0 ↓ →0x2114c
<MI 2113c CMPI.W #0x01ff,D0> {}
<MI 21140 BLS 0x2114c> {}
<POP 21142-2114c Naked> Σ0 Δ-4 →0x21106 ←0x21136
<Pointer.fp 0x21142 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x21144 0x102b8> {[@@-6]}
NewString(VAR a : String)
<MI 2114a BRA 0x21106> {[@@-6]}
<POP 2114c-2116e Naked> Σ0 →0x211ae →0x211da →0x211f4 →0x2121a →0x21240 →0x2126c →0x21280 →0x2128e →0x212a4 →0x212c6 →0x212d6 →0x212e6 →0x2130e →0x21330 →0x21352 →0x21368 →0x21378 →0x2138c →0x2139a →0x213aa →0x213ca →0x213f2 →0x21402 →0x21416 →0x2142a →0x2143e →0x21458 →0x21468 →0x2147c →0x21490 →0x214a4 →0x214be ←0x2113c
<MI 2114c MOVE.W D0,D1> {}
<MI 2114e ANDI.W #0x0007,D1> {}
<MI 21152 CLR.L D2> {}
<MI 21154 MOVE.W D1,D2> {}
<MI 21156 MOVE.L D2,D7> {}
<MI 21158 LSR.W #0x3,D0> {}
<MI 2115a SUB.W #0x20,D0> {}
<POP 0x2115c LimitCheck 0x0 ≤ D0 ≤ 0x1f> {}
<MI 21164 ADD.W D0,D0> {}
<MI 21166 SWITCH D0.W> {}
<POP 211ae-211c0 Naked> Σ0 Δ-26 ↓ ←0x2114c
<Blob 0x211ae [26] @> Δ-26 {[«26""»]}
<POP 211c0-211cc Naked> Σ-26 Δ-12 ↓ ←0x21352
<POP 211c0-211c2 StackAdj> Δ-4 {[-30-]}
<Pointer.sp 0x211c2 4> Δ-4 {[-30-]|[^^4]}
<Const 0x211c6 0x1.2> Δ-2 {[-30-]|[^^4]|[#1]}
<Const 0x211c8 0x19.2> Δ-2 {[-30-]|[^^4]|[#1]|[#25]}
<POP 211cc-211da Naked> Σ-38 Δ+38 →0x214e6 ←0x211e6
<Call 0x211cc 0x102c4> {[-38-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 211ce-211d0 StackAdj> Δ+8 {[-30-]}
<MI 211d0 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-26-]}
<POP 211d2-211d6 StackAdj> Δ+26 {}
<MI 211d6 BRA 0x214e6> {}
<POP 211da-211e6 Naked> Σ0 Δ-26 ↓ ←0x2114c
<Blob 0x211da [26] @> Δ-26 {[«26""»]}
<POP 211e6-211f4 Naked> Σ-26 Δ-12 →0x211cc ←0x21368 ←0x21458
<POP 211e6-211e8 StackAdj> Δ-4 {[-30-]}
<Pointer.sp 0x211e8 4> Δ-4 {[-30-]|[^^4]}
<Const 0x211ec 0x1.2> Δ-2 {[-30-]|[^^4]|[#1]}
<Const 0x211ee 0x1a.2> Δ-2 {[-30-]|[^^4]|[#1]|[#26]}
<MI 211f2 BRA 0x211cc> {[-30-]|[^^4]|[#1]|[#26]}
<POP 211f4-21200 Naked> Σ0 Δ-24 ↓ ←0x2114c
<Blob 0x211f4 [24] @> Δ-24 {[«24""»]}
<POP 21200-2120c Naked> Σ-24 Δ-12 ↓ ←0x212c6 ←0x2139a ←0x213f2
<POP 21200-21202 StackAdj> Δ-4 {[-28-]}
<Pointer.sp 0x21202 4> Δ-4 {[-28-]|[^^4]}
<Const 0x21206 0x1.2> Δ-2 {[-28-]|[^^4]|[#1]}
<Const 0x21208 0x18.2> Δ-2 {[-28-]|[^^4]|[#1]|[#24]}
<POP 2120c-2121a Naked> Σ-36 Δ+36 →0x214e6 ←0x212a4
<Call 0x2120c 0x102c4> {[-36-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2120e-21210 StackAdj> Δ+8 {[-28-]}
<MI 21210 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-24-]}
<POP 21212-21216 StackAdj> Δ+24 {}
<MI 21216 BRA 0x214e6> {}
<POP 2121a-21226 Naked> Σ0 Δ-22 ↓ ←0x2114c
<Blob 0x2121a [22] @> Δ-22 {[«22""»]}
<POP 21226-21232 Naked> Σ-22 Δ-12 ↓ ←0x21280 ←0x212d6
<POP 21226-21228 StackAdj> Δ-4 {[-26-]}
<Pointer.sp 0x21228 4> Δ-4 {[-26-]|[^^4]}
<Const 0x2122c 0x1.2> Δ-2 {[-26-]|[^^4]|[#1]}
<Const 0x2122e 0x16.2> Δ-2 {[-26-]|[^^4]|[#1]|[#22]}
<POP 21232-21240 Naked> Σ-34 Δ+34 →0x214e6 ←0x21330
<Call 0x21232 0x102c4> {[-34-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21234-21236 StackAdj> Δ+8 {[-26-]}
<MI 21236 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-22-]}
<POP 21238-2123c StackAdj> Δ+22 {}
<MI 2123c BRA 0x214e6> {}
<POP 21240-21252 Naked> Σ0 Δ-18 ↓ ←0x2114c
<Blob 0x21240 [18] @> Δ-18 {[«18""»]}
<POP 21252-2126c Naked> Σ-18 Δ+18 →0x214e6 ←0x2126c
<POP 21252-21254 StackAdj> Δ-4 {[-22-]}
<Lit 0x21254> {[-18-]|[$$…]}
<Pointer.sp 0x21254 4> Δ-4
<Const 0x21258 0x1.2> Δ-2
<Const 0x2125a 0x11.2> Δ-2
<Call 0x2125e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21260-21262 StackAdj> Δ+8
<MI 21262 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-18-]}
<POP 21264-21268 StackAdj> Δ+18 {}
<MI 21268 BRA 0x214e6> {}
<POP 2126c-21280 Naked> Σ0 Δ-18 →0x21252 ←0x2114c
<Blob 0x2126c [18] @> Δ-18 {[«18""»]}
<MI 2127e BRA 0x21252> {[«18""»]}
<POP 21280-2128e Naked> Σ0 Δ-22 →0x21226 ←0x2114c
<Blob 0x21280 [22] @> Δ-22 {[«22""»]}
<MI 2128c BRA 0x21226> {[«22""»]}
<POP 2128e-212a4 Naked> Σ0 Δ-28 →0x214d0 ←0x2114c
<Blob 0x2128e [28] @> Δ-28 {[«28""»]}
<MI 212a0 BRA 0x214d0> {[«28""»]}
<POP 212a4-212c6 Naked> Σ0 Δ-36 →0x2120c ←0x2114c
<Blob 0x212a4 [24] @> Δ-24 {[«24""»]}
<POP 212b6-212b8 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Pointer.sp 0x212b8 4> Δ-4 {[«24""»]|[-4-]|[^^4]}
<Const 0x212bc 0x1.2> Δ-2 {[«24""»]|[-4-]|[^^4]|[#1]}
<Const 0x212be 0x17.2> Δ-2 {[«24""»]|[-4-]|[^^4]|[#1]|[#23]}
<MI 212c2 BRA 0x2120c> {[«24""»]|[-4-]|[^^4]|[#1]|[#23]}
<POP 212c6-212d6 Naked> Σ0 Δ-24 →0x21200 ←0x2114c
<Blob 0x212c6 [24] @> Δ-24 {[«24""»]}
<MI 212d2 BRA 0x21200> {[«24""»]}
<POP 212d6-212e6 Naked> Σ0 Δ-22 →0x21226 ←0x2114c
<Blob 0x212d6 [22] @> Δ-22 {[«22""»]}
<MI 212e2 BRA 0x21226> {[«22""»]}
<POP 212e6-212f6 Naked> Σ0 Δ-34 ↓ ←0x2114c
<Blob 0x212e6 [34] @> Δ-34 {[«34""»]}
<POP 212f6-21302 Naked> Σ-34 Δ-12 ↓ ←0x21378 ←0x21402 ←0x21416 ←0x2142a
<POP 212f6-212f8 StackAdj> Δ-4 {[-38-]}
<Pointer.sp 0x212f8 4> Δ-4 {[-38-]|[^^4]}
<Const 0x212fc 0x1.2> Δ-2 {[-38-]|[^^4]|[#1]}
<Const 0x212fe 0x21.2> Δ-2 {[-38-]|[^^4]|[#1]|[#33]}
<POP 21302-2130e Naked> Σ-46 Δ+46 →0x214e6 ←0x2143e
<Call 0x21302 0x102c4> {[-46-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21304-21306 StackAdj> Δ+8 {[-38-]}
<MI 21306 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-34-]}
<POP 21308-2130a StackAdj> Δ+34 {}
<MI 2130a BRA 0x214e6> {}
<POP 2130e-2131a Naked> Σ0 Δ-30 ↓ ←0x2114c
<Blob 0x2130e [30] @> Δ-30 {[«30""»]}
<POP 2131a-21324 Naked> Σ-30 Δ-12 ↓ ←0x2138c
<POP 2131a-2131c StackAdj> Δ-4 {[-34-]}
<Pointer.sp 0x2131c 4> Δ-4 {[-34-]|[^^4]}
<Const 0x21320 0x1.2> Δ-2 {[-34-]|[^^4]|[#1]}
<Const 0x21322 0x1e.2> Δ-2 {[-34-]|[^^4]|[#1]|[#30]}
<POP 21324-21330 Naked> Σ-42 Δ+42 →0x214e6 ←0x213ba
<Call 0x21324 0x102c4> {[-42-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21326-21328 StackAdj> Δ+8 {[-34-]}
<MI 21328 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-30-]}
<POP 2132a-2132c StackAdj> Δ+30 {}
<MI 2132c BRA 0x214e6> {}
<POP 21330-21352 Naked> Σ0 Δ-34 →0x21232 ←0x2114c
<Blob 0x21330 [22] @> Δ-22 {[«22""»]}
<POP 21342-21344 StackAdj> Δ-4 {[«22""»]|[-4-]}
<Pointer.sp 0x21344 4> Δ-4 {[«22""»]|[-4-]|[^^4]}
<Const 0x21348 0x1.2> Δ-2 {[«22""»]|[-4-]|[^^4]|[#1]}
<Const 0x2134a 0x15.2> Δ-2 {[«22""»]|[-4-]|[^^4]|[#1]|[#21]}
<MI 2134e BRA 0x21232> {[«22""»]|[-4-]|[^^4]|[#1]|[#21]}
<POP 21352-21368 Naked> Σ0 Δ-26 →0x211c0 ←0x2114c
<Blob 0x21352 [26] @> Δ-26 {[«26""»]}
<MI 21364 BRA 0x211c0> {[«26""»]}
<POP 21368-21378 Naked> Σ0 Δ-26 →0x211e6 ←0x2114c
<Blob 0x21368 [26] @> Δ-26 {[«26""»]}
<MI 21374 BRA 0x211e6> {[«26""»]}
<POP 21378-2138c Naked> Σ0 Δ-34 →0x212f6 ←0x2114c
<Blob 0x21378 [34] @> Δ-34 {[«34""»]}
<MI 21388 BRA 0x212f6> {[«34""»]}
<POP 2138c-2139a Naked> Σ0 Δ-30 →0x2131a ←0x2114c
<Blob 0x2138c [30] @> Δ-30 {[«30""»]}
<MI 21398 BRA 0x2131a> {[«30""»]}
<POP 2139a-213aa Naked> Σ0 Δ-24 →0x21200 ←0x2114c
<Blob 0x2139a [24] @> Δ-24 {[«24""»]}
<MI 213a6 BRA 0x21200> {[«24""»]}
<POP 213aa-213ba Naked> Σ0 Δ-30 ↓ ←0x2114c
<Blob 0x213aa [30] @> Δ-30 {[«30""»]}
<POP 213ba-213ca Naked> Σ-30 Δ-12 →0x21324 ←0x2147c ←0x21490
<POP 213ba-213bc StackAdj> Δ-4 {[-34-]}
<Pointer.sp 0x213bc 4> Δ-4 {[-34-]|[^^4]}
<Const 0x213c0 0x1.2> Δ-2 {[-34-]|[^^4]|[#1]}
<Const 0x213c2 0x1d.2> Δ-2 {[-34-]|[^^4]|[#1]|[#29]}
<MI 213c6 BRA 0x21324> {[-34-]|[^^4]|[#1]|[#29]}
<POP 213ca-213da Naked> Σ0 Δ-32 ↓ ←0x2114c
<Blob 0x213ca [32] @> Δ-32 {[«32""»]}
<POP 213da-213f2 Naked> Σ-32 Δ+32 →0x214e6 ←0x21468
<POP 213da-213dc StackAdj> Δ-4 {[-36-]}
<Lit 0x213dc> {[-32-]|[$$…]}
<Pointer.sp 0x213dc 4> Δ-4
<Const 0x213e0 0x1.2> Δ-2
<Const 0x213e2 0x1f.2> Δ-2
<Call 0x213e6 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 213e8-213ea StackAdj> Δ+8
<MI 213ea MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-32-]}
<POP 213ec-213ee StackAdj> Δ+32 {}
<MI 213ee BRA 0x214e6> {}
<POP 213f2-21402 Naked> Σ0 Δ-24 →0x21200 ←0x2114c
<Blob 0x213f2 [24] @> Δ-24 {[«24""»]}
<MI 213fe BRA 0x21200> {[«24""»]}
<POP 21402-21416 Naked> Σ0 Δ-34 →0x212f6 ←0x2114c
<Blob 0x21402 [34] @> Δ-34 {[«34""»]}
<MI 21412 BRA 0x212f6> {[«34""»]}
<POP 21416-2142a Naked> Σ0 Δ-34 →0x212f6 ←0x2114c
<Blob 0x21416 [34] @> Δ-34 {[«34""»]}
<MI 21426 BRA 0x212f6> {[«34""»]}
<POP 2142a-2143e Naked> Σ0 Δ-34 →0x212f6 ←0x2114c
<Blob 0x2142a [34] @> Δ-34 {[«34""»]}
<MI 2143a BRA 0x212f6> {[«34""»]}
<POP 2143e-21458 Naked> Σ0 Δ-46 →0x21302 ←0x2114c
<Blob 0x2143e [34] @> Δ-34 {[«34""»]}
<POP 2144a-2144c StackAdj> Δ-4 {[«34""»]|[-4-]}
<Pointer.sp 0x2144c 4> Δ-4 {[«34""»]|[-4-]|[^^4]}
<Const 0x21450 0x1.2> Δ-2 {[«34""»]|[-4-]|[^^4]|[#1]}
<Const 0x21452 0x22.2> Δ-2 {[«34""»]|[-4-]|[^^4]|[#1]|[#34]}
<MI 21454 BRA 0x21302> {[«34""»]|[-4-]|[^^4]|[#1]|[#34]}
<POP 21458-21468 Naked> Σ0 Δ-26 →0x211e6 ←0x2114c
<Blob 0x21458 [26] @> Δ-26 {[«26""»]}
<MI 21464 BRA 0x211e6> {[«26""»]}
<POP 21468-2147c Naked> Σ0 Δ-32 →0x213da ←0x2114c
<Blob 0x21468 [32] @> Δ-32 {[«32""»]}
<MI 21478 BRA 0x213da> {[«32""»]}
<POP 2147c-21490 Naked> Σ0 Δ-30 →0x213ba ←0x2114c
<Blob 0x2147c [30] @> Δ-30 {[«30""»]}
<MI 2148c BRA 0x213ba> {[«30""»]}
<POP 21490-214a4 Naked> Σ0 Δ-30 →0x213ba ←0x2114c
<Blob 0x21490 [30] @> Δ-30 {[«30""»]}
<MI 214a0 BRA 0x213ba> {[«30""»]}
<POP 214a4-214be Naked> Σ0 Δ-40 →0x214dc ←0x2114c
<Blob 0x214a4 [28] @> Δ-28 {[«28""»]}
<POP 214b0-214b2 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Pointer.sp 0x214b2 4> Δ-4 {[«28""»]|[-4-]|[^^4]}
<Const 0x214b6 0x1.2> Δ-2 {[«28""»]|[-4-]|[^^4]|[#1]}
<Const 0x214b8 0x1c.2> Δ-2 {[«28""»]|[-4-]|[^^4]|[#1]|[#28]}
<MI 214bc BRA 0x214dc> {[«28""»]|[-4-]|[^^4]|[#1]|[#28]}
<POP 214be-214d0 Naked> Σ0 Δ-28 ↓ ←0x2114c
<Blob 0x214be [28] @> Δ-28 {[«28""»]}
<POP 214d0-214dc Naked> Σ-28 Δ-12 ↓ ←0x2128e
<POP 214d0-214d2 StackAdj> Δ-4 {[-32-]}
<Pointer.sp 0x214d2 4> Δ-4 {[-32-]|[^^4]}
<Const 0x214d6 0x1.2> Δ-2 {[-32-]|[^^4]|[#1]}
<Const 0x214d8 0x1b.2> Δ-2 {[-32-]|[^^4]|[#1]|[#27]}
<POP 214dc-214e6 Naked> Σ-40 Δ+40 ↓ ←0x214a4
<Call 0x214dc 0x102c4> {[-40-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 214de-214e0 StackAdj> Δ+8 {[-32-]}
<MI 214e0 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-28-]}
<POP 214e2-214e6 StackAdj> Δ+28 {}
<POP 214e6-21514 Naked> Σ0 ↓ ←0x211cc ←0x2120c ←0x21232 ←0x21252 ←0x21302 ←0x21324 ←0x213da
<Blob 0x214e6 [2] @> Δ-2 {[«2""»]}
<POP 214ea-214ec StackAdj> Δ-4 {[«2""»]|[-4-]}
<MI 214ec MOVE.L (A6-0x6),-(A7)> Δ-4 {[«2""»]|[-4-]|[4, '(A6-0x6)']}
<POP 214ee-214f0 StackAdj> Δ-4 {[«2""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
<Lit 0x214f0 2> {[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$+ ]}
<MI 214fc MOVE.L D7,(A7)> {[«2""»]|[-4-]|[4, '(A6-0x6)']|[4, 'D7']}
<POP 214fa-214fc StackAdj> Δ-8 {[«2""»]|[-4-]|[4, '(A6-0x6)']|[4, 'D7']|[-8-]}
<Call 0x214fe 0x102e4> {[«2""»]|[-4-]|[4, '(A6-0x6)']|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 21504-21506 StackAdj> Δ+4 {[«2""»]|[-4-]|[4, '(A6-0x6)']|[4, 'D7']|[-4-]}
<Call 0x21506 0x102d4> {[«2""»]|[-4-]|[4, '(A6-0x6)']|[4, 'D7']|[-4-]}
StringCat3(a, b, c : String) : String
<POP 2150c-21510 StackAdj> Δ+12 {[«2""»]|[-4-]}
<MI 21510 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«2""»]}
<POP 21512-21514 StackAdj> Δ+2 {}
<POP 21514-21518 Naked> Σ0 ↓ ←0x210be ←0x21106 ←0x21112
<MI 21514 MOVE.L (A6-0x6),(A6+0xa)> {}
<POP 21518-21520 Epilogue> Σ0
@ 21520
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 21520-216e0 Body> Δ+6
<POP 21520-21536 Prologue> Σ0 ↓
<POP 21536-21544 RegCacheLoad> Σ0 ↓
<POP 21544-2158c Naked> Σ0 ↓ →0x215a4
<MI 21544 MOVE.L (A6+0x8),D0> {}
<POP 0x21546 LimitCheck 0x0 ≤ D0 ≤ 0x7ff> {}
<MI 21550 ASL.L #0x1,D0> {}
<MI 21552 LEA.L 0x224c6,A0> {}
<MI 21558 CLR.L D1> {}
<MI 2155a MOVE.B (A0+D0.L+#0xc),D1> {}
<MI 2155e ASL.W #0x8,D1> {}
<MI 21560 CLR.L D2> {}
<MI 21562 MOVE.B (A0+D0.L+#0xd),D2> {}
<MI 21566 ADD.W D1,D2> {}
<MI 21568 MOVE.W D2,D7> {}
<POP 2156a-2156c StackAdj> Δ-8 {[-8-]}
<MI 2156c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Call 0x2156e 0x102e4> {[-8-]|[4, '(A6+0x8)']}
Long2String(a : Long) : String
<POP 21574-21576 StackAdj> Δ+4 {[-8-]}
<Const 0x21576 0x5.4> Δ-4 {[-8-]|[##5]}
<Call 0x2157a 0x102f4> {[-8-]|[##5]}
RightPad(a : String; b : Long) : String
<POP 21580-21582 StackAdj> Δ+8 {[-4-]}
<MI 21582 MOVEA.L (A7)+,A3> Δ+4 {}
<MI 21584 MOVE.L (A6+0x8),D0> {}
<MI 21586 CMP.L (A4+0x24),D0> {}
<MI 2158a BNE 0x215a4> {}
<POP 2158c-215a4 Naked> Σ0 ↓
<POP 2158c-2158e StackAdj> Δ-8 {[-8-]}
<Call 0x2158e 0x209da> {[-8-]}
<MI 21592 MOVE.L A3,-(A7)> Δ-4 {[-8-]|[4, 'A3']}
<POP 21594-21596 StackAdj> Δ-4 {[-8-]|[4, 'A3']|[-4-]}
<Call 0x21596 0x20a28> {[-8-]|[4, 'A3']|[-4-]}
<Call 0x2159a 0x102d4> {[-8-]|[4, 'A3']|[-4-]}
StringCat3(a, b, c : String) : String
<POP 215a0-215a2 StackAdj> Δ+12 {[-4-]}
<MI 215a2 MOVEA.L (A7)+,A3> Δ+4 {}
<POP 215a4-215c4 Naked> Σ0 ↓ →0x215ca ←0x21544
<POP 215a4-215a6 StackAdj> Δ-8 {[-8-]}
<MI 215a6 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6+0xc)']}
<Const 0x215aa 0x1.4> Δ-4 {[-8-]|[4, '(A6+0xc)']|[##1]}
<Call 0x215ae 0x2080a> {[-8-]|[4, '(A6+0xc)']|[##1]}
<POP 215b2-215b4 StackAdj> Δ+4 {[-8-]|[4, '(A6+0xc)']}
<MI 215b4 MOVE.L A3,(A7)> {[-8-]|[4, 'A3']}
<Call 0x215b6 0x102d0> {[-8-]|[4, 'A3']}
StringCat2(a, b : String) : String
<POP 215b8-215ba StackAdj> Δ+8 {[-4-]}
<MI 215ba MOVEA.L (A7)+,A3> Δ+4 {}
<MI 215bc MOVE.W D7,D0> {}
<MI 215be ANDI.W #0x4000,D0> {}
<MI 215c2 BEQ 0x215ca> {}
<POP 215c4-215ca Naked> Σ0 Δ-2 →0x215ce
<Blob 0x215c4 [2] @> Δ-2 {[«2""»]}
<MI 215c8 BRA 0x215ce> {[«2""»]}
<POP 215ca-215ce Naked> Σ0 Δ-2 ↓ ←0x215a4
<Blob 0x215ca [2] @> Δ-2 {[«2""»]}
<POP 215ce-215f6 Naked> Σ-2 Δ+2 ↓ →0x2160a ←0x215c4
<POP 215ce-215d0 StackAdj> Δ-4 {[-6-]}
<MI 215d0 MOVE.L A3,-(A7)> Δ-4 {[-6-]|[4, 'A3']}
<POP 215d2-215d4 StackAdj> Δ-4 {[-6-]|[4, 'A3']|[-4-]}
<Lit 0x215d4> {[-6-]|[4, 'A3']|[$$…]}
<Pointer.sp 0x215d4 12> Δ-4
<Const 0x215d8 0x1.2> Δ-2
<Const 0x215da 0x2.2> Δ-2
<Call 0x215de 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 215e4-215e6 StackAdj> Δ+8
<Call 0x215e6 0x102d0> {[-6-]|[4, 'A3']|[$$…]}
StringCat2(a, b : String) : String
<POP 215e8-215ea StackAdj> Δ+8 {[-6-]}
<MI 215ea MOVEA.L (A7)+,A3> Δ+4 {[-2-]}
<POP 215ec-215ee StackAdj> Δ+2 {}
<MI 215ee MOVE.W D7,D0> {}
<MI 215f0 ANDI.W #0x8000,D0> {}
<MI 215f4 BEQ 0x2160a> {}
<POP 215f6-2160a Naked> Σ0 Δ-4 →0x2161c
<POP 215f6-215f8 StackAdj> Δ-4 {[-4-]}
<POP 215f8-215f9 StackAdj> Δ+2 {[-2-]}
<Blob 0x215f9 [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 215fc MOVE.B 0x20555,(A7+0x1)> {[-2-]|[«2""»]}
<MI 21602 MOVE.B 0x20556,(A7+0x2)> {[-2-]|[«2""»]}
<MI 21608 BRA 0x2161c> {[-2-]|[«2""»]}
<POP 2160a-2161c Naked> Σ0 Δ-4 ↓ ←0x215ce
<POP 2160a-2160c StackAdj> Δ-4 {[-4-]}
<POP 2160c-2160d StackAdj> Δ+2 {[-2-]}
<Blob 0x2160d [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 21610 MOVE.B 0x20559,(A7+0x1)> {[-2-]|[«2""»]}
<MI 21616 MOVE.B 0x2055a,(A7+0x2)> {[-2-]|[«2""»]}
<POP 2161c-21666 Naked> Σ-4 Δ+4 ↓ →0x21696 ←0x215f6
<POP 2161c-2161e StackAdj> Δ-4 {[-8-]}
<MI 2161e MOVE.L A3,-(A7)> Δ-4 {[-8-]|[4, 'A3']}
<POP 21620-21622 StackAdj> Δ-4 {[-8-]|[4, 'A3']|[-4-]}
<Lit 0x21622> {[-8-]|[4, 'A3']|[$$…]}
<Pointer.sp 0x21622 12> Δ-4
<Const 0x21626 0x1.2> Δ-2
<Const 0x21628 0x3.2> Δ-2
<Call 0x2162c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21632-21634 StackAdj> Δ+8
<Call 0x21634 0x102d0> {[-8-]|[4, 'A3']|[$$…]}
StringCat2(a, b : String) : String
<POP 21636-21638 StackAdj> Δ+8 {[-8-]}
<MI 21638 MOVEA.L (A7)+,A3> Δ+4 {[-4-]}
<POP 2163a-2163c StackAdj> Δ+4 {}
<POP 2163c-2163e StackAdj> Δ-4 {[-4-]}
<MI 2163e MOVE.L A3,-(A7)> Δ-4 {[-4-]|[4, 'A3']}
<POP 21640-21642 StackAdj> Δ-4 {[-4-]|[4, 'A3']|[-4-]}
<MI 21642 MOVE.W D7,D0> {[-4-]|[4, 'A3']|[-4-]}
<MI 21644 ANDI.W #0x3fff,D0> {[-4-]|[4, 'A3']|[-4-]}
<MI 21648 CLR.L D1> {[-4-]|[4, 'A3']|[-4-]}
<MI 2164a MOVE.W D0,D1> {[-4-]|[4, 'A3']|[-4-]}
<MI 2164c MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'A3']|[-4-]|[4, 'D1']}
<Const 0x2164e 0x4.4> Δ-4 {[-4-]|[4, 'A3']|[-4-]|[4, 'D1']|[##4]}
<Call 0x21652 0x102e8> {[-4-]|[4, 'A3']|[-4-]|[4, 'D1']|[##4]}
Long2HexString(val : Long; ndig : Long) : String
<POP 21658-2165a StackAdj> Δ+8 {[-4-]|[4, 'A3']|[-4-]}
<Call 0x2165a 0x102d0> {[-4-]|[4, 'A3']|[-4-]}
StringCat2(a, b : String) : String
<POP 2165c-2165e StackAdj> Δ+8 {[-4-]}
<MI 2165e MOVEA.L (A7)+,A3> Δ+4 {}
<MI 21660 TST.B (A4+0x22)> {}
<MI 21664 BEQ 0x21696> {}
<POP 21666-21696 Naked> Σ0 ↓
<Blob 0x21666 [4] @> Δ-4 {[«4""»]}
<POP 2166a-2166c StackAdj> Δ-4 {[«4""»]|[-4-]}
<MI 2166c MOVE.L A3,-(A7)> Δ-4 {[«4""»]|[-4-]|[4, 'A3']}
<POP 2166e-21670 StackAdj> Δ-4 {[«4""»]|[-4-]|[4, 'A3']|[-4-]}
<Lit 0x21670 4> {[«4""»]|[-4-]|[4, 'A3']|[$$ _]}
<POP 21680-21682 StackAdj> Δ-6 {[«4""»]|[-4-]|[4, 'A3']|[$$ _]|[-6-]}
<MI 21682 MOVE.W D7,(A7)> {[«4""»]|[-4-]|[4, 'A3']|[$$ _]|[-4-]|[2, 'D7']}
<Call 0x21684 0x2108c> {[«4""»]|[-4-]|[4, 'A3']|[$$ _]|[-4-]|[2, 'D7']}
<POP 21688-2168a StackAdj> Δ+2 {[«4""»]|[-4-]|[4, 'A3']|[$$ _]|[-4-]}
<Call 0x2168a 0x102d4> {[«4""»]|[-4-]|[4, 'A3']|[$$ _]|[-4-]}
StringCat3(a, b, c : String) : String
<POP 21690-21692 StackAdj> Δ+12 {[«4""»]|[-4-]}
<MI 21692 MOVEA.L (A7)+,A3> Δ+4 {[«4""»]}
<POP 21694-21696 StackAdj> Δ+4 {}
<POP 21696-216d8 Naked> Σ0 ↓ ←0x2161c
<MI 21696 MOVE.L A3,-(A7)> Δ-4 {[4, 'A3']}
<Const 0x21698 0x1b.2> Δ-2 {[4, 'A3']|[#27]}
<Call 0x2169c 0x102c0> {[4, 'A3']|[#27]}
AppendChar(MOD b : String; a : char)
<POP 216a2-216a4 StackAdj> Δ+2 {[4, 'A3']}
<MI 216a4 MOVE.L A3,(A7)> {[4, 'A3']}
<Const 0x216a6 0x5b.2> Δ-2 {[4, 'A3']|[#91]}
<Call 0x216aa 0x102c0> {[4, 'A3']|[#91]}
AppendChar(MOD b : String; a : char)
<POP 216b0-216b2 StackAdj> Δ+2 {[4, 'A3']}
<MI 216b2 MOVE.L A3,(A7)> {[4, 'A3']}
<Const 0x216b4 0x30.2> Δ-2 {[4, 'A3']|[#48]}
<Call 0x216b8 0x102c0> {[4, 'A3']|[#48]}
AppendChar(MOD b : String; a : char)
<POP 216be-216c0 StackAdj> Δ+2 {[4, 'A3']}
<MI 216c0 MOVE.L A3,(A7)> {[4, 'A3']}
<Const 0x216c2 0x4b.2> Δ-2 {[4, 'A3']|[#75]}
<Call 0x216c6 0x102c0> {[4, 'A3']|[#75]}
AppendChar(MOD b : String; a : char)
<POP 216cc-216ce StackAdj> Δ+2 {[4, 'A3']}
<MI 216ce MOVE.L A3,(A7)> {[4, 'A3']}
<Call 0x216d0 0x103d8> {[4, 'A3']}
WriteConsoleString(str : String)
<POP 216d6-216d8 StackAdj> Δ+4 {}
<POP 216d8-216e0 Epilogue> Σ0
@ 216e0
<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 216e0-21904 Body>
<POP 216e0-216f6 Prologue> Σ0 ↓
<POP 216f6-2170c RegCacheLoad> Σ0 ↓
<POP 2170c-21716 Naked> Σ0 ↓ →0x21718
<MI 2170c MOVE.L 0x234da,D0> {}
<MI 2170e SUB.L 0x234fa,D0> {}
<MI 21710 NEG.L D0> {}
<MI 21712 ADD.L (A6+0xa),D0> {}
<MI 21714 BPL 0x21718> {}
<POP 21716-21718 Naked> Σ0 ↓
<MI 21716 NEG.L D0> {}
<POP 21718-21722 Naked> Σ0 ↓ →0x2172a ←0x2170c
<MI 21718 MOVE.L D0,(A6-0xc)> {}
<MI 2171c MOVEQ.L #0x00,D1> {}
<MI 2171e CMP.L 0x234fa,D0> {}
<MI 21720 BGE 0x2172a> {}
<POP 21722-2172a Naked> Σ0 ↓ →0x2172c
<MI 21722 TST.B 0x234ff> {}
<MI 21728 BEQ 0x2172c> {}
<POP 2172a-2172c Naked> Σ0 ↓ ←0x21718
<MI 2172a ADDQ.B #0x1,D1> {}
<POP 2172c-21742 Naked> Σ0 ↓ →0x2174e ←0x21722
<MI 2172c EXTB.W D1> {}
<POP 0x2172e LimitCheck 0x0 ≤ D1 ≤ 0x1> {}
<MI 21732 MOVE.B D1,(A6-0x6)> {}
<MI 21736 CLR.B (A6-0x8)> {}
<MI 2173a CMP.L 0x234ee,D0> {}
<MI 21740 BLE 0x2174e> {}
<POP 21742-2174a Naked> Σ0 ↓ →0x2174e
<MI 21742 MOVE.B D1,D0> {}
<MI 21744 NEG.B D0> {}
<MI 21746 ADDQ.B #0x1,D0> {}
<MI 21748 BEQ 0x2174e> {}
<POP 2174a-2174e Naked> Σ0 ↓
<MI 2174a ADDQ.B #0x1,(A6-0x8)> {}
<POP 2174e-21764 Naked> Σ0 ↓ →0x21782 ←0x2172c ←0x21742
<MI 2174e MOVE.B (A6-0x8),(A6-0x7)> {}
<MI 21754 OR.B D1,(A6-0x7)> {}
<MI 21758 NEG.B (A6-0x7)> {}
<MI 2175c ADDQ.B #0x1,(A6-0x7)> {}
<MI 21760 TST.B D1> {}
<MI 21762 BNE 0x21782> {}
<POP 21764-21782 Naked> Σ0 →0x217dc
<MI 21764 MOVE.L 0x234da,D0> {}
<MI 21766 SUB.L 0x234de,D0> {}
<MI 2176c ADDQ.L #0x1,D0> {}
<MI 2176e MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<Blob 0x21770 [4] 0x234de> Δ-4 {[4, 'D0']|[«4»]}
<MI 21776 LEA.L (A6-0x1a),A4> {[4, 'D0']|[«4»]}
<Call 0x2177a 0x21520> {[4, 'D0']|[«4»]}
<POP 2177e-21780 StackAdj> Δ+8 {}
<MI 21780 BRA 0x217dc> {}
<POP 21782-217ba Naked> Σ0 ↓ →0x217ca ←0x2174e
<POP 21782-21784 StackAdj> Δ-4 {[-4-]}
<MI 21784 MOVE.L (A6+0xa),D0> {[-4-]}
<MI 21786 ADD.L 0x234fa,D0> {[-4-]}
<MI 21788 ADDQ.L #0x1,D0> {[-4-]}
<MI 2178a MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<Blob 0x2178c [4] 0x224ce> Δ-4 {[-4-]|[4, 'D0']|[«4»]}
<Call 0x21792 0x20c4e> {[-4-]|[4, 'D0']|[«4»]}
<POP 21796-21798 StackAdj> Δ+8 {[-4-]}
<MI 21798 MOVE.L (A7),0x234d6> {[-4-]}
<MI 2179a MOVE.L (A6+0xa),D0> {[-4-]}
<MI 2179c SUB.L 0x234fa,D0> {[-4-]}
<MI 2179e MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<Const 0x217a0 0x0.4> Δ-4 {[-4-]|[4, 'D0']|[##0]}
<Call 0x217a4 0x20c82> {[-4-]|[4, 'D0']|[##0]}
<POP 217a8-217aa StackAdj> Δ+8 {[-4-]}
<MI 217aa MOVE.L (A7)+,D6> Δ+4 {}
<MI 217ac MOVE.L 0x224ce,D0> {}
<MI 217b2 SUB.L 0x234fa,D0> {}
<MI 217b4 ADDQ.L #0x1,D0> {}
<MI 217b6 CMP.L (A6+0xa),D0> {}
<MI 217b8 BGT 0x217ca> {}
<POP 217ba-217ca Naked> Σ0 ↓
<MI 217ba MOVE.L 0x234ea,D6> {}
<MI 217c0 SUBQ.L #0x1,D6> {}
<MI 217c2 NEG.L D6> {}
<MI 217c4 ADD.L 0x224ce,D6> {}
<POP 217ca-217d0 Naked> Σ0 ↓ →0x217d8 ←0x21782
<MI 217ca MOVE.L (A6+0xa),D0> {}
<MI 217cc CMP.L 0x234fa,D0> {}
<MI 217ce BGE 0x217d8> {}
<POP 217d0-217d8 Naked> Σ0 ↓
<MI 217d0 MOVE.L 0x234ea,0x234d6> {}
<MI 217d6 SUBQ.L #0x1,0x234d6> {}
<POP 217d8-217dc Naked> Σ0 ↓ ←0x217ca
<MI 217d8 MOVEQ.L #0x01,D7> {}
<MI 217da MOVE.L 0x234d6,0x234da> {}
<POP 217dc-217e2 Naked> Σ0 ↓ →0x217ec ←0x21764
<MI 217dc TST.B (A6-0x7)> {}
<MI 217e0 BEQ 0x217ec> {}
<POP 217e2-217ec Naked> Σ0 ↓
<MI 217e2 MOVE.L (A6+0xa),0x234d6> {}
<MI 217e4 MOVE.L (A6+0xa),D6> {}
<MI 217e6 MOVE.L 0x234da,D7> {}
<MI 217e8 SUB.L (A6+0xa),D7> {}
<MI 217ea ADDQ.L #0x1,D7> {}
<POP 217ec-217f4 Naked> Σ0 ↓ →0x21894 ←0x217dc
<MI 217ec TST.B (A6-0x8)> {}
<MI 217f0 BEQ 0x21894> {}
<POP 217f4-21810 Naked> Σ0 ↓ →0x2184c
<MI 217f4 MOVE.L 0x234da,D0> {}
<MI 217f6 SUB.L (A6+0xa),D0> {}
<MI 217f8 ADDQ.L #0x1,D0> {}
<MI 217fa MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 217fc MOVE.L (A6+0xa),-(A7)> Δ-4 {[4, 'D0']|[4, '(A6+0xa)']}
<MI 217fe LEA.L (A6-0x1a),A4> {[4, 'D0']|[4, '(A6+0xa)']}
<Call 0x21802 0x21520> {[4, 'D0']|[4, '(A6+0xa)']}
<POP 21806-21808 StackAdj> Δ+8 {}
<MI 21808 MOVE.L 0x234da,D0> {}
<MI 2180a SUB.L 0x234fa,D0> {}
<MI 2180c CMP.L (A6+0xa),D0> {}
<MI 2180e BGE 0x2184c> {}
<POP 21810-2184c Naked> Σ0 →0x21894
<POP 21810-21812 StackAdj> Δ-4 {[-4-]}
<MI 21812 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6-0xc)']}
<MI 21816 MOVE.L 0x224ce,D0> {[-4-]|[4, '(A6-0xc)']}
<MI 2181c SUB.L 0x234da,D0> {[-4-]|[4, '(A6-0xc)']}
<MI 2181e MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, '(A6-0xc)']|[4, 'D0']}
<Call 0x21820 0x20c4e> {[-4-]|[4, '(A6-0xc)']|[4, 'D0']}
<POP 21824-21826 StackAdj> Δ+8 {[-4-]}
<MI 21826 MOVE.L (A7)+,(A6-0x4)> Δ+4 {}
<Const 0x2182a 0x4d.4> Δ-4 {[##77]}
<MI 2182e MOVE.L (A6-0x4),-(A7)> Δ-4 {[##77]|[4, '(A6-0x4)']}
<Call 0x21832 0x2090e> {[##77]|[4, '(A6-0x4)']}
<POP 21836-21838 StackAdj> Δ+8 {}
<MI 21838 MOVE.L 0x234da,D6> {}
<MI 2183a ADDQ.L #0x1,D6> {}
<MI 2183c MOVE.L D6,D0> {}
<MI 2183e ADD.L (A6-0x4),D0> {}
<MI 21842 SUBQ.L #0x1,D0> {}
<MI 21844 MOVE.L D0,0x234d6> {}
<MI 21846 MOVEQ.L #0x01,D7> {}
<MI 21848 MOVE.L D0,0x234da> {}
<MI 2184a BRA 0x21894> {}
<POP 2184c-21894 Naked> Σ0 ↓ ←0x217f4
<POP 2184c-2184e StackAdj> Δ-4 {[-4-]}
<MI 2184e MOVE.L (A6-0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6-0xc)']}
<Blob 0x21852 [4] 0x234ea> Δ-4 {[-4-]|[4, '(A6-0xc)']|[«4»]}
<MI 21858 SUBQ.L #0x1,(A7)> {[-4-]|[4, '(A6-0xc)']|[-4-]}
<MI 2185a MOVE.L 0x234da,D0> {[-4-]|[4, '(A6-0xc)']|[-4-]}
<MI 2185c SUB.L (A7),D0> {[-4-]|[4, '(A6-0xc)']|[-4-]}
<MI 2185e MOVE.L D0,(A7)> {[-4-]|[4, '(A6-0xc)']|[4, 'D0']}
<Call 0x21860 0x20c4e> {[-4-]|[4, '(A6-0xc)']|[4, 'D0']}
<POP 21864-21866 StackAdj> Δ+8 {[-4-]}
<MI 21866 MOVE.L (A7)+,D0> Δ+4 {}
<MI 21868 MOVE.L D0,(A6-0x4)> {}
<Const 0x2186c 0x44.4> Δ-4 {[##68]}
<MI 21870 MOVE.L D0,-(A7)> Δ-4 {[##68]|[4, 'D0']}
<Call 0x21872 0x2090e> {[##68]|[4, 'D0']}
<POP 21876-21878 StackAdj> Δ+8 {}
<MI 21878 MOVE.L 0x234da,D1> {}
<MI 2187a SUB.L 0x234ea,D1> {}
<MI 21880 MOVE.L D1,0x234d6> {}
<MI 21882 SUB.L D0,D1> {}
<MI 21884 ADDQ.L #0x1,D1> {}
<MI 21886 MOVE.L D1,D6> {}
<MI 21888 MOVE.L 0x234ea,D7> {}
<MI 2188e ADDQ.L #0x1,D7> {}
<MI 21890 SUB.L D0,D7> {}
<MI 21892 SUB.L D0,0x234da> {}
<POP 21894-2189c Naked> Σ0 Δ-4 ↓ →0x218b0 ←0x217ec ←0x21810
<MI 21894 MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']}
<MI 21896 MOVE.L 0x234d6,D5> {[4, 'D6']}
<MI 21898 CMP.L (A7),D5> {[4, 'D6']}
<MI 2189a BLT 0x218b0> {[4, 'D6']}
<POP 2189c-218b0 Naked> Σ-4 ↓
<MI 2189c MOVE.L (A7),D0> {[-4-]}
<POP 0x2189e LimitCheck D5> {[-4-]}
<MI 2189e CMPI.L #0x7fffffff,D5>
<MI 218a4 BGT 0x218ae>
<POP 0x218a6 LimitCheck D0> {[-4-]}
<MI 218a6 CMPI.L #0x80000001,D0>
<MI 218ac BGE 0x218b0>
<MI 218ae TRAP #15>
<POP 218b0-218b4 Naked> Σ-4 ↓ →0x218c8 ←0x21894 ←0x218b4
<MI 218b0 CMP.L (A7),D5> {[-4-]}
<MI 218b2 BLT 0x218c8> {[-4-]}
<POP 218b4-218c8 Naked> Σ-4 ↓ →0x218b0
<MI 218b4 MOVE.L D7,-(A7)> Δ-4 {[-4-]|[4, 'D7']}
<MI 218b6 MOVE.L D5,-(A7)> Δ-4 {[-4-]|[4, 'D7']|[4, 'D5']}
<MI 218b8 LEA.L (A6-0x1a),A4> {[-4-]|[4, 'D7']|[4, 'D5']}
<Call 0x218bc 0x21520> {[-4-]|[4, 'D7']|[4, 'D5']}
<POP 218c0-218c2 StackAdj> Δ+8 {[-4-]}
<MI 218c2 ADDQ.L #0x1,D7> {[-4-]}
<MI 218c4 SUBQ.L #0x1,D5> {[-4-]}
<MI 218c6 BVC 0x218b0> {[-4-]}
<POP 218c8-218fc Naked> Σ-4 Δ+4 ↓ ←0x218b0
<POP 218c8-218ca StackAdj> Δ+4 {}
<MI 218ca MOVE.L (A6+0xa),0x234de> {}
<MI 218d0 CLR.B 0x234ff> {}
<POP 218d6-218d8 StackAdj> Δ-8 {[-8-]}
<Blob 0x218d8 [4] 0x234e6> Δ-4 {[-8-]|[«4»]}
<Const 0x218de 0x1.4> Δ-4 {[-8-]|[«4»]|[##1]}
<Call 0x218e2 0x2080a> {[-8-]|[«4»]|[##1]}
<POP 218e6-218e8 StackAdj> Δ+4 {[-8-]|[«4»]}
<Call 0x218e8 0x20994> {[-8-]|[«4»]}
<Call 0x218ec 0x102d0> {[-8-]|[«4»]}
StringCat2(a, b : String) : String
<POP 218f2-218f4 StackAdj> Δ+8 {[-4-]}
<Call 0x218f4 0x103d8> {[-4-]}
WriteConsoleString(str : String)
<POP 218fa-218fc StackAdj> Δ+4 {}
<POP 218fc-21904 Epilogue> Σ0
@ 21904
<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 21904-21a40 Body>
<POP 21904-2191a Prologue> Σ0 ↓
<POP 2191a-2192a RegCacheLoad> Σ0 ↓
<POP 2192a-21954 Naked> Σ0 ↓
<MI 2192a MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Const 0x2192e 0x1.2> Δ-2 {[4, '(A6+0xc)']|[#1]}
<Const 0x21930 0x1.2> Δ-2 {[4, '(A6+0xc)']|[#1]|[#1]}
<MI 21932 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0xc)']|[#1]|[#1]|[4, '(A6+0x8)']}
<Pointer.fp 0x21936 <LVAR -0x020 @>> Δ-4 {[4, '(A6+0xc)']|[#1]|[#1]|[4, '(A6+0x8)']|[@@-32]}
<Pointer.fp 0x2193a <LVAR -0x01e @ 4(r)>> Δ-4 {[4, '(A6+0xc)']|[#1]|[#1]|[4, '(A6+0x8)']|[@@-32]|[@@-30]}
<Call 0x2193c 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 21942-21946 StackAdj> Δ+20 {}
<MI 21946 MOVE.L (A6+0x8),D0> {}
<MI 2194a ASL.L #0x7,D0> {}
<MI 2194c SUBQ.L #0x1,D0> {}
<MI 2194e MOVE.L D0,(A6-0x4)> {}
<MI 21952 MOVE.L D0,D5> {}
<POP 21954-2195a Naked> Σ0 ↓ →0x21a16 ←0x2199c
<MI 21954 TST.L D5> {}
<MI 21956 BLT 0x21a16> {}
<POP 2195a-21988 Naked> Σ0 ↓ →0x2198c
<Pointer.fp 0x2195a <LVAR -0x01a @ 4(rw)>> Δ-4 {[@@-26]}
<Call 0x2195c 0x102b8> {[@@-26]}
NewString(VAR a : String)
<POP 21962-21964 StackAdj> Δ+4 {}
<POP 0x21964 LimitCheck 0x0 ≤ D5 ≤ 0x7ff> {}
<MI 2196e MOVE.L D5,D0> {}
<MI 21970 ASL.L #0x1,D0> {}
<MI 21972 LEA.L 0x224c6,A0> {}
<MI 21978 MOVE.W (A0+D0.L+#0xc),(A6-0x14)> {}
<MI 2197c CLR.L D0> {}
<MI 2197e MOVE.B (A6-0x14),D0> {}
<MI 21980 MOVE.W D0,D1> {}
<MI 21982 ANDI.W #0x0040,D1> {}
<MI 21986 BEQ 0x2198c> {}
<POP 21988-2198c Naked> Σ0 →0x2198e
<MI 21988 MOVEQ.L #0x48,D7> {}
<MI 2198a BRA 0x2198e> {}
<POP 2198c-2198e Naked> Σ0 ↓ ←0x2195a
<MI 2198c MOVEQ.L #0x20,D7> {}
<POP 2198e-21996 Naked> Σ0 ↓ →0x2199a ←0x21988
<MI 2198e MOVE.W D0,D1> {}
<MI 21990 ANDI.W #0x0080,D1> {}
<MI 21994 BEQ 0x2199a> {}
<POP 21996-2199a Naked> Σ0 →0x2199c
<MI 21996 MOVEQ.L #0x43,D6> {}
<MI 21998 BRA 0x2199c> {}
<POP 2199a-2199c Naked> Σ0 ↓ ←0x2198e
<MI 2199a MOVEQ.L #0x20,D6> {}
<POP 2199c-21a16 Naked> Σ0 ↓ →0x21954 ←0x21996
<MI 2199c ANDI.W #0x003f,D0> {}
<MI 219a0 MOVE.B D0,(A6-0x14)> {}
<MI 219a2 MOVE.W (A6-0x14),-(A7)> Δ-2 {[2, '(A6-0x14)']}
<MI 219a4 PEA.L (A7)> Δ-4 {[2, '(A6-0x14)']|[4, '^(A7)']}
<Const 0x219a6 0x0.4> Δ-4 {[2, '(A6-0x14)']|[4, '^(A7)']|[##0]}
<Const 0x219aa 0x1.4> Δ-4 {[2, '(A6-0x14)']|[4, '^(A7)']|[##0]|[##1]}
<Pointer.fp 0x219ae <LVAR -0x00e @ 4(r)>> Δ-4 {[2, '(A6-0x14)']|[4, '^(A7)']|[##0]|[##1]|[@@-14]}
<Call 0x219b2 0x104b4> {[2, '(A6-0x14)']|[4, '^(A7)']|[##0]|[##1]|[@@-14]}
?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
<POP 219b8-219bc StackAdj> Δ+14 {[2, '(A6-0x14)']|[-2-]}
<MI 219bc MOVE.L (A6-0x1a),(A7)> {[4, '(A6-0x1a)']}
<MI 219be MOVE.B D7,-(A7)> Δ-2 {[4, '(A6-0x1a)']|[2, 'D7']}
<Call 0x219c0 0x102c0> {[4, '(A6-0x1a)']|[2, 'D7']}
AppendChar(MOD b : String; a : char)
<POP 219c6-219c8 StackAdj> Δ+2 {[4, '(A6-0x1a)']}
<MI 219c8 MOVE.L (A6-0x1a),(A7)> {[4, '(A6-0x1a)']}
<MI 219ca MOVE.B D6,-(A7)> Δ-2 {[4, '(A6-0x1a)']|[2, 'D6']}
<Call 0x219cc 0x102c0> {[4, '(A6-0x1a)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 219d2-219d4 StackAdj> Δ+2 {[4, '(A6-0x1a)']}
<MI 219d4 MOVE.L (A6-0x1a),-(A7)> Δ-4 {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']}
<POP 219d6-219d8 StackAdj> Δ-4 {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]}
<MI 219d8 MOVE.L (A6-0xa),-(A7)> Δ-4 {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]|[4, '(A6-0xa)']}
<MI 219dc MOVE.L (A6-0xe),-(A7)> Δ-4 {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']}
<Const 0x219e0 0x10.4> Δ-4 {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[##16]}
<Call 0x219e4 0x1035c> {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[##16]}
Quad2String(a : Quad; radix : Long ) : String
<POP 219ea-219ec StackAdj> Δ+12 {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]}
<Call 0x219ec 0x102d0> {[4, '(A6-0x1a)']|[4, '(A6-0x1a)']|[-4-]}
StringCat2(a, b : String) : String
<POP 219f2-219f4 StackAdj> Δ+8 {[4, '(A6-0x1a)']}
<MI 219f4 MOVE.L (A7)+,(A6-0x1a)> Δ+4 {}
<MI 219f6 MOVE.L (A6-0x1e),-(A7)> Δ-4 {[4, '(A6-0x1e)']}
<MI 219f8 MOVE.L (A6-0x1a),-(A7)> Δ-4 {[4, '(A6-0x1e)']|[4, '(A6-0x1a)']}
<Pointer.fp 0x219fa <LVAR -0x006 @>> Δ-4 {[4, '(A6-0x1e)']|[4, '(A6-0x1a)']|[@@-6]}
<Call 0x219fe 0x10440> {[4, '(A6-0x1e)']|[4, '(A6-0x1a)']|[@@-6]}
FSCALL_10440
<POP 21a04-21a06 StackAdj> Δ+12 {}
<Pointer.fp 0x21a06 <LVAR -0x01a @ 4(rw)>> Δ-4 {[@@-26]}
<Call 0x21a08 0x102bc> {[@@-26]}
FreeString(VAR a : String)
<POP 21a0e-21a10 StackAdj> Δ+4 {}
<MI 21a10 SUBQ.L #0x1,D5> {}
<MI 21a12 BVC 0x21954> {}
<POP 21a16-21a38 Naked> Σ0 ↓ ←0x21954
<MI 21a16 MOVE.L (A6-0x1e),-(A7)> Δ-4 {[4, '(A6-0x1e)']}
<Call 0x21a18 0x10448> {[4, '(A6-0x1e)']}
FSCALL_10448
<POP 21a1e-21a20 StackAdj> Δ+2 {[-2-]}
<MI 21a20 CLR.B (A7)> {[-2-]}
<Const 0x21a22 0x1.2> Δ-2 {[-2-]|[#1]}
<MI 21a24 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-2-]|[#1]|[4, '(A6+0xc)']}
<Pointer.fp 0x21a28 <LVAR -0x020 @>> Δ-4 {[-2-]|[#1]|[4, '(A6+0xc)']|[@@-32]}
<Pointer.fp 0x21a2c <LVAR -0x01e @ 4(r)>> Δ-4 {[-2-]|[#1]|[4, '(A6+0xc)']|[@@-32]|[@@-30]}
<Call 0x21a2e 0x1038c> {[-2-]|[#1]|[4, '(A6+0xc)']|[@@-32]|[@@-30]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 21a34-21a38 StackAdj> Δ+16 {}
<POP 21a38-21a40 Epilogue> Σ0
@ 21a40
<LVAR 0x008 4(r)>
<POP 21a40-21af6 Body>
<POP 21a40-21a56 Prologue> Σ0 ↓
<POP 21a56-21a60 RegCacheLoad> Σ0 ↓
<POP 21a60-21a7c Naked> Σ0 ↓ →0x21a82
<Call 0x21a60 0x20b54> {}
<POP 21a64-21a66 StackAdj> Δ-2 {[-2-]}
<Call 0x21a66 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 21a68 MOVE.B (A7)+,D7> Δ+2 {}
<MI 21a6a CLR.L D0> {}
<MI 21a6c MOVE.B D7,D0> {}
<MI 21a6e LEA.L 0x20782,A0> {}
<MI 21a72 MOVE.W D0,D1> {}
<MI 21a74 LSR.W #0x3,D1> {}
<MI 21a76 BTST.B D0,(A0+D1.W)> {}
<MI 21a7a BEQ 0x21a82> {}
<POP 21a7c-21a82 Naked> Σ0 ↓
<MI 21a7c ANDI.W #0x005f,D0> {}
<MI 21a80 MOVE.B D0,D7> {}
<POP 21a82-21a88 Naked> Σ0 ↓ →0x21a8e ←0x21a60
<MI 21a82 CMPI.B #0x1b,D7> {}
<MI 21a86 BEQ 0x21a8e> {}
<POP 21a88-21a8e Naked> Σ0 →0x21aee
<MI 21a88 MOVEA.L (A6+0x8),A0> {}
<MI 21a8a MOVE.B D7,(A0)> {}
<MI 21a8c BRA 0x21aee> {}
<POP 21a8e-21a9a Naked> Σ0 ↓ →0x21a9c ←0x21a82
<POP 21a8e-21a90 StackAdj> Δ-2 {[-2-]}
<Call 0x21a90 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 21a92 MOVE.B (A7)+,D0> Δ+2 {}
<MI 21a94 CMPI.B #0x4f,D0> {}
<MI 21a98 BEQ 0x21a9c> {}
<POP 21a9a-21a9c Naked> Σ0 →0x21ae8
<MI 21a9a BRA 0x21ae8> {}
<POP 21a9c-21aae Naked> Σ0 ↓ →0x21ae8 ←0x21a8e
<POP 21a9c-21a9e StackAdj> Δ-2 {[-2-]}
<Call 0x21a9e 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 21aa0 CLR.L D0> {[-2-]}
<MI 21aa2 MOVE.B (A7)+,D0> Δ+2 {}
<MI 21aa4 SUBI.W #0x006e,D0> {}
<MI 21aa8 CMPI.W #0x0007,D0> {}
<MI 21aac BHI 0x21ae8> {}
<POP 21aae-21ab8 Naked> Σ0 →0x21ae0 →0x21ae8 →0x21ad8 →0x21ae8 →0x21ae8 →0x21ae8 →0x21ac8 →0x21ad0
<MI 21aae ADD.W D0,D0> {}
<MI 21ab0 SWITCH D0.W> {}
<POP 21ac8-21ad0 Naked> Σ0 →0x21aee ←0x21aae
<MI 21ac8 MOVEA.L (A6+0x8),A0> {}
<MI 21aca MOVE.B #0x50,(A0)> {}
<MI 21ace BRA 0x21aee> {}
<POP 21ad0-21ad8 Naked> Σ0 →0x21aee ←0x21aae
<MI 21ad0 MOVEA.L (A6+0x8),A0> {}
<MI 21ad2 MOVE.B #0x4e,(A0)> {}
<MI 21ad6 BRA 0x21aee> {}
<POP 21ad8-21ae0 Naked> Σ0 →0x21aee ←0x21aae
<MI 21ad8 MOVEA.L (A6+0x8),A0> {}
<MI 21ada MOVE.B #0x42,(A0)> {}
<MI 21ade BRA 0x21aee> {}
<POP 21ae0-21ae8 Naked> Σ0 →0x21aee ←0x21aae
<MI 21ae0 MOVEA.L (A6+0x8),A0> {}
<MI 21ae2 MOVE.B #0x5a,(A0)> {}
<MI 21ae6 BRA 0x21aee> {}
<POP 21ae8-21aee Naked> Σ0 ↓ ←0x21a9a ←0x21a9c ←0x21aae ←0x21aae ←0x21aae ←0x21aae
<MI 21ae8 MOVEA.L (A6+0x8),A0> {}
<MI 21aea MOVE.B #0x3f,(A0)> {}
<POP 21aee-21af6 Epilogue> Σ0 ←0x21a88 ←0x21ac8 ←0x21ad0 ←0x21ad8 ←0x21ae0
@ 21af6
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 1(r)>
<POP 21af6-21bc0 Body>
<POP 21af6-21b0c Prologue> Σ0 ↓
<POP 21b0c-21b0e RegCacheLoad> Σ0 ↓
<POP 21b0e-21b1e Naked> Σ0 ↓
<MI 21b0e MOVEQ.L #0x00,D7> {}
<MI 21b10 MOVEQ.L #0x00,D6> {}
<MI 21b12 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x21b16 0x103d8> {[4, '(A6+0xc)']}
WriteConsoleString(str : String)
<POP 21b1c-21b1e StackAdj> Δ+4 {}
<POP 21b1e-21b32 Naked> Σ0 ↓ →0x21b9c ←0x21b9a
<Pointer.fp 0x21b1e <LVAR -0x008 @ 1(r)>> Δ-4 {[@@-8]}
<Call 0x21b22 0x207c2> {[@@-8]}
<POP 21b26-21b28 StackAdj> Δ+4 {}
<MI 21b28 MOVE.B (A6-0x8),D0> {}
<MI 21b2c CMPI.B #0x0d,D0> {}
<MI 21b30 BEQ 0x21b9c> {}
<POP 21b32-21b44 Naked> Σ0 ↓ →0x21b52
<MI 21b32 CLR.L D1> {}
<MI 21b34 MOVE.B D0,D1> {}
<MI 21b36 LEA.L 0x207a2,A0> {}
<MI 21b3a MOVE.W D1,D0> {}
<MI 21b3c LSR.W #0x3,D0> {}
<MI 21b3e BTST.B D1,(A0+D0.W)> {}
<MI 21b42 BNE 0x21b52> {}
<POP 21b44-21b52 Naked> Σ0 →0x21b9a
<Const 0x21b44 0x7.2> Δ-2 {[#7]}
<Call 0x21b48 0x103d0> {[#7]}
WriteConsoleChar(chr : char)
<POP 21b4e-21b50 StackAdj> Δ+2 {}
<MI 21b50 BRA 0x21b9a> {}
<POP 21b52-21b62 Naked> Σ0 ↓ →0x21b7a ←0x21b32
<MI 21b52 MOVE.B D1,-(A7)> Δ-2 {[2, 'D1']}
<Call 0x21b54 0x103d0> {[2, 'D1']}
WriteConsoleChar(chr : char)
<POP 21b5a-21b5c StackAdj> Δ+2 {}
<MI 21b5c CMPI.B #0x39,D1> {}
<MI 21b60 BGT 0x21b7a> {}
<POP 21b62-21b7a Naked> Σ0 →0x21b96
<MI 21b62 MOVE.W D7,D0> {}
<MI 21b64 MULU.W #0x10,D0> {}
<MI 21b66 SUBI.W #0x0030,D1> {}
<MI 21b6a EXTW.L D1> {}
<MI 21b6c ADD.L D0,D1> {}
<POP 0x21b6e LimitCheck 0x0 ≤ D1 ≤ 0xffff> {}
<MI 21b78 BRA 0x21b96> {}
<POP 21b7a-21b96 Naked> Σ0 ↓ ←0x21b52
<MI 21b7a MOVE.W D7,D0> {}
<MI 21b7c MULU.W #0x10,D0> {}
<MI 21b7e SUBI.W #0x0041,D1> {}
<MI 21b82 EXTW.L D1> {}
<MI 21b84 ADD.L D0,D1> {}
<MI 21b86 ADDI.L #0x0000000a,D1> {}
<POP 0x21b8c LimitCheck 0x0 ≤ D1 ≤ 0xffff> {}
<POP 21b96-21b9a Naked> Σ0 ↓ ←0x21b62
<MI 21b96 MOVE.W D1,D7> {}
<MI 21b98 ADDQ.L #0x1,D6> {}
<POP 21b9a-21b9c Naked> Σ0 →0x21b1e ←0x21b44
<MI 21b9a BRA 0x21b1e> {}
<POP 21b9c-21ba0 Naked> Σ0 ↓ →0x21bb8 ←0x21b1e
<MI 21b9c TST.L D6> {}
<MI 21b9e BEQ 0x21bb8> {}
<POP 21ba0-21bb8 Naked> Σ0 ↓
<MI 21ba0 MOVEA.L (A6+0x8),A0> {}
<MI 21ba4 MOVE.W D7,D0> {}
<MI 21ba6 ANDI.W #0x3f00,D0> {}
<MI 21baa LSR.W #0x8,D0> {}
<MI 21bac MOVE.B D0,(A0)> {}
<MI 21bae MOVE.W D7,D0> {}
<MI 21bb0 ANDI.W #0x00ff,D0> {}
<MI 21bb4 MOVE.B D0,(A0+0x1)> {}
<POP 21bb8-21bc0 Epilogue> Σ0 ←0x21b9c
@ 21bc0
<LVAR 0x008 4(r)>
<POP 21bc0-21c50 Body>
<POP 21bc0-21bd6 Prologue> Σ0 ↓
<POP 21bd6-21be2 RegCacheLoad> Σ0 ↓
<POP 21be2-21be6 Naked> Σ0 ↓ →0x21bf4
<MI 21be2 TST.L (A6+0x8)> {}
<MI 21be4 BLT 0x21bf4> {}
<POP 21be6-21bec Naked> Σ0 ↓ →0x21bf4
<MI 21be6 MOVE.L (A6+0x8),D0> {}
<MI 21be8 CMP.L 0x224ce,D0> {}
<MI 21bea BGT 0x21bf4> {}
<POP 21bec-21bf4 Naked> Σ0 →0x21c48
<MI 21bec MOVE.L (A6+0x8),0x234f6> {}
<MI 21bf2 BRA 0x21c48> {}
<POP 21bf4-21c48 Naked> Σ0 ↓ ←0x21be2 ←0x21be6
<MI 21bf4 CLR.B 0x234fe> {}
<Blob 0x21bfa [24] @> Δ-24 {[«24""»]}
<Blob 0x21c06 [2] @> Δ-2 {[«24""»]|[«2""»]}
<POP 21c0a-21c0c StackAdj> Δ-8 {[«24""»]|[«2""»]|[-8-]}
<Lit 0x21c0c 24> {[«24""»]|[«2""»]|[-4-]|[$$Offset must be in [0 .._]}
<POP 21c1c-21c1d StackAdj> Δ-4 {[«24""»]|[«2""»]|[-4-]|[$$Offset must be in [0 .._]|[-4-]}
<Blob 0x21c1d [4] 0x224ce> Δ-4 {[«24""»]|[«2""»]|[-4-]|[$$Offset must be in [0 .._]|[-4-]|[«4»]}
<Call 0x21c1e 0x102e4> {[«24""»]|[«2""»]|[-4-]|[$$Offset must be in [0 .._]|[-4-]|[«4»]}
Long2String(a : Long) : String
<Lit 0x21c24 2> {[«24""»]|[«2""»]|[-4-]|[$$Offset must be in [0 .._]|[-4-]|[$$] ]}
<Call 0x21c36 0x102d4> {[«24""»]|[«2""»]|[-4-]|[$$Offset must be in [0 .._]|[-4-]|[$$] ]}
StringCat3(a, b, c : String) : String
<POP 21c3c-21c40 StackAdj> Δ+12 {[«24""»]|[«2""»]|[-4-]}
<Call 0x21c40 0x20bc2> {[«24""»]|[«2""»]|[-4-]}
<POP 21c44-21c48 StackAdj> Δ+30 {}
<POP 21c48-21c50 Epilogue> Σ0 ←0x21bec
@ 21c50
<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 21c50-21d22 Body> Δ-4
<POP 21c50-21c66 Prologue> Σ0 ↓
<POP 21c66-21c7c RegCacheLoad> Σ0 ↓
<POP 21c7c-21c8a Naked> Σ0 ↓ →0x21cd8
<MI 21c7c MOVEA.L (A6+0x8),A0> {}
<MI 21c7e MOVE.L #0xffffffff,(A0)> {}
<MI 21c84 TST.B (A6+0xe)> {}
<MI 21c88 BEQ 0x21cd8> {}
<POP 21c8a-21c96 Naked> Σ0 Δ-4 ↓
<MI 21c8a MOVE.L 0x234f6,D0> {}
<MI 21c8c ADDQ.L #0x1,D0> {}
<Blob 0x21c8e [4] 0x224ce> Δ-4 {[«4»]}
<MI 21c94 MOVE.L D0,D7> {[«4»]}
<POP 21c96-21c9a Naked> Σ-4 ↓ →0x21cd4 ←0x21cd0
<MI 21c96 CMP.L (A7),D7> {[-4-]}
<MI 21c98 BGT 0x21cd4> {[-4-]}
<POP 21c9a-21cbe Naked> Σ-4 ↓ →0x21cd0
<POP 0x21c9a LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {[-4-]}
<MI 21ca4 MOVE.L D7,D0> {[-4-]}
<MI 21ca6 ASL.L #0x1,D0> {[-4-]}
<MI 21ca8 LEA.L 0x224c6,A0> {[-4-]}
<MI 21caa MOVE.W (A0+D0.L+#0xc),(A6-0x4)> {[-4-]}
<MI 21cae CLR.L D0> {[-4-]}
<MI 21cb0 MOVE.B (A6-0x4),D0> {[-4-]}
<MI 21cb2 AND.W #0x3f,D0> {[-4-]}
<MI 21cb4 CLR.L D1> {[-4-]}
<MI 21cb6 MOVE.B (A6+0xc),D1> {[-4-]}
<MI 21cba CMP.W D0,D1> {[-4-]}
<MI 21cbc BNE 0x21cd0> {[-4-]}
<POP 21cbe-21cc8 Naked> Σ-4 ↓ →0x21cd0
<MI 21cbe MOVE.B (A6+0xd),D0> {[-4-]}
<MI 21cc2 CMP.B (A6-0x3),D0> {[-4-]}
<MI 21cc6 BNE 0x21cd0> {[-4-]}
<POP 21cc8-21cd0 Naked> Σ-4 Δ+4 →0x21d1a
<MI 21cc8 MOVEA.L (A6+0x8),A0> {[-4-]}
<MI 21cca MOVE.L D7,(A0)> {[-4-]}
<POP 21ccc-21cce StackAdj> Δ+4 {}
<MI 21cce BRA 0x21d1a> {}
<POP 21cd0-21cd4 Naked> Σ-4 ↓ →0x21c96 ←0x21c9a ←0x21cbe
<MI 21cd0 ADDQ.L #0x1,D7> {[-4-]}
<MI 21cd2 BVC 0x21c96> {[-4-]}
<POP 21cd4-21cd8 Naked> Σ-4 Δ+4 →0x21d1a ←0x21c96
<POP 21cd4-21cd6 StackAdj> Δ+4 {}
<MI 21cd6 BRA 0x21d1a> {}
<POP 21cd8-21cde Naked> Σ0 ↓ ←0x21c7c
<MI 21cd8 MOVE.L 0x234f6,D0> {}
<MI 21cda SUBQ.L #0x1,D0> {}
<MI 21cdc MOVE.L D0,D7> {}
<POP 21cde-21ce2 Naked> Σ0 ↓ →0x21d1a ←0x21d16
<MI 21cde TST.L D7> {}
<MI 21ce0 BLT 0x21d1a> {}
<POP 21ce2-21d06 Naked> Σ0 ↓ →0x21d16
<POP 0x21ce2 LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {}
<MI 21cec MOVE.L D7,D0> {}
<MI 21cee ASL.L #0x1,D0> {}
<MI 21cf0 LEA.L 0x224c6,A0> {}
<MI 21cf2 MOVE.W (A0+D0.L+#0xc),(A6-0x4)> {}
<MI 21cf6 CLR.L D0> {}
<MI 21cf8 MOVE.B (A6-0x4),D0> {}
<MI 21cfa AND.W #0x3f,D0> {}
<MI 21cfc CLR.L D1> {}
<MI 21cfe MOVE.B (A6+0xc),D1> {}
<MI 21d02 CMP.W D0,D1> {}
<MI 21d04 BNE 0x21d16> {}
<POP 21d06-21d10 Naked> Σ0 ↓ →0x21d16
<MI 21d06 MOVE.B (A6+0xd),D0> {}
<MI 21d0a CMP.B (A6-0x3),D0> {}
<MI 21d0e BNE 0x21d16> {}
<POP 21d10-21d16 Naked> Σ0 →0x21d1a
<MI 21d10 MOVEA.L (A6+0x8),A0> {}
<MI 21d12 MOVE.L D7,(A0)> {}
<MI 21d14 BRA 0x21d1a> {}
<POP 21d16-21d1a Naked> Σ0 ↓ →0x21cde ←0x21ce2 ←0x21d06
<MI 21d16 SUBQ.L #0x1,D7> {}
<MI 21d18 BVC 0x21cde> {}
<POP 21d1a-21d22 Epilogue> Σ0 ←0x21cc8 ←0x21cd4 ←0x21cde ←0x21d10
@ 21d22
<POP 21d22-21f88 Body>
<POP 21d22-21d38 Prologue> Σ0 ↓
<POP 21d38-21d52 RegCacheLoad> Σ0 ↓
<POP 21d52-21f80 Naked> Σ0 ↓
<Blob 0x21d52 [18] @> Δ-18 {[«18""»]}
<Blob 0x21d5e [14] @> Δ-14 {[«18""»]|[«14""»]}
<POP 21d70-21d72 StackAdj> Δ-8 {[«18""»]|[«14""»]|[-8-]}
<Call 0x21d72 0x209da> {[«18""»]|[«14""»]|[-8-]}
<POP 21d76-21d78 StackAdj> Δ-4 {[«18""»]|[«14""»]|[-12-]}
<Const 0x21d78 0x1.4> Δ-4 {[«18""»]|[«14""»]|[-12-]|[##1]}
<Const 0x21d7c 0x2d.4> Δ-4 {[«18""»]|[«14""»]|[-12-]|[##1]|[##45]}
<Call 0x21d7e 0x2080a> {[«18""»]|[«14""»]|[-12-]|[##1]|[##45]}
<POP 21d80-21d82 StackAdj> Δ+4 {[«18""»]|[«14""»]|[-12-]|[##1]}
<Lit 0x21d82 18> {[«18""»]|[«14""»]|[-12-]|[$$B - Put cursor at_]}
<POP 21d8e-21d8f StackAdj> Δ-4 {[«18""»]|[«14""»]|[-12-]|[$$B - Put cursor at_]|[-4-]}
<Blob 0x21d8f [4] 0x224ce> Δ-4 {[«18""»]|[«14""»]|[-12-]|[$$B - Put cursor at_]|[-4-]|[«4»]}
<Call 0x21d94 0x102e4> {[«18""»]|[«14""»]|[-12-]|[$$B - Put cursor at_]|[-4-]|[«4»]}
Long2String(a : Long) : String
<Lit 0x21d9a 13> {[«18""»]|[«14""»]|[-12-]|[$$B - Put cursor at_]|[-4-]|[$$ _]}
<Call 0x21da8 0x102dc> {[«18""»]|[«14""»]|[-12-]|[$$B - Put cursor at_]|[-4-]|[$$ _]}
StringCat5(a, b, c, d, e : String) : String
<POP 21dae-21db0 StackAdj> Δ+20 {[«18""»]|[«14""»]|[-4-]}
<Call 0x21db0 0x103d8> {[«18""»]|[«14""»]|[-4-]}
WriteConsoleString(str : String)
<MI 21db6 MOVEA.L A7,A0> {[«18""»]|[«14""»]|[-4-]}
<MI 21db8 LEA.L 0x2059a,A1> {[«18""»]|[«14""»]|[-4-]}
<BlockMove 35,A1,A0> {[«18""»]|[«14""»]|[-4-]}
<Blob 0x21dc4 [36] @> Δ-36 {[«18""»]|[«14""»]|[-4-]|[«36""»]}
<Blob 0x21dd4 [36] @> Δ-36 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]}
<POP 21de4-21de6 StackAdj> Δ-8 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]}
<Const 0x21de6 0x2.4> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[##2]}
<Const 0x21dea 0x2d.4> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[##2]|[##45]}
<Call 0x21dec 0x2080a> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[##2]|[##45]}
<POP 21dee-21df0 StackAdj> Δ+4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[##2]}
<Lit 0x21df0> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]}
<Pointer.sp 0x21df0 84> Δ-4
<Const 0x21df4 0x1.2> Δ-2
<Const 0x21df6 0x23.2> Δ-2
<Call 0x21df8 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21dfa-21dfc StackAdj> Δ+8
<POP 21dfa-21dfc StackAdj> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]}
<Const 0x21dfc 0x3.4> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[##3]}
<Const 0x21e00 0x2d.4> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[##3]|[##45]}
<Call 0x21e02 0x2080a> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[##3]|[##45]}
<POP 21e04-21e06 StackAdj> Δ+4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[##3]}
<Lit 0x21e06 35> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]}
<POP 21e10-21e12 StackAdj> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]|[-4-]}
<Const 0x21e12 0x4.4> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]|[-4-]|[##4]}
<Const 0x21e16 0x2d.4> Δ-4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]|[-4-]|[##4]|[##45]}
<Call 0x21e18 0x2080a> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]|[-4-]|[##4]|[##45]}
<POP 21e1a-21e1c StackAdj> Δ+4 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]|[-4-]|[##4]}
<Lit 0x21e1c 35> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-8-]|[$$…]|[-4-]|[$$O - Put cursor at desired offset _]|[-4-]|[$$N - Move cursor forward 1 _]}
<Call 0x21e28 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 21e2e-21e30 StackAdj> Δ+24 {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-4-]}
<Call 0x21e30 0x103d8> {[«18""»]|[«14""»]|[-4-]|[«36""»]|[«36""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21e36-21e37 StackAdj> Δ+112 ↓ {}
<Blob 0x21e37 [36] @> Δ-36 {[«36""»]}
<Blob 0x21e46 [36] @> Δ-36 {[«36""»]|[«36""»]}
<Blob 0x21e56 [36] @> Δ-36 {[«36""»]|[«36""»]|[«36""»]}
<POP 21e66-21e68 StackAdj> Δ-8 {[«36""»]|[«36""»]|[«36""»]|[-8-]}
<Const 0x21e68 0x5.4> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[##5]}
<Const 0x21e6c 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[##5]|[##45]}
<Call 0x21e6e 0x2080a> {[«36""»]|[«36""»]|[«36""»]|[-8-]|[##5]|[##45]}
<POP 21e70-21e72 StackAdj> Δ+4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[##5]}
<Lit 0x21e72 35> {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]}
<POP 21e7c-21e7e StackAdj> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]}
<Const 0x21e7e 0x6.4> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[##6]}
<Const 0x21e82 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[##6]|[##45]}
<Call 0x21e84 0x2080a> {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[##6]|[##45]}
<POP 21e86-21e88 StackAdj> Δ+4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[##6]}
<Lit 0x21e88 35> {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]}
<POP 21e92-21e94 StackAdj> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]|[-4-]}
<Const 0x21e94 0x7.4> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]|[-4-]|[##7]}
<Const 0x21e98 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]|[-4-]|[##7]|[##45]}
<Call 0x21e9a 0x2080a> {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]|[-4-]|[##7]|[##45]}
<POP 21e9c-21e9e StackAdj> Δ+4 {[«36""»]|[«36""»]|[«36""»]|[-8-]|[$$P - Move cursor back 1 _]|[-4-]|[$$S - Search back in time for uaddr _]|[-4-]|[##7]}
<Lit 0x21e9e 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 0x21eaa 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 21eb0-21eb2 StackAdj> Δ+24 {[«36""»]|[«36""»]|[«36""»]|[-4-]}
<Call 0x21eb2 0x103d8> {[«36""»]|[«36""»]|[«36""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21eb8-21eb9 StackAdj> Δ+112 ↓ {}
<Blob 0x21eb9 [36] @> Δ-36 {[«36""»]}
<Blob 0x21ec8 [36] @> Δ-36 {[«36""»]|[«36""»]}
<POP 21ed8-21eda StackAdj> Δ-8 {[«36""»]|[«36""»]|[-8-]}
<Const 0x21eda 0x8.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[##8]}
<Const 0x21ede 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[##8]|[##45]}
<Call 0x21ee0 0x2080a> {[«36""»]|[«36""»]|[-8-]|[##8]|[##45]}
<POP 21ee2-21ee4 StackAdj> Δ+4 {[«36""»]|[«36""»]|[-8-]|[##8]}
<Lit 0x21ee4 35> {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]}
<POP 21eee-21ef0 StackAdj> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]}
<Const 0x21ef0 0x9.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]|[##9]}
<Const 0x21ef4 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]|[##9]|[##45]}
<Call 0x21ef6 0x2080a> {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]|[##9]|[##45]}
<POP 21ef8-21efa StackAdj> Δ+4 {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]|[##9]}
<Lit 0x21efa 35> {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]|[$$F - Write trace info to file _]}
<Call 0x21f06 0x102d8> {[«36""»]|[«36""»]|[-8-]|[$$L - Display label - Incomplete _]|[-4-]|[$$F - Write trace info to file _]}
StringCat4(a, b, c, d : String) : String
<POP 21f0c-21f10 StackAdj> Δ+16 {[«36""»]|[«36""»]|[-4-]}
<Call 0x21f10 0x103d8> {[«36""»]|[«36""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21f16-21f17 StackAdj> Δ+76 ↓ {}
<Blob 0x21f17 [36] @> Δ-36 {[«36""»]}
<Blob 0x21f28 [36] @> Δ-36 {[«36""»]|[«36""»]}
<POP 21f38-21f3a StackAdj> Δ-8 {[«36""»]|[«36""»]|[-8-]}
<Const 0x21f3a 0xa.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[##10]}
<Const 0x21f3e 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[##10]|[##45]}
<Call 0x21f40 0x2080a> {[«36""»]|[«36""»]|[-8-]|[##10]|[##45]}
<POP 21f42-21f44 StackAdj> Δ+4 {[«36""»]|[«36""»]|[-8-]|[##10]}
<Lit 0x21f44 35> {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]}
<POP 21f4e-21f50 StackAdj> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]}
<Const 0x21f50 0xb.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[##11]}
<Const 0x21f54 0x2d.4> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[##11]|[##45]}
<Call 0x21f56 0x2080a> {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[##11]|[##45]}
<POP 21f58-21f5a StackAdj> Δ+4 {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[##11]}
<Lit 0x21f5a 35> {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[$$? - This stuff again _]}
<POP 21f64-21f66 StackAdj> Δ-4 {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[$$? - This stuff again _]|[-4-]}
<Call 0x21f66 0x20a28> {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[$$? - This stuff again _]|[-4-]}
<Call 0x21f6a 0x102dc> {[«36""»]|[«36""»]|[-8-]|[$$X - Exit _]|[-4-]|[$$? - This stuff again _]|[-4-]}
StringCat5(a, b, c, d, e : String) : String
<POP 21f70-21f72 StackAdj> Δ+20 {[«36""»]|[«36""»]|[-4-]}
<Call 0x21f72 0x103d8> {[«36""»]|[«36""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21f78-21f7a StackAdj> Δ+76 {}
<MI 21f7a CLR.B 0x234fe> {}
<POP 21f80-21f88 Epilogue> Σ0
@ 21f88
START
<POP 21f88--0001 Body> Δ+12
<POP 21f88-21f92 Prologue> Σ0
<POP 21f92-21fb2 RegCacheLoad> Σ0 ↓
<POP 21fb2-21fd2 Naked> Σ0 ↓
<Call 0x21fb2 0x10398> {}
FSCALL_10398
<Const 0x21fb8 0x0.4> Δ-4 {[##0]}
<Call 0x21fbc 0x104d8> {[##0]}
ExpInit(a : Long)
<POP 21fc2-21fc4 StackAdj> Δ+4 {}
<Call 0x21fc4 0x20f8e> {}
<MI 21fc8 CLR.B 0x2350a> {}
<MI 21fca MOVE.L 0x234fa,0x234f6> {}
<MI 21fd0 MOVE.B #0x01,0x234fe> {}
<POP 21fd2-21fd6 Naked> Σ0 ↓ →0x2200a ←0x2225e
<MI 21fd2 TST.B 0x234fe> {}
<MI 21fd4 BEQ 0x2200a> {}
<POP 21fd6-2200a Naked> Σ0 ↓
<Blob 0x21fd6 [4] 0x234f6> Δ-4 {[«4»]}
<Blob 0x21fd8 [2] 0x2350a> Δ-2 {[«4»]|[«2»]}
<Call 0x21fda 0x216e0> {[«4»]|[«2»]}
<POP 21fde-21fdf StackAdj> Δ+6 ↓ {}
<Blob 0x21fdf [12] @> Δ-12 {[«12""»]}
<POP 21fee-21ff0 StackAdj> Δ-4 {[«12""»]|[-4-]}
<Lit 0x21ff0 11> {[«12""»]|[$$Micro TRACE]}
<Call 0x22002 0x20bc2> {[«12""»]|[$$Micro TRACE]}
<POP 22006-2200a StackAdj> Δ+16 {}
<POP 2200a-2202c Naked> Σ0 ↓ →0x22236 ←0x21fd2
<MI 2200a MOVE.B #0x01,0x234fe> {}
<Const 0x2200c 0x23500.4> Δ-4 {[##144640]}
<Call 0x22012 0x21a40> {[##144640]}
<POP 22016-22018 StackAdj> Δ+4 {}
<MI 22018 CLR.L D0> {}
<MI 2201a MOVE.B 0x23500,D0> {}
<MI 22020 SUBI.W #0x003f,D0> {}
<MI 22024 CMPI.W #0x001b,D0> {}
<MI 22028 BHI 0x22236> {}
<POP 2202c-22036 Naked> Σ0 →0x2206e →0x22236 →0x22236 →0x22078 →0x22236 →0x22236 →0x22236 →0x22088 →0x22236 →0x22236 →0x22236 →0x22236 →0x22236 →0x2210a →0x22236 →0x22118 →0x22120 →0x22154 →0x22236 →0x2215c →0x2215c →0x22236 →0x22236 →0x22236 →0x22236 →0x221ea →0x22236 →0x2222e
<MI 2202c ADD.W D0,D0> {}
<MI 2202e SWITCH D0.W> {}
<POP 2206e-22072 Naked> Σ0 ↓ ←0x2202c
<Call 0x2206e 0x21d22> {}
<POP 22072-22078 Naked> Σ0 →0x2225e ←0x22088
<MI 22072 CLR.B 0x234fe> {}
<MI 22074 BRA 0x2225e> {}
<POP 22078-2207e Naked> Σ0 Δ-4 ↓ ←0x2202c
<Blob 0x22078 [4] 0x224ce> Δ-4 {[«4»]}
<POP 2207e-22088 Naked> Σ-4 Δ+4 →0x2225e ←0x22118 ←0x22154 ←0x2222e
<Call 0x2207e 0x21bc0> {[-4-]}
<POP 22082-22084 StackAdj> Δ+4 {}
<MI 22084 BRA 0x2225e> {}
<POP 22088-2210a Naked> Σ0 →0x22072 ←0x2202c
<Blob 0x22088 [10] @> Δ-10 {[«10""»]}
<POP 22098-2209a StackAdj> Δ-8 {[«10""»]|[-8-]}
<Lit 0x2209a 9> {[«10""»]|[-4-]|[$$Filename:]}
<Call 0x220aa 0x103e4> {[«10""»]|[-4-]|[$$Filename:]}
AskConsoleString(prompt : String) : String
<POP 220b0-220b2 StackAdj> Δ+4 {[«10""»]|[-4-]}
<MI 220b2 MOVE.L (A7)+,0x2350c> Δ+4 {[«10""»]}
<POP 220b8-220b9 StackAdj> Δ+10 ↓ {}
<Blob 0x220b9 [32] @> Δ-32 {[«32""»]}
<POP 220c8-220ca StackAdj> Δ-8 {[«32""»]|[-8-]}
<Lit 0x220ca 31> {[«32""»]|[-4-]|[$$Number of 128 word blocks (1): ]}
<Const 0x220dc 0x1.4> Δ-4 {[«32""»]|[-4-]|[$$Number of 128 word blocks (1): ]|[##1]}
<Const 0x220e0 0x7.4> Δ-4 {[«32""»]|[-4-]|[$$Number of 128 word blocks (1): ]|[##1]|[##7]}
<Call 0x220e4 0x103ec> {[«32""»]|[-4-]|[$$Number of 128 word blocks (1): ]|[##1]|[##7]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 220ea-220ec StackAdj> Δ+12 {[«32""»]|[-4-]}
<MI 220ec MOVE.L (A7)+,0x23506> Δ+4 {[«32""»]}
<POP 220f2-220f4 StackAdj> Δ+28 {[-4-]}
<POP 220f4-220f5 StackAdj> Δ+4 {}
<Blob 0x220f5 [4] 0x2350c> Δ-4 {[«4»]}
<Blob 0x220fa [4] 0x23506> Δ-4 {[«4»]|[«4»]}
<Call 0x22100 0x21904> {[«4»]|[«4»]}
<POP 22104-22106 StackAdj> Δ+8 {}
<MI 22106 BRA 0x22072> {}
<POP 2210a-22118 Naked> Σ0 →0x2225e ←0x2202c
<MI 2210a NEG.B 0x2350a> {}
<MI 2210c ADDQ.B #0x1,0x2350a> {}
<MI 2210e MOVE.B #0x01,0x234ff> {}
<MI 22114 BRA 0x2225e> {}
<POP 22118-22120 Naked> Σ0 Δ-4 →0x2207e ←0x2202c
<Blob 0x22118 [4] 0x234f6> Δ-4 {[«4»]}
<MI 2211a SUBQ.L #0x1,(A7)> {[-4-]}
<MI 2211c BRA 0x2207e> {[-4-]}
<POP 22120-22154 Naked> Σ0 →0x2225e ←0x2202c
<Blob 0x22120 [10] @> Δ-10 {[«10""»]}
<POP 22130-22132 StackAdj> Δ-8 {[«10""»]|[-8-]}
<Lit 0x22132 9> {[«10""»]|[-4-]|[$$ Offset: ]}
<Call 0x22142 0x103e8> {[«10""»]|[-4-]|[$$ Offset: ]}
AskOnConsoleInt(prompt: String) : Long
<POP 22148-2214a StackAdj> Δ+4 {[«10""»]|[-4-]}
<Call 0x2214a 0x21bc0> {[«10""»]|[-4-]}
<POP 2214e-22150 StackAdj> Δ+14 {}
<MI 22150 BRA 0x2225e> {}
<POP 22154-2215c Naked> Σ0 Δ-4 →0x2207e ←0x2202c
<Blob 0x22154 [4] 0x234f6> Δ-4 {[«4»]}
<MI 22156 ADDQ.L #0x1,(A7)> {[-4-]}
<MI 22158 BRA 0x2207e> {[-4-]}
<POP 2215c-22196 Naked> Σ0 Δ-2 ↓ →0x22198 ←0x2202c ←0x2202c
<Blob 0x2215c [14] @> Δ-14 {[«14""»]}
<POP 22168-2216a StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x2216a 14> {[«14""»]|[$$Microaddress:_]}
<Const 0x2217a 0x23510.4> Δ-4 {[«14""»]|[$$Microaddress:_]|[##144656]}
<Call 0x22180 0x21af6> {[«14""»]|[$$Microaddress:_]|[##144656]}
<POP 22184-22188 StackAdj> Δ+20 {[-2-]}
<MI 22188 CLR.B (A7)> {[-2-]}
<MI 2218a MOVE.B 0x23500,D0> {[-2-]}
<MI 22190 CMPI.B #0x53,D0> {[-2-]}
<MI 22194 BNE 0x22198> {[-2-]}
<POP 22196-22198 Naked> Σ-2 ↓
<MI 22196 ADDQ.B #0x1,(A7)> {[-2-]}
<POP 22198-221b2 Naked> Σ-2 Δ+2 ↓ →0x221c0 ←0x2215c
<Blob 0x22198 [2] 0x23510> Δ-2 {[-2-]|[«2»]}
<Const 0x2219e 0x23502.4> Δ-4 {[-2-]|[«2»]|[##144642]}
<Call 0x221a4 0x21c50> {[-2-]|[«2»]|[##144642]}
<POP 221a8-221aa StackAdj> Δ+8 {}
<MI 221aa TST.L 0x23502> {}
<MI 221b0 BLT 0x221c0> {}
<POP 221b2-221c0 Naked> Σ0 →0x221e8
<Blob 0x221b2 [4] 0x23502> Δ-4 {[«4»]}
<Call 0x221b8 0x21bc0> {[«4»]}
<POP 221bc-221be StackAdj> Δ+4 {}
<MI 221be BRA 0x221e8> {}
<POP 221c0-221e8 Naked> Σ0 ↓ ←0x22198
<Blob 0x221c0 [22] @> Δ-22 {[«22""»]}
<POP 221cc-221ce StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x221ce 22> {[«22""»]|[$$Microaddress not found]}
<Call 0x221de 0x20bc2> {[«22""»]|[$$Microaddress not found]}
<POP 221e2-221e6 StackAdj> Δ+26 {}
<MI 221e6 CLR.B 0x234fe> {}
<POP 221e8-221ea Naked> Σ0 →0x2225e ←0x221b2
<MI 221e8 BRA 0x2225e> {}
<POP 221ea-2222e Naked> Σ0 →0x2225e ←0x2202c
<POP 221ea-221ec StackAdj> Δ-8 {[-8-]}
<Const 0x221ec 0x1.4> Δ-4 {[-8-]|[##1]}
<Blob 0x221f0 [4] 0x234f2> Δ-4 {[-8-]|[##1]|[«4»]}
<Call 0x221f6 0x2088c> {[-8-]|[##1]|[«4»]}
<POP 221fa-221fc StackAdj> Δ+4 {[-8-]|[##1]}
<Const 0x221fc 0x1.4> Δ-4 {[-8-]|[##1]|[##1]}
<Const 0x22200 0x1.4> Δ-4 {[-8-]|[##1]|[##1]|[##1]}
<Call 0x22204 0x2080a> {[-8-]|[##1]|[##1]|[##1]}
<POP 22208-2220a StackAdj> Δ+4 {[-8-]|[##1]|[##1]}
<Call 0x2220a 0x20994> {[-8-]|[##1]|[##1]}
<Call 0x2220e 0x102d4> {[-8-]|[##1]|[##1]}
StringCat3(a, b, c : String) : String
<POP 22214-22216 StackAdj> Δ+12 {[-4-]}
<Call 0x22216 0x103d8> {[-4-]}
WriteConsoleString(str : String)
<POP 2221c-2221e StackAdj> Δ+2 {[-2-]}
<MI 2221e CLR.B (A7)> {[-2-]}
<Const 0x22220 0x1.4> Δ-4 {[-2-]|[##1]}
<Call 0x22224 0x103b8> {[-2-]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 2222a-2222c StackAdj> Δ+6 {}
<MI 2222c BRA 0x2225e> {}
<POP 2222e-22236 Naked> Σ0 Δ-4 →0x2207e ←0x2202c
<Const 0x2222e 0x0.4> Δ-4 {[##0]}
<MI 22232 BRA 0x2207e> {[##0]}
<POP 22236-2225e Naked> Σ0 ↓ ←0x2200a ←0x2202c ←0x2202c ←0x2202c ←0x2202c ←0x2202c ←0x2202c ←0x2202c ←0x2202c ←0x2202c ←0x2202c ←0x2202c ←0x2202c ←0x2202c ←0x2202c ←0x2202c ←0x2202c ←0x2202c
<MI 22236 CLR.B 0x234fe> {}
<Blob 0x22238 [28] @> Δ-28 {[«28""»]}
<POP 22244-22246 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x22246 28> {[«28""»]|[$$Illegal Command - ? for help]}
<Call 0x22256 0x20bc2> {[«28""»]|[$$Illegal Command - ? for help]}
<POP 2225a-2225e StackAdj> Δ+32 {}
<POP 2225e-22262 Naked> Σ0 →0x21fd2 ←0x22072 ←0x2207e ←0x2210a ←0x22120 ←0x221e8 ←0x221ea
<MI 2225e BRA 0x21fd2> {}
<POP 22268-2226e Naked> Σ0
<Call 0x22268 0x10568> {}
Run_Experiment()
@ 222ce
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 222ce-22336 Body>
<POP 222ce-222e4 Prologue> Σ0 ↓
<POP 222e4-2232e Naked> Σ0 ↓
<Blob 0x222e4 [14] @> Δ-14 {[«14""»]}
<Const 0x222f0 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 222f4-222f6 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x222f6 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 22308-2230a StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2230a MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2230e EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 22310 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 22312 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x22314 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 2231a-2231c StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x2231c 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 22322-22324 StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x22324 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 2232a-2232e StackAdj> Δ+20 {}
<POP 2232e-22336 Epilogue> Σ0
@ 2238a
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 2238a-224c6 Body>
<POP 2238a-223a0 Prologue> Σ0 ↓
<POP 223a0-223b6 RegCacheLoad> Σ0 ↓
<POP 223b6-22416 Naked> Σ0 ↓ →0x2245e
<Call 0x223b6 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x223bc [18] @> Δ-18 {[«18""»]}
<POP 223c8-223ca StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x223ca 18> {[«18""»]|[$$Experiment error :]}
<Call 0x223d6 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 223d8-223d9 StackAdj> Δ+22 ↓ {}
<Blob 0x223d9 [14] @> Δ-14 {[«14""»]}
<POP 223e8-223ea StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x223ea 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 223f4-223f6 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 223f6 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x223fa 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 22400-22402 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x22402 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 22408-2240a StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x2240a 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2240c-2240e StackAdj> Δ+18 {}
<MI 2240e MOVEA.L (A6+0xa),A0> {}
<MI 22412 CMPA.W #0x01,A0> {}
<MI 22414 BEQ 0x2245e> {}
<POP 22416-2245e Naked> Σ0 ↓
<Blob 0x22416 [14] @> Δ-14 {[«14""»]}
<Blob 0x22426 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 22436-22438 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x22438 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 22442-22444 StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x22444> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x22444 12> Δ-4
<Const 0x22448 0x1.2> Δ-2
<Const 0x2244a 0x1e.2> Δ-2
<Call 0x2244c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2244e-22450 StackAdj> Δ+8
<Call 0x22450 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 22456-22458 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x22458 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2245a-2245e StackAdj> Δ+48 {}
<POP 2245e-224be Naked> Σ0 ↓ ←0x223b6
<Blob 0x2245e [14] @> Δ-14 {[«14""»]}
<POP 2246e-22470 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x22470 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 2247a-2247c StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 2247c MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x22480 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 22486-22488 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x22488 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 2248e-22490 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x22490 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22492-22493 StackAdj> Δ+18 ↓ {}
<Blob 0x22493 [24] @> Δ-24 {[«24""»]}
<Const 0x224a2 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 224a6-224a8 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x224a8 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x224b6 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 224bc-224be StackAdj> Δ+30 {}
<POP 224be-224c6 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.26e7bec4f274f3d1 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 1f 88 | | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 35 22 | 5" | .PTR 0x23522 00020010 code.end: 00020010 00 02 24 c6 | $ | .PTR 0x224c6 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 22 ce | " | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 23 8a | # | .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 20 5b | [ | .TXT ' [' 0002010c 3b 20 |; | .TXT '; ' 0002010e 48 20 |H | .TXT 'H ' 00020110 20 5b | [ | .TXT ' [' 00020112 3b 20 |; | .TXT '; ' 00020114 72 20 |r | .TXT 'r ' 00020116 20 5b 30 4a | [0J | .TXT ' [0J' 0002011a 20 5b | [ | .TXT ' [' 0002011c 37 3b |7; | .TXT '7;' 0002011e 31 6d |1m | .TXT '1m' 00020120 20 5b 30 6d | [0m | .TXT ' [0m' 00020124 20 5b 30 4b | [0K | .TXT ' [0K' 00020128 20 5b | [ | .TXT ' [' 0002012a 63 20 |c | .XXX[0x2] 0002012c 43 6f 6d 6d 61 6e 64 3a |Command:| .TXT 'Command:_ ' 00020136 50 72 |Pr | .XXX[0x2] 00020138 6f 67 72 61 6d 20 69 6e |ogram in| .XXX[0x30] 00020140 76 6f 63 61 74 69 6f 6e |vocation| 00020148 20 65 72 72 6f 72 2c 20 | error, | 00020150 6e 6f 6e 2d 69 6e 74 65 |non-inte| 00020158 67 65 72 20 63 6f 6d 6d |ger comm| 00020160 61 6e 64 20 6c 69 6e 65 |and line| 00020168 4c 6f 61 64 69 6e 67 20 |Loading | .TXT 'Loading trace data from IOC board.' 0002018a 4c 6f 61 64 69 6e 67 20 |Loading | .TXT 'Loading trace data from crashdump disk file.' 000201b6 43 52 41 53 48 5f 44 55 |CRASH_DU| .TXT 'CRASH_DUMP.SAVED_STATE' 000201cc 41 44 41 5f 44 45 46 49 |ADA_DEFI| .TXT 'ADA_DEFINED ' 000201d8 4d 49 4c 44 |MILD | .TXT 'MILD' 000201dc 53 45 |SE | .TXT 'SE' 000201de 56 45 |VE | .TXT 'VE' 000201e0 52 45 |RE | .TXT 'RE' 000201e2 45 56 45 4e 54 53 2e 53 |EVENTS.S| .TXT 'EVENTS.STOP_MACHINE_EVENT ' 000201fc 45 56 45 4e 54 53 2e 47 |EVENTS.G| .TXT 'EVENTS.GENERAL_TIMER_EVENT' 00020216 45 56 45 4e 54 53 2e 53 |EVENTS.S| .TXT 'EVENTS.SLICE_TIMER_EVENT' 0002022e 2a 20 55 6e 64 65 66 69 |* Undefi| .TXT '* Undefined_event_0118' 00020244 49 4f 2e 52 45 43 45 49 |IO.RECEI| .TXT 'IO.RECEIVE_PACKET ' 00020256 49 4f 2e 52 45 43 45 49 |IO.RECEI| .TXT 'IO.RECEIVE_STATUS ' 00020268 2a 20 55 6e 64 65 66 69 |* Undefi| .TXT '* Undefined_event_0130' 0002027e 45 56 45 4e 54 53 2e 52 |EVENTS.R| .TXT 'EVENTS.REFRESH_MEMORY_EVENT ' 0002029a 45 56 45 4e 54 53 2e 49 |EVENTS.I| .TXT 'EVENTS.IBUF_EMPTY_EVENT ' 000202b2 45 56 45 4e 54 53 2e 42 |EVENTS.B| .TXT 'EVENTS.BREAK_CLASS_EVENT' 000202ca 2a 20 55 6e 64 65 66 69 |* Undefi| .TXT '* Undefined_event_0150' 000202e0 45 56 45 4e 54 53 2e 54 |EVENTS.T| .TXT 'EVENTS.TOS_OPTIMIZATION_ERR_EVENT ' 00020302 45 56 45 4e 54 53 2e 52 |EVENTS.R| .TXT 'EVENTS.RESOLVE_REFERENCE_EVENT' 00020320 2a 20 55 6e 64 65 66 69 |* Undefi| .TXT '* Undefined_event_168 ' 00020336 45 56 45 4e 54 53 2e 43 |EVENTS.C| .TXT 'EVENTS.CSA_OVERFLOW_EVENT ' 00020350 45 56 45 4e 54 53 2e 43 |EVENTS.C| .TXT 'EVENTS.CSA_UNDERFLOW_EVENT' 0002036a 50 41 47 45 5f 46 41 55 |PAGE_FAU| .TXT 'PAGE_FAULT.MEMORY_EXCEPTION_EVENT ' 0002038c 45 56 45 4e 54 53 2e 43 |EVENTS.C| .TXT 'EVENTS.CORRECTABLE_ERROR_EVENT' 000203aa 45 56 45 4e 54 53 2e 4d |EVENTS.M| .TXT 'EVENTS.MICRO_BREAK_EVENT' 000203c2 45 56 45 4e 54 53 2e 45 |EVENTS.E| .TXT 'EVENTS.EXIT_CHECK_ERROR_EVENT ' 000203e0 45 56 45 4e 54 53 2e 46 |EVENTS.F| .TXT 'EVENTS.FIELD_NUMBER_ERROR_EVENT ' 00020400 45 56 45 4e 54 53 2e 43 |EVENTS.C| .TXT 'EVENTS.CLASS_ERROR_EVENT' 00020418 45 56 45 4e 54 53 2e 42 |EVENTS.B| .TXT 'EVENTS.BINARY_EQ_PRIVACY_CK_EVENT ' 0002043a 45 56 45 4e 54 53 2e 42 |EVENTS.B| .TXT 'EVENTS.BINARY_OP_PRIVACY_CK_EVENT ' 0002045c 45 56 45 4e 54 53 2e 54 |EVENTS.T| .TXT 'EVENTS.TOS_OP_PRIVACY_CHECK_EVENT ' 0002047e 45 56 45 4e 54 53 2e 4e |EVENTS.N| .TXT 'EVENTS.NTOS_OP_PRIVACY_CHECK_EVENT' 000204a0 45 56 45 4e 54 53 2e 50 |EVENTS.P| .TXT 'EVENTS.PAGE_CROSSING_EVENT' 000204ba 45 56 45 4e 54 53 2e 53 |EVENTS.S| .TXT 'EVENTS.SYSTEM_CLASS_ERROR_EVENT ' 000204da 49 4f 2e 52 45 43 45 49 |IO.RECEI| .TXT 'IO.RECEIVE_PACKET_MICRO_EVENT ' 000204f8 49 4f 2e 52 45 43 45 49 |IO.RECEI| .TXT 'IO.RECEIVE_STATUS_MICRO_EVENT ' 00020516 49 4f 2e 58 46 45 52 5f |IO.XFER_| .TXT 'IO.XFER_COMPLETE_MICRO_EVENT' 00020532 45 56 45 4e 54 53 2e 55 |EVENTS.U| .TXT 'EVENTS.UNIMPLEMENTED_OPCODE ' 0002054e 2b 20 |+ | .TXT '+ ' 00020550 20 48 | H | .TXT ' H' 00020552 20 5f | _ | .TXT ' _' 00020554 20 43 | C | .TXT ' C' 00020556 5f 20 |_ | .XXX[0x2] 00020558 20 20 | | .TXT ' ' 0002055a 5f 20 |_ | .XXX[0x2] 0002055c 20 20 20 5f | _ | .TXT ' _' 00020560 4f 66 66 73 65 74 20 6d |Offset m| .TXT 'Offset must be in [0 .._' 00020578 5d 20 |] | .TXT '] ' 0002057a 42 20 2d 20 50 75 74 20 |B - Put | .TXT 'B - Put cursor at_' 0002058c 20 20 20 20 20 20 20 20 | | .TXT ' _ ' 0002059a 5a 20 2d 20 50 75 |Z - Pu | .XXX[0x6] 000205a0 74 20 63 75 72 73 6f 72 |t cursor| .XXX[0x18] 000205a8 20 61 74 20 30 20 20 20 | at 0 | 000205b0 20 20 20 20 20 20 20 20 | | 000205b8 20 20 20 20 5f 20 | _ | .XXX[0x6] 000205be 4f 20 2d 20 50 75 74 20 |O - Put | .TXT 'O - Put cursor at desired offset _ ' 000205e2 4e 20 2d 20 4d 6f 76 65 |N - Move| .TXT 'N - Move cursor forward 1 _ ' 00020606 50 20 2d 20 4d 6f 76 65 |P - Move| .TXT 'P - Move cursor back 1 _ ' 0002062a 53 20 2d 20 53 65 61 72 |S - Sear| .TXT 'S - Search back in time for uaddr _ ' 0002064e 52 20 2d 20 52 65 76 65 |R - Reve| .TXT 'R - Reverse search, forward in time ' 00020672 4c 20 2d 20 44 69 73 70 |L - Disp| .TXT 'L - Display label - Incomplete _ ' 00020696 46 20 2d 20 57 72 69 74 |F - Writ| .TXT 'F - Write trace info to file _ ' 000206ba 58 20 2d 20 45 78 69 74 |X - Exit| .TXT 'X - Exit _ ' 000206de 3f 20 2d 20 54 68 69 73 |? - This| .TXT '? - This stuff again _ ' 00020702 4e 75 6d 62 65 72 20 6f |Number o| .TXT 'Number of 128 word blocks (1): ' 00020722 4d 69 63 72 6f 20 54 52 |Micro TR| .TXT 'Micro TRACE ' 0002072e 46 69 6c 65 6e 61 6d 65 |Filename| .TXT 'Filename: ' 00020738 20 4f 66 66 73 65 74 3a | Offset:| .TXT ' Offset: ' 00020742 4d 69 63 72 6f 61 64 64 |Microadd| .TXT 'Microaddress:_' 00020750 4d 69 63 72 6f 61 64 64 |Microadd| .TXT 'Microaddress not found' 00020766 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal Command - ? for help' 00020782 00 00 00 00 00 00 | | .XXX[0x6] 00020788 00 00 00 00 00 00 fe ff | | .XXX[0x10] 00020790 ff 07 00 00 00 00 00 00 | | 00020798 00 00 00 00 00 00 00 00 | | .BLANK 00[0x10] 000207a8 ff 03 7e 00 00 00 00 00 | ~ | .XXX[0x8] 000207b0 00 00 00 00 00 00 00 00 | | .BLANK 00[0x10] 000207c0 00 00 | | .XXX[0x2] 000207c2 ; -------------------------------------------------------------------------------------- 000207c2 ; OMSI PASCAL Function 000207c2 ; <LVAR 0x008 4(r)> 000207c2 ; -------------------------------------------------------------------------------------- 000207c2 4e 56 ff ea |NV | LINK.W A6,#0xffea 000207c6 bf d5 | | CMPA.L (A5),A7 000207c8 62 06 |b | BHI 0x207d0 000207ca 44 fc 00 02 |D | MOVE.W #0x2,CCR 000207ce 4e 76 |Nv | TRAPV 000207d0 de fc 00 16 | | ADDA.W #0x16,A7 000207d4 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 000207d8 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000207dc 55 4f |UO | SUBQ.L #0x2,A7 000207de 4e b9 00 01 03 d4 |N | JSR ReadChar() : Byte 000207e4 10 1f | | MOVE.B (A7)+,D0 000207e6 10 80 | | MOVE.B D0,(A0) 000207e8 0c 00 00 61 | a | CMPI.B #0x61,D0 000207ec 65 14 |e | BCS 0x20802 000207ee 0c 00 00 7a | z | CMPI.B #0x7a,D0 000207f2 62 0e |b | BHI 0x20802 000207f4 42 81 |B | CLR.L D1 000207f6 12 00 | | MOVE.B D0,D1 000207f8 04 41 00 20 | A | SUBI.W #0x0020,D1 000207fc 43 bc 00 ff |C | CHK.W #0xff,D1 00020800 10 81 | | MOVE.B D1,(A0) 00020802 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00020806 4e 5e |N^ | UNLK A6 00020808 4e 75 |Nu | RTS 0002080a ; -------------------------------------------------------------------------------------- 0002080a ; OMSI PASCAL Function 0002080a ; <LVAR 0x010 4(w)> 0002080a ; <LVAR 0x00c 4(r)> 0002080a ; <LVAR 0x008 4(r)> 0002080a ; -------------------------------------------------------------------------------------- 0002080a 4e 56 ff c2 |NV | LINK.W A6,#0xffc2 0002080e bf d5 | | CMPA.L (A5),A7 00020810 62 06 |b | BHI 0x20818 00020812 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020816 4e 76 |Nv | TRAPV 00020818 de fc 00 3a | : | ADDA.W #0x3a,A7 0002081c 48 e7 c0 88 |H | MOVEM.L A4+A0+D1+D0,-(A7) 00020820 41 f9 00 01 02 c4 |A | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A0 00020826 70 01 |p | MOVEQ.L #0x01,D0 00020828 72 02 |r | MOVEQ.L #0x02,D1 0002082a 3f 3a f8 de |?: | MOVE.W 0x2010a,-(A7) 0002082e 3f 3a f8 dc |?: | MOVE.W 0x2010c,-(A7) 00020832 3f 3a f8 da |?: | MOVE.W 0x2010e,-(A7) 00020836 51 4f |QO | SUBQ.L #0x8,A7 00020838 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002083c 3f 00 |? | MOVE.W D0,-(A7) 0002083e 3f 01 |? | MOVE.W D1,-(A7) 00020840 4e 90 |N | JSR (A0) 00020842 2e ae 00 0c |. | MOVE.L (A6+0xc),(A7) 00020846 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002084c 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00020850 3f 00 |? | MOVE.W D0,-(A7) 00020852 3f 01 |? | MOVE.W D1,-(A7) 00020854 4e 90 |N | JSR (A0) 00020856 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 0002085a 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00020860 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00020864 3f 00 |? | MOVE.W D0,-(A7) 00020866 3f 01 |? | MOVE.W D1,-(A7) 00020868 4e 90 |N | JSR (A0) 0002086a 50 4f |PO | ADDQ.L #0x8,A7 0002086c 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 00020872 de fc 00 14 | | ADDA.W #0x14,A7 00020876 28 5f |(_ | MOVEA.L (A7)+,A4 00020878 5c 4f |\O | ADDQ.L #0x6,A7 0002087a 19 7c 00 1b 00 02 | | | MOVE.B #0x1b,(A4+0x2) 00020880 2d 4c 00 10 |-L | MOVE.L A4,(A6+0x10) 00020884 4c df 11 03 |L | MOVEM.L (A7)+,D0+D1+A0+A4 00020888 4e 5e |N^ | UNLK A6 0002088a 4e 75 |Nu | RTS 0002088c ; -------------------------------------------------------------------------------------- 0002088c ; OMSI PASCAL Function 0002088c ; <LVAR 0x010 4(w)> 0002088c ; <LVAR 0x00c 4(r)> 0002088c ; <LVAR 0x008 4(r)> 0002088c ; -------------------------------------------------------------------------------------- 0002088c 4e 56 ff c2 |NV | LINK.W A6,#0xffc2 00020890 bf d5 | | CMPA.L (A5),A7 00020892 62 06 |b | BHI 0x2089a 00020894 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020898 4e 76 |Nv | TRAPV 0002089a de fc 00 3a | : | ADDA.W #0x3a,A7 0002089e 48 e7 c0 88 |H | MOVEM.L A4+A0+D1+D0,-(A7) 000208a2 41 f9 00 01 02 c4 |A | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A0 000208a8 70 01 |p | MOVEQ.L #0x01,D0 000208aa 72 02 |r | MOVEQ.L #0x02,D1 000208ac 3f 3a f8 62 |?: b | MOVE.W 0x20110,-(A7) 000208b0 3f 3a f8 60 |?: ` | MOVE.W 0x20112,-(A7) 000208b4 3f 3a f8 5e |?: ^ | MOVE.W 0x20114,-(A7) 000208b8 51 4f |QO | SUBQ.L #0x8,A7 000208ba 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000208be 3f 00 |? | MOVE.W D0,-(A7) 000208c0 3f 01 |? | MOVE.W D1,-(A7) 000208c2 4e 90 |N | JSR (A0) 000208c4 2e ae 00 0c |. | MOVE.L (A6+0xc),(A7) 000208c8 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000208ce 48 6f 00 12 |Ho | PEA.L (A7+0x12) 000208d2 3f 00 |? | MOVE.W D0,-(A7) 000208d4 3f 01 |? | MOVE.W D1,-(A7) 000208d6 4e 90 |N | JSR (A0) 000208d8 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 000208dc 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000208e2 48 6f 00 18 |Ho | PEA.L (A7+0x18) 000208e6 3f 00 |? | MOVE.W D0,-(A7) 000208e8 3f 01 |? | MOVE.W D1,-(A7) 000208ea 4e 90 |N | JSR (A0) 000208ec 50 4f |PO | ADDQ.L #0x8,A7 000208ee 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 000208f4 de fc 00 14 | | ADDA.W #0x14,A7 000208f8 28 5f |(_ | MOVEA.L (A7)+,A4 000208fa 5c 4f |\O | ADDQ.L #0x6,A7 000208fc 19 7c 00 1b 00 02 | | | MOVE.B #0x1b,(A4+0x2) 00020902 2d 4c 00 10 |-L | MOVE.L A4,(A6+0x10) 00020906 4c df 11 03 |L | MOVEM.L (A7)+,D0+D1+A0+A4 0002090a 4e 5e |N^ | UNLK A6 0002090c 4e 75 |Nu | RTS 0002090e ; -------------------------------------------------------------------------------------- 0002090e ; OMSI PASCAL Function 0002090e ; <LVAR 0x00c 4(r)> 0002090e ; <LVAR 0x008 4(r)> 0002090e ; -------------------------------------------------------------------------------------- 0002090e 4e 56 ff da |NV | LINK.W A6,#0xffda 00020912 bf d5 | | CMPA.L (A5),A7 00020914 62 06 |b | BHI 0x2091c 00020916 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002091a 4e 76 |Nv | TRAPV 0002091c de fc 00 1e | | ADDA.W #0x1e,A7 00020920 48 e7 81 08 |H | MOVEM.L A4+D7+D0,-(A7) 00020924 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00020928 0c 80 00 00 00 44 | D | CMPI.L #0x00000044,D0 0002092e 66 0a |f | BNE 0x2093a 00020930 59 4f |YO | SUBQ.L #0x4,A7 00020932 2f 39 00 02 34 ea |/9 4 | MOVE.L 0x234ea,-(A7) 00020938 60 06 |` | BRA 0x20940 0002093a 59 4f |YO | SUBQ.L #0x4,A7 0002093c 48 78 00 01 |Hx | PEA.L 0x1 00020940 48 78 00 01 |Hx | PEA.L 0x1 00020944 4e ba fe c4 |N | JSR 0x2080a 00020948 50 4f |PO | ADDQ.L #0x8,A7 0002094a 28 5f |(_ | MOVEA.L (A7)+,A4 0002094c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020950 7e 01 |~ | MOVEQ.L #0x01,D7 00020952 be 97 | | CMP.L (A7),D7 00020954 6e 2c |n, | BGT 0x20982 00020956 2f 0c |/ | MOVE.L A4,-(A7) 00020958 1f 3c 00 1b | < | MOVE.B #0x1b,-(A7) 0002095c 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00020962 54 4f |TO | ADDQ.L #0x2,A7 00020964 2e 8c |. | MOVE.L A4,(A7) 00020966 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 0002096a 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 00020970 63 02 |c | BLS 0x20974 00020972 4e 4f |NO | TRAP #15 00020974 1f 00 | | MOVE.B D0,-(A7) 00020976 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 0002097c 5c 4f |\O | ADDQ.L #0x6,A7 0002097e 52 87 |R | ADDQ.L #0x1,D7 00020980 68 d0 |h | BVC 0x20952 00020982 2e 8c |. | MOVE.L A4,(A7) 00020984 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 0002098a 58 4f |XO | ADDQ.L #0x4,A7 0002098c 4c df 10 81 |L | MOVEM.L (A7)+,D0+D7+A4 00020990 4e 5e |N^ | UNLK A6 00020992 4e 75 |Nu | RTS 00020994 ; -------------------------------------------------------------------------------------- 00020994 ; OMSI PASCAL Function 00020994 ; <LVAR 0x008 4(w)> 00020994 ; -------------------------------------------------------------------------------------- 00020994 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 00020998 bf d5 | | CMPA.L (A5),A7 0002099a 62 06 |b | BHI 0x209a2 0002099c 44 fc 00 02 |D | MOVE.W #0x2,CCR 000209a0 4e 76 |Nv | TRAPV 000209a2 de fc 00 18 | | ADDA.W #0x18,A7 000209a6 48 e7 00 08 |H | MOVEM.L A4,-(A7) 000209aa 2f 3a f7 6a |/: j | MOVE.L 0x20116,-(A7) 000209ae 59 4f |YO | SUBQ.L #0x4,A7 000209b0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000209b4 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000209b8 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 000209bc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000209c2 50 4f |PO | ADDQ.L #0x8,A7 000209c4 28 5f |(_ | MOVEA.L (A7)+,A4 000209c6 58 4f |XO | ADDQ.L #0x4,A7 000209c8 19 7c 00 1b 00 02 | | | MOVE.B #0x1b,(A4+0x2) 000209ce 2d 4c 00 08 |-L | MOVE.L A4,(A6+0x8) 000209d2 4c df 10 00 |L | MOVEM.L (A7)+,A4 000209d6 4e 5e |N^ | UNLK A6 000209d8 4e 75 |Nu | RTS 000209da ; -------------------------------------------------------------------------------------- 000209da ; OMSI PASCAL Function 000209da ; <LVAR 0x008 4(w)> 000209da ; -------------------------------------------------------------------------------------- 000209da 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 000209de bf d5 | | CMPA.L (A5),A7 000209e0 62 06 |b | BHI 0x209e8 000209e2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000209e6 4e 76 |Nv | TRAPV 000209e8 de fc 00 1a | | ADDA.W #0x1a,A7 000209ec 48 e7 00 08 |H | MOVEM.L A4,-(A7) 000209f0 3f 3a f7 2c |?: , | MOVE.W 0x2011e,-(A7) 000209f4 3f 3a f7 26 |?: & | MOVE.W 0x2011c,-(A7) 000209f8 3f 3a f7 20 |?: | MOVE.W 0x2011a,-(A7) 000209fc 59 4f |YO | SUBQ.L #0x4,A7 000209fe 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a02 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020a06 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00020a0a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020a10 50 4f |PO | ADDQ.L #0x8,A7 00020a12 28 5f |(_ | MOVEA.L (A7)+,A4 00020a14 5c 4f |\O | ADDQ.L #0x6,A7 00020a16 19 7c 00 1b 00 02 | | | MOVE.B #0x1b,(A4+0x2) 00020a1c 2d 4c 00 08 |-L | MOVE.L A4,(A6+0x8) 00020a20 4c df 10 00 |L | MOVEM.L (A7)+,A4 00020a24 4e 5e |N^ | UNLK A6 00020a26 4e 75 |Nu | RTS 00020a28 ; -------------------------------------------------------------------------------------- 00020a28 ; OMSI PASCAL Function 00020a28 ; <LVAR 0x008 4(w)> 00020a28 ; -------------------------------------------------------------------------------------- 00020a28 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 00020a2c bf d5 | | CMPA.L (A5),A7 00020a2e 62 06 |b | BHI 0x20a36 00020a30 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020a34 4e 76 |Nv | TRAPV 00020a36 de fc 00 18 | | ADDA.W #0x18,A7 00020a3a 48 e7 00 08 |H | MOVEM.L A4,-(A7) 00020a3e 2f 3a f6 e0 |/: | MOVE.L 0x20120,-(A7) 00020a42 59 4f |YO | SUBQ.L #0x4,A7 00020a44 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a48 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020a4c 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020a50 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020a56 50 4f |PO | ADDQ.L #0x8,A7 00020a58 28 5f |(_ | MOVEA.L (A7)+,A4 00020a5a 58 4f |XO | ADDQ.L #0x4,A7 00020a5c 19 7c 00 1b 00 02 | | | MOVE.B #0x1b,(A4+0x2) 00020a62 2d 4c 00 08 |-L | MOVE.L A4,(A6+0x8) 00020a66 4c df 10 00 |L | MOVEM.L (A7)+,A4 00020a6a 4e 5e |N^ | UNLK A6 00020a6c 4e 75 |Nu | RTS 00020a6e ; -------------------------------------------------------------------------------------- 00020a6e ; OMSI PASCAL Function 00020a6e ; <LVAR 0x008 4(w)> 00020a6e ; -------------------------------------------------------------------------------------- 00020a6e 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 00020a72 bf d5 | | CMPA.L (A5),A7 00020a74 62 06 |b | BHI 0x20a7c 00020a76 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020a7a 4e 76 |Nv | TRAPV 00020a7c de fc 00 18 | | ADDA.W #0x18,A7 00020a80 48 e7 00 08 |H | MOVEM.L A4,-(A7) 00020a84 2f 3a f6 9e |/: | MOVE.L 0x20124,-(A7) 00020a88 59 4f |YO | SUBQ.L #0x4,A7 00020a8a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a8e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020a92 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020a96 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020a9c 50 4f |PO | ADDQ.L #0x8,A7 00020a9e 28 5f |(_ | MOVEA.L (A7)+,A4 00020aa0 58 4f |XO | ADDQ.L #0x4,A7 00020aa2 19 7c 00 1b 00 02 | | | MOVE.B #0x1b,(A4+0x2) 00020aa8 2d 4c 00 08 |-L | MOVE.L A4,(A6+0x8) 00020aac 4c df 10 00 |L | MOVEM.L (A7)+,A4 00020ab0 4e 5e |N^ | UNLK A6 00020ab2 4e 75 |Nu | RTS 00020ab4 ; -------------------------------------------------------------------------------------- 00020ab4 ; OMSI PASCAL Function 00020ab4 ; <LVAR 0x008 4(w)> 00020ab4 ; -------------------------------------------------------------------------------------- 00020ab4 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 00020ab8 bf d5 | | CMPA.L (A5),A7 00020aba 62 06 |b | BHI 0x20ac2 00020abc 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020ac0 4e 76 |Nv | TRAPV 00020ac2 de fc 00 24 | $ | ADDA.W #0x24,A7 00020ac6 48 e7 81 88 |H | MOVEM.L A4+A0+D7+D0,-(A7) 00020aca 41 f9 00 01 03 d4 |A | LEA.L ReadChar() : Byte,A0 00020ad0 70 1b |p | MOVEQ.L #0x1b,D0 00020ad2 59 4f |YO | SUBQ.L #0x4,A7 00020ad4 1e ba f6 52 | R | MOVE.B 0x20128,(A7) 00020ad8 1f 7a f6 4f 00 01 | z O | MOVE.B 0x20129,(A7+0x1) 00020ade 1f 7a f6 4a 00 02 | z J | MOVE.B 0x2012a,(A7+0x2) 00020ae4 59 4f |YO | SUBQ.L #0x4,A7 00020ae6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020aea 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020aee 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00020af2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020af8 50 4f |PO | ADDQ.L #0x8,A7 00020afa 28 5f |(_ | MOVEA.L (A7)+,A4 00020afc 58 4f |XO | ADDQ.L #0x4,A7 00020afe 19 40 00 02 | @ | MOVE.B D0,(A4+0x2) 00020b02 2f 0c |/ | MOVE.L A4,-(A7) 00020b04 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00020b0a 58 4f |XO | ADDQ.L #0x4,A7 00020b0c 55 4f |UO | SUBQ.L #0x2,A7 00020b0e 4e 90 |N | JSR (A0) 00020b10 1e 1f | | MOVE.B (A7)+,D7 00020b12 be 00 | | CMP.B D0,D7 00020b14 66 f6 |f | BNE 0x20b0c 00020b16 55 4f |UO | SUBQ.L #0x2,A7 00020b18 4e 90 |N | JSR (A0) 00020b1a 1e 17 | | MOVE.B (A7),D7 00020b1c 4e 90 |N | JSR (A0) 00020b1e 1e 17 | | MOVE.B (A7),D7 00020b20 4e 90 |N | JSR (A0) 00020b22 1e 1f | | MOVE.B (A7)+,D7 00020b24 0c 07 00 31 | 1 | CMPI.B #0x31,D7 00020b28 67 0a |g | BEQ 0x20b34 00020b2a 2d 7c 00 00 00 40 00 08 |-| @ | MOVE.L #0x40,(A6+0x8) 00020b32 60 12 |` | BRA 0x20b46 00020b34 2d 7c 00 00 00 18 00 08 |-| | MOVE.L #0x18,(A6+0x8) 00020b3c 55 4f |UO | SUBQ.L #0x2,A7 00020b3e 4e 90 |N | JSR (A0) 00020b40 1e 17 | | MOVE.B (A7),D7 00020b42 4e 90 |N | JSR (A0) 00020b44 1e 1f | | MOVE.B (A7)+,D7 00020b46 55 4f |UO | SUBQ.L #0x2,A7 00020b48 4e 90 |N | JSR (A0) 00020b4a 1e 1f | | MOVE.B (A7)+,D7 00020b4c 4c df 11 81 |L | MOVEM.L (A7)+,D0+D7+A0+A4 00020b50 4e 5e |N^ | UNLK A6 00020b52 4e 75 |Nu | RTS 00020b54 ; -------------------------------------------------------------------------------------- 00020b54 ; OMSI PASCAL Function 00020b54 ; -------------------------------------------------------------------------------------- 00020b54 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00020b58 bf d5 | | CMPA.L (A5),A7 00020b5a 62 06 |b | BHI 0x20b62 00020b5c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020b60 4e 76 |Nv | TRAPV 00020b62 de fc 00 2e | . | ADDA.W #0x2e,A7 00020b66 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00020b6a 9e fc 00 0a | | SUBA.W #0xa,A7 00020b6e 20 4f | O | MOVEA.L A7,A0 00020b70 43 fa f5 ba |C | LEA.L 0x2012c,A1 00020b74 70 08 |p | MOVEQ.L #0x08,D0 00020b76 10 d9 | | MOVE.B (A1)+,(A0)+ 00020b78 51 c8 ff fc |Q | DBF D0,0x20b76 00020b7c 51 4f |QO | SUBQ.L #0x8,A7 00020b7e 2f 39 00 02 34 e2 |/9 4 | MOVE.L 0x234e2,-(A7) 00020b84 48 78 00 01 |Hx | PEA.L 0x1 00020b88 4e ba fc 80 |N | JSR 0x2080a 00020b8c 58 4f |XO | ADDQ.L #0x4,A7 00020b8e 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00020b92 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020b96 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00020b9a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020ba0 58 4f |XO | ADDQ.L #0x4,A7 00020ba2 4e ba fe ca |N | JSR 0x20a6e 00020ba6 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00020bac de fc 00 0c | | ADDA.W #0xc,A7 00020bb0 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00020bb6 de fc 00 0e | | ADDA.W #0xe,A7 00020bba 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00020bbe 4e 5e |N^ | UNLK A6 00020bc0 4e 75 |Nu | RTS 00020bc2 ; -------------------------------------------------------------------------------------- 00020bc2 ; OMSI PASCAL Function 00020bc2 ; <LVAR 0x008 4(r)> 00020bc2 ; -------------------------------------------------------------------------------------- 00020bc2 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 00020bc6 bf d5 | | CMPA.L (A5),A7 00020bc8 62 06 |b | BHI 0x20bd0 00020bca 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020bce 4e 76 |Nv | TRAPV 00020bd0 de fc 00 1c | | ADDA.W #0x1c,A7 00020bd4 51 4f |QO | SUBQ.L #0x8,A7 00020bd6 2f 39 00 02 34 e6 |/9 4 | MOVE.L 0x234e6,-(A7) 00020bdc 48 78 00 01 |Hx | PEA.L 0x1 00020be0 4e ba fc 28 |N ( | JSR 0x2080a 00020be4 58 4f |XO | ADDQ.L #0x4,A7 00020be6 4e ba fd f2 |N | JSR 0x209da 00020bea 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020bee 59 4f |YO | SUBQ.L #0x4,A7 00020bf0 4e ba fe 7c |N | | JSR 0x20a6e 00020bf4 59 4f |YO | SUBQ.L #0x4,A7 00020bf6 4e ba fe 30 |N 0 | JSR 0x20a28 00020bfa 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 00020c00 de fc 00 14 | | ADDA.W #0x14,A7 00020c04 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00020c0a 58 4f |XO | ADDQ.L #0x4,A7 00020c0c 4e 5e |N^ | UNLK A6 00020c0e 4e 75 |Nu | RTS 00020c10 ; -------------------------------------------------------------------------------------- 00020c10 ; OMSI PASCAL Function 00020c10 ; <LVAR 0x00a 1(w)> 00020c10 ; <LVAR 0x008 2(r)> 00020c10 ; -------------------------------------------------------------------------------------- 00020c10 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 ; Spelunked 00020c14 bf d5 | | CMPA.L (A5),A7 00020c16 62 06 |b | BHI 0x20c1e 00020c18 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020c1c 4e 76 |Nv | TRAPV 00020c1e de fc 00 0a | | ADDA.W #0xa,A7 00020c22 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00020c26 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00020c2a 0c 40 00 0a | @ | CMPI.W #0x000a,D0 00020c2e 6c 0a |l | BGE 0x20c3a 00020c30 06 40 00 30 | @ 0 | ADDI.W #0x0030,D0 00020c34 41 bc 00 ff |A | CHK.W #0xff,D0 00020c38 60 08 |` | BRA 0x20c42 00020c3a 06 40 00 37 | @ 7 | ADDI.W #0x0037,D0 00020c3e 41 bc 00 ff |A | CHK.W #0xff,D0 00020c42 1d 40 00 0a | @ | MOVE.B D0,(A6+0xa) 00020c46 4c df 00 01 |L | MOVEM.L (A7)+,D0 00020c4a 4e 5e |N^ | UNLK A6 00020c4c 4e 75 |Nu | RTS 00020c4e ; -------------------------------------------------------------------------------------- 00020c4e ; OMSI PASCAL Function 00020c4e ; <LVAR 0x010 4(w)> 00020c4e ; <LVAR 0x00c 4(r)> 00020c4e ; <LVAR 0x008 4(r)> 00020c4e ; -------------------------------------------------------------------------------------- 00020c4e 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 00020c52 bf d5 | | CMPA.L (A5),A7 00020c54 62 06 |b | BHI 0x20c5c 00020c56 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020c5a 4e 76 |Nv | TRAPV 00020c5c de fc 00 0c | | ADDA.W #0xc,A7 00020c60 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00020c64 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00020c68 b0 ae 00 08 | | CMP.L (A6+0x8),D0 00020c6c 6c 06 |l | BGE 0x20c74 00020c6e 2d 40 00 10 |-@ | MOVE.L D0,(A6+0x10) 00020c72 60 06 |` | BRA 0x20c7a 00020c74 2d 6e 00 08 00 10 |-n | MOVE.L (A6+0x8),(A6+0x10) 00020c7a 4c df 00 01 |L | MOVEM.L (A7)+,D0 00020c7e 4e 5e |N^ | UNLK A6 00020c80 4e 75 |Nu | RTS 00020c82 ; -------------------------------------------------------------------------------------- 00020c82 ; OMSI PASCAL Function 00020c82 ; <LVAR 0x010 4(w)> 00020c82 ; <LVAR 0x00c 4(r)> 00020c82 ; <LVAR 0x008 4(r)> 00020c82 ; -------------------------------------------------------------------------------------- 00020c82 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 00020c86 bf d5 | | CMPA.L (A5),A7 00020c88 62 06 |b | BHI 0x20c90 00020c8a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020c8e 4e 76 |Nv | TRAPV 00020c90 de fc 00 0c | | ADDA.W #0xc,A7 00020c94 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00020c98 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00020c9c b0 ae 00 08 | | CMP.L (A6+0x8),D0 00020ca0 6f 06 |o | BLE 0x20ca8 00020ca2 2d 40 00 10 |-@ | MOVE.L D0,(A6+0x10) 00020ca6 60 06 |` | BRA 0x20cae 00020ca8 2d 6e 00 08 00 10 |-n | MOVE.L (A6+0x8),(A6+0x10) 00020cae 4c df 00 01 |L | MOVEM.L (A7)+,D0 00020cb2 4e 5e |N^ | UNLK A6 00020cb4 4e 75 |Nu | RTS 00020cb6 ; -------------------------------------------------------------------------------------- 00020cb6 ; OMSI PASCAL Function 00020cb6 ; <LVAR 0x008 4(r)> 00020cb6 ; <LVAR -0x003 1(w)> 00020cb6 ; <LVAR -0x004 1(w) 2(r)> 00020cb6 ; <LVAR -0x008 2(rw)> 00020cb6 ; <LVAR -0x010 @> 00020cb6 ; <LVAR -0x018 @> 00020cb6 ; <LVAR -0x020 @> 00020cb6 ; <LVAR -0x028 @> 00020cb6 ; <LVAR -0x030 @> 00020cb6 ; <LVAR -0x038 @> 00020cb6 ; <LVAR -0x040 @> 00020cb6 ; <LVAR -0x048 @> 00020cb6 ; <LVAR -0x050 @> 00020cb6 ; <LVAR -0x058 @> 00020cb6 ; <LVAR -0x060 @> 00020cb6 ; <LVAR -0x068 @> 00020cb6 ; <LVAR -0x070 @> 00020cb6 ; <LVAR -0x078 @> 00020cb6 ; <LVAR -0x080 @> 00020cb6 ; <LVAR -0x088 @> 00020cb6 ; <LVAR -0x094 @ 4(rw)> 00020cb6 ; -------------------------------------------------------------------------------------- 00020cb6 4e 56 fe ec |NV | LINK.W A6,#0xfeec 00020cba bf d5 | | CMPA.L (A5),A7 00020cbc 62 06 |b | BHI 0x20cc4 00020cbe 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020cc2 4e 76 |Nv | TRAPV 00020cc4 de fc 00 80 | | ADDA.W #0x80,A7 00020cc8 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020ccc 45 ee ff fc |E | LEA.L (A6-0x4),A2 00020cd0 47 ee ff 6c |G l | LEA.L (A6-0x94),A3 00020cd4 49 ee ff f8 |I | LEA.L (A6-0x8),A4 00020cd8 26 3c 00 00 07 ff |&< | MOVE.L #0x7ff,D3 00020cde 78 0f |x | MOVEQ.L #0x0f,D4 00020ce0 41 fa f4 a8 |A | LEA.L 0x2018a,A0 00020ce4 70 10 |p | MOVEQ.L #0x10,D0 00020ce6 3f 20 |? | MOVE.W -(A0),-(A7) 00020ce8 51 c8 ff fc |Q | DBF D0,0x20ce6 00020cec 59 4f |YO | SUBQ.L #0x4,A7 00020cee 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020cf2 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020cf6 3f 3c 00 22 |?< " | MOVE.W #0x22,-(A7) 00020cfa 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020d00 50 4f |PO | ADDQ.L #0x8,A7 00020d02 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00020d08 de fc 00 16 | | ADDA.W #0x16,A7 00020d0c 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00020d10 48 78 00 10 |Hx | PEA.L 0x10 00020d14 4e b9 00 01 03 60 |N ` | JSR ?StringToInt64() 00020d1a 50 4f |PO | ADDQ.L #0x8,A7 00020d1c 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00020d22 50 4f |PO | ADDQ.L #0x8,A7 00020d24 26 9f |& | MOVE.L (A7)+,(A3) 00020d26 20 13 | | MOVE.L (A3),D0 00020d28 55 80 |U | SUBQ.L #0x2,D0 00020d2a c0 83 | | AND.L D3,D0 00020d2c 38 80 |8 | MOVE.W D0,(A4) 00020d2e 32 00 |2 | MOVE.W D0,D1 00020d30 e0 49 | I | LSR.W #0x8,D1 00020d32 14 81 | | MOVE.B D1,(A2) 00020d34 02 40 00 ff | @ | ANDI.W #0x00ff,D0 00020d38 1d 40 ff fd | @ | MOVE.B D0,(A6-0x3) 00020d3c 3f 12 |? | MOVE.W (A2),-(A7) 00020d3e 42 27 |B' | CLR.B -(A7) 00020d40 4e b9 00 02 22 9a |N " | JSR exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1) 00020d46 58 4f |XO | ADDQ.L #0x4,A7 00020d48 23 fc 00 00 07 fd 00 02 |# | MOVE.L #0x7fd,0x224ce 00020d50 24 ce |$ | 00020d52 3e 3c 08 00 |>< | MOVE.W #0x800,D7 00020d56 70 00 |p | MOVEQ.L #0x00,D0 00020d58 2f 00 |/ | MOVE.L D0,-(A7) 00020d5a 48 6e ff 78 |Hn x | PEA.L (A6-0x88) 00020d5e 48 6e ff 80 |Hn | PEA.L (A6-0x80) 00020d62 48 6e ff 88 |Hn | PEA.L (A6-0x78) 00020d66 48 6e ff 90 |Hn | PEA.L (A6-0x70) 00020d6a 48 6e ff 98 |Hn | PEA.L (A6-0x68) 00020d6e 48 6e ff a0 |Hn | PEA.L (A6-0x60) 00020d72 48 6e ff a8 |Hn | PEA.L (A6-0x58) 00020d76 48 6e ff b0 |Hn | PEA.L (A6-0x50) 00020d7a 48 6e ff b8 |Hn | PEA.L (A6-0x48) 00020d7e 48 6e ff c0 |Hn | PEA.L (A6-0x40) 00020d82 48 6e ff c8 |Hn | PEA.L (A6-0x38) 00020d86 48 6e ff d0 |Hn | PEA.L (A6-0x30) 00020d8a 48 6e ff d8 |Hn | PEA.L (A6-0x28) 00020d8e 48 6e ff e0 |Hn | PEA.L (A6-0x20) 00020d92 48 6e ff e8 |Hn | PEA.L (A6-0x18) 00020d96 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00020d9a 4e b9 00 02 22 68 |N "h | 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) 00020da0 de fc 00 40 | @ | ADDA.W #0x40,A7 00020da4 7a 00 |z | MOVEQ.L #0x00,D5 00020da6 7c 00 || | MOVEQ.L #0x00,D6 00020da8 42 80 |B | CLR.L D0 00020daa 30 07 |0 | MOVE.W D7,D0 00020dac 53 80 |S | SUBQ.L #0x1,D0 00020dae 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00020db4 63 02 |c | BLS 0x20db8 00020db6 4e 4f |NO | TRAP #15 00020db8 3e 00 |> | MOVE.W D0,D7 00020dba 4f 83 |O | CHK.W D3,D7 00020dbc 42 80 |B | CLR.L D0 00020dbe 30 07 |0 | MOVE.W D7,D0 00020dc0 e3 80 | | ASL.L #0x1,D0 00020dc2 41 f9 00 02 24 c6 |A $ | LEA.L 0x224c6,A0 00020dc8 ba 84 | | CMP.L D4,D5 00020dca 63 02 |c | BLS 0x20dce 00020dcc 4e 4f |NO | TRAP #15 00020dce 22 05 |" | MOVE.L D5,D1 00020dd0 e7 81 | | ASL.L #0x3,D1 00020dd2 22 4b |"K | MOVEA.L A3,A1 00020dd4 24 06 |$ | MOVE.L D6,D2 00020dd6 e3 82 | | ASL.L #0x1,D2 00020dd8 0c 82 00 00 00 07 | | CMPI.L #0x00000007,D2 00020dde 63 02 |c | BLS 0x20de2 00020de0 4e 4f |NO | TRAP #15 00020de2 43 f1 18 00 |C | LEA.L (A1+D1.L),A1 00020de6 11 b1 28 0c 08 0c | ( | MOVE.B (A1+D2.L+#0xc),(A0+D0.L+#0xc) 00020dec 52 82 |R | ADDQ.L #0x1,D2 00020dee 0c 82 00 00 00 07 | | CMPI.L #0x00000007,D2 00020df4 63 02 |c | BLS 0x20df8 00020df6 4e 4f |NO | TRAP #15 00020df8 11 b1 28 0c 08 0d | ( | MOVE.B (A1+D2.L+#0xc),(A0+D0.L+#0xd) 00020dfe 52 86 |R | ADDQ.L #0x1,D6 00020e00 0c 86 00 00 00 03 | | CMPI.L #0x00000003,D6 00020e06 6f a0 |o | BLE 0x20da8 00020e08 52 85 |R | ADDQ.L #0x1,D5 00020e0a ba 84 | | CMP.L D4,D5 00020e0c 6f 98 |o | BLE 0x20da6 00020e0e 20 17 | | MOVE.L (A7),D0 00020e10 52 80 |R | ADDQ.L #0x1,D0 00020e12 0c 80 00 00 00 1f | | CMPI.L #0x0000001f,D0 00020e18 6e 06 |n | BGT 0x20e20 00020e1a 58 4f |XO | ADDQ.L #0x4,A7 00020e1c 60 00 ff 3a |` : | BRA 0x20d58 00020e20 58 4f |XO | ADDQ.L #0x4,A7 00020e22 42 80 |B | CLR.L D0 00020e24 30 14 |0 | MOVE.W (A4),D0 00020e26 54 80 |T | ADDQ.L #0x2,D0 00020e28 c0 83 | | AND.L D3,D0 00020e2a 38 80 |8 | MOVE.W D0,(A4) 00020e2c 32 00 |2 | MOVE.W D0,D1 00020e2e e0 49 | I | LSR.W #0x8,D1 00020e30 14 81 | | MOVE.B D1,(A2) 00020e32 02 40 00 ff | @ | ANDI.W #0x00ff,D0 00020e36 1d 40 ff fd | @ | MOVE.B D0,(A6-0x3) 00020e3a 3f 12 |? | MOVE.W (A2),-(A7) 00020e3c 42 27 |B' | CLR.B -(A7) 00020e3e 4e b9 00 02 22 9a |N " | JSR exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1) 00020e44 58 4f |XO | ADDQ.L #0x4,A7 00020e46 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00020e4a 4e 5e |N^ | UNLK A6 00020e4c 4e 75 |Nu | RTS 00020e4e ; -------------------------------------------------------------------------------------- 00020e4e ; OMSI PASCAL Function 00020e4e ; <LVAR -0x004 @> 00020e4e ; <LVAR -0x008 @ 4(r)> 00020e4e ; <LVAR -0x00c @ 4(rw)> 00020e4e ; <LVAR -0x40c @> 00020e4e ; <LVAR -0x80c @> 00020e4e ; <LVAR -0x810 @> 00020e4e ; -------------------------------------------------------------------------------------- 00020e4e 4e 56 f7 80 |NV | LINK.W A6,#0xf780 00020e52 bf d5 | | CMPA.L (A5),A7 00020e54 62 06 |b | BHI 0x20e5c 00020e56 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020e5a 4e 76 |Nv | TRAPV 00020e5c de fc 00 70 | p | ADDA.W #0x70,A7 00020e60 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020e64 45 ee ff fc |E | LEA.L (A6-0x4),A2 00020e68 47 ee ff f8 |G | LEA.L (A6-0x8),A3 00020e6c 49 ee ff f4 |I | LEA.L (A6-0xc),A4 00020e70 76 02 |v | MOVEQ.L #0x02,D3 00020e72 28 3c 00 00 03 ff |(< | MOVE.L #0x3ff,D4 00020e78 7a 01 |z | MOVEQ.L #0x01,D5 00020e7a 7c 12 || | MOVEQ.L #0x12,D6 00020e7c 41 fa f3 38 |A 8 | LEA.L 0x201b6,A0 00020e80 70 0a |p | MOVEQ.L #0x0a,D0 00020e82 2f 20 |/ | MOVE.L -(A0),-(A7) 00020e84 51 c8 ff fc |Q | DBF D0,0x20e82 00020e88 59 4f |YO | SUBQ.L #0x4,A7 00020e8a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020e8e 3f 05 |? | MOVE.W D5,-(A7) 00020e90 3f 3c 00 2c |?< , | MOVE.W #0x2c,-(A7) 00020e94 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020e9a 50 4f |PO | ADDQ.L #0x8,A7 00020e9c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00020ea2 de fc 00 30 | 0 | ADDA.W #0x30,A7 00020ea6 41 fa f3 24 |A $ | LEA.L 0x201cc,A0 00020eaa 70 0a |p | MOVEQ.L #0x0a,D0 00020eac 3f 20 |? | MOVE.W -(A0),-(A7) 00020eae 51 c8 ff fc |Q | DBF D0,0x20eac 00020eb2 59 4f |YO | SUBQ.L #0x4,A7 00020eb4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020eb8 3f 05 |? | MOVE.W D5,-(A7) 00020eba 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 00020ebe 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020ec4 50 4f |PO | ADDQ.L #0x8,A7 00020ec6 28 9f |( | MOVE.L (A7)+,(A4) 00020ec8 de c6 | | ADDA.W D6,A7 00020eca 2e 94 |. | MOVE.L (A4),(A7) 00020ecc 42 27 |B' | CLR.B -(A7) 00020ece 1f 03 | | MOVE.B D3,-(A7) 00020ed0 48 78 00 00 |Hx | PEA.L 0x0 00020ed4 48 52 |HR | PEA.L (A2) 00020ed6 48 53 |HS | PEA.L (A3) 00020ed8 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00020ede de fc 00 14 | | ADDA.W #0x14,A7 00020ee2 48 54 |HT | PEA.L (A4) 00020ee4 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020eea 2e 93 |. | MOVE.L (A3),(A7) 00020eec 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00020ef0 42 67 |Bg | CLR.W -(A7) 00020ef2 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020ef6 1f 03 | | MOVE.B D3,-(A7) 00020ef8 41 ee f7 f4 |A | LEA.L (A6-0x80c),A0 00020efc 2f 08 |/ | MOVE.L A0,-(A7) 00020efe 48 52 |HR | PEA.L (A2) 00020f00 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020f06 de fc 00 10 | | ADDA.W #0x10,A7 00020f0a 2e 93 |. | MOVE.L (A3),(A7) 00020f0c 3f 3c 00 0c |?< | MOVE.W #0xc,-(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 fb f4 |A | LEA.L (A6-0x40c),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 c6 | | ADDA.W D6,A7 00020f28 42 17 |B | CLR.B (A7) 00020f2a 1f 03 | | MOVE.B D3,-(A7) 00020f2c 48 78 00 01 |Hx | PEA.L 0x1 00020f30 48 52 |HR | PEA.L (A2) 00020f32 48 53 |HS | PEA.L (A3) 00020f34 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00020f3a de fc 00 10 | | ADDA.W #0x10,A7 00020f3e 7e 00 |~ | MOVEQ.L #0x00,D7 00020f40 0c 87 00 00 07 ff | | CMPI.L #0x000007ff,D7 00020f46 63 02 |c | BLS 0x20f4a 00020f48 4e 4f |NO | TRAP #15 00020f4a 20 07 | | MOVE.L D7,D0 00020f4c e3 80 | | ASL.L #0x1,D0 00020f4e 41 f9 00 02 24 c6 |A $ | LEA.L 0x224c6,A0 00020f54 22 04 |" | MOVE.L D4,D1 00020f56 92 87 | | SUB.L D7,D1 00020f58 b2 84 | | CMP.L D4,D1 00020f5a 63 02 |c | BLS 0x20f5e 00020f5c 4e 4f |NO | TRAP #15 00020f5e e3 81 | | ASL.L #0x1,D1 00020f60 43 ee f7 f0 |C | LEA.L (A6-0x810),A1 00020f64 34 31 18 04 |41 | MOVE.W (A1+D1.L+#0x4),D2 00020f68 e0 4a | J | LSR.W #0x8,D2 00020f6a 11 82 08 0c | | MOVE.B D2,(A0+D0.L+#0xc) 00020f6e 32 31 18 04 |21 | MOVE.W (A1+D1.L+#0x4),D1 00020f72 02 41 00 ff | A | ANDI.W #0x00ff,D1 00020f76 11 81 08 0d | | MOVE.B D1,(A0+D0.L+#0xd) 00020f7a 52 87 |R | ADDQ.L #0x1,D7 00020f7c be 84 | | CMP.L D4,D7 00020f7e 6f c0 |o | BLE 0x20f40 00020f80 23 c4 00 02 24 ce |# $ | MOVE.L D4,0x224ce 00020f86 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00020f8a 4e 5e |N^ | UNLK A6 00020f8c 4e 75 |Nu | RTS 00020f8e ; -------------------------------------------------------------------------------------- 00020f8e ; OMSI PASCAL Function 00020f8e ; <LVAR -0x004 @ 4(rw)> 00020f8e ; -------------------------------------------------------------------------------------- 00020f8e 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 00020f92 bf d5 | | CMPA.L (A5),A7 00020f94 62 06 |b | BHI 0x20f9c 00020f96 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020f9a 4e 76 |Nv | TRAPV 00020f9c de fc 00 44 | D | ADDA.W #0x44,A7 00020fa0 48 e7 f8 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7) 00020fa4 43 f9 00 02 34 ea |C 4 | LEA.L 0x234ea,A1 00020faa 45 ee ff fc |E | LEA.L (A6-0x4),A2 00020fae 47 f9 00 02 34 d2 |G 4 | LEA.L 0x234d2,A3 00020fb4 49 f8 00 01 |I | LEA.L 0x1,A4 00020fb8 59 4f |YO | SUBQ.L #0x4,A7 00020fba 4e ba fa f8 |N | JSR 0x20ab4 00020fbe 20 1f | | MOVE.L (A7)+,D0 00020fc0 23 c0 00 02 34 f2 |# 4 | MOVE.L D0,0x234f2 00020fc6 22 00 |" | MOVE.L D0,D1 00020fc8 53 81 |S | SUBQ.L #0x1,D1 00020fca 24 01 |$ | MOVE.L D1,D2 00020fcc e3 82 | | ASL.L #0x1,D2 00020fce 23 c2 00 02 34 da |# 4 | MOVE.L D2,0x234da 00020fd4 22 80 |" | MOVE.L D0,(A1) 00020fd6 55 91 |U | SUBQ.L #0x2,(A1) 00020fd8 28 11 |( | MOVE.L (A1),D4 00020fda 76 02 |v | MOVEQ.L #0x02,D3 00020fdc 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00020fe2 53 84 |S | SUBQ.L #0x1,D4 00020fe4 23 c4 00 02 34 fa |# 4 | MOVE.L D4,0x234fa 00020fea 23 c0 00 02 34 e2 |# 4 | MOVE.L D0,0x234e2 00020ff0 23 c1 00 02 34 e6 |# 4 | MOVE.L D1,0x234e6 00020ff6 28 00 |( | MOVE.L D0,D4 00020ff8 76 06 |v | MOVEQ.L #0x06,D3 00020ffa 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00021000 23 c4 00 02 34 ee |# 4 | MOVE.L D4,0x234ee 00021006 59 4f |YO | SUBQ.L #0x4,A7 00021008 4e b9 00 01 03 c4 |N | JSR GetArgv() : String 0002100e 24 9f |$ | MOVE.L (A7)+,(A2) 00021010 20 52 | R | MOVEA.L (A2),A0 00021012 4a 50 |JP | TST.W (A0) 00021014 67 08 |g | BEQ 0x2101e 00021016 2f 12 |/ | MOVE.L (A2),-(A7) 00021018 4e ba fc 9c |N | JSR 0x20cb6 0002101c 60 0c |` | BRA 0x2102a 0002101e 4e ba fe 2e |N . | JSR 0x20e4e 00021022 48 52 |HR | PEA.L (A2) 00021024 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002102a 58 4f |XO | ADDQ.L #0x4,A7 0002102c 26 b9 00 02 24 ce |& $ | MOVE.L 0x224ce,(A3) 00021032 52 93 |R | ADDQ.L #0x1,(A3) 00021034 59 4f |YO | SUBQ.L #0x4,A7 00021036 48 54 |HT | PEA.L (A4) 00021038 2f 11 |/ | MOVE.L (A1),-(A7) 0002103a 4e ba f8 50 |N P | JSR 0x2088c 0002103e 50 4f |PO | ADDQ.L #0x8,A7 00021040 20 5f | _ | MOVEA.L (A7)+,A0 00021042 24 88 |$ | MOVE.L A0,(A2) 00021044 2f 08 |/ | MOVE.L A0,-(A7) 00021046 1f 3c 00 1b | < | MOVE.B #0x1b,-(A7) 0002104a 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00021050 54 4f |TO | ADDQ.L #0x2,A7 00021052 2e 88 |. | MOVE.L A0,(A7) 00021054 1f 3c 00 3d | < = | MOVE.B #0x3d,-(A7) 00021058 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 0002105e 54 4f |TO | ADDQ.L #0x2,A7 00021060 2f 08 |/ | MOVE.L A0,-(A7) 00021062 59 4f |YO | SUBQ.L #0x4,A7 00021064 48 54 |HT | PEA.L (A4) 00021066 48 54 |HT | PEA.L (A4) 00021068 4e ba f7 a0 |N | JSR 0x2080a 0002106c 58 4f |XO | ADDQ.L #0x4,A7 0002106e 4e ba f9 24 |N $ | JSR 0x20994 00021072 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00021078 de fc 00 0c | | ADDA.W #0xc,A7 0002107c 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021082 58 4f |XO | ADDQ.L #0x4,A7 00021084 4c df 1f 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4 00021088 4e 5e |N^ | UNLK A6 0002108a 4e 75 |Nu | RTS 0002108c ; -------------------------------------------------------------------------------------- 0002108c ; OMSI PASCAL Function 0002108c ; <LVAR 0x00a 4(w)> 0002108c ; <LVAR 0x008 2(r)> 0002108c ; <LVAR -0x006 @ 4(rw)> 0002108c ; -------------------------------------------------------------------------------------- 0002108c 4e 56 ff 92 |NV | LINK.W A6,#0xff92 00021090 bf d5 | | CMPA.L (A5),A7 00021092 62 06 |b | BHI 0x2109a 00021094 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021098 4e 76 |Nv | TRAPV 0002109a de fc 00 64 | d | ADDA.W #0x64,A7 0002109e 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000210a2 45 ee ff fa |E | LEA.L (A6-0x6),A2 000210a6 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 000210ac 76 01 |v | MOVEQ.L #0x01,D3 000210ae 78 22 |x" | MOVEQ.L #0x22,D4 000210b0 7a 1e |z | MOVEQ.L #0x1e,D5 000210b2 7c 20 || | MOVEQ.L #0x20,D6 000210b4 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 000210b8 0c 40 01 46 | @ F | CMPI.W #0x0146,D0 000210bc 66 2c |f, | BNE 0x210ea 000210be 9e fc 00 0c | | SUBA.W #0xc,A7 000210c2 20 4f | O | MOVEA.L A7,A0 000210c4 43 fa f1 06 |C | LEA.L 0x201cc,A1 000210c8 70 0a |p | MOVEQ.L #0x0a,D0 000210ca 10 d9 | | MOVE.B (A1)+,(A0)+ 000210cc 51 c8 ff fc |Q | DBF D0,0x210ca 000210d0 59 4f |YO | SUBQ.L #0x4,A7 000210d2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000210d6 3f 03 |? | MOVE.W D3,-(A7) 000210d8 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 000210dc 4e 93 |N | JSR (A3) 000210de 50 4f |PO | ADDQ.L #0x8,A7 000210e0 24 9f |$ | MOVE.L (A7)+,(A2) 000210e2 de fc 00 0c | | ADDA.W #0xc,A7 000210e6 60 00 04 2c |` , | BRA 0x21514 000210ea 0c 40 01 47 | @ G | CMPI.W #0x0147,D0 000210ee 66 1c |f | BNE 0x2110c 000210f0 2f 3a f0 e6 |/: | MOVE.L 0x201d8,-(A7) 000210f4 59 4f |YO | SUBQ.L #0x4,A7 000210f6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000210fa 3f 03 |? | MOVE.W D3,-(A7) 000210fc 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00021100 4e 93 |N | JSR (A3) 00021102 50 4f |PO | ADDQ.L #0x8,A7 00021104 24 9f |$ | MOVE.L (A7)+,(A2) 00021106 58 4f |XO | ADDQ.L #0x4,A7 00021108 60 00 04 0a |` | BRA 0x21514 0002110c 0c 40 01 f9 | @ | CMPI.W #0x01f9,D0 00021110 66 24 |f$ | BNE 0x21136 00021112 3f 3a f0 cc |?: | MOVE.W 0x201e0,-(A7) 00021116 3f 3a f0 c6 |?: | MOVE.W 0x201de,-(A7) 0002111a 3f 3a f0 c0 |?: | MOVE.W 0x201dc,-(A7) 0002111e 59 4f |YO | SUBQ.L #0x4,A7 00021120 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021124 3f 03 |? | MOVE.W D3,-(A7) 00021126 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 0002112a 4e 93 |N | JSR (A3) 0002112c 50 4f |PO | ADDQ.L #0x8,A7 0002112e 24 9f |$ | MOVE.L (A7)+,(A2) 00021130 5c 4f |\O | ADDQ.L #0x6,A7 00021132 60 00 03 e0 |` | BRA 0x21514 00021136 0c 40 01 00 | @ | CMPI.W #0x0100,D0 0002113a 65 06 |e | BCS 0x21142 0002113c 0c 40 01 ff | @ | CMPI.W #0x01ff,D0 00021140 63 0a |c | BLS 0x2114c 00021142 48 52 |HR | PEA.L (A2) 00021144 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 0002114a 60 ba |` | BRA 0x21106 0002114c 32 00 |2 | MOVE.W D0,D1 0002114e 02 41 00 07 | A | ANDI.W #0x0007,D1 00021152 42 82 |B | CLR.L D2 00021154 34 01 |4 | MOVE.W D1,D2 00021156 2e 02 |. | MOVE.L D2,D7 00021158 e6 48 | H | LSR.W #0x3,D0 0002115a 90 46 | F | SUB.W D6,D0 0002115c 0c 40 00 1f | @ | CMPI.W #0x001f,D0 00021160 63 02 |c | BLS 0x21164 00021162 4e 4e |NN | TRAP #14 00021164 d0 40 | @ | ADD.W D0,D0 00021166 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 0002116e 00 40 | @ | .CONST 0x40 ; [0x0] -> 0x211ae 00021170 00 6c | l | .CONST 0x6c ; [0x1] -> 0x211da 00021172 00 86 | | .CONST 0x86 ; [0x2] -> 0x211f4 00021174 00 ac | | .CONST 0xac ; [0x3] -> 0x2121a 00021176 00 d2 | | .CONST 0xd2 ; [0x4] -> 0x21240 00021178 00 fe | | .CONST 0xfe ; [0x5] -> 0x2126c 0002117a 01 12 | | .CONST 0x112 ; [0x6] -> 0x21280 0002117c 01 20 | | .CONST 0x120 ; [0x7] -> 0x2128e 0002117e 01 36 | 6 | .CONST 0x136 ; [0x8] -> 0x212a4 00021180 01 58 | X | .CONST 0x158 ; [0x9] -> 0x212c6 00021182 01 68 | h | .CONST 0x168 ; [0xa] -> 0x212d6 00021184 01 78 | x | .CONST 0x178 ; [0xb] -> 0x212e6 00021186 01 a0 | | .CONST 0x1a0 ; [0xc] -> 0x2130e 00021188 01 c2 | | .CONST 0x1c2 ; [0xd] -> 0x21330 0002118a 01 e4 | | .CONST 0x1e4 ; [0xe] -> 0x21352 0002118c 01 fa | | .CONST 0x1fa ; [0xf] -> 0x21368 0002118e 02 0a | | .CONST 0x20a ; [0x10] -> 0x21378 00021190 02 1e | | .CONST 0x21e ; [0x11] -> 0x2138c 00021192 02 2c | , | .CONST 0x22c ; [0x12] -> 0x2139a 00021194 02 3c | < | .CONST 0x23c ; [0x13] -> 0x213aa 00021196 02 5c | \ | .CONST 0x25c ; [0x14] -> 0x213ca 00021198 02 84 | | .CONST 0x284 ; [0x15] -> 0x213f2 0002119a 02 94 | | .CONST 0x294 ; [0x16] -> 0x21402 0002119c 02 a8 | | .CONST 0x2a8 ; [0x17] -> 0x21416 0002119e 02 bc | | .CONST 0x2bc ; [0x18] -> 0x2142a 000211a0 02 d0 | | .CONST 0x2d0 ; [0x19] -> 0x2143e 000211a2 02 ea | | .CONST 0x2ea ; [0x1a] -> 0x21458 000211a4 02 fa | | .CONST 0x2fa ; [0x1b] -> 0x21468 000211a6 03 0e | | .CONST 0x30e ; [0x1c] -> 0x2147c 000211a8 03 22 | " | .CONST 0x322 ; [0x1d] -> 0x21490 000211aa 03 36 | 6 | .CONST 0x336 ; [0x1e] -> 0x214a4 000211ac 03 50 | P | .CONST 0x350 ; [0x1f] -> 0x214be 000211ae switch@0x21166[0x0]: 000211ae 9e fc 00 1a | | SUBA.W #0x1a,A7 000211b2 20 4f | O | MOVEA.L A7,A0 000211b4 43 fa f0 2c |C , | LEA.L 0x201e2,A1 000211b8 70 18 |p | MOVEQ.L #0x18,D0 000211ba 10 d9 | | MOVE.B (A1)+,(A0)+ 000211bc 51 c8 ff fc |Q | DBF D0,0x211ba 000211c0 59 4f |YO | SUBQ.L #0x4,A7 000211c2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000211c6 3f 03 |? | MOVE.W D3,-(A7) 000211c8 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000211cc 4e 93 |N | JSR (A3) 000211ce 50 4f |PO | ADDQ.L #0x8,A7 000211d0 24 9f |$ | MOVE.L (A7)+,(A2) 000211d2 de fc 00 1a | | ADDA.W #0x1a,A7 000211d6 60 00 03 0e |` | BRA 0x214e6 000211da switch@0x21166[0x1]: 000211da 41 fa f0 3a |A : | LEA.L 0x20216,A0 000211de 70 0c |p | MOVEQ.L #0x0c,D0 000211e0 3f 20 |? | MOVE.W -(A0),-(A7) 000211e2 51 c8 ff fc |Q | DBF D0,0x211e0 000211e6 59 4f |YO | SUBQ.L #0x4,A7 000211e8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000211ec 3f 03 |? | MOVE.W D3,-(A7) 000211ee 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 000211f2 60 d8 |` | BRA 0x211cc 000211f4 switch@0x21166[0x2]: 000211f4 41 fa f0 38 |A 8 | LEA.L 0x2022e,A0 000211f8 70 05 |p | MOVEQ.L #0x05,D0 000211fa 2f 20 |/ | MOVE.L -(A0),-(A7) 000211fc 51 c8 ff fc |Q | DBF D0,0x211fa 00021200 59 4f |YO | SUBQ.L #0x4,A7 00021202 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021206 3f 03 |? | MOVE.W D3,-(A7) 00021208 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 0002120c 4e 93 |N | JSR (A3) 0002120e 50 4f |PO | ADDQ.L #0x8,A7 00021210 24 9f |$ | MOVE.L (A7)+,(A2) 00021212 de fc 00 18 | | ADDA.W #0x18,A7 00021216 60 00 02 ce |` | BRA 0x214e6 0002121a switch@0x21166[0x3]: 0002121a 41 fa f0 28 |A ( | LEA.L 0x20244,A0 0002121e 70 0a |p | MOVEQ.L #0x0a,D0 00021220 3f 20 |? | MOVE.W -(A0),-(A7) 00021222 51 c8 ff fc |Q | DBF D0,0x21220 00021226 59 4f |YO | SUBQ.L #0x4,A7 00021228 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002122c 3f 03 |? | MOVE.W D3,-(A7) 0002122e 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 00021232 4e 93 |N | JSR (A3) 00021234 50 4f |PO | ADDQ.L #0x8,A7 00021236 24 9f |$ | MOVE.L (A7)+,(A2) 00021238 de fc 00 16 | | ADDA.W #0x16,A7 0002123c 60 00 02 a8 |` | BRA 0x214e6 00021240 switch@0x21166[0x4]: 00021240 9e fc 00 12 | | SUBA.W #0x12,A7 00021244 20 4f | O | MOVEA.L A7,A0 00021246 43 fa ef fc |C | LEA.L 0x20244,A1 0002124a 70 10 |p | MOVEQ.L #0x10,D0 0002124c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002124e 51 c8 ff fc |Q | DBF D0,0x2124c 00021252 59 4f |YO | SUBQ.L #0x4,A7 00021254 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021258 3f 03 |? | MOVE.W D3,-(A7) 0002125a 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 0002125e 4e 93 |N | JSR (A3) 00021260 50 4f |PO | ADDQ.L #0x8,A7 00021262 24 9f |$ | MOVE.L (A7)+,(A2) 00021264 de fc 00 12 | | ADDA.W #0x12,A7 00021268 60 00 02 7c |` | | BRA 0x214e6 0002126c switch@0x21166[0x5]: 0002126c 9e fc 00 12 | | SUBA.W #0x12,A7 00021270 20 4f | O | MOVEA.L A7,A0 00021272 43 fa ef e2 |C | LEA.L 0x20256,A1 00021276 70 10 |p | MOVEQ.L #0x10,D0 00021278 10 d9 | | MOVE.B (A1)+,(A0)+ 0002127a 51 c8 ff fc |Q | DBF D0,0x21278 0002127e 60 d2 |` | BRA 0x21252 00021280 switch@0x21166[0x6]: 00021280 41 fa ef fc |A | LEA.L 0x2027e,A0 00021284 70 0a |p | MOVEQ.L #0x0a,D0 00021286 3f 20 |? | MOVE.W -(A0),-(A7) 00021288 51 c8 ff fc |Q | DBF D0,0x21286 0002128c 60 98 |` | BRA 0x21226 0002128e switch@0x21166[0x7]: 0002128e 9e fc 00 1c | | SUBA.W #0x1c,A7 00021292 20 4f | O | MOVEA.L A7,A0 00021294 43 fa ef e8 |C | LEA.L 0x2027e,A1 00021298 70 1a |p | MOVEQ.L #0x1a,D0 0002129a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002129c 51 c8 ff fc |Q | DBF D0,0x2129a 000212a0 60 00 02 2e |` . | BRA 0x214d0 000212a4 switch@0x21166[0x8]: 000212a4 9e fc 00 18 | | SUBA.W #0x18,A7 000212a8 20 4f | O | MOVEA.L A7,A0 000212aa 43 fa ef ee |C | LEA.L 0x2029a,A1 000212ae 70 16 |p | MOVEQ.L #0x16,D0 000212b0 10 d9 | | MOVE.B (A1)+,(A0)+ 000212b2 51 c8 ff fc |Q | DBF D0,0x212b0 000212b6 59 4f |YO | SUBQ.L #0x4,A7 000212b8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000212bc 3f 03 |? | MOVE.W D3,-(A7) 000212be 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 000212c2 60 00 ff 48 |` H | BRA 0x2120c 000212c6 switch@0x21166[0x9]: 000212c6 41 fa f0 02 |A | LEA.L 0x202ca,A0 000212ca 70 05 |p | MOVEQ.L #0x05,D0 000212cc 2f 20 |/ | MOVE.L -(A0),-(A7) 000212ce 51 c8 ff fc |Q | DBF D0,0x212cc 000212d2 60 00 ff 2c |` , | BRA 0x21200 000212d6 switch@0x21166[0xa]: 000212d6 41 fa f0 08 |A | LEA.L 0x202e0,A0 000212da 70 0a |p | MOVEQ.L #0x0a,D0 000212dc 3f 20 |? | MOVE.W -(A0),-(A7) 000212de 51 c8 ff fc |Q | DBF D0,0x212dc 000212e2 60 00 ff 42 |` B | BRA 0x21226 000212e6 switch@0x21166[0xb]: 000212e6 9e c4 | | SUBA.W D4,A7 000212e8 20 4f | O | MOVEA.L A7,A0 000212ea 43 fa ef f4 |C | LEA.L 0x202e0,A1 000212ee 70 20 |p | MOVEQ.L #0x20,D0 000212f0 10 d9 | | MOVE.B (A1)+,(A0)+ 000212f2 51 c8 ff fc |Q | DBF D0,0x212f0 000212f6 59 4f |YO | SUBQ.L #0x4,A7 000212f8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000212fc 3f 03 |? | MOVE.W D3,-(A7) 000212fe 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 00021302 4e 93 |N | JSR (A3) 00021304 50 4f |PO | ADDQ.L #0x8,A7 00021306 24 9f |$ | MOVE.L (A7)+,(A2) 00021308 de c4 | | ADDA.W D4,A7 0002130a 60 00 01 da |` | BRA 0x214e6 0002130e switch@0x21166[0xc]: 0002130e 41 fa f0 10 |A | LEA.L 0x20320,A0 00021312 70 0e |p | MOVEQ.L #0x0e,D0 00021314 3f 20 |? | MOVE.W -(A0),-(A7) 00021316 51 c8 ff fc |Q | DBF D0,0x21314 0002131a 59 4f |YO | SUBQ.L #0x4,A7 0002131c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021320 3f 03 |? | MOVE.W D3,-(A7) 00021322 3f 05 |? | MOVE.W D5,-(A7) 00021324 4e 93 |N | JSR (A3) 00021326 50 4f |PO | ADDQ.L #0x8,A7 00021328 24 9f |$ | MOVE.L (A7)+,(A2) 0002132a de c5 | | ADDA.W D5,A7 0002132c 60 00 01 b8 |` | BRA 0x214e6 00021330 switch@0x21166[0xd]: 00021330 9e fc 00 16 | | SUBA.W #0x16,A7 00021334 20 4f | O | MOVEA.L A7,A0 00021336 43 fa ef e8 |C | LEA.L 0x20320,A1 0002133a 70 14 |p | MOVEQ.L #0x14,D0 0002133c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002133e 51 c8 ff fc |Q | DBF D0,0x2133c 00021342 59 4f |YO | SUBQ.L #0x4,A7 00021344 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021348 3f 03 |? | MOVE.W D3,-(A7) 0002134a 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 0002134e 60 00 fe e2 |` | BRA 0x21232 00021352 switch@0x21166[0xe]: 00021352 9e fc 00 1a | | SUBA.W #0x1a,A7 00021356 20 4f | O | MOVEA.L A7,A0 00021358 43 fa ef dc |C | LEA.L 0x20336,A1 0002135c 70 18 |p | MOVEQ.L #0x18,D0 0002135e 10 d9 | | MOVE.B (A1)+,(A0)+ 00021360 51 c8 ff fc |Q | DBF D0,0x2135e 00021364 60 00 fe 5a |` Z | BRA 0x211c0 00021368 switch@0x21166[0xf]: 00021368 41 fa f0 00 |A | LEA.L 0x2036a,A0 0002136c 70 0c |p | MOVEQ.L #0x0c,D0 0002136e 3f 20 |? | MOVE.W -(A0),-(A7) 00021370 51 c8 ff fc |Q | DBF D0,0x2136e 00021374 60 00 fe 70 |` p | BRA 0x211e6 00021378 switch@0x21166[0x10]: 00021378 9e c4 | | SUBA.W D4,A7 0002137a 20 4f | O | MOVEA.L A7,A0 0002137c 43 fa ef ec |C | LEA.L 0x2036a,A1 00021380 70 20 |p | MOVEQ.L #0x20,D0 00021382 10 d9 | | MOVE.B (A1)+,(A0)+ 00021384 51 c8 ff fc |Q | DBF D0,0x21382 00021388 60 00 ff 6c |` l | BRA 0x212f6 0002138c switch@0x21166[0x11]: 0002138c 41 fa f0 1c |A | LEA.L 0x203aa,A0 00021390 70 0e |p | MOVEQ.L #0x0e,D0 00021392 3f 20 |? | MOVE.W -(A0),-(A7) 00021394 51 c8 ff fc |Q | DBF D0,0x21392 00021398 60 80 |` | BRA 0x2131a 0002139a switch@0x21166[0x12]: 0002139a 41 fa f0 26 |A & | LEA.L 0x203c2,A0 0002139e 70 05 |p | MOVEQ.L #0x05,D0 000213a0 2f 20 |/ | MOVE.L -(A0),-(A7) 000213a2 51 c8 ff fc |Q | DBF D0,0x213a0 000213a6 60 00 fe 58 |` X | BRA 0x21200 000213aa switch@0x21166[0x13]: 000213aa 9e c5 | | SUBA.W D5,A7 000213ac 20 4f | O | MOVEA.L A7,A0 000213ae 43 fa f0 12 |C | LEA.L 0x203c2,A1 000213b2 70 1c |p | MOVEQ.L #0x1c,D0 000213b4 10 d9 | | MOVE.B (A1)+,(A0)+ 000213b6 51 c8 ff fc |Q | DBF D0,0x213b4 000213ba 59 4f |YO | SUBQ.L #0x4,A7 000213bc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000213c0 3f 03 |? | MOVE.W D3,-(A7) 000213c2 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 000213c6 60 00 ff 5c |` \ | BRA 0x21324 000213ca switch@0x21166[0x14]: 000213ca 9e c6 | | SUBA.W D6,A7 000213cc 20 4f | O | MOVEA.L A7,A0 000213ce 43 fa f0 10 |C | LEA.L 0x203e0,A1 000213d2 70 1e |p | MOVEQ.L #0x1e,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 1f |?< | MOVE.W #0x1f,-(A7) 000213e6 4e 93 |N | JSR (A3) 000213e8 50 4f |PO | ADDQ.L #0x8,A7 000213ea 24 9f |$ | MOVE.L (A7)+,(A2) 000213ec de c6 | | ADDA.W D6,A7 000213ee 60 00 00 f6 |` | BRA 0x214e6 000213f2 switch@0x21166[0x15]: 000213f2 41 fa f0 24 |A $ | LEA.L 0x20418,A0 000213f6 70 05 |p | MOVEQ.L #0x05,D0 000213f8 2f 20 |/ | MOVE.L -(A0),-(A7) 000213fa 51 c8 ff fc |Q | DBF D0,0x213f8 000213fe 60 00 fe 00 |` | BRA 0x21200 00021402 switch@0x21166[0x16]: 00021402 9e c4 | | SUBA.W D4,A7 00021404 20 4f | O | MOVEA.L A7,A0 00021406 43 fa f0 10 |C | LEA.L 0x20418,A1 0002140a 70 20 |p | MOVEQ.L #0x20,D0 0002140c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002140e 51 c8 ff fc |Q | DBF D0,0x2140c 00021412 60 00 fe e2 |` | BRA 0x212f6 00021416 switch@0x21166[0x17]: 00021416 9e c4 | | SUBA.W D4,A7 00021418 20 4f | O | MOVEA.L A7,A0 0002141a 43 fa f0 1e |C | LEA.L 0x2043a,A1 0002141e 70 20 |p | MOVEQ.L #0x20,D0 00021420 10 d9 | | MOVE.B (A1)+,(A0)+ 00021422 51 c8 ff fc |Q | DBF D0,0x21420 00021426 60 00 fe ce |` | BRA 0x212f6 0002142a switch@0x21166[0x18]: 0002142a 9e c4 | | SUBA.W D4,A7 0002142c 20 4f | O | MOVEA.L A7,A0 0002142e 43 fa f0 2c |C , | LEA.L 0x2045c,A1 00021432 70 20 |p | MOVEQ.L #0x20,D0 00021434 10 d9 | | MOVE.B (A1)+,(A0)+ 00021436 51 c8 ff fc |Q | DBF D0,0x21434 0002143a 60 00 fe ba |` | BRA 0x212f6 0002143e switch@0x21166[0x19]: 0002143e 41 fa f0 60 |A ` | LEA.L 0x204a0,A0 00021442 70 10 |p | MOVEQ.L #0x10,D0 00021444 3f 20 |? | MOVE.W -(A0),-(A7) 00021446 51 c8 ff fc |Q | DBF D0,0x21444 0002144a 59 4f |YO | SUBQ.L #0x4,A7 0002144c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021450 3f 03 |? | MOVE.W D3,-(A7) 00021452 3f 04 |? | MOVE.W D4,-(A7) 00021454 60 00 fe ac |` | BRA 0x21302 00021458 switch@0x21166[0x1a]: 00021458 41 fa f0 60 |A ` | LEA.L 0x204ba,A0 0002145c 70 0c |p | MOVEQ.L #0x0c,D0 0002145e 3f 20 |? | MOVE.W -(A0),-(A7) 00021460 51 c8 ff fc |Q | DBF D0,0x2145e 00021464 60 00 fd 80 |` | BRA 0x211e6 00021468 switch@0x21166[0x1b]: 00021468 9e c6 | | SUBA.W D6,A7 0002146a 20 4f | O | MOVEA.L A7,A0 0002146c 43 fa f0 4c |C L | LEA.L 0x204ba,A1 00021470 70 1e |p | MOVEQ.L #0x1e,D0 00021472 10 d9 | | MOVE.B (A1)+,(A0)+ 00021474 51 c8 ff fc |Q | DBF D0,0x21472 00021478 60 00 ff 60 |` ` | BRA 0x213da 0002147c switch@0x21166[0x1c]: 0002147c 9e c5 | | SUBA.W D5,A7 0002147e 20 4f | O | MOVEA.L A7,A0 00021480 43 fa f0 58 |C X | LEA.L 0x204da,A1 00021484 70 1c |p | MOVEQ.L #0x1c,D0 00021486 10 d9 | | MOVE.B (A1)+,(A0)+ 00021488 51 c8 ff fc |Q | DBF D0,0x21486 0002148c 60 00 ff 2c |` , | BRA 0x213ba 00021490 switch@0x21166[0x1d]: 00021490 9e c5 | | SUBA.W D5,A7 00021492 20 4f | O | MOVEA.L A7,A0 00021494 43 fa f0 62 |C b | LEA.L 0x204f8,A1 00021498 70 1c |p | MOVEQ.L #0x1c,D0 0002149a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002149c 51 c8 ff fc |Q | DBF D0,0x2149a 000214a0 60 00 ff 18 |` | BRA 0x213ba 000214a4 switch@0x21166[0x1e]: 000214a4 41 fa f0 8c |A | LEA.L 0x20532,A0 000214a8 70 06 |p | MOVEQ.L #0x06,D0 000214aa 2f 20 |/ | MOVE.L -(A0),-(A7) 000214ac 51 c8 ff fc |Q | DBF D0,0x214aa 000214b0 59 4f |YO | SUBQ.L #0x4,A7 000214b2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000214b6 3f 03 |? | MOVE.W D3,-(A7) 000214b8 3f 3c 00 1c |?< | MOVE.W #0x1c,-(A7) 000214bc 60 1e |` | BRA 0x214dc 000214be switch@0x21166[0x1f]: 000214be 9e fc 00 1c | | SUBA.W #0x1c,A7 000214c2 20 4f | O | MOVEA.L A7,A0 000214c4 43 fa f0 6c |C l | LEA.L 0x20532,A1 000214c8 70 1a |p | MOVEQ.L #0x1a,D0 000214ca 10 d9 | | MOVE.B (A1)+,(A0)+ 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 1b |?< | MOVE.W #0x1b,-(A7) 000214dc 4e 93 |N | JSR (A3) 000214de 50 4f |PO | ADDQ.L #0x8,A7 000214e0 24 9f |$ | MOVE.L (A7)+,(A2) 000214e2 de fc 00 1c | | ADDA.W #0x1c,A7 000214e6 3f 3a f0 66 |?: f | MOVE.W 0x2054e,-(A7) 000214ea 59 4f |YO | SUBQ.L #0x4,A7 000214ec 2f 12 |/ | MOVE.L (A2),-(A7) 000214ee 59 4f |YO | SUBQ.L #0x4,A7 000214f0 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000214f4 3f 03 |? | MOVE.W D3,-(A7) 000214f6 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 000214fa 4e 93 |N | JSR (A3) 000214fc 2e 87 |. | MOVE.L D7,(A7) 000214fe 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021504 58 4f |XO | ADDQ.L #0x4,A7 00021506 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 0002150c de fc 00 0c | | ADDA.W #0xc,A7 00021510 24 9f |$ | MOVE.L (A7)+,(A2) 00021512 54 4f |TO | ADDQ.L #0x2,A7 00021514 2d 52 00 0a |-R | MOVE.L (A2),(A6+0xa) 00021518 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 0002151c 4e 5e |N^ | UNLK A6 0002151e 4e 75 |Nu | RTS 00021520 ; -------------------------------------------------------------------------------------- 00021520 ; OMSI PASCAL Function 00021520 ; <LVAR 0x00c 4(r)> 00021520 ; <LVAR 0x008 4(r)> 00021520 ; -------------------------------------------------------------------------------------- 00021520 4e 56 ff b0 |NV | LINK.W A6,#0xffb0 00021524 bf d5 | | CMPA.L (A5),A7 00021526 62 06 |b | BHI 0x2152e 00021528 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002152c 4e 76 |Nv | TRAPV 0002152e de fc 00 44 | D | ADDA.W #0x44,A7 00021532 48 e7 f9 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 00021536 43 f9 00 01 02 d0 |C | LEA.L StringCat2(a, b : String) : String,A1 0002153c 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00021540 76 01 |v | MOVEQ.L #0x01,D3 00021542 78 0c |x | MOVEQ.L #0x0c,D4 00021544 20 12 | | MOVE.L (A2),D0 00021546 0c 80 00 00 07 ff | | CMPI.L #0x000007ff,D0 0002154c 63 02 |c | BLS 0x21550 0002154e 4e 4f |NO | TRAP #15 00021550 e3 80 | | ASL.L #0x1,D0 00021552 41 f9 00 02 24 c6 |A $ | LEA.L 0x224c6,A0 00021558 42 81 |B | CLR.L D1 0002155a 12 30 08 0c | 0 | MOVE.B (A0+D0.L+#0xc),D1 0002155e e1 41 | A | ASL.W #0x8,D1 00021560 42 82 |B | CLR.L D2 00021562 14 30 08 0d | 0 | MOVE.B (A0+D0.L+#0xd),D2 00021566 d4 41 | A | ADD.W D1,D2 00021568 3e 02 |> | MOVE.W D2,D7 0002156a 51 4f |QO | SUBQ.L #0x8,A7 0002156c 2f 12 |/ | MOVE.L (A2),-(A7) 0002156e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021574 58 4f |XO | ADDQ.L #0x4,A7 00021576 48 78 00 05 |Hx | PEA.L 0x5 0002157a 4e b9 00 01 02 f4 |N | JSR RightPad(a : String; b : Long) : String 00021580 50 4f |PO | ADDQ.L #0x8,A7 00021582 26 5f |&_ | MOVEA.L (A7)+,A3 00021584 20 12 | | MOVE.L (A2),D0 00021586 b0 ac 00 24 | $ | CMP.L (A4+0x24),D0 0002158a 66 18 |f | BNE 0x215a4 0002158c 51 4f |QO | SUBQ.L #0x8,A7 0002158e 4e ba f4 4a |N J | JSR 0x209da 00021592 2f 0b |/ | MOVE.L A3,-(A7) 00021594 59 4f |YO | SUBQ.L #0x4,A7 00021596 4e ba f4 90 |N | JSR 0x20a28 0002159a 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 000215a0 de c4 | | ADDA.W D4,A7 000215a2 26 5f |&_ | MOVEA.L (A7)+,A3 000215a4 51 4f |QO | SUBQ.L #0x8,A7 000215a6 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000215aa 48 78 00 01 |Hx | PEA.L 0x1 000215ae 4e ba f2 5a |N Z | JSR 0x2080a 000215b2 58 4f |XO | ADDQ.L #0x4,A7 000215b4 2e 8b |. | MOVE.L A3,(A7) 000215b6 4e 91 |N | JSR (A1) 000215b8 50 4f |PO | ADDQ.L #0x8,A7 000215ba 26 5f |&_ | MOVEA.L (A7)+,A3 000215bc 30 07 |0 | MOVE.W D7,D0 000215be 02 40 40 00 | @@ | ANDI.W #0x4000,D0 000215c2 67 06 |g | BEQ 0x215ca 000215c4 3f 3a ef 8a |?: | MOVE.W 0x20550,-(A7) 000215c8 60 04 |` | BRA 0x215ce 000215ca 3f 3a ef 86 |?: | MOVE.W 0x20552,-(A7) 000215ce 59 4f |YO | SUBQ.L #0x4,A7 000215d0 2f 0b |/ | MOVE.L A3,-(A7) 000215d2 59 4f |YO | SUBQ.L #0x4,A7 000215d4 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000215d8 3f 03 |? | MOVE.W D3,-(A7) 000215da 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 000215de 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000215e4 50 4f |PO | ADDQ.L #0x8,A7 000215e6 4e 91 |N | JSR (A1) 000215e8 50 4f |PO | ADDQ.L #0x8,A7 000215ea 26 5f |&_ | MOVEA.L (A7)+,A3 000215ec 54 4f |TO | ADDQ.L #0x2,A7 000215ee 30 07 |0 | MOVE.W D7,D0 000215f0 02 40 80 00 | @ | ANDI.W #0x8000,D0 000215f4 67 14 |g | BEQ 0x2160a 000215f6 59 4f |YO | SUBQ.L #0x4,A7 000215f8 1e ba ef 5a | Z | MOVE.B 0x20554,(A7) 000215fc 1f 7a ef 57 00 01 | z W | MOVE.B 0x20555,(A7+0x1) 00021602 1f 7a ef 52 00 02 | z R | MOVE.B 0x20556,(A7+0x2) 00021608 60 12 |` | BRA 0x2161c 0002160a 59 4f |YO | SUBQ.L #0x4,A7 0002160c 1e ba ef 4a | J | MOVE.B 0x20558,(A7) 00021610 1f 7a ef 47 00 01 | z G | MOVE.B 0x20559,(A7+0x1) 00021616 1f 7a ef 42 00 02 | z B | MOVE.B 0x2055a,(A7+0x2) 0002161c 59 4f |YO | SUBQ.L #0x4,A7 0002161e 2f 0b |/ | MOVE.L A3,-(A7) 00021620 59 4f |YO | SUBQ.L #0x4,A7 00021622 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021626 3f 03 |? | MOVE.W D3,-(A7) 00021628 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 0002162c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021632 50 4f |PO | ADDQ.L #0x8,A7 00021634 4e 91 |N | JSR (A1) 00021636 50 4f |PO | ADDQ.L #0x8,A7 00021638 26 5f |&_ | MOVEA.L (A7)+,A3 0002163a 58 4f |XO | ADDQ.L #0x4,A7 0002163c 59 4f |YO | SUBQ.L #0x4,A7 0002163e 2f 0b |/ | MOVE.L A3,-(A7) 00021640 59 4f |YO | SUBQ.L #0x4,A7 00021642 30 07 |0 | MOVE.W D7,D0 00021644 02 40 3f ff | @? | ANDI.W #0x3fff,D0 00021648 42 81 |B | CLR.L D1 0002164a 32 00 |2 | MOVE.W D0,D1 0002164c 2f 01 |/ | MOVE.L D1,-(A7) 0002164e 48 78 00 04 |Hx | PEA.L 0x4 00021652 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00021658 50 4f |PO | ADDQ.L #0x8,A7 0002165a 4e 91 |N | JSR (A1) 0002165c 50 4f |PO | ADDQ.L #0x8,A7 0002165e 26 5f |&_ | MOVEA.L (A7)+,A3 00021660 4a 2c 00 22 |J, " | TST.B (A4+0x22) 00021664 67 30 |g0 | BEQ 0x21696 00021666 2f 3a ee f4 |/: | MOVE.L 0x2055c,-(A7) 0002166a 59 4f |YO | SUBQ.L #0x4,A7 0002166c 2f 0b |/ | MOVE.L A3,-(A7) 0002166e 59 4f |YO | SUBQ.L #0x4,A7 00021670 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021674 3f 03 |? | MOVE.W D3,-(A7) 00021676 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 0002167a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021680 54 4f |TO | ADDQ.L #0x2,A7 00021682 3e 87 |> | MOVE.W D7,(A7) 00021684 4e ba fa 06 |N | JSR 0x2108c 00021688 54 4f |TO | ADDQ.L #0x2,A7 0002168a 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00021690 de c4 | | ADDA.W D4,A7 00021692 26 5f |&_ | MOVEA.L (A7)+,A3 00021694 58 4f |XO | ADDQ.L #0x4,A7 00021696 2f 0b |/ | MOVE.L A3,-(A7) 00021698 1f 3c 00 1b | < | MOVE.B #0x1b,-(A7) 0002169c 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000216a2 54 4f |TO | ADDQ.L #0x2,A7 000216a4 2e 8b |. | MOVE.L A3,(A7) 000216a6 1f 3c 00 5b | < [ | MOVE.B #0x5b,-(A7) 000216aa 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000216b0 54 4f |TO | ADDQ.L #0x2,A7 000216b2 2e 8b |. | MOVE.L A3,(A7) 000216b4 1f 3c 00 30 | < 0 | MOVE.B #0x30,-(A7) 000216b8 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000216be 54 4f |TO | ADDQ.L #0x2,A7 000216c0 2e 8b |. | MOVE.L A3,(A7) 000216c2 1f 3c 00 4b | < K | MOVE.B #0x4b,-(A7) 000216c6 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000216cc 54 4f |TO | ADDQ.L #0x2,A7 000216ce 2e 8b |. | MOVE.L A3,(A7) 000216d0 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000216d6 58 4f |XO | ADDQ.L #0x4,A7 000216d8 4c df 0f 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3 000216dc 4e 5e |N^ | UNLK A6 000216de 4e 75 |Nu | RTS 000216e0 ; -------------------------------------------------------------------------------------- 000216e0 ; OMSI PASCAL Function 000216e0 ; <LVAR 0x00a 4(r)> 000216e0 ; <LVAR -0x004 4(rw)> 000216e0 ; <LVAR -0x006 1(w)> 000216e0 ; <LVAR -0x007 1(rw)> 000216e0 ; <LVAR -0x008 1(rw)> 000216e0 ; <LVAR -0x00c 4(rw)> 000216e0 ; <LVAR -0x01a @> 000216e0 ; -------------------------------------------------------------------------------------- 000216e0 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 000216e4 bf d5 | | CMPA.L (A5),A7 000216e6 62 06 |b | BHI 0x216ee 000216e8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000216ec 4e 76 |Nv | TRAPV 000216ee de fc 00 3e | > | ADDA.W #0x3e,A7 000216f2 48 e7 c7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 000216f6 41 f9 00 02 34 da |A 4 | LEA.L 0x234da,A0 000216fc 43 f9 00 02 34 d6 |C 4 | LEA.L 0x234d6,A1 00021702 45 f9 00 02 34 fa |E 4 | LEA.L 0x234fa,A2 00021708 47 ee 00 0a |G | LEA.L (A6+0xa),A3 0002170c 20 10 | | MOVE.L (A0),D0 0002170e 90 92 | | SUB.L (A2),D0 00021710 44 80 |D | NEG.L D0 00021712 d0 93 | | ADD.L (A3),D0 00021714 6a 02 |j | BPL 0x21718 00021716 44 80 |D | NEG.L D0 00021718 2d 40 ff f4 |-@ | MOVE.L D0,(A6-0xc) 0002171c 72 00 |r | MOVEQ.L #0x00,D1 0002171e b0 92 | | CMP.L (A2),D0 00021720 6c 08 |l | BGE 0x2172a 00021722 4a 39 00 02 34 ff |J9 4 | TST.B 0x234ff 00021728 67 02 |g | BEQ 0x2172c 0002172a 52 01 |R | ADDQ.B #0x1,D1 0002172c 48 81 |H | EXTB.W D1 0002172e 43 bc 00 01 |C | CHK.W #0x1,D1 00021732 1d 41 ff fa | A | MOVE.B D1,(A6-0x6) 00021736 42 2e ff f8 |B. | CLR.B (A6-0x8) 0002173a b0 b9 00 02 34 ee | 4 | CMP.L 0x234ee,D0 00021740 6f 0c |o | BLE 0x2174e 00021742 10 01 | | MOVE.B D1,D0 00021744 44 00 |D | NEG.B D0 00021746 52 00 |R | ADDQ.B #0x1,D0 00021748 67 04 |g | BEQ 0x2174e 0002174a 52 2e ff f8 |R. | ADDQ.B #0x1,(A6-0x8) 0002174e 1d 6e ff f8 ff f9 | n | MOVE.B (A6-0x8),(A6-0x7) 00021754 83 2e ff f9 | . | OR.B D1,(A6-0x7) 00021758 44 2e ff f9 |D. | NEG.B (A6-0x7) 0002175c 52 2e ff f9 |R. | ADDQ.B #0x1,(A6-0x7) 00021760 4a 01 |J | TST.B D1 00021762 66 1e |f | BNE 0x21782 00021764 20 10 | | MOVE.L (A0),D0 00021766 90 b9 00 02 34 de | 4 | SUB.L 0x234de,D0 0002176c 52 80 |R | ADDQ.L #0x1,D0 0002176e 2f 00 |/ | MOVE.L D0,-(A7) 00021770 2f 39 00 02 34 de |/9 4 | MOVE.L 0x234de,-(A7) 00021776 49 ee ff e6 |I | LEA.L (A6-0x1a),A4 0002177a 4e ba fd a4 |N | JSR 0x21520 0002177e 50 4f |PO | ADDQ.L #0x8,A7 00021780 60 5a |`Z | BRA 0x217dc 00021782 59 4f |YO | SUBQ.L #0x4,A7 00021784 20 13 | | MOVE.L (A3),D0 00021786 d0 92 | | ADD.L (A2),D0 00021788 52 80 |R | ADDQ.L #0x1,D0 0002178a 2f 00 |/ | MOVE.L D0,-(A7) 0002178c 2f 39 00 02 24 ce |/9 $ | MOVE.L 0x224ce,-(A7) 00021792 4e ba f4 ba |N | JSR 0x20c4e 00021796 50 4f |PO | ADDQ.L #0x8,A7 00021798 22 97 |" | MOVE.L (A7),(A1) 0002179a 20 13 | | MOVE.L (A3),D0 0002179c 90 92 | | SUB.L (A2),D0 0002179e 2f 00 |/ | MOVE.L D0,-(A7) 000217a0 48 78 00 00 |Hx | PEA.L 0x0 000217a4 4e ba f4 dc |N | JSR 0x20c82 000217a8 50 4f |PO | ADDQ.L #0x8,A7 000217aa 2c 1f |, | MOVE.L (A7)+,D6 000217ac 20 39 00 02 24 ce | 9 $ | MOVE.L 0x224ce,D0 000217b2 90 92 | | SUB.L (A2),D0 000217b4 52 80 |R | ADDQ.L #0x1,D0 000217b6 b0 93 | | CMP.L (A3),D0 000217b8 6e 10 |n | BGT 0x217ca 000217ba 2c 39 00 02 34 ea |,9 4 | MOVE.L 0x234ea,D6 000217c0 53 86 |S | SUBQ.L #0x1,D6 000217c2 44 86 |D | NEG.L D6 000217c4 dc b9 00 02 24 ce | $ | ADD.L 0x224ce,D6 000217ca 20 13 | | MOVE.L (A3),D0 000217cc b0 92 | | CMP.L (A2),D0 000217ce 6c 08 |l | BGE 0x217d8 000217d0 22 b9 00 02 34 ea |" 4 | MOVE.L 0x234ea,(A1) 000217d6 53 91 |S | SUBQ.L #0x1,(A1) 000217d8 7e 01 |~ | MOVEQ.L #0x01,D7 000217da 20 91 | | MOVE.L (A1),(A0) 000217dc 4a 2e ff f9 |J. | TST.B (A6-0x7) 000217e0 67 0a |g | BEQ 0x217ec 000217e2 22 93 |" | MOVE.L (A3),(A1) 000217e4 2c 13 |, | MOVE.L (A3),D6 000217e6 2e 10 |. | MOVE.L (A0),D7 000217e8 9e 93 | | SUB.L (A3),D7 000217ea 52 87 |R | ADDQ.L #0x1,D7 000217ec 4a 2e ff f8 |J. | TST.B (A6-0x8) 000217f0 67 00 00 a2 |g | BEQ 0x21894 000217f4 20 10 | | MOVE.L (A0),D0 000217f6 90 93 | | SUB.L (A3),D0 000217f8 52 80 |R | ADDQ.L #0x1,D0 000217fa 2f 00 |/ | MOVE.L D0,-(A7) 000217fc 2f 13 |/ | MOVE.L (A3),-(A7) 000217fe 49 ee ff e6 |I | LEA.L (A6-0x1a),A4 00021802 4e ba fd 1c |N | JSR 0x21520 00021806 50 4f |PO | ADDQ.L #0x8,A7 00021808 20 10 | | MOVE.L (A0),D0 0002180a 90 92 | | SUB.L (A2),D0 0002180c b0 93 | | CMP.L (A3),D0 0002180e 6c 3c |l< | BGE 0x2184c 00021810 59 4f |YO | SUBQ.L #0x4,A7 00021812 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00021816 20 39 00 02 24 ce | 9 $ | MOVE.L 0x224ce,D0 0002181c 90 90 | | SUB.L (A0),D0 0002181e 2f 00 |/ | MOVE.L D0,-(A7) 00021820 4e ba f4 2c |N , | JSR 0x20c4e 00021824 50 4f |PO | ADDQ.L #0x8,A7 00021826 2d 5f ff fc |-_ | MOVE.L (A7)+,(A6-0x4) 0002182a 48 78 00 4d |Hx M | PEA.L 0x4d 0002182e 2f 2e ff fc |/. | MOVE.L (A6-0x4),-(A7) 00021832 4e ba f0 da |N | JSR 0x2090e 00021836 50 4f |PO | ADDQ.L #0x8,A7 00021838 2c 10 |, | MOVE.L (A0),D6 0002183a 52 86 |R | ADDQ.L #0x1,D6 0002183c 20 06 | | MOVE.L D6,D0 0002183e d0 ae ff fc | | ADD.L (A6-0x4),D0 00021842 53 80 |S | SUBQ.L #0x1,D0 00021844 22 80 |" | MOVE.L D0,(A1) 00021846 7e 01 |~ | MOVEQ.L #0x01,D7 00021848 20 80 | | MOVE.L D0,(A0) 0002184a 60 48 |`H | BRA 0x21894 0002184c 59 4f |YO | SUBQ.L #0x4,A7 0002184e 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00021852 2f 39 00 02 34 ea |/9 4 | MOVE.L 0x234ea,-(A7) 00021858 53 97 |S | SUBQ.L #0x1,(A7) 0002185a 20 10 | | MOVE.L (A0),D0 0002185c 90 97 | | SUB.L (A7),D0 0002185e 2e 80 |. | MOVE.L D0,(A7) 00021860 4e ba f3 ec |N | JSR 0x20c4e 00021864 50 4f |PO | ADDQ.L #0x8,A7 00021866 20 1f | | MOVE.L (A7)+,D0 00021868 2d 40 ff fc |-@ | MOVE.L D0,(A6-0x4) 0002186c 48 78 00 44 |Hx D | PEA.L 0x44 00021870 2f 00 |/ | MOVE.L D0,-(A7) 00021872 4e ba f0 9a |N | JSR 0x2090e 00021876 50 4f |PO | ADDQ.L #0x8,A7 00021878 22 10 |" | MOVE.L (A0),D1 0002187a 92 b9 00 02 34 ea | 4 | SUB.L 0x234ea,D1 00021880 22 81 |" | MOVE.L D1,(A1) 00021882 92 80 | | SUB.L D0,D1 00021884 52 81 |R | ADDQ.L #0x1,D1 00021886 2c 01 |, | MOVE.L D1,D6 00021888 2e 39 00 02 34 ea |.9 4 | MOVE.L 0x234ea,D7 0002188e 52 87 |R | ADDQ.L #0x1,D7 00021890 9e 80 | | SUB.L D0,D7 00021892 91 90 | | SUB.L D0,(A0) 00021894 2f 06 |/ | MOVE.L D6,-(A7) 00021896 2a 11 |* | MOVE.L (A1),D5 00021898 ba 97 | | CMP.L (A7),D5 0002189a 6d 14 |m | BLT 0x218b0 0002189c 20 17 | | MOVE.L (A7),D0 0002189e 0c 85 7f ff ff ff | | CMPI.L #0x7fffffff,D5 000218a4 6e 08 |n | BGT 0x218ae 000218a6 0c 80 80 00 00 01 | | CMPI.L #0x80000001,D0 000218ac 6c 02 |l | BGE 0x218b0 000218ae 4e 4f |NO | TRAP #15 000218b0 ba 97 | | CMP.L (A7),D5 000218b2 6d 14 |m | BLT 0x218c8 000218b4 2f 07 |/ | MOVE.L D7,-(A7) 000218b6 2f 05 |/ | MOVE.L D5,-(A7) 000218b8 49 ee ff e6 |I | LEA.L (A6-0x1a),A4 000218bc 4e ba fc 62 |N b | JSR 0x21520 000218c0 50 4f |PO | ADDQ.L #0x8,A7 000218c2 52 87 |R | ADDQ.L #0x1,D7 000218c4 53 85 |S | SUBQ.L #0x1,D5 000218c6 68 e8 |h | BVC 0x218b0 000218c8 58 4f |XO | ADDQ.L #0x4,A7 000218ca 23 d3 00 02 34 de |# 4 | MOVE.L (A3),0x234de 000218d0 42 39 00 02 34 ff |B9 4 | CLR.B 0x234ff 000218d6 51 4f |QO | SUBQ.L #0x8,A7 000218d8 2f 39 00 02 34 e6 |/9 4 | MOVE.L 0x234e6,-(A7) 000218de 48 78 00 01 |Hx | PEA.L 0x1 000218e2 4e ba ef 26 |N & | JSR 0x2080a 000218e6 58 4f |XO | ADDQ.L #0x4,A7 000218e8 4e ba f0 aa |N | JSR 0x20994 000218ec 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000218f2 50 4f |PO | ADDQ.L #0x8,A7 000218f4 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000218fa 58 4f |XO | ADDQ.L #0x4,A7 000218fc 4c df 1f e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3+A4 00021900 4e 5e |N^ | UNLK A6 00021902 4e 75 |Nu | RTS 00021904 ; -------------------------------------------------------------------------------------- 00021904 ; OMSI PASCAL Function 00021904 ; <LVAR 0x00c 4(r)> 00021904 ; <LVAR 0x008 4(r)> 00021904 ; <LVAR -0x004 4(w)> 00021904 ; <LVAR -0x006 @> 00021904 ; <LVAR -0x00a 4(r)> 00021904 ; <LVAR -0x00e @ 4(r)> 00021904 ; <LVAR -0x014 1(rw) 2(rw)> 00021904 ; <LVAR -0x01a @ 4(rw)> 00021904 ; <LVAR -0x01e @ 4(r)> 00021904 ; <LVAR -0x020 @> 00021904 ; -------------------------------------------------------------------------------------- 00021904 4e 56 ff 94 |NV | LINK.W A6,#0xff94 00021908 bf d5 | | CMPA.L (A5),A7 0002190a 62 06 |b | BHI 0x21912 0002190c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021910 4e 76 |Nv | TRAPV 00021912 de fc 00 4c | L | ADDA.W #0x4c,A7 00021916 48 e7 f7 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D3+D2+D1+D0,-(A7) 0002191a 43 ee ff e6 |C | LEA.L (A6-0x1a),A1 0002191e 45 ee ff e2 |E | LEA.L (A6-0x1e),A2 00021922 47 ee ff ec |G | LEA.L (A6-0x14),A3 00021926 74 01 |t | MOVEQ.L #0x01,D2 00021928 76 0c |v | MOVEQ.L #0x0c,D3 0002192a 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 0002192e 1f 02 | | MOVE.B D2,-(A7) 00021930 1f 02 | | MOVE.B D2,-(A7) 00021932 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00021936 48 6e ff e0 |Hn | PEA.L (A6-0x20) 0002193a 48 52 |HR | PEA.L (A2) 0002193c 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00021942 de fc 00 14 | | ADDA.W #0x14,A7 00021946 20 2e 00 08 | . | MOVE.L (A6+0x8),D0 0002194a ef 80 | | ASL.L #0x7,D0 0002194c 53 80 |S | SUBQ.L #0x1,D0 0002194e 2d 40 ff fc |-@ | MOVE.L D0,(A6-0x4) 00021952 2a 00 |* | MOVE.L D0,D5 00021954 4a 85 |J | TST.L D5 00021956 6d 00 00 be |m | BLT 0x21a16 0002195a 48 51 |HQ | PEA.L (A1) 0002195c 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00021962 58 4f |XO | ADDQ.L #0x4,A7 00021964 0c 85 00 00 07 ff | | CMPI.L #0x000007ff,D5 0002196a 63 02 |c | BLS 0x2196e 0002196c 4e 4f |NO | TRAP #15 0002196e 20 05 | | MOVE.L D5,D0 00021970 e3 80 | | ASL.L #0x1,D0 00021972 41 f9 00 02 24 c6 |A $ | LEA.L 0x224c6,A0 00021978 36 b0 08 0c |6 | MOVE.W (A0+D0.L+#0xc),(A3) 0002197c 42 80 |B | CLR.L D0 0002197e 10 13 | | MOVE.B (A3),D0 00021980 32 00 |2 | MOVE.W D0,D1 00021982 02 41 00 40 | A @ | ANDI.W #0x0040,D1 00021986 67 04 |g | BEQ 0x2198c 00021988 7e 48 |~H | MOVEQ.L #0x48,D7 0002198a 60 02 |` | BRA 0x2198e 0002198c 7e 20 |~ | MOVEQ.L #0x20,D7 0002198e 32 00 |2 | MOVE.W D0,D1 00021990 02 41 00 80 | A | ANDI.W #0x0080,D1 00021994 67 04 |g | BEQ 0x2199a 00021996 7c 43 ||C | MOVEQ.L #0x43,D6 00021998 60 02 |` | BRA 0x2199c 0002199a 7c 20 || | MOVEQ.L #0x20,D6 0002199c 02 40 00 3f | @ ? | ANDI.W #0x003f,D0 000219a0 16 80 | | MOVE.B D0,(A3) 000219a2 3f 13 |? | MOVE.W (A3),-(A7) 000219a4 48 57 |HW | PEA.L (A7) 000219a6 48 78 00 00 |Hx | PEA.L 0x0 000219aa 48 78 00 01 |Hx | PEA.L 0x1 000219ae 48 6e ff f2 |Hn | PEA.L (A6-0xe) 000219b2 4e b9 00 01 04 b4 |N | JSR ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q) 000219b8 de fc 00 0e | | ADDA.W #0xe,A7 000219bc 2e 91 |. | MOVE.L (A1),(A7) 000219be 1f 07 | | MOVE.B D7,-(A7) 000219c0 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000219c6 54 4f |TO | ADDQ.L #0x2,A7 000219c8 2e 91 |. | MOVE.L (A1),(A7) 000219ca 1f 06 | | MOVE.B D6,-(A7) 000219cc 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000219d2 54 4f |TO | ADDQ.L #0x2,A7 000219d4 2f 11 |/ | MOVE.L (A1),-(A7) 000219d6 59 4f |YO | SUBQ.L #0x4,A7 000219d8 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 000219dc 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 000219e0 48 78 00 10 |Hx | PEA.L 0x10 000219e4 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 000219ea de c3 | | ADDA.W D3,A7 000219ec 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000219f2 50 4f |PO | ADDQ.L #0x8,A7 000219f4 22 9f |" | MOVE.L (A7)+,(A1) 000219f6 2f 12 |/ | MOVE.L (A2),-(A7) 000219f8 2f 11 |/ | MOVE.L (A1),-(A7) 000219fa 48 6e ff fa |Hn | PEA.L (A6-0x6) 000219fe 4e b9 00 01 04 40 |N @ | JSR FSCALL_10440 00021a04 de c3 | | ADDA.W D3,A7 00021a06 48 51 |HQ | PEA.L (A1) 00021a08 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021a0e 58 4f |XO | ADDQ.L #0x4,A7 00021a10 53 85 |S | SUBQ.L #0x1,D5 00021a12 68 00 ff 40 |h @ | BVC 0x21954 00021a16 2f 12 |/ | MOVE.L (A2),-(A7) 00021a18 4e b9 00 01 04 48 |N H | JSR FSCALL_10448 00021a1e 54 4f |TO | ADDQ.L #0x2,A7 00021a20 42 17 |B | CLR.B (A7) 00021a22 1f 02 | | MOVE.B D2,-(A7) 00021a24 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00021a28 48 6e ff e0 |Hn | PEA.L (A6-0x20) 00021a2c 48 52 |HR | PEA.L (A2) 00021a2e 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00021a34 de fc 00 10 | | ADDA.W #0x10,A7 00021a38 4c df 0f ef |L | MOVEM.L (A7)+,D0+D1+D2+D3+D5+D6+D7+A0+A1+A2+A3 00021a3c 4e 5e |N^ | UNLK A6 00021a3e 4e 75 |Nu | RTS 00021a40 ; -------------------------------------------------------------------------------------- 00021a40 ; OMSI PASCAL Function 00021a40 ; <LVAR 0x008 4(r)> 00021a40 ; -------------------------------------------------------------------------------------- 00021a40 4e 56 ff de |NV | LINK.W A6,#0xffde 00021a44 bf d5 | | CMPA.L (A5),A7 00021a46 62 06 |b | BHI 0x21a4e 00021a48 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021a4c 4e 76 |Nv | TRAPV 00021a4e de fc 00 1e | | ADDA.W #0x1e,A7 00021a52 48 e7 c1 e0 |H | MOVEM.L A2+A1+A0+D7+D1+D0,-(A7) 00021a56 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00021a5a 45 f9 00 01 03 d4 |E | LEA.L ReadChar() : Byte,A2 00021a60 4e ba f0 f2 |N | JSR 0x20b54 00021a64 55 4f |UO | SUBQ.L #0x2,A7 00021a66 4e 92 |N | JSR (A2) 00021a68 1e 1f | | MOVE.B (A7)+,D7 00021a6a 42 80 |B | CLR.L D0 00021a6c 10 07 | | MOVE.B D7,D0 00021a6e 41 fa ed 12 |A | LEA.L 0x20782,A0 00021a72 32 00 |2 | MOVE.W D0,D1 00021a74 e6 49 | I | LSR.W #0x3,D1 00021a76 01 30 10 00 | 0 | BTST.B D0,(A0+D1.W) 00021a7a 67 06 |g | BEQ 0x21a82 00021a7c 02 40 00 5f | @ _ | ANDI.W #0x005f,D0 00021a80 1e 00 | | MOVE.B D0,D7 00021a82 0c 07 00 1b | | CMPI.B #0x1b,D7 00021a86 67 06 |g | BEQ 0x21a8e 00021a88 20 51 | Q | MOVEA.L (A1),A0 00021a8a 10 87 | | MOVE.B D7,(A0) 00021a8c 60 60 |`` | BRA 0x21aee 00021a8e 55 4f |UO | SUBQ.L #0x2,A7 00021a90 4e 92 |N | JSR (A2) 00021a92 10 1f | | MOVE.B (A7)+,D0 00021a94 0c 00 00 4f | O | CMPI.B #0x4f,D0 00021a98 67 02 |g | BEQ 0x21a9c 00021a9a 60 4c |`L | BRA switch@0x21ab0[0x1] 00021a9c 55 4f |UO | SUBQ.L #0x2,A7 00021a9e 4e 92 |N | JSR (A2) 00021aa0 42 80 |B | CLR.L D0 00021aa2 10 1f | | MOVE.B (A7)+,D0 00021aa4 04 40 00 6e | @ n | SUBI.W #0x006e,D0 00021aa8 0c 40 00 07 | @ | CMPI.W #0x0007,D0 00021aac 62 3a |b: | BHI switch@0x21ab0[0x1] 00021aae d0 40 | @ | ADD.W D0,D0 00021ab0 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00021ab8 00 28 | ( | .CONST 0x28 ; [0x0] -> 0x21ae0 00021aba 00 30 | 0 | .CONST 0x30 ; [0x1] -> 0x21ae8 00021abc 00 20 | | .CONST 0x20 ; [0x2] -> 0x21ad8 00021abe 00 30 | 0 | .CONST 0x30 ; [0x3] -> 0x21ae8 00021ac0 00 30 | 0 | .CONST 0x30 ; [0x4] -> 0x21ae8 00021ac2 00 30 | 0 | .CONST 0x30 ; [0x5] -> 0x21ae8 00021ac4 00 10 | | .CONST 0x10 ; [0x6] -> 0x21ac8 00021ac6 00 18 | | .CONST 0x18 ; [0x7] -> 0x21ad0 00021ac8 switch@0x21ab0[0x6]: 00021ac8 20 51 | Q | MOVEA.L (A1),A0 00021aca 10 bc 00 50 | P | MOVE.B #0x50,(A0) 00021ace 60 1e |` | BRA 0x21aee 00021ad0 switch@0x21ab0[0x7]: 00021ad0 20 51 | Q | MOVEA.L (A1),A0 00021ad2 10 bc 00 4e | N | MOVE.B #0x4e,(A0) 00021ad6 60 16 |` | BRA 0x21aee 00021ad8 switch@0x21ab0[0x2]: 00021ad8 20 51 | Q | MOVEA.L (A1),A0 00021ada 10 bc 00 42 | B | MOVE.B #0x42,(A0) 00021ade 60 0e |` | BRA 0x21aee 00021ae0 switch@0x21ab0[0x0]: 00021ae0 20 51 | Q | MOVEA.L (A1),A0 00021ae2 10 bc 00 5a | Z | MOVE.B #0x5a,(A0) 00021ae6 60 06 |` | BRA 0x21aee 00021ae8 switch@0x21ab0[0x1]: 00021ae8 switch@0x21ab0[0x3]: 00021ae8 switch@0x21ab0[0x4]: 00021ae8 switch@0x21ab0[0x5]: 00021ae8 20 51 | Q | MOVEA.L (A1),A0 00021aea 10 bc 00 3f | ? | MOVE.B #0x3f,(A0) 00021aee 4c df 07 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2 00021af2 4e 5e |N^ | UNLK A6 00021af4 4e 75 |Nu | RTS 00021af6 ; -------------------------------------------------------------------------------------- 00021af6 ; OMSI PASCAL Function 00021af6 ; <LVAR 0x00c 4(r)> 00021af6 ; <LVAR 0x008 4(r)> 00021af6 ; <LVAR -0x008 @ 1(r)> 00021af6 ; -------------------------------------------------------------------------------------- 00021af6 4e 56 ff d6 |NV | LINK.W A6,#0xffd6 00021afa bf d5 | | CMPA.L (A5),A7 00021afc 62 06 |b | BHI 0x21b04 00021afe 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021b02 4e 76 |Nv | TRAPV 00021b04 de fc 00 22 | " | ADDA.W #0x22,A7 00021b08 48 e7 e3 80 |H | MOVEM.L A0+D7+D6+D2+D1+D0,-(A7) 00021b0c 74 10 |t | MOVEQ.L #0x10,D2 00021b0e 7e 00 |~ | MOVEQ.L #0x00,D7 00021b10 7c 00 || | MOVEQ.L #0x00,D6 00021b12 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00021b16 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021b1c 58 4f |XO | ADDQ.L #0x4,A7 00021b1e 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00021b22 4e ba ec 9e |N | JSR 0x207c2 00021b26 58 4f |XO | ADDQ.L #0x4,A7 00021b28 10 2e ff f8 | . | MOVE.B (A6-0x8),D0 00021b2c 0c 00 00 0d | | CMPI.B #0x0d,D0 00021b30 67 6a |gj | BEQ 0x21b9c 00021b32 42 81 |B | CLR.L D1 00021b34 12 00 | | MOVE.B D0,D1 00021b36 41 fa ec 6a |A j | LEA.L 0x207a2,A0 00021b3a 30 01 |0 | MOVE.W D1,D0 00021b3c e6 48 | H | LSR.W #0x3,D0 00021b3e 03 30 00 00 | 0 | BTST.B D1,(A0+D0.W) 00021b42 66 0e |f | BNE 0x21b52 00021b44 1f 3c 00 07 | < | MOVE.B #0x07,-(A7) 00021b48 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char) 00021b4e 54 4f |TO | ADDQ.L #0x2,A7 00021b50 60 48 |`H | BRA 0x21b9a 00021b52 1f 01 | | MOVE.B D1,-(A7) 00021b54 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char) 00021b5a 54 4f |TO | ADDQ.L #0x2,A7 00021b5c 0c 01 00 39 | 9 | CMPI.B #0x39,D1 00021b60 6e 18 |n | BGT 0x21b7a 00021b62 30 07 |0 | MOVE.W D7,D0 00021b64 c0 c2 | | MULU.W D2,D0 00021b66 04 41 00 30 | A 0 | SUBI.W #0x0030,D1 00021b6a 48 c1 |H | EXTW.L D1 00021b6c d2 80 | | ADD.L D0,D1 00021b6e 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 00021b74 63 02 |c | BLS 0x21b78 00021b76 4e 4f |NO | TRAP #15 00021b78 60 1c |` | BRA 0x21b96 00021b7a 30 07 |0 | MOVE.W D7,D0 00021b7c c0 c2 | | MULU.W D2,D0 00021b7e 04 41 00 41 | A A | SUBI.W #0x0041,D1 00021b82 48 c1 |H | EXTW.L D1 00021b84 d2 80 | | ADD.L D0,D1 00021b86 06 81 00 00 00 0a | | ADDI.L #0x0000000a,D1 00021b8c 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 00021b92 63 02 |c | BLS 0x21b96 00021b94 4e 4f |NO | TRAP #15 00021b96 3e 01 |> | MOVE.W D1,D7 00021b98 52 86 |R | ADDQ.L #0x1,D6 00021b9a 60 82 |` | BRA 0x21b1e 00021b9c 4a 86 |J | TST.L D6 00021b9e 67 18 |g | BEQ 0x21bb8 00021ba0 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021ba4 30 07 |0 | MOVE.W D7,D0 00021ba6 02 40 3f 00 | @? | ANDI.W #0x3f00,D0 00021baa e0 48 | H | LSR.W #0x8,D0 00021bac 10 80 | | MOVE.B D0,(A0) 00021bae 30 07 |0 | MOVE.W D7,D0 00021bb0 02 40 00 ff | @ | ANDI.W #0x00ff,D0 00021bb4 11 40 00 01 | @ | MOVE.B D0,(A0+0x1) 00021bb8 4c df 01 c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0 00021bbc 4e 5e |N^ | UNLK A6 00021bbe 4e 75 |Nu | RTS 00021bc0 ; -------------------------------------------------------------------------------------- 00021bc0 ; OMSI PASCAL Function 00021bc0 ; <LVAR 0x008 4(r)> 00021bc0 ; -------------------------------------------------------------------------------------- 00021bc0 4e 56 ff b6 |NV | LINK.W A6,#0xffb6 00021bc4 bf d5 | | CMPA.L (A5),A7 00021bc6 62 06 |b | BHI 0x21bce 00021bc8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021bcc 4e 76 |Nv | TRAPV 00021bce de fc 00 4a | J | ADDA.W #0x4a,A7 00021bd2 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00021bd6 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00021bda 45 f9 00 02 24 ce |E $ | LEA.L 0x224ce,A2 00021be0 72 01 |r | MOVEQ.L #0x01,D1 00021be2 4a 91 |J | TST.L (A1) 00021be4 6d 0e |m | BLT 0x21bf4 00021be6 20 11 | | MOVE.L (A1),D0 00021be8 b0 92 | | CMP.L (A2),D0 00021bea 6e 08 |n | BGT 0x21bf4 00021bec 23 d1 00 02 34 f6 |# 4 | MOVE.L (A1),0x234f6 00021bf2 60 54 |`T | BRA 0x21c48 00021bf4 42 39 00 02 34 fe |B9 4 | CLR.B 0x234fe 00021bfa 41 fa e9 7c |A | | LEA.L 0x20578,A0 00021bfe 70 05 |p | MOVEQ.L #0x05,D0 00021c00 2f 20 |/ | MOVE.L -(A0),-(A7) 00021c02 51 c8 ff fc |Q | DBF D0,0x21c00 00021c06 3f 3a e9 70 |?: p | MOVE.W 0x20578,-(A7) 00021c0a 51 4f |QO | SUBQ.L #0x8,A7 00021c0c 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00021c10 3f 01 |? | MOVE.W D1,-(A7) 00021c12 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00021c16 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021c1c 2e 92 |. | MOVE.L (A2),(A7) 00021c1e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021c24 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00021c28 3f 01 |? | MOVE.W D1,-(A7) 00021c2a 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00021c2e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021c34 50 4f |PO | ADDQ.L #0x8,A7 00021c36 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00021c3c de fc 00 0c | | ADDA.W #0xc,A7 00021c40 4e ba ef 80 |N | JSR 0x20bc2 00021c44 de fc 00 1e | | ADDA.W #0x1e,A7 00021c48 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00021c4c 4e 5e |N^ | UNLK A6 00021c4e 4e 75 |Nu | RTS 00021c50 ; -------------------------------------------------------------------------------------- 00021c50 ; OMSI PASCAL Function 00021c50 ; <LVAR 0x00e 1(r)> 00021c50 ; <LVAR 0x00d 1(r)> 00021c50 ; <LVAR 0x00c 1(r)> 00021c50 ; <LVAR 0x008 4(r)> 00021c50 ; <LVAR -0x003 1(r)> 00021c50 ; <LVAR -0x004 1(r) 2(w)> 00021c50 ; -------------------------------------------------------------------------------------- 00021c50 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00021c54 bf d5 | | CMPA.L (A5),A7 00021c56 62 06 |b | BHI 0x21c5e 00021c58 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021c5c 4e 76 |Nv | TRAPV 00021c5e de fc 00 30 | 0 | ADDA.W #0x30,A7 00021c62 48 e7 e1 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D2+D1+D0,-(A7) 00021c66 43 ee ff fc |C | LEA.L (A6-0x4),A1 00021c6a 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00021c6e 47 f9 00 02 34 f6 |G 4 | LEA.L 0x234f6,A3 00021c74 49 f9 00 02 24 c6 |I $ | LEA.L 0x224c6,A4 00021c7a 74 3f |t? | MOVEQ.L #0x3f,D2 00021c7c 20 52 | R | MOVEA.L (A2),A0 00021c7e 20 bc ff ff ff ff | | MOVE.L #0xffffffff,(A0) 00021c84 4a 2e 00 0e |J. | TST.B (A6+0xe) 00021c88 67 4e |gN | BEQ 0x21cd8 00021c8a 20 13 | | MOVE.L (A3),D0 00021c8c 52 80 |R | ADDQ.L #0x1,D0 00021c8e 2f 39 00 02 24 ce |/9 $ | MOVE.L 0x224ce,-(A7) 00021c94 2e 00 |. | MOVE.L D0,D7 00021c96 be 97 | | CMP.L (A7),D7 00021c98 6e 3a |n: | BGT 0x21cd4 00021c9a 0c 87 00 00 07 ff | | CMPI.L #0x000007ff,D7 00021ca0 63 02 |c | BLS 0x21ca4 00021ca2 4e 4f |NO | TRAP #15 00021ca4 20 07 | | MOVE.L D7,D0 00021ca6 e3 80 | | ASL.L #0x1,D0 00021ca8 20 4c | L | MOVEA.L A4,A0 00021caa 32 b0 08 0c |2 | MOVE.W (A0+D0.L+#0xc),(A1) 00021cae 42 80 |B | CLR.L D0 00021cb0 10 11 | | MOVE.B (A1),D0 00021cb2 c0 42 | B | AND.W D2,D0 00021cb4 42 81 |B | CLR.L D1 00021cb6 12 2e 00 0c | . | MOVE.B (A6+0xc),D1 00021cba b2 40 | @ | CMP.W D0,D1 00021cbc 66 12 |f | BNE 0x21cd0 00021cbe 10 2e 00 0d | . | MOVE.B (A6+0xd),D0 00021cc2 b0 2e ff fd | . | CMP.B (A6-0x3),D0 00021cc6 66 08 |f | BNE 0x21cd0 00021cc8 20 52 | R | MOVEA.L (A2),A0 00021cca 20 87 | | MOVE.L D7,(A0) 00021ccc 58 4f |XO | ADDQ.L #0x4,A7 00021cce 60 4a |`J | BRA 0x21d1a 00021cd0 52 87 |R | ADDQ.L #0x1,D7 00021cd2 68 c2 |h | BVC 0x21c96 00021cd4 58 4f |XO | ADDQ.L #0x4,A7 00021cd6 60 42 |`B | BRA 0x21d1a 00021cd8 20 13 | | MOVE.L (A3),D0 00021cda 53 80 |S | SUBQ.L #0x1,D0 00021cdc 2e 00 |. | MOVE.L D0,D7 00021cde 4a 87 |J | TST.L D7 00021ce0 6d 38 |m8 | BLT 0x21d1a 00021ce2 0c 87 00 00 07 ff | | CMPI.L #0x000007ff,D7 00021ce8 63 02 |c | BLS 0x21cec 00021cea 4e 4f |NO | TRAP #15 00021cec 20 07 | | MOVE.L D7,D0 00021cee e3 80 | | ASL.L #0x1,D0 00021cf0 20 4c | L | MOVEA.L A4,A0 00021cf2 32 b0 08 0c |2 | MOVE.W (A0+D0.L+#0xc),(A1) 00021cf6 42 80 |B | CLR.L D0 00021cf8 10 11 | | MOVE.B (A1),D0 00021cfa c0 42 | B | AND.W D2,D0 00021cfc 42 81 |B | CLR.L D1 00021cfe 12 2e 00 0c | . | MOVE.B (A6+0xc),D1 00021d02 b2 40 | @ | CMP.W D0,D1 00021d04 66 10 |f | BNE 0x21d16 00021d06 10 2e 00 0d | . | MOVE.B (A6+0xd),D0 00021d0a b0 2e ff fd | . | CMP.B (A6-0x3),D0 00021d0e 66 06 |f | BNE 0x21d16 00021d10 20 52 | R | MOVEA.L (A2),A0 00021d12 20 87 | | MOVE.L D7,(A0) 00021d14 60 04 |` | BRA 0x21d1a 00021d16 53 87 |S | SUBQ.L #0x1,D7 00021d18 68 c4 |h | BVC 0x21cde 00021d1a 4c df 1f 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1+A2+A3+A4 00021d1e 4e 5e |N^ | UNLK A6 00021d20 4e 75 |Nu | RTS 00021d22 ; -------------------------------------------------------------------------------------- 00021d22 ; OMSI PASCAL Function 00021d22 ; -------------------------------------------------------------------------------------- 00021d22 4e 56 ff 3c |NV < | LINK.W A6,#0xff3c 00021d26 bf d5 | | CMPA.L (A5),A7 00021d28 62 06 |b | BHI 0x21d30 00021d2a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021d2e 4e 76 |Nv | TRAPV 00021d30 de fc 00 c4 | | ADDA.W #0xc4,A7 00021d34 48 e7 fe f8 |H | MOVEM.L A4+A3+A2+A1+A0+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021d38 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021d3e 47 f8 00 2d |G - | LEA.L 0x2d,A3 00021d42 49 fa ea c6 |I | LEA.L 0x2080a,A4 00021d46 72 01 |r | MOVEQ.L #0x01,D1 00021d48 74 23 |t# | MOVEQ.L #0x23,D2 00021d4a 76 24 |v$ | MOVEQ.L #0x24,D3 00021d4c 78 4c |xL | MOVEQ.L #0x4c,D4 00021d4e 7a 14 |z | MOVEQ.L #0x14,D5 00021d50 7c 18 || | MOVEQ.L #0x18,D6 00021d52 41 fa e8 38 |A 8 | LEA.L 0x2058c,A0 00021d56 70 08 |p | MOVEQ.L #0x08,D0 00021d58 3f 20 |? | MOVE.W -(A0),-(A7) 00021d5a 51 c8 ff fc |Q | DBF D0,0x21d58 00021d5e 9e fc 00 0e | | SUBA.W #0xe,A7 00021d62 20 4f | O | MOVEA.L A7,A0 00021d64 43 fa e8 26 |C & | LEA.L 0x2058c,A1 00021d68 70 0c |p | MOVEQ.L #0x0c,D0 00021d6a 10 d9 | | MOVE.B (A1)+,(A0)+ 00021d6c 51 c8 ff fc |Q | DBF D0,0x21d6a 00021d70 51 4f |QO | SUBQ.L #0x8,A7 00021d72 4e ba ec 66 |N f | JSR 0x209da 00021d76 59 4f |YO | SUBQ.L #0x4,A7 00021d78 48 78 00 01 |Hx | PEA.L 0x1 00021d7c 48 53 |HS | PEA.L (A3) 00021d7e 4e 94 |N | JSR (A4) 00021d80 58 4f |XO | ADDQ.L #0x4,A7 00021d82 48 6f 00 1e |Ho | PEA.L (A7+0x1e) 00021d86 3f 01 |? | MOVE.W D1,-(A7) 00021d88 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00021d8c 4e 92 |N | JSR (A2) 00021d8e 2e b9 00 02 24 ce |. $ | MOVE.L 0x224ce,(A7) 00021d94 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021d9a 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00021d9e 3f 01 |? | MOVE.W D1,-(A7) 00021da0 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 00021da4 4e 92 |N | JSR (A2) 00021da6 50 4f |PO | ADDQ.L #0x8,A7 00021da8 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 00021dae de c5 | | ADDA.W D5,A7 00021db0 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021db6 20 4f | O | MOVEA.L A7,A0 00021db8 43 fa e7 e0 |C | LEA.L 0x2059a,A1 00021dbc 70 22 |p" | MOVEQ.L #0x22,D0 00021dbe 10 d9 | | MOVE.B (A1)+,(A0)+ 00021dc0 51 c8 ff fc |Q | DBF D0,0x21dbe 00021dc4 9e c3 | | SUBA.W D3,A7 00021dc6 20 4f | O | MOVEA.L A7,A0 00021dc8 43 fa e7 f4 |C | LEA.L 0x205be,A1 00021dcc 70 22 |p" | MOVEQ.L #0x22,D0 00021dce 10 d9 | | MOVE.B (A1)+,(A0)+ 00021dd0 51 c8 ff fc |Q | DBF D0,0x21dce 00021dd4 9e c3 | | SUBA.W D3,A7 00021dd6 20 4f | O | MOVEA.L A7,A0 00021dd8 43 fa e8 08 |C | LEA.L 0x205e2,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 51 4f |QO | SUBQ.L #0x8,A7 00021de6 48 78 00 02 |Hx | PEA.L 0x2 00021dea 48 53 |HS | PEA.L (A3) 00021dec 4e 94 |N | JSR (A4) 00021dee 58 4f |XO | ADDQ.L #0x4,A7 00021df0 48 6f 00 54 |Ho T | PEA.L (A7+0x54) 00021df4 3f 01 |? | MOVE.W D1,-(A7) 00021df6 3f 02 |? | MOVE.W D2,-(A7) 00021df8 4e 92 |N | JSR (A2) 00021dfa 58 4f |XO | ADDQ.L #0x4,A7 00021dfc 48 78 00 03 |Hx | PEA.L 0x3 00021e00 48 53 |HS | PEA.L (A3) 00021e02 4e 94 |N | JSR (A4) 00021e04 58 4f |XO | ADDQ.L #0x4,A7 00021e06 48 6f 00 38 |Ho 8 | PEA.L (A7+0x38) 00021e0a 3f 01 |? | MOVE.W D1,-(A7) 00021e0c 3f 02 |? | MOVE.W D2,-(A7) 00021e0e 4e 92 |N | JSR (A2) 00021e10 58 4f |XO | ADDQ.L #0x4,A7 00021e12 48 78 00 04 |Hx | PEA.L 0x4 00021e16 48 53 |HS | PEA.L (A3) 00021e18 4e 94 |N | JSR (A4) 00021e1a 58 4f |XO | ADDQ.L #0x4,A7 00021e1c 48 6f 00 1c |Ho | PEA.L (A7+0x1c) 00021e20 3f 01 |? | MOVE.W D1,-(A7) 00021e22 3f 02 |? | MOVE.W D2,-(A7) 00021e24 4e 92 |N | JSR (A2) 00021e26 50 4f |PO | ADDQ.L #0x8,A7 00021e28 4e b9 00 01 02 e0 |N | JSR StringCat6(a, b, c, d, e, f : String) : String 00021e2e de c6 | | ADDA.W D6,A7 00021e30 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021e36 de c4 | | ADDA.W D4,A7 00021e38 20 4f | O | MOVEA.L A7,A0 00021e3a 43 fa e7 ca |C | LEA.L 0x20606,A1 00021e3e 70 22 |p" | MOVEQ.L #0x22,D0 00021e40 10 d9 | | MOVE.B (A1)+,(A0)+ 00021e42 51 c8 ff fc |Q | DBF D0,0x21e40 00021e46 9e c3 | | SUBA.W D3,A7 00021e48 20 4f | O | MOVEA.L A7,A0 00021e4a 43 fa e7 de |C | LEA.L 0x2062a,A1 00021e4e 70 22 |p" | MOVEQ.L #0x22,D0 00021e50 10 d9 | | MOVE.B (A1)+,(A0)+ 00021e52 51 c8 ff fc |Q | DBF D0,0x21e50 00021e56 9e c3 | | SUBA.W D3,A7 00021e58 20 4f | O | MOVEA.L A7,A0 00021e5a 43 fa e7 f2 |C | LEA.L 0x2064e,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 51 4f |QO | SUBQ.L #0x8,A7 00021e68 48 78 00 05 |Hx | PEA.L 0x5 00021e6c 48 53 |HS | PEA.L (A3) 00021e6e 4e 94 |N | JSR (A4) 00021e70 58 4f |XO | ADDQ.L #0x4,A7 00021e72 48 6f 00 54 |Ho T | PEA.L (A7+0x54) 00021e76 3f 01 |? | MOVE.W D1,-(A7) 00021e78 3f 02 |? | MOVE.W D2,-(A7) 00021e7a 4e 92 |N | JSR (A2) 00021e7c 58 4f |XO | ADDQ.L #0x4,A7 00021e7e 48 78 00 06 |Hx | PEA.L 0x6 00021e82 48 53 |HS | PEA.L (A3) 00021e84 4e 94 |N | JSR (A4) 00021e86 58 4f |XO | ADDQ.L #0x4,A7 00021e88 48 6f 00 38 |Ho 8 | PEA.L (A7+0x38) 00021e8c 3f 01 |? | MOVE.W D1,-(A7) 00021e8e 3f 02 |? | MOVE.W D2,-(A7) 00021e90 4e 92 |N | JSR (A2) 00021e92 58 4f |XO | ADDQ.L #0x4,A7 00021e94 48 78 00 07 |Hx | PEA.L 0x7 00021e98 48 53 |HS | PEA.L (A3) 00021e9a 4e 94 |N | JSR (A4) 00021e9c 58 4f |XO | ADDQ.L #0x4,A7 00021e9e 48 6f 00 1c |Ho | PEA.L (A7+0x1c) 00021ea2 3f 01 |? | MOVE.W D1,-(A7) 00021ea4 3f 02 |? | MOVE.W D2,-(A7) 00021ea6 4e 92 |N | JSR (A2) 00021ea8 50 4f |PO | ADDQ.L #0x8,A7 00021eaa 4e b9 00 01 02 e0 |N | JSR StringCat6(a, b, c, d, e, f : String) : String 00021eb0 de c6 | | ADDA.W D6,A7 00021eb2 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021eb8 de c4 | | ADDA.W D4,A7 00021eba 20 4f | O | MOVEA.L A7,A0 00021ebc 43 fa e7 b4 |C | LEA.L 0x20672,A1 00021ec0 70 22 |p" | MOVEQ.L #0x22,D0 00021ec2 10 d9 | | MOVE.B (A1)+,(A0)+ 00021ec4 51 c8 ff fc |Q | DBF D0,0x21ec2 00021ec8 9e c3 | | SUBA.W D3,A7 00021eca 20 4f | O | MOVEA.L A7,A0 00021ecc 43 fa e7 c8 |C | LEA.L 0x20696,A1 00021ed0 70 22 |p" | MOVEQ.L #0x22,D0 00021ed2 10 d9 | | MOVE.B (A1)+,(A0)+ 00021ed4 51 c8 ff fc |Q | DBF D0,0x21ed2 00021ed8 51 4f |QO | SUBQ.L #0x8,A7 00021eda 48 78 00 08 |Hx | PEA.L 0x8 00021ede 48 53 |HS | PEA.L (A3) 00021ee0 4e 94 |N | JSR (A4) 00021ee2 58 4f |XO | ADDQ.L #0x4,A7 00021ee4 48 6f 00 30 |Ho 0 | PEA.L (A7+0x30) 00021ee8 3f 01 |? | MOVE.W D1,-(A7) 00021eea 3f 02 |? | MOVE.W D2,-(A7) 00021eec 4e 92 |N | JSR (A2) 00021eee 58 4f |XO | ADDQ.L #0x4,A7 00021ef0 48 78 00 09 |Hx | PEA.L 0x9 00021ef4 48 53 |HS | PEA.L (A3) 00021ef6 4e 94 |N | JSR (A4) 00021ef8 58 4f |XO | ADDQ.L #0x4,A7 00021efa 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00021efe 3f 01 |? | MOVE.W D1,-(A7) 00021f00 3f 02 |? | MOVE.W D2,-(A7) 00021f02 4e 92 |N | JSR (A2) 00021f04 50 4f |PO | ADDQ.L #0x8,A7 00021f06 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00021f0c de fc 00 10 | | ADDA.W #0x10,A7 00021f10 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021f16 de fc 00 28 | ( | ADDA.W #0x28,A7 00021f1a 20 4f | O | MOVEA.L A7,A0 00021f1c 43 fa e7 9c |C | LEA.L 0x206ba,A1 00021f20 70 22 |p" | MOVEQ.L #0x22,D0 00021f22 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f24 51 c8 ff fc |Q | DBF D0,0x21f22 00021f28 9e c3 | | SUBA.W D3,A7 00021f2a 20 4f | O | MOVEA.L A7,A0 00021f2c 43 fa e7 b0 |C | LEA.L 0x206de,A1 00021f30 70 22 |p" | MOVEQ.L #0x22,D0 00021f32 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f34 51 c8 ff fc |Q | DBF D0,0x21f32 00021f38 51 4f |QO | SUBQ.L #0x8,A7 00021f3a 48 78 00 0a |Hx | PEA.L 0xa 00021f3e 48 53 |HS | PEA.L (A3) 00021f40 4e 94 |N | JSR (A4) 00021f42 58 4f |XO | ADDQ.L #0x4,A7 00021f44 48 6f 00 30 |Ho 0 | PEA.L (A7+0x30) 00021f48 3f 01 |? | MOVE.W D1,-(A7) 00021f4a 3f 02 |? | MOVE.W D2,-(A7) 00021f4c 4e 92 |N | JSR (A2) 00021f4e 58 4f |XO | ADDQ.L #0x4,A7 00021f50 48 78 00 0b |Hx | PEA.L 0xb 00021f54 48 53 |HS | PEA.L (A3) 00021f56 4e 94 |N | JSR (A4) 00021f58 58 4f |XO | ADDQ.L #0x4,A7 00021f5a 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00021f5e 3f 01 |? | MOVE.W D1,-(A7) 00021f60 3f 02 |? | MOVE.W D2,-(A7) 00021f62 4e 92 |N | JSR (A2) 00021f64 58 4f |XO | ADDQ.L #0x4,A7 00021f66 4e ba ea c0 |N | JSR 0x20a28 00021f6a 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 00021f70 de c5 | | ADDA.W D5,A7 00021f72 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021f78 de c4 | | ADDA.W D4,A7 00021f7a 42 39 00 02 34 fe |B9 4 | CLR.B 0x234fe 00021f80 4c df 1f 7f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+A0+A1+A2+A3+A4 00021f84 4e 5e |N^ | UNLK A6 00021f86 4e 75 |Nu | RTS 00021f88 ; -------------------------------------------------------------------------------------- 00021f88 ; OMSI PASCAL Function 00021f88 ; -------------------------------------------------------------------------------------- 00021f88 START: 00021f88 4f fa 00 08 |O | LEA.L MAIN,A7 00021f8c 4e f9 00 01 02 80 |N | JMP ?start_program 00021f92 MAIN: 00021f92 45 f9 00 02 34 fe |E 4 | LEA.L 0x234fe,A2 00021f98 47 f9 00 02 35 0a |G 5 | LEA.L 0x2350a,A3 00021f9e 49 f9 00 02 34 f6 |I 4 | LEA.L 0x234f6,A4 00021fa4 72 01 |r | MOVEQ.L #0x01,D1 00021fa6 74 0a |t | MOVEQ.L #0x0a,D2 00021fa8 76 09 |v | MOVEQ.L #0x09,D3 00021faa 78 16 |x | MOVEQ.L #0x16,D4 00021fac 7a 0c |z | MOVEQ.L #0x0c,D5 00021fae 7c 1c || | MOVEQ.L #0x1c,D6 00021fb0 7e 0e |~ | MOVEQ.L #0x0e,D7 00021fb2 4e b9 00 01 03 98 |N | JSR FSCALL_10398 00021fb8 48 78 00 00 |Hx | PEA.L 0x0 00021fbc 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 00021fc2 58 4f |XO | ADDQ.L #0x4,A7 00021fc4 4e ba ef c8 |N | JSR 0x20f8e 00021fc8 42 13 |B | CLR.B (A3) 00021fca 28 b9 00 02 34 fa |( 4 | MOVE.L 0x234fa,(A4) 00021fd0 14 81 | | MOVE.B D1,(A2) 00021fd2 4a 12 |J | TST.B (A2) 00021fd4 67 34 |g4 | BEQ 0x2200a 00021fd6 2f 14 |/ | MOVE.L (A4),-(A7) 00021fd8 1f 13 | | MOVE.B (A3),-(A7) 00021fda 4e ba f7 04 |N | JSR 0x216e0 00021fde 5d 4f |]O | SUBQ.L #0x6,A7 00021fe0 20 4f | O | MOVEA.L A7,A0 00021fe2 43 fa e7 3e |C > | LEA.L 0x20722,A1 00021fe6 70 0a |p | MOVEQ.L #0x0a,D0 00021fe8 10 d9 | | MOVE.B (A1)+,(A0)+ 00021fea 51 c8 ff fc |Q | DBF D0,0x21fe8 00021fee 59 4f |YO | SUBQ.L #0x4,A7 00021ff0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021ff4 3f 01 |? | MOVE.W D1,-(A7) 00021ff6 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00021ffa 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022000 50 4f |PO | ADDQ.L #0x8,A7 00022002 4e ba eb be |N | JSR 0x20bc2 00022006 de fc 00 10 | | ADDA.W #0x10,A7 0002200a 14 81 | | MOVE.B D1,(A2) 0002200c 48 79 00 02 35 00 |Hy 5 | PEA.L 0x23500 00022012 4e ba fa 2c |N , | JSR 0x21a40 00022016 58 4f |XO | ADDQ.L #0x4,A7 00022018 42 80 |B | CLR.L D0 0002201a 10 39 00 02 35 00 | 9 5 | MOVE.B 0x23500,D0 00022020 04 40 00 3f | @ ? | SUBI.W #0x003f,D0 00022024 0c 40 00 1b | @ | CMPI.W #0x001b,D0 00022028 62 00 02 0c |b | BHI switch@0x2202e[0x1] 0002202c d0 40 | @ | ADD.W D0,D0 0002202e 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00022036 00 38 | 8 | .CONST 0x38 ; [0x0] -> 0x2206e 00022038 02 00 | | .CONST 0x200 ; [0x1] -> 0x22236 0002203a 02 00 | | .CONST 0x200 ; [0x2] -> 0x22236 0002203c 00 42 | B | .CONST 0x42 ; [0x3] -> 0x22078 0002203e 02 00 | | .CONST 0x200 ; [0x4] -> 0x22236 00022040 02 00 | | .CONST 0x200 ; [0x5] -> 0x22236 00022042 02 00 | | .CONST 0x200 ; [0x6] -> 0x22236 00022044 00 52 | R | .CONST 0x52 ; [0x7] -> 0x22088 00022046 02 00 | | .CONST 0x200 ; [0x8] -> 0x22236 00022048 02 00 | | .CONST 0x200 ; [0x9] -> 0x22236 0002204a 02 00 | | .CONST 0x200 ; [0xa] -> 0x22236 0002204c 02 00 | | .CONST 0x200 ; [0xb] -> 0x22236 0002204e 02 00 | | .CONST 0x200 ; [0xc] -> 0x22236 00022050 00 d4 | | .CONST 0xd4 ; [0xd] -> 0x2210a 00022052 02 00 | | .CONST 0x200 ; [0xe] -> 0x22236 00022054 00 e2 | | .CONST 0xe2 ; [0xf] -> 0x22118 00022056 00 ea | | .CONST 0xea ; [0x10] -> 0x22120 00022058 01 1e | | .CONST 0x11e ; [0x11] -> 0x22154 0002205a 02 00 | | .CONST 0x200 ; [0x12] -> 0x22236 0002205c 01 26 | & | .CONST 0x126 ; [0x13] -> 0x2215c 0002205e 01 26 | & | .CONST 0x126 ; [0x14] -> 0x2215c 00022060 02 00 | | .CONST 0x200 ; [0x15] -> 0x22236 00022062 02 00 | | .CONST 0x200 ; [0x16] -> 0x22236 00022064 02 00 | | .CONST 0x200 ; [0x17] -> 0x22236 00022066 02 00 | | .CONST 0x200 ; [0x18] -> 0x22236 00022068 01 b4 | | .CONST 0x1b4 ; [0x19] -> 0x221ea 0002206a 02 00 | | .CONST 0x200 ; [0x1a] -> 0x22236 0002206c 01 f8 | | .CONST 0x1f8 ; [0x1b] -> 0x2222e 0002206e switch@0x2202e[0x0]: 0002206e 4e ba fc b2 |N | JSR 0x21d22 00022072 42 12 |B | CLR.B (A2) 00022074 60 00 01 e8 |` | BRA 0x2225e 00022078 switch@0x2202e[0x3]: 00022078 2f 39 00 02 24 ce |/9 $ | MOVE.L 0x224ce,-(A7) 0002207e 4e ba fb 40 |N @ | JSR 0x21bc0 00022082 58 4f |XO | ADDQ.L #0x4,A7 00022084 60 00 01 d8 |` | BRA 0x2225e 00022088 switch@0x2202e[0x7]: 00022088 9e c2 | | SUBA.W D2,A7 0002208a 20 4f | O | MOVEA.L A7,A0 0002208c 43 fa e6 a0 |C | LEA.L 0x2072e,A1 00022090 70 08 |p | MOVEQ.L #0x08,D0 00022092 10 d9 | | MOVE.B (A1)+,(A0)+ 00022094 51 c8 ff fc |Q | DBF D0,0x22092 00022098 51 4f |QO | SUBQ.L #0x8,A7 0002209a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002209e 3f 01 |? | MOVE.W D1,-(A7) 000220a0 3f 03 |? | MOVE.W D3,-(A7) 000220a2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000220a8 50 4f |PO | ADDQ.L #0x8,A7 000220aa 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 000220b0 58 4f |XO | ADDQ.L #0x4,A7 000220b2 23 df 00 02 35 0c |# 5 | MOVE.L (A7)+,0x2350c 000220b8 9e c4 | | SUBA.W D4,A7 000220ba 20 4f | O | MOVEA.L A7,A0 000220bc 43 fa e6 44 |C D | LEA.L 0x20702,A1 000220c0 70 1e |p | MOVEQ.L #0x1e,D0 000220c2 10 d9 | | MOVE.B (A1)+,(A0)+ 000220c4 51 c8 ff fc |Q | DBF D0,0x220c2 000220c8 51 4f |QO | SUBQ.L #0x8,A7 000220ca 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000220ce 3f 01 |? | MOVE.W D1,-(A7) 000220d0 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7) 000220d4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000220da 50 4f |PO | ADDQ.L #0x8,A7 000220dc 48 78 00 01 |Hx | PEA.L 0x1 000220e0 48 78 00 07 |Hx | PEA.L 0x7 000220e4 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 000220ea de c5 | | ADDA.W D5,A7 000220ec 23 df 00 02 35 06 |# 5 | MOVE.L (A7)+,0x23506 000220f2 de c6 | | ADDA.W D6,A7 000220f4 2e b9 00 02 35 0c |. 5 | MOVE.L 0x2350c,(A7) 000220fa 2f 39 00 02 35 06 |/9 5 | MOVE.L 0x23506,-(A7) 00022100 4e ba f8 02 |N | JSR 0x21904 00022104 50 4f |PO | ADDQ.L #0x8,A7 00022106 60 00 ff 6a |` j | BRA 0x22072 0002210a switch@0x2202e[0xd]: 0002210a 44 13 |D | NEG.B (A3) 0002210c 52 13 |R | ADDQ.B #0x1,(A3) 0002210e 13 c1 00 02 34 ff | 4 | MOVE.B D1,0x234ff 00022114 60 00 01 48 |` H | BRA 0x2225e 00022118 switch@0x2202e[0xf]: 00022118 2f 14 |/ | MOVE.L (A4),-(A7) 0002211a 53 97 |S | SUBQ.L #0x1,(A7) 0002211c 60 00 ff 60 |` ` | BRA 0x2207e 00022120 switch@0x2202e[0x10]: 00022120 9e c2 | | SUBA.W D2,A7 00022122 20 4f | O | MOVEA.L A7,A0 00022124 43 fa e6 12 |C | LEA.L 0x20738,A1 00022128 70 08 |p | MOVEQ.L #0x08,D0 0002212a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002212c 51 c8 ff fc |Q | DBF D0,0x2212a 00022130 51 4f |QO | SUBQ.L #0x8,A7 00022132 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022136 3f 01 |? | MOVE.W D1,-(A7) 00022138 3f 03 |? | MOVE.W D3,-(A7) 0002213a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022140 50 4f |PO | ADDQ.L #0x8,A7 00022142 4e b9 00 01 03 e8 |N | JSR AskOnConsoleInt(prompt: String) : Long 00022148 58 4f |XO | ADDQ.L #0x4,A7 0002214a 4e ba fa 74 |N t | JSR 0x21bc0 0002214e de c7 | | ADDA.W D7,A7 00022150 60 00 01 0c |` | BRA 0x2225e 00022154 switch@0x2202e[0x11]: 00022154 2f 14 |/ | MOVE.L (A4),-(A7) 00022156 52 97 |R | ADDQ.L #0x1,(A7) 00022158 60 00 ff 24 |` $ | BRA 0x2207e 0002215c switch@0x2202e[0x13]: 0002215c switch@0x2202e[0x14]: 0002215c 41 fa e5 f2 |A | LEA.L 0x20750,A0 00022160 70 06 |p | MOVEQ.L #0x06,D0 00022162 3f 20 |? | MOVE.W -(A0),-(A7) 00022164 51 c8 ff fc |Q | DBF D0,0x22162 00022168 59 4f |YO | SUBQ.L #0x4,A7 0002216a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002216e 3f 01 |? | MOVE.W D1,-(A7) 00022170 3f 07 |? | MOVE.W D7,-(A7) 00022172 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022178 50 4f |PO | ADDQ.L #0x8,A7 0002217a 48 79 00 02 35 10 |Hy 5 | PEA.L 0x23510 00022180 4e ba f9 74 |N t | JSR 0x21af6 00022184 de fc 00 14 | | ADDA.W #0x14,A7 00022188 42 17 |B | CLR.B (A7) 0002218a 10 39 00 02 35 00 | 9 5 | MOVE.B 0x23500,D0 00022190 0c 00 00 53 | S | CMPI.B #0x53,D0 00022194 66 02 |f | BNE 0x22198 00022196 52 17 |R | ADDQ.B #0x1,(A7) 00022198 3f 39 00 02 35 10 |?9 5 | MOVE.W 0x23510,-(A7) 0002219e 48 79 00 02 35 02 |Hy 5 | PEA.L 0x23502 000221a4 4e ba fa aa |N | JSR 0x21c50 000221a8 50 4f |PO | ADDQ.L #0x8,A7 000221aa 4a b9 00 02 35 02 |J 5 | TST.L 0x23502 000221b0 6d 0e |m | BLT 0x221c0 000221b2 2f 39 00 02 35 02 |/9 5 | MOVE.L 0x23502,-(A7) 000221b8 4e ba fa 06 |N | JSR 0x21bc0 000221bc 58 4f |XO | ADDQ.L #0x4,A7 000221be 60 28 |`( | BRA 0x221e8 000221c0 41 fa e5 a4 |A | LEA.L 0x20766,A0 000221c4 70 0a |p | MOVEQ.L #0x0a,D0 000221c6 3f 20 |? | MOVE.W -(A0),-(A7) 000221c8 51 c8 ff fc |Q | DBF D0,0x221c6 000221cc 59 4f |YO | SUBQ.L #0x4,A7 000221ce 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000221d2 3f 01 |? | MOVE.W D1,-(A7) 000221d4 3f 04 |? | MOVE.W D4,-(A7) 000221d6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000221dc 50 4f |PO | ADDQ.L #0x8,A7 000221de 4e ba e9 e2 |N | JSR 0x20bc2 000221e2 de fc 00 1a | | ADDA.W #0x1a,A7 000221e6 42 12 |B | CLR.B (A2) 000221e8 60 74 |`t | BRA 0x2225e 000221ea switch@0x2202e[0x19]: 000221ea 51 4f |QO | SUBQ.L #0x8,A7 000221ec 48 78 00 01 |Hx | PEA.L 0x1 000221f0 2f 39 00 02 34 f2 |/9 4 | MOVE.L 0x234f2,-(A7) 000221f6 4e ba e6 94 |N | JSR 0x2088c 000221fa 58 4f |XO | ADDQ.L #0x4,A7 000221fc 48 78 00 01 |Hx | PEA.L 0x1 00022200 48 78 00 01 |Hx | PEA.L 0x1 00022204 4e ba e6 04 |N | JSR 0x2080a 00022208 58 4f |XO | ADDQ.L #0x4,A7 0002220a 4e ba e7 88 |N | JSR 0x20994 0002220e 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00022214 de c5 | | ADDA.W D5,A7 00022216 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 0002221c 54 4f |TO | ADDQ.L #0x2,A7 0002221e 42 17 |B | CLR.B (A7) 00022220 48 78 00 01 |Hx | PEA.L 0x1 00022224 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002222a 5c 4f |\O | ADDQ.L #0x6,A7 0002222c 60 30 |`0 | BRA 0x2225e 0002222e switch@0x2202e[0x1b]: 0002222e 48 78 00 00 |Hx | PEA.L 0x0 00022232 60 00 fe 4a |` J | BRA 0x2207e 00022236 switch@0x2202e[0x12]: 00022236 switch@0x2202e[0x15]: 00022236 switch@0x2202e[0x16]: 00022236 switch@0x2202e[0x17]: 00022236 switch@0x2202e[0x18]: 00022236 switch@0x2202e[0x1]: 00022236 switch@0x2202e[0x1a]: 00022236 switch@0x2202e[0x2]: 00022236 switch@0x2202e[0x4]: 00022236 switch@0x2202e[0x5]: 00022236 switch@0x2202e[0x6]: 00022236 switch@0x2202e[0x8]: 00022236 switch@0x2202e[0x9]: 00022236 switch@0x2202e[0xa]: 00022236 switch@0x2202e[0xb]: 00022236 switch@0x2202e[0xc]: 00022236 switch@0x2202e[0xe]: 00022236 42 12 |B | CLR.B (A2) 00022238 41 fa e5 48 |A H | LEA.L 0x20782,A0 0002223c 70 06 |p | MOVEQ.L #0x06,D0 0002223e 2f 20 |/ | MOVE.L -(A0),-(A7) 00022240 51 c8 ff fc |Q | DBF D0,0x2223e 00022244 59 4f |YO | SUBQ.L #0x4,A7 00022246 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002224a 3f 01 |? | MOVE.W D1,-(A7) 0002224c 3f 06 |? | MOVE.W D6,-(A7) 0002224e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022254 50 4f |PO | ADDQ.L #0x8,A7 00022256 4e ba e9 6a |N j | JSR 0x20bc2 0002225a de fc 00 20 | | ADDA.W #0x20,A7 0002225e 60 00 fd 72 |` r | BRA 0x21fd2 00022262 4e b9 00 01 02 84 |N | .XXX[0x6] 00022268 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): 00022268 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002226e 00 48 | H | .CONST 0x0048 ; Stack-delta 00022270 14 52 45 41 44 5f 54 52 | READ_TR| .TXT 20,'READ_TRACE_BLOCK.IOC' 00022285 00 | | .CONST 0x0 00022286 04 | | .CONST 0x4 ; DIPROC address 00022287 10 | | .CONST 0x10 ; Output Parameters 00022288 00 | | .CONST 0x0 ; Input Parameters 00022289 07 | | .CONST 0x7 ; Out arg [8] 0002228a 07 | | .CONST 0x7 ; Out arg [8] 0002228b 07 | | .CONST 0x7 ; Out arg [8] 0002228c 07 | | .CONST 0x7 ; Out arg [8] 0002228d 07 | | .CONST 0x7 ; Out arg [8] 0002228e 07 | | .CONST 0x7 ; Out arg [8] 0002228f 07 | | .CONST 0x7 ; Out arg [8] 00022290 07 | | .CONST 0x7 ; Out arg [8] 00022291 07 | | .CONST 0x7 ; Out arg [8] 00022292 07 | | .CONST 0x7 ; Out arg [8] 00022293 07 | | .CONST 0x7 ; Out arg [8] 00022294 07 | | .CONST 0x7 ; Out arg [8] 00022295 07 | | .CONST 0x7 ; Out arg [8] 00022296 07 | | .CONST 0x7 ; Out arg [8] 00022297 07 | | .CONST 0x7 ; Out arg [8] 00022298 07 | | .CONST 0x7 ; Out arg [8] 00022299 00 | | .PAD 0x0 0002229a exp_LOAD_TRACE_ADDRESS.IOC(Sw_2, Sw_1): 0002229a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000222a0 00 0c | | .CONST 0x000c ; Stack-delta 000222a2 16 4c 4f 41 44 5f 54 52 | LOAD_TR| .TXT 22,'LOAD_TRACE_ADDRESS.IOC' 000222b9 00 | | .CONST 0x0 000222ba 04 | | .CONST 0x4 ; DIPROC address 000222bb 00 | | .CONST 0x0 ; Output Parameters 000222bc 02 | | .CONST 0x2 ; Input Parameters 000222bd 01 | | .CONST 0x1 ; In arg [2] 000222be 00 | | .CONST 0x0 ; In arg [1] 000222bf 00 | | .PAD 0x0 000222c0 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 000222ce ; -------------------------------------------------------------------------------------- 000222ce ; OMSI PASCAL Function 000222ce ; <LVAR 0x008 1(r)> 000222ce ; -------------------------------------------------------------------------------------- 000222ce PROG_FAIL: 000222ce 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 000222d2 bf d5 | | CMPA.L (A5),A7 000222d4 62 06 |b | BHI 0x222dc 000222d6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000222da 4e 76 |Nv | TRAPV 000222dc de fc 00 2c | , | ADDA.W #0x2c,A7 000222e0 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 000222e4 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 000222e8 70 06 |p | MOVEQ.L #0x06,D0 000222ea 3f 20 |? | MOVE.W -(A0),-(A7) 000222ec 51 c8 ff fc |Q | DBF D0,0x222ea 000222f0 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 000222f4 51 4f |QO | SUBQ.L #0x8,A7 000222f6 48 6f 00 0a |Ho | PEA.L (A7+0xa) 000222fa 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000222fe 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00022302 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022308 58 4f |XO | ADDQ.L #0x4,A7 0002230a 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 0002230e 48 80 |H | EXTB.W D0 00022310 48 c0 |H | EXTW.L D0 00022312 2f 00 |/ | MOVE.L D0,-(A7) 00022314 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002231a 58 4f |XO | ADDQ.L #0x4,A7 0002231c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022322 50 4f |PO | ADDQ.L #0x8,A7 00022324 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002232a de fc 00 14 | | ADDA.W #0x14,A7 0002232e 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00022332 4e 5e |N^ | UNLK A6 00022334 4e 75 |Nu | RTS 00022336 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 00022344 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00022352 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00022360 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00022372 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 0002238a ; -------------------------------------------------------------------------------------- 0002238a ; OMSI PASCAL Function 0002238a ; <LVAR 0x00e 1(r)> 0002238a ; <LVAR 0x00a 4(r)> 0002238a ; <LVAR 0x008 1(r)> 0002238a ; -------------------------------------------------------------------------------------- 0002238a EXP_FAIL: 0002238a 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 0002238e bf d5 | | CMPA.L (A5),A7 00022390 62 06 |b | BHI 0x22398 00022392 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022396 4e 76 |Nv | TRAPV 00022398 de fc 00 74 | t | ADDA.W #0x74,A7 0002239c 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 000223a0 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 000223a6 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 000223ac 72 01 |r | MOVEQ.L #0x01,D1 000223ae 74 0d |t | MOVEQ.L #0x0d,D2 000223b0 76 1e |v | MOVEQ.L #0x1e,D3 000223b2 78 12 |x | MOVEQ.L #0x12,D4 000223b4 7a 0e |z | MOVEQ.L #0x0e,D5 000223b6 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000223bc 41 fa ff b4 |A | LEA.L 0x22372,A0 000223c0 70 08 |p | MOVEQ.L #0x08,D0 000223c2 3f 20 |? | MOVE.W -(A0),-(A7) 000223c4 51 c8 ff fc |Q | DBF D0,0x223c2 000223c8 59 4f |YO | SUBQ.L #0x4,A7 000223ca 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000223ce 3f 01 |? | MOVE.W D1,-(A7) 000223d0 3f 04 |? | MOVE.W D4,-(A7) 000223d2 4e 93 |N | JSR (A3) 000223d4 50 4f |PO | ADDQ.L #0x8,A7 000223d6 4e 94 |N | JSR (A4) 000223d8 50 4f |PO | ADDQ.L #0x8,A7 000223da 20 4f | O | MOVEA.L A7,A0 000223dc 43 fa ff 58 |C X | LEA.L 0x22336,A1 000223e0 70 0c |p | MOVEQ.L #0x0c,D0 000223e2 10 d9 | | MOVE.B (A1)+,(A0)+ 000223e4 51 c8 ff fc |Q | DBF D0,0x223e2 000223e8 51 4f |QO | SUBQ.L #0x8,A7 000223ea 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000223ee 3f 01 |? | MOVE.W D1,-(A7) 000223f0 3f 02 |? | MOVE.W D2,-(A7) 000223f2 4e 93 |N | JSR (A3) 000223f4 54 4f |TO | ADDQ.L #0x2,A7 000223f6 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 000223fa 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00022400 54 4f |TO | ADDQ.L #0x2,A7 00022402 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022408 50 4f |PO | ADDQ.L #0x8,A7 0002240a 4e 94 |N | JSR (A4) 0002240c de c4 | | ADDA.W D4,A7 0002240e 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00022412 b0 c1 | | CMPA.W D1,A0 00022414 67 48 |gH | BEQ 0x2245e 00022416 9e c5 | | SUBA.W D5,A7 00022418 22 4f |"O | MOVEA.L A7,A1 0002241a 45 fa ff 28 |E ( | LEA.L 0x22344,A2 0002241e 70 0c |p | MOVEQ.L #0x0c,D0 00022420 12 da | | MOVE.B (A2)+,(A1)+ 00022422 51 c8 ff fc |Q | DBF D0,0x22420 00022426 9e c3 | | SUBA.W D3,A7 00022428 22 4f |"O | MOVEA.L A7,A1 0002242a 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 0002242e 70 1d |p | MOVEQ.L #0x1d,D0 00022430 12 d8 | | MOVE.B (A0)+,(A1)+ 00022432 51 c8 ff fc |Q | DBF D0,0x22430 00022436 51 4f |QO | SUBQ.L #0x8,A7 00022438 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 0002243c 3f 01 |? | MOVE.W D1,-(A7) 0002243e 3f 02 |? | MOVE.W D2,-(A7) 00022440 4e 93 |N | JSR (A3) 00022442 58 4f |XO | ADDQ.L #0x4,A7 00022444 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00022448 3f 01 |? | MOVE.W D1,-(A7) 0002244a 3f 03 |? | MOVE.W D3,-(A7) 0002244c 4e 93 |N | JSR (A3) 0002244e 50 4f |PO | ADDQ.L #0x8,A7 00022450 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022456 50 4f |PO | ADDQ.L #0x8,A7 00022458 4e 94 |N | JSR (A4) 0002245a de fc 00 30 | 0 | ADDA.W #0x30,A7 0002245e 9e c5 | | SUBA.W D5,A7 00022460 20 4f | O | MOVEA.L A7,A0 00022462 43 fa fe ee |C | LEA.L 0x22352,A1 00022466 70 0c |p | MOVEQ.L #0x0c,D0 00022468 10 d9 | | MOVE.B (A1)+,(A0)+ 0002246a 51 c8 ff fc |Q | DBF D0,0x22468 0002246e 51 4f |QO | SUBQ.L #0x8,A7 00022470 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022474 3f 01 |? | MOVE.W D1,-(A7) 00022476 3f 02 |? | MOVE.W D2,-(A7) 00022478 4e 93 |N | JSR (A3) 0002247a 54 4f |TO | ADDQ.L #0x2,A7 0002247c 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00022480 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00022486 54 4f |TO | ADDQ.L #0x2,A7 00022488 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002248e 50 4f |PO | ADDQ.L #0x8,A7 00022490 4e 94 |N | JSR (A4) 00022492 5d 4f |]O | SUBQ.L #0x6,A7 00022494 20 4f | O | MOVEA.L A7,A0 00022496 43 fa fe da |C | LEA.L 0x22372,A1 0002249a 70 16 |p | MOVEQ.L #0x16,D0 0002249c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002249e 51 c8 ff fc |Q | DBF D0,0x2249c 000224a2 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000224a6 59 4f |YO | SUBQ.L #0x4,A7 000224a8 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000224ac 3f 01 |? | MOVE.W D1,-(A7) 000224ae 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 000224b2 4e 93 |N | JSR (A3) 000224b4 50 4f |PO | ADDQ.L #0x8,A7 000224b6 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000224bc de c3 | | ADDA.W D3,A7 000224be 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 000224c2 4e 5e |N^ | UNLK A6 000224c4 4e 75 |Nu | RTS