|
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: 17408 (0x4400)
Types: M200
Notes: @(#)STARTER,2.4,92/10/16,16:25:00, M200_PROGRAM
Names: »PROGRAM_0.M200«, »STARTER.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »PROGRAM_0.M200«
└─ ⟦this⟧ »STARTER.M200«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »PROGRAM_0.M200«
└─ ⟦this⟧ »STARTER.M200«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »STARTER.M200«
@ 215b0
<LVAR 0x008 4(w)>
<LVAR -0x004 @>
<LVAR -0x00c @ 4(r)>
<POP 215b0-2163e Body>
<POP 215b0-215c6 Prologue> Σ0 ↓
<POP 215c6-215ce RegCacheLoad> Σ0 ↓
<POP 215ce-215e6 Naked> Σ0 ↓
<Pointer.fp 0x215ce <LVAR -0x004 @>> Δ-4 {[@@-4]}
<Call 0x215d2 0x1059e> {[@@-4]}
ReadClusterNo(VAR a : Long)
<POP 215d8-215da StackAdj> Δ+4 {}
<Pointer.fp 0x215da <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-12]}
<Call 0x215dc 0x102b8> {[@@-12]}
NewString(VAR a : String)
<POP 215e2-215e4 StackAdj> Δ+4 {}
<MI 215e4 MOVEQ.L #0x00,D7> {}
<POP 215e6-21632 Naked> Σ0 ↓ →0x215e6 ←0x215e6
<POP 0x215e6 LimitCheck 0x0 ≤ D7 ≤ 0x3> {}
<MI 215ec MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']}
<MI 215ee CLR.L D0> {[4, '(A6-0xc)']}
<MI 215f0 MOVE.B (A6+D7.L-#0x4),D0> {[4, '(A6-0xc)']}
<MI 215f4 ASR.W #0x4,D0> {[4, '(A6-0xc)']}
<POP 0x215f6 LimitCheck 0x0 ≤ D0 ≤ 0xf> {[4, '(A6-0xc)']}
<MI 215fc LEA.L 0x201e0,A0> {[4, '(A6-0xc)']}
<MI 21600 MOVE.B (A0+D0.W),-(A7)> Δ-2 {[4, '(A6-0xc)']|[2, '(A0+D0.W)']}
<Call 0x21604 0x102c0> {[4, '(A6-0xc)']|[2, '(A0+D0.W)']}
AppendChar(MOD b : String; a : char)
<POP 2160a-2160c StackAdj> Δ+2 {[4, '(A6-0xc)']}
<MI 2160c MOVE.L (A6-0xc),(A7)> {[4, '(A6-0xc)']}
<MI 2160e CLR.L D0> {[4, '(A6-0xc)']}
<MI 21610 MOVE.B (A6+D7.L-#0x4),D0> {[4, '(A6-0xc)']}
<MI 21614 AND.W #0x0f,D0> {[4, '(A6-0xc)']}
<POP 0x21616 LimitCheck 0x0 ≤ D0 ≤ 0xf> {[4, '(A6-0xc)']}
<MI 2161c LEA.L 0x201e0,A0> {[4, '(A6-0xc)']}
<MI 21620 MOVE.B (A0+D0.W),-(A7)> Δ-2 {[4, '(A6-0xc)']|[2, '(A0+D0.W)']}
<Call 0x21624 0x102c0> {[4, '(A6-0xc)']|[2, '(A0+D0.W)']}
AppendChar(MOD b : String; a : char)
<POP 2162a-2162c StackAdj> Δ+6 {}
<MI 2162c ADDQ.L #0x1,D7> {}
<MI 2162e CMP.L #0x03,D7> {}
<MI 21630 BLE 0x215e6> {}
<POP 21632-21636 Naked> Σ0 ↓
<MI 21632 MOVE.L (A6-0xc),(A6+0x8)> {}
<POP 21636-2163e Epilogue> Σ0
@ 2163e
<LVAR -0x004 @>
<POP 2163e-217de Body>
<POP 2163e-21654 Prologue> Σ0 ↓
<POP 21654-21664 RegCacheLoad> Σ0 ↓
<POP 21664-21672 Naked> Σ0 ↓ →0x217d6
<MI 21664 MOVE.B 0x243af,D0> {}
<MI 2166a LSL.B #0x7,D0> {}
<MI 2166c LSR.B #0x7,D0> {}
<MI 2166e BEQ 0x217d6> {}
<POP 21672-2168a Naked> Σ0 Δ-2 ↓ →0x216ba
<POP 21672-21674 StackAdj> Δ-2 {[-2-]}
<Const 0x21674 0x180.4> Δ-4 {[-2-]|[##384]}
<Call 0x21678 0x10592> {[-2-]|[##384]}
ReadConfig(where : Long) : Word
<POP 2167e-21680 StackAdj> Δ+4 {[-2-]}
<MI 21680 MOVE.B (A7+0x1),D0> {[-2-]}
<MI 21684 CMPI.B #0x58,D0> {[-2-]}
<MI 21688 BNE 0x216ba> {[-2-]}
<POP 2168a-216ba Naked> Σ-2 →0x216e4
<Blob 0x2168a [2] @> Δ-2 {[-2-]|[«2""»]}
<Blob 0x2168e [2] @> Δ-2 {[-2-]|[«2""»]|[«2""»]}
<Blob 0x21692 [2] @> Δ-2 {[-2-]|[«2""»]|[«2""»]|[«2""»]}
<POP 21696-21698 StackAdj> Δ-4 {[-2-]|[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x21698 6> {[-2-]|[«2""»]|[«2""»]|[«2""»]|[$$FIXPAD]}
<Const 0x216a6 0x1.4> Δ-4 {[-2-]|[«2""»]|[«2""»]|[«2""»]|[$$FIXPAD]|[##1]}
<Const 0x216a8 0x1.2> Δ-2 {[-2-]|[«2""»]|[«2""»]|[«2""»]|[$$FIXPAD]|[##1]|[#1]}
<Pointer.fp 0x216aa <LVAR -0x004 @>> Δ-4 {[-2-]|[«2""»]|[«2""»]|[«2""»]|[$$FIXPAD]|[##1]|[#1]|[@@-4]}
<Call 0x216ae 0x103b0> {[-2-]|[«2""»]|[«2""»]|[«2""»]|[$$FIXPAD]|[##1]|[#1]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 216b4-216b8 StackAdj> Δ+20 {[-2-]}
<MI 216b8 BRA 0x216e4> {[-2-]}
<POP 216ba-216e4 Naked> Σ-2 ↓ ←0x21672
<Blob 0x216ba [4] @> Δ-4 {[-2-]|[«4""»]}
<Blob 0x216be [4] @> Δ-4 {[-2-]|[«4""»]|[«4""»]}
<POP 216c2-216c4 StackAdj> Δ-4 {[-2-]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x216c4 8> {[-2-]|[«4""»]|[«4""»]|[$$FIXMODEM]}
<Const 0x216d2 0x1.4> Δ-4 {[-2-]|[«4""»]|[«4""»]|[$$FIXMODEM]|[##1]}
<Const 0x216d4 0x1.2> Δ-2 {[-2-]|[«4""»]|[«4""»]|[$$FIXMODEM]|[##1]|[#1]}
<Pointer.fp 0x216d6 <LVAR -0x004 @>> Δ-4 {[-2-]|[«4""»]|[«4""»]|[$$FIXMODEM]|[##1]|[#1]|[@@-4]}
<Call 0x216da 0x103b0> {[-2-]|[«4""»]|[«4""»]|[$$FIXMODEM]|[##1]|[#1]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 216e0-216e4 StackAdj> Δ+22 {[-2-]}
<POP 216e4-216f4 Naked> Σ-2 Δ+2 ↓ →0x217d6 ←0x2168a
<POP 216e4-216e6 StackAdj> Δ-2 {[-4-]}
<Call 0x216e6 0x103f8> {[-4-]}
GetConsoleConfig() : Long
<MI 216ec MOVE.L (A7)+,D0> Δ+4 {}
<MI 216ee CMP.L #0x01,D0> {}
<MI 216f0 BEQ 0x217d6> {}
<POP 216f4-2172a Naked> Σ0 ↓
<Blob 0x216f4 [46] @> Δ-46 {[«46""»]}
<POP 21700-21702 StackAdj> Δ-8 {[«46""»]|[-8-]}
<Lit 0x21702 46> {[«46""»]|[-4-]|[$$Starting remote diagnostics from Cluster id =>]}
<POP 2170e-21710 StackAdj> Δ-4 {[«46""»]|[-4-]|[$$Starting remote diagnostics from Cluster id =>]|[-4-]}
<Call 0x21710 0x215b0> {[«46""»]|[-4-]|[$$Starting remote diagnostics from Cluster id =>]|[-4-]}
<Call 0x21714 0x102d0> {[«46""»]|[-4-]|[$$Starting remote diagnostics from Cluster id =>]|[-4-]}
StringCat2(a, b : String) : String
<POP 2171a-2171c StackAdj> Δ+8 {[«46""»]|[-4-]}
<Call 0x2171c 0x103e0> {[«46""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21722-21726 StackAdj> Δ+50 {}
<MI 21726 MOVEQ.L #0x00,D7> {}
<MI 21728 MOVEQ.L #0x00,D6> {}
<POP 2172a-2175e Naked> Σ0 ↓ →0x21790 ←0x21794
<Blob 0x2172a [26] @> Δ-26 {[«26""»]}
<POP 2173a-2173c StackAdj> Δ-6 {[«26""»]|[-6-]}
<Lit 0x2173c 25> {[«26""»]|[-2-]|[$$Are you ready to continue]}
<POP 21746-21748 StackAdj> Δ-2 {[«26""»]|[-2-]|[$$Are you ready to continue]|[-2-]}
<POP 21748-21749 StackAdj> Δ+2 {[«26""»]|[-2-]|[$$Are you ready to continue]}
<Const 0x21749 0x1.2> Δ-2 {[«26""»]|[-2-]|[$$Are you ready to continue]|[#1]}
<Call 0x2174a 0x103f0> {[«26""»]|[-2-]|[$$Are you ready to continue]|[#1]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 21750-21752 StackAdj> Δ+6 {[«26""»]|[-2-]}
<MI 21752 MOVE.B (A7)+,D0> Δ+2 {[«26""»]}
<MI 21754 EXTB.W D0> {[«26""»]}
<POP 0x21756 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«26""»]}
<POP 21758-2175a StackAdj> Δ+26 {}
<MI 2175a MOVE.B D0,D7> {}
<MI 2175c BNE 0x21790> {}
<POP 2175e-21790 Naked> Σ0 ↓
<Blob 0x2175e [26] @> Δ-26 {[«26""»]}
<POP 2176e-21770 StackAdj> Δ-6 {[«26""»]|[-6-]}
<Lit 0x21770 25> {[«26""»]|[-2-]|[$$Do you want do disconnect]}
<POP 2177a-2177c StackAdj> Δ-2 {[«26""»]|[-2-]|[$$Do you want do disconnect]|[-2-]}
<POP 2177c-2177d StackAdj> Δ+2 {[«26""»]|[-2-]|[$$Do you want do disconnect]}
<Const 0x2177d 0x1.2> Δ-2 {[«26""»]|[-2-]|[$$Do you want do disconnect]|[#1]}
<Call 0x2177e 0x103f0> {[«26""»]|[-2-]|[$$Do you want do disconnect]|[#1]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 21784-21786 StackAdj> Δ+6 {[«26""»]|[-2-]}
<MI 21786 MOVE.B (A7)+,D0> Δ+2 {[«26""»]}
<MI 21788 EXTB.W D0> {[«26""»]}
<POP 0x2178a LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«26""»]}
<POP 2178c-2178e StackAdj> Δ+26 {}
<MI 2178e MOVE.B D0,D6> {}
<POP 21790-21794 Naked> Σ0 ↓ →0x21798 ←0x2172a
<MI 21790 TST.B D7> {}
<MI 21792 BNE 0x21798> {}
<POP 21794-21798 Naked> Σ0 ↓ →0x2172a
<MI 21794 TST.B D6> {}
<MI 21796 BEQ 0x2172a> {}
<POP 21798-2179c Naked> Σ0 ↓ →0x217d6 ←0x21790
<MI 21798 TST.B D6> {}
<MI 2179a BEQ 0x217d6> {}
<POP 2179c-217d6 Naked> Σ0 ↓
<Call 0x2179c 0x10216> {}
KC0b
<Const 0x217a2 0x1.4> Δ-4 {[##1]}
<Call 0x217a4 0x103f4> {[##1]}
SetConsoleConfig(a : Long)
<POP 217aa-217ab StackAdj> Δ+4 ↓ {}
<Blob 0x217ab [34] @> Δ-34 {[«34""»]}
<POP 217bc-217be StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x217be 33> {[«34""»]|[$$Rational Service has disconnected]}
<Call 0x217cc 0x103e0> {[«34""»]|[$$Rational Service has disconnected]}
WriteConsoleStringCrLf(str : String)
<POP 217d2-217d6 StackAdj> Δ+38 {}
<POP 217d6-217de Epilogue> Σ0 ←0x21664 ←0x216e4 ←0x21798
@ 217de
<LVAR -0x004 @ 1(r)>
<LVAR -0x00a 2(r)>
<LVAR -0x00c @ 4(r)>
<POP 217de-218aa Body>
<POP 217de-217f4 Prologue> Σ0 ↓
<POP 217f4-217fa RegCacheLoad> Σ0 ↓
<POP 217fa-21812 Naked> Σ0 ↓ →0x21814 ←0x2189c
<Pointer.fp 0x217fa <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-12]}
<Call 0x217fc 0x10304> {[@@-12]}
GetRtc() : TimeStamp
<POP 21802-21804 StackAdj> Δ+4 {}
<MI 21804 MOVEQ.L #0x00,D7> {}
<MI 21806 MOVE.W (A6-0xa),D0> {}
<MI 2180a LSL.W #0x7,D0> {}
<MI 2180c LSR.W #0x8,D0> {}
<MI 2180e LSR.W #0x4,D0> {}
<MI 21810 BEQ 0x21814> {}
<POP 21812-21814 Naked> Σ0 ↓
<MI 21812 ADDQ.B #0x1,D7> {}
<POP 21814-2181a Naked> Σ0 ↓ →0x2189c ←0x217fa
<MI 21814 TST.B D7> {}
<MI 21816 BNE 0x2189c> {}
<POP 2181a-21866 Naked> Σ0 ↓ →0x21872
<Blob 0x2181a [60] @> Δ-60 {[«60""»]}
<POP 2182c-2182e StackAdj> Δ-8 {[«60""»]|[-8-]}
<Lit 0x2182e 59> {[«60""»]|[-4-]|[$$Please enter current date and time as HH:MM:SS DD-MMM-YY :_]}
<Call 0x21840 0x103e4> {[«60""»]|[-4-]|[$$Please enter current date and time as HH:MM:SS DD-MMM-YY :_]}
AskConsoleString(prompt : String) : String
<POP 21846-21848 StackAdj> Δ+4 {[«60""»]|[-4-]}
<MI 21848 MOVEA.L (A7)+,A4> Δ+4 {[«60""»]}
<POP 2184a-2184e StackAdj> Δ+56 {[-4-]}
<MI 2184e MOVE.L A4,(A7)> {[4, 'A4']}
<Pointer.fp 0x21850 <LVAR -0x00c @ 4(r)>> Δ-4 {[4, 'A4']|[@@-12]}
<Pointer.fp 0x21852 <LVAR -0x004 @ 1(r)>> Δ-4 {[4, 'A4']|[@@-12]|[@@-4]}
<Call 0x21856 0x10310> {[4, 'A4']|[@@-12]|[@@-4]}
ConvertTimestamp(MOD input : String; b : L; VAR status : Bool)
<POP 2185c-21860 StackAdj> Δ+12 {}
<MI 21860 TST.B (A6-0x4)> {}
<MI 21864 BEQ 0x21872> {}
<POP 21866-21872 Naked> Σ0 →0x2189c
<MI 21866 MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']}
<Call 0x21868 0x1030c> {[4, '(A6-0xc)']}
SetRtc(a: TimeStamp)
<POP 2186e-21870 StackAdj> Δ+4 {}
<MI 21870 BRA 0x2189c> {}
<POP 21872-2189c Naked> Σ0 ↓ ←0x2181a
<Blob 0x21872 [44] @> Δ-44 {[«44""»]}
<POP 2187e-21880 StackAdj> Δ-4 {[«44""»]|[-4-]}
<Lit 0x21880 44> {[«44""»]|[$$Illegal value or incorret format, try again.]}
<Call 0x21892 0x103e0> {[«44""»]|[$$Illegal value or incorret format, try again.]}
WriteConsoleStringCrLf(str : String)
<POP 21898-2189c StackAdj> Δ+48 {}
<POP 2189c-218a2 Naked> Σ0 ↓ →0x217fa ←0x21814 ←0x21866
<MI 2189c TST.B D7> {}
<MI 2189e BEQ 0x217fa> {}
<POP 218a2-218aa Epilogue> Σ0
@ 218aa
<LVAR -0x004 @ 1(r)>
<LVAR -0x006 @ 2(r)>
<LVAR -0x008 @ 1(r)>
<POP 218aa-21adc Body> Δ+64
<POP 218aa-218c0 Prologue> Σ0 ↓
<POP 218c0-218d6 RegCacheLoad> Σ0 ↓
<POP 218d6-21924 Naked> Σ0 ↓ →0x2195c
<Blob 0x218d6 [40] @> Δ-40 {[«40""»]}
<POP 218e8-218ea StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x218ea 39> {[«40""»]|[$$Initializing diagnostic file system ...]}
<Call 0x218f8 0x103d8> {[«40""»]|[$$Initializing diagnostic file system ...]}
WriteConsoleString(str : String)
<POP 218fe-21900 StackAdj> Δ+42 {[-2-]}
<POP 21900-21901 StackAdj> Δ+2 {}
<Const 0x21901 0x20.2> Δ-2 {[#32]}
<Call 0x21904 0x103d0> {[#32]}
WriteConsoleChar(chr : char)
<POP 2190a-2190c StackAdj> Δ+2 {}
<Pointer.fp 0x2190c <LVAR -0x008 @ 1(r)>> Δ-4 {[@@-8]}
<Pointer.fp 0x21910 <LVAR -0x006 @ 2(r)>> Δ-4 {[@@-8]|[@@-6]}
<Call 0x21914 0x10200> {[@@-8]|[@@-6]}
KC00_GetBootDev(VAR a : Byte; VAR b : Word)
<POP 2191a-2191c StackAdj> Δ+8 {}
<MI 2191c MOVE.B (A6-0x8),D0> {}
<MI 21920 CMP.B #0x02,D0> {}
<MI 21922 BEQ 0x2195c> {}
<POP 21924-2195c Naked> Σ0 ↓
<Call 0x21924 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x2192a [42] @> Δ-42 {[«42""»]}
<POP 2193a-2193c StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x2193c 41> {[«42""»]|[$$File system starter not booted from disk.]}
<Call 0x2194a 0x103e0> {[«42""»]|[$$File system starter not booted from disk.]}
WriteConsoleStringCrLf(str : String)
<POP 2194c-21950 StackAdj> Δ+46 {}
<Const 0x21950 0x10.4> Δ-4 {[##16]}
<Call 0x21954 0x10220> {[##16]}
KC10_Panic(code : Long)
<POP 2195a-2195c StackAdj> Δ+4 {}
<POP 2195c-21976 Naked> Σ0 ↓ →0x21ab0 ←0x218d6
<MI 2195c MOVE.W (A6-0x6),D0> {}
<POP 0x21960 LimitCheck 0x0 ≤ D0 ≤ 0xf> {}
<MI 21964 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<Pointer.fp 0x21966 <LVAR -0x004 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-4]}
<Call 0x21968 0x10394> {[2, 'D0']|[@@-4]}
MountDisk(drive : Word ; VAR status : Byte)
<POP 2196e-21970 StackAdj> Δ+6 {}
<MI 21970 TST.B (A6-0x4)> {}
<MI 21972 BEQ 0x21ab0> {}
<POP 21976-2198a Naked> Σ0 ↓ →0x21a5e
<Call 0x21976 0x103dc> {}
WriteConsoleCrLf(void)
<MI 2197c MOVE.B (A6-0x4),D0> {}
<MI 2197e EXTB.W D0> {}
<MI 21980 SUBI.W #0x000c,D0> {}
<MI 21984 CMP.W #0x02,D0> {}
<MI 21986 BHI 0x21a5e> {}
<POP 2198a-21994 Naked> Σ0 →0x2199a →0x219e2 →0x21a18
<MI 2198a ADD.W D0,D0> {}
<MI 2198c SWITCH D0.W> {}
<POP 2199a-219c8 Naked> Σ0 Δ-64 ↓ ←0x2198a
<Blob 0x2199a [64] @> Δ-64 {[«64""»]}
<POP 219a6-219a8 StackAdj> Δ-4 {[«64""»]|[-4-]}
<Lit 0x219a8 64> {[«64""»]|[$$Hard disk errors in diagnostic filesystem labels on boot device.]}
<Call 0x219b6 0x103e0> {[«64""»]|[$$Hard disk errors in diagnostic filesystem labels on boot device.]}
WriteConsoleStringCrLf(str : String)
<POP 219b8-219b9 StackAdj> Δ+68 ↓ {}
<Blob 0x219b9 [64] @> Δ-64 {[«64""»]}
<POP 219c8-219e2 Naked> Σ-64 Δ+64 →0x21aa4 ←0x219e2
<POP 219c8-219ca StackAdj> Δ-4 {[-68-]}
<Lit 0x219ca> {[-64-]|[$$…]}
<Pointer.sp 0x219ca 4> Δ-4
<Const 0x219ce 0x1.2> Δ-2
<Const 0x219d0 0x3f.2> Δ-2
<Call 0x219d4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 219d6-219d8 StackAdj> Δ+8
<Call 0x219d8 0x103e0> {[-64-]|[$$…]}
WriteConsoleStringCrLf(str : String)
<POP 219da-219de StackAdj> Δ+68 {}
<MI 219de BRA 0x21aa4> {}
<POP 219e2-21a18 Naked> Σ0 Δ-64 →0x219c8 ←0x2198a
<Blob 0x219e2 [54] @> Δ-54 {[«54""»]}
<POP 219f4-219f6 StackAdj> Δ-4 {[«54""»]|[-4-]}
<Lit 0x219f6 53> {[«54""»]|[$$No diagnostic filesystem labels found on boot device.]}
<Call 0x21a04 0x103e0> {[«54""»]|[$$No diagnostic filesystem labels found on boot device.]}
WriteConsoleStringCrLf(str : String)
<POP 21a06-21a07 StackAdj> Δ+58 ↓ {}
<Blob 0x21a07 [64] @> Δ-64 {[«64""»]}
<MI 21a16 BRA 0x219c8> {[«64""»]}
<POP 21a18-21a5e Naked> Σ0 →0x21aa4 ←0x2198a
<Blob 0x21a18 [52] @> Δ-52 {[«52""»]}
<POP 21a24-21a26 StackAdj> Δ-4 {[«52""»]|[-4-]}
<Lit 0x21a26 52> {[«52""»]|[$$No diagnostic file system is installed on boot unit.]}
<Call 0x21a34 0x103e0> {[«52""»]|[$$No diagnostic file system is installed on boot unit.]}
WriteConsoleStringCrLf(str : String)
<POP 21a36-21a37 StackAdj> Δ+56 ↓ {}
<Blob 0x21a37 [62] @> Δ-62 {[«62""»]}
<POP 21a46-21a48 StackAdj> Δ-4 {[«62""»]|[-4-]}
<Lit 0x21a48 61> {[«62""»]|[$$This disk unit is not bootable. Re-boot from different unit.]}
<Call 0x21a56 0x103e0> {[«62""»]|[$$This disk unit is not bootable. Re-boot from different unit.]}
WriteConsoleStringCrLf(str : String)
<POP 21a58-21a5c StackAdj> Δ+66 {}
<MI 21a5c BRA 0x21aa4> {}
<POP 21a5e-21aa4 Naked> Σ0 ↓ ←0x21976
<Blob 0x21a5e [58] @> Δ-58 {[«58""»]}
<POP 21a6a-21a6c StackAdj> Δ-4 {[«58""»]|[-4-]}
<Lit 0x21a6c 58> {[«58""»]|[$$Unknown fault during diagnostic filesystem initialization.]}
<Call 0x21a7a 0x103e0> {[«58""»]|[$$Unknown fault during diagnostic filesystem initialization.]}
WriteConsoleStringCrLf(str : String)
<POP 21a7c-21a7d StackAdj> Δ+62 ↓ {}
<Blob 0x21a7d [34] @> Δ-34 {[«34""»]}
<POP 21a8e-21a90 StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x21a90 33> {[«34""»]|[$$Contact Rational customer support]}
<Call 0x21a9e 0x103e0> {[«34""»]|[$$Contact Rational customer support]}
WriteConsoleStringCrLf(str : String)
<POP 21aa0-21aa4 StackAdj> Δ+38 {}
<POP 21aa4-21ab0 Naked> Σ0 ↓ ←0x219c8 ←0x21a18
<Const 0x21aa4 0x11.4> Δ-4 {[##17]}
<Call 0x21aa8 0x10220> {[##17]}
KC10_Panic(code : Long)
<POP 21aae-21ab0 StackAdj> Δ+4 {}
<POP 21ab0-21ad4 Naked> Σ0 ↓ ←0x2195c
<Call 0x21ab0 0x103a4> {}
Open_ERROR_LOG(void)
<Call 0x21ab6 0x105e6> {}
Set_fc04_to_01(void)
<Blob 0x21abc [4] @> Δ-4 {[«4""»]}
<POP 21ac0-21ac2 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x21ac2 4> {[«4""»]|[$$[OK]]}
<Call 0x21ad0 0x103e0> {[«4""»]|[$$[OK]]}
WriteConsoleStringCrLf(str : String)
<POP 21ad2-21ad4 StackAdj> Δ+8 {}
<POP 21ad4-21adc Epilogue> Σ0
@ 21adc
<LVAR -0x007 1(r)>
<LVAR -0x008 1(r)>
<LVAR -0x009 1(r)>
<LVAR -0x00a @ 1(r)>
<LVAR -0x00c @ 2(r)>
<LVAR -0x00e @ 2(r)>
<LVAR -0x410 2(w)>
<LVAR -0x412 @>
<LVAR -0x416 @ 4(r)>
<LVAR -0x418 @ 1(r)>
<LVAR -0x41c @ 4(rw)>
<POP 21adc-21d00 Body>
<POP 21adc-21af2 Prologue> Σ0 ↓
<POP 21af2-21b06 RegCacheLoad> Σ0 ↓
<POP 21b06-21b50 Naked> Σ0 ↓ →0x21b66
<MI 21b06 MOVEQ.L #0x04,D7> {}
<Blob 0x21b08 [4] @> Δ-4 {[«4""»]}
<Blob 0x21b0c [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21b10-21b12 StackAdj> Δ-8 {[«4""»]|[«4""»]|[-8-]}
<Lit 0x21b12 8> {[«4""»]|[«4""»]|[-4-]|[$$IOP_DUMP]}
<MI 21b20 MOVE.L D7,(A7)> {[«4""»]|[«4""»]|[-4-]|[4, 'D7']}
<POP 21b1a-21b20 StackAdj> Δ-8 {[«4""»]|[«4""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x21b22 0x102e4> {[«4""»]|[«4""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 21b28-21b2a StackAdj> Δ+4 {[«4""»]|[«4""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x21b2a 0x102d0> {[«4""»]|[«4""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 21b30-21b32 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<MI 21b32 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]|[«4""»]}
<POP 21b34-21b36 StackAdj> Δ+4 {[«4""»]}
<MI 21b36 MOVE.L A4,(A7)> {[4, 'A4']}
<MI 21b38 CLR.B -(A7)> Δ-2 {[4, 'A4']|[#0]}
<MI 21b3a CLR.B -(A7)> Δ-2 {[4, 'A4']|[#0]|[#0]}
<Const 0x21b3c 0x0.4> Δ-4 {[4, 'A4']|[#0]|[#0]|[##0]}
<Pointer.fp 0x21b40 <LVAR -0x418 @ 1(r)>> Δ-4 {[4, 'A4']|[#0]|[#0]|[##0]|[@@-1048]}
<Pointer.fp 0x21b42 <LVAR -0x416 @ 4(r)>> Δ-4 {[4, 'A4']|[#0]|[#0]|[##0]|[@@-1048]|[@@-1046]}
<Call 0x21b44 0x10380> {[4, 'A4']|[#0]|[#0]|[##0]|[@@-1048]|[@@-1046]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 21b4a-21b4c StackAdj> Δ+20 {}
<MI 21b4c TST.B (A6-0x418)> {}
<MI 21b4e BNE 0x21b66> {}
<POP 21b50-21b66 Naked> Σ0 ↓
<Const 0x21b50 0x2.2> Δ-2 {[#2]}
<Const 0x21b54 0x1.2> Δ-2 {[#2]|[#1]}
<Const 0x21b56 0x1.4> Δ-4 {[#2]|[#1]|[##1]}
<Pointer.fp 0x21b5a <LVAR -0x418 @ 1(r)>> Δ-4 {[#2]|[#1]|[##1]|[@@-1048]}
<Pointer.fp 0x21b5c <LVAR -0x416 @ 4(r)>> Δ-4 {[#2]|[#1]|[##1]|[@@-1048]|[@@-1046]}
<Call 0x21b5e 0x1038c> {[#2]|[#1]|[##1]|[@@-1048]|[@@-1046]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 21b64-21b66 StackAdj> Δ+16 {}
<POP 21b66-21b68 Naked> Σ0 ↓ ←0x21b06
<MI 21b66 MOVE.L A4,(A6-0x41c)> {}
<POP 21b68-21bb4 Naked> Σ0 ↓ →0x21c50 ←0x21c50
<MI 21b68 SUBQ.L #0x1,D7> {}
<Blob 0x21b6a [4] @> Δ-4 {[«4""»]}
<Blob 0x21b6e [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 21b72-21b74 StackAdj> Δ-8 {[«4""»]|[«4""»]|[-8-]}
<Lit 0x21b74 8> {[«4""»]|[«4""»]|[-4-]|[$$IOP_DUMP]}
<MI 21b82 MOVE.L D7,(A7)> {[«4""»]|[«4""»]|[-4-]|[4, 'D7']}
<POP 21b7c-21b82 StackAdj> Δ-8 {[«4""»]|[«4""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x21b84 0x102e4> {[«4""»]|[«4""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 21b8a-21b8c StackAdj> Δ+4 {[«4""»]|[«4""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x21b8c 0x102d0> {[«4""»]|[«4""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 21b92-21b94 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<MI 21b94 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]|[«4""»]}
<POP 21b96-21b98 StackAdj> Δ+4 {[«4""»]}
<MI 21b98 MOVE.L A4,(A7)> {[4, 'A4']}
<MI 21b9a CLR.B -(A7)> Δ-2 {[4, 'A4']|[#0]}
<MI 21b9c CLR.B -(A7)> Δ-2 {[4, 'A4']|[#0]|[#0]}
<Const 0x21b9e 0x0.4> Δ-4 {[4, 'A4']|[#0]|[#0]|[##0]}
<Pointer.fp 0x21ba2 <LVAR -0x418 @ 1(r)>> Δ-4 {[4, 'A4']|[#0]|[#0]|[##0]|[@@-1048]}
<Pointer.fp 0x21ba4 <LVAR -0x416 @ 4(r)>> Δ-4 {[4, 'A4']|[#0]|[#0]|[##0]|[@@-1048]|[@@-1046]}
<Call 0x21ba6 0x10380> {[4, 'A4']|[#0]|[#0]|[##0]|[@@-1048]|[@@-1046]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 21bac-21bae StackAdj> Δ+20 {}
<MI 21bae TST.B (A6-0x418)> {}
<MI 21bb0 BNE 0x21c50> {}
<POP 21bb4-21bba Naked> Σ0 ↓ →0x21c3e
<MI 21bb4 TST.L D7> {}
<MI 21bb6 BNE 0x21c3e> {}
<POP 21bba-21c3e Naked> Σ0 ↓
<MI 21bba MOVE.L (A6-0x416),-(A7)> Δ-4 {[4, '(A6-0x416)']}
<MI 21bbc CLR.W -(A7)> Δ-2 {[4, '(A6-0x416)']|[#0]}
<MI 21bbe CLR.W -(A7)> Δ-2 {[4, '(A6-0x416)']|[#0]|[#0]}
<Const 0x21bc0 0x200.2> Δ-2 {[4, '(A6-0x416)']|[#0]|[#0]|[#512]}
<Const 0x21bc4 0x1.2> Δ-2 {[4, '(A6-0x416)']|[#0]|[#0]|[#512]|[#1]}
<MI 21bc6 LEA.L (A6-0x412),A0> {[4, '(A6-0x416)']|[#0]|[#0]|[#512]|[#1]}
<MI 21bca MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x416)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x21bcc <LVAR -0x418 @ 1(r)>> Δ-4 {[4, '(A6-0x416)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-1048]}
<Call 0x21bce 0x10384> {[4, '(A6-0x416)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-1048]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 21bd4-21bd8 StackAdj> Δ+18 {[-2-]}
<Call 0x21bd8 0x105ec> {[-2-]}
Get_fc05() : Byte
<MI 21bde MOVE.B (A7)+,D0> Δ+2 {}
<MI 21be0 EXTB.W D0> {}
<MI 21be2 EXTW.L D0> {}
<POP 0x21be4 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 21bee MOVE.W D0,(A6-0x410)> {}
<MI 21bf2 MOVE.L (A6-0x416),-(A7)> Δ-4 {[4, '(A6-0x416)']}
<MI 21bf4 CLR.W -(A7)> Δ-2 {[4, '(A6-0x416)']|[#0]}
<MI 21bf6 CLR.W -(A7)> Δ-2 {[4, '(A6-0x416)']|[#0]|[#0]}
<Const 0x21bf8 0x200.2> Δ-2 {[4, '(A6-0x416)']|[#0]|[#0]|[#512]}
<Const 0x21bfc 0x1.2> Δ-2 {[4, '(A6-0x416)']|[#0]|[#0]|[#512]|[#1]}
<MI 21bfe LEA.L (A6-0x412),A0> {[4, '(A6-0x416)']|[#0]|[#0]|[#512]|[#1]}
<MI 21c02 MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x416)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x21c04 <LVAR -0x418 @ 1(r)>> Δ-4 {[4, '(A6-0x416)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-1048]}
<Call 0x21c06 0x10388> {[4, '(A6-0x416)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-1048]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 21c0c-21c0e StackAdj> Δ+20 {}
<Pointer.fp 0x21c0e <LVAR -0x00a @ 1(r)>> Δ-4 {[@@-10]}
<Call 0x21c12 0x10304> {[@@-10]}
GetRtc() : TimeStamp
<POP 21c18-21c1a StackAdj> Δ+4 {}
<MI 21c1a MOVEA.L (A6-0x416),A0> {}
<MI 21c1c MOVE.B (A6-0xa),(A0+0x3a)> {}
<MI 21c22 MOVE.B (A6-0x9),(A0+0x3b)> {}
<MI 21c28 MOVE.B (A6-0x8),(A0+0x3c)> {}
<MI 21c2e MOVE.B (A6-0x7),(A0+0x3d)> {}
<MI 21c34 ANDI.B #0xfe,(A0+0x3f)> {}
<MI 21c3a MOVE.B #0x01,(A0+0x4c)> {}
<POP 21c3e-21c50 Naked> Σ0 ↓ ←0x21bb4
<Const 0x21c3e 0x1.2> Δ-2 {[#1]}
<Const 0x21c40 0x1.2> Δ-2 {[#1]|[#1]}
<MI 21c42 MOVE.L (A6-0x41c),-(A7)> Δ-4 {[#1]|[#1]|[4, '(A6-0x41c)']}
<Pointer.fp 0x21c44 <LVAR -0x418 @ 1(r)>> Δ-4 {[#1]|[#1]|[4, '(A6-0x41c)']|[@@-1048]}
<Pointer.fp 0x21c46 <LVAR -0x416 @ 4(r)>> Δ-4 {[#1]|[#1]|[4, '(A6-0x41c)']|[@@-1048]|[@@-1046]}
<Call 0x21c48 0x1038c> {[#1]|[#1]|[4, '(A6-0x41c)']|[@@-1048]|[@@-1046]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 21c4e-21c50 StackAdj> Δ+16 {}
<POP 21c50-21c62 Naked> Σ0 ↓ →0x21b68 ←0x21b68
<Pointer.fp 0x21c50 <LVAR -0x41c @ 4(rw)>> Δ-4 {[@@-1052]}
<Call 0x21c52 0x102bc> {[@@-1052]}
FreeString(VAR a : String)
<POP 21c58-21c5a StackAdj> Δ+4 {}
<MI 21c5a MOVE.L A4,(A6-0x41c)> {}
<MI 21c5c TST.L D7> {}
<MI 21c5e BNE 0x21b68> {}
<POP 21c62-21c80 Naked> Σ0 ↓ →0x21cc4
<MI 21c62 MOVE.L #0xfffffc00,D6> {}
<MI 21c68 MOVE.L (A6-0x41c),-(A7)> Δ-4 {[4, '(A6-0x41c)']}
<Const 0x21c6a 0x1.2> Δ-2 {[4, '(A6-0x41c)']|[#1]}
<Const 0x21c6c 0x1.2> Δ-2 {[4, '(A6-0x41c)']|[#1]|[#1]}
<MI 21c6e MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x41c)']|[#1]|[#1]|[4, 'D6']}
<Pointer.fp 0x21c70 <LVAR -0x418 @ 1(r)>> Δ-4 {[4, '(A6-0x41c)']|[#1]|[#1]|[4, 'D6']|[@@-1048]}
<Pointer.fp 0x21c72 <LVAR -0x416 @ 4(r)>> Δ-4 {[4, '(A6-0x41c)']|[#1]|[#1]|[4, 'D6']|[@@-1048]|[@@-1046]}
<Call 0x21c74 0x10380> {[4, '(A6-0x41c)']|[#1]|[#1]|[4, 'D6']|[@@-1048]|[@@-1046]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 21c7a-21c7c StackAdj> Δ+20 {}
<MI 21c7c TST.B (A6-0x418)> {}
<MI 21c7e BNE 0x21cc4> {}
<POP 21c80-21cc4 Naked> Σ0 →0x21cee
<MI 21c80 MOVEA.L (A6-0x416),A0> {}
<MI 21c82 MOVE.W (A0+0x24),-(A7)> Δ-2 {[2, '(A0+0x24)']}
<Pointer.fp 0x21c86 <LVAR -0x00e @ 2(r)>> Δ-4 {[2, '(A0+0x24)']|[@@-14]}
<Pointer.fp 0x21c8a <LVAR -0x00c @ 2(r)>> Δ-4 {[2, '(A0+0x24)']|[@@-14]|[@@-12]}
<Call 0x21c8e 0x10368> {[2, '(A0+0x24)']|[@@-14]|[@@-12]}
Lba2Chs(lba : W; VAR cyl : W ; VAR hd_sec : W)
<POP 21c94-21c96 StackAdj> Δ+8 {[2, '(A0+0x24)']}
<MI 21c96 MOVE.W (A6-0xe),(A7)> {[2, '(A6-0xe)']}
<MI 21c9a MOVE.W (A6-0xc),-(A7)> Δ-2 {[2, '(A6-0xe)']|[2, '(A6-0xc)']}
<Call 0x21c9e 0x10202> {[2, '(A6-0xe)']|[2, '(A6-0xc)']}
KC01_DumpOn
<POP 21ca4-21ca6 StackAdj> Δ+4 {}
<MI 21ca6 OR.B #0x01,(A0+0x3f)> {}
<MI 21caa MOVE.B #0x01,(A0+0x4c)> {}
<MI 21cae CLR.B -(A7)> Δ-2 {[#0]}
<MI 21cb0 CLR.B -(A7)> Δ-2 {[#0]|[#0]}
<Const 0x21cb2 0x1.4> Δ-4 {[#0]|[#0]|[##1]}
<Pointer.fp 0x21cb6 <LVAR -0x418 @ 1(r)>> Δ-4 {[#0]|[#0]|[##1]|[@@-1048]}
<Pointer.fp 0x21cb8 <LVAR -0x416 @ 4(r)>> Δ-4 {[#0]|[#0]|[##1]|[@@-1048]|[@@-1046]}
<Call 0x21cba 0x1038c> {[#0]|[#0]|[##1]|[@@-1048]|[@@-1046]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 21cc0-21cc2 StackAdj> Δ+16 {}
<MI 21cc2 BRA 0x21cee> {}
<POP 21cc4-21cee Naked> Σ0 ↓ ←0x21c62
<Blob 0x21cc4 [54] @> Δ-54 {[«54""»]}
<POP 21cd0-21cd2 StackAdj> Δ-4 {[«54""»]|[-4-]}
<Lit 0x21cd2 54> {[«54""»]|[$$*** could not create IOP_DUMP0 file (see reason above)]}
<Call 0x21ce4 0x103e0> {[«54""»]|[$$*** could not create IOP_DUMP0 file (see reason above)]}
WriteConsoleStringCrLf(str : String)
<POP 21cea-21cee StackAdj> Δ+58 {}
<POP 21cee-21cf8 Naked> Σ0 ↓ ←0x21c80
<Pointer.fp 0x21cee <LVAR -0x41c @ 4(rw)>> Δ-4 {[@@-1052]}
<Call 0x21cf0 0x102bc> {[@@-1052]}
FreeString(VAR a : String)
<POP 21cf6-21cf8 StackAdj> Δ+4 {}
<POP 21cf8-21d00 Epilogue> Σ0
@ 21d00
<LVAR 0x00a 1(w)>
<LVAR 0x008 1(r)>
<POP 21d00-21d2e Body>
<POP 21d00-21d16 Prologue> Σ0 ↓
<POP 21d16-21d26 Naked> Σ0 ↓
<MI 21d16 MOVE.B (A6+0x8),D0> {}
<MI 21d1a EXTB.W D0> {}
<MI 21d1c LEA.L 0x212ca,A0> {}
<MI 21d20 MOVE.B (A0+D0.W),(A6+0xa)> {}
<POP 21d26-21d2e Epilogue> Σ0
@ 21d2e
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 2(r)>
<LVAR -0x006 @ 1(r)>
<POP 21d2e-21e38 Body>
<POP 21d2e-21d44 Prologue> Σ0 ↓
<POP 21d44-21d5a RegCacheLoad> Σ0 ↓
<POP 21d5a-21d6c Naked> Σ0 ↓ →0x21d7a
<Call 0x21d5a 0x103dc> {}
WriteConsoleCrLf(void)
<MI 21d60 MOVE.B 0x243af,D0> {}
<MI 21d66 LSL.B #0x3,D0> {}
<MI 21d68 LSR.B #0x7,D0> {}
<MI 21d6a BEQ 0x21d7a> {}
<POP 21d6c-21d72 Naked> Σ0 ↓ →0x21d7a
<MI 21d6c TST.B (A6+0x8)> {}
<MI 21d70 BEQ 0x21d7a> {}
<POP 21d72-21d7a Naked> Σ0 ↓ →0x21dc8
<MI 21d72 TST.B 0x243b1> {}
<MI 21d78 BEQ 0x21dc8> {}
<POP 21d7a-21dc8 Naked> Σ0 →0x21e14 ←0x21d5a ←0x21d6c
<Blob 0x21d7a [10] @> Δ-10 {[«10""»]}
<Blob 0x21d8a [12] @> Δ-12 {[«10""»]|[«12""»]}
<POP 21d9c-21d9e StackAdj> Δ-4 {[«10""»]|[«12""»]|[-4-]}
<Lit 0x21d9e 9> {[«10""»]|[«12""»]|[$$CRASHSAVE]}
<POP 21da8-21daa StackAdj> Δ-4 {[«10""»]|[«12""»]|[$$CRASHSAVE]|[-4-]}
<Lit 0x21daa 11> {[«10""»]|[«12""»]|[$$CRASHSAVE]|[$$NO_R1K_DUMP]}
<POP 21db6-21db8 StackAdj> Δ-2 {[«10""»]|[«12""»]|[$$CRASHSAVE]|[$$NO_R1K_DUMP]|[-2-]}
<POP 21db8-21db9 StackAdj> Δ+2 {[«10""»]|[«12""»]|[$$CRASHSAVE]|[$$NO_R1K_DUMP]}
<Const 0x21db9 0x1.2> Δ-2 {[«10""»]|[«12""»]|[$$CRASHSAVE]|[$$NO_R1K_DUMP]|[#1]}
<Pointer.fp 0x21dba <LVAR -0x006 @ 1(r)>> Δ-4 {[«10""»]|[«12""»]|[$$CRASHSAVE]|[$$NO_R1K_DUMP]|[#1]|[@@-6]}
<Call 0x21dbc 0x103b0> {[«10""»]|[«12""»]|[$$CRASHSAVE]|[$$NO_R1K_DUMP]|[#1]|[@@-6]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 21dc2-21dc6 StackAdj> Δ+36 {}
<MI 21dc6 BRA 0x21e14> {}
<POP 21dc8-21e12 Naked> Σ0 ↓ →0x21e14 ←0x21d72
<Blob 0x21dc8 [10] @> Δ-10 {[«10""»]}
<Blob 0x21dd8 [10] @> Δ-10 {[«10""»]|[«10""»]}
<POP 21de4-21de6 StackAdj> Δ-4 {[«10""»]|[«10""»]|[-4-]}
<Lit 0x21de6 9> {[«10""»]|[«10""»]|[$$CRASHSAVE]}
<POP 21df0-21df2 StackAdj> Δ-4 {[«10""»]|[«10""»]|[$$CRASHSAVE]|[-4-]}
<Lit 0x21df2 10> {[«10""»]|[«10""»]|[$$CRASHSAVE]|[$$DUMP_R1000]}
<POP 21dfc-21dfe StackAdj> Δ-2 {[«10""»]|[«10""»]|[$$CRASHSAVE]|[$$DUMP_R1000]|[-2-]}
<POP 21dfe-21dff StackAdj> Δ+2 {[«10""»]|[«10""»]|[$$CRASHSAVE]|[$$DUMP_R1000]}
<Const 0x21dff 0x1.2> Δ-2 {[«10""»]|[«10""»]|[$$CRASHSAVE]|[$$DUMP_R1000]|[#1]}
<Pointer.fp 0x21e00 <LVAR -0x006 @ 1(r)>> Δ-4 {[«10""»]|[«10""»]|[$$CRASHSAVE]|[$$DUMP_R1000]|[#1]|[@@-6]}
<Call 0x21e02 0x103b0> {[«10""»]|[«10""»]|[$$CRASHSAVE]|[$$DUMP_R1000]|[#1]|[@@-6]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 21e08-21e0c StackAdj> Δ+34 {}
<MI 21e0c CLR.B 0x243b8> {}
<MI 21e0e TST.B (A6-0x6)> {}
<MI 21e10 BNE 0x21e14> {}
<POP 21e12-21e14 Naked> Σ0 ↓
<MI 21e12 ADDQ.B #0x1,0x243b8> {}
<POP 21e14-21e30 Naked> Σ0 ↓ ←0x21d7a ←0x21dc8
<MI 21e14 CLR.W (A6-0x4)> {}
<MI 21e18 LEA.L (A6-0x4),A0> {}
<MI 21e1c MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 21e1e ADDQ.L #0x1,(A7)> {[-4-]}
<Const 0x21e20 0xfc10.4> Δ-4 {[-4-]|[##64528]}
<Const 0x21e26 0x1.2> Δ-2 {[-4-]|[##64528]|[#1]}
<Call 0x21e28 0x10238> {[-4-]|[##64528]|[#1]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 21e2e-21e30 StackAdj> Δ+10 {}
<POP 21e30-21e38 Epilogue> Σ0
@ 21e38
<LVAR -0x004 @ 1(r)>
<POP 21e38-21f48 Body>
<POP 21e38-21e4e Prologue> Σ0 ↓
<POP 21e4e-21e5e RegCacheLoad> Σ0 ↓
<POP 21e5e-21e66 Naked> Σ0 ↓ →0x21e96
<MI 21e5e TST.B 0x243b8> {}
<MI 21e64 BNE 0x21e96> {}
<POP 21e66-21e96 Naked> Σ0 →0x21f36
<Blob 0x21e66 [64] @> Δ-64 {[«64""»]}
<POP 21e78-21e7a StackAdj> Δ-4 {[«64""»]|[-4-]}
<Lit 0x21e7a 63> {[«64""»]|[$$>>> Can't make a CRASHDUMP because a full CRASHSAVE wasn't made]}
<Call 0x21e88 0x103e0> {[«64""»]|[$$>>> Can't make a CRASHDUMP because a full CRASHSAVE wasn't made]}
WriteConsoleStringCrLf(str : String)
<POP 21e8e-21e92 StackAdj> Δ+68 {}
<MI 21e92 BRA 0x21f36> {}
<POP 21e96-21e9e Naked> Σ0 ↓ →0x21ec4 ←0x21e5e
<MI 21e96 TST.B 0x243b9> {}
<MI 21e9c BEQ 0x21ec4> {}
<POP 21e9e-21ec4 Naked> Σ0 →0x21f36
<Blob 0x21e9e [66] @> Δ-66 {[«66""»]}
<POP 21eaa-21eac StackAdj> Δ-4 {[«66""»]|[-4-]}
<Lit 0x21eac 66> {[«66""»]|[$$>>> Can't make a CRASHDUMP because the uDIAG or FRU tests were run]}
<Call 0x21eb8 0x103e0> {[«66""»]|[$$>>> Can't make a CRASHDUMP because the uDIAG or FRU tests were run]}
WriteConsoleStringCrLf(str : String)
<POP 21ebe-21ec2 StackAdj> Δ+70 {}
<MI 21ec2 BRA 0x21f36> {}
<POP 21ec4-21f34 Naked> Σ0 ↓ →0x21f36 ←0x21e96
<Blob 0x21ec4 [66] @> Δ-66 {[«66""»]}
<POP 21ed4-21ed6 StackAdj> Δ-6 {[«66""»]|[-6-]}
<Lit 0x21ed6 65> {[«66""»]|[-2-]|[$$Should the R1000 boot automatically after the crash dump finishes]}
<POP 21ee2-21ee4 StackAdj> Δ-2 {[«66""»]|[-2-]|[$$Should the R1000 boot automatically after the crash dump finishes]|[-2-]}
<POP 21ee4-21ee5 StackAdj> Δ+2 {[«66""»]|[-2-]|[$$Should the R1000 boot automatically after the crash dump finishes]}
<Const 0x21ee5 0x1.2> Δ-2 {[«66""»]|[-2-]|[$$Should the R1000 boot automatically after the crash dump finishes]|[#1]}
<Call 0x21ee6 0x103f0> {[«66""»]|[-2-]|[$$Should the R1000 boot automatically after the crash dump finishes]|[#1]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 21eec-21eee StackAdj> Δ+6 {[«66""»]|[-2-]}
<MI 21eee MOVE.B (A7)+,D0> Δ+2 {[«66""»]}
<MI 21ef0 EXTB.W D0> {[«66""»]}
<POP 0x21ef2 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«66""»]}
<POP 21ef4-21ef6 StackAdj> Δ+66 {}
<MI 21ef6 MOVE.B D0,0x243b2> {}
<Blob 0x21ef8 [10] @> Δ-10 {[«10""»]}
<POP 21f0a-21f0c StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x21f0c 9> {[«10""»]|[$$CRASHDUMP]}
<Const 0x21f1a 0x1.4> Δ-4 {[«10""»]|[$$CRASHDUMP]|[##1]}
<Const 0x21f1e 0x1.2> Δ-2 {[«10""»]|[$$CRASHDUMP]|[##1]|[#1]}
<Pointer.fp 0x21f20 <LVAR -0x004 @ 1(r)>> Δ-4 {[«10""»]|[$$CRASHDUMP]|[##1]|[#1]|[@@-4]}
<Call 0x21f24 0x103b0> {[«10""»]|[$$CRASHDUMP]|[##1]|[#1]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 21f2a-21f2e StackAdj> Δ+24 {}
<MI 21f2e TST.B (A6-0x4)> {}
<MI 21f32 BEQ 0x21f36> {}
<POP 21f34-21f36 Naked> Σ0 ↓
<MI 21f34 CLR.B 0x243b2> {}
<POP 21f36-21f40 Naked> Σ0 ↓ ←0x21e66 ←0x21e9e ←0x21ec4
<MI 21f36 MOVE.L #0x6,0x243b4> {}
<POP 21f40-21f48 Epilogue> Σ0
@ 21f48
<LVAR -0x004 @>
<POP 21f48-2208a Body>
<POP 21f48-21f5e Prologue> Σ0 ↓
<POP 21f5e-21f6a RegCacheLoad> Σ0 ↓
<POP 21f6a-21f78 Naked> Σ0 ↓ →0x2204a
<POP 21f6a-21f6c StackAdj> Δ-2 {[-2-]}
<Call 0x21f6c 0x105ce> {[-2-]}
ReadKeySwitch() : Bool
<MI 21f72 TST.B (A7)+> Δ+2 {}
<MI 21f74 BNE 0x2204a> {}
<POP 21f78-21f86 Naked> Σ0 ↓ →0x2204a
<MI 21f78 MOVE.B 0x243af,D0> {}
<MI 21f7e LSL.B #0x3,D0> {}
<MI 21f80 LSR.B #0x7,D0> {}
<MI 21f82 BEQ 0x2204a> {}
<POP 21f86-2204a Naked> Σ0 →0x22076
<Call 0x21f86 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21f8c [40] @> Δ-40 {[«40""»]}
<POP 21f98-21f9a StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x21f9a 40> {[«40""»]|[$$Running phase 1 & 2 FRU diagnostic tests]}
<Call 0x21fa6 0x103e0> {[«40""»]|[$$Running phase 1 & 2 FRU diagnostic tests]}
WriteConsoleStringCrLf(str : String)
<POP 21fac-21fae StackAdj> Δ+40 {[-4-]}
<POP 21fae-21faf StackAdj> Δ+2 {[-2-]}
<Blob 0x21faf [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 21fb2 MOVE.B 0x2066b,(A7+0x1)> {[-2-]|[«2""»]}
<MI 21fb8 MOVE.B 0x2066c,(A7+0x2)> {[-2-]|[«2""»]}
<Blob 0x21fbe [12] @> Δ-12 {[-2-]|[«2""»]|[«12""»]}
<POP 21fce-21fd0 StackAdj> Δ-4 {[-2-]|[«2""»]|[«12""»]|[-4-]}
<Lit 0x21fd0> {[-2-]|[«2""»]|[«12""»]|[$$…]}
<Pointer.sp 0x21fd0 16> Δ-4
<Const 0x21fd4 0x1.2> Δ-2
<Const 0x21fd6 0x3.2> Δ-2
<Call 0x21fda 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21fdc-21fde StackAdj> Δ+8
<POP 21fdc-21fde StackAdj> Δ-4 {[-2-]|[«2""»]|[«12""»]|[$$…]|[-4-]}
<Lit 0x21fde 11> {[-2-]|[«2""»]|[«12""»]|[$$…]|[$$AUTO_RUN_P2]}
<POP 21fea-21fec StackAdj> Δ-2 {[-2-]|[«2""»]|[«12""»]|[$$…]|[$$AUTO_RUN_P2]|[-2-]}
<POP 21fec-21fed StackAdj> Δ+2 {[-2-]|[«2""»]|[«12""»]|[$$…]|[$$AUTO_RUN_P2]}
<Const 0x21fed 0x1.2> Δ-2 {[-2-]|[«2""»]|[«12""»]|[$$…]|[$$AUTO_RUN_P2]|[#1]}
<Pointer.fp 0x21fee <LVAR -0x004 @>> Δ-4 {[-2-]|[«2""»]|[«12""»]|[$$…]|[$$AUTO_RUN_P2]|[#1]|[@@-4]}
<Call 0x21ff2 0x103b0> {[-2-]|[«2""»]|[«12""»]|[$$…]|[$$AUTO_RUN_P2]|[#1]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 21ff8-21ff9 StackAdj> Δ+30 ↓ {}
<Blob 0x21ff9 [10] @> Δ-10 {[«10""»]}
<Blob 0x2200a [4] @> Δ-4 {[«10""»]|[«4""»]}
<Blob 0x2200e [4] @> Δ-4 {[«10""»]|[«4""»]|[«4""»]}
<Blob 0x22012 [4] @> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 22016-22018 StackAdj> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x22018 9> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]}
<POP 22024-22026 StackAdj> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[-4-]}
<Lit 0x22026 12> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$FRU_T_SCREEN]}
<POP 22030-22032 StackAdj> Δ-2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$FRU_T_SCREEN]|[-2-]}
<POP 22032-22033 StackAdj> Δ+2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$FRU_T_SCREEN]}
<Const 0x22033 0x1.2> Δ-2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$FRU_T_SCREEN]|[#1]}
<Pointer.fp 0x22034 <LVAR -0x004 @>> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$FRU_T_SCREEN]|[#1]|[@@-4]}
<Call 0x22038 0x103b0> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$FRU_T_SCREEN]|[#1]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 2203e-22042 StackAdj> Δ+36 {}
<MI 22042 MOVE.B #0x01,0x243b9> {}
<MI 22048 BRA 0x22076> {}
<POP 2204a-22076 Naked> Σ0 ↓ ←0x21f6a ←0x21f78
<Blob 0x2204a [78] @> Δ-78 {[«78""»]}
<POP 2205c-2205e StackAdj> Δ-4 {[«78""»]|[-4-]}
<Lit 0x2205e 77> {[«78""»]|[$$>>> not running FRU tests because AUTO_RECOVERY=FALSE or OP_MODE=INTERACTIVE.]}
<Call 0x2206c 0x103e0> {[«78""»]|[$$>>> not running FRU tests because AUTO_RECOVERY=FALSE or OP_MODE=INTERACTIVE.]}
WriteConsoleStringCrLf(str : String)
<POP 22072-22076 StackAdj> Δ+82 {}
<POP 22076-22082 Naked> Σ0 ↓ ←0x21f86
<MI 22076 CLR.B 0x243b2> {}
<MI 2207c MOVE.L #0x01,0x243b4> {}
<POP 22082-2208a Epilogue> Σ0
@ 2208a
<LVAR 0x00c 1(r)>
<LVAR 0x008 4(r)>
<LVAR -0x080 @>
<LVAR -0x081 1(w)>
<LVAR -0x082 1(r)>
<LVAR -0x084 2(w)>
<LVAR -0x086 @ 2(w)>
<LVAR -0x08f @>
<LVAR -0x090 @ 1(r)>
<LVAR -0x094 @ 4(r)>
<LVAR -0x098 @ 4(rw)>
<LVAR -0x099 @ 1(r)>
<LVAR -0x09a @ 1(r)>
<POP 2208a-2230e Body>
<POP 2208a-220a0 Prologue> Σ0 ↓
<POP 220a0-220b2 RegCacheLoad> Σ0 ↓
<POP 220b2-2213e Naked> Σ0 ↓ →0x2214e
<Blob 0x220b2 [32] @> Δ-32 {[«32""»]}
<POP 220be-220c0 StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x220c0 32> {[«32""»]|[$$Running post-mortem diagnostics.]}
<Call 0x220d2 0x103e0> {[«32""»]|[$$Running post-mortem diagnostics.]}
WriteConsoleStringCrLf(str : String)
<POP 220d8-220dc StackAdj> Δ+36 {}
<Call 0x220dc 0x10538> {}
IPC_Init(void)
<Const 0x220e2 0x1.2> Δ-2 {[#1]}
<Call 0x220e4 0x10502> {[#1]}
IPC_PutBool(a : Bool)
<MI 220ea CLR.B (A7)> {[#1]}
<Call 0x220ec 0x10502> {[#1]}
IPC_PutBool(a : Bool)
<POP 220f2-220f4 StackAdj> Δ+2 {}
<Call 0x220f4 0x10514> {}
IPC_PutEnd(void)
<Blob 0x220fa [2] @> Δ-2 {[«2""»]}
<Blob 0x220fe [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x22102 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 22106-22108 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x22108 6> {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]}
<Const 0x2211a 0x1.4> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[##1]}
<Const 0x2211e 0x1.2> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[##1]|[#1]}
<Pointer.fp 0x22120 <LVAR -0x09a @ 1(r)>> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[##1]|[#1]|[@@-154]}
<Call 0x22122 0x103b0> {[«2""»]|[«2""»]|[«2""»]|[$$EMBALM]|[##1]|[#1]|[@@-154]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 22128-2212c StackAdj> Δ+20 {}
<MI 2212c MOVE.B (A6+0xc),D0> {}
<MI 22130 EXTB.W D0> {}
<MI 22132 MOVE.W D0,(A6-0x84)> {}
<MI 22136 CLR.B (A6-0x82)> {}
<MI 2213a TST.B (A6-0x9a)> {}
<MI 2213c BEQ 0x2214e> {}
<POP 2213e-2214e Naked> Σ0 →0x222f4
<MI 2213e MOVEA.L (A6+0x8),A0> {}
<MI 22142 CLR.B (A0)> {}
<MI 22144 MOVE.W #0x2,(A6-0x86)> {}
<MI 2214a BRA 0x222f4> {}
<POP 2214e-2221e Naked> Σ0 Δ-8 ↓ ←0x220b2
<Call 0x2214e 0x10538> {}
IPC_Init(void)
<Pointer.fp 0x22154 <LVAR -0x099 @ 1(r)>> Δ-4 {[@@-153]}
<Call 0x22158 0x10526> {[@@-153]}
IPC_GetBool() : Bool
<POP 2215e-22160 StackAdj> Δ+4 {}
<Pointer.fp 0x22160 <LVAR -0x098 @ 4(rw)>> Δ-4 {[@@-152]}
<Call 0x22162 0x1052c> {[@@-152]}
IPC_GetString(VAR retval : String)
<POP 22168-2216a StackAdj> Δ+4 {}
<Pointer.fp 0x2216a <LVAR -0x094 @ 4(r)>> Δ-4 {[@@-148]}
<Call 0x2216c 0x1052c> {[@@-148]}
IPC_GetString(VAR retval : String)
<POP 22172-22174 StackAdj> Δ+4 {}
<Pointer.fp 0x22174 <LVAR -0x090 @ 1(r)>> Δ-4 {[@@-144]}
<Const 0x22178 0x0.4> Δ-4 {[@@-144]|[##0]}
<Const 0x2217c 0x0.4> Δ-4 {[@@-144]|[##0]|[##0]}
<Call 0x22180 0x10520> {[@@-144]|[##0]|[##0]}
IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long)
<POP 22186-22188 StackAdj> Δ+12 {}
<Pointer.fp 0x22188 <LVAR -0x08f @>> Δ-4 {[@@-143]}
<Const 0x2218c 0x0.4> Δ-4 {[@@-143]|[##0]}
<Const 0x22190 0x7.4> Δ-4 {[@@-143]|[##0]|[##7]}
<Call 0x22194 0x10520> {[@@-143]|[##0]|[##7]}
IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long)
<POP 2219a-2219c StackAdj> Δ+12 {}
<Call 0x2219c 0x1051a> {}
IPC_GetEnd(void)
<MI 221a2 MOVEA.L (A6+0x8),A0> {}
<MI 221a6 MOVE.B (A6-0x99),D0> {}
<MI 221aa NEG.B D0> {}
<MI 221ac ADDQ.B #0x1,D0> {}
<MI 221ae EXTB.W D0> {}
<POP 0x221b0 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 221b2 MOVE.B D0,(A0)> {}
<Blob 0x221b4 [4] @> Δ-4 {[«4""»]}
<Blob 0x221b8 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 221bc-221be StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]}
<MI 221be MOVE.L (A6-0x98),-(A7)> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, '(A6-0x98)']}
<POP 221c0-221c2 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, '(A6-0x98)']|[-4-]}
<Lit 0x221c2 8> {[«4""»]|[«4""»]|[-4-]|[4, '(A6-0x98)']|[$$.ERRMESS]}
<Call 0x221d4 0x102d0> {[«4""»]|[«4""»]|[-4-]|[4, '(A6-0x98)']|[$$.ERRMESS]}
StringCat2(a, b : String) : String
<POP 221da-221dc StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<MI 221dc MOVE.L (A7)+,(A6-0x98)> Δ+4 {[«4""»]|[«4""»]}
<MI 221de MOVE.L (A6-0x98),(A7)> {[«4""»]|[4, '(A6-0x98)']}
<Call 0x221e0 0x102cc> {[«4""»]|[4, '(A6-0x98)']}
StringDup(a : String) : String
<MI 221e6 MOVE.L (A6-0x94),(A7)> {[«4""»]|[4, '(A6-0x94)']}
<MI 221e8 CLR.L D0> {[«4""»]|[4, '(A6-0x94)']}
<MI 221ea MOVE.B (A6-0x90),D0> {[«4""»]|[4, '(A6-0x94)']}
<MI 221ee MOVE.L D0,-(A7)> Δ-4 {[«4""»]|[4, '(A6-0x94)']|[4, 'D0']}
<Call 0x221f0 0x1044c> {[«4""»]|[4, '(A6-0x94)']|[4, 'D0']}
WriteErrorMessage(file : String; txt : String; number : Long) : Bool
<POP 221f6-221f8 StackAdj> Δ+12 {}
<MI 221f8 MOVE.W #0x01,(A6-0x86)> {}
<MI 221fc MOVE.B (A6-0x90),(A6-0x81)> {}
<MI 22202 LEA.L (A6-0x80),A0> {}
<MI 22206 LEA.L (A6-0x8f),A1> {}
<BlockMove 8,A1,A0> {}
<MI 22212 MOVEA.L (A6-0x98),A0> {}
<MI 22214 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 22216 MOVE.W (A0),D0> {[4, 'A0']}
<MI 22218 EXTW.L D0> {[4, 'A0']}
<MI 2221a MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<MI 2221c MOVEQ.L #0x01,D7> {[4, 'A0']|[4, 'D0']}
<POP 2221e-22222 Naked> Σ-8 ↓ →0x2224a ←0x22222
<MI 2221e CMP.L (A7),D7> {[-8-]}
<MI 22220 BGT 0x2224a> {[-8-]}
<POP 22222-2224a Naked> Σ-8 ↓ →0x2221e
<MI 22222 MOVE.L D7,D0> {[-8-]}
<MI 22224 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x22226 LimitCheck 0x0 ≤ D0 ≤ 0x6b> {[-8-]}
<MI 2222c LEA.L (A6-0x9a),A0> {[-8-]}
<MI 2222e MOVE.L D7,D1> {[-8-]}
<MI 22230 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x22232 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 2223c MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 22240 MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x22)> {[-8-]}
<MI 22246 ADDQ.L #0x1,D7> {[-8-]}
<MI 22248 BVC 0x2221e> {[-8-]}
<POP 2224a-2227a Naked> Σ-8 Δ+4 ↓ →0x22290 ←0x2221e
<POP 2224a-2224c StackAdj> Δ+4 {[-4-]}
<MI 2224c MOVEA.L (A7),A0> {[-4-]}
<MI 2224e MOVE.W (A0),D0> {[-4-]}
<MI 22250 EXTW.L D0> {[-4-]}
<MI 22252 ADDQ.L #0x1,D0> {[-4-]}
<MI 22254 MOVE.L D0,D6> {[-4-]}
<POP 22256-22258 StackAdj> Δ+4 {}
<MI 22258 MOVE.L D6,D0> {}
<MI 2225a SUBQ.L #0x1,D0> {}
<POP 0x2225c LimitCheck 0x0 ≤ D0 ≤ 0x6b> {}
<MI 22262 LEA.L (A6-0x9a),A0> {}
<MI 22264 CLR.B (A0+D0.L+#0x22)> {}
<MI 22268 MOVEA.L (A6-0x94),A0> {}
<MI 2226a MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2226c MOVE.W (A0),D0> {[4, 'A0']}
<MI 2226e EXTW.L D0> {[4, 'A0']}
<MI 22270 MOVE.L D0,D5> {[4, 'A0']}
<MI 22272 MOVEQ.L #0x6c,D0> {[4, 'A0']}
<MI 22274 SUB.L D6,D0> {[4, 'A0']}
<MI 22276 CMP.L D0,D5> {[4, 'A0']}
<MI 22278 BLE 0x22290> {[4, 'A0']}
<POP 2227a-22290 Naked> Σ-4 ↓
<MI 2227a MOVE.L D0,D5> {[-4-]}
<MI 2227c MOVE.L D5,D0> {[-4-]}
<MI 2227e SUBQ.L #0x1,D0> {[-4-]}
<POP 0x22280 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-4-]}
<MI 2228a MOVE.B #0x5c,(A0+D0.L+#0x2)> {[-4-]}
<POP 22290-22294 Naked> Σ-4 Δ-4 ↓ ←0x2224a
<MI 22290 MOVE.L D5,-(A7)> Δ-4 {[-4-]|[4, 'D5']}
<MI 22292 MOVEQ.L #0x01,D7> {[-4-]|[4, 'D5']}
<POP 22294-22298 Naked> Σ-8 ↓ →0x222c2 ←0x22298
<MI 22294 CMP.L (A7),D7> {[-8-]}
<MI 22296 BGT 0x222c2> {[-8-]}
<POP 22298-222c2 Naked> Σ-8 ↓ →0x22294
<MI 22298 ADDQ.L #0x1,D6> {[-8-]}
<MI 2229a MOVE.L D6,D0> {[-8-]}
<MI 2229c SUBQ.L #0x1,D0> {[-8-]}
<POP 0x2229e LimitCheck 0x0 ≤ D0 ≤ 0x6b> {[-8-]}
<MI 222a4 LEA.L (A6-0x9a),A0> {[-8-]}
<MI 222a6 MOVE.L D7,D1> {[-8-]}
<MI 222a8 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x222aa LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 222b4 MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 222b8 MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x22)> {[-8-]}
<MI 222be ADDQ.L #0x1,D7> {[-8-]}
<MI 222c0 BVC 0x22294> {[-8-]}
<POP 222c2-222cc Naked> Σ-8 Δ+4 ↓ →0x222de ←0x22294
<POP 222c2-222c4 StackAdj> Δ+4 {[-4-]}
<MI 222c4 CMPI.L #0x0000006c,D6> {[-4-]}
<MI 222ca BGE 0x222de> {[-4-]}
<POP 222cc-222de Naked> Σ-4 ↓
<MI 222cc MOVE.L D6,D0> {[-4-]}
<MI 222ce ADDQ.L #0x1,D0> {[-4-]}
<MI 222d0 SUBQ.L #0x1,D0> {[-4-]}
<POP 0x222d2 LimitCheck 0x0 ≤ D0 ≤ 0x6b> {[-4-]}
<MI 222d8 LEA.L (A6-0x9a),A0> {[-4-]}
<MI 222da CLR.B (A0+D0.L+#0x22)> {[-4-]}
<POP 222de-222f4 Naked> Σ-4 Δ+4 ↓ ←0x222c2
<POP 222de-222e0 StackAdj> Δ+4 {}
<Pointer.fp 0x222e0 <LVAR -0x094 @ 4(r)>> Δ-4 {[@@-148]}
<Call 0x222e2 0x102bc> {[@@-148]}
FreeString(VAR a : String)
<POP 222e8-222ea StackAdj> Δ+4 {}
<Pointer.fp 0x222ea <LVAR -0x098 @ 4(rw)>> Δ-4 {[@@-152]}
<Call 0x222ec 0x102bc> {[@@-152]}
FreeString(VAR a : String)
<POP 222f2-222f4 StackAdj> Δ+4 {}
<POP 222f4-22306 Naked> Σ0 ↓ ←0x2213e
<Const 0x222f4 0x3.2> Δ-2 {[#3]}
<MI 222f8 LEA.L (A6-0x86),A0> {[#3]}
<MI 222fc MOVE.L A0,-(A7)> Δ-4 {[#3]|[4, 'A0']}
<Call 0x222fe 0x103a8> {[#3]|[4, 'A0']}
Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer)
<POP 22304-22306 StackAdj> Δ+6 {}
<POP 22306-2230e Epilogue> Σ0
@ 2230e
<LVAR 0x008 1(r)>
<POP 2230e-22394 Body>
<POP 2230e-22324 Prologue> Σ0 ↓
<POP 22324-22328 RegCacheLoad> Σ0 ↓
<POP 22328-2238c Naked> Σ0 ↓
<Blob 0x22328 [30] @> Δ-30 {[«30""»]}
<MI 2233a MOVE.B (A6+0x8),D0> {[«30""»]}
<MI 2233e EXTB.W D0> {[«30""»]}
<MI 22340 MULS.W #0x32,D0> {[«30""»]}
<MI 22342 LEA.L 0x212eb,A0> {[«30""»]}
<Blob 0x22346 [50] (A0+D0.W)> Δ-50 {[«30""»]|[«50»]}
<POP 22356-22358 StackAdj> Δ-8 {[«30""»]|[«50»]|[-8-]}
<Lit 0x22358 29> {[«30""»]|[«50»]|[-4-]|[$$Restarting system after R1000]}
<POP 22368-2236a StackAdj> Δ-4 {[«30""»]|[«50»]|[-4-]|[$$Restarting system after R1000]|[-4-]}
<Lit 0x2236a> {[«30""»]|[«50»]|[-4-]|[$$Restarting system after R1000]|[$$…]}
<Pointer.sp 0x2236a 12> Δ-4
<Const 0x2236e 0x1.2> Δ-2
<Const 0x22370 0x32.2> Δ-2
<Call 0x22372 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22378-2237a StackAdj> Δ+8
<Call 0x2237a 0x102d0> {[«30""»]|[«50»]|[-4-]|[$$Restarting system after R1000]|[$$…]}
StringCat2(a, b : String) : String
<POP 22380-22382 StackAdj> Δ+8 {[«30""»]|[«50»]|[-4-]}
<Call 0x22382 0x103e0> {[«30""»]|[«50»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22388-2238c StackAdj> Δ+84 {}
<POP 2238c-22394 Epilogue> Σ0
@ 22394
<LVAR 0x00c 4(w)>
<LVAR 0x00b 1(r)>
<LVAR 0x00a 1(r) 2(r)>
<POP 22394-22474 Body>
<POP 22394-223aa Prologue> Σ0 ↓
<POP 223aa-223b0 RegCacheLoad> Σ0 ↓
<POP 223b0-223c4 Naked> Σ0 ↓ →0x22430
<MI 223b0 MOVE.W (A6+0xa),D0> {}
<MI 223b4 LSL.W #0x7,D0> {}
<MI 223b6 LSR.W #0x8,D0> {}
<MI 223b8 LSR.W #0x4,D0> {}
<MI 223ba MOVE.W D0,D1> {}
<MI 223bc SUBQ.W #0x1,D1> {}
<MI 223be CMPI.W #0x000b,D1> {}
<MI 223c2 BHI 0x22430> {}
<POP 223c4-223ce Naked> Σ0 →0x223e6 →0x223e8 →0x223ec →0x223f0 →0x223f4 →0x223f8 →0x22400 →0x22408 →0x22410 →0x22418 →0x22420 →0x22428
<MI 223c4 ADD.W D1,D1> {}
<MI 223c6 SWITCH D1.W> {}
<POP 223e6-223e8 Naked> Σ0 →0x22430 ←0x223c4
<MI 223e6 BRA 0x22430> {}
<POP 223e8-223ec Naked> Σ0 →0x22432 ←0x223c4
<MI 223e8 MOVEQ.L #0x1f,D7> {}
<MI 223ea BRA 0x22432> {}
<POP 223ec-223f0 Naked> Σ0 →0x22432 ←0x223c4
<MI 223ec MOVEQ.L #0x3b,D7> {}
<MI 223ee BRA 0x22432> {}
<POP 223f0-223f4 Naked> Σ0 →0x22432 ←0x223c4
<MI 223f0 MOVEQ.L #0x5a,D7> {}
<MI 223f2 BRA 0x22432> {}
<POP 223f4-223f8 Naked> Σ0 →0x22432 ←0x223c4
<MI 223f4 MOVEQ.L #0x78,D7> {}
<MI 223f6 BRA 0x22432> {}
<POP 223f8-22400 Naked> Σ0 →0x22432 ←0x223c4
<MI 223f8 MOVE.L #0x97,D7> {}
<MI 223fe BRA 0x22432> {}
<POP 22400-22408 Naked> Σ0 →0x22432 ←0x223c4
<MI 22400 MOVE.L #0xb5,D7> {}
<MI 22406 BRA 0x22432> {}
<POP 22408-22410 Naked> Σ0 →0x22432 ←0x223c4
<MI 22408 MOVE.L #0xd4,D7> {}
<MI 2240e BRA 0x22432> {}
<POP 22410-22418 Naked> Σ0 →0x22432 ←0x223c4
<MI 22410 MOVE.L #0xf3,D7> {}
<MI 22416 BRA 0x22432> {}
<POP 22418-22420 Naked> Σ0 →0x22432 ←0x223c4
<MI 22418 MOVE.L #0x111,D7> {}
<MI 2241e BRA 0x22432> {}
<POP 22420-22428 Naked> Σ0 →0x22432 ←0x223c4
<MI 22420 MOVE.L #0x130,D7> {}
<MI 22426 BRA 0x22432> {}
<POP 22428-22430 Naked> Σ0 →0x22432 ←0x223c4
<MI 22428 MOVE.L #0x14e,D7> {}
<MI 2242e BRA 0x22432> {}
<POP 22430-22432 Naked> Σ0 ↓ ←0x223b0 ←0x223e6
<MI 22430 MOVEQ.L #0x00,D7> {}
<POP 22432-22442 Naked> Σ0 ↓ →0x2244a ←0x223e8 ←0x223ec ←0x223f0 ←0x223f4 ←0x223f8 ←0x22400 ←0x22408 ←0x22410 ←0x22418 ←0x22420 ←0x22428
<MI 22432 CLR.L D1> {}
<MI 22434 MOVE.B (A6+0xa),D1> {}
<MI 22438 LSR.B #0x1,D1> {}
<MI 2243a MOVE.W D1,D2> {}
<MI 2243c AND.W #0x03,D2> {}
<MI 2243e CMP.W #0x03,D2> {}
<MI 22440 BNE 0x2244a> {}
<POP 22442-22448 Naked> Σ0 ↓ →0x2244a
<MI 22442 CMPI.W #0x0002,D0> {}
<MI 22446 BLE 0x2244a> {}
<POP 22448-2244a Naked> Σ0 ↓
<MI 22448 ADDQ.L #0x1,D7> {}
<POP 2244a-2246c Naked> Σ0 ↓ ←0x22432 ←0x22442
<MI 2244a EXTW.L D1> {}
<MI 2244c MOVE.L D1,D6> {}
<MI 2244e MOVE.L D6,D4> {}
<MI 22450 MOVE.L #0x16d,D3> {}
<Call 0x22456 0x1028c> {}
?muls_d3_d4
<MI 2245c MOVE.L D4,(A6+0xc)> {}
<MI 2245e ADD.L D7,(A6+0xc)> {}
<MI 22460 CLR.L D0> {}
<MI 22462 MOVE.B (A6+0xb),D0> {}
<MI 22466 LSL.B #0x3,D0> {}
<MI 22468 LSR.B #0x3,D0> {}
<MI 2246a ADD.L D0,(A6+0xc)> {}
<POP 2246c-22474 Epilogue> Σ0
@ 22474
<LVAR 0x008 1(rw)>
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 4(rw)>
<LVAR -0x009 1(w)>
<LVAR -0x00a 1(w)>
<LVAR -0x00b 1(w)>
<LVAR -0x00c 1(w) 4(r)>
<LVAR -0x00d 1(w)>
<LVAR -0x00e 1(w) 2(w)>
<LVAR -0x010 2(r) 4(rw)>
<LVAR -0x014 @ 2(r) 4(r)>
<LVAR -0x3cc 2(r)>
<LVAR -0x3ce 2(r)>
<LVAR -0x3d4 1(r)>
<LVAR -0x3f4 2(r)>
<LVAR -0x414 @>
<LVAR -0x415 @>
<LVAR -0x416 @ 1(r)>
<LVAR -0x41a @ 4(r)>
<LVAR -0x422 @ 4(r)>
<LVAR -0x426 @ 4(r)>
<LVAR -0x42a @ 4(r)>
<LVAR -0x42c @ 1(r)>
<LVAR -0x42d @>
<LVAR -0x42e 1(w)>
<LVAR -0x448 @ 1(r)>
<LVAR -0x454 @ 4(w)>
<POP 22474-22b6c Body> Δ+74
<POP 22474-2248a Prologue> Σ0 ↓
<POP 2248a-22494 RegCacheLoad> Σ0 ↓
<POP 22494-224e0 Naked> Σ0 ↓ →0x22512
<MI 22494 LEA.L (A6-0x448),A0> {}
<MI 22498 LEA.L 0x209e6,A1> {}
<BlockMove 22,A1,A0> {}
<Blob 0x224a4 [20] @> Δ-20 {[«20""»]}
<POP 224b0-224b2 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x224b2 20> {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]}
<POP 224c0-224c2 StackAdj> Δ-2 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]}
<MI 224c2 CLR.B (A7)> {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]}
<MI 224c4 CLR.B -(A7)> Δ-2 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]|[#0]}
<Const 0x224c6 0x0.4> Δ-4 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]|[#0]|[##0]}
<Pointer.fp 0x224ca <LVAR -0x416 @ 1(r)>> Δ-4 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]|[#0]|[##0]|[@@-1046]}
<Pointer.fp 0x224ce <LVAR -0x41a @ 4(r)>> Δ-4 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]|[#0]|[##0]|[@@-1046]|[@@-1050]}
<Call 0x224d0 0x10380> {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]|[#0]|[##0]|[@@-1046]|[@@-1050]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 224d6-224da StackAdj> Δ+40 {}
<MI 224da TST.B (A6-0x416)> {}
<MI 224de BEQ 0x22512> {}
<POP 224e0-22512 Naked> Σ0 →0x22b08
<Call 0x224e0 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x224e6 [72] @> Δ-72 {[«72""»]}
<POP 224f2-224f4 StackAdj> Δ-4 {[«72""»]|[-4-]}
<Lit 0x224f4 72> {[«72""»]|[$$>>> the AUTOBOOT_AFTER_CRASH file does not exist - disabling auto reboot]}
<Call 0x22504 0x103e0> {[«72""»]|[$$>>> the AUTOBOOT_AFTER_CRASH file does not exist - disabling auto reboot]}
WriteConsoleStringCrLf(str : String)
<POP 2250a-2250e StackAdj> Δ+76 {}
<MI 2250e BRA 0x22b08> {}
<POP 22512-2257a Naked> Σ0 Δ-4 ↓ →0x22620 ←0x22494
<Pointer.fp 0x22512 <LVAR -0x42a @ 4(r)>> Δ-4 {[@@-1066]}
<Call 0x22516 0x102b8> {[@@-1066]}
NewString(VAR a : String)
<POP 2251c-2251e StackAdj> Δ+4 {}
<Pointer.fp 0x2251e <LVAR -0x426 @ 4(r)>> Δ-4 {[@@-1062]}
<Call 0x22522 0x102b8> {[@@-1062]}
NewString(VAR a : String)
<MI 22528 MOVE.L (A6-0x41a),(A7)> {[4, '(A6-0x41a)']}
<Pointer.fp 0x2252a <LVAR -0x42a @ 4(r)>> Δ-4 {[4, '(A6-0x41a)']|[@@-1066]}
<Pointer.fp 0x2252e <LVAR -0x42d @>> Δ-4 {[4, '(A6-0x41a)']|[@@-1066]|[@@-1069]}
<Call 0x22532 0x1043c> {[4, '(A6-0x41a)']|[@@-1066]|[@@-1069]}
FileReadLine(file : File; VAR a : String; VAR b : Byte)
<POP 22538-2253a StackAdj> Δ+8 {[4, '(A6-0x41a)']}
<MI 2253a MOVE.L (A6-0x41a),(A7)> {[4, '(A6-0x41a)']}
<Pointer.fp 0x2253c <LVAR -0x426 @ 4(r)>> Δ-4 {[4, '(A6-0x41a)']|[@@-1062]}
<Pointer.fp 0x22540 <LVAR -0x42d @>> Δ-4 {[4, '(A6-0x41a)']|[@@-1062]|[@@-1069]}
<Call 0x22544 0x1043c> {[4, '(A6-0x41a)']|[@@-1062]|[@@-1069]}
FileReadLine(file : File; VAR a : String; VAR b : Byte)
<POP 2254a-2254c StackAdj> Δ+8 {[4, '(A6-0x41a)']}
<POP 2254c-2254d StackAdj> Δ+4 {}
<Blob 0x2254d [4] @> Δ-4 {[«4""»]}
<POP 22550-22552 StackAdj> Δ-8 {[«4""»]|[-8-]}
<MI 22552 MOVE.L (A6-0x42a),-(A7)> Δ-4 {[«4""»]|[-8-]|[4, '(A6-0x42a)']}
<Call 0x22556 0x102f0> {[«4""»]|[-8-]|[4, '(A6-0x42a)']}
ToUpper(a : String) : String
<Lit 0x2255c 4> {[«4""»]|[-8-]|[$$ONCE]}
<Call 0x2256c 0x10300> {[«4""»]|[-8-]|[$$ONCE]}
FSCALL_10300
<POP 22572-22574 StackAdj> Δ+8 {[«4""»]|[-4-]}
<MI 22574 TST.L (A7)+> Δ+4 {[«4""»]}
<MI 22576 BLE 0x22620> {[«4""»]}
<POP 2257a-22620 Naked> Σ-4 Δ+4 →0x22b08
<Call 0x2257a 0x103dc> {[-4-]}
WriteConsoleCrLf(void)
<Blob 0x22580 [58] @> Δ-58 {[-4-]|[«58""»]}
<POP 2258c-2258e StackAdj> Δ-4 {[-4-]|[«58""»]|[-4-]}
<Lit 0x2258e 58> {[-4-]|[«58""»]|[$$>>> auto reboot after crash is disabled this one time only]}
<Call 0x2259e 0x103e0> {[-4-]|[«58""»]|[$$>>> auto reboot after crash is disabled this one time only]}
WriteConsoleStringCrLf(str : String)
<POP 225a4-225a8 StackAdj> Δ+58 {[-4-]|[-4-]}
<MI 225a8 MOVE.L (A6-0x41a),(A7)> {[-4-]|[4, '(A6-0x41a)']}
<Call 0x225aa 0x10444> {[-4-]|[4, '(A6-0x41a)']}
FSCALL_10444
<POP 225b0-225b1 StackAdj> Δ+4 ↓ {[-4-]}
<Blob 0x225b1 [42] @> Δ-42 {[-4-]|[«42""»]}
<MI 225c2 MOVE.L (A6-0x41a),-(A7)> Δ-4 {[-4-]|[«42""»]|[4, '(A6-0x41a)']}
<POP 225c4-225c6 StackAdj> Δ-4 {[-4-]|[«42""»]|[4, '(A6-0x41a)']|[-4-]}
<Lit 0x225c6 41> {[-4-]|[«42""»]|[4, '(A6-0x41a)']|[$$ENABLE automatic rebooting after a crash.]}
<Pointer.fp 0x225d6 <LVAR -0x42d @>> Δ-4 {[-4-]|[«42""»]|[4, '(A6-0x41a)']|[$$ENABLE automatic rebooting after a crash.]|[@@-1069]}
<Call 0x225da 0x10440> {[-4-]|[«42""»]|[4, '(A6-0x41a)']|[$$ENABLE automatic rebooting after a crash.]|[@@-1069]}
FSCALL_10440
<POP 225e0-225e4 StackAdj> Δ+50 {[-4-]|[-4-]}
<MI 225e4 MOVE.L (A6-0x41a),(A7)> {[-4-]|[4, '(A6-0x41a)']}
<MI 225e6 MOVE.L (A6-0x426),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x41a)']|[4, '(A6-0x426)']}
<Pointer.fp 0x225ea <LVAR -0x42d @>> Δ-4 {[-4-]|[4, '(A6-0x41a)']|[4, '(A6-0x426)']|[@@-1069]}
<Call 0x225ee 0x10440> {[-4-]|[4, '(A6-0x41a)']|[4, '(A6-0x426)']|[@@-1069]}
FSCALL_10440
<POP 225f4-225f6 StackAdj> Δ+8 {[-4-]|[4, '(A6-0x41a)']}
<MI 225f6 MOVE.L (A6-0x41a),(A7)> {[-4-]|[4, '(A6-0x41a)']}
<Call 0x225f8 0x10448> {[-4-]|[4, '(A6-0x41a)']}
FSCALL_10448
<POP 225fe-22600 StackAdj> Δ+2 {[-4-]|[-2-]}
<MI 22600 CLR.B (A7)> {[-4-]|[-2-]}
<Const 0x22602 0x1.2> Δ-2 {[-4-]|[-2-]|[#1]}
<Const 0x22606 0x1.4> Δ-4 {[-4-]|[-2-]|[#1]|[##1]}
<Pointer.fp 0x2260a <LVAR -0x416 @ 1(r)>> Δ-4 {[-4-]|[-2-]|[#1]|[##1]|[@@-1046]}
<Pointer.fp 0x2260e <LVAR -0x41a @ 4(r)>> Δ-4 {[-4-]|[-2-]|[#1]|[##1]|[@@-1046]|[@@-1050]}
<Call 0x22610 0x1038c> {[-4-]|[-2-]|[#1]|[##1]|[@@-1046]|[@@-1050]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 22616-2261a StackAdj> Δ+16 {[-4-]}
<POP 2261a-2261c StackAdj> Δ+4 {}
<MI 2261c BRA 0x22b08> {}
<POP 22620-22676 Naked> Σ-4 Δ-2 ↓ →0x226a8 ←0x22512
<POP 22620-22622 StackAdj> Δ+2 {[-2-]}
<MI 22622 CLR.B (A7)> {[-2-]}
<Const 0x22624 0x1.2> Δ-2 {[-2-]|[#1]}
<Const 0x22628 0x1.4> Δ-4 {[-2-]|[#1]|[##1]}
<Pointer.fp 0x2262c <LVAR -0x416 @ 1(r)>> Δ-4 {[-2-]|[#1]|[##1]|[@@-1046]}
<Pointer.fp 0x22630 <LVAR -0x41a @ 4(r)>> Δ-4 {[-2-]|[#1]|[##1]|[@@-1046]|[@@-1050]}
<Call 0x22632 0x1038c> {[-2-]|[#1]|[##1]|[@@-1046]|[@@-1050]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 22638-2263c StackAdj> Δ+14 {[-2-]}
<POP 2263c-2263d StackAdj> Δ+2 {}
<Blob 0x2263d [2] @> Δ-2 {[«2""»]}
<Blob 0x22640 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x22644 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 22648-2264a StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-8-]}
<MI 2264a MOVE.L (A6-0x42a),-(A7)> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-8-]|[4, '(A6-0x42a)']}
<Call 0x2264e 0x102f0> {[«2""»]|[«2""»]|[«2""»]|[-8-]|[4, '(A6-0x42a)']}
ToUpper(a : String) : String
<Lit 0x22654 6> {[«2""»]|[«2""»]|[«2""»]|[-8-]|[$$ENABLE]}
<Call 0x22664 0x10300> {[«2""»]|[«2""»]|[«2""»]|[-8-]|[$$ENABLE]}
FSCALL_10300
<POP 2266a-2266c StackAdj> Δ+8 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<MI 2266c MOVE.L (A7)+,D0> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<MI 2266e CMPI.L #0x00000001,D0> {[«2""»]|[«2""»]|[«2""»]}
<MI 22674 BEQ 0x226a8> {[«2""»]|[«2""»]|[«2""»]}
<POP 22676-226a8 Naked> Σ-6 Δ+6 →0x22b08
<Call 0x22676 0x103dc> {[-6-]}
WriteConsoleCrLf(void)
<Blob 0x2267c [72] @> Δ-72 {[-6-]|[«72""»]}
<POP 22688-2268a StackAdj> Δ-4 {[-6-]|[«72""»]|[-4-]}
<Lit 0x2268a 72> {[-6-]|[«72""»]|[$$>>> auto reboot after crash is DISABLED in the AUTOBOOT_AFTER_CRASH file]}
<Call 0x2269a 0x103e0> {[-6-]|[«72""»]|[$$>>> auto reboot after crash is DISABLED in the AUTOBOOT_AFTER_CRASH file]}
WriteConsoleStringCrLf(str : String)
<POP 226a0-226a4 StackAdj> Δ+82 {}
<MI 226a4 BRA 0x22b08> {}
<POP 226a8-226e4 Naked> Σ-6 Δ+6 ↓ →0x2270e ←0x22620
<POP 226a8-226aa StackAdj> Δ+6 {}
<Pointer.fp 0x226aa <LVAR -0x422 @ 4(r)>> Δ-4 {[@@-1058]}
<Call 0x226ae 0x102b8> {[@@-1058]}
NewString(VAR a : String)
<MI 226b4 MOVE.L (A6-0x426),(A7)> {[4, '(A6-0x426)']}
<MI 226b8 MOVE.L (A6-0x422),-(A7)> Δ-4 {[4, '(A6-0x426)']|[4, '(A6-0x422)']}
<Pointer.fp 0x226bc <LVAR -0x42c @ 1(r)>> Δ-4 {[4, '(A6-0x426)']|[4, '(A6-0x422)']|[@@-1068]}
<Call 0x226c0 0x102fc> {[4, '(A6-0x426)']|[4, '(A6-0x422)']|[@@-1068]}
FirstField(MOD input : String; MOD output : String; VAR c : Bool
<POP 226c6-226c8 StackAdj> Δ+8 {[4, '(A6-0x426)']}
<MI 226c8 MOVE.L (A6-0x422),(A7)> {[4, '(A6-0x422)']}
<Pointer.fp 0x226cc <LVAR -0x42c @ 1(r)>> Δ-4 {[4, '(A6-0x422)']|[@@-1068]}
<Pointer.fp 0x226d0 <LVAR -0x004 @ 4(r)>> Δ-4 {[4, '(A6-0x422)']|[@@-1068]|[@@-4]}
<Call 0x226d4 0x102ec> {[4, '(A6-0x422)']|[@@-1068]|[@@-4]}
String2Long(src : String; VAR status : Bool; VAR retval : Long)
<POP 226da-226de StackAdj> Δ+12 {}
<MI 226de TST.B (A6-0x42c)> {}
<MI 226e2 BNE 0x2270e> {}
<POP 226e4-2270e Naked> Σ0 Δ-92 →0x22afa
<Call 0x226e4 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x226ea [80] @> Δ-80 {[«80""»]}
<POP 226fc-226fe StackAdj> Δ-4 {[«80""»]|[-4-]}
<Pointer.sp 0x226fe 4> Δ-4 {[«80""»]|[-4-]|[^^4]}
<Const 0x22702 0x1.2> Δ-2 {[«80""»]|[-4-]|[^^4]|[#1]}
<Const 0x22706 0x4f.2> Δ-2 {[«80""»]|[-4-]|[^^4]|[#1]|[#79]}
<MI 2270a BRA 0x22afa> {[«80""»]|[-4-]|[^^4]|[#1]|[#79]}
<POP 2270e-22734 Naked> Σ0 ↓ ←0x226a8
<MI 2270e ANDI.B #0x01,(A6-0xe)> {}
<MI 22714 ANDI.W #0xfe1f,(A6-0xe)> {}
<MI 2271a ORI.W #0x0020,(A6-0xe)> {}
<MI 22720 ANDI.B #0xe0,(A6-0xd)> {}
<MI 22726 ORI.B #0x01,(A6-0xd)> {}
<Call 0x2272c 0x103dc> {}
WriteConsoleCrLf(void)
<MI 22732 MOVEQ.L #0x02,D0> {}
<POP 22734-2278e Naked> Σ0 Δ-4 ↓ →0x22962 ←0x22962
<MI 22734 MOVE.L D0,(A6-0x454)> {}
<MI 22738 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<Blob 0x2273a [10] @> Δ-10 {[4, 'D0']|[«10""»]}
<POP 22746-22748 StackAdj> Δ-8 {[4, 'D0']|[«10""»]|[-8-]}
<Lit 0x22748 10> {[4, 'D0']|[«10""»]|[-4-]|[$$R1000_DUMP]}
<MI 22756 MOVE.L D0,(A7)> {[4, 'D0']|[«10""»]|[-4-]|[4, 'D0']}
<POP 22754-22756 StackAdj> Δ-8 {[4, 'D0']|[«10""»]|[-4-]|[4, 'D0']|[-8-]}
<Call 0x22758 0x102e4> {[4, 'D0']|[«10""»]|[-4-]|[4, 'D0']|[-8-]}
Long2String(a : Long) : String
<POP 2275e-22760 StackAdj> Δ+4 {[4, 'D0']|[«10""»]|[-4-]|[4, 'D0']|[-4-]}
<Call 0x22760 0x102d0> {[4, 'D0']|[«10""»]|[-4-]|[4, 'D0']|[-4-]}
StringCat2(a, b : String) : String
<POP 22766-22768 StackAdj> Δ+8 {[4, 'D0']|[«10""»]|[-4-]}
<MI 22768 MOVEA.L (A7)+,A4> Δ+4 {[4, 'D0']|[«10""»]}
<POP 2276a-2276c StackAdj> Δ+6 {[4, 'D0']|[-4-]}
<MI 2276c MOVE.L A4,(A7)> {[4, 'D0']|[4, 'A4']}
<MI 2276e CLR.B -(A7)> Δ-2 {[4, 'D0']|[4, 'A4']|[#0]}
<MI 22770 CLR.B -(A7)> Δ-2 {[4, 'D0']|[4, 'A4']|[#0]|[#0]}
<Const 0x22772 0x0.4> Δ-4 {[4, 'D0']|[4, 'A4']|[#0]|[#0]|[##0]}
<Pointer.fp 0x22776 <LVAR -0x416 @ 1(r)>> Δ-4 {[4, 'D0']|[4, 'A4']|[#0]|[#0]|[##0]|[@@-1046]}
<Pointer.fp 0x2277a <LVAR -0x41a @ 4(r)>> Δ-4 {[4, 'D0']|[4, 'A4']|[#0]|[#0]|[##0]|[@@-1046]|[@@-1050]}
<Call 0x2277c 0x10380> {[4, 'D0']|[4, 'A4']|[#0]|[#0]|[##0]|[@@-1046]|[@@-1050]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 22782-22786 StackAdj> Δ+20 {[4, 'D0']}
<MI 22786 TST.B (A6-0x416)> {[4, 'D0']}
<MI 2278a BNE 0x22962> {[4, 'D0']}
<POP 2278e-227ee Naked> Σ-4 ↓ →0x227f8
<MI 2278e MOVE.L (A6-0x41a),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x41a)']}
<MI 22790 CLR.W -(A7)> Δ-2 {[-4-]|[4, '(A6-0x41a)']|[#0]}
<MI 22792 CLR.W -(A7)> Δ-2 {[-4-]|[4, '(A6-0x41a)']|[#0]|[#0]}
<Const 0x22794 0x200.2> Δ-2 {[-4-]|[4, '(A6-0x41a)']|[#0]|[#0]|[#512]}
<Const 0x22798 0x1.2> Δ-2 {[-4-]|[4, '(A6-0x41a)']|[#0]|[#0]|[#512]|[#1]}
<MI 2279c LEA.L (A6-0x414),A0> {[-4-]|[4, '(A6-0x41a)']|[#0]|[#0]|[#512]|[#1]}
<MI 227a0 MOVE.L A0,-(A7)> Δ-4 {[-4-]|[4, '(A6-0x41a)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x227a2 <LVAR -0x416 @ 1(r)>> Δ-4 {[-4-]|[4, '(A6-0x41a)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-1046]}
<Call 0x227a6 0x10384> {[-4-]|[4, '(A6-0x41a)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-1046]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 227ac-227b0 StackAdj> Δ+20 {[-4-]}
<MI 227b0 MOVEA.L (A6-0x41a),A0> {[-4-]}
<MI 227b2 MOVE.B (A0+0x3a),(A6-0xc)> {[-4-]}
<MI 227b8 MOVE.B (A0+0x3b),(A6-0xb)> {[-4-]}
<MI 227be MOVE.B (A0+0x3c),(A6-0xa)> {[-4-]}
<MI 227c4 MOVE.B (A0+0x3d),(A6-0x9)> {[-4-]}
<MI 227ca CLR.B -(A7)> Δ-2 {[-4-]|[#0]}
<Const 0x227cc 0x1.2> Δ-2 {[-4-]|[#0]|[#1]}
<Const 0x227d0 0x1.4> Δ-4 {[-4-]|[#0]|[#1]|[##1]}
<Pointer.fp 0x227d4 <LVAR -0x416 @ 1(r)>> Δ-4 {[-4-]|[#0]|[#1]|[##1]|[@@-1046]}
<Pointer.fp 0x227d8 <LVAR -0x41a @ 4(r)>> Δ-4 {[-4-]|[#0]|[#1]|[##1]|[@@-1046]|[@@-1050]}
<Call 0x227da 0x1038c> {[-4-]|[#0]|[#1]|[##1]|[@@-1046]|[@@-1050]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 227e0-227e4 StackAdj> Δ+16 {[-4-]}
<MI 227e4 MOVE.B (A6-0x3d4),D1> {[-4-]}
<MI 227e8 CMPI.B #0x03,D1> {[-4-]}
<MI 227ec BNE 0x227f8> {[-4-]}
<POP 227ee-227f8 Naked> Σ-4 ↓ →0x22804
<MI 227ee MOVE.W (A6-0x3cc),D2> {[-4-]}
<MI 227f2 CMPI.W #0x0009,D2> {[-4-]}
<MI 227f6 BEQ 0x22804> {[-4-]}
<POP 227f8-227fe Naked> Σ-4 ↓ →0x22808 ←0x2278e
<MI 227f8 CMPI.B #0x02,D1> {[-4-]}
<MI 227fc BNE 0x22808> {[-4-]}
<POP 227fe-22804 Naked> Σ-4 ↓ →0x22808
<MI 227fe TST.W (A6-0x3ce)> {[-4-]}
<MI 22802 BNE 0x22808> {[-4-]}
<POP 22804-22808 Naked> Σ-4 →0x22962 ←0x227ee
<MI 22804 BRA 0x22962> {[-4-]}
<POP 22808-228b4 Naked> Σ-4 ↓ ←0x227f8 ←0x227fe
<MI 22808 MOVE.L (A6-0xc),(A6-0x10)> {[-4-]}
<Blob 0x2280e [26] @> Δ-26 {[-4-]|[«26""»]}
<Blob 0x2281a [18] (A6-0x3f6)> Δ-18 {[-4-]|[«26""»]|[«18»]}
<Blob 0x22826 [20] @> Δ-20 {[-4-]|[«26""»]|[«18»]|[«20""»]}
<POP 22838-2283a StackAdj> Δ-8 {[-4-]|[«26""»]|[«18»]|[«20""»]|[-8-]}
<Lit 0x2283a 26> {[-4-]|[«26""»]|[«18»]|[«20""»]|[-4-]|[$$>>> the previous crash at_]}
<POP 22848-2284a StackAdj> Δ-4 {[-4-]|[«26""»]|[«18»]|[«20""»]|[-4-]|[$$>>> the previous crash at_]|[-4-]}
<Lit 0x2284a> {[-4-]|[«26""»]|[«18»]|[«20""»]|[-4-]|[$$>>> the previous crash at_]|[$$…]}
<Pointer.sp 0x2284a 32> Δ-4
<Const 0x2284e 0x1.2> Δ-2
<Const 0x22852 0x12.2> Δ-2
<Call 0x22856 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22858-2285a StackAdj> Δ+8
<POP 22858-2285a StackAdj> Δ-4 {[-4-]|[«26""»]|[«18»]|[«20""»]|[-4-]|[$$>>> the previous crash at_]|[$$…]|[-4-]}
<Lit 0x2285a 19> {[-4-]|[«26""»]|[«18»]|[«20""»]|[-4-]|[$$>>> the previous crash at_]|[$$…]|[$$ was classified as:]}
<Call 0x2286a 0x102d4> {[-4-]|[«26""»]|[«18»]|[«20""»]|[-4-]|[$$>>> the previous crash at_]|[$$…]|[$$ was classified as:]}
StringCat3(a, b, c : String) : String
<POP 22870-22874 StackAdj> Δ+12 {[-4-]|[«26""»]|[«18»]|[«20""»]|[-4-]}
<Call 0x22874 0x103e0> {[-4-]|[«26""»]|[«18»]|[«20""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2287a-2287e StackAdj> Δ+66 {[-4-]|[-2-]}
<POP 2287e-2287f StackAdj> Δ+2 {[-4-]}
<Blob 0x2287f [2] @> Δ-2 {[-4-]|[«2""»]}
<Blob 0x22882 [2] @> Δ-2 {[-4-]|[«2""»]|[«2""»]}
<Blob 0x22886 [2] @> Δ-2 {[-4-]|[«2""»]|[«2""»]|[«2""»]}
<POP 2288a-2288c StackAdj> Δ-4 {[-4-]|[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x2288c 6> {[-4-]|[«2""»]|[«2""»]|[«2""»]|[$$______]}
<Call 0x2289c 0x103d8> {[-4-]|[«2""»]|[«2""»]|[«2""»]|[$$______]}
WriteConsoleString(str : String)
<POP 228a2-228a6 StackAdj> Δ+10 {[-4-]}
<MI 228a6 CLR.L D1> {[-4-]}
<MI 228a8 MOVE.W (A6-0x3f4),D1> {[-4-]}
<MI 228ac SUBQ.L #0x1,D1> {[-4-]}
<MI 228ae MOVE.L D1,D6> {[-4-]}
<MI 228b0 MOVEQ.L #0x00,D7> {[-4-]}
<MI 228b2 MOVEQ.L #0x00,D5> {[-4-]}
<POP 228b4-228d6 Naked> Σ-4 ↓ →0x228ee ←0x2291a
<POP 0x228b4 LimitCheck 0x0 ≤ D6 ≤ 0x33f> {[-4-]}
<MI 228be LEA.L (A6-0x454),A0> {[-4-]}
<MI 228c2 LEA.L (A0+D6.L),A0> {[-4-]}
<MI 228c6 MOVE.B (A0+0x100),D0> {[-4-]}
<MI 228ca MOVE.B D0,(A6-0x42e)> {[-4-]}
<MI 228ce CMPI.L #0x00000016,D7> {[-4-]}
<MI 228d4 BNE 0x228ee> {[-4-]}
<POP 228d6-228e6 Naked> Σ-4 ↓ →0x228ec
<MI 228d6 MOVE.B D0,-(A7)> Δ-2 {[-4-]|[2, 'D0']}
<Call 0x228d8 0x103d0> {[-4-]|[2, 'D0']}
WriteConsoleChar(chr : char)
<POP 228de-228e0 StackAdj> Δ+2 {[-4-]}
<MI 228e0 CMPI.B #0x0a,D0> {[-4-]}
<MI 228e4 BNE 0x228ec> {[-4-]}
<POP 228e6-228ec Naked> Σ-4 Δ+4 →0x22998
<POP 228e6-228e8 StackAdj> Δ+4 {}
<MI 228e8 BRA 0x22998> {}
<POP 228ec-228ee Naked> Σ-4 →0x2291a ←0x228d6
<MI 228ec BRA 0x2291a> {[-4-]}
<POP 228ee-2290a Naked> Σ-4 ↓ →0x2290e ←0x228b4
<MI 228ee MOVE.L D7,D1> {[-4-]}
<MI 228f0 ADDQ.L #0x1,D1> {[-4-]}
<MI 228f2 MOVE.L D1,D2> {[-4-]}
<MI 228f4 SUBQ.L #0x1,D2> {[-4-]}
<POP 0x228f6 LimitCheck 0x0 ≤ D2 ≤ 0x15> {[-4-]}
<MI 22900 LEA.L (A6-0x454),A0> {[-4-]}
<MI 22904 CMP.B (A0+D2.L+#0xc),D0> {[-4-]}
<MI 22908 BNE 0x2290e> {[-4-]}
<POP 2290a-2290e Naked> Σ-4 →0x2291a
<MI 2290a MOVE.L D1,D7> {[-4-]}
<MI 2290c BRA 0x2291a> {[-4-]}
<POP 2290e-22914 Naked> Σ-4 ↓ →0x22918 ←0x228ee
<MI 2290e CMP.B (A6-0x448),D0> {[-4-]}
<MI 22912 BNE 0x22918> {[-4-]}
<POP 22914-22918 Naked> Σ-4 →0x2291a
<MI 22914 MOVEQ.L #0x01,D7> {[-4-]}
<MI 22916 BRA 0x2291a> {[-4-]}
<POP 22918-2291a Naked> Σ-4 ↓ ←0x2290e
<MI 22918 MOVEQ.L #0x00,D7> {[-4-]}
<POP 2291a-22938 Naked> Σ-4 ↓ →0x228b4 ←0x228ec ←0x2290a ←0x22914
<MI 2291a ADDQ.L #0x1,D6> {[-4-]}
<MI 2291c MOVE.L D6,D4> {[-4-]}
<MI 2291e MOVE.L #0x340,D3> {[-4-]}
<Call 0x22924 0x10294> {[-4-]}
?divs_d3_d4
<MI 2292a MOVE.L D3,D6> {[-4-]}
<MI 2292c ADDQ.L #0x1,D5> {[-4-]}
<MI 2292e CMPI.L #0x0000033f,D5> {[-4-]}
<MI 22934 BLE 0x228b4> {[-4-]}
<POP 22938-22962 Naked> Σ-4 Δ+4 →0x22998
<Blob 0x22938 [36] @> Δ-36 {[-4-]|[«36""»]}
<POP 22944-22946 StackAdj> Δ-4 {[-4-]|[«36""»]|[-4-]}
<Lit 0x22946 36> {[-4-]|[«36""»]|[$$>>> could not find crash reason text]}
<Call 0x22956 0x103e0> {[-4-]|[«36""»]|[$$>>> could not find crash reason text]}
WriteConsoleStringCrLf(str : String)
<POP 2295c-22960 StackAdj> Δ+44 {}
<MI 22960 BRA 0x22998> {}
<POP 22962-22970 Naked> Σ-4 Δ+4 ↓ →0x22734 ←0x22734 ←0x22804
<MI 22962 MOVE.L (A7)+,D0> Δ+4 {}
<MI 22964 ADDQ.L #0x1,D0> {}
<MI 22966 CMPI.L #0x00000004,D0> {}
<MI 2296c BLE 0x22734> {}
<POP 22970-22998 Naked> Σ0 ↓
<Blob 0x22970 [50] @> Δ-50 {[«50""»]}
<POP 2297c-2297e StackAdj> Δ-4 {[«50""»]|[-4-]}
<Lit 0x2297e 50> {[«50""»]|[$$>>> no previous crash info found in the tombstones]}
<Call 0x2298e 0x103e0> {[«50""»]|[$$>>> no previous crash info found in the tombstones]}
WriteConsoleStringCrLf(str : String)
<POP 22994-22998 StackAdj> Δ+54 {}
<POP 22998-229ca Naked> Σ0 ↓ →0x229d0 ←0x228e6 ←0x22938
<Pointer.fp 0x22998 <LVAR -0x014 @ 2(r) 4(r)>> Δ-4 {[@@-20]}
<Call 0x2299c 0x10304> {[@@-20]}
GetRtc() : TimeStamp
<MI 229a2 MOVE.L (A6-0x14),-(A7)> Δ-4 {[@@-20]|[4, '(A6-0x14)']}
<Call 0x229a6 0x22394> {[@@-20]|[4, '(A6-0x14)']}
<MI 229aa MOVE.L (A6-0x10),-(A7)> Δ-4 {[@@-20]|[4, '(A6-0x14)']|[4, '(A6-0x10)']}
<Call 0x229ae 0x22394> {[@@-20]|[4, '(A6-0x14)']|[4, '(A6-0x10)']}
<POP 229b2-229b4 StackAdj> Δ+4 {[@@-20]|[4, '(A6-0x14)']}
<MI 229b4 MOVE.L (A7+0x4),D0> {[@@-20]|[4, '(A6-0x14)']}
<MI 229b8 SUB.L (A7)+,D0> Δ+4 {[@@-20]}
<POP 229ba-229bc StackAdj> Δ+4 {}
<MI 229bc MOVE.L D0,(A6-0x8)> {}
<MI 229c0 MOVE.W (A6-0x14),D1> {}
<MI 229c4 CMP.W (A6-0x10),D1> {}
<MI 229c8 BCC 0x229d0> {}
<POP 229ca-229d0 Naked> Σ0 ↓
<MI 229ca SUBQ.L #0x1,D0> {}
<MI 229cc MOVE.L D0,(A6-0x8)> {}
<POP 229d0-229da Naked> Σ0 ↓ →0x22a28 ←0x22998
<MI 229d0 MOVE.L (A6-0x8),D0> {}
<MI 229d4 CMP.L (A6-0x4),D0> {}
<MI 229d8 BLT 0x22a28> {}
<POP 229da-22a28 Naked> Σ0 →0x22b64
<MI 229da MOVE.L #0x6,0x243b4> {}
<POP 229e4-229e6 StackAdj> Δ-2 {[-2-]}
<Call 0x229e6 0x105ce> {[-2-]}
ReadKeySwitch() : Bool
<MI 229ec MOVE.B (A7)+,0x243b2> Δ+2 {}
<MI 229f2 NEG.B 0x243b2> {}
<MI 229f8 ADDQ.B #0x1,0x243b2> {}
<MI 229fe MOVE.B 0x243af,D0> {}
<MI 22a04 LSL.B #0x4,D0> {}
<MI 22a06 LSR.B #0x7,D0> {}
<MI 22a08 AND.B D0,0x243b2> {}
<MI 22a0e MOVE.B 0x243af,D0> {}
<MI 22a14 LSL.B #0x5,D0> {}
<MI 22a16 LSR.B #0x7,D0> {}
<MI 22a18 AND.B D0,0x243b2> {}
<MI 22a1e MOVE.B #0x01,(A6+0x8)> {}
<MI 22a24 BRA 0x22b64> {}
<POP 22a28-22afa Naked> Σ0 Δ-92 ↓ ←0x229d0
<Blob 0x22a28 [40] @> Δ-40 {[«40""»]}
<Blob 0x22a3a [38] @> Δ-38 {[«40""»]|[«38""»]}
<POP 22a46-22a48 StackAdj> Δ-8 {[«40""»]|[«38""»]|[-8-]}
<Lit 0x22a48 39> {[«40""»]|[«38""»]|[-4-]|[$$*** The previous system crash occurred_]}
<MI 22a56 MOVE.L (A6-0x8),(A7)> {[«40""»]|[«38""»]|[-4-]|[4, '(A6-0x8)']}
<POP 22a54-22a56 StackAdj> Δ-8 {[«40""»]|[«38""»]|[-4-]|[4, '(A6-0x8)']|[-8-]}
<Call 0x22a5a 0x102e4> {[«40""»]|[«38""»]|[-4-]|[4, '(A6-0x8)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x22a60 38> {[«40""»]|[«38""»]|[-4-]|[4, '(A6-0x8)']|[-4-]|[$$ days ago but the AUTOBOOT_AFTER_CRASH]}
<Call 0x22a70 0x102d4> {[«40""»]|[«38""»]|[-4-]|[4, '(A6-0x8)']|[-4-]|[$$ days ago but the AUTOBOOT_AFTER_CRASH]}
StringCat3(a, b, c : String) : String
<POP 22a76-22a7a StackAdj> Δ+12 {[«40""»]|[«38""»]|[-4-]}
<Call 0x22a7a 0x103e0> {[«40""»]|[«38""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22a80-22a84 StackAdj> Δ+82 {}
<Blob 0x22a84 [24] @> Δ-24 {[«24""»]}
<Blob 0x22a90 [54] @> Δ-54 {[«24""»]|[«54""»]}
<POP 22aa2-22aa4 StackAdj> Δ-8 {[«24""»]|[«54""»]|[-8-]}
<Lit 0x22aa4 24> {[«24""»]|[«54""»]|[-4-]|[$$ file specifies that_]}
<MI 22ab2 MOVE.L (A6-0x4),(A7)> {[«24""»]|[«54""»]|[-4-]|[4, '(A6-0x4)']}
<POP 22ab0-22ab2 StackAdj> Δ-8 {[«24""»]|[«54""»]|[-4-]|[4, '(A6-0x4)']|[-8-]}
<Call 0x22ab6 0x102e4> {[«24""»]|[«54""»]|[-4-]|[4, '(A6-0x4)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x22abc 53> {[«24""»]|[«54""»]|[-4-]|[4, '(A6-0x4)']|[-4-]|[$$ days or more must elapse since the previous crash in]}
<Call 0x22acc 0x102d4> {[«24""»]|[«54""»]|[-4-]|[4, '(A6-0x4)']|[-4-]|[$$ days or more must elapse since the previous crash in]}
StringCat3(a, b, c : String) : String
<POP 22ad2-22ad6 StackAdj> Δ+12 {[«24""»]|[«54""»]|[-4-]}
<Call 0x22ad6 0x103e0> {[«24""»]|[«54""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22adc-22ae0 StackAdj> Δ+82 {}
<Blob 0x22ae0 [80] @> Δ-80 {[«80""»]}
<POP 22aec-22aee StackAdj> Δ-4 {[«80""»]|[-4-]}
<Pointer.sp 0x22aee 4> Δ-4 {[«80""»]|[-4-]|[^^4]}
<Const 0x22af2 0x1.2> Δ-2 {[«80""»]|[-4-]|[^^4]|[#1]}
<Const 0x22af6 0x50.2> Δ-2 {[«80""»]|[-4-]|[^^4]|[#1]|[#80]}
<POP 22afa-22b08 Naked> Σ-92 Δ+92 ↓ ←0x226e4
<Call 0x22afa 0x102c4> {[-92-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22afc-22afe StackAdj> Δ+8 {[-84-]}
<Call 0x22afe 0x103e0> {[-84-]}
WriteConsoleStringCrLf(str : String)
<POP 22b04-22b08 StackAdj> Δ+84 {}
<POP 22b08-22b64 Naked> Σ0 ↓ ←0x224e0 ←0x2257a ←0x22676
<MI 22b08 CLR.B 0x243b2> {}
<MI 22b0e CLR.B (A6+0x8)> {}
<Blob 0x22b12 [10] @> Δ-10 {[«10""»]}
<Blob 0x22b24 [4] @> Δ-4 {[«10""»]|[«4""»]}
<Blob 0x22b28 [4] @> Δ-4 {[«10""»]|[«4""»]|[«4""»]}
<Blob 0x22b2c [4] @> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 22b30-22b32 StackAdj> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x22b32 9> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]}
<POP 22b40-22b42 StackAdj> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[-4-]}
<Lit 0x22b42 12> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]}
<POP 22b50-22b52 StackAdj> Δ-2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]|[-2-]}
<POP 22b52-22b53 StackAdj> Δ+2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]}
<Const 0x22b53 0x1.2> Δ-2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]|[#1]}
<Pointer.fp 0x22b56 <LVAR -0x415 @>> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]|[#1]|[@@-1045]}
<Call 0x22b5a 0x103b0> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]|[#1]|[@@-1045]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 22b60-22b64 StackAdj> Δ+36 {}
<POP 22b64-22b6c Epilogue> Σ0 ←0x229da
@ 22b6c
<LVAR 0x008 1(r)>
<LVAR -0x001 @ 1(r)>
<LVAR -0x002 @ 1(r)>
<POP 22b6c-22da8 Body>
<POP 22b6c-22b82 Prologue> Σ0 ↓
<POP 22b82-22ba0 RegCacheLoad> Σ0 ↓
<POP 22ba0-22bae Naked> Σ0 ↓ →0x22d32
<MI 22ba0 MOVE.B 0x243af,D0> {}
<MI 22ba6 LSL.B #0x3,D0> {}
<MI 22ba8 LSR.B #0x7,D0> {}
<MI 22baa BEQ 0x22d32> {}
<POP 22bae-22bb8 Naked> Σ0 ↓ →0x22d32
<MI 22bae TST.B 0x243b1> {}
<MI 22bb4 BNE 0x22d32> {}
<POP 22bb8-22c18 Naked> Σ0 ↓ →0x22c2c
<MI 22bb8 MOVE.B #0x01,0x243b9> {}
<Call 0x22bbe 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x22bc4 0x10538> {}
IPC_Init(void)
<Const 0x22bca 0x1.2> Δ-2 {[#1]}
<Call 0x22bcc 0x10502> {[#1]}
IPC_PutBool(a : Bool)
<MI 22bd2 CLR.B (A7)> {[#1]}
<Call 0x22bd4 0x10502> {[#1]}
IPC_PutBool(a : Bool)
<POP 22bda-22bdb StackAdj> Δ+2 {}
<Const 0x22bdb 0x1.2> Δ-2 {[#1]}
<Call 0x22bdc 0x10502> {[#1]}
IPC_PutBool(a : Bool)
<POP 22be2-22be4 StackAdj> Δ+2 {}
<Call 0x22be4 0x10514> {}
IPC_PutEnd(void)
<Blob 0x22bea [10] @> Δ-10 {[«10""»]}
<POP 22bfa-22bfc StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x22bfc 9> {[«10""»]|[$$RUN_UDIAG]}
<Const 0x22c08 0x1.4> Δ-4 {[«10""»]|[$$RUN_UDIAG]|[##1]}
<Const 0x22c0c 0x1.2> Δ-2 {[«10""»]|[$$RUN_UDIAG]|[##1]|[#1]}
<Pointer.fp 0x22c0e <LVAR -0x001 @ 1(r)>> Δ-4 {[«10""»]|[$$RUN_UDIAG]|[##1]|[#1]|[@@-1]}
<Call 0x22c10 0x103b0> {[«10""»]|[$$RUN_UDIAG]|[##1]|[#1]|[@@-1]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 22c12-22c14 StackAdj> Δ+24 {}
<MI 22c14 TST.B (A6-0x1)> {}
<MI 22c16 BNE 0x22c2c> {}
<POP 22c18-22c2c Naked> Σ0 →0x22c30
<Call 0x22c18 0x10538> {}
IPC_Init(void)
<Pointer.fp 0x22c1e <LVAR -0x002 @ 1(r)>> Δ-4 {[@@-2]}
<Call 0x22c22 0x10526> {[@@-2]}
IPC_GetBool() : Bool
<POP 22c28-22c2a StackAdj> Δ+4 {}
<MI 22c2a BRA 0x22c30> {}
<POP 22c2c-22c30 Naked> Σ0 ↓ ←0x22bb8
<MI 22c2c CLR.B (A6-0x2)> {}
<POP 22c30-22c38 Naked> Σ0 ↓ →0x22cc6 ←0x22c18
<MI 22c30 TST.B (A6-0x2)> {}
<MI 22c34 BEQ 0x22cc6> {}
<POP 22c38-22c7c Naked> Σ0 ↓ →0x22cc4
<Blob 0x22c38 [10] @> Δ-10 {[«10""»]}
<Blob 0x22c48 [4] @> Δ-4 {[«10""»]|[«4""»]}
<Blob 0x22c4c [4] @> Δ-4 {[«10""»]|[«4""»]|[«4""»]}
<Blob 0x22c50 [4] @> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 22c54-22c56 StackAdj> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x22c56 9> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]}
<POP 22c60-22c62 StackAdj> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[-4-]}
<Lit 0x22c62 12> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]}
<POP 22c6c-22c6e StackAdj> Δ-2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]|[-2-]}
<POP 22c6e-22c6f StackAdj> Δ+2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]}
<Const 0x22c6f 0x1.2> Δ-2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]|[#1]}
<Pointer.fp 0x22c70 <LVAR -0x001 @ 1(r)>> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]|[#1]|[@@-1]}
<Call 0x22c72 0x103b0> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]|[#1]|[@@-1]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 22c74-22c76 StackAdj> Δ+36 {}
<MI 22c76 TST.B (A6+0x8)> {}
<MI 22c7a BEQ 0x22cc4> {}
<POP 22c7c-22cc4 Naked> Σ0 ↓
<Blob 0x22c7c [76] @> Δ-76 {[«76""»]}
<POP 22c88-22c8a StackAdj> Δ-4 {[«76""»]|[-4-]}
<Lit 0x22c8a 76> {[«76""»]|[$$>>> The Confidence Test passed but the system just crashed due to a possible]}
<Call 0x22c98 0x103e0> {[«76""»]|[$$>>> The Confidence Test passed but the system just crashed due to a possible]}
WriteConsoleStringCrLf(str : String)
<POP 22c9e-22ca0 StackAdj> Δ+80 {}
<Blob 0x22ca0 [80] @> Δ-80 {[«80""»]}
<POP 22cac-22cae StackAdj> Δ-4 {[«80""»]|[-4-]}
<Lit 0x22cae 80> {[«80""»]|[$$ hardware failure. The problem may be intermittent. Try to reboot the system.]}
<Call 0x22cba 0x103e0> {[«80""»]|[$$ hardware failure. The problem may be intermittent. Try to reboot the system.]}
WriteConsoleStringCrLf(str : String)
<POP 22cc0-22cc4 StackAdj> Δ+84 {}
<POP 22cc4-22cc6 Naked> Σ0 →0x22d30 ←0x22c38
<MI 22cc4 BRA 0x22d30> {}
<POP 22cc6-22d30 Naked> Σ0 ↓ ←0x22c30
<Blob 0x22cc6 [10] @> Δ-10 {[«10""»]}
<Blob 0x22cd6 [10] @> Δ-10 {[«10""»]|[«10""»]}
<POP 22ce2-22ce4 StackAdj> Δ-4 {[«10""»]|[«10""»]|[-4-]}
<Lit 0x22ce4 9> {[«10""»]|[«10""»]|[$$CRASHSAVE]}
<POP 22cee-22cf0 StackAdj> Δ-4 {[«10""»]|[«10""»]|[$$CRASHSAVE]|[-4-]}
<Lit 0x22cf0 10> {[«10""»]|[«10""»]|[$$CRASHSAVE]|[$$DUMP_UDIAG]}
<POP 22cfa-22cfc StackAdj> Δ-2 {[«10""»]|[«10""»]|[$$CRASHSAVE]|[$$DUMP_UDIAG]|[-2-]}
<POP 22cfc-22cfd StackAdj> Δ+2 {[«10""»]|[«10""»]|[$$CRASHSAVE]|[$$DUMP_UDIAG]}
<Const 0x22cfd 0x1.2> Δ-2 {[«10""»]|[«10""»]|[$$CRASHSAVE]|[$$DUMP_UDIAG]|[#1]}
<Pointer.fp 0x22cfe <LVAR -0x001 @ 1(r)>> Δ-4 {[«10""»]|[«10""»]|[$$CRASHSAVE]|[$$DUMP_UDIAG]|[#1]|[@@-1]}
<Call 0x22d00 0x103b0> {[«10""»]|[«10""»]|[$$CRASHSAVE]|[$$DUMP_UDIAG]|[#1]|[@@-1]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 22d02-22d03 StackAdj> Δ+34 ↓ {}
<Blob 0x22d03 [58] @> Δ-58 {[«58""»]}
<POP 22d12-22d14 StackAdj> Δ-4 {[«58""»]|[-4-]}
<Lit 0x22d14 57> {[«58""»]|[$$*** the Confidence Test failed: now running the FRU tests]}
<Call 0x22d22 0x103e0> {[«58""»]|[$$*** the Confidence Test failed: now running the FRU tests]}
WriteConsoleStringCrLf(str : String)
<POP 22d28-22d2c StackAdj> Δ+62 {}
<Call 0x22d2c 0x21f48> {}
<POP 22d30-22d32 Naked> Σ0 →0x22da0 ←0x22cc4
<MI 22d30 BRA 0x22da0> {}
<POP 22d32-22da0 Naked> Σ0 ↓ ←0x22ba0 ←0x22bae
<Blob 0x22d32 [40] @> Δ-40 {[«40""»]}
<POP 22d3e-22d40 StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x22d40 40> {[«40""»]|[$$>>> Automatic Crash Recovery is disabled]}
<Call 0x22d4e 0x103e0> {[«40""»]|[$$>>> Automatic Crash Recovery is disabled]}
WriteConsoleStringCrLf(str : String)
<POP 22d54-22d55 StackAdj> Δ+44 ↓ {}
<Blob 0x22d55 [10] @> Δ-10 {[«10""»]}
<Blob 0x22d66 [4] @> Δ-4 {[«10""»]|[«4""»]}
<Blob 0x22d6a [4] @> Δ-4 {[«10""»]|[«4""»]|[«4""»]}
<Blob 0x22d6e [4] @> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 22d72-22d74 StackAdj> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x22d74 9> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]}
<POP 22d7e-22d80 StackAdj> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[-4-]}
<Lit 0x22d80 12> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]}
<POP 22d8a-22d8c StackAdj> Δ-2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]|[-2-]}
<POP 22d8c-22d8d StackAdj> Δ+2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]}
<Const 0x22d8d 0x1.2> Δ-2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]|[#1]}
<Pointer.fp 0x22d8e <LVAR -0x001 @ 1(r)>> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]|[#1]|[@@-1]}
<Call 0x22d90 0x103b0> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[$$CRASHSAVE]|[$$RECOV_SCREEN]|[#1]|[@@-1]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 22d92-22d94 StackAdj> Δ+36 {}
<MI 22d94 CLR.B 0x243b2> {}
<MI 22d9a MOVE.L #0x01,0x243b4> {}
<POP 22da0-22da8 Epilogue> Σ0 ←0x22d30
@ 22da8
<LVAR 0x008 1(r)>
<LVAR -0x078 2(r)>
<LVAR -0x07a @ 2(w)>
<POP 22da8-22e48 Body>
<POP 22da8-22dbe Prologue> Σ0 ↓
<POP 22dbe-22dc0 RegCacheLoad> Σ0 ↓
<POP 22dc0-22e40 Naked> Σ0 ↓
<MI 22dc0 MOVE.B (A6+0x8),D0> {}
<MI 22dc4 EXTB.W D0> {}
<MI 22dc6 MOVE.W D0,(A6-0x7a)> {}
<MI 22dca CLR.W (A6-0x78)> {}
<Const 0x22dce 0x2.2> Δ-2 {[#2]}
<MI 22dd2 LEA.L (A6-0x7a),A0> {[#2]}
<MI 22dd6 MOVE.L A0,-(A7)> Δ-4 {[#2]|[4, 'A0']}
<Call 0x22dd8 0x103a8> {[#2]|[4, 'A0']}
Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer)
<POP 22dde-22ddf StackAdj> Δ+6 ↓ {}
<Blob 0x22ddf [56] @> Δ-56 {[«56""»]}
<POP 22df0-22df2 StackAdj> Δ-4 {[«56""»]|[-4-]}
<Lit 0x22df2 55> {[«56""»]|[$$The R1000 has exceeded maximum safe temperature limits.]}
<Call 0x22e04 0x103e0> {[«56""»]|[$$The R1000 has exceeded maximum safe temperature limits.]}
WriteConsoleStringCrLf(str : String)
<POP 22e0a-22e0e StackAdj> Δ+56 {[-4-]}
<POP 22e0e-22e0f StackAdj> Δ+4 {}
<Blob 0x22e0f [4] 0x243ba> Δ-4 {[«4»]}
<POP 22e14-22e16 StackAdj> Δ-4 {[«4»]|[-4-]}
<Lit 0x22e16> {[«4»]|[$$…]}
<Pointer.sp 0x22e16 4> Δ-4
<Const 0x22e1a 0x1.2> Δ-2
<Const 0x22e1c 0x4.2> Δ-2
<Call 0x22e20 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22e26-22e28 StackAdj> Δ+8
<Call 0x22e28 0x103d8> {[«4»]|[$$…]}
WriteConsoleString(str : String)
<POP 22e2e-22e30 StackAdj> Δ+8 {}
<MI 22e30 CLR.B 0x243b2> {}
<MI 22e36 MOVE.L #0x6,0x243b4> {}
<POP 22e40-22e48 Epilogue> Σ0
@ 22e48
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 1(r)>
<LVAR -0x07c 2(r)>
<LVAR -0x07e @ 2(w)>
<POP 22e48-22f9e Body>
<POP 22e48-22e5e Prologue> Σ0 ↓
<POP 22e5e-22e72 RegCacheLoad> Σ0 ↓
<POP 22e72-22e96 Naked> Σ0 ↓ →0x22ebe
<MI 22e72 MOVE.B (A6+0x8),D0> {}
<MI 22e76 EXTB.W D0> {}
<MI 22e78 MOVE.W D0,(A6-0x7e)> {}
<MI 22e7c CLR.W (A6-0x7c)> {}
<Const 0x22e80 0x2.2> Δ-2 {[#2]}
<MI 22e84 LEA.L (A6-0x7e),A0> {[#2]}
<MI 22e88 MOVE.L A0,-(A7)> Δ-4 {[#2]|[4, 'A0']}
<Call 0x22e8a 0x103a8> {[#2]|[4, 'A0']}
Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer)
<POP 22e90-22e92 StackAdj> Δ+6 {}
<MI 22e92 TST.W D0> {}
<MI 22e94 BNE 0x22ebe> {}
<POP 22e96-22ebe Naked> Σ0 →0x22ee4
<Blob 0x22e96 [40] @> Δ-40 {[«40""»]}
<POP 22ea2-22ea4 StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x22ea4 40> {[«40""»]|[$$Restarting system after loss of AC power]}
<Call 0x22eb2 0x103e0> {[«40""»]|[$$Restarting system after loss of AC power]}
WriteConsoleStringCrLf(str : String)
<POP 22eb8-22ebc StackAdj> Δ+44 {}
<MI 22ebc BRA 0x22ee4> {}
<POP 22ebe-22ee4 Naked> Σ0 ↓ ←0x22e72
<Blob 0x22ebe [60] @> Δ-60 {[«60""»]}
<POP 22eca-22ecc StackAdj> Δ-4 {[«60""»]|[-4-]}
<Lit 0x22ecc 60> {[«60""»]|[$$Restarting system after White Button Reset or DC power fault]}
<Call 0x22eda 0x103e0> {[«60""»]|[$$Restarting system after White Button Reset or DC power fault]}
WriteConsoleStringCrLf(str : String)
<POP 22ee0-22ee4 StackAdj> Δ+64 {}
<POP 22ee4-22f3a Naked> Σ0 ↓ →0x22f40 ←0x22e96
<Blob 0x22ee4 [4] 0x243ba> Δ-4 {[«4»]}
<POP 22eea-22eec StackAdj> Δ-4 {[«4»]|[-4-]}
<Lit 0x22eec> {[«4»]|[$$…]}
<Pointer.sp 0x22eec 4> Δ-4
<Const 0x22ef0 0x1.2> Δ-2
<Const 0x22ef2 0x4.2> Δ-2
<Call 0x22ef6 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22ef8-22efa StackAdj> Δ+8
<Call 0x22efa 0x103d8> {[«4»]|[$$…]}
WriteConsoleString(str : String)
<POP 22f00-22f02 StackAdj> Δ+6 {[-2-]}
<MI 22f02 CLR.B (A7)> {[-2-]}
<Call 0x22f04 0x21d2e> {[-2-]}
<POP 22f08-22f0a StackAdj> Δ+2 {}
<MI 22f0a MOVE.L #0x6,0x243b4> {}
<MI 22f10 CLR.B 0x243b2> {}
<POP 22f12-22f14 StackAdj> Δ-2 {[-2-]}
<Call 0x22f14 0x105ce> {[-2-]}
ReadKeySwitch() : Bool
<MI 22f1a MOVE.B (A7)+,D1> Δ+2 {}
<MI 22f1c NEG.B D1> {}
<MI 22f1e ADDQ.B #0x1,D1> {}
<MI 22f20 MOVE.B 0x243af,D2> {}
<MI 22f26 LSL.B #0x4,D2> {}
<MI 22f28 LSR.B #0x7,D2> {}
<MI 22f2a AND.B D1,D2> {}
<MI 22f2c MOVE.B 0x243af,D1> {}
<MI 22f32 LSL.B #0x5,D1> {}
<MI 22f34 LSR.B #0x7,D1> {}
<MI 22f36 AND.B D2,D1> {}
<MI 22f38 BEQ 0x22f40> {}
<POP 22f3a-22f3e Naked> Σ0 ↓ →0x22f40
<MI 22f3a TST.W D0> {}
<MI 22f3c BNE 0x22f40> {}
<POP 22f3e-22f40 Naked> Σ0 ↓
<MI 22f3e ADDQ.B #0x1,0x243b2> {}
<POP 22f40-22f88 Naked> Σ0 ↓ →0x22f92 ←0x22ee4 ←0x22f3a
<Call 0x22f40 0x10538> {}
IPC_Init(void)
<MI 22f46 CLR.B -(A7)> Δ-2 {[#0]}
<Call 0x22f48 0x10502> {[#0]}
IPC_PutBool(a : Bool)
<POP 22f4e-22f4f StackAdj> Δ+2 ↓ {}
<Blob 0x22f4f [10] @> Δ-10 {[«10""»]}
<POP 22f5e-22f60 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x22f60 9> {[«10""»]|[$$CONFIGURE]}
<Const 0x22f6e 0x1.4> Δ-4 {[«10""»]|[$$CONFIGURE]|[##1]}
<MI 22f72 CLR.B -(A7)> Δ-2 {[«10""»]|[$$CONFIGURE]|[##1]|[#0]}
<Pointer.fp 0x22f74 <LVAR -0x004 @ 1(r)>> Δ-4 {[«10""»]|[$$CONFIGURE]|[##1]|[#0]|[@@-4]}
<Call 0x22f78 0x103b0> {[«10""»]|[$$CONFIGURE]|[##1]|[#0]|[@@-4]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 22f7e-22f82 StackAdj> Δ+24 {}
<MI 22f82 TST.B (A6-0x4)> {}
<MI 22f86 BNE 0x22f92> {}
<POP 22f88-22f92 Naked> Σ0 →0x22f96
<MI 22f88 CLR.B -(A7)> Δ-2 {[#0]}
<Call 0x22f8a 0x22b6c> {[#0]}
<POP 22f8e-22f90 StackAdj> Δ+2 {}
<MI 22f90 BRA 0x22f96> {}
<POP 22f92-22f96 Naked> Σ0 ↓ ←0x22f40
<MI 22f92 CLR.B 0x243b2> {}
<MI 22f94 MOVE.L #0x01,0x243b4> {}
<POP 22f96-22f9e Epilogue> Σ0 ←0x22f88
@ 22f9e
<LVAR 0x008 1(r)>
<LVAR -0x078 2(r)>
<LVAR -0x07a @ 2(w)>
<POP 22f9e-230e6 Body>
<POP 22f9e-22fb4 Prologue> Σ0 ↓
<POP 22fb4-22fd2 RegCacheLoad> Σ0 ↓
<POP 22fd2-23002 Naked> Σ0 ↓ →0x23046
<MI 22fd2 MOVE.B (A6+0x8),D0> {}
<MI 22fd6 EXTB.W D0> {}
<MI 22fd8 MOVE.W D0,(A6-0x7a)> {}
<MI 22fdc CLR.W (A6-0x78)> {}
<Const 0x22fe0 0x2.2> Δ-2 {[#2]}
<MI 22fe2 LEA.L (A6-0x7a),A0> {[#2]}
<MI 22fe6 MOVE.L A0,-(A7)> Δ-4 {[#2]|[4, 'A0']}
<Call 0x22fe8 0x103a8> {[#2]|[4, 'A0']}
Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer)
<POP 22fee-22ff0 StackAdj> Δ+6 {}
<MI 22ff0 CLR.B 0x243b2> {}
<MI 22ff6 MOVE.L #0x6,0x243b4> {}
<MI 22ffc CMPI.B #0x20,D0> {}
<MI 23000 BNE 0x23046> {}
<POP 23002-23046 Naked> Σ0 →0x230de
<Blob 0x23002 [54] @> Δ-54 {[«54""»]}
<POP 2300e-23010 StackAdj> Δ-4 {[«54""»]|[-4-]}
<Lit 0x23010 54> {[«54""»]|[$$Restarting system after automatically updating EEPROMs]}
<Call 0x2301c 0x103e0> {[«54""»]|[$$Restarting system after automatically updating EEPROMs]}
WriteConsoleStringCrLf(str : String)
<POP 23022-23024 StackAdj> Δ+54 {[-4-]}
<POP 23024-23025 StackAdj> Δ+4 {}
<Blob 0x23025 [4] 0x243ba> Δ-4 {[«4»]}
<POP 23026-23028 StackAdj> Δ-4 {[«4»]|[-4-]}
<Lit 0x23028> {[«4»]|[$$…]}
<Pointer.sp 0x23028 4> Δ-4
<Const 0x2302c 0x1.2> Δ-2
<Const 0x2302e 0x4.2> Δ-2
<Call 0x23030 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23032-23034 StackAdj> Δ+8
<Call 0x23034 0x103d8> {[«4»]|[$$…]}
WriteConsoleString(str : String)
<POP 2303a-2303c StackAdj> Δ+8 {}
<MI 2303c MOVE.B #0x01,0x243b2> {}
<MI 23042 BRA 0x230de> {}
<POP 23046-2304c Naked> Σ0 ↓ →0x2308e ←0x22fd2
<MI 23046 CMPI.B #0x19,D0> {}
<MI 2304a BNE 0x2308e> {}
<POP 2304c-2308e Naked> Σ0 →0x230de
<Blob 0x2304c [64] @> Δ-64 {[«64""»]}
<POP 2305c-2305e StackAdj> Δ-4 {[«64""»]|[-4-]}
<Lit 0x2305e 63> {[«64""»]|[$$Restarting system after operator or program invoked crash (EPO)]}
<Call 0x2306c 0x103e0> {[«64""»]|[$$Restarting system after operator or program invoked crash (EPO)]}
WriteConsoleStringCrLf(str : String)
<POP 23072-23074 StackAdj> Δ+64 {[-4-]}
<POP 23074-23075 StackAdj> Δ+4 {}
<Blob 0x23075 [4] 0x243ba> Δ-4 {[«4»]}
<POP 23076-23078 StackAdj> Δ-4 {[«4»]|[-4-]}
<Lit 0x23078> {[«4»]|[$$…]}
<Pointer.sp 0x23078 4> Δ-4
<Const 0x2307c 0x1.2> Δ-2
<Const 0x2307e 0x4.2> Δ-2
<Call 0x23080 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23082-23084 StackAdj> Δ+8
<Call 0x23084 0x103d8> {[«4»]|[$$…]}
WriteConsoleString(str : String)
<POP 2308a-2308c StackAdj> Δ+8 {}
<MI 2308c BRA 0x230de> {}
<POP 2308e-230d0 Naked> Σ0 ↓ →0x230dc ←0x23046
<Blob 0x2308e [50] @> Δ-50 {[«50""»]}
<POP 2309a-2309c StackAdj> Δ-4 {[«50""»]|[-4-]}
<Lit 0x2309c 50> {[«50""»]|[$$Restarting system after operator console BREAK key]}
<Call 0x230a8 0x103e0> {[«50""»]|[$$Restarting system after operator console BREAK key]}
WriteConsoleStringCrLf(str : String)
<POP 230ae-230b0 StackAdj> Δ+50 {[-4-]}
<POP 230b0-230b1 StackAdj> Δ+4 {}
<Blob 0x230b1 [4] 0x243ba> Δ-4 {[«4»]}
<POP 230b2-230b4 StackAdj> Δ-4 {[«4»]|[-4-]}
<Lit 0x230b4> {[«4»]|[$$…]}
<Pointer.sp 0x230b4 4> Δ-4
<Const 0x230b8 0x1.2> Δ-2
<Const 0x230ba 0x4.2> Δ-2
<Call 0x230bc 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 230be-230c0 StackAdj> Δ+8
<Call 0x230c0 0x103d8> {[«4»]|[$$…]}
WriteConsoleString(str : String)
<POP 230c6-230c8 StackAdj> Δ+8 {}
<MI 230c8 TST.B 0x243b0> {}
<MI 230ce BEQ 0x230dc> {}
<POP 230d0-230dc Naked> Σ0 →0x230de
<Const 0x230d0 0x1.2> Δ-2 {[#1]}
<Call 0x230d2 0x21d2e> {[#1]}
<POP 230d6-230d8 StackAdj> Δ+2 {}
<MI 230d8 MOVE.L #0x02,0x243b4> {}
<MI 230da BRA 0x230de> {}
<POP 230dc-230de Naked> Σ0 ↓ ←0x2308e
<MI 230dc MOVE.L #0x01,0x243b4> {}
<POP 230de-230e6 Epilogue> Σ0 ←0x23002 ←0x2304c ←0x230d0
@ 230e6
<LVAR 0x008 1(r)>
<LVAR -0x002 @ 1(r)>
<POP 230e6-23158 Body>
<POP 230e6-230fc Prologue> Σ0 ↓
<POP 230fc-230fe RegCacheLoad> Σ0 ↓
<POP 230fe-23110 Naked> Σ0 ↓ →0x2311a
<Call 0x230fe 0x2163e> {}
<POP 23102-23104 StackAdj> Δ-4 {[-4-]}
<Call 0x23104 0x103f8> {[-4-]}
GetConsoleConfig() : Long
<MI 2310a MOVE.L (A7)+,D0> Δ+4 {}
<MI 2310c CMP.L #0x01,D0> {}
<MI 2310e BEQ 0x2311a> {}
<POP 23110-2311a Naked> Σ0 ↓
<MI 23110 MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x23114 0x2230e> {[2, '(A6+0x8)']}
<POP 23118-2311a StackAdj> Δ+2 {}
<POP 2311a-23136 Naked> Σ0 ↓ →0x23138 ←0x230fe
<MI 2311a MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Pointer.fp 0x2311e <LVAR -0x002 @ 1(r)>> Δ-4 {[2, '(A6+0x8)']|[@@-2]}
<Call 0x23122 0x2208a> {[2, '(A6+0x8)']|[@@-2]}
<POP 23126-23128 StackAdj> Δ+4 {[2, '(A6+0x8)']}
<POP 23128-23129 StackAdj> Δ+2 {}
<Const 0x23129 0x1.2> Δ-2 {[#1]}
<Call 0x2312a 0x21d2e> {[#1]}
<POP 2312e-23130 StackAdj> Δ+2 {}
<MI 23130 TST.B (A6-0x2)> {}
<MI 23134 BEQ 0x23138> {}
<POP 23136-23138 Naked> Σ0 →0x2314c
<MI 23136 BRA 0x2314c> {}
<POP 23138-23142 Naked> Σ0 ↓ →0x2314c ←0x2311a
<POP 23138-2313a StackAdj> Δ-2 {[-2-]}
<Call 0x2313a 0x22474> {[-2-]}
<MI 2313e TST.B (A7)+> Δ+2 {}
<MI 23140 BEQ 0x2314c> {}
<POP 23142-2314c Naked> Σ0 →0x23150
<Const 0x23142 0x1.2> Δ-2 {[#1]}
<Call 0x23144 0x22b6c> {[#1]}
<POP 23148-2314a StackAdj> Δ+2 {}
<MI 2314a BRA 0x23150> {}
<POP 2314c-23150 Naked> Σ0 ↓ ←0x23136 ←0x23138
<Call 0x2314c 0x21f48> {}
<POP 23150-23158 Epilogue> Σ0 ←0x23142
@ 23158
<LVAR 0x008 1(r)>
<LVAR -0x076 2(r)>
<LVAR -0x078 2(w)>
<LVAR -0x07a @ 2(w)>
<POP 23158-231ee Body>
<POP 23158-2316e Prologue> Σ0 ↓
<POP 2316e-23172 RegCacheLoad> Σ0 ↓
<POP 23172-231a2 Naked> Σ0 ↓ →0x231ac
<MI 23172 MOVE.W #0x03,(A6-0x7a)> {}
<MI 23176 MOVE.B (A6+0x8),D0> {}
<MI 2317a EXTB.W D0> {}
<MI 2317c MOVE.W D0,(A6-0x78)> {}
<MI 23180 CLR.W (A6-0x76)> {}
<Const 0x23184 0x3.2> Δ-2 {[#3]}
<MI 23186 LEA.L (A6-0x7a),A0> {[#3]}
<MI 2318a MOVE.L A0,-(A7)> Δ-4 {[#3]|[4, 'A0']}
<Call 0x2318c 0x103a8> {[#3]|[4, 'A0']}
Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer)
<POP 23192-23194 StackAdj> Δ+4 {[#3]}
<POP 23194-23195 StackAdj> Δ+2 {}
<Const 0x23195 0x1.2> Δ-2 {[#1]}
<Call 0x23196 0x21d2e> {[#1]}
<Call 0x2319a 0x22474> {[#1]}
<MI 2319e TST.B (A7)+> Δ+2 {}
<MI 231a0 BEQ 0x231ac> {}
<POP 231a2-231ac Naked> Σ0 →0x231e6
<MI 231a2 CLR.B -(A7)> Δ-2 {[#0]}
<Call 0x231a4 0x22b6c> {[#0]}
<POP 231a8-231aa StackAdj> Δ+2 {}
<MI 231aa BRA 0x231e6> {}
<POP 231ac-231e6 Naked> Σ0 ↓ ←0x23172
<MI 231ac CLR.B 0x243b2> {}
<MI 231b2 MOVE.L #0x2,0x243b4> {}
<Blob 0x231bc [32] @> Δ-32 {[«32""»]}
<POP 231c8-231ca StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x231ca 32> {[«32""»]|[$$>>> Please make a CRASHDUMP tape]}
<Call 0x231dc 0x103e0> {[«32""»]|[$$>>> Please make a CRASHDUMP tape]}
WriteConsoleStringCrLf(str : String)
<POP 231e2-231e6 StackAdj> Δ+36 {}
<POP 231e6-231ee Epilogue> Σ0 ←0x231a2
@ 231ee
<LVAR -0x078 2(r)>
<LVAR -0x07a 2(w)>
<LVAR -0x07c @ 2(w)>
<POP 231ee-2325e Body>
<POP 231ee-23204 Prologue> Σ0 ↓
<POP 23204-2320a RegCacheLoad> Σ0 ↓
<POP 2320a-23256 Naked> Σ0 ↓
<MI 2320a MOVE.W #0x4,(A6-0x7c)> {}
<MI 23210 MOVE.W #0x9,(A6-0x7a)> {}
<MI 23216 CLR.W (A6-0x78)> {}
<Const 0x2321a 0x3.2> Δ-2 {[#3]}
<MI 2321e LEA.L (A6-0x7c),A0> {[#3]}
<MI 23222 MOVE.L A0,-(A7)> Δ-4 {[#3]|[4, 'A0']}
<Call 0x23224 0x103a8> {[#3]|[4, 'A0']}
Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer)
<POP 2322a-2322c StackAdj> Δ+4 {[#3]}
<MI 2322c CLR.B (A7)> {[#3]}
<Call 0x2322e 0x21d2e> {[#3]}
<Call 0x23232 0x105ce> {[#3]}
ReadKeySwitch() : Bool
<MI 23238 MOVE.B (A7)+,0x243b2> Δ+2 {}
<MI 2323a NEG.B 0x243b2> {}
<MI 2323c ADDQ.B #0x1,0x243b2> {}
<MI 2323e MOVE.B 0x243af,D0> {}
<MI 23244 LSL.B #0x4,D0> {}
<MI 23246 LSR.B #0x7,D0> {}
<MI 23248 AND.B D0,0x243b2> {}
<MI 2324a MOVE.B 0x243af,D0> {}
<MI 23250 LSL.B #0x5,D0> {}
<MI 23252 LSR.B #0x7,D0> {}
<MI 23254 AND.B D0,0x243b2> {}
<POP 23256-2325e Epilogue> Σ0
@ 2325e
<LVAR 0x008 1(r)>
<POP 2325e-2330c Body> Δ+2
<POP 2325e-23274 Prologue> Σ0 ↓
<POP 23274-232bc Naked> Σ0 →0x232d8 →0x232da →0x232dc →0x232e4 →0x232e6 →0x232e8 →0x232ea →0x232ec →0x232ee →0x232f0 →0x232f6 →0x232f8 →0x232fa →0x232fc
<MI 23274 MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<Call 0x23278 0x2230e> {[2, '(A6+0x8)']}
<POP 2327c-2327e StackAdj> Δ+2 {}
<Blob 0x2327e [4] 0x243ba> Δ-4 {[«4»]}
<POP 23284-23286 StackAdj> Δ-4 {[«4»]|[-4-]}
<Lit 0x23286> {[«4»]|[$$…]}
<Pointer.sp 0x23286 4> Δ-4
<Const 0x2328a 0x1.2> Δ-2
<Const 0x2328e 0x4.2> Δ-2
<Call 0x23292 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23298-2329a StackAdj> Δ+8
<Call 0x2329a 0x103d8> {[«4»]|[$$…]}
WriteConsoleString(str : String)
<POP 232a0-232a2 StackAdj> Δ+8 {}
<MI 232a2 MOVE.B (A6+0x8),D0> {}
<MI 232a6 EXTB.W D0> {}
<MI 232a8 MOVE.W D0,D1> {}
<POP 0x232aa LimitCheck 0x0 ≤ D1 ≤ 0xd> {}
<MI 232b2 ADD.W D1,D1> {}
<MI 232b4 SWITCH D1.W> {}
<POP 232d8-232da Naked> Σ0 →0x23304 ←0x23274
<MI 232d8 BRA 0x23304> {}
<POP 232da-232dc Naked> Σ0 →0x232fc ←0x23274
<MI 232da BRA 0x232fc> {}
<POP 232dc-232e4 Naked> Σ0 Δ-2 →0x23302 ←0x23274 ←0x232e6 ←0x232e8 ←0x232ea ←0x232f8 ←0x232fa
<MI 232dc MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x232de 0x230e6> {[2, 'D0']}
<MI 232e2 BRA 0x23302> {[2, 'D0']}
<POP 232e4-232e6 Naked> Σ0 →0x232fc ←0x23274
<MI 232e4 BRA 0x232fc> {}
<POP 232e6-232e8 Naked> Σ0 →0x232dc ←0x23274
<MI 232e6 BRA 0x232dc> {}
<POP 232e8-232ea Naked> Σ0 →0x232dc ←0x23274
<MI 232e8 BRA 0x232dc> {}
<POP 232ea-232ec Naked> Σ0 →0x232dc ←0x23274
<MI 232ea BRA 0x232dc> {}
<POP 232ec-232ee Naked> Σ0 →0x232fc ←0x23274
<MI 232ec BRA 0x232fc> {}
<POP 232ee-232f0 Naked> Σ0 →0x232fc ←0x23274
<MI 232ee BRA 0x232fc> {}
<POP 232f0-232f6 Naked> Σ0 →0x23304 ←0x23274
<Call 0x232f0 0x231ee> {}
<MI 232f4 BRA 0x23304> {}
<POP 232f6-232f8 Naked> Σ0 →0x232fc ←0x23274
<MI 232f6 BRA 0x232fc> {}
<POP 232f8-232fa Naked> Σ0 →0x232dc ←0x23274
<MI 232f8 BRA 0x232dc> {}
<POP 232fa-232fc Naked> Σ0 →0x232dc ←0x23274
<MI 232fa BRA 0x232dc> {}
<POP 232fc-23302 Naked> Σ0 Δ-2 ↓ ←0x23274 ←0x232da ←0x232e4 ←0x232ec ←0x232ee ←0x232f6
<MI 232fc MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x232fe 0x23158> {[2, 'D0']}
<POP 23302-23304 Naked> Σ-2 Δ+2 ↓ ←0x232dc
<POP 23302-23304 StackAdj> Δ+2 {}
<POP 23304-2330c Epilogue> Σ0 ←0x232d8 ←0x232f0
@ 2330c
<LVAR 0x012 @ 4(r)>
<LVAR 0x00e @ 4(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 2330c-2346c Body>
<POP 2330c-23322 Prologue> Σ0 ↓
<POP 23322-23340 RegCacheLoad> Σ0 ↓
<POP 23340-233be Naked> Σ0 →0x233d4 →0x233d4 →0x233d4 →0x23428 →0x23428 →0x233e6 →0x23428 →0x233e6 →0x23428 →0x233e6 →0x233e6
<POP 23340-23342 StackAdj> Δ-4 {[-4-]}
<MI 23342 MOVE.L (A6+0x12),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x12)']}
<Call 0x23344 0x102cc> {[-4-]|[4, '(A6+0x12)']}
StringDup(a : String) : String
<POP 23346-23348 StackAdj> Δ+4 {[-4-]}
<Call 0x23348 0x103e0> {[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2334e-23350 StackAdj> Δ+2 {[-2-]}
<POP 23350-23351 StackAdj> Δ+2 {}
<Blob 0x23351 [2] @> Δ-2 {[«2""»]}
<POP 23354-23356 StackAdj> Δ-4 {[«2""»]|[-4-]}
<Lit 0x23356 2> {[«2""»]|[$$ _]}
<Call 0x23366 0x103d8> {[«2""»]|[$$ _]}
WriteConsoleString(str : String)
<POP 2336c-2336e StackAdj> Δ+2 {[«2""»]|[-2-]}
<MI 2336e MOVE.L (A6+0xe),-(A7)> Δ-4 {[«2""»]|[-2-]|[4, '(A6+0xe)']}
<Call 0x23370 0x102cc> {[«2""»]|[-2-]|[4, '(A6+0xe)']}
StringDup(a : String) : String
<MI 23372 MOVE.L (A6+0xa),(A7)> {[«2""»]|[-2-]|[4, '(A6+0xa)']}
<Call 0x23376 0x10450> {[«2""»]|[-2-]|[4, '(A6+0xa)']}
FS_10450(&, &)
<POP 2337c-2337e StackAdj> Δ+4 {[«2""»]|[-2-]}
<POP 2337e-2337f StackAdj> Δ+4 {}
<Blob 0x2337f [4] 0x243ba> Δ-4 {[«4»]}
<POP 23384-23386 StackAdj> Δ-4 {[«4»]|[-4-]}
<Lit 0x23386> {[«4»]|[$$…]}
<Pointer.sp 0x23386 4> Δ-4
<Const 0x2338a 0x1.2> Δ-2
<Const 0x2338c 0x4.2> Δ-2
<Call 0x23390 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23396-23398 StackAdj> Δ+8
<Call 0x23398 0x103d8> {[«4»]|[$$…]}
WriteConsoleString(str : String)
<POP 2339e-233a0 StackAdj> Δ+8 {}
<MI 233a0 MOVE.L #0x6,0x243b4> {}
<MI 233a6 MOVE.B (A6+0x8),D0> {}
<MI 233aa EXTB.W D0> {}
<POP 0x233ac LimitCheck 0x0 ≤ D0 ≤ 0xa> {}
<MI 233b4 ADD.W D0,D0> {}
<MI 233b6 SWITCH D0.W> {}
<POP 233d4-233d8 Naked> Σ0 ↓ →0x233e2 ←0x23340 ←0x23340 ←0x23340
<MI 233d4 TST.B 0x243b0> {}
<MI 233d6 BEQ 0x233e2> {}
<POP 233d8-233e2 Naked> Σ0 →0x233e4
<MI 233d8 CLR.B -(A7)> Δ-2 {[#0]}
<Call 0x233da 0x21d2e> {[#0]}
<POP 233de-233e0 StackAdj> Δ+2 {}
<MI 233e0 BRA 0x233e4> {}
<POP 233e2-233e4 Naked> Σ0 ↓ ←0x233d4
<MI 233e2 MOVE.L #0x01,0x243b4> {}
<POP 233e4-233e6 Naked> Σ0 →0x23450 ←0x233d8
<MI 233e4 BRA 0x23450> {}
<POP 233e6-233f8 Naked> Σ0 ↓ →0x23416 ←0x23340 ←0x23340 ←0x23340 ←0x23340
<Call 0x233e6 0x2163e> {}
<POP 233ea-233ec StackAdj> Δ-4 {[-4-]}
<Call 0x233ec 0x103f8> {[-4-]}
GetConsoleConfig() : Long
<MI 233f2 MOVE.L (A7)+,D0> Δ+4 {}
<MI 233f4 CMP.L #0x01,D0> {}
<MI 233f6 BEQ 0x23416> {}
<POP 233f8-23416 Naked> Σ0 ↓
<POP 233f8-233fa StackAdj> Δ-4 {[-4-]}
<MI 233fa MOVE.L (A6+0x12),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x12)']}
<Call 0x233fc 0x102cc> {[-4-]|[4, '(A6+0x12)']}
StringDup(a : String) : String
<POP 233fe-23400 StackAdj> Δ+4 {[-4-]}
<Call 0x23400 0x103e0> {[-4-]}
WriteConsoleStringCrLf(str : String)
<MI 23406 MOVE.L (A6+0xe),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xe)']}
<Call 0x23408 0x102cc> {[-4-]|[4, '(A6+0xe)']}
StringDup(a : String) : String
<MI 2340a MOVE.L (A6+0xa),(A7)> {[-4-]|[4, '(A6+0xa)']}
<Call 0x2340e 0x10450> {[-4-]|[4, '(A6+0xa)']}
FS_10450(&, &)
<POP 23414-23416 StackAdj> Δ+8 {}
<POP 23416-2341a Naked> Σ0 ↓ →0x23424 ←0x233e6
<MI 23416 TST.B 0x243b0> {}
<MI 23418 BEQ 0x23424> {}
<POP 2341a-23424 Naked> Σ0 →0x23426
<MI 2341a CLR.B -(A7)> Δ-2 {[#0]}
<Call 0x2341c 0x21d2e> {[#0]}
<POP 23420-23422 StackAdj> Δ+2 {}
<MI 23422 BRA 0x23426> {}
<POP 23424-23426 Naked> Σ0 ↓ ←0x23416
<MI 23424 MOVE.L #0x01,0x243b4> {}
<POP 23426-23428 Naked> Σ0 →0x23450 ←0x2341a
<MI 23426 BRA 0x23450> {}
<POP 23428-2342c Naked> Σ0 ↓ →0x2344e ←0x23340 ←0x23340 ←0x23340 ←0x23340
<MI 23428 TST.B 0x243b0> {}
<MI 2342a BEQ 0x2344e> {}
<POP 2342c-2343a Naked> Σ0 ↓ →0x23444
<Const 0x2342c 0x1.2> Δ-2 {[#1]}
<Call 0x2342e 0x21d2e> {[#1]}
<Call 0x23432 0x22474> {[#1]}
<MI 23436 TST.B (A7)+> Δ+2 {}
<MI 23438 BEQ 0x23444> {}
<POP 2343a-23444 Naked> Σ0 →0x2344c
<MI 2343a CLR.B -(A7)> Δ-2 {[#0]}
<Call 0x2343c 0x22b6c> {[#0]}
<POP 23440-23442 StackAdj> Δ+2 {}
<MI 23442 BRA 0x2344c> {}
<POP 23444-2344c Naked> Σ0 ↓ ←0x2342c
<MI 23444 CLR.B 0x243b2> {}
<MI 2344a MOVE.L #0x02,0x243b4> {}
<POP 2344c-2344e Naked> Σ0 →0x23450 ←0x2343a
<MI 2344c BRA 0x23450> {}
<POP 2344e-23450 Naked> Σ0 ↓ ←0x23428
<MI 2344e MOVE.L #0x01,0x243b4> {}
<POP 23450-23464 Naked> Σ0 ↓ ←0x233e4 ←0x23426 ←0x2344c
<Pointer.fp 0x23450 <LVAR 0x012 @ 4(r)>> Δ-4 {[@@18]}
<Call 0x23452 0x102bc> {[@@18]}
FreeString(VAR a : String)
<POP 23458-2345a StackAdj> Δ+4 {}
<Pointer.fp 0x2345a <LVAR 0x00e @ 4(r)>> Δ-4 {[@@14]}
<Call 0x2345c 0x102bc> {[@@14]}
FreeString(VAR a : String)
<POP 23462-23464 StackAdj> Δ+4 {}
<POP 23464-2346c Epilogue> Σ0
@ 2346c
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 4(r)>
<LVAR -0x07e @ 2(w)>
<POP 2346c-2354a Body>
<POP 2346c-23482 Prologue> Σ0 ↓
<POP 23482-2348c RegCacheLoad> Σ0 ↓
<POP 2348c-23542 Naked> Σ0 ↓
<Const 0x2348c 0xfc08.4> Δ-4 {[##64520]}
<MI 23492 LEA.L (A6-0x4),A0> {[##64520]}
<MI 23496 MOVE.L A0,-(A7)> Δ-4 {[##64520]|[4, 'A0']}
<Const 0x23498 0x4.2> Δ-2 {[##64520]|[4, 'A0']|[#4]}
<Call 0x2349a 0x10238> {[##64520]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 234a0-234a4 StackAdj> Δ+10 {}
<MI 234a4 MOVE.L (A6+0xa),D0> {}
<POP 0x234a8 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 234b2 MOVE.W D0,(A6-0x7e)> {}
<Const 0x234b6 0x4.2> Δ-2 {[#4]}
<MI 234b8 LEA.L (A6-0x7e),A0> {[#4]}
<MI 234bc MOVE.L A0,-(A7)> Δ-4 {[#4]|[4, 'A0']}
<Call 0x234be 0x103a8> {[#4]|[4, 'A0']}
Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer)
<POP 234c4-234c6 StackAdj> Δ+6 {}
<Blob 0x234c6 [42] @> Δ-42 {[«42""»]}
<POP 234d2-234d4 StackAdj> Δ-4 {[«42""»]|[-4-]}
<POP 234d4-234d5 StackAdj> Δ+2 {[«42""»]|[-2-]}
<Blob 0x234d5 [2] @> Δ-2 {[«42""»]|[-2-]|[«2""»]}
<MI 234d8 MOVE.B 0x20fd7,(A7+0x1)> {[«42""»]|[-2-]|[«2""»]}
<MI 234de MOVE.B 0x20fd8,(A7+0x2)> {[«42""»]|[-2-]|[«2""»]}
<Blob 0x234e4 [18] @> Δ-18 {[«42""»]|[-2-]|[«2""»]|[«18""»]}
<POP 234f0-234f2 StackAdj> Δ-8 {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-8-]}
<Lit 0x234f2 42> {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[$$Restaring system after IOP Kernel crash @_]}
<MI 234fe MOVE.L (A6-0x4),(A7)> {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[4, '(A6-0x4)']}
<POP 234fc-234fe StackAdj> Δ-8 {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[4, '(A6-0x4)']|[-8-]}
<Const 0x23502 0x5.4> Δ-4 {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[##5]}
<Call 0x23506 0x102e8> {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[4, '(A6-0x4)']|[-8-]|[##5]}
Long2HexString(val : Long; ndig : Long) : String
<POP 2350c-2350e StackAdj> Δ+4 {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[4, '(A6-0x4)']|[-8-]}
<Lit 0x2350e> {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[4, '(A6-0x4)']|[-4-]|[$$…]}
<Pointer.sp 0x2350e 34> Δ-4
<Const 0x23512 0x1.2> Δ-2
<Const 0x23514 0x3.2> Δ-2
<Call 0x23518 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2351a-2351c StackAdj> Δ+8
<Call 0x2351c 0x102d4> {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[4, '(A6-0x4)']|[-4-]|[$$…]}
StringCat3(a, b, c : String) : String
<POP 23522-23524 StackAdj> Δ+8 {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[4, '(A6-0x4)']}
<Lit 0x23524 18> {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[$$IOP_PANICS.ERRMESS]}
<POP 23530-23532 StackAdj> Δ-4 {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[$$IOP_PANICS.ERRMESS]|[-4-]}
<MI 23532 MOVE.L (A6+0xa),(A7)> {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[$$IOP_PANICS.ERRMESS]|[4, '(A6+0xa)']}
<MI 23536 MOVE.B (A6+0x8),-(A7)> Δ-2 {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[$$IOP_PANICS.ERRMESS]|[4, '(A6+0xa)']|[2, '(A6+0x8)']}
<Call 0x2353a 0x2330c> {[«42""»]|[-2-]|[«2""»]|[«18""»]|[-4-]|[$$IOP_PANICS.ERRMESS]|[4, '(A6+0xa)']|[2, '(A6+0x8)']}
<POP 2353e-23542 StackAdj> Δ+78 {}
<POP 23542-2354a Epilogue> Σ0
@ 2354a
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x07a 2(r)>
<LVAR -0x07c @ 2(w)>
<POP 2354a-235d8 Body>
<POP 2354a-23560 Prologue> Σ0 ↓
<POP 23560-23562 RegCacheLoad> Σ0 ↓
<POP 23562-235d0 Naked> Σ0 ↓
<MI 23562 MOVE.B (A6+0xa),D0> {}
<MI 23566 EXTB.W D0> {}
<MI 23568 MOVE.W D0,(A6-0x7c)> {}
<MI 2356c CLR.W (A6-0x7a)> {}
<Const 0x23570 0x2.2> Δ-2 {[#2]}
<MI 23574 LEA.L (A6-0x7c),A0> {[#2]}
<MI 23578 MOVE.L A0,-(A7)> Δ-4 {[#2]|[4, 'A0']}
<Call 0x2357a 0x103a8> {[#2]|[4, 'A0']}
Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer)
<POP 23580-23582 StackAdj> Δ+6 {}
<Blob 0x23582 [52] @> Δ-52 {[«52""»]}
<Blob 0x2358e [18] @> Δ-18 {[«52""»]|[«18""»]}
<POP 2359a-2359c StackAdj> Δ-4 {[«52""»]|[«18""»]|[-4-]}
<Lit 0x2359c 52> {[«52""»]|[«18""»]|[$$Restaring system after IOA reboot request, reason =>]}
<POP 235ac-235ae StackAdj> Δ-4 {[«52""»]|[«18""»]|[$$Restaring system after IOA reboot request, reason =>]|[-4-]}
<Lit 0x235ae 18> {[«52""»]|[«18""»]|[$$Restaring system after IOA reboot request, reason =>]|[$$IOA_PANICS.ERRMESS]}
<MI 235c0 EXTW.L D0> {[«52""»]|[«18""»]|[$$Restaring system after IOA reboot request, reason =>]|[$$IOA_PANICS.ERRMESS]}
<MI 235c2 MOVE.L D0,-(A7)> Δ-4 {[«52""»]|[«18""»]|[$$Restaring system after IOA reboot request, reason =>]|[$$IOA_PANICS.ERRMESS]|[4, 'D0']}
<MI 235c4 MOVE.B (A6+0x8),-(A7)> Δ-2 {[«52""»]|[«18""»]|[$$Restaring system after IOA reboot request, reason =>]|[$$IOA_PANICS.ERRMESS]|[4, 'D0']|[2, '(A6+0x8)']}
<Call 0x235c8 0x2330c> {[«52""»]|[«18""»]|[$$Restaring system after IOA reboot request, reason =>]|[$$IOA_PANICS.ERRMESS]|[4, 'D0']|[2, '(A6+0x8)']}
<POP 235cc-235d0 StackAdj> Δ+84 {}
<POP 235d0-235d8 Epilogue> Σ0
@ 235d8
<POP 235d8-23658 Body>
<POP 235d8-235ee Prologue> Σ0 ↓
<POP 235ee-235f6 Naked> Σ0 ↓ →0x23608
<MI 235ee TST.B 0x243b0> {}
<MI 235f4 BNE 0x23608> {}
<POP 235f6-23608 Naked> Σ0 →0x23650
<Const 0x235f6 0x5.2> Δ-2 {[#5]}
<Const 0x235fa 0x2.2> Δ-2 {[#5]|[#2]}
<Call 0x235fe 0x1048a> {[#5]|[#2]}
DiProcCmd(board : Byte; cmd : Byte)
<POP 23604-23606 StackAdj> Δ+4 {}
<MI 23606 BRA 0x23650> {}
<POP 23608-23628 Naked> Σ0 ↓ ←0x235ee
<Call 0x23608 0x23f4a> {}
exp_FREEZE_WORLD.FIU()
<Call 0x2360e 0x2406c> {}
exp_MF.IOC()
<Call 0x23614 0x23fc8> {}
exp_MF.VAL()
<Call 0x2361a 0x23fb4> {}
exp_MF.TYP()
<Call 0x23620 0x23f68> {}
exp_RESET.SEQ()
<MI 23626 MOVEQ.L #0x0c,D7> {}
<POP 23628-23638 Naked> Σ0 ↓ →0x23642 ←0x23642
<POP 23628-2362a StackAdj> Δ-2 {[-2-]}
<MI 2362a MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x2362c 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 23632-23634 StackAdj> Δ+2 {[-2-]}
<MI 23634 TST.B (A7)+> Δ+2 {}
<MI 23636 BEQ 0x23642> {}
<POP 23638-23642 Naked> Σ0 ↓
<MI 23638 MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x2363a 0x23fe8> {[2, 'D7']}
<POP 23640-23642 StackAdj> Δ+2 {}
<POP 23642-2364a Naked> Σ0 ↓ →0x23628 ←0x23628
<MI 23642 ADDQ.B #0x1,D7> {}
<MI 23644 CMPI.B #0x0f,D7> {}
<MI 23648 BLE 0x23628> {}
<POP 2364a-23650 Naked> Σ0 ↓
<Call 0x2364a 0x23f36> {}
exp_MF.FIU()
<POP 23650-23658 Epilogue> Σ0 ←0x235f6
@ 23658
<LVAR 0x008 4(r)>
<LVAR -0x006 1(r)>
<LVAR -0x007 @ 1(r)>
<LVAR -0x008 @ 1(r)>
<LVAR -0x009 @ 1(r)>
<LVAR -0x00a @>
<LVAR -0x00b @ 1(r)>
<LVAR -0x00c @>
<POP 23658-237be Body>
<POP 23658-2366e Prologue> Σ0 ↓
<POP 2366e-2367c RegCacheLoad> Σ0 ↓
<POP 2367c-2368a Naked> Σ0 ↓ →0x2368e
<MI 2367c CLR.B (A6-0x8)> {}
<MI 2367e MOVEA.L (A6+0x8),A0> {}
<MI 23680 CLR.B (A0)> {}
<MI 23682 TST.B 0x243b0> {}
<MI 23688 BNE 0x2368e> {}
<POP 2368a-2368e Naked> Σ0 →0x237b6
<MI 2368a BRA 0x237b6> {}
<POP 2368e-2369e Naked> Σ0 ↓ →0x2373a ←0x2367c
<Pointer.fp 0x2368e <LVAR -0x008 @ 1(r)>> Δ-4 {[@@-8]}
<Call 0x23690 0x23f9e> {[@@-8]}
exp_HALT.SEQ(&Fr)
<POP 23696-23698 StackAdj> Δ+4 {}
<MI 23698 TST.B (A6-0x8)> {}
<MI 2369a BEQ 0x2373a> {}
<POP 2369e-236ca Naked> Σ0 ↓ →0x23732
<Pointer.fp 0x2369e <LVAR -0x007 @ 1(r)>> Δ-4 {[@@-7]}
<Call 0x236a2 0x23f7e> {[@@-7]}
exp_READ_CUR_UADR.SEQ(&Sr_2)
<POP 236a8-236aa StackAdj> Δ+4 {}
<MI 236aa CLR.L D0> {}
<MI 236ac MOVE.B (A6-0x7),D0> {}
<MI 236b0 ASL.W #0x8,D0> {}
<MI 236b2 CLR.L D1> {}
<MI 236b4 MOVE.B (A6-0x6),D1> {}
<MI 236b8 ADD.W D0,D1> {}
<MI 236ba EXTW.L D1> {}
<MI 236bc MOVE.L D1,D6> {}
<MI 236be MOVE.L D6,D0> {}
<MI 236c0 SUBI.L #0x00000200,D0> {}
<MI 236c6 CMP.L #0x09,D0> {}
<MI 236c8 BHI 0x23732> {}
<POP 236ca-236d4 Naked> Σ0 →0x236e8 →0x236f0 →0x236f8 →0x23700 →0x23708 →0x23710 →0x23718 →0x2371e →0x23724 →0x2372a
<MI 236ca ADD.W D0,D0> {}
<MI 236cc SWITCH D0.W> {}
<POP 236e8-236f0 Naked> Σ0 →0x23738 ←0x236ca
<MI 236e8 MOVEA.L (A6+0x8),A0> {}
<MI 236ea MOVE.B #0x01,(A0)> {}
<MI 236ee BRA 0x23738> {}
<POP 236f0-236f8 Naked> Σ0 →0x23738 ←0x236ca
<MI 236f0 MOVEA.L (A6+0x8),A0> {}
<MI 236f2 MOVE.B #0x02,(A0)> {}
<MI 236f6 BRA 0x23738> {}
<POP 236f8-23700 Naked> Σ0 →0x23738 ←0x236ca
<MI 236f8 MOVEA.L (A6+0x8),A0> {}
<MI 236fa MOVE.B #0x03,(A0)> {}
<MI 236fe BRA 0x23738> {}
<POP 23700-23708 Naked> Σ0 →0x23738 ←0x236ca
<MI 23700 MOVEA.L (A6+0x8),A0> {}
<MI 23702 MOVE.B #0x04,(A0)> {}
<MI 23706 BRA 0x23738> {}
<POP 23708-23710 Naked> Σ0 →0x23738 ←0x236ca
<MI 23708 MOVEA.L (A6+0x8),A0> {}
<MI 2370a MOVE.B #0x05,(A0)> {}
<MI 2370e BRA 0x23738> {}
<POP 23710-23718 Naked> Σ0 →0x23738 ←0x236ca
<MI 23710 MOVEA.L (A6+0x8),A0> {}
<MI 23712 MOVE.B #0x06,(A0)> {}
<MI 23716 BRA 0x23738> {}
<POP 23718-2371e Naked> Σ0 →0x23738 ←0x236ca
<MI 23718 MOVEA.L (A6+0x8),A0> {}
<MI 2371a MOVE.B #0x07,(A0)> {}
<MI 2371c BRA 0x23738> {}
<POP 2371e-23724 Naked> Σ0 →0x23738 ←0x236ca
<MI 2371e MOVEA.L (A6+0x8),A0> {}
<MI 23720 MOVE.B #0x08,(A0)> {}
<MI 23722 BRA 0x23738> {}
<POP 23724-2372a Naked> Σ0 →0x23738 ←0x236ca
<MI 23724 MOVEA.L (A6+0x8),A0> {}
<MI 23726 MOVE.B #0x09,(A0)> {}
<MI 23728 BRA 0x23738> {}
<POP 2372a-23732 Naked> Σ0 →0x23738 ←0x236ca
<MI 2372a MOVEA.L (A6+0x8),A0> {}
<MI 2372c MOVE.B #0x0a,(A0)> {}
<MI 23730 BRA 0x23738> {}
<POP 23732-23738 Naked> Σ0 ↓ ←0x2369e
<MI 23732 MOVEA.L (A6+0x8),A0> {}
<MI 23734 MOVE.B #0x0d,(A0)> {}
<POP 23738-2373a Naked> Σ0 →0x237b6 ←0x236e8 ←0x236f0 ←0x236f8 ←0x23700 ←0x23708 ←0x23710 ←0x23718 ←0x2371e ←0x23724 ←0x2372a
<MI 23738 BRA 0x237b6> {}
<POP 2373a-2373c Naked> Σ0 ↓ ←0x2368e
<MI 2373a MOVEQ.L #0x00,D7> {}
<POP 2373c-23758 Naked> Σ0 ↓ →0x23784 ←0x23784
<POP 0x2373c LimitCheck 0x0 ≤ D7 ≤ 0x7> {}
<POP 23742-23744 StackAdj> Δ-2 {[-2-]}
<MI 23744 LEA.L 0x215a7,A0> {[-2-]}
<MI 23748 MOVE.B (A0+D7.L),-(A7)> Δ-2 {[-2-]|[2, '(A0+D7.L)']}
<Call 0x2374c 0x104c0> {[-2-]|[2, '(A0+D7.L)']}
HasBoard(diproc_addr: Byte) : Byte
<POP 23752-23754 StackAdj> Δ+2 {[-2-]}
<MI 23754 TST.B (A7)+> Δ+2 {}
<MI 23756 BEQ 0x23784> {}
<POP 23758-2377c Naked> Σ0 ↓ →0x23784
<MI 23758 LEA.L 0x215a7,A0> {}
<MI 2375c MOVE.B (A0+D7.L),-(A7)> Δ-2 {[2, '(A0+D7.L)']}
<Pointer.fp 0x23760 <LVAR -0x00c @>> Δ-4 {[2, '(A0+D7.L)']|[@@-12]}
<Pointer.fp 0x23764 <LVAR -0x00b @ 1(r)>> Δ-4 {[2, '(A0+D7.L)']|[@@-12]|[@@-11]}
<Pointer.fp 0x23768 <LVAR -0x00a @>> Δ-4 {[2, '(A0+D7.L)']|[@@-12]|[@@-11]|[@@-10]}
<Call 0x2376c 0x10484> {[2, '(A0+D7.L)']|[@@-12]|[@@-11]|[@@-10]}
DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool)
<POP 23772-23776 StackAdj> Δ+14 {}
<MI 23776 TST.B (A6-0xb)> {}
<MI 2377a BEQ 0x23784> {}
<POP 2377c-23784 Naked> Σ0 →0x237b6 ←0x237aa
<MI 2377c MOVEA.L (A6+0x8),A0> {}
<MI 2377e MOVE.B #0x0c,(A0)> {}
<MI 23782 BRA 0x237b6> {}
<POP 23784-2378a Naked> Σ0 ↓ →0x2373c ←0x2373c ←0x23758
<MI 23784 ADDQ.L #0x1,D7> {}
<MI 23786 CMP.L #0x07,D7> {}
<MI 23788 BLE 0x2373c> {}
<POP 2378a-237aa Naked> Σ0 ↓ →0x237ac
<MI 2378a CLR.B -(A7)> Δ-2 {[#0]}
<Pointer.fp 0x2378c <LVAR -0x009 @ 1(r)>> Δ-4 {[#0]|[@@-9]}
<Call 0x23790 0x23f18> {[#0]|[@@-9]}
exp_READ_PAREG.FIU(Sw_1, &Sr_1)
<POP 23796-23798 StackAdj> Δ+6 {}
<MI 23798 CLR.L D0> {}
<MI 2379a MOVE.B (A6-0x9),D0> {}
<MI 2379e MOVE.W D0,D1> {}
<MI 237a0 ANDI.W #0x00f7,D1> {}
<MI 237a4 CMPI.W #0x00f7,D1> {}
<MI 237a8 BEQ 0x237ac> {}
<POP 237aa-237ac Naked> Σ0 →0x2377c
<MI 237aa BRA 0x2377c> {}
<POP 237ac-237b0 Naked> Σ0 ↓ →0x237b6 ←0x2378a
<MI 237ac AND.W #0x08,D0> {}
<MI 237ae BNE 0x237b6> {}
<POP 237b0-237b6 Naked> Σ0 ↓
<MI 237b0 MOVEA.L (A6+0x8),A0> {}
<MI 237b2 MOVE.B #0x0b,(A0)> {}
<POP 237b6-237be Epilogue> Σ0 ←0x2368a ←0x23738 ←0x2377c ←0x237ac
@ 237be
<LVAR -0x004 @ 1(r)>
<LVAR -0x008 @>
<LVAR -0x00a @ 2(r)>
<LVAR -0x00c 2(w)>
<LVAR -0x00f @ 1(r)>
<LVAR -0x014 @ 1(r)>
<POP 237be-239ac Body> Δ+6
<POP 237be-237d4 Prologue> Σ0 ↓
<POP 237d4-237e8 RegCacheLoad> Σ0 ↓
<POP 237e8-2380a Naked> Σ0 ↓ →0x2380c
<MI 237e8 CLR.W (A6-0xa)> {}
<Const 0x237ea 0xfc10.4> Δ-4 {[##64528]}
<MI 237f0 LEA.L (A6-0xa),A0> {[##64528]}
<MI 237f2 MOVE.L A0,-(A7)> Δ-4 {[##64528]|[4, 'A0']}
<MI 237f4 ADDQ.L #0x1,(A7)> {[##64528]|[-4-]}
<Const 0x237f6 0x1.2> Δ-2 {[##64528]|[-4-]|[#1]}
<Call 0x237f8 0x10238> {[##64528]|[-4-]|[#1]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 237fe-23800 StackAdj> Δ+10 {}
<MI 23800 CLR.B 0x243b0> {}
<MI 23802 MOVE.W (A6-0xa),D0> {}
<MI 23804 AND.W #0x01,D0> {}
<MI 23806 CMP.W #0x01,D0> {}
<MI 23808 BNE 0x2380c> {}
<POP 2380a-2380c Naked> Σ0 ↓
<MI 2380a ADDQ.B #0x1,0x243b0> {}
<POP 2380c-23818 Naked> Σ0 ↓ →0x2381e ←0x237e8
<MI 2380c CLR.B 0x243b1> {}
<MI 23812 MOVE.W (A6-0xa),D0> {}
<MI 23814 CMP.W #0x02,D0> {}
<MI 23816 BCS 0x2381e> {}
<POP 23818-2381e Naked> Σ0 ↓
<MI 23818 ADDQ.B #0x1,0x243b1> {}
<POP 2381e-2389e Naked> Σ0 ↓ →0x238a2 ←0x2380c
<Call 0x2381e 0x235d8> {}
<Blob 0x23822 [52] @> Δ-52 {[«52""»]}
<POP 2382e-23830 StackAdj> Δ-4 {[«52""»]|[-4-]}
<Lit 0x23830 52> {[«52""»]|[$$====================================================]}
<Call 0x23842 0x103e0> {[«52""»]|[$$====================================================]}
WriteConsoleStringCrLf(str : String)
<POP 23848-2384c StackAdj> Δ+54 {[-2-]}
<POP 2384c-2384d StackAdj> Δ+2 {}
<Const 0x2384d 0x1b.2> Δ-2 {[#27]}
<Call 0x23850 0x103d0> {[#27]}
WriteConsoleChar(chr : char)
<POP 23856-23857 StackAdj> Δ+2 ↓ {}
<Blob 0x23857 [6] @> Δ-6 {[«6""»]}
<POP 23866-23868 StackAdj> Δ-4 {[«6""»]|[-4-]}
<Lit 0x23868 5> {[«6""»]|[$$[1;7m]}
<Call 0x2387a 0x103d8> {[«6""»]|[$$[1;7m]}
WriteConsoleString(str : String)
<POP 23880-23882 StackAdj> Δ+10 {}
<Pointer.fp 0x23882 <LVAR -0x014 @ 1(r)>> Δ-4 {[@@-20]}
<Call 0x23884 0x105e0> {[@@-20]}
Get_BootReasonCode() : Byte
<MI 2388a MOVE.B (A6-0x14),(A7)> {[-4-]}
<Call 0x2388c 0x21d00> {[-4-]}
<POP 23890-23892 StackAdj> Δ+2 {[-2-]}
<MI 23892 MOVE.B (A7)+,D0> Δ+2 {}
<MI 23894 EXTB.W D0> {}
<POP 0x23896 LimitCheck 0x0 ≤ D0 ≤ 0xa> {}
<MI 23898 MOVE.B D0,D7> {}
<MI 2389a CMP.B #0x02,D7> {}
<MI 2389c BEQ 0x238a2> {}
<POP 2389e-238a2 Naked> Σ0 ↓ →0x238fc
<MI 2389e TST.B 0x243b0> {}
<MI 238a0 BEQ 0x238fc> {}
<POP 238a2-238e2 Naked> Σ0 ↓ →0x238fc ←0x2381e
<Blob 0x238a2 [22] @> Δ-22 {[«22""»]}
<POP 238ae-238b0 StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x238b0 22> {[«22""»]|[$$CRASH_DUMP.SAVED_STATE]}
<POP 238c0-238c2 StackAdj> Δ-2 {[«22""»]|[$$CRASH_DUMP.SAVED_STATE]|[-2-]}
<MI 238c2 CLR.B (A7)> {[«22""»]|[$$CRASH_DUMP.SAVED_STATE]|[-2-]}
<MI 238c4 CLR.B -(A7)> Δ-2 {[«22""»]|[$$CRASH_DUMP.SAVED_STATE]|[-2-]|[#0]}
<Const 0x238c6 0x0.4> Δ-4 {[«22""»]|[$$CRASH_DUMP.SAVED_STATE]|[-2-]|[#0]|[##0]}
<Pointer.fp 0x238ca <LVAR -0x004 @ 1(r)>> Δ-4 {[«22""»]|[$$CRASH_DUMP.SAVED_STATE]|[-2-]|[#0]|[##0]|[@@-4]}
<Pointer.fp 0x238ce <LVAR -0x008 @>> Δ-4 {[«22""»]|[$$CRASH_DUMP.SAVED_STATE]|[-2-]|[#0]|[##0]|[@@-4]|[@@-8]}
<Call 0x238d2 0x10380> {[«22""»]|[$$CRASH_DUMP.SAVED_STATE]|[-2-]|[#0]|[##0]|[@@-4]|[@@-8]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 238d8-238dc StackAdj> Δ+42 {}
<MI 238dc TST.B (A6-0x4)> {}
<MI 238e0 BNE 0x238fc> {}
<POP 238e2-238fc Naked> Σ0 ↓
<Const 0x238e2 0x2.2> Δ-2 {[#2]}
<Const 0x238e4 0x1.2> Δ-2 {[#2]|[#1]}
<Const 0x238e6 0x1.4> Δ-4 {[#2]|[#1]|[##1]}
<Pointer.fp 0x238ea <LVAR -0x004 @ 1(r)>> Δ-4 {[#2]|[#1]|[##1]|[@@-4]}
<Pointer.fp 0x238ee <LVAR -0x008 @>> Δ-4 {[#2]|[#1]|[##1]|[@@-4]|[@@-8]}
<Call 0x238f2 0x1038c> {[#2]|[#1]|[##1]|[@@-4]|[@@-8]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 238f8-238fc StackAdj> Δ+16 {}
<POP 238fc-23900 Naked> Σ0 ↓ →0x2390c ←0x2389e ←0x238a2
<MI 238fc CMP.B #0x02,D7> {}
<MI 238fe BNE 0x2390c> {}
<POP 23900-23906 Naked> Σ0 Δ-2 ↓
<MI 23900 MOVE.B (A6-0x14),-(A7)> Δ-2 {[2, '(A6-0x14)']}
<Call 0x23902 0x22e48> {[2, '(A6-0x14)']}
<POP 23906-2390c Naked> Σ-2 Δ+2 →0x2398c ←0x23910 ←0x2391c ←0x23956
<POP 23906-23908 StackAdj> Δ+2 {}
<MI 23908 BRA 0x2398c> {}
<POP 2390c-23910 Naked> Σ0 ↓ →0x23918 ←0x238fc
<MI 2390c CMP.B #0x01,D7> {}
<MI 2390e BNE 0x23918> {}
<POP 23910-23918 Naked> Σ0 Δ-2 →0x23906
<MI 23910 MOVE.B (A6-0x14),-(A7)> Δ-2 {[2, '(A6-0x14)']}
<Call 0x23912 0x22da8> {[2, '(A6-0x14)']}
<MI 23916 BRA 0x23906> {[2, '(A6-0x14)']}
<POP 23918-2391c Naked> Σ0 ↓ →0x23924 ←0x2390c
<MI 23918 TST.B D7> {}
<MI 2391a BNE 0x23924> {}
<POP 2391c-23924 Naked> Σ0 Δ-2 →0x23906
<MI 2391c MOVE.B (A6-0x14),-(A7)> Δ-2 {[2, '(A6-0x14)']}
<Call 0x2391e 0x22f9e> {[2, '(A6-0x14)']}
<MI 23922 BRA 0x23906> {[2, '(A6-0x14)']}
<POP 23924-23956 Naked> Σ0 ↓ →0x23968 ←0x23918
<POP 23924-23926 StackAdj> Δ-2 {[-2-]}
<Call 0x23926 0x105f2> {[-2-]}
Get_fc02() : Word
<MI 2392c MOVE.W (A7)+,D0> Δ+2 {}
<MI 2392e MOVE.W D0,(A6-0xc)> {}
<MI 23932 MOVE.W D0,D6> {}
<MI 23934 ANDI.W #0x00ff,D6> {}
<MI 23938 MOVE.W D0,D1> {}
<MI 2393a LSR.W #0x8,D1> {}
<MI 2393c MOVE.B D1,-(A7)> Δ-2 {[2, 'D1']}
<MI 2393e CLR.L D1> {[2, 'D1']}
<MI 23940 MOVE.B (A7)+,D1> Δ+2 {}
<POP 0x23942 LimitCheck 0x0 ≤ D1 ≤ 0xa> {}
<MI 23944 MOVE.B D1,D5> {}
<Pointer.fp 0x23946 <LVAR -0x00f @ 1(r)>> Δ-4 {[@@-15]}
<Call 0x2394a 0x23658> {[@@-15]}
<POP 2394e-23950 StackAdj> Δ+4 {}
<MI 23950 TST.B (A6-0xf)> {}
<MI 23954 BEQ 0x23968> {}
<POP 23956-23968 Naked> Σ0 Δ-2 →0x23906
<MI 23956 MOVE.B (A6-0xf),D0> {}
<MI 2395a EXTB.W D0> {}
<POP 0x2395c LimitCheck 0x0 ≤ D0 ≤ 0xd> {}
<MI 23960 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Call 0x23962 0x2325e> {[2, 'D0']}
<MI 23966 BRA 0x23906> {[2, 'D0']}
<POP 23968-2396c Naked> Σ0 ↓ →0x23982 ←0x23924
<MI 23968 TST.W D0> {}
<MI 2396a BEQ 0x23982> {}
<POP 2396c-23982 Naked> Σ0 →0x2398c
<MI 2396c CLR.L D0> {}
<MI 2396e MOVE.W D6,D0> {}
<MI 23970 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 23972 MOVE.B D5,D0> {[4, 'D0']}
<MI 23974 EXTB.W D0> {[4, 'D0']}
<POP 0x23976 LimitCheck 0x0 ≤ D0 ≤ 0xa> {[4, 'D0']}
<MI 23978 MOVE.B D0,-(A7)> Δ-2 {[4, 'D0']|[2, 'D0']}
<Call 0x2397a 0x2346c> {[4, 'D0']|[2, 'D0']}
<POP 2397e-23980 StackAdj> Δ+6 {}
<MI 23980 BRA 0x2398c> {}
<POP 23982-2398c Naked> Σ0 ↓ ←0x23968
<MI 23982 MOVE.B (A6-0x14),-(A7)> Δ-2 {[2, '(A6-0x14)']}
<MI 23984 MOVE.B D7,-(A7)> Δ-2 {[2, '(A6-0x14)']|[2, 'D7']}
<Call 0x23986 0x2354a> {[2, '(A6-0x14)']|[2, 'D7']}
<POP 2398a-2398c StackAdj> Δ+4 {}
<POP 2398c-239a4 Naked> Σ0 ↓ ←0x23906 ←0x2396c
<MI 2398c CLR.W (A6-0xa)> {}
<MI 2398e LEA.L (A6-0xa),A0> {}
<MI 23990 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 23992 ADDQ.L #0x1,(A7)> {[-4-]}
<Const 0x23994 0xfc10.4> Δ-4 {[-4-]|[##64528]}
<Const 0x2399a 0x1.2> Δ-2 {[-4-]|[##64528]|[#1]}
<Call 0x2399c 0x10238> {[-4-]|[##64528]|[#1]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 239a2-239a4 StackAdj> Δ+10 {}
<POP 239a4-239ac Epilogue> Σ0
@ 239ac
<LVAR -0x004 @ 4(r)>
<POP 239ac-23aa2 Body>
<POP 239ac-239c2 Prologue> Σ0 ↓
<POP 239c2-239d4 RegCacheLoad> Σ0 ↓
<POP 239d4-239e0 Naked> Σ0 ↓ →0x239ec
<POP 239d4-239d6 StackAdj> Δ-2 {[-2-]}
<Call 0x239d6 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 239dc TST.B (A7)+> Δ+2 {}
<MI 239de BNE 0x239ec> {}
<POP 239e0-239ec Naked> Σ0 ↓ →0x23a1a
<POP 239e0-239e2 StackAdj> Δ-2 {[-2-]}
<Call 0x239e2 0x10604> {[-2-]}
Is_machine_type_three() : Bool
<MI 239e8 TST.B (A7)+> Δ+2 {}
<MI 239ea BEQ 0x23a1a> {}
<POP 239ec-239f8 Naked> Σ0 ↓ →0x23a1a ←0x239d4
<POP 239ec-239ee StackAdj> Δ-2 {[-2-]}
<Call 0x239ee 0x24080> {[-2-]}
<MI 239f4 TST.B (A7)+> Δ+2 {}
<MI 239f6 BNE 0x23a1a> {}
<POP 239f8-23a1a Naked> Σ0 ↓
<Blob 0x239f8 [74] @> Δ-74 {[«74""»]}
<POP 23a04-23a06 StackAdj> Δ-4 {[«74""»]|[-4-]}
<Lit 0x23a06 74> {[«74""»]|[$$>>> NOTICE: the EPROM WRT PROT switch is OFF (at front of RESHA board) <<<]}
<Call 0x23a14 0x103e0> {[«74""»]|[$$>>> NOTICE: the EPROM WRT PROT switch is OFF (at front of RESHA board) <<<]}
WriteConsoleStringCrLf(str : String)
<POP 23a16-23a1a StackAdj> Δ+78 {}
<POP 23a1a-23a26 Naked> Σ0 ↓ →0x23a48 ←0x239e0 ←0x239ec
<POP 23a1a-23a1c StackAdj> Δ-2 {[-2-]}
<Call 0x23a1c 0x105ce> {[-2-]}
ReadKeySwitch() : Bool
<MI 23a22 TST.B (A7)+> Δ+2 {}
<MI 23a24 BEQ 0x23a48> {}
<POP 23a26-23a48 Naked> Σ0 ↓
<Blob 0x23a26 [62] @> Δ-62 {[«62""»]}
<POP 23a32-23a34 StackAdj> Δ-4 {[«62""»]|[-4-]}
<Lit 0x23a34 62> {[«62""»]|[$$>>> NOTICE: the OPERATOR_MODE switch is set to INTERACTIVE <<<]}
<Call 0x23a42 0x103e0> {[«62""»]|[$$>>> NOTICE: the OPERATOR_MODE switch is set to INTERACTIVE <<<]}
WriteConsoleStringCrLf(str : String)
<POP 23a44-23a48 StackAdj> Δ+66 {}
<POP 23a48-23a6e Naked> Σ0 ↓ →0x23a78 ←0x23a1a
<Const 0x23a48 0xfffff800.4> Δ-4 {[##4294965248]}
<Const 0x23a4c 0x5.2> Δ-2 {[##4294965248]|[#5]}
<MI 23a50 LEA.L (A6-0x4),A0> {[##4294965248]|[#5]}
<MI 23a52 MOVE.L A0,-(A7)> Δ-4 {[##4294965248]|[#5]|[4, 'A0']}
<Const 0x23a54 0x1.2> Δ-2 {[##4294965248]|[#5]|[4, 'A0']|[#1]}
<Const 0x23a56 0x4.2> Δ-2 {[##4294965248]|[#5]|[4, 'A0']|[#1]|[#4]}
<Call 0x23a5a 0x1023a> {[##4294965248]|[#5]|[4, 'A0']|[#1]|[#4]}
KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
<POP 23a60-23a64 StackAdj> Δ+14 {}
<MI 23a64 MOVE.L (A6-0x4),D0> {}
<MI 23a66 ANDI.L #0x80000000,D0> {}
<MI 23a6c BEQ 0x23a78> {}
<POP 23a6e-23a78 Naked> Σ0 ↓ →0x23a9a
<MI 23a6e MOVE.L (A6-0x4),D0> {}
<MI 23a70 ANDI.L #0x00000200,D0> {}
<MI 23a76 BEQ 0x23a9a> {}
<POP 23a78-23a9a Naked> Σ0 ↓ ←0x23a48
<Blob 0x23a78 [54] @> Δ-54 {[«54""»]}
<POP 23a84-23a86 StackAdj> Δ-4 {[«54""»]|[-4-]}
<Lit 0x23a86 54> {[«54""»]|[$$>>> WARNING: the system clock or power is margined <<<]}
<Call 0x23a94 0x103e0> {[«54""»]|[$$>>> WARNING: the system clock or power is margined <<<]}
WriteConsoleStringCrLf(str : String)
<POP 23a96-23a9a StackAdj> Δ+58 {}
<POP 23a9a-23aa2 Epilogue> Σ0 ←0x23a6e
@ 23aa2
START
<POP 23aa2--0001 Body> Δ+26
<POP 23aa2-23aac Prologue> Σ0
<POP 23aac-23ac6 RegCacheLoad> Σ0 ↓
<POP 23ac6-23b98 Naked> Σ0 ↓
<Const 0x23ac6 0x1.4> Δ-4 {[##1]}
<Call 0x23aca 0x103f4> {[##1]}
SetConsoleConfig(a : Long)
<POP 23ad0-23ad2 StackAdj> Δ+2 {[-2-]}
<MI 23ad2 CLR.B (A7)> {[-2-]}
<Call 0x23ad4 0x10404> {[-2-]}
SetSomeKindOfFlag(a : Byte)
<POP 23ada-23adb StackAdj> Δ+2 {}
<Const 0x23adb 0x1.2> Δ-2 {[#1]}
<Const 0x23adc 0x1.2> Δ-2 {[#1]|[#1]}
<Call 0x23ade 0x10210> {[#1]|[#1]}
KC08_PortSomething(port: Word; b: Byte)
<POP 23ae4-23ae6 StackAdj> Δ+4 {}
<Const 0x23ae6 0xf.4> Δ-4 {[##15]}
<Call 0x23aea 0x104d8> {[##15]}
ExpInit(a : Long)
<POP 23af0-23af2 StackAdj> Δ+4 {}
<Call 0x23af2 0x217de> {}
<Const 0x23af6 0x243af.4> Δ-4 {[##148399]}
<Call 0x23afc 0x105aa> {[##148399]}
Read_fc00() : Byte
<POP 23b02-23b04 StackAdj> Δ+4 {}
<Call 0x23b04 0x218aa> {}
<Call 0x23b08 0x21adc> {}
<Blob 0x23b0c [2] @> Δ-2 {[«2""»]}
<Blob 0x23b10 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x23b14 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<Blob 0x23b18 [6] @> Δ-6 {[«2""»]|[«2""»]|[«2""»]|[«6""»]}
<POP 23b28-23b2a StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«6""»]|[-4-]}
<Lit 0x23b2a 6> {[«2""»]|[«2""»]|[«2""»]|[«6""»]|[$$BEKINS]}
<POP 23b34-23b36 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«6""»]|[$$BEKINS]|[-4-]}
<Lit 0x23b36 5> {[«2""»]|[«2""»]|[«2""»]|[«6""»]|[$$BEKINS]|[$$DOUSE]}
<POP 23b40-23b42 StackAdj> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[«6""»]|[$$BEKINS]|[$$DOUSE]|[-2-]}
<MI 23b42 CLR.B (A7)> {[«2""»]|[«2""»]|[«2""»]|[«6""»]|[$$BEKINS]|[$$DOUSE]|[-2-]}
<Const 0x23b44 0x243ae.4> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«6""»]|[$$BEKINS]|[$$DOUSE]|[-2-]|[##148398]}
<Call 0x23b4a 0x103b0> {[«2""»]|[«2""»]|[«2""»]|[«6""»]|[$$BEKINS]|[$$DOUSE]|[-2-]|[##148398]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 23b4c-23b50 StackAdj> Δ+26 {}
<MI 23b50 MOVE.L 0x2114c,0x243ba> {}
<MI 23b58 MOVE.B #0x1b,0x243ba> {}
<MI 23b60 CLR.B 0x243b8> {}
<MI 23b66 CLR.B 0x243b9> {}
<MI 23b6c CLR.B 0x243b2> {}
<MI 23b72 MOVE.L #0x06,0x243b4> {}
<Call 0x23b74 0x237be> {}
<MI 23b78 CLR.L 0x243c4> {}
<MI 23b7e LEA.L 0x243c4,A0> {}
<MI 23b84 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Const 0x23b86 0xfc05.4> Δ-4 {[4, 'A0']|[##64517]}
<Const 0x23b8c 0x1.2> Δ-2 {[4, 'A0']|[##64517]|[#1]}
<Call 0x23b8e 0x10238> {[4, 'A0']|[##64517]|[#1]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 23b94-23b98 StackAdj> Δ+10 {}
<POP 23b98-23baa Naked> Σ0 ↓ →0x23bb0 ←0x23f0e
<Call 0x23b98 0x103dc> {}
WriteConsoleCrLf(void)
<Call 0x23b9e 0x239ac> {}
<MI 23ba2 TST.B 0x243b2> {}
<MI 23ba8 BEQ 0x23bb0> {}
<POP 23baa-23bb0 Naked> Σ0 →0x23d0e
<MI 23baa MOVE.L #0x06,0x243b4> {}
<MI 23bac BRA 0x23d0e> {}
<POP 23bb0-23bdc Naked> Σ0 ↓ ←0x23b98
<Blob 0x23bb0 [30] @> Δ-30 {[«30""»]}
<POP 23bc0-23bc2 StackAdj> Δ-4 {[«30""»]|[-4-]}
<Lit 0x23bc2 29> {[«30""»]|[$$CLI/CRASH MENU - options are:]}
<Call 0x23bd0 0x103e0> {[«30""»]|[$$CLI/CRASH MENU - options are:]}
WriteConsoleStringCrLf(str : String)
<POP 23bd6-23bda StackAdj> Δ+34 {}
<MI 23bda MOVEQ.L #0x01,D0> {}
<POP 23bdc-23c5c Naked> Σ0 ↓ →0x23bdc ←0x23bdc
<MI 23bdc MOVE.L D0,0x243c4> {}
<Blob 0x23be2 [2] @> Δ-2 {[«2""»]}
<Blob 0x23be6 [4] @> Δ-4 {[«2""»]|[«4""»]}
<MI 23bea MOVE.L D0,D1> {[«2""»]|[«4""»]}
<MI 23bec SUBQ.L #0x1,D1> {[«2""»]|[«4""»]}
<POP 0x23bee LimitCheck 0x0 ≤ D1 ≤ 0x5> {[«2""»]|[«4""»]}
<MI 23bf4 MOVE.L D1,D4> {[«2""»]|[«4""»]}
<MI 23bf6 MOVEQ.L #0x1e,D3> {[«2""»]|[«4""»]}
<Call 0x23bf8 0x1028c> {[«2""»]|[«4""»]}
?muls_d3_d4
<MI 23bfe LEA.L 0x21216,A0> {[«2""»]|[«4""»]}
<Blob 0x23c02 [30] (A0+D4.L)> Δ-30 {[«2""»]|[«4""»]|[«30»]}
<POP 23c12-23c14 StackAdj> Δ-8 {[«2""»]|[«4""»]|[«30»]|[-8-]}
<Lit 0x23c14 2> {[«2""»]|[«4""»]|[«30»]|[-4-]|[$$ _]}
<MI 23c20 MOVE.L D0,(A7)> {[«2""»]|[«4""»]|[«30»]|[-4-]|[4, 'D0']}
<POP 23c1e-23c20 StackAdj> Δ-8 {[«2""»]|[«4""»]|[«30»]|[-4-]|[4, 'D0']|[-8-]}
<Call 0x23c22 0x102e4> {[«2""»]|[«4""»]|[«30»]|[-4-]|[4, 'D0']|[-8-]}
Long2String(a : Long) : String
<Lit 0x23c28 4> {[«2""»]|[«4""»]|[«30»]|[-4-]|[4, 'D0']|[-4-]|[$$ =>_]}
<POP 23c34-23c36 StackAdj> Δ-4 {[«2""»]|[«4""»]|[«30»]|[-4-]|[4, 'D0']|[-4-]|[$$ =>_]|[-4-]}
<Lit 0x23c36> {[«2""»]|[«4""»]|[«30»]|[-4-]|[4, 'D0']|[-4-]|[$$ =>_]|[$$…]}
<Pointer.sp 0x23c36 20> Δ-4
<Const 0x23c3a 0x1.2> Δ-2
<Const 0x23c3c 0x1e.2> Δ-2
<Call 0x23c3e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23c40-23c42 StackAdj> Δ+8
<Call 0x23c42 0x102d8> {[«2""»]|[«4""»]|[«30»]|[-4-]|[4, 'D0']|[-4-]|[$$ =>_]|[$$…]}
StringCat4(a, b, c, d : String) : String
<POP 23c48-23c4c StackAdj> Δ+16 {[«2""»]|[«4""»]|[«30»]|[-4-]}
<Call 0x23c4c 0x103e0> {[«2""»]|[«4""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23c52-23c56 StackAdj> Δ+40 {}
<MI 23c56 ADDQ.L #0x1,D0> {}
<MI 23c58 CMP.L #0x06,D0> {}
<MI 23c5a BLE 0x23bdc> {}
<POP 23c5c-23ce6 Naked> Σ0 ↓ →0x23cf6
<Blob 0x23c5c [14] @> Δ-14 {[«14""»]}
<MI 23c68 MOVE.L 0x243b4,D0> {[«14""»]}
<MI 23c6a SUBQ.L #0x1,D0> {[«14""»]}
<POP 0x23c6c LimitCheck 0x0 ≤ D0 ≤ 0x5> {[«14""»]}
<MI 23c72 MOVE.L D0,D4> {[«14""»]}
<MI 23c74 MOVEQ.L #0x1e,D3> {[«14""»]}
<Call 0x23c76 0x1028c> {[«14""»]}
?muls_d3_d4
<MI 23c7c LEA.L 0x21216,A0> {[«14""»]}
<Blob 0x23c80 [30] (A0+D4.L)> Δ-30 {[«14""»]|[«30»]}
<Blob 0x23c90 [4] @> Δ-4 {[«14""»]|[«30»]|[«4""»]}
<POP 23c94-23c98 StackAdj> Δ-12 {[«14""»]|[«30»]|[«4""»]|[-12-]}
<Lit 0x23c98 14> {[«14""»]|[«30»]|[«4""»]|[-8-]|[$$Enter option []}
<POP 23ca4-23ca6 StackAdj> Δ-4 {[«14""»]|[«30»]|[«4""»]|[-8-]|[$$Enter option []|[-4-]}
<Lit 0x23ca6> {[«14""»]|[«30»]|[«4""»]|[-8-]|[$$Enter option []|[$$…]}
<Pointer.sp 0x23ca6 20> Δ-4
<Const 0x23caa 0x1.2> Δ-2
<Const 0x23cac 0x1e.2> Δ-2
<Call 0x23cae 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23cb0-23cb2 StackAdj> Δ+8
<POP 23cb0-23cb2 StackAdj> Δ-4 {[«14""»]|[«30»]|[«4""»]|[-8-]|[$$Enter option []|[$$…]|[-4-]}
<Lit 0x23cb2 4> {[«14""»]|[«30»]|[«4""»]|[-8-]|[$$Enter option []|[$$…]|[$$] :_]}
<Call 0x23cc0 0x102d4> {[«14""»]|[«30»]|[«4""»]|[-8-]|[$$Enter option []|[$$…]|[$$] :_]}
StringCat3(a, b, c : String) : String
<POP 23cc6-23cca StackAdj> Δ+12 {[«14""»]|[«30»]|[«4""»]|[-8-]}
<Call 0x23cca 0x103e4> {[«14""»]|[«30»]|[«4""»]|[-8-]}
AskConsoleString(prompt : String) : String
<POP 23cd0-23cd2 StackAdj> Δ+4 {[«14""»]|[«30»]|[«4""»]|[-4-]}
<MI 23cd2 MOVE.L (A7)+,0x243be> Δ+4 {[«14""»]|[«30»]|[«4""»]}
<POP 23cd8-23cdc StackAdj> Δ+48 {}
<MI 23cdc MOVEA.L 0x243be,A0> {}
<MI 23ce2 TST.W (A0)> {}
<MI 23ce4 BNE 0x23cf6> {}
<POP 23ce6-23cf6 Naked> Σ0 →0x23d0e
<Const 0x23ce6 0x243be.4> Δ-4 {[##148414]}
<Call 0x23cec 0x102bc> {[##148414]}
FreeString(VAR a : String)
<POP 23cf2-23cf4 StackAdj> Δ+4 {}
<MI 23cf4 BRA 0x23d0e> {}
<POP 23cf6-23d0e Naked> Σ0 ↓ ←0x23c5c
<Blob 0x23cf6 [4] 0x243be> Δ-4 {[«4»]}
<Const 0x23cfc 0x243c2.4> Δ-4 {[«4»]|[##148418]}
<Const 0x23d02 0x243b4.4> Δ-4 {[«4»]|[##148418]|[##148404]}
<Call 0x23d04 0x102ec> {[«4»]|[##148418]|[##148404]}
String2Long(src : String; VAR status : Bool; VAR retval : Long)
<POP 23d0a-23d0e StackAdj> Δ+12 {}
<POP 23d0e-23d18 Naked> Σ0 ↓ →0x23ee0 ←0x23baa ←0x23ce6
<MI 23d0e MOVE.L 0x243b4,D0> {}
<MI 23d10 SUBQ.L #0x1,D0> {}
<MI 23d12 CMP.L #0x05,D0> {}
<MI 23d14 BHI 0x23ee0> {}
<POP 23d18-23d22 Naked> Σ0 →0x23d2e →0x23d66 →0x23d6e →0x23db4 →0x23e00 →0x23e2a
<MI 23d18 ADD.W D0,D0> {}
<MI 23d1a SWITCH D0.W> {}
<POP 23d2e-23d66 Naked> Σ0 →0x23f0e ←0x23d18
<POP 23d2e-23d30 StackAdj> Δ-4 {[-4-]}
<POP 23d30-23d31 StackAdj> Δ+2 {[-2-]}
<Blob 0x23d31 [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 23d34 MOVE.B 0x21187,(A7+0x1)> {[-2-]|[«2""»]}
<MI 23d3a MOVE.B 0x21188,(A7+0x2)> {[-2-]|[«2""»]}
<POP 23d40-23d42 StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]}
<Lit 0x23d42> {[-2-]|[«2""»]|[$$…]}
<Pointer.sp 0x23d42 4> Δ-4
<Const 0x23d46 0x1.2> Δ-2
<Const 0x23d48 0x3.2> Δ-2
<Call 0x23d4c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23d4e-23d50 StackAdj> Δ+8
<Const 0x23d50 0x1.4> Δ-4 {[-2-]|[«2""»]|[$$…]|[##1]}
<Const 0x23d54 0x1.2> Δ-2 {[-2-]|[«2""»]|[$$…]|[##1]|[#1]}
<Const 0x23d56 0x243c3.4> Δ-4 {[-2-]|[«2""»]|[$$…]|[##1]|[#1]|[##148419]}
<Call 0x23d5c 0x103b0> {[-2-]|[«2""»]|[$$…]|[##1]|[#1]|[##148419]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 23d5e-23d62 StackAdj> Δ+18 {}
<MI 23d62 BRA 0x23f0e> {}
<POP 23d66-23d6e Naked> Σ0 →0x23f0e ←0x23d18
<Call 0x23d66 0x21e38> {}
<MI 23d6a BRA 0x23f0e> {}
<POP 23d6e-23db4 Naked> Σ0 →0x23f0c ←0x23d18
<Blob 0x23d6e [10] @> Δ-10 {[«10""»]}
<Blob 0x23d80 [4] @> Δ-4 {[«10""»]|[«4""»]}
<POP 23d84-23d86 StackAdj> Δ-4 {[«10""»]|[«4""»]|[-4-]}
<Lit 0x23d86 9> {[«10""»]|[«4""»]|[$$TOMBSTONE]}
<POP 23d92-23d94 StackAdj> Δ-4 {[«10""»]|[«4""»]|[$$TOMBSTONE]|[-4-]}
<Lit 0x23d94 4> {[«10""»]|[«4""»]|[$$TOMBSTONE]|[$$AUTO]}
<POP 23da0-23da2 StackAdj> Δ-2 {[«10""»]|[«4""»]|[$$TOMBSTONE]|[$$AUTO]|[-2-]}
<POP 23da2-23da3 StackAdj> Δ+2 {[«10""»]|[«4""»]|[$$TOMBSTONE]|[$$AUTO]}
<Const 0x23da3 0x1.2> Δ-2 {[«10""»]|[«4""»]|[$$TOMBSTONE]|[$$AUTO]|[#1]}
<Const 0x23da4 0x243c3.4> Δ-4 {[«10""»]|[«4""»]|[$$TOMBSTONE]|[$$AUTO]|[#1]|[##148419]}
<Call 0x23daa 0x103b0> {[«10""»]|[«4""»]|[$$TOMBSTONE]|[$$AUTO]|[#1]|[##148419]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 23dac-23db0 StackAdj> Δ+28 {}
<MI 23db0 BRA 0x23f0c> {}
<POP 23db4-23dea Naked> Σ0 Δ-26 ↓ ←0x23d18
<Blob 0x23db4 [2] @> Δ-2 {[«2""»]}
<Blob 0x23db8 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x23dbc [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 23dc0-23dc2 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<POP 23dc2-23dc3 StackAdj> Δ+2 {[«2""»]|[«2""»]|[«2""»]|[-2-]}
<Blob 0x23dc3 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[-2-]|[«2""»]}
<MI 23dc6 MOVE.B 0x2119f,(A7+0x1)> {[«2""»]|[«2""»]|[«2""»]|[-2-]|[«2""»]}
<MI 23dcc MOVE.B 0x211a0,(A7+0x2)> {[«2""»]|[«2""»]|[«2""»]|[-2-]|[«2""»]}
<POP 23dd2-23dd4 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-2-]|[«2""»]|[-4-]}
<Lit 0x23dd4 6> {[«2""»]|[«2""»]|[«2""»]|[-2-]|[«2""»]|[$$LOADER]}
<POP 23dde-23de0 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-2-]|[«2""»]|[$$LOADER]|[-4-]}
<Pointer.sp 0x23de0 8> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-2-]|[«2""»]|[$$LOADER]|[-4-]|[^^8]}
<Const 0x23de4 0x1.2> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[-2-]|[«2""»]|[$$LOADER]|[-4-]|[^^8]|[#1]}
<Const 0x23de6 0x3.2> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[-2-]|[«2""»]|[$$LOADER]|[-4-]|[^^8]|[#1]|[#3]}
<POP 23dea-23e00 Naked> Σ-26 Δ+26 →0x23f0e ←0x23e00
<Call 0x23dea 0x102c4> {[-26-]}
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23dec-23dee StackAdj> Δ+6 {[-20-]}
<POP 23dee-23def StackAdj> Δ+2 {[-18-]}
<Const 0x23def 0x1.2> Δ-2 {[-18-]|[#1]}
<Const 0x23df0 0x243c3.4> Δ-4 {[-18-]|[#1]|[##148419]}
<Call 0x23df6 0x103b0> {[-18-]|[#1]|[##148419]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 23df8-23dfc StackAdj> Δ+24 {}
<MI 23dfc BRA 0x23f0e> {}
<POP 23e00-23e2a Naked> Σ0 Δ-26 →0x23dea ←0x23d18
<Blob 0x23e00 [2] @> Δ-2 {[«2""»]}
<Blob 0x23e04 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x23e08 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<Blob 0x23e0c [4] @> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«4""»]}
<POP 23e10-23e12 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[-4-]}
<Lit 0x23e12 6> {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[$$LOADER]}
<POP 23e1c-23e1e StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[$$LOADER]|[-4-]}
<Pointer.sp 0x23e1e 8> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[$$LOADER]|[-4-]|[^^8]}
<Const 0x23e22 0x1.2> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[$$LOADER]|[-4-]|[^^8]|[#1]}
<Const 0x23e24 0x4.2> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[$$LOADER]|[-4-]|[^^8]|[#1]|[#4]}
<MI 23e28 BRA 0x23dea> {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[$$LOADER]|[-4-]|[^^8]|[#1]|[#4]}
<POP 23e2a-23ee0 Naked> Σ0 →0x23f0e ←0x23d18
<Blob 0x23e2a [14] @> Δ-14 {[«14""»]}
<Blob 0x23e3c [12] @> Δ-12 {[«14""»]|[«12""»]}
<POP 23e4e-23e50 StackAdj> Δ-4 {[«14""»]|[«12""»]|[-4-]}
<Lit 0x23e50 13> {[«14""»]|[«12""»]|[$$UPDATE_EEPROM]}
<POP 23e5c-23e5e StackAdj> Δ-4 {[«14""»]|[«12""»]|[$$UPDATE_EEPROM]|[-4-]}
<Lit 0x23e5e 11> {[«14""»]|[«12""»]|[$$UPDATE_EEPROM]|[$$AUTO_UPDATE]}
<POP 23e6a-23e6c StackAdj> Δ-2 {[«14""»]|[«12""»]|[$$UPDATE_EEPROM]|[$$AUTO_UPDATE]|[-2-]}
<POP 23e6c-23e6d StackAdj> Δ+2 {[«14""»]|[«12""»]|[$$UPDATE_EEPROM]|[$$AUTO_UPDATE]}
<Const 0x23e6d 0x1.2> Δ-2 {[«14""»]|[«12""»]|[$$UPDATE_EEPROM]|[$$AUTO_UPDATE]|[#1]}
<Const 0x23e6e 0x243c3.4> Δ-4 {[«14""»]|[«12""»]|[$$UPDATE_EEPROM]|[$$AUTO_UPDATE]|[#1]|[##148419]}
<Call 0x23e74 0x103b0> {[«14""»]|[«12""»]|[$$UPDATE_EEPROM]|[$$AUTO_UPDATE]|[#1]|[##148419]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 23e76-23e77 StackAdj> Δ+40 ↓ {}
<Blob 0x23e77 [38] @> Δ-38 {[«38""»]}
<POP 23e86-23e88 StackAdj> Δ-4 {[«38""»]|[-4-]}
<Lit 0x23e88 37> {[«38""»]|[$$--- Booting the R1000 Environment ---]}
<Call 0x23e96 0x103e0> {[«38""»]|[$$--- Booting the R1000 Environment ---]}
WriteConsoleStringCrLf(str : String)
<POP 23e9c-23ea0 StackAdj> Δ+40 {[-2-]}
<POP 23ea0-23ea1 StackAdj> Δ+2 {}
<Blob 0x23ea1 [2] @> Δ-2 {[«2""»]}
<Blob 0x23ea4 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x23ea8 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<Blob 0x23eac [4] @> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«4""»]}
<Blob 0x23eb0 [4] @> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[«4""»]}
<POP 23eb4-23eb6 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x23eb6 6> {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[«4""»]|[$$LOADER]}
<POP 23ec0-23ec2 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[«4""»]|[$$LOADER]|[-4-]}
<Lit 0x23ec2 8> {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[«4""»]|[$$LOADER]|[$$STANDARD]}
<POP 23ece-23ed0 StackAdj> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[«4""»]|[$$LOADER]|[$$STANDARD]|[-2-]}
<POP 23ed0-23ed1 StackAdj> Δ+2 {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[«4""»]|[$$LOADER]|[$$STANDARD]}
<Const 0x23ed1 0x1.2> Δ-2 {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[«4""»]|[$$LOADER]|[$$STANDARD]|[#1]}
<Const 0x23ed2 0x243c3.4> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[«4""»]|[$$LOADER]|[$$STANDARD]|[#1]|[##148419]}
<Call 0x23ed8 0x103b0> {[«2""»]|[«2""»]|[«2""»]|[«4""»]|[«4""»]|[$$LOADER]|[$$STANDARD]|[#1]|[##148419]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 23eda-23ede StackAdj> Δ+28 {}
<MI 23ede BRA 0x23f0e> {}
<POP 23ee0-23f0c Naked> Σ0 ↓ ←0x23d0e
<Blob 0x23ee0 [28] @> Δ-28 {[«28""»]}
<POP 23ef2-23ef4 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x23ef4 27> {[«28""»]|[$$illegal response, try again]}
<Call 0x23f02 0x103e0> {[«28""»]|[$$illegal response, try again]}
WriteConsoleStringCrLf(str : String)
<POP 23f08-23f0c StackAdj> Δ+32 {}
<POP 23f0c-23f0e Naked> Σ0 ↓ ←0x23d6e
<MI 23f0c MOVE.L #0x06,0x243b4> {}
<POP 23f0e-23f12 Naked> Σ0 →0x23b98 ←0x23d2e ←0x23d66 ←0x23dea ←0x23e2a
<MI 23f0e BRA 0x23b98> {}
<POP 23f18-23f1e Naked> Σ0
<Call 0x23f18 0x10568> {}
Run_Experiment()
@ 23fe8
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 23fe8-2406c Body> Δ+6
<POP 23fe8-23ffe Prologue> Σ0 ↓
<POP 23ffe-24002 RegCacheLoad> Σ0 ↓
<POP 24002-2400e Naked> Σ0 ↓ →0x2401c
<POP 24002-24004 StackAdj> Δ-2 {[-2-]}
<Call 0x24004 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2400a TST.B (A7)+> Δ+2 {}
<MI 2400c BEQ 0x2401c> {}
<POP 2400e-2401c Naked> Σ0 Δ-6 →0x24028
<Blob 0x2400e [2] @> Δ-2 {[«2""»]}
<Blob 0x24012 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x24016 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<MI 2401a BRA 0x24028> {[«2""»]|[«2""»]|[«2""»]}
<POP 2401c-24028 Naked> Σ0 Δ-6 ↓ ←0x24002
<Blob 0x2401c [2] @> Δ-2 {[«2""»]}
<Blob 0x24020 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x24024 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 24028-24064 Naked> Σ-6 Δ+6 ↓ ←0x2400e
<POP 24028-2402a StackAdj> Δ-4 {[-10-]}
<Lit 0x2402a> {[-6-]|[$$…]}
<Pointer.sp 0x2402a 4> Δ-4
<Const 0x2402e 0x1.2> Δ-2
<Const 0x24032 0x6.2> Δ-2
<Call 0x24036 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2403c-2403e StackAdj> Δ+8
<Pointer.fp 0x2403e <LVAR -0x006 @ 4(r)>> Δ-4 {[-6-]|[$$…]|[@@-6]}
<Call 0x24040 0x10460> {[-6-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 24046-2404a StackAdj> Δ+14 {}
<MI 2404a CLR.B -(A7)> Δ-2 {[#0]}
<MI 2404c MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 24050 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x24052 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 24058-2405a StackAdj> Δ+8 {}
<Pointer.fp 0x2405a <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x2405c 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 24062-24064 StackAdj> Δ+4 {}
<POP 24064-2406c Epilogue> Σ0
@ 241ae
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 241ae-24216 Body>
<POP 241ae-241c4 Prologue> Σ0 ↓
<POP 241c4-2420e Naked> Σ0 ↓
<Blob 0x241c4 [14] @> Δ-14 {[«14""»]}
<Const 0x241d0 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 241d4-241d6 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x241d6 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 241e8-241ea StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 241ea MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 241ee EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 241f0 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 241f2 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x241f4 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 241fa-241fc StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x241fc 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 24202-24204 StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x24204 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 2420a-2420e StackAdj> Δ+20 {}
<POP 2420e-24216 Epilogue> Σ0
@ 2426a
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 2426a-243a6 Body>
<POP 2426a-24280 Prologue> Σ0 ↓
<POP 24280-24296 RegCacheLoad> Σ0 ↓
<POP 24296-242f6 Naked> Σ0 ↓ →0x2433e
<Call 0x24296 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x2429c [18] @> Δ-18 {[«18""»]}
<POP 242a8-242aa StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x242aa 18> {[«18""»]|[$$Experiment error :]}
<Call 0x242b6 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 242b8-242b9 StackAdj> Δ+22 ↓ {}
<Blob 0x242b9 [14] @> Δ-14 {[«14""»]}
<POP 242c8-242ca StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x242ca 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 242d4-242d6 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 242d6 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x242da 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 242e0-242e2 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x242e2 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 242e8-242ea StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x242ea 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 242ec-242ee StackAdj> Δ+18 {}
<MI 242ee MOVEA.L (A6+0xa),A0> {}
<MI 242f2 CMPA.W #0x01,A0> {}
<MI 242f4 BEQ 0x2433e> {}
<POP 242f6-2433e Naked> Σ0 ↓
<Blob 0x242f6 [14] @> Δ-14 {[«14""»]}
<Blob 0x24306 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 24316-24318 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x24318 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 24322-24324 StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x24324> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x24324 12> Δ-4
<Const 0x24328 0x1.2> Δ-2
<Const 0x2432a 0x1e.2> Δ-2
<Call 0x2432c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2432e-24330 StackAdj> Δ+8
<Call 0x24330 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 24336-24338 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x24338 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2433a-2433e StackAdj> Δ+48 {}
<POP 2433e-2439e Naked> Σ0 ↓ ←0x24296
<Blob 0x2433e [14] @> Δ-14 {[«14""»]}
<POP 2434e-24350 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x24350 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 2435a-2435c StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 2435c MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x24360 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 24366-24368 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x24368 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 2436e-24370 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x24370 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 24372-24373 StackAdj> Δ+18 ↓ {}
<Blob 0x24373 [24] @> Δ-24 {[«24""»]}
<Const 0x24382 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 24386-24388 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x24388 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x24396 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 2439c-2439e StackAdj> Δ+30 {}
<POP 2439e-243a6 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.85162fc5a4c35f22 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 3a a2 | : | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 43 e2 | C | .PTR 0x243e2 00020010 code.end: 00020010 00 02 43 a6 | C | .PTR 0x243a6 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 41 ae | A | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 42 6a | Bj | .CODE EXP_FAIL 00020020 00 00 00 00 | | .CONST 0x00000000 00020024 exp_init_done: 00020024 00 | | .CONST 0x00 00020025 00 | | .CONST 0x00 00020026 00 00 | | .CONST 0x0000 00020028 00 00 | | .CONST 0x0000 0002002a 00 00 | | .XXX[0x2] 0002002c 00 00 | | .CONST 0x0000 0002002e 00 00 | | .CONST 0x0000 00020030 00 00 | | .CONST 0x0000 00020032 00 00 00 00 00 00 | | .XXX[0x6] 00020038 00 00 00 00 00 00 00 00 | | .BLANK 00[0xb0] 000200e8 00 00 00 00 | | .XXX[0x4] 000200ec 00 00 00 00 | | .PTR 0x0 000200f0 is_open_ERROR_LOG: 000200f0 00 | | .CONST 0x0 000200f1 write_error_ERROR_LOG: 000200f1 00 | | .CONST 0x0 000200f2 00 00 00 00 | | .CONST 0x00000000 000200f6 00 00 00 00 | | .CONST 0x00000000 000200fa 00 | | .CONST 0x00 000200fb 00 | | .CONST 0x00 000200fc file_ERROR_LOG: 000200fc 00 00 00 00 | | .CONST 0x00000000 00020100 00 00 00 00 | | .CONST 0x00000000 00020104 00 00 | | .CONST 0x0000 00020106 00 00 | | .CONST 0x0000 00020108 somekindoffsflag: 00020108 00 | | .CONST 0x00 00020109 00 | | .CONST 0x00 0002010a 40 28 23 29 53 54 |@(#)ST | .XXX[0x6] 00020110 41 52 54 45 52 2c 32 2e |ARTER,2.| .XXX[0x28] 00020118 34 2c 39 32 2f 31 30 2f |4,92/10/| 00020120 31 36 2c 31 36 3a 32 35 |16,16:25| 00020128 3a 30 30 5c 65 6e 74 65 |:00\ente| 00020130 72 20 43 4c 49 20 20 20 |r CLI | 00020138 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00020148 20 20 6d 61 6b 65 20 61 | make a| .XXX[0xa8] 00020150 20 43 52 41 53 48 44 55 | CRASHDU| 00020158 4d 50 20 74 61 70 65 20 |MP tape | 00020160 20 20 20 20 20 20 20 20 | | 00020168 64 69 73 70 6c 61 79 20 |display | 00020170 43 52 41 53 48 20 49 4e |CRASH IN| 00020178 46 4f 20 20 20 20 20 20 |FO | 00020180 20 20 20 20 20 20 42 6f | Bo| 00020188 6f 74 20 44 44 43 20 63 |ot DDC c| 00020190 6f 6e 66 69 67 75 72 61 |onfigura| 00020198 74 69 6f 6e 20 20 20 20 |tion | 000201a0 20 20 20 20 42 6f 6f 74 | Boot| 000201a8 20 45 45 44 42 20 63 6f | EEDB co| 000201b0 6e 66 69 67 75 72 61 74 |nfigurat| 000201b8 69 6f 6e 20 20 20 20 20 |ion | 000201c0 20 20 42 6f 6f 74 20 53 | Boot S| 000201c8 54 41 4e 44 41 52 44 20 |TANDARD | 000201d0 63 6f 6e 66 69 67 75 72 |configur| 000201d8 61 74 69 6f 6e 20 20 20 |ation | 000201e0 30 31 32 33 34 35 36 37 |01234567| 000201e8 38 39 41 42 43 44 45 46 |89ABCDEF| 000201f0 53 74 61 72 74 69 6e 67 |Starting| .TXT 'Starting remote diagnostics from Cluster id =>' 0002021e 52 61 74 69 6f 6e 61 6c |Rational| .TXT 'Rational Service has disconnected ' 00020240 41 72 65 20 79 6f 75 20 |Are you | .TXT 'Are you ready to continue ' 0002025a 44 6f 20 79 6f 75 20 77 |Do you w| .TXT 'Do you want do disconnect ' 00020274 46 49 |FI | .TXT 'FI' 00020276 58 50 |XP | .TXT 'XP' 00020278 41 44 |AD | .TXT 'AD' 0002027a 46 49 58 4d |FIXM | .TXT 'FIXM' 0002027e 4f 44 45 4d |ODEM | .TXT 'ODEM' 00020282 50 6c 65 61 73 65 20 65 |Please e| .TXT 'Please enter current date and time as HH:MM:SS DD-MMM-YY :_ ' 000202be 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal value or incorret format, try again.' 000202ea 48 61 72 64 20 64 69 73 |Hard dis| .TXT 'Hard disk errors in diagnostic filesystem labels on boot device.' 0002032a 4e 6f 20 64 69 61 67 6e |No diagn| .TXT 'No diagnostic filesystem labels found on boot device. ' 00020360 4e 6f 20 64 69 61 67 6e |No diagn| .TXT 'No diagnostic file system is installed on boot unit.' 00020394 55 6e 6b 6e 6f 77 6e 20 |Unknown | .TXT 'Unknown fault during diagnostic filesystem initialization.' 000203ce 42 6f 6f 74 20 61 20 64 |Boot a d| .TXT 'Boot a different disk if possible. This unit must be re-built. ' 0002040e 42 6f 6f 74 20 61 20 64 |Boot a d| .TXT 'Boot a different disk if possible. This unit must be re-built. ' 0002044e 54 68 69 73 20 64 69 73 |This dis| .TXT 'This disk unit is not bootable. Re-boot from different unit. ' 0002048c 43 6f 6e 74 61 63 74 20 |Contact | .TXT 'Contact Rational customer support ' 000204ae 49 6e 69 74 69 61 6c 69 |Initiali| .TXT 'Initializing diagnostic file system ... ' 000204d6 46 69 6c 65 20 73 79 73 |File sys| .TXT 'File system starter not booted from disk. ' 00020500 5b 4f 4b 5d |[OK] | .TXT '[OK]' 00020504 49 4f 50 5f |IOP_ | .TXT 'IOP_' 00020508 44 55 4d 50 |DUMP | .TXT 'DUMP' 0002050c 49 4f 50 5f |IOP_ | .TXT 'IOP_' 00020510 44 55 4d 50 |DUMP | .TXT 'DUMP' 00020514 2a 2a 2a 20 63 6f 75 6c |*** coul| .TXT '*** could not create IOP_DUMP0 file (see reason above)' 0002054a 43 52 41 53 48 53 41 56 |CRASHSAV| .TXT 'CRASHSAVE ' 00020554 4e 4f 5f 52 31 4b 5f 44 |NO_R1K_D| .TXT 'NO_R1K_DUMP ' 00020560 43 52 41 53 48 53 41 56 |CRASHSAV| .TXT 'CRASHSAVE ' 0002056a 44 55 4d 50 5f 52 31 30 |DUMP_R10| .TXT 'DUMP_R1000' 00020574 53 68 6f 75 6c 64 20 74 |Should t| .TXT 'Should the R1000 boot automatically after the crash dump finishes ' 000205b6 3e 3e 3e 20 43 61 6e 27 |>>> Can'| .TXT '>>> Can't make a CRASHDUMP because a full CRASHSAVE wasn't made ' 000205f6 3e 3e 3e 20 43 61 6e 27 |>>> Can'| .TXT '>>> Can't make a CRASHDUMP because the uDIAG or FRU tests were run' 00020638 43 52 41 53 48 44 55 4d |CRASHDUM| .TXT 'CRASHDUMP ' 00020642 52 75 6e 6e 69 6e 67 20 |Running | .TXT 'Running phase 1 & 2 FRU diagnostic tests' 0002066a 46 52 |FR | .TXT 'FR' 0002066c 55 20 |U | .XXX[0x2] 0002066e 41 55 54 4f 5f 52 55 4e |AUTO_RUN| .TXT 'AUTO_RUN_P2 ' 0002067a 43 52 41 53 48 53 41 56 |CRASHSAV| .TXT 'CRASHSAVE ' 00020684 46 52 55 5f |FRU_ | .TXT 'FRU_' 00020688 54 5f 53 43 |T_SC | .TXT 'T_SC' 0002068c 52 45 45 4e |REEN | .TXT 'REEN' 00020690 3e 3e 3e 20 6e 6f 74 20 |>>> not | .TXT '>>> not running FRU tests because AUTO_RECOVERY=FALSE or OP_MODE=INTERACTIVE. ' 000206de 52 75 6e 6e 69 6e 67 20 |Running | .TXT 'Running post-mortem diagnostics.' 000206fe 45 4d |EM | .TXT 'EM' 00020700 42 41 |BA | .TXT 'BA' 00020702 4c 4d |LM | .TXT 'LM' 00020704 2e 45 52 52 |.ERR | .TXT '.ERR' 00020708 4d 45 53 53 |MESS | .TXT 'MESS' 0002070c 52 65 73 74 61 72 74 69 |Restarti| .TXT 'Restarting system after R1000 ' 0002072a 20 6e 6f 20 66 61 | no fa | .XXX[0x6] 00020730 75 6c 74 20 66 6f 75 6e |ult foun| .XXX[0x10] 00020738 64 20 20 20 20 20 20 20 |d | 00020740 20 20 20 20 20 20 20 20 | | .BLANK 20[0x18] 00020758 20 20 20 20 20 48 61 6c | Hal| .XXX[0x20] 00020760 74 20 3d 3e 20 53 79 73 |t => Sys| 00020768 74 65 6d 20 65 72 72 6f |tem erro| 00020770 72 20 20 20 20 20 20 20 |r | 00020778 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00020788 20 20 20 20 20 20 20 48 | H| .XXX[0x98] 00020790 61 6c 74 20 3d 3e 20 49 |alt => I| 00020798 2f 4f 20 50 72 6f 63 65 |/O Proce| 000207a0 73 73 6f 72 20 68 61 72 |ssor har| 000207a8 64 77 61 72 65 20 65 72 |dware er| 000207b0 72 6f 72 20 20 20 20 20 |ror | 000207b8 20 20 20 20 20 20 20 20 | | 000207c0 20 48 61 6c 74 20 3d 3e | Halt =>| 000207c8 20 49 2f 4f 20 50 72 6f | I/O Pro| 000207d0 63 65 73 73 6f 72 20 73 |cessor s| 000207d8 6f 66 74 77 61 72 65 20 |oftware | 000207e0 65 72 72 6f 72 20 20 20 |error | 000207e8 20 20 20 20 20 20 20 20 | | 000207f0 20 20 20 48 61 6c 74 20 | Halt | 000207f8 3d 3e 20 50 72 6f 63 65 |=> Proce| 00020800 73 73 6f 72 20 68 61 72 |ssor har| 00020808 64 77 61 72 65 20 65 72 |dware er| 00020810 72 6f 72 20 20 20 20 20 |ror | 00020818 20 20 20 20 20 20 20 20 | | 00020820 20 20 20 20 20 | | .XXX[0x5] 00020825 48 61 6c |Hal | .XXX[0x3] 00020828 74 20 3d 3e 20 50 72 6f |t => Pro| .XXX[0x90] 00020830 63 65 73 73 6f 72 20 6d |cessor m| 00020838 75 6c 74 69 2d 62 69 74 |ulti-bit| 00020840 20 6d 65 6d 6f 72 79 20 | memory | 00020848 65 72 72 6f 72 20 20 20 |error | 00020850 20 20 20 20 20 20 20 48 | H| 00020858 61 6c 74 20 3d 3e 20 50 |alt => P| 00020860 72 6f 63 65 73 73 6f 72 |rocessor| 00020868 20 53 59 53 42 55 53 20 | SYSBUS | 00020870 68 61 72 64 77 61 72 65 |hardware| 00020878 20 65 72 72 6f 72 20 20 | error | 00020880 20 20 20 20 20 20 20 20 | | 00020888 20 48 61 6c 74 20 3d 3e | Halt =>| 00020890 20 50 72 6f 63 65 73 73 | Process| 00020898 6f 72 20 6d 69 63 72 6f |or micro| 000208a0 63 6f 64 65 20 65 72 72 |code err| 000208a8 6f 72 20 20 20 20 20 20 |or | 000208b0 20 20 20 20 20 20 20 20 | | 000208b8 20 20 20 | | .XXX[0x3] 000208bb 48 61 6c 74 20 |Halt | .XXX[0x5] 000208c0 3d 3e 20 50 72 6f 63 65 |=> Proce| .XXX[0x28] 000208c8 73 73 6f 72 20 73 6f 66 |ssor sof| 000208d0 74 77 61 72 65 20 65 72 |tware er| 000208d8 72 6f 72 20 20 20 20 20 |ror | 000208e0 20 20 20 20 20 20 20 20 | | 000208e8 20 20 20 20 20 | | .XXX[0x5] 000208ed 48 61 6c |Hal | .XXX[0x3] 000208f0 74 20 3d 3e 20 53 68 75 |t => Shu| .XXX[0x28] 000208f8 74 64 6f 77 6e 20 66 72 |tdown fr| 00020900 6f 6d 20 45 6e 76 69 72 |om Envir| 00020908 6f 6e 6d 65 6e 74 20 20 |onment | 00020910 20 20 20 20 20 20 20 20 | | 00020918 20 20 20 20 20 20 20 | | .XXX[0x7] 0002091f 48 |H | .XXX[0x1] 00020920 61 6c 74 20 3d 3e 20 50 |alt => P| .XXX[0x20] 00020928 72 6f 63 65 73 73 6f 72 |rocessor| 00020930 20 63 72 61 73 68 20 65 | crash e| 00020938 72 72 6f 72 20 20 20 20 |rror | 00020940 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00020950 20 72 65 66 72 65 73 68 | refresh| .XXX[0x20] 00020958 20 6d 61 63 68 69 6e 65 | machine| 00020960 20 63 68 65 63 6b 20 65 | check e| 00020968 72 72 6f 72 20 20 20 20 |rror | 00020970 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00020980 20 20 20 6d 61 63 68 69 | machi| .XXX[0x20] 00020988 6e 65 20 63 68 65 63 6b |ne check| 00020990 20 28 70 61 72 69 74 79 | (parity| 00020998 20 65 72 72 6f 72 29 20 | error) | 000209a0 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 000209b0 20 20 20 20 20 48 61 6c | Hal| .XXX[0x20] 000209b8 74 20 3d 3e 20 55 6e 6b |t => Unk| 000209c0 6e 6f 77 6e 20 65 72 72 |nown err| 000209c8 6f 72 20 68 61 6c 74 20 |or halt | 000209d0 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 000209e0 20 20 20 20 20 20 73 74 | st| .XXX[0x18] 000209e8 61 72 74 69 6e 67 20 73 |arting s| 000209f0 79 73 74 65 6d 20 61 66 |ystem af| 000209f8 74 65 72 20 |ter | .XXX[0x4] 000209fc 41 55 54 4f 42 4f 4f 54 |AUTOBOOT| .TXT 'AUTOBOOT_AFTER_CRASH' 00020a10 3e 3e 3e 20 74 68 65 20 |>>> the | .TXT '>>> the AUTOBOOT_AFTER_CRASH file does not exist - disabling auto reboot' 00020a58 4f 4e 43 45 |ONCE | .TXT 'ONCE' 00020a5c 3e 3e 3e 20 61 75 74 6f |>>> auto| .TXT '>>> auto reboot after crash is disabled this one time only' 00020a96 45 4e 41 42 4c 45 20 61 |ENABLE a| .TXT 'ENABLE automatic rebooting after a crash. ' 00020ac0 45 4e |EN | .TXT 'EN' 00020ac2 41 42 |AB | .TXT 'AB' 00020ac4 4c 45 |LE | .TXT 'LE' 00020ac6 3e 3e 3e 20 61 75 74 6f |>>> auto| .TXT '>>> auto reboot after crash is DISABLED in the AUTOBOOT_AFTER_CRASH file' 00020b0e 3e 3e 3e 20 69 6e 76 61 |>>> inva| .TXT '>>> invalid number of days in AUTOBOOT_AFTER_CRASH file - disabling auto reboot ' 00020b5e 52 31 30 30 30 5f 44 55 |R1000_DU| .TXT 'R1000_DUMP' 00020b68 3e 3e 3e 20 74 68 65 20 |>>> the | .TXT '>>> the previous crash at_' 00020b82 20 77 61 73 20 63 6c 61 | was cla| .TXT ' was classified as: ' 00020b96 5f 5f |__ | .TXT '__' 00020b98 5f 5f |__ | .TXT '__' 00020b9a 5f 5f |__ | .TXT '__' 00020b9c 3e 3e 3e 20 63 6f 75 6c |>>> coul| .TXT '>>> could not find crash reason text' 00020bc0 3e 3e 3e 20 6e 6f 20 70 |>>> no p| .TXT '>>> no previous crash info found in the tombstones' 00020bf2 2a 2a 2a 20 54 68 65 20 |*** The | .TXT '*** The previous system crash occurred_ ' 00020c1a 20 64 61 79 73 20 61 67 | days ag| .TXT ' days ago but the AUTOBOOT_AFTER_CRASH' 00020c40 20 20 20 20 66 69 6c 65 | file| .TXT ' file specifies that_' 00020c58 20 64 61 79 73 20 6f 72 | days or| .TXT ' days or more must elapse since the previous crash in ' 00020c8e 20 20 20 20 6f 72 64 65 | orde| .TXT ' order for an automatic reboot to occur. Please call Rational for assistance.' 00020cde 43 52 41 53 48 53 41 56 |CRASHSAV| .TXT 'CRASHSAVE ' 00020ce8 52 45 43 4f |RECO | .TXT 'RECO' 00020cec 56 5f 53 43 |V_SC | .TXT 'V_SC' 00020cf0 52 45 45 4e |REEN | .TXT 'REEN' 00020cf4 52 55 4e 5f 55 44 49 41 |RUN_UDIA| .TXT 'RUN_UDIAG ' 00020cfe 43 52 41 53 48 53 41 56 |CRASHSAV| .TXT 'CRASHSAVE ' 00020d08 52 45 43 4f |RECO | .TXT 'RECO' 00020d0c 56 5f 53 43 |V_SC | .TXT 'V_SC' 00020d10 52 45 45 4e |REEN | .TXT 'REEN' 00020d14 3e 3e 3e 20 54 68 65 20 |>>> The | .TXT '>>> The Confidence Test passed but the system just crashed due to a possible' 00020d60 20 20 20 20 68 61 72 64 | hard| .TXT ' hardware failure. The problem may be intermittent. Try to reboot the system.' 00020db0 43 52 41 53 48 53 41 56 |CRASHSAV| .TXT 'CRASHSAVE ' 00020dba 44 55 4d 50 5f 55 44 49 |DUMP_UDI| .TXT 'DUMP_UDIAG' 00020dc4 2a 2a 2a 20 74 68 65 20 |*** the | .TXT '*** the Confidence Test failed: now running the FRU tests ' 00020dfe 3e 3e 3e 20 41 75 74 6f |>>> Auto| .TXT '>>> Automatic Crash Recovery is disabled' 00020e26 43 52 41 53 48 53 41 56 |CRASHSAV| .TXT 'CRASHSAVE ' 00020e30 52 45 43 4f |RECO | .TXT 'RECO' 00020e34 56 5f 53 43 |V_SC | .TXT 'V_SC' 00020e38 52 45 45 4e |REEN | .TXT 'REEN' 00020e3c 54 68 65 20 52 31 30 30 |The R100| .TXT 'The R1000 has exceeded maximum safe temperature limits. ' 00020e74 52 65 73 74 61 72 74 69 |Restarti| .TXT 'Restarting system after loss of AC power' 00020e9c 52 65 73 74 61 72 74 69 |Restarti| .TXT 'Restarting system after White Button Reset or DC power fault' 00020ed8 43 4f 4e 46 49 47 55 52 |CONFIGUR| .TXT 'CONFIGURE ' 00020ee2 52 65 73 74 61 72 74 69 |Restarti| .TXT 'Restarting system after operator console BREAK key' 00020f14 52 65 73 74 61 72 74 69 |Restarti| .TXT 'Restarting system after operator or program invoked crash (EPO) ' 00020f54 52 65 73 74 61 72 74 69 |Restarti| .TXT 'Restarting system after automatically updating EEPROMs' 00020f8a 3e 3e 3e 20 50 6c 65 61 |>>> Plea| .TXT '>>> Please make a CRASHDUMP tape' 00020faa 20 5f | _ | .TXT ' _' 00020fac 52 65 73 74 61 72 69 6e |Restarin| .TXT 'Restaring system after IOP Kernel crash @_' 00020fd6 20 3d | = | .TXT ' =' 00020fd8 3e 20 |> | .XXX[0x2] 00020fda 49 4f 50 5f 50 41 4e 49 |IOP_PANI| .TXT 'IOP_PANICS.ERRMESS' 00020fec 52 65 73 74 61 72 69 6e |Restarin| .TXT 'Restaring system after IOA reboot request, reason =>' 00021020 49 4f 41 5f 50 41 4e 49 |IOA_PANI| .TXT 'IOA_PANICS.ERRMESS' 00021032 3d 3d 3d 3d 3d 3d 3d 3d |========| .TXT '====================================================' 00021066 5b 31 3b 37 6d 20 |[1;7m | .TXT '[1;7m ' 0002106c 43 52 41 53 48 5f 44 55 |CRASH_DU| .TXT 'CRASH_DUMP.SAVED_STATE' 00021082 3e 3e 3e 20 4e 4f 54 49 |>>> NOTI| .TXT '>>> NOTICE: the EPROM WRT PROT switch is OFF (at front of RESHA board) <<<' 000210cc 3e 3e 3e 20 4e 4f 54 49 |>>> NOTI| .TXT '>>> NOTICE: the OPERATOR_MODE switch is set to INTERACTIVE <<<' 0002110a 3e 3e 3e 20 57 41 52 4e |>>> WARN| .TXT '>>> WARNING: the system clock or power is margined <<<' 00021140 42 45 |BE | .TXT 'BE' 00021142 4b 49 |KI | .TXT 'KI' 00021144 4e 53 |NS | .TXT 'NS' 00021146 44 4f 55 53 45 20 |DOUSE | .TXT 'DOUSE ' 0002114c 24 5b 30 6d |$[0m | .XXX[0x4] 00021150 43 4c 49 2f 43 52 41 53 |CLI/CRAS| .TXT 'CLI/CRASH MENU - options are: ' 0002116e 20 5f | _ | .TXT ' _' 00021170 20 3d 3e 5f | =>_ | .TXT ' =>_' 00021174 45 6e 74 65 72 20 6f 70 |Enter op| .TXT 'Enter option [' 00021182 5d 20 3a 5f |] :_ | .TXT '] :_' 00021186 43 4c |CL | .TXT 'CL' 00021188 49 20 |I | .XXX[0x2] 0002118a 54 4f 4d 42 53 54 4f 4e |TOMBSTON| .TXT 'TOMBSTONE ' 00021194 41 55 54 4f |AUTO | .TXT 'AUTO' 00021198 4c 4f |LO | .TXT 'LO' 0002119a 41 44 |AD | .TXT 'AD' 0002119c 45 52 |ER | .TXT 'ER' 0002119e 44 44 |DD | .TXT 'DD' 000211a0 43 20 |C | .XXX[0x2] 000211a2 4c 4f |LO | .TXT 'LO' 000211a4 41 44 |AD | .TXT 'AD' 000211a6 45 52 |ER | .TXT 'ER' 000211a8 45 45 44 42 |EEDB | .TXT 'EEDB' 000211ac 55 50 44 41 54 45 5f 45 |UPDATE_E| .TXT 'UPDATE_EEPROM ' 000211ba 41 55 54 4f 5f 55 50 44 |AUTO_UPD| .TXT 'AUTO_UPDATE ' 000211c6 2d 2d 2d 20 42 6f 6f 74 |--- Boot| .TXT '--- Booting the R1000 Environment --- ' 000211ec 4c 4f |LO | .TXT 'LO' 000211ee 41 44 |AD | .TXT 'AD' 000211f0 45 52 |ER | .TXT 'ER' 000211f2 53 54 41 4e |STAN | .TXT 'STAN' 000211f6 44 41 52 44 |DARD | .TXT 'DARD' 000211fa 69 6c 6c 65 67 61 6c 20 |illegal | .TXT 'illegal response, try again ' 00021216 65 6e |en | .XXX[0x2] 00021218 74 65 72 20 43 4c 49 20 |ter CLI | .XXX[0x8] 00021220 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00021230 20 20 20 20 6d 61 6b 65 | make| .XXX[0xd0] 00021238 20 61 20 43 52 41 53 48 | a CRASH| 00021240 44 55 4d 50 20 74 61 70 |DUMP tap| 00021248 65 20 20 20 20 20 20 20 |e | 00021250 20 20 64 69 73 70 6c 61 | displa| 00021258 79 20 43 52 41 53 48 20 |y CRASH | 00021260 49 4e 46 4f 20 20 20 20 |INFO | 00021268 20 20 20 20 20 20 20 20 | | 00021270 42 6f 6f 74 20 44 44 43 |Boot DDC| 00021278 20 63 6f 6e 66 69 67 75 | configu| 00021280 72 61 74 69 6f 6e 20 20 |ration | 00021288 20 20 20 20 20 20 42 6f | Bo| 00021290 6f 74 20 45 45 44 42 20 |ot EEDB | 00021298 63 6f 6e 66 69 67 75 72 |configur| 000212a0 61 74 69 6f 6e 20 20 20 |ation | 000212a8 20 20 20 20 42 6f 6f 74 | Boot| 000212b0 20 53 54 41 4e 44 41 52 | STANDAR| 000212b8 44 20 63 6f 6e 66 69 67 |D config| 000212c0 75 72 61 74 69 6f 6e 20 |uration | 000212c8 20 20 02 02 05 02 02 05 | | 000212d0 04 01 00 06 04 04 09 07 | | 000212d8 05 06 06 04 02 06 04 07 | | 000212e0 07 07 07 00 06 07 07 04 | | 000212e8 01 00 00 20 6e 6f 20 66 | no f| 000212f0 61 75 6c 74 20 66 6f 75 |ault fou| 000212f8 6e 64 20 20 20 20 20 20 |nd | 00021300 20 20 20 20 20 20 20 20 | | .BLANK 20[0x18] 00021318 20 20 20 20 20 20 48 61 | Ha| .XXX[0x20] 00021320 6c 74 20 3d 3e 20 53 79 |lt => Sy| 00021328 73 74 65 6d 20 65 72 72 |stem err| 00021330 6f 72 20 20 20 20 20 20 |or | 00021338 20 20 20 20 20 20 20 20 | | .BLANK 20[0x18] 00021350 48 61 6c 74 20 3d 3e 20 |Halt => | .XXX[0x90] 00021358 49 2f 4f 20 50 72 6f 63 |I/O Proc| 00021360 65 73 73 6f 72 20 68 61 |essor ha| 00021368 72 64 77 61 72 65 20 65 |rdware e| 00021370 72 72 6f 72 20 20 20 20 |rror | 00021378 20 20 20 20 20 20 20 20 | | 00021380 20 20 48 61 6c 74 20 3d | Halt =| 00021388 3e 20 49 2f 4f 20 50 72 |> I/O Pr| 00021390 6f 63 65 73 73 6f 72 20 |ocessor | 00021398 73 6f 66 74 77 61 72 65 |software| 000213a0 20 65 72 72 6f 72 20 20 | error | 000213a8 20 20 20 20 20 20 20 20 | | 000213b0 20 20 20 20 48 61 6c 74 | Halt| 000213b8 20 3d 3e 20 50 72 6f 63 | => Proc| 000213c0 65 73 73 6f 72 20 68 61 |essor ha| 000213c8 72 64 77 61 72 65 20 65 |rdware e| 000213d0 72 72 6f 72 20 20 20 20 |rror | 000213d8 20 20 20 20 20 20 20 20 | | 000213e0 20 20 20 20 20 20 | | .XXX[0x6] 000213e6 48 61 |Ha | .XXX[0x2] 000213e8 6c 74 20 3d 3e 20 50 72 |lt => Pr| .XXX[0x90] 000213f0 6f 63 65 73 73 6f 72 20 |ocessor | 000213f8 6d 75 6c 74 69 2d 62 69 |multi-bi| 00021400 74 20 6d 65 6d 6f 72 79 |t memory| 00021408 20 65 72 72 6f 72 20 20 | error | 00021410 20 20 20 20 20 20 20 20 | | 00021418 48 61 6c 74 20 3d 3e 20 |Halt => | 00021420 50 72 6f 63 65 73 73 6f |Processo| 00021428 72 20 53 59 53 42 55 53 |r SYSBUS| 00021430 20 68 61 72 64 77 61 72 | hardwar| 00021438 65 20 65 72 72 6f 72 20 |e error | 00021440 20 20 20 20 20 20 20 20 | | 00021448 20 20 48 61 6c 74 20 3d | Halt =| 00021450 3e 20 50 72 6f 63 65 73 |> Proces| 00021458 73 6f 72 20 6d 69 63 72 |sor micr| 00021460 6f 63 6f 64 65 20 65 72 |ocode er| 00021468 72 6f 72 20 20 20 20 20 |ror | 00021470 20 20 20 20 20 20 20 20 | | 00021478 20 20 20 20 | | .XXX[0x4] 0002147c 48 61 6c 74 |Halt | .XXX[0x4] 00021480 20 3d 3e 20 50 72 6f 63 | => Proc| .XXX[0x28] 00021488 65 73 73 6f 72 20 73 6f |essor so| 00021490 66 74 77 61 72 65 20 65 |ftware e| 00021498 72 72 6f 72 20 20 20 20 |rror | 000214a0 20 20 20 20 20 20 20 20 | | 000214a8 20 20 20 20 20 20 | | .XXX[0x6] 000214ae 48 61 |Ha | .XXX[0x2] 000214b0 6c 74 20 3d 3e 20 53 68 |lt => Sh| .XXX[0x20] 000214b8 75 74 64 6f 77 6e 20 66 |utdown f| 000214c0 72 6f 6d 20 45 6e 76 69 |rom Envi| 000214c8 72 6f 6e 6d 65 6e 74 20 |ronment | 000214d0 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 000214e0 48 61 6c 74 20 3d 3e 20 |Halt => | .XXX[0x20] 000214e8 50 72 6f 63 65 73 73 6f |Processo| 000214f0 72 20 63 72 61 73 68 20 |r crash | 000214f8 65 72 72 6f 72 20 20 20 |error | 00021500 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00021510 20 20 72 65 66 72 65 73 | refres| .XXX[0x20] 00021518 68 20 6d 61 63 68 69 6e |h machin| 00021520 65 20 63 68 65 63 6b 20 |e check | 00021528 65 72 72 6f 72 20 20 20 |error | 00021530 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00021540 20 20 20 20 6d 61 63 68 | mach| .XXX[0x20] 00021548 69 6e 65 20 63 68 65 63 |ine chec| 00021550 6b 20 28 70 61 72 69 74 |k (parit| 00021558 79 20 65 72 72 6f 72 29 |y error)| 00021560 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 00021570 20 20 20 20 20 20 | | .BLANK 20[0x6] 00021576 48 61 |Ha | .XXX[0x2] 00021578 6c 74 20 3d 3e 20 55 6e |lt => Un| .XXX[0x18] 00021580 6b 6e 6f 77 6e 20 65 72 |known er| 00021588 72 6f 72 20 68 61 6c 74 |ror halt| 00021590 20 20 20 20 20 20 20 20 | | .BLANK 20[0x10] 000215a0 20 20 20 20 20 20 20 | | .BLANK 20[0x7] 000215a7 06 | | .XXX[0x1] 000215a8 07 04 02 0c 0d 0e 0f 00 | | .XXX[0x8] 000215b0 ; -------------------------------------------------------------------------------------- 000215b0 ; OMSI PASCAL Function 000215b0 ; <LVAR 0x008 4(w)> 000215b0 ; <LVAR -0x004 @> 000215b0 ; <LVAR -0x00c @ 4(r)> 000215b0 ; -------------------------------------------------------------------------------------- 000215b0 4e 56 ff ce |NV | LINK.W A6,#0xffce 000215b4 bf d5 | | CMPA.L (A5),A7 000215b6 62 06 |b | BHI 0x215be 000215b8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000215bc 4e 76 |Nv | TRAPV 000215be de fc 00 26 | & | ADDA.W #0x26,A7 000215c2 48 e7 e1 c0 |H | MOVEM.L A1+A0+D7+D2+D1+D0,-(A7) 000215c6 43 ee ff f4 |C | LEA.L (A6-0xc),A1 000215ca 72 0f |r | MOVEQ.L #0x0f,D1 000215cc 74 03 |t | MOVEQ.L #0x03,D2 000215ce 48 6e ff fc |Hn | PEA.L (A6-0x4) 000215d2 4e b9 00 01 05 9e |N | JSR ReadClusterNo(VAR a : Long) 000215d8 58 4f |XO | ADDQ.L #0x4,A7 000215da 48 51 |HQ | PEA.L (A1) 000215dc 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000215e2 58 4f |XO | ADDQ.L #0x4,A7 000215e4 7e 00 |~ | MOVEQ.L #0x00,D7 000215e6 be 82 | | CMP.L D2,D7 000215e8 63 02 |c | BLS 0x215ec 000215ea 4e 4f |NO | TRAP #15 000215ec 2f 11 |/ | MOVE.L (A1),-(A7) 000215ee 42 80 |B | CLR.L D0 000215f0 10 36 78 fc | 6x | MOVE.B (A6+D7.L-#0x4),D0 000215f4 e8 40 | @ | ASR.W #0x4,D0 000215f6 52 40 |R@ | ADDQ.W #0x1,D0 000215f8 53 40 |S@ | SUBQ.W #0x1,D0 000215fa 41 81 |A | CHK.W D1,D0 000215fc 41 fa eb e2 |A | LEA.L 0x201e0,A0 00021600 1f 30 00 00 | 0 | MOVE.B (A0+D0.W),-(A7) 00021604 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 0002160a 54 4f |TO | ADDQ.L #0x2,A7 0002160c 2e 91 |. | MOVE.L (A1),(A7) 0002160e 42 80 |B | CLR.L D0 00021610 10 36 78 fc | 6x | MOVE.B (A6+D7.L-#0x4),D0 00021614 c0 41 | A | AND.W D1,D0 00021616 52 40 |R@ | ADDQ.W #0x1,D0 00021618 53 40 |S@ | SUBQ.W #0x1,D0 0002161a 41 81 |A | CHK.W D1,D0 0002161c 41 fa eb c2 |A | LEA.L 0x201e0,A0 00021620 1f 30 00 00 | 0 | MOVE.B (A0+D0.W),-(A7) 00021624 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 0002162a 5c 4f |\O | ADDQ.L #0x6,A7 0002162c 52 87 |R | ADDQ.L #0x1,D7 0002162e be 82 | | CMP.L D2,D7 00021630 6f b4 |o | BLE 0x215e6 00021632 2d 51 00 08 |-Q | MOVE.L (A1),(A6+0x8) 00021636 4c df 03 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1 0002163a 4e 5e |N^ | UNLK A6 0002163c 4e 75 |Nu | RTS 0002163e ; -------------------------------------------------------------------------------------- 0002163e ; OMSI PASCAL Function 0002163e ; <LVAR -0x004 @> 0002163e ; -------------------------------------------------------------------------------------- 0002163e 4e 56 ff 92 |NV | LINK.W A6,#0xff92 00021642 bf d5 | | CMPA.L (A5),A7 00021644 62 06 |b | BHI 0x2164c 00021646 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002164a 4e 76 |Nv | TRAPV 0002164c de fc 00 6a | j | ADDA.W #0x6a,A7 00021650 48 e7 f3 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D3+D2+D1+D0,-(A7) 00021654 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 0002165a 47 f8 00 01 |G | LEA.L 0x1,A3 0002165e 72 01 |r | MOVEQ.L #0x01,D1 00021660 74 1a |t | MOVEQ.L #0x1a,D2 00021662 76 19 |v | MOVEQ.L #0x19,D3 00021664 10 39 00 02 43 af | 9 C | MOVE.B 0x243af,D0 0002166a ef 08 | | LSL.B #0x7,D0 0002166c ee 08 | | LSR.B #0x7,D0 0002166e 67 00 01 66 |g f | BEQ 0x217d6 00021672 55 4f |UO | SUBQ.L #0x2,A7 00021674 48 78 01 80 |Hx | PEA.L 0x180 00021678 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 0002167e 58 4f |XO | ADDQ.L #0x4,A7 00021680 10 2f 00 01 | / | MOVE.B (A7+0x1),D0 00021684 0c 00 00 58 | X | CMPI.B #0x58,D0 00021688 66 30 |f0 | BNE 0x216ba 0002168a 3f 3a eb ec |?: | MOVE.W 0x20278,-(A7) 0002168e 3f 3a eb e6 |?: | MOVE.W 0x20276,-(A7) 00021692 3f 3a eb e0 |?: | MOVE.W 0x20274,-(A7) 00021696 59 4f |YO | SUBQ.L #0x4,A7 00021698 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002169c 3f 01 |? | MOVE.W D1,-(A7) 0002169e 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 000216a2 4e 92 |N | JSR (A2) 000216a4 50 4f |PO | ADDQ.L #0x8,A7 000216a6 48 53 |HS | PEA.L (A3) 000216a8 1f 01 | | MOVE.B D1,-(A7) 000216aa 48 6e ff fc |Hn | PEA.L (A6-0x4) 000216ae 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 000216b4 de fc 00 14 | | ADDA.W #0x14,A7 000216b8 60 2a |`* | BRA 0x216e4 000216ba 2f 3a eb c2 |/: | MOVE.L 0x2027e,-(A7) 000216be 2f 3a eb ba |/: | MOVE.L 0x2027a,-(A7) 000216c2 59 4f |YO | SUBQ.L #0x4,A7 000216c4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000216c8 3f 01 |? | MOVE.W D1,-(A7) 000216ca 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 000216ce 4e 92 |N | JSR (A2) 000216d0 50 4f |PO | ADDQ.L #0x8,A7 000216d2 48 53 |HS | PEA.L (A3) 000216d4 1f 01 | | MOVE.B D1,-(A7) 000216d6 48 6e ff fc |Hn | PEA.L (A6-0x4) 000216da 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 000216e0 de fc 00 16 | | ADDA.W #0x16,A7 000216e4 55 4f |UO | SUBQ.L #0x2,A7 000216e6 4e b9 00 01 03 f8 |N | JSR GetConsoleConfig() : Long 000216ec 20 1f | | MOVE.L (A7)+,D0 000216ee b0 81 | | CMP.L D1,D0 000216f0 67 00 00 e4 |g | BEQ 0x217d6 000216f4 41 fa eb 28 |A ( | LEA.L 0x2021e,A0 000216f8 70 16 |p | MOVEQ.L #0x16,D0 000216fa 3f 20 |? | MOVE.W -(A0),-(A7) 000216fc 51 c8 ff fc |Q | DBF D0,0x216fa 00021700 51 4f |QO | SUBQ.L #0x8,A7 00021702 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021706 3f 01 |? | MOVE.W D1,-(A7) 00021708 3f 3c 00 2e |?< . | MOVE.W #0x2e,-(A7) 0002170c 4e 92 |N | JSR (A2) 0002170e 58 4f |XO | ADDQ.L #0x4,A7 00021710 4e ba fe 9e |N | JSR 0x215b0 00021714 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002171a 50 4f |PO | ADDQ.L #0x8,A7 0002171c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021722 de fc 00 32 | 2 | ADDA.W #0x32,A7 00021726 7e 00 |~ | MOVEQ.L #0x00,D7 00021728 7c 00 || | MOVEQ.L #0x00,D6 0002172a 9e c2 | | SUBA.W D2,A7 0002172c 20 4f | O | MOVEA.L A7,A0 0002172e 43 fa eb 10 |C | LEA.L 0x20240,A1 00021732 70 18 |p | MOVEQ.L #0x18,D0 00021734 10 d9 | | MOVE.B (A1)+,(A0)+ 00021736 51 c8 ff fc |Q | DBF D0,0x21734 0002173a 5d 4f |]O | SUBQ.L #0x6,A7 0002173c 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021740 3f 01 |? | MOVE.W D1,-(A7) 00021742 3f 03 |? | MOVE.W D3,-(A7) 00021744 4e 92 |N | JSR (A2) 00021746 5c 4f |\O | ADDQ.L #0x6,A7 00021748 1e 81 | | MOVE.B D1,(A7) 0002174a 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00021750 5c 4f |\O | ADDQ.L #0x6,A7 00021752 10 1f | | MOVE.B (A7)+,D0 00021754 48 80 |H | EXTB.W D0 00021756 41 81 |A | CHK.W D1,D0 00021758 de c2 | | ADDA.W D2,A7 0002175a 1e 00 | | MOVE.B D0,D7 0002175c 66 32 |f2 | BNE 0x21790 0002175e 9e c2 | | SUBA.W D2,A7 00021760 20 4f | O | MOVEA.L A7,A0 00021762 43 fa ea f6 |C | LEA.L 0x2025a,A1 00021766 70 18 |p | MOVEQ.L #0x18,D0 00021768 10 d9 | | MOVE.B (A1)+,(A0)+ 0002176a 51 c8 ff fc |Q | DBF D0,0x21768 0002176e 5d 4f |]O | SUBQ.L #0x6,A7 00021770 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021774 3f 01 |? | MOVE.W D1,-(A7) 00021776 3f 03 |? | MOVE.W D3,-(A7) 00021778 4e 92 |N | JSR (A2) 0002177a 5c 4f |\O | ADDQ.L #0x6,A7 0002177c 1e 81 | | MOVE.B D1,(A7) 0002177e 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00021784 5c 4f |\O | ADDQ.L #0x6,A7 00021786 10 1f | | MOVE.B (A7)+,D0 00021788 48 80 |H | EXTB.W D0 0002178a 41 81 |A | CHK.W D1,D0 0002178c de c2 | | ADDA.W D2,A7 0002178e 1c 00 | | MOVE.B D0,D6 00021790 4a 07 |J | TST.B D7 00021792 66 04 |f | BNE 0x21798 00021794 4a 06 |J | TST.B D6 00021796 67 92 |g | BEQ 0x2172a 00021798 4a 06 |J | TST.B D6 0002179a 67 3a |g: | BEQ 0x217d6 0002179c 4e b9 00 01 02 16 |N | JSR KC0b 000217a2 48 53 |HS | PEA.L (A3) 000217a4 4e b9 00 01 03 f4 |N | JSR SetConsoleConfig(a : Long) 000217aa 9e fc 00 1e | | SUBA.W #0x1e,A7 000217ae 20 4f | O | MOVEA.L A7,A0 000217b0 43 fa ea 6c |C l | LEA.L 0x2021e,A1 000217b4 70 20 |p | MOVEQ.L #0x20,D0 000217b6 10 d9 | | MOVE.B (A1)+,(A0)+ 000217b8 51 c8 ff fc |Q | DBF D0,0x217b6 000217bc 59 4f |YO | SUBQ.L #0x4,A7 000217be 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000217c2 3f 01 |? | MOVE.W D1,-(A7) 000217c4 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 000217c8 4e 92 |N | JSR (A2) 000217ca 50 4f |PO | ADDQ.L #0x8,A7 000217cc 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000217d2 de fc 00 26 | & | ADDA.W #0x26,A7 000217d6 4c df 0f cf |L | MOVEM.L (A7)+,D0+D1+D2+D3+D6+D7+A0+A1+A2+A3 000217da 4e 5e |N^ | UNLK A6 000217dc 4e 75 |Nu | RTS 000217de ; -------------------------------------------------------------------------------------- 000217de ; OMSI PASCAL Function 000217de ; <LVAR -0x004 @ 1(r)> 000217de ; <LVAR -0x00a 2(r)> 000217de ; <LVAR -0x00c @ 4(r)> 000217de ; -------------------------------------------------------------------------------------- 000217de 4e 56 ff 88 |NV | LINK.W A6,#0xff88 000217e2 bf d5 | | CMPA.L (A5),A7 000217e4 62 06 |b | BHI 0x217ec 000217e6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000217ea 4e 76 |Nv | TRAPV 000217ec de fc 00 6c | l | ADDA.W #0x6c,A7 000217f0 48 e7 c1 e8 |H | MOVEM.L A4+A2+A1+A0+D7+D1+D0,-(A7) 000217f4 45 ee ff f4 |E | LEA.L (A6-0xc),A2 000217f8 72 01 |r | MOVEQ.L #0x01,D1 000217fa 48 52 |HR | PEA.L (A2) 000217fc 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 00021802 58 4f |XO | ADDQ.L #0x4,A7 00021804 7e 00 |~ | MOVEQ.L #0x00,D7 00021806 30 2e ff f6 |0. | MOVE.W (A6-0xa),D0 0002180a ef 48 | H | LSL.W #0x7,D0 0002180c e0 48 | H | LSR.W #0x8,D0 0002180e e8 48 | H | LSR.W #0x4,D0 00021810 67 02 |g | BEQ 0x21814 00021812 52 07 |R | ADDQ.B #0x1,D7 00021814 4a 07 |J | TST.B D7 00021816 66 00 00 84 |f | BNE 0x2189c 0002181a 9e fc 00 3c | < | SUBA.W #0x3c,A7 0002181e 20 4f | O | MOVEA.L A7,A0 00021820 43 fa ea 60 |C ` | LEA.L 0x20282,A1 00021824 70 3a |p: | MOVEQ.L #0x3a,D0 00021826 10 d9 | | MOVE.B (A1)+,(A0)+ 00021828 51 c8 ff fc |Q | DBF D0,0x21826 0002182c 51 4f |QO | SUBQ.L #0x8,A7 0002182e 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021832 3f 01 |? | MOVE.W D1,-(A7) 00021834 3f 3c 00 3b |?< ; | MOVE.W #0x3b,-(A7) 00021838 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002183e 50 4f |PO | ADDQ.L #0x8,A7 00021840 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00021846 58 4f |XO | ADDQ.L #0x4,A7 00021848 28 5f |(_ | MOVEA.L (A7)+,A4 0002184a de fc 00 38 | 8 | ADDA.W #0x38,A7 0002184e 2e 8c |. | MOVE.L A4,(A7) 00021850 48 52 |HR | PEA.L (A2) 00021852 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021856 4e b9 00 01 03 10 |N | JSR ConvertTimestamp(MOD input : String; b : L; VAR status : Bool) 0002185c de fc 00 0c | | ADDA.W #0xc,A7 00021860 4a 2e ff fc |J. | TST.B (A6-0x4) 00021864 67 0c |g | BEQ 0x21872 00021866 2f 12 |/ | MOVE.L (A2),-(A7) 00021868 4e b9 00 01 03 0c |N | JSR SetRtc(a: TimeStamp) 0002186e 58 4f |XO | ADDQ.L #0x4,A7 00021870 60 2a |`* | BRA 0x2189c 00021872 41 fa ea 76 |A v | LEA.L 0x202ea,A0 00021876 70 0a |p | MOVEQ.L #0x0a,D0 00021878 2f 20 |/ | MOVE.L -(A0),-(A7) 0002187a 51 c8 ff fc |Q | DBF D0,0x21878 0002187e 59 4f |YO | SUBQ.L #0x4,A7 00021880 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021884 3f 01 |? | MOVE.W D1,-(A7) 00021886 3f 3c 00 2c |?< , | MOVE.W #0x2c,-(A7) 0002188a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021890 50 4f |PO | ADDQ.L #0x8,A7 00021892 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021898 de fc 00 30 | 0 | ADDA.W #0x30,A7 0002189c 4a 07 |J | TST.B D7 0002189e 67 00 ff 5a |g Z | BEQ 0x217fa 000218a2 4c df 17 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2+A4 000218a6 4e 5e |N^ | UNLK A6 000218a8 4e 75 |Nu | RTS 000218aa ; -------------------------------------------------------------------------------------- 000218aa ; OMSI PASCAL Function 000218aa ; <LVAR -0x004 @ 1(r)> 000218aa ; <LVAR -0x006 @ 2(r)> 000218aa ; <LVAR -0x008 @ 1(r)> 000218aa ; -------------------------------------------------------------------------------------- 000218aa 4e 56 ff 80 |NV | LINK.W A6,#0xff80 000218ae bf d5 | | CMPA.L (A5),A7 000218b0 62 06 |b | BHI 0x218b8 000218b2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000218b6 4e 76 |Nv | TRAPV 000218b8 de fc 00 74 | t | ADDA.W #0x74,A7 000218bc 48 e7 f0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7) 000218c0 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 000218c6 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3 000218cc 49 ee ff fc |I | LEA.L (A6-0x4),A4 000218d0 72 01 |r | MOVEQ.L #0x01,D1 000218d2 74 2a |t* | MOVEQ.L #0x2a,D2 000218d4 76 02 |v | MOVEQ.L #0x02,D3 000218d6 9e fc 00 28 | ( | SUBA.W #0x28,A7 000218da 20 4f | O | MOVEA.L A7,A0 000218dc 43 fa eb d0 |C | LEA.L 0x204ae,A1 000218e0 70 26 |p& | MOVEQ.L #0x26,D0 000218e2 10 d9 | | MOVE.B (A1)+,(A0)+ 000218e4 51 c8 ff fc |Q | DBF D0,0x218e2 000218e8 59 4f |YO | SUBQ.L #0x4,A7 000218ea 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000218ee 3f 01 |? | MOVE.W D1,-(A7) 000218f0 3f 3c 00 27 |?< ' | MOVE.W #0x27,-(A7) 000218f4 4e 92 |N | JSR (A2) 000218f6 50 4f |PO | ADDQ.L #0x8,A7 000218f8 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000218fe de c2 | | ADDA.W D2,A7 00021900 1e bc 00 20 | | MOVE.B #0x20,(A7) 00021904 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char) 0002190a 54 4f |TO | ADDQ.L #0x2,A7 0002190c 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00021910 48 6e ff fa |Hn | PEA.L (A6-0x6) 00021914 4e b9 00 01 02 00 |N | JSR KC00_GetBootDev(VAR a : Byte; VAR b : Word) 0002191a 50 4f |PO | ADDQ.L #0x8,A7 0002191c 10 2e ff f8 | . | MOVE.B (A6-0x8),D0 00021920 b0 03 | | CMP.B D3,D0 00021922 67 38 |g8 | BEQ 0x2195c 00021924 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 0002192a 9e c2 | | SUBA.W D2,A7 0002192c 20 4f | O | MOVEA.L A7,A0 0002192e 43 fa eb a6 |C | LEA.L 0x204d6,A1 00021932 70 28 |p( | MOVEQ.L #0x28,D0 00021934 10 d9 | | MOVE.B (A1)+,(A0)+ 00021936 51 c8 ff fc |Q | DBF D0,0x21934 0002193a 59 4f |YO | SUBQ.L #0x4,A7 0002193c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021940 3f 01 |? | MOVE.W D1,-(A7) 00021942 3f 3c 00 29 |?< ) | MOVE.W #0x29,-(A7) 00021946 4e 92 |N | JSR (A2) 00021948 50 4f |PO | ADDQ.L #0x8,A7 0002194a 4e 93 |N | JSR (A3) 0002194c de fc 00 2e | . | ADDA.W #0x2e,A7 00021950 48 78 00 10 |Hx | PEA.L 0x10 00021954 4e b9 00 01 02 20 |N | JSR KC10_Panic(code : Long) 0002195a 58 4f |XO | ADDQ.L #0x4,A7 0002195c 30 2e ff fa |0. | MOVE.W (A6-0x6),D0 00021960 41 bc 00 0f |A | CHK.W #0xf,D0 00021964 3f 00 |? | MOVE.W D0,-(A7) 00021966 48 54 |HT | PEA.L (A4) 00021968 4e b9 00 01 03 94 |N | JSR MountDisk(drive : Word ; VAR status : Byte) 0002196e 5c 4f |\O | ADDQ.L #0x6,A7 00021970 4a 14 |J | TST.B (A4) 00021972 67 00 01 3c |g < | BEQ 0x21ab0 00021976 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 0002197c 10 14 | | MOVE.B (A4),D0 0002197e 48 80 |H | EXTB.W D0 00021980 04 40 00 0c | @ | SUBI.W #0x000c,D0 00021984 b0 43 | C | CMP.W D3,D0 00021986 62 00 00 d6 |b | BHI 0x21a5e 0002198a d0 40 | @ | ADD.W D0,D0 0002198c 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00021994 00 06 | | .CONST 0x6 ; [0x0] -> 0x2199a 00021996 00 4e | N | .CONST 0x4e ; [0x1] -> 0x219e2 00021998 00 84 | | .CONST 0x84 ; [0x2] -> 0x21a18 0002199a switch@0x2198c[0x0]: 0002199a 41 fa e9 8e |A | LEA.L 0x2032a,A0 0002199e 70 0f |p | MOVEQ.L #0x0f,D0 000219a0 2f 20 |/ | MOVE.L -(A0),-(A7) 000219a2 51 c8 ff fc |Q | DBF D0,0x219a0 000219a6 59 4f |YO | SUBQ.L #0x4,A7 000219a8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000219ac 3f 01 |? | MOVE.W D1,-(A7) 000219ae 3f 3c 00 40 |?< @ | MOVE.W #0x40,-(A7) 000219b2 4e 92 |N | JSR (A2) 000219b4 50 4f |PO | ADDQ.L #0x8,A7 000219b6 4e 93 |N | JSR (A3) 000219b8 58 4f |XO | ADDQ.L #0x4,A7 000219ba 20 4f | O | MOVEA.L A7,A0 000219bc 43 fa ea 10 |C | LEA.L 0x203ce,A1 000219c0 70 3e |p> | MOVEQ.L #0x3e,D0 000219c2 10 d9 | | MOVE.B (A1)+,(A0)+ 000219c4 51 c8 ff fc |Q | DBF D0,0x219c2 000219c8 59 4f |YO | SUBQ.L #0x4,A7 000219ca 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000219ce 3f 01 |? | MOVE.W D1,-(A7) 000219d0 3f 3c 00 3f |?< ? | MOVE.W #0x3f,-(A7) 000219d4 4e 92 |N | JSR (A2) 000219d6 50 4f |PO | ADDQ.L #0x8,A7 000219d8 4e 93 |N | JSR (A3) 000219da de fc 00 44 | D | ADDA.W #0x44,A7 000219de 60 00 00 c4 |` | BRA 0x21aa4 000219e2 switch@0x2198c[0x1]: 000219e2 9e fc 00 36 | 6 | SUBA.W #0x36,A7 000219e6 20 4f | O | MOVEA.L A7,A0 000219e8 43 fa e9 40 |C @ | LEA.L 0x2032a,A1 000219ec 70 34 |p4 | MOVEQ.L #0x34,D0 000219ee 10 d9 | | MOVE.B (A1)+,(A0)+ 000219f0 51 c8 ff fc |Q | DBF D0,0x219ee 000219f4 59 4f |YO | SUBQ.L #0x4,A7 000219f6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000219fa 3f 01 |? | MOVE.W D1,-(A7) 000219fc 3f 3c 00 35 |?< 5 | MOVE.W #0x35,-(A7) 00021a00 4e 92 |N | JSR (A2) 00021a02 50 4f |PO | ADDQ.L #0x8,A7 00021a04 4e 93 |N | JSR (A3) 00021a06 5d 4f |]O | SUBQ.L #0x6,A7 00021a08 20 4f | O | MOVEA.L A7,A0 00021a0a 43 fa ea 02 |C | LEA.L 0x2040e,A1 00021a0e 70 3e |p> | MOVEQ.L #0x3e,D0 00021a10 10 d9 | | MOVE.B (A1)+,(A0)+ 00021a12 51 c8 ff fc |Q | DBF D0,0x21a10 00021a16 60 b0 |` | BRA 0x219c8 00021a18 switch@0x2198c[0x2]: 00021a18 41 fa e9 7a |A z | LEA.L 0x20394,A0 00021a1c 70 0c |p | MOVEQ.L #0x0c,D0 00021a1e 2f 20 |/ | MOVE.L -(A0),-(A7) 00021a20 51 c8 ff fc |Q | DBF D0,0x21a1e 00021a24 59 4f |YO | SUBQ.L #0x4,A7 00021a26 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021a2a 3f 01 |? | MOVE.W D1,-(A7) 00021a2c 3f 3c 00 34 |?< 4 | MOVE.W #0x34,-(A7) 00021a30 4e 92 |N | JSR (A2) 00021a32 50 4f |PO | ADDQ.L #0x8,A7 00021a34 4e 93 |N | JSR (A3) 00021a36 5d 4f |]O | SUBQ.L #0x6,A7 00021a38 20 4f | O | MOVEA.L A7,A0 00021a3a 43 fa ea 12 |C | LEA.L 0x2044e,A1 00021a3e 70 3c |p< | MOVEQ.L #0x3c,D0 00021a40 10 d9 | | MOVE.B (A1)+,(A0)+ 00021a42 51 c8 ff fc |Q | DBF D0,0x21a40 00021a46 59 4f |YO | SUBQ.L #0x4,A7 00021a48 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021a4c 3f 01 |? | MOVE.W D1,-(A7) 00021a4e 3f 3c 00 3d |?< = | MOVE.W #0x3d,-(A7) 00021a52 4e 92 |N | JSR (A2) 00021a54 50 4f |PO | ADDQ.L #0x8,A7 00021a56 4e 93 |N | JSR (A3) 00021a58 de fc 00 42 | B | ADDA.W #0x42,A7 00021a5c 60 46 |`F | BRA 0x21aa4 00021a5e 41 fa e9 6e |A n | LEA.L 0x203ce,A0 00021a62 70 1c |p | MOVEQ.L #0x1c,D0 00021a64 3f 20 |? | MOVE.W -(A0),-(A7) 00021a66 51 c8 ff fc |Q | DBF D0,0x21a64 00021a6a 59 4f |YO | SUBQ.L #0x4,A7 00021a6c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021a70 3f 01 |? | MOVE.W D1,-(A7) 00021a72 3f 3c 00 3a |?< : | MOVE.W #0x3a,-(A7) 00021a76 4e 92 |N | JSR (A2) 00021a78 50 4f |PO | ADDQ.L #0x8,A7 00021a7a 4e 93 |N | JSR (A3) 00021a7c de fc 00 1c | | ADDA.W #0x1c,A7 00021a80 20 4f | O | MOVEA.L A7,A0 00021a82 43 fa ea 08 |C | LEA.L 0x2048c,A1 00021a86 70 20 |p | MOVEQ.L #0x20,D0 00021a88 10 d9 | | MOVE.B (A1)+,(A0)+ 00021a8a 51 c8 ff fc |Q | DBF D0,0x21a88 00021a8e 59 4f |YO | SUBQ.L #0x4,A7 00021a90 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021a94 3f 01 |? | MOVE.W D1,-(A7) 00021a96 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 00021a9a 4e 92 |N | JSR (A2) 00021a9c 50 4f |PO | ADDQ.L #0x8,A7 00021a9e 4e 93 |N | JSR (A3) 00021aa0 de fc 00 26 | & | ADDA.W #0x26,A7 00021aa4 48 78 00 11 |Hx | PEA.L 0x11 00021aa8 4e b9 00 01 02 20 |N | JSR KC10_Panic(code : Long) 00021aae 58 4f |XO | ADDQ.L #0x4,A7 00021ab0 4e b9 00 01 03 a4 |N | JSR Open_ERROR_LOG(void) 00021ab6 4e b9 00 01 05 e6 |N | JSR Set_fc04_to_01(void) 00021abc 2f 3a ea 42 |/: B | MOVE.L 0x20500,-(A7) 00021ac0 59 4f |YO | SUBQ.L #0x4,A7 00021ac2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021ac6 3f 01 |? | MOVE.W D1,-(A7) 00021ac8 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00021acc 4e 92 |N | JSR (A2) 00021ace 50 4f |PO | ADDQ.L #0x8,A7 00021ad0 4e 93 |N | JSR (A3) 00021ad2 50 4f |PO | ADDQ.L #0x8,A7 00021ad4 4c df 1f 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4 00021ad8 4e 5e |N^ | UNLK A6 00021ada 4e 75 |Nu | RTS 00021adc ; -------------------------------------------------------------------------------------- 00021adc ; OMSI PASCAL Function 00021adc ; <LVAR -0x007 1(r)> 00021adc ; <LVAR -0x008 1(r)> 00021adc ; <LVAR -0x009 1(r)> 00021adc ; <LVAR -0x00a @ 1(r)> 00021adc ; <LVAR -0x00c @ 2(r)> 00021adc ; <LVAR -0x00e @ 2(r)> 00021adc ; <LVAR -0x410 2(w)> 00021adc ; <LVAR -0x412 @> 00021adc ; <LVAR -0x416 @ 4(r)> 00021adc ; <LVAR -0x418 @ 1(r)> 00021adc ; <LVAR -0x41c @ 4(rw)> 00021adc ; -------------------------------------------------------------------------------------- 00021adc 4e 56 fb 6a |NV j | LINK.W A6,#0xfb6a 00021ae0 bf d5 | | CMPA.L (A5),A7 00021ae2 62 06 |b | BHI 0x21aea 00021ae4 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021ae8 4e 76 |Nv | TRAPV 00021aea de fc 00 76 | v | ADDA.W #0x76,A7 00021aee 48 e7 fb f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7) 00021af2 43 ee fb e8 |C | LEA.L (A6-0x418),A1 00021af6 45 ee fb ea |E | LEA.L (A6-0x416),A2 00021afa 47 ee fb e4 |G | LEA.L (A6-0x41c),A3 00021afe 72 01 |r | MOVEQ.L #0x01,D1 00021b00 74 14 |t | MOVEQ.L #0x14,D2 00021b02 76 10 |v | MOVEQ.L #0x10,D3 00021b04 78 08 |x | MOVEQ.L #0x08,D4 00021b06 7e 04 |~ | MOVEQ.L #0x04,D7 00021b08 2f 3a e9 fe |/: | MOVE.L 0x20508,-(A7) 00021b0c 2f 3a e9 f6 |/: | MOVE.L 0x20504,-(A7) 00021b10 51 4f |QO | SUBQ.L #0x8,A7 00021b12 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021b16 3f 01 |? | MOVE.W D1,-(A7) 00021b18 3f 04 |? | MOVE.W D4,-(A7) 00021b1a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021b20 2e 87 |. | MOVE.L D7,(A7) 00021b22 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021b28 58 4f |XO | ADDQ.L #0x4,A7 00021b2a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021b30 50 4f |PO | ADDQ.L #0x8,A7 00021b32 28 5f |(_ | MOVEA.L (A7)+,A4 00021b34 58 4f |XO | ADDQ.L #0x4,A7 00021b36 2e 8c |. | MOVE.L A4,(A7) 00021b38 42 27 |B' | CLR.B -(A7) 00021b3a 42 27 |B' | CLR.B -(A7) 00021b3c 48 78 00 00 |Hx | PEA.L 0x0 00021b40 48 51 |HQ | PEA.L (A1) 00021b42 48 52 |HR | PEA.L (A2) 00021b44 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00021b4a de c2 | | ADDA.W D2,A7 00021b4c 4a 11 |J | TST.B (A1) 00021b4e 66 16 |f | BNE 0x21b66 00021b50 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00021b54 1f 01 | | MOVE.B D1,-(A7) 00021b56 48 78 00 01 |Hx | PEA.L 0x1 00021b5a 48 51 |HQ | PEA.L (A1) 00021b5c 48 52 |HR | PEA.L (A2) 00021b5e 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00021b64 de c3 | | ADDA.W D3,A7 00021b66 26 8c |& | MOVE.L A4,(A3) 00021b68 53 87 |S | SUBQ.L #0x1,D7 00021b6a 2f 3a e9 a4 |/: | MOVE.L 0x20510,-(A7) 00021b6e 2f 3a e9 9c |/: | MOVE.L 0x2050c,-(A7) 00021b72 51 4f |QO | SUBQ.L #0x8,A7 00021b74 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021b78 3f 01 |? | MOVE.W D1,-(A7) 00021b7a 3f 04 |? | MOVE.W D4,-(A7) 00021b7c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021b82 2e 87 |. | MOVE.L D7,(A7) 00021b84 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021b8a 58 4f |XO | ADDQ.L #0x4,A7 00021b8c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021b92 50 4f |PO | ADDQ.L #0x8,A7 00021b94 28 5f |(_ | MOVEA.L (A7)+,A4 00021b96 58 4f |XO | ADDQ.L #0x4,A7 00021b98 2e 8c |. | MOVE.L A4,(A7) 00021b9a 42 27 |B' | CLR.B -(A7) 00021b9c 42 27 |B' | CLR.B -(A7) 00021b9e 48 78 00 00 |Hx | PEA.L 0x0 00021ba2 48 51 |HQ | PEA.L (A1) 00021ba4 48 52 |HR | PEA.L (A2) 00021ba6 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00021bac de c2 | | ADDA.W D2,A7 00021bae 4a 11 |J | TST.B (A1) 00021bb0 66 00 00 9e |f | BNE 0x21c50 00021bb4 4a 87 |J | TST.L D7 00021bb6 66 00 00 86 |f | BNE 0x21c3e 00021bba 2f 12 |/ | MOVE.L (A2),-(A7) 00021bbc 42 67 |Bg | CLR.W -(A7) 00021bbe 42 67 |Bg | CLR.W -(A7) 00021bc0 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00021bc4 1f 01 | | MOVE.B D1,-(A7) 00021bc6 41 ee fb ee |A | LEA.L (A6-0x412),A0 00021bca 2f 08 |/ | MOVE.L A0,-(A7) 00021bcc 48 51 |HQ | PEA.L (A1) 00021bce 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00021bd4 de fc 00 12 | | ADDA.W #0x12,A7 00021bd8 4e b9 00 01 05 ec |N | JSR Get_fc05() : Byte 00021bde 10 1f | | MOVE.B (A7)+,D0 00021be0 48 80 |H | EXTB.W D0 00021be2 48 c0 |H | EXTW.L D0 00021be4 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021bea 63 02 |c | BLS 0x21bee 00021bec 4e 4f |NO | TRAP #15 00021bee 3d 40 fb f0 |=@ | MOVE.W D0,(A6-0x410) 00021bf2 2f 12 |/ | MOVE.L (A2),-(A7) 00021bf4 42 67 |Bg | CLR.W -(A7) 00021bf6 42 67 |Bg | CLR.W -(A7) 00021bf8 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00021bfc 1f 01 | | MOVE.B D1,-(A7) 00021bfe 41 ee fb ee |A | LEA.L (A6-0x412),A0 00021c02 2f 08 |/ | MOVE.L A0,-(A7) 00021c04 48 51 |HQ | PEA.L (A1) 00021c06 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00021c0c de c2 | | ADDA.W D2,A7 00021c0e 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00021c12 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 00021c18 58 4f |XO | ADDQ.L #0x4,A7 00021c1a 20 52 | R | MOVEA.L (A2),A0 00021c1c 11 6e ff f6 00 3a | n : | MOVE.B (A6-0xa),(A0+0x3a) 00021c22 11 6e ff f7 00 3b | n ; | MOVE.B (A6-0x9),(A0+0x3b) 00021c28 11 6e ff f8 00 3c | n < | MOVE.B (A6-0x8),(A0+0x3c) 00021c2e 11 6e ff f9 00 3d | n = | MOVE.B (A6-0x7),(A0+0x3d) 00021c34 02 28 00 fe 00 3f | ( ? | ANDI.B #0xfe,(A0+0x3f) 00021c3a 11 41 00 4c | A L | MOVE.B D1,(A0+0x4c) 00021c3e 1f 01 | | MOVE.B D1,-(A7) 00021c40 1f 01 | | MOVE.B D1,-(A7) 00021c42 2f 13 |/ | MOVE.L (A3),-(A7) 00021c44 48 51 |HQ | PEA.L (A1) 00021c46 48 52 |HR | PEA.L (A2) 00021c48 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00021c4e de c3 | | ADDA.W D3,A7 00021c50 48 53 |HS | PEA.L (A3) 00021c52 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021c58 58 4f |XO | ADDQ.L #0x4,A7 00021c5a 26 8c |& | MOVE.L A4,(A3) 00021c5c 4a 87 |J | TST.L D7 00021c5e 66 00 ff 08 |f | BNE 0x21b68 00021c62 2c 3c ff ff fc 00 |,< | MOVE.L #0xfffffc00,D6 00021c68 2f 13 |/ | MOVE.L (A3),-(A7) 00021c6a 1f 01 | | MOVE.B D1,-(A7) 00021c6c 1f 01 | | MOVE.B D1,-(A7) 00021c6e 2f 06 |/ | MOVE.L D6,-(A7) 00021c70 48 51 |HQ | PEA.L (A1) 00021c72 48 52 |HR | PEA.L (A2) 00021c74 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00021c7a de c2 | | ADDA.W D2,A7 00021c7c 4a 11 |J | TST.B (A1) 00021c7e 66 44 |fD | BNE 0x21cc4 00021c80 20 52 | R | MOVEA.L (A2),A0 00021c82 3f 28 00 24 |?( $ | MOVE.W (A0+0x24),-(A7) 00021c86 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00021c8a 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00021c8e 4e b9 00 01 03 68 |N h | JSR Lba2Chs(lba : W; VAR cyl : W ; VAR hd_sec : W) 00021c94 50 4f |PO | ADDQ.L #0x8,A7 00021c96 3e ae ff f2 |> | MOVE.W (A6-0xe),(A7) 00021c9a 3f 2e ff f4 |?. | MOVE.W (A6-0xc),-(A7) 00021c9e 4e b9 00 01 02 02 |N | JSR KC01_DumpOn 00021ca4 58 4f |XO | ADDQ.L #0x4,A7 00021ca6 83 28 00 3f | ( ? | OR.B D1,(A0+0x3f) 00021caa 11 41 00 4c | A L | MOVE.B D1,(A0+0x4c) 00021cae 42 27 |B' | CLR.B -(A7) 00021cb0 42 27 |B' | CLR.B -(A7) 00021cb2 48 78 00 01 |Hx | PEA.L 0x1 00021cb6 48 51 |HQ | PEA.L (A1) 00021cb8 48 52 |HR | PEA.L (A2) 00021cba 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00021cc0 de c3 | | ADDA.W D3,A7 00021cc2 60 2a |`* | BRA 0x21cee 00021cc4 41 fa e8 84 |A | LEA.L 0x2054a,A0 00021cc8 70 1a |p | MOVEQ.L #0x1a,D0 00021cca 3f 20 |? | MOVE.W -(A0),-(A7) 00021ccc 51 c8 ff fc |Q | DBF D0,0x21cca 00021cd0 59 4f |YO | SUBQ.L #0x4,A7 00021cd2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021cd6 3f 01 |? | MOVE.W D1,-(A7) 00021cd8 3f 3c 00 36 |?< 6 | MOVE.W #0x36,-(A7) 00021cdc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021ce2 50 4f |PO | ADDQ.L #0x8,A7 00021ce4 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021cea de fc 00 3a | : | ADDA.W #0x3a,A7 00021cee 48 53 |HS | PEA.L (A3) 00021cf0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021cf6 58 4f |XO | ADDQ.L #0x4,A7 00021cf8 4c df 1f df |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2+A3+A4 00021cfc 4e 5e |N^ | UNLK A6 00021cfe 4e 75 |Nu | RTS 00021d00 ; -------------------------------------------------------------------------------------- 00021d00 ; OMSI PASCAL Function 00021d00 ; <LVAR 0x00a 1(w)> 00021d00 ; <LVAR 0x008 1(r)> 00021d00 ; -------------------------------------------------------------------------------------- 00021d00 4e 56 ff f2 |NV | LINK.W A6,#0xfff2 00021d04 bf d5 | | CMPA.L (A5),A7 00021d06 62 06 |b | BHI 0x21d0e 00021d08 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021d0c 4e 76 |Nv | TRAPV 00021d0e de fc 00 0c | | ADDA.W #0xc,A7 00021d12 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00021d16 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00021d1a 48 80 |H | EXTB.W D0 00021d1c 41 fa f5 ac |A | LEA.L 0x212ca,A0 00021d20 1d 70 00 00 00 0a | p | MOVE.B (A0+D0.W),(A6+0xa) 00021d26 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00021d2a 4e 5e |N^ | UNLK A6 00021d2c 4e 75 |Nu | RTS 00021d2e ; -------------------------------------------------------------------------------------- 00021d2e ; OMSI PASCAL Function 00021d2e ; <LVAR 0x008 1(r)> 00021d2e ; <LVAR -0x004 @ 2(r)> 00021d2e ; <LVAR -0x006 @ 1(r)> 00021d2e ; -------------------------------------------------------------------------------------- 00021d2e 4e 56 ff ac |NV | LINK.W A6,#0xffac 00021d32 bf d5 | | CMPA.L (A5),A7 00021d34 62 06 |b | BHI 0x21d3c 00021d36 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021d3a 4e 76 |Nv | TRAPV 00021d3c de fc 00 4e | N | ADDA.W #0x4e,A7 00021d40 48 e7 f0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7) 00021d44 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021d4a 47 ee ff fa |G | LEA.L (A6-0x6),A3 00021d4e 49 f9 00 02 43 b8 |I C | LEA.L 0x243b8,A4 00021d54 72 01 |r | MOVEQ.L #0x01,D1 00021d56 74 0a |t | MOVEQ.L #0x0a,D2 00021d58 76 09 |v | MOVEQ.L #0x09,D3 00021d5a 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00021d60 10 39 00 02 43 af | 9 C | MOVE.B 0x243af,D0 00021d66 e7 08 | | LSL.B #0x3,D0 00021d68 ee 08 | | LSR.B #0x7,D0 00021d6a 67 0e |g | BEQ 0x21d7a 00021d6c 4a 2e 00 08 |J. | TST.B (A6+0x8) 00021d70 67 08 |g | BEQ 0x21d7a 00021d72 4a 39 00 02 43 b1 |J9 C | TST.B 0x243b1 00021d78 67 4e |gN | BEQ 0x21dc8 00021d7a 9e c2 | | SUBA.W D2,A7 00021d7c 20 4f | O | MOVEA.L A7,A0 00021d7e 43 fa e7 ca |C | LEA.L 0x2054a,A1 00021d82 70 08 |p | MOVEQ.L #0x08,D0 00021d84 10 d9 | | MOVE.B (A1)+,(A0)+ 00021d86 51 c8 ff fc |Q | DBF D0,0x21d84 00021d8a 9e fc 00 0c | | SUBA.W #0xc,A7 00021d8e 20 4f | O | MOVEA.L A7,A0 00021d90 43 fa e7 c2 |C | LEA.L 0x20554,A1 00021d94 70 0a |p | MOVEQ.L #0x0a,D0 00021d96 10 d9 | | MOVE.B (A1)+,(A0)+ 00021d98 51 c8 ff fc |Q | DBF D0,0x21d96 00021d9c 59 4f |YO | SUBQ.L #0x4,A7 00021d9e 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00021da2 3f 01 |? | MOVE.W D1,-(A7) 00021da4 3f 03 |? | MOVE.W D3,-(A7) 00021da6 4e 92 |N | JSR (A2) 00021da8 58 4f |XO | ADDQ.L #0x4,A7 00021daa 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021dae 3f 01 |? | MOVE.W D1,-(A7) 00021db0 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00021db4 4e 92 |N | JSR (A2) 00021db6 5c 4f |\O | ADDQ.L #0x6,A7 00021db8 1e 81 | | MOVE.B D1,(A7) 00021dba 48 53 |HS | PEA.L (A3) 00021dbc 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00021dc2 de fc 00 24 | $ | ADDA.W #0x24,A7 00021dc6 60 4c |`L | BRA 0x21e14 00021dc8 9e c2 | | SUBA.W D2,A7 00021dca 20 4f | O | MOVEA.L A7,A0 00021dcc 43 fa e7 92 |C | LEA.L 0x20560,A1 00021dd0 70 08 |p | MOVEQ.L #0x08,D0 00021dd2 10 d9 | | MOVE.B (A1)+,(A0)+ 00021dd4 51 c8 ff fc |Q | DBF D0,0x21dd2 00021dd8 41 fa e7 9a |A | LEA.L 0x20574,A0 00021ddc 70 04 |p | MOVEQ.L #0x04,D0 00021dde 3f 20 |? | MOVE.W -(A0),-(A7) 00021de0 51 c8 ff fc |Q | DBF D0,0x21dde 00021de4 59 4f |YO | SUBQ.L #0x4,A7 00021de6 48 6f 00 0e |Ho | PEA.L (A7+0xe) 00021dea 3f 01 |? | MOVE.W D1,-(A7) 00021dec 3f 03 |? | MOVE.W D3,-(A7) 00021dee 4e 92 |N | JSR (A2) 00021df0 58 4f |XO | ADDQ.L #0x4,A7 00021df2 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021df6 3f 01 |? | MOVE.W D1,-(A7) 00021df8 3f 02 |? | MOVE.W D2,-(A7) 00021dfa 4e 92 |N | JSR (A2) 00021dfc 5c 4f |\O | ADDQ.L #0x6,A7 00021dfe 1e 81 | | MOVE.B D1,(A7) 00021e00 48 53 |HS | PEA.L (A3) 00021e02 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00021e08 de fc 00 22 | " | ADDA.W #0x22,A7 00021e0c 42 14 |B | CLR.B (A4) 00021e0e 4a 13 |J | TST.B (A3) 00021e10 66 02 |f | BNE 0x21e14 00021e12 52 14 |R | ADDQ.B #0x1,(A4) 00021e14 42 6e ff fc |Bn | CLR.W (A6-0x4) 00021e18 41 ee ff fc |A | LEA.L (A6-0x4),A0 00021e1c 2f 08 |/ | MOVE.L A0,-(A7) 00021e1e 52 97 |R | ADDQ.L #0x1,(A7) 00021e20 2f 3c 00 00 fc 10 |/< | MOVE.L #0xfc10,-(A7) 00021e26 3f 01 |? | MOVE.W D1,-(A7) 00021e28 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00021e2e de c2 | | ADDA.W D2,A7 00021e30 4c df 1f 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4 00021e34 4e 5e |N^ | UNLK A6 00021e36 4e 75 |Nu | RTS 00021e38 ; -------------------------------------------------------------------------------------- 00021e38 ; OMSI PASCAL Function 00021e38 ; <LVAR -0x004 @ 1(r)> 00021e38 ; -------------------------------------------------------------------------------------- 00021e38 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 00021e3c bf d5 | | CMPA.L (A5),A7 00021e3e 62 06 |b | BHI 0x21e46 00021e40 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021e44 4e 76 |Nv | TRAPV 00021e46 de fc 00 70 | p | ADDA.W #0x70,A7 00021e4a 48 e7 e0 f0 |H | MOVEM.L A3+A2+A1+A0+D2+D1+D0,-(A7) 00021e4e 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021e54 47 f9 00 02 43 b2 |G C | LEA.L 0x243b2,A3 00021e5a 72 01 |r | MOVEQ.L #0x01,D1 00021e5c 74 42 |tB | MOVEQ.L #0x42,D2 00021e5e 4a 39 00 02 43 b8 |J9 C | TST.B 0x243b8 00021e64 66 30 |f0 | BNE 0x21e96 00021e66 9e fc 00 40 | @ | SUBA.W #0x40,A7 00021e6a 20 4f | O | MOVEA.L A7,A0 00021e6c 43 fa e7 48 |C H | LEA.L 0x205b6,A1 00021e70 70 3e |p> | MOVEQ.L #0x3e,D0 00021e72 10 d9 | | MOVE.B (A1)+,(A0)+ 00021e74 51 c8 ff fc |Q | DBF D0,0x21e72 00021e78 59 4f |YO | SUBQ.L #0x4,A7 00021e7a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021e7e 3f 01 |? | MOVE.W D1,-(A7) 00021e80 3f 3c 00 3f |?< ? | MOVE.W #0x3f,-(A7) 00021e84 4e 92 |N | JSR (A2) 00021e86 50 4f |PO | ADDQ.L #0x8,A7 00021e88 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021e8e de fc 00 44 | D | ADDA.W #0x44,A7 00021e92 60 00 00 a2 |` | BRA 0x21f36 00021e96 4a 39 00 02 43 b9 |J9 C | TST.B 0x243b9 00021e9c 67 26 |g& | BEQ 0x21ec4 00021e9e 41 fa e7 98 |A | LEA.L 0x20638,A0 00021ea2 70 20 |p | MOVEQ.L #0x20,D0 00021ea4 3f 20 |? | MOVE.W -(A0),-(A7) 00021ea6 51 c8 ff fc |Q | DBF D0,0x21ea4 00021eaa 59 4f |YO | SUBQ.L #0x4,A7 00021eac 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021eb0 3f 01 |? | MOVE.W D1,-(A7) 00021eb2 3f 02 |? | MOVE.W D2,-(A7) 00021eb4 4e 92 |N | JSR (A2) 00021eb6 50 4f |PO | ADDQ.L #0x8,A7 00021eb8 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021ebe de fc 00 46 | F | ADDA.W #0x46,A7 00021ec2 60 72 |`r | BRA 0x21f36 00021ec4 9e c2 | | SUBA.W D2,A7 00021ec6 20 4f | O | MOVEA.L A7,A0 00021ec8 43 fa e6 aa |C | LEA.L 0x20574,A1 00021ecc 70 40 |p@ | MOVEQ.L #0x40,D0 00021ece 10 d9 | | MOVE.B (A1)+,(A0)+ 00021ed0 51 c8 ff fc |Q | DBF D0,0x21ece 00021ed4 5d 4f |]O | SUBQ.L #0x6,A7 00021ed6 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021eda 3f 01 |? | MOVE.W D1,-(A7) 00021edc 3f 3c 00 41 |?< A | MOVE.W #0x41,-(A7) 00021ee0 4e 92 |N | JSR (A2) 00021ee2 5c 4f |\O | ADDQ.L #0x6,A7 00021ee4 1e 81 | | MOVE.B D1,(A7) 00021ee6 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00021eec 5c 4f |\O | ADDQ.L #0x6,A7 00021eee 10 1f | | MOVE.B (A7)+,D0 00021ef0 48 80 |H | EXTB.W D0 00021ef2 41 81 |A | CHK.W D1,D0 00021ef4 de c2 | | ADDA.W D2,A7 00021ef6 16 80 | | MOVE.B D0,(A3) 00021ef8 9e fc 00 0a | | SUBA.W #0xa,A7 00021efc 20 4f | O | MOVEA.L A7,A0 00021efe 43 fa e7 38 |C 8 | LEA.L 0x20638,A1 00021f02 70 08 |p | MOVEQ.L #0x08,D0 00021f04 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f06 51 c8 ff fc |Q | DBF D0,0x21f04 00021f0a 59 4f |YO | SUBQ.L #0x4,A7 00021f0c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021f10 3f 01 |? | MOVE.W D1,-(A7) 00021f12 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00021f16 4e 92 |N | JSR (A2) 00021f18 50 4f |PO | ADDQ.L #0x8,A7 00021f1a 48 78 00 01 |Hx | PEA.L 0x1 00021f1e 1f 01 | | MOVE.B D1,-(A7) 00021f20 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021f24 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00021f2a de fc 00 18 | | ADDA.W #0x18,A7 00021f2e 4a 2e ff fc |J. | TST.B (A6-0x4) 00021f32 67 02 |g | BEQ 0x21f36 00021f34 42 13 |B | CLR.B (A3) 00021f36 23 fc 00 00 00 06 00 02 |# | MOVE.L #0x6,0x243b4 00021f3e 43 b4 |C | 00021f40 4c df 0f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3 00021f44 4e 5e |N^ | UNLK A6 00021f46 4e 75 |Nu | RTS 00021f48 ; -------------------------------------------------------------------------------------- 00021f48 ; OMSI PASCAL Function 00021f48 ; <LVAR -0x004 @> 00021f48 ; -------------------------------------------------------------------------------------- 00021f48 4e 56 ff 82 |NV | LINK.W A6,#0xff82 00021f4c bf d5 | | CMPA.L (A5),A7 00021f4e 62 06 |b | BHI 0x21f56 00021f50 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021f54 4e 76 |Nv | TRAPV 00021f56 de fc 00 7a | z | ADDA.W #0x7a,A7 00021f5a 48 e7 f0 e0 |H | MOVEM.L A2+A1+A0+D3+D2+D1+D0,-(A7) 00021f5e 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021f64 72 01 |r | MOVEQ.L #0x01,D1 00021f66 74 28 |t( | MOVEQ.L #0x28,D2 00021f68 76 0c |v | MOVEQ.L #0x0c,D3 00021f6a 55 4f |UO | SUBQ.L #0x2,A7 00021f6c 4e b9 00 01 05 ce |N | JSR ReadKeySwitch() : Bool 00021f72 4a 1f |J | TST.B (A7)+ 00021f74 66 00 00 d4 |f | BNE 0x2204a 00021f78 10 39 00 02 43 af | 9 C | MOVE.B 0x243af,D0 00021f7e e7 08 | | LSL.B #0x3,D0 00021f80 ee 08 | | LSR.B #0x7,D0 00021f82 67 00 00 c6 |g | BEQ 0x2204a 00021f86 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00021f8c 41 fa e6 dc |A | LEA.L 0x2066a,A0 00021f90 70 09 |p | MOVEQ.L #0x09,D0 00021f92 2f 20 |/ | MOVE.L -(A0),-(A7) 00021f94 51 c8 ff fc |Q | DBF D0,0x21f92 00021f98 59 4f |YO | SUBQ.L #0x4,A7 00021f9a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021f9e 3f 01 |? | MOVE.W D1,-(A7) 00021fa0 3f 02 |? | MOVE.W D2,-(A7) 00021fa2 4e 92 |N | JSR (A2) 00021fa4 50 4f |PO | ADDQ.L #0x8,A7 00021fa6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021fac de c2 | | ADDA.W D2,A7 00021fae 1e ba e6 ba | | MOVE.B 0x2066a,(A7) 00021fb2 1f 7a e6 b7 00 01 | z | MOVE.B 0x2066b,(A7+0x1) 00021fb8 1f 7a e6 b2 00 02 | z | MOVE.B 0x2066c,(A7+0x2) 00021fbe 9e c3 | | SUBA.W D3,A7 00021fc0 20 4f | O | MOVEA.L A7,A0 00021fc2 43 fa e6 aa |C | LEA.L 0x2066e,A1 00021fc6 70 0a |p | MOVEQ.L #0x0a,D0 00021fc8 10 d9 | | MOVE.B (A1)+,(A0)+ 00021fca 51 c8 ff fc |Q | DBF D0,0x21fc8 00021fce 59 4f |YO | SUBQ.L #0x4,A7 00021fd0 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00021fd4 3f 01 |? | MOVE.W D1,-(A7) 00021fd6 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00021fda 4e 92 |N | JSR (A2) 00021fdc 58 4f |XO | ADDQ.L #0x4,A7 00021fde 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021fe2 3f 01 |? | MOVE.W D1,-(A7) 00021fe4 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00021fe8 4e 92 |N | JSR (A2) 00021fea 5c 4f |\O | ADDQ.L #0x6,A7 00021fec 1e 81 | | MOVE.B D1,(A7) 00021fee 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021ff2 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00021ff8 de fc 00 14 | | ADDA.W #0x14,A7 00021ffc 20 4f | O | MOVEA.L A7,A0 00021ffe 43 fa e6 7a |C z | LEA.L 0x2067a,A1 00022002 70 08 |p | MOVEQ.L #0x08,D0 00022004 10 d9 | | MOVE.B (A1)+,(A0)+ 00022006 51 c8 ff fc |Q | DBF D0,0x22004 0002200a 2f 3a e6 80 |/: | MOVE.L 0x2068c,-(A7) 0002200e 2f 3a e6 78 |/: x | MOVE.L 0x20688,-(A7) 00022012 2f 3a e6 70 |/: p | MOVE.L 0x20684,-(A7) 00022016 59 4f |YO | SUBQ.L #0x4,A7 00022018 48 6f 00 10 |Ho | PEA.L (A7+0x10) 0002201c 3f 01 |? | MOVE.W D1,-(A7) 0002201e 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00022022 4e 92 |N | JSR (A2) 00022024 58 4f |XO | ADDQ.L #0x4,A7 00022026 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002202a 3f 01 |? | MOVE.W D1,-(A7) 0002202c 3f 03 |? | MOVE.W D3,-(A7) 0002202e 4e 92 |N | JSR (A2) 00022030 5c 4f |\O | ADDQ.L #0x6,A7 00022032 1e 81 | | MOVE.B D1,(A7) 00022034 48 6e ff fc |Hn | PEA.L (A6-0x4) 00022038 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 0002203e de fc 00 24 | $ | ADDA.W #0x24,A7 00022042 13 c1 00 02 43 b9 | C | MOVE.B D1,0x243b9 00022048 60 2c |`, | BRA 0x22076 0002204a 9e fc 00 4e | N | SUBA.W #0x4e,A7 0002204e 20 4f | O | MOVEA.L A7,A0 00022050 43 fa e6 3e |C > | LEA.L 0x20690,A1 00022054 70 4c |pL | MOVEQ.L #0x4c,D0 00022056 10 d9 | | MOVE.B (A1)+,(A0)+ 00022058 51 c8 ff fc |Q | DBF D0,0x22056 0002205c 59 4f |YO | SUBQ.L #0x4,A7 0002205e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022062 3f 01 |? | MOVE.W D1,-(A7) 00022064 3f 3c 00 4d |?< M | MOVE.W #0x4d,-(A7) 00022068 4e 92 |N | JSR (A2) 0002206a 50 4f |PO | ADDQ.L #0x8,A7 0002206c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022072 de fc 00 52 | R | ADDA.W #0x52,A7 00022076 42 39 00 02 43 b2 |B9 C | CLR.B 0x243b2 0002207c 23 c1 00 02 43 b4 |# C | MOVE.L D1,0x243b4 00022082 4c df 07 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2 00022086 4e 5e |N^ | UNLK A6 00022088 4e 75 |Nu | RTS 0002208a ; -------------------------------------------------------------------------------------- 0002208a ; OMSI PASCAL Function 0002208a ; <LVAR 0x00c 1(r)> 0002208a ; <LVAR 0x008 4(r)> 0002208a ; <LVAR -0x080 @> 0002208a ; <LVAR -0x081 1(w)> 0002208a ; <LVAR -0x082 1(r)> 0002208a ; <LVAR -0x084 2(w)> 0002208a ; <LVAR -0x086 @ 2(w)> 0002208a ; <LVAR -0x08f @> 0002208a ; <LVAR -0x090 @ 1(r)> 0002208a ; <LVAR -0x094 @ 4(r)> 0002208a ; <LVAR -0x098 @ 4(rw)> 0002208a ; <LVAR -0x099 @ 1(r)> 0002208a ; <LVAR -0x09a @ 1(r)> 0002208a ; -------------------------------------------------------------------------------------- 0002208a 4e 56 ff 02 |NV | LINK.W A6,#0xff02 0002208e bf d5 | | CMPA.L (A5),A7 00022090 62 06 |b | BHI 0x22098 00022092 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022096 4e 76 |Nv | TRAPV 00022098 de fc 00 64 | d | ADDA.W #0x64,A7 0002209c 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000220a0 45 ee ff 66 |E f | LEA.L (A6-0x9a),A2 000220a4 47 ee ff 68 |G h | LEA.L (A6-0x98),A3 000220a8 49 ee ff 6c |I l | LEA.L (A6-0x94),A4 000220ac 74 01 |t | MOVEQ.L #0x01,D2 000220ae 76 6b |vk | MOVEQ.L #0x6b,D3 000220b0 78 0c |x | MOVEQ.L #0x0c,D4 000220b2 41 fa e6 4a |A J | LEA.L 0x206fe,A0 000220b6 70 07 |p | MOVEQ.L #0x07,D0 000220b8 2f 20 |/ | MOVE.L -(A0),-(A7) 000220ba 51 c8 ff fc |Q | DBF D0,0x220b8 000220be 59 4f |YO | SUBQ.L #0x4,A7 000220c0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000220c4 3f 02 |? | MOVE.W D2,-(A7) 000220c6 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7) 000220ca 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000220d0 50 4f |PO | ADDQ.L #0x8,A7 000220d2 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000220d8 de fc 00 24 | $ | ADDA.W #0x24,A7 000220dc 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000220e2 1f 02 | | MOVE.B D2,-(A7) 000220e4 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 000220ea 42 17 |B | CLR.B (A7) 000220ec 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 000220f2 54 4f |TO | ADDQ.L #0x2,A7 000220f4 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 000220fa 3f 3a e6 06 |?: | MOVE.W 0x20702,-(A7) 000220fe 3f 3a e6 00 |?: | MOVE.W 0x20700,-(A7) 00022102 3f 3a e5 fa |?: | MOVE.W 0x206fe,-(A7) 00022106 59 4f |YO | SUBQ.L #0x4,A7 00022108 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002210c 3f 02 |? | MOVE.W D2,-(A7) 0002210e 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00022112 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022118 50 4f |PO | ADDQ.L #0x8,A7 0002211a 48 78 00 01 |Hx | PEA.L 0x1 0002211e 1f 02 | | MOVE.B D2,-(A7) 00022120 48 52 |HR | PEA.L (A2) 00022122 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00022128 de fc 00 14 | | ADDA.W #0x14,A7 0002212c 10 2e 00 0c | . | MOVE.B (A6+0xc),D0 00022130 48 80 |H | EXTB.W D0 00022132 3d 40 ff 7c |=@ | | MOVE.W D0,(A6-0x84) 00022136 42 2e ff 7e |B. ~ | CLR.B (A6-0x82) 0002213a 4a 12 |J | TST.B (A2) 0002213c 67 10 |g | BEQ 0x2214e 0002213e 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022142 42 10 |B | CLR.B (A0) 00022144 3d 7c 00 02 ff 7a |=| z | MOVE.W #0x2,(A6-0x86) 0002214a 60 00 01 a8 |` | BRA 0x222f4 0002214e 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00022154 48 6e ff 67 |Hn g | PEA.L (A6-0x99) 00022158 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 0002215e 58 4f |XO | ADDQ.L #0x4,A7 00022160 48 53 |HS | PEA.L (A3) 00022162 4e b9 00 01 05 2c |N , | JSR IPC_GetString(VAR retval : String) 00022168 58 4f |XO | ADDQ.L #0x4,A7 0002216a 48 54 |HT | PEA.L (A4) 0002216c 4e b9 00 01 05 2c |N , | JSR IPC_GetString(VAR retval : String) 00022172 58 4f |XO | ADDQ.L #0x4,A7 00022174 48 6e ff 70 |Hn p | PEA.L (A6-0x90) 00022178 48 78 00 00 |Hx | PEA.L 0x0 0002217c 48 78 00 00 |Hx | PEA.L 0x0 00022180 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 00022186 de c4 | | ADDA.W D4,A7 00022188 48 6e ff 71 |Hn q | PEA.L (A6-0x8f) 0002218c 48 78 00 00 |Hx | PEA.L 0x0 00022190 48 78 00 07 |Hx | PEA.L 0x7 00022194 4e b9 00 01 05 20 |N | JSR IPC_GetVar(MOD dst : Pointer; length : Long ; type : Long) 0002219a de c4 | | ADDA.W D4,A7 0002219c 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 000221a2 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000221a6 10 2e ff 67 | . g | MOVE.B (A6-0x99),D0 000221aa 44 00 |D | NEG.B D0 000221ac 52 00 |R | ADDQ.B #0x1,D0 000221ae 48 80 |H | EXTB.W D0 000221b0 41 82 |A | CHK.W D2,D0 000221b2 10 80 | | MOVE.B D0,(A0) 000221b4 2f 3a e5 52 |/: R | MOVE.L 0x20708,-(A7) 000221b8 2f 3a e5 4a |/: J | MOVE.L 0x20704,-(A7) 000221bc 59 4f |YO | SUBQ.L #0x4,A7 000221be 2f 13 |/ | MOVE.L (A3),-(A7) 000221c0 59 4f |YO | SUBQ.L #0x4,A7 000221c2 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000221c6 3f 02 |? | MOVE.W D2,-(A7) 000221c8 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 000221cc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000221d2 50 4f |PO | ADDQ.L #0x8,A7 000221d4 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000221da 50 4f |PO | ADDQ.L #0x8,A7 000221dc 26 9f |& | MOVE.L (A7)+,(A3) 000221de 2e 93 |. | MOVE.L (A3),(A7) 000221e0 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 000221e6 2e 94 |. | MOVE.L (A4),(A7) 000221e8 42 80 |B | CLR.L D0 000221ea 10 2e ff 70 | . p | MOVE.B (A6-0x90),D0 000221ee 2f 00 |/ | MOVE.L D0,-(A7) 000221f0 4e b9 00 01 04 4c |N L | JSR WriteErrorMessage(file : String; txt : String; number : Long) : Bool 000221f6 de c4 | | ADDA.W D4,A7 000221f8 3d 42 ff 7a |=B z | MOVE.W D2,(A6-0x86) 000221fc 1d 6e ff 70 ff 7f | n p | MOVE.B (A6-0x90),(A6-0x81) 00022202 41 ee ff 80 |A | LEA.L (A6-0x80),A0 00022206 43 ee ff 71 |C q | LEA.L (A6-0x8f),A1 0002220a 70 07 |p | MOVEQ.L #0x07,D0 0002220c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002220e 51 c8 ff fc |Q | DBF D0,0x2220c 00022212 20 53 | S | MOVEA.L (A3),A0 00022214 2f 08 |/ | MOVE.L A0,-(A7) 00022216 30 10 |0 | MOVE.W (A0),D0 00022218 48 c0 |H | EXTW.L D0 0002221a 2f 00 |/ | MOVE.L D0,-(A7) 0002221c 7e 01 |~ | MOVEQ.L #0x01,D7 0002221e be 97 | | CMP.L (A7),D7 00022220 6e 28 |n( | BGT 0x2224a 00022222 20 07 | | MOVE.L D7,D0 00022224 53 80 |S | SUBQ.L #0x1,D0 00022226 b0 83 | | CMP.L D3,D0 00022228 63 02 |c | BLS 0x2222c 0002222a 4e 4f |NO | TRAP #15 0002222c 20 4a | J | MOVEA.L A2,A0 0002222e 22 07 |" | MOVE.L D7,D1 00022230 53 81 |S | SUBQ.L #0x1,D1 00022232 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00022238 63 02 |c | BLS 0x2223c 0002223a 4e 4f |NO | TRAP #15 0002223c 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 00022240 11 b1 18 02 08 22 | " | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x22) 00022246 52 87 |R | ADDQ.L #0x1,D7 00022248 68 d4 |h | BVC 0x2221e 0002224a 58 4f |XO | ADDQ.L #0x4,A7 0002224c 20 57 | W | MOVEA.L (A7),A0 0002224e 30 10 |0 | MOVE.W (A0),D0 00022250 48 c0 |H | EXTW.L D0 00022252 52 80 |R | ADDQ.L #0x1,D0 00022254 2c 00 |, | MOVE.L D0,D6 00022256 58 4f |XO | ADDQ.L #0x4,A7 00022258 20 06 | | MOVE.L D6,D0 0002225a 53 80 |S | SUBQ.L #0x1,D0 0002225c b0 83 | | CMP.L D3,D0 0002225e 63 02 |c | BLS 0x22262 00022260 4e 4f |NO | TRAP #15 00022262 20 4a | J | MOVEA.L A2,A0 00022264 42 30 08 22 |B0 " | CLR.B (A0+D0.L+#0x22) 00022268 20 54 | T | MOVEA.L (A4),A0 0002226a 2f 08 |/ | MOVE.L A0,-(A7) 0002226c 30 10 |0 | MOVE.W (A0),D0 0002226e 48 c0 |H | EXTW.L D0 00022270 2a 00 |* | MOVE.L D0,D5 00022272 70 6c |pl | MOVEQ.L #0x6c,D0 00022274 90 86 | | SUB.L D6,D0 00022276 ba 80 | | CMP.L D0,D5 00022278 6f 16 |o | BLE 0x22290 0002227a 2a 00 |* | MOVE.L D0,D5 0002227c 20 05 | | MOVE.L D5,D0 0002227e 53 80 |S | SUBQ.L #0x1,D0 00022280 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 00022286 63 02 |c | BLS 0x2228a 00022288 4e 4f |NO | TRAP #15 0002228a 11 bc 00 5c 08 02 | \ | MOVE.B #0x5c,(A0+D0.L+#0x2) 00022290 2f 05 |/ | MOVE.L D5,-(A7) 00022292 7e 01 |~ | MOVEQ.L #0x01,D7 00022294 be 97 | | CMP.L (A7),D7 00022296 6e 2a |n* | BGT 0x222c2 00022298 52 86 |R | ADDQ.L #0x1,D6 0002229a 20 06 | | MOVE.L D6,D0 0002229c 53 80 |S | SUBQ.L #0x1,D0 0002229e b0 83 | | CMP.L D3,D0 000222a0 63 02 |c | BLS 0x222a4 000222a2 4e 4f |NO | TRAP #15 000222a4 20 4a | J | MOVEA.L A2,A0 000222a6 22 07 |" | MOVE.L D7,D1 000222a8 53 81 |S | SUBQ.L #0x1,D1 000222aa 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 000222b0 63 02 |c | BLS 0x222b4 000222b2 4e 4f |NO | TRAP #15 000222b4 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 000222b8 11 b1 18 02 08 22 | " | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x22) 000222be 52 87 |R | ADDQ.L #0x1,D7 000222c0 68 d2 |h | BVC 0x22294 000222c2 58 4f |XO | ADDQ.L #0x4,A7 000222c4 0c 86 00 00 00 6c | l | CMPI.L #0x0000006c,D6 000222ca 6c 12 |l | BGE 0x222de 000222cc 20 06 | | MOVE.L D6,D0 000222ce 52 80 |R | ADDQ.L #0x1,D0 000222d0 53 80 |S | SUBQ.L #0x1,D0 000222d2 b0 83 | | CMP.L D3,D0 000222d4 63 02 |c | BLS 0x222d8 000222d6 4e 4f |NO | TRAP #15 000222d8 20 4a | J | MOVEA.L A2,A0 000222da 42 30 08 22 |B0 " | CLR.B (A0+D0.L+#0x22) 000222de 58 4f |XO | ADDQ.L #0x4,A7 000222e0 48 54 |HT | PEA.L (A4) 000222e2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000222e8 58 4f |XO | ADDQ.L #0x4,A7 000222ea 48 53 |HS | PEA.L (A3) 000222ec 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000222f2 58 4f |XO | ADDQ.L #0x4,A7 000222f4 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 000222f8 41 ee ff 7a |A z | LEA.L (A6-0x86),A0 000222fc 2f 08 |/ | MOVE.L A0,-(A7) 000222fe 4e b9 00 01 03 a8 |N | JSR Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer) 00022304 5c 4f |\O | ADDQ.L #0x6,A7 00022306 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 0002230a 4e 5e |N^ | UNLK A6 0002230c 4e 75 |Nu | RTS 0002230e ; -------------------------------------------------------------------------------------- 0002230e ; OMSI PASCAL Function 0002230e ; <LVAR 0x008 1(r)> 0002230e ; -------------------------------------------------------------------------------------- 0002230e 4e 56 ff 82 |NV | LINK.W A6,#0xff82 00022312 bf d5 | | CMPA.L (A5),A7 00022314 62 06 |b | BHI 0x2231c 00022316 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002231a 4e 76 |Nv | TRAPV 0002231c de fc 00 7c | | | ADDA.W #0x7c,A7 00022320 48 e7 e0 c0 |H | MOVEM.L A1+A0+D2+D1+D0,-(A7) 00022324 72 32 |r2 | MOVEQ.L #0x32,D1 00022326 74 01 |t | MOVEQ.L #0x01,D2 00022328 9e fc 00 1e | | SUBA.W #0x1e,A7 0002232c 20 4f | O | MOVEA.L A7,A0 0002232e 43 fa e3 dc |C | LEA.L 0x2070c,A1 00022332 70 1c |p | MOVEQ.L #0x1c,D0 00022334 10 d9 | | MOVE.B (A1)+,(A0)+ 00022336 51 c8 ff fc |Q | DBF D0,0x22334 0002233a 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 0002233e 48 80 |H | EXTB.W D0 00022340 c1 c1 | | MULS.W D1,D0 00022342 41 fa ef a7 |A | LEA.L 0x212eb,A0 00022346 9e c1 | | SUBA.W D1,A7 00022348 22 4f |"O | MOVEA.L A7,A1 0002234a 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 0002234e 70 31 |p1 | MOVEQ.L #0x31,D0 00022350 12 d8 | | MOVE.B (A0)+,(A1)+ 00022352 51 c8 ff fc |Q | DBF D0,0x22350 00022356 51 4f |QO | SUBQ.L #0x8,A7 00022358 48 6f 00 3a |Ho : | PEA.L (A7+0x3a) 0002235c 3f 02 |? | MOVE.W D2,-(A7) 0002235e 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 00022362 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022368 58 4f |XO | ADDQ.L #0x4,A7 0002236a 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002236e 3f 02 |? | MOVE.W D2,-(A7) 00022370 3f 01 |? | MOVE.W D1,-(A7) 00022372 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022378 50 4f |PO | ADDQ.L #0x8,A7 0002237a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022380 50 4f |PO | ADDQ.L #0x8,A7 00022382 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022388 de fc 00 54 | T | ADDA.W #0x54,A7 0002238c 4c df 03 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1 00022390 4e 5e |N^ | UNLK A6 00022392 4e 75 |Nu | RTS 00022394 ; -------------------------------------------------------------------------------------- 00022394 ; OMSI PASCAL Function 00022394 ; <LVAR 0x00c 4(w)> 00022394 ; <LVAR 0x00b 1(r)> 00022394 ; <LVAR 0x00a 1(r) 2(r)> 00022394 ; -------------------------------------------------------------------------------------- 00022394 4e 56 ff cc |NV | LINK.W A6,#0xffcc 00022398 bf d5 | | CMPA.L (A5),A7 0002239a 62 06 |b | BHI 0x223a2 0002239c 44 fc 00 02 |D | MOVE.W #0x2,CCR 000223a0 4e 76 |Nv | TRAPV 000223a2 de fc 00 2c | , | ADDA.W #0x2c,A7 000223a6 48 e7 ff 80 |H | MOVEM.L A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000223aa 41 ee 00 0c |A | LEA.L (A6+0xc),A0 000223ae 7a 03 |z | MOVEQ.L #0x03,D5 000223b0 30 2e 00 0a |0. | MOVE.W (A6+0xa),D0 000223b4 ef 48 | H | LSL.W #0x7,D0 000223b6 e0 48 | H | LSR.W #0x8,D0 000223b8 e8 48 | H | LSR.W #0x4,D0 000223ba 32 00 |2 | MOVE.W D0,D1 000223bc 53 41 |SA | SUBQ.W #0x1,D1 000223be 0c 41 00 0b | A | CMPI.W #0x000b,D1 000223c2 62 6c |bl | BHI 0x22430 000223c4 d2 41 | A | ADD.W D1,D1 000223c6 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W 000223ce 00 18 | | .CONST 0x18 ; [0x0] -> 0x223e6 000223d0 00 1a | | .CONST 0x1a ; [0x1] -> 0x223e8 000223d2 00 1e | | .CONST 0x1e ; [0x2] -> 0x223ec 000223d4 00 22 | " | .CONST 0x22 ; [0x3] -> 0x223f0 000223d6 00 26 | & | .CONST 0x26 ; [0x4] -> 0x223f4 000223d8 00 2a | * | .CONST 0x2a ; [0x5] -> 0x223f8 000223da 00 32 | 2 | .CONST 0x32 ; [0x6] -> 0x22400 000223dc 00 3a | : | .CONST 0x3a ; [0x7] -> 0x22408 000223de 00 42 | B | .CONST 0x42 ; [0x8] -> 0x22410 000223e0 00 4a | J | .CONST 0x4a ; [0x9] -> 0x22418 000223e2 00 52 | R | .CONST 0x52 ; [0xa] -> 0x22420 000223e4 00 5a | Z | .CONST 0x5a ; [0xb] -> 0x22428 000223e6 switch@0x223c6[0x0]: 000223e6 60 48 |`H | BRA 0x22430 000223e8 switch@0x223c6[0x1]: 000223e8 7e 1f |~ | MOVEQ.L #0x1f,D7 000223ea 60 46 |`F | BRA 0x22432 000223ec switch@0x223c6[0x2]: 000223ec 7e 3b |~; | MOVEQ.L #0x3b,D7 000223ee 60 42 |`B | BRA 0x22432 000223f0 switch@0x223c6[0x3]: 000223f0 7e 5a |~Z | MOVEQ.L #0x5a,D7 000223f2 60 3e |`> | BRA 0x22432 000223f4 switch@0x223c6[0x4]: 000223f4 7e 78 |~x | MOVEQ.L #0x78,D7 000223f6 60 3a |`: | BRA 0x22432 000223f8 switch@0x223c6[0x5]: 000223f8 2e 3c 00 00 00 97 |.< | MOVE.L #0x97,D7 000223fe 60 32 |`2 | BRA 0x22432 00022400 switch@0x223c6[0x6]: 00022400 2e 3c 00 00 00 b5 |.< | MOVE.L #0xb5,D7 00022406 60 2a |`* | BRA 0x22432 00022408 switch@0x223c6[0x7]: 00022408 2e 3c 00 00 00 d4 |.< | MOVE.L #0xd4,D7 0002240e 60 22 |`" | BRA 0x22432 00022410 switch@0x223c6[0x8]: 00022410 2e 3c 00 00 00 f3 |.< | MOVE.L #0xf3,D7 00022416 60 1a |` | BRA 0x22432 00022418 switch@0x223c6[0x9]: 00022418 2e 3c 00 00 01 11 |.< | MOVE.L #0x111,D7 0002241e 60 12 |` | BRA 0x22432 00022420 switch@0x223c6[0xa]: 00022420 2e 3c 00 00 01 30 |.< 0 | MOVE.L #0x130,D7 00022426 60 0a |` | BRA 0x22432 00022428 switch@0x223c6[0xb]: 00022428 2e 3c 00 00 01 4e |.< N | MOVE.L #0x14e,D7 0002242e 60 02 |` | BRA 0x22432 00022430 7e 00 |~ | MOVEQ.L #0x00,D7 00022432 42 81 |B | CLR.L D1 00022434 12 2e 00 0a | . | MOVE.B (A6+0xa),D1 00022438 e2 09 | | LSR.B #0x1,D1 0002243a 34 01 |4 | MOVE.W D1,D2 0002243c c4 45 | E | AND.W D5,D2 0002243e b4 45 | E | CMP.W D5,D2 00022440 66 08 |f | BNE 0x2244a 00022442 0c 40 00 02 | @ | CMPI.W #0x0002,D0 00022446 6f 02 |o | BLE 0x2244a 00022448 52 87 |R | ADDQ.L #0x1,D7 0002244a 48 c1 |H | EXTW.L D1 0002244c 2c 01 |, | MOVE.L D1,D6 0002244e 28 06 |( | MOVE.L D6,D4 00022450 26 3c 00 00 01 6d |&< m | MOVE.L #0x16d,D3 00022456 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 0002245c 20 84 | | MOVE.L D4,(A0) 0002245e df 90 | | ADD.L D7,(A0) 00022460 42 80 |B | CLR.L D0 00022462 10 2e 00 0b | . | MOVE.B (A6+0xb),D0 00022466 e7 08 | | LSL.B #0x3,D0 00022468 e6 08 | | LSR.B #0x3,D0 0002246a d1 90 | | ADD.L D0,(A0) 0002246c 4c df 01 ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0 00022470 4e 5e |N^ | UNLK A6 00022472 4e 75 |Nu | RTS 00022474 ; -------------------------------------------------------------------------------------- 00022474 ; OMSI PASCAL Function 00022474 ; <LVAR 0x008 1(rw)> 00022474 ; <LVAR -0x004 @ 4(r)> 00022474 ; <LVAR -0x008 4(rw)> 00022474 ; <LVAR -0x009 1(w)> 00022474 ; <LVAR -0x00a 1(w)> 00022474 ; <LVAR -0x00b 1(w)> 00022474 ; <LVAR -0x00c 1(w) 4(r)> 00022474 ; <LVAR -0x00d 1(w)> 00022474 ; <LVAR -0x00e 1(w) 2(w)> 00022474 ; <LVAR -0x010 2(r) 4(rw)> 00022474 ; <LVAR -0x014 @ 2(r) 4(r)> 00022474 ; <LVAR -0x3cc 2(r)> 00022474 ; <LVAR -0x3ce 2(r)> 00022474 ; <LVAR -0x3d4 1(r)> 00022474 ; <LVAR -0x3f4 2(r)> 00022474 ; <LVAR -0x414 @> 00022474 ; <LVAR -0x415 @> 00022474 ; <LVAR -0x416 @ 1(r)> 00022474 ; <LVAR -0x41a @ 4(r)> 00022474 ; <LVAR -0x422 @ 4(r)> 00022474 ; <LVAR -0x426 @ 4(r)> 00022474 ; <LVAR -0x42a @ 4(r)> 00022474 ; <LVAR -0x42c @ 1(r)> 00022474 ; <LVAR -0x42d @> 00022474 ; <LVAR -0x42e 1(w)> 00022474 ; <LVAR -0x448 @ 1(r)> 00022474 ; <LVAR -0x454 @ 4(w)> 00022474 ; -------------------------------------------------------------------------------------- 00022474 4e 56 fb 0e |NV | LINK.W A6,#0xfb0e 00022478 bf d5 | | CMPA.L (A5),A7 0002247a 62 06 |b | BHI 0x22482 0002247c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022480 4e 76 |Nv | TRAPV 00022482 de fc 00 9e | | ADDA.W #0x9e,A7 00022486 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002248a 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00022490 47 ee fb e6 |G | LEA.L (A6-0x41a),A3 00022494 41 ee fb b8 |A | LEA.L (A6-0x448),A0 00022498 43 fa e5 4c |C L | LEA.L 0x209e6,A1 0002249c 70 0a |p | MOVEQ.L #0x0a,D0 0002249e 30 d9 |0 | MOVE.W (A1)+,(A0)+ 000224a0 51 c8 ff fc |Q | DBF D0,0x2249e 000224a4 41 fa e5 6a |A j | LEA.L 0x20a10,A0 000224a8 70 04 |p | MOVEQ.L #0x04,D0 000224aa 2f 20 |/ | MOVE.L -(A0),-(A7) 000224ac 51 c8 ff fc |Q | DBF D0,0x224aa 000224b0 59 4f |YO | SUBQ.L #0x4,A7 000224b2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000224b6 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000224ba 3f 3c 00 14 |?< | MOVE.W #0x14,-(A7) 000224be 4e 92 |N | JSR (A2) 000224c0 5c 4f |\O | ADDQ.L #0x6,A7 000224c2 42 17 |B | CLR.B (A7) 000224c4 42 27 |B' | CLR.B -(A7) 000224c6 48 78 00 00 |Hx | PEA.L 0x0 000224ca 48 6e fb ea |Hn | PEA.L (A6-0x416) 000224ce 48 53 |HS | PEA.L (A3) 000224d0 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000224d6 de fc 00 28 | ( | ADDA.W #0x28,A7 000224da 4a 2e fb ea |J. | TST.B (A6-0x416) 000224de 67 32 |g2 | BEQ 0x22512 000224e0 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000224e6 41 fa e5 70 |A p | LEA.L 0x20a58,A0 000224ea 70 11 |p | MOVEQ.L #0x11,D0 000224ec 2f 20 |/ | MOVE.L -(A0),-(A7) 000224ee 51 c8 ff fc |Q | DBF D0,0x224ec 000224f2 59 4f |YO | SUBQ.L #0x4,A7 000224f4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000224f8 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000224fc 3f 3c 00 48 |?< H | MOVE.W #0x48,-(A7) 00022500 4e 92 |N | JSR (A2) 00022502 50 4f |PO | ADDQ.L #0x8,A7 00022504 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002250a de fc 00 4c | L | ADDA.W #0x4c,A7 0002250e 60 00 05 f8 |` | BRA 0x22b08 00022512 48 6e fb d6 |Hn | PEA.L (A6-0x42a) 00022516 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 0002251c 58 4f |XO | ADDQ.L #0x4,A7 0002251e 48 6e fb da |Hn | PEA.L (A6-0x426) 00022522 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00022528 2e 93 |. | MOVE.L (A3),(A7) 0002252a 48 6e fb d6 |Hn | PEA.L (A6-0x42a) 0002252e 48 6e fb d3 |Hn | PEA.L (A6-0x42d) 00022532 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 00022538 50 4f |PO | ADDQ.L #0x8,A7 0002253a 2e 93 |. | MOVE.L (A3),(A7) 0002253c 48 6e fb da |Hn | PEA.L (A6-0x426) 00022540 48 6e fb d3 |Hn | PEA.L (A6-0x42d) 00022544 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 0002254a 50 4f |PO | ADDQ.L #0x8,A7 0002254c 2e ba e5 0a |. | MOVE.L 0x20a58,(A7) 00022550 51 4f |QO | SUBQ.L #0x8,A7 00022552 2f 2e fb d6 |/. | MOVE.L (A6-0x42a),-(A7) 00022556 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 0002255c 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00022560 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022564 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00022568 4e 92 |N | JSR (A2) 0002256a 50 4f |PO | ADDQ.L #0x8,A7 0002256c 4e b9 00 01 03 00 |N | JSR FSCALL_10300 00022572 50 4f |PO | ADDQ.L #0x8,A7 00022574 4a 9f |J | TST.L (A7)+ 00022576 6f 00 00 a8 |o | BLE 0x22620 0002257a 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00022580 41 fa e5 14 |A | LEA.L 0x20a96,A0 00022584 70 1c |p | MOVEQ.L #0x1c,D0 00022586 3f 20 |? | MOVE.W -(A0),-(A7) 00022588 51 c8 ff fc |Q | DBF D0,0x22586 0002258c 59 4f |YO | SUBQ.L #0x4,A7 0002258e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022592 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022596 3f 3c 00 3a |?< : | MOVE.W #0x3a,-(A7) 0002259a 4e 92 |N | JSR (A2) 0002259c 50 4f |PO | ADDQ.L #0x8,A7 0002259e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000225a4 de fc 00 3a | : | ADDA.W #0x3a,A7 000225a8 2e 93 |. | MOVE.L (A3),(A7) 000225aa 4e b9 00 01 04 44 |N D | JSR FSCALL_10444 000225b0 9e fc 00 26 | & | SUBA.W #0x26,A7 000225b4 20 4f | O | MOVEA.L A7,A0 000225b6 43 fa e4 de |C | LEA.L 0x20a96,A1 000225ba 70 28 |p( | MOVEQ.L #0x28,D0 000225bc 10 d9 | | MOVE.B (A1)+,(A0)+ 000225be 51 c8 ff fc |Q | DBF D0,0x225bc 000225c2 2f 13 |/ | MOVE.L (A3),-(A7) 000225c4 59 4f |YO | SUBQ.L #0x4,A7 000225c6 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000225ca 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000225ce 3f 3c 00 29 |?< ) | MOVE.W #0x29,-(A7) 000225d2 4e 92 |N | JSR (A2) 000225d4 50 4f |PO | ADDQ.L #0x8,A7 000225d6 48 6e fb d3 |Hn | PEA.L (A6-0x42d) 000225da 4e b9 00 01 04 40 |N @ | JSR FSCALL_10440 000225e0 de fc 00 32 | 2 | ADDA.W #0x32,A7 000225e4 2e 93 |. | MOVE.L (A3),(A7) 000225e6 2f 2e fb da |/. | MOVE.L (A6-0x426),-(A7) 000225ea 48 6e fb d3 |Hn | PEA.L (A6-0x42d) 000225ee 4e b9 00 01 04 40 |N @ | JSR FSCALL_10440 000225f4 50 4f |PO | ADDQ.L #0x8,A7 000225f6 2e 93 |. | MOVE.L (A3),(A7) 000225f8 4e b9 00 01 04 48 |N H | JSR FSCALL_10448 000225fe 54 4f |TO | ADDQ.L #0x2,A7 00022600 42 17 |B | CLR.B (A7) 00022602 1f 3c 00 01 | < | MOVE.B #0x01,-(A7) 00022606 48 78 00 01 |Hx | PEA.L 0x1 0002260a 48 6e fb ea |Hn | PEA.L (A6-0x416) 0002260e 48 53 |HS | PEA.L (A3) 00022610 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00022616 de fc 00 10 | | ADDA.W #0x10,A7 0002261a 58 4f |XO | ADDQ.L #0x4,A7 0002261c 60 00 04 ea |` | BRA 0x22b08 00022620 54 4f |TO | ADDQ.L #0x2,A7 00022622 42 17 |B | CLR.B (A7) 00022624 1f 3c 00 01 | < | MOVE.B #0x01,-(A7) 00022628 48 78 00 01 |Hx | PEA.L 0x1 0002262c 48 6e fb ea |Hn | PEA.L (A6-0x416) 00022630 48 53 |HS | PEA.L (A3) 00022632 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00022638 de fc 00 0e | | ADDA.W #0xe,A7 0002263c 3e ba e4 86 |> | MOVE.W 0x20ac4,(A7) 00022640 3f 3a e4 80 |?: | MOVE.W 0x20ac2,-(A7) 00022644 3f 3a e4 7a |?: z | MOVE.W 0x20ac0,-(A7) 00022648 51 4f |QO | SUBQ.L #0x8,A7 0002264a 2f 2e fb d6 |/. | MOVE.L (A6-0x42a),-(A7) 0002264e 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00022654 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00022658 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002265c 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00022660 4e 92 |N | JSR (A2) 00022662 50 4f |PO | ADDQ.L #0x8,A7 00022664 4e b9 00 01 03 00 |N | JSR FSCALL_10300 0002266a 50 4f |PO | ADDQ.L #0x8,A7 0002266c 20 1f | | MOVE.L (A7)+,D0 0002266e 0c 80 00 00 00 01 | | CMPI.L #0x00000001,D0 00022674 67 32 |g2 | BEQ 0x226a8 00022676 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 0002267c 41 fa e4 90 |A | LEA.L 0x20b0e,A0 00022680 70 11 |p | MOVEQ.L #0x11,D0 00022682 2f 20 |/ | MOVE.L -(A0),-(A7) 00022684 51 c8 ff fc |Q | DBF D0,0x22682 00022688 59 4f |YO | SUBQ.L #0x4,A7 0002268a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002268e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022692 3f 3c 00 48 |?< H | MOVE.W #0x48,-(A7) 00022696 4e 92 |N | JSR (A2) 00022698 50 4f |PO | ADDQ.L #0x8,A7 0002269a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000226a0 de fc 00 52 | R | ADDA.W #0x52,A7 000226a4 60 00 04 62 |` b | BRA 0x22b08 000226a8 5c 4f |\O | ADDQ.L #0x6,A7 000226aa 48 6e fb de |Hn | PEA.L (A6-0x422) 000226ae 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000226b4 2e ae fb da |. | MOVE.L (A6-0x426),(A7) 000226b8 2f 2e fb de |/. | MOVE.L (A6-0x422),-(A7) 000226bc 48 6e fb d4 |Hn | PEA.L (A6-0x42c) 000226c0 4e b9 00 01 02 fc |N | JSR FirstField(MOD input : String; MOD output : String; VAR c : Bool 000226c6 50 4f |PO | ADDQ.L #0x8,A7 000226c8 2e ae fb de |. | MOVE.L (A6-0x422),(A7) 000226cc 48 6e fb d4 |Hn | PEA.L (A6-0x42c) 000226d0 48 6e ff fc |Hn | PEA.L (A6-0x4) 000226d4 4e b9 00 01 02 ec |N | JSR String2Long(src : String; VAR status : Bool; VAR retval : Long) 000226da de fc 00 0c | | ADDA.W #0xc,A7 000226de 4a 2e fb d4 |J. | TST.B (A6-0x42c) 000226e2 66 2a |f* | BNE 0x2270e 000226e4 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000226ea 9e fc 00 50 | P | SUBA.W #0x50,A7 000226ee 20 4f | O | MOVEA.L A7,A0 000226f0 43 fa e4 1c |C | LEA.L 0x20b0e,A1 000226f4 70 4e |pN | MOVEQ.L #0x4e,D0 000226f6 10 d9 | | MOVE.B (A1)+,(A0)+ 000226f8 51 c8 ff fc |Q | DBF D0,0x226f6 000226fc 59 4f |YO | SUBQ.L #0x4,A7 000226fe 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022702 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022706 3f 3c 00 4f |?< O | MOVE.W #0x4f,-(A7) 0002270a 60 00 03 ee |` | BRA 0x22afa 0002270e 02 2e 00 01 ff f2 | . | ANDI.B #0x01,(A6-0xe) 00022714 02 6e fe 1f ff f2 | n | ANDI.W #0xfe1f,(A6-0xe) 0002271a 00 6e 00 20 ff f2 | n | ORI.W #0x0020,(A6-0xe) 00022720 02 2e 00 e0 ff f3 | . | ANDI.B #0xe0,(A6-0xd) 00022726 00 2e 00 01 ff f3 | . | ORI.B #0x01,(A6-0xd) 0002272c 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00022732 70 02 |p | MOVEQ.L #0x02,D0 00022734 2d 40 fb ac |-@ | MOVE.L D0,(A6-0x454) 00022738 2f 00 |/ | MOVE.L D0,-(A7) 0002273a 41 fa e4 2c |A , | LEA.L 0x20b68,A0 0002273e 72 04 |r | MOVEQ.L #0x04,D1 00022740 3f 20 |? | MOVE.W -(A0),-(A7) 00022742 51 c9 ff fc |Q | DBF D1,0x22740 00022746 51 4f |QO | SUBQ.L #0x8,A7 00022748 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002274c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022750 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00022754 4e 92 |N | JSR (A2) 00022756 2e 80 |. | MOVE.L D0,(A7) 00022758 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002275e 58 4f |XO | ADDQ.L #0x4,A7 00022760 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022766 50 4f |PO | ADDQ.L #0x8,A7 00022768 28 5f |(_ | MOVEA.L (A7)+,A4 0002276a 5c 4f |\O | ADDQ.L #0x6,A7 0002276c 2e 8c |. | MOVE.L A4,(A7) 0002276e 42 27 |B' | CLR.B -(A7) 00022770 42 27 |B' | CLR.B -(A7) 00022772 48 78 00 00 |Hx | PEA.L 0x0 00022776 48 6e fb ea |Hn | PEA.L (A6-0x416) 0002277a 48 53 |HS | PEA.L (A3) 0002277c 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00022782 de fc 00 14 | | ADDA.W #0x14,A7 00022786 4a 2e fb ea |J. | TST.B (A6-0x416) 0002278a 66 00 01 d6 |f | BNE 0x22962 0002278e 2f 13 |/ | MOVE.L (A3),-(A7) 00022790 42 67 |Bg | CLR.W -(A7) 00022792 42 67 |Bg | CLR.W -(A7) 00022794 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00022798 1f 3c 00 01 | < | MOVE.B #0x01,-(A7) 0002279c 41 ee fb ec |A | LEA.L (A6-0x414),A0 000227a0 2f 08 |/ | MOVE.L A0,-(A7) 000227a2 48 6e fb ea |Hn | PEA.L (A6-0x416) 000227a6 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 000227ac de fc 00 14 | | ADDA.W #0x14,A7 000227b0 20 53 | S | MOVEA.L (A3),A0 000227b2 1d 68 00 3a ff f4 | h : | MOVE.B (A0+0x3a),(A6-0xc) 000227b8 1d 68 00 3b ff f5 | h ; | MOVE.B (A0+0x3b),(A6-0xb) 000227be 1d 68 00 3c ff f6 | h < | MOVE.B (A0+0x3c),(A6-0xa) 000227c4 1d 68 00 3d ff f7 | h = | MOVE.B (A0+0x3d),(A6-0x9) 000227ca 42 27 |B' | CLR.B -(A7) 000227cc 1f 3c 00 01 | < | MOVE.B #0x01,-(A7) 000227d0 48 78 00 01 |Hx | PEA.L 0x1 000227d4 48 6e fb ea |Hn | PEA.L (A6-0x416) 000227d8 48 53 |HS | PEA.L (A3) 000227da 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000227e0 de fc 00 10 | | ADDA.W #0x10,A7 000227e4 12 2e fc 2c | . , | MOVE.B (A6-0x3d4),D1 000227e8 0c 01 00 03 | | CMPI.B #0x03,D1 000227ec 66 0a |f | BNE 0x227f8 000227ee 34 2e fc 34 |4. 4 | MOVE.W (A6-0x3cc),D2 000227f2 0c 42 00 09 | B | CMPI.W #0x0009,D2 000227f6 67 0c |g | BEQ 0x22804 000227f8 0c 01 00 02 | | CMPI.B #0x02,D1 000227fc 66 0a |f | BNE 0x22808 000227fe 4a 6e fc 32 |Jn 2 | TST.W (A6-0x3ce) 00022802 66 04 |f | BNE 0x22808 00022804 60 00 01 5c |` \ | BRA 0x22962 00022808 2d 6e ff f4 ff f0 |-n | MOVE.L (A6-0xc),(A6-0x10) 0002280e 41 fa e3 72 |A r | LEA.L 0x20b82,A0 00022812 72 0c |r | MOVEQ.L #0x0c,D1 00022814 3f 20 |? | MOVE.W -(A0),-(A7) 00022816 51 c9 ff fc |Q | DBF D1,0x22814 0002281a 41 ee fc 0a |A | LEA.L (A6-0x3f6),A0 0002281e 72 08 |r | MOVEQ.L #0x08,D1 00022820 3f 20 |? | MOVE.W -(A0),-(A7) 00022822 51 c9 ff fc |Q | DBF D1,0x22820 00022826 9e fc 00 14 | | SUBA.W #0x14,A7 0002282a 20 4f | O | MOVEA.L A7,A0 0002282c 43 fa e3 54 |C T | LEA.L 0x20b82,A1 00022830 72 12 |r | MOVEQ.L #0x12,D1 00022832 10 d9 | | MOVE.B (A1)+,(A0)+ 00022834 51 c9 ff fc |Q | DBF D1,0x22832 00022838 51 4f |QO | SUBQ.L #0x8,A7 0002283a 48 6f 00 2e |Ho . | PEA.L (A7+0x2e) 0002283e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022842 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 00022846 4e 92 |N | JSR (A2) 00022848 58 4f |XO | ADDQ.L #0x4,A7 0002284a 48 6f 00 20 |Ho | PEA.L (A7+0x20) 0002284e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022852 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00022856 4e 92 |N | JSR (A2) 00022858 58 4f |XO | ADDQ.L #0x4,A7 0002285a 48 6f 00 10 |Ho | PEA.L (A7+0x10) 0002285e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022862 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00022866 4e 92 |N | JSR (A2) 00022868 50 4f |PO | ADDQ.L #0x8,A7 0002286a 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00022870 de fc 00 0c | | ADDA.W #0xc,A7 00022874 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002287a de fc 00 42 | B | ADDA.W #0x42,A7 0002287e 3e ba e3 1a |> | MOVE.W 0x20b9a,(A7) 00022882 3f 3a e3 14 |?: | MOVE.W 0x20b98,-(A7) 00022886 3f 3a e3 0e |?: | MOVE.W 0x20b96,-(A7) 0002288a 59 4f |YO | SUBQ.L #0x4,A7 0002288c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022890 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022894 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00022898 4e 92 |N | JSR (A2) 0002289a 50 4f |PO | ADDQ.L #0x8,A7 0002289c 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000228a2 de fc 00 0a | | ADDA.W #0xa,A7 000228a6 42 81 |B | CLR.L D1 000228a8 32 2e fc 0c |2. | MOVE.W (A6-0x3f4),D1 000228ac 53 81 |S | SUBQ.L #0x1,D1 000228ae 2c 01 |, | MOVE.L D1,D6 000228b0 7e 00 |~ | MOVEQ.L #0x00,D7 000228b2 7a 00 |z | MOVEQ.L #0x00,D5 000228b4 0c 86 00 00 03 3f | ? | CMPI.L #0x0000033f,D6 000228ba 63 02 |c | BLS 0x228be 000228bc 4e 4f |NO | TRAP #15 000228be 41 ee fb ac |A | LEA.L (A6-0x454),A0 000228c2 41 f0 68 00 |A h | LEA.L (A0+D6.L),A0 000228c6 10 28 01 00 | ( | MOVE.B (A0+0x100),D0 000228ca 1d 40 fb d2 | @ | MOVE.B D0,(A6-0x42e) 000228ce 0c 87 00 00 00 16 | | CMPI.L #0x00000016,D7 000228d4 66 18 |f | BNE 0x228ee 000228d6 1f 00 | | MOVE.B D0,-(A7) 000228d8 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char) 000228de 54 4f |TO | ADDQ.L #0x2,A7 000228e0 0c 00 00 0a | | CMPI.B #0x0a,D0 000228e4 66 06 |f | BNE 0x228ec 000228e6 58 4f |XO | ADDQ.L #0x4,A7 000228e8 60 00 00 ae |` | BRA 0x22998 000228ec 60 2c |`, | BRA 0x2291a 000228ee 22 07 |" | MOVE.L D7,D1 000228f0 52 81 |R | ADDQ.L #0x1,D1 000228f2 24 01 |$ | MOVE.L D1,D2 000228f4 53 82 |S | SUBQ.L #0x1,D2 000228f6 0c 82 00 00 00 15 | | CMPI.L #0x00000015,D2 000228fc 63 02 |c | BLS 0x22900 000228fe 4e 4f |NO | TRAP #15 00022900 41 ee fb ac |A | LEA.L (A6-0x454),A0 00022904 b0 30 28 0c | 0( | CMP.B (A0+D2.L+#0xc),D0 00022908 66 04 |f | BNE 0x2290e 0002290a 2e 01 |. | MOVE.L D1,D7 0002290c 60 0c |` | BRA 0x2291a 0002290e b0 2e fb b8 | . | CMP.B (A6-0x448),D0 00022912 66 04 |f | BNE 0x22918 00022914 7e 01 |~ | MOVEQ.L #0x01,D7 00022916 60 02 |` | BRA 0x2291a 00022918 7e 00 |~ | MOVEQ.L #0x00,D7 0002291a 52 86 |R | ADDQ.L #0x1,D6 0002291c 28 06 |( | MOVE.L D6,D4 0002291e 26 3c 00 00 03 40 |&< @ | MOVE.L #0x340,D3 00022924 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 0002292a 2c 03 |, | MOVE.L D3,D6 0002292c 52 85 |R | ADDQ.L #0x1,D5 0002292e 0c 85 00 00 03 3f | ? | CMPI.L #0x0000033f,D5 00022934 6f 00 ff 7e |o ~ | BLE 0x228b4 00022938 41 fa e2 86 |A | LEA.L 0x20bc0,A0 0002293c 70 08 |p | MOVEQ.L #0x08,D0 0002293e 2f 20 |/ | MOVE.L -(A0),-(A7) 00022940 51 c8 ff fc |Q | DBF D0,0x2293e 00022944 59 4f |YO | SUBQ.L #0x4,A7 00022946 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002294a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002294e 3f 3c 00 24 |?< $ | MOVE.W #0x24,-(A7) 00022952 4e 92 |N | JSR (A2) 00022954 50 4f |PO | ADDQ.L #0x8,A7 00022956 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002295c de fc 00 2c | , | ADDA.W #0x2c,A7 00022960 60 36 |`6 | BRA 0x22998 00022962 20 1f | | MOVE.L (A7)+,D0 00022964 52 80 |R | ADDQ.L #0x1,D0 00022966 0c 80 00 00 00 04 | | CMPI.L #0x00000004,D0 0002296c 6f 00 fd c6 |o | BLE 0x22734 00022970 41 fa e2 80 |A | LEA.L 0x20bf2,A0 00022974 70 18 |p | MOVEQ.L #0x18,D0 00022976 3f 20 |? | MOVE.W -(A0),-(A7) 00022978 51 c8 ff fc |Q | DBF D0,0x22976 0002297c 59 4f |YO | SUBQ.L #0x4,A7 0002297e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022982 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022986 3f 3c 00 32 |?< 2 | MOVE.W #0x32,-(A7) 0002298a 4e 92 |N | JSR (A2) 0002298c 50 4f |PO | ADDQ.L #0x8,A7 0002298e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022994 de fc 00 36 | 6 | ADDA.W #0x36,A7 00022998 48 6e ff ec |Hn | PEA.L (A6-0x14) 0002299c 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 000229a2 2f 2e ff ec |/. | MOVE.L (A6-0x14),-(A7) 000229a6 4e ba f9 ec |N | JSR 0x22394 000229aa 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 000229ae 4e ba f9 e4 |N | JSR 0x22394 000229b2 58 4f |XO | ADDQ.L #0x4,A7 000229b4 20 2f 00 04 | / | MOVE.L (A7+0x4),D0 000229b8 90 9f | | SUB.L (A7)+,D0 000229ba 58 4f |XO | ADDQ.L #0x4,A7 000229bc 2d 40 ff f8 |-@ | MOVE.L D0,(A6-0x8) 000229c0 32 2e ff ec |2. | MOVE.W (A6-0x14),D1 000229c4 b2 6e ff f0 | n | CMP.W (A6-0x10),D1 000229c8 64 06 |d | BCC 0x229d0 000229ca 53 80 |S | SUBQ.L #0x1,D0 000229cc 2d 40 ff f8 |-@ | MOVE.L D0,(A6-0x8) 000229d0 20 2e ff f8 | . | MOVE.L (A6-0x8),D0 000229d4 b0 ae ff fc | | CMP.L (A6-0x4),D0 000229d8 6d 4e |mN | BLT 0x22a28 000229da 23 fc 00 00 00 06 00 02 |# | MOVE.L #0x6,0x243b4 000229e2 43 b4 |C | 000229e4 55 4f |UO | SUBQ.L #0x2,A7 000229e6 4e b9 00 01 05 ce |N | JSR ReadKeySwitch() : Bool 000229ec 13 df 00 02 43 b2 | C | MOVE.B (A7)+,0x243b2 000229f2 44 39 00 02 43 b2 |D9 C | NEG.B 0x243b2 000229f8 52 39 00 02 43 b2 |R9 C | ADDQ.B #0x1,0x243b2 000229fe 10 39 00 02 43 af | 9 C | MOVE.B 0x243af,D0 00022a04 e9 08 | | LSL.B #0x4,D0 00022a06 ee 08 | | LSR.B #0x7,D0 00022a08 c1 39 00 02 43 b2 | 9 C | AND.B D0,0x243b2 00022a0e 10 39 00 02 43 af | 9 C | MOVE.B 0x243af,D0 00022a14 eb 08 | | LSL.B #0x5,D0 00022a16 ee 08 | | LSR.B #0x7,D0 00022a18 c1 39 00 02 43 b2 | 9 C | AND.B D0,0x243b2 00022a1e 1d 7c 00 01 00 08 | | | MOVE.B #0x01,(A6+0x8) 00022a24 60 00 01 3e |` > | BRA 0x22b64 00022a28 9e fc 00 28 | ( | SUBA.W #0x28,A7 00022a2c 20 4f | O | MOVEA.L A7,A0 00022a2e 43 fa e1 c2 |C | LEA.L 0x20bf2,A1 00022a32 70 26 |p& | MOVEQ.L #0x26,D0 00022a34 10 d9 | | MOVE.B (A1)+,(A0)+ 00022a36 51 c8 ff fc |Q | DBF D0,0x22a34 00022a3a 41 fa e2 04 |A | LEA.L 0x20c40,A0 00022a3e 70 12 |p | MOVEQ.L #0x12,D0 00022a40 3f 20 |? | MOVE.W -(A0),-(A7) 00022a42 51 c8 ff fc |Q | DBF D0,0x22a40 00022a46 51 4f |QO | SUBQ.L #0x8,A7 00022a48 48 6f 00 2e |Ho . | PEA.L (A7+0x2e) 00022a4c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022a50 3f 3c 00 27 |?< ' | MOVE.W #0x27,-(A7) 00022a54 4e 92 |N | JSR (A2) 00022a56 2e ae ff f8 |. | MOVE.L (A6-0x8),(A7) 00022a5a 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00022a60 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00022a64 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022a68 3f 3c 00 26 |?< & | MOVE.W #0x26,-(A7) 00022a6c 4e 92 |N | JSR (A2) 00022a6e 50 4f |PO | ADDQ.L #0x8,A7 00022a70 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00022a76 de fc 00 0c | | ADDA.W #0xc,A7 00022a7a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022a80 de fc 00 52 | R | ADDA.W #0x52,A7 00022a84 41 fa e1 d2 |A | LEA.L 0x20c58,A0 00022a88 70 05 |p | MOVEQ.L #0x05,D0 00022a8a 2f 20 |/ | MOVE.L -(A0),-(A7) 00022a8c 51 c8 ff fc |Q | DBF D0,0x22a8a 00022a90 9e fc 00 36 | 6 | SUBA.W #0x36,A7 00022a94 20 4f | O | MOVEA.L A7,A0 00022a96 43 fa e1 c0 |C | LEA.L 0x20c58,A1 00022a9a 70 34 |p4 | MOVEQ.L #0x34,D0 00022a9c 10 d9 | | MOVE.B (A1)+,(A0)+ 00022a9e 51 c8 ff fc |Q | DBF D0,0x22a9c 00022aa2 51 4f |QO | SUBQ.L #0x8,A7 00022aa4 48 6f 00 3e |Ho > | PEA.L (A7+0x3e) 00022aa8 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022aac 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00022ab0 4e 92 |N | JSR (A2) 00022ab2 2e ae ff fc |. | MOVE.L (A6-0x4),(A7) 00022ab6 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00022abc 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00022ac0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022ac4 3f 3c 00 35 |?< 5 | MOVE.W #0x35,-(A7) 00022ac8 4e 92 |N | JSR (A2) 00022aca 50 4f |PO | ADDQ.L #0x8,A7 00022acc 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00022ad2 de fc 00 0c | | ADDA.W #0xc,A7 00022ad6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022adc de fc 00 52 | R | ADDA.W #0x52,A7 00022ae0 41 fa e1 fc |A | LEA.L 0x20cde,A0 00022ae4 70 13 |p | MOVEQ.L #0x13,D0 00022ae6 2f 20 |/ | MOVE.L -(A0),-(A7) 00022ae8 51 c8 ff fc |Q | DBF D0,0x22ae6 00022aec 59 4f |YO | SUBQ.L #0x4,A7 00022aee 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022af2 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022af6 3f 3c 00 50 |?< P | MOVE.W #0x50,-(A7) 00022afa 4e 92 |N | JSR (A2) 00022afc 50 4f |PO | ADDQ.L #0x8,A7 00022afe 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022b04 de fc 00 54 | T | ADDA.W #0x54,A7 00022b08 42 39 00 02 43 b2 |B9 C | CLR.B 0x243b2 00022b0e 42 2e 00 08 |B. | CLR.B (A6+0x8) 00022b12 9e fc 00 0a | | SUBA.W #0xa,A7 00022b16 20 4f | O | MOVEA.L A7,A0 00022b18 43 fa e1 c4 |C | LEA.L 0x20cde,A1 00022b1c 70 08 |p | MOVEQ.L #0x08,D0 00022b1e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022b20 51 c8 ff fc |Q | DBF D0,0x22b1e 00022b24 2f 3a e1 ca |/: | MOVE.L 0x20cf0,-(A7) 00022b28 2f 3a e1 c2 |/: | MOVE.L 0x20cec,-(A7) 00022b2c 2f 3a e1 ba |/: | MOVE.L 0x20ce8,-(A7) 00022b30 59 4f |YO | SUBQ.L #0x4,A7 00022b32 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00022b36 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022b3a 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00022b3e 4e 92 |N | JSR (A2) 00022b40 58 4f |XO | ADDQ.L #0x4,A7 00022b42 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022b46 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022b4a 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7) 00022b4e 4e 92 |N | JSR (A2) 00022b50 5c 4f |\O | ADDQ.L #0x6,A7 00022b52 1e bc 00 01 | | MOVE.B #0x01,(A7) 00022b56 48 6e fb eb |Hn | PEA.L (A6-0x415) 00022b5a 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00022b60 de fc 00 24 | $ | ADDA.W #0x24,A7 00022b64 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00022b68 4e 5e |N^ | UNLK A6 00022b6a 4e 75 |Nu | RTS 00022b6c ; -------------------------------------------------------------------------------------- 00022b6c ; OMSI PASCAL Function 00022b6c ; <LVAR 0x008 1(r)> 00022b6c ; <LVAR -0x001 @ 1(r)> 00022b6c ; <LVAR -0x002 @ 1(r)> 00022b6c ; -------------------------------------------------------------------------------------- 00022b6c 4e 56 ff 6a |NV j | LINK.W A6,#0xff6a 00022b70 bf d5 | | CMPA.L (A5),A7 00022b72 62 06 |b | BHI 0x22b7a 00022b74 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022b78 4e 76 |Nv | TRAPV 00022b7a de fc 00 94 | | ADDA.W #0x94,A7 00022b7e 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022b82 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00022b88 47 ee ff ff |G | LEA.L (A6-0x1),A3 00022b8c 49 f9 00 01 03 b0 |I | LEA.L PushProgram(a : String; b : String; MOD c : B; VAR d : Bool),A4 00022b92 72 01 |r | MOVEQ.L #0x01,D1 00022b94 74 0a |t | MOVEQ.L #0x0a,D2 00022b96 76 09 |v | MOVEQ.L #0x09,D3 00022b98 78 18 |x | MOVEQ.L #0x18,D4 00022b9a 7a 0c |z | MOVEQ.L #0x0c,D5 00022b9c 7c 24 ||$ | MOVEQ.L #0x24,D6 00022b9e 7e 50 |~P | MOVEQ.L #0x50,D7 00022ba0 10 39 00 02 43 af | 9 C | MOVE.B 0x243af,D0 00022ba6 e7 08 | | LSL.B #0x3,D0 00022ba8 ee 08 | | LSR.B #0x7,D0 00022baa 67 00 01 86 |g | BEQ 0x22d32 00022bae 4a 39 00 02 43 b1 |J9 C | TST.B 0x243b1 00022bb4 66 00 01 7c |f | | BNE 0x22d32 00022bb8 13 c1 00 02 43 b9 | C | MOVE.B D1,0x243b9 00022bbe 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00022bc4 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00022bca 1f 01 | | MOVE.B D1,-(A7) 00022bcc 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00022bd2 42 17 |B | CLR.B (A7) 00022bd4 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00022bda 1e 81 | | MOVE.B D1,(A7) 00022bdc 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00022be2 54 4f |TO | ADDQ.L #0x2,A7 00022be4 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 00022bea 9e c2 | | SUBA.W D2,A7 00022bec 20 4f | O | MOVEA.L A7,A0 00022bee 43 fa e1 04 |C | LEA.L 0x20cf4,A1 00022bf2 70 08 |p | MOVEQ.L #0x08,D0 00022bf4 10 d9 | | MOVE.B (A1)+,(A0)+ 00022bf6 51 c8 ff fc |Q | DBF D0,0x22bf4 00022bfa 59 4f |YO | SUBQ.L #0x4,A7 00022bfc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022c00 3f 01 |? | MOVE.W D1,-(A7) 00022c02 3f 03 |? | MOVE.W D3,-(A7) 00022c04 4e 92 |N | JSR (A2) 00022c06 50 4f |PO | ADDQ.L #0x8,A7 00022c08 48 78 00 01 |Hx | PEA.L 0x1 00022c0c 1f 01 | | MOVE.B D1,-(A7) 00022c0e 48 53 |HS | PEA.L (A3) 00022c10 4e 94 |N | JSR (A4) 00022c12 de c4 | | ADDA.W D4,A7 00022c14 4a 13 |J | TST.B (A3) 00022c16 66 14 |f | BNE 0x22c2c 00022c18 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00022c1e 48 6e ff fe |Hn | PEA.L (A6-0x2) 00022c22 4e b9 00 01 05 26 |N & | JSR IPC_GetBool() : Bool 00022c28 58 4f |XO | ADDQ.L #0x4,A7 00022c2a 60 04 |` | BRA 0x22c30 00022c2c 42 2e ff fe |B. | CLR.B (A6-0x2) 00022c30 4a 2e ff fe |J. | TST.B (A6-0x2) 00022c34 67 00 00 90 |g | BEQ 0x22cc6 00022c38 9e c2 | | SUBA.W D2,A7 00022c3a 20 4f | O | MOVEA.L A7,A0 00022c3c 43 fa e0 c0 |C | LEA.L 0x20cfe,A1 00022c40 70 08 |p | MOVEQ.L #0x08,D0 00022c42 10 d9 | | MOVE.B (A1)+,(A0)+ 00022c44 51 c8 ff fc |Q | DBF D0,0x22c42 00022c48 2f 3a e0 c6 |/: | MOVE.L 0x20d10,-(A7) 00022c4c 2f 3a e0 be |/: | MOVE.L 0x20d0c,-(A7) 00022c50 2f 3a e0 b6 |/: | MOVE.L 0x20d08,-(A7) 00022c54 59 4f |YO | SUBQ.L #0x4,A7 00022c56 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00022c5a 3f 01 |? | MOVE.W D1,-(A7) 00022c5c 3f 03 |? | MOVE.W D3,-(A7) 00022c5e 4e 92 |N | JSR (A2) 00022c60 58 4f |XO | ADDQ.L #0x4,A7 00022c62 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022c66 3f 01 |? | MOVE.W D1,-(A7) 00022c68 3f 05 |? | MOVE.W D5,-(A7) 00022c6a 4e 92 |N | JSR (A2) 00022c6c 5c 4f |\O | ADDQ.L #0x6,A7 00022c6e 1e 81 | | MOVE.B D1,(A7) 00022c70 48 53 |HS | PEA.L (A3) 00022c72 4e 94 |N | JSR (A4) 00022c74 de c6 | | ADDA.W D6,A7 00022c76 4a 2e 00 08 |J. | TST.B (A6+0x8) 00022c7a 67 48 |gH | BEQ 0x22cc4 00022c7c 41 fa e0 e2 |A | LEA.L 0x20d60,A0 00022c80 70 12 |p | MOVEQ.L #0x12,D0 00022c82 2f 20 |/ | MOVE.L -(A0),-(A7) 00022c84 51 c8 ff fc |Q | DBF D0,0x22c82 00022c88 59 4f |YO | SUBQ.L #0x4,A7 00022c8a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022c8e 3f 01 |? | MOVE.W D1,-(A7) 00022c90 3f 3c 00 4c |?< L | MOVE.W #0x4c,-(A7) 00022c94 4e 92 |N | JSR (A2) 00022c96 50 4f |PO | ADDQ.L #0x8,A7 00022c98 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022c9e de c7 | | ADDA.W D7,A7 00022ca0 41 fa e1 0e |A | LEA.L 0x20db0,A0 00022ca4 70 13 |p | MOVEQ.L #0x13,D0 00022ca6 2f 20 |/ | MOVE.L -(A0),-(A7) 00022ca8 51 c8 ff fc |Q | DBF D0,0x22ca6 00022cac 59 4f |YO | SUBQ.L #0x4,A7 00022cae 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022cb2 3f 01 |? | MOVE.W D1,-(A7) 00022cb4 3f 07 |? | MOVE.W D7,-(A7) 00022cb6 4e 92 |N | JSR (A2) 00022cb8 50 4f |PO | ADDQ.L #0x8,A7 00022cba 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022cc0 de fc 00 54 | T | ADDA.W #0x54,A7 00022cc4 60 6a |`j | BRA 0x22d30 00022cc6 9e c2 | | SUBA.W D2,A7 00022cc8 20 4f | O | MOVEA.L A7,A0 00022cca 43 fa e0 e4 |C | LEA.L 0x20db0,A1 00022cce 70 08 |p | MOVEQ.L #0x08,D0 00022cd0 10 d9 | | MOVE.B (A1)+,(A0)+ 00022cd2 51 c8 ff fc |Q | DBF D0,0x22cd0 00022cd6 41 fa e0 ec |A | LEA.L 0x20dc4,A0 00022cda 70 04 |p | MOVEQ.L #0x04,D0 00022cdc 3f 20 |? | MOVE.W -(A0),-(A7) 00022cde 51 c8 ff fc |Q | DBF D0,0x22cdc 00022ce2 59 4f |YO | SUBQ.L #0x4,A7 00022ce4 48 6f 00 0e |Ho | PEA.L (A7+0xe) 00022ce8 3f 01 |? | MOVE.W D1,-(A7) 00022cea 3f 03 |? | MOVE.W D3,-(A7) 00022cec 4e 92 |N | JSR (A2) 00022cee 58 4f |XO | ADDQ.L #0x4,A7 00022cf0 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022cf4 3f 01 |? | MOVE.W D1,-(A7) 00022cf6 3f 02 |? | MOVE.W D2,-(A7) 00022cf8 4e 92 |N | JSR (A2) 00022cfa 5c 4f |\O | ADDQ.L #0x6,A7 00022cfc 1e 81 | | MOVE.B D1,(A7) 00022cfe 48 53 |HS | PEA.L (A3) 00022d00 4e 94 |N | JSR (A4) 00022d02 9e c4 | | SUBA.W D4,A7 00022d04 20 4f | O | MOVEA.L A7,A0 00022d06 43 fa e0 bc |C | LEA.L 0x20dc4,A1 00022d0a 70 38 |p8 | MOVEQ.L #0x38,D0 00022d0c 10 d9 | | MOVE.B (A1)+,(A0)+ 00022d0e 51 c8 ff fc |Q | DBF D0,0x22d0c 00022d12 59 4f |YO | SUBQ.L #0x4,A7 00022d14 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022d18 3f 01 |? | MOVE.W D1,-(A7) 00022d1a 3f 3c 00 39 |?< 9 | MOVE.W #0x39,-(A7) 00022d1e 4e 92 |N | JSR (A2) 00022d20 50 4f |PO | ADDQ.L #0x8,A7 00022d22 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022d28 de fc 00 3e | > | ADDA.W #0x3e,A7 00022d2c 4e ba f2 1a |N | JSR 0x21f48 00022d30 60 6e |`n | BRA 0x22da0 00022d32 41 fa e0 f2 |A | LEA.L 0x20e26,A0 00022d36 70 09 |p | MOVEQ.L #0x09,D0 00022d38 2f 20 |/ | MOVE.L -(A0),-(A7) 00022d3a 51 c8 ff fc |Q | DBF D0,0x22d38 00022d3e 59 4f |YO | SUBQ.L #0x4,A7 00022d40 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022d44 3f 01 |? | MOVE.W D1,-(A7) 00022d46 3f 3c 00 28 |?< ( | MOVE.W #0x28,-(A7) 00022d4a 4e 92 |N | JSR (A2) 00022d4c 50 4f |PO | ADDQ.L #0x8,A7 00022d4e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022d54 de fc 00 22 | " | ADDA.W #0x22,A7 00022d58 20 4f | O | MOVEA.L A7,A0 00022d5a 43 fa e0 ca |C | LEA.L 0x20e26,A1 00022d5e 70 08 |p | MOVEQ.L #0x08,D0 00022d60 10 d9 | | MOVE.B (A1)+,(A0)+ 00022d62 51 c8 ff fc |Q | DBF D0,0x22d60 00022d66 2f 3a e0 d0 |/: | MOVE.L 0x20e38,-(A7) 00022d6a 2f 3a e0 c8 |/: | MOVE.L 0x20e34,-(A7) 00022d6e 2f 3a e0 c0 |/: | MOVE.L 0x20e30,-(A7) 00022d72 59 4f |YO | SUBQ.L #0x4,A7 00022d74 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00022d78 3f 01 |? | MOVE.W D1,-(A7) 00022d7a 3f 03 |? | MOVE.W D3,-(A7) 00022d7c 4e 92 |N | JSR (A2) 00022d7e 58 4f |XO | ADDQ.L #0x4,A7 00022d80 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022d84 3f 01 |? | MOVE.W D1,-(A7) 00022d86 3f 05 |? | MOVE.W D5,-(A7) 00022d88 4e 92 |N | JSR (A2) 00022d8a 5c 4f |\O | ADDQ.L #0x6,A7 00022d8c 1e 81 | | MOVE.B D1,(A7) 00022d8e 48 53 |HS | PEA.L (A3) 00022d90 4e 94 |N | JSR (A4) 00022d92 de c6 | | ADDA.W D6,A7 00022d94 42 39 00 02 43 b2 |B9 C | CLR.B 0x243b2 00022d9a 23 c1 00 02 43 b4 |# C | MOVE.L D1,0x243b4 00022da0 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00022da4 4e 5e |N^ | UNLK A6 00022da6 4e 75 |Nu | RTS 00022da8 ; -------------------------------------------------------------------------------------- 00022da8 ; OMSI PASCAL Function 00022da8 ; <LVAR 0x008 1(r)> 00022da8 ; <LVAR -0x078 2(r)> 00022da8 ; <LVAR -0x07a @ 2(w)> 00022da8 ; -------------------------------------------------------------------------------------- 00022da8 4e 56 ff 2e |NV . | LINK.W A6,#0xff2e 00022dac bf d5 | | CMPA.L (A5),A7 00022dae 62 06 |b | BHI 0x22db6 00022db0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022db4 4e 76 |Nv | TRAPV 00022db6 de fc 00 58 | X | ADDA.W #0x58,A7 00022dba 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7) 00022dbe 72 01 |r | MOVEQ.L #0x01,D1 00022dc0 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00022dc4 48 80 |H | EXTB.W D0 00022dc6 3d 40 ff 86 |=@ | MOVE.W D0,(A6-0x7a) 00022dca 42 6e ff 88 |Bn | CLR.W (A6-0x78) 00022dce 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00022dd2 41 ee ff 86 |A | LEA.L (A6-0x7a),A0 00022dd6 2f 08 |/ | MOVE.L A0,-(A7) 00022dd8 4e b9 00 01 03 a8 |N | JSR Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer) 00022dde 9e fc 00 32 | 2 | SUBA.W #0x32,A7 00022de2 20 4f | O | MOVEA.L A7,A0 00022de4 43 fa e0 56 |C V | LEA.L 0x20e3c,A1 00022de8 70 36 |p6 | MOVEQ.L #0x36,D0 00022dea 10 d9 | | MOVE.B (A1)+,(A0)+ 00022dec 51 c8 ff fc |Q | DBF D0,0x22dea 00022df0 59 4f |YO | SUBQ.L #0x4,A7 00022df2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022df6 3f 01 |? | MOVE.W D1,-(A7) 00022df8 3f 3c 00 37 |?< 7 | MOVE.W #0x37,-(A7) 00022dfc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022e02 50 4f |PO | ADDQ.L #0x8,A7 00022e04 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022e0a de fc 00 38 | 8 | ADDA.W #0x38,A7 00022e0e 2e b9 00 02 43 ba |. C | MOVE.L 0x243ba,(A7) 00022e14 59 4f |YO | SUBQ.L #0x4,A7 00022e16 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022e1a 3f 01 |? | MOVE.W D1,-(A7) 00022e1c 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00022e20 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022e26 50 4f |PO | ADDQ.L #0x8,A7 00022e28 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00022e2e 50 4f |PO | ADDQ.L #0x8,A7 00022e30 42 39 00 02 43 b2 |B9 C | CLR.B 0x243b2 00022e36 23 fc 00 00 00 06 00 02 |# | MOVE.L #0x6,0x243b4 00022e3e 43 b4 |C | 00022e40 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1 00022e44 4e 5e |N^ | UNLK A6 00022e46 4e 75 |Nu | RTS 00022e48 ; -------------------------------------------------------------------------------------- 00022e48 ; OMSI PASCAL Function 00022e48 ; <LVAR 0x008 1(r)> 00022e48 ; <LVAR -0x004 @ 1(r)> 00022e48 ; <LVAR -0x07c 2(r)> 00022e48 ; <LVAR -0x07e @ 2(w)> 00022e48 ; -------------------------------------------------------------------------------------- 00022e48 4e 56 ff 10 |NV | LINK.W A6,#0xff10 00022e4c bf d5 | | CMPA.L (A5),A7 00022e4e 62 06 |b | BHI 0x22e56 00022e50 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022e54 4e 76 |Nv | TRAPV 00022e56 de fc 00 72 | r | ADDA.W #0x72,A7 00022e5a 48 e7 f0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7) 00022e5e 45 f9 00 02 43 b2 |E C | LEA.L 0x243b2,A2 00022e64 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00022e6a 49 f9 00 02 43 b4 |I C | LEA.L 0x243b4,A4 00022e70 76 01 |v | MOVEQ.L #0x01,D3 00022e72 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00022e76 48 80 |H | EXTB.W D0 00022e78 3d 40 ff 82 |=@ | MOVE.W D0,(A6-0x7e) 00022e7c 42 6e ff 84 |Bn | CLR.W (A6-0x7c) 00022e80 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00022e84 41 ee ff 82 |A | LEA.L (A6-0x7e),A0 00022e88 2f 08 |/ | MOVE.L A0,-(A7) 00022e8a 4e b9 00 01 03 a8 |N | JSR Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer) 00022e90 5c 4f |\O | ADDQ.L #0x6,A7 00022e92 4a 40 |J@ | TST.W D0 00022e94 66 28 |f( | BNE 0x22ebe 00022e96 41 fa e0 04 |A | LEA.L 0x20e9c,A0 00022e9a 72 09 |r | MOVEQ.L #0x09,D1 00022e9c 2f 20 |/ | MOVE.L -(A0),-(A7) 00022e9e 51 c9 ff fc |Q | DBF D1,0x22e9c 00022ea2 59 4f |YO | SUBQ.L #0x4,A7 00022ea4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022ea8 3f 03 |? | MOVE.W D3,-(A7) 00022eaa 3f 3c 00 28 |?< ( | MOVE.W #0x28,-(A7) 00022eae 4e 93 |N | JSR (A3) 00022eb0 50 4f |PO | ADDQ.L #0x8,A7 00022eb2 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022eb8 de fc 00 2c | , | ADDA.W #0x2c,A7 00022ebc 60 26 |`& | BRA 0x22ee4 00022ebe 41 fa e0 18 |A | LEA.L 0x20ed8,A0 00022ec2 72 0e |r | MOVEQ.L #0x0e,D1 00022ec4 2f 20 |/ | MOVE.L -(A0),-(A7) 00022ec6 51 c9 ff fc |Q | DBF D1,0x22ec4 00022eca 59 4f |YO | SUBQ.L #0x4,A7 00022ecc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022ed0 3f 03 |? | MOVE.W D3,-(A7) 00022ed2 3f 3c 00 3c |?< < | MOVE.W #0x3c,-(A7) 00022ed6 4e 93 |N | JSR (A3) 00022ed8 50 4f |PO | ADDQ.L #0x8,A7 00022eda 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022ee0 de fc 00 40 | @ | ADDA.W #0x40,A7 00022ee4 2f 39 00 02 43 ba |/9 C | MOVE.L 0x243ba,-(A7) 00022eea 59 4f |YO | SUBQ.L #0x4,A7 00022eec 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022ef0 3f 03 |? | MOVE.W D3,-(A7) 00022ef2 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00022ef6 4e 93 |N | JSR (A3) 00022ef8 50 4f |PO | ADDQ.L #0x8,A7 00022efa 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00022f00 5c 4f |\O | ADDQ.L #0x6,A7 00022f02 42 17 |B | CLR.B (A7) 00022f04 4e ba ee 28 |N ( | JSR 0x21d2e 00022f08 54 4f |TO | ADDQ.L #0x2,A7 00022f0a 28 bc 00 00 00 06 |( | MOVE.L #0x6,(A4) 00022f10 42 12 |B | CLR.B (A2) 00022f12 55 4f |UO | SUBQ.L #0x2,A7 00022f14 4e b9 00 01 05 ce |N | JSR ReadKeySwitch() : Bool 00022f1a 12 1f | | MOVE.B (A7)+,D1 00022f1c 44 01 |D | NEG.B D1 00022f1e 52 01 |R | ADDQ.B #0x1,D1 00022f20 14 39 00 02 43 af | 9 C | MOVE.B 0x243af,D2 00022f26 e9 0a | | LSL.B #0x4,D2 00022f28 ee 0a | | LSR.B #0x7,D2 00022f2a c4 01 | | AND.B D1,D2 00022f2c 12 39 00 02 43 af | 9 C | MOVE.B 0x243af,D1 00022f32 eb 09 | | LSL.B #0x5,D1 00022f34 ee 09 | | LSR.B #0x7,D1 00022f36 c2 02 | | AND.B D2,D1 00022f38 67 06 |g | BEQ 0x22f40 00022f3a 4a 40 |J@ | TST.W D0 00022f3c 66 02 |f | BNE 0x22f40 00022f3e 52 12 |R | ADDQ.B #0x1,(A2) 00022f40 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00022f46 42 27 |B' | CLR.B -(A7) 00022f48 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00022f4e 51 4f |QO | SUBQ.L #0x8,A7 00022f50 20 4f | O | MOVEA.L A7,A0 00022f52 43 fa df 84 |C | LEA.L 0x20ed8,A1 00022f56 70 08 |p | MOVEQ.L #0x08,D0 00022f58 10 d9 | | MOVE.B (A1)+,(A0)+ 00022f5a 51 c8 ff fc |Q | DBF D0,0x22f58 00022f5e 59 4f |YO | SUBQ.L #0x4,A7 00022f60 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022f64 3f 03 |? | MOVE.W D3,-(A7) 00022f66 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00022f6a 4e 93 |N | JSR (A3) 00022f6c 50 4f |PO | ADDQ.L #0x8,A7 00022f6e 48 78 00 01 |Hx | PEA.L 0x1 00022f72 42 27 |B' | CLR.B -(A7) 00022f74 48 6e ff fc |Hn | PEA.L (A6-0x4) 00022f78 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00022f7e de fc 00 18 | | ADDA.W #0x18,A7 00022f82 4a 2e ff fc |J. | TST.B (A6-0x4) 00022f86 66 0a |f | BNE 0x22f92 00022f88 42 27 |B' | CLR.B -(A7) 00022f8a 4e ba fb e0 |N | JSR 0x22b6c 00022f8e 54 4f |TO | ADDQ.L #0x2,A7 00022f90 60 04 |` | BRA 0x22f96 00022f92 42 12 |B | CLR.B (A2) 00022f94 28 83 |( | MOVE.L D3,(A4) 00022f96 4c df 1f 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4 00022f9a 4e 5e |N^ | UNLK A6 00022f9c 4e 75 |Nu | RTS 00022f9e ; -------------------------------------------------------------------------------------- 00022f9e ; OMSI PASCAL Function 00022f9e ; <LVAR 0x008 1(r)> 00022f9e ; <LVAR -0x078 2(r)> 00022f9e ; <LVAR -0x07a @ 2(w)> 00022f9e ; -------------------------------------------------------------------------------------- 00022f9e 4e 56 ff 04 |NV | LINK.W A6,#0xff04 00022fa2 bf d5 | | CMPA.L (A5),A7 00022fa4 62 06 |b | BHI 0x22fac 00022fa6 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022faa 4e 76 |Nv | TRAPV 00022fac de fc 00 82 | | ADDA.W #0x82,A7 00022fb0 48 e7 fe f8 |H | MOVEM.L A4+A3+A2+A1+A0+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022fb4 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00022fba 47 f9 00 02 43 b4 |G C | LEA.L 0x243b4,A3 00022fc0 49 f9 00 02 43 ba |I C | LEA.L 0x243ba,A4 00022fc6 72 01 |r | MOVEQ.L #0x01,D1 00022fc8 74 04 |t | MOVEQ.L #0x04,D2 00022fca 76 02 |v | MOVEQ.L #0x02,D3 00022fcc 78 36 |x6 | MOVEQ.L #0x36,D4 00022fce 7a 40 |z@ | MOVEQ.L #0x40,D5 00022fd0 7c 32 ||2 | MOVEQ.L #0x32,D6 00022fd2 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00022fd6 48 80 |H | EXTB.W D0 00022fd8 3d 40 ff 86 |=@ | MOVE.W D0,(A6-0x7a) 00022fdc 42 6e ff 88 |Bn | CLR.W (A6-0x78) 00022fe0 1f 03 | | MOVE.B D3,-(A7) 00022fe2 41 ee ff 86 |A | LEA.L (A6-0x7a),A0 00022fe6 2f 08 |/ | MOVE.L A0,-(A7) 00022fe8 4e b9 00 01 03 a8 |N | JSR Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer) 00022fee 5c 4f |\O | ADDQ.L #0x6,A7 00022ff0 42 39 00 02 43 b2 |B9 C | CLR.B 0x243b2 00022ff6 26 bc 00 00 00 06 |& | MOVE.L #0x6,(A3) 00022ffc 0c 00 00 20 | | CMPI.B #0x20,D0 00023000 66 44 |fD | BNE 0x23046 00023002 41 fa df 86 |A | LEA.L 0x20f8a,A0 00023006 70 1a |p | MOVEQ.L #0x1a,D0 00023008 3f 20 |? | MOVE.W -(A0),-(A7) 0002300a 51 c8 ff fc |Q | DBF D0,0x23008 0002300e 59 4f |YO | SUBQ.L #0x4,A7 00023010 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023014 3f 01 |? | MOVE.W D1,-(A7) 00023016 3f 04 |? | MOVE.W D4,-(A7) 00023018 4e 92 |N | JSR (A2) 0002301a 50 4f |PO | ADDQ.L #0x8,A7 0002301c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023022 de c4 | | ADDA.W D4,A7 00023024 2e 94 |. | MOVE.L (A4),(A7) 00023026 59 4f |YO | SUBQ.L #0x4,A7 00023028 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002302c 3f 01 |? | MOVE.W D1,-(A7) 0002302e 3f 02 |? | MOVE.W D2,-(A7) 00023030 4e 92 |N | JSR (A2) 00023032 50 4f |PO | ADDQ.L #0x8,A7 00023034 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 0002303a 50 4f |PO | ADDQ.L #0x8,A7 0002303c 13 c1 00 02 43 b2 | C | MOVE.B D1,0x243b2 00023042 60 00 00 9a |` | BRA 0x230de 00023046 0c 00 00 19 | | CMPI.B #0x19,D0 0002304a 66 42 |fB | BNE 0x2308e 0002304c 9e c5 | | SUBA.W D5,A7 0002304e 20 4f | O | MOVEA.L A7,A0 00023050 43 fa de c2 |C | LEA.L 0x20f14,A1 00023054 70 3e |p> | MOVEQ.L #0x3e,D0 00023056 10 d9 | | MOVE.B (A1)+,(A0)+ 00023058 51 c8 ff fc |Q | DBF D0,0x23056 0002305c 59 4f |YO | SUBQ.L #0x4,A7 0002305e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023062 3f 01 |? | MOVE.W D1,-(A7) 00023064 3f 3c 00 3f |?< ? | MOVE.W #0x3f,-(A7) 00023068 4e 92 |N | JSR (A2) 0002306a 50 4f |PO | ADDQ.L #0x8,A7 0002306c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023072 de c5 | | ADDA.W D5,A7 00023074 2e 94 |. | MOVE.L (A4),(A7) 00023076 59 4f |YO | SUBQ.L #0x4,A7 00023078 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002307c 3f 01 |? | MOVE.W D1,-(A7) 0002307e 3f 02 |? | MOVE.W D2,-(A7) 00023080 4e 92 |N | JSR (A2) 00023082 50 4f |PO | ADDQ.L #0x8,A7 00023084 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 0002308a 50 4f |PO | ADDQ.L #0x8,A7 0002308c 60 50 |`P | BRA 0x230de 0002308e 41 fa de 84 |A | LEA.L 0x20f14,A0 00023092 70 18 |p | MOVEQ.L #0x18,D0 00023094 3f 20 |? | MOVE.W -(A0),-(A7) 00023096 51 c8 ff fc |Q | DBF D0,0x23094 0002309a 59 4f |YO | SUBQ.L #0x4,A7 0002309c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000230a0 3f 01 |? | MOVE.W D1,-(A7) 000230a2 3f 06 |? | MOVE.W D6,-(A7) 000230a4 4e 92 |N | JSR (A2) 000230a6 50 4f |PO | ADDQ.L #0x8,A7 000230a8 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000230ae de c6 | | ADDA.W D6,A7 000230b0 2e 94 |. | MOVE.L (A4),(A7) 000230b2 59 4f |YO | SUBQ.L #0x4,A7 000230b4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000230b8 3f 01 |? | MOVE.W D1,-(A7) 000230ba 3f 02 |? | MOVE.W D2,-(A7) 000230bc 4e 92 |N | JSR (A2) 000230be 50 4f |PO | ADDQ.L #0x8,A7 000230c0 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000230c6 50 4f |PO | ADDQ.L #0x8,A7 000230c8 4a 39 00 02 43 b0 |J9 C | TST.B 0x243b0 000230ce 67 0c |g | BEQ 0x230dc 000230d0 1f 01 | | MOVE.B D1,-(A7) 000230d2 4e ba ec 5a |N Z | JSR 0x21d2e 000230d6 54 4f |TO | ADDQ.L #0x2,A7 000230d8 26 83 |& | MOVE.L D3,(A3) 000230da 60 02 |` | BRA 0x230de 000230dc 26 81 |& | MOVE.L D1,(A3) 000230de 4c df 1f 7f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+A0+A1+A2+A3+A4 000230e2 4e 5e |N^ | UNLK A6 000230e4 4e 75 |Nu | RTS 000230e6 ; -------------------------------------------------------------------------------------- 000230e6 ; OMSI PASCAL Function 000230e6 ; <LVAR 0x008 1(r)> 000230e6 ; <LVAR -0x002 @ 1(r)> 000230e6 ; -------------------------------------------------------------------------------------- 000230e6 4e 56 ff ec |NV | LINK.W A6,#0xffec 000230ea bf d5 | | CMPA.L (A5),A7 000230ec 62 06 |b | BHI 0x230f4 000230ee 44 fc 00 02 |D | MOVE.W #0x2,CCR 000230f2 4e 76 |Nv | TRAPV 000230f4 de fc 00 12 | | ADDA.W #0x12,A7 000230f8 48 e7 c0 00 |H | MOVEM.L D1+D0,-(A7) 000230fc 72 01 |r | MOVEQ.L #0x01,D1 000230fe 4e ba e5 3e |N > | JSR 0x2163e 00023102 59 4f |YO | SUBQ.L #0x4,A7 00023104 4e b9 00 01 03 f8 |N | JSR GetConsoleConfig() : Long 0002310a 20 1f | | MOVE.L (A7)+,D0 0002310c b0 81 | | CMP.L D1,D0 0002310e 67 0a |g | BEQ 0x2311a 00023110 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00023114 4e ba f1 f8 |N | JSR 0x2230e 00023118 54 4f |TO | ADDQ.L #0x2,A7 0002311a 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 0002311e 48 6e ff fe |Hn | PEA.L (A6-0x2) 00023122 4e ba ef 66 |N f | JSR 0x2208a 00023126 58 4f |XO | ADDQ.L #0x4,A7 00023128 1e 81 | | MOVE.B D1,(A7) 0002312a 4e ba ec 02 |N | JSR 0x21d2e 0002312e 54 4f |TO | ADDQ.L #0x2,A7 00023130 4a 2e ff fe |J. | TST.B (A6-0x2) 00023134 67 02 |g | BEQ 0x23138 00023136 60 14 |` | BRA 0x2314c 00023138 55 4f |UO | SUBQ.L #0x2,A7 0002313a 4e ba f3 38 |N 8 | JSR 0x22474 0002313e 4a 1f |J | TST.B (A7)+ 00023140 67 0a |g | BEQ 0x2314c 00023142 1f 01 | | MOVE.B D1,-(A7) 00023144 4e ba fa 26 |N & | JSR 0x22b6c 00023148 54 4f |TO | ADDQ.L #0x2,A7 0002314a 60 04 |` | BRA 0x23150 0002314c 4e ba ed fa |N | JSR 0x21f48 00023150 4c df 00 03 |L | MOVEM.L (A7)+,D0+D1 00023154 4e 5e |N^ | UNLK A6 00023156 4e 75 |Nu | RTS 00023158 ; -------------------------------------------------------------------------------------- 00023158 ; OMSI PASCAL Function 00023158 ; <LVAR 0x008 1(r)> 00023158 ; <LVAR -0x076 2(r)> 00023158 ; <LVAR -0x078 2(w)> 00023158 ; <LVAR -0x07a @ 2(w)> 00023158 ; -------------------------------------------------------------------------------------- 00023158 4e 56 ff 46 |NV F | LINK.W A6,#0xff46 0002315c bf d5 | | CMPA.L (A5),A7 0002315e 62 06 |b | BHI 0x23166 00023160 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023164 4e 76 |Nv | TRAPV 00023166 de fc 00 40 | @ | ADDA.W #0x40,A7 0002316a 48 e7 e0 80 |H | MOVEM.L A0+D2+D1+D0,-(A7) 0002316e 72 03 |r | MOVEQ.L #0x03,D1 00023170 74 01 |t | MOVEQ.L #0x01,D2 00023172 3d 41 ff 86 |=A | MOVE.W D1,(A6-0x7a) 00023176 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 0002317a 48 80 |H | EXTB.W D0 0002317c 3d 40 ff 88 |=@ | MOVE.W D0,(A6-0x78) 00023180 42 6e ff 8a |Bn | CLR.W (A6-0x76) 00023184 1f 01 | | MOVE.B D1,-(A7) 00023186 41 ee ff 86 |A | LEA.L (A6-0x7a),A0 0002318a 2f 08 |/ | MOVE.L A0,-(A7) 0002318c 4e b9 00 01 03 a8 |N | JSR Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer) 00023192 58 4f |XO | ADDQ.L #0x4,A7 00023194 1e 82 | | MOVE.B D2,(A7) 00023196 4e ba eb 96 |N | JSR 0x21d2e 0002319a 4e ba f2 d8 |N | JSR 0x22474 0002319e 4a 1f |J | TST.B (A7)+ 000231a0 67 0a |g | BEQ 0x231ac 000231a2 42 27 |B' | CLR.B -(A7) 000231a4 4e ba f9 c6 |N | JSR 0x22b6c 000231a8 54 4f |TO | ADDQ.L #0x2,A7 000231aa 60 3a |`: | BRA 0x231e6 000231ac 42 39 00 02 43 b2 |B9 C | CLR.B 0x243b2 000231b2 23 fc 00 00 00 02 00 02 |# | MOVE.L #0x2,0x243b4 000231ba 43 b4 |C | 000231bc 41 fa dd ec |A | LEA.L 0x20faa,A0 000231c0 70 07 |p | MOVEQ.L #0x07,D0 000231c2 2f 20 |/ | MOVE.L -(A0),-(A7) 000231c4 51 c8 ff fc |Q | DBF D0,0x231c2 000231c8 59 4f |YO | SUBQ.L #0x4,A7 000231ca 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000231ce 3f 02 |? | MOVE.W D2,-(A7) 000231d0 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7) 000231d4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000231da 50 4f |PO | ADDQ.L #0x8,A7 000231dc 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000231e2 de fc 00 24 | $ | ADDA.W #0x24,A7 000231e6 4c df 01 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0 000231ea 4e 5e |N^ | UNLK A6 000231ec 4e 75 |Nu | RTS 000231ee ; -------------------------------------------------------------------------------------- 000231ee ; OMSI PASCAL Function 000231ee ; <LVAR -0x078 2(r)> 000231ee ; <LVAR -0x07a 2(w)> 000231ee ; <LVAR -0x07c @ 2(w)> 000231ee ; -------------------------------------------------------------------------------------- 000231ee 4e 56 ff 6e |NV n | LINK.W A6,#0xff6e 000231f2 bf d5 | | CMPA.L (A5),A7 000231f4 62 06 |b | BHI 0x231fc 000231f6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000231fa 4e 76 |Nv | TRAPV 000231fc de fc 00 16 | | ADDA.W #0x16,A7 00023200 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00023204 43 f9 00 02 43 b2 |C C | LEA.L 0x243b2,A1 0002320a 3d 7c 00 04 ff 84 |=| | MOVE.W #0x4,(A6-0x7c) 00023210 3d 7c 00 09 ff 86 |=| | MOVE.W #0x9,(A6-0x7a) 00023216 42 6e ff 88 |Bn | CLR.W (A6-0x78) 0002321a 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 0002321e 41 ee ff 84 |A | LEA.L (A6-0x7c),A0 00023222 2f 08 |/ | MOVE.L A0,-(A7) 00023224 4e b9 00 01 03 a8 |N | JSR Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer) 0002322a 58 4f |XO | ADDQ.L #0x4,A7 0002322c 42 17 |B | CLR.B (A7) 0002322e 4e ba ea fe |N | JSR 0x21d2e 00023232 4e b9 00 01 05 ce |N | JSR ReadKeySwitch() : Bool 00023238 12 9f | | MOVE.B (A7)+,(A1) 0002323a 44 11 |D | NEG.B (A1) 0002323c 52 11 |R | ADDQ.B #0x1,(A1) 0002323e 10 39 00 02 43 af | 9 C | MOVE.B 0x243af,D0 00023244 e9 08 | | LSL.B #0x4,D0 00023246 ee 08 | | LSR.B #0x7,D0 00023248 c1 11 | | AND.B D0,(A1) 0002324a 10 39 00 02 43 af | 9 C | MOVE.B 0x243af,D0 00023250 eb 08 | | LSL.B #0x5,D0 00023252 ee 08 | | LSR.B #0x7,D0 00023254 c1 11 | | AND.B D0,(A1) 00023256 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 0002325a 4e 5e |N^ | UNLK A6 0002325c 4e 75 |Nu | RTS 0002325e ; -------------------------------------------------------------------------------------- 0002325e ; OMSI PASCAL Function 0002325e ; <LVAR 0x008 1(r)> 0002325e ; -------------------------------------------------------------------------------------- 0002325e 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00023262 bf d5 | | CMPA.L (A5),A7 00023264 62 06 |b | BHI 0x2326c 00023266 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002326a 4e 76 |Nv | TRAPV 0002326c de fc 00 1c | | ADDA.W #0x1c,A7 00023270 48 e7 c0 00 |H | MOVEM.L D1+D0,-(A7) 00023274 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00023278 4e ba f0 94 |N | JSR 0x2230e 0002327c 54 4f |TO | ADDQ.L #0x2,A7 0002327e 2f 39 00 02 43 ba |/9 C | MOVE.L 0x243ba,-(A7) 00023284 59 4f |YO | SUBQ.L #0x4,A7 00023286 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002328a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002328e 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00023292 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023298 50 4f |PO | ADDQ.L #0x8,A7 0002329a 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000232a0 50 4f |PO | ADDQ.L #0x8,A7 000232a2 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000232a6 48 80 |H | EXTB.W D0 000232a8 32 00 |2 | MOVE.W D0,D1 000232aa 0c 41 00 0d | A | CMPI.W #0x000d,D1 000232ae 63 02 |c | BLS 0x232b2 000232b0 4e 4e |NN | TRAP #14 000232b2 d2 41 | A | ADD.W D1,D1 000232b4 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W 000232bc 00 1c | | .CONST 0x1c ; [0x0] -> 0x232d8 000232be 00 1e | | .CONST 0x1e ; [0x1] -> 0x232da 000232c0 00 20 | | .CONST 0x20 ; [0x2] -> 0x232dc 000232c2 00 28 | ( | .CONST 0x28 ; [0x3] -> 0x232e4 000232c4 00 2a | * | .CONST 0x2a ; [0x4] -> 0x232e6 000232c6 00 2c | , | .CONST 0x2c ; [0x5] -> 0x232e8 000232c8 00 2e | . | .CONST 0x2e ; [0x6] -> 0x232ea 000232ca 00 30 | 0 | .CONST 0x30 ; [0x7] -> 0x232ec 000232cc 00 32 | 2 | .CONST 0x32 ; [0x8] -> 0x232ee 000232ce 00 34 | 4 | .CONST 0x34 ; [0x9] -> 0x232f0 000232d0 00 3a | : | .CONST 0x3a ; [0xa] -> 0x232f6 000232d2 00 3c | < | .CONST 0x3c ; [0xb] -> 0x232f8 000232d4 00 3e | > | .CONST 0x3e ; [0xc] -> 0x232fa 000232d6 00 40 | @ | .CONST 0x40 ; [0xd] -> 0x232fc 000232d8 switch@0x232b4[0x0]: 000232d8 60 2a |`* | BRA 0x23304 000232da switch@0x232b4[0x1]: 000232da 60 20 |` | BRA switch@0x232b4[0xd] 000232dc switch@0x232b4[0x2]: 000232dc 1f 00 | | MOVE.B D0,-(A7) 000232de 4e ba fe 06 |N | JSR 0x230e6 000232e2 60 1e |` | BRA 0x23302 000232e4 switch@0x232b4[0x3]: 000232e4 60 16 |` | BRA switch@0x232b4[0xd] 000232e6 switch@0x232b4[0x4]: 000232e6 60 f4 |` | BRA switch@0x232b4[0x2] 000232e8 switch@0x232b4[0x5]: 000232e8 60 f2 |` | BRA switch@0x232b4[0x2] 000232ea switch@0x232b4[0x6]: 000232ea 60 f0 |` | BRA switch@0x232b4[0x2] 000232ec switch@0x232b4[0x7]: 000232ec 60 0e |` | BRA switch@0x232b4[0xd] 000232ee switch@0x232b4[0x8]: 000232ee 60 0c |` | BRA switch@0x232b4[0xd] 000232f0 switch@0x232b4[0x9]: 000232f0 4e ba fe fc |N | JSR 0x231ee 000232f4 60 0e |` | BRA 0x23304 000232f6 switch@0x232b4[0xa]: 000232f6 60 04 |` | BRA switch@0x232b4[0xd] 000232f8 switch@0x232b4[0xb]: 000232f8 60 e2 |` | BRA switch@0x232b4[0x2] 000232fa switch@0x232b4[0xc]: 000232fa 60 e0 |` | BRA switch@0x232b4[0x2] 000232fc switch@0x232b4[0xd]: 000232fc 1f 00 | | MOVE.B D0,-(A7) 000232fe 4e ba fe 58 |N X | JSR 0x23158 00023302 54 4f |TO | ADDQ.L #0x2,A7 00023304 4c df 00 03 |L | MOVEM.L (A7)+,D0+D1 00023308 4e 5e |N^ | UNLK A6 0002330a 4e 75 |Nu | RTS 0002330c ; -------------------------------------------------------------------------------------- 0002330c ; OMSI PASCAL Function 0002330c ; <LVAR 0x012 @ 4(r)> 0002330c ; <LVAR 0x00e @ 4(r)> 0002330c ; <LVAR 0x00a 4(r)> 0002330c ; <LVAR 0x008 1(r)> 0002330c ; -------------------------------------------------------------------------------------- 0002330c 4e 56 ff ca |NV | LINK.W A6,#0xffca 00023310 bf d5 | | CMPA.L (A5),A7 00023312 62 06 |b | BHI 0x2331a 00023314 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023318 4e 76 |Nv | TRAPV 0002331a de fc 00 34 | 4 | ADDA.W #0x34,A7 0002331e 48 e7 e0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D2+D1+D0,-(A7) 00023322 41 f9 00 02 43 b4 |A C | LEA.L 0x243b4,A0 00023328 43 f9 00 02 43 b0 |C C | LEA.L 0x243b0,A1 0002332e 45 f9 00 01 02 cc |E | LEA.L StringDup(a : String) : String,A2 00023334 47 ee 00 12 |G | LEA.L (A6+0x12),A3 00023338 49 ee 00 0e |I | LEA.L (A6+0xe),A4 0002333c 72 01 |r | MOVEQ.L #0x01,D1 0002333e 74 02 |t | MOVEQ.L #0x02,D2 00023340 59 4f |YO | SUBQ.L #0x4,A7 00023342 2f 13 |/ | MOVE.L (A3),-(A7) 00023344 4e 92 |N | JSR (A2) 00023346 58 4f |XO | ADDQ.L #0x4,A7 00023348 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002334e 54 4f |TO | ADDQ.L #0x2,A7 00023350 3e ba dc 58 |> X | MOVE.W 0x20faa,(A7) 00023354 59 4f |YO | SUBQ.L #0x4,A7 00023356 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002335a 3f 01 |? | MOVE.W D1,-(A7) 0002335c 3f 02 |? | MOVE.W D2,-(A7) 0002335e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023364 50 4f |PO | ADDQ.L #0x8,A7 00023366 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 0002336c 54 4f |TO | ADDQ.L #0x2,A7 0002336e 2f 14 |/ | MOVE.L (A4),-(A7) 00023370 4e 92 |N | JSR (A2) 00023372 2e ae 00 0a |. | MOVE.L (A6+0xa),(A7) 00023376 4e b9 00 01 04 50 |N P | JSR FS_10450(&, &) 0002337c 58 4f |XO | ADDQ.L #0x4,A7 0002337e 2e b9 00 02 43 ba |. C | MOVE.L 0x243ba,(A7) 00023384 59 4f |YO | SUBQ.L #0x4,A7 00023386 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002338a 3f 01 |? | MOVE.W D1,-(A7) 0002338c 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00023390 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023396 50 4f |PO | ADDQ.L #0x8,A7 00023398 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 0002339e 50 4f |PO | ADDQ.L #0x8,A7 000233a0 20 bc 00 00 00 06 | | MOVE.L #0x6,(A0) 000233a6 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000233aa 48 80 |H | EXTB.W D0 000233ac 0c 40 00 0a | @ | CMPI.W #0x000a,D0 000233b0 63 02 |c | BLS 0x233b4 000233b2 4e 4e |NN | TRAP #14 000233b4 d0 40 | @ | ADD.W D0,D0 000233b6 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000233be 00 16 | | .CONST 0x16 ; [0x0] -> 0x233d4 000233c0 00 16 | | .CONST 0x16 ; [0x1] -> 0x233d4 000233c2 00 16 | | .CONST 0x16 ; [0x2] -> 0x233d4 000233c4 00 6a | j | .CONST 0x6a ; [0x3] -> 0x23428 000233c6 00 6a | j | .CONST 0x6a ; [0x4] -> 0x23428 000233c8 00 28 | ( | .CONST 0x28 ; [0x5] -> 0x233e6 000233ca 00 6a | j | .CONST 0x6a ; [0x6] -> 0x23428 000233cc 00 28 | ( | .CONST 0x28 ; [0x7] -> 0x233e6 000233ce 00 6a | j | .CONST 0x6a ; [0x8] -> 0x23428 000233d0 00 28 | ( | .CONST 0x28 ; [0x9] -> 0x233e6 000233d2 00 28 | ( | .CONST 0x28 ; [0xa] -> 0x233e6 000233d4 switch@0x233b6[0x0]: 000233d4 switch@0x233b6[0x1]: 000233d4 switch@0x233b6[0x2]: 000233d4 4a 11 |J | TST.B (A1) 000233d6 67 0a |g | BEQ 0x233e2 000233d8 42 27 |B' | CLR.B -(A7) 000233da 4e ba e9 52 |N R | JSR 0x21d2e 000233de 54 4f |TO | ADDQ.L #0x2,A7 000233e0 60 02 |` | BRA 0x233e4 000233e2 20 81 | | MOVE.L D1,(A0) 000233e4 60 6a |`j | BRA 0x23450 000233e6 switch@0x233b6[0x5]: 000233e6 switch@0x233b6[0x7]: 000233e6 switch@0x233b6[0x9]: 000233e6 switch@0x233b6[0xa]: 000233e6 4e ba e2 56 |N V | JSR 0x2163e 000233ea 59 4f |YO | SUBQ.L #0x4,A7 000233ec 4e b9 00 01 03 f8 |N | JSR GetConsoleConfig() : Long 000233f2 20 1f | | MOVE.L (A7)+,D0 000233f4 b0 81 | | CMP.L D1,D0 000233f6 67 1e |g | BEQ 0x23416 000233f8 59 4f |YO | SUBQ.L #0x4,A7 000233fa 2f 13 |/ | MOVE.L (A3),-(A7) 000233fc 4e 92 |N | JSR (A2) 000233fe 58 4f |XO | ADDQ.L #0x4,A7 00023400 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023406 2f 14 |/ | MOVE.L (A4),-(A7) 00023408 4e 92 |N | JSR (A2) 0002340a 2e ae 00 0a |. | MOVE.L (A6+0xa),(A7) 0002340e 4e b9 00 01 04 50 |N P | JSR FS_10450(&, &) 00023414 50 4f |PO | ADDQ.L #0x8,A7 00023416 4a 11 |J | TST.B (A1) 00023418 67 0a |g | BEQ 0x23424 0002341a 42 27 |B' | CLR.B -(A7) 0002341c 4e ba e9 10 |N | JSR 0x21d2e 00023420 54 4f |TO | ADDQ.L #0x2,A7 00023422 60 02 |` | BRA 0x23426 00023424 20 81 | | MOVE.L D1,(A0) 00023426 60 28 |`( | BRA 0x23450 00023428 switch@0x233b6[0x3]: 00023428 switch@0x233b6[0x4]: 00023428 switch@0x233b6[0x6]: 00023428 switch@0x233b6[0x8]: 00023428 4a 11 |J | TST.B (A1) 0002342a 67 22 |g" | BEQ 0x2344e 0002342c 1f 01 | | MOVE.B D1,-(A7) 0002342e 4e ba e8 fe |N | JSR 0x21d2e 00023432 4e ba f0 40 |N @ | JSR 0x22474 00023436 4a 1f |J | TST.B (A7)+ 00023438 67 0a |g | BEQ 0x23444 0002343a 42 27 |B' | CLR.B -(A7) 0002343c 4e ba f7 2e |N . | JSR 0x22b6c 00023440 54 4f |TO | ADDQ.L #0x2,A7 00023442 60 08 |` | BRA 0x2344c 00023444 42 39 00 02 43 b2 |B9 C | CLR.B 0x243b2 0002344a 20 82 | | MOVE.L D2,(A0) 0002344c 60 02 |` | BRA 0x23450 0002344e 20 81 | | MOVE.L D1,(A0) 00023450 48 53 |HS | PEA.L (A3) 00023452 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023458 58 4f |XO | ADDQ.L #0x4,A7 0002345a 48 54 |HT | PEA.L (A4) 0002345c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023462 58 4f |XO | ADDQ.L #0x4,A7 00023464 4c df 1f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3+A4 00023468 4e 5e |N^ | UNLK A6 0002346a 4e 75 |Nu | RTS 0002346c ; -------------------------------------------------------------------------------------- 0002346c ; OMSI PASCAL Function 0002346c ; <LVAR 0x00a 4(r)> 0002346c ; <LVAR 0x008 1(r)> 0002346c ; <LVAR -0x004 @ 4(r)> 0002346c ; <LVAR -0x07e @ 2(w)> 0002346c ; -------------------------------------------------------------------------------------- 0002346c 4e 56 ff 12 |NV | LINK.W A6,#0xff12 00023470 bf d5 | | CMPA.L (A5),A7 00023472 62 06 |b | BHI 0x2347a 00023474 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023478 4e 76 |Nv | TRAPV 0002347a de fc 00 70 | p | ADDA.W #0x70,A7 0002347e 48 e7 e0 c0 |H | MOVEM.L A1+A0+D2+D1+D0,-(A7) 00023482 43 f9 00 01 02 c4 |C | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A1 00023488 72 01 |r | MOVEQ.L #0x01,D1 0002348a 74 04 |t | MOVEQ.L #0x04,D2 0002348c 2f 3c 00 00 fc 08 |/< | MOVE.L #0xfc08,-(A7) 00023492 41 ee ff fc |A | LEA.L (A6-0x4),A0 00023496 2f 08 |/ | MOVE.L A0,-(A7) 00023498 3f 02 |? | MOVE.W D2,-(A7) 0002349a 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 000234a0 de fc 00 0a | | ADDA.W #0xa,A7 000234a4 20 2e 00 0a | . | MOVE.L (A6+0xa),D0 000234a8 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 000234ae 63 02 |c | BLS 0x234b2 000234b0 4e 4f |NO | TRAP #15 000234b2 3d 40 ff 82 |=@ | MOVE.W D0,(A6-0x7e) 000234b6 1f 02 | | MOVE.B D2,-(A7) 000234b8 41 ee ff 82 |A | LEA.L (A6-0x7e),A0 000234bc 2f 08 |/ | MOVE.L A0,-(A7) 000234be 4e b9 00 01 03 a8 |N | JSR Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer) 000234c4 5c 4f |\O | ADDQ.L #0x6,A7 000234c6 41 fa db 0e |A | LEA.L 0x20fd6,A0 000234ca 70 14 |p | MOVEQ.L #0x14,D0 000234cc 3f 20 |? | MOVE.W -(A0),-(A7) 000234ce 51 c8 ff fc |Q | DBF D0,0x234cc 000234d2 59 4f |YO | SUBQ.L #0x4,A7 000234d4 1e ba db 00 | | MOVE.B 0x20fd6,(A7) 000234d8 1f 7a da fd 00 01 | z | MOVE.B 0x20fd7,(A7+0x1) 000234de 1f 7a da f8 00 02 | z | MOVE.B 0x20fd8,(A7+0x2) 000234e4 41 fa db 06 |A | LEA.L 0x20fec,A0 000234e8 70 08 |p | MOVEQ.L #0x08,D0 000234ea 3f 20 |? | MOVE.W -(A0),-(A7) 000234ec 51 c8 ff fc |Q | DBF D0,0x234ea 000234f0 51 4f |QO | SUBQ.L #0x8,A7 000234f2 48 6f 00 1e |Ho | PEA.L (A7+0x1e) 000234f6 3f 01 |? | MOVE.W D1,-(A7) 000234f8 3f 3c 00 2a |?< * | MOVE.W #0x2a,-(A7) 000234fc 4e 91 |N | JSR (A1) 000234fe 2e ae ff fc |. | MOVE.L (A6-0x4),(A7) 00023502 48 78 00 05 |Hx | PEA.L 0x5 00023506 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 0002350c 58 4f |XO | ADDQ.L #0x4,A7 0002350e 48 6f 00 22 |Ho " | PEA.L (A7+0x22) 00023512 3f 01 |? | MOVE.W D1,-(A7) 00023514 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00023518 4e 91 |N | JSR (A1) 0002351a 50 4f |PO | ADDQ.L #0x8,A7 0002351c 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00023522 50 4f |PO | ADDQ.L #0x8,A7 00023524 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023528 3f 01 |? | MOVE.W D1,-(A7) 0002352a 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 0002352e 4e 91 |N | JSR (A1) 00023530 58 4f |XO | ADDQ.L #0x4,A7 00023532 2e ae 00 0a |. | MOVE.L (A6+0xa),(A7) 00023536 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 0002353a 4e ba fd d0 |N | JSR 0x2330c 0002353e de fc 00 4e | N | ADDA.W #0x4e,A7 00023542 4c df 03 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1 00023546 4e 5e |N^ | UNLK A6 00023548 4e 75 |Nu | RTS 0002354a ; -------------------------------------------------------------------------------------- 0002354a ; OMSI PASCAL Function 0002354a ; <LVAR 0x00a 1(r)> 0002354a ; <LVAR 0x008 1(r)> 0002354a ; <LVAR -0x07a 2(r)> 0002354a ; <LVAR -0x07c @ 2(w)> 0002354a ; -------------------------------------------------------------------------------------- 0002354a 4e 56 ff 18 |NV | LINK.W A6,#0xff18 0002354e bf d5 | | CMPA.L (A5),A7 00023550 62 06 |b | BHI 0x23558 00023552 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023556 4e 76 |Nv | TRAPV 00023558 de fc 00 6c | l | ADDA.W #0x6c,A7 0002355c 48 e7 e0 80 |H | MOVEM.L A0+D2+D1+D0,-(A7) 00023560 74 01 |t | MOVEQ.L #0x01,D2 00023562 10 2e 00 0a | . | MOVE.B (A6+0xa),D0 00023566 48 80 |H | EXTB.W D0 00023568 3d 40 ff 84 |=@ | MOVE.W D0,(A6-0x7c) 0002356c 42 6e ff 86 |Bn | CLR.W (A6-0x7a) 00023570 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00023574 41 ee ff 84 |A | LEA.L (A6-0x7c),A0 00023578 2f 08 |/ | MOVE.L A0,-(A7) 0002357a 4e b9 00 01 03 a8 |N | JSR Write_ERROR_LOG(VAR a : Bool; MOD b : Pointer) 00023580 5c 4f |\O | ADDQ.L #0x6,A7 00023582 41 fa da 9c |A | LEA.L 0x21020,A0 00023586 72 0c |r | MOVEQ.L #0x0c,D1 00023588 2f 20 |/ | MOVE.L -(A0),-(A7) 0002358a 51 c9 ff fc |Q | DBF D1,0x23588 0002358e 41 fa da a2 |A | LEA.L 0x21032,A0 00023592 72 08 |r | MOVEQ.L #0x08,D1 00023594 3f 20 |? | MOVE.W -(A0),-(A7) 00023596 51 c9 ff fc |Q | DBF D1,0x23594 0002359a 59 4f |YO | SUBQ.L #0x4,A7 0002359c 48 6f 00 16 |Ho | PEA.L (A7+0x16) 000235a0 3f 02 |? | MOVE.W D2,-(A7) 000235a2 3f 3c 00 34 |?< 4 | MOVE.W #0x34,-(A7) 000235a6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000235ac 58 4f |XO | ADDQ.L #0x4,A7 000235ae 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000235b2 3f 02 |? | MOVE.W D2,-(A7) 000235b4 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 000235b8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000235be 50 4f |PO | ADDQ.L #0x8,A7 000235c0 48 c0 |H | EXTW.L D0 000235c2 2f 00 |/ | MOVE.L D0,-(A7) 000235c4 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 000235c8 4e ba fd 42 |N B | JSR 0x2330c 000235cc de fc 00 54 | T | ADDA.W #0x54,A7 000235d0 4c df 01 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0 000235d4 4e 5e |N^ | UNLK A6 000235d6 4e 75 |Nu | RTS 000235d8 ; -------------------------------------------------------------------------------------- 000235d8 ; OMSI PASCAL Function 000235d8 ; -------------------------------------------------------------------------------------- 000235d8 4e 56 ff ec |NV | LINK.W A6,#0xffec 000235dc bf d5 | | CMPA.L (A5),A7 000235de 62 06 |b | BHI 0x235e6 000235e0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000235e4 4e 76 |Nv | TRAPV 000235e6 de fc 00 10 | | ADDA.W #0x10,A7 000235ea 48 e7 01 00 |H | MOVEM.L D7,-(A7) 000235ee 4a 39 00 02 43 b0 |J9 C | TST.B 0x243b0 000235f4 66 12 |f | BNE 0x23608 000235f6 1f 3c 00 05 | < | MOVE.B #0x05,-(A7) 000235fa 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000235fe 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 00023604 58 4f |XO | ADDQ.L #0x4,A7 00023606 60 48 |`H | BRA 0x23650 00023608 4e b9 00 02 3f 4a |N ?J | JSR exp_FREEZE_WORLD.FIU() 0002360e 4e b9 00 02 40 6c |N @l | JSR exp_MF.IOC() 00023614 4e b9 00 02 3f c8 |N ? | JSR exp_MF.VAL() 0002361a 4e b9 00 02 3f b4 |N ? | JSR exp_MF.TYP() 00023620 4e b9 00 02 3f 68 |N ?h | JSR exp_RESET.SEQ() 00023626 7e 0c |~ | MOVEQ.L #0x0c,D7 00023628 55 4f |UO | SUBQ.L #0x2,A7 0002362a 1f 07 | | MOVE.B D7,-(A7) 0002362c 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00023632 54 4f |TO | ADDQ.L #0x2,A7 00023634 4a 1f |J | TST.B (A7)+ 00023636 67 0a |g | BEQ 0x23642 00023638 1f 07 | | MOVE.B D7,-(A7) 0002363a 4e b9 00 02 3f e8 |N ? | JSR 0x23fe8 00023640 54 4f |TO | ADDQ.L #0x2,A7 00023642 52 07 |R | ADDQ.B #0x1,D7 00023644 0c 07 00 0f | | CMPI.B #0x0f,D7 00023648 6f de |o | BLE 0x23628 0002364a 4e b9 00 02 3f 36 |N ?6 | JSR exp_MF.FIU() 00023650 4c df 00 80 |L | MOVEM.L (A7)+,D7 00023654 4e 5e |N^ | UNLK A6 00023656 4e 75 |Nu | RTS 00023658 ; -------------------------------------------------------------------------------------- 00023658 ; OMSI PASCAL Function 00023658 ; <LVAR 0x008 4(r)> 00023658 ; <LVAR -0x006 1(r)> 00023658 ; <LVAR -0x007 @ 1(r)> 00023658 ; <LVAR -0x008 @ 1(r)> 00023658 ; <LVAR -0x009 @ 1(r)> 00023658 ; <LVAR -0x00a @> 00023658 ; <LVAR -0x00b @ 1(r)> 00023658 ; <LVAR -0x00c @> 00023658 ; -------------------------------------------------------------------------------------- 00023658 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 0002365c bf d5 | | CMPA.L (A5),A7 0002365e 62 06 |b | BHI 0x23666 00023660 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023664 4e 76 |Nv | TRAPV 00023666 de fc 00 3e | > | ADDA.W #0x3e,A7 0002366a 48 e7 fb e0 |H | MOVEM.L A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7) 0002366e 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00023672 45 ee ff f8 |E | LEA.L (A6-0x8),A2 00023676 74 07 |t | MOVEQ.L #0x07,D2 00023678 76 09 |v | MOVEQ.L #0x09,D3 0002367a 78 08 |x | MOVEQ.L #0x08,D4 0002367c 42 12 |B | CLR.B (A2) 0002367e 20 51 | Q | MOVEA.L (A1),A0 00023680 42 10 |B | CLR.B (A0) 00023682 4a 39 00 02 43 b0 |J9 C | TST.B 0x243b0 00023688 66 04 |f | BNE 0x2368e 0002368a 60 00 01 2a |` * | BRA 0x237b6 0002368e 48 52 |HR | PEA.L (A2) 00023690 4e b9 00 02 3f 9e |N ? | JSR exp_HALT.SEQ(&Fr) 00023696 58 4f |XO | ADDQ.L #0x4,A7 00023698 4a 12 |J | TST.B (A2) 0002369a 67 00 00 9e |g | BEQ 0x2373a 0002369e 48 6e ff f9 |Hn | PEA.L (A6-0x7) 000236a2 4e b9 00 02 3f 7e |N ?~ | JSR exp_READ_CUR_UADR.SEQ(&Sr_2) 000236a8 58 4f |XO | ADDQ.L #0x4,A7 000236aa 42 80 |B | CLR.L D0 000236ac 10 2e ff f9 | . | MOVE.B (A6-0x7),D0 000236b0 e1 40 | @ | ASL.W #0x8,D0 000236b2 42 81 |B | CLR.L D1 000236b4 12 2e ff fa | . | MOVE.B (A6-0x6),D1 000236b8 d2 40 | @ | ADD.W D0,D1 000236ba 48 c1 |H | EXTW.L D1 000236bc 2c 01 |, | MOVE.L D1,D6 000236be 20 06 | | MOVE.L D6,D0 000236c0 04 80 00 00 02 00 | | SUBI.L #0x00000200,D0 000236c6 b0 83 | | CMP.L D3,D0 000236c8 62 68 |bh | BHI 0x23732 000236ca d0 40 | @ | ADD.W D0,D0 000236cc 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000236d4 00 14 | | .CONST 0x14 ; [0x0] -> 0x236e8 000236d6 00 1c | | .CONST 0x1c ; [0x1] -> 0x236f0 000236d8 00 24 | $ | .CONST 0x24 ; [0x2] -> 0x236f8 000236da 00 2c | , | .CONST 0x2c ; [0x3] -> 0x23700 000236dc 00 34 | 4 | .CONST 0x34 ; [0x4] -> 0x23708 000236de 00 3c | < | .CONST 0x3c ; [0x5] -> 0x23710 000236e0 00 44 | D | .CONST 0x44 ; [0x6] -> 0x23718 000236e2 00 4a | J | .CONST 0x4a ; [0x7] -> 0x2371e 000236e4 00 50 | P | .CONST 0x50 ; [0x8] -> 0x23724 000236e6 00 56 | V | .CONST 0x56 ; [0x9] -> 0x2372a 000236e8 switch@0x236cc[0x0]: 000236e8 20 51 | Q | MOVEA.L (A1),A0 000236ea 10 bc 00 01 | | MOVE.B #0x01,(A0) 000236ee 60 48 |`H | BRA 0x23738 000236f0 switch@0x236cc[0x1]: 000236f0 20 51 | Q | MOVEA.L (A1),A0 000236f2 10 bc 00 02 | | MOVE.B #0x02,(A0) 000236f6 60 40 |`@ | BRA 0x23738 000236f8 switch@0x236cc[0x2]: 000236f8 20 51 | Q | MOVEA.L (A1),A0 000236fa 10 bc 00 03 | | MOVE.B #0x03,(A0) 000236fe 60 38 |`8 | BRA 0x23738 00023700 switch@0x236cc[0x3]: 00023700 20 51 | Q | MOVEA.L (A1),A0 00023702 10 bc 00 04 | | MOVE.B #0x04,(A0) 00023706 60 30 |`0 | BRA 0x23738 00023708 switch@0x236cc[0x4]: 00023708 20 51 | Q | MOVEA.L (A1),A0 0002370a 10 bc 00 05 | | MOVE.B #0x05,(A0) 0002370e 60 28 |`( | BRA 0x23738 00023710 switch@0x236cc[0x5]: 00023710 20 51 | Q | MOVEA.L (A1),A0 00023712 10 bc 00 06 | | MOVE.B #0x06,(A0) 00023716 60 20 |` | BRA 0x23738 00023718 switch@0x236cc[0x6]: 00023718 20 51 | Q | MOVEA.L (A1),A0 0002371a 10 82 | | MOVE.B D2,(A0) 0002371c 60 1a |` | BRA 0x23738 0002371e switch@0x236cc[0x7]: 0002371e 20 51 | Q | MOVEA.L (A1),A0 00023720 10 84 | | MOVE.B D4,(A0) 00023722 60 14 |` | BRA 0x23738 00023724 switch@0x236cc[0x8]: 00023724 20 51 | Q | MOVEA.L (A1),A0 00023726 10 83 | | MOVE.B D3,(A0) 00023728 60 0e |` | BRA 0x23738 0002372a switch@0x236cc[0x9]: 0002372a 20 51 | Q | MOVEA.L (A1),A0 0002372c 10 bc 00 0a | | MOVE.B #0x0a,(A0) 00023730 60 06 |` | BRA 0x23738 00023732 20 51 | Q | MOVEA.L (A1),A0 00023734 10 bc 00 0d | | MOVE.B #0x0d,(A0) 00023738 60 7c |`| | BRA 0x237b6 0002373a 7e 00 |~ | MOVEQ.L #0x00,D7 0002373c be 82 | | CMP.L D2,D7 0002373e 63 02 |c | BLS 0x23742 00023740 4e 4f |NO | TRAP #15 00023742 55 4f |UO | SUBQ.L #0x2,A7 00023744 41 fa de 61 |A a | LEA.L 0x215a7,A0 00023748 1f 30 78 00 | 0x | MOVE.B (A0+D7.L),-(A7) 0002374c 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00023752 54 4f |TO | ADDQ.L #0x2,A7 00023754 4a 1f |J | TST.B (A7)+ 00023756 67 2c |g, | BEQ 0x23784 00023758 41 fa de 4d |A M | LEA.L 0x215a7,A0 0002375c 1f 30 78 00 | 0x | MOVE.B (A0+D7.L),-(A7) 00023760 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00023764 48 6e ff f5 |Hn | PEA.L (A6-0xb) 00023768 48 6e ff f6 |Hn | PEA.L (A6-0xa) 0002376c 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 00023772 de fc 00 0e | | ADDA.W #0xe,A7 00023776 4a 2e ff f5 |J. | TST.B (A6-0xb) 0002377a 67 08 |g | BEQ 0x23784 0002377c 20 51 | Q | MOVEA.L (A1),A0 0002377e 10 bc 00 0c | | MOVE.B #0x0c,(A0) 00023782 60 32 |`2 | BRA 0x237b6 00023784 52 87 |R | ADDQ.L #0x1,D7 00023786 be 82 | | CMP.L D2,D7 00023788 6f b2 |o | BLE 0x2373c 0002378a 42 27 |B' | CLR.B -(A7) 0002378c 48 6e ff f7 |Hn | PEA.L (A6-0x9) 00023790 4e b9 00 02 3f 18 |N ? | JSR exp_READ_PAREG.FIU(Sw_1, &Sr_1) 00023796 5c 4f |\O | ADDQ.L #0x6,A7 00023798 42 80 |B | CLR.L D0 0002379a 10 2e ff f7 | . | MOVE.B (A6-0x9),D0 0002379e 32 00 |2 | MOVE.W D0,D1 000237a0 02 41 00 f7 | A | ANDI.W #0x00f7,D1 000237a4 0c 41 00 f7 | A | CMPI.W #0x00f7,D1 000237a8 67 02 |g | BEQ 0x237ac 000237aa 60 d0 |` | BRA 0x2377c 000237ac c0 44 | D | AND.W D4,D0 000237ae 66 06 |f | BNE 0x237b6 000237b0 20 51 | Q | MOVEA.L (A1),A0 000237b2 10 bc 00 0b | | MOVE.B #0x0b,(A0) 000237b6 4c df 07 df |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2 000237ba 4e 5e |N^ | UNLK A6 000237bc 4e 75 |Nu | RTS 000237be ; -------------------------------------------------------------------------------------- 000237be ; OMSI PASCAL Function 000237be ; <LVAR -0x004 @ 1(r)> 000237be ; <LVAR -0x008 @> 000237be ; <LVAR -0x00a @ 2(r)> 000237be ; <LVAR -0x00c 2(w)> 000237be ; <LVAR -0x00f @ 1(r)> 000237be ; <LVAR -0x014 @ 1(r)> 000237be ; -------------------------------------------------------------------------------------- 000237be 4e 56 ff 74 |NV t | LINK.W A6,#0xff74 000237c2 bf d5 | | CMPA.L (A5),A7 000237c4 62 06 |b | BHI 0x237cc 000237c6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000237ca 4e 76 |Nv | TRAPV 000237cc de fc 00 78 | x | ADDA.W #0x78,A7 000237d0 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000237d4 45 ee ff f6 |E | LEA.L (A6-0xa),A2 000237d8 47 ee ff ec |G | LEA.L (A6-0x14),A3 000237dc 49 f9 00 02 43 b0 |I C | LEA.L 0x243b0,A4 000237e2 74 01 |t | MOVEQ.L #0x01,D2 000237e4 76 0a |v | MOVEQ.L #0x0a,D3 000237e6 78 02 |x | MOVEQ.L #0x02,D4 000237e8 42 52 |BR | CLR.W (A2) 000237ea 2f 3c 00 00 fc 10 |/< | MOVE.L #0xfc10,-(A7) 000237f0 20 4a | J | MOVEA.L A2,A0 000237f2 2f 08 |/ | MOVE.L A0,-(A7) 000237f4 52 97 |R | ADDQ.L #0x1,(A7) 000237f6 3f 02 |? | MOVE.W D2,-(A7) 000237f8 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 000237fe de c3 | | ADDA.W D3,A7 00023800 42 14 |B | CLR.B (A4) 00023802 30 12 |0 | MOVE.W (A2),D0 00023804 c0 42 | B | AND.W D2,D0 00023806 b0 42 | B | CMP.W D2,D0 00023808 66 02 |f | BNE 0x2380c 0002380a 52 14 |R | ADDQ.B #0x1,(A4) 0002380c 42 39 00 02 43 b1 |B9 C | CLR.B 0x243b1 00023812 30 12 |0 | MOVE.W (A2),D0 00023814 b0 44 | D | CMP.W D4,D0 00023816 65 06 |e | BCS 0x2381e 00023818 52 39 00 02 43 b1 |R9 C | ADDQ.B #0x1,0x243b1 0002381e 4e ba fd b8 |N | JSR 0x235d8 00023822 41 fa d8 42 |A B | LEA.L 0x21066,A0 00023826 70 0c |p | MOVEQ.L #0x0c,D0 00023828 2f 20 |/ | MOVE.L -(A0),-(A7) 0002382a 51 c8 ff fc |Q | DBF D0,0x23828 0002382e 59 4f |YO | SUBQ.L #0x4,A7 00023830 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023834 3f 02 |? | MOVE.W D2,-(A7) 00023836 3f 3c 00 34 |?< 4 | MOVE.W #0x34,-(A7) 0002383a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023840 50 4f |PO | ADDQ.L #0x8,A7 00023842 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023848 de fc 00 36 | 6 | ADDA.W #0x36,A7 0002384c 1e bc 00 1b | | MOVE.B #0x1b,(A7) 00023850 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char) 00023856 59 4f |YO | SUBQ.L #0x4,A7 00023858 20 4f | O | MOVEA.L A7,A0 0002385a 43 fa d8 0a |C | LEA.L 0x21066,A1 0002385e 70 04 |p | MOVEQ.L #0x04,D0 00023860 10 d9 | | MOVE.B (A1)+,(A0)+ 00023862 51 c8 ff fc |Q | DBF D0,0x23860 00023866 59 4f |YO | SUBQ.L #0x4,A7 00023868 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002386c 3f 02 |? | MOVE.W D2,-(A7) 0002386e 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00023872 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023878 50 4f |PO | ADDQ.L #0x8,A7 0002387a 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00023880 de c3 | | ADDA.W D3,A7 00023882 48 53 |HS | PEA.L (A3) 00023884 4e b9 00 01 05 e0 |N | JSR Get_BootReasonCode() : Byte 0002388a 1e 93 | | MOVE.B (A3),(A7) 0002388c 4e ba e4 72 |N r | JSR 0x21d00 00023890 54 4f |TO | ADDQ.L #0x2,A7 00023892 10 1f | | MOVE.B (A7)+,D0 00023894 48 80 |H | EXTB.W D0 00023896 41 83 |A | CHK.W D3,D0 00023898 1e 00 | | MOVE.B D0,D7 0002389a be 04 | | CMP.B D4,D7 0002389c 67 04 |g | BEQ 0x238a2 0002389e 4a 14 |J | TST.B (A4) 000238a0 67 5a |gZ | BEQ 0x238fc 000238a2 41 fa d7 de |A | LEA.L 0x21082,A0 000238a6 70 0a |p | MOVEQ.L #0x0a,D0 000238a8 3f 20 |? | MOVE.W -(A0),-(A7) 000238aa 51 c8 ff fc |Q | DBF D0,0x238a8 000238ae 59 4f |YO | SUBQ.L #0x4,A7 000238b0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000238b4 3f 02 |? | MOVE.W D2,-(A7) 000238b6 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 000238ba 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000238c0 5c 4f |\O | ADDQ.L #0x6,A7 000238c2 42 17 |B | CLR.B (A7) 000238c4 42 27 |B' | CLR.B -(A7) 000238c6 48 78 00 00 |Hx | PEA.L 0x0 000238ca 48 6e ff fc |Hn | PEA.L (A6-0x4) 000238ce 48 6e ff f8 |Hn | PEA.L (A6-0x8) 000238d2 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000238d8 de fc 00 2a | * | ADDA.W #0x2a,A7 000238dc 4a 2e ff fc |J. | TST.B (A6-0x4) 000238e0 66 1a |f | BNE 0x238fc 000238e2 1f 04 | | MOVE.B D4,-(A7) 000238e4 1f 02 | | MOVE.B D2,-(A7) 000238e6 48 78 00 01 |Hx | PEA.L 0x1 000238ea 48 6e ff fc |Hn | PEA.L (A6-0x4) 000238ee 48 6e ff f8 |Hn | PEA.L (A6-0x8) 000238f2 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000238f8 de fc 00 10 | | ADDA.W #0x10,A7 000238fc be 04 | | CMP.B D4,D7 000238fe 66 0c |f | BNE 0x2390c 00023900 1f 13 | | MOVE.B (A3),-(A7) 00023902 4e ba f5 44 |N D | JSR 0x22e48 00023906 54 4f |TO | ADDQ.L #0x2,A7 00023908 60 00 00 82 |` | BRA 0x2398c 0002390c be 02 | | CMP.B D2,D7 0002390e 66 08 |f | BNE 0x23918 00023910 1f 13 | | MOVE.B (A3),-(A7) 00023912 4e ba f4 94 |N | JSR 0x22da8 00023916 60 ee |` | BRA 0x23906 00023918 4a 07 |J | TST.B D7 0002391a 66 08 |f | BNE 0x23924 0002391c 1f 13 | | MOVE.B (A3),-(A7) 0002391e 4e ba f6 7e |N ~ | JSR 0x22f9e 00023922 60 e2 |` | BRA 0x23906 00023924 55 4f |UO | SUBQ.L #0x2,A7 00023926 4e b9 00 01 05 f2 |N | JSR Get_fc02() : Word 0002392c 30 1f |0 | MOVE.W (A7)+,D0 0002392e 3d 40 ff f4 |=@ | MOVE.W D0,(A6-0xc) 00023932 3c 00 |< | MOVE.W D0,D6 00023934 02 46 00 ff | F | ANDI.W #0x00ff,D6 00023938 32 00 |2 | MOVE.W D0,D1 0002393a e0 49 | I | LSR.W #0x8,D1 0002393c 1f 01 | | MOVE.B D1,-(A7) 0002393e 42 81 |B | CLR.L D1 00023940 12 1f | | MOVE.B (A7)+,D1 00023942 43 83 |C | CHK.W D3,D1 00023944 1a 01 | | MOVE.B D1,D5 00023946 48 6e ff f1 |Hn | PEA.L (A6-0xf) 0002394a 4e ba fd 0c |N | JSR 0x23658 0002394e 58 4f |XO | ADDQ.L #0x4,A7 00023950 4a 2e ff f1 |J. | TST.B (A6-0xf) 00023954 67 12 |g | BEQ 0x23968 00023956 10 2e ff f1 | . | MOVE.B (A6-0xf),D0 0002395a 48 80 |H | EXTB.W D0 0002395c 41 bc 00 0d |A | CHK.W #0xd,D0 00023960 1f 00 | | MOVE.B D0,-(A7) 00023962 4e ba f8 fa |N | JSR 0x2325e 00023966 60 9e |` | BRA 0x23906 00023968 4a 40 |J@ | TST.W D0 0002396a 67 16 |g | BEQ 0x23982 0002396c 42 80 |B | CLR.L D0 0002396e 30 06 |0 | MOVE.W D6,D0 00023970 2f 00 |/ | MOVE.L D0,-(A7) 00023972 10 05 | | MOVE.B D5,D0 00023974 48 80 |H | EXTB.W D0 00023976 41 83 |A | CHK.W D3,D0 00023978 1f 00 | | MOVE.B D0,-(A7) 0002397a 4e ba fa f0 |N | JSR 0x2346c 0002397e 5c 4f |\O | ADDQ.L #0x6,A7 00023980 60 0a |` | BRA 0x2398c 00023982 1f 13 | | MOVE.B (A3),-(A7) 00023984 1f 07 | | MOVE.B D7,-(A7) 00023986 4e ba fb c2 |N | JSR 0x2354a 0002398a 58 4f |XO | ADDQ.L #0x4,A7 0002398c 42 52 |BR | CLR.W (A2) 0002398e 20 4a | J | MOVEA.L A2,A0 00023990 2f 08 |/ | MOVE.L A0,-(A7) 00023992 52 97 |R | ADDQ.L #0x1,(A7) 00023994 2f 3c 00 00 fc 10 |/< | MOVE.L #0xfc10,-(A7) 0002399a 3f 02 |? | MOVE.W D2,-(A7) 0002399c 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 000239a2 de c3 | | ADDA.W D3,A7 000239a4 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000239a8 4e 5e |N^ | UNLK A6 000239aa 4e 75 |Nu | RTS 000239ac ; -------------------------------------------------------------------------------------- 000239ac ; OMSI PASCAL Function 000239ac ; <LVAR -0x004 @ 4(r)> 000239ac ; -------------------------------------------------------------------------------------- 000239ac 4e 56 ff 8a |NV | LINK.W A6,#0xff8a 000239b0 bf d5 | | CMPA.L (A5),A7 000239b2 62 06 |b | BHI 0x239ba 000239b4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000239b8 4e 76 |Nv | TRAPV 000239ba de fc 00 72 | r | ADDA.W #0x72,A7 000239be 48 e7 c0 f0 |H | MOVEM.L A3+A2+A1+A0+D1+D0,-(A7) 000239c2 43 f9 00 01 02 c4 |C | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A1 000239c8 45 f9 00 01 03 e0 |E | LEA.L WriteConsoleStringCrLf(str : String),A2 000239ce 47 ee ff fc |G | LEA.L (A6-0x4),A3 000239d2 72 01 |r | MOVEQ.L #0x01,D1 000239d4 55 4f |UO | SUBQ.L #0x2,A7 000239d6 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 000239dc 4a 1f |J | TST.B (A7)+ 000239de 66 0c |f | BNE 0x239ec 000239e0 55 4f |UO | SUBQ.L #0x2,A7 000239e2 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 000239e8 4a 1f |J | TST.B (A7)+ 000239ea 67 2e |g. | BEQ 0x23a1a 000239ec 55 4f |UO | SUBQ.L #0x2,A7 000239ee 4e b9 00 02 40 80 |N @ | JSR 0x24080 000239f4 4a 1f |J | TST.B (A7)+ 000239f6 66 22 |f" | BNE 0x23a1a 000239f8 41 fa d6 d2 |A | LEA.L 0x210cc,A0 000239fc 70 24 |p$ | MOVEQ.L #0x24,D0 000239fe 3f 20 |? | MOVE.W -(A0),-(A7) 00023a00 51 c8 ff fc |Q | DBF D0,0x239fe 00023a04 59 4f |YO | SUBQ.L #0x4,A7 00023a06 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023a0a 3f 01 |? | MOVE.W D1,-(A7) 00023a0c 3f 3c 00 4a |?< J | MOVE.W #0x4a,-(A7) 00023a10 4e 91 |N | JSR (A1) 00023a12 50 4f |PO | ADDQ.L #0x8,A7 00023a14 4e 92 |N | JSR (A2) 00023a16 de fc 00 4e | N | ADDA.W #0x4e,A7 00023a1a 55 4f |UO | SUBQ.L #0x2,A7 00023a1c 4e b9 00 01 05 ce |N | JSR ReadKeySwitch() : Bool 00023a22 4a 1f |J | TST.B (A7)+ 00023a24 67 22 |g" | BEQ 0x23a48 00023a26 41 fa d6 e2 |A | LEA.L 0x2110a,A0 00023a2a 70 1e |p | MOVEQ.L #0x1e,D0 00023a2c 3f 20 |? | MOVE.W -(A0),-(A7) 00023a2e 51 c8 ff fc |Q | DBF D0,0x23a2c 00023a32 59 4f |YO | SUBQ.L #0x4,A7 00023a34 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023a38 3f 01 |? | MOVE.W D1,-(A7) 00023a3a 3f 3c 00 3e |?< > | MOVE.W #0x3e,-(A7) 00023a3e 4e 91 |N | JSR (A1) 00023a40 50 4f |PO | ADDQ.L #0x8,A7 00023a42 4e 92 |N | JSR (A2) 00023a44 de fc 00 42 | B | ADDA.W #0x42,A7 00023a48 48 78 f8 00 |Hx | PEA.L 0xfffff800 00023a4c 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00023a50 20 4b | K | MOVEA.L A3,A0 00023a52 2f 08 |/ | MOVE.L A0,-(A7) 00023a54 3f 01 |? | MOVE.W D1,-(A7) 00023a56 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00023a5a 4e b9 00 01 02 3a |N : | JSR KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word 00023a60 de fc 00 0e | | ADDA.W #0xe,A7 00023a64 20 13 | | MOVE.L (A3),D0 00023a66 02 80 80 00 00 00 | | ANDI.L #0x80000000,D0 00023a6c 67 0a |g | BEQ 0x23a78 00023a6e 20 13 | | MOVE.L (A3),D0 00023a70 02 80 00 00 02 00 | | ANDI.L #0x00000200,D0 00023a76 67 22 |g" | BEQ 0x23a9a 00023a78 41 fa d6 c6 |A | LEA.L 0x21140,A0 00023a7c 70 1a |p | MOVEQ.L #0x1a,D0 00023a7e 3f 20 |? | MOVE.W -(A0),-(A7) 00023a80 51 c8 ff fc |Q | DBF D0,0x23a7e 00023a84 59 4f |YO | SUBQ.L #0x4,A7 00023a86 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023a8a 3f 01 |? | MOVE.W D1,-(A7) 00023a8c 3f 3c 00 36 |?< 6 | MOVE.W #0x36,-(A7) 00023a90 4e 91 |N | JSR (A1) 00023a92 50 4f |PO | ADDQ.L #0x8,A7 00023a94 4e 92 |N | JSR (A2) 00023a96 de fc 00 3a | : | ADDA.W #0x3a,A7 00023a9a 4c df 0f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3 00023a9e 4e 5e |N^ | UNLK A6 00023aa0 4e 75 |Nu | RTS 00023aa2 ; -------------------------------------------------------------------------------------- 00023aa2 ; OMSI PASCAL Function 00023aa2 ; -------------------------------------------------------------------------------------- 00023aa2 START: 00023aa2 4f fa 00 08 |O | LEA.L MAIN,A7 00023aa6 4e f9 00 01 02 80 |N | JMP ?start_program 00023aac MAIN: 00023aac 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00023ab2 47 f9 00 02 43 b4 |G C | LEA.L 0x243b4,A3 00023ab8 49 f9 00 01 03 b0 |I | LEA.L PushProgram(a : String; b : String; MOD c : B; VAR d : Bool),A4 00023abe 74 01 |t | MOVEQ.L #0x01,D2 00023ac0 7a 06 |z | MOVEQ.L #0x06,D5 00023ac2 7c 1e || | MOVEQ.L #0x1e,D6 00023ac4 7e 05 |~ | MOVEQ.L #0x05,D7 00023ac6 48 78 00 01 |Hx | PEA.L 0x1 00023aca 4e b9 00 01 03 f4 |N | JSR SetConsoleConfig(a : Long) 00023ad0 54 4f |TO | ADDQ.L #0x2,A7 00023ad2 42 17 |B | CLR.B (A7) 00023ad4 4e b9 00 01 04 04 |N | JSR SetSomeKindOfFlag(a : Byte) 00023ada 3e 82 |> | MOVE.W D2,(A7) 00023adc 1f 02 | | MOVE.B D2,-(A7) 00023ade 4e b9 00 01 02 10 |N | JSR KC08_PortSomething(port: Word; b: Byte) 00023ae4 58 4f |XO | ADDQ.L #0x4,A7 00023ae6 48 78 00 0f |Hx | PEA.L 0xf 00023aea 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 00023af0 58 4f |XO | ADDQ.L #0x4,A7 00023af2 4e ba dc ea |N | JSR 0x217de 00023af6 48 79 00 02 43 af |Hy C | PEA.L 0x243af 00023afc 4e b9 00 01 05 aa |N | JSR Read_fc00() : Byte 00023b02 58 4f |XO | ADDQ.L #0x4,A7 00023b04 4e ba dd a4 |N | JSR 0x218aa 00023b08 4e ba df d2 |N | JSR 0x21adc 00023b0c 3f 3a d6 36 |?: 6 | MOVE.W 0x21144,-(A7) 00023b10 3f 3a d6 30 |?: 0 | MOVE.W 0x21142,-(A7) 00023b14 3f 3a d6 2a |?: * | MOVE.W 0x21140,-(A7) 00023b18 5d 4f |]O | SUBQ.L #0x6,A7 00023b1a 20 4f | O | MOVEA.L A7,A0 00023b1c 43 fa d6 28 |C ( | LEA.L 0x21146,A1 00023b20 70 04 |p | MOVEQ.L #0x04,D0 00023b22 10 d9 | | MOVE.B (A1)+,(A0)+ 00023b24 51 c8 ff fc |Q | DBF D0,0x23b22 00023b28 59 4f |YO | SUBQ.L #0x4,A7 00023b2a 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00023b2e 3f 02 |? | MOVE.W D2,-(A7) 00023b30 3f 05 |? | MOVE.W D5,-(A7) 00023b32 4e 92 |N | JSR (A2) 00023b34 58 4f |XO | ADDQ.L #0x4,A7 00023b36 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023b3a 3f 02 |? | MOVE.W D2,-(A7) 00023b3c 3f 07 |? | MOVE.W D7,-(A7) 00023b3e 4e 92 |N | JSR (A2) 00023b40 5c 4f |\O | ADDQ.L #0x6,A7 00023b42 42 17 |B | CLR.B (A7) 00023b44 48 79 00 02 43 ae |Hy C | PEA.L 0x243ae 00023b4a 4e 94 |N | JSR (A4) 00023b4c de fc 00 1a | | ADDA.W #0x1a,A7 00023b50 23 fa d5 fa 00 02 43 ba |# C | MOVE.L 0x2114c,0x243ba 00023b58 13 fc 00 1b 00 02 43 ba | C | MOVE.B #0x1b,0x243ba 00023b60 42 39 00 02 43 b8 |B9 C | CLR.B 0x243b8 00023b66 42 39 00 02 43 b9 |B9 C | CLR.B 0x243b9 00023b6c 42 39 00 02 43 b2 |B9 C | CLR.B 0x243b2 00023b72 26 85 |& | MOVE.L D5,(A3) 00023b74 4e ba fc 48 |N H | JSR 0x237be 00023b78 42 b9 00 02 43 c4 |B C | CLR.L 0x243c4 00023b7e 41 f9 00 02 43 c4 |A C | LEA.L 0x243c4,A0 00023b84 2f 08 |/ | MOVE.L A0,-(A7) 00023b86 2f 3c 00 00 fc 05 |/< | MOVE.L #0xfc05,-(A7) 00023b8c 3f 02 |? | MOVE.W D2,-(A7) 00023b8e 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00023b94 de fc 00 0a | | ADDA.W #0xa,A7 00023b98 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00023b9e 4e ba fe 0c |N | JSR 0x239ac 00023ba2 4a 39 00 02 43 b2 |J9 C | TST.B 0x243b2 00023ba8 67 06 |g | BEQ 0x23bb0 00023baa 26 85 |& | MOVE.L D5,(A3) 00023bac 60 00 01 60 |` ` | BRA 0x23d0e 00023bb0 9e c6 | | SUBA.W D6,A7 00023bb2 20 4f | O | MOVEA.L A7,A0 00023bb4 43 fa d5 9a |C | LEA.L 0x21150,A1 00023bb8 70 1c |p | MOVEQ.L #0x1c,D0 00023bba 10 d9 | | MOVE.B (A1)+,(A0)+ 00023bbc 51 c8 ff fc |Q | DBF D0,0x23bba 00023bc0 59 4f |YO | SUBQ.L #0x4,A7 00023bc2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023bc6 3f 02 |? | MOVE.W D2,-(A7) 00023bc8 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 00023bcc 4e 92 |N | JSR (A2) 00023bce 50 4f |PO | ADDQ.L #0x8,A7 00023bd0 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023bd6 de fc 00 22 | " | ADDA.W #0x22,A7 00023bda 70 01 |p | MOVEQ.L #0x01,D0 00023bdc 23 c0 00 02 43 c4 |# C | MOVE.L D0,0x243c4 00023be2 3f 3a d5 8a |?: | MOVE.W 0x2116e,-(A7) 00023be6 2f 3a d5 88 |/: | MOVE.L 0x21170,-(A7) 00023bea 22 00 |" | MOVE.L D0,D1 00023bec 53 81 |S | SUBQ.L #0x1,D1 00023bee b2 87 | | CMP.L D7,D1 00023bf0 63 02 |c | BLS 0x23bf4 00023bf2 4e 4f |NO | TRAP #15 00023bf4 28 01 |( | MOVE.L D1,D4 00023bf6 76 1e |v | MOVEQ.L #0x1e,D3 00023bf8 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00023bfe 41 fa d6 16 |A | LEA.L 0x21216,A0 00023c02 9e c6 | | SUBA.W D6,A7 00023c04 22 4f |"O | MOVEA.L A7,A1 00023c06 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0 00023c0a 72 1d |r | MOVEQ.L #0x1d,D1 00023c0c 12 d8 | | MOVE.B (A0)+,(A1)+ 00023c0e 51 c9 ff fc |Q | DBF D1,0x23c0c 00023c12 51 4f |QO | SUBQ.L #0x8,A7 00023c14 48 6f 00 2a |Ho * | PEA.L (A7+0x2a) 00023c18 3f 02 |? | MOVE.W D2,-(A7) 00023c1a 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00023c1e 4e 92 |N | JSR (A2) 00023c20 2e 80 |. | MOVE.L D0,(A7) 00023c22 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00023c28 48 6f 00 2e |Ho . | PEA.L (A7+0x2e) 00023c2c 3f 02 |? | MOVE.W D2,-(A7) 00023c2e 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00023c32 4e 92 |N | JSR (A2) 00023c34 58 4f |XO | ADDQ.L #0x4,A7 00023c36 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00023c3a 3f 02 |? | MOVE.W D2,-(A7) 00023c3c 3f 06 |? | MOVE.W D6,-(A7) 00023c3e 4e 92 |N | JSR (A2) 00023c40 50 4f |PO | ADDQ.L #0x8,A7 00023c42 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00023c48 de fc 00 10 | | ADDA.W #0x10,A7 00023c4c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023c52 de fc 00 28 | ( | ADDA.W #0x28,A7 00023c56 52 80 |R | ADDQ.L #0x1,D0 00023c58 b0 85 | | CMP.L D5,D0 00023c5a 6f 80 |o | BLE 0x23bdc 00023c5c 41 fa d5 24 |A $ | LEA.L 0x21182,A0 00023c60 70 06 |p | MOVEQ.L #0x06,D0 00023c62 3f 20 |? | MOVE.W -(A0),-(A7) 00023c64 51 c8 ff fc |Q | DBF D0,0x23c62 00023c68 20 13 | | MOVE.L (A3),D0 00023c6a 53 80 |S | SUBQ.L #0x1,D0 00023c6c b0 87 | | CMP.L D7,D0 00023c6e 63 02 |c | BLS 0x23c72 00023c70 4e 4f |NO | TRAP #15 00023c72 28 00 |( | MOVE.L D0,D4 00023c74 76 1e |v | MOVEQ.L #0x1e,D3 00023c76 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00023c7c 41 fa d5 98 |A | LEA.L 0x21216,A0 00023c80 9e c6 | | SUBA.W D6,A7 00023c82 22 4f |"O | MOVEA.L A7,A1 00023c84 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0 00023c88 70 1d |p | MOVEQ.L #0x1d,D0 00023c8a 12 d8 | | MOVE.B (A0)+,(A1)+ 00023c8c 51 c8 ff fc |Q | DBF D0,0x23c8a 00023c90 2f 3a d4 f0 |/: | MOVE.L 0x21182,-(A7) 00023c94 9e fc 00 0c | | SUBA.W #0xc,A7 00023c98 48 6f 00 2e |Ho . | PEA.L (A7+0x2e) 00023c9c 3f 02 |? | MOVE.W D2,-(A7) 00023c9e 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00023ca2 4e 92 |N | JSR (A2) 00023ca4 58 4f |XO | ADDQ.L #0x4,A7 00023ca6 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00023caa 3f 02 |? | MOVE.W D2,-(A7) 00023cac 3f 06 |? | MOVE.W D6,-(A7) 00023cae 4e 92 |N | JSR (A2) 00023cb0 58 4f |XO | ADDQ.L #0x4,A7 00023cb2 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00023cb6 3f 02 |? | MOVE.W D2,-(A7) 00023cb8 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00023cbc 4e 92 |N | JSR (A2) 00023cbe 50 4f |PO | ADDQ.L #0x8,A7 00023cc0 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00023cc6 de fc 00 0c | | ADDA.W #0xc,A7 00023cca 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00023cd0 58 4f |XO | ADDQ.L #0x4,A7 00023cd2 23 df 00 02 43 be |# C | MOVE.L (A7)+,0x243be 00023cd8 de fc 00 30 | 0 | ADDA.W #0x30,A7 00023cdc 20 79 00 02 43 be | y C | MOVEA.L 0x243be,A0 00023ce2 4a 50 |JP | TST.W (A0) 00023ce4 66 10 |f | BNE 0x23cf6 00023ce6 48 79 00 02 43 be |Hy C | PEA.L 0x243be 00023cec 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023cf2 58 4f |XO | ADDQ.L #0x4,A7 00023cf4 60 18 |` | BRA 0x23d0e 00023cf6 2f 39 00 02 43 be |/9 C | MOVE.L 0x243be,-(A7) 00023cfc 48 79 00 02 43 c2 |Hy C | PEA.L 0x243c2 00023d02 48 53 |HS | PEA.L (A3) 00023d04 4e b9 00 01 02 ec |N | JSR String2Long(src : String; VAR status : Bool; VAR retval : Long) 00023d0a de fc 00 0c | | ADDA.W #0xc,A7 00023d0e 20 13 | | MOVE.L (A3),D0 00023d10 53 80 |S | SUBQ.L #0x1,D0 00023d12 b0 87 | | CMP.L D7,D0 00023d14 62 00 01 ca |b | BHI 0x23ee0 00023d18 d0 40 | @ | ADD.W D0,D0 00023d1a 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00023d22 00 0c | | .CONST 0xc ; [0x0] -> 0x23d2e 00023d24 00 44 | D | .CONST 0x44 ; [0x1] -> 0x23d66 00023d26 00 4c | L | .CONST 0x4c ; [0x2] -> 0x23d6e 00023d28 00 92 | | .CONST 0x92 ; [0x3] -> 0x23db4 00023d2a 00 de | | .CONST 0xde ; [0x4] -> 0x23e00 00023d2c 01 08 | | .CONST 0x108 ; [0x5] -> 0x23e2a 00023d2e switch@0x23d1a[0x0]: 00023d2e 59 4f |YO | SUBQ.L #0x4,A7 00023d30 1e ba d4 54 | T | MOVE.B 0x21186,(A7) 00023d34 1f 7a d4 51 00 01 | z Q | MOVE.B 0x21187,(A7+0x1) 00023d3a 1f 7a d4 4c 00 02 | z L | MOVE.B 0x21188,(A7+0x2) 00023d40 59 4f |YO | SUBQ.L #0x4,A7 00023d42 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023d46 3f 02 |? | MOVE.W D2,-(A7) 00023d48 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00023d4c 4e 92 |N | JSR (A2) 00023d4e 50 4f |PO | ADDQ.L #0x8,A7 00023d50 48 78 00 01 |Hx | PEA.L 0x1 00023d54 1f 02 | | MOVE.B D2,-(A7) 00023d56 48 79 00 02 43 c3 |Hy C | PEA.L 0x243c3 00023d5c 4e 94 |N | JSR (A4) 00023d5e de fc 00 12 | | ADDA.W #0x12,A7 00023d62 60 00 01 aa |` | BRA 0x23f0e 00023d66 switch@0x23d1a[0x1]: 00023d66 4e ba e0 d0 |N | JSR 0x21e38 00023d6a 60 00 01 a2 |` | BRA 0x23f0e 00023d6e switch@0x23d1a[0x2]: 00023d6e 9e fc 00 0a | | SUBA.W #0xa,A7 00023d72 20 4f | O | MOVEA.L A7,A0 00023d74 43 fa d4 14 |C | LEA.L 0x2118a,A1 00023d78 70 08 |p | MOVEQ.L #0x08,D0 00023d7a 10 d9 | | MOVE.B (A1)+,(A0)+ 00023d7c 51 c8 ff fc |Q | DBF D0,0x23d7a 00023d80 2f 3a d4 12 |/: | MOVE.L 0x21194,-(A7) 00023d84 59 4f |YO | SUBQ.L #0x4,A7 00023d86 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023d8a 3f 02 |? | MOVE.W D2,-(A7) 00023d8c 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00023d90 4e 92 |N | JSR (A2) 00023d92 58 4f |XO | ADDQ.L #0x4,A7 00023d94 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023d98 3f 02 |? | MOVE.W D2,-(A7) 00023d9a 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00023d9e 4e 92 |N | JSR (A2) 00023da0 5c 4f |\O | ADDQ.L #0x6,A7 00023da2 1e 82 | | MOVE.B D2,(A7) 00023da4 48 79 00 02 43 c3 |Hy C | PEA.L 0x243c3 00023daa 4e 94 |N | JSR (A4) 00023dac de fc 00 1c | | ADDA.W #0x1c,A7 00023db0 60 00 01 5a |` Z | BRA 0x23f0c 00023db4 switch@0x23d1a[0x3]: 00023db4 3f 3a d3 e6 |?: | MOVE.W 0x2119c,-(A7) 00023db8 3f 3a d3 e0 |?: | MOVE.W 0x2119a,-(A7) 00023dbc 3f 3a d3 da |?: | MOVE.W 0x21198,-(A7) 00023dc0 59 4f |YO | SUBQ.L #0x4,A7 00023dc2 1e ba d3 da | | MOVE.B 0x2119e,(A7) 00023dc6 1f 7a d3 d7 00 01 | z | MOVE.B 0x2119f,(A7+0x1) 00023dcc 1f 7a d3 d2 00 02 | z | MOVE.B 0x211a0,(A7+0x2) 00023dd2 59 4f |YO | SUBQ.L #0x4,A7 00023dd4 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023dd8 3f 02 |? | MOVE.W D2,-(A7) 00023dda 3f 05 |? | MOVE.W D5,-(A7) 00023ddc 4e 92 |N | JSR (A2) 00023dde 58 4f |XO | ADDQ.L #0x4,A7 00023de0 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023de4 3f 02 |? | MOVE.W D2,-(A7) 00023de6 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00023dea 4e 92 |N | JSR (A2) 00023dec 5c 4f |\O | ADDQ.L #0x6,A7 00023dee 1e 82 | | MOVE.B D2,(A7) 00023df0 48 79 00 02 43 c3 |Hy C | PEA.L 0x243c3 00023df6 4e 94 |N | JSR (A4) 00023df8 de fc 00 18 | | ADDA.W #0x18,A7 00023dfc 60 00 01 10 |` | BRA 0x23f0e 00023e00 switch@0x23d1a[0x4]: 00023e00 3f 3a d3 a4 |?: | MOVE.W 0x211a6,-(A7) 00023e04 3f 3a d3 9e |?: | MOVE.W 0x211a4,-(A7) 00023e08 3f 3a d3 98 |?: | MOVE.W 0x211a2,-(A7) 00023e0c 2f 3a d3 9a |/: | MOVE.L 0x211a8,-(A7) 00023e10 59 4f |YO | SUBQ.L #0x4,A7 00023e12 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023e16 3f 02 |? | MOVE.W D2,-(A7) 00023e18 3f 05 |? | MOVE.W D5,-(A7) 00023e1a 4e 92 |N | JSR (A2) 00023e1c 58 4f |XO | ADDQ.L #0x4,A7 00023e1e 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023e22 3f 02 |? | MOVE.W D2,-(A7) 00023e24 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00023e28 60 c0 |` | BRA 0x23dea 00023e2a switch@0x23d1a[0x5]: 00023e2a 9e fc 00 0e | | SUBA.W #0xe,A7 00023e2e 20 4f | O | MOVEA.L A7,A0 00023e30 43 fa d3 7a |C z | LEA.L 0x211ac,A1 00023e34 70 0c |p | MOVEQ.L #0x0c,D0 00023e36 10 d9 | | MOVE.B (A1)+,(A0)+ 00023e38 51 c8 ff fc |Q | DBF D0,0x23e36 00023e3c 9e fc 00 0c | | SUBA.W #0xc,A7 00023e40 20 4f | O | MOVEA.L A7,A0 00023e42 43 fa d3 76 |C v | LEA.L 0x211ba,A1 00023e46 70 0a |p | MOVEQ.L #0x0a,D0 00023e48 10 d9 | | MOVE.B (A1)+,(A0)+ 00023e4a 51 c8 ff fc |Q | DBF D0,0x23e48 00023e4e 59 4f |YO | SUBQ.L #0x4,A7 00023e50 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00023e54 3f 02 |? | MOVE.W D2,-(A7) 00023e56 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 00023e5a 4e 92 |N | JSR (A2) 00023e5c 58 4f |XO | ADDQ.L #0x4,A7 00023e5e 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023e62 3f 02 |? | MOVE.W D2,-(A7) 00023e64 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00023e68 4e 92 |N | JSR (A2) 00023e6a 5c 4f |\O | ADDQ.L #0x6,A7 00023e6c 1e 82 | | MOVE.B D2,(A7) 00023e6e 48 79 00 02 43 c3 |Hy C | PEA.L 0x243c3 00023e74 4e 94 |N | JSR (A4) 00023e76 54 4f |TO | ADDQ.L #0x2,A7 00023e78 20 4f | O | MOVEA.L A7,A0 00023e7a 43 fa d3 4a |C J | LEA.L 0x211c6,A1 00023e7e 70 24 |p$ | MOVEQ.L #0x24,D0 00023e80 10 d9 | | MOVE.B (A1)+,(A0)+ 00023e82 51 c8 ff fc |Q | DBF D0,0x23e80 00023e86 59 4f |YO | SUBQ.L #0x4,A7 00023e88 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023e8c 3f 02 |? | MOVE.W D2,-(A7) 00023e8e 3f 3c 00 25 |?< % | MOVE.W #0x25,-(A7) 00023e92 4e 92 |N | JSR (A2) 00023e94 50 4f |PO | ADDQ.L #0x8,A7 00023e96 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023e9c de fc 00 28 | ( | ADDA.W #0x28,A7 00023ea0 3e ba d3 4e |> N | MOVE.W 0x211f0,(A7) 00023ea4 3f 3a d3 48 |?: H | MOVE.W 0x211ee,-(A7) 00023ea8 3f 3a d3 42 |?: B | MOVE.W 0x211ec,-(A7) 00023eac 2f 3a d3 48 |/: H | MOVE.L 0x211f6,-(A7) 00023eb0 2f 3a d3 40 |/: @ | MOVE.L 0x211f2,-(A7) 00023eb4 59 4f |YO | SUBQ.L #0x4,A7 00023eb6 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00023eba 3f 02 |? | MOVE.W D2,-(A7) 00023ebc 3f 05 |? | MOVE.W D5,-(A7) 00023ebe 4e 92 |N | JSR (A2) 00023ec0 58 4f |XO | ADDQ.L #0x4,A7 00023ec2 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023ec6 3f 02 |? | MOVE.W D2,-(A7) 00023ec8 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00023ecc 4e 92 |N | JSR (A2) 00023ece 5c 4f |\O | ADDQ.L #0x6,A7 00023ed0 1e 82 | | MOVE.B D2,(A7) 00023ed2 48 79 00 02 43 c3 |Hy C | PEA.L 0x243c3 00023ed8 4e 94 |N | JSR (A4) 00023eda de fc 00 1c | | ADDA.W #0x1c,A7 00023ede 60 2e |`. | BRA 0x23f0e 00023ee0 9e fc 00 1c | | SUBA.W #0x1c,A7 00023ee4 20 4f | O | MOVEA.L A7,A0 00023ee6 43 fa d3 12 |C | LEA.L 0x211fa,A1 00023eea 70 1a |p | MOVEQ.L #0x1a,D0 00023eec 10 d9 | | MOVE.B (A1)+,(A0)+ 00023eee 51 c8 ff fc |Q | DBF D0,0x23eec 00023ef2 59 4f |YO | SUBQ.L #0x4,A7 00023ef4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023ef8 3f 02 |? | MOVE.W D2,-(A7) 00023efa 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 00023efe 4e 92 |N | JSR (A2) 00023f00 50 4f |PO | ADDQ.L #0x8,A7 00023f02 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023f08 de fc 00 20 | | ADDA.W #0x20,A7 00023f0c 26 85 |& | MOVE.L D5,(A3) 00023f0e 60 00 fc 88 |` | BRA 0x23b98 00023f12 4e b9 00 01 02 84 |N | .XXX[0x6] 00023f18 exp_READ_PAREG.FIU(Sw_1, &Sr_1): 00023f18 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023f1e 00 0e | | .CONST 0x000e ; Stack-delta 00023f20 0e 52 45 41 44 5f 50 41 | READ_PA| .TXT 14,'READ_PAREG.FIU' 00023f2f 00 | | .CONST 0x0 00023f30 03 | | .CONST 0x3 ; DIPROC address 00023f31 01 | | .CONST 0x1 ; Output Parameters 00023f32 01 | | .CONST 0x1 ; Input Parameters 00023f33 00 | | .CONST 0x0 ; In arg [1] 00023f34 00 | | .CONST 0x0 ; Out arg [1] 00023f35 00 | | .PAD 0x0 00023f36 exp_MF.FIU(): 00023f36 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023f3c 00 08 | | .CONST 0x0008 ; Stack-delta 00023f3e 06 4d 46 2e 46 49 55 | MF.FIU | .TXT 6,'MF.FIU' 00023f45 00 | | .CONST 0x0 00023f46 03 | | .CONST 0x3 ; DIPROC address 00023f47 00 | | .CONST 0x0 ; Output Parameters 00023f48 00 | | .CONST 0x0 ; Input Parameters 00023f49 00 | | .PAD 0x0 00023f4a exp_FREEZE_WORLD.FIU(): 00023f4a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023f50 00 08 | | .CONST 0x0008 ; Stack-delta 00023f52 10 46 52 45 45 5a 45 5f | FREEZE_| .TXT 16,'FREEZE_WORLD.FIU' 00023f63 00 | | .CONST 0x0 00023f64 03 | | .CONST 0x3 ; DIPROC address 00023f65 00 | | .CONST 0x0 ; Output Parameters 00023f66 00 | | .CONST 0x0 ; Input Parameters 00023f67 00 | | .PAD 0x0 00023f68 exp_RESET.SEQ(): 00023f68 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023f6e 00 08 | | .CONST 0x0008 ; Stack-delta 00023f70 09 52 45 53 45 54 2e 53 | RESET.S| .TXT 9,'RESET.SEQ' 00023f7a 00 | | .CONST 0x0 00023f7b 02 | | .CONST 0x2 ; DIPROC address 00023f7c 00 | | .CONST 0x0 ; Output Parameters 00023f7d 00 | | .CONST 0x0 ; Input Parameters 00023f7e exp_READ_CUR_UADR.SEQ(&Sr_2): 00023f7e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023f84 00 0c | | .CONST 0x000c ; Stack-delta 00023f86 11 52 45 41 44 5f 43 55 | READ_CU| .TXT 17,'READ_CUR_UADR.SEQ' 00023f98 00 | | .CONST 0x0 00023f99 02 | | .CONST 0x2 ; DIPROC address 00023f9a 01 | | .CONST 0x1 ; Output Parameters 00023f9b 00 | | .CONST 0x0 ; Input Parameters 00023f9c 01 | | .CONST 0x1 ; Out arg [2] 00023f9d 00 | | .PAD 0x0 00023f9e exp_HALT.SEQ(&Fr): 00023f9e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023fa4 00 0c | | .CONST 0x000c ; Stack-delta 00023fa6 08 48 41 4c 54 2e 53 45 | HALT.SE| .TXT 8,'HALT.SEQ' 00023faf 00 | | .CONST 0x0 00023fb0 02 | | .CONST 0x2 ; DIPROC address 00023fb1 01 | | .CONST 0x1 ; Output Parameters 00023fb2 00 | | .CONST 0x0 ; Input Parameters 00023fb3 08 | | .CONST 0x8 ; Out arg flag 00023fb4 exp_MF.TYP(): 00023fb4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023fba 00 08 | | .CONST 0x0008 ; Stack-delta 00023fbc 06 4d 46 2e 54 59 50 | MF.TYP | .TXT 6,'MF.TYP' 00023fc3 00 | | .CONST 0x0 00023fc4 06 | | .CONST 0x6 ; DIPROC address 00023fc5 00 | | .CONST 0x0 ; Output Parameters 00023fc6 00 | | .CONST 0x0 ; Input Parameters 00023fc7 00 | | .PAD 0x0 00023fc8 exp_MF.VAL(): 00023fc8 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00023fce 00 08 | | .CONST 0x0008 ; Stack-delta 00023fd0 06 4d 46 2e 56 41 4c | MF.VAL | .TXT 6,'MF.VAL' 00023fd7 00 | | .CONST 0x0 00023fd8 07 | | .CONST 0x7 ; DIPROC address 00023fd9 00 | | .CONST 0x0 ; Output Parameters 00023fda 00 | | .CONST 0x0 ; Input Parameters 00023fdb 00 | | .PAD 0x0 00023fdc 4d 46 |MF | .TXT 'MF' 00023fde 2e 4d |.M | .TXT '.M' 00023fe0 45 4d |EM | .TXT 'EM' 00023fe2 4d 46 |MF | .TXT 'MF' 00023fe4 2e 4d |.M | .TXT '.M' 00023fe6 33 32 |32 | .TXT '32' 00023fe8 ; -------------------------------------------------------------------------------------- 00023fe8 ; OMSI PASCAL Function 00023fe8 ; <LVAR 0x008 1(r)> 00023fe8 ; <LVAR -0x006 @ 4(r)> 00023fe8 ; -------------------------------------------------------------------------------------- 00023fe8 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00023fec bf d5 | | CMPA.L (A5),A7 00023fee 62 06 |b | BHI 0x23ff6 00023ff0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023ff4 4e 76 |Nv | TRAPV 00023ff6 de fc 00 1a | | ADDA.W #0x1a,A7 00023ffa 48 e7 00 80 |H | MOVEM.L A0,-(A7) 00023ffe 41 ee ff fa |A | LEA.L (A6-0x6),A0 00024002 55 4f |UO | SUBQ.L #0x2,A7 00024004 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002400a 4a 1f |J | TST.B (A7)+ 0002400c 67 0e |g | BEQ 0x2401c 0002400e 3f 3a ff d0 |?: | MOVE.W 0x23fe0,-(A7) 00024012 3f 3a ff ca |?: | MOVE.W 0x23fde,-(A7) 00024016 3f 3a ff c4 |?: | MOVE.W 0x23fdc,-(A7) 0002401a 60 0c |` | BRA 0x24028 0002401c 3f 3a ff c8 |?: | MOVE.W 0x23fe6,-(A7) 00024020 3f 3a ff c2 |?: | MOVE.W 0x23fe4,-(A7) 00024024 3f 3a ff bc |?: | MOVE.W 0x23fe2,-(A7) 00024028 59 4f |YO | SUBQ.L #0x4,A7 0002402a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002402e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00024032 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00024036 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002403c 50 4f |PO | ADDQ.L #0x8,A7 0002403e 48 50 |HP | PEA.L (A0) 00024040 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00024046 de fc 00 0e | | ADDA.W #0xe,A7 0002404a 42 27 |B' | CLR.B -(A7) 0002404c 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00024050 2f 10 |/ | MOVE.L (A0),-(A7) 00024052 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00024058 50 4f |PO | ADDQ.L #0x8,A7 0002405a 48 50 |HP | PEA.L (A0) 0002405c 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00024062 58 4f |XO | ADDQ.L #0x4,A7 00024064 4c df 01 00 |L | MOVEM.L (A7)+,A0 00024068 4e 5e |N^ | UNLK A6 0002406a 4e 75 |Nu | RTS 0002406c exp_MF.IOC(): 0002406c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00024072 00 08 | | .CONST 0x0008 ; Stack-delta 00024074 06 4d 46 2e 49 4f 43 | MF.IOC | .TXT 6,'MF.IOC' 0002407b 00 | | .CONST 0x0 0002407c 04 | | .CONST 0x4 ; DIPROC address 0002407d 00 | | .CONST 0x0 ; Output Parameters 0002407e 00 | | .CONST 0x0 ; Input Parameters 0002407f 00 | | .PAD 0x0 00024080 4e 56 00 00 |NV | LINK.W A6,#0x0000 00024084 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00024088 bf d5 | | CMPA.L (A5),A7 0002408a 4e 76 |Nv | TRAPV 0002408c 42 2e 00 08 |B. | CLR.B (A6+0x8) 00024090 30 39 93 03 e0 00 |09 | MOVE.W 0x9303e000,D0 00024096 02 40 00 08 | @ | ANDI.W #0x0008,D0 0002409a 67 00 00 06 |g | BEQ 0x240a2 0002409e 52 2e 00 08 |R. | ADDQ.B #0x1,(A6+0x8) 000240a2 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 000240a6 4e 5e |N^ | UNLK A6 000240a8 4e 75 |Nu | RTS 000240aa 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 000240ae 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 000240b2 bf d5 | | CMPA.L (A5),A7 000240b4 4e 76 |Nv | TRAPV 000240b6 30 3c 02 01 |0< | MOVE.W #0x201,D0 000240ba 4e b9 80 00 20 64 |N d | JSR 0x80002064 000240c0 67 00 00 06 |g | BEQ 0x240c8 000240c4 30 7c 00 00 |0| | MOVEA.W #0x0,A0 000240c8 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 000240cc 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 000240d0 4e 5e |N^ | UNLK A6 000240d2 4e 75 |Nu | RTS 000240d4 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 000240d8 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 000240dc bf d5 | | CMPA.L (A5),A7 000240de 4e 76 |Nv | TRAPV 000240e0 30 3c 07 00 |0< | MOVE.W #0x700,D0 000240e4 4e b9 80 00 20 64 |N d | JSR 0x80002064 000240ea 67 00 00 06 |g | BEQ 0x240f2 000240ee 30 7c 00 00 |0| | MOVEA.W #0x0,A0 000240f2 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 000240f6 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 000240fa 4e 5e |N^ | UNLK A6 000240fc 4e 75 |Nu | RTS 000240fe 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 00024102 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00024106 bf d5 | | CMPA.L (A5),A7 00024108 4e 76 |Nv | TRAPV 0002410a 30 3c 08 00 |0< | MOVE.W #0x800,D0 0002410e 4e b9 80 00 20 64 |N d | JSR 0x80002064 00024114 67 00 00 06 |g | BEQ 0x2411c 00024118 30 7c 00 00 |0| | MOVEA.W #0x0,A0 0002411c 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 00024120 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00024124 4e 5e |N^ | UNLK A6 00024126 4e 75 |Nu | RTS 00024128 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 0002412c 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00024130 bf d5 | | CMPA.L (A5),A7 00024132 4e 76 |Nv | TRAPV 00024134 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00024138 4e b9 80 00 20 5c |N \ | JSR 0x8000205c 0002413e 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024142 42 90 |B | CLR.L (A0) 00024144 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 00024148 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 0002414c 4e 5e |N^ | UNLK A6 0002414e 4e 75 |Nu | RTS 00024150 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 00024154 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00024158 bf d5 | | CMPA.L (A5),A7 0002415a 4e 76 |Nv | TRAPV 0002415c 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00024160 4e b9 80 00 20 60 |N ` | JSR 0x80002060 00024166 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002416a 42 90 |B | CLR.L (A0) 0002416c 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 00024170 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00024174 4e 5e |N^ | UNLK A6 00024176 4e 75 |Nu | RTS 00024178 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 0002417c 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00024180 bf d5 | | CMPA.L (A5),A7 00024182 4e 76 |Nv | TRAPV 00024184 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00024188 4e b9 80 00 20 6c |N l | JSR 0x8000206c 0002418e 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024192 42 90 |B | CLR.L (A0) 00024194 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 00024198 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 0002419c 4e 5e |N^ | UNLK A6 0002419e 4e 75 |Nu | RTS 000241a0 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 000241ae ; -------------------------------------------------------------------------------------- 000241ae ; OMSI PASCAL Function 000241ae ; <LVAR 0x008 1(r)> 000241ae ; -------------------------------------------------------------------------------------- 000241ae PROG_FAIL: 000241ae 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 000241b2 bf d5 | | CMPA.L (A5),A7 000241b4 62 06 |b | BHI 0x241bc 000241b6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000241ba 4e 76 |Nv | TRAPV 000241bc de fc 00 2c | , | ADDA.W #0x2c,A7 000241c0 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 000241c4 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 000241c8 70 06 |p | MOVEQ.L #0x06,D0 000241ca 3f 20 |? | MOVE.W -(A0),-(A7) 000241cc 51 c8 ff fc |Q | DBF D0,0x241ca 000241d0 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 000241d4 51 4f |QO | SUBQ.L #0x8,A7 000241d6 48 6f 00 0a |Ho | PEA.L (A7+0xa) 000241da 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000241de 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 000241e2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000241e8 58 4f |XO | ADDQ.L #0x4,A7 000241ea 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000241ee 48 80 |H | EXTB.W D0 000241f0 48 c0 |H | EXTW.L D0 000241f2 2f 00 |/ | MOVE.L D0,-(A7) 000241f4 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000241fa 58 4f |XO | ADDQ.L #0x4,A7 000241fc 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024202 50 4f |PO | ADDQ.L #0x8,A7 00024204 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002420a de fc 00 14 | | ADDA.W #0x14,A7 0002420e 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00024212 4e 5e |N^ | UNLK A6 00024214 4e 75 |Nu | RTS 00024216 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 00024224 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00024232 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00024240 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00024252 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 0002426a ; -------------------------------------------------------------------------------------- 0002426a ; OMSI PASCAL Function 0002426a ; <LVAR 0x00e 1(r)> 0002426a ; <LVAR 0x00a 4(r)> 0002426a ; <LVAR 0x008 1(r)> 0002426a ; -------------------------------------------------------------------------------------- 0002426a EXP_FAIL: 0002426a 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 0002426e bf d5 | | CMPA.L (A5),A7 00024270 62 06 |b | BHI 0x24278 00024272 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024276 4e 76 |Nv | TRAPV 00024278 de fc 00 74 | t | ADDA.W #0x74,A7 0002427c 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00024280 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00024286 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 0002428c 72 01 |r | MOVEQ.L #0x01,D1 0002428e 74 0d |t | MOVEQ.L #0x0d,D2 00024290 76 1e |v | MOVEQ.L #0x1e,D3 00024292 78 12 |x | MOVEQ.L #0x12,D4 00024294 7a 0e |z | MOVEQ.L #0x0e,D5 00024296 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 0002429c 41 fa ff b4 |A | LEA.L 0x24252,A0 000242a0 70 08 |p | MOVEQ.L #0x08,D0 000242a2 3f 20 |? | MOVE.W -(A0),-(A7) 000242a4 51 c8 ff fc |Q | DBF D0,0x242a2 000242a8 59 4f |YO | SUBQ.L #0x4,A7 000242aa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000242ae 3f 01 |? | MOVE.W D1,-(A7) 000242b0 3f 04 |? | MOVE.W D4,-(A7) 000242b2 4e 93 |N | JSR (A3) 000242b4 50 4f |PO | ADDQ.L #0x8,A7 000242b6 4e 94 |N | JSR (A4) 000242b8 50 4f |PO | ADDQ.L #0x8,A7 000242ba 20 4f | O | MOVEA.L A7,A0 000242bc 43 fa ff 58 |C X | LEA.L 0x24216,A1 000242c0 70 0c |p | MOVEQ.L #0x0c,D0 000242c2 10 d9 | | MOVE.B (A1)+,(A0)+ 000242c4 51 c8 ff fc |Q | DBF D0,0x242c2 000242c8 51 4f |QO | SUBQ.L #0x8,A7 000242ca 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000242ce 3f 01 |? | MOVE.W D1,-(A7) 000242d0 3f 02 |? | MOVE.W D2,-(A7) 000242d2 4e 93 |N | JSR (A3) 000242d4 54 4f |TO | ADDQ.L #0x2,A7 000242d6 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 000242da 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 000242e0 54 4f |TO | ADDQ.L #0x2,A7 000242e2 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000242e8 50 4f |PO | ADDQ.L #0x8,A7 000242ea 4e 94 |N | JSR (A4) 000242ec de c4 | | ADDA.W D4,A7 000242ee 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 000242f2 b0 c1 | | CMPA.W D1,A0 000242f4 67 48 |gH | BEQ 0x2433e 000242f6 9e c5 | | SUBA.W D5,A7 000242f8 22 4f |"O | MOVEA.L A7,A1 000242fa 45 fa ff 28 |E ( | LEA.L 0x24224,A2 000242fe 70 0c |p | MOVEQ.L #0x0c,D0 00024300 12 da | | MOVE.B (A2)+,(A1)+ 00024302 51 c8 ff fc |Q | DBF D0,0x24300 00024306 9e c3 | | SUBA.W D3,A7 00024308 22 4f |"O | MOVEA.L A7,A1 0002430a 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 0002430e 70 1d |p | MOVEQ.L #0x1d,D0 00024310 12 d8 | | MOVE.B (A0)+,(A1)+ 00024312 51 c8 ff fc |Q | DBF D0,0x24310 00024316 51 4f |QO | SUBQ.L #0x8,A7 00024318 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 0002431c 3f 01 |? | MOVE.W D1,-(A7) 0002431e 3f 02 |? | MOVE.W D2,-(A7) 00024320 4e 93 |N | JSR (A3) 00024322 58 4f |XO | ADDQ.L #0x4,A7 00024324 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00024328 3f 01 |? | MOVE.W D1,-(A7) 0002432a 3f 03 |? | MOVE.W D3,-(A7) 0002432c 4e 93 |N | JSR (A3) 0002432e 50 4f |PO | ADDQ.L #0x8,A7 00024330 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024336 50 4f |PO | ADDQ.L #0x8,A7 00024338 4e 94 |N | JSR (A4) 0002433a de fc 00 30 | 0 | ADDA.W #0x30,A7 0002433e 9e c5 | | SUBA.W D5,A7 00024340 20 4f | O | MOVEA.L A7,A0 00024342 43 fa fe ee |C | LEA.L 0x24232,A1 00024346 70 0c |p | MOVEQ.L #0x0c,D0 00024348 10 d9 | | MOVE.B (A1)+,(A0)+ 0002434a 51 c8 ff fc |Q | DBF D0,0x24348 0002434e 51 4f |QO | SUBQ.L #0x8,A7 00024350 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00024354 3f 01 |? | MOVE.W D1,-(A7) 00024356 3f 02 |? | MOVE.W D2,-(A7) 00024358 4e 93 |N | JSR (A3) 0002435a 54 4f |TO | ADDQ.L #0x2,A7 0002435c 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00024360 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00024366 54 4f |TO | ADDQ.L #0x2,A7 00024368 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002436e 50 4f |PO | ADDQ.L #0x8,A7 00024370 4e 94 |N | JSR (A4) 00024372 5d 4f |]O | SUBQ.L #0x6,A7 00024374 20 4f | O | MOVEA.L A7,A0 00024376 43 fa fe da |C | LEA.L 0x24252,A1 0002437a 70 16 |p | MOVEQ.L #0x16,D0 0002437c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002437e 51 c8 ff fc |Q | DBF D0,0x2437c 00024382 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00024386 59 4f |YO | SUBQ.L #0x4,A7 00024388 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002438c 3f 01 |? | MOVE.W D1,-(A7) 0002438e 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00024392 4e 93 |N | JSR (A3) 00024394 50 4f |PO | ADDQ.L #0x8,A7 00024396 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002439c de c3 | | ADDA.W D3,A7 0002439e 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 000243a2 4e 5e |N^ | UNLK A6 000243a4 4e 75 |Nu | RTS