|
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: 6144 (0x1800)
Types: M200
Notes: @(#)FIXPAD,1.1,92/07/09,12:00:00, M200_PROGRAM
Names: »FIXPAD.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »FIXPAD.M200«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »FIXPAD.M200«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »FIXPAD.M200«
@ 2055a
<LVAR 0x008 @ 4(r)>
<POP 2055a-205b0 Body>
<POP 2055a-20570 Prologue> Σ0 ↓
<POP 20570-20574 RegCacheLoad> Σ0 ↓
<POP 20574-205a8 Naked> Σ0 ↓
<MI 20574 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<Const 0x20576 0xa.2> Δ-2 {[4, '(A6+0x8)']|[#10]}
<Call 0x2057a 0x102c0> {[4, '(A6+0x8)']|[#10]}
AppendChar(MOD b : String; a : char)
<POP 20580-20582 StackAdj> Δ+2 {[4, '(A6+0x8)']}
<MI 20582 MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<Const 0x20584 0xd.2> Δ-2 {[4, '(A6+0x8)']|[#13]}
<Call 0x20588 0x102c0> {[4, '(A6+0x8)']|[#13]}
AppendChar(MOD b : String; a : char)
<POP 2058e-20590 StackAdj> Δ+4 {[-2-]}
<POP 20590-20591 StackAdj> Δ+2 {}
<Const 0x20591 0x1.2> Δ-2 {[#1]}
<MI 20594 MOVE.L (A6+0x8),-(A7)> Δ-4 {[#1]|[4, '(A6+0x8)']}
<Call 0x20596 0x1020a> {[#1]|[4, '(A6+0x8)']}
KC05_PortWriteString(port : Word ; str : String)
<POP 2059c-2059e StackAdj> Δ+6 {}
<Pointer.fp 0x2059e <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x205a0 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 205a6-205a8 StackAdj> Δ+4 {}
<POP 205a8-205b0 Epilogue> Σ0
@ 205b0
<LVAR 0x00c 4(w)>
<LVAR 0x008 4(r)>
<POP 205b0-20920 Body> Δ+50
<POP 205b0-205c6 Prologue> Σ0 ↓
<POP 205c6-205da RegCacheLoad> Σ0 ↓
<POP 205da-205e8 Naked> Σ0 ↓ →0x208e0
<MI 205da MOVE.L (A6+0x8),D0> {}
<MI 205de CMPI.L #0x000000ff,D0> {}
<MI 205e4 BHI 0x208e0> {}
<POP 205e8-205f2 Naked> Σ0 →0x207f2 →0x20812 →0x2083a →0x2085c →0x2087e →0x208a4 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208e0 →0x208ce
<MI 205e8 ADD.W D0,D0> {}
<MI 205ea SWITCH D0.W> {}
<POP 207f2-2080e Naked> Σ0 Δ-32 →0x2090e ←0x205e8
<Blob 0x207f2 [20] @> Δ-20 {[«20""»]}
<POP 20802-20804 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x20804 19> {[«20""»]|[$$Connection complete]}
<MI 2080e BRA 0x2090e> {[«20""»]|[$$Connection complete]}
<POP 2080c-2080e StackAdj> Δ-8 {[«20""»]|[$$Connection complete]|[-8-]}
<POP 20812-2083a Naked> Σ0 →0x20914 ←0x205e8
<Blob 0x20812 [30] @> Δ-30 {[«30""»]}
<POP 20822-20824 StackAdj> Δ-4 {[«30""»]|[-4-]}
<Lit 0x20824 29> {[«30""»]|[$$Auto-Dialer call to MV failed]}
<MI 20832 MOVEA.L (A7)+,A4> Δ+4 {[«30""»]}
<POP 20834-20836 StackAdj> Δ+30 {}
<MI 20836 BRA 0x20914> {}
<POP 2083a-2085c Naked> Σ0 →0x20914 ←0x205e8
<Blob 0x2083a [34] @> Δ-34 {[«34""»]}
<POP 20846-20848 StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x20848 34> {[«34""»]|[$$PAD is disconnected or powered off]}
<MI 20854 MOVEA.L (A7)+,A4> Δ+4 {[«34""»]}
<POP 20856-20858 StackAdj> Δ+34 {}
<MI 20858 BRA 0x20914> {}
<POP 2085c-2087e Naked> Σ0 →0x20914 ←0x205e8
<Blob 0x2085c [36] @> Δ-36 {[«36""»]}
<POP 20868-2086a StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x2086a 36> {[«36""»]|[$$PAD connection to Auto-Dialer failed]}
<MI 20876 MOVEA.L (A7)+,A4> Δ+4 {[«36""»]}
<POP 20878-2087a StackAdj> Δ+36 {}
<MI 2087a BRA 0x20914> {}
<POP 2087e-2088e Naked> Σ0 Δ-18 ↓ ←0x205e8
<Blob 0x2087e [18] @> Δ-18 {[«18""»]}
<POP 2088e-208a4 Naked> Σ-18 Δ+18 →0x20914 ←0x208ce
<POP 2088e-20890 StackAdj> Δ-4 {[-22-]}
<Lit 0x20890> {[-18-]|[$$…]}
<Pointer.sp 0x20890 4> Δ-4
<Const 0x20894 0x1.2> Δ-2
<Const 0x20896 0x11.2> Δ-2
<Call 0x2089a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2089c-2089e StackAdj> Δ+8
<MI 2089e MOVEA.L (A7)+,A4> Δ+4 {[-18-]}
<POP 208a0-208a2 StackAdj> Δ+18 {}
<MI 208a2 BRA 0x20914> {}
<POP 208a4-208ce Naked> Σ0 →0x20914 ←0x205e8
<Blob 0x208a4 [28] @> Δ-28 {[«28""»]}
<POP 208b6-208b8 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x208b8 27> {[«28""»]|[$$No PAD or dial-out disabled]}
<MI 208c6 MOVEA.L (A7)+,A4> Δ+4 {[«28""»]}
<POP 208c8-208cc StackAdj> Δ+28 {}
<MI 208cc BRA 0x20914> {}
<POP 208ce-208e0 Naked> Σ0 Δ-18 →0x2088e ←0x205e8
<Blob 0x208ce [18] @> Δ-18 {[«18""»]}
<MI 208de BRA 0x2088e> {[«18""»]}
<POP 208e0-2090e Naked> Σ0 Δ-32 ↓ ←0x205da ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8 ←0x205e8
<Blob 0x208e0 [20] @> Δ-20 {[«20""»]}
<POP 208f0-208f2 StackAdj> Δ-8 {[«20""»]|[-8-]}
<Lit 0x208f2 19> {[«20""»]|[-4-]|[$$Unknown encoding =>]}
<MI 208fc MOVE.L (A6+0x8),(A7)> {[«20""»]|[-4-]|[4, '(A6+0x8)']}
<POP 208fa-208fc StackAdj> Δ-8 {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]}
<Call 0x20900 0x102e4> {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]}
Long2String(a : Long) : String
<POP 20906-20908 StackAdj> Δ+4 {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
<Call 0x20908 0x102d0> {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
StringCat2(a, b : String) : String
<POP 2090e-20914 Naked> Σ-32 Δ+32 ↓ ←0x207f2
<POP 2090e-20910 StackAdj> Δ+8 {[-24-]}
<MI 20910 MOVEA.L (A7)+,A4> Δ+4 {[-20-]}
<POP 20912-20914 StackAdj> Δ+20 {}
<POP 20914-20918 Naked> Σ0 ↓ ←0x20812 ←0x2083a ←0x2085c ←0x2088e ←0x208a4
<MI 20914 MOVE.L A4,(A6+0xc)> {}
<POP 20918-20920 Epilogue> Σ0
@ 20920
<LVAR 0x00c 4(w)>
<LVAR 0x008 4(r)>
<POP 20920-20aaa Body> Δ+16
<POP 20920-20936 Prologue> Σ0 ↓
<POP 20936-2094a RegCacheLoad> Σ0 ↓
<POP 2094a-20958 Naked> Σ0 ↓ →0x20a64
<MI 2094a MOVE.L (A6+0x8),D0> {}
<MI 2094e CMPI.L #0x00000006,D0> {}
<MI 20954 BHI 0x20a64> {}
<POP 20958-20962 Naked> Σ0 →0x20970 →0x20998 →0x209c0 →0x209e2 →0x20a0a →0x20a1e →0x20a44
<MI 20958 ADD.W D0,D0> {}
<MI 2095a SWITCH D0.W> {}
<POP 20970-20980 Naked> Σ0 Δ-16 ↓ ←0x20958
<Blob 0x20970 [16] @> Δ-16 {[«16""»]}
<POP 20980-20998 Naked> Σ-16 Δ+16 →0x20a9e ←0x20a0a
<POP 20980-20982 StackAdj> Δ-4 {[-20-]}
<Lit 0x20982> {[-16-]|[$$…]}
<Pointer.sp 0x20982 4> Δ-4
<Const 0x20986 0x1.2> Δ-2
<Const 0x20988 0xf.2> Δ-2
<Call 0x2098c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2098e-20990 StackAdj> Δ+8
<MI 20990 MOVEA.L (A7)+,A4> Δ+4 {[-16-]}
<POP 20992-20994 StackAdj> Δ+16 {}
<MI 20994 BRA 0x20a9e> {}
<POP 20998-209c0 Naked> Σ0 →0x20a9e ←0x20958
<Blob 0x20998 [18] @> Δ-18 {[«18""»]}
<POP 209a8-209aa StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x209aa 17> {[«18""»]|[$$Data byte present]}
<MI 209b8 MOVEA.L (A7)+,A4> Δ+4 {[«18""»]}
<POP 209ba-209bc StackAdj> Δ+18 {}
<MI 209bc BRA 0x20a9e> {}
<POP 209c0-209e2 Naked> Σ0 →0x20a9e ←0x20958
<Blob 0x209c0 [4] @> Δ-4 {[«4""»]}
<Blob 0x209c4 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x209c8 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 209cc-209ce StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x209ce 12> {[«4""»]|[«4""»]|[«4""»]|[$$Disconnected]}
<MI 209da MOVEA.L (A7)+,A4> Δ+4 {[«4""»]|[«4""»]|[«4""»]}
<POP 209dc-209de StackAdj> Δ+12 {}
<MI 209de BRA 0x20a9e> {}
<POP 209e2-20a0a Naked> Σ0 →0x20a9e ←0x20958
<Blob 0x209e2 [10] @> Δ-10 {[«10""»]}
<POP 209f2-209f4 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x209f4 9> {[«10""»]|[$$Connected]}
<MI 20a02 MOVEA.L (A7)+,A4> Δ+4 {[«10""»]}
<POP 20a04-20a06 StackAdj> Δ+10 {}
<MI 20a06 BRA 0x20a9e> {}
<POP 20a0a-20a1e Naked> Σ0 Δ-16 →0x20980 ←0x20958
<Blob 0x20a0a [16] @> Δ-16 {[«16""»]}
<MI 20a1a BRA 0x20980> {[«16""»]}
<POP 20a1e-20a44 Naked> Σ0 →0x20a9e ←0x20958
<Blob 0x20a1e [26] @> Δ-26 {[«26""»]}
<POP 20a2e-20a30 StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x20a30 25> {[«26""»]|[$$Disconnect packet arrival]}
<MI 20a3e MOVEA.L (A7)+,A4> Δ+4 {[«26""»]}
<POP 20a40-20a42 StackAdj> Δ+26 {}
<MI 20a42 BRA 0x20a9e> {}
<POP 20a44-20a64 Naked> Σ0 →0x20a9e ←0x20958
<Blob 0x20a44 [22] @> Δ-22 {[«22""»]}
<POP 20a50-20a52 StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x20a52 22> {[«22""»]|[$$Connect packet arrival]}
<MI 20a5e MOVEA.L (A7)+,A4> Δ+4 {[«22""»]}
<POP 20a60-20a62 StackAdj> Δ+22 {}
<MI 20a62 BRA 0x20a9e> {}
<POP 20a64-20a9e Naked> Σ0 ↓ ←0x2094a
<Blob 0x20a64 [20] @> Δ-20 {[«20""»]}
<POP 20a76-20a78 StackAdj> Δ-8 {[«20""»]|[-8-]}
<Lit 0x20a78 19> {[«20""»]|[-4-]|[$$Unknown encoding =>]}
<MI 20a84 MOVE.L (A6+0x8),(A7)> {[«20""»]|[-4-]|[4, '(A6+0x8)']}
<POP 20a82-20a84 StackAdj> Δ-8 {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]}
<Call 0x20a88 0x102e4> {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]}
Long2String(a : Long) : String
<POP 20a8e-20a90 StackAdj> Δ+4 {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
<Call 0x20a90 0x102d0> {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
StringCat2(a, b : String) : String
<POP 20a96-20a98 StackAdj> Δ+8 {[«20""»]|[-4-]}
<MI 20a98 MOVEA.L (A7)+,A4> Δ+4 {[«20""»]}
<POP 20a9a-20a9e StackAdj> Δ+20 {}
<POP 20a9e-20aa2 Naked> Σ0 ↓ ←0x20980 ←0x20998 ←0x209c0 ←0x209e2 ←0x20a1e ←0x20a44
<MI 20a9e MOVE.L A4,(A6+0xc)> {}
<POP 20aa2-20aaa Epilogue> Σ0
@ 20aaa
<LVAR 0x008 1(w)>
<LVAR -0x004 @ 1(r)>
<POP 20aaa-20aea Body>
<POP 20aaa-20ac0 Prologue> Σ0 ↓
<POP 20ac0-20ac4 RegCacheLoad> Σ0 ↓
<POP 20ac4-20ad6 Naked> Σ0 ↓ →0x20ac4 ←0x20ac4
<Const 0x20ac4 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x20ac8 <LVAR -0x004 @ 1(r)>> Δ-4 {[#3]|[@@-4]}
<Call 0x20aca 0x10212> {[#3]|[@@-4]}
KC09_PortStatus(Port : Word; VAR b: Byte)
<POP 20ad0-20ad2 StackAdj> Δ+6 {}
<MI 20ad2 TST.B (A6-0x4)> {}
<MI 20ad4 BEQ 0x20ac4> {}
<POP 20ad6-20ae2 Naked> Σ0 ↓
<MI 20ad6 MOVE.B (A6-0x4),D0> {}
<MI 20ad8 EXTB.W D0> {}
<POP 0x20ada LimitCheck 0x0 ≤ D0 ≤ 0x6> {}
<MI 20ade MOVE.B D0,(A6+0x8)> {}
<POP 20ae2-20aea Epilogue> Σ0
@ 20aea
<LVAR 0x00c 2(w)>
<LVAR 0x008 4(r)>
<POP 20aea-20b20 Body>
<POP 20aea-20b00 Prologue> Σ0 ↓
<POP 20b00-20b18 Naked> Σ0 ↓
<POP 20b00-20b02 StackAdj> Δ-2 {[-2-]}
<MI 20b02 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']}
<Call 0x20b06 0x10592> {[-2-]|[4, '(A6+0x8)']}
ReadConfig(where : Long) : Word
<POP 20b0c-20b0e StackAdj> Δ+4 {[-2-]}
<MI 20b0e MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20b10 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20b14 MOVE.W D0,(A6+0xc)> {}
<POP 20b18-20b20 Epilogue> Σ0
@ 20b20
<LVAR 0x008 4(r)>
<POP 20b20-20b92 Body>
<POP 20b20-20b36 Prologue> Σ0 ↓
<POP 20b36-20b8a Naked> Σ0 ↓
<Const 0x20b36 0x1.4> Δ-4 {[##1]}
<Call 0x20b3a 0x103f4> {[##1]}
SetConsoleConfig(a : Long)
<MI 20b40 MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<Call 0x20b44 0x103e0> {[4, '(A6+0x8)']}
WriteConsoleStringCrLf(str : String)
<POP 20b4a-20b4b StackAdj> Δ+4 ↓ {}
<Blob 0x20b4b [30] @> Δ-30 {[«30""»]}
<POP 20b5c-20b5e StackAdj> Δ-4 {[«30""»]|[-4-]}
<Lit 0x20b5e 29> {[«30""»]|[$$Abandoning remote connection.]}
<Call 0x20b72 0x103e0> {[«30""»]|[$$Abandoning remote connection.]}
WriteConsoleStringCrLf(str : String)
<POP 20b78-20b7c StackAdj> Δ+32 {[-2-]}
<MI 20b7c CLR.B (A7)> {[-2-]}
<Const 0x20b7e 0x1.4> Δ-4 {[-2-]|[##1]}
<Call 0x20b82 0x103b8> {[-2-]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 20b88-20b8a StackAdj> Δ+6 {}
<POP 20b8a-20b92 Epilogue> Σ0
@ 20b92
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @ 2(r)>
<LVAR -0x004 @ 1(r)>
<POP 20b92-20c10 Body> Δ-4
<POP 20b92-20ba8 Prologue> Σ0 ↓
<POP 20ba8-20baa RegCacheLoad> Σ0 ↓
<POP 20baa-20bb6 Naked> Σ0 Δ-4 ↓
<MI 20baa MOVEA.L (A6+0x8),A0> {}
<MI 20bae CLR.B (A0)> {}
<MI 20bb0 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 20bb4 MOVEQ.L #0x01,D6> {[4, '(A6+0xc)']}
<POP 20bb6-20bba Naked> Σ-4 ↓ →0x20c06 ←0x20c02
<MI 20bb6 CMP.L (A7),D6> {[-4-]}
<MI 20bb8 BGT 0x20c06> {[-4-]}
<POP 20bba-20bbc Naked> Σ-4 ↓
<MI 20bba MOVEQ.L #0x01,D7> {[-4-]}
<POP 20bbc-20bd2 Naked> Σ-4 ↓ →0x20bf8 ←0x20bf8
<Const 0x20bbc 0x1.2> Δ-2 {[-4-]|[#1]}
<Pointer.fp 0x20bbe <LVAR -0x004 @ 1(r)>> Δ-4 {[-4-]|[#1]|[@@-4]}
<Call 0x20bc2 0x10212> {[-4-]|[#1]|[@@-4]}
KC09_PortStatus(Port : Word; VAR b: Byte)
<POP 20bc8-20bca StackAdj> Δ+6 {[-4-]}
<MI 20bca MOVE.B (A6-0x4),D0> {[-4-]}
<MI 20bce CMP.B #0x01,D0> {[-4-]}
<MI 20bd0 BNE 0x20bf8> {[-4-]}
<POP 20bd2-20bee Naked> Σ-4 ↓ →0x20bf8
<Const 0x20bd2 0x1.2> Δ-2 {[-4-]|[#1]}
<Pointer.fp 0x20bd4 <LVAR -0x002 @ 2(r)>> Δ-4 {[-4-]|[#1]|[@@-2]}
<Call 0x20bd8 0x1020e> {[-4-]|[#1]|[@@-2]}
KC07_PortGetChar(port : Word ; VAR ret : Word)
<POP 20bde-20be0 StackAdj> Δ+6 {[-4-]}
<MI 20be0 MOVE.W (A6-0x2),D0> {[-4-]}
<MI 20be4 ANDI.W #0x00ff,D0> {[-4-]}
<MI 20be8 CMPI.W #0x0003,D0> {[-4-]}
<MI 20bec BNE 0x20bf8> {[-4-]}
<POP 20bee-20bf8 Naked> Σ-4 Δ+4 →0x20c08
<MI 20bee MOVEA.L (A6+0x8),A0> {[-4-]}
<MI 20bf2 MOVE.B #0x01,(A0)> {[-4-]}
<POP 20bf4-20bf6 StackAdj> Δ+4 {}
<MI 20bf6 BRA 0x20c08> {}
<POP 20bf8-20c02 Naked> Σ-4 ↓ →0x20bbc ←0x20bbc ←0x20bd2
<MI 20bf8 ADDQ.L #0x1,D7> {[-4-]}
<MI 20bfa CMPI.L #0x000003e8,D7> {[-4-]}
<MI 20c00 BLE 0x20bbc> {[-4-]}
<POP 20c02-20c06 Naked> Σ-4 ↓ →0x20bb6
<MI 20c02 ADDQ.L #0x1,D6> {[-4-]}
<MI 20c04 BVC 0x20bb6> {[-4-]}
<POP 20c06-20c08 Naked> Σ-4 Δ+4 ↓ ←0x20bb6
<POP 20c06-20c08 StackAdj> Δ+4 {}
<POP 20c08-20c10 Epilogue> Σ0 ←0x20bee
@ 20c10
<LVAR 0x00c 4(rw)>
<LVAR 0x008 4(r)>
<POP 20c10-20c4c Body>
<POP 20c10-20c26 Prologue> Σ0 ↓
<POP 20c26-20c3e Naked> Σ0 ↓ →0x20c44 ←0x20c3e
<MI 20c26 MOVEA.L (A6+0x8),A0> {}
<Const 0x20c2a 0x3c.4> Δ-4 {[##60]}
<MI 20c2e PEA.L (A0)> Δ-4 {[##60]|[4, '^(A0)']}
<Call 0x20c30 0x20b92> {[##60]|[4, '^(A0)']}
<POP 20c34-20c36 StackAdj> Δ+8 {}
<MI 20c36 SUBQ.L #0x1,(A6+0xc)> {}
<MI 20c3a TST.B (A0)> {}
<MI 20c3c BNE 0x20c44> {}
<POP 20c3e-20c44 Naked> Σ0 ↓ →0x20c26
<MI 20c3e TST.L (A6+0xc)> {}
<MI 20c42 BNE 0x20c26> {}
<POP 20c44-20c4c Epilogue> Σ0 ←0x20c26
@ 20c4c
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 1(r)>
<POP 20c4c-20d38 Body>
<POP 20c4c-20c62 Prologue> Σ0 ↓
<POP 20c62-20c6e RegCacheLoad> Σ0 ↓
<POP 20c6e-20cf2 Naked> Σ0 ↓ →0x20d00
<Const 0x20c6e 0x1.4> Δ-4 {[##1]}
<Call 0x20c72 0x103f4> {[##1]}
SetConsoleConfig(a : Long)
<POP 20c78-20c7a StackAdj> Δ+4 {}
<Blob 0x20c7a [30] @> Δ-30 {[«30""»]}
<POP 20c86-20c88 StackAdj> Δ-8 {[«30""»]|[-8-]}
<Lit 0x20c88 30> {[«30""»]|[-4-]|[$$Cannot connect PAD, Status =>_]}
<MI 20c98 MOVE.L (A6+0x8),(A7)> {[«30""»]|[-4-]|[4, '(A6+0x8)']}
<POP 20c92-20c98 StackAdj> Δ-8 {[«30""»]|[-4-]|[4, '(A6+0x8)']|[-8-]}
<Call 0x20c9c 0x205b0> {[«30""»]|[-4-]|[4, '(A6+0x8)']|[-8-]}
<POP 20ca0-20ca2 StackAdj> Δ+4 {[«30""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
<Call 0x20ca2 0x102d0> {[«30""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
StringCat2(a, b : String) : String
<POP 20ca8-20caa StackAdj> Δ+8 {[«30""»]|[-4-]}
<Call 0x20caa 0x103e0> {[«30""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 20cb0-20cb1 StackAdj> Δ+34 ↓ {}
<Blob 0x20cb1 [40] @> Δ-40 {[«40""»]}
<POP 20cc0-20cc2 StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x20cc2 39> {[«40""»]|[$$Retrying remote connection in 1 minute.]}
<Call 0x20cd4 0x103e0> {[«40""»]|[$$Retrying remote connection in 1 minute.]}
WriteConsoleStringCrLf(str : String)
<POP 20cda-20cde StackAdj> Δ+44 {}
<Const 0x20cde 0x25.4> Δ-4 {[##37]}
<Pointer.fp 0x20ce2 <LVAR -0x004 @ 1(r)>> Δ-4 {[##37]|[@@-4]}
<Call 0x20ce6 0x20c10> {[##37]|[@@-4]}
<POP 20cea-20cec StackAdj> Δ+8 {}
<MI 20cec TST.B (A6-0x4)> {}
<MI 20cf0 BEQ 0x20d00> {}
<POP 20cf2-20d00 Naked> Σ0 ↓
<MI 20cf2 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x20cf4 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x20cf8 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 20cfe-20d00 StackAdj> Δ+6 {}
<POP 20d00-20d02 Naked> Σ0 ↓ ←0x20c6e
<MI 20d00 MOVEQ.L #0x01,D7> {}
<POP 20d02-20d30 Naked> Σ0 ↓ →0x20d02 ←0x20d02
<Const 0x20d02 0x1b.2> Δ-2 {[#27]}
<Call 0x20d04 0x103d0> {[#27]}
WriteConsoleChar(chr : char)
<POP 20d06-20d07 StackAdj> Δ+2 {}
<Const 0x20d07 0x5b.2> Δ-2 {[#91]}
<Call 0x20d08 0x103d0> {[#91]}
WriteConsoleChar(chr : char)
<POP 20d0a-20d0b StackAdj> Δ+2 {}
<Const 0x20d0b 0x31.2> Δ-2 {[#49]}
<Call 0x20d0e 0x103d0> {[#49]}
WriteConsoleChar(chr : char)
<POP 20d10-20d11 StackAdj> Δ+2 {}
<Const 0x20d11 0x41.2> Δ-2 {[#65]}
<Call 0x20d14 0x103d0> {[#65]}
WriteConsoleChar(chr : char)
<POP 20d16-20d17 StackAdj> Δ+2 {}
<Const 0x20d17 0x1b.2> Δ-2 {[#27]}
<Call 0x20d18 0x103d0> {[#27]}
WriteConsoleChar(chr : char)
<POP 20d1a-20d1b StackAdj> Δ+2 {}
<Const 0x20d1b 0x5b.2> Δ-2 {[#91]}
<Call 0x20d1c 0x103d0> {[#91]}
WriteConsoleChar(chr : char)
<POP 20d1e-20d1f StackAdj> Δ+2 {}
<Const 0x20d1f 0x4b.2> Δ-2 {[#75]}
<Call 0x20d22 0x103d0> {[#75]}
WriteConsoleChar(chr : char)
<POP 20d24-20d26 StackAdj> Δ+2 {}
<MI 20d26 ADDQ.L #0x1,D7> {}
<MI 20d28 CMPI.L #0x00000003,D7> {}
<MI 20d2e BLE 0x20d02> {}
<POP 20d30-20d38 Epilogue> Σ0
@ 20d38
<LVAR -0x004 @>
<LVAR -0x006 @>
<LVAR -0x008 @ 1(r)>
<POP 20d38-20d96 Body>
<POP 20d38-20d4e Prologue> Σ0 ↓
<POP 20d4e-20d54 RegCacheLoad> Σ0 ↓
<POP 20d54-20d68 Naked> Σ0 ↓
<Call 0x20d54 0x10216> {}
KC0b
<Const 0x20d5a 0x5.4> Δ-4 {[##5]}
<Pointer.fp 0x20d5e <LVAR -0x004 @>> Δ-4 {[##5]|[@@-4]}
<Call 0x20d62 0x20b92> {[##5]|[@@-4]}
<POP 20d66-20d68 StackAdj> Δ+8 {}
<POP 20d68-20d78 Naked> Σ0 ↓ →0x20d86 ←0x20d86
<Const 0x20d68 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x20d6a <LVAR -0x008 @ 1(r)>> Δ-4 {[#3]|[@@-8]}
<Call 0x20d6c 0x10212> {[#3]|[@@-8]}
KC09_PortStatus(Port : Word; VAR b: Byte)
<POP 20d72-20d74 StackAdj> Δ+6 {}
<MI 20d74 TST.B (A6-0x8)> {}
<MI 20d76 BEQ 0x20d86> {}
<POP 20d78-20d86 Naked> Σ0 ↓
<Const 0x20d78 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x20d7a <LVAR -0x006 @>> Δ-4 {[#3]|[@@-6]}
<Call 0x20d7e 0x1020e> {[#3]|[@@-6]}
KC07_PortGetChar(port : Word ; VAR ret : Word)
<POP 20d84-20d86 StackAdj> Δ+6 {}
<POP 20d86-20d8e Naked> Σ0 ↓ →0x20d68 ←0x20d68
<MI 20d86 MOVE.B (A6-0x8),D0> {}
<MI 20d88 CMPI.B #0x02,D0> {}
<MI 20d8c BNE 0x20d68> {}
<POP 20d8e-20d96 Epilogue> Σ0
@ 20d96
<LVAR -0x002 @ 1(r)>
<LVAR -0x006 @ 4(r)>
<LVAR -0x008 @ 2(rw)>
<LVAR -0x00a @ 1(rw)>
<LVAR -0x00c @ 2(rw)>
<POP 20d96-213f0 Body> Δ+120
<POP 20d96-20dac Prologue> Σ0 ↓
<POP 20dac-20dc6 RegCacheLoad> Σ0 ↓
<POP 20dc6-20dd4 Naked> Σ0 ↓
<Const 0x20dc6 0x1.4> Δ-4 {[##1]}
<Pointer.fp 0x20dca <LVAR -0x002 @ 1(r)>> Δ-4 {[##1]|[@@-2]}
<Call 0x20dce 0x20b92> {[##1]|[@@-2]}
<POP 20dd2-20dd4 StackAdj> Δ+8 {}
<POP 20dd4-20de4 Naked> Σ0 ↓ →0x20df0 ←0x20df0
<Const 0x20dd4 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x20dd6 <LVAR -0x00a @ 1(rw)>> Δ-4 {[#3]|[@@-10]}
<Call 0x20dd8 0x10212> {[#3]|[@@-10]}
KC09_PortStatus(Port : Word; VAR b: Byte)
<POP 20dde-20de0 StackAdj> Δ+6 {}
<MI 20de0 TST.B (A6-0xa)> {}
<MI 20de2 BEQ 0x20df0> {}
<POP 20de4-20df0 Naked> Σ0 ↓
<Const 0x20de4 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x20de6 <LVAR -0x00c @ 2(rw)>> Δ-4 {[#3]|[@@-12]}
<Call 0x20de8 0x1020e> {[#3]|[@@-12]}
KC07_PortGetChar(port : Word ; VAR ret : Word)
<POP 20dee-20df0 StackAdj> Δ+6 {}
<POP 20df0-20df4 Naked> Σ0 ↓ →0x20dd4 ←0x20dd4
<MI 20df0 TST.B (A6-0xa)> {}
<MI 20df2 BNE 0x20dd4> {}
<POP 20df4-20e96 Naked> Σ0 ↓ →0x21134
<Pointer.fp 0x20df4 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x20df8 0x102b8> {[@@-6]}
NewString(VAR a : String)
<POP 20dfe-20e00 StackAdj> Δ+4 {}
<MI 20e00 MOVEA.L (A6-0x6),A0> {}
<MI 20e04 MOVE.W #0x5,(A0)> {}
<POP 20e08-20e0a StackAdj> Δ-2 {[-2-]}
<Const 0x20e0a 0x84.4> Δ-4 {[-2-]|[##132]}
<Call 0x20e0e 0x20aea> {[-2-]|[##132]}
<POP 20e12-20e14 StackAdj> Δ+4 {[-2-]}
<MI 20e14 MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20e16 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20e18 MOVE.B D0,(A0+0x2)> {}
<POP 20e1c-20e1e StackAdj> Δ-2 {[-2-]}
<Const 0x20e1e 0x85.4> Δ-4 {[-2-]|[##133]}
<Call 0x20e22 0x20aea> {[-2-]|[##133]}
<POP 20e26-20e28 StackAdj> Δ+4 {[-2-]}
<MI 20e28 MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20e2a LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20e2c MOVE.B D0,(A0+0x3)> {}
<POP 20e30-20e32 StackAdj> Δ-2 {[-2-]}
<Const 0x20e32 0x86.4> Δ-4 {[-2-]|[##134]}
<Call 0x20e36 0x20aea> {[-2-]|[##134]}
<POP 20e3a-20e3c StackAdj> Δ+4 {[-2-]}
<MI 20e3c MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20e3e LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20e40 MOVE.B D0,(A0+0x4)> {}
<POP 20e44-20e46 StackAdj> Δ-2 {[-2-]}
<Const 0x20e46 0x87.4> Δ-4 {[-2-]|[##135]}
<Call 0x20e4a 0x20aea> {[-2-]|[##135]}
<POP 20e4e-20e50 StackAdj> Δ+4 {[-2-]}
<MI 20e50 MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20e52 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20e54 MOVE.B D0,(A0+0x5)> {}
<MI 20e58 CLR.B (A0+0x6)> {}
<Const 0x20e5c 0x3.2> Δ-2 {[#3]}
<MI 20e5e MOVE.L (A6-0x6),-(A7)> Δ-4 {[#3]|[4, '(A6-0x6)']}
<Call 0x20e62 0x10214> {[#3]|[4, '(A6-0x6)']}
KC0a(a: Word; b: String)
<POP 20e68-20e6a StackAdj> Δ+6 {}
<Pointer.fp 0x20e6a <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x20e6e 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 20e74-20e76 StackAdj> Δ+2 {[-2-]}
<Call 0x20e76 0x20aaa> {[-2-]}
<MI 20e7a MOVE.B (A7)+,D0> Δ+2 {}
<MI 20e7c EXTB.W D0> {}
<POP 0x20e7e LimitCheck 0x0 ≤ D0 ≤ 0x6> {}
<MI 20e80 MOVE.B D0,(A6-0xa)> {}
<Const 0x20e82 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x20e84 <LVAR -0x00c @ 2(rw)>> Δ-4 {[#3]|[@@-12]}
<Call 0x20e86 0x1020e> {[#3]|[@@-12]}
KC07_PortGetChar(port : Word ; VAR ret : Word)
<POP 20e8c-20e8e StackAdj> Δ+6 {}
<MI 20e8e AND.W #0xff,(A6-0xc)> {}
<MI 20e90 CMP.B #0x03,D0> {}
<MI 20e92 BNE 0x21134> {}
<POP 20e96-20e9e Naked> Σ0 ↓ →0x210f8
<MI 20e96 MOVE.W (A6-0xc),D0> {}
<MI 20e98 CMP.W #0xff,D0> {}
<MI 20e9a BHI 0x210f8> {}
<POP 20e9e-20ea8 Naked> Σ0 →0x210a8 →0x210b6 →0x210c8 →0x210cc →0x210ce →0x210dc →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210f8 →0x210ea
<MI 20e9e ADD.W D0,D0> {}
<MI 20ea0 SWITCH D0.W> {}
<POP 210a8-210b6 Naked> Σ0 Δ-30 →0x21104 ←0x20e9e
<Blob 0x210a8 [30] @> Δ-30 {[«30""»]}
<MI 210b4 BRA 0x21104> {[«30""»]}
<POP 210b6-210c6 Naked> Σ0 →0x213e8 ←0x20e9e ←0x210c8
<MI 210b6 CLR.L D0> {}
<MI 210b8 MOVE.W (A6-0xc),D0> {}
<MI 210ba MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<Call 0x210bc 0x20c4c> {[4, 'D0']}
<POP 210c0-210c2 StackAdj> Δ+4 {}
<MI 210c2 BRA 0x213e8> {}
<POP 210c8-210ca Naked> Σ0 →0x210b6 ←0x20e9e ←0x210cc
<MI 210c8 BRA 0x210b6> {}
<POP 210cc-210ce Naked> Σ0 →0x210c8 ←0x20e9e
<MI 210cc BRA 0x210c8> {}
<POP 210ce-210dc Naked> Σ0 Δ-30 →0x21104 ←0x20e9e
<Blob 0x210ce [30] @> Δ-30 {[«30""»]}
<MI 210da BRA 0x21104> {[«30""»]}
<POP 210dc-210ea Naked> Σ0 Δ-30 →0x21104 ←0x20e9e
<Blob 0x210dc [30] @> Δ-30 {[«30""»]}
<MI 210e8 BRA 0x21104> {[«30""»]}
<POP 210ea-210f8 Naked> Σ0 Δ-30 →0x21104 ←0x20e9e
<Blob 0x210ea [30] @> Δ-30 {[«30""»]}
<MI 210f6 BRA 0x21104> {[«30""»]}
<POP 210f8-21104 Naked> Σ0 Δ-30 ↓ ←0x20e96 ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e ←0x20e9e
<Blob 0x210f8 [30] @> Δ-30 {[«30""»]}
<POP 21104-21134 Naked> Σ-30 Δ+30 →0x213e8 ←0x210a8 ←0x210ce ←0x210dc ←0x210ea
<POP 21104-21106 StackAdj> Δ-8 {[-38-]}
<Lit 0x21106> {[-34-]|[$$…]}
<Pointer.sp 0x21106 8> Δ-4
<Const 0x2110a 0x1.2> Δ-2
<Const 0x2110c 0x1e.2> Δ-2
<Call 0x21110 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21112-21114 StackAdj> Δ+8
<POP 21112-21114 StackAdj> Δ-4 {[-34-]|[$$…]|[-4-]}
<MI 21114 CLR.L D0> {[-34-]|[$$…]|[-4-]}
<MI 21116 MOVE.W (A6-0xc),D0> {[-34-]|[$$…]|[-4-]}
<MI 21118 MOVE.L D0,-(A7)> Δ-4 {[-34-]|[$$…]|[-4-]|[4, 'D0']}
<Call 0x2111a 0x205b0> {[-34-]|[$$…]|[-4-]|[4, 'D0']}
<POP 2111e-21120 StackAdj> Δ+4 {[-34-]|[$$…]|[-4-]}
<Call 0x21120 0x102d0> {[-34-]|[$$…]|[-4-]}
StringCat2(a, b : String) : String
<POP 21126-21128 StackAdj> Δ+8 {[-34-]}
<Call 0x21128 0x20b20> {[-34-]}
<POP 2112c-21130 StackAdj> Δ+34 {}
<MI 21130 BRA 0x213e8> {}
<POP 21134-21138 Naked> Σ0 ↓ →0x2117a ←0x20df4
<MI 21134 CMP.B #0x06,D0> {}
<MI 21136 BEQ 0x2117a> {}
<POP 21138-2117a Naked> Σ0 →0x213e8
<Blob 0x21138 [44] @> Δ-44 {[«44""»]}
<POP 2114a-2114c StackAdj> Δ-8 {[«44""»]|[-8-]}
<Lit 0x2114c 43> {[«44""»]|[-4-]|[$$Illegal connect request response, Event =>_]}
<POP 21158-2115a StackAdj> Δ-4 {[«44""»]|[-4-]|[$$Illegal connect request response, Event =>_]|[-4-]}
<MI 2115a EXTB.W D0> {[«44""»]|[-4-]|[$$Illegal connect request response, Event =>_]|[-4-]}
<MI 2115c EXTW.L D0> {[«44""»]|[-4-]|[$$Illegal connect request response, Event =>_]|[-4-]}
<MI 2115e MOVE.L D0,-(A7)> Δ-4 {[«44""»]|[-4-]|[$$Illegal connect request response, Event =>_]|[-4-]|[4, 'D0']}
<Call 0x21160 0x20920> {[«44""»]|[-4-]|[$$Illegal connect request response, Event =>_]|[-4-]|[4, 'D0']}
<POP 21164-21166 StackAdj> Δ+4 {[«44""»]|[-4-]|[$$Illegal connect request response, Event =>_]|[-4-]}
<Call 0x21166 0x102d0> {[«44""»]|[-4-]|[$$Illegal connect request response, Event =>_]|[-4-]}
StringCat2(a, b : String) : String
<POP 2116c-2116e StackAdj> Δ+8 {[«44""»]|[-4-]}
<Call 0x2116e 0x20b20> {[«44""»]|[-4-]}
<POP 21172-21176 StackAdj> Δ+48 {}
<MI 21176 BRA 0x213e8> {}
<POP 2117a-21182 Naked> Σ0 ↓ →0x213ae ←0x21134
<MI 2117a MOVE.W (A6-0xc),D0> {}
<MI 2117c CMP.W #0x03,D0> {}
<MI 2117e BHI 0x213ae> {}
<POP 21182-2118c Naked> Σ0 →0x21194 →0x211a6 →0x211ce →0x212fc
<MI 21182 ADD.W D0,D0> {}
<MI 21184 SWITCH D0.W> {}
<POP 21194-211a6 Naked> Σ0 →0x213e8 ←0x21182
<MI 21194 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x21196 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x2119a 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 211a0-211a2 StackAdj> Δ+6 {}
<MI 211a2 BRA 0x213e8> {}
<POP 211a6-211ce Naked> Σ0 →0x213e8 ←0x21182
<Blob 0x211a6 [24] @> Δ-24 {[«24""»]}
<POP 211b2-211b4 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x211b4 24> {[«24""»]|[$$Connect attempt refused.]}
<Call 0x211c2 0x20b20> {[«24""»]|[$$Connect attempt refused.]}
<POP 211c6-211ca StackAdj> Δ+28 {}
<MI 211ca BRA 0x213e8> {}
<POP 211ce-212ce Naked> Σ0 ↓ →0x212d4 ←0x21182
<Call 0x211ce 0x20d38> {}
<Const 0x211d2 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x211d4 <LVAR -0x008 @ 2(rw)>> Δ-4 {[#3]|[@@-8]}
<Call 0x211d8 0x1020e> {[#3]|[@@-8]}
KC07_PortGetChar(port : Word ; VAR ret : Word)
<POP 211de-211e0 StackAdj> Δ+6 {}
<MI 211e0 AND.W #0xff,(A6-0x8)> {}
<MI 211e4 MOVE.W (A6-0x8),D0> {}
<MI 211e8 ASL.W #0x8,D0> {}
<MI 211ea MOVE.W D0,(A6-0x8)> {}
<Const 0x211ee 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x211f0 <LVAR -0x00c @ 2(rw)>> Δ-4 {[#3]|[@@-12]}
<Call 0x211f2 0x1020e> {[#3]|[@@-12]}
KC07_PortGetChar(port : Word ; VAR ret : Word)
<POP 211f8-211fa StackAdj> Δ+6 {}
<MI 211fa MOVE.W (A6-0xc),D1> {}
<MI 211fc AND.W #0xff,D1> {}
<MI 211fe CLR.L D2> {}
<MI 21200 MOVE.W D0,D2> {}
<MI 21202 CLR.L D0> {}
<MI 21204 MOVE.W D1,D0> {}
<MI 21206 ADD.L D2,D0> {}
<POP 0x21208 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21212 MOVE.W D0,(A6-0x8)> {}
<Blob 0x21216 [56] @> Δ-56 {[«56""»]}
<POP 21228-2122a StackAdj> Δ-4 {[«56""»]|[-4-]}
<Lit 0x2122a 55> {[«56""»]|[$$Rational Response Center is busy and has requested that]}
<Call 0x21238 0x2055a> {[«56""»]|[$$Rational Response Center is busy and has requested that]}
<POP 2123c-2123d StackAdj> Δ+60 ↓ {}
<Blob 0x2123d [24] @> Δ-24 {[«24""»]}
<Blob 0x2124e [18] @> Δ-18 {[«24""»]|[«18""»]}
<POP 2125a-2125c StackAdj> Δ-8 {[«24""»]|[«18""»]|[-8-]}
<Lit 0x2125c 23> {[«24""»]|[«18""»]|[-4-]|[$$this cluster call back_]}
<POP 21268-2126a StackAdj> Δ-4 {[«24""»]|[«18""»]|[-4-]|[$$this cluster call back_]|[-4-]}
<MI 2126a CLR.L D1> {[«24""»]|[«18""»]|[-4-]|[$$this cluster call back_]|[-4-]}
<MI 2126c MOVE.W D0,D1> {[«24""»]|[«18""»]|[-4-]|[$$this cluster call back_]|[-4-]}
<MI 2126e MOVE.L D1,-(A7)> Δ-4 {[«24""»]|[«18""»]|[-4-]|[$$this cluster call back_]|[-4-]|[4, 'D1']}
<Call 0x21270 0x102e4> {[«24""»]|[«18""»]|[-4-]|[$$this cluster call back_]|[-4-]|[4, 'D1']}
Long2String(a : Long) : String
<Lit 0x21276 18> {[«24""»]|[«18""»]|[-4-]|[$$this cluster call back_]|[-4-]|[$$ minutes from now.]}
<Call 0x21282 0x102d4> {[«24""»]|[«18""»]|[-4-]|[$$this cluster call back_]|[-4-]|[$$ minutes from now.]}
StringCat3(a, b, c : String) : String
<POP 21288-2128c StackAdj> Δ+12 {[«24""»]|[«18""»]|[-4-]}
<Call 0x2128c 0x2055a> {[«24""»]|[«18""»]|[-4-]}
<POP 21290-21291 StackAdj> Δ+46 ↓ {}
<Blob 0x21291 [28] @> Δ-28 {[«28""»]}
<POP 212a0-212a2 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x212a2 27> {[«28""»]|[$$Type ^C to abort this delay]}
<Call 0x212b0 0x2055a> {[«28""»]|[$$Type ^C to abort this delay]}
<POP 212b4-212b8 StackAdj> Δ+32 {}
<MI 212b8 CLR.L D1> {}
<MI 212ba MOVE.W D0,D1> {}
<MI 212bc MOVE.L D1,-(A7)> Δ-4 {[4, 'D1']}
<Pointer.fp 0x212be <LVAR -0x002 @ 1(r)>> Δ-4 {[4, 'D1']|[@@-2]}
<Call 0x212c2 0x20c10> {[4, 'D1']|[@@-2]}
<POP 212c6-212c8 StackAdj> Δ+8 {}
<MI 212c8 TST.B (A6-0x2)> {}
<MI 212cc BNE 0x212d4> {}
<POP 212ce-212d4 Naked> Σ0 →0x212f8
<Call 0x212ce 0x20d96> {}
<MI 212d2 BRA 0x212f8> {}
<POP 212d4-212f8 Naked> Σ0 ↓ ←0x211ce
<Blob 0x212d4 [22] @> Δ-22 {[«22""»]}
<POP 212e0-212e2 StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x212e2 22> {[«22""»]|[$$Terminated by operator]}
<Call 0x212f0 0x20b20> {[«22""»]|[$$Terminated by operator]}
<POP 212f4-212f8 StackAdj> Δ+26 {}
<POP 212f8-212fc Naked> Σ0 →0x213e8 ←0x212ce
<MI 212f8 BRA 0x213e8> {}
<POP 212fc-21348 Naked> Σ0 ↓ ←0x21182
<Call 0x212fc 0x20d38> {}
<Blob 0x21300 [60] @> Δ-60 {[«60""»]}
<POP 2130c-2130e StackAdj> Δ-4 {[«60""»]|[-4-]}
<Lit 0x2130e 60> {[«60""»]|[$$Rational Response Center has instructed this cluster to wait]}
<Call 0x2131c 0x2055a> {[«60""»]|[$$Rational Response Center has instructed this cluster to wait]}
<POP 21320-21321 StackAdj> Δ+64 ↓ {}
<Blob 0x21321 [14] @> Δ-14 {[«14""»]}
<POP 21332-21334 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x21334 13> {[«14""»]|[$$for call back]}
<Call 0x21342 0x2055a> {[«14""»]|[$$for call back]}
<POP 21346-21348 StackAdj> Δ+18 {}
<POP 21348-21358 Naked> Σ0 ↓ →0x21364 ←0x21364
<Const 0x21348 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x2134a <LVAR -0x00a @ 1(rw)>> Δ-4 {[#3]|[@@-10]}
<Call 0x2134c 0x10212> {[#3]|[@@-10]}
KC09_PortStatus(Port : Word; VAR b: Byte)
<POP 21352-21354 StackAdj> Δ+6 {}
<MI 21354 TST.B (A6-0xa)> {}
<MI 21356 BEQ 0x21364> {}
<POP 21358-21364 Naked> Σ0 ↓
<Const 0x21358 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x2135a <LVAR -0x00c @ 2(rw)>> Δ-4 {[#3]|[@@-12]}
<Call 0x2135c 0x1020e> {[#3]|[@@-12]}
KC07_PortGetChar(port : Word ; VAR ret : Word)
<POP 21362-21364 StackAdj> Δ+6 {}
<POP 21364-2136a Naked> Σ0 ↓ →0x21348 ←0x21348
<MI 21364 MOVE.B (A6-0xa),D0> {}
<MI 21366 CMP.B #0x03,D0> {}
<MI 21368 BNE 0x21348> {}
<POP 2136a-2136e Naked> Σ0 ↓ →0x21374
<MI 2136a AND.W #0xff,(A6-0xc)> {}
<MI 2136c BNE 0x21374> {}
<POP 2136e-21374 Naked> Σ0 →0x213ac
<Call 0x2136e 0x20d96> {}
<MI 21372 BRA 0x213ac> {}
<POP 21374-213ac Naked> Σ0 ↓ ←0x2136a
<Blob 0x21374 [54] @> Δ-54 {[«54""»]}
<POP 21380-21382 StackAdj> Δ-8 {[«54""»]|[-8-]}
<Lit 0x21382 54> {[«54""»]|[-4-]|[$$Unexpected status while awaiting call-back, Status =>_]}
<POP 2138e-21390 StackAdj> Δ-4 {[«54""»]|[-4-]|[$$Unexpected status while awaiting call-back, Status =>_]|[-4-]}
<MI 21390 CLR.L D0> {[«54""»]|[-4-]|[$$Unexpected status while awaiting call-back, Status =>_]|[-4-]}
<MI 21392 MOVE.W (A6-0xc),D0> {[«54""»]|[-4-]|[$$Unexpected status while awaiting call-back, Status =>_]|[-4-]}
<MI 21394 MOVE.L D0,-(A7)> Δ-4 {[«54""»]|[-4-]|[$$Unexpected status while awaiting call-back, Status =>_]|[-4-]|[4, 'D0']}
<Call 0x21396 0x205b0> {[«54""»]|[-4-]|[$$Unexpected status while awaiting call-back, Status =>_]|[-4-]|[4, 'D0']}
<POP 2139a-2139c StackAdj> Δ+4 {[«54""»]|[-4-]|[$$Unexpected status while awaiting call-back, Status =>_]|[-4-]}
<Call 0x2139c 0x102d0> {[«54""»]|[-4-]|[$$Unexpected status while awaiting call-back, Status =>_]|[-4-]}
StringCat2(a, b : String) : String
<POP 213a2-213a4 StackAdj> Δ+8 {[«54""»]|[-4-]}
<Call 0x213a4 0x20b20> {[«54""»]|[-4-]}
<POP 213a8-213ac StackAdj> Δ+58 {}
<POP 213ac-213ae Naked> Σ0 →0x213e8 ←0x2136e
<MI 213ac BRA 0x213e8> {}
<POP 213ae-213e8 Naked> Σ0 ↓ ←0x2117a
<Blob 0x213ae [36] @> Δ-36 {[«36""»]}
<POP 213ba-213bc StackAdj> Δ-8 {[«36""»]|[-8-]}
<Lit 0x213bc 36> {[«36""»]|[-4-]|[$$Unknown connect acknowedge, Data =>_]}
<POP 213c8-213ca StackAdj> Δ-4 {[«36""»]|[-4-]|[$$Unknown connect acknowedge, Data =>_]|[-4-]}
<MI 213ca CLR.L D0> {[«36""»]|[-4-]|[$$Unknown connect acknowedge, Data =>_]|[-4-]}
<MI 213cc MOVE.W (A6-0xc),D0> {[«36""»]|[-4-]|[$$Unknown connect acknowedge, Data =>_]|[-4-]}
<MI 213ce MOVE.L D0,-(A7)> Δ-4 {[«36""»]|[-4-]|[$$Unknown connect acknowedge, Data =>_]|[-4-]|[4, 'D0']}
<Call 0x213d0 0x102e4> {[«36""»]|[-4-]|[$$Unknown connect acknowedge, Data =>_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 213d6-213d8 StackAdj> Δ+4 {[«36""»]|[-4-]|[$$Unknown connect acknowedge, Data =>_]|[-4-]}
<Call 0x213d8 0x102d0> {[«36""»]|[-4-]|[$$Unknown connect acknowedge, Data =>_]|[-4-]}
StringCat2(a, b : String) : String
<POP 213de-213e0 StackAdj> Δ+8 {[«36""»]|[-4-]}
<Call 0x213e0 0x20b20> {[«36""»]|[-4-]}
<POP 213e4-213e8 StackAdj> Δ+40 {}
<POP 213e8-213f0 Epilogue> Σ0 ←0x210b6 ←0x21104 ←0x21138 ←0x21194 ←0x211a6 ←0x212f8 ←0x213ac
@ 213f0
<LVAR -0x004 @>
<POP 213f0-2144c Body>
<POP 213f0-21406 Prologue> Σ0 ↓
<POP 21406-21444 Naked> Σ0 ↓
<Blob 0x21406 [48] @> Δ-48 {[«48""»]}
<POP 21412-21414 StackAdj> Δ-4 {[«48""»]|[-4-]}
<Lit 0x21414 48> {[«48""»]|[$$PAD connection broken, attempting to re-connect.]}
<Call 0x21428 0x2055a> {[«48""»]|[$$PAD connection broken, attempting to re-connect.]}
<POP 2142c-21430 StackAdj> Δ+50 {[-2-]}
<POP 21430-21431 StackAdj> Δ+2 {}
<Const 0x21431 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x21434 <LVAR -0x004 @>> Δ-4 {[#3]|[@@-4]}
<Call 0x21438 0x1020e> {[#3]|[@@-4]}
KC07_PortGetChar(port : Word ; VAR ret : Word)
<POP 2143e-21440 StackAdj> Δ+6 {}
<Call 0x21440 0x20d96> {}
<POP 21444-2144c Epilogue> Σ0
@ 2144c
<LVAR -0x004 @ 2(w)>
<POP 2144c-214b8 Body>
<POP 2144c-21462 Prologue> Σ0 ↓
<POP 21462-2147a Naked> Σ0 ↓ →0x21480
<Const 0x21462 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x21466 <LVAR -0x004 @ 2(w)>> Δ-4 {[#3]|[@@-4]}
<Call 0x2146a 0x1020e> {[#3]|[@@-4]}
KC07_PortGetChar(port : Word ; VAR ret : Word)
<POP 21470-21472 StackAdj> Δ+6 {}
<MI 21472 ANDI.W #0x00ff,(A6-0x4)> {}
<MI 21478 BNE 0x21480> {}
<POP 2147a-21480 Naked> Σ0 →0x214b0
<Call 0x2147a 0x20d96> {}
<MI 2147e BRA 0x214b0> {}
<POP 21480-214b0 Naked> Σ0 ↓ ←0x21462
<Blob 0x21480 [62] @> Δ-62 {[«62""»]}
<POP 21492-21494 StackAdj> Δ-4 {[«62""»]|[-4-]}
<Lit 0x21494 61> {[«62""»]|[$$Unsolicited connect event was not non-autoanswer, status =>_]}
<Call 0x214a8 0x20b20> {[«62""»]|[$$Unsolicited connect event was not non-autoanswer, status =>_]}
<POP 214ac-214b0 StackAdj> Δ+66 {}
<POP 214b0-214b8 Epilogue> Σ0 ←0x2147a
@ 214b8
<POP 214b8--0001 Body>
<POP 214b8-214ce Prologue> Σ0 ↓
<POP 214ce-21508 Naked> Σ0 ↓ ←0x21508
<Blob 0x214ce [14] @> Δ-14 {[«14""»]}
<POP 214da-214dc StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x214dc 14> {[«14""»]|[$$Connecting PAD]}
<Call 0x214f0 0x2055a> {[«14""»]|[$$Connecting PAD]}
<POP 214f4-214f8 StackAdj> Δ+18 {}
<Const 0x214f8 0x3.4> Δ-4 {[##3]}
<Call 0x214fc 0x103f4> {[##3]}
SetConsoleConfig(a : Long)
<POP 21502-21504 StackAdj> Δ+4 {}
<Call 0x21504 0x20d96> {}
<POP 21508-2150a Naked> Σ0 →0x214ce
<MI 21508 BRA 0x214ce> {}
@ 21512
<LVAR -0x004 @ 1(r)>
<POP 21512-215de Body> Δ+4
<POP 21512-21528 Prologue> Σ0 ↓
<POP 21528-2152a RegCacheLoad> Σ0 ↓
<POP 2152a-21538 Naked> Σ0 ↓ →0x21540
<POP 2152a-2152c StackAdj> Δ-4 {[-4-]}
<Call 0x2152c 0x103f8> {[-4-]}
GetConsoleConfig() : Long
<MI 21532 MOVE.L (A7)+,D0> Δ+4 {}
<MI 21534 CMP.L #0x03,D0> {}
<MI 21536 BEQ 0x21540> {}
<POP 21538-21540 Naked> Σ0 →0x215d6
<Call 0x21538 0x214b8> {}
<MI 2153c BRA 0x215d6> {}
<POP 21540-21566 Naked> Σ0 →0x21574 →0x21584 →0x2158c →0x21586 →0x21592 →0x215a0 →0x215ac ←0x2152a
<Const 0x21540 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x21542 <LVAR -0x004 @ 1(r)>> Δ-4 {[#3]|[@@-4]}
<Call 0x21546 0x10212> {[#3]|[@@-4]}
KC09_PortStatus(Port : Word; VAR b: Byte)
<POP 2154c-2154e StackAdj> Δ+6 {}
<MI 2154e MOVE.B (A6-0x4),D0> {}
<MI 21552 EXTB.W D0> {}
<POP 0x21554 LimitCheck 0x0 ≤ D0 ≤ 0x6> {}
<MI 2155c ADD.W D0,D0> {}
<MI 2155e SWITCH D0.W> {}
<POP 21574-21584 Naked> Σ0 →0x215d6 ←0x21540 ←0x21584
<MI 21574 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x21576 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x2157a 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 21580-21582 StackAdj> Δ+6 {}
<MI 21582 BRA 0x215d6> {}
<POP 21584-21586 Naked> Σ0 →0x21574 ←0x21540
<MI 21584 BRA 0x21574> {}
<POP 21586-2158c Naked> Σ0 →0x215d6 ←0x21540
<Call 0x21586 0x2144c> {}
<MI 2158a BRA 0x215d6> {}
<POP 2158c-21592 Naked> Σ0 →0x215d6 ←0x21540
<Call 0x2158c 0x213f0> {}
<MI 21590 BRA 0x215d6> {}
<POP 21592-2159c Naked> Σ0 Δ-4 ↓ ←0x21540
<Const 0x21592 0x1c.4> Δ-4 {[##28]}
<Call 0x21596 0x10220> {[##28]}
KC10_Panic(code : Long)
<POP 2159c-215a0 Naked> Σ-4 Δ+4 →0x215d6 ←0x215a0
<POP 2159c-2159e StackAdj> Δ+4 {}
<MI 2159e BRA 0x215d6> {}
<POP 215a0-215ac Naked> Σ0 Δ-4 →0x2159c ←0x21540
<Const 0x215a0 0x1.4> Δ-4 {[##1]}
<Call 0x215a4 0x103f4> {[##1]}
SetConsoleConfig(a : Long)
<MI 215aa BRA 0x2159c> {[##1]}
<POP 215ac-215d6 Naked> Σ0 ↓ ←0x21540
<Blob 0x215ac [42] @> Δ-42 {[«42""»]}
<POP 215b8-215ba StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x215ba 42> {[«42""»]|[$$PAD got connect data with no connect event]}
<Call 0x215ce 0x20b20> {[«42""»]|[$$PAD got connect data with no connect event]}
<POP 215d2-215d6 StackAdj> Δ+46 {}
<POP 215d6-215de Epilogue> Σ0 ←0x21538 ←0x21574 ←0x21586 ←0x2158c ←0x2159c
@ 215de
START
<POP 215de--0001 Body>
<POP 215de-215e8 Prologue> Σ0
<POP 215e8-215f2 Naked> Σ0 ↓
<Call 0x215e8 0x10398> {}
FSCALL_10398
<Call 0x215ee 0x21512> {}
<POP 215f2-215f8 Naked> Σ0
<Call 0x215f2 0x10284> {}
?exit
@ 21606
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 21606-2166e Body>
<POP 21606-2161c Prologue> Σ0 ↓
<POP 2161c-21666 Naked> Σ0 ↓
<Blob 0x2161c [14] @> Δ-14 {[«14""»]}
<Const 0x21628 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 2162c-2162e StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x2162e 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 21640-21642 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 21642 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 21646 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 21648 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2164a MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x2164c 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 21652-21654 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x21654 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 2165a-2165c StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x2165c 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 21662-21666 StackAdj> Δ+20 {}
<POP 21666-2166e Epilogue> Σ0
@ 216c2
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 216c2-217fe Body>
<POP 216c2-216d8 Prologue> Σ0 ↓
<POP 216d8-216ee RegCacheLoad> Σ0 ↓
<POP 216ee-2174e Naked> Σ0 ↓ →0x21796
<Call 0x216ee 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x216f4 [18] @> Δ-18 {[«18""»]}
<POP 21700-21702 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x21702 18> {[«18""»]|[$$Experiment error :]}
<Call 0x2170e 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 21710-21711 StackAdj> Δ+22 ↓ {}
<Blob 0x21711 [14] @> Δ-14 {[«14""»]}
<POP 21720-21722 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x21722 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 2172c-2172e StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 2172e MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x21732 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 21738-2173a StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x2173a 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21740-21742 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x21742 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21744-21746 StackAdj> Δ+18 {}
<MI 21746 MOVEA.L (A6+0xa),A0> {}
<MI 2174a CMPA.W #0x01,A0> {}
<MI 2174c BEQ 0x21796> {}
<POP 2174e-21796 Naked> Σ0 ↓
<Blob 0x2174e [14] @> Δ-14 {[«14""»]}
<Blob 0x2175e [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 2176e-21770 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x21770 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 2177a-2177c StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x2177c> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x2177c 12> Δ-4
<Const 0x21780 0x1.2> Δ-2
<Const 0x21782 0x1e.2> Δ-2
<Call 0x21784 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21786-21788 StackAdj> Δ+8
<Call 0x21788 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 2178e-21790 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x21790 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21792-21796 StackAdj> Δ+48 {}
<POP 21796-217f6 Naked> Σ0 ↓ ←0x216ee
<Blob 0x21796 [14] @> Δ-14 {[«14""»]}
<POP 217a6-217a8 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x217a8 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 217b2-217b4 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 217b4 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x217b8 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 217be-217c0 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x217c0 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 217c6-217c8 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x217c8 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 217ca-217cb StackAdj> Δ+18 ↓ {}
<Blob 0x217cb [24] @> Δ-24 {[«24""»]}
<Const 0x217da 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 217de-217e0 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x217e0 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x217ee 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 217f4-217f6 StackAdj> Δ+30 {}
<POP 217f6-217fe Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.b03abb51f6b3fcb5 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 15 de | | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 18 16 | | .PTR 0x21816 00020010 code.end: 00020010 00 02 17 fe | | .PTR 0x217fe 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 16 06 | | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 16 c2 | | .CODE EXP_FAIL 00020020 00 00 00 00 | | .CONST 0x00000000 00020024 exp_init_done: 00020024 00 | | .CONST 0x00 00020025 00 | | .CONST 0x00 00020026 00 00 | | .CONST 0x0000 00020028 00 00 | | .CONST 0x0000 0002002a 00 00 | | .XXX[0x2] 0002002c 00 00 | | .CONST 0x0000 0002002e 00 00 | | .CONST 0x0000 00020030 00 00 | | .CONST 0x0000 00020032 00 00 00 00 00 00 | | .XXX[0x6] 00020038 00 00 00 00 00 00 00 00 | | .BLANK 00[0xb0] 000200e8 00 00 00 00 | | .XXX[0x4] 000200ec 00 00 00 00 | | .PTR 0x0 000200f0 is_open_ERROR_LOG: 000200f0 00 | | .CONST 0x0 000200f1 write_error_ERROR_LOG: 000200f1 00 | | .CONST 0x0 000200f2 00 00 00 00 | | .CONST 0x00000000 000200f6 00 00 00 00 | | .CONST 0x00000000 000200fa 00 | | .CONST 0x00 000200fb 00 | | .CONST 0x00 000200fc file_ERROR_LOG: 000200fc 00 00 00 00 | | .CONST 0x00000000 00020100 00 00 00 00 | | .CONST 0x00000000 00020104 00 00 | | .CONST 0x0000 00020106 00 00 | | .CONST 0x0000 00020108 somekindoffsflag: 00020108 00 | | .CONST 0x00 00020109 00 | | .CONST 0x00 0002010a 40 28 23 29 46 49 |@(#)FI | .XXX[0x6] 00020110 58 50 41 44 2c 31 2e 31 |XPAD,1.1| .XXX[0x18] 00020118 2c 39 32 2f 30 37 2f 30 |,92/07/0| 00020120 39 2c 31 32 3a 30 30 3a |9,12:00:| 00020128 30 30 5c 20 |00\ | .XXX[0x4] 0002012c 43 6f 6e 6e 65 63 74 69 |Connecti| .TXT 'Connection complete ' 00020140 41 75 74 6f 2d 44 69 61 |Auto-Dia| .TXT 'Auto-Dialer call to MV failed ' 0002015e 50 41 44 20 69 73 20 64 |PAD is d| .TXT 'PAD is disconnected or powered off' 00020180 50 41 44 20 63 6f 6e 6e |PAD conn| .TXT 'PAD connection to Auto-Dialer failed' 000201a4 41 6c 72 65 61 64 79 20 |Already | .TXT 'Already connected ' 000201b6 4e 6f 20 50 41 44 20 6f |No PAD o| .TXT 'No PAD or dial-out disabled ' 000201d2 55 6e 6b 6e 6f 77 6e 20 |Unknown | .TXT 'Unknown PAD error ' 000201e4 55 6e 6b 6e 6f 77 6e 20 |Unknown | .TXT 'Unknown encoding => ' 000201f8 4e 6f 20 64 61 74 61 20 |No data | .TXT 'No data present ' 00020208 44 61 74 61 20 62 79 74 |Data byt| .TXT 'Data byte present ' 0002021a 44 69 73 63 |Disc | .TXT 'Disc' 0002021e 6f 6e 6e 65 |onne | .TXT 'onne' 00020222 63 74 65 64 |cted | .TXT 'cted' 00020226 43 6f 6e 6e 65 63 74 65 |Connecte| .TXT 'Connected ' 00020230 4f 75 74 70 75 74 20 63 |Output c| .TXT 'Output complete ' 00020240 44 69 73 63 6f 6e 6e 65 |Disconne| .TXT 'Disconnect packet arrival ' 0002025a 43 6f 6e 6e 65 63 74 20 |Connect | .TXT 'Connect packet arrival' 00020270 55 6e 6b 6e 6f 77 6e 20 |Unknown | .TXT 'Unknown encoding => ' 00020284 41 62 61 6e 64 6f 6e 69 |Abandoni| .TXT 'Abandoning remote connection. ' 000202a2 43 61 6e 6e 6f 74 20 63 |Cannot c| .TXT 'Cannot connect PAD, Status =>_' 000202c0 52 65 74 72 79 69 6e 67 |Retrying| .TXT 'Retrying remote connection in 1 minute. ' 000202e8 43 61 6e 6e 6f 74 20 63 |Cannot c| .TXT 'Cannot connect PAD, Status =>_' 00020306 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal connect request response, Event =>_ ' 00020332 43 6f 6e 6e 65 63 74 20 |Connect | .TXT 'Connect attempt refused.' 0002034a 55 6e 65 78 70 65 63 74 |Unexpect| .TXT 'Unexpected status while awaiting call-back, Status =>_' 00020380 55 6e 6b 6e 6f 77 6e 20 |Unknown | .TXT 'Unknown connect acknowedge, Data =>_' 000203a4 54 65 72 6d 69 6e 61 74 |Terminat| .TXT 'Terminated by operator' 000203ba 52 61 74 69 6f 6e 61 6c |Rational| .TXT 'Rational Response Center is busy and has requested that ' 000203f2 74 68 69 73 20 63 6c 75 |this clu| .TXT 'this cluster call back_ ' 0002040a 20 6d 69 6e 75 74 65 73 | minutes| .TXT ' minutes from now.' 0002041c 54 79 70 65 20 5e 43 20 |Type ^C | .TXT 'Type ^C to abort this delay ' 00020438 52 61 74 69 6f 6e 61 6c |Rational| .TXT 'Rational Response Center has instructed this cluster to wait' 00020474 66 6f 72 20 63 61 6c 6c |for call| .TXT 'for call back ' 00020482 50 41 44 20 63 6f 6e 6e |PAD conn| .TXT 'PAD connection broken, attempting to re-connect.' 000204b2 55 6e 73 6f 6c 69 63 69 |Unsolici| .TXT 'Unsolicited connect event was not non-autoanswer, status =>_ ' 000204f0 43 6f 6e 6e 65 63 74 69 |Connecti| .TXT 'Connecting PAD' 000204fe 41 74 |At | .XXX[0x2] 00020500 74 65 6d 70 74 20 74 6f |tempt to| .XXX[0x30] 00020508 20 72 65 73 6f 6c 76 65 | resolve| 00020510 20 50 41 44 20 73 74 61 | PAD sta| 00020518 74 75 73 20 77 69 74 68 |tus with| 00020520 20 6e 6f 6e 2d 50 41 44 | non-PAD| 00020528 20 64 65 76 69 63 65 2e | device.| 00020530 50 41 44 20 67 6f 74 20 |PAD got | .TXT 'PAD got connect data with no connect event' 0002055a ; -------------------------------------------------------------------------------------- 0002055a ; OMSI PASCAL Function 0002055a ; <LVAR 0x008 @ 4(r)> 0002055a ; -------------------------------------------------------------------------------------- 0002055a 4e 56 ff f2 |NV | LINK.W A6,#0xfff2 0002055e bf d5 | | CMPA.L (A5),A7 00020560 62 06 |b | BHI 0x20568 00020562 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020566 4e 76 |Nv | TRAPV 00020568 de fc 00 0e | | ADDA.W #0xe,A7 0002056c 48 e7 00 80 |H | MOVEM.L A0,-(A7) 00020570 41 ee 00 08 |A | LEA.L (A6+0x8),A0 00020574 2f 10 |/ | MOVE.L (A0),-(A7) 00020576 1f 3c 00 0a | < | MOVE.B #0x0a,-(A7) 0002057a 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00020580 54 4f |TO | ADDQ.L #0x2,A7 00020582 2e 90 |. | MOVE.L (A0),(A7) 00020584 1f 3c 00 0d | < | MOVE.B #0x0d,-(A7) 00020588 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 0002058e 58 4f |XO | ADDQ.L #0x4,A7 00020590 3e bc 00 01 |> | MOVE.W #0x1,(A7) 00020594 2f 10 |/ | MOVE.L (A0),-(A7) 00020596 4e b9 00 01 02 0a |N | JSR KC05_PortWriteString(port : Word ; str : String) 0002059c 5c 4f |\O | ADDQ.L #0x6,A7 0002059e 48 50 |HP | PEA.L (A0) 000205a0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000205a6 58 4f |XO | ADDQ.L #0x4,A7 000205a8 4c df 01 00 |L | MOVEM.L (A7)+,A0 000205ac 4e 5e |N^ | UNLK A6 000205ae 4e 75 |Nu | RTS 000205b0 ; -------------------------------------------------------------------------------------- 000205b0 ; OMSI PASCAL Function 000205b0 ; <LVAR 0x00c 4(w)> 000205b0 ; <LVAR 0x008 4(r)> 000205b0 ; -------------------------------------------------------------------------------------- 000205b0 4e 56 ff 98 |NV | LINK.W A6,#0xff98 000205b4 bf d5 | | CMPA.L (A5),A7 000205b6 62 06 |b | BHI 0x205be 000205b8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000205bc 4e 76 |Nv | TRAPV 000205be de fc 00 64 | d | ADDA.W #0x64,A7 000205c2 48 e7 ff e8 |H | MOVEM.L A4+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000205c6 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 000205cc 72 01 |r | MOVEQ.L #0x01,D1 000205ce 74 14 |t | MOVEQ.L #0x14,D2 000205d0 76 12 |v | MOVEQ.L #0x12,D3 000205d2 78 13 |x | MOVEQ.L #0x13,D4 000205d4 7a 1e |z | MOVEQ.L #0x1e,D5 000205d6 7c 22 ||" | MOVEQ.L #0x22,D6 000205d8 7e 24 |~$ | MOVEQ.L #0x24,D7 000205da 20 2e 00 08 | . | MOVE.L (A6+0x8),D0 000205de 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 000205e4 62 00 02 fa |b | BHI switch@0x205ea[0x6] 000205e8 d0 40 | @ | ADD.W D0,D0 000205ea 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000205f2 02 00 | | .CONST 0x200 ; [0x0] -> 0x207f2 000205f4 02 20 | | .CONST 0x220 ; [0x1] -> 0x20812 000205f6 02 48 | H | .CONST 0x248 ; [0x2] -> 0x2083a 000205f8 02 6a | j | .CONST 0x26a ; [0x3] -> 0x2085c 000205fa 02 8c | | .CONST 0x28c ; [0x4] -> 0x2087e 000205fc 02 b2 | | .CONST 0x2b2 ; [0x5] -> 0x208a4 000205fe 02 ee | | .CONST 0x2ee ; [0x6] -> 0x208e0 00020600 02 ee | | .CONST 0x2ee ; [0x7] -> 0x208e0 00020602 02 ee | | .CONST 0x2ee ; [0x8] -> 0x208e0 00020604 02 ee | | .CONST 0x2ee ; [0x9] -> 0x208e0 00020606 02 ee | | .CONST 0x2ee ; [0xa] -> 0x208e0 00020608 02 ee | | .CONST 0x2ee ; [0xb] -> 0x208e0 0002060a 02 ee | | .CONST 0x2ee ; [0xc] -> 0x208e0 0002060c 02 ee | | .CONST 0x2ee ; [0xd] -> 0x208e0 0002060e 02 ee | | .CONST 0x2ee ; [0xe] -> 0x208e0 00020610 02 ee | | .CONST 0x2ee ; [0xf] -> 0x208e0 00020612 02 ee | | .CONST 0x2ee ; [0x10] -> 0x208e0 00020614 02 ee | | .CONST 0x2ee ; [0x11] -> 0x208e0 00020616 02 ee | | .CONST 0x2ee ; [0x12] -> 0x208e0 00020618 02 ee | | .CONST 0x2ee ; [0x13] -> 0x208e0 0002061a 02 ee | | .CONST 0x2ee ; [0x14] -> 0x208e0 0002061c 02 ee | | .CONST 0x2ee ; [0x15] -> 0x208e0 0002061e 02 ee | | .CONST 0x2ee ; [0x16] -> 0x208e0 00020620 02 ee | | .CONST 0x2ee ; [0x17] -> 0x208e0 00020622 02 ee | | .CONST 0x2ee ; [0x18] -> 0x208e0 00020624 02 ee | | .CONST 0x2ee ; [0x19] -> 0x208e0 00020626 02 ee | | .CONST 0x2ee ; [0x1a] -> 0x208e0 00020628 02 ee | | .CONST 0x2ee ; [0x1b] -> 0x208e0 0002062a 02 ee | | .CONST 0x2ee ; [0x1c] -> 0x208e0 0002062c 02 ee | | .CONST 0x2ee ; [0x1d] -> 0x208e0 0002062e 02 ee | | .CONST 0x2ee ; [0x1e] -> 0x208e0 00020630 02 ee | | .CONST 0x2ee ; [0x1f] -> 0x208e0 00020632 02 ee | | .CONST 0x2ee ; [0x20] -> 0x208e0 00020634 02 ee | | .CONST 0x2ee ; [0x21] -> 0x208e0 00020636 02 ee | | .CONST 0x2ee ; [0x22] -> 0x208e0 00020638 02 ee | | .CONST 0x2ee ; [0x23] -> 0x208e0 0002063a 02 ee | | .CONST 0x2ee ; [0x24] -> 0x208e0 0002063c 02 ee | | .CONST 0x2ee ; [0x25] -> 0x208e0 0002063e 02 ee | | .CONST 0x2ee ; [0x26] -> 0x208e0 00020640 02 ee | | .CONST 0x2ee ; [0x27] -> 0x208e0 00020642 02 ee | | .CONST 0x2ee ; [0x28] -> 0x208e0 00020644 02 ee | | .CONST 0x2ee ; [0x29] -> 0x208e0 00020646 02 ee | | .CONST 0x2ee ; [0x2a] -> 0x208e0 00020648 02 ee | | .CONST 0x2ee ; [0x2b] -> 0x208e0 0002064a 02 ee | | .CONST 0x2ee ; [0x2c] -> 0x208e0 0002064c 02 ee | | .CONST 0x2ee ; [0x2d] -> 0x208e0 0002064e 02 ee | | .CONST 0x2ee ; [0x2e] -> 0x208e0 00020650 02 ee | | .CONST 0x2ee ; [0x2f] -> 0x208e0 00020652 02 ee | | .CONST 0x2ee ; [0x30] -> 0x208e0 00020654 02 ee | | .CONST 0x2ee ; [0x31] -> 0x208e0 00020656 02 ee | | .CONST 0x2ee ; [0x32] -> 0x208e0 00020658 02 ee | | .CONST 0x2ee ; [0x33] -> 0x208e0 0002065a 02 ee | | .CONST 0x2ee ; [0x34] -> 0x208e0 0002065c 02 ee | | .CONST 0x2ee ; [0x35] -> 0x208e0 0002065e 02 ee | | .CONST 0x2ee ; [0x36] -> 0x208e0 00020660 02 ee | | .CONST 0x2ee ; [0x37] -> 0x208e0 00020662 02 ee | | .CONST 0x2ee ; [0x38] -> 0x208e0 00020664 02 ee | | .CONST 0x2ee ; [0x39] -> 0x208e0 00020666 02 ee | | .CONST 0x2ee ; [0x3a] -> 0x208e0 00020668 02 ee | | .CONST 0x2ee ; [0x3b] -> 0x208e0 0002066a 02 ee | | .CONST 0x2ee ; [0x3c] -> 0x208e0 0002066c 02 ee | | .CONST 0x2ee ; [0x3d] -> 0x208e0 0002066e 02 ee | | .CONST 0x2ee ; [0x3e] -> 0x208e0 00020670 02 ee | | .CONST 0x2ee ; [0x3f] -> 0x208e0 00020672 02 ee | | .CONST 0x2ee ; [0x40] -> 0x208e0 00020674 02 ee | | .CONST 0x2ee ; [0x41] -> 0x208e0 00020676 02 ee | | .CONST 0x2ee ; [0x42] -> 0x208e0 00020678 02 ee | | .CONST 0x2ee ; [0x43] -> 0x208e0 0002067a 02 ee | | .CONST 0x2ee ; [0x44] -> 0x208e0 0002067c 02 ee | | .CONST 0x2ee ; [0x45] -> 0x208e0 0002067e 02 ee | | .CONST 0x2ee ; [0x46] -> 0x208e0 00020680 02 ee | | .CONST 0x2ee ; [0x47] -> 0x208e0 00020682 02 ee | | .CONST 0x2ee ; [0x48] -> 0x208e0 00020684 02 ee | | .CONST 0x2ee ; [0x49] -> 0x208e0 00020686 02 ee | | .CONST 0x2ee ; [0x4a] -> 0x208e0 00020688 02 ee | | .CONST 0x2ee ; [0x4b] -> 0x208e0 0002068a 02 ee | | .CONST 0x2ee ; [0x4c] -> 0x208e0 0002068c 02 ee | | .CONST 0x2ee ; [0x4d] -> 0x208e0 0002068e 02 ee | | .CONST 0x2ee ; [0x4e] -> 0x208e0 00020690 02 ee | | .CONST 0x2ee ; [0x4f] -> 0x208e0 00020692 02 ee | | .CONST 0x2ee ; [0x50] -> 0x208e0 00020694 02 ee | | .CONST 0x2ee ; [0x51] -> 0x208e0 00020696 02 ee | | .CONST 0x2ee ; [0x52] -> 0x208e0 00020698 02 ee | | .CONST 0x2ee ; [0x53] -> 0x208e0 0002069a 02 ee | | .CONST 0x2ee ; [0x54] -> 0x208e0 0002069c 02 ee | | .CONST 0x2ee ; [0x55] -> 0x208e0 0002069e 02 ee | | .CONST 0x2ee ; [0x56] -> 0x208e0 000206a0 02 ee | | .CONST 0x2ee ; [0x57] -> 0x208e0 000206a2 02 ee | | .CONST 0x2ee ; [0x58] -> 0x208e0 000206a4 02 ee | | .CONST 0x2ee ; [0x59] -> 0x208e0 000206a6 02 ee | | .CONST 0x2ee ; [0x5a] -> 0x208e0 000206a8 02 ee | | .CONST 0x2ee ; [0x5b] -> 0x208e0 000206aa 02 ee | | .CONST 0x2ee ; [0x5c] -> 0x208e0 000206ac 02 ee | | .CONST 0x2ee ; [0x5d] -> 0x208e0 000206ae 02 ee | | .CONST 0x2ee ; [0x5e] -> 0x208e0 000206b0 02 ee | | .CONST 0x2ee ; [0x5f] -> 0x208e0 000206b2 02 ee | | .CONST 0x2ee ; [0x60] -> 0x208e0 000206b4 02 ee | | .CONST 0x2ee ; [0x61] -> 0x208e0 000206b6 02 ee | | .CONST 0x2ee ; [0x62] -> 0x208e0 000206b8 02 ee | | .CONST 0x2ee ; [0x63] -> 0x208e0 000206ba 02 ee | | .CONST 0x2ee ; [0x64] -> 0x208e0 000206bc 02 ee | | .CONST 0x2ee ; [0x65] -> 0x208e0 000206be 02 ee | | .CONST 0x2ee ; [0x66] -> 0x208e0 000206c0 02 ee | | .CONST 0x2ee ; [0x67] -> 0x208e0 000206c2 02 ee | | .CONST 0x2ee ; [0x68] -> 0x208e0 000206c4 02 ee | | .CONST 0x2ee ; [0x69] -> 0x208e0 000206c6 02 ee | | .CONST 0x2ee ; [0x6a] -> 0x208e0 000206c8 02 ee | | .CONST 0x2ee ; [0x6b] -> 0x208e0 000206ca 02 ee | | .CONST 0x2ee ; [0x6c] -> 0x208e0 000206cc 02 ee | | .CONST 0x2ee ; [0x6d] -> 0x208e0 000206ce 02 ee | | .CONST 0x2ee ; [0x6e] -> 0x208e0 000206d0 02 ee | | .CONST 0x2ee ; [0x6f] -> 0x208e0 000206d2 02 ee | | .CONST 0x2ee ; [0x70] -> 0x208e0 000206d4 02 ee | | .CONST 0x2ee ; [0x71] -> 0x208e0 000206d6 02 ee | | .CONST 0x2ee ; [0x72] -> 0x208e0 000206d8 02 ee | | .CONST 0x2ee ; [0x73] -> 0x208e0 000206da 02 ee | | .CONST 0x2ee ; [0x74] -> 0x208e0 000206dc 02 ee | | .CONST 0x2ee ; [0x75] -> 0x208e0 000206de 02 ee | | .CONST 0x2ee ; [0x76] -> 0x208e0 000206e0 02 ee | | .CONST 0x2ee ; [0x77] -> 0x208e0 000206e2 02 ee | | .CONST 0x2ee ; [0x78] -> 0x208e0 000206e4 02 ee | | .CONST 0x2ee ; [0x79] -> 0x208e0 000206e6 02 ee | | .CONST 0x2ee ; [0x7a] -> 0x208e0 000206e8 02 ee | | .CONST 0x2ee ; [0x7b] -> 0x208e0 000206ea 02 ee | | .CONST 0x2ee ; [0x7c] -> 0x208e0 000206ec 02 ee | | .CONST 0x2ee ; [0x7d] -> 0x208e0 000206ee 02 ee | | .CONST 0x2ee ; [0x7e] -> 0x208e0 000206f0 02 ee | | .CONST 0x2ee ; [0x7f] -> 0x208e0 000206f2 02 ee | | .CONST 0x2ee ; [0x80] -> 0x208e0 000206f4 02 ee | | .CONST 0x2ee ; [0x81] -> 0x208e0 000206f6 02 ee | | .CONST 0x2ee ; [0x82] -> 0x208e0 000206f8 02 ee | | .CONST 0x2ee ; [0x83] -> 0x208e0 000206fa 02 ee | | .CONST 0x2ee ; [0x84] -> 0x208e0 000206fc 02 ee | | .CONST 0x2ee ; [0x85] -> 0x208e0 000206fe 02 ee | | .CONST 0x2ee ; [0x86] -> 0x208e0 00020700 02 ee | | .CONST 0x2ee ; [0x87] -> 0x208e0 00020702 02 ee | | .CONST 0x2ee ; [0x88] -> 0x208e0 00020704 02 ee | | .CONST 0x2ee ; [0x89] -> 0x208e0 00020706 02 ee | | .CONST 0x2ee ; [0x8a] -> 0x208e0 00020708 02 ee | | .CONST 0x2ee ; [0x8b] -> 0x208e0 0002070a 02 ee | | .CONST 0x2ee ; [0x8c] -> 0x208e0 0002070c 02 ee | | .CONST 0x2ee ; [0x8d] -> 0x208e0 0002070e 02 ee | | .CONST 0x2ee ; [0x8e] -> 0x208e0 00020710 02 ee | | .CONST 0x2ee ; [0x8f] -> 0x208e0 00020712 02 ee | | .CONST 0x2ee ; [0x90] -> 0x208e0 00020714 02 ee | | .CONST 0x2ee ; [0x91] -> 0x208e0 00020716 02 ee | | .CONST 0x2ee ; [0x92] -> 0x208e0 00020718 02 ee | | .CONST 0x2ee ; [0x93] -> 0x208e0 0002071a 02 ee | | .CONST 0x2ee ; [0x94] -> 0x208e0 0002071c 02 ee | | .CONST 0x2ee ; [0x95] -> 0x208e0 0002071e 02 ee | | .CONST 0x2ee ; [0x96] -> 0x208e0 00020720 02 ee | | .CONST 0x2ee ; [0x97] -> 0x208e0 00020722 02 ee | | .CONST 0x2ee ; [0x98] -> 0x208e0 00020724 02 ee | | .CONST 0x2ee ; [0x99] -> 0x208e0 00020726 02 ee | | .CONST 0x2ee ; [0x9a] -> 0x208e0 00020728 02 ee | | .CONST 0x2ee ; [0x9b] -> 0x208e0 0002072a 02 ee | | .CONST 0x2ee ; [0x9c] -> 0x208e0 0002072c 02 ee | | .CONST 0x2ee ; [0x9d] -> 0x208e0 0002072e 02 ee | | .CONST 0x2ee ; [0x9e] -> 0x208e0 00020730 02 ee | | .CONST 0x2ee ; [0x9f] -> 0x208e0 00020732 02 ee | | .CONST 0x2ee ; [0xa0] -> 0x208e0 00020734 02 ee | | .CONST 0x2ee ; [0xa1] -> 0x208e0 00020736 02 ee | | .CONST 0x2ee ; [0xa2] -> 0x208e0 00020738 02 ee | | .CONST 0x2ee ; [0xa3] -> 0x208e0 0002073a 02 ee | | .CONST 0x2ee ; [0xa4] -> 0x208e0 0002073c 02 ee | | .CONST 0x2ee ; [0xa5] -> 0x208e0 0002073e 02 ee | | .CONST 0x2ee ; [0xa6] -> 0x208e0 00020740 02 ee | | .CONST 0x2ee ; [0xa7] -> 0x208e0 00020742 02 ee | | .CONST 0x2ee ; [0xa8] -> 0x208e0 00020744 02 ee | | .CONST 0x2ee ; [0xa9] -> 0x208e0 00020746 02 ee | | .CONST 0x2ee ; [0xaa] -> 0x208e0 00020748 02 ee | | .CONST 0x2ee ; [0xab] -> 0x208e0 0002074a 02 ee | | .CONST 0x2ee ; [0xac] -> 0x208e0 0002074c 02 ee | | .CONST 0x2ee ; [0xad] -> 0x208e0 0002074e 02 ee | | .CONST 0x2ee ; [0xae] -> 0x208e0 00020750 02 ee | | .CONST 0x2ee ; [0xaf] -> 0x208e0 00020752 02 ee | | .CONST 0x2ee ; [0xb0] -> 0x208e0 00020754 02 ee | | .CONST 0x2ee ; [0xb1] -> 0x208e0 00020756 02 ee | | .CONST 0x2ee ; [0xb2] -> 0x208e0 00020758 02 ee | | .CONST 0x2ee ; [0xb3] -> 0x208e0 0002075a 02 ee | | .CONST 0x2ee ; [0xb4] -> 0x208e0 0002075c 02 ee | | .CONST 0x2ee ; [0xb5] -> 0x208e0 0002075e 02 ee | | .CONST 0x2ee ; [0xb6] -> 0x208e0 00020760 02 ee | | .CONST 0x2ee ; [0xb7] -> 0x208e0 00020762 02 ee | | .CONST 0x2ee ; [0xb8] -> 0x208e0 00020764 02 ee | | .CONST 0x2ee ; [0xb9] -> 0x208e0 00020766 02 ee | | .CONST 0x2ee ; [0xba] -> 0x208e0 00020768 02 ee | | .CONST 0x2ee ; [0xbb] -> 0x208e0 0002076a 02 ee | | .CONST 0x2ee ; [0xbc] -> 0x208e0 0002076c 02 ee | | .CONST 0x2ee ; [0xbd] -> 0x208e0 0002076e 02 ee | | .CONST 0x2ee ; [0xbe] -> 0x208e0 00020770 02 ee | | .CONST 0x2ee ; [0xbf] -> 0x208e0 00020772 02 ee | | .CONST 0x2ee ; [0xc0] -> 0x208e0 00020774 02 ee | | .CONST 0x2ee ; [0xc1] -> 0x208e0 00020776 02 ee | | .CONST 0x2ee ; [0xc2] -> 0x208e0 00020778 02 ee | | .CONST 0x2ee ; [0xc3] -> 0x208e0 0002077a 02 ee | | .CONST 0x2ee ; [0xc4] -> 0x208e0 0002077c 02 ee | | .CONST 0x2ee ; [0xc5] -> 0x208e0 0002077e 02 ee | | .CONST 0x2ee ; [0xc6] -> 0x208e0 00020780 02 ee | | .CONST 0x2ee ; [0xc7] -> 0x208e0 00020782 02 ee | | .CONST 0x2ee ; [0xc8] -> 0x208e0 00020784 02 ee | | .CONST 0x2ee ; [0xc9] -> 0x208e0 00020786 02 ee | | .CONST 0x2ee ; [0xca] -> 0x208e0 00020788 02 ee | | .CONST 0x2ee ; [0xcb] -> 0x208e0 0002078a 02 ee | | .CONST 0x2ee ; [0xcc] -> 0x208e0 0002078c 02 ee | | .CONST 0x2ee ; [0xcd] -> 0x208e0 0002078e 02 ee | | .CONST 0x2ee ; [0xce] -> 0x208e0 00020790 02 ee | | .CONST 0x2ee ; [0xcf] -> 0x208e0 00020792 02 ee | | .CONST 0x2ee ; [0xd0] -> 0x208e0 00020794 02 ee | | .CONST 0x2ee ; [0xd1] -> 0x208e0 00020796 02 ee | | .CONST 0x2ee ; [0xd2] -> 0x208e0 00020798 02 ee | | .CONST 0x2ee ; [0xd3] -> 0x208e0 0002079a 02 ee | | .CONST 0x2ee ; [0xd4] -> 0x208e0 0002079c 02 ee | | .CONST 0x2ee ; [0xd5] -> 0x208e0 0002079e 02 ee | | .CONST 0x2ee ; [0xd6] -> 0x208e0 000207a0 02 ee | | .CONST 0x2ee ; [0xd7] -> 0x208e0 000207a2 02 ee | | .CONST 0x2ee ; [0xd8] -> 0x208e0 000207a4 02 ee | | .CONST 0x2ee ; [0xd9] -> 0x208e0 000207a6 02 ee | | .CONST 0x2ee ; [0xda] -> 0x208e0 000207a8 02 ee | | .CONST 0x2ee ; [0xdb] -> 0x208e0 000207aa 02 ee | | .CONST 0x2ee ; [0xdc] -> 0x208e0 000207ac 02 ee | | .CONST 0x2ee ; [0xdd] -> 0x208e0 000207ae 02 ee | | .CONST 0x2ee ; [0xde] -> 0x208e0 000207b0 02 ee | | .CONST 0x2ee ; [0xdf] -> 0x208e0 000207b2 02 ee | | .CONST 0x2ee ; [0xe0] -> 0x208e0 000207b4 02 ee | | .CONST 0x2ee ; [0xe1] -> 0x208e0 000207b6 02 ee | | .CONST 0x2ee ; [0xe2] -> 0x208e0 000207b8 02 ee | | .CONST 0x2ee ; [0xe3] -> 0x208e0 000207ba 02 ee | | .CONST 0x2ee ; [0xe4] -> 0x208e0 000207bc 02 ee | | .CONST 0x2ee ; [0xe5] -> 0x208e0 000207be 02 ee | | .CONST 0x2ee ; [0xe6] -> 0x208e0 000207c0 02 ee | | .CONST 0x2ee ; [0xe7] -> 0x208e0 000207c2 02 ee | | .CONST 0x2ee ; [0xe8] -> 0x208e0 000207c4 02 ee | | .CONST 0x2ee ; [0xe9] -> 0x208e0 000207c6 02 ee | | .CONST 0x2ee ; [0xea] -> 0x208e0 000207c8 02 ee | | .CONST 0x2ee ; [0xeb] -> 0x208e0 000207ca 02 ee | | .CONST 0x2ee ; [0xec] -> 0x208e0 000207cc 02 ee | | .CONST 0x2ee ; [0xed] -> 0x208e0 000207ce 02 ee | | .CONST 0x2ee ; [0xee] -> 0x208e0 000207d0 02 ee | | .CONST 0x2ee ; [0xef] -> 0x208e0 000207d2 02 ee | | .CONST 0x2ee ; [0xf0] -> 0x208e0 000207d4 02 ee | | .CONST 0x2ee ; [0xf1] -> 0x208e0 000207d6 02 ee | | .CONST 0x2ee ; [0xf2] -> 0x208e0 000207d8 02 ee | | .CONST 0x2ee ; [0xf3] -> 0x208e0 000207da 02 ee | | .CONST 0x2ee ; [0xf4] -> 0x208e0 000207dc 02 ee | | .CONST 0x2ee ; [0xf5] -> 0x208e0 000207de 02 ee | | .CONST 0x2ee ; [0xf6] -> 0x208e0 000207e0 02 ee | | .CONST 0x2ee ; [0xf7] -> 0x208e0 000207e2 02 ee | | .CONST 0x2ee ; [0xf8] -> 0x208e0 000207e4 02 ee | | .CONST 0x2ee ; [0xf9] -> 0x208e0 000207e6 02 ee | | .CONST 0x2ee ; [0xfa] -> 0x208e0 000207e8 02 ee | | .CONST 0x2ee ; [0xfb] -> 0x208e0 000207ea 02 ee | | .CONST 0x2ee ; [0xfc] -> 0x208e0 000207ec 02 ee | | .CONST 0x2ee ; [0xfd] -> 0x208e0 000207ee 02 ee | | .CONST 0x2ee ; [0xfe] -> 0x208e0 000207f0 02 dc | | .CONST 0x2dc ; [0xff] -> 0x208ce 000207f2 switch@0x205ea[0x0]: 000207f2 9e c2 | | SUBA.W D2,A7 000207f4 20 4f | O | MOVEA.L A7,A0 000207f6 43 fa f9 34 |C 4 | LEA.L 0x2012c,A1 000207fa 70 12 |p | MOVEQ.L #0x12,D0 000207fc 10 d9 | | MOVE.B (A1)+,(A0)+ 000207fe 51 c8 ff fc |Q | DBF D0,0x207fc 00020802 59 4f |YO | SUBQ.L #0x4,A7 00020804 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020808 3f 01 |? | MOVE.W D1,-(A7) 0002080a 3f 04 |? | MOVE.W D4,-(A7) 0002080c 4e 92 |N | JSR (A2) 0002080e 60 00 00 fe |` | BRA 0x2090e 00020812 switch@0x205ea[0x1]: 00020812 9e c5 | | SUBA.W D5,A7 00020814 20 4f | O | MOVEA.L A7,A0 00020816 43 fa f9 28 |C ( | LEA.L 0x20140,A1 0002081a 70 1c |p | MOVEQ.L #0x1c,D0 0002081c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002081e 51 c8 ff fc |Q | DBF D0,0x2081c 00020822 59 4f |YO | SUBQ.L #0x4,A7 00020824 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020828 3f 01 |? | MOVE.W D1,-(A7) 0002082a 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 0002082e 4e 92 |N | JSR (A2) 00020830 50 4f |PO | ADDQ.L #0x8,A7 00020832 28 5f |(_ | MOVEA.L (A7)+,A4 00020834 de c5 | | ADDA.W D5,A7 00020836 60 00 00 dc |` | BRA 0x20914 0002083a switch@0x205ea[0x2]: 0002083a 41 fa f9 44 |A D | LEA.L 0x20180,A0 0002083e 70 10 |p | MOVEQ.L #0x10,D0 00020840 3f 20 |? | MOVE.W -(A0),-(A7) 00020842 51 c8 ff fc |Q | DBF D0,0x20840 00020846 59 4f |YO | SUBQ.L #0x4,A7 00020848 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002084c 3f 01 |? | MOVE.W D1,-(A7) 0002084e 3f 06 |? | MOVE.W D6,-(A7) 00020850 4e 92 |N | JSR (A2) 00020852 50 4f |PO | ADDQ.L #0x8,A7 00020854 28 5f |(_ | MOVEA.L (A7)+,A4 00020856 de c6 | | ADDA.W D6,A7 00020858 60 00 00 ba |` | BRA 0x20914 0002085c switch@0x205ea[0x3]: 0002085c 41 fa f9 46 |A F | LEA.L 0x201a4,A0 00020860 70 08 |p | MOVEQ.L #0x08,D0 00020862 2f 20 |/ | MOVE.L -(A0),-(A7) 00020864 51 c8 ff fc |Q | DBF D0,0x20862 00020868 59 4f |YO | SUBQ.L #0x4,A7 0002086a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002086e 3f 01 |? | MOVE.W D1,-(A7) 00020870 3f 07 |? | MOVE.W D7,-(A7) 00020872 4e 92 |N | JSR (A2) 00020874 50 4f |PO | ADDQ.L #0x8,A7 00020876 28 5f |(_ | MOVEA.L (A7)+,A4 00020878 de c7 | | ADDA.W D7,A7 0002087a 60 00 00 98 |` | BRA 0x20914 0002087e switch@0x205ea[0x4]: 0002087e 9e c3 | | SUBA.W D3,A7 00020880 20 4f | O | MOVEA.L A7,A0 00020882 43 fa f9 20 |C | LEA.L 0x201a4,A1 00020886 70 10 |p | MOVEQ.L #0x10,D0 00020888 10 d9 | | MOVE.B (A1)+,(A0)+ 0002088a 51 c8 ff fc |Q | DBF D0,0x20888 0002088e 59 4f |YO | SUBQ.L #0x4,A7 00020890 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020894 3f 01 |? | MOVE.W D1,-(A7) 00020896 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 0002089a 4e 92 |N | JSR (A2) 0002089c 50 4f |PO | ADDQ.L #0x8,A7 0002089e 28 5f |(_ | MOVEA.L (A7)+,A4 000208a0 de c3 | | ADDA.W D3,A7 000208a2 60 70 |`p | BRA 0x20914 000208a4 switch@0x205ea[0x5]: 000208a4 9e fc 00 1c | | SUBA.W #0x1c,A7 000208a8 20 4f | O | MOVEA.L A7,A0 000208aa 43 fa f9 0a |C | LEA.L 0x201b6,A1 000208ae 70 1a |p | MOVEQ.L #0x1a,D0 000208b0 10 d9 | | MOVE.B (A1)+,(A0)+ 000208b2 51 c8 ff fc |Q | DBF D0,0x208b0 000208b6 59 4f |YO | SUBQ.L #0x4,A7 000208b8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000208bc 3f 01 |? | MOVE.W D1,-(A7) 000208be 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 000208c2 4e 92 |N | JSR (A2) 000208c4 50 4f |PO | ADDQ.L #0x8,A7 000208c6 28 5f |(_ | MOVEA.L (A7)+,A4 000208c8 de fc 00 1c | | ADDA.W #0x1c,A7 000208cc 60 46 |`F | BRA 0x20914 000208ce switch@0x205ea[0xff]: 000208ce 9e c3 | | SUBA.W D3,A7 000208d0 20 4f | O | MOVEA.L A7,A0 000208d2 43 fa f8 fe |C | LEA.L 0x201d2,A1 000208d6 70 10 |p | MOVEQ.L #0x10,D0 000208d8 10 d9 | | MOVE.B (A1)+,(A0)+ 000208da 51 c8 ff fc |Q | DBF D0,0x208d8 000208de 60 ae |` | BRA 0x2088e 000208e0 switch@0x205ea[0x10]: 000208e0 switch@0x205ea[0x11]: 000208e0 switch@0x205ea[0x12]: 000208e0 switch@0x205ea[0x13]: 000208e0 switch@0x205ea[0x14]: 000208e0 switch@0x205ea[0x15]: 000208e0 switch@0x205ea[0x16]: 000208e0 switch@0x205ea[0x17]: 000208e0 switch@0x205ea[0x18]: 000208e0 switch@0x205ea[0x19]: 000208e0 switch@0x205ea[0x1a]: 000208e0 switch@0x205ea[0x1b]: 000208e0 switch@0x205ea[0x1c]: 000208e0 switch@0x205ea[0x1d]: 000208e0 switch@0x205ea[0x1e]: 000208e0 switch@0x205ea[0x1f]: 000208e0 switch@0x205ea[0x20]: 000208e0 switch@0x205ea[0x21]: 000208e0 switch@0x205ea[0x22]: 000208e0 switch@0x205ea[0x23]: 000208e0 switch@0x205ea[0x24]: 000208e0 switch@0x205ea[0x25]: 000208e0 switch@0x205ea[0x26]: 000208e0 switch@0x205ea[0x27]: 000208e0 switch@0x205ea[0x28]: 000208e0 switch@0x205ea[0x29]: 000208e0 switch@0x205ea[0x2a]: 000208e0 switch@0x205ea[0x2b]: 000208e0 switch@0x205ea[0x2c]: 000208e0 switch@0x205ea[0x2d]: 000208e0 switch@0x205ea[0x2e]: 000208e0 switch@0x205ea[0x2f]: 000208e0 switch@0x205ea[0x30]: 000208e0 switch@0x205ea[0x31]: 000208e0 switch@0x205ea[0x32]: 000208e0 switch@0x205ea[0x33]: 000208e0 switch@0x205ea[0x34]: 000208e0 switch@0x205ea[0x35]: 000208e0 switch@0x205ea[0x36]: 000208e0 switch@0x205ea[0x37]: 000208e0 switch@0x205ea[0x38]: 000208e0 switch@0x205ea[0x39]: 000208e0 switch@0x205ea[0x3a]: 000208e0 switch@0x205ea[0x3b]: 000208e0 switch@0x205ea[0x3c]: 000208e0 switch@0x205ea[0x3d]: 000208e0 switch@0x205ea[0x3e]: 000208e0 switch@0x205ea[0x3f]: 000208e0 switch@0x205ea[0x40]: 000208e0 switch@0x205ea[0x41]: 000208e0 switch@0x205ea[0x42]: 000208e0 switch@0x205ea[0x43]: 000208e0 switch@0x205ea[0x44]: 000208e0 switch@0x205ea[0x45]: 000208e0 switch@0x205ea[0x46]: 000208e0 switch@0x205ea[0x47]: 000208e0 switch@0x205ea[0x48]: 000208e0 switch@0x205ea[0x49]: 000208e0 switch@0x205ea[0x4a]: 000208e0 switch@0x205ea[0x4b]: 000208e0 switch@0x205ea[0x4c]: 000208e0 switch@0x205ea[0x4d]: 000208e0 switch@0x205ea[0x4e]: 000208e0 switch@0x205ea[0x4f]: 000208e0 switch@0x205ea[0x50]: 000208e0 switch@0x205ea[0x51]: 000208e0 switch@0x205ea[0x52]: 000208e0 switch@0x205ea[0x53]: 000208e0 switch@0x205ea[0x54]: 000208e0 switch@0x205ea[0x55]: 000208e0 switch@0x205ea[0x56]: 000208e0 switch@0x205ea[0x57]: 000208e0 switch@0x205ea[0x58]: 000208e0 switch@0x205ea[0x59]: 000208e0 switch@0x205ea[0x5a]: 000208e0 switch@0x205ea[0x5b]: 000208e0 switch@0x205ea[0x5c]: 000208e0 switch@0x205ea[0x5d]: 000208e0 switch@0x205ea[0x5e]: 000208e0 switch@0x205ea[0x5f]: 000208e0 switch@0x205ea[0x60]: 000208e0 switch@0x205ea[0x61]: 000208e0 switch@0x205ea[0x62]: 000208e0 switch@0x205ea[0x63]: 000208e0 switch@0x205ea[0x64]: 000208e0 switch@0x205ea[0x65]: 000208e0 switch@0x205ea[0x66]: 000208e0 switch@0x205ea[0x67]: 000208e0 switch@0x205ea[0x68]: 000208e0 switch@0x205ea[0x69]: 000208e0 switch@0x205ea[0x6]: 000208e0 switch@0x205ea[0x6a]: 000208e0 switch@0x205ea[0x6b]: 000208e0 switch@0x205ea[0x6c]: 000208e0 switch@0x205ea[0x6d]: 000208e0 switch@0x205ea[0x6e]: 000208e0 switch@0x205ea[0x6f]: 000208e0 switch@0x205ea[0x70]: 000208e0 switch@0x205ea[0x71]: 000208e0 switch@0x205ea[0x72]: 000208e0 switch@0x205ea[0x73]: 000208e0 switch@0x205ea[0x74]: 000208e0 switch@0x205ea[0x75]: 000208e0 switch@0x205ea[0x76]: 000208e0 switch@0x205ea[0x77]: 000208e0 switch@0x205ea[0x78]: 000208e0 switch@0x205ea[0x79]: 000208e0 switch@0x205ea[0x7]: 000208e0 switch@0x205ea[0x7a]: 000208e0 switch@0x205ea[0x7b]: 000208e0 switch@0x205ea[0x7c]: 000208e0 switch@0x205ea[0x7d]: 000208e0 switch@0x205ea[0x7e]: 000208e0 switch@0x205ea[0x7f]: 000208e0 switch@0x205ea[0x80]: 000208e0 switch@0x205ea[0x81]: 000208e0 switch@0x205ea[0x82]: 000208e0 switch@0x205ea[0x83]: 000208e0 switch@0x205ea[0x84]: 000208e0 switch@0x205ea[0x85]: 000208e0 switch@0x205ea[0x86]: 000208e0 switch@0x205ea[0x87]: 000208e0 switch@0x205ea[0x88]: 000208e0 switch@0x205ea[0x89]: 000208e0 switch@0x205ea[0x8]: 000208e0 switch@0x205ea[0x8a]: 000208e0 switch@0x205ea[0x8b]: 000208e0 switch@0x205ea[0x8c]: 000208e0 switch@0x205ea[0x8d]: 000208e0 switch@0x205ea[0x8e]: 000208e0 switch@0x205ea[0x8f]: 000208e0 switch@0x205ea[0x90]: 000208e0 switch@0x205ea[0x91]: 000208e0 switch@0x205ea[0x92]: 000208e0 switch@0x205ea[0x93]: 000208e0 switch@0x205ea[0x94]: 000208e0 switch@0x205ea[0x95]: 000208e0 switch@0x205ea[0x96]: 000208e0 switch@0x205ea[0x97]: 000208e0 switch@0x205ea[0x98]: 000208e0 switch@0x205ea[0x99]: 000208e0 switch@0x205ea[0x9]: 000208e0 switch@0x205ea[0x9a]: 000208e0 switch@0x205ea[0x9b]: 000208e0 switch@0x205ea[0x9c]: 000208e0 switch@0x205ea[0x9d]: 000208e0 switch@0x205ea[0x9e]: 000208e0 switch@0x205ea[0x9f]: 000208e0 switch@0x205ea[0xa0]: 000208e0 switch@0x205ea[0xa1]: 000208e0 switch@0x205ea[0xa2]: 000208e0 switch@0x205ea[0xa3]: 000208e0 switch@0x205ea[0xa4]: 000208e0 switch@0x205ea[0xa5]: 000208e0 switch@0x205ea[0xa6]: 000208e0 switch@0x205ea[0xa7]: 000208e0 switch@0x205ea[0xa8]: 000208e0 switch@0x205ea[0xa9]: 000208e0 switch@0x205ea[0xa]: 000208e0 switch@0x205ea[0xaa]: 000208e0 switch@0x205ea[0xab]: 000208e0 switch@0x205ea[0xac]: 000208e0 switch@0x205ea[0xad]: 000208e0 switch@0x205ea[0xae]: 000208e0 switch@0x205ea[0xaf]: 000208e0 switch@0x205ea[0xb0]: 000208e0 switch@0x205ea[0xb1]: 000208e0 switch@0x205ea[0xb2]: 000208e0 switch@0x205ea[0xb3]: 000208e0 switch@0x205ea[0xb4]: 000208e0 switch@0x205ea[0xb5]: 000208e0 switch@0x205ea[0xb6]: 000208e0 switch@0x205ea[0xb7]: 000208e0 switch@0x205ea[0xb8]: 000208e0 switch@0x205ea[0xb9]: 000208e0 switch@0x205ea[0xb]: 000208e0 switch@0x205ea[0xba]: 000208e0 switch@0x205ea[0xbb]: 000208e0 switch@0x205ea[0xbc]: 000208e0 switch@0x205ea[0xbd]: 000208e0 switch@0x205ea[0xbe]: 000208e0 switch@0x205ea[0xbf]: 000208e0 switch@0x205ea[0xc0]: 000208e0 switch@0x205ea[0xc1]: 000208e0 switch@0x205ea[0xc2]: 000208e0 switch@0x205ea[0xc3]: 000208e0 switch@0x205ea[0xc4]: 000208e0 switch@0x205ea[0xc5]: 000208e0 switch@0x205ea[0xc6]: 000208e0 switch@0x205ea[0xc7]: 000208e0 switch@0x205ea[0xc8]: 000208e0 switch@0x205ea[0xc9]: 000208e0 switch@0x205ea[0xc]: 000208e0 switch@0x205ea[0xca]: 000208e0 switch@0x205ea[0xcb]: 000208e0 switch@0x205ea[0xcc]: 000208e0 switch@0x205ea[0xcd]: 000208e0 switch@0x205ea[0xce]: 000208e0 switch@0x205ea[0xcf]: 000208e0 switch@0x205ea[0xd0]: 000208e0 switch@0x205ea[0xd1]: 000208e0 switch@0x205ea[0xd2]: 000208e0 switch@0x205ea[0xd3]: 000208e0 switch@0x205ea[0xd4]: 000208e0 switch@0x205ea[0xd5]: 000208e0 switch@0x205ea[0xd6]: 000208e0 switch@0x205ea[0xd7]: 000208e0 switch@0x205ea[0xd8]: 000208e0 switch@0x205ea[0xd9]: 000208e0 switch@0x205ea[0xd]: 000208e0 switch@0x205ea[0xda]: 000208e0 switch@0x205ea[0xdb]: 000208e0 switch@0x205ea[0xdc]: 000208e0 switch@0x205ea[0xdd]: 000208e0 switch@0x205ea[0xde]: 000208e0 switch@0x205ea[0xdf]: 000208e0 switch@0x205ea[0xe0]: 000208e0 switch@0x205ea[0xe1]: 000208e0 switch@0x205ea[0xe2]: 000208e0 switch@0x205ea[0xe3]: 000208e0 switch@0x205ea[0xe4]: 000208e0 switch@0x205ea[0xe5]: 000208e0 switch@0x205ea[0xe6]: 000208e0 switch@0x205ea[0xe7]: 000208e0 switch@0x205ea[0xe8]: 000208e0 switch@0x205ea[0xe9]: 000208e0 switch@0x205ea[0xe]: 000208e0 switch@0x205ea[0xea]: 000208e0 switch@0x205ea[0xeb]: 000208e0 switch@0x205ea[0xec]: 000208e0 switch@0x205ea[0xed]: 000208e0 switch@0x205ea[0xee]: 000208e0 switch@0x205ea[0xef]: 000208e0 switch@0x205ea[0xf0]: 000208e0 switch@0x205ea[0xf1]: 000208e0 switch@0x205ea[0xf2]: 000208e0 switch@0x205ea[0xf3]: 000208e0 switch@0x205ea[0xf4]: 000208e0 switch@0x205ea[0xf5]: 000208e0 switch@0x205ea[0xf6]: 000208e0 switch@0x205ea[0xf7]: 000208e0 switch@0x205ea[0xf8]: 000208e0 switch@0x205ea[0xf9]: 000208e0 switch@0x205ea[0xf]: 000208e0 switch@0x205ea[0xfa]: 000208e0 switch@0x205ea[0xfb]: 000208e0 switch@0x205ea[0xfc]: 000208e0 switch@0x205ea[0xfd]: 000208e0 switch@0x205ea[0xfe]: 000208e0 9e c2 | | SUBA.W D2,A7 000208e2 20 4f | O | MOVEA.L A7,A0 000208e4 43 fa f8 fe |C | LEA.L 0x201e4,A1 000208e8 70 12 |p | MOVEQ.L #0x12,D0 000208ea 10 d9 | | MOVE.B (A1)+,(A0)+ 000208ec 51 c8 ff fc |Q | DBF D0,0x208ea 000208f0 51 4f |QO | SUBQ.L #0x8,A7 000208f2 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000208f6 3f 01 |? | MOVE.W D1,-(A7) 000208f8 3f 04 |? | MOVE.W D4,-(A7) 000208fa 4e 92 |N | JSR (A2) 000208fc 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00020900 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00020906 58 4f |XO | ADDQ.L #0x4,A7 00020908 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002090e 50 4f |PO | ADDQ.L #0x8,A7 00020910 28 5f |(_ | MOVEA.L (A7)+,A4 00020912 de c2 | | ADDA.W D2,A7 00020914 2d 4c 00 0c |-L | MOVE.L A4,(A6+0xc) 00020918 4c df 17 ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A4 0002091c 4e 5e |N^ | UNLK A6 0002091e 4e 75 |Nu | RTS 00020920 ; -------------------------------------------------------------------------------------- 00020920 ; OMSI PASCAL Function 00020920 ; <LVAR 0x00c 4(w)> 00020920 ; <LVAR 0x008 4(r)> 00020920 ; -------------------------------------------------------------------------------------- 00020920 4e 56 ff a2 |NV | LINK.W A6,#0xffa2 00020924 bf d5 | | CMPA.L (A5),A7 00020926 62 06 |b | BHI 0x2092e 00020928 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002092c 4e 76 |Nv | TRAPV 0002092e de fc 00 5a | Z | ADDA.W #0x5a,A7 00020932 48 e7 ff e8 |H | MOVEM.L A4+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020936 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 0002093c 72 01 |r | MOVEQ.L #0x01,D1 0002093e 74 10 |t | MOVEQ.L #0x10,D2 00020940 76 12 |v | MOVEQ.L #0x12,D3 00020942 78 0c |x | MOVEQ.L #0x0c,D4 00020944 7a 0a |z | MOVEQ.L #0x0a,D5 00020946 7c 1a || | MOVEQ.L #0x1a,D6 00020948 7e 16 |~ | MOVEQ.L #0x16,D7 0002094a 20 2e 00 08 | . | MOVE.L (A6+0x8),D0 0002094e 0c 80 00 00 00 06 | | CMPI.L #0x00000006,D0 00020954 62 00 01 0e |b | BHI 0x20a64 00020958 d0 40 | @ | ADD.W D0,D0 0002095a 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00020962 00 0e | | .CONST 0xe ; [0x0] -> 0x20970 00020964 00 36 | 6 | .CONST 0x36 ; [0x1] -> 0x20998 00020966 00 5e | ^ | .CONST 0x5e ; [0x2] -> 0x209c0 00020968 00 80 | | .CONST 0x80 ; [0x3] -> 0x209e2 0002096a 00 a8 | | .CONST 0xa8 ; [0x4] -> 0x20a0a 0002096c 00 bc | | .CONST 0xbc ; [0x5] -> 0x20a1e 0002096e 00 e2 | | .CONST 0xe2 ; [0x6] -> 0x20a44 00020970 switch@0x2095a[0x0]: 00020970 9e c2 | | SUBA.W D2,A7 00020972 20 4f | O | MOVEA.L A7,A0 00020974 43 fa f8 82 |C | LEA.L 0x201f8,A1 00020978 70 0e |p | MOVEQ.L #0x0e,D0 0002097a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002097c 51 c8 ff fc |Q | DBF D0,0x2097a 00020980 59 4f |YO | SUBQ.L #0x4,A7 00020982 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020986 3f 01 |? | MOVE.W D1,-(A7) 00020988 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 0002098c 4e 92 |N | JSR (A2) 0002098e 50 4f |PO | ADDQ.L #0x8,A7 00020990 28 5f |(_ | MOVEA.L (A7)+,A4 00020992 de c2 | | ADDA.W D2,A7 00020994 60 00 01 08 |` | BRA 0x20a9e 00020998 switch@0x2095a[0x1]: 00020998 9e c3 | | SUBA.W D3,A7 0002099a 20 4f | O | MOVEA.L A7,A0 0002099c 43 fa f8 6a |C j | LEA.L 0x20208,A1 000209a0 70 10 |p | MOVEQ.L #0x10,D0 000209a2 10 d9 | | MOVE.B (A1)+,(A0)+ 000209a4 51 c8 ff fc |Q | DBF D0,0x209a2 000209a8 59 4f |YO | SUBQ.L #0x4,A7 000209aa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000209ae 3f 01 |? | MOVE.W D1,-(A7) 000209b0 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 000209b4 4e 92 |N | JSR (A2) 000209b6 50 4f |PO | ADDQ.L #0x8,A7 000209b8 28 5f |(_ | MOVEA.L (A7)+,A4 000209ba de c3 | | ADDA.W D3,A7 000209bc 60 00 00 e0 |` | BRA 0x20a9e 000209c0 switch@0x2095a[0x2]: 000209c0 2f 3a f8 60 |/: ` | MOVE.L 0x20222,-(A7) 000209c4 2f 3a f8 58 |/: X | MOVE.L 0x2021e,-(A7) 000209c8 2f 3a f8 50 |/: P | MOVE.L 0x2021a,-(A7) 000209cc 59 4f |YO | SUBQ.L #0x4,A7 000209ce 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000209d2 3f 01 |? | MOVE.W D1,-(A7) 000209d4 3f 04 |? | MOVE.W D4,-(A7) 000209d6 4e 92 |N | JSR (A2) 000209d8 50 4f |PO | ADDQ.L #0x8,A7 000209da 28 5f |(_ | MOVEA.L (A7)+,A4 000209dc de c4 | | ADDA.W D4,A7 000209de 60 00 00 be |` | BRA 0x20a9e 000209e2 switch@0x2095a[0x3]: 000209e2 9e c5 | | SUBA.W D5,A7 000209e4 20 4f | O | MOVEA.L A7,A0 000209e6 43 fa f8 3e |C > | LEA.L 0x20226,A1 000209ea 70 08 |p | MOVEQ.L #0x08,D0 000209ec 10 d9 | | MOVE.B (A1)+,(A0)+ 000209ee 51 c8 ff fc |Q | DBF D0,0x209ec 000209f2 59 4f |YO | SUBQ.L #0x4,A7 000209f4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000209f8 3f 01 |? | MOVE.W D1,-(A7) 000209fa 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 000209fe 4e 92 |N | JSR (A2) 00020a00 50 4f |PO | ADDQ.L #0x8,A7 00020a02 28 5f |(_ | MOVEA.L (A7)+,A4 00020a04 de c5 | | ADDA.W D5,A7 00020a06 60 00 00 96 |` | BRA 0x20a9e 00020a0a switch@0x2095a[0x4]: 00020a0a 9e c2 | | SUBA.W D2,A7 00020a0c 20 4f | O | MOVEA.L A7,A0 00020a0e 43 fa f8 20 |C | LEA.L 0x20230,A1 00020a12 70 0e |p | MOVEQ.L #0x0e,D0 00020a14 10 d9 | | MOVE.B (A1)+,(A0)+ 00020a16 51 c8 ff fc |Q | DBF D0,0x20a14 00020a1a 60 00 ff 64 |` d | BRA 0x20980 00020a1e switch@0x2095a[0x5]: 00020a1e 9e c6 | | SUBA.W D6,A7 00020a20 20 4f | O | MOVEA.L A7,A0 00020a22 43 fa f8 1c |C | LEA.L 0x20240,A1 00020a26 70 18 |p | MOVEQ.L #0x18,D0 00020a28 10 d9 | | MOVE.B (A1)+,(A0)+ 00020a2a 51 c8 ff fc |Q | DBF D0,0x20a28 00020a2e 59 4f |YO | SUBQ.L #0x4,A7 00020a30 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a34 3f 01 |? | MOVE.W D1,-(A7) 00020a36 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00020a3a 4e 92 |N | JSR (A2) 00020a3c 50 4f |PO | ADDQ.L #0x8,A7 00020a3e 28 5f |(_ | MOVEA.L (A7)+,A4 00020a40 de c6 | | ADDA.W D6,A7 00020a42 60 5a |`Z | BRA 0x20a9e 00020a44 switch@0x2095a[0x6]: 00020a44 41 fa f8 2a |A * | LEA.L 0x20270,A0 00020a48 70 0a |p | MOVEQ.L #0x0a,D0 00020a4a 3f 20 |? | MOVE.W -(A0),-(A7) 00020a4c 51 c8 ff fc |Q | DBF D0,0x20a4a 00020a50 59 4f |YO | SUBQ.L #0x4,A7 00020a52 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a56 3f 01 |? | MOVE.W D1,-(A7) 00020a58 3f 07 |? | MOVE.W D7,-(A7) 00020a5a 4e 92 |N | JSR (A2) 00020a5c 50 4f |PO | ADDQ.L #0x8,A7 00020a5e 28 5f |(_ | MOVEA.L (A7)+,A4 00020a60 de c7 | | ADDA.W D7,A7 00020a62 60 3a |`: | BRA 0x20a9e 00020a64 9e fc 00 14 | | SUBA.W #0x14,A7 00020a68 20 4f | O | MOVEA.L A7,A0 00020a6a 43 fa f8 04 |C | LEA.L 0x20270,A1 00020a6e 70 12 |p | MOVEQ.L #0x12,D0 00020a70 10 d9 | | MOVE.B (A1)+,(A0)+ 00020a72 51 c8 ff fc |Q | DBF D0,0x20a70 00020a76 51 4f |QO | SUBQ.L #0x8,A7 00020a78 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020a7c 3f 01 |? | MOVE.W D1,-(A7) 00020a7e 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00020a82 4e 92 |N | JSR (A2) 00020a84 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00020a88 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00020a8e 58 4f |XO | ADDQ.L #0x4,A7 00020a90 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020a96 50 4f |PO | ADDQ.L #0x8,A7 00020a98 28 5f |(_ | MOVEA.L (A7)+,A4 00020a9a de fc 00 14 | | ADDA.W #0x14,A7 00020a9e 2d 4c 00 0c |-L | MOVE.L A4,(A6+0xc) 00020aa2 4c df 17 ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A4 00020aa6 4e 5e |N^ | UNLK A6 00020aa8 4e 75 |Nu | RTS 00020aaa ; -------------------------------------------------------------------------------------- 00020aaa ; OMSI PASCAL Function 00020aaa ; <LVAR 0x008 1(w)> 00020aaa ; <LVAR -0x004 @ 1(r)> 00020aaa ; -------------------------------------------------------------------------------------- 00020aaa 4e 56 ff ea |NV | LINK.W A6,#0xffea 00020aae bf d5 | | CMPA.L (A5),A7 00020ab0 62 06 |b | BHI 0x20ab8 00020ab2 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020ab6 4e 76 |Nv | TRAPV 00020ab8 de fc 00 12 | | ADDA.W #0x12,A7 00020abc 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00020ac0 41 ee ff fc |A | LEA.L (A6-0x4),A0 00020ac4 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00020ac8 48 50 |HP | PEA.L (A0) 00020aca 4e b9 00 01 02 12 |N | JSR KC09_PortStatus(Port : Word; VAR b: Byte) 00020ad0 5c 4f |\O | ADDQ.L #0x6,A7 00020ad2 4a 10 |J | TST.B (A0) 00020ad4 67 ee |g | BEQ 0x20ac4 00020ad6 10 10 | | MOVE.B (A0),D0 00020ad8 48 80 |H | EXTB.W D0 00020ada 41 bc 00 06 |A | CHK.W #0x6,D0 00020ade 1d 40 00 08 | @ | MOVE.B D0,(A6+0x8) 00020ae2 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00020ae6 4e 5e |N^ | UNLK A6 00020ae8 4e 75 |Nu | RTS 00020aea ; -------------------------------------------------------------------------------------- 00020aea ; OMSI PASCAL Function 00020aea ; <LVAR 0x00c 2(w)> 00020aea ; <LVAR 0x008 4(r)> 00020aea ; -------------------------------------------------------------------------------------- 00020aea 4e 56 ff f2 |NV | LINK.W A6,#0xfff2 00020aee bf d5 | | CMPA.L (A5),A7 00020af0 62 06 |b | BHI 0x20af8 00020af2 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020af6 4e 76 |Nv | TRAPV 00020af8 de fc 00 0e | | ADDA.W #0xe,A7 00020afc 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00020b00 55 4f |UO | SUBQ.L #0x2,A7 00020b02 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020b06 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 00020b0c 58 4f |XO | ADDQ.L #0x4,A7 00020b0e 30 1f |0 | MOVE.W (A7)+,D0 00020b10 41 bc 00 ff |A | CHK.W #0xff,D0 00020b14 3d 40 00 0c |=@ | MOVE.W D0,(A6+0xc) 00020b18 4c df 00 01 |L | MOVEM.L (A7)+,D0 00020b1c 4e 5e |N^ | UNLK A6 00020b1e 4e 75 |Nu | RTS 00020b20 ; -------------------------------------------------------------------------------------- 00020b20 ; OMSI PASCAL Function 00020b20 ; <LVAR 0x008 4(r)> 00020b20 ; -------------------------------------------------------------------------------------- 00020b20 4e 56 ff c6 |NV | LINK.W A6,#0xffc6 00020b24 bf d5 | | CMPA.L (A5),A7 00020b26 62 06 |b | BHI 0x20b2e 00020b28 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020b2c 4e 76 |Nv | TRAPV 00020b2e de fc 00 3a | : | ADDA.W #0x3a,A7 00020b32 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00020b36 48 78 00 01 |Hx | PEA.L 0x1 00020b3a 4e b9 00 01 03 f4 |N | JSR SetConsoleConfig(a : Long) 00020b40 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00020b44 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00020b4a 9e fc 00 1a | | SUBA.W #0x1a,A7 00020b4e 20 4f | O | MOVEA.L A7,A0 00020b50 43 fa f7 32 |C 2 | LEA.L 0x20284,A1 00020b54 70 1c |p | MOVEQ.L #0x1c,D0 00020b56 10 d9 | | MOVE.B (A1)+,(A0)+ 00020b58 51 c8 ff fc |Q | DBF D0,0x20b56 00020b5c 59 4f |YO | SUBQ.L #0x4,A7 00020b5e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020b62 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020b66 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 00020b6a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020b70 50 4f |PO | ADDQ.L #0x8,A7 00020b72 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00020b78 de fc 00 20 | | ADDA.W #0x20,A7 00020b7c 42 17 |B | CLR.B (A7) 00020b7e 48 78 00 01 |Hx | PEA.L 0x1 00020b82 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020b88 5c 4f |\O | ADDQ.L #0x6,A7 00020b8a 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00020b8e 4e 5e |N^ | UNLK A6 00020b90 4e 75 |Nu | RTS 00020b92 ; -------------------------------------------------------------------------------------- 00020b92 ; OMSI PASCAL Function 00020b92 ; <LVAR 0x00c 4(r)> 00020b92 ; <LVAR 0x008 4(r)> 00020b92 ; <LVAR -0x002 @ 2(r)> 00020b92 ; <LVAR -0x004 @ 1(r)> 00020b92 ; -------------------------------------------------------------------------------------- 00020b92 4e 56 ff ca |NV | LINK.W A6,#0xffca 00020b96 bf d5 | | CMPA.L (A5),A7 00020b98 62 06 |b | BHI 0x20ba0 00020b9a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020b9e 4e 76 |Nv | TRAPV 00020ba0 de fc 00 2a | * | ADDA.W #0x2a,A7 00020ba4 48 e7 c3 80 |H | MOVEM.L A0+D7+D6+D1+D0,-(A7) 00020ba8 72 01 |r | MOVEQ.L #0x01,D1 00020baa 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020bae 42 10 |B | CLR.B (A0) 00020bb0 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00020bb4 7c 01 || | MOVEQ.L #0x01,D6 00020bb6 bc 97 | | CMP.L (A7),D6 00020bb8 6e 4c |nL | BGT 0x20c06 00020bba 7e 01 |~ | MOVEQ.L #0x01,D7 00020bbc 3f 01 |? | MOVE.W D1,-(A7) 00020bbe 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020bc2 4e b9 00 01 02 12 |N | JSR KC09_PortStatus(Port : Word; VAR b: Byte) 00020bc8 5c 4f |\O | ADDQ.L #0x6,A7 00020bca 10 2e ff fc | . | MOVE.B (A6-0x4),D0 00020bce b0 01 | | CMP.B D1,D0 00020bd0 66 26 |f& | BNE 0x20bf8 00020bd2 3f 01 |? | MOVE.W D1,-(A7) 00020bd4 48 6e ff fe |Hn | PEA.L (A6-0x2) 00020bd8 4e b9 00 01 02 0e |N | JSR KC07_PortGetChar(port : Word ; VAR ret : Word) 00020bde 5c 4f |\O | ADDQ.L #0x6,A7 00020be0 30 2e ff fe |0. | MOVE.W (A6-0x2),D0 00020be4 02 40 00 ff | @ | ANDI.W #0x00ff,D0 00020be8 0c 40 00 03 | @ | CMPI.W #0x0003,D0 00020bec 66 0a |f | BNE 0x20bf8 00020bee 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020bf2 10 81 | | MOVE.B D1,(A0) 00020bf4 58 4f |XO | ADDQ.L #0x4,A7 00020bf6 60 10 |` | BRA 0x20c08 00020bf8 52 87 |R | ADDQ.L #0x1,D7 00020bfa 0c 87 00 00 03 e8 | | CMPI.L #0x000003e8,D7 00020c00 6f ba |o | BLE 0x20bbc 00020c02 52 86 |R | ADDQ.L #0x1,D6 00020c04 68 b0 |h | BVC 0x20bb6 00020c06 58 4f |XO | ADDQ.L #0x4,A7 00020c08 4c df 01 c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0 00020c0c 4e 5e |N^ | UNLK A6 00020c0e 4e 75 |Nu | RTS 00020c10 ; -------------------------------------------------------------------------------------- 00020c10 ; OMSI PASCAL Function 00020c10 ; <LVAR 0x00c 4(rw)> 00020c10 ; <LVAR 0x008 4(r)> 00020c10 ; -------------------------------------------------------------------------------------- 00020c10 4e 56 ff ec |NV | LINK.W A6,#0xffec 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 14 | | ADDA.W #0x14,A7 00020c22 48 e7 00 80 |H | MOVEM.L A0,-(A7) 00020c26 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020c2a 48 78 00 3c |Hx < | PEA.L 0x3c 00020c2e 48 50 |HP | PEA.L (A0) 00020c30 4e ba ff 60 |N ` | JSR 0x20b92 00020c34 50 4f |PO | ADDQ.L #0x8,A7 00020c36 53 ae 00 0c |S | SUBQ.L #0x1,(A6+0xc) 00020c3a 4a 10 |J | TST.B (A0) 00020c3c 66 06 |f | BNE 0x20c44 00020c3e 4a ae 00 0c |J | TST.L (A6+0xc) 00020c42 66 e2 |f | BNE 0x20c26 00020c44 4c df 01 00 |L | MOVEM.L (A7)+,A0 00020c48 4e 5e |N^ | UNLK A6 00020c4a 4e 75 |Nu | RTS 00020c4c ; -------------------------------------------------------------------------------------- 00020c4c ; OMSI PASCAL Function 00020c4c ; <LVAR 0x008 4(r)> 00020c4c ; <LVAR -0x004 @ 1(r)> 00020c4c ; -------------------------------------------------------------------------------------- 00020c4c 4e 56 ff a0 |NV | LINK.W A6,#0xffa0 00020c50 bf d5 | | CMPA.L (A5),A7 00020c52 62 06 |b | BHI 0x20c5a 00020c54 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020c58 4e 76 |Nv | TRAPV 00020c5a de fc 00 58 | X | ADDA.W #0x58,A7 00020c5e 48 e7 f1 e0 |H | MOVEM.L A2+A1+A0+D7+D3+D2+D1+D0,-(A7) 00020c62 45 f9 00 01 03 d0 |E | LEA.L WriteConsoleChar(chr : char),A2 00020c68 72 01 |r | MOVEQ.L #0x01,D1 00020c6a 74 1b |t | MOVEQ.L #0x1b,D2 00020c6c 76 5b |v[ | MOVEQ.L #0x5b,D3 00020c6e 48 78 00 01 |Hx | PEA.L 0x1 00020c72 4e b9 00 01 03 f4 |N | JSR SetConsoleConfig(a : Long) 00020c78 58 4f |XO | ADDQ.L #0x4,A7 00020c7a 41 fa f6 44 |A D | LEA.L 0x202c0,A0 00020c7e 70 0e |p | MOVEQ.L #0x0e,D0 00020c80 3f 20 |? | MOVE.W -(A0),-(A7) 00020c82 51 c8 ff fc |Q | DBF D0,0x20c80 00020c86 51 4f |QO | SUBQ.L #0x8,A7 00020c88 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020c8c 3f 01 |? | MOVE.W D1,-(A7) 00020c8e 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00020c92 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020c98 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00020c9c 4e ba f9 12 |N | JSR 0x205b0 00020ca0 58 4f |XO | ADDQ.L #0x4,A7 00020ca2 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020ca8 50 4f |PO | ADDQ.L #0x8,A7 00020caa 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00020cb0 5d 4f |]O | SUBQ.L #0x6,A7 00020cb2 20 4f | O | MOVEA.L A7,A0 00020cb4 43 fa f6 0a |C | LEA.L 0x202c0,A1 00020cb8 70 26 |p& | MOVEQ.L #0x26,D0 00020cba 10 d9 | | MOVE.B (A1)+,(A0)+ 00020cbc 51 c8 ff fc |Q | DBF D0,0x20cba 00020cc0 59 4f |YO | SUBQ.L #0x4,A7 00020cc2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020cc6 3f 01 |? | MOVE.W D1,-(A7) 00020cc8 3f 3c 00 27 |?< ' | MOVE.W #0x27,-(A7) 00020ccc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020cd2 50 4f |PO | ADDQ.L #0x8,A7 00020cd4 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00020cda de fc 00 2c | , | ADDA.W #0x2c,A7 00020cde 48 78 00 25 |Hx % | PEA.L 0x25 00020ce2 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020ce6 4e ba ff 28 |N ( | JSR 0x20c10 00020cea 50 4f |PO | ADDQ.L #0x8,A7 00020cec 4a 2e ff fc |J. | TST.B (A6-0x4) 00020cf0 67 0e |g | BEQ 0x20d00 00020cf2 42 27 |B' | CLR.B -(A7) 00020cf4 48 78 00 01 |Hx | PEA.L 0x1 00020cf8 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020cfe 5c 4f |\O | ADDQ.L #0x6,A7 00020d00 7e 01 |~ | MOVEQ.L #0x01,D7 00020d02 1f 02 | | MOVE.B D2,-(A7) 00020d04 4e 92 |N | JSR (A2) 00020d06 1e 83 | | MOVE.B D3,(A7) 00020d08 4e 92 |N | JSR (A2) 00020d0a 1e bc 00 31 | 1 | MOVE.B #0x31,(A7) 00020d0e 4e 92 |N | JSR (A2) 00020d10 1e bc 00 41 | A | MOVE.B #0x41,(A7) 00020d14 4e 92 |N | JSR (A2) 00020d16 1e 82 | | MOVE.B D2,(A7) 00020d18 4e 92 |N | JSR (A2) 00020d1a 1e 83 | | MOVE.B D3,(A7) 00020d1c 4e 92 |N | JSR (A2) 00020d1e 1e bc 00 4b | K | MOVE.B #0x4b,(A7) 00020d22 4e 92 |N | JSR (A2) 00020d24 54 4f |TO | ADDQ.L #0x2,A7 00020d26 52 87 |R | ADDQ.L #0x1,D7 00020d28 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 00020d2e 6f d2 |o | BLE 0x20d02 00020d30 4c df 07 8f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D7+A0+A1+A2 00020d34 4e 5e |N^ | UNLK A6 00020d36 4e 75 |Nu | RTS 00020d38 ; -------------------------------------------------------------------------------------- 00020d38 ; OMSI PASCAL Function 00020d38 ; <LVAR -0x004 @> 00020d38 ; <LVAR -0x006 @> 00020d38 ; <LVAR -0x008 @ 1(r)> 00020d38 ; -------------------------------------------------------------------------------------- 00020d38 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00020d3c bf d5 | | CMPA.L (A5),A7 00020d3e 62 06 |b | BHI 0x20d46 00020d40 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020d44 4e 76 |Nv | TRAPV 00020d46 de fc 00 18 | | ADDA.W #0x18,A7 00020d4a 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00020d4e 41 ee ff f8 |A | LEA.L (A6-0x8),A0 00020d52 72 03 |r | MOVEQ.L #0x03,D1 00020d54 4e b9 00 01 02 16 |N | JSR KC0b 00020d5a 48 78 00 05 |Hx | PEA.L 0x5 00020d5e 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020d62 4e ba fe 2e |N . | JSR 0x20b92 00020d66 50 4f |PO | ADDQ.L #0x8,A7 00020d68 3f 01 |? | MOVE.W D1,-(A7) 00020d6a 48 50 |HP | PEA.L (A0) 00020d6c 4e b9 00 01 02 12 |N | JSR KC09_PortStatus(Port : Word; VAR b: Byte) 00020d72 5c 4f |\O | ADDQ.L #0x6,A7 00020d74 4a 10 |J | TST.B (A0) 00020d76 67 0e |g | BEQ 0x20d86 00020d78 3f 01 |? | MOVE.W D1,-(A7) 00020d7a 48 6e ff fa |Hn | PEA.L (A6-0x6) 00020d7e 4e b9 00 01 02 0e |N | JSR KC07_PortGetChar(port : Word ; VAR ret : Word) 00020d84 5c 4f |\O | ADDQ.L #0x6,A7 00020d86 10 10 | | MOVE.B (A0),D0 00020d88 0c 00 00 02 | | CMPI.B #0x02,D0 00020d8c 66 da |f | BNE 0x20d68 00020d8e 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00020d92 4e 5e |N^ | UNLK A6 00020d94 4e 75 |Nu | RTS 00020d96 ; -------------------------------------------------------------------------------------- 00020d96 ; OMSI PASCAL Function 00020d96 ; <LVAR -0x002 @ 1(r)> 00020d96 ; <LVAR -0x006 @ 4(r)> 00020d96 ; <LVAR -0x008 @ 2(rw)> 00020d96 ; <LVAR -0x00a @ 1(rw)> 00020d96 ; <LVAR -0x00c @ 2(rw)> 00020d96 ; -------------------------------------------------------------------------------------- 00020d96 4e 56 ff 72 |NV r | LINK.W A6,#0xff72 00020d9a bf d5 | | CMPA.L (A5),A7 00020d9c 62 06 |b | BHI 0x20da4 00020d9e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020da2 4e 76 |Nv | TRAPV 00020da4 de fc 00 82 | | ADDA.W #0x82,A7 00020da8 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020dac 45 ee ff f4 |E | LEA.L (A6-0xc),A2 00020db0 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00020db6 49 ee ff f6 |I | LEA.L (A6-0xa),A4 00020dba 76 01 |v | MOVEQ.L #0x01,D3 00020dbc 78 03 |x | MOVEQ.L #0x03,D4 00020dbe 3a 3c 00 ff |:< | MOVE.W #0xff,D5 00020dc2 7c 12 || | MOVEQ.L #0x12,D6 00020dc4 7e 06 |~ | MOVEQ.L #0x06,D7 00020dc6 48 78 00 01 |Hx | PEA.L 0x1 00020dca 48 6e ff fe |Hn | PEA.L (A6-0x2) 00020dce 4e ba fd c2 |N | JSR 0x20b92 00020dd2 50 4f |PO | ADDQ.L #0x8,A7 00020dd4 3f 04 |? | MOVE.W D4,-(A7) 00020dd6 48 54 |HT | PEA.L (A4) 00020dd8 4e b9 00 01 02 12 |N | JSR KC09_PortStatus(Port : Word; VAR b: Byte) 00020dde 5c 4f |\O | ADDQ.L #0x6,A7 00020de0 4a 14 |J | TST.B (A4) 00020de2 67 0c |g | BEQ 0x20df0 00020de4 3f 04 |? | MOVE.W D4,-(A7) 00020de6 48 52 |HR | PEA.L (A2) 00020de8 4e b9 00 01 02 0e |N | JSR KC07_PortGetChar(port : Word ; VAR ret : Word) 00020dee 5c 4f |\O | ADDQ.L #0x6,A7 00020df0 4a 14 |J | TST.B (A4) 00020df2 66 e0 |f | BNE 0x20dd4 00020df4 48 6e ff fa |Hn | PEA.L (A6-0x6) 00020df8 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00020dfe 58 4f |XO | ADDQ.L #0x4,A7 00020e00 20 6e ff fa | n | MOVEA.L (A6-0x6),A0 00020e04 30 bc 00 05 |0 | MOVE.W #0x5,(A0) 00020e08 55 4f |UO | SUBQ.L #0x2,A7 00020e0a 48 78 00 84 |Hx | PEA.L 0x84 00020e0e 4e ba fc da |N | JSR 0x20aea 00020e12 58 4f |XO | ADDQ.L #0x4,A7 00020e14 30 1f |0 | MOVE.W (A7)+,D0 00020e16 41 85 |A | CHK.W D5,D0 00020e18 11 40 00 02 | @ | MOVE.B D0,(A0+0x2) 00020e1c 55 4f |UO | SUBQ.L #0x2,A7 00020e1e 48 78 00 85 |Hx | PEA.L 0x85 00020e22 4e ba fc c6 |N | JSR 0x20aea 00020e26 58 4f |XO | ADDQ.L #0x4,A7 00020e28 30 1f |0 | MOVE.W (A7)+,D0 00020e2a 41 85 |A | CHK.W D5,D0 00020e2c 11 40 00 03 | @ | MOVE.B D0,(A0+0x3) 00020e30 55 4f |UO | SUBQ.L #0x2,A7 00020e32 48 78 00 86 |Hx | PEA.L 0x86 00020e36 4e ba fc b2 |N | JSR 0x20aea 00020e3a 58 4f |XO | ADDQ.L #0x4,A7 00020e3c 30 1f |0 | MOVE.W (A7)+,D0 00020e3e 41 85 |A | CHK.W D5,D0 00020e40 11 40 00 04 | @ | MOVE.B D0,(A0+0x4) 00020e44 55 4f |UO | SUBQ.L #0x2,A7 00020e46 48 78 00 87 |Hx | PEA.L 0x87 00020e4a 4e ba fc 9e |N | JSR 0x20aea 00020e4e 58 4f |XO | ADDQ.L #0x4,A7 00020e50 30 1f |0 | MOVE.W (A7)+,D0 00020e52 41 85 |A | CHK.W D5,D0 00020e54 11 40 00 05 | @ | MOVE.B D0,(A0+0x5) 00020e58 42 28 00 06 |B( | CLR.B (A0+0x6) 00020e5c 3f 04 |? | MOVE.W D4,-(A7) 00020e5e 2f 2e ff fa |/. | MOVE.L (A6-0x6),-(A7) 00020e62 4e b9 00 01 02 14 |N | JSR KC0a(a: Word; b: String) 00020e68 5c 4f |\O | ADDQ.L #0x6,A7 00020e6a 48 6e ff fa |Hn | PEA.L (A6-0x6) 00020e6e 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020e74 54 4f |TO | ADDQ.L #0x2,A7 00020e76 4e ba fc 32 |N 2 | JSR 0x20aaa 00020e7a 10 1f | | MOVE.B (A7)+,D0 00020e7c 48 80 |H | EXTB.W D0 00020e7e 41 87 |A | CHK.W D7,D0 00020e80 18 80 | | MOVE.B D0,(A4) 00020e82 3f 04 |? | MOVE.W D4,-(A7) 00020e84 48 52 |HR | PEA.L (A2) 00020e86 4e b9 00 01 02 0e |N | JSR KC07_PortGetChar(port : Word ; VAR ret : Word) 00020e8c 5c 4f |\O | ADDQ.L #0x6,A7 00020e8e cb 52 | R | AND.W D5,(A2) 00020e90 b0 04 | | CMP.B D4,D0 00020e92 66 00 02 a0 |f | BNE 0x21134 00020e96 30 12 |0 | MOVE.W (A2),D0 00020e98 b0 45 | E | CMP.W D5,D0 00020e9a 62 00 02 5c |b \ | BHI switch@0x20ea0[0x6] 00020e9e d0 40 | @ | ADD.W D0,D0 00020ea0 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00020ea8 02 00 | | .CONST 0x200 ; [0x0] -> 0x210a8 00020eaa 02 0e | | .CONST 0x20e ; [0x1] -> 0x210b6 00020eac 02 20 | | .CONST 0x220 ; [0x2] -> 0x210c8 00020eae 02 24 | $ | .CONST 0x224 ; [0x3] -> 0x210cc 00020eb0 02 26 | & | .CONST 0x226 ; [0x4] -> 0x210ce 00020eb2 02 34 | 4 | .CONST 0x234 ; [0x5] -> 0x210dc 00020eb4 02 50 | P | .CONST 0x250 ; [0x6] -> 0x210f8 00020eb6 02 50 | P | .CONST 0x250 ; [0x7] -> 0x210f8 00020eb8 02 50 | P | .CONST 0x250 ; [0x8] -> 0x210f8 00020eba 02 50 | P | .CONST 0x250 ; [0x9] -> 0x210f8 00020ebc 02 50 | P | .CONST 0x250 ; [0xa] -> 0x210f8 00020ebe 02 50 | P | .CONST 0x250 ; [0xb] -> 0x210f8 00020ec0 02 50 | P | .CONST 0x250 ; [0xc] -> 0x210f8 00020ec2 02 50 | P | .CONST 0x250 ; [0xd] -> 0x210f8 00020ec4 02 50 | P | .CONST 0x250 ; [0xe] -> 0x210f8 00020ec6 02 50 | P | .CONST 0x250 ; [0xf] -> 0x210f8 00020ec8 02 50 | P | .CONST 0x250 ; [0x10] -> 0x210f8 00020eca 02 50 | P | .CONST 0x250 ; [0x11] -> 0x210f8 00020ecc 02 50 | P | .CONST 0x250 ; [0x12] -> 0x210f8 00020ece 02 50 | P | .CONST 0x250 ; [0x13] -> 0x210f8 00020ed0 02 50 | P | .CONST 0x250 ; [0x14] -> 0x210f8 00020ed2 02 50 | P | .CONST 0x250 ; [0x15] -> 0x210f8 00020ed4 02 50 | P | .CONST 0x250 ; [0x16] -> 0x210f8 00020ed6 02 50 | P | .CONST 0x250 ; [0x17] -> 0x210f8 00020ed8 02 50 | P | .CONST 0x250 ; [0x18] -> 0x210f8 00020eda 02 50 | P | .CONST 0x250 ; [0x19] -> 0x210f8 00020edc 02 50 | P | .CONST 0x250 ; [0x1a] -> 0x210f8 00020ede 02 50 | P | .CONST 0x250 ; [0x1b] -> 0x210f8 00020ee0 02 50 | P | .CONST 0x250 ; [0x1c] -> 0x210f8 00020ee2 02 50 | P | .CONST 0x250 ; [0x1d] -> 0x210f8 00020ee4 02 50 | P | .CONST 0x250 ; [0x1e] -> 0x210f8 00020ee6 02 50 | P | .CONST 0x250 ; [0x1f] -> 0x210f8 00020ee8 02 50 | P | .CONST 0x250 ; [0x20] -> 0x210f8 00020eea 02 50 | P | .CONST 0x250 ; [0x21] -> 0x210f8 00020eec 02 50 | P | .CONST 0x250 ; [0x22] -> 0x210f8 00020eee 02 50 | P | .CONST 0x250 ; [0x23] -> 0x210f8 00020ef0 02 50 | P | .CONST 0x250 ; [0x24] -> 0x210f8 00020ef2 02 50 | P | .CONST 0x250 ; [0x25] -> 0x210f8 00020ef4 02 50 | P | .CONST 0x250 ; [0x26] -> 0x210f8 00020ef6 02 50 | P | .CONST 0x250 ; [0x27] -> 0x210f8 00020ef8 02 50 | P | .CONST 0x250 ; [0x28] -> 0x210f8 00020efa 02 50 | P | .CONST 0x250 ; [0x29] -> 0x210f8 00020efc 02 50 | P | .CONST 0x250 ; [0x2a] -> 0x210f8 00020efe 02 50 | P | .CONST 0x250 ; [0x2b] -> 0x210f8 00020f00 02 50 | P | .CONST 0x250 ; [0x2c] -> 0x210f8 00020f02 02 50 | P | .CONST 0x250 ; [0x2d] -> 0x210f8 00020f04 02 50 | P | .CONST 0x250 ; [0x2e] -> 0x210f8 00020f06 02 50 | P | .CONST 0x250 ; [0x2f] -> 0x210f8 00020f08 02 50 | P | .CONST 0x250 ; [0x30] -> 0x210f8 00020f0a 02 50 | P | .CONST 0x250 ; [0x31] -> 0x210f8 00020f0c 02 50 | P | .CONST 0x250 ; [0x32] -> 0x210f8 00020f0e 02 50 | P | .CONST 0x250 ; [0x33] -> 0x210f8 00020f10 02 50 | P | .CONST 0x250 ; [0x34] -> 0x210f8 00020f12 02 50 | P | .CONST 0x250 ; [0x35] -> 0x210f8 00020f14 02 50 | P | .CONST 0x250 ; [0x36] -> 0x210f8 00020f16 02 50 | P | .CONST 0x250 ; [0x37] -> 0x210f8 00020f18 02 50 | P | .CONST 0x250 ; [0x38] -> 0x210f8 00020f1a 02 50 | P | .CONST 0x250 ; [0x39] -> 0x210f8 00020f1c 02 50 | P | .CONST 0x250 ; [0x3a] -> 0x210f8 00020f1e 02 50 | P | .CONST 0x250 ; [0x3b] -> 0x210f8 00020f20 02 50 | P | .CONST 0x250 ; [0x3c] -> 0x210f8 00020f22 02 50 | P | .CONST 0x250 ; [0x3d] -> 0x210f8 00020f24 02 50 | P | .CONST 0x250 ; [0x3e] -> 0x210f8 00020f26 02 50 | P | .CONST 0x250 ; [0x3f] -> 0x210f8 00020f28 02 50 | P | .CONST 0x250 ; [0x40] -> 0x210f8 00020f2a 02 50 | P | .CONST 0x250 ; [0x41] -> 0x210f8 00020f2c 02 50 | P | .CONST 0x250 ; [0x42] -> 0x210f8 00020f2e 02 50 | P | .CONST 0x250 ; [0x43] -> 0x210f8 00020f30 02 50 | P | .CONST 0x250 ; [0x44] -> 0x210f8 00020f32 02 50 | P | .CONST 0x250 ; [0x45] -> 0x210f8 00020f34 02 50 | P | .CONST 0x250 ; [0x46] -> 0x210f8 00020f36 02 50 | P | .CONST 0x250 ; [0x47] -> 0x210f8 00020f38 02 50 | P | .CONST 0x250 ; [0x48] -> 0x210f8 00020f3a 02 50 | P | .CONST 0x250 ; [0x49] -> 0x210f8 00020f3c 02 50 | P | .CONST 0x250 ; [0x4a] -> 0x210f8 00020f3e 02 50 | P | .CONST 0x250 ; [0x4b] -> 0x210f8 00020f40 02 50 | P | .CONST 0x250 ; [0x4c] -> 0x210f8 00020f42 02 50 | P | .CONST 0x250 ; [0x4d] -> 0x210f8 00020f44 02 50 | P | .CONST 0x250 ; [0x4e] -> 0x210f8 00020f46 02 50 | P | .CONST 0x250 ; [0x4f] -> 0x210f8 00020f48 02 50 | P | .CONST 0x250 ; [0x50] -> 0x210f8 00020f4a 02 50 | P | .CONST 0x250 ; [0x51] -> 0x210f8 00020f4c 02 50 | P | .CONST 0x250 ; [0x52] -> 0x210f8 00020f4e 02 50 | P | .CONST 0x250 ; [0x53] -> 0x210f8 00020f50 02 50 | P | .CONST 0x250 ; [0x54] -> 0x210f8 00020f52 02 50 | P | .CONST 0x250 ; [0x55] -> 0x210f8 00020f54 02 50 | P | .CONST 0x250 ; [0x56] -> 0x210f8 00020f56 02 50 | P | .CONST 0x250 ; [0x57] -> 0x210f8 00020f58 02 50 | P | .CONST 0x250 ; [0x58] -> 0x210f8 00020f5a 02 50 | P | .CONST 0x250 ; [0x59] -> 0x210f8 00020f5c 02 50 | P | .CONST 0x250 ; [0x5a] -> 0x210f8 00020f5e 02 50 | P | .CONST 0x250 ; [0x5b] -> 0x210f8 00020f60 02 50 | P | .CONST 0x250 ; [0x5c] -> 0x210f8 00020f62 02 50 | P | .CONST 0x250 ; [0x5d] -> 0x210f8 00020f64 02 50 | P | .CONST 0x250 ; [0x5e] -> 0x210f8 00020f66 02 50 | P | .CONST 0x250 ; [0x5f] -> 0x210f8 00020f68 02 50 | P | .CONST 0x250 ; [0x60] -> 0x210f8 00020f6a 02 50 | P | .CONST 0x250 ; [0x61] -> 0x210f8 00020f6c 02 50 | P | .CONST 0x250 ; [0x62] -> 0x210f8 00020f6e 02 50 | P | .CONST 0x250 ; [0x63] -> 0x210f8 00020f70 02 50 | P | .CONST 0x250 ; [0x64] -> 0x210f8 00020f72 02 50 | P | .CONST 0x250 ; [0x65] -> 0x210f8 00020f74 02 50 | P | .CONST 0x250 ; [0x66] -> 0x210f8 00020f76 02 50 | P | .CONST 0x250 ; [0x67] -> 0x210f8 00020f78 02 50 | P | .CONST 0x250 ; [0x68] -> 0x210f8 00020f7a 02 50 | P | .CONST 0x250 ; [0x69] -> 0x210f8 00020f7c 02 50 | P | .CONST 0x250 ; [0x6a] -> 0x210f8 00020f7e 02 50 | P | .CONST 0x250 ; [0x6b] -> 0x210f8 00020f80 02 50 | P | .CONST 0x250 ; [0x6c] -> 0x210f8 00020f82 02 50 | P | .CONST 0x250 ; [0x6d] -> 0x210f8 00020f84 02 50 | P | .CONST 0x250 ; [0x6e] -> 0x210f8 00020f86 02 50 | P | .CONST 0x250 ; [0x6f] -> 0x210f8 00020f88 02 50 | P | .CONST 0x250 ; [0x70] -> 0x210f8 00020f8a 02 50 | P | .CONST 0x250 ; [0x71] -> 0x210f8 00020f8c 02 50 | P | .CONST 0x250 ; [0x72] -> 0x210f8 00020f8e 02 50 | P | .CONST 0x250 ; [0x73] -> 0x210f8 00020f90 02 50 | P | .CONST 0x250 ; [0x74] -> 0x210f8 00020f92 02 50 | P | .CONST 0x250 ; [0x75] -> 0x210f8 00020f94 02 50 | P | .CONST 0x250 ; [0x76] -> 0x210f8 00020f96 02 50 | P | .CONST 0x250 ; [0x77] -> 0x210f8 00020f98 02 50 | P | .CONST 0x250 ; [0x78] -> 0x210f8 00020f9a 02 50 | P | .CONST 0x250 ; [0x79] -> 0x210f8 00020f9c 02 50 | P | .CONST 0x250 ; [0x7a] -> 0x210f8 00020f9e 02 50 | P | .CONST 0x250 ; [0x7b] -> 0x210f8 00020fa0 02 50 | P | .CONST 0x250 ; [0x7c] -> 0x210f8 00020fa2 02 50 | P | .CONST 0x250 ; [0x7d] -> 0x210f8 00020fa4 02 50 | P | .CONST 0x250 ; [0x7e] -> 0x210f8 00020fa6 02 50 | P | .CONST 0x250 ; [0x7f] -> 0x210f8 00020fa8 02 50 | P | .CONST 0x250 ; [0x80] -> 0x210f8 00020faa 02 50 | P | .CONST 0x250 ; [0x81] -> 0x210f8 00020fac 02 50 | P | .CONST 0x250 ; [0x82] -> 0x210f8 00020fae 02 50 | P | .CONST 0x250 ; [0x83] -> 0x210f8 00020fb0 02 50 | P | .CONST 0x250 ; [0x84] -> 0x210f8 00020fb2 02 50 | P | .CONST 0x250 ; [0x85] -> 0x210f8 00020fb4 02 50 | P | .CONST 0x250 ; [0x86] -> 0x210f8 00020fb6 02 50 | P | .CONST 0x250 ; [0x87] -> 0x210f8 00020fb8 02 50 | P | .CONST 0x250 ; [0x88] -> 0x210f8 00020fba 02 50 | P | .CONST 0x250 ; [0x89] -> 0x210f8 00020fbc 02 50 | P | .CONST 0x250 ; [0x8a] -> 0x210f8 00020fbe 02 50 | P | .CONST 0x250 ; [0x8b] -> 0x210f8 00020fc0 02 50 | P | .CONST 0x250 ; [0x8c] -> 0x210f8 00020fc2 02 50 | P | .CONST 0x250 ; [0x8d] -> 0x210f8 00020fc4 02 50 | P | .CONST 0x250 ; [0x8e] -> 0x210f8 00020fc6 02 50 | P | .CONST 0x250 ; [0x8f] -> 0x210f8 00020fc8 02 50 | P | .CONST 0x250 ; [0x90] -> 0x210f8 00020fca 02 50 | P | .CONST 0x250 ; [0x91] -> 0x210f8 00020fcc 02 50 | P | .CONST 0x250 ; [0x92] -> 0x210f8 00020fce 02 50 | P | .CONST 0x250 ; [0x93] -> 0x210f8 00020fd0 02 50 | P | .CONST 0x250 ; [0x94] -> 0x210f8 00020fd2 02 50 | P | .CONST 0x250 ; [0x95] -> 0x210f8 00020fd4 02 50 | P | .CONST 0x250 ; [0x96] -> 0x210f8 00020fd6 02 50 | P | .CONST 0x250 ; [0x97] -> 0x210f8 00020fd8 02 50 | P | .CONST 0x250 ; [0x98] -> 0x210f8 00020fda 02 50 | P | .CONST 0x250 ; [0x99] -> 0x210f8 00020fdc 02 50 | P | .CONST 0x250 ; [0x9a] -> 0x210f8 00020fde 02 50 | P | .CONST 0x250 ; [0x9b] -> 0x210f8 00020fe0 02 50 | P | .CONST 0x250 ; [0x9c] -> 0x210f8 00020fe2 02 50 | P | .CONST 0x250 ; [0x9d] -> 0x210f8 00020fe4 02 50 | P | .CONST 0x250 ; [0x9e] -> 0x210f8 00020fe6 02 50 | P | .CONST 0x250 ; [0x9f] -> 0x210f8 00020fe8 02 50 | P | .CONST 0x250 ; [0xa0] -> 0x210f8 00020fea 02 50 | P | .CONST 0x250 ; [0xa1] -> 0x210f8 00020fec 02 50 | P | .CONST 0x250 ; [0xa2] -> 0x210f8 00020fee 02 50 | P | .CONST 0x250 ; [0xa3] -> 0x210f8 00020ff0 02 50 | P | .CONST 0x250 ; [0xa4] -> 0x210f8 00020ff2 02 50 | P | .CONST 0x250 ; [0xa5] -> 0x210f8 00020ff4 02 50 | P | .CONST 0x250 ; [0xa6] -> 0x210f8 00020ff6 02 50 | P | .CONST 0x250 ; [0xa7] -> 0x210f8 00020ff8 02 50 | P | .CONST 0x250 ; [0xa8] -> 0x210f8 00020ffa 02 50 | P | .CONST 0x250 ; [0xa9] -> 0x210f8 00020ffc 02 50 | P | .CONST 0x250 ; [0xaa] -> 0x210f8 00020ffe 02 50 | P | .CONST 0x250 ; [0xab] -> 0x210f8 00021000 02 50 | P | .CONST 0x250 ; [0xac] -> 0x210f8 00021002 02 50 | P | .CONST 0x250 ; [0xad] -> 0x210f8 00021004 02 50 | P | .CONST 0x250 ; [0xae] -> 0x210f8 00021006 02 50 | P | .CONST 0x250 ; [0xaf] -> 0x210f8 00021008 02 50 | P | .CONST 0x250 ; [0xb0] -> 0x210f8 0002100a 02 50 | P | .CONST 0x250 ; [0xb1] -> 0x210f8 0002100c 02 50 | P | .CONST 0x250 ; [0xb2] -> 0x210f8 0002100e 02 50 | P | .CONST 0x250 ; [0xb3] -> 0x210f8 00021010 02 50 | P | .CONST 0x250 ; [0xb4] -> 0x210f8 00021012 02 50 | P | .CONST 0x250 ; [0xb5] -> 0x210f8 00021014 02 50 | P | .CONST 0x250 ; [0xb6] -> 0x210f8 00021016 02 50 | P | .CONST 0x250 ; [0xb7] -> 0x210f8 00021018 02 50 | P | .CONST 0x250 ; [0xb8] -> 0x210f8 0002101a 02 50 | P | .CONST 0x250 ; [0xb9] -> 0x210f8 0002101c 02 50 | P | .CONST 0x250 ; [0xba] -> 0x210f8 0002101e 02 50 | P | .CONST 0x250 ; [0xbb] -> 0x210f8 00021020 02 50 | P | .CONST 0x250 ; [0xbc] -> 0x210f8 00021022 02 50 | P | .CONST 0x250 ; [0xbd] -> 0x210f8 00021024 02 50 | P | .CONST 0x250 ; [0xbe] -> 0x210f8 00021026 02 50 | P | .CONST 0x250 ; [0xbf] -> 0x210f8 00021028 02 50 | P | .CONST 0x250 ; [0xc0] -> 0x210f8 0002102a 02 50 | P | .CONST 0x250 ; [0xc1] -> 0x210f8 0002102c 02 50 | P | .CONST 0x250 ; [0xc2] -> 0x210f8 0002102e 02 50 | P | .CONST 0x250 ; [0xc3] -> 0x210f8 00021030 02 50 | P | .CONST 0x250 ; [0xc4] -> 0x210f8 00021032 02 50 | P | .CONST 0x250 ; [0xc5] -> 0x210f8 00021034 02 50 | P | .CONST 0x250 ; [0xc6] -> 0x210f8 00021036 02 50 | P | .CONST 0x250 ; [0xc7] -> 0x210f8 00021038 02 50 | P | .CONST 0x250 ; [0xc8] -> 0x210f8 0002103a 02 50 | P | .CONST 0x250 ; [0xc9] -> 0x210f8 0002103c 02 50 | P | .CONST 0x250 ; [0xca] -> 0x210f8 0002103e 02 50 | P | .CONST 0x250 ; [0xcb] -> 0x210f8 00021040 02 50 | P | .CONST 0x250 ; [0xcc] -> 0x210f8 00021042 02 50 | P | .CONST 0x250 ; [0xcd] -> 0x210f8 00021044 02 50 | P | .CONST 0x250 ; [0xce] -> 0x210f8 00021046 02 50 | P | .CONST 0x250 ; [0xcf] -> 0x210f8 00021048 02 50 | P | .CONST 0x250 ; [0xd0] -> 0x210f8 0002104a 02 50 | P | .CONST 0x250 ; [0xd1] -> 0x210f8 0002104c 02 50 | P | .CONST 0x250 ; [0xd2] -> 0x210f8 0002104e 02 50 | P | .CONST 0x250 ; [0xd3] -> 0x210f8 00021050 02 50 | P | .CONST 0x250 ; [0xd4] -> 0x210f8 00021052 02 50 | P | .CONST 0x250 ; [0xd5] -> 0x210f8 00021054 02 50 | P | .CONST 0x250 ; [0xd6] -> 0x210f8 00021056 02 50 | P | .CONST 0x250 ; [0xd7] -> 0x210f8 00021058 02 50 | P | .CONST 0x250 ; [0xd8] -> 0x210f8 0002105a 02 50 | P | .CONST 0x250 ; [0xd9] -> 0x210f8 0002105c 02 50 | P | .CONST 0x250 ; [0xda] -> 0x210f8 0002105e 02 50 | P | .CONST 0x250 ; [0xdb] -> 0x210f8 00021060 02 50 | P | .CONST 0x250 ; [0xdc] -> 0x210f8 00021062 02 50 | P | .CONST 0x250 ; [0xdd] -> 0x210f8 00021064 02 50 | P | .CONST 0x250 ; [0xde] -> 0x210f8 00021066 02 50 | P | .CONST 0x250 ; [0xdf] -> 0x210f8 00021068 02 50 | P | .CONST 0x250 ; [0xe0] -> 0x210f8 0002106a 02 50 | P | .CONST 0x250 ; [0xe1] -> 0x210f8 0002106c 02 50 | P | .CONST 0x250 ; [0xe2] -> 0x210f8 0002106e 02 50 | P | .CONST 0x250 ; [0xe3] -> 0x210f8 00021070 02 50 | P | .CONST 0x250 ; [0xe4] -> 0x210f8 00021072 02 50 | P | .CONST 0x250 ; [0xe5] -> 0x210f8 00021074 02 50 | P | .CONST 0x250 ; [0xe6] -> 0x210f8 00021076 02 50 | P | .CONST 0x250 ; [0xe7] -> 0x210f8 00021078 02 50 | P | .CONST 0x250 ; [0xe8] -> 0x210f8 0002107a 02 50 | P | .CONST 0x250 ; [0xe9] -> 0x210f8 0002107c 02 50 | P | .CONST 0x250 ; [0xea] -> 0x210f8 0002107e 02 50 | P | .CONST 0x250 ; [0xeb] -> 0x210f8 00021080 02 50 | P | .CONST 0x250 ; [0xec] -> 0x210f8 00021082 02 50 | P | .CONST 0x250 ; [0xed] -> 0x210f8 00021084 02 50 | P | .CONST 0x250 ; [0xee] -> 0x210f8 00021086 02 50 | P | .CONST 0x250 ; [0xef] -> 0x210f8 00021088 02 50 | P | .CONST 0x250 ; [0xf0] -> 0x210f8 0002108a 02 50 | P | .CONST 0x250 ; [0xf1] -> 0x210f8 0002108c 02 50 | P | .CONST 0x250 ; [0xf2] -> 0x210f8 0002108e 02 50 | P | .CONST 0x250 ; [0xf3] -> 0x210f8 00021090 02 50 | P | .CONST 0x250 ; [0xf4] -> 0x210f8 00021092 02 50 | P | .CONST 0x250 ; [0xf5] -> 0x210f8 00021094 02 50 | P | .CONST 0x250 ; [0xf6] -> 0x210f8 00021096 02 50 | P | .CONST 0x250 ; [0xf7] -> 0x210f8 00021098 02 50 | P | .CONST 0x250 ; [0xf8] -> 0x210f8 0002109a 02 50 | P | .CONST 0x250 ; [0xf9] -> 0x210f8 0002109c 02 50 | P | .CONST 0x250 ; [0xfa] -> 0x210f8 0002109e 02 50 | P | .CONST 0x250 ; [0xfb] -> 0x210f8 000210a0 02 50 | P | .CONST 0x250 ; [0xfc] -> 0x210f8 000210a2 02 50 | P | .CONST 0x250 ; [0xfd] -> 0x210f8 000210a4 02 50 | P | .CONST 0x250 ; [0xfe] -> 0x210f8 000210a6 02 42 | B | .CONST 0x242 ; [0xff] -> 0x210ea 000210a8 switch@0x20ea0[0x0]: 000210a8 41 fa f2 5c |A \ | LEA.L 0x20306,A0 000210ac 70 0e |p | MOVEQ.L #0x0e,D0 000210ae 3f 20 |? | MOVE.W -(A0),-(A7) 000210b0 51 c8 ff fc |Q | DBF D0,0x210ae 000210b4 60 4e |`N | BRA 0x21104 000210b6 switch@0x20ea0[0x1]: 000210b6 42 80 |B | CLR.L D0 000210b8 30 12 |0 | MOVE.W (A2),D0 000210ba 2f 00 |/ | MOVE.L D0,-(A7) 000210bc 4e ba fb 8e |N | JSR 0x20c4c 000210c0 58 4f |XO | ADDQ.L #0x4,A7 000210c2 60 00 03 24 |` $ | BRA 0x213e8 000210c6 60 68 |`h | .XXX[0x2] 000210c8 switch@0x20ea0[0x2]: 000210c8 60 ec |` | BRA switch@0x20ea0[0x1] 000210ca 60 64 |`d | .XXX[0x2] 000210cc switch@0x20ea0[0x3]: 000210cc 60 fa |` | BRA switch@0x20ea0[0x2] 000210ce switch@0x20ea0[0x4]: 000210ce 41 fa f2 36 |A 6 | LEA.L 0x20306,A0 000210d2 70 0e |p | MOVEQ.L #0x0e,D0 000210d4 3f 20 |? | MOVE.W -(A0),-(A7) 000210d6 51 c8 ff fc |Q | DBF D0,0x210d4 000210da 60 28 |`( | BRA 0x21104 000210dc switch@0x20ea0[0x5]: 000210dc 41 fa f2 28 |A ( | LEA.L 0x20306,A0 000210e0 70 0e |p | MOVEQ.L #0x0e,D0 000210e2 3f 20 |? | MOVE.W -(A0),-(A7) 000210e4 51 c8 ff fc |Q | DBF D0,0x210e2 000210e8 60 1a |` | BRA 0x21104 000210ea switch@0x20ea0[0xff]: 000210ea 41 fa f2 1a |A | LEA.L 0x20306,A0 000210ee 70 0e |p | MOVEQ.L #0x0e,D0 000210f0 3f 20 |? | MOVE.W -(A0),-(A7) 000210f2 51 c8 ff fc |Q | DBF D0,0x210f0 000210f6 60 0c |` | BRA 0x21104 000210f8 switch@0x20ea0[0x10]: 000210f8 switch@0x20ea0[0x11]: 000210f8 switch@0x20ea0[0x12]: 000210f8 switch@0x20ea0[0x13]: 000210f8 switch@0x20ea0[0x14]: 000210f8 switch@0x20ea0[0x15]: 000210f8 switch@0x20ea0[0x16]: 000210f8 switch@0x20ea0[0x17]: 000210f8 switch@0x20ea0[0x18]: 000210f8 switch@0x20ea0[0x19]: 000210f8 switch@0x20ea0[0x1a]: 000210f8 switch@0x20ea0[0x1b]: 000210f8 switch@0x20ea0[0x1c]: 000210f8 switch@0x20ea0[0x1d]: 000210f8 switch@0x20ea0[0x1e]: 000210f8 switch@0x20ea0[0x1f]: 000210f8 switch@0x20ea0[0x20]: 000210f8 switch@0x20ea0[0x21]: 000210f8 switch@0x20ea0[0x22]: 000210f8 switch@0x20ea0[0x23]: 000210f8 switch@0x20ea0[0x24]: 000210f8 switch@0x20ea0[0x25]: 000210f8 switch@0x20ea0[0x26]: 000210f8 switch@0x20ea0[0x27]: 000210f8 switch@0x20ea0[0x28]: 000210f8 switch@0x20ea0[0x29]: 000210f8 switch@0x20ea0[0x2a]: 000210f8 switch@0x20ea0[0x2b]: 000210f8 switch@0x20ea0[0x2c]: 000210f8 switch@0x20ea0[0x2d]: 000210f8 switch@0x20ea0[0x2e]: 000210f8 switch@0x20ea0[0x2f]: 000210f8 switch@0x20ea0[0x30]: 000210f8 switch@0x20ea0[0x31]: 000210f8 switch@0x20ea0[0x32]: 000210f8 switch@0x20ea0[0x33]: 000210f8 switch@0x20ea0[0x34]: 000210f8 switch@0x20ea0[0x35]: 000210f8 switch@0x20ea0[0x36]: 000210f8 switch@0x20ea0[0x37]: 000210f8 switch@0x20ea0[0x38]: 000210f8 switch@0x20ea0[0x39]: 000210f8 switch@0x20ea0[0x3a]: 000210f8 switch@0x20ea0[0x3b]: 000210f8 switch@0x20ea0[0x3c]: 000210f8 switch@0x20ea0[0x3d]: 000210f8 switch@0x20ea0[0x3e]: 000210f8 switch@0x20ea0[0x3f]: 000210f8 switch@0x20ea0[0x40]: 000210f8 switch@0x20ea0[0x41]: 000210f8 switch@0x20ea0[0x42]: 000210f8 switch@0x20ea0[0x43]: 000210f8 switch@0x20ea0[0x44]: 000210f8 switch@0x20ea0[0x45]: 000210f8 switch@0x20ea0[0x46]: 000210f8 switch@0x20ea0[0x47]: 000210f8 switch@0x20ea0[0x48]: 000210f8 switch@0x20ea0[0x49]: 000210f8 switch@0x20ea0[0x4a]: 000210f8 switch@0x20ea0[0x4b]: 000210f8 switch@0x20ea0[0x4c]: 000210f8 switch@0x20ea0[0x4d]: 000210f8 switch@0x20ea0[0x4e]: 000210f8 switch@0x20ea0[0x4f]: 000210f8 switch@0x20ea0[0x50]: 000210f8 switch@0x20ea0[0x51]: 000210f8 switch@0x20ea0[0x52]: 000210f8 switch@0x20ea0[0x53]: 000210f8 switch@0x20ea0[0x54]: 000210f8 switch@0x20ea0[0x55]: 000210f8 switch@0x20ea0[0x56]: 000210f8 switch@0x20ea0[0x57]: 000210f8 switch@0x20ea0[0x58]: 000210f8 switch@0x20ea0[0x59]: 000210f8 switch@0x20ea0[0x5a]: 000210f8 switch@0x20ea0[0x5b]: 000210f8 switch@0x20ea0[0x5c]: 000210f8 switch@0x20ea0[0x5d]: 000210f8 switch@0x20ea0[0x5e]: 000210f8 switch@0x20ea0[0x5f]: 000210f8 switch@0x20ea0[0x60]: 000210f8 switch@0x20ea0[0x61]: 000210f8 switch@0x20ea0[0x62]: 000210f8 switch@0x20ea0[0x63]: 000210f8 switch@0x20ea0[0x64]: 000210f8 switch@0x20ea0[0x65]: 000210f8 switch@0x20ea0[0x66]: 000210f8 switch@0x20ea0[0x67]: 000210f8 switch@0x20ea0[0x68]: 000210f8 switch@0x20ea0[0x69]: 000210f8 switch@0x20ea0[0x6]: 000210f8 switch@0x20ea0[0x6a]: 000210f8 switch@0x20ea0[0x6b]: 000210f8 switch@0x20ea0[0x6c]: 000210f8 switch@0x20ea0[0x6d]: 000210f8 switch@0x20ea0[0x6e]: 000210f8 switch@0x20ea0[0x6f]: 000210f8 switch@0x20ea0[0x70]: 000210f8 switch@0x20ea0[0x71]: 000210f8 switch@0x20ea0[0x72]: 000210f8 switch@0x20ea0[0x73]: 000210f8 switch@0x20ea0[0x74]: 000210f8 switch@0x20ea0[0x75]: 000210f8 switch@0x20ea0[0x76]: 000210f8 switch@0x20ea0[0x77]: 000210f8 switch@0x20ea0[0x78]: 000210f8 switch@0x20ea0[0x79]: 000210f8 switch@0x20ea0[0x7]: 000210f8 switch@0x20ea0[0x7a]: 000210f8 switch@0x20ea0[0x7b]: 000210f8 switch@0x20ea0[0x7c]: 000210f8 switch@0x20ea0[0x7d]: 000210f8 switch@0x20ea0[0x7e]: 000210f8 switch@0x20ea0[0x7f]: 000210f8 switch@0x20ea0[0x80]: 000210f8 switch@0x20ea0[0x81]: 000210f8 switch@0x20ea0[0x82]: 000210f8 switch@0x20ea0[0x83]: 000210f8 switch@0x20ea0[0x84]: 000210f8 switch@0x20ea0[0x85]: 000210f8 switch@0x20ea0[0x86]: 000210f8 switch@0x20ea0[0x87]: 000210f8 switch@0x20ea0[0x88]: 000210f8 switch@0x20ea0[0x89]: 000210f8 switch@0x20ea0[0x8]: 000210f8 switch@0x20ea0[0x8a]: 000210f8 switch@0x20ea0[0x8b]: 000210f8 switch@0x20ea0[0x8c]: 000210f8 switch@0x20ea0[0x8d]: 000210f8 switch@0x20ea0[0x8e]: 000210f8 switch@0x20ea0[0x8f]: 000210f8 switch@0x20ea0[0x90]: 000210f8 switch@0x20ea0[0x91]: 000210f8 switch@0x20ea0[0x92]: 000210f8 switch@0x20ea0[0x93]: 000210f8 switch@0x20ea0[0x94]: 000210f8 switch@0x20ea0[0x95]: 000210f8 switch@0x20ea0[0x96]: 000210f8 switch@0x20ea0[0x97]: 000210f8 switch@0x20ea0[0x98]: 000210f8 switch@0x20ea0[0x99]: 000210f8 switch@0x20ea0[0x9]: 000210f8 switch@0x20ea0[0x9a]: 000210f8 switch@0x20ea0[0x9b]: 000210f8 switch@0x20ea0[0x9c]: 000210f8 switch@0x20ea0[0x9d]: 000210f8 switch@0x20ea0[0x9e]: 000210f8 switch@0x20ea0[0x9f]: 000210f8 switch@0x20ea0[0xa0]: 000210f8 switch@0x20ea0[0xa1]: 000210f8 switch@0x20ea0[0xa2]: 000210f8 switch@0x20ea0[0xa3]: 000210f8 switch@0x20ea0[0xa4]: 000210f8 switch@0x20ea0[0xa5]: 000210f8 switch@0x20ea0[0xa6]: 000210f8 switch@0x20ea0[0xa7]: 000210f8 switch@0x20ea0[0xa8]: 000210f8 switch@0x20ea0[0xa9]: 000210f8 switch@0x20ea0[0xa]: 000210f8 switch@0x20ea0[0xaa]: 000210f8 switch@0x20ea0[0xab]: 000210f8 switch@0x20ea0[0xac]: 000210f8 switch@0x20ea0[0xad]: 000210f8 switch@0x20ea0[0xae]: 000210f8 switch@0x20ea0[0xaf]: 000210f8 switch@0x20ea0[0xb0]: 000210f8 switch@0x20ea0[0xb1]: 000210f8 switch@0x20ea0[0xb2]: 000210f8 switch@0x20ea0[0xb3]: 000210f8 switch@0x20ea0[0xb4]: 000210f8 switch@0x20ea0[0xb5]: 000210f8 switch@0x20ea0[0xb6]: 000210f8 switch@0x20ea0[0xb7]: 000210f8 switch@0x20ea0[0xb8]: 000210f8 switch@0x20ea0[0xb9]: 000210f8 switch@0x20ea0[0xb]: 000210f8 switch@0x20ea0[0xba]: 000210f8 switch@0x20ea0[0xbb]: 000210f8 switch@0x20ea0[0xbc]: 000210f8 switch@0x20ea0[0xbd]: 000210f8 switch@0x20ea0[0xbe]: 000210f8 switch@0x20ea0[0xbf]: 000210f8 switch@0x20ea0[0xc0]: 000210f8 switch@0x20ea0[0xc1]: 000210f8 switch@0x20ea0[0xc2]: 000210f8 switch@0x20ea0[0xc3]: 000210f8 switch@0x20ea0[0xc4]: 000210f8 switch@0x20ea0[0xc5]: 000210f8 switch@0x20ea0[0xc6]: 000210f8 switch@0x20ea0[0xc7]: 000210f8 switch@0x20ea0[0xc8]: 000210f8 switch@0x20ea0[0xc9]: 000210f8 switch@0x20ea0[0xc]: 000210f8 switch@0x20ea0[0xca]: 000210f8 switch@0x20ea0[0xcb]: 000210f8 switch@0x20ea0[0xcc]: 000210f8 switch@0x20ea0[0xcd]: 000210f8 switch@0x20ea0[0xce]: 000210f8 switch@0x20ea0[0xcf]: 000210f8 switch@0x20ea0[0xd0]: 000210f8 switch@0x20ea0[0xd1]: 000210f8 switch@0x20ea0[0xd2]: 000210f8 switch@0x20ea0[0xd3]: 000210f8 switch@0x20ea0[0xd4]: 000210f8 switch@0x20ea0[0xd5]: 000210f8 switch@0x20ea0[0xd6]: 000210f8 switch@0x20ea0[0xd7]: 000210f8 switch@0x20ea0[0xd8]: 000210f8 switch@0x20ea0[0xd9]: 000210f8 switch@0x20ea0[0xd]: 000210f8 switch@0x20ea0[0xda]: 000210f8 switch@0x20ea0[0xdb]: 000210f8 switch@0x20ea0[0xdc]: 000210f8 switch@0x20ea0[0xdd]: 000210f8 switch@0x20ea0[0xde]: 000210f8 switch@0x20ea0[0xdf]: 000210f8 switch@0x20ea0[0xe0]: 000210f8 switch@0x20ea0[0xe1]: 000210f8 switch@0x20ea0[0xe2]: 000210f8 switch@0x20ea0[0xe3]: 000210f8 switch@0x20ea0[0xe4]: 000210f8 switch@0x20ea0[0xe5]: 000210f8 switch@0x20ea0[0xe6]: 000210f8 switch@0x20ea0[0xe7]: 000210f8 switch@0x20ea0[0xe8]: 000210f8 switch@0x20ea0[0xe9]: 000210f8 switch@0x20ea0[0xe]: 000210f8 switch@0x20ea0[0xea]: 000210f8 switch@0x20ea0[0xeb]: 000210f8 switch@0x20ea0[0xec]: 000210f8 switch@0x20ea0[0xed]: 000210f8 switch@0x20ea0[0xee]: 000210f8 switch@0x20ea0[0xef]: 000210f8 switch@0x20ea0[0xf0]: 000210f8 switch@0x20ea0[0xf1]: 000210f8 switch@0x20ea0[0xf2]: 000210f8 switch@0x20ea0[0xf3]: 000210f8 switch@0x20ea0[0xf4]: 000210f8 switch@0x20ea0[0xf5]: 000210f8 switch@0x20ea0[0xf6]: 000210f8 switch@0x20ea0[0xf7]: 000210f8 switch@0x20ea0[0xf8]: 000210f8 switch@0x20ea0[0xf9]: 000210f8 switch@0x20ea0[0xf]: 000210f8 switch@0x20ea0[0xfa]: 000210f8 switch@0x20ea0[0xfb]: 000210f8 switch@0x20ea0[0xfc]: 000210f8 switch@0x20ea0[0xfd]: 000210f8 switch@0x20ea0[0xfe]: 000210f8 41 fa f2 0c |A | LEA.L 0x20306,A0 000210fc 70 0e |p | MOVEQ.L #0x0e,D0 000210fe 3f 20 |? | MOVE.W -(A0),-(A7) 00021100 51 c8 ff fc |Q | DBF D0,0x210fe 00021104 51 4f |QO | SUBQ.L #0x8,A7 00021106 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002110a 3f 03 |? | MOVE.W D3,-(A7) 0002110c 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00021110 4e 93 |N | JSR (A3) 00021112 58 4f |XO | ADDQ.L #0x4,A7 00021114 42 80 |B | CLR.L D0 00021116 30 12 |0 | MOVE.W (A2),D0 00021118 2f 00 |/ | MOVE.L D0,-(A7) 0002111a 4e ba f4 94 |N | JSR 0x205b0 0002111e 58 4f |XO | ADDQ.L #0x4,A7 00021120 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021126 50 4f |PO | ADDQ.L #0x8,A7 00021128 4e ba f9 f6 |N | JSR 0x20b20 0002112c de fc 00 22 | " | ADDA.W #0x22,A7 00021130 60 00 02 b6 |` | BRA 0x213e8 00021134 b0 07 | | CMP.B D7,D0 00021136 67 42 |gB | BEQ 0x2117a 00021138 9e fc 00 2c | , | SUBA.W #0x2c,A7 0002113c 20 4f | O | MOVEA.L A7,A0 0002113e 43 fa f1 c6 |C | LEA.L 0x20306,A1 00021142 72 2a |r* | MOVEQ.L #0x2a,D1 00021144 10 d9 | | MOVE.B (A1)+,(A0)+ 00021146 51 c9 ff fc |Q | DBF D1,0x21144 0002114a 51 4f |QO | SUBQ.L #0x8,A7 0002114c 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021150 3f 03 |? | MOVE.W D3,-(A7) 00021152 3f 3c 00 2b |?< + | MOVE.W #0x2b,-(A7) 00021156 4e 93 |N | JSR (A3) 00021158 58 4f |XO | ADDQ.L #0x4,A7 0002115a 48 80 |H | EXTB.W D0 0002115c 48 c0 |H | EXTW.L D0 0002115e 2f 00 |/ | MOVE.L D0,-(A7) 00021160 4e ba f7 be |N | JSR 0x20920 00021164 58 4f |XO | ADDQ.L #0x4,A7 00021166 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002116c 50 4f |PO | ADDQ.L #0x8,A7 0002116e 4e ba f9 b0 |N | JSR 0x20b20 00021172 de fc 00 30 | 0 | ADDA.W #0x30,A7 00021176 60 00 02 70 |` p | BRA 0x213e8 0002117a 30 12 |0 | MOVE.W (A2),D0 0002117c b0 44 | D | CMP.W D4,D0 0002117e 62 00 02 2e |b . | BHI 0x213ae 00021182 d0 40 | @ | ADD.W D0,D0 00021184 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 0002118c 00 08 | | .CONST 0x8 ; [0x0] -> 0x21194 0002118e 00 1a | | .CONST 0x1a ; [0x1] -> 0x211a6 00021190 00 42 | B | .CONST 0x42 ; [0x2] -> 0x211ce 00021192 01 70 | p | .CONST 0x170 ; [0x3] -> 0x212fc 00021194 switch@0x21184[0x0]: 00021194 42 27 |B' | CLR.B -(A7) 00021196 48 78 00 01 |Hx | PEA.L 0x1 0002119a 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000211a0 5c 4f |\O | ADDQ.L #0x6,A7 000211a2 60 00 02 44 |` D | BRA 0x213e8 000211a6 switch@0x21184[0x1]: 000211a6 41 fa f1 a2 |A | LEA.L 0x2034a,A0 000211aa 70 05 |p | MOVEQ.L #0x05,D0 000211ac 2f 20 |/ | MOVE.L -(A0),-(A7) 000211ae 51 c8 ff fc |Q | DBF D0,0x211ac 000211b2 59 4f |YO | SUBQ.L #0x4,A7 000211b4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000211b8 3f 03 |? | MOVE.W D3,-(A7) 000211ba 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 000211be 4e 93 |N | JSR (A3) 000211c0 50 4f |PO | ADDQ.L #0x8,A7 000211c2 4e ba f9 5c |N \ | JSR 0x20b20 000211c6 de fc 00 1c | | ADDA.W #0x1c,A7 000211ca 60 00 02 1c |` | BRA 0x213e8 000211ce switch@0x21184[0x2]: 000211ce 4e ba fb 68 |N h | JSR 0x20d38 000211d2 3f 04 |? | MOVE.W D4,-(A7) 000211d4 48 6e ff f8 |Hn | PEA.L (A6-0x8) 000211d8 4e b9 00 01 02 0e |N | JSR KC07_PortGetChar(port : Word ; VAR ret : Word) 000211de 5c 4f |\O | ADDQ.L #0x6,A7 000211e0 cb 6e ff f8 | n | AND.W D5,(A6-0x8) 000211e4 30 2e ff f8 |0. | MOVE.W (A6-0x8),D0 000211e8 e1 40 | @ | ASL.W #0x8,D0 000211ea 3d 40 ff f8 |=@ | MOVE.W D0,(A6-0x8) 000211ee 3f 04 |? | MOVE.W D4,-(A7) 000211f0 48 52 |HR | PEA.L (A2) 000211f2 4e b9 00 01 02 0e |N | JSR KC07_PortGetChar(port : Word ; VAR ret : Word) 000211f8 5c 4f |\O | ADDQ.L #0x6,A7 000211fa 32 12 |2 | MOVE.W (A2),D1 000211fc c2 45 | E | AND.W D5,D1 000211fe 42 82 |B | CLR.L D2 00021200 34 00 |4 | MOVE.W D0,D2 00021202 42 80 |B | CLR.L D0 00021204 30 01 |0 | MOVE.W D1,D0 00021206 d0 82 | | ADD.L D2,D0 00021208 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 0002120e 63 02 |c | BLS 0x21212 00021210 4e 4f |NO | TRAP #15 00021212 3d 40 ff f8 |=@ | MOVE.W D0,(A6-0x8) 00021216 9e fc 00 38 | 8 | SUBA.W #0x38,A7 0002121a 20 4f | O | MOVEA.L A7,A0 0002121c 43 fa f1 9c |C | LEA.L 0x203ba,A1 00021220 72 36 |r6 | MOVEQ.L #0x36,D1 00021222 10 d9 | | MOVE.B (A1)+,(A0)+ 00021224 51 c9 ff fc |Q | DBF D1,0x21222 00021228 59 4f |YO | SUBQ.L #0x4,A7 0002122a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002122e 3f 03 |? | MOVE.W D3,-(A7) 00021230 3f 3c 00 37 |?< 7 | MOVE.W #0x37,-(A7) 00021234 4e 93 |N | JSR (A3) 00021236 50 4f |PO | ADDQ.L #0x8,A7 00021238 4e ba f3 20 |N | JSR 0x2055a 0002123c de fc 00 24 | $ | ADDA.W #0x24,A7 00021240 20 4f | O | MOVEA.L A7,A0 00021242 43 fa f1 ae |C | LEA.L 0x203f2,A1 00021246 72 16 |r | MOVEQ.L #0x16,D1 00021248 10 d9 | | MOVE.B (A1)+,(A0)+ 0002124a 51 c9 ff fc |Q | DBF D1,0x21248 0002124e 41 fa f1 cc |A | LEA.L 0x2041c,A0 00021252 72 08 |r | MOVEQ.L #0x08,D1 00021254 3f 20 |? | MOVE.W -(A0),-(A7) 00021256 51 c9 ff fc |Q | DBF D1,0x21254 0002125a 51 4f |QO | SUBQ.L #0x8,A7 0002125c 48 6f 00 1a |Ho | PEA.L (A7+0x1a) 00021260 3f 03 |? | MOVE.W D3,-(A7) 00021262 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00021266 4e 93 |N | JSR (A3) 00021268 58 4f |XO | ADDQ.L #0x4,A7 0002126a 42 81 |B | CLR.L D1 0002126c 32 00 |2 | MOVE.W D0,D1 0002126e 2f 01 |/ | MOVE.L D1,-(A7) 00021270 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021276 48 6f 00 10 |Ho | PEA.L (A7+0x10) 0002127a 3f 03 |? | MOVE.W D3,-(A7) 0002127c 3f 06 |? | MOVE.W D6,-(A7) 0002127e 4e 93 |N | JSR (A3) 00021280 50 4f |PO | ADDQ.L #0x8,A7 00021282 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00021288 de fc 00 0c | | ADDA.W #0xc,A7 0002128c 4e ba f2 cc |N | JSR 0x2055a 00021290 de c6 | | ADDA.W D6,A7 00021292 20 4f | O | MOVEA.L A7,A0 00021294 43 fa f1 86 |C | LEA.L 0x2041c,A1 00021298 72 1a |r | MOVEQ.L #0x1a,D1 0002129a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002129c 51 c9 ff fc |Q | DBF D1,0x2129a 000212a0 59 4f |YO | SUBQ.L #0x4,A7 000212a2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000212a6 3f 03 |? | MOVE.W D3,-(A7) 000212a8 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 000212ac 4e 93 |N | JSR (A3) 000212ae 50 4f |PO | ADDQ.L #0x8,A7 000212b0 4e ba f2 a8 |N | JSR 0x2055a 000212b4 de fc 00 20 | | ADDA.W #0x20,A7 000212b8 42 81 |B | CLR.L D1 000212ba 32 00 |2 | MOVE.W D0,D1 000212bc 2f 01 |/ | MOVE.L D1,-(A7) 000212be 48 6e ff fe |Hn | PEA.L (A6-0x2) 000212c2 4e ba f9 4c |N L | JSR 0x20c10 000212c6 50 4f |PO | ADDQ.L #0x8,A7 000212c8 4a 2e ff fe |J. | TST.B (A6-0x2) 000212cc 66 06 |f | BNE 0x212d4 000212ce 4e ba fa c6 |N | JSR 0x20d96 000212d2 60 24 |`$ | BRA 0x212f8 000212d4 41 fa f0 e4 |A | LEA.L 0x203ba,A0 000212d8 70 0a |p | MOVEQ.L #0x0a,D0 000212da 3f 20 |? | MOVE.W -(A0),-(A7) 000212dc 51 c8 ff fc |Q | DBF D0,0x212da 000212e0 59 4f |YO | SUBQ.L #0x4,A7 000212e2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000212e6 3f 03 |? | MOVE.W D3,-(A7) 000212e8 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 000212ec 4e 93 |N | JSR (A3) 000212ee 50 4f |PO | ADDQ.L #0x8,A7 000212f0 4e ba f8 2e |N . | JSR 0x20b20 000212f4 de fc 00 1a | | ADDA.W #0x1a,A7 000212f8 60 00 00 ee |` | BRA 0x213e8 000212fc switch@0x21184[0x3]: 000212fc 4e ba fa 3a |N : | JSR 0x20d38 00021300 41 fa f1 72 |A r | LEA.L 0x20474,A0 00021304 70 0e |p | MOVEQ.L #0x0e,D0 00021306 2f 20 |/ | MOVE.L -(A0),-(A7) 00021308 51 c8 ff fc |Q | DBF D0,0x21306 0002130c 59 4f |YO | SUBQ.L #0x4,A7 0002130e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021312 3f 03 |? | MOVE.W D3,-(A7) 00021314 3f 3c 00 3c |?< < | MOVE.W #0x3c,-(A7) 00021318 4e 93 |N | JSR (A3) 0002131a 50 4f |PO | ADDQ.L #0x8,A7 0002131c 4e ba f2 3c |N < | JSR 0x2055a 00021320 de fc 00 32 | 2 | ADDA.W #0x32,A7 00021324 20 4f | O | MOVEA.L A7,A0 00021326 43 fa f1 4c |C L | LEA.L 0x20474,A1 0002132a 70 0c |p | MOVEQ.L #0x0c,D0 0002132c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002132e 51 c8 ff fc |Q | DBF D0,0x2132c 00021332 59 4f |YO | SUBQ.L #0x4,A7 00021334 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021338 3f 03 |? | MOVE.W D3,-(A7) 0002133a 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 0002133e 4e 93 |N | JSR (A3) 00021340 50 4f |PO | ADDQ.L #0x8,A7 00021342 4e ba f2 16 |N | JSR 0x2055a 00021346 de c6 | | ADDA.W D6,A7 00021348 3f 04 |? | MOVE.W D4,-(A7) 0002134a 48 54 |HT | PEA.L (A4) 0002134c 4e b9 00 01 02 12 |N | JSR KC09_PortStatus(Port : Word; VAR b: Byte) 00021352 5c 4f |\O | ADDQ.L #0x6,A7 00021354 4a 14 |J | TST.B (A4) 00021356 67 0c |g | BEQ 0x21364 00021358 3f 04 |? | MOVE.W D4,-(A7) 0002135a 48 52 |HR | PEA.L (A2) 0002135c 4e b9 00 01 02 0e |N | JSR KC07_PortGetChar(port : Word ; VAR ret : Word) 00021362 5c 4f |\O | ADDQ.L #0x6,A7 00021364 10 14 | | MOVE.B (A4),D0 00021366 b0 04 | | CMP.B D4,D0 00021368 66 de |f | BNE 0x21348 0002136a cb 52 | R | AND.W D5,(A2) 0002136c 66 06 |f | BNE 0x21374 0002136e 4e ba fa 26 |N & | JSR 0x20d96 00021372 60 38 |`8 | BRA 0x213ac 00021374 41 fa f0 0a |A | LEA.L 0x20380,A0 00021378 70 1a |p | MOVEQ.L #0x1a,D0 0002137a 3f 20 |? | MOVE.W -(A0),-(A7) 0002137c 51 c8 ff fc |Q | DBF D0,0x2137a 00021380 51 4f |QO | SUBQ.L #0x8,A7 00021382 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021386 3f 03 |? | MOVE.W D3,-(A7) 00021388 3f 3c 00 36 |?< 6 | MOVE.W #0x36,-(A7) 0002138c 4e 93 |N | JSR (A3) 0002138e 58 4f |XO | ADDQ.L #0x4,A7 00021390 42 80 |B | CLR.L D0 00021392 30 12 |0 | MOVE.W (A2),D0 00021394 2f 00 |/ | MOVE.L D0,-(A7) 00021396 4e ba f2 18 |N | JSR 0x205b0 0002139a 58 4f |XO | ADDQ.L #0x4,A7 0002139c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000213a2 50 4f |PO | ADDQ.L #0x8,A7 000213a4 4e ba f7 7a |N z | JSR 0x20b20 000213a8 de fc 00 3a | : | ADDA.W #0x3a,A7 000213ac 60 3a |`: | BRA 0x213e8 000213ae 41 fa ef f4 |A | LEA.L 0x203a4,A0 000213b2 70 08 |p | MOVEQ.L #0x08,D0 000213b4 2f 20 |/ | MOVE.L -(A0),-(A7) 000213b6 51 c8 ff fc |Q | DBF D0,0x213b4 000213ba 51 4f |QO | SUBQ.L #0x8,A7 000213bc 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000213c0 3f 03 |? | MOVE.W D3,-(A7) 000213c2 3f 3c 00 24 |?< $ | MOVE.W #0x24,-(A7) 000213c6 4e 93 |N | JSR (A3) 000213c8 58 4f |XO | ADDQ.L #0x4,A7 000213ca 42 80 |B | CLR.L D0 000213cc 30 12 |0 | MOVE.W (A2),D0 000213ce 2f 00 |/ | MOVE.L D0,-(A7) 000213d0 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000213d6 58 4f |XO | ADDQ.L #0x4,A7 000213d8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000213de 50 4f |PO | ADDQ.L #0x8,A7 000213e0 4e ba f7 3e |N > | JSR 0x20b20 000213e4 de fc 00 28 | ( | ADDA.W #0x28,A7 000213e8 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000213ec 4e 5e |N^ | UNLK A6 000213ee 4e 75 |Nu | RTS 000213f0 ; -------------------------------------------------------------------------------------- 000213f0 ; OMSI PASCAL Function 000213f0 ; <LVAR -0x004 @> 000213f0 ; -------------------------------------------------------------------------------------- 000213f0 4e 56 ff b4 |NV | LINK.W A6,#0xffb4 000213f4 bf d5 | | CMPA.L (A5),A7 000213f6 62 06 |b | BHI 0x213fe 000213f8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000213fc 4e 76 |Nv | TRAPV 000213fe de fc 00 48 | H | ADDA.W #0x48,A7 00021402 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00021406 41 fa f0 aa |A | LEA.L 0x204b2,A0 0002140a 70 0b |p | MOVEQ.L #0x0b,D0 0002140c 2f 20 |/ | MOVE.L -(A0),-(A7) 0002140e 51 c8 ff fc |Q | DBF D0,0x2140c 00021412 59 4f |YO | SUBQ.L #0x4,A7 00021414 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021418 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002141c 3f 3c 00 30 |?< 0 | MOVE.W #0x30,-(A7) 00021420 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021426 50 4f |PO | ADDQ.L #0x8,A7 00021428 4e ba f1 30 |N 0 | JSR 0x2055a 0002142c de fc 00 32 | 2 | ADDA.W #0x32,A7 00021430 3e bc 00 03 |> | MOVE.W #0x3,(A7) 00021434 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021438 4e b9 00 01 02 0e |N | JSR KC07_PortGetChar(port : Word ; VAR ret : Word) 0002143e 5c 4f |\O | ADDQ.L #0x6,A7 00021440 4e ba f9 54 |N T | JSR 0x20d96 00021444 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00021448 4e 5e |N^ | UNLK A6 0002144a 4e 75 |Nu | RTS 0002144c ; -------------------------------------------------------------------------------------- 0002144c ; OMSI PASCAL Function 0002144c ; <LVAR -0x004 @ 2(w)> 0002144c ; -------------------------------------------------------------------------------------- 0002144c 4e 56 ff a2 |NV | LINK.W A6,#0xffa2 00021450 bf d5 | | CMPA.L (A5),A7 00021452 62 06 |b | BHI 0x2145a 00021454 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021458 4e 76 |Nv | TRAPV 0002145a de fc 00 5a | Z | ADDA.W #0x5a,A7 0002145e 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00021462 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00021466 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002146a 4e b9 00 01 02 0e |N | JSR KC07_PortGetChar(port : Word ; VAR ret : Word) 00021470 5c 4f |\O | ADDQ.L #0x6,A7 00021472 02 6e 00 ff ff fc | n | ANDI.W #0x00ff,(A6-0x4) 00021478 66 06 |f | BNE 0x21480 0002147a 4e ba f9 1a |N | JSR 0x20d96 0002147e 60 30 |`0 | BRA 0x214b0 00021480 9e fc 00 3e | > | SUBA.W #0x3e,A7 00021484 20 4f | O | MOVEA.L A7,A0 00021486 43 fa f0 2a |C * | LEA.L 0x204b2,A1 0002148a 70 3c |p< | MOVEQ.L #0x3c,D0 0002148c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002148e 51 c8 ff fc |Q | DBF D0,0x2148c 00021492 59 4f |YO | SUBQ.L #0x4,A7 00021494 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021498 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002149c 3f 3c 00 3d |?< = | MOVE.W #0x3d,-(A7) 000214a0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000214a6 50 4f |PO | ADDQ.L #0x8,A7 000214a8 4e ba f6 76 |N v | JSR 0x20b20 000214ac de fc 00 42 | B | ADDA.W #0x42,A7 000214b0 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 000214b4 4e 5e |N^ | UNLK A6 000214b6 4e 75 |Nu | RTS 000214b8 ; -------------------------------------------------------------------------------------- 000214b8 ; OMSI PASCAL Function 000214b8 ; -------------------------------------------------------------------------------------- 000214b8 4e 56 ff da |NV | LINK.W A6,#0xffda 000214bc bf d5 | | CMPA.L (A5),A7 000214be 62 06 |b | BHI 0x214c6 000214c0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000214c4 4e 76 |Nv | TRAPV 000214c6 de fc 00 26 | & | ADDA.W #0x26,A7 000214ca 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 000214ce 41 fa f0 2e |A . | LEA.L 0x204fe,A0 000214d2 70 06 |p | MOVEQ.L #0x06,D0 000214d4 3f 20 |? | MOVE.W -(A0),-(A7) 000214d6 51 c8 ff fc |Q | DBF D0,0x214d4 000214da 59 4f |YO | SUBQ.L #0x4,A7 000214dc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000214e0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000214e4 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 000214e8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000214ee 50 4f |PO | ADDQ.L #0x8,A7 000214f0 4e ba f0 68 |N h | JSR 0x2055a 000214f4 de fc 00 12 | | ADDA.W #0x12,A7 000214f8 48 78 00 03 |Hx | PEA.L 0x3 000214fc 4e b9 00 01 03 f4 |N | JSR SetConsoleConfig(a : Long) 00021502 58 4f |XO | ADDQ.L #0x4,A7 00021504 4e ba f8 90 |N | JSR 0x20d96 00021508 60 c4 |` | BRA 0x214ce 0002150a 4c df 01 01 4e 5e |L N^ | .XXX[0x6] 00021510 4e 75 |Nu | .XXX[0x2] 00021512 ; -------------------------------------------------------------------------------------- 00021512 ; OMSI PASCAL Function 00021512 ; <LVAR -0x004 @ 1(r)> 00021512 ; -------------------------------------------------------------------------------------- 00021512 4e 56 ff b6 |NV | LINK.W A6,#0xffb6 00021516 bf d5 | | CMPA.L (A5),A7 00021518 62 06 |b | BHI 0x21520 0002151a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002151e 4e 76 |Nv | TRAPV 00021520 de fc 00 46 | F | ADDA.W #0x46,A7 00021524 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00021528 72 03 |r | MOVEQ.L #0x03,D1 0002152a 59 4f |YO | SUBQ.L #0x4,A7 0002152c 4e b9 00 01 03 f8 |N | JSR GetConsoleConfig() : Long 00021532 20 1f | | MOVE.L (A7)+,D0 00021534 b0 81 | | CMP.L D1,D0 00021536 67 08 |g | BEQ 0x21540 00021538 4e ba ff 7e |N ~ | JSR 0x214b8 0002153c 60 00 00 98 |` | BRA 0x215d6 00021540 3f 01 |? | MOVE.W D1,-(A7) 00021542 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021546 4e b9 00 01 02 12 |N | JSR KC09_PortStatus(Port : Word; VAR b: Byte) 0002154c 5c 4f |\O | ADDQ.L #0x6,A7 0002154e 10 2e ff fc | . | MOVE.B (A6-0x4),D0 00021552 48 80 |H | EXTB.W D0 00021554 0c 40 00 06 | @ | CMPI.W #0x0006,D0 00021558 63 02 |c | BLS 0x2155c 0002155a 4e 4e |NN | TRAP #14 0002155c d0 40 | @ | ADD.W D0,D0 0002155e 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00021566 00 0e | | .CONST 0xe ; [0x0] -> 0x21574 00021568 00 1e | | .CONST 0x1e ; [0x1] -> 0x21584 0002156a 00 26 | & | .CONST 0x26 ; [0x2] -> 0x2158c 0002156c 00 20 | | .CONST 0x20 ; [0x3] -> 0x21586 0002156e 00 2c | , | .CONST 0x2c ; [0x4] -> 0x21592 00021570 00 3a | : | .CONST 0x3a ; [0x5] -> 0x215a0 00021572 00 46 | F | .CONST 0x46 ; [0x6] -> 0x215ac 00021574 switch@0x2155e[0x0]: 00021574 42 27 |B' | CLR.B -(A7) 00021576 48 78 00 01 |Hx | PEA.L 0x1 0002157a 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021580 5c 4f |\O | ADDQ.L #0x6,A7 00021582 60 52 |`R | BRA 0x215d6 00021584 switch@0x2155e[0x1]: 00021584 60 ee |` | BRA switch@0x2155e[0x0] 00021586 switch@0x2155e[0x3]: 00021586 4e ba fe c4 |N | JSR 0x2144c 0002158a 60 4a |`J | BRA 0x215d6 0002158c switch@0x2155e[0x2]: 0002158c 4e ba fe 62 |N b | JSR 0x213f0 00021590 60 44 |`D | BRA 0x215d6 00021592 switch@0x2155e[0x4]: 00021592 48 78 00 1c |Hx | PEA.L 0x1c 00021596 4e b9 00 01 02 20 |N | JSR KC10_Panic(code : Long) 0002159c 58 4f |XO | ADDQ.L #0x4,A7 0002159e 60 36 |`6 | BRA 0x215d6 000215a0 switch@0x2155e[0x5]: 000215a0 48 78 00 01 |Hx | PEA.L 0x1 000215a4 4e b9 00 01 03 f4 |N | JSR SetConsoleConfig(a : Long) 000215aa 60 f0 |` | BRA 0x2159c 000215ac switch@0x2155e[0x6]: 000215ac 41 fa ef ac |A | LEA.L 0x2055a,A0 000215b0 70 14 |p | MOVEQ.L #0x14,D0 000215b2 3f 20 |? | MOVE.W -(A0),-(A7) 000215b4 51 c8 ff fc |Q | DBF D0,0x215b2 000215b8 59 4f |YO | SUBQ.L #0x4,A7 000215ba 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000215be 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000215c2 3f 3c 00 2a |?< * | MOVE.W #0x2a,-(A7) 000215c6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000215cc 50 4f |PO | ADDQ.L #0x8,A7 000215ce 4e ba f5 50 |N P | JSR 0x20b20 000215d2 de fc 00 2e | . | ADDA.W #0x2e,A7 000215d6 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 000215da 4e 5e |N^ | UNLK A6 000215dc 4e 75 |Nu | RTS 000215de ; -------------------------------------------------------------------------------------- 000215de ; OMSI PASCAL Function 000215de ; -------------------------------------------------------------------------------------- 000215de START: 000215de 4f fa 00 08 |O | LEA.L MAIN,A7 000215e2 4e f9 00 01 02 80 |N | JMP ?start_program 000215e8 MAIN: 000215e8 4e b9 00 01 03 98 |N | JSR FSCALL_10398 000215ee 4e ba ff 22 |N " | JSR 0x21512 000215f2 4e b9 00 01 02 84 |N | JSR ?exit 000215f8 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 00021606 ; -------------------------------------------------------------------------------------- 00021606 ; OMSI PASCAL Function 00021606 ; <LVAR 0x008 1(r)> 00021606 ; -------------------------------------------------------------------------------------- 00021606 PROG_FAIL: 00021606 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 0002160a bf d5 | | CMPA.L (A5),A7 0002160c 62 06 |b | BHI 0x21614 0002160e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021612 4e 76 |Nv | TRAPV 00021614 de fc 00 2c | , | ADDA.W #0x2c,A7 00021618 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 0002161c 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 00021620 70 06 |p | MOVEQ.L #0x06,D0 00021622 3f 20 |? | MOVE.W -(A0),-(A7) 00021624 51 c8 ff fc |Q | DBF D0,0x21622 00021628 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 0002162c 51 4f |QO | SUBQ.L #0x8,A7 0002162e 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00021632 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021636 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 0002163a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021640 58 4f |XO | ADDQ.L #0x4,A7 00021642 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00021646 48 80 |H | EXTB.W D0 00021648 48 c0 |H | EXTW.L D0 0002164a 2f 00 |/ | MOVE.L D0,-(A7) 0002164c 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021652 58 4f |XO | ADDQ.L #0x4,A7 00021654 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002165a 50 4f |PO | ADDQ.L #0x8,A7 0002165c 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021662 de fc 00 14 | | ADDA.W #0x14,A7 00021666 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 0002166a 4e 5e |N^ | UNLK A6 0002166c 4e 75 |Nu | RTS 0002166e 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 0002167c 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 0002168a 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00021698 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 000216aa 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 000216c2 ; -------------------------------------------------------------------------------------- 000216c2 ; OMSI PASCAL Function 000216c2 ; <LVAR 0x00e 1(r)> 000216c2 ; <LVAR 0x00a 4(r)> 000216c2 ; <LVAR 0x008 1(r)> 000216c2 ; -------------------------------------------------------------------------------------- 000216c2 EXP_FAIL: 000216c2 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 000216c6 bf d5 | | CMPA.L (A5),A7 000216c8 62 06 |b | BHI 0x216d0 000216ca 44 fc 00 02 |D | MOVE.W #0x2,CCR 000216ce 4e 76 |Nv | TRAPV 000216d0 de fc 00 74 | t | ADDA.W #0x74,A7 000216d4 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 000216d8 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 000216de 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 000216e4 72 01 |r | MOVEQ.L #0x01,D1 000216e6 74 0d |t | MOVEQ.L #0x0d,D2 000216e8 76 1e |v | MOVEQ.L #0x1e,D3 000216ea 78 12 |x | MOVEQ.L #0x12,D4 000216ec 7a 0e |z | MOVEQ.L #0x0e,D5 000216ee 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000216f4 41 fa ff b4 |A | LEA.L 0x216aa,A0 000216f8 70 08 |p | MOVEQ.L #0x08,D0 000216fa 3f 20 |? | MOVE.W -(A0),-(A7) 000216fc 51 c8 ff fc |Q | DBF D0,0x216fa 00021700 59 4f |YO | SUBQ.L #0x4,A7 00021702 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021706 3f 01 |? | MOVE.W D1,-(A7) 00021708 3f 04 |? | MOVE.W D4,-(A7) 0002170a 4e 93 |N | JSR (A3) 0002170c 50 4f |PO | ADDQ.L #0x8,A7 0002170e 4e 94 |N | JSR (A4) 00021710 50 4f |PO | ADDQ.L #0x8,A7 00021712 20 4f | O | MOVEA.L A7,A0 00021714 43 fa ff 58 |C X | LEA.L 0x2166e,A1 00021718 70 0c |p | MOVEQ.L #0x0c,D0 0002171a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002171c 51 c8 ff fc |Q | DBF D0,0x2171a 00021720 51 4f |QO | SUBQ.L #0x8,A7 00021722 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021726 3f 01 |? | MOVE.W D1,-(A7) 00021728 3f 02 |? | MOVE.W D2,-(A7) 0002172a 4e 93 |N | JSR (A3) 0002172c 54 4f |TO | ADDQ.L #0x2,A7 0002172e 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00021732 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00021738 54 4f |TO | ADDQ.L #0x2,A7 0002173a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021740 50 4f |PO | ADDQ.L #0x8,A7 00021742 4e 94 |N | JSR (A4) 00021744 de c4 | | ADDA.W D4,A7 00021746 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 0002174a b0 c1 | | CMPA.W D1,A0 0002174c 67 48 |gH | BEQ 0x21796 0002174e 9e c5 | | SUBA.W D5,A7 00021750 22 4f |"O | MOVEA.L A7,A1 00021752 45 fa ff 28 |E ( | LEA.L 0x2167c,A2 00021756 70 0c |p | MOVEQ.L #0x0c,D0 00021758 12 da | | MOVE.B (A2)+,(A1)+ 0002175a 51 c8 ff fc |Q | DBF D0,0x21758 0002175e 9e c3 | | SUBA.W D3,A7 00021760 22 4f |"O | MOVEA.L A7,A1 00021762 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00021766 70 1d |p | MOVEQ.L #0x1d,D0 00021768 12 d8 | | MOVE.B (A0)+,(A1)+ 0002176a 51 c8 ff fc |Q | DBF D0,0x21768 0002176e 51 4f |QO | SUBQ.L #0x8,A7 00021770 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00021774 3f 01 |? | MOVE.W D1,-(A7) 00021776 3f 02 |? | MOVE.W D2,-(A7) 00021778 4e 93 |N | JSR (A3) 0002177a 58 4f |XO | ADDQ.L #0x4,A7 0002177c 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021780 3f 01 |? | MOVE.W D1,-(A7) 00021782 3f 03 |? | MOVE.W D3,-(A7) 00021784 4e 93 |N | JSR (A3) 00021786 50 4f |PO | ADDQ.L #0x8,A7 00021788 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002178e 50 4f |PO | ADDQ.L #0x8,A7 00021790 4e 94 |N | JSR (A4) 00021792 de fc 00 30 | 0 | ADDA.W #0x30,A7 00021796 9e c5 | | SUBA.W D5,A7 00021798 20 4f | O | MOVEA.L A7,A0 0002179a 43 fa fe ee |C | LEA.L 0x2168a,A1 0002179e 70 0c |p | MOVEQ.L #0x0c,D0 000217a0 10 d9 | | MOVE.B (A1)+,(A0)+ 000217a2 51 c8 ff fc |Q | DBF D0,0x217a0 000217a6 51 4f |QO | SUBQ.L #0x8,A7 000217a8 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000217ac 3f 01 |? | MOVE.W D1,-(A7) 000217ae 3f 02 |? | MOVE.W D2,-(A7) 000217b0 4e 93 |N | JSR (A3) 000217b2 54 4f |TO | ADDQ.L #0x2,A7 000217b4 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 000217b8 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 000217be 54 4f |TO | ADDQ.L #0x2,A7 000217c0 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000217c6 50 4f |PO | ADDQ.L #0x8,A7 000217c8 4e 94 |N | JSR (A4) 000217ca 5d 4f |]O | SUBQ.L #0x6,A7 000217cc 20 4f | O | MOVEA.L A7,A0 000217ce 43 fa fe da |C | LEA.L 0x216aa,A1 000217d2 70 16 |p | MOVEQ.L #0x16,D0 000217d4 10 d9 | | MOVE.B (A1)+,(A0)+ 000217d6 51 c8 ff fc |Q | DBF D0,0x217d4 000217da 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000217de 59 4f |YO | SUBQ.L #0x4,A7 000217e0 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000217e4 3f 01 |? | MOVE.W D1,-(A7) 000217e6 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 000217ea 4e 93 |N | JSR (A3) 000217ec 50 4f |PO | ADDQ.L #0x8,A7 000217ee 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000217f4 de c3 | | ADDA.W D3,A7 000217f6 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 000217fa 4e 5e |N^ | UNLK A6 000217fc 4e 75 |Nu | RTS