|
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: 16384 (0x4000)
Types: M200
Notes: @(#)LOADER,2.7,92/11/05,17:18:19, M200_PROGRAM
Names: »LOADER.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »LOADER.M200«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »LOADER.M200«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »LOADER.M200«
@ 2069e
<LVAR 0x016 1(r)>
<LVAR 0x012 4(r)>
<LVAR 0x010 1(r)>
<LVAR 0x00e 1(r)>
<LVAR 0x00c 1(r)>
<LVAR 0x008 4(r)>
<LVAR -0x004 @>
<POP 2069e-20766 Body> Δ+10
<POP 2069e-206b4 Prologue> Σ0 ↓
<POP 206b4-206bc RegCacheLoad> Σ0 ↓
<POP 206bc-206dc Naked> Σ0 ↓ →0x206ea
<Call 0x206bc 0x10538> {}
IPC_Init(void)
<MI 206c2 MOVE.L (A6+0x12),-(A7)> Δ-4 {[4, '(A6+0x12)']}
<Call 0x206c6 0x10508> {[4, '(A6+0x12)']}
IPC_PutString(a : String)
<POP 206cc-206ce StackAdj> Δ+2 {[-2-]}
<MI 206ce MOVE.B (A6+0x10),(A7)> {[-2-]}
<Call 0x206d2 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 206d4-206d6 StackAdj> Δ+2 {}
<MI 206d6 TST.B (A6+0x16)> {}
<MI 206da BNE 0x206ea> {}
<POP 206dc-206ea Naked> Σ0 ↓
<MI 206dc MOVE.B (A6+0xe),-(A7)> Δ-2 {[2, '(A6+0xe)']}
<Call 0x206e0 0x10502> {[2, '(A6+0xe)']}
IPC_PutBool(a : Bool)
<MI 206e2 MOVE.B (A6+0xc),(A7)> {[-2-]}
<Call 0x206e6 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 206e8-206ea StackAdj> Δ+2 {}
<POP 206ea-206f6 Naked> Σ0 ↓ →0x20708 ←0x206bc
<Call 0x206ea 0x10514> {}
IPC_PutEnd(void)
<MI 206f0 TST.B (A6+0x16)> {}
<MI 206f4 BEQ 0x20708> {}
<POP 206f6-20708 Naked> Σ0 Δ-10 →0x20718
<Blob 0x206f6 [10] @> Δ-10 {[«10""»]}
<MI 20706 BRA 0x20718> {[«10""»]}
<POP 20708-20718 Naked> Σ0 Δ-10 ↓ ←0x206ea
<Blob 0x20708 [10] @> Δ-10 {[«10""»]}
<POP 20718-2075e Naked> Σ-10 Δ+10 ↓ ←0x206f6
<POP 20718-2071a StackAdj> Δ-4 {[-14-]}
<Lit 0x2071a> {[-10-]|[$$…]}
<Pointer.sp 0x2071a 4> Δ-4
<Const 0x2071e 0x1.2> Δ-2
<Const 0x20722 0x9.2> Δ-2
<Call 0x20726 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2072c-2072e StackAdj> Δ+8
<Const 0x2072e 0x1.4> Δ-4 {[-10-]|[$$…]|[##1]}
<Const 0x20732 0x2.2> Δ-2 {[-10-]|[$$…]|[##1]|[#2]}
<Pointer.fp 0x20736 <LVAR -0x004 @>> Δ-4 {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
<Call 0x2073a 0x103b0> {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 20740-20744 StackAdj> Δ+24 {}
<Call 0x20744 0x10538> {}
IPC_Init(void)
<MI 2074a MOVEA.L (A6+0x8),A0> {}
<MI 2074e PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x20750 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20756-20758 StackAdj> Δ+4 {}
<Call 0x20758 0x1051a> {}
IPC_GetEnd(void)
<POP 2075e-20766 Epilogue> Σ0
@ 20766
<LVAR -0x002 @ 1(r)>
<LVAR -0x006 @ 4(r)>
<LVAR -0x008 @ 1(r)>
<LVAR -0x00c @ 4(r)>
<POP 20766-20834 Body> Δ+4
<POP 20766-2077c Prologue> Σ0 ↓
<POP 2077c-2078e RegCacheLoad> Σ0 ↓
<POP 2078e-207ca Naked> Σ0 ↓ →0x2082c
<Blob 0x2078e [18] @> Δ-18 {[«18""»]}
<POP 2079a-2079c StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x2079c 18> {[«18""»]|[$$COPYRIGHT_INFO.TXT]}
<POP 207ae-207b0 StackAdj> Δ-2 {[«18""»]|[$$COPYRIGHT_INFO.TXT]|[-2-]}
<MI 207b0 CLR.B (A7)> {[«18""»]|[$$COPYRIGHT_INFO.TXT]|[-2-]}
<MI 207b2 CLR.B -(A7)> Δ-2 {[«18""»]|[$$COPYRIGHT_INFO.TXT]|[-2-]|[#0]}
<Const 0x207b4 0x0.4> Δ-4 {[«18""»]|[$$COPYRIGHT_INFO.TXT]|[-2-]|[#0]|[##0]}
<Pointer.fp 0x207b8 <LVAR -0x008 @ 1(r)>> Δ-4 {[«18""»]|[$$COPYRIGHT_INFO.TXT]|[-2-]|[#0]|[##0]|[@@-8]}
<Pointer.fp 0x207ba <LVAR -0x00c @ 4(r)>> Δ-4 {[«18""»]|[$$COPYRIGHT_INFO.TXT]|[-2-]|[#0]|[##0]|[@@-8]|[@@-12]}
<Call 0x207bc 0x10380> {[«18""»]|[$$COPYRIGHT_INFO.TXT]|[-2-]|[#0]|[##0]|[@@-8]|[@@-12]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 207c2-207c6 StackAdj> Δ+38 {}
<MI 207c6 TST.B (A6-0x8)> {}
<MI 207c8 BNE 0x2082c> {}
<POP 207ca-207d0 Naked> Σ0 ↓
<Call 0x207ca 0x103dc> {}
WriteConsoleCrLf(void)
<POP 207d0-207ea Naked> Σ0 ↓ →0x207f4 ←0x207fc
<Pointer.fp 0x207d0 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x207d2 0x102b8> {[@@-6]}
NewString(VAR a : String)
<MI 207d8 MOVE.L (A6-0xc),(A7)> {[4, '(A6-0xc)']}
<Pointer.fp 0x207da <LVAR -0x006 @ 4(r)>> Δ-4 {[4, '(A6-0xc)']|[@@-6]}
<Pointer.fp 0x207dc <LVAR -0x002 @ 1(r)>> Δ-4 {[4, '(A6-0xc)']|[@@-6]|[@@-2]}
<Call 0x207de 0x1043c> {[4, '(A6-0xc)']|[@@-6]|[@@-2]}
FileReadLine(file : File; VAR a : String; VAR b : Byte)
<POP 207e4-207e6 StackAdj> Δ+12 {}
<MI 207e6 TST.B (A6-0x2)> {}
<MI 207e8 BNE 0x207f4> {}
<POP 207ea-207f4 Naked> Σ0 Δ-4 →0x207fc
<MI 207ea MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x207ec 0x103e0> {[4, '(A6-0x6)']}
WriteConsoleStringCrLf(str : String)
<MI 207f2 BRA 0x207fc> {[4, '(A6-0x6)']}
<POP 207f4-207fc Naked> Σ0 Δ-4 ↓ ←0x207d0
<Pointer.fp 0x207f4 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x207f6 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 207fc-20802 Naked> Σ-4 Δ+4 ↓ →0x207d0 ←0x207ea
<POP 207fc-207fe StackAdj> Δ+4 {}
<MI 207fe TST.B (A6-0x2)> {}
<MI 20800 BEQ 0x207d0> {}
<POP 20802-2082c Naked> Σ0 ↓
<Call 0x20802 0x103dc> {}
WriteConsoleCrLf(void)
<MI 20808 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x2080a 0x2.2> Δ-2 {[#0]|[#2]}
<Const 0x2080e 0x1.4> Δ-4 {[#0]|[#2]|[##1]}
<Pointer.fp 0x20812 <LVAR -0x008 @ 1(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-8]}
<Pointer.fp 0x20814 <LVAR -0x00c @ 4(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-8]|[@@-12]}
<Call 0x20816 0x1038c> {[#0]|[#2]|[##1]|[@@-8]|[@@-12]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 2081c-2081e StackAdj> Δ+12 {[#0]|[#2]}
<POP 2081e-2081f StackAdj> Δ+4 {}
<Const 0x2081f 0x2faee.4> Δ-4 {[##195310]}
<Call 0x20824 0x10224> {[##195310]}
KC12_Sleep(dur: Long)
<POP 2082a-2082c StackAdj> Δ+4 {}
<POP 2082c-20834 Epilogue> Σ0 ←0x2078e
@ 20834
<LVAR 0x008 4(r)>
<POP 20834-208ce Body>
<POP 20834-2084a Prologue> Σ0 ↓
<POP 2084a-2084e RegCacheLoad> Σ0 ↓
<POP 2084e-20856 Naked> Σ0 ↓ →0x2085e
<MI 2084e TST.B 0x23ec4> {}
<MI 20854 BEQ 0x2085e> {}
<POP 20856-2085e Naked> Σ0 ↓
<MI 20856 MOVEA.L (A6+0x8),A0> {}
<MI 20858 ORI.W #0x4000,(A0+0x4)> {}
<POP 2085e-20866 Naked> Σ0 ↓ →0x2086e ←0x2084e
<MI 2085e TST.B 0x23ec5> {}
<MI 20864 BEQ 0x2086e> {}
<POP 20866-2086e Naked> Σ0 ↓
<MI 20866 MOVEA.L (A6+0x8),A0> {}
<MI 20868 ORI.W #0x2000,(A0+0x4)> {}
<POP 2086e-20876 Naked> Σ0 ↓ →0x2087e ←0x2085e
<MI 2086e TST.B 0x23ec6> {}
<MI 20874 BEQ 0x2087e> {}
<POP 20876-2087e Naked> Σ0 ↓
<MI 20876 MOVEA.L (A6+0x8),A0> {}
<MI 20878 ORI.W #0x1000,(A0+0x4)> {}
<POP 2087e-20886 Naked> Σ0 ↓ →0x2088e ←0x2086e
<MI 2087e TST.B 0x23ec9> {}
<MI 20884 BEQ 0x2088e> {}
<POP 20886-2088e Naked> Σ0 ↓
<MI 20886 MOVEA.L (A6+0x8),A0> {}
<MI 20888 ORI.W #0x0200,(A0+0x4)> {}
<POP 2088e-20896 Naked> Σ0 ↓ →0x2089e ←0x2087e
<MI 2088e TST.B 0x23eca> {}
<MI 20894 BEQ 0x2089e> {}
<POP 20896-2089e Naked> Σ0 ↓
<MI 20896 MOVEA.L (A6+0x8),A0> {}
<MI 20898 ORI.W #0x0100,(A0+0x4)> {}
<POP 2089e-208aa Naked> Σ0 ↓ →0x208b2 ←0x2088e
<MI 2089e MOVE.B 0x23e98,D0> {}
<MI 208a4 LSL.B #0x7,D0> {}
<MI 208a6 LSR.B #0x7,D0> {}
<MI 208a8 BEQ 0x208b2> {}
<POP 208aa-208b2 Naked> Σ0 ↓
<MI 208aa MOVEA.L (A6+0x8),A0> {}
<MI 208ac ORI.W #0x0800,(A0+0x4)> {}
<POP 208b2-208be Naked> Σ0 ↓ →0x208c6 ←0x2089e
<MI 208b2 MOVE.B 0x23e98,D0> {}
<MI 208b8 LSL.B #0x6,D0> {}
<MI 208ba LSR.B #0x7,D0> {}
<MI 208bc BEQ 0x208c6> {}
<POP 208be-208c6 Naked> Σ0 ↓
<MI 208be MOVEA.L (A6+0x8),A0> {}
<MI 208c0 ORI.W #0x0400,(A0+0x4)> {}
<POP 208c6-208ce Epilogue> Σ0 ←0x208b2
@ 208ce
<LVAR -0x004 @>
<POP 208ce-2094e Body>
<POP 208ce-208e4 Prologue> Σ0 ↓
<POP 208e4-20946 Naked> Σ0 ↓
<Call 0x208e4 0x10538> {}
IPC_Init(void)
<MI 208ea CLR.B -(A7)> Δ-2 {[#0]}
<Call 0x208ec 0x10502> {[#0]}
IPC_PutBool(a : Bool)
<POP 208f2-208f4 StackAdj> Δ+2 {}
<Call 0x208f4 0x10514> {}
IPC_PutEnd(void)
<Blob 0x208fa [10] @> Δ-10 {[«10""»]}
<POP 2090c-2090e StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x2090e 9> {[«10""»]|[$$CONFIGURE]}
<Const 0x20922 0x1.4> Δ-4 {[«10""»]|[$$CONFIGURE]|[##1]}
<Const 0x20926 0x2.2> Δ-2 {[«10""»]|[$$CONFIGURE]|[##1]|[#2]}
<Pointer.fp 0x2092a <LVAR -0x004 @>> Δ-4 {[«10""»]|[$$CONFIGURE]|[##1]|[#2]|[@@-4]}
<Call 0x2092e 0x103b0> {[«10""»]|[$$CONFIGURE]|[##1]|[#2]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 20934-20938 StackAdj> Δ+24 {}
<Const 0x20938 0x241be.4> Δ-4 {[##147902]}
<Call 0x2093e 0x105a4> {[##147902]}
Read_fc0c() : Word
<POP 20944-20946 StackAdj> Δ+4 {}
<POP 20946-2094e Epilogue> Σ0
@ 2094e
<POP 2094e-2099a Body>
<POP 2094e-20964 Prologue> Σ0 ↓
<POP 20964-2096a RegCacheLoad> Σ0 ↓
<POP 2096a-20992 Naked> Σ0 ↓
<MI 2096a CLR.W 0x241d4> {}
<MI 2096c CLR.L D0> {}
<MI 2096e MOVE.W 0x241d4,D0> {}
<MI 20970 MOVE.L D0,D1> {}
<MI 20972 ASL.L #0x8,D1> {}
<MI 20974 ASL.L #0x4,D1> {}
<MI 20976 ADDQ.L #0x4,D0> {}
<MI 20978 ASL.L #0x8,D0> {}
<MI 2097a ADD.L D1,D0> {}
<MI 2097c ADDI.L #0x00000080,D0> {}
<POP 0x20982 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 2098c MOVE.W D0,0x241d2> {}
<POP 20992-2099a Epilogue> Σ0
@ 2099a
<LVAR 0x008 1(r)>
<LVAR -0x003 1(r)>
<LVAR -0x004 1(w)>
<LVAR -0x005 1(w)>
<LVAR -0x006 1(w) 4(r)>
<LVAR -0x007 1(w)>
<LVAR -0x008 1(w)>
<LVAR -0x009 1(w)>
<LVAR -0x00a 1(w) 4(r)>
<LVAR -0x00b @ 1(r)>
<LVAR -0x00c 1(r)>
<LVAR -0x00d @ 1(r)>
<LVAR -0x00e @ 1(r)>
<LVAR -0x00f @ 1(r)>
<LVAR -0x010 1(r)>
<LVAR -0x011 @ 1(r)>
<LVAR -0x012 @ 1(r)>
<POP 2099a-20ad6 Body> Δ+72
<POP 2099a-209b0 Prologue> Σ0 ↓
<POP 209b0-209c2 RegCacheLoad> Σ0 ↓
<POP 209c2-209de Naked> Σ0 →0x20a44 →0x20a2c →0x209fa →0x20a14 →0x20a5c →0x20a5c →0x20a5c →0x20a5c
<MI 209c2 MOVE.B (A6+0x8),D0> {}
<MI 209c6 EXTB.W D0> {}
<MI 209c8 MOVE.W D0,D1> {}
<MI 209ca SUBQ.W #0x2,D1> {}
<POP 0x209cc LimitCheck 0x0 ≤ D1 ≤ 0xd> {}
<MI 209d4 ADD.W D1,D1> {}
<MI 209d6 SWITCH D1.W> {}
<POP 209fa-20a10 Naked> Σ0 Δ-24 ↓ ←0x209c2
<Pointer.fp 0x209fa <LVAR -0x012 @ 1(r)>> Δ-4 {[@@-18]}
<Pointer.fp 0x209fc <LVAR -0x011 @ 1(r)>> Δ-4 {[@@-18]|[@@-17]}
<Pointer.fp 0x209fe <LVAR -0x00f @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]}
<Pointer.fp 0x20a00 <LVAR -0x00e @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]}
<Pointer.fp 0x20a02 <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]}
<Pointer.fp 0x20a06 <LVAR -0x00b @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<Call 0x20a0a 0x23476> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
<POP 20a10-20a14 Naked> Σ-24 Δ+24 →0x20a78 ←0x20a14 ←0x20a2c ←0x20a44
<POP 20a10-20a12 StackAdj> Δ+24 {}
<MI 20a12 BRA 0x20a78> {}
<POP 20a14-20a2c Naked> Σ0 Δ-24 →0x20a10 ←0x209c2
<Pointer.fp 0x20a14 <LVAR -0x012 @ 1(r)>> Δ-4 {[@@-18]}
<Pointer.fp 0x20a16 <LVAR -0x011 @ 1(r)>> Δ-4 {[@@-18]|[@@-17]}
<Pointer.fp 0x20a18 <LVAR -0x00f @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]}
<Pointer.fp 0x20a1a <LVAR -0x00e @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]}
<Pointer.fp 0x20a1c <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]}
<Pointer.fp 0x20a20 <LVAR -0x00b @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<Call 0x20a24 0x2352e> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
<MI 20a2a BRA 0x20a10> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<POP 20a2c-20a44 Naked> Σ0 Δ-24 →0x20a10 ←0x209c2
<Pointer.fp 0x20a2c <LVAR -0x012 @ 1(r)>> Δ-4 {[@@-18]}
<Pointer.fp 0x20a2e <LVAR -0x011 @ 1(r)>> Δ-4 {[@@-18]|[@@-17]}
<Pointer.fp 0x20a30 <LVAR -0x00f @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]}
<Pointer.fp 0x20a32 <LVAR -0x00e @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]}
<Pointer.fp 0x20a34 <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]}
<Pointer.fp 0x20a38 <LVAR -0x00b @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<Call 0x20a3c 0x23348> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
<MI 20a42 BRA 0x20a10> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<POP 20a44-20a5c Naked> Σ0 Δ-24 →0x20a10 ←0x209c2
<Pointer.fp 0x20a44 <LVAR -0x012 @ 1(r)>> Δ-4 {[@@-18]}
<Pointer.fp 0x20a46 <LVAR -0x011 @ 1(r)>> Δ-4 {[@@-18]|[@@-17]}
<Pointer.fp 0x20a48 <LVAR -0x00f @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]}
<Pointer.fp 0x20a4a <LVAR -0x00e @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]}
<Pointer.fp 0x20a4c <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]}
<Pointer.fp 0x20a50 <LVAR -0x00b @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<Call 0x20a54 0x233fc> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
exp_READ_NOVRAM_DATA.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
<MI 20a5a BRA 0x20a10> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<POP 20a5c-20a78 Naked> Σ0 ↓ ←0x209c2 ←0x209c2 ←0x209c2 ←0x209c2
<MI 20a5c MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Pointer.fp 0x20a5e <LVAR -0x012 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]}
<Pointer.fp 0x20a60 <LVAR -0x011 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]}
<Pointer.fp 0x20a62 <LVAR -0x00f @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]}
<Pointer.fp 0x20a64 <LVAR -0x00e @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]}
<Pointer.fp 0x20a66 <LVAR -0x00d @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]}
<Pointer.fp 0x20a6a <LVAR -0x00b @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<Call 0x20a6e 0x235ec> {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<POP 20a74-20a78 StackAdj> Δ+26 {}
<POP 20a78-20a7e Naked> Σ0 ↓ →0x20ace ←0x20a10
<MI 20a78 TST.B (A6-0xb)> {}
<MI 20a7c BEQ 0x20ace> {}
<POP 20a7e-20ace Naked> Σ0 ↓
<MI 20a7e MOVE.B (A6-0x12),(A6-0xa)> {}
<MI 20a82 MOVE.B (A6-0x11),(A6-0x9)> {}
<MI 20a86 MOVE.B (A6-0x10),(A6-0x8)> {}
<MI 20a8c MOVE.B (A6-0xf),(A6-0x7)> {}
<MI 20a90 MOVE.B (A6-0xe),(A6-0x6)> {}
<MI 20a94 MOVE.B (A6-0xd),(A6-0x5)> {}
<MI 20a9a MOVE.B (A6-0xc),(A6-0x4)> {}
<MI 20aa0 CLR.B (A6-0x3)> {}
<MI 20aa4 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<MI 20aa8 MOVE.L (A6-0xa),-(A7)> Δ-4 {[4, '(A6-0x6)']|[4, '(A6-0xa)']}
<MI 20aac PEA.L (A7)> Δ-4 {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']}
<Const 0x20aae 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']|[##0]}
<Const 0x20ab2 0x7.4> Δ-4 {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']|[##0]|[##7]}
<MI 20ab6 ASL.W #0x3,D0> {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']|[##0]|[##7]}
<MI 20ab8 LEA.L 0x23e90,A0> {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']|[##0]|[##7]}
<MI 20abe LEA.L (A0+D0.W),A0> {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']|[##0]|[##7]}
<MI 20ac2 PEA.L (A0+0x34a)> Δ-4 {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']|[##0]|[##7]|[4, '^(A0+0x34a)']}
<Call 0x20ac6 0x104b4> {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']|[##0]|[##7]|[4, '^(A0+0x34a)']}
?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
<POP 20acc-20ace StackAdj> Δ+24 {}
<POP 20ace-20ad6 Epilogue> Σ0 ←0x20a78
@ 20ad6
<LVAR -0x001 1(r)>
<LVAR -0x002 1(w)>
<LVAR -0x003 1(w)>
<LVAR -0x004 1(w) 4(r)>
<LVAR -0x005 1(w)>
<LVAR -0x006 1(w)>
<LVAR -0x007 1(w)>
<LVAR -0x008 1(w) 4(r)>
<POP 20ad6-20ba2 Body>
<POP 20ad6-20aec Prologue> Σ0 ↓
<POP 20aec-20af6 RegCacheLoad> Σ0 ↓
<POP 20af6-20b9a Naked> Σ0 ↓
<POP 20af6-20af8 StackAdj> Δ-2 {[-2-]}
<Const 0x20af8 0x101.4> Δ-4 {[-2-]|[##257]}
<Call 0x20afc 0x10592> {[-2-]|[##257]}
ReadConfig(where : Long) : Word
<POP 20afe-20b00 StackAdj> Δ+4 {[-2-]}
<MI 20b00 MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20b02 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20b04 MOVE.B D0,(A6-0x8)> {}
<POP 20b08-20b0a StackAdj> Δ-2 {[-2-]}
<Const 0x20b0a 0x102.4> Δ-4 {[-2-]|[##258]}
<Call 0x20b0e 0x10592> {[-2-]|[##258]}
ReadConfig(where : Long) : Word
<POP 20b10-20b12 StackAdj> Δ+4 {[-2-]}
<MI 20b12 MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20b14 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20b16 MOVE.B D0,(A6-0x7)> {}
<POP 20b1a-20b1c StackAdj> Δ-2 {[-2-]}
<Const 0x20b1c 0x103.4> Δ-4 {[-2-]|[##259]}
<Call 0x20b20 0x10592> {[-2-]|[##259]}
ReadConfig(where : Long) : Word
<POP 20b22-20b24 StackAdj> Δ+4 {[-2-]}
<MI 20b24 MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20b26 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20b28 MOVE.B D0,(A6-0x6)> {}
<POP 20b2c-20b2e StackAdj> Δ-2 {[-2-]}
<Const 0x20b2e 0x104.4> Δ-4 {[-2-]|[##260]}
<Call 0x20b32 0x10592> {[-2-]|[##260]}
ReadConfig(where : Long) : Word
<POP 20b34-20b36 StackAdj> Δ+4 {[-2-]}
<MI 20b36 MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20b38 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20b3a MOVE.B D0,(A6-0x5)> {}
<POP 20b3e-20b40 StackAdj> Δ-2 {[-2-]}
<Const 0x20b40 0x105.4> Δ-4 {[-2-]|[##261]}
<Call 0x20b44 0x10592> {[-2-]|[##261]}
ReadConfig(where : Long) : Word
<POP 20b46-20b48 StackAdj> Δ+4 {[-2-]}
<MI 20b48 MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20b4a LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20b4c MOVE.B D0,(A6-0x4)> {}
<POP 20b50-20b52 StackAdj> Δ-2 {[-2-]}
<Const 0x20b52 0x106.4> Δ-4 {[-2-]|[##262]}
<Call 0x20b56 0x10592> {[-2-]|[##262]}
ReadConfig(where : Long) : Word
<POP 20b58-20b5a StackAdj> Δ+4 {[-2-]}
<MI 20b5a MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20b5c LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20b5e MOVE.B D0,(A6-0x3)> {}
<POP 20b62-20b64 StackAdj> Δ-2 {[-2-]}
<Const 0x20b64 0x107.4> Δ-4 {[-2-]|[##263]}
<Call 0x20b68 0x10592> {[-2-]|[##263]}
ReadConfig(where : Long) : Word
<POP 20b6a-20b6c StackAdj> Δ+4 {[-2-]}
<MI 20b6c MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20b6e LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20b70 MOVE.B D0,(A6-0x2)> {}
<MI 20b74 CLR.B (A6-0x1)> {}
<MI 20b78 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 20b7c MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x4)']|[4, '(A6-0x8)']}
<MI 20b80 PEA.L (A7)> Δ-4 {[4, '(A6-0x4)']|[4, '(A6-0x8)']|[4, '^(A7)']}
<Const 0x20b82 0x0.4> Δ-4 {[4, '(A6-0x4)']|[4, '(A6-0x8)']|[4, '^(A7)']|[##0]}
<Const 0x20b86 0x7.4> Δ-4 {[4, '(A6-0x4)']|[4, '(A6-0x8)']|[4, '^(A7)']|[##0]|[##7]}
<Const 0x20b8a 0x241fa.4> Δ-4 {[4, '(A6-0x4)']|[4, '(A6-0x8)']|[4, '^(A7)']|[##0]|[##7]|[##147962]}
<Call 0x20b90 0x104b4> {[4, '(A6-0x4)']|[4, '(A6-0x8)']|[4, '^(A7)']|[##0]|[##7]|[##147962]}
?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
<POP 20b96-20b9a StackAdj> Δ+24 {}
<POP 20b9a-20ba2 Epilogue> Σ0
@ 20ba2
<POP 20ba2-20c26 Body>
<POP 20ba2-20bb8 Prologue> Σ0 ↓
<POP 20bb8-20bbe RegCacheLoad> Σ0 ↓
<POP 20bbe-20bc0 Naked> Σ0 ↓
<MI 20bbe MOVEQ.L #0x00,D7> {}
<POP 20bc0-20be2 Naked> Σ0 ↓ →0x20bc0 ←0x20bc0
<MI 20bc0 MOVE.B D7,D0> {}
<MI 20bc2 EXTB.W D0> {}
<MI 20bc4 ASL.W #0x3,D0> {}
<MI 20bc6 LEA.L 0x23e90,A0> {}
<MI 20bcc LEA.L (A0+D0.W),A0> {}
<MI 20bd0 MOVE.L 0x205aa,(A0+0x34a)> {}
<MI 20bd6 MOVE.L 0x205ae,(A0+0x34e)> {}
<MI 20bdc ADDQ.B #0x1,D7> {}
<MI 20bde CMP.B #0x0f,D7> {}
<MI 20be0 BLE 0x20bc0> {}
<POP 20be2-20c02 Naked> Σ0 ↓
<Call 0x20be2 0x20ad6> {}
<Const 0x20be6 0x2.2> Δ-2 {[#2]}
<Call 0x20bea 0x2099a> {[#2]}
<POP 20bec-20bed StackAdj> Δ+2 {}
<Const 0x20bed 0x3.2> Δ-2 {[#3]}
<Call 0x20bf0 0x2099a> {[#3]}
<POP 20bf2-20bf3 StackAdj> Δ+2 {}
<Const 0x20bf3 0x6.2> Δ-2 {[#6]}
<Call 0x20bf6 0x2099a> {[#6]}
<POP 20bf8-20bf9 StackAdj> Δ+2 {}
<Const 0x20bf9 0x7.2> Δ-2 {[#7]}
<Call 0x20bfc 0x2099a> {[#7]}
<POP 20bfe-20c00 StackAdj> Δ+2 {}
<MI 20c00 MOVEQ.L #0x0c,D7> {}
<POP 20c02-20c12 Naked> Σ0 ↓ →0x20c18 ←0x20c18
<POP 20c02-20c04 StackAdj> Δ-2 {[-2-]}
<MI 20c04 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x20c06 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20c0c-20c0e StackAdj> Δ+2 {[-2-]}
<MI 20c0e TST.B (A7)+> Δ+2 {}
<MI 20c10 BEQ 0x20c18> {}
<POP 20c12-20c18 Naked> Σ0 ↓
<MI 20c12 MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x20c14 0x2099a> {[2, 'D7']}
<POP 20c16-20c18 StackAdj> Δ+2 {}
<POP 20c18-20c1e Naked> Σ0 ↓ →0x20c02 ←0x20c02
<MI 20c18 ADDQ.B #0x1,D7> {}
<MI 20c1a CMP.B #0x0f,D7> {}
<MI 20c1c BLE 0x20c02> {}
<POP 20c1e-20c26 Epilogue> Σ0
@ 20c26
<LVAR 0x008 4(r)>
<LVAR -0x004 1(rw)>
<POP 20c26-20d3c Body>
<POP 20c26-20c3c Prologue> Σ0 ↓
<POP 20c3c-20c44 RegCacheLoad> Σ0 ↓
<POP 20c44-20c5e Naked> Σ0 ↓ →0x20c96
<Const 0x20c44 0x5.2> Δ-2 {[#5]}
<Const 0x20c48 0x2.2> Δ-2 {[#5]|[#2]}
<Call 0x20c4c 0x1048a> {[#5]|[#2]}
DiProcCmd(board : Byte; cmd : Byte)
<POP 20c52-20c54 StackAdj> Δ+4 {}
<MI 20c54 MOVE.B 0x241bf,D0> {}
<MI 20c5a LSR.B #0x7,D0> {}
<MI 20c5c BNE 0x20c96> {}
<POP 20c5e-20c70 Naked> Σ0 ↓ →0x20c78
<MI 20c5e MOVEA.L (A6+0x8),A0> {}
<MI 20c62 MOVE.B #0x01,(A0)> {}
<POP 20c64-20c66 StackAdj> Δ-2 {[-2-]}
<Call 0x20c66 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 20c6c TST.B (A7)+> Δ+2 {}
<MI 20c6e BEQ 0x20c78> {}
<POP 20c70-20c78 Naked> Σ0 →0x20c7e
<Call 0x20c70 0x232ee> {}
exp_LOAD_HRAM_8_0.FIU()
<MI 20c76 BRA 0x20c7e> {}
<POP 20c78-20c7e Naked> Σ0 ↓ ←0x20c5e
<Call 0x20c78 0x2330c> {}
exp_LOAD_HRAM_32_0.FIU()
<POP 20c7e-20c96 Naked> Σ0 ↓ ←0x20c70
<Call 0x20c7e 0x2338a> {}
exp_LOAD_HRAM_1.FIU()
<Call 0x20c84 0x235aa> {}
exp_ALIGN_CSA.VAL()
<Call 0x20c8a 0x23514> {}
exp_ALIGN_CSA.TYP()
<Call 0x20c90 0x105c2> {}
Or_fc0c_80(void)
<POP 20c96-20c9a Naked> Σ0 ↓ ←0x20c44
<MI 20c96 CLR.B (A6-0x4)> {}
<MI 20c98 MOVEQ.L #0x0c,D7> {}
<POP 20c9a-20caa Naked> Σ0 ↓ →0x20cb6 ←0x20cb6
<POP 20c9a-20c9c StackAdj> Δ-2 {[-2-]}
<MI 20c9c MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x20c9e 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20ca4-20ca6 StackAdj> Δ+2 {[-2-]}
<MI 20ca6 TST.B (A7)+> Δ+2 {}
<MI 20ca8 BEQ 0x20cb6> {}
<POP 20caa-20cb6 Naked> Σ0 ↓
<MI 20caa CLR.L D0> {}
<MI 20cac MOVE.B (A6-0x4),D0> {}
<MI 20cae ADDQ.W #0x1,D0> {}
<POP 0x20cb0 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20cb4 MOVE.B D0,(A6-0x4)> {}
<POP 20cb6-20cbc Naked> Σ0 ↓ →0x20c9a ←0x20c9a
<MI 20cb6 ADDQ.B #0x1,D7> {}
<MI 20cb8 CMP.B #0x0f,D7> {}
<MI 20cba BLE 0x20c9a> {}
<POP 20cbc-20cbe Naked> Σ0 ↓
<MI 20cbc MOVEQ.L #0x0c,D7> {}
<POP 20cbe-20cce Naked> Σ0 ↓ →0x20d10 ←0x20d10
<POP 20cbe-20cc0 StackAdj> Δ-2 {[-2-]}
<MI 20cc0 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x20cc2 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20cc8-20cca StackAdj> Δ+2 {[-2-]}
<MI 20cca TST.B (A7)+> Δ+2 {}
<MI 20ccc BEQ 0x20d10> {}
<POP 20cce-20d10 Naked> Σ0 ↓
<MI 20cce MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<POP 20cd0-20cd2 StackAdj> Δ-2 {[2, 'D7']|[-2-]}
<MI 20cd2 MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']|[-2-]|[2, 'D7']}
<Call 0x20cd4 0x104c6> {[2, 'D7']|[-2-]|[2, 'D7']}
EQ_1c218(a : Byte) : Bool
<POP 20cda-20cdc StackAdj> Δ+2 {[2, 'D7']|[-2-]}
<MI 20cdc MOVE.B (A7),D0> {[2, 'D7']|[-2-]}
<MI 20cde EXTB.W D0> {[2, 'D7']|[-2-]}
<POP 0x20ce0 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']|[-2-]}
<MI 20ce2 MOVE.B D0,(A7)> {[2, 'D7']|[-2-]}
<POP 20ce4-20ce6 StackAdj> Δ-2 {[2, 'D7']|[-4-]}
<Call 0x20ce6 0x104cc> {[2, 'D7']|[-4-]}
MemOnly2MB() : Bool
<MI 20cec MOVE.B (A7),D0> {[2, 'D7']|[-4-]}
<MI 20cee EXTB.W D0> {[2, 'D7']|[-4-]}
<POP 0x20cf0 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']|[-4-]}
<MI 20cf2 MOVE.B D0,(A7)> {[2, 'D7']|[-4-]}
<MI 20cf4 MOVE.B (A6-0x4),-(A7)> Δ-2 {[2, 'D7']|[-4-]|[2, '(A6-0x4)']}
<Call 0x20cf6 0x2386c> {[2, 'D7']|[-4-]|[2, '(A6-0x4)']}
<POP 20cfc-20cfe StackAdj> Δ+6 {[2, 'D7']}
<MI 20cfe MOVE.B D7,(A7)> {[-2-]}
<Call 0x20d00 0x23954> {[-2-]}
<MI 20d06 MOVE.B D7,(A7)> {[-2-]}
<Call 0x20d08 0x23a08> {[-2-]}
<POP 20d0e-20d10 StackAdj> Δ+2 {}
<POP 20d10-20d16 Naked> Σ0 ↓ →0x20cbe ←0x20cbe
<MI 20d10 ADDQ.B #0x1,D7> {}
<MI 20d12 CMP.B #0x0f,D7> {}
<MI 20d14 BLE 0x20cbe> {}
<POP 20d16-20d34 Naked> Σ0 ↓
<Call 0x20d16 0x233de> {}
exp_CLEAR_PARITY.FIU()
<Call 0x20d1c 0x2358c> {}
exp_CLEAR_PARITY.VAL()
<Call 0x20d22 0x234f6> {}
exp_CLEAR_PARITY.TYP()
<Call 0x20d28 0x23458> {}
exp_CLEAR_PARITY.SEQ()
<Call 0x20d2e 0x105b0> {}
FifoInit(void)
<POP 20d34-20d3c Epilogue> Σ0
@ 20d3c
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c @ 4(r)>
<LVAR 0x008 @ 4(r)>
<LVAR -0x004 @ 4(rw)>
<LVAR -0x006 @>
<LVAR -0x025 1(rw)>
<LVAR -0x026 @>
<LVAR -0x02a @>
<LVAR -0x02c @ 1(r)>
<POP 20d3c-20ee6 Body> Δ+30
<POP 20d3c-20d52 Prologue> Σ0 ↓
<POP 20d52-20d6a RegCacheLoad> Σ0 ↓
<POP 20d6a-20d72 Naked> Σ0 ↓ →0x20d84
<MI 20d6a MOVEA.L (A6+0x14),A0> {}
<MI 20d6e TST.B (A0)> {}
<MI 20d70 BEQ 0x20d84> {}
<POP 20d72-20d84 Naked> Σ0 →0x20d90
<MI 20d72 MOVEA.L (A6+0x10),A0> {}
<MI 20d76 LEA.L (A6-0x26),A1> {}
<BlockMove 32,A0,A1> {}
<MI 20d82 BRA 0x20d90> {}
<POP 20d84-20d90 Naked> Σ0 ↓ ←0x20d6a
<MI 20d84 LEA.L (A6-0x26),A1> {}
<BlockMove 32,A0,A1> {}
<POP 20d90-20d96 Naked> Σ0 ↓ →0x20da2 ←0x20d72 ←0x20ea0
<MI 20d90 TST.B (A6-0x25)> {}
<MI 20d94 BNE 0x20da2> {}
<POP 20d96-20da2 Naked> Σ0 Δ-30 →0x20e16
<Blob 0x20d96 [30] (A6-0x6)> Δ-30 {[«30»]}
<MI 20da0 BRA 0x20e16> {[«30»]}
<POP 20da2-20e02 Naked> Σ0 ↓ →0x20e28 ←0x20d90
<Blob 0x20da2 [2] @> Δ-2 {[«2""»]}
<Blob 0x20da6 [30] (A6-0x6)> Δ-30 {[«2""»]|[«30»]}
<Blob 0x20db0 [4] @> Δ-4 {[«2""»]|[«30»]|[«4""»]}
<POP 20db4-20db6 StackAdj> Δ-12 {[«2""»]|[«30»]|[«4""»]|[-12-]}
<MI 20db6 MOVE.L (A6+0xc),-(A7)> Δ-4 {[«2""»]|[«30»]|[«4""»]|[-12-]|[4, '(A6+0xc)']}
<Call 0x20dba 0x102cc> {[«2""»]|[«30»]|[«4""»]|[-12-]|[4, '(A6+0xc)']}
StringDup(a : String) : String
<Lit 0x20dc0 2> {[«2""»]|[«30»]|[«4""»]|[-12-]|[$$ []}
<POP 20dca-20dcc StackAdj> Δ-4 {[«2""»]|[«30»]|[«4""»]|[-12-]|[$$ []|[-4-]}
<Lit 0x20dcc> {[«2""»]|[«30»]|[«4""»]|[-12-]|[$$ []|[$$…]}
<Pointer.sp 0x20dcc 24> Δ-4
<Const 0x20dd0 0x1.2> Δ-2
<Const 0x20dd2 0x1e.2> Δ-2
<Call 0x20dd4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20dd6-20dd8 StackAdj> Δ+8
<POP 20dd6-20dd8 StackAdj> Δ-4 {[«2""»]|[«30»]|[«4""»]|[-12-]|[$$ []|[$$…]|[-4-]}
<Lit 0x20dd8 4> {[«2""»]|[«30»]|[«4""»]|[-12-]|[$$ []|[$$…]|[$$] :_]}
<Call 0x20de6 0x102d8> {[«2""»]|[«30»]|[«4""»]|[-12-]|[$$ []|[$$…]|[$$] :_]}
StringCat4(a, b, c, d : String) : String
<POP 20dec-20dee StackAdj> Δ+16 {[«2""»]|[«30»]|[«4""»]|[-8-]}
<Call 0x20dee 0x103e4> {[«2""»]|[«30»]|[«4""»]|[-8-]}
AskConsoleString(prompt : String) : String
<POP 20df4-20df6 StackAdj> Δ+4 {[«2""»]|[«30»]|[«4""»]|[-4-]}
<MI 20df6 MOVE.L (A7)+,(A6-0x4)> Δ+4 {[«2""»]|[«30»]|[«4""»]}
<POP 20df8-20dfc StackAdj> Δ+36 {}
<MI 20dfc MOVEA.L (A6-0x4),A0> {}
<MI 20dfe TST.W (A0)> {}
<MI 20e00 BNE 0x20e28> {}
<POP 20e02-20e16 Naked> Σ0 Δ-30 ↓
<Pointer.fp 0x20e02 <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x20e04 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 20e0a-20e0c StackAdj> Δ+4 {}
<Blob 0x20e0c [30] (A6-0x6)> Δ-30 {[«30»]}
<POP 20e16-20e28 Naked> Σ-30 Δ+30 ↓ ←0x20d96
<POP 20e16-20e18 StackAdj> Δ-4 {[-34-]}
<Lit 0x20e18> {[-30-]|[$$…]}
<Pointer.sp 0x20e18 4> Δ-4
<Const 0x20e1c 0x1.2> Δ-2
<Const 0x20e1e 0x1e.2> Δ-2
<Call 0x20e20 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20e22-20e24 StackAdj> Δ+8
<MI 20e24 MOVE.L (A7)+,(A6-0x4)> Δ+4 {[-30-]}
<POP 20e26-20e28 StackAdj> Δ+30 {}
<POP 20e28-20e48 Naked> Σ0 ↓ →0x20e64 ←0x20da2
<POP 20e28-20e2a StackAdj> Δ-4 {[-4-]}
<MI 20e2a MOVE.L (A6-0x4),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']}
<Call 0x20e2c 0x102f0> {[-4-]|[4, '(A6-0x4)']}
ToUpper(a : String) : String
<POP 20e32-20e34 StackAdj> Δ+4 {[-4-]}
<MI 20e34 MOVE.L (A7),(A6-0x4)> {[-4-]}
<MI 20e36 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']}
<MI 20e38 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']|[4, '(A6+0x8)']}
<Call 0x20e3c 0x10300> {[-4-]|[4, '(A6-0x4)']|[4, '(A6+0x8)']}
FSCALL_10300
<POP 20e42-20e44 StackAdj> Δ+8 {[-4-]}
<MI 20e44 TST.L (A7)+> Δ+4 {}
<MI 20e46 BNE 0x20e64> {}
<POP 20e48-20e64 Naked> Σ0 ↓
<POP 20e48-20e4a StackAdj> Δ-4 {[-4-]}
<MI 20e4a MOVE.L (A6-0x4),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']}
<POP 20e4c-20e4e StackAdj> Δ-4 {[-4-]|[4, '(A6-0x4)']|[-4-]}
<MI 20e4e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']|[-4-]|[4, '(A6+0x8)']}
<Call 0x20e52 0x102cc> {[-4-]|[4, '(A6-0x4)']|[-4-]|[4, '(A6+0x8)']}
StringDup(a : String) : String
<POP 20e58-20e5a StackAdj> Δ+4 {[-4-]|[4, '(A6-0x4)']|[-4-]}
<Call 0x20e5a 0x102d0> {[-4-]|[4, '(A6-0x4)']|[-4-]}
StringCat2(a, b : String) : String
<POP 20e60-20e62 StackAdj> Δ+8 {[-4-]}
<MI 20e62 MOVE.L (A7)+,(A6-0x4)> Δ+4 {}
<POP 20e64-20e86 Naked> Σ0 ↓ →0x20ea0 ←0x20e28
<MI 20e64 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 20e66 CLR.B -(A7)> Δ-2 {[4, '(A6-0x4)']|[#0]}
<Const 0x20e68 0x1.2> Δ-2 {[4, '(A6-0x4)']|[#0]|[#1]}
<Const 0x20e6a 0x0.4> Δ-4 {[4, '(A6-0x4)']|[#0]|[#1]|[##0]}
<Pointer.fp 0x20e6e <LVAR -0x02c @ 1(r)>> Δ-4 {[4, '(A6-0x4)']|[#0]|[#1]|[##0]|[@@-44]}
<Pointer.fp 0x20e72 <LVAR -0x02a @>> Δ-4 {[4, '(A6-0x4)']|[#0]|[#1]|[##0]|[@@-44]|[@@-42]}
<Call 0x20e76 0x10380> {[4, '(A6-0x4)']|[#0]|[#1]|[##0]|[@@-44]|[@@-42]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 20e7c-20e80 StackAdj> Δ+20 {}
<MI 20e80 TST.B (A6-0x2c)> {}
<MI 20e84 BNE 0x20ea0> {}
<POP 20e86-20ea0 Naked> Σ0 →0x20eb2
<MI 20e86 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x20e88 0x2.2> Δ-2 {[#0]|[#2]}
<Const 0x20e8a 0x1.4> Δ-4 {[#0]|[#2]|[##1]}
<Pointer.fp 0x20e8e <LVAR -0x02c @ 1(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-44]}
<Pointer.fp 0x20e92 <LVAR -0x02a @>> Δ-4 {[#0]|[#2]|[##1]|[@@-44]|[@@-42]}
<Call 0x20e96 0x1038c> {[#0]|[#2]|[##1]|[@@-44]|[@@-42]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 20e9c-20e9e StackAdj> Δ+16 {}
<MI 20e9e BRA 0x20eb2> {}
<POP 20ea0-20eb2 Naked> Σ0 →0x20d90 ←0x20e64
<Pointer.fp 0x20ea0 <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x20ea2 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 20ea8-20eaa StackAdj> Δ+4 {}
<MI 20eaa MOVE.B #0x01,(A6-0x25)> {}
<MI 20eae BRA 0x20d90> {}
<POP 20eb2-20ede Naked> Σ0 ↓ ←0x20e86
<MI 20eb2 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 20eb4 MOVEA.L (A6+0x14),A0> {[4, '(A6-0x4)']}
<MI 20eb8 PEA.L (A0+0x2)> Δ-4 {[4, '(A6-0x4)']|[4, '^(A0+0x2)']}
<Pointer.fp 0x20ebc <LVAR -0x006 @>> Δ-4 {[4, '(A6-0x4)']|[4, '^(A0+0x2)']|[@@-6]}
<Call 0x20ebe 0x1058c> {[4, '(A6-0x4)']|[4, '^(A0+0x2)']|[@@-6]}
FSCALL_1058c
<POP 20ec4-20ec6 StackAdj> Δ+12 {}
<Pointer.fp 0x20ec6 <LVAR 0x00c @ 4(r)>> Δ-4 {[@@12]}
<Call 0x20eca 0x102bc> {[@@12]}
FreeString(VAR a : String)
<POP 20ed0-20ed2 StackAdj> Δ+4 {}
<Pointer.fp 0x20ed2 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x20ed6 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 20edc-20ede StackAdj> Δ+4 {}
<POP 20ede-20ee6 Epilogue> Σ0
@ 20ee6
<LVAR 0x008 1(r)>
<LVAR -0x002 @>
<POP 20ee6-20f92 Body>
<POP 20ee6-20efc Prologue> Σ0 ↓
<POP 20efc-20f06 RegCacheLoad> Σ0 ↓
<POP 20f06-20f8a Naked> Σ0 ↓
<Blob 0x20f06 [14] @> Δ-14 {[«14""»]}
<Blob 0x20f12 [12] @> Δ-12 {[«14""»]|[«12""»]}
<Const 0x20f22 0x23ecb.4> Δ-4 {[«14""»]|[«12""»]|[##147147]}
<Const 0x20f28 0x2405d.4> Δ-4 {[«14""»]|[«12""»]|[##147147]|[##147549]}
<POP 20f2e-20f30 StackAdj> Δ-4 {[«14""»]|[«12""»]|[##147147]|[##147549]|[-4-]}
<Lit 0x20f30 14> {[«14""»]|[«12""»]|[##147147]|[##147549]|[$$Microcode file]}
<POP 20f3c-20f3e StackAdj> Δ-4 {[«14""»]|[«12""»]|[##147147]|[##147549]|[$$Microcode file]|[-4-]}
<Lit 0x20f3e 11> {[«14""»]|[«12""»]|[##147147]|[##147549]|[$$Microcode file]|[$$.M200_UCODE]}
<Call 0x20f4c 0x20d3c> {[«14""»]|[«12""»]|[##147147]|[##147549]|[$$Microcode file]|[$$.M200_UCODE]}
<POP 20f50-20f51 StackAdj> Δ+42 ↓ {}
<Blob 0x20f51 [30] 0x23ecd> Δ-30 {[«30»]}
<MI 20f62 CLR.B -(A7)> Δ-2 {[«30»]|[#0]}
<POP 20f64-20f66 StackAdj> Δ-4 {[«30»]|[#0]|[-4-]}
<Lit 0x20f66> {[«30»]|[#0]|[$$…]}
<Pointer.sp 0x20f66 6> Δ-4
<Const 0x20f6a 0x1.2> Δ-2
<Const 0x20f6c 0x1e.2> Δ-2
<Call 0x20f70 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20f72-20f74 StackAdj> Δ+8
<POP 20f72-20f74 StackAdj> Δ-2 {[«30»]|[#0]|[$$…]|[-2-]}
<MI 20f74 MOVE.B (A6+0x8),(A7)> {[«30»]|[#0]|[$$…]|[-2-]}
<Const 0x20f78 0x1.2> Δ-2 {[«30»]|[#0]|[$$…]|[-2-]|[#1]}
<MI 20f7a MOVE.B (A6+0x8),-(A7)> Δ-2 {[«30»]|[#0]|[$$…]|[-2-]|[#1]|[2, '(A6+0x8)']}
<Pointer.fp 0x20f7e <LVAR -0x002 @>> Δ-4 {[«30»]|[#0]|[$$…]|[-2-]|[#1]|[2, '(A6+0x8)']|[@@-2]}
<Call 0x20f82 0x2069e> {[«30»]|[#0]|[$$…]|[-2-]|[#1]|[2, '(A6+0x8)']|[@@-2]}
<POP 20f86-20f8a StackAdj> Δ+46 {}
<POP 20f8a-20f92 Epilogue> Σ0
@ 20f92
<LVAR -0x004 1(rw)>
<POP 20f92-210fe Body>
<POP 20f92-20fa8 Prologue> Σ0 ↓
<POP 20fa8-20fd0 RegCacheLoad> Σ0 ↓
<POP 20fd0-20fe2 Naked> Σ0 ↓ →0x20fe6
<Call 0x20fd0 0x234d4> {}
exp_LOAD_BENIGN_UWORD.TYP()
<POP 20fd6-20fd8 StackAdj> Δ-2 {[-2-]}
<Call 0x20fd8 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 20fde TST.B (A7)+> Δ+2 {}
<MI 20fe0 BEQ 0x20fe6> {}
<POP 20fe2-20fe6 Naked> Σ0 →0x20fea
<MI 20fe2 CLR.B (A6-0x4)> {}
<MI 20fe4 BRA 0x20fea> {}
<POP 20fe6-20fea Naked> Σ0 ↓ ←0x20fd0
<MI 20fe6 MOVE.B #0xff,(A6-0x4)> {}
<POP 20fea-20ff6 Naked> Σ0 ↓ →0x20ffe ←0x20fe2
<POP 20fea-20fec StackAdj> Δ-2 {[-2-]}
<Const 0x20fec 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x20fee 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20ff0-20ff2 StackAdj> Δ+2 {[-2-]}
<MI 20ff2 TST.B (A7)+> Δ+2 {}
<MI 20ff4 BEQ 0x20ffe> {}
<POP 20ff6-20ffe Naked> Σ0 ↓
<Const 0x20ff6 0xc.2> Δ-2 {[#12]}
<MI 20ff8 MOVE.B (A6-0x4),-(A7)> Δ-2 {[#12]|[2, '(A6-0x4)']}
<Call 0x20ffa 0x236f8> {[#12]|[2, '(A6-0x4)']}
<POP 20ffc-20ffe StackAdj> Δ+4 {}
<POP 20ffe-2100a Naked> Σ0 ↓ →0x21012 ←0x20fea
<POP 20ffe-21000 StackAdj> Δ-2 {[-2-]}
<Const 0x21000 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x21002 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 21004-21006 StackAdj> Δ+2 {[-2-]}
<MI 21006 TST.B (A7)+> Δ+2 {}
<MI 21008 BEQ 0x21012> {}
<POP 2100a-21012 Naked> Σ0 ↓
<Const 0x2100a 0xd.2> Δ-2 {[#13]}
<MI 2100c MOVE.B (A6-0x4),-(A7)> Δ-2 {[#13]|[2, '(A6-0x4)']}
<Call 0x2100e 0x236f8> {[#13]|[2, '(A6-0x4)']}
<POP 21010-21012 StackAdj> Δ+4 {}
<POP 21012-2101e Naked> Σ0 ↓ →0x21026 ←0x20ffe
<POP 21012-21014 StackAdj> Δ-2 {[-2-]}
<Const 0x21014 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x21016 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 21018-2101a StackAdj> Δ+2 {[-2-]}
<MI 2101a TST.B (A7)+> Δ+2 {}
<MI 2101c BEQ 0x21026> {}
<POP 2101e-21026 Naked> Σ0 ↓
<Const 0x2101e 0xe.2> Δ-2 {[#14]}
<MI 21020 MOVE.B (A6-0x4),-(A7)> Δ-2 {[#14]|[2, '(A6-0x4)']}
<Call 0x21022 0x236f8> {[#14]|[2, '(A6-0x4)']}
<POP 21024-21026 StackAdj> Δ+4 {}
<POP 21026-21032 Naked> Σ0 ↓ →0x2103a ←0x21012
<POP 21026-21028 StackAdj> Δ-2 {[-2-]}
<Const 0x21028 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x2102a 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2102c-2102e StackAdj> Δ+2 {[-2-]}
<MI 2102e TST.B (A7)+> Δ+2 {}
<MI 21030 BEQ 0x2103a> {}
<POP 21032-2103a Naked> Σ0 ↓
<Const 0x21032 0xf.2> Δ-2 {[#15]}
<MI 21034 MOVE.B (A6-0x4),-(A7)> Δ-2 {[#15]|[2, '(A6-0x4)']}
<Call 0x21036 0x236f8> {[#15]|[2, '(A6-0x4)']}
<POP 21038-2103a StackAdj> Δ+4 {}
<POP 2103a-2104c Naked> Σ0 ↓ →0x21052 ←0x21026
<Call 0x2103a 0x233a6> {}
exp_INIT_MRU.FIU()
<POP 21040-21042 StackAdj> Δ-2 {[-2-]}
<Const 0x21042 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x21044 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 21046-21048 StackAdj> Δ+2 {[-2-]}
<MI 21048 TST.B (A7)+> Δ+2 {}
<MI 2104a BEQ 0x21052> {}
<POP 2104c-21052 Naked> Σ0 ↓
<Const 0x2104c 0xc.2> Δ-2 {[#12]}
<Call 0x2104e 0x23ab2> {[#12]}
<POP 21050-21052 StackAdj> Δ+2 {}
<POP 21052-2105e Naked> Σ0 ↓ →0x21064 ←0x2103a
<POP 21052-21054 StackAdj> Δ-2 {[-2-]}
<Const 0x21054 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x21056 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 21058-2105a StackAdj> Δ+2 {[-2-]}
<MI 2105a TST.B (A7)+> Δ+2 {}
<MI 2105c BEQ 0x21064> {}
<POP 2105e-21064 Naked> Σ0 ↓
<Const 0x2105e 0xd.2> Δ-2 {[#13]}
<Call 0x21060 0x23ab2> {[#13]}
<POP 21062-21064 StackAdj> Δ+2 {}
<POP 21064-21070 Naked> Σ0 ↓ →0x21076 ←0x21052
<POP 21064-21066 StackAdj> Δ-2 {[-2-]}
<Const 0x21066 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x21068 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2106a-2106c StackAdj> Δ+2 {[-2-]}
<MI 2106c TST.B (A7)+> Δ+2 {}
<MI 2106e BEQ 0x21076> {}
<POP 21070-21076 Naked> Σ0 ↓
<Const 0x21070 0xe.2> Δ-2 {[#14]}
<Call 0x21072 0x23ab2> {[#14]}
<POP 21074-21076 StackAdj> Δ+2 {}
<POP 21076-21082 Naked> Σ0 ↓ →0x21088 ←0x21064
<POP 21076-21078 StackAdj> Δ-2 {[-2-]}
<Const 0x21078 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x2107a 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2107c-2107e StackAdj> Δ+2 {[-2-]}
<MI 2107e TST.B (A7)+> Δ+2 {}
<MI 21080 BEQ 0x21088> {}
<POP 21082-21088 Naked> Σ0 ↓
<Const 0x21082 0xf.2> Δ-2 {[#15]}
<Call 0x21084 0x23ab2> {[#15]}
<POP 21086-21088 StackAdj> Δ+2 {}
<POP 21088-210ba Naked> Σ0 ↓ →0x210c0 ←0x21076
<Const 0x21088 0x145.2> Δ-2 {[#325]}
<Call 0x2108a 0x234ba> {[#325]}
exp_PREP_RUN.TYP(Sw_2)
<POP 21090-21091 StackAdj> Δ+2 {}
<Const 0x21091 0x145.2> Δ-2 {[#325]}
<Call 0x21092 0x23572> {[#325]}
exp_PREP_RUN.VAL(Sw_2)
<POP 21098-21099 StackAdj> Δ+2 {}
<Const 0x21099 0x145.2> Δ-2 {[#325]}
<Call 0x2109a 0x23b50> {[#325]}
exp_PREP_RUN.IOC(Sw_2)
<POP 210a0-210a1 StackAdj> Δ+2 {}
<Const 0x210a1 0x145.2> Δ-2 {[#325]}
<Call 0x210a2 0x2343e> {[#325]}
exp_PREP_RUN.SEQ(Sw_2)
<POP 210a8-210a9 StackAdj> Δ+2 {}
<Const 0x210a9 0x145.2> Δ-2 {[#325]}
<Call 0x210aa 0x23370> {[#325]}
exp_PREP_RUN.FIU(Sw_2)
<Const 0x210b0 0xc.2> Δ-2 {[#325]|[#12]}
<Call 0x210b2 0x104c0> {[#325]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 210b4-210b6 StackAdj> Δ+2 {[#325]}
<MI 210b6 TST.B (A7)+> Δ+2 {}
<MI 210b8 BEQ 0x210c0> {}
<POP 210ba-210c0 Naked> Σ0 ↓
<Const 0x210ba 0xc.2> Δ-2 {[#12]}
<Call 0x210bc 0x23a08> {[#12]}
<POP 210be-210c0 StackAdj> Δ+2 {}
<POP 210c0-210cc Naked> Σ0 ↓ →0x210d2 ←0x21088
<POP 210c0-210c2 StackAdj> Δ-2 {[-2-]}
<Const 0x210c2 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x210c4 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 210c6-210c8 StackAdj> Δ+2 {[-2-]}
<MI 210c8 TST.B (A7)+> Δ+2 {}
<MI 210ca BEQ 0x210d2> {}
<POP 210cc-210d2 Naked> Σ0 ↓
<Const 0x210cc 0xd.2> Δ-2 {[#13]}
<Call 0x210ce 0x23a08> {[#13]}
<POP 210d0-210d2 StackAdj> Δ+2 {}
<POP 210d2-210de Naked> Σ0 ↓ →0x210e4 ←0x210c0
<POP 210d2-210d4 StackAdj> Δ-2 {[-2-]}
<Const 0x210d4 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x210d6 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 210d8-210da StackAdj> Δ+2 {[-2-]}
<MI 210da TST.B (A7)+> Δ+2 {}
<MI 210dc BEQ 0x210e4> {}
<POP 210de-210e4 Naked> Σ0 ↓
<Const 0x210de 0xe.2> Δ-2 {[#14]}
<Call 0x210e0 0x23a08> {[#14]}
<POP 210e2-210e4 StackAdj> Δ+2 {}
<POP 210e4-210f0 Naked> Σ0 ↓ →0x210f6 ←0x210d2
<POP 210e4-210e6 StackAdj> Δ-2 {[-2-]}
<Const 0x210e6 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x210e8 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 210ea-210ec StackAdj> Δ+2 {[-2-]}
<MI 210ec TST.B (A7)+> Δ+2 {}
<MI 210ee BEQ 0x210f6> {}
<POP 210f0-210f6 Naked> Σ0 ↓
<Const 0x210f0 0xf.2> Δ-2 {[#15]}
<Call 0x210f2 0x23a08> {[#15]}
<POP 210f4-210f6 StackAdj> Δ+2 {}
<POP 210f6-210fe Epilogue> Σ0 ←0x210e4
@ 210fe
<LVAR -0x002 @ 2(w)>
<LVAR -0x004 @>
<POP 210fe-21242 Body>
<POP 210fe-21114 Prologue> Σ0 ↓
<POP 21114-2112c RegCacheLoad> Σ0 ↓
<POP 2112c-21138 Naked> Σ0 ↓ →0x211a4
<Call 0x2112c 0x20f92> {}
<MI 21130 TST.B 0x23e9e> {}
<MI 21136 BEQ 0x211a4> {}
<POP 21138-21164 Naked> Σ0 Δ-58 ↓ →0x211a2
<Blob 0x21138 [58] @> Δ-58 {[«58""»]}
<POP 21144-21146 StackAdj> Δ-6 {[«58""»]|[-6-]}
<Lit 0x21146 58> {[«58""»]|[-2-]|[$$Do you want to enter the CLI prior to starting the machine]}
<POP 21154-21156 StackAdj> Δ-2 {[«58""»]|[-2-]|[$$Do you want to enter the CLI prior to starting the machine]|[-2-]}
<MI 21156 CLR.B (A7)> {[«58""»]|[-2-]|[$$Do you want to enter the CLI prior to starting the machine]|[-2-]}
<Call 0x21158 0x103f0> {[«58""»]|[-2-]|[$$Do you want to enter the CLI prior to starting the machine]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 2115e-21160 StackAdj> Δ+6 {[«58""»]|[-2-]}
<MI 21160 TST.B (A7)+> Δ+2 {[«58""»]}
<MI 21162 BEQ 0x211a2> {[«58""»]}
<POP 21164-211a2 Naked> Σ-58 ↓
<POP 21164-21166 StackAdj> Δ-4 {[-62-]}
<POP 21166-21167 StackAdj> Δ+2 {[-60-]}
<Blob 0x21167 [2] @> Δ-2 {[-60-]|[«2""»]}
<MI 2116a MOVE.B 0x201bd,(A7+0x1)> {[-60-]|[«2""»]}
<MI 21170 MOVE.B 0x201be,(A7+0x2)> {[-60-]|[«2""»]}
<POP 21176-21178 StackAdj> Δ-4 {[-60-]|[«2""»]|[-4-]}
<Lit 0x21178> {[-60-]|[«2""»]|[$$…]}
<Pointer.sp 0x21178 4> Δ-4
<Const 0x2117c 0x1.2> Δ-2
<Const 0x2117e 0x3.2> Δ-2
<Call 0x21182 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21188-2118a StackAdj> Δ+8
<Const 0x2118a 0x1.4> Δ-4 {[-60-]|[«2""»]|[$$…]|[##1]}
<Const 0x2118e 0x1.2> Δ-2 {[-60-]|[«2""»]|[$$…]|[##1]|[#1]}
<Pointer.fp 0x21190 <LVAR -0x004 @>> Δ-4 {[-60-]|[«2""»]|[$$…]|[##1]|[#1]|[@@-4]}
<Call 0x21194 0x103b0> {[-60-]|[«2""»]|[$$…]|[##1]|[#1]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 2119a-2119e StackAdj> Δ+18 {[-58-]}
<Call 0x2119e 0x20f92> {[-58-]}
<POP 211a2-211a4 Naked> Σ-58 Δ+58 ↓ ←0x21138
<POP 211a2-211a4 StackAdj> Δ+58 {}
<POP 211a4-211ce Naked> Σ0 ↓ →0x211d4 ←0x2112c
<Call 0x211a4 0x233c0> {}
exp_FREEZE_WORLD.FIU()
<Call 0x211aa 0x2349e> {}
exp_RUN_NORMAL.TYP()
<Call 0x211b0 0x23556> {}
exp_RUN_NORMAL.VAL()
<Call 0x211b6 0x23424> {}
exp_RUN_CHECK.SEQ()
<Call 0x211bc 0x23b36> {}
exp_RUN_CHECK.IOC()
<POP 211c2-211c4 StackAdj> Δ-2 {[-2-]}
<Const 0x211c4 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x211c6 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 211c8-211ca StackAdj> Δ+2 {[-2-]}
<MI 211ca TST.B (A7)+> Δ+2 {}
<MI 211cc BEQ 0x211d4> {}
<POP 211ce-211d4 Naked> Σ0 ↓
<Const 0x211ce 0xc.2> Δ-2 {[#12]}
<Call 0x211d0 0x237be> {[#12]}
<POP 211d2-211d4 StackAdj> Δ+2 {}
<POP 211d4-211e0 Naked> Σ0 ↓ →0x211e6 ←0x211a4
<POP 211d4-211d6 StackAdj> Δ-2 {[-2-]}
<Const 0x211d6 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x211d8 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 211da-211dc StackAdj> Δ+2 {[-2-]}
<MI 211dc TST.B (A7)+> Δ+2 {}
<MI 211de BEQ 0x211e6> {}
<POP 211e0-211e6 Naked> Σ0 ↓
<Const 0x211e0 0xd.2> Δ-2 {[#13]}
<Call 0x211e2 0x237be> {[#13]}
<POP 211e4-211e6 StackAdj> Δ+2 {}
<POP 211e6-211f2 Naked> Σ0 ↓ →0x211f8 ←0x211d4
<POP 211e6-211e8 StackAdj> Δ-2 {[-2-]}
<Const 0x211e8 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x211ea 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 211ec-211ee StackAdj> Δ+2 {[-2-]}
<MI 211ee TST.B (A7)+> Δ+2 {}
<MI 211f0 BEQ 0x211f8> {}
<POP 211f2-211f8 Naked> Σ0 ↓
<Const 0x211f2 0xe.2> Δ-2 {[#14]}
<Call 0x211f4 0x237be> {[#14]}
<POP 211f6-211f8 StackAdj> Δ+2 {}
<POP 211f8-21204 Naked> Σ0 ↓ →0x2120a ←0x211e6
<POP 211f8-211fa StackAdj> Δ-2 {[-2-]}
<Const 0x211fa 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x211fc 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 211fe-21200 StackAdj> Δ+2 {[-2-]}
<MI 21200 TST.B (A7)+> Δ+2 {}
<MI 21202 BEQ 0x2120a> {}
<POP 21204-2120a Naked> Σ0 ↓
<Const 0x21204 0xf.2> Δ-2 {[#15]}
<Call 0x21206 0x237be> {[#15]}
<POP 21208-2120a StackAdj> Δ+2 {}
<POP 2120a-2123a Naked> Σ0 ↓ ←0x211f8
<Call 0x2120a 0x2332c> {}
exp_RUN_NORMAL.FIU()
<MI 21210 MOVE.W #0x01,(A6-0x2)> {}
<MI 21214 LEA.L (A6-0x2),A0> {}
<MI 21218 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2121a ADDQ.L #0x1,(A7)> {[-4-]}
<Const 0x2121c 0xfc10.4> Δ-4 {[-4-]|[##64528]}
<Const 0x21222 0x1.2> Δ-2 {[-4-]|[##64528]|[#1]}
<Call 0x21224 0x10238> {[-4-]|[##64528]|[#1]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 2122a-2122c StackAdj> Δ+6 {[-4-]}
<POP 2122c-2122d StackAdj> Δ+4 {}
<Const 0x2122d 0x9896.4> Δ-4 {[##39062]}
<Call 0x21232 0x10224> {[##39062]}
KC12_Sleep(dur: Long)
<POP 21238-2123a StackAdj> Δ+4 {}
<POP 2123a-21242 Epilogue> Σ0
@ 21242
<LVAR 0x00c 1(w)>
<LVAR 0x008 4(r)>
<LVAR -0x00c @ 4(rw)>
<POP 21242-21312 Body>
<POP 21242-21258 Prologue> Σ0 ↓
<POP 21258-21260 RegCacheLoad> Σ0 ↓
<POP 21260-21262 Naked> Σ0 ↓
<MI 21260 MOVEQ.L #0x00,D7> {}
<POP 21262-212b4 Naked> Σ0 ↓ →0x212c0 ←0x212c0
<MI 21262 MOVE.L D7,D4> {}
<MI 21264 MOVEQ.L #0x0a,D3> {}
<Call 0x21266 0x1028c> {}
?muls_d3_d4
<MI 2126c LEA.L 0x205b2,A0> {}
<Blob 0x21270 [10] (A0+D4.L)> Δ-10 {[«10»]}
<POP 21280-21282 StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x21282> {[«10»]|[$$…]}
<Pointer.sp 0x21282 4> Δ-4
<Const 0x21286 0x1.2> Δ-2
<Const 0x21288 0xa.2> Δ-2
<Call 0x2128a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21290-21292 StackAdj> Δ+8
<MI 21292 MOVE.L (A7)+,(A6-0xc)> Δ+4 {[«10»]}
<POP 21294-21296 StackAdj> Δ+4 {[-6-]}
<MI 21296 MOVE.L (A6+0x8),(A7)> {[-2-]|[4, '(A6+0x8)']}
<MI 2129a MOVE.L (A6-0xc),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0xc)']}
<Call 0x2129c 0x102c8> {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0xc)']}
StringEqual(a, b : String) : Byte
<POP 212a2-212a4 StackAdj> Δ+8 {[-2-]}
<MI 212a4 MOVE.B (A7)+,D6> Δ+2 {}
<Pointer.fp 0x212a6 <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x212a8 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<POP 212ae-212b0 StackAdj> Δ+4 {}
<MI 212b0 TST.B D6> {}
<MI 212b2 BEQ 0x212c0> {}
<POP 212b4-212c0 Naked> Σ0 →0x2130a
<MI 212b4 LEA.L 0x20602,A0> {}
<MI 212b8 MOVE.B (A0+D7.L),(A6+0xc)> {}
<MI 212be BRA 0x2130a> {}
<POP 212c0-212ca Naked> Σ0 ↓ →0x21262 ←0x21262
<MI 212c0 ADDQ.L #0x1,D7> {}
<MI 212c2 CMPI.L #0x00000007,D7> {}
<MI 212c8 BLE 0x21262> {}
<POP 212ca-2130a Naked> Σ0 ↓
<Blob 0x212ca [22] @> Δ-22 {[«22""»]}
<Const 0x212dc 0xe.2> Δ-2 {[«22""»]|[#14]}
<POP 212e0-212e2 StackAdj> Δ-8 {[«22""»]|[#14]|[-8-]}
<Lit 0x212e2 21> {[«22""»]|[#14]|[-4-]|[$$Unknown stack KIND :_]}
<POP 212f2-212f4 StackAdj> Δ-4 {[«22""»]|[#14]|[-4-]|[$$Unknown stack KIND :_]|[-4-]}
<MI 212f4 MOVE.L (A6+0x8),(A7)> {[«22""»]|[#14]|[-4-]|[$$Unknown stack KIND :_]|[4, '(A6+0x8)']}
<Call 0x212f8 0x102d0> {[«22""»]|[#14]|[-4-]|[$$Unknown stack KIND :_]|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 212fe-21300 StackAdj> Δ+8 {[«22""»]|[#14]|[-4-]}
<Call 0x21300 0x103b8> {[«22""»]|[#14]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 21306-2130a StackAdj> Δ+28 {}
<POP 2130a-21312 Epilogue> Σ0 ←0x212b4
@ 21312
<LVAR 0x00e 4(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<LVAR -0x002 2(w)>
<LVAR -0x004 2(w) 4(r)>
<LVAR -0x006 2(w)>
<LVAR -0x008 2(w) 4(r)>
<LVAR -0x418 @>
<LVAR -0x41e @ 1(r)>
<POP 21312-21462 Body>
<POP 21312-21328 Prologue> Σ0 ↓
<POP 21328-2133c RegCacheLoad> Σ0 ↓
<POP 2133c-2136a Naked> Σ0 ↓ →0x2145a
<MI 2133c MOVE.L (A6+0xa),-(A7)> Δ-4 {[4, '(A6+0xa)']}
<Blob 0x21340 [4] 0x241d6> Δ-4 {[4, '(A6+0xa)']|[«4»]}
<Const 0x21346 0x400.2> Δ-2 {[4, '(A6+0xa)']|[«4»]|[#1024]}
<Call 0x2134a 0x10238> {[4, '(A6+0xa)']|[«4»]|[#1024]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 21350-21352 StackAdj> Δ+10 {}
<MI 21352 MOVEA.L (A6+0xe),A0> {}
<MI 21356 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 21358 CLR.W -(A7)> Δ-2 {[4, 'A0']|[#0]}
<Call 0x2135a 0x1023c> {[4, 'A0']|[#0]}
KC1e_Fifo_Tx_Response(ptr : Pointer; chan : Word)
<POP 21360-21362 StackAdj> Δ+6 {}
<MI 21362 TST.B (A6+0x8)> {}
<MI 21366 BEQ 0x2145a> {}
<POP 2136a-21370 Naked> Σ0 ↓
<MI 2136a MOVE.L #0xffffb1e0,D7> {}
<POP 21370-21386 Naked> Σ0 ↓ →0x2138a ←0x21386
<MI 21370 LEA.L (A6-0x418),A0> {}
<MI 21374 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 21376 CLR.W -(A7)> Δ-2 {[4, 'A0']|[#0]}
<Pointer.fp 0x21378 <LVAR -0x41e @ 1(r)>> Δ-4 {[4, 'A0']|[#0]|[@@-1054]}
<Call 0x2137a 0x1023e> {[4, 'A0']|[#0]|[@@-1054]}
KC1f_Fifo_Rx_Request(ptr : Pointer; chan : Word; VAR flag : Bool)
<POP 21380-21382 StackAdj> Δ+10 {}
<MI 21382 ADDQ.L #0x1,D7> {}
<MI 21384 BEQ 0x2138a> {}
<POP 21386-2138a Naked> Σ0 ↓ →0x21370
<MI 21386 TST.B (A6-0x41e)> {}
<MI 21388 BEQ 0x21370> {}
<POP 2138a-21390 Naked> Σ0 ↓ →0x2145a ←0x21370
<MI 2138a TST.B (A6-0x41e)> {}
<MI 2138c BNE 0x2145a> {}
<POP 21390-2145a Naked> Σ0 ↓
<MI 21390 MOVEA.L (A6+0xe),A0> {}
<MI 21394 MOVE.W (A0),(A6-0x8)> {}
<MI 21396 MOVE.W (A0+0x2),(A6-0x6)> {}
<MI 2139c MOVE.W (A0+0x4),(A6-0x4)> {}
<MI 213a0 MOVE.W (A0+0x6),(A6-0x2)> {}
<Blob 0x213a6 [20] @> Δ-20 {[«20""»]}
<POP 213b2-213b4 StackAdj> Δ-8 {[«20""»]|[-8-]}
<Lit 0x213b4 20> {[«20""»]|[-4-]|[$$Last header sent =>_]}
<MI 213c4 MOVE.L (A6-0x4),(A7)> {[«20""»]|[-4-]|[4, '(A6-0x4)']}
<POP 213be-213c4 StackAdj> Δ-8 {[«20""»]|[-4-]|[4, '(A6-0x4)']|[-8-]}
<MI 213c6 MOVE.L (A6-0x8),-(A7)> Δ-4 {[«20""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[4, '(A6-0x8)']}
<Const 0x213c8 0x10.4> Δ-4 {[«20""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[4, '(A6-0x8)']|[##16]}
<Call 0x213cc 0x1035c> {[«20""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[4, '(A6-0x8)']|[##16]}
Quad2String(a : Quad; radix : Long ) : String
<POP 213d2-213d4 StackAdj> Δ+12 {[«20""»]|[-4-]|[4, '(A6-0x4)']|[-4-]}
<Call 0x213d4 0x102d0> {[«20""»]|[-4-]|[4, '(A6-0x4)']|[-4-]}
StringCat2(a, b : String) : String
<POP 213da-213dc StackAdj> Δ+8 {[«20""»]|[-4-]}
<Call 0x213dc 0x103d8> {[«20""»]|[-4-]}
WriteConsoleString(str : String)
<POP 213e2-213e4 StackAdj> Δ+24 {}
<MI 213e4 MOVE.W (A0+0x8),(A6-0x8)> {}
<MI 213e8 MOVE.W (A0+0xa),(A6-0x6)> {}
<MI 213ee MOVE.W (A0+0xc),(A6-0x4)> {}
<MI 213f2 MOVE.W (A0+0xe),(A6-0x2)> {}
<Blob 0x213f8 [2] @> Δ-2 {[«2""»]}
<POP 213fc-213fe StackAdj> Δ-8 {[«2""»]|[-8-]}
<Lit 0x213fe 2> {[«2""»]|[-4-]|[$$_ ]}
<MI 2140e MOVE.L (A6-0x4),(A7)> {[«2""»]|[-4-]|[4, '(A6-0x4)']}
<POP 21408-2140e StackAdj> Δ-8 {[«2""»]|[-4-]|[4, '(A6-0x4)']|[-8-]}
<MI 21410 MOVE.L (A6-0x8),-(A7)> Δ-4 {[«2""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[4, '(A6-0x8)']}
<Const 0x21412 0x10.4> Δ-4 {[«2""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[4, '(A6-0x8)']|[##16]}
<Call 0x21416 0x1035c> {[«2""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[4, '(A6-0x8)']|[##16]}
Quad2String(a : Quad; radix : Long ) : String
<POP 2141c-2141e StackAdj> Δ+12 {[«2""»]|[-4-]|[4, '(A6-0x4)']|[-4-]}
<Call 0x2141e 0x102d0> {[«2""»]|[-4-]|[4, '(A6-0x4)']|[-4-]}
StringCat2(a, b : String) : String
<POP 21424-21426 StackAdj> Δ+8 {[«2""»]|[-4-]}
<Call 0x21426 0x103e0> {[«2""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2142c-2142e StackAdj> Δ+6 {}
<Blob 0x2142e [24] @> Δ-24 {[«24""»]}
<Const 0x2143a 0xe.2> Δ-2 {[«24""»]|[#14]}
<POP 2143e-21440 StackAdj> Δ-4 {[«24""»]|[#14]|[-4-]}
<Lit 0x21440 24> {[«24""»]|[#14]|[$$No response to page load]}
<Call 0x21450 0x103b8> {[«24""»]|[#14]|[$$No response to page load]}
PopProgram(status : Byte; msg : String)
<POP 21456-2145a StackAdj> Δ+30 {}
<POP 2145a-21462 Epilogue> Σ0 ←0x2133c ←0x2138a
@ 21462
<LVAR -0x003 @ 1(r)>
<LVAR -0x005 @ 1(r)>
<LVAR -0x006 @ 1(r)>
<LVAR -0x007 @ 1(r)>
<LVAR -0x008 @ 1(r)>
<LVAR -0x009 @ 1(r)>
<LVAR -0x00a @>
<LVAR -0x00b @>
<POP 21462-21546 Body>
<POP 21462-21478 Prologue> Σ0 ↓
<POP 21478-2148a RegCacheLoad> Σ0 ↓
<POP 2148a-214de Naked> Σ0 ↓
<Const 0x2148a 0x4.2> Δ-2 {[#4]}
<Pointer.fp 0x2148e <LVAR -0x00b @>> Δ-4 {[#4]|[@@-11]}
<Pointer.fp 0x21490 <LVAR -0x009 @ 1(r)>> Δ-4 {[#4]|[@@-11]|[@@-9]}
<Pointer.fp 0x21494 <LVAR -0x00a @>> Δ-4 {[#4]|[@@-11]|[@@-9]|[@@-10]}
<Call 0x21496 0x10484> {[#4]|[@@-11]|[@@-9]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 21498-2149a StackAdj> Δ+12 {[#4]}
<POP 2149a-2149b StackAdj> Δ+2 {}
<Const 0x2149b 0x6.2> Δ-2 {[#6]}
<Pointer.fp 0x2149e <LVAR -0x00b @>> Δ-4 {[#6]|[@@-11]}
<Pointer.fp 0x214a0 <LVAR -0x008 @ 1(r)>> Δ-4 {[#6]|[@@-11]|[@@-8]}
<Pointer.fp 0x214a4 <LVAR -0x00a @>> Δ-4 {[#6]|[@@-11]|[@@-8]|[@@-10]}
<Call 0x214a6 0x10484> {[#6]|[@@-11]|[@@-8]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 214a8-214aa StackAdj> Δ+12 {[#6]}
<POP 214aa-214ab StackAdj> Δ+2 {}
<Const 0x214ab 0x7.2> Δ-2 {[#7]}
<Pointer.fp 0x214ae <LVAR -0x00b @>> Δ-4 {[#7]|[@@-11]}
<Pointer.fp 0x214b0 <LVAR -0x007 @ 1(r)>> Δ-4 {[#7]|[@@-11]|[@@-7]}
<Pointer.fp 0x214b4 <LVAR -0x00a @>> Δ-4 {[#7]|[@@-11]|[@@-7]|[@@-10]}
<Call 0x214b6 0x10484> {[#7]|[@@-11]|[@@-7]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 214b8-214ba StackAdj> Δ+12 {[#7]}
<POP 214ba-214bb StackAdj> Δ+2 {}
<Const 0x214bb 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x214be <LVAR -0x00b @>> Δ-4 {[#3]|[@@-11]}
<Pointer.fp 0x214c0 <LVAR -0x006 @ 1(r)>> Δ-4 {[#3]|[@@-11]|[@@-6]}
<Pointer.fp 0x214c4 <LVAR -0x00a @>> Δ-4 {[#3]|[@@-11]|[@@-6]|[@@-10]}
<Call 0x214c6 0x10484> {[#3]|[@@-11]|[@@-6]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 214c8-214ca StackAdj> Δ+12 {[#3]}
<POP 214ca-214cb StackAdj> Δ+2 {}
<Const 0x214cb 0x2.2> Δ-2 {[#2]}
<Pointer.fp 0x214ce <LVAR -0x00b @>> Δ-4 {[#2]|[@@-11]}
<Pointer.fp 0x214d0 <LVAR -0x005 @ 1(r)>> Δ-4 {[#2]|[@@-11]|[@@-5]}
<Pointer.fp 0x214d4 <LVAR -0x00a @>> Δ-4 {[#2]|[@@-11]|[@@-5]|[@@-10]}
<Call 0x214d6 0x10484> {[#2]|[@@-11]|[@@-5]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 214d8-214da StackAdj> Δ+14 {}
<MI 214da MOVEQ.L #0x00,D7> {}
<MI 214dc MOVEQ.L #0x0c,D6> {}
<POP 214de-214ee Naked> Σ0 ↓ →0x2150a ←0x2150a
<POP 214de-214e0 StackAdj> Δ-2 {[-2-]}
<MI 214e0 MOVE.B D6,-(A7)> Δ-2 {[-2-]|[2, 'D6']}
<Call 0x214e2 0x104c0> {[-2-]|[2, 'D6']}
HasBoard(diproc_addr: Byte) : Byte
<POP 214e8-214ea StackAdj> Δ+2 {[-2-]}
<MI 214ea TST.B (A7)+> Δ+2 {}
<MI 214ec BEQ 0x2150a> {}
<POP 214ee-2150a Naked> Σ0 ↓
<MI 214ee MOVE.B D6,-(A7)> Δ-2 {[2, 'D6']}
<Pointer.fp 0x214f0 <LVAR -0x00b @>> Δ-4 {[2, 'D6']|[@@-11]}
<Pointer.fp 0x214f2 <LVAR -0x003 @ 1(r)>> Δ-4 {[2, 'D6']|[@@-11]|[@@-3]}
<Pointer.fp 0x214f6 <LVAR -0x00a @>> Δ-4 {[2, 'D6']|[@@-11]|[@@-3]|[@@-10]}
<Call 0x214f8 0x10484> {[2, 'D6']|[@@-11]|[@@-3]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 214fa-214fc StackAdj> Δ+14 {}
<MI 214fc MOVE.B D7,D0> {}
<MI 214fe OR.B (A6-0x3),D0> {}
<MI 21502 EXTB.W D0> {}
<POP 0x21504 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 21508 MOVE.B D0,D7> {}
<POP 2150a-21512 Naked> Σ0 ↓ →0x214de ←0x214de
<MI 2150a ADDQ.B #0x1,D6> {}
<MI 2150c CMPI.B #0x0f,D6> {}
<MI 21510 BLE 0x214de> {}
<POP 21512-21518 Naked> Σ0 ↓ →0x21534
<MI 21512 TST.B (A6-0x9)> {}
<MI 21516 BNE 0x21534> {}
<POP 21518-2151e Naked> Σ0 ↓ →0x21534
<MI 21518 TST.B (A6-0x8)> {}
<MI 2151c BNE 0x21534> {}
<POP 2151e-21524 Naked> Σ0 ↓ →0x21534
<MI 2151e TST.B (A6-0x7)> {}
<MI 21522 BNE 0x21534> {}
<POP 21524-2152a Naked> Σ0 ↓ →0x21534
<MI 21524 TST.B (A6-0x6)> {}
<MI 21528 BNE 0x21534> {}
<POP 2152a-21530 Naked> Σ0 ↓ →0x21534
<MI 2152a TST.B (A6-0x5)> {}
<MI 2152e BNE 0x21534> {}
<POP 21530-21534 Naked> Σ0 ↓ →0x2153e
<MI 21530 TST.B D7> {}
<MI 21532 BEQ 0x2153e> {}
<POP 21534-2153e Naked> Σ0 ↓ ←0x21512 ←0x21518 ←0x2151e ←0x21524 ←0x2152a
<Const 0x21534 0xc.2> Δ-2 {[#12]}
<Call 0x21536 0x105da> {[#12]}
EmergencyStop(boot_reason_code : Byte)
<POP 2153c-2153e StackAdj> Δ+2 {}
<POP 2153e-21546 Epilogue> Σ0 ←0x21530
@ 21546
<LVAR 0x008 @ 4(r)>
<LVAR -0x004 2(w)>
<LVAR -0x006 2(w) 4(r)>
<LVAR -0x008 2(w)>
<LVAR -0x00a 2(w) 4(r)>
<LVAR -0x00c @>
<LVAR -0x00d @>
<LVAR -0x00e @ 1(r)>
<LVAR -0x41e @>
<LVAR -0x420 2(rw)>
<LVAR -0x422 2(rw)>
<LVAR -0x424 2(rw)>
<LVAR -0x426 2(rw)>
<LVAR -0x428 2(rw)>
<LVAR -0x42a 2(r)>
<LVAR -0x42c 2(r)>
<LVAR -0x42e @ 2(rw)>
<LVAR -0x43a @ 4(r)>
<LVAR -0x83e 2(r)>
<LVAR -0x840 2(r) 4(w)>
<LVAR -0x844 4(w)>
<LVAR -0x848 @ 4(r)>
<LVAR -0x84c @ 4(r)>
<POP 21546-21806 Body>
<POP 21546-2155c Prologue> Σ0 ↓
<POP 2155c-21574 RegCacheLoad> Σ0 ↓
<POP 21574-2160e Naked> Σ0 ↓ →0x21614
<Pointer.fp 0x21574 <LVAR -0x84c @ 4(r)>> Δ-4 {[@@-2124]}
<Call 0x21576 0x102b8> {[@@-2124]}
NewString(VAR a : String)
<MI 2157c MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<MI 2157e MOVE.L (A6-0x84c),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x84c)']}
<Pointer.fp 0x21580 <LVAR -0x00c @>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x84c)']|[@@-12]}
<Call 0x21584 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x84c)']|[@@-12]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 2158a-2158c StackAdj> Δ+12 {}
<Pointer.fp 0x2158c <LVAR -0x848 @ 4(r)>> Δ-4 {[@@-2120]}
<Call 0x2158e 0x102b8> {[@@-2120]}
NewString(VAR a : String)
<MI 21594 MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<MI 21596 MOVE.L (A6-0x848),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x848)']}
<Pointer.fp 0x21598 <LVAR -0x00c @>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[@@-12]}
<Call 0x2159c 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[@@-12]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 215a2-215a4 StackAdj> Δ+6 {[4, '(A6+0x8)']|[-2-]}
<MI 215a4 MOVE.L (A6-0x848),(A7)> {[-2-]|[4, '(A6-0x848)']}
<Call 0x215a6 0x21242> {[-2-]|[4, '(A6-0x848)']}
<POP 215aa-215ac StackAdj> Δ+4 {[-2-]}
<MI 215ac MOVE.B (A7)+,D0> Δ+2 {}
<MI 215ae EXTB.W D0> {}
<POP 0x215b0 LimitCheck 0x0 ≤ D0 ≤ 0x7> {}
<MI 215b4 MOVE.B D0,D5> {}
<MI 215b6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 215b8 MOVE.L (A6-0x848),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x848)']}
<Pointer.fp 0x215ba <LVAR -0x00c @>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[@@-12]}
<Call 0x215be 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[@@-12]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<MI 215c4 MOVE.L (A6-0x848),(A7)> {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[4, '(A6-0x848)']}
<Const 0x215c6 0x10.4> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[4, '(A6-0x848)']|[##16]}
<Call 0x215ca 0x10360> {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[4, '(A6-0x848)']|[##16]}
?StringToInt64()
<POP 215d0-215d2 StackAdj> Δ+8 {[4, '(A6+0x8)']|[4, '(A6-0x848)']}
<MI 215d2 MOVE.L (A7)+,(A6-0x844)> Δ+4 {[4, '(A6+0x8)']}
<MI 215d6 MOVE.L (A7)+,(A6-0x840)> Δ+4 {}
<MI 215da MOVE.W 0x241d2,(A6-0x42e)> {}
<MI 215e2 CLR.W (A6-0x42c)> {}
<MI 215e6 CLR.W (A6-0x42a)> {}
<MI 215ea MOVE.W #0x100,(A6-0x428)> {}
<MI 215f0 MOVE.W (A6-0x840),(A6-0x426)> {}
<MI 215f6 MOVE.W (A6-0x83e),(A6-0x424)> {}
<MI 215fc CLR.W (A6-0x422)> {}
<MI 21600 MOVE.B D5,D0> {}
<MI 21602 EXTB.W D0> {}
<MI 21604 MOVE.W D0,(A6-0x420)> {}
<MI 21606 TST.B 0x241c0> {}
<MI 2160c BEQ 0x21614> {}
<POP 2160e-21614 Naked> Σ0 ↓
<MI 2160e ORI.W #0x0008,D0> {}
<MI 21612 MOVE.W D0,(A6-0x420)> {}
<POP 21614-2163e Naked> Σ0 Δ-4 ↓ ←0x21574
<MI 21614 MOVE.L (A6-0x84c),-(A7)> Δ-4 {[4, '(A6-0x84c)']}
<MI 21616 CLR.B -(A7)> Δ-2 {[4, '(A6-0x84c)']|[#0]}
<Const 0x21618 0x2.2> Δ-2 {[4, '(A6-0x84c)']|[#0]|[#2]}
<Const 0x2161a 0x0.4> Δ-4 {[4, '(A6-0x84c)']|[#0]|[#2]|[##0]}
<Pointer.fp 0x2161e <LVAR -0x00d @>> Δ-4 {[4, '(A6-0x84c)']|[#0]|[#2]|[##0]|[@@-13]}
<Pointer.fp 0x21622 <LVAR -0x43a @ 4(r)>> Δ-4 {[4, '(A6-0x84c)']|[#0]|[#2]|[##0]|[@@-13]|[@@-1082]}
<Call 0x21626 0x10380> {[4, '(A6-0x84c)']|[#0]|[#2]|[##0]|[@@-13]|[@@-1082]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 2162c-2162e StackAdj> Δ+20 {}
<MI 2162e MOVEA.L (A6-0x43a),A0> {}
<MI 21632 MOVE.W (A0+0x20),D0> {}
<MI 21636 SUBQ.W #0x1,D0> {}
<MI 21638 EXTW.L D0> {}
<MI 2163a MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 2163c MOVEQ.L #0x00,D6> {[4, 'D0']}
<POP 2163e-21644 Naked> Σ-4 ↓ →0x217ce ←0x217c8
<MI 2163e CMP.L (A7),D6> {[-4-]}
<MI 21640 BGT 0x217ce> {[-4-]}
<POP 21644-21684 Naked> Σ-4 ↓
<MI 21644 MOVE.L (A6-0x43a),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x43a)']}
<POP 0x21648 LimitCheck 0x0 ≤ D6 ≤ 0x4000> {[-4-]|[4, '(A6-0x43a)']}
<MI 21652 MOVE.W D6,-(A7)> Δ-2 {[-4-]|[4, '(A6-0x43a)']|[2, 'D6']}
<MI 21654 CLR.W -(A7)> Δ-2 {[-4-]|[4, '(A6-0x43a)']|[2, 'D6']|[#0]}
<Const 0x21656 0x200.2> Δ-2 {[-4-]|[4, '(A6-0x43a)']|[2, 'D6']|[#0]|[#512]}
<Const 0x2165a 0x2.2> Δ-2 {[-4-]|[4, '(A6-0x43a)']|[2, 'D6']|[#0]|[#512]|[#2]}
<Blob 0x2165c [4] 0x241d6> Δ-4 {[-4-]|[4, '(A6-0x43a)']|[2, 'D6']|[#0]|[#512]|[#2]|[«4»]}
<Pointer.fp 0x21662 <LVAR -0x00d @>> Δ-4 {[-4-]|[4, '(A6-0x43a)']|[2, 'D6']|[#0]|[#512]|[#2]|[«4»]|[@@-13]}
<Call 0x21666 0x10384> {[-4-]|[4, '(A6-0x43a)']|[2, 'D6']|[#0]|[#512]|[#2]|[«4»]|[@@-13]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 2166c-2166e StackAdj> Δ+20 {[-4-]}
<MI 2166e LEA.L (A6-0x42e),A0> {[-4-]}
<MI 21672 MOVE.L A0,-(A7)> Δ-4 {[-4-]|[4, 'A0']}
<MI 21674 CLR.W -(A7)> Δ-2 {[-4-]|[4, 'A0']|[#0]}
<Call 0x21676 0x1023c> {[-4-]|[4, 'A0']|[#0]}
KC1e_Fifo_Tx_Response(ptr : Pointer; chan : Word)
<POP 2167c-2167e StackAdj> Δ+6 {[-4-]}
<MI 2167e MOVE.L #0xffffb1e0,D7> {[-4-]}
<POP 21684-2169e Naked> Σ-4 ↓ →0x216a4 ←0x2169e
<MI 21684 LEA.L (A6-0x41e),A0> {[-4-]}
<MI 21688 MOVE.L A0,-(A7)> Δ-4 {[-4-]|[4, 'A0']}
<MI 2168a CLR.W -(A7)> Δ-2 {[-4-]|[4, 'A0']|[#0]}
<Pointer.fp 0x2168c <LVAR -0x00e @ 1(r)>> Δ-4 {[-4-]|[4, 'A0']|[#0]|[@@-14]}
<Call 0x21690 0x1023e> {[-4-]|[4, 'A0']|[#0]|[@@-14]}
KC1f_Fifo_Rx_Request(ptr : Pointer; chan : Word; VAR flag : Bool)
<POP 21696-2169a StackAdj> Δ+10 {[-4-]}
<MI 2169a ADDQ.L #0x1,D7> {[-4-]}
<MI 2169c BEQ 0x216a4> {[-4-]}
<POP 2169e-216a4 Naked> Σ-4 ↓ →0x21684
<MI 2169e TST.B (A6-0xe)> {[-4-]}
<MI 216a2 BEQ 0x21684> {[-4-]}
<POP 216a4-216ac Naked> Σ-4 ↓ →0x21786 ←0x21684
<MI 216a4 TST.B (A6-0xe)> {[-4-]}
<MI 216a8 BNE 0x21786> {[-4-]}
<POP 216ac-21786 Naked> Σ-4 ↓
<Call 0x216ac 0x21462> {[-4-]}
<MI 216b0 MOVE.W (A6-0x42e),(A6-0xa)> {[-4-]}
<MI 216b6 MOVE.W (A6-0x42c),(A6-0x8)> {[-4-]}
<MI 216bc MOVE.W (A6-0x42a),(A6-0x6)> {[-4-]}
<MI 216c2 MOVE.W (A6-0x428),(A6-0x4)> {[-4-]}
<Blob 0x216c8 [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 216d4-216d6 StackAdj> Δ-8 {[-4-]|[«20""»]|[-8-]}
<Lit 0x216d6 20> {[-4-]|[«20""»]|[-4-]|[$$Last header sent =>_]}
<MI 216e4 MOVE.L (A6-0x6),(A7)> {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']}
<POP 216de-216e4 StackAdj> Δ-8 {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']|[-8-]}
<MI 216e8 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']|[-8-]|[4, '(A6-0xa)']}
<Const 0x216ec 0x10.4> Δ-4 {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']|[-8-]|[4, '(A6-0xa)']|[##16]}
<Call 0x216f0 0x1035c> {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']|[-8-]|[4, '(A6-0xa)']|[##16]}
Quad2String(a : Quad; radix : Long ) : String
<POP 216f6-216f8 StackAdj> Δ+12 {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
<Call 0x216f8 0x102d0> {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
StringCat2(a, b : String) : String
<POP 216fe-21700 StackAdj> Δ+8 {[-4-]|[«20""»]|[-4-]}
<Call 0x21700 0x103d8> {[-4-]|[«20""»]|[-4-]}
WriteConsoleString(str : String)
<POP 21706-2170a StackAdj> Δ+24 {[-4-]}
<MI 2170a MOVE.W (A6-0x426),(A6-0xa)> {[-4-]}
<MI 21710 MOVE.W (A6-0x424),(A6-0x8)> {[-4-]}
<MI 21716 MOVE.W (A6-0x422),(A6-0x6)> {[-4-]}
<MI 2171c MOVE.W (A6-0x420),(A6-0x4)> {[-4-]}
<Blob 0x21720 [2] @> Δ-2 {[-4-]|[«2""»]}
<POP 21724-21726 StackAdj> Δ-8 {[-4-]|[«2""»]|[-8-]}
<Lit 0x21726 2> {[-4-]|[«2""»]|[-4-]|[$$_ ]}
<MI 21734 MOVE.L (A6-0x6),(A7)> {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']}
<POP 2172e-21734 StackAdj> Δ-8 {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-8-]}
<MI 21738 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-8-]|[4, '(A6-0xa)']}
<Const 0x2173c 0x10.4> Δ-4 {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-8-]|[4, '(A6-0xa)']|[##16]}
<Call 0x21740 0x1035c> {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-8-]|[4, '(A6-0xa)']|[##16]}
Quad2String(a : Quad; radix : Long ) : String
<POP 21746-21748 StackAdj> Δ+12 {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
<Call 0x21748 0x102d0> {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
StringCat2(a, b : String) : String
<POP 2174e-21750 StackAdj> Δ+8 {[-4-]|[«2""»]|[-4-]}
<Call 0x21750 0x103e0> {[-4-]|[«2""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21756-21758 StackAdj> Δ+6 {[-4-]}
<Blob 0x21758 [24] @> Δ-24 {[-4-]|[«24""»]}
<Const 0x21764 0xe.2> Δ-2 {[-4-]|[«24""»]|[#14]}
<POP 21768-2176a StackAdj> Δ-4 {[-4-]|[«24""»]|[#14]|[-4-]}
<Lit 0x2176a 24> {[-4-]|[«24""»]|[#14]|[$$No response to page load]}
<Call 0x2177c 0x103b8> {[-4-]|[«24""»]|[#14]|[$$No response to page load]}
PopProgram(status : Byte; msg : String)
<POP 21782-21786 StackAdj> Δ+30 {[-4-]}
<POP 21786-2179e Naked> Σ-4 ↓ →0x217b4 ←0x216a4
<MI 21786 CLR.L D0> {[-4-]}
<MI 21788 MOVE.W (A6-0x420),D0> {[-4-]}
<MI 2178a ADDI.L #0x00002000,D0> {[-4-]}
<MI 21790 ANDI.L #0x0000ffff,D0> {[-4-]}
<MI 21796 MOVE.W D0,(A6-0x420)> {[-4-]}
<MI 21798 ANDI.W #0xfff0,D0> {[-4-]}
<MI 2179c BNE 0x217b4> {[-4-]}
<POP 2179e-217b4 Naked> Σ-4 ↓
<MI 2179e CLR.L D0> {[-4-]}
<MI 217a0 MOVE.W (A6-0x422),D0> {[-4-]}
<MI 217a4 ADDQ.L #0x1,D0> {[-4-]}
<POP 0x217a6 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-4-]}
<MI 217b0 MOVE.W D0,(A6-0x422)> {[-4-]}
<POP 217b4-217c2 Naked> Σ-4 ↓ →0x217c8 ←0x21786
<MI 217b4 ADDQ.L #0x1,0x241c6> {[-4-]}
<MI 217ba TST.B 0x241c0> {[-4-]}
<MI 217c0 BEQ 0x217c8> {[-4-]}
<POP 217c2-217c8 Naked> Σ-4 ↓
<MI 217c2 ADDQ.L #0x1,0x241c2> {[-4-]}
<POP 217c8-217ce Naked> Σ-4 ↓ →0x2163e ←0x217b4
<MI 217c8 ADDQ.L #0x1,D6> {[-4-]}
<MI 217ca BVC 0x2163e> {[-4-]}
<POP 217ce-217fe Naked> Σ-4 Δ+4 ↓ ←0x2163e
<POP 217ce-217d0 StackAdj> Δ+2 {[-2-]}
<MI 217d0 CLR.B (A7)> {[-2-]}
<Const 0x217d2 0x2.2> Δ-2 {[-2-]|[#2]}
<Const 0x217d4 0x1.4> Δ-4 {[-2-]|[#2]|[##1]}
<Pointer.fp 0x217d8 <LVAR -0x00d @>> Δ-4 {[-2-]|[#2]|[##1]|[@@-13]}
<Pointer.fp 0x217dc <LVAR -0x43a @ 4(r)>> Δ-4 {[-2-]|[#2]|[##1]|[@@-13]|[@@-1082]}
<Call 0x217e0 0x1038c> {[-2-]|[#2]|[##1]|[@@-13]|[@@-1082]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 217e6-217ea StackAdj> Δ+16 {}
<Pointer.fp 0x217ea <LVAR -0x84c @ 4(r)>> Δ-4 {[@@-2124]}
<Call 0x217ec 0x102bc> {[@@-2124]}
FreeString(VAR a : String)
<POP 217f2-217f4 StackAdj> Δ+4 {}
<Pointer.fp 0x217f4 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x217f6 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 217fc-217fe StackAdj> Δ+4 {}
<POP 217fe-21806 Epilogue> Σ0
@ 21806
<LVAR 0x00a 4(r)>
<LVAR 0x008 2(rw)>
<LVAR -0x010 1(rw)>
<LVAR -0x012 2(w)>
<LVAR -0x013 1(r)>
<LVAR -0x014 1(r) 2(r)>
<LVAR -0x016 @ 2(r)>
<LVAR -0x01a 4(rw)>
<LVAR -0x01e 4(rw)>
<LVAR -0x020 2(w)>
<LVAR -0x022 2(r) 4(r)>
<LVAR -0x024 2(r)>
<LVAR -0x026 2(r) 4(r)>
<POP 21806-21f02 Body>
<POP 21806-2181c Prologue> Σ0 ↓
<POP 2181c-21828 RegCacheLoad> Σ0 ↓
<POP 21828-21838 Naked> Σ0 ↓
<MI 21828 CLR.L D0> {}
<MI 2182a MOVE.W (A6+0x8),D0> {}
<MI 2182c ADDQ.L #0x3,D0> {}
<MI 2182e ANDI.L #0x0000fffc,D0> {}
<MI 21834 MOVE.W D0,(A6+0x8)> {}
<MI 21836 MOVEQ.L #0x00,D7> {}
<POP 21838-2187a Naked> Σ0 ↓ →0x21838 ←0x21838
<MI 21838 MOVEA.L (A6+0xa),A0> {}
<MI 2183a MOVE.W (A6+0x8),D0> {}
<POP 0x2183c LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21840 CLR.L D1> {}
<MI 21842 MOVE.W D0,D1> {}
<MI 21844 ASL.L #0x1,D1> {}
<POP 0x21846 LimitCheck 0x0 ≤ D7 ≤ 0x3> {}
<MI 21850 MOVE.L D7,D0> {}
<MI 21852 ASL.L #0x1,D0> {}
<MI 21854 LEA.L 0x2060a,A1> {}
<MI 21858 MOVE.W (A1+D0.L),(A0+D1.L)> {}
<MI 2185e CLR.L D0> {}
<MI 21860 MOVE.W (A6+0x8),D0> {}
<MI 21862 ADDQ.L #0x1,D0> {}
<POP 0x21864 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 2186e MOVE.W D0,(A6+0x8)> {}
<MI 21870 ADDQ.L #0x1,D7> {}
<MI 21872 CMPI.L #0x00000003,D7> {}
<MI 21878 BLE 0x21838> {}
<POP 2187a-218ae Naked> Σ0 ↓ →0x218b0
<Pointer.fp 0x2187a <LVAR -0x016 @ 2(r)>> Δ-4 {[@@-22]}
<Call 0x2187e 0x10304> {[@@-22]}
GetRtc() : TimeStamp
<POP 21884-21886 StackAdj> Δ+4 {}
<MI 21886 CLR.W (A6-0x26)> {}
<MI 2188a CLR.W (A6-0x24)> {}
<MI 2188e CLR.W (A6-0x22)> {}
<MI 21892 MOVE.W (A6-0x16),(A6-0x20)> {}
<MI 21898 CLR.B (A6-0x10)> {}
<MI 2189a CLR.L D0> {}
<MI 2189c MOVE.B (A6-0x14),D0> {}
<MI 218a0 LSR.B #0x1,D0> {}
<MI 218a2 MOVE.W D0,D1> {}
<MI 218a4 ANDI.W #0x0003,D1> {}
<MI 218a8 CMPI.W #0x0003,D1> {}
<MI 218ac BNE 0x218b0> {}
<POP 218ae-218b0 Naked> Σ0 ↓
<MI 218ae ADDQ.B #0x1,(A6-0x10)> {}
<POP 218b0-21984 Naked> Σ0 ↓ ←0x2187a
<MI 218b0 MOVE.W D0,D1> {}
<MI 218b2 ASR.W #0x2,D1> {}
<MI 218b4 MOVE.B (A6-0x10),D2> {}
<MI 218b6 EXTB.W D2> {}
<MI 218b8 MULS.W #0x18,D2> {}
<MI 218bc LEA.L 0x2061a,A0> {}
<MI 218c0 MOVE.W (A6-0x14),D3> {}
<MI 218c4 LSL.W #0x7,D3> {}
<MI 218c6 LSR.W #0x8,D3> {}
<MI 218c8 LSR.W #0x4,D3> {}
<MI 218ca SUBQ.W #0x1,D3> {}
<POP 0x218cc LimitCheck 0x0 ≤ D3 ≤ 0xb> {}
<MI 218d0 ASL.W #0x1,D3> {}
<MI 218d2 LEA.L (A0+D2.W),A0> {}
<MI 218d6 EXTW.L D1> {}
<MI 218d8 CLR.L D2> {}
<MI 218da MOVE.W (A0+D3.W),D2> {}
<MI 218de ADD.L D1,D2> {}
<MI 218e0 CLR.L D1> {}
<MI 218e2 MOVE.B (A6-0x13),D1> {}
<MI 218e6 LSL.B #0x3,D1> {}
<MI 218e8 LSR.B #0x3,D1> {}
<MI 218ea ADD.L D2,D1> {}
<MI 218ec SUBQ.L #0x1,D1> {}
<POP 0x218ee LimitCheck 0x0 ≤ D1 ≤ 0xffff> {}
<MI 218f8 MOVE.W D1,(A6-0x12)> {}
<POP 218fc-21900 StackAdj> Δ-24 {[-24-]}
<Const 0x21900 0x16d.4> Δ-4 {[-24-]|[##365]}
<Call 0x21904 0x10354> {[-24-]|[##365]}
Long2Quad(a : Long) : Quad
<POP 2190a-2190c StackAdj> Δ-4 {[-24-]|[##365]|[-4-]}
<MI 2190c EXTW.L D0> {[-24-]|[##365]|[-4-]}
<MI 2190e MOVE.L D0,-(A7)> Δ-4 {[-24-]|[##365]|[-4-]|[4, 'D0']}
<Call 0x21910 0x10354> {[-24-]|[##365]|[-4-]|[4, 'D0']}
Long2Quad(a : Long) : Quad
<POP 21916-21918 StackAdj> Δ+4 {[-24-]|[##365]|[-4-]}
<Call 0x21918 0x1031c> {[-24-]|[##365]|[-4-]}
Multiply(a, b : Quad) : Quad
<POP 2191e-21920 StackAdj> Δ+8 {[-24-]}
<MI 21920 CLR.L D0> {[-24-]}
<MI 21922 MOVE.W D1,D0> {[-24-]}
<MI 21924 MOVE.L D0,-(A7)> Δ-4 {[-24-]|[4, 'D0']}
<Call 0x21926 0x10354> {[-24-]|[4, 'D0']}
Long2Quad(a : Long) : Quad
<POP 2192c-2192e StackAdj> Δ+4 {[-24-]}
<Call 0x2192e 0x10314> {[-24-]}
Add(a, b : Quad) : Quad
<POP 21934-21938 StackAdj> Δ+16 {[-8-]}
<MI 21938 MOVE.L (A7)+,(A6-0x1e)> Δ+4 {[-4-]}
<MI 2193c MOVE.L (A7),(A6-0x1a)> {[-4-]}
<POP 21940-21944 StackAdj> Δ-12 {[-16-]}
<MI 21944 MOVE.L (A6-0x22),-(A7)> Δ-4 {[-16-]|[4, '(A6-0x22)']}
<MI 21948 MOVE.L (A6-0x26),-(A7)> Δ-4 {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']}
<Const 0x2194c 0x1.4> Δ-4 {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[##1]}
<Call 0x21950 0x10344> {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[##1]}
BitShift(a : Quad ; howmuch : integer) : Quad
<MI 21956 MOVE.L (A6-0x1a),(A7)> {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[4, '(A6-0x1a)']}
<MI 2195a MOVE.L (A6-0x1e),-(A7)> Δ-4 {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']}
<Blob 0x2195e [4] @> Δ-4 {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']|[«4""»]}
<Blob 0x21962 [4] @> Δ-4 {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']|[«4""»]|[«4""»]}
<Call 0x21966 0x1031c> {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']|[«4""»]|[«4""»]}
Multiply(a, b : Quad) : Quad
<POP 2196c-21970 StackAdj> Δ+16 {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']}
<Call 0x21970 0x10314> {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']}
Add(a, b : Quad) : Quad
<POP 21976-2197a StackAdj> Δ+16 {[-8-]}
<MI 2197a MOVE.L (A7)+,(A6-0x1e)> Δ+4 {[-4-]}
<MI 2197e MOVE.L (A7)+,(A6-0x1a)> Δ+4 {}
<MI 21982 MOVEQ.L #0x00,D7> {}
<POP 21984-219c2 Naked> Σ0 ↓ →0x21984 ←0x21984
<MI 21984 MOVEA.L (A6+0xa),A0> {}
<MI 21986 MOVE.W (A6+0x8),D0> {}
<POP 0x21988 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 2198c CLR.L D1> {}
<MI 2198e MOVE.W D0,D1> {}
<MI 21990 ASL.L #0x1,D1> {}
<POP 0x21992 LimitCheck 0x0 ≤ D7 ≤ 0x3> {}
<MI 2199c MOVE.L D7,D0> {}
<MI 2199e ASL.L #0x1,D0> {}
<MI 219a0 MOVE.W (A6+D0.L-#0x1e),(A0+D1.L)> {}
<MI 219a6 CLR.L D0> {}
<MI 219a8 MOVE.W (A6+0x8),D0> {}
<MI 219aa ADDQ.L #0x1,D0> {}
<POP 0x219ac LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 219b6 MOVE.W D0,(A6+0x8)> {}
<MI 219b8 ADDQ.L #0x1,D7> {}
<MI 219ba CMPI.L #0x00000003,D7> {}
<MI 219c0 BLE 0x21984> {}
<POP 219c2-219c4 Naked> Σ0 ↓
<MI 219c2 MOVEQ.L #0x00,D7> {}
<POP 219c4-219c6 Naked> Σ0 ↓ ←0x21a28
<MI 219c4 MOVEQ.L #0x00,D6> {}
<POP 219c6-21a28 Naked> Σ0 ↓ →0x219c6 ←0x219c6
<MI 219c6 MOVEA.L (A6+0xa),A0> {}
<MI 219c8 MOVE.W (A6+0x8),D0> {}
<POP 0x219ca LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 219ce CLR.L D1> {}
<MI 219d0 MOVE.W D0,D1> {}
<MI 219d2 ASL.L #0x1,D1> {}
<POP 0x219d4 LimitCheck 0x0 ≤ D7 ≤ 0x9> {}
<MI 219de LEA.L 0x2064a,A1> {}
<MI 219e2 MOVE.B (A1+D7.L),D0> {}
<MI 219e6 EXTB.W D0> {}
<MI 219e8 ASL.W #0x3,D0> {}
<MI 219ea LEA.L 0x23e90,A1> {}
<POP 0x219f0 LimitCheck 0x0 ≤ D6 ≤ 0x3> {}
<MI 219fa MOVE.L D6,D2> {}
<MI 219fc ASL.L #0x1,D2> {}
<MI 219fe LEA.L (A1+D0.W),A1> {}
<MI 21a02 LEA.L (A1+D2.L),A1> {}
<MI 21a06 MOVE.W (A1+0x34a),(A0+D1.L)> {}
<MI 21a0c CLR.L D0> {}
<MI 21a0e MOVE.W (A6+0x8),D0> {}
<MI 21a10 ADDQ.L #0x1,D0> {}
<POP 0x21a12 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21a1c MOVE.W D0,(A6+0x8)> {}
<MI 21a1e ADDQ.L #0x1,D6> {}
<MI 21a20 CMPI.L #0x00000003,D6> {}
<MI 21a26 BLE 0x219c6> {}
<POP 21a28-21a32 Naked> Σ0 ↓ →0x219c4
<MI 21a28 ADDQ.L #0x1,D7> {}
<MI 21a2a CMPI.L #0x00000009,D7> {}
<MI 21a30 BLE 0x219c4> {}
<POP 21a32-21a34 Naked> Σ0 ↓
<MI 21a32 MOVEQ.L #0x00,D7> {}
<POP 21a34-21a36 Naked> Σ0 ↓ ←0x21a64
<MI 21a34 MOVEQ.L #0x00,D6> {}
<POP 21a36-21a64 Naked> Σ0 ↓ →0x21a36 ←0x21a36
<MI 21a36 MOVEA.L (A6+0xa),A0> {}
<MI 21a38 MOVE.W (A6+0x8),D0> {}
<POP 0x21a3a LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21a3e CLR.L D1> {}
<MI 21a40 MOVE.W D0,D1> {}
<MI 21a42 ASL.L #0x1,D1> {}
<MI 21a44 CLR.W (A0+D1.L)> {}
<MI 21a48 CLR.L D0> {}
<MI 21a4a MOVE.W (A6+0x8),D0> {}
<MI 21a4c ADDQ.L #0x1,D0> {}
<POP 0x21a4e LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21a58 MOVE.W D0,(A6+0x8)> {}
<MI 21a5a ADDQ.L #0x1,D6> {}
<MI 21a5c CMPI.L #0x00000003,D6> {}
<MI 21a62 BLE 0x21a36> {}
<POP 21a64-21a6e Naked> Σ0 ↓ →0x21a34
<MI 21a64 ADDQ.L #0x1,D7> {}
<MI 21a66 CMPI.L #0x00000006,D7> {}
<MI 21a6c BLE 0x21a34> {}
<POP 21a6e-21a70 Naked> Σ0 ↓
<MI 21a6e MOVEQ.L #0x00,D7> {}
<POP 21a70-21a92 Naked> Σ0 ↓ →0x21a70 ←0x21a70
<MI 21a70 MOVEA.L (A6+0xa),A0> {}
<MI 21a72 CLR.L D0> {}
<MI 21a74 MOVE.W (A6+0x8),D0> {}
<MI 21a76 ADD.L D7,D0> {}
<POP 0x21a78 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21a82 ASL.L #0x1,D0> {}
<MI 21a84 CLR.W (A0+D0.L)> {}
<MI 21a88 ADDQ.L #0x1,D7> {}
<MI 21a8a CMPI.L #0x00000007,D7> {}
<MI 21a90 BLE 0x21a70> {}
<POP 21a92-21a9e Naked> Σ0 ↓ →0x21aaa
<POP 21a92-21a94 StackAdj> Δ-2 {[-2-]}
<Call 0x21a94 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 21a9a TST.B (A7)+> Δ+2 {}
<MI 21a9c BNE 0x21aaa> {}
<POP 21a9e-21aaa Naked> Σ0 ↓ →0x21b10
<POP 21a9e-21aa0 StackAdj> Δ-2 {[-2-]}
<Call 0x21aa0 0x10604> {[-2-]}
Is_machine_type_three() : Bool
<MI 21aa6 TST.B (A7)+> Δ+2 {}
<MI 21aa8 BEQ 0x21b10> {}
<POP 21aaa-21ab6 Naked> Σ0 ↓ →0x21ada ←0x21a92
<POP 21aaa-21aac StackAdj> Δ-4 {[-4-]}
<Call 0x21aac 0x23bbe> {[-4-]}
<MI 21ab2 MOVE.L (A7)+,D5> Δ+4 {}
<MI 21ab4 BEQ 0x21ada> {}
<POP 21ab6-21ada Naked> Σ0 ↓
<MI 21ab6 MOVE.L D5,-(A7)> Δ-4 {[4, 'D5']}
<MI 21ab8 MOVEA.L (A6+0xa),A0> {[4, 'D5']}
<MI 21aba MOVE.W (A6+0x8),D0> {[4, 'D5']}
<POP 0x21abc LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {[4, 'D5']}
<MI 21ac0 CLR.L D1> {[4, 'D5']}
<MI 21ac2 MOVE.W D0,D1> {[4, 'D5']}
<MI 21ac4 ASL.L #0x1,D1> {[4, 'D5']}
<MI 21ac6 LEA.L (A0+D1.L),A0> {[4, 'D5']}
<MI 21aca MOVE.L A0,-(A7)> Δ-4 {[4, 'D5']|[4, 'A0']}
<Const 0x21acc 0x8.2> Δ-2 {[4, 'D5']|[4, 'A0']|[#8]}
<Call 0x21ad0 0x10238> {[4, 'D5']|[4, 'A0']|[#8]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 21ad6-21ada StackAdj> Δ+10 {}
<POP 21ada-21ae6 Naked> Σ0 ↓ →0x21b10 ←0x21aaa
<POP 21ada-21adc StackAdj> Δ-4 {[-4-]}
<Call 0x21adc 0x23be8> {[-4-]}
<MI 21ae2 MOVE.L (A7)+,D5> Δ+4 {}
<MI 21ae4 BEQ 0x21b10> {}
<POP 21ae6-21b10 Naked> Σ0 ↓
<MI 21ae6 MOVE.L D5,-(A7)> Δ-4 {[4, 'D5']}
<MI 21ae8 MOVEA.L (A6+0xa),A0> {[4, 'D5']}
<MI 21aea CLR.L D0> {[4, 'D5']}
<MI 21aec MOVE.W (A6+0x8),D0> {[4, 'D5']}
<MI 21aee ADDQ.L #0x4,D0> {[4, 'D5']}
<POP 0x21af0 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {[4, 'D5']}
<MI 21afa ASL.L #0x1,D0> {[4, 'D5']}
<MI 21afc LEA.L (A0+D0.L),A0> {[4, 'D5']}
<MI 21b00 MOVE.L A0,-(A7)> Δ-4 {[4, 'D5']|[4, 'A0']}
<Const 0x21b02 0x8.2> Δ-2 {[4, 'D5']|[4, 'A0']|[#8]}
<Call 0x21b06 0x10238> {[4, 'D5']|[4, 'A0']|[#8]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 21b0c-21b10 StackAdj> Δ+10 {}
<POP 21b10-21b2e Naked> Σ0 ↓ →0x21b3a ←0x21a9e ←0x21ada
<MI 21b10 CLR.L D0> {}
<MI 21b12 MOVE.W (A6+0x8),D0> {}
<MI 21b14 ADDQ.L #0x8,D0> {}
<POP 0x21b16 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21b20 MOVE.W D0,(A6+0x8)> {}
<POP 21b22-21b24 StackAdj> Δ-2 {[-2-]}
<Call 0x21b24 0x105f8> {[-2-]}
Is_machine_type_one() : Bool
<MI 21b2a TST.B (A7)+> Δ+2 {}
<MI 21b2c BNE 0x21b3a> {}
<POP 21b2e-21b3a Naked> Σ0 ↓ →0x21b4e
<POP 21b2e-21b30 StackAdj> Δ-2 {[-2-]}
<Call 0x21b30 0x105fe> {[-2-]}
Is_machine_type_two() : Bool
<MI 21b36 TST.B (A7)+> Δ+2 {}
<MI 21b38 BEQ 0x21b4e> {}
<POP 21b3a-21b4e Naked> Σ0 →0x21b8c ←0x21b10
<MI 21b3a MOVEA.L (A6+0xa),A0> {}
<POP 0x21b3c LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21b40 CLR.L D1> {}
<MI 21b42 MOVE.W D0,D1> {}
<MI 21b44 ASL.L #0x1,D1> {}
<MI 21b46 MOVE.W #0x3,(A0+D1.L)> {}
<MI 21b4c BRA 0x21b8c> {}
<POP 21b4e-21b5a Naked> Σ0 ↓ →0x21b66 ←0x21b2e
<POP 21b4e-21b50 StackAdj> Δ-2 {[-2-]}
<Call 0x21b50 0x10604> {[-2-]}
Is_machine_type_three() : Bool
<MI 21b56 TST.B (A7)+> Δ+2 {}
<MI 21b58 BNE 0x21b66> {}
<POP 21b5a-21b66 Naked> Σ0 ↓ →0x21b7a
<POP 21b5a-21b5c StackAdj> Δ-2 {[-2-]}
<Call 0x21b5c 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 21b62 TST.B (A7)+> Δ+2 {}
<MI 21b64 BEQ 0x21b7a> {}
<POP 21b66-21b7a Naked> Σ0 →0x21b8c ←0x21b4e
<MI 21b66 MOVEA.L (A6+0xa),A0> {}
<POP 0x21b68 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21b6c CLR.L D1> {}
<MI 21b6e MOVE.W D0,D1> {}
<MI 21b70 ASL.L #0x1,D1> {}
<MI 21b72 MOVE.W #0x4,(A0+D1.L)> {}
<MI 21b78 BRA 0x21b8c> {}
<POP 21b7a-21b8c Naked> Σ0 ↓ ←0x21b5a
<MI 21b7a MOVEA.L (A6+0xa),A0> {}
<POP 0x21b7c LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21b80 CLR.L D1> {}
<MI 21b82 MOVE.W D0,D1> {}
<MI 21b84 ASL.L #0x1,D1> {}
<MI 21b86 MOVE.W #0x2,(A0+D1.L)> {}
<POP 21b8c-21b98 Naked> Σ0 ↓ →0x21bb4 ←0x21b3a ←0x21b66
<POP 21b8c-21b8e StackAdj> Δ-2 {[-2-]}
<Call 0x21b8e 0x10610> {[-2-]}
Is_machine_type_one_or_three() : Bool
<MI 21b94 TST.B (A7)+> Δ+2 {}
<MI 21b96 BEQ 0x21bb4> {}
<POP 21b98-21bb4 Naked> Σ0 →0x21bcc
<MI 21b98 MOVEA.L (A6+0xa),A0> {}
<MI 21b9a CLR.L D1> {}
<MI 21b9c MOVE.W D0,D1> {}
<MI 21b9e ADDQ.L #0x1,D1> {}
<POP 0x21ba0 LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {}
<MI 21baa ASL.L #0x1,D1> {}
<MI 21bac MOVE.W #0x1,(A0+D1.L)> {}
<MI 21bb2 BRA 0x21bcc> {}
<POP 21bb4-21bcc Naked> Σ0 ↓ ←0x21b8c
<MI 21bb4 MOVEA.L (A6+0xa),A0> {}
<MI 21bb6 CLR.L D1> {}
<MI 21bb8 MOVE.W D0,D1> {}
<MI 21bba ADDQ.L #0x1,D1> {}
<POP 0x21bbc LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {}
<MI 21bc6 ASL.L #0x1,D1> {}
<MI 21bc8 CLR.W (A0+D1.L)> {}
<POP 21bcc-21c94 Naked> Σ0 ↓ ←0x21b98
<MI 21bcc MOVEA.L (A6+0xa),A0> {}
<MI 21bce CLR.L D1> {}
<MI 21bd0 MOVE.W D0,D1> {}
<MI 21bd2 MOVE.L D1,D0> {}
<MI 21bd4 ADDQ.L #0x2,D0> {}
<POP 0x21bd6 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21be0 ASL.L #0x1,D0> {}
<MI 21be2 CLR.W (A0+D0.L)> {}
<MI 21be6 MOVE.L D1,D0> {}
<MI 21be8 ADDQ.L #0x3,D0> {}
<POP 0x21bea LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21bf4 ASL.L #0x1,D0> {}
<MI 21bf6 CLR.W (A0+D0.L)> {}
<MI 21bfa ADDQ.L #0x4,D1> {}
<POP 0x21bfc LimitCheck 0x0 ≤ D1 ≤ 0xffff> {}
<MI 21c06 MOVE.W D1,(A6+0x8)> {}
<POP 0x21c08 LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {}
<MI 21c0c CLR.L D0> {}
<MI 21c0e MOVE.W D1,D0> {}
<MI 21c10 ASL.L #0x1,D0> {}
<MI 21c12 MOVE.W #0x2,(A0+D0.L)> {}
<MI 21c18 CLR.L D0> {}
<MI 21c1a MOVE.W D1,D0> {}
<MI 21c1c MOVE.L D0,D1> {}
<MI 21c1e ADDQ.L #0x1,D1> {}
<POP 0x21c20 LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {}
<MI 21c2a ASL.L #0x1,D1> {}
<MI 21c2c CLR.W (A0+D1.L)> {}
<Const 0x21c30 0x410.4> Δ-4 {[##1040]}
<MI 21c34 MOVE.L D0,D1> {[##1040]}
<MI 21c36 ADDQ.L #0x2,D1> {[##1040]}
<POP 0x21c38 LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {[##1040]}
<MI 21c42 ASL.L #0x1,D1> {[##1040]}
<MI 21c44 LEA.L (A0+D1.L),A1> {[##1040]}
<MI 21c48 MOVE.L A1,-(A7)> Δ-4 {[##1040]|[4, 'A1']}
<Const 0x21c4a 0x6.2> Δ-2 {[##1040]|[4, 'A1']|[#6]}
<Call 0x21c4e 0x10238> {[##1040]|[4, 'A1']|[#6]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 21c54-21c58 StackAdj> Δ+10 {}
<MI 21c58 ADDQ.L #0x5,D0> {}
<POP 0x21c5a LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21c64 MOVE.W D0,(A6+0x8)> {}
<POP 0x21c66 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21c6a CLR.L D1> {}
<MI 21c6c MOVE.W D0,D1> {}
<MI 21c6e ASL.L #0x1,D1> {}
<MI 21c70 MOVE.W 0x2425a,(A0+D1.L)> {}
<MI 21c78 CLR.L D1> {}
<MI 21c7a MOVE.W D0,D1> {}
<MI 21c7c ADDQ.L #0x1,D1> {}
<POP 0x21c7e LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {}
<MI 21c88 ASL.L #0x1,D1> {}
<MI 21c8a MOVE.W 0x2425c,(A0+D1.L)> {}
<MI 21c92 MOVEQ.L #0x00,D7> {}
<POP 21c94-21cce Naked> Σ0 ↓ →0x21c94 ←0x21c94
<MI 21c94 MOVEA.L (A6+0xa),A0> {}
<MI 21c96 CLR.L D0> {}
<MI 21c98 MOVE.W (A6+0x8),D0> {}
<MI 21c9a ADDQ.L #0x2,D0> {}
<MI 21c9c ADD.L D7,D0> {}
<POP 0x21c9e LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21ca8 ASL.L #0x1,D0> {}
<POP 0x21caa LimitCheck 0x0 ≤ D7 ≤ 0x3> {}
<MI 21cb4 MOVE.L D7,D1> {}
<MI 21cb6 ASL.L #0x1,D1> {}
<MI 21cb8 LEA.L 0x2425a,A1> {}
<MI 21cbe MOVE.W (A1+D1.L+#0x4),(A0+D0.L)> {}
<MI 21cc4 ADDQ.L #0x1,D7> {}
<MI 21cc6 CMPI.L #0x00000003,D7> {}
<MI 21ccc BLE 0x21c94> {}
<POP 21cce-21d0a Naked> Σ0 ↓
<MI 21cce CLR.L D0> {}
<MI 21cd0 MOVE.W (A6+0x8),D0> {}
<MI 21cd2 ADDQ.L #0x6,D0> {}
<MI 21cd4 ADDQ.L #0x8,D0> {}
<POP 0x21cd6 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21ce0 MOVE.W D0,(A6+0x8)> {}
<MI 21ce2 MOVEA.L (A6+0xa),A0> {}
<POP 0x21ce4 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21ce8 CLR.L D1> {}
<MI 21cea MOVE.W D0,D1> {}
<MI 21cec ASL.L #0x1,D1> {}
<MI 21cee ANDI.W #0x00ff,(A0+D1.L)> {}
<MI 21cf4 CLR.L D1> {}
<MI 21cf6 MOVE.W D0,D1> {}
<MI 21cf8 ADDQ.L #0x4,D1> {}
<MI 21cfa ADDQ.L #0x4,D1> {}
<POP 0x21cfc LimitCheck 0x0 ≤ D1 ≤ 0xffff> {}
<MI 21d06 MOVE.W D1,(A6+0x8)> {}
<MI 21d08 MOVEQ.L #0x00,D7> {}
<POP 21d0a-21d26 Naked> Σ0 ↓ →0x21d66 ←0x21d8e
<POP 21d0a-21d0c StackAdj> Δ-2 {[-2-]}
<Const 0x21d0c 0xb.4> Δ-4 {[-2-]|[##11]}
<MI 21d10 ADD.L D7,(A7)> {[-6-]}
<Call 0x21d12 0x10592> {[-6-]}
ReadConfig(where : Long) : Word
<POP 21d18-21d1a StackAdj> Δ+4 {[-2-]}
<MI 21d1a MOVE.W (A7)+,D0> Δ+2 {}
<MI 21d1c EXTW.L D0> {}
<MI 21d1e MOVE.L D0,D6> {}
<MI 21d20 BTST.L #0x0,D7> {}
<MI 21d24 BEQ 0x21d66> {}
<POP 21d26-21d66 Naked> Σ0 →0x21d8e
<MI 21d26 MOVEA.L (A6+0xa),A0> {}
<MI 21d28 MOVE.W (A6+0x8),D0> {}
<POP 0x21d2a LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21d2e CLR.L D1> {}
<MI 21d30 MOVE.W D0,D1> {}
<MI 21d32 ASL.L #0x1,D1> {}
<MI 21d34 MOVE.L D6,D0> {}
<MI 21d36 ANDI.L #0x000000ff,D0> {}
<MI 21d3c CLR.L D2> {}
<MI 21d3e MOVE.W (A0+D1.L),D2> {}
<MI 21d42 ADD.L D2,D0> {}
<POP 0x21d44 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21d4e MOVE.W D0,(A0+D1.L)> {}
<MI 21d52 CLR.L D0> {}
<MI 21d54 MOVE.W (A6+0x8),D0> {}
<MI 21d56 ADDQ.L #0x1,D0> {}
<POP 0x21d58 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21d62 MOVE.W D0,(A6+0x8)> {}
<MI 21d64 BRA 0x21d8e> {}
<POP 21d66-21d8e Naked> Σ0 ↓ ←0x21d0a
<MI 21d66 MOVEA.L (A6+0xa),A0> {}
<MI 21d68 MOVE.W (A6+0x8),D0> {}
<POP 0x21d6a LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21d6e CLR.L D1> {}
<MI 21d70 MOVE.W D0,D1> {}
<MI 21d72 ASL.L #0x1,D1> {}
<MI 21d74 MOVE.L #0x100,D4> {}
<MI 21d7a MOVE.L D6,D3> {}
<Call 0x21d7c 0x1028c> {}
?muls_d3_d4
<MI 21d82 MOVE.L D4,D0> {}
<MI 21d84 ANDI.L #0x0000ff00,D0> {}
<MI 21d8a MOVE.W D0,(A0+D1.L)> {}
<POP 21d8e-21d9a Naked> Σ0 ↓ →0x21d0a ←0x21d26
<MI 21d8e ADDQ.L #0x1,D7> {}
<MI 21d90 CMPI.L #0x0000001f,D7> {}
<MI 21d96 BLE 0x21d0a> {}
<POP 21d9a-21d9c Naked> Σ0 ↓
<MI 21d9a MOVEQ.L #0x00,D7> {}
<POP 21d9c-21db8 Naked> Σ0 ↓ →0x21df8 ←0x21e20
<POP 21d9c-21d9e StackAdj> Δ-2 {[-2-]}
<Const 0x21d9e 0x181.4> Δ-4 {[-2-]|[##385]}
<MI 21da2 ADD.L D7,(A7)> {[-6-]}
<Call 0x21da4 0x10592> {[-6-]}
ReadConfig(where : Long) : Word
<POP 21daa-21dac StackAdj> Δ+4 {[-2-]}
<MI 21dac MOVE.W (A7)+,D0> Δ+2 {}
<MI 21dae EXTW.L D0> {}
<MI 21db0 MOVE.L D0,D6> {}
<MI 21db2 BTST.L #0x0,D7> {}
<MI 21db6 BEQ 0x21df8> {}
<POP 21db8-21df8 Naked> Σ0 →0x21e20
<MI 21db8 MOVEA.L (A6+0xa),A0> {}
<MI 21dba MOVE.W (A6+0x8),D0> {}
<POP 0x21dbc LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21dc0 CLR.L D1> {}
<MI 21dc2 MOVE.W D0,D1> {}
<MI 21dc4 ASL.L #0x1,D1> {}
<MI 21dc6 MOVE.L D6,D0> {}
<MI 21dc8 ANDI.L #0x000000ff,D0> {}
<MI 21dce CLR.L D2> {}
<MI 21dd0 MOVE.W (A0+D1.L),D2> {}
<MI 21dd4 ADD.L D2,D0> {}
<POP 0x21dd6 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21de0 MOVE.W D0,(A0+D1.L)> {}
<MI 21de4 CLR.L D0> {}
<MI 21de6 MOVE.W (A6+0x8),D0> {}
<MI 21de8 ADDQ.L #0x1,D0> {}
<POP 0x21dea LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21df4 MOVE.W D0,(A6+0x8)> {}
<MI 21df6 BRA 0x21e20> {}
<POP 21df8-21e20 Naked> Σ0 ↓ ←0x21d9c
<MI 21df8 MOVEA.L (A6+0xa),A0> {}
<MI 21dfa MOVE.W (A6+0x8),D0> {}
<POP 0x21dfc LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21e00 CLR.L D1> {}
<MI 21e02 MOVE.W D0,D1> {}
<MI 21e04 ASL.L #0x1,D1> {}
<MI 21e06 MOVE.L #0x100,D4> {}
<MI 21e0c MOVE.L D6,D3> {}
<Call 0x21e0e 0x1028c> {}
?muls_d3_d4
<MI 21e14 MOVE.L D4,D0> {}
<MI 21e16 ANDI.L #0x0000ff00,D0> {}
<MI 21e1c MOVE.W D0,(A0+D1.L)> {}
<POP 21e20-21e2c Naked> Σ0 ↓ →0x21d9c ←0x21db8
<MI 21e20 ADDQ.L #0x1,D7> {}
<MI 21e22 CMPI.L #0x0000004f,D7> {}
<MI 21e28 BLE 0x21d9c> {}
<POP 21e2c-21e2e Naked> Σ0 ↓
<MI 21e2c MOVEQ.L #0x00,D7> {}
<POP 21e2e-21e4a Naked> Σ0 ↓ →0x21e8a ←0x21eb2
<POP 21e2e-21e30 StackAdj> Δ-2 {[-2-]}
<Const 0x21e30 0x1d0.4> Δ-4 {[-2-]|[##464]}
<MI 21e34 ADD.L D7,(A7)> {[-6-]}
<Call 0x21e36 0x10592> {[-6-]}
ReadConfig(where : Long) : Word
<POP 21e3c-21e3e StackAdj> Δ+4 {[-2-]}
<MI 21e3e MOVE.W (A7)+,D0> Δ+2 {}
<MI 21e40 EXTW.L D0> {}
<MI 21e42 MOVE.L D0,D6> {}
<MI 21e44 BTST.L #0x0,D7> {}
<MI 21e48 BEQ 0x21e8a> {}
<POP 21e4a-21e8a Naked> Σ0 →0x21eb2
<MI 21e4a MOVEA.L (A6+0xa),A0> {}
<MI 21e4c MOVE.W (A6+0x8),D0> {}
<POP 0x21e4e LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21e52 CLR.L D1> {}
<MI 21e54 MOVE.W D0,D1> {}
<MI 21e56 ASL.L #0x1,D1> {}
<MI 21e58 MOVE.L D6,D0> {}
<MI 21e5a ANDI.L #0x000000ff,D0> {}
<MI 21e60 CLR.L D2> {}
<MI 21e62 MOVE.W (A0+D1.L),D2> {}
<MI 21e66 ADD.L D2,D0> {}
<POP 0x21e68 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21e72 MOVE.W D0,(A0+D1.L)> {}
<MI 21e76 CLR.L D0> {}
<MI 21e78 MOVE.W (A6+0x8),D0> {}
<MI 21e7a ADDQ.L #0x1,D0> {}
<POP 0x21e7c LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21e86 MOVE.W D0,(A6+0x8)> {}
<MI 21e88 BRA 0x21eb2> {}
<POP 21e8a-21eb2 Naked> Σ0 ↓ ←0x21e2e
<MI 21e8a MOVEA.L (A6+0xa),A0> {}
<MI 21e8c MOVE.W (A6+0x8),D0> {}
<POP 0x21e8e LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21e92 CLR.L D1> {}
<MI 21e94 MOVE.W D0,D1> {}
<MI 21e96 ASL.L #0x1,D1> {}
<MI 21e98 MOVE.L #0x100,D4> {}
<MI 21e9e MOVE.L D6,D3> {}
<Call 0x21ea0 0x1028c> {}
?muls_d3_d4
<MI 21ea6 MOVE.L D4,D0> {}
<MI 21ea8 ANDI.L #0x0000ff00,D0> {}
<MI 21eae MOVE.W D0,(A0+D1.L)> {}
<POP 21eb2-21ebe Naked> Σ0 ↓ →0x21e2e ←0x21e4a
<MI 21eb2 ADDQ.L #0x1,D7> {}
<MI 21eb4 CMPI.L #0x0000001d,D7> {}
<MI 21eba BLE 0x21e2e> {}
<POP 21ebe-21efa Naked> Σ0 ↓
<POP 21ebe-21ec0 StackAdj> Δ-2 {[-2-]}
<Const 0x21ec0 0x180.4> Δ-4 {[-2-]|[##384]}
<Call 0x21ec4 0x10592> {[-2-]|[##384]}
ReadConfig(where : Long) : Word
<POP 21eca-21ecc StackAdj> Δ+4 {[-2-]}
<MI 21ecc MOVE.W (A7)+,D0> Δ+2 {}
<MI 21ece EXTW.L D0> {}
<MI 21ed0 MOVE.L D0,D6> {}
<MI 21ed2 MOVEA.L (A6+0xa),A0> {}
<MI 21ed4 MOVE.W (A6+0x8),D0> {}
<POP 0x21ed6 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21eda CLR.L D1> {}
<MI 21edc MOVE.W D0,D1> {}
<MI 21ede ASL.L #0x1,D1> {}
<MI 21ee0 MOVE.L #0x100,D4> {}
<MI 21ee6 MOVE.L D6,D3> {}
<Call 0x21ee8 0x1028c> {}
?muls_d3_d4
<MI 21eee MOVE.L D4,D0> {}
<MI 21ef0 ANDI.L #0x0000ff00,D0> {}
<MI 21ef6 MOVE.W D0,(A0+D1.L)> {}
<POP 21efa-21f02 Epilogue> Σ0
@ 21f02
<LVAR 0x00a 4(r)>
<LVAR 0x008 2(r)>
<LVAR -0x004 2(w)>
<LVAR -0x006 2(r)>
<LVAR -0x008 2(w)>
<LVAR -0x00a 2(r)>
<LVAR -0x00c 2(w)>
<LVAR -0x00e 2(r)>
<LVAR -0x010 2(r)>
<LVAR -0x012 @ 2(w)>
<LVAR -0x414 @>
<LVAR -0x41e @ 4(rw)>
<LVAR -0x426 @ 4(rw)>
<LVAR -0x42a @ 4(rw)>
<POP 21f02-2210e Body> Δ-8
<POP 21f02-21f18 Prologue> Σ0 ↓
<POP 21f18-21f26 RegCacheLoad> Σ0 ↓
<POP 21f26-21f28 Naked> Σ0 ↓
<MI 21f26 MOVEQ.L #0x00,D6> {}
<POP 21f28-21f3e Naked> Σ0 ↓ →0x21f28 ←0x21f28
<POP 0x21f28 LimitCheck 0x0 ≤ D6 ≤ 0x1ff> {}
<MI 21f2a CLR.L D0> {}
<MI 21f2c MOVE.W D6,D0> {}
<MI 21f2e ASL.L #0x1,D0> {}
<MI 21f30 LEA.L (A6-0x42a),A0> {}
<MI 21f34 CLR.W (A0+D0.L+#0x16)> {}
<MI 21f38 ADDQ.W #0x1,D6> {}
<MI 21f3a CMP.W #0x1ff,D6> {}
<MI 21f3c BLS 0x21f28> {}
<POP 21f3e-21f44 Naked> Σ0 ↓
<MI 21f3e MOVEA.L (A6+0xa),A0> {}
<MI 21f42 MOVE.L (A0),(A6-0x426)> {}
<POP 21f44-21f4c Naked> Σ0 Δ-4 ↓ →0x21f76 ←0x21f6c
<MI 21f44 MOVEA.L (A6-0x426),A0> {}
<MI 21f46 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 21f48 CMPA.W #0x01,A0> {[4, 'A0']}
<MI 21f4a BEQ 0x21f76> {[4, 'A0']}
<POP 21f4c-21f56 Naked> Σ-4 ↓
<MI 21f4c CLR.L (A0+0x26)> {[-4-]}
<MI 21f50 MOVE.L (A0+0x2a),(A6-0x41e)> {[-4-]}
<POP 21f56-21f5e Naked> Σ-4 ↓ →0x21f6c ←0x21f5e
<MI 21f56 MOVEA.L (A6-0x41e),A0> {[-4-]}
<MI 21f5a CMPA.W #0x01,A0> {[-4-]}
<MI 21f5c BEQ 0x21f6c> {[-4-]}
<POP 21f5e-21f6c Naked> Σ-4 →0x21f56
<MI 21f5e MOVEA.L (A7),A1> {[-4-]}
<MI 21f60 ADDQ.L #0x1,(A1+0x26)> {[-4-]}
<MI 21f64 MOVE.L (A0+0x4),(A6-0x41e)> {[-4-]}
<MI 21f6a BRA 0x21f56> {[-4-]}
<POP 21f6c-21f76 Naked> Σ-4 Δ+4 →0x21f44 ←0x21f56
<MI 21f6c MOVEA.L (A7),A0> {[-4-]}
<MI 21f6e MOVE.L (A0+0x2e),(A6-0x426)> {[-4-]}
<POP 21f72-21f74 StackAdj> Δ+4 {}
<MI 21f74 BRA 0x21f44> {}
<POP 21f76-21f7a Naked> Σ-4 Δ+4 ↓ ←0x21f44
<POP 21f76-21f78 StackAdj> Δ+4 {}
<MI 21f78 MOVEQ.L #0x00,D6> {}
<POP 21f7a-21f86 Naked> Σ0 ↓ →0x220b4 ←0x220a2
<MI 21f7a MOVEA.L (A6+0xa),A0> {}
<MI 21f7e MOVEA.L (A0),A1> {}
<MI 21f80 CMPA.W #0x01,A1> {}
<MI 21f82 BEQ 0x220b4> {}
<POP 21f86-21f8c Naked> Σ0 ↓
<MI 21f86 MOVE.L A1,(A6-0x426)> {}
<MI 21f88 MOVEA.W #0x01,A3> {}
<MI 21f8a MOVEQ.L #0x00,D7> {}
<POP 21f8c-21f92 Naked> Σ0 ↓ →0x21fa8 ←0x21fa6
<MI 21f8c MOVEA.L (A6-0x426),A0> {}
<MI 21f8e CMPA.W #0x01,A0> {}
<MI 21f90 BEQ 0x21fa8> {}
<POP 21f92-21f96 Naked> Σ0 ↓ →0x21fa8
<MI 21f92 TST.B D7> {}
<MI 21f94 BNE 0x21fa8> {}
<POP 21f96-21f9c Naked> Σ0 ↓ →0x21fa0
<MI 21f96 TST.L (A0+0x26)> {}
<MI 21f9a BNE 0x21fa0> {}
<POP 21f9c-21fa0 Naked> Σ0 →0x21fa6
<MI 21f9c MOVEQ.L #0x01,D7> {}
<MI 21f9e BRA 0x21fa6> {}
<POP 21fa0-21fa6 Naked> Σ0 ↓ ←0x21f96
<MI 21fa0 MOVEA.L A0,A3> {}
<MI 21fa2 MOVE.L (A0+0x2e),(A6-0x426)> {}
<POP 21fa6-21fa8 Naked> Σ0 →0x21f8c ←0x21f9c
<MI 21fa6 BRA 0x21f8c> {}
<POP 21fa8-21fac Naked> Σ0 ↓ →0x21fd8 ←0x21f8c ←0x21f92
<MI 21fa8 TST.B D7> {}
<MI 21faa BNE 0x21fd8> {}
<POP 21fac-21fd8 Naked> Σ0 ↓
<Blob 0x21fac [30] @> Δ-30 {[«30""»]}
<Const 0x21fb8 0xe.2> Δ-2 {[«30""»]|[#14]}
<POP 21fba-21fbc StackAdj> Δ-4 {[«30""»]|[#14]|[-4-]}
<Lit 0x21fbc 30> {[«30""»]|[#14]|[$$No possible elaboration order!]}
<Call 0x21fce 0x103b8> {[«30""»]|[#14]|[$$No possible elaboration order!]}
PopProgram(status : Byte; msg : String)
<POP 21fd4-21fd8 StackAdj> Δ+36 {}
<POP 21fd8-2201c Naked> Σ0 ↓ ←0x21fa8
<POP 0x21fd8 LimitCheck 0x0 ≤ D6 ≤ 0x1ff> {}
<MI 21fda CLR.L D0> {}
<MI 21fdc MOVE.W D6,D0> {}
<MI 21fde ASL.L #0x1,D0> {}
<MI 21fe0 LEA.L (A6-0x42a),A0> {}
<MI 21fe4 MOVEA.L (A6-0x426),A1> {}
<MI 21fe6 MOVE.W (A1+0x22),(A0+D0.L+#0x16)> {}
<MI 21fec CLR.L D0> {}
<MI 21fee MOVE.W D6,D0> {}
<MI 21ff0 MOVE.L D0,D1> {}
<MI 21ff2 ADDQ.L #0x1,D1> {}
<POP 0x21ff4 LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {}
<MI 21ffa ASL.L #0x1,D1> {}
<MI 21ffc LEA.L (A6-0x42a),A0> {}
<MI 22000 MOVE.W (A1+0x24),(A0+D1.L+#0x16)> {}
<MI 22006 ADDQ.L #0x2,D0> {}
<POP 0x22008 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 22012 MOVE.W D0,D6> {}
<MI 22014 MOVEA.L (A6+0xa),A0> {}
<MI 22018 MOVE.L (A0),(A6-0x42a)> {}
<POP 2201c-22026 Naked> Σ0 Δ-4 ↓ →0x22088 ←0x2207c
<MI 2201c MOVEA.L (A6-0x42a),A0> {}
<MI 22020 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 22022 CMPA.W #0x01,A0> {[4, 'A0']}
<MI 22024 BEQ 0x22088> {[4, 'A0']}
<POP 22026-22030 Naked> Σ-4 ↓
<MI 22026 MOVE.L (A0+0x2a),(A6-0x41e)> {[-4-]}
<MI 2202c MOVEA.W #0x01,A4> {[-4-]}
<MI 2202e MOVEQ.L #0x00,D7> {[-4-]}
<POP 22030-22038 Naked> Σ-4 ↓ →0x22050 ←0x2204e
<MI 22030 MOVEA.L (A6-0x41e),A0> {[-4-]}
<MI 22034 CMPA.W #0x01,A0> {[-4-]}
<MI 22036 BEQ 0x22050> {[-4-]}
<POP 22038-2203c Naked> Σ-4 ↓ →0x22050
<MI 22038 TST.B D7> {[-4-]}
<MI 2203a BNE 0x22050> {[-4-]}
<POP 2203c-22042 Naked> Σ-4 ↓ →0x22046
<MI 2203c MOVEA.L (A0),A1> {[-4-]}
<MI 2203e CMPA.L (A6-0x426),A1> {[-4-]}
<MI 22040 BNE 0x22046> {[-4-]}
<POP 22042-22046 Naked> Σ-4 →0x2204e
<MI 22042 MOVEQ.L #0x01,D7> {[-4-]}
<MI 22044 BRA 0x2204e> {[-4-]}
<POP 22046-2204e Naked> Σ-4 ↓ ←0x2203c
<MI 22046 MOVEA.L A0,A4> {[-4-]}
<MI 22048 MOVE.L (A0+0x4),(A6-0x41e)> {[-4-]}
<POP 2204e-22050 Naked> Σ-4 →0x22030 ←0x22042
<MI 2204e BRA 0x22030> {[-4-]}
<POP 22050-22054 Naked> Σ-4 ↓ →0x2207c ←0x22030 ←0x22038
<MI 22050 TST.B D7> {[-4-]}
<MI 22052 BEQ 0x2207c> {[-4-]}
<POP 22054-2205e Naked> Σ-4 ↓ →0x22066
<MI 22054 MOVEA.L (A7),A1> {[-4-]}
<MI 22056 SUBQ.L #0x1,(A1+0x26)> {[-4-]}
<MI 2205a CMPA.W #0x01,A4> {[-4-]}
<MI 2205c BNE 0x22066> {[-4-]}
<POP 2205e-22066 Naked> Σ-4 →0x2206c
<MI 2205e MOVE.L (A0+0x4),(A1+0x2a)> {[-4-]}
<MI 22064 BRA 0x2206c> {[-4-]}
<POP 22066-2206c Naked> Σ-4 ↓ ←0x22054
<MI 22066 MOVE.L (A0+0x4),(A4+0x4)> {[-4-]}
<POP 2206c-2207c Naked> Σ-4 ↓ ←0x2205e
<Pointer.fp 0x2206c <LVAR -0x41e @ 4(rw)>> Δ-4 {[-4-]|[@@-1054]}
<Const 0x22070 0x8.4> Δ-4 {[-4-]|[@@-1054]|[##8]}
<Call 0x22074 0x102a8> {[-4-]|[@@-1054]|[##8]}
Free2(a : Pointer; b : Long)
<POP 2207a-2207c StackAdj> Δ+8 {[-4-]}
<POP 2207c-22088 Naked> Σ-4 Δ+4 →0x2201c ←0x22050
<MI 2207c MOVEA.L (A7),A0> {[-4-]}
<MI 2207e MOVE.L (A0+0x2e),(A6-0x42a)> {[-4-]}
<POP 22084-22086 StackAdj> Δ+4 {}
<MI 22086 BRA 0x2201c> {}
<POP 22088-2208e Naked> Σ-4 Δ+4 ↓ →0x2209a ←0x2201c
<POP 22088-2208a StackAdj> Δ+4 {}
<MI 2208a CMPA.W #0x01,A3> {}
<MI 2208c BNE 0x2209a> {}
<POP 2208e-2209a Naked> Σ0 →0x220a2
<MI 2208e MOVEA.L (A6+0xa),A0> {}
<MI 22092 MOVEA.L (A6-0x426),A1> {}
<MI 22094 MOVE.L (A1+0x2e),(A0)> {}
<MI 22098 BRA 0x220a2> {}
<POP 2209a-220a2 Naked> Σ0 ↓ ←0x22088
<MI 2209a MOVEA.L (A6-0x426),A0> {}
<MI 2209c MOVE.L (A0+0x2e),(A3+0x2e)> {}
<POP 220a2-220b4 Naked> Σ0 →0x21f7a ←0x2208e
<Pointer.fp 0x220a2 <LVAR -0x426 @ 4(rw)>> Δ-4 {[@@-1062]}
<Const 0x220a4 0x32.4> Δ-4 {[@@-1062]|[##50]}
<Call 0x220a8 0x102a8> {[@@-1062]|[##50]}
Free2(a : Pointer; b : Long)
<POP 220ae-220b0 StackAdj> Δ+8 {}
<MI 220b0 BRA 0x21f7a> {}
<POP 220b4-220be Naked> Σ0 ↓ →0x220ca ←0x21f7a
<MI 220b4 MOVE.W (A6+0x8),D0> {}
<MI 220b8 CMPI.W #0x0004,D0> {}
<MI 220bc BNE 0x220ca> {}
<POP 220be-220ca Naked> Σ0 ↓
<Pointer.fp 0x220be <LVAR -0x414 @>> Δ-4 {[@@-1044]}
<MI 220c2 MOVE.W D6,-(A7)> Δ-2 {[@@-1044]|[2, 'D6']}
<Call 0x220c4 0x21806> {[@@-1044]|[2, 'D6']}
<POP 220c8-220ca StackAdj> Δ+6 {}
<POP 220ca-22106 Naked> Σ0 ↓ ←0x220b4
<MI 220ca MOVE.W 0x241d2,(A6-0x12)> {}
<MI 220d2 CLR.W (A6-0x10)> {}
<MI 220d6 CLR.W (A6-0xe)> {}
<MI 220da MOVE.W #0x100,(A6-0xc)> {}
<MI 220e0 CLR.W (A6-0xa)> {}
<MI 220e4 MOVE.W (A6+0x8),(A6-0x8)> {}
<MI 220ea CLR.W (A6-0x6)> {}
<MI 220ee MOVE.W #0x0e,(A6-0x4)> {}
<Pointer.fp 0x220f2 <LVAR -0x012 @ 2(w)>> Δ-4 {[@@-18]}
<MI 220f6 LEA.L (A6-0x414),A0> {[@@-18]}
<MI 220fa MOVE.L A0,-(A7)> Δ-4 {[@@-18]|[4, 'A0']}
<Const 0x220fc 0x1.2> Δ-2 {[@@-18]|[4, 'A0']|[#1]}
<Call 0x220fe 0x21312> {[@@-18]|[4, 'A0']|[#1]}
<POP 22102-22106 StackAdj> Δ+10 {}
<POP 22106-2210e Epilogue> Σ0
@ 2210e
<LVAR 0x00c 4(w)>
<LVAR 0x008 @ 4(r)>
<LVAR -0x003 @ 1(rw)>
<LVAR -0x008 @ 4(rw)>
<POP 2210e-22252 Body>
<POP 2210e-22124 Prologue> Σ0 ↓
<POP 22124-22138 RegCacheLoad> Σ0 ↓
<POP 22138-2215a Naked> Σ0 ↓ →0x2218a
<POP 22138-2213a StackAdj> Δ-4 {[-4-]}
<MI 2213a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x2213c 0x102cc> {[-4-]|[4, '(A6+0x8)']}
StringDup(a : String) : String
<POP 22142-22144 StackAdj> Δ+4 {[-4-]}
<MI 22144 MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 22146 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 22148 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6+0x8)']}
<Pointer.fp 0x2214a <LVAR -0x003 @ 1(rw)>> Δ-4 {[4, '(A6-0x8)']|[4, '(A6+0x8)']|[@@-3]}
<Call 0x2214c 0x102fc> {[4, '(A6-0x8)']|[4, '(A6+0x8)']|[@@-3]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 22152-22156 StackAdj> Δ+12 {}
<MI 22156 TST.B (A6-0x3)> {}
<MI 22158 BNE 0x2218a> {}
<POP 2215a-2218a Naked> Σ0 ↓
<Blob 0x2215a [32] @> Δ-32 {[«32""»]}
<Const 0x2216a 0xe.2> Δ-2 {[«32""»]|[#14]}
<POP 2216c-2216e StackAdj> Δ-4 {[«32""»]|[#14]|[-4-]}
<Lit 0x2216e 31> {[«32""»]|[#14]|[$$No subsystem in WITH directive.]}
<Call 0x22180 0x103b8> {[«32""»]|[#14]|[$$No subsystem in WITH directive.]}
PopProgram(status : Byte; msg : String)
<POP 22186-2218a StackAdj> Δ+38 {}
<POP 2218a-22196 Naked> Σ0 ↓ ←0x22138
<Pointer.fp 0x2218a <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x2218c 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 22192-22194 StackAdj> Δ+4 {}
<MI 22194 MOVEQ.L #0x00,D7> {}
<POP 22196-221c8 Naked> Σ0 ↓ →0x221fe ←0x221fe
<POP 22196-22198 StackAdj> Δ-4 {[-4-]}
<MI 22198 MOVE.B D7,-(A7)> Δ-2 {[-4-]|[2, 'D7']}
<Call 0x2219a 0x10586> {[-4-]|[2, 'D7']}
Config_Entry_Name(a : Byte) : String
<POP 221a0-221a2 StackAdj> Δ+2 {[-4-]}
<MI 221a2 MOVE.L (A7),(A6-0x8)> {[-4-]}
<POP 221a4-221a6 StackAdj> Δ+2 {[-2-]}
<MI 221a6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']}
<MI 221a8 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x8)']}
<Call 0x221aa 0x102c8> {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x8)']}
StringEqual(a, b : String) : Byte
<POP 221b0-221b2 StackAdj> Δ+8 {[-2-]}
<MI 221b2 MOVE.B (A7)+,D0> Δ+2 {}
<MI 221b4 EXTB.W D0> {}
<POP 0x221b6 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 221b8 MOVE.B D0,(A6-0x3)> {}
<Pointer.fp 0x221ba <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x221bc 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 221c2-221c4 StackAdj> Δ+4 {}
<MI 221c4 TST.B D0> {}
<MI 221c6 BEQ 0x221fe> {}
<POP 221c8-221fe Naked> Σ0 →0x22240
<MI 221c8 MOVE.B D7,D0> {}
<MI 221ca EXTB.W D0> {}
<MI 221cc ASL.W #0x5,D0> {}
<MI 221ce LEA.L 0x23e90,A0> {}
<Blob 0x221d4 [30] (A0+D0.W+#0x5d)> Δ-30 {[«30»]}
<POP 221e4-221e6 StackAdj> Δ-4 {[«30»]|[-4-]}
<Lit 0x221e6> {[«30»]|[$$…]}
<Pointer.sp 0x221e6 4> Δ-4
<Const 0x221ea 0x1.2> Δ-2
<Const 0x221ec 0x1e.2> Δ-2
<Call 0x221ee 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 221f4-221f6 StackAdj> Δ+8
<MI 221f6 MOVE.L (A7)+,(A6+0xc)> Δ+4 {[«30»]}
<POP 221fa-221fc StackAdj> Δ+30 {}
<MI 221fc BRA 0x22240> {}
<POP 221fe-22206 Naked> Σ0 ↓ →0x22196 ←0x22196
<MI 221fe ADDQ.B #0x1,D7> {}
<MI 22200 CMPI.B #0x09,D7> {}
<MI 22204 BLE 0x22196> {}
<POP 22206-22240 Naked> Σ0 ↓
<Blob 0x22206 [26] @> Δ-26 {[«26""»]}
<Const 0x22218 0xe.2> Δ-2 {[«26""»]|[#14]}
<POP 2221a-2221c StackAdj> Δ-8 {[«26""»]|[#14]|[-8-]}
<Lit 0x2221c 25> {[«26""»]|[#14]|[-4-]|[$$Unknown subsystem name :_]}
<POP 2222c-2222e StackAdj> Δ-4 {[«26""»]|[#14]|[-4-]|[$$Unknown subsystem name :_]|[-4-]}
<MI 2222e MOVE.L (A6+0x8),(A7)> {[«26""»]|[#14]|[-4-]|[$$Unknown subsystem name :_]|[4, '(A6+0x8)']}
<Call 0x22230 0x102d0> {[«26""»]|[#14]|[-4-]|[$$Unknown subsystem name :_]|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 22236-22238 StackAdj> Δ+8 {[«26""»]|[#14]|[-4-]}
<Call 0x22238 0x103b8> {[«26""»]|[#14]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 2223e-22240 StackAdj> Δ+32 {}
<POP 22240-2224a Naked> Σ0 ↓ ←0x221c8
<Pointer.fp 0x22240 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x22242 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 22248-2224a StackAdj> Δ+4 {}
<POP 2224a-22252 Epilogue> Σ0
@ 22252
<LVAR -0x010 @ 4(rw)>
<LVAR -0x018 4(rw)>
<LVAR -0x01c 4(rw)>
<LVAR -0x03a @>
<LVAR -0x03e @ 4(rw)>
<POP 22252-22460 Body> Δ-4
<POP 22252-22268 Prologue> Σ0 ↓
<POP 22268-2226e RegCacheLoad> Σ0 ↓
<POP 2226e-2227c Naked> Σ0 ↓
<Pointer.fp 0x2226e <LVAR -0x03e @ 4(rw)>> Δ-4 {[@@-62]}
<Call 0x22272 0x102b8> {[@@-62]}
NewString(VAR a : String)
<POP 22278-2227a StackAdj> Δ+4 {}
<MI 2227a MOVEQ.L #0x00,D5> {}
<POP 2227c-222b2 Naked> Σ0 ↓ ←0x2239a
<MI 2227c MOVE.B D5,D0> {}
<MI 2227e EXTB.W D0> {}
<MI 22280 ASL.W #0x5,D0> {}
<MI 22282 LEA.L 0x23e90,A0> {}
<Blob 0x22288 [30] (A0+D0.W+#0x5d)> Δ-30 {[«30»]}
<POP 22298-2229a StackAdj> Δ-4 {[«30»]|[-4-]}
<Lit 0x2229a> {[«30»]|[$$…]}
<Pointer.sp 0x2229a 4> Δ-4
<Const 0x2229e 0x1.2> Δ-2
<Const 0x222a0 0x1e.2> Δ-2
<Call 0x222a2 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 222a8-222aa StackAdj> Δ+8
<MI 222aa MOVE.L (A7)+,(A6-0x3e)> Δ+4 {[«30»]}
<POP 222ae-222b0 StackAdj> Δ+30 {}
<MI 222b0 MOVEQ.L #0x01,D6> {}
<POP 222b2-222be Naked> Σ0 ↓ →0x222ce ←0x222ec
<MI 222b2 MOVEA.L (A6-0x3e),A0> {}
<MI 222b6 MOVE.W (A0),D0> {}
<MI 222b8 EXTW.L D0> {}
<MI 222ba CMP.L D0,D6> {}
<MI 222bc BLE 0x222ce> {}
<POP 222be-222ce Naked> Σ0 →0x222ec
<MI 222be MOVE.L D6,D0> {}
<MI 222c0 SUBQ.L #0x1,D0> {}
<POP 0x222c2 LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 222c8 CLR.B (A6+D0.L-#0x3a)> {}
<MI 222cc BRA 0x222ec> {}
<POP 222ce-222ec Naked> Σ0 ↓ ←0x222b2
<MI 222ce MOVE.L D6,D0> {}
<MI 222d0 SUBQ.L #0x1,D0> {}
<POP 0x222d2 LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 222d8 MOVE.L D6,D1> {}
<MI 222da SUBQ.L #0x1,D1> {}
<POP 0x222dc LimitCheck 0x0 ≤ D1 ≤ 0x7d> {}
<MI 222e6 MOVE.B (A0+D1.L+#0x2),(A6+D0.L-#0x3a)> {}
<POP 222ec-222f2 Naked> Σ0 ↓ →0x222b2 ←0x222be
<MI 222ec ADDQ.L #0x1,D6> {}
<MI 222ee CMP.L #0x1e,D6> {}
<MI 222f0 BLE 0x222b2> {}
<POP 222f2-222fe Naked> Σ0 ↓
<MI 222f2 MOVE.L 0x241ca,(A6-0x1c)> {}
<MI 222fa MOVEA.W #0x01,A3> {}
<MI 222fc MOVEQ.L #0x00,D7> {}
<POP 222fe-22306 Naked> Σ0 ↓ →0x22328 ←0x22326
<MI 222fe MOVEA.L (A6-0x1c),A0> {}
<MI 22302 CMPA.W #0x01,A0> {}
<MI 22304 BEQ 0x22328> {}
<POP 22306-2230a Naked> Σ0 ↓ →0x22328
<MI 22306 TST.B D7> {}
<MI 22308 BNE 0x22328> {}
<POP 2230a-22312 Naked> Σ0 ↓
<MI 2230a LEA.L (A6-0x3a),A1> {}
<MI 2230e MOVEA.L A0,A2> {}
<MI 22310 MOVEQ.L #0x1d,D0> {}
<POP 22312-22318 Naked> Σ0 ↓ →0x22312 ←0x22312
<MI 22312 CMPM.B (A1)+,(A2)+> {}
<MI 22314 DBNE D0,0x22312> {}
<POP 22318-2231a Naked> Σ0 ↓ →0x2231e
<MI 22318 BNE 0x2231e> {}
<POP 2231a-2231e Naked> Σ0 →0x22326
<MI 2231a MOVEQ.L #0x01,D7> {}
<MI 2231c BRA 0x22326> {}
<POP 2231e-22326 Naked> Σ0 ↓ ←0x22318
<MI 2231e MOVEA.L A0,A3> {}
<MI 22320 MOVE.L (A0+0x2e),(A6-0x1c)> {}
<POP 22326-22328 Naked> Σ0 →0x222fe ←0x2231a
<MI 22326 BRA 0x222fe> {}
<POP 22328-2232c Naked> Σ0 ↓ →0x2237e ←0x222fe ←0x22306
<MI 22328 TST.B D7> {}
<MI 2232a BNE 0x2237e> {}
<POP 2232c-2237e Naked> Σ0 ↓
<Blob 0x2232c [42] @> Δ-42 {[«42""»]}
<Blob 0x22338 [30] (A6-0x1c)> Δ-30 {[«42""»]|[«30»]}
<Const 0x22344 0xe.2> Δ-2 {[«42""»]|[«30»]|[#14]}
<POP 22348-2234a StackAdj> Δ-8 {[«42""»]|[«30»]|[#14]|[-8-]}
<Lit 0x2234a 42> {[«42""»]|[«30»]|[#14]|[-4-]|[$$Kernel elaborated subsystem not on list :_]}
<POP 2235a-2235c StackAdj> Δ-4 {[«42""»]|[«30»]|[#14]|[-4-]|[$$Kernel elaborated subsystem not on list :_]|[-4-]}
<Lit 0x2235c> {[«42""»]|[«30»]|[#14]|[-4-]|[$$Kernel elaborated subsystem not on list :_]|[$$…]}
<Pointer.sp 0x2235c 14> Δ-4
<Const 0x22360 0x1.2> Δ-2
<Const 0x22362 0x1e.2> Δ-2
<Call 0x22364 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2236a-2236c StackAdj> Δ+8
<Call 0x2236c 0x102d0> {[«42""»]|[«30»]|[#14]|[-4-]|[$$Kernel elaborated subsystem not on list :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 22372-22374 StackAdj> Δ+8 {[«42""»]|[«30»]|[#14]|[-4-]}
<Call 0x22374 0x103b8> {[«42""»]|[«30»]|[#14]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 2237a-2237e StackAdj> Δ+78 {}
<POP 2237e-22382 Naked> Σ0 ↓ →0x22390 ←0x22328
<MI 2237e CMPA.W #0x01,A3> {}
<MI 22380 BNE 0x22390> {}
<POP 22382-22390 Naked> Σ0 →0x2239a
<MI 22382 MOVEA.L (A6-0x1c),A0> {}
<MI 22386 MOVE.L (A0+0x2e),0x241ca> {}
<MI 2238e BRA 0x2239a> {}
<POP 22390-2239a Naked> Σ0 ↓ ←0x2237e
<MI 22390 MOVEA.L (A6-0x1c),A0> {}
<MI 22394 MOVE.L (A0+0x2e),(A3+0x2e)> {}
<POP 2239a-223b8 Naked> Σ0 ↓ →0x2227c ←0x22382
<MI 2239a MOVEA.L (A6-0x1c),A0> {}
<MI 2239e MOVE.L 0x241ce,(A0+0x2e)> {}
<MI 223a6 MOVE.L (A6-0x1c),0x241ce> {}
<MI 223ae ADDQ.B #0x1,D5> {}
<MI 223b0 CMPI.B #0x04,D5> {}
<MI 223b4 BLE 0x2227c> {}
<POP 223b8-223cc Naked> Σ0 ↓
<Pointer.fp 0x223b8 <LVAR -0x03e @ 4(rw)>> Δ-4 {[@@-62]}
<Call 0x223bc 0x102bc> {[@@-62]}
FreeString(VAR a : String)
<POP 223c2-223c4 StackAdj> Δ+4 {}
<MI 223c4 MOVE.L 0x241ce,(A6-0x18)> {}
<POP 223cc-223d6 Naked> Σ0 ↓ →0x22458 ←0x22448
<MI 223cc MOVEA.L (A6-0x18),A0> {}
<MI 223d0 CMPA.W #0x01,A0> {}
<MI 223d2 BEQ 0x22458> {}
<POP 223d6-223de Naked> Σ0 ↓
<MI 223d6 MOVE.L 0x241ca,(A6-0x1c)> {}
<POP 223de-223e8 Naked> Σ0 Δ-4 ↓ →0x22448 ←0x2243c
<MI 223de MOVEA.L (A6-0x1c),A0> {}
<MI 223e2 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 223e4 CMPA.W #0x01,A0> {[4, 'A0']}
<MI 223e6 BEQ 0x22448> {[4, 'A0']}
<POP 223e8-223f2 Naked> Σ-4 ↓
<MI 223e8 MOVE.L (A0+0x2a),(A6-0x10)> {[-4-]}
<MI 223ee MOVEA.W #0x01,A4> {[-4-]}
<MI 223f0 MOVEQ.L #0x00,D7> {[-4-]}
<POP 223f2-223fa Naked> Σ-4 ↓ →0x22414 ←0x22412
<MI 223f2 MOVEA.L (A6-0x10),A0> {[-4-]}
<MI 223f6 CMPA.W #0x01,A0> {[-4-]}
<MI 223f8 BEQ 0x22414> {[-4-]}
<POP 223fa-223fe Naked> Σ-4 ↓ →0x22414
<MI 223fa TST.B D7> {[-4-]}
<MI 223fc BNE 0x22414> {[-4-]}
<POP 223fe-22406 Naked> Σ-4 ↓ →0x2240a
<MI 223fe MOVEA.L (A0),A1> {[-4-]}
<MI 22400 CMPA.L (A6-0x18),A1> {[-4-]}
<MI 22404 BNE 0x2240a> {[-4-]}
<POP 22406-2240a Naked> Σ-4 →0x22412
<MI 22406 MOVEQ.L #0x01,D7> {[-4-]}
<MI 22408 BRA 0x22412> {[-4-]}
<POP 2240a-22412 Naked> Σ-4 ↓ ←0x223fe
<MI 2240a MOVEA.L A0,A4> {[-4-]}
<MI 2240c MOVE.L (A0+0x4),(A6-0x10)> {[-4-]}
<POP 22412-22414 Naked> Σ-4 →0x223f2 ←0x22406
<MI 22412 BRA 0x223f2> {[-4-]}
<POP 22414-22418 Naked> Σ-4 ↓ →0x2243c ←0x223f2 ←0x223fa
<MI 22414 TST.B D7> {[-4-]}
<MI 22416 BEQ 0x2243c> {[-4-]}
<POP 22418-2241c Naked> Σ-4 ↓ →0x22426
<MI 22418 CMPA.W #0x01,A4> {[-4-]}
<MI 2241a BNE 0x22426> {[-4-]}
<POP 2241c-22426 Naked> Σ-4 →0x2242c
<MI 2241c MOVEA.L (A7),A1> {[-4-]}
<MI 2241e MOVE.L (A0+0x4),(A1+0x2a)> {[-4-]}
<MI 22424 BRA 0x2242c> {[-4-]}
<POP 22426-2242c Naked> Σ-4 ↓ ←0x22418
<MI 22426 MOVE.L (A0+0x4),(A4+0x4)> {[-4-]}
<POP 2242c-2243c Naked> Σ-4 ↓ ←0x2241c
<Pointer.fp 0x2242c <LVAR -0x010 @ 4(rw)>> Δ-4 {[-4-]|[@@-16]}
<Const 0x22430 0x8.4> Δ-4 {[-4-]|[@@-16]|[##8]}
<Call 0x22434 0x102a8> {[-4-]|[@@-16]|[##8]}
Free2(a : Pointer; b : Long)
<POP 2243a-2243c StackAdj> Δ+8 {[-4-]}
<POP 2243c-22448 Naked> Σ-4 Δ+4 →0x223de ←0x22414
<MI 2243c MOVEA.L (A7),A0> {[-4-]}
<MI 2243e MOVE.L (A0+0x2e),(A6-0x1c)> {[-4-]}
<POP 22444-22446 StackAdj> Δ+4 {}
<MI 22446 BRA 0x223de> {}
<POP 22448-22458 Naked> Σ-4 Δ+4 →0x223cc ←0x223de
<POP 22448-2244a StackAdj> Δ+4 {}
<MI 2244a MOVEA.L (A6-0x18),A0> {}
<MI 2244e MOVE.L (A0+0x2e),(A6-0x18)> {}
<MI 22454 BRA 0x223cc> {}
<POP 22458-22460 Epilogue> Σ0 ←0x223cc
@ 22460
<POP 22460-224f0 Body>
<POP 22460-22476 Prologue> Σ0 ↓
<POP 22476-2247a RegCacheLoad> Σ0 ↓
<POP 2247a-2248c Naked> Σ0 ↓ →0x224e8
<POP 2247a-2247c StackAdj> Δ-4 {[-4-]}
<Call 0x2247c 0x103f8> {[-4-]}
GetConsoleConfig() : Long
<MI 22482 MOVE.L (A7)+,D0> Δ+4 {}
<MI 22484 CMPI.L #0x00000003,D0> {}
<MI 2248a BNE 0x224e8> {}
<POP 2248c-224e8 Naked> Σ0 ↓
<Blob 0x2248c [38] @> Δ-38 {[«38""»]}
<POP 22498-2249a StackAdj> Δ-4 {[«38""»]|[-4-]}
<Lit 0x2249a 38> {[«38""»]|[$$Returning to LOCAL mode to start R1000]}
<Call 0x224ac 0x103e0> {[«38""»]|[$$Returning to LOCAL mode to start R1000]}
WriteConsoleStringCrLf(str : String)
<POP 224b2-224b4 StackAdj> Δ+42 {}
<Call 0x224b4 0x10216> {}
KC0b
<Blob 0x224ba [42] @> Δ-42 {[«42""»]}
<POP 224ca-224cc StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x224cc 41> {[«42""»]|[$$Returned to LOCAL, starting R1000 cluster]}
<Call 0x224de 0x103e0> {[«42""»]|[$$Returned to LOCAL, starting R1000 cluster]}
WriteConsoleStringCrLf(str : String)
<POP 224e4-224e8 StackAdj> Δ+46 {}
<POP 224e8-224f0 Epilogue> Σ0 ←0x2247a
@ 224f0
<LVAR -0x001 1(r)>
<LVAR -0x002 1(r)>
<LVAR -0x003 1(r)>
<LVAR -0x004 @ 1(r)>
<LVAR -0x404 @>
<LVAR -0x406 2(w)>
<LVAR -0x408 2(w) 4(w)>
<LVAR -0x40c 4(w)>
<LVAR -0x410 2(w) 4(w)>
<LVAR -0x414 @ 2(w) 4(w)>
<POP 224f0-225ea Body>
<POP 224f0-22506 Prologue> Σ0 ↓
<POP 22506-2250a RegCacheLoad> Σ0 ↓
<POP 2250a-225c0 Naked> Σ0 ↓ →0x225c6
<Call 0x2250a 0x22252> {}
<Const 0x2250e 0x241ce.4> Δ-4 {[##147918]}
<Const 0x22514 0x4.2> Δ-2 {[##147918]|[#4]}
<Call 0x22518 0x21f02> {[##147918]|[#4]}
<POP 2251c-2251e StackAdj> Δ+6 {}
<Const 0x2251e 0x241ca.4> Δ-4 {[##147914]}
<Const 0x22524 0xf.2> Δ-2 {[##147914]|[#15]}
<Call 0x22528 0x21f02> {[##147914]|[#15]}
<POP 2252c-2252e StackAdj> Δ+6 {}
<Call 0x2252e 0x22460> {}
<Call 0x22532 0x20766> {}
<Blob 0x22536 [54] @> Δ-54 {[«54""»]}
<POP 22542-22544 StackAdj> Δ-4 {[«54""»]|[-4-]}
<Lit 0x22544 54> {[«54""»]|[$$Starting R1000 Environment - it now owns this console.]}
<Call 0x22558 0x103e0> {[«54""»]|[$$Starting R1000 Environment - it now owns this console.]}
WriteConsoleStringCrLf(str : String)
<POP 2255e-22562 StackAdj> Δ+58 {}
<MI 22562 MOVE.L 0x20654,(A6-0x414)> {}
<MI 22566 MOVE.L 0x20658,(A6-0x410)> {}
<MI 2256c MOVE.L 0x2065c,(A6-0x40c)> {}
<MI 22572 MOVE.L 0x20660,(A6-0x408)> {}
<Pointer.fp 0x22578 <LVAR -0x414 @ 2(w) 4(w)>> Δ-4 {[@@-1044]}
<Call 0x2257a 0x20834> {[@@-1044]}
<POP 2257e-22580 StackAdj> Δ+4 {}
<Pointer.fp 0x22580 <LVAR -0x004 @ 1(r)>> Δ-4 {[@@-4]}
<Call 0x22584 0x1059e> {[@@-4]}
ReadClusterNo(VAR a : Long)
<POP 2258a-2258c StackAdj> Δ+4 {}
<MI 2258c CLR.L D0> {}
<MI 2258e MOVE.B (A6-0x4),D0> {}
<MI 22592 ASL.W #0x8,D0> {}
<MI 22594 CLR.L D1> {}
<MI 22596 MOVE.B (A6-0x3),D1> {}
<MI 2259a ADD.W D0,D1> {}
<MI 2259c MOVE.W D1,(A6-0x408)> {}
<MI 225a0 CLR.L D0> {}
<MI 225a2 MOVE.B (A6-0x2),D0> {}
<MI 225a6 ASL.W #0x8,D0> {}
<MI 225a8 CLR.L D1> {}
<MI 225aa MOVE.B (A6-0x1),D1> {}
<MI 225ae ADD.W D0,D1> {}
<MI 225b0 MOVE.W D1,(A6-0x406)> {}
<POP 225b4-225b6 StackAdj> Δ-2 {[-2-]}
<Call 0x225b6 0x105ce> {[-2-]}
ReadKeySwitch() : Bool
<MI 225bc TST.B (A7)+> Δ+2 {}
<MI 225be BEQ 0x225c6> {}
<POP 225c0-225c6 Naked> Σ0 ↓
<MI 225c0 ORI.W #0x8000,(A6-0x410)> {}
<POP 225c6-225e2 Naked> Σ0 ↓ ←0x2250a
<MI 225c6 MOVE.W 0x241d2,(A6-0x414)> {}
<MI 225cc ANDI.W #0xff00,(A6-0x414)> {}
<Pointer.fp 0x225d0 <LVAR -0x414 @ 2(w) 4(w)>> Δ-4 {[@@-1044]}
<MI 225d2 LEA.L (A6-0x404),A0> {[@@-1044]}
<MI 225d6 MOVE.L A0,-(A7)> Δ-4 {[@@-1044]|[4, 'A0']}
<MI 225d8 CLR.B -(A7)> Δ-2 {[@@-1044]|[4, 'A0']|[#0]}
<Call 0x225da 0x21312> {[@@-1044]|[4, 'A0']|[#0]}
<POP 225de-225e2 StackAdj> Δ+10 {}
<POP 225e2-225ea Epilogue> Σ0
@ 225ea
<LVAR 0x00c 1(w)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @>
<LVAR -0x006 @ 4(r)>
<LVAR -0x00c @ 4(rw)>
<POP 225ea-226a2 Body>
<POP 225ea-22600 Prologue> Σ0 ↓
<POP 22600-2260c RegCacheLoad> Σ0 ↓
<POP 2260c-22630 Naked> Σ0 ↓
<MI 2260c MOVE.B #0x04,(A6+0xc)> {}
<Pointer.fp 0x22612 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x22614 0x102b8> {[@@-6]}
NewString(VAR a : String)
<MI 2261a MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<MI 2261e MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x6)']}
<Pointer.fp 0x22620 <LVAR -0x002 @>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x6)']|[@@-2]}
<Call 0x22624 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x6)']|[@@-2]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 2262a-2262e StackAdj> Δ+12 {}
<MI 2262e MOVEQ.L #0x00,D7> {}
<POP 22630-22682 Naked> Σ0 ↓ →0x22688 ←0x22688
<MI 22630 MOVE.B D7,D0> {}
<MI 22632 EXTB.W D0> {}
<MI 22634 MULS.W #0x0a,D0> {}
<MI 22636 LEA.L 0x20664,A0> {}
<Blob 0x2263a [10] (A0+D0.W)> Δ-10 {[«10»]}
<POP 2264a-2264c StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x2264c> {[«10»]|[$$…]}
<Pointer.sp 0x2264c 4> Δ-4
<Const 0x22650 0x1.2> Δ-2
<Const 0x22652 0xa.2> Δ-2
<Call 0x22654 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2265a-2265c StackAdj> Δ+8
<MI 2265c MOVE.L (A7)+,(A6-0xc)> Δ+4 {[«10»]}
<POP 2265e-22660 StackAdj> Δ+4 {[-6-]}
<MI 22660 MOVE.L (A6-0x6),(A7)> {[-2-]|[4, '(A6-0x6)']}
<MI 22662 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x6)']|[4, '(A6-0xc)']}
<Call 0x22664 0x102c8> {[-2-]|[4, '(A6-0x6)']|[4, '(A6-0xc)']}
StringEqual(a, b : String) : Byte
<POP 2266a-2266c StackAdj> Δ+8 {[-2-]}
<MI 2266c MOVE.B (A7)+,D0> Δ+2 {}
<MI 2266e EXTB.W D0> {}
<POP 0x22670 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 22672 MOVE.B D0,D6> {}
<Pointer.fp 0x22674 <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x22676 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<POP 2267c-2267e StackAdj> Δ+4 {}
<MI 2267e TST.B D6> {}
<MI 22680 BEQ 0x22688> {}
<POP 22682-22688 Naked> Σ0 →0x22690
<MI 22682 MOVE.B D7,(A6+0xc)> {}
<MI 22686 BRA 0x22690> {}
<POP 22688-22690 Naked> Σ0 ↓ →0x22630 ←0x22630
<MI 22688 ADDQ.B #0x1,D7> {}
<MI 2268a CMPI.B #0x03,D7> {}
<MI 2268e BLE 0x22630> {}
<POP 22690-2269a Naked> Σ0 ↓ ←0x22682
<Pointer.fp 0x22690 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x22692 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 22698-2269a StackAdj> Δ+4 {}
<POP 2269a-226a2 Epilogue> Σ0
@ 226a2
<LVAR 0x00c 4(r)>
<LVAR 0x008 @ 4(r)>
<LVAR -0x004 @ 1(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c 4(w)>
<LVAR -0x010 @ 4(w)>
<POP 226a2-22760 Body>
<POP 226a2-226b8 Prologue> Σ0 ↓
<POP 226b8-226c6 RegCacheLoad> Σ0 ↓
<POP 226c6-226e0 Naked> Σ0 ↓ →0x226ee
<Pointer.fp 0x226c6 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Call 0x226c8 0x102b8> {[@@-8]}
NewString(VAR a : String)
<MI 226ce MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<MI 226d0 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x8)']}
<Pointer.fp 0x226d2 <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x8)']|[@@-4]}
<Call 0x226d4 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x8)']|[@@-4]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 226da-226dc StackAdj> Δ+12 {}
<MI 226dc TST.B (A6-0x4)> {}
<MI 226de BEQ 0x226ee> {}
<POP 226e0-226ee Naked> Σ0 ↓
<MI 226e0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 226e2 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x8)']}
<Pointer.fp 0x226e4 <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x8)']|[@@-4]}
<Call 0x226e6 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x8)']|[@@-4]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 226ec-226ee StackAdj> Δ+12 {}
<POP 226ee-226f2 Naked> Σ0 ↓ →0x22722 ←0x226c6
<MI 226ee TST.B (A6-0x4)> {}
<MI 226f0 BNE 0x22722> {}
<POP 226f2-22722 Naked> Σ0 ↓
<Blob 0x226f2 [34] @> Δ-34 {[«34""»]}
<Const 0x226fe 0xe.2> Δ-2 {[«34""»]|[#14]}
<POP 22702-22704 StackAdj> Δ-4 {[«34""»]|[#14]|[-4-]}
<Lit 0x22704 34> {[«34""»]|[#14]|[$$Bad syntax in SUBSYSTEM directive!]}
<Call 0x22718 0x103b8> {[«34""»]|[#14]|[$$Bad syntax in SUBSYSTEM directive!]}
PopProgram(status : Byte; msg : String)
<POP 2271e-22722 StackAdj> Δ+40 {}
<POP 22722-22758 Naked> Σ0 ↓ ←0x226ee
<POP 22722-22724 StackAdj> Δ-8 {[-8-]}
<MI 22724 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x8)']}
<Const 0x22726 0x10.4> Δ-4 {[-8-]|[4, '(A6-0x8)']|[##16]}
<Call 0x2272a 0x10360> {[-8-]|[4, '(A6-0x8)']|[##16]}
?StringToInt64()
<POP 22730-22732 StackAdj> Δ+8 {[-8-]}
<MI 22732 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 22736 MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 2273a MOVEA.L (A6+0xc),A0> {}
<MI 2273e LEA.L (A0+0x1e),A0> {}
<MI 22742 LEA.L (A6-0x10),A1> {}
<BlockMove 8,A1,A0> {}
<Pointer.fp 0x2274e <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x22750 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 22756-22758 StackAdj> Δ+4 {}
<POP 22758-22760 Epilogue> Σ0
@ 22760
<LVAR 0x00c 4(r)>
<LVAR 0x008 @ 4(rw)>
<LVAR -0x003 @ 1(r)>
<LVAR -0x006 @ 1(r)>
<LVAR -0x00a @ 4(r)>
<LVAR -0x00e @ 4(rw)>
<LVAR -0x016 @ 4(rw)>
<LVAR -0x01a @ 4(rw)>
<LVAR -0x01c @>
<LVAR -0x020 @ 4(r)>
<POP 22760-22a9e Body> Δ+12
<POP 22760-22776 Prologue> Σ0 ↓
<POP 22776-22782 RegCacheLoad> Σ0 ↓
<POP 22782-227a4 Naked> Σ0 ↓ →0x227d4
<Pointer.fp 0x22782 <LVAR -0x01a @ 4(rw)>> Δ-4 {[@@-26]}
<Call 0x22784 0x102b8> {[@@-26]}
NewString(VAR a : String)
<MI 2278a MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<MI 2278e MOVE.L (A6-0x1a),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x1a)']}
<Pointer.fp 0x22790 <LVAR -0x003 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x1a)']|[@@-3]}
<Call 0x22794 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x1a)']|[@@-3]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 2279a-2279e StackAdj> Δ+12 {}
<MI 2279e TST.B (A6-0x3)> {}
<MI 227a2 BNE 0x227d4> {}
<POP 227a4-227d4 Naked> Σ0 ↓
<Blob 0x227a4 [30] @> Δ-30 {[«30""»]}
<Const 0x227b4 0xe.2> Δ-2 {[«30""»]|[#14]}
<POP 227b6-227b8 StackAdj> Δ-4 {[«30""»]|[#14]|[-4-]}
<Lit 0x227b8 29> {[«30""»]|[#14]|[$$Bad syntax in WITH directive!]}
<Call 0x227ca 0x103b8> {[«30""»]|[#14]|[$$Bad syntax in WITH directive!]}
PopProgram(status : Byte; msg : String)
<POP 227d0-227d4 StackAdj> Δ+36 {}
<POP 227d4-22826 Naked> Σ0 ↓ →0x2283a ←0x22782
<POP 227d4-227d6 StackAdj> Δ-4 {[-4-]}
<MI 227d6 MOVE.L (A6-0x1a),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x1a)']}
<Call 0x227d8 0x102f0> {[-4-]|[4, '(A6-0x1a)']}
ToUpper(a : String) : String
<POP 227de-227e0 StackAdj> Δ+4 {[-4-]}
<MI 227e0 MOVE.L (A7)+,(A6-0x1a)> Δ+4 {}
<Pointer.fp 0x227e2 <LVAR 0x008 @ 4(rw)>> Δ-4 {[@@8]}
<Call 0x227e6 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 227ec-227ee StackAdj> Δ+2 {[-2-]}
<POP 227ee-227ef StackAdj> Δ+2 {}
<Blob 0x227ef [2] @> Δ-2 {[«2""»]}
<Blob 0x227f2 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x227f6 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 227fa-227fc StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x227fc 6> {[«2""»]|[«2""»]|[«2""»]|[$$.MLOAD]}
<MI 2280e MOVE.L (A7)+,(A6+0x8)> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 22812-22814 StackAdj> Δ+2 {[«2""»]|[«2""»]}
<MI 22814 MOVE.L (A6-0x1a),-(A7)> Δ-4 {[«2""»]|[«2""»]|[4, '(A6-0x1a)']}
<MI 22816 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«2""»]|[«2""»]|[4, '(A6-0x1a)']|[4, '(A6+0x8)']}
<Call 0x2281a 0x10300> {[«2""»]|[«2""»]|[4, '(A6-0x1a)']|[4, '(A6+0x8)']}
FSCALL_10300
<POP 22820-22822 StackAdj> Δ+8 {[«2""»]|[«2""»]}
<MI 22822 TST.L (A7)+> Δ+4 {}
<MI 22824 BNE 0x2283a> {}
<POP 22826-2283a Naked> Σ0 →0x22846
<POP 22826-22828 StackAdj> Δ-4 {[-4-]}
<MI 22828 MOVE.L (A6-0x1a),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x1a)']}
<MI 2282a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x1a)']|[4, '(A6+0x8)']}
<Call 0x2282e 0x102d0> {[-4-]|[4, '(A6-0x1a)']|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 22834-22836 StackAdj> Δ+8 {[-4-]}
<MI 22836 MOVE.L (A7)+,(A6-0x1a)> Δ+4 {}
<MI 22838 BRA 0x22846> {}
<POP 2283a-22846 Naked> Σ0 ↓ ←0x227d4
<Pointer.fp 0x2283a <LVAR 0x008 @ 4(rw)>> Δ-4 {[@@8]}
<Call 0x2283e 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 22844-22846 StackAdj> Δ+4 {}
<POP 22846-2286c Naked> Σ0 ↓ ←0x22826
<MI 22846 MOVE.L (A6-0x1a),-(A7)> Δ-4 {[4, '(A6-0x1a)']}
<MI 22848 CLR.B -(A7)> Δ-2 {[4, '(A6-0x1a)']|[#0]}
<Const 0x2284a 0x2.2> Δ-2 {[4, '(A6-0x1a)']|[#0]|[#2]}
<Const 0x2284c 0x0.4> Δ-4 {[4, '(A6-0x1a)']|[#0]|[#2]|[##0]}
<Pointer.fp 0x22850 <LVAR -0x01c @>> Δ-4 {[4, '(A6-0x1a)']|[#0]|[#2]|[##0]|[@@-28]}
<Pointer.fp 0x22854 <LVAR -0x020 @ 4(r)>> Δ-4 {[4, '(A6-0x1a)']|[#0]|[#2]|[##0]|[@@-28]|[@@-32]}
<Call 0x22858 0x10380> {[4, '(A6-0x1a)']|[#0]|[#2]|[##0]|[@@-28]|[@@-32]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 2285e-22862 StackAdj> Δ+20 {}
<MI 22862 MOVE.L 0x241ca,(A6-0xe)> {}
<MI 2286a MOVEQ.L #0x01,D7> {}
<POP 2286c-22874 Naked> Σ0 ↓ →0x22894 ←0x22892
<MI 2286c MOVEA.L (A6-0xe),A0> {}
<MI 22870 CMPA.W #0x01,A0> {}
<MI 22872 BEQ 0x22894> {}
<POP 22874-22878 Naked> Σ0 ↓ →0x22894
<MI 22874 TST.B D7> {}
<MI 22876 BEQ 0x22894> {}
<POP 22878-22880 Naked> Σ0 ↓
<MI 22878 MOVEA.L (A6-0x20),A1> {}
<MI 2287c MOVEA.L A0,A2> {}
<MI 2287e MOVEQ.L #0x1d,D0> {}
<POP 22880-22886 Naked> Σ0 ↓ →0x22880 ←0x22880
<MI 22880 CMPM.B (A1)+,(A2)+> {}
<MI 22882 DBNE D0,0x22880> {}
<POP 22886-22888 Naked> Σ0 ↓ →0x2288c
<MI 22886 BNE 0x2288c> {}
<POP 22888-2288c Naked> Σ0 →0x22892
<MI 22888 MOVEQ.L #0x00,D7> {}
<MI 2288a BRA 0x22892> {}
<POP 2288c-22892 Naked> Σ0 ↓ ←0x22886
<MI 2288c MOVE.L (A0+0x2e),(A6-0xe)> {}
<POP 22892-22894 Naked> Σ0 →0x2286c ←0x22888
<MI 22892 BRA 0x2286c> {}
<POP 22894-22898 Naked> Σ0 ↓ →0x228de ←0x2286c ←0x22874
<MI 22894 TST.B D7> {}
<MI 22896 BEQ 0x228de> {}
<POP 22898-228de Naked> Σ0 ↓
<Pointer.fp 0x22898 <LVAR -0x00e @ 4(rw)>> Δ-4 {[@@-14]}
<Const 0x2289c 0x32.4> Δ-4 {[@@-14]|[##50]}
<Call 0x228a0 0x1029c> {[@@-14]|[##50]}
Malloc1(length : Long) : Pointer
<POP 228a6-228a8 StackAdj> Δ+8 {}
<MI 228a8 MOVEA.L (A6-0xe),A0> {}
<MI 228ac MOVEA.L (A6-0x20),A1> {}
<MI 228b0 MOVEA.L A0,A2> {}
<BlockMove 30,A1,A2> {}
<MI 228ba MOVE.L #0x01,(A0+0x2a)> {}
<MI 228be MOVE.L 0x241ca,(A0+0x2e)> {}
<MI 228c6 LEA.L (A0+0x1e),A0> {}
<MI 228ca LEA.L 0x20696,A1> {}
<BlockMove 8,A1,A0> {}
<MI 228d6 MOVE.L (A6-0xe),0x241ca> {}
<POP 228de-228e6 Naked> Σ0 ↓ →0x22958 ←0x22894
<MI 228de MOVEA.L (A6+0xc),A0> {}
<MI 228e2 CMPA.W #0x01,A0> {}
<MI 228e4 BEQ 0x22958> {}
<POP 228e6-228ee Naked> Σ0 ↓
<MI 228e6 MOVEA.L 0x241ca,A4> {}
<MI 228ec MOVEQ.L #0x00,D6> {}
<POP 228ee-228f2 Naked> Σ0 ↓ →0x22906 ←0x22904
<MI 228ee CMPA.W #0x01,A4> {}
<MI 228f0 BEQ 0x22906> {}
<POP 228f2-228f6 Naked> Σ0 ↓ →0x22906
<MI 228f2 TST.B D6> {}
<MI 228f4 BNE 0x22906> {}
<POP 228f6-228fc Naked> Σ0 ↓ →0x22900
<MI 228f6 CMPA.L (A6+0xc),A4> {}
<MI 228fa BNE 0x22900> {}
<POP 228fc-22900 Naked> Σ0 →0x22904
<MI 228fc MOVEQ.L #0x01,D6> {}
<MI 228fe BRA 0x22904> {}
<POP 22900-22904 Naked> Σ0 ↓ ←0x228f6
<MI 22900 MOVEA.L (A4+0x2e),A4> {}
<POP 22904-22906 Naked> Σ0 →0x228ee ←0x228fc
<MI 22904 BRA 0x228ee> {}
<POP 22906-2290a Naked> Σ0 ↓ →0x22934 ←0x228ee ←0x228f2
<MI 22906 TST.B D6> {}
<MI 22908 BNE 0x22934> {}
<POP 2290a-22934 Naked> Σ0 ↓
<Blob 0x2290a [24] @> Δ-24 {[«24""»]}
<Const 0x22916 0xe.2> Δ-2 {[«24""»]|[#14]}
<POP 22918-2291a StackAdj> Δ-4 {[«24""»]|[#14]|[-4-]}
<Lit 0x2291a 24> {[«24""»]|[#14]|[$$Can't find USER of WITH!]}
<Call 0x2292c 0x103b8> {[«24""»]|[#14]|[$$Can't find USER of WITH!]}
PopProgram(status : Byte; msg : String)
<POP 22932-22934 StackAdj> Δ+30 {}
<POP 22934-22958 Naked> Σ0 ↓ ←0x22906
<Pointer.fp 0x22934 <LVAR -0x00a @ 4(r)>> Δ-4 {[@@-10]}
<Const 0x22938 0x8.4> Δ-4 {[@@-10]|[##8]}
<Call 0x2293c 0x1029c> {[@@-10]|[##8]}
Malloc1(length : Long) : Pointer
<POP 22942-22944 StackAdj> Δ+8 {}
<MI 22944 MOVEA.L (A6-0xa),A0> {}
<MI 22948 MOVE.L (A6-0xe),(A0)> {}
<MI 2294c MOVE.L (A4+0x2a),(A0+0x4)> {}
<MI 22952 MOVE.L (A6-0xa),(A4+0x2a)> {}
<POP 22958-2295e Naked> Σ0 ↓ →0x22a72 ←0x228de
<MI 22958 TST.B D7> {}
<MI 2295a BEQ 0x22a72> {}
<POP 2295e-22996 Naked> Σ0 ↓
<Blob 0x2295e [10] @> Δ-10 {[«10""»]}
<POP 2296a-2296c StackAdj> Δ-8 {[«10""»]|[-8-]}
<Lit 0x2296c 10> {[«10""»]|[-4-]|[$$Loading :_]}
<MI 2297c MOVE.L (A6-0x1a),(A7)> {[«10""»]|[-4-]|[4, '(A6-0x1a)']}
<POP 22976-2297c StackAdj> Δ-8 {[«10""»]|[-4-]|[4, '(A6-0x1a)']|[-8-]}
<Call 0x2297e 0x102cc> {[«10""»]|[-4-]|[4, '(A6-0x1a)']|[-8-]}
StringDup(a : String) : String
<POP 22984-22986 StackAdj> Δ+4 {[«10""»]|[-4-]|[4, '(A6-0x1a)']|[-4-]}
<Call 0x22986 0x102d0> {[«10""»]|[-4-]|[4, '(A6-0x1a)']|[-4-]}
StringCat2(a, b : String) : String
<POP 2298c-2298e StackAdj> Δ+8 {[«10""»]|[-4-]}
<Call 0x2298e 0x103e0> {[«10""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22994-22996 StackAdj> Δ+14 {}
<POP 22996-229ca Naked> Σ0 ↓ →0x229da ←0x22a6a
<Pointer.fp 0x22996 <LVAR -0x016 @ 4(rw)>> Δ-4 {[@@-22]}
<Call 0x2299a 0x102b8> {[@@-22]}
NewString(VAR a : String)
<MI 229a0 MOVE.L (A6-0x20),(A7)> {[4, '(A6-0x20)']}
<Pointer.fp 0x229a4 <LVAR -0x016 @ 4(rw)>> Δ-4 {[4, '(A6-0x20)']|[@@-22]}
<Pointer.fp 0x229a8 <LVAR -0x006 @ 1(r)>> Δ-4 {[4, '(A6-0x20)']|[@@-22]|[@@-6]}
<Call 0x229ac 0x1043c> {[4, '(A6-0x20)']|[@@-22]|[@@-6]}
FileReadLine(file : File; VAR a : String; VAR b : Byte)
<POP 229b2-229b4 StackAdj> Δ+4 {[4, '(A6-0x20)']|[@@-22]}
<MI 229b4 MOVE.L (A6-0x16),(A7)> {[4, '(A6-0x20)']|[4, '(A6-0x16)']}
<Call 0x229b8 0x102f0> {[4, '(A6-0x20)']|[4, '(A6-0x16)']}
ToUpper(a : String) : String
<POP 229be-229c0 StackAdj> Δ+4 {[4, '(A6-0x20)']}
<MI 229c0 MOVEA.L (A7)+,A0> Δ+4 {}
<MI 229c2 MOVE.L A0,(A6-0x16)> {}
<MI 229c6 TST.W (A0)> {}
<MI 229c8 BNE 0x229da> {}
<POP 229ca-229d4 Naked> Σ0 Δ-4 ↓ ←0x22a2e
<Pointer.fp 0x229ca <LVAR -0x016 @ 4(rw)>> Δ-4 {[@@-22]}
<Call 0x229ce 0x102bc> {[@@-22]}
FreeString(VAR a : String)
<POP 229d4-229da Naked> Σ-4 Δ+4 →0x22a6a ←0x22a1a
<POP 229d4-229d6 StackAdj> Δ+4 {}
<MI 229d6 BRA 0x22a6a> {}
<POP 229da-229fa Naked> Σ0 →0x22a1a →0x22a04 →0x22a22 →0x22a2e →0x22a30 ←0x22996
<POP 229da-229dc StackAdj> Δ-2 {[-2-]}
<MI 229dc MOVE.L A0,-(A7)> Δ-4 {[-2-]|[4, 'A0']}
<Call 0x229de 0x225ea> {[-2-]|[4, 'A0']}
<POP 229e2-229e4 StackAdj> Δ+4 {[-2-]}
<MI 229e4 MOVE.B (A7)+,D0> Δ+2 {}
<MI 229e6 EXTB.W D0> {}
<POP 0x229e8 LimitCheck 0x0 ≤ D0 ≤ 0x4> {}
<MI 229f0 ADD.W D0,D0> {}
<MI 229f2 SWITCH D0.W> {}
<POP 22a04-22a16 Naked> Σ0 Δ-8 ↓ ←0x229da
<MI 22a04 MOVE.L (A6-0xe),-(A7)> Δ-4 {[4, '(A6-0xe)']}
<POP 22a08-22a0a StackAdj> Δ-4 {[4, '(A6-0xe)']|[-4-]}
<MI 22a0a MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0xe)']|[-4-]|[4, 'A0']}
<Call 0x22a0c 0x2210e> {[4, '(A6-0xe)']|[-4-]|[4, 'A0']}
<POP 22a10-22a12 StackAdj> Δ+4 {[4, '(A6-0xe)']|[-4-]}
<Call 0x22a12 0x22760> {[4, '(A6-0xe)']|[-4-]}
<POP 22a16-22a1a Naked> Σ-8 Δ+8 →0x22a6a ←0x22a22
<POP 22a16-22a18 StackAdj> Δ+8 {}
<MI 22a18 BRA 0x22a6a> {}
<POP 22a1a-22a22 Naked> Σ0 Δ-4 →0x229d4 ←0x229da
<MI 22a1a MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Call 0x22a1c 0x21546> {[4, 'A0']}
<MI 22a20 BRA 0x229d4> {[4, 'A0']}
<POP 22a22-22a2e Naked> Σ0 Δ-8 →0x22a16 ←0x229da
<MI 22a22 MOVE.L (A6-0xe),-(A7)> Δ-4 {[4, '(A6-0xe)']}
<MI 22a26 MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0xe)']|[4, 'A0']}
<Call 0x22a28 0x226a2> {[4, '(A6-0xe)']|[4, 'A0']}
<MI 22a2c BRA 0x22a16> {[4, '(A6-0xe)']|[4, 'A0']}
<POP 22a2e-22a30 Naked> Σ0 →0x229ca ←0x229da
<MI 22a2e BRA 0x229ca> {}
<POP 22a30-22a6a Naked> Σ0 ↓ ←0x229da
<Blob 0x22a30 [4] @> Δ-4 {[«4""»]}
<Blob 0x22a34 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x22a38 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x22a3c [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<Const 0x22a40 0xe.2> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]}
<POP 22a42-22a44 StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-8-]}
<Lit 0x22a44 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-4-]|[$$Bad syntax in :_]}
<POP 22a54-22a56 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-4-]|[$$Bad syntax in :_]|[-4-]}
<MI 22a56 MOVE.L (A6-0x1a),(A7)> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-4-]|[$$Bad syntax in :_]|[4, '(A6-0x1a)']}
<Call 0x22a58 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-4-]|[$$Bad syntax in :_]|[4, '(A6-0x1a)']}
StringCat2(a, b : String) : String
<POP 22a5e-22a60 StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-4-]}
<Call 0x22a60 0x103b8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 22a66-22a6a StackAdj> Δ+22 {}
<POP 22a6a-22a72 Naked> Σ0 ↓ →0x22996 ←0x229d4 ←0x22a16
<MI 22a6a TST.B (A6-0x6)> {}
<MI 22a6e BEQ 0x22996> {}
<POP 22a72-22a96 Naked> Σ0 ↓ ←0x22958
<MI 22a72 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x22a74 0x2.2> Δ-2 {[#0]|[#2]}
<Const 0x22a76 0x1.4> Δ-4 {[#0]|[#2]|[##1]}
<Pointer.fp 0x22a7a <LVAR -0x01c @>> Δ-4 {[#0]|[#2]|[##1]|[@@-28]}
<Pointer.fp 0x22a7e <LVAR -0x020 @ 4(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-28]|[@@-32]}
<Call 0x22a82 0x1038c> {[#0]|[#2]|[##1]|[@@-28]|[@@-32]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 22a88-22a8c StackAdj> Δ+16 {}
<Pointer.fp 0x22a8c <LVAR -0x01a @ 4(rw)>> Δ-4 {[@@-26]}
<Call 0x22a8e 0x102bc> {[@@-26]}
FreeString(VAR a : String)
<POP 22a94-22a96 StackAdj> Δ+4 {}
<POP 22a96-22a9e Epilogue> Σ0
@ 22a9e
<POP 22a9e-22b08 Body>
<POP 22a9e-22ab4 Prologue> Σ0 ↓
<POP 22ab4-22ab6 RegCacheLoad> Σ0 ↓
<POP 22ab6-22ab8 Naked> Σ0 ↓
<MI 22ab6 MOVEQ.L #0x00,D7> {}
<POP 22ab8-22b00 Naked> Σ0 ↓ →0x22ab8 ←0x22ab8
<MI 22ab8 MOVE.B D7,D0> {}
<MI 22aba EXTB.W D0> {}
<MI 22abc ASL.W #0x5,D0> {}
<MI 22abe LEA.L 0x23e90,A0> {}
<Blob 0x22ac4 [30] (A0+D0.W+#0x5d)> Δ-30 {[«30»]}
<POP 22ad4-22ad6 StackAdj> Δ-4 {[«30»]|[-4-]}
<Lit 0x22ad6> {[«30»]|[$$…]}
<Pointer.sp 0x22ad6 4> Δ-4
<Const 0x22ada 0x1.2> Δ-2
<Const 0x22ade 0x1e.2> Δ-2
<Call 0x22ae0 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22ae6-22ae8 StackAdj> Δ+8
<MI 22ae8 MOVEA.L (A7)+,A4> Δ+4 {[«30»]}
<POP 22aea-22aec StackAdj> Δ+30 {}
<Const 0x22aec 0x1.4> Δ-4 {[##1]}
<MI 22af0 MOVE.L A4,-(A7)> Δ-4 {[##1]|[4, 'A4']}
<Call 0x22af2 0x22760> {[##1]|[4, 'A4']}
<POP 22af6-22af8 StackAdj> Δ+8 {}
<MI 22af8 ADDQ.B #0x1,D7> {}
<MI 22afa CMPI.B #0x04,D7> {}
<MI 22afe BLE 0x22ab8> {}
<POP 22b00-22b08 Epilogue> Σ0
@ 22b08
<LVAR -0x004 @ 4(rw)>
<POP 22b08-22b72 Body>
<POP 22b08-22b1e Prologue> Σ0 ↓
<POP 22b1e-22b22 RegCacheLoad> Σ0 ↓
<POP 22b22-22b6a Naked> Σ0 ↓
<Blob 0x22b22 [20] @> Δ-20 {[«20""»]}
<POP 22b34-22b36 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x22b36 19> {[«20""»]|[$$CURRENT.M200_CONFIG]}
<MI 22b4a MOVE.L (A7)+,(A6-0x4)> Δ+4 {[«20""»]}
<POP 22b4c-22b50 StackAdj> Δ+16 {[-4-]}
<MI 22b50 MOVE.L (A6-0x4),(A7)> {[4, '(A6-0x4)']}
<Const 0x22b52 0x23e9a.4> Δ-4 {[4, '(A6-0x4)']|[##147098]}
<Call 0x22b58 0x10574> {[4, '(A6-0x4)']|[##147098]}
Write_ConfigFile(name: String; dst: Pointer)
<POP 22b5e-22b60 StackAdj> Δ+8 {}
<Pointer.fp 0x22b60 <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x22b62 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 22b68-22b6a StackAdj> Δ+4 {}
<POP 22b6a-22b72 Epilogue> Σ0
@ 22b72
<LVAR -0x006 @ 4(rw)>
<POP 22b72-22d56 Body>
<POP 22b72-22b88 Prologue> Σ0 ↓
<POP 22b88-22b9a RegCacheLoad> Σ0 ↓
<POP 22b9a-22bba Naked> Σ0 ↓ →0x22bbe
<MI 22b9a MOVE.L #0x02,0x241c2> {}
<MI 22ba0 MOVE.L #0x02,0x241c6> {}
<MI 22ba6 MOVE.L #0x01,0x241ca> {}
<MI 22bac MOVE.L #0x01,0x241ce> {}
<MI 22bb2 TST.B 0x23e9f> {}
<MI 22bb8 BEQ 0x22bbe> {}
<POP 22bba-22bbe Naked> Σ0 →0x22bc0
<MI 22bba MOVEQ.L #0x04,D6> {}
<MI 22bbc BRA 0x22bc0> {}
<POP 22bbe-22bc0 Naked> Σ0 ↓ ←0x22b9a
<MI 22bbe MOVEQ.L #0x09,D6> {}
<POP 22bc0-22bc8 Naked> Σ0 Δ-2 ↓ →0x22bd2 ←0x22bba
<MI 22bc0 MOVE.B D6,-(A7)> Δ-2 {[2, 'D6']}
<MI 22bc2 MOVEQ.L #0x00,D7> {[2, 'D6']}
<MI 22bc4 CMP.B (A7),D7> {[2, 'D6']}
<MI 22bc6 BGT 0x22bd2> {[2, 'D6']}
<POP 22bc8-22bd2 Naked> Σ-2 ↓
<MI 22bc8 MOVE.B (A7),D0> {[-2-]}
<POP 0x22bca LimitCheck D0 ≤ 0x9> {[-2-]}
<MI 22bca CMPI.B #0x09,D0>
<MI 22bce BLE 0x22bd2>
<MI 22bd0 TRAP #15>
<POP 22bd2-22bd6 Naked> Σ-2 ↓ →0x22c46 ←0x22bc0 ←0x22bd6
<MI 22bd2 CMP.B (A7),D7> {[-2-]}
<MI 22bd4 BGT 0x22c46> {[-2-]}
<POP 22bd6-22c46 Naked> Σ-2 ↓ →0x22bd2
<MI 22bd6 MOVE.B D7,D0> {[-2-]}
<MI 22bd8 EXTB.W D0> {[-2-]}
<MI 22bda ASL.W #0x5,D0> {[-2-]}
<MI 22bdc LEA.L 0x23e90,A0> {[-2-]}
<Blob 0x22be2 [16] @> Δ-16 {[-2-]|[«16""»]}
<Blob 0x22bf2 [2] @> Δ-2 {[-2-]|[«16""»]|[«2""»]}
<Blob 0x22bf6 [2] @> Δ-2 {[-2-]|[«16""»]|[«2""»]|[«2""»]}
<Blob 0x22bfa [2] @> Δ-2 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]}
<MI 22bfe PEA.L (A0+D0.W+#0x5b)> Δ-4 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']}
<MI 22c02 LEA.L (A0+D0.W),A0> {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']}
<MI 22c06 PEA.L (A0+0x1ed)> Δ-4 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']}
<POP 22c0a-22c0c StackAdj> Δ-8 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-8-]}
<Lit 0x22c0c 15> {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$Enter name for_]}
<POP 22c18-22c1a StackAdj> Δ-6 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$Enter name for_]|[-6-]}
<MI 22c1a MOVE.B D7,(A7)> {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$Enter name for_]|[-6-]}
<Call 0x22c1c 0x10586> {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$Enter name for_]|[-6-]}
Config_Entry_Name(a : Byte) : String
<POP 22c22-22c24 StackAdj> Δ+2 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$Enter name for_]|[-4-]}
<Call 0x22c24 0x102d0> {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$Enter name for_]|[-4-]}
StringCat2(a, b : String) : String
<POP 22c2a-22c2c StackAdj> Δ+4 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$Enter name for_]}
<Lit 0x22c2c 6> {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$.MLOAD]}
<Call 0x22c3a 0x20d3c> {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$.MLOAD]}
<POP 22c3e-22c42 StackAdj> Δ+38 {[-2-]}
<MI 22c42 ADDQ.B #0x1,D7> {[-2-]}
<MI 22c44 BVC 0x22bd2> {[-2-]}
<POP 22c46-22c50 Naked> Σ-2 Δ+2 ↓ ←0x22bd2
<POP 22c46-22c48 StackAdj> Δ+2 {}
<MI 22c48 MOVE.B #0x01,0x241c0> {}
<MI 22c4e MOVEQ.L #0x00,D7> {}
<POP 22c50-22c92 Naked> Σ0 ↓ →0x22c50 ←0x22c50
<MI 22c50 MOVE.B D7,D0> {}
<MI 22c52 EXTB.W D0> {}
<MI 22c54 ASL.W #0x5,D0> {}
<MI 22c56 LEA.L 0x23e90,A0> {}
<Blob 0x22c5c [30] (A0+D0.W+#0x5d)> Δ-30 {[«30»]}
<POP 22c6c-22c6e StackAdj> Δ-4 {[«30»]|[-4-]}
<Lit 0x22c6e> {[«30»]|[$$…]}
<Pointer.sp 0x22c6e 4> Δ-4
<Const 0x22c72 0x1.2> Δ-2
<Const 0x22c74 0x1e.2> Δ-2
<Call 0x22c76 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22c78-22c7a StackAdj> Δ+8
<MI 22c7a MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«30»]}
<POP 22c7c-22c7e StackAdj> Δ+30 {}
<Const 0x22c7e 0x1.4> Δ-4 {[##1]}
<MI 22c82 MOVE.L (A6-0x6),-(A7)> Δ-4 {[##1]|[4, '(A6-0x6)']}
<Call 0x22c84 0x22760> {[##1]|[4, '(A6-0x6)']}
<POP 22c88-22c8a StackAdj> Δ+8 {}
<MI 22c8a ADDQ.B #0x1,D7> {}
<MI 22c8c CMPI.B #0x04,D7> {}
<MI 22c90 BLE 0x22c50> {}
<POP 22c92-22ca0 Naked> Σ0 ↓ →0x22cbe
<MI 22c92 CLR.B 0x241c0> {}
<MI 22c98 TST.B 0x23e9f> {}
<MI 22c9e BNE 0x22cbe> {}
<POP 22ca0-22cbe Naked> Σ0 ↓
<Const 0x22ca0 0x1.4> Δ-4 {[##1]}
<POP 22ca4-22ca6 StackAdj> Δ-8 {[##1]|[-8-]}
<Const 0x22ca6 0x9.2> Δ-2 {[##1]|[-8-]|[#9]}
<Call 0x22caa 0x10586> {[##1]|[-8-]|[#9]}
Config_Entry_Name(a : Byte) : String
<POP 22cb0-22cb2 StackAdj> Δ+2 {[##1]|[-8-]}
<Call 0x22cb2 0x2210e> {[##1]|[-8-]}
<POP 22cb6-22cb8 StackAdj> Δ+4 {[##1]|[-4-]}
<Call 0x22cb8 0x22760> {[##1]|[-4-]}
<POP 22cbc-22cbe StackAdj> Δ+8 {}
<POP 22cbe-22d4e Naked> Σ0 ↓ ←0x22c92
<Blob 0x22cbe [2] @> Δ-2 {[«2""»]}
<Blob 0x22cc2 [26] @> Δ-26 {[«2""»]|[«26""»]}
<POP 22cce-22cd0 StackAdj> Δ-8 {[«2""»]|[«26""»]|[-8-]}
<Blob 0x22cd0 [4] 0x241c2> Δ-4 {[«2""»]|[«26""»]|[-8-]|[«4»]}
<Call 0x22cd6 0x102e4> {[«2""»]|[«26""»]|[-8-]|[«4»]}
Long2String(a : Long) : String
<Lit 0x22cdc 2> {[«2""»]|[«26""»]|[-8-]|[$$/ ]}
<POP 22ce6-22ce7 StackAdj> Δ-4 {[«2""»]|[«26""»]|[-8-]|[$$/ ]|[-4-]}
<Blob 0x22ce7 [4] 0x241c6> Δ-4 {[«2""»]|[«26""»]|[-8-]|[$$/ ]|[-4-]|[«4»]}
<Call 0x22cec 0x102e4> {[«2""»]|[«26""»]|[-8-]|[$$/ ]|[-4-]|[«4»]}
Long2String(a : Long) : String
<Lit 0x22cf2 26> {[«2""»]|[«26""»]|[-8-]|[$$/ ]|[-4-]|[$$ wired/total pages loaded.]}
<Call 0x22d00 0x102d8> {[«2""»]|[«26""»]|[-8-]|[$$/ ]|[-4-]|[$$ wired/total pages loaded.]}
StringCat4(a, b, c, d : String) : String
<POP 22d06-22d08 StackAdj> Δ+16 {[«2""»]|[«26""»]|[-4-]}
<Call 0x22d08 0x103d8> {[«2""»]|[«26""»]|[-4-]}
WriteConsoleString(str : String)
<POP 22d0e-22d0f StackAdj> Δ+32 ↓ {}
<Blob 0x22d0f [20] @> Δ-20 {[«20""»]}
<POP 22d20-22d22 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x22d22 19> {[«20""»]|[$$CURRENT.M200_CONFIG]}
<MI 22d30 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«20""»]}
<POP 22d32-22d34 StackAdj> Δ+16 {[-4-]}
<MI 22d34 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<Const 0x22d36 0x23e9a.4> Δ-4 {[4, '(A6-0x6)']|[##147098]}
<Call 0x22d3c 0x10574> {[4, '(A6-0x6)']|[##147098]}
Write_ConfigFile(name: String; dst: Pointer)
<POP 22d42-22d44 StackAdj> Δ+8 {}
<Pointer.fp 0x22d44 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x22d46 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 22d4c-22d4e StackAdj> Δ+4 {}
<POP 22d4e-22d56 Epilogue> Σ0
@ 22d56
<LVAR -0x002 @>
<LVAR -0x006 @ 4(rw)>
<LVAR -0x007 @ 1(r)>
<POP 22d56-23016 Body>
<POP 22d56-22d6c Prologue> Σ0 ↓
<POP 22d6c-22d86 RegCacheLoad> Σ0 ↓
<POP 22d86-22da0 Naked> Σ0 ↓ →0x22da2
<POP 22d86-22d88 StackAdj> Δ-8 {[-8-]}
<Call 0x22d88 0x103c4> {[-8-]}
GetArgv() : String
<Call 0x22d8e 0x102f0> {[-8-]}
ToUpper(a : String) : String
<POP 22d94-22d96 StackAdj> Δ+4 {[-4-]}
<MI 22d96 MOVE.L (A7)+,(A6-0x6)> Δ+4 {}
<MI 22d98 MOVEQ.L #0x00,D7> {}
<MI 22d9a MOVEA.L (A6-0x6),A0> {}
<MI 22d9c TST.W (A0)> {}
<MI 22d9e BNE 0x22da2> {}
<POP 22da0-22da2 Naked> Σ0 ↓
<MI 22da0 ADDQ.B #0x1,D7> {}
<POP 22da2-22da6 Naked> Σ0 ↓ →0x22e10 ←0x22d86 ←0x22f9e
<MI 22da2 TST.B D7> {}
<MI 22da4 BEQ 0x22e10> {}
<POP 22da6-22dec Naked> Σ0 ↓ →0x22e10
<Pointer.fp 0x22da6 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x22da8 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 22dae-22daf StackAdj> Δ+4 ↓ {}
<Blob 0x22daf [50] @> Δ-50 {[«50""»]}
<POP 22dc0-22dc2 StackAdj> Δ-12 {[«50""»]|[-12-]}
<Lit 0x22dc2 49> {[«50""»]|[-8-]|[$$Enter name of configuration to boot [STANDARD] :_]}
<Call 0x22dd0 0x103e4> {[«50""»]|[-8-]|[$$Enter name of configuration to boot [STANDARD] :_]}
AskConsoleString(prompt : String) : String
<POP 22dd6-22dd8 StackAdj> Δ+4 {[«50""»]|[-8-]}
<Call 0x22dd8 0x102f0> {[«50""»]|[-8-]}
ToUpper(a : String) : String
<POP 22dde-22de0 StackAdj> Δ+4 {[«50""»]|[-4-]}
<MI 22de0 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«50""»]}
<POP 22de2-22de6 StackAdj> Δ+50 {}
<MI 22de6 MOVEA.L (A6-0x6),A0> {}
<MI 22de8 TST.W (A0)> {}
<MI 22dea BNE 0x22e10> {}
<POP 22dec-22e10 Naked> Σ0 ↓
<Pointer.fp 0x22dec <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x22dee 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 22df4-22df5 StackAdj> Δ+4 {}
<Blob 0x22df5 [4] @> Δ-4 {[«4""»]}
<Blob 0x22df8 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 22dfc-22dfe StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x22dfe 8> {[«4""»]|[«4""»]|[$$STANDARD]}
<MI 22e0c MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«4""»]|[«4""»]}
<POP 22e0e-22e10 StackAdj> Δ+8 {}
<POP 22e10-22e58 Naked> Σ0 Δ-16 ↓ →0x22f0a ←0x22da2 ←0x22da6
<Blob 0x22e10 [4] @> Δ-4 {[«4""»]}
<Blob 0x22e14 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x22e18 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 22e1c-22e1e StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<MI 22e1e MOVE.L (A6-0x6),-(A7)> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6-0x6)']}
<POP 22e20-22e22 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
<Lit 0x22e22 12> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6-0x6)']|[$$.M200_CONFIG]}
<Call 0x22e2e 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6-0x6)']|[$$.M200_CONFIG]}
StringCat2(a, b : String) : String
<POP 22e34-22e36 StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<MI 22e36 MOVEA.L (A7)+,A0> Δ+4 {[«4""»]|[«4""»]|[«4""»]}
<MI 22e38 MOVE.L A0,(A6-0x6)> {[«4""»]|[«4""»]|[«4""»]}
<MI 22e3a MOVE.L A0,-(A7)> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']}
<MI 22e3c MOVE.L A0,-(A7)> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']|[4, 'A0']}
<Const 0x22e3e 0x3.4> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']|[4, 'A0']|[##3]}
<Const 0x22e42 0x23e9a.4> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']|[4, 'A0']|[##3]|[##147098]}
<Pointer.fp 0x22e48 <LVAR -0x007 @ 1(r)>> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']|[4, 'A0']|[##3]|[##147098]|[@@-7]}
<Call 0x22e4a 0x1056e> {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']|[4, 'A0']|[##3]|[##147098]|[@@-7]}
Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool)
<POP 22e50-22e52 StackAdj> Δ+16 {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']}
<MI 22e52 TST.B (A6-0x7)> {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']}
<MI 22e54 BNE 0x22f0a> {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']}
<POP 22e58-22e5c Naked> Σ-16 ↓ →0x22e84
<MI 22e58 TST.B D7> {[-16-]}
<MI 22e5a BNE 0x22e84> {[-16-]}
<POP 22e5c-22e84 Naked> Σ-16 ↓
<Blob 0x22e5c [26] @> Δ-26 {[-16-]|[«26""»]}
<Const 0x22e68 0xe.2> Δ-2 {[-16-]|[«26""»]|[#14]}
<POP 22e6a-22e6c StackAdj> Δ-4 {[-16-]|[«26""»]|[#14]|[-4-]}
<Lit 0x22e6c 26> {[-16-]|[«26""»]|[#14]|[$$Could not read Config file]}
<Call 0x22e7a 0x103b8> {[-16-]|[«26""»]|[#14]|[$$Could not read Config file]}
PopProgram(status : Byte; msg : String)
<POP 22e80-22e84 StackAdj> Δ+32 {[-16-]}
<POP 22e84-22eb2 Naked> Σ-16 Δ-60 ↓ →0x22f08 ←0x22e58
<Blob 0x22e84 [60] @> Δ-60 {[-16-]|[«60""»]}
<POP 22e94-22e96 StackAdj> Δ-6 {[-16-]|[«60""»]|[-6-]}
<Lit 0x22e96 59> {[-16-]|[«60""»]|[-2-]|[$$Could not read configuration file, do you want to create it]}
<POP 22ea2-22ea4 StackAdj> Δ-2 {[-16-]|[«60""»]|[-2-]|[$$Could not read configuration file, do you want to create it]|[-2-]}
<MI 22ea4 CLR.B (A7)> {[-16-]|[«60""»]|[-2-]|[$$Could not read configuration file, do you want to create it]|[-2-]}
<Call 0x22ea6 0x103f0> {[-16-]|[«60""»]|[-2-]|[$$Could not read configuration file, do you want to create it]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 22eac-22eae StackAdj> Δ+6 {[-16-]|[«60""»]|[-2-]}
<MI 22eae TST.B (A7)+> Δ+2 {[-16-]|[«60""»]}
<MI 22eb0 BEQ 0x22f08> {[-16-]|[«60""»]}
<POP 22eb2-22f08 Naked> Σ-76 ↓
<Blob 0x22eb2 [6] @> Δ-6 {[-76-]|[«6""»]}
<POP 22ec2-22ec4 StackAdj> Δ-4 {[-76-]|[«6""»]|[-4-]}
<Lit 0x22ec4 5> {[-76-]|[«6""»]|[$$CEDIT]}
<POP 22ed0-22ed2 StackAdj> Δ-4 {[-76-]|[«6""»]|[$$CEDIT]|[-4-]}
<MI 22ed2 MOVEA.L (A7+0x4a),A0> {[-76-]|[«6""»]|[$$CEDIT]|[-4-]}
<MI 22ed6 MOVE.L A0,-(A7)> Δ-4 {[-76-]|[«6""»]|[$$CEDIT]|[-4-]|[4, 'A0']}
<Call 0x22ed8 0x102cc> {[-76-]|[«6""»]|[$$CEDIT]|[-4-]|[4, 'A0']}
StringDup(a : String) : String
<POP 22ede-22ee0 StackAdj> Δ+2 {[-76-]|[«6""»]|[$$CEDIT]|[-4-]|[-2-]}
<POP 22ee0-22ee1 StackAdj> Δ+2 {[-76-]|[«6""»]|[$$CEDIT]|[-4-]}
<Const 0x22ee1 0x1.2> Δ-2 {[-76-]|[«6""»]|[$$CEDIT]|[-4-]|[#1]}
<Pointer.fp 0x22ee2 <LVAR -0x002 @>> Δ-4 {[-76-]|[«6""»]|[$$CEDIT]|[-4-]|[#1]|[@@-2]}
<Call 0x22ee6 0x103b0> {[-76-]|[«6""»]|[$$CEDIT]|[-4-]|[#1]|[@@-2]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 22eec-22eee StackAdj> Δ+20 {[-76-]}
<MI 22eee MOVEA.L (A7+0x3c),A0> {[-76-]}
<MI 22ef2 MOVE.L A0,-(A7)> Δ-4 {[-76-]|[4, 'A0']}
<Const 0x22ef4 0x3.4> Δ-4 {[-76-]|[4, 'A0']|[##3]}
<Const 0x22ef8 0x23e9a.4> Δ-4 {[-76-]|[4, 'A0']|[##3]|[##147098]}
<Pointer.fp 0x22efe <LVAR -0x007 @ 1(r)>> Δ-4 {[-76-]|[4, 'A0']|[##3]|[##147098]|[@@-7]}
<Call 0x22f00 0x1056e> {[-76-]|[4, 'A0']|[##3]|[##147098]|[@@-7]}
Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool)
<POP 22f06-22f08 StackAdj> Δ+16 {[-76-]}
<POP 22f08-22f0a Naked> Σ-76 Δ+60 ↓ ←0x22e84
<POP 22f08-22f0a StackAdj> Δ+60 {[-16-]}
<POP 22f0a-22f10 Naked> Σ-16 ↓ →0x22f9e ←0x22e10
<MI 22f0a TST.B (A6-0x7)> {[-16-]}
<MI 22f0c BEQ 0x22f9e> {[-16-]}
<POP 22f10-22f1a Naked> Σ-16 ↓ →0x22f9e
<MI 22f10 TST.B 0x23e9d> {[-16-]}
<MI 22f16 BEQ 0x22f9e> {[-16-]}
<POP 22f1a-22f44 Naked> Σ-16 Δ-38 ↓ →0x22f9a
<Blob 0x22f1a [38] @> Δ-38 {[-16-]|[«38""»]}
<POP 22f26-22f28 StackAdj> Δ-6 {[-16-]|[«38""»]|[-6-]}
<Lit 0x22f28 38> {[-16-]|[«38""»]|[-2-]|[$$Do you want to edit this configuration]}
<POP 22f34-22f36 StackAdj> Δ-2 {[-16-]|[«38""»]|[-2-]|[$$Do you want to edit this configuration]|[-2-]}
<MI 22f36 CLR.B (A7)> {[-16-]|[«38""»]|[-2-]|[$$Do you want to edit this configuration]|[-2-]}
<Call 0x22f38 0x103f0> {[-16-]|[«38""»]|[-2-]|[$$Do you want to edit this configuration]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 22f3e-22f40 StackAdj> Δ+6 {[-16-]|[«38""»]|[-2-]}
<MI 22f40 TST.B (A7)+> Δ+2 {[-16-]|[«38""»]}
<MI 22f42 BEQ 0x22f9a> {[-16-]|[«38""»]}
<POP 22f44-22f9a Naked> Σ-54 ↓
<Blob 0x22f44 [6] @> Δ-6 {[-54-]|[«6""»]}
<POP 22f54-22f56 StackAdj> Δ-4 {[-54-]|[«6""»]|[-4-]}
<Lit 0x22f56 5> {[-54-]|[«6""»]|[$$CEDIT]}
<POP 22f62-22f64 StackAdj> Δ-4 {[-54-]|[«6""»]|[$$CEDIT]|[-4-]}
<MI 22f64 MOVEA.L (A7+0x34),A0> {[-54-]|[«6""»]|[$$CEDIT]|[-4-]}
<MI 22f68 MOVE.L A0,-(A7)> Δ-4 {[-54-]|[«6""»]|[$$CEDIT]|[-4-]|[4, 'A0']}
<Call 0x22f6a 0x102cc> {[-54-]|[«6""»]|[$$CEDIT]|[-4-]|[4, 'A0']}
StringDup(a : String) : String
<POP 22f70-22f72 StackAdj> Δ+2 {[-54-]|[«6""»]|[$$CEDIT]|[-4-]|[-2-]}
<POP 22f72-22f73 StackAdj> Δ+2 {[-54-]|[«6""»]|[$$CEDIT]|[-4-]}
<Const 0x22f73 0x1.2> Δ-2 {[-54-]|[«6""»]|[$$CEDIT]|[-4-]|[#1]}
<Pointer.fp 0x22f74 <LVAR -0x002 @>> Δ-4 {[-54-]|[«6""»]|[$$CEDIT]|[-4-]|[#1]|[@@-2]}
<Call 0x22f78 0x103b0> {[-54-]|[«6""»]|[$$CEDIT]|[-4-]|[#1]|[@@-2]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 22f7e-22f80 StackAdj> Δ+20 {[-54-]}
<MI 22f80 MOVEA.L (A7+0x26),A0> {[-54-]}
<MI 22f84 MOVE.L A0,-(A7)> Δ-4 {[-54-]|[4, 'A0']}
<Const 0x22f86 0x3.4> Δ-4 {[-54-]|[4, 'A0']|[##3]}
<Const 0x22f8a 0x23e9a.4> Δ-4 {[-54-]|[4, 'A0']|[##3]|[##147098]}
<Pointer.fp 0x22f90 <LVAR -0x007 @ 1(r)>> Δ-4 {[-54-]|[4, 'A0']|[##3]|[##147098]|[@@-7]}
<Call 0x22f92 0x1056e> {[-54-]|[4, 'A0']|[##3]|[##147098]|[@@-7]}
Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool)
<POP 22f98-22f9a StackAdj> Δ+16 {[-54-]}
<POP 22f9a-22f9e Naked> Σ-54 Δ+38 ↓ ←0x22f1a
<POP 22f9a-22f9e StackAdj> Δ+38 {[-16-]}
<POP 22f9e-22fa8 Naked> Σ-16 Δ+16 ↓ →0x22da2 ←0x22f0a ←0x22f10
<POP 22f9e-22fa0 StackAdj> Δ+16 {}
<MI 22fa0 MOVEQ.L #0x01,D7> {}
<MI 22fa2 TST.B (A6-0x7)> {}
<MI 22fa4 BEQ 0x22da2> {}
<POP 22fa8-22fe0 Naked> Σ0 ↓ →0x2300e
<Blob 0x22fa8 [20] @> Δ-20 {[«20""»]}
<POP 22fb4-22fb6 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x22fb6 20> {[«20""»]|[$$STANDARD.M200_CONFIG]}
<MI 22fc2 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«20""»]}
<POP 22fc4-22fc6 StackAdj> Δ+16 {[-4-]}
<MI 22fc6 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<Const 0x22fc8 0x3.4> Δ-4 {[4, '(A6-0x6)']|[##3]}
<Const 0x22fcc 0x2402c.4> Δ-4 {[4, '(A6-0x6)']|[##3]|[##147500]}
<Pointer.fp 0x22fd2 <LVAR -0x007 @ 1(r)>> Δ-4 {[4, '(A6-0x6)']|[##3]|[##147500]|[@@-7]}
<Call 0x22fd4 0x1056e> {[4, '(A6-0x6)']|[##3]|[##147500]|[@@-7]}
Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool)
<POP 22fda-22fdc StackAdj> Δ+16 {}
<MI 22fdc TST.B (A6-0x7)> {}
<MI 22fde BNE 0x2300e> {}
<POP 22fe0-2300e Naked> Σ0 ↓
<Blob 0x22fe0 [36] @> Δ-36 {[«36""»]}
<Const 0x22ff2 0xe.2> Δ-2 {[«36""»]|[#14]}
<POP 22ff4-22ff6 StackAdj> Δ-4 {[«36""»]|[#14]|[-4-]}
<Lit 0x22ff6 35> {[«36""»]|[#14]|[$$Could not read STANDARD.M200_CONFIG]}
<Call 0x23004 0x103b8> {[«36""»]|[#14]|[$$Could not read STANDARD.M200_CONFIG]}
PopProgram(status : Byte; msg : String)
<POP 2300a-2300e StackAdj> Δ+42 {}
<POP 2300e-23016 Epilogue> Σ0 ←0x22fa8
@ 23016
<LVAR -0x004 @>
<POP 23016-230ae Body>
<POP 23016-2302c Prologue> Σ0 ↓
<POP 2302c-23030 RegCacheLoad> Σ0 ↓
<POP 23030-23038 Naked> Σ0 ↓ →0x230a6
<MI 23030 TST.B 0x23e9c> {}
<MI 23036 BEQ 0x230a6> {}
<POP 23038-2306a Naked> Σ0 Δ-10 ↓ →0x230a4
<Blob 0x23038 [10] @> Δ-10 {[«10""»]}
<POP 23048-2304a StackAdj> Δ-6 {[«10""»]|[-6-]}
<Lit 0x2304a 9> {[«10""»]|[-2-]|[$$Enter CLI]}
<POP 2305a-2305c StackAdj> Δ-2 {[«10""»]|[-2-]|[$$Enter CLI]|[-2-]}
<MI 2305c CLR.B (A7)> {[«10""»]|[-2-]|[$$Enter CLI]|[-2-]}
<Call 0x2305e 0x103f0> {[«10""»]|[-2-]|[$$Enter CLI]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 23064-23066 StackAdj> Δ+6 {[«10""»]|[-2-]}
<MI 23066 TST.B (A7)+> Δ+2 {[«10""»]}
<MI 23068 BEQ 0x230a4> {[«10""»]}
<POP 2306a-230a4 Naked> Σ-10 ↓
<POP 2306a-2306c StackAdj> Δ-4 {[-14-]}
<POP 2306c-2306d StackAdj> Δ+2 {[-12-]}
<Blob 0x2306d [2] @> Δ-2 {[-12-]|[«2""»]}
<MI 23070 MOVE.B 0x20593,(A7+0x1)> {[-12-]|[«2""»]}
<MI 23076 MOVE.B 0x20594,(A7+0x2)> {[-12-]|[«2""»]}
<POP 2307c-2307e StackAdj> Δ-4 {[-12-]|[«2""»]|[-4-]}
<Lit 0x2307e> {[-12-]|[«2""»]|[$$…]}
<Pointer.sp 0x2307e 4> Δ-4
<Const 0x23082 0x1.2> Δ-2
<Const 0x23084 0x3.2> Δ-2
<Call 0x23088 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2308e-23090 StackAdj> Δ+8
<Const 0x23090 0x1.4> Δ-4 {[-12-]|[«2""»]|[$$…]|[##1]}
<Const 0x23094 0x1.2> Δ-2 {[-12-]|[«2""»]|[$$…]|[##1]|[#1]}
<Pointer.fp 0x23096 <LVAR -0x004 @>> Δ-4 {[-12-]|[«2""»]|[$$…]|[##1]|[#1]|[@@-4]}
<Call 0x2309a 0x103b0> {[-12-]|[«2""»]|[$$…]|[##1]|[#1]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 230a0-230a4 StackAdj> Δ+18 {[-10-]}
<POP 230a4-230a6 Naked> Σ-10 Δ+10 ↓ ←0x23038
<POP 230a4-230a6 StackAdj> Δ+10 {}
<POP 230a6-230ae Epilogue> Σ0 ←0x23030
@ 230ae
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 @>
<LVAR -0x00a @>
<LVAR -0x00c @ 2(r)>
<LVAR -0x010 @>
<POP 230ae-2313c Body>
<POP 230ae-230c4 Prologue> Σ0 ↓
<POP 230c4-230d0 RegCacheLoad> Σ0 ↓
<POP 230d0-23134 Naked> Σ0 ↓
<Const 0x230d0 0x400.4> Δ-4 {[##1024]}
<MI 230d4 LEA.L (A6-0x10),A0> {[##1024]}
<MI 230d8 MOVE.L A0,-(A7)> Δ-4 {[##1024]|[4, 'A0']}
<Const 0x230da 0x4.2> Δ-2 {[##1024]|[4, 'A0']|[#4]}
<Call 0x230dc 0x10238> {[##1024]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 230de-230e0 StackAdj> Δ+10 {}
<Const 0x230e0 0x404.4> Δ-4 {[##1028]}
<MI 230e4 LEA.L (A6-0xc),A0> {[##1028]}
<MI 230e8 MOVE.L A0,-(A7)> Δ-4 {[##1028]|[4, 'A0']}
<Const 0x230ea 0x2.2> Δ-2 {[##1028]|[4, 'A0']|[#2]}
<Call 0x230ec 0x10238> {[##1028]|[4, 'A0']|[#2]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 230ee-230f0 StackAdj> Δ+10 {}
<Const 0x230f0 0x406.4> Δ-4 {[##1030]}
<MI 230f4 LEA.L (A6-0xa),A0> {[##1030]}
<MI 230f8 MOVE.L A0,-(A7)> Δ-4 {[##1030]|[4, 'A0']}
<Const 0x230fa 0x2.2> Δ-2 {[##1030]|[4, 'A0']|[#2]}
<Call 0x230fc 0x10238> {[##1030]|[4, 'A0']|[#2]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 230fe-23100 StackAdj> Δ+10 {}
<Const 0x23100 0x408.4> Δ-4 {[##1032]}
<MI 23104 LEA.L (A6-0x8),A0> {[##1032]}
<MI 23108 MOVE.L A0,-(A7)> Δ-4 {[##1032]|[4, 'A0']}
<Const 0x2310a 0x4.2> Δ-2 {[##1032]|[4, 'A0']|[#4]}
<Call 0x2310c 0x10238> {[##1032]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 2310e-23110 StackAdj> Δ+10 {}
<Const 0x23110 0x40c.4> Δ-4 {[##1036]}
<MI 23114 LEA.L (A6-0x4),A0> {[##1036]}
<MI 23118 MOVE.L A0,-(A7)> Δ-4 {[##1036]|[4, 'A0']}
<Const 0x2311a 0x4.2> Δ-2 {[##1036]|[4, 'A0']|[#4]}
<Call 0x2311c 0x10238> {[##1036]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 2311e-23120 StackAdj> Δ+10 {}
<MI 23120 MOVEQ.L #0x00,D0> {}
<MI 23122 MULU.W (A6-0xc),D0> {}
<MI 23126 CLR.L D1> {}
<MI 23128 MOVE.W D0,D1> {}
<MI 2312a ADD.L (A6-0x4),D1> {}
<MI 2312e MOVE.L D1,0x241d6> {}
<POP 23134-2313c Epilogue> Σ0
@ 2313c
<LVAR -0x00e 4(r)>
<LVAR -0x012 4(r)>
<LVAR -0x016 @ 4(r)>
<LVAR -0x01a @ 4(r)>
<LVAR -0x01c @ 1(r)>
<POP 2313c-2322c Body>
<POP 2313c-23152 Prologue> Σ0 ↓
<POP 23152-23168 RegCacheLoad> Σ0 ↓
<POP 23168-231a8 Naked> Σ0 ↓ →0x231de
<Blob 0x23168 [12] @> Δ-12 {[«12""»]}
<POP 2317a-2317c StackAdj> Δ-4 {[«12""»]|[-4-]}
<Lit 0x2317c 11> {[«12""»]|[$$BOOT_REASON]}
<POP 2318c-2318e StackAdj> Δ-2 {[«12""»]|[$$BOOT_REASON]|[-2-]}
<MI 2318e CLR.B (A7)> {[«12""»]|[$$BOOT_REASON]|[-2-]}
<MI 23190 CLR.B -(A7)> Δ-2 {[«12""»]|[$$BOOT_REASON]|[-2-]|[#0]}
<Const 0x23192 0x0.4> Δ-4 {[«12""»]|[$$BOOT_REASON]|[-2-]|[#0]|[##0]}
<Pointer.fp 0x23196 <LVAR -0x01c @ 1(r)>> Δ-4 {[«12""»]|[$$BOOT_REASON]|[-2-]|[#0]|[##0]|[@@-28]}
<Pointer.fp 0x23198 <LVAR -0x01a @ 4(r)>> Δ-4 {[«12""»]|[$$BOOT_REASON]|[-2-]|[#0]|[##0]|[@@-28]|[@@-26]}
<Call 0x2319a 0x10380> {[«12""»]|[$$BOOT_REASON]|[-2-]|[#0]|[##0]|[@@-28]|[@@-26]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 231a0-231a4 StackAdj> Δ+32 {}
<MI 231a4 TST.B (A6-0x1c)> {}
<MI 231a6 BEQ 0x231de> {}
<POP 231a8-231b2 Naked> Σ0 ↓
<MI 231a8 CLR.W 0x2425a> {}
<MI 231aa CLR.W 0x2425c> {}
<MI 231b0 MOVEQ.L #0x00,D7> {}
<POP 231b2-231c8 Naked> Σ0 ↓ →0x231b2 ←0x231b2
<POP 0x231b2 LimitCheck 0x0 ≤ D7 ≤ 0x3> {}
<MI 231b8 MOVE.L D7,D0> {}
<MI 231ba ASL.L #0x1,D0> {}
<MI 231bc LEA.L 0x2425a,A0> {}
<MI 231be CLR.W (A0+D0.L+#0x4)> {}
<MI 231c2 ADDQ.L #0x1,D7> {}
<MI 231c4 CMP.L #0x03,D7> {}
<MI 231c6 BLE 0x231b2> {}
<POP 231c8-231de Naked> Σ0 →0x23224
<Const 0x231c8 0x2.2> Δ-2 {[#2]}
<MI 231ca CLR.B -(A7)> Δ-2 {[#2]|[#0]}
<Const 0x231cc 0x1.4> Δ-4 {[#2]|[#0]|[##1]}
<Pointer.fp 0x231d0 <LVAR -0x01c @ 1(r)>> Δ-4 {[#2]|[#0]|[##1]|[@@-28]}
<Pointer.fp 0x231d2 <LVAR -0x01a @ 4(r)>> Δ-4 {[#2]|[#0]|[##1]|[@@-28]|[@@-26]}
<Call 0x231d4 0x1038c> {[#2]|[#0]|[##1]|[@@-28]|[@@-26]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 231da-231dc StackAdj> Δ+16 {}
<MI 231dc BRA 0x23224> {}
<POP 231de-23224 Naked> Σ0 ↓ ←0x23168
<MI 231de MOVE.L (A6-0x1a),-(A7)> Δ-4 {[4, '(A6-0x1a)']}
<MI 231e0 CLR.W -(A7)> Δ-2 {[4, '(A6-0x1a)']|[#0]}
<MI 231e2 CLR.W -(A7)> Δ-2 {[4, '(A6-0x1a)']|[#0]|[#0]}
<Const 0x231e4 0x8.2> Δ-2 {[4, '(A6-0x1a)']|[#0]|[#0]|[#8]}
<Const 0x231e8 0x1.2> Δ-2 {[4, '(A6-0x1a)']|[#0]|[#0]|[#8]|[#1]}
<MI 231ea LEA.L (A6-0x16),A0> {[4, '(A6-0x1a)']|[#0]|[#0]|[#8]|[#1]}
<MI 231ee MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x1a)']|[#0]|[#0]|[#8]|[#1]|[4, 'A0']}
<Pointer.fp 0x231f0 <LVAR -0x01c @ 1(r)>> Δ-4 {[4, '(A6-0x1a)']|[#0]|[#0]|[#8]|[#1]|[4, 'A0']|[@@-28]}
<Call 0x231f2 0x10384> {[4, '(A6-0x1a)']|[#0]|[#0]|[#8]|[#1]|[4, 'A0']|[@@-28]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 231f8-231fc StackAdj> Δ+18 {[-2-]}
<POP 231fc-231fd StackAdj> Δ+2 {}
<Const 0x231fd 0x2.2> Δ-2 {[#2]}
<Const 0x231fe 0x1.2> Δ-2 {[#2]|[#1]}
<Const 0x23200 0x1.4> Δ-4 {[#2]|[#1]|[##1]}
<Pointer.fp 0x23204 <LVAR -0x01c @ 1(r)>> Δ-4 {[#2]|[#1]|[##1]|[@@-28]}
<Pointer.fp 0x23206 <LVAR -0x01a @ 4(r)>> Δ-4 {[#2]|[#1]|[##1]|[@@-28]|[@@-26]}
<Call 0x23208 0x1038c> {[#2]|[#1]|[##1]|[@@-28]|[@@-26]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 2320e-23210 StackAdj> Δ+16 {}
<MI 23210 MOVE.L (A6-0x16),0x2425a> {}
<MI 23214 MOVE.L (A6-0x12),0x2425e> {}
<MI 2321c MOVE.L (A6-0xe),0x24262> {}
<POP 23224-2322c Epilogue> Σ0 ←0x231c8
@ 2322c
START
<POP 2322c--0001 Body>
<POP 2322c-23236 Prologue> Σ0
<POP 23236-2323c RegCacheLoad> Σ0 ↓
<POP 2323c-232e8 Naked> Σ0 ↓
<Call 0x2323c 0x10398> {}
FSCALL_10398
<MI 23242 CLR.B 0x24267> {}
<Const 0x23244 0x23e98.4> Δ-4 {[##147096]}
<Call 0x2324a 0x105aa> {[##147096]}
Read_fc00() : Byte
<POP 23250-23252 StackAdj> Δ+4 {}
<Call 0x23252 0x2313c> {}
<Call 0x23256 0x230ae> {}
<Call 0x2325a 0x22d56> {}
<Call 0x2325e 0x23016> {}
<Call 0x23262 0x208ce> {}
<Const 0x23266 0x0.4> Δ-4 {[##0]}
<Call 0x2326a 0x104d8> {[##0]}
ExpInit(a : Long)
<POP 23270-23272 StackAdj> Δ+4 {}
<Call 0x23272 0x2094e> {}
<Call 0x23276 0x20ba2> {}
<Const 0x2327a 0x24267.4> Δ-4 {[##148071]}
<Call 0x2327c 0x20c26> {[##148071]}
<POP 23280-23282 StackAdj> Δ+2 {[-2-]}
<POP 23282-23283 StackAdj> Δ+2 {}
<Blob 0x23283 [2] 0x24267> Δ-2 {[«2»]}
<Call 0x23284 0x20ee6> {[«2»]}
<POP 23288-2328a StackAdj> Δ+2 {}
<Call 0x2328a 0x210fe> {}
<Call 0x2328e 0x22b72> {}
<Call 0x23292 0x224f0> {}
<Call 0x23296 0x10222> {}
KC11_Live(void)
<Blob 0x2329c [8] @> Δ-8 {[«8""»]}
<POP 232ac-232ae StackAdj> Δ-4 {[«8""»]|[-4-]}
<Lit 0x232ae 7> {[«8""»]|[$$MONITOR]}
<Const 0x232c2 0x1.4> Δ-4 {[«8""»]|[$$MONITOR]|[##1]}
<Const 0x232c6 0x2.2> Δ-2 {[«8""»]|[$$MONITOR]|[##1]|[#2]}
<Const 0x232ca 0x24266.4> Δ-4 {[«8""»]|[$$MONITOR]|[##1]|[#2]|[##148070]}
<Call 0x232d0 0x103b0> {[«8""»]|[$$MONITOR]|[##1]|[#2]|[##148070]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 232d6-232da StackAdj> Δ+20 {[-2-]}
<MI 232da CLR.B (A7)> {[-2-]}
<Const 0x232dc 0x1.4> Δ-4 {[-2-]|[##1]}
<Call 0x232e0 0x103b8> {[-2-]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 232e6-232e8 StackAdj> Δ+6 {}
<POP 232e8-232ee Naked> Σ0
<Call 0x232e8 0x10284> {}
?exit
@ 235ec
<LVAR 0x020 1(r)>
<LVAR 0x01c 4(r)>
<LVAR 0x018 4(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x006 @ 4(r)>
<POP 235ec-236e0 Body> Δ+20
<POP 235ec-23602 Prologue> Σ0 ↓
<POP 23602-23612 RegCacheLoad> Σ0 ↓
<POP 23612-2361e Naked> Σ0 ↓ →0x2362c
<POP 23612-23614 StackAdj> Δ-2 {[-2-]}
<Call 0x23614 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2361a TST.B (A7)+> Δ+2 {}
<MI 2361c BEQ 0x2362c> {}
<POP 2361e-2362c Naked> Σ0 Δ-20 →0x23638
<Blob 0x2361e [20] @> Δ-20 {[«20""»]}
<MI 2362a BRA 0x23638> {[«20""»]}
<POP 2362c-23638 Naked> Σ0 Δ-20 ↓ ←0x23612
<Blob 0x2362c [20] @> Δ-20 {[«20""»]}
<POP 23638-236d8 Naked> Σ-20 Δ+20 ↓ ←0x2361e
<POP 23638-2363a StackAdj> Δ-4 {[-24-]}
<Lit 0x2363a> {[-20-]|[$$…]}
<Pointer.sp 0x2363a 4> Δ-4
<Const 0x2363e 0x1.2> Δ-2
<Const 0x23642 0x14.2> Δ-2
<Call 0x23646 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2364c-2364e StackAdj> Δ+8
<Pointer.fp 0x2364e <LVAR -0x006 @ 4(r)>> Δ-4 {[-20-]|[$$…]|[@@-6]}
<Call 0x23650 0x10460> {[-20-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 23656-2365a StackAdj> Δ+28 {}
<MI 2365a CLR.B -(A7)> Δ-2 {[#0]}
<MI 2365c MOVE.B (A6+0x20),-(A7)> Δ-2 {[#0]|[2, '(A6+0x20)']}
<MI 23660 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x20)']|[4, '(A6-0x6)']}
<Call 0x23662 0x104ba> {[#0]|[2, '(A6+0x20)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 23668-2366a StackAdj> Δ+4 {[#0]|[2, '(A6+0x20)']}
<MI 2366a MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<MI 2366c MOVEA.L (A6+0x1c),A0> {[4, '(A6-0x6)']}
<MI 23670 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']}
<Const 0x23672 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
<Const 0x23674 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
<Call 0x23676 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 23678-2367a StackAdj> Δ+12 {[4, '(A6-0x6)']}
<MI 2367a MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<MI 2367c MOVEA.L (A6+0x18),A0> {[4, '(A6-0x6)']}
<MI 23680 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']}
<Const 0x23682 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
<Const 0x23684 0x1.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
<Call 0x23688 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 2368a-2368c StackAdj> Δ+12 {[4, '(A6-0x6)']}
<MI 2368c MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<MI 2368e MOVEA.L (A6+0x14),A0> {[4, '(A6-0x6)']}
<MI 23692 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']}
<Const 0x23694 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
<Const 0x23696 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
<Call 0x23698 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 2369a-2369c StackAdj> Δ+12 {[4, '(A6-0x6)']}
<MI 2369c MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<MI 2369e MOVEA.L (A6+0x10),A0> {[4, '(A6-0x6)']}
<MI 236a2 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']}
<Const 0x236a4 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
<Const 0x236a6 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
<Call 0x236a8 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 236aa-236ac StackAdj> Δ+12 {[4, '(A6-0x6)']}
<MI 236ac MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<MI 236ae MOVEA.L (A6+0xc),A0> {[4, '(A6-0x6)']}
<MI 236b2 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']}
<Const 0x236b4 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
<Const 0x236b6 0x1.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
<Call 0x236ba 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 236bc-236be StackAdj> Δ+12 {[4, '(A6-0x6)']}
<MI 236be MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<MI 236c0 MOVEA.L (A6+0x8),A0> {[4, '(A6-0x6)']}
<MI 236c4 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']}
<Call 0x236c6 0x10478> {[4, '(A6-0x6)']|[4, '^(A0)']}
ExpOutputFlag(exp : Pointer; VAR status : Bool)
<POP 236cc-236ce StackAdj> Δ+8 {}
<Pointer.fp 0x236ce <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x236d0 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 236d6-236d8 StackAdj> Δ+4 {}
<POP 236d8-236e0 Epilogue> Σ0
@ 236f8
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 4(r)>
<POP 236f8-237a2 Body> Δ+12
<POP 236f8-2370e Prologue> Σ0 ↓
<POP 2370e-23714 RegCacheLoad> Σ0 ↓
<POP 23714-23720 Naked> Σ0 ↓ →0x23732
<POP 23714-23716 StackAdj> Δ-2 {[-2-]}
<Call 0x23716 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2371c TST.B (A7)+> Δ+2 {}
<MI 2371e BEQ 0x23732> {}
<POP 23720-23732 Naked> Σ0 Δ-12 →0x23742
<Blob 0x23720 [12] @> Δ-12 {[«12""»]}
<MI 23730 BRA 0x23742> {[«12""»]}
<POP 23732-23742 Naked> Σ0 Δ-12 ↓ ←0x23714
<Blob 0x23732 [12] @> Δ-12 {[«12""»]}
<POP 23742-2379a Naked> Σ-12 Δ+12 ↓ ←0x23720
<POP 23742-23744 StackAdj> Δ-4 {[-16-]}
<Lit 0x23744> {[-12-]|[$$…]}
<Pointer.sp 0x23744 4> Δ-4
<Const 0x23748 0x1.2> Δ-2
<Const 0x2374c 0xb.2> Δ-2
<Call 0x23750 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23756-23758 StackAdj> Δ+8
<Pointer.fp 0x23758 <LVAR -0x004 @ 4(r)>> Δ-4 {[-12-]|[$$…]|[@@-4]}
<Call 0x2375a 0x10460> {[-12-]|[$$…]|[@@-4]}
ExpLoad(a : String; b: Pointer)
<POP 23760-23764 StackAdj> Δ+20 {}
<MI 23764 MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<MI 23768 MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']}
<Pointer.sp 0x2376a 4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]}
<Const 0x2376e 0x0.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]}
<Const 0x23772 0x0.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
<Call 0x23776 0x10466> {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 2377c-23780 StackAdj> Δ+16 {[2, '(A6+0x8)']}
<MI 23780 CLR.B (A7)> {[2, '(A6+0x8)']}
<MI 23782 MOVE.B (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0x8)']|[2, '(A6+0xa)']}
<MI 23786 MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[2, '(A6+0xa)']|[4, '(A6-0x4)']}
<Call 0x23788 0x104ba> {[2, '(A6+0x8)']|[2, '(A6+0xa)']|[4, '(A6-0x4)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 2378e-23790 StackAdj> Δ+8 {}
<Pointer.fp 0x23790 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x23792 0x10496> {[@@-4]}
ExpClose(exp : Pointer)
<POP 23798-2379a StackAdj> Δ+4 {}
<POP 2379a-237a2 Epilogue> Σ0
@ 237be
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 237be-2384c Body> Δ+14
<POP 237be-237d4 Prologue> Σ0 ↓
<POP 237d4-237da RegCacheLoad> Σ0 ↓
<POP 237da-237e6 Naked> Σ0 ↓ →0x237f8
<POP 237da-237dc StackAdj> Δ-2 {[-2-]}
<Call 0x237dc 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 237e2 TST.B (A7)+> Δ+2 {}
<MI 237e4 BEQ 0x237f8> {}
<POP 237e6-237f8 Naked> Σ0 Δ-14 →0x23808
<Blob 0x237e6 [14] @> Δ-14 {[«14""»]}
<MI 237f6 BRA 0x23808> {[«14""»]}
<POP 237f8-23808 Naked> Σ0 Δ-14 ↓ ←0x237da
<Blob 0x237f8 [14] @> Δ-14 {[«14""»]}
<POP 23808-23844 Naked> Σ-14 Δ+14 ↓ ←0x237e6
<POP 23808-2380a StackAdj> Δ-4 {[-18-]}
<Lit 0x2380a> {[-14-]|[$$…]}
<Pointer.sp 0x2380a 4> Δ-4
<Const 0x2380e 0x1.2> Δ-2
<Const 0x23812 0xd.2> Δ-2
<Call 0x23816 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2381c-2381e StackAdj> Δ+8
<Pointer.fp 0x2381e <LVAR -0x006 @ 4(r)>> Δ-4 {[-14-]|[$$…]|[@@-6]}
<Call 0x23820 0x10460> {[-14-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 23826-2382a StackAdj> Δ+22 {}
<MI 2382a CLR.B -(A7)> Δ-2 {[#0]}
<MI 2382c MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 23830 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x23832 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 23838-2383a StackAdj> Δ+8 {}
<Pointer.fp 0x2383a <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x2383c 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 23842-23844 StackAdj> Δ+4 {}
<POP 23844-2384c Epilogue> Σ0
@ 2386c
<LVAR 0x00e 1(r)>
<LVAR 0x00c 1(r)>
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 4(r)>
<POP 2386c-23930 Body> Δ+16
<POP 2386c-23882 Prologue> Σ0 ↓
<POP 23882-23888 RegCacheLoad> Σ0 ↓
<POP 23888-23894 Naked> Σ0 ↓ →0x238a6
<POP 23888-2388a StackAdj> Δ-2 {[-2-]}
<Call 0x2388a 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 23890 TST.B (A7)+> Δ+2 {}
<MI 23892 BEQ 0x238a6> {}
<POP 23894-238a6 Naked> Σ0 Δ-16 →0x238b6
<Blob 0x23894 [16] @> Δ-16 {[«16""»]}
<MI 238a4 BRA 0x238b6> {[«16""»]}
<POP 238a6-238b6 Naked> Σ0 Δ-16 ↓ ←0x23888
<Blob 0x238a6 [16] @> Δ-16 {[«16""»]}
<POP 238b6-23928 Naked> Σ-16 Δ+16 ↓ ←0x23894
<POP 238b6-238b8 StackAdj> Δ-4 {[-20-]}
<Lit 0x238b8> {[-16-]|[$$…]}
<Pointer.sp 0x238b8 4> Δ-4
<Const 0x238bc 0x1.2> Δ-2
<Const 0x238c0 0xf.2> Δ-2
<Call 0x238c4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 238ca-238cc StackAdj> Δ+8
<Pointer.fp 0x238cc <LVAR -0x004 @ 4(r)>> Δ-4 {[-16-]|[$$…]|[@@-4]}
<Call 0x238ce 0x10460> {[-16-]|[$$…]|[@@-4]}
ExpLoad(a : String; b: Pointer)
<POP 238d4-238d8 StackAdj> Δ+24 {}
<MI 238d8 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 238da MOVE.B (A6+0xc),-(A7)> Δ-2 {[4, '(A6-0x4)']|[2, '(A6+0xc)']}
<Call 0x238de 0x1046c> {[4, '(A6-0x4)']|[2, '(A6+0xc)']}
ExpInputFlag(exp : Pointer; val : Word)
<POP 238e4-238e6 StackAdj> Δ+2 {[4, '(A6-0x4)']}
<MI 238e6 MOVE.L (A6-0x4),(A7)> {[4, '(A6-0x4)']}
<MI 238e8 MOVE.B (A6+0xa),-(A7)> Δ-2 {[4, '(A6-0x4)']|[2, '(A6+0xa)']}
<Call 0x238ec 0x1046c> {[4, '(A6-0x4)']|[2, '(A6+0xa)']}
ExpInputFlag(exp : Pointer; val : Word)
<POP 238f2-238f4 StackAdj> Δ+4 {[-2-]}
<MI 238f4 MOVE.B (A6+0x8),(A7)> {[-2-]}
<MI 238f8 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x4)']}
<Pointer.sp 0x238fa 4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]}
<Const 0x238fe 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]}
<Const 0x23902 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
<Call 0x23906 0x10466> {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 2390c-2390e StackAdj> Δ+16 {[-2-]}
<MI 2390e CLR.B (A7)> {[-2-]}
<MI 23910 MOVE.B (A6+0xe),-(A7)> Δ-2 {[-2-]|[2, '(A6+0xe)']}
<MI 23914 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[2, '(A6+0xe)']|[4, '(A6-0x4)']}
<Call 0x23916 0x104ba> {[-2-]|[2, '(A6+0xe)']|[4, '(A6-0x4)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 2391c-2391e StackAdj> Δ+8 {}
<Pointer.fp 0x2391e <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x23920 0x10496> {[@@-4]}
ExpClose(exp : Pointer)
<POP 23926-23928 StackAdj> Δ+4 {}
<POP 23928-23930 Epilogue> Σ0
@ 23954
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 23954-239d8 Body> Δ+18
<POP 23954-2396a Prologue> Σ0 ↓
<POP 2396a-2396e RegCacheLoad> Σ0 ↓
<POP 2396e-2397a Naked> Σ0 ↓ →0x23988
<POP 2396e-23970 StackAdj> Δ-2 {[-2-]}
<Call 0x23970 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 23976 TST.B (A7)+> Δ+2 {}
<MI 23978 BEQ 0x23988> {}
<POP 2397a-23988 Naked> Σ0 Δ-18 →0x23994
<Blob 0x2397a [18] @> Δ-18 {[«18""»]}
<MI 23986 BRA 0x23994> {[«18""»]}
<POP 23988-23994 Naked> Σ0 Δ-18 ↓ ←0x2396e
<Blob 0x23988 [18] @> Δ-18 {[«18""»]}
<POP 23994-239d0 Naked> Σ-18 Δ+18 ↓ ←0x2397a
<POP 23994-23996 StackAdj> Δ-4 {[-22-]}
<Lit 0x23996> {[-18-]|[$$…]}
<Pointer.sp 0x23996 4> Δ-4
<Const 0x2399a 0x1.2> Δ-2
<Const 0x2399e 0x12.2> Δ-2
<Call 0x239a2 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 239a8-239aa StackAdj> Δ+8
<Pointer.fp 0x239aa <LVAR -0x006 @ 4(r)>> Δ-4 {[-18-]|[$$…]|[@@-6]}
<Call 0x239ac 0x10460> {[-18-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 239b2-239b6 StackAdj> Δ+26 {}
<MI 239b6 CLR.B -(A7)> Δ-2 {[#0]}
<MI 239b8 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 239bc MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x239be 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 239c4-239c6 StackAdj> Δ+8 {}
<Pointer.fp 0x239c6 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x239c8 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 239ce-239d0 StackAdj> Δ+4 {}
<POP 239d0-239d8 Epilogue> Σ0
@ 23a08
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 23a08-23a96 Body> Δ+24
<POP 23a08-23a1e Prologue> Σ0 ↓
<POP 23a1e-23a24 RegCacheLoad> Σ0 ↓
<POP 23a24-23a30 Naked> Σ0 ↓ →0x23a42
<POP 23a24-23a26 StackAdj> Δ-2 {[-2-]}
<Call 0x23a26 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 23a2c TST.B (A7)+> Δ+2 {}
<MI 23a2e BEQ 0x23a42> {}
<POP 23a30-23a42 Naked> Σ0 Δ-24 →0x23a52
<Blob 0x23a30 [24] @> Δ-24 {[«24""»]}
<MI 23a40 BRA 0x23a52> {[«24""»]}
<POP 23a42-23a52 Naked> Σ0 Δ-24 ↓ ←0x23a24
<Blob 0x23a42 [24] @> Δ-24 {[«24""»]}
<POP 23a52-23a8e Naked> Σ-24 Δ+24 ↓ ←0x23a30
<POP 23a52-23a54 StackAdj> Δ-4 {[-28-]}
<Lit 0x23a54> {[-24-]|[$$…]}
<Pointer.sp 0x23a54 4> Δ-4
<Const 0x23a58 0x1.2> Δ-2
<Const 0x23a5c 0x17.2> Δ-2
<Call 0x23a60 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23a66-23a68 StackAdj> Δ+8
<Pointer.fp 0x23a68 <LVAR -0x006 @ 4(r)>> Δ-4 {[-24-]|[$$…]|[@@-6]}
<Call 0x23a6a 0x10460> {[-24-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 23a70-23a74 StackAdj> Δ+32 {}
<MI 23a74 CLR.B -(A7)> Δ-2 {[#0]}
<MI 23a76 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 23a7a MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x23a7c 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 23a82-23a84 StackAdj> Δ+8 {}
<Pointer.fp 0x23a84 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x23a86 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 23a8c-23a8e StackAdj> Δ+4 {}
<POP 23a8e-23a96 Epilogue> Σ0
@ 23ab2
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 23ab2-23b36 Body> Δ+14
<POP 23ab2-23ac8 Prologue> Σ0 ↓
<POP 23ac8-23acc RegCacheLoad> Σ0 ↓
<POP 23acc-23ad8 Naked> Σ0 ↓ →0x23ae6
<POP 23acc-23ace StackAdj> Δ-2 {[-2-]}
<Call 0x23ace 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 23ad4 TST.B (A7)+> Δ+2 {}
<MI 23ad6 BEQ 0x23ae6> {}
<POP 23ad8-23ae6 Naked> Σ0 Δ-14 →0x23af2
<Blob 0x23ad8 [14] @> Δ-14 {[«14""»]}
<MI 23ae4 BRA 0x23af2> {[«14""»]}
<POP 23ae6-23af2 Naked> Σ0 Δ-14 ↓ ←0x23acc
<Blob 0x23ae6 [14] @> Δ-14 {[«14""»]}
<POP 23af2-23b2e Naked> Σ-14 Δ+14 ↓ ←0x23ad8
<POP 23af2-23af4 StackAdj> Δ-4 {[-18-]}
<Lit 0x23af4> {[-14-]|[$$…]}
<Pointer.sp 0x23af4 4> Δ-4
<Const 0x23af8 0x1.2> Δ-2
<Const 0x23afc 0xe.2> Δ-2
<Call 0x23b00 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23b06-23b08 StackAdj> Δ+8
<Pointer.fp 0x23b08 <LVAR -0x006 @ 4(r)>> Δ-4 {[-14-]|[$$…]|[@@-6]}
<Call 0x23b0a 0x10460> {[-14-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 23b10-23b14 StackAdj> Δ+22 {}
<MI 23b14 CLR.B -(A7)> Δ-2 {[#0]}
<MI 23b16 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 23b1a MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x23b1c 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 23b22-23b24 StackAdj> Δ+8 {}
<Pointer.fp 0x23b24 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x23b26 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 23b2c-23b2e StackAdj> Δ+4 {}
<POP 23b2e-23b36 Epilogue> Σ0
@ 23c98
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 23c98-23d00 Body>
<POP 23c98-23cae Prologue> Σ0 ↓
<POP 23cae-23cf8 Naked> Σ0 ↓
<Blob 0x23cae [14] @> Δ-14 {[«14""»]}
<Const 0x23cba 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 23cbe-23cc0 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x23cc0 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 23cd2-23cd4 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 23cd4 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 23cd8 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 23cda EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 23cdc MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x23cde 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 23ce4-23ce6 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x23ce6 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 23cec-23cee StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x23cee 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 23cf4-23cf8 StackAdj> Δ+20 {}
<POP 23cf8-23d00 Epilogue> Σ0
@ 23d54
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 23d54-23e90 Body>
<POP 23d54-23d6a Prologue> Σ0 ↓
<POP 23d6a-23d80 RegCacheLoad> Σ0 ↓
<POP 23d80-23de0 Naked> Σ0 ↓ →0x23e28
<Call 0x23d80 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x23d86 [18] @> Δ-18 {[«18""»]}
<POP 23d92-23d94 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x23d94 18> {[«18""»]|[$$Experiment error :]}
<Call 0x23da0 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 23da2-23da3 StackAdj> Δ+22 ↓ {}
<Blob 0x23da3 [14] @> Δ-14 {[«14""»]}
<POP 23db2-23db4 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x23db4 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 23dbe-23dc0 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 23dc0 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x23dc4 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 23dca-23dcc StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x23dcc 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 23dd2-23dd4 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x23dd4 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23dd6-23dd8 StackAdj> Δ+18 {}
<MI 23dd8 MOVEA.L (A6+0xa),A0> {}
<MI 23ddc CMPA.W #0x01,A0> {}
<MI 23dde BEQ 0x23e28> {}
<POP 23de0-23e28 Naked> Σ0 ↓
<Blob 0x23de0 [14] @> Δ-14 {[«14""»]}
<Blob 0x23df0 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 23e00-23e02 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x23e02 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 23e0c-23e0e StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x23e0e> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x23e0e 12> Δ-4
<Const 0x23e12 0x1.2> Δ-2
<Const 0x23e14 0x1e.2> Δ-2
<Call 0x23e16 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23e18-23e1a StackAdj> Δ+8
<Call 0x23e1a 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 23e20-23e22 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x23e22 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23e24-23e28 StackAdj> Δ+48 {}
<POP 23e28-23e88 Naked> Σ0 ↓ ←0x23d80
<Blob 0x23e28 [14] @> Δ-14 {[«14""»]}
<POP 23e38-23e3a StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x23e3a 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 23e44-23e46 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 23e46 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x23e4a 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 23e50-23e52 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x23e52 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 23e58-23e5a StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x23e5a 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23e5c-23e5d StackAdj> Δ+18 ↓ {}
<Blob 0x23e5d [24] @> Δ-24 {[«24""»]}
<Const 0x23e6c 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 23e70-23e72 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x23e72 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x23e80 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 23e86-23e88 StackAdj> Δ+30 {}
<POP 23e88-23e90 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; import ident.513757dcb5b128a7 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 32 2c | 2, | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 42 b0 | B | .PTR 0x242b0 00020010 code.end: 00020010 00 02 3e 90 | > | .PTR 0x23e90 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 3c 98 | < | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 3d 54 | =T | .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 53 42 55 53 55 4c 4f 41 |SBUSULOA| .TXT 'SBUSULOAD ' 00020114 44 42 55 53 55 4c 4f 41 |DBUSULOA| .TXT 'DBUSULOAD ' 0002011e 40 28 |@( | .XXX[0x2] 00020120 23 29 4c 4f 41 44 45 52 |#)LOADER| .XXX[0x20] 00020128 2c 32 2e 37 2c 39 32 2f |,2.7,92/| 00020130 31 31 2f 30 35 2c 31 37 |11/05,17| 00020138 3a 31 38 3a 31 39 5c 20 |:18:19\ | 00020140 2e 4d |.M | .TXT '.M' 00020142 4c 4f |LO | .TXT 'LO' 00020144 41 44 |AD | .TXT 'AD' 00020146 43 4f 50 59 52 49 47 48 |COPYRIGH| .TXT 'COPYRIGHT_INFO.TXT' 00020158 43 4f 4e 46 49 47 55 52 |CONFIGUR| .TXT 'CONFIGURE ' 00020162 20 5b | [ | .TXT ' [' 00020164 5d 20 3a 5f |] :_ | .TXT '] :_' 00020168 4d 69 63 72 6f 63 6f 64 |Microcod| .TXT 'Microcode file' 00020176 2e 4d 32 30 30 5f 55 43 |.M200_UC| .TXT '.M200_UCODE ' 00020182 44 6f 20 79 6f 75 20 77 |Do you w| .TXT 'Do you want to enter the CLI prior to starting the machine' 000201bc 43 4c |CL | .TXT 'CL' 000201be 49 20 |I | .XXX[0x2] 000201c0 43 4f 44 45 20 20 20 20 |CODE | .XXX[0x50] 000201c8 20 20 54 59 50 45 20 20 | TYPE | 000201d0 20 20 20 20 53 59 53 54 | SYST| 000201d8 45 4d 20 20 20 20 43 4f |EM CO| 000201e0 4e 54 52 4f 4c 20 20 20 |NTROL | 000201e8 44 41 54 41 20 20 20 20 |DATA | 000201f0 20 20 49 4d 50 4f 52 54 | IMPORT| 000201f8 20 20 20 20 51 55 45 55 | QUEU| 00020200 45 20 20 20 20 20 52 45 |E RE| 00020208 53 45 52 56 45 44 20 20 |SERVED | 00020210 55 6e 6b 6e 6f 77 6e 20 |Unknown | .TXT 'Unknown stack KIND :_ ' 00020226 4e 6f 20 72 65 73 70 6f |No respo| .TXT 'No response to page load' 0002023e 4c 61 73 74 20 68 65 61 |Last hea| .TXT 'Last header sent =>_' 00020252 5f 20 |_ | .TXT '_ ' 00020254 4e 6f 20 72 65 73 70 6f |No respo| .TXT 'No response to page load' 0002026c 4c 61 73 74 20 68 65 61 |Last hea| .TXT 'Last header sent =>_' 00020280 5f 20 |_ | .TXT '_ ' 00020282 4e 6f 20 70 6f 73 73 69 |No possi| .TXT 'No possible elaboration order!' 000202a0 4e 6f 20 73 75 62 73 79 |No subsy| .TXT 'No subsystem in WITH directive. ' 000202c0 55 6e 6b 6e 6f 77 6e 20 |Unknown | .TXT 'Unknown subsystem name :_ ' 000202da 4b 65 72 6e 65 6c 20 65 |Kernel e| .TXT 'Kernel elaborated subsystem not on list :_' 00020304 52 65 74 75 72 6e 69 6e |Returnin| .TXT 'Returning to LOCAL mode to start R1000' 0002032a 52 65 74 75 72 6e 65 64 |Returned| .TXT 'Returned to LOCAL, starting R1000 cluster ' 00020354 53 74 61 72 74 69 6e 67 |Starting| .TXT 'Starting R1000 Environment - it now owns this console.' 0002038a 4c 4f 41 44 20 20 |LOAD | .XXX[0x6] 00020390 20 20 20 20 57 49 54 48 | WITH| .XXX[0x28] 00020398 20 20 20 20 20 20 53 55 | SU| 000203a0 42 53 59 53 54 45 4d 20 |BSYSTEM | 000203a8 45 4e 44 20 20 20 20 20 |END | 000203b0 20 20 4f 54 48 45 52 20 | OTHER | 000203b8 20 20 20 20 | | .XXX[0x4] 000203bc 42 61 64 20 73 79 6e 74 |Bad synt| .TXT 'Bad syntax in SUBSYSTEM directive!' 000203de 42 61 64 20 73 79 6e 74 |Bad synt| .TXT 'Bad syntax in WITH directive! ' 000203fc 43 61 6e 27 74 20 66 69 |Can't fi| .TXT 'Can't find USER of WITH!' 00020414 4c 6f 61 64 69 6e 67 20 |Loading | .TXT 'Loading :_' 0002041e 42 61 64 20 |Bad | .TXT 'Bad ' 00020422 73 79 6e 74 |synt | .TXT 'synt' 00020426 61 78 20 69 |ax i | .TXT 'ax i' 0002042a 6e 20 3a 5f |n :_ | .TXT 'n :_' 0002042e 43 55 52 52 45 4e 54 2e |CURRENT.| .TXT 'CURRENT.M200_CONFIG ' 00020442 45 6e 74 65 72 20 6e 61 |Enter na| .TXT 'Enter name for_ ' 00020452 2f 20 |/ | .TXT '/ ' 00020454 20 77 69 72 65 64 2f 74 | wired/t| .TXT ' wired/total pages loaded.' 0002046e 43 55 52 52 45 4e 54 2e |CURRENT.| .TXT 'CURRENT.M200_CONFIG ' 00020482 45 6e 74 65 72 20 6e 61 |Enter na| .TXT 'Enter name of configuration to boot [STANDARD] :_ ' 000204b4 43 6f 75 6c 64 20 6e 6f |Could no| .TXT 'Could not read configuration file, do you want to create it ' 000204f0 44 6f 20 79 6f 75 20 77 |Do you w| .TXT 'Do you want to edit this configuration' 00020516 53 54 41 4e |STAN | .TXT 'STAN' 0002051a 44 41 52 44 |DARD | .TXT 'DARD' 0002051e 2e 4d 32 30 |.M20 | .TXT '.M20' 00020522 30 5f 43 4f |0_CO | .TXT '0_CO' 00020526 4e 46 49 47 |NFIG | .TXT 'NFIG' 0002052a 43 6f 75 6c 64 20 6e 6f |Could no| .TXT 'Could not read Config file' 00020544 43 45 44 49 54 20 |CEDIT | .TXT 'CEDIT ' 0002054a 43 45 44 49 54 20 |CEDIT | .TXT 'CEDIT ' 00020550 53 54 41 4e 44 41 52 44 |STANDARD| .TXT 'STANDARD.M200_CONFIG' 00020564 43 6f 75 6c 64 20 6e 6f |Could no| .TXT 'Could not read STANDARD.M200_CONFIG ' 00020588 45 6e 74 65 72 20 43 4c |Enter CL| .TXT 'Enter CLI ' 00020592 43 4c |CL | .TXT 'CL' 00020594 49 20 |I | .XXX[0x2] 00020596 42 4f 4f 54 5f 52 45 41 |BOOT_REA| .TXT 'BOOT_REASON ' 000205a2 4d 4f 4e 49 54 4f 52 20 |MONITOR | .TXT 'MONITOR ' 000205aa 00 00 00 00 00 00 | | .XXX[0x6] 000205b0 00 00 | | .XXX[0x2] 000205b2 43 4f 44 45 20 20 20 20 |CODE | .TXT 'CODE ' 000205bc 54 59 50 45 20 20 20 20 |TYPE | .TXT 'TYPE ' 000205c6 53 59 53 54 45 4d 20 20 |SYSTEM | .TXT 'SYSTEM ' 000205d0 43 4f 4e 54 52 4f 4c 20 |CONTROL | .TXT 'CONTROL ' 000205da 44 41 54 41 20 20 20 20 |DATA | .TXT 'DATA ' 000205e4 49 4d 50 4f 52 54 20 20 |IMPORT | .TXT 'IMPORT ' 000205ee 51 55 45 55 45 20 20 20 |QUEUE | .TXT 'QUEUE ' 000205f8 52 45 53 45 52 56 45 44 |RESERVED| .TXT 'RESERVED ' 00020602 06 02 07 01 04 05 | | .XXX[0x6] 00020608 03 00 | | .XXX[0x2] 0002060a 00 00 00 00 00 04 c4 b4 | | .CONST 0x0000,0x0000,0x0004,0xc4b4 00020612 00 00 00 00 | | .CONST 0x0,0x0,0x0,0x0 00020616 00 01 51 80 | Q | .CONST 0x0,0x1,0x51,0x80 0002061a days_per_month: 0002061a 00 00 00 1f 00 3b 00 5a | ; Z| .CONST 0,31,59,90,120,151,181,212,243,273,304,334 00020632 days_per_month_leap: 00020632 00 00 00 1f 00 3c 00 5b | < [| .CONST 0,31,60,91,121,152,182,213,244,274,305,335 0002064a 00 02 03 04 06 07 0c 0d | | .CONST 0x00,0x02,0x03,0x04,0x06,0x07,0x0c,0x0d,0x0e 00020653 0f 04 00 00 88 | | .XXX[0x5] 00020658 00 00 02 00 00 01 00 04 | | .XXX[0x40] 00020660 00 00 00 00 4c 4f 41 44 | LOAD| 00020668 20 20 20 20 20 20 57 49 | WI| 00020670 54 48 20 20 20 20 20 20 |TH | 00020678 53 55 42 53 59 53 54 45 |SUBSYSTE| 00020680 4d 20 45 4e 44 20 20 20 |M END | 00020688 20 20 20 20 4f 54 48 45 | OTHE| 00020690 52 20 20 20 20 20 0b ad |R | 00020698 0b ad 0b ad 0b ad | | .XXX[0x6] 0002069e ; -------------------------------------------------------------------------------------- 0002069e ; OMSI PASCAL Function 0002069e ; <LVAR 0x016 1(r)> 0002069e ; <LVAR 0x012 4(r)> 0002069e ; <LVAR 0x010 1(r)> 0002069e ; <LVAR 0x00e 1(r)> 0002069e ; <LVAR 0x00c 1(r)> 0002069e ; <LVAR 0x008 4(r)> 0002069e ; <LVAR -0x004 @> 0002069e ; -------------------------------------------------------------------------------------- 0002069e 4e 56 ff cc |NV | LINK.W A6,#0xffcc 000206a2 bf d5 | | CMPA.L (A5),A7 000206a4 62 06 |b | BHI 0x206ac 000206a6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000206aa 4e 76 |Nv | TRAPV 000206ac de fc 00 30 | 0 | ADDA.W #0x30,A7 000206b0 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000206b4 45 f9 00 01 05 02 |E | LEA.L IPC_PutBool(a : Bool),A2 000206ba 72 0a |r | MOVEQ.L #0x0a,D1 000206bc 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000206c2 2f 2e 00 12 |/. | MOVE.L (A6+0x12),-(A7) 000206c6 4e b9 00 01 05 08 |N | JSR IPC_PutString(a : String) 000206cc 54 4f |TO | ADDQ.L #0x2,A7 000206ce 1e ae 00 10 | | MOVE.B (A6+0x10),(A7) 000206d2 4e 92 |N | JSR (A2) 000206d4 54 4f |TO | ADDQ.L #0x2,A7 000206d6 4a 2e 00 16 |J. | TST.B (A6+0x16) 000206da 66 0e |f | BNE 0x206ea 000206dc 1f 2e 00 0e | . | MOVE.B (A6+0xe),-(A7) 000206e0 4e 92 |N | JSR (A2) 000206e2 1e ae 00 0c | | MOVE.B (A6+0xc),(A7) 000206e6 4e 92 |N | JSR (A2) 000206e8 54 4f |TO | ADDQ.L #0x2,A7 000206ea 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 000206f0 4a 2e 00 16 |J. | TST.B (A6+0x16) 000206f4 67 12 |g | BEQ 0x20708 000206f6 9e c1 | | SUBA.W D1,A7 000206f8 20 4f | O | MOVEA.L A7,A0 000206fa 43 fa fa 0e |C | LEA.L 0x2010a,A1 000206fe 70 08 |p | MOVEQ.L #0x08,D0 00020700 10 d9 | | MOVE.B (A1)+,(A0)+ 00020702 51 c8 ff fc |Q | DBF D0,0x20700 00020706 60 10 |` | BRA 0x20718 00020708 9e c1 | | SUBA.W D1,A7 0002070a 20 4f | O | MOVEA.L A7,A0 0002070c 43 fa fa 06 |C | LEA.L 0x20114,A1 00020710 70 08 |p | MOVEQ.L #0x08,D0 00020712 10 d9 | | MOVE.B (A1)+,(A0)+ 00020714 51 c8 ff fc |Q | DBF D0,0x20712 00020718 59 4f |YO | SUBQ.L #0x4,A7 0002071a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002071e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020722 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00020726 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002072c 50 4f |PO | ADDQ.L #0x8,A7 0002072e 48 78 00 01 |Hx | PEA.L 0x1 00020732 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020736 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002073a 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00020740 de fc 00 18 | | ADDA.W #0x18,A7 00020744 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 0002074a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002074e 48 50 |HP | PEA.L (A0) 00020750 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020756 58 4f |XO | ADDQ.L #0x4,A7 00020758 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 0002075e 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00020762 4e 5e |N^ | UNLK A6 00020764 4e 75 |Nu | RTS 00020766 ; -------------------------------------------------------------------------------------- 00020766 ; OMSI PASCAL Function 00020766 ; <LVAR -0x002 @ 1(r)> 00020766 ; <LVAR -0x006 @ 4(r)> 00020766 ; <LVAR -0x008 @ 1(r)> 00020766 ; <LVAR -0x00c @ 4(r)> 00020766 ; -------------------------------------------------------------------------------------- 00020766 4e 56 ff ae |NV | LINK.W A6,#0xffae 0002076a bf d5 | | CMPA.L (A5),A7 0002076c 62 06 |b | BHI 0x20774 0002076e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020772 4e 76 |Nv | TRAPV 00020774 de fc 00 46 | F | ADDA.W #0x46,A7 00020778 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 0002077c 43 ee ff fa |C | LEA.L (A6-0x6),A1 00020780 45 ee ff f8 |E | LEA.L (A6-0x8),A2 00020784 47 ee ff f4 |G | LEA.L (A6-0xc),A3 00020788 49 ee ff fe |I | LEA.L (A6-0x2),A4 0002078c 72 0c |r | MOVEQ.L #0x0c,D1 0002078e 41 fa f9 c8 |A | LEA.L 0x20158,A0 00020792 70 08 |p | MOVEQ.L #0x08,D0 00020794 3f 20 |? | MOVE.W -(A0),-(A7) 00020796 51 c8 ff fc |Q | DBF D0,0x20794 0002079a 59 4f |YO | SUBQ.L #0x4,A7 0002079c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000207a0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000207a4 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 000207a8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000207ae 5c 4f |\O | ADDQ.L #0x6,A7 000207b0 42 17 |B | CLR.B (A7) 000207b2 42 27 |B' | CLR.B -(A7) 000207b4 48 78 00 00 |Hx | PEA.L 0x0 000207b8 48 52 |HR | PEA.L (A2) 000207ba 48 53 |HS | PEA.L (A3) 000207bc 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000207c2 de fc 00 26 | & | ADDA.W #0x26,A7 000207c6 4a 12 |J | TST.B (A2) 000207c8 66 62 |fb | BNE 0x2082c 000207ca 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000207d0 48 51 |HQ | PEA.L (A1) 000207d2 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000207d8 2e 93 |. | MOVE.L (A3),(A7) 000207da 48 51 |HQ | PEA.L (A1) 000207dc 48 54 |HT | PEA.L (A4) 000207de 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 000207e4 de c1 | | ADDA.W D1,A7 000207e6 4a 14 |J | TST.B (A4) 000207e8 66 0a |f | BNE 0x207f4 000207ea 2f 11 |/ | MOVE.L (A1),-(A7) 000207ec 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000207f2 60 08 |` | BRA 0x207fc 000207f4 48 51 |HQ | PEA.L (A1) 000207f6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000207fc 58 4f |XO | ADDQ.L #0x4,A7 000207fe 4a 14 |J | TST.B (A4) 00020800 67 ce |g | BEQ 0x207d0 00020802 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00020808 42 27 |B' | CLR.B -(A7) 0002080a 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 0002080e 48 78 00 01 |Hx | PEA.L 0x1 00020812 48 52 |HR | PEA.L (A2) 00020814 48 53 |HS | PEA.L (A3) 00020816 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 0002081c de c1 | | ADDA.W D1,A7 0002081e 2e bc 00 02 fa ee |. | MOVE.L #0x2faee,(A7) 00020824 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 0002082a 58 4f |XO | ADDQ.L #0x4,A7 0002082c 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 00020830 4e 5e |N^ | UNLK A6 00020832 4e 75 |Nu | RTS 00020834 ; -------------------------------------------------------------------------------------- 00020834 ; OMSI PASCAL Function 00020834 ; <LVAR 0x008 4(r)> 00020834 ; -------------------------------------------------------------------------------------- 00020834 4e 56 ff ec |NV | LINK.W A6,#0xffec 00020838 bf d5 | | CMPA.L (A5),A7 0002083a 62 06 |b | BHI 0x20842 0002083c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020840 4e 76 |Nv | TRAPV 00020842 de fc 00 14 | | ADDA.W #0x14,A7 00020846 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 0002084a 43 ee 00 08 |C | LEA.L (A6+0x8),A1 0002084e 4a 39 00 02 3e c4 |J9 > | TST.B 0x23ec4 00020854 67 08 |g | BEQ 0x2085e 00020856 20 51 | Q | MOVEA.L (A1),A0 00020858 00 68 40 00 00 04 | h@ | ORI.W #0x4000,(A0+0x4) 0002085e 4a 39 00 02 3e c5 |J9 > | TST.B 0x23ec5 00020864 67 08 |g | BEQ 0x2086e 00020866 20 51 | Q | MOVEA.L (A1),A0 00020868 00 68 20 00 00 04 | h | ORI.W #0x2000,(A0+0x4) 0002086e 4a 39 00 02 3e c6 |J9 > | TST.B 0x23ec6 00020874 67 08 |g | BEQ 0x2087e 00020876 20 51 | Q | MOVEA.L (A1),A0 00020878 00 68 10 00 00 04 | h | ORI.W #0x1000,(A0+0x4) 0002087e 4a 39 00 02 3e c9 |J9 > | TST.B 0x23ec9 00020884 67 08 |g | BEQ 0x2088e 00020886 20 51 | Q | MOVEA.L (A1),A0 00020888 00 68 02 00 00 04 | h | ORI.W #0x0200,(A0+0x4) 0002088e 4a 39 00 02 3e ca |J9 > | TST.B 0x23eca 00020894 67 08 |g | BEQ 0x2089e 00020896 20 51 | Q | MOVEA.L (A1),A0 00020898 00 68 01 00 00 04 | h | ORI.W #0x0100,(A0+0x4) 0002089e 10 39 00 02 3e 98 | 9 > | MOVE.B 0x23e98,D0 000208a4 ef 08 | | LSL.B #0x7,D0 000208a6 ee 08 | | LSR.B #0x7,D0 000208a8 67 08 |g | BEQ 0x208b2 000208aa 20 51 | Q | MOVEA.L (A1),A0 000208ac 00 68 08 00 00 04 | h | ORI.W #0x0800,(A0+0x4) 000208b2 10 39 00 02 3e 98 | 9 > | MOVE.B 0x23e98,D0 000208b8 ed 08 | | LSL.B #0x6,D0 000208ba ee 08 | | LSR.B #0x7,D0 000208bc 67 08 |g | BEQ 0x208c6 000208be 20 51 | Q | MOVEA.L (A1),A0 000208c0 00 68 04 00 00 04 | h | ORI.W #0x0400,(A0+0x4) 000208c6 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 000208ca 4e 5e |N^ | UNLK A6 000208cc 4e 75 |Nu | RTS 000208ce ; -------------------------------------------------------------------------------------- 000208ce ; OMSI PASCAL Function 000208ce ; <LVAR -0x004 @> 000208ce ; -------------------------------------------------------------------------------------- 000208ce 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 000208d2 bf d5 | | CMPA.L (A5),A7 000208d4 62 06 |b | BHI 0x208dc 000208d6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000208da 4e 76 |Nv | TRAPV 000208dc de fc 00 28 | ( | ADDA.W #0x28,A7 000208e0 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 000208e4 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000208ea 42 27 |B' | CLR.B -(A7) 000208ec 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 000208f2 54 4f |TO | ADDQ.L #0x2,A7 000208f4 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 000208fa 9e fc 00 0a | | SUBA.W #0xa,A7 000208fe 20 4f | O | MOVEA.L A7,A0 00020900 43 fa f8 56 |C V | LEA.L 0x20158,A1 00020904 70 08 |p | MOVEQ.L #0x08,D0 00020906 10 d9 | | MOVE.B (A1)+,(A0)+ 00020908 51 c8 ff fc |Q | DBF D0,0x20906 0002090c 59 4f |YO | SUBQ.L #0x4,A7 0002090e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020912 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020916 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 0002091a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020920 50 4f |PO | ADDQ.L #0x8,A7 00020922 48 78 00 01 |Hx | PEA.L 0x1 00020926 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 0002092a 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002092e 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00020934 de fc 00 18 | | ADDA.W #0x18,A7 00020938 48 79 00 02 41 be |Hy A | PEA.L 0x241be 0002093e 4e b9 00 01 05 a4 |N | JSR Read_fc0c() : Word 00020944 58 4f |XO | ADDQ.L #0x4,A7 00020946 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 0002094a 4e 5e |N^ | UNLK A6 0002094c 4e 75 |Nu | RTS 0002094e ; -------------------------------------------------------------------------------------- 0002094e ; OMSI PASCAL Function 0002094e ; -------------------------------------------------------------------------------------- 0002094e 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 00020952 bf d5 | | CMPA.L (A5),A7 00020954 62 06 |b | BHI 0x2095c 00020956 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002095a 4e 76 |Nv | TRAPV 0002095c de fc 00 14 | | ADDA.W #0x14,A7 00020960 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00020964 41 f9 00 02 41 d4 |A A | LEA.L 0x241d4,A0 0002096a 42 50 |BP | CLR.W (A0) 0002096c 42 80 |B | CLR.L D0 0002096e 30 10 |0 | MOVE.W (A0),D0 00020970 22 00 |" | MOVE.L D0,D1 00020972 e1 81 | | ASL.L #0x8,D1 00020974 e9 81 | | ASL.L #0x4,D1 00020976 58 80 |X | ADDQ.L #0x4,D0 00020978 e1 80 | | ASL.L #0x8,D0 0002097a d0 81 | | ADD.L D1,D0 0002097c 06 80 00 00 00 80 | | ADDI.L #0x00000080,D0 00020982 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00020988 63 02 |c | BLS 0x2098c 0002098a 4e 4f |NO | TRAP #15 0002098c 33 c0 00 02 41 d2 |3 A | MOVE.W D0,0x241d2 00020992 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00020996 4e 5e |N^ | UNLK A6 00020998 4e 75 |Nu | RTS 0002099a ; -------------------------------------------------------------------------------------- 0002099a ; OMSI PASCAL Function 0002099a ; <LVAR 0x008 1(r)> 0002099a ; <LVAR -0x003 1(r)> 0002099a ; <LVAR -0x004 1(w)> 0002099a ; <LVAR -0x005 1(w)> 0002099a ; <LVAR -0x006 1(w) 4(r)> 0002099a ; <LVAR -0x007 1(w)> 0002099a ; <LVAR -0x008 1(w)> 0002099a ; <LVAR -0x009 1(w)> 0002099a ; <LVAR -0x00a 1(w) 4(r)> 0002099a ; <LVAR -0x00b @ 1(r)> 0002099a ; <LVAR -0x00c 1(r)> 0002099a ; <LVAR -0x00d @ 1(r)> 0002099a ; <LVAR -0x00e @ 1(r)> 0002099a ; <LVAR -0x00f @ 1(r)> 0002099a ; <LVAR -0x010 1(r)> 0002099a ; <LVAR -0x011 @ 1(r)> 0002099a ; <LVAR -0x012 @ 1(r)> 0002099a ; -------------------------------------------------------------------------------------- 0002099a 4e 56 ff ae |NV | LINK.W A6,#0xffae ; Spelunked 0002099e bf d5 | | CMPA.L (A5),A7 000209a0 62 06 |b | BHI 0x209a8 000209a2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000209a6 4e 76 |Nv | TRAPV 000209a8 de fc 00 40 | @ | ADDA.W #0x40,A7 000209ac 48 e7 e0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D2+D1+D0,-(A7) 000209b0 43 ee ff ee |C | LEA.L (A6-0x12),A1 000209b4 45 ee ff ef |E | LEA.L (A6-0x11),A2 000209b8 47 ee ff f1 |G | LEA.L (A6-0xf),A3 000209bc 49 ee ff f2 |I | LEA.L (A6-0xe),A4 000209c0 74 18 |t | MOVEQ.L #0x18,D2 000209c2 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000209c6 48 80 |H | EXTB.W D0 000209c8 32 00 |2 | MOVE.W D0,D1 000209ca 55 41 |UA | SUBQ.W #0x2,D1 000209cc 0c 41 00 0d | A | CMPI.W #0x000d,D1 000209d0 63 02 |c | BLS 0x209d4 000209d2 switch@0x209d6[0x2]: 000209d2 switch@0x209d6[0x3]: 000209d2 switch@0x209d6[0x6]: 000209d2 switch@0x209d6[0x7]: 000209d2 switch@0x209d6[0x8]: 000209d2 switch@0x209d6[0x9]: 000209d2 4e 4e |NN | TRAP #14 000209d4 d2 41 | A | ADD.W D1,D1 000209d6 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W 000209de 00 66 | f | .CONST 0x66 ; [0x0] -> 0x20a44 000209e0 00 4e | N | .CONST 0x4e ; [0x1] -> 0x20a2c 000209e2 ff f4 | | .CONST 0xfff4 ; [0x2] -> 0x209d2 000209e4 ff f4 | | .CONST 0xfff4 ; [0x3] -> 0x209d2 000209e6 00 1c | | .CONST 0x1c ; [0x4] -> 0x209fa 000209e8 00 36 | 6 | .CONST 0x36 ; [0x5] -> 0x20a14 000209ea ff f4 | | .CONST 0xfff4 ; [0x6] -> 0x209d2 000209ec ff f4 | | .CONST 0xfff4 ; [0x7] -> 0x209d2 000209ee ff f4 | | .CONST 0xfff4 ; [0x8] -> 0x209d2 000209f0 ff f4 | | .CONST 0xfff4 ; [0x9] -> 0x209d2 000209f2 00 7e | ~ | .CONST 0x7e ; [0xa] -> 0x20a5c 000209f4 00 7e | ~ | .CONST 0x7e ; [0xb] -> 0x20a5c 000209f6 00 7e | ~ | .CONST 0x7e ; [0xc] -> 0x20a5c 000209f8 00 7e | ~ | .CONST 0x7e ; [0xd] -> 0x20a5c 000209fa switch@0x209d6[0x4]: 000209fa 48 51 |HQ | PEA.L (A1) 000209fc 48 52 |HR | PEA.L (A2) 000209fe 48 53 |HS | PEA.L (A3) 00020a00 48 54 |HT | PEA.L (A4) 00020a02 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00020a06 48 6e ff f5 |Hn | PEA.L (A6-0xb) 00020a0a 4e b9 00 02 34 76 |N 4v | JSR exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 00020a10 de c2 | | ADDA.W D2,A7 00020a12 60 64 |`d | BRA 0x20a78 00020a14 switch@0x209d6[0x5]: 00020a14 48 51 |HQ | PEA.L (A1) 00020a16 48 52 |HR | PEA.L (A2) 00020a18 48 53 |HS | PEA.L (A3) 00020a1a 48 54 |HT | PEA.L (A4) 00020a1c 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00020a20 48 6e ff f5 |Hn | PEA.L (A6-0xb) 00020a24 4e b9 00 02 35 2e |N 5. | JSR exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 00020a2a 60 e4 |` | BRA 0x20a10 00020a2c switch@0x209d6[0x1]: 00020a2c 48 51 |HQ | PEA.L (A1) 00020a2e 48 52 |HR | PEA.L (A2) 00020a30 48 53 |HS | PEA.L (A3) 00020a32 48 54 |HT | PEA.L (A4) 00020a34 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00020a38 48 6e ff f5 |Hn | PEA.L (A6-0xb) 00020a3c 4e b9 00 02 33 48 |N 3H | JSR exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 00020a42 60 cc |` | BRA 0x20a10 00020a44 switch@0x209d6[0x0]: 00020a44 48 51 |HQ | PEA.L (A1) 00020a46 48 52 |HR | PEA.L (A2) 00020a48 48 53 |HS | PEA.L (A3) 00020a4a 48 54 |HT | PEA.L (A4) 00020a4c 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00020a50 48 6e ff f5 |Hn | PEA.L (A6-0xb) 00020a54 4e b9 00 02 33 fc |N 3 | JSR exp_READ_NOVRAM_DATA.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 00020a5a 60 b4 |` | BRA 0x20a10 00020a5c switch@0x209d6[0xa]: 00020a5c switch@0x209d6[0xb]: 00020a5c switch@0x209d6[0xc]: 00020a5c switch@0x209d6[0xd]: 00020a5c 1f 00 | | MOVE.B D0,-(A7) 00020a5e 48 51 |HQ | PEA.L (A1) 00020a60 48 52 |HR | PEA.L (A2) 00020a62 48 53 |HS | PEA.L (A3) 00020a64 48 54 |HT | PEA.L (A4) 00020a66 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00020a6a 48 6e ff f5 |Hn | PEA.L (A6-0xb) 00020a6e 4e b9 00 02 35 ec |N 5 | JSR 0x235ec 00020a74 de fc 00 1a | | ADDA.W #0x1a,A7 00020a78 4a 2e ff f5 |J. | TST.B (A6-0xb) 00020a7c 67 50 |gP | BEQ 0x20ace 00020a7e 1d 51 ff f6 | Q | MOVE.B (A1),(A6-0xa) 00020a82 1d 52 ff f7 | R | MOVE.B (A2),(A6-0x9) 00020a86 1d 6e ff f0 ff f8 | n | MOVE.B (A6-0x10),(A6-0x8) 00020a8c 1d 53 ff f9 | S | MOVE.B (A3),(A6-0x7) 00020a90 1d 54 ff fa | T | MOVE.B (A4),(A6-0x6) 00020a94 1d 6e ff f3 ff fb | n | MOVE.B (A6-0xd),(A6-0x5) 00020a9a 1d 6e ff f4 ff fc | n | MOVE.B (A6-0xc),(A6-0x4) 00020aa0 42 2e ff fd |B. | CLR.B (A6-0x3) 00020aa4 2f 2e ff fa |/. | MOVE.L (A6-0x6),-(A7) 00020aa8 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 00020aac 48 57 |HW | PEA.L (A7) 00020aae 48 78 00 00 |Hx | PEA.L 0x0 00020ab2 48 78 00 07 |Hx | PEA.L 0x7 00020ab6 e7 40 | @ | ASL.W #0x3,D0 00020ab8 41 f9 00 02 3e 90 |A > | LEA.L 0x23e90,A0 00020abe 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00020ac2 48 68 03 4a |Hh J | PEA.L (A0+0x34a) 00020ac6 4e b9 00 01 04 b4 |N | JSR ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q) 00020acc de c2 | | ADDA.W D2,A7 00020ace 4c df 1f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3+A4 00020ad2 4e 5e |N^ | UNLK A6 00020ad4 4e 75 |Nu | RTS 00020ad6 ; -------------------------------------------------------------------------------------- 00020ad6 ; OMSI PASCAL Function 00020ad6 ; <LVAR -0x001 1(r)> 00020ad6 ; <LVAR -0x002 1(w)> 00020ad6 ; <LVAR -0x003 1(w)> 00020ad6 ; <LVAR -0x004 1(w) 4(r)> 00020ad6 ; <LVAR -0x005 1(w)> 00020ad6 ; <LVAR -0x006 1(w)> 00020ad6 ; <LVAR -0x007 1(w)> 00020ad6 ; <LVAR -0x008 1(w) 4(r)> 00020ad6 ; -------------------------------------------------------------------------------------- 00020ad6 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 00020ada bf d5 | | CMPA.L (A5),A7 00020adc 62 06 |b | BHI 0x20ae4 00020ade 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020ae2 4e 76 |Nv | TRAPV 00020ae4 de fc 00 28 | ( | ADDA.W #0x28,A7 00020ae8 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00020aec 41 f9 00 01 05 92 |A | LEA.L ReadConfig(where : Long) : Word,A0 00020af2 32 3c 00 ff |2< | MOVE.W #0xff,D1 00020af6 55 4f |UO | SUBQ.L #0x2,A7 00020af8 48 78 01 01 |Hx | PEA.L 0x101 00020afc 4e 90 |N | JSR (A0) 00020afe 58 4f |XO | ADDQ.L #0x4,A7 00020b00 30 1f |0 | MOVE.W (A7)+,D0 00020b02 41 81 |A | CHK.W D1,D0 00020b04 1d 40 ff f8 | @ | MOVE.B D0,(A6-0x8) 00020b08 55 4f |UO | SUBQ.L #0x2,A7 00020b0a 48 78 01 02 |Hx | PEA.L 0x102 00020b0e 4e 90 |N | JSR (A0) 00020b10 58 4f |XO | ADDQ.L #0x4,A7 00020b12 30 1f |0 | MOVE.W (A7)+,D0 00020b14 41 81 |A | CHK.W D1,D0 00020b16 1d 40 ff f9 | @ | MOVE.B D0,(A6-0x7) 00020b1a 55 4f |UO | SUBQ.L #0x2,A7 00020b1c 48 78 01 03 |Hx | PEA.L 0x103 00020b20 4e 90 |N | JSR (A0) 00020b22 58 4f |XO | ADDQ.L #0x4,A7 00020b24 30 1f |0 | MOVE.W (A7)+,D0 00020b26 41 81 |A | CHK.W D1,D0 00020b28 1d 40 ff fa | @ | MOVE.B D0,(A6-0x6) 00020b2c 55 4f |UO | SUBQ.L #0x2,A7 00020b2e 48 78 01 04 |Hx | PEA.L 0x104 00020b32 4e 90 |N | JSR (A0) 00020b34 58 4f |XO | ADDQ.L #0x4,A7 00020b36 30 1f |0 | MOVE.W (A7)+,D0 00020b38 41 81 |A | CHK.W D1,D0 00020b3a 1d 40 ff fb | @ | MOVE.B D0,(A6-0x5) 00020b3e 55 4f |UO | SUBQ.L #0x2,A7 00020b40 48 78 01 05 |Hx | PEA.L 0x105 00020b44 4e 90 |N | JSR (A0) 00020b46 58 4f |XO | ADDQ.L #0x4,A7 00020b48 30 1f |0 | MOVE.W (A7)+,D0 00020b4a 41 81 |A | CHK.W D1,D0 00020b4c 1d 40 ff fc | @ | MOVE.B D0,(A6-0x4) 00020b50 55 4f |UO | SUBQ.L #0x2,A7 00020b52 48 78 01 06 |Hx | PEA.L 0x106 00020b56 4e 90 |N | JSR (A0) 00020b58 58 4f |XO | ADDQ.L #0x4,A7 00020b5a 30 1f |0 | MOVE.W (A7)+,D0 00020b5c 41 81 |A | CHK.W D1,D0 00020b5e 1d 40 ff fd | @ | MOVE.B D0,(A6-0x3) 00020b62 55 4f |UO | SUBQ.L #0x2,A7 00020b64 48 78 01 07 |Hx | PEA.L 0x107 00020b68 4e 90 |N | JSR (A0) 00020b6a 58 4f |XO | ADDQ.L #0x4,A7 00020b6c 30 1f |0 | MOVE.W (A7)+,D0 00020b6e 41 81 |A | CHK.W D1,D0 00020b70 1d 40 ff fe | @ | MOVE.B D0,(A6-0x2) 00020b74 42 2e ff ff |B. | CLR.B (A6-0x1) 00020b78 2f 2e ff fc |/. | MOVE.L (A6-0x4),-(A7) 00020b7c 2f 2e ff f8 |/. | MOVE.L (A6-0x8),-(A7) 00020b80 48 57 |HW | PEA.L (A7) 00020b82 48 78 00 00 |Hx | PEA.L 0x0 00020b86 48 78 00 07 |Hx | PEA.L 0x7 00020b8a 48 79 00 02 41 fa |Hy A | PEA.L 0x241fa 00020b90 4e b9 00 01 04 b4 |N | JSR ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q) 00020b96 de fc 00 18 | | ADDA.W #0x18,A7 00020b9a 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00020b9e 4e 5e |N^ | UNLK A6 00020ba0 4e 75 |Nu | RTS 00020ba2 ; -------------------------------------------------------------------------------------- 00020ba2 ; OMSI PASCAL Function 00020ba2 ; -------------------------------------------------------------------------------------- 00020ba2 4e 56 ff dc |NV | LINK.W A6,#0xffdc 00020ba6 bf d5 | | CMPA.L (A5),A7 00020ba8 62 06 |b | BHI 0x20bb0 00020baa 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020bae 4e 76 |Nv | TRAPV 00020bb0 de fc 00 20 | | ADDA.W #0x20,A7 00020bb4 48 e7 c1 c0 |H | MOVEM.L A1+A0+D7+D1+D0,-(A7) 00020bb8 43 fa fd e0 |C | LEA.L 0x2099a,A1 00020bbc 72 0f |r | MOVEQ.L #0x0f,D1 00020bbe 7e 00 |~ | MOVEQ.L #0x00,D7 00020bc0 10 07 | | MOVE.B D7,D0 00020bc2 48 80 |H | EXTB.W D0 00020bc4 e7 40 | @ | ASL.W #0x3,D0 00020bc6 41 f9 00 02 3e 90 |A > | LEA.L 0x23e90,A0 00020bcc 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00020bd0 21 7a f9 d8 03 4a |!z J | MOVE.L 0x205aa,(A0+0x34a) 00020bd6 21 7a f9 d6 03 4e |!z N | MOVE.L 0x205ae,(A0+0x34e) 00020bdc 52 07 |R | ADDQ.B #0x1,D7 00020bde be 01 | | CMP.B D1,D7 00020be0 6f de |o | BLE 0x20bc0 00020be2 4e ba fe f2 |N | JSR 0x20ad6 00020be6 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020bea 4e 91 |N | JSR (A1) 00020bec 1e bc 00 03 | | MOVE.B #0x03,(A7) 00020bf0 4e 91 |N | JSR (A1) 00020bf2 1e bc 00 06 | | MOVE.B #0x06,(A7) 00020bf6 4e 91 |N | JSR (A1) 00020bf8 1e bc 00 07 | | MOVE.B #0x07,(A7) 00020bfc 4e 91 |N | JSR (A1) 00020bfe 54 4f |TO | ADDQ.L #0x2,A7 00020c00 7e 0c |~ | MOVEQ.L #0x0c,D7 00020c02 55 4f |UO | SUBQ.L #0x2,A7 00020c04 1f 07 | | MOVE.B D7,-(A7) 00020c06 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00020c0c 54 4f |TO | ADDQ.L #0x2,A7 00020c0e 4a 1f |J | TST.B (A7)+ 00020c10 67 06 |g | BEQ 0x20c18 00020c12 1f 07 | | MOVE.B D7,-(A7) 00020c14 4e 91 |N | JSR (A1) 00020c16 54 4f |TO | ADDQ.L #0x2,A7 00020c18 52 07 |R | ADDQ.B #0x1,D7 00020c1a be 01 | | CMP.B D1,D7 00020c1c 6f e4 |o | BLE 0x20c02 00020c1e 4c df 03 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1 00020c22 4e 5e |N^ | UNLK A6 00020c24 4e 75 |Nu | RTS 00020c26 ; -------------------------------------------------------------------------------------- 00020c26 ; OMSI PASCAL Function 00020c26 ; <LVAR 0x008 4(r)> 00020c26 ; <LVAR -0x004 1(rw)> 00020c26 ; -------------------------------------------------------------------------------------- 00020c26 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 00020c2a bf d5 | | CMPA.L (A5),A7 00020c2c 62 06 |b | BHI 0x20c34 00020c2e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020c32 4e 76 |Nv | TRAPV 00020c34 de fc 00 28 | ( | ADDA.W #0x28,A7 00020c38 48 e7 e1 c0 |H | MOVEM.L A1+A0+D7+D2+D1+D0,-(A7) 00020c3c 43 ee ff fc |C | LEA.L (A6-0x4),A1 00020c40 72 01 |r | MOVEQ.L #0x01,D1 00020c42 74 0f |t | MOVEQ.L #0x0f,D2 00020c44 1f 3c 00 05 | < | MOVE.B #0x05,-(A7) 00020c48 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020c4c 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 00020c52 58 4f |XO | ADDQ.L #0x4,A7 00020c54 10 39 00 02 41 bf | 9 A | MOVE.B 0x241bf,D0 00020c5a ee 08 | | LSR.B #0x7,D0 00020c5c 66 38 |f8 | BNE 0x20c96 00020c5e 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020c62 10 81 | | MOVE.B D1,(A0) 00020c64 55 4f |UO | SUBQ.L #0x2,A7 00020c66 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00020c6c 4a 1f |J | TST.B (A7)+ 00020c6e 67 08 |g | BEQ 0x20c78 00020c70 4e b9 00 02 32 ee |N 2 | JSR exp_LOAD_HRAM_8_0.FIU() 00020c76 60 06 |` | BRA 0x20c7e 00020c78 4e b9 00 02 33 0c |N 3 | JSR exp_LOAD_HRAM_32_0.FIU() 00020c7e 4e b9 00 02 33 8a |N 3 | JSR exp_LOAD_HRAM_1.FIU() 00020c84 4e b9 00 02 35 aa |N 5 | JSR exp_ALIGN_CSA.VAL() 00020c8a 4e b9 00 02 35 14 |N 5 | JSR exp_ALIGN_CSA.TYP() 00020c90 4e b9 00 01 05 c2 |N | JSR Or_fc0c_80(void) 00020c96 42 11 |B | CLR.B (A1) 00020c98 7e 0c |~ | MOVEQ.L #0x0c,D7 00020c9a 55 4f |UO | SUBQ.L #0x2,A7 00020c9c 1f 07 | | MOVE.B D7,-(A7) 00020c9e 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00020ca4 54 4f |TO | ADDQ.L #0x2,A7 00020ca6 4a 1f |J | TST.B (A7)+ 00020ca8 67 0c |g | BEQ 0x20cb6 00020caa 42 80 |B | CLR.L D0 00020cac 10 11 | | MOVE.B (A1),D0 00020cae 52 40 |R@ | ADDQ.W #0x1,D0 00020cb0 41 bc 00 ff |A | CHK.W #0xff,D0 00020cb4 12 80 | | MOVE.B D0,(A1) 00020cb6 52 07 |R | ADDQ.B #0x1,D7 00020cb8 be 02 | | CMP.B D2,D7 00020cba 6f de |o | BLE 0x20c9a 00020cbc 7e 0c |~ | MOVEQ.L #0x0c,D7 00020cbe 55 4f |UO | SUBQ.L #0x2,A7 00020cc0 1f 07 | | MOVE.B D7,-(A7) 00020cc2 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00020cc8 54 4f |TO | ADDQ.L #0x2,A7 00020cca 4a 1f |J | TST.B (A7)+ 00020ccc 67 42 |gB | BEQ 0x20d10 00020cce 1f 07 | | MOVE.B D7,-(A7) 00020cd0 55 4f |UO | SUBQ.L #0x2,A7 00020cd2 1f 07 | | MOVE.B D7,-(A7) 00020cd4 4e b9 00 01 04 c6 |N | JSR EQ_1c218(a : Byte) : Bool 00020cda 54 4f |TO | ADDQ.L #0x2,A7 00020cdc 10 17 | | MOVE.B (A7),D0 00020cde 48 80 |H | EXTB.W D0 00020ce0 41 81 |A | CHK.W D1,D0 00020ce2 1e 80 | | MOVE.B D0,(A7) 00020ce4 55 4f |UO | SUBQ.L #0x2,A7 00020ce6 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00020cec 10 17 | | MOVE.B (A7),D0 00020cee 48 80 |H | EXTB.W D0 00020cf0 41 81 |A | CHK.W D1,D0 00020cf2 1e 80 | | MOVE.B D0,(A7) 00020cf4 1f 11 | | MOVE.B (A1),-(A7) 00020cf6 4e b9 00 02 38 6c |N 8l | JSR 0x2386c 00020cfc 5c 4f |\O | ADDQ.L #0x6,A7 00020cfe 1e 87 | | MOVE.B D7,(A7) 00020d00 4e b9 00 02 39 54 |N 9T | JSR 0x23954 00020d06 1e 87 | | MOVE.B D7,(A7) 00020d08 4e b9 00 02 3a 08 |N : | JSR 0x23a08 00020d0e 54 4f |TO | ADDQ.L #0x2,A7 00020d10 52 07 |R | ADDQ.B #0x1,D7 00020d12 be 02 | | CMP.B D2,D7 00020d14 6f a8 |o | BLE 0x20cbe 00020d16 4e b9 00 02 33 de |N 3 | JSR exp_CLEAR_PARITY.FIU() 00020d1c 4e b9 00 02 35 8c |N 5 | JSR exp_CLEAR_PARITY.VAL() 00020d22 4e b9 00 02 34 f6 |N 4 | JSR exp_CLEAR_PARITY.TYP() 00020d28 4e b9 00 02 34 58 |N 4X | JSR exp_CLEAR_PARITY.SEQ() 00020d2e 4e b9 00 01 05 b0 |N | JSR FifoInit(void) 00020d34 4c df 03 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1 00020d38 4e 5e |N^ | UNLK A6 00020d3a 4e 75 |Nu | RTS 00020d3c ; -------------------------------------------------------------------------------------- 00020d3c ; OMSI PASCAL Function 00020d3c ; <LVAR 0x014 4(r)> 00020d3c ; <LVAR 0x010 4(r)> 00020d3c ; <LVAR 0x00c @ 4(r)> 00020d3c ; <LVAR 0x008 @ 4(r)> 00020d3c ; <LVAR -0x004 @ 4(rw)> 00020d3c ; <LVAR -0x006 @> 00020d3c ; <LVAR -0x025 1(rw)> 00020d3c ; <LVAR -0x026 @> 00020d3c ; <LVAR -0x02a @> 00020d3c ; <LVAR -0x02c @ 1(r)> 00020d3c ; -------------------------------------------------------------------------------------- 00020d3c 4e 56 ff 60 |NV ` | LINK.W A6,#0xff60 00020d40 bf d5 | | CMPA.L (A5),A7 00020d42 62 06 |b | BHI 0x20d4a 00020d44 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020d48 4e 76 |Nv | TRAPV 00020d4a de fc 00 74 | t | ADDA.W #0x74,A7 00020d4e 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00020d52 45 ee ff fc |E | LEA.L (A6-0x4),A2 00020d56 47 ee ff fa |G | LEA.L (A6-0x6),A3 00020d5a 49 f9 00 01 02 c4 |I | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A4 00020d60 72 01 |r | MOVEQ.L #0x01,D1 00020d62 74 1e |t | MOVEQ.L #0x1e,D2 00020d64 76 0c |v | MOVEQ.L #0x0c,D3 00020d66 78 02 |x | MOVEQ.L #0x02,D4 00020d68 7a 10 |z | MOVEQ.L #0x10,D5 00020d6a 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00020d6e 4a 10 |J | TST.B (A0) 00020d70 67 12 |g | BEQ 0x20d84 00020d72 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00020d76 43 ee ff da |C | LEA.L (A6-0x26),A1 00020d7a 70 1f |p | MOVEQ.L #0x1f,D0 00020d7c 12 d8 | | MOVE.B (A0)+,(A1)+ 00020d7e 51 c8 ff fc |Q | DBF D0,0x20d7c 00020d82 60 0c |` | BRA 0x20d90 00020d84 43 ee ff da |C | LEA.L (A6-0x26),A1 00020d88 70 1f |p | MOVEQ.L #0x1f,D0 00020d8a 12 d8 | | MOVE.B (A0)+,(A1)+ 00020d8c 51 c8 ff fc |Q | DBF D0,0x20d8a 00020d90 4a 2e ff db |J. | TST.B (A6-0x25) 00020d94 66 0c |f | BNE 0x20da2 00020d96 20 4b | K | MOVEA.L A3,A0 00020d98 70 0e |p | MOVEQ.L #0x0e,D0 00020d9a 3f 20 |? | MOVE.W -(A0),-(A7) 00020d9c 51 c8 ff fc |Q | DBF D0,0x20d9a 00020da0 60 74 |`t | BRA 0x20e16 00020da2 3f 3a f3 be |?: | MOVE.W 0x20162,-(A7) 00020da6 20 4b | K | MOVEA.L A3,A0 00020da8 70 0e |p | MOVEQ.L #0x0e,D0 00020daa 3f 20 |? | MOVE.W -(A0),-(A7) 00020dac 51 c8 ff fc |Q | DBF D0,0x20daa 00020db0 2f 3a f3 b2 |/: | MOVE.L 0x20164,-(A7) 00020db4 9e c3 | | SUBA.W D3,A7 00020db6 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00020dba 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00020dc0 48 6f 00 32 |Ho 2 | PEA.L (A7+0x32) 00020dc4 3f 01 |? | MOVE.W D1,-(A7) 00020dc6 3f 04 |? | MOVE.W D4,-(A7) 00020dc8 4e 94 |N | JSR (A4) 00020dca 58 4f |XO | ADDQ.L #0x4,A7 00020dcc 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00020dd0 3f 01 |? | MOVE.W D1,-(A7) 00020dd2 3f 02 |? | MOVE.W D2,-(A7) 00020dd4 4e 94 |N | JSR (A4) 00020dd6 58 4f |XO | ADDQ.L #0x4,A7 00020dd8 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00020ddc 3f 01 |? | MOVE.W D1,-(A7) 00020dde 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020de2 4e 94 |N | JSR (A4) 00020de4 50 4f |PO | ADDQ.L #0x8,A7 00020de6 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00020dec de c5 | | ADDA.W D5,A7 00020dee 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00020df4 58 4f |XO | ADDQ.L #0x4,A7 00020df6 24 9f |$ | MOVE.L (A7)+,(A2) 00020df8 de fc 00 24 | $ | ADDA.W #0x24,A7 00020dfc 20 52 | R | MOVEA.L (A2),A0 00020dfe 4a 50 |JP | TST.W (A0) 00020e00 66 26 |f& | BNE 0x20e28 00020e02 48 52 |HR | PEA.L (A2) 00020e04 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020e0a 58 4f |XO | ADDQ.L #0x4,A7 00020e0c 20 4b | K | MOVEA.L A3,A0 00020e0e 70 0e |p | MOVEQ.L #0x0e,D0 00020e10 3f 20 |? | MOVE.W -(A0),-(A7) 00020e12 51 c8 ff fc |Q | DBF D0,0x20e10 00020e16 59 4f |YO | SUBQ.L #0x4,A7 00020e18 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020e1c 3f 01 |? | MOVE.W D1,-(A7) 00020e1e 3f 02 |? | MOVE.W D2,-(A7) 00020e20 4e 94 |N | JSR (A4) 00020e22 50 4f |PO | ADDQ.L #0x8,A7 00020e24 24 9f |$ | MOVE.L (A7)+,(A2) 00020e26 de c2 | | ADDA.W D2,A7 00020e28 59 4f |YO | SUBQ.L #0x4,A7 00020e2a 2f 12 |/ | MOVE.L (A2),-(A7) 00020e2c 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00020e32 58 4f |XO | ADDQ.L #0x4,A7 00020e34 24 97 |$ | MOVE.L (A7),(A2) 00020e36 2f 12 |/ | MOVE.L (A2),-(A7) 00020e38 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020e3c 4e b9 00 01 03 00 |N | JSR FSCALL_10300 00020e42 50 4f |PO | ADDQ.L #0x8,A7 00020e44 4a 9f |J | TST.L (A7)+ 00020e46 66 1c |f | BNE 0x20e64 00020e48 59 4f |YO | SUBQ.L #0x4,A7 00020e4a 2f 12 |/ | MOVE.L (A2),-(A7) 00020e4c 59 4f |YO | SUBQ.L #0x4,A7 00020e4e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020e52 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00020e58 58 4f |XO | ADDQ.L #0x4,A7 00020e5a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020e60 50 4f |PO | ADDQ.L #0x8,A7 00020e62 24 9f |$ | MOVE.L (A7)+,(A2) 00020e64 2f 12 |/ | MOVE.L (A2),-(A7) 00020e66 42 27 |B' | CLR.B -(A7) 00020e68 1f 01 | | MOVE.B D1,-(A7) 00020e6a 48 78 00 00 |Hx | PEA.L 0x0 00020e6e 48 6e ff d4 |Hn | PEA.L (A6-0x2c) 00020e72 48 6e ff d6 |Hn | PEA.L (A6-0x2a) 00020e76 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00020e7c de fc 00 14 | | ADDA.W #0x14,A7 00020e80 4a 2e ff d4 |J. | TST.B (A6-0x2c) 00020e84 66 1a |f | BNE 0x20ea0 00020e86 42 27 |B' | CLR.B -(A7) 00020e88 1f 04 | | MOVE.B D4,-(A7) 00020e8a 48 78 00 01 |Hx | PEA.L 0x1 00020e8e 48 6e ff d4 |Hn | PEA.L (A6-0x2c) 00020e92 48 6e ff d6 |Hn | PEA.L (A6-0x2a) 00020e96 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00020e9c de c5 | | ADDA.W D5,A7 00020e9e 60 12 |` | BRA 0x20eb2 00020ea0 48 52 |HR | PEA.L (A2) 00020ea2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020ea8 58 4f |XO | ADDQ.L #0x4,A7 00020eaa 1d 41 ff db | A | MOVE.B D1,(A6-0x25) 00020eae 60 00 fe e0 |` | BRA 0x20d90 00020eb2 2f 12 |/ | MOVE.L (A2),-(A7) 00020eb4 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00020eb8 48 68 00 02 |Hh | PEA.L (A0+0x2) 00020ebc 48 53 |HS | PEA.L (A3) 00020ebe 4e b9 00 01 05 8c |N | JSR FSCALL_1058c 00020ec4 de c3 | | ADDA.W D3,A7 00020ec6 48 6e 00 0c |Hn | PEA.L (A6+0xc) 00020eca 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020ed0 58 4f |XO | ADDQ.L #0x4,A7 00020ed2 48 6e 00 08 |Hn | PEA.L (A6+0x8) 00020ed6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020edc 58 4f |XO | ADDQ.L #0x4,A7 00020ede 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00020ee2 4e 5e |N^ | UNLK A6 00020ee4 4e 75 |Nu | RTS 00020ee6 ; -------------------------------------------------------------------------------------- 00020ee6 ; OMSI PASCAL Function 00020ee6 ; <LVAR 0x008 1(r)> 00020ee6 ; <LVAR -0x002 @> 00020ee6 ; -------------------------------------------------------------------------------------- 00020ee6 4e 56 ff b0 |NV | LINK.W A6,#0xffb0 00020eea bf d5 | | CMPA.L (A5),A7 00020eec 62 06 |b | BHI 0x20ef4 00020eee 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020ef2 4e 76 |Nv | TRAPV 00020ef4 de fc 00 4e | N | ADDA.W #0x4e,A7 00020ef8 48 e7 e0 e0 |H | MOVEM.L A2+A1+A0+D2+D1+D0,-(A7) 00020efc 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00020f02 72 01 |r | MOVEQ.L #0x01,D1 00020f04 74 0c |t | MOVEQ.L #0x0c,D2 00020f06 41 fa f2 6e |A n | LEA.L 0x20176,A0 00020f0a 70 06 |p | MOVEQ.L #0x06,D0 00020f0c 3f 20 |? | MOVE.W -(A0),-(A7) 00020f0e 51 c8 ff fc |Q | DBF D0,0x20f0c 00020f12 9e c2 | | SUBA.W D2,A7 00020f14 20 4f | O | MOVEA.L A7,A0 00020f16 43 fa f2 5e |C ^ | LEA.L 0x20176,A1 00020f1a 70 0a |p | MOVEQ.L #0x0a,D0 00020f1c 10 d9 | | MOVE.B (A1)+,(A0)+ 00020f1e 51 c8 ff fc |Q | DBF D0,0x20f1c 00020f22 48 79 00 02 3e cb |Hy > | PEA.L 0x23ecb 00020f28 48 79 00 02 40 5d |Hy @] | PEA.L 0x2405d 00020f2e 59 4f |YO | SUBQ.L #0x4,A7 00020f30 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00020f34 3f 01 |? | MOVE.W D1,-(A7) 00020f36 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00020f3a 4e 92 |N | JSR (A2) 00020f3c 58 4f |XO | ADDQ.L #0x4,A7 00020f3e 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00020f42 3f 01 |? | MOVE.W D1,-(A7) 00020f44 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00020f48 4e 92 |N | JSR (A2) 00020f4a 50 4f |PO | ADDQ.L #0x8,A7 00020f4c 4e ba fd ee |N | JSR 0x20d3c 00020f50 de c2 | | ADDA.W D2,A7 00020f52 20 4f | O | MOVEA.L A7,A0 00020f54 43 f9 00 02 3e cd |C > | LEA.L 0x23ecd,A1 00020f5a 70 1d |p | MOVEQ.L #0x1d,D0 00020f5c 10 d9 | | MOVE.B (A1)+,(A0)+ 00020f5e 51 c8 ff fc |Q | DBF D0,0x20f5c 00020f62 42 27 |B' | CLR.B -(A7) 00020f64 59 4f |YO | SUBQ.L #0x4,A7 00020f66 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020f6a 3f 01 |? | MOVE.W D1,-(A7) 00020f6c 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00020f70 4e 92 |N | JSR (A2) 00020f72 5c 4f |\O | ADDQ.L #0x6,A7 00020f74 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00020f78 1f 01 | | MOVE.B D1,-(A7) 00020f7a 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00020f7e 48 6e ff fe |Hn | PEA.L (A6-0x2) 00020f82 4e ba f7 1a |N | JSR 0x2069e 00020f86 de fc 00 2e | . | ADDA.W #0x2e,A7 00020f8a 4c df 07 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2 00020f8e 4e 5e |N^ | UNLK A6 00020f90 4e 75 |Nu | RTS 00020f92 ; -------------------------------------------------------------------------------------- 00020f92 ; OMSI PASCAL Function 00020f92 ; <LVAR -0x004 1(rw)> 00020f92 ; -------------------------------------------------------------------------------------- 00020f92 4e 56 ff cc |NV | LINK.W A6,#0xffcc 00020f96 bf d5 | | CMPA.L (A5),A7 00020f98 62 06 |b | BHI 0x20fa0 00020f9a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020f9e 4e 76 |Nv | TRAPV 00020fa0 de fc 00 30 | 0 | ADDA.W #0x30,A7 00020fa4 48 e7 f8 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7) 00020fa8 41 f9 00 01 04 c0 |A | LEA.L HasBoard(diproc_addr: Byte) : Byte,A0 00020fae 43 ee ff fc |C | LEA.L (A6-0x4),A1 00020fb2 45 f9 00 02 36 f8 |E 6 | LEA.L 0x236f8,A2 00020fb8 47 f9 00 02 3a b2 |G : | LEA.L 0x23ab2,A3 00020fbe 49 f9 00 02 3a 08 |I : | LEA.L 0x23a08,A4 00020fc4 70 0c |p | MOVEQ.L #0x0c,D0 00020fc6 72 0d |r | MOVEQ.L #0x0d,D1 00020fc8 74 0e |t | MOVEQ.L #0x0e,D2 00020fca 76 0f |v | MOVEQ.L #0x0f,D3 00020fcc 38 3c 01 45 |8< E | MOVE.W #0x145,D4 00020fd0 4e b9 00 02 34 d4 |N 4 | JSR exp_LOAD_BENIGN_UWORD.TYP() 00020fd6 55 4f |UO | SUBQ.L #0x2,A7 00020fd8 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00020fde 4a 1f |J | TST.B (A7)+ 00020fe0 67 04 |g | BEQ 0x20fe6 00020fe2 42 11 |B | CLR.B (A1) 00020fe4 60 04 |` | BRA 0x20fea 00020fe6 12 bc 00 ff | | MOVE.B #0xff,(A1) 00020fea 55 4f |UO | SUBQ.L #0x2,A7 00020fec 1f 00 | | MOVE.B D0,-(A7) 00020fee 4e 90 |N | JSR (A0) 00020ff0 54 4f |TO | ADDQ.L #0x2,A7 00020ff2 4a 1f |J | TST.B (A7)+ 00020ff4 67 08 |g | BEQ 0x20ffe 00020ff6 1f 00 | | MOVE.B D0,-(A7) 00020ff8 1f 11 | | MOVE.B (A1),-(A7) 00020ffa 4e 92 |N | JSR (A2) 00020ffc 58 4f |XO | ADDQ.L #0x4,A7 00020ffe 55 4f |UO | SUBQ.L #0x2,A7 00021000 1f 01 | | MOVE.B D1,-(A7) 00021002 4e 90 |N | JSR (A0) 00021004 54 4f |TO | ADDQ.L #0x2,A7 00021006 4a 1f |J | TST.B (A7)+ 00021008 67 08 |g | BEQ 0x21012 0002100a 1f 01 | | MOVE.B D1,-(A7) 0002100c 1f 11 | | MOVE.B (A1),-(A7) 0002100e 4e 92 |N | JSR (A2) 00021010 58 4f |XO | ADDQ.L #0x4,A7 00021012 55 4f |UO | SUBQ.L #0x2,A7 00021014 1f 02 | | MOVE.B D2,-(A7) 00021016 4e 90 |N | JSR (A0) 00021018 54 4f |TO | ADDQ.L #0x2,A7 0002101a 4a 1f |J | TST.B (A7)+ 0002101c 67 08 |g | BEQ 0x21026 0002101e 1f 02 | | MOVE.B D2,-(A7) 00021020 1f 11 | | MOVE.B (A1),-(A7) 00021022 4e 92 |N | JSR (A2) 00021024 58 4f |XO | ADDQ.L #0x4,A7 00021026 55 4f |UO | SUBQ.L #0x2,A7 00021028 1f 03 | | MOVE.B D3,-(A7) 0002102a 4e 90 |N | JSR (A0) 0002102c 54 4f |TO | ADDQ.L #0x2,A7 0002102e 4a 1f |J | TST.B (A7)+ 00021030 67 08 |g | BEQ 0x2103a 00021032 1f 03 | | MOVE.B D3,-(A7) 00021034 1f 11 | | MOVE.B (A1),-(A7) 00021036 4e 92 |N | JSR (A2) 00021038 58 4f |XO | ADDQ.L #0x4,A7 0002103a 4e b9 00 02 33 a6 |N 3 | JSR exp_INIT_MRU.FIU() 00021040 55 4f |UO | SUBQ.L #0x2,A7 00021042 1f 00 | | MOVE.B D0,-(A7) 00021044 4e 90 |N | JSR (A0) 00021046 54 4f |TO | ADDQ.L #0x2,A7 00021048 4a 1f |J | TST.B (A7)+ 0002104a 67 06 |g | BEQ 0x21052 0002104c 1f 00 | | MOVE.B D0,-(A7) 0002104e 4e 93 |N | JSR (A3) 00021050 54 4f |TO | ADDQ.L #0x2,A7 00021052 55 4f |UO | SUBQ.L #0x2,A7 00021054 1f 01 | | MOVE.B D1,-(A7) 00021056 4e 90 |N | JSR (A0) 00021058 54 4f |TO | ADDQ.L #0x2,A7 0002105a 4a 1f |J | TST.B (A7)+ 0002105c 67 06 |g | BEQ 0x21064 0002105e 1f 01 | | MOVE.B D1,-(A7) 00021060 4e 93 |N | JSR (A3) 00021062 54 4f |TO | ADDQ.L #0x2,A7 00021064 55 4f |UO | SUBQ.L #0x2,A7 00021066 1f 02 | | MOVE.B D2,-(A7) 00021068 4e 90 |N | JSR (A0) 0002106a 54 4f |TO | ADDQ.L #0x2,A7 0002106c 4a 1f |J | TST.B (A7)+ 0002106e 67 06 |g | BEQ 0x21076 00021070 1f 02 | | MOVE.B D2,-(A7) 00021072 4e 93 |N | JSR (A3) 00021074 54 4f |TO | ADDQ.L #0x2,A7 00021076 55 4f |UO | SUBQ.L #0x2,A7 00021078 1f 03 | | MOVE.B D3,-(A7) 0002107a 4e 90 |N | JSR (A0) 0002107c 54 4f |TO | ADDQ.L #0x2,A7 0002107e 4a 1f |J | TST.B (A7)+ 00021080 67 06 |g | BEQ 0x21088 00021082 1f 03 | | MOVE.B D3,-(A7) 00021084 4e 93 |N | JSR (A3) 00021086 54 4f |TO | ADDQ.L #0x2,A7 00021088 3f 04 |? | MOVE.W D4,-(A7) 0002108a 4e b9 00 02 34 ba |N 4 | JSR exp_PREP_RUN.TYP(Sw_2) 00021090 3e 84 |> | MOVE.W D4,(A7) 00021092 4e b9 00 02 35 72 |N 5r | JSR exp_PREP_RUN.VAL(Sw_2) 00021098 3e 84 |> | MOVE.W D4,(A7) 0002109a 4e b9 00 02 3b 50 |N ;P | JSR exp_PREP_RUN.IOC(Sw_2) 000210a0 3e 84 |> | MOVE.W D4,(A7) 000210a2 4e b9 00 02 34 3e |N 4> | JSR exp_PREP_RUN.SEQ(Sw_2) 000210a8 3e 84 |> | MOVE.W D4,(A7) 000210aa 4e b9 00 02 33 70 |N 3p | JSR exp_PREP_RUN.FIU(Sw_2) 000210b0 1f 00 | | MOVE.B D0,-(A7) 000210b2 4e 90 |N | JSR (A0) 000210b4 54 4f |TO | ADDQ.L #0x2,A7 000210b6 4a 1f |J | TST.B (A7)+ 000210b8 67 06 |g | BEQ 0x210c0 000210ba 1f 00 | | MOVE.B D0,-(A7) 000210bc 4e 94 |N | JSR (A4) 000210be 54 4f |TO | ADDQ.L #0x2,A7 000210c0 55 4f |UO | SUBQ.L #0x2,A7 000210c2 1f 01 | | MOVE.B D1,-(A7) 000210c4 4e 90 |N | JSR (A0) 000210c6 54 4f |TO | ADDQ.L #0x2,A7 000210c8 4a 1f |J | TST.B (A7)+ 000210ca 67 06 |g | BEQ 0x210d2 000210cc 1f 01 | | MOVE.B D1,-(A7) 000210ce 4e 94 |N | JSR (A4) 000210d0 54 4f |TO | ADDQ.L #0x2,A7 000210d2 55 4f |UO | SUBQ.L #0x2,A7 000210d4 1f 02 | | MOVE.B D2,-(A7) 000210d6 4e 90 |N | JSR (A0) 000210d8 54 4f |TO | ADDQ.L #0x2,A7 000210da 4a 1f |J | TST.B (A7)+ 000210dc 67 06 |g | BEQ 0x210e4 000210de 1f 02 | | MOVE.B D2,-(A7) 000210e0 4e 94 |N | JSR (A4) 000210e2 54 4f |TO | ADDQ.L #0x2,A7 000210e4 55 4f |UO | SUBQ.L #0x2,A7 000210e6 1f 03 | | MOVE.B D3,-(A7) 000210e8 4e 90 |N | JSR (A0) 000210ea 54 4f |TO | ADDQ.L #0x2,A7 000210ec 4a 1f |J | TST.B (A7)+ 000210ee 67 06 |g | BEQ 0x210f6 000210f0 1f 03 | | MOVE.B D3,-(A7) 000210f2 4e 94 |N | JSR (A4) 000210f4 54 4f |TO | ADDQ.L #0x2,A7 000210f6 4c df 1f 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4 000210fa 4e 5e |N^ | UNLK A6 000210fc 4e 75 |Nu | RTS 000210fe ; -------------------------------------------------------------------------------------- 000210fe ; OMSI PASCAL Function 000210fe ; <LVAR -0x002 @ 2(w)> 000210fe ; <LVAR -0x004 @> 000210fe ; -------------------------------------------------------------------------------------- 000210fe 4e 56 ff 84 |NV | LINK.W A6,#0xff84 00021102 bf d5 | | CMPA.L (A5),A7 00021104 62 06 |b | BHI 0x2110c 00021106 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002110a 4e 76 |Nv | TRAPV 0002110c de fc 00 78 | x | ADDA.W #0x78,A7 00021110 48 e7 fe e0 |H | MOVEM.L A2+A1+A0+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021114 43 f9 00 01 04 c0 |C | LEA.L HasBoard(diproc_addr: Byte) : Byte,A1 0002111a 45 f9 00 02 37 be |E 7 | LEA.L 0x237be,A2 00021120 72 01 |r | MOVEQ.L #0x01,D1 00021122 74 3a |t: | MOVEQ.L #0x3a,D2 00021124 76 0c |v | MOVEQ.L #0x0c,D3 00021126 78 0d |x | MOVEQ.L #0x0d,D4 00021128 7a 0e |z | MOVEQ.L #0x0e,D5 0002112a 7c 0f || | MOVEQ.L #0x0f,D6 0002112c 4e ba fe 64 |N d | JSR 0x20f92 00021130 4a 39 00 02 3e 9e |J9 > | TST.B 0x23e9e 00021136 67 6c |gl | BEQ 0x211a4 00021138 41 fa f0 82 |A | LEA.L 0x201bc,A0 0002113c 70 1c |p | MOVEQ.L #0x1c,D0 0002113e 3f 20 |? | MOVE.W -(A0),-(A7) 00021140 51 c8 ff fc |Q | DBF D0,0x2113e 00021144 5d 4f |]O | SUBQ.L #0x6,A7 00021146 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002114a 3f 01 |? | MOVE.W D1,-(A7) 0002114c 3f 02 |? | MOVE.W D2,-(A7) 0002114e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021154 5c 4f |\O | ADDQ.L #0x6,A7 00021156 42 17 |B | CLR.B (A7) 00021158 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 0002115e 5c 4f |\O | ADDQ.L #0x6,A7 00021160 4a 1f |J | TST.B (A7)+ 00021162 67 3e |g> | BEQ 0x211a2 00021164 59 4f |YO | SUBQ.L #0x4,A7 00021166 1e ba f0 54 | T | MOVE.B 0x201bc,(A7) 0002116a 1f 7a f0 51 00 01 | z Q | MOVE.B 0x201bd,(A7+0x1) 00021170 1f 7a f0 4c 00 02 | z L | MOVE.B 0x201be,(A7+0x2) 00021176 59 4f |YO | SUBQ.L #0x4,A7 00021178 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002117c 3f 01 |? | MOVE.W D1,-(A7) 0002117e 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00021182 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021188 50 4f |PO | ADDQ.L #0x8,A7 0002118a 48 78 00 01 |Hx | PEA.L 0x1 0002118e 1f 01 | | MOVE.B D1,-(A7) 00021190 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021194 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 0002119a de fc 00 12 | | ADDA.W #0x12,A7 0002119e 4e ba fd f2 |N | JSR 0x20f92 000211a2 de c2 | | ADDA.W D2,A7 000211a4 4e b9 00 02 33 c0 |N 3 | JSR exp_FREEZE_WORLD.FIU() 000211aa 4e b9 00 02 34 9e |N 4 | JSR exp_RUN_NORMAL.TYP() 000211b0 4e b9 00 02 35 56 |N 5V | JSR exp_RUN_NORMAL.VAL() 000211b6 4e b9 00 02 34 24 |N 4$ | JSR exp_RUN_CHECK.SEQ() 000211bc 4e b9 00 02 3b 36 |N ;6 | JSR exp_RUN_CHECK.IOC() 000211c2 55 4f |UO | SUBQ.L #0x2,A7 000211c4 1f 03 | | MOVE.B D3,-(A7) 000211c6 4e 91 |N | JSR (A1) 000211c8 54 4f |TO | ADDQ.L #0x2,A7 000211ca 4a 1f |J | TST.B (A7)+ 000211cc 67 06 |g | BEQ 0x211d4 000211ce 1f 03 | | MOVE.B D3,-(A7) 000211d0 4e 92 |N | JSR (A2) 000211d2 54 4f |TO | ADDQ.L #0x2,A7 000211d4 55 4f |UO | SUBQ.L #0x2,A7 000211d6 1f 04 | | MOVE.B D4,-(A7) 000211d8 4e 91 |N | JSR (A1) 000211da 54 4f |TO | ADDQ.L #0x2,A7 000211dc 4a 1f |J | TST.B (A7)+ 000211de 67 06 |g | BEQ 0x211e6 000211e0 1f 04 | | MOVE.B D4,-(A7) 000211e2 4e 92 |N | JSR (A2) 000211e4 54 4f |TO | ADDQ.L #0x2,A7 000211e6 55 4f |UO | SUBQ.L #0x2,A7 000211e8 1f 05 | | MOVE.B D5,-(A7) 000211ea 4e 91 |N | JSR (A1) 000211ec 54 4f |TO | ADDQ.L #0x2,A7 000211ee 4a 1f |J | TST.B (A7)+ 000211f0 67 06 |g | BEQ 0x211f8 000211f2 1f 05 | | MOVE.B D5,-(A7) 000211f4 4e 92 |N | JSR (A2) 000211f6 54 4f |TO | ADDQ.L #0x2,A7 000211f8 55 4f |UO | SUBQ.L #0x2,A7 000211fa 1f 06 | | MOVE.B D6,-(A7) 000211fc 4e 91 |N | JSR (A1) 000211fe 54 4f |TO | ADDQ.L #0x2,A7 00021200 4a 1f |J | TST.B (A7)+ 00021202 67 06 |g | BEQ 0x2120a 00021204 1f 06 | | MOVE.B D6,-(A7) 00021206 4e 92 |N | JSR (A2) 00021208 54 4f |TO | ADDQ.L #0x2,A7 0002120a 4e b9 00 02 33 2c |N 3, | JSR exp_RUN_NORMAL.FIU() 00021210 3d 41 ff fe |=A | MOVE.W D1,(A6-0x2) 00021214 41 ee ff fe |A | LEA.L (A6-0x2),A0 00021218 2f 08 |/ | MOVE.L A0,-(A7) 0002121a 52 97 |R | ADDQ.L #0x1,(A7) 0002121c 2f 3c 00 00 fc 10 |/< | MOVE.L #0xfc10,-(A7) 00021222 3f 01 |? | MOVE.W D1,-(A7) 00021224 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 0002122a 5c 4f |\O | ADDQ.L #0x6,A7 0002122c 2e bc 00 00 98 96 |. | MOVE.L #0x9896,(A7) 00021232 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 00021238 58 4f |XO | ADDQ.L #0x4,A7 0002123a 4c df 07 7f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+A0+A1+A2 0002123e 4e 5e |N^ | UNLK A6 00021240 4e 75 |Nu | RTS 00021242 ; -------------------------------------------------------------------------------------- 00021242 ; OMSI PASCAL Function 00021242 ; <LVAR 0x00c 1(w)> 00021242 ; <LVAR 0x008 4(r)> 00021242 ; <LVAR -0x00c @ 4(rw)> 00021242 ; -------------------------------------------------------------------------------------- 00021242 4e 56 ff a0 |NV | LINK.W A6,#0xffa0 00021246 bf d5 | | CMPA.L (A5),A7 00021248 62 06 |b | BHI 0x21250 0002124a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002124e 4e 76 |Nv | TRAPV 00021250 de fc 00 54 | T | ADDA.W #0x54,A7 00021254 48 e7 fb e0 |H | MOVEM.L A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7) 00021258 45 ee ff f4 |E | LEA.L (A6-0xc),A2 0002125c 72 0a |r | MOVEQ.L #0x0a,D1 0002125e 74 01 |t | MOVEQ.L #0x01,D2 00021260 7e 00 |~ | MOVEQ.L #0x00,D7 00021262 28 07 |( | MOVE.L D7,D4 00021264 76 0a |v | MOVEQ.L #0x0a,D3 00021266 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 0002126c 41 fa f3 44 |A D | LEA.L 0x205b2,A0 00021270 9e c1 | | SUBA.W D1,A7 00021272 22 4f |"O | MOVEA.L A7,A1 00021274 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0 00021278 70 09 |p | MOVEQ.L #0x09,D0 0002127a 12 d8 | | MOVE.B (A0)+,(A1)+ 0002127c 51 c8 ff fc |Q | DBF D0,0x2127a 00021280 59 4f |YO | SUBQ.L #0x4,A7 00021282 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021286 3f 02 |? | MOVE.W D2,-(A7) 00021288 3f 01 |? | MOVE.W D1,-(A7) 0002128a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021290 50 4f |PO | ADDQ.L #0x8,A7 00021292 24 9f |$ | MOVE.L (A7)+,(A2) 00021294 58 4f |XO | ADDQ.L #0x4,A7 00021296 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 0002129a 2f 12 |/ | MOVE.L (A2),-(A7) 0002129c 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000212a2 50 4f |PO | ADDQ.L #0x8,A7 000212a4 1c 1f | | MOVE.B (A7)+,D6 000212a6 48 52 |HR | PEA.L (A2) 000212a8 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000212ae 58 4f |XO | ADDQ.L #0x4,A7 000212b0 4a 06 |J | TST.B D6 000212b2 67 0c |g | BEQ 0x212c0 000212b4 41 fa f3 4c |A L | LEA.L 0x20602,A0 000212b8 1d 70 78 00 00 0c | px | MOVE.B (A0+D7.L),(A6+0xc) 000212be 60 4a |`J | BRA 0x2130a 000212c0 52 87 |R | ADDQ.L #0x1,D7 000212c2 0c 87 00 00 00 07 | | CMPI.L #0x00000007,D7 000212c8 6f 98 |o | BLE 0x21262 000212ca 9e fc 00 16 | | SUBA.W #0x16,A7 000212ce 20 4f | O | MOVEA.L A7,A0 000212d0 43 fa ef 3e |C > | LEA.L 0x20210,A1 000212d4 70 14 |p | MOVEQ.L #0x14,D0 000212d6 10 d9 | | MOVE.B (A1)+,(A0)+ 000212d8 51 c8 ff fc |Q | DBF D0,0x212d6 000212dc 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 000212e0 51 4f |QO | SUBQ.L #0x8,A7 000212e2 48 6f 00 0a |Ho | PEA.L (A7+0xa) 000212e6 3f 02 |? | MOVE.W D2,-(A7) 000212e8 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 000212ec 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000212f2 58 4f |XO | ADDQ.L #0x4,A7 000212f4 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 000212f8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000212fe 50 4f |PO | ADDQ.L #0x8,A7 00021300 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021306 de fc 00 1c | | ADDA.W #0x1c,A7 0002130a 4c df 07 df |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2 0002130e 4e 5e |N^ | UNLK A6 00021310 4e 75 |Nu | RTS 00021312 ; -------------------------------------------------------------------------------------- 00021312 ; OMSI PASCAL Function 00021312 ; <LVAR 0x00e 4(r)> 00021312 ; <LVAR 0x00a 4(r)> 00021312 ; <LVAR 0x008 1(r)> 00021312 ; <LVAR -0x002 2(w)> 00021312 ; <LVAR -0x004 2(w) 4(r)> 00021312 ; <LVAR -0x006 2(w)> 00021312 ; <LVAR -0x008 2(w) 4(r)> 00021312 ; <LVAR -0x418 @> 00021312 ; <LVAR -0x41e @ 1(r)> 00021312 ; -------------------------------------------------------------------------------------- 00021312 4e 56 fb 82 |NV | LINK.W A6,#0xfb82 00021316 bf d5 | | CMPA.L (A5),A7 00021318 62 06 |b | BHI 0x21320 0002131a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002131e 4e 76 |Nv | TRAPV 00021320 de fc 00 60 | ` | ADDA.W #0x60,A7 00021324 48 e7 f9 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 00021328 45 ee ff f8 |E | LEA.L (A6-0x8),A2 0002132c 47 ee ff fc |G | LEA.L (A6-0x4),A3 00021330 49 ee fb e2 |I | LEA.L (A6-0x41e),A4 00021334 72 01 |r | MOVEQ.L #0x01,D1 00021336 74 0a |t | MOVEQ.L #0x0a,D2 00021338 76 0c |v | MOVEQ.L #0x0c,D3 0002133a 78 18 |x | MOVEQ.L #0x18,D4 0002133c 2f 2e 00 0a |/. | MOVE.L (A6+0xa),-(A7) 00021340 2f 39 00 02 41 d6 |/9 A | MOVE.L 0x241d6,-(A7) 00021346 3f 3c 04 00 |?< | MOVE.W #0x400,-(A7) 0002134a 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00021350 de c2 | | ADDA.W D2,A7 00021352 20 6e 00 0e | n | MOVEA.L (A6+0xe),A0 00021356 2f 08 |/ | MOVE.L A0,-(A7) 00021358 42 67 |Bg | CLR.W -(A7) 0002135a 4e b9 00 01 02 3c |N < | JSR KC1e_Fifo_Tx_Response(ptr : Pointer; chan : Word) 00021360 5c 4f |\O | ADDQ.L #0x6,A7 00021362 4a 2e 00 08 |J. | TST.B (A6+0x8) 00021366 67 00 00 f2 |g | BEQ 0x2145a 0002136a 2e 3c ff ff b1 e0 |.< | MOVE.L #0xffffb1e0,D7 00021370 41 ee fb e8 |A | LEA.L (A6-0x418),A0 00021374 2f 08 |/ | MOVE.L A0,-(A7) 00021376 42 67 |Bg | CLR.W -(A7) 00021378 48 54 |HT | PEA.L (A4) 0002137a 4e b9 00 01 02 3e |N > | JSR KC1f_Fifo_Rx_Request(ptr : Pointer; chan : Word; VAR flag : Bool) 00021380 de c2 | | ADDA.W D2,A7 00021382 52 87 |R | ADDQ.L #0x1,D7 00021384 67 04 |g | BEQ 0x2138a 00021386 4a 14 |J | TST.B (A4) 00021388 67 e6 |g | BEQ 0x21370 0002138a 4a 14 |J | TST.B (A4) 0002138c 66 00 00 cc |f | BNE 0x2145a 00021390 20 6e 00 0e | n | MOVEA.L (A6+0xe),A0 00021394 34 90 |4 | MOVE.W (A0),(A2) 00021396 3d 68 00 02 ff fa |=h | MOVE.W (A0+0x2),(A6-0x6) 0002139c 36 a8 00 04 |6 | MOVE.W (A0+0x4),(A3) 000213a0 3d 68 00 06 ff fe |=h | MOVE.W (A0+0x6),(A6-0x2) 000213a6 43 fa ee aa |C | LEA.L 0x20252,A1 000213aa 70 04 |p | MOVEQ.L #0x04,D0 000213ac 2f 21 |/! | MOVE.L -(A1),-(A7) 000213ae 51 c8 ff fc |Q | DBF D0,0x213ac 000213b2 51 4f |QO | SUBQ.L #0x8,A7 000213b4 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000213b8 3f 01 |? | MOVE.W D1,-(A7) 000213ba 3f 3c 00 14 |?< | MOVE.W #0x14,-(A7) 000213be 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000213c4 2e 93 |. | MOVE.L (A3),(A7) 000213c6 2f 12 |/ | MOVE.L (A2),-(A7) 000213c8 48 78 00 10 |Hx | PEA.L 0x10 000213cc 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 000213d2 de c3 | | ADDA.W D3,A7 000213d4 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000213da 50 4f |PO | ADDQ.L #0x8,A7 000213dc 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000213e2 de c4 | | ADDA.W D4,A7 000213e4 34 a8 00 08 |4 | MOVE.W (A0+0x8),(A2) 000213e8 3d 68 00 0a ff fa |=h | MOVE.W (A0+0xa),(A6-0x6) 000213ee 36 a8 00 0c |6 | MOVE.W (A0+0xc),(A3) 000213f2 3d 68 00 0e ff fe |=h | MOVE.W (A0+0xe),(A6-0x2) 000213f8 3f 3a ee 58 |?: X | MOVE.W 0x20252,-(A7) 000213fc 51 4f |QO | SUBQ.L #0x8,A7 000213fe 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021402 3f 01 |? | MOVE.W D1,-(A7) 00021404 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00021408 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002140e 2e 93 |. | MOVE.L (A3),(A7) 00021410 2f 12 |/ | MOVE.L (A2),-(A7) 00021412 48 78 00 10 |Hx | PEA.L 0x10 00021416 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 0002141c de c3 | | ADDA.W D3,A7 0002141e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021424 50 4f |PO | ADDQ.L #0x8,A7 00021426 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002142c 5c 4f |\O | ADDQ.L #0x6,A7 0002142e 41 fa ee 0e |A | LEA.L 0x2023e,A0 00021432 70 05 |p | MOVEQ.L #0x05,D0 00021434 2f 20 |/ | MOVE.L -(A0),-(A7) 00021436 51 c8 ff fc |Q | DBF D0,0x21434 0002143a 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 0002143e 59 4f |YO | SUBQ.L #0x4,A7 00021440 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021444 3f 01 |? | MOVE.W D1,-(A7) 00021446 3f 04 |? | MOVE.W D4,-(A7) 00021448 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002144e 50 4f |PO | ADDQ.L #0x8,A7 00021450 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021456 de fc 00 1e | | ADDA.W #0x1e,A7 0002145a 4c df 1f 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4 0002145e 4e 5e |N^ | UNLK A6 00021460 4e 75 |Nu | RTS 00021462 ; -------------------------------------------------------------------------------------- 00021462 ; OMSI PASCAL Function 00021462 ; <LVAR -0x003 @ 1(r)> 00021462 ; <LVAR -0x005 @ 1(r)> 00021462 ; <LVAR -0x006 @ 1(r)> 00021462 ; <LVAR -0x007 @ 1(r)> 00021462 ; <LVAR -0x008 @ 1(r)> 00021462 ; <LVAR -0x009 @ 1(r)> 00021462 ; <LVAR -0x00a @> 00021462 ; <LVAR -0x00b @> 00021462 ; -------------------------------------------------------------------------------------- 00021462 4e 56 ff be |NV | LINK.W A6,#0xffbe 00021466 bf d5 | | CMPA.L (A5),A7 00021468 62 06 |b | BHI 0x21470 0002146a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002146e 4e 76 |Nv | TRAPV 00021470 de fc 00 36 | 6 | ADDA.W #0x36,A7 00021474 48 e7 e3 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D2+D1+D0,-(A7) 00021478 41 ee ff f5 |A | LEA.L (A6-0xb),A0 0002147c 43 ee ff f6 |C | LEA.L (A6-0xa),A1 00021480 45 f9 00 01 04 84 |E | LEA.L DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool),A2 00021486 72 0c |r | MOVEQ.L #0x0c,D1 00021488 74 0e |t | MOVEQ.L #0x0e,D2 0002148a 1f 3c 00 04 | < | MOVE.B #0x04,-(A7) 0002148e 48 50 |HP | PEA.L (A0) 00021490 48 6e ff f7 |Hn | PEA.L (A6-0x9) 00021494 48 51 |HQ | PEA.L (A1) 00021496 4e 92 |N | JSR (A2) 00021498 de c1 | | ADDA.W D1,A7 0002149a 1e bc 00 06 | | MOVE.B #0x06,(A7) 0002149e 48 50 |HP | PEA.L (A0) 000214a0 48 6e ff f8 |Hn | PEA.L (A6-0x8) 000214a4 48 51 |HQ | PEA.L (A1) 000214a6 4e 92 |N | JSR (A2) 000214a8 de c1 | | ADDA.W D1,A7 000214aa 1e bc 00 07 | | MOVE.B #0x07,(A7) 000214ae 48 50 |HP | PEA.L (A0) 000214b0 48 6e ff f9 |Hn | PEA.L (A6-0x7) 000214b4 48 51 |HQ | PEA.L (A1) 000214b6 4e 92 |N | JSR (A2) 000214b8 de c1 | | ADDA.W D1,A7 000214ba 1e bc 00 03 | | MOVE.B #0x03,(A7) 000214be 48 50 |HP | PEA.L (A0) 000214c0 48 6e ff fa |Hn | PEA.L (A6-0x6) 000214c4 48 51 |HQ | PEA.L (A1) 000214c6 4e 92 |N | JSR (A2) 000214c8 de c1 | | ADDA.W D1,A7 000214ca 1e bc 00 02 | | MOVE.B #0x02,(A7) 000214ce 48 50 |HP | PEA.L (A0) 000214d0 48 6e ff fb |Hn | PEA.L (A6-0x5) 000214d4 48 51 |HQ | PEA.L (A1) 000214d6 4e 92 |N | JSR (A2) 000214d8 de c2 | | ADDA.W D2,A7 000214da 7e 00 |~ | MOVEQ.L #0x00,D7 000214dc 7c 0c || | MOVEQ.L #0x0c,D6 000214de 55 4f |UO | SUBQ.L #0x2,A7 000214e0 1f 06 | | MOVE.B D6,-(A7) 000214e2 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 000214e8 54 4f |TO | ADDQ.L #0x2,A7 000214ea 4a 1f |J | TST.B (A7)+ 000214ec 67 1c |g | BEQ 0x2150a 000214ee 1f 06 | | MOVE.B D6,-(A7) 000214f0 48 50 |HP | PEA.L (A0) 000214f2 48 6e ff fd |Hn | PEA.L (A6-0x3) 000214f6 48 51 |HQ | PEA.L (A1) 000214f8 4e 92 |N | JSR (A2) 000214fa de c2 | | ADDA.W D2,A7 000214fc 10 07 | | MOVE.B D7,D0 000214fe 80 2e ff fd | . | OR.B (A6-0x3),D0 00021502 48 80 |H | EXTB.W D0 00021504 41 bc 00 01 |A | CHK.W #0x1,D0 00021508 1e 00 | | MOVE.B D0,D7 0002150a 52 06 |R | ADDQ.B #0x1,D6 0002150c 0c 06 00 0f | | CMPI.B #0x0f,D6 00021510 6f cc |o | BLE 0x214de 00021512 4a 2e ff f7 |J. | TST.B (A6-0x9) 00021516 66 1c |f | BNE 0x21534 00021518 4a 2e ff f8 |J. | TST.B (A6-0x8) 0002151c 66 16 |f | BNE 0x21534 0002151e 4a 2e ff f9 |J. | TST.B (A6-0x7) 00021522 66 10 |f | BNE 0x21534 00021524 4a 2e ff fa |J. | TST.B (A6-0x6) 00021528 66 0a |f | BNE 0x21534 0002152a 4a 2e ff fb |J. | TST.B (A6-0x5) 0002152e 66 04 |f | BNE 0x21534 00021530 4a 07 |J | TST.B D7 00021532 67 0a |g | BEQ 0x2153e 00021534 1f 01 | | MOVE.B D1,-(A7) 00021536 4e b9 00 01 05 da |N | JSR EmergencyStop(boot_reason_code : Byte) 0002153c 54 4f |TO | ADDQ.L #0x2,A7 0002153e 4c df 07 c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0+A1+A2 00021542 4e 5e |N^ | UNLK A6 00021544 4e 75 |Nu | RTS 00021546 ; -------------------------------------------------------------------------------------- 00021546 ; OMSI PASCAL Function 00021546 ; <LVAR 0x008 @ 4(r)> 00021546 ; <LVAR -0x004 2(w)> 00021546 ; <LVAR -0x006 2(w) 4(r)> 00021546 ; <LVAR -0x008 2(w)> 00021546 ; <LVAR -0x00a 2(w) 4(r)> 00021546 ; <LVAR -0x00c @> 00021546 ; <LVAR -0x00d @> 00021546 ; <LVAR -0x00e @ 1(r)> 00021546 ; <LVAR -0x41e @> 00021546 ; <LVAR -0x420 2(rw)> 00021546 ; <LVAR -0x422 2(rw)> 00021546 ; <LVAR -0x424 2(rw)> 00021546 ; <LVAR -0x426 2(rw)> 00021546 ; <LVAR -0x428 2(rw)> 00021546 ; <LVAR -0x42a 2(r)> 00021546 ; <LVAR -0x42c 2(r)> 00021546 ; <LVAR -0x42e @ 2(rw)> 00021546 ; <LVAR -0x43a @ 4(r)> 00021546 ; <LVAR -0x83e 2(r)> 00021546 ; <LVAR -0x840 2(r) 4(w)> 00021546 ; <LVAR -0x844 4(w)> 00021546 ; <LVAR -0x848 @ 4(r)> 00021546 ; <LVAR -0x84c @ 4(r)> 00021546 ; -------------------------------------------------------------------------------------- 00021546 4e 56 f7 48 |NV H | LINK.W A6,#0xf748 0002154a bf d5 | | CMPA.L (A5),A7 0002154c 62 06 |b | BHI 0x21554 0002154e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021552 4e 76 |Nv | TRAPV 00021554 de fc 00 6c | l | ADDA.W #0x6c,A7 00021558 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002155c 43 ee f7 b8 |C | LEA.L (A6-0x848),A1 00021560 45 ee fb e0 |E | LEA.L (A6-0x420),A2 00021564 47 ee f7 b4 |G | LEA.L (A6-0x84c),A3 00021568 49 ee 00 08 |I | LEA.L (A6+0x8),A4 0002156c 72 02 |r | MOVEQ.L #0x02,D1 0002156e 74 0c |t | MOVEQ.L #0x0c,D2 00021570 76 14 |v | MOVEQ.L #0x14,D3 00021572 78 01 |x | MOVEQ.L #0x01,D4 00021574 48 53 |HS | PEA.L (A3) 00021576 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 0002157c 2e 94 |. | MOVE.L (A4),(A7) 0002157e 2f 13 |/ | MOVE.L (A3),-(A7) 00021580 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00021584 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 0002158a de c2 | | ADDA.W D2,A7 0002158c 48 51 |HQ | PEA.L (A1) 0002158e 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00021594 2e 94 |. | MOVE.L (A4),(A7) 00021596 2f 11 |/ | MOVE.L (A1),-(A7) 00021598 48 6e ff f4 |Hn | PEA.L (A6-0xc) 0002159c 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 000215a2 5c 4f |\O | ADDQ.L #0x6,A7 000215a4 2e 91 |. | MOVE.L (A1),(A7) 000215a6 4e ba fc 9a |N | JSR 0x21242 000215aa 58 4f |XO | ADDQ.L #0x4,A7 000215ac 10 1f | | MOVE.B (A7)+,D0 000215ae 48 80 |H | EXTB.W D0 000215b0 41 bc 00 07 |A | CHK.W #0x7,D0 000215b4 1a 00 | | MOVE.B D0,D5 000215b6 2f 14 |/ | MOVE.L (A4),-(A7) 000215b8 2f 11 |/ | MOVE.L (A1),-(A7) 000215ba 48 6e ff f4 |Hn | PEA.L (A6-0xc) 000215be 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 000215c4 2e 91 |. | MOVE.L (A1),(A7) 000215c6 48 78 00 10 |Hx | PEA.L 0x10 000215ca 4e b9 00 01 03 60 |N ` | JSR ?StringToInt64() 000215d0 50 4f |PO | ADDQ.L #0x8,A7 000215d2 2d 5f f7 bc |-_ | MOVE.L (A7)+,(A6-0x844) 000215d6 2d 5f f7 c0 |-_ | MOVE.L (A7)+,(A6-0x840) 000215da 3d 79 00 02 41 d2 fb d2 |=y A | MOVE.W 0x241d2,(A6-0x42e) 000215e2 42 6e fb d4 |Bn | CLR.W (A6-0x42c) 000215e6 42 6e fb d6 |Bn | CLR.W (A6-0x42a) 000215ea 3d 7c 01 00 fb d8 |=| | MOVE.W #0x100,(A6-0x428) 000215f0 3d 6e f7 c0 fb da |=n | MOVE.W (A6-0x840),(A6-0x426) 000215f6 3d 6e f7 c2 fb dc |=n | MOVE.W (A6-0x83e),(A6-0x424) 000215fc 42 6e fb de |Bn | CLR.W (A6-0x422) 00021600 10 05 | | MOVE.B D5,D0 00021602 48 80 |H | EXTB.W D0 00021604 34 80 |4 | MOVE.W D0,(A2) 00021606 4a 39 00 02 41 c0 |J9 A | TST.B 0x241c0 0002160c 67 06 |g | BEQ 0x21614 0002160e 00 40 00 08 | @ | ORI.W #0x0008,D0 00021612 34 80 |4 | MOVE.W D0,(A2) 00021614 2f 13 |/ | MOVE.L (A3),-(A7) 00021616 42 27 |B' | CLR.B -(A7) 00021618 1f 01 | | MOVE.B D1,-(A7) 0002161a 48 78 00 00 |Hx | PEA.L 0x0 0002161e 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00021622 48 6e fb c6 |Hn | PEA.L (A6-0x43a) 00021626 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 0002162c de c3 | | ADDA.W D3,A7 0002162e 20 6e fb c6 | n | MOVEA.L (A6-0x43a),A0 00021632 30 28 00 20 |0( | MOVE.W (A0+0x20),D0 00021636 53 40 |S@ | SUBQ.W #0x1,D0 00021638 48 c0 |H | EXTW.L D0 0002163a 2f 00 |/ | MOVE.L D0,-(A7) 0002163c 7c 00 || | MOVEQ.L #0x00,D6 0002163e bc 97 | | CMP.L (A7),D6 00021640 6e 00 01 8c |n | BGT 0x217ce 00021644 2f 2e fb c6 |/. | MOVE.L (A6-0x43a),-(A7) 00021648 0c 86 00 00 40 00 | @ | CMPI.L #0x00004000,D6 0002164e 63 02 |c | BLS 0x21652 00021650 4e 4f |NO | TRAP #15 00021652 3f 06 |? | MOVE.W D6,-(A7) 00021654 42 67 |Bg | CLR.W -(A7) 00021656 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 0002165a 1f 01 | | MOVE.B D1,-(A7) 0002165c 2f 39 00 02 41 d6 |/9 A | MOVE.L 0x241d6,-(A7) 00021662 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00021666 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 0002166c de c3 | | ADDA.W D3,A7 0002166e 41 ee fb d2 |A | LEA.L (A6-0x42e),A0 00021672 2f 08 |/ | MOVE.L A0,-(A7) 00021674 42 67 |Bg | CLR.W -(A7) 00021676 4e b9 00 01 02 3c |N < | JSR KC1e_Fifo_Tx_Response(ptr : Pointer; chan : Word) 0002167c 5c 4f |\O | ADDQ.L #0x6,A7 0002167e 2e 3c ff ff b1 e0 |.< | MOVE.L #0xffffb1e0,D7 00021684 41 ee fb e2 |A | LEA.L (A6-0x41e),A0 00021688 2f 08 |/ | MOVE.L A0,-(A7) 0002168a 42 67 |Bg | CLR.W -(A7) 0002168c 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00021690 4e b9 00 01 02 3e |N > | JSR KC1f_Fifo_Rx_Request(ptr : Pointer; chan : Word; VAR flag : Bool) 00021696 de fc 00 0a | | ADDA.W #0xa,A7 0002169a 52 87 |R | ADDQ.L #0x1,D7 0002169c 67 06 |g | BEQ 0x216a4 0002169e 4a 2e ff f2 |J. | TST.B (A6-0xe) 000216a2 67 e0 |g | BEQ 0x21684 000216a4 4a 2e ff f2 |J. | TST.B (A6-0xe) 000216a8 66 00 00 dc |f | BNE 0x21786 000216ac 4e ba fd b4 |N | JSR 0x21462 000216b0 3d 6e fb d2 ff f6 |=n | MOVE.W (A6-0x42e),(A6-0xa) 000216b6 3d 6e fb d4 ff f8 |=n | MOVE.W (A6-0x42c),(A6-0x8) 000216bc 3d 6e fb d6 ff fa |=n | MOVE.W (A6-0x42a),(A6-0x6) 000216c2 3d 6e fb d8 ff fc |=n | MOVE.W (A6-0x428),(A6-0x4) 000216c8 41 fa eb b6 |A | LEA.L 0x20280,A0 000216cc 70 04 |p | MOVEQ.L #0x04,D0 000216ce 2f 20 |/ | MOVE.L -(A0),-(A7) 000216d0 51 c8 ff fc |Q | DBF D0,0x216ce 000216d4 51 4f |QO | SUBQ.L #0x8,A7 000216d6 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000216da 3f 04 |? | MOVE.W D4,-(A7) 000216dc 3f 03 |? | MOVE.W D3,-(A7) 000216de 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000216e4 2e ae ff fa |. | MOVE.L (A6-0x6),(A7) 000216e8 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 000216ec 48 78 00 10 |Hx | PEA.L 0x10 000216f0 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 000216f6 de c2 | | ADDA.W D2,A7 000216f8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000216fe 50 4f |PO | ADDQ.L #0x8,A7 00021700 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021706 de fc 00 18 | | ADDA.W #0x18,A7 0002170a 3d 6e fb da ff f6 |=n | MOVE.W (A6-0x426),(A6-0xa) 00021710 3d 6e fb dc ff f8 |=n | MOVE.W (A6-0x424),(A6-0x8) 00021716 3d 6e fb de ff fa |=n | MOVE.W (A6-0x422),(A6-0x6) 0002171c 3d 52 ff fc |=R | MOVE.W (A2),(A6-0x4) 00021720 3f 3a eb 5e |?: ^ | MOVE.W 0x20280,-(A7) 00021724 51 4f |QO | SUBQ.L #0x8,A7 00021726 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002172a 3f 04 |? | MOVE.W D4,-(A7) 0002172c 3f 01 |? | MOVE.W D1,-(A7) 0002172e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021734 2e ae ff fa |. | MOVE.L (A6-0x6),(A7) 00021738 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 0002173c 48 78 00 10 |Hx | PEA.L 0x10 00021740 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 00021746 de c2 | | ADDA.W D2,A7 00021748 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002174e 50 4f |PO | ADDQ.L #0x8,A7 00021750 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021756 5c 4f |\O | ADDQ.L #0x6,A7 00021758 41 fa eb 12 |A | LEA.L 0x2026c,A0 0002175c 70 05 |p | MOVEQ.L #0x05,D0 0002175e 2f 20 |/ | MOVE.L -(A0),-(A7) 00021760 51 c8 ff fc |Q | DBF D0,0x2175e 00021764 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00021768 59 4f |YO | SUBQ.L #0x4,A7 0002176a 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002176e 3f 04 |? | MOVE.W D4,-(A7) 00021770 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00021774 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002177a 50 4f |PO | ADDQ.L #0x8,A7 0002177c 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021782 de fc 00 1e | | ADDA.W #0x1e,A7 00021786 42 80 |B | CLR.L D0 00021788 30 12 |0 | MOVE.W (A2),D0 0002178a 06 80 00 00 20 00 | | ADDI.L #0x00002000,D0 00021790 02 80 00 00 ff ff | | ANDI.L #0x0000ffff,D0 00021796 34 80 |4 | MOVE.W D0,(A2) 00021798 02 40 ff f0 | @ | ANDI.W #0xfff0,D0 0002179c 66 16 |f | BNE 0x217b4 0002179e 42 80 |B | CLR.L D0 000217a0 30 2e fb de |0. | MOVE.W (A6-0x422),D0 000217a4 52 80 |R | ADDQ.L #0x1,D0 000217a6 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 000217ac 63 02 |c | BLS 0x217b0 000217ae 4e 4f |NO | TRAP #15 000217b0 3d 40 fb de |=@ | MOVE.W D0,(A6-0x422) 000217b4 52 b9 00 02 41 c6 |R A | ADDQ.L #0x1,0x241c6 000217ba 4a 39 00 02 41 c0 |J9 A | TST.B 0x241c0 000217c0 67 06 |g | BEQ 0x217c8 000217c2 52 b9 00 02 41 c2 |R A | ADDQ.L #0x1,0x241c2 000217c8 52 86 |R | ADDQ.L #0x1,D6 000217ca 68 00 fe 72 |h r | BVC 0x2163e 000217ce 54 4f |TO | ADDQ.L #0x2,A7 000217d0 42 17 |B | CLR.B (A7) 000217d2 1f 01 | | MOVE.B D1,-(A7) 000217d4 48 78 00 01 |Hx | PEA.L 0x1 000217d8 48 6e ff f3 |Hn | PEA.L (A6-0xd) 000217dc 48 6e fb c6 |Hn | PEA.L (A6-0x43a) 000217e0 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000217e6 de fc 00 10 | | ADDA.W #0x10,A7 000217ea 48 53 |HS | PEA.L (A3) 000217ec 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000217f2 58 4f |XO | ADDQ.L #0x4,A7 000217f4 48 54 |HT | PEA.L (A4) 000217f6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000217fc 58 4f |XO | ADDQ.L #0x4,A7 000217fe 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00021802 4e 5e |N^ | UNLK A6 00021804 4e 75 |Nu | RTS 00021806 ; -------------------------------------------------------------------------------------- 00021806 ; OMSI PASCAL Function 00021806 ; <LVAR 0x00a 4(r)> 00021806 ; <LVAR 0x008 2(rw)> 00021806 ; <LVAR -0x010 1(rw)> 00021806 ; <LVAR -0x012 2(w)> 00021806 ; <LVAR -0x013 1(r)> 00021806 ; <LVAR -0x014 1(r) 2(r)> 00021806 ; <LVAR -0x016 @ 2(r)> 00021806 ; <LVAR -0x01a 4(rw)> 00021806 ; <LVAR -0x01e 4(rw)> 00021806 ; <LVAR -0x020 2(w)> 00021806 ; <LVAR -0x022 2(r) 4(r)> 00021806 ; <LVAR -0x024 2(r)> 00021806 ; <LVAR -0x026 2(r) 4(r)> 00021806 ; -------------------------------------------------------------------------------------- 00021806 4e 56 ff 78 |NV x | LINK.W A6,#0xff78 0002180a bf d5 | | CMPA.L (A5),A7 0002180c 62 06 |b | BHI 0x21814 0002180e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021812 4e 76 |Nv | TRAPV 00021814 de fc 00 62 | b | ADDA.W #0x62,A7 00021818 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002181c 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00021820 47 ee 00 0a |G | LEA.L (A6+0xa),A3 00021824 49 ee ff f0 |I | LEA.L (A6-0x10),A4 00021828 42 80 |B | CLR.L D0 0002182a 30 12 |0 | MOVE.W (A2),D0 0002182c 56 80 |V | ADDQ.L #0x3,D0 0002182e 02 80 00 00 ff fc | | ANDI.L #0x0000fffc,D0 00021834 34 80 |4 | MOVE.W D0,(A2) 00021836 7e 00 |~ | MOVEQ.L #0x00,D7 00021838 20 53 | S | MOVEA.L (A3),A0 0002183a 30 12 |0 | MOVE.W (A2),D0 0002183c 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021840 42 81 |B | CLR.L D1 00021842 32 00 |2 | MOVE.W D0,D1 00021844 e3 81 | | ASL.L #0x1,D1 00021846 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 0002184c 63 02 |c | BLS 0x21850 0002184e 4e 4f |NO | TRAP #15 00021850 20 07 | | MOVE.L D7,D0 00021852 e3 80 | | ASL.L #0x1,D0 00021854 43 fa ed b4 |C | LEA.L 0x2060a,A1 00021858 31 b1 08 00 18 00 |1 | MOVE.W (A1+D0.L),(A0+D1.L) 0002185e 42 80 |B | CLR.L D0 00021860 30 12 |0 | MOVE.W (A2),D0 00021862 52 80 |R | ADDQ.L #0x1,D0 00021864 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 0002186a 63 02 |c | BLS 0x2186e 0002186c 4e 4f |NO | TRAP #15 0002186e 34 80 |4 | MOVE.W D0,(A2) 00021870 52 87 |R | ADDQ.L #0x1,D7 00021872 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 00021878 6f be |o | BLE 0x21838 0002187a 48 6e ff ea |Hn | PEA.L (A6-0x16) 0002187e 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 00021884 58 4f |XO | ADDQ.L #0x4,A7 00021886 42 6e ff da |Bn | CLR.W (A6-0x26) 0002188a 42 6e ff dc |Bn | CLR.W (A6-0x24) 0002188e 42 6e ff de |Bn | CLR.W (A6-0x22) 00021892 3d 6e ff ea ff e0 |=n | MOVE.W (A6-0x16),(A6-0x20) 00021898 42 14 |B | CLR.B (A4) 0002189a 42 80 |B | CLR.L D0 0002189c 10 2e ff ec | . | MOVE.B (A6-0x14),D0 000218a0 e2 08 | | LSR.B #0x1,D0 000218a2 32 00 |2 | MOVE.W D0,D1 000218a4 02 41 00 03 | A | ANDI.W #0x0003,D1 000218a8 0c 41 00 03 | A | CMPI.W #0x0003,D1 000218ac 66 02 |f | BNE 0x218b0 000218ae 52 14 |R | ADDQ.B #0x1,(A4) 000218b0 32 00 |2 | MOVE.W D0,D1 000218b2 e4 41 | A | ASR.W #0x2,D1 000218b4 14 14 | | MOVE.B (A4),D2 000218b6 48 82 |H | EXTB.W D2 000218b8 c5 fc 00 18 | | MULS.W #0x18,D2 000218bc 41 fa ed 5c |A \ | LEA.L days_per_month,A0 000218c0 36 2e ff ec |6. | MOVE.W (A6-0x14),D3 000218c4 ef 4b | K | LSL.W #0x7,D3 000218c6 e0 4b | K | LSR.W #0x8,D3 000218c8 e8 4b | K | LSR.W #0x4,D3 000218ca 53 43 |SC | SUBQ.W #0x1,D3 000218cc 47 bc 00 0b |G | CHK.W #0xb,D3 000218d0 e3 43 | C | ASL.W #0x1,D3 000218d2 41 f0 20 00 |A | LEA.L (A0+D2.W),A0 000218d6 48 c1 |H | EXTW.L D1 000218d8 42 82 |B | CLR.L D2 000218da 34 30 30 00 |400 | MOVE.W (A0+D3.W),D2 000218de d4 81 | | ADD.L D1,D2 000218e0 42 81 |B | CLR.L D1 000218e2 12 2e ff ed | . | MOVE.B (A6-0x13),D1 000218e6 e7 09 | | LSL.B #0x3,D1 000218e8 e6 09 | | LSR.B #0x3,D1 000218ea d2 82 | | ADD.L D2,D1 000218ec 53 81 |S | SUBQ.L #0x1,D1 000218ee 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 000218f4 63 02 |c | BLS 0x218f8 000218f6 4e 4f |NO | TRAP #15 000218f8 3d 41 ff ee |=A | MOVE.W D1,(A6-0x12) 000218fc 9e fc 00 18 | | SUBA.W #0x18,A7 00021900 48 78 01 6d |Hx m | PEA.L 0x16d 00021904 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad 0002190a 59 4f |YO | SUBQ.L #0x4,A7 0002190c 48 c0 |H | EXTW.L D0 0002190e 2f 00 |/ | MOVE.L D0,-(A7) 00021910 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad 00021916 58 4f |XO | ADDQ.L #0x4,A7 00021918 4e b9 00 01 03 1c |N | JSR Multiply(a, b : Quad) : Quad 0002191e 50 4f |PO | ADDQ.L #0x8,A7 00021920 42 80 |B | CLR.L D0 00021922 30 01 |0 | MOVE.W D1,D0 00021924 2f 00 |/ | MOVE.L D0,-(A7) 00021926 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad 0002192c 58 4f |XO | ADDQ.L #0x4,A7 0002192e 4e b9 00 01 03 14 |N | JSR Add(a, b : Quad) : Quad 00021934 de fc 00 10 | | ADDA.W #0x10,A7 00021938 2d 5f ff e2 |-_ | MOVE.L (A7)+,(A6-0x1e) 0002193c 2d 57 ff e6 |-W | MOVE.L (A7),(A6-0x1a) 00021940 9e fc 00 0c | | SUBA.W #0xc,A7 00021944 2f 2e ff de |/. | MOVE.L (A6-0x22),-(A7) 00021948 2f 2e ff da |/. | MOVE.L (A6-0x26),-(A7) 0002194c 48 78 00 01 |Hx | PEA.L 0x1 00021950 4e b9 00 01 03 44 |N D | JSR BitShift(a : Quad ; howmuch : integer) : Quad 00021956 2e ae ff e6 |. | MOVE.L (A6-0x1a),(A7) 0002195a 2f 2e ff e2 |/. | MOVE.L (A6-0x1e),-(A7) 0002195e 2f 3a ec b6 |/: | MOVE.L 0x20616,-(A7) 00021962 2f 3a ec ae |/: | MOVE.L 0x20612,-(A7) 00021966 4e b9 00 01 03 1c |N | JSR Multiply(a, b : Quad) : Quad 0002196c de fc 00 10 | | ADDA.W #0x10,A7 00021970 4e b9 00 01 03 14 |N | JSR Add(a, b : Quad) : Quad 00021976 de fc 00 10 | | ADDA.W #0x10,A7 0002197a 2d 5f ff e2 |-_ | MOVE.L (A7)+,(A6-0x1e) 0002197e 2d 5f ff e6 |-_ | MOVE.L (A7)+,(A6-0x1a) 00021982 7e 00 |~ | MOVEQ.L #0x00,D7 00021984 20 53 | S | MOVEA.L (A3),A0 00021986 30 12 |0 | MOVE.W (A2),D0 00021988 41 bc 01 ff |A | CHK.W #0x1ff,D0 0002198c 42 81 |B | CLR.L D1 0002198e 32 00 |2 | MOVE.W D0,D1 00021990 e3 81 | | ASL.L #0x1,D1 00021992 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 00021998 63 02 |c | BLS 0x2199c 0002199a 4e 4f |NO | TRAP #15 0002199c 20 07 | | MOVE.L D7,D0 0002199e e3 80 | | ASL.L #0x1,D0 000219a0 31 b6 08 e2 18 00 |1 | MOVE.W (A6+D0.L-#0x1e),(A0+D1.L) 000219a6 42 80 |B | CLR.L D0 000219a8 30 12 |0 | MOVE.W (A2),D0 000219aa 52 80 |R | ADDQ.L #0x1,D0 000219ac 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 000219b2 63 02 |c | BLS 0x219b6 000219b4 4e 4f |NO | TRAP #15 000219b6 34 80 |4 | MOVE.W D0,(A2) 000219b8 52 87 |R | ADDQ.L #0x1,D7 000219ba 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 000219c0 6f c2 |o | BLE 0x21984 000219c2 7e 00 |~ | MOVEQ.L #0x00,D7 000219c4 7c 00 || | MOVEQ.L #0x00,D6 000219c6 20 53 | S | MOVEA.L (A3),A0 000219c8 30 12 |0 | MOVE.W (A2),D0 000219ca 41 bc 01 ff |A | CHK.W #0x1ff,D0 000219ce 42 81 |B | CLR.L D1 000219d0 32 00 |2 | MOVE.W D0,D1 000219d2 e3 81 | | ASL.L #0x1,D1 000219d4 0c 87 00 00 00 09 | | CMPI.L #0x00000009,D7 000219da 63 02 |c | BLS 0x219de 000219dc 4e 4f |NO | TRAP #15 000219de 43 fa ec 6a |C j | LEA.L 0x2064a,A1 000219e2 10 31 78 00 | 1x | MOVE.B (A1+D7.L),D0 000219e6 48 80 |H | EXTB.W D0 000219e8 e7 40 | @ | ASL.W #0x3,D0 000219ea 43 f9 00 02 3e 90 |C > | LEA.L 0x23e90,A1 000219f0 0c 86 00 00 00 03 | | CMPI.L #0x00000003,D6 000219f6 63 02 |c | BLS 0x219fa 000219f8 4e 4f |NO | TRAP #15 000219fa 24 06 |$ | MOVE.L D6,D2 000219fc e3 82 | | ASL.L #0x1,D2 000219fe 43 f1 00 00 |C | LEA.L (A1+D0.W),A1 00021a02 43 f1 28 00 |C ( | LEA.L (A1+D2.L),A1 00021a06 31 a9 03 4a 18 00 |1 J | MOVE.W (A1+0x34a),(A0+D1.L) 00021a0c 42 80 |B | CLR.L D0 00021a0e 30 12 |0 | MOVE.W (A2),D0 00021a10 52 80 |R | ADDQ.L #0x1,D0 00021a12 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021a18 63 02 |c | BLS 0x21a1c 00021a1a 4e 4f |NO | TRAP #15 00021a1c 34 80 |4 | MOVE.W D0,(A2) 00021a1e 52 86 |R | ADDQ.L #0x1,D6 00021a20 0c 86 00 00 00 03 | | CMPI.L #0x00000003,D6 00021a26 6f 9e |o | BLE 0x219c6 00021a28 52 87 |R | ADDQ.L #0x1,D7 00021a2a 0c 87 00 00 00 09 | | CMPI.L #0x00000009,D7 00021a30 6f 92 |o | BLE 0x219c4 00021a32 7e 00 |~ | MOVEQ.L #0x00,D7 00021a34 7c 00 || | MOVEQ.L #0x00,D6 00021a36 20 53 | S | MOVEA.L (A3),A0 00021a38 30 12 |0 | MOVE.W (A2),D0 00021a3a 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021a3e 42 81 |B | CLR.L D1 00021a40 32 00 |2 | MOVE.W D0,D1 00021a42 e3 81 | | ASL.L #0x1,D1 00021a44 42 70 18 00 |Bp | CLR.W (A0+D1.L) 00021a48 42 80 |B | CLR.L D0 00021a4a 30 12 |0 | MOVE.W (A2),D0 00021a4c 52 80 |R | ADDQ.L #0x1,D0 00021a4e 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021a54 63 02 |c | BLS 0x21a58 00021a56 4e 4f |NO | TRAP #15 00021a58 34 80 |4 | MOVE.W D0,(A2) 00021a5a 52 86 |R | ADDQ.L #0x1,D6 00021a5c 0c 86 00 00 00 03 | | CMPI.L #0x00000003,D6 00021a62 6f d2 |o | BLE 0x21a36 00021a64 52 87 |R | ADDQ.L #0x1,D7 00021a66 0c 87 00 00 00 06 | | CMPI.L #0x00000006,D7 00021a6c 6f c6 |o | BLE 0x21a34 00021a6e 7e 00 |~ | MOVEQ.L #0x00,D7 00021a70 20 53 | S | MOVEA.L (A3),A0 00021a72 42 80 |B | CLR.L D0 00021a74 30 12 |0 | MOVE.W (A2),D0 00021a76 d0 87 | | ADD.L D7,D0 00021a78 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 00021a7e 63 02 |c | BLS 0x21a82 00021a80 4e 4f |NO | TRAP #15 00021a82 e3 80 | | ASL.L #0x1,D0 00021a84 42 70 08 00 |Bp | CLR.W (A0+D0.L) 00021a88 52 87 |R | ADDQ.L #0x1,D7 00021a8a 0c 87 00 00 00 07 | | CMPI.L #0x00000007,D7 00021a90 6f de |o | BLE 0x21a70 00021a92 55 4f |UO | SUBQ.L #0x2,A7 00021a94 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00021a9a 4a 1f |J | TST.B (A7)+ 00021a9c 66 0c |f | BNE 0x21aaa 00021a9e 55 4f |UO | SUBQ.L #0x2,A7 00021aa0 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 00021aa6 4a 1f |J | TST.B (A7)+ 00021aa8 67 66 |gf | BEQ 0x21b10 00021aaa 59 4f |YO | SUBQ.L #0x4,A7 00021aac 4e b9 00 02 3b be |N ; | JSR 0x23bbe 00021ab2 2a 1f |* | MOVE.L (A7)+,D5 00021ab4 67 24 |g$ | BEQ 0x21ada 00021ab6 2f 05 |/ | MOVE.L D5,-(A7) 00021ab8 20 53 | S | MOVEA.L (A3),A0 00021aba 30 12 |0 | MOVE.W (A2),D0 00021abc 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021ac0 42 81 |B | CLR.L D1 00021ac2 32 00 |2 | MOVE.W D0,D1 00021ac4 e3 81 | | ASL.L #0x1,D1 00021ac6 41 f0 18 00 |A | LEA.L (A0+D1.L),A0 00021aca 2f 08 |/ | MOVE.L A0,-(A7) 00021acc 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00021ad0 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00021ad6 de fc 00 0a | | ADDA.W #0xa,A7 00021ada 59 4f |YO | SUBQ.L #0x4,A7 00021adc 4e b9 00 02 3b e8 |N ; | JSR 0x23be8 00021ae2 2a 1f |* | MOVE.L (A7)+,D5 00021ae4 67 2a |g* | BEQ 0x21b10 00021ae6 2f 05 |/ | MOVE.L D5,-(A7) 00021ae8 20 53 | S | MOVEA.L (A3),A0 00021aea 42 80 |B | CLR.L D0 00021aec 30 12 |0 | MOVE.W (A2),D0 00021aee 58 80 |X | ADDQ.L #0x4,D0 00021af0 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 00021af6 63 02 |c | BLS 0x21afa 00021af8 4e 4f |NO | TRAP #15 00021afa e3 80 | | ASL.L #0x1,D0 00021afc 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00021b00 2f 08 |/ | MOVE.L A0,-(A7) 00021b02 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00021b06 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00021b0c de fc 00 0a | | ADDA.W #0xa,A7 00021b10 42 80 |B | CLR.L D0 00021b12 30 12 |0 | MOVE.W (A2),D0 00021b14 50 80 |P | ADDQ.L #0x8,D0 00021b16 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021b1c 63 02 |c | BLS 0x21b20 00021b1e 4e 4f |NO | TRAP #15 00021b20 34 80 |4 | MOVE.W D0,(A2) 00021b22 55 4f |UO | SUBQ.L #0x2,A7 00021b24 4e b9 00 01 05 f8 |N | JSR Is_machine_type_one() : Bool 00021b2a 4a 1f |J | TST.B (A7)+ 00021b2c 66 0c |f | BNE 0x21b3a 00021b2e 55 4f |UO | SUBQ.L #0x2,A7 00021b30 4e b9 00 01 05 fe |N | JSR Is_machine_type_two() : Bool 00021b36 4a 1f |J | TST.B (A7)+ 00021b38 67 14 |g | BEQ 0x21b4e 00021b3a 20 53 | S | MOVEA.L (A3),A0 00021b3c 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021b40 42 81 |B | CLR.L D1 00021b42 32 00 |2 | MOVE.W D0,D1 00021b44 e3 81 | | ASL.L #0x1,D1 00021b46 31 bc 00 03 18 00 |1 | MOVE.W #0x3,(A0+D1.L) 00021b4c 60 3e |`> | BRA 0x21b8c 00021b4e 55 4f |UO | SUBQ.L #0x2,A7 00021b50 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 00021b56 4a 1f |J | TST.B (A7)+ 00021b58 66 0c |f | BNE 0x21b66 00021b5a 55 4f |UO | SUBQ.L #0x2,A7 00021b5c 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00021b62 4a 1f |J | TST.B (A7)+ 00021b64 67 14 |g | BEQ 0x21b7a 00021b66 20 53 | S | MOVEA.L (A3),A0 00021b68 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021b6c 42 81 |B | CLR.L D1 00021b6e 32 00 |2 | MOVE.W D0,D1 00021b70 e3 81 | | ASL.L #0x1,D1 00021b72 31 bc 00 04 18 00 |1 | MOVE.W #0x4,(A0+D1.L) 00021b78 60 12 |` | BRA 0x21b8c 00021b7a 20 53 | S | MOVEA.L (A3),A0 00021b7c 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021b80 42 81 |B | CLR.L D1 00021b82 32 00 |2 | MOVE.W D0,D1 00021b84 e3 81 | | ASL.L #0x1,D1 00021b86 31 bc 00 02 18 00 |1 | MOVE.W #0x2,(A0+D1.L) 00021b8c 55 4f |UO | SUBQ.L #0x2,A7 00021b8e 4e b9 00 01 06 10 |N | JSR Is_machine_type_one_or_three() : Bool 00021b94 4a 1f |J | TST.B (A7)+ 00021b96 67 1c |g | BEQ 0x21bb4 00021b98 20 53 | S | MOVEA.L (A3),A0 00021b9a 42 81 |B | CLR.L D1 00021b9c 32 00 |2 | MOVE.W D0,D1 00021b9e 52 81 |R | ADDQ.L #0x1,D1 00021ba0 0c 81 00 00 01 ff | | CMPI.L #0x000001ff,D1 00021ba6 63 02 |c | BLS 0x21baa 00021ba8 4e 4f |NO | TRAP #15 00021baa e3 81 | | ASL.L #0x1,D1 00021bac 31 bc 00 01 18 00 |1 | MOVE.W #0x1,(A0+D1.L) 00021bb2 60 18 |` | BRA 0x21bcc 00021bb4 20 53 | S | MOVEA.L (A3),A0 00021bb6 42 81 |B | CLR.L D1 00021bb8 32 00 |2 | MOVE.W D0,D1 00021bba 52 81 |R | ADDQ.L #0x1,D1 00021bbc 0c 81 00 00 01 ff | | CMPI.L #0x000001ff,D1 00021bc2 63 02 |c | BLS 0x21bc6 00021bc4 4e 4f |NO | TRAP #15 00021bc6 e3 81 | | ASL.L #0x1,D1 00021bc8 42 70 18 00 |Bp | CLR.W (A0+D1.L) 00021bcc 20 53 | S | MOVEA.L (A3),A0 00021bce 42 81 |B | CLR.L D1 00021bd0 32 00 |2 | MOVE.W D0,D1 00021bd2 20 01 | | MOVE.L D1,D0 00021bd4 54 80 |T | ADDQ.L #0x2,D0 00021bd6 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 00021bdc 63 02 |c | BLS 0x21be0 00021bde 4e 4f |NO | TRAP #15 00021be0 e3 80 | | ASL.L #0x1,D0 00021be2 42 70 08 00 |Bp | CLR.W (A0+D0.L) 00021be6 20 01 | | MOVE.L D1,D0 00021be8 56 80 |V | ADDQ.L #0x3,D0 00021bea 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 00021bf0 63 02 |c | BLS 0x21bf4 00021bf2 4e 4f |NO | TRAP #15 00021bf4 e3 80 | | ASL.L #0x1,D0 00021bf6 42 70 08 00 |Bp | CLR.W (A0+D0.L) 00021bfa 58 81 |X | ADDQ.L #0x4,D1 00021bfc 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 00021c02 63 02 |c | BLS 0x21c06 00021c04 4e 4f |NO | TRAP #15 00021c06 34 81 |4 | MOVE.W D1,(A2) 00021c08 43 bc 01 ff |C | CHK.W #0x1ff,D1 00021c0c 42 80 |B | CLR.L D0 00021c0e 30 01 |0 | MOVE.W D1,D0 00021c10 e3 80 | | ASL.L #0x1,D0 00021c12 31 bc 00 02 08 00 |1 | MOVE.W #0x2,(A0+D0.L) 00021c18 42 80 |B | CLR.L D0 00021c1a 30 01 |0 | MOVE.W D1,D0 00021c1c 22 00 |" | MOVE.L D0,D1 00021c1e 52 81 |R | ADDQ.L #0x1,D1 00021c20 0c 81 00 00 01 ff | | CMPI.L #0x000001ff,D1 00021c26 63 02 |c | BLS 0x21c2a 00021c28 4e 4f |NO | TRAP #15 00021c2a e3 81 | | ASL.L #0x1,D1 00021c2c 42 70 18 00 |Bp | CLR.W (A0+D1.L) 00021c30 48 78 04 10 |Hx | PEA.L 0x410 00021c34 22 00 |" | MOVE.L D0,D1 00021c36 54 81 |T | ADDQ.L #0x2,D1 00021c38 0c 81 00 00 01 ff | | CMPI.L #0x000001ff,D1 00021c3e 63 02 |c | BLS 0x21c42 00021c40 4e 4f |NO | TRAP #15 00021c42 e3 81 | | ASL.L #0x1,D1 00021c44 43 f0 18 00 |C | LEA.L (A0+D1.L),A1 00021c48 2f 09 |/ | MOVE.L A1,-(A7) 00021c4a 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00021c4e 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00021c54 de fc 00 0a | | ADDA.W #0xa,A7 00021c58 5a 80 |Z | ADDQ.L #0x5,D0 00021c5a 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021c60 63 02 |c | BLS 0x21c64 00021c62 4e 4f |NO | TRAP #15 00021c64 34 80 |4 | MOVE.W D0,(A2) 00021c66 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021c6a 42 81 |B | CLR.L D1 00021c6c 32 00 |2 | MOVE.W D0,D1 00021c6e e3 81 | | ASL.L #0x1,D1 00021c70 31 b9 00 02 42 5a 18 00 |1 BZ | MOVE.W 0x2425a,(A0+D1.L) 00021c78 42 81 |B | CLR.L D1 00021c7a 32 00 |2 | MOVE.W D0,D1 00021c7c 52 81 |R | ADDQ.L #0x1,D1 00021c7e 0c 81 00 00 01 ff | | CMPI.L #0x000001ff,D1 00021c84 63 02 |c | BLS 0x21c88 00021c86 4e 4f |NO | TRAP #15 00021c88 e3 81 | | ASL.L #0x1,D1 00021c8a 31 b9 00 02 42 5c 18 00 |1 B\ | MOVE.W 0x2425c,(A0+D1.L) 00021c92 7e 00 |~ | MOVEQ.L #0x00,D7 00021c94 20 53 | S | MOVEA.L (A3),A0 00021c96 42 80 |B | CLR.L D0 00021c98 30 12 |0 | MOVE.W (A2),D0 00021c9a 54 80 |T | ADDQ.L #0x2,D0 00021c9c d0 87 | | ADD.L D7,D0 00021c9e 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 00021ca4 63 02 |c | BLS 0x21ca8 00021ca6 4e 4f |NO | TRAP #15 00021ca8 e3 80 | | ASL.L #0x1,D0 00021caa 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 00021cb0 63 02 |c | BLS 0x21cb4 00021cb2 4e 4f |NO | TRAP #15 00021cb4 22 07 |" | MOVE.L D7,D1 00021cb6 e3 81 | | ASL.L #0x1,D1 00021cb8 43 f9 00 02 42 5a |C BZ | LEA.L 0x2425a,A1 00021cbe 31 b1 18 04 08 00 |1 | MOVE.W (A1+D1.L+#0x4),(A0+D0.L) 00021cc4 52 87 |R | ADDQ.L #0x1,D7 00021cc6 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 00021ccc 6f c6 |o | BLE 0x21c94 00021cce 42 80 |B | CLR.L D0 00021cd0 30 12 |0 | MOVE.W (A2),D0 00021cd2 5c 80 |\ | ADDQ.L #0x6,D0 00021cd4 50 80 |P | ADDQ.L #0x8,D0 00021cd6 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021cdc 63 02 |c | BLS 0x21ce0 00021cde 4e 4f |NO | TRAP #15 00021ce0 34 80 |4 | MOVE.W D0,(A2) 00021ce2 20 53 | S | MOVEA.L (A3),A0 00021ce4 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021ce8 42 81 |B | CLR.L D1 00021cea 32 00 |2 | MOVE.W D0,D1 00021cec e3 81 | | ASL.L #0x1,D1 00021cee 02 70 00 ff 18 00 | p | ANDI.W #0x00ff,(A0+D1.L) 00021cf4 42 81 |B | CLR.L D1 00021cf6 32 00 |2 | MOVE.W D0,D1 00021cf8 58 81 |X | ADDQ.L #0x4,D1 00021cfa 58 81 |X | ADDQ.L #0x4,D1 00021cfc 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 00021d02 63 02 |c | BLS 0x21d06 00021d04 4e 4f |NO | TRAP #15 00021d06 34 81 |4 | MOVE.W D1,(A2) 00021d08 7e 00 |~ | MOVEQ.L #0x00,D7 00021d0a 55 4f |UO | SUBQ.L #0x2,A7 00021d0c 48 78 00 0b |Hx | PEA.L 0xb 00021d10 df 97 | | ADD.L D7,(A7) 00021d12 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 00021d18 58 4f |XO | ADDQ.L #0x4,A7 00021d1a 30 1f |0 | MOVE.W (A7)+,D0 00021d1c 48 c0 |H | EXTW.L D0 00021d1e 2c 00 |, | MOVE.L D0,D6 00021d20 08 07 00 00 | | BTST.L #0x0,D7 00021d24 67 40 |g@ | BEQ 0x21d66 00021d26 20 53 | S | MOVEA.L (A3),A0 00021d28 30 12 |0 | MOVE.W (A2),D0 00021d2a 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021d2e 42 81 |B | CLR.L D1 00021d30 32 00 |2 | MOVE.W D0,D1 00021d32 e3 81 | | ASL.L #0x1,D1 00021d34 20 06 | | MOVE.L D6,D0 00021d36 02 80 00 00 00 ff | | ANDI.L #0x000000ff,D0 00021d3c 42 82 |B | CLR.L D2 00021d3e 34 30 18 00 |40 | MOVE.W (A0+D1.L),D2 00021d42 d0 82 | | ADD.L D2,D0 00021d44 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021d4a 63 02 |c | BLS 0x21d4e 00021d4c 4e 4f |NO | TRAP #15 00021d4e 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021d52 42 80 |B | CLR.L D0 00021d54 30 12 |0 | MOVE.W (A2),D0 00021d56 52 80 |R | ADDQ.L #0x1,D0 00021d58 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021d5e 63 02 |c | BLS 0x21d62 00021d60 4e 4f |NO | TRAP #15 00021d62 34 80 |4 | MOVE.W D0,(A2) 00021d64 60 28 |`( | BRA 0x21d8e 00021d66 20 53 | S | MOVEA.L (A3),A0 00021d68 30 12 |0 | MOVE.W (A2),D0 00021d6a 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021d6e 42 81 |B | CLR.L D1 00021d70 32 00 |2 | MOVE.W D0,D1 00021d72 e3 81 | | ASL.L #0x1,D1 00021d74 28 3c 00 00 01 00 |(< | MOVE.L #0x100,D4 00021d7a 26 06 |& | MOVE.L D6,D3 00021d7c 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00021d82 20 04 | | MOVE.L D4,D0 00021d84 02 80 00 00 ff 00 | | ANDI.L #0x0000ff00,D0 00021d8a 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021d8e 52 87 |R | ADDQ.L #0x1,D7 00021d90 0c 87 00 00 00 1f | | CMPI.L #0x0000001f,D7 00021d96 6f 00 ff 72 |o r | BLE 0x21d0a 00021d9a 7e 00 |~ | MOVEQ.L #0x00,D7 00021d9c 55 4f |UO | SUBQ.L #0x2,A7 00021d9e 48 78 01 81 |Hx | PEA.L 0x181 00021da2 df 97 | | ADD.L D7,(A7) 00021da4 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 00021daa 58 4f |XO | ADDQ.L #0x4,A7 00021dac 30 1f |0 | MOVE.W (A7)+,D0 00021dae 48 c0 |H | EXTW.L D0 00021db0 2c 00 |, | MOVE.L D0,D6 00021db2 08 07 00 00 | | BTST.L #0x0,D7 00021db6 67 40 |g@ | BEQ 0x21df8 00021db8 20 53 | S | MOVEA.L (A3),A0 00021dba 30 12 |0 | MOVE.W (A2),D0 00021dbc 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021dc0 42 81 |B | CLR.L D1 00021dc2 32 00 |2 | MOVE.W D0,D1 00021dc4 e3 81 | | ASL.L #0x1,D1 00021dc6 20 06 | | MOVE.L D6,D0 00021dc8 02 80 00 00 00 ff | | ANDI.L #0x000000ff,D0 00021dce 42 82 |B | CLR.L D2 00021dd0 34 30 18 00 |40 | MOVE.W (A0+D1.L),D2 00021dd4 d0 82 | | ADD.L D2,D0 00021dd6 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021ddc 63 02 |c | BLS 0x21de0 00021dde 4e 4f |NO | TRAP #15 00021de0 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021de4 42 80 |B | CLR.L D0 00021de6 30 12 |0 | MOVE.W (A2),D0 00021de8 52 80 |R | ADDQ.L #0x1,D0 00021dea 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021df0 63 02 |c | BLS 0x21df4 00021df2 4e 4f |NO | TRAP #15 00021df4 34 80 |4 | MOVE.W D0,(A2) 00021df6 60 28 |`( | BRA 0x21e20 00021df8 20 53 | S | MOVEA.L (A3),A0 00021dfa 30 12 |0 | MOVE.W (A2),D0 00021dfc 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021e00 42 81 |B | CLR.L D1 00021e02 32 00 |2 | MOVE.W D0,D1 00021e04 e3 81 | | ASL.L #0x1,D1 00021e06 28 3c 00 00 01 00 |(< | MOVE.L #0x100,D4 00021e0c 26 06 |& | MOVE.L D6,D3 00021e0e 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00021e14 20 04 | | MOVE.L D4,D0 00021e16 02 80 00 00 ff 00 | | ANDI.L #0x0000ff00,D0 00021e1c 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021e20 52 87 |R | ADDQ.L #0x1,D7 00021e22 0c 87 00 00 00 4f | O | CMPI.L #0x0000004f,D7 00021e28 6f 00 ff 72 |o r | BLE 0x21d9c 00021e2c 7e 00 |~ | MOVEQ.L #0x00,D7 00021e2e 55 4f |UO | SUBQ.L #0x2,A7 00021e30 48 78 01 d0 |Hx | PEA.L 0x1d0 00021e34 df 97 | | ADD.L D7,(A7) 00021e36 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 00021e3c 58 4f |XO | ADDQ.L #0x4,A7 00021e3e 30 1f |0 | MOVE.W (A7)+,D0 00021e40 48 c0 |H | EXTW.L D0 00021e42 2c 00 |, | MOVE.L D0,D6 00021e44 08 07 00 00 | | BTST.L #0x0,D7 00021e48 67 40 |g@ | BEQ 0x21e8a 00021e4a 20 53 | S | MOVEA.L (A3),A0 00021e4c 30 12 |0 | MOVE.W (A2),D0 00021e4e 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021e52 42 81 |B | CLR.L D1 00021e54 32 00 |2 | MOVE.W D0,D1 00021e56 e3 81 | | ASL.L #0x1,D1 00021e58 20 06 | | MOVE.L D6,D0 00021e5a 02 80 00 00 00 ff | | ANDI.L #0x000000ff,D0 00021e60 42 82 |B | CLR.L D2 00021e62 34 30 18 00 |40 | MOVE.W (A0+D1.L),D2 00021e66 d0 82 | | ADD.L D2,D0 00021e68 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021e6e 63 02 |c | BLS 0x21e72 00021e70 4e 4f |NO | TRAP #15 00021e72 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021e76 42 80 |B | CLR.L D0 00021e78 30 12 |0 | MOVE.W (A2),D0 00021e7a 52 80 |R | ADDQ.L #0x1,D0 00021e7c 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021e82 63 02 |c | BLS 0x21e86 00021e84 4e 4f |NO | TRAP #15 00021e86 34 80 |4 | MOVE.W D0,(A2) 00021e88 60 28 |`( | BRA 0x21eb2 00021e8a 20 53 | S | MOVEA.L (A3),A0 00021e8c 30 12 |0 | MOVE.W (A2),D0 00021e8e 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021e92 42 81 |B | CLR.L D1 00021e94 32 00 |2 | MOVE.W D0,D1 00021e96 e3 81 | | ASL.L #0x1,D1 00021e98 28 3c 00 00 01 00 |(< | MOVE.L #0x100,D4 00021e9e 26 06 |& | MOVE.L D6,D3 00021ea0 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00021ea6 20 04 | | MOVE.L D4,D0 00021ea8 02 80 00 00 ff 00 | | ANDI.L #0x0000ff00,D0 00021eae 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021eb2 52 87 |R | ADDQ.L #0x1,D7 00021eb4 0c 87 00 00 00 1d | | CMPI.L #0x0000001d,D7 00021eba 6f 00 ff 72 |o r | BLE 0x21e2e 00021ebe 55 4f |UO | SUBQ.L #0x2,A7 00021ec0 48 78 01 80 |Hx | PEA.L 0x180 00021ec4 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 00021eca 58 4f |XO | ADDQ.L #0x4,A7 00021ecc 30 1f |0 | MOVE.W (A7)+,D0 00021ece 48 c0 |H | EXTW.L D0 00021ed0 2c 00 |, | MOVE.L D0,D6 00021ed2 20 53 | S | MOVEA.L (A3),A0 00021ed4 30 12 |0 | MOVE.W (A2),D0 00021ed6 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021eda 42 81 |B | CLR.L D1 00021edc 32 00 |2 | MOVE.W D0,D1 00021ede e3 81 | | ASL.L #0x1,D1 00021ee0 28 3c 00 00 01 00 |(< | MOVE.L #0x100,D4 00021ee6 26 06 |& | MOVE.L D6,D3 00021ee8 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00021eee 20 04 | | MOVE.L D4,D0 00021ef0 02 80 00 00 ff 00 | | ANDI.L #0x0000ff00,D0 00021ef6 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021efa 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00021efe 4e 5e |N^ | UNLK A6 00021f00 4e 75 |Nu | RTS 00021f02 ; -------------------------------------------------------------------------------------- 00021f02 ; OMSI PASCAL Function 00021f02 ; <LVAR 0x00a 4(r)> 00021f02 ; <LVAR 0x008 2(r)> 00021f02 ; <LVAR -0x004 2(w)> 00021f02 ; <LVAR -0x006 2(r)> 00021f02 ; <LVAR -0x008 2(w)> 00021f02 ; <LVAR -0x00a 2(r)> 00021f02 ; <LVAR -0x00c 2(w)> 00021f02 ; <LVAR -0x00e 2(r)> 00021f02 ; <LVAR -0x010 2(r)> 00021f02 ; <LVAR -0x012 @ 2(w)> 00021f02 ; <LVAR -0x414 @> 00021f02 ; <LVAR -0x41e @ 4(rw)> 00021f02 ; <LVAR -0x426 @ 4(rw)> 00021f02 ; <LVAR -0x42a @ 4(rw)> 00021f02 ; -------------------------------------------------------------------------------------- 00021f02 4e 56 fb 6e |NV n | LINK.W A6,#0xfb6e 00021f06 bf d5 | | CMPA.L (A5),A7 00021f08 62 06 |b | BHI 0x21f10 00021f0a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021f0e 4e 76 |Nv | TRAPV 00021f10 de fc 00 68 | h | ADDA.W #0x68,A7 00021f14 48 e7 fb f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7) 00021f18 45 ee fb da |E | LEA.L (A6-0x426),A2 00021f1c 74 01 |t | MOVEQ.L #0x01,D2 00021f1e 26 3c 00 00 01 ff |&< | MOVE.L #0x1ff,D3 00021f24 78 0e |x | MOVEQ.L #0x0e,D4 00021f26 7c 00 || | MOVEQ.L #0x00,D6 00021f28 4d 83 |M | CHK.W D3,D6 00021f2a 42 80 |B | CLR.L D0 00021f2c 30 06 |0 | MOVE.W D6,D0 00021f2e e3 80 | | ASL.L #0x1,D0 00021f30 41 ee fb d6 |A | LEA.L (A6-0x42a),A0 00021f34 42 70 08 16 |Bp | CLR.W (A0+D0.L+#0x16) 00021f38 52 46 |RF | ADDQ.W #0x1,D6 00021f3a bc 43 | C | CMP.W D3,D6 00021f3c 63 ea |c | BLS 0x21f28 00021f3e 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00021f42 24 90 |$ | MOVE.L (A0),(A2) 00021f44 20 52 | R | MOVEA.L (A2),A0 00021f46 2f 08 |/ | MOVE.L A0,-(A7) 00021f48 b0 c2 | | CMPA.W D2,A0 00021f4a 67 2a |g* | BEQ 0x21f76 00021f4c 42 a8 00 26 |B & | CLR.L (A0+0x26) 00021f50 2d 68 00 2a fb e2 |-h * | MOVE.L (A0+0x2a),(A6-0x41e) 00021f56 20 6e fb e2 | n | MOVEA.L (A6-0x41e),A0 00021f5a b0 c2 | | CMPA.W D2,A0 00021f5c 67 0e |g | BEQ 0x21f6c 00021f5e 22 57 |"W | MOVEA.L (A7),A1 00021f60 52 a9 00 26 |R & | ADDQ.L #0x1,(A1+0x26) 00021f64 2d 68 00 04 fb e2 |-h | MOVE.L (A0+0x4),(A6-0x41e) 00021f6a 60 ea |` | BRA 0x21f56 00021f6c 20 57 | W | MOVEA.L (A7),A0 00021f6e 24 a8 00 2e |$ . | MOVE.L (A0+0x2e),(A2) 00021f72 58 4f |XO | ADDQ.L #0x4,A7 00021f74 60 ce |` | BRA 0x21f44 00021f76 58 4f |XO | ADDQ.L #0x4,A7 00021f78 7c 00 || | MOVEQ.L #0x00,D6 00021f7a 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00021f7e 22 50 |"P | MOVEA.L (A0),A1 00021f80 b2 c2 | | CMPA.W D2,A1 00021f82 67 00 01 30 |g 0 | BEQ 0x220b4 00021f86 24 89 |$ | MOVE.L A1,(A2) 00021f88 36 42 |6B | MOVEA.W D2,A3 00021f8a 7e 00 |~ | MOVEQ.L #0x00,D7 00021f8c 20 52 | R | MOVEA.L (A2),A0 00021f8e b0 c2 | | CMPA.W D2,A0 00021f90 67 16 |g | BEQ 0x21fa8 00021f92 4a 07 |J | TST.B D7 00021f94 66 12 |f | BNE 0x21fa8 00021f96 4a a8 00 26 |J & | TST.L (A0+0x26) 00021f9a 66 04 |f | BNE 0x21fa0 00021f9c 7e 01 |~ | MOVEQ.L #0x01,D7 00021f9e 60 06 |` | BRA 0x21fa6 00021fa0 26 48 |&H | MOVEA.L A0,A3 00021fa2 24 a8 00 2e |$ . | MOVE.L (A0+0x2e),(A2) 00021fa6 60 e4 |` | BRA 0x21f8c 00021fa8 4a 07 |J | TST.B D7 00021faa 66 2c |f, | BNE 0x21fd8 00021fac 41 fa e2 f2 |A | LEA.L 0x202a0,A0 00021fb0 70 0e |p | MOVEQ.L #0x0e,D0 00021fb2 3f 20 |? | MOVE.W -(A0),-(A7) 00021fb4 51 c8 ff fc |Q | DBF D0,0x21fb2 00021fb8 1f 04 | | MOVE.B D4,-(A7) 00021fba 59 4f |YO | SUBQ.L #0x4,A7 00021fbc 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021fc0 3f 02 |? | MOVE.W D2,-(A7) 00021fc2 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00021fc6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021fcc 50 4f |PO | ADDQ.L #0x8,A7 00021fce 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021fd4 de fc 00 24 | $ | ADDA.W #0x24,A7 00021fd8 4d 83 |M | CHK.W D3,D6 00021fda 42 80 |B | CLR.L D0 00021fdc 30 06 |0 | MOVE.W D6,D0 00021fde e3 80 | | ASL.L #0x1,D0 00021fe0 41 ee fb d6 |A | LEA.L (A6-0x42a),A0 00021fe4 22 52 |"R | MOVEA.L (A2),A1 00021fe6 31 a9 00 22 08 16 |1 " | MOVE.W (A1+0x22),(A0+D0.L+#0x16) 00021fec 42 80 |B | CLR.L D0 00021fee 30 06 |0 | MOVE.W D6,D0 00021ff0 22 00 |" | MOVE.L D0,D1 00021ff2 52 81 |R | ADDQ.L #0x1,D1 00021ff4 b2 83 | | CMP.L D3,D1 00021ff6 63 02 |c | BLS 0x21ffa 00021ff8 4e 4f |NO | TRAP #15 00021ffa e3 81 | | ASL.L #0x1,D1 00021ffc 41 ee fb d6 |A | LEA.L (A6-0x42a),A0 00022000 31 a9 00 24 18 16 |1 $ | MOVE.W (A1+0x24),(A0+D1.L+#0x16) 00022006 54 80 |T | ADDQ.L #0x2,D0 00022008 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 0002200e 63 02 |c | BLS 0x22012 00022010 4e 4f |NO | TRAP #15 00022012 3c 00 |< | MOVE.W D0,D6 00022014 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00022018 2d 50 fb d6 |-P | MOVE.L (A0),(A6-0x42a) 0002201c 20 6e fb d6 | n | MOVEA.L (A6-0x42a),A0 00022020 2f 08 |/ | MOVE.L A0,-(A7) 00022022 b0 c2 | | CMPA.W D2,A0 00022024 67 62 |gb | BEQ 0x22088 00022026 2d 68 00 2a fb e2 |-h * | MOVE.L (A0+0x2a),(A6-0x41e) 0002202c 38 42 |8B | MOVEA.W D2,A4 0002202e 7e 00 |~ | MOVEQ.L #0x00,D7 00022030 20 6e fb e2 | n | MOVEA.L (A6-0x41e),A0 00022034 b0 c2 | | CMPA.W D2,A0 00022036 67 18 |g | BEQ 0x22050 00022038 4a 07 |J | TST.B D7 0002203a 66 14 |f | BNE 0x22050 0002203c 22 50 |"P | MOVEA.L (A0),A1 0002203e b3 d2 | | CMPA.L (A2),A1 00022040 66 04 |f | BNE 0x22046 00022042 7e 01 |~ | MOVEQ.L #0x01,D7 00022044 60 08 |` | BRA 0x2204e 00022046 28 48 |(H | MOVEA.L A0,A4 00022048 2d 68 00 04 fb e2 |-h | MOVE.L (A0+0x4),(A6-0x41e) 0002204e 60 e0 |` | BRA 0x22030 00022050 4a 07 |J | TST.B D7 00022052 67 28 |g( | BEQ 0x2207c 00022054 22 57 |"W | MOVEA.L (A7),A1 00022056 53 a9 00 26 |S & | SUBQ.L #0x1,(A1+0x26) 0002205a b8 c2 | | CMPA.W D2,A4 0002205c 66 08 |f | BNE 0x22066 0002205e 23 68 00 04 00 2a |#h * | MOVE.L (A0+0x4),(A1+0x2a) 00022064 60 06 |` | BRA 0x2206c 00022066 29 68 00 04 00 04 |)h | MOVE.L (A0+0x4),(A4+0x4) 0002206c 48 6e fb e2 |Hn | PEA.L (A6-0x41e) 00022070 48 78 00 08 |Hx | PEA.L 0x8 00022074 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 0002207a 50 4f |PO | ADDQ.L #0x8,A7 0002207c 20 57 | W | MOVEA.L (A7),A0 0002207e 2d 68 00 2e fb d6 |-h . | MOVE.L (A0+0x2e),(A6-0x42a) 00022084 58 4f |XO | ADDQ.L #0x4,A7 00022086 60 94 |` | BRA 0x2201c 00022088 58 4f |XO | ADDQ.L #0x4,A7 0002208a b6 c2 | | CMPA.W D2,A3 0002208c 66 0c |f | BNE 0x2209a 0002208e 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00022092 22 52 |"R | MOVEA.L (A2),A1 00022094 20 a9 00 2e | . | MOVE.L (A1+0x2e),(A0) 00022098 60 08 |` | BRA 0x220a2 0002209a 20 52 | R | MOVEA.L (A2),A0 0002209c 27 68 00 2e 00 2e |'h . . | MOVE.L (A0+0x2e),(A3+0x2e) 000220a2 48 52 |HR | PEA.L (A2) 000220a4 48 78 00 32 |Hx 2 | PEA.L 0x32 000220a8 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 000220ae 50 4f |PO | ADDQ.L #0x8,A7 000220b0 60 00 fe c8 |` | BRA 0x21f7a 000220b4 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 000220b8 0c 40 00 04 | @ | CMPI.W #0x0004,D0 000220bc 66 0c |f | BNE 0x220ca 000220be 48 6e fb ec |Hn | PEA.L (A6-0x414) 000220c2 3f 06 |? | MOVE.W D6,-(A7) 000220c4 4e ba f7 40 |N @ | JSR 0x21806 000220c8 5c 4f |\O | ADDQ.L #0x6,A7 000220ca 3d 79 00 02 41 d2 ff ee |=y A | MOVE.W 0x241d2,(A6-0x12) 000220d2 42 6e ff f0 |Bn | CLR.W (A6-0x10) 000220d6 42 6e ff f2 |Bn | CLR.W (A6-0xe) 000220da 3d 7c 01 00 ff f4 |=| | MOVE.W #0x100,(A6-0xc) 000220e0 42 6e ff f6 |Bn | CLR.W (A6-0xa) 000220e4 3d 6e 00 08 ff f8 |=n | MOVE.W (A6+0x8),(A6-0x8) 000220ea 42 6e ff fa |Bn | CLR.W (A6-0x6) 000220ee 3d 44 ff fc |=D | MOVE.W D4,(A6-0x4) 000220f2 48 6e ff ee |Hn | PEA.L (A6-0x12) 000220f6 41 ee fb ec |A | LEA.L (A6-0x414),A0 000220fa 2f 08 |/ | MOVE.L A0,-(A7) 000220fc 1f 02 | | MOVE.B D2,-(A7) 000220fe 4e ba f2 12 |N | JSR 0x21312 00022102 de fc 00 0a | | ADDA.W #0xa,A7 00022106 4c df 1f df |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2+A3+A4 0002210a 4e 5e |N^ | UNLK A6 0002210c 4e 75 |Nu | RTS 0002210e ; -------------------------------------------------------------------------------------- 0002210e ; OMSI PASCAL Function 0002210e ; <LVAR 0x00c 4(w)> 0002210e ; <LVAR 0x008 @ 4(r)> 0002210e ; <LVAR -0x003 @ 1(rw)> 0002210e ; <LVAR -0x008 @ 4(rw)> 0002210e ; -------------------------------------------------------------------------------------- 0002210e 4e 56 ff 98 |NV | LINK.W A6,#0xff98 00022112 bf d5 | | CMPA.L (A5),A7 00022114 62 06 |b | BHI 0x2211c 00022116 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002211a 4e 76 |Nv | TRAPV 0002211c de fc 00 60 | ` | ADDA.W #0x60,A7 00022120 48 e7 f9 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 00022124 45 ee ff f8 |E | LEA.L (A6-0x8),A2 00022128 47 ee 00 08 |G | LEA.L (A6+0x8),A3 0002212c 49 ee ff fd |I | LEA.L (A6-0x3),A4 00022130 72 01 |r | MOVEQ.L #0x01,D1 00022132 74 1e |t | MOVEQ.L #0x1e,D2 00022134 76 20 |v | MOVEQ.L #0x20,D3 00022136 78 0e |x | MOVEQ.L #0x0e,D4 00022138 59 4f |YO | SUBQ.L #0x4,A7 0002213a 2f 13 |/ | MOVE.L (A3),-(A7) 0002213c 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00022142 58 4f |XO | ADDQ.L #0x4,A7 00022144 24 9f |$ | MOVE.L (A7)+,(A2) 00022146 2f 12 |/ | MOVE.L (A2),-(A7) 00022148 2f 13 |/ | MOVE.L (A3),-(A7) 0002214a 48 54 |HT | PEA.L (A4) 0002214c 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 00022152 de fc 00 0c | | ADDA.W #0xc,A7 00022156 4a 14 |J | TST.B (A4) 00022158 66 30 |f0 | BNE 0x2218a 0002215a 9e c3 | | SUBA.W D3,A7 0002215c 20 4f | O | MOVEA.L A7,A0 0002215e 43 fa e1 40 |C @ | LEA.L 0x202a0,A1 00022162 70 1e |p | MOVEQ.L #0x1e,D0 00022164 10 d9 | | MOVE.B (A1)+,(A0)+ 00022166 51 c8 ff fc |Q | DBF D0,0x22164 0002216a 1f 04 | | MOVE.B D4,-(A7) 0002216c 59 4f |YO | SUBQ.L #0x4,A7 0002216e 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00022172 3f 01 |? | MOVE.W D1,-(A7) 00022174 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7) 00022178 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002217e 50 4f |PO | ADDQ.L #0x8,A7 00022180 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022186 de fc 00 26 | & | ADDA.W #0x26,A7 0002218a 48 52 |HR | PEA.L (A2) 0002218c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022192 58 4f |XO | ADDQ.L #0x4,A7 00022194 7e 00 |~ | MOVEQ.L #0x00,D7 00022196 59 4f |YO | SUBQ.L #0x4,A7 00022198 1f 07 | | MOVE.B D7,-(A7) 0002219a 4e b9 00 01 05 86 |N | JSR Config_Entry_Name(a : Byte) : String 000221a0 54 4f |TO | ADDQ.L #0x2,A7 000221a2 24 97 |$ | MOVE.L (A7),(A2) 000221a4 54 4f |TO | ADDQ.L #0x2,A7 000221a6 2f 13 |/ | MOVE.L (A3),-(A7) 000221a8 2f 12 |/ | MOVE.L (A2),-(A7) 000221aa 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000221b0 50 4f |PO | ADDQ.L #0x8,A7 000221b2 10 1f | | MOVE.B (A7)+,D0 000221b4 48 80 |H | EXTB.W D0 000221b6 41 81 |A | CHK.W D1,D0 000221b8 18 80 | | MOVE.B D0,(A4) 000221ba 48 52 |HR | PEA.L (A2) 000221bc 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000221c2 58 4f |XO | ADDQ.L #0x4,A7 000221c4 4a 00 |J | TST.B D0 000221c6 67 36 |g6 | BEQ 0x221fe 000221c8 10 07 | | MOVE.B D7,D0 000221ca 48 80 |H | EXTB.W D0 000221cc eb 40 | @ | ASL.W #0x5,D0 000221ce 41 f9 00 02 3e 90 |A > | LEA.L 0x23e90,A0 000221d4 9e c2 | | SUBA.W D2,A7 000221d6 22 4f |"O | MOVEA.L A7,A1 000221d8 41 f0 00 5d |A ] | LEA.L (A0+D0.W+#0x5d),A0 000221dc 70 1d |p | MOVEQ.L #0x1d,D0 000221de 12 d8 | | MOVE.B (A0)+,(A1)+ 000221e0 51 c8 ff fc |Q | DBF D0,0x221de 000221e4 59 4f |YO | SUBQ.L #0x4,A7 000221e6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000221ea 3f 01 |? | MOVE.W D1,-(A7) 000221ec 3f 02 |? | MOVE.W D2,-(A7) 000221ee 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000221f4 50 4f |PO | ADDQ.L #0x8,A7 000221f6 2d 5f 00 0c |-_ | MOVE.L (A7)+,(A6+0xc) 000221fa de c2 | | ADDA.W D2,A7 000221fc 60 42 |`B | BRA 0x22240 000221fe 52 07 |R | ADDQ.B #0x1,D7 00022200 0c 07 00 09 | | CMPI.B #0x09,D7 00022204 6f 90 |o | BLE 0x22196 00022206 9e fc 00 1a | | SUBA.W #0x1a,A7 0002220a 20 4f | O | MOVEA.L A7,A0 0002220c 43 fa e0 b2 |C | LEA.L 0x202c0,A1 00022210 70 18 |p | MOVEQ.L #0x18,D0 00022212 10 d9 | | MOVE.B (A1)+,(A0)+ 00022214 51 c8 ff fc |Q | DBF D0,0x22212 00022218 1f 04 | | MOVE.B D4,-(A7) 0002221a 51 4f |QO | SUBQ.L #0x8,A7 0002221c 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00022220 3f 01 |? | MOVE.W D1,-(A7) 00022222 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00022226 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002222c 58 4f |XO | ADDQ.L #0x4,A7 0002222e 2e 93 |. | MOVE.L (A3),(A7) 00022230 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022236 50 4f |PO | ADDQ.L #0x8,A7 00022238 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002223e de c3 | | ADDA.W D3,A7 00022240 48 53 |HS | PEA.L (A3) 00022242 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022248 58 4f |XO | ADDQ.L #0x4,A7 0002224a 4c df 1f 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4 0002224e 4e 5e |N^ | UNLK A6 00022250 4e 75 |Nu | RTS 00022252 ; -------------------------------------------------------------------------------------- 00022252 ; OMSI PASCAL Function 00022252 ; <LVAR -0x010 @ 4(rw)> 00022252 ; <LVAR -0x018 4(rw)> 00022252 ; <LVAR -0x01c 4(rw)> 00022252 ; <LVAR -0x03a @> 00022252 ; <LVAR -0x03e @ 4(rw)> 00022252 ; -------------------------------------------------------------------------------------- 00022252 4e 56 ff 26 |NV & | LINK.W A6,#0xff26 00022256 bf d5 | | CMPA.L (A5),A7 00022258 62 06 |b | BHI 0x22260 0002225a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002225e 4e 76 |Nv | TRAPV 00022260 de fc 00 9a | | ADDA.W #0x9a,A7 00022264 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022268 74 01 |t | MOVEQ.L #0x01,D2 0002226a 76 1e |v | MOVEQ.L #0x1e,D3 0002226c 78 1d |x | MOVEQ.L #0x1d,D4 0002226e 48 6e ff c2 |Hn | PEA.L (A6-0x3e) 00022272 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00022278 58 4f |XO | ADDQ.L #0x4,A7 0002227a 7a 00 |z | MOVEQ.L #0x00,D5 0002227c 10 05 | | MOVE.B D5,D0 0002227e 48 80 |H | EXTB.W D0 00022280 eb 40 | @ | ASL.W #0x5,D0 00022282 41 f9 00 02 3e 90 |A > | LEA.L 0x23e90,A0 00022288 9e c3 | | SUBA.W D3,A7 0002228a 22 4f |"O | MOVEA.L A7,A1 0002228c 41 f0 00 5d |A ] | LEA.L (A0+D0.W+#0x5d),A0 00022290 70 1d |p | MOVEQ.L #0x1d,D0 00022292 12 d8 | | MOVE.B (A0)+,(A1)+ 00022294 51 c8 ff fc |Q | DBF D0,0x22292 00022298 59 4f |YO | SUBQ.L #0x4,A7 0002229a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002229e 3f 02 |? | MOVE.W D2,-(A7) 000222a0 3f 03 |? | MOVE.W D3,-(A7) 000222a2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000222a8 50 4f |PO | ADDQ.L #0x8,A7 000222aa 2d 5f ff c2 |-_ | MOVE.L (A7)+,(A6-0x3e) 000222ae de c3 | | ADDA.W D3,A7 000222b0 7c 01 || | MOVEQ.L #0x01,D6 000222b2 20 6e ff c2 | n | MOVEA.L (A6-0x3e),A0 000222b6 30 10 |0 | MOVE.W (A0),D0 000222b8 48 c0 |H | EXTW.L D0 000222ba bc 80 | | CMP.L D0,D6 000222bc 6f 10 |o | BLE 0x222ce 000222be 20 06 | | MOVE.L D6,D0 000222c0 53 80 |S | SUBQ.L #0x1,D0 000222c2 b0 84 | | CMP.L D4,D0 000222c4 63 02 |c | BLS 0x222c8 000222c6 4e 4f |NO | TRAP #15 000222c8 42 36 08 c6 |B6 | CLR.B (A6+D0.L-#0x3a) 000222cc 60 1e |` | BRA 0x222ec 000222ce 20 06 | | MOVE.L D6,D0 000222d0 53 80 |S | SUBQ.L #0x1,D0 000222d2 b0 84 | | CMP.L D4,D0 000222d4 63 02 |c | BLS 0x222d8 000222d6 4e 4f |NO | TRAP #15 000222d8 22 06 |" | MOVE.L D6,D1 000222da 53 81 |S | SUBQ.L #0x1,D1 000222dc 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 000222e2 63 02 |c | BLS 0x222e6 000222e4 4e 4f |NO | TRAP #15 000222e6 1d b0 18 02 08 c6 | | MOVE.B (A0+D1.L+#0x2),(A6+D0.L-#0x3a) 000222ec 52 86 |R | ADDQ.L #0x1,D6 000222ee bc 83 | | CMP.L D3,D6 000222f0 6f c0 |o | BLE 0x222b2 000222f2 2d 79 00 02 41 ca ff e4 |-y A | MOVE.L 0x241ca,(A6-0x1c) 000222fa 36 42 |6B | MOVEA.W D2,A3 000222fc 7e 00 |~ | MOVEQ.L #0x00,D7 000222fe 20 6e ff e4 | n | MOVEA.L (A6-0x1c),A0 00022302 b0 c2 | | CMPA.W D2,A0 00022304 67 22 |g" | BEQ 0x22328 00022306 4a 07 |J | TST.B D7 00022308 66 1e |f | BNE 0x22328 0002230a 43 ee ff c6 |C | LEA.L (A6-0x3a),A1 0002230e 24 48 |$H | MOVEA.L A0,A2 00022310 70 1d |p | MOVEQ.L #0x1d,D0 00022312 b5 09 | | CMPM.B (A1)+,(A2)+ 00022314 56 c8 ff fc |V | DBNE D0,0x22312 00022318 66 04 |f | BNE 0x2231e 0002231a 7e 01 |~ | MOVEQ.L #0x01,D7 0002231c 60 08 |` | BRA 0x22326 0002231e 26 48 |&H | MOVEA.L A0,A3 00022320 2d 68 00 2e ff e4 |-h . | MOVE.L (A0+0x2e),(A6-0x1c) 00022326 60 d6 |` | BRA 0x222fe 00022328 4a 07 |J | TST.B D7 0002232a 66 52 |fR | BNE 0x2237e 0002232c 41 fa df d6 |A | LEA.L 0x20304,A0 00022330 70 14 |p | MOVEQ.L #0x14,D0 00022332 3f 20 |? | MOVE.W -(A0),-(A7) 00022334 51 c8 ff fc |Q | DBF D0,0x22332 00022338 41 ee ff e4 |A | LEA.L (A6-0x1c),A0 0002233c 70 0e |p | MOVEQ.L #0x0e,D0 0002233e 3f 20 |? | MOVE.W -(A0),-(A7) 00022340 51 c8 ff fc |Q | DBF D0,0x2233e 00022344 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00022348 51 4f |QO | SUBQ.L #0x8,A7 0002234a 48 6f 00 28 |Ho ( | PEA.L (A7+0x28) 0002234e 3f 02 |? | MOVE.W D2,-(A7) 00022350 3f 3c 00 2a |?< * | MOVE.W #0x2a,-(A7) 00022354 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002235a 58 4f |XO | ADDQ.L #0x4,A7 0002235c 48 6f 00 0e |Ho | PEA.L (A7+0xe) 00022360 3f 02 |? | MOVE.W D2,-(A7) 00022362 3f 03 |? | MOVE.W D3,-(A7) 00022364 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002236a 50 4f |PO | ADDQ.L #0x8,A7 0002236c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022372 50 4f |PO | ADDQ.L #0x8,A7 00022374 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002237a de fc 00 4e | N | ADDA.W #0x4e,A7 0002237e b6 c2 | | CMPA.W D2,A3 00022380 66 0e |f | BNE 0x22390 00022382 20 6e ff e4 | n | MOVEA.L (A6-0x1c),A0 00022386 23 e8 00 2e 00 02 41 ca |# . A | MOVE.L (A0+0x2e),0x241ca 0002238e 60 0a |` | BRA 0x2239a 00022390 20 6e ff e4 | n | MOVEA.L (A6-0x1c),A0 00022394 27 68 00 2e 00 2e |'h . . | MOVE.L (A0+0x2e),(A3+0x2e) 0002239a 20 6e ff e4 | n | MOVEA.L (A6-0x1c),A0 0002239e 21 79 00 02 41 ce 00 2e |!y A .| MOVE.L 0x241ce,(A0+0x2e) 000223a6 23 ee ff e4 00 02 41 ce |# A | MOVE.L (A6-0x1c),0x241ce 000223ae 52 05 |R | ADDQ.B #0x1,D5 000223b0 0c 05 00 04 | | CMPI.B #0x04,D5 000223b4 6f 00 fe c6 |o | BLE 0x2227c 000223b8 48 6e ff c2 |Hn | PEA.L (A6-0x3e) 000223bc 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000223c2 58 4f |XO | ADDQ.L #0x4,A7 000223c4 2d 79 00 02 41 ce ff e8 |-y A | MOVE.L 0x241ce,(A6-0x18) 000223cc 20 6e ff e8 | n | MOVEA.L (A6-0x18),A0 000223d0 b0 c2 | | CMPA.W D2,A0 000223d2 67 00 00 84 |g | BEQ 0x22458 000223d6 2d 79 00 02 41 ca ff e4 |-y A | MOVE.L 0x241ca,(A6-0x1c) 000223de 20 6e ff e4 | n | MOVEA.L (A6-0x1c),A0 000223e2 2f 08 |/ | MOVE.L A0,-(A7) 000223e4 b0 c2 | | CMPA.W D2,A0 000223e6 67 60 |g` | BEQ 0x22448 000223e8 2d 68 00 2a ff f0 |-h * | MOVE.L (A0+0x2a),(A6-0x10) 000223ee 38 42 |8B | MOVEA.W D2,A4 000223f0 7e 00 |~ | MOVEQ.L #0x00,D7 000223f2 20 6e ff f0 | n | MOVEA.L (A6-0x10),A0 000223f6 b0 c2 | | CMPA.W D2,A0 000223f8 67 1a |g | BEQ 0x22414 000223fa 4a 07 |J | TST.B D7 000223fc 66 16 |f | BNE 0x22414 000223fe 22 50 |"P | MOVEA.L (A0),A1 00022400 b3 ee ff e8 | | CMPA.L (A6-0x18),A1 00022404 66 04 |f | BNE 0x2240a 00022406 7e 01 |~ | MOVEQ.L #0x01,D7 00022408 60 08 |` | BRA 0x22412 0002240a 28 48 |(H | MOVEA.L A0,A4 0002240c 2d 68 00 04 ff f0 |-h | MOVE.L (A0+0x4),(A6-0x10) 00022412 60 de |` | BRA 0x223f2 00022414 4a 07 |J | TST.B D7 00022416 67 24 |g$ | BEQ 0x2243c 00022418 b8 c2 | | CMPA.W D2,A4 0002241a 66 0a |f | BNE 0x22426 0002241c 22 57 |"W | MOVEA.L (A7),A1 0002241e 23 68 00 04 00 2a |#h * | MOVE.L (A0+0x4),(A1+0x2a) 00022424 60 06 |` | BRA 0x2242c 00022426 29 68 00 04 00 04 |)h | MOVE.L (A0+0x4),(A4+0x4) 0002242c 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00022430 48 78 00 08 |Hx | PEA.L 0x8 00022434 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 0002243a 50 4f |PO | ADDQ.L #0x8,A7 0002243c 20 57 | W | MOVEA.L (A7),A0 0002243e 2d 68 00 2e ff e4 |-h . | MOVE.L (A0+0x2e),(A6-0x1c) 00022444 58 4f |XO | ADDQ.L #0x4,A7 00022446 60 96 |` | BRA 0x223de 00022448 58 4f |XO | ADDQ.L #0x4,A7 0002244a 20 6e ff e8 | n | MOVEA.L (A6-0x18),A0 0002244e 2d 68 00 2e ff e8 |-h . | MOVE.L (A0+0x2e),(A6-0x18) 00022454 60 00 ff 76 |` v | BRA 0x223cc 00022458 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 0002245c 4e 5e |N^ | UNLK A6 0002245e 4e 75 |Nu | RTS 00022460 ; -------------------------------------------------------------------------------------- 00022460 ; OMSI PASCAL Function 00022460 ; -------------------------------------------------------------------------------------- 00022460 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 00022464 bf d5 | | CMPA.L (A5),A7 00022466 62 06 |b | BHI 0x2246e 00022468 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002246c 4e 76 |Nv | TRAPV 0002246e de fc 00 4e | N | ADDA.W #0x4e,A7 00022472 48 e7 e0 c0 |H | MOVEM.L A1+A0+D2+D1+D0,-(A7) 00022476 72 01 |r | MOVEQ.L #0x01,D1 00022478 74 2a |t* | MOVEQ.L #0x2a,D2 0002247a 59 4f |YO | SUBQ.L #0x4,A7 0002247c 4e b9 00 01 03 f8 |N | JSR GetConsoleConfig() : Long 00022482 20 1f | | MOVE.L (A7)+,D0 00022484 0c 80 00 00 00 03 | | CMPI.L #0x00000003,D0 0002248a 66 5c |f\ | BNE 0x224e8 0002248c 41 fa de 9c |A | LEA.L 0x2032a,A0 00022490 70 12 |p | MOVEQ.L #0x12,D0 00022492 3f 20 |? | MOVE.W -(A0),-(A7) 00022494 51 c8 ff fc |Q | DBF D0,0x22492 00022498 59 4f |YO | SUBQ.L #0x4,A7 0002249a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002249e 3f 01 |? | MOVE.W D1,-(A7) 000224a0 3f 3c 00 26 |?< & | MOVE.W #0x26,-(A7) 000224a4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000224aa 50 4f |PO | ADDQ.L #0x8,A7 000224ac 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000224b2 de c2 | | ADDA.W D2,A7 000224b4 4e b9 00 01 02 16 |N | JSR KC0b 000224ba 9e c2 | | SUBA.W D2,A7 000224bc 20 4f | O | MOVEA.L A7,A0 000224be 43 fa de 6a |C j | LEA.L 0x2032a,A1 000224c2 70 28 |p( | MOVEQ.L #0x28,D0 000224c4 10 d9 | | MOVE.B (A1)+,(A0)+ 000224c6 51 c8 ff fc |Q | DBF D0,0x224c4 000224ca 59 4f |YO | SUBQ.L #0x4,A7 000224cc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000224d0 3f 01 |? | MOVE.W D1,-(A7) 000224d2 3f 3c 00 29 |?< ) | MOVE.W #0x29,-(A7) 000224d6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000224dc 50 4f |PO | ADDQ.L #0x8,A7 000224de 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000224e4 de fc 00 2e | . | ADDA.W #0x2e,A7 000224e8 4c df 03 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1 000224ec 4e 5e |N^ | UNLK A6 000224ee 4e 75 |Nu | RTS 000224f0 ; -------------------------------------------------------------------------------------- 000224f0 ; OMSI PASCAL Function 000224f0 ; <LVAR -0x001 1(r)> 000224f0 ; <LVAR -0x002 1(r)> 000224f0 ; <LVAR -0x003 1(r)> 000224f0 ; <LVAR -0x004 @ 1(r)> 000224f0 ; <LVAR -0x404 @> 000224f0 ; <LVAR -0x406 2(w)> 000224f0 ; <LVAR -0x408 2(w) 4(w)> 000224f0 ; <LVAR -0x40c 4(w)> 000224f0 ; <LVAR -0x410 2(w) 4(w)> 000224f0 ; <LVAR -0x414 @ 2(w) 4(w)> 000224f0 ; -------------------------------------------------------------------------------------- 000224f0 4e 56 fb 96 |NV | LINK.W A6,#0xfb96 000224f4 bf d5 | | CMPA.L (A5),A7 000224f6 62 06 |b | BHI 0x224fe 000224f8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000224fc 4e 76 |Nv | TRAPV 000224fe de fc 00 56 | V | ADDA.W #0x56,A7 00022502 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7) 00022506 43 ee fb ec |C | LEA.L (A6-0x414),A1 0002250a 4e ba fd 46 |N F | JSR 0x22252 0002250e 48 79 00 02 41 ce |Hy A | PEA.L 0x241ce 00022514 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00022518 4e ba f9 e8 |N | JSR 0x21f02 0002251c 5c 4f |\O | ADDQ.L #0x6,A7 0002251e 48 79 00 02 41 ca |Hy A | PEA.L 0x241ca 00022524 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00022528 4e ba f9 d8 |N | JSR 0x21f02 0002252c 5c 4f |\O | ADDQ.L #0x6,A7 0002252e 4e ba ff 30 |N 0 | JSR 0x22460 00022532 4e ba e2 32 |N 2 | JSR 0x20766 00022536 41 fa de 52 |A R | LEA.L 0x2038a,A0 0002253a 70 1a |p | MOVEQ.L #0x1a,D0 0002253c 3f 20 |? | MOVE.W -(A0),-(A7) 0002253e 51 c8 ff fc |Q | DBF D0,0x2253c 00022542 59 4f |YO | SUBQ.L #0x4,A7 00022544 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022548 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002254c 3f 3c 00 36 |?< 6 | MOVE.W #0x36,-(A7) 00022550 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022556 50 4f |PO | ADDQ.L #0x8,A7 00022558 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002255e de fc 00 3a | : | ADDA.W #0x3a,A7 00022562 22 ba e0 f0 |" | MOVE.L 0x20654,(A1) 00022566 2d 7a e0 f0 fb f0 |-z | MOVE.L 0x20658,(A6-0x410) 0002256c 2d 7a e0 ee fb f4 |-z | MOVE.L 0x2065c,(A6-0x40c) 00022572 2d 7a e0 ec fb f8 |-z | MOVE.L 0x20660,(A6-0x408) 00022578 48 51 |HQ | PEA.L (A1) 0002257a 4e ba e2 b8 |N | JSR 0x20834 0002257e 58 4f |XO | ADDQ.L #0x4,A7 00022580 48 6e ff fc |Hn | PEA.L (A6-0x4) 00022584 4e b9 00 01 05 9e |N | JSR ReadClusterNo(VAR a : Long) 0002258a 58 4f |XO | ADDQ.L #0x4,A7 0002258c 42 80 |B | CLR.L D0 0002258e 10 2e ff fc | . | MOVE.B (A6-0x4),D0 00022592 e1 40 | @ | ASL.W #0x8,D0 00022594 42 81 |B | CLR.L D1 00022596 12 2e ff fd | . | MOVE.B (A6-0x3),D1 0002259a d2 40 | @ | ADD.W D0,D1 0002259c 3d 41 fb f8 |=A | MOVE.W D1,(A6-0x408) 000225a0 42 80 |B | CLR.L D0 000225a2 10 2e ff fe | . | MOVE.B (A6-0x2),D0 000225a6 e1 40 | @ | ASL.W #0x8,D0 000225a8 42 81 |B | CLR.L D1 000225aa 12 2e ff ff | . | MOVE.B (A6-0x1),D1 000225ae d2 40 | @ | ADD.W D0,D1 000225b0 3d 41 fb fa |=A | MOVE.W D1,(A6-0x406) 000225b4 55 4f |UO | SUBQ.L #0x2,A7 000225b6 4e b9 00 01 05 ce |N | JSR ReadKeySwitch() : Bool 000225bc 4a 1f |J | TST.B (A7)+ 000225be 67 06 |g | BEQ 0x225c6 000225c0 00 6e 80 00 fb f0 | n | ORI.W #0x8000,(A6-0x410) 000225c6 32 b9 00 02 41 d2 |2 A | MOVE.W 0x241d2,(A1) 000225cc 02 51 ff 00 | Q | ANDI.W #0xff00,(A1) 000225d0 48 51 |HQ | PEA.L (A1) 000225d2 41 ee fb fc |A | LEA.L (A6-0x404),A0 000225d6 2f 08 |/ | MOVE.L A0,-(A7) 000225d8 42 27 |B' | CLR.B -(A7) 000225da 4e ba ed 36 |N 6 | JSR 0x21312 000225de de fc 00 0a | | ADDA.W #0xa,A7 000225e2 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1 000225e6 4e 5e |N^ | UNLK A6 000225e8 4e 75 |Nu | RTS 000225ea ; -------------------------------------------------------------------------------------- 000225ea ; OMSI PASCAL Function 000225ea ; <LVAR 0x00c 1(w)> 000225ea ; <LVAR 0x008 4(r)> 000225ea ; <LVAR -0x002 @> 000225ea ; <LVAR -0x006 @ 4(r)> 000225ea ; <LVAR -0x00c @ 4(rw)> 000225ea ; -------------------------------------------------------------------------------------- 000225ea 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 000225ee bf d5 | | CMPA.L (A5),A7 000225f0 62 06 |b | BHI 0x225f8 000225f2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000225f6 4e 76 |Nv | TRAPV 000225f8 de fc 00 42 | B | ADDA.W #0x42,A7 000225fc 48 e7 e3 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D2+D1+D0,-(A7) 00022600 45 ee ff fa |E | LEA.L (A6-0x6),A2 00022604 47 ee ff f4 |G | LEA.L (A6-0xc),A3 00022608 72 0a |r | MOVEQ.L #0x0a,D1 0002260a 74 01 |t | MOVEQ.L #0x01,D2 0002260c 1d 7c 00 04 00 0c | | | MOVE.B #0x04,(A6+0xc) 00022612 48 52 |HR | PEA.L (A2) 00022614 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 0002261a 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 0002261e 2f 12 |/ | MOVE.L (A2),-(A7) 00022620 48 6e ff fe |Hn | PEA.L (A6-0x2) 00022624 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 0002262a de fc 00 0c | | ADDA.W #0xc,A7 0002262e 7e 00 |~ | MOVEQ.L #0x00,D7 00022630 10 07 | | MOVE.B D7,D0 00022632 48 80 |H | EXTB.W D0 00022634 c1 c1 | | MULS.W D1,D0 00022636 41 fa e0 2c |A , | LEA.L 0x20664,A0 0002263a 9e c1 | | SUBA.W D1,A7 0002263c 22 4f |"O | MOVEA.L A7,A1 0002263e 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00022642 70 09 |p | MOVEQ.L #0x09,D0 00022644 12 d8 | | MOVE.B (A0)+,(A1)+ 00022646 51 c8 ff fc |Q | DBF D0,0x22644 0002264a 59 4f |YO | SUBQ.L #0x4,A7 0002264c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022650 3f 02 |? | MOVE.W D2,-(A7) 00022652 3f 01 |? | MOVE.W D1,-(A7) 00022654 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002265a 50 4f |PO | ADDQ.L #0x8,A7 0002265c 26 9f |& | MOVE.L (A7)+,(A3) 0002265e 58 4f |XO | ADDQ.L #0x4,A7 00022660 2e 92 |. | MOVE.L (A2),(A7) 00022662 2f 13 |/ | MOVE.L (A3),-(A7) 00022664 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 0002266a 50 4f |PO | ADDQ.L #0x8,A7 0002266c 10 1f | | MOVE.B (A7)+,D0 0002266e 48 80 |H | EXTB.W D0 00022670 41 82 |A | CHK.W D2,D0 00022672 1c 00 | | MOVE.B D0,D6 00022674 48 53 |HS | PEA.L (A3) 00022676 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002267c 58 4f |XO | ADDQ.L #0x4,A7 0002267e 4a 06 |J | TST.B D6 00022680 67 06 |g | BEQ 0x22688 00022682 1d 47 00 0c | G | MOVE.B D7,(A6+0xc) 00022686 60 08 |` | BRA 0x22690 00022688 52 07 |R | ADDQ.B #0x1,D7 0002268a 0c 07 00 03 | | CMPI.B #0x03,D7 0002268e 6f a0 |o | BLE 0x22630 00022690 48 52 |HR | PEA.L (A2) 00022692 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022698 58 4f |XO | ADDQ.L #0x4,A7 0002269a 4c df 0f c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0+A1+A2+A3 0002269e 4e 5e |N^ | UNLK A6 000226a0 4e 75 |Nu | RTS 000226a2 ; -------------------------------------------------------------------------------------- 000226a2 ; OMSI PASCAL Function 000226a2 ; <LVAR 0x00c 4(r)> 000226a2 ; <LVAR 0x008 @ 4(r)> 000226a2 ; <LVAR -0x004 @ 1(r)> 000226a2 ; <LVAR -0x008 @ 4(r)> 000226a2 ; <LVAR -0x00c 4(w)> 000226a2 ; <LVAR -0x010 @ 4(w)> 000226a2 ; -------------------------------------------------------------------------------------- 000226a2 4e 56 ff a0 |NV | LINK.W A6,#0xffa0 000226a6 bf d5 | | CMPA.L (A5),A7 000226a8 62 06 |b | BHI 0x226b0 000226aa 44 fc 00 02 |D | MOVE.W #0x2,CCR 000226ae 4e 76 |Nv | TRAPV 000226b0 de fc 00 50 | P | ADDA.W #0x50,A7 000226b4 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 000226b8 45 ee ff f8 |E | LEA.L (A6-0x8),A2 000226bc 47 ee ff fc |G | LEA.L (A6-0x4),A3 000226c0 49 ee 00 08 |I | LEA.L (A6+0x8),A4 000226c4 72 0c |r | MOVEQ.L #0x0c,D1 000226c6 48 52 |HR | PEA.L (A2) 000226c8 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000226ce 2e 94 |. | MOVE.L (A4),(A7) 000226d0 2f 12 |/ | MOVE.L (A2),-(A7) 000226d2 48 53 |HS | PEA.L (A3) 000226d4 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 000226da de c1 | | ADDA.W D1,A7 000226dc 4a 13 |J | TST.B (A3) 000226de 67 0e |g | BEQ 0x226ee 000226e0 2f 14 |/ | MOVE.L (A4),-(A7) 000226e2 2f 12 |/ | MOVE.L (A2),-(A7) 000226e4 48 53 |HS | PEA.L (A3) 000226e6 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 000226ec de c1 | | ADDA.W D1,A7 000226ee 4a 13 |J | TST.B (A3) 000226f0 66 30 |f0 | BNE 0x22722 000226f2 41 fa dc ea |A | LEA.L 0x203de,A0 000226f6 70 10 |p | MOVEQ.L #0x10,D0 000226f8 3f 20 |? | MOVE.W -(A0),-(A7) 000226fa 51 c8 ff fc |Q | DBF D0,0x226f8 000226fe 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00022702 59 4f |YO | SUBQ.L #0x4,A7 00022704 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00022708 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002270c 3f 3c 00 22 |?< " | MOVE.W #0x22,-(A7) 00022710 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022716 50 4f |PO | ADDQ.L #0x8,A7 00022718 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002271e de fc 00 28 | ( | ADDA.W #0x28,A7 00022722 51 4f |QO | SUBQ.L #0x8,A7 00022724 2f 12 |/ | MOVE.L (A2),-(A7) 00022726 48 78 00 10 |Hx | PEA.L 0x10 0002272a 4e b9 00 01 03 60 |N ` | JSR ?StringToInt64() 00022730 50 4f |PO | ADDQ.L #0x8,A7 00022732 2d 5f ff f0 |-_ | MOVE.L (A7)+,(A6-0x10) 00022736 2d 5f ff f4 |-_ | MOVE.L (A7)+,(A6-0xc) 0002273a 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 0002273e 41 e8 00 1e |A | LEA.L (A0+0x1e),A0 00022742 43 ee ff f0 |C | LEA.L (A6-0x10),A1 00022746 70 07 |p | MOVEQ.L #0x07,D0 00022748 10 d9 | | MOVE.B (A1)+,(A0)+ 0002274a 51 c8 ff fc |Q | DBF D0,0x22748 0002274e 48 54 |HT | PEA.L (A4) 00022750 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022756 58 4f |XO | ADDQ.L #0x4,A7 00022758 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 0002275c 4e 5e |N^ | UNLK A6 0002275e 4e 75 |Nu | RTS 00022760 ; -------------------------------------------------------------------------------------- 00022760 ; OMSI PASCAL Function 00022760 ; <LVAR 0x00c 4(r)> 00022760 ; <LVAR 0x008 @ 4(rw)> 00022760 ; <LVAR -0x003 @ 1(r)> 00022760 ; <LVAR -0x006 @ 1(r)> 00022760 ; <LVAR -0x00a @ 4(r)> 00022760 ; <LVAR -0x00e @ 4(rw)> 00022760 ; <LVAR -0x016 @ 4(rw)> 00022760 ; <LVAR -0x01a @ 4(rw)> 00022760 ; <LVAR -0x01c @> 00022760 ; <LVAR -0x020 @ 4(r)> 00022760 ; -------------------------------------------------------------------------------------- 00022760 4e 56 ff 7c |NV | | LINK.W A6,#0xff7c 00022764 bf d5 | | CMPA.L (A5),A7 00022766 62 06 |b | BHI 0x2276e 00022768 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002276c 4e 76 |Nv | TRAPV 0002276e de fc 00 64 | d | ADDA.W #0x64,A7 00022772 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022776 47 ee ff e6 |G | LEA.L (A6-0x1a),A3 0002277a 74 01 |t | MOVEQ.L #0x01,D2 0002277c 76 0e |v | MOVEQ.L #0x0e,D3 0002277e 78 1e |x | MOVEQ.L #0x1e,D4 00022780 7a 02 |z | MOVEQ.L #0x02,D5 00022782 48 53 |HS | PEA.L (A3) 00022784 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 0002278a 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 0002278e 2f 13 |/ | MOVE.L (A3),-(A7) 00022790 48 6e ff fd |Hn | PEA.L (A6-0x3) 00022794 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 0002279a de fc 00 0c | | ADDA.W #0xc,A7 0002279e 4a 2e ff fd |J. | TST.B (A6-0x3) 000227a2 66 30 |f0 | BNE 0x227d4 000227a4 9e c4 | | SUBA.W D4,A7 000227a6 20 4f | O | MOVEA.L A7,A0 000227a8 43 fa dc 34 |C 4 | LEA.L 0x203de,A1 000227ac 70 1c |p | MOVEQ.L #0x1c,D0 000227ae 10 d9 | | MOVE.B (A1)+,(A0)+ 000227b0 51 c8 ff fc |Q | DBF D0,0x227ae 000227b4 1f 03 | | MOVE.B D3,-(A7) 000227b6 59 4f |YO | SUBQ.L #0x4,A7 000227b8 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000227bc 3f 02 |? | MOVE.W D2,-(A7) 000227be 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 000227c2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000227c8 50 4f |PO | ADDQ.L #0x8,A7 000227ca 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000227d0 de fc 00 24 | $ | ADDA.W #0x24,A7 000227d4 59 4f |YO | SUBQ.L #0x4,A7 000227d6 2f 13 |/ | MOVE.L (A3),-(A7) 000227d8 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 000227de 58 4f |XO | ADDQ.L #0x4,A7 000227e0 26 9f |& | MOVE.L (A7)+,(A3) 000227e2 48 6e 00 08 |Hn | PEA.L (A6+0x8) 000227e6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000227ec 54 4f |TO | ADDQ.L #0x2,A7 000227ee 3e ba d9 54 |> T | MOVE.W 0x20144,(A7) 000227f2 3f 3a d9 4e |?: N | MOVE.W 0x20142,-(A7) 000227f6 3f 3a d9 48 |?: H | MOVE.W 0x20140,-(A7) 000227fa 59 4f |YO | SUBQ.L #0x4,A7 000227fc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022800 3f 02 |? | MOVE.W D2,-(A7) 00022802 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00022806 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002280c 50 4f |PO | ADDQ.L #0x8,A7 0002280e 2d 5f 00 08 |-_ | MOVE.L (A7)+,(A6+0x8) 00022812 54 4f |TO | ADDQ.L #0x2,A7 00022814 2f 13 |/ | MOVE.L (A3),-(A7) 00022816 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002281a 4e b9 00 01 03 00 |N | JSR FSCALL_10300 00022820 50 4f |PO | ADDQ.L #0x8,A7 00022822 4a 9f |J | TST.L (A7)+ 00022824 66 14 |f | BNE 0x2283a 00022826 59 4f |YO | SUBQ.L #0x4,A7 00022828 2f 13 |/ | MOVE.L (A3),-(A7) 0002282a 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002282e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022834 50 4f |PO | ADDQ.L #0x8,A7 00022836 26 9f |& | MOVE.L (A7)+,(A3) 00022838 60 0c |` | BRA 0x22846 0002283a 48 6e 00 08 |Hn | PEA.L (A6+0x8) 0002283e 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022844 58 4f |XO | ADDQ.L #0x4,A7 00022846 2f 13 |/ | MOVE.L (A3),-(A7) 00022848 42 27 |B' | CLR.B -(A7) 0002284a 1f 05 | | MOVE.B D5,-(A7) 0002284c 48 78 00 00 |Hx | PEA.L 0x0 00022850 48 6e ff e4 |Hn | PEA.L (A6-0x1c) 00022854 48 6e ff e0 |Hn | PEA.L (A6-0x20) 00022858 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 0002285e de fc 00 14 | | ADDA.W #0x14,A7 00022862 2d 79 00 02 41 ca ff f2 |-y A | MOVE.L 0x241ca,(A6-0xe) 0002286a 7e 01 |~ | MOVEQ.L #0x01,D7 0002286c 20 6e ff f2 | n | MOVEA.L (A6-0xe),A0 00022870 b0 c2 | | CMPA.W D2,A0 00022872 67 20 |g | BEQ 0x22894 00022874 4a 07 |J | TST.B D7 00022876 67 1c |g | BEQ 0x22894 00022878 22 6e ff e0 |"n | MOVEA.L (A6-0x20),A1 0002287c 24 48 |$H | MOVEA.L A0,A2 0002287e 70 1d |p | MOVEQ.L #0x1d,D0 00022880 b5 09 | | CMPM.B (A1)+,(A2)+ 00022882 56 c8 ff fc |V | DBNE D0,0x22880 00022886 66 04 |f | BNE 0x2288c 00022888 7e 00 |~ | MOVEQ.L #0x00,D7 0002288a 60 06 |` | BRA 0x22892 0002288c 2d 68 00 2e ff f2 |-h . | MOVE.L (A0+0x2e),(A6-0xe) 00022892 60 d8 |` | BRA 0x2286c 00022894 4a 07 |J | TST.B D7 00022896 67 46 |gF | BEQ 0x228de 00022898 48 6e ff f2 |Hn | PEA.L (A6-0xe) 0002289c 48 78 00 32 |Hx 2 | PEA.L 0x32 000228a0 4e b9 00 01 02 9c |N | JSR Malloc1(length : Long) : Pointer 000228a6 50 4f |PO | ADDQ.L #0x8,A7 000228a8 20 6e ff f2 | n | MOVEA.L (A6-0xe),A0 000228ac 22 6e ff e0 |"n | MOVEA.L (A6-0x20),A1 000228b0 24 48 |$H | MOVEA.L A0,A2 000228b2 70 1d |p | MOVEQ.L #0x1d,D0 000228b4 14 d9 | | MOVE.B (A1)+,(A2)+ 000228b6 51 c8 ff fc |Q | DBF D0,0x228b4 000228ba 21 42 00 2a |!B * | MOVE.L D2,(A0+0x2a) 000228be 21 79 00 02 41 ca 00 2e |!y A .| MOVE.L 0x241ca,(A0+0x2e) 000228c6 41 e8 00 1e |A | LEA.L (A0+0x1e),A0 000228ca 43 fa dd ca |C | LEA.L 0x20696,A1 000228ce 70 07 |p | MOVEQ.L #0x07,D0 000228d0 10 d9 | | MOVE.B (A1)+,(A0)+ 000228d2 51 c8 ff fc |Q | DBF D0,0x228d0 000228d6 23 ee ff f2 00 02 41 ca |# A | MOVE.L (A6-0xe),0x241ca 000228de 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000228e2 b0 c2 | | CMPA.W D2,A0 000228e4 67 72 |gr | BEQ 0x22958 000228e6 28 79 00 02 41 ca |(y A | MOVEA.L 0x241ca,A4 000228ec 7c 00 || | MOVEQ.L #0x00,D6 000228ee b8 c2 | | CMPA.W D2,A4 000228f0 67 14 |g | BEQ 0x22906 000228f2 4a 06 |J | TST.B D6 000228f4 66 10 |f | BNE 0x22906 000228f6 b9 ee 00 0c | | CMPA.L (A6+0xc),A4 000228fa 66 04 |f | BNE 0x22900 000228fc 7c 01 || | MOVEQ.L #0x01,D6 000228fe 60 04 |` | BRA 0x22904 00022900 28 6c 00 2e |(l . | MOVEA.L (A4+0x2e),A4 00022904 60 e8 |` | BRA 0x228ee 00022906 4a 06 |J | TST.B D6 00022908 66 2a |f* | BNE 0x22934 0002290a 41 fa db 08 |A | LEA.L 0x20414,A0 0002290e 70 05 |p | MOVEQ.L #0x05,D0 00022910 2f 20 |/ | MOVE.L -(A0),-(A7) 00022912 51 c8 ff fc |Q | DBF D0,0x22910 00022916 1f 03 | | MOVE.B D3,-(A7) 00022918 59 4f |YO | SUBQ.L #0x4,A7 0002291a 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002291e 3f 02 |? | MOVE.W D2,-(A7) 00022920 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00022924 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002292a 50 4f |PO | ADDQ.L #0x8,A7 0002292c 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022932 de c4 | | ADDA.W D4,A7 00022934 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00022938 48 78 00 08 |Hx | PEA.L 0x8 0002293c 4e b9 00 01 02 9c |N | JSR Malloc1(length : Long) : Pointer 00022942 50 4f |PO | ADDQ.L #0x8,A7 00022944 20 6e ff f6 | n | MOVEA.L (A6-0xa),A0 00022948 20 ae ff f2 | | MOVE.L (A6-0xe),(A0) 0002294c 21 6c 00 2a 00 04 |!l * | MOVE.L (A4+0x2a),(A0+0x4) 00022952 29 6e ff f6 00 2a |)n * | MOVE.L (A6-0xa),(A4+0x2a) 00022958 4a 07 |J | TST.B D7 0002295a 67 00 01 16 |g | BEQ 0x22a72 0002295e 41 fa da be |A | LEA.L 0x2041e,A0 00022962 70 04 |p | MOVEQ.L #0x04,D0 00022964 3f 20 |? | MOVE.W -(A0),-(A7) 00022966 51 c8 ff fc |Q | DBF D0,0x22964 0002296a 51 4f |QO | SUBQ.L #0x8,A7 0002296c 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022970 3f 02 |? | MOVE.W D2,-(A7) 00022972 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00022976 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002297c 2e 93 |. | MOVE.L (A3),(A7) 0002297e 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00022984 58 4f |XO | ADDQ.L #0x4,A7 00022986 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002298c 50 4f |PO | ADDQ.L #0x8,A7 0002298e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022994 de c3 | | ADDA.W D3,A7 00022996 48 6e ff ea |Hn | PEA.L (A6-0x16) 0002299a 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000229a0 2e ae ff e0 |. | MOVE.L (A6-0x20),(A7) 000229a4 48 6e ff ea |Hn | PEA.L (A6-0x16) 000229a8 48 6e ff fa |Hn | PEA.L (A6-0x6) 000229ac 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 000229b2 58 4f |XO | ADDQ.L #0x4,A7 000229b4 2e ae ff ea |. | MOVE.L (A6-0x16),(A7) 000229b8 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 000229be 58 4f |XO | ADDQ.L #0x4,A7 000229c0 20 5f | _ | MOVEA.L (A7)+,A0 000229c2 2d 48 ff ea |-H | MOVE.L A0,(A6-0x16) 000229c6 4a 50 |JP | TST.W (A0) 000229c8 66 10 |f | BNE 0x229da 000229ca 48 6e ff ea |Hn | PEA.L (A6-0x16) 000229ce 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000229d4 58 4f |XO | ADDQ.L #0x4,A7 000229d6 60 00 00 92 |` | BRA 0x22a6a 000229da 55 4f |UO | SUBQ.L #0x2,A7 000229dc 2f 08 |/ | MOVE.L A0,-(A7) 000229de 4e ba fc 0a |N | JSR 0x225ea 000229e2 58 4f |XO | ADDQ.L #0x4,A7 000229e4 10 1f | | MOVE.B (A7)+,D0 000229e6 48 80 |H | EXTB.W D0 000229e8 0c 40 00 04 | @ | CMPI.W #0x0004,D0 000229ec 63 02 |c | BLS 0x229f0 000229ee 4e 4e |NN | TRAP #14 000229f0 d0 40 | @ | ADD.W D0,D0 000229f2 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000229fa 00 20 | | .CONST 0x20 ; [0x0] -> 0x22a1a 000229fc 00 0a | | .CONST 0xa ; [0x1] -> 0x22a04 000229fe 00 28 | ( | .CONST 0x28 ; [0x2] -> 0x22a22 00022a00 00 34 | 4 | .CONST 0x34 ; [0x3] -> 0x22a2e 00022a02 00 36 | 6 | .CONST 0x36 ; [0x4] -> 0x22a30 00022a04 switch@0x229f2[0x1]: 00022a04 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 00022a08 59 4f |YO | SUBQ.L #0x4,A7 00022a0a 2f 08 |/ | MOVE.L A0,-(A7) 00022a0c 4e ba f7 00 |N | JSR 0x2210e 00022a10 58 4f |XO | ADDQ.L #0x4,A7 00022a12 4e ba fd 4c |N L | JSR 0x22760 00022a16 50 4f |PO | ADDQ.L #0x8,A7 00022a18 60 50 |`P | BRA 0x22a6a 00022a1a switch@0x229f2[0x0]: 00022a1a 2f 08 |/ | MOVE.L A0,-(A7) 00022a1c 4e ba eb 28 |N ( | JSR 0x21546 00022a20 60 b2 |` | BRA 0x229d4 00022a22 switch@0x229f2[0x2]: 00022a22 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 00022a26 2f 08 |/ | MOVE.L A0,-(A7) 00022a28 4e ba fc 78 |N x | JSR 0x226a2 00022a2c 60 e8 |` | BRA 0x22a16 00022a2e switch@0x229f2[0x3]: 00022a2e 60 9a |` | BRA 0x229ca 00022a30 switch@0x229f2[0x4]: 00022a30 2f 3a d9 f8 |/: | MOVE.L 0x2042a,-(A7) 00022a34 2f 3a d9 f0 |/: | MOVE.L 0x20426,-(A7) 00022a38 2f 3a d9 e8 |/: | MOVE.L 0x20422,-(A7) 00022a3c 2f 3a d9 e0 |/: | MOVE.L 0x2041e,-(A7) 00022a40 1f 03 | | MOVE.B D3,-(A7) 00022a42 51 4f |QO | SUBQ.L #0x8,A7 00022a44 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00022a48 3f 02 |? | MOVE.W D2,-(A7) 00022a4a 3f 3c 00 10 |?< | MOVE.W #0x10,-(A7) 00022a4e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022a54 58 4f |XO | ADDQ.L #0x4,A7 00022a56 2e 93 |. | MOVE.L (A3),(A7) 00022a58 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022a5e 50 4f |PO | ADDQ.L #0x8,A7 00022a60 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022a66 de fc 00 16 | | ADDA.W #0x16,A7 00022a6a 4a 2e ff fa |J. | TST.B (A6-0x6) 00022a6e 67 00 ff 26 |g & | BEQ 0x22996 00022a72 42 27 |B' | CLR.B -(A7) 00022a74 1f 05 | | MOVE.B D5,-(A7) 00022a76 48 78 00 01 |Hx | PEA.L 0x1 00022a7a 48 6e ff e4 |Hn | PEA.L (A6-0x1c) 00022a7e 48 6e ff e0 |Hn | PEA.L (A6-0x20) 00022a82 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00022a88 de fc 00 10 | | ADDA.W #0x10,A7 00022a8c 48 53 |HS | PEA.L (A3) 00022a8e 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022a94 58 4f |XO | ADDQ.L #0x4,A7 00022a96 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00022a9a 4e 5e |N^ | UNLK A6 00022a9c 4e 75 |Nu | RTS 00022a9e ; -------------------------------------------------------------------------------------- 00022a9e ; OMSI PASCAL Function 00022a9e ; -------------------------------------------------------------------------------------- 00022a9e 4e 56 ff ae |NV | LINK.W A6,#0xffae ; Spelunked 00022aa2 bf d5 | | CMPA.L (A5),A7 00022aa4 62 06 |b | BHI 0x22aac 00022aa6 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022aaa 4e 76 |Nv | TRAPV 00022aac de fc 00 4a | J | ADDA.W #0x4a,A7 00022ab0 48 e7 c1 c8 |H | MOVEM.L A4+A1+A0+D7+D1+D0,-(A7) 00022ab4 72 1e |r | MOVEQ.L #0x1e,D1 00022ab6 7e 00 |~ | MOVEQ.L #0x00,D7 00022ab8 10 07 | | MOVE.B D7,D0 00022aba 48 80 |H | EXTB.W D0 00022abc eb 40 | @ | ASL.W #0x5,D0 00022abe 41 f9 00 02 3e 90 |A > | LEA.L 0x23e90,A0 00022ac4 9e c1 | | SUBA.W D1,A7 00022ac6 22 4f |"O | MOVEA.L A7,A1 00022ac8 41 f0 00 5d |A ] | LEA.L (A0+D0.W+#0x5d),A0 00022acc 70 1d |p | MOVEQ.L #0x1d,D0 00022ace 12 d8 | | MOVE.B (A0)+,(A1)+ 00022ad0 51 c8 ff fc |Q | DBF D0,0x22ace 00022ad4 59 4f |YO | SUBQ.L #0x4,A7 00022ad6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022ada 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022ade 3f 01 |? | MOVE.W D1,-(A7) 00022ae0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022ae6 50 4f |PO | ADDQ.L #0x8,A7 00022ae8 28 5f |(_ | MOVEA.L (A7)+,A4 00022aea de c1 | | ADDA.W D1,A7 00022aec 48 78 00 01 |Hx | PEA.L 0x1 00022af0 2f 0c |/ | MOVE.L A4,-(A7) 00022af2 4e ba fc 6c |N l | JSR 0x22760 00022af6 50 4f |PO | ADDQ.L #0x8,A7 00022af8 52 07 |R | ADDQ.B #0x1,D7 00022afa 0c 07 00 04 | | CMPI.B #0x04,D7 00022afe 6f b8 |o | BLE 0x22ab8 00022b00 4c df 13 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A4 00022b04 4e 5e |N^ | UNLK A6 00022b06 4e 75 |Nu | RTS 00022b08 ; -------------------------------------------------------------------------------------- 00022b08 ; OMSI PASCAL Function 00022b08 ; <LVAR -0x004 @ 4(rw)> 00022b08 ; -------------------------------------------------------------------------------------- 00022b08 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 ; Spelunked 00022b0c bf d5 | | CMPA.L (A5),A7 00022b0e 62 06 |b | BHI 0x22b16 00022b10 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022b14 4e 76 |Nv | TRAPV 00022b16 de fc 00 34 | 4 | ADDA.W #0x34,A7 00022b1a 48 e7 80 e0 |H | MOVEM.L A2+A1+A0+D0,-(A7) 00022b1e 45 ee ff fc |E | LEA.L (A6-0x4),A2 00022b22 9e fc 00 14 | | SUBA.W #0x14,A7 00022b26 20 4f | O | MOVEA.L A7,A0 00022b28 43 fa d9 04 |C | LEA.L 0x2042e,A1 00022b2c 70 12 |p | MOVEQ.L #0x12,D0 00022b2e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022b30 51 c8 ff fc |Q | DBF D0,0x22b2e 00022b34 59 4f |YO | SUBQ.L #0x4,A7 00022b36 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022b3a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022b3e 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00022b42 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022b48 50 4f |PO | ADDQ.L #0x8,A7 00022b4a 24 9f |$ | MOVE.L (A7)+,(A2) 00022b4c de fc 00 10 | | ADDA.W #0x10,A7 00022b50 2e 92 |. | MOVE.L (A2),(A7) 00022b52 48 79 00 02 3e 9a |Hy > | PEA.L 0x23e9a 00022b58 4e b9 00 01 05 74 |N t | JSR Write_ConfigFile(name: String; dst: Pointer) 00022b5e 50 4f |PO | ADDQ.L #0x8,A7 00022b60 48 52 |HR | PEA.L (A2) 00022b62 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022b68 58 4f |XO | ADDQ.L #0x4,A7 00022b6a 4c df 07 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2 00022b6e 4e 5e |N^ | UNLK A6 00022b70 4e 75 |Nu | RTS 00022b72 ; -------------------------------------------------------------------------------------- 00022b72 ; OMSI PASCAL Function 00022b72 ; <LVAR -0x006 @ 4(rw)> 00022b72 ; -------------------------------------------------------------------------------------- 00022b72 4e 56 ff 86 |NV | LINK.W A6,#0xff86 00022b76 bf d5 | | CMPA.L (A5),A7 00022b78 62 06 |b | BHI 0x22b80 00022b7a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022b7e 4e 76 |Nv | TRAPV 00022b80 de fc 00 72 | r | ADDA.W #0x72,A7 00022b84 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022b88 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00022b8e 49 ee ff fa |I | LEA.L (A6-0x6),A4 00022b92 74 01 |t | MOVEQ.L #0x01,D2 00022b94 76 02 |v | MOVEQ.L #0x02,D3 00022b96 78 10 |x | MOVEQ.L #0x10,D4 00022b98 7a 1e |z | MOVEQ.L #0x1e,D5 00022b9a 23 c3 00 02 41 c2 |# A | MOVE.L D3,0x241c2 00022ba0 23 c3 00 02 41 c6 |# A | MOVE.L D3,0x241c6 00022ba6 23 c2 00 02 41 ca |# A | MOVE.L D2,0x241ca 00022bac 23 c2 00 02 41 ce |# A | MOVE.L D2,0x241ce 00022bb2 4a 39 00 02 3e 9f |J9 > | TST.B 0x23e9f 00022bb8 67 04 |g | BEQ 0x22bbe 00022bba 7c 04 || | MOVEQ.L #0x04,D6 00022bbc 60 02 |` | BRA 0x22bc0 00022bbe 7c 09 || | MOVEQ.L #0x09,D6 00022bc0 1f 06 | | MOVE.B D6,-(A7) 00022bc2 7e 00 |~ | MOVEQ.L #0x00,D7 00022bc4 be 17 | | CMP.B (A7),D7 00022bc6 6e 0a |n | BGT 0x22bd2 00022bc8 10 17 | | MOVE.B (A7),D0 00022bca 0c 00 00 09 | | CMPI.B #0x09,D0 00022bce 6f 02 |o | BLE 0x22bd2 00022bd0 4e 4f |NO | TRAP #15 00022bd2 be 17 | | CMP.B (A7),D7 00022bd4 6e 70 |np | BGT 0x22c46 00022bd6 10 07 | | MOVE.B D7,D0 00022bd8 48 80 |H | EXTB.W D0 00022bda eb 40 | @ | ASL.W #0x5,D0 00022bdc 41 f9 00 02 3e 90 |A > | LEA.L 0x23e90,A0 00022be2 9e c4 | | SUBA.W D4,A7 00022be4 22 4f |"O | MOVEA.L A7,A1 00022be6 45 fa d8 5a |E Z | LEA.L 0x20442,A2 00022bea 72 0e |r | MOVEQ.L #0x0e,D1 00022bec 12 da | | MOVE.B (A2)+,(A1)+ 00022bee 51 c9 ff fc |Q | DBF D1,0x22bec 00022bf2 3f 3a d5 50 |?: P | MOVE.W 0x20144,-(A7) 00022bf6 3f 3a d5 4a |?: J | MOVE.W 0x20142,-(A7) 00022bfa 3f 3a d5 44 |?: D | MOVE.W 0x20140,-(A7) 00022bfe 48 70 00 5b |Hp [ | PEA.L (A0+D0.W+#0x5b) 00022c02 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00022c06 48 68 01 ed |Hh | PEA.L (A0+0x1ed) 00022c0a 51 4f |QO | SUBQ.L #0x8,A7 00022c0c 48 6f 00 16 |Ho | PEA.L (A7+0x16) 00022c10 3f 02 |? | MOVE.W D2,-(A7) 00022c12 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00022c16 4e 93 |N | JSR (A3) 00022c18 54 4f |TO | ADDQ.L #0x2,A7 00022c1a 1e 87 | | MOVE.B D7,(A7) 00022c1c 4e b9 00 01 05 86 |N | JSR Config_Entry_Name(a : Byte) : String 00022c22 54 4f |TO | ADDQ.L #0x2,A7 00022c24 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022c2a 58 4f |XO | ADDQ.L #0x4,A7 00022c2c 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00022c30 3f 02 |? | MOVE.W D2,-(A7) 00022c32 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00022c36 4e 93 |N | JSR (A3) 00022c38 50 4f |PO | ADDQ.L #0x8,A7 00022c3a 4e ba e1 00 |N | JSR 0x20d3c 00022c3e de fc 00 26 | & | ADDA.W #0x26,A7 00022c42 52 07 |R | ADDQ.B #0x1,D7 00022c44 68 8c |h | BVC 0x22bd2 00022c46 54 4f |TO | ADDQ.L #0x2,A7 00022c48 13 c2 00 02 41 c0 | A | MOVE.B D2,0x241c0 00022c4e 7e 00 |~ | MOVEQ.L #0x00,D7 00022c50 10 07 | | MOVE.B D7,D0 00022c52 48 80 |H | EXTB.W D0 00022c54 eb 40 | @ | ASL.W #0x5,D0 00022c56 41 f9 00 02 3e 90 |A > | LEA.L 0x23e90,A0 00022c5c 9e c5 | | SUBA.W D5,A7 00022c5e 22 4f |"O | MOVEA.L A7,A1 00022c60 41 f0 00 5d |A ] | LEA.L (A0+D0.W+#0x5d),A0 00022c64 70 1d |p | MOVEQ.L #0x1d,D0 00022c66 12 d8 | | MOVE.B (A0)+,(A1)+ 00022c68 51 c8 ff fc |Q | DBF D0,0x22c66 00022c6c 59 4f |YO | SUBQ.L #0x4,A7 00022c6e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022c72 3f 02 |? | MOVE.W D2,-(A7) 00022c74 3f 05 |? | MOVE.W D5,-(A7) 00022c76 4e 93 |N | JSR (A3) 00022c78 50 4f |PO | ADDQ.L #0x8,A7 00022c7a 28 9f |( | MOVE.L (A7)+,(A4) 00022c7c de c5 | | ADDA.W D5,A7 00022c7e 48 78 00 01 |Hx | PEA.L 0x1 00022c82 2f 14 |/ | MOVE.L (A4),-(A7) 00022c84 4e ba fa da |N | JSR 0x22760 00022c88 50 4f |PO | ADDQ.L #0x8,A7 00022c8a 52 07 |R | ADDQ.B #0x1,D7 00022c8c 0c 07 00 04 | | CMPI.B #0x04,D7 00022c90 6f be |o | BLE 0x22c50 00022c92 42 39 00 02 41 c0 |B9 A | CLR.B 0x241c0 00022c98 4a 39 00 02 3e 9f |J9 > | TST.B 0x23e9f 00022c9e 66 1e |f | BNE 0x22cbe 00022ca0 48 78 00 01 |Hx | PEA.L 0x1 00022ca4 51 4f |QO | SUBQ.L #0x8,A7 00022ca6 1f 3c 00 09 | < | MOVE.B #0x09,-(A7) 00022caa 4e b9 00 01 05 86 |N | JSR Config_Entry_Name(a : Byte) : String 00022cb0 54 4f |TO | ADDQ.L #0x2,A7 00022cb2 4e ba f4 5a |N Z | JSR 0x2210e 00022cb6 58 4f |XO | ADDQ.L #0x4,A7 00022cb8 4e ba fa a6 |N | JSR 0x22760 00022cbc 50 4f |PO | ADDQ.L #0x8,A7 00022cbe 3f 3a d7 92 |?: | MOVE.W 0x20452,-(A7) 00022cc2 41 fa d7 aa |A | LEA.L 0x2046e,A0 00022cc6 70 0c |p | MOVEQ.L #0x0c,D0 00022cc8 3f 20 |? | MOVE.W -(A0),-(A7) 00022cca 51 c8 ff fc |Q | DBF D0,0x22cc8 00022cce 51 4f |QO | SUBQ.L #0x8,A7 00022cd0 2f 39 00 02 41 c2 |/9 A | MOVE.L 0x241c2,-(A7) 00022cd6 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00022cdc 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00022ce0 3f 02 |? | MOVE.W D2,-(A7) 00022ce2 3f 03 |? | MOVE.W D3,-(A7) 00022ce4 4e 93 |N | JSR (A3) 00022ce6 2e b9 00 02 41 c6 |. A | MOVE.L 0x241c6,(A7) 00022cec 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00022cf2 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00022cf6 3f 02 |? | MOVE.W D2,-(A7) 00022cf8 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 00022cfc 4e 93 |N | JSR (A3) 00022cfe 50 4f |PO | ADDQ.L #0x8,A7 00022d00 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00022d06 de c4 | | ADDA.W D4,A7 00022d08 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00022d0e de fc 00 0c | | ADDA.W #0xc,A7 00022d12 20 4f | O | MOVEA.L A7,A0 00022d14 43 fa d7 58 |C X | LEA.L 0x2046e,A1 00022d18 70 12 |p | MOVEQ.L #0x12,D0 00022d1a 10 d9 | | MOVE.B (A1)+,(A0)+ 00022d1c 51 c8 ff fc |Q | DBF D0,0x22d1a 00022d20 59 4f |YO | SUBQ.L #0x4,A7 00022d22 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022d26 3f 02 |? | MOVE.W D2,-(A7) 00022d28 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00022d2c 4e 93 |N | JSR (A3) 00022d2e 50 4f |PO | ADDQ.L #0x8,A7 00022d30 28 9f |( | MOVE.L (A7)+,(A4) 00022d32 de c4 | | ADDA.W D4,A7 00022d34 2e 94 |. | MOVE.L (A4),(A7) 00022d36 48 79 00 02 3e 9a |Hy > | PEA.L 0x23e9a 00022d3c 4e b9 00 01 05 74 |N t | JSR Write_ConfigFile(name: String; dst: Pointer) 00022d42 50 4f |PO | ADDQ.L #0x8,A7 00022d44 48 54 |HT | PEA.L (A4) 00022d46 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022d4c 58 4f |XO | ADDQ.L #0x4,A7 00022d4e 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00022d52 4e 5e |N^ | UNLK A6 00022d54 4e 75 |Nu | RTS 00022d56 ; -------------------------------------------------------------------------------------- 00022d56 ; OMSI PASCAL Function 00022d56 ; <LVAR -0x002 @> 00022d56 ; <LVAR -0x006 @ 4(rw)> 00022d56 ; <LVAR -0x007 @ 1(r)> 00022d56 ; -------------------------------------------------------------------------------------- 00022d56 4e 56 ff 5c |NV \ | LINK.W A6,#0xff5c 00022d5a bf d5 | | CMPA.L (A5),A7 00022d5c 62 06 |b | BHI 0x22d64 00022d5e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022d62 4e 76 |Nv | TRAPV 00022d64 de fc 00 98 | | ADDA.W #0x98,A7 00022d68 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022d6c 45 ee ff fa |E | LEA.L (A6-0x6),A2 00022d70 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00022d76 49 ee ff f9 |I | LEA.L (A6-0x7),A4 00022d7a 72 01 |r | MOVEQ.L #0x01,D1 00022d7c 74 10 |t | MOVEQ.L #0x10,D2 00022d7e 76 14 |v | MOVEQ.L #0x14,D3 00022d80 78 0c |x | MOVEQ.L #0x0c,D4 00022d82 7a 0e |z | MOVEQ.L #0x0e,D5 00022d84 7c 3c ||< | MOVEQ.L #0x3c,D6 00022d86 51 4f |QO | SUBQ.L #0x8,A7 00022d88 4e b9 00 01 03 c4 |N | JSR GetArgv() : String 00022d8e 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00022d94 58 4f |XO | ADDQ.L #0x4,A7 00022d96 24 9f |$ | MOVE.L (A7)+,(A2) 00022d98 7e 00 |~ | MOVEQ.L #0x00,D7 00022d9a 20 52 | R | MOVEA.L (A2),A0 00022d9c 4a 50 |JP | TST.W (A0) 00022d9e 66 02 |f | BNE 0x22da2 00022da0 52 07 |R | ADDQ.B #0x1,D7 00022da2 4a 07 |J | TST.B D7 00022da4 67 6a |gj | BEQ 0x22e10 00022da6 48 52 |HR | PEA.L (A2) 00022da8 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022dae 9e fc 00 2e | . | SUBA.W #0x2e,A7 00022db2 20 4f | O | MOVEA.L A7,A0 00022db4 43 fa d6 cc |C | LEA.L 0x20482,A1 00022db8 70 30 |p0 | MOVEQ.L #0x30,D0 00022dba 10 d9 | | MOVE.B (A1)+,(A0)+ 00022dbc 51 c8 ff fc |Q | DBF D0,0x22dba 00022dc0 9e c4 | | SUBA.W D4,A7 00022dc2 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00022dc6 3f 01 |? | MOVE.W D1,-(A7) 00022dc8 3f 3c 00 31 |?< 1 | MOVE.W #0x31,-(A7) 00022dcc 4e 93 |N | JSR (A3) 00022dce 50 4f |PO | ADDQ.L #0x8,A7 00022dd0 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00022dd6 58 4f |XO | ADDQ.L #0x4,A7 00022dd8 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00022dde 58 4f |XO | ADDQ.L #0x4,A7 00022de0 24 9f |$ | MOVE.L (A7)+,(A2) 00022de2 de fc 00 32 | 2 | ADDA.W #0x32,A7 00022de6 20 52 | R | MOVEA.L (A2),A0 00022de8 4a 50 |JP | TST.W (A0) 00022dea 66 24 |f$ | BNE 0x22e10 00022dec 48 52 |HR | PEA.L (A2) 00022dee 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022df4 2e ba d7 24 |. $ | MOVE.L 0x2051a,(A7) 00022df8 2f 3a d7 1c |/: | MOVE.L 0x20516,-(A7) 00022dfc 59 4f |YO | SUBQ.L #0x4,A7 00022dfe 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022e02 3f 01 |? | MOVE.W D1,-(A7) 00022e04 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00022e08 4e 93 |N | JSR (A3) 00022e0a 50 4f |PO | ADDQ.L #0x8,A7 00022e0c 24 9f |$ | MOVE.L (A7)+,(A2) 00022e0e 50 4f |PO | ADDQ.L #0x8,A7 00022e10 2f 3a d7 14 |/: | MOVE.L 0x20526,-(A7) 00022e14 2f 3a d7 0c |/: | MOVE.L 0x20522,-(A7) 00022e18 2f 3a d7 04 |/: | MOVE.L 0x2051e,-(A7) 00022e1c 59 4f |YO | SUBQ.L #0x4,A7 00022e1e 2f 12 |/ | MOVE.L (A2),-(A7) 00022e20 59 4f |YO | SUBQ.L #0x4,A7 00022e22 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00022e26 3f 01 |? | MOVE.W D1,-(A7) 00022e28 3f 04 |? | MOVE.W D4,-(A7) 00022e2a 4e 93 |N | JSR (A3) 00022e2c 50 4f |PO | ADDQ.L #0x8,A7 00022e2e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022e34 50 4f |PO | ADDQ.L #0x8,A7 00022e36 20 5f | _ | MOVEA.L (A7)+,A0 00022e38 24 88 |$ | MOVE.L A0,(A2) 00022e3a 2f 08 |/ | MOVE.L A0,-(A7) 00022e3c 2f 08 |/ | MOVE.L A0,-(A7) 00022e3e 48 78 00 03 |Hx | PEA.L 0x3 00022e42 48 79 00 02 3e 9a |Hy > | PEA.L 0x23e9a 00022e48 48 54 |HT | PEA.L (A4) 00022e4a 4e b9 00 01 05 6e |N n | JSR Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool) 00022e50 de c2 | | ADDA.W D2,A7 00022e52 4a 14 |J | TST.B (A4) 00022e54 66 00 00 b4 |f | BNE 0x22f0a 00022e58 4a 07 |J | TST.B D7 00022e5a 66 28 |f( | BNE 0x22e84 00022e5c 41 fa d6 e6 |A | LEA.L 0x20544,A0 00022e60 70 0c |p | MOVEQ.L #0x0c,D0 00022e62 3f 20 |? | MOVE.W -(A0),-(A7) 00022e64 51 c8 ff fc |Q | DBF D0,0x22e62 00022e68 1f 05 | | MOVE.B D5,-(A7) 00022e6a 59 4f |YO | SUBQ.L #0x4,A7 00022e6c 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00022e70 3f 01 |? | MOVE.W D1,-(A7) 00022e72 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 00022e76 4e 93 |N | JSR (A3) 00022e78 50 4f |PO | ADDQ.L #0x8,A7 00022e7a 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022e80 de fc 00 20 | | ADDA.W #0x20,A7 00022e84 9e c6 | | SUBA.W D6,A7 00022e86 20 4f | O | MOVEA.L A7,A0 00022e88 43 fa d6 2a |C * | LEA.L 0x204b4,A1 00022e8c 70 3a |p: | MOVEQ.L #0x3a,D0 00022e8e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022e90 51 c8 ff fc |Q | DBF D0,0x22e8e 00022e94 5d 4f |]O | SUBQ.L #0x6,A7 00022e96 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00022e9a 3f 01 |? | MOVE.W D1,-(A7) 00022e9c 3f 3c 00 3b |?< ; | MOVE.W #0x3b,-(A7) 00022ea0 4e 93 |N | JSR (A3) 00022ea2 5c 4f |\O | ADDQ.L #0x6,A7 00022ea4 42 17 |B | CLR.B (A7) 00022ea6 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00022eac 5c 4f |\O | ADDQ.L #0x6,A7 00022eae 4a 1f |J | TST.B (A7)+ 00022eb0 67 56 |gV | BEQ 0x22f08 00022eb2 5d 4f |]O | SUBQ.L #0x6,A7 00022eb4 20 4f | O | MOVEA.L A7,A0 00022eb6 43 fa d6 8c |C | LEA.L 0x20544,A1 00022eba 70 04 |p | MOVEQ.L #0x04,D0 00022ebc 10 d9 | | MOVE.B (A1)+,(A0)+ 00022ebe 51 c8 ff fc |Q | DBF D0,0x22ebc 00022ec2 59 4f |YO | SUBQ.L #0x4,A7 00022ec4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022ec8 3f 01 |? | MOVE.W D1,-(A7) 00022eca 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00022ece 4e 93 |N | JSR (A3) 00022ed0 58 4f |XO | ADDQ.L #0x4,A7 00022ed2 20 6f 00 4a | o J | MOVEA.L (A7+0x4a),A0 00022ed6 2f 08 |/ | MOVE.L A0,-(A7) 00022ed8 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00022ede 54 4f |TO | ADDQ.L #0x2,A7 00022ee0 1e 81 | | MOVE.B D1,(A7) 00022ee2 48 6e ff fe |Hn | PEA.L (A6-0x2) 00022ee6 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00022eec de c3 | | ADDA.W D3,A7 00022eee 20 6f 00 3c | o < | MOVEA.L (A7+0x3c),A0 00022ef2 2f 08 |/ | MOVE.L A0,-(A7) 00022ef4 48 78 00 03 |Hx | PEA.L 0x3 00022ef8 48 79 00 02 3e 9a |Hy > | PEA.L 0x23e9a 00022efe 48 54 |HT | PEA.L (A4) 00022f00 4e b9 00 01 05 6e |N n | JSR Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool) 00022f06 de c2 | | ADDA.W D2,A7 00022f08 de c6 | | ADDA.W D6,A7 00022f0a 4a 14 |J | TST.B (A4) 00022f0c 67 00 00 90 |g | BEQ 0x22f9e 00022f10 4a 39 00 02 3e 9d |J9 > | TST.B 0x23e9d 00022f16 67 00 00 86 |g | BEQ 0x22f9e 00022f1a 41 fa d5 fa |A | LEA.L 0x20516,A0 00022f1e 70 12 |p | MOVEQ.L #0x12,D0 00022f20 3f 20 |? | MOVE.W -(A0),-(A7) 00022f22 51 c8 ff fc |Q | DBF D0,0x22f20 00022f26 5d 4f |]O | SUBQ.L #0x6,A7 00022f28 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00022f2c 3f 01 |? | MOVE.W D1,-(A7) 00022f2e 3f 3c 00 26 |?< & | MOVE.W #0x26,-(A7) 00022f32 4e 93 |N | JSR (A3) 00022f34 5c 4f |\O | ADDQ.L #0x6,A7 00022f36 42 17 |B | CLR.B (A7) 00022f38 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00022f3e 5c 4f |\O | ADDQ.L #0x6,A7 00022f40 4a 1f |J | TST.B (A7)+ 00022f42 67 56 |gV | BEQ 0x22f9a 00022f44 5d 4f |]O | SUBQ.L #0x6,A7 00022f46 20 4f | O | MOVEA.L A7,A0 00022f48 43 fa d6 00 |C | LEA.L 0x2054a,A1 00022f4c 70 04 |p | MOVEQ.L #0x04,D0 00022f4e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022f50 51 c8 ff fc |Q | DBF D0,0x22f4e 00022f54 59 4f |YO | SUBQ.L #0x4,A7 00022f56 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022f5a 3f 01 |? | MOVE.W D1,-(A7) 00022f5c 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00022f60 4e 93 |N | JSR (A3) 00022f62 58 4f |XO | ADDQ.L #0x4,A7 00022f64 20 6f 00 34 | o 4 | MOVEA.L (A7+0x34),A0 00022f68 2f 08 |/ | MOVE.L A0,-(A7) 00022f6a 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00022f70 54 4f |TO | ADDQ.L #0x2,A7 00022f72 1e 81 | | MOVE.B D1,(A7) 00022f74 48 6e ff fe |Hn | PEA.L (A6-0x2) 00022f78 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00022f7e de c3 | | ADDA.W D3,A7 00022f80 20 6f 00 26 | o & | MOVEA.L (A7+0x26),A0 00022f84 2f 08 |/ | MOVE.L A0,-(A7) 00022f86 48 78 00 03 |Hx | PEA.L 0x3 00022f8a 48 79 00 02 3e 9a |Hy > | PEA.L 0x23e9a 00022f90 48 54 |HT | PEA.L (A4) 00022f92 4e b9 00 01 05 6e |N n | JSR Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool) 00022f98 de c2 | | ADDA.W D2,A7 00022f9a de fc 00 26 | & | ADDA.W #0x26,A7 00022f9e de c2 | | ADDA.W D2,A7 00022fa0 7e 01 |~ | MOVEQ.L #0x01,D7 00022fa2 4a 14 |J | TST.B (A4) 00022fa4 67 00 fd fc |g | BEQ 0x22da2 00022fa8 41 fa d5 ba |A | LEA.L 0x20564,A0 00022fac 70 04 |p | MOVEQ.L #0x04,D0 00022fae 2f 20 |/ | MOVE.L -(A0),-(A7) 00022fb0 51 c8 ff fc |Q | DBF D0,0x22fae 00022fb4 59 4f |YO | SUBQ.L #0x4,A7 00022fb6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022fba 3f 01 |? | MOVE.W D1,-(A7) 00022fbc 3f 03 |? | MOVE.W D3,-(A7) 00022fbe 4e 93 |N | JSR (A3) 00022fc0 50 4f |PO | ADDQ.L #0x8,A7 00022fc2 24 9f |$ | MOVE.L (A7)+,(A2) 00022fc4 de c2 | | ADDA.W D2,A7 00022fc6 2e 92 |. | MOVE.L (A2),(A7) 00022fc8 48 78 00 03 |Hx | PEA.L 0x3 00022fcc 48 79 00 02 40 2c |Hy @, | PEA.L 0x2402c 00022fd2 48 54 |HT | PEA.L (A4) 00022fd4 4e b9 00 01 05 6e |N n | JSR Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool) 00022fda de c2 | | ADDA.W D2,A7 00022fdc 4a 14 |J | TST.B (A4) 00022fde 66 2e |f. | BNE 0x2300e 00022fe0 9e fc 00 24 | $ | SUBA.W #0x24,A7 00022fe4 20 4f | O | MOVEA.L A7,A0 00022fe6 43 fa d5 7c |C | | LEA.L 0x20564,A1 00022fea 70 22 |p" | MOVEQ.L #0x22,D0 00022fec 10 d9 | | MOVE.B (A1)+,(A0)+ 00022fee 51 c8 ff fc |Q | DBF D0,0x22fec 00022ff2 1f 05 | | MOVE.B D5,-(A7) 00022ff4 59 4f |YO | SUBQ.L #0x4,A7 00022ff6 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00022ffa 3f 01 |? | MOVE.W D1,-(A7) 00022ffc 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 00023000 4e 93 |N | JSR (A3) 00023002 50 4f |PO | ADDQ.L #0x8,A7 00023004 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002300a de fc 00 2a | * | ADDA.W #0x2a,A7 0002300e 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00023012 4e 5e |N^ | UNLK A6 00023014 4e 75 |Nu | RTS 00023016 ; -------------------------------------------------------------------------------------- 00023016 ; OMSI PASCAL Function 00023016 ; <LVAR -0x004 @> 00023016 ; -------------------------------------------------------------------------------------- 00023016 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 0002301a bf d5 | | CMPA.L (A5),A7 0002301c 62 06 |b | BHI 0x23024 0002301e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023022 4e 76 |Nv | TRAPV 00023024 de fc 00 34 | 4 | ADDA.W #0x34,A7 00023028 48 e7 e0 c0 |H | MOVEM.L A1+A0+D2+D1+D0,-(A7) 0002302c 72 01 |r | MOVEQ.L #0x01,D1 0002302e 74 0a |t | MOVEQ.L #0x0a,D2 00023030 4a 39 00 02 3e 9c |J9 > | TST.B 0x23e9c 00023036 67 6e |gn | BEQ 0x230a6 00023038 9e c2 | | SUBA.W D2,A7 0002303a 20 4f | O | MOVEA.L A7,A0 0002303c 43 fa d5 4a |C J | LEA.L 0x20588,A1 00023040 70 08 |p | MOVEQ.L #0x08,D0 00023042 10 d9 | | MOVE.B (A1)+,(A0)+ 00023044 51 c8 ff fc |Q | DBF D0,0x23042 00023048 5d 4f |]O | SUBQ.L #0x6,A7 0002304a 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002304e 3f 01 |? | MOVE.W D1,-(A7) 00023050 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00023054 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002305a 5c 4f |\O | ADDQ.L #0x6,A7 0002305c 42 17 |B | CLR.B (A7) 0002305e 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00023064 5c 4f |\O | ADDQ.L #0x6,A7 00023066 4a 1f |J | TST.B (A7)+ 00023068 67 3a |g: | BEQ 0x230a4 0002306a 59 4f |YO | SUBQ.L #0x4,A7 0002306c 1e ba d5 24 | $ | MOVE.B 0x20592,(A7) 00023070 1f 7a d5 21 00 01 | z ! | MOVE.B 0x20593,(A7+0x1) 00023076 1f 7a d5 1c 00 02 | z | MOVE.B 0x20594,(A7+0x2) 0002307c 59 4f |YO | SUBQ.L #0x4,A7 0002307e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023082 3f 01 |? | MOVE.W D1,-(A7) 00023084 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00023088 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002308e 50 4f |PO | ADDQ.L #0x8,A7 00023090 48 78 00 01 |Hx | PEA.L 0x1 00023094 1f 01 | | MOVE.B D1,-(A7) 00023096 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002309a 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 000230a0 de fc 00 12 | | ADDA.W #0x12,A7 000230a4 de c2 | | ADDA.W D2,A7 000230a6 4c df 03 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1 000230aa 4e 5e |N^ | UNLK A6 000230ac 4e 75 |Nu | RTS 000230ae ; -------------------------------------------------------------------------------------- 000230ae ; OMSI PASCAL Function 000230ae ; <LVAR -0x004 @ 4(r)> 000230ae ; <LVAR -0x008 @> 000230ae ; <LVAR -0x00a @> 000230ae ; <LVAR -0x00c @ 2(r)> 000230ae ; <LVAR -0x010 @> 000230ae ; -------------------------------------------------------------------------------------- 000230ae 4e 56 ff c6 |NV | LINK.W A6,#0xffc6 000230b2 bf d5 | | CMPA.L (A5),A7 000230b4 62 06 |b | BHI 0x230bc 000230b6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000230ba 4e 76 |Nv | TRAPV 000230bc de fc 00 2a | * | ADDA.W #0x2a,A7 000230c0 48 e7 f8 c0 |H | MOVEM.L A1+A0+D4+D3+D2+D1+D0,-(A7) 000230c4 43 f9 00 01 02 38 |C 8 | LEA.L KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word),A1 000230ca 74 0a |t | MOVEQ.L #0x0a,D2 000230cc 76 04 |v | MOVEQ.L #0x04,D3 000230ce 78 02 |x | MOVEQ.L #0x02,D4 000230d0 48 78 04 00 |Hx | PEA.L 0x400 000230d4 41 ee ff f0 |A | LEA.L (A6-0x10),A0 000230d8 2f 08 |/ | MOVE.L A0,-(A7) 000230da 3f 03 |? | MOVE.W D3,-(A7) 000230dc 4e 91 |N | JSR (A1) 000230de de c2 | | ADDA.W D2,A7 000230e0 48 78 04 04 |Hx | PEA.L 0x404 000230e4 41 ee ff f4 |A | LEA.L (A6-0xc),A0 000230e8 2f 08 |/ | MOVE.L A0,-(A7) 000230ea 3f 04 |? | MOVE.W D4,-(A7) 000230ec 4e 91 |N | JSR (A1) 000230ee de c2 | | ADDA.W D2,A7 000230f0 48 78 04 06 |Hx | PEA.L 0x406 000230f4 41 ee ff f6 |A | LEA.L (A6-0xa),A0 000230f8 2f 08 |/ | MOVE.L A0,-(A7) 000230fa 3f 04 |? | MOVE.W D4,-(A7) 000230fc 4e 91 |N | JSR (A1) 000230fe de c2 | | ADDA.W D2,A7 00023100 48 78 04 08 |Hx | PEA.L 0x408 00023104 41 ee ff f8 |A | LEA.L (A6-0x8),A0 00023108 2f 08 |/ | MOVE.L A0,-(A7) 0002310a 3f 03 |? | MOVE.W D3,-(A7) 0002310c 4e 91 |N | JSR (A1) 0002310e de c2 | | ADDA.W D2,A7 00023110 48 78 04 0c |Hx | PEA.L 0x40c 00023114 41 ee ff fc |A | LEA.L (A6-0x4),A0 00023118 2f 08 |/ | MOVE.L A0,-(A7) 0002311a 3f 03 |? | MOVE.W D3,-(A7) 0002311c 4e 91 |N | JSR (A1) 0002311e de c2 | | ADDA.W D2,A7 00023120 70 00 |p | MOVEQ.L #0x00,D0 00023122 c0 ee ff f4 | | MULU.W (A6-0xc),D0 00023126 42 81 |B | CLR.L D1 00023128 32 00 |2 | MOVE.W D0,D1 0002312a d2 ae ff fc | | ADD.L (A6-0x4),D1 0002312e 23 c1 00 02 41 d6 |# A | MOVE.L D1,0x241d6 00023134 4c df 03 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1 00023138 4e 5e |N^ | UNLK A6 0002313a 4e 75 |Nu | RTS 0002313c ; -------------------------------------------------------------------------------------- 0002313c ; OMSI PASCAL Function 0002313c ; <LVAR -0x00e 4(r)> 0002313c ; <LVAR -0x012 4(r)> 0002313c ; <LVAR -0x016 @ 4(r)> 0002313c ; <LVAR -0x01a @ 4(r)> 0002313c ; <LVAR -0x01c @ 1(r)> 0002313c ; -------------------------------------------------------------------------------------- 0002313c 4e 56 ff 94 |NV | LINK.W A6,#0xff94 00023140 bf d5 | | CMPA.L (A5),A7 00023142 62 06 |b | BHI 0x2314a 00023144 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023148 4e 76 |Nv | TRAPV 0002314a de fc 00 50 | P | ADDA.W #0x50,A7 0002314e 48 e7 f9 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 00023152 45 ee ff e4 |E | LEA.L (A6-0x1c),A2 00023156 47 f9 00 02 42 5a |G BZ | LEA.L 0x2425a,A3 0002315c 49 ee ff e6 |I | LEA.L (A6-0x1a),A4 00023160 72 01 |r | MOVEQ.L #0x01,D1 00023162 74 03 |t | MOVEQ.L #0x03,D2 00023164 76 02 |v | MOVEQ.L #0x02,D3 00023166 78 10 |x | MOVEQ.L #0x10,D4 00023168 9e fc 00 0c | | SUBA.W #0xc,A7 0002316c 20 4f | O | MOVEA.L A7,A0 0002316e 43 fa d4 26 |C & | LEA.L 0x20596,A1 00023172 70 0a |p | MOVEQ.L #0x0a,D0 00023174 10 d9 | | MOVE.B (A1)+,(A0)+ 00023176 51 c8 ff fc |Q | DBF D0,0x23174 0002317a 59 4f |YO | SUBQ.L #0x4,A7 0002317c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023180 3f 01 |? | MOVE.W D1,-(A7) 00023182 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00023186 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002318c 5c 4f |\O | ADDQ.L #0x6,A7 0002318e 42 17 |B | CLR.B (A7) 00023190 42 27 |B' | CLR.B -(A7) 00023192 48 78 00 00 |Hx | PEA.L 0x0 00023196 48 52 |HR | PEA.L (A2) 00023198 48 54 |HT | PEA.L (A4) 0002319a 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000231a0 de fc 00 20 | | ADDA.W #0x20,A7 000231a4 4a 12 |J | TST.B (A2) 000231a6 67 36 |g6 | BEQ 0x231de 000231a8 42 53 |BS | CLR.W (A3) 000231aa 42 79 00 02 42 5c |By B\ | CLR.W 0x2425c 000231b0 7e 00 |~ | MOVEQ.L #0x00,D7 000231b2 be 82 | | CMP.L D2,D7 000231b4 63 02 |c | BLS 0x231b8 000231b6 4e 4f |NO | TRAP #15 000231b8 20 07 | | MOVE.L D7,D0 000231ba e3 80 | | ASL.L #0x1,D0 000231bc 20 4b | K | MOVEA.L A3,A0 000231be 42 70 08 04 |Bp | CLR.W (A0+D0.L+#0x4) 000231c2 52 87 |R | ADDQ.L #0x1,D7 000231c4 be 82 | | CMP.L D2,D7 000231c6 6f ea |o | BLE 0x231b2 000231c8 1f 03 | | MOVE.B D3,-(A7) 000231ca 42 27 |B' | CLR.B -(A7) 000231cc 48 78 00 01 |Hx | PEA.L 0x1 000231d0 48 52 |HR | PEA.L (A2) 000231d2 48 54 |HT | PEA.L (A4) 000231d4 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000231da de c4 | | ADDA.W D4,A7 000231dc 60 46 |`F | BRA 0x23224 000231de 2f 14 |/ | MOVE.L (A4),-(A7) 000231e0 42 67 |Bg | CLR.W -(A7) 000231e2 42 67 |Bg | CLR.W -(A7) 000231e4 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 000231e8 1f 01 | | MOVE.B D1,-(A7) 000231ea 41 ee ff ea |A | LEA.L (A6-0x16),A0 000231ee 2f 08 |/ | MOVE.L A0,-(A7) 000231f0 48 52 |HR | PEA.L (A2) 000231f2 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 000231f8 de fc 00 12 | | ADDA.W #0x12,A7 000231fc 1e 83 | | MOVE.B D3,(A7) 000231fe 1f 01 | | MOVE.B D1,-(A7) 00023200 48 78 00 01 |Hx | PEA.L 0x1 00023204 48 52 |HR | PEA.L (A2) 00023206 48 54 |HT | PEA.L (A4) 00023208 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 0002320e de c4 | | ADDA.W D4,A7 00023210 26 ae ff ea |& | MOVE.L (A6-0x16),(A3) 00023214 23 ee ff ee 00 02 42 5e |# B^| MOVE.L (A6-0x12),0x2425e 0002321c 23 ee ff f2 00 02 42 62 |# Bb| MOVE.L (A6-0xe),0x24262 00023224 4c df 1f 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4 00023228 4e 5e |N^ | UNLK A6 0002322a 4e 75 |Nu | RTS 0002322c ; -------------------------------------------------------------------------------------- 0002322c ; OMSI PASCAL Function 0002322c ; -------------------------------------------------------------------------------------- 0002322c START: 0002322c 4f fa 00 08 |O | LEA.L MAIN,A7 00023230 4e f9 00 01 02 80 |N | JMP ?start_program 00023236 MAIN: 00023236 45 f9 00 02 42 67 |E Bg | LEA.L 0x24267,A2 0002323c 4e b9 00 01 03 98 |N | JSR FSCALL_10398 00023242 42 12 |B | CLR.B (A2) 00023244 48 79 00 02 3e 98 |Hy > | PEA.L 0x23e98 0002324a 4e b9 00 01 05 aa |N | JSR Read_fc00() : Byte 00023250 58 4f |XO | ADDQ.L #0x4,A7 00023252 4e ba fe e8 |N | JSR 0x2313c 00023256 4e ba fe 56 |N V | JSR 0x230ae 0002325a 4e ba fa fa |N | JSR 0x22d56 0002325e 4e ba fd b6 |N | JSR 0x23016 00023262 4e ba d6 6a |N j | JSR 0x208ce 00023266 48 78 00 00 |Hx | PEA.L 0x0 0002326a 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 00023270 58 4f |XO | ADDQ.L #0x4,A7 00023272 4e ba d6 da |N | JSR 0x2094e 00023276 4e ba d9 2a |N * | JSR 0x20ba2 0002327a 48 52 |HR | PEA.L (A2) 0002327c 4e ba d9 a8 |N | JSR 0x20c26 00023280 54 4f |TO | ADDQ.L #0x2,A7 00023282 1e 92 | | MOVE.B (A2),(A7) 00023284 4e ba dc 60 |N ` | JSR 0x20ee6 00023288 54 4f |TO | ADDQ.L #0x2,A7 0002328a 4e ba de 72 |N r | JSR 0x210fe 0002328e 4e ba f8 e2 |N | JSR 0x22b72 00023292 4e ba f2 5c |N \ | JSR 0x224f0 00023296 4e b9 00 01 02 22 |N " | JSR KC11_Live(void) 0002329c 51 4f |QO | SUBQ.L #0x8,A7 0002329e 20 4f | O | MOVEA.L A7,A0 000232a0 43 fa d3 00 |C | LEA.L 0x205a2,A1 000232a4 70 06 |p | MOVEQ.L #0x06,D0 000232a6 10 d9 | | MOVE.B (A1)+,(A0)+ 000232a8 51 c8 ff fc |Q | DBF D0,0x232a6 000232ac 59 4f |YO | SUBQ.L #0x4,A7 000232ae 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000232b2 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000232b6 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 000232ba 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000232c0 50 4f |PO | ADDQ.L #0x8,A7 000232c2 48 78 00 01 |Hx | PEA.L 0x1 000232c6 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000232ca 48 79 00 02 42 66 |Hy Bf | PEA.L 0x24266 000232d0 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 000232d6 de fc 00 14 | | ADDA.W #0x14,A7 000232da 42 17 |B | CLR.B (A7) 000232dc 48 78 00 01 |Hx | PEA.L 0x1 000232e0 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000232e6 5c 4f |\O | ADDQ.L #0x6,A7 000232e8 4e b9 00 01 02 84 |N | JSR ?exit 000232ee exp_LOAD_HRAM_8_0.FIU(): 000232ee 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000232f4 00 08 | | .CONST 0x0008 ; Stack-delta 000232f6 11 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 17,'LOAD_HRAM_8_0.FIU' 00023308 00 | | .CONST 0x0 00023309 03 | | .CONST 0x3 ; DIPROC address 0002330a 00 | | .CONST 0x0 ; Output Parameters 0002330b 00 | | .CONST 0x0 ; Input Parameters 0002330c exp_LOAD_HRAM_32_0.FIU(): 0002330c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023312 00 08 | | .CONST 0x0008 ; Stack-delta 00023314 12 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 18,'LOAD_HRAM_32_0.FIU' 00023327 00 | | .CONST 0x0 00023328 03 | | .CONST 0x3 ; DIPROC address 00023329 00 | | .CONST 0x0 ; Output Parameters 0002332a 00 | | .CONST 0x0 ; Input Parameters 0002332b 00 | | .PAD 0x0 0002332c exp_RUN_NORMAL.FIU(): 0002332c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023332 00 08 | | .CONST 0x0008 ; Stack-delta 00023334 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.FIU' 00023343 00 | | .CONST 0x0 00023344 03 | | .CONST 0x3 ; DIPROC address 00023345 00 | | .CONST 0x0 ; Output Parameters 00023346 00 | | .CONST 0x0 ; Input Parameters 00023347 00 | | .PAD 0x0 00023348 exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 00023348 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002334e 00 20 | | .CONST 0x0020 ; Stack-delta 00023350 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.FIU' 00023365 00 | | .CONST 0x0 00023366 03 | | .CONST 0x3 ; DIPROC address 00023367 06 | | .CONST 0x6 ; Output Parameters 00023368 00 | | .CONST 0x0 ; Input Parameters 00023369 00 | | .CONST 0x0 ; Out arg [1] 0002336a 01 | | .CONST 0x1 ; Out arg [2] 0002336b 00 | | .CONST 0x0 ; Out arg [1] 0002336c 00 | | .CONST 0x0 ; Out arg [1] 0002336d 01 | | .CONST 0x1 ; Out arg [2] 0002336e 08 | | .CONST 0x8 ; Out arg flag 0002336f 00 | | .PAD 0x0 00023370 exp_PREP_RUN.FIU(Sw_2): 00023370 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023376 00 0a | | .CONST 0x000a ; Stack-delta 00023378 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.FIU' 00023385 00 | | .CONST 0x0 00023386 03 | | .CONST 0x3 ; DIPROC address 00023387 00 | | .CONST 0x0 ; Output Parameters 00023388 01 | | .CONST 0x1 ; Input Parameters 00023389 01 | | .CONST 0x1 ; In arg [2] 0002338a exp_LOAD_HRAM_1.FIU(): 0002338a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023390 00 08 | | .CONST 0x0008 ; Stack-delta 00023392 0f 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 15,'LOAD_HRAM_1.FIU' 000233a2 00 | | .CONST 0x0 000233a3 03 | | .CONST 0x3 ; DIPROC address 000233a4 00 | | .CONST 0x0 ; Output Parameters 000233a5 00 | | .CONST 0x0 ; Input Parameters 000233a6 exp_INIT_MRU.FIU(): 000233a6 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000233ac 00 08 | | .CONST 0x0008 ; Stack-delta 000233ae 0c 49 4e 49 54 5f 4d 52 | INIT_MR| .TXT 12,'INIT_MRU.FIU' 000233bb 00 | | .CONST 0x0 000233bc 03 | | .CONST 0x3 ; DIPROC address 000233bd 00 | | .CONST 0x0 ; Output Parameters 000233be 00 | | .CONST 0x0 ; Input Parameters 000233bf 00 | | .PAD 0x0 000233c0 exp_FREEZE_WORLD.FIU(): 000233c0 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000233c6 00 08 | | .CONST 0x0008 ; Stack-delta 000233c8 10 46 52 45 45 5a 45 5f | FREEZE_| .TXT 16,'FREEZE_WORLD.FIU' 000233d9 00 | | .CONST 0x0 000233da 03 | | .CONST 0x3 ; DIPROC address 000233db 00 | | .CONST 0x0 ; Output Parameters 000233dc 00 | | .CONST 0x0 ; Input Parameters 000233dd 00 | | .PAD 0x0 000233de exp_CLEAR_PARITY.FIU(): 000233de 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000233e4 00 08 | | .CONST 0x0008 ; Stack-delta 000233e6 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.FIU' 000233f7 00 | | .CONST 0x0 000233f8 03 | | .CONST 0x3 ; DIPROC address 000233f9 00 | | .CONST 0x0 ; Output Parameters 000233fa 00 | | .CONST 0x0 ; Input Parameters 000233fb 00 | | .PAD 0x0 000233fc exp_READ_NOVRAM_DATA.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 000233fc 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023402 00 20 | | .CONST 0x0020 ; Stack-delta 00023404 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.SEQ' 00023419 00 | | .CONST 0x0 0002341a 02 | | .CONST 0x2 ; DIPROC address 0002341b 06 | | .CONST 0x6 ; Output Parameters 0002341c 00 | | .CONST 0x0 ; Input Parameters 0002341d 00 | | .CONST 0x0 ; Out arg [1] 0002341e 01 | | .CONST 0x1 ; Out arg [2] 0002341f 00 | | .CONST 0x0 ; Out arg [1] 00023420 00 | | .CONST 0x0 ; Out arg [1] 00023421 01 | | .CONST 0x1 ; Out arg [2] 00023422 08 | | .CONST 0x8 ; Out arg flag 00023423 00 | | .PAD 0x0 00023424 exp_RUN_CHECK.SEQ(): 00023424 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002342a 00 08 | | .CONST 0x0008 ; Stack-delta 0002342c 0d 52 55 4e 5f 43 48 45 | RUN_CHE| .TXT 13,'RUN_CHECK.SEQ' 0002343a 00 | | .CONST 0x0 0002343b 02 | | .CONST 0x2 ; DIPROC address 0002343c 00 | | .CONST 0x0 ; Output Parameters 0002343d 00 | | .CONST 0x0 ; Input Parameters 0002343e exp_PREP_RUN.SEQ(Sw_2): 0002343e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023444 00 0a | | .CONST 0x000a ; Stack-delta 00023446 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.SEQ' 00023453 00 | | .CONST 0x0 00023454 02 | | .CONST 0x2 ; DIPROC address 00023455 00 | | .CONST 0x0 ; Output Parameters 00023456 01 | | .CONST 0x1 ; Input Parameters 00023457 01 | | .CONST 0x1 ; In arg [2] 00023458 exp_CLEAR_PARITY.SEQ(): 00023458 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002345e 00 08 | | .CONST 0x0008 ; Stack-delta 00023460 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.SEQ' 00023471 00 | | .CONST 0x0 00023472 02 | | .CONST 0x2 ; DIPROC address 00023473 00 | | .CONST 0x0 ; Output Parameters 00023474 00 | | .CONST 0x0 ; Input Parameters 00023475 00 | | .PAD 0x0 00023476 exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 00023476 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002347c 00 20 | | .CONST 0x0020 ; Stack-delta 0002347e 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.TYP' 00023493 00 | | .CONST 0x0 00023494 06 | | .CONST 0x6 ; DIPROC address 00023495 06 | | .CONST 0x6 ; Output Parameters 00023496 00 | | .CONST 0x0 ; Input Parameters 00023497 00 | | .CONST 0x0 ; Out arg [1] 00023498 01 | | .CONST 0x1 ; Out arg [2] 00023499 00 | | .CONST 0x0 ; Out arg [1] 0002349a 00 | | .CONST 0x0 ; Out arg [1] 0002349b 01 | | .CONST 0x1 ; Out arg [2] 0002349c 08 | | .CONST 0x8 ; Out arg flag 0002349d 00 | | .PAD 0x0 0002349e exp_RUN_NORMAL.TYP(): 0002349e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000234a4 00 08 | | .CONST 0x0008 ; Stack-delta 000234a6 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.TYP' 000234b5 00 | | .CONST 0x0 000234b6 06 | | .CONST 0x6 ; DIPROC address 000234b7 00 | | .CONST 0x0 ; Output Parameters 000234b8 00 | | .CONST 0x0 ; Input Parameters 000234b9 00 | | .PAD 0x0 000234ba exp_PREP_RUN.TYP(Sw_2): 000234ba 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000234c0 00 0a | | .CONST 0x000a ; Stack-delta 000234c2 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.TYP' 000234cf 00 | | .CONST 0x0 000234d0 06 | | .CONST 0x6 ; DIPROC address 000234d1 00 | | .CONST 0x0 ; Output Parameters 000234d2 01 | | .CONST 0x1 ; Input Parameters 000234d3 01 | | .CONST 0x1 ; In arg [2] 000234d4 exp_LOAD_BENIGN_UWORD.TYP(): 000234d4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000234da 00 08 | | .CONST 0x0008 ; Stack-delta 000234dc 15 4c 4f 41 44 5f 42 45 | LOAD_BE| .TXT 21,'LOAD_BENIGN_UWORD.TYP' 000234f2 00 | | .CONST 0x0 000234f3 06 | | .CONST 0x6 ; DIPROC address 000234f4 00 | | .CONST 0x0 ; Output Parameters 000234f5 00 | | .CONST 0x0 ; Input Parameters 000234f6 exp_CLEAR_PARITY.TYP(): 000234f6 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000234fc 00 08 | | .CONST 0x0008 ; Stack-delta 000234fe 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.TYP' 0002350f 00 | | .CONST 0x0 00023510 06 | | .CONST 0x6 ; DIPROC address 00023511 00 | | .CONST 0x0 ; Output Parameters 00023512 00 | | .CONST 0x0 ; Input Parameters 00023513 00 | | .PAD 0x0 00023514 exp_ALIGN_CSA.TYP(): 00023514 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002351a 00 08 | | .CONST 0x0008 ; Stack-delta 0002351c 0d 41 4c 49 47 4e 5f 43 | ALIGN_C| .TXT 13,'ALIGN_CSA.TYP' 0002352a 00 | | .CONST 0x0 0002352b 06 | | .CONST 0x6 ; DIPROC address 0002352c 00 | | .CONST 0x0 ; Output Parameters 0002352d 00 | | .CONST 0x0 ; Input Parameters 0002352e exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 0002352e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023534 00 20 | | .CONST 0x0020 ; Stack-delta 00023536 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.VAL' 0002354b 00 | | .CONST 0x0 0002354c 07 | | .CONST 0x7 ; DIPROC address 0002354d 06 | | .CONST 0x6 ; Output Parameters 0002354e 00 | | .CONST 0x0 ; Input Parameters 0002354f 00 | | .CONST 0x0 ; Out arg [1] 00023550 01 | | .CONST 0x1 ; Out arg [2] 00023551 00 | | .CONST 0x0 ; Out arg [1] 00023552 00 | | .CONST 0x0 ; Out arg [1] 00023553 01 | | .CONST 0x1 ; Out arg [2] 00023554 08 | | .CONST 0x8 ; Out arg flag 00023555 00 | | .PAD 0x0 00023556 exp_RUN_NORMAL.VAL(): 00023556 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002355c 00 08 | | .CONST 0x0008 ; Stack-delta 0002355e 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.VAL' 0002356d 00 | | .CONST 0x0 0002356e 07 | | .CONST 0x7 ; DIPROC address 0002356f 00 | | .CONST 0x0 ; Output Parameters 00023570 00 | | .CONST 0x0 ; Input Parameters 00023571 00 | | .PAD 0x0 00023572 exp_PREP_RUN.VAL(Sw_2): 00023572 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023578 00 0a | | .CONST 0x000a ; Stack-delta 0002357a 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.VAL' 00023587 00 | | .CONST 0x0 00023588 07 | | .CONST 0x7 ; DIPROC address 00023589 00 | | .CONST 0x0 ; Output Parameters 0002358a 01 | | .CONST 0x1 ; Input Parameters 0002358b 01 | | .CONST 0x1 ; In arg [2] 0002358c exp_CLEAR_PARITY.VAL(): 0002358c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023592 00 08 | | .CONST 0x0008 ; Stack-delta 00023594 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.VAL' 000235a5 00 | | .CONST 0x0 000235a6 07 | | .CONST 0x7 ; DIPROC address 000235a7 00 | | .CONST 0x0 ; Output Parameters 000235a8 00 | | .CONST 0x0 ; Input Parameters 000235a9 00 | | .PAD 0x0 000235aa exp_ALIGN_CSA.VAL(): 000235aa 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000235b0 00 08 | | .CONST 0x0008 ; Stack-delta 000235b2 0d 41 4c 49 47 4e 5f 43 | ALIGN_C| .TXT 13,'ALIGN_CSA.VAL' 000235c0 00 | | .CONST 0x0 000235c1 07 | | .CONST 0x7 ; DIPROC address 000235c2 00 | | .CONST 0x0 ; Output Parameters 000235c3 00 | | .CONST 0x0 ; Input Parameters 000235c4 52 45 41 44 5f 4e 4f 56 |READ_NOV| .TXT 'READ_NOVRAM_DATA.MEM' 000235d8 52 45 41 44 5f 4e 4f 56 |READ_NOV| .TXT 'READ_NOVRAM_DATA.M32' 000235ec ; -------------------------------------------------------------------------------------- 000235ec ; OMSI PASCAL Function 000235ec ; <LVAR 0x020 1(r)> 000235ec ; <LVAR 0x01c 4(r)> 000235ec ; <LVAR 0x018 4(r)> 000235ec ; <LVAR 0x014 4(r)> 000235ec ; <LVAR 0x010 4(r)> 000235ec ; <LVAR 0x00c 4(r)> 000235ec ; <LVAR 0x008 4(r)> 000235ec ; <LVAR -0x006 @ 4(r)> 000235ec ; -------------------------------------------------------------------------------------- 000235ec 4e 56 ff be |NV | LINK.W A6,#0xffbe 000235f0 bf d5 | | CMPA.L (A5),A7 000235f2 62 06 |b | BHI 0x235fa 000235f4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000235f8 4e 76 |Nv | TRAPV 000235fa de fc 00 3c | < | ADDA.W #0x3c,A7 000235fe 48 e7 c0 f0 |H | MOVEM.L A3+A2+A1+A0+D1+D0,-(A7) 00023602 43 ee ff fa |C | LEA.L (A6-0x6),A1 00023606 45 f8 00 00 |E | LEA.L 0x0,A2 0002360a 47 f9 00 01 04 72 |G r | LEA.L ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L),A3 00023610 72 0c |r | MOVEQ.L #0x0c,D1 00023612 55 4f |UO | SUBQ.L #0x2,A7 00023614 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002361a 4a 1f |J | TST.B (A7)+ 0002361c 67 0e |g | BEQ 0x2362c 0002361e 41 fa ff b8 |A | LEA.L 0x235d8,A0 00023622 70 04 |p | MOVEQ.L #0x04,D0 00023624 2f 20 |/ | MOVE.L -(A0),-(A7) 00023626 51 c8 ff fc |Q | DBF D0,0x23624 0002362a 60 0c |` | BRA 0x23638 0002362c 41 fa ff be |A | LEA.L 0x235ec,A0 00023630 70 04 |p | MOVEQ.L #0x04,D0 00023632 2f 20 |/ | MOVE.L -(A0),-(A7) 00023634 51 c8 ff fc |Q | DBF D0,0x23632 00023638 59 4f |YO | SUBQ.L #0x4,A7 0002363a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002363e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023642 3f 3c 00 14 |?< | MOVE.W #0x14,-(A7) 00023646 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002364c 50 4f |PO | ADDQ.L #0x8,A7 0002364e 48 51 |HQ | PEA.L (A1) 00023650 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00023656 de fc 00 1c | | ADDA.W #0x1c,A7 0002365a 42 27 |B' | CLR.B -(A7) 0002365c 1f 2e 00 20 | . | MOVE.B (A6+0x20),-(A7) 00023660 2f 11 |/ | MOVE.L (A1),-(A7) 00023662 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00023668 58 4f |XO | ADDQ.L #0x4,A7 0002366a 2e 91 |. | MOVE.L (A1),(A7) 0002366c 20 6e 00 1c | n | MOVEA.L (A6+0x1c),A0 00023670 48 50 |HP | PEA.L (A0) 00023672 48 52 |HR | PEA.L (A2) 00023674 48 52 |HR | PEA.L (A2) 00023676 4e 93 |N | JSR (A3) 00023678 de c1 | | ADDA.W D1,A7 0002367a 2e 91 |. | MOVE.L (A1),(A7) 0002367c 20 6e 00 18 | n | MOVEA.L (A6+0x18),A0 00023680 48 50 |HP | PEA.L (A0) 00023682 48 52 |HR | PEA.L (A2) 00023684 48 78 00 01 |Hx | PEA.L 0x1 00023688 4e 93 |N | JSR (A3) 0002368a de c1 | | ADDA.W D1,A7 0002368c 2e 91 |. | MOVE.L (A1),(A7) 0002368e 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00023692 48 50 |HP | PEA.L (A0) 00023694 48 52 |HR | PEA.L (A2) 00023696 48 52 |HR | PEA.L (A2) 00023698 4e 93 |N | JSR (A3) 0002369a de c1 | | ADDA.W D1,A7 0002369c 2e 91 |. | MOVE.L (A1),(A7) 0002369e 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 000236a2 48 50 |HP | PEA.L (A0) 000236a4 48 52 |HR | PEA.L (A2) 000236a6 48 52 |HR | PEA.L (A2) 000236a8 4e 93 |N | JSR (A3) 000236aa de c1 | | ADDA.W D1,A7 000236ac 2e 91 |. | MOVE.L (A1),(A7) 000236ae 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000236b2 48 50 |HP | PEA.L (A0) 000236b4 48 52 |HR | PEA.L (A2) 000236b6 48 78 00 01 |Hx | PEA.L 0x1 000236ba 4e 93 |N | JSR (A3) 000236bc de c1 | | ADDA.W D1,A7 000236be 2e 91 |. | MOVE.L (A1),(A7) 000236c0 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000236c4 48 50 |HP | PEA.L (A0) 000236c6 4e b9 00 01 04 78 |N x | JSR ExpOutputFlag(exp : Pointer; VAR status : Bool) 000236cc 50 4f |PO | ADDQ.L #0x8,A7 000236ce 48 51 |HQ | PEA.L (A1) 000236d0 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000236d6 58 4f |XO | ADDQ.L #0x4,A7 000236d8 4c df 0f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3 000236dc 4e 5e |N^ | UNLK A6 000236de 4e 75 |Nu | RTS 000236e0 53 45 54 5f 48 49 54 2e |SET_HIT.| .TXT 'SET_HIT.MEM ' 000236ec 53 45 54 5f 48 49 54 2e |SET_HIT.| .TXT 'SET_HIT.M32 ' 000236f8 ; -------------------------------------------------------------------------------------- 000236f8 ; OMSI PASCAL Function 000236f8 ; <LVAR 0x00a 1(r)> 000236f8 ; <LVAR 0x008 1(r)> 000236f8 ; <LVAR -0x004 @ 4(r)> 000236f8 ; -------------------------------------------------------------------------------------- 000236f8 4e 56 ff cc |NV | LINK.W A6,#0xffcc 000236fc bf d5 | | CMPA.L (A5),A7 000236fe 62 06 |b | BHI 0x23706 00023700 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023704 4e 76 |Nv | TRAPV 00023706 de fc 00 30 | 0 | ADDA.W #0x30,A7 0002370a 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 0002370e 45 ee ff fc |E | LEA.L (A6-0x4),A2 00023712 72 0c |r | MOVEQ.L #0x0c,D1 00023714 55 4f |UO | SUBQ.L #0x2,A7 00023716 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002371c 4a 1f |J | TST.B (A7)+ 0002371e 67 12 |g | BEQ 0x23732 00023720 9e c1 | | SUBA.W D1,A7 00023722 20 4f | O | MOVEA.L A7,A0 00023724 43 fa ff ba |C | LEA.L 0x236e0,A1 00023728 70 0a |p | MOVEQ.L #0x0a,D0 0002372a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002372c 51 c8 ff fc |Q | DBF D0,0x2372a 00023730 60 10 |` | BRA 0x23742 00023732 9e c1 | | SUBA.W D1,A7 00023734 20 4f | O | MOVEA.L A7,A0 00023736 43 fa ff b4 |C | LEA.L 0x236ec,A1 0002373a 70 0a |p | MOVEQ.L #0x0a,D0 0002373c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002373e 51 c8 ff fc |Q | DBF D0,0x2373c 00023742 59 4f |YO | SUBQ.L #0x4,A7 00023744 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023748 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002374c 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00023750 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023756 50 4f |PO | ADDQ.L #0x8,A7 00023758 48 52 |HR | PEA.L (A2) 0002375a 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00023760 de fc 00 14 | | ADDA.W #0x14,A7 00023764 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00023768 2f 12 |/ | MOVE.L (A2),-(A7) 0002376a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002376e 48 78 00 00 |Hx | PEA.L 0x0 00023772 48 78 00 00 |Hx | PEA.L 0x0 00023776 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 0002377c de fc 00 10 | | ADDA.W #0x10,A7 00023780 42 17 |B | CLR.B (A7) 00023782 1f 2e 00 0a | . | MOVE.B (A6+0xa),-(A7) 00023786 2f 12 |/ | MOVE.L (A2),-(A7) 00023788 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 0002378e 50 4f |PO | ADDQ.L #0x8,A7 00023790 48 52 |HR | PEA.L (A2) 00023792 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00023798 58 4f |XO | ADDQ.L #0x4,A7 0002379a 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 0002379e 4e 5e |N^ | UNLK A6 000237a0 4e 75 |Nu | RTS 000237a2 52 55 4e 5f 43 48 45 43 |RUN_CHEC| .TXT 'RUN_CHECK.MEM ' 000237b0 52 55 4e 5f 43 48 45 43 |RUN_CHEC| .TXT 'RUN_CHECK.M32 ' 000237be ; -------------------------------------------------------------------------------------- 000237be ; OMSI PASCAL Function 000237be ; <LVAR 0x008 1(r)> 000237be ; <LVAR -0x006 @ 4(r)> 000237be ; -------------------------------------------------------------------------------------- 000237be 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 000237c2 bf d5 | | CMPA.L (A5),A7 000237c4 62 06 |b | BHI 0x237cc 000237c6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000237ca 4e 76 |Nv | TRAPV 000237cc de fc 00 32 | 2 | ADDA.W #0x32,A7 000237d0 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000237d4 45 ee ff fa |E | LEA.L (A6-0x6),A2 000237d8 72 0e |r | MOVEQ.L #0x0e,D1 000237da 55 4f |UO | SUBQ.L #0x2,A7 000237dc 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000237e2 4a 1f |J | TST.B (A7)+ 000237e4 67 12 |g | BEQ 0x237f8 000237e6 9e c1 | | SUBA.W D1,A7 000237e8 20 4f | O | MOVEA.L A7,A0 000237ea 43 fa ff b6 |C | LEA.L 0x237a2,A1 000237ee 70 0c |p | MOVEQ.L #0x0c,D0 000237f0 10 d9 | | MOVE.B (A1)+,(A0)+ 000237f2 51 c8 ff fc |Q | DBF D0,0x237f0 000237f6 60 10 |` | BRA 0x23808 000237f8 9e c1 | | SUBA.W D1,A7 000237fa 20 4f | O | MOVEA.L A7,A0 000237fc 43 fa ff b2 |C | LEA.L 0x237b0,A1 00023800 70 0c |p | MOVEQ.L #0x0c,D0 00023802 10 d9 | | MOVE.B (A1)+,(A0)+ 00023804 51 c8 ff fc |Q | DBF D0,0x23802 00023808 59 4f |YO | SUBQ.L #0x4,A7 0002380a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002380e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023812 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 00023816 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002381c 50 4f |PO | ADDQ.L #0x8,A7 0002381e 48 52 |HR | PEA.L (A2) 00023820 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00023826 de fc 00 16 | | ADDA.W #0x16,A7 0002382a 42 27 |B' | CLR.B -(A7) 0002382c 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00023830 2f 12 |/ | MOVE.L (A2),-(A7) 00023832 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00023838 50 4f |PO | ADDQ.L #0x8,A7 0002383a 48 52 |HR | PEA.L (A2) 0002383c 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00023842 58 4f |XO | ADDQ.L #0x4,A7 00023844 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00023848 4e 5e |N^ | UNLK A6 0002384a 4e 75 |Nu | RTS 0002384c 4c 4f 41 44 5f 43 4f 4e |LOAD_CON| .TXT 'LOAD_CONFIG.MEM ' 0002385c 4c 4f 41 44 5f 43 4f 4e |LOAD_CON| .TXT 'LOAD_CONFIG.M32 ' 0002386c ; -------------------------------------------------------------------------------------- 0002386c ; OMSI PASCAL Function 0002386c ; <LVAR 0x00e 1(r)> 0002386c ; <LVAR 0x00c 1(r)> 0002386c ; <LVAR 0x00a 1(r)> 0002386c ; <LVAR 0x008 1(r)> 0002386c ; <LVAR -0x004 @ 4(r)> 0002386c ; -------------------------------------------------------------------------------------- 0002386c 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00023870 bf d5 | | CMPA.L (A5),A7 00023872 62 06 |b | BHI 0x2387a 00023874 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023878 4e 76 |Nv | TRAPV 0002387a de fc 00 34 | 4 | ADDA.W #0x34,A7 0002387e 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00023882 45 ee ff fc |E | LEA.L (A6-0x4),A2 00023886 72 10 |r | MOVEQ.L #0x10,D1 00023888 55 4f |UO | SUBQ.L #0x2,A7 0002388a 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00023890 4a 1f |J | TST.B (A7)+ 00023892 67 12 |g | BEQ 0x238a6 00023894 9e c1 | | SUBA.W D1,A7 00023896 20 4f | O | MOVEA.L A7,A0 00023898 43 fa ff b2 |C | LEA.L 0x2384c,A1 0002389c 70 0e |p | MOVEQ.L #0x0e,D0 0002389e 10 d9 | | MOVE.B (A1)+,(A0)+ 000238a0 51 c8 ff fc |Q | DBF D0,0x2389e 000238a4 60 10 |` | BRA 0x238b6 000238a6 9e c1 | | SUBA.W D1,A7 000238a8 20 4f | O | MOVEA.L A7,A0 000238aa 43 fa ff b0 |C | LEA.L 0x2385c,A1 000238ae 70 0e |p | MOVEQ.L #0x0e,D0 000238b0 10 d9 | | MOVE.B (A1)+,(A0)+ 000238b2 51 c8 ff fc |Q | DBF D0,0x238b0 000238b6 59 4f |YO | SUBQ.L #0x4,A7 000238b8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000238bc 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000238c0 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 000238c4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000238ca 50 4f |PO | ADDQ.L #0x8,A7 000238cc 48 52 |HR | PEA.L (A2) 000238ce 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000238d4 de fc 00 18 | | ADDA.W #0x18,A7 000238d8 2f 12 |/ | MOVE.L (A2),-(A7) 000238da 1f 2e 00 0c | . | MOVE.B (A6+0xc),-(A7) 000238de 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 000238e4 54 4f |TO | ADDQ.L #0x2,A7 000238e6 2e 92 |. | MOVE.L (A2),(A7) 000238e8 1f 2e 00 0a | . | MOVE.B (A6+0xa),-(A7) 000238ec 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 000238f2 58 4f |XO | ADDQ.L #0x4,A7 000238f4 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 000238f8 2f 12 |/ | MOVE.L (A2),-(A7) 000238fa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000238fe 48 78 00 00 |Hx | PEA.L 0x0 00023902 48 78 00 00 |Hx | PEA.L 0x0 00023906 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 0002390c de c1 | | ADDA.W D1,A7 0002390e 42 17 |B | CLR.B (A7) 00023910 1f 2e 00 0e | . | MOVE.B (A6+0xe),-(A7) 00023914 2f 12 |/ | MOVE.L (A2),-(A7) 00023916 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 0002391c 50 4f |PO | ADDQ.L #0x8,A7 0002391e 48 52 |HR | PEA.L (A2) 00023920 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00023926 58 4f |XO | ADDQ.L #0x4,A7 00023928 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 0002392c 4e 5e |N^ | UNLK A6 0002392e 4e 75 |Nu | RTS 00023930 43 4c 45 41 52 5f 54 41 |CLEAR_TA| .TXT 'CLEAR_TAGSTORE.MEM' 00023942 43 4c 45 41 52 5f 54 41 |CLEAR_TA| .TXT 'CLEAR_TAGSTORE.M32' 00023954 ; -------------------------------------------------------------------------------------- 00023954 ; OMSI PASCAL Function 00023954 ; <LVAR 0x008 1(r)> 00023954 ; <LVAR -0x006 @ 4(r)> 00023954 ; -------------------------------------------------------------------------------------- 00023954 4e 56 ff cc |NV | LINK.W A6,#0xffcc 00023958 bf d5 | | CMPA.L (A5),A7 0002395a 62 06 |b | BHI 0x23962 0002395c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023960 4e 76 |Nv | TRAPV 00023962 de fc 00 2e | . | ADDA.W #0x2e,A7 00023966 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 0002396a 43 ee ff fa |C | LEA.L (A6-0x6),A1 0002396e 55 4f |UO | SUBQ.L #0x2,A7 00023970 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00023976 4a 1f |J | TST.B (A7)+ 00023978 67 0e |g | BEQ 0x23988 0002397a 41 fa ff c6 |A | LEA.L 0x23942,A0 0002397e 70 08 |p | MOVEQ.L #0x08,D0 00023980 3f 20 |? | MOVE.W -(A0),-(A7) 00023982 51 c8 ff fc |Q | DBF D0,0x23980 00023986 60 0c |` | BRA 0x23994 00023988 41 fa ff ca |A | LEA.L 0x23954,A0 0002398c 70 08 |p | MOVEQ.L #0x08,D0 0002398e 3f 20 |? | MOVE.W -(A0),-(A7) 00023990 51 c8 ff fc |Q | DBF D0,0x2398e 00023994 59 4f |YO | SUBQ.L #0x4,A7 00023996 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002399a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002399e 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 000239a2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000239a8 50 4f |PO | ADDQ.L #0x8,A7 000239aa 48 51 |HQ | PEA.L (A1) 000239ac 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000239b2 de fc 00 1a | | ADDA.W #0x1a,A7 000239b6 42 27 |B' | CLR.B -(A7) 000239b8 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 000239bc 2f 11 |/ | MOVE.L (A1),-(A7) 000239be 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000239c4 50 4f |PO | ADDQ.L #0x8,A7 000239c6 48 51 |HQ | PEA.L (A1) 000239c8 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000239ce 58 4f |XO | ADDQ.L #0x4,A7 000239d0 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 000239d4 4e 5e |N^ | UNLK A6 000239d6 4e 75 |Nu | RTS 000239d8 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.MEM ' 000239f0 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.M32 ' 00023a08 ; -------------------------------------------------------------------------------------- 00023a08 ; OMSI PASCAL Function 00023a08 ; <LVAR 0x008 1(r)> 00023a08 ; <LVAR -0x006 @ 4(r)> 00023a08 ; -------------------------------------------------------------------------------------- 00023a08 4e 56 ff be |NV | LINK.W A6,#0xffbe 00023a0c bf d5 | | CMPA.L (A5),A7 00023a0e 62 06 |b | BHI 0x23a16 00023a10 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023a14 4e 76 |Nv | TRAPV 00023a16 de fc 00 3c | < | ADDA.W #0x3c,A7 00023a1a 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00023a1e 45 ee ff fa |E | LEA.L (A6-0x6),A2 00023a22 72 18 |r | MOVEQ.L #0x18,D1 00023a24 55 4f |UO | SUBQ.L #0x2,A7 00023a26 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00023a2c 4a 1f |J | TST.B (A7)+ 00023a2e 67 12 |g | BEQ 0x23a42 00023a30 9e c1 | | SUBA.W D1,A7 00023a32 20 4f | O | MOVEA.L A7,A0 00023a34 43 fa ff a2 |C | LEA.L 0x239d8,A1 00023a38 70 16 |p | MOVEQ.L #0x16,D0 00023a3a 10 d9 | | MOVE.B (A1)+,(A0)+ 00023a3c 51 c8 ff fc |Q | DBF D0,0x23a3a 00023a40 60 10 |` | BRA 0x23a52 00023a42 9e c1 | | SUBA.W D1,A7 00023a44 20 4f | O | MOVEA.L A7,A0 00023a46 43 fa ff a8 |C | LEA.L 0x239f0,A1 00023a4a 70 16 |p | MOVEQ.L #0x16,D0 00023a4c 10 d9 | | MOVE.B (A1)+,(A0)+ 00023a4e 51 c8 ff fc |Q | DBF D0,0x23a4c 00023a52 59 4f |YO | SUBQ.L #0x4,A7 00023a54 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023a58 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023a5c 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00023a60 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023a66 50 4f |PO | ADDQ.L #0x8,A7 00023a68 48 52 |HR | PEA.L (A2) 00023a6a 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00023a70 de fc 00 20 | | ADDA.W #0x20,A7 00023a74 42 27 |B' | CLR.B -(A7) 00023a76 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00023a7a 2f 12 |/ | MOVE.L (A2),-(A7) 00023a7c 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00023a82 50 4f |PO | ADDQ.L #0x8,A7 00023a84 48 52 |HR | PEA.L (A2) 00023a86 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00023a8c 58 4f |XO | ADDQ.L #0x4,A7 00023a8e 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00023a92 4e 5e |N^ | UNLK A6 00023a94 4e 75 |Nu | RTS 00023a96 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.MEM' 00023aa4 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.M32' 00023ab2 ; -------------------------------------------------------------------------------------- 00023ab2 ; OMSI PASCAL Function 00023ab2 ; <LVAR 0x008 1(r)> 00023ab2 ; <LVAR -0x006 @ 4(r)> 00023ab2 ; -------------------------------------------------------------------------------------- 00023ab2 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 00023ab6 bf d5 | | CMPA.L (A5),A7 00023ab8 62 06 |b | BHI 0x23ac0 00023aba 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023abe 4e 76 |Nv | TRAPV 00023ac0 de fc 00 2a | * | ADDA.W #0x2a,A7 00023ac4 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00023ac8 43 ee ff fa |C | LEA.L (A6-0x6),A1 00023acc 55 4f |UO | SUBQ.L #0x2,A7 00023ace 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00023ad4 4a 1f |J | TST.B (A7)+ 00023ad6 67 0e |g | BEQ 0x23ae6 00023ad8 41 fa ff ca |A | LEA.L 0x23aa4,A0 00023adc 70 06 |p | MOVEQ.L #0x06,D0 00023ade 3f 20 |? | MOVE.W -(A0),-(A7) 00023ae0 51 c8 ff fc |Q | DBF D0,0x23ade 00023ae4 60 0c |` | BRA 0x23af2 00023ae6 41 fa ff ca |A | LEA.L 0x23ab2,A0 00023aea 70 06 |p | MOVEQ.L #0x06,D0 00023aec 3f 20 |? | MOVE.W -(A0),-(A7) 00023aee 51 c8 ff fc |Q | DBF D0,0x23aec 00023af2 59 4f |YO | SUBQ.L #0x4,A7 00023af4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023af8 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023afc 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00023b00 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023b06 50 4f |PO | ADDQ.L #0x8,A7 00023b08 48 51 |HQ | PEA.L (A1) 00023b0a 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00023b10 de fc 00 16 | | ADDA.W #0x16,A7 00023b14 42 27 |B' | CLR.B -(A7) 00023b16 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00023b1a 2f 11 |/ | MOVE.L (A1),-(A7) 00023b1c 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00023b22 50 4f |PO | ADDQ.L #0x8,A7 00023b24 48 51 |HQ | PEA.L (A1) 00023b26 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00023b2c 58 4f |XO | ADDQ.L #0x4,A7 00023b2e 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00023b32 4e 5e |N^ | UNLK A6 00023b34 4e 75 |Nu | RTS 00023b36 exp_RUN_CHECK.IOC(): 00023b36 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023b3c 00 08 | | .CONST 0x0008 ; Stack-delta 00023b3e 0d 52 55 4e 5f 43 48 45 | RUN_CHE| .TXT 13,'RUN_CHECK.IOC' 00023b4c 00 | | .CONST 0x0 00023b4d 04 | | .CONST 0x4 ; DIPROC address 00023b4e 00 | | .CONST 0x0 ; Output Parameters 00023b4f 00 | | .CONST 0x0 ; Input Parameters 00023b50 exp_PREP_RUN.IOC(Sw_2): 00023b50 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023b56 00 0a | | .CONST 0x000a ; Stack-delta 00023b58 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.IOC' 00023b65 00 | | .CONST 0x0 00023b66 04 | | .CONST 0x4 ; DIPROC address 00023b67 00 | | .CONST 0x0 ; Output Parameters 00023b68 01 | | .CONST 0x1 ; Input Parameters 00023b69 01 | | .CONST 0x1 ; In arg [2] 00023b6a 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 00023b6e 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00023b72 bf d5 | | CMPA.L (A5),A7 00023b74 4e 76 |Nv | TRAPV 00023b76 42 2e 00 08 |B. | CLR.B (A6+0x8) 00023b7a 30 39 93 03 e0 00 |09 | MOVE.W 0x9303e000,D0 00023b80 02 40 00 08 | @ | ANDI.W #0x0008,D0 00023b84 67 00 00 06 |g | BEQ 0x23b8c 00023b88 52 2e 00 08 |R. | ADDQ.B #0x1,(A6+0x8) 00023b8c 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00023b90 4e 5e |N^ | UNLK A6 00023b92 4e 75 |Nu | RTS 00023b94 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 00023b98 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00023b9c bf d5 | | CMPA.L (A5),A7 00023b9e 4e 76 |Nv | TRAPV 00023ba0 30 3c 02 01 |0< | MOVE.W #0x201,D0 00023ba4 4e b9 80 00 20 64 |N d | JSR 0x80002064 00023baa 67 00 00 06 |g | BEQ 0x23bb2 00023bae 30 7c 00 00 |0| | MOVEA.W #0x0,A0 00023bb2 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 00023bb6 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00023bba 4e 5e |N^ | UNLK A6 00023bbc 4e 75 |Nu | RTS 00023bbe 4e 56 00 00 |NV | LINK.W A6,#0x0000 00023bc2 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00023bc6 bf d5 | | CMPA.L (A5),A7 00023bc8 4e 76 |Nv | TRAPV 00023bca 30 3c 07 00 |0< | MOVE.W #0x700,D0 00023bce 4e b9 80 00 20 64 |N d | JSR 0x80002064 00023bd4 67 00 00 06 |g | BEQ 0x23bdc 00023bd8 30 7c 00 00 |0| | MOVEA.W #0x0,A0 00023bdc 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 00023be0 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00023be4 4e 5e |N^ | UNLK A6 00023be6 4e 75 |Nu | RTS 00023be8 4e 56 00 00 |NV | LINK.W A6,#0x0000 00023bec 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00023bf0 bf d5 | | CMPA.L (A5),A7 00023bf2 4e 76 |Nv | TRAPV 00023bf4 30 3c 08 00 |0< | MOVE.W #0x800,D0 00023bf8 4e b9 80 00 20 64 |N d | JSR 0x80002064 00023bfe 67 00 00 06 |g | BEQ 0x23c06 00023c02 30 7c 00 00 |0| | MOVEA.W #0x0,A0 00023c06 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 00023c0a 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00023c0e 4e 5e |N^ | UNLK A6 00023c10 4e 75 |Nu | RTS 00023c12 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 00023c16 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00023c1a bf d5 | | CMPA.L (A5),A7 00023c1c 4e 76 |Nv | TRAPV 00023c1e 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00023c22 4e b9 80 00 20 5c |N \ | JSR 0x8000205c 00023c28 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023c2c 42 90 |B | CLR.L (A0) 00023c2e 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 00023c32 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00023c36 4e 5e |N^ | UNLK A6 00023c38 4e 75 |Nu | RTS 00023c3a 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 00023c3e 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00023c42 bf d5 | | CMPA.L (A5),A7 00023c44 4e 76 |Nv | TRAPV 00023c46 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00023c4a 4e b9 80 00 20 60 |N ` | JSR 0x80002060 00023c50 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023c54 42 90 |B | CLR.L (A0) 00023c56 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 00023c5a 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00023c5e 4e 5e |N^ | UNLK A6 00023c60 4e 75 |Nu | RTS 00023c62 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 00023c66 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00023c6a bf d5 | | CMPA.L (A5),A7 00023c6c 4e 76 |Nv | TRAPV 00023c6e 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00023c72 4e b9 80 00 20 6c |N l | JSR 0x8000206c 00023c78 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023c7c 42 90 |B | CLR.L (A0) 00023c7e 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 00023c82 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00023c86 4e 5e |N^ | UNLK A6 00023c88 4e 75 |Nu | RTS 00023c8a 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 00023c98 ; -------------------------------------------------------------------------------------- 00023c98 ; OMSI PASCAL Function 00023c98 ; <LVAR 0x008 1(r)> 00023c98 ; -------------------------------------------------------------------------------------- 00023c98 PROG_FAIL: 00023c98 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00023c9c bf d5 | | CMPA.L (A5),A7 00023c9e 62 06 |b | BHI 0x23ca6 00023ca0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023ca4 4e 76 |Nv | TRAPV 00023ca6 de fc 00 2c | , | ADDA.W #0x2c,A7 00023caa 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00023cae 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 00023cb2 70 06 |p | MOVEQ.L #0x06,D0 00023cb4 3f 20 |? | MOVE.W -(A0),-(A7) 00023cb6 51 c8 ff fc |Q | DBF D0,0x23cb4 00023cba 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00023cbe 51 4f |QO | SUBQ.L #0x8,A7 00023cc0 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00023cc4 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023cc8 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00023ccc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023cd2 58 4f |XO | ADDQ.L #0x4,A7 00023cd4 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00023cd8 48 80 |H | EXTB.W D0 00023cda 48 c0 |H | EXTW.L D0 00023cdc 2f 00 |/ | MOVE.L D0,-(A7) 00023cde 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00023ce4 58 4f |XO | ADDQ.L #0x4,A7 00023ce6 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023cec 50 4f |PO | ADDQ.L #0x8,A7 00023cee 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00023cf4 de fc 00 14 | | ADDA.W #0x14,A7 00023cf8 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00023cfc 4e 5e |N^ | UNLK A6 00023cfe 4e 75 |Nu | RTS 00023d00 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 00023d0e 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00023d1c 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00023d2a 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00023d3c 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 00023d54 ; -------------------------------------------------------------------------------------- 00023d54 ; OMSI PASCAL Function 00023d54 ; <LVAR 0x00e 1(r)> 00023d54 ; <LVAR 0x00a 4(r)> 00023d54 ; <LVAR 0x008 1(r)> 00023d54 ; -------------------------------------------------------------------------------------- 00023d54 EXP_FAIL: 00023d54 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 00023d58 bf d5 | | CMPA.L (A5),A7 00023d5a 62 06 |b | BHI 0x23d62 00023d5c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023d60 4e 76 |Nv | TRAPV 00023d62 de fc 00 74 | t | ADDA.W #0x74,A7 00023d66 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00023d6a 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00023d70 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 00023d76 72 01 |r | MOVEQ.L #0x01,D1 00023d78 74 0d |t | MOVEQ.L #0x0d,D2 00023d7a 76 1e |v | MOVEQ.L #0x1e,D3 00023d7c 78 12 |x | MOVEQ.L #0x12,D4 00023d7e 7a 0e |z | MOVEQ.L #0x0e,D5 00023d80 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00023d86 41 fa ff b4 |A | LEA.L 0x23d3c,A0 00023d8a 70 08 |p | MOVEQ.L #0x08,D0 00023d8c 3f 20 |? | MOVE.W -(A0),-(A7) 00023d8e 51 c8 ff fc |Q | DBF D0,0x23d8c 00023d92 59 4f |YO | SUBQ.L #0x4,A7 00023d94 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023d98 3f 01 |? | MOVE.W D1,-(A7) 00023d9a 3f 04 |? | MOVE.W D4,-(A7) 00023d9c 4e 93 |N | JSR (A3) 00023d9e 50 4f |PO | ADDQ.L #0x8,A7 00023da0 4e 94 |N | JSR (A4) 00023da2 50 4f |PO | ADDQ.L #0x8,A7 00023da4 20 4f | O | MOVEA.L A7,A0 00023da6 43 fa ff 58 |C X | LEA.L 0x23d00,A1 00023daa 70 0c |p | MOVEQ.L #0x0c,D0 00023dac 10 d9 | | MOVE.B (A1)+,(A0)+ 00023dae 51 c8 ff fc |Q | DBF D0,0x23dac 00023db2 51 4f |QO | SUBQ.L #0x8,A7 00023db4 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023db8 3f 01 |? | MOVE.W D1,-(A7) 00023dba 3f 02 |? | MOVE.W D2,-(A7) 00023dbc 4e 93 |N | JSR (A3) 00023dbe 54 4f |TO | ADDQ.L #0x2,A7 00023dc0 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00023dc4 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00023dca 54 4f |TO | ADDQ.L #0x2,A7 00023dcc 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023dd2 50 4f |PO | ADDQ.L #0x8,A7 00023dd4 4e 94 |N | JSR (A4) 00023dd6 de c4 | | ADDA.W D4,A7 00023dd8 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00023ddc b0 c1 | | CMPA.W D1,A0 00023dde 67 48 |gH | BEQ 0x23e28 00023de0 9e c5 | | SUBA.W D5,A7 00023de2 22 4f |"O | MOVEA.L A7,A1 00023de4 45 fa ff 28 |E ( | LEA.L 0x23d0e,A2 00023de8 70 0c |p | MOVEQ.L #0x0c,D0 00023dea 12 da | | MOVE.B (A2)+,(A1)+ 00023dec 51 c8 ff fc |Q | DBF D0,0x23dea 00023df0 9e c3 | | SUBA.W D3,A7 00023df2 22 4f |"O | MOVEA.L A7,A1 00023df4 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00023df8 70 1d |p | MOVEQ.L #0x1d,D0 00023dfa 12 d8 | | MOVE.B (A0)+,(A1)+ 00023dfc 51 c8 ff fc |Q | DBF D0,0x23dfa 00023e00 51 4f |QO | SUBQ.L #0x8,A7 00023e02 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00023e06 3f 01 |? | MOVE.W D1,-(A7) 00023e08 3f 02 |? | MOVE.W D2,-(A7) 00023e0a 4e 93 |N | JSR (A3) 00023e0c 58 4f |XO | ADDQ.L #0x4,A7 00023e0e 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00023e12 3f 01 |? | MOVE.W D1,-(A7) 00023e14 3f 03 |? | MOVE.W D3,-(A7) 00023e16 4e 93 |N | JSR (A3) 00023e18 50 4f |PO | ADDQ.L #0x8,A7 00023e1a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023e20 50 4f |PO | ADDQ.L #0x8,A7 00023e22 4e 94 |N | JSR (A4) 00023e24 de fc 00 30 | 0 | ADDA.W #0x30,A7 00023e28 9e c5 | | SUBA.W D5,A7 00023e2a 20 4f | O | MOVEA.L A7,A0 00023e2c 43 fa fe ee |C | LEA.L 0x23d1c,A1 00023e30 70 0c |p | MOVEQ.L #0x0c,D0 00023e32 10 d9 | | MOVE.B (A1)+,(A0)+ 00023e34 51 c8 ff fc |Q | DBF D0,0x23e32 00023e38 51 4f |QO | SUBQ.L #0x8,A7 00023e3a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023e3e 3f 01 |? | MOVE.W D1,-(A7) 00023e40 3f 02 |? | MOVE.W D2,-(A7) 00023e42 4e 93 |N | JSR (A3) 00023e44 54 4f |TO | ADDQ.L #0x2,A7 00023e46 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00023e4a 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00023e50 54 4f |TO | ADDQ.L #0x2,A7 00023e52 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023e58 50 4f |PO | ADDQ.L #0x8,A7 00023e5a 4e 94 |N | JSR (A4) 00023e5c 5d 4f |]O | SUBQ.L #0x6,A7 00023e5e 20 4f | O | MOVEA.L A7,A0 00023e60 43 fa fe da |C | LEA.L 0x23d3c,A1 00023e64 70 16 |p | MOVEQ.L #0x16,D0 00023e66 10 d9 | | MOVE.B (A1)+,(A0)+ 00023e68 51 c8 ff fc |Q | DBF D0,0x23e66 00023e6c 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00023e70 59 4f |YO | SUBQ.L #0x4,A7 00023e72 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00023e76 3f 01 |? | MOVE.W D1,-(A7) 00023e78 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00023e7c 4e 93 |N | JSR (A3) 00023e7e 50 4f |PO | ADDQ.L #0x8,A7 00023e80 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00023e86 de c3 | | ADDA.W D3,A7 00023e88 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00023e8c 4e 5e |N^ | UNLK A6 00023e8e 4e 75 |Nu | RTS