|
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: 10752 (0x2a00) Types: M200 Notes: M200_PROGRAM Names: »NOVRAM.M200«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293 └─ ⟦this⟧ »NOVRAM.M200«
@ 20634 <LVAR 0x00d 1(r)> <LVAR 0x00c 1(r)> <LVAR 0x008 4(r)> <POP 20634-2069c Body> <POP 20634-2064a Prologue> Σ0 ↓ <POP 2064a-2064c RegCacheLoad> Σ0 ↓ <POP 2064c-20694 Naked> Σ0 ↓ <MI 2064c MOVEA.L (A6+0x8),A0> {} <MI 20650 CLR.W (A0)> {} <MI 20652 CLR.L D0> {} <MI 20654 MOVE.B (A6+0xc),D0> {} <MI 20658 MOVE.W D0,D1> {} <MI 2065a ASR.W #0x1,D1> {} <MI 2065c AND.B #0x01,(A0+0x2)> {} <MI 20660 LSL.B #0x1,D1> {} <MI 20662 OR.B D1,(A0+0x2)> {} <MI 20666 AND.W #0x01,D0> {} <MI 20668 ASL.W #0x3,D0> {} <MI 2066a CLR.L D1> {} <MI 2066c MOVE.B (A6+0xd),D1> {} <MI 20670 MOVE.W D1,D2> {} <MI 20672 ASR.W #0x5,D2> {} <MI 20674 ANDI.W #0x0007,D2> {} <MI 20678 ADD.W D0,D2> {} <MI 2067a ANDI.W #0xfe1f,(A0+0x2)> {} <MI 20680 LSL.W #0x5,D2> {} <MI 20682 OR.W D2,(A0+0x2)> {} <MI 20686 ANDI.W #0x001f,D1> {} <MI 2068a ANDI.B #0xe0,(A0+0x3)> {} <MI 20690 OR.B D1,(A0+0x3)> {} <POP 20694-2069c Epilogue> Σ0
@ 2069c <LVAR 0x00a 4(w)> <LVAR 0x008 1(r)> <POP 2069c-207da Body> Δ+48 <POP 2069c-206b2 Prologue> Σ0 ↓ <POP 206b2-206b4 RegCacheLoad> Σ0 ↓ <POP 206b4-206c2 Naked> Σ0 ↓ →0x207a6 <MI 206b4 MOVE.B (A6+0x8),D0> {} <MI 206b8 EXTB.W D0> {} <MI 206ba CMPI.W #0x000f,D0> {} <MI 206be BHI 0x207a6> {} <POP 206c2-206cc Naked> Σ0 →0x2077a →0x207a6 →0x20742 →0x2072e →0x206ec →0x207a6 →0x20702 →0x20718 →0x207a6 →0x207a6 →0x207a6 →0x207a6 →0x20756 →0x20768 →0x2076e →0x20774 <MI 206c2 ADD.W D0,D0> {} <MI 206c4 SWITCH D0.W> {} <POP 206ec-20702 Naked> Σ0 Δ-4 →0x207b8 ←0x206c2 <POP 206ec-206ee StackAdj> Δ-4 {[-4-]} <POP 206ee-206ef StackAdj> Δ+2 {[-2-]} <Blob 0x206ef [2] @> Δ-2 {[-2-]|[«2""»]} <MI 206f2 MOVE.B 0x2010b,(A7+0x1)> {[-2-]|[«2""»]} <MI 206f8 MOVE.B 0x2010c,(A7+0x2)> {[-2-]|[«2""»]} <MI 206fe BRA 0x207b8> {[-2-]|[«2""»]} <POP 20702-20718 Naked> Σ0 Δ-4 →0x207b8 ←0x206c2 <POP 20702-20704 StackAdj> Δ-4 {[-4-]} <POP 20704-20705 StackAdj> Δ+2 {[-2-]} <Blob 0x20705 [2] @> Δ-2 {[-2-]|[«2""»]} <MI 20708 MOVE.B 0x2010f,(A7+0x1)> {[-2-]|[«2""»]} <MI 2070e MOVE.B 0x20110,(A7+0x2)> {[-2-]|[«2""»]} <MI 20714 BRA 0x207b8> {[-2-]|[«2""»]} <POP 20718-2072e Naked> Σ0 Δ-4 →0x207b8 ←0x206c2 <POP 20718-2071a StackAdj> Δ-4 {[-4-]} <POP 2071a-2071b StackAdj> Δ+2 {[-2-]} <Blob 0x2071b [2] @> Δ-2 {[-2-]|[«2""»]} <MI 2071e MOVE.B 0x20113,(A7+0x1)> {[-2-]|[«2""»]} <MI 20724 MOVE.B 0x20114,(A7+0x2)> {[-2-]|[«2""»]} <MI 2072a BRA 0x207b8> {[-2-]|[«2""»]} <POP 2072e-20742 Naked> Σ0 Δ-4 →0x207b8 ←0x206c2 <POP 2072e-20730 StackAdj> Δ-4 {[-4-]} <POP 20730-20731 StackAdj> Δ+2 {[-2-]} <Blob 0x20731 [2] @> Δ-2 {[-2-]|[«2""»]} <MI 20734 MOVE.B 0x20117,(A7+0x1)> {[-2-]|[«2""»]} <MI 2073a MOVE.B 0x20118,(A7+0x2)> {[-2-]|[«2""»]} <MI 20740 BRA 0x207b8> {[-2-]|[«2""»]} <POP 20742-20756 Naked> Σ0 Δ-4 →0x207b8 ←0x206c2 <POP 20742-20744 StackAdj> Δ-4 {[-4-]} <POP 20744-20745 StackAdj> Δ+2 {[-2-]} <Blob 0x20745 [2] @> Δ-2 {[-2-]|[«2""»]} <MI 20748 MOVE.B 0x2011b,(A7+0x1)> {[-2-]|[«2""»]} <MI 2074e MOVE.B 0x2011c,(A7+0x2)> {[-2-]|[«2""»]} <MI 20754 BRA 0x207b8> {[-2-]|[«2""»]} <POP 20756-2075a Naked> Σ0 Δ-4 ↓ ←0x206c2 <Blob 0x20756 [4] @> Δ-4 {[«4""»]} <POP 2075a-20768 Naked> Σ-4 Δ-12 →0x207c4 ←0x20768 ←0x2076e ←0x20774 <POP 2075a-2075c StackAdj> Δ-4 {[-8-]} <Pointer.sp 0x2075c 4> Δ-4 {[-8-]|[^^4]} <Const 0x20760 0x1.2> Δ-2 {[-8-]|[^^4]|[#1]} <Const 0x20762 0x4.2> Δ-2 {[-8-]|[^^4]|[#1]|[#4]} <MI 20766 BRA 0x207c4> {[-8-]|[^^4]|[#1]|[#4]} <POP 20768-2076e Naked> Σ0 Δ-4 →0x2075a ←0x206c2 <Blob 0x20768 [4] @> Δ-4 {[«4""»]} <MI 2076c BRA 0x2075a> {[«4""»]} <POP 2076e-20774 Naked> Σ0 Δ-4 →0x2075a ←0x206c2 <Blob 0x2076e [4] @> Δ-4 {[«4""»]} <MI 20772 BRA 0x2075a> {[«4""»]} <POP 20774-2077a Naked> Σ0 Δ-4 →0x2075a ←0x206c2 <Blob 0x20774 [4] @> Δ-4 {[«4""»]} <MI 20778 BRA 0x2075a> {[«4""»]} <POP 2077a-207a6 Naked> Σ0 →0x207d2 ←0x206c2 <Blob 0x2077a [6] @> Δ-6 {[«6""»]} <POP 2078a-2078c StackAdj> Δ-4 {[«6""»]|[-4-]} <Lit 0x2078c 5> {[«6""»]|[$$RESHA]} <MI 2079e MOVE.L (A7)+,(A6+0xa)> Δ+4 {[«6""»]} <POP 207a2-207a4 StackAdj> Δ+6 {} <MI 207a4 BRA 0x207d2> {} <POP 207a6-207b8 Naked> Σ0 Δ-4 ↓ ←0x206b4 ←0x206c2 ←0x206c2 ←0x206c2 ←0x206c2 ←0x206c2 ←0x206c2 <POP 207a6-207a8 StackAdj> Δ-4 {[-4-]} <POP 207a8-207a9 StackAdj> Δ+2 {[-2-]} <Blob 0x207a9 [2] @> Δ-2 {[-2-]|[«2""»]} <MI 207ac MOVE.B 0x20135,(A7+0x1)> {[-2-]|[«2""»]} <MI 207b2 MOVE.B 0x20136,(A7+0x2)> {[-2-]|[«2""»]} <POP 207b8-207c4 Naked> Σ-4 Δ-12 ↓ ←0x206ec ←0x20702 ←0x20718 ←0x2072e ←0x20742 <POP 207b8-207ba StackAdj> Δ-4 {[-8-]} <Pointer.sp 0x207ba 4> Δ-4 {[-8-]|[^^4]} <Const 0x207be 0x1.2> Δ-2 {[-8-]|[^^4]|[#1]} <Const 0x207c0 0x3.2> Δ-2 {[-8-]|[^^4]|[#1]|[#3]} <POP 207c4-207d2 Naked> Σ-16 Δ+16 ↓ ←0x2075a <Call 0x207c4 0x102c4> {[-16-]} StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 207ca-207cc StackAdj> Δ+8 {[-8-]} <MI 207cc MOVE.L (A7)+,(A6+0xa)> Δ+4 {[-4-]} <POP 207d0-207d2 StackAdj> Δ+4 {} <POP 207d2-207da Epilogue> Σ0 ←0x2077a
@ 207da <LVAR 0x00c 2(w)> <LVAR 0x008 4(r)> <POP 207da-2081a Body> <POP 207da-207f0 Prologue> Σ0 ↓ <POP 207f0-20812 Naked> Σ0 ↓ <POP 207f0-207f2 StackAdj> Δ-2 {[-2-]} <MI 207f2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6+0x8)']} <Call 0x207f6 0x10592> {[-2-]|[4, '(A6+0x8)']} ReadConfig(where : Long) : Word <POP 207fc-207fe StackAdj> Δ+4 {[-2-]} <MI 207fe MOVE.W (A7)+,D0> Δ+2 {} <POP 0x20800 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 20804 MOVE.W D0,D7> {} <MI 20806 MOVE.W D7,D0> {} <MI 20808 EXTW.L D0> {} <MI 2080a ADD.L D0,(A4+0x2)> {} <MI 2080e MOVE.W D0,(A6+0xc)> {} <POP 20812-2081a Epilogue> Σ0
@ 2081a <LVAR -0x006 4(rw)> <LVAR -0x007 1(w)> <LVAR -0x008 @ 1(w) 2(r)> <POP 2081a-20906 Body> <POP 2081a-20830 Prologue> Σ0 ↓ <POP 20830-2083e RegCacheLoad> Σ0 ↓ <POP 2083e-208fa Naked> Σ0 ↓ →0x208fe <MI 2083e MOVE.L #0x56,(A6-0x6)> {} <POP 20846-20848 StackAdj> Δ-2 {[-2-]} <Const 0x20848 0x101.4> Δ-4 {[-2-]|[##257]} <MI 2084c LEA.L (A6-0x8),A4> {[-2-]|[##257]} <Call 0x2084e 0x207da> {[-2-]|[##257]} <POP 20850-20852 StackAdj> Δ+4 {[-2-]} <MI 20852 MOVE.W (A7)+,D0> Δ+2 {} <POP 0x20854 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 20856 MOVE.W D0,(A5+0x50)> {} <POP 2085a-2085c StackAdj> Δ-2 {[-2-]} <Const 0x2085c 0x102.4> Δ-4 {[-2-]|[##258]} <MI 20860 LEA.L (A6-0x8),A4> {[-2-]|[##258]} <Call 0x20862 0x207da> {[-2-]|[##258]} <POP 20864-20866 StackAdj> Δ+4 {[-2-]} <MI 20866 MOVE.W (A7)+,D0> Δ+2 {} <MI 20868 ASL.W #0x8,D0> {} <POP 2086a-2086c StackAdj> Δ-2 {[-2-]} <Const 0x2086c 0x103.4> Δ-4 {[-2-]|[##259]} <MI 20870 LEA.L (A6-0x8),A4> {[-2-]|[##259]} <Call 0x20872 0x207da> {[-2-]|[##259]} <POP 20874-20876 StackAdj> Δ+4 {[-2-]} <MI 20876 ADD.W (A7)+,D0> Δ+2 {} <POP 0x20878 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {} <MI 20880 MOVE.W D0,(A5+0x52)> {} <POP 20884-20886 StackAdj> Δ-2 {[-2-]} <Const 0x20886 0x104.4> Δ-4 {[-2-]|[##260]} <MI 2088a LEA.L (A6-0x8),A4> {[-2-]|[##260]} <Call 0x2088c 0x207da> {[-2-]|[##260]} <POP 2088e-20890 StackAdj> Δ+4 {[-2-]} <MI 20890 MOVE.W (A7)+,D0> Δ+2 {} <POP 0x20892 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 20894 MOVE.W D0,(A5+0x54)> {} <POP 20898-2089a StackAdj> Δ-2 {[-2-]} <Const 0x2089a 0x105.4> Δ-4 {[-2-]|[##261]} <MI 2089e LEA.L (A6-0x8),A4> {[-2-]|[##261]} <Call 0x208a0 0x207da> {[-2-]|[##261]} <POP 208a2-208a4 StackAdj> Δ+4 {[-2-]} <MI 208a4 MOVE.W (A7)+,D0> Δ+2 {} <POP 0x208a6 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 208a8 MOVE.W D0,(A5+0x56)> {} <POP 208ac-208ae StackAdj> Δ-2 {[-2-]} <Const 0x208ae 0x106.4> Δ-4 {[-2-]|[##262]} <MI 208b2 LEA.L (A6-0x8),A4> {[-2-]|[##262]} <Call 0x208b4 0x207da> {[-2-]|[##262]} <POP 208b6-208b8 StackAdj> Δ+4 {[-2-]} <MI 208b8 MOVE.W (A7)+,D0> Δ+2 {} <POP 0x208ba LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 208bc MOVE.B D0,(A6-0x8)> {} <POP 208be-208c0 StackAdj> Δ-2 {[-2-]} <Const 0x208c0 0x107.4> Δ-4 {[-2-]|[##263]} <MI 208c4 LEA.L (A6-0x8),A4> {[-2-]|[##263]} <Call 0x208c6 0x207da> {[-2-]|[##263]} <POP 208c8-208ca StackAdj> Δ+4 {[-2-]} <MI 208ca MOVE.W (A7)+,D0> Δ+2 {} <POP 0x208cc LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 208ce MOVE.B D0,(A6-0x7)> {} <MI 208d2 MOVE.W (A6-0x8),-(A7)> Δ-2 {[2, '(A6-0x8)']} <MI 208d4 PEA.L (A5+0x58)> Δ-4 {[2, '(A6-0x8)']|[4, '^(A5+0x58)']} <Call 0x208d8 0x20634> {[2, '(A6-0x8)']|[4, '^(A5+0x58)']} <POP 208dc-208de StackAdj> Δ+4 {[2, '(A6-0x8)']} <Const 0x208de 0x108.4> Δ-4 {[2, '(A6-0x8)']|[##264]} <MI 208e2 LEA.L (A6-0x8),A4> {[2, '(A6-0x8)']|[##264]} <Call 0x208e4 0x207da> {[2, '(A6-0x8)']|[##264]} <POP 208e6-208e8 StackAdj> Δ+4 {[2, '(A6-0x8)']} <MI 208e8 MOVE.W (A7)+,D0> Δ+2 {} <POP 0x208ea LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 208ec MOVE.B D0,(A6-0x8)> {} <MI 208ee CLR.B (A5+0x5c)> {} <MI 208f2 MOVE.L (A6-0x6),D0> {} <MI 208f6 AND.L #0xff,D0> {} <MI 208f8 BNE 0x208fe> {} <POP 208fa-208fe Naked> Σ0 ↓ <MI 208fa ADDQ.B #0x1,(A5+0x5c)> {} <POP 208fe-20906 Epilogue> Σ0 ←0x2083e
@ 20906 <LVAR 0x00c 2(w)> <LVAR 0x008 4(r)> <LVAR -0x004 @ 2(r)> <POP 20906-20952 Body> <POP 20906-2091c Prologue> Σ0 ↓ <POP 2091c-20920 RegCacheLoad> Σ0 ↓ <POP 20920-2094a Naked> Σ0 ↓ <MI 20920 CLR.W (A6-0x4)> {} <MI 20922 MOVE.L (A4),D0> {} <MI 20924 ADD.L (A6+0x8),D0> {} <MI 20928 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']} <MI 2092a LEA.L (A6-0x4),A0> {[4, 'D0']} <MI 2092c MOVE.L A0,-(A7)> Δ-4 {[4, 'D0']|[4, 'A0']} <MI 2092e ADDQ.L #0x1,(A7)> {[4, 'D0']|[-4-]} <Const 0x20930 0x1.2> Δ-2 {[4, 'D0']|[-4-]|[#1]} <Call 0x20934 0x10238> {[4, 'D0']|[-4-]|[#1]} KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) <POP 2093a-2093e StackAdj> Δ+10 {} <MI 2093e MOVE.W (A6-0x4),D0> {} <MI 20940 EXTW.L D0> {} <MI 20942 ADD.L D0,(A4+0x6)> {} <MI 20946 MOVE.W D0,(A6+0xc)> {} <POP 2094a-20952 Epilogue> Σ0
@ 20952 <LVAR -0x006 4(r)> <LVAR -0x007 1(w)> <LVAR -0x008 1(w) 2(r)> <LVAR -0x00c @ 4(w)> <POP 20952-20a84 Body> <POP 20952-20968 Prologue> Σ0 ↓ <POP 20968-2097a RegCacheLoad> Σ0 ↓ <POP 2097a-20986 Naked> Σ0 ↓ →0x209b8 <POP 2097a-2097c StackAdj> Δ-4 {[-4-]} <Call 0x2097c 0x22024> {[-4-]} <MI 20982 MOVE.L (A7)+,(A6-0xc)> Δ+4 {} <MI 20984 BNE 0x209b8> {} <POP 20986-209b8 Naked> Σ0 →0x20a7c <Blob 0x20986 [32] @> Δ-32 {[«32""»]} <POP 20992-20994 StackAdj> Δ-4 {[«32""»]|[-4-]} <Lit 0x20994 32> {[«32""»]|[$$*** invalid RESHA board info ptr]} <Call 0x209a8 0x103e0> {[«32""»]|[$$*** invalid RESHA board info ptr]} WriteConsoleStringCrLf(str : String) <POP 209ae-209b2 StackAdj> Δ+36 {} <MI 209b2 CLR.B (A5+0x24)> {} <MI 209b4 BRA 0x20a7c> {} <POP 209b8-20a7a Naked> Σ0 ↓ →0x20a7c ←0x2097a <MI 209b8 CLR.L (A6-0x6)> {} <POP 209bc-209be StackAdj> Δ-2 {[-2-]} <Const 0x209be 0x0.4> Δ-4 {[-2-]|[##0]} <MI 209c2 LEA.L (A6-0xc),A4> {[-2-]|[##0]} <Call 0x209c4 0x20906> {[-2-]|[##0]} <POP 209c6-209c8 StackAdj> Δ+4 {[-2-]} <MI 209c8 MOVE.W (A7)+,D0> Δ+2 {} <POP 0x209ca LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 209cc MOVE.W D0,(A5+0x18)> {} <POP 209d0-209d2 StackAdj> Δ-2 {[-2-]} <Const 0x209d2 0x1.4> Δ-4 {[-2-]|[##1]} <MI 209d6 LEA.L (A6-0xc),A4> {[-2-]|[##1]} <Call 0x209d8 0x20906> {[-2-]|[##1]} <POP 209da-209dc StackAdj> Δ+4 {[-2-]} <MI 209dc MOVE.W (A7)+,D0> Δ+2 {} <MI 209de ASL.W #0x8,D0> {} <POP 209e0-209e2 StackAdj> Δ-2 {[-2-]} <Const 0x209e2 0x2.4> Δ-4 {[-2-]|[##2]} <MI 209e6 LEA.L (A6-0xc),A4> {[-2-]|[##2]} <Call 0x209e8 0x20906> {[-2-]|[##2]} <POP 209ea-209ec StackAdj> Δ+4 {[-2-]} <MI 209ec ADD.W (A7)+,D0> Δ+2 {} <POP 0x209ee LimitCheck 0x0 ≤ D0 ≤ 0xffff> {} <MI 209f6 MOVE.W D0,(A5+0x1a)> {} <POP 209fa-209fc StackAdj> Δ-2 {[-2-]} <Const 0x209fc 0x3.4> Δ-4 {[-2-]|[##3]} <MI 20a00 LEA.L (A6-0xc),A4> {[-2-]|[##3]} <Call 0x20a02 0x20906> {[-2-]|[##3]} <POP 20a04-20a06 StackAdj> Δ+4 {[-2-]} <MI 20a06 MOVE.W (A7)+,D0> Δ+2 {} <POP 0x20a08 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 20a0a MOVE.W D0,(A5+0x1c)> {} <POP 20a0e-20a10 StackAdj> Δ-2 {[-2-]} <Const 0x20a10 0x4.4> Δ-4 {[-2-]|[##4]} <MI 20a14 LEA.L (A6-0xc),A4> {[-2-]|[##4]} <Call 0x20a16 0x20906> {[-2-]|[##4]} <POP 20a18-20a1a StackAdj> Δ+4 {[-2-]} <MI 20a1a MOVE.W (A7)+,D0> Δ+2 {} <POP 0x20a1c LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 20a1e MOVE.W D0,(A5+0x1e)> {} <POP 20a22-20a24 StackAdj> Δ-2 {[-2-]} <Const 0x20a24 0x5.4> Δ-4 {[-2-]|[##5]} <MI 20a28 LEA.L (A6-0xc),A4> {[-2-]|[##5]} <Call 0x20a2a 0x20906> {[-2-]|[##5]} <POP 20a2c-20a2e StackAdj> Δ+4 {[-2-]} <MI 20a2e MOVE.W (A7)+,D0> Δ+2 {} <POP 0x20a30 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 20a32 MOVE.B D0,(A6-0x8)> {} <POP 20a36-20a38 StackAdj> Δ-2 {[-2-]} <Const 0x20a38 0x6.4> Δ-4 {[-2-]|[##6]} <MI 20a3c LEA.L (A6-0xc),A4> {[-2-]|[##6]} <Call 0x20a3e 0x20906> {[-2-]|[##6]} <POP 20a40-20a42 StackAdj> Δ+4 {[-2-]} <MI 20a42 MOVE.W (A7)+,D0> Δ+2 {} <POP 0x20a44 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 20a46 MOVE.B D0,(A6-0x7)> {} <MI 20a4a MOVE.W (A6-0x8),-(A7)> Δ-2 {[2, '(A6-0x8)']} <MI 20a4e PEA.L (A5+0x20)> Δ-4 {[2, '(A6-0x8)']|[4, '^(A5+0x20)']} <Call 0x20a52 0x20634> {[2, '(A6-0x8)']|[4, '^(A5+0x20)']} <POP 20a56-20a58 StackAdj> Δ+4 {[2, '(A6-0x8)']} <Const 0x20a58 0x7.4> Δ-4 {[2, '(A6-0x8)']|[##7]} <MI 20a5c LEA.L (A6-0xc),A4> {[2, '(A6-0x8)']|[##7]} <Call 0x20a5e 0x20906> {[2, '(A6-0x8)']|[##7]} <POP 20a60-20a62 StackAdj> Δ+4 {[2, '(A6-0x8)']} <MI 20a62 MOVE.W (A7)+,D0> Δ+2 {} <POP 0x20a64 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 20a66 MOVE.B D0,(A6-0x8)> {} <MI 20a6a CLR.B (A5+0x24)> {} <MI 20a6c MOVE.L (A6-0x6),D0> {} <MI 20a70 AND.L #0xff,D0> {} <MI 20a72 CMPI.L #0x000000aa,D0> {} <MI 20a78 BNE 0x20a7c> {} <POP 20a7a-20a7c Naked> Σ0 ↓ <MI 20a7a ADDQ.B #0x1,(A5+0x24)> {} <POP 20a7c-20a84 Epilogue> Σ0 ←0x20986 ←0x209b8
@ 20a84 <LVAR 0x008 1(r)> <LVAR -0x003 @ 1(r)> <LVAR -0x004 1(r)> <LVAR -0x005 @ 1(r)> <LVAR -0x006 @ 1(r)> <LVAR -0x007 @ 1(r)> <LVAR -0x008 1(r)> <LVAR -0x009 @ 1(r)> <LVAR -0x00a @ 1(r)> <POP 20a84-20bb4 Body> Δ+72 <POP 20a84-20a9a Prologue> Σ0 ↓ <POP 20a9a-20aae RegCacheLoad> Σ0 ↓ <POP 20aae-20aca Naked> Σ0 →0x20b16 →0x20b2c →0x20ae6 →0x20b00 →0x20b42 →0x20b42 →0x20b42 →0x20b42 <MI 20aae MOVE.B (A6+0x8),D0> {} <MI 20ab2 EXTB.W D0> {} <MI 20ab4 MOVE.W D0,D1> {} <MI 20ab6 SUBQ.W #0x2,D1> {} <POP 0x20ab8 LimitCheck 0x0 ≤ D1 ≤ 0xd> {} <MI 20ac0 ADD.W D1,D1> {} <MI 20ac2 SWITCH D1.W> {} <POP 20ae6-20afa Naked> Σ0 Δ-24 ↓ ←0x20aae <Pointer.fp 0x20ae6 <LVAR -0x00a @ 1(r)>> Δ-4 {[@@-10]} <Pointer.fp 0x20ae8 <LVAR -0x009 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]} <Pointer.fp 0x20aea <LVAR -0x007 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]} <Pointer.fp 0x20aec <LVAR -0x006 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]|[@@-6]} <Pointer.fp 0x20aee <LVAR -0x005 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]} <Pointer.fp 0x20af0 <LVAR -0x003 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]} <Call 0x20af4 0x2221c> {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]} exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) <POP 20afa-20b00 Naked> Σ-24 Δ+24 →0x20b5c ←0x20b00 ←0x20b16 ←0x20b2c <POP 20afa-20afe StackAdj> Δ+24 {} <MI 20afe BRA 0x20b5c> {} <POP 20b00-20b16 Naked> Σ0 Δ-24 →0x20afa ←0x20aae <Pointer.fp 0x20b00 <LVAR -0x00a @ 1(r)>> Δ-4 {[@@-10]} <Pointer.fp 0x20b02 <LVAR -0x009 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]} <Pointer.fp 0x20b04 <LVAR -0x007 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]} <Pointer.fp 0x20b06 <LVAR -0x006 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]|[@@-6]} <Pointer.fp 0x20b08 <LVAR -0x005 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]} <Pointer.fp 0x20b0a <LVAR -0x003 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]} <Call 0x20b0e 0x2229e> {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]} exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) <MI 20b14 BRA 0x20afa> {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]} <POP 20b16-20b2c Naked> Σ0 Δ-24 →0x20afa ←0x20aae <Pointer.fp 0x20b16 <LVAR -0x00a @ 1(r)>> Δ-4 {[@@-10]} <Pointer.fp 0x20b18 <LVAR -0x009 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]} <Pointer.fp 0x20b1a <LVAR -0x007 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]} <Pointer.fp 0x20b1c <LVAR -0x006 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]|[@@-6]} <Pointer.fp 0x20b1e <LVAR -0x005 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]} <Pointer.fp 0x20b20 <LVAR -0x003 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]} <Call 0x20b24 0x221cc> {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]} exp_READ_NOVRAM_DATA.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) <MI 20b2a BRA 0x20afa> {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]} <POP 20b2c-20b42 Naked> Σ0 Δ-24 →0x20afa ←0x20aae <Pointer.fp 0x20b2c <LVAR -0x00a @ 1(r)>> Δ-4 {[@@-10]} <Pointer.fp 0x20b2e <LVAR -0x009 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]} <Pointer.fp 0x20b30 <LVAR -0x007 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]} <Pointer.fp 0x20b32 <LVAR -0x006 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]|[@@-6]} <Pointer.fp 0x20b34 <LVAR -0x005 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]} <Pointer.fp 0x20b36 <LVAR -0x003 @ 1(r)>> Δ-4 {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]} <Call 0x20b3a 0x2214a> {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]} exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) <MI 20b40 BRA 0x20afa> {[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]} <POP 20b42-20b5c Naked> Σ0 ↓ ←0x20aae ←0x20aae ←0x20aae ←0x20aae <MI 20b42 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']} <Pointer.fp 0x20b44 <LVAR -0x00a @ 1(r)>> Δ-4 {[2, 'D0']|[@@-10]} <Pointer.fp 0x20b46 <LVAR -0x009 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-10]|[@@-9]} <Pointer.fp 0x20b48 <LVAR -0x007 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-10]|[@@-9]|[@@-7]} <Pointer.fp 0x20b4a <LVAR -0x006 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-10]|[@@-9]|[@@-7]|[@@-6]} <Pointer.fp 0x20b4c <LVAR -0x005 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]} <Pointer.fp 0x20b4e <LVAR -0x003 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]} <Call 0x20b52 0x22444> {[2, 'D0']|[@@-10]|[@@-9]|[@@-7]|[@@-6]|[@@-5]|[@@-3]} <POP 20b58-20b5c StackAdj> Δ+26 {} <POP 20b5c-20bac Naked> Σ0 ↓ ←0x20afa <MI 20b5c MULS.W #0xe,D0> {} <MI 20b60 CLR.L D1> {} <MI 20b62 MOVE.B (A6-0xa),D1> {} <MI 20b64 MOVE.W D1,(A5+D0.W+#0x18)> {} <MI 20b68 CLR.L D1> {} <MI 20b6a MOVE.B (A6-0x9),D1> {} <MI 20b6c ASL.W #0x8,D1> {} <MI 20b6e CLR.L D2> {} <MI 20b70 MOVE.B (A6-0x8),D2> {} <MI 20b74 ADD.W D1,D2> {} <MI 20b76 MOVE.W D2,(A5+D0.W+#0x1a)> {} <MI 20b7a CLR.L D1> {} <MI 20b7c MOVE.B (A6-0x7),D1> {} <MI 20b7e MOVE.W D1,(A5+D0.W+#0x1c)> {} <MI 20b82 CLR.L D1> {} <MI 20b84 MOVE.B (A6-0x6),D1> {} <MI 20b86 MOVE.W D1,(A5+D0.W+#0x1e)> {} <POP 20b8a-20b8c StackAdj> Δ-2 {[-2-]} <MI 20b8c MOVE.B (A6-0x5),(A7)> {[-2-]} <MI 20b8e MOVE.B (A6-0x4),(A7+0x1)> {[-2-]} <MI 20b94 PEA.L (A5+D0.W+#0x20)> Δ-4 {[-2-]|[4, '^(A5+D0.W+#0x20)']} <Call 0x20b98 0x20634> {[-2-]|[4, '^(A5+D0.W+#0x20)']} <POP 20b9c-20b9e StackAdj> Δ+6 {} <MI 20b9e MOVE.B (A6-0x3),D1> {} <MI 20ba2 EXTB.W D1> {} <POP 0x20ba4 LimitCheck 0x0 ≤ D1 ≤ 0x1> {} <MI 20ba8 MOVE.B D1,(A5+D0.W+#0x24)> {} <POP 20bac-20bb4 Epilogue> Σ0
@ 20bb4 <LVAR -0x006 @> <POP 20bb4-20c94 Body> <POP 20bb4-20bca Prologue> Σ0 ↓ <POP 20bca-20bce RegCacheLoad> Σ0 ↓ <POP 20bce-20bee Naked> Σ0 ↓ <Call 0x20bce 0x2081a> {} <Const 0x20bd2 0x6.2> Δ-2 {[#6]} <Call 0x20bd6 0x20a84> {[#6]} <POP 20bd8-20bd9 StackAdj> Δ+2 {} <Const 0x20bd9 0x7.2> Δ-2 {[#7]} <Call 0x20bdc 0x20a84> {[#7]} <POP 20bde-20bdf StackAdj> Δ+2 {} <Const 0x20bdf 0x3.2> Δ-2 {[#3]} <Call 0x20be2 0x20a84> {[#3]} <POP 20be4-20be5 StackAdj> Δ+2 {} <Const 0x20be5 0x2.2> Δ-2 {[#2]} <Call 0x20be8 0x20a84> {[#2]} <POP 20bea-20bec StackAdj> Δ+2 {} <MI 20bec MOVEQ.L #0x0c,D7> {} <POP 20bee-20bfe Naked> Σ0 ↓ →0x20c04 ←0x20c04 <POP 20bee-20bf0 StackAdj> Δ-2 {[-2-]} <MI 20bf0 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']} <Call 0x20bf2 0x104c0> {[-2-]|[2, 'D7']} HasBoard(diproc_addr: Byte) : Byte <POP 20bf8-20bfa StackAdj> Δ+2 {[-2-]} <MI 20bfa TST.B (A7)+> Δ+2 {} <MI 20bfc BEQ 0x20c04> {} <POP 20bfe-20c04 Naked> Σ0 ↓ <MI 20bfe MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']} <Call 0x20c00 0x20a84> {[2, 'D7']} <POP 20c02-20c04 StackAdj> Δ+2 {} <POP 20c04-20c0c Naked> Σ0 ↓ →0x20bee ←0x20bee <MI 20c04 ADDQ.B #0x1,D7> {} <MI 20c06 CMPI.B #0x0f,D7> {} <MI 20c0a BLE 0x20bee> {} <POP 20c0c-20c18 Naked> Σ0 ↓ →0x20c24 <POP 20c0c-20c0e StackAdj> Δ-2 {[-2-]} <Call 0x20c0e 0x1060a> {[-2-]} Is_machine_type_four() : Bool <MI 20c14 TST.B (A7)+> Δ+2 {} <MI 20c16 BNE 0x20c24> {} <POP 20c18-20c24 Naked> Σ0 ↓ →0x20c8c <POP 20c18-20c1a StackAdj> Δ-2 {[-2-]} <Call 0x20c1a 0x10604> {[-2-]} Is_machine_type_three() : Bool <MI 20c20 TST.B (A7)+> Δ+2 {} <MI 20c22 BEQ 0x20c8c> {} <POP 20c24-20c44 Naked> Σ0 ↓ →0x20c76 ←0x20c0c <Const 0x20c24 0x0.4> Δ-4 {[##0]} <Pointer.fp 0x20c28 <LVAR -0x006 @>> Δ-4 {[##0]|[@@-6]} <Call 0x20c2c 0x22078> {[##0]|[@@-6]} <POP 20c32-20c34 StackAdj> Δ+8 {} <Call 0x20c34 0x20952> {} <POP 20c38-20c3a StackAdj> Δ-4 {[-4-]} <Call 0x20c3a 0x2204e> {[-4-]} <MI 20c40 MOVE.L (A7)+,D6> Δ+4 {} <MI 20c42 BNE 0x20c76> {} <POP 20c44-20c76 Naked> Σ0 →0x20c8c <Blob 0x20c44 [30] @> Δ-30 {[«30""»]} <POP 20c50-20c52 StackAdj> Δ-4 {[«30""»]|[-4-]} <Lit 0x20c52 30> {[«30""»]|[$$*** invalid TCP board info ptr]} <Call 0x20c66 0x103e0> {[«30""»]|[$$*** invalid TCP board info ptr]} WriteConsoleStringCrLf(str : String) <POP 20c6c-20c70 StackAdj> Δ+34 {} <MI 20c70 CLR.L (A5+0xf8)> {} <MI 20c74 BRA 0x20c8c> {} <POP 20c76-20c8c Naked> Σ0 ↓ ←0x20c24 <MI 20c76 MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']} <MI 20c78 LEA.L (A5+0xf8),A0> {[4, 'D6']} <MI 20c7c MOVE.L A0,-(A7)> Δ-4 {[4, 'D6']|[4, 'A0']} <Const 0x20c7e 0x4.2> Δ-2 {[4, 'D6']|[4, 'A0']|[#4]} <Call 0x20c82 0x10238> {[4, 'D6']|[4, 'A0']|[#4]} KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) <POP 20c88-20c8c StackAdj> Δ+10 {} <POP 20c8c-20c94 Epilogue> Σ0 ←0x20c18 ←0x20c44
@ 20c94 <LVAR 0x00a 4(r)> <LVAR 0x008 2(r)> <POP 20c94-20cca Body> <POP 20c94-20caa Prologue> Σ0 ↓ <POP 20caa-20cc2 Naked> Σ0 ↓ <MI 20caa MOVE.L (A6+0xa),-(A7)> Δ-4 {[4, '(A6+0xa)']} <MI 20cae MOVE.W (A6+0x8),-(A7)> Δ-2 {[4, '(A6+0xa)']|[2, '(A6+0x8)']} <Call 0x20cb2 0x10598> {[4, '(A6+0xa)']|[2, '(A6+0x8)']} WriteConfig(what: Word; where : Long) <POP 20cb8-20cba StackAdj> Δ+6 {} <MI 20cba MOVE.W (A6+0x8),D0> {} <MI 20cbe EXTW.L D0> {} <MI 20cc0 ADD.L D0,(A4)> {} <POP 20cc2-20cca Epilogue> Σ0
@ 20cca <LVAR 0x010 1(r)> <LVAR 0x00f 1(r)> <LVAR 0x00e 1(r)> <LVAR 0x00c 1(r)> <LVAR 0x00a 1(r)> <LVAR 0x009 1(r)> <LVAR 0x008 1(r)> <LVAR -0x006 @ 4(rw)> <POP 20cca-20d8c Body> <POP 20cca-20ce0 Prologue> Σ0 ↓ <POP 20ce0-20ce8 RegCacheLoad> Σ0 ↓ <POP 20ce8-20d84 Naked> Σ0 ↓ <MI 20ce8 MOVE.L #0x56,(A6-0x6)> {} <Const 0x20cee 0x101.4> Δ-4 {[##257]} <MI 20cf2 CLR.L D0> {[##257]} <MI 20cf4 MOVE.B (A6+0x10),D0> {[##257]} <MI 20cf8 MOVE.W D0,-(A7)> Δ-2 {[##257]|[2, 'D0']} <MI 20cfa LEA.L (A6-0x6),A4> {[##257]|[2, 'D0']} <Call 0x20cfc 0x20c94> {[##257]|[2, 'D0']} <POP 20cfe-20d00 StackAdj> Δ+6 {} <Const 0x20d00 0x102.4> Δ-4 {[##258]} <MI 20d04 CLR.L D0> {[##258]} <MI 20d06 MOVE.B (A6+0xe),D0> {[##258]} <MI 20d0a MOVE.W D0,-(A7)> Δ-2 {[##258]|[2, 'D0']} <MI 20d0c LEA.L (A6-0x6),A4> {[##258]|[2, 'D0']} <Call 0x20d0e 0x20c94> {[##258]|[2, 'D0']} <POP 20d10-20d12 StackAdj> Δ+6 {} <Const 0x20d12 0x103.4> Δ-4 {[##259]} <MI 20d16 CLR.L D0> {[##259]} <MI 20d18 MOVE.B (A6+0xf),D0> {[##259]} <MI 20d1c MOVE.W D0,-(A7)> Δ-2 {[##259]|[2, 'D0']} <MI 20d1e LEA.L (A6-0x6),A4> {[##259]|[2, 'D0']} <Call 0x20d20 0x20c94> {[##259]|[2, 'D0']} <POP 20d22-20d24 StackAdj> Δ+6 {} <Const 0x20d24 0x104.4> Δ-4 {[##260]} <MI 20d28 CLR.L D0> {[##260]} <MI 20d2a MOVE.B (A6+0xc),D0> {[##260]} <MI 20d2e MOVE.W D0,-(A7)> Δ-2 {[##260]|[2, 'D0']} <MI 20d30 LEA.L (A6-0x6),A4> {[##260]|[2, 'D0']} <Call 0x20d32 0x20c94> {[##260]|[2, 'D0']} <POP 20d34-20d36 StackAdj> Δ+6 {} <Const 0x20d36 0x105.4> Δ-4 {[##261]} <MI 20d3a CLR.L D0> {[##261]} <MI 20d3c MOVE.B (A6+0xa),D0> {[##261]} <MI 20d40 MOVE.W D0,-(A7)> Δ-2 {[##261]|[2, 'D0']} <MI 20d42 LEA.L (A6-0x6),A4> {[##261]|[2, 'D0']} <Call 0x20d44 0x20c94> {[##261]|[2, 'D0']} <POP 20d46-20d48 StackAdj> Δ+6 {} <Const 0x20d48 0x106.4> Δ-4 {[##262]} <MI 20d4c CLR.L D0> {[##262]} <MI 20d4e MOVE.B (A6+0x8),D0> {[##262]} <MI 20d52 MOVE.W D0,-(A7)> Δ-2 {[##262]|[2, 'D0']} <MI 20d54 LEA.L (A6-0x6),A4> {[##262]|[2, 'D0']} <Call 0x20d56 0x20c94> {[##262]|[2, 'D0']} <POP 20d58-20d5a StackAdj> Δ+6 {} <Const 0x20d5a 0x107.4> Δ-4 {[##263]} <MI 20d5e CLR.L D0> {[##263]} <MI 20d60 MOVE.B (A6+0x9),D0> {[##263]} <MI 20d64 MOVE.W D0,-(A7)> Δ-2 {[##263]|[2, 'D0']} <MI 20d66 LEA.L (A6-0x6),A4> {[##263]|[2, 'D0']} <Call 0x20d68 0x20c94> {[##263]|[2, 'D0']} <POP 20d6a-20d6c StackAdj> Δ+6 {} <MI 20d6c MOVE.L (A6-0x6),D0> {} <MI 20d6e NEG.L D0> {} <MI 20d70 ANDI.L #0x000000ff,D0> {} <MI 20d76 MOVE.W D0,D7> {} <Const 0x20d78 0x108.4> Δ-4 {[##264]} <MI 20d7c MOVE.W D7,-(A7)> Δ-2 {[##264]|[2, 'D7']} <MI 20d7e LEA.L (A6-0x6),A4> {[##264]|[2, 'D7']} <Call 0x20d80 0x20c94> {[##264]|[2, 'D7']} <POP 20d82-20d84 StackAdj> Δ+6 {} <POP 20d84-20d8c Epilogue> Σ0
@ 20d8c <LVAR -0x008 @ 4(r)> <POP 20d8c-20f04 Body> <POP 20d8c-20da2 Prologue> Σ0 ↓ <POP 20da2-20db6 RegCacheLoad> Σ0 ↓ <POP 20db6-20de2 Naked> Σ0 ↓ <Blob 0x20db6 [54] @> Δ-54 {[«54""»]} <POP 20dc8-20dca StackAdj> Δ-4 {[«54""»]|[-4-]} <Lit 0x20dca 53> {[«54""»]|[$$turn WRITE PROTECT switch OFF (on front of RESHA) ...]} <Call 0x20dd8 0x103d8> {[«54""»]|[$$turn WRITE PROTECT switch OFF (on front of RESHA) ...]} WriteConsoleString(str : String) <POP 20dde-20de2 StackAdj> Δ+58 {} <POP 20de2-20df0 Naked> Σ0 ↓ →0x20df2 ←0x20df0 <POP 20de2-20de4 StackAdj> Δ-2 {[-2-]} <Call 0x20de4 0x21fd0> {[-2-]} <MI 20dea MOVE.B (A7)+,D0> Δ+2 {} <MI 20dec CMP.B #0x01,D0> {} <MI 20dee BNE 0x20df2> {} <POP 20df0-20df2 Naked> Σ0 →0x20de2 <MI 20df0 BRA 0x20de2> {} <POP 20df2-20e1e Naked> Σ0 ↓ ←0x20de2 <Const 0x20df2 0x4c4b.4> Δ-4 {[##19531]} <Call 0x20df6 0x10224> {[##19531]} KC12_Sleep(dur: Long) <POP 20dfc-20dfd StackAdj> Δ+2 {[-2-]} <Blob 0x20dfd [2] @> Δ-2 {[-2-]|[«2""»]} <MI 20e00 MOVE.B 0x201ad,(A7+0x1)> {[-2-]|[«2""»]} <MI 20e06 MOVE.B 0x201ae,(A7+0x2)> {[-2-]|[«2""»]} <POP 20e0c-20e0e StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]} <Lit 0x20e0e> {[-2-]|[«2""»]|[$$…]} <Pointer.sp 0x20e0e 4> Δ-4 <Const 0x20e12 0x1.2> Δ-2 <Const 0x20e14 0x3.2> Δ-2 <Call 0x20e16 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 20e18-20e1a StackAdj> Δ+8 <Call 0x20e1a 0x103e0> {[-2-]|[«2""»]|[$$…]} WriteConsoleStringCrLf(str : String) <POP 20e1c-20e1e StackAdj> Δ+8 {} <POP 20e1e-20e32 Naked> Σ0 ↓ →0x20e9e ←0x20e9e <Const 0x20e1e 0x0.4> Δ-4 {[##0]} <Pointer.fp 0x20e22 <LVAR -0x008 @ 4(r)>> Δ-4 {[##0]|[@@-8]} <Call 0x20e24 0x220a0> {[##0]|[@@-8]} <POP 20e2a-20e2c StackAdj> Δ+8 {} <MI 20e2c MOVEQ.L #0x00,D7> {} <MI 20e2e TST.L (A6-0x8)> {} <MI 20e30 BEQ 0x20e9e> {} <POP 20e32-20e3c Naked> Σ0 ↓ →0x20e9e <MI 20e32 MOVE.L (A6-0x8),D0> {} <MI 20e34 CMPI.L #0x00000002,D0> {} <MI 20e3a BEQ 0x20e9e> {} <POP 20e3c-20e9e Naked> Σ0 ↓ <Blob 0x20e3c [32] @> Δ-32 {[«32""»]} <POP 20e48-20e4a StackAdj> Δ-8 {[«32""»]|[-8-]} <Lit 0x20e4a 32> {[«32""»]|[-4-]|[$$*** ERROR code from REE_UPLOAD:_]} <MI 20e56 MOVE.L (A6-0x8),(A7)> {[«32""»]|[-4-]|[4, '(A6-0x8)']} <POP 20e54-20e56 StackAdj> Δ-8 {[«32""»]|[-4-]|[4, '(A6-0x8)']|[-8-]} <Call 0x20e58 0x102e4> {[«32""»]|[-4-]|[4, '(A6-0x8)']|[-8-]} Long2String(a : Long) : String <POP 20e5e-20e60 StackAdj> Δ+4 {[«32""»]|[-4-]|[4, '(A6-0x8)']|[-4-]} <Call 0x20e60 0x102d0> {[«32""»]|[-4-]|[4, '(A6-0x8)']|[-4-]} StringCat2(a, b : String) : String <POP 20e66-20e68 StackAdj> Δ+8 {[«32""»]|[-4-]} <Call 0x20e68 0x103e0> {[«32""»]|[-4-]} WriteConsoleStringCrLf(str : String) <MI 20e6a MOVEA.L A7,A0> {[«32""»]|[-4-]} <MI 20e6c LEA.L 0x201d0,A1> {[«32""»]|[-4-]} <BlockMove 35,A1,A0> {[«32""»]|[-4-]} <POP 20e78-20e7a StackAdj> Δ-6 {[«32""»]|[-10-]} <Lit 0x20e7a> {[«32""»]|[-6-]|[$$…]} <Pointer.sp 0x20e7a 6> Δ-4 <Const 0x20e7e 0x1.2> Δ-2 <Const 0x20e80 0x23.2> Δ-2 <Call 0x20e84 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 20e86-20e88 StackAdj> Δ+8 <POP 20e86-20e88 StackAdj> Δ-2 {[«32""»]|[-6-]|[$$…]|[-2-]} <POP 20e88-20e89 StackAdj> Δ+2 {[«32""»]|[-6-]|[$$…]} <Const 0x20e89 0x1.2> Δ-2 {[«32""»]|[-6-]|[$$…]|[#1]} <Call 0x20e8a 0x103f0> {[«32""»]|[-6-]|[$$…]|[#1]} AskOnConsoleYesNo(prompt : String; default : Bool) : Bool <POP 20e90-20e92 StackAdj> Δ+6 {[«32""»]|[-6-]} <MI 20e92 MOVE.B (A7)+,D0> Δ+2 {[«32""»]|[-4-]} <MI 20e94 EXTB.W D0> {[«32""»]|[-4-]} <POP 0x20e96 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«32""»]|[-4-]} <POP 20e98-20e9c StackAdj> Δ+36 {} <MI 20e9c MOVE.B D0,D7> {} <POP 20e9e-20ea4 Naked> Σ0 ↓ →0x20e1e ←0x20e1e ←0x20e32 <MI 20e9e TST.B D7> {} <MI 20ea0 BNE 0x20e1e> {} <POP 20ea4-20eca Naked> Σ0 ↓ <Blob 0x20ea4 [52] @> Δ-52 {[«52""»]} <POP 20eb0-20eb2 StackAdj> Δ-4 {[«52""»]|[-4-]} <Lit 0x20eb2 52> {[«52""»]|[$$turn WRITE PROTECT switch ON (on front of RESHA) ...]} <Call 0x20ec0 0x103d8> {[«52""»]|[$$turn WRITE PROTECT switch ON (on front of RESHA) ...]} WriteConsoleString(str : String) <POP 20ec6-20eca StackAdj> Δ+56 {} <POP 20eca-20ed6 Naked> Σ0 ↓ →0x20ed8 ←0x20ed6 <POP 20eca-20ecc StackAdj> Δ-2 {[-2-]} <Call 0x20ecc 0x21fd0> {[-2-]} <MI 20ed2 TST.B (A7)+> Δ+2 {} <MI 20ed4 BNE 0x20ed8> {} <POP 20ed6-20ed8 Naked> Σ0 →0x20eca <MI 20ed6 BRA 0x20eca> {} <POP 20ed8-20efc Naked> Σ0 ↓ ←0x20eca <POP 20ed8-20eda StackAdj> Δ-4 {[-4-]} <POP 20eda-20edb StackAdj> Δ+2 {[-2-]} <Blob 0x20edb [2] @> Δ-2 {[-2-]|[«2""»]} <MI 20ede MOVE.B 0x20229,(A7+0x1)> {[-2-]|[«2""»]} <MI 20ee4 MOVE.B 0x2022a,(A7+0x2)> {[-2-]|[«2""»]} <POP 20eea-20eec StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]} <Lit 0x20eec> {[-2-]|[«2""»]|[$$…]} <Pointer.sp 0x20eec 4> Δ-4 <Const 0x20ef0 0x1.2> Δ-2 <Const 0x20ef2 0x3.2> Δ-2 <Call 0x20ef4 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 20ef6-20ef8 StackAdj> Δ+8 <Call 0x20ef8 0x103e0> {[-2-]|[«2""»]|[$$…]} WriteConsoleStringCrLf(str : String) <POP 20efa-20efc StackAdj> Δ+8 {} <POP 20efc-20f04 Epilogue> Σ0
@ 20f04 <LVAR 0x00a 4(r)> <LVAR 0x008 2(r)> <POP 20f04-20f4a Body> <POP 20f04-20f1a Prologue> Σ0 ↓ <POP 20f1a-20f1e RegCacheLoad> Σ0 ↓ <POP 20f1e-20f42 Naked> Σ0 ↓ <MI 20f1e MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']} <MI 20f20 ADDQ.L #0x1,(A7)> {[-4-]} <MI 20f22 MOVE.L (A4),D0> {[-4-]} <MI 20f24 ADD.L (A6+0xa),D0> {[-4-]} <MI 20f28 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']} <Const 0x20f2a 0x1.2> Δ-2 {[-4-]|[4, 'D0']|[#1]} <Call 0x20f2e 0x10238> {[-4-]|[4, 'D0']|[#1]} KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) <POP 20f34-20f38 StackAdj> Δ+10 {} <MI 20f38 MOVE.W (A6+0x8),D0> {} <MI 20f3c EXTW.L D0> {} <MI 20f3e ADD.L D0,(A4+0x4)> {} <POP 20f42-20f4a Epilogue> Σ0
@ 20f4a <LVAR 0x010 1(r)> <LVAR 0x00f 1(r)> <LVAR 0x00e 1(r)> <LVAR 0x00c 1(r)> <LVAR 0x00a 1(r)> <LVAR 0x009 1(r)> <LVAR 0x008 1(r)> <LVAR -0x006 4(rw)> <LVAR -0x00a @ 4(w)> <POP 20f4a-21050 Body> <POP 20f4a-20f60 Prologue> Σ0 ↓ <POP 20f60-20f68 RegCacheLoad> Σ0 ↓ <POP 20f68-20f74 Naked> Σ0 ↓ →0x20fa4 <POP 20f68-20f6a StackAdj> Δ-4 {[-4-]} <Call 0x20f6a 0x22024> {[-4-]} <MI 20f70 MOVE.L (A7)+,(A6-0xa)> Δ+4 {} <MI 20f72 BNE 0x20fa4> {} <POP 20f74-20fa4 Naked> Σ0 ↓ <Blob 0x20f74 [28] @> Δ-28 {[«28""»]} <Const 0x20f80 0xe.2> Δ-2 {[«28""»]|[#14]} <POP 20f84-20f86 StackAdj> Δ-4 {[«28""»]|[#14]|[-4-]} <Lit 0x20f86 28> {[«28""»]|[#14]|[$$invalid RESHA board info ptr]} <Call 0x20f9a 0x103b8> {[«28""»]|[#14]|[$$invalid RESHA board info ptr]} PopProgram(status : Byte; msg : String) <POP 20fa0-20fa4 StackAdj> Δ+34 {} <POP 20fa4-21048 Naked> Σ0 ↓ ←0x20f68 <MI 20fa4 MOVE.L #0x56,(A6-0x6)> {} <Const 0x20fac 0x0.4> Δ-4 {[##0]} <MI 20fb0 CLR.L D0> {[##0]} <MI 20fb2 MOVE.B (A6+0x10),D0> {[##0]} <MI 20fb6 MOVE.W D0,-(A7)> Δ-2 {[##0]|[2, 'D0']} <MI 20fb8 LEA.L (A6-0xa),A4> {[##0]|[2, 'D0']} <Call 0x20fba 0x20f04> {[##0]|[2, 'D0']} <POP 20fbc-20fbe StackAdj> Δ+6 {} <Const 0x20fbe 0x1.4> Δ-4 {[##1]} <MI 20fc2 CLR.L D0> {[##1]} <MI 20fc4 MOVE.B (A6+0xe),D0> {[##1]} <MI 20fc8 MOVE.W D0,-(A7)> Δ-2 {[##1]|[2, 'D0']} <MI 20fca LEA.L (A6-0xa),A4> {[##1]|[2, 'D0']} <Call 0x20fcc 0x20f04> {[##1]|[2, 'D0']} <POP 20fce-20fd0 StackAdj> Δ+6 {} <Const 0x20fd0 0x2.4> Δ-4 {[##2]} <MI 20fd4 CLR.L D0> {[##2]} <MI 20fd6 MOVE.B (A6+0xf),D0> {[##2]} <MI 20fda MOVE.W D0,-(A7)> Δ-2 {[##2]|[2, 'D0']} <MI 20fdc LEA.L (A6-0xa),A4> {[##2]|[2, 'D0']} <Call 0x20fde 0x20f04> {[##2]|[2, 'D0']} <POP 20fe0-20fe2 StackAdj> Δ+6 {} <Const 0x20fe2 0x3.4> Δ-4 {[##3]} <MI 20fe6 CLR.L D0> {[##3]} <MI 20fe8 MOVE.B (A6+0xc),D0> {[##3]} <MI 20fec MOVE.W D0,-(A7)> Δ-2 {[##3]|[2, 'D0']} <MI 20fee LEA.L (A6-0xa),A4> {[##3]|[2, 'D0']} <Call 0x20ff0 0x20f04> {[##3]|[2, 'D0']} <POP 20ff2-20ff4 StackAdj> Δ+6 {} <Const 0x20ff4 0x4.4> Δ-4 {[##4]} <MI 20ff8 CLR.L D0> {[##4]} <MI 20ffa MOVE.B (A6+0xa),D0> {[##4]} <MI 20ffe MOVE.W D0,-(A7)> Δ-2 {[##4]|[2, 'D0']} <MI 21000 LEA.L (A6-0xa),A4> {[##4]|[2, 'D0']} <Call 0x21002 0x20f04> {[##4]|[2, 'D0']} <POP 21004-21006 StackAdj> Δ+6 {} <Const 0x21006 0x5.4> Δ-4 {[##5]} <MI 2100a CLR.L D0> {[##5]} <MI 2100c MOVE.B (A6+0x8),D0> {[##5]} <MI 21010 MOVE.W D0,-(A7)> Δ-2 {[##5]|[2, 'D0']} <MI 21012 LEA.L (A6-0xa),A4> {[##5]|[2, 'D0']} <Call 0x21014 0x20f04> {[##5]|[2, 'D0']} <POP 21016-21018 StackAdj> Δ+6 {} <Const 0x21018 0x6.4> Δ-4 {[##6]} <MI 2101c CLR.L D0> {[##6]} <MI 2101e MOVE.B (A6+0x9),D0> {[##6]} <MI 21022 MOVE.W D0,-(A7)> Δ-2 {[##6]|[2, 'D0']} <MI 21024 LEA.L (A6-0xa),A4> {[##6]|[2, 'D0']} <Call 0x21026 0x20f04> {[##6]|[2, 'D0']} <POP 21028-2102a StackAdj> Δ+6 {} <MI 2102a MOVE.L (A6-0x6),D0> {} <MI 2102e NEG.L D0> {} <MI 21030 ANDI.L #0x000000ff,D0> {} <MI 21036 MOVE.W D0,D7> {} <Const 0x21038 0x7.4> Δ-4 {[##7]} <MI 2103c MOVE.W D7,-(A7)> Δ-2 {[##7]|[2, 'D7']} <MI 2103e LEA.L (A6-0xa),A4> {[##7]|[2, 'D7']} <Call 0x21040 0x20f04> {[##7]|[2, 'D7']} <POP 21042-21044 StackAdj> Δ+6 {} <Call 0x21044 0x20d8c> {} <POP 21048-21050 Epilogue> Σ0
@ 21050 <LVAR 0x008 1(r)> <LVAR -0x004 1(rw)> <LVAR -0x005 1(rw)> <LVAR -0x006 1(rw)> <LVAR -0x007 1(rw)> <LVAR -0x008 1(rw)> <LVAR -0x009 1(rw)> <LVAR -0x00a 1(rw)> <POP 21050-2121c Body> Δ+50 <POP 21050-21066 Prologue> Σ0 ↓ <POP 21066-2107e RegCacheLoad> Σ0 ↓ <POP 2107e-210fc Naked> Σ0 →0x2111c →0x211ca →0x211a6 →0x21142 →0x21162 →0x21184 →0x211ee →0x211ee →0x211ee →0x211ee <MI 2107e MOVE.B (A6+0x8),D0> {} <MI 21082 EXTB.W D0> {} <MI 21084 MOVEQ.L #0x0e,D1> {} <MI 21086 MULS.W D0,D1> {} <MI 21088 MOVE.W (A5+D1.W+#0x18),D2> {} <POP 0x2108c LimitCheck 0x0 ≤ D2 ≤ 0xff> {} <MI 2108e MOVE.B D2,(A6-0xa)> {} <MI 21090 MOVE.W (A5+D1.W+#0x1a),D2> {} <MI 21094 LSR.W #0x8,D2> {} <MI 21096 MOVE.B D2,(A6-0x9)> {} <MI 21098 MOVE.W (A5+D1.W+#0x1a),D2> {} <MI 2109c AND.W #0xff,D2> {} <MI 2109e MOVE.B D2,(A6-0x8)> {} <MI 210a0 MOVE.W (A5+D1.W+#0x1c),D2> {} <POP 0x210a4 LimitCheck 0x0 ≤ D2 ≤ 0xff> {} <MI 210a6 MOVE.B D2,(A6-0x7)> {} <MI 210a8 MOVE.W (A5+D1.W+#0x1e),D2> {} <POP 0x210ac LimitCheck 0x0 ≤ D2 ≤ 0xff> {} <MI 210ae MOVE.B D2,(A6-0x6)> {} <MI 210b0 CLR.L D2> {} <MI 210b2 MOVE.B (A5+D1.W+#0x22),D2> {} <MI 210b6 LSR.B #0x1,D2> {} <MI 210b8 ASL.W #0x1,D2> {} <MI 210ba MOVE.W (A5+D1.W+#0x22),D3> {} <MI 210be LSL.W #0x7,D3> {} <MI 210c0 LSR.W #0x8,D3> {} <MI 210c2 LSR.W #0x4,D3> {} <MI 210c4 MOVE.W D3,D4> {} <MI 210c6 ASR.W #0x3,D4> {} <MI 210c8 ANDI.W #0x0001,D4> {} <MI 210cc ADD.W D2,D4> {} <MI 210ce MOVE.B D4,(A6-0x5)> {} <MI 210d2 ANDI.W #0x0007,D3> {} <MI 210d6 ASL.W #0x5,D3> {} <MI 210d8 CLR.L D2> {} <MI 210da MOVE.B (A5+D1.W+#0x23),D2> {} <MI 210de LSL.B #0x3,D2> {} <MI 210e0 LSR.B #0x3,D2> {} <MI 210e2 ADD.W D3,D2> {} <MI 210e4 MOVE.B D2,(A6-0x4)> {} <MI 210e8 MOVE.W D0,D1> {} <POP 0x210ea LimitCheck 0x0 ≤ D1 ≤ 0xf> {} <MI 210f2 ADD.W D1,D1> {} <MI 210f4 SWITCH D1.W> {} <POP 2111c-2113a Naked> Σ0 Δ-10 ↓ ←0x2107e <MI 2111c MOVE.B (A6-0xa),-(A7)> Δ-2 {[2, '(A6-0xa)']} <POP 2111e-21120 StackAdj> Δ-2 {[2, '(A6-0xa)']|[-2-]} <MI 21120 MOVE.B (A6-0x9),(A7)> {[2, '(A6-0xa)']|[-2-]} <MI 21122 MOVE.B (A6-0x8),(A7+0x1)> {[2, '(A6-0xa)']|[-2-]} <MI 21126 MOVE.B (A6-0x7),-(A7)> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']} <MI 21128 MOVE.B (A6-0x6),-(A7)> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']} <POP 2112a-2112c StackAdj> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 2112c MOVE.B (A6-0x5),(A7)> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 21130 MOVE.B (A6-0x4),(A7+0x1)> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <Call 0x21136 0x20f4a> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <POP 2113a-21142 Naked> Σ-10 Δ+10 →0x21214 ←0x21142 ←0x21162 ←0x21184 ←0x211a6 ←0x211ca <POP 2113a-2113e StackAdj> Δ+10 {} <MI 2113e BRA 0x21214> {} <POP 21142-21162 Naked> Σ0 Δ-10 →0x2113a ←0x2107e <MI 21142 MOVE.B (A6-0xa),-(A7)> Δ-2 {[2, '(A6-0xa)']} <POP 21144-21146 StackAdj> Δ-2 {[2, '(A6-0xa)']|[-2-]} <MI 21146 MOVE.B (A6-0x9),(A7)> {[2, '(A6-0xa)']|[-2-]} <MI 21148 MOVE.B (A6-0x8),(A7+0x1)> {[2, '(A6-0xa)']|[-2-]} <MI 2114c MOVE.B (A6-0x7),-(A7)> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']} <MI 2114e MOVE.B (A6-0x6),-(A7)> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']} <POP 21150-21152 StackAdj> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 21152 MOVE.B (A6-0x5),(A7)> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 21156 MOVE.B (A6-0x4),(A7+0x1)> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <Call 0x2115c 0x20cca> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 21160 BRA 0x2113a> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <POP 21162-21184 Naked> Σ0 Δ-10 →0x2113a ←0x2107e <MI 21162 MOVE.B (A6-0xa),-(A7)> Δ-2 {[2, '(A6-0xa)']} <POP 21164-21166 StackAdj> Δ-2 {[2, '(A6-0xa)']|[-2-]} <MI 21166 MOVE.B (A6-0x9),(A7)> {[2, '(A6-0xa)']|[-2-]} <MI 21168 MOVE.B (A6-0x8),(A7+0x1)> {[2, '(A6-0xa)']|[-2-]} <MI 2116c MOVE.B (A6-0x7),-(A7)> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']} <MI 2116e MOVE.B (A6-0x6),-(A7)> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']} <POP 21170-21172 StackAdj> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 21172 MOVE.B (A6-0x5),(A7)> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 21176 MOVE.B (A6-0x4),(A7+0x1)> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <Call 0x2117c 0x221f4> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} exp_WRITE_NOVRAM_DATA.TYP(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2) <MI 21182 BRA 0x2113a> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <POP 21184-211a6 Naked> Σ0 Δ-10 →0x2113a ←0x2107e <MI 21184 MOVE.B (A6-0xa),-(A7)> Δ-2 {[2, '(A6-0xa)']} <POP 21186-21188 StackAdj> Δ-2 {[2, '(A6-0xa)']|[-2-]} <MI 21188 MOVE.B (A6-0x9),(A7)> {[2, '(A6-0xa)']|[-2-]} <MI 2118a MOVE.B (A6-0x8),(A7+0x1)> {[2, '(A6-0xa)']|[-2-]} <MI 2118e MOVE.B (A6-0x7),-(A7)> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']} <MI 21190 MOVE.B (A6-0x6),-(A7)> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']} <POP 21192-21194 StackAdj> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 21194 MOVE.B (A6-0x5),(A7)> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 21198 MOVE.B (A6-0x4),(A7+0x1)> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <Call 0x2119e 0x22276> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} exp_WRITE_NOVRAM_DATA.VAL(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2) <MI 211a4 BRA 0x2113a> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <POP 211a6-211ca Naked> Σ0 Δ-10 →0x2113a ←0x2107e <MI 211a6 MOVE.B (A6-0xa),-(A7)> Δ-2 {[2, '(A6-0xa)']} <POP 211a8-211aa StackAdj> Δ-2 {[2, '(A6-0xa)']|[-2-]} <MI 211aa MOVE.B (A6-0x9),(A7)> {[2, '(A6-0xa)']|[-2-]} <MI 211ac MOVE.B (A6-0x8),(A7+0x1)> {[2, '(A6-0xa)']|[-2-]} <MI 211b0 MOVE.B (A6-0x7),-(A7)> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']} <MI 211b2 MOVE.B (A6-0x6),-(A7)> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']} <POP 211b4-211b6 StackAdj> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 211b6 MOVE.B (A6-0x5),(A7)> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 211ba MOVE.B (A6-0x4),(A7+0x1)> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <Call 0x211c0 0x220f0> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} exp_WRITE_NOVRAM_DATA.FIU(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2) <MI 211c6 BRA 0x2113a> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <POP 211ca-211ee Naked> Σ0 Δ-10 →0x2113a ←0x2107e <MI 211ca MOVE.B (A6-0xa),-(A7)> Δ-2 {[2, '(A6-0xa)']} <POP 211cc-211ce StackAdj> Δ-2 {[2, '(A6-0xa)']|[-2-]} <MI 211ce MOVE.B (A6-0x9),(A7)> {[2, '(A6-0xa)']|[-2-]} <MI 211d0 MOVE.B (A6-0x8),(A7+0x1)> {[2, '(A6-0xa)']|[-2-]} <MI 211d4 MOVE.B (A6-0x7),-(A7)> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']} <MI 211d6 MOVE.B (A6-0x6),-(A7)> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']} <POP 211d8-211da StackAdj> Δ-2 {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 211da MOVE.B (A6-0x5),(A7)> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 211de MOVE.B (A6-0x4),(A7+0x1)> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <Call 0x211e4 0x22172> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} exp_WRITE_NOVRAM_DATA.SEQ(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2) <MI 211ea BRA 0x2113a> {[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <POP 211ee-21214 Naked> Σ0 ↓ ←0x2107e ←0x2107e ←0x2107e ←0x2107e <MI 211ee MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']} <MI 211f0 MOVE.B (A6-0xa),-(A7)> Δ-2 {[2, 'D0']|[2, '(A6-0xa)']} <POP 211f2-211f4 StackAdj> Δ-2 {[2, 'D0']|[2, '(A6-0xa)']|[-2-]} <MI 211f4 MOVE.B (A6-0x9),(A7)> {[2, 'D0']|[2, '(A6-0xa)']|[-2-]} <MI 211f6 MOVE.B (A6-0x8),(A7+0x1)> {[2, 'D0']|[2, '(A6-0xa)']|[-2-]} <MI 211fa MOVE.B (A6-0x7),-(A7)> Δ-2 {[2, 'D0']|[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']} <MI 211fc MOVE.B (A6-0x6),-(A7)> Δ-2 {[2, 'D0']|[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']} <POP 211fe-21200 StackAdj> Δ-2 {[2, 'D0']|[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 21200 MOVE.B (A6-0x5),(A7)> {[2, 'D0']|[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <MI 21204 MOVE.B (A6-0x4),(A7+0x1)> {[2, 'D0']|[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <Call 0x2120a 0x22324> {[2, 'D0']|[2, '(A6-0xa)']|[-2-]|[2, '(A6-0x7)']|[2, '(A6-0x6)']|[-2-]} <POP 21210-21214 StackAdj> Δ+12 {} <POP 21214-2121c Epilogue> Σ0 ←0x2113a
@ 2121c <LVAR 0x018 2(w)> <LVAR 0x014 @ 4(r)> <LVAR 0x010 4(r)> <LVAR 0x00c 4(r)> <LVAR 0x008 4(r)> <LVAR -0x006 @ 4(rw)> <LVAR -0x00a @ 4(rw)> <LVAR -0x00c @ 1(rw)> <POP 2121c-21360 Body> <POP 2121c-21232 Prologue> Σ0 ↓ <POP 21232-2124c RegCacheLoad> Σ0 ↓ <POP 2124c-2129c Naked> Σ0 ↓ →0x212ae ←0x21336 <Blob 0x2124c [2] @> Δ-2 {[«2""»]} <Blob 0x21250 [4] @> Δ-4 {[«2""»]|[«4""»]} <POP 21254-21256 StackAdj> Δ-12 {[«2""»]|[«4""»]|[-12-]} <MI 21256 MOVE.L (A6+0x14),-(A7)> Δ-4 {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x14)']} <Call 0x2125a 0x102cc> {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x14)']} StringDup(a : String) : String <Lit 0x21260 2> {[«2""»]|[«4""»]|[-12-]|[$$ []} <MI 2126a MOVE.L (A6+0x10),(A7)> {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x10)']} <POP 21268-2126a StackAdj> Δ-8 {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x10)']|[-8-]} <Call 0x2126e 0x102e4> {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x10)']|[-8-]} Long2String(a : Long) : String <Lit 0x21274 4> {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x10)']|[-4-]|[$$] :_]} <Call 0x21280 0x102d8> {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0x10)']|[-4-]|[$$] :_]} StringCat4(a, b, c, d : String) : String <POP 21286-2128a StackAdj> Δ+16 {[«2""»]|[«4""»]|[-8-]} <Call 0x2128a 0x103e4> {[«2""»]|[«4""»]|[-8-]} AskConsoleString(prompt : String) : String <POP 21290-21292 StackAdj> Δ+4 {[«2""»]|[«4""»]|[-4-]} <MI 21292 MOVE.L (A7)+,(A6-0xa)> Δ+4 {[«2""»]|[«4""»]} <POP 21294-21296 StackAdj> Δ+6 {} <MI 21296 MOVEA.L (A6-0xa),A0> {} <MI 21298 TST.W (A0)> {} <MI 2129a BNE 0x212ae> {} <POP 2129c-212ae Naked> Σ0 →0x212d2 <MI 2129c MOVE.B #0x01,(A6-0xc)> {} <MI 2129e MOVE.L (A6+0x10),(A6-0x6)> {} <Pointer.fp 0x212a2 <LVAR -0x00a @ 4(rw)>> Δ-4 {[@@-10]} <Call 0x212a4 0x102bc> {[@@-10]} FreeString(VAR a : String) <POP 212aa-212ac StackAdj> Δ+4 {} <MI 212ac BRA 0x212d2> {} <POP 212ae-212c0 Naked> Σ0 ↓ →0x212d2 ←0x2124c <MI 212ae MOVE.L (A6-0xa),-(A7)> Δ-4 {[4, '(A6-0xa)']} <Pointer.fp 0x212b0 <LVAR -0x00c @ 1(rw)>> Δ-4 {[4, '(A6-0xa)']|[@@-12]} <Pointer.fp 0x212b2 <LVAR -0x006 @ 4(rw)>> Δ-4 {[4, '(A6-0xa)']|[@@-12]|[@@-6]} <Call 0x212b4 0x102ec> {[4, '(A6-0xa)']|[@@-12]|[@@-6]} String2Long(src : String; VAR status : Bool; VAR retval : Long) <POP 212ba-212bc StackAdj> Δ+12 {} <MI 212bc TST.B (A6-0xc)> {} <MI 212be BEQ 0x212d2> {} <POP 212c0-212ca Naked> Σ0 ↓ →0x212d2 <MI 212c0 CLR.B (A6-0xc)> {} <MI 212c2 MOVE.L (A6-0x6),D0> {} <MI 212c4 CMP.L (A6+0xc),D0> {} <MI 212c8 BLT 0x212d2> {} <POP 212ca-212d0 Naked> Σ0 ↓ →0x212d2 <MI 212ca CMP.L (A6+0x8),D0> {} <MI 212ce BGT 0x212d2> {} <POP 212d0-212d2 Naked> Σ0 ↓ <MI 212d0 ADDQ.B #0x1,(A6-0xc)> {} <POP 212d2-212d6 Naked> Σ0 ↓ →0x21336 ←0x2129c ←0x212ae ←0x212c0 ←0x212ca <MI 212d2 TST.B (A6-0xc)> {} <MI 212d4 BNE 0x21336> {} <POP 212d6-21336 Naked> Σ0 ↓ <Blob 0x212d6 [38] @> Δ-38 {[«38""»]} <Blob 0x212e2 [4] @> Δ-4 {[«38""»]|[«4""»]} <Blob 0x212e6 [2] @> Δ-2 {[«38""»]|[«4""»]|[«2""»]} <POP 212ea-212ec StackAdj> Δ-8 {[«38""»]|[«4""»]|[«2""»]|[-8-]} <Lit 0x212ec 38> {[«38""»]|[«4""»]|[«2""»]|[-4-]|[$$Please enter an integer in the range []} <MI 212f8 MOVE.L (A6+0xc),(A7)> {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']} <POP 212f6-212f8 StackAdj> Δ-8 {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-8-]} <Call 0x212fc 0x102e4> {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-8-]} Long2String(a : Long) : String <Lit 0x21302 4> {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[$$ .._]} <MI 2130c MOVE.L (A6+0x8),(A7)> {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']} <POP 2130a-2130c StackAdj> Δ-8 {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-8-]} <Call 0x21310 0x102e4> {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-8-]} Long2String(a : Long) : String <Lit 0x21316 2> {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-4-]|[$$] ]} <Call 0x21322 0x102dc> {[«38""»]|[«4""»]|[«2""»]|[-4-]|[4, '(A6+0xc)']|[-4-]|[4, '(A6+0x8)']|[-4-]|[$$] ]} StringCat5(a, b, c, d, e : String) : String <POP 21328-2132c StackAdj> Δ+20 {[«38""»]|[«4""»]|[«2""»]|[-4-]} <Call 0x2132c 0x103e0> {[«38""»]|[«4""»]|[«2""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 21332-21336 StackAdj> Δ+48 {} <POP 21336-2133c Naked> Σ0 ↓ →0x2124c ←0x212d2 <MI 21336 TST.B (A6-0xc)> {} <MI 21338 BEQ 0x2124c> {} <POP 2133c-21358 Naked> Σ0 ↓ <Pointer.fp 0x2133c <LVAR 0x014 @ 4(r)>> Δ-4 {[@@20]} <Call 0x21340 0x102bc> {[@@20]} FreeString(VAR a : String) <POP 21346-21348 StackAdj> Δ+4 {} <MI 21348 MOVE.L (A6-0x6),D0> {} <POP 0x2134a LimitCheck 0x0 ≤ D0 ≤ 0xffff> {} <MI 21354 MOVE.W D0,(A6+0x18)> {} <POP 21358-21360 Epilogue> Σ0
@ 21360 <LVAR 0x00c 4(r)> <LVAR 0x008 4(r)> <LVAR -0x007 1(rw)> <LVAR -0x008 1(rw)> <LVAR -0x009 1(rw)> <LVAR -0x00a @ 1(rw)> <LVAR -0x00e @ 4(rw)> <LVAR -0x010 @ 1(rw)> <POP 21360-214c4 Body> <POP 21360-21376 Prologue> Σ0 ↓ <POP 21376-2138c RegCacheLoad> Σ0 ↓ <POP 2138c-213b6 Naked> Σ0 Δ-4 ↓ ←0x2149c <POP 2138c-2138e StackAdj> Δ-4 {[-4-]} <MI 2138e MOVEA.L (A6+0x8),A0> {[-4-]} <POP 21390-21392 StackAdj> Δ-4 {[-8-]} <MI 21392 MOVE.B (A0),(A7)> {[-8-]} <MI 21394 MOVE.B (A0+0x1),(A7+0x1)> {[-8-]} <MI 2139a MOVE.B (A0+0x2),(A7+0x2)> {[-8-]} <MI 213a0 MOVE.B (A0+0x3),(A7+0x3)> {[-8-]} <Call 0x213a6 0x10308> {[-8-]} TimeToText() <POP 213ac-213ae StackAdj> Δ+4 {[-4-]} <MI 213ae MOVE.L (A7)+,(A6-0xe)> Δ+4 {} <MI 213b0 MOVEA.L (A6-0xe),A0> {} <MI 213b2 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']} <MI 213b4 MOVEQ.L #0x0a,D7> {[4, 'A0']} <POP 213b6-213de Naked> Σ-4 ↓ →0x213b6 ←0x213b6 <MI 213b6 MOVE.L D7,D0> {[-4-]} <MI 213b8 SUB.L #0x09,D0> {[-4-]} <MI 213ba SUBQ.L #0x1,D0> {[-4-]} <POP 0x213bc LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-4-]} <MI 213c2 MOVEA.L (A7),A0> {[-4-]} <MI 213c4 MOVE.L D7,D1> {[-4-]} <MI 213c6 SUBQ.L #0x1,D1> {[-4-]} <POP 0x213c8 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-4-]} <MI 213ce MOVE.B (A0+D1.L+#0x2),(A0+D0.L+#0x2)> {[-4-]} <MI 213d4 ADDQ.L #0x1,D7> {[-4-]} <MI 213d6 CMPI.L #0x00000012,D7> {[-4-]} <MI 213dc BLE 0x213b6> {[-4-]} <POP 213de-21434 Naked> Σ-4 Δ+4 ↓ →0x2145c <MI 213de MOVEA.L (A7),A0> {[-4-]} <MI 213e0 MOVE.W #0x09,(A0)> {[-4-]} <POP 213e2-213e4 StackAdj> Δ+2 {[-2-]} <POP 213e4-213e5 StackAdj> Δ+2 {} <Blob 0x213e5 [2] @> Δ-2 {[«2""»]} <Blob 0x213e8 [4] @> Δ-4 {[«2""»]|[«4""»]} <POP 213ec-213ee StackAdj> Δ-12 {[«2""»]|[«4""»]|[-12-]} <MI 213ee MOVE.L (A6+0xc),-(A7)> Δ-4 {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0xc)']} <Call 0x213f2 0x102cc> {[«2""»]|[«4""»]|[-12-]|[4, '(A6+0xc)']} StringDup(a : String) : String <Lit 0x213f8 2> {[«2""»]|[«4""»]|[-12-]|[$$ []} <POP 21404-21406 StackAdj> Δ-4 {[«2""»]|[«4""»]|[-12-]|[$$ []|[-4-]} <MI 21406 MOVE.L (A6-0xe),(A7)> {[«2""»]|[«4""»]|[-12-]|[$$ []|[4, '(A6-0xe)']} <POP 21408-2140a StackAdj> Δ-4 {[«2""»]|[«4""»]|[-12-]|[$$ []|[4, '(A6-0xe)']|[-4-]} <Lit 0x2140a 4> {[«2""»]|[«4""»]|[-12-]|[$$ []|[4, '(A6-0xe)']|[$$] :_]} <Call 0x21418 0x102d8> {[«2""»]|[«4""»]|[-12-]|[$$ []|[4, '(A6-0xe)']|[$$] :_]} StringCat4(a, b, c, d : String) : String <POP 2141e-21422 StackAdj> Δ+16 {[«2""»]|[«4""»]|[-8-]} <Call 0x21422 0x103e4> {[«2""»]|[«4""»]|[-8-]} AskConsoleString(prompt : String) : String <POP 21428-2142a StackAdj> Δ+4 {[«2""»]|[«4""»]|[-4-]} <MI 2142a MOVE.L (A7)+,(A6-0xe)> Δ+4 {[«2""»]|[«4""»]} <POP 2142c-2142e StackAdj> Δ+6 {} <MI 2142e MOVEA.L (A6-0xe),A0> {} <MI 21430 TST.W (A0)> {} <MI 21432 BNE 0x2145c> {} <POP 21434-2145c Naked> Σ0 →0x2149c <Pointer.fp 0x21434 <LVAR -0x00e @ 4(rw)>> Δ-4 {[@@-14]} <Call 0x21436 0x102bc> {[@@-14]} FreeString(VAR a : String) <POP 2143c-2143e StackAdj> Δ+4 {} <MI 2143e MOVEA.L (A6+0x8),A0> {} <MI 21440 MOVE.B (A0),(A6-0xa)> {} <MI 21444 MOVE.B (A0+0x1),(A6-0x9)> {} <MI 2144a MOVE.B (A0+0x2),(A6-0x8)> {} <MI 21450 MOVE.B (A0+0x3),(A6-0x7)> {} <MI 21456 MOVE.B #0x01,(A6-0x10)> {} <MI 2145a BRA 0x2149c> {} <POP 2145c-2149c Naked> Σ0 ↓ ←0x213de <Blob 0x2145c [10] @> Δ-10 {[«10""»]} <POP 2146e-21470 StackAdj> Δ-8 {[«10""»]|[-8-]} <Lit 0x21470 9> {[«10""»]|[-4-]|[$$00:00:00_]} <POP 2147a-2147c StackAdj> Δ-4 {[«10""»]|[-4-]|[$$00:00:00_]|[-4-]} <MI 2147c MOVE.L (A6-0xe),(A7)> {[«10""»]|[-4-]|[$$00:00:00_]|[4, '(A6-0xe)']} <Call 0x2147e 0x102d0> {[«10""»]|[-4-]|[$$00:00:00_]|[4, '(A6-0xe)']} StringCat2(a, b : String) : String <POP 21484-21486 StackAdj> Δ+8 {[«10""»]|[-4-]} <MI 21486 MOVE.L (A7)+,(A6-0xe)> Δ+4 {[«10""»]} <POP 21488-2148a StackAdj> Δ+6 {[-4-]} <MI 2148a MOVE.L (A6-0xe),(A7)> {[4, '(A6-0xe)']} <Pointer.fp 0x2148c <LVAR -0x00a @ 1(rw)>> Δ-4 {[4, '(A6-0xe)']|[@@-10]} <Pointer.fp 0x21490 <LVAR -0x010 @ 1(rw)>> Δ-4 {[4, '(A6-0xe)']|[@@-10]|[@@-16]} <Call 0x21494 0x10310> {[4, '(A6-0xe)']|[@@-10]|[@@-16]} ConvertTimestamp(MOD input : String; b : L; VAR status : Bool) <POP 2149a-2149c StackAdj> Δ+12 {} <POP 2149c-214a4 Naked> Σ0 ↓ →0x2138c ←0x21434 <MI 2149c TST.B (A6-0x10)> {} <MI 214a0 BEQ 0x2138c> {} <POP 214a4-214bc Naked> Σ0 ↓ <MI 214a4 MOVEA.L (A6+0x8),A0> {} <MI 214a6 MOVE.B (A6-0xa),(A0)> {} <MI 214aa MOVE.B (A6-0x9),(A0+0x1)> {} <MI 214b0 MOVE.B (A6-0x8),(A0+0x2)> {} <MI 214b6 MOVE.B (A6-0x7),(A0+0x3)> {} <POP 214bc-214c4 Epilogue> Σ0
@ 214c4 <LVAR 0x008 1(r)> <POP 214c4-216ec Body> <POP 214c4-214da Prologue> Σ0 ↓ <POP 214da-214f4 RegCacheLoad> Σ0 ↓ <POP 214f4-21506 Naked> Σ0 ↓ →0x215c8 <MI 214f4 MOVE.B (A6+0x8),D0> {} <MI 214f8 EXTB.W D0> {} <MI 214fa MOVEQ.L #0x0e,D1> {} <MI 214fc MULS.W D0,D1> {} <MI 214fe TST.B (A5+D1.W+#0x24)> {} <MI 21502 BNE 0x215c8> {} <POP 21506-2154c Naked> Σ0 ↓ →0x21558 <Blob 0x21506 [64] @> Δ-64 {[«64""»]} <POP 21518-2151a StackAdj> Δ-8 {[«64""»]|[-8-]} <MI 2151a MOVE.B D0,-(A7)> Δ-2 {[«64""»]|[-8-]|[2, 'D0']} <Call 0x2151c 0x2069c> {[«64""»]|[-8-]|[2, 'D0']} <POP 21520-21522 StackAdj> Δ-2 {[«64""»]|[-8-]|[2, 'D0']|[-2-]} <Lit 0x21522 63> {[«64""»]|[-8-]|[$$ NOVRAM checksum error, enter new data, defaults are best guess]} <Call 0x21530 0x102d0> {[«64""»]|[-8-]|[$$ NOVRAM checksum error, enter new data, defaults are best guess]} StringCat2(a, b : String) : String <POP 21536-21538 StackAdj> Δ+8 {[«64""»]|[-4-]} <Call 0x21538 0x103e0> {[«64""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 2153e-21542 StackAdj> Δ+66 {[-2-]} <Call 0x21542 0x1060a> {[-2-]} Is_machine_type_four() : Bool <MI 21548 TST.B (A7)+> Δ+2 {} <MI 2154a BNE 0x21558> {} <POP 2154c-21558 Naked> Σ0 ↓ →0x21574 <POP 2154c-2154e StackAdj> Δ-2 {[-2-]} <Call 0x2154e 0x10604> {[-2-]} Is_machine_type_three() : Bool <MI 21554 TST.B (A7)+> Δ+2 {} <MI 21556 BEQ 0x21574> {} <POP 21558-21574 Naked> Σ0 →0x215b2 ←0x21506 <MI 21558 ASL.W #0x1,D0> {} <MI 2155a LEA.L 0x205ca,A0> {} <MI 2155e MOVE.W (A0+D0.W),(A5+D1.W+#0x18)> {} <MI 21564 LEA.L 0x205ea,A0> {} <MI 21568 MOVE.W (A0+D0.W),(A5+D1.W+#0x1c)> {} <MI 2156e LEA.L 0x2060a,A0> {} <MI 21572 BRA 0x215b2> {} <POP 21574-2157a Naked> Σ0 ↓ →0x21598 ←0x2154c <MI 21574 CMPI.B #0x0c,D0> {} <MI 21578 BLT 0x21598> {} <POP 2157a-21586 Naked> Σ0 ↓ →0x21598 <POP 2157a-2157c StackAdj> Δ-2 {[-2-]} <Call 0x2157c 0x104cc> {[-2-]} MemOnly2MB() : Bool <MI 21582 TST.B (A7)+> Δ+2 {} <MI 21584 BNE 0x21598> {} <POP 21586-21598 Naked> Σ0 →0x215b8 <MI 21586 MOVE.W #0x7,(A5+D1.W+#0x18)> {} <MI 2158c MOVE.W #0x2,(A5+D1.W+#0x1c)> {} <MI 21592 CLR.W (A5+D1.W+#0x1e)> {} <MI 21596 BRA 0x215b8> {} <POP 21598-215b2 Naked> Σ0 ↓ ←0x21574 ←0x2157a <MI 21598 ASL.W #0x1,D0> {} <MI 2159a LEA.L 0x2056a,A0> {} <MI 2159e MOVE.W (A0+D0.W),(A5+D1.W+#0x18)> {} <MI 215a4 LEA.L 0x2058a,A0> {} <MI 215a8 MOVE.W (A0+D0.W),(A5+D1.W+#0x1c)> {} <MI 215ae LEA.L 0x205aa,A0> {} <POP 215b2-215b8 Naked> Σ0 ↓ ←0x21558 <MI 215b2 MOVE.W (A0+D0.W),(A5+D1.W+#0x1e)> {} <POP 215b8-215c8 Naked> Σ0 ↓ ←0x21586 <MI 215b8 CLR.W (A5+D1.W+#0x1a)> {} <MI 215bc PEA.L (A5+D1.W+#0x20)> Δ-4 {[4, '^(A5+D1.W+#0x20)']} <Call 0x215c0 0x10304> {[4, '^(A5+D1.W+#0x20)']} GetRtc() : TimeStamp <POP 215c6-215c8 StackAdj> Δ+4 {} <POP 215c8-216e4 Naked> Σ0 ↓ ←0x214f4 <Blob 0x215c8 [18] @> Δ-18 {[«18""»]} <POP 215d8-215da StackAdj> Δ-6 {[«18""»]|[-6-]} <Lit 0x215da 17> {[«18""»]|[-2-]|[$$Enter part number]} <MI 215e8 MOVE.W (A5+D1.W+#0x18),D0> {[«18""»]|[-2-]|[$$Enter part number]} <MI 215ec EXTW.L D0> {[«18""»]|[-2-]|[$$Enter part number]} <MI 215ee MOVE.L D0,-(A7)> Δ-4 {[«18""»]|[-2-]|[$$Enter part number]|[4, 'D0']} <Const 0x215f0 0x0.4> Δ-4 {[«18""»]|[-2-]|[$$Enter part number]|[4, 'D0']|[##0]} <Const 0x215f2 0xff.4> Δ-4 {[«18""»]|[-2-]|[$$Enter part number]|[4, 'D0']|[##0]|[##255]} <Call 0x215f6 0x2121c> {[«18""»]|[-2-]|[$$Enter part number]|[4, 'D0']|[##0]|[##255]} <POP 215f8-215fa StackAdj> Δ+16 {[«18""»]|[-2-]} <MI 215fa MOVE.W (A7)+,D0> Δ+2 {[«18""»]} <POP 0x215fc LimitCheck 0x0 ≤ D0 ≤ 0xff> {[«18""»]} <POP 215fe-21600 StackAdj> Δ+18 {} <MI 21600 MOVE.W D0,(A5+D1.W+#0x18)> {} <Blob 0x21604 [20] @> Δ-20 {[«20""»]} <POP 21614-21616 StackAdj> Δ-6 {[«20""»]|[-6-]} <Lit 0x21616 19> {[«20""»]|[-2-]|[$$Enter serial number]} <MI 21624 CLR.L D0> {[«20""»]|[-2-]|[$$Enter serial number]} <MI 21626 MOVE.W (A5+D1.W+#0x1a),D0> {[«20""»]|[-2-]|[$$Enter serial number]} <MI 2162a MOVE.L D0,-(A7)> Δ-4 {[«20""»]|[-2-]|[$$Enter serial number]|[4, 'D0']} <Const 0x2162c 0x0.4> Δ-4 {[«20""»]|[-2-]|[$$Enter serial number]|[4, 'D0']|[##0]} <Const 0x2162e 0x7fff.4> Δ-4 {[«20""»]|[-2-]|[$$Enter serial number]|[4, 'D0']|[##0]|[##32767]} <Call 0x21632 0x2121c> {[«20""»]|[-2-]|[$$Enter serial number]|[4, 'D0']|[##0]|[##32767]} <POP 21634-21636 StackAdj> Δ+16 {[«20""»]|[-2-]} <MI 21636 MOVE.W (A7)+,(A5+D1.W+#0x1a)> Δ+2 {[«20""»]} <POP 2163a-2163c StackAdj> Δ+20 {} <Blob 0x2163c [22] @> Δ-22 {[«22""»]} <POP 21648-2164a StackAdj> Δ-6 {[«22""»]|[-6-]} <Lit 0x2164a 22> {[«22""»]|[-2-]|[$$Enter artwork revision]} <MI 21658 MOVE.W (A5+D1.W+#0x1c),D0> {[«22""»]|[-2-]|[$$Enter artwork revision]} <MI 2165c EXTW.L D0> {[«22""»]|[-2-]|[$$Enter artwork revision]} <MI 2165e MOVE.L D0,-(A7)> Δ-4 {[«22""»]|[-2-]|[$$Enter artwork revision]|[4, 'D0']} <Const 0x21660 0x0.4> Δ-4 {[«22""»]|[-2-]|[$$Enter artwork revision]|[4, 'D0']|[##0]} <Const 0x21662 0xff.4> Δ-4 {[«22""»]|[-2-]|[$$Enter artwork revision]|[4, 'D0']|[##0]|[##255]} <Call 0x21666 0x2121c> {[«22""»]|[-2-]|[$$Enter artwork revision]|[4, 'D0']|[##0]|[##255]} <POP 21668-2166a StackAdj> Δ+16 {[«22""»]|[-2-]} <MI 2166a MOVE.W (A7)+,D0> Δ+2 {[«22""»]} <POP 0x2166c LimitCheck 0x0 ≤ D0 ≤ 0xff> {[«22""»]} <POP 2166e-21672 StackAdj> Δ+22 {} <MI 21672 MOVE.W D0,(A5+D1.W+#0x1c)> {} <Blob 0x21676 [16] @> Δ-16 {[«16""»]} <POP 21686-21688 StackAdj> Δ-6 {[«16""»]|[-6-]} <Lit 0x21688 15> {[«16""»]|[-2-]|[$$Enter ECO level]} <MI 21696 MOVE.W (A5+D1.W+#0x1e),D0> {[«16""»]|[-2-]|[$$Enter ECO level]} <MI 2169a EXTW.L D0> {[«16""»]|[-2-]|[$$Enter ECO level]} <MI 2169c MOVE.L D0,-(A7)> Δ-4 {[«16""»]|[-2-]|[$$Enter ECO level]|[4, 'D0']} <Const 0x2169e 0x0.4> Δ-4 {[«16""»]|[-2-]|[$$Enter ECO level]|[4, 'D0']|[##0]} <Const 0x216a0 0xff.4> Δ-4 {[«16""»]|[-2-]|[$$Enter ECO level]|[4, 'D0']|[##0]|[##255]} <Call 0x216a4 0x2121c> {[«16""»]|[-2-]|[$$Enter ECO level]|[4, 'D0']|[##0]|[##255]} <POP 216a6-216a8 StackAdj> Δ+16 {[«16""»]|[-2-]} <MI 216a8 MOVE.W (A7)+,D0> Δ+2 {[«16""»]} <POP 0x216aa LimitCheck 0x0 ≤ D0 ≤ 0xff> {[«16""»]} <POP 216ac-216ae StackAdj> Δ+16 {} <MI 216ae MOVE.W D0,(A5+D1.W+#0x1e)> {} <Blob 0x216b2 [30] @> Δ-30 {[«30""»]} <POP 216c4-216c6 StackAdj> Δ-4 {[«30""»]|[-4-]} <Lit 0x216c6 29> {[«30""»]|[$$Enter build date as DD-MMM-YY]} <MI 216d4 PEA.L (A5+D1.W+#0x20)> Δ-4 {[«30""»]|[$$Enter build date as DD-MMM-YY]|[4, '^(A5+D1.W+#0x20)']} <Call 0x216d8 0x21360> {[«30""»]|[$$Enter build date as DD-MMM-YY]|[4, '^(A5+D1.W+#0x20)']} <POP 216dc-216e0 StackAdj> Δ+38 {} <MI 216e0 MOVE.B #0x01,(A5+D1.W+#0x24)> {} <POP 216e4-216ec Epilogue> Σ0
@ 216ec <POP 216ec-21872 Body> <POP 216ec-21702 Prologue> Σ0 ↓ <POP 21702-21716 RegCacheLoad> Σ0 ↓ <POP 21716-217c8 Naked> Σ0 ↓ →0x217d4 <Blob 0x21716 [12] @> Δ-12 {[«12""»]} <POP 21726-21728 StackAdj> Δ-4 {[«12""»]|[-4-]} <Lit 0x21728 11> {[«12""»]|[$$Boards are:]} <Call 0x21736 0x103e0> {[«12""»]|[$$Boards are:]} WriteConsoleStringCrLf(str : String) <POP 21738-2173a StackAdj> Δ+16 {} <Blob 0x2173a [26] @> Δ-26 {[«26""»]} <POP 21746-21748 StackAdj> Δ-4 {[«26""»]|[-4-]} <Lit 0x21748 26> {[«26""»]|[$$ 0 => TYP 1 => VAL]} <Call 0x21754 0x103e0> {[«26""»]|[$$ 0 => TYP 1 => VAL]} WriteConsoleStringCrLf(str : String) <POP 21756-2175a StackAdj> Δ+30 {} <Blob 0x2175a [26] @> Δ-26 {[«26""»]} <POP 21766-21768 StackAdj> Δ-4 {[«26""»]|[-4-]} <Lit 0x21768 26> {[«26""»]|[$$ 2 => SEQ 3 => FIU]} <Call 0x21774 0x103e0> {[«26""»]|[$$ 2 => SEQ 3 => FIU]} WriteConsoleStringCrLf(str : String) <POP 21776-21777 StackAdj> Δ+30 ↓ {} <Blob 0x21777 [28] @> Δ-28 {[«28""»]} <POP 21786-21788 StackAdj> Δ-4 {[«28""»]|[-4-]} <Lit 0x21788 27> {[«28""»]|[$$ 4 => MEM0 5 => MEM1]} <Call 0x21796 0x103e0> {[«28""»]|[$$ 4 => MEM0 5 => MEM1]} WriteConsoleStringCrLf(str : String) <POP 21798-21799 StackAdj> Δ+32 ↓ {} <Blob 0x21799 [28] @> Δ-28 {[«28""»]} <POP 217a8-217aa StackAdj> Δ-4 {[«28""»]|[-4-]} <Lit 0x217aa 27> {[«28""»]|[$$ 6 => MEM2 7 => MEM3]} <Call 0x217b8 0x103e0> {[«28""»]|[$$ 6 => MEM2 7 => MEM3]} WriteConsoleStringCrLf(str : String) <POP 217ba-217be StackAdj> Δ+30 {[-2-]} <Call 0x217be 0x1060a> {[-2-]} Is_machine_type_four() : Bool <MI 217c4 TST.B (A7)+> Δ+2 {} <MI 217c6 BNE 0x217d4> {} <POP 217c8-217d4 Naked> Σ0 ↓ →0x217fa <POP 217c8-217ca StackAdj> Δ-2 {[-2-]} <Call 0x217ca 0x10604> {[-2-]} Is_machine_type_three() : Bool <MI 217d0 TST.B (A7)+> Δ+2 {} <MI 217d2 BEQ 0x217fa> {} <POP 217d4-217fa Naked> Σ0 →0x2181a ←0x21716 <Blob 0x217d4 [28] @> Δ-28 {[«28""»]} <POP 217e0-217e2 StackAdj> Δ-4 {[«28""»]|[-4-]} <Lit 0x217e2 28> {[«28""»]|[$$ 8 => IOC 9 => RESHA]} <Call 0x217f0 0x103e0> {[«28""»]|[$$ 8 => IOC 9 => RESHA]} WriteConsoleStringCrLf(str : String) <POP 217f2-217f6 StackAdj> Δ+32 {} <MI 217f6 MOVEQ.L #0x09,D7> {} <MI 217f8 BRA 0x2181a> {} <POP 217fa-2181a Naked> Σ0 ↓ ←0x217c8 <Blob 0x217fa [4] @> Δ-4 {[«4""»]} <Blob 0x217fe [4] @> Δ-4 {[«4""»]|[«4""»]} <Blob 0x21802 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]} <POP 21806-21808 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]} <Lit 0x21808 12> {[«4""»]|[«4""»]|[«4""»]|[$$ 8 => IOC]} <Call 0x21814 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[$$ 8 => IOC]} WriteConsoleStringCrLf(str : String) <POP 21816-21818 StackAdj> Δ+16 {} <MI 21818 MOVEQ.L #0x08,D7> {} <POP 2181a-2186a Naked> Σ0 ↓ ←0x217d4 <Blob 0x2181a [14] @> Δ-14 {[«14""»]} <POP 21826-21828 StackAdj> Δ-8 {[«14""»]|[-8-]} <Lit 0x21828 14> {[«14""»]|[-4-]|[$$Enter board :_]} <Const 0x21836 0x0.4> Δ-4 {[«14""»]|[-4-]|[$$Enter board :_]|[##0]} <MI 2183a MOVE.L D7,-(A7)> Δ-4 {[«14""»]|[-4-]|[$$Enter board :_]|[##0]|[4, 'D7']} <Call 0x2183c 0x103ec> {[«14""»]|[-4-]|[$$Enter board :_]|[##0]|[4, 'D7']} AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long <POP 21842-21844 StackAdj> Δ+12 {[«14""»]|[-4-]} <MI 21844 MOVE.L (A7)+,D6> Δ+4 {[«14""»]} <POP 21846-2184a StackAdj> Δ+14 {} <POP 0x2184a LimitCheck 0x0 ≤ D6 ≤ 0x9> {} <MI 21854 LEA.L 0x2062a,A0> {} <MI 21858 MOVE.B (A0+D6.L),D5> {} <MI 2185c MOVE.B D5,-(A7)> Δ-2 {[2, 'D5']} <Call 0x2185e 0x214c4> {[2, 'D5']} <MI 21862 MOVE.B D5,(A7)> {[-2-]} <Call 0x21864 0x21050> {[-2-]} <POP 21868-2186a StackAdj> Δ+2 {} <POP 2186a-21872 Epilogue> Σ0
@ 21872 <POP 21872-21922 Body> <POP 21872-21888 Prologue> Σ0 ↓ <POP 21888-21890 RegCacheLoad> Σ0 ↓ <POP 21890-218d6 Naked> Σ0 ↓ →0x21902 <Blob 0x21890 [32] @> Δ-32 {[«32""»]} <POP 2189c-2189e StackAdj> Δ-6 {[«32""»]|[-6-]} <Lit 0x2189e 32> {[«32""»]|[-2-]|[$$Enter TCP/IP board serial number]} <POP 218ac-218ae StackAdj> Δ-4 {[«32""»]|[-2-]|[$$Enter TCP/IP board serial number]|[-4-]} <MI 218ae MOVE.L (A5+0xf8),(A7)> {[«32""»]|[-2-]|[$$Enter TCP/IP board serial number]|[4, '(A5+0xf8)']} <Const 0x218b0 0x0.4> Δ-4 {[«32""»]|[-2-]|[$$Enter TCP/IP board serial number]|[4, '(A5+0xf8)']|[##0]} <Const 0x218b4 0xf423f.4> Δ-4 {[«32""»]|[-2-]|[$$Enter TCP/IP board serial number]|[4, '(A5+0xf8)']|[##0]|[##999999]} <Call 0x218ba 0x2121c> {[«32""»]|[-2-]|[$$Enter TCP/IP board serial number]|[4, '(A5+0xf8)']|[##0]|[##999999]} <POP 218be-218c2 StackAdj> Δ+16 {[«32""»]|[-2-]} <MI 218c2 CLR.L D0> {[«32""»]|[-2-]} <MI 218c4 MOVE.W (A7)+,D0> Δ+2 {[«32""»]} <MI 218c6 MOVE.L D0,(A5+0xf8)> {[«32""»]} <POP 218c8-218cc StackAdj> Δ+28 {[-4-]} <Call 0x218cc 0x2204e> {[-4-]} <MI 218d2 MOVE.L (A7)+,D7> Δ+4 {} <MI 218d4 BNE 0x21902> {} <POP 218d6-21902 Naked> Σ0 ↓ <Blob 0x218d6 [26] @> Δ-26 {[«26""»]} <Const 0x218e2 0xe.2> Δ-2 {[«26""»]|[#14]} <POP 218e6-218e8 StackAdj> Δ-4 {[«26""»]|[#14]|[-4-]} <Lit 0x218e8 26> {[«26""»]|[#14]|[$$invalid TCP board info ptr]} <Call 0x218fa 0x103b8> {[«26""»]|[#14]|[$$invalid TCP board info ptr]} PopProgram(status : Byte; msg : String) <POP 21900-21902 StackAdj> Δ+32 {} <POP 21902-2191a Naked> Σ0 ↓ ←0x21890 <MI 21902 LEA.L (A5+0xf8),A0> {} <MI 21904 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']} <MI 21906 MOVE.L D7,-(A7)> Δ-4 {[4, 'A0']|[4, 'D7']} <Const 0x21908 0x4.2> Δ-2 {[4, 'A0']|[4, 'D7']|[#4]} <Call 0x2190c 0x10238> {[4, 'A0']|[4, 'D7']|[#4]} KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) <POP 21912-21916 StackAdj> Δ+10 {} <Call 0x21916 0x20d8c> {} <POP 2191a-21922 Epilogue> Σ0
@ 21922 <LVAR 0x008 1(r)> <LVAR -0x00a @ 4(rw)> <POP 21922-21a54 Body> <POP 21922-21938 Prologue> Σ0 ↓ <POP 21938-2194a RegCacheLoad> Σ0 ↓ <POP 2194a-2196e Naked> Σ0 ↓ →0x219a2 <POP 2194a-2194c StackAdj> Δ-8 {[-8-]} <MI 2194c MOVE.B (A6+0x8),-(A7)> Δ-2 {[-8-]|[2, '(A6+0x8)']} <Call 0x21950 0x2069c> {[-8-]|[2, '(A6+0x8)']} <POP 21954-21956 StackAdj> Δ+2 {[-8-]} <Const 0x21956 0x8.4> Δ-4 {[-8-]|[##8]} <Call 0x2195a 0x102f8> {[-8-]|[##8]} LeftPad(a : String; b : Long) : String <POP 2195c-2195e StackAdj> Δ+8 {[-4-]} <MI 2195e MOVEA.L (A7)+,A4> Δ+4 {} <MI 21960 MOVE.B (A6+0x8),D0> {} <MI 21964 EXTB.W D0> {} <MI 21966 MULS.W #0x0e,D0> {} <MI 21968 TST.B (A5+D0.W+#0x24)> {} <MI 2196c BNE 0x219a2> {} <POP 2196e-219a2 Naked> Σ0 →0x21a42 <Blob 0x2196e [14] @> Δ-14 {[«14""»]} <POP 2197a-2197c StackAdj> Δ-4 {[«14""»]|[-4-]} <MI 2197c MOVE.L A4,-(A7)> Δ-4 {[«14""»]|[-4-]|[4, 'A4']} <POP 2197e-21980 StackAdj> Δ-4 {[«14""»]|[-4-]|[4, 'A4']|[-4-]} <Lit 0x21980 14> {[«14""»]|[-4-]|[4, 'A4']|[$$Checksum error]} <Call 0x21992 0x102d0> {[«14""»]|[-4-]|[4, 'A4']|[$$Checksum error]} StringCat2(a, b : String) : String <POP 21998-2199a StackAdj> Δ+8 {[«14""»]|[-4-]} <MI 2199a MOVEA.L (A7)+,A4> Δ+4 {[«14""»]} <POP 2199c-2199e StackAdj> Δ+14 {} <MI 2199e BRA 0x21a42> {} <POP 219a2-21a10 Naked> Σ0 ↓ ←0x2194a <POP 219a2-219a4 StackAdj> Δ-4 {[-4-]} <MI 219a4 MOVE.L A4,-(A7)> Δ-4 {[-4-]|[4, 'A4']} <POP 219a6-219a8 StackAdj> Δ-8 {[-4-]|[4, 'A4']|[-8-]} <MI 219a8 MOVE.W (A5+D0.W+#0x18),D1> {[-4-]|[4, 'A4']|[-8-]} <MI 219ac EXTW.L D1> {[-4-]|[4, 'A4']|[-8-]} <MI 219ae MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'A4']|[-8-]|[4, 'D1']} <Call 0x219b0 0x102e4> {[-4-]|[4, 'A4']|[-8-]|[4, 'D1']} Long2String(a : Long) : String <POP 219b2-219b4 StackAdj> Δ+4 {[-4-]|[4, 'A4']|[-8-]} <Const 0x219b4 0x8.4> Δ-4 {[-4-]|[4, 'A4']|[-8-]|[##8]} <Call 0x219b8 0x102f8> {[-4-]|[4, 'A4']|[-8-]|[##8]} LeftPad(a : String; b : Long) : String <MI 219ba CLR.L D1> {[-4-]|[4, 'A4']|[-8-]|[##8]} <MI 219bc MOVE.W (A5+D0.W+#0x1a),D1> {[-4-]|[4, 'A4']|[-8-]|[##8]} <MI 219c0 MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'A4']|[-8-]|[##8]|[4, 'D1']} <Call 0x219c2 0x102e4> {[-4-]|[4, 'A4']|[-8-]|[##8]|[4, 'D1']} Long2String(a : Long) : String <POP 219c4-219c6 StackAdj> Δ+4 {[-4-]|[4, 'A4']|[-8-]|[##8]} <Const 0x219c6 0x9.4> Δ-4 {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]} <Call 0x219ca 0x102f8> {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]} LeftPad(a : String; b : Long) : String <MI 219cc MOVE.W (A5+D0.W+#0x1c),D1> {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]} <MI 219d0 EXTW.L D1> {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]} <MI 219d2 MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[4, 'D1']} <Call 0x219d4 0x102e4> {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[4, 'D1']} Long2String(a : Long) : String <POP 219d6-219d8 StackAdj> Δ+4 {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]} <Const 0x219d8 0x9.4> Δ-4 {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]} <Call 0x219dc 0x102f8> {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]} LeftPad(a : String; b : Long) : String <MI 219de MOVE.W (A5+D0.W+#0x1e),D1> {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]} <MI 219e2 EXTW.L D1> {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]} <MI 219e4 MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]|[4, 'D1']} <Call 0x219e6 0x102e4> {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]|[4, 'D1']} Long2String(a : Long) : String <POP 219e8-219ea StackAdj> Δ+4 {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]} <Const 0x219ea 0x7.4> Δ-4 {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]|[##7]} <Call 0x219ee 0x102f8> {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]|[##9]|[##7]} LeftPad(a : String; b : Long) : String <POP 219f0-219f2 StackAdj> Δ+8 {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]} <Call 0x219f2 0x102dc> {[-4-]|[4, 'A4']|[-8-]|[##8]|[##9]} StringCat5(a, b, c, d, e : String) : String <POP 219f8-219fc StackAdj> Δ+20 {[-4-]} <MI 219fc MOVEA.L (A7)+,A4> Δ+4 {} <POP 219fe-21a00 StackAdj> Δ-4 {[-4-]} <MI 21a00 MOVE.L (A5+D0.W+#0x20),-(A7)> Δ-4 {[-4-]|[4, '(A5+D0.W+#0x20)']} <Call 0x21a04 0x10308> {[-4-]|[4, '(A5+D0.W+#0x20)']} TimeToText() <POP 21a0a-21a0c StackAdj> Δ+4 {[-4-]} <MI 21a0c MOVE.L (A7)+,(A6-0xa)> Δ+4 {} <MI 21a0e MOVEQ.L #0x0a,D7> {} <POP 21a10-21a38 Naked> Σ0 ↓ →0x21a10 ←0x21a10 <MI 21a10 MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']} <MI 21a12 MOVEA.L (A6-0xa),A0> {[4, 'A4']} <MI 21a14 MOVE.L D7,D0> {[4, 'A4']} <MI 21a16 SUBQ.L #0x1,D0> {[4, 'A4']} <POP 0x21a18 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[4, 'A4']} <MI 21a22 MOVE.B (A0+D0.L+#0x2),-(A7)> Δ-2 {[4, 'A4']|[2, '(A0+D0.L+#0x2)']} <Call 0x21a26 0x102c0> {[4, 'A4']|[2, '(A0+D0.L+#0x2)']} AppendChar(MOD b : String; a : char) <POP 21a2c-21a2e StackAdj> Δ+6 {} <MI 21a2e ADDQ.L #0x1,D7> {} <MI 21a30 CMPI.L #0x00000012,D7> {} <MI 21a36 BLE 0x21a10> {} <POP 21a38-21a42 Naked> Σ0 ↓ <Pointer.fp 0x21a38 <LVAR -0x00a @ 4(rw)>> Δ-4 {[@@-10]} <Call 0x21a3a 0x102bc> {[@@-10]} FreeString(VAR a : String) <POP 21a40-21a42 StackAdj> Δ+4 {} <POP 21a42-21a4c Naked> Σ0 ↓ ←0x2196e <MI 21a42 MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']} <Call 0x21a44 0x103e0> {[4, 'A4']} WriteConsoleStringCrLf(str : String) <POP 21a4a-21a4c StackAdj> Δ+4 {} <POP 21a4c-21a54 Epilogue> Σ0
@ 21a54 <POP 21a54-21b60 Body> <POP 21a54-21a6a Prologue> Σ0 ↓ <POP 21a6a-21a7c RegCacheLoad> Σ0 ↓ <POP 21a7c-21ae8 Naked> Σ0 ↓ <Blob 0x21a7c [50] @> Δ-50 {[«50""»]} <POP 21a8e-21a90 StackAdj> Δ-4 {[«50""»]|[-4-]} <Lit 0x21a90 49> {[«50""»]|[$$ Part Serial Artwork ECO Date of]} <Call 0x21a9e 0x103e0> {[«50""»]|[$$ Part Serial Artwork ECO Date of]} WriteConsoleStringCrLf(str : String) <POP 21aa0-21aa1 StackAdj> Δ+54 ↓ {} <Blob 0x21aa1 [52] @> Δ-52 {[«52""»]} <POP 21ab0-21ab2 StackAdj> Δ-4 {[«52""»]|[-4-]} <Lit 0x21ab2 51> {[«52""»]|[$$Board Number Number Revision Level Manufacture]} <Call 0x21ac0 0x103e0> {[«52""»]|[$$Board Number Number Revision Level Manufacture]} WriteConsoleStringCrLf(str : String) <POP 21ac2-21ac6 StackAdj> Δ+54 {[-2-]} <POP 21ac6-21ac7 StackAdj> Δ+2 {} <Const 0x21ac7 0x4.2> Δ-2 {[#4]} <Call 0x21aca 0x21922> {[#4]} <POP 21acc-21acd StackAdj> Δ+2 {} <Const 0x21acd 0x7.2> Δ-2 {[#7]} <Call 0x21ad0 0x21922> {[#7]} <POP 21ad2-21ad3 StackAdj> Δ+2 {} <Const 0x21ad3 0x6.2> Δ-2 {[#6]} <Call 0x21ad6 0x21922> {[#6]} <POP 21ad8-21ad9 StackAdj> Δ+2 {} <Const 0x21ad9 0x2.2> Δ-2 {[#2]} <Call 0x21adc 0x21922> {[#2]} <POP 21ade-21adf StackAdj> Δ+2 {} <Const 0x21adf 0x3.2> Δ-2 {[#3]} <Call 0x21ae2 0x21922> {[#3]} <POP 21ae4-21ae6 StackAdj> Δ+2 {} <MI 21ae6 MOVEQ.L #0x0c,D7> {} <POP 21ae8-21af8 Naked> Σ0 ↓ →0x21afe ←0x21afe <POP 21ae8-21aea StackAdj> Δ-2 {[-2-]} <MI 21aea MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']} <Call 0x21aec 0x104c0> {[-2-]|[2, 'D7']} HasBoard(diproc_addr: Byte) : Byte <POP 21af2-21af4 StackAdj> Δ+2 {[-2-]} <MI 21af4 TST.B (A7)+> Δ+2 {} <MI 21af6 BEQ 0x21afe> {} <POP 21af8-21afe Naked> Σ0 ↓ <MI 21af8 MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']} <Call 0x21afa 0x21922> {[2, 'D7']} <POP 21afc-21afe StackAdj> Δ+2 {} <POP 21afe-21b06 Naked> Σ0 ↓ →0x21ae8 ←0x21ae8 <MI 21afe ADDQ.B #0x1,D7> {} <MI 21b00 CMPI.B #0x0f,D7> {} <MI 21b04 BLE 0x21ae8> {} <POP 21b06-21b12 Naked> Σ0 ↓ →0x21b1e <POP 21b06-21b08 StackAdj> Δ-2 {[-2-]} <Call 0x21b08 0x1060a> {[-2-]} Is_machine_type_four() : Bool <MI 21b0e TST.B (A7)+> Δ+2 {} <MI 21b10 BNE 0x21b1e> {} <POP 21b12-21b1e Naked> Σ0 ↓ →0x21b58 <POP 21b12-21b14 StackAdj> Δ-2 {[-2-]} <Call 0x21b14 0x10604> {[-2-]} Is_machine_type_three() : Bool <MI 21b1a TST.B (A7)+> Δ+2 {} <MI 21b1c BEQ 0x21b58> {} <POP 21b1e-21b58 Naked> Σ0 ↓ ←0x21b06 <MI 21b1e CLR.B -(A7)> Δ-2 {[#0]} <Call 0x21b20 0x21922> {[#0]} <POP 21b22-21b24 StackAdj> Δ+2 {} <Blob 0x21b24 [36] @> Δ-36 {[«36""»]} <POP 21b30-21b32 StackAdj> Δ-8 {[«36""»]|[-8-]} <Lit 0x21b32 36> {[«36""»]|[-4-]|[$$TCP/IP (CMC) board serial number is_]} <MI 21b3e MOVE.L (A5+0xf8),(A7)> {[«36""»]|[-4-]|[4, '(A5+0xf8)']} <POP 21b3c-21b3e StackAdj> Δ-8 {[«36""»]|[-4-]|[4, '(A5+0xf8)']|[-8-]} <Call 0x21b42 0x102e4> {[«36""»]|[-4-]|[4, '(A5+0xf8)']|[-8-]} Long2String(a : Long) : String <POP 21b48-21b4a StackAdj> Δ+4 {[«36""»]|[-4-]|[4, '(A5+0xf8)']|[-4-]} <Call 0x21b4a 0x102d0> {[«36""»]|[-4-]|[4, '(A5+0xf8)']|[-4-]} StringCat2(a, b : String) : String <POP 21b50-21b52 StackAdj> Δ+8 {[«36""»]|[-4-]} <Call 0x21b52 0x103e0> {[«36""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 21b54-21b58 StackAdj> Δ+40 {} <POP 21b58-21b60 Epilogue> Σ0 ←0x21b12
@ 21b60 <POP 21b60-21cb8 Body> <POP 21b60-21b76 Prologue> Σ0 ↓ <POP 21b76-21b8a RegCacheLoad> Σ0 ↓ <POP 21b8a-21c1a Naked> Σ0 ↓ →0x21c26 ←0x21caa <Call 0x21b8a 0x103dc> {} WriteConsoleCrLf(void) <Blob 0x21b90 [4] @> Δ-4 {[«4""»]} <Blob 0x21b94 [4] @> Δ-4 {[«4""»]|[«4""»]} <Blob 0x21b98 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]} <POP 21b9c-21b9e StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]} <Lit 0x21b9e 12> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]} <Call 0x21baa 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]} WriteConsoleStringCrLf(str : String) <POP 21bac-21bae StackAdj> Δ+16 {} <Blob 0x21bae [14] @> Δ-14 {[«14""»]} <POP 21bba-21bbc StackAdj> Δ-4 {[«14""»]|[-4-]} <Lit 0x21bbc 14> {[«14""»]|[$$ 0 => Exit.]} <Call 0x21bca 0x103e0> {[«14""»]|[$$ 0 => Exit.]} WriteConsoleStringCrLf(str : String) <POP 21bcc-21bcd StackAdj> Δ+18 ↓ {} <Blob 0x21bcd [34] @> Δ-34 {[«34""»]} <POP 21bdc-21bde StackAdj> Δ-4 {[«34""»]|[-4-]} <Lit 0x21bde 33> {[«34""»]|[$$ 1 => Display novram contents.]} <Call 0x21bea 0x103e0> {[«34""»]|[$$ 1 => Display novram contents.]} WriteConsoleStringCrLf(str : String) <POP 21bec-21bed StackAdj> Δ+38 ↓ {} <Blob 0x21bed [34] @> Δ-34 {[«34""»]} <POP 21bfc-21bfe StackAdj> Δ-4 {[«34""»]|[-4-]} <Lit 0x21bfe 33> {[«34""»]|[$$ 2 => Modify novram contents.]} <Call 0x21c0a 0x103e0> {[«34""»]|[$$ 2 => Modify novram contents.]} WriteConsoleStringCrLf(str : String) <POP 21c0c-21c10 StackAdj> Δ+36 {[-2-]} <Call 0x21c10 0x1060a> {[-2-]} Is_machine_type_four() : Bool <MI 21c16 TST.B (A7)+> Δ+2 {} <MI 21c18 BNE 0x21c26> {} <POP 21c1a-21c26 Naked> Σ0 ↓ →0x21c52 <POP 21c1a-21c1c StackAdj> Δ-2 {[-2-]} <Call 0x21c1c 0x10604> {[-2-]} Is_machine_type_three() : Bool <MI 21c22 TST.B (A7)+> Δ+2 {} <MI 21c24 BEQ 0x21c52> {} <POP 21c26-21c52 Naked> Σ0 →0x21c54 ←0x21b8a <Blob 0x21c26 [44] @> Δ-44 {[«44""»]} <POP 21c38-21c3a StackAdj> Δ-4 {[«44""»]|[-4-]} <Lit 0x21c3a 43> {[«44""»]|[$$ 3 => Change TCP/IP board serial number.]} <Call 0x21c48 0x103e0> {[«44""»]|[$$ 3 => Change TCP/IP board serial number.]} WriteConsoleStringCrLf(str : String) <POP 21c4a-21c4e StackAdj> Δ+48 {} <MI 21c4e MOVEQ.L #0x03,D7> {} <MI 21c50 BRA 0x21c54> {} <POP 21c52-21c54 Naked> Σ0 ↓ ←0x21c1a <MI 21c52 MOVEQ.L #0x02,D7> {} <POP 21c54-21c8a Naked> Σ0 ↓ →0x21c90 ←0x21c26 <Blob 0x21c54 [16] @> Δ-16 {[«16""»]} <POP 21c64-21c66 StackAdj> Δ-8 {[«16""»]|[-8-]} <Lit 0x21c66 15> {[«16""»]|[-4-]|[$$Enter option :_]} <Const 0x21c74 0x0.4> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]} <MI 21c78 MOVE.L D7,-(A7)> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[4, 'D7']} <Call 0x21c7a 0x103ec> {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[4, 'D7']} AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long <POP 21c80-21c82 StackAdj> Δ+12 {[«16""»]|[-4-]} <MI 21c82 MOVE.L (A7)+,D6> Δ+4 {[«16""»]} <POP 21c84-21c86 StackAdj> Δ+16 {} <MI 21c86 CMP.L #0x01,D6> {} <MI 21c88 BNE 0x21c90> {} <POP 21c8a-21c90 Naked> Σ0 →0x21caa <Call 0x21c8a 0x21a54> {} <MI 21c8e BRA 0x21caa> {} <POP 21c90-21c98 Naked> Σ0 ↓ →0x21c9e ←0x21c54 <MI 21c90 CMPI.L #0x00000002,D6> {} <MI 21c96 BNE 0x21c9e> {} <POP 21c98-21c9e Naked> Σ0 →0x21caa <Call 0x21c98 0x216ec> {} <MI 21c9c BRA 0x21caa> {} <POP 21c9e-21ca6 Naked> Σ0 ↓ →0x21caa ←0x21c90 <MI 21c9e CMPI.L #0x00000003,D6> {} <MI 21ca4 BNE 0x21caa> {} <POP 21ca6-21caa Naked> Σ0 ↓ <Call 0x21ca6 0x21872> {} <POP 21caa-21cb0 Naked> Σ0 ↓ →0x21b8a ←0x21c8a ←0x21c98 ←0x21c9e <MI 21caa TST.L D6> {} <MI 21cac BNE 0x21b8a> {} <POP 21cb0-21cb8 Epilogue> Σ0
@ 21cb8 <LVAR 0x008 1(r)> <LVAR -0x005 @> <LVAR -0x009 @> <LVAR -0x00a @> <LVAR -0x00b @ 1(r)> <LVAR -0x00c 1(r)> <LVAR -0x00d @ 1(r)> <LVAR -0x00e @ 1(r)> <LVAR -0x00f @ 1(r)> <LVAR -0x010 1(r)> <LVAR -0x011 @ 1(r)> <LVAR -0x012 @ 1(r)> <POP 21cb8-21e8c Body> Δ+192 <POP 21cb8-21cce Prologue> Σ0 ↓ <POP 21cce-21ce2 RegCacheLoad> Σ0 ↓ <POP 21ce2-21cf4 Naked> Σ0 ↓ →0x21e84 <MI 21ce2 MOVE.B (A6+0x8),D0> {} <MI 21ce6 EXTB.W D0> {} <MI 21ce8 MOVEQ.L #0x0e,D1> {} <MI 21cea MULS.W D0,D1> {} <MI 21cec TST.B (A5+D1.W+#0x24)> {} <MI 21cf0 BNE 0x21e84> {} <POP 21cf4-21d00 Naked> Σ0 ↓ →0x21e24 <MI 21cf4 MOVE.W D0,D2> {} <MI 21cf6 SUBQ.W #0x2,D2> {} <MI 21cf8 CMPI.W #0x000d,D2> {} <MI 21cfc BHI 0x21e24> {} <POP 21d00-21d0a Naked> Σ0 →0x21dbc →0x21d8c →0x21e24 →0x21e24 →0x21d26 →0x21d5c →0x21e24 →0x21e24 →0x21e24 →0x21e24 →0x21dee →0x21dee →0x21dee →0x21dee <MI 21d00 ADD.W D2,D2> {} <MI 21d02 SWITCH D2.W> {} <POP 21d26-21d54 Naked> Σ0 Δ-64 ↓ ←0x21d00 <Pointer.fp 0x21d26 <LVAR -0x012 @ 1(r)>> Δ-4 {[@@-18]} <Pointer.fp 0x21d28 <LVAR -0x011 @ 1(r)>> Δ-4 {[@@-18]|[@@-17]} <Pointer.fp 0x21d2a <LVAR -0x00f @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]} <Pointer.fp 0x21d2c <LVAR -0x00e @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]} <Pointer.fp 0x21d30 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]} <Pointer.fp 0x21d32 <LVAR -0x009 @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]} <Pointer.fp 0x21d36 <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]} <Pointer.fp 0x21d3a <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]} <Pointer.fp 0x21d3c <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]} <Pointer.fp 0x21d3e <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21d40 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21d42 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21d44 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21d46 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21d48 <LVAR -0x005 @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]} <Pointer.fp 0x21d4c <LVAR -0x00b @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]} <Call 0x21d4e 0x22244> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]} exp_READ_NOVRAM_INFO.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr) <POP 21d54-21d5c Naked> Σ-64 Δ+64 →0x21e26 ←0x21d5c ←0x21d8c ←0x21dbc <POP 21d54-21d58 StackAdj> Δ+64 {} <MI 21d58 BRA 0x21e26> {} <POP 21d5c-21d8c Naked> Σ0 Δ-64 →0x21d54 ←0x21d00 <Pointer.fp 0x21d5c <LVAR -0x012 @ 1(r)>> Δ-4 {[@@-18]} <Pointer.fp 0x21d5e <LVAR -0x011 @ 1(r)>> Δ-4 {[@@-18]|[@@-17]} <Pointer.fp 0x21d60 <LVAR -0x00f @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]} <Pointer.fp 0x21d62 <LVAR -0x00e @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]} <Pointer.fp 0x21d66 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]} <Pointer.fp 0x21d68 <LVAR -0x009 @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]} <Pointer.fp 0x21d6c <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]} <Pointer.fp 0x21d70 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]} <Pointer.fp 0x21d72 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]} <Pointer.fp 0x21d74 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21d76 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21d78 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21d7a <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21d7c <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21d7e <LVAR -0x005 @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]} <Pointer.fp 0x21d82 <LVAR -0x00b @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]} <Call 0x21d84 0x222c6> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]} exp_READ_NOVRAM_INFO.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr) <MI 21d8a BRA 0x21d54> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]} <POP 21d8c-21dbc Naked> Σ0 Δ-64 →0x21d54 ←0x21d00 <Pointer.fp 0x21d8c <LVAR -0x012 @ 1(r)>> Δ-4 {[@@-18]} <Pointer.fp 0x21d8e <LVAR -0x011 @ 1(r)>> Δ-4 {[@@-18]|[@@-17]} <Pointer.fp 0x21d90 <LVAR -0x00f @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]} <Pointer.fp 0x21d92 <LVAR -0x00e @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]} <Pointer.fp 0x21d96 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]} <Pointer.fp 0x21d98 <LVAR -0x009 @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]} <Pointer.fp 0x21d9c <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]} <Pointer.fp 0x21da0 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]} <Pointer.fp 0x21da2 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]} <Pointer.fp 0x21da4 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21da6 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21da8 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21daa <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21dac <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21dae <LVAR -0x005 @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]} <Pointer.fp 0x21db2 <LVAR -0x00b @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]} <Call 0x21db4 0x22118> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]} exp_READ_NOVRAM_INFO.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr) <MI 21dba BRA 0x21d54> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]} <POP 21dbc-21dee Naked> Σ0 Δ-64 →0x21d54 ←0x21d00 <Pointer.fp 0x21dbc <LVAR -0x012 @ 1(r)>> Δ-4 {[@@-18]} <Pointer.fp 0x21dbe <LVAR -0x011 @ 1(r)>> Δ-4 {[@@-18]|[@@-17]} <Pointer.fp 0x21dc0 <LVAR -0x00f @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]} <Pointer.fp 0x21dc2 <LVAR -0x00e @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]} <Pointer.fp 0x21dc6 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]} <Pointer.fp 0x21dc8 <LVAR -0x009 @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]} <Pointer.fp 0x21dcc <LVAR -0x00d @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]} <Pointer.fp 0x21dd0 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]} <Pointer.fp 0x21dd2 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]} <Pointer.fp 0x21dd4 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21dd6 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21dd8 <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21dda <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21ddc <LVAR -0x00a @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21dde <LVAR -0x005 @>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]} <Pointer.fp 0x21de2 <LVAR -0x00b @ 1(r)>> Δ-4 {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]} <Call 0x21de4 0x2219a> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]} exp_READ_NOVRAM_INFO.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr) <MI 21dea BRA 0x21d54> {[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]} <POP 21dee-21e24 Naked> Σ0 →0x21e26 ←0x21d00 ←0x21d00 ←0x21d00 ←0x21d00 <MI 21dee MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']} <Pointer.fp 0x21df0 <LVAR -0x012 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]} <Pointer.fp 0x21df2 <LVAR -0x011 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]} <Pointer.fp 0x21df4 <LVAR -0x00f @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]} <Pointer.fp 0x21df6 <LVAR -0x00e @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]} <Pointer.fp 0x21dfa <LVAR -0x00a @>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]} <Pointer.fp 0x21dfc <LVAR -0x009 @>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]} <Pointer.fp 0x21e00 <LVAR -0x00d @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]} <Pointer.fp 0x21e04 <LVAR -0x00a @>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]} <Pointer.fp 0x21e06 <LVAR -0x00a @>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]} <Pointer.fp 0x21e08 <LVAR -0x00a @>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21e0a <LVAR -0x00a @>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21e0c <LVAR -0x00a @>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21e0e <LVAR -0x00a @>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21e10 <LVAR -0x00a @>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]} <Pointer.fp 0x21e12 <LVAR -0x005 @>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]} <Pointer.fp 0x21e16 <LVAR -0x00b @ 1(r)>> Δ-4 {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]} <Call 0x21e18 0x22560> {[2, 'D0']|[@@-18]|[@@-17]|[@@-15]|[@@-14]|[@@-10]|[@@-9]|[@@-13]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-10]|[@@-5]|[@@-11]} <POP 21e1e-21e22 StackAdj> Δ+66 {} <MI 21e22 BRA 0x21e26> {} <POP 21e24-21e26 Naked> Σ0 ↓ ←0x21cf4 ←0x21d00 ←0x21d00 ←0x21d00 ←0x21d00 ←0x21d00 ←0x21d00 <MI 21e24 CLR.B (A6-0xb)> {} <POP 21e26-21e2a Naked> Σ0 ↓ →0x21e34 ←0x21d54 ←0x21dee <MI 21e26 TST.B (A6-0xb)> {} <MI 21e28 BNE 0x21e34> {} <POP 21e2a-21e34 Naked> Σ0 →0x21e7c <MI 21e2a MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']} <Call 0x21e2c 0x214c4> {[2, 'D0']} <POP 21e30-21e32 StackAdj> Δ+2 {} <MI 21e32 BRA 0x21e7c> {} <POP 21e34-21e7c Naked> Σ0 ↓ ←0x21e26 <MI 21e34 CLR.L D2> {} <MI 21e36 MOVE.B (A6-0x12),D2> {} <MI 21e38 MOVE.W D2,(A5+D1.W+#0x18)> {} <MI 21e3c CLR.L D2> {} <MI 21e3e MOVE.B (A6-0x11),D2> {} <MI 21e40 ASL.W #0x8,D2> {} <MI 21e42 CLR.L D3> {} <MI 21e44 MOVE.B (A6-0x10),D3> {} <MI 21e48 ADD.W D2,D3> {} <MI 21e4a MOVE.W D3,(A5+D1.W+#0x1a)> {} <MI 21e4e CLR.L D2> {} <MI 21e50 MOVE.B (A6-0xf),D2> {} <MI 21e52 MOVE.W D2,(A5+D1.W+#0x1c)> {} <MI 21e56 CLR.L D2> {} <MI 21e58 MOVE.B (A6-0xe),D2> {} <MI 21e5c MOVE.W D2,(A5+D1.W+#0x1e)> {} <POP 21e60-21e62 StackAdj> Δ-2 {[-2-]} <MI 21e62 MOVE.B (A6-0xd),(A7)> {[-2-]} <MI 21e66 MOVE.B (A6-0xc),(A7+0x1)> {[-2-]} <MI 21e6c PEA.L (A5+D1.W+#0x20)> Δ-4 {[-2-]|[4, '^(A5+D1.W+#0x20)']} <Call 0x21e70 0x20634> {[-2-]|[4, '^(A5+D1.W+#0x20)']} <POP 21e74-21e76 StackAdj> Δ+6 {} <MI 21e76 MOVE.B #0x01,(A5+D1.W+#0x24)> {} <POP 21e7c-21e84 Naked> Σ0 ↓ ←0x21e2a <MI 21e7c MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']} <Call 0x21e7e 0x21050> {[2, 'D0']} <POP 21e82-21e84 StackAdj> Δ+2 {} <POP 21e84-21e8c Epilogue> Σ0 ←0x21ce2
@ 21e8c <POP 21e8c-21eee Body> <POP 21e8c-21ea2 Prologue> Σ0 ↓ <POP 21ea2-21ea6 RegCacheLoad> Σ0 ↓ <POP 21ea6-21ec8 Naked> Σ0 ↓ <Const 0x21ea6 0x4.2> Δ-2 {[#4]} <Call 0x21eaa 0x21cb8> {[#4]} <POP 21eac-21ead StackAdj> Δ+2 {} <Const 0x21ead 0x7.2> Δ-2 {[#7]} <Call 0x21eb0 0x21cb8> {[#7]} <POP 21eb2-21eb3 StackAdj> Δ+2 {} <Const 0x21eb3 0x6.2> Δ-2 {[#6]} <Call 0x21eb6 0x21cb8> {[#6]} <POP 21eb8-21eb9 StackAdj> Δ+2 {} <Const 0x21eb9 0x2.2> Δ-2 {[#2]} <Call 0x21ebc 0x21cb8> {[#2]} <POP 21ebe-21ebf StackAdj> Δ+2 {} <Const 0x21ebf 0x3.2> Δ-2 {[#3]} <Call 0x21ec2 0x21cb8> {[#3]} <POP 21ec4-21ec6 StackAdj> Δ+2 {} <MI 21ec6 MOVEQ.L #0x0c,D7> {} <POP 21ec8-21ed8 Naked> Σ0 ↓ →0x21ede ←0x21ede <POP 21ec8-21eca StackAdj> Δ-2 {[-2-]} <MI 21eca MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']} <Call 0x21ecc 0x104c0> {[-2-]|[2, 'D7']} HasBoard(diproc_addr: Byte) : Byte <POP 21ed2-21ed4 StackAdj> Δ+2 {[-2-]} <MI 21ed4 TST.B (A7)+> Δ+2 {} <MI 21ed6 BEQ 0x21ede> {} <POP 21ed8-21ede Naked> Σ0 ↓ <MI 21ed8 MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']} <Call 0x21eda 0x21cb8> {[2, 'D7']} <POP 21edc-21ede StackAdj> Δ+2 {} <POP 21ede-21ee6 Naked> Σ0 ↓ →0x21ec8 ←0x21ec8 <MI 21ede ADDQ.B #0x1,D7> {} <MI 21ee0 CMPI.B #0x0f,D7> {} <MI 21ee4 BLE 0x21ec8> {} <POP 21ee6-21eee Epilogue> Σ0
@ 21eee START <POP 21eee--0001 Body> <POP 21eee-21ef8 Prologue> Σ0 <POP 21ef8-21f04 RegCacheLoad> Σ0 ↓ <POP 21f04-21f3e Naked> Σ0 Δ-8 ↓ →0x21f54 <Call 0x21f04 0x10398> {} FSCALL_10398 <Blob 0x21f0a [8] @> Δ-8 {[«8""»]} <POP 21f1a-21f1c StackAdj> Δ-6 {[«8""»]|[-6-]} <Call 0x21f1c 0x103c4> {[«8""»]|[-6-]} GetArgv() : String <POP 21f22-21f24 StackAdj> Δ-4 {[«8""»]|[-10-]} <Lit 0x21f24 7> {[«8""»]|[-6-]|[$$CONVERT]} <Call 0x21f32 0x102c8> {[«8""»]|[-6-]|[$$CONVERT]} StringEqual(a, b : String) : Byte <POP 21f38-21f3a StackAdj> Δ+8 {[«8""»]|[-2-]} <MI 21f3a TST.B (A7)+> Δ+2 {[«8""»]} <MI 21f3c BEQ 0x21f54> {[«8""»]} <POP 21f3e-21f54 Naked> Σ-8 →0x21fba <Const 0x21f3e 0x0.4> Δ-4 {[-8-]|[##0]} <Call 0x21f42 0x104d8> {[-8-]|[##0]} ExpInit(a : Long) <POP 21f48-21f4a StackAdj> Δ+4 {[-8-]} <Call 0x21f4a 0x20bb4> {[-8-]} <Call 0x21f4e 0x21e8c> {[-8-]} <MI 21f52 BRA 0x21fba> {[-8-]} <POP 21f54-21fba Naked> Σ-8 ↓ ←0x21f04 <Call 0x21f54 0x105b6> {[-8-]} R1000_Reset_L(void) <Blob 0x21f5a [10] @> Δ-10 {[-8-]|[«10""»]} <Blob 0x21f6a [10] @> Δ-10 {[-8-]|[«10""»]|[«10""»]} <POP 21f7a-21f7c StackAdj> Δ-4 {[-8-]|[«10""»]|[«10""»]|[-4-]} <Lit 0x21f7c 9> {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]} <POP 21f86-21f88 StackAdj> Δ-4 {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[-4-]} <Lit 0x21f88 9> {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[$$NO_NOVRAM]} <POP 21f92-21f94 StackAdj> Δ-2 {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[$$NO_NOVRAM]|[-2-]} <POP 21f94-21f95 StackAdj> Δ+2 {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[$$NO_NOVRAM]} <Const 0x21f95 0x2.2> Δ-2 {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[$$NO_NOVRAM]|[#2]} <MI 21f98 PEA.L (A5+0xfd)> Δ-4 {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[$$NO_NOVRAM]|[#2]|[4, '^(A5+0xfd)']} <Call 0x21f9c 0x103b0> {[-8-]|[«10""»]|[«10""»]|[$$CONFIGURE]|[$$NO_NOVRAM]|[#2]|[4, '^(A5+0xfd)']} PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) <POP 21fa2-21fa6 StackAdj> Δ+34 {[-8-]} <Const 0x21fa6 0x0.4> Δ-4 {[-8-]|[##0]} <Call 0x21faa 0x104d8> {[-8-]|[##0]} ExpInit(a : Long) <POP 21fb0-21fb2 StackAdj> Δ+4 {[-8-]} <Call 0x21fb2 0x20bb4> {[-8-]} <Call 0x21fb6 0x21b60> {[-8-]} <POP 21fba-21fca Naked> Σ-8 Δ+8 ↓ ←0x21f3e <POP 21fba-21fbc StackAdj> Δ+6 {[-2-]} <MI 21fbc CLR.B (A7)> {[-2-]} <Const 0x21fbe 0x1.4> Δ-4 {[-2-]|[##1]} <Call 0x21fc2 0x103b8> {[-2-]|[##1]} PopProgram(status : Byte; msg : String) <POP 21fc8-21fca StackAdj> Δ+6 {} <POP 21fca-21fd0 Naked> Σ0 <Call 0x21fca 0x10284> {} ?exit
@ 22324 <LVAR 0x012 1(r)> <LVAR 0x010 1(r)> <LVAR 0x00e 2(r)> <LVAR 0x00c 1(r)> <LVAR 0x00a 1(r)> <LVAR 0x008 2(r)> <LVAR -0x004 @ 4(r)> <POP 22324-2241c Body> Δ+22 <POP 22324-2233a Prologue> Σ0 ↓ <POP 2233a-2234c RegCacheLoad> Σ0 ↓ <POP 2234c-22358 Naked> Σ0 ↓ →0x2236a <POP 2234c-2234e StackAdj> Δ-2 {[-2-]} <Call 0x2234e 0x104cc> {[-2-]} MemOnly2MB() : Bool <MI 22354 TST.B (A7)+> Δ+2 {} <MI 22356 BEQ 0x2236a> {} <POP 22358-2236a Naked> Σ0 Δ-22 →0x2237a <Blob 0x22358 [22] @> Δ-22 {[«22""»]} <MI 22368 BRA 0x2237a> {[«22""»]} <POP 2236a-2237a Naked> Σ0 Δ-22 ↓ ←0x2234c <Blob 0x2236a [22] @> Δ-22 {[«22""»]} <POP 2237a-22414 Naked> Σ-22 Δ+22 ↓ ←0x22358 <POP 2237a-2237c StackAdj> Δ-4 {[-26-]} <Lit 0x2237c> {[-22-]|[$$…]} <Pointer.sp 0x2237c 4> Δ-4 <Const 0x22380 0x1.2> Δ-2 <Const 0x22384 0x15.2> Δ-2 <Call 0x22388 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 2238e-22390 StackAdj> Δ+8 <Pointer.fp 0x22390 <LVAR -0x004 @ 4(r)>> Δ-4 {[-22-]|[$$…]|[@@-4]} <Call 0x22392 0x10460> {[-22-]|[$$…]|[@@-4]} ExpLoad(a : String; b: Pointer) <POP 22398-2239c StackAdj> Δ+30 {} <MI 2239c MOVE.B (A6+0x10),-(A7)> Δ-2 {[2, '(A6+0x10)']} <MI 223a0 MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x10)']|[4, '(A6-0x4)']} <Pointer.sp 0x223a2 4> Δ-4 {[2, '(A6+0x10)']|[4, '(A6-0x4)']|[^^4]} <Const 0x223a6 0x0.4> Δ-4 {[2, '(A6+0x10)']|[4, '(A6-0x4)']|[^^4]|[##0]} <Const 0x223a8 0x0.4> Δ-4 {[2, '(A6+0x10)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]} <Call 0x223aa 0x10466> {[2, '(A6+0x10)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 223ac-223ae StackAdj> Δ+16 {[2, '(A6+0x10)']} <MI 223ae MOVE.W (A6+0xe),(A7)> {[2, '(A6+0xe)']} <MI 223b2 MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0xe)']|[4, '(A6-0x4)']} <Pointer.sp 0x223b4 4> Δ-4 {[2, '(A6+0xe)']|[4, '(A6-0x4)']|[^^4]} <Const 0x223b8 0x0.4> Δ-4 {[2, '(A6+0xe)']|[4, '(A6-0x4)']|[^^4]|[##0]} <Const 0x223ba 0x1.4> Δ-4 {[2, '(A6+0xe)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##1]} <Call 0x223be 0x10466> {[2, '(A6+0xe)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##1]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 223c0-223c2 StackAdj> Δ+16 {[2, '(A6+0xe)']} <MI 223c2 MOVE.B (A6+0xc),(A7)> {[-2-]} <MI 223c6 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x4)']} <Pointer.sp 0x223c8 4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]} <Const 0x223cc 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]} <Const 0x223ce 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]} <Call 0x223d0 0x10466> {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 223d2-223d4 StackAdj> Δ+16 {[-2-]} <MI 223d4 MOVE.B (A6+0xa),(A7)> {[-2-]} <MI 223d8 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x4)']} <Pointer.sp 0x223da 4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]} <Const 0x223de 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]} <Const 0x223e0 0x0.4> Δ-4 {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]} <Call 0x223e2 0x10466> {[-2-]|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 223e4-223e6 StackAdj> Δ+16 {[-2-]} <MI 223e6 MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']} <MI 223ea MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']} <Pointer.sp 0x223ec 4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]} <Const 0x223f0 0x0.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]} <Const 0x223f2 0x1.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##1]} <Call 0x223f6 0x10466> {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##1]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 223f8-223fa StackAdj> Δ+16 {[2, '(A6+0x8)']} <MI 223fa CLR.B (A7)> {[2, '(A6+0x8)']} <MI 223fc MOVE.B (A6+0x12),-(A7)> Δ-2 {[2, '(A6+0x8)']|[2, '(A6+0x12)']} <MI 22400 MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[2, '(A6+0x12)']|[4, '(A6-0x4)']} <Call 0x22402 0x104ba> {[2, '(A6+0x8)']|[2, '(A6+0x12)']|[4, '(A6-0x4)']} ExpRun(a: Bool; adr: Byte; b: Pointer) <POP 22408-2240a StackAdj> Δ+8 {} <Pointer.fp 0x2240a <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]} <Call 0x2240c 0x10496> {[@@-4]} ExpClose(exp : Pointer) <POP 22412-22414 StackAdj> Δ+4 {} <POP 22414-2241c Epilogue> Σ0
@ 22444 <LVAR 0x020 1(r)> <LVAR 0x01c 4(r)> <LVAR 0x018 4(r)> <LVAR 0x014 4(r)> <LVAR 0x010 4(r)> <LVAR 0x00c 4(r)> <LVAR 0x008 4(r)> <LVAR -0x006 @ 4(r)> <POP 22444-22538 Body> Δ+20 <POP 22444-2245a Prologue> Σ0 ↓ <POP 2245a-2246a RegCacheLoad> Σ0 ↓ <POP 2246a-22476 Naked> Σ0 ↓ →0x22484 <POP 2246a-2246c StackAdj> Δ-2 {[-2-]} <Call 0x2246c 0x104cc> {[-2-]} MemOnly2MB() : Bool <MI 22472 TST.B (A7)+> Δ+2 {} <MI 22474 BEQ 0x22484> {} <POP 22476-22484 Naked> Σ0 Δ-20 →0x22490 <Blob 0x22476 [20] @> Δ-20 {[«20""»]} <MI 22482 BRA 0x22490> {[«20""»]} <POP 22484-22490 Naked> Σ0 Δ-20 ↓ ←0x2246a <Blob 0x22484 [20] @> Δ-20 {[«20""»]} <POP 22490-22530 Naked> Σ-20 Δ+20 ↓ ←0x22476 <POP 22490-22492 StackAdj> Δ-4 {[-24-]} <Lit 0x22492> {[-20-]|[$$…]} <Pointer.sp 0x22492 4> Δ-4 <Const 0x22496 0x1.2> Δ-2 <Const 0x2249a 0x14.2> Δ-2 <Call 0x2249e 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 224a4-224a6 StackAdj> Δ+8 <Pointer.fp 0x224a6 <LVAR -0x006 @ 4(r)>> Δ-4 {[-20-]|[$$…]|[@@-6]} <Call 0x224a8 0x10460> {[-20-]|[$$…]|[@@-6]} ExpLoad(a : String; b: Pointer) <POP 224ae-224b2 StackAdj> Δ+28 {} <MI 224b2 CLR.B -(A7)> Δ-2 {[#0]} <MI 224b4 MOVE.B (A6+0x20),-(A7)> Δ-2 {[#0]|[2, '(A6+0x20)']} <MI 224b8 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x20)']|[4, '(A6-0x6)']} <Call 0x224ba 0x104ba> {[#0]|[2, '(A6+0x20)']|[4, '(A6-0x6)']} ExpRun(a: Bool; adr: Byte; b: Pointer) <POP 224c0-224c2 StackAdj> Δ+4 {[#0]|[2, '(A6+0x20)']} <MI 224c2 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 224c4 MOVEA.L (A6+0x1c),A0> {[4, '(A6-0x6)']} <MI 224c8 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x224ca 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x224cc 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x224ce 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 224d0-224d2 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 224d2 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 224d4 MOVEA.L (A6+0x18),A0> {[4, '(A6-0x6)']} <MI 224d8 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x224da 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x224dc 0x1.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]} <Call 0x224e0 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 224e2-224e4 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 224e4 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 224e6 MOVEA.L (A6+0x14),A0> {[4, '(A6-0x6)']} <MI 224ea PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x224ec 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x224ee 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x224f0 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 224f2-224f4 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 224f4 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 224f6 MOVEA.L (A6+0x10),A0> {[4, '(A6-0x6)']} <MI 224fa PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x224fc 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x224fe 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x22500 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22502-22504 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22504 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22506 MOVEA.L (A6+0xc),A0> {[4, '(A6-0x6)']} <MI 2250a PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x2250c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x2250e 0x1.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]} <Call 0x22512 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22514-22516 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22516 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22518 MOVEA.L (A6+0x8),A0> {[4, '(A6-0x6)']} <MI 2251c PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Call 0x2251e 0x10478> {[4, '(A6-0x6)']|[4, '^(A0)']} ExpOutputFlag(exp : Pointer; VAR status : Bool) <POP 22524-22526 StackAdj> Δ+8 {} <Pointer.fp 0x22526 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]} <Call 0x22528 0x10496> {[@@-6]} ExpClose(exp : Pointer) <POP 2252e-22530 StackAdj> Δ+4 {} <POP 22530-22538 Epilogue> Σ0
@ 22560 <LVAR 0x048 1(r)> <LVAR 0x044 4(r)> <LVAR 0x040 4(r)> <LVAR 0x03c 4(r)> <LVAR 0x038 4(r)> <LVAR 0x034 4(r)> <LVAR 0x030 4(r)> <LVAR 0x02c 4(r)> <LVAR 0x028 4(r)> <LVAR 0x024 4(r)> <LVAR 0x020 4(r)> <LVAR 0x01c 4(r)> <LVAR 0x018 4(r)> <LVAR 0x014 4(r)> <LVAR 0x010 4(r)> <LVAR 0x00c 4(r)> <LVAR 0x008 4(r)> <LVAR -0x006 @ 4(r)> <POP 22560-226f6 Body> Δ+20 <POP 22560-22576 Prologue> Σ0 ↓ <POP 22576-2258a RegCacheLoad> Σ0 ↓ <POP 2258a-22596 Naked> Σ0 ↓ →0x225a4 <POP 2258a-2258c StackAdj> Δ-2 {[-2-]} <Call 0x2258c 0x104cc> {[-2-]} MemOnly2MB() : Bool <MI 22592 TST.B (A7)+> Δ+2 {} <MI 22594 BEQ 0x225a4> {} <POP 22596-225a4 Naked> Σ0 Δ-20 →0x225b0 <Blob 0x22596 [20] @> Δ-20 {[«20""»]} <MI 225a2 BRA 0x225b0> {[«20""»]} <POP 225a4-225b0 Naked> Σ0 Δ-20 ↓ ←0x2258a <Blob 0x225a4 [20] @> Δ-20 {[«20""»]} <POP 225b0-226ee Naked> Σ-20 Δ+20 ↓ ←0x22596 <POP 225b0-225b2 StackAdj> Δ-4 {[-24-]} <Lit 0x225b2> {[-20-]|[$$…]} <Pointer.sp 0x225b2 4> Δ-4 <Const 0x225b6 0x1.2> Δ-2 <Const 0x225ba 0x14.2> Δ-2 <Call 0x225be 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 225c4-225c6 StackAdj> Δ+8 <Pointer.fp 0x225c6 <LVAR -0x006 @ 4(r)>> Δ-4 {[-20-]|[$$…]|[@@-6]} <Call 0x225c8 0x10460> {[-20-]|[$$…]|[@@-6]} ExpLoad(a : String; b: Pointer) <POP 225ce-225d2 StackAdj> Δ+28 {} <MI 225d2 CLR.B -(A7)> Δ-2 {[#0]} <MI 225d4 MOVE.B (A6+0x48),-(A7)> Δ-2 {[#0]|[2, '(A6+0x48)']} <MI 225d8 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x48)']|[4, '(A6-0x6)']} <Call 0x225da 0x104ba> {[#0]|[2, '(A6+0x48)']|[4, '(A6-0x6)']} ExpRun(a: Bool; adr: Byte; b: Pointer) <POP 225e0-225e2 StackAdj> Δ+4 {[#0]|[2, '(A6+0x48)']} <MI 225e2 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 225e4 MOVEA.L (A6+0x44),A0> {[4, '(A6-0x6)']} <MI 225e8 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x225ea 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x225ec 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x225ee 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 225f0-225f2 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 225f2 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 225f4 MOVEA.L (A6+0x40),A0> {[4, '(A6-0x6)']} <MI 225f8 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x225fa 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x225fc 0x1.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]} <Call 0x225fe 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22600-22602 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22602 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22604 MOVEA.L (A6+0x3c),A0> {[4, '(A6-0x6)']} <MI 22608 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x2260a 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x2260c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x2260e 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22610-22612 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22612 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22614 MOVEA.L (A6+0x38),A0> {[4, '(A6-0x6)']} <MI 22618 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x2261a 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x2261c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x2261e 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22620-22622 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22622 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22624 MOVEA.L (A6+0x34),A0> {[4, '(A6-0x6)']} <MI 22628 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x2262a 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x2262c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x2262e 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22630-22632 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22632 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22634 MOVEA.L (A6+0x30),A0> {[4, '(A6-0x6)']} <MI 22638 PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x2263a 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x2263c 0x3.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##3]} <Call 0x22640 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##3]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22642-22644 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22644 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22646 MOVEA.L (A6+0x2c),A0> {[4, '(A6-0x6)']} <MI 2264a PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x2264c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x2264e 0x1.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]} <Call 0x22650 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22652-22654 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22654 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22656 MOVEA.L (A6+0x28),A0> {[4, '(A6-0x6)']} <MI 2265a PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x2265c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x2265e 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x22660 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22662-22664 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22664 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22666 MOVEA.L (A6+0x24),A0> {[4, '(A6-0x6)']} <MI 2266a PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x2266c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x2266e 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x22670 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22672-22674 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22674 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22676 MOVEA.L (A6+0x20),A0> {[4, '(A6-0x6)']} <MI 2267a PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x2267c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x2267e 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x22680 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22682-22684 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22684 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22686 MOVEA.L (A6+0x1c),A0> {[4, '(A6-0x6)']} <MI 2268a PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x2268c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x2268e 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x22690 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 22692-22694 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 22694 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 22696 MOVEA.L (A6+0x18),A0> {[4, '(A6-0x6)']} <MI 2269a PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x2269c 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x2269e 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x226a0 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 226a2-226a4 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 226a4 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 226a6 MOVEA.L (A6+0x14),A0> {[4, '(A6-0x6)']} <MI 226aa PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x226ac 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x226ae 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x226b0 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 226b2-226b4 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 226b4 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 226b6 MOVEA.L (A6+0x10),A0> {[4, '(A6-0x6)']} <MI 226ba PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x226bc 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x226be 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} <Call 0x226c0 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##0]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 226c2-226c4 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 226c4 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 226c6 MOVEA.L (A6+0xc),A0> {[4, '(A6-0x6)']} <MI 226ca PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Const 0x226cc 0x0.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]} <Const 0x226ce 0x1.4> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]} <Call 0x226d0 0x10472> {[4, '(A6-0x6)']|[4, '^(A0)']|[##0]|[##1]} ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L) <POP 226d2-226d4 StackAdj> Δ+12 {[4, '(A6-0x6)']} <MI 226d4 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']} <MI 226d6 MOVEA.L (A6+0x8),A0> {[4, '(A6-0x6)']} <MI 226da PEA.L (A0)> Δ-4 {[4, '(A6-0x6)']|[4, '^(A0)']} <Call 0x226dc 0x10478> {[4, '(A6-0x6)']|[4, '^(A0)']} ExpOutputFlag(exp : Pointer; VAR status : Bool) <POP 226e2-226e4 StackAdj> Δ+8 {} <Pointer.fp 0x226e4 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]} <Call 0x226e6 0x10496> {[@@-6]} ExpClose(exp : Pointer) <POP 226ec-226ee StackAdj> Δ+4 {} <POP 226ee-226f6 Epilogue> Σ0
@ 22704 PROG_FAIL <LVAR 0x008 1(r)> <POP 22704-2276c Body> <POP 22704-2271a Prologue> Σ0 ↓ <POP 2271a-22764 Naked> Σ0 ↓ <Blob 0x2271a [14] @> Δ-14 {[«14""»]} <Const 0x22726 0x3.2> Δ-2 {[«14""»]|[#3]} <POP 2272a-2272c StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]} <Lit 0x2272c 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]} <POP 2273e-22740 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 22740 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 22744 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 22746 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 22748 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']} <Call 0x2274a 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']} Long2String(a : Long) : String <POP 22750-22752 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <Call 0x22752 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} StringCat2(a, b : String) : String <POP 22758-2275a StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]} <Call 0x2275a 0x103b8> {[«14""»]|[#3]|[-4-]} PopProgram(status : Byte; msg : String) <POP 22760-22764 StackAdj> Δ+20 {} <POP 22764-2276c Epilogue> Σ0
@ 227c0 EXP_FAIL <LVAR 0x00e 1(r)> <LVAR 0x00a 4(r)> <LVAR 0x008 1(r)> <POP 227c0-228fc Body> <POP 227c0-227d6 Prologue> Σ0 ↓ <POP 227d6-227ec RegCacheLoad> Σ0 ↓ <POP 227ec-2284c Naked> Σ0 ↓ →0x22894 <Call 0x227ec 0x103dc> {} WriteConsoleCrLf(void) <Blob 0x227f2 [18] @> Δ-18 {[«18""»]} <POP 227fe-22800 StackAdj> Δ-4 {[«18""»]|[-4-]} <Lit 0x22800 18> {[«18""»]|[$$Experiment error :]} <Call 0x2280c 0x103e0> {[«18""»]|[$$Experiment error :]} WriteConsoleStringCrLf(str : String) <POP 2280e-2280f StackAdj> Δ+22 ↓ {} <Blob 0x2280f [14] @> Δ-14 {[«14""»]} <POP 2281e-22820 StackAdj> Δ-8 {[«14""»]|[-8-]} <Lit 0x22820 13> {[«14""»]|[-4-]|[$$Board :_]} <POP 2282a-2282c StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]} <MI 2282c MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]} <Call 0x22830 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]} BoardName(address : B) : String <POP 22836-22838 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]} <Call 0x22838 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]} StringCat2(a, b : String) : String <POP 2283e-22840 StackAdj> Δ+8 {[«14""»]|[-4-]} <Call 0x22840 0x103e0> {[«14""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 22842-22844 StackAdj> Δ+18 {} <MI 22844 MOVEA.L (A6+0xa),A0> {} <MI 22848 CMPA.W #0x01,A0> {} <MI 2284a BEQ 0x22894> {} <POP 2284c-22894 Naked> Σ0 ↓ <Blob 0x2284c [14] @> Δ-14 {[«14""»]} <Blob 0x2285c [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]} <POP 2286c-2286e StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]} <Lit 0x2286e 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]} <POP 22878-2287a StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]} <Lit 0x2287a> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]} <Pointer.sp 0x2287a 12> Δ-4 <Const 0x2287e 0x1.2> Δ-2 <Const 0x22880 0x1e.2> Δ-2 <Call 0x22882 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 22884-22886 StackAdj> Δ+8 <Call 0x22886 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]} StringCat2(a, b : String) : String <POP 2288c-2288e StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]} <Call 0x2288e 0x103e0> {[«14""»]|[«30»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 22890-22894 StackAdj> Δ+48 {} <POP 22894-228f4 Naked> Σ0 ↓ ←0x227ec <Blob 0x22894 [14] @> Δ-14 {[«14""»]} <POP 228a4-228a6 StackAdj> Δ-8 {[«14""»]|[-8-]} <Lit 0x228a6 13> {[«14""»]|[-4-]|[$$Status :_]} <POP 228b0-228b2 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]} <MI 228b2 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]} <Call 0x228b6 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]} ExpStatus2Text(status.B, &String) <POP 228bc-228be StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]} <Call 0x228be 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]} StringCat2(a, b : String) : String <POP 228c4-228c6 StackAdj> Δ+8 {[«14""»]|[-4-]} <Call 0x228c6 0x103e0> {[«14""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 228c8-228c9 StackAdj> Δ+18 ↓ {} <Blob 0x228c9 [24] @> Δ-24 {[«24""»]} <Const 0x228d8 0x2.2> Δ-2 {[«24""»]|[#2]} <POP 228dc-228de StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]} <Lit 0x228de 23> {[«24""»]|[#2]|[$$Fatal experiment error.]} <Call 0x228ec 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]} PopProgram(status : Byte; msg : String) <POP 228f2-228f4 StackAdj> Δ+30 {} <POP 228f4-228fc Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.867cc6a8ecfdf687 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 1e ee | | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 29 24 | )$ | .PTR 0x22924 00020010 code.end: 00020010 00 02 28 fc | ( | .PTR 0x228fc 00020014 00 00 00 f0 | | .CONST 0x000000f0 00020018 programfailurehandler: 00020018 00 02 27 04 | ' | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 27 c0 | ' | .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 49 4f |IO | .TXT 'IO' 0002010c 43 20 |C | .XXX[0x2] 0002010e 54 59 |TY | .TXT 'TY' 00020110 50 20 |P | .XXX[0x2] 00020112 56 41 |VA | .TXT 'VA' 00020114 4c 20 |L | .XXX[0x2] 00020116 46 49 |FI | .TXT 'FI' 00020118 55 20 |U | .XXX[0x2] 0002011a 53 45 |SE | .TXT 'SE' 0002011c 51 20 |Q | .XXX[0x2] 0002011e 4d 45 4d 30 |MEM0 | .TXT 'MEM0' 00020122 4d 45 4d 31 |MEM1 | .TXT 'MEM1' 00020126 4d 45 4d 32 |MEM2 | .TXT 'MEM2' 0002012a 4d 45 4d 33 |MEM3 | .TXT 'MEM3' 0002012e 52 45 53 48 41 20 |RESHA | .TXT 'RESHA ' 00020134 3f 3f |?? | .TXT '??' 00020136 3f 20 |? | .XXX[0x2] 00020138 2a 2a 2a 20 69 6e 76 61 |*** inva| .TXT '*** invalid RESHA board info ptr' 00020158 2a 2a 2a 20 69 6e 76 61 |*** inva| .TXT '*** invalid TCP board info ptr' 00020176 74 75 72 6e 20 57 52 49 |turn WRI| .TXT 'turn WRITE PROTECT switch OFF (on front of RESHA) ... ' 000201ac 20 4f | O | .TXT ' O' 000201ae 4b 20 |K | .XXX[0x2] 000201b0 2a 2a 2a 20 45 52 52 4f |*** ERRO| .TXT '*** ERROR code from REE_UPLOAD:_' 000201d0 52 45 53 48 41 20 50 52 |RESHA PR| .XXX[0x20] 000201d8 4f 4d 20 77 72 69 74 65 |OM write| 000201e0 20 66 61 69 6c 65 64 2c | failed,| 000201e8 20 74 72 79 20 61 67 61 | try aga| 000201f0 69 6e 5f 20 |in_ | .XXX[0x4] 000201f4 74 75 72 6e 20 57 52 49 |turn WRI| .TXT 'turn WRITE PROTECT switch ON (on front of RESHA) ...' 00020228 20 4f | O | .TXT ' O' 0002022a 4b 20 |K | .XXX[0x2] 0002022c 69 6e 76 61 6c 69 64 20 |invalid | .TXT 'invalid RESHA board info ptr' 00020248 50 6c 65 61 73 65 20 65 |Please e| .TXT 'Please enter an integer in the range [' 0002026e 20 5b | [ | .TXT ' [' 00020270 5d 20 3a 5f |] :_ | .TXT '] :_' 00020274 20 2e 2e 5f | .._ | .TXT ' .._' 00020278 5d 20 |] | .TXT '] ' 0002027a 20 5b | [ | .TXT ' [' 0002027c 5d 20 3a 5f |] :_ | .TXT '] :_' 00020280 30 30 3a 30 30 3a 30 30 |00:00:00| .TXT '00:00:00_ ' 0002028a 45 6e 74 65 72 20 70 61 |Enter pa| .TXT 'Enter part number ' 0002029c 45 6e 74 65 72 20 73 65 |Enter se| .TXT 'Enter serial number ' 000202b0 45 6e 74 65 72 20 61 72 |Enter ar| .TXT 'Enter artwork revision' 000202c6 45 6e 74 65 72 20 45 43 |Enter EC| .TXT 'Enter ECO level ' 000202d6 45 6e 74 65 72 20 62 75 |Enter bu| .TXT 'Enter build date as DD-MMM-YY ' 000202f4 20 4e 4f 56 52 41 4d 20 | NOVRAM | .TXT ' NOVRAM checksum error, enter new data, defaults are best guess ' 00020334 42 6f 61 72 64 73 20 61 |Boards a| .TXT 'Boards are: ' 00020340 20 20 20 20 30 20 3d 3e | 0 =>| .TXT ' 0 => TYP 1 => VAL' 0002035a 20 20 20 20 32 20 3d 3e | 2 =>| .TXT ' 2 => SEQ 3 => FIU' 00020374 20 20 20 20 34 20 3d 3e | 4 =>| .TXT ' 4 => MEM0 5 => MEM1 ' 00020390 20 20 20 20 36 20 3d 3e | 6 =>| .TXT ' 6 => MEM2 7 => MEM3 ' 000203ac 20 20 20 20 | | .TXT ' ' 000203b0 38 20 3d 3e |8 => | .TXT '8 =>' 000203b4 20 49 4f 43 | IOC | .TXT ' IOC' 000203b8 20 20 20 20 38 20 3d 3e | 8 =>| .TXT ' 8 => IOC 9 => RESHA' 000203d4 45 6e 74 65 72 20 62 6f |Enter bo| .TXT 'Enter board :_' 000203e2 45 6e 74 65 72 20 54 43 |Enter TC| .TXT 'Enter TCP/IP board serial number' 00020402 69 6e 76 61 6c 69 64 20 |invalid | .TXT 'invalid TCP board info ptr' 0002041c 43 68 65 63 6b 73 75 6d |Checksum| .TXT 'Checksum error' 0002042a 20 20 20 20 20 20 20 20 | | .TXT ' Part Serial Artwork ECO Date of ' 0002045c 42 6f 61 72 64 20 20 4e |Board N| .TXT 'Board Number Number Revision Level Manufacture ' 00020490 54 43 50 2f 49 50 20 28 |TCP/IP (| .TXT 'TCP/IP (CMC) board serial number is_' 000204b4 4f 70 74 69 |Opti | .TXT 'Opti' 000204b8 6f 6e 73 20 |ons | .TXT 'ons ' 000204bc 61 72 65 3a |are: | .TXT 'are:' 000204c0 20 20 20 20 30 20 3d 3e | 0 =>| .TXT ' 0 => Exit.' 000204ce 20 20 20 20 31 20 3d 3e | 1 =>| .TXT ' 1 => Display novram contents. ' 000204f0 20 20 20 20 32 20 3d 3e | 2 =>| .TXT ' 2 => Modify novram contents. ' 00020512 20 20 20 20 33 20 3d 3e | 3 =>| .TXT ' 3 => Change TCP/IP board serial number. ' 0002053e 45 6e 74 65 72 20 6f 70 |Enter op| .TXT 'Enter option :_ ' 0002054e 43 4f 4e 56 45 52 54 20 |CONVERT | .TXT 'CONVERT ' 00020556 43 4f 4e 46 49 47 55 52 |CONFIGUR| .TXT 'CONFIGURE ' 00020560 4e 4f 5f 4e 4f 56 52 41 |NO_NOVRA| .TXT 'NO_NOVRAM ' 0002056a 00 00 00 00 00 05 | | .XXX[0x6] 00020570 00 04 00 09 00 00 00 03 | | .XXX[0xa8] 00020578 00 02 00 00 00 00 00 00 | | 00020580 00 00 00 08 00 08 00 08 | | 00020588 00 08 00 00 00 00 00 02 | | 00020590 00 02 00 01 00 00 00 02 | | 00020598 00 03 00 00 00 00 00 00 | | 000205a0 00 00 00 01 00 01 00 01 | | 000205a8 00 01 00 00 00 00 00 05 | | 000205b0 00 05 00 01 00 00 00 01 | | 000205b8 00 00 00 00 00 00 00 00 | | 000205c0 00 00 00 03 00 03 00 03 | | 000205c8 00 03 00 29 00 00 00 2d | ) -| 000205d0 00 2c 00 31 00 00 00 2b | , 1 +| 000205d8 00 2a 00 00 00 00 00 00 | * | 000205e0 00 00 00 2f 00 2f 00 2f | / / /| 000205e8 00 2f 00 02 00 00 00 01 | / | 000205f0 00 01 00 02 00 00 00 02 | | 000205f8 00 01 00 00 00 00 00 00 | | 00020600 00 00 00 02 00 02 00 02 | | 00020608 00 02 00 01 00 00 00 00 | | 00020610 00 01 00 02 00 00 00 00 | | 00020618 00 00 00 00 00 00 00 00 | | .BLANK 00[0x10] 00020628 00 00 06 07 02 03 0c 0d | | .XXX[0x8] 00020630 0e 0f 04 00 | | .XXX[0x4] 00020634 ; -------------------------------------------------------------------------------------- 00020634 ; OMSI PASCAL Function 00020634 ; <LVAR 0x00d 1(r)> 00020634 ; <LVAR 0x00c 1(r)> 00020634 ; <LVAR 0x008 4(r)> 00020634 ; -------------------------------------------------------------------------------------- 00020634 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00020638 bf d5 | | CMPA.L (A5),A7 0002063a 62 06 |b | BHI 0x20642 0002063c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020640 4e 76 |Nv | TRAPV 00020642 de fc 00 1e | | ADDA.W #0x1e,A7 00020646 48 e7 f0 80 |H | MOVEM.L A0+D3+D2+D1+D0,-(A7) 0002064a 76 01 |v | MOVEQ.L #0x01,D3 0002064c 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020650 42 50 |BP | CLR.W (A0) 00020652 42 80 |B | CLR.L D0 00020654 10 2e 00 0c | . | MOVE.B (A6+0xc),D0 00020658 32 00 |2 | MOVE.W D0,D1 0002065a e2 41 | A | ASR.W #0x1,D1 0002065c c7 28 00 02 | ( | AND.B D3,(A0+0x2) 00020660 e3 09 | | LSL.B #0x1,D1 00020662 83 28 00 02 | ( | OR.B D1,(A0+0x2) 00020666 c0 43 | C | AND.W D3,D0 00020668 e7 40 | @ | ASL.W #0x3,D0 0002066a 42 81 |B | CLR.L D1 0002066c 12 2e 00 0d | . | MOVE.B (A6+0xd),D1 00020670 34 01 |4 | MOVE.W D1,D2 00020672 ea 42 | B | ASR.W #0x5,D2 00020674 02 42 00 07 | B | ANDI.W #0x0007,D2 00020678 d4 40 | @ | ADD.W D0,D2 0002067a 02 68 fe 1f 00 02 | h | ANDI.W #0xfe1f,(A0+0x2) 00020680 eb 4a | J | LSL.W #0x5,D2 00020682 85 68 00 02 | h | OR.W D2,(A0+0x2) 00020686 02 41 00 1f | A | ANDI.W #0x001f,D1 0002068a 02 28 00 e0 00 03 | ( | ANDI.B #0xe0,(A0+0x3) 00020690 83 28 00 03 | ( | OR.B D1,(A0+0x3) 00020694 4c df 01 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0 00020698 4e 5e |N^ | UNLK A6 0002069a 4e 75 |Nu | RTS 0002069c ; -------------------------------------------------------------------------------------- 0002069c ; OMSI PASCAL Function 0002069c ; <LVAR 0x00a 4(w)> 0002069c ; <LVAR 0x008 1(r)> 0002069c ; -------------------------------------------------------------------------------------- 0002069c 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 000206a0 bf d5 | | CMPA.L (A5),A7 000206a2 62 06 |b | BHI 0x206aa 000206a4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000206a8 4e 76 |Nv | TRAPV 000206aa de fc 00 26 | & | ADDA.W #0x26,A7 000206ae 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7) 000206b2 72 01 |r | MOVEQ.L #0x01,D1 000206b4 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000206b8 48 80 |H | EXTB.W D0 000206ba 0c 40 00 0f | @ | CMPI.W #0x000f,D0 000206be 62 00 00 e6 |b | BHI switch@0x206c4[0x1] 000206c2 d0 40 | @ | ADD.W D0,D0 000206c4 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000206cc 00 ae | | .CONST 0xae ; [0x0] -> 0x2077a 000206ce 00 da | | .CONST 0xda ; [0x1] -> 0x207a6 000206d0 00 76 | v | .CONST 0x76 ; [0x2] -> 0x20742 000206d2 00 62 | b | .CONST 0x62 ; [0x3] -> 0x2072e 000206d4 00 20 | | .CONST 0x20 ; [0x4] -> 0x206ec 000206d6 00 da | | .CONST 0xda ; [0x5] -> 0x207a6 000206d8 00 36 | 6 | .CONST 0x36 ; [0x6] -> 0x20702 000206da 00 4c | L | .CONST 0x4c ; [0x7] -> 0x20718 000206dc 00 da | | .CONST 0xda ; [0x8] -> 0x207a6 000206de 00 da | | .CONST 0xda ; [0x9] -> 0x207a6 000206e0 00 da | | .CONST 0xda ; [0xa] -> 0x207a6 000206e2 00 da | | .CONST 0xda ; [0xb] -> 0x207a6 000206e4 00 8a | | .CONST 0x8a ; [0xc] -> 0x20756 000206e6 00 9c | | .CONST 0x9c ; [0xd] -> 0x20768 000206e8 00 a2 | | .CONST 0xa2 ; [0xe] -> 0x2076e 000206ea 00 a8 | | .CONST 0xa8 ; [0xf] -> 0x20774 000206ec switch@0x206c4[0x4]: 000206ec 59 4f |YO | SUBQ.L #0x4,A7 000206ee 1e ba fa 1a | | MOVE.B 0x2010a,(A7) 000206f2 1f 7a fa 17 00 01 | z | MOVE.B 0x2010b,(A7+0x1) 000206f8 1f 7a fa 12 00 02 | z | MOVE.B 0x2010c,(A7+0x2) 000206fe 60 00 00 b8 |` | BRA 0x207b8 00020702 switch@0x206c4[0x6]: 00020702 59 4f |YO | SUBQ.L #0x4,A7 00020704 1e ba fa 08 | | MOVE.B 0x2010e,(A7) 00020708 1f 7a fa 05 00 01 | z | MOVE.B 0x2010f,(A7+0x1) 0002070e 1f 7a fa 00 00 02 | z | MOVE.B 0x20110,(A7+0x2) 00020714 60 00 00 a2 |` | BRA 0x207b8 00020718 switch@0x206c4[0x7]: 00020718 59 4f |YO | SUBQ.L #0x4,A7 0002071a 1e ba f9 f6 | | MOVE.B 0x20112,(A7) 0002071e 1f 7a f9 f3 00 01 | z | MOVE.B 0x20113,(A7+0x1) 00020724 1f 7a f9 ee 00 02 | z | MOVE.B 0x20114,(A7+0x2) 0002072a 60 00 00 8c |` | BRA 0x207b8 0002072e switch@0x206c4[0x3]: 0002072e 59 4f |YO | SUBQ.L #0x4,A7 00020730 1e ba f9 e4 | | MOVE.B 0x20116,(A7) 00020734 1f 7a f9 e1 00 01 | z | MOVE.B 0x20117,(A7+0x1) 0002073a 1f 7a f9 dc 00 02 | z | MOVE.B 0x20118,(A7+0x2) 00020740 60 76 |`v | BRA 0x207b8 00020742 switch@0x206c4[0x2]: 00020742 59 4f |YO | SUBQ.L #0x4,A7 00020744 1e ba f9 d4 | | MOVE.B 0x2011a,(A7) 00020748 1f 7a f9 d1 00 01 | z | MOVE.B 0x2011b,(A7+0x1) 0002074e 1f 7a f9 cc 00 02 | z | MOVE.B 0x2011c,(A7+0x2) 00020754 60 62 |`b | BRA 0x207b8 00020756 switch@0x206c4[0xc]: 00020756 2f 3a f9 c6 |/: | MOVE.L 0x2011e,-(A7) 0002075a 59 4f |YO | SUBQ.L #0x4,A7 0002075c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020760 3f 01 |? | MOVE.W D1,-(A7) 00020762 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020766 60 5c |`\ | BRA 0x207c4 00020768 switch@0x206c4[0xd]: 00020768 2f 3a f9 b8 |/: | MOVE.L 0x20122,-(A7) 0002076c 60 ec |` | BRA 0x2075a 0002076e switch@0x206c4[0xe]: 0002076e 2f 3a f9 b6 |/: | MOVE.L 0x20126,-(A7) 00020772 60 e6 |` | BRA 0x2075a 00020774 switch@0x206c4[0xf]: 00020774 2f 3a f9 b4 |/: | MOVE.L 0x2012a,-(A7) 00020778 60 e0 |` | BRA 0x2075a 0002077a switch@0x206c4[0x0]: 0002077a 5d 4f |]O | SUBQ.L #0x6,A7 0002077c 20 4f | O | MOVEA.L A7,A0 0002077e 43 fa f9 ae |C | LEA.L 0x2012e,A1 00020782 70 04 |p | MOVEQ.L #0x04,D0 00020784 10 d9 | | MOVE.B (A1)+,(A0)+ 00020786 51 c8 ff fc |Q | DBF D0,0x20784 0002078a 59 4f |YO | SUBQ.L #0x4,A7 0002078c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020790 3f 01 |? | MOVE.W D1,-(A7) 00020792 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00020796 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002079c 50 4f |PO | ADDQ.L #0x8,A7 0002079e 2d 5f 00 0a |-_ | MOVE.L (A7)+,(A6+0xa) 000207a2 5c 4f |\O | ADDQ.L #0x6,A7 000207a4 60 2c |`, | BRA 0x207d2 000207a6 switch@0x206c4[0x1]: 000207a6 switch@0x206c4[0x5]: 000207a6 switch@0x206c4[0x8]: 000207a6 switch@0x206c4[0x9]: 000207a6 switch@0x206c4[0xa]: 000207a6 switch@0x206c4[0xb]: 000207a6 59 4f |YO | SUBQ.L #0x4,A7 000207a8 1e ba f9 8a | | MOVE.B 0x20134,(A7) 000207ac 1f 7a f9 87 00 01 | z | MOVE.B 0x20135,(A7+0x1) 000207b2 1f 7a f9 82 00 02 | z | MOVE.B 0x20136,(A7+0x2) 000207b8 59 4f |YO | SUBQ.L #0x4,A7 000207ba 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000207be 3f 01 |? | MOVE.W D1,-(A7) 000207c0 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 000207c4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000207ca 50 4f |PO | ADDQ.L #0x8,A7 000207cc 2d 5f 00 0a |-_ | MOVE.L (A7)+,(A6+0xa) 000207d0 58 4f |XO | ADDQ.L #0x4,A7 000207d2 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1 000207d6 4e 5e |N^ | UNLK A6 000207d8 4e 75 |Nu | RTS 000207da ; -------------------------------------------------------------------------------------- 000207da ; OMSI PASCAL Function 000207da ; <LVAR 0x00c 2(w)> 000207da ; <LVAR 0x008 4(r)> 000207da ; -------------------------------------------------------------------------------------- 000207da 4e 56 ff ea |NV | LINK.W A6,#0xffea ; Spelunked 000207de bf d5 | | CMPA.L (A5),A7 000207e0 62 06 |b | BHI 0x207e8 000207e2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000207e6 4e 76 |Nv | TRAPV 000207e8 de fc 00 12 | | ADDA.W #0x12,A7 000207ec 48 e7 81 00 |H | MOVEM.L D7+D0,-(A7) 000207f0 55 4f |UO | SUBQ.L #0x2,A7 000207f2 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000207f6 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 000207fc 58 4f |XO | ADDQ.L #0x4,A7 000207fe 30 1f |0 | MOVE.W (A7)+,D0 00020800 41 bc 00 ff |A | CHK.W #0xff,D0 00020804 3e 00 |> | MOVE.W D0,D7 00020806 30 07 |0 | MOVE.W D7,D0 00020808 48 c0 |H | EXTW.L D0 0002080a d1 ac 00 02 | | ADD.L D0,(A4+0x2) 0002080e 3d 40 00 0c |=@ | MOVE.W D0,(A6+0xc) 00020812 4c df 00 81 |L | MOVEM.L (A7)+,D0+D7 00020816 4e 5e |N^ | UNLK A6 00020818 4e 75 |Nu | RTS 0002081a ; -------------------------------------------------------------------------------------- 0002081a ; OMSI PASCAL Function 0002081a ; <LVAR -0x006 4(rw)> 0002081a ; <LVAR -0x007 1(w)> 0002081a ; <LVAR -0x008 @ 1(w) 2(r)> 0002081a ; -------------------------------------------------------------------------------------- 0002081a 4e 56 ff da |NV | LINK.W A6,#0xffda 0002081e bf d5 | | CMPA.L (A5),A7 00020820 62 06 |b | BHI 0x20828 00020822 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020826 4e 76 |Nv | TRAPV 00020828 de fc 00 1e | | ADDA.W #0x1e,A7 0002082c 48 e7 c0 c8 |H | MOVEM.L A4+A1+A0+D1+D0,-(A7) 00020830 41 ee ff f8 |A | LEA.L (A6-0x8),A0 00020834 43 fa ff a4 |C | LEA.L 0x207da,A1 00020838 22 3c 00 00 00 ff |"< | MOVE.L #0xff,D1 0002083e 2d 7c 00 00 00 56 ff fa |-| V | MOVE.L #0x56,(A6-0x6) 00020846 55 4f |UO | SUBQ.L #0x2,A7 00020848 48 78 01 01 |Hx | PEA.L 0x101 0002084c 28 48 |(H | MOVEA.L A0,A4 0002084e 4e 91 |N | JSR (A1) 00020850 58 4f |XO | ADDQ.L #0x4,A7 00020852 30 1f |0 | MOVE.W (A7)+,D0 00020854 41 81 |A | CHK.W D1,D0 00020856 3b 40 00 50 |;@ P | MOVE.W D0,(A5+0x50) 0002085a 55 4f |UO | SUBQ.L #0x2,A7 0002085c 48 78 01 02 |Hx | PEA.L 0x102 00020860 28 48 |(H | MOVEA.L A0,A4 00020862 4e 91 |N | JSR (A1) 00020864 58 4f |XO | ADDQ.L #0x4,A7 00020866 30 1f |0 | MOVE.W (A7)+,D0 00020868 e1 40 | @ | ASL.W #0x8,D0 0002086a 55 4f |UO | SUBQ.L #0x2,A7 0002086c 48 78 01 03 |Hx | PEA.L 0x103 00020870 28 48 |(H | MOVEA.L A0,A4 00020872 4e 91 |N | JSR (A1) 00020874 58 4f |XO | ADDQ.L #0x4,A7 00020876 d0 5f | _ | ADD.W (A7)+,D0 00020878 0c 40 ff ff | @ | CMPI.W #0xffff,D0 0002087c 63 02 |c | BLS 0x20880 0002087e 4e 4f |NO | TRAP #15 00020880 3b 40 00 52 |;@ R | MOVE.W D0,(A5+0x52) 00020884 55 4f |UO | SUBQ.L #0x2,A7 00020886 48 78 01 04 |Hx | PEA.L 0x104 0002088a 28 48 |(H | MOVEA.L A0,A4 0002088c 4e 91 |N | JSR (A1) 0002088e 58 4f |XO | ADDQ.L #0x4,A7 00020890 30 1f |0 | MOVE.W (A7)+,D0 00020892 41 81 |A | CHK.W D1,D0 00020894 3b 40 00 54 |;@ T | MOVE.W D0,(A5+0x54) 00020898 55 4f |UO | SUBQ.L #0x2,A7 0002089a 48 78 01 05 |Hx | PEA.L 0x105 0002089e 28 48 |(H | MOVEA.L A0,A4 000208a0 4e 91 |N | JSR (A1) 000208a2 58 4f |XO | ADDQ.L #0x4,A7 000208a4 30 1f |0 | MOVE.W (A7)+,D0 000208a6 41 81 |A | CHK.W D1,D0 000208a8 3b 40 00 56 |;@ V | MOVE.W D0,(A5+0x56) 000208ac 55 4f |UO | SUBQ.L #0x2,A7 000208ae 48 78 01 06 |Hx | PEA.L 0x106 000208b2 28 48 |(H | MOVEA.L A0,A4 000208b4 4e 91 |N | JSR (A1) 000208b6 58 4f |XO | ADDQ.L #0x4,A7 000208b8 30 1f |0 | MOVE.W (A7)+,D0 000208ba 41 81 |A | CHK.W D1,D0 000208bc 10 80 | | MOVE.B D0,(A0) 000208be 55 4f |UO | SUBQ.L #0x2,A7 000208c0 48 78 01 07 |Hx | PEA.L 0x107 000208c4 28 48 |(H | MOVEA.L A0,A4 000208c6 4e 91 |N | JSR (A1) 000208c8 58 4f |XO | ADDQ.L #0x4,A7 000208ca 30 1f |0 | MOVE.W (A7)+,D0 000208cc 41 81 |A | CHK.W D1,D0 000208ce 1d 40 ff f9 | @ | MOVE.B D0,(A6-0x7) 000208d2 3f 10 |? | MOVE.W (A0),-(A7) 000208d4 48 6d 00 58 |Hm X | PEA.L (A5+0x58) 000208d8 4e ba fd 5a |N Z | JSR 0x20634 000208dc 58 4f |XO | ADDQ.L #0x4,A7 000208de 48 78 01 08 |Hx | PEA.L 0x108 000208e2 28 48 |(H | MOVEA.L A0,A4 000208e4 4e 91 |N | JSR (A1) 000208e6 58 4f |XO | ADDQ.L #0x4,A7 000208e8 30 1f |0 | MOVE.W (A7)+,D0 000208ea 41 81 |A | CHK.W D1,D0 000208ec 10 80 | | MOVE.B D0,(A0) 000208ee 42 2d 00 5c |B- \ | CLR.B (A5+0x5c) 000208f2 20 2e ff fa | . | MOVE.L (A6-0x6),D0 000208f6 c0 81 | | AND.L D1,D0 000208f8 66 04 |f | BNE 0x208fe 000208fa 52 2d 00 5c |R- \ | ADDQ.B #0x1,(A5+0x5c) 000208fe 4c df 13 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A4 00020902 4e 5e |N^ | UNLK A6 00020904 4e 75 |Nu | RTS 00020906 ; -------------------------------------------------------------------------------------- 00020906 ; OMSI PASCAL Function 00020906 ; <LVAR 0x00c 2(w)> 00020906 ; <LVAR 0x008 4(r)> 00020906 ; <LVAR -0x004 @ 2(r)> 00020906 ; -------------------------------------------------------------------------------------- 00020906 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 ; Spelunked 0002090a bf d5 | | CMPA.L (A5),A7 0002090c 62 06 |b | BHI 0x20914 0002090e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020912 4e 76 |Nv | TRAPV 00020914 de fc 00 1a | | ADDA.W #0x1a,A7 00020918 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 0002091c 43 ee ff fc |C | LEA.L (A6-0x4),A1 00020920 42 51 |BQ | CLR.W (A1) 00020922 20 14 | | MOVE.L (A4),D0 00020924 d0 ae 00 08 | | ADD.L (A6+0x8),D0 00020928 2f 00 |/ | MOVE.L D0,-(A7) 0002092a 20 49 | I | MOVEA.L A1,A0 0002092c 2f 08 |/ | MOVE.L A0,-(A7) 0002092e 52 97 |R | ADDQ.L #0x1,(A7) 00020930 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020934 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 0002093a de fc 00 0a | | ADDA.W #0xa,A7 0002093e 30 11 |0 | MOVE.W (A1),D0 00020940 48 c0 |H | EXTW.L D0 00020942 d1 ac 00 06 | | ADD.L D0,(A4+0x6) 00020946 3d 40 00 0c |=@ | MOVE.W D0,(A6+0xc) 0002094a 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 0002094e 4e 5e |N^ | UNLK A6 00020950 4e 75 |Nu | RTS 00020952 ; -------------------------------------------------------------------------------------- 00020952 ; OMSI PASCAL Function 00020952 ; <LVAR -0x006 4(r)> 00020952 ; <LVAR -0x007 1(w)> 00020952 ; <LVAR -0x008 1(w) 2(r)> 00020952 ; <LVAR -0x00c @ 4(w)> 00020952 ; -------------------------------------------------------------------------------------- 00020952 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 00020956 bf d5 | | CMPA.L (A5),A7 00020958 62 06 |b | BHI 0x20960 0002095a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002095e 4e 76 |Nv | TRAPV 00020960 de fc 00 4c | L | ADDA.W #0x4c,A7 00020964 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 00020968 43 ee ff f4 |C | LEA.L (A6-0xc),A1 0002096c 45 fa ff 98 |E | LEA.L 0x20906,A2 00020970 47 ed 00 24 |G $ | LEA.L (A5+0x24),A3 00020974 22 3c 00 00 00 ff |"< | MOVE.L #0xff,D1 0002097a 59 4f |YO | SUBQ.L #0x4,A7 0002097c 4e b9 00 02 20 24 |N $ | JSR 0x22024 00020982 22 9f |" | MOVE.L (A7)+,(A1) 00020984 66 32 |f2 | BNE 0x209b8 00020986 41 fa f7 d0 |A | LEA.L 0x20158,A0 0002098a 70 07 |p | MOVEQ.L #0x07,D0 0002098c 2f 20 |/ | MOVE.L -(A0),-(A7) 0002098e 51 c8 ff fc |Q | DBF D0,0x2098c 00020992 59 4f |YO | SUBQ.L #0x4,A7 00020994 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020998 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002099c 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7) 000209a0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000209a6 50 4f |PO | ADDQ.L #0x8,A7 000209a8 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000209ae de fc 00 24 | $ | ADDA.W #0x24,A7 000209b2 42 13 |B | CLR.B (A3) 000209b4 60 00 00 c6 |` | BRA 0x20a7c 000209b8 42 ae ff fa |B | CLR.L (A6-0x6) 000209bc 55 4f |UO | SUBQ.L #0x2,A7 000209be 48 78 00 00 |Hx | PEA.L 0x0 000209c2 28 49 |(I | MOVEA.L A1,A4 000209c4 4e 92 |N | JSR (A2) 000209c6 58 4f |XO | ADDQ.L #0x4,A7 000209c8 30 1f |0 | MOVE.W (A7)+,D0 000209ca 41 81 |A | CHK.W D1,D0 000209cc 3b 40 00 18 |;@ | MOVE.W D0,(A5+0x18) 000209d0 55 4f |UO | SUBQ.L #0x2,A7 000209d2 48 78 00 01 |Hx | PEA.L 0x1 000209d6 28 49 |(I | MOVEA.L A1,A4 000209d8 4e 92 |N | JSR (A2) 000209da 58 4f |XO | ADDQ.L #0x4,A7 000209dc 30 1f |0 | MOVE.W (A7)+,D0 000209de e1 40 | @ | ASL.W #0x8,D0 000209e0 55 4f |UO | SUBQ.L #0x2,A7 000209e2 48 78 00 02 |Hx | PEA.L 0x2 000209e6 28 49 |(I | MOVEA.L A1,A4 000209e8 4e 92 |N | JSR (A2) 000209ea 58 4f |XO | ADDQ.L #0x4,A7 000209ec d0 5f | _ | ADD.W (A7)+,D0 000209ee 0c 40 ff ff | @ | CMPI.W #0xffff,D0 000209f2 63 02 |c | BLS 0x209f6 000209f4 4e 4f |NO | TRAP #15 000209f6 3b 40 00 1a |;@ | MOVE.W D0,(A5+0x1a) 000209fa 55 4f |UO | SUBQ.L #0x2,A7 000209fc 48 78 00 03 |Hx | PEA.L 0x3 00020a00 28 49 |(I | MOVEA.L A1,A4 00020a02 4e 92 |N | JSR (A2) 00020a04 58 4f |XO | ADDQ.L #0x4,A7 00020a06 30 1f |0 | MOVE.W (A7)+,D0 00020a08 41 81 |A | CHK.W D1,D0 00020a0a 3b 40 00 1c |;@ | MOVE.W D0,(A5+0x1c) 00020a0e 55 4f |UO | SUBQ.L #0x2,A7 00020a10 48 78 00 04 |Hx | PEA.L 0x4 00020a14 28 49 |(I | MOVEA.L A1,A4 00020a16 4e 92 |N | JSR (A2) 00020a18 58 4f |XO | ADDQ.L #0x4,A7 00020a1a 30 1f |0 | MOVE.W (A7)+,D0 00020a1c 41 81 |A | CHK.W D1,D0 00020a1e 3b 40 00 1e |;@ | MOVE.W D0,(A5+0x1e) 00020a22 55 4f |UO | SUBQ.L #0x2,A7 00020a24 48 78 00 05 |Hx | PEA.L 0x5 00020a28 28 49 |(I | MOVEA.L A1,A4 00020a2a 4e 92 |N | JSR (A2) 00020a2c 58 4f |XO | ADDQ.L #0x4,A7 00020a2e 30 1f |0 | MOVE.W (A7)+,D0 00020a30 41 81 |A | CHK.W D1,D0 00020a32 1d 40 ff f8 | @ | MOVE.B D0,(A6-0x8) 00020a36 55 4f |UO | SUBQ.L #0x2,A7 00020a38 48 78 00 06 |Hx | PEA.L 0x6 00020a3c 28 49 |(I | MOVEA.L A1,A4 00020a3e 4e 92 |N | JSR (A2) 00020a40 58 4f |XO | ADDQ.L #0x4,A7 00020a42 30 1f |0 | MOVE.W (A7)+,D0 00020a44 41 81 |A | CHK.W D1,D0 00020a46 1d 40 ff f9 | @ | MOVE.B D0,(A6-0x7) 00020a4a 3f 2e ff f8 |?. | MOVE.W (A6-0x8),-(A7) 00020a4e 48 6d 00 20 |Hm | PEA.L (A5+0x20) 00020a52 4e ba fb e0 |N | JSR 0x20634 00020a56 58 4f |XO | ADDQ.L #0x4,A7 00020a58 48 78 00 07 |Hx | PEA.L 0x7 00020a5c 28 49 |(I | MOVEA.L A1,A4 00020a5e 4e 92 |N | JSR (A2) 00020a60 58 4f |XO | ADDQ.L #0x4,A7 00020a62 30 1f |0 | MOVE.W (A7)+,D0 00020a64 41 81 |A | CHK.W D1,D0 00020a66 1d 40 ff f8 | @ | MOVE.B D0,(A6-0x8) 00020a6a 42 13 |B | CLR.B (A3) 00020a6c 20 2e ff fa | . | MOVE.L (A6-0x6),D0 00020a70 c0 81 | | AND.L D1,D0 00020a72 0c 80 00 00 00 aa | | CMPI.L #0x000000aa,D0 00020a78 66 02 |f | BNE 0x20a7c 00020a7a 52 13 |R | ADDQ.B #0x1,(A3) 00020a7c 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 00020a80 4e 5e |N^ | UNLK A6 00020a82 4e 75 |Nu | RTS 00020a84 ; -------------------------------------------------------------------------------------- 00020a84 ; OMSI PASCAL Function 00020a84 ; <LVAR 0x008 1(r)> 00020a84 ; <LVAR -0x003 @ 1(r)> 00020a84 ; <LVAR -0x004 1(r)> 00020a84 ; <LVAR -0x005 @ 1(r)> 00020a84 ; <LVAR -0x006 @ 1(r)> 00020a84 ; <LVAR -0x007 @ 1(r)> 00020a84 ; <LVAR -0x008 1(r)> 00020a84 ; <LVAR -0x009 @ 1(r)> 00020a84 ; <LVAR -0x00a @ 1(r)> 00020a84 ; -------------------------------------------------------------------------------------- 00020a84 4e 56 ff b6 |NV | LINK.W A6,#0xffb6 ; Spelunked 00020a88 bf d5 | | CMPA.L (A5),A7 00020a8a 62 06 |b | BHI 0x20a92 00020a8c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020a90 4e 76 |Nv | TRAPV 00020a92 de fc 00 40 | @ | ADDA.W #0x40,A7 00020a96 48 e7 e0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D2+D1+D0,-(A7) 00020a9a 41 ee ff f6 |A | LEA.L (A6-0xa),A0 00020a9e 43 ee ff f7 |C | LEA.L (A6-0x9),A1 00020aa2 45 ee ff f9 |E | LEA.L (A6-0x7),A2 00020aa6 47 ee ff fa |G | LEA.L (A6-0x6),A3 00020aaa 49 ee ff fb |I | LEA.L (A6-0x5),A4 00020aae 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00020ab2 48 80 |H | EXTB.W D0 00020ab4 32 00 |2 | MOVE.W D0,D1 00020ab6 55 41 |UA | SUBQ.W #0x2,D1 00020ab8 0c 41 00 0d | A | CMPI.W #0x000d,D1 00020abc 63 02 |c | BLS 0x20ac0 00020abe switch@0x20ac2[0x2]: 00020abe switch@0x20ac2[0x3]: 00020abe switch@0x20ac2[0x6]: 00020abe switch@0x20ac2[0x7]: 00020abe switch@0x20ac2[0x8]: 00020abe switch@0x20ac2[0x9]: 00020abe 4e 4e |NN | TRAP #14 00020ac0 d2 41 | A | ADD.W D1,D1 00020ac2 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W 00020aca 00 4c | L | .CONST 0x4c ; [0x0] -> 0x20b16 00020acc 00 62 | b | .CONST 0x62 ; [0x1] -> 0x20b2c 00020ace ff f4 | | .CONST 0xfff4 ; [0x2] -> 0x20abe 00020ad0 ff f4 | | .CONST 0xfff4 ; [0x3] -> 0x20abe 00020ad2 00 1c | | .CONST 0x1c ; [0x4] -> 0x20ae6 00020ad4 00 36 | 6 | .CONST 0x36 ; [0x5] -> 0x20b00 00020ad6 ff f4 | | .CONST 0xfff4 ; [0x6] -> 0x20abe 00020ad8 ff f4 | | .CONST 0xfff4 ; [0x7] -> 0x20abe 00020ada ff f4 | | .CONST 0xfff4 ; [0x8] -> 0x20abe 00020adc ff f4 | | .CONST 0xfff4 ; [0x9] -> 0x20abe 00020ade 00 78 | x | .CONST 0x78 ; [0xa] -> 0x20b42 00020ae0 00 78 | x | .CONST 0x78 ; [0xb] -> 0x20b42 00020ae2 00 78 | x | .CONST 0x78 ; [0xc] -> 0x20b42 00020ae4 00 78 | x | .CONST 0x78 ; [0xd] -> 0x20b42 00020ae6 switch@0x20ac2[0x4]: 00020ae6 48 50 |HP | PEA.L (A0) 00020ae8 48 51 |HQ | PEA.L (A1) 00020aea 48 52 |HR | PEA.L (A2) 00020aec 48 53 |HS | PEA.L (A3) 00020aee 48 54 |HT | PEA.L (A4) 00020af0 48 6e ff fd |Hn | PEA.L (A6-0x3) 00020af4 4e b9 00 02 22 1c |N " | JSR exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 00020afa de fc 00 18 | | ADDA.W #0x18,A7 00020afe 60 5c |`\ | BRA 0x20b5c 00020b00 switch@0x20ac2[0x5]: 00020b00 48 50 |HP | PEA.L (A0) 00020b02 48 51 |HQ | PEA.L (A1) 00020b04 48 52 |HR | PEA.L (A2) 00020b06 48 53 |HS | PEA.L (A3) 00020b08 48 54 |HT | PEA.L (A4) 00020b0a 48 6e ff fd |Hn | PEA.L (A6-0x3) 00020b0e 4e b9 00 02 22 9e |N " | JSR exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 00020b14 60 e4 |` | BRA 0x20afa 00020b16 switch@0x20ac2[0x0]: 00020b16 48 50 |HP | PEA.L (A0) 00020b18 48 51 |HQ | PEA.L (A1) 00020b1a 48 52 |HR | PEA.L (A2) 00020b1c 48 53 |HS | PEA.L (A3) 00020b1e 48 54 |HT | PEA.L (A4) 00020b20 48 6e ff fd |Hn | PEA.L (A6-0x3) 00020b24 4e b9 00 02 21 cc |N ! | JSR exp_READ_NOVRAM_DATA.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 00020b2a 60 ce |` | BRA 0x20afa 00020b2c switch@0x20ac2[0x1]: 00020b2c 48 50 |HP | PEA.L (A0) 00020b2e 48 51 |HQ | PEA.L (A1) 00020b30 48 52 |HR | PEA.L (A2) 00020b32 48 53 |HS | PEA.L (A3) 00020b34 48 54 |HT | PEA.L (A4) 00020b36 48 6e ff fd |Hn | PEA.L (A6-0x3) 00020b3a 4e b9 00 02 21 4a |N !J | JSR exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr) 00020b40 60 b8 |` | BRA 0x20afa 00020b42 switch@0x20ac2[0xa]: 00020b42 switch@0x20ac2[0xb]: 00020b42 switch@0x20ac2[0xc]: 00020b42 switch@0x20ac2[0xd]: 00020b42 1f 00 | | MOVE.B D0,-(A7) 00020b44 48 50 |HP | PEA.L (A0) 00020b46 48 51 |HQ | PEA.L (A1) 00020b48 48 52 |HR | PEA.L (A2) 00020b4a 48 53 |HS | PEA.L (A3) 00020b4c 48 54 |HT | PEA.L (A4) 00020b4e 48 6e ff fd |Hn | PEA.L (A6-0x3) 00020b52 4e b9 00 02 24 44 |N $D | JSR 0x22444 00020b58 de fc 00 1a | | ADDA.W #0x1a,A7 00020b5c c1 fc 00 0e | | MULS.W #0xe,D0 00020b60 42 81 |B | CLR.L D1 00020b62 12 10 | | MOVE.B (A0),D1 00020b64 3b 81 00 18 |; | MOVE.W D1,(A5+D0.W+#0x18) 00020b68 42 81 |B | CLR.L D1 00020b6a 12 11 | | MOVE.B (A1),D1 00020b6c e1 41 | A | ASL.W #0x8,D1 00020b6e 42 82 |B | CLR.L D2 00020b70 14 2e ff f8 | . | MOVE.B (A6-0x8),D2 00020b74 d4 41 | A | ADD.W D1,D2 00020b76 3b 82 00 1a |; | MOVE.W D2,(A5+D0.W+#0x1a) 00020b7a 42 81 |B | CLR.L D1 00020b7c 12 12 | | MOVE.B (A2),D1 00020b7e 3b 81 00 1c |; | MOVE.W D1,(A5+D0.W+#0x1c) 00020b82 42 81 |B | CLR.L D1 00020b84 12 13 | | MOVE.B (A3),D1 00020b86 3b 81 00 1e |; | MOVE.W D1,(A5+D0.W+#0x1e) 00020b8a 55 4f |UO | SUBQ.L #0x2,A7 00020b8c 1e 94 | | MOVE.B (A4),(A7) 00020b8e 1f 6e ff fc 00 01 | n | MOVE.B (A6-0x4),(A7+0x1) 00020b94 48 75 00 20 |Hu | PEA.L (A5+D0.W+#0x20) 00020b98 4e ba fa 9a |N | JSR 0x20634 00020b9c 5c 4f |\O | ADDQ.L #0x6,A7 00020b9e 12 2e ff fd | . | MOVE.B (A6-0x3),D1 00020ba2 48 81 |H | EXTB.W D1 00020ba4 43 bc 00 01 |C | CHK.W #0x1,D1 00020ba8 1b 81 00 24 | $ | MOVE.B D1,(A5+D0.W+#0x24) 00020bac 4c df 1f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3+A4 00020bb0 4e 5e |N^ | UNLK A6 00020bb2 4e 75 |Nu | RTS 00020bb4 ; -------------------------------------------------------------------------------------- 00020bb4 ; OMSI PASCAL Function 00020bb4 ; <LVAR -0x006 @> 00020bb4 ; -------------------------------------------------------------------------------------- 00020bb4 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 00020bb8 bf d5 | | CMPA.L (A5),A7 00020bba 62 06 |b | BHI 0x20bc2 00020bbc 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020bc0 4e 76 |Nv | TRAPV 00020bc2 de fc 00 42 | B | ADDA.W #0x42,A7 00020bc6 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 00020bca 43 fa fe b8 |C | LEA.L 0x20a84,A1 00020bce 4e ba fc 4a |N J | JSR 0x2081a 00020bd2 1f 3c 00 06 | < | MOVE.B #0x06,-(A7) 00020bd6 4e 91 |N | JSR (A1) 00020bd8 1e bc 00 07 | | MOVE.B #0x07,(A7) 00020bdc 4e 91 |N | JSR (A1) 00020bde 1e bc 00 03 | | MOVE.B #0x03,(A7) 00020be2 4e 91 |N | JSR (A1) 00020be4 1e bc 00 02 | | MOVE.B #0x02,(A7) 00020be8 4e 91 |N | JSR (A1) 00020bea 54 4f |TO | ADDQ.L #0x2,A7 00020bec 7e 0c |~ | MOVEQ.L #0x0c,D7 00020bee 55 4f |UO | SUBQ.L #0x2,A7 00020bf0 1f 07 | | MOVE.B D7,-(A7) 00020bf2 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00020bf8 54 4f |TO | ADDQ.L #0x2,A7 00020bfa 4a 1f |J | TST.B (A7)+ 00020bfc 67 06 |g | BEQ 0x20c04 00020bfe 1f 07 | | MOVE.B D7,-(A7) 00020c00 4e 91 |N | JSR (A1) 00020c02 54 4f |TO | ADDQ.L #0x2,A7 00020c04 52 07 |R | ADDQ.B #0x1,D7 00020c06 0c 07 00 0f | | CMPI.B #0x0f,D7 00020c0a 6f e2 |o | BLE 0x20bee 00020c0c 55 4f |UO | SUBQ.L #0x2,A7 00020c0e 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00020c14 4a 1f |J | TST.B (A7)+ 00020c16 66 0c |f | BNE 0x20c24 00020c18 55 4f |UO | SUBQ.L #0x2,A7 00020c1a 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 00020c20 4a 1f |J | TST.B (A7)+ 00020c22 67 68 |gh | BEQ 0x20c8c 00020c24 48 78 00 00 |Hx | PEA.L 0x0 00020c28 48 6e ff fa |Hn | PEA.L (A6-0x6) 00020c2c 4e b9 00 02 20 78 |N x | JSR 0x22078 00020c32 50 4f |PO | ADDQ.L #0x8,A7 00020c34 4e ba fd 1c |N | JSR 0x20952 00020c38 59 4f |YO | SUBQ.L #0x4,A7 00020c3a 4e b9 00 02 20 4e |N N | JSR 0x2204e 00020c40 2c 1f |, | MOVE.L (A7)+,D6 00020c42 66 32 |f2 | BNE 0x20c76 00020c44 41 fa f5 30 |A 0 | LEA.L 0x20176,A0 00020c48 70 0e |p | MOVEQ.L #0x0e,D0 00020c4a 3f 20 |? | MOVE.W -(A0),-(A7) 00020c4c 51 c8 ff fc |Q | DBF D0,0x20c4a 00020c50 59 4f |YO | SUBQ.L #0x4,A7 00020c52 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020c56 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020c5a 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00020c5e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020c64 50 4f |PO | ADDQ.L #0x8,A7 00020c66 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00020c6c de fc 00 22 | " | ADDA.W #0x22,A7 00020c70 42 ad 00 f8 |B | CLR.L (A5+0xf8) 00020c74 60 16 |` | BRA 0x20c8c 00020c76 2f 06 |/ | MOVE.L D6,-(A7) 00020c78 41 ed 00 f8 |A | LEA.L (A5+0xf8),A0 00020c7c 2f 08 |/ | MOVE.L A0,-(A7) 00020c7e 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020c82 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00020c88 de fc 00 0a | | ADDA.W #0xa,A7 00020c8c 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 00020c90 4e 5e |N^ | UNLK A6 00020c92 4e 75 |Nu | RTS 00020c94 ; -------------------------------------------------------------------------------------- 00020c94 ; OMSI PASCAL Function 00020c94 ; <LVAR 0x00a 4(r)> 00020c94 ; <LVAR 0x008 2(r)> 00020c94 ; -------------------------------------------------------------------------------------- 00020c94 4e 56 ff f0 |NV | LINK.W A6,#0xfff0 ; Spelunked 00020c98 bf d5 | | CMPA.L (A5),A7 00020c9a 62 06 |b | BHI 0x20ca2 00020c9c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020ca0 4e 76 |Nv | TRAPV 00020ca2 de fc 00 0e | | ADDA.W #0xe,A7 00020ca6 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00020caa 2f 2e 00 0a |/. | MOVE.L (A6+0xa),-(A7) 00020cae 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7) 00020cb2 4e b9 00 01 05 98 |N | JSR WriteConfig(what: Word; where : Long) 00020cb8 5c 4f |\O | ADDQ.L #0x6,A7 00020cba 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00020cbe 48 c0 |H | EXTW.L D0 00020cc0 d1 94 | | ADD.L D0,(A4) 00020cc2 4c df 00 01 |L | MOVEM.L (A7)+,D0 00020cc6 4e 5e |N^ | UNLK A6 00020cc8 4e 75 |Nu | RTS 00020cca ; -------------------------------------------------------------------------------------- 00020cca ; OMSI PASCAL Function 00020cca ; <LVAR 0x010 1(r)> 00020cca ; <LVAR 0x00f 1(r)> 00020cca ; <LVAR 0x00e 1(r)> 00020cca ; <LVAR 0x00c 1(r)> 00020cca ; <LVAR 0x00a 1(r)> 00020cca ; <LVAR 0x009 1(r)> 00020cca ; <LVAR 0x008 1(r)> 00020cca ; <LVAR -0x006 @ 4(rw)> 00020cca ; -------------------------------------------------------------------------------------- 00020cca 4e 56 ff dc |NV | LINK.W A6,#0xffdc 00020cce bf d5 | | CMPA.L (A5),A7 00020cd0 62 06 |b | BHI 0x20cd8 00020cd2 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020cd6 4e 76 |Nv | TRAPV 00020cd8 de fc 00 1e | | ADDA.W #0x1e,A7 00020cdc 48 e7 81 c8 |H | MOVEM.L A4+A1+A0+D7+D0,-(A7) 00020ce0 41 ee ff fa |A | LEA.L (A6-0x6),A0 00020ce4 43 fa ff ae |C | LEA.L 0x20c94,A1 00020ce8 20 bc 00 00 00 56 | V | MOVE.L #0x56,(A0) 00020cee 48 78 01 01 |Hx | PEA.L 0x101 00020cf2 42 80 |B | CLR.L D0 00020cf4 10 2e 00 10 | . | MOVE.B (A6+0x10),D0 00020cf8 3f 00 |? | MOVE.W D0,-(A7) 00020cfa 28 48 |(H | MOVEA.L A0,A4 00020cfc 4e 91 |N | JSR (A1) 00020cfe 5c 4f |\O | ADDQ.L #0x6,A7 00020d00 48 78 01 02 |Hx | PEA.L 0x102 00020d04 42 80 |B | CLR.L D0 00020d06 10 2e 00 0e | . | MOVE.B (A6+0xe),D0 00020d0a 3f 00 |? | MOVE.W D0,-(A7) 00020d0c 28 48 |(H | MOVEA.L A0,A4 00020d0e 4e 91 |N | JSR (A1) 00020d10 5c 4f |\O | ADDQ.L #0x6,A7 00020d12 48 78 01 03 |Hx | PEA.L 0x103 00020d16 42 80 |B | CLR.L D0 00020d18 10 2e 00 0f | . | MOVE.B (A6+0xf),D0 00020d1c 3f 00 |? | MOVE.W D0,-(A7) 00020d1e 28 48 |(H | MOVEA.L A0,A4 00020d20 4e 91 |N | JSR (A1) 00020d22 5c 4f |\O | ADDQ.L #0x6,A7 00020d24 48 78 01 04 |Hx | PEA.L 0x104 00020d28 42 80 |B | CLR.L D0 00020d2a 10 2e 00 0c | . | MOVE.B (A6+0xc),D0 00020d2e 3f 00 |? | MOVE.W D0,-(A7) 00020d30 28 48 |(H | MOVEA.L A0,A4 00020d32 4e 91 |N | JSR (A1) 00020d34 5c 4f |\O | ADDQ.L #0x6,A7 00020d36 48 78 01 05 |Hx | PEA.L 0x105 00020d3a 42 80 |B | CLR.L D0 00020d3c 10 2e 00 0a | . | MOVE.B (A6+0xa),D0 00020d40 3f 00 |? | MOVE.W D0,-(A7) 00020d42 28 48 |(H | MOVEA.L A0,A4 00020d44 4e 91 |N | JSR (A1) 00020d46 5c 4f |\O | ADDQ.L #0x6,A7 00020d48 48 78 01 06 |Hx | PEA.L 0x106 00020d4c 42 80 |B | CLR.L D0 00020d4e 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00020d52 3f 00 |? | MOVE.W D0,-(A7) 00020d54 28 48 |(H | MOVEA.L A0,A4 00020d56 4e 91 |N | JSR (A1) 00020d58 5c 4f |\O | ADDQ.L #0x6,A7 00020d5a 48 78 01 07 |Hx | PEA.L 0x107 00020d5e 42 80 |B | CLR.L D0 00020d60 10 2e 00 09 | . | MOVE.B (A6+0x9),D0 00020d64 3f 00 |? | MOVE.W D0,-(A7) 00020d66 28 48 |(H | MOVEA.L A0,A4 00020d68 4e 91 |N | JSR (A1) 00020d6a 5c 4f |\O | ADDQ.L #0x6,A7 00020d6c 20 10 | | MOVE.L (A0),D0 00020d6e 44 80 |D | NEG.L D0 00020d70 02 80 00 00 00 ff | | ANDI.L #0x000000ff,D0 00020d76 3e 00 |> | MOVE.W D0,D7 00020d78 48 78 01 08 |Hx | PEA.L 0x108 00020d7c 3f 07 |? | MOVE.W D7,-(A7) 00020d7e 28 48 |(H | MOVEA.L A0,A4 00020d80 4e 91 |N | JSR (A1) 00020d82 5c 4f |\O | ADDQ.L #0x6,A7 00020d84 4c df 13 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1+A4 00020d88 4e 5e |N^ | UNLK A6 00020d8a 4e 75 |Nu | RTS 00020d8c ; -------------------------------------------------------------------------------------- 00020d8c ; OMSI PASCAL Function 00020d8c ; <LVAR -0x008 @ 4(r)> 00020d8c ; -------------------------------------------------------------------------------------- 00020d8c 4e 56 ff 8e |NV | LINK.W A6,#0xff8e 00020d90 bf d5 | | CMPA.L (A5),A7 00020d92 62 06 |b | BHI 0x20d9a 00020d94 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020d98 4e 76 |Nv | TRAPV 00020d9a de fc 00 6a | j | ADDA.W #0x6a,A7 00020d9e 48 e7 e1 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D2+D1+D0,-(A7) 00020da2 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00020da8 47 ee ff f8 |G | LEA.L (A6-0x8),A3 00020dac 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 00020db2 72 01 |r | MOVEQ.L #0x01,D1 00020db4 74 03 |t | MOVEQ.L #0x03,D2 00020db6 9e fc 00 36 | 6 | SUBA.W #0x36,A7 00020dba 20 4f | O | MOVEA.L A7,A0 00020dbc 43 fa f3 b8 |C | LEA.L 0x20176,A1 00020dc0 70 34 |p4 | MOVEQ.L #0x34,D0 00020dc2 10 d9 | | MOVE.B (A1)+,(A0)+ 00020dc4 51 c8 ff fc |Q | DBF D0,0x20dc2 00020dc8 59 4f |YO | SUBQ.L #0x4,A7 00020dca 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020dce 3f 01 |? | MOVE.W D1,-(A7) 00020dd0 3f 3c 00 35 |?< 5 | MOVE.W #0x35,-(A7) 00020dd4 4e 92 |N | JSR (A2) 00020dd6 50 4f |PO | ADDQ.L #0x8,A7 00020dd8 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00020dde de fc 00 3a | : | ADDA.W #0x3a,A7 00020de2 55 4f |UO | SUBQ.L #0x2,A7 00020de4 4e b9 00 02 1f d0 |N | JSR 0x21fd0 00020dea 10 1f | | MOVE.B (A7)+,D0 00020dec b0 01 | | CMP.B D1,D0 00020dee 66 02 |f | BNE 0x20df2 00020df0 60 f0 |` | BRA 0x20de2 00020df2 48 78 4c 4b |HxLK | PEA.L 0x4c4b 00020df6 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 00020dfc 1e ba f3 ae | | MOVE.B 0x201ac,(A7) 00020e00 1f 7a f3 ab 00 01 | z | MOVE.B 0x201ad,(A7+0x1) 00020e06 1f 7a f3 a6 00 02 | z | MOVE.B 0x201ae,(A7+0x2) 00020e0c 59 4f |YO | SUBQ.L #0x4,A7 00020e0e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020e12 3f 01 |? | MOVE.W D1,-(A7) 00020e14 3f 02 |? | MOVE.W D2,-(A7) 00020e16 4e 92 |N | JSR (A2) 00020e18 50 4f |PO | ADDQ.L #0x8,A7 00020e1a 4e 94 |N | JSR (A4) 00020e1c 50 4f |PO | ADDQ.L #0x8,A7 00020e1e 48 78 00 00 |Hx | PEA.L 0x0 00020e22 48 53 |HS | PEA.L (A3) 00020e24 4e b9 00 02 20 a0 |N | JSR 0x220a0 00020e2a 50 4f |PO | ADDQ.L #0x8,A7 00020e2c 7e 00 |~ | MOVEQ.L #0x00,D7 00020e2e 4a 93 |J | TST.L (A3) 00020e30 67 6c |gl | BEQ 0x20e9e 00020e32 20 13 | | MOVE.L (A3),D0 00020e34 0c 80 00 00 00 02 | | CMPI.L #0x00000002,D0 00020e3a 67 62 |gb | BEQ 0x20e9e 00020e3c 41 fa f3 92 |A | LEA.L 0x201d0,A0 00020e40 70 07 |p | MOVEQ.L #0x07,D0 00020e42 2f 20 |/ | MOVE.L -(A0),-(A7) 00020e44 51 c8 ff fc |Q | DBF D0,0x20e42 00020e48 51 4f |QO | SUBQ.L #0x8,A7 00020e4a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020e4e 3f 01 |? | MOVE.W D1,-(A7) 00020e50 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7) 00020e54 4e 92 |N | JSR (A2) 00020e56 2e 93 |. | MOVE.L (A3),(A7) 00020e58 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00020e5e 58 4f |XO | ADDQ.L #0x4,A7 00020e60 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020e66 50 4f |PO | ADDQ.L #0x8,A7 00020e68 4e 94 |N | JSR (A4) 00020e6a 20 4f | O | MOVEA.L A7,A0 00020e6c 43 fa f3 62 |C b | LEA.L 0x201d0,A1 00020e70 70 22 |p" | MOVEQ.L #0x22,D0 00020e72 10 d9 | | MOVE.B (A1)+,(A0)+ 00020e74 51 c8 ff fc |Q | DBF D0,0x20e72 00020e78 5d 4f |]O | SUBQ.L #0x6,A7 00020e7a 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020e7e 3f 01 |? | MOVE.W D1,-(A7) 00020e80 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 00020e84 4e 92 |N | JSR (A2) 00020e86 5c 4f |\O | ADDQ.L #0x6,A7 00020e88 1e 81 | | MOVE.B D1,(A7) 00020e8a 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00020e90 5c 4f |\O | ADDQ.L #0x6,A7 00020e92 10 1f | | MOVE.B (A7)+,D0 00020e94 48 80 |H | EXTB.W D0 00020e96 41 81 |A | CHK.W D1,D0 00020e98 de fc 00 24 | $ | ADDA.W #0x24,A7 00020e9c 1e 00 | | MOVE.B D0,D7 00020e9e 4a 07 |J | TST.B D7 00020ea0 66 00 ff 7c |f | | BNE 0x20e1e 00020ea4 41 fa f3 82 |A | LEA.L 0x20228,A0 00020ea8 70 0c |p | MOVEQ.L #0x0c,D0 00020eaa 2f 20 |/ | MOVE.L -(A0),-(A7) 00020eac 51 c8 ff fc |Q | DBF D0,0x20eaa 00020eb0 59 4f |YO | SUBQ.L #0x4,A7 00020eb2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020eb6 3f 01 |? | MOVE.W D1,-(A7) 00020eb8 3f 3c 00 34 |?< 4 | MOVE.W #0x34,-(A7) 00020ebc 4e 92 |N | JSR (A2) 00020ebe 50 4f |PO | ADDQ.L #0x8,A7 00020ec0 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00020ec6 de fc 00 38 | 8 | ADDA.W #0x38,A7 00020eca 55 4f |UO | SUBQ.L #0x2,A7 00020ecc 4e b9 00 02 1f d0 |N | JSR 0x21fd0 00020ed2 4a 1f |J | TST.B (A7)+ 00020ed4 66 02 |f | BNE 0x20ed8 00020ed6 60 f2 |` | BRA 0x20eca 00020ed8 59 4f |YO | SUBQ.L #0x4,A7 00020eda 1e ba f3 4c | L | MOVE.B 0x20228,(A7) 00020ede 1f 7a f3 49 00 01 | z I | MOVE.B 0x20229,(A7+0x1) 00020ee4 1f 7a f3 44 00 02 | z D | MOVE.B 0x2022a,(A7+0x2) 00020eea 59 4f |YO | SUBQ.L #0x4,A7 00020eec 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020ef0 3f 01 |? | MOVE.W D1,-(A7) 00020ef2 3f 02 |? | MOVE.W D2,-(A7) 00020ef4 4e 92 |N | JSR (A2) 00020ef6 50 4f |PO | ADDQ.L #0x8,A7 00020ef8 4e 94 |N | JSR (A4) 00020efa 50 4f |PO | ADDQ.L #0x8,A7 00020efc 4c df 1f 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1+A2+A3+A4 00020f00 4e 5e |N^ | UNLK A6 00020f02 4e 75 |Nu | RTS 00020f04 ; -------------------------------------------------------------------------------------- 00020f04 ; OMSI PASCAL Function 00020f04 ; <LVAR 0x00a 4(r)> 00020f04 ; <LVAR 0x008 2(r)> 00020f04 ; -------------------------------------------------------------------------------------- 00020f04 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 ; Spelunked 00020f08 bf d5 | | CMPA.L (A5),A7 00020f0a 62 06 |b | BHI 0x20f12 00020f0c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020f10 4e 76 |Nv | TRAPV 00020f12 de fc 00 16 | | ADDA.W #0x16,A7 00020f16 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00020f1a 41 ee 00 08 |A | LEA.L (A6+0x8),A0 00020f1e 2f 08 |/ | MOVE.L A0,-(A7) 00020f20 52 97 |R | ADDQ.L #0x1,(A7) 00020f22 20 14 | | MOVE.L (A4),D0 00020f24 d0 ae 00 0a | | ADD.L (A6+0xa),D0 00020f28 2f 00 |/ | MOVE.L D0,-(A7) 00020f2a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020f2e 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00020f34 de fc 00 0a | | ADDA.W #0xa,A7 00020f38 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00020f3c 48 c0 |H | EXTW.L D0 00020f3e d1 ac 00 04 | | ADD.L D0,(A4+0x4) 00020f42 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00020f46 4e 5e |N^ | UNLK A6 00020f48 4e 75 |Nu | RTS 00020f4a ; -------------------------------------------------------------------------------------- 00020f4a ; OMSI PASCAL Function 00020f4a ; <LVAR 0x010 1(r)> 00020f4a ; <LVAR 0x00f 1(r)> 00020f4a ; <LVAR 0x00e 1(r)> 00020f4a ; <LVAR 0x00c 1(r)> 00020f4a ; <LVAR 0x00a 1(r)> 00020f4a ; <LVAR 0x009 1(r)> 00020f4a ; <LVAR 0x008 1(r)> 00020f4a ; <LVAR -0x006 4(rw)> 00020f4a ; <LVAR -0x00a @ 4(w)> 00020f4a ; -------------------------------------------------------------------------------------- 00020f4a 4e 56 ff b0 |NV | LINK.W A6,#0xffb0 00020f4e bf d5 | | CMPA.L (A5),A7 00020f50 62 06 |b | BHI 0x20f58 00020f52 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020f56 4e 76 |Nv | TRAPV 00020f58 de fc 00 46 | F | ADDA.W #0x46,A7 00020f5c 48 e7 81 e8 |H | MOVEM.L A4+A2+A1+A0+D7+D0,-(A7) 00020f60 43 ee ff f6 |C | LEA.L (A6-0xa),A1 00020f64 45 fa ff 9e |E | LEA.L 0x20f04,A2 00020f68 59 4f |YO | SUBQ.L #0x4,A7 00020f6a 4e b9 00 02 20 24 |N $ | JSR 0x22024 00020f70 22 9f |" | MOVE.L (A7)+,(A1) 00020f72 66 30 |f0 | BNE 0x20fa4 00020f74 41 fa f2 d2 |A | LEA.L 0x20248,A0 00020f78 70 06 |p | MOVEQ.L #0x06,D0 00020f7a 2f 20 |/ | MOVE.L -(A0),-(A7) 00020f7c 51 c8 ff fc |Q | DBF D0,0x20f7a 00020f80 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00020f84 59 4f |YO | SUBQ.L #0x4,A7 00020f86 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020f8a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020f8e 3f 3c 00 1c |?< | MOVE.W #0x1c,-(A7) 00020f92 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020f98 50 4f |PO | ADDQ.L #0x8,A7 00020f9a 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020fa0 de fc 00 22 | " | ADDA.W #0x22,A7 00020fa4 2d 7c 00 00 00 56 ff fa |-| V | MOVE.L #0x56,(A6-0x6) 00020fac 48 78 00 00 |Hx | PEA.L 0x0 00020fb0 42 80 |B | CLR.L D0 00020fb2 10 2e 00 10 | . | MOVE.B (A6+0x10),D0 00020fb6 3f 00 |? | MOVE.W D0,-(A7) 00020fb8 28 49 |(I | MOVEA.L A1,A4 00020fba 4e 92 |N | JSR (A2) 00020fbc 5c 4f |\O | ADDQ.L #0x6,A7 00020fbe 48 78 00 01 |Hx | PEA.L 0x1 00020fc2 42 80 |B | CLR.L D0 00020fc4 10 2e 00 0e | . | MOVE.B (A6+0xe),D0 00020fc8 3f 00 |? | MOVE.W D0,-(A7) 00020fca 28 49 |(I | MOVEA.L A1,A4 00020fcc 4e 92 |N | JSR (A2) 00020fce 5c 4f |\O | ADDQ.L #0x6,A7 00020fd0 48 78 00 02 |Hx | PEA.L 0x2 00020fd4 42 80 |B | CLR.L D0 00020fd6 10 2e 00 0f | . | MOVE.B (A6+0xf),D0 00020fda 3f 00 |? | MOVE.W D0,-(A7) 00020fdc 28 49 |(I | MOVEA.L A1,A4 00020fde 4e 92 |N | JSR (A2) 00020fe0 5c 4f |\O | ADDQ.L #0x6,A7 00020fe2 48 78 00 03 |Hx | PEA.L 0x3 00020fe6 42 80 |B | CLR.L D0 00020fe8 10 2e 00 0c | . | MOVE.B (A6+0xc),D0 00020fec 3f 00 |? | MOVE.W D0,-(A7) 00020fee 28 49 |(I | MOVEA.L A1,A4 00020ff0 4e 92 |N | JSR (A2) 00020ff2 5c 4f |\O | ADDQ.L #0x6,A7 00020ff4 48 78 00 04 |Hx | PEA.L 0x4 00020ff8 42 80 |B | CLR.L D0 00020ffa 10 2e 00 0a | . | MOVE.B (A6+0xa),D0 00020ffe 3f 00 |? | MOVE.W D0,-(A7) 00021000 28 49 |(I | MOVEA.L A1,A4 00021002 4e 92 |N | JSR (A2) 00021004 5c 4f |\O | ADDQ.L #0x6,A7 00021006 48 78 00 05 |Hx | PEA.L 0x5 0002100a 42 80 |B | CLR.L D0 0002100c 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00021010 3f 00 |? | MOVE.W D0,-(A7) 00021012 28 49 |(I | MOVEA.L A1,A4 00021014 4e 92 |N | JSR (A2) 00021016 5c 4f |\O | ADDQ.L #0x6,A7 00021018 48 78 00 06 |Hx | PEA.L 0x6 0002101c 42 80 |B | CLR.L D0 0002101e 10 2e 00 09 | . | MOVE.B (A6+0x9),D0 00021022 3f 00 |? | MOVE.W D0,-(A7) 00021024 28 49 |(I | MOVEA.L A1,A4 00021026 4e 92 |N | JSR (A2) 00021028 5c 4f |\O | ADDQ.L #0x6,A7 0002102a 20 2e ff fa | . | MOVE.L (A6-0x6),D0 0002102e 44 80 |D | NEG.L D0 00021030 02 80 00 00 00 ff | | ANDI.L #0x000000ff,D0 00021036 3e 00 |> | MOVE.W D0,D7 00021038 48 78 00 07 |Hx | PEA.L 0x7 0002103c 3f 07 |? | MOVE.W D7,-(A7) 0002103e 28 49 |(I | MOVEA.L A1,A4 00021040 4e 92 |N | JSR (A2) 00021042 5c 4f |\O | ADDQ.L #0x6,A7 00021044 4e ba fd 46 |N F | JSR 0x20d8c 00021048 4c df 17 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1+A2+A4 0002104c 4e 5e |N^ | UNLK A6 0002104e 4e 75 |Nu | RTS 00021050 ; -------------------------------------------------------------------------------------- 00021050 ; OMSI PASCAL Function 00021050 ; <LVAR 0x008 1(r)> 00021050 ; <LVAR -0x004 1(rw)> 00021050 ; <LVAR -0x005 1(rw)> 00021050 ; <LVAR -0x006 1(rw)> 00021050 ; <LVAR -0x007 1(rw)> 00021050 ; <LVAR -0x008 1(rw)> 00021050 ; <LVAR -0x009 1(rw)> 00021050 ; <LVAR -0x00a 1(rw)> 00021050 ; -------------------------------------------------------------------------------------- 00021050 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 00021054 bf d5 | | CMPA.L (A5),A7 00021056 62 06 |b | BHI 0x2105e 00021058 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002105c 4e 76 |Nv | TRAPV 0002105e de fc 00 3e | > | ADDA.W #0x3e,A7 00021062 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00021066 41 ee ff f6 |A | LEA.L (A6-0xa),A0 0002106a 43 ee ff f7 |C | LEA.L (A6-0x9),A1 0002106e 45 ee ff f8 |E | LEA.L (A6-0x8),A2 00021072 47 ee ff f9 |G | LEA.L (A6-0x7),A3 00021076 49 ee ff fa |I | LEA.L (A6-0x6),A4 0002107a 3a 3c 00 ff |:< | MOVE.W #0xff,D5 0002107e 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00021082 48 80 |H | EXTB.W D0 00021084 72 0e |r | MOVEQ.L #0x0e,D1 00021086 c3 c0 | | MULS.W D0,D1 00021088 34 35 10 18 |45 | MOVE.W (A5+D1.W+#0x18),D2 0002108c 45 85 |E | CHK.W D5,D2 0002108e 10 82 | | MOVE.B D2,(A0) 00021090 34 35 10 1a |45 | MOVE.W (A5+D1.W+#0x1a),D2 00021094 e0 4a | J | LSR.W #0x8,D2 00021096 12 82 | | MOVE.B D2,(A1) 00021098 34 35 10 1a |45 | MOVE.W (A5+D1.W+#0x1a),D2 0002109c c4 45 | E | AND.W D5,D2 0002109e 14 82 | | MOVE.B D2,(A2) 000210a0 34 35 10 1c |45 | MOVE.W (A5+D1.W+#0x1c),D2 000210a4 45 85 |E | CHK.W D5,D2 000210a6 16 82 | | MOVE.B D2,(A3) 000210a8 34 35 10 1e |45 | MOVE.W (A5+D1.W+#0x1e),D2 000210ac 45 85 |E | CHK.W D5,D2 000210ae 18 82 | | MOVE.B D2,(A4) 000210b0 42 82 |B | CLR.L D2 000210b2 14 35 10 22 | 5 " | MOVE.B (A5+D1.W+#0x22),D2 000210b6 e2 0a | | LSR.B #0x1,D2 000210b8 e3 42 | B | ASL.W #0x1,D2 000210ba 36 35 10 22 |65 " | MOVE.W (A5+D1.W+#0x22),D3 000210be ef 4b | K | LSL.W #0x7,D3 000210c0 e0 4b | K | LSR.W #0x8,D3 000210c2 e8 4b | K | LSR.W #0x4,D3 000210c4 38 03 |8 | MOVE.W D3,D4 000210c6 e6 44 | D | ASR.W #0x3,D4 000210c8 02 44 00 01 | D | ANDI.W #0x0001,D4 000210cc d8 42 | B | ADD.W D2,D4 000210ce 1d 44 ff fb | D | MOVE.B D4,(A6-0x5) 000210d2 02 43 00 07 | C | ANDI.W #0x0007,D3 000210d6 eb 43 | C | ASL.W #0x5,D3 000210d8 42 82 |B | CLR.L D2 000210da 14 35 10 23 | 5 # | MOVE.B (A5+D1.W+#0x23),D2 000210de e7 0a | | LSL.B #0x3,D2 000210e0 e6 0a | | LSR.B #0x3,D2 000210e2 d4 43 | C | ADD.W D3,D2 000210e4 1d 42 ff fc | B | MOVE.B D2,(A6-0x4) 000210e8 32 00 |2 | MOVE.W D0,D1 000210ea 0c 41 00 0f | A | CMPI.W #0x000f,D1 000210ee 63 02 |c | BLS 0x210f2 000210f0 switch@0x210f4[0x1]: 000210f0 switch@0x210f4[0x5]: 000210f0 switch@0x210f4[0x8]: 000210f0 switch@0x210f4[0x9]: 000210f0 switch@0x210f4[0xa]: 000210f0 switch@0x210f4[0xb]: 000210f0 4e 4e |NN | TRAP #14 000210f2 d2 41 | A | ADD.W D1,D1 000210f4 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W 000210fc 00 20 | | .CONST 0x20 ; [0x0] -> 0x2111c 000210fe ff f4 | | .CONST 0xfff4 ; [0x1] -> 0x210f0 00021100 00 ce | | .CONST 0xce ; [0x2] -> 0x211ca 00021102 00 aa | | .CONST 0xaa ; [0x3] -> 0x211a6 00021104 00 46 | F | .CONST 0x46 ; [0x4] -> 0x21142 00021106 ff f4 | | .CONST 0xfff4 ; [0x5] -> 0x210f0 00021108 00 66 | f | .CONST 0x66 ; [0x6] -> 0x21162 0002110a 00 88 | | .CONST 0x88 ; [0x7] -> 0x21184 0002110c ff f4 | | .CONST 0xfff4 ; [0x8] -> 0x210f0 0002110e ff f4 | | .CONST 0xfff4 ; [0x9] -> 0x210f0 00021110 ff f4 | | .CONST 0xfff4 ; [0xa] -> 0x210f0 00021112 ff f4 | | .CONST 0xfff4 ; [0xb] -> 0x210f0 00021114 00 f2 | | .CONST 0xf2 ; [0xc] -> 0x211ee 00021116 00 f2 | | .CONST 0xf2 ; [0xd] -> 0x211ee 00021118 00 f2 | | .CONST 0xf2 ; [0xe] -> 0x211ee 0002111a 00 f2 | | .CONST 0xf2 ; [0xf] -> 0x211ee 0002111c switch@0x210f4[0x0]: 0002111c 1f 10 | | MOVE.B (A0),-(A7) 0002111e 55 4f |UO | SUBQ.L #0x2,A7 00021120 1e 91 | | MOVE.B (A1),(A7) 00021122 1f 52 00 01 | R | MOVE.B (A2),(A7+0x1) 00021126 1f 13 | | MOVE.B (A3),-(A7) 00021128 1f 14 | | MOVE.B (A4),-(A7) 0002112a 55 4f |UO | SUBQ.L #0x2,A7 0002112c 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 00021130 1f 6e ff fc 00 01 | n | MOVE.B (A6-0x4),(A7+0x1) 00021136 4e ba fe 12 |N | JSR 0x20f4a 0002113a de fc 00 0a | | ADDA.W #0xa,A7 0002113e 60 00 00 d4 |` | BRA 0x21214 00021142 switch@0x210f4[0x4]: 00021142 1f 10 | | MOVE.B (A0),-(A7) 00021144 55 4f |UO | SUBQ.L #0x2,A7 00021146 1e 91 | | MOVE.B (A1),(A7) 00021148 1f 52 00 01 | R | MOVE.B (A2),(A7+0x1) 0002114c 1f 13 | | MOVE.B (A3),-(A7) 0002114e 1f 14 | | MOVE.B (A4),-(A7) 00021150 55 4f |UO | SUBQ.L #0x2,A7 00021152 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 00021156 1f 6e ff fc 00 01 | n | MOVE.B (A6-0x4),(A7+0x1) 0002115c 4e ba fb 6c |N l | JSR 0x20cca 00021160 60 d8 |` | BRA 0x2113a 00021162 switch@0x210f4[0x6]: 00021162 1f 10 | | MOVE.B (A0),-(A7) 00021164 55 4f |UO | SUBQ.L #0x2,A7 00021166 1e 91 | | MOVE.B (A1),(A7) 00021168 1f 52 00 01 | R | MOVE.B (A2),(A7+0x1) 0002116c 1f 13 | | MOVE.B (A3),-(A7) 0002116e 1f 14 | | MOVE.B (A4),-(A7) 00021170 55 4f |UO | SUBQ.L #0x2,A7 00021172 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 00021176 1f 6e ff fc 00 01 | n | MOVE.B (A6-0x4),(A7+0x1) 0002117c 4e b9 00 02 21 f4 |N ! | JSR exp_WRITE_NOVRAM_DATA.TYP(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2) 00021182 60 b6 |` | BRA 0x2113a 00021184 switch@0x210f4[0x7]: 00021184 1f 10 | | MOVE.B (A0),-(A7) 00021186 55 4f |UO | SUBQ.L #0x2,A7 00021188 1e 91 | | MOVE.B (A1),(A7) 0002118a 1f 52 00 01 | R | MOVE.B (A2),(A7+0x1) 0002118e 1f 13 | | MOVE.B (A3),-(A7) 00021190 1f 14 | | MOVE.B (A4),-(A7) 00021192 55 4f |UO | SUBQ.L #0x2,A7 00021194 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 00021198 1f 6e ff fc 00 01 | n | MOVE.B (A6-0x4),(A7+0x1) 0002119e 4e b9 00 02 22 76 |N "v | JSR exp_WRITE_NOVRAM_DATA.VAL(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2) 000211a4 60 94 |` | BRA 0x2113a 000211a6 switch@0x210f4[0x3]: 000211a6 1f 10 | | MOVE.B (A0),-(A7) 000211a8 55 4f |UO | SUBQ.L #0x2,A7 000211aa 1e 91 | | MOVE.B (A1),(A7) 000211ac 1f 52 00 01 | R | MOVE.B (A2),(A7+0x1) 000211b0 1f 13 | | MOVE.B (A3),-(A7) 000211b2 1f 14 | | MOVE.B (A4),-(A7) 000211b4 55 4f |UO | SUBQ.L #0x2,A7 000211b6 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 000211ba 1f 6e ff fc 00 01 | n | MOVE.B (A6-0x4),(A7+0x1) 000211c0 4e b9 00 02 20 f0 |N | JSR exp_WRITE_NOVRAM_DATA.FIU(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2) 000211c6 60 00 ff 72 |` r | BRA 0x2113a 000211ca switch@0x210f4[0x2]: 000211ca 1f 10 | | MOVE.B (A0),-(A7) 000211cc 55 4f |UO | SUBQ.L #0x2,A7 000211ce 1e 91 | | MOVE.B (A1),(A7) 000211d0 1f 52 00 01 | R | MOVE.B (A2),(A7+0x1) 000211d4 1f 13 | | MOVE.B (A3),-(A7) 000211d6 1f 14 | | MOVE.B (A4),-(A7) 000211d8 55 4f |UO | SUBQ.L #0x2,A7 000211da 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 000211de 1f 6e ff fc 00 01 | n | MOVE.B (A6-0x4),(A7+0x1) 000211e4 4e b9 00 02 21 72 |N !r | JSR exp_WRITE_NOVRAM_DATA.SEQ(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2) 000211ea 60 00 ff 4e |` N | BRA 0x2113a 000211ee switch@0x210f4[0xc]: 000211ee switch@0x210f4[0xd]: 000211ee switch@0x210f4[0xe]: 000211ee switch@0x210f4[0xf]: 000211ee 1f 00 | | MOVE.B D0,-(A7) 000211f0 1f 10 | | MOVE.B (A0),-(A7) 000211f2 55 4f |UO | SUBQ.L #0x2,A7 000211f4 1e 91 | | MOVE.B (A1),(A7) 000211f6 1f 52 00 01 | R | MOVE.B (A2),(A7+0x1) 000211fa 1f 13 | | MOVE.B (A3),-(A7) 000211fc 1f 14 | | MOVE.B (A4),-(A7) 000211fe 55 4f |UO | SUBQ.L #0x2,A7 00021200 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 00021204 1f 6e ff fc 00 01 | n | MOVE.B (A6-0x4),(A7+0x1) 0002120a 4e b9 00 02 23 24 |N #$ | JSR 0x22324 00021210 de fc 00 0c | | ADDA.W #0xc,A7 00021214 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00021218 4e 5e |N^ | UNLK A6 0002121a 4e 75 |Nu | RTS 0002121c ; -------------------------------------------------------------------------------------- 0002121c ; OMSI PASCAL Function 0002121c ; <LVAR 0x018 2(w)> 0002121c ; <LVAR 0x014 @ 4(r)> 0002121c ; <LVAR 0x010 4(r)> 0002121c ; <LVAR 0x00c 4(r)> 0002121c ; <LVAR 0x008 4(r)> 0002121c ; <LVAR -0x006 @ 4(rw)> 0002121c ; <LVAR -0x00a @ 4(rw)> 0002121c ; <LVAR -0x00c @ 1(rw)> 0002121c ; -------------------------------------------------------------------------------------- 0002121c 4e 56 ff 7c |NV | | LINK.W A6,#0xff7c 00021220 bf d5 | | CMPA.L (A5),A7 00021222 62 06 |b | BHI 0x2122a 00021224 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021228 4e 76 |Nv | TRAPV 0002122a de fc 00 78 | x | ADDA.W #0x78,A7 0002122e 48 e7 f8 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7) 00021232 43 ee ff f4 |C | LEA.L (A6-0xc),A1 00021236 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 0002123c 47 ee ff f6 |G | LEA.L (A6-0xa),A3 00021240 49 ee ff fa |I | LEA.L (A6-0x6),A4 00021244 72 01 |r | MOVEQ.L #0x01,D1 00021246 74 0c |t | MOVEQ.L #0x0c,D2 00021248 76 02 |v | MOVEQ.L #0x02,D3 0002124a 78 04 |x | MOVEQ.L #0x04,D4 0002124c 3f 3a f0 20 |?: | MOVE.W 0x2026e,-(A7) 00021250 2f 3a f0 1e |/: | MOVE.L 0x20270,-(A7) 00021254 9e c2 | | SUBA.W D2,A7 00021256 2f 2e 00 14 |/. | MOVE.L (A6+0x14),-(A7) 0002125a 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00021260 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00021264 3f 01 |? | MOVE.W D1,-(A7) 00021266 3f 03 |? | MOVE.W D3,-(A7) 00021268 4e 92 |N | JSR (A2) 0002126a 2e ae 00 10 |. | MOVE.L (A6+0x10),(A7) 0002126e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021274 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00021278 3f 01 |? | MOVE.W D1,-(A7) 0002127a 3f 04 |? | MOVE.W D4,-(A7) 0002127c 4e 92 |N | JSR (A2) 0002127e 50 4f |PO | ADDQ.L #0x8,A7 00021280 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00021286 de fc 00 10 | | ADDA.W #0x10,A7 0002128a 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00021290 58 4f |XO | ADDQ.L #0x4,A7 00021292 26 9f |& | MOVE.L (A7)+,(A3) 00021294 5c 4f |\O | ADDQ.L #0x6,A7 00021296 20 53 | S | MOVEA.L (A3),A0 00021298 4a 50 |JP | TST.W (A0) 0002129a 66 12 |f | BNE 0x212ae 0002129c 12 81 | | MOVE.B D1,(A1) 0002129e 28 ae 00 10 |( | MOVE.L (A6+0x10),(A4) 000212a2 48 53 |HS | PEA.L (A3) 000212a4 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000212aa 58 4f |XO | ADDQ.L #0x4,A7 000212ac 60 24 |`$ | BRA 0x212d2 000212ae 2f 13 |/ | MOVE.L (A3),-(A7) 000212b0 48 51 |HQ | PEA.L (A1) 000212b2 48 54 |HT | PEA.L (A4) 000212b4 4e b9 00 01 02 ec |N | JSR String2Long(src : String; VAR status : Bool; VAR retval : Long) 000212ba de c2 | | ADDA.W D2,A7 000212bc 4a 11 |J | TST.B (A1) 000212be 67 12 |g | BEQ 0x212d2 000212c0 42 11 |B | CLR.B (A1) 000212c2 20 14 | | MOVE.L (A4),D0 000212c4 b0 ae 00 0c | | CMP.L (A6+0xc),D0 000212c8 6d 08 |m | BLT 0x212d2 000212ca b0 ae 00 08 | | CMP.L (A6+0x8),D0 000212ce 6e 02 |n | BGT 0x212d2 000212d0 52 11 |R | ADDQ.B #0x1,(A1) 000212d2 4a 11 |J | TST.B (A1) 000212d4 66 60 |f` | BNE 0x21336 000212d6 41 fa ef 96 |A | LEA.L 0x2026e,A0 000212da 70 12 |p | MOVEQ.L #0x12,D0 000212dc 3f 20 |? | MOVE.W -(A0),-(A7) 000212de 51 c8 ff fc |Q | DBF D0,0x212dc 000212e2 2f 3a ef 90 |/: | MOVE.L 0x20274,-(A7) 000212e6 3f 3a ef 90 |?: | MOVE.W 0x20278,-(A7) 000212ea 51 4f |QO | SUBQ.L #0x8,A7 000212ec 48 6f 00 0e |Ho | PEA.L (A7+0xe) 000212f0 3f 01 |? | MOVE.W D1,-(A7) 000212f2 3f 3c 00 26 |?< & | MOVE.W #0x26,-(A7) 000212f6 4e 92 |N | JSR (A2) 000212f8 2e ae 00 0c |. | MOVE.L (A6+0xc),(A7) 000212fc 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021302 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00021306 3f 01 |? | MOVE.W D1,-(A7) 00021308 3f 04 |? | MOVE.W D4,-(A7) 0002130a 4e 92 |N | JSR (A2) 0002130c 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00021310 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021316 48 6f 00 18 |Ho | PEA.L (A7+0x18) 0002131a 3f 01 |? | MOVE.W D1,-(A7) 0002131c 3f 03 |? | MOVE.W D3,-(A7) 0002131e 4e 92 |N | JSR (A2) 00021320 50 4f |PO | ADDQ.L #0x8,A7 00021322 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 00021328 de fc 00 14 | | ADDA.W #0x14,A7 0002132c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021332 de fc 00 30 | 0 | ADDA.W #0x30,A7 00021336 4a 11 |J | TST.B (A1) 00021338 67 00 ff 12 |g | BEQ 0x2124c 0002133c 48 6e 00 14 |Hn | PEA.L (A6+0x14) 00021340 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021346 58 4f |XO | ADDQ.L #0x4,A7 00021348 20 14 | | MOVE.L (A4),D0 0002134a 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00021350 63 02 |c | BLS 0x21354 00021352 4e 4f |NO | TRAP #15 00021354 3d 40 00 18 |=@ | MOVE.W D0,(A6+0x18) 00021358 4c df 1f 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4 0002135c 4e 5e |N^ | UNLK A6 0002135e 4e 75 |Nu | RTS 00021360 ; -------------------------------------------------------------------------------------- 00021360 ; OMSI PASCAL Function 00021360 ; <LVAR 0x00c 4(r)> 00021360 ; <LVAR 0x008 4(r)> 00021360 ; <LVAR -0x007 1(rw)> 00021360 ; <LVAR -0x008 1(rw)> 00021360 ; <LVAR -0x009 1(rw)> 00021360 ; <LVAR -0x00a @ 1(rw)> 00021360 ; <LVAR -0x00e @ 4(rw)> 00021360 ; <LVAR -0x010 @ 1(rw)> 00021360 ; -------------------------------------------------------------------------------------- 00021360 4e 56 ff 96 |NV | LINK.W A6,#0xff96 00021364 bf d5 | | CMPA.L (A5),A7 00021366 62 06 |b | BHI 0x2136e 00021368 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002136c 4e 76 |Nv | TRAPV 0002136e de fc 00 5a | Z | ADDA.W #0x5a,A7 00021372 48 e7 fd f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D5+D4+D3+D2+D1+D0,-(A7) 00021376 45 ee ff f2 |E | LEA.L (A6-0xe),A2 0002137a 47 ee 00 08 |G | LEA.L (A6+0x8),A3 0002137e 49 f9 00 01 02 c4 |I | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A4 00021384 74 01 |t | MOVEQ.L #0x01,D2 00021386 76 09 |v | MOVEQ.L #0x09,D3 00021388 78 7d |x} | MOVEQ.L #0x7d,D4 0002138a 7a 0c |z | MOVEQ.L #0x0c,D5 0002138c 59 4f |YO | SUBQ.L #0x4,A7 0002138e 20 53 | S | MOVEA.L (A3),A0 00021390 59 4f |YO | SUBQ.L #0x4,A7 00021392 1e 90 | | MOVE.B (A0),(A7) 00021394 1f 68 00 01 00 01 | h | MOVE.B (A0+0x1),(A7+0x1) 0002139a 1f 68 00 02 00 02 | h | MOVE.B (A0+0x2),(A7+0x2) 000213a0 1f 68 00 03 00 03 | h | MOVE.B (A0+0x3),(A7+0x3) 000213a6 4e b9 00 01 03 08 |N | JSR TimeToText() 000213ac 58 4f |XO | ADDQ.L #0x4,A7 000213ae 24 9f |$ | MOVE.L (A7)+,(A2) 000213b0 20 52 | R | MOVEA.L (A2),A0 000213b2 2f 08 |/ | MOVE.L A0,-(A7) 000213b4 7e 0a |~ | MOVEQ.L #0x0a,D7 000213b6 20 07 | | MOVE.L D7,D0 000213b8 90 83 | | SUB.L D3,D0 000213ba 53 80 |S | SUBQ.L #0x1,D0 000213bc b0 84 | | CMP.L D4,D0 000213be 63 02 |c | BLS 0x213c2 000213c0 4e 4f |NO | TRAP #15 000213c2 20 57 | W | MOVEA.L (A7),A0 000213c4 22 07 |" | MOVE.L D7,D1 000213c6 53 81 |S | SUBQ.L #0x1,D1 000213c8 b2 84 | | CMP.L D4,D1 000213ca 63 02 |c | BLS 0x213ce 000213cc 4e 4f |NO | TRAP #15 000213ce 11 b0 18 02 08 02 | | MOVE.B (A0+D1.L+#0x2),(A0+D0.L+#0x2) 000213d4 52 87 |R | ADDQ.L #0x1,D7 000213d6 0c 87 00 00 00 12 | | CMPI.L #0x00000012,D7 000213dc 6f d8 |o | BLE 0x213b6 000213de 20 57 | W | MOVEA.L (A7),A0 000213e0 30 83 |0 | MOVE.W D3,(A0) 000213e2 54 4f |TO | ADDQ.L #0x2,A7 000213e4 3e ba ee 94 |> | MOVE.W 0x2027a,(A7) 000213e8 2f 3a ee 92 |/: | MOVE.L 0x2027c,-(A7) 000213ec 9e c5 | | SUBA.W D5,A7 000213ee 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000213f2 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 000213f8 48 6f 00 14 |Ho | PEA.L (A7+0x14) 000213fc 3f 02 |? | MOVE.W D2,-(A7) 000213fe 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00021402 4e 94 |N | JSR (A4) 00021404 58 4f |XO | ADDQ.L #0x4,A7 00021406 2e 92 |. | MOVE.L (A2),(A7) 00021408 59 4f |YO | SUBQ.L #0x4,A7 0002140a 48 6f 00 18 |Ho | PEA.L (A7+0x18) 0002140e 3f 02 |? | MOVE.W D2,-(A7) 00021410 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00021414 4e 94 |N | JSR (A4) 00021416 50 4f |PO | ADDQ.L #0x8,A7 00021418 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 0002141e de fc 00 10 | | ADDA.W #0x10,A7 00021422 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00021428 58 4f |XO | ADDQ.L #0x4,A7 0002142a 24 9f |$ | MOVE.L (A7)+,(A2) 0002142c 5c 4f |\O | ADDQ.L #0x6,A7 0002142e 20 52 | R | MOVEA.L (A2),A0 00021430 4a 50 |JP | TST.W (A0) 00021432 66 28 |f( | BNE 0x2145c 00021434 48 52 |HR | PEA.L (A2) 00021436 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002143c 58 4f |XO | ADDQ.L #0x4,A7 0002143e 20 53 | S | MOVEA.L (A3),A0 00021440 1d 50 ff f6 | P | MOVE.B (A0),(A6-0xa) 00021444 1d 68 00 01 ff f7 | h | MOVE.B (A0+0x1),(A6-0x9) 0002144a 1d 68 00 02 ff f8 | h | MOVE.B (A0+0x2),(A6-0x8) 00021450 1d 68 00 03 ff f9 | h | MOVE.B (A0+0x3),(A6-0x7) 00021456 1d 42 ff f0 | B | MOVE.B D2,(A6-0x10) 0002145a 60 40 |`@ | BRA 0x2149c 0002145c 9e fc 00 0a | | SUBA.W #0xa,A7 00021460 20 4f | O | MOVEA.L A7,A0 00021462 43 fa ee 1c |C | LEA.L 0x20280,A1 00021466 70 08 |p | MOVEQ.L #0x08,D0 00021468 10 d9 | | MOVE.B (A1)+,(A0)+ 0002146a 51 c8 ff fc |Q | DBF D0,0x21468 0002146e 51 4f |QO | SUBQ.L #0x8,A7 00021470 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021474 3f 02 |? | MOVE.W D2,-(A7) 00021476 3f 03 |? | MOVE.W D3,-(A7) 00021478 4e 94 |N | JSR (A4) 0002147a 58 4f |XO | ADDQ.L #0x4,A7 0002147c 2e 92 |. | MOVE.L (A2),(A7) 0002147e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021484 50 4f |PO | ADDQ.L #0x8,A7 00021486 24 9f |$ | MOVE.L (A7)+,(A2) 00021488 5c 4f |\O | ADDQ.L #0x6,A7 0002148a 2e 92 |. | MOVE.L (A2),(A7) 0002148c 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00021490 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00021494 4e b9 00 01 03 10 |N | JSR ConvertTimestamp(MOD input : String; b : L; VAR status : Bool) 0002149a de c5 | | ADDA.W D5,A7 0002149c 4a 2e ff f0 |J. | TST.B (A6-0x10) 000214a0 67 00 fe ea |g | BEQ 0x2138c 000214a4 20 53 | S | MOVEA.L (A3),A0 000214a6 10 ae ff f6 | | MOVE.B (A6-0xa),(A0) 000214aa 11 6e ff f7 00 01 | n | MOVE.B (A6-0x9),(A0+0x1) 000214b0 11 6e ff f8 00 02 | n | MOVE.B (A6-0x8),(A0+0x2) 000214b6 11 6e ff f9 00 03 | n | MOVE.B (A6-0x7),(A0+0x3) 000214bc 4c df 1f bf |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D7+A0+A1+A2+A3+A4 000214c0 4e 5e |N^ | UNLK A6 000214c2 4e 75 |Nu | RTS 000214c4 ; -------------------------------------------------------------------------------------- 000214c4 ; OMSI PASCAL Function 000214c4 ; <LVAR 0x008 1(r)> 000214c4 ; -------------------------------------------------------------------------------------- 000214c4 4e 56 ff 6e |NV n | LINK.W A6,#0xff6e 000214c8 bf d5 | | CMPA.L (A5),A7 000214ca 62 06 |b | BHI 0x214d2 000214cc 44 fc 00 02 |D | MOVE.W #0x2,CCR 000214d0 4e 76 |Nv | TRAPV 000214d2 de fc 00 90 | | ADDA.W #0x90,A7 000214d6 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000214da 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 000214e0 47 f8 00 00 |G | LEA.L 0x0,A3 000214e4 49 fa fd 36 |I 6 | LEA.L 0x2121c,A4 000214e8 76 01 |v | MOVEQ.L #0x01,D3 000214ea 78 10 |x | MOVEQ.L #0x10,D4 000214ec 7a 12 |z | MOVEQ.L #0x12,D5 000214ee 3c 3c 00 ff |<< | MOVE.W #0xff,D6 000214f2 7e 14 |~ | MOVEQ.L #0x14,D7 000214f4 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000214f8 48 80 |H | EXTB.W D0 000214fa 72 0e |r | MOVEQ.L #0x0e,D1 000214fc c3 c0 | | MULS.W D0,D1 000214fe 4a 35 10 24 |J5 $ | TST.B (A5+D1.W+#0x24) 00021502 66 00 00 c4 |f | BNE 0x215c8 00021506 9e fc 00 40 | @ | SUBA.W #0x40,A7 0002150a 20 4f | O | MOVEA.L A7,A0 0002150c 43 fa ed e6 |C | LEA.L 0x202f4,A1 00021510 74 3e |t> | MOVEQ.L #0x3e,D2 00021512 10 d9 | | MOVE.B (A1)+,(A0)+ 00021514 51 ca ff fc |Q | DBF D2,0x21512 00021518 51 4f |QO | SUBQ.L #0x8,A7 0002151a 1f 00 | | MOVE.B D0,-(A7) 0002151c 4e ba f1 7e |N ~ | JSR 0x2069c 00021520 55 4f |UO | SUBQ.L #0x2,A7 00021522 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021526 3f 03 |? | MOVE.W D3,-(A7) 00021528 3f 3c 00 3f |?< ? | MOVE.W #0x3f,-(A7) 0002152c 4e 92 |N | JSR (A2) 0002152e 50 4f |PO | ADDQ.L #0x8,A7 00021530 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021536 50 4f |PO | ADDQ.L #0x8,A7 00021538 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002153e de fc 00 42 | B | ADDA.W #0x42,A7 00021542 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00021548 4a 1f |J | TST.B (A7)+ 0002154a 66 0c |f | BNE 0x21558 0002154c 55 4f |UO | SUBQ.L #0x2,A7 0002154e 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 00021554 4a 1f |J | TST.B (A7)+ 00021556 67 1c |g | BEQ 0x21574 00021558 e3 40 | @ | ASL.W #0x1,D0 0002155a 41 fa f0 6e |A n | LEA.L 0x205ca,A0 0002155e 3b b0 00 00 10 18 |; | MOVE.W (A0+D0.W),(A5+D1.W+#0x18) 00021564 41 fa f0 84 |A | LEA.L 0x205ea,A0 00021568 3b b0 00 00 10 1c |; | MOVE.W (A0+D0.W),(A5+D1.W+#0x1c) 0002156e 41 fa f0 9a |A | LEA.L 0x2060a,A0 00021572 60 3e |`> | BRA 0x215b2 00021574 0c 00 00 0c | | CMPI.B #0x0c,D0 00021578 6d 1e |m | BLT 0x21598 0002157a 55 4f |UO | SUBQ.L #0x2,A7 0002157c 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00021582 4a 1f |J | TST.B (A7)+ 00021584 66 12 |f | BNE 0x21598 00021586 3b bc 00 07 10 18 |; | MOVE.W #0x7,(A5+D1.W+#0x18) 0002158c 3b bc 00 02 10 1c |; | MOVE.W #0x2,(A5+D1.W+#0x1c) 00021592 42 75 10 1e |Bu | CLR.W (A5+D1.W+#0x1e) 00021596 60 20 |` | BRA 0x215b8 00021598 e3 40 | @ | ASL.W #0x1,D0 0002159a 41 fa ef ce |A | LEA.L 0x2056a,A0 0002159e 3b b0 00 00 10 18 |; | MOVE.W (A0+D0.W),(A5+D1.W+#0x18) 000215a4 41 fa ef e4 |A | LEA.L 0x2058a,A0 000215a8 3b b0 00 00 10 1c |; | MOVE.W (A0+D0.W),(A5+D1.W+#0x1c) 000215ae 41 fa ef fa |A | LEA.L 0x205aa,A0 000215b2 3b b0 00 00 10 1e |; | MOVE.W (A0+D0.W),(A5+D1.W+#0x1e) 000215b8 42 75 10 1a |Bu | CLR.W (A5+D1.W+#0x1a) 000215bc 48 75 10 20 |Hu | PEA.L (A5+D1.W+#0x20) 000215c0 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 000215c6 58 4f |XO | ADDQ.L #0x4,A7 000215c8 9e c5 | | SUBA.W D5,A7 000215ca 20 4f | O | MOVEA.L A7,A0 000215cc 43 fa ec bc |C | LEA.L 0x2028a,A1 000215d0 70 10 |p | MOVEQ.L #0x10,D0 000215d2 10 d9 | | MOVE.B (A1)+,(A0)+ 000215d4 51 c8 ff fc |Q | DBF D0,0x215d2 000215d8 5d 4f |]O | SUBQ.L #0x6,A7 000215da 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000215de 3f 03 |? | MOVE.W D3,-(A7) 000215e0 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 000215e4 4e 92 |N | JSR (A2) 000215e6 50 4f |PO | ADDQ.L #0x8,A7 000215e8 30 35 10 18 |05 | MOVE.W (A5+D1.W+#0x18),D0 000215ec 48 c0 |H | EXTW.L D0 000215ee 2f 00 |/ | MOVE.L D0,-(A7) 000215f0 48 53 |HS | PEA.L (A3) 000215f2 48 78 00 ff |Hx | PEA.L 0xff 000215f6 4e 94 |N | JSR (A4) 000215f8 de c4 | | ADDA.W D4,A7 000215fa 30 1f |0 | MOVE.W (A7)+,D0 000215fc 41 86 |A | CHK.W D6,D0 000215fe de c5 | | ADDA.W D5,A7 00021600 3b 80 10 18 |; | MOVE.W D0,(A5+D1.W+#0x18) 00021604 9e c7 | | SUBA.W D7,A7 00021606 20 4f | O | MOVEA.L A7,A0 00021608 43 fa ec 92 |C | LEA.L 0x2029c,A1 0002160c 70 12 |p | MOVEQ.L #0x12,D0 0002160e 10 d9 | | MOVE.B (A1)+,(A0)+ 00021610 51 c8 ff fc |Q | DBF D0,0x2160e 00021614 5d 4f |]O | SUBQ.L #0x6,A7 00021616 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002161a 3f 03 |? | MOVE.W D3,-(A7) 0002161c 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00021620 4e 92 |N | JSR (A2) 00021622 50 4f |PO | ADDQ.L #0x8,A7 00021624 42 80 |B | CLR.L D0 00021626 30 35 10 1a |05 | MOVE.W (A5+D1.W+#0x1a),D0 0002162a 2f 00 |/ | MOVE.L D0,-(A7) 0002162c 48 53 |HS | PEA.L (A3) 0002162e 48 78 7f ff |Hx | PEA.L 0x7fff 00021632 4e 94 |N | JSR (A4) 00021634 de c4 | | ADDA.W D4,A7 00021636 3b 9f 10 1a |; | MOVE.W (A7)+,(A5+D1.W+#0x1a) 0002163a de c7 | | ADDA.W D7,A7 0002163c 41 fa ec 88 |A | LEA.L 0x202c6,A0 00021640 70 0a |p | MOVEQ.L #0x0a,D0 00021642 3f 20 |? | MOVE.W -(A0),-(A7) 00021644 51 c8 ff fc |Q | DBF D0,0x21642 00021648 5d 4f |]O | SUBQ.L #0x6,A7 0002164a 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002164e 3f 03 |? | MOVE.W D3,-(A7) 00021650 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 00021654 4e 92 |N | JSR (A2) 00021656 50 4f |PO | ADDQ.L #0x8,A7 00021658 30 35 10 1c |05 | MOVE.W (A5+D1.W+#0x1c),D0 0002165c 48 c0 |H | EXTW.L D0 0002165e 2f 00 |/ | MOVE.L D0,-(A7) 00021660 48 53 |HS | PEA.L (A3) 00021662 48 78 00 ff |Hx | PEA.L 0xff 00021666 4e 94 |N | JSR (A4) 00021668 de c4 | | ADDA.W D4,A7 0002166a 30 1f |0 | MOVE.W (A7)+,D0 0002166c 41 86 |A | CHK.W D6,D0 0002166e de fc 00 16 | | ADDA.W #0x16,A7 00021672 3b 80 10 1c |; | MOVE.W D0,(A5+D1.W+#0x1c) 00021676 9e c4 | | SUBA.W D4,A7 00021678 20 4f | O | MOVEA.L A7,A0 0002167a 43 fa ec 4a |C J | LEA.L 0x202c6,A1 0002167e 70 0e |p | MOVEQ.L #0x0e,D0 00021680 10 d9 | | MOVE.B (A1)+,(A0)+ 00021682 51 c8 ff fc |Q | DBF D0,0x21680 00021686 5d 4f |]O | SUBQ.L #0x6,A7 00021688 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002168c 3f 03 |? | MOVE.W D3,-(A7) 0002168e 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00021692 4e 92 |N | JSR (A2) 00021694 50 4f |PO | ADDQ.L #0x8,A7 00021696 30 35 10 1e |05 | MOVE.W (A5+D1.W+#0x1e),D0 0002169a 48 c0 |H | EXTW.L D0 0002169c 2f 00 |/ | MOVE.L D0,-(A7) 0002169e 48 53 |HS | PEA.L (A3) 000216a0 48 78 00 ff |Hx | PEA.L 0xff 000216a4 4e 94 |N | JSR (A4) 000216a6 de c4 | | ADDA.W D4,A7 000216a8 30 1f |0 | MOVE.W (A7)+,D0 000216aa 41 86 |A | CHK.W D6,D0 000216ac de c4 | | ADDA.W D4,A7 000216ae 3b 80 10 1e |; | MOVE.W D0,(A5+D1.W+#0x1e) 000216b2 9e fc 00 1e | | SUBA.W #0x1e,A7 000216b6 20 4f | O | MOVEA.L A7,A0 000216b8 43 fa ec 1c |C | LEA.L 0x202d6,A1 000216bc 70 1c |p | MOVEQ.L #0x1c,D0 000216be 10 d9 | | MOVE.B (A1)+,(A0)+ 000216c0 51 c8 ff fc |Q | DBF D0,0x216be 000216c4 59 4f |YO | SUBQ.L #0x4,A7 000216c6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000216ca 3f 03 |? | MOVE.W D3,-(A7) 000216cc 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 000216d0 4e 92 |N | JSR (A2) 000216d2 50 4f |PO | ADDQ.L #0x8,A7 000216d4 48 75 10 20 |Hu | PEA.L (A5+D1.W+#0x20) 000216d8 4e ba fc 86 |N | JSR 0x21360 000216dc de fc 00 26 | & | ADDA.W #0x26,A7 000216e0 1b 83 10 24 | $ | MOVE.B D3,(A5+D1.W+#0x24) 000216e4 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000216e8 4e 5e |N^ | UNLK A6 000216ea 4e 75 |Nu | RTS 000216ec ; -------------------------------------------------------------------------------------- 000216ec ; OMSI PASCAL Function 000216ec ; -------------------------------------------------------------------------------------- 000216ec 4e 56 ff 98 |NV | LINK.W A6,#0xff98 000216f0 bf d5 | | CMPA.L (A5),A7 000216f2 62 06 |b | BHI 0x216fa 000216f4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000216f8 4e 76 |Nv | TRAPV 000216fa de fc 00 5c | \ | ADDA.W #0x5c,A7 000216fe 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021702 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021708 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3 0002170e 72 01 |r | MOVEQ.L #0x01,D1 00021710 74 0c |t | MOVEQ.L #0x0c,D2 00021712 76 10 |v | MOVEQ.L #0x10,D3 00021714 78 1a |x | MOVEQ.L #0x1a,D4 00021716 9e c2 | | SUBA.W D2,A7 00021718 20 4f | O | MOVEA.L A7,A0 0002171a 43 fa ec 18 |C | LEA.L 0x20334,A1 0002171e 70 0a |p | MOVEQ.L #0x0a,D0 00021720 10 d9 | | MOVE.B (A1)+,(A0)+ 00021722 51 c8 ff fc |Q | DBF D0,0x21720 00021726 59 4f |YO | SUBQ.L #0x4,A7 00021728 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002172c 3f 01 |? | MOVE.W D1,-(A7) 0002172e 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00021732 4e 92 |N | JSR (A2) 00021734 50 4f |PO | ADDQ.L #0x8,A7 00021736 4e 93 |N | JSR (A3) 00021738 de c3 | | ADDA.W D3,A7 0002173a 41 fa ec 1e |A | LEA.L 0x2035a,A0 0002173e 70 0c |p | MOVEQ.L #0x0c,D0 00021740 3f 20 |? | MOVE.W -(A0),-(A7) 00021742 51 c8 ff fc |Q | DBF D0,0x21740 00021746 59 4f |YO | SUBQ.L #0x4,A7 00021748 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002174c 3f 01 |? | MOVE.W D1,-(A7) 0002174e 3f 04 |? | MOVE.W D4,-(A7) 00021750 4e 92 |N | JSR (A2) 00021752 50 4f |PO | ADDQ.L #0x8,A7 00021754 4e 93 |N | JSR (A3) 00021756 de fc 00 1e | | ADDA.W #0x1e,A7 0002175a 41 fa ec 18 |A | LEA.L 0x20374,A0 0002175e 70 0c |p | MOVEQ.L #0x0c,D0 00021760 3f 20 |? | MOVE.W -(A0),-(A7) 00021762 51 c8 ff fc |Q | DBF D0,0x21760 00021766 59 4f |YO | SUBQ.L #0x4,A7 00021768 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002176c 3f 01 |? | MOVE.W D1,-(A7) 0002176e 3f 04 |? | MOVE.W D4,-(A7) 00021770 4e 92 |N | JSR (A2) 00021772 50 4f |PO | ADDQ.L #0x8,A7 00021774 4e 93 |N | JSR (A3) 00021776 54 4f |TO | ADDQ.L #0x2,A7 00021778 20 4f | O | MOVEA.L A7,A0 0002177a 43 fa eb f8 |C | LEA.L 0x20374,A1 0002177e 70 1a |p | MOVEQ.L #0x1a,D0 00021780 10 d9 | | MOVE.B (A1)+,(A0)+ 00021782 51 c8 ff fc |Q | DBF D0,0x21780 00021786 59 4f |YO | SUBQ.L #0x4,A7 00021788 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002178c 3f 01 |? | MOVE.W D1,-(A7) 0002178e 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 00021792 4e 92 |N | JSR (A2) 00021794 50 4f |PO | ADDQ.L #0x8,A7 00021796 4e 93 |N | JSR (A3) 00021798 58 4f |XO | ADDQ.L #0x4,A7 0002179a 20 4f | O | MOVEA.L A7,A0 0002179c 43 fa eb f2 |C | LEA.L 0x20390,A1 000217a0 70 1a |p | MOVEQ.L #0x1a,D0 000217a2 10 d9 | | MOVE.B (A1)+,(A0)+ 000217a4 51 c8 ff fc |Q | DBF D0,0x217a2 000217a8 59 4f |YO | SUBQ.L #0x4,A7 000217aa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000217ae 3f 01 |? | MOVE.W D1,-(A7) 000217b0 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 000217b4 4e 92 |N | JSR (A2) 000217b6 50 4f |PO | ADDQ.L #0x8,A7 000217b8 4e 93 |N | JSR (A3) 000217ba de fc 00 1e | | ADDA.W #0x1e,A7 000217be 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 000217c4 4a 1f |J | TST.B (A7)+ 000217c6 66 0c |f | BNE 0x217d4 000217c8 55 4f |UO | SUBQ.L #0x2,A7 000217ca 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 000217d0 4a 1f |J | TST.B (A7)+ 000217d2 67 26 |g& | BEQ 0x217fa 000217d4 41 fa eb fe |A | LEA.L 0x203d4,A0 000217d8 70 06 |p | MOVEQ.L #0x06,D0 000217da 2f 20 |/ | MOVE.L -(A0),-(A7) 000217dc 51 c8 ff fc |Q | DBF D0,0x217da 000217e0 59 4f |YO | SUBQ.L #0x4,A7 000217e2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000217e6 3f 01 |? | MOVE.W D1,-(A7) 000217e8 3f 3c 00 1c |?< | MOVE.W #0x1c,-(A7) 000217ec 4e 92 |N | JSR (A2) 000217ee 50 4f |PO | ADDQ.L #0x8,A7 000217f0 4e 93 |N | JSR (A3) 000217f2 de fc 00 20 | | ADDA.W #0x20,A7 000217f6 7e 09 |~ | MOVEQ.L #0x09,D7 000217f8 60 20 |` | BRA 0x2181a 000217fa 2f 3a eb b8 |/: | MOVE.L 0x203b4,-(A7) 000217fe 2f 3a eb b0 |/: | MOVE.L 0x203b0,-(A7) 00021802 2f 3a eb a8 |/: | MOVE.L 0x203ac,-(A7) 00021806 59 4f |YO | SUBQ.L #0x4,A7 00021808 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002180c 3f 01 |? | MOVE.W D1,-(A7) 0002180e 3f 02 |? | MOVE.W D2,-(A7) 00021810 4e 92 |N | JSR (A2) 00021812 50 4f |PO | ADDQ.L #0x8,A7 00021814 4e 93 |N | JSR (A3) 00021816 de c3 | | ADDA.W D3,A7 00021818 7e 08 |~ | MOVEQ.L #0x08,D7 0002181a 41 fa eb c6 |A | LEA.L 0x203e2,A0 0002181e 70 06 |p | MOVEQ.L #0x06,D0 00021820 3f 20 |? | MOVE.W -(A0),-(A7) 00021822 51 c8 ff fc |Q | DBF D0,0x21820 00021826 51 4f |QO | SUBQ.L #0x8,A7 00021828 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002182c 3f 01 |? | MOVE.W D1,-(A7) 0002182e 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00021832 4e 92 |N | JSR (A2) 00021834 50 4f |PO | ADDQ.L #0x8,A7 00021836 48 78 00 00 |Hx | PEA.L 0x0 0002183a 2f 07 |/ | MOVE.L D7,-(A7) 0002183c 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 00021842 de c2 | | ADDA.W D2,A7 00021844 2c 1f |, | MOVE.L (A7)+,D6 00021846 de fc 00 0e | | ADDA.W #0xe,A7 0002184a 0c 86 00 00 00 09 | | CMPI.L #0x00000009,D6 00021850 63 02 |c | BLS 0x21854 00021852 4e 4f |NO | TRAP #15 00021854 41 fa ed d4 |A | LEA.L 0x2062a,A0 00021858 1a 30 68 00 | 0h | MOVE.B (A0+D6.L),D5 0002185c 1f 05 | | MOVE.B D5,-(A7) 0002185e 4e ba fc 64 |N d | JSR 0x214c4 00021862 1e 85 | | MOVE.B D5,(A7) 00021864 4e ba f7 ea |N | JSR 0x21050 00021868 54 4f |TO | ADDQ.L #0x2,A7 0002186a 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 0002186e 4e 5e |N^ | UNLK A6 00021870 4e 75 |Nu | RTS 00021872 ; -------------------------------------------------------------------------------------- 00021872 ; OMSI PASCAL Function 00021872 ; -------------------------------------------------------------------------------------- 00021872 4e 56 ff ae |NV | LINK.W A6,#0xffae 00021876 bf d5 | | CMPA.L (A5),A7 00021878 62 06 |b | BHI 0x21880 0002187a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002187e 4e 76 |Nv | TRAPV 00021880 de fc 00 4e | N | ADDA.W #0x4e,A7 00021884 48 e7 e1 c0 |H | MOVEM.L A1+A0+D7+D2+D1+D0,-(A7) 00021888 43 ed 00 f8 |C | LEA.L (A5+0xf8),A1 0002188c 72 01 |r | MOVEQ.L #0x01,D1 0002188e 74 20 |t | MOVEQ.L #0x20,D2 00021890 41 fa eb 70 |A p | LEA.L 0x20402,A0 00021894 70 07 |p | MOVEQ.L #0x07,D0 00021896 2f 20 |/ | MOVE.L -(A0),-(A7) 00021898 51 c8 ff fc |Q | DBF D0,0x21896 0002189c 5d 4f |]O | SUBQ.L #0x6,A7 0002189e 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000218a2 3f 01 |? | MOVE.W D1,-(A7) 000218a4 3f 02 |? | MOVE.W D2,-(A7) 000218a6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000218ac 58 4f |XO | ADDQ.L #0x4,A7 000218ae 2e 91 |. | MOVE.L (A1),(A7) 000218b0 48 78 00 00 |Hx | PEA.L 0x0 000218b4 2f 3c 00 0f 42 3f |/< B? | MOVE.L #0xf423f,-(A7) 000218ba 4e ba f9 60 |N ` | JSR 0x2121c 000218be de fc 00 10 | | ADDA.W #0x10,A7 000218c2 42 80 |B | CLR.L D0 000218c4 30 1f |0 | MOVE.W (A7)+,D0 000218c6 22 80 |" | MOVE.L D0,(A1) 000218c8 de fc 00 1c | | ADDA.W #0x1c,A7 000218cc 4e b9 00 02 20 4e |N N | JSR 0x2204e 000218d2 2e 1f |. | MOVE.L (A7)+,D7 000218d4 66 2c |f, | BNE 0x21902 000218d6 41 fa eb 44 |A D | LEA.L 0x2041c,A0 000218da 70 0c |p | MOVEQ.L #0x0c,D0 000218dc 3f 20 |? | MOVE.W -(A0),-(A7) 000218de 51 c8 ff fc |Q | DBF D0,0x218dc 000218e2 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 000218e6 59 4f |YO | SUBQ.L #0x4,A7 000218e8 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000218ec 3f 01 |? | MOVE.W D1,-(A7) 000218ee 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 000218f2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000218f8 50 4f |PO | ADDQ.L #0x8,A7 000218fa 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021900 de c2 | | ADDA.W D2,A7 00021902 20 49 | I | MOVEA.L A1,A0 00021904 2f 08 |/ | MOVE.L A0,-(A7) 00021906 2f 07 |/ | MOVE.L D7,-(A7) 00021908 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 0002190c 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00021912 de fc 00 0a | | ADDA.W #0xa,A7 00021916 4e ba f4 74 |N t | JSR 0x20d8c 0002191a 4c df 03 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1 0002191e 4e 5e |N^ | UNLK A6 00021920 4e 75 |Nu | RTS 00021922 ; -------------------------------------------------------------------------------------- 00021922 ; OMSI PASCAL Function 00021922 ; <LVAR 0x008 1(r)> 00021922 ; <LVAR -0x00a @ 4(rw)> 00021922 ; -------------------------------------------------------------------------------------- 00021922 4e 56 ff a2 |NV | LINK.W A6,#0xffa2 ; Spelunked 00021926 bf d5 | | CMPA.L (A5),A7 00021928 62 06 |b | BHI 0x21930 0002192a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002192e 4e 76 |Nv | TRAPV 00021930 de fc 00 4c | L | ADDA.W #0x4c,A7 00021934 48 e7 e1 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D2+D1+D0,-(A7) 00021938 43 f9 00 01 02 f8 |C | LEA.L LeftPad(a : String; b : Long) : String,A1 0002193e 45 f9 00 01 02 e4 |E | LEA.L Long2String(a : Long) : String,A2 00021944 47 ee ff f6 |G | LEA.L (A6-0xa),A3 00021948 74 0e |t | MOVEQ.L #0x0e,D2 0002194a 51 4f |QO | SUBQ.L #0x8,A7 0002194c 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00021950 4e ba ed 4a |N J | JSR 0x2069c 00021954 54 4f |TO | ADDQ.L #0x2,A7 00021956 48 78 00 08 |Hx | PEA.L 0x8 0002195a 4e 91 |N | JSR (A1) 0002195c 50 4f |PO | ADDQ.L #0x8,A7 0002195e 28 5f |(_ | MOVEA.L (A7)+,A4 00021960 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00021964 48 80 |H | EXTB.W D0 00021966 c1 c2 | | MULS.W D2,D0 00021968 4a 35 00 24 |J5 $ | TST.B (A5+D0.W+#0x24) 0002196c 66 34 |f4 | BNE 0x219a2 0002196e 41 fa ea ba |A | LEA.L 0x2042a,A0 00021972 70 06 |p | MOVEQ.L #0x06,D0 00021974 3f 20 |? | MOVE.W -(A0),-(A7) 00021976 51 c8 ff fc |Q | DBF D0,0x21974 0002197a 59 4f |YO | SUBQ.L #0x4,A7 0002197c 2f 0c |/ | MOVE.L A4,-(A7) 0002197e 59 4f |YO | SUBQ.L #0x4,A7 00021980 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021984 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021988 3f 02 |? | MOVE.W D2,-(A7) 0002198a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021990 50 4f |PO | ADDQ.L #0x8,A7 00021992 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021998 50 4f |PO | ADDQ.L #0x8,A7 0002199a 28 5f |(_ | MOVEA.L (A7)+,A4 0002199c de c2 | | ADDA.W D2,A7 0002199e 60 00 00 a2 |` | BRA 0x21a42 000219a2 59 4f |YO | SUBQ.L #0x4,A7 000219a4 2f 0c |/ | MOVE.L A4,-(A7) 000219a6 51 4f |QO | SUBQ.L #0x8,A7 000219a8 32 35 00 18 |25 | MOVE.W (A5+D0.W+#0x18),D1 000219ac 48 c1 |H | EXTW.L D1 000219ae 2f 01 |/ | MOVE.L D1,-(A7) 000219b0 4e 92 |N | JSR (A2) 000219b2 58 4f |XO | ADDQ.L #0x4,A7 000219b4 48 78 00 08 |Hx | PEA.L 0x8 000219b8 4e 91 |N | JSR (A1) 000219ba 42 81 |B | CLR.L D1 000219bc 32 35 00 1a |25 | MOVE.W (A5+D0.W+#0x1a),D1 000219c0 2f 01 |/ | MOVE.L D1,-(A7) 000219c2 4e 92 |N | JSR (A2) 000219c4 58 4f |XO | ADDQ.L #0x4,A7 000219c6 48 78 00 09 |Hx | PEA.L 0x9 000219ca 4e 91 |N | JSR (A1) 000219cc 32 35 00 1c |25 | MOVE.W (A5+D0.W+#0x1c),D1 000219d0 48 c1 |H | EXTW.L D1 000219d2 2f 01 |/ | MOVE.L D1,-(A7) 000219d4 4e 92 |N | JSR (A2) 000219d6 58 4f |XO | ADDQ.L #0x4,A7 000219d8 48 78 00 09 |Hx | PEA.L 0x9 000219dc 4e 91 |N | JSR (A1) 000219de 32 35 00 1e |25 | MOVE.W (A5+D0.W+#0x1e),D1 000219e2 48 c1 |H | EXTW.L D1 000219e4 2f 01 |/ | MOVE.L D1,-(A7) 000219e6 4e 92 |N | JSR (A2) 000219e8 58 4f |XO | ADDQ.L #0x4,A7 000219ea 48 78 00 07 |Hx | PEA.L 0x7 000219ee 4e 91 |N | JSR (A1) 000219f0 50 4f |PO | ADDQ.L #0x8,A7 000219f2 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 000219f8 de fc 00 14 | | ADDA.W #0x14,A7 000219fc 28 5f |(_ | MOVEA.L (A7)+,A4 000219fe 59 4f |YO | SUBQ.L #0x4,A7 00021a00 2f 35 00 20 |/5 | MOVE.L (A5+D0.W+#0x20),-(A7) 00021a04 4e b9 00 01 03 08 |N | JSR TimeToText() 00021a0a 58 4f |XO | ADDQ.L #0x4,A7 00021a0c 26 9f |& | MOVE.L (A7)+,(A3) 00021a0e 7e 0a |~ | MOVEQ.L #0x0a,D7 00021a10 2f 0c |/ | MOVE.L A4,-(A7) 00021a12 20 53 | S | MOVEA.L (A3),A0 00021a14 20 07 | | MOVE.L D7,D0 00021a16 53 80 |S | SUBQ.L #0x1,D0 00021a18 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 00021a1e 63 02 |c | BLS 0x21a22 00021a20 4e 4f |NO | TRAP #15 00021a22 1f 30 08 02 | 0 | MOVE.B (A0+D0.L+#0x2),-(A7) 00021a26 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00021a2c 5c 4f |\O | ADDQ.L #0x6,A7 00021a2e 52 87 |R | ADDQ.L #0x1,D7 00021a30 0c 87 00 00 00 12 | | CMPI.L #0x00000012,D7 00021a36 6f d8 |o | BLE 0x21a10 00021a38 48 53 |HS | PEA.L (A3) 00021a3a 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021a40 58 4f |XO | ADDQ.L #0x4,A7 00021a42 2f 0c |/ | MOVE.L A4,-(A7) 00021a44 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021a4a 58 4f |XO | ADDQ.L #0x4,A7 00021a4c 4c df 1f 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1+A2+A3+A4 00021a50 4e 5e |N^ | UNLK A6 00021a52 4e 75 |Nu | RTS 00021a54 ; -------------------------------------------------------------------------------------- 00021a54 ; OMSI PASCAL Function 00021a54 ; -------------------------------------------------------------------------------------- 00021a54 4e 56 ff 98 |NV | LINK.W A6,#0xff98 00021a58 bf d5 | | CMPA.L (A5),A7 00021a5a 62 06 |b | BHI 0x21a62 00021a5c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021a60 4e 76 |Nv | TRAPV 00021a62 de fc 00 64 | d | ADDA.W #0x64,A7 00021a66 48 e7 c1 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D1+D0,-(A7) 00021a6a 45 fa fe b6 |E | LEA.L 0x21922,A2 00021a6e 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00021a74 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 00021a7a 72 01 |r | MOVEQ.L #0x01,D1 00021a7c 9e fc 00 32 | 2 | SUBA.W #0x32,A7 00021a80 20 4f | O | MOVEA.L A7,A0 00021a82 43 fa e9 a6 |C | LEA.L 0x2042a,A1 00021a86 70 30 |p0 | MOVEQ.L #0x30,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 31 |?< 1 | MOVE.W #0x31,-(A7) 00021a9a 4e 93 |N | JSR (A3) 00021a9c 50 4f |PO | ADDQ.L #0x8,A7 00021a9e 4e 94 |N | JSR (A4) 00021aa0 54 4f |TO | ADDQ.L #0x2,A7 00021aa2 20 4f | O | MOVEA.L A7,A0 00021aa4 43 fa e9 b6 |C | LEA.L 0x2045c,A1 00021aa8 70 32 |p2 | MOVEQ.L #0x32,D0 00021aaa 10 d9 | | MOVE.B (A1)+,(A0)+ 00021aac 51 c8 ff fc |Q | DBF D0,0x21aaa 00021ab0 59 4f |YO | SUBQ.L #0x4,A7 00021ab2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021ab6 3f 01 |? | MOVE.W D1,-(A7) 00021ab8 3f 3c 00 33 |?< 3 | MOVE.W #0x33,-(A7) 00021abc 4e 93 |N | JSR (A3) 00021abe 50 4f |PO | ADDQ.L #0x8,A7 00021ac0 4e 94 |N | JSR (A4) 00021ac2 de fc 00 36 | 6 | ADDA.W #0x36,A7 00021ac6 1e bc 00 04 | | MOVE.B #0x04,(A7) 00021aca 4e 92 |N | JSR (A2) 00021acc 1e bc 00 07 | | MOVE.B #0x07,(A7) 00021ad0 4e 92 |N | JSR (A2) 00021ad2 1e bc 00 06 | | MOVE.B #0x06,(A7) 00021ad6 4e 92 |N | JSR (A2) 00021ad8 1e bc 00 02 | | MOVE.B #0x02,(A7) 00021adc 4e 92 |N | JSR (A2) 00021ade 1e bc 00 03 | | MOVE.B #0x03,(A7) 00021ae2 4e 92 |N | JSR (A2) 00021ae4 54 4f |TO | ADDQ.L #0x2,A7 00021ae6 7e 0c |~ | MOVEQ.L #0x0c,D7 00021ae8 55 4f |UO | SUBQ.L #0x2,A7 00021aea 1f 07 | | MOVE.B D7,-(A7) 00021aec 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00021af2 54 4f |TO | ADDQ.L #0x2,A7 00021af4 4a 1f |J | TST.B (A7)+ 00021af6 67 06 |g | BEQ 0x21afe 00021af8 1f 07 | | MOVE.B D7,-(A7) 00021afa 4e 92 |N | JSR (A2) 00021afc 54 4f |TO | ADDQ.L #0x2,A7 00021afe 52 07 |R | ADDQ.B #0x1,D7 00021b00 0c 07 00 0f | | CMPI.B #0x0f,D7 00021b04 6f e2 |o | BLE 0x21ae8 00021b06 55 4f |UO | SUBQ.L #0x2,A7 00021b08 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00021b0e 4a 1f |J | TST.B (A7)+ 00021b10 66 0c |f | BNE 0x21b1e 00021b12 55 4f |UO | SUBQ.L #0x2,A7 00021b14 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 00021b1a 4a 1f |J | TST.B (A7)+ 00021b1c 67 3a |g: | BEQ 0x21b58 00021b1e 42 27 |B' | CLR.B -(A7) 00021b20 4e 92 |N | JSR (A2) 00021b22 54 4f |TO | ADDQ.L #0x2,A7 00021b24 41 fa e9 8e |A | LEA.L 0x204b4,A0 00021b28 70 08 |p | MOVEQ.L #0x08,D0 00021b2a 2f 20 |/ | MOVE.L -(A0),-(A7) 00021b2c 51 c8 ff fc |Q | DBF D0,0x21b2a 00021b30 51 4f |QO | SUBQ.L #0x8,A7 00021b32 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021b36 3f 01 |? | MOVE.W D1,-(A7) 00021b38 3f 3c 00 24 |?< $ | MOVE.W #0x24,-(A7) 00021b3c 4e 93 |N | JSR (A3) 00021b3e 2e ad 00 f8 |. | MOVE.L (A5+0xf8),(A7) 00021b42 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021b48 58 4f |XO | ADDQ.L #0x4,A7 00021b4a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021b50 50 4f |PO | ADDQ.L #0x8,A7 00021b52 4e 94 |N | JSR (A4) 00021b54 de fc 00 28 | ( | ADDA.W #0x28,A7 00021b58 4c df 1f 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2+A3+A4 00021b5c 4e 5e |N^ | UNLK A6 00021b5e 4e 75 |Nu | RTS 00021b60 ; -------------------------------------------------------------------------------------- 00021b60 ; OMSI PASCAL Function 00021b60 ; -------------------------------------------------------------------------------------- 00021b60 4e 56 ff 90 |NV | LINK.W A6,#0xff90 00021b64 bf d5 | | CMPA.L (A5),A7 00021b66 62 06 |b | BHI 0x21b6e 00021b68 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021b6c 4e 76 |Nv | TRAPV 00021b6e de fc 00 68 | h | ADDA.W #0x68,A7 00021b72 48 e7 fb f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7) 00021b76 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021b7c 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3 00021b82 72 01 |r | MOVEQ.L #0x01,D1 00021b84 74 10 |t | MOVEQ.L #0x10,D2 00021b86 76 0c |v | MOVEQ.L #0x0c,D3 00021b88 78 21 |x! | MOVEQ.L #0x21,D4 00021b8a 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00021b90 2f 3a e9 2a |/: * | MOVE.L 0x204bc,-(A7) 00021b94 2f 3a e9 22 |/: " | MOVE.L 0x204b8,-(A7) 00021b98 2f 3a e9 1a |/: | MOVE.L 0x204b4,-(A7) 00021b9c 59 4f |YO | SUBQ.L #0x4,A7 00021b9e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021ba2 3f 01 |? | MOVE.W D1,-(A7) 00021ba4 3f 03 |? | MOVE.W D3,-(A7) 00021ba6 4e 92 |N | JSR (A2) 00021ba8 50 4f |PO | ADDQ.L #0x8,A7 00021baa 4e 93 |N | JSR (A3) 00021bac de c2 | | ADDA.W D2,A7 00021bae 41 fa e9 1e |A | LEA.L 0x204ce,A0 00021bb2 70 06 |p | MOVEQ.L #0x06,D0 00021bb4 3f 20 |? | MOVE.W -(A0),-(A7) 00021bb6 51 c8 ff fc |Q | DBF D0,0x21bb4 00021bba 59 4f |YO | SUBQ.L #0x4,A7 00021bbc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021bc0 3f 01 |? | MOVE.W D1,-(A7) 00021bc2 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00021bc6 4e 92 |N | JSR (A2) 00021bc8 50 4f |PO | ADDQ.L #0x8,A7 00021bca 4e 93 |N | JSR (A3) 00021bcc 9e c2 | | SUBA.W D2,A7 00021bce 20 4f | O | MOVEA.L A7,A0 00021bd0 43 fa e8 fc |C | LEA.L 0x204ce,A1 00021bd4 70 20 |p | MOVEQ.L #0x20,D0 00021bd6 10 d9 | | MOVE.B (A1)+,(A0)+ 00021bd8 51 c8 ff fc |Q | DBF D0,0x21bd6 00021bdc 59 4f |YO | SUBQ.L #0x4,A7 00021bde 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021be2 3f 01 |? | MOVE.W D1,-(A7) 00021be4 3f 04 |? | MOVE.W D4,-(A7) 00021be6 4e 92 |N | JSR (A2) 00021be8 50 4f |PO | ADDQ.L #0x8,A7 00021bea 4e 93 |N | JSR (A3) 00021bec 58 4f |XO | ADDQ.L #0x4,A7 00021bee 20 4f | O | MOVEA.L A7,A0 00021bf0 43 fa e8 fe |C | LEA.L 0x204f0,A1 00021bf4 70 20 |p | MOVEQ.L #0x20,D0 00021bf6 10 d9 | | MOVE.B (A1)+,(A0)+ 00021bf8 51 c8 ff fc |Q | DBF D0,0x21bf6 00021bfc 59 4f |YO | SUBQ.L #0x4,A7 00021bfe 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021c02 3f 01 |? | MOVE.W D1,-(A7) 00021c04 3f 04 |? | MOVE.W D4,-(A7) 00021c06 4e 92 |N | JSR (A2) 00021c08 50 4f |PO | ADDQ.L #0x8,A7 00021c0a 4e 93 |N | JSR (A3) 00021c0c de fc 00 24 | $ | ADDA.W #0x24,A7 00021c10 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00021c16 4a 1f |J | TST.B (A7)+ 00021c18 66 0c |f | BNE 0x21c26 00021c1a 55 4f |UO | SUBQ.L #0x2,A7 00021c1c 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 00021c22 4a 1f |J | TST.B (A7)+ 00021c24 67 2c |g, | BEQ 0x21c52 00021c26 9e fc 00 2c | , | SUBA.W #0x2c,A7 00021c2a 20 4f | O | MOVEA.L A7,A0 00021c2c 43 fa e8 e4 |C | LEA.L 0x20512,A1 00021c30 70 2a |p* | MOVEQ.L #0x2a,D0 00021c32 10 d9 | | MOVE.B (A1)+,(A0)+ 00021c34 51 c8 ff fc |Q | DBF D0,0x21c32 00021c38 59 4f |YO | SUBQ.L #0x4,A7 00021c3a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021c3e 3f 01 |? | MOVE.W D1,-(A7) 00021c40 3f 3c 00 2b |?< + | MOVE.W #0x2b,-(A7) 00021c44 4e 92 |N | JSR (A2) 00021c46 50 4f |PO | ADDQ.L #0x8,A7 00021c48 4e 93 |N | JSR (A3) 00021c4a de fc 00 30 | 0 | ADDA.W #0x30,A7 00021c4e 7e 03 |~ | MOVEQ.L #0x03,D7 00021c50 60 02 |` | BRA 0x21c54 00021c52 7e 02 |~ | MOVEQ.L #0x02,D7 00021c54 9e c2 | | SUBA.W D2,A7 00021c56 20 4f | O | MOVEA.L A7,A0 00021c58 43 fa e8 e4 |C | LEA.L 0x2053e,A1 00021c5c 70 0e |p | MOVEQ.L #0x0e,D0 00021c5e 10 d9 | | MOVE.B (A1)+,(A0)+ 00021c60 51 c8 ff fc |Q | DBF D0,0x21c5e 00021c64 51 4f |QO | SUBQ.L #0x8,A7 00021c66 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021c6a 3f 01 |? | MOVE.W D1,-(A7) 00021c6c 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00021c70 4e 92 |N | JSR (A2) 00021c72 50 4f |PO | ADDQ.L #0x8,A7 00021c74 48 78 00 00 |Hx | PEA.L 0x0 00021c78 2f 07 |/ | MOVE.L D7,-(A7) 00021c7a 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 00021c80 de c3 | | ADDA.W D3,A7 00021c82 2c 1f |, | MOVE.L (A7)+,D6 00021c84 de c2 | | ADDA.W D2,A7 00021c86 bc 81 | | CMP.L D1,D6 00021c88 66 06 |f | BNE 0x21c90 00021c8a 4e ba fd c8 |N | JSR 0x21a54 00021c8e 60 1a |` | BRA 0x21caa 00021c90 0c 86 00 00 00 02 | | CMPI.L #0x00000002,D6 00021c96 66 06 |f | BNE 0x21c9e 00021c98 4e ba fa 52 |N R | JSR 0x216ec 00021c9c 60 0c |` | BRA 0x21caa 00021c9e 0c 86 00 00 00 03 | | CMPI.L #0x00000003,D6 00021ca4 66 04 |f | BNE 0x21caa 00021ca6 4e ba fb ca |N | JSR 0x21872 00021caa 4a 86 |J | TST.L D6 00021cac 66 00 fe dc |f | BNE 0x21b8a 00021cb0 4c df 0f df |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2+A3 00021cb4 4e 5e |N^ | UNLK A6 00021cb6 4e 75 |Nu | RTS 00021cb8 ; -------------------------------------------------------------------------------------- 00021cb8 ; OMSI PASCAL Function 00021cb8 ; <LVAR 0x008 1(r)> 00021cb8 ; <LVAR -0x005 @> 00021cb8 ; <LVAR -0x009 @> 00021cb8 ; <LVAR -0x00a @> 00021cb8 ; <LVAR -0x00b @ 1(r)> 00021cb8 ; <LVAR -0x00c 1(r)> 00021cb8 ; <LVAR -0x00d @ 1(r)> 00021cb8 ; <LVAR -0x00e @ 1(r)> 00021cb8 ; <LVAR -0x00f @ 1(r)> 00021cb8 ; <LVAR -0x010 1(r)> 00021cb8 ; <LVAR -0x011 @ 1(r)> 00021cb8 ; <LVAR -0x012 @ 1(r)> 00021cb8 ; -------------------------------------------------------------------------------------- 00021cb8 4e 56 ff 80 |NV | LINK.W A6,#0xff80 ; Spelunked 00021cbc bf d5 | | CMPA.L (A5),A7 00021cbe 62 06 |b | BHI 0x21cc6 00021cc0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021cc4 4e 76 |Nv | TRAPV 00021cc6 de fc 00 6e | n | ADDA.W #0x6e,A7 00021cca 48 e7 f0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7) 00021cce 41 ee ff f6 |A | LEA.L (A6-0xa),A0 00021cd2 43 ee ff f5 |C | LEA.L (A6-0xb),A1 00021cd6 45 ee ff ee |E | LEA.L (A6-0x12),A2 00021cda 47 ee ff ef |G | LEA.L (A6-0x11),A3 00021cde 49 ee ff f1 |I | LEA.L (A6-0xf),A4 00021ce2 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00021ce6 48 80 |H | EXTB.W D0 00021ce8 72 0e |r | MOVEQ.L #0x0e,D1 00021cea c3 c0 | | MULS.W D0,D1 00021cec 4a 35 10 24 |J5 $ | TST.B (A5+D1.W+#0x24) 00021cf0 66 00 01 92 |f | BNE 0x21e84 00021cf4 34 00 |4 | MOVE.W D0,D2 00021cf6 55 42 |UB | SUBQ.W #0x2,D2 00021cf8 0c 42 00 0d | B | CMPI.W #0x000d,D2 00021cfc 62 00 01 26 |b & | BHI switch@0x21d02[0x2] 00021d00 d4 42 | B | ADD.W D2,D2 00021d02 34 3b 20 06 4e fb 20 02 |4; N | SWITCH D2.W 00021d0a 00 b2 | | .CONST 0xb2 ; [0x0] -> 0x21dbc 00021d0c 00 82 | | .CONST 0x82 ; [0x1] -> 0x21d8c 00021d0e 01 1a | | .CONST 0x11a ; [0x2] -> 0x21e24 00021d10 01 1a | | .CONST 0x11a ; [0x3] -> 0x21e24 00021d12 00 1c | | .CONST 0x1c ; [0x4] -> 0x21d26 00021d14 00 52 | R | .CONST 0x52 ; [0x5] -> 0x21d5c 00021d16 01 1a | | .CONST 0x11a ; [0x6] -> 0x21e24 00021d18 01 1a | | .CONST 0x11a ; [0x7] -> 0x21e24 00021d1a 01 1a | | .CONST 0x11a ; [0x8] -> 0x21e24 00021d1c 01 1a | | .CONST 0x11a ; [0x9] -> 0x21e24 00021d1e 00 e4 | | .CONST 0xe4 ; [0xa] -> 0x21dee 00021d20 00 e4 | | .CONST 0xe4 ; [0xb] -> 0x21dee 00021d22 00 e4 | | .CONST 0xe4 ; [0xc] -> 0x21dee 00021d24 00 e4 | | .CONST 0xe4 ; [0xd] -> 0x21dee 00021d26 switch@0x21d02[0x4]: 00021d26 48 52 |HR | PEA.L (A2) 00021d28 48 53 |HS | PEA.L (A3) 00021d2a 48 54 |HT | PEA.L (A4) 00021d2c 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00021d30 48 50 |HP | PEA.L (A0) 00021d32 48 6e ff f7 |Hn | PEA.L (A6-0x9) 00021d36 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00021d3a 48 50 |HP | PEA.L (A0) 00021d3c 48 50 |HP | PEA.L (A0) 00021d3e 48 50 |HP | PEA.L (A0) 00021d40 48 50 |HP | PEA.L (A0) 00021d42 48 50 |HP | PEA.L (A0) 00021d44 48 50 |HP | PEA.L (A0) 00021d46 48 50 |HP | PEA.L (A0) 00021d48 48 6e ff fb |Hn | PEA.L (A6-0x5) 00021d4c 48 51 |HQ | PEA.L (A1) 00021d4e 4e b9 00 02 22 44 |N "D | JSR exp_READ_NOVRAM_INFO.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr) 00021d54 de fc 00 40 | @ | ADDA.W #0x40,A7 00021d58 60 00 00 cc |` | BRA 0x21e26 00021d5c switch@0x21d02[0x5]: 00021d5c 48 52 |HR | PEA.L (A2) 00021d5e 48 53 |HS | PEA.L (A3) 00021d60 48 54 |HT | PEA.L (A4) 00021d62 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00021d66 48 50 |HP | PEA.L (A0) 00021d68 48 6e ff f7 |Hn | PEA.L (A6-0x9) 00021d6c 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00021d70 48 50 |HP | PEA.L (A0) 00021d72 48 50 |HP | PEA.L (A0) 00021d74 48 50 |HP | PEA.L (A0) 00021d76 48 50 |HP | PEA.L (A0) 00021d78 48 50 |HP | PEA.L (A0) 00021d7a 48 50 |HP | PEA.L (A0) 00021d7c 48 50 |HP | PEA.L (A0) 00021d7e 48 6e ff fb |Hn | PEA.L (A6-0x5) 00021d82 48 51 |HQ | PEA.L (A1) 00021d84 4e b9 00 02 22 c6 |N " | JSR exp_READ_NOVRAM_INFO.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr) 00021d8a 60 c8 |` | BRA 0x21d54 00021d8c switch@0x21d02[0x1]: 00021d8c 48 52 |HR | PEA.L (A2) 00021d8e 48 53 |HS | PEA.L (A3) 00021d90 48 54 |HT | PEA.L (A4) 00021d92 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00021d96 48 50 |HP | PEA.L (A0) 00021d98 48 6e ff f7 |Hn | PEA.L (A6-0x9) 00021d9c 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00021da0 48 50 |HP | PEA.L (A0) 00021da2 48 50 |HP | PEA.L (A0) 00021da4 48 50 |HP | PEA.L (A0) 00021da6 48 50 |HP | PEA.L (A0) 00021da8 48 50 |HP | PEA.L (A0) 00021daa 48 50 |HP | PEA.L (A0) 00021dac 48 50 |HP | PEA.L (A0) 00021dae 48 6e ff fb |Hn | PEA.L (A6-0x5) 00021db2 48 51 |HQ | PEA.L (A1) 00021db4 4e b9 00 02 21 18 |N ! | JSR exp_READ_NOVRAM_INFO.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr) 00021dba 60 98 |` | BRA 0x21d54 00021dbc switch@0x21d02[0x0]: 00021dbc 48 52 |HR | PEA.L (A2) 00021dbe 48 53 |HS | PEA.L (A3) 00021dc0 48 54 |HT | PEA.L (A4) 00021dc2 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00021dc6 48 50 |HP | PEA.L (A0) 00021dc8 48 6e ff f7 |Hn | PEA.L (A6-0x9) 00021dcc 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00021dd0 48 50 |HP | PEA.L (A0) 00021dd2 48 50 |HP | PEA.L (A0) 00021dd4 48 50 |HP | PEA.L (A0) 00021dd6 48 50 |HP | PEA.L (A0) 00021dd8 48 50 |HP | PEA.L (A0) 00021dda 48 50 |HP | PEA.L (A0) 00021ddc 48 50 |HP | PEA.L (A0) 00021dde 48 6e ff fb |Hn | PEA.L (A6-0x5) 00021de2 48 51 |HQ | PEA.L (A1) 00021de4 4e b9 00 02 21 9a |N ! | JSR exp_READ_NOVRAM_INFO.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr) 00021dea 60 00 ff 68 |` h | BRA 0x21d54 00021dee switch@0x21d02[0xa]: 00021dee switch@0x21d02[0xb]: 00021dee switch@0x21d02[0xc]: 00021dee switch@0x21d02[0xd]: 00021dee 1f 00 | | MOVE.B D0,-(A7) 00021df0 48 52 |HR | PEA.L (A2) 00021df2 48 53 |HS | PEA.L (A3) 00021df4 48 54 |HT | PEA.L (A4) 00021df6 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00021dfa 48 50 |HP | PEA.L (A0) 00021dfc 48 6e ff f7 |Hn | PEA.L (A6-0x9) 00021e00 48 6e ff f3 |Hn | PEA.L (A6-0xd) 00021e04 48 50 |HP | PEA.L (A0) 00021e06 48 50 |HP | PEA.L (A0) 00021e08 48 50 |HP | PEA.L (A0) 00021e0a 48 50 |HP | PEA.L (A0) 00021e0c 48 50 |HP | PEA.L (A0) 00021e0e 48 50 |HP | PEA.L (A0) 00021e10 48 50 |HP | PEA.L (A0) 00021e12 48 6e ff fb |Hn | PEA.L (A6-0x5) 00021e16 48 51 |HQ | PEA.L (A1) 00021e18 4e b9 00 02 25 60 |N %` | JSR 0x22560 00021e1e de fc 00 42 | B | ADDA.W #0x42,A7 00021e22 60 02 |` | BRA 0x21e26 00021e24 switch@0x21d02[0x2]: 00021e24 switch@0x21d02[0x3]: 00021e24 switch@0x21d02[0x6]: 00021e24 switch@0x21d02[0x7]: 00021e24 switch@0x21d02[0x8]: 00021e24 switch@0x21d02[0x9]: 00021e24 42 11 |B | CLR.B (A1) 00021e26 4a 11 |J | TST.B (A1) 00021e28 66 0a |f | BNE 0x21e34 00021e2a 1f 00 | | MOVE.B D0,-(A7) 00021e2c 4e ba f6 96 |N | JSR 0x214c4 00021e30 54 4f |TO | ADDQ.L #0x2,A7 00021e32 60 48 |`H | BRA 0x21e7c 00021e34 42 82 |B | CLR.L D2 00021e36 14 12 | | MOVE.B (A2),D2 00021e38 3b 82 10 18 |; | MOVE.W D2,(A5+D1.W+#0x18) 00021e3c 42 82 |B | CLR.L D2 00021e3e 14 13 | | MOVE.B (A3),D2 00021e40 e1 42 | B | ASL.W #0x8,D2 00021e42 42 83 |B | CLR.L D3 00021e44 16 2e ff f0 | . | MOVE.B (A6-0x10),D3 00021e48 d6 42 | B | ADD.W D2,D3 00021e4a 3b 83 10 1a |; | MOVE.W D3,(A5+D1.W+#0x1a) 00021e4e 42 82 |B | CLR.L D2 00021e50 14 14 | | MOVE.B (A4),D2 00021e52 3b 82 10 1c |; | MOVE.W D2,(A5+D1.W+#0x1c) 00021e56 42 82 |B | CLR.L D2 00021e58 14 2e ff f2 | . | MOVE.B (A6-0xe),D2 00021e5c 3b 82 10 1e |; | MOVE.W D2,(A5+D1.W+#0x1e) 00021e60 55 4f |UO | SUBQ.L #0x2,A7 00021e62 1e ae ff f3 | | MOVE.B (A6-0xd),(A7) 00021e66 1f 6e ff f4 00 01 | n | MOVE.B (A6-0xc),(A7+0x1) 00021e6c 48 75 10 20 |Hu | PEA.L (A5+D1.W+#0x20) 00021e70 4e ba e7 c2 |N | JSR 0x20634 00021e74 5c 4f |\O | ADDQ.L #0x6,A7 00021e76 1b bc 00 01 10 24 | $ | MOVE.B #0x01,(A5+D1.W+#0x24) 00021e7c 1f 00 | | MOVE.B D0,-(A7) 00021e7e 4e ba f1 d0 |N | JSR 0x21050 00021e82 54 4f |TO | ADDQ.L #0x2,A7 00021e84 4c df 1f 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4 00021e88 4e 5e |N^ | UNLK A6 00021e8a 4e 75 |Nu | RTS 00021e8c ; -------------------------------------------------------------------------------------- 00021e8c ; OMSI PASCAL Function 00021e8c ; -------------------------------------------------------------------------------------- 00021e8c 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 00021e90 bf d5 | | CMPA.L (A5),A7 00021e92 62 06 |b | BHI 0x21e9a 00021e94 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021e98 4e 76 |Nv | TRAPV 00021e9a de fc 00 14 | | ADDA.W #0x14,A7 00021e9e 48 e7 01 80 |H | MOVEM.L A0+D7,-(A7) 00021ea2 41 fa fe 14 |A | LEA.L 0x21cb8,A0 00021ea6 1f 3c 00 04 | < | MOVE.B #0x04,-(A7) 00021eaa 4e 90 |N | JSR (A0) 00021eac 1e bc 00 07 | | MOVE.B #0x07,(A7) 00021eb0 4e 90 |N | JSR (A0) 00021eb2 1e bc 00 06 | | MOVE.B #0x06,(A7) 00021eb6 4e 90 |N | JSR (A0) 00021eb8 1e bc 00 02 | | MOVE.B #0x02,(A7) 00021ebc 4e 90 |N | JSR (A0) 00021ebe 1e bc 00 03 | | MOVE.B #0x03,(A7) 00021ec2 4e 90 |N | JSR (A0) 00021ec4 54 4f |TO | ADDQ.L #0x2,A7 00021ec6 7e 0c |~ | MOVEQ.L #0x0c,D7 00021ec8 55 4f |UO | SUBQ.L #0x2,A7 00021eca 1f 07 | | MOVE.B D7,-(A7) 00021ecc 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00021ed2 54 4f |TO | ADDQ.L #0x2,A7 00021ed4 4a 1f |J | TST.B (A7)+ 00021ed6 67 06 |g | BEQ 0x21ede 00021ed8 1f 07 | | MOVE.B D7,-(A7) 00021eda 4e 90 |N | JSR (A0) 00021edc 54 4f |TO | ADDQ.L #0x2,A7 00021ede 52 07 |R | ADDQ.B #0x1,D7 00021ee0 0c 07 00 0f | | CMPI.B #0x0f,D7 00021ee4 6f e2 |o | BLE 0x21ec8 00021ee6 4c df 01 80 |L | MOVEM.L (A7)+,D7+A0 00021eea 4e 5e |N^ | UNLK A6 00021eec 4e 75 |Nu | RTS 00021eee ; -------------------------------------------------------------------------------------- 00021eee ; OMSI PASCAL Function 00021eee ; -------------------------------------------------------------------------------------- 00021eee START: 00021eee 4f fa 00 08 |O | LEA.L MAIN,A7 00021ef2 4e f9 00 01 02 80 |N | JMP ?start_program 00021ef8 MAIN: 00021ef8 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021efe 72 01 |r | MOVEQ.L #0x01,D1 00021f00 74 0a |t | MOVEQ.L #0x0a,D2 00021f02 76 09 |v | MOVEQ.L #0x09,D3 00021f04 4e b9 00 01 03 98 |N | JSR FSCALL_10398 00021f0a 51 4f |QO | SUBQ.L #0x8,A7 00021f0c 20 4f | O | MOVEA.L A7,A0 00021f0e 43 fa e6 3e |C > | LEA.L 0x2054e,A1 00021f12 70 06 |p | MOVEQ.L #0x06,D0 00021f14 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f16 51 c8 ff fc |Q | DBF D0,0x21f14 00021f1a 5d 4f |]O | SUBQ.L #0x6,A7 00021f1c 4e b9 00 01 03 c4 |N | JSR GetArgv() : String 00021f22 59 4f |YO | SUBQ.L #0x4,A7 00021f24 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00021f28 3f 01 |? | MOVE.W D1,-(A7) 00021f2a 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 00021f2e 4e 92 |N | JSR (A2) 00021f30 50 4f |PO | ADDQ.L #0x8,A7 00021f32 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00021f38 50 4f |PO | ADDQ.L #0x8,A7 00021f3a 4a 1f |J | TST.B (A7)+ 00021f3c 67 16 |g | BEQ 0x21f54 00021f3e 48 78 00 00 |Hx | PEA.L 0x0 00021f42 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 00021f48 58 4f |XO | ADDQ.L #0x4,A7 00021f4a 4e ba ec 68 |N h | JSR 0x20bb4 00021f4e 4e ba ff 3c |N < | JSR 0x21e8c 00021f52 60 66 |`f | BRA 0x21fba 00021f54 4e b9 00 01 05 b6 |N | JSR R1000_Reset_L(void) 00021f5a 9e c2 | | SUBA.W D2,A7 00021f5c 20 4f | O | MOVEA.L A7,A0 00021f5e 43 fa e5 f6 |C | LEA.L 0x20556,A1 00021f62 70 08 |p | MOVEQ.L #0x08,D0 00021f64 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f66 51 c8 ff fc |Q | DBF D0,0x21f64 00021f6a 9e c2 | | SUBA.W D2,A7 00021f6c 20 4f | O | MOVEA.L A7,A0 00021f6e 43 fa e5 f0 |C | LEA.L 0x20560,A1 00021f72 70 08 |p | MOVEQ.L #0x08,D0 00021f74 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f76 51 c8 ff fc |Q | DBF D0,0x21f74 00021f7a 59 4f |YO | SUBQ.L #0x4,A7 00021f7c 48 6f 00 0e |Ho | PEA.L (A7+0xe) 00021f80 3f 01 |? | MOVE.W D1,-(A7) 00021f82 3f 03 |? | MOVE.W D3,-(A7) 00021f84 4e 92 |N | JSR (A2) 00021f86 58 4f |XO | ADDQ.L #0x4,A7 00021f88 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021f8c 3f 01 |? | MOVE.W D1,-(A7) 00021f8e 3f 03 |? | MOVE.W D3,-(A7) 00021f90 4e 92 |N | JSR (A2) 00021f92 5c 4f |\O | ADDQ.L #0x6,A7 00021f94 1e bc 00 02 | | MOVE.B #0x02,(A7) 00021f98 48 6d 00 fd |Hm | PEA.L (A5+0xfd) 00021f9c 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00021fa2 de fc 00 22 | " | ADDA.W #0x22,A7 00021fa6 48 78 00 00 |Hx | PEA.L 0x0 00021faa 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 00021fb0 58 4f |XO | ADDQ.L #0x4,A7 00021fb2 4e ba ec 00 |N | JSR 0x20bb4 00021fb6 4e ba fb a8 |N | JSR 0x21b60 00021fba 5c 4f |\O | ADDQ.L #0x6,A7 00021fbc 42 17 |B | CLR.B (A7) 00021fbe 48 78 00 01 |Hx | PEA.L 0x1 00021fc2 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021fc8 5c 4f |\O | ADDQ.L #0x6,A7 00021fca 4e b9 00 01 02 84 |N | JSR ?exit 00021fd0 4e 56 00 00 |NV | LINK.W A6,#0x0000 00021fd4 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00021fd8 bf d5 | | CMPA.L (A5),A7 00021fda 4e 76 |Nv | TRAPV 00021fdc 42 2e 00 08 |B. | CLR.B (A6+0x8) 00021fe0 30 39 93 03 e0 00 |09 | MOVE.W 0x9303e000,D0 00021fe6 02 40 00 08 | @ | ANDI.W #0x0008,D0 00021fea 67 00 00 06 |g | BEQ 0x21ff2 00021fee 52 2e 00 08 |R. | ADDQ.B #0x1,(A6+0x8) 00021ff2 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00021ff6 4e 5e |N^ | UNLK A6 00021ff8 4e 75 |Nu | RTS 00021ffa 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 00021ffe 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00022002 bf d5 | | CMPA.L (A5),A7 00022004 4e 76 |Nv | TRAPV 00022006 30 3c 02 01 |0< | MOVE.W #0x201,D0 0002200a 4e b9 80 00 20 64 |N d | JSR 0x80002064 00022010 67 00 00 06 |g | BEQ 0x22018 00022014 30 7c 00 00 |0| | MOVEA.W #0x0,A0 00022018 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 0002201c 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00022020 4e 5e |N^ | UNLK A6 00022022 4e 75 |Nu | RTS 00022024 4e 56 00 00 |NV | LINK.W A6,#0x0000 00022028 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 0002202c bf d5 | | CMPA.L (A5),A7 0002202e 4e 76 |Nv | TRAPV 00022030 30 3c 07 00 |0< | MOVE.W #0x700,D0 00022034 4e b9 80 00 20 64 |N d | JSR 0x80002064 0002203a 67 00 00 06 |g | BEQ 0x22042 0002203e 30 7c 00 00 |0| | MOVEA.W #0x0,A0 00022042 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 00022046 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 0002204a 4e 5e |N^ | UNLK A6 0002204c 4e 75 |Nu | RTS 0002204e 4e 56 00 00 |NV | LINK.W A6,#0x0000 00022052 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00022056 bf d5 | | CMPA.L (A5),A7 00022058 4e 76 |Nv | TRAPV 0002205a 30 3c 08 00 |0< | MOVE.W #0x800,D0 0002205e 4e b9 80 00 20 64 |N d | JSR 0x80002064 00022064 67 00 00 06 |g | BEQ 0x2206c 00022068 30 7c 00 00 |0| | MOVEA.W #0x0,A0 0002206c 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 00022070 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00022074 4e 5e |N^ | UNLK A6 00022076 4e 75 |Nu | RTS 00022078 4e 56 00 00 |NV | LINK.W A6,#0x0000 0002207c 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00022080 bf d5 | | CMPA.L (A5),A7 00022082 4e 76 |Nv | TRAPV 00022084 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00022088 4e b9 80 00 20 5c |N \ | JSR 0x8000205c 0002208e 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022092 42 90 |B | CLR.L (A0) 00022094 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 00022098 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 0002209c 4e 5e |N^ | UNLK A6 0002209e 4e 75 |Nu | RTS 000220a0 4e 56 00 00 |NV | LINK.W A6,#0x0000 000220a4 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 000220a8 bf d5 | | CMPA.L (A5),A7 000220aa 4e 76 |Nv | TRAPV 000220ac 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 000220b0 4e b9 80 00 20 60 |N ` | JSR 0x80002060 000220b6 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000220ba 42 90 |B | CLR.L (A0) 000220bc 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 000220c0 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 000220c4 4e 5e |N^ | UNLK A6 000220c6 4e 75 |Nu | RTS 000220c8 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 000220cc 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 000220d0 bf d5 | | CMPA.L (A5),A7 000220d2 4e 76 |Nv | TRAPV 000220d4 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 000220d8 4e b9 80 00 20 6c |N l | JSR 0x8000206c 000220de 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000220e2 42 90 |B | CLR.L (A0) 000220e4 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 000220e8 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 000220ec 4e 5e |N^ | UNLK A6 000220ee 4e 75 |Nu | RTS 000220f0 exp_WRITE_NOVRAM_DATA.FIU(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2): 000220f0 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000220f6 00 12 | | .CONST 0x0012 ; Stack-delta 000220f8 15 57 52 49 54 45 5f 4e | WRITE_N| .TXT 21,'WRITE_NOVRAM_DATA.FIU' 0002210e 00 | | .CONST 0x0 0002210f 03 | | .CONST 0x3 ; DIPROC address 00022110 00 | | .CONST 0x0 ; Output Parameters 00022111 05 | | .CONST 0x5 ; Input Parameters 00022112 00 | | .CONST 0x0 ; In arg [1] 00022113 01 | | .CONST 0x1 ; In arg [2] 00022114 00 | | .CONST 0x0 ; In arg [1] 00022115 00 | | .CONST 0x0 ; In arg [1] 00022116 01 | | .CONST 0x1 ; In arg [2] 00022117 00 | | .PAD 0x0 00022118 exp_READ_NOVRAM_INFO.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr): 00022118 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002211e 00 48 | H | .CONST 0x0048 ; Stack-delta 00022120 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_INFO.FIU' 00022135 00 | | .CONST 0x0 00022136 03 | | .CONST 0x3 ; DIPROC address 00022137 10 | | .CONST 0x10 ; Output Parameters 00022138 00 | | .CONST 0x0 ; Input Parameters 00022139 00 | | .CONST 0x0 ; Out arg [1] 0002213a 01 | | .CONST 0x1 ; Out arg [2] 0002213b 00 | | .CONST 0x0 ; Out arg [1] 0002213c 00 | | .CONST 0x0 ; Out arg [1] 0002213d 00 | | .CONST 0x0 ; Out arg [1] 0002213e 03 | | .CONST 0x3 ; Out arg [4] 0002213f 01 | | .CONST 0x1 ; Out arg [2] 00022140 00 | | .CONST 0x0 ; Out arg [1] 00022141 00 | | .CONST 0x0 ; Out arg [1] 00022142 00 | | .CONST 0x0 ; Out arg [1] 00022143 00 | | .CONST 0x0 ; Out arg [1] 00022144 00 | | .CONST 0x0 ; Out arg [1] 00022145 00 | | .CONST 0x0 ; Out arg [1] 00022146 00 | | .CONST 0x0 ; Out arg [1] 00022147 01 | | .CONST 0x1 ; Out arg [2] 00022148 08 | | .CONST 0x8 ; Out arg flag 00022149 00 | | .PAD 0x0 0002214a exp_READ_NOVRAM_DATA.FIU(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 0002214a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022150 00 20 | | .CONST 0x0020 ; Stack-delta 00022152 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.FIU' 00022167 00 | | .CONST 0x0 00022168 03 | | .CONST 0x3 ; DIPROC address 00022169 06 | | .CONST 0x6 ; Output Parameters 0002216a 00 | | .CONST 0x0 ; Input Parameters 0002216b 00 | | .CONST 0x0 ; Out arg [1] 0002216c 01 | | .CONST 0x1 ; Out arg [2] 0002216d 00 | | .CONST 0x0 ; Out arg [1] 0002216e 00 | | .CONST 0x0 ; Out arg [1] 0002216f 01 | | .CONST 0x1 ; Out arg [2] 00022170 08 | | .CONST 0x8 ; Out arg flag 00022171 00 | | .PAD 0x0 00022172 exp_WRITE_NOVRAM_DATA.SEQ(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2): 00022172 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022178 00 12 | | .CONST 0x0012 ; Stack-delta 0002217a 15 57 52 49 54 45 5f 4e | WRITE_N| .TXT 21,'WRITE_NOVRAM_DATA.SEQ' 00022190 00 | | .CONST 0x0 00022191 02 | | .CONST 0x2 ; DIPROC address 00022192 00 | | .CONST 0x0 ; Output Parameters 00022193 05 | | .CONST 0x5 ; Input Parameters 00022194 00 | | .CONST 0x0 ; In arg [1] 00022195 01 | | .CONST 0x1 ; In arg [2] 00022196 00 | | .CONST 0x0 ; In arg [1] 00022197 00 | | .CONST 0x0 ; In arg [1] 00022198 01 | | .CONST 0x1 ; In arg [2] 00022199 00 | | .PAD 0x0 0002219a exp_READ_NOVRAM_INFO.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr): 0002219a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000221a0 00 48 | H | .CONST 0x0048 ; Stack-delta 000221a2 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_INFO.SEQ' 000221b7 00 | | .CONST 0x0 000221b8 02 | | .CONST 0x2 ; DIPROC address 000221b9 10 | | .CONST 0x10 ; Output Parameters 000221ba 00 | | .CONST 0x0 ; Input Parameters 000221bb 00 | | .CONST 0x0 ; Out arg [1] 000221bc 01 | | .CONST 0x1 ; Out arg [2] 000221bd 00 | | .CONST 0x0 ; Out arg [1] 000221be 00 | | .CONST 0x0 ; Out arg [1] 000221bf 00 | | .CONST 0x0 ; Out arg [1] 000221c0 03 | | .CONST 0x3 ; Out arg [4] 000221c1 01 | | .CONST 0x1 ; Out arg [2] 000221c2 00 | | .CONST 0x0 ; Out arg [1] 000221c3 00 | | .CONST 0x0 ; Out arg [1] 000221c4 00 | | .CONST 0x0 ; Out arg [1] 000221c5 00 | | .CONST 0x0 ; Out arg [1] 000221c6 00 | | .CONST 0x0 ; Out arg [1] 000221c7 00 | | .CONST 0x0 ; Out arg [1] 000221c8 00 | | .CONST 0x0 ; Out arg [1] 000221c9 01 | | .CONST 0x1 ; Out arg [2] 000221ca 08 | | .CONST 0x8 ; Out arg flag 000221cb 00 | | .PAD 0x0 000221cc exp_READ_NOVRAM_DATA.SEQ(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 000221cc 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000221d2 00 20 | | .CONST 0x0020 ; Stack-delta 000221d4 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.SEQ' 000221e9 00 | | .CONST 0x0 000221ea 02 | | .CONST 0x2 ; DIPROC address 000221eb 06 | | .CONST 0x6 ; Output Parameters 000221ec 00 | | .CONST 0x0 ; Input Parameters 000221ed 00 | | .CONST 0x0 ; Out arg [1] 000221ee 01 | | .CONST 0x1 ; Out arg [2] 000221ef 00 | | .CONST 0x0 ; Out arg [1] 000221f0 00 | | .CONST 0x0 ; Out arg [1] 000221f1 01 | | .CONST 0x1 ; Out arg [2] 000221f2 08 | | .CONST 0x8 ; Out arg flag 000221f3 00 | | .PAD 0x0 000221f4 exp_WRITE_NOVRAM_DATA.TYP(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2): 000221f4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000221fa 00 12 | | .CONST 0x0012 ; Stack-delta 000221fc 15 57 52 49 54 45 5f 4e | WRITE_N| .TXT 21,'WRITE_NOVRAM_DATA.TYP' 00022212 00 | | .CONST 0x0 00022213 06 | | .CONST 0x6 ; DIPROC address 00022214 00 | | .CONST 0x0 ; Output Parameters 00022215 05 | | .CONST 0x5 ; Input Parameters 00022216 00 | | .CONST 0x0 ; In arg [1] 00022217 01 | | .CONST 0x1 ; In arg [2] 00022218 00 | | .CONST 0x0 ; In arg [1] 00022219 00 | | .CONST 0x0 ; In arg [1] 0002221a 01 | | .CONST 0x1 ; In arg [2] 0002221b 00 | | .PAD 0x0 0002221c exp_READ_NOVRAM_DATA.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 0002221c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00022222 00 20 | | .CONST 0x0020 ; Stack-delta 00022224 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.TYP' 00022239 00 | | .CONST 0x0 0002223a 06 | | .CONST 0x6 ; DIPROC address 0002223b 06 | | .CONST 0x6 ; Output Parameters 0002223c 00 | | .CONST 0x0 ; Input Parameters 0002223d 00 | | .CONST 0x0 ; Out arg [1] 0002223e 01 | | .CONST 0x1 ; Out arg [2] 0002223f 00 | | .CONST 0x0 ; Out arg [1] 00022240 00 | | .CONST 0x0 ; Out arg [1] 00022241 01 | | .CONST 0x1 ; Out arg [2] 00022242 08 | | .CONST 0x8 ; Out arg flag 00022243 00 | | .PAD 0x0 00022244 exp_READ_NOVRAM_INFO.TYP(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr): 00022244 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002224a 00 48 | H | .CONST 0x0048 ; Stack-delta 0002224c 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_INFO.TYP' 00022261 00 | | .CONST 0x0 00022262 06 | | .CONST 0x6 ; DIPROC address 00022263 10 | | .CONST 0x10 ; Output Parameters 00022264 00 | | .CONST 0x0 ; Input Parameters 00022265 00 | | .CONST 0x0 ; Out arg [1] 00022266 01 | | .CONST 0x1 ; Out arg [2] 00022267 00 | | .CONST 0x0 ; Out arg [1] 00022268 00 | | .CONST 0x0 ; Out arg [1] 00022269 00 | | .CONST 0x0 ; Out arg [1] 0002226a 03 | | .CONST 0x3 ; Out arg [4] 0002226b 01 | | .CONST 0x1 ; Out arg [2] 0002226c 00 | | .CONST 0x0 ; Out arg [1] 0002226d 00 | | .CONST 0x0 ; Out arg [1] 0002226e 00 | | .CONST 0x0 ; Out arg [1] 0002226f 00 | | .CONST 0x0 ; Out arg [1] 00022270 00 | | .CONST 0x0 ; Out arg [1] 00022271 00 | | .CONST 0x0 ; Out arg [1] 00022272 00 | | .CONST 0x0 ; Out arg [1] 00022273 01 | | .CONST 0x1 ; Out arg [2] 00022274 08 | | .CONST 0x8 ; Out arg flag 00022275 00 | | .PAD 0x0 00022276 exp_WRITE_NOVRAM_DATA.VAL(Sw_1, Sw_2, Sw_1, Sw_1, Sw_2): 00022276 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002227c 00 12 | | .CONST 0x0012 ; Stack-delta 0002227e 15 57 52 49 54 45 5f 4e | WRITE_N| .TXT 21,'WRITE_NOVRAM_DATA.VAL' 00022294 00 | | .CONST 0x0 00022295 07 | | .CONST 0x7 ; DIPROC address 00022296 00 | | .CONST 0x0 ; Output Parameters 00022297 05 | | .CONST 0x5 ; Input Parameters 00022298 00 | | .CONST 0x0 ; In arg [1] 00022299 01 | | .CONST 0x1 ; In arg [2] 0002229a 00 | | .CONST 0x0 ; In arg [1] 0002229b 00 | | .CONST 0x0 ; In arg [1] 0002229c 01 | | .CONST 0x1 ; In arg [2] 0002229d 00 | | .PAD 0x0 0002229e exp_READ_NOVRAM_DATA.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_2, &Fr): 0002229e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000222a4 00 20 | | .CONST 0x0020 ; Stack-delta 000222a6 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_DATA.VAL' 000222bb 00 | | .CONST 0x0 000222bc 07 | | .CONST 0x7 ; DIPROC address 000222bd 06 | | .CONST 0x6 ; Output Parameters 000222be 00 | | .CONST 0x0 ; Input Parameters 000222bf 00 | | .CONST 0x0 ; Out arg [1] 000222c0 01 | | .CONST 0x1 ; Out arg [2] 000222c1 00 | | .CONST 0x0 ; Out arg [1] 000222c2 00 | | .CONST 0x0 ; Out arg [1] 000222c3 01 | | .CONST 0x1 ; Out arg [2] 000222c4 08 | | .CONST 0x8 ; Out arg flag 000222c5 00 | | .PAD 0x0 000222c6 exp_READ_NOVRAM_INFO.VAL(&Sr_1, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_4, &Sr_2, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_1, &Sr_2, &Fr): 000222c6 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000222cc 00 48 | H | .CONST 0x0048 ; Stack-delta 000222ce 14 52 45 41 44 5f 4e 4f | READ_NO| .TXT 20,'READ_NOVRAM_INFO.VAL' 000222e3 00 | | .CONST 0x0 000222e4 07 | | .CONST 0x7 ; DIPROC address 000222e5 10 | | .CONST 0x10 ; Output Parameters 000222e6 00 | | .CONST 0x0 ; Input Parameters 000222e7 00 | | .CONST 0x0 ; Out arg [1] 000222e8 01 | | .CONST 0x1 ; Out arg [2] 000222e9 00 | | .CONST 0x0 ; Out arg [1] 000222ea 00 | | .CONST 0x0 ; Out arg [1] 000222eb 00 | | .CONST 0x0 ; Out arg [1] 000222ec 03 | | .CONST 0x3 ; Out arg [4] 000222ed 01 | | .CONST 0x1 ; Out arg [2] 000222ee 00 | | .CONST 0x0 ; Out arg [1] 000222ef 00 | | .CONST 0x0 ; Out arg [1] 000222f0 00 | | .CONST 0x0 ; Out arg [1] 000222f1 00 | | .CONST 0x0 ; Out arg [1] 000222f2 00 | | .CONST 0x0 ; Out arg [1] 000222f3 00 | | .CONST 0x0 ; Out arg [1] 000222f4 00 | | .CONST 0x0 ; Out arg [1] 000222f5 01 | | .CONST 0x1 ; Out arg [2] 000222f6 08 | | .CONST 0x8 ; Out arg flag 000222f7 00 | | .PAD 0x0 000222f8 57 52 49 54 45 5f 4e 4f |WRITE_NO| .TXT 'WRITE_NOVRAM_DATA.MEM ' 0002230e 57 52 49 54 45 5f 4e 4f |WRITE_NO| .TXT 'WRITE_NOVRAM_DATA.M32 ' 00022324 ; -------------------------------------------------------------------------------------- 00022324 ; OMSI PASCAL Function 00022324 ; <LVAR 0x012 1(r)> 00022324 ; <LVAR 0x010 1(r)> 00022324 ; <LVAR 0x00e 2(r)> 00022324 ; <LVAR 0x00c 1(r)> 00022324 ; <LVAR 0x00a 1(r)> 00022324 ; <LVAR 0x008 2(r)> 00022324 ; <LVAR -0x004 @ 4(r)> 00022324 ; -------------------------------------------------------------------------------------- 00022324 4e 56 ff b6 |NV | LINK.W A6,#0xffb6 00022328 bf d5 | | CMPA.L (A5),A7 0002232a 62 06 |b | BHI 0x22332 0002232c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022330 4e 76 |Nv | TRAPV 00022332 de fc 00 46 | F | ADDA.W #0x46,A7 00022336 48 e7 e0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D2+D1+D0,-(A7) 0002233a 45 ee ff fc |E | LEA.L (A6-0x4),A2 0002233e 47 f8 00 00 |G | LEA.L 0x0,A3 00022342 49 f9 00 01 04 66 |I f | LEA.L ExpInputParam(exp : Pointer; ptr : Pointer; len : L),A4 00022348 72 10 |r | MOVEQ.L #0x10,D1 0002234a 74 16 |t | MOVEQ.L #0x16,D2 0002234c 55 4f |UO | SUBQ.L #0x2,A7 0002234e 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00022354 4a 1f |J | TST.B (A7)+ 00022356 67 12 |g | BEQ 0x2236a 00022358 9e c2 | | SUBA.W D2,A7 0002235a 20 4f | O | MOVEA.L A7,A0 0002235c 43 fa ff 9a |C | LEA.L 0x222f8,A1 00022360 70 14 |p | MOVEQ.L #0x14,D0 00022362 10 d9 | | MOVE.B (A1)+,(A0)+ 00022364 51 c8 ff fc |Q | DBF D0,0x22362 00022368 60 10 |` | BRA 0x2237a 0002236a 9e c2 | | SUBA.W D2,A7 0002236c 20 4f | O | MOVEA.L A7,A0 0002236e 43 fa ff 9e |C | LEA.L 0x2230e,A1 00022372 70 14 |p | MOVEQ.L #0x14,D0 00022374 10 d9 | | MOVE.B (A1)+,(A0)+ 00022376 51 c8 ff fc |Q | DBF D0,0x22374 0002237a 59 4f |YO | SUBQ.L #0x4,A7 0002237c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022380 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022384 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 00022388 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002238e 50 4f |PO | ADDQ.L #0x8,A7 00022390 48 52 |HR | PEA.L (A2) 00022392 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00022398 de fc 00 1e | | ADDA.W #0x1e,A7 0002239c 1f 2e 00 10 | . | MOVE.B (A6+0x10),-(A7) 000223a0 2f 12 |/ | MOVE.L (A2),-(A7) 000223a2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000223a6 48 53 |HS | PEA.L (A3) 000223a8 48 53 |HS | PEA.L (A3) 000223aa 4e 94 |N | JSR (A4) 000223ac de c1 | | ADDA.W D1,A7 000223ae 3e ae 00 0e |> | MOVE.W (A6+0xe),(A7) 000223b2 2f 12 |/ | MOVE.L (A2),-(A7) 000223b4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000223b8 48 53 |HS | PEA.L (A3) 000223ba 48 78 00 01 |Hx | PEA.L 0x1 000223be 4e 94 |N | JSR (A4) 000223c0 de c1 | | ADDA.W D1,A7 000223c2 1e ae 00 0c | | MOVE.B (A6+0xc),(A7) 000223c6 2f 12 |/ | MOVE.L (A2),-(A7) 000223c8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000223cc 48 53 |HS | PEA.L (A3) 000223ce 48 53 |HS | PEA.L (A3) 000223d0 4e 94 |N | JSR (A4) 000223d2 de c1 | | ADDA.W D1,A7 000223d4 1e ae 00 0a | | MOVE.B (A6+0xa),(A7) 000223d8 2f 12 |/ | MOVE.L (A2),-(A7) 000223da 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000223de 48 53 |HS | PEA.L (A3) 000223e0 48 53 |HS | PEA.L (A3) 000223e2 4e 94 |N | JSR (A4) 000223e4 de c1 | | ADDA.W D1,A7 000223e6 3e ae 00 08 |> | MOVE.W (A6+0x8),(A7) 000223ea 2f 12 |/ | MOVE.L (A2),-(A7) 000223ec 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000223f0 48 53 |HS | PEA.L (A3) 000223f2 48 78 00 01 |Hx | PEA.L 0x1 000223f6 4e 94 |N | JSR (A4) 000223f8 de c1 | | ADDA.W D1,A7 000223fa 42 17 |B | CLR.B (A7) 000223fc 1f 2e 00 12 | . | MOVE.B (A6+0x12),-(A7) 00022400 2f 12 |/ | MOVE.L (A2),-(A7) 00022402 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00022408 50 4f |PO | ADDQ.L #0x8,A7 0002240a 48 52 |HR | PEA.L (A2) 0002240c 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00022412 58 4f |XO | ADDQ.L #0x4,A7 00022414 4c df 1f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3+A4 00022418 4e 5e |N^ | UNLK A6 0002241a 4e 75 |Nu | RTS 0002241c 52 45 41 44 5f 4e 4f 56 |READ_NOV| .TXT 'READ_NOVRAM_DATA.MEM' 00022430 52 45 41 44 5f 4e 4f 56 |READ_NOV| .TXT 'READ_NOVRAM_DATA.M32' 00022444 ; -------------------------------------------------------------------------------------- 00022444 ; OMSI PASCAL Function 00022444 ; <LVAR 0x020 1(r)> 00022444 ; <LVAR 0x01c 4(r)> 00022444 ; <LVAR 0x018 4(r)> 00022444 ; <LVAR 0x014 4(r)> 00022444 ; <LVAR 0x010 4(r)> 00022444 ; <LVAR 0x00c 4(r)> 00022444 ; <LVAR 0x008 4(r)> 00022444 ; <LVAR -0x006 @ 4(r)> 00022444 ; -------------------------------------------------------------------------------------- 00022444 4e 56 ff be |NV | LINK.W A6,#0xffbe 00022448 bf d5 | | CMPA.L (A5),A7 0002244a 62 06 |b | BHI 0x22452 0002244c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022450 4e 76 |Nv | TRAPV 00022452 de fc 00 3c | < | ADDA.W #0x3c,A7 00022456 48 e7 c0 f0 |H | MOVEM.L A3+A2+A1+A0+D1+D0,-(A7) 0002245a 43 ee ff fa |C | LEA.L (A6-0x6),A1 0002245e 45 f8 00 00 |E | LEA.L 0x0,A2 00022462 47 f9 00 01 04 72 |G r | LEA.L ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L),A3 00022468 72 0c |r | MOVEQ.L #0x0c,D1 0002246a 55 4f |UO | SUBQ.L #0x2,A7 0002246c 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00022472 4a 1f |J | TST.B (A7)+ 00022474 67 0e |g | BEQ 0x22484 00022476 41 fa ff b8 |A | LEA.L 0x22430,A0 0002247a 70 04 |p | MOVEQ.L #0x04,D0 0002247c 2f 20 |/ | MOVE.L -(A0),-(A7) 0002247e 51 c8 ff fc |Q | DBF D0,0x2247c 00022482 60 0c |` | BRA 0x22490 00022484 41 fa ff be |A | LEA.L 0x22444,A0 00022488 70 04 |p | MOVEQ.L #0x04,D0 0002248a 2f 20 |/ | MOVE.L -(A0),-(A7) 0002248c 51 c8 ff fc |Q | DBF D0,0x2248a 00022490 59 4f |YO | SUBQ.L #0x4,A7 00022492 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022496 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002249a 3f 3c 00 14 |?< | MOVE.W #0x14,-(A7) 0002249e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000224a4 50 4f |PO | ADDQ.L #0x8,A7 000224a6 48 51 |HQ | PEA.L (A1) 000224a8 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000224ae de fc 00 1c | | ADDA.W #0x1c,A7 000224b2 42 27 |B' | CLR.B -(A7) 000224b4 1f 2e 00 20 | . | MOVE.B (A6+0x20),-(A7) 000224b8 2f 11 |/ | MOVE.L (A1),-(A7) 000224ba 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000224c0 58 4f |XO | ADDQ.L #0x4,A7 000224c2 2e 91 |. | MOVE.L (A1),(A7) 000224c4 20 6e 00 1c | n | MOVEA.L (A6+0x1c),A0 000224c8 48 50 |HP | PEA.L (A0) 000224ca 48 52 |HR | PEA.L (A2) 000224cc 48 52 |HR | PEA.L (A2) 000224ce 4e 93 |N | JSR (A3) 000224d0 de c1 | | ADDA.W D1,A7 000224d2 2e 91 |. | MOVE.L (A1),(A7) 000224d4 20 6e 00 18 | n | MOVEA.L (A6+0x18),A0 000224d8 48 50 |HP | PEA.L (A0) 000224da 48 52 |HR | PEA.L (A2) 000224dc 48 78 00 01 |Hx | PEA.L 0x1 000224e0 4e 93 |N | JSR (A3) 000224e2 de c1 | | ADDA.W D1,A7 000224e4 2e 91 |. | MOVE.L (A1),(A7) 000224e6 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 000224ea 48 50 |HP | PEA.L (A0) 000224ec 48 52 |HR | PEA.L (A2) 000224ee 48 52 |HR | PEA.L (A2) 000224f0 4e 93 |N | JSR (A3) 000224f2 de c1 | | ADDA.W D1,A7 000224f4 2e 91 |. | MOVE.L (A1),(A7) 000224f6 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 000224fa 48 50 |HP | PEA.L (A0) 000224fc 48 52 |HR | PEA.L (A2) 000224fe 48 52 |HR | PEA.L (A2) 00022500 4e 93 |N | JSR (A3) 00022502 de c1 | | ADDA.W D1,A7 00022504 2e 91 |. | MOVE.L (A1),(A7) 00022506 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 0002250a 48 50 |HP | PEA.L (A0) 0002250c 48 52 |HR | PEA.L (A2) 0002250e 48 78 00 01 |Hx | PEA.L 0x1 00022512 4e 93 |N | JSR (A3) 00022514 de c1 | | ADDA.W D1,A7 00022516 2e 91 |. | MOVE.L (A1),(A7) 00022518 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002251c 48 50 |HP | PEA.L (A0) 0002251e 4e b9 00 01 04 78 |N x | JSR ExpOutputFlag(exp : Pointer; VAR status : Bool) 00022524 50 4f |PO | ADDQ.L #0x8,A7 00022526 48 51 |HQ | PEA.L (A1) 00022528 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 0002252e 58 4f |XO | ADDQ.L #0x4,A7 00022530 4c df 0f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3 00022534 4e 5e |N^ | UNLK A6 00022536 4e 75 |Nu | RTS 00022538 52 45 41 44 5f 4e 4f 56 |READ_NOV| .TXT 'READ_NOVRAM_INFO.MEM' 0002254c 52 45 41 44 5f 4e 4f 56 |READ_NOV| .TXT 'READ_NOVRAM_INFO.M32' 00022560 ; -------------------------------------------------------------------------------------- 00022560 ; OMSI PASCAL Function 00022560 ; <LVAR 0x048 1(r)> 00022560 ; <LVAR 0x044 4(r)> 00022560 ; <LVAR 0x040 4(r)> 00022560 ; <LVAR 0x03c 4(r)> 00022560 ; <LVAR 0x038 4(r)> 00022560 ; <LVAR 0x034 4(r)> 00022560 ; <LVAR 0x030 4(r)> 00022560 ; <LVAR 0x02c 4(r)> 00022560 ; <LVAR 0x028 4(r)> 00022560 ; <LVAR 0x024 4(r)> 00022560 ; <LVAR 0x020 4(r)> 00022560 ; <LVAR 0x01c 4(r)> 00022560 ; <LVAR 0x018 4(r)> 00022560 ; <LVAR 0x014 4(r)> 00022560 ; <LVAR 0x010 4(r)> 00022560 ; <LVAR 0x00c 4(r)> 00022560 ; <LVAR 0x008 4(r)> 00022560 ; <LVAR -0x006 @ 4(r)> 00022560 ; -------------------------------------------------------------------------------------- 00022560 4e 56 ff ba |NV | LINK.W A6,#0xffba 00022564 bf d5 | | CMPA.L (A5),A7 00022566 62 06 |b | BHI 0x2256e 00022568 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002256c 4e 76 |Nv | TRAPV 0002256e de fc 00 40 | @ | ADDA.W #0x40,A7 00022572 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 00022576 43 f8 00 00 |C | LEA.L 0x0,A1 0002257a 45 ee ff fa |E | LEA.L (A6-0x6),A2 0002257e 47 f9 00 01 04 72 |G r | LEA.L ExpOutputParam(exp : Pointer; b : Pointer; c : L; d : L),A3 00022584 49 f8 00 01 |I | LEA.L 0x1,A4 00022588 72 0c |r | MOVEQ.L #0x0c,D1 0002258a 55 4f |UO | SUBQ.L #0x2,A7 0002258c 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00022592 4a 1f |J | TST.B (A7)+ 00022594 67 0e |g | BEQ 0x225a4 00022596 41 fa ff b4 |A | LEA.L 0x2254c,A0 0002259a 70 04 |p | MOVEQ.L #0x04,D0 0002259c 2f 20 |/ | MOVE.L -(A0),-(A7) 0002259e 51 c8 ff fc |Q | DBF D0,0x2259c 000225a2 60 0c |` | BRA 0x225b0 000225a4 41 fa ff ba |A | LEA.L 0x22560,A0 000225a8 70 04 |p | MOVEQ.L #0x04,D0 000225aa 2f 20 |/ | MOVE.L -(A0),-(A7) 000225ac 51 c8 ff fc |Q | DBF D0,0x225aa 000225b0 59 4f |YO | SUBQ.L #0x4,A7 000225b2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000225b6 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000225ba 3f 3c 00 14 |?< | MOVE.W #0x14,-(A7) 000225be 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000225c4 50 4f |PO | ADDQ.L #0x8,A7 000225c6 48 52 |HR | PEA.L (A2) 000225c8 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000225ce de fc 00 1c | | ADDA.W #0x1c,A7 000225d2 42 27 |B' | CLR.B -(A7) 000225d4 1f 2e 00 48 | . H | MOVE.B (A6+0x48),-(A7) 000225d8 2f 12 |/ | MOVE.L (A2),-(A7) 000225da 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000225e0 58 4f |XO | ADDQ.L #0x4,A7 000225e2 2e 92 |. | MOVE.L (A2),(A7) 000225e4 20 6e 00 44 | n D | MOVEA.L (A6+0x44),A0 000225e8 48 50 |HP | PEA.L (A0) 000225ea 48 51 |HQ | PEA.L (A1) 000225ec 48 51 |HQ | PEA.L (A1) 000225ee 4e 93 |N | JSR (A3) 000225f0 de c1 | | ADDA.W D1,A7 000225f2 2e 92 |. | MOVE.L (A2),(A7) 000225f4 20 6e 00 40 | n @ | MOVEA.L (A6+0x40),A0 000225f8 48 50 |HP | PEA.L (A0) 000225fa 48 51 |HQ | PEA.L (A1) 000225fc 48 54 |HT | PEA.L (A4) 000225fe 4e 93 |N | JSR (A3) 00022600 de c1 | | ADDA.W D1,A7 00022602 2e 92 |. | MOVE.L (A2),(A7) 00022604 20 6e 00 3c | n < | MOVEA.L (A6+0x3c),A0 00022608 48 50 |HP | PEA.L (A0) 0002260a 48 51 |HQ | PEA.L (A1) 0002260c 48 51 |HQ | PEA.L (A1) 0002260e 4e 93 |N | JSR (A3) 00022610 de c1 | | ADDA.W D1,A7 00022612 2e 92 |. | MOVE.L (A2),(A7) 00022614 20 6e 00 38 | n 8 | MOVEA.L (A6+0x38),A0 00022618 48 50 |HP | PEA.L (A0) 0002261a 48 51 |HQ | PEA.L (A1) 0002261c 48 51 |HQ | PEA.L (A1) 0002261e 4e 93 |N | JSR (A3) 00022620 de c1 | | ADDA.W D1,A7 00022622 2e 92 |. | MOVE.L (A2),(A7) 00022624 20 6e 00 34 | n 4 | MOVEA.L (A6+0x34),A0 00022628 48 50 |HP | PEA.L (A0) 0002262a 48 51 |HQ | PEA.L (A1) 0002262c 48 51 |HQ | PEA.L (A1) 0002262e 4e 93 |N | JSR (A3) 00022630 de c1 | | ADDA.W D1,A7 00022632 2e 92 |. | MOVE.L (A2),(A7) 00022634 20 6e 00 30 | n 0 | MOVEA.L (A6+0x30),A0 00022638 48 50 |HP | PEA.L (A0) 0002263a 48 51 |HQ | PEA.L (A1) 0002263c 48 78 00 03 |Hx | PEA.L 0x3 00022640 4e 93 |N | JSR (A3) 00022642 de c1 | | ADDA.W D1,A7 00022644 2e 92 |. | MOVE.L (A2),(A7) 00022646 20 6e 00 2c | n , | MOVEA.L (A6+0x2c),A0 0002264a 48 50 |HP | PEA.L (A0) 0002264c 48 51 |HQ | PEA.L (A1) 0002264e 48 54 |HT | PEA.L (A4) 00022650 4e 93 |N | JSR (A3) 00022652 de c1 | | ADDA.W D1,A7 00022654 2e 92 |. | MOVE.L (A2),(A7) 00022656 20 6e 00 28 | n ( | MOVEA.L (A6+0x28),A0 0002265a 48 50 |HP | PEA.L (A0) 0002265c 48 51 |HQ | PEA.L (A1) 0002265e 48 51 |HQ | PEA.L (A1) 00022660 4e 93 |N | JSR (A3) 00022662 de c1 | | ADDA.W D1,A7 00022664 2e 92 |. | MOVE.L (A2),(A7) 00022666 20 6e 00 24 | n $ | MOVEA.L (A6+0x24),A0 0002266a 48 50 |HP | PEA.L (A0) 0002266c 48 51 |HQ | PEA.L (A1) 0002266e 48 51 |HQ | PEA.L (A1) 00022670 4e 93 |N | JSR (A3) 00022672 de c1 | | ADDA.W D1,A7 00022674 2e 92 |. | MOVE.L (A2),(A7) 00022676 20 6e 00 20 | n | MOVEA.L (A6+0x20),A0 0002267a 48 50 |HP | PEA.L (A0) 0002267c 48 51 |HQ | PEA.L (A1) 0002267e 48 51 |HQ | PEA.L (A1) 00022680 4e 93 |N | JSR (A3) 00022682 de c1 | | ADDA.W D1,A7 00022684 2e 92 |. | MOVE.L (A2),(A7) 00022686 20 6e 00 1c | n | MOVEA.L (A6+0x1c),A0 0002268a 48 50 |HP | PEA.L (A0) 0002268c 48 51 |HQ | PEA.L (A1) 0002268e 48 51 |HQ | PEA.L (A1) 00022690 4e 93 |N | JSR (A3) 00022692 de c1 | | ADDA.W D1,A7 00022694 2e 92 |. | MOVE.L (A2),(A7) 00022696 20 6e 00 18 | n | MOVEA.L (A6+0x18),A0 0002269a 48 50 |HP | PEA.L (A0) 0002269c 48 51 |HQ | PEA.L (A1) 0002269e 48 51 |HQ | PEA.L (A1) 000226a0 4e 93 |N | JSR (A3) 000226a2 de c1 | | ADDA.W D1,A7 000226a4 2e 92 |. | MOVE.L (A2),(A7) 000226a6 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 000226aa 48 50 |HP | PEA.L (A0) 000226ac 48 51 |HQ | PEA.L (A1) 000226ae 48 51 |HQ | PEA.L (A1) 000226b0 4e 93 |N | JSR (A3) 000226b2 de c1 | | ADDA.W D1,A7 000226b4 2e 92 |. | MOVE.L (A2),(A7) 000226b6 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 000226ba 48 50 |HP | PEA.L (A0) 000226bc 48 51 |HQ | PEA.L (A1) 000226be 48 51 |HQ | PEA.L (A1) 000226c0 4e 93 |N | JSR (A3) 000226c2 de c1 | | ADDA.W D1,A7 000226c4 2e 92 |. | MOVE.L (A2),(A7) 000226c6 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000226ca 48 50 |HP | PEA.L (A0) 000226cc 48 51 |HQ | PEA.L (A1) 000226ce 48 54 |HT | PEA.L (A4) 000226d0 4e 93 |N | JSR (A3) 000226d2 de c1 | | ADDA.W D1,A7 000226d4 2e 92 |. | MOVE.L (A2),(A7) 000226d6 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000226da 48 50 |HP | PEA.L (A0) 000226dc 4e b9 00 01 04 78 |N x | JSR ExpOutputFlag(exp : Pointer; VAR status : Bool) 000226e2 50 4f |PO | ADDQ.L #0x8,A7 000226e4 48 52 |HR | PEA.L (A2) 000226e6 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000226ec 58 4f |XO | ADDQ.L #0x4,A7 000226ee 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 000226f2 4e 5e |N^ | UNLK A6 000226f4 4e 75 |Nu | RTS 000226f6 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 00022704 ; -------------------------------------------------------------------------------------- 00022704 ; OMSI PASCAL Function 00022704 ; <LVAR 0x008 1(r)> 00022704 ; -------------------------------------------------------------------------------------- 00022704 PROG_FAIL: 00022704 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00022708 bf d5 | | CMPA.L (A5),A7 0002270a 62 06 |b | BHI 0x22712 0002270c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022710 4e 76 |Nv | TRAPV 00022712 de fc 00 2c | , | ADDA.W #0x2c,A7 00022716 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 0002271a 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 0002271e 70 06 |p | MOVEQ.L #0x06,D0 00022720 3f 20 |? | MOVE.W -(A0),-(A7) 00022722 51 c8 ff fc |Q | DBF D0,0x22720 00022726 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 0002272a 51 4f |QO | SUBQ.L #0x8,A7 0002272c 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00022730 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022734 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00022738 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002273e 58 4f |XO | ADDQ.L #0x4,A7 00022740 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00022744 48 80 |H | EXTB.W D0 00022746 48 c0 |H | EXTW.L D0 00022748 2f 00 |/ | MOVE.L D0,-(A7) 0002274a 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00022750 58 4f |XO | ADDQ.L #0x4,A7 00022752 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022758 50 4f |PO | ADDQ.L #0x8,A7 0002275a 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00022760 de fc 00 14 | | ADDA.W #0x14,A7 00022764 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00022768 4e 5e |N^ | UNLK A6 0002276a 4e 75 |Nu | RTS 0002276c 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 0002277a 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00022788 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00022796 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 000227a8 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 000227c0 ; -------------------------------------------------------------------------------------- 000227c0 ; OMSI PASCAL Function 000227c0 ; <LVAR 0x00e 1(r)> 000227c0 ; <LVAR 0x00a 4(r)> 000227c0 ; <LVAR 0x008 1(r)> 000227c0 ; -------------------------------------------------------------------------------------- 000227c0 EXP_FAIL: 000227c0 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 000227c4 bf d5 | | CMPA.L (A5),A7 000227c6 62 06 |b | BHI 0x227ce 000227c8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000227cc 4e 76 |Nv | TRAPV 000227ce de fc 00 74 | t | ADDA.W #0x74,A7 000227d2 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 000227d6 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 000227dc 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 000227e2 72 01 |r | MOVEQ.L #0x01,D1 000227e4 74 0d |t | MOVEQ.L #0x0d,D2 000227e6 76 1e |v | MOVEQ.L #0x1e,D3 000227e8 78 12 |x | MOVEQ.L #0x12,D4 000227ea 7a 0e |z | MOVEQ.L #0x0e,D5 000227ec 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000227f2 41 fa ff b4 |A | LEA.L 0x227a8,A0 000227f6 70 08 |p | MOVEQ.L #0x08,D0 000227f8 3f 20 |? | MOVE.W -(A0),-(A7) 000227fa 51 c8 ff fc |Q | DBF D0,0x227f8 000227fe 59 4f |YO | SUBQ.L #0x4,A7 00022800 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022804 3f 01 |? | MOVE.W D1,-(A7) 00022806 3f 04 |? | MOVE.W D4,-(A7) 00022808 4e 93 |N | JSR (A3) 0002280a 50 4f |PO | ADDQ.L #0x8,A7 0002280c 4e 94 |N | JSR (A4) 0002280e 50 4f |PO | ADDQ.L #0x8,A7 00022810 20 4f | O | MOVEA.L A7,A0 00022812 43 fa ff 58 |C X | LEA.L 0x2276c,A1 00022816 70 0c |p | MOVEQ.L #0x0c,D0 00022818 10 d9 | | MOVE.B (A1)+,(A0)+ 0002281a 51 c8 ff fc |Q | DBF D0,0x22818 0002281e 51 4f |QO | SUBQ.L #0x8,A7 00022820 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022824 3f 01 |? | MOVE.W D1,-(A7) 00022826 3f 02 |? | MOVE.W D2,-(A7) 00022828 4e 93 |N | JSR (A3) 0002282a 54 4f |TO | ADDQ.L #0x2,A7 0002282c 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00022830 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00022836 54 4f |TO | ADDQ.L #0x2,A7 00022838 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002283e 50 4f |PO | ADDQ.L #0x8,A7 00022840 4e 94 |N | JSR (A4) 00022842 de c4 | | ADDA.W D4,A7 00022844 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00022848 b0 c1 | | CMPA.W D1,A0 0002284a 67 48 |gH | BEQ 0x22894 0002284c 9e c5 | | SUBA.W D5,A7 0002284e 22 4f |"O | MOVEA.L A7,A1 00022850 45 fa ff 28 |E ( | LEA.L 0x2277a,A2 00022854 70 0c |p | MOVEQ.L #0x0c,D0 00022856 12 da | | MOVE.B (A2)+,(A1)+ 00022858 51 c8 ff fc |Q | DBF D0,0x22856 0002285c 9e c3 | | SUBA.W D3,A7 0002285e 22 4f |"O | MOVEA.L A7,A1 00022860 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00022864 70 1d |p | MOVEQ.L #0x1d,D0 00022866 12 d8 | | MOVE.B (A0)+,(A1)+ 00022868 51 c8 ff fc |Q | DBF D0,0x22866 0002286c 51 4f |QO | SUBQ.L #0x8,A7 0002286e 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00022872 3f 01 |? | MOVE.W D1,-(A7) 00022874 3f 02 |? | MOVE.W D2,-(A7) 00022876 4e 93 |N | JSR (A3) 00022878 58 4f |XO | ADDQ.L #0x4,A7 0002287a 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002287e 3f 01 |? | MOVE.W D1,-(A7) 00022880 3f 03 |? | MOVE.W D3,-(A7) 00022882 4e 93 |N | JSR (A3) 00022884 50 4f |PO | ADDQ.L #0x8,A7 00022886 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002288c 50 4f |PO | ADDQ.L #0x8,A7 0002288e 4e 94 |N | JSR (A4) 00022890 de fc 00 30 | 0 | ADDA.W #0x30,A7 00022894 9e c5 | | SUBA.W D5,A7 00022896 20 4f | O | MOVEA.L A7,A0 00022898 43 fa fe ee |C | LEA.L 0x22788,A1 0002289c 70 0c |p | MOVEQ.L #0x0c,D0 0002289e 10 d9 | | MOVE.B (A1)+,(A0)+ 000228a0 51 c8 ff fc |Q | DBF D0,0x2289e 000228a4 51 4f |QO | SUBQ.L #0x8,A7 000228a6 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000228aa 3f 01 |? | MOVE.W D1,-(A7) 000228ac 3f 02 |? | MOVE.W D2,-(A7) 000228ae 4e 93 |N | JSR (A3) 000228b0 54 4f |TO | ADDQ.L #0x2,A7 000228b2 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 000228b6 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 000228bc 54 4f |TO | ADDQ.L #0x2,A7 000228be 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000228c4 50 4f |PO | ADDQ.L #0x8,A7 000228c6 4e 94 |N | JSR (A4) 000228c8 5d 4f |]O | SUBQ.L #0x6,A7 000228ca 20 4f | O | MOVEA.L A7,A0 000228cc 43 fa fe da |C | LEA.L 0x227a8,A1 000228d0 70 16 |p | MOVEQ.L #0x16,D0 000228d2 10 d9 | | MOVE.B (A1)+,(A0)+ 000228d4 51 c8 ff fc |Q | DBF D0,0x228d2 000228d8 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000228dc 59 4f |YO | SUBQ.L #0x4,A7 000228de 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000228e2 3f 01 |? | MOVE.W D1,-(A7) 000228e4 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 000228e8 4e 93 |N | JSR (A3) 000228ea 50 4f |PO | ADDQ.L #0x8,A7 000228ec 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000228f2 de c3 | | ADDA.W D3,A7 000228f4 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 000228f8 4e 5e |N^ | UNLK A6 000228fa 4e 75 |Nu | RTS