|
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.5,92/04/06,17:18:19, M200_PROGRAM
Names: »LOADER.M200«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »LOADER.M200«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »LOADER.M200«
└─ ⟦this⟧ »LOADER.M200«
@ 20668
<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 20668-20730 Body> Δ+10
<POP 20668-2067e Prologue> Σ0 ↓
<POP 2067e-20686 RegCacheLoad> Σ0 ↓
<POP 20686-206a6 Naked> Σ0 ↓ →0x206b4
<Call 0x20686 0x10538> {}
IPC_Init(void)
<MI 2068c MOVE.L (A6+0x12),-(A7)> Δ-4 {[4, '(A6+0x12)']}
<Call 0x20690 0x10508> {[4, '(A6+0x12)']}
IPC_PutString(a : String)
<POP 20696-20698 StackAdj> Δ+2 {[-2-]}
<MI 20698 MOVE.B (A6+0x10),(A7)> {[-2-]}
<Call 0x2069c 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 2069e-206a0 StackAdj> Δ+2 {}
<MI 206a0 TST.B (A6+0x16)> {}
<MI 206a4 BNE 0x206b4> {}
<POP 206a6-206b4 Naked> Σ0 ↓
<MI 206a6 MOVE.B (A6+0xe),-(A7)> Δ-2 {[2, '(A6+0xe)']}
<Call 0x206aa 0x10502> {[2, '(A6+0xe)']}
IPC_PutBool(a : Bool)
<MI 206ac MOVE.B (A6+0xc),(A7)> {[-2-]}
<Call 0x206b0 0x10502> {[-2-]}
IPC_PutBool(a : Bool)
<POP 206b2-206b4 StackAdj> Δ+2 {}
<POP 206b4-206c0 Naked> Σ0 ↓ →0x206d2 ←0x20686
<Call 0x206b4 0x10514> {}
IPC_PutEnd(void)
<MI 206ba TST.B (A6+0x16)> {}
<MI 206be BEQ 0x206d2> {}
<POP 206c0-206d2 Naked> Σ0 Δ-10 →0x206e2
<Blob 0x206c0 [10] @> Δ-10 {[«10""»]}
<MI 206d0 BRA 0x206e2> {[«10""»]}
<POP 206d2-206e2 Naked> Σ0 Δ-10 ↓ ←0x206b4
<Blob 0x206d2 [10] @> Δ-10 {[«10""»]}
<POP 206e2-20728 Naked> Σ-10 Δ+10 ↓ ←0x206c0
<POP 206e2-206e4 StackAdj> Δ-4 {[-14-]}
<Lit 0x206e4> {[-10-]|[$$…]}
<Pointer.sp 0x206e4 4> Δ-4
<Const 0x206e8 0x1.2> Δ-2
<Const 0x206ec 0x9.2> Δ-2
<Call 0x206f0 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 206f6-206f8 StackAdj> Δ+8
<Const 0x206f8 0x1.4> Δ-4 {[-10-]|[$$…]|[##1]}
<Const 0x206fc 0x2.2> Δ-2 {[-10-]|[$$…]|[##1]|[#2]}
<Pointer.fp 0x20700 <LVAR -0x004 @>> Δ-4 {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
<Call 0x20704 0x103b0> {[-10-]|[$$…]|[##1]|[#2]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 2070a-2070e StackAdj> Δ+24 {}
<Call 0x2070e 0x10538> {}
IPC_Init(void)
<MI 20714 MOVEA.L (A6+0x8),A0> {}
<MI 20718 PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x2071a 0x10526> {[4, '^(A0)']}
IPC_GetBool() : Bool
<POP 20720-20722 StackAdj> Δ+4 {}
<Call 0x20722 0x1051a> {}
IPC_GetEnd(void)
<POP 20728-20730 Epilogue> Σ0
@ 20730
<LVAR -0x002 @ 1(r)>
<LVAR -0x006 @ 4(r)>
<LVAR -0x008 @ 1(r)>
<LVAR -0x00c @ 4(r)>
<POP 20730-207fe Body> Δ+4
<POP 20730-20746 Prologue> Σ0 ↓
<POP 20746-20758 RegCacheLoad> Σ0 ↓
<POP 20758-20794 Naked> Σ0 ↓ →0x207f6
<Blob 0x20758 [18] @> Δ-18 {[«18""»]}
<POP 20764-20766 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x20766 18> {[«18""»]|[$$COPYRIGHT_INFO.TXT]}
<POP 20778-2077a StackAdj> Δ-2 {[«18""»]|[$$COPYRIGHT_INFO.TXT]|[-2-]}
<MI 2077a CLR.B (A7)> {[«18""»]|[$$COPYRIGHT_INFO.TXT]|[-2-]}
<MI 2077c CLR.B -(A7)> Δ-2 {[«18""»]|[$$COPYRIGHT_INFO.TXT]|[-2-]|[#0]}
<Const 0x2077e 0x0.4> Δ-4 {[«18""»]|[$$COPYRIGHT_INFO.TXT]|[-2-]|[#0]|[##0]}
<Pointer.fp 0x20782 <LVAR -0x008 @ 1(r)>> Δ-4 {[«18""»]|[$$COPYRIGHT_INFO.TXT]|[-2-]|[#0]|[##0]|[@@-8]}
<Pointer.fp 0x20784 <LVAR -0x00c @ 4(r)>> Δ-4 {[«18""»]|[$$COPYRIGHT_INFO.TXT]|[-2-]|[#0]|[##0]|[@@-8]|[@@-12]}
<Call 0x20786 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 2078c-20790 StackAdj> Δ+38 {}
<MI 20790 TST.B (A6-0x8)> {}
<MI 20792 BNE 0x207f6> {}
<POP 20794-2079a Naked> Σ0 ↓
<Call 0x20794 0x103dc> {}
WriteConsoleCrLf(void)
<POP 2079a-207b4 Naked> Σ0 ↓ →0x207be ←0x207c6
<Pointer.fp 0x2079a <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x2079c 0x102b8> {[@@-6]}
NewString(VAR a : String)
<MI 207a2 MOVE.L (A6-0xc),(A7)> {[4, '(A6-0xc)']}
<Pointer.fp 0x207a4 <LVAR -0x006 @ 4(r)>> Δ-4 {[4, '(A6-0xc)']|[@@-6]}
<Pointer.fp 0x207a6 <LVAR -0x002 @ 1(r)>> Δ-4 {[4, '(A6-0xc)']|[@@-6]|[@@-2]}
<Call 0x207a8 0x1043c> {[4, '(A6-0xc)']|[@@-6]|[@@-2]}
FileReadLine(file : File; VAR a : String; VAR b : Byte)
<POP 207ae-207b0 StackAdj> Δ+12 {}
<MI 207b0 TST.B (A6-0x2)> {}
<MI 207b2 BNE 0x207be> {}
<POP 207b4-207be Naked> Σ0 Δ-4 →0x207c6
<MI 207b4 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x207b6 0x103e0> {[4, '(A6-0x6)']}
WriteConsoleStringCrLf(str : String)
<MI 207bc BRA 0x207c6> {[4, '(A6-0x6)']}
<POP 207be-207c6 Naked> Σ0 Δ-4 ↓ ←0x2079a
<Pointer.fp 0x207be <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x207c0 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 207c6-207cc Naked> Σ-4 Δ+4 ↓ →0x2079a ←0x207b4
<POP 207c6-207c8 StackAdj> Δ+4 {}
<MI 207c8 TST.B (A6-0x2)> {}
<MI 207ca BEQ 0x2079a> {}
<POP 207cc-207f6 Naked> Σ0 ↓
<Call 0x207cc 0x103dc> {}
WriteConsoleCrLf(void)
<MI 207d2 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x207d4 0x2.2> Δ-2 {[#0]|[#2]}
<Const 0x207d8 0x1.4> Δ-4 {[#0]|[#2]|[##1]}
<Pointer.fp 0x207dc <LVAR -0x008 @ 1(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-8]}
<Pointer.fp 0x207de <LVAR -0x00c @ 4(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-8]|[@@-12]}
<Call 0x207e0 0x1038c> {[#0]|[#2]|[##1]|[@@-8]|[@@-12]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 207e6-207e8 StackAdj> Δ+12 {[#0]|[#2]}
<POP 207e8-207e9 StackAdj> Δ+4 {}
<Const 0x207e9 0x2faee.4> Δ-4 {[##195310]}
<Call 0x207ee 0x10224> {[##195310]}
KC12_Sleep(dur: Long)
<POP 207f4-207f6 StackAdj> Δ+4 {}
<POP 207f6-207fe Epilogue> Σ0 ←0x20758
@ 207fe
<LVAR 0x008 4(r)>
<POP 207fe-20898 Body>
<POP 207fe-20814 Prologue> Σ0 ↓
<POP 20814-20818 RegCacheLoad> Σ0 ↓
<POP 20818-20820 Naked> Σ0 ↓ →0x20828
<MI 20818 TST.B 0x23e62> {}
<MI 2081e BEQ 0x20828> {}
<POP 20820-20828 Naked> Σ0 ↓
<MI 20820 MOVEA.L (A6+0x8),A0> {}
<MI 20822 ORI.W #0x4000,(A0+0x4)> {}
<POP 20828-20830 Naked> Σ0 ↓ →0x20838 ←0x20818
<MI 20828 TST.B 0x23e63> {}
<MI 2082e BEQ 0x20838> {}
<POP 20830-20838 Naked> Σ0 ↓
<MI 20830 MOVEA.L (A6+0x8),A0> {}
<MI 20832 ORI.W #0x2000,(A0+0x4)> {}
<POP 20838-20840 Naked> Σ0 ↓ →0x20848 ←0x20828
<MI 20838 TST.B 0x23e64> {}
<MI 2083e BEQ 0x20848> {}
<POP 20840-20848 Naked> Σ0 ↓
<MI 20840 MOVEA.L (A6+0x8),A0> {}
<MI 20842 ORI.W #0x1000,(A0+0x4)> {}
<POP 20848-20850 Naked> Σ0 ↓ →0x20858 ←0x20838
<MI 20848 TST.B 0x23e67> {}
<MI 2084e BEQ 0x20858> {}
<POP 20850-20858 Naked> Σ0 ↓
<MI 20850 MOVEA.L (A6+0x8),A0> {}
<MI 20852 ORI.W #0x0200,(A0+0x4)> {}
<POP 20858-20860 Naked> Σ0 ↓ →0x20868 ←0x20848
<MI 20858 TST.B 0x23e68> {}
<MI 2085e BEQ 0x20868> {}
<POP 20860-20868 Naked> Σ0 ↓
<MI 20860 MOVEA.L (A6+0x8),A0> {}
<MI 20862 ORI.W #0x0100,(A0+0x4)> {}
<POP 20868-20874 Naked> Σ0 ↓ →0x2087c ←0x20858
<MI 20868 MOVE.B 0x23e36,D0> {}
<MI 2086e LSL.B #0x7,D0> {}
<MI 20870 LSR.B #0x7,D0> {}
<MI 20872 BEQ 0x2087c> {}
<POP 20874-2087c Naked> Σ0 ↓
<MI 20874 MOVEA.L (A6+0x8),A0> {}
<MI 20876 ORI.W #0x0800,(A0+0x4)> {}
<POP 2087c-20888 Naked> Σ0 ↓ →0x20890 ←0x20868
<MI 2087c MOVE.B 0x23e36,D0> {}
<MI 20882 LSL.B #0x6,D0> {}
<MI 20884 LSR.B #0x7,D0> {}
<MI 20886 BEQ 0x20890> {}
<POP 20888-20890 Naked> Σ0 ↓
<MI 20888 MOVEA.L (A6+0x8),A0> {}
<MI 2088a ORI.W #0x0400,(A0+0x4)> {}
<POP 20890-20898 Epilogue> Σ0 ←0x2087c
@ 20898
<LVAR -0x004 @>
<POP 20898-20918 Body>
<POP 20898-208ae Prologue> Σ0 ↓
<POP 208ae-20910 Naked> Σ0 ↓
<Call 0x208ae 0x10538> {}
IPC_Init(void)
<MI 208b4 CLR.B -(A7)> Δ-2 {[#0]}
<Call 0x208b6 0x10502> {[#0]}
IPC_PutBool(a : Bool)
<POP 208bc-208be StackAdj> Δ+2 {}
<Call 0x208be 0x10514> {}
IPC_PutEnd(void)
<Blob 0x208c4 [10] @> Δ-10 {[«10""»]}
<POP 208d6-208d8 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x208d8 9> {[«10""»]|[$$CONFIGURE]}
<Const 0x208ec 0x1.4> Δ-4 {[«10""»]|[$$CONFIGURE]|[##1]}
<Const 0x208f0 0x2.2> Δ-2 {[«10""»]|[$$CONFIGURE]|[##1]|[#2]}
<Pointer.fp 0x208f4 <LVAR -0x004 @>> Δ-4 {[«10""»]|[$$CONFIGURE]|[##1]|[#2]|[@@-4]}
<Call 0x208f8 0x103b0> {[«10""»]|[$$CONFIGURE]|[##1]|[#2]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 208fe-20902 StackAdj> Δ+24 {}
<Const 0x20902 0x2415c.4> Δ-4 {[##147804]}
<Call 0x20908 0x105a4> {[##147804]}
Read_fc0c() : Word
<POP 2090e-20910 StackAdj> Δ+4 {}
<POP 20910-20918 Epilogue> Σ0
@ 20918
<POP 20918-20964 Body>
<POP 20918-2092e Prologue> Σ0 ↓
<POP 2092e-20934 RegCacheLoad> Σ0 ↓
<POP 20934-2095c Naked> Σ0 ↓
<MI 20934 CLR.W 0x24172> {}
<MI 20936 CLR.L D0> {}
<MI 20938 MOVE.W 0x24172,D0> {}
<MI 2093a MOVE.L D0,D1> {}
<MI 2093c ASL.L #0x8,D1> {}
<MI 2093e ASL.L #0x4,D1> {}
<MI 20940 ADDQ.L #0x4,D0> {}
<MI 20942 ASL.L #0x8,D0> {}
<MI 20944 ADD.L D1,D0> {}
<MI 20946 ADDI.L #0x00000080,D0> {}
<POP 0x2094c LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 20956 MOVE.W D0,0x24170> {}
<POP 2095c-20964 Epilogue> Σ0
@ 20964
<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 20964-20aa0 Body> Δ+72
<POP 20964-2097a Prologue> Σ0 ↓
<POP 2097a-2098c RegCacheLoad> Σ0 ↓
<POP 2098c-209a8 Naked> Σ0 →0x20a0e →0x209f6 →0x209c4 →0x209de →0x20a26 →0x20a26 →0x20a26 →0x20a26
<MI 2098c MOVE.B (A6+0x8),D0> {}
<MI 20990 EXTB.W D0> {}
<MI 20992 MOVE.W D0,D1> {}
<MI 20994 SUBQ.W #0x2,D1> {}
<POP 0x20996 LimitCheck 0x0 ≤ D1 ≤ 0xd> {}
<MI 2099e ADD.W D1,D1> {}
<MI 209a0 SWITCH D1.W> {}
<POP 209c4-209da Naked> Σ0 Δ-24 ↓ ←0x2098c
<Pointer.fp 0x209c4 <LVAR -0x012 @ 1(r)>> Δ-4 {[@@-18]}
<Pointer.fp 0x209c6 <LVAR -0x011 @ 1(r)>> Δ-4 {[@@-18]|[@@-17]}
<Pointer.fp 0x209c8 <LVAR -0x00f @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]}
<Pointer.fp 0x209ca <LVAR -0x00e @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]}
<Pointer.fp 0x209cc <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]}
<Pointer.fp 0x209d0 <LVAR -0x00b @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<Call 0x209d4 0x23534> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
<POP 209da-209de Naked> Σ-24 Δ+24 →0x20a42 ←0x209de ←0x209f6 ←0x20a0e
<POP 209da-209dc StackAdj> Δ+24 {}
<MI 209dc BRA 0x20a42> {}
<POP 209de-209f6 Naked> Σ0 Δ-24 →0x209da ←0x2098c
<Pointer.fp 0x209de <LVAR -0x012 @ 1(r)>> Δ-4 {[@@-18]}
<Pointer.fp 0x209e0 <LVAR -0x011 @ 1(r)>> Δ-4 {[@@-18]|[@@-17]}
<Pointer.fp 0x209e2 <LVAR -0x00f @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]}
<Pointer.fp 0x209e4 <LVAR -0x00e @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]}
<Pointer.fp 0x209e6 <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]}
<Pointer.fp 0x209ea <LVAR -0x00b @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<Call 0x209ee 0x235ec> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
<MI 209f4 BRA 0x209da> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<POP 209f6-20a0e Naked> Σ0 Δ-24 →0x209da ←0x2098c
<Pointer.fp 0x209f6 <LVAR -0x012 @ 1(r)>> Δ-4 {[@@-18]}
<Pointer.fp 0x209f8 <LVAR -0x011 @ 1(r)>> Δ-4 {[@@-18]|[@@-17]}
<Pointer.fp 0x209fa <LVAR -0x00f @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]}
<Pointer.fp 0x209fc <LVAR -0x00e @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]}
<Pointer.fp 0x209fe <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]}
<Pointer.fp 0x20a02 <LVAR -0x00b @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<Call 0x20a06 0x23406> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
<MI 20a0c BRA 0x209da> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<POP 20a0e-20a26 Naked> Σ0 Δ-24 →0x209da ←0x2098c
<Pointer.fp 0x20a0e <LVAR -0x012 @ 1(r)>> Δ-4 {[@@-18]}
<Pointer.fp 0x20a10 <LVAR -0x011 @ 1(r)>> Δ-4 {[@@-18]|[@@-17]}
<Pointer.fp 0x20a12 <LVAR -0x00f @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]}
<Pointer.fp 0x20a14 <LVAR -0x00e @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]}
<Pointer.fp 0x20a16 <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]}
<Pointer.fp 0x20a1a <LVAR -0x00b @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<Call 0x20a1e 0x234ba> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
exp_READ_NOVRAM_DATA.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr)
<MI 20a24 BRA 0x209da> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<POP 20a26-20a42 Naked> Σ0 ↓ ←0x2098c ←0x2098c ←0x2098c ←0x2098c
<MI 20a26 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Pointer.fp 0x20a28 <LVAR -0x012 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]}
<Pointer.fp 0x20a2a <LVAR -0x011 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]}
<Pointer.fp 0x20a2c <LVAR -0x00f @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]}
<Pointer.fp 0x20a2e <LVAR -0x00e @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]}
<Pointer.fp 0x20a30 <LVAR -0x00d @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]}
<Pointer.fp 0x20a34 <LVAR -0x00b @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<Call 0x20a38 0x236aa> {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-13]|[@@-11]}
<POP 20a3e-20a42 StackAdj> Δ+26 {}
<POP 20a42-20a48 Naked> Σ0 ↓ →0x20a98 ←0x209da
<MI 20a42 TST.B (A6-0xb)> {}
<MI 20a46 BEQ 0x20a98> {}
<POP 20a48-20a98 Naked> Σ0 ↓
<MI 20a48 MOVE.B (A6-0x12),(A6-0xa)> {}
<MI 20a4c MOVE.B (A6-0x11),(A6-0x9)> {}
<MI 20a50 MOVE.B (A6-0x10),(A6-0x8)> {}
<MI 20a56 MOVE.B (A6-0xf),(A6-0x7)> {}
<MI 20a5a MOVE.B (A6-0xe),(A6-0x6)> {}
<MI 20a5e MOVE.B (A6-0xd),(A6-0x5)> {}
<MI 20a64 MOVE.B (A6-0xc),(A6-0x4)> {}
<MI 20a6a CLR.B (A6-0x3)> {}
<MI 20a6e MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<MI 20a72 MOVE.L (A6-0xa),-(A7)> Δ-4 {[4, '(A6-0x6)']|[4, '(A6-0xa)']}
<MI 20a76 PEA.L (A7)> Δ-4 {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']}
<Const 0x20a78 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']|[##0]}
<Const 0x20a7c 0x7.4> Δ-4 {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']|[##0]|[##7]}
<MI 20a80 ASL.W #0x3,D0> {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']|[##0]|[##7]}
<MI 20a82 LEA.L 0x23e2e,A0> {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']|[##0]|[##7]}
<MI 20a88 LEA.L (A0+D0.W),A0> {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']|[##0]|[##7]}
<MI 20a8c PEA.L (A0+0x34a)> Δ-4 {[4, '(A6-0x6)']|[4, '(A6-0xa)']|[4, '^(A7)']|[##0]|[##7]|[4, '^(A0+0x34a)']}
<Call 0x20a90 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 20a96-20a98 StackAdj> Δ+24 {}
<POP 20a98-20aa0 Epilogue> Σ0 ←0x20a42
@ 20aa0
<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 20aa0-20b6c Body>
<POP 20aa0-20ab6 Prologue> Σ0 ↓
<POP 20ab6-20ac0 RegCacheLoad> Σ0 ↓
<POP 20ac0-20b64 Naked> Σ0 ↓
<POP 20ac0-20ac2 StackAdj> Δ-2 {[-2-]}
<Const 0x20ac2 0x101.4> Δ-4 {[-2-]|[##257]}
<Call 0x20ac6 0x10592> {[-2-]|[##257]}
ReadConfig(where : Long) : Word
<POP 20ac8-20aca StackAdj> Δ+4 {[-2-]}
<MI 20aca MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20acc LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20ace MOVE.B D0,(A6-0x8)> {}
<POP 20ad2-20ad4 StackAdj> Δ-2 {[-2-]}
<Const 0x20ad4 0x102.4> Δ-4 {[-2-]|[##258]}
<Call 0x20ad8 0x10592> {[-2-]|[##258]}
ReadConfig(where : Long) : Word
<POP 20ada-20adc StackAdj> Δ+4 {[-2-]}
<MI 20adc MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20ade LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20ae0 MOVE.B D0,(A6-0x7)> {}
<POP 20ae4-20ae6 StackAdj> Δ-2 {[-2-]}
<Const 0x20ae6 0x103.4> Δ-4 {[-2-]|[##259]}
<Call 0x20aea 0x10592> {[-2-]|[##259]}
ReadConfig(where : Long) : Word
<POP 20aec-20aee StackAdj> Δ+4 {[-2-]}
<MI 20aee MOVE.W (A7)+,D0> Δ+2 {}
<POP 0x20af0 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20af2 MOVE.B D0,(A6-0x6)> {}
<POP 20af6-20af8 StackAdj> Δ-2 {[-2-]}
<Const 0x20af8 0x104.4> Δ-4 {[-2-]|[##260]}
<Call 0x20afc 0x10592> {[-2-]|[##260]}
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-0x5)> {}
<POP 20b08-20b0a StackAdj> Δ-2 {[-2-]}
<Const 0x20b0a 0x105.4> Δ-4 {[-2-]|[##261]}
<Call 0x20b0e 0x10592> {[-2-]|[##261]}
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-0x4)> {}
<POP 20b1a-20b1c StackAdj> Δ-2 {[-2-]}
<Const 0x20b1c 0x106.4> Δ-4 {[-2-]|[##262]}
<Call 0x20b20 0x10592> {[-2-]|[##262]}
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-0x3)> {}
<POP 20b2c-20b2e StackAdj> Δ-2 {[-2-]}
<Const 0x20b2e 0x107.4> Δ-4 {[-2-]|[##263]}
<Call 0x20b32 0x10592> {[-2-]|[##263]}
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-0x2)> {}
<MI 20b3e CLR.B (A6-0x1)> {}
<MI 20b42 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 20b46 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x4)']|[4, '(A6-0x8)']}
<MI 20b4a PEA.L (A7)> Δ-4 {[4, '(A6-0x4)']|[4, '(A6-0x8)']|[4, '^(A7)']}
<Const 0x20b4c 0x0.4> Δ-4 {[4, '(A6-0x4)']|[4, '(A6-0x8)']|[4, '^(A7)']|[##0]}
<Const 0x20b50 0x7.4> Δ-4 {[4, '(A6-0x4)']|[4, '(A6-0x8)']|[4, '^(A7)']|[##0]|[##7]}
<Const 0x20b54 0x24198.4> Δ-4 {[4, '(A6-0x4)']|[4, '(A6-0x8)']|[4, '^(A7)']|[##0]|[##7]|[##147864]}
<Call 0x20b5a 0x104b4> {[4, '(A6-0x4)']|[4, '(A6-0x8)']|[4, '^(A7)']|[##0]|[##7]|[##147864]}
?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
<POP 20b60-20b64 StackAdj> Δ+24 {}
<POP 20b64-20b6c Epilogue> Σ0
@ 20b6c
<POP 20b6c-20bf0 Body>
<POP 20b6c-20b82 Prologue> Σ0 ↓
<POP 20b82-20b88 RegCacheLoad> Σ0 ↓
<POP 20b88-20b8a Naked> Σ0 ↓
<MI 20b88 MOVEQ.L #0x00,D7> {}
<POP 20b8a-20bac Naked> Σ0 ↓ →0x20b8a ←0x20b8a
<MI 20b8a MOVE.B D7,D0> {}
<MI 20b8c EXTB.W D0> {}
<MI 20b8e ASL.W #0x3,D0> {}
<MI 20b90 LEA.L 0x23e2e,A0> {}
<MI 20b96 LEA.L (A0+D0.W),A0> {}
<MI 20b9a MOVE.L 0x20574,(A0+0x34a)> {}
<MI 20ba0 MOVE.L 0x20578,(A0+0x34e)> {}
<MI 20ba6 ADDQ.B #0x1,D7> {}
<MI 20ba8 CMP.B #0x0f,D7> {}
<MI 20baa BLE 0x20b8a> {}
<POP 20bac-20bcc Naked> Σ0 ↓
<Call 0x20bac 0x20aa0> {}
<Const 0x20bb0 0x2.2> Δ-2 {[#2]}
<Call 0x20bb4 0x20964> {[#2]}
<POP 20bb6-20bb7 StackAdj> Δ+2 {}
<Const 0x20bb7 0x3.2> Δ-2 {[#3]}
<Call 0x20bba 0x20964> {[#3]}
<POP 20bbc-20bbd StackAdj> Δ+2 {}
<Const 0x20bbd 0x6.2> Δ-2 {[#6]}
<Call 0x20bc0 0x20964> {[#6]}
<POP 20bc2-20bc3 StackAdj> Δ+2 {}
<Const 0x20bc3 0x7.2> Δ-2 {[#7]}
<Call 0x20bc6 0x20964> {[#7]}
<POP 20bc8-20bca StackAdj> Δ+2 {}
<MI 20bca MOVEQ.L #0x0c,D7> {}
<POP 20bcc-20bdc Naked> Σ0 ↓ →0x20be2 ←0x20be2
<POP 20bcc-20bce StackAdj> Δ-2 {[-2-]}
<MI 20bce MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x20bd0 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20bd6-20bd8 StackAdj> Δ+2 {[-2-]}
<MI 20bd8 TST.B (A7)+> Δ+2 {}
<MI 20bda BEQ 0x20be2> {}
<POP 20bdc-20be2 Naked> Σ0 ↓
<MI 20bdc MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x20bde 0x20964> {[2, 'D7']}
<POP 20be0-20be2 StackAdj> Δ+2 {}
<POP 20be2-20be8 Naked> Σ0 ↓ →0x20bcc ←0x20bcc
<MI 20be2 ADDQ.B #0x1,D7> {}
<MI 20be4 CMP.B #0x0f,D7> {}
<MI 20be6 BLE 0x20bcc> {}
<POP 20be8-20bf0 Epilogue> Σ0
@ 20bf0
<LVAR 0x008 4(r)>
<LVAR -0x004 1(rw)>
<POP 20bf0-20d06 Body>
<POP 20bf0-20c06 Prologue> Σ0 ↓
<POP 20c06-20c0e RegCacheLoad> Σ0 ↓
<POP 20c0e-20c28 Naked> Σ0 ↓ →0x20c60
<Const 0x20c0e 0x5.2> Δ-2 {[#5]}
<Const 0x20c12 0x2.2> Δ-2 {[#5]|[#2]}
<Call 0x20c16 0x1048a> {[#5]|[#2]}
DiProcCmd(board : Byte; cmd : Byte)
<POP 20c1c-20c1e StackAdj> Δ+4 {}
<MI 20c1e MOVE.B 0x2415d,D0> {}
<MI 20c24 LSR.B #0x7,D0> {}
<MI 20c26 BNE 0x20c60> {}
<POP 20c28-20c3a Naked> Σ0 ↓ →0x20c42
<MI 20c28 MOVEA.L (A6+0x8),A0> {}
<MI 20c2c MOVE.B #0x01,(A0)> {}
<POP 20c2e-20c30 StackAdj> Δ-2 {[-2-]}
<Call 0x20c30 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 20c36 TST.B (A7)+> Δ+2 {}
<MI 20c38 BEQ 0x20c42> {}
<POP 20c3a-20c42 Naked> Σ0 →0x20c48
<Call 0x20c3a 0x233ac> {}
exp_LOAD_HRAM_8_0.FIU()
<MI 20c40 BRA 0x20c48> {}
<POP 20c42-20c48 Naked> Σ0 ↓ ←0x20c28
<Call 0x20c42 0x233ca> {}
exp_LOAD_HRAM_32_0.FIU()
<POP 20c48-20c60 Naked> Σ0 ↓ ←0x20c3a
<Call 0x20c48 0x23448> {}
exp_LOAD_HRAM_1.FIU()
<Call 0x20c4e 0x23668> {}
exp_ALIGN_CSA.VAL()
<Call 0x20c54 0x235d2> {}
exp_ALIGN_CSA.TYP()
<Call 0x20c5a 0x105c2> {}
Or_fc0c_80(void)
<POP 20c60-20c64 Naked> Σ0 ↓ ←0x20c0e
<MI 20c60 CLR.B (A6-0x4)> {}
<MI 20c62 MOVEQ.L #0x0c,D7> {}
<POP 20c64-20c74 Naked> Σ0 ↓ →0x20c80 ←0x20c80
<POP 20c64-20c66 StackAdj> Δ-2 {[-2-]}
<MI 20c66 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x20c68 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20c6e-20c70 StackAdj> Δ+2 {[-2-]}
<MI 20c70 TST.B (A7)+> Δ+2 {}
<MI 20c72 BEQ 0x20c80> {}
<POP 20c74-20c80 Naked> Σ0 ↓
<MI 20c74 CLR.L D0> {}
<MI 20c76 MOVE.B (A6-0x4),D0> {}
<MI 20c78 ADDQ.W #0x1,D0> {}
<POP 0x20c7a LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 20c7e MOVE.B D0,(A6-0x4)> {}
<POP 20c80-20c86 Naked> Σ0 ↓ →0x20c64 ←0x20c64
<MI 20c80 ADDQ.B #0x1,D7> {}
<MI 20c82 CMP.B #0x0f,D7> {}
<MI 20c84 BLE 0x20c64> {}
<POP 20c86-20c88 Naked> Σ0 ↓
<MI 20c86 MOVEQ.L #0x0c,D7> {}
<POP 20c88-20c98 Naked> Σ0 ↓ →0x20cda ←0x20cda
<POP 20c88-20c8a StackAdj> Δ-2 {[-2-]}
<MI 20c8a MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x20c8c 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20c92-20c94 StackAdj> Δ+2 {[-2-]}
<MI 20c94 TST.B (A7)+> Δ+2 {}
<MI 20c96 BEQ 0x20cda> {}
<POP 20c98-20cda Naked> Σ0 ↓
<MI 20c98 MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<POP 20c9a-20c9c StackAdj> Δ-2 {[2, 'D7']|[-2-]}
<MI 20c9c MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']|[-2-]|[2, 'D7']}
<Call 0x20c9e 0x104c6> {[2, 'D7']|[-2-]|[2, 'D7']}
EQ_1c218(a : Byte) : Bool
<POP 20ca4-20ca6 StackAdj> Δ+2 {[2, 'D7']|[-2-]}
<MI 20ca6 MOVE.B (A7),D0> {[2, 'D7']|[-2-]}
<MI 20ca8 EXTB.W D0> {[2, 'D7']|[-2-]}
<POP 0x20caa LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']|[-2-]}
<MI 20cac MOVE.B D0,(A7)> {[2, 'D7']|[-2-]}
<POP 20cae-20cb0 StackAdj> Δ-2 {[2, 'D7']|[-4-]}
<Call 0x20cb0 0x104cc> {[2, 'D7']|[-4-]}
MemOnly2MB() : Bool
<MI 20cb6 MOVE.B (A7),D0> {[2, 'D7']|[-4-]}
<MI 20cb8 EXTB.W D0> {[2, 'D7']|[-4-]}
<POP 0x20cba LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']|[-4-]}
<MI 20cbc MOVE.B D0,(A7)> {[2, 'D7']|[-4-]}
<MI 20cbe MOVE.B (A6-0x4),-(A7)> Δ-2 {[2, 'D7']|[-4-]|[2, '(A6-0x4)']}
<Call 0x20cc0 0x2392a> {[2, 'D7']|[-4-]|[2, '(A6-0x4)']}
<POP 20cc6-20cc8 StackAdj> Δ+6 {[2, 'D7']}
<MI 20cc8 MOVE.B D7,(A7)> {[-2-]}
<Call 0x20cca 0x23a12> {[-2-]}
<MI 20cd0 MOVE.B D7,(A7)> {[-2-]}
<Call 0x20cd2 0x23ac6> {[-2-]}
<POP 20cd8-20cda StackAdj> Δ+2 {}
<POP 20cda-20ce0 Naked> Σ0 ↓ →0x20c88 ←0x20c88
<MI 20cda ADDQ.B #0x1,D7> {}
<MI 20cdc CMP.B #0x0f,D7> {}
<MI 20cde BLE 0x20c88> {}
<POP 20ce0-20cfe Naked> Σ0 ↓
<Call 0x20ce0 0x2349c> {}
exp_CLEAR_PARITY.FIU()
<Call 0x20ce6 0x2364a> {}
exp_CLEAR_PARITY.VAL()
<Call 0x20cec 0x235b4> {}
exp_CLEAR_PARITY.TYP()
<Call 0x20cf2 0x23516> {}
exp_CLEAR_PARITY.SEQ()
<Call 0x20cf8 0x105b0> {}
FifoInit(void)
<POP 20cfe-20d06 Epilogue> Σ0
@ 20d06
<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 20d06-20eb0 Body> Δ+30
<POP 20d06-20d1c Prologue> Σ0 ↓
<POP 20d1c-20d34 RegCacheLoad> Σ0 ↓
<POP 20d34-20d3c Naked> Σ0 ↓ →0x20d4e
<MI 20d34 MOVEA.L (A6+0x14),A0> {}
<MI 20d38 TST.B (A0)> {}
<MI 20d3a BEQ 0x20d4e> {}
<POP 20d3c-20d4e Naked> Σ0 →0x20d5a
<MI 20d3c MOVEA.L (A6+0x10),A0> {}
<MI 20d40 LEA.L (A6-0x26),A1> {}
<BlockMove 32,A0,A1> {}
<MI 20d4c BRA 0x20d5a> {}
<POP 20d4e-20d5a Naked> Σ0 ↓ ←0x20d34
<MI 20d4e LEA.L (A6-0x26),A1> {}
<BlockMove 32,A0,A1> {}
<POP 20d5a-20d60 Naked> Σ0 ↓ →0x20d6c ←0x20d3c ←0x20e6a
<MI 20d5a TST.B (A6-0x25)> {}
<MI 20d5e BNE 0x20d6c> {}
<POP 20d60-20d6c Naked> Σ0 Δ-30 →0x20de0
<Blob 0x20d60 [30] (A6-0x6)> Δ-30 {[«30»]}
<MI 20d6a BRA 0x20de0> {[«30»]}
<POP 20d6c-20dcc Naked> Σ0 ↓ →0x20df2 ←0x20d5a
<Blob 0x20d6c [2] @> Δ-2 {[«2""»]}
<Blob 0x20d70 [30] (A6-0x6)> Δ-30 {[«2""»]|[«30»]}
<Blob 0x20d7a [4] @> Δ-4 {[«2""»]|[«30»]|[«4""»]}
<POP 20d7e-20d80 StackAdj> Δ-12 {[«2""»]|[«30»]|[«4""»]|[-12-]}
<MI 20d80 MOVE.L (A6+0xc),-(A7)> Δ-4 {[«2""»]|[«30»]|[«4""»]|[-12-]|[4, '(A6+0xc)']}
<Call 0x20d84 0x102cc> {[«2""»]|[«30»]|[«4""»]|[-12-]|[4, '(A6+0xc)']}
StringDup(a : String) : String
<Lit 0x20d8a 2> {[«2""»]|[«30»]|[«4""»]|[-12-]|[$$ []}
<POP 20d94-20d96 StackAdj> Δ-4 {[«2""»]|[«30»]|[«4""»]|[-12-]|[$$ []|[-4-]}
<Lit 0x20d96> {[«2""»]|[«30»]|[«4""»]|[-12-]|[$$ []|[$$…]}
<Pointer.sp 0x20d96 24> Δ-4
<Const 0x20d9a 0x1.2> Δ-2
<Const 0x20d9c 0x1e.2> Δ-2
<Call 0x20d9e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20da0-20da2 StackAdj> Δ+8
<POP 20da0-20da2 StackAdj> Δ-4 {[«2""»]|[«30»]|[«4""»]|[-12-]|[$$ []|[$$…]|[-4-]}
<Lit 0x20da2 4> {[«2""»]|[«30»]|[«4""»]|[-12-]|[$$ []|[$$…]|[$$] :_]}
<Call 0x20db0 0x102d8> {[«2""»]|[«30»]|[«4""»]|[-12-]|[$$ []|[$$…]|[$$] :_]}
StringCat4(a, b, c, d : String) : String
<POP 20db6-20db8 StackAdj> Δ+16 {[«2""»]|[«30»]|[«4""»]|[-8-]}
<Call 0x20db8 0x103e4> {[«2""»]|[«30»]|[«4""»]|[-8-]}
AskConsoleString(prompt : String) : String
<POP 20dbe-20dc0 StackAdj> Δ+4 {[«2""»]|[«30»]|[«4""»]|[-4-]}
<MI 20dc0 MOVE.L (A7)+,(A6-0x4)> Δ+4 {[«2""»]|[«30»]|[«4""»]}
<POP 20dc2-20dc6 StackAdj> Δ+36 {}
<MI 20dc6 MOVEA.L (A6-0x4),A0> {}
<MI 20dc8 TST.W (A0)> {}
<MI 20dca BNE 0x20df2> {}
<POP 20dcc-20de0 Naked> Σ0 Δ-30 ↓
<Pointer.fp 0x20dcc <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x20dce 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 20dd4-20dd6 StackAdj> Δ+4 {}
<Blob 0x20dd6 [30] (A6-0x6)> Δ-30 {[«30»]}
<POP 20de0-20df2 Naked> Σ-30 Δ+30 ↓ ←0x20d60
<POP 20de0-20de2 StackAdj> Δ-4 {[-34-]}
<Lit 0x20de2> {[-30-]|[$$…]}
<Pointer.sp 0x20de2 4> Δ-4
<Const 0x20de6 0x1.2> Δ-2
<Const 0x20de8 0x1e.2> Δ-2
<Call 0x20dea 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20dec-20dee StackAdj> Δ+8
<MI 20dee MOVE.L (A7)+,(A6-0x4)> Δ+4 {[-30-]}
<POP 20df0-20df2 StackAdj> Δ+30 {}
<POP 20df2-20e12 Naked> Σ0 ↓ →0x20e2e ←0x20d6c
<POP 20df2-20df4 StackAdj> Δ-4 {[-4-]}
<MI 20df4 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']}
<Call 0x20df6 0x102f0> {[-4-]|[4, '(A6-0x4)']}
ToUpper(a : String) : String
<POP 20dfc-20dfe StackAdj> Δ+4 {[-4-]}
<MI 20dfe MOVE.L (A7),(A6-0x4)> {[-4-]}
<MI 20e00 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']}
<MI 20e02 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']|[4, '(A6+0x8)']}
<Call 0x20e06 0x10300> {[-4-]|[4, '(A6-0x4)']|[4, '(A6+0x8)']}
FSCALL_10300
<POP 20e0c-20e0e StackAdj> Δ+8 {[-4-]}
<MI 20e0e TST.L (A7)+> Δ+4 {}
<MI 20e10 BNE 0x20e2e> {}
<POP 20e12-20e2e Naked> Σ0 ↓
<POP 20e12-20e14 StackAdj> Δ-4 {[-4-]}
<MI 20e14 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']}
<POP 20e16-20e18 StackAdj> Δ-4 {[-4-]|[4, '(A6-0x4)']|[-4-]}
<MI 20e18 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']|[-4-]|[4, '(A6+0x8)']}
<Call 0x20e1c 0x102cc> {[-4-]|[4, '(A6-0x4)']|[-4-]|[4, '(A6+0x8)']}
StringDup(a : String) : String
<POP 20e22-20e24 StackAdj> Δ+4 {[-4-]|[4, '(A6-0x4)']|[-4-]}
<Call 0x20e24 0x102d0> {[-4-]|[4, '(A6-0x4)']|[-4-]}
StringCat2(a, b : String) : String
<POP 20e2a-20e2c StackAdj> Δ+8 {[-4-]}
<MI 20e2c MOVE.L (A7)+,(A6-0x4)> Δ+4 {}
<POP 20e2e-20e50 Naked> Σ0 ↓ →0x20e6a ←0x20df2
<MI 20e2e MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 20e30 CLR.B -(A7)> Δ-2 {[4, '(A6-0x4)']|[#0]}
<Const 0x20e32 0x1.2> Δ-2 {[4, '(A6-0x4)']|[#0]|[#1]}
<Const 0x20e34 0x0.4> Δ-4 {[4, '(A6-0x4)']|[#0]|[#1]|[##0]}
<Pointer.fp 0x20e38 <LVAR -0x02c @ 1(r)>> Δ-4 {[4, '(A6-0x4)']|[#0]|[#1]|[##0]|[@@-44]}
<Pointer.fp 0x20e3c <LVAR -0x02a @>> Δ-4 {[4, '(A6-0x4)']|[#0]|[#1]|[##0]|[@@-44]|[@@-42]}
<Call 0x20e40 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 20e46-20e4a StackAdj> Δ+20 {}
<MI 20e4a TST.B (A6-0x2c)> {}
<MI 20e4e BNE 0x20e6a> {}
<POP 20e50-20e6a Naked> Σ0 →0x20e7c
<MI 20e50 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x20e52 0x2.2> Δ-2 {[#0]|[#2]}
<Const 0x20e54 0x1.4> Δ-4 {[#0]|[#2]|[##1]}
<Pointer.fp 0x20e58 <LVAR -0x02c @ 1(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-44]}
<Pointer.fp 0x20e5c <LVAR -0x02a @>> Δ-4 {[#0]|[#2]|[##1]|[@@-44]|[@@-42]}
<Call 0x20e60 0x1038c> {[#0]|[#2]|[##1]|[@@-44]|[@@-42]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 20e66-20e68 StackAdj> Δ+16 {}
<MI 20e68 BRA 0x20e7c> {}
<POP 20e6a-20e7c Naked> Σ0 →0x20d5a ←0x20e2e
<Pointer.fp 0x20e6a <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x20e6c 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 20e72-20e74 StackAdj> Δ+4 {}
<MI 20e74 MOVE.B #0x01,(A6-0x25)> {}
<MI 20e78 BRA 0x20d5a> {}
<POP 20e7c-20ea8 Naked> Σ0 ↓ ←0x20e50
<MI 20e7c MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 20e7e MOVEA.L (A6+0x14),A0> {[4, '(A6-0x4)']}
<MI 20e82 PEA.L (A0+0x2)> Δ-4 {[4, '(A6-0x4)']|[4, '^(A0+0x2)']}
<Pointer.fp 0x20e86 <LVAR -0x006 @>> Δ-4 {[4, '(A6-0x4)']|[4, '^(A0+0x2)']|[@@-6]}
<Call 0x20e88 0x1058c> {[4, '(A6-0x4)']|[4, '^(A0+0x2)']|[@@-6]}
FSCALL_1058c
<POP 20e8e-20e90 StackAdj> Δ+12 {}
<Pointer.fp 0x20e90 <LVAR 0x00c @ 4(r)>> Δ-4 {[@@12]}
<Call 0x20e94 0x102bc> {[@@12]}
FreeString(VAR a : String)
<POP 20e9a-20e9c StackAdj> Δ+4 {}
<Pointer.fp 0x20e9c <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x20ea0 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 20ea6-20ea8 StackAdj> Δ+4 {}
<POP 20ea8-20eb0 Epilogue> Σ0
@ 20eb0
<LVAR 0x008 1(r)>
<LVAR -0x002 @>
<POP 20eb0-20f5c Body>
<POP 20eb0-20ec6 Prologue> Σ0 ↓
<POP 20ec6-20ed0 RegCacheLoad> Σ0 ↓
<POP 20ed0-20f54 Naked> Σ0 ↓
<Blob 0x20ed0 [14] @> Δ-14 {[«14""»]}
<Blob 0x20edc [12] @> Δ-12 {[«14""»]|[«12""»]}
<Const 0x20eec 0x23e69.4> Δ-4 {[«14""»]|[«12""»]|[##147049]}
<Const 0x20ef2 0x23ffb.4> Δ-4 {[«14""»]|[«12""»]|[##147049]|[##147451]}
<POP 20ef8-20efa StackAdj> Δ-4 {[«14""»]|[«12""»]|[##147049]|[##147451]|[-4-]}
<Lit 0x20efa 14> {[«14""»]|[«12""»]|[##147049]|[##147451]|[$$Microcode file]}
<POP 20f06-20f08 StackAdj> Δ-4 {[«14""»]|[«12""»]|[##147049]|[##147451]|[$$Microcode file]|[-4-]}
<Lit 0x20f08 11> {[«14""»]|[«12""»]|[##147049]|[##147451]|[$$Microcode file]|[$$.M200_UCODE]}
<Call 0x20f16 0x20d06> {[«14""»]|[«12""»]|[##147049]|[##147451]|[$$Microcode file]|[$$.M200_UCODE]}
<POP 20f1a-20f1b StackAdj> Δ+42 ↓ {}
<Blob 0x20f1b [30] 0x23e6b> Δ-30 {[«30»]}
<MI 20f2c CLR.B -(A7)> Δ-2 {[«30»]|[#0]}
<POP 20f2e-20f30 StackAdj> Δ-4 {[«30»]|[#0]|[-4-]}
<Lit 0x20f30> {[«30»]|[#0]|[$$…]}
<Pointer.sp 0x20f30 6> Δ-4
<Const 0x20f34 0x1.2> Δ-2
<Const 0x20f36 0x1e.2> Δ-2
<Call 0x20f3a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20f3c-20f3e StackAdj> Δ+8
<POP 20f3c-20f3e StackAdj> Δ-2 {[«30»]|[#0]|[$$…]|[-2-]}
<MI 20f3e MOVE.B (A6+0x8),(A7)> {[«30»]|[#0]|[$$…]|[-2-]}
<Const 0x20f42 0x1.2> Δ-2 {[«30»]|[#0]|[$$…]|[-2-]|[#1]}
<MI 20f44 MOVE.B (A6+0x8),-(A7)> Δ-2 {[«30»]|[#0]|[$$…]|[-2-]|[#1]|[2, '(A6+0x8)']}
<Pointer.fp 0x20f48 <LVAR -0x002 @>> Δ-4 {[«30»]|[#0]|[$$…]|[-2-]|[#1]|[2, '(A6+0x8)']|[@@-2]}
<Call 0x20f4c 0x20668> {[«30»]|[#0]|[$$…]|[-2-]|[#1]|[2, '(A6+0x8)']|[@@-2]}
<POP 20f50-20f54 StackAdj> Δ+46 {}
<POP 20f54-20f5c Epilogue> Σ0
@ 20f5c
<LVAR -0x004 1(rw)>
<POP 20f5c-210c8 Body>
<POP 20f5c-20f72 Prologue> Σ0 ↓
<POP 20f72-20f9a RegCacheLoad> Σ0 ↓
<POP 20f9a-20fac Naked> Σ0 ↓ →0x20fb0
<Call 0x20f9a 0x23592> {}
exp_LOAD_BENIGN_UWORD.TYP()
<POP 20fa0-20fa2 StackAdj> Δ-2 {[-2-]}
<Call 0x20fa2 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 20fa8 TST.B (A7)+> Δ+2 {}
<MI 20faa BEQ 0x20fb0> {}
<POP 20fac-20fb0 Naked> Σ0 →0x20fb4
<MI 20fac CLR.B (A6-0x4)> {}
<MI 20fae BRA 0x20fb4> {}
<POP 20fb0-20fb4 Naked> Σ0 ↓ ←0x20f9a
<MI 20fb0 MOVE.B #0xff,(A6-0x4)> {}
<POP 20fb4-20fc0 Naked> Σ0 ↓ →0x20fc8 ←0x20fac
<POP 20fb4-20fb6 StackAdj> Δ-2 {[-2-]}
<Const 0x20fb6 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x20fb8 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20fba-20fbc StackAdj> Δ+2 {[-2-]}
<MI 20fbc TST.B (A7)+> Δ+2 {}
<MI 20fbe BEQ 0x20fc8> {}
<POP 20fc0-20fc8 Naked> Σ0 ↓
<Const 0x20fc0 0xc.2> Δ-2 {[#12]}
<MI 20fc2 MOVE.B (A6-0x4),-(A7)> Δ-2 {[#12]|[2, '(A6-0x4)']}
<Call 0x20fc4 0x237b6> {[#12]|[2, '(A6-0x4)']}
<POP 20fc6-20fc8 StackAdj> Δ+4 {}
<POP 20fc8-20fd4 Naked> Σ0 ↓ →0x20fdc ←0x20fb4
<POP 20fc8-20fca StackAdj> Δ-2 {[-2-]}
<Const 0x20fca 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x20fcc 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20fce-20fd0 StackAdj> Δ+2 {[-2-]}
<MI 20fd0 TST.B (A7)+> Δ+2 {}
<MI 20fd2 BEQ 0x20fdc> {}
<POP 20fd4-20fdc Naked> Σ0 ↓
<Const 0x20fd4 0xd.2> Δ-2 {[#13]}
<MI 20fd6 MOVE.B (A6-0x4),-(A7)> Δ-2 {[#13]|[2, '(A6-0x4)']}
<Call 0x20fd8 0x237b6> {[#13]|[2, '(A6-0x4)']}
<POP 20fda-20fdc StackAdj> Δ+4 {}
<POP 20fdc-20fe8 Naked> Σ0 ↓ →0x20ff0 ←0x20fc8
<POP 20fdc-20fde StackAdj> Δ-2 {[-2-]}
<Const 0x20fde 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x20fe0 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20fe2-20fe4 StackAdj> Δ+2 {[-2-]}
<MI 20fe4 TST.B (A7)+> Δ+2 {}
<MI 20fe6 BEQ 0x20ff0> {}
<POP 20fe8-20ff0 Naked> Σ0 ↓
<Const 0x20fe8 0xe.2> Δ-2 {[#14]}
<MI 20fea MOVE.B (A6-0x4),-(A7)> Δ-2 {[#14]|[2, '(A6-0x4)']}
<Call 0x20fec 0x237b6> {[#14]|[2, '(A6-0x4)']}
<POP 20fee-20ff0 StackAdj> Δ+4 {}
<POP 20ff0-20ffc Naked> Σ0 ↓ →0x21004 ←0x20fdc
<POP 20ff0-20ff2 StackAdj> Δ-2 {[-2-]}
<Const 0x20ff2 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x20ff4 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 20ff6-20ff8 StackAdj> Δ+2 {[-2-]}
<MI 20ff8 TST.B (A7)+> Δ+2 {}
<MI 20ffa BEQ 0x21004> {}
<POP 20ffc-21004 Naked> Σ0 ↓
<Const 0x20ffc 0xf.2> Δ-2 {[#15]}
<MI 20ffe MOVE.B (A6-0x4),-(A7)> Δ-2 {[#15]|[2, '(A6-0x4)']}
<Call 0x21000 0x237b6> {[#15]|[2, '(A6-0x4)']}
<POP 21002-21004 StackAdj> Δ+4 {}
<POP 21004-21016 Naked> Σ0 ↓ →0x2101c ←0x20ff0
<Call 0x21004 0x23464> {}
exp_INIT_MRU.FIU()
<POP 2100a-2100c StackAdj> Δ-2 {[-2-]}
<Const 0x2100c 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x2100e 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 21010-21012 StackAdj> Δ+2 {[-2-]}
<MI 21012 TST.B (A7)+> Δ+2 {}
<MI 21014 BEQ 0x2101c> {}
<POP 21016-2101c Naked> Σ0 ↓
<Const 0x21016 0xc.2> Δ-2 {[#12]}
<Call 0x21018 0x23b70> {[#12]}
<POP 2101a-2101c StackAdj> Δ+2 {}
<POP 2101c-21028 Naked> Σ0 ↓ →0x2102e ←0x21004
<POP 2101c-2101e StackAdj> Δ-2 {[-2-]}
<Const 0x2101e 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x21020 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 21022-21024 StackAdj> Δ+2 {[-2-]}
<MI 21024 TST.B (A7)+> Δ+2 {}
<MI 21026 BEQ 0x2102e> {}
<POP 21028-2102e Naked> Σ0 ↓
<Const 0x21028 0xd.2> Δ-2 {[#13]}
<Call 0x2102a 0x23b70> {[#13]}
<POP 2102c-2102e StackAdj> Δ+2 {}
<POP 2102e-2103a Naked> Σ0 ↓ →0x21040 ←0x2101c
<POP 2102e-21030 StackAdj> Δ-2 {[-2-]}
<Const 0x21030 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x21032 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 21034-21036 StackAdj> Δ+2 {[-2-]}
<MI 21036 TST.B (A7)+> Δ+2 {}
<MI 21038 BEQ 0x21040> {}
<POP 2103a-21040 Naked> Σ0 ↓
<Const 0x2103a 0xe.2> Δ-2 {[#14]}
<Call 0x2103c 0x23b70> {[#14]}
<POP 2103e-21040 StackAdj> Δ+2 {}
<POP 21040-2104c Naked> Σ0 ↓ →0x21052 ←0x2102e
<POP 21040-21042 StackAdj> Δ-2 {[-2-]}
<Const 0x21042 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x21044 0x104c0> {[-2-]|[#15]}
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 0xf.2> Δ-2 {[#15]}
<Call 0x2104e 0x23b70> {[#15]}
<POP 21050-21052 StackAdj> Δ+2 {}
<POP 21052-21084 Naked> Σ0 ↓ →0x2108a ←0x21040
<Const 0x21052 0x145.2> Δ-2 {[#325]}
<Call 0x21054 0x23578> {[#325]}
exp_PREP_RUN.TYP(Sw_2)
<POP 2105a-2105b StackAdj> Δ+2 {}
<Const 0x2105b 0x145.2> Δ-2 {[#325]}
<Call 0x2105c 0x23630> {[#325]}
exp_PREP_RUN.VAL(Sw_2)
<POP 21062-21063 StackAdj> Δ+2 {}
<Const 0x21063 0x145.2> Δ-2 {[#325]}
<Call 0x21064 0x23c0e> {[#325]}
exp_PREP_RUN.IOC(Sw_2)
<POP 2106a-2106b StackAdj> Δ+2 {}
<Const 0x2106b 0x145.2> Δ-2 {[#325]}
<Call 0x2106c 0x234fc> {[#325]}
exp_PREP_RUN.SEQ(Sw_2)
<POP 21072-21073 StackAdj> Δ+2 {}
<Const 0x21073 0x145.2> Δ-2 {[#325]}
<Call 0x21074 0x2342e> {[#325]}
exp_PREP_RUN.FIU(Sw_2)
<Const 0x2107a 0xc.2> Δ-2 {[#325]|[#12]}
<Call 0x2107c 0x104c0> {[#325]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 2107e-21080 StackAdj> Δ+2 {[#325]}
<MI 21080 TST.B (A7)+> Δ+2 {}
<MI 21082 BEQ 0x2108a> {}
<POP 21084-2108a Naked> Σ0 ↓
<Const 0x21084 0xc.2> Δ-2 {[#12]}
<Call 0x21086 0x23ac6> {[#12]}
<POP 21088-2108a StackAdj> Δ+2 {}
<POP 2108a-21096 Naked> Σ0 ↓ →0x2109c ←0x21052
<POP 2108a-2108c StackAdj> Δ-2 {[-2-]}
<Const 0x2108c 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x2108e 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 21090-21092 StackAdj> Δ+2 {[-2-]}
<MI 21092 TST.B (A7)+> Δ+2 {}
<MI 21094 BEQ 0x2109c> {}
<POP 21096-2109c Naked> Σ0 ↓
<Const 0x21096 0xd.2> Δ-2 {[#13]}
<Call 0x21098 0x23ac6> {[#13]}
<POP 2109a-2109c StackAdj> Δ+2 {}
<POP 2109c-210a8 Naked> Σ0 ↓ →0x210ae ←0x2108a
<POP 2109c-2109e StackAdj> Δ-2 {[-2-]}
<Const 0x2109e 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x210a0 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 210a2-210a4 StackAdj> Δ+2 {[-2-]}
<MI 210a4 TST.B (A7)+> Δ+2 {}
<MI 210a6 BEQ 0x210ae> {}
<POP 210a8-210ae Naked> Σ0 ↓
<Const 0x210a8 0xe.2> Δ-2 {[#14]}
<Call 0x210aa 0x23ac6> {[#14]}
<POP 210ac-210ae StackAdj> Δ+2 {}
<POP 210ae-210ba Naked> Σ0 ↓ →0x210c0 ←0x2109c
<POP 210ae-210b0 StackAdj> Δ-2 {[-2-]}
<Const 0x210b0 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x210b2 0x104c0> {[-2-]|[#15]}
HasBoard(diproc_addr: Byte) : Byte
<POP 210b4-210b6 StackAdj> Δ+2 {[-2-]}
<MI 210b6 TST.B (A7)+> Δ+2 {}
<MI 210b8 BEQ 0x210c0> {}
<POP 210ba-210c0 Naked> Σ0 ↓
<Const 0x210ba 0xf.2> Δ-2 {[#15]}
<Call 0x210bc 0x23ac6> {[#15]}
<POP 210be-210c0 StackAdj> Δ+2 {}
<POP 210c0-210c8 Epilogue> Σ0 ←0x210ae
@ 210c8
<LVAR -0x002 @ 2(w)>
<LVAR -0x004 @>
<POP 210c8-2120c Body>
<POP 210c8-210de Prologue> Σ0 ↓
<POP 210de-210f6 RegCacheLoad> Σ0 ↓
<POP 210f6-21102 Naked> Σ0 ↓ →0x2116e
<Call 0x210f6 0x20f5c> {}
<MI 210fa TST.B 0x23e3c> {}
<MI 21100 BEQ 0x2116e> {}
<POP 21102-2112e Naked> Σ0 Δ-58 ↓ →0x2116c
<Blob 0x21102 [58] @> Δ-58 {[«58""»]}
<POP 2110e-21110 StackAdj> Δ-6 {[«58""»]|[-6-]}
<Lit 0x21110 58> {[«58""»]|[-2-]|[$$Do you want to enter the CLI prior to starting the machine]}
<POP 2111e-21120 StackAdj> Δ-2 {[«58""»]|[-2-]|[$$Do you want to enter the CLI prior to starting the machine]|[-2-]}
<MI 21120 CLR.B (A7)> {[«58""»]|[-2-]|[$$Do you want to enter the CLI prior to starting the machine]|[-2-]}
<Call 0x21122 0x103f0> {[«58""»]|[-2-]|[$$Do you want to enter the CLI prior to starting the machine]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 21128-2112a StackAdj> Δ+6 {[«58""»]|[-2-]}
<MI 2112a TST.B (A7)+> Δ+2 {[«58""»]}
<MI 2112c BEQ 0x2116c> {[«58""»]}
<POP 2112e-2116c Naked> Σ-58 ↓
<POP 2112e-21130 StackAdj> Δ-4 {[-62-]}
<POP 21130-21131 StackAdj> Δ+2 {[-60-]}
<Blob 0x21131 [2] @> Δ-2 {[-60-]|[«2""»]}
<MI 21134 MOVE.B 0x201bd,(A7+0x1)> {[-60-]|[«2""»]}
<MI 2113a MOVE.B 0x201be,(A7+0x2)> {[-60-]|[«2""»]}
<POP 21140-21142 StackAdj> Δ-4 {[-60-]|[«2""»]|[-4-]}
<Lit 0x21142> {[-60-]|[«2""»]|[$$…]}
<Pointer.sp 0x21142 4> Δ-4
<Const 0x21146 0x1.2> Δ-2
<Const 0x21148 0x3.2> Δ-2
<Call 0x2114c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21152-21154 StackAdj> Δ+8
<Const 0x21154 0x1.4> Δ-4 {[-60-]|[«2""»]|[$$…]|[##1]}
<Const 0x21158 0x1.2> Δ-2 {[-60-]|[«2""»]|[$$…]|[##1]|[#1]}
<Pointer.fp 0x2115a <LVAR -0x004 @>> Δ-4 {[-60-]|[«2""»]|[$$…]|[##1]|[#1]|[@@-4]}
<Call 0x2115e 0x103b0> {[-60-]|[«2""»]|[$$…]|[##1]|[#1]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 21164-21168 StackAdj> Δ+18 {[-58-]}
<Call 0x21168 0x20f5c> {[-58-]}
<POP 2116c-2116e Naked> Σ-58 Δ+58 ↓ ←0x21102
<POP 2116c-2116e StackAdj> Δ+58 {}
<POP 2116e-21198 Naked> Σ0 ↓ →0x2119e ←0x210f6
<Call 0x2116e 0x2347e> {}
exp_FREEZE_WORLD.FIU()
<Call 0x21174 0x2355c> {}
exp_RUN_NORMAL.TYP()
<Call 0x2117a 0x23614> {}
exp_RUN_NORMAL.VAL()
<Call 0x21180 0x234e2> {}
exp_RUN_CHECK.SEQ()
<Call 0x21186 0x23bf4> {}
exp_RUN_CHECK.IOC()
<POP 2118c-2118e StackAdj> Δ-2 {[-2-]}
<Const 0x2118e 0xc.2> Δ-2 {[-2-]|[#12]}
<Call 0x21190 0x104c0> {[-2-]|[#12]}
HasBoard(diproc_addr: Byte) : Byte
<POP 21192-21194 StackAdj> Δ+2 {[-2-]}
<MI 21194 TST.B (A7)+> Δ+2 {}
<MI 21196 BEQ 0x2119e> {}
<POP 21198-2119e Naked> Σ0 ↓
<Const 0x21198 0xc.2> Δ-2 {[#12]}
<Call 0x2119a 0x2387c> {[#12]}
<POP 2119c-2119e StackAdj> Δ+2 {}
<POP 2119e-211aa Naked> Σ0 ↓ →0x211b0 ←0x2116e
<POP 2119e-211a0 StackAdj> Δ-2 {[-2-]}
<Const 0x211a0 0xd.2> Δ-2 {[-2-]|[#13]}
<Call 0x211a2 0x104c0> {[-2-]|[#13]}
HasBoard(diproc_addr: Byte) : Byte
<POP 211a4-211a6 StackAdj> Δ+2 {[-2-]}
<MI 211a6 TST.B (A7)+> Δ+2 {}
<MI 211a8 BEQ 0x211b0> {}
<POP 211aa-211b0 Naked> Σ0 ↓
<Const 0x211aa 0xd.2> Δ-2 {[#13]}
<Call 0x211ac 0x2387c> {[#13]}
<POP 211ae-211b0 StackAdj> Δ+2 {}
<POP 211b0-211bc Naked> Σ0 ↓ →0x211c2 ←0x2119e
<POP 211b0-211b2 StackAdj> Δ-2 {[-2-]}
<Const 0x211b2 0xe.2> Δ-2 {[-2-]|[#14]}
<Call 0x211b4 0x104c0> {[-2-]|[#14]}
HasBoard(diproc_addr: Byte) : Byte
<POP 211b6-211b8 StackAdj> Δ+2 {[-2-]}
<MI 211b8 TST.B (A7)+> Δ+2 {}
<MI 211ba BEQ 0x211c2> {}
<POP 211bc-211c2 Naked> Σ0 ↓
<Const 0x211bc 0xe.2> Δ-2 {[#14]}
<Call 0x211be 0x2387c> {[#14]}
<POP 211c0-211c2 StackAdj> Δ+2 {}
<POP 211c2-211ce Naked> Σ0 ↓ →0x211d4 ←0x211b0
<POP 211c2-211c4 StackAdj> Δ-2 {[-2-]}
<Const 0x211c4 0xf.2> Δ-2 {[-2-]|[#15]}
<Call 0x211c6 0x104c0> {[-2-]|[#15]}
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 0xf.2> Δ-2 {[#15]}
<Call 0x211d0 0x2387c> {[#15]}
<POP 211d2-211d4 StackAdj> Δ+2 {}
<POP 211d4-21204 Naked> Σ0 ↓ ←0x211c2
<Call 0x211d4 0x233ea> {}
exp_RUN_NORMAL.FIU()
<MI 211da MOVE.W #0x01,(A6-0x2)> {}
<MI 211de LEA.L (A6-0x2),A0> {}
<MI 211e2 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 211e4 ADDQ.L #0x1,(A7)> {[-4-]}
<Const 0x211e6 0xfc10.4> Δ-4 {[-4-]|[##64528]}
<Const 0x211ec 0x1.2> Δ-2 {[-4-]|[##64528]|[#1]}
<Call 0x211ee 0x10238> {[-4-]|[##64528]|[#1]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 211f4-211f6 StackAdj> Δ+6 {[-4-]}
<POP 211f6-211f7 StackAdj> Δ+4 {}
<Const 0x211f7 0x9896.4> Δ-4 {[##39062]}
<Call 0x211fc 0x10224> {[##39062]}
KC12_Sleep(dur: Long)
<POP 21202-21204 StackAdj> Δ+4 {}
<POP 21204-2120c Epilogue> Σ0
@ 2120c
<LVAR 0x00c 1(w)>
<LVAR 0x008 4(r)>
<LVAR -0x00c @ 4(rw)>
<POP 2120c-212dc Body>
<POP 2120c-21222 Prologue> Σ0 ↓
<POP 21222-2122a RegCacheLoad> Σ0 ↓
<POP 2122a-2122c Naked> Σ0 ↓
<MI 2122a MOVEQ.L #0x00,D7> {}
<POP 2122c-2127e Naked> Σ0 ↓ →0x2128a ←0x2128a
<MI 2122c MOVE.L D7,D4> {}
<MI 2122e MOVEQ.L #0x0a,D3> {}
<Call 0x21230 0x1028c> {}
?muls_d3_d4
<MI 21236 LEA.L 0x2057c,A0> {}
<Blob 0x2123a [10] (A0+D4.L)> Δ-10 {[«10»]}
<POP 2124a-2124c StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x2124c> {[«10»]|[$$…]}
<Pointer.sp 0x2124c 4> Δ-4
<Const 0x21250 0x1.2> Δ-2
<Const 0x21252 0xa.2> Δ-2
<Call 0x21254 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2125a-2125c StackAdj> Δ+8
<MI 2125c MOVE.L (A7)+,(A6-0xc)> Δ+4 {[«10»]}
<POP 2125e-21260 StackAdj> Δ+4 {[-6-]}
<MI 21260 MOVE.L (A6+0x8),(A7)> {[-2-]|[4, '(A6+0x8)']}
<MI 21264 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0xc)']}
<Call 0x21266 0x102c8> {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0xc)']}
StringEqual(a, b : String) : Byte
<POP 2126c-2126e StackAdj> Δ+8 {[-2-]}
<MI 2126e MOVE.B (A7)+,D6> Δ+2 {}
<Pointer.fp 0x21270 <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x21272 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<POP 21278-2127a StackAdj> Δ+4 {}
<MI 2127a TST.B D6> {}
<MI 2127c BEQ 0x2128a> {}
<POP 2127e-2128a Naked> Σ0 →0x212d4
<MI 2127e LEA.L 0x205cc,A0> {}
<MI 21282 MOVE.B (A0+D7.L),(A6+0xc)> {}
<MI 21288 BRA 0x212d4> {}
<POP 2128a-21294 Naked> Σ0 ↓ →0x2122c ←0x2122c
<MI 2128a ADDQ.L #0x1,D7> {}
<MI 2128c CMPI.L #0x00000007,D7> {}
<MI 21292 BLE 0x2122c> {}
<POP 21294-212d4 Naked> Σ0 ↓
<Blob 0x21294 [22] @> Δ-22 {[«22""»]}
<Const 0x212a6 0xe.2> Δ-2 {[«22""»]|[#14]}
<POP 212aa-212ac StackAdj> Δ-8 {[«22""»]|[#14]|[-8-]}
<Lit 0x212ac 21> {[«22""»]|[#14]|[-4-]|[$$Unknown stack KIND :_]}
<POP 212bc-212be StackAdj> Δ-4 {[«22""»]|[#14]|[-4-]|[$$Unknown stack KIND :_]|[-4-]}
<MI 212be MOVE.L (A6+0x8),(A7)> {[«22""»]|[#14]|[-4-]|[$$Unknown stack KIND :_]|[4, '(A6+0x8)']}
<Call 0x212c2 0x102d0> {[«22""»]|[#14]|[-4-]|[$$Unknown stack KIND :_]|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 212c8-212ca StackAdj> Δ+8 {[«22""»]|[#14]|[-4-]}
<Call 0x212ca 0x103b8> {[«22""»]|[#14]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 212d0-212d4 StackAdj> Δ+28 {}
<POP 212d4-212dc Epilogue> Σ0 ←0x2127e
@ 212dc
<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 212dc-2142c Body>
<POP 212dc-212f2 Prologue> Σ0 ↓
<POP 212f2-21306 RegCacheLoad> Σ0 ↓
<POP 21306-21334 Naked> Σ0 ↓ →0x21424
<MI 21306 MOVE.L (A6+0xa),-(A7)> Δ-4 {[4, '(A6+0xa)']}
<Blob 0x2130a [4] 0x24174> Δ-4 {[4, '(A6+0xa)']|[«4»]}
<Const 0x21310 0x400.2> Δ-2 {[4, '(A6+0xa)']|[«4»]|[#1024]}
<Call 0x21314 0x10238> {[4, '(A6+0xa)']|[«4»]|[#1024]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 2131a-2131c StackAdj> Δ+10 {}
<MI 2131c MOVEA.L (A6+0xe),A0> {}
<MI 21320 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 21322 CLR.W -(A7)> Δ-2 {[4, 'A0']|[#0]}
<Call 0x21324 0x1023c> {[4, 'A0']|[#0]}
KC1e_Fifo_Tx_Response(ptr : Pointer; chan : Word)
<POP 2132a-2132c StackAdj> Δ+6 {}
<MI 2132c TST.B (A6+0x8)> {}
<MI 21330 BEQ 0x21424> {}
<POP 21334-2133a Naked> Σ0 ↓
<MI 21334 MOVE.L #0xffffb1e0,D7> {}
<POP 2133a-21350 Naked> Σ0 ↓ →0x21354 ←0x21350
<MI 2133a LEA.L (A6-0x418),A0> {}
<MI 2133e MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 21340 CLR.W -(A7)> Δ-2 {[4, 'A0']|[#0]}
<Pointer.fp 0x21342 <LVAR -0x41e @ 1(r)>> Δ-4 {[4, 'A0']|[#0]|[@@-1054]}
<Call 0x21344 0x1023e> {[4, 'A0']|[#0]|[@@-1054]}
KC1f_Fifo_Rx_Request(ptr : Pointer; chan : Word; VAR flag : Bool)
<POP 2134a-2134c StackAdj> Δ+10 {}
<MI 2134c ADDQ.L #0x1,D7> {}
<MI 2134e BEQ 0x21354> {}
<POP 21350-21354 Naked> Σ0 ↓ →0x2133a
<MI 21350 TST.B (A6-0x41e)> {}
<MI 21352 BEQ 0x2133a> {}
<POP 21354-2135a Naked> Σ0 ↓ →0x21424 ←0x2133a
<MI 21354 TST.B (A6-0x41e)> {}
<MI 21356 BNE 0x21424> {}
<POP 2135a-21424 Naked> Σ0 ↓
<MI 2135a MOVEA.L (A6+0xe),A0> {}
<MI 2135e MOVE.W (A0),(A6-0x8)> {}
<MI 21360 MOVE.W (A0+0x2),(A6-0x6)> {}
<MI 21366 MOVE.W (A0+0x4),(A6-0x4)> {}
<MI 2136a MOVE.W (A0+0x6),(A6-0x2)> {}
<Blob 0x21370 [20] @> Δ-20 {[«20""»]}
<POP 2137c-2137e StackAdj> Δ-8 {[«20""»]|[-8-]}
<Lit 0x2137e 20> {[«20""»]|[-4-]|[$$Last header sent =>_]}
<MI 2138e MOVE.L (A6-0x4),(A7)> {[«20""»]|[-4-]|[4, '(A6-0x4)']}
<POP 21388-2138e StackAdj> Δ-8 {[«20""»]|[-4-]|[4, '(A6-0x4)']|[-8-]}
<MI 21390 MOVE.L (A6-0x8),-(A7)> Δ-4 {[«20""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[4, '(A6-0x8)']}
<Const 0x21392 0x10.4> Δ-4 {[«20""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[4, '(A6-0x8)']|[##16]}
<Call 0x21396 0x1035c> {[«20""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[4, '(A6-0x8)']|[##16]}
Quad2String(a : Quad; radix : Long ) : String
<POP 2139c-2139e StackAdj> Δ+12 {[«20""»]|[-4-]|[4, '(A6-0x4)']|[-4-]}
<Call 0x2139e 0x102d0> {[«20""»]|[-4-]|[4, '(A6-0x4)']|[-4-]}
StringCat2(a, b : String) : String
<POP 213a4-213a6 StackAdj> Δ+8 {[«20""»]|[-4-]}
<Call 0x213a6 0x103d8> {[«20""»]|[-4-]}
WriteConsoleString(str : String)
<POP 213ac-213ae StackAdj> Δ+24 {}
<MI 213ae MOVE.W (A0+0x8),(A6-0x8)> {}
<MI 213b2 MOVE.W (A0+0xa),(A6-0x6)> {}
<MI 213b8 MOVE.W (A0+0xc),(A6-0x4)> {}
<MI 213bc MOVE.W (A0+0xe),(A6-0x2)> {}
<Blob 0x213c2 [2] @> Δ-2 {[«2""»]}
<POP 213c6-213c8 StackAdj> Δ-8 {[«2""»]|[-8-]}
<Lit 0x213c8 2> {[«2""»]|[-4-]|[$$_ ]}
<MI 213d8 MOVE.L (A6-0x4),(A7)> {[«2""»]|[-4-]|[4, '(A6-0x4)']}
<POP 213d2-213d8 StackAdj> Δ-8 {[«2""»]|[-4-]|[4, '(A6-0x4)']|[-8-]}
<MI 213da MOVE.L (A6-0x8),-(A7)> Δ-4 {[«2""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[4, '(A6-0x8)']}
<Const 0x213dc 0x10.4> Δ-4 {[«2""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[4, '(A6-0x8)']|[##16]}
<Call 0x213e0 0x1035c> {[«2""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[4, '(A6-0x8)']|[##16]}
Quad2String(a : Quad; radix : Long ) : String
<POP 213e6-213e8 StackAdj> Δ+12 {[«2""»]|[-4-]|[4, '(A6-0x4)']|[-4-]}
<Call 0x213e8 0x102d0> {[«2""»]|[-4-]|[4, '(A6-0x4)']|[-4-]}
StringCat2(a, b : String) : String
<POP 213ee-213f0 StackAdj> Δ+8 {[«2""»]|[-4-]}
<Call 0x213f0 0x103e0> {[«2""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 213f6-213f8 StackAdj> Δ+6 {}
<Blob 0x213f8 [24] @> Δ-24 {[«24""»]}
<Const 0x21404 0xe.2> Δ-2 {[«24""»]|[#14]}
<POP 21408-2140a StackAdj> Δ-4 {[«24""»]|[#14]|[-4-]}
<Lit 0x2140a 24> {[«24""»]|[#14]|[$$No response to page load]}
<Call 0x2141a 0x103b8> {[«24""»]|[#14]|[$$No response to page load]}
PopProgram(status : Byte; msg : String)
<POP 21420-21424 StackAdj> Δ+30 {}
<POP 21424-2142c Epilogue> Σ0 ←0x21306 ←0x21354
@ 2142c
<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 2142c-21510 Body>
<POP 2142c-21442 Prologue> Σ0 ↓
<POP 21442-21454 RegCacheLoad> Σ0 ↓
<POP 21454-214a8 Naked> Σ0 ↓
<Const 0x21454 0x4.2> Δ-2 {[#4]}
<Pointer.fp 0x21458 <LVAR -0x00b @>> Δ-4 {[#4]|[@@-11]}
<Pointer.fp 0x2145a <LVAR -0x009 @ 1(r)>> Δ-4 {[#4]|[@@-11]|[@@-9]}
<Pointer.fp 0x2145e <LVAR -0x00a @>> Δ-4 {[#4]|[@@-11]|[@@-9]|[@@-10]}
<Call 0x21460 0x10484> {[#4]|[@@-11]|[@@-9]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 21462-21464 StackAdj> Δ+12 {[#4]}
<POP 21464-21465 StackAdj> Δ+2 {}
<Const 0x21465 0x6.2> Δ-2 {[#6]}
<Pointer.fp 0x21468 <LVAR -0x00b @>> Δ-4 {[#6]|[@@-11]}
<Pointer.fp 0x2146a <LVAR -0x008 @ 1(r)>> Δ-4 {[#6]|[@@-11]|[@@-8]}
<Pointer.fp 0x2146e <LVAR -0x00a @>> Δ-4 {[#6]|[@@-11]|[@@-8]|[@@-10]}
<Call 0x21470 0x10484> {[#6]|[@@-11]|[@@-8]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 21472-21474 StackAdj> Δ+12 {[#6]}
<POP 21474-21475 StackAdj> Δ+2 {}
<Const 0x21475 0x7.2> Δ-2 {[#7]}
<Pointer.fp 0x21478 <LVAR -0x00b @>> Δ-4 {[#7]|[@@-11]}
<Pointer.fp 0x2147a <LVAR -0x007 @ 1(r)>> Δ-4 {[#7]|[@@-11]|[@@-7]}
<Pointer.fp 0x2147e <LVAR -0x00a @>> Δ-4 {[#7]|[@@-11]|[@@-7]|[@@-10]}
<Call 0x21480 0x10484> {[#7]|[@@-11]|[@@-7]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 21482-21484 StackAdj> Δ+12 {[#7]}
<POP 21484-21485 StackAdj> Δ+2 {}
<Const 0x21485 0x3.2> Δ-2 {[#3]}
<Pointer.fp 0x21488 <LVAR -0x00b @>> Δ-4 {[#3]|[@@-11]}
<Pointer.fp 0x2148a <LVAR -0x006 @ 1(r)>> Δ-4 {[#3]|[@@-11]|[@@-6]}
<Pointer.fp 0x2148e <LVAR -0x00a @>> Δ-4 {[#3]|[@@-11]|[@@-6]|[@@-10]}
<Call 0x21490 0x10484> {[#3]|[@@-11]|[@@-6]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 21492-21494 StackAdj> Δ+12 {[#3]}
<POP 21494-21495 StackAdj> Δ+2 {}
<Const 0x21495 0x2.2> Δ-2 {[#2]}
<Pointer.fp 0x21498 <LVAR -0x00b @>> Δ-4 {[#2]|[@@-11]}
<Pointer.fp 0x2149a <LVAR -0x005 @ 1(r)>> Δ-4 {[#2]|[@@-11]|[@@-5]}
<Pointer.fp 0x2149e <LVAR -0x00a @>> Δ-4 {[#2]|[@@-11]|[@@-5]|[@@-10]}
<Call 0x214a0 0x10484> {[#2]|[@@-11]|[@@-5]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 214a2-214a4 StackAdj> Δ+14 {}
<MI 214a4 MOVEQ.L #0x00,D7> {}
<MI 214a6 MOVEQ.L #0x0c,D6> {}
<POP 214a8-214b8 Naked> Σ0 ↓ →0x214d4 ←0x214d4
<POP 214a8-214aa StackAdj> Δ-2 {[-2-]}
<MI 214aa MOVE.B D6,-(A7)> Δ-2 {[-2-]|[2, 'D6']}
<Call 0x214ac 0x104c0> {[-2-]|[2, 'D6']}
HasBoard(diproc_addr: Byte) : Byte
<POP 214b2-214b4 StackAdj> Δ+2 {[-2-]}
<MI 214b4 TST.B (A7)+> Δ+2 {}
<MI 214b6 BEQ 0x214d4> {}
<POP 214b8-214d4 Naked> Σ0 ↓
<MI 214b8 MOVE.B D6,-(A7)> Δ-2 {[2, 'D6']}
<Pointer.fp 0x214ba <LVAR -0x00b @>> Δ-4 {[2, 'D6']|[@@-11]}
<Pointer.fp 0x214bc <LVAR -0x003 @ 1(r)>> Δ-4 {[2, 'D6']|[@@-11]|[@@-3]}
<Pointer.fp 0x214c0 <LVAR -0x00a @>> Δ-4 {[2, 'D6']|[@@-11]|[@@-3]|[@@-10]}
<Call 0x214c2 0x10484> {[2, 'D6']|[@@-11]|[@@-3]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 214c4-214c6 StackAdj> Δ+14 {}
<MI 214c6 MOVE.B D7,D0> {}
<MI 214c8 OR.B (A6-0x3),D0> {}
<MI 214cc EXTB.W D0> {}
<POP 0x214ce LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 214d2 MOVE.B D0,D7> {}
<POP 214d4-214dc Naked> Σ0 ↓ →0x214a8 ←0x214a8
<MI 214d4 ADDQ.B #0x1,D6> {}
<MI 214d6 CMPI.B #0x0f,D6> {}
<MI 214da BLE 0x214a8> {}
<POP 214dc-214e2 Naked> Σ0 ↓ →0x214fe
<MI 214dc TST.B (A6-0x9)> {}
<MI 214e0 BNE 0x214fe> {}
<POP 214e2-214e8 Naked> Σ0 ↓ →0x214fe
<MI 214e2 TST.B (A6-0x8)> {}
<MI 214e6 BNE 0x214fe> {}
<POP 214e8-214ee Naked> Σ0 ↓ →0x214fe
<MI 214e8 TST.B (A6-0x7)> {}
<MI 214ec BNE 0x214fe> {}
<POP 214ee-214f4 Naked> Σ0 ↓ →0x214fe
<MI 214ee TST.B (A6-0x6)> {}
<MI 214f2 BNE 0x214fe> {}
<POP 214f4-214fa Naked> Σ0 ↓ →0x214fe
<MI 214f4 TST.B (A6-0x5)> {}
<MI 214f8 BNE 0x214fe> {}
<POP 214fa-214fe Naked> Σ0 ↓ →0x21508
<MI 214fa TST.B D7> {}
<MI 214fc BEQ 0x21508> {}
<POP 214fe-21508 Naked> Σ0 ↓ ←0x214dc ←0x214e2 ←0x214e8 ←0x214ee ←0x214f4
<Const 0x214fe 0xc.2> Δ-2 {[#12]}
<Call 0x21500 0x105da> {[#12]}
Set_fc01(a : Byte)
<POP 21506-21508 StackAdj> Δ+2 {}
<POP 21508-21510 Epilogue> Σ0 ←0x214fa
@ 21510
<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 21510-217d0 Body>
<POP 21510-21526 Prologue> Σ0 ↓
<POP 21526-2153e RegCacheLoad> Σ0 ↓
<POP 2153e-215d8 Naked> Σ0 ↓ →0x215de
<Pointer.fp 0x2153e <LVAR -0x84c @ 4(r)>> Δ-4 {[@@-2124]}
<Call 0x21540 0x102b8> {[@@-2124]}
NewString(VAR a : String)
<MI 21546 MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<MI 21548 MOVE.L (A6-0x84c),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x84c)']}
<Pointer.fp 0x2154a <LVAR -0x00c @>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x84c)']|[@@-12]}
<Call 0x2154e 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x84c)']|[@@-12]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 21554-21556 StackAdj> Δ+12 {}
<Pointer.fp 0x21556 <LVAR -0x848 @ 4(r)>> Δ-4 {[@@-2120]}
<Call 0x21558 0x102b8> {[@@-2120]}
NewString(VAR a : String)
<MI 2155e MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<MI 21560 MOVE.L (A6-0x848),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x848)']}
<Pointer.fp 0x21562 <LVAR -0x00c @>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[@@-12]}
<Call 0x21566 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[@@-12]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 2156c-2156e StackAdj> Δ+6 {[4, '(A6+0x8)']|[-2-]}
<MI 2156e MOVE.L (A6-0x848),(A7)> {[-2-]|[4, '(A6-0x848)']}
<Call 0x21570 0x2120c> {[-2-]|[4, '(A6-0x848)']}
<POP 21574-21576 StackAdj> Δ+4 {[-2-]}
<MI 21576 MOVE.B (A7)+,D0> Δ+2 {}
<MI 21578 EXTB.W D0> {}
<POP 0x2157a LimitCheck 0x0 ≤ D0 ≤ 0x7> {}
<MI 2157e MOVE.B D0,D5> {}
<MI 21580 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 21582 MOVE.L (A6-0x848),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x848)']}
<Pointer.fp 0x21584 <LVAR -0x00c @>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[@@-12]}
<Call 0x21588 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[@@-12]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<MI 2158e MOVE.L (A6-0x848),(A7)> {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[4, '(A6-0x848)']}
<Const 0x21590 0x10.4> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[4, '(A6-0x848)']|[##16]}
<Call 0x21594 0x10360> {[4, '(A6+0x8)']|[4, '(A6-0x848)']|[4, '(A6-0x848)']|[##16]}
?StringToInt64()
<POP 2159a-2159c StackAdj> Δ+8 {[4, '(A6+0x8)']|[4, '(A6-0x848)']}
<MI 2159c MOVE.L (A7)+,(A6-0x844)> Δ+4 {[4, '(A6+0x8)']}
<MI 215a0 MOVE.L (A7)+,(A6-0x840)> Δ+4 {}
<MI 215a4 MOVE.W 0x24170,(A6-0x42e)> {}
<MI 215ac CLR.W (A6-0x42c)> {}
<MI 215b0 CLR.W (A6-0x42a)> {}
<MI 215b4 MOVE.W #0x100,(A6-0x428)> {}
<MI 215ba MOVE.W (A6-0x840),(A6-0x426)> {}
<MI 215c0 MOVE.W (A6-0x83e),(A6-0x424)> {}
<MI 215c6 CLR.W (A6-0x422)> {}
<MI 215ca MOVE.B D5,D0> {}
<MI 215cc EXTB.W D0> {}
<MI 215ce MOVE.W D0,(A6-0x420)> {}
<MI 215d0 TST.B 0x2415e> {}
<MI 215d6 BEQ 0x215de> {}
<POP 215d8-215de Naked> Σ0 ↓
<MI 215d8 ORI.W #0x0008,D0> {}
<MI 215dc MOVE.W D0,(A6-0x420)> {}
<POP 215de-21608 Naked> Σ0 Δ-4 ↓ ←0x2153e
<MI 215de MOVE.L (A6-0x84c),-(A7)> Δ-4 {[4, '(A6-0x84c)']}
<MI 215e0 CLR.B -(A7)> Δ-2 {[4, '(A6-0x84c)']|[#0]}
<Const 0x215e2 0x2.2> Δ-2 {[4, '(A6-0x84c)']|[#0]|[#2]}
<Const 0x215e4 0x0.4> Δ-4 {[4, '(A6-0x84c)']|[#0]|[#2]|[##0]}
<Pointer.fp 0x215e8 <LVAR -0x00d @>> Δ-4 {[4, '(A6-0x84c)']|[#0]|[#2]|[##0]|[@@-13]}
<Pointer.fp 0x215ec <LVAR -0x43a @ 4(r)>> Δ-4 {[4, '(A6-0x84c)']|[#0]|[#2]|[##0]|[@@-13]|[@@-1082]}
<Call 0x215f0 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 215f6-215f8 StackAdj> Δ+20 {}
<MI 215f8 MOVEA.L (A6-0x43a),A0> {}
<MI 215fc MOVE.W (A0+0x20),D0> {}
<MI 21600 SUBQ.W #0x1,D0> {}
<MI 21602 EXTW.L D0> {}
<MI 21604 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 21606 MOVEQ.L #0x00,D6> {[4, 'D0']}
<POP 21608-2160e Naked> Σ-4 ↓ →0x21798 ←0x21792
<MI 21608 CMP.L (A7),D6> {[-4-]}
<MI 2160a BGT 0x21798> {[-4-]}
<POP 2160e-2164e Naked> Σ-4 ↓
<MI 2160e MOVE.L (A6-0x43a),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x43a)']}
<POP 0x21612 LimitCheck 0x0 ≤ D6 ≤ 0x4000> {[-4-]|[4, '(A6-0x43a)']}
<MI 2161c MOVE.W D6,-(A7)> Δ-2 {[-4-]|[4, '(A6-0x43a)']|[2, 'D6']}
<MI 2161e CLR.W -(A7)> Δ-2 {[-4-]|[4, '(A6-0x43a)']|[2, 'D6']|[#0]}
<Const 0x21620 0x200.2> Δ-2 {[-4-]|[4, '(A6-0x43a)']|[2, 'D6']|[#0]|[#512]}
<Const 0x21624 0x2.2> Δ-2 {[-4-]|[4, '(A6-0x43a)']|[2, 'D6']|[#0]|[#512]|[#2]}
<Blob 0x21626 [4] 0x24174> Δ-4 {[-4-]|[4, '(A6-0x43a)']|[2, 'D6']|[#0]|[#512]|[#2]|[«4»]}
<Pointer.fp 0x2162c <LVAR -0x00d @>> Δ-4 {[-4-]|[4, '(A6-0x43a)']|[2, 'D6']|[#0]|[#512]|[#2]|[«4»]|[@@-13]}
<Call 0x21630 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 21636-21638 StackAdj> Δ+20 {[-4-]}
<MI 21638 LEA.L (A6-0x42e),A0> {[-4-]}
<MI 2163c MOVE.L A0,-(A7)> Δ-4 {[-4-]|[4, 'A0']}
<MI 2163e CLR.W -(A7)> Δ-2 {[-4-]|[4, 'A0']|[#0]}
<Call 0x21640 0x1023c> {[-4-]|[4, 'A0']|[#0]}
KC1e_Fifo_Tx_Response(ptr : Pointer; chan : Word)
<POP 21646-21648 StackAdj> Δ+6 {[-4-]}
<MI 21648 MOVE.L #0xffffb1e0,D7> {[-4-]}
<POP 2164e-21668 Naked> Σ-4 ↓ →0x2166e ←0x21668
<MI 2164e LEA.L (A6-0x41e),A0> {[-4-]}
<MI 21652 MOVE.L A0,-(A7)> Δ-4 {[-4-]|[4, 'A0']}
<MI 21654 CLR.W -(A7)> Δ-2 {[-4-]|[4, 'A0']|[#0]}
<Pointer.fp 0x21656 <LVAR -0x00e @ 1(r)>> Δ-4 {[-4-]|[4, 'A0']|[#0]|[@@-14]}
<Call 0x2165a 0x1023e> {[-4-]|[4, 'A0']|[#0]|[@@-14]}
KC1f_Fifo_Rx_Request(ptr : Pointer; chan : Word; VAR flag : Bool)
<POP 21660-21664 StackAdj> Δ+10 {[-4-]}
<MI 21664 ADDQ.L #0x1,D7> {[-4-]}
<MI 21666 BEQ 0x2166e> {[-4-]}
<POP 21668-2166e Naked> Σ-4 ↓ →0x2164e
<MI 21668 TST.B (A6-0xe)> {[-4-]}
<MI 2166c BEQ 0x2164e> {[-4-]}
<POP 2166e-21676 Naked> Σ-4 ↓ →0x21750 ←0x2164e
<MI 2166e TST.B (A6-0xe)> {[-4-]}
<MI 21672 BNE 0x21750> {[-4-]}
<POP 21676-21750 Naked> Σ-4 ↓
<Call 0x21676 0x2142c> {[-4-]}
<MI 2167a MOVE.W (A6-0x42e),(A6-0xa)> {[-4-]}
<MI 21680 MOVE.W (A6-0x42c),(A6-0x8)> {[-4-]}
<MI 21686 MOVE.W (A6-0x42a),(A6-0x6)> {[-4-]}
<MI 2168c MOVE.W (A6-0x428),(A6-0x4)> {[-4-]}
<Blob 0x21692 [20] @> Δ-20 {[-4-]|[«20""»]}
<POP 2169e-216a0 StackAdj> Δ-8 {[-4-]|[«20""»]|[-8-]}
<Lit 0x216a0 20> {[-4-]|[«20""»]|[-4-]|[$$Last header sent =>_]}
<MI 216ae MOVE.L (A6-0x6),(A7)> {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']}
<POP 216a8-216ae StackAdj> Δ-8 {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']|[-8-]}
<MI 216b2 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']|[-8-]|[4, '(A6-0xa)']}
<Const 0x216b6 0x10.4> Δ-4 {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']|[-8-]|[4, '(A6-0xa)']|[##16]}
<Call 0x216ba 0x1035c> {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']|[-8-]|[4, '(A6-0xa)']|[##16]}
Quad2String(a : Quad; radix : Long ) : String
<POP 216c0-216c2 StackAdj> Δ+12 {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
<Call 0x216c2 0x102d0> {[-4-]|[«20""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
StringCat2(a, b : String) : String
<POP 216c8-216ca StackAdj> Δ+8 {[-4-]|[«20""»]|[-4-]}
<Call 0x216ca 0x103d8> {[-4-]|[«20""»]|[-4-]}
WriteConsoleString(str : String)
<POP 216d0-216d4 StackAdj> Δ+24 {[-4-]}
<MI 216d4 MOVE.W (A6-0x426),(A6-0xa)> {[-4-]}
<MI 216da MOVE.W (A6-0x424),(A6-0x8)> {[-4-]}
<MI 216e0 MOVE.W (A6-0x422),(A6-0x6)> {[-4-]}
<MI 216e6 MOVE.W (A6-0x420),(A6-0x4)> {[-4-]}
<Blob 0x216ea [2] @> Δ-2 {[-4-]|[«2""»]}
<POP 216ee-216f0 StackAdj> Δ-8 {[-4-]|[«2""»]|[-8-]}
<Lit 0x216f0 2> {[-4-]|[«2""»]|[-4-]|[$$_ ]}
<MI 216fe MOVE.L (A6-0x6),(A7)> {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']}
<POP 216f8-216fe StackAdj> Δ-8 {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-8-]}
<MI 21702 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-8-]|[4, '(A6-0xa)']}
<Const 0x21706 0x10.4> Δ-4 {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-8-]|[4, '(A6-0xa)']|[##16]}
<Call 0x2170a 0x1035c> {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-8-]|[4, '(A6-0xa)']|[##16]}
Quad2String(a : Quad; radix : Long ) : String
<POP 21710-21712 StackAdj> Δ+12 {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
<Call 0x21712 0x102d0> {[-4-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
StringCat2(a, b : String) : String
<POP 21718-2171a StackAdj> Δ+8 {[-4-]|[«2""»]|[-4-]}
<Call 0x2171a 0x103e0> {[-4-]|[«2""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21720-21722 StackAdj> Δ+6 {[-4-]}
<Blob 0x21722 [24] @> Δ-24 {[-4-]|[«24""»]}
<Const 0x2172e 0xe.2> Δ-2 {[-4-]|[«24""»]|[#14]}
<POP 21732-21734 StackAdj> Δ-4 {[-4-]|[«24""»]|[#14]|[-4-]}
<Lit 0x21734 24> {[-4-]|[«24""»]|[#14]|[$$No response to page load]}
<Call 0x21746 0x103b8> {[-4-]|[«24""»]|[#14]|[$$No response to page load]}
PopProgram(status : Byte; msg : String)
<POP 2174c-21750 StackAdj> Δ+30 {[-4-]}
<POP 21750-21768 Naked> Σ-4 ↓ →0x2177e ←0x2166e
<MI 21750 CLR.L D0> {[-4-]}
<MI 21752 MOVE.W (A6-0x420),D0> {[-4-]}
<MI 21754 ADDI.L #0x00002000,D0> {[-4-]}
<MI 2175a ANDI.L #0x0000ffff,D0> {[-4-]}
<MI 21760 MOVE.W D0,(A6-0x420)> {[-4-]}
<MI 21762 ANDI.W #0xfff0,D0> {[-4-]}
<MI 21766 BNE 0x2177e> {[-4-]}
<POP 21768-2177e Naked> Σ-4 ↓
<MI 21768 CLR.L D0> {[-4-]}
<MI 2176a MOVE.W (A6-0x422),D0> {[-4-]}
<MI 2176e ADDQ.L #0x1,D0> {[-4-]}
<POP 0x21770 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-4-]}
<MI 2177a MOVE.W D0,(A6-0x422)> {[-4-]}
<POP 2177e-2178c Naked> Σ-4 ↓ →0x21792 ←0x21750
<MI 2177e ADDQ.L #0x1,0x24164> {[-4-]}
<MI 21784 TST.B 0x2415e> {[-4-]}
<MI 2178a BEQ 0x21792> {[-4-]}
<POP 2178c-21792 Naked> Σ-4 ↓
<MI 2178c ADDQ.L #0x1,0x24160> {[-4-]}
<POP 21792-21798 Naked> Σ-4 ↓ →0x21608 ←0x2177e
<MI 21792 ADDQ.L #0x1,D6> {[-4-]}
<MI 21794 BVC 0x21608> {[-4-]}
<POP 21798-217c8 Naked> Σ-4 Δ+4 ↓ ←0x21608
<POP 21798-2179a StackAdj> Δ+2 {[-2-]}
<MI 2179a CLR.B (A7)> {[-2-]}
<Const 0x2179c 0x2.2> Δ-2 {[-2-]|[#2]}
<Const 0x2179e 0x1.4> Δ-4 {[-2-]|[#2]|[##1]}
<Pointer.fp 0x217a2 <LVAR -0x00d @>> Δ-4 {[-2-]|[#2]|[##1]|[@@-13]}
<Pointer.fp 0x217a6 <LVAR -0x43a @ 4(r)>> Δ-4 {[-2-]|[#2]|[##1]|[@@-13]|[@@-1082]}
<Call 0x217aa 0x1038c> {[-2-]|[#2]|[##1]|[@@-13]|[@@-1082]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 217b0-217b4 StackAdj> Δ+16 {}
<Pointer.fp 0x217b4 <LVAR -0x84c @ 4(r)>> Δ-4 {[@@-2124]}
<Call 0x217b6 0x102bc> {[@@-2124]}
FreeString(VAR a : String)
<POP 217bc-217be StackAdj> Δ+4 {}
<Pointer.fp 0x217be <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x217c0 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 217c6-217c8 StackAdj> Δ+4 {}
<POP 217c8-217d0 Epilogue> Σ0
@ 217d0
<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 217d0-21ecc Body>
<POP 217d0-217e6 Prologue> Σ0 ↓
<POP 217e6-217f2 RegCacheLoad> Σ0 ↓
<POP 217f2-21802 Naked> Σ0 ↓
<MI 217f2 CLR.L D0> {}
<MI 217f4 MOVE.W (A6+0x8),D0> {}
<MI 217f6 ADDQ.L #0x3,D0> {}
<MI 217f8 ANDI.L #0x0000fffc,D0> {}
<MI 217fe MOVE.W D0,(A6+0x8)> {}
<MI 21800 MOVEQ.L #0x00,D7> {}
<POP 21802-21844 Naked> Σ0 ↓ →0x21802 ←0x21802
<MI 21802 MOVEA.L (A6+0xa),A0> {}
<MI 21804 MOVE.W (A6+0x8),D0> {}
<POP 0x21806 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 2180a CLR.L D1> {}
<MI 2180c MOVE.W D0,D1> {}
<MI 2180e ASL.L #0x1,D1> {}
<POP 0x21810 LimitCheck 0x0 ≤ D7 ≤ 0x3> {}
<MI 2181a MOVE.L D7,D0> {}
<MI 2181c ASL.L #0x1,D0> {}
<MI 2181e LEA.L 0x205d4,A1> {}
<MI 21822 MOVE.W (A1+D0.L),(A0+D1.L)> {}
<MI 21828 CLR.L D0> {}
<MI 2182a MOVE.W (A6+0x8),D0> {}
<MI 2182c ADDQ.L #0x1,D0> {}
<POP 0x2182e LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21838 MOVE.W D0,(A6+0x8)> {}
<MI 2183a ADDQ.L #0x1,D7> {}
<MI 2183c CMPI.L #0x00000003,D7> {}
<MI 21842 BLE 0x21802> {}
<POP 21844-21878 Naked> Σ0 ↓ →0x2187a
<Pointer.fp 0x21844 <LVAR -0x016 @ 2(r)>> Δ-4 {[@@-22]}
<Call 0x21848 0x10304> {[@@-22]}
GetRtc() : TimeStamp
<POP 2184e-21850 StackAdj> Δ+4 {}
<MI 21850 CLR.W (A6-0x26)> {}
<MI 21854 CLR.W (A6-0x24)> {}
<MI 21858 CLR.W (A6-0x22)> {}
<MI 2185c MOVE.W (A6-0x16),(A6-0x20)> {}
<MI 21862 CLR.B (A6-0x10)> {}
<MI 21864 CLR.L D0> {}
<MI 21866 MOVE.B (A6-0x14),D0> {}
<MI 2186a LSR.B #0x1,D0> {}
<MI 2186c MOVE.W D0,D1> {}
<MI 2186e ANDI.W #0x0003,D1> {}
<MI 21872 CMPI.W #0x0003,D1> {}
<MI 21876 BNE 0x2187a> {}
<POP 21878-2187a Naked> Σ0 ↓
<MI 21878 ADDQ.B #0x1,(A6-0x10)> {}
<POP 2187a-2194e Naked> Σ0 ↓ ←0x21844
<MI 2187a MOVE.W D0,D1> {}
<MI 2187c ASR.W #0x2,D1> {}
<MI 2187e MOVE.B (A6-0x10),D2> {}
<MI 21880 EXTB.W D2> {}
<MI 21882 MULS.W #0x18,D2> {}
<MI 21886 LEA.L 0x205e4,A0> {}
<MI 2188a MOVE.W (A6-0x14),D3> {}
<MI 2188e LSL.W #0x7,D3> {}
<MI 21890 LSR.W #0x8,D3> {}
<MI 21892 LSR.W #0x4,D3> {}
<MI 21894 SUBQ.W #0x1,D3> {}
<POP 0x21896 LimitCheck 0x0 ≤ D3 ≤ 0xb> {}
<MI 2189a ASL.W #0x1,D3> {}
<MI 2189c LEA.L (A0+D2.W),A0> {}
<MI 218a0 EXTW.L D1> {}
<MI 218a2 CLR.L D2> {}
<MI 218a4 MOVE.W (A0+D3.W),D2> {}
<MI 218a8 ADD.L D1,D2> {}
<MI 218aa CLR.L D1> {}
<MI 218ac MOVE.B (A6-0x13),D1> {}
<MI 218b0 LSL.B #0x3,D1> {}
<MI 218b2 LSR.B #0x3,D1> {}
<MI 218b4 ADD.L D2,D1> {}
<MI 218b6 SUBQ.L #0x1,D1> {}
<POP 0x218b8 LimitCheck 0x0 ≤ D1 ≤ 0xffff> {}
<MI 218c2 MOVE.W D1,(A6-0x12)> {}
<POP 218c6-218ca StackAdj> Δ-24 {[-24-]}
<Const 0x218ca 0x16d.4> Δ-4 {[-24-]|[##365]}
<Call 0x218ce 0x10354> {[-24-]|[##365]}
Long2Quad(a : Long) : Quad
<POP 218d4-218d6 StackAdj> Δ-4 {[-24-]|[##365]|[-4-]}
<MI 218d6 EXTW.L D0> {[-24-]|[##365]|[-4-]}
<MI 218d8 MOVE.L D0,-(A7)> Δ-4 {[-24-]|[##365]|[-4-]|[4, 'D0']}
<Call 0x218da 0x10354> {[-24-]|[##365]|[-4-]|[4, 'D0']}
Long2Quad(a : Long) : Quad
<POP 218e0-218e2 StackAdj> Δ+4 {[-24-]|[##365]|[-4-]}
<Call 0x218e2 0x1031c> {[-24-]|[##365]|[-4-]}
Multiply(a, b : Quad) : Quad
<POP 218e8-218ea StackAdj> Δ+8 {[-24-]}
<MI 218ea CLR.L D0> {[-24-]}
<MI 218ec MOVE.W D1,D0> {[-24-]}
<MI 218ee MOVE.L D0,-(A7)> Δ-4 {[-24-]|[4, 'D0']}
<Call 0x218f0 0x10354> {[-24-]|[4, 'D0']}
Long2Quad(a : Long) : Quad
<POP 218f6-218f8 StackAdj> Δ+4 {[-24-]}
<Call 0x218f8 0x10314> {[-24-]}
Add(a, b : Quad) : Quad
<POP 218fe-21902 StackAdj> Δ+16 {[-8-]}
<MI 21902 MOVE.L (A7)+,(A6-0x1e)> Δ+4 {[-4-]}
<MI 21906 MOVE.L (A7),(A6-0x1a)> {[-4-]}
<POP 2190a-2190e StackAdj> Δ-12 {[-16-]}
<MI 2190e MOVE.L (A6-0x22),-(A7)> Δ-4 {[-16-]|[4, '(A6-0x22)']}
<MI 21912 MOVE.L (A6-0x26),-(A7)> Δ-4 {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']}
<Const 0x21916 0x1.4> Δ-4 {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[##1]}
<Call 0x2191a 0x10344> {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[##1]}
BitShift(a : Quad ; howmuch : integer) : Quad
<MI 21920 MOVE.L (A6-0x1a),(A7)> {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[4, '(A6-0x1a)']}
<MI 21924 MOVE.L (A6-0x1e),-(A7)> Δ-4 {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']}
<Blob 0x21928 [4] @> Δ-4 {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']|[«4""»]}
<Blob 0x2192c [4] @> Δ-4 {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']|[«4""»]|[«4""»]}
<Call 0x21930 0x1031c> {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']|[4, '(A6-0x1a)']|[4, '(A6-0x1e)']|[«4""»]|[«4""»]}
Multiply(a, b : Quad) : Quad
<POP 21936-2193a StackAdj> Δ+16 {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']}
<Call 0x2193a 0x10314> {[-16-]|[4, '(A6-0x22)']|[4, '(A6-0x26)']}
Add(a, b : Quad) : Quad
<POP 21940-21944 StackAdj> Δ+16 {[-8-]}
<MI 21944 MOVE.L (A7)+,(A6-0x1e)> Δ+4 {[-4-]}
<MI 21948 MOVE.L (A7)+,(A6-0x1a)> Δ+4 {}
<MI 2194c MOVEQ.L #0x00,D7> {}
<POP 2194e-2198c Naked> Σ0 ↓ →0x2194e ←0x2194e
<MI 2194e MOVEA.L (A6+0xa),A0> {}
<MI 21950 MOVE.W (A6+0x8),D0> {}
<POP 0x21952 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21956 CLR.L D1> {}
<MI 21958 MOVE.W D0,D1> {}
<MI 2195a ASL.L #0x1,D1> {}
<POP 0x2195c LimitCheck 0x0 ≤ D7 ≤ 0x3> {}
<MI 21966 MOVE.L D7,D0> {}
<MI 21968 ASL.L #0x1,D0> {}
<MI 2196a MOVE.W (A6+D0.L-#0x1e),(A0+D1.L)> {}
<MI 21970 CLR.L D0> {}
<MI 21972 MOVE.W (A6+0x8),D0> {}
<MI 21974 ADDQ.L #0x1,D0> {}
<POP 0x21976 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21980 MOVE.W D0,(A6+0x8)> {}
<MI 21982 ADDQ.L #0x1,D7> {}
<MI 21984 CMPI.L #0x00000003,D7> {}
<MI 2198a BLE 0x2194e> {}
<POP 2198c-2198e Naked> Σ0 ↓
<MI 2198c MOVEQ.L #0x00,D7> {}
<POP 2198e-21990 Naked> Σ0 ↓ ←0x219f2
<MI 2198e MOVEQ.L #0x00,D6> {}
<POP 21990-219f2 Naked> Σ0 ↓ →0x21990 ←0x21990
<MI 21990 MOVEA.L (A6+0xa),A0> {}
<MI 21992 MOVE.W (A6+0x8),D0> {}
<POP 0x21994 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21998 CLR.L D1> {}
<MI 2199a MOVE.W D0,D1> {}
<MI 2199c ASL.L #0x1,D1> {}
<POP 0x2199e LimitCheck 0x0 ≤ D7 ≤ 0x9> {}
<MI 219a8 LEA.L 0x20614,A1> {}
<MI 219ac MOVE.B (A1+D7.L),D0> {}
<MI 219b0 EXTB.W D0> {}
<MI 219b2 ASL.W #0x3,D0> {}
<MI 219b4 LEA.L 0x23e2e,A1> {}
<POP 0x219ba LimitCheck 0x0 ≤ D6 ≤ 0x3> {}
<MI 219c4 MOVE.L D6,D2> {}
<MI 219c6 ASL.L #0x1,D2> {}
<MI 219c8 LEA.L (A1+D0.W),A1> {}
<MI 219cc LEA.L (A1+D2.L),A1> {}
<MI 219d0 MOVE.W (A1+0x34a),(A0+D1.L)> {}
<MI 219d6 CLR.L D0> {}
<MI 219d8 MOVE.W (A6+0x8),D0> {}
<MI 219da ADDQ.L #0x1,D0> {}
<POP 0x219dc LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 219e6 MOVE.W D0,(A6+0x8)> {}
<MI 219e8 ADDQ.L #0x1,D6> {}
<MI 219ea CMPI.L #0x00000003,D6> {}
<MI 219f0 BLE 0x21990> {}
<POP 219f2-219fc Naked> Σ0 ↓ →0x2198e
<MI 219f2 ADDQ.L #0x1,D7> {}
<MI 219f4 CMPI.L #0x00000009,D7> {}
<MI 219fa BLE 0x2198e> {}
<POP 219fc-219fe Naked> Σ0 ↓
<MI 219fc MOVEQ.L #0x00,D7> {}
<POP 219fe-21a00 Naked> Σ0 ↓ ←0x21a2e
<MI 219fe MOVEQ.L #0x00,D6> {}
<POP 21a00-21a2e Naked> Σ0 ↓ →0x21a00 ←0x21a00
<MI 21a00 MOVEA.L (A6+0xa),A0> {}
<MI 21a02 MOVE.W (A6+0x8),D0> {}
<POP 0x21a04 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21a08 CLR.L D1> {}
<MI 21a0a MOVE.W D0,D1> {}
<MI 21a0c ASL.L #0x1,D1> {}
<MI 21a0e CLR.W (A0+D1.L)> {}
<MI 21a12 CLR.L D0> {}
<MI 21a14 MOVE.W (A6+0x8),D0> {}
<MI 21a16 ADDQ.L #0x1,D0> {}
<POP 0x21a18 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21a22 MOVE.W D0,(A6+0x8)> {}
<MI 21a24 ADDQ.L #0x1,D6> {}
<MI 21a26 CMPI.L #0x00000003,D6> {}
<MI 21a2c BLE 0x21a00> {}
<POP 21a2e-21a38 Naked> Σ0 ↓ →0x219fe
<MI 21a2e ADDQ.L #0x1,D7> {}
<MI 21a30 CMPI.L #0x00000006,D7> {}
<MI 21a36 BLE 0x219fe> {}
<POP 21a38-21a3a Naked> Σ0 ↓
<MI 21a38 MOVEQ.L #0x00,D7> {}
<POP 21a3a-21a5c Naked> Σ0 ↓ →0x21a3a ←0x21a3a
<MI 21a3a MOVEA.L (A6+0xa),A0> {}
<MI 21a3c CLR.L D0> {}
<MI 21a3e MOVE.W (A6+0x8),D0> {}
<MI 21a40 ADD.L D7,D0> {}
<POP 0x21a42 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21a4c ASL.L #0x1,D0> {}
<MI 21a4e CLR.W (A0+D0.L)> {}
<MI 21a52 ADDQ.L #0x1,D7> {}
<MI 21a54 CMPI.L #0x00000007,D7> {}
<MI 21a5a BLE 0x21a3a> {}
<POP 21a5c-21a68 Naked> Σ0 ↓ →0x21a74
<POP 21a5c-21a5e StackAdj> Δ-2 {[-2-]}
<Call 0x21a5e 0x1060a> {[-2-]}
Is_fc07_four() : Bool
<MI 21a64 TST.B (A7)+> Δ+2 {}
<MI 21a66 BNE 0x21a74> {}
<POP 21a68-21a74 Naked> Σ0 ↓ →0x21ada
<POP 21a68-21a6a StackAdj> Δ-2 {[-2-]}
<Call 0x21a6a 0x10604> {[-2-]}
Is_fc07_three() : Bool
<MI 21a70 TST.B (A7)+> Δ+2 {}
<MI 21a72 BEQ 0x21ada> {}
<POP 21a74-21a80 Naked> Σ0 ↓ →0x21aa4 ←0x21a5c
<POP 21a74-21a76 StackAdj> Δ-4 {[-4-]}
<Call 0x21a76 0x232e0> {[-4-]}
<MI 21a7c MOVE.L (A7)+,D5> Δ+4 {}
<MI 21a7e BEQ 0x21aa4> {}
<POP 21a80-21aa4 Naked> Σ0 ↓
<MI 21a80 MOVE.L D5,-(A7)> Δ-4 {[4, 'D5']}
<MI 21a82 MOVEA.L (A6+0xa),A0> {[4, 'D5']}
<MI 21a84 MOVE.W (A6+0x8),D0> {[4, 'D5']}
<POP 0x21a86 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {[4, 'D5']}
<MI 21a8a CLR.L D1> {[4, 'D5']}
<MI 21a8c MOVE.W D0,D1> {[4, 'D5']}
<MI 21a8e ASL.L #0x1,D1> {[4, 'D5']}
<MI 21a90 LEA.L (A0+D1.L),A0> {[4, 'D5']}
<MI 21a94 MOVE.L A0,-(A7)> Δ-4 {[4, 'D5']|[4, 'A0']}
<Const 0x21a96 0x8.2> Δ-2 {[4, 'D5']|[4, 'A0']|[#8]}
<Call 0x21a9a 0x10238> {[4, 'D5']|[4, 'A0']|[#8]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 21aa0-21aa4 StackAdj> Δ+10 {}
<POP 21aa4-21ab0 Naked> Σ0 ↓ →0x21ada ←0x21a74
<POP 21aa4-21aa6 StackAdj> Δ-4 {[-4-]}
<Call 0x21aa6 0x2330a> {[-4-]}
<MI 21aac MOVE.L (A7)+,D5> Δ+4 {}
<MI 21aae BEQ 0x21ada> {}
<POP 21ab0-21ada Naked> Σ0 ↓
<MI 21ab0 MOVE.L D5,-(A7)> Δ-4 {[4, 'D5']}
<MI 21ab2 MOVEA.L (A6+0xa),A0> {[4, 'D5']}
<MI 21ab4 CLR.L D0> {[4, 'D5']}
<MI 21ab6 MOVE.W (A6+0x8),D0> {[4, 'D5']}
<MI 21ab8 ADDQ.L #0x4,D0> {[4, 'D5']}
<POP 0x21aba LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {[4, 'D5']}
<MI 21ac4 ASL.L #0x1,D0> {[4, 'D5']}
<MI 21ac6 LEA.L (A0+D0.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-21af8 Naked> Σ0 ↓ →0x21b04 ←0x21a68 ←0x21aa4
<MI 21ada CLR.L D0> {}
<MI 21adc MOVE.W (A6+0x8),D0> {}
<MI 21ade ADDQ.L #0x8,D0> {}
<POP 0x21ae0 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21aea MOVE.W D0,(A6+0x8)> {}
<POP 21aec-21aee StackAdj> Δ-2 {[-2-]}
<Call 0x21aee 0x105f8> {[-2-]}
Is_fc07_one() : Bool
<MI 21af4 TST.B (A7)+> Δ+2 {}
<MI 21af6 BNE 0x21b04> {}
<POP 21af8-21b04 Naked> Σ0 ↓ →0x21b18
<POP 21af8-21afa StackAdj> Δ-2 {[-2-]}
<Call 0x21afa 0x105fe> {[-2-]}
Is_fc07_two() : Bool
<MI 21b00 TST.B (A7)+> Δ+2 {}
<MI 21b02 BEQ 0x21b18> {}
<POP 21b04-21b18 Naked> Σ0 →0x21b56 ←0x21ada
<MI 21b04 MOVEA.L (A6+0xa),A0> {}
<POP 0x21b06 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21b0a CLR.L D1> {}
<MI 21b0c MOVE.W D0,D1> {}
<MI 21b0e ASL.L #0x1,D1> {}
<MI 21b10 MOVE.W #0x3,(A0+D1.L)> {}
<MI 21b16 BRA 0x21b56> {}
<POP 21b18-21b24 Naked> Σ0 ↓ →0x21b30 ←0x21af8
<POP 21b18-21b1a StackAdj> Δ-2 {[-2-]}
<Call 0x21b1a 0x10604> {[-2-]}
Is_fc07_three() : Bool
<MI 21b20 TST.B (A7)+> Δ+2 {}
<MI 21b22 BNE 0x21b30> {}
<POP 21b24-21b30 Naked> Σ0 ↓ →0x21b44
<POP 21b24-21b26 StackAdj> Δ-2 {[-2-]}
<Call 0x21b26 0x1060a> {[-2-]}
Is_fc07_four() : Bool
<MI 21b2c TST.B (A7)+> Δ+2 {}
<MI 21b2e BEQ 0x21b44> {}
<POP 21b30-21b44 Naked> Σ0 →0x21b56 ←0x21b18
<MI 21b30 MOVEA.L (A6+0xa),A0> {}
<POP 0x21b32 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21b36 CLR.L D1> {}
<MI 21b38 MOVE.W D0,D1> {}
<MI 21b3a ASL.L #0x1,D1> {}
<MI 21b3c MOVE.W #0x4,(A0+D1.L)> {}
<MI 21b42 BRA 0x21b56> {}
<POP 21b44-21b56 Naked> Σ0 ↓ ←0x21b24
<MI 21b44 MOVEA.L (A6+0xa),A0> {}
<POP 0x21b46 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21b4a CLR.L D1> {}
<MI 21b4c MOVE.W D0,D1> {}
<MI 21b4e ASL.L #0x1,D1> {}
<MI 21b50 MOVE.W #0x2,(A0+D1.L)> {}
<POP 21b56-21b62 Naked> Σ0 ↓ →0x21b7e ←0x21b04 ←0x21b30
<POP 21b56-21b58 StackAdj> Δ-2 {[-2-]}
<Call 0x21b58 0x10610> {[-2-]}
Is_fc07_one_or_three() : Bool
<MI 21b5e TST.B (A7)+> Δ+2 {}
<MI 21b60 BEQ 0x21b7e> {}
<POP 21b62-21b7e Naked> Σ0 →0x21b96
<MI 21b62 MOVEA.L (A6+0xa),A0> {}
<MI 21b64 CLR.L D1> {}
<MI 21b66 MOVE.W D0,D1> {}
<MI 21b68 ADDQ.L #0x1,D1> {}
<POP 0x21b6a LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {}
<MI 21b74 ASL.L #0x1,D1> {}
<MI 21b76 MOVE.W #0x1,(A0+D1.L)> {}
<MI 21b7c BRA 0x21b96> {}
<POP 21b7e-21b96 Naked> Σ0 ↓ ←0x21b56
<MI 21b7e MOVEA.L (A6+0xa),A0> {}
<MI 21b80 CLR.L D1> {}
<MI 21b82 MOVE.W D0,D1> {}
<MI 21b84 ADDQ.L #0x1,D1> {}
<POP 0x21b86 LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {}
<MI 21b90 ASL.L #0x1,D1> {}
<MI 21b92 CLR.W (A0+D1.L)> {}
<POP 21b96-21c5e Naked> Σ0 ↓ ←0x21b62
<MI 21b96 MOVEA.L (A6+0xa),A0> {}
<MI 21b98 CLR.L D1> {}
<MI 21b9a MOVE.W D0,D1> {}
<MI 21b9c MOVE.L D1,D0> {}
<MI 21b9e ADDQ.L #0x2,D0> {}
<POP 0x21ba0 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21baa ASL.L #0x1,D0> {}
<MI 21bac CLR.W (A0+D0.L)> {}
<MI 21bb0 MOVE.L D1,D0> {}
<MI 21bb2 ADDQ.L #0x3,D0> {}
<POP 0x21bb4 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21bbe ASL.L #0x1,D0> {}
<MI 21bc0 CLR.W (A0+D0.L)> {}
<MI 21bc4 ADDQ.L #0x4,D1> {}
<POP 0x21bc6 LimitCheck 0x0 ≤ D1 ≤ 0xffff> {}
<MI 21bd0 MOVE.W D1,(A6+0x8)> {}
<POP 0x21bd2 LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {}
<MI 21bd6 CLR.L D0> {}
<MI 21bd8 MOVE.W D1,D0> {}
<MI 21bda ASL.L #0x1,D0> {}
<MI 21bdc MOVE.W #0x2,(A0+D0.L)> {}
<MI 21be2 CLR.L D0> {}
<MI 21be4 MOVE.W D1,D0> {}
<MI 21be6 MOVE.L D0,D1> {}
<MI 21be8 ADDQ.L #0x1,D1> {}
<POP 0x21bea LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {}
<MI 21bf4 ASL.L #0x1,D1> {}
<MI 21bf6 CLR.W (A0+D1.L)> {}
<Const 0x21bfa 0x410.4> Δ-4 {[##1040]}
<MI 21bfe MOVE.L D0,D1> {[##1040]}
<MI 21c00 ADDQ.L #0x2,D1> {[##1040]}
<POP 0x21c02 LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {[##1040]}
<MI 21c0c ASL.L #0x1,D1> {[##1040]}
<MI 21c0e LEA.L (A0+D1.L),A1> {[##1040]}
<MI 21c12 MOVE.L A1,-(A7)> Δ-4 {[##1040]|[4, 'A1']}
<Const 0x21c14 0x6.2> Δ-2 {[##1040]|[4, 'A1']|[#6]}
<Call 0x21c18 0x10238> {[##1040]|[4, 'A1']|[#6]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 21c1e-21c22 StackAdj> Δ+10 {}
<MI 21c22 ADDQ.L #0x5,D0> {}
<POP 0x21c24 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21c2e MOVE.W D0,(A6+0x8)> {}
<POP 0x21c30 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21c34 CLR.L D1> {}
<MI 21c36 MOVE.W D0,D1> {}
<MI 21c38 ASL.L #0x1,D1> {}
<MI 21c3a MOVE.W 0x241f8,(A0+D1.L)> {}
<MI 21c42 CLR.L D1> {}
<MI 21c44 MOVE.W D0,D1> {}
<MI 21c46 ADDQ.L #0x1,D1> {}
<POP 0x21c48 LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {}
<MI 21c52 ASL.L #0x1,D1> {}
<MI 21c54 MOVE.W 0x241fa,(A0+D1.L)> {}
<MI 21c5c MOVEQ.L #0x00,D7> {}
<POP 21c5e-21c98 Naked> Σ0 ↓ →0x21c5e ←0x21c5e
<MI 21c5e MOVEA.L (A6+0xa),A0> {}
<MI 21c60 CLR.L D0> {}
<MI 21c62 MOVE.W (A6+0x8),D0> {}
<MI 21c64 ADDQ.L #0x2,D0> {}
<MI 21c66 ADD.L D7,D0> {}
<POP 0x21c68 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21c72 ASL.L #0x1,D0> {}
<POP 0x21c74 LimitCheck 0x0 ≤ D7 ≤ 0x3> {}
<MI 21c7e MOVE.L D7,D1> {}
<MI 21c80 ASL.L #0x1,D1> {}
<MI 21c82 LEA.L 0x241f8,A1> {}
<MI 21c88 MOVE.W (A1+D1.L+#0x4),(A0+D0.L)> {}
<MI 21c8e ADDQ.L #0x1,D7> {}
<MI 21c90 CMPI.L #0x00000003,D7> {}
<MI 21c96 BLE 0x21c5e> {}
<POP 21c98-21cd4 Naked> Σ0 ↓
<MI 21c98 CLR.L D0> {}
<MI 21c9a MOVE.W (A6+0x8),D0> {}
<MI 21c9c ADDQ.L #0x6,D0> {}
<MI 21c9e ADDQ.L #0x8,D0> {}
<POP 0x21ca0 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21caa MOVE.W D0,(A6+0x8)> {}
<MI 21cac MOVEA.L (A6+0xa),A0> {}
<POP 0x21cae LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21cb2 CLR.L D1> {}
<MI 21cb4 MOVE.W D0,D1> {}
<MI 21cb6 ASL.L #0x1,D1> {}
<MI 21cb8 ANDI.W #0x00ff,(A0+D1.L)> {}
<MI 21cbe CLR.L D1> {}
<MI 21cc0 MOVE.W D0,D1> {}
<MI 21cc2 ADDQ.L #0x4,D1> {}
<MI 21cc4 ADDQ.L #0x4,D1> {}
<POP 0x21cc6 LimitCheck 0x0 ≤ D1 ≤ 0xffff> {}
<MI 21cd0 MOVE.W D1,(A6+0x8)> {}
<MI 21cd2 MOVEQ.L #0x00,D7> {}
<POP 21cd4-21cf0 Naked> Σ0 ↓ →0x21d30 ←0x21d58
<POP 21cd4-21cd6 StackAdj> Δ-2 {[-2-]}
<Const 0x21cd6 0xb.4> Δ-4 {[-2-]|[##11]}
<MI 21cda ADD.L D7,(A7)> {[-6-]}
<Call 0x21cdc 0x10592> {[-6-]}
ReadConfig(where : Long) : Word
<POP 21ce2-21ce4 StackAdj> Δ+4 {[-2-]}
<MI 21ce4 MOVE.W (A7)+,D0> Δ+2 {}
<MI 21ce6 EXTW.L D0> {}
<MI 21ce8 MOVE.L D0,D6> {}
<MI 21cea BTST.L #0x0,D7> {}
<MI 21cee BEQ 0x21d30> {}
<POP 21cf0-21d30 Naked> Σ0 →0x21d58
<MI 21cf0 MOVEA.L (A6+0xa),A0> {}
<MI 21cf2 MOVE.W (A6+0x8),D0> {}
<POP 0x21cf4 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21cf8 CLR.L D1> {}
<MI 21cfa MOVE.W D0,D1> {}
<MI 21cfc ASL.L #0x1,D1> {}
<MI 21cfe MOVE.L D6,D0> {}
<MI 21d00 ANDI.L #0x000000ff,D0> {}
<MI 21d06 CLR.L D2> {}
<MI 21d08 MOVE.W (A0+D1.L),D2> {}
<MI 21d0c ADD.L D2,D0> {}
<POP 0x21d0e LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21d18 MOVE.W D0,(A0+D1.L)> {}
<MI 21d1c CLR.L D0> {}
<MI 21d1e MOVE.W (A6+0x8),D0> {}
<MI 21d20 ADDQ.L #0x1,D0> {}
<POP 0x21d22 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21d2c MOVE.W D0,(A6+0x8)> {}
<MI 21d2e BRA 0x21d58> {}
<POP 21d30-21d58 Naked> Σ0 ↓ ←0x21cd4
<MI 21d30 MOVEA.L (A6+0xa),A0> {}
<MI 21d32 MOVE.W (A6+0x8),D0> {}
<POP 0x21d34 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21d38 CLR.L D1> {}
<MI 21d3a MOVE.W D0,D1> {}
<MI 21d3c ASL.L #0x1,D1> {}
<MI 21d3e MOVE.L #0x100,D4> {}
<MI 21d44 MOVE.L D6,D3> {}
<Call 0x21d46 0x1028c> {}
?muls_d3_d4
<MI 21d4c MOVE.L D4,D0> {}
<MI 21d4e ANDI.L #0x0000ff00,D0> {}
<MI 21d54 MOVE.W D0,(A0+D1.L)> {}
<POP 21d58-21d64 Naked> Σ0 ↓ →0x21cd4 ←0x21cf0
<MI 21d58 ADDQ.L #0x1,D7> {}
<MI 21d5a CMPI.L #0x0000001f,D7> {}
<MI 21d60 BLE 0x21cd4> {}
<POP 21d64-21d66 Naked> Σ0 ↓
<MI 21d64 MOVEQ.L #0x00,D7> {}
<POP 21d66-21d82 Naked> Σ0 ↓ →0x21dc2 ←0x21dea
<POP 21d66-21d68 StackAdj> Δ-2 {[-2-]}
<Const 0x21d68 0x181.4> Δ-4 {[-2-]|[##385]}
<MI 21d6c ADD.L D7,(A7)> {[-6-]}
<Call 0x21d6e 0x10592> {[-6-]}
ReadConfig(where : Long) : Word
<POP 21d74-21d76 StackAdj> Δ+4 {[-2-]}
<MI 21d76 MOVE.W (A7)+,D0> Δ+2 {}
<MI 21d78 EXTW.L D0> {}
<MI 21d7a MOVE.L D0,D6> {}
<MI 21d7c BTST.L #0x0,D7> {}
<MI 21d80 BEQ 0x21dc2> {}
<POP 21d82-21dc2 Naked> Σ0 →0x21dea
<MI 21d82 MOVEA.L (A6+0xa),A0> {}
<MI 21d84 MOVE.W (A6+0x8),D0> {}
<POP 0x21d86 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21d8a CLR.L D1> {}
<MI 21d8c MOVE.W D0,D1> {}
<MI 21d8e ASL.L #0x1,D1> {}
<MI 21d90 MOVE.L D6,D0> {}
<MI 21d92 ANDI.L #0x000000ff,D0> {}
<MI 21d98 CLR.L D2> {}
<MI 21d9a MOVE.W (A0+D1.L),D2> {}
<MI 21d9e ADD.L D2,D0> {}
<POP 0x21da0 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21daa MOVE.W D0,(A0+D1.L)> {}
<MI 21dae CLR.L D0> {}
<MI 21db0 MOVE.W (A6+0x8),D0> {}
<MI 21db2 ADDQ.L #0x1,D0> {}
<POP 0x21db4 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21dbe MOVE.W D0,(A6+0x8)> {}
<MI 21dc0 BRA 0x21dea> {}
<POP 21dc2-21dea Naked> Σ0 ↓ ←0x21d66
<MI 21dc2 MOVEA.L (A6+0xa),A0> {}
<MI 21dc4 MOVE.W (A6+0x8),D0> {}
<POP 0x21dc6 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21dca CLR.L D1> {}
<MI 21dcc MOVE.W D0,D1> {}
<MI 21dce ASL.L #0x1,D1> {}
<MI 21dd0 MOVE.L #0x100,D4> {}
<MI 21dd6 MOVE.L D6,D3> {}
<Call 0x21dd8 0x1028c> {}
?muls_d3_d4
<MI 21dde MOVE.L D4,D0> {}
<MI 21de0 ANDI.L #0x0000ff00,D0> {}
<MI 21de6 MOVE.W D0,(A0+D1.L)> {}
<POP 21dea-21df6 Naked> Σ0 ↓ →0x21d66 ←0x21d82
<MI 21dea ADDQ.L #0x1,D7> {}
<MI 21dec CMPI.L #0x0000004f,D7> {}
<MI 21df2 BLE 0x21d66> {}
<POP 21df6-21df8 Naked> Σ0 ↓
<MI 21df6 MOVEQ.L #0x00,D7> {}
<POP 21df8-21e14 Naked> Σ0 ↓ →0x21e54 ←0x21e7c
<POP 21df8-21dfa StackAdj> Δ-2 {[-2-]}
<Const 0x21dfa 0x1d0.4> Δ-4 {[-2-]|[##464]}
<MI 21dfe ADD.L D7,(A7)> {[-6-]}
<Call 0x21e00 0x10592> {[-6-]}
ReadConfig(where : Long) : Word
<POP 21e06-21e08 StackAdj> Δ+4 {[-2-]}
<MI 21e08 MOVE.W (A7)+,D0> Δ+2 {}
<MI 21e0a EXTW.L D0> {}
<MI 21e0c MOVE.L D0,D6> {}
<MI 21e0e BTST.L #0x0,D7> {}
<MI 21e12 BEQ 0x21e54> {}
<POP 21e14-21e54 Naked> Σ0 →0x21e7c
<MI 21e14 MOVEA.L (A6+0xa),A0> {}
<MI 21e16 MOVE.W (A6+0x8),D0> {}
<POP 0x21e18 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21e1c CLR.L D1> {}
<MI 21e1e MOVE.W D0,D1> {}
<MI 21e20 ASL.L #0x1,D1> {}
<MI 21e22 MOVE.L D6,D0> {}
<MI 21e24 ANDI.L #0x000000ff,D0> {}
<MI 21e2a CLR.L D2> {}
<MI 21e2c MOVE.W (A0+D1.L),D2> {}
<MI 21e30 ADD.L D2,D0> {}
<POP 0x21e32 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21e3c MOVE.W D0,(A0+D1.L)> {}
<MI 21e40 CLR.L D0> {}
<MI 21e42 MOVE.W (A6+0x8),D0> {}
<MI 21e44 ADDQ.L #0x1,D0> {}
<POP 0x21e46 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21e50 MOVE.W D0,(A6+0x8)> {}
<MI 21e52 BRA 0x21e7c> {}
<POP 21e54-21e7c Naked> Σ0 ↓ ←0x21df8
<MI 21e54 MOVEA.L (A6+0xa),A0> {}
<MI 21e56 MOVE.W (A6+0x8),D0> {}
<POP 0x21e58 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21e5c CLR.L D1> {}
<MI 21e5e MOVE.W D0,D1> {}
<MI 21e60 ASL.L #0x1,D1> {}
<MI 21e62 MOVE.L #0x100,D4> {}
<MI 21e68 MOVE.L D6,D3> {}
<Call 0x21e6a 0x1028c> {}
?muls_d3_d4
<MI 21e70 MOVE.L D4,D0> {}
<MI 21e72 ANDI.L #0x0000ff00,D0> {}
<MI 21e78 MOVE.W D0,(A0+D1.L)> {}
<POP 21e7c-21e88 Naked> Σ0 ↓ →0x21df8 ←0x21e14
<MI 21e7c ADDQ.L #0x1,D7> {}
<MI 21e7e CMPI.L #0x0000001d,D7> {}
<MI 21e84 BLE 0x21df8> {}
<POP 21e88-21ec4 Naked> Σ0 ↓
<POP 21e88-21e8a StackAdj> Δ-2 {[-2-]}
<Const 0x21e8a 0x180.4> Δ-4 {[-2-]|[##384]}
<Call 0x21e8e 0x10592> {[-2-]|[##384]}
ReadConfig(where : Long) : Word
<POP 21e94-21e96 StackAdj> Δ+4 {[-2-]}
<MI 21e96 MOVE.W (A7)+,D0> Δ+2 {}
<MI 21e98 EXTW.L D0> {}
<MI 21e9a MOVE.L D0,D6> {}
<MI 21e9c MOVEA.L (A6+0xa),A0> {}
<MI 21e9e MOVE.W (A6+0x8),D0> {}
<POP 0x21ea0 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {}
<MI 21ea4 CLR.L D1> {}
<MI 21ea6 MOVE.W D0,D1> {}
<MI 21ea8 ASL.L #0x1,D1> {}
<MI 21eaa MOVE.L #0x100,D4> {}
<MI 21eb0 MOVE.L D6,D3> {}
<Call 0x21eb2 0x1028c> {}
?muls_d3_d4
<MI 21eb8 MOVE.L D4,D0> {}
<MI 21eba ANDI.L #0x0000ff00,D0> {}
<MI 21ec0 MOVE.W D0,(A0+D1.L)> {}
<POP 21ec4-21ecc Epilogue> Σ0
@ 21ecc
<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 21ecc-220d8 Body> Δ-8
<POP 21ecc-21ee2 Prologue> Σ0 ↓
<POP 21ee2-21ef0 RegCacheLoad> Σ0 ↓
<POP 21ef0-21ef2 Naked> Σ0 ↓
<MI 21ef0 MOVEQ.L #0x00,D6> {}
<POP 21ef2-21f08 Naked> Σ0 ↓ →0x21ef2 ←0x21ef2
<POP 0x21ef2 LimitCheck 0x0 ≤ D6 ≤ 0x1ff> {}
<MI 21ef4 CLR.L D0> {}
<MI 21ef6 MOVE.W D6,D0> {}
<MI 21ef8 ASL.L #0x1,D0> {}
<MI 21efa LEA.L (A6-0x42a),A0> {}
<MI 21efe CLR.W (A0+D0.L+#0x16)> {}
<MI 21f02 ADDQ.W #0x1,D6> {}
<MI 21f04 CMP.W #0x1ff,D6> {}
<MI 21f06 BLS 0x21ef2> {}
<POP 21f08-21f0e Naked> Σ0 ↓
<MI 21f08 MOVEA.L (A6+0xa),A0> {}
<MI 21f0c MOVE.L (A0),(A6-0x426)> {}
<POP 21f0e-21f16 Naked> Σ0 Δ-4 ↓ →0x21f40 ←0x21f36
<MI 21f0e MOVEA.L (A6-0x426),A0> {}
<MI 21f10 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 21f12 CMPA.W #0x01,A0> {[4, 'A0']}
<MI 21f14 BEQ 0x21f40> {[4, 'A0']}
<POP 21f16-21f20 Naked> Σ-4 ↓
<MI 21f16 CLR.L (A0+0x26)> {[-4-]}
<MI 21f1a MOVE.L (A0+0x2a),(A6-0x41e)> {[-4-]}
<POP 21f20-21f28 Naked> Σ-4 ↓ →0x21f36 ←0x21f28
<MI 21f20 MOVEA.L (A6-0x41e),A0> {[-4-]}
<MI 21f24 CMPA.W #0x01,A0> {[-4-]}
<MI 21f26 BEQ 0x21f36> {[-4-]}
<POP 21f28-21f36 Naked> Σ-4 →0x21f20
<MI 21f28 MOVEA.L (A7),A1> {[-4-]}
<MI 21f2a ADDQ.L #0x1,(A1+0x26)> {[-4-]}
<MI 21f2e MOVE.L (A0+0x4),(A6-0x41e)> {[-4-]}
<MI 21f34 BRA 0x21f20> {[-4-]}
<POP 21f36-21f40 Naked> Σ-4 Δ+4 →0x21f0e ←0x21f20
<MI 21f36 MOVEA.L (A7),A0> {[-4-]}
<MI 21f38 MOVE.L (A0+0x2e),(A6-0x426)> {[-4-]}
<POP 21f3c-21f3e StackAdj> Δ+4 {}
<MI 21f3e BRA 0x21f0e> {}
<POP 21f40-21f44 Naked> Σ-4 Δ+4 ↓ ←0x21f0e
<POP 21f40-21f42 StackAdj> Δ+4 {}
<MI 21f42 MOVEQ.L #0x00,D6> {}
<POP 21f44-21f50 Naked> Σ0 ↓ →0x2207e ←0x2206c
<MI 21f44 MOVEA.L (A6+0xa),A0> {}
<MI 21f48 MOVEA.L (A0),A1> {}
<MI 21f4a CMPA.W #0x01,A1> {}
<MI 21f4c BEQ 0x2207e> {}
<POP 21f50-21f56 Naked> Σ0 ↓
<MI 21f50 MOVE.L A1,(A6-0x426)> {}
<MI 21f52 MOVEA.W #0x01,A3> {}
<MI 21f54 MOVEQ.L #0x00,D7> {}
<POP 21f56-21f5c Naked> Σ0 ↓ →0x21f72 ←0x21f70
<MI 21f56 MOVEA.L (A6-0x426),A0> {}
<MI 21f58 CMPA.W #0x01,A0> {}
<MI 21f5a BEQ 0x21f72> {}
<POP 21f5c-21f60 Naked> Σ0 ↓ →0x21f72
<MI 21f5c TST.B D7> {}
<MI 21f5e BNE 0x21f72> {}
<POP 21f60-21f66 Naked> Σ0 ↓ →0x21f6a
<MI 21f60 TST.L (A0+0x26)> {}
<MI 21f64 BNE 0x21f6a> {}
<POP 21f66-21f6a Naked> Σ0 →0x21f70
<MI 21f66 MOVEQ.L #0x01,D7> {}
<MI 21f68 BRA 0x21f70> {}
<POP 21f6a-21f70 Naked> Σ0 ↓ ←0x21f60
<MI 21f6a MOVEA.L A0,A3> {}
<MI 21f6c MOVE.L (A0+0x2e),(A6-0x426)> {}
<POP 21f70-21f72 Naked> Σ0 →0x21f56 ←0x21f66
<MI 21f70 BRA 0x21f56> {}
<POP 21f72-21f76 Naked> Σ0 ↓ →0x21fa2 ←0x21f56 ←0x21f5c
<MI 21f72 TST.B D7> {}
<MI 21f74 BNE 0x21fa2> {}
<POP 21f76-21fa2 Naked> Σ0 ↓
<Blob 0x21f76 [30] @> Δ-30 {[«30""»]}
<Const 0x21f82 0xe.2> Δ-2 {[«30""»]|[#14]}
<POP 21f84-21f86 StackAdj> Δ-4 {[«30""»]|[#14]|[-4-]}
<Lit 0x21f86 30> {[«30""»]|[#14]|[$$No possible elaboration order!]}
<Call 0x21f98 0x103b8> {[«30""»]|[#14]|[$$No possible elaboration order!]}
PopProgram(status : Byte; msg : String)
<POP 21f9e-21fa2 StackAdj> Δ+36 {}
<POP 21fa2-21fe6 Naked> Σ0 ↓ ←0x21f72
<POP 0x21fa2 LimitCheck 0x0 ≤ D6 ≤ 0x1ff> {}
<MI 21fa4 CLR.L D0> {}
<MI 21fa6 MOVE.W D6,D0> {}
<MI 21fa8 ASL.L #0x1,D0> {}
<MI 21faa LEA.L (A6-0x42a),A0> {}
<MI 21fae MOVEA.L (A6-0x426),A1> {}
<MI 21fb0 MOVE.W (A1+0x22),(A0+D0.L+#0x16)> {}
<MI 21fb6 CLR.L D0> {}
<MI 21fb8 MOVE.W D6,D0> {}
<MI 21fba MOVE.L D0,D1> {}
<MI 21fbc ADDQ.L #0x1,D1> {}
<POP 0x21fbe LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {}
<MI 21fc4 ASL.L #0x1,D1> {}
<MI 21fc6 LEA.L (A6-0x42a),A0> {}
<MI 21fca MOVE.W (A1+0x24),(A0+D1.L+#0x16)> {}
<MI 21fd0 ADDQ.L #0x2,D0> {}
<POP 0x21fd2 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21fdc MOVE.W D0,D6> {}
<MI 21fde MOVEA.L (A6+0xa),A0> {}
<MI 21fe2 MOVE.L (A0),(A6-0x42a)> {}
<POP 21fe6-21ff0 Naked> Σ0 Δ-4 ↓ →0x22052 ←0x22046
<MI 21fe6 MOVEA.L (A6-0x42a),A0> {}
<MI 21fea MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 21fec CMPA.W #0x01,A0> {[4, 'A0']}
<MI 21fee BEQ 0x22052> {[4, 'A0']}
<POP 21ff0-21ffa Naked> Σ-4 ↓
<MI 21ff0 MOVE.L (A0+0x2a),(A6-0x41e)> {[-4-]}
<MI 21ff6 MOVEA.W #0x01,A4> {[-4-]}
<MI 21ff8 MOVEQ.L #0x00,D7> {[-4-]}
<POP 21ffa-22002 Naked> Σ-4 ↓ →0x2201a ←0x22018
<MI 21ffa MOVEA.L (A6-0x41e),A0> {[-4-]}
<MI 21ffe CMPA.W #0x01,A0> {[-4-]}
<MI 22000 BEQ 0x2201a> {[-4-]}
<POP 22002-22006 Naked> Σ-4 ↓ →0x2201a
<MI 22002 TST.B D7> {[-4-]}
<MI 22004 BNE 0x2201a> {[-4-]}
<POP 22006-2200c Naked> Σ-4 ↓ →0x22010
<MI 22006 MOVEA.L (A0),A1> {[-4-]}
<MI 22008 CMPA.L (A6-0x426),A1> {[-4-]}
<MI 2200a BNE 0x22010> {[-4-]}
<POP 2200c-22010 Naked> Σ-4 →0x22018
<MI 2200c MOVEQ.L #0x01,D7> {[-4-]}
<MI 2200e BRA 0x22018> {[-4-]}
<POP 22010-22018 Naked> Σ-4 ↓ ←0x22006
<MI 22010 MOVEA.L A0,A4> {[-4-]}
<MI 22012 MOVE.L (A0+0x4),(A6-0x41e)> {[-4-]}
<POP 22018-2201a Naked> Σ-4 →0x21ffa ←0x2200c
<MI 22018 BRA 0x21ffa> {[-4-]}
<POP 2201a-2201e Naked> Σ-4 ↓ →0x22046 ←0x21ffa ←0x22002
<MI 2201a TST.B D7> {[-4-]}
<MI 2201c BEQ 0x22046> {[-4-]}
<POP 2201e-22028 Naked> Σ-4 ↓ →0x22030
<MI 2201e MOVEA.L (A7),A1> {[-4-]}
<MI 22020 SUBQ.L #0x1,(A1+0x26)> {[-4-]}
<MI 22024 CMPA.W #0x01,A4> {[-4-]}
<MI 22026 BNE 0x22030> {[-4-]}
<POP 22028-22030 Naked> Σ-4 →0x22036
<MI 22028 MOVE.L (A0+0x4),(A1+0x2a)> {[-4-]}
<MI 2202e BRA 0x22036> {[-4-]}
<POP 22030-22036 Naked> Σ-4 ↓ ←0x2201e
<MI 22030 MOVE.L (A0+0x4),(A4+0x4)> {[-4-]}
<POP 22036-22046 Naked> Σ-4 ↓ ←0x22028
<Pointer.fp 0x22036 <LVAR -0x41e @ 4(rw)>> Δ-4 {[-4-]|[@@-1054]}
<Const 0x2203a 0x8.4> Δ-4 {[-4-]|[@@-1054]|[##8]}
<Call 0x2203e 0x102a8> {[-4-]|[@@-1054]|[##8]}
Free2(a : Pointer; b : Long)
<POP 22044-22046 StackAdj> Δ+8 {[-4-]}
<POP 22046-22052 Naked> Σ-4 Δ+4 →0x21fe6 ←0x2201a
<MI 22046 MOVEA.L (A7),A0> {[-4-]}
<MI 22048 MOVE.L (A0+0x2e),(A6-0x42a)> {[-4-]}
<POP 2204e-22050 StackAdj> Δ+4 {}
<MI 22050 BRA 0x21fe6> {}
<POP 22052-22058 Naked> Σ-4 Δ+4 ↓ →0x22064 ←0x21fe6
<POP 22052-22054 StackAdj> Δ+4 {}
<MI 22054 CMPA.W #0x01,A3> {}
<MI 22056 BNE 0x22064> {}
<POP 22058-22064 Naked> Σ0 →0x2206c
<MI 22058 MOVEA.L (A6+0xa),A0> {}
<MI 2205c MOVEA.L (A6-0x426),A1> {}
<MI 2205e MOVE.L (A1+0x2e),(A0)> {}
<MI 22062 BRA 0x2206c> {}
<POP 22064-2206c Naked> Σ0 ↓ ←0x22052
<MI 22064 MOVEA.L (A6-0x426),A0> {}
<MI 22066 MOVE.L (A0+0x2e),(A3+0x2e)> {}
<POP 2206c-2207e Naked> Σ0 →0x21f44 ←0x22058
<Pointer.fp 0x2206c <LVAR -0x426 @ 4(rw)>> Δ-4 {[@@-1062]}
<Const 0x2206e 0x32.4> Δ-4 {[@@-1062]|[##50]}
<Call 0x22072 0x102a8> {[@@-1062]|[##50]}
Free2(a : Pointer; b : Long)
<POP 22078-2207a StackAdj> Δ+8 {}
<MI 2207a BRA 0x21f44> {}
<POP 2207e-22088 Naked> Σ0 ↓ →0x22094 ←0x21f44
<MI 2207e MOVE.W (A6+0x8),D0> {}
<MI 22082 CMPI.W #0x0004,D0> {}
<MI 22086 BNE 0x22094> {}
<POP 22088-22094 Naked> Σ0 ↓
<Pointer.fp 0x22088 <LVAR -0x414 @>> Δ-4 {[@@-1044]}
<MI 2208c MOVE.W D6,-(A7)> Δ-2 {[@@-1044]|[2, 'D6']}
<Call 0x2208e 0x217d0> {[@@-1044]|[2, 'D6']}
<POP 22092-22094 StackAdj> Δ+6 {}
<POP 22094-220d0 Naked> Σ0 ↓ ←0x2207e
<MI 22094 MOVE.W 0x24170,(A6-0x12)> {}
<MI 2209c CLR.W (A6-0x10)> {}
<MI 220a0 CLR.W (A6-0xe)> {}
<MI 220a4 MOVE.W #0x100,(A6-0xc)> {}
<MI 220aa CLR.W (A6-0xa)> {}
<MI 220ae MOVE.W (A6+0x8),(A6-0x8)> {}
<MI 220b4 CLR.W (A6-0x6)> {}
<MI 220b8 MOVE.W #0x0e,(A6-0x4)> {}
<Pointer.fp 0x220bc <LVAR -0x012 @ 2(w)>> Δ-4 {[@@-18]}
<MI 220c0 LEA.L (A6-0x414),A0> {[@@-18]}
<MI 220c4 MOVE.L A0,-(A7)> Δ-4 {[@@-18]|[4, 'A0']}
<Const 0x220c6 0x1.2> Δ-2 {[@@-18]|[4, 'A0']|[#1]}
<Call 0x220c8 0x212dc> {[@@-18]|[4, 'A0']|[#1]}
<POP 220cc-220d0 StackAdj> Δ+10 {}
<POP 220d0-220d8 Epilogue> Σ0
@ 220d8
<LVAR 0x00c 4(w)>
<LVAR 0x008 @ 4(r)>
<LVAR -0x003 @ 1(rw)>
<LVAR -0x008 @ 4(rw)>
<POP 220d8-2221c Body>
<POP 220d8-220ee Prologue> Σ0 ↓
<POP 220ee-22102 RegCacheLoad> Σ0 ↓
<POP 22102-22124 Naked> Σ0 ↓ →0x22154
<POP 22102-22104 StackAdj> Δ-4 {[-4-]}
<MI 22104 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x22106 0x102cc> {[-4-]|[4, '(A6+0x8)']}
StringDup(a : String) : String
<POP 2210c-2210e StackAdj> Δ+4 {[-4-]}
<MI 2210e MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 22110 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 22112 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6+0x8)']}
<Pointer.fp 0x22114 <LVAR -0x003 @ 1(rw)>> Δ-4 {[4, '(A6-0x8)']|[4, '(A6+0x8)']|[@@-3]}
<Call 0x22116 0x102fc> {[4, '(A6-0x8)']|[4, '(A6+0x8)']|[@@-3]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 2211c-22120 StackAdj> Δ+12 {}
<MI 22120 TST.B (A6-0x3)> {}
<MI 22122 BNE 0x22154> {}
<POP 22124-22154 Naked> Σ0 ↓
<Blob 0x22124 [32] @> Δ-32 {[«32""»]}
<Const 0x22134 0xe.2> Δ-2 {[«32""»]|[#14]}
<POP 22136-22138 StackAdj> Δ-4 {[«32""»]|[#14]|[-4-]}
<Lit 0x22138 31> {[«32""»]|[#14]|[$$No subsystem in WITH directive.]}
<Call 0x2214a 0x103b8> {[«32""»]|[#14]|[$$No subsystem in WITH directive.]}
PopProgram(status : Byte; msg : String)
<POP 22150-22154 StackAdj> Δ+38 {}
<POP 22154-22160 Naked> Σ0 ↓ ←0x22102
<Pointer.fp 0x22154 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x22156 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 2215c-2215e StackAdj> Δ+4 {}
<MI 2215e MOVEQ.L #0x00,D7> {}
<POP 22160-22192 Naked> Σ0 ↓ →0x221c8 ←0x221c8
<POP 22160-22162 StackAdj> Δ-4 {[-4-]}
<MI 22162 MOVE.B D7,-(A7)> Δ-2 {[-4-]|[2, 'D7']}
<Call 0x22164 0x10586> {[-4-]|[2, 'D7']}
Config_Entry_Name(a : Byte) : String
<POP 2216a-2216c StackAdj> Δ+2 {[-4-]}
<MI 2216c MOVE.L (A7),(A6-0x8)> {[-4-]}
<POP 2216e-22170 StackAdj> Δ+2 {[-2-]}
<MI 22170 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']}
<MI 22172 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x8)']}
<Call 0x22174 0x102c8> {[-2-]|[4, '(A6+0x8)']|[4, '(A6-0x8)']}
StringEqual(a, b : String) : Byte
<POP 2217a-2217c StackAdj> Δ+8 {[-2-]}
<MI 2217c MOVE.B (A7)+,D0> Δ+2 {}
<MI 2217e EXTB.W D0> {}
<POP 0x22180 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 22182 MOVE.B D0,(A6-0x3)> {}
<Pointer.fp 0x22184 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x22186 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 2218c-2218e StackAdj> Δ+4 {}
<MI 2218e TST.B D0> {}
<MI 22190 BEQ 0x221c8> {}
<POP 22192-221c8 Naked> Σ0 →0x2220a
<MI 22192 MOVE.B D7,D0> {}
<MI 22194 EXTB.W D0> {}
<MI 22196 ASL.W #0x5,D0> {}
<MI 22198 LEA.L 0x23e2e,A0> {}
<Blob 0x2219e [30] (A0+D0.W+#0x5d)> Δ-30 {[«30»]}
<POP 221ae-221b0 StackAdj> Δ-4 {[«30»]|[-4-]}
<Lit 0x221b0> {[«30»]|[$$…]}
<Pointer.sp 0x221b0 4> Δ-4
<Const 0x221b4 0x1.2> Δ-2
<Const 0x221b6 0x1e.2> Δ-2
<Call 0x221b8 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 221be-221c0 StackAdj> Δ+8
<MI 221c0 MOVE.L (A7)+,(A6+0xc)> Δ+4 {[«30»]}
<POP 221c4-221c6 StackAdj> Δ+30 {}
<MI 221c6 BRA 0x2220a> {}
<POP 221c8-221d0 Naked> Σ0 ↓ →0x22160 ←0x22160
<MI 221c8 ADDQ.B #0x1,D7> {}
<MI 221ca CMPI.B #0x09,D7> {}
<MI 221ce BLE 0x22160> {}
<POP 221d0-2220a Naked> Σ0 ↓
<Blob 0x221d0 [26] @> Δ-26 {[«26""»]}
<Const 0x221e2 0xe.2> Δ-2 {[«26""»]|[#14]}
<POP 221e4-221e6 StackAdj> Δ-8 {[«26""»]|[#14]|[-8-]}
<Lit 0x221e6 25> {[«26""»]|[#14]|[-4-]|[$$Unknown subsystem name :_]}
<POP 221f6-221f8 StackAdj> Δ-4 {[«26""»]|[#14]|[-4-]|[$$Unknown subsystem name :_]|[-4-]}
<MI 221f8 MOVE.L (A6+0x8),(A7)> {[«26""»]|[#14]|[-4-]|[$$Unknown subsystem name :_]|[4, '(A6+0x8)']}
<Call 0x221fa 0x102d0> {[«26""»]|[#14]|[-4-]|[$$Unknown subsystem name :_]|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 22200-22202 StackAdj> Δ+8 {[«26""»]|[#14]|[-4-]}
<Call 0x22202 0x103b8> {[«26""»]|[#14]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 22208-2220a StackAdj> Δ+32 {}
<POP 2220a-22214 Naked> Σ0 ↓ ←0x22192
<Pointer.fp 0x2220a <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x2220c 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 22212-22214 StackAdj> Δ+4 {}
<POP 22214-2221c Epilogue> Σ0
@ 2221c
<LVAR -0x010 @ 4(rw)>
<LVAR -0x018 4(rw)>
<LVAR -0x01c 4(rw)>
<LVAR -0x03a @>
<LVAR -0x03e @ 4(rw)>
<POP 2221c-2242a Body> Δ-4
<POP 2221c-22232 Prologue> Σ0 ↓
<POP 22232-22238 RegCacheLoad> Σ0 ↓
<POP 22238-22246 Naked> Σ0 ↓
<Pointer.fp 0x22238 <LVAR -0x03e @ 4(rw)>> Δ-4 {[@@-62]}
<Call 0x2223c 0x102b8> {[@@-62]}
NewString(VAR a : String)
<POP 22242-22244 StackAdj> Δ+4 {}
<MI 22244 MOVEQ.L #0x00,D5> {}
<POP 22246-2227c Naked> Σ0 ↓ ←0x22364
<MI 22246 MOVE.B D5,D0> {}
<MI 22248 EXTB.W D0> {}
<MI 2224a ASL.W #0x5,D0> {}
<MI 2224c LEA.L 0x23e2e,A0> {}
<Blob 0x22252 [30] (A0+D0.W+#0x5d)> Δ-30 {[«30»]}
<POP 22262-22264 StackAdj> Δ-4 {[«30»]|[-4-]}
<Lit 0x22264> {[«30»]|[$$…]}
<Pointer.sp 0x22264 4> Δ-4
<Const 0x22268 0x1.2> Δ-2
<Const 0x2226a 0x1e.2> Δ-2
<Call 0x2226c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22272-22274 StackAdj> Δ+8
<MI 22274 MOVE.L (A7)+,(A6-0x3e)> Δ+4 {[«30»]}
<POP 22278-2227a StackAdj> Δ+30 {}
<MI 2227a MOVEQ.L #0x01,D6> {}
<POP 2227c-22288 Naked> Σ0 ↓ →0x22298 ←0x222b6
<MI 2227c MOVEA.L (A6-0x3e),A0> {}
<MI 22280 MOVE.W (A0),D0> {}
<MI 22282 EXTW.L D0> {}
<MI 22284 CMP.L D0,D6> {}
<MI 22286 BLE 0x22298> {}
<POP 22288-22298 Naked> Σ0 →0x222b6
<MI 22288 MOVE.L D6,D0> {}
<MI 2228a SUBQ.L #0x1,D0> {}
<POP 0x2228c LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 22292 CLR.B (A6+D0.L-#0x3a)> {}
<MI 22296 BRA 0x222b6> {}
<POP 22298-222b6 Naked> Σ0 ↓ ←0x2227c
<MI 22298 MOVE.L D6,D0> {}
<MI 2229a SUBQ.L #0x1,D0> {}
<POP 0x2229c LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 222a2 MOVE.L D6,D1> {}
<MI 222a4 SUBQ.L #0x1,D1> {}
<POP 0x222a6 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {}
<MI 222b0 MOVE.B (A0+D1.L+#0x2),(A6+D0.L-#0x3a)> {}
<POP 222b6-222bc Naked> Σ0 ↓ →0x2227c ←0x22288
<MI 222b6 ADDQ.L #0x1,D6> {}
<MI 222b8 CMP.L #0x1e,D6> {}
<MI 222ba BLE 0x2227c> {}
<POP 222bc-222c8 Naked> Σ0 ↓
<MI 222bc MOVE.L 0x24168,(A6-0x1c)> {}
<MI 222c4 MOVEA.W #0x01,A3> {}
<MI 222c6 MOVEQ.L #0x00,D7> {}
<POP 222c8-222d0 Naked> Σ0 ↓ →0x222f2 ←0x222f0
<MI 222c8 MOVEA.L (A6-0x1c),A0> {}
<MI 222cc CMPA.W #0x01,A0> {}
<MI 222ce BEQ 0x222f2> {}
<POP 222d0-222d4 Naked> Σ0 ↓ →0x222f2
<MI 222d0 TST.B D7> {}
<MI 222d2 BNE 0x222f2> {}
<POP 222d4-222dc Naked> Σ0 ↓
<MI 222d4 LEA.L (A6-0x3a),A1> {}
<MI 222d8 MOVEA.L A0,A2> {}
<MI 222da MOVEQ.L #0x1d,D0> {}
<POP 222dc-222e2 Naked> Σ0 ↓ →0x222dc ←0x222dc
<MI 222dc CMPM.B (A1)+,(A2)+> {}
<MI 222de DBNE D0,0x222dc> {}
<POP 222e2-222e4 Naked> Σ0 ↓ →0x222e8
<MI 222e2 BNE 0x222e8> {}
<POP 222e4-222e8 Naked> Σ0 →0x222f0
<MI 222e4 MOVEQ.L #0x01,D7> {}
<MI 222e6 BRA 0x222f0> {}
<POP 222e8-222f0 Naked> Σ0 ↓ ←0x222e2
<MI 222e8 MOVEA.L A0,A3> {}
<MI 222ea MOVE.L (A0+0x2e),(A6-0x1c)> {}
<POP 222f0-222f2 Naked> Σ0 →0x222c8 ←0x222e4
<MI 222f0 BRA 0x222c8> {}
<POP 222f2-222f6 Naked> Σ0 ↓ →0x22348 ←0x222c8 ←0x222d0
<MI 222f2 TST.B D7> {}
<MI 222f4 BNE 0x22348> {}
<POP 222f6-22348 Naked> Σ0 ↓
<Blob 0x222f6 [42] @> Δ-42 {[«42""»]}
<Blob 0x22302 [30] (A6-0x1c)> Δ-30 {[«42""»]|[«30»]}
<Const 0x2230e 0xe.2> Δ-2 {[«42""»]|[«30»]|[#14]}
<POP 22312-22314 StackAdj> Δ-8 {[«42""»]|[«30»]|[#14]|[-8-]}
<Lit 0x22314 42> {[«42""»]|[«30»]|[#14]|[-4-]|[$$Kernel elaborated subsystem not on list :_]}
<POP 22324-22326 StackAdj> Δ-4 {[«42""»]|[«30»]|[#14]|[-4-]|[$$Kernel elaborated subsystem not on list :_]|[-4-]}
<Lit 0x22326> {[«42""»]|[«30»]|[#14]|[-4-]|[$$Kernel elaborated subsystem not on list :_]|[$$…]}
<Pointer.sp 0x22326 14> Δ-4
<Const 0x2232a 0x1.2> Δ-2
<Const 0x2232c 0x1e.2> Δ-2
<Call 0x2232e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22334-22336 StackAdj> Δ+8
<Call 0x22336 0x102d0> {[«42""»]|[«30»]|[#14]|[-4-]|[$$Kernel elaborated subsystem not on list :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 2233c-2233e StackAdj> Δ+8 {[«42""»]|[«30»]|[#14]|[-4-]}
<Call 0x2233e 0x103b8> {[«42""»]|[«30»]|[#14]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 22344-22348 StackAdj> Δ+78 {}
<POP 22348-2234c Naked> Σ0 ↓ →0x2235a ←0x222f2
<MI 22348 CMPA.W #0x01,A3> {}
<MI 2234a BNE 0x2235a> {}
<POP 2234c-2235a Naked> Σ0 →0x22364
<MI 2234c MOVEA.L (A6-0x1c),A0> {}
<MI 22350 MOVE.L (A0+0x2e),0x24168> {}
<MI 22358 BRA 0x22364> {}
<POP 2235a-22364 Naked> Σ0 ↓ ←0x22348
<MI 2235a MOVEA.L (A6-0x1c),A0> {}
<MI 2235e MOVE.L (A0+0x2e),(A3+0x2e)> {}
<POP 22364-22382 Naked> Σ0 ↓ →0x22246 ←0x2234c
<MI 22364 MOVEA.L (A6-0x1c),A0> {}
<MI 22368 MOVE.L 0x2416c,(A0+0x2e)> {}
<MI 22370 MOVE.L (A6-0x1c),0x2416c> {}
<MI 22378 ADDQ.B #0x1,D5> {}
<MI 2237a CMPI.B #0x04,D5> {}
<MI 2237e BLE 0x22246> {}
<POP 22382-22396 Naked> Σ0 ↓
<Pointer.fp 0x22382 <LVAR -0x03e @ 4(rw)>> Δ-4 {[@@-62]}
<Call 0x22386 0x102bc> {[@@-62]}
FreeString(VAR a : String)
<POP 2238c-2238e StackAdj> Δ+4 {}
<MI 2238e MOVE.L 0x2416c,(A6-0x18)> {}
<POP 22396-223a0 Naked> Σ0 ↓ →0x22422 ←0x22412
<MI 22396 MOVEA.L (A6-0x18),A0> {}
<MI 2239a CMPA.W #0x01,A0> {}
<MI 2239c BEQ 0x22422> {}
<POP 223a0-223a8 Naked> Σ0 ↓
<MI 223a0 MOVE.L 0x24168,(A6-0x1c)> {}
<POP 223a8-223b2 Naked> Σ0 Δ-4 ↓ →0x22412 ←0x22406
<MI 223a8 MOVEA.L (A6-0x1c),A0> {}
<MI 223ac MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 223ae CMPA.W #0x01,A0> {[4, 'A0']}
<MI 223b0 BEQ 0x22412> {[4, 'A0']}
<POP 223b2-223bc Naked> Σ-4 ↓
<MI 223b2 MOVE.L (A0+0x2a),(A6-0x10)> {[-4-]}
<MI 223b8 MOVEA.W #0x01,A4> {[-4-]}
<MI 223ba MOVEQ.L #0x00,D7> {[-4-]}
<POP 223bc-223c4 Naked> Σ-4 ↓ →0x223de ←0x223dc
<MI 223bc MOVEA.L (A6-0x10),A0> {[-4-]}
<MI 223c0 CMPA.W #0x01,A0> {[-4-]}
<MI 223c2 BEQ 0x223de> {[-4-]}
<POP 223c4-223c8 Naked> Σ-4 ↓ →0x223de
<MI 223c4 TST.B D7> {[-4-]}
<MI 223c6 BNE 0x223de> {[-4-]}
<POP 223c8-223d0 Naked> Σ-4 ↓ →0x223d4
<MI 223c8 MOVEA.L (A0),A1> {[-4-]}
<MI 223ca CMPA.L (A6-0x18),A1> {[-4-]}
<MI 223ce BNE 0x223d4> {[-4-]}
<POP 223d0-223d4 Naked> Σ-4 →0x223dc
<MI 223d0 MOVEQ.L #0x01,D7> {[-4-]}
<MI 223d2 BRA 0x223dc> {[-4-]}
<POP 223d4-223dc Naked> Σ-4 ↓ ←0x223c8
<MI 223d4 MOVEA.L A0,A4> {[-4-]}
<MI 223d6 MOVE.L (A0+0x4),(A6-0x10)> {[-4-]}
<POP 223dc-223de Naked> Σ-4 →0x223bc ←0x223d0
<MI 223dc BRA 0x223bc> {[-4-]}
<POP 223de-223e2 Naked> Σ-4 ↓ →0x22406 ←0x223bc ←0x223c4
<MI 223de TST.B D7> {[-4-]}
<MI 223e0 BEQ 0x22406> {[-4-]}
<POP 223e2-223e6 Naked> Σ-4 ↓ →0x223f0
<MI 223e2 CMPA.W #0x01,A4> {[-4-]}
<MI 223e4 BNE 0x223f0> {[-4-]}
<POP 223e6-223f0 Naked> Σ-4 →0x223f6
<MI 223e6 MOVEA.L (A7),A1> {[-4-]}
<MI 223e8 MOVE.L (A0+0x4),(A1+0x2a)> {[-4-]}
<MI 223ee BRA 0x223f6> {[-4-]}
<POP 223f0-223f6 Naked> Σ-4 ↓ ←0x223e2
<MI 223f0 MOVE.L (A0+0x4),(A4+0x4)> {[-4-]}
<POP 223f6-22406 Naked> Σ-4 ↓ ←0x223e6
<Pointer.fp 0x223f6 <LVAR -0x010 @ 4(rw)>> Δ-4 {[-4-]|[@@-16]}
<Const 0x223fa 0x8.4> Δ-4 {[-4-]|[@@-16]|[##8]}
<Call 0x223fe 0x102a8> {[-4-]|[@@-16]|[##8]}
Free2(a : Pointer; b : Long)
<POP 22404-22406 StackAdj> Δ+8 {[-4-]}
<POP 22406-22412 Naked> Σ-4 Δ+4 →0x223a8 ←0x223de
<MI 22406 MOVEA.L (A7),A0> {[-4-]}
<MI 22408 MOVE.L (A0+0x2e),(A6-0x1c)> {[-4-]}
<POP 2240e-22410 StackAdj> Δ+4 {}
<MI 22410 BRA 0x223a8> {}
<POP 22412-22422 Naked> Σ-4 Δ+4 →0x22396 ←0x223a8
<POP 22412-22414 StackAdj> Δ+4 {}
<MI 22414 MOVEA.L (A6-0x18),A0> {}
<MI 22418 MOVE.L (A0+0x2e),(A6-0x18)> {}
<MI 2241e BRA 0x22396> {}
<POP 22422-2242a Epilogue> Σ0 ←0x22396
@ 2242a
<POP 2242a-224ba Body>
<POP 2242a-22440 Prologue> Σ0 ↓
<POP 22440-22444 RegCacheLoad> Σ0 ↓
<POP 22444-22456 Naked> Σ0 ↓ →0x224b2
<POP 22444-22446 StackAdj> Δ-4 {[-4-]}
<Call 0x22446 0x103f8> {[-4-]}
GetConsoleConfig() : Long
<MI 2244c MOVE.L (A7)+,D0> Δ+4 {}
<MI 2244e CMPI.L #0x00000003,D0> {}
<MI 22454 BNE 0x224b2> {}
<POP 22456-224b2 Naked> Σ0 ↓
<Blob 0x22456 [38] @> Δ-38 {[«38""»]}
<POP 22462-22464 StackAdj> Δ-4 {[«38""»]|[-4-]}
<Lit 0x22464 38> {[«38""»]|[$$Returning to LOCAL mode to start R1000]}
<Call 0x22476 0x103e0> {[«38""»]|[$$Returning to LOCAL mode to start R1000]}
WriteConsoleStringCrLf(str : String)
<POP 2247c-2247e StackAdj> Δ+42 {}
<Call 0x2247e 0x10216> {}
KC0b
<Blob 0x22484 [42] @> Δ-42 {[«42""»]}
<POP 22494-22496 StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x22496 41> {[«42""»]|[$$Returned to LOCAL, starting R1000 cluster]}
<Call 0x224a8 0x103e0> {[«42""»]|[$$Returned to LOCAL, starting R1000 cluster]}
WriteConsoleStringCrLf(str : String)
<POP 224ae-224b2 StackAdj> Δ+46 {}
<POP 224b2-224ba Epilogue> Σ0 ←0x22444
@ 224ba
<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 224ba-225f0 Body>
<POP 224ba-224d0 Prologue> Σ0 ↓
<POP 224d0-224d6 RegCacheLoad> Σ0 ↓
<POP 224d6-225c6 Naked> Σ0 ↓ →0x225cc
<Call 0x224d6 0x2221c> {}
<Const 0x224da 0x2416c.4> Δ-4 {[##147820]}
<Const 0x224e0 0x4.2> Δ-2 {[##147820]|[#4]}
<Call 0x224e4 0x21ecc> {[##147820]|[#4]}
<POP 224e8-224ea StackAdj> Δ+6 {}
<Const 0x224ea 0x24168.4> Δ-4 {[##147816]}
<Const 0x224f0 0xf.2> Δ-2 {[##147816]|[#15]}
<Call 0x224f4 0x21ecc> {[##147816]|[#15]}
<POP 224f8-224fa StackAdj> Δ+4 {[-2-]}
<POP 224fa-224fb StackAdj> Δ+2 {}
<Blob 0x224fb [2] @> Δ-2 {[«2""»]}
<Blob 0x224fe [26] @> Δ-26 {[«2""»]|[«26""»]}
<POP 2250a-2250c StackAdj> Δ-8 {[«2""»]|[«26""»]|[-8-]}
<Blob 0x2250c [4] 0x24160> Δ-4 {[«2""»]|[«26""»]|[-8-]|[«4»]}
<Call 0x22512 0x102e4> {[«2""»]|[«26""»]|[-8-]|[«4»]}
Long2String(a : Long) : String
<Lit 0x22518 2> {[«2""»]|[«26""»]|[-8-]|[$$/ ]}
<POP 22528-22529 StackAdj> Δ-4 {[«2""»]|[«26""»]|[-8-]|[$$/ ]|[-4-]}
<Blob 0x22529 [4] 0x24164> Δ-4 {[«2""»]|[«26""»]|[-8-]|[$$/ ]|[-4-]|[«4»]}
<Call 0x2252e 0x102e4> {[«2""»]|[«26""»]|[-8-]|[$$/ ]|[-4-]|[«4»]}
Long2String(a : Long) : String
<Lit 0x22534 26> {[«2""»]|[«26""»]|[-8-]|[$$/ ]|[-4-]|[$$ wired/total pages loaded.]}
<Call 0x22546 0x102d8> {[«2""»]|[«26""»]|[-8-]|[$$/ ]|[-4-]|[$$ wired/total pages loaded.]}
StringCat4(a, b, c, d : String) : String
<POP 2254c-22550 StackAdj> Δ+16 {[«2""»]|[«26""»]|[-4-]}
<Call 0x22550 0x103d8> {[«2""»]|[«26""»]|[-4-]}
WriteConsoleString(str : String)
<POP 22556-2255a StackAdj> Δ+32 {}
<Call 0x2255a 0x20730> {}
<Call 0x2255e 0x2242a> {}
<Call 0x22562 0x103dc> {}
WriteConsoleCrLf(void)
<MI 22568 MOVE.L 0x2061e,(A6-0x414)> {}
<MI 2256c MOVE.L 0x20622,(A6-0x410)> {}
<MI 22572 MOVE.L 0x20626,(A6-0x40c)> {}
<MI 22578 MOVE.L 0x2062a,(A6-0x408)> {}
<Pointer.fp 0x2257e <LVAR -0x414 @ 2(w) 4(w)>> Δ-4 {[@@-1044]}
<Call 0x22580 0x207fe> {[@@-1044]}
<POP 22584-22586 StackAdj> Δ+4 {}
<Pointer.fp 0x22586 <LVAR -0x004 @ 1(r)>> Δ-4 {[@@-4]}
<Call 0x2258a 0x1059e> {[@@-4]}
ReadClusterNo(VAR a : Long)
<POP 22590-22592 StackAdj> Δ+4 {}
<MI 22592 CLR.L D0> {}
<MI 22594 MOVE.B (A6-0x4),D0> {}
<MI 22598 ASL.W #0x8,D0> {}
<MI 2259a CLR.L D1> {}
<MI 2259c MOVE.B (A6-0x3),D1> {}
<MI 225a0 ADD.W D0,D1> {}
<MI 225a2 MOVE.W D1,(A6-0x408)> {}
<MI 225a6 CLR.L D0> {}
<MI 225a8 MOVE.B (A6-0x2),D0> {}
<MI 225ac ASL.W #0x8,D0> {}
<MI 225ae CLR.L D1> {}
<MI 225b0 MOVE.B (A6-0x1),D1> {}
<MI 225b4 ADD.W D0,D1> {}
<MI 225b6 MOVE.W D1,(A6-0x406)> {}
<POP 225ba-225bc StackAdj> Δ-2 {[-2-]}
<Call 0x225bc 0x105ce> {[-2-]}
ReadKeySwitch() : Bool
<MI 225c2 TST.B (A7)+> Δ+2 {}
<MI 225c4 BEQ 0x225cc> {}
<POP 225c6-225cc Naked> Σ0 ↓
<MI 225c6 ORI.W #0x8000,(A6-0x410)> {}
<POP 225cc-225e8 Naked> Σ0 ↓ ←0x224d6
<MI 225cc MOVE.W 0x24170,(A6-0x414)> {}
<MI 225d2 ANDI.W #0xff00,(A6-0x414)> {}
<Pointer.fp 0x225d6 <LVAR -0x414 @ 2(w) 4(w)>> Δ-4 {[@@-1044]}
<MI 225d8 LEA.L (A6-0x404),A0> {[@@-1044]}
<MI 225dc MOVE.L A0,-(A7)> Δ-4 {[@@-1044]|[4, 'A0']}
<MI 225de CLR.B -(A7)> Δ-2 {[@@-1044]|[4, 'A0']|[#0]}
<Call 0x225e0 0x212dc> {[@@-1044]|[4, 'A0']|[#0]}
<POP 225e4-225e8 StackAdj> Δ+10 {}
<POP 225e8-225f0 Epilogue> Σ0
@ 225f0
<LVAR 0x00c 1(w)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @>
<LVAR -0x006 @ 4(r)>
<LVAR -0x00c @ 4(rw)>
<POP 225f0-226a8 Body>
<POP 225f0-22606 Prologue> Σ0 ↓
<POP 22606-22612 RegCacheLoad> Σ0 ↓
<POP 22612-22636 Naked> Σ0 ↓
<MI 22612 MOVE.B #0x04,(A6+0xc)> {}
<Pointer.fp 0x22618 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x2261a 0x102b8> {[@@-6]}
NewString(VAR a : String)
<MI 22620 MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<MI 22624 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x6)']}
<Pointer.fp 0x22626 <LVAR -0x002 @>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x6)']|[@@-2]}
<Call 0x2262a 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x6)']|[@@-2]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 22630-22634 StackAdj> Δ+12 {}
<MI 22634 MOVEQ.L #0x00,D7> {}
<POP 22636-22688 Naked> Σ0 ↓ →0x2268e ←0x2268e
<MI 22636 MOVE.B D7,D0> {}
<MI 22638 EXTB.W D0> {}
<MI 2263a MULS.W #0x0a,D0> {}
<MI 2263c LEA.L 0x2062e,A0> {}
<Blob 0x22640 [10] (A0+D0.W)> Δ-10 {[«10»]}
<POP 22650-22652 StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x22652> {[«10»]|[$$…]}
<Pointer.sp 0x22652 4> Δ-4
<Const 0x22656 0x1.2> Δ-2
<Const 0x22658 0xa.2> Δ-2
<Call 0x2265a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22660-22662 StackAdj> Δ+8
<MI 22662 MOVE.L (A7)+,(A6-0xc)> Δ+4 {[«10»]}
<POP 22664-22666 StackAdj> Δ+4 {[-6-]}
<MI 22666 MOVE.L (A6-0x6),(A7)> {[-2-]|[4, '(A6-0x6)']}
<MI 22668 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x6)']|[4, '(A6-0xc)']}
<Call 0x2266a 0x102c8> {[-2-]|[4, '(A6-0x6)']|[4, '(A6-0xc)']}
StringEqual(a, b : String) : Byte
<POP 22670-22672 StackAdj> Δ+8 {[-2-]}
<MI 22672 MOVE.B (A7)+,D0> Δ+2 {}
<MI 22674 EXTB.W D0> {}
<POP 0x22676 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 22678 MOVE.B D0,D6> {}
<Pointer.fp 0x2267a <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x2267c 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<POP 22682-22684 StackAdj> Δ+4 {}
<MI 22684 TST.B D6> {}
<MI 22686 BEQ 0x2268e> {}
<POP 22688-2268e Naked> Σ0 →0x22696
<MI 22688 MOVE.B D7,(A6+0xc)> {}
<MI 2268c BRA 0x22696> {}
<POP 2268e-22696 Naked> Σ0 ↓ →0x22636 ←0x22636
<MI 2268e ADDQ.B #0x1,D7> {}
<MI 22690 CMPI.B #0x03,D7> {}
<MI 22694 BLE 0x22636> {}
<POP 22696-226a0 Naked> Σ0 ↓ ←0x22688
<Pointer.fp 0x22696 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x22698 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 2269e-226a0 StackAdj> Δ+4 {}
<POP 226a0-226a8 Epilogue> Σ0
@ 226a8
<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 226a8-22766 Body>
<POP 226a8-226be Prologue> Σ0 ↓
<POP 226be-226cc RegCacheLoad> Σ0 ↓
<POP 226cc-226e6 Naked> Σ0 ↓ →0x226f4
<Pointer.fp 0x226cc <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Call 0x226ce 0x102b8> {[@@-8]}
NewString(VAR a : String)
<MI 226d4 MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<MI 226d6 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x8)']}
<Pointer.fp 0x226d8 <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x8)']|[@@-4]}
<Call 0x226da 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x8)']|[@@-4]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 226e0-226e2 StackAdj> Δ+12 {}
<MI 226e2 TST.B (A6-0x4)> {}
<MI 226e4 BEQ 0x226f4> {}
<POP 226e6-226f4 Naked> Σ0 ↓
<MI 226e6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 226e8 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x8)']}
<Pointer.fp 0x226ea <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x8)']|[@@-4]}
<Call 0x226ec 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x8)']|[@@-4]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 226f2-226f4 StackAdj> Δ+12 {}
<POP 226f4-226f8 Naked> Σ0 ↓ →0x22728 ←0x226cc
<MI 226f4 TST.B (A6-0x4)> {}
<MI 226f6 BNE 0x22728> {}
<POP 226f8-22728 Naked> Σ0 ↓
<Blob 0x226f8 [34] @> Δ-34 {[«34""»]}
<Const 0x22704 0xe.2> Δ-2 {[«34""»]|[#14]}
<POP 22708-2270a StackAdj> Δ-4 {[«34""»]|[#14]|[-4-]}
<Lit 0x2270a 34> {[«34""»]|[#14]|[$$Bad syntax in SUBSYSTEM directive!]}
<Call 0x2271e 0x103b8> {[«34""»]|[#14]|[$$Bad syntax in SUBSYSTEM directive!]}
PopProgram(status : Byte; msg : String)
<POP 22724-22728 StackAdj> Δ+40 {}
<POP 22728-2275e Naked> Σ0 ↓ ←0x226f4
<POP 22728-2272a StackAdj> Δ-8 {[-8-]}
<MI 2272a MOVE.L (A6-0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x8)']}
<Const 0x2272c 0x10.4> Δ-4 {[-8-]|[4, '(A6-0x8)']|[##16]}
<Call 0x22730 0x10360> {[-8-]|[4, '(A6-0x8)']|[##16]}
?StringToInt64()
<POP 22736-22738 StackAdj> Δ+8 {[-8-]}
<MI 22738 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 2273c MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 22740 MOVEA.L (A6+0xc),A0> {}
<MI 22744 LEA.L (A0+0x1e),A0> {}
<MI 22748 LEA.L (A6-0x10),A1> {}
<BlockMove 8,A1,A0> {}
<Pointer.fp 0x22754 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x22756 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 2275c-2275e StackAdj> Δ+4 {}
<POP 2275e-22766 Epilogue> Σ0
@ 22766
<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 22766-22aa4 Body> Δ+12
<POP 22766-2277c Prologue> Σ0 ↓
<POP 2277c-22788 RegCacheLoad> Σ0 ↓
<POP 22788-227aa Naked> Σ0 ↓ →0x227da
<Pointer.fp 0x22788 <LVAR -0x01a @ 4(rw)>> Δ-4 {[@@-26]}
<Call 0x2278a 0x102b8> {[@@-26]}
NewString(VAR a : String)
<MI 22790 MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<MI 22794 MOVE.L (A6-0x1a),-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x1a)']}
<Pointer.fp 0x22796 <LVAR -0x003 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[4, '(A6-0x1a)']|[@@-3]}
<Call 0x2279a 0x102fc> {[4, '(A6+0x8)']|[4, '(A6-0x1a)']|[@@-3]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 227a0-227a4 StackAdj> Δ+12 {}
<MI 227a4 TST.B (A6-0x3)> {}
<MI 227a8 BNE 0x227da> {}
<POP 227aa-227da Naked> Σ0 ↓
<Blob 0x227aa [30] @> Δ-30 {[«30""»]}
<Const 0x227ba 0xe.2> Δ-2 {[«30""»]|[#14]}
<POP 227bc-227be StackAdj> Δ-4 {[«30""»]|[#14]|[-4-]}
<Lit 0x227be 29> {[«30""»]|[#14]|[$$Bad syntax in WITH directive!]}
<Call 0x227d0 0x103b8> {[«30""»]|[#14]|[$$Bad syntax in WITH directive!]}
PopProgram(status : Byte; msg : String)
<POP 227d6-227da StackAdj> Δ+36 {}
<POP 227da-2282c Naked> Σ0 ↓ →0x22840 ←0x22788
<POP 227da-227dc StackAdj> Δ-4 {[-4-]}
<MI 227dc MOVE.L (A6-0x1a),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x1a)']}
<Call 0x227de 0x102f0> {[-4-]|[4, '(A6-0x1a)']}
ToUpper(a : String) : String
<POP 227e4-227e6 StackAdj> Δ+4 {[-4-]}
<MI 227e6 MOVE.L (A7)+,(A6-0x1a)> Δ+4 {}
<Pointer.fp 0x227e8 <LVAR 0x008 @ 4(rw)>> Δ-4 {[@@8]}
<Call 0x227ec 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 227f2-227f4 StackAdj> Δ+2 {[-2-]}
<POP 227f4-227f5 StackAdj> Δ+2 {}
<Blob 0x227f5 [2] @> Δ-2 {[«2""»]}
<Blob 0x227f8 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x227fc [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 22800-22802 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x22802 6> {[«2""»]|[«2""»]|[«2""»]|[$$.MLOAD]}
<MI 22814 MOVE.L (A7)+,(A6+0x8)> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 22818-2281a StackAdj> Δ+2 {[«2""»]|[«2""»]}
<MI 2281a MOVE.L (A6-0x1a),-(A7)> Δ-4 {[«2""»]|[«2""»]|[4, '(A6-0x1a)']}
<MI 2281c MOVE.L (A6+0x8),-(A7)> Δ-4 {[«2""»]|[«2""»]|[4, '(A6-0x1a)']|[4, '(A6+0x8)']}
<Call 0x22820 0x10300> {[«2""»]|[«2""»]|[4, '(A6-0x1a)']|[4, '(A6+0x8)']}
FSCALL_10300
<POP 22826-22828 StackAdj> Δ+8 {[«2""»]|[«2""»]}
<MI 22828 TST.L (A7)+> Δ+4 {}
<MI 2282a BNE 0x22840> {}
<POP 2282c-22840 Naked> Σ0 →0x2284c
<POP 2282c-2282e StackAdj> Δ-4 {[-4-]}
<MI 2282e MOVE.L (A6-0x1a),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x1a)']}
<MI 22830 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x1a)']|[4, '(A6+0x8)']}
<Call 0x22834 0x102d0> {[-4-]|[4, '(A6-0x1a)']|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 2283a-2283c StackAdj> Δ+8 {[-4-]}
<MI 2283c MOVE.L (A7)+,(A6-0x1a)> Δ+4 {}
<MI 2283e BRA 0x2284c> {}
<POP 22840-2284c Naked> Σ0 ↓ ←0x227da
<Pointer.fp 0x22840 <LVAR 0x008 @ 4(rw)>> Δ-4 {[@@8]}
<Call 0x22844 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 2284a-2284c StackAdj> Δ+4 {}
<POP 2284c-22872 Naked> Σ0 ↓ ←0x2282c
<MI 2284c MOVE.L (A6-0x1a),-(A7)> Δ-4 {[4, '(A6-0x1a)']}
<MI 2284e CLR.B -(A7)> Δ-2 {[4, '(A6-0x1a)']|[#0]}
<Const 0x22850 0x2.2> Δ-2 {[4, '(A6-0x1a)']|[#0]|[#2]}
<Const 0x22852 0x0.4> Δ-4 {[4, '(A6-0x1a)']|[#0]|[#2]|[##0]}
<Pointer.fp 0x22856 <LVAR -0x01c @>> Δ-4 {[4, '(A6-0x1a)']|[#0]|[#2]|[##0]|[@@-28]}
<Pointer.fp 0x2285a <LVAR -0x020 @ 4(r)>> Δ-4 {[4, '(A6-0x1a)']|[#0]|[#2]|[##0]|[@@-28]|[@@-32]}
<Call 0x2285e 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 22864-22868 StackAdj> Δ+20 {}
<MI 22868 MOVE.L 0x24168,(A6-0xe)> {}
<MI 22870 MOVEQ.L #0x01,D7> {}
<POP 22872-2287a Naked> Σ0 ↓ →0x2289a ←0x22898
<MI 22872 MOVEA.L (A6-0xe),A0> {}
<MI 22876 CMPA.W #0x01,A0> {}
<MI 22878 BEQ 0x2289a> {}
<POP 2287a-2287e Naked> Σ0 ↓ →0x2289a
<MI 2287a TST.B D7> {}
<MI 2287c BEQ 0x2289a> {}
<POP 2287e-22886 Naked> Σ0 ↓
<MI 2287e MOVEA.L (A6-0x20),A1> {}
<MI 22882 MOVEA.L A0,A2> {}
<MI 22884 MOVEQ.L #0x1d,D0> {}
<POP 22886-2288c Naked> Σ0 ↓ →0x22886 ←0x22886
<MI 22886 CMPM.B (A1)+,(A2)+> {}
<MI 22888 DBNE D0,0x22886> {}
<POP 2288c-2288e Naked> Σ0 ↓ →0x22892
<MI 2288c BNE 0x22892> {}
<POP 2288e-22892 Naked> Σ0 →0x22898
<MI 2288e MOVEQ.L #0x00,D7> {}
<MI 22890 BRA 0x22898> {}
<POP 22892-22898 Naked> Σ0 ↓ ←0x2288c
<MI 22892 MOVE.L (A0+0x2e),(A6-0xe)> {}
<POP 22898-2289a Naked> Σ0 →0x22872 ←0x2288e
<MI 22898 BRA 0x22872> {}
<POP 2289a-2289e Naked> Σ0 ↓ →0x228e4 ←0x22872 ←0x2287a
<MI 2289a TST.B D7> {}
<MI 2289c BEQ 0x228e4> {}
<POP 2289e-228e4 Naked> Σ0 ↓
<Pointer.fp 0x2289e <LVAR -0x00e @ 4(rw)>> Δ-4 {[@@-14]}
<Const 0x228a2 0x32.4> Δ-4 {[@@-14]|[##50]}
<Call 0x228a6 0x1029c> {[@@-14]|[##50]}
Malloc1(length : Long) : Pointer
<POP 228ac-228ae StackAdj> Δ+8 {}
<MI 228ae MOVEA.L (A6-0xe),A0> {}
<MI 228b2 MOVEA.L (A6-0x20),A1> {}
<MI 228b6 MOVEA.L A0,A2> {}
<BlockMove 30,A1,A2> {}
<MI 228c0 MOVE.L #0x01,(A0+0x2a)> {}
<MI 228c4 MOVE.L 0x24168,(A0+0x2e)> {}
<MI 228cc LEA.L (A0+0x1e),A0> {}
<MI 228d0 LEA.L 0x20660,A1> {}
<BlockMove 8,A1,A0> {}
<MI 228dc MOVE.L (A6-0xe),0x24168> {}
<POP 228e4-228ec Naked> Σ0 ↓ →0x2295e ←0x2289a
<MI 228e4 MOVEA.L (A6+0xc),A0> {}
<MI 228e8 CMPA.W #0x01,A0> {}
<MI 228ea BEQ 0x2295e> {}
<POP 228ec-228f4 Naked> Σ0 ↓
<MI 228ec MOVEA.L 0x24168,A4> {}
<MI 228f2 MOVEQ.L #0x00,D6> {}
<POP 228f4-228f8 Naked> Σ0 ↓ →0x2290c ←0x2290a
<MI 228f4 CMPA.W #0x01,A4> {}
<MI 228f6 BEQ 0x2290c> {}
<POP 228f8-228fc Naked> Σ0 ↓ →0x2290c
<MI 228f8 TST.B D6> {}
<MI 228fa BNE 0x2290c> {}
<POP 228fc-22902 Naked> Σ0 ↓ →0x22906
<MI 228fc CMPA.L (A6+0xc),A4> {}
<MI 22900 BNE 0x22906> {}
<POP 22902-22906 Naked> Σ0 →0x2290a
<MI 22902 MOVEQ.L #0x01,D6> {}
<MI 22904 BRA 0x2290a> {}
<POP 22906-2290a Naked> Σ0 ↓ ←0x228fc
<MI 22906 MOVEA.L (A4+0x2e),A4> {}
<POP 2290a-2290c Naked> Σ0 →0x228f4 ←0x22902
<MI 2290a BRA 0x228f4> {}
<POP 2290c-22910 Naked> Σ0 ↓ →0x2293a ←0x228f4 ←0x228f8
<MI 2290c TST.B D6> {}
<MI 2290e BNE 0x2293a> {}
<POP 22910-2293a Naked> Σ0 ↓
<Blob 0x22910 [24] @> Δ-24 {[«24""»]}
<Const 0x2291c 0xe.2> Δ-2 {[«24""»]|[#14]}
<POP 2291e-22920 StackAdj> Δ-4 {[«24""»]|[#14]|[-4-]}
<Lit 0x22920 24> {[«24""»]|[#14]|[$$Can't find USER of WITH!]}
<Call 0x22932 0x103b8> {[«24""»]|[#14]|[$$Can't find USER of WITH!]}
PopProgram(status : Byte; msg : String)
<POP 22938-2293a StackAdj> Δ+30 {}
<POP 2293a-2295e Naked> Σ0 ↓ ←0x2290c
<Pointer.fp 0x2293a <LVAR -0x00a @ 4(r)>> Δ-4 {[@@-10]}
<Const 0x2293e 0x8.4> Δ-4 {[@@-10]|[##8]}
<Call 0x22942 0x1029c> {[@@-10]|[##8]}
Malloc1(length : Long) : Pointer
<POP 22948-2294a StackAdj> Δ+8 {}
<MI 2294a MOVEA.L (A6-0xa),A0> {}
<MI 2294e MOVE.L (A6-0xe),(A0)> {}
<MI 22952 MOVE.L (A4+0x2a),(A0+0x4)> {}
<MI 22958 MOVE.L (A6-0xa),(A4+0x2a)> {}
<POP 2295e-22964 Naked> Σ0 ↓ →0x22a78 ←0x228e4
<MI 2295e TST.B D7> {}
<MI 22960 BEQ 0x22a78> {}
<POP 22964-2299c Naked> Σ0 ↓
<Blob 0x22964 [10] @> Δ-10 {[«10""»]}
<POP 22970-22972 StackAdj> Δ-8 {[«10""»]|[-8-]}
<Lit 0x22972 10> {[«10""»]|[-4-]|[$$Loading :_]}
<MI 22982 MOVE.L (A6-0x1a),(A7)> {[«10""»]|[-4-]|[4, '(A6-0x1a)']}
<POP 2297c-22982 StackAdj> Δ-8 {[«10""»]|[-4-]|[4, '(A6-0x1a)']|[-8-]}
<Call 0x22984 0x102cc> {[«10""»]|[-4-]|[4, '(A6-0x1a)']|[-8-]}
StringDup(a : String) : String
<POP 2298a-2298c StackAdj> Δ+4 {[«10""»]|[-4-]|[4, '(A6-0x1a)']|[-4-]}
<Call 0x2298c 0x102d0> {[«10""»]|[-4-]|[4, '(A6-0x1a)']|[-4-]}
StringCat2(a, b : String) : String
<POP 22992-22994 StackAdj> Δ+8 {[«10""»]|[-4-]}
<Call 0x22994 0x103e0> {[«10""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2299a-2299c StackAdj> Δ+14 {}
<POP 2299c-229d0 Naked> Σ0 ↓ →0x229e0 ←0x22a70
<Pointer.fp 0x2299c <LVAR -0x016 @ 4(rw)>> Δ-4 {[@@-22]}
<Call 0x229a0 0x102b8> {[@@-22]}
NewString(VAR a : String)
<MI 229a6 MOVE.L (A6-0x20),(A7)> {[4, '(A6-0x20)']}
<Pointer.fp 0x229aa <LVAR -0x016 @ 4(rw)>> Δ-4 {[4, '(A6-0x20)']|[@@-22]}
<Pointer.fp 0x229ae <LVAR -0x006 @ 1(r)>> Δ-4 {[4, '(A6-0x20)']|[@@-22]|[@@-6]}
<Call 0x229b2 0x1043c> {[4, '(A6-0x20)']|[@@-22]|[@@-6]}
FileReadLine(file : File; VAR a : String; VAR b : Byte)
<POP 229b8-229ba StackAdj> Δ+4 {[4, '(A6-0x20)']|[@@-22]}
<MI 229ba MOVE.L (A6-0x16),(A7)> {[4, '(A6-0x20)']|[4, '(A6-0x16)']}
<Call 0x229be 0x102f0> {[4, '(A6-0x20)']|[4, '(A6-0x16)']}
ToUpper(a : String) : String
<POP 229c4-229c6 StackAdj> Δ+4 {[4, '(A6-0x20)']}
<MI 229c6 MOVEA.L (A7)+,A0> Δ+4 {}
<MI 229c8 MOVE.L A0,(A6-0x16)> {}
<MI 229cc TST.W (A0)> {}
<MI 229ce BNE 0x229e0> {}
<POP 229d0-229da Naked> Σ0 Δ-4 ↓ ←0x22a34
<Pointer.fp 0x229d0 <LVAR -0x016 @ 4(rw)>> Δ-4 {[@@-22]}
<Call 0x229d4 0x102bc> {[@@-22]}
FreeString(VAR a : String)
<POP 229da-229e0 Naked> Σ-4 Δ+4 →0x22a70 ←0x22a20
<POP 229da-229dc StackAdj> Δ+4 {}
<MI 229dc BRA 0x22a70> {}
<POP 229e0-22a00 Naked> Σ0 →0x22a20 →0x22a0a →0x22a28 →0x22a34 →0x22a36 ←0x2299c
<POP 229e0-229e2 StackAdj> Δ-2 {[-2-]}
<MI 229e2 MOVE.L A0,-(A7)> Δ-4 {[-2-]|[4, 'A0']}
<Call 0x229e4 0x225f0> {[-2-]|[4, 'A0']}
<POP 229e8-229ea StackAdj> Δ+4 {[-2-]}
<MI 229ea MOVE.B (A7)+,D0> Δ+2 {}
<MI 229ec EXTB.W D0> {}
<POP 0x229ee LimitCheck 0x0 ≤ D0 ≤ 0x4> {}
<MI 229f6 ADD.W D0,D0> {}
<MI 229f8 SWITCH D0.W> {}
<POP 22a0a-22a1c Naked> Σ0 Δ-8 ↓ ←0x229e0
<MI 22a0a MOVE.L (A6-0xe),-(A7)> Δ-4 {[4, '(A6-0xe)']}
<POP 22a0e-22a10 StackAdj> Δ-4 {[4, '(A6-0xe)']|[-4-]}
<MI 22a10 MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0xe)']|[-4-]|[4, 'A0']}
<Call 0x22a12 0x220d8> {[4, '(A6-0xe)']|[-4-]|[4, 'A0']}
<POP 22a16-22a18 StackAdj> Δ+4 {[4, '(A6-0xe)']|[-4-]}
<Call 0x22a18 0x22766> {[4, '(A6-0xe)']|[-4-]}
<POP 22a1c-22a20 Naked> Σ-8 Δ+8 →0x22a70 ←0x22a28
<POP 22a1c-22a1e StackAdj> Δ+8 {}
<MI 22a1e BRA 0x22a70> {}
<POP 22a20-22a28 Naked> Σ0 Δ-4 →0x229da ←0x229e0
<MI 22a20 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Call 0x22a22 0x21510> {[4, 'A0']}
<MI 22a26 BRA 0x229da> {[4, 'A0']}
<POP 22a28-22a34 Naked> Σ0 Δ-8 →0x22a1c ←0x229e0
<MI 22a28 MOVE.L (A6-0xe),-(A7)> Δ-4 {[4, '(A6-0xe)']}
<MI 22a2c MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0xe)']|[4, 'A0']}
<Call 0x22a2e 0x226a8> {[4, '(A6-0xe)']|[4, 'A0']}
<MI 22a32 BRA 0x22a1c> {[4, '(A6-0xe)']|[4, 'A0']}
<POP 22a34-22a36 Naked> Σ0 →0x229d0 ←0x229e0
<MI 22a34 BRA 0x229d0> {}
<POP 22a36-22a70 Naked> Σ0 ↓ ←0x229e0
<Blob 0x22a36 [4] @> Δ-4 {[«4""»]}
<Blob 0x22a3a [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x22a3e [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x22a42 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<Const 0x22a46 0xe.2> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]}
<POP 22a48-22a4a StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-8-]}
<Lit 0x22a4a 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-4-]|[$$Bad syntax in :_]}
<POP 22a5a-22a5c StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-4-]|[$$Bad syntax in :_]|[-4-]}
<MI 22a5c MOVE.L (A6-0x1a),(A7)> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-4-]|[$$Bad syntax in :_]|[4, '(A6-0x1a)']}
<Call 0x22a5e 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-4-]|[$$Bad syntax in :_]|[4, '(A6-0x1a)']}
StringCat2(a, b : String) : String
<POP 22a64-22a66 StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-4-]}
<Call 0x22a66 0x103b8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[#14]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 22a6c-22a70 StackAdj> Δ+22 {}
<POP 22a70-22a78 Naked> Σ0 ↓ →0x2299c ←0x229da ←0x22a1c
<MI 22a70 TST.B (A6-0x6)> {}
<MI 22a74 BEQ 0x2299c> {}
<POP 22a78-22a9c Naked> Σ0 ↓ ←0x2295e
<MI 22a78 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x22a7a 0x2.2> Δ-2 {[#0]|[#2]}
<Const 0x22a7c 0x1.4> Δ-4 {[#0]|[#2]|[##1]}
<Pointer.fp 0x22a80 <LVAR -0x01c @>> Δ-4 {[#0]|[#2]|[##1]|[@@-28]}
<Pointer.fp 0x22a84 <LVAR -0x020 @ 4(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-28]|[@@-32]}
<Call 0x22a88 0x1038c> {[#0]|[#2]|[##1]|[@@-28]|[@@-32]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 22a8e-22a92 StackAdj> Δ+16 {}
<Pointer.fp 0x22a92 <LVAR -0x01a @ 4(rw)>> Δ-4 {[@@-26]}
<Call 0x22a94 0x102bc> {[@@-26]}
FreeString(VAR a : String)
<POP 22a9a-22a9c StackAdj> Δ+4 {}
<POP 22a9c-22aa4 Epilogue> Σ0
@ 22aa4
<POP 22aa4-22b0e Body>
<POP 22aa4-22aba Prologue> Σ0 ↓
<POP 22aba-22abc RegCacheLoad> Σ0 ↓
<POP 22abc-22abe Naked> Σ0 ↓
<MI 22abc MOVEQ.L #0x00,D7> {}
<POP 22abe-22b06 Naked> Σ0 ↓ →0x22abe ←0x22abe
<MI 22abe MOVE.B D7,D0> {}
<MI 22ac0 EXTB.W D0> {}
<MI 22ac2 ASL.W #0x5,D0> {}
<MI 22ac4 LEA.L 0x23e2e,A0> {}
<Blob 0x22aca [30] (A0+D0.W+#0x5d)> Δ-30 {[«30»]}
<POP 22ada-22adc StackAdj> Δ-4 {[«30»]|[-4-]}
<Lit 0x22adc> {[«30»]|[$$…]}
<Pointer.sp 0x22adc 4> Δ-4
<Const 0x22ae0 0x1.2> Δ-2
<Const 0x22ae4 0x1e.2> Δ-2
<Call 0x22ae6 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22aec-22aee StackAdj> Δ+8
<MI 22aee MOVEA.L (A7)+,A4> Δ+4 {[«30»]}
<POP 22af0-22af2 StackAdj> Δ+30 {}
<Const 0x22af2 0x1.4> Δ-4 {[##1]}
<MI 22af6 MOVE.L A4,-(A7)> Δ-4 {[##1]|[4, 'A4']}
<Call 0x22af8 0x22766> {[##1]|[4, 'A4']}
<POP 22afc-22afe StackAdj> Δ+8 {}
<MI 22afe ADDQ.B #0x1,D7> {}
<MI 22b00 CMPI.B #0x04,D7> {}
<MI 22b04 BLE 0x22abe> {}
<POP 22b06-22b0e Epilogue> Σ0
@ 22b0e
<LVAR -0x004 @ 4(rw)>
<POP 22b0e-22b78 Body>
<POP 22b0e-22b24 Prologue> Σ0 ↓
<POP 22b24-22b28 RegCacheLoad> Σ0 ↓
<POP 22b28-22b70 Naked> Σ0 ↓
<Blob 0x22b28 [20] @> Δ-20 {[«20""»]}
<POP 22b3a-22b3c StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x22b3c 19> {[«20""»]|[$$CURRENT.M200_CONFIG]}
<MI 22b50 MOVE.L (A7)+,(A6-0x4)> Δ+4 {[«20""»]}
<POP 22b52-22b56 StackAdj> Δ+16 {[-4-]}
<MI 22b56 MOVE.L (A6-0x4),(A7)> {[4, '(A6-0x4)']}
<Const 0x22b58 0x23e38.4> Δ-4 {[4, '(A6-0x4)']|[##147000]}
<Call 0x22b5e 0x10574> {[4, '(A6-0x4)']|[##147000]}
Write_ConfigFile(name: String; dst: Pointer)
<POP 22b64-22b66 StackAdj> Δ+8 {}
<Pointer.fp 0x22b66 <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x22b68 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 22b6e-22b70 StackAdj> Δ+4 {}
<POP 22b70-22b78 Epilogue> Σ0
@ 22b78
<LVAR -0x006 @ 4(rw)>
<POP 22b78-22d10 Body>
<POP 22b78-22b8e Prologue> Σ0 ↓
<POP 22b8e-22ba0 RegCacheLoad> Σ0 ↓
<POP 22ba0-22bc0 Naked> Σ0 ↓ →0x22bc4
<MI 22ba0 MOVE.L #0x02,0x24160> {}
<MI 22ba6 MOVE.L #0x02,0x24164> {}
<MI 22bac MOVE.L #0x01,0x24168> {}
<MI 22bb2 MOVE.L #0x01,0x2416c> {}
<MI 22bb8 TST.B 0x23e3d> {}
<MI 22bbe BEQ 0x22bc4> {}
<POP 22bc0-22bc4 Naked> Σ0 →0x22bc6
<MI 22bc0 MOVEQ.L #0x04,D6> {}
<MI 22bc2 BRA 0x22bc6> {}
<POP 22bc4-22bc6 Naked> Σ0 ↓ ←0x22ba0
<MI 22bc4 MOVEQ.L #0x09,D6> {}
<POP 22bc6-22bce Naked> Σ0 Δ-2 ↓ →0x22bd6 ←0x22bc0
<MI 22bc6 MOVE.B D6,-(A7)> Δ-2 {[2, 'D6']}
<MI 22bc8 MOVEQ.L #0x00,D7> {[2, 'D6']}
<MI 22bca CMP.B (A7),D7> {[2, 'D6']}
<MI 22bcc BGT 0x22bd6> {[2, 'D6']}
<POP 22bce-22bd6 Naked> Σ-2 ↓
<MI 22bce MOVE.B (A7),D0> {[-2-]}
<POP 0x22bd0 LimitCheck D0 ≤ 0x9> {[-2-]}
<MI 22bd0 CMP.B #0x09,D0>
<MI 22bd2 BLE 0x22bd6>
<MI 22bd4 TRAP #15>
<POP 22bd6-22bda Naked> Σ-2 ↓ →0x22c4c ←0x22bc6 ←0x22bda
<MI 22bd6 CMP.B (A7),D7> {[-2-]}
<MI 22bd8 BGT 0x22c4c> {[-2-]}
<POP 22bda-22c4c Naked> Σ-2 ↓ →0x22bd6
<MI 22bda MOVE.B D7,D0> {[-2-]}
<MI 22bdc EXTB.W D0> {[-2-]}
<MI 22bde ASL.W #0x5,D0> {[-2-]}
<MI 22be0 LEA.L 0x23e2e,A0> {[-2-]}
<Blob 0x22be6 [16] @> Δ-16 {[-2-]|[«16""»]}
<Blob 0x22bf8 [2] @> Δ-2 {[-2-]|[«16""»]|[«2""»]}
<Blob 0x22bfc [2] @> Δ-2 {[-2-]|[«16""»]|[«2""»]|[«2""»]}
<Blob 0x22c00 [2] @> Δ-2 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]}
<MI 22c04 PEA.L (A0+D0.W+#0x5b)> Δ-4 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']}
<MI 22c08 LEA.L (A0+D0.W),A0> {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']}
<MI 22c0c PEA.L (A0+0x1ed)> Δ-4 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']}
<POP 22c10-22c12 StackAdj> Δ-8 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-8-]}
<Lit 0x22c12 15> {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$Enter name for_]}
<POP 22c1e-22c20 StackAdj> Δ-6 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$Enter name for_]|[-6-]}
<MI 22c20 MOVE.B D7,(A7)> {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$Enter name for_]|[-6-]}
<Call 0x22c22 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 22c28-22c2a StackAdj> Δ+2 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$Enter name for_]|[-4-]}
<Call 0x22c2a 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 22c30-22c32 StackAdj> Δ+4 {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$Enter name for_]}
<Lit 0x22c32 6> {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$.MLOAD]}
<Call 0x22c40 0x20d06> {[-2-]|[«16""»]|[«2""»]|[«2""»]|[«2""»]|[4, '^(A0+D0.W+#0x5b)']|[4, '^(A0+0x1ed)']|[-4-]|[$$.MLOAD]}
<POP 22c44-22c48 StackAdj> Δ+38 {[-2-]}
<MI 22c48 ADDQ.B #0x1,D7> {[-2-]}
<MI 22c4a BVC 0x22bd6> {[-2-]}
<POP 22c4c-22c56 Naked> Σ-2 Δ+2 ↓ ←0x22bd6
<POP 22c4c-22c4e StackAdj> Δ+2 {}
<MI 22c4e MOVE.B #0x01,0x2415e> {}
<MI 22c54 MOVEQ.L #0x00,D7> {}
<POP 22c56-22c98 Naked> Σ0 ↓ →0x22c56 ←0x22c56
<MI 22c56 MOVE.B D7,D0> {}
<MI 22c58 EXTB.W D0> {}
<MI 22c5a ASL.W #0x5,D0> {}
<MI 22c5c LEA.L 0x23e2e,A0> {}
<Blob 0x22c62 [30] (A0+D0.W+#0x5d)> Δ-30 {[«30»]}
<POP 22c72-22c74 StackAdj> Δ-4 {[«30»]|[-4-]}
<Lit 0x22c74> {[«30»]|[$$…]}
<Pointer.sp 0x22c74 4> Δ-4
<Const 0x22c78 0x1.2> Δ-2
<Const 0x22c7a 0x1e.2> Δ-2
<Call 0x22c7c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22c7e-22c80 StackAdj> Δ+8
<MI 22c80 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«30»]}
<POP 22c82-22c84 StackAdj> Δ+30 {}
<Const 0x22c84 0x1.4> Δ-4 {[##1]}
<MI 22c88 MOVE.L (A6-0x6),-(A7)> Δ-4 {[##1]|[4, '(A6-0x6)']}
<Call 0x22c8a 0x22766> {[##1]|[4, '(A6-0x6)']}
<POP 22c8e-22c90 StackAdj> Δ+8 {}
<MI 22c90 ADDQ.B #0x1,D7> {}
<MI 22c92 CMPI.B #0x04,D7> {}
<MI 22c96 BLE 0x22c56> {}
<POP 22c98-22ca6 Naked> Σ0 ↓ →0x22cc2
<MI 22c98 CLR.B 0x2415e> {}
<MI 22c9e TST.B 0x23e3d> {}
<MI 22ca4 BNE 0x22cc2> {}
<POP 22ca6-22cc2 Naked> Σ0 ↓
<Const 0x22ca6 0x1.4> Δ-4 {[##1]}
<POP 22caa-22cac StackAdj> Δ-8 {[##1]|[-8-]}
<Const 0x22cac 0x9.2> Δ-2 {[##1]|[-8-]|[#9]}
<Call 0x22cae 0x10586> {[##1]|[-8-]|[#9]}
Config_Entry_Name(a : Byte) : String
<POP 22cb4-22cb6 StackAdj> Δ+2 {[##1]|[-8-]}
<Call 0x22cb6 0x220d8> {[##1]|[-8-]}
<POP 22cba-22cbc StackAdj> Δ+4 {[##1]|[-4-]}
<Call 0x22cbc 0x22766> {[##1]|[-4-]}
<POP 22cc0-22cc2 StackAdj> Δ+8 {}
<POP 22cc2-22d08 Naked> Σ0 ↓ ←0x22c98
<Blob 0x22cc2 [20] @> Δ-20 {[«20""»]}
<POP 22cd4-22cd6 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x22cd6 19> {[«20""»]|[$$CURRENT.M200_CONFIG]}
<MI 22ce4 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«20""»]}
<POP 22ce6-22cea StackAdj> Δ+16 {[-4-]}
<MI 22cea MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<Const 0x22cec 0x23e38.4> Δ-4 {[4, '(A6-0x6)']|[##147000]}
<Call 0x22cf2 0x10574> {[4, '(A6-0x6)']|[##147000]}
Write_ConfigFile(name: String; dst: Pointer)
<POP 22cf8-22cfa StackAdj> Δ+8 {}
<Pointer.fp 0x22cfa <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x22cfc 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 22d02-22d04 StackAdj> Δ+4 {}
<Call 0x22d04 0x224ba> {}
<POP 22d08-22d10 Epilogue> Σ0
@ 22d10
<LVAR -0x002 @>
<LVAR -0x006 @ 4(rw)>
<LVAR -0x007 @ 1(r)>
<POP 22d10-22fb8 Body>
<POP 22d10-22d26 Prologue> Σ0 ↓
<POP 22d26-22d40 RegCacheLoad> Σ0 ↓
<POP 22d40-22d5a Naked> Σ0 ↓ →0x22d5c
<POP 22d40-22d42 StackAdj> Δ-8 {[-8-]}
<Call 0x22d42 0x103c4> {[-8-]}
GetArgv() : String
<Call 0x22d48 0x102f0> {[-8-]}
ToUpper(a : String) : String
<POP 22d4e-22d50 StackAdj> Δ+4 {[-4-]}
<MI 22d50 MOVE.L (A7)+,(A6-0x6)> Δ+4 {}
<MI 22d52 MOVEQ.L #0x00,D7> {}
<MI 22d54 MOVEA.L (A6-0x6),A0> {}
<MI 22d56 TST.W (A0)> {}
<MI 22d58 BNE 0x22d5c> {}
<POP 22d5a-22d5c Naked> Σ0 ↓
<MI 22d5a ADDQ.B #0x1,D7> {}
<POP 22d5c-22d60 Naked> Σ0 ↓ →0x22dca ←0x22d40 ←0x22f40
<MI 22d5c TST.B D7> {}
<MI 22d5e BEQ 0x22dca> {}
<POP 22d60-22da6 Naked> Σ0 ↓ →0x22dca
<Pointer.fp 0x22d60 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x22d62 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 22d68-22d69 StackAdj> Δ+4 ↓ {}
<Blob 0x22d69 [50] @> Δ-50 {[«50""»]}
<POP 22d7a-22d7c StackAdj> Δ-12 {[«50""»]|[-12-]}
<Lit 0x22d7c 49> {[«50""»]|[-8-]|[$$Enter name of configuration to boot [STANDARD] :_]}
<Call 0x22d8a 0x103e4> {[«50""»]|[-8-]|[$$Enter name of configuration to boot [STANDARD] :_]}
AskConsoleString(prompt : String) : String
<POP 22d90-22d92 StackAdj> Δ+4 {[«50""»]|[-8-]}
<Call 0x22d92 0x102f0> {[«50""»]|[-8-]}
ToUpper(a : String) : String
<POP 22d98-22d9a StackAdj> Δ+4 {[«50""»]|[-4-]}
<MI 22d9a MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«50""»]}
<POP 22d9c-22da0 StackAdj> Δ+50 {}
<MI 22da0 MOVEA.L (A6-0x6),A0> {}
<MI 22da2 TST.W (A0)> {}
<MI 22da4 BNE 0x22dca> {}
<POP 22da6-22dca Naked> Σ0 ↓
<Pointer.fp 0x22da6 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x22da8 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 22dae-22daf StackAdj> Δ+4 {}
<Blob 0x22daf [4] @> Δ-4 {[«4""»]}
<Blob 0x22db2 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 22db6-22db8 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<Lit 0x22db8 8> {[«4""»]|[«4""»]|[$$STANDARD]}
<MI 22dc6 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«4""»]|[«4""»]}
<POP 22dc8-22dca StackAdj> Δ+8 {}
<POP 22dca-22e12 Naked> Σ0 Δ-16 ↓ →0x22ebc ←0x22d5c ←0x22d60
<Blob 0x22dca [4] @> Δ-4 {[«4""»]}
<Blob 0x22dce [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x22dd2 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 22dd6-22dd8 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<MI 22dd8 MOVE.L (A6-0x6),-(A7)> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6-0x6)']}
<POP 22dda-22ddc StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
<Lit 0x22ddc 12> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6-0x6)']|[$$.M200_CONFIG]}
<Call 0x22de8 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, '(A6-0x6)']|[$$.M200_CONFIG]}
StringCat2(a, b : String) : String
<POP 22dee-22df0 StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<MI 22df0 MOVEA.L (A7)+,A0> Δ+4 {[«4""»]|[«4""»]|[«4""»]}
<MI 22df2 MOVE.L A0,(A6-0x6)> {[«4""»]|[«4""»]|[«4""»]}
<MI 22df4 MOVE.L A0,-(A7)> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']}
<MI 22df6 MOVE.L A0,-(A7)> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']|[4, 'A0']}
<Const 0x22df8 0x3.4> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']|[4, 'A0']|[##3]}
<Const 0x22dfc 0x23e38.4> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']|[4, 'A0']|[##3]|[##147000]}
<Pointer.fp 0x22e02 <LVAR -0x007 @ 1(r)>> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']|[4, 'A0']|[##3]|[##147000]|[@@-7]}
<Call 0x22e04 0x1056e> {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']|[4, 'A0']|[##3]|[##147000]|[@@-7]}
Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool)
<POP 22e0a-22e0c StackAdj> Δ+16 {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']}
<MI 22e0c TST.B (A6-0x7)> {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']}
<MI 22e0e BNE 0x22ebc> {[«4""»]|[«4""»]|[«4""»]|[4, 'A0']}
<POP 22e12-22e16 Naked> Σ-16 ↓ →0x22e3e
<MI 22e12 TST.B D7> {[-16-]}
<MI 22e14 BNE 0x22e3e> {[-16-]}
<POP 22e16-22e3e Naked> Σ-16 ↓
<Blob 0x22e16 [26] @> Δ-26 {[-16-]|[«26""»]}
<Const 0x22e22 0xe.2> Δ-2 {[-16-]|[«26""»]|[#14]}
<POP 22e24-22e26 StackAdj> Δ-4 {[-16-]|[«26""»]|[#14]|[-4-]}
<Lit 0x22e26 26> {[-16-]|[«26""»]|[#14]|[$$Could not read Config file]}
<Call 0x22e34 0x103b8> {[-16-]|[«26""»]|[#14]|[$$Could not read Config file]}
PopProgram(status : Byte; msg : String)
<POP 22e3a-22e3e StackAdj> Δ+32 {[-16-]}
<POP 22e3e-22e6c Naked> Σ-16 Δ-60 ↓ →0x22eba ←0x22e12
<Blob 0x22e3e [60] @> Δ-60 {[-16-]|[«60""»]}
<POP 22e4e-22e50 StackAdj> Δ-6 {[-16-]|[«60""»]|[-6-]}
<Lit 0x22e50 59> {[-16-]|[«60""»]|[-2-]|[$$Could not read configuration file, do you want to create it]}
<POP 22e5c-22e5e StackAdj> Δ-2 {[-16-]|[«60""»]|[-2-]|[$$Could not read configuration file, do you want to create it]|[-2-]}
<MI 22e5e CLR.B (A7)> {[-16-]|[«60""»]|[-2-]|[$$Could not read configuration file, do you want to create it]|[-2-]}
<Call 0x22e60 0x103f0> {[-16-]|[«60""»]|[-2-]|[$$Could not read configuration file, do you want to create it]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 22e66-22e68 StackAdj> Δ+6 {[-16-]|[«60""»]|[-2-]}
<MI 22e68 TST.B (A7)+> Δ+2 {[-16-]|[«60""»]}
<MI 22e6a BEQ 0x22eba> {[-16-]|[«60""»]}
<POP 22e6c-22eba Naked> Σ-76 ↓
<Blob 0x22e6c [6] @> Δ-6 {[-76-]|[«6""»]}
<POP 22e7c-22e7e StackAdj> Δ-4 {[-76-]|[«6""»]|[-4-]}
<Lit 0x22e7e 5> {[-76-]|[«6""»]|[$$CEDIT]}
<MI 22e8c MOVEA.L (A7+0x46),A0> {[-76-]|[«6""»]|[$$CEDIT]}
<MI 22e90 MOVE.L A0,-(A7)> Δ-4 {[-76-]|[«6""»]|[$$CEDIT]|[4, 'A0']}
<Const 0x22e92 0x1.2> Δ-2 {[-76-]|[«6""»]|[$$CEDIT]|[4, 'A0']|[#1]}
<Pointer.fp 0x22e94 <LVAR -0x002 @>> Δ-4 {[-76-]|[«6""»]|[$$CEDIT]|[4, 'A0']|[#1]|[@@-2]}
<Call 0x22e98 0x103b0> {[-76-]|[«6""»]|[$$CEDIT]|[4, 'A0']|[#1]|[@@-2]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 22e9e-22ea0 StackAdj> Δ+20 {[-76-]}
<MI 22ea0 MOVEA.L (A7+0x3c),A0> {[-76-]}
<MI 22ea4 MOVE.L A0,-(A7)> Δ-4 {[-76-]|[4, 'A0']}
<Const 0x22ea6 0x3.4> Δ-4 {[-76-]|[4, 'A0']|[##3]}
<Const 0x22eaa 0x23e38.4> Δ-4 {[-76-]|[4, 'A0']|[##3]|[##147000]}
<Pointer.fp 0x22eb0 <LVAR -0x007 @ 1(r)>> Δ-4 {[-76-]|[4, 'A0']|[##3]|[##147000]|[@@-7]}
<Call 0x22eb2 0x1056e> {[-76-]|[4, 'A0']|[##3]|[##147000]|[@@-7]}
Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool)
<POP 22eb8-22eba StackAdj> Δ+16 {[-76-]}
<POP 22eba-22ebc Naked> Σ-76 Δ+60 ↓ ←0x22e3e
<POP 22eba-22ebc StackAdj> Δ+60 {[-16-]}
<POP 22ebc-22ec4 Naked> Σ-16 ↓ →0x22f40 ←0x22dca
<MI 22ebc TST.B 0x23e3b> {[-16-]}
<MI 22ec2 BEQ 0x22f40> {[-16-]}
<POP 22ec4-22eee Naked> Σ-16 Δ-38 ↓ →0x22f3c
<Blob 0x22ec4 [38] @> Δ-38 {[-16-]|[«38""»]}
<POP 22ed0-22ed2 StackAdj> Δ-6 {[-16-]|[«38""»]|[-6-]}
<Lit 0x22ed2 38> {[-16-]|[«38""»]|[-2-]|[$$Do you want to edit this configuration]}
<POP 22ede-22ee0 StackAdj> Δ-2 {[-16-]|[«38""»]|[-2-]|[$$Do you want to edit this configuration]|[-2-]}
<MI 22ee0 CLR.B (A7)> {[-16-]|[«38""»]|[-2-]|[$$Do you want to edit this configuration]|[-2-]}
<Call 0x22ee2 0x103f0> {[-16-]|[«38""»]|[-2-]|[$$Do you want to edit this configuration]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 22ee8-22eea StackAdj> Δ+6 {[-16-]|[«38""»]|[-2-]}
<MI 22eea TST.B (A7)+> Δ+2 {[-16-]|[«38""»]}
<MI 22eec BEQ 0x22f3c> {[-16-]|[«38""»]}
<POP 22eee-22f3c Naked> Σ-54 ↓
<Blob 0x22eee [6] @> Δ-6 {[-54-]|[«6""»]}
<POP 22efe-22f00 StackAdj> Δ-4 {[-54-]|[«6""»]|[-4-]}
<Lit 0x22f00 5> {[-54-]|[«6""»]|[$$CEDIT]}
<MI 22f0e MOVEA.L (A7+0x30),A0> {[-54-]|[«6""»]|[$$CEDIT]}
<MI 22f12 MOVE.L A0,-(A7)> Δ-4 {[-54-]|[«6""»]|[$$CEDIT]|[4, 'A0']}
<Const 0x22f14 0x1.2> Δ-2 {[-54-]|[«6""»]|[$$CEDIT]|[4, 'A0']|[#1]}
<Pointer.fp 0x22f16 <LVAR -0x002 @>> Δ-4 {[-54-]|[«6""»]|[$$CEDIT]|[4, 'A0']|[#1]|[@@-2]}
<Call 0x22f1a 0x103b0> {[-54-]|[«6""»]|[$$CEDIT]|[4, 'A0']|[#1]|[@@-2]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 22f20-22f22 StackAdj> Δ+20 {[-54-]}
<MI 22f22 MOVEA.L (A7+0x26),A0> {[-54-]}
<MI 22f26 MOVE.L A0,-(A7)> Δ-4 {[-54-]|[4, 'A0']}
<Const 0x22f28 0x3.4> Δ-4 {[-54-]|[4, 'A0']|[##3]}
<Const 0x22f2c 0x23e38.4> Δ-4 {[-54-]|[4, 'A0']|[##3]|[##147000]}
<Pointer.fp 0x22f32 <LVAR -0x007 @ 1(r)>> Δ-4 {[-54-]|[4, 'A0']|[##3]|[##147000]|[@@-7]}
<Call 0x22f34 0x1056e> {[-54-]|[4, 'A0']|[##3]|[##147000]|[@@-7]}
Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool)
<POP 22f3a-22f3c StackAdj> Δ+16 {[-54-]}
<POP 22f3c-22f40 Naked> Σ-54 Δ+38 ↓ ←0x22ec4
<POP 22f3c-22f40 StackAdj> Δ+38 {[-16-]}
<POP 22f40-22f4a Naked> Σ-16 Δ+16 ↓ →0x22d5c ←0x22ebc
<POP 22f40-22f42 StackAdj> Δ+16 {}
<MI 22f42 MOVEQ.L #0x01,D7> {}
<MI 22f44 TST.B (A6-0x7)> {}
<MI 22f46 BEQ 0x22d5c> {}
<POP 22f4a-22f82 Naked> Σ0 ↓ →0x22fb0
<Blob 0x22f4a [20] @> Δ-20 {[«20""»]}
<POP 22f56-22f58 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x22f58 20> {[«20""»]|[$$STANDARD.M200_CONFIG]}
<MI 22f64 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«20""»]}
<POP 22f66-22f68 StackAdj> Δ+16 {[-4-]}
<MI 22f68 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<Const 0x22f6a 0x3.4> Δ-4 {[4, '(A6-0x6)']|[##3]}
<Const 0x22f6e 0x23fca.4> Δ-4 {[4, '(A6-0x6)']|[##3]|[##147402]}
<Pointer.fp 0x22f74 <LVAR -0x007 @ 1(r)>> Δ-4 {[4, '(A6-0x6)']|[##3]|[##147402]|[@@-7]}
<Call 0x22f76 0x1056e> {[4, '(A6-0x6)']|[##3]|[##147402]|[@@-7]}
Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool)
<POP 22f7c-22f7e StackAdj> Δ+16 {}
<MI 22f7e TST.B (A6-0x7)> {}
<MI 22f80 BNE 0x22fb0> {}
<POP 22f82-22fb0 Naked> Σ0 ↓
<Blob 0x22f82 [36] @> Δ-36 {[«36""»]}
<Const 0x22f94 0xe.2> Δ-2 {[«36""»]|[#14]}
<POP 22f96-22f98 StackAdj> Δ-4 {[«36""»]|[#14]|[-4-]}
<Lit 0x22f98 35> {[«36""»]|[#14]|[$$Could not read STANDARD.M200_CONFIG]}
<Call 0x22fa6 0x103b8> {[«36""»]|[#14]|[$$Could not read STANDARD.M200_CONFIG]}
PopProgram(status : Byte; msg : String)
<POP 22fac-22fb0 StackAdj> Δ+42 {}
<POP 22fb0-22fb8 Epilogue> Σ0 ←0x22f4a
@ 22fb8
<LVAR -0x004 @>
<POP 22fb8-23050 Body>
<POP 22fb8-22fce Prologue> Σ0 ↓
<POP 22fce-22fd2 RegCacheLoad> Σ0 ↓
<POP 22fd2-22fda Naked> Σ0 ↓ →0x23048
<MI 22fd2 TST.B 0x23e3a> {}
<MI 22fd8 BEQ 0x23048> {}
<POP 22fda-2300c Naked> Σ0 Δ-10 ↓ →0x23046
<Blob 0x22fda [10] @> Δ-10 {[«10""»]}
<POP 22fea-22fec StackAdj> Δ-6 {[«10""»]|[-6-]}
<Lit 0x22fec 9> {[«10""»]|[-2-]|[$$Enter CLI]}
<POP 22ffc-22ffe StackAdj> Δ-2 {[«10""»]|[-2-]|[$$Enter CLI]|[-2-]}
<MI 22ffe CLR.B (A7)> {[«10""»]|[-2-]|[$$Enter CLI]|[-2-]}
<Call 0x23000 0x103f0> {[«10""»]|[-2-]|[$$Enter CLI]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 23006-23008 StackAdj> Δ+6 {[«10""»]|[-2-]}
<MI 23008 TST.B (A7)+> Δ+2 {[«10""»]}
<MI 2300a BEQ 0x23046> {[«10""»]}
<POP 2300c-23046 Naked> Σ-10 ↓
<POP 2300c-2300e StackAdj> Δ-4 {[-14-]}
<POP 2300e-2300f StackAdj> Δ+2 {[-12-]}
<Blob 0x2300f [2] @> Δ-2 {[-12-]|[«2""»]}
<MI 23012 MOVE.B 0x2055d,(A7+0x1)> {[-12-]|[«2""»]}
<MI 23018 MOVE.B 0x2055e,(A7+0x2)> {[-12-]|[«2""»]}
<POP 2301e-23020 StackAdj> Δ-4 {[-12-]|[«2""»]|[-4-]}
<Lit 0x23020> {[-12-]|[«2""»]|[$$…]}
<Pointer.sp 0x23020 4> Δ-4
<Const 0x23024 0x1.2> Δ-2
<Const 0x23026 0x3.2> Δ-2
<Call 0x2302a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23030-23032 StackAdj> Δ+8
<Const 0x23032 0x1.4> Δ-4 {[-12-]|[«2""»]|[$$…]|[##1]}
<Const 0x23036 0x1.2> Δ-2 {[-12-]|[«2""»]|[$$…]|[##1]|[#1]}
<Pointer.fp 0x23038 <LVAR -0x004 @>> Δ-4 {[-12-]|[«2""»]|[$$…]|[##1]|[#1]|[@@-4]}
<Call 0x2303c 0x103b0> {[-12-]|[«2""»]|[$$…]|[##1]|[#1]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 23042-23046 StackAdj> Δ+18 {[-10-]}
<POP 23046-23048 Naked> Σ-10 Δ+10 ↓ ←0x22fda
<POP 23046-23048 StackAdj> Δ+10 {}
<POP 23048-23050 Epilogue> Σ0 ←0x22fd2
@ 23050
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 @>
<LVAR -0x00a @>
<LVAR -0x00c @ 2(r)>
<LVAR -0x010 @>
<POP 23050-230de Body>
<POP 23050-23066 Prologue> Σ0 ↓
<POP 23066-23072 RegCacheLoad> Σ0 ↓
<POP 23072-230d6 Naked> Σ0 ↓
<Const 0x23072 0x400.4> Δ-4 {[##1024]}
<MI 23076 LEA.L (A6-0x10),A0> {[##1024]}
<MI 2307a MOVE.L A0,-(A7)> Δ-4 {[##1024]|[4, 'A0']}
<Const 0x2307c 0x4.2> Δ-2 {[##1024]|[4, 'A0']|[#4]}
<Call 0x2307e 0x10238> {[##1024]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 23080-23082 StackAdj> Δ+10 {}
<Const 0x23082 0x404.4> Δ-4 {[##1028]}
<MI 23086 LEA.L (A6-0xc),A0> {[##1028]}
<MI 2308a MOVE.L A0,-(A7)> Δ-4 {[##1028]|[4, 'A0']}
<Const 0x2308c 0x2.2> Δ-2 {[##1028]|[4, 'A0']|[#2]}
<Call 0x2308e 0x10238> {[##1028]|[4, 'A0']|[#2]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 23090-23092 StackAdj> Δ+10 {}
<Const 0x23092 0x406.4> Δ-4 {[##1030]}
<MI 23096 LEA.L (A6-0xa),A0> {[##1030]}
<MI 2309a MOVE.L A0,-(A7)> Δ-4 {[##1030]|[4, 'A0']}
<Const 0x2309c 0x2.2> Δ-2 {[##1030]|[4, 'A0']|[#2]}
<Call 0x2309e 0x10238> {[##1030]|[4, 'A0']|[#2]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 230a0-230a2 StackAdj> Δ+10 {}
<Const 0x230a2 0x408.4> Δ-4 {[##1032]}
<MI 230a6 LEA.L (A6-0x8),A0> {[##1032]}
<MI 230aa MOVE.L A0,-(A7)> Δ-4 {[##1032]|[4, 'A0']}
<Const 0x230ac 0x4.2> Δ-2 {[##1032]|[4, 'A0']|[#4]}
<Call 0x230ae 0x10238> {[##1032]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 230b0-230b2 StackAdj> Δ+10 {}
<Const 0x230b2 0x40c.4> Δ-4 {[##1036]}
<MI 230b6 LEA.L (A6-0x4),A0> {[##1036]}
<MI 230ba MOVE.L A0,-(A7)> Δ-4 {[##1036]|[4, 'A0']}
<Const 0x230bc 0x4.2> Δ-2 {[##1036]|[4, 'A0']|[#4]}
<Call 0x230be 0x10238> {[##1036]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 230c0-230c2 StackAdj> Δ+10 {}
<MI 230c2 MOVEQ.L #0x00,D0> {}
<MI 230c4 MULU.W (A6-0xc),D0> {}
<MI 230c8 CLR.L D1> {}
<MI 230ca MOVE.W D0,D1> {}
<MI 230cc ADD.L (A6-0x4),D1> {}
<MI 230d0 MOVE.L D1,0x24174> {}
<POP 230d6-230de Epilogue> Σ0
@ 230de
<LVAR -0x00e 4(r)>
<LVAR -0x012 4(r)>
<LVAR -0x016 @ 4(r)>
<LVAR -0x01a @ 4(r)>
<LVAR -0x01c @ 1(r)>
<POP 230de-231ce Body>
<POP 230de-230f4 Prologue> Σ0 ↓
<POP 230f4-2310a RegCacheLoad> Σ0 ↓
<POP 2310a-2314a Naked> Σ0 ↓ →0x23180
<Blob 0x2310a [12] @> Δ-12 {[«12""»]}
<POP 2311c-2311e StackAdj> Δ-4 {[«12""»]|[-4-]}
<Lit 0x2311e 11> {[«12""»]|[$$BOOT_REASON]}
<POP 2312e-23130 StackAdj> Δ-2 {[«12""»]|[$$BOOT_REASON]|[-2-]}
<MI 23130 CLR.B (A7)> {[«12""»]|[$$BOOT_REASON]|[-2-]}
<MI 23132 CLR.B -(A7)> Δ-2 {[«12""»]|[$$BOOT_REASON]|[-2-]|[#0]}
<Const 0x23134 0x0.4> Δ-4 {[«12""»]|[$$BOOT_REASON]|[-2-]|[#0]|[##0]}
<Pointer.fp 0x23138 <LVAR -0x01c @ 1(r)>> Δ-4 {[«12""»]|[$$BOOT_REASON]|[-2-]|[#0]|[##0]|[@@-28]}
<Pointer.fp 0x2313a <LVAR -0x01a @ 4(r)>> Δ-4 {[«12""»]|[$$BOOT_REASON]|[-2-]|[#0]|[##0]|[@@-28]|[@@-26]}
<Call 0x2313c 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 23142-23146 StackAdj> Δ+32 {}
<MI 23146 TST.B (A6-0x1c)> {}
<MI 23148 BEQ 0x23180> {}
<POP 2314a-23154 Naked> Σ0 ↓
<MI 2314a CLR.W 0x241f8> {}
<MI 2314c CLR.W 0x241fa> {}
<MI 23152 MOVEQ.L #0x00,D7> {}
<POP 23154-2316a Naked> Σ0 ↓ →0x23154 ←0x23154
<POP 0x23154 LimitCheck 0x0 ≤ D7 ≤ 0x3> {}
<MI 2315a MOVE.L D7,D0> {}
<MI 2315c ASL.L #0x1,D0> {}
<MI 2315e LEA.L 0x241f8,A0> {}
<MI 23160 CLR.W (A0+D0.L+#0x4)> {}
<MI 23164 ADDQ.L #0x1,D7> {}
<MI 23166 CMP.L #0x03,D7> {}
<MI 23168 BLE 0x23154> {}
<POP 2316a-23180 Naked> Σ0 →0x231c6
<Const 0x2316a 0x2.2> Δ-2 {[#2]}
<MI 2316c CLR.B -(A7)> Δ-2 {[#2]|[#0]}
<Const 0x2316e 0x1.4> Δ-4 {[#2]|[#0]|[##1]}
<Pointer.fp 0x23172 <LVAR -0x01c @ 1(r)>> Δ-4 {[#2]|[#0]|[##1]|[@@-28]}
<Pointer.fp 0x23174 <LVAR -0x01a @ 4(r)>> Δ-4 {[#2]|[#0]|[##1]|[@@-28]|[@@-26]}
<Call 0x23176 0x1038c> {[#2]|[#0]|[##1]|[@@-28]|[@@-26]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 2317c-2317e StackAdj> Δ+16 {}
<MI 2317e BRA 0x231c6> {}
<POP 23180-231c6 Naked> Σ0 ↓ ←0x2310a
<MI 23180 MOVE.L (A6-0x1a),-(A7)> Δ-4 {[4, '(A6-0x1a)']}
<MI 23182 CLR.W -(A7)> Δ-2 {[4, '(A6-0x1a)']|[#0]}
<MI 23184 CLR.W -(A7)> Δ-2 {[4, '(A6-0x1a)']|[#0]|[#0]}
<Const 0x23186 0x8.2> Δ-2 {[4, '(A6-0x1a)']|[#0]|[#0]|[#8]}
<Const 0x2318a 0x1.2> Δ-2 {[4, '(A6-0x1a)']|[#0]|[#0]|[#8]|[#1]}
<MI 2318c LEA.L (A6-0x16),A0> {[4, '(A6-0x1a)']|[#0]|[#0]|[#8]|[#1]}
<MI 23190 MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x1a)']|[#0]|[#0]|[#8]|[#1]|[4, 'A0']}
<Pointer.fp 0x23192 <LVAR -0x01c @ 1(r)>> Δ-4 {[4, '(A6-0x1a)']|[#0]|[#0]|[#8]|[#1]|[4, 'A0']|[@@-28]}
<Call 0x23194 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 2319a-2319e StackAdj> Δ+18 {[-2-]}
<POP 2319e-2319f StackAdj> Δ+2 {}
<Const 0x2319f 0x2.2> Δ-2 {[#2]}
<Const 0x231a0 0x1.2> Δ-2 {[#2]|[#1]}
<Const 0x231a2 0x1.4> Δ-4 {[#2]|[#1]|[##1]}
<Pointer.fp 0x231a6 <LVAR -0x01c @ 1(r)>> Δ-4 {[#2]|[#1]|[##1]|[@@-28]}
<Pointer.fp 0x231a8 <LVAR -0x01a @ 4(r)>> Δ-4 {[#2]|[#1]|[##1]|[@@-28]|[@@-26]}
<Call 0x231aa 0x1038c> {[#2]|[#1]|[##1]|[@@-28]|[@@-26]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 231b0-231b2 StackAdj> Δ+16 {}
<MI 231b2 MOVE.L (A6-0x16),0x241f8> {}
<MI 231b6 MOVE.L (A6-0x12),0x241fc> {}
<MI 231be MOVE.L (A6-0xe),0x24200> {}
<POP 231c6-231ce Epilogue> Σ0 ←0x2316a
@ 231ce
START
<POP 231ce--0001 Body>
<POP 231ce-231d8 Prologue> Σ0
<POP 231d8-231de RegCacheLoad> Σ0 ↓
<POP 231de-23286 Naked> Σ0 ↓
<Call 0x231de 0x10398> {}
FSCALL_10398
<MI 231e4 CLR.B 0x24205> {}
<Const 0x231e6 0x23e36.4> Δ-4 {[##146998]}
<Call 0x231ec 0x105aa> {[##146998]}
Read_fc00() : Byte
<POP 231f2-231f4 StackAdj> Δ+4 {}
<Call 0x231f4 0x230de> {}
<Call 0x231f8 0x23050> {}
<Call 0x231fc 0x22d10> {}
<Call 0x23200 0x22fb8> {}
<Call 0x23204 0x20898> {}
<Const 0x23208 0x0.4> Δ-4 {[##0]}
<Call 0x2320c 0x104d8> {[##0]}
ExpInit(a : Long)
<POP 23212-23214 StackAdj> Δ+4 {}
<Call 0x23214 0x20918> {}
<Call 0x23218 0x20b6c> {}
<Const 0x2321c 0x24205.4> Δ-4 {[##147973]}
<Call 0x2321e 0x20bf0> {[##147973]}
<POP 23222-23224 StackAdj> Δ+2 {[-2-]}
<POP 23224-23225 StackAdj> Δ+2 {}
<Blob 0x23225 [2] 0x24205> Δ-2 {[«2»]}
<Call 0x23226 0x20eb0> {[«2»]}
<POP 2322a-2322c StackAdj> Δ+2 {}
<Call 0x2322c 0x210c8> {}
<Call 0x23230 0x22b78> {}
<Call 0x23234 0x10222> {}
KC11_Live(void)
<Blob 0x2323a [8] @> Δ-8 {[«8""»]}
<POP 2324a-2324c StackAdj> Δ-4 {[«8""»]|[-4-]}
<Lit 0x2324c 7> {[«8""»]|[$$MONITOR]}
<Const 0x23260 0x1.4> Δ-4 {[«8""»]|[$$MONITOR]|[##1]}
<Const 0x23264 0x2.2> Δ-2 {[«8""»]|[$$MONITOR]|[##1]|[#2]}
<Const 0x23268 0x24204.4> Δ-4 {[«8""»]|[$$MONITOR]|[##1]|[#2]|[##147972]}
<Call 0x2326e 0x103b0> {[«8""»]|[$$MONITOR]|[##1]|[#2]|[##147972]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 23274-23278 StackAdj> Δ+20 {[-2-]}
<MI 23278 CLR.B (A7)> {[-2-]}
<Const 0x2327a 0x1.4> Δ-4 {[-2-]|[##1]}
<Call 0x2327e 0x103b8> {[-2-]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 23284-23286 StackAdj> Δ+6 {}
<POP 23286-2328c Naked> Σ0
<Call 0x23286 0x10284> {}
?exit
@ 236aa
<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 236aa-2379e Body> Δ+20
<POP 236aa-236c0 Prologue> Σ0 ↓
<POP 236c0-236d0 RegCacheLoad> Σ0 ↓
<POP 236d0-236dc Naked> Σ0 ↓ →0x236ea
<POP 236d0-236d2 StackAdj> Δ-2 {[-2-]}
<Call 0x236d2 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 236d8 TST.B (A7)+> Δ+2 {}
<MI 236da BEQ 0x236ea> {}
<POP 236dc-236ea Naked> Σ0 Δ-20 →0x236f6
<Blob 0x236dc [20] @> Δ-20 {[«20""»]}
<MI 236e8 BRA 0x236f6> {[«20""»]}
<POP 236ea-236f6 Naked> Σ0 Δ-20 ↓ ←0x236d0
<Blob 0x236ea [20] @> Δ-20 {[«20""»]}
<POP 236f6-23796 Naked> Σ-20 Δ+20 ↓ ←0x236dc
<POP 236f6-236f8 StackAdj> Δ-4 {[-24-]}
<Lit 0x236f8> {[-20-]|[$$…]}
<Pointer.sp 0x236f8 4> Δ-4
<Const 0x236fc 0x1.2> Δ-2
<Const 0x23700 0x14.2> Δ-2
<Call 0x23704 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2370a-2370c StackAdj> Δ+8
<Pointer.fp 0x2370c <LVAR -0x006 @ 4(r)>> Δ-4 {[-20-]|[$$…]|[@@-6]}
<Call 0x2370e 0x10460> {[-20-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 23714-23718 StackAdj> Δ+28 {}
<MI 23718 CLR.B -(A7)> Δ-2 {[#0]}
<MI 2371a MOVE.B (A6+0x20),-(A7)> Δ-2 {[#0]|[2, '(A6+0x20)']}
<MI 2371e MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x20)']|[4, '(A6-0x6)']}
<Call 0x23720 0x104ba> {[#0]|[2, '(A6+0x20)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 23726-23728 StackAdj> Δ+4 {[#0]|[2, '(A6+0x20)']}
<MI 23728 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<MI 2372a MOVEA.L (A6+0x1c),A0> {[4, '(A6-0x6)']}
<MI 2372e PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']}
<Const 0x23730 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
<Const 0x23732 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
<Call 0x23734 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 23736-23738 StackAdj> Δ+12 {[4, '(A6-0x6)']}
<MI 23738 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<MI 2373a MOVEA.L (A6+0x18),A0> {[4, '(A6-0x6)']}
<MI 2373e PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']}
<Const 0x23740 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
<Const 0x23742 0x1.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
<Call 0x23746 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 23748-2374a StackAdj> Δ+12 {[4, '(A6-0x6)']}
<MI 2374a MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<MI 2374c MOVEA.L (A6+0x14),A0> {[4, '(A6-0x6)']}
<MI 23750 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']}
<Const 0x23752 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
<Const 0x23754 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
<Call 0x23756 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 23758-2375a StackAdj> Δ+12 {[4, '(A6-0x6)']}
<MI 2375a MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<MI 2375c MOVEA.L (A6+0x10),A0> {[4, '(A6-0x6)']}
<MI 23760 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']}
<Const 0x23762 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
<Const 0x23764 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
<Call 0x23766 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 23768-2376a StackAdj> Δ+12 {[4, '(A6-0x6)']}
<MI 2376a MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<MI 2376c MOVEA.L (A6+0xc),A0> {[4, '(A6-0x6)']}
<MI 23770 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']}
<Const 0x23772 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]}
<Const 0x23774 0x1.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
<Call 0x23778 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]}
ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L)
<POP 2377a-2377c StackAdj> Δ+12 {[4, '(A6-0x6)']}
<MI 2377c MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<MI 2377e MOVEA.L (A6+0x8),A0> {[4, '(A6-0x6)']}
<MI 23782 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']}
<Call 0x23784 0x10478> {[4, '(A6-0x6)']|[4, '^(A0)']}
ExpOutputFlag(exp : Pointer; VAR status : Bool)
<POP 2378a-2378c StackAdj> Δ+8 {}
<Pointer.fp 0x2378c <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x2378e 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 23794-23796 StackAdj> Δ+4 {}
<POP 23796-2379e Epilogue> Σ0
@ 237b6
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 4(r)>
<POP 237b6-23860 Body> Δ+12
<POP 237b6-237cc Prologue> Σ0 ↓
<POP 237cc-237d2 RegCacheLoad> Σ0 ↓
<POP 237d2-237de Naked> Σ0 ↓ →0x237f0
<POP 237d2-237d4 StackAdj> Δ-2 {[-2-]}
<Call 0x237d4 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 237da TST.B (A7)+> Δ+2 {}
<MI 237dc BEQ 0x237f0> {}
<POP 237de-237f0 Naked> Σ0 Δ-12 →0x23800
<Blob 0x237de [12] @> Δ-12 {[«12""»]}
<MI 237ee BRA 0x23800> {[«12""»]}
<POP 237f0-23800 Naked> Σ0 Δ-12 ↓ ←0x237d2
<Blob 0x237f0 [12] @> Δ-12 {[«12""»]}
<POP 23800-23858 Naked> Σ-12 Δ+12 ↓ ←0x237de
<POP 23800-23802 StackAdj> Δ-4 {[-16-]}
<Lit 0x23802> {[-12-]|[$$…]}
<Pointer.sp 0x23802 4> Δ-4
<Const 0x23806 0x1.2> Δ-2
<Const 0x2380a 0xb.2> Δ-2
<Call 0x2380e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23814-23816 StackAdj> Δ+8
<Pointer.fp 0x23816 <LVAR -0x004 @ 4(r)>> Δ-4 {[-12-]|[$$…]|[@@-4]}
<Call 0x23818 0x10460> {[-12-]|[$$…]|[@@-4]}
ExpLoad(a : String; b: Pointer)
<POP 2381e-23822 StackAdj> Δ+20 {}
<MI 23822 MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<MI 23826 MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']}
<Pointer.sp 0x23828 4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]}
<Const 0x2382c 0x0.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]}
<Const 0x23830 0x0.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
<Call 0x23834 0x10466> {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 2383a-2383e StackAdj> Δ+16 {[2, '(A6+0x8)']}
<MI 2383e CLR.B (A7)> {[2, '(A6+0x8)']}
<MI 23840 MOVE.B (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0x8)']|[2, '(A6+0xa)']}
<MI 23844 MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[2, '(A6+0xa)']|[4, '(A6-0x4)']}
<Call 0x23846 0x104ba> {[2, '(A6+0x8)']|[2, '(A6+0xa)']|[4, '(A6-0x4)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 2384c-2384e StackAdj> Δ+8 {}
<Pointer.fp 0x2384e <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x23850 0x10496> {[@@-4]}
ExpClose(exp : Pointer)
<POP 23856-23858 StackAdj> Δ+4 {}
<POP 23858-23860 Epilogue> Σ0
@ 2387c
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 2387c-2390a Body> Δ+14
<POP 2387c-23892 Prologue> Σ0 ↓
<POP 23892-23898 RegCacheLoad> Σ0 ↓
<POP 23898-238a4 Naked> Σ0 ↓ →0x238b6
<POP 23898-2389a StackAdj> Δ-2 {[-2-]}
<Call 0x2389a 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 238a0 TST.B (A7)+> Δ+2 {}
<MI 238a2 BEQ 0x238b6> {}
<POP 238a4-238b6 Naked> Σ0 Δ-14 →0x238c6
<Blob 0x238a4 [14] @> Δ-14 {[«14""»]}
<MI 238b4 BRA 0x238c6> {[«14""»]}
<POP 238b6-238c6 Naked> Σ0 Δ-14 ↓ ←0x23898
<Blob 0x238b6 [14] @> Δ-14 {[«14""»]}
<POP 238c6-23902 Naked> Σ-14 Δ+14 ↓ ←0x238a4
<POP 238c6-238c8 StackAdj> Δ-4 {[-18-]}
<Lit 0x238c8> {[-14-]|[$$…]}
<Pointer.sp 0x238c8 4> Δ-4
<Const 0x238cc 0x1.2> Δ-2
<Const 0x238d0 0xd.2> Δ-2
<Call 0x238d4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 238da-238dc StackAdj> Δ+8
<Pointer.fp 0x238dc <LVAR -0x006 @ 4(r)>> Δ-4 {[-14-]|[$$…]|[@@-6]}
<Call 0x238de 0x10460> {[-14-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 238e4-238e8 StackAdj> Δ+22 {}
<MI 238e8 CLR.B -(A7)> Δ-2 {[#0]}
<MI 238ea MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 238ee MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x238f0 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 238f6-238f8 StackAdj> Δ+8 {}
<Pointer.fp 0x238f8 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x238fa 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 23900-23902 StackAdj> Δ+4 {}
<POP 23902-2390a Epilogue> Σ0
@ 2392a
<LVAR 0x00e 1(r)>
<LVAR 0x00c 1(r)>
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 4(r)>
<POP 2392a-239ee Body> Δ+16
<POP 2392a-23940 Prologue> Σ0 ↓
<POP 23940-23946 RegCacheLoad> Σ0 ↓
<POP 23946-23952 Naked> Σ0 ↓ →0x23964
<POP 23946-23948 StackAdj> Δ-2 {[-2-]}
<Call 0x23948 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2394e TST.B (A7)+> Δ+2 {}
<MI 23950 BEQ 0x23964> {}
<POP 23952-23964 Naked> Σ0 Δ-16 →0x23974
<Blob 0x23952 [16] @> Δ-16 {[«16""»]}
<MI 23962 BRA 0x23974> {[«16""»]}
<POP 23964-23974 Naked> Σ0 Δ-16 ↓ ←0x23946
<Blob 0x23964 [16] @> Δ-16 {[«16""»]}
<POP 23974-239e6 Naked> Σ-16 Δ+16 ↓ ←0x23952
<POP 23974-23976 StackAdj> Δ-4 {[-20-]}
<Lit 0x23976> {[-16-]|[$$…]}
<Pointer.sp 0x23976 4> Δ-4
<Const 0x2397a 0x1.2> Δ-2
<Const 0x2397e 0xf.2> Δ-2
<Call 0x23982 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23988-2398a StackAdj> Δ+8
<Pointer.fp 0x2398a <LVAR -0x004 @ 4(r)>> Δ-4 {[-16-]|[$$…]|[@@-4]}
<Call 0x2398c 0x10460> {[-16-]|[$$…]|[@@-4]}
ExpLoad(a : String; b: Pointer)
<POP 23992-23996 StackAdj> Δ+24 {}
<MI 23996 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 23998 MOVE.B (A6+0xc),-(A7)> Δ-2 {[4, '(A6-0x4)']|[2, '(A6+0xc)']}
<Call 0x2399c 0x1046c> {[4, '(A6-0x4)']|[2, '(A6+0xc)']}
ExpInputFlag(exp : Pointer; val : Word)
<POP 239a2-239a4 StackAdj> Δ+2 {[4, '(A6-0x4)']}
<MI 239a4 MOVE.L (A6-0x4),(A7)> {[4, '(A6-0x4)']}
<MI 239a6 MOVE.B (A6+0xa),-(A7)> Δ-2 {[4, '(A6-0x4)']|[2, '(A6+0xa)']}
<Call 0x239aa 0x1046c> {[4, '(A6-0x4)']|[2, '(A6+0xa)']}
ExpInputFlag(exp : Pointer; val : Word)
<POP 239b0-239b2 StackAdj> Δ+4 {[-2-]}
<MI 239b2 MOVE.B (A6+0x8),(A7)> {[-2-]}
<MI 239b6 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x4)']}
<Pointer.sp 0x239b8 4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]}
<Const 0x239bc 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]}
<Const 0x239c0 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
<Call 0x239c4 0x10466> {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 239ca-239cc StackAdj> Δ+16 {[-2-]}
<MI 239cc CLR.B (A7)> {[-2-]}
<MI 239ce MOVE.B (A6+0xe),-(A7)> Δ-2 {[-2-]|[2, '(A6+0xe)']}
<MI 239d2 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[2, '(A6+0xe)']|[4, '(A6-0x4)']}
<Call 0x239d4 0x104ba> {[-2-]|[2, '(A6+0xe)']|[4, '(A6-0x4)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 239da-239dc StackAdj> Δ+8 {}
<Pointer.fp 0x239dc <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x239de 0x10496> {[@@-4]}
ExpClose(exp : Pointer)
<POP 239e4-239e6 StackAdj> Δ+4 {}
<POP 239e6-239ee Epilogue> Σ0
@ 23a12
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 23a12-23a96 Body> Δ+18
<POP 23a12-23a28 Prologue> Σ0 ↓
<POP 23a28-23a2c RegCacheLoad> Σ0 ↓
<POP 23a2c-23a38 Naked> Σ0 ↓ →0x23a46
<POP 23a2c-23a2e StackAdj> Δ-2 {[-2-]}
<Call 0x23a2e 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 23a34 TST.B (A7)+> Δ+2 {}
<MI 23a36 BEQ 0x23a46> {}
<POP 23a38-23a46 Naked> Σ0 Δ-18 →0x23a52
<Blob 0x23a38 [18] @> Δ-18 {[«18""»]}
<MI 23a44 BRA 0x23a52> {[«18""»]}
<POP 23a46-23a52 Naked> Σ0 Δ-18 ↓ ←0x23a2c
<Blob 0x23a46 [18] @> Δ-18 {[«18""»]}
<POP 23a52-23a8e Naked> Σ-18 Δ+18 ↓ ←0x23a38
<POP 23a52-23a54 StackAdj> Δ-4 {[-22-]}
<Lit 0x23a54> {[-18-]|[$$…]}
<Pointer.sp 0x23a54 4> Δ-4
<Const 0x23a58 0x1.2> Δ-2
<Const 0x23a5c 0x12.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 {[-18-]|[$$…]|[@@-6]}
<Call 0x23a6a 0x10460> {[-18-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 23a70-23a74 StackAdj> Δ+26 {}
<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
@ 23ac6
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 23ac6-23b54 Body> Δ+24
<POP 23ac6-23adc Prologue> Σ0 ↓
<POP 23adc-23ae2 RegCacheLoad> Σ0 ↓
<POP 23ae2-23aee Naked> Σ0 ↓ →0x23b00
<POP 23ae2-23ae4 StackAdj> Δ-2 {[-2-]}
<Call 0x23ae4 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 23aea TST.B (A7)+> Δ+2 {}
<MI 23aec BEQ 0x23b00> {}
<POP 23aee-23b00 Naked> Σ0 Δ-24 →0x23b10
<Blob 0x23aee [24] @> Δ-24 {[«24""»]}
<MI 23afe BRA 0x23b10> {[«24""»]}
<POP 23b00-23b10 Naked> Σ0 Δ-24 ↓ ←0x23ae2
<Blob 0x23b00 [24] @> Δ-24 {[«24""»]}
<POP 23b10-23b4c Naked> Σ-24 Δ+24 ↓ ←0x23aee
<POP 23b10-23b12 StackAdj> Δ-4 {[-28-]}
<Lit 0x23b12> {[-24-]|[$$…]}
<Pointer.sp 0x23b12 4> Δ-4
<Const 0x23b16 0x1.2> Δ-2
<Const 0x23b1a 0x17.2> Δ-2
<Call 0x23b1e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23b24-23b26 StackAdj> Δ+8
<Pointer.fp 0x23b26 <LVAR -0x006 @ 4(r)>> Δ-4 {[-24-]|[$$…]|[@@-6]}
<Call 0x23b28 0x10460> {[-24-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 23b2e-23b32 StackAdj> Δ+32 {}
<MI 23b32 CLR.B -(A7)> Δ-2 {[#0]}
<MI 23b34 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 23b38 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x23b3a 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 23b40-23b42 StackAdj> Δ+8 {}
<Pointer.fp 0x23b42 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x23b44 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 23b4a-23b4c StackAdj> Δ+4 {}
<POP 23b4c-23b54 Epilogue> Σ0
@ 23b70
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 23b70-23bf4 Body> Δ+14
<POP 23b70-23b86 Prologue> Σ0 ↓
<POP 23b86-23b8a RegCacheLoad> Σ0 ↓
<POP 23b8a-23b96 Naked> Σ0 ↓ →0x23ba4
<POP 23b8a-23b8c StackAdj> Δ-2 {[-2-]}
<Call 0x23b8c 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 23b92 TST.B (A7)+> Δ+2 {}
<MI 23b94 BEQ 0x23ba4> {}
<POP 23b96-23ba4 Naked> Σ0 Δ-14 →0x23bb0
<Blob 0x23b96 [14] @> Δ-14 {[«14""»]}
<MI 23ba2 BRA 0x23bb0> {[«14""»]}
<POP 23ba4-23bb0 Naked> Σ0 Δ-14 ↓ ←0x23b8a
<Blob 0x23ba4 [14] @> Δ-14 {[«14""»]}
<POP 23bb0-23bec Naked> Σ-14 Δ+14 ↓ ←0x23b96
<POP 23bb0-23bb2 StackAdj> Δ-4 {[-18-]}
<Lit 0x23bb2> {[-14-]|[$$…]}
<Pointer.sp 0x23bb2 4> Δ-4
<Const 0x23bb6 0x1.2> Δ-2
<Const 0x23bba 0xe.2> Δ-2
<Call 0x23bbe 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23bc4-23bc6 StackAdj> Δ+8
<Pointer.fp 0x23bc6 <LVAR -0x006 @ 4(r)>> Δ-4 {[-14-]|[$$…]|[@@-6]}
<Call 0x23bc8 0x10460> {[-14-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 23bce-23bd2 StackAdj> Δ+22 {}
<MI 23bd2 CLR.B -(A7)> Δ-2 {[#0]}
<MI 23bd4 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 23bd8 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x23bda 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 23be0-23be2 StackAdj> Δ+8 {}
<Pointer.fp 0x23be2 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x23be4 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 23bea-23bec StackAdj> Δ+4 {}
<POP 23bec-23bf4 Epilogue> Σ0
@ 23c36
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 23c36-23c9e Body>
<POP 23c36-23c4c Prologue> Σ0 ↓
<POP 23c4c-23c96 Naked> Σ0 ↓
<Blob 0x23c4c [14] @> Δ-14 {[«14""»]}
<Const 0x23c58 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 23c5c-23c5e StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x23c5e 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 23c70-23c72 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 23c72 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 23c76 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 23c78 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 23c7a MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x23c7c 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 23c82-23c84 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x23c84 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 23c8a-23c8c StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x23c8c 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 23c92-23c96 StackAdj> Δ+20 {}
<POP 23c96-23c9e Epilogue> Σ0
@ 23cf2
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 23cf2-23e2e Body>
<POP 23cf2-23d08 Prologue> Σ0 ↓
<POP 23d08-23d1e RegCacheLoad> Σ0 ↓
<POP 23d1e-23d7e Naked> Σ0 ↓ →0x23dc6
<Call 0x23d1e 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x23d24 [18] @> Δ-18 {[«18""»]}
<POP 23d30-23d32 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x23d32 18> {[«18""»]|[$$Experiment error :]}
<Call 0x23d3e 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 23d40-23d41 StackAdj> Δ+22 ↓ {}
<Blob 0x23d41 [14] @> Δ-14 {[«14""»]}
<POP 23d50-23d52 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x23d52 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 23d5c-23d5e StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 23d5e MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x23d62 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 23d68-23d6a StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x23d6a 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 23d70-23d72 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x23d72 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23d74-23d76 StackAdj> Δ+18 {}
<MI 23d76 MOVEA.L (A6+0xa),A0> {}
<MI 23d7a CMPA.W #0x01,A0> {}
<MI 23d7c BEQ 0x23dc6> {}
<POP 23d7e-23dc6 Naked> Σ0 ↓
<Blob 0x23d7e [14] @> Δ-14 {[«14""»]}
<Blob 0x23d8e [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 23d9e-23da0 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x23da0 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 23daa-23dac StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x23dac> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x23dac 12> Δ-4
<Const 0x23db0 0x1.2> Δ-2
<Const 0x23db2 0x1e.2> Δ-2
<Call 0x23db4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23db6-23db8 StackAdj> Δ+8
<Call 0x23db8 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 23dbe-23dc0 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x23dc0 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23dc2-23dc6 StackAdj> Δ+48 {}
<POP 23dc6-23e26 Naked> Σ0 ↓ ←0x23d1e
<Blob 0x23dc6 [14] @> Δ-14 {[«14""»]}
<POP 23dd6-23dd8 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x23dd8 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 23de2-23de4 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 23de4 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x23de8 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 23dee-23df0 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x23df0 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 23df6-23df8 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x23df8 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23dfa-23dfb StackAdj> Δ+18 ↓ {}
<Blob 0x23dfb [24] @> Δ-24 {[«24""»]}
<Const 0x23e0a 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 23e0e-23e10 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x23e10 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x23e1e 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 23e24-23e26 StackAdj> Δ+30 {}
<POP 23e26-23e2e Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.de4d0afa4317a3fb 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 31 ce | 1 | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 42 4e | BN | .PTR 0x2424e 00020010 code.end: 00020010 00 02 3e 2e | >. | .PTR 0x23e2e 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 3c 36 | <6 | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 3c f2 | < | .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 35 2c 39 32 2f |,2.5,92/| 00020130 30 34 2f 30 36 2c 31 37 |04/06,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 2f 20 |/ | .TXT '/ ' 00020356 20 77 69 72 65 64 2f 74 | wired/t| .TXT ' wired/total pages loaded.' 00020370 4c 4f 41 44 20 20 20 20 |LOAD | .XXX[0x30] 00020378 20 20 57 49 54 48 20 20 | WITH | 00020380 20 20 20 20 53 55 42 53 | SUBS| 00020388 59 53 54 45 4d 20 45 4e |YSTEM EN| 00020390 44 20 20 20 20 20 20 20 |D | 00020398 4f 54 48 45 52 20 20 20 |OTHER | 000203a0 20 20 | | .XXX[0x2] 000203a2 42 61 64 20 73 79 6e 74 |Bad synt| .TXT 'Bad syntax in SUBSYSTEM directive!' 000203c4 42 61 64 20 73 79 6e 74 |Bad synt| .TXT 'Bad syntax in WITH directive! ' 000203e2 43 61 6e 27 74 20 66 69 |Can't fi| .TXT 'Can't find USER of WITH!' 000203fa 4c 6f 61 64 69 6e 67 20 |Loading | .TXT 'Loading :_' 00020404 42 61 64 20 |Bad | .TXT 'Bad ' 00020408 73 79 6e 74 |synt | .TXT 'synt' 0002040c 61 78 20 69 |ax i | .TXT 'ax i' 00020410 6e 20 3a 5f |n :_ | .TXT 'n :_' 00020414 43 55 52 52 45 4e 54 2e |CURRENT.| .TXT 'CURRENT.M200_CONFIG ' 00020428 45 6e 74 65 72 20 6e 61 |Enter na| .TXT 'Enter name for_ ' 00020438 43 55 52 52 45 4e 54 2e |CURRENT.| .TXT 'CURRENT.M200_CONFIG ' 0002044c 45 6e 74 65 72 20 6e 61 |Enter na| .TXT 'Enter name of configuration to boot [STANDARD] :_ ' 0002047e 43 6f 75 6c 64 20 6e 6f |Could no| .TXT 'Could not read configuration file, do you want to create it ' 000204ba 44 6f 20 79 6f 75 20 77 |Do you w| .TXT 'Do you want to edit this configuration' 000204e0 53 54 41 4e |STAN | .TXT 'STAN' 000204e4 44 41 52 44 |DARD | .TXT 'DARD' 000204e8 2e 4d 32 30 |.M20 | .TXT '.M20' 000204ec 30 5f 43 4f |0_CO | .TXT '0_CO' 000204f0 4e 46 49 47 |NFIG | .TXT 'NFIG' 000204f4 43 6f 75 6c 64 20 6e 6f |Could no| .TXT 'Could not read Config file' 0002050e 43 45 44 49 54 20 |CEDIT | .TXT 'CEDIT ' 00020514 43 45 44 49 54 20 |CEDIT | .TXT 'CEDIT ' 0002051a 53 54 41 4e 44 41 52 44 |STANDARD| .TXT 'STANDARD.M200_CONFIG' 0002052e 43 6f 75 6c 64 20 6e 6f |Could no| .TXT 'Could not read STANDARD.M200_CONFIG ' 00020552 45 6e 74 65 72 20 43 4c |Enter CL| .TXT 'Enter CLI ' 0002055c 43 4c |CL | .TXT 'CL' 0002055e 49 20 |I | .XXX[0x2] 00020560 42 4f 4f 54 5f 52 45 41 |BOOT_REA| .TXT 'BOOT_REASON ' 0002056c 4d 4f 4e 49 54 4f 52 20 |MONITOR | .TXT 'MONITOR ' 00020574 00 00 00 00 | | .XXX[0x4] 00020578 00 00 00 00 43 4f 44 45 | CODE| .XXX[0x60] 00020580 20 20 20 20 20 20 54 59 | TY| 00020588 50 45 20 20 20 20 20 20 |PE | 00020590 53 59 53 54 45 4d 20 20 |SYSTEM | 00020598 20 20 43 4f 4e 54 52 4f | CONTRO| 000205a0 4c 20 20 20 44 41 54 41 |L DATA| 000205a8 20 20 20 20 20 20 49 4d | IM| 000205b0 50 4f 52 54 20 20 20 20 |PORT | 000205b8 51 55 45 55 45 20 20 20 |QUEUE | 000205c0 20 20 52 45 53 45 52 56 | RESERV| 000205c8 45 44 20 20 06 02 07 01 |ED | 000205d0 04 05 03 00 00 00 00 00 | | 000205d8 00 04 c4 b4 | | .XXX[0x4] 000205dc 00 00 00 00 | | .CONST 0x0,0x0,0x0,0x0 000205e0 00 01 51 80 | Q | .CONST 0x0,0x1,0x51,0x80 000205e4 00 00 00 1f | | .XXX[0x4] 000205e8 00 3b 00 5a 00 78 00 97 | ; Z x | .XXX[0x80] 000205f0 00 b5 00 d4 00 f3 01 11 | | 000205f8 01 30 01 4e 00 00 00 1f | 0 N | 00020600 00 3c 00 5b 00 79 00 98 | < [ y | 00020608 00 b6 00 d5 00 f4 01 12 | | 00020610 01 31 01 4f 00 02 03 04 | 1 O | 00020618 06 07 0c 0d 0e 0f 04 00 | | 00020620 00 88 00 00 02 00 00 01 | | 00020628 00 04 00 00 00 00 4c 4f | LO| 00020630 41 44 20 20 20 20 20 20 |AD | 00020638 57 49 54 48 20 20 20 20 |WITH | 00020640 20 20 53 55 42 53 59 53 | SUBSYS| 00020648 54 45 4d 20 45 4e 44 20 |TEM END | 00020650 20 20 20 20 20 20 4f 54 | OT| 00020658 48 45 52 20 20 20 20 20 |HER | 00020660 0b ad 0b ad 0b ad 0b ad | | 00020668 ; -------------------------------------------------------------------------------------- 00020668 ; OMSI PASCAL Function 00020668 ; <LVAR 0x016 1(r)> 00020668 ; <LVAR 0x012 4(r)> 00020668 ; <LVAR 0x010 1(r)> 00020668 ; <LVAR 0x00e 1(r)> 00020668 ; <LVAR 0x00c 1(r)> 00020668 ; <LVAR 0x008 4(r)> 00020668 ; <LVAR -0x004 @> 00020668 ; -------------------------------------------------------------------------------------- 00020668 4e 56 ff cc |NV | LINK.W A6,#0xffcc 0002066c bf d5 | | CMPA.L (A5),A7 0002066e 62 06 |b | BHI 0x20676 00020670 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020674 4e 76 |Nv | TRAPV 00020676 de fc 00 30 | 0 | ADDA.W #0x30,A7 0002067a 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 0002067e 45 f9 00 01 05 02 |E | LEA.L IPC_PutBool(a : Bool),A2 00020684 72 0a |r | MOVEQ.L #0x0a,D1 00020686 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 0002068c 2f 2e 00 12 |/. | MOVE.L (A6+0x12),-(A7) 00020690 4e b9 00 01 05 08 |N | JSR IPC_PutString(a : String) 00020696 54 4f |TO | ADDQ.L #0x2,A7 00020698 1e ae 00 10 | | MOVE.B (A6+0x10),(A7) 0002069c 4e 92 |N | JSR (A2) 0002069e 54 4f |TO | ADDQ.L #0x2,A7 000206a0 4a 2e 00 16 |J. | TST.B (A6+0x16) 000206a4 66 0e |f | BNE 0x206b4 000206a6 1f 2e 00 0e | . | MOVE.B (A6+0xe),-(A7) 000206aa 4e 92 |N | JSR (A2) 000206ac 1e ae 00 0c | | MOVE.B (A6+0xc),(A7) 000206b0 4e 92 |N | JSR (A2) 000206b2 54 4f |TO | ADDQ.L #0x2,A7 000206b4 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 000206ba 4a 2e 00 16 |J. | TST.B (A6+0x16) 000206be 67 12 |g | BEQ 0x206d2 000206c0 9e c1 | | SUBA.W D1,A7 000206c2 20 4f | O | MOVEA.L A7,A0 000206c4 43 fa fa 44 |C D | LEA.L 0x2010a,A1 000206c8 70 08 |p | MOVEQ.L #0x08,D0 000206ca 10 d9 | | MOVE.B (A1)+,(A0)+ 000206cc 51 c8 ff fc |Q | DBF D0,0x206ca 000206d0 60 10 |` | BRA 0x206e2 000206d2 9e c1 | | SUBA.W D1,A7 000206d4 20 4f | O | MOVEA.L A7,A0 000206d6 43 fa fa 3c |C < | LEA.L 0x20114,A1 000206da 70 08 |p | MOVEQ.L #0x08,D0 000206dc 10 d9 | | MOVE.B (A1)+,(A0)+ 000206de 51 c8 ff fc |Q | DBF D0,0x206dc 000206e2 59 4f |YO | SUBQ.L #0x4,A7 000206e4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000206e8 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000206ec 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 000206f0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000206f6 50 4f |PO | ADDQ.L #0x8,A7 000206f8 48 78 00 01 |Hx | PEA.L 0x1 000206fc 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020700 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020704 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 0002070a de fc 00 18 | | ADDA.W #0x18,A7 0002070e 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00020714 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020718 48 50 |HP | PEA.L (A0) 0002071a 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00020720 58 4f |XO | ADDQ.L #0x4,A7 00020722 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 00020728 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 0002072c 4e 5e |N^ | UNLK A6 0002072e 4e 75 |Nu | RTS 00020730 ; -------------------------------------------------------------------------------------- 00020730 ; OMSI PASCAL Function 00020730 ; <LVAR -0x002 @ 1(r)> 00020730 ; <LVAR -0x006 @ 4(r)> 00020730 ; <LVAR -0x008 @ 1(r)> 00020730 ; <LVAR -0x00c @ 4(r)> 00020730 ; -------------------------------------------------------------------------------------- 00020730 4e 56 ff ae |NV | LINK.W A6,#0xffae 00020734 bf d5 | | CMPA.L (A5),A7 00020736 62 06 |b | BHI 0x2073e 00020738 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002073c 4e 76 |Nv | TRAPV 0002073e de fc 00 46 | F | ADDA.W #0x46,A7 00020742 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 00020746 43 ee ff fa |C | LEA.L (A6-0x6),A1 0002074a 45 ee ff f8 |E | LEA.L (A6-0x8),A2 0002074e 47 ee ff f4 |G | LEA.L (A6-0xc),A3 00020752 49 ee ff fe |I | LEA.L (A6-0x2),A4 00020756 72 0c |r | MOVEQ.L #0x0c,D1 00020758 41 fa f9 fe |A | LEA.L 0x20158,A0 0002075c 70 08 |p | MOVEQ.L #0x08,D0 0002075e 3f 20 |? | MOVE.W -(A0),-(A7) 00020760 51 c8 ff fc |Q | DBF D0,0x2075e 00020764 59 4f |YO | SUBQ.L #0x4,A7 00020766 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002076a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002076e 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00020772 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020778 5c 4f |\O | ADDQ.L #0x6,A7 0002077a 42 17 |B | CLR.B (A7) 0002077c 42 27 |B' | CLR.B -(A7) 0002077e 48 78 00 00 |Hx | PEA.L 0x0 00020782 48 52 |HR | PEA.L (A2) 00020784 48 53 |HS | PEA.L (A3) 00020786 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 0002078c de fc 00 26 | & | ADDA.W #0x26,A7 00020790 4a 12 |J | TST.B (A2) 00020792 66 62 |fb | BNE 0x207f6 00020794 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 0002079a 48 51 |HQ | PEA.L (A1) 0002079c 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000207a2 2e 93 |. | MOVE.L (A3),(A7) 000207a4 48 51 |HQ | PEA.L (A1) 000207a6 48 54 |HT | PEA.L (A4) 000207a8 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 000207ae de c1 | | ADDA.W D1,A7 000207b0 4a 14 |J | TST.B (A4) 000207b2 66 0a |f | BNE 0x207be 000207b4 2f 11 |/ | MOVE.L (A1),-(A7) 000207b6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000207bc 60 08 |` | BRA 0x207c6 000207be 48 51 |HQ | PEA.L (A1) 000207c0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000207c6 58 4f |XO | ADDQ.L #0x4,A7 000207c8 4a 14 |J | TST.B (A4) 000207ca 67 ce |g | BEQ 0x2079a 000207cc 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000207d2 42 27 |B' | CLR.B -(A7) 000207d4 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000207d8 48 78 00 01 |Hx | PEA.L 0x1 000207dc 48 52 |HR | PEA.L (A2) 000207de 48 53 |HS | PEA.L (A3) 000207e0 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000207e6 de c1 | | ADDA.W D1,A7 000207e8 2e bc 00 02 fa ee |. | MOVE.L #0x2faee,(A7) 000207ee 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 000207f4 58 4f |XO | ADDQ.L #0x4,A7 000207f6 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 000207fa 4e 5e |N^ | UNLK A6 000207fc 4e 75 |Nu | RTS 000207fe ; -------------------------------------------------------------------------------------- 000207fe ; OMSI PASCAL Function 000207fe ; <LVAR 0x008 4(r)> 000207fe ; -------------------------------------------------------------------------------------- 000207fe 4e 56 ff ec |NV | LINK.W A6,#0xffec 00020802 bf d5 | | CMPA.L (A5),A7 00020804 62 06 |b | BHI 0x2080c 00020806 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002080a 4e 76 |Nv | TRAPV 0002080c de fc 00 14 | | ADDA.W #0x14,A7 00020810 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00020814 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00020818 4a 39 00 02 3e 62 |J9 >b | TST.B 0x23e62 0002081e 67 08 |g | BEQ 0x20828 00020820 20 51 | Q | MOVEA.L (A1),A0 00020822 00 68 40 00 00 04 | h@ | ORI.W #0x4000,(A0+0x4) 00020828 4a 39 00 02 3e 63 |J9 >c | TST.B 0x23e63 0002082e 67 08 |g | BEQ 0x20838 00020830 20 51 | Q | MOVEA.L (A1),A0 00020832 00 68 20 00 00 04 | h | ORI.W #0x2000,(A0+0x4) 00020838 4a 39 00 02 3e 64 |J9 >d | TST.B 0x23e64 0002083e 67 08 |g | BEQ 0x20848 00020840 20 51 | Q | MOVEA.L (A1),A0 00020842 00 68 10 00 00 04 | h | ORI.W #0x1000,(A0+0x4) 00020848 4a 39 00 02 3e 67 |J9 >g | TST.B 0x23e67 0002084e 67 08 |g | BEQ 0x20858 00020850 20 51 | Q | MOVEA.L (A1),A0 00020852 00 68 02 00 00 04 | h | ORI.W #0x0200,(A0+0x4) 00020858 4a 39 00 02 3e 68 |J9 >h | TST.B 0x23e68 0002085e 67 08 |g | BEQ 0x20868 00020860 20 51 | Q | MOVEA.L (A1),A0 00020862 00 68 01 00 00 04 | h | ORI.W #0x0100,(A0+0x4) 00020868 10 39 00 02 3e 36 | 9 >6 | MOVE.B 0x23e36,D0 0002086e ef 08 | | LSL.B #0x7,D0 00020870 ee 08 | | LSR.B #0x7,D0 00020872 67 08 |g | BEQ 0x2087c 00020874 20 51 | Q | MOVEA.L (A1),A0 00020876 00 68 08 00 00 04 | h | ORI.W #0x0800,(A0+0x4) 0002087c 10 39 00 02 3e 36 | 9 >6 | MOVE.B 0x23e36,D0 00020882 ed 08 | | LSL.B #0x6,D0 00020884 ee 08 | | LSR.B #0x7,D0 00020886 67 08 |g | BEQ 0x20890 00020888 20 51 | Q | MOVEA.L (A1),A0 0002088a 00 68 04 00 00 04 | h | ORI.W #0x0400,(A0+0x4) 00020890 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00020894 4e 5e |N^ | UNLK A6 00020896 4e 75 |Nu | RTS 00020898 ; -------------------------------------------------------------------------------------- 00020898 ; OMSI PASCAL Function 00020898 ; <LVAR -0x004 @> 00020898 ; -------------------------------------------------------------------------------------- 00020898 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 0002089c bf d5 | | CMPA.L (A5),A7 0002089e 62 06 |b | BHI 0x208a6 000208a0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000208a4 4e 76 |Nv | TRAPV 000208a6 de fc 00 28 | ( | ADDA.W #0x28,A7 000208aa 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 000208ae 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000208b4 42 27 |B' | CLR.B -(A7) 000208b6 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 000208bc 54 4f |TO | ADDQ.L #0x2,A7 000208be 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 000208c4 9e fc 00 0a | | SUBA.W #0xa,A7 000208c8 20 4f | O | MOVEA.L A7,A0 000208ca 43 fa f8 8c |C | LEA.L 0x20158,A1 000208ce 70 08 |p | MOVEQ.L #0x08,D0 000208d0 10 d9 | | MOVE.B (A1)+,(A0)+ 000208d2 51 c8 ff fc |Q | DBF D0,0x208d0 000208d6 59 4f |YO | SUBQ.L #0x4,A7 000208d8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000208dc 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000208e0 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 000208e4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000208ea 50 4f |PO | ADDQ.L #0x8,A7 000208ec 48 78 00 01 |Hx | PEA.L 0x1 000208f0 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000208f4 48 6e ff fc |Hn | PEA.L (A6-0x4) 000208f8 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 000208fe de fc 00 18 | | ADDA.W #0x18,A7 00020902 48 79 00 02 41 5c |Hy A\ | PEA.L 0x2415c 00020908 4e b9 00 01 05 a4 |N | JSR Read_fc0c() : Word 0002090e 58 4f |XO | ADDQ.L #0x4,A7 00020910 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00020914 4e 5e |N^ | UNLK A6 00020916 4e 75 |Nu | RTS 00020918 ; -------------------------------------------------------------------------------------- 00020918 ; OMSI PASCAL Function 00020918 ; -------------------------------------------------------------------------------------- 00020918 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 0002091c bf d5 | | CMPA.L (A5),A7 0002091e 62 06 |b | BHI 0x20926 00020920 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020924 4e 76 |Nv | TRAPV 00020926 de fc 00 14 | | ADDA.W #0x14,A7 0002092a 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 0002092e 41 f9 00 02 41 72 |A Ar | LEA.L 0x24172,A0 00020934 42 50 |BP | CLR.W (A0) 00020936 42 80 |B | CLR.L D0 00020938 30 10 |0 | MOVE.W (A0),D0 0002093a 22 00 |" | MOVE.L D0,D1 0002093c e1 81 | | ASL.L #0x8,D1 0002093e e9 81 | | ASL.L #0x4,D1 00020940 58 80 |X | ADDQ.L #0x4,D0 00020942 e1 80 | | ASL.L #0x8,D0 00020944 d0 81 | | ADD.L D1,D0 00020946 06 80 00 00 00 80 | | ADDI.L #0x00000080,D0 0002094c 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00020952 63 02 |c | BLS 0x20956 00020954 4e 4f |NO | TRAP #15 00020956 33 c0 00 02 41 70 |3 Ap | MOVE.W D0,0x24170 0002095c 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00020960 4e 5e |N^ | UNLK A6 00020962 4e 75 |Nu | RTS 00020964 ; -------------------------------------------------------------------------------------- 00020964 ; OMSI PASCAL Function 00020964 ; <LVAR 0x008 1(r)> 00020964 ; <LVAR -0x003 1(r)> 00020964 ; <LVAR -0x004 1(w)> 00020964 ; <LVAR -0x005 1(w)> 00020964 ; <LVAR -0x006 1(w) 4(r)> 00020964 ; <LVAR -0x007 1(w)> 00020964 ; <LVAR -0x008 1(w)> 00020964 ; <LVAR -0x009 1(w)> 00020964 ; <LVAR -0x00a 1(w) 4(r)> 00020964 ; <LVAR -0x00b @ 1(r)> 00020964 ; <LVAR -0x00c 1(r)> 00020964 ; <LVAR -0x00d @ 1(r)> 00020964 ; <LVAR -0x00e @ 1(r)> 00020964 ; <LVAR -0x00f @ 1(r)> 00020964 ; <LVAR -0x010 1(r)> 00020964 ; <LVAR -0x011 @ 1(r)> 00020964 ; <LVAR -0x012 @ 1(r)> 00020964 ; -------------------------------------------------------------------------------------- 00020964 4e 56 ff ae |NV | LINK.W A6,#0xffae ; Spelunked 00020968 bf d5 | | CMPA.L (A5),A7 0002096a 62 06 |b | BHI 0x20972 0002096c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020970 4e 76 |Nv | TRAPV 00020972 de fc 00 40 | @ | ADDA.W #0x40,A7 00020976 48 e7 e0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D2+D1+D0,-(A7) 0002097a 43 ee ff ee |C | LEA.L (A6-0x12),A1 0002097e 45 ee ff ef |E | LEA.L (A6-0x11),A2 00020982 47 ee ff f1 |G | LEA.L (A6-0xf),A3 00020986 49 ee ff f2 |I | LEA.L (A6-0xe),A4 0002098a 74 18 |t | MOVEQ.L #0x18,D2 0002098c 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00020990 48 80 |H | EXTB.W D0 00020992 32 00 |2 | MOVE.W D0,D1 00020994 55 41 |UA | SUBQ.W #0x2,D1 00020996 0c 41 00 0d | A | CMPI.W #0x000d,D1 0002099a 63 02 |c | BLS 0x2099e 0002099c switch@0x209a0[0x2]: 0002099c switch@0x209a0[0x3]: 0002099c switch@0x209a0[0x6]: 0002099c switch@0x209a0[0x7]: 0002099c switch@0x209a0[0x8]: 0002099c switch@0x209a0[0x9]: 0002099c 4e 4e |NN | TRAP #14 0002099e d2 41 | A | ADD.W D1,D1 000209a0 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W 000209a8 00 66 | f | .CONST 0x66 ; [0x0] -> 0x20a0e 000209aa 00 4e | N | .CONST 0x4e ; [0x1] -> 0x209f6 000209ac ff f4 | | .CONST 0xfff4 ; [0x2] -> 0x2099c 000209ae ff f4 | | .CONST 0xfff4 ; [0x3] -> 0x2099c 000209b0 00 1c | | .CONST 0x1c ; [0x4] -> 0x209c4 000209b2 00 36 | 6 | .CONST 0x36 ; [0x5] -> 0x209de 000209b4 ff f4 | | .CONST 0xfff4 ; [0x6] -> 0x2099c 000209b6 ff f4 | | .CONST 0xfff4 ; [0x7] -> 0x2099c 000209b8 ff f4 | | .CONST 0xfff4 ; [0x8] -> 0x2099c 000209ba ff f4 | | .CONST 0xfff4 ; [0x9] -> 0x2099c 000209bc 00 7e | ~ | .CONST 0x7e ; [0xa] -> 0x20a26 000209be 00 7e | ~ | .CONST 0x7e ; [0xb] -> 0x20a26 000209c0 00 7e | ~ | .CONST 0x7e ; [0xc] -> 0x20a26 000209c2 00 7e | ~ | .CONST 0x7e ; [0xd] -> 0x20a26 000209c4 switch@0x209a0[0x4]: 000209c4 48 51 |HQ | PEA.L (A1) 000209c6 48 52 |HR | PEA.L (A2) 000209c8 48 53 |HS | PEA.L (A3) 000209ca 48 54 |HT | PEA.L (A4) 000209cc 48 6e ff f3 |Hn | PEA.L (A6-0xd) 000209d0 48 6e ff f5 |Hn | PEA.L (A6-0xb) 000209d4 4e b9 00 02 35 34 |N 54 | JSR exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 000209da de c2 | | ADDA.W D2,A7 000209dc 60 64 |`d | BRA 0x20a42 000209de switch@0x209a0[0x5]: 000209de 48 51 |HQ | PEA.L (A1) 000209e0 48 52 |HR | PEA.L (A2) 000209e2 48 53 |HS | PEA.L (A3) 000209e4 48 54 |HT | PEA.L (A4) 000209e6 48 6e ff f3 |Hn | PEA.L (A6-0xd) 000209ea 48 6e ff f5 |Hn | PEA.L (A6-0xb) 000209ee 4e b9 00 02 35 ec |N 5 | JSR exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 000209f4 60 e4 |` | BRA 0x209da 000209f6 switch@0x209a0[0x1]: 000209f6 48 51 |HQ | PEA.L (A1) 000209f8 48 52 |HR | PEA.L (A2) 000209fa 48 53 |HS | PEA.L (A3) 000209fc 48 54 |HT | PEA.L (A4) 000209fe 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00020a02 48 6e ff f5 |Hn | PEA.L (A6-0xb) 00020a06 4e b9 00 02 34 06 |N 4 | JSR exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 00020a0c 60 cc |` | BRA 0x209da 00020a0e switch@0x209a0[0x0]: 00020a0e 48 51 |HQ | PEA.L (A1) 00020a10 48 52 |HR | PEA.L (A2) 00020a12 48 53 |HS | PEA.L (A3) 00020a14 48 54 |HT | PEA.L (A4) 00020a16 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00020a1a 48 6e ff f5 |Hn | PEA.L (A6-0xb) 00020a1e 4e b9 00 02 34 ba |N 4 | JSR exp_READ_NOVRAM_DATA.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 00020a24 60 b4 |` | BRA 0x209da 00020a26 switch@0x209a0[0xa]: 00020a26 switch@0x209a0[0xb]: 00020a26 switch@0x209a0[0xc]: 00020a26 switch@0x209a0[0xd]: 00020a26 1f 00 | | MOVE.B D0,-(A7) 00020a28 48 51 |HQ | PEA.L (A1) 00020a2a 48 52 |HR | PEA.L (A2) 00020a2c 48 53 |HS | PEA.L (A3) 00020a2e 48 54 |HT | PEA.L (A4) 00020a30 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00020a34 48 6e ff f5 |Hn | PEA.L (A6-0xb) 00020a38 4e b9 00 02 36 aa |N 6 | JSR 0x236aa 00020a3e de fc 00 1a | | ADDA.W #0x1a,A7 00020a42 4a 2e ff f5 |J. | TST.B (A6-0xb) 00020a46 67 50 |gP | BEQ 0x20a98 00020a48 1d 51 ff f6 | Q | MOVE.B (A1),(A6-0xa) 00020a4c 1d 52 ff f7 | R | MOVE.B (A2),(A6-0x9) 00020a50 1d 6e ff f0 ff f8 | n | MOVE.B (A6-0x10),(A6-0x8) 00020a56 1d 53 ff f9 | S | MOVE.B (A3),(A6-0x7) 00020a5a 1d 54 ff fa | T | MOVE.B (A4),(A6-0x6) 00020a5e 1d 6e ff f3 ff fb | n | MOVE.B (A6-0xd),(A6-0x5) 00020a64 1d 6e ff f4 ff fc | n | MOVE.B (A6-0xc),(A6-0x4) 00020a6a 42 2e ff fd |B. | CLR.B (A6-0x3) 00020a6e 2f 2e ff fa |/. | MOVE.L (A6-0x6),-(A7) 00020a72 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 00020a76 48 57 |HW | PEA.L (A7) 00020a78 48 78 00 00 |Hx | PEA.L 0x0 00020a7c 48 78 00 07 |Hx | PEA.L 0x7 00020a80 e7 40 | @ | ASL.W #0x3,D0 00020a82 41 f9 00 02 3e 2e |A >. | LEA.L 0x23e2e,A0 00020a88 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00020a8c 48 68 03 4a |Hh J | PEA.L (A0+0x34a) 00020a90 4e b9 00 01 04 b4 |N | JSR ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q) 00020a96 de c2 | | ADDA.W D2,A7 00020a98 4c df 1f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3+A4 00020a9c 4e 5e |N^ | UNLK A6 00020a9e 4e 75 |Nu | RTS 00020aa0 ; -------------------------------------------------------------------------------------- 00020aa0 ; OMSI PASCAL Function 00020aa0 ; <LVAR -0x001 1(r)> 00020aa0 ; <LVAR -0x002 1(w)> 00020aa0 ; <LVAR -0x003 1(w)> 00020aa0 ; <LVAR -0x004 1(w) 4(r)> 00020aa0 ; <LVAR -0x005 1(w)> 00020aa0 ; <LVAR -0x006 1(w)> 00020aa0 ; <LVAR -0x007 1(w)> 00020aa0 ; <LVAR -0x008 1(w) 4(r)> 00020aa0 ; -------------------------------------------------------------------------------------- 00020aa0 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 00020aa4 bf d5 | | CMPA.L (A5),A7 00020aa6 62 06 |b | BHI 0x20aae 00020aa8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020aac 4e 76 |Nv | TRAPV 00020aae de fc 00 28 | ( | ADDA.W #0x28,A7 00020ab2 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00020ab6 41 f9 00 01 05 92 |A | LEA.L ReadConfig(where : Long) : Word,A0 00020abc 32 3c 00 ff |2< | MOVE.W #0xff,D1 00020ac0 55 4f |UO | SUBQ.L #0x2,A7 00020ac2 48 78 01 01 |Hx | PEA.L 0x101 00020ac6 4e 90 |N | JSR (A0) 00020ac8 58 4f |XO | ADDQ.L #0x4,A7 00020aca 30 1f |0 | MOVE.W (A7)+,D0 00020acc 41 81 |A | CHK.W D1,D0 00020ace 1d 40 ff f8 | @ | MOVE.B D0,(A6-0x8) 00020ad2 55 4f |UO | SUBQ.L #0x2,A7 00020ad4 48 78 01 02 |Hx | PEA.L 0x102 00020ad8 4e 90 |N | JSR (A0) 00020ada 58 4f |XO | ADDQ.L #0x4,A7 00020adc 30 1f |0 | MOVE.W (A7)+,D0 00020ade 41 81 |A | CHK.W D1,D0 00020ae0 1d 40 ff f9 | @ | MOVE.B D0,(A6-0x7) 00020ae4 55 4f |UO | SUBQ.L #0x2,A7 00020ae6 48 78 01 03 |Hx | PEA.L 0x103 00020aea 4e 90 |N | JSR (A0) 00020aec 58 4f |XO | ADDQ.L #0x4,A7 00020aee 30 1f |0 | MOVE.W (A7)+,D0 00020af0 41 81 |A | CHK.W D1,D0 00020af2 1d 40 ff fa | @ | MOVE.B D0,(A6-0x6) 00020af6 55 4f |UO | SUBQ.L #0x2,A7 00020af8 48 78 01 04 |Hx | PEA.L 0x104 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 fb | @ | MOVE.B D0,(A6-0x5) 00020b08 55 4f |UO | SUBQ.L #0x2,A7 00020b0a 48 78 01 05 |Hx | PEA.L 0x105 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 fc | @ | MOVE.B D0,(A6-0x4) 00020b1a 55 4f |UO | SUBQ.L #0x2,A7 00020b1c 48 78 01 06 |Hx | PEA.L 0x106 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 fd | @ | MOVE.B D0,(A6-0x3) 00020b2c 55 4f |UO | SUBQ.L #0x2,A7 00020b2e 48 78 01 07 |Hx | PEA.L 0x107 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 fe | @ | MOVE.B D0,(A6-0x2) 00020b3e 42 2e ff ff |B. | CLR.B (A6-0x1) 00020b42 2f 2e ff fc |/. | MOVE.L (A6-0x4),-(A7) 00020b46 2f 2e ff f8 |/. | MOVE.L (A6-0x8),-(A7) 00020b4a 48 57 |HW | PEA.L (A7) 00020b4c 48 78 00 00 |Hx | PEA.L 0x0 00020b50 48 78 00 07 |Hx | PEA.L 0x7 00020b54 48 79 00 02 41 98 |Hy A | PEA.L 0x24198 00020b5a 4e b9 00 01 04 b4 |N | JSR ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q) 00020b60 de fc 00 18 | | ADDA.W #0x18,A7 00020b64 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00020b68 4e 5e |N^ | UNLK A6 00020b6a 4e 75 |Nu | RTS 00020b6c ; -------------------------------------------------------------------------------------- 00020b6c ; OMSI PASCAL Function 00020b6c ; -------------------------------------------------------------------------------------- 00020b6c 4e 56 ff dc |NV | LINK.W A6,#0xffdc 00020b70 bf d5 | | CMPA.L (A5),A7 00020b72 62 06 |b | BHI 0x20b7a 00020b74 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020b78 4e 76 |Nv | TRAPV 00020b7a de fc 00 20 | | ADDA.W #0x20,A7 00020b7e 48 e7 c1 c0 |H | MOVEM.L A1+A0+D7+D1+D0,-(A7) 00020b82 43 fa fd e0 |C | LEA.L 0x20964,A1 00020b86 72 0f |r | MOVEQ.L #0x0f,D1 00020b88 7e 00 |~ | MOVEQ.L #0x00,D7 00020b8a 10 07 | | MOVE.B D7,D0 00020b8c 48 80 |H | EXTB.W D0 00020b8e e7 40 | @ | ASL.W #0x3,D0 00020b90 41 f9 00 02 3e 2e |A >. | LEA.L 0x23e2e,A0 00020b96 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00020b9a 21 7a f9 d8 03 4a |!z J | MOVE.L 0x20574,(A0+0x34a) 00020ba0 21 7a f9 d6 03 4e |!z N | MOVE.L 0x20578,(A0+0x34e) 00020ba6 52 07 |R | ADDQ.B #0x1,D7 00020ba8 be 01 | | CMP.B D1,D7 00020baa 6f de |o | BLE 0x20b8a 00020bac 4e ba fe f2 |N | JSR 0x20aa0 00020bb0 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020bb4 4e 91 |N | JSR (A1) 00020bb6 1e bc 00 03 | | MOVE.B #0x03,(A7) 00020bba 4e 91 |N | JSR (A1) 00020bbc 1e bc 00 06 | | MOVE.B #0x06,(A7) 00020bc0 4e 91 |N | JSR (A1) 00020bc2 1e bc 00 07 | | MOVE.B #0x07,(A7) 00020bc6 4e 91 |N | JSR (A1) 00020bc8 54 4f |TO | ADDQ.L #0x2,A7 00020bca 7e 0c |~ | MOVEQ.L #0x0c,D7 00020bcc 55 4f |UO | SUBQ.L #0x2,A7 00020bce 1f 07 | | MOVE.B D7,-(A7) 00020bd0 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00020bd6 54 4f |TO | ADDQ.L #0x2,A7 00020bd8 4a 1f |J | TST.B (A7)+ 00020bda 67 06 |g | BEQ 0x20be2 00020bdc 1f 07 | | MOVE.B D7,-(A7) 00020bde 4e 91 |N | JSR (A1) 00020be0 54 4f |TO | ADDQ.L #0x2,A7 00020be2 52 07 |R | ADDQ.B #0x1,D7 00020be4 be 01 | | CMP.B D1,D7 00020be6 6f e4 |o | BLE 0x20bcc 00020be8 4c df 03 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1 00020bec 4e 5e |N^ | UNLK A6 00020bee 4e 75 |Nu | RTS 00020bf0 ; -------------------------------------------------------------------------------------- 00020bf0 ; OMSI PASCAL Function 00020bf0 ; <LVAR 0x008 4(r)> 00020bf0 ; <LVAR -0x004 1(rw)> 00020bf0 ; -------------------------------------------------------------------------------------- 00020bf0 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 00020bf4 bf d5 | | CMPA.L (A5),A7 00020bf6 62 06 |b | BHI 0x20bfe 00020bf8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020bfc 4e 76 |Nv | TRAPV 00020bfe de fc 00 28 | ( | ADDA.W #0x28,A7 00020c02 48 e7 e1 c0 |H | MOVEM.L A1+A0+D7+D2+D1+D0,-(A7) 00020c06 43 ee ff fc |C | LEA.L (A6-0x4),A1 00020c0a 72 01 |r | MOVEQ.L #0x01,D1 00020c0c 74 0f |t | MOVEQ.L #0x0f,D2 00020c0e 1f 3c 00 05 | < | MOVE.B #0x05,-(A7) 00020c12 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020c16 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 00020c1c 58 4f |XO | ADDQ.L #0x4,A7 00020c1e 10 39 00 02 41 5d | 9 A] | MOVE.B 0x2415d,D0 00020c24 ee 08 | | LSR.B #0x7,D0 00020c26 66 38 |f8 | BNE 0x20c60 00020c28 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020c2c 10 81 | | MOVE.B D1,(A0) 00020c2e 55 4f |UO | SUBQ.L #0x2,A7 00020c30 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00020c36 4a 1f |J | TST.B (A7)+ 00020c38 67 08 |g | BEQ 0x20c42 00020c3a 4e b9 00 02 33 ac |N 3 | JSR exp_LOAD_HRAM_8_0.FIU() 00020c40 60 06 |` | BRA 0x20c48 00020c42 4e b9 00 02 33 ca |N 3 | JSR exp_LOAD_HRAM_32_0.FIU() 00020c48 4e b9 00 02 34 48 |N 4H | JSR exp_LOAD_HRAM_1.FIU() 00020c4e 4e b9 00 02 36 68 |N 6h | JSR exp_ALIGN_CSA.VAL() 00020c54 4e b9 00 02 35 d2 |N 5 | JSR exp_ALIGN_CSA.TYP() 00020c5a 4e b9 00 01 05 c2 |N | JSR Or_fc0c_80(void) 00020c60 42 11 |B | CLR.B (A1) 00020c62 7e 0c |~ | MOVEQ.L #0x0c,D7 00020c64 55 4f |UO | SUBQ.L #0x2,A7 00020c66 1f 07 | | MOVE.B D7,-(A7) 00020c68 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00020c6e 54 4f |TO | ADDQ.L #0x2,A7 00020c70 4a 1f |J | TST.B (A7)+ 00020c72 67 0c |g | BEQ 0x20c80 00020c74 42 80 |B | CLR.L D0 00020c76 10 11 | | MOVE.B (A1),D0 00020c78 52 40 |R@ | ADDQ.W #0x1,D0 00020c7a 41 bc 00 ff |A | CHK.W #0xff,D0 00020c7e 12 80 | | MOVE.B D0,(A1) 00020c80 52 07 |R | ADDQ.B #0x1,D7 00020c82 be 02 | | CMP.B D2,D7 00020c84 6f de |o | BLE 0x20c64 00020c86 7e 0c |~ | MOVEQ.L #0x0c,D7 00020c88 55 4f |UO | SUBQ.L #0x2,A7 00020c8a 1f 07 | | MOVE.B D7,-(A7) 00020c8c 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00020c92 54 4f |TO | ADDQ.L #0x2,A7 00020c94 4a 1f |J | TST.B (A7)+ 00020c96 67 42 |gB | BEQ 0x20cda 00020c98 1f 07 | | MOVE.B D7,-(A7) 00020c9a 55 4f |UO | SUBQ.L #0x2,A7 00020c9c 1f 07 | | MOVE.B D7,-(A7) 00020c9e 4e b9 00 01 04 c6 |N | JSR EQ_1c218(a : Byte) : Bool 00020ca4 54 4f |TO | ADDQ.L #0x2,A7 00020ca6 10 17 | | MOVE.B (A7),D0 00020ca8 48 80 |H | EXTB.W D0 00020caa 41 81 |A | CHK.W D1,D0 00020cac 1e 80 | | MOVE.B D0,(A7) 00020cae 55 4f |UO | SUBQ.L #0x2,A7 00020cb0 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00020cb6 10 17 | | MOVE.B (A7),D0 00020cb8 48 80 |H | EXTB.W D0 00020cba 41 81 |A | CHK.W D1,D0 00020cbc 1e 80 | | MOVE.B D0,(A7) 00020cbe 1f 11 | | MOVE.B (A1),-(A7) 00020cc0 4e b9 00 02 39 2a |N 9* | JSR 0x2392a 00020cc6 5c 4f |\O | ADDQ.L #0x6,A7 00020cc8 1e 87 | | MOVE.B D7,(A7) 00020cca 4e b9 00 02 3a 12 |N : | JSR 0x23a12 00020cd0 1e 87 | | MOVE.B D7,(A7) 00020cd2 4e b9 00 02 3a c6 |N : | JSR 0x23ac6 00020cd8 54 4f |TO | ADDQ.L #0x2,A7 00020cda 52 07 |R | ADDQ.B #0x1,D7 00020cdc be 02 | | CMP.B D2,D7 00020cde 6f a8 |o | BLE 0x20c88 00020ce0 4e b9 00 02 34 9c |N 4 | JSR exp_CLEAR_PARITY.FIU() 00020ce6 4e b9 00 02 36 4a |N 6J | JSR exp_CLEAR_PARITY.VAL() 00020cec 4e b9 00 02 35 b4 |N 5 | JSR exp_CLEAR_PARITY.TYP() 00020cf2 4e b9 00 02 35 16 |N 5 | JSR exp_CLEAR_PARITY.SEQ() 00020cf8 4e b9 00 01 05 b0 |N | JSR FifoInit(void) 00020cfe 4c df 03 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1 00020d02 4e 5e |N^ | UNLK A6 00020d04 4e 75 |Nu | RTS 00020d06 ; -------------------------------------------------------------------------------------- 00020d06 ; OMSI PASCAL Function 00020d06 ; <LVAR 0x014 4(r)> 00020d06 ; <LVAR 0x010 4(r)> 00020d06 ; <LVAR 0x00c @ 4(r)> 00020d06 ; <LVAR 0x008 @ 4(r)> 00020d06 ; <LVAR -0x004 @ 4(rw)> 00020d06 ; <LVAR -0x006 @> 00020d06 ; <LVAR -0x025 1(rw)> 00020d06 ; <LVAR -0x026 @> 00020d06 ; <LVAR -0x02a @> 00020d06 ; <LVAR -0x02c @ 1(r)> 00020d06 ; -------------------------------------------------------------------------------------- 00020d06 4e 56 ff 60 |NV ` | LINK.W A6,#0xff60 00020d0a bf d5 | | CMPA.L (A5),A7 00020d0c 62 06 |b | BHI 0x20d14 00020d0e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020d12 4e 76 |Nv | TRAPV 00020d14 de fc 00 74 | t | ADDA.W #0x74,A7 00020d18 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00020d1c 45 ee ff fc |E | LEA.L (A6-0x4),A2 00020d20 47 ee ff fa |G | LEA.L (A6-0x6),A3 00020d24 49 f9 00 01 02 c4 |I | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A4 00020d2a 72 01 |r | MOVEQ.L #0x01,D1 00020d2c 74 1e |t | MOVEQ.L #0x1e,D2 00020d2e 76 0c |v | MOVEQ.L #0x0c,D3 00020d30 78 02 |x | MOVEQ.L #0x02,D4 00020d32 7a 10 |z | MOVEQ.L #0x10,D5 00020d34 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00020d38 4a 10 |J | TST.B (A0) 00020d3a 67 12 |g | BEQ 0x20d4e 00020d3c 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00020d40 43 ee ff da |C | LEA.L (A6-0x26),A1 00020d44 70 1f |p | MOVEQ.L #0x1f,D0 00020d46 12 d8 | | MOVE.B (A0)+,(A1)+ 00020d48 51 c8 ff fc |Q | DBF D0,0x20d46 00020d4c 60 0c |` | BRA 0x20d5a 00020d4e 43 ee ff da |C | LEA.L (A6-0x26),A1 00020d52 70 1f |p | MOVEQ.L #0x1f,D0 00020d54 12 d8 | | MOVE.B (A0)+,(A1)+ 00020d56 51 c8 ff fc |Q | DBF D0,0x20d54 00020d5a 4a 2e ff db |J. | TST.B (A6-0x25) 00020d5e 66 0c |f | BNE 0x20d6c 00020d60 20 4b | K | MOVEA.L A3,A0 00020d62 70 0e |p | MOVEQ.L #0x0e,D0 00020d64 3f 20 |? | MOVE.W -(A0),-(A7) 00020d66 51 c8 ff fc |Q | DBF D0,0x20d64 00020d6a 60 74 |`t | BRA 0x20de0 00020d6c 3f 3a f3 f4 |?: | MOVE.W 0x20162,-(A7) 00020d70 20 4b | K | MOVEA.L A3,A0 00020d72 70 0e |p | MOVEQ.L #0x0e,D0 00020d74 3f 20 |? | MOVE.W -(A0),-(A7) 00020d76 51 c8 ff fc |Q | DBF D0,0x20d74 00020d7a 2f 3a f3 e8 |/: | MOVE.L 0x20164,-(A7) 00020d7e 9e c3 | | SUBA.W D3,A7 00020d80 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00020d84 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00020d8a 48 6f 00 32 |Ho 2 | PEA.L (A7+0x32) 00020d8e 3f 01 |? | MOVE.W D1,-(A7) 00020d90 3f 04 |? | MOVE.W D4,-(A7) 00020d92 4e 94 |N | JSR (A4) 00020d94 58 4f |XO | ADDQ.L #0x4,A7 00020d96 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00020d9a 3f 01 |? | MOVE.W D1,-(A7) 00020d9c 3f 02 |? | MOVE.W D2,-(A7) 00020d9e 4e 94 |N | JSR (A4) 00020da0 58 4f |XO | ADDQ.L #0x4,A7 00020da2 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00020da6 3f 01 |? | MOVE.W D1,-(A7) 00020da8 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020dac 4e 94 |N | JSR (A4) 00020dae 50 4f |PO | ADDQ.L #0x8,A7 00020db0 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00020db6 de c5 | | ADDA.W D5,A7 00020db8 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00020dbe 58 4f |XO | ADDQ.L #0x4,A7 00020dc0 24 9f |$ | MOVE.L (A7)+,(A2) 00020dc2 de fc 00 24 | $ | ADDA.W #0x24,A7 00020dc6 20 52 | R | MOVEA.L (A2),A0 00020dc8 4a 50 |JP | TST.W (A0) 00020dca 66 26 |f& | BNE 0x20df2 00020dcc 48 52 |HR | PEA.L (A2) 00020dce 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020dd4 58 4f |XO | ADDQ.L #0x4,A7 00020dd6 20 4b | K | MOVEA.L A3,A0 00020dd8 70 0e |p | MOVEQ.L #0x0e,D0 00020dda 3f 20 |? | MOVE.W -(A0),-(A7) 00020ddc 51 c8 ff fc |Q | DBF D0,0x20dda 00020de0 59 4f |YO | SUBQ.L #0x4,A7 00020de2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020de6 3f 01 |? | MOVE.W D1,-(A7) 00020de8 3f 02 |? | MOVE.W D2,-(A7) 00020dea 4e 94 |N | JSR (A4) 00020dec 50 4f |PO | ADDQ.L #0x8,A7 00020dee 24 9f |$ | MOVE.L (A7)+,(A2) 00020df0 de c2 | | ADDA.W D2,A7 00020df2 59 4f |YO | SUBQ.L #0x4,A7 00020df4 2f 12 |/ | MOVE.L (A2),-(A7) 00020df6 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00020dfc 58 4f |XO | ADDQ.L #0x4,A7 00020dfe 24 97 |$ | MOVE.L (A7),(A2) 00020e00 2f 12 |/ | MOVE.L (A2),-(A7) 00020e02 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020e06 4e b9 00 01 03 00 |N | JSR FSCALL_10300 00020e0c 50 4f |PO | ADDQ.L #0x8,A7 00020e0e 4a 9f |J | TST.L (A7)+ 00020e10 66 1c |f | BNE 0x20e2e 00020e12 59 4f |YO | SUBQ.L #0x4,A7 00020e14 2f 12 |/ | MOVE.L (A2),-(A7) 00020e16 59 4f |YO | SUBQ.L #0x4,A7 00020e18 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020e1c 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00020e22 58 4f |XO | ADDQ.L #0x4,A7 00020e24 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020e2a 50 4f |PO | ADDQ.L #0x8,A7 00020e2c 24 9f |$ | MOVE.L (A7)+,(A2) 00020e2e 2f 12 |/ | MOVE.L (A2),-(A7) 00020e30 42 27 |B' | CLR.B -(A7) 00020e32 1f 01 | | MOVE.B D1,-(A7) 00020e34 48 78 00 00 |Hx | PEA.L 0x0 00020e38 48 6e ff d4 |Hn | PEA.L (A6-0x2c) 00020e3c 48 6e ff d6 |Hn | PEA.L (A6-0x2a) 00020e40 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00020e46 de fc 00 14 | | ADDA.W #0x14,A7 00020e4a 4a 2e ff d4 |J. | TST.B (A6-0x2c) 00020e4e 66 1a |f | BNE 0x20e6a 00020e50 42 27 |B' | CLR.B -(A7) 00020e52 1f 04 | | MOVE.B D4,-(A7) 00020e54 48 78 00 01 |Hx | PEA.L 0x1 00020e58 48 6e ff d4 |Hn | PEA.L (A6-0x2c) 00020e5c 48 6e ff d6 |Hn | PEA.L (A6-0x2a) 00020e60 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00020e66 de c5 | | ADDA.W D5,A7 00020e68 60 12 |` | BRA 0x20e7c 00020e6a 48 52 |HR | PEA.L (A2) 00020e6c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020e72 58 4f |XO | ADDQ.L #0x4,A7 00020e74 1d 41 ff db | A | MOVE.B D1,(A6-0x25) 00020e78 60 00 fe e0 |` | BRA 0x20d5a 00020e7c 2f 12 |/ | MOVE.L (A2),-(A7) 00020e7e 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00020e82 48 68 00 02 |Hh | PEA.L (A0+0x2) 00020e86 48 53 |HS | PEA.L (A3) 00020e88 4e b9 00 01 05 8c |N | JSR FSCALL_1058c 00020e8e de c3 | | ADDA.W D3,A7 00020e90 48 6e 00 0c |Hn | PEA.L (A6+0xc) 00020e94 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020e9a 58 4f |XO | ADDQ.L #0x4,A7 00020e9c 48 6e 00 08 |Hn | PEA.L (A6+0x8) 00020ea0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020ea6 58 4f |XO | ADDQ.L #0x4,A7 00020ea8 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00020eac 4e 5e |N^ | UNLK A6 00020eae 4e 75 |Nu | RTS 00020eb0 ; -------------------------------------------------------------------------------------- 00020eb0 ; OMSI PASCAL Function 00020eb0 ; <LVAR 0x008 1(r)> 00020eb0 ; <LVAR -0x002 @> 00020eb0 ; -------------------------------------------------------------------------------------- 00020eb0 4e 56 ff b0 |NV | LINK.W A6,#0xffb0 00020eb4 bf d5 | | CMPA.L (A5),A7 00020eb6 62 06 |b | BHI 0x20ebe 00020eb8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020ebc 4e 76 |Nv | TRAPV 00020ebe de fc 00 4e | N | ADDA.W #0x4e,A7 00020ec2 48 e7 e0 e0 |H | MOVEM.L A2+A1+A0+D2+D1+D0,-(A7) 00020ec6 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00020ecc 72 01 |r | MOVEQ.L #0x01,D1 00020ece 74 0c |t | MOVEQ.L #0x0c,D2 00020ed0 41 fa f2 a4 |A | LEA.L 0x20176,A0 00020ed4 70 06 |p | MOVEQ.L #0x06,D0 00020ed6 3f 20 |? | MOVE.W -(A0),-(A7) 00020ed8 51 c8 ff fc |Q | DBF D0,0x20ed6 00020edc 9e c2 | | SUBA.W D2,A7 00020ede 20 4f | O | MOVEA.L A7,A0 00020ee0 43 fa f2 94 |C | LEA.L 0x20176,A1 00020ee4 70 0a |p | MOVEQ.L #0x0a,D0 00020ee6 10 d9 | | MOVE.B (A1)+,(A0)+ 00020ee8 51 c8 ff fc |Q | DBF D0,0x20ee6 00020eec 48 79 00 02 3e 69 |Hy >i | PEA.L 0x23e69 00020ef2 48 79 00 02 3f fb |Hy ? | PEA.L 0x23ffb 00020ef8 59 4f |YO | SUBQ.L #0x4,A7 00020efa 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00020efe 3f 01 |? | MOVE.W D1,-(A7) 00020f00 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00020f04 4e 92 |N | JSR (A2) 00020f06 58 4f |XO | ADDQ.L #0x4,A7 00020f08 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00020f0c 3f 01 |? | MOVE.W D1,-(A7) 00020f0e 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00020f12 4e 92 |N | JSR (A2) 00020f14 50 4f |PO | ADDQ.L #0x8,A7 00020f16 4e ba fd ee |N | JSR 0x20d06 00020f1a de c2 | | ADDA.W D2,A7 00020f1c 20 4f | O | MOVEA.L A7,A0 00020f1e 43 f9 00 02 3e 6b |C >k | LEA.L 0x23e6b,A1 00020f24 70 1d |p | MOVEQ.L #0x1d,D0 00020f26 10 d9 | | MOVE.B (A1)+,(A0)+ 00020f28 51 c8 ff fc |Q | DBF D0,0x20f26 00020f2c 42 27 |B' | CLR.B -(A7) 00020f2e 59 4f |YO | SUBQ.L #0x4,A7 00020f30 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020f34 3f 01 |? | MOVE.W D1,-(A7) 00020f36 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00020f3a 4e 92 |N | JSR (A2) 00020f3c 5c 4f |\O | ADDQ.L #0x6,A7 00020f3e 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00020f42 1f 01 | | MOVE.B D1,-(A7) 00020f44 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00020f48 48 6e ff fe |Hn | PEA.L (A6-0x2) 00020f4c 4e ba f7 1a |N | JSR 0x20668 00020f50 de fc 00 2e | . | ADDA.W #0x2e,A7 00020f54 4c df 07 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2 00020f58 4e 5e |N^ | UNLK A6 00020f5a 4e 75 |Nu | RTS 00020f5c ; -------------------------------------------------------------------------------------- 00020f5c ; OMSI PASCAL Function 00020f5c ; <LVAR -0x004 1(rw)> 00020f5c ; -------------------------------------------------------------------------------------- 00020f5c 4e 56 ff cc |NV | LINK.W A6,#0xffcc 00020f60 bf d5 | | CMPA.L (A5),A7 00020f62 62 06 |b | BHI 0x20f6a 00020f64 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020f68 4e 76 |Nv | TRAPV 00020f6a de fc 00 30 | 0 | ADDA.W #0x30,A7 00020f6e 48 e7 f8 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7) 00020f72 41 f9 00 01 04 c0 |A | LEA.L HasBoard(diproc_addr: Byte) : Byte,A0 00020f78 43 ee ff fc |C | LEA.L (A6-0x4),A1 00020f7c 45 f9 00 02 37 b6 |E 7 | LEA.L 0x237b6,A2 00020f82 47 f9 00 02 3b 70 |G ;p | LEA.L 0x23b70,A3 00020f88 49 f9 00 02 3a c6 |I : | LEA.L 0x23ac6,A4 00020f8e 70 0c |p | MOVEQ.L #0x0c,D0 00020f90 72 0d |r | MOVEQ.L #0x0d,D1 00020f92 74 0e |t | MOVEQ.L #0x0e,D2 00020f94 76 0f |v | MOVEQ.L #0x0f,D3 00020f96 38 3c 01 45 |8< E | MOVE.W #0x145,D4 00020f9a 4e b9 00 02 35 92 |N 5 | JSR exp_LOAD_BENIGN_UWORD.TYP() 00020fa0 55 4f |UO | SUBQ.L #0x2,A7 00020fa2 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00020fa8 4a 1f |J | TST.B (A7)+ 00020faa 67 04 |g | BEQ 0x20fb0 00020fac 42 11 |B | CLR.B (A1) 00020fae 60 04 |` | BRA 0x20fb4 00020fb0 12 bc 00 ff | | MOVE.B #0xff,(A1) 00020fb4 55 4f |UO | SUBQ.L #0x2,A7 00020fb6 1f 00 | | MOVE.B D0,-(A7) 00020fb8 4e 90 |N | JSR (A0) 00020fba 54 4f |TO | ADDQ.L #0x2,A7 00020fbc 4a 1f |J | TST.B (A7)+ 00020fbe 67 08 |g | BEQ 0x20fc8 00020fc0 1f 00 | | MOVE.B D0,-(A7) 00020fc2 1f 11 | | MOVE.B (A1),-(A7) 00020fc4 4e 92 |N | JSR (A2) 00020fc6 58 4f |XO | ADDQ.L #0x4,A7 00020fc8 55 4f |UO | SUBQ.L #0x2,A7 00020fca 1f 01 | | MOVE.B D1,-(A7) 00020fcc 4e 90 |N | JSR (A0) 00020fce 54 4f |TO | ADDQ.L #0x2,A7 00020fd0 4a 1f |J | TST.B (A7)+ 00020fd2 67 08 |g | BEQ 0x20fdc 00020fd4 1f 01 | | MOVE.B D1,-(A7) 00020fd6 1f 11 | | MOVE.B (A1),-(A7) 00020fd8 4e 92 |N | JSR (A2) 00020fda 58 4f |XO | ADDQ.L #0x4,A7 00020fdc 55 4f |UO | SUBQ.L #0x2,A7 00020fde 1f 02 | | MOVE.B D2,-(A7) 00020fe0 4e 90 |N | JSR (A0) 00020fe2 54 4f |TO | ADDQ.L #0x2,A7 00020fe4 4a 1f |J | TST.B (A7)+ 00020fe6 67 08 |g | BEQ 0x20ff0 00020fe8 1f 02 | | MOVE.B D2,-(A7) 00020fea 1f 11 | | MOVE.B (A1),-(A7) 00020fec 4e 92 |N | JSR (A2) 00020fee 58 4f |XO | ADDQ.L #0x4,A7 00020ff0 55 4f |UO | SUBQ.L #0x2,A7 00020ff2 1f 03 | | MOVE.B D3,-(A7) 00020ff4 4e 90 |N | JSR (A0) 00020ff6 54 4f |TO | ADDQ.L #0x2,A7 00020ff8 4a 1f |J | TST.B (A7)+ 00020ffa 67 08 |g | BEQ 0x21004 00020ffc 1f 03 | | MOVE.B D3,-(A7) 00020ffe 1f 11 | | MOVE.B (A1),-(A7) 00021000 4e 92 |N | JSR (A2) 00021002 58 4f |XO | ADDQ.L #0x4,A7 00021004 4e b9 00 02 34 64 |N 4d | JSR exp_INIT_MRU.FIU() 0002100a 55 4f |UO | SUBQ.L #0x2,A7 0002100c 1f 00 | | MOVE.B D0,-(A7) 0002100e 4e 90 |N | JSR (A0) 00021010 54 4f |TO | ADDQ.L #0x2,A7 00021012 4a 1f |J | TST.B (A7)+ 00021014 67 06 |g | BEQ 0x2101c 00021016 1f 00 | | MOVE.B D0,-(A7) 00021018 4e 93 |N | JSR (A3) 0002101a 54 4f |TO | ADDQ.L #0x2,A7 0002101c 55 4f |UO | SUBQ.L #0x2,A7 0002101e 1f 01 | | MOVE.B D1,-(A7) 00021020 4e 90 |N | JSR (A0) 00021022 54 4f |TO | ADDQ.L #0x2,A7 00021024 4a 1f |J | TST.B (A7)+ 00021026 67 06 |g | BEQ 0x2102e 00021028 1f 01 | | MOVE.B D1,-(A7) 0002102a 4e 93 |N | JSR (A3) 0002102c 54 4f |TO | ADDQ.L #0x2,A7 0002102e 55 4f |UO | SUBQ.L #0x2,A7 00021030 1f 02 | | MOVE.B D2,-(A7) 00021032 4e 90 |N | JSR (A0) 00021034 54 4f |TO | ADDQ.L #0x2,A7 00021036 4a 1f |J | TST.B (A7)+ 00021038 67 06 |g | BEQ 0x21040 0002103a 1f 02 | | MOVE.B D2,-(A7) 0002103c 4e 93 |N | JSR (A3) 0002103e 54 4f |TO | ADDQ.L #0x2,A7 00021040 55 4f |UO | SUBQ.L #0x2,A7 00021042 1f 03 | | MOVE.B D3,-(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 03 | | MOVE.B D3,-(A7) 0002104e 4e 93 |N | JSR (A3) 00021050 54 4f |TO | ADDQ.L #0x2,A7 00021052 3f 04 |? | MOVE.W D4,-(A7) 00021054 4e b9 00 02 35 78 |N 5x | JSR exp_PREP_RUN.TYP(Sw_2) 0002105a 3e 84 |> | MOVE.W D4,(A7) 0002105c 4e b9 00 02 36 30 |N 60 | JSR exp_PREP_RUN.VAL(Sw_2) 00021062 3e 84 |> | MOVE.W D4,(A7) 00021064 4e b9 00 02 3c 0e |N < | JSR exp_PREP_RUN.IOC(Sw_2) 0002106a 3e 84 |> | MOVE.W D4,(A7) 0002106c 4e b9 00 02 34 fc |N 4 | JSR exp_PREP_RUN.SEQ(Sw_2) 00021072 3e 84 |> | MOVE.W D4,(A7) 00021074 4e b9 00 02 34 2e |N 4. | JSR exp_PREP_RUN.FIU(Sw_2) 0002107a 1f 00 | | MOVE.B D0,-(A7) 0002107c 4e 90 |N | JSR (A0) 0002107e 54 4f |TO | ADDQ.L #0x2,A7 00021080 4a 1f |J | TST.B (A7)+ 00021082 67 06 |g | BEQ 0x2108a 00021084 1f 00 | | MOVE.B D0,-(A7) 00021086 4e 94 |N | JSR (A4) 00021088 54 4f |TO | ADDQ.L #0x2,A7 0002108a 55 4f |UO | SUBQ.L #0x2,A7 0002108c 1f 01 | | MOVE.B D1,-(A7) 0002108e 4e 90 |N | JSR (A0) 00021090 54 4f |TO | ADDQ.L #0x2,A7 00021092 4a 1f |J | TST.B (A7)+ 00021094 67 06 |g | BEQ 0x2109c 00021096 1f 01 | | MOVE.B D1,-(A7) 00021098 4e 94 |N | JSR (A4) 0002109a 54 4f |TO | ADDQ.L #0x2,A7 0002109c 55 4f |UO | SUBQ.L #0x2,A7 0002109e 1f 02 | | MOVE.B D2,-(A7) 000210a0 4e 90 |N | JSR (A0) 000210a2 54 4f |TO | ADDQ.L #0x2,A7 000210a4 4a 1f |J | TST.B (A7)+ 000210a6 67 06 |g | BEQ 0x210ae 000210a8 1f 02 | | MOVE.B D2,-(A7) 000210aa 4e 94 |N | JSR (A4) 000210ac 54 4f |TO | ADDQ.L #0x2,A7 000210ae 55 4f |UO | SUBQ.L #0x2,A7 000210b0 1f 03 | | MOVE.B D3,-(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 03 | | MOVE.B D3,-(A7) 000210bc 4e 94 |N | JSR (A4) 000210be 54 4f |TO | ADDQ.L #0x2,A7 000210c0 4c df 1f 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4 000210c4 4e 5e |N^ | UNLK A6 000210c6 4e 75 |Nu | RTS 000210c8 ; -------------------------------------------------------------------------------------- 000210c8 ; OMSI PASCAL Function 000210c8 ; <LVAR -0x002 @ 2(w)> 000210c8 ; <LVAR -0x004 @> 000210c8 ; -------------------------------------------------------------------------------------- 000210c8 4e 56 ff 84 |NV | LINK.W A6,#0xff84 000210cc bf d5 | | CMPA.L (A5),A7 000210ce 62 06 |b | BHI 0x210d6 000210d0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000210d4 4e 76 |Nv | TRAPV 000210d6 de fc 00 78 | x | ADDA.W #0x78,A7 000210da 48 e7 fe e0 |H | MOVEM.L A2+A1+A0+D6+D5+D4+D3+D2+D1+D0,-(A7) 000210de 43 f9 00 01 04 c0 |C | LEA.L HasBoard(diproc_addr: Byte) : Byte,A1 000210e4 45 f9 00 02 38 7c |E 8| | LEA.L 0x2387c,A2 000210ea 72 01 |r | MOVEQ.L #0x01,D1 000210ec 74 3a |t: | MOVEQ.L #0x3a,D2 000210ee 76 0c |v | MOVEQ.L #0x0c,D3 000210f0 78 0d |x | MOVEQ.L #0x0d,D4 000210f2 7a 0e |z | MOVEQ.L #0x0e,D5 000210f4 7c 0f || | MOVEQ.L #0x0f,D6 000210f6 4e ba fe 64 |N d | JSR 0x20f5c 000210fa 4a 39 00 02 3e 3c |J9 >< | TST.B 0x23e3c 00021100 67 6c |gl | BEQ 0x2116e 00021102 41 fa f0 b8 |A | LEA.L 0x201bc,A0 00021106 70 1c |p | MOVEQ.L #0x1c,D0 00021108 3f 20 |? | MOVE.W -(A0),-(A7) 0002110a 51 c8 ff fc |Q | DBF D0,0x21108 0002110e 5d 4f |]O | SUBQ.L #0x6,A7 00021110 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021114 3f 01 |? | MOVE.W D1,-(A7) 00021116 3f 02 |? | MOVE.W D2,-(A7) 00021118 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002111e 5c 4f |\O | ADDQ.L #0x6,A7 00021120 42 17 |B | CLR.B (A7) 00021122 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00021128 5c 4f |\O | ADDQ.L #0x6,A7 0002112a 4a 1f |J | TST.B (A7)+ 0002112c 67 3e |g> | BEQ 0x2116c 0002112e 59 4f |YO | SUBQ.L #0x4,A7 00021130 1e ba f0 8a | | MOVE.B 0x201bc,(A7) 00021134 1f 7a f0 87 00 01 | z | MOVE.B 0x201bd,(A7+0x1) 0002113a 1f 7a f0 82 00 02 | z | MOVE.B 0x201be,(A7+0x2) 00021140 59 4f |YO | SUBQ.L #0x4,A7 00021142 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021146 3f 01 |? | MOVE.W D1,-(A7) 00021148 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 0002114c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021152 50 4f |PO | ADDQ.L #0x8,A7 00021154 48 78 00 01 |Hx | PEA.L 0x1 00021158 1f 01 | | MOVE.B D1,-(A7) 0002115a 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002115e 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00021164 de fc 00 12 | | ADDA.W #0x12,A7 00021168 4e ba fd f2 |N | JSR 0x20f5c 0002116c de c2 | | ADDA.W D2,A7 0002116e 4e b9 00 02 34 7e |N 4~ | JSR exp_FREEZE_WORLD.FIU() 00021174 4e b9 00 02 35 5c |N 5\ | JSR exp_RUN_NORMAL.TYP() 0002117a 4e b9 00 02 36 14 |N 6 | JSR exp_RUN_NORMAL.VAL() 00021180 4e b9 00 02 34 e2 |N 4 | JSR exp_RUN_CHECK.SEQ() 00021186 4e b9 00 02 3b f4 |N ; | JSR exp_RUN_CHECK.IOC() 0002118c 55 4f |UO | SUBQ.L #0x2,A7 0002118e 1f 03 | | MOVE.B D3,-(A7) 00021190 4e 91 |N | JSR (A1) 00021192 54 4f |TO | ADDQ.L #0x2,A7 00021194 4a 1f |J | TST.B (A7)+ 00021196 67 06 |g | BEQ 0x2119e 00021198 1f 03 | | MOVE.B D3,-(A7) 0002119a 4e 92 |N | JSR (A2) 0002119c 54 4f |TO | ADDQ.L #0x2,A7 0002119e 55 4f |UO | SUBQ.L #0x2,A7 000211a0 1f 04 | | MOVE.B D4,-(A7) 000211a2 4e 91 |N | JSR (A1) 000211a4 54 4f |TO | ADDQ.L #0x2,A7 000211a6 4a 1f |J | TST.B (A7)+ 000211a8 67 06 |g | BEQ 0x211b0 000211aa 1f 04 | | MOVE.B D4,-(A7) 000211ac 4e 92 |N | JSR (A2) 000211ae 54 4f |TO | ADDQ.L #0x2,A7 000211b0 55 4f |UO | SUBQ.L #0x2,A7 000211b2 1f 05 | | MOVE.B D5,-(A7) 000211b4 4e 91 |N | JSR (A1) 000211b6 54 4f |TO | ADDQ.L #0x2,A7 000211b8 4a 1f |J | TST.B (A7)+ 000211ba 67 06 |g | BEQ 0x211c2 000211bc 1f 05 | | MOVE.B D5,-(A7) 000211be 4e 92 |N | JSR (A2) 000211c0 54 4f |TO | ADDQ.L #0x2,A7 000211c2 55 4f |UO | SUBQ.L #0x2,A7 000211c4 1f 06 | | MOVE.B D6,-(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 06 | | MOVE.B D6,-(A7) 000211d0 4e 92 |N | JSR (A2) 000211d2 54 4f |TO | ADDQ.L #0x2,A7 000211d4 4e b9 00 02 33 ea |N 3 | JSR exp_RUN_NORMAL.FIU() 000211da 3d 41 ff fe |=A | MOVE.W D1,(A6-0x2) 000211de 41 ee ff fe |A | LEA.L (A6-0x2),A0 000211e2 2f 08 |/ | MOVE.L A0,-(A7) 000211e4 52 97 |R | ADDQ.L #0x1,(A7) 000211e6 2f 3c 00 00 fc 10 |/< | MOVE.L #0xfc10,-(A7) 000211ec 3f 01 |? | MOVE.W D1,-(A7) 000211ee 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 000211f4 5c 4f |\O | ADDQ.L #0x6,A7 000211f6 2e bc 00 00 98 96 |. | MOVE.L #0x9896,(A7) 000211fc 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 00021202 58 4f |XO | ADDQ.L #0x4,A7 00021204 4c df 07 7f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+A0+A1+A2 00021208 4e 5e |N^ | UNLK A6 0002120a 4e 75 |Nu | RTS 0002120c ; -------------------------------------------------------------------------------------- 0002120c ; OMSI PASCAL Function 0002120c ; <LVAR 0x00c 1(w)> 0002120c ; <LVAR 0x008 4(r)> 0002120c ; <LVAR -0x00c @ 4(rw)> 0002120c ; -------------------------------------------------------------------------------------- 0002120c 4e 56 ff a0 |NV | LINK.W A6,#0xffa0 00021210 bf d5 | | CMPA.L (A5),A7 00021212 62 06 |b | BHI 0x2121a 00021214 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021218 4e 76 |Nv | TRAPV 0002121a de fc 00 54 | T | ADDA.W #0x54,A7 0002121e 48 e7 fb e0 |H | MOVEM.L A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7) 00021222 45 ee ff f4 |E | LEA.L (A6-0xc),A2 00021226 72 0a |r | MOVEQ.L #0x0a,D1 00021228 74 01 |t | MOVEQ.L #0x01,D2 0002122a 7e 00 |~ | MOVEQ.L #0x00,D7 0002122c 28 07 |( | MOVE.L D7,D4 0002122e 76 0a |v | MOVEQ.L #0x0a,D3 00021230 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00021236 41 fa f3 44 |A D | LEA.L 0x2057c,A0 0002123a 9e c1 | | SUBA.W D1,A7 0002123c 22 4f |"O | MOVEA.L A7,A1 0002123e 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0 00021242 70 09 |p | MOVEQ.L #0x09,D0 00021244 12 d8 | | MOVE.B (A0)+,(A1)+ 00021246 51 c8 ff fc |Q | DBF D0,0x21244 0002124a 59 4f |YO | SUBQ.L #0x4,A7 0002124c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021250 3f 02 |? | MOVE.W D2,-(A7) 00021252 3f 01 |? | MOVE.W D1,-(A7) 00021254 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002125a 50 4f |PO | ADDQ.L #0x8,A7 0002125c 24 9f |$ | MOVE.L (A7)+,(A2) 0002125e 58 4f |XO | ADDQ.L #0x4,A7 00021260 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00021264 2f 12 |/ | MOVE.L (A2),-(A7) 00021266 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 0002126c 50 4f |PO | ADDQ.L #0x8,A7 0002126e 1c 1f | | MOVE.B (A7)+,D6 00021270 48 52 |HR | PEA.L (A2) 00021272 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021278 58 4f |XO | ADDQ.L #0x4,A7 0002127a 4a 06 |J | TST.B D6 0002127c 67 0c |g | BEQ 0x2128a 0002127e 41 fa f3 4c |A L | LEA.L 0x205cc,A0 00021282 1d 70 78 00 00 0c | px | MOVE.B (A0+D7.L),(A6+0xc) 00021288 60 4a |`J | BRA 0x212d4 0002128a 52 87 |R | ADDQ.L #0x1,D7 0002128c 0c 87 00 00 00 07 | | CMPI.L #0x00000007,D7 00021292 6f 98 |o | BLE 0x2122c 00021294 9e fc 00 16 | | SUBA.W #0x16,A7 00021298 20 4f | O | MOVEA.L A7,A0 0002129a 43 fa ef 74 |C t | LEA.L 0x20210,A1 0002129e 70 14 |p | MOVEQ.L #0x14,D0 000212a0 10 d9 | | MOVE.B (A1)+,(A0)+ 000212a2 51 c8 ff fc |Q | DBF D0,0x212a0 000212a6 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 000212aa 51 4f |QO | SUBQ.L #0x8,A7 000212ac 48 6f 00 0a |Ho | PEA.L (A7+0xa) 000212b0 3f 02 |? | MOVE.W D2,-(A7) 000212b2 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 000212b6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000212bc 58 4f |XO | ADDQ.L #0x4,A7 000212be 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 000212c2 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000212c8 50 4f |PO | ADDQ.L #0x8,A7 000212ca 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000212d0 de fc 00 1c | | ADDA.W #0x1c,A7 000212d4 4c df 07 df |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2 000212d8 4e 5e |N^ | UNLK A6 000212da 4e 75 |Nu | RTS 000212dc ; -------------------------------------------------------------------------------------- 000212dc ; OMSI PASCAL Function 000212dc ; <LVAR 0x00e 4(r)> 000212dc ; <LVAR 0x00a 4(r)> 000212dc ; <LVAR 0x008 1(r)> 000212dc ; <LVAR -0x002 2(w)> 000212dc ; <LVAR -0x004 2(w) 4(r)> 000212dc ; <LVAR -0x006 2(w)> 000212dc ; <LVAR -0x008 2(w) 4(r)> 000212dc ; <LVAR -0x418 @> 000212dc ; <LVAR -0x41e @ 1(r)> 000212dc ; -------------------------------------------------------------------------------------- 000212dc 4e 56 fb 82 |NV | LINK.W A6,#0xfb82 000212e0 bf d5 | | CMPA.L (A5),A7 000212e2 62 06 |b | BHI 0x212ea 000212e4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000212e8 4e 76 |Nv | TRAPV 000212ea de fc 00 60 | ` | ADDA.W #0x60,A7 000212ee 48 e7 f9 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 000212f2 45 ee ff f8 |E | LEA.L (A6-0x8),A2 000212f6 47 ee ff fc |G | LEA.L (A6-0x4),A3 000212fa 49 ee fb e2 |I | LEA.L (A6-0x41e),A4 000212fe 72 01 |r | MOVEQ.L #0x01,D1 00021300 74 0a |t | MOVEQ.L #0x0a,D2 00021302 76 0c |v | MOVEQ.L #0x0c,D3 00021304 78 18 |x | MOVEQ.L #0x18,D4 00021306 2f 2e 00 0a |/. | MOVE.L (A6+0xa),-(A7) 0002130a 2f 39 00 02 41 74 |/9 At | MOVE.L 0x24174,-(A7) 00021310 3f 3c 04 00 |?< | MOVE.W #0x400,-(A7) 00021314 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 0002131a de c2 | | ADDA.W D2,A7 0002131c 20 6e 00 0e | n | MOVEA.L (A6+0xe),A0 00021320 2f 08 |/ | MOVE.L A0,-(A7) 00021322 42 67 |Bg | CLR.W -(A7) 00021324 4e b9 00 01 02 3c |N < | JSR KC1e_Fifo_Tx_Response(ptr : Pointer; chan : Word) 0002132a 5c 4f |\O | ADDQ.L #0x6,A7 0002132c 4a 2e 00 08 |J. | TST.B (A6+0x8) 00021330 67 00 00 f2 |g | BEQ 0x21424 00021334 2e 3c ff ff b1 e0 |.< | MOVE.L #0xffffb1e0,D7 0002133a 41 ee fb e8 |A | LEA.L (A6-0x418),A0 0002133e 2f 08 |/ | MOVE.L A0,-(A7) 00021340 42 67 |Bg | CLR.W -(A7) 00021342 48 54 |HT | PEA.L (A4) 00021344 4e b9 00 01 02 3e |N > | JSR KC1f_Fifo_Rx_Request(ptr : Pointer; chan : Word; VAR flag : Bool) 0002134a de c2 | | ADDA.W D2,A7 0002134c 52 87 |R | ADDQ.L #0x1,D7 0002134e 67 04 |g | BEQ 0x21354 00021350 4a 14 |J | TST.B (A4) 00021352 67 e6 |g | BEQ 0x2133a 00021354 4a 14 |J | TST.B (A4) 00021356 66 00 00 cc |f | BNE 0x21424 0002135a 20 6e 00 0e | n | MOVEA.L (A6+0xe),A0 0002135e 34 90 |4 | MOVE.W (A0),(A2) 00021360 3d 68 00 02 ff fa |=h | MOVE.W (A0+0x2),(A6-0x6) 00021366 36 a8 00 04 |6 | MOVE.W (A0+0x4),(A3) 0002136a 3d 68 00 06 ff fe |=h | MOVE.W (A0+0x6),(A6-0x2) 00021370 43 fa ee e0 |C | LEA.L 0x20252,A1 00021374 70 04 |p | MOVEQ.L #0x04,D0 00021376 2f 21 |/! | MOVE.L -(A1),-(A7) 00021378 51 c8 ff fc |Q | DBF D0,0x21376 0002137c 51 4f |QO | SUBQ.L #0x8,A7 0002137e 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021382 3f 01 |? | MOVE.W D1,-(A7) 00021384 3f 3c 00 14 |?< | MOVE.W #0x14,-(A7) 00021388 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002138e 2e 93 |. | MOVE.L (A3),(A7) 00021390 2f 12 |/ | MOVE.L (A2),-(A7) 00021392 48 78 00 10 |Hx | PEA.L 0x10 00021396 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 0002139c de c3 | | ADDA.W D3,A7 0002139e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000213a4 50 4f |PO | ADDQ.L #0x8,A7 000213a6 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000213ac de c4 | | ADDA.W D4,A7 000213ae 34 a8 00 08 |4 | MOVE.W (A0+0x8),(A2) 000213b2 3d 68 00 0a ff fa |=h | MOVE.W (A0+0xa),(A6-0x6) 000213b8 36 a8 00 0c |6 | MOVE.W (A0+0xc),(A3) 000213bc 3d 68 00 0e ff fe |=h | MOVE.W (A0+0xe),(A6-0x2) 000213c2 3f 3a ee 8e |?: | MOVE.W 0x20252,-(A7) 000213c6 51 4f |QO | SUBQ.L #0x8,A7 000213c8 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000213cc 3f 01 |? | MOVE.W D1,-(A7) 000213ce 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 000213d2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000213d8 2e 93 |. | MOVE.L (A3),(A7) 000213da 2f 12 |/ | MOVE.L (A2),-(A7) 000213dc 48 78 00 10 |Hx | PEA.L 0x10 000213e0 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 000213e6 de c3 | | ADDA.W D3,A7 000213e8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000213ee 50 4f |PO | ADDQ.L #0x8,A7 000213f0 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000213f6 5c 4f |\O | ADDQ.L #0x6,A7 000213f8 41 fa ee 44 |A D | LEA.L 0x2023e,A0 000213fc 70 05 |p | MOVEQ.L #0x05,D0 000213fe 2f 20 |/ | MOVE.L -(A0),-(A7) 00021400 51 c8 ff fc |Q | DBF D0,0x213fe 00021404 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00021408 59 4f |YO | SUBQ.L #0x4,A7 0002140a 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002140e 3f 01 |? | MOVE.W D1,-(A7) 00021410 3f 04 |? | MOVE.W D4,-(A7) 00021412 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021418 50 4f |PO | ADDQ.L #0x8,A7 0002141a 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021420 de fc 00 1e | | ADDA.W #0x1e,A7 00021424 4c df 1f 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4 00021428 4e 5e |N^ | UNLK A6 0002142a 4e 75 |Nu | RTS 0002142c ; -------------------------------------------------------------------------------------- 0002142c ; OMSI PASCAL Function 0002142c ; <LVAR -0x003 @ 1(r)> 0002142c ; <LVAR -0x005 @ 1(r)> 0002142c ; <LVAR -0x006 @ 1(r)> 0002142c ; <LVAR -0x007 @ 1(r)> 0002142c ; <LVAR -0x008 @ 1(r)> 0002142c ; <LVAR -0x009 @ 1(r)> 0002142c ; <LVAR -0x00a @> 0002142c ; <LVAR -0x00b @> 0002142c ; -------------------------------------------------------------------------------------- 0002142c 4e 56 ff be |NV | LINK.W A6,#0xffbe 00021430 bf d5 | | CMPA.L (A5),A7 00021432 62 06 |b | BHI 0x2143a 00021434 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021438 4e 76 |Nv | TRAPV 0002143a de fc 00 36 | 6 | ADDA.W #0x36,A7 0002143e 48 e7 e3 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D2+D1+D0,-(A7) 00021442 41 ee ff f5 |A | LEA.L (A6-0xb),A0 00021446 43 ee ff f6 |C | LEA.L (A6-0xa),A1 0002144a 45 f9 00 01 04 84 |E | LEA.L DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool),A2 00021450 72 0c |r | MOVEQ.L #0x0c,D1 00021452 74 0e |t | MOVEQ.L #0x0e,D2 00021454 1f 3c 00 04 | < | MOVE.B #0x04,-(A7) 00021458 48 50 |HP | PEA.L (A0) 0002145a 48 6e ff f7 |Hn | PEA.L (A6-0x9) 0002145e 48 51 |HQ | PEA.L (A1) 00021460 4e 92 |N | JSR (A2) 00021462 de c1 | | ADDA.W D1,A7 00021464 1e bc 00 06 | | MOVE.B #0x06,(A7) 00021468 48 50 |HP | PEA.L (A0) 0002146a 48 6e ff f8 |Hn | PEA.L (A6-0x8) 0002146e 48 51 |HQ | PEA.L (A1) 00021470 4e 92 |N | JSR (A2) 00021472 de c1 | | ADDA.W D1,A7 00021474 1e bc 00 07 | | MOVE.B #0x07,(A7) 00021478 48 50 |HP | PEA.L (A0) 0002147a 48 6e ff f9 |Hn | PEA.L (A6-0x7) 0002147e 48 51 |HQ | PEA.L (A1) 00021480 4e 92 |N | JSR (A2) 00021482 de c1 | | ADDA.W D1,A7 00021484 1e bc 00 03 | | MOVE.B #0x03,(A7) 00021488 48 50 |HP | PEA.L (A0) 0002148a 48 6e ff fa |Hn | PEA.L (A6-0x6) 0002148e 48 51 |HQ | PEA.L (A1) 00021490 4e 92 |N | JSR (A2) 00021492 de c1 | | ADDA.W D1,A7 00021494 1e bc 00 02 | | MOVE.B #0x02,(A7) 00021498 48 50 |HP | PEA.L (A0) 0002149a 48 6e ff fb |Hn | PEA.L (A6-0x5) 0002149e 48 51 |HQ | PEA.L (A1) 000214a0 4e 92 |N | JSR (A2) 000214a2 de c2 | | ADDA.W D2,A7 000214a4 7e 00 |~ | MOVEQ.L #0x00,D7 000214a6 7c 0c || | MOVEQ.L #0x0c,D6 000214a8 55 4f |UO | SUBQ.L #0x2,A7 000214aa 1f 06 | | MOVE.B D6,-(A7) 000214ac 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 000214b2 54 4f |TO | ADDQ.L #0x2,A7 000214b4 4a 1f |J | TST.B (A7)+ 000214b6 67 1c |g | BEQ 0x214d4 000214b8 1f 06 | | MOVE.B D6,-(A7) 000214ba 48 50 |HP | PEA.L (A0) 000214bc 48 6e ff fd |Hn | PEA.L (A6-0x3) 000214c0 48 51 |HQ | PEA.L (A1) 000214c2 4e 92 |N | JSR (A2) 000214c4 de c2 | | ADDA.W D2,A7 000214c6 10 07 | | MOVE.B D7,D0 000214c8 80 2e ff fd | . | OR.B (A6-0x3),D0 000214cc 48 80 |H | EXTB.W D0 000214ce 41 bc 00 01 |A | CHK.W #0x1,D0 000214d2 1e 00 | | MOVE.B D0,D7 000214d4 52 06 |R | ADDQ.B #0x1,D6 000214d6 0c 06 00 0f | | CMPI.B #0x0f,D6 000214da 6f cc |o | BLE 0x214a8 000214dc 4a 2e ff f7 |J. | TST.B (A6-0x9) 000214e0 66 1c |f | BNE 0x214fe 000214e2 4a 2e ff f8 |J. | TST.B (A6-0x8) 000214e6 66 16 |f | BNE 0x214fe 000214e8 4a 2e ff f9 |J. | TST.B (A6-0x7) 000214ec 66 10 |f | BNE 0x214fe 000214ee 4a 2e ff fa |J. | TST.B (A6-0x6) 000214f2 66 0a |f | BNE 0x214fe 000214f4 4a 2e ff fb |J. | TST.B (A6-0x5) 000214f8 66 04 |f | BNE 0x214fe 000214fa 4a 07 |J | TST.B D7 000214fc 67 0a |g | BEQ 0x21508 000214fe 1f 01 | | MOVE.B D1,-(A7) 00021500 4e b9 00 01 05 da |N | JSR Set_fc01(a : Byte) 00021506 54 4f |TO | ADDQ.L #0x2,A7 00021508 4c df 07 c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0+A1+A2 0002150c 4e 5e |N^ | UNLK A6 0002150e 4e 75 |Nu | RTS 00021510 ; -------------------------------------------------------------------------------------- 00021510 ; OMSI PASCAL Function 00021510 ; <LVAR 0x008 @ 4(r)> 00021510 ; <LVAR -0x004 2(w)> 00021510 ; <LVAR -0x006 2(w) 4(r)> 00021510 ; <LVAR -0x008 2(w)> 00021510 ; <LVAR -0x00a 2(w) 4(r)> 00021510 ; <LVAR -0x00c @> 00021510 ; <LVAR -0x00d @> 00021510 ; <LVAR -0x00e @ 1(r)> 00021510 ; <LVAR -0x41e @> 00021510 ; <LVAR -0x420 2(rw)> 00021510 ; <LVAR -0x422 2(rw)> 00021510 ; <LVAR -0x424 2(rw)> 00021510 ; <LVAR -0x426 2(rw)> 00021510 ; <LVAR -0x428 2(rw)> 00021510 ; <LVAR -0x42a 2(r)> 00021510 ; <LVAR -0x42c 2(r)> 00021510 ; <LVAR -0x42e @ 2(rw)> 00021510 ; <LVAR -0x43a @ 4(r)> 00021510 ; <LVAR -0x83e 2(r)> 00021510 ; <LVAR -0x840 2(r) 4(w)> 00021510 ; <LVAR -0x844 4(w)> 00021510 ; <LVAR -0x848 @ 4(r)> 00021510 ; <LVAR -0x84c @ 4(r)> 00021510 ; -------------------------------------------------------------------------------------- 00021510 4e 56 f7 48 |NV H | LINK.W A6,#0xf748 00021514 bf d5 | | CMPA.L (A5),A7 00021516 62 06 |b | BHI 0x2151e 00021518 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002151c 4e 76 |Nv | TRAPV 0002151e de fc 00 6c | l | ADDA.W #0x6c,A7 00021522 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021526 43 ee f7 b8 |C | LEA.L (A6-0x848),A1 0002152a 45 ee fb e0 |E | LEA.L (A6-0x420),A2 0002152e 47 ee f7 b4 |G | LEA.L (A6-0x84c),A3 00021532 49 ee 00 08 |I | LEA.L (A6+0x8),A4 00021536 72 02 |r | MOVEQ.L #0x02,D1 00021538 74 0c |t | MOVEQ.L #0x0c,D2 0002153a 76 14 |v | MOVEQ.L #0x14,D3 0002153c 78 01 |x | MOVEQ.L #0x01,D4 0002153e 48 53 |HS | PEA.L (A3) 00021540 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00021546 2e 94 |. | MOVE.L (A4),(A7) 00021548 2f 13 |/ | MOVE.L (A3),-(A7) 0002154a 48 6e ff f4 |Hn | PEA.L (A6-0xc) 0002154e 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 00021554 de c2 | | ADDA.W D2,A7 00021556 48 51 |HQ | PEA.L (A1) 00021558 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 0002155e 2e 94 |. | MOVE.L (A4),(A7) 00021560 2f 11 |/ | MOVE.L (A1),-(A7) 00021562 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00021566 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 0002156c 5c 4f |\O | ADDQ.L #0x6,A7 0002156e 2e 91 |. | MOVE.L (A1),(A7) 00021570 4e ba fc 9a |N | JSR 0x2120c 00021574 58 4f |XO | ADDQ.L #0x4,A7 00021576 10 1f | | MOVE.B (A7)+,D0 00021578 48 80 |H | EXTB.W D0 0002157a 41 bc 00 07 |A | CHK.W #0x7,D0 0002157e 1a 00 | | MOVE.B D0,D5 00021580 2f 14 |/ | MOVE.L (A4),-(A7) 00021582 2f 11 |/ | MOVE.L (A1),-(A7) 00021584 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00021588 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 0002158e 2e 91 |. | MOVE.L (A1),(A7) 00021590 48 78 00 10 |Hx | PEA.L 0x10 00021594 4e b9 00 01 03 60 |N ` | JSR ?StringToInt64() 0002159a 50 4f |PO | ADDQ.L #0x8,A7 0002159c 2d 5f f7 bc |-_ | MOVE.L (A7)+,(A6-0x844) 000215a0 2d 5f f7 c0 |-_ | MOVE.L (A7)+,(A6-0x840) 000215a4 3d 79 00 02 41 70 fb d2 |=y Ap | MOVE.W 0x24170,(A6-0x42e) 000215ac 42 6e fb d4 |Bn | CLR.W (A6-0x42c) 000215b0 42 6e fb d6 |Bn | CLR.W (A6-0x42a) 000215b4 3d 7c 01 00 fb d8 |=| | MOVE.W #0x100,(A6-0x428) 000215ba 3d 6e f7 c0 fb da |=n | MOVE.W (A6-0x840),(A6-0x426) 000215c0 3d 6e f7 c2 fb dc |=n | MOVE.W (A6-0x83e),(A6-0x424) 000215c6 42 6e fb de |Bn | CLR.W (A6-0x422) 000215ca 10 05 | | MOVE.B D5,D0 000215cc 48 80 |H | EXTB.W D0 000215ce 34 80 |4 | MOVE.W D0,(A2) 000215d0 4a 39 00 02 41 5e |J9 A^ | TST.B 0x2415e 000215d6 67 06 |g | BEQ 0x215de 000215d8 00 40 00 08 | @ | ORI.W #0x0008,D0 000215dc 34 80 |4 | MOVE.W D0,(A2) 000215de 2f 13 |/ | MOVE.L (A3),-(A7) 000215e0 42 27 |B' | CLR.B -(A7) 000215e2 1f 01 | | MOVE.B D1,-(A7) 000215e4 48 78 00 00 |Hx | PEA.L 0x0 000215e8 48 6e ff f3 |Hn | PEA.L (A6-0xd) 000215ec 48 6e fb c6 |Hn | PEA.L (A6-0x43a) 000215f0 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000215f6 de c3 | | ADDA.W D3,A7 000215f8 20 6e fb c6 | n | MOVEA.L (A6-0x43a),A0 000215fc 30 28 00 20 |0( | MOVE.W (A0+0x20),D0 00021600 53 40 |S@ | SUBQ.W #0x1,D0 00021602 48 c0 |H | EXTW.L D0 00021604 2f 00 |/ | MOVE.L D0,-(A7) 00021606 7c 00 || | MOVEQ.L #0x00,D6 00021608 bc 97 | | CMP.L (A7),D6 0002160a 6e 00 01 8c |n | BGT 0x21798 0002160e 2f 2e fb c6 |/. | MOVE.L (A6-0x43a),-(A7) 00021612 0c 86 00 00 40 00 | @ | CMPI.L #0x00004000,D6 00021618 63 02 |c | BLS 0x2161c 0002161a 4e 4f |NO | TRAP #15 0002161c 3f 06 |? | MOVE.W D6,-(A7) 0002161e 42 67 |Bg | CLR.W -(A7) 00021620 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00021624 1f 01 | | MOVE.B D1,-(A7) 00021626 2f 39 00 02 41 74 |/9 At | MOVE.L 0x24174,-(A7) 0002162c 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00021630 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00021636 de c3 | | ADDA.W D3,A7 00021638 41 ee fb d2 |A | LEA.L (A6-0x42e),A0 0002163c 2f 08 |/ | MOVE.L A0,-(A7) 0002163e 42 67 |Bg | CLR.W -(A7) 00021640 4e b9 00 01 02 3c |N < | JSR KC1e_Fifo_Tx_Response(ptr : Pointer; chan : Word) 00021646 5c 4f |\O | ADDQ.L #0x6,A7 00021648 2e 3c ff ff b1 e0 |.< | MOVE.L #0xffffb1e0,D7 0002164e 41 ee fb e2 |A | LEA.L (A6-0x41e),A0 00021652 2f 08 |/ | MOVE.L A0,-(A7) 00021654 42 67 |Bg | CLR.W -(A7) 00021656 48 6e ff f2 |Hn | PEA.L (A6-0xe) 0002165a 4e b9 00 01 02 3e |N > | JSR KC1f_Fifo_Rx_Request(ptr : Pointer; chan : Word; VAR flag : Bool) 00021660 de fc 00 0a | | ADDA.W #0xa,A7 00021664 52 87 |R | ADDQ.L #0x1,D7 00021666 67 06 |g | BEQ 0x2166e 00021668 4a 2e ff f2 |J. | TST.B (A6-0xe) 0002166c 67 e0 |g | BEQ 0x2164e 0002166e 4a 2e ff f2 |J. | TST.B (A6-0xe) 00021672 66 00 00 dc |f | BNE 0x21750 00021676 4e ba fd b4 |N | JSR 0x2142c 0002167a 3d 6e fb d2 ff f6 |=n | MOVE.W (A6-0x42e),(A6-0xa) 00021680 3d 6e fb d4 ff f8 |=n | MOVE.W (A6-0x42c),(A6-0x8) 00021686 3d 6e fb d6 ff fa |=n | MOVE.W (A6-0x42a),(A6-0x6) 0002168c 3d 6e fb d8 ff fc |=n | MOVE.W (A6-0x428),(A6-0x4) 00021692 41 fa eb ec |A | LEA.L 0x20280,A0 00021696 70 04 |p | MOVEQ.L #0x04,D0 00021698 2f 20 |/ | MOVE.L -(A0),-(A7) 0002169a 51 c8 ff fc |Q | DBF D0,0x21698 0002169e 51 4f |QO | SUBQ.L #0x8,A7 000216a0 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000216a4 3f 04 |? | MOVE.W D4,-(A7) 000216a6 3f 03 |? | MOVE.W D3,-(A7) 000216a8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000216ae 2e ae ff fa |. | MOVE.L (A6-0x6),(A7) 000216b2 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 000216b6 48 78 00 10 |Hx | PEA.L 0x10 000216ba 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 000216c0 de c2 | | ADDA.W D2,A7 000216c2 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000216c8 50 4f |PO | ADDQ.L #0x8,A7 000216ca 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000216d0 de fc 00 18 | | ADDA.W #0x18,A7 000216d4 3d 6e fb da ff f6 |=n | MOVE.W (A6-0x426),(A6-0xa) 000216da 3d 6e fb dc ff f8 |=n | MOVE.W (A6-0x424),(A6-0x8) 000216e0 3d 6e fb de ff fa |=n | MOVE.W (A6-0x422),(A6-0x6) 000216e6 3d 52 ff fc |=R | MOVE.W (A2),(A6-0x4) 000216ea 3f 3a eb 94 |?: | MOVE.W 0x20280,-(A7) 000216ee 51 4f |QO | SUBQ.L #0x8,A7 000216f0 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000216f4 3f 04 |? | MOVE.W D4,-(A7) 000216f6 3f 01 |? | MOVE.W D1,-(A7) 000216f8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000216fe 2e ae ff fa |. | MOVE.L (A6-0x6),(A7) 00021702 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 00021706 48 78 00 10 |Hx | PEA.L 0x10 0002170a 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 00021710 de c2 | | ADDA.W D2,A7 00021712 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021718 50 4f |PO | ADDQ.L #0x8,A7 0002171a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021720 5c 4f |\O | ADDQ.L #0x6,A7 00021722 41 fa eb 48 |A H | LEA.L 0x2026c,A0 00021726 70 05 |p | MOVEQ.L #0x05,D0 00021728 2f 20 |/ | MOVE.L -(A0),-(A7) 0002172a 51 c8 ff fc |Q | DBF D0,0x21728 0002172e 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00021732 59 4f |YO | SUBQ.L #0x4,A7 00021734 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021738 3f 04 |? | MOVE.W D4,-(A7) 0002173a 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 0002173e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021744 50 4f |PO | ADDQ.L #0x8,A7 00021746 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002174c de fc 00 1e | | ADDA.W #0x1e,A7 00021750 42 80 |B | CLR.L D0 00021752 30 12 |0 | MOVE.W (A2),D0 00021754 06 80 00 00 20 00 | | ADDI.L #0x00002000,D0 0002175a 02 80 00 00 ff ff | | ANDI.L #0x0000ffff,D0 00021760 34 80 |4 | MOVE.W D0,(A2) 00021762 02 40 ff f0 | @ | ANDI.W #0xfff0,D0 00021766 66 16 |f | BNE 0x2177e 00021768 42 80 |B | CLR.L D0 0002176a 30 2e fb de |0. | MOVE.W (A6-0x422),D0 0002176e 52 80 |R | ADDQ.L #0x1,D0 00021770 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021776 63 02 |c | BLS 0x2177a 00021778 4e 4f |NO | TRAP #15 0002177a 3d 40 fb de |=@ | MOVE.W D0,(A6-0x422) 0002177e 52 b9 00 02 41 64 |R Ad | ADDQ.L #0x1,0x24164 00021784 4a 39 00 02 41 5e |J9 A^ | TST.B 0x2415e 0002178a 67 06 |g | BEQ 0x21792 0002178c 52 b9 00 02 41 60 |R A` | ADDQ.L #0x1,0x24160 00021792 52 86 |R | ADDQ.L #0x1,D6 00021794 68 00 fe 72 |h r | BVC 0x21608 00021798 54 4f |TO | ADDQ.L #0x2,A7 0002179a 42 17 |B | CLR.B (A7) 0002179c 1f 01 | | MOVE.B D1,-(A7) 0002179e 48 78 00 01 |Hx | PEA.L 0x1 000217a2 48 6e ff f3 |Hn | PEA.L (A6-0xd) 000217a6 48 6e fb c6 |Hn | PEA.L (A6-0x43a) 000217aa 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000217b0 de fc 00 10 | | ADDA.W #0x10,A7 000217b4 48 53 |HS | PEA.L (A3) 000217b6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000217bc 58 4f |XO | ADDQ.L #0x4,A7 000217be 48 54 |HT | PEA.L (A4) 000217c0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000217c6 58 4f |XO | ADDQ.L #0x4,A7 000217c8 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000217cc 4e 5e |N^ | UNLK A6 000217ce 4e 75 |Nu | RTS 000217d0 ; -------------------------------------------------------------------------------------- 000217d0 ; OMSI PASCAL Function 000217d0 ; <LVAR 0x00a 4(r)> 000217d0 ; <LVAR 0x008 2(rw)> 000217d0 ; <LVAR -0x010 1(rw)> 000217d0 ; <LVAR -0x012 2(w)> 000217d0 ; <LVAR -0x013 1(r)> 000217d0 ; <LVAR -0x014 1(r) 2(r)> 000217d0 ; <LVAR -0x016 @ 2(r)> 000217d0 ; <LVAR -0x01a 4(rw)> 000217d0 ; <LVAR -0x01e 4(rw)> 000217d0 ; <LVAR -0x020 2(w)> 000217d0 ; <LVAR -0x022 2(r) 4(r)> 000217d0 ; <LVAR -0x024 2(r)> 000217d0 ; <LVAR -0x026 2(r) 4(r)> 000217d0 ; -------------------------------------------------------------------------------------- 000217d0 4e 56 ff 78 |NV x | LINK.W A6,#0xff78 000217d4 bf d5 | | CMPA.L (A5),A7 000217d6 62 06 |b | BHI 0x217de 000217d8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000217dc 4e 76 |Nv | TRAPV 000217de de fc 00 62 | b | ADDA.W #0x62,A7 000217e2 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000217e6 45 ee 00 08 |E | LEA.L (A6+0x8),A2 000217ea 47 ee 00 0a |G | LEA.L (A6+0xa),A3 000217ee 49 ee ff f0 |I | LEA.L (A6-0x10),A4 000217f2 42 80 |B | CLR.L D0 000217f4 30 12 |0 | MOVE.W (A2),D0 000217f6 56 80 |V | ADDQ.L #0x3,D0 000217f8 02 80 00 00 ff fc | | ANDI.L #0x0000fffc,D0 000217fe 34 80 |4 | MOVE.W D0,(A2) 00021800 7e 00 |~ | MOVEQ.L #0x00,D7 00021802 20 53 | S | MOVEA.L (A3),A0 00021804 30 12 |0 | MOVE.W (A2),D0 00021806 41 bc 01 ff |A | CHK.W #0x1ff,D0 0002180a 42 81 |B | CLR.L D1 0002180c 32 00 |2 | MOVE.W D0,D1 0002180e e3 81 | | ASL.L #0x1,D1 00021810 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 00021816 63 02 |c | BLS 0x2181a 00021818 4e 4f |NO | TRAP #15 0002181a 20 07 | | MOVE.L D7,D0 0002181c e3 80 | | ASL.L #0x1,D0 0002181e 43 fa ed b4 |C | LEA.L 0x205d4,A1 00021822 31 b1 08 00 18 00 |1 | MOVE.W (A1+D0.L),(A0+D1.L) 00021828 42 80 |B | CLR.L D0 0002182a 30 12 |0 | MOVE.W (A2),D0 0002182c 52 80 |R | ADDQ.L #0x1,D0 0002182e 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021834 63 02 |c | BLS 0x21838 00021836 4e 4f |NO | TRAP #15 00021838 34 80 |4 | MOVE.W D0,(A2) 0002183a 52 87 |R | ADDQ.L #0x1,D7 0002183c 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 00021842 6f be |o | BLE 0x21802 00021844 48 6e ff ea |Hn | PEA.L (A6-0x16) 00021848 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 0002184e 58 4f |XO | ADDQ.L #0x4,A7 00021850 42 6e ff da |Bn | CLR.W (A6-0x26) 00021854 42 6e ff dc |Bn | CLR.W (A6-0x24) 00021858 42 6e ff de |Bn | CLR.W (A6-0x22) 0002185c 3d 6e ff ea ff e0 |=n | MOVE.W (A6-0x16),(A6-0x20) 00021862 42 14 |B | CLR.B (A4) 00021864 42 80 |B | CLR.L D0 00021866 10 2e ff ec | . | MOVE.B (A6-0x14),D0 0002186a e2 08 | | LSR.B #0x1,D0 0002186c 32 00 |2 | MOVE.W D0,D1 0002186e 02 41 00 03 | A | ANDI.W #0x0003,D1 00021872 0c 41 00 03 | A | CMPI.W #0x0003,D1 00021876 66 02 |f | BNE 0x2187a 00021878 52 14 |R | ADDQ.B #0x1,(A4) 0002187a 32 00 |2 | MOVE.W D0,D1 0002187c e4 41 | A | ASR.W #0x2,D1 0002187e 14 14 | | MOVE.B (A4),D2 00021880 48 82 |H | EXTB.W D2 00021882 c5 fc 00 18 | | MULS.W #0x18,D2 00021886 41 fa ed 5c |A \ | LEA.L 0x205e4,A0 0002188a 36 2e ff ec |6. | MOVE.W (A6-0x14),D3 0002188e ef 4b | K | LSL.W #0x7,D3 00021890 e0 4b | K | LSR.W #0x8,D3 00021892 e8 4b | K | LSR.W #0x4,D3 00021894 53 43 |SC | SUBQ.W #0x1,D3 00021896 47 bc 00 0b |G | CHK.W #0xb,D3 0002189a e3 43 | C | ASL.W #0x1,D3 0002189c 41 f0 20 00 |A | LEA.L (A0+D2.W),A0 000218a0 48 c1 |H | EXTW.L D1 000218a2 42 82 |B | CLR.L D2 000218a4 34 30 30 00 |400 | MOVE.W (A0+D3.W),D2 000218a8 d4 81 | | ADD.L D1,D2 000218aa 42 81 |B | CLR.L D1 000218ac 12 2e ff ed | . | MOVE.B (A6-0x13),D1 000218b0 e7 09 | | LSL.B #0x3,D1 000218b2 e6 09 | | LSR.B #0x3,D1 000218b4 d2 82 | | ADD.L D2,D1 000218b6 53 81 |S | SUBQ.L #0x1,D1 000218b8 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 000218be 63 02 |c | BLS 0x218c2 000218c0 4e 4f |NO | TRAP #15 000218c2 3d 41 ff ee |=A | MOVE.W D1,(A6-0x12) 000218c6 9e fc 00 18 | | SUBA.W #0x18,A7 000218ca 48 78 01 6d |Hx m | PEA.L 0x16d 000218ce 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad 000218d4 59 4f |YO | SUBQ.L #0x4,A7 000218d6 48 c0 |H | EXTW.L D0 000218d8 2f 00 |/ | MOVE.L D0,-(A7) 000218da 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad 000218e0 58 4f |XO | ADDQ.L #0x4,A7 000218e2 4e b9 00 01 03 1c |N | JSR Multiply(a, b : Quad) : Quad 000218e8 50 4f |PO | ADDQ.L #0x8,A7 000218ea 42 80 |B | CLR.L D0 000218ec 30 01 |0 | MOVE.W D1,D0 000218ee 2f 00 |/ | MOVE.L D0,-(A7) 000218f0 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad 000218f6 58 4f |XO | ADDQ.L #0x4,A7 000218f8 4e b9 00 01 03 14 |N | JSR Add(a, b : Quad) : Quad 000218fe de fc 00 10 | | ADDA.W #0x10,A7 00021902 2d 5f ff e2 |-_ | MOVE.L (A7)+,(A6-0x1e) 00021906 2d 57 ff e6 |-W | MOVE.L (A7),(A6-0x1a) 0002190a 9e fc 00 0c | | SUBA.W #0xc,A7 0002190e 2f 2e ff de |/. | MOVE.L (A6-0x22),-(A7) 00021912 2f 2e ff da |/. | MOVE.L (A6-0x26),-(A7) 00021916 48 78 00 01 |Hx | PEA.L 0x1 0002191a 4e b9 00 01 03 44 |N D | JSR BitShift(a : Quad ; howmuch : integer) : Quad 00021920 2e ae ff e6 |. | MOVE.L (A6-0x1a),(A7) 00021924 2f 2e ff e2 |/. | MOVE.L (A6-0x1e),-(A7) 00021928 2f 3a ec b6 |/: | MOVE.L 0x205e0,-(A7) 0002192c 2f 3a ec ae |/: | MOVE.L 0x205dc,-(A7) 00021930 4e b9 00 01 03 1c |N | JSR Multiply(a, b : Quad) : Quad 00021936 de fc 00 10 | | ADDA.W #0x10,A7 0002193a 4e b9 00 01 03 14 |N | JSR Add(a, b : Quad) : Quad 00021940 de fc 00 10 | | ADDA.W #0x10,A7 00021944 2d 5f ff e2 |-_ | MOVE.L (A7)+,(A6-0x1e) 00021948 2d 5f ff e6 |-_ | MOVE.L (A7)+,(A6-0x1a) 0002194c 7e 00 |~ | MOVEQ.L #0x00,D7 0002194e 20 53 | S | MOVEA.L (A3),A0 00021950 30 12 |0 | MOVE.W (A2),D0 00021952 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021956 42 81 |B | CLR.L D1 00021958 32 00 |2 | MOVE.W D0,D1 0002195a e3 81 | | ASL.L #0x1,D1 0002195c 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 00021962 63 02 |c | BLS 0x21966 00021964 4e 4f |NO | TRAP #15 00021966 20 07 | | MOVE.L D7,D0 00021968 e3 80 | | ASL.L #0x1,D0 0002196a 31 b6 08 e2 18 00 |1 | MOVE.W (A6+D0.L-#0x1e),(A0+D1.L) 00021970 42 80 |B | CLR.L D0 00021972 30 12 |0 | MOVE.W (A2),D0 00021974 52 80 |R | ADDQ.L #0x1,D0 00021976 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 0002197c 63 02 |c | BLS 0x21980 0002197e 4e 4f |NO | TRAP #15 00021980 34 80 |4 | MOVE.W D0,(A2) 00021982 52 87 |R | ADDQ.L #0x1,D7 00021984 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 0002198a 6f c2 |o | BLE 0x2194e 0002198c 7e 00 |~ | MOVEQ.L #0x00,D7 0002198e 7c 00 || | MOVEQ.L #0x00,D6 00021990 20 53 | S | MOVEA.L (A3),A0 00021992 30 12 |0 | MOVE.W (A2),D0 00021994 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021998 42 81 |B | CLR.L D1 0002199a 32 00 |2 | MOVE.W D0,D1 0002199c e3 81 | | ASL.L #0x1,D1 0002199e 0c 87 00 00 00 09 | | CMPI.L #0x00000009,D7 000219a4 63 02 |c | BLS 0x219a8 000219a6 4e 4f |NO | TRAP #15 000219a8 43 fa ec 6a |C j | LEA.L 0x20614,A1 000219ac 10 31 78 00 | 1x | MOVE.B (A1+D7.L),D0 000219b0 48 80 |H | EXTB.W D0 000219b2 e7 40 | @ | ASL.W #0x3,D0 000219b4 43 f9 00 02 3e 2e |C >. | LEA.L 0x23e2e,A1 000219ba 0c 86 00 00 00 03 | | CMPI.L #0x00000003,D6 000219c0 63 02 |c | BLS 0x219c4 000219c2 4e 4f |NO | TRAP #15 000219c4 24 06 |$ | MOVE.L D6,D2 000219c6 e3 82 | | ASL.L #0x1,D2 000219c8 43 f1 00 00 |C | LEA.L (A1+D0.W),A1 000219cc 43 f1 28 00 |C ( | LEA.L (A1+D2.L),A1 000219d0 31 a9 03 4a 18 00 |1 J | MOVE.W (A1+0x34a),(A0+D1.L) 000219d6 42 80 |B | CLR.L D0 000219d8 30 12 |0 | MOVE.W (A2),D0 000219da 52 80 |R | ADDQ.L #0x1,D0 000219dc 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 000219e2 63 02 |c | BLS 0x219e6 000219e4 4e 4f |NO | TRAP #15 000219e6 34 80 |4 | MOVE.W D0,(A2) 000219e8 52 86 |R | ADDQ.L #0x1,D6 000219ea 0c 86 00 00 00 03 | | CMPI.L #0x00000003,D6 000219f0 6f 9e |o | BLE 0x21990 000219f2 52 87 |R | ADDQ.L #0x1,D7 000219f4 0c 87 00 00 00 09 | | CMPI.L #0x00000009,D7 000219fa 6f 92 |o | BLE 0x2198e 000219fc 7e 00 |~ | MOVEQ.L #0x00,D7 000219fe 7c 00 || | MOVEQ.L #0x00,D6 00021a00 20 53 | S | MOVEA.L (A3),A0 00021a02 30 12 |0 | MOVE.W (A2),D0 00021a04 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021a08 42 81 |B | CLR.L D1 00021a0a 32 00 |2 | MOVE.W D0,D1 00021a0c e3 81 | | ASL.L #0x1,D1 00021a0e 42 70 18 00 |Bp | CLR.W (A0+D1.L) 00021a12 42 80 |B | CLR.L D0 00021a14 30 12 |0 | MOVE.W (A2),D0 00021a16 52 80 |R | ADDQ.L #0x1,D0 00021a18 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021a1e 63 02 |c | BLS 0x21a22 00021a20 4e 4f |NO | TRAP #15 00021a22 34 80 |4 | MOVE.W D0,(A2) 00021a24 52 86 |R | ADDQ.L #0x1,D6 00021a26 0c 86 00 00 00 03 | | CMPI.L #0x00000003,D6 00021a2c 6f d2 |o | BLE 0x21a00 00021a2e 52 87 |R | ADDQ.L #0x1,D7 00021a30 0c 87 00 00 00 06 | | CMPI.L #0x00000006,D7 00021a36 6f c6 |o | BLE 0x219fe 00021a38 7e 00 |~ | MOVEQ.L #0x00,D7 00021a3a 20 53 | S | MOVEA.L (A3),A0 00021a3c 42 80 |B | CLR.L D0 00021a3e 30 12 |0 | MOVE.W (A2),D0 00021a40 d0 87 | | ADD.L D7,D0 00021a42 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 00021a48 63 02 |c | BLS 0x21a4c 00021a4a 4e 4f |NO | TRAP #15 00021a4c e3 80 | | ASL.L #0x1,D0 00021a4e 42 70 08 00 |Bp | CLR.W (A0+D0.L) 00021a52 52 87 |R | ADDQ.L #0x1,D7 00021a54 0c 87 00 00 00 07 | | CMPI.L #0x00000007,D7 00021a5a 6f de |o | BLE 0x21a3a 00021a5c 55 4f |UO | SUBQ.L #0x2,A7 00021a5e 4e b9 00 01 06 0a |N | JSR Is_fc07_four() : Bool 00021a64 4a 1f |J | TST.B (A7)+ 00021a66 66 0c |f | BNE 0x21a74 00021a68 55 4f |UO | SUBQ.L #0x2,A7 00021a6a 4e b9 00 01 06 04 |N | JSR Is_fc07_three() : Bool 00021a70 4a 1f |J | TST.B (A7)+ 00021a72 67 66 |gf | BEQ 0x21ada 00021a74 59 4f |YO | SUBQ.L #0x4,A7 00021a76 4e b9 00 02 32 e0 |N 2 | JSR 0x232e0 00021a7c 2a 1f |* | MOVE.L (A7)+,D5 00021a7e 67 24 |g$ | BEQ 0x21aa4 00021a80 2f 05 |/ | MOVE.L D5,-(A7) 00021a82 20 53 | S | MOVEA.L (A3),A0 00021a84 30 12 |0 | MOVE.W (A2),D0 00021a86 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021a8a 42 81 |B | CLR.L D1 00021a8c 32 00 |2 | MOVE.W D0,D1 00021a8e e3 81 | | ASL.L #0x1,D1 00021a90 41 f0 18 00 |A | LEA.L (A0+D1.L),A0 00021a94 2f 08 |/ | MOVE.L A0,-(A7) 00021a96 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00021a9a 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00021aa0 de fc 00 0a | | ADDA.W #0xa,A7 00021aa4 59 4f |YO | SUBQ.L #0x4,A7 00021aa6 4e b9 00 02 33 0a |N 3 | JSR 0x2330a 00021aac 2a 1f |* | MOVE.L (A7)+,D5 00021aae 67 2a |g* | BEQ 0x21ada 00021ab0 2f 05 |/ | MOVE.L D5,-(A7) 00021ab2 20 53 | S | MOVEA.L (A3),A0 00021ab4 42 80 |B | CLR.L D0 00021ab6 30 12 |0 | MOVE.W (A2),D0 00021ab8 58 80 |X | ADDQ.L #0x4,D0 00021aba 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 00021ac0 63 02 |c | BLS 0x21ac4 00021ac2 4e 4f |NO | TRAP #15 00021ac4 e3 80 | | ASL.L #0x1,D0 00021ac6 41 f0 08 00 |A | LEA.L (A0+D0.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 42 80 |B | CLR.L D0 00021adc 30 12 |0 | MOVE.W (A2),D0 00021ade 50 80 |P | ADDQ.L #0x8,D0 00021ae0 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021ae6 63 02 |c | BLS 0x21aea 00021ae8 4e 4f |NO | TRAP #15 00021aea 34 80 |4 | MOVE.W D0,(A2) 00021aec 55 4f |UO | SUBQ.L #0x2,A7 00021aee 4e b9 00 01 05 f8 |N | JSR Is_fc07_one() : Bool 00021af4 4a 1f |J | TST.B (A7)+ 00021af6 66 0c |f | BNE 0x21b04 00021af8 55 4f |UO | SUBQ.L #0x2,A7 00021afa 4e b9 00 01 05 fe |N | JSR Is_fc07_two() : Bool 00021b00 4a 1f |J | TST.B (A7)+ 00021b02 67 14 |g | BEQ 0x21b18 00021b04 20 53 | S | MOVEA.L (A3),A0 00021b06 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021b0a 42 81 |B | CLR.L D1 00021b0c 32 00 |2 | MOVE.W D0,D1 00021b0e e3 81 | | ASL.L #0x1,D1 00021b10 31 bc 00 03 18 00 |1 | MOVE.W #0x3,(A0+D1.L) 00021b16 60 3e |`> | BRA 0x21b56 00021b18 55 4f |UO | SUBQ.L #0x2,A7 00021b1a 4e b9 00 01 06 04 |N | JSR Is_fc07_three() : Bool 00021b20 4a 1f |J | TST.B (A7)+ 00021b22 66 0c |f | BNE 0x21b30 00021b24 55 4f |UO | SUBQ.L #0x2,A7 00021b26 4e b9 00 01 06 0a |N | JSR Is_fc07_four() : Bool 00021b2c 4a 1f |J | TST.B (A7)+ 00021b2e 67 14 |g | BEQ 0x21b44 00021b30 20 53 | S | MOVEA.L (A3),A0 00021b32 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021b36 42 81 |B | CLR.L D1 00021b38 32 00 |2 | MOVE.W D0,D1 00021b3a e3 81 | | ASL.L #0x1,D1 00021b3c 31 bc 00 04 18 00 |1 | MOVE.W #0x4,(A0+D1.L) 00021b42 60 12 |` | BRA 0x21b56 00021b44 20 53 | S | MOVEA.L (A3),A0 00021b46 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021b4a 42 81 |B | CLR.L D1 00021b4c 32 00 |2 | MOVE.W D0,D1 00021b4e e3 81 | | ASL.L #0x1,D1 00021b50 31 bc 00 02 18 00 |1 | MOVE.W #0x2,(A0+D1.L) 00021b56 55 4f |UO | SUBQ.L #0x2,A7 00021b58 4e b9 00 01 06 10 |N | JSR Is_fc07_one_or_three() : Bool 00021b5e 4a 1f |J | TST.B (A7)+ 00021b60 67 1c |g | BEQ 0x21b7e 00021b62 20 53 | S | MOVEA.L (A3),A0 00021b64 42 81 |B | CLR.L D1 00021b66 32 00 |2 | MOVE.W D0,D1 00021b68 52 81 |R | ADDQ.L #0x1,D1 00021b6a 0c 81 00 00 01 ff | | CMPI.L #0x000001ff,D1 00021b70 63 02 |c | BLS 0x21b74 00021b72 4e 4f |NO | TRAP #15 00021b74 e3 81 | | ASL.L #0x1,D1 00021b76 31 bc 00 01 18 00 |1 | MOVE.W #0x1,(A0+D1.L) 00021b7c 60 18 |` | BRA 0x21b96 00021b7e 20 53 | S | MOVEA.L (A3),A0 00021b80 42 81 |B | CLR.L D1 00021b82 32 00 |2 | MOVE.W D0,D1 00021b84 52 81 |R | ADDQ.L #0x1,D1 00021b86 0c 81 00 00 01 ff | | CMPI.L #0x000001ff,D1 00021b8c 63 02 |c | BLS 0x21b90 00021b8e 4e 4f |NO | TRAP #15 00021b90 e3 81 | | ASL.L #0x1,D1 00021b92 42 70 18 00 |Bp | CLR.W (A0+D1.L) 00021b96 20 53 | S | MOVEA.L (A3),A0 00021b98 42 81 |B | CLR.L D1 00021b9a 32 00 |2 | MOVE.W D0,D1 00021b9c 20 01 | | MOVE.L D1,D0 00021b9e 54 80 |T | ADDQ.L #0x2,D0 00021ba0 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 00021ba6 63 02 |c | BLS 0x21baa 00021ba8 4e 4f |NO | TRAP #15 00021baa e3 80 | | ASL.L #0x1,D0 00021bac 42 70 08 00 |Bp | CLR.W (A0+D0.L) 00021bb0 20 01 | | MOVE.L D1,D0 00021bb2 56 80 |V | ADDQ.L #0x3,D0 00021bb4 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 00021bba 63 02 |c | BLS 0x21bbe 00021bbc 4e 4f |NO | TRAP #15 00021bbe e3 80 | | ASL.L #0x1,D0 00021bc0 42 70 08 00 |Bp | CLR.W (A0+D0.L) 00021bc4 58 81 |X | ADDQ.L #0x4,D1 00021bc6 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 00021bcc 63 02 |c | BLS 0x21bd0 00021bce 4e 4f |NO | TRAP #15 00021bd0 34 81 |4 | MOVE.W D1,(A2) 00021bd2 43 bc 01 ff |C | CHK.W #0x1ff,D1 00021bd6 42 80 |B | CLR.L D0 00021bd8 30 01 |0 | MOVE.W D1,D0 00021bda e3 80 | | ASL.L #0x1,D0 00021bdc 31 bc 00 02 08 00 |1 | MOVE.W #0x2,(A0+D0.L) 00021be2 42 80 |B | CLR.L D0 00021be4 30 01 |0 | MOVE.W D1,D0 00021be6 22 00 |" | MOVE.L D0,D1 00021be8 52 81 |R | ADDQ.L #0x1,D1 00021bea 0c 81 00 00 01 ff | | CMPI.L #0x000001ff,D1 00021bf0 63 02 |c | BLS 0x21bf4 00021bf2 4e 4f |NO | TRAP #15 00021bf4 e3 81 | | ASL.L #0x1,D1 00021bf6 42 70 18 00 |Bp | CLR.W (A0+D1.L) 00021bfa 48 78 04 10 |Hx | PEA.L 0x410 00021bfe 22 00 |" | MOVE.L D0,D1 00021c00 54 81 |T | ADDQ.L #0x2,D1 00021c02 0c 81 00 00 01 ff | | CMPI.L #0x000001ff,D1 00021c08 63 02 |c | BLS 0x21c0c 00021c0a 4e 4f |NO | TRAP #15 00021c0c e3 81 | | ASL.L #0x1,D1 00021c0e 43 f0 18 00 |C | LEA.L (A0+D1.L),A1 00021c12 2f 09 |/ | MOVE.L A1,-(A7) 00021c14 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00021c18 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00021c1e de fc 00 0a | | ADDA.W #0xa,A7 00021c22 5a 80 |Z | ADDQ.L #0x5,D0 00021c24 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021c2a 63 02 |c | BLS 0x21c2e 00021c2c 4e 4f |NO | TRAP #15 00021c2e 34 80 |4 | MOVE.W D0,(A2) 00021c30 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021c34 42 81 |B | CLR.L D1 00021c36 32 00 |2 | MOVE.W D0,D1 00021c38 e3 81 | | ASL.L #0x1,D1 00021c3a 31 b9 00 02 41 f8 18 00 |1 A | MOVE.W 0x241f8,(A0+D1.L) 00021c42 42 81 |B | CLR.L D1 00021c44 32 00 |2 | MOVE.W D0,D1 00021c46 52 81 |R | ADDQ.L #0x1,D1 00021c48 0c 81 00 00 01 ff | | CMPI.L #0x000001ff,D1 00021c4e 63 02 |c | BLS 0x21c52 00021c50 4e 4f |NO | TRAP #15 00021c52 e3 81 | | ASL.L #0x1,D1 00021c54 31 b9 00 02 41 fa 18 00 |1 A | MOVE.W 0x241fa,(A0+D1.L) 00021c5c 7e 00 |~ | MOVEQ.L #0x00,D7 00021c5e 20 53 | S | MOVEA.L (A3),A0 00021c60 42 80 |B | CLR.L D0 00021c62 30 12 |0 | MOVE.W (A2),D0 00021c64 54 80 |T | ADDQ.L #0x2,D0 00021c66 d0 87 | | ADD.L D7,D0 00021c68 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 00021c6e 63 02 |c | BLS 0x21c72 00021c70 4e 4f |NO | TRAP #15 00021c72 e3 80 | | ASL.L #0x1,D0 00021c74 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 00021c7a 63 02 |c | BLS 0x21c7e 00021c7c 4e 4f |NO | TRAP #15 00021c7e 22 07 |" | MOVE.L D7,D1 00021c80 e3 81 | | ASL.L #0x1,D1 00021c82 43 f9 00 02 41 f8 |C A | LEA.L 0x241f8,A1 00021c88 31 b1 18 04 08 00 |1 | MOVE.W (A1+D1.L+#0x4),(A0+D0.L) 00021c8e 52 87 |R | ADDQ.L #0x1,D7 00021c90 0c 87 00 00 00 03 | | CMPI.L #0x00000003,D7 00021c96 6f c6 |o | BLE 0x21c5e 00021c98 42 80 |B | CLR.L D0 00021c9a 30 12 |0 | MOVE.W (A2),D0 00021c9c 5c 80 |\ | ADDQ.L #0x6,D0 00021c9e 50 80 |P | ADDQ.L #0x8,D0 00021ca0 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021ca6 63 02 |c | BLS 0x21caa 00021ca8 4e 4f |NO | TRAP #15 00021caa 34 80 |4 | MOVE.W D0,(A2) 00021cac 20 53 | S | MOVEA.L (A3),A0 00021cae 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021cb2 42 81 |B | CLR.L D1 00021cb4 32 00 |2 | MOVE.W D0,D1 00021cb6 e3 81 | | ASL.L #0x1,D1 00021cb8 02 70 00 ff 18 00 | p | ANDI.W #0x00ff,(A0+D1.L) 00021cbe 42 81 |B | CLR.L D1 00021cc0 32 00 |2 | MOVE.W D0,D1 00021cc2 58 81 |X | ADDQ.L #0x4,D1 00021cc4 58 81 |X | ADDQ.L #0x4,D1 00021cc6 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 00021ccc 63 02 |c | BLS 0x21cd0 00021cce 4e 4f |NO | TRAP #15 00021cd0 34 81 |4 | MOVE.W D1,(A2) 00021cd2 7e 00 |~ | MOVEQ.L #0x00,D7 00021cd4 55 4f |UO | SUBQ.L #0x2,A7 00021cd6 48 78 00 0b |Hx | PEA.L 0xb 00021cda df 97 | | ADD.L D7,(A7) 00021cdc 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 00021ce2 58 4f |XO | ADDQ.L #0x4,A7 00021ce4 30 1f |0 | MOVE.W (A7)+,D0 00021ce6 48 c0 |H | EXTW.L D0 00021ce8 2c 00 |, | MOVE.L D0,D6 00021cea 08 07 00 00 | | BTST.L #0x0,D7 00021cee 67 40 |g@ | BEQ 0x21d30 00021cf0 20 53 | S | MOVEA.L (A3),A0 00021cf2 30 12 |0 | MOVE.W (A2),D0 00021cf4 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021cf8 42 81 |B | CLR.L D1 00021cfa 32 00 |2 | MOVE.W D0,D1 00021cfc e3 81 | | ASL.L #0x1,D1 00021cfe 20 06 | | MOVE.L D6,D0 00021d00 02 80 00 00 00 ff | | ANDI.L #0x000000ff,D0 00021d06 42 82 |B | CLR.L D2 00021d08 34 30 18 00 |40 | MOVE.W (A0+D1.L),D2 00021d0c d0 82 | | ADD.L D2,D0 00021d0e 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021d14 63 02 |c | BLS 0x21d18 00021d16 4e 4f |NO | TRAP #15 00021d18 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021d1c 42 80 |B | CLR.L D0 00021d1e 30 12 |0 | MOVE.W (A2),D0 00021d20 52 80 |R | ADDQ.L #0x1,D0 00021d22 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021d28 63 02 |c | BLS 0x21d2c 00021d2a 4e 4f |NO | TRAP #15 00021d2c 34 80 |4 | MOVE.W D0,(A2) 00021d2e 60 28 |`( | BRA 0x21d58 00021d30 20 53 | S | MOVEA.L (A3),A0 00021d32 30 12 |0 | MOVE.W (A2),D0 00021d34 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021d38 42 81 |B | CLR.L D1 00021d3a 32 00 |2 | MOVE.W D0,D1 00021d3c e3 81 | | ASL.L #0x1,D1 00021d3e 28 3c 00 00 01 00 |(< | MOVE.L #0x100,D4 00021d44 26 06 |& | MOVE.L D6,D3 00021d46 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00021d4c 20 04 | | MOVE.L D4,D0 00021d4e 02 80 00 00 ff 00 | | ANDI.L #0x0000ff00,D0 00021d54 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021d58 52 87 |R | ADDQ.L #0x1,D7 00021d5a 0c 87 00 00 00 1f | | CMPI.L #0x0000001f,D7 00021d60 6f 00 ff 72 |o r | BLE 0x21cd4 00021d64 7e 00 |~ | MOVEQ.L #0x00,D7 00021d66 55 4f |UO | SUBQ.L #0x2,A7 00021d68 48 78 01 81 |Hx | PEA.L 0x181 00021d6c df 97 | | ADD.L D7,(A7) 00021d6e 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 00021d74 58 4f |XO | ADDQ.L #0x4,A7 00021d76 30 1f |0 | MOVE.W (A7)+,D0 00021d78 48 c0 |H | EXTW.L D0 00021d7a 2c 00 |, | MOVE.L D0,D6 00021d7c 08 07 00 00 | | BTST.L #0x0,D7 00021d80 67 40 |g@ | BEQ 0x21dc2 00021d82 20 53 | S | MOVEA.L (A3),A0 00021d84 30 12 |0 | MOVE.W (A2),D0 00021d86 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021d8a 42 81 |B | CLR.L D1 00021d8c 32 00 |2 | MOVE.W D0,D1 00021d8e e3 81 | | ASL.L #0x1,D1 00021d90 20 06 | | MOVE.L D6,D0 00021d92 02 80 00 00 00 ff | | ANDI.L #0x000000ff,D0 00021d98 42 82 |B | CLR.L D2 00021d9a 34 30 18 00 |40 | MOVE.W (A0+D1.L),D2 00021d9e d0 82 | | ADD.L D2,D0 00021da0 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021da6 63 02 |c | BLS 0x21daa 00021da8 4e 4f |NO | TRAP #15 00021daa 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021dae 42 80 |B | CLR.L D0 00021db0 30 12 |0 | MOVE.W (A2),D0 00021db2 52 80 |R | ADDQ.L #0x1,D0 00021db4 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021dba 63 02 |c | BLS 0x21dbe 00021dbc 4e 4f |NO | TRAP #15 00021dbe 34 80 |4 | MOVE.W D0,(A2) 00021dc0 60 28 |`( | BRA 0x21dea 00021dc2 20 53 | S | MOVEA.L (A3),A0 00021dc4 30 12 |0 | MOVE.W (A2),D0 00021dc6 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021dca 42 81 |B | CLR.L D1 00021dcc 32 00 |2 | MOVE.W D0,D1 00021dce e3 81 | | ASL.L #0x1,D1 00021dd0 28 3c 00 00 01 00 |(< | MOVE.L #0x100,D4 00021dd6 26 06 |& | MOVE.L D6,D3 00021dd8 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00021dde 20 04 | | MOVE.L D4,D0 00021de0 02 80 00 00 ff 00 | | ANDI.L #0x0000ff00,D0 00021de6 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021dea 52 87 |R | ADDQ.L #0x1,D7 00021dec 0c 87 00 00 00 4f | O | CMPI.L #0x0000004f,D7 00021df2 6f 00 ff 72 |o r | BLE 0x21d66 00021df6 7e 00 |~ | MOVEQ.L #0x00,D7 00021df8 55 4f |UO | SUBQ.L #0x2,A7 00021dfa 48 78 01 d0 |Hx | PEA.L 0x1d0 00021dfe df 97 | | ADD.L D7,(A7) 00021e00 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 00021e06 58 4f |XO | ADDQ.L #0x4,A7 00021e08 30 1f |0 | MOVE.W (A7)+,D0 00021e0a 48 c0 |H | EXTW.L D0 00021e0c 2c 00 |, | MOVE.L D0,D6 00021e0e 08 07 00 00 | | BTST.L #0x0,D7 00021e12 67 40 |g@ | BEQ 0x21e54 00021e14 20 53 | S | MOVEA.L (A3),A0 00021e16 30 12 |0 | MOVE.W (A2),D0 00021e18 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021e1c 42 81 |B | CLR.L D1 00021e1e 32 00 |2 | MOVE.W D0,D1 00021e20 e3 81 | | ASL.L #0x1,D1 00021e22 20 06 | | MOVE.L D6,D0 00021e24 02 80 00 00 00 ff | | ANDI.L #0x000000ff,D0 00021e2a 42 82 |B | CLR.L D2 00021e2c 34 30 18 00 |40 | MOVE.W (A0+D1.L),D2 00021e30 d0 82 | | ADD.L D2,D0 00021e32 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021e38 63 02 |c | BLS 0x21e3c 00021e3a 4e 4f |NO | TRAP #15 00021e3c 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021e40 42 80 |B | CLR.L D0 00021e42 30 12 |0 | MOVE.W (A2),D0 00021e44 52 80 |R | ADDQ.L #0x1,D0 00021e46 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021e4c 63 02 |c | BLS 0x21e50 00021e4e 4e 4f |NO | TRAP #15 00021e50 34 80 |4 | MOVE.W D0,(A2) 00021e52 60 28 |`( | BRA 0x21e7c 00021e54 20 53 | S | MOVEA.L (A3),A0 00021e56 30 12 |0 | MOVE.W (A2),D0 00021e58 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021e5c 42 81 |B | CLR.L D1 00021e5e 32 00 |2 | MOVE.W D0,D1 00021e60 e3 81 | | ASL.L #0x1,D1 00021e62 28 3c 00 00 01 00 |(< | MOVE.L #0x100,D4 00021e68 26 06 |& | MOVE.L D6,D3 00021e6a 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00021e70 20 04 | | MOVE.L D4,D0 00021e72 02 80 00 00 ff 00 | | ANDI.L #0x0000ff00,D0 00021e78 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021e7c 52 87 |R | ADDQ.L #0x1,D7 00021e7e 0c 87 00 00 00 1d | | CMPI.L #0x0000001d,D7 00021e84 6f 00 ff 72 |o r | BLE 0x21df8 00021e88 55 4f |UO | SUBQ.L #0x2,A7 00021e8a 48 78 01 80 |Hx | PEA.L 0x180 00021e8e 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 00021e94 58 4f |XO | ADDQ.L #0x4,A7 00021e96 30 1f |0 | MOVE.W (A7)+,D0 00021e98 48 c0 |H | EXTW.L D0 00021e9a 2c 00 |, | MOVE.L D0,D6 00021e9c 20 53 | S | MOVEA.L (A3),A0 00021e9e 30 12 |0 | MOVE.W (A2),D0 00021ea0 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021ea4 42 81 |B | CLR.L D1 00021ea6 32 00 |2 | MOVE.W D0,D1 00021ea8 e3 81 | | ASL.L #0x1,D1 00021eaa 28 3c 00 00 01 00 |(< | MOVE.L #0x100,D4 00021eb0 26 06 |& | MOVE.L D6,D3 00021eb2 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00021eb8 20 04 | | MOVE.L D4,D0 00021eba 02 80 00 00 ff 00 | | ANDI.L #0x0000ff00,D0 00021ec0 31 80 18 00 |1 | MOVE.W D0,(A0+D1.L) 00021ec4 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00021ec8 4e 5e |N^ | UNLK A6 00021eca 4e 75 |Nu | RTS 00021ecc ; -------------------------------------------------------------------------------------- 00021ecc ; OMSI PASCAL Function 00021ecc ; <LVAR 0x00a 4(r)> 00021ecc ; <LVAR 0x008 2(r)> 00021ecc ; <LVAR -0x004 2(w)> 00021ecc ; <LVAR -0x006 2(r)> 00021ecc ; <LVAR -0x008 2(w)> 00021ecc ; <LVAR -0x00a 2(r)> 00021ecc ; <LVAR -0x00c 2(w)> 00021ecc ; <LVAR -0x00e 2(r)> 00021ecc ; <LVAR -0x010 2(r)> 00021ecc ; <LVAR -0x012 @ 2(w)> 00021ecc ; <LVAR -0x414 @> 00021ecc ; <LVAR -0x41e @ 4(rw)> 00021ecc ; <LVAR -0x426 @ 4(rw)> 00021ecc ; <LVAR -0x42a @ 4(rw)> 00021ecc ; -------------------------------------------------------------------------------------- 00021ecc 4e 56 fb 6e |NV n | LINK.W A6,#0xfb6e 00021ed0 bf d5 | | CMPA.L (A5),A7 00021ed2 62 06 |b | BHI 0x21eda 00021ed4 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021ed8 4e 76 |Nv | TRAPV 00021eda de fc 00 68 | h | ADDA.W #0x68,A7 00021ede 48 e7 fb f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7) 00021ee2 45 ee fb da |E | LEA.L (A6-0x426),A2 00021ee6 74 01 |t | MOVEQ.L #0x01,D2 00021ee8 26 3c 00 00 01 ff |&< | MOVE.L #0x1ff,D3 00021eee 78 0e |x | MOVEQ.L #0x0e,D4 00021ef0 7c 00 || | MOVEQ.L #0x00,D6 00021ef2 4d 83 |M | CHK.W D3,D6 00021ef4 42 80 |B | CLR.L D0 00021ef6 30 06 |0 | MOVE.W D6,D0 00021ef8 e3 80 | | ASL.L #0x1,D0 00021efa 41 ee fb d6 |A | LEA.L (A6-0x42a),A0 00021efe 42 70 08 16 |Bp | CLR.W (A0+D0.L+#0x16) 00021f02 52 46 |RF | ADDQ.W #0x1,D6 00021f04 bc 43 | C | CMP.W D3,D6 00021f06 63 ea |c | BLS 0x21ef2 00021f08 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00021f0c 24 90 |$ | MOVE.L (A0),(A2) 00021f0e 20 52 | R | MOVEA.L (A2),A0 00021f10 2f 08 |/ | MOVE.L A0,-(A7) 00021f12 b0 c2 | | CMPA.W D2,A0 00021f14 67 2a |g* | BEQ 0x21f40 00021f16 42 a8 00 26 |B & | CLR.L (A0+0x26) 00021f1a 2d 68 00 2a fb e2 |-h * | MOVE.L (A0+0x2a),(A6-0x41e) 00021f20 20 6e fb e2 | n | MOVEA.L (A6-0x41e),A0 00021f24 b0 c2 | | CMPA.W D2,A0 00021f26 67 0e |g | BEQ 0x21f36 00021f28 22 57 |"W | MOVEA.L (A7),A1 00021f2a 52 a9 00 26 |R & | ADDQ.L #0x1,(A1+0x26) 00021f2e 2d 68 00 04 fb e2 |-h | MOVE.L (A0+0x4),(A6-0x41e) 00021f34 60 ea |` | BRA 0x21f20 00021f36 20 57 | W | MOVEA.L (A7),A0 00021f38 24 a8 00 2e |$ . | MOVE.L (A0+0x2e),(A2) 00021f3c 58 4f |XO | ADDQ.L #0x4,A7 00021f3e 60 ce |` | BRA 0x21f0e 00021f40 58 4f |XO | ADDQ.L #0x4,A7 00021f42 7c 00 || | MOVEQ.L #0x00,D6 00021f44 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00021f48 22 50 |"P | MOVEA.L (A0),A1 00021f4a b2 c2 | | CMPA.W D2,A1 00021f4c 67 00 01 30 |g 0 | BEQ 0x2207e 00021f50 24 89 |$ | MOVE.L A1,(A2) 00021f52 36 42 |6B | MOVEA.W D2,A3 00021f54 7e 00 |~ | MOVEQ.L #0x00,D7 00021f56 20 52 | R | MOVEA.L (A2),A0 00021f58 b0 c2 | | CMPA.W D2,A0 00021f5a 67 16 |g | BEQ 0x21f72 00021f5c 4a 07 |J | TST.B D7 00021f5e 66 12 |f | BNE 0x21f72 00021f60 4a a8 00 26 |J & | TST.L (A0+0x26) 00021f64 66 04 |f | BNE 0x21f6a 00021f66 7e 01 |~ | MOVEQ.L #0x01,D7 00021f68 60 06 |` | BRA 0x21f70 00021f6a 26 48 |&H | MOVEA.L A0,A3 00021f6c 24 a8 00 2e |$ . | MOVE.L (A0+0x2e),(A2) 00021f70 60 e4 |` | BRA 0x21f56 00021f72 4a 07 |J | TST.B D7 00021f74 66 2c |f, | BNE 0x21fa2 00021f76 41 fa e3 28 |A ( | LEA.L 0x202a0,A0 00021f7a 70 0e |p | MOVEQ.L #0x0e,D0 00021f7c 3f 20 |? | MOVE.W -(A0),-(A7) 00021f7e 51 c8 ff fc |Q | DBF D0,0x21f7c 00021f82 1f 04 | | MOVE.B D4,-(A7) 00021f84 59 4f |YO | SUBQ.L #0x4,A7 00021f86 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021f8a 3f 02 |? | MOVE.W D2,-(A7) 00021f8c 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00021f90 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021f96 50 4f |PO | ADDQ.L #0x8,A7 00021f98 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021f9e de fc 00 24 | $ | ADDA.W #0x24,A7 00021fa2 4d 83 |M | CHK.W D3,D6 00021fa4 42 80 |B | CLR.L D0 00021fa6 30 06 |0 | MOVE.W D6,D0 00021fa8 e3 80 | | ASL.L #0x1,D0 00021faa 41 ee fb d6 |A | LEA.L (A6-0x42a),A0 00021fae 22 52 |"R | MOVEA.L (A2),A1 00021fb0 31 a9 00 22 08 16 |1 " | MOVE.W (A1+0x22),(A0+D0.L+#0x16) 00021fb6 42 80 |B | CLR.L D0 00021fb8 30 06 |0 | MOVE.W D6,D0 00021fba 22 00 |" | MOVE.L D0,D1 00021fbc 52 81 |R | ADDQ.L #0x1,D1 00021fbe b2 83 | | CMP.L D3,D1 00021fc0 63 02 |c | BLS 0x21fc4 00021fc2 4e 4f |NO | TRAP #15 00021fc4 e3 81 | | ASL.L #0x1,D1 00021fc6 41 ee fb d6 |A | LEA.L (A6-0x42a),A0 00021fca 31 a9 00 24 18 16 |1 $ | MOVE.W (A1+0x24),(A0+D1.L+#0x16) 00021fd0 54 80 |T | ADDQ.L #0x2,D0 00021fd2 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021fd8 63 02 |c | BLS 0x21fdc 00021fda 4e 4f |NO | TRAP #15 00021fdc 3c 00 |< | MOVE.W D0,D6 00021fde 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00021fe2 2d 50 fb d6 |-P | MOVE.L (A0),(A6-0x42a) 00021fe6 20 6e fb d6 | n | MOVEA.L (A6-0x42a),A0 00021fea 2f 08 |/ | MOVE.L A0,-(A7) 00021fec b0 c2 | | CMPA.W D2,A0 00021fee 67 62 |gb | BEQ 0x22052 00021ff0 2d 68 00 2a fb e2 |-h * | MOVE.L (A0+0x2a),(A6-0x41e) 00021ff6 38 42 |8B | MOVEA.W D2,A4 00021ff8 7e 00 |~ | MOVEQ.L #0x00,D7 00021ffa 20 6e fb e2 | n | MOVEA.L (A6-0x41e),A0 00021ffe b0 c2 | | CMPA.W D2,A0 00022000 67 18 |g | BEQ 0x2201a 00022002 4a 07 |J | TST.B D7 00022004 66 14 |f | BNE 0x2201a 00022006 22 50 |"P | MOVEA.L (A0),A1 00022008 b3 d2 | | CMPA.L (A2),A1 0002200a 66 04 |f | BNE 0x22010 0002200c 7e 01 |~ | MOVEQ.L #0x01,D7 0002200e 60 08 |` | BRA 0x22018 00022010 28 48 |(H | MOVEA.L A0,A4 00022012 2d 68 00 04 fb e2 |-h | MOVE.L (A0+0x4),(A6-0x41e) 00022018 60 e0 |` | BRA 0x21ffa 0002201a 4a 07 |J | TST.B D7 0002201c 67 28 |g( | BEQ 0x22046 0002201e 22 57 |"W | MOVEA.L (A7),A1 00022020 53 a9 00 26 |S & | SUBQ.L #0x1,(A1+0x26) 00022024 b8 c2 | | CMPA.W D2,A4 00022026 66 08 |f | BNE 0x22030 00022028 23 68 00 04 00 2a |#h * | MOVE.L (A0+0x4),(A1+0x2a) 0002202e 60 06 |` | BRA 0x22036 00022030 29 68 00 04 00 04 |)h | MOVE.L (A0+0x4),(A4+0x4) 00022036 48 6e fb e2 |Hn | PEA.L (A6-0x41e) 0002203a 48 78 00 08 |Hx | PEA.L 0x8 0002203e 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 00022044 50 4f |PO | ADDQ.L #0x8,A7 00022046 20 57 | W | MOVEA.L (A7),A0 00022048 2d 68 00 2e fb d6 |-h . | MOVE.L (A0+0x2e),(A6-0x42a) 0002204e 58 4f |XO | ADDQ.L #0x4,A7 00022050 60 94 |` | BRA 0x21fe6 00022052 58 4f |XO | ADDQ.L #0x4,A7 00022054 b6 c2 | | CMPA.W D2,A3 00022056 66 0c |f | BNE 0x22064 00022058 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 0002205c 22 52 |"R | MOVEA.L (A2),A1 0002205e 20 a9 00 2e | . | MOVE.L (A1+0x2e),(A0) 00022062 60 08 |` | BRA 0x2206c 00022064 20 52 | R | MOVEA.L (A2),A0 00022066 27 68 00 2e 00 2e |'h . . | MOVE.L (A0+0x2e),(A3+0x2e) 0002206c 48 52 |HR | PEA.L (A2) 0002206e 48 78 00 32 |Hx 2 | PEA.L 0x32 00022072 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 00022078 50 4f |PO | ADDQ.L #0x8,A7 0002207a 60 00 fe c8 |` | BRA 0x21f44 0002207e 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00022082 0c 40 00 04 | @ | CMPI.W #0x0004,D0 00022086 66 0c |f | BNE 0x22094 00022088 48 6e fb ec |Hn | PEA.L (A6-0x414) 0002208c 3f 06 |? | MOVE.W D6,-(A7) 0002208e 4e ba f7 40 |N @ | JSR 0x217d0 00022092 5c 4f |\O | ADDQ.L #0x6,A7 00022094 3d 79 00 02 41 70 ff ee |=y Ap | MOVE.W 0x24170,(A6-0x12) 0002209c 42 6e ff f0 |Bn | CLR.W (A6-0x10) 000220a0 42 6e ff f2 |Bn | CLR.W (A6-0xe) 000220a4 3d 7c 01 00 ff f4 |=| | MOVE.W #0x100,(A6-0xc) 000220aa 42 6e ff f6 |Bn | CLR.W (A6-0xa) 000220ae 3d 6e 00 08 ff f8 |=n | MOVE.W (A6+0x8),(A6-0x8) 000220b4 42 6e ff fa |Bn | CLR.W (A6-0x6) 000220b8 3d 44 ff fc |=D | MOVE.W D4,(A6-0x4) 000220bc 48 6e ff ee |Hn | PEA.L (A6-0x12) 000220c0 41 ee fb ec |A | LEA.L (A6-0x414),A0 000220c4 2f 08 |/ | MOVE.L A0,-(A7) 000220c6 1f 02 | | MOVE.B D2,-(A7) 000220c8 4e ba f2 12 |N | JSR 0x212dc 000220cc de fc 00 0a | | ADDA.W #0xa,A7 000220d0 4c df 1f df |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2+A3+A4 000220d4 4e 5e |N^ | UNLK A6 000220d6 4e 75 |Nu | RTS 000220d8 ; -------------------------------------------------------------------------------------- 000220d8 ; OMSI PASCAL Function 000220d8 ; <LVAR 0x00c 4(w)> 000220d8 ; <LVAR 0x008 @ 4(r)> 000220d8 ; <LVAR -0x003 @ 1(rw)> 000220d8 ; <LVAR -0x008 @ 4(rw)> 000220d8 ; -------------------------------------------------------------------------------------- 000220d8 4e 56 ff 98 |NV | LINK.W A6,#0xff98 000220dc bf d5 | | CMPA.L (A5),A7 000220de 62 06 |b | BHI 0x220e6 000220e0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000220e4 4e 76 |Nv | TRAPV 000220e6 de fc 00 60 | ` | ADDA.W #0x60,A7 000220ea 48 e7 f9 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 000220ee 45 ee ff f8 |E | LEA.L (A6-0x8),A2 000220f2 47 ee 00 08 |G | LEA.L (A6+0x8),A3 000220f6 49 ee ff fd |I | LEA.L (A6-0x3),A4 000220fa 72 01 |r | MOVEQ.L #0x01,D1 000220fc 74 1e |t | MOVEQ.L #0x1e,D2 000220fe 76 20 |v | MOVEQ.L #0x20,D3 00022100 78 0e |x | MOVEQ.L #0x0e,D4 00022102 59 4f |YO | SUBQ.L #0x4,A7 00022104 2f 13 |/ | MOVE.L (A3),-(A7) 00022106 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 0002210c 58 4f |XO | ADDQ.L #0x4,A7 0002210e 24 9f |$ | MOVE.L (A7)+,(A2) 00022110 2f 12 |/ | MOVE.L (A2),-(A7) 00022112 2f 13 |/ | MOVE.L (A3),-(A7) 00022114 48 54 |HT | PEA.L (A4) 00022116 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 0002211c de fc 00 0c | | ADDA.W #0xc,A7 00022120 4a 14 |J | TST.B (A4) 00022122 66 30 |f0 | BNE 0x22154 00022124 9e c3 | | SUBA.W D3,A7 00022126 20 4f | O | MOVEA.L A7,A0 00022128 43 fa e1 76 |C v | LEA.L 0x202a0,A1 0002212c 70 1e |p | MOVEQ.L #0x1e,D0 0002212e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022130 51 c8 ff fc |Q | DBF D0,0x2212e 00022134 1f 04 | | MOVE.B D4,-(A7) 00022136 59 4f |YO | SUBQ.L #0x4,A7 00022138 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002213c 3f 01 |? | MOVE.W D1,-(A7) 0002213e 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7) 00022142 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022148 50 4f |PO | ADDQ.L #0x8,A7 0002214a 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022150 de fc 00 26 | & | ADDA.W #0x26,A7 00022154 48 52 |HR | PEA.L (A2) 00022156 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002215c 58 4f |XO | ADDQ.L #0x4,A7 0002215e 7e 00 |~ | MOVEQ.L #0x00,D7 00022160 59 4f |YO | SUBQ.L #0x4,A7 00022162 1f 07 | | MOVE.B D7,-(A7) 00022164 4e b9 00 01 05 86 |N | JSR Config_Entry_Name(a : Byte) : String 0002216a 54 4f |TO | ADDQ.L #0x2,A7 0002216c 24 97 |$ | MOVE.L (A7),(A2) 0002216e 54 4f |TO | ADDQ.L #0x2,A7 00022170 2f 13 |/ | MOVE.L (A3),-(A7) 00022172 2f 12 |/ | MOVE.L (A2),-(A7) 00022174 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 0002217a 50 4f |PO | ADDQ.L #0x8,A7 0002217c 10 1f | | MOVE.B (A7)+,D0 0002217e 48 80 |H | EXTB.W D0 00022180 41 81 |A | CHK.W D1,D0 00022182 18 80 | | MOVE.B D0,(A4) 00022184 48 52 |HR | PEA.L (A2) 00022186 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002218c 58 4f |XO | ADDQ.L #0x4,A7 0002218e 4a 00 |J | TST.B D0 00022190 67 36 |g6 | BEQ 0x221c8 00022192 10 07 | | MOVE.B D7,D0 00022194 48 80 |H | EXTB.W D0 00022196 eb 40 | @ | ASL.W #0x5,D0 00022198 41 f9 00 02 3e 2e |A >. | LEA.L 0x23e2e,A0 0002219e 9e c2 | | SUBA.W D2,A7 000221a0 22 4f |"O | MOVEA.L A7,A1 000221a2 41 f0 00 5d |A ] | LEA.L (A0+D0.W+#0x5d),A0 000221a6 70 1d |p | MOVEQ.L #0x1d,D0 000221a8 12 d8 | | MOVE.B (A0)+,(A1)+ 000221aa 51 c8 ff fc |Q | DBF D0,0x221a8 000221ae 59 4f |YO | SUBQ.L #0x4,A7 000221b0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000221b4 3f 01 |? | MOVE.W D1,-(A7) 000221b6 3f 02 |? | MOVE.W D2,-(A7) 000221b8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000221be 50 4f |PO | ADDQ.L #0x8,A7 000221c0 2d 5f 00 0c |-_ | MOVE.L (A7)+,(A6+0xc) 000221c4 de c2 | | ADDA.W D2,A7 000221c6 60 42 |`B | BRA 0x2220a 000221c8 52 07 |R | ADDQ.B #0x1,D7 000221ca 0c 07 00 09 | | CMPI.B #0x09,D7 000221ce 6f 90 |o | BLE 0x22160 000221d0 9e fc 00 1a | | SUBA.W #0x1a,A7 000221d4 20 4f | O | MOVEA.L A7,A0 000221d6 43 fa e0 e8 |C | LEA.L 0x202c0,A1 000221da 70 18 |p | MOVEQ.L #0x18,D0 000221dc 10 d9 | | MOVE.B (A1)+,(A0)+ 000221de 51 c8 ff fc |Q | DBF D0,0x221dc 000221e2 1f 04 | | MOVE.B D4,-(A7) 000221e4 51 4f |QO | SUBQ.L #0x8,A7 000221e6 48 6f 00 0a |Ho | PEA.L (A7+0xa) 000221ea 3f 01 |? | MOVE.W D1,-(A7) 000221ec 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000221f0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000221f6 58 4f |XO | ADDQ.L #0x4,A7 000221f8 2e 93 |. | MOVE.L (A3),(A7) 000221fa 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022200 50 4f |PO | ADDQ.L #0x8,A7 00022202 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022208 de c3 | | ADDA.W D3,A7 0002220a 48 53 |HS | PEA.L (A3) 0002220c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022212 58 4f |XO | ADDQ.L #0x4,A7 00022214 4c df 1f 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4 00022218 4e 5e |N^ | UNLK A6 0002221a 4e 75 |Nu | RTS 0002221c ; -------------------------------------------------------------------------------------- 0002221c ; OMSI PASCAL Function 0002221c ; <LVAR -0x010 @ 4(rw)> 0002221c ; <LVAR -0x018 4(rw)> 0002221c ; <LVAR -0x01c 4(rw)> 0002221c ; <LVAR -0x03a @> 0002221c ; <LVAR -0x03e @ 4(rw)> 0002221c ; -------------------------------------------------------------------------------------- 0002221c 4e 56 ff 26 |NV & | LINK.W A6,#0xff26 00022220 bf d5 | | CMPA.L (A5),A7 00022222 62 06 |b | BHI 0x2222a 00022224 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022228 4e 76 |Nv | TRAPV 0002222a de fc 00 9a | | ADDA.W #0x9a,A7 0002222e 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022232 74 01 |t | MOVEQ.L #0x01,D2 00022234 76 1e |v | MOVEQ.L #0x1e,D3 00022236 78 1d |x | MOVEQ.L #0x1d,D4 00022238 48 6e ff c2 |Hn | PEA.L (A6-0x3e) 0002223c 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00022242 58 4f |XO | ADDQ.L #0x4,A7 00022244 7a 00 |z | MOVEQ.L #0x00,D5 00022246 10 05 | | MOVE.B D5,D0 00022248 48 80 |H | EXTB.W D0 0002224a eb 40 | @ | ASL.W #0x5,D0 0002224c 41 f9 00 02 3e 2e |A >. | LEA.L 0x23e2e,A0 00022252 9e c3 | | SUBA.W D3,A7 00022254 22 4f |"O | MOVEA.L A7,A1 00022256 41 f0 00 5d |A ] | LEA.L (A0+D0.W+#0x5d),A0 0002225a 70 1d |p | MOVEQ.L #0x1d,D0 0002225c 12 d8 | | MOVE.B (A0)+,(A1)+ 0002225e 51 c8 ff fc |Q | DBF D0,0x2225c 00022262 59 4f |YO | SUBQ.L #0x4,A7 00022264 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022268 3f 02 |? | MOVE.W D2,-(A7) 0002226a 3f 03 |? | MOVE.W D3,-(A7) 0002226c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022272 50 4f |PO | ADDQ.L #0x8,A7 00022274 2d 5f ff c2 |-_ | MOVE.L (A7)+,(A6-0x3e) 00022278 de c3 | | ADDA.W D3,A7 0002227a 7c 01 || | MOVEQ.L #0x01,D6 0002227c 20 6e ff c2 | n | MOVEA.L (A6-0x3e),A0 00022280 30 10 |0 | MOVE.W (A0),D0 00022282 48 c0 |H | EXTW.L D0 00022284 bc 80 | | CMP.L D0,D6 00022286 6f 10 |o | BLE 0x22298 00022288 20 06 | | MOVE.L D6,D0 0002228a 53 80 |S | SUBQ.L #0x1,D0 0002228c b0 84 | | CMP.L D4,D0 0002228e 63 02 |c | BLS 0x22292 00022290 4e 4f |NO | TRAP #15 00022292 42 36 08 c6 |B6 | CLR.B (A6+D0.L-#0x3a) 00022296 60 1e |` | BRA 0x222b6 00022298 20 06 | | MOVE.L D6,D0 0002229a 53 80 |S | SUBQ.L #0x1,D0 0002229c b0 84 | | CMP.L D4,D0 0002229e 63 02 |c | BLS 0x222a2 000222a0 4e 4f |NO | TRAP #15 000222a2 22 06 |" | MOVE.L D6,D1 000222a4 53 81 |S | SUBQ.L #0x1,D1 000222a6 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 000222ac 63 02 |c | BLS 0x222b0 000222ae 4e 4f |NO | TRAP #15 000222b0 1d b0 18 02 08 c6 | | MOVE.B (A0+D1.L+#0x2),(A6+D0.L-#0x3a) 000222b6 52 86 |R | ADDQ.L #0x1,D6 000222b8 bc 83 | | CMP.L D3,D6 000222ba 6f c0 |o | BLE 0x2227c 000222bc 2d 79 00 02 41 68 ff e4 |-y Ah | MOVE.L 0x24168,(A6-0x1c) 000222c4 36 42 |6B | MOVEA.W D2,A3 000222c6 7e 00 |~ | MOVEQ.L #0x00,D7 000222c8 20 6e ff e4 | n | MOVEA.L (A6-0x1c),A0 000222cc b0 c2 | | CMPA.W D2,A0 000222ce 67 22 |g" | BEQ 0x222f2 000222d0 4a 07 |J | TST.B D7 000222d2 66 1e |f | BNE 0x222f2 000222d4 43 ee ff c6 |C | LEA.L (A6-0x3a),A1 000222d8 24 48 |$H | MOVEA.L A0,A2 000222da 70 1d |p | MOVEQ.L #0x1d,D0 000222dc b5 09 | | CMPM.B (A1)+,(A2)+ 000222de 56 c8 ff fc |V | DBNE D0,0x222dc 000222e2 66 04 |f | BNE 0x222e8 000222e4 7e 01 |~ | MOVEQ.L #0x01,D7 000222e6 60 08 |` | BRA 0x222f0 000222e8 26 48 |&H | MOVEA.L A0,A3 000222ea 2d 68 00 2e ff e4 |-h . | MOVE.L (A0+0x2e),(A6-0x1c) 000222f0 60 d6 |` | BRA 0x222c8 000222f2 4a 07 |J | TST.B D7 000222f4 66 52 |fR | BNE 0x22348 000222f6 41 fa e0 0c |A | LEA.L 0x20304,A0 000222fa 70 14 |p | MOVEQ.L #0x14,D0 000222fc 3f 20 |? | MOVE.W -(A0),-(A7) 000222fe 51 c8 ff fc |Q | DBF D0,0x222fc 00022302 41 ee ff e4 |A | LEA.L (A6-0x1c),A0 00022306 70 0e |p | MOVEQ.L #0x0e,D0 00022308 3f 20 |? | MOVE.W -(A0),-(A7) 0002230a 51 c8 ff fc |Q | DBF D0,0x22308 0002230e 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00022312 51 4f |QO | SUBQ.L #0x8,A7 00022314 48 6f 00 28 |Ho ( | PEA.L (A7+0x28) 00022318 3f 02 |? | MOVE.W D2,-(A7) 0002231a 3f 3c 00 2a |?< * | MOVE.W #0x2a,-(A7) 0002231e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022324 58 4f |XO | ADDQ.L #0x4,A7 00022326 48 6f 00 0e |Ho | PEA.L (A7+0xe) 0002232a 3f 02 |? | MOVE.W D2,-(A7) 0002232c 3f 03 |? | MOVE.W D3,-(A7) 0002232e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022334 50 4f |PO | ADDQ.L #0x8,A7 00022336 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002233c 50 4f |PO | ADDQ.L #0x8,A7 0002233e 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022344 de fc 00 4e | N | ADDA.W #0x4e,A7 00022348 b6 c2 | | CMPA.W D2,A3 0002234a 66 0e |f | BNE 0x2235a 0002234c 20 6e ff e4 | n | MOVEA.L (A6-0x1c),A0 00022350 23 e8 00 2e 00 02 41 68 |# . Ah| MOVE.L (A0+0x2e),0x24168 00022358 60 0a |` | BRA 0x22364 0002235a 20 6e ff e4 | n | MOVEA.L (A6-0x1c),A0 0002235e 27 68 00 2e 00 2e |'h . . | MOVE.L (A0+0x2e),(A3+0x2e) 00022364 20 6e ff e4 | n | MOVEA.L (A6-0x1c),A0 00022368 21 79 00 02 41 6c 00 2e |!y Al .| MOVE.L 0x2416c,(A0+0x2e) 00022370 23 ee ff e4 00 02 41 6c |# Al| MOVE.L (A6-0x1c),0x2416c 00022378 52 05 |R | ADDQ.B #0x1,D5 0002237a 0c 05 00 04 | | CMPI.B #0x04,D5 0002237e 6f 00 fe c6 |o | BLE 0x22246 00022382 48 6e ff c2 |Hn | PEA.L (A6-0x3e) 00022386 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002238c 58 4f |XO | ADDQ.L #0x4,A7 0002238e 2d 79 00 02 41 6c ff e8 |-y Al | MOVE.L 0x2416c,(A6-0x18) 00022396 20 6e ff e8 | n | MOVEA.L (A6-0x18),A0 0002239a b0 c2 | | CMPA.W D2,A0 0002239c 67 00 00 84 |g | BEQ 0x22422 000223a0 2d 79 00 02 41 68 ff e4 |-y Ah | MOVE.L 0x24168,(A6-0x1c) 000223a8 20 6e ff e4 | n | MOVEA.L (A6-0x1c),A0 000223ac 2f 08 |/ | MOVE.L A0,-(A7) 000223ae b0 c2 | | CMPA.W D2,A0 000223b0 67 60 |g` | BEQ 0x22412 000223b2 2d 68 00 2a ff f0 |-h * | MOVE.L (A0+0x2a),(A6-0x10) 000223b8 38 42 |8B | MOVEA.W D2,A4 000223ba 7e 00 |~ | MOVEQ.L #0x00,D7 000223bc 20 6e ff f0 | n | MOVEA.L (A6-0x10),A0 000223c0 b0 c2 | | CMPA.W D2,A0 000223c2 67 1a |g | BEQ 0x223de 000223c4 4a 07 |J | TST.B D7 000223c6 66 16 |f | BNE 0x223de 000223c8 22 50 |"P | MOVEA.L (A0),A1 000223ca b3 ee ff e8 | | CMPA.L (A6-0x18),A1 000223ce 66 04 |f | BNE 0x223d4 000223d0 7e 01 |~ | MOVEQ.L #0x01,D7 000223d2 60 08 |` | BRA 0x223dc 000223d4 28 48 |(H | MOVEA.L A0,A4 000223d6 2d 68 00 04 ff f0 |-h | MOVE.L (A0+0x4),(A6-0x10) 000223dc 60 de |` | BRA 0x223bc 000223de 4a 07 |J | TST.B D7 000223e0 67 24 |g$ | BEQ 0x22406 000223e2 b8 c2 | | CMPA.W D2,A4 000223e4 66 0a |f | BNE 0x223f0 000223e6 22 57 |"W | MOVEA.L (A7),A1 000223e8 23 68 00 04 00 2a |#h * | MOVE.L (A0+0x4),(A1+0x2a) 000223ee 60 06 |` | BRA 0x223f6 000223f0 29 68 00 04 00 04 |)h | MOVE.L (A0+0x4),(A4+0x4) 000223f6 48 6e ff f0 |Hn | PEA.L (A6-0x10) 000223fa 48 78 00 08 |Hx | PEA.L 0x8 000223fe 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 00022404 50 4f |PO | ADDQ.L #0x8,A7 00022406 20 57 | W | MOVEA.L (A7),A0 00022408 2d 68 00 2e ff e4 |-h . | MOVE.L (A0+0x2e),(A6-0x1c) 0002240e 58 4f |XO | ADDQ.L #0x4,A7 00022410 60 96 |` | BRA 0x223a8 00022412 58 4f |XO | ADDQ.L #0x4,A7 00022414 20 6e ff e8 | n | MOVEA.L (A6-0x18),A0 00022418 2d 68 00 2e ff e8 |-h . | MOVE.L (A0+0x2e),(A6-0x18) 0002241e 60 00 ff 76 |` v | BRA 0x22396 00022422 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00022426 4e 5e |N^ | UNLK A6 00022428 4e 75 |Nu | RTS 0002242a ; -------------------------------------------------------------------------------------- 0002242a ; OMSI PASCAL Function 0002242a ; -------------------------------------------------------------------------------------- 0002242a 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 0002242e bf d5 | | CMPA.L (A5),A7 00022430 62 06 |b | BHI 0x22438 00022432 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022436 4e 76 |Nv | TRAPV 00022438 de fc 00 4e | N | ADDA.W #0x4e,A7 0002243c 48 e7 e0 c0 |H | MOVEM.L A1+A0+D2+D1+D0,-(A7) 00022440 72 01 |r | MOVEQ.L #0x01,D1 00022442 74 2a |t* | MOVEQ.L #0x2a,D2 00022444 59 4f |YO | SUBQ.L #0x4,A7 00022446 4e b9 00 01 03 f8 |N | JSR GetConsoleConfig() : Long 0002244c 20 1f | | MOVE.L (A7)+,D0 0002244e 0c 80 00 00 00 03 | | CMPI.L #0x00000003,D0 00022454 66 5c |f\ | BNE 0x224b2 00022456 41 fa de d2 |A | LEA.L 0x2032a,A0 0002245a 70 12 |p | MOVEQ.L #0x12,D0 0002245c 3f 20 |? | MOVE.W -(A0),-(A7) 0002245e 51 c8 ff fc |Q | DBF D0,0x2245c 00022462 59 4f |YO | SUBQ.L #0x4,A7 00022464 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022468 3f 01 |? | MOVE.W D1,-(A7) 0002246a 3f 3c 00 26 |?< & | MOVE.W #0x26,-(A7) 0002246e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022474 50 4f |PO | ADDQ.L #0x8,A7 00022476 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002247c de c2 | | ADDA.W D2,A7 0002247e 4e b9 00 01 02 16 |N | JSR KC0b 00022484 9e c2 | | SUBA.W D2,A7 00022486 20 4f | O | MOVEA.L A7,A0 00022488 43 fa de a0 |C | LEA.L 0x2032a,A1 0002248c 70 28 |p( | MOVEQ.L #0x28,D0 0002248e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022490 51 c8 ff fc |Q | DBF D0,0x2248e 00022494 59 4f |YO | SUBQ.L #0x4,A7 00022496 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002249a 3f 01 |? | MOVE.W D1,-(A7) 0002249c 3f 3c 00 29 |?< ) | MOVE.W #0x29,-(A7) 000224a0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000224a6 50 4f |PO | ADDQ.L #0x8,A7 000224a8 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000224ae de fc 00 2e | . | ADDA.W #0x2e,A7 000224b2 4c df 03 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1 000224b6 4e 5e |N^ | UNLK A6 000224b8 4e 75 |Nu | RTS 000224ba ; -------------------------------------------------------------------------------------- 000224ba ; OMSI PASCAL Function 000224ba ; <LVAR -0x001 1(r)> 000224ba ; <LVAR -0x002 1(r)> 000224ba ; <LVAR -0x003 1(r)> 000224ba ; <LVAR -0x004 @ 1(r)> 000224ba ; <LVAR -0x404 @> 000224ba ; <LVAR -0x406 2(w)> 000224ba ; <LVAR -0x408 2(w) 4(w)> 000224ba ; <LVAR -0x40c 4(w)> 000224ba ; <LVAR -0x410 2(w) 4(w)> 000224ba ; <LVAR -0x414 @ 2(w) 4(w)> 000224ba ; -------------------------------------------------------------------------------------- 000224ba 4e 56 fb 9c |NV | LINK.W A6,#0xfb9c 000224be bf d5 | | CMPA.L (A5),A7 000224c0 62 06 |b | BHI 0x224c8 000224c2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000224c6 4e 76 |Nv | TRAPV 000224c8 de fc 00 50 | P | ADDA.W #0x50,A7 000224cc 48 e7 e0 c0 |H | MOVEM.L A1+A0+D2+D1+D0,-(A7) 000224d0 43 ee fb ec |C | LEA.L (A6-0x414),A1 000224d4 74 01 |t | MOVEQ.L #0x01,D2 000224d6 4e ba fd 44 |N D | JSR 0x2221c 000224da 48 79 00 02 41 6c |Hy Al | PEA.L 0x2416c 000224e0 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 000224e4 4e ba f9 e6 |N | JSR 0x21ecc 000224e8 5c 4f |\O | ADDQ.L #0x6,A7 000224ea 48 79 00 02 41 68 |Hy Ah | PEA.L 0x24168 000224f0 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 000224f4 4e ba f9 d6 |N | JSR 0x21ecc 000224f8 58 4f |XO | ADDQ.L #0x4,A7 000224fa 3e ba de 58 |> X | MOVE.W 0x20354,(A7) 000224fe 41 fa de 70 |A p | LEA.L 0x20370,A0 00022502 70 0c |p | MOVEQ.L #0x0c,D0 00022504 3f 20 |? | MOVE.W -(A0),-(A7) 00022506 51 c8 ff fc |Q | DBF D0,0x22504 0002250a 51 4f |QO | SUBQ.L #0x8,A7 0002250c 2f 39 00 02 41 60 |/9 A` | MOVE.L 0x24160,-(A7) 00022512 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00022518 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 0002251c 3f 02 |? | MOVE.W D2,-(A7) 0002251e 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00022522 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022528 2e b9 00 02 41 64 |. Ad | MOVE.L 0x24164,(A7) 0002252e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00022534 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00022538 3f 02 |? | MOVE.W D2,-(A7) 0002253a 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 0002253e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022544 50 4f |PO | ADDQ.L #0x8,A7 00022546 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 0002254c de fc 00 10 | | ADDA.W #0x10,A7 00022550 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00022556 de fc 00 20 | | ADDA.W #0x20,A7 0002255a 4e ba e1 d4 |N | JSR 0x20730 0002255e 4e ba fe ca |N | JSR 0x2242a 00022562 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00022568 22 ba e0 b4 |" | MOVE.L 0x2061e,(A1) 0002256c 2d 7a e0 b4 fb f0 |-z | MOVE.L 0x20622,(A6-0x410) 00022572 2d 7a e0 b2 fb f4 |-z | MOVE.L 0x20626,(A6-0x40c) 00022578 2d 7a e0 b0 fb f8 |-z | MOVE.L 0x2062a,(A6-0x408) 0002257e 48 51 |HQ | PEA.L (A1) 00022580 4e ba e2 7c |N | | JSR 0x207fe 00022584 58 4f |XO | ADDQ.L #0x4,A7 00022586 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002258a 4e b9 00 01 05 9e |N | JSR ReadClusterNo(VAR a : Long) 00022590 58 4f |XO | ADDQ.L #0x4,A7 00022592 42 80 |B | CLR.L D0 00022594 10 2e ff fc | . | MOVE.B (A6-0x4),D0 00022598 e1 40 | @ | ASL.W #0x8,D0 0002259a 42 81 |B | CLR.L D1 0002259c 12 2e ff fd | . | MOVE.B (A6-0x3),D1 000225a0 d2 40 | @ | ADD.W D0,D1 000225a2 3d 41 fb f8 |=A | MOVE.W D1,(A6-0x408) 000225a6 42 80 |B | CLR.L D0 000225a8 10 2e ff fe | . | MOVE.B (A6-0x2),D0 000225ac e1 40 | @ | ASL.W #0x8,D0 000225ae 42 81 |B | CLR.L D1 000225b0 12 2e ff ff | . | MOVE.B (A6-0x1),D1 000225b4 d2 40 | @ | ADD.W D0,D1 000225b6 3d 41 fb fa |=A | MOVE.W D1,(A6-0x406) 000225ba 55 4f |UO | SUBQ.L #0x2,A7 000225bc 4e b9 00 01 05 ce |N | JSR ReadKeySwitch() : Bool 000225c2 4a 1f |J | TST.B (A7)+ 000225c4 67 06 |g | BEQ 0x225cc 000225c6 00 6e 80 00 fb f0 | n | ORI.W #0x8000,(A6-0x410) 000225cc 32 b9 00 02 41 70 |2 Ap | MOVE.W 0x24170,(A1) 000225d2 02 51 ff 00 | Q | ANDI.W #0xff00,(A1) 000225d6 48 51 |HQ | PEA.L (A1) 000225d8 41 ee fb fc |A | LEA.L (A6-0x404),A0 000225dc 2f 08 |/ | MOVE.L A0,-(A7) 000225de 42 27 |B' | CLR.B -(A7) 000225e0 4e ba ec fa |N | JSR 0x212dc 000225e4 de fc 00 0a | | ADDA.W #0xa,A7 000225e8 4c df 03 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1 000225ec 4e 5e |N^ | UNLK A6 000225ee 4e 75 |Nu | RTS 000225f0 ; -------------------------------------------------------------------------------------- 000225f0 ; OMSI PASCAL Function 000225f0 ; <LVAR 0x00c 1(w)> 000225f0 ; <LVAR 0x008 4(r)> 000225f0 ; <LVAR -0x002 @> 000225f0 ; <LVAR -0x006 @ 4(r)> 000225f0 ; <LVAR -0x00c @ 4(rw)> 000225f0 ; -------------------------------------------------------------------------------------- 000225f0 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 000225f4 bf d5 | | CMPA.L (A5),A7 000225f6 62 06 |b | BHI 0x225fe 000225f8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000225fc 4e 76 |Nv | TRAPV 000225fe de fc 00 42 | B | ADDA.W #0x42,A7 00022602 48 e7 e3 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D2+D1+D0,-(A7) 00022606 45 ee ff fa |E | LEA.L (A6-0x6),A2 0002260a 47 ee ff f4 |G | LEA.L (A6-0xc),A3 0002260e 72 0a |r | MOVEQ.L #0x0a,D1 00022610 74 01 |t | MOVEQ.L #0x01,D2 00022612 1d 7c 00 04 00 0c | | | MOVE.B #0x04,(A6+0xc) 00022618 48 52 |HR | PEA.L (A2) 0002261a 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00022620 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00022624 2f 12 |/ | MOVE.L (A2),-(A7) 00022626 48 6e ff fe |Hn | PEA.L (A6-0x2) 0002262a 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 00022630 de fc 00 0c | | ADDA.W #0xc,A7 00022634 7e 00 |~ | MOVEQ.L #0x00,D7 00022636 10 07 | | MOVE.B D7,D0 00022638 48 80 |H | EXTB.W D0 0002263a c1 c1 | | MULS.W D1,D0 0002263c 41 fa df f0 |A | LEA.L 0x2062e,A0 00022640 9e c1 | | SUBA.W D1,A7 00022642 22 4f |"O | MOVEA.L A7,A1 00022644 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00022648 70 09 |p | MOVEQ.L #0x09,D0 0002264a 12 d8 | | MOVE.B (A0)+,(A1)+ 0002264c 51 c8 ff fc |Q | DBF D0,0x2264a 00022650 59 4f |YO | SUBQ.L #0x4,A7 00022652 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022656 3f 02 |? | MOVE.W D2,-(A7) 00022658 3f 01 |? | MOVE.W D1,-(A7) 0002265a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022660 50 4f |PO | ADDQ.L #0x8,A7 00022662 26 9f |& | MOVE.L (A7)+,(A3) 00022664 58 4f |XO | ADDQ.L #0x4,A7 00022666 2e 92 |. | MOVE.L (A2),(A7) 00022668 2f 13 |/ | MOVE.L (A3),-(A7) 0002266a 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00022670 50 4f |PO | ADDQ.L #0x8,A7 00022672 10 1f | | MOVE.B (A7)+,D0 00022674 48 80 |H | EXTB.W D0 00022676 41 82 |A | CHK.W D2,D0 00022678 1c 00 | | MOVE.B D0,D6 0002267a 48 53 |HS | PEA.L (A3) 0002267c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022682 58 4f |XO | ADDQ.L #0x4,A7 00022684 4a 06 |J | TST.B D6 00022686 67 06 |g | BEQ 0x2268e 00022688 1d 47 00 0c | G | MOVE.B D7,(A6+0xc) 0002268c 60 08 |` | BRA 0x22696 0002268e 52 07 |R | ADDQ.B #0x1,D7 00022690 0c 07 00 03 | | CMPI.B #0x03,D7 00022694 6f a0 |o | BLE 0x22636 00022696 48 52 |HR | PEA.L (A2) 00022698 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002269e 58 4f |XO | ADDQ.L #0x4,A7 000226a0 4c df 0f c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0+A1+A2+A3 000226a4 4e 5e |N^ | UNLK A6 000226a6 4e 75 |Nu | RTS 000226a8 ; -------------------------------------------------------------------------------------- 000226a8 ; OMSI PASCAL Function 000226a8 ; <LVAR 0x00c 4(r)> 000226a8 ; <LVAR 0x008 @ 4(r)> 000226a8 ; <LVAR -0x004 @ 1(r)> 000226a8 ; <LVAR -0x008 @ 4(r)> 000226a8 ; <LVAR -0x00c 4(w)> 000226a8 ; <LVAR -0x010 @ 4(w)> 000226a8 ; -------------------------------------------------------------------------------------- 000226a8 4e 56 ff a0 |NV | LINK.W A6,#0xffa0 000226ac bf d5 | | CMPA.L (A5),A7 000226ae 62 06 |b | BHI 0x226b6 000226b0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000226b4 4e 76 |Nv | TRAPV 000226b6 de fc 00 50 | P | ADDA.W #0x50,A7 000226ba 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 000226be 45 ee ff f8 |E | LEA.L (A6-0x8),A2 000226c2 47 ee ff fc |G | LEA.L (A6-0x4),A3 000226c6 49 ee 00 08 |I | LEA.L (A6+0x8),A4 000226ca 72 0c |r | MOVEQ.L #0x0c,D1 000226cc 48 52 |HR | PEA.L (A2) 000226ce 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000226d4 2e 94 |. | MOVE.L (A4),(A7) 000226d6 2f 12 |/ | MOVE.L (A2),-(A7) 000226d8 48 53 |HS | PEA.L (A3) 000226da 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 000226e0 de c1 | | ADDA.W D1,A7 000226e2 4a 13 |J | TST.B (A3) 000226e4 67 0e |g | BEQ 0x226f4 000226e6 2f 14 |/ | MOVE.L (A4),-(A7) 000226e8 2f 12 |/ | MOVE.L (A2),-(A7) 000226ea 48 53 |HS | PEA.L (A3) 000226ec 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 000226f2 de c1 | | ADDA.W D1,A7 000226f4 4a 13 |J | TST.B (A3) 000226f6 66 30 |f0 | BNE 0x22728 000226f8 41 fa dc ca |A | LEA.L 0x203c4,A0 000226fc 70 10 |p | MOVEQ.L #0x10,D0 000226fe 3f 20 |? | MOVE.W -(A0),-(A7) 00022700 51 c8 ff fc |Q | DBF D0,0x226fe 00022704 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00022708 59 4f |YO | SUBQ.L #0x4,A7 0002270a 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002270e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022712 3f 3c 00 22 |?< " | MOVE.W #0x22,-(A7) 00022716 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002271c 50 4f |PO | ADDQ.L #0x8,A7 0002271e 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022724 de fc 00 28 | ( | ADDA.W #0x28,A7 00022728 51 4f |QO | SUBQ.L #0x8,A7 0002272a 2f 12 |/ | MOVE.L (A2),-(A7) 0002272c 48 78 00 10 |Hx | PEA.L 0x10 00022730 4e b9 00 01 03 60 |N ` | JSR ?StringToInt64() 00022736 50 4f |PO | ADDQ.L #0x8,A7 00022738 2d 5f ff f0 |-_ | MOVE.L (A7)+,(A6-0x10) 0002273c 2d 5f ff f4 |-_ | MOVE.L (A7)+,(A6-0xc) 00022740 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00022744 41 e8 00 1e |A | LEA.L (A0+0x1e),A0 00022748 43 ee ff f0 |C | LEA.L (A6-0x10),A1 0002274c 70 07 |p | MOVEQ.L #0x07,D0 0002274e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022750 51 c8 ff fc |Q | DBF D0,0x2274e 00022754 48 54 |HT | PEA.L (A4) 00022756 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002275c 58 4f |XO | ADDQ.L #0x4,A7 0002275e 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 00022762 4e 5e |N^ | UNLK A6 00022764 4e 75 |Nu | RTS 00022766 ; -------------------------------------------------------------------------------------- 00022766 ; OMSI PASCAL Function 00022766 ; <LVAR 0x00c 4(r)> 00022766 ; <LVAR 0x008 @ 4(rw)> 00022766 ; <LVAR -0x003 @ 1(r)> 00022766 ; <LVAR -0x006 @ 1(r)> 00022766 ; <LVAR -0x00a @ 4(r)> 00022766 ; <LVAR -0x00e @ 4(rw)> 00022766 ; <LVAR -0x016 @ 4(rw)> 00022766 ; <LVAR -0x01a @ 4(rw)> 00022766 ; <LVAR -0x01c @> 00022766 ; <LVAR -0x020 @ 4(r)> 00022766 ; -------------------------------------------------------------------------------------- 00022766 4e 56 ff 7c |NV | | LINK.W A6,#0xff7c 0002276a bf d5 | | CMPA.L (A5),A7 0002276c 62 06 |b | BHI 0x22774 0002276e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022772 4e 76 |Nv | TRAPV 00022774 de fc 00 64 | d | ADDA.W #0x64,A7 00022778 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002277c 47 ee ff e6 |G | LEA.L (A6-0x1a),A3 00022780 74 01 |t | MOVEQ.L #0x01,D2 00022782 76 0e |v | MOVEQ.L #0x0e,D3 00022784 78 1e |x | MOVEQ.L #0x1e,D4 00022786 7a 02 |z | MOVEQ.L #0x02,D5 00022788 48 53 |HS | PEA.L (A3) 0002278a 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00022790 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00022794 2f 13 |/ | MOVE.L (A3),-(A7) 00022796 48 6e ff fd |Hn | PEA.L (A6-0x3) 0002279a 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 000227a0 de fc 00 0c | | ADDA.W #0xc,A7 000227a4 4a 2e ff fd |J. | TST.B (A6-0x3) 000227a8 66 30 |f0 | BNE 0x227da 000227aa 9e c4 | | SUBA.W D4,A7 000227ac 20 4f | O | MOVEA.L A7,A0 000227ae 43 fa dc 14 |C | LEA.L 0x203c4,A1 000227b2 70 1c |p | MOVEQ.L #0x1c,D0 000227b4 10 d9 | | MOVE.B (A1)+,(A0)+ 000227b6 51 c8 ff fc |Q | DBF D0,0x227b4 000227ba 1f 03 | | MOVE.B D3,-(A7) 000227bc 59 4f |YO | SUBQ.L #0x4,A7 000227be 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000227c2 3f 02 |? | MOVE.W D2,-(A7) 000227c4 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 000227c8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000227ce 50 4f |PO | ADDQ.L #0x8,A7 000227d0 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000227d6 de fc 00 24 | $ | ADDA.W #0x24,A7 000227da 59 4f |YO | SUBQ.L #0x4,A7 000227dc 2f 13 |/ | MOVE.L (A3),-(A7) 000227de 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 000227e4 58 4f |XO | ADDQ.L #0x4,A7 000227e6 26 9f |& | MOVE.L (A7)+,(A3) 000227e8 48 6e 00 08 |Hn | PEA.L (A6+0x8) 000227ec 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000227f2 54 4f |TO | ADDQ.L #0x2,A7 000227f4 3e ba d9 4e |> N | MOVE.W 0x20144,(A7) 000227f8 3f 3a d9 48 |?: H | MOVE.W 0x20142,-(A7) 000227fc 3f 3a d9 42 |?: B | MOVE.W 0x20140,-(A7) 00022800 59 4f |YO | SUBQ.L #0x4,A7 00022802 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022806 3f 02 |? | MOVE.W D2,-(A7) 00022808 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 0002280c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022812 50 4f |PO | ADDQ.L #0x8,A7 00022814 2d 5f 00 08 |-_ | MOVE.L (A7)+,(A6+0x8) 00022818 54 4f |TO | ADDQ.L #0x2,A7 0002281a 2f 13 |/ | MOVE.L (A3),-(A7) 0002281c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022820 4e b9 00 01 03 00 |N | JSR FSCALL_10300 00022826 50 4f |PO | ADDQ.L #0x8,A7 00022828 4a 9f |J | TST.L (A7)+ 0002282a 66 14 |f | BNE 0x22840 0002282c 59 4f |YO | SUBQ.L #0x4,A7 0002282e 2f 13 |/ | MOVE.L (A3),-(A7) 00022830 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022834 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002283a 50 4f |PO | ADDQ.L #0x8,A7 0002283c 26 9f |& | MOVE.L (A7)+,(A3) 0002283e 60 0c |` | BRA 0x2284c 00022840 48 6e 00 08 |Hn | PEA.L (A6+0x8) 00022844 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002284a 58 4f |XO | ADDQ.L #0x4,A7 0002284c 2f 13 |/ | MOVE.L (A3),-(A7) 0002284e 42 27 |B' | CLR.B -(A7) 00022850 1f 05 | | MOVE.B D5,-(A7) 00022852 48 78 00 00 |Hx | PEA.L 0x0 00022856 48 6e ff e4 |Hn | PEA.L (A6-0x1c) 0002285a 48 6e ff e0 |Hn | PEA.L (A6-0x20) 0002285e 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00022864 de fc 00 14 | | ADDA.W #0x14,A7 00022868 2d 79 00 02 41 68 ff f2 |-y Ah | MOVE.L 0x24168,(A6-0xe) 00022870 7e 01 |~ | MOVEQ.L #0x01,D7 00022872 20 6e ff f2 | n | MOVEA.L (A6-0xe),A0 00022876 b0 c2 | | CMPA.W D2,A0 00022878 67 20 |g | BEQ 0x2289a 0002287a 4a 07 |J | TST.B D7 0002287c 67 1c |g | BEQ 0x2289a 0002287e 22 6e ff e0 |"n | MOVEA.L (A6-0x20),A1 00022882 24 48 |$H | MOVEA.L A0,A2 00022884 70 1d |p | MOVEQ.L #0x1d,D0 00022886 b5 09 | | CMPM.B (A1)+,(A2)+ 00022888 56 c8 ff fc |V | DBNE D0,0x22886 0002288c 66 04 |f | BNE 0x22892 0002288e 7e 00 |~ | MOVEQ.L #0x00,D7 00022890 60 06 |` | BRA 0x22898 00022892 2d 68 00 2e ff f2 |-h . | MOVE.L (A0+0x2e),(A6-0xe) 00022898 60 d8 |` | BRA 0x22872 0002289a 4a 07 |J | TST.B D7 0002289c 67 46 |gF | BEQ 0x228e4 0002289e 48 6e ff f2 |Hn | PEA.L (A6-0xe) 000228a2 48 78 00 32 |Hx 2 | PEA.L 0x32 000228a6 4e b9 00 01 02 9c |N | JSR Malloc1(length : Long) : Pointer 000228ac 50 4f |PO | ADDQ.L #0x8,A7 000228ae 20 6e ff f2 | n | MOVEA.L (A6-0xe),A0 000228b2 22 6e ff e0 |"n | MOVEA.L (A6-0x20),A1 000228b6 24 48 |$H | MOVEA.L A0,A2 000228b8 70 1d |p | MOVEQ.L #0x1d,D0 000228ba 14 d9 | | MOVE.B (A1)+,(A2)+ 000228bc 51 c8 ff fc |Q | DBF D0,0x228ba 000228c0 21 42 00 2a |!B * | MOVE.L D2,(A0+0x2a) 000228c4 21 79 00 02 41 68 00 2e |!y Ah .| MOVE.L 0x24168,(A0+0x2e) 000228cc 41 e8 00 1e |A | LEA.L (A0+0x1e),A0 000228d0 43 fa dd 8e |C | LEA.L 0x20660,A1 000228d4 70 07 |p | MOVEQ.L #0x07,D0 000228d6 10 d9 | | MOVE.B (A1)+,(A0)+ 000228d8 51 c8 ff fc |Q | DBF D0,0x228d6 000228dc 23 ee ff f2 00 02 41 68 |# Ah| MOVE.L (A6-0xe),0x24168 000228e4 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000228e8 b0 c2 | | CMPA.W D2,A0 000228ea 67 72 |gr | BEQ 0x2295e 000228ec 28 79 00 02 41 68 |(y Ah | MOVEA.L 0x24168,A4 000228f2 7c 00 || | MOVEQ.L #0x00,D6 000228f4 b8 c2 | | CMPA.W D2,A4 000228f6 67 14 |g | BEQ 0x2290c 000228f8 4a 06 |J | TST.B D6 000228fa 66 10 |f | BNE 0x2290c 000228fc b9 ee 00 0c | | CMPA.L (A6+0xc),A4 00022900 66 04 |f | BNE 0x22906 00022902 7c 01 || | MOVEQ.L #0x01,D6 00022904 60 04 |` | BRA 0x2290a 00022906 28 6c 00 2e |(l . | MOVEA.L (A4+0x2e),A4 0002290a 60 e8 |` | BRA 0x228f4 0002290c 4a 06 |J | TST.B D6 0002290e 66 2a |f* | BNE 0x2293a 00022910 41 fa da e8 |A | LEA.L 0x203fa,A0 00022914 70 05 |p | MOVEQ.L #0x05,D0 00022916 2f 20 |/ | MOVE.L -(A0),-(A7) 00022918 51 c8 ff fc |Q | DBF D0,0x22916 0002291c 1f 03 | | MOVE.B D3,-(A7) 0002291e 59 4f |YO | SUBQ.L #0x4,A7 00022920 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00022924 3f 02 |? | MOVE.W D2,-(A7) 00022926 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 0002292a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022930 50 4f |PO | ADDQ.L #0x8,A7 00022932 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022938 de c4 | | ADDA.W D4,A7 0002293a 48 6e ff f6 |Hn | PEA.L (A6-0xa) 0002293e 48 78 00 08 |Hx | PEA.L 0x8 00022942 4e b9 00 01 02 9c |N | JSR Malloc1(length : Long) : Pointer 00022948 50 4f |PO | ADDQ.L #0x8,A7 0002294a 20 6e ff f6 | n | MOVEA.L (A6-0xa),A0 0002294e 20 ae ff f2 | | MOVE.L (A6-0xe),(A0) 00022952 21 6c 00 2a 00 04 |!l * | MOVE.L (A4+0x2a),(A0+0x4) 00022958 29 6e ff f6 00 2a |)n * | MOVE.L (A6-0xa),(A4+0x2a) 0002295e 4a 07 |J | TST.B D7 00022960 67 00 01 16 |g | BEQ 0x22a78 00022964 41 fa da 9e |A | LEA.L 0x20404,A0 00022968 70 04 |p | MOVEQ.L #0x04,D0 0002296a 3f 20 |? | MOVE.W -(A0),-(A7) 0002296c 51 c8 ff fc |Q | DBF D0,0x2296a 00022970 51 4f |QO | SUBQ.L #0x8,A7 00022972 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022976 3f 02 |? | MOVE.W D2,-(A7) 00022978 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 0002297c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022982 2e 93 |. | MOVE.L (A3),(A7) 00022984 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 0002298a 58 4f |XO | ADDQ.L #0x4,A7 0002298c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022992 50 4f |PO | ADDQ.L #0x8,A7 00022994 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002299a de c3 | | ADDA.W D3,A7 0002299c 48 6e ff ea |Hn | PEA.L (A6-0x16) 000229a0 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000229a6 2e ae ff e0 |. | MOVE.L (A6-0x20),(A7) 000229aa 48 6e ff ea |Hn | PEA.L (A6-0x16) 000229ae 48 6e ff fa |Hn | PEA.L (A6-0x6) 000229b2 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 000229b8 58 4f |XO | ADDQ.L #0x4,A7 000229ba 2e ae ff ea |. | MOVE.L (A6-0x16),(A7) 000229be 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 000229c4 58 4f |XO | ADDQ.L #0x4,A7 000229c6 20 5f | _ | MOVEA.L (A7)+,A0 000229c8 2d 48 ff ea |-H | MOVE.L A0,(A6-0x16) 000229cc 4a 50 |JP | TST.W (A0) 000229ce 66 10 |f | BNE 0x229e0 000229d0 48 6e ff ea |Hn | PEA.L (A6-0x16) 000229d4 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000229da 58 4f |XO | ADDQ.L #0x4,A7 000229dc 60 00 00 92 |` | BRA 0x22a70 000229e0 55 4f |UO | SUBQ.L #0x2,A7 000229e2 2f 08 |/ | MOVE.L A0,-(A7) 000229e4 4e ba fc 0a |N | JSR 0x225f0 000229e8 58 4f |XO | ADDQ.L #0x4,A7 000229ea 10 1f | | MOVE.B (A7)+,D0 000229ec 48 80 |H | EXTB.W D0 000229ee 0c 40 00 04 | @ | CMPI.W #0x0004,D0 000229f2 63 02 |c | BLS 0x229f6 000229f4 4e 4e |NN | TRAP #14 000229f6 d0 40 | @ | ADD.W D0,D0 000229f8 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00022a00 00 20 | | .CONST 0x20 ; [0x0] -> 0x22a20 00022a02 00 0a | | .CONST 0xa ; [0x1] -> 0x22a0a 00022a04 00 28 | ( | .CONST 0x28 ; [0x2] -> 0x22a28 00022a06 00 34 | 4 | .CONST 0x34 ; [0x3] -> 0x22a34 00022a08 00 36 | 6 | .CONST 0x36 ; [0x4] -> 0x22a36 00022a0a switch@0x229f8[0x1]: 00022a0a 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 00022a0e 59 4f |YO | SUBQ.L #0x4,A7 00022a10 2f 08 |/ | MOVE.L A0,-(A7) 00022a12 4e ba f6 c4 |N | JSR 0x220d8 00022a16 58 4f |XO | ADDQ.L #0x4,A7 00022a18 4e ba fd 4c |N L | JSR 0x22766 00022a1c 50 4f |PO | ADDQ.L #0x8,A7 00022a1e 60 50 |`P | BRA 0x22a70 00022a20 switch@0x229f8[0x0]: 00022a20 2f 08 |/ | MOVE.L A0,-(A7) 00022a22 4e ba ea ec |N | JSR 0x21510 00022a26 60 b2 |` | BRA 0x229da 00022a28 switch@0x229f8[0x2]: 00022a28 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 00022a2c 2f 08 |/ | MOVE.L A0,-(A7) 00022a2e 4e ba fc 78 |N x | JSR 0x226a8 00022a32 60 e8 |` | BRA 0x22a1c 00022a34 switch@0x229f8[0x3]: 00022a34 60 9a |` | BRA 0x229d0 00022a36 switch@0x229f8[0x4]: 00022a36 2f 3a d9 d8 |/: | MOVE.L 0x20410,-(A7) 00022a3a 2f 3a d9 d0 |/: | MOVE.L 0x2040c,-(A7) 00022a3e 2f 3a d9 c8 |/: | MOVE.L 0x20408,-(A7) 00022a42 2f 3a d9 c0 |/: | MOVE.L 0x20404,-(A7) 00022a46 1f 03 | | MOVE.B D3,-(A7) 00022a48 51 4f |QO | SUBQ.L #0x8,A7 00022a4a 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00022a4e 3f 02 |? | MOVE.W D2,-(A7) 00022a50 3f 3c 00 10 |?< | MOVE.W #0x10,-(A7) 00022a54 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022a5a 58 4f |XO | ADDQ.L #0x4,A7 00022a5c 2e 93 |. | MOVE.L (A3),(A7) 00022a5e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022a64 50 4f |PO | ADDQ.L #0x8,A7 00022a66 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022a6c de fc 00 16 | | ADDA.W #0x16,A7 00022a70 4a 2e ff fa |J. | TST.B (A6-0x6) 00022a74 67 00 ff 26 |g & | BEQ 0x2299c 00022a78 42 27 |B' | CLR.B -(A7) 00022a7a 1f 05 | | MOVE.B D5,-(A7) 00022a7c 48 78 00 01 |Hx | PEA.L 0x1 00022a80 48 6e ff e4 |Hn | PEA.L (A6-0x1c) 00022a84 48 6e ff e0 |Hn | PEA.L (A6-0x20) 00022a88 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00022a8e de fc 00 10 | | ADDA.W #0x10,A7 00022a92 48 53 |HS | PEA.L (A3) 00022a94 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022a9a 58 4f |XO | ADDQ.L #0x4,A7 00022a9c 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00022aa0 4e 5e |N^ | UNLK A6 00022aa2 4e 75 |Nu | RTS 00022aa4 ; -------------------------------------------------------------------------------------- 00022aa4 ; OMSI PASCAL Function 00022aa4 ; -------------------------------------------------------------------------------------- 00022aa4 4e 56 ff ae |NV | LINK.W A6,#0xffae ; Spelunked 00022aa8 bf d5 | | CMPA.L (A5),A7 00022aaa 62 06 |b | BHI 0x22ab2 00022aac 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022ab0 4e 76 |Nv | TRAPV 00022ab2 de fc 00 4a | J | ADDA.W #0x4a,A7 00022ab6 48 e7 c1 c8 |H | MOVEM.L A4+A1+A0+D7+D1+D0,-(A7) 00022aba 72 1e |r | MOVEQ.L #0x1e,D1 00022abc 7e 00 |~ | MOVEQ.L #0x00,D7 00022abe 10 07 | | MOVE.B D7,D0 00022ac0 48 80 |H | EXTB.W D0 00022ac2 eb 40 | @ | ASL.W #0x5,D0 00022ac4 41 f9 00 02 3e 2e |A >. | LEA.L 0x23e2e,A0 00022aca 9e c1 | | SUBA.W D1,A7 00022acc 22 4f |"O | MOVEA.L A7,A1 00022ace 41 f0 00 5d |A ] | LEA.L (A0+D0.W+#0x5d),A0 00022ad2 70 1d |p | MOVEQ.L #0x1d,D0 00022ad4 12 d8 | | MOVE.B (A0)+,(A1)+ 00022ad6 51 c8 ff fc |Q | DBF D0,0x22ad4 00022ada 59 4f |YO | SUBQ.L #0x4,A7 00022adc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022ae0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022ae4 3f 01 |? | MOVE.W D1,-(A7) 00022ae6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022aec 50 4f |PO | ADDQ.L #0x8,A7 00022aee 28 5f |(_ | MOVEA.L (A7)+,A4 00022af0 de c1 | | ADDA.W D1,A7 00022af2 48 78 00 01 |Hx | PEA.L 0x1 00022af6 2f 0c |/ | MOVE.L A4,-(A7) 00022af8 4e ba fc 6c |N l | JSR 0x22766 00022afc 50 4f |PO | ADDQ.L #0x8,A7 00022afe 52 07 |R | ADDQ.B #0x1,D7 00022b00 0c 07 00 04 | | CMPI.B #0x04,D7 00022b04 6f b8 |o | BLE 0x22abe 00022b06 4c df 13 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A4 00022b0a 4e 5e |N^ | UNLK A6 00022b0c 4e 75 |Nu | RTS 00022b0e ; -------------------------------------------------------------------------------------- 00022b0e ; OMSI PASCAL Function 00022b0e ; <LVAR -0x004 @ 4(rw)> 00022b0e ; -------------------------------------------------------------------------------------- 00022b0e 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 ; Spelunked 00022b12 bf d5 | | CMPA.L (A5),A7 00022b14 62 06 |b | BHI 0x22b1c 00022b16 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022b1a 4e 76 |Nv | TRAPV 00022b1c de fc 00 34 | 4 | ADDA.W #0x34,A7 00022b20 48 e7 80 e0 |H | MOVEM.L A2+A1+A0+D0,-(A7) 00022b24 45 ee ff fc |E | LEA.L (A6-0x4),A2 00022b28 9e fc 00 14 | | SUBA.W #0x14,A7 00022b2c 20 4f | O | MOVEA.L A7,A0 00022b2e 43 fa d8 e4 |C | LEA.L 0x20414,A1 00022b32 70 12 |p | MOVEQ.L #0x12,D0 00022b34 10 d9 | | MOVE.B (A1)+,(A0)+ 00022b36 51 c8 ff fc |Q | DBF D0,0x22b34 00022b3a 59 4f |YO | SUBQ.L #0x4,A7 00022b3c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022b40 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022b44 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00022b48 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022b4e 50 4f |PO | ADDQ.L #0x8,A7 00022b50 24 9f |$ | MOVE.L (A7)+,(A2) 00022b52 de fc 00 10 | | ADDA.W #0x10,A7 00022b56 2e 92 |. | MOVE.L (A2),(A7) 00022b58 48 79 00 02 3e 38 |Hy >8 | PEA.L 0x23e38 00022b5e 4e b9 00 01 05 74 |N t | JSR Write_ConfigFile(name: String; dst: Pointer) 00022b64 50 4f |PO | ADDQ.L #0x8,A7 00022b66 48 52 |HR | PEA.L (A2) 00022b68 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022b6e 58 4f |XO | ADDQ.L #0x4,A7 00022b70 4c df 07 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2 00022b74 4e 5e |N^ | UNLK A6 00022b76 4e 75 |Nu | RTS 00022b78 ; -------------------------------------------------------------------------------------- 00022b78 ; OMSI PASCAL Function 00022b78 ; <LVAR -0x006 @ 4(rw)> 00022b78 ; -------------------------------------------------------------------------------------- 00022b78 4e 56 ff 86 |NV | LINK.W A6,#0xff86 00022b7c bf d5 | | CMPA.L (A5),A7 00022b7e 62 06 |b | BHI 0x22b86 00022b80 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022b84 4e 76 |Nv | TRAPV 00022b86 de fc 00 72 | r | ADDA.W #0x72,A7 00022b8a 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022b8e 47 ee ff fa |G | LEA.L (A6-0x6),A3 00022b92 49 f9 00 01 02 c4 |I | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A4 00022b98 74 01 |t | MOVEQ.L #0x01,D2 00022b9a 76 1e |v | MOVEQ.L #0x1e,D3 00022b9c 78 02 |x | MOVEQ.L #0x02,D4 00022b9e 7a 09 |z | MOVEQ.L #0x09,D5 00022ba0 23 c4 00 02 41 60 |# A` | MOVE.L D4,0x24160 00022ba6 23 c4 00 02 41 64 |# Ad | MOVE.L D4,0x24164 00022bac 23 c2 00 02 41 68 |# Ah | MOVE.L D2,0x24168 00022bb2 23 c2 00 02 41 6c |# Al | MOVE.L D2,0x2416c 00022bb8 4a 39 00 02 3e 3d |J9 >= | TST.B 0x23e3d 00022bbe 67 04 |g | BEQ 0x22bc4 00022bc0 7c 04 || | MOVEQ.L #0x04,D6 00022bc2 60 02 |` | BRA 0x22bc6 00022bc4 7c 09 || | MOVEQ.L #0x09,D6 00022bc6 1f 06 | | MOVE.B D6,-(A7) 00022bc8 7e 00 |~ | MOVEQ.L #0x00,D7 00022bca be 17 | | CMP.B (A7),D7 00022bcc 6e 08 |n | BGT 0x22bd6 00022bce 10 17 | | MOVE.B (A7),D0 00022bd0 b0 05 | | CMP.B D5,D0 00022bd2 6f 02 |o | BLE 0x22bd6 00022bd4 4e 4f |NO | TRAP #15 00022bd6 be 17 | | CMP.B (A7),D7 00022bd8 6e 72 |nr | BGT 0x22c4c 00022bda 10 07 | | MOVE.B D7,D0 00022bdc 48 80 |H | EXTB.W D0 00022bde eb 40 | @ | ASL.W #0x5,D0 00022be0 41 f9 00 02 3e 2e |A >. | LEA.L 0x23e2e,A0 00022be6 9e fc 00 10 | | SUBA.W #0x10,A7 00022bea 22 4f |"O | MOVEA.L A7,A1 00022bec 45 fa d8 3a |E : | LEA.L 0x20428,A2 00022bf0 72 0e |r | MOVEQ.L #0x0e,D1 00022bf2 12 da | | MOVE.B (A2)+,(A1)+ 00022bf4 51 c9 ff fc |Q | DBF D1,0x22bf2 00022bf8 3f 3a d5 4a |?: J | MOVE.W 0x20144,-(A7) 00022bfc 3f 3a d5 44 |?: D | MOVE.W 0x20142,-(A7) 00022c00 3f 3a d5 3e |?: > | MOVE.W 0x20140,-(A7) 00022c04 48 70 00 5b |Hp [ | PEA.L (A0+D0.W+#0x5b) 00022c08 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00022c0c 48 68 01 ed |Hh | PEA.L (A0+0x1ed) 00022c10 51 4f |QO | SUBQ.L #0x8,A7 00022c12 48 6f 00 16 |Ho | PEA.L (A7+0x16) 00022c16 3f 02 |? | MOVE.W D2,-(A7) 00022c18 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00022c1c 4e 94 |N | JSR (A4) 00022c1e 54 4f |TO | ADDQ.L #0x2,A7 00022c20 1e 87 | | MOVE.B D7,(A7) 00022c22 4e b9 00 01 05 86 |N | JSR Config_Entry_Name(a : Byte) : String 00022c28 54 4f |TO | ADDQ.L #0x2,A7 00022c2a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022c30 58 4f |XO | ADDQ.L #0x4,A7 00022c32 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00022c36 3f 02 |? | MOVE.W D2,-(A7) 00022c38 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00022c3c 4e 94 |N | JSR (A4) 00022c3e 50 4f |PO | ADDQ.L #0x8,A7 00022c40 4e ba e0 c4 |N | JSR 0x20d06 00022c44 de fc 00 26 | & | ADDA.W #0x26,A7 00022c48 52 07 |R | ADDQ.B #0x1,D7 00022c4a 68 8a |h | BVC 0x22bd6 00022c4c 54 4f |TO | ADDQ.L #0x2,A7 00022c4e 13 c2 00 02 41 5e | A^ | MOVE.B D2,0x2415e 00022c54 7e 00 |~ | MOVEQ.L #0x00,D7 00022c56 10 07 | | MOVE.B D7,D0 00022c58 48 80 |H | EXTB.W D0 00022c5a eb 40 | @ | ASL.W #0x5,D0 00022c5c 41 f9 00 02 3e 2e |A >. | LEA.L 0x23e2e,A0 00022c62 9e c3 | | SUBA.W D3,A7 00022c64 22 4f |"O | MOVEA.L A7,A1 00022c66 41 f0 00 5d |A ] | LEA.L (A0+D0.W+#0x5d),A0 00022c6a 70 1d |p | MOVEQ.L #0x1d,D0 00022c6c 12 d8 | | MOVE.B (A0)+,(A1)+ 00022c6e 51 c8 ff fc |Q | DBF D0,0x22c6c 00022c72 59 4f |YO | SUBQ.L #0x4,A7 00022c74 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022c78 3f 02 |? | MOVE.W D2,-(A7) 00022c7a 3f 03 |? | MOVE.W D3,-(A7) 00022c7c 4e 94 |N | JSR (A4) 00022c7e 50 4f |PO | ADDQ.L #0x8,A7 00022c80 26 9f |& | MOVE.L (A7)+,(A3) 00022c82 de c3 | | ADDA.W D3,A7 00022c84 48 78 00 01 |Hx | PEA.L 0x1 00022c88 2f 13 |/ | MOVE.L (A3),-(A7) 00022c8a 4e ba fa da |N | JSR 0x22766 00022c8e 50 4f |PO | ADDQ.L #0x8,A7 00022c90 52 07 |R | ADDQ.B #0x1,D7 00022c92 0c 07 00 04 | | CMPI.B #0x04,D7 00022c96 6f be |o | BLE 0x22c56 00022c98 42 39 00 02 41 5e |B9 A^ | CLR.B 0x2415e 00022c9e 4a 39 00 02 3e 3d |J9 >= | TST.B 0x23e3d 00022ca4 66 1c |f | BNE 0x22cc2 00022ca6 48 78 00 01 |Hx | PEA.L 0x1 00022caa 51 4f |QO | SUBQ.L #0x8,A7 00022cac 1f 05 | | MOVE.B D5,-(A7) 00022cae 4e b9 00 01 05 86 |N | JSR Config_Entry_Name(a : Byte) : String 00022cb4 54 4f |TO | ADDQ.L #0x2,A7 00022cb6 4e ba f4 20 |N | JSR 0x220d8 00022cba 58 4f |XO | ADDQ.L #0x4,A7 00022cbc 4e ba fa a8 |N | JSR 0x22766 00022cc0 50 4f |PO | ADDQ.L #0x8,A7 00022cc2 9e fc 00 14 | | SUBA.W #0x14,A7 00022cc6 20 4f | O | MOVEA.L A7,A0 00022cc8 43 fa d7 6e |C n | LEA.L 0x20438,A1 00022ccc 70 12 |p | MOVEQ.L #0x12,D0 00022cce 10 d9 | | MOVE.B (A1)+,(A0)+ 00022cd0 51 c8 ff fc |Q | DBF D0,0x22cce 00022cd4 59 4f |YO | SUBQ.L #0x4,A7 00022cd6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022cda 3f 02 |? | MOVE.W D2,-(A7) 00022cdc 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00022ce0 4e 94 |N | JSR (A4) 00022ce2 50 4f |PO | ADDQ.L #0x8,A7 00022ce4 26 9f |& | MOVE.L (A7)+,(A3) 00022ce6 de fc 00 10 | | ADDA.W #0x10,A7 00022cea 2e 93 |. | MOVE.L (A3),(A7) 00022cec 48 79 00 02 3e 38 |Hy >8 | PEA.L 0x23e38 00022cf2 4e b9 00 01 05 74 |N t | JSR Write_ConfigFile(name: String; dst: Pointer) 00022cf8 50 4f |PO | ADDQ.L #0x8,A7 00022cfa 48 53 |HS | PEA.L (A3) 00022cfc 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022d02 58 4f |XO | ADDQ.L #0x4,A7 00022d04 4e ba f7 b4 |N | JSR 0x224ba 00022d08 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00022d0c 4e 5e |N^ | UNLK A6 00022d0e 4e 75 |Nu | RTS 00022d10 ; -------------------------------------------------------------------------------------- 00022d10 ; OMSI PASCAL Function 00022d10 ; <LVAR -0x002 @> 00022d10 ; <LVAR -0x006 @ 4(rw)> 00022d10 ; <LVAR -0x007 @ 1(r)> 00022d10 ; -------------------------------------------------------------------------------------- 00022d10 4e 56 ff 5c |NV \ | LINK.W A6,#0xff5c 00022d14 bf d5 | | CMPA.L (A5),A7 00022d16 62 06 |b | BHI 0x22d1e 00022d18 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022d1c 4e 76 |Nv | TRAPV 00022d1e de fc 00 98 | | ADDA.W #0x98,A7 00022d22 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022d26 45 ee ff fa |E | LEA.L (A6-0x6),A2 00022d2a 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00022d30 49 ee ff f9 |I | LEA.L (A6-0x7),A4 00022d34 72 01 |r | MOVEQ.L #0x01,D1 00022d36 74 10 |t | MOVEQ.L #0x10,D2 00022d38 76 14 |v | MOVEQ.L #0x14,D3 00022d3a 78 0c |x | MOVEQ.L #0x0c,D4 00022d3c 7a 0e |z | MOVEQ.L #0x0e,D5 00022d3e 7c 3c ||< | MOVEQ.L #0x3c,D6 00022d40 51 4f |QO | SUBQ.L #0x8,A7 00022d42 4e b9 00 01 03 c4 |N | JSR GetArgv() : String 00022d48 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00022d4e 58 4f |XO | ADDQ.L #0x4,A7 00022d50 24 9f |$ | MOVE.L (A7)+,(A2) 00022d52 7e 00 |~ | MOVEQ.L #0x00,D7 00022d54 20 52 | R | MOVEA.L (A2),A0 00022d56 4a 50 |JP | TST.W (A0) 00022d58 66 02 |f | BNE 0x22d5c 00022d5a 52 07 |R | ADDQ.B #0x1,D7 00022d5c 4a 07 |J | TST.B D7 00022d5e 67 6a |gj | BEQ 0x22dca 00022d60 48 52 |HR | PEA.L (A2) 00022d62 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022d68 9e fc 00 2e | . | SUBA.W #0x2e,A7 00022d6c 20 4f | O | MOVEA.L A7,A0 00022d6e 43 fa d6 dc |C | LEA.L 0x2044c,A1 00022d72 70 30 |p0 | MOVEQ.L #0x30,D0 00022d74 10 d9 | | MOVE.B (A1)+,(A0)+ 00022d76 51 c8 ff fc |Q | DBF D0,0x22d74 00022d7a 9e c4 | | SUBA.W D4,A7 00022d7c 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00022d80 3f 01 |? | MOVE.W D1,-(A7) 00022d82 3f 3c 00 31 |?< 1 | MOVE.W #0x31,-(A7) 00022d86 4e 93 |N | JSR (A3) 00022d88 50 4f |PO | ADDQ.L #0x8,A7 00022d8a 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00022d90 58 4f |XO | ADDQ.L #0x4,A7 00022d92 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00022d98 58 4f |XO | ADDQ.L #0x4,A7 00022d9a 24 9f |$ | MOVE.L (A7)+,(A2) 00022d9c de fc 00 32 | 2 | ADDA.W #0x32,A7 00022da0 20 52 | R | MOVEA.L (A2),A0 00022da2 4a 50 |JP | TST.W (A0) 00022da4 66 24 |f$ | BNE 0x22dca 00022da6 48 52 |HR | PEA.L (A2) 00022da8 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022dae 2e ba d7 34 |. 4 | MOVE.L 0x204e4,(A7) 00022db2 2f 3a d7 2c |/: , | MOVE.L 0x204e0,-(A7) 00022db6 59 4f |YO | SUBQ.L #0x4,A7 00022db8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022dbc 3f 01 |? | MOVE.W D1,-(A7) 00022dbe 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00022dc2 4e 93 |N | JSR (A3) 00022dc4 50 4f |PO | ADDQ.L #0x8,A7 00022dc6 24 9f |$ | MOVE.L (A7)+,(A2) 00022dc8 50 4f |PO | ADDQ.L #0x8,A7 00022dca 2f 3a d7 24 |/: $ | MOVE.L 0x204f0,-(A7) 00022dce 2f 3a d7 1c |/: | MOVE.L 0x204ec,-(A7) 00022dd2 2f 3a d7 14 |/: | MOVE.L 0x204e8,-(A7) 00022dd6 59 4f |YO | SUBQ.L #0x4,A7 00022dd8 2f 12 |/ | MOVE.L (A2),-(A7) 00022dda 59 4f |YO | SUBQ.L #0x4,A7 00022ddc 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00022de0 3f 01 |? | MOVE.W D1,-(A7) 00022de2 3f 04 |? | MOVE.W D4,-(A7) 00022de4 4e 93 |N | JSR (A3) 00022de6 50 4f |PO | ADDQ.L #0x8,A7 00022de8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022dee 50 4f |PO | ADDQ.L #0x8,A7 00022df0 20 5f | _ | MOVEA.L (A7)+,A0 00022df2 24 88 |$ | MOVE.L A0,(A2) 00022df4 2f 08 |/ | MOVE.L A0,-(A7) 00022df6 2f 08 |/ | MOVE.L A0,-(A7) 00022df8 48 78 00 03 |Hx | PEA.L 0x3 00022dfc 48 79 00 02 3e 38 |Hy >8 | PEA.L 0x23e38 00022e02 48 54 |HT | PEA.L (A4) 00022e04 4e b9 00 01 05 6e |N n | JSR Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool) 00022e0a de c2 | | ADDA.W D2,A7 00022e0c 4a 14 |J | TST.B (A4) 00022e0e 66 00 00 ac |f | BNE 0x22ebc 00022e12 4a 07 |J | TST.B D7 00022e14 66 28 |f( | BNE 0x22e3e 00022e16 41 fa d6 f6 |A | LEA.L 0x2050e,A0 00022e1a 70 0c |p | MOVEQ.L #0x0c,D0 00022e1c 3f 20 |? | MOVE.W -(A0),-(A7) 00022e1e 51 c8 ff fc |Q | DBF D0,0x22e1c 00022e22 1f 05 | | MOVE.B D5,-(A7) 00022e24 59 4f |YO | SUBQ.L #0x4,A7 00022e26 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00022e2a 3f 01 |? | MOVE.W D1,-(A7) 00022e2c 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 00022e30 4e 93 |N | JSR (A3) 00022e32 50 4f |PO | ADDQ.L #0x8,A7 00022e34 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022e3a de fc 00 20 | | ADDA.W #0x20,A7 00022e3e 9e c6 | | SUBA.W D6,A7 00022e40 20 4f | O | MOVEA.L A7,A0 00022e42 43 fa d6 3a |C : | LEA.L 0x2047e,A1 00022e46 70 3a |p: | MOVEQ.L #0x3a,D0 00022e48 10 d9 | | MOVE.B (A1)+,(A0)+ 00022e4a 51 c8 ff fc |Q | DBF D0,0x22e48 00022e4e 5d 4f |]O | SUBQ.L #0x6,A7 00022e50 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00022e54 3f 01 |? | MOVE.W D1,-(A7) 00022e56 3f 3c 00 3b |?< ; | MOVE.W #0x3b,-(A7) 00022e5a 4e 93 |N | JSR (A3) 00022e5c 5c 4f |\O | ADDQ.L #0x6,A7 00022e5e 42 17 |B | CLR.B (A7) 00022e60 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00022e66 5c 4f |\O | ADDQ.L #0x6,A7 00022e68 4a 1f |J | TST.B (A7)+ 00022e6a 67 4e |gN | BEQ 0x22eba 00022e6c 5d 4f |]O | SUBQ.L #0x6,A7 00022e6e 20 4f | O | MOVEA.L A7,A0 00022e70 43 fa d6 9c |C | LEA.L 0x2050e,A1 00022e74 70 04 |p | MOVEQ.L #0x04,D0 00022e76 10 d9 | | MOVE.B (A1)+,(A0)+ 00022e78 51 c8 ff fc |Q | DBF D0,0x22e76 00022e7c 59 4f |YO | SUBQ.L #0x4,A7 00022e7e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022e82 3f 01 |? | MOVE.W D1,-(A7) 00022e84 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00022e88 4e 93 |N | JSR (A3) 00022e8a 50 4f |PO | ADDQ.L #0x8,A7 00022e8c 20 6f 00 46 | o F | MOVEA.L (A7+0x46),A0 00022e90 2f 08 |/ | MOVE.L A0,-(A7) 00022e92 1f 01 | | MOVE.B D1,-(A7) 00022e94 48 6e ff fe |Hn | PEA.L (A6-0x2) 00022e98 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00022e9e de c3 | | ADDA.W D3,A7 00022ea0 20 6f 00 3c | o < | MOVEA.L (A7+0x3c),A0 00022ea4 2f 08 |/ | MOVE.L A0,-(A7) 00022ea6 48 78 00 03 |Hx | PEA.L 0x3 00022eaa 48 79 00 02 3e 38 |Hy >8 | PEA.L 0x23e38 00022eb0 48 54 |HT | PEA.L (A4) 00022eb2 4e b9 00 01 05 6e |N n | JSR Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool) 00022eb8 de c2 | | ADDA.W D2,A7 00022eba de c6 | | ADDA.W D6,A7 00022ebc 4a 39 00 02 3e 3b |J9 >; | TST.B 0x23e3b 00022ec2 67 7c |g| | BEQ 0x22f40 00022ec4 41 fa d6 1a |A | LEA.L 0x204e0,A0 00022ec8 70 12 |p | MOVEQ.L #0x12,D0 00022eca 3f 20 |? | MOVE.W -(A0),-(A7) 00022ecc 51 c8 ff fc |Q | DBF D0,0x22eca 00022ed0 5d 4f |]O | SUBQ.L #0x6,A7 00022ed2 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00022ed6 3f 01 |? | MOVE.W D1,-(A7) 00022ed8 3f 3c 00 26 |?< & | MOVE.W #0x26,-(A7) 00022edc 4e 93 |N | JSR (A3) 00022ede 5c 4f |\O | ADDQ.L #0x6,A7 00022ee0 42 17 |B | CLR.B (A7) 00022ee2 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00022ee8 5c 4f |\O | ADDQ.L #0x6,A7 00022eea 4a 1f |J | TST.B (A7)+ 00022eec 67 4e |gN | BEQ 0x22f3c 00022eee 5d 4f |]O | SUBQ.L #0x6,A7 00022ef0 20 4f | O | MOVEA.L A7,A0 00022ef2 43 fa d6 20 |C | LEA.L 0x20514,A1 00022ef6 70 04 |p | MOVEQ.L #0x04,D0 00022ef8 10 d9 | | MOVE.B (A1)+,(A0)+ 00022efa 51 c8 ff fc |Q | DBF D0,0x22ef8 00022efe 59 4f |YO | SUBQ.L #0x4,A7 00022f00 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022f04 3f 01 |? | MOVE.W D1,-(A7) 00022f06 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00022f0a 4e 93 |N | JSR (A3) 00022f0c 50 4f |PO | ADDQ.L #0x8,A7 00022f0e 20 6f 00 30 | o 0 | MOVEA.L (A7+0x30),A0 00022f12 2f 08 |/ | MOVE.L A0,-(A7) 00022f14 1f 01 | | MOVE.B D1,-(A7) 00022f16 48 6e ff fe |Hn | PEA.L (A6-0x2) 00022f1a 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00022f20 de c3 | | ADDA.W D3,A7 00022f22 20 6f 00 26 | o & | MOVEA.L (A7+0x26),A0 00022f26 2f 08 |/ | MOVE.L A0,-(A7) 00022f28 48 78 00 03 |Hx | PEA.L 0x3 00022f2c 48 79 00 02 3e 38 |Hy >8 | PEA.L 0x23e38 00022f32 48 54 |HT | PEA.L (A4) 00022f34 4e b9 00 01 05 6e |N n | JSR Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool) 00022f3a de c2 | | ADDA.W D2,A7 00022f3c de fc 00 26 | & | ADDA.W #0x26,A7 00022f40 de c2 | | ADDA.W D2,A7 00022f42 7e 01 |~ | MOVEQ.L #0x01,D7 00022f44 4a 14 |J | TST.B (A4) 00022f46 67 00 fe 14 |g | BEQ 0x22d5c 00022f4a 41 fa d5 e2 |A | LEA.L 0x2052e,A0 00022f4e 70 04 |p | MOVEQ.L #0x04,D0 00022f50 2f 20 |/ | MOVE.L -(A0),-(A7) 00022f52 51 c8 ff fc |Q | DBF D0,0x22f50 00022f56 59 4f |YO | SUBQ.L #0x4,A7 00022f58 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022f5c 3f 01 |? | MOVE.W D1,-(A7) 00022f5e 3f 03 |? | MOVE.W D3,-(A7) 00022f60 4e 93 |N | JSR (A3) 00022f62 50 4f |PO | ADDQ.L #0x8,A7 00022f64 24 9f |$ | MOVE.L (A7)+,(A2) 00022f66 de c2 | | ADDA.W D2,A7 00022f68 2e 92 |. | MOVE.L (A2),(A7) 00022f6a 48 78 00 03 |Hx | PEA.L 0x3 00022f6e 48 79 00 02 3f ca |Hy ? | PEA.L 0x23fca 00022f74 48 54 |HT | PEA.L (A4) 00022f76 4e b9 00 01 05 6e |N n | JSR Read_ConfigFile(name: String; version: Long; dst: Pointer; VAR status: Bool) 00022f7c de c2 | | ADDA.W D2,A7 00022f7e 4a 14 |J | TST.B (A4) 00022f80 66 2e |f. | BNE 0x22fb0 00022f82 9e fc 00 24 | $ | SUBA.W #0x24,A7 00022f86 20 4f | O | MOVEA.L A7,A0 00022f88 43 fa d5 a4 |C | LEA.L 0x2052e,A1 00022f8c 70 22 |p" | MOVEQ.L #0x22,D0 00022f8e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022f90 51 c8 ff fc |Q | DBF D0,0x22f8e 00022f94 1f 05 | | MOVE.B D5,-(A7) 00022f96 59 4f |YO | SUBQ.L #0x4,A7 00022f98 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00022f9c 3f 01 |? | MOVE.W D1,-(A7) 00022f9e 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 00022fa2 4e 93 |N | JSR (A3) 00022fa4 50 4f |PO | ADDQ.L #0x8,A7 00022fa6 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022fac de fc 00 2a | * | ADDA.W #0x2a,A7 00022fb0 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00022fb4 4e 5e |N^ | UNLK A6 00022fb6 4e 75 |Nu | RTS 00022fb8 ; -------------------------------------------------------------------------------------- 00022fb8 ; OMSI PASCAL Function 00022fb8 ; <LVAR -0x004 @> 00022fb8 ; -------------------------------------------------------------------------------------- 00022fb8 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00022fbc bf d5 | | CMPA.L (A5),A7 00022fbe 62 06 |b | BHI 0x22fc6 00022fc0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022fc4 4e 76 |Nv | TRAPV 00022fc6 de fc 00 34 | 4 | ADDA.W #0x34,A7 00022fca 48 e7 e0 c0 |H | MOVEM.L A1+A0+D2+D1+D0,-(A7) 00022fce 72 01 |r | MOVEQ.L #0x01,D1 00022fd0 74 0a |t | MOVEQ.L #0x0a,D2 00022fd2 4a 39 00 02 3e 3a |J9 >: | TST.B 0x23e3a 00022fd8 67 6e |gn | BEQ 0x23048 00022fda 9e c2 | | SUBA.W D2,A7 00022fdc 20 4f | O | MOVEA.L A7,A0 00022fde 43 fa d5 72 |C r | LEA.L 0x20552,A1 00022fe2 70 08 |p | MOVEQ.L #0x08,D0 00022fe4 10 d9 | | MOVE.B (A1)+,(A0)+ 00022fe6 51 c8 ff fc |Q | DBF D0,0x22fe4 00022fea 5d 4f |]O | SUBQ.L #0x6,A7 00022fec 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00022ff0 3f 01 |? | MOVE.W D1,-(A7) 00022ff2 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00022ff6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022ffc 5c 4f |\O | ADDQ.L #0x6,A7 00022ffe 42 17 |B | CLR.B (A7) 00023000 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00023006 5c 4f |\O | ADDQ.L #0x6,A7 00023008 4a 1f |J | TST.B (A7)+ 0002300a 67 3a |g: | BEQ 0x23046 0002300c 59 4f |YO | SUBQ.L #0x4,A7 0002300e 1e ba d5 4c | L | MOVE.B 0x2055c,(A7) 00023012 1f 7a d5 49 00 01 | z I | MOVE.B 0x2055d,(A7+0x1) 00023018 1f 7a d5 44 00 02 | z D | MOVE.B 0x2055e,(A7+0x2) 0002301e 59 4f |YO | SUBQ.L #0x4,A7 00023020 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023024 3f 01 |? | MOVE.W D1,-(A7) 00023026 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 0002302a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023030 50 4f |PO | ADDQ.L #0x8,A7 00023032 48 78 00 01 |Hx | PEA.L 0x1 00023036 1f 01 | | MOVE.B D1,-(A7) 00023038 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002303c 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00023042 de fc 00 12 | | ADDA.W #0x12,A7 00023046 de c2 | | ADDA.W D2,A7 00023048 4c df 03 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1 0002304c 4e 5e |N^ | UNLK A6 0002304e 4e 75 |Nu | RTS 00023050 ; -------------------------------------------------------------------------------------- 00023050 ; OMSI PASCAL Function 00023050 ; <LVAR -0x004 @ 4(r)> 00023050 ; <LVAR -0x008 @> 00023050 ; <LVAR -0x00a @> 00023050 ; <LVAR -0x00c @ 2(r)> 00023050 ; <LVAR -0x010 @> 00023050 ; -------------------------------------------------------------------------------------- 00023050 4e 56 ff c6 |NV | LINK.W A6,#0xffc6 00023054 bf d5 | | CMPA.L (A5),A7 00023056 62 06 |b | BHI 0x2305e 00023058 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002305c 4e 76 |Nv | TRAPV 0002305e de fc 00 2a | * | ADDA.W #0x2a,A7 00023062 48 e7 f8 c0 |H | MOVEM.L A1+A0+D4+D3+D2+D1+D0,-(A7) 00023066 43 f9 00 01 02 38 |C 8 | LEA.L KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word),A1 0002306c 74 0a |t | MOVEQ.L #0x0a,D2 0002306e 76 04 |v | MOVEQ.L #0x04,D3 00023070 78 02 |x | MOVEQ.L #0x02,D4 00023072 48 78 04 00 |Hx | PEA.L 0x400 00023076 41 ee ff f0 |A | LEA.L (A6-0x10),A0 0002307a 2f 08 |/ | MOVE.L A0,-(A7) 0002307c 3f 03 |? | MOVE.W D3,-(A7) 0002307e 4e 91 |N | JSR (A1) 00023080 de c2 | | ADDA.W D2,A7 00023082 48 78 04 04 |Hx | PEA.L 0x404 00023086 41 ee ff f4 |A | LEA.L (A6-0xc),A0 0002308a 2f 08 |/ | MOVE.L A0,-(A7) 0002308c 3f 04 |? | MOVE.W D4,-(A7) 0002308e 4e 91 |N | JSR (A1) 00023090 de c2 | | ADDA.W D2,A7 00023092 48 78 04 06 |Hx | PEA.L 0x406 00023096 41 ee ff f6 |A | LEA.L (A6-0xa),A0 0002309a 2f 08 |/ | MOVE.L A0,-(A7) 0002309c 3f 04 |? | MOVE.W D4,-(A7) 0002309e 4e 91 |N | JSR (A1) 000230a0 de c2 | | ADDA.W D2,A7 000230a2 48 78 04 08 |Hx | PEA.L 0x408 000230a6 41 ee ff f8 |A | LEA.L (A6-0x8),A0 000230aa 2f 08 |/ | MOVE.L A0,-(A7) 000230ac 3f 03 |? | MOVE.W D3,-(A7) 000230ae 4e 91 |N | JSR (A1) 000230b0 de c2 | | ADDA.W D2,A7 000230b2 48 78 04 0c |Hx | PEA.L 0x40c 000230b6 41 ee ff fc |A | LEA.L (A6-0x4),A0 000230ba 2f 08 |/ | MOVE.L A0,-(A7) 000230bc 3f 03 |? | MOVE.W D3,-(A7) 000230be 4e 91 |N | JSR (A1) 000230c0 de c2 | | ADDA.W D2,A7 000230c2 70 00 |p | MOVEQ.L #0x00,D0 000230c4 c0 ee ff f4 | | MULU.W (A6-0xc),D0 000230c8 42 81 |B | CLR.L D1 000230ca 32 00 |2 | MOVE.W D0,D1 000230cc d2 ae ff fc | | ADD.L (A6-0x4),D1 000230d0 23 c1 00 02 41 74 |# At | MOVE.L D1,0x24174 000230d6 4c df 03 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1 000230da 4e 5e |N^ | UNLK A6 000230dc 4e 75 |Nu | RTS 000230de ; -------------------------------------------------------------------------------------- 000230de ; OMSI PASCAL Function 000230de ; <LVAR -0x00e 4(r)> 000230de ; <LVAR -0x012 4(r)> 000230de ; <LVAR -0x016 @ 4(r)> 000230de ; <LVAR -0x01a @ 4(r)> 000230de ; <LVAR -0x01c @ 1(r)> 000230de ; -------------------------------------------------------------------------------------- 000230de 4e 56 ff 94 |NV | LINK.W A6,#0xff94 000230e2 bf d5 | | CMPA.L (A5),A7 000230e4 62 06 |b | BHI 0x230ec 000230e6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000230ea 4e 76 |Nv | TRAPV 000230ec de fc 00 50 | P | ADDA.W #0x50,A7 000230f0 48 e7 f9 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 000230f4 45 ee ff e4 |E | LEA.L (A6-0x1c),A2 000230f8 47 f9 00 02 41 f8 |G A | LEA.L 0x241f8,A3 000230fe 49 ee ff e6 |I | LEA.L (A6-0x1a),A4 00023102 72 01 |r | MOVEQ.L #0x01,D1 00023104 74 03 |t | MOVEQ.L #0x03,D2 00023106 76 02 |v | MOVEQ.L #0x02,D3 00023108 78 10 |x | MOVEQ.L #0x10,D4 0002310a 9e fc 00 0c | | SUBA.W #0xc,A7 0002310e 20 4f | O | MOVEA.L A7,A0 00023110 43 fa d4 4e |C N | LEA.L 0x20560,A1 00023114 70 0a |p | MOVEQ.L #0x0a,D0 00023116 10 d9 | | MOVE.B (A1)+,(A0)+ 00023118 51 c8 ff fc |Q | DBF D0,0x23116 0002311c 59 4f |YO | SUBQ.L #0x4,A7 0002311e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023122 3f 01 |? | MOVE.W D1,-(A7) 00023124 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00023128 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002312e 5c 4f |\O | ADDQ.L #0x6,A7 00023130 42 17 |B | CLR.B (A7) 00023132 42 27 |B' | CLR.B -(A7) 00023134 48 78 00 00 |Hx | PEA.L 0x0 00023138 48 52 |HR | PEA.L (A2) 0002313a 48 54 |HT | PEA.L (A4) 0002313c 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00023142 de fc 00 20 | | ADDA.W #0x20,A7 00023146 4a 12 |J | TST.B (A2) 00023148 67 36 |g6 | BEQ 0x23180 0002314a 42 53 |BS | CLR.W (A3) 0002314c 42 79 00 02 41 fa |By A | CLR.W 0x241fa 00023152 7e 00 |~ | MOVEQ.L #0x00,D7 00023154 be 82 | | CMP.L D2,D7 00023156 63 02 |c | BLS 0x2315a 00023158 4e 4f |NO | TRAP #15 0002315a 20 07 | | MOVE.L D7,D0 0002315c e3 80 | | ASL.L #0x1,D0 0002315e 20 4b | K | MOVEA.L A3,A0 00023160 42 70 08 04 |Bp | CLR.W (A0+D0.L+#0x4) 00023164 52 87 |R | ADDQ.L #0x1,D7 00023166 be 82 | | CMP.L D2,D7 00023168 6f ea |o | BLE 0x23154 0002316a 1f 03 | | MOVE.B D3,-(A7) 0002316c 42 27 |B' | CLR.B -(A7) 0002316e 48 78 00 01 |Hx | PEA.L 0x1 00023172 48 52 |HR | PEA.L (A2) 00023174 48 54 |HT | PEA.L (A4) 00023176 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 0002317c de c4 | | ADDA.W D4,A7 0002317e 60 46 |`F | BRA 0x231c6 00023180 2f 14 |/ | MOVE.L (A4),-(A7) 00023182 42 67 |Bg | CLR.W -(A7) 00023184 42 67 |Bg | CLR.W -(A7) 00023186 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 0002318a 1f 01 | | MOVE.B D1,-(A7) 0002318c 41 ee ff ea |A | LEA.L (A6-0x16),A0 00023190 2f 08 |/ | MOVE.L A0,-(A7) 00023192 48 52 |HR | PEA.L (A2) 00023194 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 0002319a de fc 00 12 | | ADDA.W #0x12,A7 0002319e 1e 83 | | MOVE.B D3,(A7) 000231a0 1f 01 | | MOVE.B D1,-(A7) 000231a2 48 78 00 01 |Hx | PEA.L 0x1 000231a6 48 52 |HR | PEA.L (A2) 000231a8 48 54 |HT | PEA.L (A4) 000231aa 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000231b0 de c4 | | ADDA.W D4,A7 000231b2 26 ae ff ea |& | MOVE.L (A6-0x16),(A3) 000231b6 23 ee ff ee 00 02 41 fc |# A | MOVE.L (A6-0x12),0x241fc 000231be 23 ee ff f2 00 02 42 00 |# B | MOVE.L (A6-0xe),0x24200 000231c6 4c df 1f 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4 000231ca 4e 5e |N^ | UNLK A6 000231cc 4e 75 |Nu | RTS 000231ce ; -------------------------------------------------------------------------------------- 000231ce ; OMSI PASCAL Function 000231ce ; -------------------------------------------------------------------------------------- 000231ce START: 000231ce 4f fa 00 08 |O | LEA.L MAIN,A7 000231d2 4e f9 00 01 02 80 |N | JMP ?start_program 000231d8 MAIN: 000231d8 45 f9 00 02 42 05 |E B | LEA.L 0x24205,A2 000231de 4e b9 00 01 03 98 |N | JSR FSCALL_10398 000231e4 42 12 |B | CLR.B (A2) 000231e6 48 79 00 02 3e 36 |Hy >6 | PEA.L 0x23e36 000231ec 4e b9 00 01 05 aa |N | JSR Read_fc00() : Byte 000231f2 58 4f |XO | ADDQ.L #0x4,A7 000231f4 4e ba fe e8 |N | JSR 0x230de 000231f8 4e ba fe 56 |N V | JSR 0x23050 000231fc 4e ba fb 12 |N | JSR 0x22d10 00023200 4e ba fd b6 |N | JSR 0x22fb8 00023204 4e ba d6 92 |N | JSR 0x20898 00023208 48 78 00 00 |Hx | PEA.L 0x0 0002320c 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 00023212 58 4f |XO | ADDQ.L #0x4,A7 00023214 4e ba d7 02 |N | JSR 0x20918 00023218 4e ba d9 52 |N R | JSR 0x20b6c 0002321c 48 52 |HR | PEA.L (A2) 0002321e 4e ba d9 d0 |N | JSR 0x20bf0 00023222 54 4f |TO | ADDQ.L #0x2,A7 00023224 1e 92 | | MOVE.B (A2),(A7) 00023226 4e ba dc 88 |N | JSR 0x20eb0 0002322a 54 4f |TO | ADDQ.L #0x2,A7 0002322c 4e ba de 9a |N | JSR 0x210c8 00023230 4e ba f9 46 |N F | JSR 0x22b78 00023234 4e b9 00 01 02 22 |N " | JSR KC11_Live(void) 0002323a 51 4f |QO | SUBQ.L #0x8,A7 0002323c 20 4f | O | MOVEA.L A7,A0 0002323e 43 fa d3 2c |C , | LEA.L 0x2056c,A1 00023242 70 06 |p | MOVEQ.L #0x06,D0 00023244 10 d9 | | MOVE.B (A1)+,(A0)+ 00023246 51 c8 ff fc |Q | DBF D0,0x23244 0002324a 59 4f |YO | SUBQ.L #0x4,A7 0002324c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023250 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023254 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 00023258 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002325e 50 4f |PO | ADDQ.L #0x8,A7 00023260 48 78 00 01 |Hx | PEA.L 0x1 00023264 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00023268 48 79 00 02 42 04 |Hy B | PEA.L 0x24204 0002326e 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00023274 de fc 00 14 | | ADDA.W #0x14,A7 00023278 42 17 |B | CLR.B (A7) 0002327a 48 78 00 01 |Hx | PEA.L 0x1 0002327e 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00023284 5c 4f |\O | ADDQ.L #0x6,A7 00023286 4e b9 00 01 02 84 |N | JSR ?exit 0002328c 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 00023290 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00023294 bf d5 | | CMPA.L (A5),A7 00023296 4e 76 |Nv | TRAPV 00023298 42 2e 00 08 |B. | CLR.B (A6+0x8) 0002329c 30 39 93 03 e0 00 |09 | MOVE.W 0x9303e000,D0 000232a2 02 40 00 08 | @ | ANDI.W #0x0008,D0 000232a6 67 00 00 06 |g | BEQ 0x232ae 000232aa 52 2e 00 08 |R. | ADDQ.B #0x1,(A6+0x8) 000232ae 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 000232b2 4e 5e |N^ | UNLK A6 000232b4 4e 75 |Nu | RTS 000232b6 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 000232ba 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 000232be bf d5 | | CMPA.L (A5),A7 000232c0 4e 76 |Nv | TRAPV 000232c2 30 3c 02 01 |0< | MOVE.W #0x201,D0 000232c6 4e b9 80 00 20 64 |N d | JSR 0x80002064 000232cc 67 00 00 06 |g | BEQ 0x232d4 000232d0 30 7c 00 00 |0| | MOVEA.W #0x0,A0 000232d4 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 000232d8 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 000232dc 4e 5e |N^ | UNLK A6 000232de 4e 75 |Nu | RTS 000232e0 4e 56 00 00 |NV | LINK.W A6,#0x0000 000232e4 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 000232e8 bf d5 | | CMPA.L (A5),A7 000232ea 4e 76 |Nv | TRAPV 000232ec 30 3c 07 00 |0< | MOVE.W #0x700,D0 000232f0 4e b9 80 00 20 64 |N d | JSR 0x80002064 000232f6 67 00 00 06 |g | BEQ 0x232fe 000232fa 30 7c 00 00 |0| | MOVEA.W #0x0,A0 000232fe 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 00023302 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00023306 4e 5e |N^ | UNLK A6 00023308 4e 75 |Nu | RTS 0002330a 4e 56 00 00 |NV | LINK.W A6,#0x0000 0002330e 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00023312 bf d5 | | CMPA.L (A5),A7 00023314 4e 76 |Nv | TRAPV 00023316 30 3c 08 00 |0< | MOVE.W #0x800,D0 0002331a 4e b9 80 00 20 64 |N d | JSR 0x80002064 00023320 67 00 00 06 |g | BEQ 0x23328 00023324 30 7c 00 00 |0| | MOVEA.W #0x0,A0 00023328 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 0002332c 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00023330 4e 5e |N^ | UNLK A6 00023332 4e 75 |Nu | RTS 00023334 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 00023338 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 0002333c bf d5 | | CMPA.L (A5),A7 0002333e 4e 76 |Nv | TRAPV 00023340 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00023344 4e b9 80 00 20 5c |N \ | JSR 0x8000205c 0002334a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002334e 42 90 |B | CLR.L (A0) 00023350 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 00023354 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00023358 4e 5e |N^ | UNLK A6 0002335a 4e 75 |Nu | RTS 0002335c 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 00023360 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00023364 bf d5 | | CMPA.L (A5),A7 00023366 4e 76 |Nv | TRAPV 00023368 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 0002336c 4e b9 80 00 20 60 |N ` | JSR 0x80002060 00023372 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023376 42 90 |B | CLR.L (A0) 00023378 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 0002337c 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00023380 4e 5e |N^ | UNLK A6 00023382 4e 75 |Nu | RTS 00023384 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 00023388 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 0002338c bf d5 | | CMPA.L (A5),A7 0002338e 4e 76 |Nv | TRAPV 00023390 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00023394 4e b9 80 00 20 6c |N l | JSR 0x8000206c 0002339a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002339e 42 90 |B | CLR.L (A0) 000233a0 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 000233a4 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 000233a8 4e 5e |N^ | UNLK A6 000233aa 4e 75 |Nu | RTS 000233ac exp_LOAD_HRAM_8_0.FIU(): 000233ac 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000233b2 00 08 | | .CONST 0x0008 ; Stack-delta 000233b4 11 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 17,'LOAD_HRAM_8_0.FIU' 000233c6 00 | | .CONST 0x0 000233c7 03 | | .CONST 0x3 ; DIPROC address 000233c8 00 | | .CONST 0x0 ; Output Parameters 000233c9 00 | | .CONST 0x0 ; Input Parameters 000233ca exp_LOAD_HRAM_32_0.FIU(): 000233ca 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000233d0 00 08 | | .CONST 0x0008 ; Stack-delta 000233d2 12 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 18,'LOAD_HRAM_32_0.FIU' 000233e5 00 | | .CONST 0x0 000233e6 03 | | .CONST 0x3 ; DIPROC address 000233e7 00 | | .CONST 0x0 ; Output Parameters 000233e8 00 | | .CONST 0x0 ; Input Parameters 000233e9 00 | | .PAD 0x0 000233ea exp_RUN_NORMAL.FIU(): 000233ea 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000233f0 00 08 | | .CONST 0x0008 ; Stack-delta 000233f2 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.FIU' 00023401 00 | | .CONST 0x0 00023402 03 | | .CONST 0x3 ; DIPROC address 00023403 00 | | .CONST 0x0 ; Output Parameters 00023404 00 | | .CONST 0x0 ; Input Parameters 00023405 00 | | .PAD 0x0 00023406 exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 00023406 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002340c 00 20 | | .CONST 0x0020 ; Stack-delta 0002340e 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.FIU' 00023423 00 | | .CONST 0x0 00023424 03 | | .CONST 0x3 ; DIPROC address 00023425 06 | | .CONST 0x6 ; Output Parameters 00023426 00 | | .CONST 0x0 ; Input Parameters 00023427 00 | | .CONST 0x0 ; Out arg [1] 00023428 01 | | .CONST 0x1 ; Out arg [2] 00023429 00 | | .CONST 0x0 ; Out arg [1] 0002342a 00 | | .CONST 0x0 ; Out arg [1] 0002342b 01 | | .CONST 0x1 ; Out arg [2] 0002342c 08 | | .CONST 0x8 ; Out arg flag 0002342d 00 | | .PAD 0x0 0002342e exp_PREP_RUN.FIU(Sw_2): 0002342e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023434 00 0a | | .CONST 0x000a ; Stack-delta 00023436 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.FIU' 00023443 00 | | .CONST 0x0 00023444 03 | | .CONST 0x3 ; DIPROC address 00023445 00 | | .CONST 0x0 ; Output Parameters 00023446 01 | | .CONST 0x1 ; Input Parameters 00023447 01 | | .CONST 0x1 ; In arg [2] 00023448 exp_LOAD_HRAM_1.FIU(): 00023448 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002344e 00 08 | | .CONST 0x0008 ; Stack-delta 00023450 0f 4c 4f 41 44 5f 48 52 | LOAD_HR| .TXT 15,'LOAD_HRAM_1.FIU' 00023460 00 | | .CONST 0x0 00023461 03 | | .CONST 0x3 ; DIPROC address 00023462 00 | | .CONST 0x0 ; Output Parameters 00023463 00 | | .CONST 0x0 ; Input Parameters 00023464 exp_INIT_MRU.FIU(): 00023464 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002346a 00 08 | | .CONST 0x0008 ; Stack-delta 0002346c 0c 49 4e 49 54 5f 4d 52 | INIT_MR| .TXT 12,'INIT_MRU.FIU' 00023479 00 | | .CONST 0x0 0002347a 03 | | .CONST 0x3 ; DIPROC address 0002347b 00 | | .CONST 0x0 ; Output Parameters 0002347c 00 | | .CONST 0x0 ; Input Parameters 0002347d 00 | | .PAD 0x0 0002347e exp_FREEZE_WORLD.FIU(): 0002347e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023484 00 08 | | .CONST 0x0008 ; Stack-delta 00023486 10 46 52 45 45 5a 45 5f | FREEZE_| .TXT 16,'FREEZE_WORLD.FIU' 00023497 00 | | .CONST 0x0 00023498 03 | | .CONST 0x3 ; DIPROC address 00023499 00 | | .CONST 0x0 ; Output Parameters 0002349a 00 | | .CONST 0x0 ; Input Parameters 0002349b 00 | | .PAD 0x0 0002349c exp_CLEAR_PARITY.FIU(): 0002349c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000234a2 00 08 | | .CONST 0x0008 ; Stack-delta 000234a4 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.FIU' 000234b5 00 | | .CONST 0x0 000234b6 03 | | .CONST 0x3 ; DIPROC address 000234b7 00 | | .CONST 0x0 ; Output Parameters 000234b8 00 | | .CONST 0x0 ; Input Parameters 000234b9 00 | | .PAD 0x0 000234ba exp_READ_NOVRAM_DATA.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 000234ba 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000234c0 00 20 | | .CONST 0x0020 ; Stack-delta 000234c2 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.SEQ' 000234d7 00 | | .CONST 0x0 000234d8 02 | | .CONST 0x2 ; DIPROC address 000234d9 06 | | .CONST 0x6 ; Output Parameters 000234da 00 | | .CONST 0x0 ; Input Parameters 000234db 00 | | .CONST 0x0 ; Out arg [1] 000234dc 01 | | .CONST 0x1 ; Out arg [2] 000234dd 00 | | .CONST 0x0 ; Out arg [1] 000234de 00 | | .CONST 0x0 ; Out arg [1] 000234df 01 | | .CONST 0x1 ; Out arg [2] 000234e0 08 | | .CONST 0x8 ; Out arg flag 000234e1 00 | | .PAD 0x0 000234e2 exp_RUN_CHECK.SEQ(): 000234e2 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000234e8 00 08 | | .CONST 0x0008 ; Stack-delta 000234ea 0d 52 55 4e 5f 43 48 45 | RUN_CHE| .TXT 13,'RUN_CHECK.SEQ' 000234f8 00 | | .CONST 0x0 000234f9 02 | | .CONST 0x2 ; DIPROC address 000234fa 00 | | .CONST 0x0 ; Output Parameters 000234fb 00 | | .CONST 0x0 ; Input Parameters 000234fc exp_PREP_RUN.SEQ(Sw_2): 000234fc 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023502 00 0a | | .CONST 0x000a ; Stack-delta 00023504 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.SEQ' 00023511 00 | | .CONST 0x0 00023512 02 | | .CONST 0x2 ; DIPROC address 00023513 00 | | .CONST 0x0 ; Output Parameters 00023514 01 | | .CONST 0x1 ; Input Parameters 00023515 01 | | .CONST 0x1 ; In arg [2] 00023516 exp_CLEAR_PARITY.SEQ(): 00023516 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002351c 00 08 | | .CONST 0x0008 ; Stack-delta 0002351e 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.SEQ' 0002352f 00 | | .CONST 0x0 00023530 02 | | .CONST 0x2 ; DIPROC address 00023531 00 | | .CONST 0x0 ; Output Parameters 00023532 00 | | .CONST 0x0 ; Input Parameters 00023533 00 | | .PAD 0x0 00023534 exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 00023534 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002353a 00 20 | | .CONST 0x0020 ; Stack-delta 0002353c 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.TYP' 00023551 00 | | .CONST 0x0 00023552 06 | | .CONST 0x6 ; DIPROC address 00023553 06 | | .CONST 0x6 ; Output Parameters 00023554 00 | | .CONST 0x0 ; Input Parameters 00023555 00 | | .CONST 0x0 ; Out arg [1] 00023556 01 | | .CONST 0x1 ; Out arg [2] 00023557 00 | | .CONST 0x0 ; Out arg [1] 00023558 00 | | .CONST 0x0 ; Out arg [1] 00023559 01 | | .CONST 0x1 ; Out arg [2] 0002355a 08 | | .CONST 0x8 ; Out arg flag 0002355b 00 | | .PAD 0x0 0002355c exp_RUN_NORMAL.TYP(): 0002355c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023562 00 08 | | .CONST 0x0008 ; Stack-delta 00023564 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.TYP' 00023573 00 | | .CONST 0x0 00023574 06 | | .CONST 0x6 ; DIPROC address 00023575 00 | | .CONST 0x0 ; Output Parameters 00023576 00 | | .CONST 0x0 ; Input Parameters 00023577 00 | | .PAD 0x0 00023578 exp_PREP_RUN.TYP(Sw_2): 00023578 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002357e 00 0a | | .CONST 0x000a ; Stack-delta 00023580 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.TYP' 0002358d 00 | | .CONST 0x0 0002358e 06 | | .CONST 0x6 ; DIPROC address 0002358f 00 | | .CONST 0x0 ; Output Parameters 00023590 01 | | .CONST 0x1 ; Input Parameters 00023591 01 | | .CONST 0x1 ; In arg [2] 00023592 exp_LOAD_BENIGN_UWORD.TYP(): 00023592 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023598 00 08 | | .CONST 0x0008 ; Stack-delta 0002359a 15 4c 4f 41 44 5f 42 45 | LOAD_BE| .TXT 21,'LOAD_BENIGN_UWORD.TYP' 000235b0 00 | | .CONST 0x0 000235b1 06 | | .CONST 0x6 ; DIPROC address 000235b2 00 | | .CONST 0x0 ; Output Parameters 000235b3 00 | | .CONST 0x0 ; Input Parameters 000235b4 exp_CLEAR_PARITY.TYP(): 000235b4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000235ba 00 08 | | .CONST 0x0008 ; Stack-delta 000235bc 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.TYP' 000235cd 00 | | .CONST 0x0 000235ce 06 | | .CONST 0x6 ; DIPROC address 000235cf 00 | | .CONST 0x0 ; Output Parameters 000235d0 00 | | .CONST 0x0 ; Input Parameters 000235d1 00 | | .PAD 0x0 000235d2 exp_ALIGN_CSA.TYP(): 000235d2 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000235d8 00 08 | | .CONST 0x0008 ; Stack-delta 000235da 0d 41 4c 49 47 4e 5f 43 | ALIGN_C| .TXT 13,'ALIGN_CSA.TYP' 000235e8 00 | | .CONST 0x0 000235e9 06 | | .CONST 0x6 ; DIPROC address 000235ea 00 | | .CONST 0x0 ; Output Parameters 000235eb 00 | | .CONST 0x0 ; Input Parameters 000235ec exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 000235ec 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000235f2 00 20 | | .CONST 0x0020 ; Stack-delta 000235f4 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.VAL' 00023609 00 | | .CONST 0x0 0002360a 07 | | .CONST 0x7 ; DIPROC address 0002360b 06 | | .CONST 0x6 ; Output Parameters 0002360c 00 | | .CONST 0x0 ; Input Parameters 0002360d 00 | | .CONST 0x0 ; Out arg [1] 0002360e 01 | | .CONST 0x1 ; Out arg [2] 0002360f 00 | | .CONST 0x0 ; Out arg [1] 00023610 00 | | .CONST 0x0 ; Out arg [1] 00023611 01 | | .CONST 0x1 ; Out arg [2] 00023612 08 | | .CONST 0x8 ; Out arg flag 00023613 00 | | .PAD 0x0 00023614 exp_RUN_NORMAL.VAL(): 00023614 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002361a 00 08 | | .CONST 0x0008 ; Stack-delta 0002361c 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.VAL' 0002362b 00 | | .CONST 0x0 0002362c 07 | | .CONST 0x7 ; DIPROC address 0002362d 00 | | .CONST 0x0 ; Output Parameters 0002362e 00 | | .CONST 0x0 ; Input Parameters 0002362f 00 | | .PAD 0x0 00023630 exp_PREP_RUN.VAL(Sw_2): 00023630 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023636 00 0a | | .CONST 0x000a ; Stack-delta 00023638 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.VAL' 00023645 00 | | .CONST 0x0 00023646 07 | | .CONST 0x7 ; DIPROC address 00023647 00 | | .CONST 0x0 ; Output Parameters 00023648 01 | | .CONST 0x1 ; Input Parameters 00023649 01 | | .CONST 0x1 ; In arg [2] 0002364a exp_CLEAR_PARITY.VAL(): 0002364a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023650 00 08 | | .CONST 0x0008 ; Stack-delta 00023652 10 43 4c 45 41 52 5f 50 | CLEAR_P| .TXT 16,'CLEAR_PARITY.VAL' 00023663 00 | | .CONST 0x0 00023664 07 | | .CONST 0x7 ; DIPROC address 00023665 00 | | .CONST 0x0 ; Output Parameters 00023666 00 | | .CONST 0x0 ; Input Parameters 00023667 00 | | .PAD 0x0 00023668 exp_ALIGN_CSA.VAL(): 00023668 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002366e 00 08 | | .CONST 0x0008 ; Stack-delta 00023670 0d 41 4c 49 47 4e 5f 43 | ALIGN_C| .TXT 13,'ALIGN_CSA.VAL' 0002367e 00 | | .CONST 0x0 0002367f 07 | | .CONST 0x7 ; DIPROC address 00023680 00 | | .CONST 0x0 ; Output Parameters 00023681 00 | | .CONST 0x0 ; Input Parameters 00023682 52 45 41 44 5f 4e 4f 56 |READ_NOV| .TXT 'READ_NOVRAM_DATA.MEM' 00023696 52 45 41 44 5f 4e 4f 56 |READ_NOV| .TXT 'READ_NOVRAM_DATA.M32' 000236aa ; -------------------------------------------------------------------------------------- 000236aa ; OMSI PASCAL Function 000236aa ; <LVAR 0x020 1(r)> 000236aa ; <LVAR 0x01c 4(r)> 000236aa ; <LVAR 0x018 4(r)> 000236aa ; <LVAR 0x014 4(r)> 000236aa ; <LVAR 0x010 4(r)> 000236aa ; <LVAR 0x00c 4(r)> 000236aa ; <LVAR 0x008 4(r)> 000236aa ; <LVAR -0x006 @ 4(r)> 000236aa ; -------------------------------------------------------------------------------------- 000236aa 4e 56 ff be |NV | LINK.W A6,#0xffbe 000236ae bf d5 | | CMPA.L (A5),A7 000236b0 62 06 |b | BHI 0x236b8 000236b2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000236b6 4e 76 |Nv | TRAPV 000236b8 de fc 00 3c | < | ADDA.W #0x3c,A7 000236bc 48 e7 c0 f0 |H | MOVEM.L A3+A2+A1+A0+D1+D0,-(A7) 000236c0 43 ee ff fa |C | LEA.L (A6-0x6),A1 000236c4 45 f8 00 00 |E | LEA.L 0x0,A2 000236c8 47 f9 00 01 04 72 |G r | LEA.L ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L),A3 000236ce 72 0c |r | MOVEQ.L #0x0c,D1 000236d0 55 4f |UO | SUBQ.L #0x2,A7 000236d2 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000236d8 4a 1f |J | TST.B (A7)+ 000236da 67 0e |g | BEQ 0x236ea 000236dc 41 fa ff b8 |A | LEA.L 0x23696,A0 000236e0 70 04 |p | MOVEQ.L #0x04,D0 000236e2 2f 20 |/ | MOVE.L -(A0),-(A7) 000236e4 51 c8 ff fc |Q | DBF D0,0x236e2 000236e8 60 0c |` | BRA 0x236f6 000236ea 41 fa ff be |A | LEA.L 0x236aa,A0 000236ee 70 04 |p | MOVEQ.L #0x04,D0 000236f0 2f 20 |/ | MOVE.L -(A0),-(A7) 000236f2 51 c8 ff fc |Q | DBF D0,0x236f0 000236f6 59 4f |YO | SUBQ.L #0x4,A7 000236f8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000236fc 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023700 3f 3c 00 14 |?< | MOVE.W #0x14,-(A7) 00023704 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002370a 50 4f |PO | ADDQ.L #0x8,A7 0002370c 48 51 |HQ | PEA.L (A1) 0002370e 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00023714 de fc 00 1c | | ADDA.W #0x1c,A7 00023718 42 27 |B' | CLR.B -(A7) 0002371a 1f 2e 00 20 | . | MOVE.B (A6+0x20),-(A7) 0002371e 2f 11 |/ | MOVE.L (A1),-(A7) 00023720 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00023726 58 4f |XO | ADDQ.L #0x4,A7 00023728 2e 91 |. | MOVE.L (A1),(A7) 0002372a 20 6e 00 1c | n | MOVEA.L (A6+0x1c),A0 0002372e 48 50 |HP | PEA.L (A0) 00023730 48 52 |HR | PEA.L (A2) 00023732 48 52 |HR | PEA.L (A2) 00023734 4e 93 |N | JSR (A3) 00023736 de c1 | | ADDA.W D1,A7 00023738 2e 91 |. | MOVE.L (A1),(A7) 0002373a 20 6e 00 18 | n | MOVEA.L (A6+0x18),A0 0002373e 48 50 |HP | PEA.L (A0) 00023740 48 52 |HR | PEA.L (A2) 00023742 48 78 00 01 |Hx | PEA.L 0x1 00023746 4e 93 |N | JSR (A3) 00023748 de c1 | | ADDA.W D1,A7 0002374a 2e 91 |. | MOVE.L (A1),(A7) 0002374c 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00023750 48 50 |HP | PEA.L (A0) 00023752 48 52 |HR | PEA.L (A2) 00023754 48 52 |HR | PEA.L (A2) 00023756 4e 93 |N | JSR (A3) 00023758 de c1 | | ADDA.W D1,A7 0002375a 2e 91 |. | MOVE.L (A1),(A7) 0002375c 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00023760 48 50 |HP | PEA.L (A0) 00023762 48 52 |HR | PEA.L (A2) 00023764 48 52 |HR | PEA.L (A2) 00023766 4e 93 |N | JSR (A3) 00023768 de c1 | | ADDA.W D1,A7 0002376a 2e 91 |. | MOVE.L (A1),(A7) 0002376c 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00023770 48 50 |HP | PEA.L (A0) 00023772 48 52 |HR | PEA.L (A2) 00023774 48 78 00 01 |Hx | PEA.L 0x1 00023778 4e 93 |N | JSR (A3) 0002377a de c1 | | ADDA.W D1,A7 0002377c 2e 91 |. | MOVE.L (A1),(A7) 0002377e 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023782 48 50 |HP | PEA.L (A0) 00023784 4e b9 00 01 04 78 |N x | JSR ExpOutputFlag(exp : Pointer; VAR status : Bool) 0002378a 50 4f |PO | ADDQ.L #0x8,A7 0002378c 48 51 |HQ | PEA.L (A1) 0002378e 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00023794 58 4f |XO | ADDQ.L #0x4,A7 00023796 4c df 0f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3 0002379a 4e 5e |N^ | UNLK A6 0002379c 4e 75 |Nu | RTS 0002379e 53 45 54 5f 48 49 54 2e |SET_HIT.| .TXT 'SET_HIT.MEM ' 000237aa 53 45 54 5f 48 49 54 2e |SET_HIT.| .TXT 'SET_HIT.M32 ' 000237b6 ; -------------------------------------------------------------------------------------- 000237b6 ; OMSI PASCAL Function 000237b6 ; <LVAR 0x00a 1(r)> 000237b6 ; <LVAR 0x008 1(r)> 000237b6 ; <LVAR -0x004 @ 4(r)> 000237b6 ; -------------------------------------------------------------------------------------- 000237b6 4e 56 ff cc |NV | LINK.W A6,#0xffcc 000237ba bf d5 | | CMPA.L (A5),A7 000237bc 62 06 |b | BHI 0x237c4 000237be 44 fc 00 02 |D | MOVE.W #0x2,CCR 000237c2 4e 76 |Nv | TRAPV 000237c4 de fc 00 30 | 0 | ADDA.W #0x30,A7 000237c8 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000237cc 45 ee ff fc |E | LEA.L (A6-0x4),A2 000237d0 72 0c |r | MOVEQ.L #0x0c,D1 000237d2 55 4f |UO | SUBQ.L #0x2,A7 000237d4 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000237da 4a 1f |J | TST.B (A7)+ 000237dc 67 12 |g | BEQ 0x237f0 000237de 9e c1 | | SUBA.W D1,A7 000237e0 20 4f | O | MOVEA.L A7,A0 000237e2 43 fa ff ba |C | LEA.L 0x2379e,A1 000237e6 70 0a |p | MOVEQ.L #0x0a,D0 000237e8 10 d9 | | MOVE.B (A1)+,(A0)+ 000237ea 51 c8 ff fc |Q | DBF D0,0x237e8 000237ee 60 10 |` | BRA 0x23800 000237f0 9e c1 | | SUBA.W D1,A7 000237f2 20 4f | O | MOVEA.L A7,A0 000237f4 43 fa ff b4 |C | LEA.L 0x237aa,A1 000237f8 70 0a |p | MOVEQ.L #0x0a,D0 000237fa 10 d9 | | MOVE.B (A1)+,(A0)+ 000237fc 51 c8 ff fc |Q | DBF D0,0x237fa 00023800 59 4f |YO | SUBQ.L #0x4,A7 00023802 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023806 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002380a 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 0002380e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023814 50 4f |PO | ADDQ.L #0x8,A7 00023816 48 52 |HR | PEA.L (A2) 00023818 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 0002381e de fc 00 14 | | ADDA.W #0x14,A7 00023822 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00023826 2f 12 |/ | MOVE.L (A2),-(A7) 00023828 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002382c 48 78 00 00 |Hx | PEA.L 0x0 00023830 48 78 00 00 |Hx | PEA.L 0x0 00023834 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 0002383a de fc 00 10 | | ADDA.W #0x10,A7 0002383e 42 17 |B | CLR.B (A7) 00023840 1f 2e 00 0a | . | MOVE.B (A6+0xa),-(A7) 00023844 2f 12 |/ | MOVE.L (A2),-(A7) 00023846 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 0002384c 50 4f |PO | ADDQ.L #0x8,A7 0002384e 48 52 |HR | PEA.L (A2) 00023850 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00023856 58 4f |XO | ADDQ.L #0x4,A7 00023858 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 0002385c 4e 5e |N^ | UNLK A6 0002385e 4e 75 |Nu | RTS 00023860 52 55 4e 5f 43 48 45 43 |RUN_CHEC| .TXT 'RUN_CHECK.MEM ' 0002386e 52 55 4e 5f 43 48 45 43 |RUN_CHEC| .TXT 'RUN_CHECK.M32 ' 0002387c ; -------------------------------------------------------------------------------------- 0002387c ; OMSI PASCAL Function 0002387c ; <LVAR 0x008 1(r)> 0002387c ; <LVAR -0x006 @ 4(r)> 0002387c ; -------------------------------------------------------------------------------------- 0002387c 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00023880 bf d5 | | CMPA.L (A5),A7 00023882 62 06 |b | BHI 0x2388a 00023884 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023888 4e 76 |Nv | TRAPV 0002388a de fc 00 32 | 2 | ADDA.W #0x32,A7 0002388e 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00023892 45 ee ff fa |E | LEA.L (A6-0x6),A2 00023896 72 0e |r | MOVEQ.L #0x0e,D1 00023898 55 4f |UO | SUBQ.L #0x2,A7 0002389a 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000238a0 4a 1f |J | TST.B (A7)+ 000238a2 67 12 |g | BEQ 0x238b6 000238a4 9e c1 | | SUBA.W D1,A7 000238a6 20 4f | O | MOVEA.L A7,A0 000238a8 43 fa ff b6 |C | LEA.L 0x23860,A1 000238ac 70 0c |p | MOVEQ.L #0x0c,D0 000238ae 10 d9 | | MOVE.B (A1)+,(A0)+ 000238b0 51 c8 ff fc |Q | DBF D0,0x238ae 000238b4 60 10 |` | BRA 0x238c6 000238b6 9e c1 | | SUBA.W D1,A7 000238b8 20 4f | O | MOVEA.L A7,A0 000238ba 43 fa ff b2 |C | LEA.L 0x2386e,A1 000238be 70 0c |p | MOVEQ.L #0x0c,D0 000238c0 10 d9 | | MOVE.B (A1)+,(A0)+ 000238c2 51 c8 ff fc |Q | DBF D0,0x238c0 000238c6 59 4f |YO | SUBQ.L #0x4,A7 000238c8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000238cc 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000238d0 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 000238d4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000238da 50 4f |PO | ADDQ.L #0x8,A7 000238dc 48 52 |HR | PEA.L (A2) 000238de 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000238e4 de fc 00 16 | | ADDA.W #0x16,A7 000238e8 42 27 |B' | CLR.B -(A7) 000238ea 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 000238ee 2f 12 |/ | MOVE.L (A2),-(A7) 000238f0 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000238f6 50 4f |PO | ADDQ.L #0x8,A7 000238f8 48 52 |HR | PEA.L (A2) 000238fa 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00023900 58 4f |XO | ADDQ.L #0x4,A7 00023902 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00023906 4e 5e |N^ | UNLK A6 00023908 4e 75 |Nu | RTS 0002390a 4c 4f 41 44 5f 43 4f 4e |LOAD_CON| .TXT 'LOAD_CONFIG.MEM ' 0002391a 4c 4f 41 44 5f 43 4f 4e |LOAD_CON| .TXT 'LOAD_CONFIG.M32 ' 0002392a ; -------------------------------------------------------------------------------------- 0002392a ; OMSI PASCAL Function 0002392a ; <LVAR 0x00e 1(r)> 0002392a ; <LVAR 0x00c 1(r)> 0002392a ; <LVAR 0x00a 1(r)> 0002392a ; <LVAR 0x008 1(r)> 0002392a ; <LVAR -0x004 @ 4(r)> 0002392a ; -------------------------------------------------------------------------------------- 0002392a 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 0002392e bf d5 | | CMPA.L (A5),A7 00023930 62 06 |b | BHI 0x23938 00023932 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023936 4e 76 |Nv | TRAPV 00023938 de fc 00 34 | 4 | ADDA.W #0x34,A7 0002393c 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00023940 45 ee ff fc |E | LEA.L (A6-0x4),A2 00023944 72 10 |r | MOVEQ.L #0x10,D1 00023946 55 4f |UO | SUBQ.L #0x2,A7 00023948 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002394e 4a 1f |J | TST.B (A7)+ 00023950 67 12 |g | BEQ 0x23964 00023952 9e c1 | | SUBA.W D1,A7 00023954 20 4f | O | MOVEA.L A7,A0 00023956 43 fa ff b2 |C | LEA.L 0x2390a,A1 0002395a 70 0e |p | MOVEQ.L #0x0e,D0 0002395c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002395e 51 c8 ff fc |Q | DBF D0,0x2395c 00023962 60 10 |` | BRA 0x23974 00023964 9e c1 | | SUBA.W D1,A7 00023966 20 4f | O | MOVEA.L A7,A0 00023968 43 fa ff b0 |C | LEA.L 0x2391a,A1 0002396c 70 0e |p | MOVEQ.L #0x0e,D0 0002396e 10 d9 | | MOVE.B (A1)+,(A0)+ 00023970 51 c8 ff fc |Q | DBF D0,0x2396e 00023974 59 4f |YO | SUBQ.L #0x4,A7 00023976 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002397a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002397e 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00023982 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023988 50 4f |PO | ADDQ.L #0x8,A7 0002398a 48 52 |HR | PEA.L (A2) 0002398c 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00023992 de fc 00 18 | | ADDA.W #0x18,A7 00023996 2f 12 |/ | MOVE.L (A2),-(A7) 00023998 1f 2e 00 0c | . | MOVE.B (A6+0xc),-(A7) 0002399c 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 000239a2 54 4f |TO | ADDQ.L #0x2,A7 000239a4 2e 92 |. | MOVE.L (A2),(A7) 000239a6 1f 2e 00 0a | . | MOVE.B (A6+0xa),-(A7) 000239aa 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 000239b0 58 4f |XO | ADDQ.L #0x4,A7 000239b2 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 000239b6 2f 12 |/ | MOVE.L (A2),-(A7) 000239b8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000239bc 48 78 00 00 |Hx | PEA.L 0x0 000239c0 48 78 00 00 |Hx | PEA.L 0x0 000239c4 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 000239ca de c1 | | ADDA.W D1,A7 000239cc 42 17 |B | CLR.B (A7) 000239ce 1f 2e 00 0e | . | MOVE.B (A6+0xe),-(A7) 000239d2 2f 12 |/ | MOVE.L (A2),-(A7) 000239d4 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000239da 50 4f |PO | ADDQ.L #0x8,A7 000239dc 48 52 |HR | PEA.L (A2) 000239de 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000239e4 58 4f |XO | ADDQ.L #0x4,A7 000239e6 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 000239ea 4e 5e |N^ | UNLK A6 000239ec 4e 75 |Nu | RTS 000239ee 43 4c 45 41 52 5f 54 41 |CLEAR_TA| .TXT 'CLEAR_TAGSTORE.MEM' 00023a00 43 4c 45 41 52 5f 54 41 |CLEAR_TA| .TXT 'CLEAR_TAGSTORE.M32' 00023a12 ; -------------------------------------------------------------------------------------- 00023a12 ; OMSI PASCAL Function 00023a12 ; <LVAR 0x008 1(r)> 00023a12 ; <LVAR -0x006 @ 4(r)> 00023a12 ; -------------------------------------------------------------------------------------- 00023a12 4e 56 ff cc |NV | LINK.W A6,#0xffcc 00023a16 bf d5 | | CMPA.L (A5),A7 00023a18 62 06 |b | BHI 0x23a20 00023a1a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023a1e 4e 76 |Nv | TRAPV 00023a20 de fc 00 2e | . | ADDA.W #0x2e,A7 00023a24 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00023a28 43 ee ff fa |C | LEA.L (A6-0x6),A1 00023a2c 55 4f |UO | SUBQ.L #0x2,A7 00023a2e 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00023a34 4a 1f |J | TST.B (A7)+ 00023a36 67 0e |g | BEQ 0x23a46 00023a38 41 fa ff c6 |A | LEA.L 0x23a00,A0 00023a3c 70 08 |p | MOVEQ.L #0x08,D0 00023a3e 3f 20 |? | MOVE.W -(A0),-(A7) 00023a40 51 c8 ff fc |Q | DBF D0,0x23a3e 00023a44 60 0c |` | BRA 0x23a52 00023a46 41 fa ff ca |A | LEA.L 0x23a12,A0 00023a4a 70 08 |p | MOVEQ.L #0x08,D0 00023a4c 3f 20 |? | MOVE.W -(A0),-(A7) 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 12 |?< | MOVE.W #0x12,-(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 51 |HQ | PEA.L (A1) 00023a6a 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00023a70 de fc 00 1a | | ADDA.W #0x1a,A7 00023a74 42 27 |B' | CLR.B -(A7) 00023a76 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00023a7a 2f 11 |/ | MOVE.L (A1),-(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 51 |HQ | PEA.L (A1) 00023a86 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00023a8c 58 4f |XO | ADDQ.L #0x4,A7 00023a8e 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00023a92 4e 5e |N^ | UNLK A6 00023a94 4e 75 |Nu | RTS 00023a96 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.MEM ' 00023aae 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.M32 ' 00023ac6 ; -------------------------------------------------------------------------------------- 00023ac6 ; OMSI PASCAL Function 00023ac6 ; <LVAR 0x008 1(r)> 00023ac6 ; <LVAR -0x006 @ 4(r)> 00023ac6 ; -------------------------------------------------------------------------------------- 00023ac6 4e 56 ff be |NV | LINK.W A6,#0xffbe 00023aca bf d5 | | CMPA.L (A5),A7 00023acc 62 06 |b | BHI 0x23ad4 00023ace 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023ad2 4e 76 |Nv | TRAPV 00023ad4 de fc 00 3c | < | ADDA.W #0x3c,A7 00023ad8 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00023adc 45 ee ff fa |E | LEA.L (A6-0x6),A2 00023ae0 72 18 |r | MOVEQ.L #0x18,D1 00023ae2 55 4f |UO | SUBQ.L #0x2,A7 00023ae4 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00023aea 4a 1f |J | TST.B (A7)+ 00023aec 67 12 |g | BEQ 0x23b00 00023aee 9e c1 | | SUBA.W D1,A7 00023af0 20 4f | O | MOVEA.L A7,A0 00023af2 43 fa ff a2 |C | LEA.L 0x23a96,A1 00023af6 70 16 |p | MOVEQ.L #0x16,D0 00023af8 10 d9 | | MOVE.B (A1)+,(A0)+ 00023afa 51 c8 ff fc |Q | DBF D0,0x23af8 00023afe 60 10 |` | BRA 0x23b10 00023b00 9e c1 | | SUBA.W D1,A7 00023b02 20 4f | O | MOVEA.L A7,A0 00023b04 43 fa ff a8 |C | LEA.L 0x23aae,A1 00023b08 70 16 |p | MOVEQ.L #0x16,D0 00023b0a 10 d9 | | MOVE.B (A1)+,(A0)+ 00023b0c 51 c8 ff fc |Q | DBF D0,0x23b0a 00023b10 59 4f |YO | SUBQ.L #0x4,A7 00023b12 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023b16 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023b1a 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00023b1e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023b24 50 4f |PO | ADDQ.L #0x8,A7 00023b26 48 52 |HR | PEA.L (A2) 00023b28 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00023b2e de fc 00 20 | | ADDA.W #0x20,A7 00023b32 42 27 |B' | CLR.B -(A7) 00023b34 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00023b38 2f 12 |/ | MOVE.L (A2),-(A7) 00023b3a 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00023b40 50 4f |PO | ADDQ.L #0x8,A7 00023b42 48 52 |HR | PEA.L (A2) 00023b44 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00023b4a 58 4f |XO | ADDQ.L #0x4,A7 00023b4c 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00023b50 4e 5e |N^ | UNLK A6 00023b52 4e 75 |Nu | RTS 00023b54 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.MEM' 00023b62 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.M32' 00023b70 ; -------------------------------------------------------------------------------------- 00023b70 ; OMSI PASCAL Function 00023b70 ; <LVAR 0x008 1(r)> 00023b70 ; <LVAR -0x006 @ 4(r)> 00023b70 ; -------------------------------------------------------------------------------------- 00023b70 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 00023b74 bf d5 | | CMPA.L (A5),A7 00023b76 62 06 |b | BHI 0x23b7e 00023b78 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023b7c 4e 76 |Nv | TRAPV 00023b7e de fc 00 2a | * | ADDA.W #0x2a,A7 00023b82 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00023b86 43 ee ff fa |C | LEA.L (A6-0x6),A1 00023b8a 55 4f |UO | SUBQ.L #0x2,A7 00023b8c 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00023b92 4a 1f |J | TST.B (A7)+ 00023b94 67 0e |g | BEQ 0x23ba4 00023b96 41 fa ff ca |A | LEA.L 0x23b62,A0 00023b9a 70 06 |p | MOVEQ.L #0x06,D0 00023b9c 3f 20 |? | MOVE.W -(A0),-(A7) 00023b9e 51 c8 ff fc |Q | DBF D0,0x23b9c 00023ba2 60 0c |` | BRA 0x23bb0 00023ba4 41 fa ff ca |A | LEA.L 0x23b70,A0 00023ba8 70 06 |p | MOVEQ.L #0x06,D0 00023baa 3f 20 |? | MOVE.W -(A0),-(A7) 00023bac 51 c8 ff fc |Q | DBF D0,0x23baa 00023bb0 59 4f |YO | SUBQ.L #0x4,A7 00023bb2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023bb6 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023bba 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00023bbe 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023bc4 50 4f |PO | ADDQ.L #0x8,A7 00023bc6 48 51 |HQ | PEA.L (A1) 00023bc8 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00023bce de fc 00 16 | | ADDA.W #0x16,A7 00023bd2 42 27 |B' | CLR.B -(A7) 00023bd4 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00023bd8 2f 11 |/ | MOVE.L (A1),-(A7) 00023bda 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00023be0 50 4f |PO | ADDQ.L #0x8,A7 00023be2 48 51 |HQ | PEA.L (A1) 00023be4 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00023bea 58 4f |XO | ADDQ.L #0x4,A7 00023bec 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00023bf0 4e 5e |N^ | UNLK A6 00023bf2 4e 75 |Nu | RTS 00023bf4 exp_RUN_CHECK.IOC(): 00023bf4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023bfa 00 08 | | .CONST 0x0008 ; Stack-delta 00023bfc 0d 52 55 4e 5f 43 48 45 | RUN_CHE| .TXT 13,'RUN_CHECK.IOC' 00023c0a 00 | | .CONST 0x0 00023c0b 04 | | .CONST 0x4 ; DIPROC address 00023c0c 00 | | .CONST 0x0 ; Output Parameters 00023c0d 00 | | .CONST 0x0 ; Input Parameters 00023c0e exp_PREP_RUN.IOC(Sw_2): 00023c0e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023c14 00 0a | | .CONST 0x000a ; Stack-delta 00023c16 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.IOC' 00023c23 00 | | .CONST 0x0 00023c24 04 | | .CONST 0x4 ; DIPROC address 00023c25 00 | | .CONST 0x0 ; Output Parameters 00023c26 01 | | .CONST 0x1 ; Input Parameters 00023c27 01 | | .CONST 0x1 ; In arg [2] 00023c28 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 00023c36 ; -------------------------------------------------------------------------------------- 00023c36 ; OMSI PASCAL Function 00023c36 ; <LVAR 0x008 1(r)> 00023c36 ; -------------------------------------------------------------------------------------- 00023c36 PROG_FAIL: 00023c36 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00023c3a bf d5 | | CMPA.L (A5),A7 00023c3c 62 06 |b | BHI 0x23c44 00023c3e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023c42 4e 76 |Nv | TRAPV 00023c44 de fc 00 2c | , | ADDA.W #0x2c,A7 00023c48 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00023c4c 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 00023c50 70 06 |p | MOVEQ.L #0x06,D0 00023c52 3f 20 |? | MOVE.W -(A0),-(A7) 00023c54 51 c8 ff fc |Q | DBF D0,0x23c52 00023c58 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00023c5c 51 4f |QO | SUBQ.L #0x8,A7 00023c5e 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00023c62 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023c66 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00023c6a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023c70 58 4f |XO | ADDQ.L #0x4,A7 00023c72 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00023c76 48 80 |H | EXTB.W D0 00023c78 48 c0 |H | EXTW.L D0 00023c7a 2f 00 |/ | MOVE.L D0,-(A7) 00023c7c 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00023c82 58 4f |XO | ADDQ.L #0x4,A7 00023c84 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023c8a 50 4f |PO | ADDQ.L #0x8,A7 00023c8c 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00023c92 de fc 00 14 | | ADDA.W #0x14,A7 00023c96 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00023c9a 4e 5e |N^ | UNLK A6 00023c9c 4e 75 |Nu | RTS 00023c9e 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 00023cac 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00023cba 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00023cc8 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00023cda 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 00023cf2 ; -------------------------------------------------------------------------------------- 00023cf2 ; OMSI PASCAL Function 00023cf2 ; <LVAR 0x00e 1(r)> 00023cf2 ; <LVAR 0x00a 4(r)> 00023cf2 ; <LVAR 0x008 1(r)> 00023cf2 ; -------------------------------------------------------------------------------------- 00023cf2 EXP_FAIL: 00023cf2 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 00023cf6 bf d5 | | CMPA.L (A5),A7 00023cf8 62 06 |b | BHI 0x23d00 00023cfa 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023cfe 4e 76 |Nv | TRAPV 00023d00 de fc 00 74 | t | ADDA.W #0x74,A7 00023d04 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00023d08 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00023d0e 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 00023d14 72 01 |r | MOVEQ.L #0x01,D1 00023d16 74 0d |t | MOVEQ.L #0x0d,D2 00023d18 76 1e |v | MOVEQ.L #0x1e,D3 00023d1a 78 12 |x | MOVEQ.L #0x12,D4 00023d1c 7a 0e |z | MOVEQ.L #0x0e,D5 00023d1e 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00023d24 41 fa ff b4 |A | LEA.L 0x23cda,A0 00023d28 70 08 |p | MOVEQ.L #0x08,D0 00023d2a 3f 20 |? | MOVE.W -(A0),-(A7) 00023d2c 51 c8 ff fc |Q | DBF D0,0x23d2a 00023d30 59 4f |YO | SUBQ.L #0x4,A7 00023d32 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023d36 3f 01 |? | MOVE.W D1,-(A7) 00023d38 3f 04 |? | MOVE.W D4,-(A7) 00023d3a 4e 93 |N | JSR (A3) 00023d3c 50 4f |PO | ADDQ.L #0x8,A7 00023d3e 4e 94 |N | JSR (A4) 00023d40 50 4f |PO | ADDQ.L #0x8,A7 00023d42 20 4f | O | MOVEA.L A7,A0 00023d44 43 fa ff 58 |C X | LEA.L 0x23c9e,A1 00023d48 70 0c |p | MOVEQ.L #0x0c,D0 00023d4a 10 d9 | | MOVE.B (A1)+,(A0)+ 00023d4c 51 c8 ff fc |Q | DBF D0,0x23d4a 00023d50 51 4f |QO | SUBQ.L #0x8,A7 00023d52 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023d56 3f 01 |? | MOVE.W D1,-(A7) 00023d58 3f 02 |? | MOVE.W D2,-(A7) 00023d5a 4e 93 |N | JSR (A3) 00023d5c 54 4f |TO | ADDQ.L #0x2,A7 00023d5e 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00023d62 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00023d68 54 4f |TO | ADDQ.L #0x2,A7 00023d6a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023d70 50 4f |PO | ADDQ.L #0x8,A7 00023d72 4e 94 |N | JSR (A4) 00023d74 de c4 | | ADDA.W D4,A7 00023d76 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00023d7a b0 c1 | | CMPA.W D1,A0 00023d7c 67 48 |gH | BEQ 0x23dc6 00023d7e 9e c5 | | SUBA.W D5,A7 00023d80 22 4f |"O | MOVEA.L A7,A1 00023d82 45 fa ff 28 |E ( | LEA.L 0x23cac,A2 00023d86 70 0c |p | MOVEQ.L #0x0c,D0 00023d88 12 da | | MOVE.B (A2)+,(A1)+ 00023d8a 51 c8 ff fc |Q | DBF D0,0x23d88 00023d8e 9e c3 | | SUBA.W D3,A7 00023d90 22 4f |"O | MOVEA.L A7,A1 00023d92 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00023d96 70 1d |p | MOVEQ.L #0x1d,D0 00023d98 12 d8 | | MOVE.B (A0)+,(A1)+ 00023d9a 51 c8 ff fc |Q | DBF D0,0x23d98 00023d9e 51 4f |QO | SUBQ.L #0x8,A7 00023da0 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00023da4 3f 01 |? | MOVE.W D1,-(A7) 00023da6 3f 02 |? | MOVE.W D2,-(A7) 00023da8 4e 93 |N | JSR (A3) 00023daa 58 4f |XO | ADDQ.L #0x4,A7 00023dac 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00023db0 3f 01 |? | MOVE.W D1,-(A7) 00023db2 3f 03 |? | MOVE.W D3,-(A7) 00023db4 4e 93 |N | JSR (A3) 00023db6 50 4f |PO | ADDQ.L #0x8,A7 00023db8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023dbe 50 4f |PO | ADDQ.L #0x8,A7 00023dc0 4e 94 |N | JSR (A4) 00023dc2 de fc 00 30 | 0 | ADDA.W #0x30,A7 00023dc6 9e c5 | | SUBA.W D5,A7 00023dc8 20 4f | O | MOVEA.L A7,A0 00023dca 43 fa fe ee |C | LEA.L 0x23cba,A1 00023dce 70 0c |p | MOVEQ.L #0x0c,D0 00023dd0 10 d9 | | MOVE.B (A1)+,(A0)+ 00023dd2 51 c8 ff fc |Q | DBF D0,0x23dd0 00023dd6 51 4f |QO | SUBQ.L #0x8,A7 00023dd8 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023ddc 3f 01 |? | MOVE.W D1,-(A7) 00023dde 3f 02 |? | MOVE.W D2,-(A7) 00023de0 4e 93 |N | JSR (A3) 00023de2 54 4f |TO | ADDQ.L #0x2,A7 00023de4 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00023de8 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00023dee 54 4f |TO | ADDQ.L #0x2,A7 00023df0 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023df6 50 4f |PO | ADDQ.L #0x8,A7 00023df8 4e 94 |N | JSR (A4) 00023dfa 5d 4f |]O | SUBQ.L #0x6,A7 00023dfc 20 4f | O | MOVEA.L A7,A0 00023dfe 43 fa fe da |C | LEA.L 0x23cda,A1 00023e02 70 16 |p | MOVEQ.L #0x16,D0 00023e04 10 d9 | | MOVE.B (A1)+,(A0)+ 00023e06 51 c8 ff fc |Q | DBF D0,0x23e04 00023e0a 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00023e0e 59 4f |YO | SUBQ.L #0x4,A7 00023e10 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00023e14 3f 01 |? | MOVE.W D1,-(A7) 00023e16 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00023e1a 4e 93 |N | JSR (A3) 00023e1c 50 4f |PO | ADDQ.L #0x8,A7 00023e1e 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00023e24 de c3 | | ADDA.W D3,A7 00023e26 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00023e2a 4e 5e |N^ | UNLK A6 00023e2c 4e 75 |Nu | RTS