|
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: 20992 (0x5200) Types: M200 Notes: @(#)UPDATE_EEPROM,5.3,92/05/04,12:34:56, M200_PROGRAM Names: »UPDATE_EEPROM.M200«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293 └─ ⟦this⟧ »UPDATE_EEPROM.M200«
@ 2101a <LVAR 0x00c 4(w)> <LVAR 0x008 4(r)> <POP 2101a-21194 Body> Δ+78 <POP 2101a-21030 Prologue> Σ0 ↓ <POP 21030-21046 RegCacheLoad> Σ0 ↓ <POP 21046-21054 Naked> Σ0 ↓ →0x2115c <MI 21046 MOVE.L (A6+0x8),D0> {} <MI 2104a CMPI.L #0x00000007,D0> {} <MI 21050 BHI 0x2115c> {} <POP 21054-2105e Naked> Σ0 →0x2106e →0x2108e →0x210aa →0x210d2 →0x210f4 →0x2111a →0x2112a →0x2113c <MI 21054 ADD.W D0,D0> {} <MI 21056 SWITCH D0.W> {} <POP 2106e-2108e Naked> Σ0 →0x2118c ←0x21054 <Blob 0x2106e [4] @> Δ-4 {[«4""»]} <Blob 0x21072 [4] @> Δ-4 {[«4""»]|[«4""»]} <POP 21076-21078 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]} <Lit 0x21078 8> {[«4""»]|[«4""»]|[$$no error]} <MI 21086 MOVE.L (A7)+,(A6+0xc)> Δ+4 {[«4""»]|[«4""»]} <POP 21088-2108a StackAdj> Δ+8 {} <MI 2108a BRA 0x2118c> {} <POP 2108e-2109a Naked> Σ0 Δ-24 ↓ ←0x21054 <Blob 0x2108e [24] @> Δ-24 {[«24""»]} <POP 2109a-210a6 Naked> Σ-24 Δ-12 →0x21186 ←0x2111a <POP 2109a-2109c StackAdj> Δ-4 {[-28-]} <Lit 0x2109c> {[-24-]|[$$…]} <Pointer.sp 0x2109c 4> Δ-4 <Const 0x210a0 0x1.2> Δ-2 <Const 0x210a2 0x18.2> Δ-2 <Call 0x210a4 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <MI 210a6 BRA 0x21186> {[-24-]|[$$…]} <POP 210a4-210a6 StackAdj> Δ-8 {[-24-]|[$$…]|[-8-]} <POP 210aa-210d2 Naked> Σ0 →0x2118c ←0x21054 <Blob 0x210aa [22] @> Δ-22 {[«22""»]} <POP 210ba-210bc StackAdj> Δ-4 {[«22""»]|[-4-]} <Lit 0x210bc 21> {[«22""»]|[$$bad checksum detected]} <MI 210ca MOVE.L (A7)+,(A6+0xc)> Δ+4 {[«22""»]} <POP 210cc-210ce StackAdj> Δ+22 {} <MI 210ce BRA 0x2118c> {} <POP 210d2-210f4 Naked> Σ0 →0x2118c ←0x21054 <Blob 0x210d2 [26] @> Δ-26 {[«26""»]} <POP 210de-210e0 StackAdj> Δ-4 {[«26""»]|[-4-]} <Lit 0x210e0 26> {[«26""»]|[$$write protect switch is on]} <MI 210ec MOVE.L (A7)+,(A6+0xc)> Δ+4 {[«26""»]} <POP 210ee-210f0 StackAdj> Δ+26 {} <MI 210f0 BRA 0x2118c> {} <POP 210f4-21104 Naked> Σ0 Δ-18 ↓ ←0x21054 <Blob 0x210f4 [18] @> Δ-18 {[«18""»]} <POP 21104-2111a Naked> Σ-18 Δ+18 →0x2118c ←0x2112a <POP 21104-21106 StackAdj> Δ-4 {[-22-]} <Lit 0x21106> {[-18-]|[$$…]} <Pointer.sp 0x21106 4> Δ-4 <Const 0x2110a 0x1.2> Δ-2 <Const 0x2110c 0x11.2> Δ-2 <Call 0x21110 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 21112-21114 StackAdj> Δ+8 <MI 21114 MOVE.L (A7)+,(A6+0xc)> Δ+4 {[-18-]} <POP 21116-21118 StackAdj> Δ+18 {} <MI 21118 BRA 0x2118c> {} <POP 2111a-2112a Naked> Σ0 Δ-24 →0x2109a ←0x21054 <Blob 0x2111a [24] @> Δ-24 {[«24""»]} <MI 21126 BRA 0x2109a> {[«24""»]} <POP 2112a-2113c Naked> Σ0 Δ-18 →0x21104 ←0x21054 <Blob 0x2112a [18] @> Δ-18 {[«18""»]} <MI 2113a BRA 0x21104> {[«18""»]} <POP 2113c-2115c Naked> Σ0 →0x2118c ←0x21054 <Blob 0x2113c [20] @> Δ-20 {[«20""»]} <POP 21148-2114a StackAdj> Δ-4 {[«20""»]|[-4-]} <Lit 0x2114a 20> {[«20""»]|[$$prom write timed out]} <MI 21156 MOVE.L (A7)+,(A6+0xc)> Δ+4 {[«20""»]} <POP 21158-2115a StackAdj> Δ+20 {} <MI 2115a BRA 0x2118c> {} <POP 2115c-21186 Naked> Σ0 Δ-36 ↓ ←0x21046 <Blob 0x2115c [24] @> Δ-24 {[«24""»]} <POP 21168-2116a StackAdj> Δ-8 {[«24""»]|[-8-]} <Lit 0x2116a 24> {[«24""»]|[-4-]|[$$** unknown ERROR_CODE =_]} <MI 21174 MOVE.L (A6+0x8),(A7)> {[«24""»]|[-4-]|[4, '(A6+0x8)']} <POP 21172-21174 StackAdj> Δ-8 {[«24""»]|[-4-]|[4, '(A6+0x8)']|[-8-]} <Call 0x21178 0x102e4> {[«24""»]|[-4-]|[4, '(A6+0x8)']|[-8-]} Long2String(a : Long) : String <POP 2117e-21180 StackAdj> Δ+4 {[«24""»]|[-4-]|[4, '(A6+0x8)']|[-4-]} <Call 0x21180 0x102d0> {[«24""»]|[-4-]|[4, '(A6+0x8)']|[-4-]} StringCat2(a, b : String) : String <POP 21186-2118c Naked> Σ-36 Δ+36 ↓ ←0x2109a <POP 21186-21188 StackAdj> Δ+8 {[-28-]} <MI 21188 MOVE.L (A7)+,(A6+0xc)> Δ+4 {[-24-]} <POP 2118a-2118c StackAdj> Δ+24 {} <POP 2118c-21194 Epilogue> Σ0 ←0x2106e ←0x210aa ←0x210d2 ←0x21104 ←0x2113c
@ 21194 <LVAR 0x008 4(r)> <POP 21194-2125a Body> <POP 21194-211aa Prologue> Σ0 ↓ <POP 211aa-211b2 RegCacheLoad> Σ0 ↓ <POP 211b2-211f2 Naked> Σ0 ↓ →0x21222 <Blob 0x211b2 [12] @> Δ-12 {[«12""»]} <POP 211c4-211c6 StackAdj> Δ-8 {[«12""»]|[-8-]} <Lit 0x211c6 11> {[«12""»]|[-4-]|[$$*** ABORT:_]} <POP 211d2-211d4 StackAdj> Δ-4 {[«12""»]|[-4-]|[$$*** ABORT:_]|[-4-]} <MI 211d4 MOVE.L (A6+0x8),(A7)> {[«12""»]|[-4-]|[$$*** ABORT:_]|[4, '(A6+0x8)']} <Call 0x211d8 0x102d0> {[«12""»]|[-4-]|[$$*** ABORT:_]|[4, '(A6+0x8)']} StringCat2(a, b : String) : String <POP 211de-211e0 StackAdj> Δ+8 {[«12""»]|[-4-]} <Call 0x211e0 0x103e0> {[«12""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 211e6-211ea StackAdj> Δ+16 {} <MI 211ea TST.B 0x290b2> {} <MI 211f0 BEQ 0x21222> {} <POP 211f2-2121e Naked> Σ0 ↓ <Blob 0x211f2 [46] @> Δ-46 {[«46""»]} <POP 21204-21206 StackAdj> Δ-4 {[«46""»]|[-4-]} <Lit 0x21206 45> {[«46""»]|[$$INSTALL failed: you have to reboot the system]} <Call 0x21214 0x103e0> {[«46""»]|[$$INSTALL failed: you have to reboot the system]} WriteConsoleStringCrLf(str : String) <POP 2121a-2121e StackAdj> Δ+50 {} <POP 2121e-21220 Naked> Σ0 →0x2121e ←0x2121e <MI 2121e BRA 0x2121e> {} <POP 21222-21252 Naked> Σ0 ↓ ←0x211b2 <Blob 0x21222 [24] @> Δ-24 {[«24""»]} <Const 0x21234 0xe.2> Δ-2 {[«24""»]|[#14]} <POP 21238-2123a StackAdj> Δ-4 {[«24""»]|[#14]|[-4-]} <Lit 0x2123a 23> {[«24""»]|[#14]|[$$see error message above]} <Call 0x21248 0x103b8> {[«24""»]|[#14]|[$$see error message above]} PopProgram(status : Byte; msg : String) <POP 2124e-21252 StackAdj> Δ+30 {} <POP 21252-2125a Epilogue> Σ0
@ 2125a <LVAR 0x00a 4(rw)> <LVAR 0x008 1(r)> <POP 2125a-21388 Body> <POP 2125a-21270 Prologue> Σ0 ↓ <POP 21270-21274 RegCacheLoad> Σ0 ↓ <POP 21274-21286 Naked> Σ0 ↓ →0x2137a <MI 21274 CLR.L D0> {} <MI 21276 MOVE.B (A6+0x8),D0> {} <MI 2127a SUBI.W #0x0030,D0> {} <MI 2127e CMPI.W #0x0036,D0> {} <MI 21282 BHI 0x2137a> {} <POP 21286-21290 Naked> Σ0 →0x212fe →0x21302 →0x2130a →0x21312 →0x2131a →0x21322 →0x2132a →0x21332 →0x2133a →0x21342 →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2134a →0x21352 →0x2135a →0x21362 →0x2136a →0x21372 →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2137a →0x2134a →0x21352 →0x2135a →0x21362 →0x2136a →0x21372 <MI 21286 ADD.W D0,D0> {} <MI 21288 SWITCH D0.W> {} <POP 212fe-21302 Naked> Σ0 →0x21380 ←0x21286 <MI 212fe CLR.L (A6+0xa)> {} <MI 21300 BRA 0x21380> {} <POP 21302-2130a Naked> Σ0 →0x21380 ←0x21286 <MI 21302 MOVE.L #0x1,(A6+0xa)> {} <MI 21308 BRA 0x21380> {} <POP 2130a-21312 Naked> Σ0 →0x21380 ←0x21286 <MI 2130a MOVE.L #0x2,(A6+0xa)> {} <MI 21310 BRA 0x21380> {} <POP 21312-2131a Naked> Σ0 →0x21380 ←0x21286 <MI 21312 MOVE.L #0x3,(A6+0xa)> {} <MI 21318 BRA 0x21380> {} <POP 2131a-21322 Naked> Σ0 →0x21380 ←0x21286 <MI 2131a MOVE.L #0x4,(A6+0xa)> {} <MI 21320 BRA 0x21380> {} <POP 21322-2132a Naked> Σ0 →0x21380 ←0x21286 <MI 21322 MOVE.L #0x5,(A6+0xa)> {} <MI 21328 BRA 0x21380> {} <POP 2132a-21332 Naked> Σ0 →0x21380 ←0x21286 <MI 2132a MOVE.L #0x6,(A6+0xa)> {} <MI 21330 BRA 0x21380> {} <POP 21332-2133a Naked> Σ0 →0x21380 ←0x21286 <MI 21332 MOVE.L #0x7,(A6+0xa)> {} <MI 21338 BRA 0x21380> {} <POP 2133a-21342 Naked> Σ0 →0x21380 ←0x21286 <MI 2133a MOVE.L #0x8,(A6+0xa)> {} <MI 21340 BRA 0x21380> {} <POP 21342-2134a Naked> Σ0 →0x21380 ←0x21286 <MI 21342 MOVE.L #0x9,(A6+0xa)> {} <MI 21348 BRA 0x21380> {} <POP 2134a-21352 Naked> Σ0 →0x21380 ←0x21286 ←0x21286 <MI 2134a MOVE.L #0xa,(A6+0xa)> {} <MI 21350 BRA 0x21380> {} <POP 21352-2135a Naked> Σ0 →0x21380 ←0x21286 ←0x21286 <MI 21352 MOVE.L #0xb,(A6+0xa)> {} <MI 21358 BRA 0x21380> {} <POP 2135a-21362 Naked> Σ0 →0x21380 ←0x21286 ←0x21286 <MI 2135a MOVE.L #0xc,(A6+0xa)> {} <MI 21360 BRA 0x21380> {} <POP 21362-2136a Naked> Σ0 →0x21380 ←0x21286 ←0x21286 <MI 21362 MOVE.L #0xd,(A6+0xa)> {} <MI 21368 BRA 0x21380> {} <POP 2136a-21372 Naked> Σ0 →0x21380 ←0x21286 ←0x21286 <MI 2136a MOVE.L #0xe,(A6+0xa)> {} <MI 21370 BRA 0x21380> {} <POP 21372-2137a Naked> Σ0 →0x21380 ←0x21286 ←0x21286 <MI 21372 MOVE.L #0xf,(A6+0xa)> {} <MI 21378 BRA 0x21380> {} <POP 2137a-21380 Naked> Σ0 ↓ ←0x21274 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 ←0x21286 <MI 2137a MOVE.L #0xffffffff,(A6+0xa)> {} <POP 21380-21388 Epilogue> Σ0 ←0x212fe ←0x21302 ←0x2130a ←0x21312 ←0x2131a ←0x21322 ←0x2132a ←0x21332 ←0x2133a ←0x21342 ←0x2134a ←0x21352 ←0x2135a ←0x21362 ←0x2136a ←0x21372
@ 21388 <LVAR 0x010 2(r)> <LVAR 0x00c 4(r)> <LVAR 0x008 4(r)> <POP 21388-21558 Body> Δ+48 <POP 21388-2139e Prologue> Σ0 ↓ <POP 2139e-213a8 RegCacheLoad> Σ0 ↓ <POP 213a8-213b8 Naked> Σ0 ↓ →0x21520 <MI 213a8 MOVE.W (A6+0x10),D0> {} <MI 213ac SUBI.W #0x0015,D0> {} <MI 213b0 CMPI.W #0x003e,D0> {} <MI 213b4 BHI 0x21520> {} <POP 213b8-213c2 Naked> Σ0 →0x214a0 →0x21520 →0x2148c →0x21520 →0x2146e →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21440 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x21520 →0x214b4 →0x214c8 →0x214fc →0x2150e <MI 213b8 ADD.W D0,D0> {} <MI 213ba SWITCH D0.W> {} <POP 21440-21452 Naked> Σ0 Δ-8 ↓ ←0x213b8 <MI 21440 MOVEA.L (A6+0xc),A0> {} <MI 21442 MOVE.L #0x80000000,(A0)> {} <MI 21448 MOVEA.L (A6+0x8),A0> {} <Blob 0x2144a [4] @> Δ-4 {[«4""»]} <Blob 0x2144e [4] @> Δ-4 {[«4""»]|[«4""»]} <POP 21452-2146e Naked> Σ-8 Δ+8 →0x21550 ←0x2148c ←0x214a0 ←0x214b4 <POP 21452-21454 StackAdj> Δ-4 {[-12-]} <Lit 0x21454> {[-8-]|[$$…]} <Pointer.sp 0x21454 4> Δ-4 <Const 0x21458 0x1.2> Δ-2 <Const 0x2145a 0x8.2> Δ-2 <Call 0x2145e 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 21464-21466 StackAdj> Δ+8 <MI 21466 MOVE.L (A7)+,(A0)> Δ+4 {[-8-]} <POP 21468-2146a StackAdj> Δ+8 {} <MI 2146a BRA 0x21550> {} <POP 2146e-2147c Naked> Σ0 Δ-4 ↓ ←0x213b8 <MI 2146e MOVEA.L (A6+0xc),A0> {} <MI 21470 MOVE.L #0x80002000,(A0)> {} <MI 21476 MOVEA.L (A6+0x8),A0> {} <Blob 0x21478 [4] @> Δ-4 {[«4""»]} <POP 2147c-2148c Naked> Σ-4 Δ-12 →0x21544 ←0x214fc ←0x2150e <POP 2147c-2147e StackAdj> Δ-4 {[-8-]} <Pointer.sp 0x2147e 4> Δ-4 {[-8-]|[^^4]} <Const 0x21482 0x1.2> Δ-2 {[-8-]|[^^4]|[#1]} <Const 0x21484 0x4.2> Δ-2 {[-8-]|[^^4]|[#1]|[#4]} <MI 21488 BRA 0x21544> {[-8-]|[^^4]|[#1]|[#4]} <POP 2148c-214a0 Naked> Σ0 Δ-8 →0x21452 ←0x213b8 <MI 2148c MOVEA.L (A6+0xc),A0> {} <MI 2148e MOVE.L #0x80004000,(A0)> {} <MI 21494 MOVEA.L (A6+0x8),A0> {} <Blob 0x21496 [4] @> Δ-4 {[«4""»]} <Blob 0x2149a [4] @> Δ-4 {[«4""»]|[«4""»]} <MI 2149e BRA 0x21452> {[«4""»]|[«4""»]} <POP 214a0-214b4 Naked> Σ0 Δ-8 →0x21452 ←0x213b8 <MI 214a0 MOVEA.L (A6+0xc),A0> {} <MI 214a2 MOVE.L #0x80006000,(A0)> {} <MI 214a8 MOVEA.L (A6+0x8),A0> {} <Blob 0x214aa [4] @> Δ-4 {[«4""»]} <Blob 0x214ae [4] @> Δ-4 {[«4""»]|[«4""»]} <MI 214b2 BRA 0x21452> {[«4""»]|[«4""»]} <POP 214b4-214c8 Naked> Σ0 Δ-8 →0x21452 ←0x213b8 <MI 214b4 MOVEA.L (A6+0xc),A0> {} <MI 214b6 MOVE.L #0x70000,(A0)> {} <MI 214bc MOVEA.L (A6+0x8),A0> {} <Blob 0x214be [4] @> Δ-4 {[«4""»]} <Blob 0x214c2 [4] @> Δ-4 {[«4""»]|[«4""»]} <MI 214c6 BRA 0x21452> {[«4""»]|[«4""»]} <POP 214c8-214fc Naked> Σ0 →0x21550 ←0x213b8 <MI 214c8 MOVEA.L (A6+0xc),A0> {} <MI 214ca MOVE.L #0x72000,(A0)> {} <MI 214d0 MOVEA.L (A6+0x8),A0> {} <Blob 0x214d2 [6] @> Δ-6 {[«6""»]} <POP 214e2-214e4 StackAdj> Δ-4 {[«6""»]|[-4-]} <Lit 0x214e4 5> {[«6""»]|[$$LANCE]} <MI 214f6 MOVE.L (A7)+,(A0)> Δ+4 {[«6""»]} <POP 214f8-214fa StackAdj> Δ+6 {} <MI 214fa BRA 0x21550> {} <POP 214fc-2150e Naked> Σ0 Δ-4 →0x2147c ←0x213b8 <MI 214fc MOVEA.L (A6+0xc),A0> {} <MI 214fe MOVE.L #0x74000,(A0)> {} <MI 21504 MOVEA.L (A6+0x8),A0> {} <Blob 0x21506 [4] @> Δ-4 {[«4""»]} <MI 2150a BRA 0x2147c> {[«4""»]} <POP 2150e-21520 Naked> Σ0 Δ-4 →0x2147c ←0x213b8 <MI 2150e MOVEA.L (A6+0xc),A0> {} <MI 21510 MOVE.L #0x76000,(A0)> {} <MI 21516 MOVEA.L (A6+0x8),A0> {} <Blob 0x21518 [4] @> Δ-4 {[«4""»]} <MI 2151c BRA 0x2147c> {[«4""»]} <POP 21520-21544 Naked> Σ0 Δ-16 ↓ ←0x213a8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 ←0x213b8 <MI 21520 MOVEA.L (A6+0xc),A0> {} <MI 21522 CLR.L (A0)> {} <MI 21524 MOVEA.L (A6+0x8),A0> {} <POP 21526-21528 StackAdj> Δ-4 {[-4-]} <POP 21528-21529 StackAdj> Δ+2 {[-2-]} <Blob 0x21529 [2] @> Δ-2 {[-2-]|[«2""»]} <MI 2152c MOVE.B 0x2026f,(A7+0x1)> {[-2-]|[«2""»]} <MI 21532 MOVE.B 0x20270,(A7+0x2)> {[-2-]|[«2""»]} <POP 21538-2153a StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]} <Pointer.sp 0x2153a 4> Δ-4 {[-2-]|[«2""»]|[-4-]|[^^4]} <Const 0x2153e 0x1.2> Δ-2 {[-2-]|[«2""»]|[-4-]|[^^4]|[#1]} <Const 0x21540 0x3.2> Δ-2 {[-2-]|[«2""»]|[-4-]|[^^4]|[#1]|[#3]} <POP 21544-21550 Naked> Σ-16 Δ+16 ↓ ←0x2147c <Call 0x21544 0x102c4> {[-16-]} StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 2154a-2154c StackAdj> Δ+8 {[-8-]} <MI 2154c MOVE.L (A7)+,(A0)> Δ+4 {[-4-]} <POP 2154e-21550 StackAdj> Δ+4 {} <POP 21550-21558 Epilogue> Σ0 ←0x21452 ←0x214c8
@ 21558 <LVAR 0x008 4(r)> <LVAR -0x004 2(rw)> <LVAR -0x008 4(rw)> <POP 21558-21772 Body> <POP 21558-2156e Prologue> Σ0 ↓ <POP 2156e-21580 RegCacheLoad> Σ0 ↓ <POP 21580-215ba Naked> Σ0 ↓ <MI 21580 MOVEA.L (A6+0x8),A0> {} <POP 21582-21584 StackAdj> Δ-4 {[-4-]} <MI 21584 MOVE.B (A0+0x2),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x2)']} <Call 0x21588 0x2125a> {[-4-]|[2, '(A0+0x2)']} <POP 2158a-2158c StackAdj> Δ+2 {[-4-]} <MI 2158c MOVE.L (A7)+,D3> Δ+4 {} <MI 2158e MOVEQ.L #0x10,D4> {} <Call 0x21590 0x1028c> {} ?muls_d3_d4 <POP 21596-21598 StackAdj> Δ-4 {[-4-]} <MI 21598 MOVE.B (A0+0x3),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x3)']} <Call 0x2159c 0x2125a> {[-4-]|[2, '(A0+0x3)']} <POP 2159e-215a0 StackAdj> Δ+2 {[-4-]} <MI 215a0 MOVE.L D4,D0> {[-4-]} <MI 215a2 ADD.L (A7)+,D0> Δ+4 {} <POP 0x215a4 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 215ae MOVE.W D0,(A6-0x4)> {} <MI 215b2 EXTW.L D0> {} <MI 215b4 MOVE.L D0,D7> {} <MI 215b6 CLR.L (A6-0x8)> {} <MI 215b8 MOVEQ.L #0x00,D6> {} <POP 215ba-21624 Naked> Σ0 ↓ →0x215ba ←0x215ba <MI 215ba MOVEA.L (A6+0x8),A0> {} <MI 215bc MOVE.L D6,D0> {} <MI 215be ASL.L #0x1,D0> {} <POP 215c0-215c2 StackAdj> Δ-4 {[-4-]} <MI 215c2 MOVE.L D0,D1> {[-4-]} <MI 215c4 ADDQ.L #0x5,D1> {[-4-]} <MI 215c6 SUBQ.L #0x1,D1> {[-4-]} <POP 0x215c8 LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {[-4-]} <MI 215d2 MOVE.B (A0+D1.L),-(A7)> Δ-2 {[-4-]|[2, '(A0+D1.L)']} <Call 0x215d6 0x2125a> {[-4-]|[2, '(A0+D1.L)']} <POP 215d8-215da StackAdj> Δ+2 {[-4-]} <MI 215da MOVE.L (A7)+,D3> Δ+4 {} <MI 215dc MOVEQ.L #0x10,D4> {} <Call 0x215de 0x1028c> {} ?muls_d3_d4 <POP 215e4-215e6 StackAdj> Δ-4 {[-4-]} <MI 215e6 ADDQ.L #0x6,D0> {[-4-]} <MI 215e8 SUBQ.L #0x1,D0> {[-4-]} <POP 0x215ea LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {[-4-]} <MI 215f4 MOVE.B (A0+D0.L),-(A7)> Δ-2 {[-4-]|[2, '(A0+D0.L)']} <Call 0x215f8 0x2125a> {[-4-]|[2, '(A0+D0.L)']} <POP 215fa-215fc StackAdj> Δ+2 {[-4-]} <MI 215fc MOVE.L D4,D0> {[-4-]} <MI 215fe ADD.L (A7)+,D0> Δ+4 {} <POP 0x21600 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 2160a MOVE.W D0,D5> {} <MI 2160c MOVE.L (A6-0x8),D0> {} <MI 2160e ASL.L #0x8,D0> {} <MI 21610 MOVE.W D5,D1> {} <MI 21612 EXTW.L D1> {} <MI 21614 ADD.L D1,D0> {} <MI 21616 MOVE.L D0,(A6-0x8)> {} <MI 21618 ADD.L D1,D7> {} <MI 2161a ADDQ.L #0x1,D6> {} <MI 2161c CMPI.L #0x00000003,D6> {} <MI 21622 BLE 0x215ba> {} <POP 21624-21628 Naked> Σ0 ↓ →0x21634 <MI 21624 TST.L 0x2509c> {} <MI 21626 BNE 0x21634> {} <POP 21628-21634 Naked> Σ0 ↓ <MI 21628 MOVE.L (A6-0x8),D0> {} <MI 2162a LSR.L #0x8,D0> {} <MI 2162c LSR.L #0x5,D0> {} <MI 2162e ASL.L #0x8,D0> {} <MI 21630 ASL.L #0x5,D0> {} <MI 21632 MOVE.L D0,0x2509c> {} <POP 21634-21640 Naked> Σ0 Δ-4 ↓ ←0x21624 <MI 21634 MOVE.W (A6-0x4),D0> {} <MI 21638 SUBQ.W #0x6,D0> {} <MI 2163a EXTW.L D0> {} <MI 2163c MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']} <MI 2163e MOVEQ.L #0x00,D6> {[4, 'D0']} <POP 21640-21646 Naked> Σ-4 ↓ →0x216ec ←0x216e6 <MI 21640 CMP.L (A7),D6> {[-4-]} <MI 21642 BGT 0x216ec> {[-4-]} <POP 21646-216b4 Naked> Σ-4 ↓ →0x216e6 <MI 21646 MOVEA.L (A6+0x8),A0> {[-4-]} <MI 21648 MOVE.L D6,D0> {[-4-]} <MI 2164a ASL.L #0x1,D0> {[-4-]} <POP 2164c-2164e StackAdj> Δ-4 {[-8-]} <MI 2164e MOVE.L D0,D1> {[-8-]} <MI 21650 ADDI.L #0x0000000d,D1> {[-8-]} <MI 21656 SUBQ.L #0x1,D1> {[-8-]} <POP 0x21658 LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {[-8-]} <MI 21662 MOVE.B (A0+D1.L),-(A7)> Δ-2 {[-8-]|[2, '(A0+D1.L)']} <Call 0x21666 0x2125a> {[-8-]|[2, '(A0+D1.L)']} <POP 21668-2166a StackAdj> Δ+2 {[-8-]} <MI 2166a MOVE.L (A7)+,D3> Δ+4 {[-4-]} <MI 2166c MOVEQ.L #0x10,D4> {[-4-]} <Call 0x2166e 0x1028c> {[-4-]} ?muls_d3_d4 <POP 21674-21676 StackAdj> Δ-4 {[-8-]} <MI 21676 ADDI.L #0x0000000e,D0> {[-8-]} <MI 2167c SUBQ.L #0x1,D0> {[-8-]} <POP 0x2167e LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {[-8-]} <MI 21688 MOVE.B (A0+D0.L),-(A7)> Δ-2 {[-8-]|[2, '(A0+D0.L)']} <Call 0x2168c 0x2125a> {[-8-]|[2, '(A0+D0.L)']} <POP 2168e-21690 StackAdj> Δ+2 {[-8-]} <MI 21690 MOVE.L D4,D0> {[-8-]} <MI 21692 ADD.L (A7)+,D0> Δ+4 {[-4-]} <POP 0x21694 LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-4-]} <MI 2169e MOVE.W D0,D5> {[-4-]} <MI 216a0 MOVE.W D5,D0> {[-4-]} <MI 216a2 EXTW.L D0> {[-4-]} <MI 216a4 ADD.L D0,D7> {[-4-]} <MI 216a6 ADDQ.L #0x1,0x250a0> {[-4-]} <MI 216ac MOVE.L (A6-0x8),D1> {[-4-]} <MI 216ae ADD.L D6,D1> {[-4-]} <MI 216b0 CMP.L 0x2509c,D1> {[-4-]} <MI 216b2 BCS 0x216e6> {[-4-]} <POP 216b4-216c0 Naked> Σ-4 ↓ →0x216e6 <MI 216b4 MOVE.L 0x2509c,D2> {[-4-]} <MI 216b6 ADDI.L #0x00002000,D2> {[-4-]} <MI 216bc CMP.L D2,D1> {[-4-]} <MI 216be BCC 0x216e6> {[-4-]} <POP 216c0-216e6 Naked> Σ-4 ↓ <MI 216c0 ANDI.L #0x00001fff,D1> {[-4-]} <POP 0x216c6 LimitCheck 0x0 ≤ D1 ≤ 0x1fff> {[-4-]} <MI 216d0 ASL.L #0x1,D1> {[-4-]} <MI 216d2 LEA.L 0x25088,A0> {[-4-]} <POP 0x216d8 LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-4-]} <MI 216dc MOVE.W D0,(A0+D1.L+#0x2a)> {[-4-]} <MI 216e0 ADDQ.L #0x1,0x250a4> {[-4-]} <POP 216e6-216ec Naked> Σ-4 ↓ →0x21640 ←0x21646 ←0x216b4 <MI 216e6 ADDQ.L #0x1,D6> {[-4-]} <MI 216e8 BVC 0x21640> {[-4-]} <POP 216ec-21740 Naked> Σ-4 Δ+4 ↓ →0x2176a ←0x21640 <POP 216ec-216ee StackAdj> Δ+4 {} <MI 216ee MOVEA.L (A6+0x8),A0> {} <MI 216f0 MOVE.W (A6-0x4),D0> {} <MI 216f4 ASL.W #0x1,D0> {} <POP 216f6-216f8 StackAdj> Δ-4 {[-4-]} <MI 216f8 MOVE.W D0,D1> {[-4-]} <MI 216fa ADDQ.W #0x3,D1> {[-4-]} <MI 216fc SUBQ.W #0x1,D1> {[-4-]} <POP 0x216fe LimitCheck 0x0 ≤ D1 ≤ 0x1ff> {[-4-]} <MI 21702 MOVE.B (A0+D1.W),-(A7)> Δ-2 {[-4-]|[2, '(A0+D1.W)']} <Call 0x21706 0x2125a> {[-4-]|[2, '(A0+D1.W)']} <POP 21708-2170a StackAdj> Δ+2 {[-4-]} <MI 2170a MOVE.L (A7)+,D3> Δ+4 {} <MI 2170c MOVEQ.L #0x10,D4> {} <Call 0x2170e 0x1028c> {} ?muls_d3_d4 <MI 21714 ADD.L D4,D7> {} <POP 21716-21718 StackAdj> Δ-4 {[-4-]} <MI 21718 ADDQ.W #0x4,D0> {[-4-]} <MI 2171a SUBQ.W #0x1,D0> {[-4-]} <POP 0x2171c LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {[-4-]} <MI 21720 MOVE.B (A0+D0.W),-(A7)> Δ-2 {[-4-]|[2, '(A0+D0.W)']} <Call 0x21724 0x2125a> {[-4-]|[2, '(A0+D0.W)']} <POP 21726-21728 StackAdj> Δ+2 {[-4-]} <MI 21728 ADD.L (A7)+,D7> Δ+4 {} <MI 2172a MOVE.L D7,D4> {} <MI 2172c MOVE.L #0x100,D3> {} <Call 0x21732 0x10294> {} ?divs_d3_d4 <MI 21738 CMPI.L #0x000000ff,D3> {} <MI 2173e BEQ 0x2176a> {} <POP 21740-2176a Naked> Σ0 ↓ <Blob 0x21740 [32] @> Δ-32 {[«32""»]} <POP 2174c-2174e StackAdj> Δ-4 {[«32""»]|[-4-]} <Lit 0x2174e 32> {[«32""»]|[$$Checksum error in file data line]} <Call 0x21762 0x21194> {[«32""»]|[$$Checksum error in file data line]} <POP 21766-2176a StackAdj> Δ+36 {} <POP 2176a-21772 Epilogue> Σ0 ←0x216ec
@ 21772 <LVAR 0x008 4(r)> <LVAR -0x209 1(r)> <LVAR -0x20a @ 1(rw)> <LVAR -0x20e @ 4(r)> <LVAR -0x210 @ 1(r)> <POP 21772-219f2 Body> <POP 21772-21788 Prologue> Σ0 ↓ <POP 21788-2179a RegCacheLoad> Σ0 ↓ <POP 2179a-217a4 Naked> Σ0 ↓ <Pointer.fp 0x2179a <LVAR -0x20e @ 4(r)>> Δ-4 {[@@-526]} <Call 0x2179c 0x102b8> {[@@-526]} NewString(VAR a : String) <POP 217a2-217a4 StackAdj> Δ+4 {} <POP 217a4-217ac Naked> Σ0 ↓ ←0x21930 <MI 217a4 MOVEQ.L #0x00,D7> {} <MI 217a6 MOVE.B #0x20,(A6-0x20a)> {} <POP 217ac-217c4 Naked> Σ0 ↓ →0x21802 ←0x21886 <MI 217ac MOVEA.L (A6+0x8),A0> {} <MI 217b0 MOVE.L (A0),-(A7)> Δ-4 {[4, '(A0)']} <Pointer.fp 0x217b2 <LVAR -0x20e @ 4(r)>> Δ-4 {[4, '(A0)']|[@@-526]} <Pointer.fp 0x217b4 <LVAR -0x210 @ 1(r)>> Δ-4 {[4, '(A0)']|[@@-526]|[@@-528]} <Call 0x217b6 0x1043c> {[4, '(A0)']|[@@-526]|[@@-528]} FileReadLine(file : File; VAR a : String; VAR b : Byte) <POP 217bc-217c0 StackAdj> Δ+12 {} <MI 217c0 TST.B (A6-0x210)> {} <MI 217c2 BEQ 0x21802> {} <POP 217c4-21802 Naked> Σ0 ↓ <MI 217c4 CLR.B -(A7)> Δ-2 {[#0]} <Const 0x217c6 0x1.2> Δ-2 {[#0]|[#1]} <Const 0x217c8 0x1.4> Δ-4 {[#0]|[#1]|[##1]} <Const 0x217cc 0x25090.4> Δ-4 {[#0]|[#1]|[##1]|[##151696]} <MI 217ce PEA.L (A0)> Δ-4 {[#0]|[#1]|[##1]|[##151696]|[4, '^(A0)']} <Call 0x217d0 0x1038c> {[#0]|[#1]|[##1]|[##151696]|[4, '^(A0)']} CloseFile(a : L; VAR status : B; VAR file : File) <POP 217d6-217da StackAdj> Δ+16 {} <Blob 0x217da [22] @> Δ-22 {[«22""»]} <POP 217e6-217e8 StackAdj> Δ-4 {[«22""»]|[-4-]} <Lit 0x217e8 22> {[«22""»]|[$$File has no END record]} <Call 0x217fa 0x21194> {[«22""»]|[$$File has no END record]} <POP 217fe-21802 StackAdj> Δ+26 {} <POP 21802-2180c Naked> Σ0 Δ-4 ↓ ←0x217ac <MI 21802 MOVEA.L (A6-0x20e),A0> {} <MI 21804 MOVE.W (A0),D0> {} <MI 21806 EXTW.L D0> {} <MI 21808 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']} <MI 2180a MOVEQ.L #0x01,D6> {[4, 'D0']} <POP 2180c-21810 Naked> Σ-4 ↓ →0x21886 ←0x2185c <MI 2180c CMP.L (A7),D6> {[-4-]} <MI 2180e BGT 0x21886> {[-4-]} <POP 21810-2181a Naked> Σ-4 ↓ →0x2185c <MI 21810 ADDQ.L #0x1,D7> {[-4-]} <MI 21812 CMPI.L #0x00000200,D7> {[-4-]} <MI 21818 BLE 0x2185c> {[-4-]} <POP 2181a-2185c Naked> Σ-4 ↓ <MI 2181a CLR.B -(A7)> Δ-2 {[-4-]|[#0]} <Const 0x2181c 0x1.2> Δ-2 {[-4-]|[#0]|[#1]} <Const 0x2181e 0x1.4> Δ-4 {[-4-]|[#0]|[#1]|[##1]} <Const 0x21822 0x25090.4> Δ-4 {[-4-]|[#0]|[#1]|[##1]|[##151696]} <MI 21824 MOVEA.L (A6+0x8),A0> {[-4-]|[#0]|[#1]|[##1]|[##151696]} <MI 21828 PEA.L (A0)> Δ-4 {[-4-]|[#0]|[#1]|[##1]|[##151696]|[4, '^(A0)']} <Call 0x2182a 0x1038c> {[-4-]|[#0]|[#1]|[##1]|[##151696]|[4, '^(A0)']} CloseFile(a : L; VAR status : B; VAR file : File) <POP 21830-21834 StackAdj> Δ+16 {[-4-]} <Blob 0x21834 [18] @> Δ-18 {[-4-]|[«18""»]} <POP 21840-21842 StackAdj> Δ-4 {[-4-]|[«18""»]|[-4-]} <Lit 0x21842 18> {[-4-]|[«18""»]|[$$File line too long]} <Call 0x21854 0x21194> {[-4-]|[«18""»]|[$$File line too long]} <POP 21858-2185c StackAdj> Δ+22 {[-4-]} <POP 2185c-21886 Naked> Σ-4 ↓ →0x2180c ←0x21810 <MI 2185c MOVE.L D7,D0> {[-4-]} <MI 2185e SUBQ.L #0x1,D0> {[-4-]} <POP 0x21860 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {[-4-]} <MI 2186a LEA.L (A6-0x210),A0> {[-4-]} <MI 2186c MOVEA.L (A6-0x20e),A1> {[-4-]} <MI 2186e MOVE.L D6,D1> {[-4-]} <MI 21870 SUBQ.L #0x1,D1> {[-4-]} <POP 0x21872 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-4-]} <MI 2187c MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x6)> {[-4-]} <MI 21882 ADDQ.L #0x1,D6> {[-4-]} <MI 21884 BVC 0x2180c> {[-4-]} <POP 21886-21894 Naked> Σ-4 Δ+4 ↓ →0x217ac ←0x2180c <POP 21886-21888 StackAdj> Δ+4 {} <MI 21888 MOVEA.L (A6-0x20e),A0> {} <MI 2188a MOVE.W (A0),D0> {} <MI 2188c CMPI.W #0x007e,D0> {} <MI 21890 BGE 0x217ac> {} <POP 21894-2189c Naked> Σ0 ↓ →0x218b2 <MI 21894 MOVE.B (A6-0x20a),D0> {} <MI 21898 CMP.B #0x53,D0> {} <MI 2189a BNE 0x218b2> {} <POP 2189c-218a6 Naked> Σ0 ↓ →0x218b2 <MI 2189c MOVE.B (A6-0x209),D1> {} <MI 218a0 CMPI.B #0x33,D1> {} <MI 218a4 BNE 0x218b2> {} <POP 218a6-218b2 Naked> Σ0 →0x21926 <Pointer.fp 0x218a6 <LVAR -0x20a @ 1(rw)>> Δ-4 {[@@-522]} <Call 0x218aa 0x21558> {[@@-522]} <POP 218ae-218b0 StackAdj> Δ+4 {} <MI 218b0 BRA 0x21926> {} <POP 218b2-218b6 Naked> Σ0 ↓ →0x218c2 ←0x21894 ←0x2189c <MI 218b2 CMP.B #0x53,D0> {} <MI 218b4 BNE 0x218c2> {} <POP 218b6-218c0 Naked> Σ0 ↓ →0x218c2 <MI 218b6 MOVE.B (A6-0x209),D1> {} <MI 218ba CMPI.B #0x35,D1> {} <MI 218be BNE 0x218c2> {} <POP 218c0-218c2 Naked> Σ0 →0x21926 <MI 218c0 BRA 0x21926> {} <POP 218c2-218c6 Naked> Σ0 ↓ →0x218d2 ←0x218b2 ←0x218b6 <MI 218c2 CMP.B #0x53,D0> {} <MI 218c4 BNE 0x218d2> {} <POP 218c6-218d0 Naked> Σ0 ↓ →0x218d2 <MI 218c6 MOVE.B (A6-0x209),D1> {} <MI 218ca CMPI.B #0x37,D1> {} <MI 218ce BNE 0x218d2> {} <POP 218d0-218d2 Naked> Σ0 →0x21926 <MI 218d0 BRA 0x21926> {} <POP 218d2-218d6 Naked> Σ0 ↓ →0x218e2 ←0x218c2 ←0x218c6 <MI 218d2 CMP.B #0x53,D0> {} <MI 218d4 BNE 0x218e2> {} <POP 218d6-218e0 Naked> Σ0 ↓ →0x218e2 <MI 218d6 MOVE.B (A6-0x209),D0> {} <MI 218da CMPI.B #0x38,D0> {} <MI 218de BNE 0x218e2> {} <POP 218e0-218e2 Naked> Σ0 →0x21926 <MI 218e0 BRA 0x21926> {} <POP 218e2-21926 Naked> Σ0 ↓ ←0x218d2 ←0x218d6 <MI 218e2 CLR.B -(A7)> Δ-2 {[#0]} <Const 0x218e4 0x1.2> Δ-2 {[#0]|[#1]} <Const 0x218e6 0x1.4> Δ-4 {[#0]|[#1]|[##1]} <Const 0x218ea 0x25090.4> Δ-4 {[#0]|[#1]|[##1]|[##151696]} <MI 218ec MOVEA.L (A6+0x8),A0> {[#0]|[#1]|[##1]|[##151696]} <MI 218f0 PEA.L (A0)> Δ-4 {[#0]|[#1]|[##1]|[##151696]|[4, '^(A0)']} <Call 0x218f2 0x1038c> {[#0]|[#1]|[##1]|[##151696]|[4, '^(A0)']} CloseFile(a : L; VAR status : B; VAR file : File) <POP 218f8-218f9 StackAdj> Δ+16 ↓ {} <Blob 0x218f9 [30] @> Δ-30 {[«30""»]} <POP 2190a-2190c StackAdj> Δ-4 {[«30""»]|[-4-]} <Lit 0x2190c 29> {[«30""»]|[$$Invalid file data line format]} <Call 0x2191e 0x21194> {[«30""»]|[$$Invalid file data line format]} <POP 21922-21926 StackAdj> Δ+34 {} <POP 21926-21930 Naked> Σ0 ↓ →0x21938 ←0x218a6 ←0x218c0 ←0x218d0 ←0x218e0 <MI 21926 MOVE.B (A6-0x209),D0> {} <MI 2192a CMPI.B #0x37,D0> {} <MI 2192e BEQ 0x21938> {} <POP 21930-21938 Naked> Σ0 ↓ →0x217a4 <MI 21930 CMPI.B #0x38,D0> {} <MI 21934 BNE 0x217a4> {} <POP 21938-21960 Naked> Σ0 ↓ →0x219e0 ←0x21926 <MI 21938 CLR.W 0x290bc> {} <MI 2193e CLR.W 0x290be> {} <MI 21944 MOVEA.L (A6+0x8),A0> {} <MI 21948 MOVE.L (A0),-(A7)> Δ-4 {[4, '(A0)']} <Pointer.fp 0x2194a <LVAR -0x20e @ 4(r)>> Δ-4 {[4, '(A0)']|[@@-526]} <Pointer.fp 0x2194c <LVAR -0x210 @ 1(r)>> Δ-4 {[4, '(A0)']|[@@-526]|[@@-528]} <Call 0x2194e 0x1043c> {[4, '(A0)']|[@@-526]|[@@-528]} FileReadLine(file : File; VAR a : String; VAR b : Byte) <POP 21954-21958 StackAdj> Δ+12 {} <MI 21958 MOVEA.L (A6-0x20e),A0> {} <MI 2195a TST.B (A6-0x210)> {} <MI 2195c BNE 0x219e0> {} <POP 21960-2196a Naked> Σ0 ↓ →0x219e0 <MI 21960 MOVE.B (A0+0x2),D0> {} <MI 21964 CMPI.B #0x52,D0> {} <MI 21968 BNE 0x219e0> {} <POP 2196a-21974 Naked> Σ0 ↓ →0x219e0 <MI 2196a MOVE.B (A0+0x5),D0> {} <MI 2196e CMPI.B #0x4e,D0> {} <MI 21972 BNE 0x219e0> {} <POP 21974-219e0 Naked> Σ0 ↓ <POP 21974-21976 StackAdj> Δ-4 {[-4-]} <MI 21976 MOVE.B (A0+0x3),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x3)']} <Call 0x2197a 0x2125a> {[-4-]|[2, '(A0+0x3)']} <POP 2197e-21980 StackAdj> Δ+2 {[-4-]} <MI 21980 MOVE.L (A7)+,D4> Δ+4 {} <MI 21982 MOVEQ.L #0x0a,D3> {} <Call 0x21984 0x1028c> {} ?muls_d3_d4 <POP 2198a-2198c StackAdj> Δ-4 {[-4-]} <MI 2198c MOVE.B (A0+0x4),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x4)']} <Call 0x21990 0x2125a> {[-4-]|[2, '(A0+0x4)']} <POP 21994-21996 StackAdj> Δ+2 {[-4-]} <MI 21996 MOVE.L D4,D0> {[-4-]} <MI 21998 ADD.L (A7)+,D0> Δ+4 {} <POP 0x2199a LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 219a4 MOVE.W D0,0x290bc> {} <POP 219aa-219ac StackAdj> Δ-4 {[-4-]} <MI 219ac MOVE.B (A0+0x6),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x6)']} <Call 0x219b0 0x2125a> {[-4-]|[2, '(A0+0x6)']} <POP 219b4-219b6 StackAdj> Δ+2 {[-4-]} <MI 219b6 MOVE.L (A7)+,D4> Δ+4 {} <MI 219b8 MOVEQ.L #0x0a,D3> {} <Call 0x219ba 0x1028c> {} ?muls_d3_d4 <POP 219c0-219c2 StackAdj> Δ-4 {[-4-]} <MI 219c2 MOVE.B (A0+0x7),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x7)']} <Call 0x219c6 0x2125a> {[-4-]|[2, '(A0+0x7)']} <POP 219ca-219cc StackAdj> Δ+2 {[-4-]} <MI 219cc MOVE.L D4,D0> {[-4-]} <MI 219ce ADD.L (A7)+,D0> Δ+4 {} <POP 0x219d0 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 219da MOVE.W D0,0x290be> {} <POP 219e0-219ea Naked> Σ0 ↓ ←0x21938 ←0x21960 ←0x2196a <Pointer.fp 0x219e0 <LVAR -0x20e @ 4(r)>> Δ-4 {[@@-526]} <Call 0x219e2 0x102bc> {[@@-526]} FreeString(VAR a : String) <POP 219e8-219ea StackAdj> Δ+4 {} <POP 219ea-219f2 Epilogue> Σ0
@ 219f2 <LVAR 0x008 4(r)> <LVAR -0x010 4(rw)> <LVAR -0x014 4(rw)> <POP 219f2-21bce Body> <POP 219f2-21a08 Prologue> Σ0 ↓ <POP 21a08-21a18 RegCacheLoad> Σ0 ↓ <POP 21a18-21ace Naked> Σ0 Δ-4 ↓ <MI 21a18 MOVEA.L (A6+0x8),A0> {} <POP 21a1a-21a1c StackAdj> Δ-4 {[-4-]} <MI 21a1c MOVE.B (A0+0x3),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x3)']} <Call 0x21a20 0x2125a> {[-4-]|[2, '(A0+0x3)']} <POP 21a22-21a24 StackAdj> Δ+2 {[-4-]} <MI 21a24 MOVE.L (A7)+,D3> Δ+4 {} <MI 21a26 MOVEQ.L #0x10,D4> {} <Call 0x21a28 0x1028c> {} ?muls_d3_d4 <POP 21a2a-21a2c StackAdj> Δ-4 {[-4-]} <MI 21a2c MOVE.B (A0+0x4),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x4)']} <Call 0x21a30 0x2125a> {[-4-]|[2, '(A0+0x4)']} <POP 21a32-21a34 StackAdj> Δ+2 {[-4-]} <MI 21a34 MOVE.L D4,D0> {[-4-]} <MI 21a36 ADD.L (A7)+,D0> Δ+4 {} <MI 21a38 MOVE.L D0,(A6-0x10)> {} <POP 21a3c-21a3e StackAdj> Δ-4 {[-4-]} <MI 21a3e MOVE.B (A0+0x5),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x5)']} <Call 0x21a42 0x2125a> {[-4-]|[2, '(A0+0x5)']} <POP 21a44-21a46 StackAdj> Δ+2 {[-4-]} <MI 21a46 MOVE.L (A7)+,D3> Δ+4 {} <MI 21a48 MOVE.L #0x1000,D4> {} <Call 0x21a4e 0x1028c> {} ?muls_d3_d4 <MI 21a50 MOVE.L D4,-(A7)> Δ-4 {[4, 'D4']} <POP 21a52-21a54 StackAdj> Δ-4 {[4, 'D4']|[-4-]} <MI 21a54 MOVE.B (A0+0x6),-(A7)> Δ-2 {[4, 'D4']|[-4-]|[2, '(A0+0x6)']} <Call 0x21a58 0x2125a> {[4, 'D4']|[-4-]|[2, '(A0+0x6)']} <POP 21a5a-21a5c StackAdj> Δ+2 {[4, 'D4']|[-4-]} <MI 21a5c MOVE.L (A7)+,D3> Δ+4 {[4, 'D4']} <MI 21a5e MOVE.L #0x100,D4> {[4, 'D4']} <Call 0x21a64 0x1028c> {[4, 'D4']} ?muls_d3_d4 <MI 21a66 MOVE.L (A7),D1> {[4, 'D4']} <MI 21a68 ADD.L D4,D1> {[4, 'D4']} <MI 21a6a MOVE.B (A0+0x7),-(A7)> Δ-2 {[4, 'D4']|[2, '(A0+0x7)']} <Call 0x21a6e 0x2125a> {[4, 'D4']|[2, '(A0+0x7)']} <POP 21a70-21a72 StackAdj> Δ+2 {[4, 'D4']} <MI 21a72 MOVE.L (A7)+,D3> Δ+4 {} <MI 21a74 MOVEQ.L #0x10,D4> {} <Call 0x21a76 0x1028c> {} ?muls_d3_d4 <MI 21a78 ADD.L D4,D1> {} <POP 21a7a-21a7c StackAdj> Δ-4 {[-4-]} <MI 21a7c MOVE.B (A0+0x8),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x8)']} <Call 0x21a80 0x2125a> {[-4-]|[2, '(A0+0x8)']} <POP 21a82-21a84 StackAdj> Δ+2 {[-4-]} <MI 21a84 ADD.L (A7)+,D1> Δ+4 {} <MI 21a86 MOVE.L D1,(A6-0x14)> {} <MI 21a8a MOVE.L D0,D7> {} <POP 21a8c-21a8e StackAdj> Δ-4 {[-4-]} <MI 21a8e MOVE.B (A0+0x5),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x5)']} <Call 0x21a92 0x2125a> {[-4-]|[2, '(A0+0x5)']} <POP 21a94-21a96 StackAdj> Δ+2 {[-4-]} <MI 21a96 MOVE.L (A7)+,D3> Δ+4 {} <MI 21a98 MOVEQ.L #0x10,D4> {} <Call 0x21a9a 0x1028c> {} ?muls_d3_d4 <MI 21a9c ADD.L D4,D7> {} <POP 21a9e-21aa0 StackAdj> Δ-4 {[-4-]} <MI 21aa0 MOVE.B (A0+0x6),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x6)']} <Call 0x21aa4 0x2125a> {[-4-]|[2, '(A0+0x6)']} <POP 21aa6-21aa8 StackAdj> Δ+2 {[-4-]} <MI 21aa8 ADD.L (A7)+,D7> Δ+4 {} <POP 21aaa-21aac StackAdj> Δ-4 {[-4-]} <MI 21aac MOVE.B (A0+0x7),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x7)']} <Call 0x21ab0 0x2125a> {[-4-]|[2, '(A0+0x7)']} <POP 21ab2-21ab4 StackAdj> Δ+2 {[-4-]} <MI 21ab4 MOVE.L (A7)+,D3> Δ+4 {} <MI 21ab6 MOVEQ.L #0x10,D4> {} <Call 0x21ab8 0x1028c> {} ?muls_d3_d4 <MI 21aba ADD.L D4,D7> {} <POP 21abc-21abe StackAdj> Δ-4 {[-4-]} <MI 21abe MOVE.B (A0+0x8),-(A7)> Δ-2 {[-4-]|[2, '(A0+0x8)']} <Call 0x21ac2 0x2125a> {[-4-]|[2, '(A0+0x8)']} <POP 21ac4-21ac6 StackAdj> Δ+2 {[-4-]} <MI 21ac6 ADD.L (A7)+,D7> Δ+4 {} <MI 21ac8 SUBQ.L #0x1,D0> {} <MI 21aca MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']} <MI 21acc MOVEQ.L #0x00,D5> {[4, 'D0']} <POP 21ace-21ad2 Naked> Σ-4 ↓ →0x21b48 ←0x21ad2 <MI 21ace CMP.L (A7),D5> {[-4-]} <MI 21ad0 BGT 0x21b48> {[-4-]} <POP 21ad2-21b48 Naked> Σ-4 ↓ →0x21ace <MI 21ad2 MOVEA.L (A6+0x8),A0> {[-4-]} <MI 21ad4 MOVE.L D5,D0> {[-4-]} <MI 21ad6 ASL.L #0x1,D0> {[-4-]} <POP 21ad8-21ada StackAdj> Δ-4 {[-8-]} <MI 21ada MOVEQ.L #0x0a,D1> {[-8-]} <MI 21adc ADD.L D0,D1> {[-8-]} <MI 21ade SUBQ.L #0x1,D1> {[-8-]} <POP 0x21ae0 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]} <MI 21ae6 MOVE.B (A0+D1.L+#0x2),-(A7)> Δ-2 {[-8-]|[2, '(A0+D1.L+#0x2)']} <Call 0x21aea 0x2125a> {[-8-]|[2, '(A0+D1.L+#0x2)']} <POP 21aec-21aee StackAdj> Δ+2 {[-8-]} <MI 21aee MOVE.L (A7)+,D3> Δ+4 {[-4-]} <MI 21af0 MOVEQ.L #0x10,D4> {[-4-]} <Call 0x21af2 0x1028c> {[-4-]} ?muls_d3_d4 <POP 21af4-21af6 StackAdj> Δ-4 {[-8-]} <MI 21af6 ADDI.L #0x0000000b,D0> {[-8-]} <MI 21afc SUBQ.L #0x1,D0> {[-8-]} <POP 0x21afe LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-8-]} <MI 21b04 MOVE.B (A0+D0.L+#0x2),-(A7)> Δ-2 {[-8-]|[2, '(A0+D0.L+#0x2)']} <Call 0x21b08 0x2125a> {[-8-]|[2, '(A0+D0.L+#0x2)']} <POP 21b0a-21b0c StackAdj> Δ+2 {[-8-]} <MI 21b0c MOVE.L D4,D6> {[-8-]} <MI 21b0e ADD.L (A7)+,D6> Δ+4 {[-4-]} <MI 21b10 MOVE.L (A6-0x14),D0> {[-4-]} <MI 21b14 ADD.L D5,D0> {[-4-]} <POP 0x21b16 LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {[-4-]} <MI 21b20 ASL.L #0x1,D0> {[-4-]} <MI 21b22 LEA.L 0x25088,A0> {[-4-]} <POP 0x21b28 LimitCheck 0x0 ≤ D6 ≤ 0xff> {[-4-]} <MI 21b32 MOVE.W D6,(A0+D0.L+#0x2a)> {[-4-]} <MI 21b36 ADD.L D6,D7> {[-4-]} <MI 21b38 ADDQ.L #0x1,0x250a0> {[-4-]} <MI 21b3e ADDQ.L #0x1,0x250a4> {[-4-]} <MI 21b44 ADDQ.L #0x1,D5> {[-4-]} <MI 21b46 BVC 0x21ace> {[-4-]} <POP 21b48-21b9c Naked> Σ-4 Δ+4 ↓ →0x21bc6 ←0x21ace <POP 21b48-21b4a StackAdj> Δ+4 {} <MI 21b4a MOVEA.L (A6+0x8),A0> {} <MI 21b4c MOVE.L (A6-0x10),D0> {} <MI 21b50 ASL.L #0x1,D0> {} <POP 21b52-21b54 StackAdj> Δ-4 {[-4-]} <MI 21b54 MOVEQ.L #0x0a,D1> {[-4-]} <MI 21b56 ADD.L D0,D1> {[-4-]} <MI 21b58 SUBQ.L #0x1,D1> {[-4-]} <POP 0x21b5a LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-4-]} <MI 21b60 MOVE.B (A0+D1.L+#0x2),-(A7)> Δ-2 {[-4-]|[2, '(A0+D1.L+#0x2)']} <Call 0x21b64 0x2125a> {[-4-]|[2, '(A0+D1.L+#0x2)']} <POP 21b66-21b68 StackAdj> Δ+2 {[-4-]} <MI 21b68 MOVE.L (A7)+,D3> Δ+4 {} <MI 21b6a MOVEQ.L #0x10,D4> {} <Call 0x21b6c 0x1028c> {} ?muls_d3_d4 <MI 21b6e ADD.L D4,D7> {} <POP 21b70-21b72 StackAdj> Δ-4 {[-4-]} <MI 21b72 ADDI.L #0x0000000b,D0> {[-4-]} <MI 21b78 SUBQ.L #0x1,D0> {[-4-]} <POP 0x21b7a LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-4-]} <MI 21b80 MOVE.B (A0+D0.L+#0x2),-(A7)> Δ-2 {[-4-]|[2, '(A0+D0.L+#0x2)']} <Call 0x21b84 0x2125a> {[-4-]|[2, '(A0+D0.L+#0x2)']} <POP 21b86-21b88 StackAdj> Δ+2 {[-4-]} <MI 21b88 ADD.L (A7)+,D7> Δ+4 {} <MI 21b8a MOVE.L D7,D4> {} <MI 21b8c MOVE.L #0x100,D3> {} <Call 0x21b92 0x10294> {} ?divs_d3_d4 <MI 21b98 TST.L D3> {} <MI 21b9a BEQ 0x21bc6> {} <POP 21b9c-21bc6 Naked> Σ0 ↓ <Blob 0x21b9c [32] @> Δ-32 {[«32""»]} <POP 21ba8-21baa StackAdj> Δ-4 {[«32""»]|[-4-]} <Lit 0x21baa 32> {[«32""»]|[$$Checksum error in file data line]} <Call 0x21bbe 0x21194> {[«32""»]|[$$Checksum error in file data line]} <POP 21bc2-21bc6 StackAdj> Δ+36 {} <POP 21bc6-21bce Epilogue> Σ0 ←0x21b48
@ 21bce <LVAR 0x008 4(r)> <LVAR -0x004 @ 1(r)> <LVAR -0x008 @ 4(r)> <POP 21bce-21d06 Body> Δ-12 <POP 21bce-21be4 Prologue> Σ0 ↓ <POP 21be4-21bf2 RegCacheLoad> Σ0 ↓ <POP 21bf2-21bfc Naked> Σ0 ↓ <Pointer.fp 0x21bf2 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]} <Call 0x21bf4 0x102b8> {[@@-8]} NewString(VAR a : String) <POP 21bfa-21bfc StackAdj> Δ+4 {} <POP 21bfc-21c1a Naked> Σ0 Δ-4 ↓ →0x21c58 ←0x21cc2 ←0x21cd2 ←0x21ce2 ←0x21ce8 <MI 21bfc MOVEA.L (A6+0x8),A0> {} <MI 21c00 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']} <MI 21c02 MOVE.L (A0),-(A7)> Δ-4 {[4, 'A0']|[4, '(A0)']} <Pointer.fp 0x21c04 <LVAR -0x008 @ 4(r)>> Δ-4 {[4, 'A0']|[4, '(A0)']|[@@-8]} <Pointer.fp 0x21c06 <LVAR -0x004 @ 1(r)>> Δ-4 {[4, 'A0']|[4, '(A0)']|[@@-8]|[@@-4]} <Call 0x21c0a 0x1043c> {[4, 'A0']|[4, '(A0)']|[@@-8]|[@@-4]} FileReadLine(file : File; VAR a : String; VAR b : Byte) <POP 21c10-21c14 StackAdj> Δ+12 {[4, 'A0']} <MI 21c14 TST.B (A6-0x4)> {[4, 'A0']} <MI 21c18 BEQ 0x21c58> {[4, 'A0']} <POP 21c1a-21c58 Naked> Σ-4 ↓ <MI 21c1a CLR.B -(A7)> Δ-2 {[-4-]|[#0]} <Const 0x21c1c 0x1.2> Δ-2 {[-4-]|[#0]|[#1]} <Const 0x21c1e 0x1.4> Δ-4 {[-4-]|[#0]|[#1]|[##1]} <Const 0x21c22 0x25090.4> Δ-4 {[-4-]|[#0]|[#1]|[##1]|[##151696]} <MI 21c24 PEA.L (A0)> Δ-4 {[-4-]|[#0]|[#1]|[##1]|[##151696]|[4, '^(A0)']} <Call 0x21c26 0x1038c> {[-4-]|[#0]|[#1]|[##1]|[##151696]|[4, '^(A0)']} CloseFile(a : L; VAR status : B; VAR file : File) <POP 21c2c-21c30 StackAdj> Δ+16 {[-4-]} <Blob 0x21c30 [22] @> Δ-22 {[-4-]|[«22""»]} <POP 21c3c-21c3e StackAdj> Δ-4 {[-4-]|[«22""»]|[-4-]} <Lit 0x21c3e 22> {[-4-]|[«22""»]|[$$File has no END record]} <Call 0x21c50 0x21194> {[-4-]|[«22""»]|[$$File has no END record]} <POP 21c54-21c58 StackAdj> Δ+26 {[-4-]} <POP 21c58-21c64 Naked> Σ-4 ↓ →0x21c6c ←0x21bfc <MI 21c58 MOVEA.L (A6-0x8),A0> {[-4-]} <MI 21c5a MOVE.B (A0+0x2),D0> {[-4-]} <MI 21c5e CMPI.B #0x3a,D0> {[-4-]} <MI 21c62 BNE 0x21c6c> {[-4-]} <POP 21c64-21c6c Naked> Σ-4 ↓ →0x21cb0 <MI 21c64 MOVE.B (A0+0x9),D0> {[-4-]} <MI 21c68 CMP.B #0x30,D0> {[-4-]} <MI 21c6a BEQ 0x21cb0> {[-4-]} <POP 21c6c-21cb0 Naked> Σ-4 ↓ ←0x21c58 <MI 21c6c CLR.B -(A7)> Δ-2 {[-4-]|[#0]} <Const 0x21c6e 0x1.2> Δ-2 {[-4-]|[#0]|[#1]} <Const 0x21c70 0x1.4> Δ-4 {[-4-]|[#0]|[#1]|[##1]} <Const 0x21c74 0x25090.4> Δ-4 {[-4-]|[#0]|[#1]|[##1]|[##151696]} <MI 21c76 MOVEA.L (A7+0xc),A1> {[-4-]|[#0]|[#1]|[##1]|[##151696]} <MI 21c7a PEA.L (A1)> Δ-4 {[-4-]|[#0]|[#1]|[##1]|[##151696]|[4, '^(A1)']} <Call 0x21c7c 0x1038c> {[-4-]|[#0]|[#1]|[##1]|[##151696]|[4, '^(A1)']} CloseFile(a : L; VAR status : B; VAR file : File) <POP 21c82-21c83 StackAdj> Δ+16 ↓ {[-4-]} <Blob 0x21c83 [30] @> Δ-30 {[-4-]|[«30""»]} <POP 21c94-21c96 StackAdj> Δ-4 {[-4-]|[«30""»]|[-4-]} <Lit 0x21c96 29> {[-4-]|[«30""»]|[$$Invalid file data line format]} <Call 0x21ca8 0x21194> {[-4-]|[«30""»]|[$$Invalid file data line format]} <POP 21cac-21cb0 StackAdj> Δ+34 {[-4-]} <POP 21cb0-21cc2 Naked> Σ-4 ↓ →0x21cc8 ←0x21c64 <MI 21cb0 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x8)']} <Call 0x21cb2 0x219f2> {[-4-]|[4, '(A6-0x8)']} <POP 21cb6-21cb8 StackAdj> Δ+4 {[-4-]} <MI 21cb8 MOVE.B (A0+0x5),D0> {[-4-]} <MI 21cbc CMPI.B #0x31,D0> {[-4-]} <MI 21cc0 BEQ 0x21cc8> {[-4-]} <POP 21cc2-21cc8 Naked> Σ-4 Δ+4 →0x21bfc <POP 21cc2-21cc4 StackAdj> Δ+4 {} <MI 21cc4 BRA 0x21bfc> {} <POP 21cc8-21cd2 Naked> Σ-4 ↓ →0x21cd8 ←0x21cb0 <MI 21cc8 MOVE.B (A0+0x6),D0> {[-4-]} <MI 21ccc CMPI.B #0x46,D0> {[-4-]} <MI 21cd0 BEQ 0x21cd8> {[-4-]} <POP 21cd2-21cd8 Naked> Σ-4 Δ+4 →0x21bfc <POP 21cd2-21cd4 StackAdj> Δ+4 {} <MI 21cd4 BRA 0x21bfc> {} <POP 21cd8-21ce2 Naked> Σ-4 ↓ →0x21ce8 ←0x21cc8 <MI 21cd8 MOVE.B (A0+0x7),D0> {[-4-]} <MI 21cdc CMPI.B #0x45,D0> {[-4-]} <MI 21ce0 BEQ 0x21ce8> {[-4-]} <POP 21ce2-21ce8 Naked> Σ-4 Δ+4 →0x21bfc <POP 21ce2-21ce4 StackAdj> Δ+4 {} <MI 21ce4 BRA 0x21bfc> {} <POP 21ce8-21cf4 Naked> Σ-4 Δ+4 ↓ →0x21bfc ←0x21cd8 <POP 21ce8-21cea StackAdj> Δ+4 {} <MI 21cea MOVE.B (A0+0x8),D0> {} <MI 21cee CMP.B #0x30,D0> {} <MI 21cf0 BNE 0x21bfc> {} <POP 21cf4-21cfe Naked> Σ0 ↓ <Pointer.fp 0x21cf4 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]} <Call 0x21cf6 0x102bc> {[@@-8]} FreeString(VAR a : String) <POP 21cfc-21cfe StackAdj> Δ+4 {} <POP 21cfe-21d06 Epilogue> Σ0
@ 21d06 <LVAR 0x00c 4(r)> <LVAR 0x00a 1(r)> <LVAR 0x008 1(r)> <LVAR -0x004 @ 4(r)> <LVAR -0x008 @ 4(r)> <POP 21d06-2227a Body> <POP 21d06-21d1c Prologue> Σ0 ↓ <POP 21d1c-21d36 RegCacheLoad> Σ0 ↓ <POP 21d36-21d44 Naked> Σ0 ↓ →0x21d5a <MI 21d36 MOVE.L 0x2509c,D0> {} <MI 21d3c CMPI.L #0x80006000,D0> {} <MI 21d42 BEQ 0x21d5a> {} <POP 21d44-21d4a Naked> Σ0 ↓ →0x21d62 <MI 21d44 TST.B (A6+0xa)> {} <MI 21d48 BEQ 0x21d62> {} <POP 21d4a-21d52 Naked> Σ0 ↓ →0x21d62 <MI 21d4a TST.W 0x290ae> {} <MI 21d50 BNE 0x21d62> {} <POP 21d52-21d5a Naked> Σ0 ↓ →0x21d62 <MI 21d52 TST.W 0x290a8> {} <MI 21d58 BNE 0x21d62> {} <POP 21d5a-21d62 Naked> Σ0 →0x21d64 ←0x21d36 <MI 21d5a MOVE.L #0x1dff,0x250ac> {} <MI 21d60 BRA 0x21d64> {} <POP 21d62-21d64 Naked> Σ0 ↓ ←0x21d44 ←0x21d4a ←0x21d52 <MI 21d62 MOVE.L #0x1fff,0x250ac> {} <POP 21d64-21d98 Naked> Σ0 ↓ →0x21f02 ←0x21d5a <MI 21d64 MOVE.L 0x250ac,D0> {} <MI 21d66 SUBQ.L #0x1,D0> {} <POP 0x21d68 LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {} <MI 21d6e ASL.L #0x1,D0> {} <MI 21d70 LEA.L 0x25088,A0> {} <MI 21d72 MOVE.W (A0+D0.L+#0x2a),D0> {} <POP 0x21d76 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 21d7a MOVE.W D0,0x250b0> {} <MI 21d7c MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']} <Const 0x21d7e 0x250a8.4> Δ-4 {[2, 'D0']|[##151720]} <Pointer.fp 0x21d84 <LVAR -0x004 @ 4(r)>> Δ-4 {[2, 'D0']|[##151720]|[@@-4]} <Call 0x21d88 0x21388> {[2, 'D0']|[##151720]|[@@-4]} <POP 21d8c-21d90 StackAdj> Δ+10 {} <MI 21d90 TST.B (A6+0x8)> {} <MI 21d94 BEQ 0x21f02> {} <POP 21d98-21f02 Naked> Σ0 ↓ <Blob 0x21d98 [2] @> Δ-2 {[«2""»]} <Blob 0x21d9c [2] @> Δ-2 {[«2""»]|[«2""»]} <Blob 0x21da0 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]} <Blob 0x21da4 [36] @> Δ-36 {[«2""»]|[«2""»]|[«2""»]|[«36""»]} <POP 21db0-21db2 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-8-]} <Lit 0x21db2 6> {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-4-]|[$$ read_]} <POP 21dc2-21dc3 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-4-]|[$$ read_]|[-4-]} <Blob 0x21dc3 [4] 0x250a4> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-4-]|[$$ read_]|[-4-]|[«4»]} <Call 0x21dc8 0x102e4> {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-4-]|[$$ read_]|[-4-]|[«4»]} Long2String(a : Long) : String <Lit 0x21dce 36> {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-4-]|[$$ read_]|[-4-]|[$$ bytes from file at base address 16#]} <POP 21dde-21ddf StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-4-]|[$$ read_]|[-4-]|[$$ bytes from file at base address 16#]|[-4-]} <Blob 0x21ddf [4] 0x2509c> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-4-]|[$$ read_]|[-4-]|[$$ bytes from file at base address 16#]|[-4-]|[«4»]} <Const 0x21de4 0x8.4> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-4-]|[$$ read_]|[-4-]|[$$ bytes from file at base address 16#]|[-4-]|[«4»]|[##8]} <Call 0x21de8 0x102e8> {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-4-]|[$$ read_]|[-4-]|[$$ bytes from file at base address 16#]|[-4-]|[«4»]|[##8]} Long2HexString(val : Long; ndig : Long) : String <POP 21dee-21df0 StackAdj> Δ+8 {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-4-]|[$$ read_]|[-4-]|[$$ bytes from file at base address 16#]|[-4-]} <Call 0x21df0 0x102d8> {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-4-]|[$$ read_]|[-4-]|[$$ bytes from file at base address 16#]|[-4-]} StringCat4(a, b, c, d : String) : String <POP 21df6-21dfa StackAdj> Δ+16 {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-4-]} <Call 0x21dfa 0x103e0> {[«2""»]|[«2""»]|[«2""»]|[«36""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 21e00-21e01 StackAdj> Δ+46 ↓ {} <Blob 0x21e01 [26] @> Δ-26 {[«26""»]} <POP 21e12-21e14 StackAdj> Δ-8 {[«26""»]|[-8-]} <Lit 0x21e14 25> {[«26""»]|[-4-]|[$$in file: revision date =_]} <POP 21e24-21e26 StackAdj> Δ-4 {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]} <MI 21e26 MOVE.L 0x250ac,D0> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]} <MI 21e28 SUBQ.L #0x4,D0> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]} <POP 0x21e2a LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]} <MI 21e30 ASL.L #0x1,D0> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]} <MI 21e32 LEA.L 0x25088,A0> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]} <MI 21e34 MOVE.W (A0+D0.L+#0x2a),D1> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]} <MI 21e38 EXTW.L D1> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]} <MI 21e3a MOVE.L D1,-(A7)> Δ-4 {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']} <Const 0x21e3c 0x2.4> Δ-4 {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[##2]} <Call 0x21e40 0x102e8> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 21e46-21e48 StackAdj> Δ+4 {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']} <MI 21e48 MOVE.L 0x250ac,D0> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']} <MI 21e4a SUBQ.L #0x3,D0> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']} <POP 0x21e4c LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']} <MI 21e52 ASL.L #0x1,D0> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']} <MI 21e54 LEA.L 0x25088,A0> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']} <MI 21e56 MOVE.W (A0+D0.L+#0x2a),D1> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']} <MI 21e5a EXTW.L D1> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']} <MI 21e5c MOVE.L D1,-(A7)> Δ-4 {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']} <Const 0x21e5e 0x2.4> Δ-4 {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']|[##2]} <Call 0x21e62 0x102e8> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 21e68-21e6a StackAdj> Δ+4 {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']} <MI 21e6a MOVE.L 0x250ac,D0> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']} <MI 21e6c SUBQ.L #0x2,D0> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']} <POP 0x21e6e LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']} <MI 21e74 ASL.L #0x1,D0> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']} <MI 21e76 LEA.L 0x25088,A0> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']} <MI 21e78 MOVE.W (A0+D0.L+#0x2a),D1> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']} <MI 21e7c EXTW.L D1> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']} <MI 21e7e MOVE.L D1,-(A7)> Δ-4 {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']|[4, 'D1']} <Const 0x21e80 0x2.4> Δ-4 {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']|[4, 'D1']|[##2]} <Call 0x21e84 0x102e8> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']|[4, 'D1']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 21e8a-21e8c StackAdj> Δ+8 {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']} <Call 0x21e8c 0x102d8> {[«26""»]|[-4-]|[$$in file: revision date =_]|[-4-]|[4, 'D1']|[4, 'D1']} StringCat4(a, b, c, d : String) : String <POP 21e92-21e96 StackAdj> Δ+16 {[«26""»]|[-4-]} <Call 0x21e96 0x103d8> {[«26""»]|[-4-]} WriteConsoleString(str : String) <POP 21e9c-21e9d StackAdj> Δ+30 ↓ {} <Blob 0x21e9d [16] @> Δ-16 {[«16""»]} <Blob 0x21eae [2] @> Δ-2 {[«16""»]|[«2""»]} <POP 21eb2-21eb4 StackAdj> Δ-8 {[«16""»]|[«2""»]|[-8-]} <Lit 0x21eb4 15> {[«16""»]|[«2""»]|[-4-]|[$$, locus byte =_]} <POP 21ec4-21ec6 StackAdj> Δ-4 {[«16""»]|[«2""»]|[-4-]|[$$, locus byte =_]|[-4-]} <MI 21ec6 MOVE.W 0x250b0,D0> {[«16""»]|[«2""»]|[-4-]|[$$, locus byte =_]|[-4-]} <MI 21ec8 EXTW.L D0> {[«16""»]|[«2""»]|[-4-]|[$$, locus byte =_]|[-4-]} <MI 21eca MOVE.L D0,-(A7)> Δ-4 {[«16""»]|[«2""»]|[-4-]|[$$, locus byte =_]|[-4-]|[4, 'D0']} <Const 0x21ecc 0x2.4> Δ-4 {[«16""»]|[«2""»]|[-4-]|[$$, locus byte =_]|[-4-]|[4, 'D0']|[##2]} <Call 0x21ed0 0x102e8> {[«16""»]|[«2""»]|[-4-]|[$$, locus byte =_]|[-4-]|[4, 'D0']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 21ed6-21ed8 StackAdj> Δ+4 {[«16""»]|[«2""»]|[-4-]|[$$, locus byte =_]|[-4-]|[4, 'D0']} <Lit 0x21ed8 2> {[«16""»]|[«2""»]|[-4-]|[$$, locus byte =_]|[-4-]|[$$ (]} <POP 21ee8-21eea StackAdj> Δ-4 {[«16""»]|[«2""»]|[-4-]|[$$, locus byte =_]|[-4-]|[$$ (]|[-4-]} <MI 21eea MOVE.L (A6-0x4),(A7)> {[«16""»]|[«2""»]|[-4-]|[$$, locus byte =_]|[-4-]|[$$ (]|[4, '(A6-0x4)']} <Call 0x21eee 0x102d8> {[«16""»]|[«2""»]|[-4-]|[$$, locus byte =_]|[-4-]|[$$ (]|[4, '(A6-0x4)']} StringCat4(a, b, c, d : String) : String <POP 21ef4-21ef8 StackAdj> Δ+16 {[«16""»]|[«2""»]|[-4-]} <Call 0x21ef8 0x103d8> {[«16""»]|[«2""»]|[-4-]} WriteConsoleString(str : String) <POP 21efe-21f02 StackAdj> Δ+22 {} <POP 21f02-21f06 Naked> Σ0 ↓ ←0x21d64 <MI 21f02 MOVEQ.L #0x00,D7> {} <MI 21f04 MOVEQ.L #0x00,D6> {} <POP 21f06-21f30 Naked> Σ0 ↓ →0x21f06 ←0x21f06 <POP 0x21f06 LimitCheck 0x0 ≤ D6 ≤ 0x1fff> {} <MI 21f0c MOVE.L D6,D0> {} <MI 21f0e ASL.L #0x1,D0> {} <MI 21f10 LEA.L 0x25088,A0> {} <MI 21f12 MOVE.W (A0+D0.L+#0x2a),D1> {} <MI 21f16 EXTW.L D1> {} <MI 21f18 ADD.L D1,D7> {} <MI 21f1a MOVE.L D7,D4> {} <MI 21f1c MOVE.L #0x100,D3> {} <Call 0x21f22 0x10294> {} ?divs_d3_d4 <MI 21f28 MOVE.L D3,D7> {} <MI 21f2a ADDQ.L #0x1,D6> {} <MI 21f2c CMP.L #0x1fff,D6> {} <MI 21f2e BLE 0x21f06> {} <POP 21f30-21f38 Naked> Σ0 ↓ →0x21f72 <MI 21f30 CMPI.L #0x000000aa,D7> {} <MI 21f36 BNE 0x21f72> {} <POP 21f38-21f3e Naked> Σ0 ↓ →0x21f6e <MI 21f38 TST.B (A6+0x8)> {} <MI 21f3c BEQ 0x21f6e> {} <POP 21f3e-21f6e Naked> Σ0 ↓ <Blob 0x21f3e [18] @> Δ-18 {[«18""»]} <POP 21f50-21f52 StackAdj> Δ-4 {[«18""»]|[-4-]} <Lit 0x21f52 17> {[«18""»]|[$$), checksum is OK]} <Call 0x21f64 0x103e0> {[«18""»]|[$$), checksum is OK]} WriteConsoleStringCrLf(str : String) <POP 21f6a-21f6e StackAdj> Δ+22 {} <POP 21f6e-21f72 Naked> Σ0 →0x2205c ←0x21f38 <MI 21f6e BRA 0x2205c> {} <POP 21f72-21ffe Naked> Σ0 Δ-24 ↓ →0x2202c ←0x21f30 <Blob 0x21f72 [2] @> Δ-2 {[«2""»]} <POP 21f76-21f78 StackAdj> Δ-4 {[«2""»]|[-4-]} <Lit 0x21f78 2> {[«2""»]|[$$) ]} <Call 0x21f8a 0x103e0> {[«2""»]|[$$) ]} WriteConsoleStringCrLf(str : String) <POP 21f90-21f92 StackAdj> Δ+6 {} <Blob 0x21f92 [52] @> Δ-52 {[«52""»]} <POP 21f9e-21fa0 StackAdj> Δ-8 {[«52""»]|[-8-]} <Lit 0x21fa0 52> {[«52""»]|[-4-]|[$$ERROR: bad file checksum: expected 16#AA but got 16#]} <MI 21fb0 MOVE.L D7,(A7)> {[«52""»]|[-4-]|[4, 'D7']} <POP 21faa-21fb0 StackAdj> Δ-8 {[«52""»]|[-4-]|[4, 'D7']|[-8-]} <Const 0x21fb2 0x2.4> Δ-4 {[«52""»]|[-4-]|[4, 'D7']|[-8-]|[##2]} <Call 0x21fb6 0x102e8> {[«52""»]|[-4-]|[4, 'D7']|[-8-]|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 21fbc-21fbe StackAdj> Δ+8 {[«52""»]|[-4-]|[4, 'D7']|[-4-]} <Call 0x21fbe 0x102d0> {[«52""»]|[-4-]|[4, 'D7']|[-4-]} StringCat2(a, b : String) : String <POP 21fc4-21fc6 StackAdj> Δ+8 {[«52""»]|[-4-]} <Call 0x21fc6 0x103e0> {[«52""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 21fcc-21fd0 StackAdj> Δ+56 {} <Blob 0x21fd0 [24] @> Δ-24 {[«24""»]} <POP 21fdc-21fde StackAdj> Δ-6 {[«24""»]|[-6-]} <Lit 0x21fde 24> {[«24""»]|[-2-]|[$$Do you wish to continue_]} <POP 21fee-21ff0 StackAdj> Δ-2 {[«24""»]|[-2-]|[$$Do you wish to continue_]|[-2-]} <MI 21ff0 CLR.B (A7)> {[«24""»]|[-2-]|[$$Do you wish to continue_]|[-2-]} <Call 0x21ff2 0x103f0> {[«24""»]|[-2-]|[$$Do you wish to continue_]|[-2-]} AskOnConsoleYesNo(prompt : String; default : Bool) : Bool <POP 21ff8-21ffa StackAdj> Δ+6 {[«24""»]|[-2-]} <MI 21ffa TST.B (A7)+> Δ+2 {[«24""»]} <MI 21ffc BNE 0x2202c> {[«24""»]} <POP 21ffe-2202c Naked> Σ-24 ↓ <Blob 0x21ffe [18] @> Δ-18 {[-24-]|[«18""»]} <POP 22010-22012 StackAdj> Δ-4 {[-24-]|[«18""»]|[-4-]} <Lit 0x22012 17> {[-24-]|[«18""»]|[$$requested by user]} <Call 0x22024 0x21194> {[-24-]|[«18""»]|[$$requested by user]} <POP 22028-2202c StackAdj> Δ+22 {[-24-]} <POP 2202c-2205c Naked> Σ-24 Δ+24 ↓ ←0x21f72 <POP 2202c-2202d StackAdj> Δ+24 ↓ {} <Blob 0x2202d [40] @> Δ-40 {[«40""»]} <POP 2203e-22040 StackAdj> Δ-4 {[«40""»]|[-4-]} <Lit 0x22040 39> {[«40""»]|[$$will write the correct checksum to prom]} <Call 0x22052 0x103e0> {[«40""»]|[$$will write the correct checksum to prom]} WriteConsoleStringCrLf(str : String) <POP 22058-2205c StackAdj> Δ+44 {} <POP 2205c-22062 Naked> Σ0 ↓ →0x2209e ←0x21f6e <MI 2205c TST.B (A6+0xa)> {} <MI 22060 BEQ 0x2209e> {} <POP 22062-22068 Naked> Σ0 ↓ →0x2209a <MI 22062 TST.L (A6+0xc)> {} <MI 22066 BEQ 0x2209a> {} <POP 22068-22072 Naked> Σ0 ↓ →0x2209a <MI 22068 MOVE.W 0x250b0,D0> {} <MI 2206a EXTW.L D0> {} <MI 2206c CMP.L (A6+0xc),D0> {} <MI 22070 BEQ 0x2209a> {} <POP 22072-2209a Naked> Σ0 ↓ <Blob 0x22072 [28] @> Δ-28 {[«28""»]} <POP 2207e-22080 StackAdj> Δ-4 {[«28""»]|[-4-]} <Lit 0x22080 28> {[«28""»]|[$$file LOCUS byte is incorrect]} <Call 0x22092 0x21194> {[«28""»]|[$$file LOCUS byte is incorrect]} <POP 22096-2209a StackAdj> Δ+32 {} <POP 2209a-2209e Naked> Σ0 →0x22218 ←0x22062 ←0x22068 <MI 2209a BRA 0x22218> {} <POP 2209e-220d0 Naked> Σ0 ↓ →0x22104 ←0x2205c <MI 2209e MOVE.L (A6+0xc),D0> {} <POP 0x220a2 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 220ac MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']} <Pointer.fp 0x220ae <LVAR -0x008 @ 4(r)>> Δ-4 {[2, 'D0']|[@@-8]} <Pointer.fp 0x220b2 <LVAR -0x004 @ 4(r)>> Δ-4 {[2, 'D0']|[@@-8]|[@@-4]} <Call 0x220b6 0x21388> {[2, 'D0']|[@@-8]|[@@-4]} <POP 220ba-220be StackAdj> Δ+10 {} <Pointer.fp 0x220be <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]} <Call 0x220c2 0x102bc> {[@@-4]} FreeString(VAR a : String) <POP 220c8-220ca StackAdj> Δ+4 {} <MI 220ca TST.L (A6+0xc)> {} <MI 220ce BEQ 0x22104> {} <POP 220d0-220dc Naked> Σ0 ↓ →0x22104 <MI 220d0 MOVE.L (A6-0x8),D0> {} <MI 220d4 CMP.L 0x2509c,D0> {} <MI 220da BEQ 0x22104> {} <POP 220dc-22104 Naked> Σ0 ↓ <Blob 0x220dc [30] @> Δ-30 {[«30""»]} <POP 220e8-220ea StackAdj> Δ-4 {[«30""»]|[-4-]} <Lit 0x220ea 30> {[«30""»]|[$$file base address is incorrect]} <Call 0x220fc 0x21194> {[«30""»]|[$$file base address is incorrect]} <POP 22100-22104 StackAdj> Δ+34 {} <POP 22104-22114 Naked> Σ0 ↓ →0x22218 ←0x2209e ←0x220d0 <MI 22104 MOVE.L 0x250a8,D0> {} <MI 2210a CMP.L 0x2509c,D0> {} <MI 22110 BEQ 0x22218> {} <POP 22114-22122 Naked> Σ0 ↓ →0x2212a <MI 22114 MOVE.L 0x2509c,D0> {} <MI 2211a CMPI.L #0x80000000,D0> {} <MI 22120 BNE 0x2212a> {} <POP 22122-2212a Naked> Σ0 →0x221bc <MI 22122 MOVE.W #0x21,0x250b0> {} <MI 22126 BRA 0x221bc> {} <POP 2212a-22132 Naked> Σ0 ↓ →0x2213a ←0x22114 <MI 2212a CMPI.L #0x80002000,D0> {} <MI 22130 BNE 0x2213a> {} <POP 22132-2213a Naked> Σ0 →0x221bc <MI 22132 MOVE.W #0x19,0x250b0> {} <MI 22136 BRA 0x221bc> {} <POP 2213a-22142 Naked> Σ0 ↓ →0x22148 ←0x2212a <MI 2213a CMPI.L #0x80004000,D0> {} <MI 22140 BNE 0x22148> {} <POP 22142-22148 Naked> Σ0 →0x221bc <MI 22142 MOVE.W #0x17,0x250b0> {} <MI 22146 BRA 0x221bc> {} <POP 22148-22150 Naked> Σ0 ↓ →0x22156 ←0x2213a <MI 22148 CMPI.L #0x80006000,D0> {} <MI 2214e BNE 0x22156> {} <POP 22150-22156 Naked> Σ0 →0x221bc <MI 22150 MOVE.W #0x15,0x250b0> {} <MI 22154 BRA 0x221bc> {} <POP 22156-2215e Naked> Σ0 ↓ →0x22164 ←0x22148 <MI 22156 CMPI.L #0x00070000,D0> {} <MI 2215c BNE 0x22164> {} <POP 2215e-22164 Naked> Σ0 →0x221bc <MI 2215e MOVE.W #0x50,0x250b0> {} <MI 22162 BRA 0x221bc> {} <POP 22164-2216c Naked> Σ0 ↓ →0x22172 ←0x22156 <MI 22164 CMPI.L #0x00072000,D0> {} <MI 2216a BNE 0x22172> {} <POP 2216c-22172 Naked> Σ0 →0x221bc <MI 2216c MOVE.W #0x51,0x250b0> {} <MI 22170 BRA 0x221bc> {} <POP 22172-2217a Naked> Σ0 ↓ →0x22180 ←0x22164 <MI 22172 CMPI.L #0x00074000,D0> {} <MI 22178 BNE 0x22180> {} <POP 2217a-22180 Naked> Σ0 →0x221bc <MI 2217a MOVE.W #0x52,0x250b0> {} <MI 2217e BRA 0x221bc> {} <POP 22180-22188 Naked> Σ0 ↓ →0x2218e ←0x22172 <MI 22180 CMPI.L #0x00076000,D0> {} <MI 22186 BNE 0x2218e> {} <POP 22188-2218e Naked> Σ0 →0x221bc <MI 22188 MOVE.W #0x53,0x250b0> {} <MI 2218c BRA 0x221bc> {} <POP 2218e-221bc Naked> Σ0 ↓ ←0x22180 <Blob 0x2218e [30] @> Δ-30 {[«30""»]} <POP 221a0-221a2 StackAdj> Δ-4 {[«30""»]|[-4-]} <Lit 0x221a2 29> {[«30""»]|[$$File has illegal base address]} <Call 0x221b4 0x21194> {[«30""»]|[$$File has illegal base address]} <POP 221b8-221bc StackAdj> Δ+34 {} <POP 221bc-22218 Naked> Σ0 ↓ ←0x22122 ←0x22132 ←0x22142 ←0x22150 ←0x2215e ←0x2216c ←0x2217a ←0x22188 <MI 221bc MOVE.L 0x250ac,D0> {} <MI 221be SUBQ.L #0x1,D0> {} <POP 0x221c0 LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {} <MI 221c6 ASL.L #0x1,D0> {} <MI 221c8 LEA.L 0x25088,A0> {} <MI 221ca MOVE.W 0x250b0,(A0+D0.L+#0x2a)> {} <Blob 0x221ce [2] 0x250b0> Δ-2 {[«2»]} <Const 0x221d0 0x250a8.4> Δ-4 {[«2»]|[##151720]} <Pointer.fp 0x221d6 <LVAR -0x004 @ 4(r)>> Δ-4 {[«2»]|[##151720]|[@@-4]} <Call 0x221da 0x21388> {[«2»]|[##151720]|[@@-4]} <POP 221de-221e2 StackAdj> Δ+10 {} <Blob 0x221e2 [50] @> Δ-50 {[«50""»]} <POP 221ee-221f0 StackAdj> Δ-8 {[«50""»]|[-8-]} <Lit 0x221f0 50> {[«50""»]|[-4-]|[$$fixed incorrect LOCUS byte from file: now targets_]} <POP 22200-22202 StackAdj> Δ-4 {[«50""»]|[-4-]|[$$fixed incorrect LOCUS byte from file: now targets_]|[-4-]} <MI 22202 MOVE.L (A6-0x4),(A7)> {[«50""»]|[-4-]|[$$fixed incorrect LOCUS byte from file: now targets_]|[4, '(A6-0x4)']} <Call 0x22206 0x102d0> {[«50""»]|[-4-]|[$$fixed incorrect LOCUS byte from file: now targets_]|[4, '(A6-0x4)']} StringCat2(a, b : String) : String <POP 2220c-2220e StackAdj> Δ+8 {[«50""»]|[-4-]} <Call 0x2220e 0x103e0> {[«50""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 22214-22218 StackAdj> Δ+54 {} <POP 22218-2221c Naked> Σ0 ↓ ←0x2209a ←0x22104 <MI 22218 MOVEQ.L #0x00,D7> {} <MI 2221a MOVEQ.L #0x00,D6> {} <POP 2221c-22246 Naked> Σ0 ↓ →0x2221c ←0x2221c <POP 0x2221c LimitCheck 0x0 ≤ D6 ≤ 0x1fff> {} <MI 22222 MOVE.L D6,D0> {} <MI 22224 ASL.L #0x1,D0> {} <MI 22226 LEA.L 0x25088,A0> {} <MI 22228 MOVE.W (A0+D0.L+#0x2a),D1> {} <MI 2222c EXTW.L D1> {} <MI 2222e ADD.L D1,D7> {} <MI 22230 MOVE.L D7,D4> {} <MI 22232 MOVE.L #0x100,D3> {} <Call 0x22238 0x10294> {} ?divs_d3_d4 <MI 2223e MOVE.L D3,D7> {} <MI 22240 ADDQ.L #0x1,D6> {} <MI 22242 CMP.L #0x1fff,D6> {} <MI 22244 BLE 0x2221c> {} <POP 22246-22272 Naked> Σ0 ↓ <MI 22246 MOVE.L 0x250ac,D0> {} <POP 0x22248 LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {} <MI 2224e ASL.L #0x1,D0> {} <MI 22250 LEA.L 0x25088,A0> {} <MI 22252 ADDI.W #0x01aa,(A0+D0.L+#0x2a)> {} <MI 22258 MOVE.W (A0+D0.L+#0x2a),D1> {} <MI 2225c EXTW.L D1> {} <MI 2225e SUB.L D7,D1> {} <MI 22260 MOVE.L D1,D4> {} <MI 22262 MOVE.L #0x100,D3> {} <Call 0x22268 0x10294> {} ?divs_d3_d4 <MI 2226e MOVE.W D3,(A0+D0.L+#0x2a)> {} <POP 22272-2227a Epilogue> Σ0
@ 2227a <LVAR 0x00e 4(r)> <LVAR 0x00a 4(r)> <LVAR 0x008 1(r)> <LVAR -0x00a @ 1(r)> <LVAR -0x00e @ 4(r)> <LVAR -0x012 @ 4(r)> <POP 2227a-224a8 Body> Δ+4 <POP 2227a-22290 Prologue> Σ0 ↓ <POP 22290-222a8 RegCacheLoad> Σ0 ↓ <POP 222a8-222b0 Naked> Σ0 ↓ →0x222e2 <MI 222a8 MOVEA.L (A6+0xe),A0> {} <MI 222ac CMPA.W #0x01,A0> {} <MI 222ae BNE 0x222e2> {} <POP 222b0-222e2 Naked> Σ0 →0x222e4 <Blob 0x222b0 [42] @> Δ-42 {[«42""»]} <POP 222c0-222c2 StackAdj> Δ-8 {[«42""»]|[-8-]} <Lit 0x222c2 41> {[«42""»]|[-4-]|[$$Enter the file name of the EEPROM data :_]} <Call 0x222d4 0x103e4> {[«42""»]|[-4-]|[$$Enter the file name of the EEPROM data :_]} AskConsoleString(prompt : String) : String <POP 222da-222dc StackAdj> Δ+4 {[«42""»]|[-4-]} <MI 222dc MOVE.L (A7)+,0x25098> Δ+4 {[«42""»]} <POP 222de-222e0 StackAdj> Δ+42 {} <MI 222e0 BRA 0x222e4> {} <POP 222e2-222e4 Naked> Σ0 ↓ ←0x222a8 <MI 222e2 MOVE.L A0,0x25098> {} <POP 222e4-22300 Naked> Σ0 ↓ →0x22326 ←0x222b0 <Blob 0x222e4 [4] 0x25098> Δ-4 {[«4»]} <MI 222e6 CLR.B -(A7)> Δ-2 {[«4»]|[#0]} <Const 0x222e8 0x1.2> Δ-2 {[«4»]|[#0]|[#1]} <Const 0x222ea 0x0.4> Δ-4 {[«4»]|[#0]|[#1]|[##0]} <Const 0x222ee 0x25090.4> Δ-4 {[«4»]|[#0]|[#1]|[##0]|[##151696]} <Pointer.fp 0x222f0 <LVAR -0x012 @ 4(r)>> Δ-4 {[«4»]|[#0]|[#1]|[##0]|[##151696]|[@@-18]} <Call 0x222f2 0x10380> {[«4»]|[#0]|[#1]|[##0]|[##151696]|[@@-18]} OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) <POP 222f8-222fc StackAdj> Δ+20 {} <MI 222fc TST.B 0x25090> {} <MI 222fe BEQ 0x22326> {} <POP 22300-22326 Naked> Σ0 ↓ <Blob 0x22300 [24] @> Δ-24 {[«24""»]} <POP 2230c-2230e StackAdj> Δ-4 {[«24""»]|[-4-]} <Lit 0x2230e 24> {[«24""»]|[$$could not open data file]} <Call 0x2231e 0x21194> {[«24""»]|[$$could not open data file]} <POP 22322-22326 StackAdj> Δ+28 {} <POP 22326-2235e Naked> Σ0 ↓ →0x2239c ←0x222e4 <MI 22326 MOVE.L (A6+0xa),D0> {} <POP 0x2232a LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 22334 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']} <Const 0x22336 0x2509c.4> Δ-4 {[2, 'D0']|[##151708]} <Pointer.fp 0x2233c <LVAR -0x00e @ 4(r)>> Δ-4 {[2, 'D0']|[##151708]|[@@-14]} <Call 0x22340 0x21388> {[2, 'D0']|[##151708]|[@@-14]} <POP 22344-22346 StackAdj> Δ+6 {[2, 'D0']|[-2-]} <MI 22346 MOVE.L (A6-0x12),(A7)> {[4, '(A6-0x12)']} <Pointer.fp 0x22348 <LVAR -0x00e @ 4(r)>> Δ-4 {[4, '(A6-0x12)']|[@@-14]} <Pointer.fp 0x2234c <LVAR -0x00a @ 1(r)>> Δ-4 {[4, '(A6-0x12)']|[@@-14]|[@@-10]} <Call 0x22350 0x1043c> {[4, '(A6-0x12)']|[@@-14]|[@@-10]} FileReadLine(file : File; VAR a : String; VAR b : Byte) <POP 22356-22358 StackAdj> Δ+12 {} <MI 22358 TST.B (A6-0xa)> {} <MI 2235c BEQ 0x2239c> {} <POP 2235e-2239c Naked> Σ0 ↓ <MI 2235e CLR.B -(A7)> Δ-2 {[#0]} <Const 0x22360 0x1.2> Δ-2 {[#0]|[#1]} <Const 0x22362 0x1.4> Δ-4 {[#0]|[#1]|[##1]} <Const 0x22366 0x25090.4> Δ-4 {[#0]|[#1]|[##1]|[##151696]} <Pointer.fp 0x22368 <LVAR -0x012 @ 4(r)>> Δ-4 {[#0]|[#1]|[##1]|[##151696]|[@@-18]} <Call 0x2236a 0x1038c> {[#0]|[#1]|[##1]|[##151696]|[@@-18]} CloseFile(a : L; VAR status : B; VAR file : File) <POP 22370-22371 StackAdj> Δ+16 ↓ {} <Blob 0x22371 [14] @> Δ-14 {[«14""»]} <POP 22380-22382 StackAdj> Δ-4 {[«14""»]|[-4-]} <Lit 0x22382 13> {[«14""»]|[$$File is empty]} <Call 0x22394 0x21194> {[«14""»]|[$$File is empty]} <POP 22398-2239c StackAdj> Δ+18 {} <POP 2239c-223aa Naked> Σ0 ↓ →0x223c2 ←0x22326 <MI 2239c MOVEA.L (A6-0xe),A0> {} <MI 223a0 MOVE.B (A0+0x2),D0> {} <MI 223a4 CMPI.B #0x3a,D0> {} <MI 223a8 BNE 0x223c2> {} <POP 223aa-223b4 Naked> Σ0 ↓ →0x223c2 <MI 223aa MOVE.B (A0+0x9),D1> {} <MI 223ae CMPI.B #0x30,D1> {} <MI 223b2 BNE 0x223c2> {} <POP 223b4-223b6 Naked> Σ0 ↓ <MI 223b4 MOVEQ.L #0x01,D6> {} <POP 223b6-223c2 Naked> Σ0 →0x22426 ←0x223d2 <MI 223b6 MOVE.L (A6-0x12),-(A7)> Δ-4 {[4, '(A6-0x12)']} <Call 0x223b8 0x10444> {[4, '(A6-0x12)']} FSCALL_10444 <POP 223be-223c0 StackAdj> Δ+4 {} <MI 223c0 BRA 0x22426> {} <POP 223c2-223c8 Naked> Σ0 ↓ →0x223d6 ←0x2239c ←0x223aa <MI 223c2 CMPI.B #0x53,D0> {} <MI 223c6 BNE 0x223d6> {} <POP 223c8-223d2 Naked> Σ0 ↓ →0x223d6 <MI 223c8 MOVE.B (A0+0x3),D1> {} <MI 223cc CMPI.B #0x33,D1> {} <MI 223d0 BNE 0x223d6> {} <POP 223d2-223d6 Naked> Σ0 →0x223b6 <MI 223d2 MOVEQ.L #0x00,D6> {} <MI 223d4 BRA 0x223b6> {} <POP 223d6-223dc Naked> Σ0 ↓ →0x223ea ←0x223c2 ←0x223c8 <MI 223d6 CMPI.B #0x53,D0> {} <MI 223da BNE 0x223ea> {} <POP 223dc-223e6 Naked> Σ0 ↓ →0x223ea <MI 223dc MOVE.B (A0+0x3),D0> {} <MI 223e0 CMPI.B #0x30,D0> {} <MI 223e4 BNE 0x223ea> {} <POP 223e6-223ea Naked> Σ0 →0x22426 <MI 223e6 MOVEQ.L #0x00,D6> {} <MI 223e8 BRA 0x22426> {} <POP 223ea-22426 Naked> Σ0 ↓ ←0x223d6 ←0x223dc <MI 223ea CLR.B -(A7)> Δ-2 {[#0]} <Const 0x223ec 0x1.2> Δ-2 {[#0]|[#1]} <Const 0x223ee 0x1.4> Δ-4 {[#0]|[#1]|[##1]} <Const 0x223f2 0x25090.4> Δ-4 {[#0]|[#1]|[##1]|[##151696]} <Pointer.fp 0x223f4 <LVAR -0x012 @ 4(r)>> Δ-4 {[#0]|[#1]|[##1]|[##151696]|[@@-18]} <Call 0x223f6 0x1038c> {[#0]|[#1]|[##1]|[##151696]|[@@-18]} CloseFile(a : L; VAR status : B; VAR file : File) <POP 223fc-223fd StackAdj> Δ+16 ↓ {} <Blob 0x223fd [20] @> Δ-20 {[«20""»]} <POP 2240c-2240e StackAdj> Δ-4 {[«20""»]|[-4-]} <Lit 0x2240e 19> {[«20""»]|[$$Invalid file format]} <Call 0x22420 0x21194> {[«20""»]|[$$Invalid file format]} <POP 22424-22426 StackAdj> Δ+24 {} <POP 22426-22434 Naked> Σ0 ↓ ←0x223b6 ←0x223e6 <Pointer.fp 0x22426 <LVAR -0x00e @ 4(r)>> Δ-4 {[@@-14]} <Call 0x2242a 0x102bc> {[@@-14]} FreeString(VAR a : String) <POP 22430-22432 StackAdj> Δ+4 {} <MI 22432 MOVEQ.L #0x00,D7> {} <POP 22434-22456 Naked> Σ0 ↓ →0x22434 ←0x22434 <POP 0x22434 LimitCheck 0x0 ≤ D7 ≤ 0x1fff> {} <MI 2243e MOVE.L D7,D0> {} <MI 22440 ASL.L #0x1,D0> {} <MI 22442 LEA.L 0x25088,A0> {} <MI 22448 CLR.W (A0+D0.L+#0x2a)> {} <MI 2244c ADDQ.L #0x1,D7> {} <MI 2244e CMPI.L #0x00001fff,D7> {} <MI 22454 BLE 0x22434> {} <POP 22456-22466 Naked> Σ0 ↓ →0x2246e <MI 22456 CLR.L 0x250a0> {} <MI 2245c CLR.L 0x250a4> {} <MI 22462 TST.B D6> {} <MI 22464 BEQ 0x2246e> {} <POP 22466-2246e Naked> Σ0 Δ-4 →0x22474 <Pointer.fp 0x22466 <LVAR -0x012 @ 4(r)>> Δ-4 {[@@-18]} <Call 0x22468 0x21bce> {[@@-18]} <MI 2246c BRA 0x22474> {[@@-18]} <POP 2246e-22474 Naked> Σ0 Δ-4 ↓ ←0x22456 <Pointer.fp 0x2246e <LVAR -0x012 @ 4(r)>> Δ-4 {[@@-18]} <Call 0x22470 0x21772> {[@@-18]} <POP 22474-224a0 Naked> Σ-4 Δ+4 ↓ ←0x22466 <POP 22474-22476 StackAdj> Δ+4 {} <MI 22476 CLR.B -(A7)> Δ-2 {[#0]} <Const 0x22478 0x1.2> Δ-2 {[#0]|[#1]} <Const 0x2247a 0x1.4> Δ-4 {[#0]|[#1]|[##1]} <Const 0x2247e 0x25090.4> Δ-4 {[#0]|[#1]|[##1]|[##151696]} <Pointer.fp 0x22480 <LVAR -0x012 @ 4(r)>> Δ-4 {[#0]|[#1]|[##1]|[##151696]|[@@-18]} <Call 0x22482 0x1038c> {[#0]|[#1]|[##1]|[##151696]|[@@-18]} CloseFile(a : L; VAR status : B; VAR file : File) <POP 22488-2248a StackAdj> Δ+12 {[#0]|[#1]} <MI 2248a MOVE.L (A6+0xa),(A7)> {[4, '(A6+0xa)']} <MI 2248e MOVE.B D6,D0> {[4, '(A6+0xa)']} <MI 22490 EXTB.W D0> {[4, '(A6+0xa)']} <POP 0x22492 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[4, '(A6+0xa)']} <MI 22494 MOVE.B D0,-(A7)> Δ-2 {[4, '(A6+0xa)']|[2, 'D0']} <MI 22496 MOVE.B (A6+0x8),-(A7)> Δ-2 {[4, '(A6+0xa)']|[2, 'D0']|[2, '(A6+0x8)']} <Call 0x2249a 0x21d06> {[4, '(A6+0xa)']|[2, 'D0']|[2, '(A6+0x8)']} <POP 2249e-224a0 StackAdj> Δ+8 {} <POP 224a0-224a8 Epilogue> Σ0
@ 224a8 <LVAR 0x00c 2(w)> <LVAR 0x008 4(r)> <LVAR -0x004 @ 2(r)> <POP 224a8-224e8 Body> <POP 224a8-224be Prologue> Σ0 ↓ <POP 224be-224c2 RegCacheLoad> Σ0 ↓ <POP 224c2-224e0 Naked> Σ0 ↓ <MI 224c2 CLR.W (A6-0x4)> {} <MI 224c4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']} <MI 224c8 LEA.L (A6-0x4),A0> {[4, '(A6+0x8)']} <MI 224ca MOVE.L A0,-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, 'A0']} <MI 224cc ADDQ.L #0x1,(A7)> {[4, '(A6+0x8)']|[-4-]} <Const 0x224ce 0x1.2> Δ-2 {[4, '(A6+0x8)']|[-4-]|[#1]} <Call 0x224d2 0x10238> {[4, '(A6+0x8)']|[-4-]|[#1]} KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) <POP 224d8-224dc StackAdj> Δ+10 {} <MI 224dc MOVE.W (A6-0x4),(A6+0xc)> {} <POP 224e0-224e8 Epilogue> Σ0
@ 224e8 <LVAR 0x00a 4(r)> <LVAR 0x008 @ 2(r)> <POP 224e8-2254c Body> <POP 224e8-224fe Prologue> Σ0 ↓ <POP 224fe-22500 RegCacheLoad> Σ0 ↓ <POP 22500-2251a Naked> Σ0 ↓ →0x22544 <POP 22500-22502 StackAdj> Δ-2 {[-2-]} <MI 22502 MOVE.L (A6+0xa),-(A7)> Δ-4 {[-2-]|[4, '(A6+0xa)']} <Call 0x22506 0x224a8> {[-2-]|[4, '(A6+0xa)']} <POP 2250a-2250c StackAdj> Δ+4 {[-2-]} <MI 2250c MOVE.W (A7)+,D0> Δ+2 {} <POP 0x2250e LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 22512 MOVE.W D0,D7> {} <MI 22514 CMP.W (A6+0x8),D7> {} <MI 22518 BEQ 0x22544> {} <POP 2251a-22544 Naked> Σ0 ↓ <MI 2251a LEA.L (A6+0x8),A0> {} <MI 2251e MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']} <MI 22520 ADDQ.L #0x1,(A7)> {[-4-]} <MI 22522 MOVE.L (A6+0xa),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xa)']} <Const 0x22526 0x1.2> Δ-2 {[-4-]|[4, '(A6+0xa)']|[#1]} <Call 0x22528 0x10238> {[-4-]|[4, '(A6+0xa)']|[#1]} KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) <POP 2252e-22532 StackAdj> Δ+10 {} <Const 0x22532 0x1d4.4> Δ-4 {[##468]} <Call 0x22536 0x10224> {[##468]} KC12_Sleep(dur: Long) <POP 2253c-2253e StackAdj> Δ+4 {} <MI 2253e MOVE.B #0x01,0x25096> {} <POP 22544-2254c Epilogue> Σ0 ←0x22500
@ 2254c <LVAR 0x00a 4(r)> <POP 2254c-22584 Body> <POP 2254c-22562 Prologue> Σ0 ↓ <POP 22562-22566 RegCacheLoad> Σ0 ↓ <POP 22566-2257c Naked> Σ0 ↓ <MI 22566 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']} <MI 22568 ADDQ.L #0x1,(A7)> {[-4-]} <MI 2256a MOVE.L (A6+0xa),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xa)']} <Const 0x2256e 0x1.2> Δ-2 {[-4-]|[4, '(A6+0xa)']|[#1]} <Call 0x22572 0x10238> {[-4-]|[4, '(A6+0xa)']|[#1]} KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) <POP 22578-2257c StackAdj> Δ+10 {} <POP 2257c-22584 Epilogue> Σ0
@ 22584 <LVAR 0x008 4(r)> <POP 22584-2288a Body> <POP 22584-2259a Prologue> Σ0 ↓ <POP 2259a-225a0 RegCacheLoad> Σ0 ↓ <POP 225a0-225b8 Naked> Σ0 ↓ →0x2280e <MI 225a0 MOVE.L (A6+0x8),D6> {} <MI 225a4 SUBQ.L #0x5,D6> {} <POP 225a6-225a8 StackAdj> Δ-2 {[-2-]} <MI 225a8 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']} <Call 0x225aa 0x224a8> {[-2-]|[4, 'D6']} <POP 225ae-225b0 StackAdj> Δ+4 {[-2-]} <MI 225b0 MOVE.W (A7)+,D0> Δ+2 {} <MI 225b2 CMP.W #0xff,D0> {} <MI 225b4 BHI 0x2280e> {} <POP 225b8-225c2 Naked> Σ0 →0x227c2 →0x227c6 →0x2280e →0x227ca →0x2280e →0x2280e →0x2280e →0x227ce →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x227d0 →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x227d4 →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x227d8 →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x227dc →0x2280a →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x22804 →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x227fe →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x227f8 →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x2280e →0x227f2 →0x2280e →0x2280e →0x2280e →0x227ec →0x2280e →0x227e6 →0x227e0 <MI 225b8 ADD.W D0,D0> {} <MI 225ba SWITCH D0.W> {} <POP 227c2-227c6 Naked> Σ0 →0x22810 ←0x225b8 <MI 227c2 MOVEQ.L #0x01,D7> {} <MI 227c4 BRA 0x22810> {} <POP 227c6-227ca Naked> Σ0 →0x22810 ←0x225b8 <MI 227c6 MOVEQ.L #0x03,D7> {} <MI 227c8 BRA 0x22810> {} <POP 227ca-227ce Naked> Σ0 →0x22810 ←0x225b8 <MI 227ca MOVEQ.L #0x07,D7> {} <MI 227cc BRA 0x22810> {} <POP 227ce-227d0 Naked> Σ0 →0x2280e ←0x225b8 <MI 227ce BRA 0x2280e> {} <POP 227d0-227d4 Naked> Σ0 →0x22810 ←0x225b8 <MI 227d0 MOVEQ.L #0x1f,D7> {} <MI 227d2 BRA 0x22810> {} <POP 227d4-227d8 Naked> Σ0 →0x22810 ←0x225b8 <MI 227d4 MOVEQ.L #0x3f,D7> {} <MI 227d6 BRA 0x22810> {} <POP 227d8-227dc Naked> Σ0 →0x22810 ←0x225b8 <MI 227d8 MOVEQ.L #0x7f,D7> {} <MI 227da BRA 0x22810> {} <POP 227dc-227e0 Naked> Σ0 →0x22810 ←0x225b8 <MI 227dc MOVE.W #0xff,D7> {} <MI 227de BRA 0x22810> {} <POP 227e0-227e6 Naked> Σ0 →0x22810 ←0x225b8 <MI 227e0 MOVE.W #0xfe,D7> {} <MI 227e4 BRA 0x22810> {} <POP 227e6-227ec Naked> Σ0 →0x22810 ←0x225b8 <MI 227e6 MOVE.W #0xfc,D7> {} <MI 227ea BRA 0x22810> {} <POP 227ec-227f2 Naked> Σ0 →0x22810 ←0x225b8 <MI 227ec MOVE.W #0xf8,D7> {} <MI 227f0 BRA 0x22810> {} <POP 227f2-227f8 Naked> Σ0 →0x22810 ←0x225b8 <MI 227f2 MOVE.W #0xf0,D7> {} <MI 227f6 BRA 0x22810> {} <POP 227f8-227fe Naked> Σ0 →0x22810 ←0x225b8 <MI 227f8 MOVE.W #0xe0,D7> {} <MI 227fc BRA 0x22810> {} <POP 227fe-22804 Naked> Σ0 →0x22810 ←0x225b8 <MI 227fe MOVE.W #0xc0,D7> {} <MI 22802 BRA 0x22810> {} <POP 22804-2280a Naked> Σ0 →0x22810 ←0x225b8 <MI 22804 MOVE.W #0x80,D7> {} <MI 22808 BRA 0x22810> {} <POP 2280a-2280e Naked> Σ0 →0x22810 ←0x225b8 <MI 2280a MOVEQ.L #0x00,D7> {} <MI 2280c BRA 0x22810> {} <POP 2280e-22810 Naked> Σ0 ↓ ←0x225a0 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x225b8 ←0x227ce <MI 2280e MOVEQ.L #0x0f,D7> {} <POP 22810-22826 Naked> Σ0 ↓ →0x22852 ←0x227c2 ←0x227c6 ←0x227ca ←0x227d0 ←0x227d4 ←0x227d8 ←0x227dc ←0x227e0 ←0x227e6 ←0x227ec ←0x227f2 ←0x227f8 ←0x227fe ←0x22804 ←0x2280a <MI 22810 MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']} <POP 0x22812 LimitCheck 0x0 ≤ D7 ≤ 0xff> {[4, 'D6']} <MI 22814 MOVE.W D7,-(A7)> Δ-2 {[4, 'D6']|[2, 'D7']} <Call 0x22816 0x224e8> {[4, 'D6']|[2, 'D7']} <MI 2281a MOVE.L D6,(A7)> {[-2-]|[4, 'D6']} <Call 0x2281c 0x224a8> {[-2-]|[4, 'D6']} <POP 22820-22822 StackAdj> Δ+4 {[-2-]} <MI 22822 CMP.W (A7)+,D7> Δ+2 {} <MI 22824 BEQ 0x22852> {} <POP 22826-22852 Naked> Σ0 →0x22882 <Blob 0x22826 [36] @> Δ-36 {[«36""»]} <POP 22832-22834 StackAdj> Δ-4 {[«36""»]|[-4-]} <Lit 0x22834 36> {[«36""»]|[$$*** ERROR: test of EEPROM failed ***]} <Call 0x22846 0x103e0> {[«36""»]|[$$*** ERROR: test of EEPROM failed ***]} WriteConsoleStringCrLf(str : String) <POP 2284c-22850 StackAdj> Δ+40 {} <MI 22850 BRA 0x22882> {} <POP 22852-22882 Naked> Σ0 ↓ ←0x22810 <Blob 0x22852 [22] @> Δ-22 {[«22""»]} <POP 22864-22866 StackAdj> Δ-4 {[«22""»]|[-4-]} <Lit 0x22866 21> {[«22""»]|[$$test of EEPROM passed]} <Call 0x22878 0x103e0> {[«22""»]|[$$test of EEPROM passed]} WriteConsoleStringCrLf(str : String) <POP 2287e-22882 StackAdj> Δ+26 {} <POP 22882-2288a Epilogue> Σ0 ←0x22826
@ 2288a <POP 2288a-22990 Body> <POP 2288a-228a0 Prologue> Σ0 ↓ <POP 228a0-228b2 RegCacheLoad> Σ0 ↓ <POP 228b2-22988 Naked> Σ0 ↓ <Blob 0x228b2 [26] @> Δ-26 {[«26""»]} <Blob 0x228c4 [16] @> Δ-16 {[«26""»]|[«16""»]} <POP 228d6-228d8 StackAdj> Δ-8 {[«26""»]|[«16""»]|[-8-]} <Lit 0x228d8 25> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]} <POP 228e8-228ea StackAdj> Δ-10 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-10-]} <MI 228ea MOVE.L 0x250a8,D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-10-]} <MI 228ec ADD.L 0x250ac,D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-10-]} <MI 228ee SUBQ.L #0x4,D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-10-]} <MI 228f0 MOVE.L D0,-(A7)> Δ-4 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-10-]|[4, 'D0']} <Call 0x228f2 0x224a8> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-10-]|[4, 'D0']} <POP 228f4-228f6 StackAdj> Δ+4 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-10-]} <MI 228f6 MOVE.W (A7)+,D0> Δ+2 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-8-]} <MI 228f8 EXTW.L D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-8-]} <MI 228fa MOVE.L D0,(A7)> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']} <Const 0x228fc 0x2.4> Δ-4 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[##2]} <Call 0x22900 0x102e8> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 22906-22908 StackAdj> Δ-2 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[##2]|[-2-]} <MI 22908 MOVE.L 0x250a8,D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[##2]|[-2-]} <MI 2290a ADD.L 0x250ac,D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[##2]|[-2-]} <MI 2290c SUBQ.L #0x3,D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[##2]|[-2-]} <MI 2290e MOVE.L D0,-(A7)> Δ-4 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[##2]|[-2-]|[4, 'D0']} <Call 0x22910 0x224a8> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[##2]|[-2-]|[4, 'D0']} <POP 22912-22914 StackAdj> Δ+4 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[##2]|[-2-]} <MI 22914 MOVE.W (A7)+,D0> Δ+2 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[##2]} <MI 22916 EXTW.L D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[##2]} <MI 22918 MOVE.L D0,(A7)> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']} <Const 0x2291a 0x2.4> Δ-4 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[##2]} <Call 0x2291e 0x102e8> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 22924-22926 StackAdj> Δ-2 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[##2]|[-2-]} <MI 22926 MOVE.L 0x250a8,D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[##2]|[-2-]} <MI 22928 ADD.L 0x250ac,D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[##2]|[-2-]} <MI 2292a SUBQ.L #0x2,D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[##2]|[-2-]} <MI 2292c MOVE.L D0,-(A7)> Δ-4 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[##2]|[-2-]|[4, 'D0']} <Call 0x2292e 0x224a8> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[##2]|[-2-]|[4, 'D0']} <POP 22930-22932 StackAdj> Δ+4 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[##2]|[-2-]} <MI 22932 MOVE.W (A7)+,D0> Δ+2 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[##2]} <MI 22934 EXTW.L D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[##2]} <MI 22936 MOVE.L D0,(A7)> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[4, 'D0']} <Const 0x22938 0x2.4> Δ-4 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[4, 'D0']|[##2]} <Call 0x2293c 0x102e8> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[4, 'D0']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 22942-22944 StackAdj> Δ+4 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[4, 'D0']} <Lit 0x22944 15> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]} <POP 22954-22956 StackAdj> Δ-10 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-10-]} <MI 22956 MOVE.L 0x250a8,D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-10-]} <MI 22958 ADD.L 0x250ac,D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-10-]} <MI 2295a SUBQ.L #0x1,D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-10-]} <MI 2295c MOVE.L D0,-(A7)> Δ-4 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-10-]|[4, 'D0']} <Call 0x2295e 0x224a8> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-10-]|[4, 'D0']} <POP 22960-22962 StackAdj> Δ+4 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-10-]} <MI 22962 MOVE.W (A7)+,D0> Δ+2 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-8-]} <MI 22964 EXTW.L D0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-8-]} <MI 22966 MOVE.L D0,(A7)> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-4-]|[4, 'D0']} <Const 0x22968 0x2.4> Δ-4 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-4-]|[4, 'D0']|[##2]} <Call 0x2296c 0x102e8> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-4-]|[4, 'D0']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 22972-22974 StackAdj> Δ+8 {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-4-]} <Call 0x22974 0x102e0> {[«26""»]|[«16""»]|[-4-]|[$$in prom: revision date =_]|[-4-]|[4, 'D0']|[4, 'D0']|[$$, locus byte =_]|[-4-]} StringCat6(a, b, c, d, e, f : String) : String <POP 2297a-2297e StackAdj> Δ+24 {[«26""»]|[«16""»]|[-4-]} <Call 0x2297e 0x103e0> {[«26""»]|[«16""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 22984-22988 StackAdj> Δ+46 {} <POP 22988-22990 Epilogue> Σ0
@ 22990 <LVAR 0x008 4(r)> <POP 22990-22a52 Body> <POP 22990-229a6 Prologue> Σ0 ↓ <POP 229a6-229b2 RegCacheLoad> Σ0 ↓ <POP 229b2-229cc Naked> Σ0 ↓ →0x229fe <POP 229b2-229b4 StackAdj> Δ-2 {[-2-]} <MI 229b4 MOVE.L 0x250a8,D0> {[-2-]} <MI 229b6 ADD.L 0x250ac,D0> {[-2-]} <MI 229b8 SUBQ.L #0x1,D0> {[-2-]} <MI 229ba MOVE.L D0,-(A7)> Δ-4 {[-2-]|[4, 'D0']} <Call 0x229bc 0x224a8> {[-2-]|[4, 'D0']} <POP 229c0-229c2 StackAdj> Δ+4 {[-2-]} <MI 229c2 MOVE.W 0x250b0,D0> {[-2-]} <MI 229c8 CMP.W (A7)+,D0> Δ+2 {} <MI 229ca BEQ 0x229fe> {} <POP 229cc-229fe Naked> Σ0 ↓ <Blob 0x229cc [48] @> Δ-48 {[«48""»]} <POP 229de-229e0 StackAdj> Δ-4 {[«48""»]|[-4-]} <Lit 0x229e0 47> {[«48""»]|[$$WARNING: the EEPROM has an incorrect LOCUS byte]} <Call 0x229f4 0x103e0> {[«48""»]|[$$WARNING: the EEPROM has an incorrect LOCUS byte]} WriteConsoleStringCrLf(str : String) <POP 229fa-229fe StackAdj> Δ+52 {} <POP 229fe-22a0a Naked> Σ0 Δ-4 ↓ ←0x229b2 <MI 229fe MOVEA.L (A6+0x8),A0> {} <MI 22a02 CLR.L (A0)> {} <Blob 0x22a04 [4] 0x250ac> Δ-4 {[«4»]} <MI 22a06 SUBQ.L #0x1,(A7)> {[-4-]} <MI 22a08 MOVEQ.L #0x00,D7> {[-4-]} <POP 22a0a-22a0e Naked> Σ-4 ↓ →0x22a48 ←0x22a44 <MI 22a0a CMP.L (A7),D7> {[-4-]} <MI 22a0c BGT 0x22a48> {[-4-]} <POP 22a0e-22a36 Naked> Σ-4 ↓ →0x22a44 <POP 22a0e-22a10 StackAdj> Δ-2 {[-6-]} <Blob 0x22a10 [4] 0x250a8> Δ-4 {[-6-]|[«4»]} <MI 22a12 ADD.L D7,(A7)> {[-10-]} <Call 0x22a14 0x224a8> {[-10-]} <POP 22a18-22a1a StackAdj> Δ+4 {[-6-]} <POP 0x22a1a LimitCheck 0x0 ≤ D7 ≤ 0x1fff> {[-6-]} <MI 22a24 MOVE.L D7,D0> {[-6-]} <MI 22a26 ASL.L #0x1,D0> {[-6-]} <MI 22a28 LEA.L 0x25088,A0> {[-6-]} <MI 22a2e MOVE.W (A7)+,D1> Δ+2 {[-4-]} <MI 22a30 CMP.W (A0+D0.L+#0x2a),D1> {[-4-]} <MI 22a34 BEQ 0x22a44> {[-4-]} <POP 22a36-22a3e Naked> Σ-4 ↓ →0x22a44 <MI 22a36 MOVE.L 0x250ac,D0> {[-4-]} <MI 22a38 SUBQ.L #0x5,D0> {[-4-]} <MI 22a3a CMP.L D0,D7> {[-4-]} <MI 22a3c BEQ 0x22a44> {[-4-]} <POP 22a3e-22a44 Naked> Σ-4 ↓ <MI 22a3e MOVEA.L (A6+0x8),A0> {[-4-]} <MI 22a42 ADDQ.L #0x1,(A0)> {[-4-]} <POP 22a44-22a48 Naked> Σ-4 ↓ →0x22a0a ←0x22a0e ←0x22a36 <MI 22a44 ADDQ.L #0x1,D7> {[-4-]} <MI 22a46 BVC 0x22a0a> {[-4-]} <POP 22a48-22a4a Naked> Σ-4 Δ+4 ↓ ←0x22a0a <POP 22a48-22a4a StackAdj> Δ+4 {} <POP 22a4a-22a52 Epilogue> Σ0
@ 22a52 <LVAR 0x008 4(r)> <LVAR -0x004 @ 4(r)> <POP 22a52-22bc6 Body> <POP 22a52-22a68 Prologue> Σ0 ↓ <POP 22a68-22a86 RegCacheLoad> Σ0 ↓ <POP 22a86-22aa6 Naked> Σ0 ↓ →0x22ae8 <MI 22a86 MOVE.W 0x250b0,D0> {} <MI 22a8c SUBI.W #0x0050,D0> {} <MI 22a90 EXTW.L D0> {} <MI 22a92 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']} <Pointer.fp 0x22a94 <LVAR -0x004 @ 4(r)>> Δ-4 {[4, 'D0']|[@@-4]} <Call 0x22a98 0x24e0a> {[4, 'D0']|[@@-4]} <POP 22a9e-22aa0 StackAdj> Δ+8 {} <MI 22aa0 TST.L (A6-0x4)> {} <MI 22aa4 BEQ 0x22ae8> {} <POP 22aa6-22ae8 Naked> Σ0 ↓ <Blob 0x22aa6 [28] @> Δ-28 {[«28""»]} <POP 22ab8-22aba StackAdj> Δ-8 {[«28""»]|[-8-]} <Lit 0x22aba 27> {[«28""»]|[-4-]|[$$Warning from REE_DOWNLOAD:_]} <MI 22acc MOVE.L (A6-0x4),(A7)> {[«28""»]|[-4-]|[4, '(A6-0x4)']} <POP 22ac6-22acc StackAdj> Δ-8 {[«28""»]|[-4-]|[4, '(A6-0x4)']|[-8-]} <Call 0x22ad0 0x2101a> {[«28""»]|[-4-]|[4, '(A6-0x4)']|[-8-]} <POP 22ad4-22ad6 StackAdj> Δ+4 {[«28""»]|[-4-]|[4, '(A6-0x4)']|[-4-]} <Call 0x22ad6 0x102d0> {[«28""»]|[-4-]|[4, '(A6-0x4)']|[-4-]} StringCat2(a, b : String) : String <POP 22adc-22ade StackAdj> Δ+8 {[«28""»]|[-4-]} <Call 0x22ade 0x103e0> {[«28""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 22ae4-22ae8 StackAdj> Δ+32 {} <POP 22ae8-22af6 Naked> Σ0 ↓ →0x22b2e ←0x22a86 <POP 22ae8-22aea StackAdj> Δ-4 {[-4-]} <Call 0x22aea 0x24d8c> {[-4-]} <MI 22af0 MOVE.L (A7)+,D6> Δ+4 {} <MI 22af2 CMP.L 0x250a8,D6> {} <MI 22af4 BCS 0x22b2e> {} <POP 22af6-22afe Naked> Σ0 ↓ →0x22b2e <MI 22af6 MOVE.L 0x250a8,D0> {} <MI 22af8 ADD.L 0x250ac,D0> {} <MI 22afa CMP.L D0,D6> {} <MI 22afc BHI 0x22b2e> {} <POP 22afe-22b00 Naked> Σ0 ↓ <MI 22afe MOVEQ.L #0x00,D7> {} <POP 22b00-22b2e Naked> Σ0 ↓ →0x22b00 ←0x22b00 <MI 22b00 MOVE.L D6,D0> {} <MI 22b02 ADD.L D7,D0> {} <MI 22b04 MOVE.L D0,D1> {} <MI 22b06 AND.L #0x1fff,D1> {} <POP 0x22b08 LimitCheck 0x0 ≤ D1 ≤ 0x1fff> {} <MI 22b0e ASL.L #0x1,D1> {} <MI 22b10 LEA.L 0x25088,A0> {} <POP 22b12-22b14 StackAdj> Δ-2 {[-2-]} <MI 22b14 MOVE.L D0,-(A7)> Δ-4 {[-2-]|[4, 'D0']} <Call 0x22b16 0x224a8> {[-2-]|[4, 'D0']} <POP 22b1a-22b1c StackAdj> Δ+4 {[-2-]} <MI 22b1c MOVE.W (A7)+,D0> Δ+2 {} <POP 0x22b1e LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 22b20 MOVE.W D0,(A0+D1.L+#0x2a)> {} <MI 22b24 ADDQ.L #0x1,D7> {} <MI 22b26 CMPI.L #0x00000005,D7> {} <MI 22b2c BLE 0x22b00> {} <POP 22b2e-22b3c Naked> Σ0 ↓ →0x22b70 ←0x22ae8 ←0x22af6 <POP 22b2e-22b30 StackAdj> Δ-4 {[-4-]} <Call 0x22b30 0x24db6> {[-4-]} <MI 22b36 MOVE.L (A7)+,D6> Δ+4 {} <MI 22b38 CMP.L 0x250a8,D6> {} <MI 22b3a BCS 0x22b70> {} <POP 22b3c-22b44 Naked> Σ0 ↓ →0x22b70 <MI 22b3c MOVE.L 0x250a8,D0> {} <MI 22b3e ADD.L 0x250ac,D0> {} <MI 22b40 CMP.L D0,D6> {} <MI 22b42 BHI 0x22b70> {} <POP 22b44-22b46 Naked> Σ0 ↓ <MI 22b44 MOVEQ.L #0x00,D7> {} <POP 22b46-22b70 Naked> Σ0 ↓ →0x22b46 ←0x22b46 <MI 22b46 MOVE.L D6,D0> {} <MI 22b48 ADD.L D7,D0> {} <MI 22b4a MOVE.L D0,D1> {} <MI 22b4c AND.L #0x1fff,D1> {} <POP 0x22b4e LimitCheck 0x0 ≤ D1 ≤ 0x1fff> {} <MI 22b54 ASL.L #0x1,D1> {} <MI 22b56 LEA.L 0x25088,A0> {} <POP 22b58-22b5a StackAdj> Δ-2 {[-2-]} <MI 22b5a MOVE.L D0,-(A7)> Δ-4 {[-2-]|[4, 'D0']} <Call 0x22b5c 0x224a8> {[-2-]|[4, 'D0']} <POP 22b60-22b62 StackAdj> Δ+4 {[-2-]} <MI 22b62 MOVE.W (A7)+,D0> Δ+2 {} <POP 0x22b64 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 22b66 MOVE.W D0,(A0+D1.L+#0x2a)> {} <MI 22b6a ADDQ.L #0x1,D7> {} <MI 22b6c CMP.L #0x07,D7> {} <MI 22b6e BLE 0x22b46> {} <POP 22b70-22b7e Naked> Σ0 ↓ →0x22bb2 ←0x22b2e ←0x22b3c <POP 22b70-22b72 StackAdj> Δ-4 {[-4-]} <Call 0x22b72 0x24de0> {[-4-]} <MI 22b78 MOVE.L (A7)+,D6> Δ+4 {} <MI 22b7a CMP.L 0x250a8,D6> {} <MI 22b7c BCS 0x22bb2> {} <POP 22b7e-22b86 Naked> Σ0 ↓ →0x22bb2 <MI 22b7e MOVE.L 0x250a8,D0> {} <MI 22b80 ADD.L 0x250ac,D0> {} <MI 22b82 CMP.L D0,D6> {} <MI 22b84 BHI 0x22bb2> {} <POP 22b86-22b88 Naked> Σ0 ↓ <MI 22b86 MOVEQ.L #0x00,D7> {} <POP 22b88-22bb2 Naked> Σ0 ↓ →0x22b88 ←0x22b88 <MI 22b88 MOVE.L D6,D0> {} <MI 22b8a ADD.L D7,D0> {} <MI 22b8c MOVE.L D0,D1> {} <MI 22b8e AND.L #0x1fff,D1> {} <POP 0x22b90 LimitCheck 0x0 ≤ D1 ≤ 0x1fff> {} <MI 22b96 ASL.L #0x1,D1> {} <MI 22b98 LEA.L 0x25088,A0> {} <POP 22b9a-22b9c StackAdj> Δ-2 {[-2-]} <MI 22b9c MOVE.L D0,-(A7)> Δ-4 {[-2-]|[4, 'D0']} <Call 0x22b9e 0x224a8> {[-2-]|[4, 'D0']} <POP 22ba2-22ba4 StackAdj> Δ+4 {[-2-]} <MI 22ba4 MOVE.W (A7)+,D0> Δ+2 {} <POP 0x22ba6 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 22ba8 MOVE.W D0,(A0+D1.L+#0x2a)> {} <MI 22bac ADDQ.L #0x1,D7> {} <MI 22bae CMP.L #0x07,D7> {} <MI 22bb0 BLE 0x22b88> {} <POP 22bb2-22bbe Naked> Σ0 ↓ ←0x22b70 ←0x22b7e <MI 22bb2 MOVEA.L (A6+0x8),A0> {} <MI 22bb6 PEA.L (A0)> Δ-4 {[4, '^(A0)']} <Call 0x22bb8 0x22990> {[4, '^(A0)']} <POP 22bbc-22bbe StackAdj> Δ+4 {} <POP 22bbe-22bc6 Epilogue> Σ0
@ 22bc6 <LVAR 0x00a 4(r)> <LVAR 0x008 2(r)> <LVAR -0x006 @ 4(r)> <POP 22bc6-22c94 Body> Δ+4 <POP 22bc6-22bdc Prologue> Σ0 ↓ <POP 22bdc-22be2 RegCacheLoad> Σ0 ↓ <POP 22be2-22c06 Naked> Σ0 ↓ →0x22c0e <MI 22be2 MOVE.L (A6+0xa),-(A7)> Δ-4 {[4, '(A6+0xa)']} <MI 22be6 MOVE.W (A6+0x8),D0> {[4, '(A6+0xa)']} <MI 22bea EXTW.L D0> {[4, '(A6+0xa)']} <MI 22bec MOVE.L D0,-(A7)> Δ-4 {[4, '(A6+0xa)']|[4, 'D0']} <Const 0x22bee 0x1.2> Δ-2 {[4, '(A6+0xa)']|[4, 'D0']|[#1]} <Call 0x22bf0 0x2227a> {[4, '(A6+0xa)']|[4, 'D0']|[#1]} <POP 22bf4-22bf8 StackAdj> Δ+10 {} <Call 0x22bf8 0x2288a> {} <MI 22bfc MOVE.W (A6+0x8),D0> {} <MI 22c00 CMPI.W #0x0050,D0> {} <MI 22c04 BGE 0x22c0e> {} <POP 22c06-22c0e Naked> Σ0 Δ-4 →0x22c14 <Pointer.fp 0x22c06 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]} <Call 0x22c08 0x22990> {[@@-6]} <MI 22c0c BRA 0x22c14> {[@@-6]} <POP 22c0e-22c14 Naked> Σ0 Δ-4 ↓ ←0x22be2 <Pointer.fp 0x22c0e <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]} <Call 0x22c10 0x22a52> {[@@-6]} <POP 22c14-22c1a Naked> Σ-4 Δ+4 ↓ →0x22c4c ←0x22c06 <POP 22c14-22c16 StackAdj> Δ+4 {} <MI 22c16 TST.L (A6-0x6)> {} <MI 22c18 BNE 0x22c4c> {} <POP 22c1a-22c4c Naked> Σ0 →0x22c86 <Blob 0x22c1a [20] @> Δ-20 {[«20""»]} <POP 22c2c-22c2e StackAdj> Δ-4 {[«20""»]|[-4-]} <Lit 0x22c2e 19> {[«20""»]|[$$EEPROM matched file]} <Call 0x22c40 0x103e0> {[«20""»]|[$$EEPROM matched file]} WriteConsoleStringCrLf(str : String) <POP 22c46-22c4a StackAdj> Δ+24 {} <MI 22c4a BRA 0x22c86> {} <POP 22c4c-22c86 Naked> Σ0 ↓ ←0x22c14 <Blob 0x22c4c [48] @> Δ-48 {[«48""»]} <POP 22c58-22c5a StackAdj> Δ-8 {[«48""»]|[-8-]} <MI 22c5a MOVE.L (A6-0x6),-(A7)> Δ-4 {[«48""»]|[-8-]|[4, '(A6-0x6)']} <Call 0x22c5c 0x102e4> {[«48""»]|[-8-]|[4, '(A6-0x6)']} Long2String(a : Long) : String <Lit 0x22c62 48> {[«48""»]|[-8-]|[$$ differing bytes were found (excluding checksum)]} <Call 0x22c74 0x102d0> {[«48""»]|[-8-]|[$$ differing bytes were found (excluding checksum)]} StringCat2(a, b : String) : String <POP 22c7a-22c7c StackAdj> Δ+8 {[«48""»]|[-4-]} <Call 0x22c7c 0x103e0> {[«48""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 22c82-22c86 StackAdj> Δ+52 {} <POP 22c86-22c8c Naked> Σ0 ↓ ←0x22c1a <Call 0x22c86 0x103dc> {} WriteConsoleCrLf(void) <POP 22c8c-22c94 Epilogue> Σ0
@ 22c94 <LVAR 0x008 2(r)> <LVAR -0x006 @> <LVAR -0x00a @ 4(r)> <POP 22c94-22cfc Body> <POP 22c94-22ca6 Prologue> Σ0 ↓ <POP 22ca6-22cf8 Naked> Σ0 ↓ <MI 22ca6 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']} <Pointer.fp 0x22caa <LVAR -0x006 @>> Δ-4 {[2, '(A6+0x8)']|[@@-6]} <Pointer.fp 0x22cae <LVAR -0x00a @ 4(r)>> Δ-4 {[2, '(A6+0x8)']|[@@-6]|[@@-10]} <Call 0x22cb2 0x21388> {[2, '(A6+0x8)']|[@@-6]|[@@-10]} <POP 22cb6-22cb8 StackAdj> Δ+6 {[2, '(A6+0x8)']|[-2-]} <POP 22cb8-22cb9 StackAdj> Δ+4 {} <Blob 0x22cb9 [4] @> Δ-4 {[«4""»]} <Blob 0x22cbc [4] @> Δ-4 {[«4""»]|[«4""»]} <POP 22cc0-22cc2 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]} <MI 22cc2 MOVE.L (A6-0xa),-(A7)> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, '(A6-0xa)']} <POP 22cc6-22cc8 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, '(A6-0xa)']|[-4-]} <Lit 0x22cc8 8> {[«4""»]|[«4""»]|[-4-]|[4, '(A6-0xa)']|[$$ EEPROM:]} <Call 0x22cdc 0x102d0> {[«4""»]|[«4""»]|[-4-]|[4, '(A6-0xa)']|[$$ EEPROM:]} StringCat2(a, b : String) : String <POP 22ce2-22ce4 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]} <Call 0x22ce4 0x103d8> {[«4""»]|[«4""»]|[-4-]} WriteConsoleString(str : String) <POP 22cea-22cec StackAdj> Δ+8 {[«4""»]} <MI 22cec MOVE.L (A4),(A7)> {[4, '(A4)']} <MI 22cee MOVE.W (A6+0x8),-(A7)> Δ-2 {[4, '(A4)']|[2, '(A6+0x8)']} <Call 0x22cf2 0x22bc6> {[4, '(A4)']|[2, '(A6+0x8)']} <POP 22cf6-22cf8 StackAdj> Δ+6 {} <POP 22cf8-22cfc Epilogue> Σ0
@ 22cfc <LVAR 0x008 1(r)> <LVAR -0x006 @ 4(rw)> <LVAR -0x00a @ 4(rw)> <POP 22cfc-22dfa Body> Δ+2 <POP 22cfc-22d12 Prologue> Σ0 ↓ <POP 22d12-22d20 RegCacheLoad> Σ0 ↓ <POP 22d20-22d26 Naked> Σ0 ↓ →0x22d2e <MI 22d20 TST.B (A6+0x8)> {} <MI 22d24 BEQ 0x22d2e> {} <POP 22d26-22d2e Naked> Σ0 →0x22d34 <MI 22d26 MOVE.L 0x290b8,(A6-0xa)> {} <MI 22d2c BRA 0x22d34> {} <POP 22d2e-22d34 Naked> Σ0 ↓ ←0x22d20 <MI 22d2e MOVE.L 0x290b4,(A6-0xa)> {} <POP 22d34-22d96 Naked> Σ0 ↓ →0x22d9c ←0x22d26 <Blob 0x22d34 [22] @> Δ-22 {[«22""»]} <Blob 0x22d46 [4] @> Δ-4 {[«22""»]|[«4""»]} <POP 22d4a-22d4c StackAdj> Δ-12 {[«22""»]|[«4""»]|[-12-]} <Lit 0x22d4c 21> {[«22""»]|[«4""»]|[-8-]|[$$enter prom filename []} <MI 22d5a MOVE.L (A6-0xa),(A7)> {[«22""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']} <POP 22d54-22d5a StackAdj> Δ-8 {[«22""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']|[-8-]} <Call 0x22d5c 0x102cc> {[«22""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']|[-8-]} StringDup(a : String) : String <Lit 0x22d62 4> {[«22""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']|[-4-]|[$$] :_]} <Call 0x22d74 0x102d4> {[«22""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']|[-4-]|[$$] :_]} StringCat3(a, b, c : String) : String <POP 22d7a-22d7c StackAdj> Δ+12 {[«22""»]|[«4""»]|[-8-]} <Call 0x22d7c 0x103e4> {[«22""»]|[«4""»]|[-8-]} AskConsoleString(prompt : String) : String <POP 22d82-22d84 StackAdj> Δ+4 {[«22""»]|[«4""»]|[-4-]} <MI 22d84 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«22""»]|[«4""»]} <POP 22d88-22d8c StackAdj> Δ+26 {} <MI 22d8c MOVEA.L (A6-0x6),A0> {} <MI 22d90 MOVE.W (A0),D0> {} <MI 22d92 CMP.W #0x01,D0> {} <MI 22d94 BLE 0x22d9c> {} <POP 22d96-22d9c Naked> Σ0 →0x22da8 <MI 22d96 MOVE.L (A6-0x6),(A6-0xa)> {} <MI 22d9a BRA 0x22da8> {} <POP 22d9c-22da8 Naked> Σ0 ↓ ←0x22d34 <Pointer.fp 0x22d9c <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]} <Call 0x22da0 0x102bc> {[@@-6]} FreeString(VAR a : String) <POP 22da6-22da8 StackAdj> Δ+4 {} <POP 22da8-22dae Naked> Σ0 ↓ →0x22dcc ←0x22d96 <MI 22da8 TST.B (A6+0x8)> {} <MI 22dac BEQ 0x22dcc> {} <POP 22dae-22dcc Naked> Σ0 Δ-2 →0x22de6 <Const 0x22dae 0x50.2> Δ-2 {[#80]} <MI 22db2 LEA.L (A6-0xa),A4> {[#80]} <Call 0x22db4 0x22c94> {[#80]} <POP 22db6-22db7 StackAdj> Δ+2 {} <Const 0x22db7 0x51.2> Δ-2 {[#81]} <MI 22dba LEA.L (A6-0xa),A4> {[#81]} <Call 0x22dbc 0x22c94> {[#81]} <POP 22dbe-22dbf StackAdj> Δ+2 {} <Const 0x22dbf 0x52.2> Δ-2 {[#82]} <MI 22dc2 LEA.L (A6-0xa),A4> {[#82]} <Call 0x22dc4 0x22c94> {[#82]} <POP 22dc6-22dc7 StackAdj> Δ+2 {} <Const 0x22dc7 0x53.2> Δ-2 {[#83]} <MI 22dca BRA 0x22de6> {[#83]} <POP 22dcc-22de6 Naked> Σ0 Δ-2 ↓ ←0x22da8 <Const 0x22dcc 0x21.2> Δ-2 {[#33]} <MI 22dd0 LEA.L (A6-0xa),A4> {[#33]} <Call 0x22dd2 0x22c94> {[#33]} <POP 22dd4-22dd5 StackAdj> Δ+2 {} <Const 0x22dd5 0x19.2> Δ-2 {[#25]} <MI 22dd8 LEA.L (A6-0xa),A4> {[#25]} <Call 0x22dda 0x22c94> {[#25]} <POP 22ddc-22ddd StackAdj> Δ+2 {} <Const 0x22ddd 0x17.2> Δ-2 {[#23]} <MI 22de0 LEA.L (A6-0xa),A4> {[#23]} <Call 0x22de2 0x22c94> {[#23]} <POP 22de4-22de5 StackAdj> Δ+2 {} <Const 0x22de5 0x15.2> Δ-2 {[#21]} <POP 22de6-22df2 Naked> Σ-2 Δ+2 ↓ ←0x22dae <MI 22de6 LEA.L (A6-0xa),A4> {[-2-]} <Call 0x22de8 0x22c94> {[-2-]} <POP 22dea-22dec StackAdj> Δ+2 {} <Call 0x22dec 0x103dc> {} WriteConsoleCrLf(void) <POP 22df2-22dfa Epilogue> Σ0
@ 22dfa <POP 22dfa-2302e Body> <POP 22dfa-22e10 Prologue> Σ0 ↓ <POP 22e10-22e28 RegCacheLoad> Σ0 ↓ <POP 22e28-22e30 Naked> Σ0 Δ-4 ↓ <Blob 0x22e28 [4] 0x250ac> Δ-4 {[«4»]} <MI 22e2e MOVEQ.L #0x00,D6> {[«4»]} <POP 22e30-22e36 Naked> Σ-4 ↓ →0x22fca ←0x22fc4 <MI 22e30 CMP.L (A7),D6> {[-4-]} <MI 22e32 BGT 0x22fca> {[-4-]} <POP 22e36-22e60 Naked> Σ-4 ↓ →0x22fc4 <POP 22e36-22e38 StackAdj> Δ-2 {[-6-]} <Blob 0x22e38 [4] 0x250a8> Δ-4 {[-6-]|[«4»]} <MI 22e3a ADD.L D6,(A7)> {[-10-]} <Call 0x22e3c 0x224a8> {[-10-]} <POP 22e40-22e42 StackAdj> Δ+4 {[-6-]} <POP 0x22e42 LimitCheck 0x0 ≤ D6 ≤ 0x1fff> {[-6-]} <MI 22e4c MOVE.L D6,D0> {[-6-]} <MI 22e4e ASL.L #0x1,D0> {[-6-]} <MI 22e50 LEA.L 0x25088,A0> {[-6-]} <MI 22e56 MOVE.W (A7)+,D1> Δ+2 {[-4-]} <MI 22e58 CMP.W (A0+D0.L+#0x2a),D1> {[-4-]} <MI 22e5c BEQ 0x22fc4> {[-4-]} <POP 22e60-22e6e Naked> Σ-4 ↓ →0x22fc4 <MI 22e60 MOVE.L 0x250ac,D0> {[-4-]} <MI 22e66 SUBQ.L #0x5,D0> {[-4-]} <MI 22e68 CMP.L D0,D6> {[-4-]} <MI 22e6a BEQ 0x22fc4> {[-4-]} <POP 22e6e-22e70 Naked> Σ-4 ↓ <MI 22e6e MOVEQ.L #0x00,D7> {[-4-]} <POP 22e70-22ea8 Naked> Σ-4 ↓ →0x22eac ←0x22ea8 <POP 0x22e70 LimitCheck 0x0 ≤ D6 ≤ 0x1fff> {[-4-]} <MI 22e7a MOVE.L D6,D0> {[-4-]} <MI 22e7c ASL.L #0x1,D0> {[-4-]} <MI 22e7e LEA.L 0x25088,A0> {[-4-]} <Blob 0x22e84 [4] 0x250a8> Δ-4 {[-4-]|[«4»]} <MI 22e86 ADD.L D6,(A7)> {[-8-]} <MI 22e88 MOVE.W (A0+D0.L+#0x2a),-(A7)> Δ-2 {[-8-]|[2, '(A0+D0.L+#0x2a)']} <Call 0x22e8c 0x224e8> {[-8-]|[2, '(A0+D0.L+#0x2a)']} <POP 22e90-22e92 StackAdj> Δ+6 {[-4-]} <MI 22e92 ADDQ.L #0x1,D7> {[-4-]} <POP 22e94-22e96 StackAdj> Δ-2 {[-6-]} <Blob 0x22e96 [4] 0x250a8> Δ-4 {[-6-]|[«4»]} <MI 22e98 ADD.L D6,(A7)> {[-10-]} <Call 0x22e9a 0x224a8> {[-10-]} <POP 22e9e-22ea0 StackAdj> Δ+4 {[-6-]} <MI 22ea0 MOVE.W (A7)+,D1> Δ+2 {[-4-]} <MI 22ea2 CMP.W (A0+D0.L+#0x2a),D1> {[-4-]} <MI 22ea6 BEQ 0x22eac> {[-4-]} <POP 22ea8-22eac Naked> Σ-4 ↓ →0x22e70 <MI 22ea8 CMP.L #0x0a,D7> {[-4-]} <MI 22eaa BNE 0x22e70> {[-4-]} <POP 22eac-22ec2 Naked> Σ-4 ↓ →0x22fc4 ←0x22e70 <POP 22eac-22eae StackAdj> Δ-2 {[-6-]} <Blob 0x22eae [4] 0x250a8> Δ-4 {[-6-]|[«4»]} <MI 22eb0 ADD.L D6,(A7)> {[-10-]} <Call 0x22eb2 0x224a8> {[-10-]} <POP 22eb6-22eb8 StackAdj> Δ+4 {[-6-]} <MI 22eb8 MOVE.W (A7)+,D1> Δ+2 {[-4-]} <MI 22eba CMP.W (A0+D0.L+#0x2a),D1> {[-4-]} <MI 22ebe BEQ 0x22fc4> {[-4-]} <POP 22ec2-22fc4 Naked> Σ-4 ↓ <Blob 0x22ec2 [38] @> Δ-38 {[-4-]|[«38""»]} <Blob 0x22ece [10] @> Δ-10 {[-4-]|[«38""»]|[«10""»]} <Blob 0x22eda [14] @> Δ-14 {[-4-]|[«38""»]|[«10""»]|[«14""»]} <POP 22ee6-22ee8 StackAdj> Δ-8 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-8-]} <Lit 0x22ee8 38> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]} <POP 22ef4-22ef5 StackAdj> Δ-4 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]} <Blob 0x22ef5 [4] 0x250a8> Δ-4 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[«4»]} <MI 22ef6 ADD.L D6,(A7)> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-8-]} <Const 0x22ef8 0x8.4> Δ-4 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-8-]|[##8]} <Call 0x22efc 0x102e8> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-8-]|[##8]} Long2HexString(val : Long; ndig : Long) : String <POP 22f02-22f04 StackAdj> Δ+4 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-8-]} <Lit 0x22f04 10> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]} <POP 22f0e-22f10 StackAdj> Δ-4 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]} <MI 22f10 MOVE.W (A0+D0.L+#0x2a),D1> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]} <MI 22f14 EXTW.L D1> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]} <MI 22f16 MOVE.L D1,-(A7)> Δ-4 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[4, 'D1']} <Const 0x22f18 0x2.4> Δ-4 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[4, 'D1']|[##2]} <Call 0x22f1c 0x102e8> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[4, 'D1']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 22f22-22f24 StackAdj> Δ+4 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[4, 'D1']} <Lit 0x22f24 14> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[$$ read back 16#]} <POP 22f30-22f32 StackAdj> Δ-10 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[$$ read back 16#]|[-10-]} <Blob 0x22f32 [4] 0x250a8> Δ-4 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[$$ read back 16#]|[-10-]|[«4»]} <MI 22f34 ADD.L D6,(A7)> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[$$ read back 16#]|[-14-]} <Call 0x22f36 0x224a8> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[$$ read back 16#]|[-14-]} <POP 22f3a-22f3c StackAdj> Δ+4 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[$$ read back 16#]|[-10-]} <MI 22f3c MOVE.W (A7)+,D0> Δ+2 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[$$ read back 16#]|[-8-]} <MI 22f3e EXTW.L D0> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[$$ read back 16#]|[-8-]} <MI 22f40 MOVE.L D0,(A7)> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[$$ read back 16#]|[-4-]|[4, 'D0']} <Const 0x22f42 0x2.4> Δ-4 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[$$ read back 16#]|[-4-]|[4, 'D0']|[##2]} <Call 0x22f46 0x102e8> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[$$ read back 16#]|[-4-]|[4, 'D0']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 22f4c-22f4e StackAdj> Δ+8 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[$$ read back 16#]|[-4-]} <Call 0x22f4e 0x102e0> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]|[$$*** Programming Failure: address = 16#]|[-4-]|[$$ wrote 16#]|[-4-]|[$$ read back 16#]|[-4-]} StringCat6(a, b, c, d, e, f : String) : String <POP 22f54-22f58 StackAdj> Δ+24 {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]} <Call 0x22f58 0x103e0> {[-4-]|[«38""»]|[«10""»]|[«14""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 22f5a-22f5c StackAdj> Δ+66 {[-4-]} <Blob 0x22f5c [48] @> Δ-48 {[-4-]|[«48""»]} <POP 22f68-22f6a StackAdj> Δ-4 {[-4-]|[«48""»]|[-4-]} <Lit 0x22f6a 48> {[-4-]|[«48""»]|[$$EEPROM failed to program even after many retries]} <Call 0x22f78 0x103e0> {[-4-]|[«48""»]|[$$EEPROM failed to program even after many retries]} WriteConsoleStringCrLf(str : String) <POP 22f7a-22f7e StackAdj> Δ+52 {[-4-]} <Blob 0x22f7e [66] @> Δ-66 {[-4-]|[«66""»]} <POP 22f8a-22f8c StackAdj> Δ-4 {[-4-]|[«66""»]|[-4-]} <Lit 0x22f8c 66> {[-4-]|[«66""»]|[$$The system may not boot properly unless you replace the IOC EEPROM]} <Call 0x22f98 0x103e0> {[-4-]|[«66""»]|[$$The system may not boot properly unless you replace the IOC EEPROM]} WriteConsoleStringCrLf(str : String) <POP 22f9a-22f9b StackAdj> Δ+70 ↓ {[-4-]} <Blob 0x22f9b [26] @> Δ-26 {[-4-]|[«26""»]} <POP 22fac-22fae StackAdj> Δ-4 {[-4-]|[«26""»]|[-4-]} <Lit 0x22fae 25> {[-4-]|[«26""»]|[$$the error above was fatal]} <Call 0x22fbc 0x21194> {[-4-]|[«26""»]|[$$the error above was fatal]} <POP 22fc0-22fc4 StackAdj> Δ+30 {[-4-]} <POP 22fc4-22fca Naked> Σ-4 ↓ →0x22e30 ←0x22e36 ←0x22e60 ←0x22eac <MI 22fc4 ADDQ.L #0x1,D6> {[-4-]} <MI 22fc6 BVC 0x22e30> {[-4-]} <POP 22fca-22fd4 Naked> Σ-4 Δ+4 ↓ →0x22ffe ←0x22e30 <POP 22fca-22fcc StackAdj> Δ+4 {} <MI 22fcc TST.B 0x25096> {} <MI 22fd2 BEQ 0x22ffe> {} <POP 22fd4-22ffe Naked> Σ0 →0x23026 <Blob 0x22fd4 [28] @> Δ-28 {[«28""»]} <POP 22fe6-22fe8 StackAdj> Δ-4 {[«28""»]|[-4-]} <Lit 0x22fe8 27> {[«28""»]|[$$EEPROM successfully updated]} <Call 0x22ff6 0x103e0> {[«28""»]|[$$EEPROM successfully updated]} WriteConsoleStringCrLf(str : String) <POP 22ff8-22ffc StackAdj> Δ+32 {} <MI 22ffc BRA 0x23026> {} <POP 22ffe-23026 Naked> Σ0 ↓ ←0x22fca <Blob 0x22ffe [42] @> Δ-42 {[«42""»]} <POP 23010-23012 StackAdj> Δ-4 {[«42""»]|[-4-]} <Lit 0x23012 41> {[«42""»]|[$$EEPROM matched file, update wasn't needed]} <Call 0x23020 0x103e0> {[«42""»]|[$$EEPROM matched file, update wasn't needed]} WriteConsoleStringCrLf(str : String) <POP 23022-23026 StackAdj> Δ+46 {} <POP 23026-2302e Epilogue> Σ0 ←0x22fd4
@ 2302e <LVAR -0x004 1(rw)> <LVAR -0x008 4(rw)> <LVAR -0x00c @ 4(r)> <LVAR -0x010 4(rw)> <LVAR -0x014 4(rw)> <LVAR -0x02a 2(rw)> <LVAR -0x030 2(rw)> <POP 2302e-235ba Body> <POP 2302e-23044 Prologue> Σ0 ↓ <POP 23044-23058 RegCacheLoad> Σ0 ↓ <POP 23058-23064 Naked> Σ0 ↓ →0x23092 <POP 23058-2305a StackAdj> Δ-4 {[-4-]} <Call 0x2305a 0x24d8c> {[-4-]} <MI 23060 MOVE.L (A7)+,D6> Δ+4 {} <MI 23062 BEQ 0x23092> {} <POP 23064-23066 Naked> Σ0 ↓ <MI 23064 MOVEQ.L #0x00,D7> {} <POP 23066-23090 Naked> Σ0 ↓ →0x23066 ←0x23066 <POP 0x23066 LimitCheck 0x0 ≤ D7 ≤ 0x7> {} <MI 2306c MOVE.L D7,D0> {} <MI 2306e ASL.L #0x1,D0> {} <POP 23070-23072 StackAdj> Δ-2 {[-2-]} <MI 23072 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']} <MI 23074 ADD.L D7,(A7)> {[-6-]} <Call 0x23076 0x224a8> {[-6-]} <POP 2307a-2307c StackAdj> Δ+4 {[-2-]} <MI 2307c MOVE.W (A7)+,D1> Δ+2 {} <POP 0x2307e LimitCheck 0x0 ≤ D1 ≤ 0xff> {} <MI 23082 MOVE.W D1,(A6+D0.L-#0x48)> {} <MI 23086 ADDQ.L #0x1,D7> {} <MI 23088 CMPI.L #0x00000005,D7> {} <MI 2308e BLE 0x23066> {} <POP 23090-23092 Naked> Σ0 →0x230ac <MI 23090 BRA 0x230ac> {} <POP 23092-23094 Naked> Σ0 ↓ ←0x23058 <MI 23092 MOVEQ.L #0x00,D7> {} <POP 23094-230ac Naked> Σ0 ↓ →0x23094 ←0x23094 <POP 0x23094 LimitCheck 0x0 ≤ D7 ≤ 0x7> {} <MI 2309a MOVE.L D7,D0> {} <MI 2309c ASL.L #0x1,D0> {} <MI 2309e CLR.W (A6+D0.L-#0x48)> {} <MI 230a2 ADDQ.L #0x1,D7> {} <MI 230a4 CMPI.L #0x00000005,D7> {} <MI 230aa BLE 0x23094> {} <POP 230ac-230b8 Naked> Σ0 ↓ →0x230e2 ←0x23090 <POP 230ac-230ae StackAdj> Δ-4 {[-4-]} <Call 0x230ae 0x24db6> {[-4-]} <MI 230b4 MOVE.L (A7)+,D6> Δ+4 {} <MI 230b6 BEQ 0x230e2> {} <POP 230b8-230ba Naked> Σ0 ↓ <MI 230b8 MOVEQ.L #0x00,D7> {} <POP 230ba-230e0 Naked> Σ0 ↓ →0x230ba ←0x230ba <POP 0x230ba LimitCheck 0x0 ≤ D7 ≤ 0x7> {} <MI 230c0 MOVE.L D7,D0> {} <MI 230c2 ASL.L #0x1,D0> {} <POP 230c4-230c6 StackAdj> Δ-2 {[-2-]} <MI 230c6 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']} <MI 230c8 ADD.L D7,(A7)> {[-6-]} <Call 0x230ca 0x224a8> {[-6-]} <POP 230ce-230d0 StackAdj> Δ+4 {[-2-]} <MI 230d0 MOVE.W (A7)+,D1> Δ+2 {} <POP 0x230d2 LimitCheck 0x0 ≤ D1 ≤ 0xff> {} <MI 230d6 MOVE.W D1,(A6+D0.L-#0x38)> {} <MI 230da ADDQ.L #0x1,D7> {} <MI 230dc CMP.L #0x07,D7> {} <MI 230de BLE 0x230ba> {} <POP 230e0-230e2 Naked> Σ0 →0x230f8 <MI 230e0 BRA 0x230f8> {} <POP 230e2-230e4 Naked> Σ0 ↓ ←0x230ac <MI 230e2 MOVEQ.L #0x00,D7> {} <POP 230e4-230f8 Naked> Σ0 ↓ →0x230e4 ←0x230e4 <POP 0x230e4 LimitCheck 0x0 ≤ D7 ≤ 0x7> {} <MI 230ea MOVE.L D7,D0> {} <MI 230ec ASL.L #0x1,D0> {} <MI 230ee CLR.W (A6+D0.L-#0x38)> {} <MI 230f2 ADDQ.L #0x1,D7> {} <MI 230f4 CMP.L #0x07,D7> {} <MI 230f6 BLE 0x230e4> {} <POP 230f8-23104 Naked> Σ0 ↓ →0x2312e ←0x230e0 <POP 230f8-230fa StackAdj> Δ-4 {[-4-]} <Call 0x230fa 0x24de0> {[-4-]} <MI 23100 MOVE.L (A7)+,D6> Δ+4 {} <MI 23102 BEQ 0x2312e> {} <POP 23104-23106 Naked> Σ0 ↓ <MI 23104 MOVEQ.L #0x00,D7> {} <POP 23106-2312c Naked> Σ0 ↓ →0x23106 ←0x23106 <POP 0x23106 LimitCheck 0x0 ≤ D7 ≤ 0x7> {} <MI 2310c MOVE.L D7,D0> {} <MI 2310e ASL.L #0x1,D0> {} <POP 23110-23112 StackAdj> Δ-2 {[-2-]} <MI 23112 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']} <MI 23114 ADD.L D7,(A7)> {[-6-]} <Call 0x23116 0x224a8> {[-6-]} <POP 2311a-2311c StackAdj> Δ+4 {[-2-]} <MI 2311c MOVE.W (A7)+,D1> Δ+2 {} <POP 0x2311e LimitCheck 0x0 ≤ D1 ≤ 0xff> {} <MI 23122 MOVE.W D1,(A6+D0.L-#0x28)> {} <MI 23126 ADDQ.L #0x1,D7> {} <MI 23128 CMP.L #0x07,D7> {} <MI 2312a BLE 0x23106> {} <POP 2312c-2312e Naked> Σ0 →0x23144 <MI 2312c BRA 0x23144> {} <POP 2312e-23130 Naked> Σ0 ↓ ←0x230f8 <MI 2312e MOVEQ.L #0x00,D7> {} <POP 23130-23144 Naked> Σ0 ↓ →0x23130 ←0x23130 <POP 0x23130 LimitCheck 0x0 ≤ D7 ≤ 0x7> {} <MI 23136 MOVE.L D7,D0> {} <MI 23138 ASL.L #0x1,D0> {} <MI 2313a CLR.W (A6+D0.L-#0x28)> {} <MI 2313e ADDQ.L #0x1,D7> {} <MI 23140 CMP.L #0x07,D7> {} <MI 23142 BLE 0x23130> {} <POP 23144-23148 Naked> Σ0 Δ-4 ↓ ←0x2312c <Blob 0x23144 [4] 0x250ac> Δ-4 {[«4»]} <MI 23146 MOVEQ.L #0x00,D7> {[«4»]} <POP 23148-2314c Naked> Σ-4 ↓ →0x23172 ←0x2314c <MI 23148 CMP.L (A7),D7> {[-4-]} <MI 2314a BGT 0x23172> {[-4-]} <POP 2314c-23172 Naked> Σ-4 ↓ →0x23148 <Blob 0x2314c [4] 0x250a8> Δ-4 {[-4-]|[«4»]} <MI 2314e ADD.L D7,(A7)> {[-8-]} <POP 0x23150 LimitCheck 0x0 ≤ D7 ≤ 0x1fff> {[-8-]} <MI 2315a MOVE.L D7,D0> {[-8-]} <MI 2315c ASL.L #0x1,D0> {[-8-]} <MI 2315e LEA.L 0x25088,A0> {[-8-]} <MI 23164 MOVE.W (A0+D0.L+#0x2a),-(A7)> Δ-2 {[-8-]|[2, '(A0+D0.L+#0x2a)']} <Call 0x23168 0x2254c> {[-8-]|[2, '(A0+D0.L+#0x2a)']} <POP 2316c-2316e StackAdj> Δ+6 {[-4-]} <MI 2316e ADDQ.L #0x1,D7> {[-4-]} <MI 23170 BVC 0x23148> {[-4-]} <POP 23172-2317e Naked> Σ-4 Δ+4 ↓ →0x231b0 ←0x23148 <Call 0x23172 0x24d8c> {[-4-]} <MI 23178 MOVE.L (A7)+,D6> Δ+4 {} <MI 2317a CMP.L 0x250a8,D6> {} <MI 2317c BCS 0x231b0> {} <POP 2317e-23186 Naked> Σ0 ↓ →0x231b0 <MI 2317e MOVE.L 0x250a8,D0> {} <MI 23180 ADD.L 0x250ac,D0> {} <MI 23182 CMP.L D0,D6> {} <MI 23184 BHI 0x231b0> {} <POP 23186-23188 Naked> Σ0 ↓ <MI 23186 MOVEQ.L #0x00,D7> {} <POP 23188-231b0 Naked> Σ0 ↓ →0x23188 ←0x23188 <MI 23188 MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']} <MI 2318a ADD.L D7,(A7)> {[-4-]} <POP 0x2318c LimitCheck 0x0 ≤ D7 ≤ 0x7> {[-4-]} <MI 23192 MOVE.L D7,D0> {[-4-]} <MI 23194 ASL.L #0x1,D0> {[-4-]} <MI 23196 MOVE.W (A6+D0.L-#0x48),D0> {[-4-]} <POP 0x2319a LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-4-]} <MI 2319e MOVE.W D0,-(A7)> Δ-2 {[-4-]|[2, 'D0']} <Call 0x231a0 0x2254c> {[-4-]|[2, 'D0']} <POP 231a4-231a6 StackAdj> Δ+6 {} <MI 231a6 ADDQ.L #0x1,D7> {} <MI 231a8 CMPI.L #0x00000005,D7> {} <MI 231ae BLE 0x23188> {} <POP 231b0-231be Naked> Σ0 ↓ →0x231ec ←0x23172 ←0x2317e <POP 231b0-231b2 StackAdj> Δ-4 {[-4-]} <Call 0x231b2 0x24de0> {[-4-]} <MI 231b8 MOVE.L (A7)+,D6> Δ+4 {} <MI 231ba CMP.L 0x250a8,D6> {} <MI 231bc BCS 0x231ec> {} <POP 231be-231c6 Naked> Σ0 ↓ →0x231ec <MI 231be MOVE.L 0x250a8,D0> {} <MI 231c0 ADD.L 0x250ac,D0> {} <MI 231c2 CMP.L D0,D6> {} <MI 231c4 BHI 0x231ec> {} <POP 231c6-231c8 Naked> Σ0 ↓ <MI 231c6 MOVEQ.L #0x00,D7> {} <POP 231c8-231ec Naked> Σ0 ↓ →0x231c8 ←0x231c8 <MI 231c8 MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']} <MI 231ca ADD.L D7,(A7)> {[-4-]} <POP 0x231cc LimitCheck 0x0 ≤ D7 ≤ 0x7> {[-4-]} <MI 231d2 MOVE.L D7,D0> {[-4-]} <MI 231d4 ASL.L #0x1,D0> {[-4-]} <MI 231d6 MOVE.W (A6+D0.L-#0x28),D0> {[-4-]} <POP 0x231da LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-4-]} <MI 231de MOVE.W D0,-(A7)> Δ-2 {[-4-]|[2, 'D0']} <Call 0x231e0 0x2254c> {[-4-]|[2, 'D0']} <POP 231e4-231e6 StackAdj> Δ+6 {} <MI 231e6 ADDQ.L #0x1,D7> {} <MI 231e8 CMP.L #0x07,D7> {} <MI 231ea BLE 0x231c8> {} <POP 231ec-231fa Naked> Σ0 ↓ →0x23254 ←0x231b0 ←0x231be <POP 231ec-231ee StackAdj> Δ-4 {[-4-]} <Call 0x231ee 0x24db6> {[-4-]} <MI 231f4 MOVE.L (A7)+,D6> Δ+4 {} <MI 231f6 CMP.L 0x250a8,D6> {} <MI 231f8 BCS 0x23254> {} <POP 231fa-23202 Naked> Σ0 ↓ →0x23254 <MI 231fa MOVE.L 0x250a8,D0> {} <MI 231fc ADD.L 0x250ac,D0> {} <MI 231fe CMP.L D0,D6> {} <MI 23200 BHI 0x23254> {} <POP 23202-2320a Naked> Σ0 ↓ →0x2322e <MI 23202 TST.W 0x290c2> {} <MI 23208 BLE 0x2322e> {} <POP 2320a-2322e Naked> Σ0 ↓ <MI 2320a MOVE.W (A6-0x2a),D0> {} <MI 2320e ADD.W (A6-0x30),D0> {} <MI 23212 SUB.W 0x290c2,D0> {} <MI 23218 ANDI.W #0x00ff,D0> {} <MI 2321c MOVE.W D0,(A6-0x2a)> {} <MI 23220 MOVE.W 0x290c2,D0> {} <POP 0x23226 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 2322a MOVE.W D0,(A6-0x30)> {} <POP 2322e-23230 Naked> Σ0 ↓ ←0x23202 <MI 2322e MOVEQ.L #0x00,D7> {} <POP 23230-23254 Naked> Σ0 ↓ →0x23230 ←0x23230 <MI 23230 MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']} <MI 23232 ADD.L D7,(A7)> {[-4-]} <POP 0x23234 LimitCheck 0x0 ≤ D7 ≤ 0x7> {[-4-]} <MI 2323a MOVE.L D7,D0> {[-4-]} <MI 2323c ASL.L #0x1,D0> {[-4-]} <MI 2323e MOVE.W (A6+D0.L-#0x38),D0> {[-4-]} <POP 0x23242 LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-4-]} <MI 23246 MOVE.W D0,-(A7)> Δ-2 {[-4-]|[2, 'D0']} <Call 0x23248 0x2254c> {[-4-]|[2, 'D0']} <POP 2324c-2324e StackAdj> Δ+6 {} <MI 2324e ADDQ.L #0x1,D7> {} <MI 23250 CMP.L #0x07,D7> {} <MI 23252 BLE 0x23230> {} <POP 23254-2325c Naked> Σ0 Δ-4 ↓ ←0x231ec ←0x231fa <MI 23254 MOVEQ.L #0x00,D5> {} <Blob 0x23256 [4] 0x250ac> Δ-4 {[«4»]} <MI 23258 SUBQ.L #0x1,(A7)> {[-4-]} <MI 2325a MOVEQ.L #0x00,D7> {[-4-]} <POP 2325c-23260 Naked> Σ-4 ↓ →0x23286 ←0x23260 <MI 2325c CMP.L (A7),D7> {[-4-]} <MI 2325e BGT 0x23286> {[-4-]} <POP 23260-23286 Naked> Σ-4 ↓ →0x2325c <POP 23260-23262 StackAdj> Δ-2 {[-6-]} <Blob 0x23262 [4] 0x250a8> Δ-4 {[-6-]|[«4»]} <MI 23264 ADD.L D7,(A7)> {[-10-]} <Call 0x23266 0x224a8> {[-10-]} <POP 2326a-2326c StackAdj> Δ+4 {[-6-]} <MI 2326c MOVE.W (A7)+,D0> Δ+2 {[-4-]} <MI 2326e EXTW.L D0> {[-4-]} <MI 23270 ADD.L D0,D5> {[-4-]} <MI 23272 MOVE.L D5,D4> {[-4-]} <MI 23274 MOVE.L #0x100,D3> {[-4-]} <Call 0x2327a 0x10294> {[-4-]} ?divs_d3_d4 <MI 23280 MOVE.L D3,D5> {[-4-]} <MI 23282 ADDQ.L #0x1,D7> {[-4-]} <MI 23284 BVC 0x2325c> {[-4-]} <POP 23286-232b4 Naked> Σ-4 Δ+4 ↓ ←0x2325c <POP 23286-23288 StackAdj> Δ+4 {} <MI 23288 MOVE.L 0x250a8,D0> {} <MI 2328a ADD.L 0x250ac,D0> {} <MI 2328c MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']} <MI 2328e MOVE.L #0x1aa,D0> {[4, 'D0']} <MI 23294 SUB.L D5,D0> {[4, 'D0']} <MI 23296 MOVE.L D0,D4> {[4, 'D0']} <MI 23298 MOVE.L #0x100,D3> {[4, 'D0']} <Call 0x2329e 0x10294> {[4, 'D0']} ?divs_d3_d4 <MI 232a4 MOVE.W D3,-(A7)> Δ-2 {[4, 'D0']|[2, 'D3']} <Call 0x232a6 0x2254c> {[4, 'D0']|[2, 'D3']} <POP 232aa-232ac StackAdj> Δ+6 {} <MI 232ac CLR.L (A6-0x14)> {} <MI 232b0 CLR.L (A6-0x10)> {} <POP 232b4-232c0 Naked> Σ0 ↓ →0x232c4 ←0x234ca <MI 232b4 CLR.B (A6-0x4)> {} <MI 232b8 MOVE.L (A6-0x14),D0> {} <MI 232bc CMP.L #0x07,D0> {} <MI 232be BLE 0x232c4> {} <POP 232c0-232c4 Naked> Σ0 ↓ <MI 232c0 ADDQ.B #0x1,(A6-0x4)> {} <POP 232c4-232e4 Naked> Σ0 ↓ →0x2332c ←0x232b4 <MI 232c4 MOVE.W 0x250b0,D0> {} <MI 232ca SUBI.W #0x0050,D0> {} <MI 232ce EXTW.L D0> {} <MI 232d0 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']} <Pointer.fp 0x232d2 <LVAR -0x00c @ 4(r)>> Δ-4 {[4, 'D0']|[@@-12]} <Call 0x232d6 0x24e32> {[4, 'D0']|[@@-12]} <POP 232dc-232de StackAdj> Δ+8 {} <MI 232de TST.L (A6-0xc)> {} <MI 232e2 BEQ 0x2332c> {} <POP 232e4-232ea Naked> Σ0 ↓ →0x2332c <MI 232e4 TST.B (A6-0x4)> {} <MI 232e8 BEQ 0x2332c> {} <POP 232ea-2332c Naked> Σ0 ↓ <Blob 0x232ea [26] @> Δ-26 {[«26""»]} <POP 232fc-232fe StackAdj> Δ-8 {[«26""»]|[-8-]} <Lit 0x232fe 25> {[«26""»]|[-4-]|[$$Warning from REE_UPLOAD:_]} <MI 2330c MOVE.L (A6-0xc),(A7)> {[«26""»]|[-4-]|[4, '(A6-0xc)']} <POP 2330a-2330c StackAdj> Δ-8 {[«26""»]|[-4-]|[4, '(A6-0xc)']|[-8-]} <Call 0x23310 0x2101a> {[«26""»]|[-4-]|[4, '(A6-0xc)']|[-8-]} <POP 23314-23316 StackAdj> Δ+4 {[«26""»]|[-4-]|[4, '(A6-0xc)']|[-4-]} <Call 0x23316 0x102d0> {[«26""»]|[-4-]|[4, '(A6-0xc)']|[-4-]} StringCat2(a, b : String) : String <POP 2331c-2331e StackAdj> Δ+8 {[«26""»]|[-4-]} <Call 0x2331e 0x103e0> {[«26""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 23324-23328 StackAdj> Δ+30 {} <MI 23328 ADDQ.L #0x1,(A6-0x10)> {} <POP 2332c-2332e Naked> Σ0 ↓ ←0x232c4 ←0x232e4 <MI 2332c MOVEQ.L #0x00,D7> {} <POP 2332e-23362 Naked> Σ0 ↓ →0x2332e ←0x2332e <POP 0x2332e LimitCheck 0x0 ≤ D7 ≤ 0x1fff> {} <MI 23338 MOVE.L D7,D0> {} <MI 2333a ASL.L #0x1,D0> {} <MI 2333c LEA.L 0x25088,A0> {} <POP 23342-23344 StackAdj> Δ-2 {[-2-]} <Blob 0x23344 [4] 0x250a8> Δ-4 {[-2-]|[«4»]} <MI 23346 ADD.L D7,(A7)> {[-6-]} <Call 0x23348 0x224a8> {[-6-]} <POP 2334c-2334e StackAdj> Δ+4 {[-2-]} <MI 2334e MOVE.W (A7)+,D1> Δ+2 {} <POP 0x23350 LimitCheck 0x0 ≤ D1 ≤ 0xff> {} <MI 23354 MOVE.W D1,(A0+D0.L+#0x2a)> {} <MI 23358 ADDQ.L #0x1,D7> {} <MI 2335a CMPI.L #0x00001fff,D7> {} <MI 23360 BLE 0x2332e> {} <POP 23362-23382 Naked> Σ0 ↓ →0x233ca <MI 23362 MOVE.W 0x250b0,D0> {} <MI 23368 SUBI.W #0x0050,D0> {} <MI 2336c EXTW.L D0> {} <MI 2336e MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']} <Pointer.fp 0x23370 <LVAR -0x00c @ 4(r)>> Δ-4 {[4, 'D0']|[@@-12]} <Call 0x23374 0x24e0a> {[4, 'D0']|[@@-12]} <POP 2337a-2337c StackAdj> Δ+8 {} <MI 2337c TST.L (A6-0xc)> {} <MI 23380 BEQ 0x233ca> {} <POP 23382-2338e Naked> Σ0 ↓ →0x233ca <MI 23382 MOVE.L (A6-0xc),D0> {} <MI 23386 CMPI.L #0x00000002,D0> {} <MI 2338c BEQ 0x233ca> {} <POP 2338e-233ca Naked> Σ0 ↓ <Blob 0x2338e [26] @> Δ-26 {[«26""»]} <POP 233a0-233a2 StackAdj> Δ-8 {[«26""»]|[-8-]} <Lit 0x233a2 25> {[«26""»]|[-4-]|[$$error from REE_DOWNLOAD:_]} <MI 233b0 MOVE.L (A6-0xc),(A7)> {[«26""»]|[-4-]|[4, '(A6-0xc)']} <POP 233ae-233b0 StackAdj> Δ-8 {[«26""»]|[-4-]|[4, '(A6-0xc)']|[-8-]} <Call 0x233b4 0x2101a> {[«26""»]|[-4-]|[4, '(A6-0xc)']|[-8-]} <POP 233b8-233ba StackAdj> Δ+4 {[«26""»]|[-4-]|[4, '(A6-0xc)']|[-4-]} <Call 0x233ba 0x102d0> {[«26""»]|[-4-]|[4, '(A6-0xc)']|[-4-]} StringCat2(a, b : String) : String <POP 233c0-233c2 StackAdj> Δ+8 {[«26""»]|[-4-]} <Call 0x233c2 0x21194> {[«26""»]|[-4-]} <POP 233c6-233ca StackAdj> Δ+30 {} <POP 233ca-233d2 Naked> Σ0 Δ-4 ↓ ←0x23362 ←0x23382 <MI 233ca CLR.L (A6-0x8)> {} <Blob 0x233ce [4] 0x250ac> Δ-4 {[«4»]} <MI 233d0 MOVEQ.L #0x00,D7> {[«4»]} <POP 233d2-233d6 Naked> Σ-4 ↓ →0x2340e ←0x2340a <MI 233d2 CMP.L (A7),D7> {[-4-]} <MI 233d4 BGT 0x2340e> {[-4-]} <POP 233d6-233fe Naked> Σ-4 ↓ →0x2340a <POP 233d6-233d8 StackAdj> Δ-2 {[-6-]} <Blob 0x233d8 [4] 0x250a8> Δ-4 {[-6-]|[«4»]} <MI 233da ADD.L D7,(A7)> {[-10-]} <Call 0x233dc 0x224a8> {[-10-]} <POP 233e0-233e2 StackAdj> Δ+4 {[-6-]} <POP 0x233e2 LimitCheck 0x0 ≤ D7 ≤ 0x1fff> {[-6-]} <MI 233ec MOVE.L D7,D0> {[-6-]} <MI 233ee ASL.L #0x1,D0> {[-6-]} <MI 233f0 LEA.L 0x25088,A0> {[-6-]} <MI 233f6 MOVE.W (A7)+,D1> Δ+2 {[-4-]} <MI 233f8 CMP.W (A0+D0.L+#0x2a),D1> {[-4-]} <MI 233fc BEQ 0x2340a> {[-4-]} <POP 233fe-23406 Naked> Σ-4 ↓ →0x2340a <MI 233fe MOVE.L 0x250ac,D0> {[-4-]} <MI 23400 SUBQ.L #0x5,D0> {[-4-]} <MI 23402 CMP.L D0,D7> {[-4-]} <MI 23404 BEQ 0x2340a> {[-4-]} <POP 23406-2340a Naked> Σ-4 ↓ <MI 23406 ADDQ.L #0x1,(A6-0x8)> {[-4-]} <POP 2340a-2340e Naked> Σ-4 ↓ →0x233d2 ←0x233d6 ←0x233fe <MI 2340a ADDQ.L #0x1,D7> {[-4-]} <MI 2340c BVC 0x233d2> {[-4-]} <POP 2340e-23418 Naked> Σ-4 Δ+4 ↓ →0x2354e ←0x233d2 <POP 2340e-23410 StackAdj> Δ+4 {} <MI 23410 TST.L (A6-0x8)> {} <MI 23414 BLE 0x2354e> {} <POP 23418-2341a Naked> Σ0 ↓ <MI 23418 MOVEQ.L #0x00,D7> {} <POP 2341a-23446 Naked> Σ0 ↓ →0x2341a ←0x2341a <Blob 0x2341a [4] 0x250a8> Δ-4 {[«4»]} <MI 2341c ADD.L D7,(A7)> {[-4-]} <POP 0x2341e LimitCheck 0x0 ≤ D7 ≤ 0x1fff> {[-4-]} <MI 23428 MOVE.L D7,D0> {[-4-]} <MI 2342a ASL.L #0x1,D0> {[-4-]} <MI 2342c LEA.L 0x25088,A0> {[-4-]} <MI 23432 MOVE.W (A0+D0.L+#0x2a),-(A7)> Δ-2 {[-4-]|[2, '(A0+D0.L+#0x2a)']} <Call 0x23436 0x2254c> {[-4-]|[2, '(A0+D0.L+#0x2a)']} <POP 2343a-2343c StackAdj> Δ+6 {} <MI 2343c ADDQ.L #0x1,D7> {} <MI 2343e CMPI.L #0x00001fff,D7> {} <MI 23444 BLE 0x2341a> {} <POP 23446-2344c Naked> Σ0 ↓ →0x234ae <MI 23446 TST.B (A6-0x4)> {} <MI 2344a BEQ 0x234ae> {} <POP 2344c-234ae Naked> Σ0 →0x234ba <Blob 0x2344c [10] @> Δ-10 {[«10""»]} <Blob 0x2345e [42] @> Δ-42 {[«10""»]|[«42""»]} <POP 2346a-2346c StackAdj> Δ-8 {[«10""»]|[«42""»]|[-8-]} <Lit 0x2346c 9> {[«10""»]|[«42""»]|[-4-]|[$$Warning:_]} <MI 2347a MOVE.L (A6-0x8),(A7)> {[«10""»]|[«42""»]|[-4-]|[4, '(A6-0x8)']} <POP 23478-2347a StackAdj> Δ-8 {[«10""»]|[«42""»]|[-4-]|[4, '(A6-0x8)']|[-8-]} <Call 0x2347e 0x102e4> {[«10""»]|[«42""»]|[-4-]|[4, '(A6-0x8)']|[-8-]} Long2String(a : Long) : String <Lit 0x23484 42> {[«10""»]|[«42""»]|[-4-]|[4, '(A6-0x8)']|[-4-]|[$$ bytes were incorrectly written - retrying]} <Call 0x23494 0x102d4> {[«10""»]|[«42""»]|[-4-]|[4, '(A6-0x8)']|[-4-]|[$$ bytes were incorrectly written - retrying]} StringCat3(a, b, c : String) : String <POP 2349a-2349e StackAdj> Δ+12 {[«10""»]|[«42""»]|[-4-]} <Call 0x2349e 0x103e0> {[«10""»]|[«42""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 234a4-234a8 StackAdj> Δ+56 {} <MI 234a8 ADDQ.L #0x1,(A6-0x10)> {} <MI 234ac BRA 0x234ba> {} <POP 234ae-234ba Naked> Σ0 ↓ ←0x23446 <Const 0x234ae 0x2e.2> Δ-2 {[#46]} <Call 0x234b2 0x103d0> {[#46]} WriteConsoleChar(chr : char) <POP 234b8-234ba StackAdj> Δ+2 {} <POP 234ba-234ca Naked> Σ0 ↓ →0x234ce ←0x2344c <MI 234ba ADDQ.L #0x1,(A6-0x14)> {} <MI 234be MOVE.L (A6-0x14),D0> {} <MI 234c2 CMPI.L #0x0000000f,D0> {} <MI 234c8 BGE 0x234ce> {} <POP 234ca-234ce Naked> Σ0 →0x232b4 <MI 234ca BRA 0x232b4> {} <POP 234ce-2354e Naked> Σ0 →0x235b2 ←0x234ba <Blob 0x234ce [48] @> Δ-48 {[«48""»]} <POP 234e0-234e2 StackAdj> Δ-4 {[«48""»]|[-4-]} <Lit 0x234e2 47> {[«48""»]|[$$*** ERROR: program EEPROM failed too many times]} <Call 0x234f2 0x103e0> {[«48""»]|[$$*** ERROR: program EEPROM failed too many times]} WriteConsoleStringCrLf(str : String) <POP 234f8-234fc StackAdj> Δ+52 {} <Blob 0x234fc [68] @> Δ-68 {[«68""»]} <POP 23508-2350a StackAdj> Δ-4 {[«68""»]|[-4-]} <Lit 0x2350a 68> {[«68""»]|[$$The system may not boot properly unless you replace the RESHA EEPROM]} <Call 0x2351a 0x103e0> {[«68""»]|[$$The system may not boot properly unless you replace the RESHA EEPROM]} WriteConsoleStringCrLf(str : String) <POP 23520-23521 StackAdj> Δ+72 ↓ {} <Blob 0x23521 [26] @> Δ-26 {[«26""»]} <POP 23532-23534 StackAdj> Δ-4 {[«26""»]|[-4-]} <Lit 0x23534 25> {[«26""»]|[$$the error above was fatal]} <Call 0x23544 0x21194> {[«26""»]|[$$the error above was fatal]} <POP 23548-2354c StackAdj> Δ+30 {} <MI 2354c BRA 0x235b2> {} <POP 2354e-23582 Naked> Σ0 ↓ →0x2358a ←0x2340e <Blob 0x2354e [28] @> Δ-28 {[«28""»]} <POP 23560-23562 StackAdj> Δ-4 {[«28""»]|[-4-]} <Lit 0x23562 27> {[«28""»]|[$$EEPROM successfully updated]} <Call 0x23572 0x103d8> {[«28""»]|[$$EEPROM successfully updated]} WriteConsoleString(str : String) <POP 23578-2357c StackAdj> Δ+32 {} <MI 2357c TST.L (A6-0x10)> {} <MI 23580 BNE 0x2358a> {} <POP 23582-2358a Naked> Σ0 →0x235b2 <Call 0x23582 0x103dc> {} WriteConsoleCrLf(void) <MI 23588 BRA 0x235b2> {} <POP 2358a-235b2 Naked> Σ0 ↓ ←0x2354e <Blob 0x2358a [40] @> Δ-40 {[«40""»]} <POP 23596-23598 StackAdj> Δ-4 {[«40""»]|[-4-]} <Lit 0x23598 40> {[«40""»]|[$$ and verified, ignore the warnings above]} <Call 0x235a8 0x103e0> {[«40""»]|[$$ and verified, ignore the warnings above]} WriteConsoleStringCrLf(str : String) <POP 235ae-235b2 StackAdj> Δ+44 {} <POP 235b2-235ba Epilogue> Σ0 ←0x234ce ←0x23582
@ 235ba <LVAR 0x008 1(r)> <POP 235ba-2369c Body> <POP 235ba-235d0 Prologue> Σ0 ↓ <POP 235d0-235d8 RegCacheLoad> Σ0 ↓ <POP 235d8-235e4 Naked> Σ0 ↓ →0x235f2 <POP 235d8-235da StackAdj> Δ-2 {[-2-]} <Call 0x235da 0x1060a> {[-2-]} Is_machine_type_four() : Bool <MI 235e0 TST.B (A7)+> Δ+2 {} <MI 235e2 BNE 0x235f2> {} <POP 235e4-235f2 Naked> Σ0 ↓ →0x23694 <POP 235e4-235e6 StackAdj> Δ-2 {[-2-]} <Call 0x235e6 0x10604> {[-2-]} Is_machine_type_three() : Bool <MI 235ec TST.B (A7)+> Δ+2 {} <MI 235ee BEQ 0x23694> {} <POP 235f2-235f8 Naked> Σ0 ↓ →0x23620 ←0x235d8 <MI 235f2 TST.B (A6+0x8)> {} <MI 235f6 BEQ 0x23620> {} <POP 235f8-23620 Naked> Σ0 →0x2364c <Blob 0x235f8 [44] @> Δ-44 {[«44""»]} <POP 23604-23606 StackAdj> Δ-4 {[«44""»]|[-4-]} <Lit 0x23606 44> {[«44""»]|[$$turn the EEPROM WRITE PROTECT switch ON (up)]} <Call 0x23614 0x103d8> {[«44""»]|[$$turn the EEPROM WRITE PROTECT switch ON (up)]} WriteConsoleString(str : String) <POP 2361a-2361e StackAdj> Δ+48 {} <MI 2361e BRA 0x2364c> {} <POP 23620-2364c Naked> Σ0 ↓ ←0x235f2 <Blob 0x23620 [74] @> Δ-74 {[«74""»]} <POP 23632-23634 StackAdj> Δ-4 {[«74""»]|[-4-]} <Lit 0x23634 73> {[«74""»]|[$$turn the EEPROM WRITE PROTECT switch (at front of RESHA board) OFF (down)]} <Call 0x23642 0x103d8> {[«74""»]|[$$turn the EEPROM WRITE PROTECT switch (at front of RESHA board) OFF (down)]} WriteConsoleString(str : String) <POP 23648-2364c StackAdj> Δ+78 {} <POP 2364c-2365c Naked> Σ0 ↓ →0x2365e ←0x235f8 ←0x2365c <POP 2364c-2364e StackAdj> Δ-2 {[-2-]} <Call 0x2364e 0x24d62> {[-2-]} <MI 23654 MOVE.B (A7)+,D0> Δ+2 {} <MI 23656 CMP.B (A6+0x8),D0> {} <MI 2365a BEQ 0x2365e> {} <POP 2365c-2365e Naked> Σ0 →0x2364c <MI 2365c BRA 0x2364c> {} <POP 2365e-23694 Naked> Σ0 ↓ ←0x2364c <Blob 0x2365e [6] @> Δ-6 {[«6""»]} <POP 2366e-23670 StackAdj> Δ-4 {[«6""»]|[-4-]} <Lit 0x23670 5> {[«6""»]|[$$ - OK]} <Call 0x2367e 0x103e0> {[«6""»]|[$$ - OK]} WriteConsoleStringCrLf(str : String) <POP 23684-23686 StackAdj> Δ+6 {[-4-]} <POP 23686-23687 StackAdj> Δ+4 {} <Const 0x23687 0x9896.4> Δ-4 {[##39062]} <Call 0x2368c 0x10224> {[##39062]} KC12_Sleep(dur: Long) <POP 23692-23694 StackAdj> Δ+4 {} <POP 23694-2369c Epilogue> Σ0 ←0x235e4
@ 2369c <LVAR -0x008 @ 4(r)> <POP 2369c-23758 Body> <POP 2369c-236b2 Prologue> Σ0 ↓ <POP 236b2-236b6 RegCacheLoad> Σ0 ↓ <POP 236b6-236d0 Naked> Σ0 ↓ →0x236ee <Call 0x236b6 0x2288a> {} <Pointer.fp 0x236ba <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]} <Call 0x236be 0x22990> {[@@-8]} <POP 236c2-236c4 StackAdj> Δ+4 {} <MI 236c4 MOVE.W 0x250b0,D0> {} <MI 236ca CMPI.W #0x0050,D0> {} <MI 236ce BGE 0x236ee> {} <POP 236d0-236ee Naked> Σ0 →0x236f0 <MI 236d0 MOVE.L (A6-0x8),D4> {} <MI 236d4 MOVEQ.L #0x0c,D3> {} <Call 0x236d6 0x1028c> {} ?muls_d3_d4 <MI 236dc MOVE.L #0x3e8,D3> {} <Call 0x236e2 0x10294> {} ?divs_d3_d4 <MI 236e8 ADDQ.L #0x1,D4> {} <MI 236ea MOVE.L D4,D7> {} <MI 236ec BRA 0x236f0> {} <POP 236ee-236f0 Naked> Σ0 ↓ ←0x236b6 <MI 236ee MOVEQ.L #0x06,D7> {} <POP 236f0-23750 Naked> Σ0 ↓ ←0x236d0 <Blob 0x236f0 [38] @> Δ-38 {[«38""»]} <Blob 0x23702 [12] @> Δ-12 {[«38""»]|[«12""»]} <POP 23712-23714 StackAdj> Δ-8 {[«38""»]|[«12""»]|[-8-]} <Lit 0x23714 37> {[«38""»]|[«12""»]|[-4-]|[$$Updating this EEPROM will take about_]} <MI 23724 MOVE.L D7,(A7)> {[«38""»]|[«12""»]|[-4-]|[4, 'D7']} <POP 2371e-23724 StackAdj> Δ-8 {[«38""»]|[«12""»]|[-4-]|[4, 'D7']|[-8-]} <Call 0x23726 0x102e4> {[«38""»]|[«12""»]|[-4-]|[4, 'D7']|[-8-]} Long2String(a : Long) : String <Lit 0x2372c 11> {[«38""»]|[«12""»]|[-4-]|[4, 'D7']|[-4-]|[$$ seconds...]} <Call 0x2373e 0x102d4> {[«38""»]|[«12""»]|[-4-]|[4, 'D7']|[-4-]|[$$ seconds...]} StringCat3(a, b, c : String) : String <POP 23744-23746 StackAdj> Δ+12 {[«38""»]|[«12""»]|[-4-]} <Call 0x23746 0x103e0> {[«38""»]|[«12""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 2374c-23750 StackAdj> Δ+54 {} <POP 23750-23758 Epilogue> Σ0
@ 23758 <POP 23758-237c6 Body> <POP 23758-2376e Prologue> Σ0 ↓ <POP 2376e-23770 RegCacheLoad> Σ0 ↓ <POP 23770-237a6 Naked> Σ0 ↓ →0x237ac <Const 0x23770 0x1.4> Δ-4 {[##1]} <Const 0x23774 0x0.4> Δ-4 {[##1]|[##0]} <Const 0x23778 0x1.2> Δ-2 {[##1]|[##0]|[#1]} <Call 0x2377a 0x2227a> {[##1]|[##0]|[#1]} <POP 2377e-23782 StackAdj> Δ+10 {} <Call 0x23782 0x2369c> {} <MI 23786 CLR.B -(A7)> Δ-2 {[#0]} <Call 0x23788 0x235ba> {[#0]} <POP 2378c-2378e StackAdj> Δ+2 {} <MI 2378e CLR.B 0x25096> {} <MI 23794 CLR.W 0x290c2> {} <MI 2379a MOVE.W 0x250b0,D0> {} <MI 237a0 CMPI.W #0x0050,D0> {} <MI 237a4 BGE 0x237ac> {} <POP 237a6-237ac Naked> Σ0 →0x237b0 <Call 0x237a6 0x22dfa> {} <MI 237aa BRA 0x237b0> {} <POP 237ac-237b0 Naked> Σ0 ↓ ←0x23770 <Call 0x237ac 0x2302e> {} <POP 237b0-237be Naked> Σ0 ↓ ←0x237a6 <Const 0x237b0 0x1.2> Δ-2 {[#1]} <Call 0x237b2 0x235ba> {[#1]} <POP 237b6-237b8 StackAdj> Δ+2 {} <Call 0x237b8 0x103dc> {} WriteConsoleCrLf(void) <POP 237be-237c6 Epilogue> Σ0
@ 237c6 <LVAR 0x00a @ 4(r)> <LVAR 0x008 2(r)> <POP 237c6-23846 Body> <POP 237c6-237dc Prologue> Σ0 ↓ <POP 237dc-237e4 RegCacheLoad> Σ0 ↓ <POP 237e4-2383e Naked> Σ0 ↓ <Blob 0x237e4 [16] @> Δ-16 {[«16""»]} <POP 237f4-237f6 StackAdj> Δ-8 {[«16""»]|[-8-]} <Lit 0x237f6 15> {[«16""»]|[-4-]|[$$Verifying file_]} <MI 23806 MOVE.L (A6+0xa),(A7)> {[«16""»]|[-4-]|[4, '(A6+0xa)']} <POP 23800-23806 StackAdj> Δ-8 {[«16""»]|[-4-]|[4, '(A6+0xa)']|[-8-]} <Call 0x23808 0x102cc> {[«16""»]|[-4-]|[4, '(A6+0xa)']|[-8-]} StringDup(a : String) : String <POP 2380e-23810 StackAdj> Δ+4 {[«16""»]|[-4-]|[4, '(A6+0xa)']|[-4-]} <Call 0x23810 0x102d0> {[«16""»]|[-4-]|[4, '(A6+0xa)']|[-4-]} StringCat2(a, b : String) : String <POP 23816-23818 StackAdj> Δ+8 {[«16""»]|[-4-]} <Call 0x23818 0x103d8> {[«16""»]|[-4-]} WriteConsoleString(str : String) <POP 2381e-23820 StackAdj> Δ+16 {[-4-]} <MI 23820 MOVE.L (A6+0xa),(A7)> {[4, '(A6+0xa)']} <MI 23822 MOVE.W (A6+0x8),D0> {[4, '(A6+0xa)']} <MI 23826 EXTW.L D0> {[4, '(A6+0xa)']} <MI 23828 MOVE.L D0,-(A7)> Δ-4 {[4, '(A6+0xa)']|[4, 'D0']} <Const 0x2382a 0x1.2> Δ-2 {[4, '(A6+0xa)']|[4, 'D0']|[#1]} <Call 0x2382c 0x2227a> {[4, '(A6+0xa)']|[4, 'D0']|[#1]} <POP 23830-23834 StackAdj> Δ+10 {} <Pointer.fp 0x23834 <LVAR 0x00a @ 4(r)>> Δ-4 {[@@10]} <Call 0x23836 0x102bc> {[@@10]} FreeString(VAR a : String) <POP 2383c-2383e StackAdj> Δ+4 {} <POP 2383e-23846 Epilogue> Σ0
@ 23846 <LVAR 0x00a @ 4(r)> <LVAR 0x008 2(r)> <POP 23846-23910 Body> <POP 23846-2385c Prologue> Σ0 ↓ <POP 2385c-23866 RegCacheLoad> Σ0 ↓ <POP 23866-238ec Naked> Σ0 Δ-20 ↓ →0x238f6 <Blob 0x23866 [14] @> Δ-14 {[«14""»]} <POP 23876-23878 StackAdj> Δ-8 {[«14""»]|[-8-]} <Lit 0x23878 13> {[«14""»]|[-4-]|[$$Reading file_]} <MI 23888 MOVE.L (A6+0xa),(A7)> {[«14""»]|[-4-]|[4, '(A6+0xa)']} <POP 23882-23888 StackAdj> Δ-8 {[«14""»]|[-4-]|[4, '(A6+0xa)']|[-8-]} <Call 0x2388a 0x102cc> {[«14""»]|[-4-]|[4, '(A6+0xa)']|[-8-]} StringDup(a : String) : String <POP 23890-23892 StackAdj> Δ+4 {[«14""»]|[-4-]|[4, '(A6+0xa)']|[-4-]} <Call 0x23892 0x102d0> {[«14""»]|[-4-]|[4, '(A6+0xa)']|[-4-]} StringCat2(a, b : String) : String <POP 23898-2389a StackAdj> Δ+8 {[«14""»]|[-4-]} <Call 0x2389a 0x103d8> {[«14""»]|[-4-]} WriteConsoleString(str : String) <POP 238a0-238a2 StackAdj> Δ+14 {[-4-]} <MI 238a2 MOVE.L (A6+0xa),(A7)> {[4, '(A6+0xa)']} <MI 238a4 MOVE.W (A6+0x8),D0> {[4, '(A6+0xa)']} <MI 238a8 EXTW.L D0> {[4, '(A6+0xa)']} <MI 238aa MOVE.L D0,-(A7)> Δ-4 {[4, '(A6+0xa)']|[4, 'D0']} <Const 0x238ac 0x1.2> Δ-2 {[4, '(A6+0xa)']|[4, 'D0']|[#1]} <Call 0x238ae 0x2227a> {[4, '(A6+0xa)']|[4, 'D0']|[#1]} <POP 238b2-238b6 StackAdj> Δ+10 {} <Call 0x238b6 0x2369c> {} <Blob 0x238ba [20] @> Δ-20 {[«20""»]} <POP 238ca-238cc StackAdj> Δ-6 {[«20""»]|[-6-]} <Lit 0x238cc 19> {[«20""»]|[-2-]|[$$Update this EEPROM_]} <POP 238dc-238de StackAdj> Δ-2 {[«20""»]|[-2-]|[$$Update this EEPROM_]|[-2-]} <POP 238de-238df StackAdj> Δ+2 {[«20""»]|[-2-]|[$$Update this EEPROM_]} <Const 0x238df 0x1.2> Δ-2 {[«20""»]|[-2-]|[$$Update this EEPROM_]|[#1]} <Call 0x238e0 0x103f0> {[«20""»]|[-2-]|[$$Update this EEPROM_]|[#1]} AskOnConsoleYesNo(prompt : String; default : Bool) : Bool <POP 238e6-238e8 StackAdj> Δ+6 {[«20""»]|[-2-]} <MI 238e8 TST.B (A7)+> Δ+2 {[«20""»]} <MI 238ea BEQ 0x238f6> {[«20""»]} <POP 238ec-238f6 Naked> Σ-20 ↓ <MI 238ec CLR.B 0x25096> {[-20-]} <Call 0x238f2 0x22dfa> {[-20-]} <POP 238f6-23908 Naked> Σ-20 Δ+20 ↓ ←0x23866 <POP 238f6-238f8 StackAdj> Δ+20 {} <Call 0x238f8 0x103dc> {} WriteConsoleCrLf(void) <Pointer.fp 0x238fe <LVAR 0x00a @ 4(r)>> Δ-4 {[@@10]} <Call 0x23900 0x102bc> {[@@10]} FreeString(VAR a : String) <POP 23906-23908 StackAdj> Δ+4 {} <POP 23908-23910 Epilogue> Σ0
@ 23910 <POP 23910-23a72 Body> <POP 23910-23926 Prologue> Σ0 ↓ <POP 23926-23942 RegCacheLoad> Σ0 ↓ <POP 23942-23a6a Naked> Σ0 ↓ <Blob 0x23942 [4] @> Δ-4 {[«4""»]} <Blob 0x23946 [4] @> Δ-4 {[«4""»]|[«4""»]} <Blob 0x2394a [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]} <POP 2394e-23950 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]} <Lit 0x23950 12> {[«4""»]|[«4""»]|[«4""»]|[$$SELFTEST.HEX]} <POP 2395a-2395c StackAdj> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[$$SELFTEST.HEX]|[-2-]} <POP 2395c-2395d StackAdj> Δ+2 {[«4""»]|[«4""»]|[«4""»]|[$$SELFTEST.HEX]} <Const 0x2395d 0x21.2> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[$$SELFTEST.HEX]|[#33]} <Call 0x2395e 0x237c6> {[«4""»]|[«4""»]|[«4""»]|[$$SELFTEST.HEX]|[#33]} <POP 23960-23962 StackAdj> Δ+14 {[«4""»]} <POP 23962-23963 StackAdj> Δ+4 {} <Blob 0x23963 [4] @> Δ-4 {[«4""»]} <Blob 0x23966 [4] @> Δ-4 {[«4""»]|[«4""»]} <POP 2396a-2396c StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]} <Lit 0x2396c 8> {[«4""»]|[«4""»]|[$$BOOT.HEX]} <POP 23976-23978 StackAdj> Δ-2 {[«4""»]|[«4""»]|[$$BOOT.HEX]|[-2-]} <POP 23978-23979 StackAdj> Δ+2 {[«4""»]|[«4""»]|[$$BOOT.HEX]} <Const 0x23979 0x19.2> Δ-2 {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]} <Call 0x2397a 0x237c6> {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]} <MI 2397c MOVEA.L A7,A0> {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]} <MI 2397e LEA.L 0x2095e,A1> {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]} <BlockMove 13,A1,A0> {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]} <POP 2398a-2398c StackAdj> Δ-4 {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]|[-4-]} <Lit 0x2398c> {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]|[$$…]} <Pointer.sp 0x2398c 4> Δ-4 <Const 0x23990 0x1.2> Δ-2 <Const 0x23992 0xd.2> Δ-2 <Call 0x23994 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 23996-23998 StackAdj> Δ+8 <POP 23996-23998 StackAdj> Δ-2 {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]|[$$…]|[-2-]} <POP 23998-23999 StackAdj> Δ+2 {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]|[$$…]} <Const 0x23999 0x17.2> Δ-2 {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]|[$$…]|[#23]} <Call 0x2399c 0x237c6> {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]|[$$…]|[#23]} <POP 2399e-2399f StackAdj> Δ+20 ↓ {} <Blob 0x2399f [12] @> Δ-12 {[«12""»]} <POP 239ae-239b0 StackAdj> Δ-4 {[«12""»]|[-4-]} <Lit 0x239b0 11> {[«12""»]|[$$NETWORK.HEX]} <POP 239bc-239be StackAdj> Δ-2 {[«12""»]|[$$NETWORK.HEX]|[-2-]} <POP 239be-239bf StackAdj> Δ+2 {[«12""»]|[$$NETWORK.HEX]} <Const 0x239bf 0x15.2> Δ-2 {[«12""»]|[$$NETWORK.HEX]|[#21]} <Call 0x239c2 0x237c6> {[«12""»]|[$$NETWORK.HEX]|[#21]} <POP 239c4-239c8 StackAdj> Δ+18 {} <Call 0x239c8 0x103dc> {} WriteConsoleCrLf(void) <MI 239ce CLR.B -(A7)> Δ-2 {[#0]} <Call 0x239d0 0x235ba> {[#0]} <POP 239d4-239d6 StackAdj> Δ+2 {} <Blob 0x239d6 [4] @> Δ-4 {[«4""»]} <Blob 0x239da [4] @> Δ-4 {[«4""»]|[«4""»]} <Blob 0x239de [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]} <POP 239e2-239e4 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]} <Lit 0x239e4 12> {[«4""»]|[«4""»]|[«4""»]|[$$SELFTEST.HEX]} <POP 239ee-239f0 StackAdj> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[$$SELFTEST.HEX]|[-2-]} <POP 239f0-239f1 StackAdj> Δ+2 {[«4""»]|[«4""»]|[«4""»]|[$$SELFTEST.HEX]} <Const 0x239f1 0x21.2> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[$$SELFTEST.HEX]|[#33]} <Call 0x239f2 0x23846> {[«4""»]|[«4""»]|[«4""»]|[$$SELFTEST.HEX]|[#33]} <POP 239f4-239f6 StackAdj> Δ+14 {[«4""»]} <POP 239f6-239f7 StackAdj> Δ+4 {} <Blob 0x239f7 [4] @> Δ-4 {[«4""»]} <Blob 0x239fa [4] @> Δ-4 {[«4""»]|[«4""»]} <POP 239fe-23a00 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]} <Lit 0x23a00 8> {[«4""»]|[«4""»]|[$$BOOT.HEX]} <POP 23a0a-23a0c StackAdj> Δ-2 {[«4""»]|[«4""»]|[$$BOOT.HEX]|[-2-]} <POP 23a0c-23a0d StackAdj> Δ+2 {[«4""»]|[«4""»]|[$$BOOT.HEX]} <Const 0x23a0d 0x19.2> Δ-2 {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]} <Call 0x23a0e 0x23846> {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]} <MI 23a10 MOVEA.L A7,A0> {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]} <MI 23a12 LEA.L 0x2098c,A1> {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]} <BlockMove 13,A1,A0> {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]} <POP 23a1e-23a20 StackAdj> Δ-4 {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]|[-4-]} <Lit 0x23a20> {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]|[$$…]} <Pointer.sp 0x23a20 4> Δ-4 <Const 0x23a24 0x1.2> Δ-2 <Const 0x23a26 0xd.2> Δ-2 <Call 0x23a28 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 23a2a-23a2c StackAdj> Δ+8 <POP 23a2a-23a2c StackAdj> Δ-2 {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]|[$$…]|[-2-]} <POP 23a2c-23a2d StackAdj> Δ+2 {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]|[$$…]} <Const 0x23a2d 0x17.2> Δ-2 {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]|[$$…]|[#23]} <Call 0x23a30 0x23846> {[«4""»]|[«4""»]|[$$BOOT.HEX]|[#25]|[$$…]|[#23]} <POP 23a32-23a33 StackAdj> Δ+20 ↓ {} <Blob 0x23a33 [12] @> Δ-12 {[«12""»]} <POP 23a42-23a44 StackAdj> Δ-4 {[«12""»]|[-4-]} <Lit 0x23a44 11> {[«12""»]|[$$NETWORK.HEX]} <POP 23a50-23a52 StackAdj> Δ-2 {[«12""»]|[$$NETWORK.HEX]|[-2-]} <POP 23a52-23a53 StackAdj> Δ+2 {[«12""»]|[$$NETWORK.HEX]} <Const 0x23a53 0x15.2> Δ-2 {[«12""»]|[$$NETWORK.HEX]|[#21]} <Call 0x23a56 0x23846> {[«12""»]|[$$NETWORK.HEX]|[#21]} <POP 23a58-23a5c StackAdj> Δ+16 {[-2-]} <POP 23a5c-23a5d StackAdj> Δ+2 {} <Const 0x23a5d 0x1.2> Δ-2 {[#1]} <Call 0x23a5e 0x235ba> {[#1]} <POP 23a62-23a64 StackAdj> Δ+2 {} <Call 0x23a64 0x103dc> {} WriteConsoleCrLf(void) <POP 23a6a-23a72 Epilogue> Σ0
@ 23a72 <LVAR 0x008 2(r)> <LVAR -0x006 @> <LVAR -0x00a @ 4(r)> <POP 23a72-23b48 Body> <POP 23a72-23a88 Prologue> Σ0 ↓ <POP 23a88-23a90 RegCacheLoad> Σ0 ↓ <POP 23a90-23b1a Naked> Σ0 Δ-20 ↓ →0x23b38 <MI 23a90 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']} <Pointer.fp 0x23a92 <LVAR -0x006 @>> Δ-4 {[2, '(A6+0x8)']|[@@-6]} <Pointer.fp 0x23a96 <LVAR -0x00a @ 4(r)>> Δ-4 {[2, '(A6+0x8)']|[@@-6]|[@@-10]} <Call 0x23a9a 0x21388> {[2, '(A6+0x8)']|[@@-6]|[@@-10]} <POP 23a9e-23aa0 StackAdj> Δ+6 {[2, '(A6+0x8)']|[-2-]} <POP 23aa0-23aa1 StackAdj> Δ+4 {} <Blob 0x23aa1 [4] @> Δ-4 {[«4""»]} <Blob 0x23aa4 [4] @> Δ-4 {[«4""»]|[«4""»]} <POP 23aa8-23aaa StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]} <MI 23aaa MOVE.L (A6-0xa),-(A7)> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, '(A6-0xa)']} <POP 23aae-23ab0 StackAdj> Δ-4 {[«4""»]|[«4""»]|[-4-]|[4, '(A6-0xa)']|[-4-]} <Lit 0x23ab0 8> {[«4""»]|[«4""»]|[-4-]|[4, '(A6-0xa)']|[$$ EEPROM:]} <Call 0x23ac2 0x102d0> {[«4""»]|[«4""»]|[-4-]|[4, '(A6-0xa)']|[$$ EEPROM:]} StringCat2(a, b : String) : String <POP 23ac8-23aca StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]} <Call 0x23aca 0x103d8> {[«4""»]|[«4""»]|[-4-]} WriteConsoleString(str : String) <POP 23ad0-23ad2 StackAdj> Δ+8 {[«4""»]} <MI 23ad2 MOVE.L (A4),(A7)> {[4, '(A4)']} <MI 23ad4 MOVE.W (A6+0x8),D0> {[4, '(A4)']} <MI 23ad6 EXTW.L D0> {[4, '(A4)']} <MI 23ad8 MOVE.L D0,-(A7)> Δ-4 {[4, '(A4)']|[4, 'D0']} <Const 0x23ada 0x1.2> Δ-2 {[4, '(A4)']|[4, 'D0']|[#1]} <Call 0x23adc 0x2227a> {[4, '(A4)']|[4, 'D0']|[#1]} <POP 23ae0-23ae4 StackAdj> Δ+10 {} <Call 0x23ae4 0x2369c> {} <Blob 0x23ae8 [20] @> Δ-20 {[«20""»]} <POP 23af8-23afa StackAdj> Δ-6 {[«20""»]|[-6-]} <Lit 0x23afa 19> {[«20""»]|[-2-]|[$$Update this EEPROM_]} <POP 23b0a-23b0c StackAdj> Δ-2 {[«20""»]|[-2-]|[$$Update this EEPROM_]|[-2-]} <POP 23b0c-23b0d StackAdj> Δ+2 {[«20""»]|[-2-]|[$$Update this EEPROM_]} <Const 0x23b0d 0x1.2> Δ-2 {[«20""»]|[-2-]|[$$Update this EEPROM_]|[#1]} <Call 0x23b0e 0x103f0> {[«20""»]|[-2-]|[$$Update this EEPROM_]|[#1]} AskOnConsoleYesNo(prompt : String; default : Bool) : Bool <POP 23b14-23b16 StackAdj> Δ+6 {[«20""»]|[-2-]} <MI 23b16 TST.B (A7)+> Δ+2 {[«20""»]} <MI 23b18 BEQ 0x23b38> {[«20""»]} <POP 23b1a-23b2e Naked> Σ-20 ↓ →0x23b34 <MI 23b1a CLR.B 0x25096> {[-20-]} <MI 23b20 CLR.W 0x290c2> {[-20-]} <MI 23b26 MOVE.W (A6+0x8),D0> {[-20-]} <MI 23b28 CMPI.W #0x0050,D0> {[-20-]} <MI 23b2c BGE 0x23b34> {[-20-]} <POP 23b2e-23b34 Naked> Σ-20 →0x23b38 <Call 0x23b2e 0x22dfa> {[-20-]} <MI 23b32 BRA 0x23b38> {[-20-]} <POP 23b34-23b38 Naked> Σ-20 ↓ ←0x23b1a <Call 0x23b34 0x2302e> {[-20-]} <POP 23b38-23b40 Naked> Σ-20 Δ+20 ↓ ←0x23a90 ←0x23b2e <POP 23b38-23b3a StackAdj> Δ+20 {} <Call 0x23b3a 0x103dc> {} WriteConsoleCrLf(void) <POP 23b40-23b48 Epilogue> Σ0
@ 23b48 <LVAR 0x008 1(r)> <LVAR -0x006 @ 4(rw)> <LVAR -0x00a @ 4(rw)> <POP 23b48-23c56 Body> Δ+2 <POP 23b48-23b5e Prologue> Σ0 ↓ <POP 23b5e-23b6c RegCacheLoad> Σ0 ↓ <POP 23b6c-23b72 Naked> Σ0 ↓ →0x23b7a <MI 23b6c TST.B (A6+0x8)> {} <MI 23b70 BEQ 0x23b7a> {} <POP 23b72-23b7a Naked> Σ0 →0x23b80 <MI 23b72 MOVE.L 0x290b8,(A6-0xa)> {} <MI 23b78 BRA 0x23b80> {} <POP 23b7a-23b80 Naked> Σ0 ↓ ←0x23b6c <MI 23b7a MOVE.L 0x290b4,(A6-0xa)> {} <POP 23b80-23be2 Naked> Σ0 ↓ →0x23be8 ←0x23b72 <Blob 0x23b80 [22] @> Δ-22 {[«22""»]} <Blob 0x23b92 [4] @> Δ-4 {[«22""»]|[«4""»]} <POP 23b96-23b98 StackAdj> Δ-12 {[«22""»]|[«4""»]|[-12-]} <Lit 0x23b98 21> {[«22""»]|[«4""»]|[-8-]|[$$enter prom filename []} <MI 23ba6 MOVE.L (A6-0xa),(A7)> {[«22""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']} <POP 23ba0-23ba6 StackAdj> Δ-8 {[«22""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']|[-8-]} <Call 0x23ba8 0x102cc> {[«22""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']|[-8-]} StringDup(a : String) : String <Lit 0x23bae 4> {[«22""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']|[-4-]|[$$] :_]} <Call 0x23bc0 0x102d4> {[«22""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']|[-4-]|[$$] :_]} StringCat3(a, b, c : String) : String <POP 23bc6-23bc8 StackAdj> Δ+12 {[«22""»]|[«4""»]|[-8-]} <Call 0x23bc8 0x103e4> {[«22""»]|[«4""»]|[-8-]} AskConsoleString(prompt : String) : String <POP 23bce-23bd0 StackAdj> Δ+4 {[«22""»]|[«4""»]|[-4-]} <MI 23bd0 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«22""»]|[«4""»]} <POP 23bd4-23bd8 StackAdj> Δ+26 {} <MI 23bd8 MOVEA.L (A6-0x6),A0> {} <MI 23bdc MOVE.W (A0),D0> {} <MI 23bde CMP.W #0x01,D0> {} <MI 23be0 BLE 0x23be8> {} <POP 23be2-23be8 Naked> Σ0 →0x23bf4 <MI 23be2 MOVE.L (A6-0x6),(A6-0xa)> {} <MI 23be6 BRA 0x23bf4> {} <POP 23be8-23bf4 Naked> Σ0 ↓ ←0x23b80 <Pointer.fp 0x23be8 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]} <Call 0x23bec 0x102bc> {[@@-6]} FreeString(VAR a : String) <POP 23bf2-23bf4 StackAdj> Δ+4 {} <POP 23bf4-23c02 Naked> Σ0 ↓ →0x23c20 ←0x23be2 <MI 23bf4 CLR.B -(A7)> Δ-2 {[#0]} <Call 0x23bf6 0x235ba> {[#0]} <POP 23bfa-23bfc StackAdj> Δ+2 {} <MI 23bfc TST.B (A6+0x8)> {} <MI 23c00 BEQ 0x23c20> {} <POP 23c02-23c20 Naked> Σ0 Δ-2 →0x23c3a <Const 0x23c02 0x50.2> Δ-2 {[#80]} <MI 23c06 LEA.L (A6-0xa),A4> {[#80]} <Call 0x23c08 0x23a72> {[#80]} <POP 23c0a-23c0b StackAdj> Δ+2 {} <Const 0x23c0b 0x51.2> Δ-2 {[#81]} <MI 23c0e LEA.L (A6-0xa),A4> {[#81]} <Call 0x23c10 0x23a72> {[#81]} <POP 23c12-23c13 StackAdj> Δ+2 {} <Const 0x23c13 0x52.2> Δ-2 {[#82]} <MI 23c16 LEA.L (A6-0xa),A4> {[#82]} <Call 0x23c18 0x23a72> {[#82]} <POP 23c1a-23c1b StackAdj> Δ+2 {} <Const 0x23c1b 0x53.2> Δ-2 {[#83]} <MI 23c1e BRA 0x23c3a> {[#83]} <POP 23c20-23c3a Naked> Σ0 Δ-2 ↓ ←0x23bf4 <Const 0x23c20 0x21.2> Δ-2 {[#33]} <MI 23c24 LEA.L (A6-0xa),A4> {[#33]} <Call 0x23c26 0x23a72> {[#33]} <POP 23c28-23c29 StackAdj> Δ+2 {} <Const 0x23c29 0x19.2> Δ-2 {[#25]} <MI 23c2c LEA.L (A6-0xa),A4> {[#25]} <Call 0x23c2e 0x23a72> {[#25]} <POP 23c30-23c31 StackAdj> Δ+2 {} <Const 0x23c31 0x17.2> Δ-2 {[#23]} <MI 23c34 LEA.L (A6-0xa),A4> {[#23]} <Call 0x23c36 0x23a72> {[#23]} <POP 23c38-23c39 StackAdj> Δ+2 {} <Const 0x23c39 0x15.2> Δ-2 {[#21]} <POP 23c3a-23c4e Naked> Σ-2 Δ+2 ↓ ←0x23c02 <MI 23c3a LEA.L (A6-0xa),A4> {[-2-]} <Call 0x23c3c 0x23a72> {[-2-]} <POP 23c3e-23c40 StackAdj> Δ+2 {} <Const 0x23c40 0x1.2> Δ-2 {[#1]} <Call 0x23c42 0x235ba> {[#1]} <POP 23c46-23c48 StackAdj> Δ+2 {} <Call 0x23c48 0x103dc> {} WriteConsoleCrLf(void) <POP 23c4e-23c56 Epilogue> Σ0
@ 23c56 <LVAR 0x008 4(w)> <POP 23c56-23cd0 Body> <POP 23c56-23c6c Prologue> Σ0 ↓ <POP 23c6c-23c7e RegCacheLoad> Σ0 ↓ <POP 23c7e-23cc8 Naked> Σ0 ↓ <MI 23c7e MOVE.L 0x250ac,D0> {} <MI 23c80 SUBQ.L #0x4,D0> {} <POP 0x23c82 LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {} <MI 23c88 ASL.L #0x1,D0> {} <MI 23c8a LEA.L 0x25088,A0> {} <MI 23c8c MOVE.W (A0+D0.L+#0x2a),D1> {} <MI 23c90 EXTW.L D1> {} <MI 23c92 ASL.L #0x8,D1> {} <MI 23c94 ASL.L #0x8,D1> {} <MI 23c96 MOVE.L 0x250ac,D0> {} <MI 23c98 SUBQ.L #0x3,D0> {} <POP 0x23c9a LimitCheck 0x0 ≤ D0 ≤ 0x1fff> {} <MI 23ca0 ASL.L #0x1,D0> {} <MI 23ca2 LEA.L 0x25088,A0> {} <MI 23ca4 MOVE.W (A0+D0.L+#0x2a),D0> {} <MI 23ca8 ASL.W #0x8,D0> {} <MI 23caa EXTW.L D0> {} <MI 23cac ADD.L D1,D0> {} <MI 23cae MOVE.L 0x250ac,D1> {} <MI 23cb0 SUBQ.L #0x2,D1> {} <POP 0x23cb2 LimitCheck 0x0 ≤ D1 ≤ 0x1fff> {} <MI 23cb8 ASL.L #0x1,D1> {} <MI 23cba LEA.L 0x25088,A0> {} <MI 23cbc MOVE.W (A0+D1.L+#0x2a),D2> {} <MI 23cc0 EXTW.L D2> {} <MI 23cc2 ADD.L D0,D2> {} <MI 23cc4 MOVE.L D2,(A6+0x8)> {} <POP 23cc8-23cd0 Epilogue> Σ0
@ 23cd0 <LVAR 0x008 4(w)> <POP 23cd0-23d42 Body> <POP 23cd0-23ce6 Prologue> Σ0 ↓ <POP 23ce6-23cf6 RegCacheLoad> Σ0 ↓ <POP 23cf6-23d3a Naked> Σ0 ↓ <POP 23cf6-23cf8 StackAdj> Δ-2 {[-2-]} <MI 23cf8 MOVE.L 0x250a8,D0> {[-2-]} <MI 23cfa ADD.L 0x250ac,D0> {[-2-]} <MI 23cfc SUBQ.L #0x4,D0> {[-2-]} <MI 23cfe MOVE.L D0,-(A7)> Δ-4 {[-2-]|[4, 'D0']} <Call 0x23d00 0x224a8> {[-2-]|[4, 'D0']} <POP 23d02-23d04 StackAdj> Δ+4 {[-2-]} <MI 23d04 MOVE.W (A7)+,D0> Δ+2 {} <MI 23d06 EXTW.L D0> {} <MI 23d08 ASL.L #0x8,D0> {} <MI 23d0a ASL.L #0x8,D0> {} <POP 23d0c-23d0e StackAdj> Δ-2 {[-2-]} <MI 23d0e MOVE.L 0x250a8,D1> {[-2-]} <MI 23d10 ADD.L 0x250ac,D1> {[-2-]} <MI 23d12 SUBQ.L #0x3,D1> {[-2-]} <MI 23d14 MOVE.L D1,-(A7)> Δ-4 {[-2-]|[4, 'D1']} <Call 0x23d16 0x224a8> {[-2-]|[4, 'D1']} <POP 23d18-23d1a StackAdj> Δ+4 {[-2-]} <MI 23d1a MOVE.W (A7)+,D1> Δ+2 {} <MI 23d1c ASL.W #0x8,D1> {} <MI 23d1e EXTW.L D1> {} <MI 23d20 ADD.L D0,D1> {} <POP 23d22-23d24 StackAdj> Δ-2 {[-2-]} <MI 23d24 MOVE.L 0x250a8,D0> {[-2-]} <MI 23d26 ADD.L 0x250ac,D0> {[-2-]} <MI 23d28 SUBQ.L #0x2,D0> {[-2-]} <MI 23d2a MOVE.L D0,-(A7)> Δ-4 {[-2-]|[4, 'D0']} <Call 0x23d2c 0x224a8> {[-2-]|[4, 'D0']} <POP 23d2e-23d30 StackAdj> Δ+4 {[-2-]} <MI 23d30 MOVE.W (A7)+,D0> Δ+2 {} <MI 23d32 EXTW.L D0> {} <MI 23d34 ADD.L D1,D0> {} <MI 23d36 MOVE.L D0,(A6+0x8)> {} <POP 23d3a-23d42 Epilogue> Σ0
@ 23d42 <LVAR 0x008 2(r)> <LVAR -0x006 @ 4(r)> <LVAR -0x00a @> <LVAR -0x00e @ 4(r)> <POP 23d42-23f90 Body> Δ+4 <POP 23d42-23d58 Prologue> Σ0 ↓ <POP 23d58-23d6a RegCacheLoad> Σ0 ↓ <POP 23d6a-23d98 Naked> Σ0 ↓ →0x23da0 <MI 23d6a MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']} <Pointer.fp 0x23d6e <LVAR -0x00a @>> Δ-4 {[2, '(A6+0x8)']|[@@-10]} <Pointer.fp 0x23d72 <LVAR -0x00e @ 4(r)>> Δ-4 {[2, '(A6+0x8)']|[@@-10]|[@@-14]} <Call 0x23d76 0x21388> {[2, '(A6+0x8)']|[@@-10]|[@@-14]} <POP 23d7a-23d7c StackAdj> Δ+6 {[2, '(A6+0x8)']|[-2-]} <MI 23d7c MOVE.L (A4),(A7)> {[4, '(A4)']} <MI 23d7e MOVE.W (A6+0x8),D0> {[4, '(A4)']} <MI 23d82 EXTW.L D0> {[4, '(A4)']} <MI 23d84 MOVE.L D0,-(A7)> Δ-4 {[4, '(A4)']|[4, 'D0']} <MI 23d86 CLR.B -(A7)> Δ-2 {[4, '(A4)']|[4, 'D0']|[#0]} <Call 0x23d88 0x2227a> {[4, '(A4)']|[4, 'D0']|[#0]} <POP 23d8c-23d90 StackAdj> Δ+10 {} <MI 23d90 MOVE.W (A6+0x8),D0> {} <MI 23d94 CMP.W #0x50,D0> {} <MI 23d96 BGE 0x23da0> {} <POP 23d98-23da0 Naked> Σ0 Δ-4 →0x23da6 <Pointer.fp 0x23d98 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]} <Call 0x23d9a 0x22990> {[@@-6]} <MI 23d9e BRA 0x23da6> {[@@-6]} <POP 23da0-23da6 Naked> Σ0 Δ-4 ↓ ←0x23d6a <Pointer.fp 0x23da0 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]} <Call 0x23da2 0x22a52> {[@@-6]} <POP 23da6-23e38 Naked> Σ-4 ↓ →0x23e96 ←0x23d98 <POP 23da6-23da8 StackAdj> Δ+4 {} <Blob 0x23da8 [4] @> Δ-4 {[«4""»]} <Blob 0x23dac [4] @> Δ-4 {[«4""»]|[«4""»]} <Blob 0x23db0 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]} <Blob 0x23db4 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]} <Blob 0x23db8 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]} <Blob 0x23dbc [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]} <Blob 0x23dc0 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]} <Blob 0x23dc4 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]} <POP 23dc8-23dca StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]} <MI 23dca MOVE.L (A6-0xe),-(A7)> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[4, '(A6-0xe)']} <Const 0x23dce 0x8.4> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[4, '(A6-0xe)']|[##8]} <Call 0x23dd2 0x102f8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[4, '(A6-0xe)']|[##8]} LeftPad(a : String; b : Long) : String <POP 23dd8-23dda StackAdj> Δ+4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[4, '(A6-0xe)']} <Lit 0x23dda 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[$$: prom revision_]} <Call 0x23de4 0x23cd0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[$$: prom revision_]} <POP 23de2-23de4 StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[$$: prom revision_]|[-8-]} <Const 0x23de8 0x6.4> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[$$: prom revision_]|[-8-]|[##6]} <Call 0x23dec 0x102e8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[$$: prom revision_]|[-8-]|[##6]} Long2HexString(val : Long; ndig : Long) : String <POP 23df2-23df4 StackAdj> Δ+4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[$$: prom revision_]|[-8-]} <Lit 0x23df4 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[$$: prom revision_]|[-4-]|[$$, file revision_]} <Call 0x23dfe 0x23c56> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[$$: prom revision_]|[-4-]|[$$, file revision_]} <POP 23dfc-23dfe StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[$$: prom revision_]|[-4-]|[$$, file revision_]|[-8-]} <Const 0x23e02 0x6.4> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[$$: prom revision_]|[-4-]|[$$, file revision_]|[-8-]|[##6]} <Call 0x23e06 0x102e8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[$$: prom revision_]|[-4-]|[$$, file revision_]|[-8-]|[##6]} Long2HexString(val : Long; ndig : Long) : String <POP 23e0c-23e0e StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[$$: prom revision_]|[-4-]|[$$, file revision_]|[-4-]} <Call 0x23e0e 0x102dc> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]|[$$: prom revision_]|[-4-]|[$$, file revision_]|[-4-]} StringCat5(a, b, c, d, e : String) : String <POP 23e14-23e16 StackAdj> Δ+20 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]} <Call 0x23e16 0x103d8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]} WriteConsoleString(str : String) <POP 23e1c-23e20 StackAdj> Δ+36 {} <MI 23e20 CLR.B (A4+D0.W+#0x5)> {} <POP 23e24-23e26 StackAdj> Δ-4 {[-4-]} <Call 0x23e26 0x23c56> {[-4-]} <POP 23e2a-23e2c StackAdj> Δ-4 {[-8-]} <Call 0x23e2c 0x23cd0> {[-8-]} <MI 23e30 MOVE.L (A7+0x4),D1> {[-8-]} <MI 23e34 CMP.L (A7)+,D1> Δ+4 {[-4-]} <MI 23e36 BGE 0x23e96> {[-4-]} <POP 23e38-23e96 Naked> Σ-4 →0x23f54 <Blob 0x23e38 [24] @> Δ-24 {[-4-]|[«24""»]} <POP 23e44-23e46 StackAdj> Δ-4 {[-4-]|[«24""»]|[-4-]} <Lit 0x23e46 24> {[-4-]|[«24""»]|[$$ - prom newer than file!]} <Call 0x23e54 0x103e0> {[-4-]|[«24""»]|[$$ - prom newer than file!]} WriteConsoleStringCrLf(str : String) <POP 23e5a-23e5b StackAdj> Δ+28 ↓ {[-4-]} <Blob 0x23e5b [32] @> Δ-32 {[-4-]|[«32""»]} <POP 23e6a-23e6c StackAdj> Δ-6 {[-4-]|[«32""»]|[-6-]} <Lit 0x23e6c 31> {[-4-]|[«32""»]|[-2-]|[$$Do you want to update this prom]} <POP 23e78-23e7a StackAdj> Δ-2 {[-4-]|[«32""»]|[-2-]|[$$Do you want to update this prom]|[-2-]} <MI 23e7a CLR.B (A7)> {[-4-]|[«32""»]|[-2-]|[$$Do you want to update this prom]|[-2-]} <Call 0x23e7c 0x103f0> {[-4-]|[«32""»]|[-2-]|[$$Do you want to update this prom]|[-2-]} AskOnConsoleYesNo(prompt : String; default : Bool) : Bool <POP 23e82-23e84 StackAdj> Δ+6 {[-4-]|[«32""»]|[-2-]} <MI 23e84 MOVE.B (A7)+,D1> Δ+2 {[-4-]|[«32""»]} <MI 23e86 EXTB.W D1> {[-4-]|[«32""»]} <POP 0x23e88 LimitCheck 0x0 ≤ D1 ≤ 0x1> {[-4-]|[«32""»]} <POP 23e8a-23e8e StackAdj> Δ+32 {[-4-]} <MI 23e8e MOVE.B D1,(A4+D0.W+#0x5)> {[-4-]} <MI 23e92 BRA 0x23f54> {[-4-]} <POP 23e96-23eaa Naked> Σ-4 Δ-4 ↓ →0x23ed6 ←0x23da6 <POP 23e96-23e98 StackAdj> Δ-4 {[-8-]} <Call 0x23e98 0x23c56> {[-8-]} <POP 23e9c-23e9e StackAdj> Δ-4 {[-12-]} <Call 0x23e9e 0x23cd0> {[-12-]} <MI 23ea2 MOVE.L (A7+0x4),D1> {[-12-]} <MI 23ea6 CMP.L (A7)+,D1> Δ+4 {[-8-]} <MI 23ea8 BLE 0x23ed6> {[-8-]} <POP 23eaa-23ed0 Naked> Σ-8 ↓ <Blob 0x23eaa [22] @> Δ-22 {[-8-]|[«22""»]} <POP 23eb6-23eb8 StackAdj> Δ-4 {[-8-]|[«22""»]|[-4-]} <Lit 0x23eb8 22> {[-8-]|[«22""»]|[$$ - PROM needs updating]} <Call 0x23ec6 0x103e0> {[-8-]|[«22""»]|[$$ - PROM needs updating]} WriteConsoleStringCrLf(str : String) <POP 23ecc-23ed0 StackAdj> Δ+26 {[-8-]} <POP 23ed0-23ed6 Naked> Σ-8 →0x23f52 ←0x23eda <MI 23ed0 MOVE.B #0x01,(A4+D0.W+#0x5)> {[-8-]} <MI 23ed4 BRA 0x23f52> {[-8-]} <POP 23ed6-23eda Naked> Σ-8 ↓ →0x23f28 ←0x23e96 <MI 23ed6 TST.L (A6-0x6)> {[-8-]} <MI 23ed8 BLE 0x23f28> {[-8-]} <POP 23eda-23f28 Naked> Σ-8 →0x23ed0 <Blob 0x23eda [22] @> Δ-22 {[-8-]|[«22""»]} <POP 23ee6-23ee8 StackAdj> Δ-4 {[-8-]|[«22""»]|[-4-]} <Lit 0x23ee8 22> {[-8-]|[«22""»]|[$$ - PROM needs updating]} <Call 0x23ef6 0x103e0> {[-8-]|[«22""»]|[$$ - PROM needs updating]} WriteConsoleStringCrLf(str : String) <POP 23efc-23f00 StackAdj> Δ+26 {[-8-]} <Blob 0x23f00 [64] @> Δ-64 {[-8-]|[«64""»]} <POP 23f0c-23f0e StackAdj> Δ-4 {[-8-]|[«64""»]|[-4-]} <Lit 0x23f0e 64> {[-8-]|[«64""»]|[$$ (the revision dates are identical but the data does not match)]} <Call 0x23f1c 0x103e0> {[-8-]|[«64""»]|[$$ (the revision dates are identical but the data does not match)]} WriteConsoleStringCrLf(str : String) <POP 23f22-23f26 StackAdj> Δ+68 {[-8-]} <MI 23f26 BRA 0x23ed0> {[-8-]} <POP 23f28-23f52 Naked> Σ-8 ↓ ←0x23ed6 <Blob 0x23f28 [20] @> Δ-20 {[-8-]|[«20""»]} <POP 23f38-23f3a StackAdj> Δ-4 {[-8-]|[«20""»]|[-4-]} <Lit 0x23f3a 19> {[-8-]|[«20""»]|[$$ - OK, won't update]} <Call 0x23f48 0x103e0> {[-8-]|[«20""»]|[$$ - OK, won't update]} WriteConsoleStringCrLf(str : String) <POP 23f4e-23f52 StackAdj> Δ+24 {[-8-]} <POP 23f52-23f54 Naked> Σ-8 Δ+4 ↓ ←0x23ed0 <POP 23f52-23f54 StackAdj> Δ+4 {[-4-]} <POP 23f54-23f5c Naked> Σ-4 Δ+4 ↓ →0x23f88 ←0x23e38 <POP 23f54-23f56 StackAdj> Δ+4 {} <MI 23f56 TST.B (A4+D0.W+#0x5)> {} <MI 23f5a BEQ 0x23f88> {} <POP 23f5c-23f68 Naked> Σ0 ↓ →0x23f84 <MI 23f5c MOVE.B #0x01,(A4+0x4)> {} <MI 23f60 ADDQ.L #0x5,(A4+0x106)> {} <MI 23f64 CMP.W #0x50,D0> {} <MI 23f66 BGE 0x23f84> {} <POP 23f68-23f84 Naked> Σ0 →0x23f88 <MI 23f68 MOVE.L (A6-0x6),D4> {} <MI 23f6a MOVEQ.L #0x0c,D3> {} <Call 0x23f6c 0x1028c> {} ?muls_d3_d4 <MI 23f72 MOVE.L #0x3e8,D3> {} <Call 0x23f78 0x10294> {} ?divs_d3_d4 <MI 23f7e ADD.L D4,(A4+0x106)> {} <MI 23f82 BRA 0x23f88> {} <POP 23f84-23f88 Naked> Σ0 ↓ ←0x23f5c <MI 23f84 ADDQ.L #0x6,(A4+0x106)> {} <POP 23f88-23f90 Epilogue> Σ0 ←0x23f54 ←0x23f68
@ 23f90 <LVAR 0x008 2(r)> <LVAR -0x006 @> <LVAR -0x00a @ 4(r)> <POP 23f90-2402a Body> <POP 23f90-23fa6 Prologue> Σ0 ↓ <POP 23fa6-23fa8 RegCacheLoad> Σ0 ↓ <POP 23fa8-23fb2 Naked> Σ0 ↓ →0x24022 <MI 23fa8 MOVE.W (A6+0x8),D0> {} <MI 23fac TST.B (A4+D0.W+#0x5)> {} <MI 23fb0 BEQ 0x24022> {} <POP 23fb2-24018 Naked> Σ0 ↓ →0x2401e <MI 23fb2 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']} <Pointer.fp 0x23fb4 <LVAR -0x006 @>> Δ-4 {[2, 'D0']|[@@-6]} <Pointer.fp 0x23fb8 <LVAR -0x00a @ 4(r)>> Δ-4 {[2, 'D0']|[@@-6]|[@@-10]} <Call 0x23fbc 0x21388> {[2, 'D0']|[@@-6]|[@@-10]} <POP 23fc0-23fc2 StackAdj> Δ+6 {[2, 'D0']|[-2-]} <POP 23fc2-23fc3 StackAdj> Δ+4 {} <Blob 0x23fc3 [4] @> Δ-4 {[«4""»]} <Blob 0x23fc6 [4] @> Δ-4 {[«4""»]|[«4""»]} <Blob 0x23fca [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]} <Blob 0x23fce [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]} <POP 23fd2-23fd4 StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]} <Lit 0x23fd4 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Updating EEPROM_]} <POP 23fe4-23fe6 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Updating EEPROM_]|[-4-]} <MI 23fe6 MOVE.L (A6-0xa),(A7)> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Updating EEPROM_]|[4, '(A6-0xa)']} <Call 0x23fea 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Updating EEPROM_]|[4, '(A6-0xa)']} StringCat2(a, b : String) : String <POP 23ff0-23ff2 StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]} <Call 0x23ff2 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 23ff8-23ffa StackAdj> Δ+16 {[«4""»]} <MI 23ffa MOVE.L (A4),(A7)> {[4, '(A4)']} <MI 23ffc MOVE.W D0,D1> {[4, '(A4)']} <MI 23ffe EXTW.L D1> {[4, '(A4)']} <MI 24000 MOVE.L D1,-(A7)> Δ-4 {[4, '(A4)']|[4, 'D1']} <MI 24002 CLR.B -(A7)> Δ-2 {[4, '(A4)']|[4, 'D1']|[#0]} <Call 0x24004 0x2227a> {[4, '(A4)']|[4, 'D1']|[#0]} <POP 24008-2400c StackAdj> Δ+10 {} <MI 2400c CLR.B 0x25096> {} <MI 24012 CMPI.W #0x0050,D0> {} <MI 24016 BGE 0x2401e> {} <POP 24018-2401e Naked> Σ0 →0x24022 <Call 0x24018 0x22dfa> {} <MI 2401c BRA 0x24022> {} <POP 2401e-24022 Naked> Σ0 ↓ ←0x23fb2 <Call 0x2401e 0x2302e> {} <POP 24022-2402a Epilogue> Σ0 ←0x23fa8 ←0x24018
@ 2402a <POP 2402a-24062 Body> <POP 2402a-2403c Prologue> Σ0 ↓ <POP 2403c-2405e Naked> Σ0 ↓ <Blob 0x2403c [2] @> Δ-2 {[«2""»]} <POP 24040-24042 StackAdj> Δ-4 {[«2""»]|[-4-]} <Lit 0x24042 2> {[«2""»]|[$$. ]} <Call 0x24056 0x103e0> {[«2""»]|[$$. ]} WriteConsoleStringCrLf(str : String) <POP 2405c-2405e StackAdj> Δ+6 {} <POP 2405e-24062 Epilogue> Σ0
@ 24062 <LVAR -0x00a 4(rw)> <LVAR -0x0bb 1(w)> <LVAR -0x10c 1(rw)> <LVAR -0x110 @ 4(w)> <POP 24062-2442c Body> <POP 24062-24078 Prologue> Σ0 ↓ <POP 24078-2408e RegCacheLoad> Σ0 ↓ <POP 2408e-240fc Naked> Σ0 ↓ →0x2418e <Blob 0x2408e [52] @> Δ-52 {[«52""»]} <POP 240a0-240a2 StackAdj> Δ-4 {[«52""»]|[-4-]} <Lit 0x240a2 51> {[«52""»]|[$$Comparing the new prom files to the actual EEPROMs:]} <Call 0x240b4 0x103e0> {[«52""»]|[$$Comparing the new prom files to the actual EEPROMs:]} WriteConsoleStringCrLf(str : String) <POP 240ba-240be StackAdj> Δ+56 {} <MI 240be CLR.B (A6-0x10c)> {} <MI 240c2 MOVE.L #0x01,(A6-0xa)> {} <MI 240c6 MOVE.L 0x290b4,(A6-0x110)> {} <Const 0x240cc 0x21.2> Δ-2 {[#33]} <MI 240ce LEA.L (A6-0x110),A4> {[#33]} <Call 0x240d0 0x23d42> {[#33]} <POP 240d4-240d5 StackAdj> Δ+2 {} <Const 0x240d5 0x19.2> Δ-2 {[#25]} <MI 240d6 LEA.L (A6-0x110),A4> {[#25]} <Call 0x240d8 0x23d42> {[#25]} <POP 240dc-240dd StackAdj> Δ+2 {} <Const 0x240dd 0x17.2> Δ-2 {[#23]} <MI 240e0 LEA.L (A6-0x110),A4> {[#23]} <Call 0x240e2 0x23d42> {[#23]} <POP 240e6-240e7 StackAdj> Δ+2 {} <Const 0x240e7 0x15.2> Δ-2 {[#21]} <MI 240e8 LEA.L (A6-0x110),A4> {[#21]} <Call 0x240ea 0x23d42> {[#21]} <POP 240ee-240f0 StackAdj> Δ+2 {} <MI 240f0 CLR.W 0x290c0> {} <MI 240f6 TST.W 0x290be> {} <MI 240f8 BLE 0x2418e> {} <POP 240fc-24118 Naked> Σ0 ↓ →0x24152 <POP 240fc-240fe StackAdj> Δ-2 {[-2-]} <Const 0x240fe 0x105.4> Δ-4 {[-2-]|[##261]} <Call 0x24102 0x10592> {[-2-]|[##261]} ReadConfig(where : Long) : Word <POP 24108-2410a StackAdj> Δ+4 {[-2-]} <MI 2410a MOVE.W (A7)+,D0> Δ+2 {} <POP 0x2410c LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 2410e MOVE.W D0,D7> {} <MI 24110 CMP.W 0x290bc,D7> {} <MI 24116 BLT 0x24152> {} <POP 24118-2411c Naked> Σ0 ↓ →0x24152 <MI 24118 CMP.W 0x290be,D7> {} <MI 2411a BGE 0x24152> {} <POP 2411c-24152 Naked> Σ0 →0x2418e <MI 2411c MOVE.W 0x290be,0x290c0> {} <MI 24122 MOVE.B #0x01,(A6-0x10c)> {} <Blob 0x24126 [54] @> Δ-54 {[«54""»]} <POP 24132-24134 StackAdj> Δ-4 {[«54""»]|[-4-]} <Lit 0x24134 54> {[«54""»]|[$$the IOC board revision # in the EEPROM will be updated]} <Call 0x24146 0x103e0> {[«54""»]|[$$the IOC board revision # in the EEPROM will be updated]} WriteConsoleStringCrLf(str : String) <POP 2414c-24150 StackAdj> Δ+58 {} <MI 24150 BRA 0x2418e> {} <POP 24152-2415a Naked> Σ0 ↓ →0x2418e ←0x240fc ←0x24118 <MI 24152 CMP.W 0x290bc,D7> {} <MI 24158 BGE 0x2418e> {} <POP 2415a-2418e Naked> Σ0 ↓ <POP 2415a-2415c StackAdj> Δ-4 {[-4-]} <POP 2415c-2415d StackAdj> Δ+2 {[-2-]} <Blob 0x2415d [2] @> Δ-2 {[-2-]|[«2""»]} <MI 24160 MOVE.B 0x20b31,(A7+0x1)> {[-2-]|[«2""»]} <MI 24166 MOVE.B 0x20b32,(A7+0x2)> {[-2-]|[«2""»]} <POP 2416c-2416e StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]} <Lit 0x2416e> {[-2-]|[«2""»]|[$$…]} <Pointer.sp 0x2416e 4> Δ-4 <Const 0x24172 0x1.2> Δ-2 <Const 0x24174 0x3.2> Δ-2 <Call 0x24178 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 2417e-24180 StackAdj> Δ+8 <POP 0x24180 LimitCheck 0x0 ≤ D7 ≤ 0xff> {[-2-]|[«2""»]|[$$…]} <MI 24182 MOVE.W D7,-(A7)> Δ-2 {[-2-]|[«2""»]|[$$…]|[2, 'D7']} <Blob 0x24184 [2] 0x290be> Δ-2 {[-2-]|[«2""»]|[$$…]|[2, 'D7']|[«2»]} <Call 0x24186 0x2402a> {[-2-]|[«2""»]|[$$…]|[2, 'D7']|[«2»]} <POP 2418a-2418e StackAdj> Δ+12 {} <POP 2418e-2419a Naked> Σ0 ↓ →0x241a8 ←0x2408e ←0x2411c ←0x24152 <POP 2418e-24190 StackAdj> Δ-2 {[-2-]} <Call 0x24190 0x10604> {[-2-]} Is_machine_type_three() : Bool <MI 24196 TST.B (A7)+> Δ+2 {} <MI 24198 BNE 0x241a8> {} <POP 2419a-241a8 Naked> Σ0 ↓ →0x2428a <POP 2419a-2419c StackAdj> Δ-2 {[-2-]} <Call 0x2419c 0x1060a> {[-2-]} Is_machine_type_four() : Bool <MI 241a2 TST.B (A7)+> Δ+2 {} <MI 241a4 BEQ 0x2428a> {} <POP 241a8-241ec Naked> Σ0 ↓ →0x2428a ←0x2418e <MI 241a8 MOVE.L 0x290b8,(A6-0x110)> {} <Const 0x241ae 0x50.2> Δ-2 {[#80]} <MI 241b2 LEA.L (A6-0x110),A4> {[#80]} <Call 0x241b4 0x23d42> {[#80]} <POP 241b8-241b9 StackAdj> Δ+2 {} <Const 0x241b9 0x51.2> Δ-2 {[#81]} <MI 241bc LEA.L (A6-0x110),A4> {[#81]} <Call 0x241be 0x23d42> {[#81]} <POP 241c2-241c3 StackAdj> Δ+2 {} <Const 0x241c3 0x52.2> Δ-2 {[#82]} <MI 241c6 LEA.L (A6-0x110),A4> {[#82]} <Call 0x241c8 0x23d42> {[#82]} <POP 241cc-241cd StackAdj> Δ+2 {} <Const 0x241cd 0x53.2> Δ-2 {[#83]} <MI 241d0 LEA.L (A6-0x110),A4> {[#83]} <Call 0x241d2 0x23d42> {[#83]} <POP 241d6-241d8 StackAdj> Δ+2 {} <MI 241d8 CLR.W 0x290c2> {} <POP 241de-241e0 StackAdj> Δ-4 {[-4-]} <Call 0x241e0 0x24db6> {[-4-]} <MI 241e6 MOVE.L (A7)+,D6> Δ+4 {} <MI 241e8 BEQ 0x2428a> {} <POP 241ec-241f2 Naked> Σ0 ↓ →0x2428a <MI 241ec TST.W 0x290be> {} <MI 241ee BLE 0x2428a> {} <POP 241f2-2420c Naked> Σ0 ↓ →0x24250 <POP 241f2-241f4 StackAdj> Δ-2 {[-2-]} <MI 241f4 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']} <MI 241f6 ADDQ.L #0x4,(A7)> {[-6-]} <Call 0x241f8 0x224a8> {[-6-]} <POP 241fc-241fe StackAdj> Δ+4 {[-2-]} <MI 241fe MOVE.W (A7)+,D0> Δ+2 {} <POP 0x24200 LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 24202 MOVE.W D0,D7> {} <MI 24204 CMP.W 0x290bc,D7> {} <MI 2420a BLT 0x24250> {} <POP 2420c-24210 Naked> Σ0 ↓ →0x24250 <MI 2420c CMP.W 0x290be,D7> {} <MI 2420e BGE 0x24250> {} <POP 24210-24250 Naked> Σ0 →0x2428a <MI 24210 MOVE.W 0x290be,0x290c2> {} <MI 24216 MOVE.B #0x01,(A6-0x10c)> {} <MI 2421a MOVE.B #0x01,(A6-0xbb)> {} <Blob 0x2421e [54] @> Δ-54 {[«54""»]} <POP 24230-24232 StackAdj> Δ-4 {[«54""»]|[-4-]} <Lit 0x24232 53> {[«54""»]|[$$the RESHA board revision # in the EEPROM will updated]} <Call 0x24244 0x103e0> {[«54""»]|[$$the RESHA board revision # in the EEPROM will updated]} WriteConsoleStringCrLf(str : String) <POP 2424a-2424e StackAdj> Δ+58 {} <MI 2424e BRA 0x2428a> {} <POP 24250-24258 Naked> Σ0 ↓ →0x2428a ←0x241f2 ←0x2420c <MI 24250 CMP.W 0x290bc,D7> {} <MI 24256 BGE 0x2428a> {} <POP 24258-2428a Naked> Σ0 ↓ <Blob 0x24258 [6] @> Δ-6 {[«6""»]} <POP 24268-2426a StackAdj> Δ-4 {[«6""»]|[-4-]} <Lit 0x2426a 5> {[«6""»]|[$$RESHA]} <POP 0x2427c LimitCheck 0x0 ≤ D7 ≤ 0xff> {[«6""»]|[$$RESHA]} <MI 2427e MOVE.W D7,-(A7)> Δ-2 {[«6""»]|[$$RESHA]|[2, 'D7']} <Blob 0x24280 [2] 0x290be> Δ-2 {[«6""»]|[$$RESHA]|[2, 'D7']|[«2»]} <Call 0x24282 0x2402a> {[«6""»]|[$$RESHA]|[2, 'D7']|[«2»]} <POP 24286-2428a StackAdj> Δ+14 {} <POP 2428a-24290 Naked> Σ0 ↓ →0x242be ←0x2419a ←0x241a8 ←0x241ec ←0x24210 ←0x24250 <MI 2428a TST.B (A6-0x10c)> {} <MI 2428e BNE 0x242be> {} <POP 24290-242be Naked> Σ0 →0x24424 <Blob 0x24290 [24] @> Δ-24 {[«24""»]} <POP 2429c-2429e StackAdj> Δ-4 {[«24""»]|[-4-]} <Lit 0x2429e 24> {[«24""»]|[$$no EEPROMs need updating]} <Call 0x242b0 0x103e0> {[«24""»]|[$$no EEPROMs need updating]} WriteConsoleStringCrLf(str : String) <POP 242b6-242ba StackAdj> Δ+28 {} <MI 242ba BRA 0x24424> {} <POP 242be-2435c Naked> Σ0 ↓ →0x243aa ←0x2428a <Blob 0x242be [38] @> Δ-38 {[«38""»]} <Blob 0x242d0 [22] @> Δ-22 {[«38""»]|[«22""»]} <POP 242e2-242e4 StackAdj> Δ-8 {[«38""»]|[«22""»]|[-8-]} <Lit 0x242e4 37> {[«38""»]|[«22""»]|[-4-]|[$$updating the EEPROMS will take about_]} <MI 242f4 MOVE.L (A6-0xa),(A7)> {[«38""»]|[«22""»]|[-4-]|[4, '(A6-0xa)']} <POP 242ee-242f4 StackAdj> Δ-8 {[«38""»]|[«22""»]|[-4-]|[4, '(A6-0xa)']|[-8-]} <Call 0x242f8 0x102e4> {[«38""»]|[«22""»]|[-4-]|[4, '(A6-0xa)']|[-8-]} Long2String(a : Long) : String <Lit 0x242fe 21> {[«38""»]|[«22""»]|[-4-]|[4, '(A6-0xa)']|[-4-]|[$$ seconds to complete.]} <Call 0x2430e 0x102d4> {[«38""»]|[«22""»]|[-4-]|[4, '(A6-0xa)']|[-4-]|[$$ seconds to complete.]} StringCat3(a, b, c : String) : String <POP 24314-24318 StackAdj> Δ+12 {[«38""»]|[«22""»]|[-4-]} <Call 0x24318 0x103e0> {[«38""»]|[«22""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 2431e-24322 StackAdj> Δ+62 {[-2-]} <MI 24322 CLR.B (A7)> {[-2-]} <Call 0x24324 0x235ba> {[-2-]} <POP 24328-2432a StackAdj> Δ+2 {} <MI 2432a MOVE.L 0x290b4,(A6-0x110)> {} <Const 0x24330 0x21.2> Δ-2 {[#33]} <MI 24332 LEA.L (A6-0x110),A4> {[#33]} <Call 0x24334 0x23f90> {[#33]} <POP 24338-24339 StackAdj> Δ+2 {} <Const 0x24339 0x19.2> Δ-2 {[#25]} <MI 2433a LEA.L (A6-0x110),A4> {[#25]} <Call 0x2433c 0x23f90> {[#25]} <POP 24340-24341 StackAdj> Δ+2 {} <Const 0x24341 0x17.2> Δ-2 {[#23]} <MI 24344 LEA.L (A6-0x110),A4> {[#23]} <Call 0x24346 0x23f90> {[#23]} <POP 2434a-2434b StackAdj> Δ+2 {} <Const 0x2434b 0x15.2> Δ-2 {[#21]} <MI 2434c LEA.L (A6-0x110),A4> {[#21]} <Call 0x2434e 0x23f90> {[#21]} <POP 24352-24354 StackAdj> Δ+2 {} <MI 24354 TST.W 0x290c0> {} <MI 2435a BLE 0x243aa> {} <POP 2435c-243aa Naked> Σ0 ↓ <POP 2435c-2435e StackAdj> Δ-2 {[-2-]} <Const 0x2435e 0x105.4> Δ-4 {[-2-]|[##261]} <Call 0x24362 0x10592> {[-2-]|[##261]} ReadConfig(where : Long) : Word <POP 24368-2436a StackAdj> Δ+4 {[-2-]} <MI 2436a MOVE.W (A7)+,D0> Δ+2 {} <POP 0x2436c LimitCheck 0x0 ≤ D0 ≤ 0xff> {} <MI 2436e MOVE.W D0,D7> {} <Const 0x24370 0x105.4> Δ-4 {[##261]} <Blob 0x24374 [2] 0x290c0> Δ-2 {[##261]|[«2»]} <Call 0x2437a 0x10598> {[##261]|[«2»]} WriteConfig(what: Word; where : Long) <POP 24380-24382 StackAdj> Δ+6 {} <Const 0x24382 0x108.4> Δ-4 {[##264]} <POP 24386-24388 StackAdj> Δ-2 {[##264]|[-2-]} <Const 0x24388 0x108.4> Δ-4 {[##264]|[-2-]|[##264]} <Call 0x2438c 0x10592> {[##264]|[-2-]|[##264]} ReadConfig(where : Long) : Word <POP 24392-24394 StackAdj> Δ+4 {[##264]|[-2-]} <MI 24394 ADD.W D7,(A7)> {[##264]|[-2-]} <MI 24396 MOVE.W (A7),D0> {[##264]|[-2-]} <MI 24398 SUB.W 0x290c0,D0> {[##264]|[-2-]} <MI 2439e AND.W #0xff,D0> {[##264]|[-2-]} <MI 243a0 MOVE.W D0,(A7)> {[##264]|[2, 'D0']} <Call 0x243a2 0x10598> {[##264]|[2, 'D0']} WriteConfig(what: Word; where : Long) <POP 243a8-243aa StackAdj> Δ+6 {} <POP 243aa-243b6 Naked> Σ0 ↓ →0x243c2 ←0x242be <POP 243aa-243ac StackAdj> Δ-2 {[-2-]} <Call 0x243ac 0x10604> {[-2-]} Is_machine_type_three() : Bool <MI 243b2 TST.B (A7)+> Δ+2 {} <MI 243b4 BNE 0x243c2> {} <POP 243b6-243c2 Naked> Σ0 ↓ →0x243f2 <POP 243b6-243b8 StackAdj> Δ-2 {[-2-]} <Call 0x243b8 0x1060a> {[-2-]} Is_machine_type_four() : Bool <MI 243be TST.B (A7)+> Δ+2 {} <MI 243c0 BEQ 0x243f2> {} <POP 243c2-243f2 Naked> Σ0 ↓ ←0x243aa <MI 243c2 MOVE.L 0x290b8,(A6-0x110)> {} <Const 0x243c8 0x51.2> Δ-2 {[#81]} <MI 243cc LEA.L (A6-0x110),A4> {[#81]} <Call 0x243ce 0x23f90> {[#81]} <POP 243d2-243d3 StackAdj> Δ+2 {} <Const 0x243d3 0x52.2> Δ-2 {[#82]} <MI 243d6 LEA.L (A6-0x110),A4> {[#82]} <Call 0x243d8 0x23f90> {[#82]} <POP 243dc-243dd StackAdj> Δ+2 {} <Const 0x243dd 0x53.2> Δ-2 {[#83]} <MI 243e0 LEA.L (A6-0x110),A4> {[#83]} <Call 0x243e2 0x23f90> {[#83]} <POP 243e6-243e7 StackAdj> Δ+2 {} <Const 0x243e7 0x50.2> Δ-2 {[#80]} <MI 243ea LEA.L (A6-0x110),A4> {[#80]} <Call 0x243ec 0x23f90> {[#80]} <POP 243f0-243f2 StackAdj> Δ+2 {} <POP 243f2-24424 Naked> Σ0 ↓ ←0x243b6 <Const 0x243f2 0x1.2> Δ-2 {[#1]} <Call 0x243f4 0x235ba> {[#1]} <POP 243f8-243fa StackAdj> Δ+2 {} <Blob 0x243fa [30] @> Δ-30 {[«30""»]} <POP 24406-24408 StackAdj> Δ-4 {[«30""»]|[-4-]} <Lit 0x24408 30> {[«30""»]|[$$all EEPROMs are up to date now]} <Call 0x2441a 0x103e0> {[«30""»]|[$$all EEPROMs are up to date now]} WriteConsoleStringCrLf(str : String) <POP 24420-24424 StackAdj> Δ+34 {} <POP 24424-2442c Epilogue> Σ0 ←0x24290
@ 2442c <POP 2442c-245a0 Body> Δ+12 <POP 2442c-24442 Prologue> Σ0 ↓ <POP 24442-24454 RegCacheLoad> Σ0 ↓ <POP 24454-24562 Naked> Σ0 →0x2456c →0x2456e →0x24576 →0x2457e →0x24586 ←0x24592 <Blob 0x24454 [4] @> Δ-4 {[«4""»]} <Blob 0x24458 [4] @> Δ-4 {[«4""»]|[«4""»]} <Blob 0x2445c [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]} <POP 24460-24462 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]} <Lit 0x24462 12> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]} <Call 0x2446e 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]} WriteConsoleStringCrLf(str : String) <POP 24470-24471 StackAdj> Δ+16 ↓ {} <Blob 0x24471 [14] @> Δ-14 {[«14""»]} <POP 24480-24482 StackAdj> Δ-4 {[«14""»]|[-4-]} <Lit 0x24482 13> {[«14""»]|[$$ 0 => Exit]} <Call 0x24490 0x103e0> {[«14""»]|[$$ 0 => Exit]} WriteConsoleStringCrLf(str : String) <POP 24492-24493 StackAdj> Δ+18 ↓ {} <Blob 0x24493 [52] @> Δ-52 {[«52""»]} <POP 244a4-244a6 StackAdj> Δ-4 {[«52""»]|[-4-]} <Lit 0x244a6 51> {[«52""»]|[$$ 1 => Test SELFTEST EEPROM location (K21)]} <Call 0x244b2 0x103e0> {[«52""»]|[$$ 1 => Test SELFTEST EEPROM location (K21)]} WriteConsoleStringCrLf(str : String) <POP 244b4-244b5 StackAdj> Δ+56 ↓ {} <Blob 0x244b5 [52] @> Δ-52 {[«52""»]} <POP 244c4-244c6 StackAdj> Δ-4 {[«52""»]|[-4-]} <Lit 0x244c6 51> {[«52""»]|[$$ 2 => Test BOOT EEPROM location (K19)]} <Call 0x244d2 0x103e0> {[«52""»]|[$$ 2 => Test BOOT EEPROM location (K19)]} WriteConsoleStringCrLf(str : String) <POP 244d4-244d5 StackAdj> Δ+56 ↓ {} <Blob 0x244d5 [52] @> Δ-52 {[«52""»]} <POP 244e4-244e6 StackAdj> Δ-4 {[«52""»]|[-4-]} <Lit 0x244e6 51> {[«52""»]|[$$ 3 => Test UTILITIES/DEBUG EEPROM location (K17)]} <Call 0x244f2 0x103e0> {[«52""»]|[$$ 3 => Test UTILITIES/DEBUG EEPROM location (K17)]} WriteConsoleStringCrLf(str : String) <POP 244f4-244f5 StackAdj> Δ+56 ↓ {} <Blob 0x244f5 [52] @> Δ-52 {[«52""»]} <POP 24504-24506 StackAdj> Δ-4 {[«52""»]|[-4-]} <Lit 0x24506 51> {[«52""»]|[$$ 4 => Test NOVRAM/NET/DEB2 EEPROM location (K15)]} <Call 0x24512 0x103e0> {[«52""»]|[$$ 4 => Test NOVRAM/NET/DEB2 EEPROM location (K15)]} WriteConsoleStringCrLf(str : String) <POP 24514-24515 StackAdj> Δ+56 ↓ {} <Blob 0x24515 [16] @> Δ-16 {[«16""»]} <POP 24526-24528 StackAdj> Δ-8 {[«16""»]|[-8-]} <Lit 0x24528 15> {[«16""»]|[-4-]|[$$Enter option :_]} <Const 0x24536 0x0.4> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]} <Const 0x2453a 0x4.4> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[##4]} <Call 0x2453e 0x103ec> {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[##4]} AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long <POP 24544-24546 StackAdj> Δ+12 {[«16""»]|[-4-]} <MI 24546 MOVE.L (A7)+,D7> Δ+4 {[«16""»]} <POP 24548-2454c StackAdj> Δ+16 {} <MI 2454c MOVE.L D7,D0> {} <POP 0x2454e LimitCheck 0x0 ≤ D0 ≤ 0x4> {} <MI 24558 ADD.W D0,D0> {} <MI 2455a SWITCH D0.W> {} <POP 2456c-2456e Naked> Σ0 →0x24592 ←0x24454 <MI 2456c BRA 0x24592> {} <POP 2456e-24576 Naked> Σ0 Δ-4 →0x2458c ←0x24454 <Const 0x2456e 0x80001fff.4> Δ-4 {[##2147491839]} <MI 24574 BRA 0x2458c> {[##2147491839]} <POP 24576-2457e Naked> Σ0 Δ-4 →0x2458c ←0x24454 <Const 0x24576 0x80003fff.4> Δ-4 {[##2147500031]} <MI 2457c BRA 0x2458c> {[##2147500031]} <POP 2457e-24586 Naked> Σ0 Δ-4 →0x2458c ←0x24454 <Const 0x2457e 0x80005fff.4> Δ-4 {[##2147508223]} <MI 24584 BRA 0x2458c> {[##2147508223]} <POP 24586-2458c Naked> Σ0 Δ-4 ↓ ←0x24454 <Const 0x24586 0x80007dff.4> Δ-4 {[##2147515903]} <POP 2458c-24592 Naked> Σ-4 Δ+4 ↓ ←0x2456e ←0x24576 ←0x2457e <Call 0x2458c 0x22584> {[-4-]} <POP 24590-24592 StackAdj> Δ+4 {} <POP 24592-24598 Naked> Σ0 ↓ →0x24454 ←0x2456c <MI 24592 TST.L D7> {} <MI 24594 BNE 0x24454> {} <POP 24598-245a0 Epilogue> Σ0
@ 245a0 <LVAR 0x00c 2(r)> <LVAR 0x008 4(r)> <LVAR -0x00e @ 4(r)> <LVAR -0x012 @ 4(r)> <POP 245a0-2476e Body> <POP 245a0-245b6 Prologue> Σ0 ↓ <POP 245b6-245c8 RegCacheLoad> Σ0 ↓ <POP 245c8-245e4 Naked> Σ0 Δ-4 ↓ <MI 245c8 MOVE.W (A6+0xc),-(A7)> Δ-2 {[2, '(A6+0xc)']} <Pointer.fp 0x245cc <LVAR -0x012 @ 4(r)>> Δ-4 {[2, '(A6+0xc)']|[@@-18]} <Pointer.fp 0x245d0 <LVAR -0x00e @ 4(r)>> Δ-4 {[2, '(A6+0xc)']|[@@-18]|[@@-14]} <Call 0x245d4 0x21388> {[2, '(A6+0xc)']|[@@-18]|[@@-14]} <POP 245d8-245dc StackAdj> Δ+10 {} <MI 245dc MOVEQ.L #0x00,D7> {} <MI 245de MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']} <MI 245e2 MOVEQ.L #0x00,D6> {[4, '(A6+0x8)']} <POP 245e4-245e8 Naked> Σ-4 ↓ →0x2460e ←0x245e8 <MI 245e4 CMP.L (A7),D6> {[-4-]} <MI 245e6 BGT 0x2460e> {[-4-]} <POP 245e8-2460e Naked> Σ-4 ↓ →0x245e4 <POP 245e8-245ea StackAdj> Δ-2 {[-6-]} <MI 245ea MOVE.L (A6-0x12),-(A7)> Δ-4 {[-6-]|[4, '(A6-0x12)']} <MI 245ee ADD.L D6,(A7)> {[-10-]} <Call 0x245f0 0x224a8> {[-10-]} <POP 245f2-245f4 StackAdj> Δ+4 {[-6-]} <MI 245f4 MOVE.W (A7)+,D0> Δ+2 {[-4-]} <MI 245f6 EXTW.L D0> {[-4-]} <MI 245f8 ADD.L D0,D7> {[-4-]} <MI 245fa MOVE.L D7,D4> {[-4-]} <MI 245fc MOVE.L #0x100,D3> {[-4-]} <Call 0x24602 0x10294> {[-4-]} ?divs_d3_d4 <MI 24608 MOVE.L D3,D7> {[-4-]} <MI 2460a ADDQ.L #0x1,D6> {[-4-]} <MI 2460c BVC 0x245e4> {[-4-]} <POP 2460e-24710 Naked> Σ-4 Δ+4 ↓ →0x2473e ←0x245e4 <POP 2460e-24610 StackAdj> Δ+4 {} <MI 24610 ADDI.L #0x00000100,D7> {} <MI 24616 MOVE.L (A6-0x12),D0> {} <MI 2461a ADD.L (A6+0x8),D0> {} <POP 2461e-24620 StackAdj> Δ-2 {[-2-]} <MI 24620 MOVE.L D0,-(A7)> Δ-4 {[-2-]|[4, 'D0']} <MI 24622 SUBQ.L #0x5,(A7)> {[-6-]} <Call 0x24624 0x224a8> {[-6-]} <POP 24626-24628 StackAdj> Δ+4 {[-2-]} <MI 24628 MOVE.W (A7)+,D1> Δ+2 {} <MI 2462a EXTW.L D1> {} <MI 2462c SUB.L D1,D7> {} <MI 2462e MOVE.L D7,D4> {} <MI 24630 MOVE.L #0x100,D3> {} <Call 0x24636 0x10294> {} ?divs_d3_d4 <MI 2463c MOVE.L D3,D7> {} <Blob 0x2463e [18] @> Δ-18 {[«18""»]} <POP 2464a-2464c StackAdj> Δ-8 {[«18""»]|[-8-]} <MI 2464c MOVE.L (A6-0xe),-(A7)> Δ-4 {[«18""»]|[-8-]|[4, '(A6-0xe)']} <Const 0x24650 0x8.4> Δ-4 {[«18""»]|[-8-]|[4, '(A6-0xe)']|[##8]} <Call 0x24654 0x102f8> {[«18""»]|[-8-]|[4, '(A6-0xe)']|[##8]} LeftPad(a : String; b : Long) : String <POP 2465a-2465c StackAdj> Δ+4 {[«18""»]|[-8-]|[4, '(A6-0xe)']} <Lit 0x2465c 18> {[«18""»]|[-8-]|[$$ prom: revision =_]} <POP 24668-2466a StackAdj> Δ-10 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-10-]} <MI 2466a MOVE.L D0,-(A7)> Δ-4 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-10-]|[4, 'D0']} <MI 2466c SUBQ.L #0x4,(A7)> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-14-]} <Call 0x2466e 0x224a8> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-14-]} <POP 24670-24672 StackAdj> Δ+4 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-10-]} <MI 24672 MOVE.W (A7)+,D1> Δ+2 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-8-]} <MI 24674 EXTW.L D1> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-8-]} <MI 24676 MOVE.L D1,(A7)> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']} <Const 0x24678 0x2.4> Δ-4 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[##2]} <Call 0x2467a 0x102e8> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 24680-24682 StackAdj> Δ-2 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[##2]|[-2-]} <MI 24682 MOVE.L D0,-(A7)> Δ-4 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[##2]|[-2-]|[4, 'D0']} <MI 24684 SUBQ.L #0x3,(A7)> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[##2]|[-6-]} <Call 0x24686 0x224a8> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[##2]|[-6-]} <POP 24688-2468a StackAdj> Δ+4 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[##2]|[-2-]} <MI 2468a MOVE.W (A7)+,D1> Δ+2 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[##2]} <MI 2468c EXTW.L D1> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[##2]} <MI 2468e MOVE.L D1,(A7)> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']} <Const 0x24690 0x2.4> Δ-4 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']|[##2]} <Call 0x24692 0x102e8> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 24698-2469a StackAdj> Δ-2 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']|[##2]|[-2-]} <MI 2469a MOVE.L D0,-(A7)> Δ-4 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']|[##2]|[-2-]|[4, 'D0']} <MI 2469c SUBQ.L #0x2,(A7)> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']|[##2]|[-6-]} <Call 0x2469e 0x224a8> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']|[##2]|[-6-]} <POP 246a0-246a2 StackAdj> Δ+4 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']|[##2]|[-2-]} <MI 246a2 MOVE.W (A7)+,D1> Δ+2 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']|[##2]} <MI 246a4 EXTW.L D1> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']|[##2]} <MI 246a6 MOVE.L D1,(A7)> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']|[4, 'D1']} <Const 0x246a8 0x2.4> Δ-4 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']|[4, 'D1']|[##2]} <Call 0x246aa 0x102e8> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']|[4, 'D1']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 246b0-246b2 StackAdj> Δ+8 {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']} <Call 0x246b2 0x102dc> {[«18""»]|[-8-]|[$$ prom: revision =_]|[-4-]|[4, 'D1']|[4, 'D1']} StringCat5(a, b, c, d, e : String) : String <POP 246b8-246ba StackAdj> Δ+20 {[«18""»]|[-4-]} <Call 0x246ba 0x103d8> {[«18""»]|[-4-]} WriteConsoleString(str : String) <POP 246c0-246c1 StackAdj> Δ+22 ↓ {} <Blob 0x246c1 [16] @> Δ-16 {[«16""»]} <POP 246d0-246d2 StackAdj> Δ-8 {[«16""»]|[-8-]} <Lit 0x246d2 15> {[«16""»]|[-4-]|[$$, locus byte =_]} <POP 246de-246e0 StackAdj> Δ-10 {[«16""»]|[-4-]|[$$, locus byte =_]|[-10-]} <MI 246e0 SUBQ.L #0x1,D0> {[«16""»]|[-4-]|[$$, locus byte =_]|[-10-]} <MI 246e2 MOVE.L D0,-(A7)> Δ-4 {[«16""»]|[-4-]|[$$, locus byte =_]|[-10-]|[4, 'D0']} <Call 0x246e4 0x224a8> {[«16""»]|[-4-]|[$$, locus byte =_]|[-10-]|[4, 'D0']} <POP 246e6-246e8 StackAdj> Δ+4 {[«16""»]|[-4-]|[$$, locus byte =_]|[-10-]} <MI 246e8 MOVE.W (A7)+,D0> Δ+2 {[«16""»]|[-4-]|[$$, locus byte =_]|[-8-]} <MI 246ea EXTW.L D0> {[«16""»]|[-4-]|[$$, locus byte =_]|[-8-]} <MI 246ec MOVE.L D0,(A7)> {[«16""»]|[-4-]|[$$, locus byte =_]|[-4-]|[4, 'D0']} <Const 0x246ee 0x2.4> Δ-4 {[«16""»]|[-4-]|[$$, locus byte =_]|[-4-]|[4, 'D0']|[##2]} <Call 0x246f0 0x102e8> {[«16""»]|[-4-]|[$$, locus byte =_]|[-4-]|[4, 'D0']|[##2]} Long2HexString(val : Long; ndig : Long) : String <POP 246f6-246f8 StackAdj> Δ+8 {[«16""»]|[-4-]|[$$, locus byte =_]|[-4-]} <Call 0x246f8 0x102d0> {[«16""»]|[-4-]|[$$, locus byte =_]|[-4-]} StringCat2(a, b : String) : String <POP 246fe-24700 StackAdj> Δ+8 {[«16""»]|[-4-]} <Call 0x24700 0x103d8> {[«16""»]|[-4-]} WriteConsoleString(str : String) <POP 24706-24708 StackAdj> Δ+20 {} <MI 24708 CMPI.L #0x000000aa,D7> {} <MI 2470e BEQ 0x2473e> {} <POP 24710-2473e Naked> Σ0 →0x24766 <Blob 0x24710 [22] @> Δ-22 {[«22""»]} <POP 24722-24724 StackAdj> Δ-4 {[«22""»]|[-4-]} <Lit 0x24724 21> {[«22""»]|[$$, CHECKSUM IS BAD ***]} <Call 0x24732 0x103e0> {[«22""»]|[$$, CHECKSUM IS BAD ***]} WriteConsoleStringCrLf(str : String) <POP 24738-2473c StackAdj> Δ+26 {} <MI 2473c BRA 0x24766> {} <POP 2473e-24766 Naked> Σ0 ↓ ←0x2460e <Blob 0x2473e [4] @> Δ-4 {[«4""»]} <Blob 0x24742 [4] @> Δ-4 {[«4""»]|[«4""»]} <Blob 0x24746 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]} <Blob 0x2474a [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]} <POP 2474e-24750 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]} <Lit 0x24750 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$, checksum is OK]} <Call 0x2475e 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$, checksum is OK]} WriteConsoleStringCrLf(str : String) <POP 24764-24766 StackAdj> Δ+20 {} <POP 24766-2476e Epilogue> Σ0 ←0x24710
@ 2476e <LVAR -0x004 @> <POP 2476e-2481c Body> <POP 2476e-24784 Prologue> Σ0 ↓ <POP 24784-2478c RegCacheLoad> Σ0 ↓ <POP 2478c-247c0 Naked> Σ0 ↓ →0x247cc <Const 0x2478c 0x21.2> Δ-2 {[#33]} <Const 0x24790 0x1fff.4> Δ-4 {[#33]|[##8191]} <Call 0x24792 0x245a0> {[#33]|[##8191]} <POP 24794-24796 StackAdj> Δ+4 {[#33]} <POP 24796-24797 StackAdj> Δ+2 {} <Const 0x24797 0x19.2> Δ-2 {[#25]} <Const 0x2479a 0x1fff.4> Δ-4 {[#25]|[##8191]} <Call 0x2479c 0x245a0> {[#25]|[##8191]} <POP 2479e-247a0 StackAdj> Δ+4 {[#25]} <POP 247a0-247a1 StackAdj> Δ+2 {} <Const 0x247a1 0x17.2> Δ-2 {[#23]} <Const 0x247a4 0x1fff.4> Δ-4 {[#23]|[##8191]} <Call 0x247a6 0x245a0> {[#23]|[##8191]} <POP 247a8-247aa StackAdj> Δ+4 {[#23]} <POP 247aa-247ab StackAdj> Δ+2 {} <Const 0x247ab 0x15.2> Δ-2 {[#21]} <Const 0x247ae 0x1dff.4> Δ-4 {[#21]|[##7679]} <Call 0x247b2 0x245a0> {[#21]|[##7679]} <POP 247b4-247b6 StackAdj> Δ+4 {[#21]} <Call 0x247b6 0x10604> {[#21]} Is_machine_type_three() : Bool <MI 247bc TST.B (A7)+> Δ+2 {} <MI 247be BNE 0x247cc> {} <POP 247c0-247cc Naked> Σ0 ↓ →0x24814 <POP 247c0-247c2 StackAdj> Δ-2 {[-2-]} <Call 0x247c2 0x1060a> {[-2-]} Is_machine_type_four() : Bool <MI 247c8 TST.B (A7)+> Δ+2 {} <MI 247ca BEQ 0x24814> {} <POP 247cc-24814 Naked> Σ0 ↓ ←0x2478c <Const 0x247cc 0x0.4> Δ-4 {[##0]} <Pointer.fp 0x247d0 <LVAR -0x004 @>> Δ-4 {[##0]|[@@-4]} <Call 0x247d4 0x24e0a> {[##0]|[@@-4]} <POP 247da-247dc StackAdj> Δ+8 {} <Const 0x247dc 0x1.4> Δ-4 {[##1]} <Pointer.fp 0x247e0 <LVAR -0x004 @>> Δ-4 {[##1]|[@@-4]} <Call 0x247e4 0x24e0a> {[##1]|[@@-4]} <POP 247ea-247ec StackAdj> Δ+6 {[-2-]} <POP 247ec-247ed StackAdj> Δ+2 {} <Const 0x247ed 0x50.2> Δ-2 {[#80]} <Const 0x247f0 0x1fff.4> Δ-4 {[#80]|[##8191]} <Call 0x247f2 0x245a0> {[#80]|[##8191]} <POP 247f4-247f6 StackAdj> Δ+4 {[#80]} <POP 247f6-247f7 StackAdj> Δ+2 {} <Const 0x247f7 0x51.2> Δ-2 {[#81]} <Const 0x247fa 0x1fff.4> Δ-4 {[#81]|[##8191]} <Call 0x247fc 0x245a0> {[#81]|[##8191]} <POP 247fe-24800 StackAdj> Δ+4 {[#81]} <POP 24800-24801 StackAdj> Δ+2 {} <Const 0x24801 0x52.2> Δ-2 {[#82]} <Const 0x24804 0x1fff.4> Δ-4 {[#82]|[##8191]} <Call 0x24806 0x245a0> {[#82]|[##8191]} <POP 24808-2480a StackAdj> Δ+4 {[#82]} <POP 2480a-2480b StackAdj> Δ+2 {} <Const 0x2480b 0x53.2> Δ-2 {[#83]} <Const 0x2480e 0x1fff.4> Δ-4 {[#83]|[##8191]} <Call 0x24810 0x245a0> {[#83]|[##8191]} <POP 24812-24814 StackAdj> Δ+6 {} <POP 24814-2481c Epilogue> Σ0 ←0x247c0
@ 2481c START <POP 2481c--0001 Body> Δ+28 <POP 2481c-24826 Prologue> Σ0 <POP 24826-24842 RegCacheLoad> Σ0 ↓ <POP 24842-24876 Naked> Σ0 Δ-4 ↓ <Blob 0x24842 [40] @> Δ-40 {[«40""»]} <POP 2484e-24850 StackAdj> Δ-4 {[«40""»]|[-4-]} <Lit 0x24850 40> {[«40""»]|[$$@(#)UPDATE_EEPROM,5.3,92/05/04,12:34:56\]} <MI 2485e MOVE.L (A7)+,0x290c4> Δ+4 {[«40""»]} <POP 24864-24868 StackAdj> Δ+40 {} <MI 24868 MOVEA.L 0x290c4,A0> {} <MI 2486e MOVE.W (A0),D0> {} <MI 24870 EXTW.L D0> {} <MI 24872 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']} <MI 24874 MOVEQ.L #0x01,D0> {[4, 'D0']} <POP 24876-2487a Naked> Σ-4 ↓ →0x248b0 ←0x248ac <MI 24876 CMP.L (A7),D0> {[-4-]} <MI 24878 BGT 0x248b0> {[-4-]} <POP 2487a-2489c Naked> Σ-4 ↓ →0x248a6 <MI 2487a MOVE.L D0,0x290c8> {[-4-]} <MI 24880 MOVEA.L 0x290c4,A0> {[-4-]} <MI 24886 MOVE.L D0,D1> {[-4-]} <MI 24888 SUBQ.L #0x1,D1> {[-4-]} <POP 0x2488a LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-4-]} <MI 24894 CMPI.L #0x00000004,D0> {[-4-]} <MI 2489a BLE 0x248a6> {[-4-]} <POP 2489c-248a6 Naked> Σ-4 ↓ →0x248ac <MI 2489c MOVE.B (A0+D1.L+#0x2),D2> {[-4-]} <MI 248a0 CMPI.B #0x2c,D2> {[-4-]} <MI 248a4 BNE 0x248ac> {[-4-]} <POP 248a6-248ac Naked> Σ-4 ↓ ←0x2487a <MI 248a6 MOVE.B #0x20,(A0+D1.L+#0x2)> {[-4-]} <POP 248ac-248b0 Naked> Σ-4 ↓ →0x24876 ←0x2489c <MI 248ac ADDQ.L #0x1,D0> {[-4-]} <MI 248ae BVC 0x24876> {[-4-]} <POP 248b0-248c4 Naked> Σ-4 Δ+4 ↓ →0x248d0 ←0x24876 <POP 248b0-248b1 StackAdj> Δ+4 {} <Blob 0x248b1 [4] 0x290c4> Δ-4 {[«4»]} <Call 0x248b6 0x103e0> {[«4»]} WriteConsoleStringCrLf(str : String) <POP 248b8-248ba StackAdj> Δ+2 {[-2-]} <Call 0x248ba 0x1060a> {[-2-]} Is_machine_type_four() : Bool <MI 248c0 TST.B (A7)+> Δ+2 {} <MI 248c2 BNE 0x248d0> {} <POP 248c4-248d0 Naked> Σ0 ↓ →0x24902 <POP 248c4-248c6 StackAdj> Δ-2 {[-2-]} <Call 0x248c6 0x10604> {[-2-]} Is_machine_type_three() : Bool <MI 248cc TST.B (A7)+> Δ+2 {} <MI 248ce BEQ 0x24902> {} <POP 248d0-24902 Naked> Σ0 Δ-16 →0x24932 ←0x248b0 <Blob 0x248d0 [14] @> Δ-14 {[«14""»]} <POP 248e0-248e2 StackAdj> Δ-4 {[«14""»]|[-4-]} <Lit 0x248e2 13> {[«14""»]|[$$IOC.M400_PROM]} <MI 248ee MOVE.L (A7)+,0x290b4> Δ+4 {[«14""»]} <POP 248f0-248f1 StackAdj> Δ+14 ↓ {} <Blob 0x248f1 [16] @> Δ-16 {[«16""»]} <MI 24900 BRA 0x24932> {[«16""»]} <POP 24902-24932 Naked> Σ0 Δ-16 ↓ ←0x248c4 <Blob 0x24902 [14] @> Δ-14 {[«14""»]} <POP 24912-24914 StackAdj> Δ-4 {[«14""»]|[-4-]} <Lit 0x24914 13> {[«14""»]|[$$IOC.M200_PROM]} <MI 24920 MOVE.L (A7)+,0x290b4> Δ+4 {[«14""»]} <POP 24922-24923 StackAdj> Δ+14 ↓ {} <Blob 0x24923 [16] @> Δ-16 {[«16""»]} <POP 24932-2498e Naked> Σ-16 Δ+16 ↓ →0x24a00 ←0x248d0 <POP 24932-24934 StackAdj> Δ-4 {[-20-]} <Lit 0x24934> {[-16-]|[$$…]} <Pointer.sp 0x24934 4> Δ-4 <Const 0x24938 0x1.2> Δ-2 <Const 0x2493a 0xf.2> Δ-2 <Call 0x2493e 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 24940-24942 StackAdj> Δ+8 <MI 24942 MOVE.L (A7)+,0x290b8> Δ+4 {[-16-]} <POP 24948-2494c StackAdj> Δ+16 {} <Blob 0x2494c [8] @> Δ-8 {[«8""»]} <POP 2495c-2495e StackAdj> Δ-6 {[«8""»]|[-6-]} <Call 0x2495e 0x103c4> {[«8""»]|[-6-]} GetArgv() : String <POP 24964-24966 StackAdj> Δ-4 {[«8""»]|[-10-]} <Lit 0x24966 7> {[«8""»]|[-6-]|[$$INSTALL]} <Call 0x24974 0x102c8> {[«8""»]|[-6-]|[$$INSTALL]} StringEqual(a, b : String) : Byte <POP 2497a-2497c StackAdj> Δ+8 {[«8""»]|[-2-]} <MI 2497c MOVE.B (A7)+,D0> Δ+2 {[«8""»]} <MI 2497e EXTB.W D0> {[«8""»]} <POP 0x24980 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«8""»]} <POP 24982-24984 StackAdj> Δ+8 {} <MI 24984 MOVE.B D0,0x290b2> {} <MI 2498a TST.B D0> {} <MI 2498c BEQ 0x24a00> {} <POP 2498e-249b0 Naked> Σ0 ↓ →0x249d0 <MI 2498e MOVE.W 0x10008,D0> {} <POP 0x24994 LimitCheck 0x0 ≤ D0 ≤ 0xf> {} <MI 24998 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']} <Const 0x2499a 0x25090.4> Δ-4 {[2, 'D0']|[##151696]} <Call 0x249a0 0x10394> {[2, 'D0']|[##151696]} MountDisk(drive : Word ; VAR status : Byte) <POP 249a6-249a8 StackAdj> Δ+6 {} <MI 249a8 TST.B 0x25090> {} <MI 249ae BEQ 0x249d0> {} <POP 249b0-249d0 Naked> Σ0 ↓ <POP 249b0-249b2 StackAdj> Δ-4 {[-4-]} <Blob 0x249b2 [2] 0x25090> Δ-2 {[-4-]|[«2»]} <Call 0x249b8 0x103a0> {[-4-]|[«2»]} FsErrMsgStr(err: Byte) : String <POP 249be-249c0 StackAdj> Δ+2 {[-4-]} <Call 0x249c0 0x103e0> {[-4-]} WriteConsoleStringCrLf(str : String) <POP 249c2-249c4 StackAdj> Δ+4 {} <Const 0x249c4 0xf.4> Δ-4 {[##15]} <Call 0x249c8 0x10220> {[##15]} KC10_Panic(code : Long) <POP 249ce-249d0 StackAdj> Δ+4 {} <POP 249d0-24a00 Naked> Σ0 ↓ ←0x2498e <Call 0x249d0 0x24062> {} <Blob 0x249d4 [46] @> Δ-46 {[«46""»]} <POP 249e0-249e2 StackAdj> Δ-4 {[«46""»]|[-4-]} <Lit 0x249e2 46> {[«46""»]|[$$INSTALL successfully completed - rebooting IOP]} <Call 0x249ee 0x103e0> {[«46""»]|[$$INSTALL successfully completed - rebooting IOP]} WriteConsoleStringCrLf(str : String) <POP 249f0-249f4 StackAdj> Δ+48 {[-2-]} <POP 249f4-249f5 StackAdj> Δ+2 {} <Const 0x249f5 0x19.2> Δ-2 {[#25]} <Call 0x249f8 0x105da> {[#25]} EmergencyStop(boot_reason_code : Byte) <POP 249fe-24a00 StackAdj> Δ+2 {} <POP 24a00-24a06 Naked> Σ0 ↓ ←0x24932 <Call 0x24a00 0x10398> {} FSCALL_10398 <POP 24a06-24a96 Naked> Σ0 ↓ →0x24aa4 ←0x24d58 <Blob 0x24a06 [4] @> Δ-4 {[«4""»]} <Blob 0x24a0a [4] @> Δ-4 {[«4""»]|[«4""»]} <Blob 0x24a0e [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]} <POP 24a12-24a14 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]} <Lit 0x24a14 12> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]} <Call 0x24a22 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]} WriteConsoleStringCrLf(str : String) <POP 24a24-24a25 StackAdj> Δ+16 ↓ {} <Blob 0x24a25 [14] @> Δ-14 {[«14""»]} <POP 24a34-24a36 StackAdj> Δ-4 {[«14""»]|[-4-]} <Lit 0x24a36 13> {[«14""»]|[$$ 0 => Exit]} <Call 0x24a42 0x103e0> {[«14""»]|[$$ 0 => Exit]} WriteConsoleStringCrLf(str : String) <POP 24a44-24a48 StackAdj> Δ+18 {} <Blob 0x24a48 [34] @> Δ-34 {[«34""»]} <POP 24a54-24a56 StackAdj> Δ-4 {[«34""»]|[-4-]} <Lit 0x24a56 34> {[«34""»]|[$$ 1 => Write/read test an EEPROM]} <Call 0x24a64 0x103e0> {[«34""»]|[$$ 1 => Write/read test an EEPROM]} WriteConsoleStringCrLf(str : String) <POP 24a66-24a6a StackAdj> Δ+38 {} <Blob 0x24a6a [54] @> Δ-54 {[«54""»]} <POP 24a76-24a78 StackAdj> Δ-4 {[«54""»]|[-4-]} <Lit 0x24a78 54> {[«54""»]|[$$ 2 => Checksum test & print revision of all EEPROMs]} <Call 0x24a86 0x103e0> {[«54""»]|[$$ 2 => Checksum test & print revision of all EEPROMs]} WriteConsoleStringCrLf(str : String) <POP 24a88-24a8c StackAdj> Δ+56 {[-2-]} <Call 0x24a8c 0x1060a> {[-2-]} Is_machine_type_four() : Bool <MI 24a92 TST.B (A7)+> Δ+2 {} <MI 24a94 BNE 0x24aa4> {} <POP 24a96-24aa4 Naked> Σ0 ↓ →0x24bba <POP 24a96-24a98 StackAdj> Δ-2 {[-2-]} <Call 0x24a98 0x10604> {[-2-]} Is_machine_type_three() : Bool <MI 24a9e TST.B (A7)+> Δ+2 {} <MI 24aa0 BEQ 0x24bba> {} <POP 24aa4-24bba Naked> Σ0 →0x24c82 ←0x24a06 <Blob 0x24aa4 [60] @> Δ-60 {[«60""»]} <POP 24ab6-24ab8 StackAdj> Δ-4 {[«60""»]|[-4-]} <Lit 0x24ab8 59> {[«60""»]|[$$ 3 => Compare an EEPROM quadrant to the file you specify]} <Call 0x24ac6 0x103e0> {[«60""»]|[$$ 3 => Compare an EEPROM quadrant to the file you specify]} WriteConsoleStringCrLf(str : String) <POP 24ac8-24ac9 StackAdj> Δ+64 ↓ {} <Blob 0x24ac9 [46] @> Δ-46 {[«46""»]} <POP 24ada-24adc StackAdj> Δ-8 {[«46""»]|[-8-]} <Lit 0x24adc 45> {[«46""»]|[-4-]|[$$ 4 => Compare all 4 IOC EEPROMs to file_]} <POP 24ae8-24ae9 StackAdj> Δ-4 {[«46""»]|[-4-]|[$$ 4 => Compare all 4 IOC EEPROMs to file_]|[-4-]} <Blob 0x24ae9 [4] 0x290b4> Δ-4 {[«46""»]|[-4-]|[$$ 4 => Compare all 4 IOC EEPROMs to file_]|[-4-]|[«4»]} <Call 0x24aea 0x102cc> {[«46""»]|[-4-]|[$$ 4 => Compare all 4 IOC EEPROMs to file_]|[-4-]|[«4»]} StringDup(a : String) : String <POP 24af0-24af2 StackAdj> Δ+4 {[«46""»]|[-4-]|[$$ 4 => Compare all 4 IOC EEPROMs to file_]|[-4-]} <Call 0x24af2 0x102d0> {[«46""»]|[-4-]|[$$ 4 => Compare all 4 IOC EEPROMs to file_]|[-4-]} StringCat2(a, b : String) : String <POP 24af8-24afa StackAdj> Δ+8 {[«46""»]|[-4-]} <Call 0x24afa 0x103e0> {[«46""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 24afc-24afd StackAdj> Δ+50 ↓ {} <Blob 0x24afd [46] @> Δ-46 {[«46""»]} <POP 24b0c-24b0e StackAdj> Δ-8 {[«46""»]|[-8-]} <Lit 0x24b0e 45> {[«46""»]|[-4-]|[$$ 5 => Compare all 4 RESHA EEPROMs to file_]} <POP 24b1a-24b1b StackAdj> Δ-4 {[«46""»]|[-4-]|[$$ 5 => Compare all 4 RESHA EEPROMs to file_]|[-4-]} <Blob 0x24b1b [4] 0x290b8> Δ-4 {[«46""»]|[-4-]|[$$ 5 => Compare all 4 RESHA EEPROMs to file_]|[-4-]|[«4»]} <Call 0x24b20 0x102cc> {[«46""»]|[-4-]|[$$ 5 => Compare all 4 RESHA EEPROMs to file_]|[-4-]|[«4»]} StringDup(a : String) : String <POP 24b26-24b28 StackAdj> Δ+4 {[«46""»]|[-4-]|[$$ 5 => Compare all 4 RESHA EEPROMs to file_]|[-4-]} <Call 0x24b28 0x102d0> {[«46""»]|[-4-]|[$$ 5 => Compare all 4 RESHA EEPROMs to file_]|[-4-]} StringCat2(a, b : String) : String <POP 24b2e-24b30 StackAdj> Δ+8 {[«46""»]|[-4-]} <Call 0x24b30 0x103e0> {[«46""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 24b32-24b34 StackAdj> Δ+50 {} <Blob 0x24b34 [60] @> Δ-60 {[«60""»]} <POP 24b40-24b42 StackAdj> Δ-4 {[«60""»]|[-4-]} <Lit 0x24b42 60> {[«60""»]|[$$ 6 => Update an EEPROM quadrant from the file you specify]} <Call 0x24b50 0x103e0> {[«60""»]|[$$ 6 => Update an EEPROM quadrant from the file you specify]} WriteConsoleStringCrLf(str : String) <POP 24b52-24b56 StackAdj> Δ+64 {} <Blob 0x24b56 [46] @> Δ-46 {[«46""»]} <POP 24b62-24b64 StackAdj> Δ-8 {[«46""»]|[-8-]} <Lit 0x24b64 46> {[«46""»]|[-4-]|[$$ 7 => Update all 4 IOC EEPROMs from file_]} <POP 24b6e-24b6f StackAdj> Δ-4 {[«46""»]|[-4-]|[$$ 7 => Update all 4 IOC EEPROMs from file_]|[-4-]} <Blob 0x24b6f [4] 0x290b4> Δ-4 {[«46""»]|[-4-]|[$$ 7 => Update all 4 IOC EEPROMs from file_]|[-4-]|[«4»]} <Call 0x24b70 0x102cc> {[«46""»]|[-4-]|[$$ 7 => Update all 4 IOC EEPROMs from file_]|[-4-]|[«4»]} StringDup(a : String) : String <POP 24b76-24b78 StackAdj> Δ+4 {[«46""»]|[-4-]|[$$ 7 => Update all 4 IOC EEPROMs from file_]|[-4-]} <Call 0x24b78 0x102d0> {[«46""»]|[-4-]|[$$ 7 => Update all 4 IOC EEPROMs from file_]|[-4-]} StringCat2(a, b : String) : String <POP 24b7e-24b80 StackAdj> Δ+8 {[«46""»]|[-4-]} <Call 0x24b80 0x103e0> {[«46""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 24b82-24b84 StackAdj> Δ+50 {} <Blob 0x24b84 [46] @> Δ-46 {[«46""»]} <POP 24b90-24b92 StackAdj> Δ-8 {[«46""»]|[-8-]} <Lit 0x24b92 46> {[«46""»]|[-4-]|[$$ 8 => Update all 4 RESHA EEPROMs from file_]} <POP 24b9c-24b9d StackAdj> Δ-4 {[«46""»]|[-4-]|[$$ 8 => Update all 4 RESHA EEPROMs from file_]|[-4-]} <Blob 0x24b9d [4] 0x290b8> Δ-4 {[«46""»]|[-4-]|[$$ 8 => Update all 4 RESHA EEPROMs from file_]|[-4-]|[«4»]} <Call 0x24ba2 0x102cc> {[«46""»]|[-4-]|[$$ 8 => Update all 4 RESHA EEPROMs from file_]|[-4-]|[«4»]} StringDup(a : String) : String <POP 24ba8-24baa StackAdj> Δ+4 {[«46""»]|[-4-]|[$$ 8 => Update all 4 RESHA EEPROMs from file_]|[-4-]} <Call 0x24baa 0x102d0> {[«46""»]|[-4-]|[$$ 8 => Update all 4 RESHA EEPROMs from file_]|[-4-]} StringCat2(a, b : String) : String <POP 24bb0-24bb2 StackAdj> Δ+8 {[«46""»]|[-4-]} <Call 0x24bb2 0x103e0> {[«46""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 24bb4-24bb6 StackAdj> Δ+50 {} <MI 24bb6 BRA 0x24c82> {} <POP 24bba-24c82 Naked> Σ0 ↓ ←0x24a96 <Blob 0x24bba [50] @> Δ-50 {[«50""»]} <POP 24bc6-24bc8 StackAdj> Δ-4 {[«50""»]|[-4-]} <Lit 0x24bc8 50> {[«50""»]|[$$ 3 => Compare an EEPROM to the file you specify]} <Call 0x24bd4 0x103e0> {[«50""»]|[$$ 3 => Compare an EEPROM to the file you specify]} WriteConsoleStringCrLf(str : String) <POP 24bd6-24bd7 StackAdj> Δ+54 ↓ {} <Blob 0x24bd7 [46] @> Δ-46 {[«46""»]} <POP 24be6-24be8 StackAdj> Δ-8 {[«46""»]|[-8-]} <Lit 0x24be8 45> {[«46""»]|[-4-]|[$$ 4 => Compare all 4 IOC EEPROMs to file_]} <POP 24bf4-24bf5 StackAdj> Δ-4 {[«46""»]|[-4-]|[$$ 4 => Compare all 4 IOC EEPROMs to file_]|[-4-]} <Blob 0x24bf5 [4] 0x290b4> Δ-4 {[«46""»]|[-4-]|[$$ 4 => Compare all 4 IOC EEPROMs to file_]|[-4-]|[«4»]} <Call 0x24bf6 0x102cc> {[«46""»]|[-4-]|[$$ 4 => Compare all 4 IOC EEPROMs to file_]|[-4-]|[«4»]} StringDup(a : String) : String <POP 24bfc-24bfe StackAdj> Δ+4 {[«46""»]|[-4-]|[$$ 4 => Compare all 4 IOC EEPROMs to file_]|[-4-]} <Call 0x24bfe 0x102d0> {[«46""»]|[-4-]|[$$ 4 => Compare all 4 IOC EEPROMs to file_]|[-4-]} StringCat2(a, b : String) : String <POP 24c04-24c06 StackAdj> Δ+8 {[«46""»]|[-4-]} <Call 0x24c06 0x103e0> {[«46""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 24c08-24c09 StackAdj> Δ+50 ↓ {} <Blob 0x24c09 [52] @> Δ-52 {[«52""»]} <POP 24c18-24c1a StackAdj> Δ-4 {[«52""»]|[-4-]} <Lit 0x24c1a 51> {[«52""»]|[$$ 6 => Update an EEPROM from the file you specify]} <Call 0x24c28 0x103e0> {[«52""»]|[$$ 6 => Update an EEPROM from the file you specify]} WriteConsoleStringCrLf(str : String) <POP 24c2a-24c2e StackAdj> Δ+56 {} <Blob 0x24c2e [46] @> Δ-46 {[«46""»]} <POP 24c3a-24c3c StackAdj> Δ-8 {[«46""»]|[-8-]} <Lit 0x24c3c 46> {[«46""»]|[-4-]|[$$ 7 => Update all 4 IOC EEPROMs from file_]} <POP 24c46-24c47 StackAdj> Δ-4 {[«46""»]|[-4-]|[$$ 7 => Update all 4 IOC EEPROMs from file_]|[-4-]} <Blob 0x24c47 [4] 0x290b4> Δ-4 {[«46""»]|[-4-]|[$$ 7 => Update all 4 IOC EEPROMs from file_]|[-4-]|[«4»]} <Call 0x24c48 0x102cc> {[«46""»]|[-4-]|[$$ 7 => Update all 4 IOC EEPROMs from file_]|[-4-]|[«4»]} StringDup(a : String) : String <POP 24c4e-24c50 StackAdj> Δ+4 {[«46""»]|[-4-]|[$$ 7 => Update all 4 IOC EEPROMs from file_]|[-4-]} <Call 0x24c50 0x102d0> {[«46""»]|[-4-]|[$$ 7 => Update all 4 IOC EEPROMs from file_]|[-4-]} StringCat2(a, b : String) : String <POP 24c56-24c58 StackAdj> Δ+8 {[«46""»]|[-4-]} <Call 0x24c58 0x103e0> {[«46""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 24c5a-24c5b StackAdj> Δ+50 ↓ {} <Blob 0x24c5b [60] @> Δ-60 {[«60""»]} <POP 24c6c-24c6e StackAdj> Δ-4 {[«60""»]|[-4-]} <Lit 0x24c6e 59> {[«60""»]|[$$ 9 => Update all 4 IOC EEPROMs from the 4 ".HEX" files]} <Call 0x24c7c 0x103e0> {[«60""»]|[$$ 9 => Update all 4 IOC EEPROMs from the 4 ".HEX" files]} WriteConsoleStringCrLf(str : String) <POP 24c7e-24c82 StackAdj> Δ+64 {} <POP 24c82-24cf0 Naked> Σ0 →0x24d06 →0x24d16 →0x24d1c →0x24d22 →0x24d2e →0x24d38 →0x24d3c →0x24d42 →0x24d4a →0x24d4e →0x24d54 ←0x24aa4 <Blob 0x24c82 [50] @> Δ-50 {[«50""»]} <POP 24c8e-24c90 StackAdj> Δ-4 {[«50""»]|[-4-]} <Lit 0x24c90 50> {[«50""»]|[$$ 10 => Update all obsolete EEPROMs automatically]} <Call 0x24c9c 0x103e0> {[«50""»]|[$$ 10 => Update all obsolete EEPROMs automatically]} WriteConsoleStringCrLf(str : String) <POP 24c9e-24ca2 StackAdj> Δ+54 {} <Blob 0x24ca2 [14] @> Δ-14 {[«14""»]} <POP 24cae-24cb0 StackAdj> Δ-8 {[«14""»]|[-8-]} <Lit 0x24cb0 14> {[«14""»]|[-4-]|[$$Enter option:_]} <Const 0x24cbc 0x0.4> Δ-4 {[«14""»]|[-4-]|[$$Enter option:_]|[##0]} <Const 0x24cc0 0xa.4> Δ-4 {[«14""»]|[-4-]|[$$Enter option:_]|[##0]|[##10]} <Call 0x24cc4 0x103ec> {[«14""»]|[-4-]|[$$Enter option:_]|[##0]|[##10]} AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long <POP 24cca-24cce StackAdj> Δ+12 {[«14""»]|[-4-]} <MI 24cce MOVE.L (A7)+,0x25092> Δ+4 {[«14""»]} <POP 24cd4-24cd6 StackAdj> Δ+14 {} <MI 24cd6 MOVE.L 0x25092,D0> {} <POP 0x24cdc LimitCheck 0x0 ≤ D0 ≤ 0xa> {} <MI 24ce6 ADD.W D0,D0> {} <MI 24ce8 SWITCH D0.W> {} <POP 24d06-24d12 Naked> Σ0 Δ-6 ↓ ←0x24c82 <MI 24d06 CLR.B -(A7)> Δ-2 {[#0]} <Const 0x24d08 0x1.4> Δ-4 {[#0]|[##1]} <Call 0x24d0c 0x103b8> {[#0]|[##1]} PopProgram(status : Byte; msg : String) <POP 24d12-24d16 Naked> Σ-6 Δ+6 →0x24d58 ←0x24d22 <POP 24d12-24d14 StackAdj> Δ+6 {} <MI 24d14 BRA 0x24d58> {} <POP 24d16-24d1c Naked> Σ0 →0x24d58 ←0x24c82 <Call 0x24d16 0x2442c> {} <MI 24d1a BRA 0x24d58> {} <POP 24d1c-24d22 Naked> Σ0 →0x24d58 ←0x24c82 <Call 0x24d1c 0x2476e> {} <MI 24d20 BRA 0x24d58> {} <POP 24d22-24d2e Naked> Σ0 Δ-6 →0x24d12 ←0x24c82 <Const 0x24d22 0x1.4> Δ-4 {[##1]} <MI 24d26 CLR.W -(A7)> Δ-2 {[##1]|[#0]} <Call 0x24d28 0x22bc6> {[##1]|[#0]} <MI 24d2c BRA 0x24d12> {[##1]|[#0]} <POP 24d2e-24d30 Naked> Σ0 Δ-2 ↓ ←0x24c82 <MI 24d2e CLR.B -(A7)> Δ-2 {[#0]} <POP 24d30-24d34 Naked> Σ-2 ↓ ←0x24d38 <Call 0x24d30 0x22cfc> {[-2-]} <POP 24d34-24d38 Naked> Σ-2 Δ+2 →0x24d58 ←0x24d44 <POP 24d34-24d36 StackAdj> Δ+2 {} <MI 24d36 BRA 0x24d58> {} <POP 24d38-24d3c Naked> Σ0 Δ-2 →0x24d30 ←0x24c82 <Const 0x24d38 0x1.2> Δ-2 {[#1]} <MI 24d3a BRA 0x24d30> {[#1]} <POP 24d3c-24d42 Naked> Σ0 →0x24d58 ←0x24c82 <Call 0x24d3c 0x23758> {} <MI 24d40 BRA 0x24d58> {} <POP 24d42-24d44 Naked> Σ0 Δ-2 ↓ ←0x24c82 <MI 24d42 CLR.B -(A7)> Δ-2 {[#0]} <POP 24d44-24d4a Naked> Σ-2 →0x24d34 ←0x24d4a <Call 0x24d44 0x23b48> {[-2-]} <MI 24d48 BRA 0x24d34> {[-2-]} <POP 24d4a-24d4e Naked> Σ0 Δ-2 →0x24d44 ←0x24c82 <Const 0x24d4a 0x1.2> Δ-2 {[#1]} <MI 24d4c BRA 0x24d44> {[#1]} <POP 24d4e-24d54 Naked> Σ0 →0x24d58 ←0x24c82 <Call 0x24d4e 0x23910> {} <MI 24d52 BRA 0x24d58> {} <POP 24d54-24d58 Naked> Σ0 ↓ ←0x24c82 <Call 0x24d54 0x24062> {} <POP 24d58-24d5c Naked> Σ0 →0x24a06 ←0x24d12 ←0x24d16 ←0x24d1c ←0x24d34 ←0x24d3c ←0x24d4e <MI 24d58 BRA 0x24a06> {}
@ 24e90 PROG_FAIL <LVAR 0x008 1(r)> <POP 24e90-24ef8 Body> <POP 24e90-24ea6 Prologue> Σ0 ↓ <POP 24ea6-24ef0 Naked> Σ0 ↓ <Blob 0x24ea6 [14] @> Δ-14 {[«14""»]} <Const 0x24eb2 0x3.2> Δ-2 {[«14""»]|[#3]} <POP 24eb6-24eb8 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]} <Lit 0x24eb8 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]} <POP 24eca-24ecc StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 24ecc MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 24ed0 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 24ed2 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 24ed4 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']} <Call 0x24ed6 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']} Long2String(a : Long) : String <POP 24edc-24ede StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <Call 0x24ede 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} StringCat2(a, b : String) : String <POP 24ee4-24ee6 StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]} <Call 0x24ee6 0x103b8> {[«14""»]|[#3]|[-4-]} PopProgram(status : Byte; msg : String) <POP 24eec-24ef0 StackAdj> Δ+20 {} <POP 24ef0-24ef8 Epilogue> Σ0
@ 24f4c EXP_FAIL <LVAR 0x00e 1(r)> <LVAR 0x00a 4(r)> <LVAR 0x008 1(r)> <POP 24f4c-25088 Body> <POP 24f4c-24f62 Prologue> Σ0 ↓ <POP 24f62-24f78 RegCacheLoad> Σ0 ↓ <POP 24f78-24fd8 Naked> Σ0 ↓ →0x25020 <Call 0x24f78 0x103dc> {} WriteConsoleCrLf(void) <Blob 0x24f7e [18] @> Δ-18 {[«18""»]} <POP 24f8a-24f8c StackAdj> Δ-4 {[«18""»]|[-4-]} <Lit 0x24f8c 18> {[«18""»]|[$$Experiment error :]} <Call 0x24f98 0x103e0> {[«18""»]|[$$Experiment error :]} WriteConsoleStringCrLf(str : String) <POP 24f9a-24f9b StackAdj> Δ+22 ↓ {} <Blob 0x24f9b [14] @> Δ-14 {[«14""»]} <POP 24faa-24fac StackAdj> Δ-8 {[«14""»]|[-8-]} <Lit 0x24fac 13> {[«14""»]|[-4-]|[$$Board :_]} <POP 24fb6-24fb8 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]} <MI 24fb8 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]} <Call 0x24fbc 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]} BoardName(address : B) : String <POP 24fc2-24fc4 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]} <Call 0x24fc4 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]} StringCat2(a, b : String) : String <POP 24fca-24fcc StackAdj> Δ+8 {[«14""»]|[-4-]} <Call 0x24fcc 0x103e0> {[«14""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 24fce-24fd0 StackAdj> Δ+18 {} <MI 24fd0 MOVEA.L (A6+0xa),A0> {} <MI 24fd4 CMPA.W #0x01,A0> {} <MI 24fd6 BEQ 0x25020> {} <POP 24fd8-25020 Naked> Σ0 ↓ <Blob 0x24fd8 [14] @> Δ-14 {[«14""»]} <Blob 0x24fe8 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]} <POP 24ff8-24ffa StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]} <Lit 0x24ffa 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]} <POP 25004-25006 StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]} <Lit 0x25006> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]} <Pointer.sp 0x25006 12> Δ-4 <Const 0x2500a 0x1.2> Δ-2 <Const 0x2500c 0x1e.2> Δ-2 <Call 0x2500e 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 25010-25012 StackAdj> Δ+8 <Call 0x25012 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]} StringCat2(a, b : String) : String <POP 25018-2501a StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]} <Call 0x2501a 0x103e0> {[«14""»]|[«30»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 2501c-25020 StackAdj> Δ+48 {} <POP 25020-25080 Naked> Σ0 ↓ ←0x24f78 <Blob 0x25020 [14] @> Δ-14 {[«14""»]} <POP 25030-25032 StackAdj> Δ-8 {[«14""»]|[-8-]} <Lit 0x25032 13> {[«14""»]|[-4-]|[$$Status :_]} <POP 2503c-2503e StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]} <MI 2503e MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]} <Call 0x25042 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]} ExpStatus2Text(status.B, &String) <POP 25048-2504a StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]} <Call 0x2504a 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]} StringCat2(a, b : String) : String <POP 25050-25052 StackAdj> Δ+8 {[«14""»]|[-4-]} <Call 0x25052 0x103e0> {[«14""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 25054-25055 StackAdj> Δ+18 ↓ {} <Blob 0x25055 [24] @> Δ-24 {[«24""»]} <Const 0x25064 0x2.2> Δ-2 {[«24""»]|[#2]} <POP 25068-2506a StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]} <Lit 0x2506a 23> {[«24""»]|[#2]|[$$Fatal experiment error.]} <Call 0x25078 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]} PopProgram(status : Byte; msg : String) <POP 2507e-25080 StackAdj> Δ+30 {} <POP 25080-25088 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.03e14e4d32ec21f7 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 48 1c | H | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 90 dc | | .PTR 0x290dc 00020010 code.end: 00020010 00 02 50 88 | P | .PTR 0x25088 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 4e 90 | N | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 4f 4c | OL | .CODE EXP_FAIL 00020020 00 00 00 00 | | .CONST 0x00000000 00020024 exp_init_done: 00020024 00 | | .CONST 0x00 00020025 00 | | .CONST 0x00 00020026 00 00 | | .CONST 0x0000 00020028 00 00 | | .CONST 0x0000 0002002a 00 00 | | .XXX[0x2] 0002002c 00 00 | | .CONST 0x0000 0002002e 00 00 | | .CONST 0x0000 00020030 00 00 | | .CONST 0x0000 00020032 00 00 00 00 00 00 | | .XXX[0x6] 00020038 00 00 00 00 00 00 00 00 | | .BLANK 00[0xb0] 000200e8 00 00 00 00 | | .XXX[0x4] 000200ec 00 00 00 00 | | .PTR 0x0 000200f0 is_open_ERROR_LOG: 000200f0 00 | | .CONST 0x0 000200f1 write_error_ERROR_LOG: 000200f1 00 | | .CONST 0x0 000200f2 00 00 00 00 | | .CONST 0x00000000 000200f6 00 00 00 00 | | .CONST 0x00000000 000200fa 00 | | .CONST 0x00 000200fb 00 | | .CONST 0x00 000200fc file_ERROR_LOG: 000200fc 00 00 00 00 | | .CONST 0x00000000 00020100 00 00 00 00 | | .CONST 0x00000000 00020104 00 00 | | .CONST 0x0000 00020106 00 00 | | .CONST 0x0000 00020108 somekindoffsflag: 00020108 00 | | .CONST 0x00 00020109 00 | | .CONST 0x00 0002010a 40 28 23 29 55 50 44 41 |@(#)UPDA| .TXT '@(#)UPDATE_EEPROM,5.3,92/05/04,12:34:56\' 00020132 6e 6f 20 65 |no e | .TXT 'no e' 00020136 72 72 6f 72 |rror | .TXT 'rror' 0002013a 69 6c 6c 65 67 61 6c 20 |illegal | .TXT 'illegal prom select code' 00020152 62 61 64 20 63 68 65 63 |bad chec| .TXT 'bad checksum detected ' 00020168 77 72 69 74 65 20 70 72 |write pr| .TXT 'write protect switch is on' 00020182 69 6c 6c 65 67 61 6c 20 |illegal | .TXT 'illegal module id ' 00020194 6e 6f 20 6f 76 65 72 6c |no overl| .TXT 'no overlay validity byte' 000201ac 70 72 6f 6d 20 77 72 69 |prom wri| .TXT 'prom write failed ' 000201be 70 72 6f 6d 20 77 72 69 |prom wri| .TXT 'prom write timed out' 000201d2 2a 2a 20 75 6e 6b 6e 6f |** unkno| .TXT '** unknown ERROR_CODE =_' 000201ea 2a 2a 2a 20 41 42 4f 52 |*** ABOR| .TXT '*** ABORT:_ ' 000201f6 49 4e 53 54 41 4c 4c 20 |INSTALL | .TXT 'INSTALL failed: you have to reboot the system ' 00020224 73 65 65 20 65 72 72 6f |see erro| .TXT 'see error message above ' 0002023c 53 45 4c 46 |SELF | .TXT 'SELF' 00020240 54 45 53 54 |TEST | .TXT 'TEST' 00020244 42 4f 4f 54 |BOOT | .TXT 'BOOT' 00020248 55 54 49 4c |UTIL | .TXT 'UTIL' 0002024c 2f 44 45 42 |/DEB | .TXT '/DEB' 00020250 4e 45 54 2f |NET/ | .TXT 'NET/' 00020254 44 45 42 32 |DEB2 | .TXT 'DEB2' 00020258 52 45 53 5f |RES_ | .TXT 'RES_' 0002025c 54 45 53 54 |TEST | .TXT 'TEST' 00020260 4c 41 4e 43 45 20 |LANCE | .TXT 'LANCE ' 00020266 44 49 53 4b |DISK | .TXT 'DISK' 0002026a 54 41 50 45 |TAPE | .TXT 'TAPE' 0002026e 3f 3f |?? | .TXT '??' 00020270 3f 20 |? | .XXX[0x2] 00020272 43 68 65 63 6b 73 75 6d |Checksum| .TXT 'Checksum error in file data line' 00020292 46 69 6c 65 20 68 61 73 |File has| .TXT 'File has no END record' 000202a8 46 69 6c 65 20 6c 69 6e |File lin| .TXT 'File line too long' 000202ba 49 6e 76 61 6c 69 64 20 |Invalid | .TXT 'Invalid file data line format ' 000202d8 43 68 65 63 6b 73 75 6d |Checksum| .TXT 'Checksum error in file data line' 000202f8 46 69 6c 65 20 68 61 73 |File has| .TXT 'File has no END record' 0002030e 49 6e 76 61 6c 69 64 20 |Invalid | .TXT 'Invalid file data line format ' 0002032c 20 72 | r | .TXT ' r' 0002032e 65 61 |ea | .TXT 'ea' 00020330 64 5f |d_ | .TXT 'd_' 00020332 20 62 79 74 65 73 20 66 | bytes f| .TXT ' bytes from file at base address 16#' 00020356 69 6e 20 66 69 6c 65 3a |in file:| .TXT 'in file: revision date =_ ' 00020370 2c 20 6c 6f 63 75 73 20 |, locus | .TXT ', locus byte =_ ' 00020380 20 28 | ( | .TXT ' (' 00020382 29 2c 20 63 68 65 63 6b |), check| .TXT '), checksum is OK ' 00020394 29 20 |) | .TXT ') ' 00020396 45 52 52 4f 52 3a 20 62 |ERROR: b| .TXT 'ERROR: bad file checksum: expected 16#AA but got 16#' 000203ca 44 6f 20 79 6f 75 20 77 |Do you w| .TXT 'Do you wish to continue_' 000203e2 72 65 71 75 65 73 74 65 |requeste| .TXT 'requested by user ' 000203f4 77 69 6c 6c 20 77 72 69 |will wri| .TXT 'will write the correct checksum to prom ' 0002041c 66 69 6c 65 20 4c 4f 43 |file LOC| .TXT 'file LOCUS byte is incorrect' 00020438 66 69 6c 65 20 62 61 73 |file bas| .TXT 'file base address is incorrect' 00020456 46 69 6c 65 20 68 61 73 |File has| .TXT 'File has illegal base address ' 00020474 66 69 78 65 64 20 69 6e |fixed in| .TXT 'fixed incorrect LOCUS byte from file: now targets_' 000204a6 45 6e 74 65 72 20 74 68 |Enter th| .TXT 'Enter the file name of the EEPROM data :_ ' 000204d0 63 6f 75 6c 64 20 6e 6f |could no| .TXT 'could not open data file' 000204e8 46 69 6c 65 20 69 73 20 |File is | .TXT 'File is empty ' 000204f6 49 6e 76 61 6c 69 64 20 |Invalid | .TXT 'Invalid file format ' 0002050a 2a 2a 2a 20 45 52 52 4f |*** ERRO| .TXT '*** ERROR: test of EEPROM failed ***' 0002052e 74 65 73 74 20 6f 66 20 |test of | .TXT 'test of EEPROM passed ' 00020544 69 6e 20 70 72 6f 6d 3a |in prom:| .TXT 'in prom: revision date =_ ' 0002055e 2c 20 6c 6f 63 75 73 20 |, locus | .TXT ', locus byte =_ ' 0002056e 57 41 52 4e 49 4e 47 3a |WARNING:| .TXT 'WARNING: the EEPROM has an incorrect LOCUS byte ' 0002059e 57 61 72 6e 69 6e 67 20 |Warning | .TXT 'Warning from REE_DOWNLOAD:_ ' 000205ba 45 45 50 52 4f 4d 20 6d |EEPROM m| .TXT 'EEPROM matched file ' 000205ce 20 64 69 66 66 65 72 69 | differi| .TXT ' differing bytes were found (excluding checksum)' 000205fe 20 45 45 50 | EEP | .TXT ' EEP' 00020602 52 4f 4d 3a |ROM: | .TXT 'ROM:' 00020606 65 6e 74 65 72 20 70 72 |enter pr| .TXT 'enter prom filename [ ' 0002061c 5d 20 3a 5f |] :_ | .TXT '] :_' 00020620 2a 2a 2a 20 50 72 6f 67 |*** Prog| .TXT '*** Programming Failure: address = 16#' 00020646 20 77 72 6f 74 65 20 31 | wrote 1| .TXT ' wrote 16#' 00020650 20 72 65 61 64 20 62 61 | read ba| .TXT ' read back 16#' 0002065e 45 45 50 52 4f 4d 20 66 |EEPROM f| .TXT 'EEPROM failed to program even after many retries' 0002068e 54 68 65 20 73 79 73 74 |The syst| .TXT 'The system may not boot properly unless you replace the IOC EEPROM' 000206d0 74 68 65 20 65 72 72 6f |the erro| .TXT 'the error above was fatal ' 000206ea 45 45 50 52 4f 4d 20 73 |EEPROM s| .TXT 'EEPROM successfully updated ' 00020706 45 45 50 52 4f 4d 20 6d |EEPROM m| .TXT 'EEPROM matched file, update wasn't needed ' 00020730 57 61 72 6e 69 6e 67 20 |Warning | .TXT 'Warning from REE_UPLOAD:_ ' 0002074a 65 72 72 6f 72 20 66 72 |error fr| .TXT 'error from REE_DOWNLOAD:_ ' 00020764 57 61 72 6e 69 6e 67 3a |Warning:| .TXT 'Warning:_ ' 0002076e 20 62 79 74 65 73 20 77 | bytes w| .TXT ' bytes were incorrectly written - retrying' 00020798 2a 2a 2a 20 45 52 52 4f |*** ERRO| .TXT '*** ERROR: program EEPROM failed too many times ' 000207c8 54 68 65 20 73 79 73 74 |The syst| .TXT 'The system may not boot properly unless you replace the RESHA EEPROM' 0002080c 74 68 65 20 65 72 72 6f |the erro| .TXT 'the error above was fatal ' 00020826 45 45 50 52 4f 4d 20 73 |EEPROM s| .TXT 'EEPROM successfully updated ' 00020842 20 61 6e 64 20 76 65 72 | and ver| .TXT ' and verified, ignore the warnings above' 0002086a 74 75 72 6e 20 74 68 65 |turn the| .TXT 'turn the EEPROM WRITE PROTECT switch ON (up)' 00020896 74 75 72 6e 20 74 68 65 |turn the| .TXT 'turn the EEPROM WRITE PROTECT switch (at front of RESHA board) OFF (down) ' 000208e0 20 2d 20 4f 4b 20 | - OK | .TXT ' - OK ' 000208e6 55 70 64 61 74 69 6e 67 |Updating| .TXT 'Updating this EEPROM will take about_ ' 0002090c 20 73 65 63 6f 6e 64 73 | seconds| .TXT ' seconds... ' 00020918 56 65 72 69 66 79 69 6e |Verifyin| .TXT 'Verifying file_ ' 00020928 52 65 61 64 69 6e 67 20 |Reading | .TXT 'Reading file_ ' 00020936 55 70 64 61 74 65 20 74 |Update t| .TXT 'Update this EEPROM_ ' 0002094a 53 45 4c 46 |SELF | .TXT 'SELF' 0002094e 54 45 53 54 |TEST | .TXT 'TEST' 00020952 2e 48 45 58 |.HEX | .TXT '.HEX' 00020956 42 4f 4f 54 |BOOT | .TXT 'BOOT' 0002095a 2e 48 45 58 |.HEX | .TXT '.HEX' 0002095e 55 54 |UT | .XXX[0x2] 00020960 49 4c 49 54 49 45 53 2e |ILITIES.| .XXX[0x8] 00020968 48 45 58 20 |HEX | .XXX[0x4] 0002096c 4e 45 54 57 4f 52 4b 2e |NETWORK.| .TXT 'NETWORK.HEX ' 00020978 53 45 4c 46 |SELF | .TXT 'SELF' 0002097c 54 45 53 54 |TEST | .TXT 'TEST' 00020980 2e 48 45 58 |.HEX | .TXT '.HEX' 00020984 42 4f 4f 54 |BOOT | .TXT 'BOOT' 00020988 2e 48 45 58 |.HEX | .TXT '.HEX' 0002098c 55 54 49 4c |UTIL | .XXX[0x4] 00020990 49 54 49 45 53 2e 48 45 |ITIES.HE| .XXX[0x8] 00020998 58 20 |X | .XXX[0x2] 0002099a 4e 45 54 57 4f 52 4b 2e |NETWORK.| .TXT 'NETWORK.HEX ' 000209a6 20 45 45 50 | EEP | .TXT ' EEP' 000209aa 52 4f 4d 3a |ROM: | .TXT 'ROM:' 000209ae 55 70 64 61 74 65 20 74 |Update t| .TXT 'Update this EEPROM_ ' 000209c2 65 6e 74 65 72 20 70 72 |enter pr| .TXT 'enter prom filename [ ' 000209d8 5d 20 3a 5f |] :_ | .TXT '] :_' 000209dc 43 6f 6d 70 61 72 69 6e |Comparin| .TXT 'Comparing the new prom files to the actual EEPROMs: ' 00020a10 20 20 28 74 68 65 20 72 | (the r| .TXT ' (the revision dates are identical but the data does not match)' 00020a50 44 6f 20 79 6f 75 20 77 |Do you w| .TXT 'Do you want to update this prom ' 00020a70 3a 20 70 72 |: pr | .TXT ': pr' 00020a74 6f 6d 20 72 |om r | .TXT 'om r' 00020a78 65 76 69 73 |evis | .TXT 'evis' 00020a7c 69 6f 6e 5f |ion_ | .TXT 'ion_' 00020a80 2c 20 66 69 |, fi | .TXT ', fi' 00020a84 6c 65 20 72 |le r | .TXT 'le r' 00020a88 65 76 69 73 |evis | .TXT 'evis' 00020a8c 69 6f 6e 5f |ion_ | .TXT 'ion_' 00020a90 20 2d 20 70 72 6f 6d 20 | - prom | .TXT ' - prom newer than file!' 00020aa8 20 2d 20 50 52 4f 4d 20 | - PROM | .TXT ' - PROM needs updating' 00020abe 20 2d 20 50 52 4f 4d 20 | - PROM | .TXT ' - PROM needs updating' 00020ad4 20 2d 20 4f 4b 2c 20 77 | - OK, w| .TXT ' - OK, won't update ' 00020ae8 55 70 64 61 |Upda | .TXT 'Upda' 00020aec 74 69 6e 67 |ting | .TXT 'ting' 00020af0 20 45 45 50 | EEP | .TXT ' EEP' 00020af4 52 4f 4d 5f |ROM_ | .TXT 'ROM_' 00020af8 2e 20 |. | .TXT '. ' 00020afa 74 68 65 20 49 4f 43 20 |the IOC | .TXT 'the IOC board revision # in the EEPROM will be updated' 00020b30 49 4f |IO | .TXT 'IO' 00020b32 43 20 |C | .XXX[0x2] 00020b34 74 68 65 20 52 45 53 48 |the RESH| .TXT 'the RESHA board revision # in the EEPROM will updated ' 00020b6a 52 45 53 48 41 20 |RESHA | .TXT 'RESHA ' 00020b70 6e 6f 20 45 45 50 52 4f |no EEPRO| .TXT 'no EEPROMs need updating' 00020b88 75 70 64 61 74 69 6e 67 |updating| .TXT 'updating the EEPROMS will take about_ ' 00020bae 20 73 65 63 6f 6e 64 73 | seconds| .TXT ' seconds to complete. ' 00020bc4 61 6c 6c 20 45 45 50 52 |all EEPR| .TXT 'all EEPROMs are up to date now' 00020be2 4f 70 74 69 |Opti | .TXT 'Opti' 00020be6 6f 6e 73 20 |ons | .TXT 'ons ' 00020bea 61 72 65 3a |are: | .TXT 'are:' 00020bee 20 20 20 20 30 20 3d 3e | 0 =>| .TXT ' 0 => Exit ' 00020bfc 20 20 20 20 31 20 3d 3e | 1 =>| .TXT ' 1 => Test SELFTEST EEPROM location (K21) ' 00020c30 20 20 20 20 32 20 3d 3e | 2 =>| .TXT ' 2 => Test BOOT EEPROM location (K19) ' 00020c64 20 20 20 20 33 20 3d 3e | 3 =>| .TXT ' 3 => Test UTILITIES/DEBUG EEPROM location (K17) ' 00020c98 20 20 20 20 34 20 3d 3e | 4 =>| .TXT ' 4 => Test NOVRAM/NET/DEB2 EEPROM location (K15) ' 00020ccc 45 6e 74 65 72 20 6f 70 |Enter op| .TXT 'Enter option :_ ' 00020cdc 20 70 72 6f 6d 3a 20 72 | prom: r| .TXT ' prom: revision =_' 00020cee 2c 20 6c 6f 63 75 73 20 |, locus | .TXT ', locus byte =_ ' 00020cfe 2c 20 43 48 45 43 4b 53 |, CHECKS| .TXT ', CHECKSUM IS BAD *** ' 00020d14 2c 20 63 68 |, ch | .TXT ', ch' 00020d18 65 63 6b 73 |ecks | .TXT 'ecks' 00020d1c 75 6d 20 69 |um i | .TXT 'um i' 00020d20 73 20 4f 4b |s OK | .TXT 's OK' 00020d24 20 20 20 20 30 20 3d 3e | 0 =>| .TXT ' 0 => Exit ' 00020d32 20 20 20 20 31 20 3d 3e | 1 =>| .TXT ' 1 => Write/read test an EEPROM' 00020d54 20 20 20 20 32 20 3d 3e | 2 =>| .TXT ' 2 => Checksum test & print revision of all EEPROMs' 00020d8a 20 20 20 20 33 20 3d 3e | 3 =>| .TXT ' 3 => Compare an EEPROM to the file you specify' 00020dbc 20 20 20 20 33 20 3d 3e | 3 =>| .TXT ' 3 => Compare an EEPROM quadrant to the file you specify ' 00020df8 20 20 20 20 34 20 3d 3e | 4 =>| .TXT ' 4 => Compare all 4 IOC EEPROMs to file_ ' 00020e26 20 20 20 20 35 20 3d 3e | 5 =>| .TXT ' 5 => Compare all 4 RESHA EEPROMs to file_ ' 00020e54 20 20 20 20 36 20 3d 3e | 6 =>| .TXT ' 6 => Update an EEPROM from the file you specify ' 00020e88 20 20 20 20 36 20 3d 3e | 6 =>| .TXT ' 6 => Update an EEPROM quadrant from the file you specify' 00020ec4 20 20 20 20 37 20 3d 3e | 7 =>| .TXT ' 7 => Update all 4 IOC EEPROMs from file_' 00020ef2 20 20 20 20 38 20 3d 3e | 8 =>| .TXT ' 8 => Update all 4 RESHA EEPROMs from file_' 00020f20 20 20 20 20 39 20 3d 3e | 9 =>| .TXT ' 9 => Update all 4 IOC EEPROMs from the 4 ".HEX" files ' 00020f5c 20 20 20 31 30 20 3d 3e | 10 =>| .TXT ' 10 => Update all obsolete EEPROMs automatically' 00020f8e 49 4f 43 2e 4d 34 30 30 |IOC.M400| .TXT 'IOC.M400_PROM ' 00020f9c 52 45 53 48 41 2e 4d 34 |RESHA.M4| .TXT 'RESHA.M400_PROM ' 00020fac 49 4f 43 2e 4d 32 30 30 |IOC.M200| .TXT 'IOC.M200_PROM ' 00020fba 52 45 53 48 41 2e 4d 32 |RESHA.M2| .TXT 'RESHA.M200_PROM ' 00020fca 49 4e 53 54 41 4c 4c 20 |INSTALL | .TXT 'INSTALL ' 00020fd2 49 4e 53 54 41 4c 4c 20 |INSTALL | .TXT 'INSTALL successfully completed - rebooting IOP' 00021000 4f 70 74 69 |Opti | .TXT 'Opti' 00021004 6f 6e 73 20 |ons | .TXT 'ons ' 00021008 61 72 65 3a |are: | .TXT 'are:' 0002100c 45 6e 74 65 72 20 6f 70 |Enter op| .TXT 'Enter option:_' 0002101a ; -------------------------------------------------------------------------------------- 0002101a ; OMSI PASCAL Function 0002101a ; <LVAR 0x00c 4(w)> 0002101a ; <LVAR 0x008 4(r)> 0002101a ; -------------------------------------------------------------------------------------- 0002101a 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 0002101e bf d5 | | CMPA.L (A5),A7 00021020 62 06 |b | BHI 0x21028 00021022 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021026 4e 76 |Nv | TRAPV 00021028 de fc 00 58 | X | ADDA.W #0x58,A7 0002102c 48 e7 fe f0 |H | MOVEM.L A3+A2+A1+A0+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021030 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00021036 47 ee 00 0c |G | LEA.L (A6+0xc),A3 0002103a 72 01 |r | MOVEQ.L #0x01,D1 0002103c 74 18 |t | MOVEQ.L #0x18,D2 0002103e 76 12 |v | MOVEQ.L #0x12,D3 00021040 78 16 |x | MOVEQ.L #0x16,D4 00021042 7a 1a |z | MOVEQ.L #0x1a,D5 00021044 7c 14 || | MOVEQ.L #0x14,D6 00021046 20 2e 00 08 | . | MOVE.L (A6+0x8),D0 0002104a 0c 80 00 00 00 07 | | CMPI.L #0x00000007,D0 00021050 62 00 01 0a |b | BHI 0x2115c 00021054 d0 40 | @ | ADD.W D0,D0 00021056 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 0002105e 00 10 | | .CONST 0x10 ; [0x0] -> 0x2106e 00021060 00 30 | 0 | .CONST 0x30 ; [0x1] -> 0x2108e 00021062 00 4c | L | .CONST 0x4c ; [0x2] -> 0x210aa 00021064 00 74 | t | .CONST 0x74 ; [0x3] -> 0x210d2 00021066 00 96 | | .CONST 0x96 ; [0x4] -> 0x210f4 00021068 00 bc | | .CONST 0xbc ; [0x5] -> 0x2111a 0002106a 00 cc | | .CONST 0xcc ; [0x6] -> 0x2112a 0002106c 00 de | | .CONST 0xde ; [0x7] -> 0x2113c 0002106e switch@0x21056[0x0]: 0002106e 2f 3a f0 c6 |/: | MOVE.L 0x20136,-(A7) 00021072 2f 3a f0 be |/: | MOVE.L 0x20132,-(A7) 00021076 59 4f |YO | SUBQ.L #0x4,A7 00021078 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002107c 3f 01 |? | MOVE.W D1,-(A7) 0002107e 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00021082 4e 92 |N | JSR (A2) 00021084 50 4f |PO | ADDQ.L #0x8,A7 00021086 26 9f |& | MOVE.L (A7)+,(A3) 00021088 50 4f |PO | ADDQ.L #0x8,A7 0002108a 60 00 01 00 |` | BRA 0x2118c 0002108e switch@0x21056[0x1]: 0002108e 41 fa f0 c2 |A | LEA.L 0x20152,A0 00021092 70 05 |p | MOVEQ.L #0x05,D0 00021094 2f 20 |/ | MOVE.L -(A0),-(A7) 00021096 51 c8 ff fc |Q | DBF D0,0x21094 0002109a 59 4f |YO | SUBQ.L #0x4,A7 0002109c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000210a0 3f 01 |? | MOVE.W D1,-(A7) 000210a2 3f 02 |? | MOVE.W D2,-(A7) 000210a4 4e 92 |N | JSR (A2) 000210a6 60 00 00 de |` | BRA 0x21186 000210aa switch@0x21056[0x2]: 000210aa 9e c4 | | SUBA.W D4,A7 000210ac 20 4f | O | MOVEA.L A7,A0 000210ae 43 fa f0 a2 |C | LEA.L 0x20152,A1 000210b2 70 14 |p | MOVEQ.L #0x14,D0 000210b4 10 d9 | | MOVE.B (A1)+,(A0)+ 000210b6 51 c8 ff fc |Q | DBF D0,0x210b4 000210ba 59 4f |YO | SUBQ.L #0x4,A7 000210bc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000210c0 3f 01 |? | MOVE.W D1,-(A7) 000210c2 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 000210c6 4e 92 |N | JSR (A2) 000210c8 50 4f |PO | ADDQ.L #0x8,A7 000210ca 26 9f |& | MOVE.L (A7)+,(A3) 000210cc de c4 | | ADDA.W D4,A7 000210ce 60 00 00 bc |` | BRA 0x2118c 000210d2 switch@0x21056[0x3]: 000210d2 41 fa f0 ae |A | LEA.L 0x20182,A0 000210d6 70 0c |p | MOVEQ.L #0x0c,D0 000210d8 3f 20 |? | MOVE.W -(A0),-(A7) 000210da 51 c8 ff fc |Q | DBF D0,0x210d8 000210de 59 4f |YO | SUBQ.L #0x4,A7 000210e0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000210e4 3f 01 |? | MOVE.W D1,-(A7) 000210e6 3f 05 |? | MOVE.W D5,-(A7) 000210e8 4e 92 |N | JSR (A2) 000210ea 50 4f |PO | ADDQ.L #0x8,A7 000210ec 26 9f |& | MOVE.L (A7)+,(A3) 000210ee de c5 | | ADDA.W D5,A7 000210f0 60 00 00 9a |` | BRA 0x2118c 000210f4 switch@0x21056[0x4]: 000210f4 9e c3 | | SUBA.W D3,A7 000210f6 20 4f | O | MOVEA.L A7,A0 000210f8 43 fa f0 88 |C | LEA.L 0x20182,A1 000210fc 70 10 |p | MOVEQ.L #0x10,D0 000210fe 10 d9 | | MOVE.B (A1)+,(A0)+ 00021100 51 c8 ff fc |Q | DBF D0,0x210fe 00021104 59 4f |YO | SUBQ.L #0x4,A7 00021106 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002110a 3f 01 |? | MOVE.W D1,-(A7) 0002110c 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 00021110 4e 92 |N | JSR (A2) 00021112 50 4f |PO | ADDQ.L #0x8,A7 00021114 26 9f |& | MOVE.L (A7)+,(A3) 00021116 de c3 | | ADDA.W D3,A7 00021118 60 72 |`r | BRA 0x2118c 0002111a switch@0x21056[0x5]: 0002111a 41 fa f0 90 |A | LEA.L 0x201ac,A0 0002111e 70 05 |p | MOVEQ.L #0x05,D0 00021120 2f 20 |/ | MOVE.L -(A0),-(A7) 00021122 51 c8 ff fc |Q | DBF D0,0x21120 00021126 60 00 ff 72 |` r | BRA 0x2109a 0002112a switch@0x21056[0x6]: 0002112a 9e c3 | | SUBA.W D3,A7 0002112c 20 4f | O | MOVEA.L A7,A0 0002112e 43 fa f0 7c |C | | LEA.L 0x201ac,A1 00021132 70 10 |p | MOVEQ.L #0x10,D0 00021134 10 d9 | | MOVE.B (A1)+,(A0)+ 00021136 51 c8 ff fc |Q | DBF D0,0x21134 0002113a 60 c8 |` | BRA 0x21104 0002113c switch@0x21056[0x7]: 0002113c 41 fa f0 94 |A | LEA.L 0x201d2,A0 00021140 70 04 |p | MOVEQ.L #0x04,D0 00021142 2f 20 |/ | MOVE.L -(A0),-(A7) 00021144 51 c8 ff fc |Q | DBF D0,0x21142 00021148 59 4f |YO | SUBQ.L #0x4,A7 0002114a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002114e 3f 01 |? | MOVE.W D1,-(A7) 00021150 3f 06 |? | MOVE.W D6,-(A7) 00021152 4e 92 |N | JSR (A2) 00021154 50 4f |PO | ADDQ.L #0x8,A7 00021156 26 9f |& | MOVE.L (A7)+,(A3) 00021158 de c6 | | ADDA.W D6,A7 0002115a 60 30 |`0 | BRA 0x2118c 0002115c 41 fa f0 8c |A | LEA.L 0x201ea,A0 00021160 70 05 |p | MOVEQ.L #0x05,D0 00021162 2f 20 |/ | MOVE.L -(A0),-(A7) 00021164 51 c8 ff fc |Q | DBF D0,0x21162 00021168 51 4f |QO | SUBQ.L #0x8,A7 0002116a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002116e 3f 01 |? | MOVE.W D1,-(A7) 00021170 3f 02 |? | MOVE.W D2,-(A7) 00021172 4e 92 |N | JSR (A2) 00021174 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00021178 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002117e 58 4f |XO | ADDQ.L #0x4,A7 00021180 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021186 50 4f |PO | ADDQ.L #0x8,A7 00021188 26 9f |& | MOVE.L (A7)+,(A3) 0002118a de c2 | | ADDA.W D2,A7 0002118c 4c df 0f 7f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+A0+A1+A2+A3 00021190 4e 5e |N^ | UNLK A6 00021192 4e 75 |Nu | RTS 00021194 ; -------------------------------------------------------------------------------------- 00021194 ; OMSI PASCAL Function 00021194 ; <LVAR 0x008 4(r)> 00021194 ; -------------------------------------------------------------------------------------- 00021194 4e 56 ff ae |NV | LINK.W A6,#0xffae 00021198 bf d5 | | CMPA.L (A5),A7 0002119a 62 06 |b | BHI 0x211a2 0002119c 44 fc 00 02 |D | MOVE.W #0x2,CCR 000211a0 4e 76 |Nv | TRAPV 000211a2 de fc 00 52 | R | ADDA.W #0x52,A7 000211a6 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000211aa 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 000211b0 72 01 |r | MOVEQ.L #0x01,D1 000211b2 9e fc 00 0c | | SUBA.W #0xc,A7 000211b6 20 4f | O | MOVEA.L A7,A0 000211b8 43 fa f0 30 |C 0 | LEA.L 0x201ea,A1 000211bc 70 0a |p | MOVEQ.L #0x0a,D0 000211be 10 d9 | | MOVE.B (A1)+,(A0)+ 000211c0 51 c8 ff fc |Q | DBF D0,0x211be 000211c4 51 4f |QO | SUBQ.L #0x8,A7 000211c6 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000211ca 3f 01 |? | MOVE.W D1,-(A7) 000211cc 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 000211d0 4e 92 |N | JSR (A2) 000211d2 58 4f |XO | ADDQ.L #0x4,A7 000211d4 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 000211d8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000211de 50 4f |PO | ADDQ.L #0x8,A7 000211e0 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000211e6 de fc 00 10 | | ADDA.W #0x10,A7 000211ea 4a 39 00 02 90 b2 |J9 | TST.B 0x290b2 000211f0 67 30 |g0 | BEQ 0x21222 000211f2 9e fc 00 2e | . | SUBA.W #0x2e,A7 000211f6 20 4f | O | MOVEA.L A7,A0 000211f8 43 fa ef fc |C | LEA.L 0x201f6,A1 000211fc 70 2c |p, | MOVEQ.L #0x2c,D0 000211fe 10 d9 | | MOVE.B (A1)+,(A0)+ 00021200 51 c8 ff fc |Q | DBF D0,0x211fe 00021204 59 4f |YO | SUBQ.L #0x4,A7 00021206 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002120a 3f 01 |? | MOVE.W D1,-(A7) 0002120c 3f 3c 00 2d |?< - | MOVE.W #0x2d,-(A7) 00021210 4e 92 |N | JSR (A2) 00021212 50 4f |PO | ADDQ.L #0x8,A7 00021214 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002121a de fc 00 32 | 2 | ADDA.W #0x32,A7 0002121e 60 fe |` | BRA 0x2121e 00021220 60 30 |`0 | .XXX[0x2] 00021222 9e fc 00 18 | | SUBA.W #0x18,A7 00021226 20 4f | O | MOVEA.L A7,A0 00021228 43 fa ef fa |C | LEA.L 0x20224,A1 0002122c 70 16 |p | MOVEQ.L #0x16,D0 0002122e 10 d9 | | MOVE.B (A1)+,(A0)+ 00021230 51 c8 ff fc |Q | DBF D0,0x2122e 00021234 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00021238 59 4f |YO | SUBQ.L #0x4,A7 0002123a 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002123e 3f 01 |? | MOVE.W D1,-(A7) 00021240 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00021244 4e 92 |N | JSR (A2) 00021246 50 4f |PO | ADDQ.L #0x8,A7 00021248 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002124e de fc 00 1e | | ADDA.W #0x1e,A7 00021252 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00021256 4e 5e |N^ | UNLK A6 00021258 4e 75 |Nu | RTS 0002125a ; -------------------------------------------------------------------------------------- 0002125a ; OMSI PASCAL Function 0002125a ; <LVAR 0x00a 4(rw)> 0002125a ; <LVAR 0x008 1(r)> 0002125a ; -------------------------------------------------------------------------------------- 0002125a 4e 56 ff f2 |NV | LINK.W A6,#0xfff2 0002125e bf d5 | | CMPA.L (A5),A7 00021260 62 06 |b | BHI 0x21268 00021262 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021266 4e 76 |Nv | TRAPV 00021268 de fc 00 0c | | ADDA.W #0xc,A7 0002126c 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00021270 41 ee 00 0a |A | LEA.L (A6+0xa),A0 00021274 42 80 |B | CLR.L D0 00021276 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 0002127a 04 40 00 30 | @ 0 | SUBI.W #0x0030,D0 0002127e 0c 40 00 36 | @ 6 | CMPI.W #0x0036,D0 00021282 62 00 00 f6 |b | BHI switch@0x21288[0xa] 00021286 d0 40 | @ | ADD.W D0,D0 00021288 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00021290 00 6e | n | .CONST 0x6e ; [0x0] -> 0x212fe 00021292 00 72 | r | .CONST 0x72 ; [0x1] -> 0x21302 00021294 00 7a | z | .CONST 0x7a ; [0x2] -> 0x2130a 00021296 00 82 | | .CONST 0x82 ; [0x3] -> 0x21312 00021298 00 8a | | .CONST 0x8a ; [0x4] -> 0x2131a 0002129a 00 92 | | .CONST 0x92 ; [0x5] -> 0x21322 0002129c 00 9a | | .CONST 0x9a ; [0x6] -> 0x2132a 0002129e 00 a2 | | .CONST 0xa2 ; [0x7] -> 0x21332 000212a0 00 aa | | .CONST 0xaa ; [0x8] -> 0x2133a 000212a2 00 b2 | | .CONST 0xb2 ; [0x9] -> 0x21342 000212a4 00 ea | | .CONST 0xea ; [0xa] -> 0x2137a 000212a6 00 ea | | .CONST 0xea ; [0xb] -> 0x2137a 000212a8 00 ea | | .CONST 0xea ; [0xc] -> 0x2137a 000212aa 00 ea | | .CONST 0xea ; [0xd] -> 0x2137a 000212ac 00 ea | | .CONST 0xea ; [0xe] -> 0x2137a 000212ae 00 ea | | .CONST 0xea ; [0xf] -> 0x2137a 000212b0 00 ea | | .CONST 0xea ; [0x10] -> 0x2137a 000212b2 00 ba | | .CONST 0xba ; [0x11] -> 0x2134a 000212b4 00 c2 | | .CONST 0xc2 ; [0x12] -> 0x21352 000212b6 00 ca | | .CONST 0xca ; [0x13] -> 0x2135a 000212b8 00 d2 | | .CONST 0xd2 ; [0x14] -> 0x21362 000212ba 00 da | | .CONST 0xda ; [0x15] -> 0x2136a 000212bc 00 e2 | | .CONST 0xe2 ; [0x16] -> 0x21372 000212be 00 ea | | .CONST 0xea ; [0x17] -> 0x2137a 000212c0 00 ea | | .CONST 0xea ; [0x18] -> 0x2137a 000212c2 00 ea | | .CONST 0xea ; [0x19] -> 0x2137a 000212c4 00 ea | | .CONST 0xea ; [0x1a] -> 0x2137a 000212c6 00 ea | | .CONST 0xea ; [0x1b] -> 0x2137a 000212c8 00 ea | | .CONST 0xea ; [0x1c] -> 0x2137a 000212ca 00 ea | | .CONST 0xea ; [0x1d] -> 0x2137a 000212cc 00 ea | | .CONST 0xea ; [0x1e] -> 0x2137a 000212ce 00 ea | | .CONST 0xea ; [0x1f] -> 0x2137a 000212d0 00 ea | | .CONST 0xea ; [0x20] -> 0x2137a 000212d2 00 ea | | .CONST 0xea ; [0x21] -> 0x2137a 000212d4 00 ea | | .CONST 0xea ; [0x22] -> 0x2137a 000212d6 00 ea | | .CONST 0xea ; [0x23] -> 0x2137a 000212d8 00 ea | | .CONST 0xea ; [0x24] -> 0x2137a 000212da 00 ea | | .CONST 0xea ; [0x25] -> 0x2137a 000212dc 00 ea | | .CONST 0xea ; [0x26] -> 0x2137a 000212de 00 ea | | .CONST 0xea ; [0x27] -> 0x2137a 000212e0 00 ea | | .CONST 0xea ; [0x28] -> 0x2137a 000212e2 00 ea | | .CONST 0xea ; [0x29] -> 0x2137a 000212e4 00 ea | | .CONST 0xea ; [0x2a] -> 0x2137a 000212e6 00 ea | | .CONST 0xea ; [0x2b] -> 0x2137a 000212e8 00 ea | | .CONST 0xea ; [0x2c] -> 0x2137a 000212ea 00 ea | | .CONST 0xea ; [0x2d] -> 0x2137a 000212ec 00 ea | | .CONST 0xea ; [0x2e] -> 0x2137a 000212ee 00 ea | | .CONST 0xea ; [0x2f] -> 0x2137a 000212f0 00 ea | | .CONST 0xea ; [0x30] -> 0x2137a 000212f2 00 ba | | .CONST 0xba ; [0x31] -> 0x2134a 000212f4 00 c2 | | .CONST 0xc2 ; [0x32] -> 0x21352 000212f6 00 ca | | .CONST 0xca ; [0x33] -> 0x2135a 000212f8 00 d2 | | .CONST 0xd2 ; [0x34] -> 0x21362 000212fa 00 da | | .CONST 0xda ; [0x35] -> 0x2136a 000212fc 00 e2 | | .CONST 0xe2 ; [0x36] -> 0x21372 000212fe switch@0x21288[0x0]: 000212fe 42 90 |B | CLR.L (A0) 00021300 60 7e |`~ | BRA 0x21380 00021302 switch@0x21288[0x1]: 00021302 20 bc 00 00 00 01 | | MOVE.L #0x1,(A0) 00021308 60 76 |`v | BRA 0x21380 0002130a switch@0x21288[0x2]: 0002130a 20 bc 00 00 00 02 | | MOVE.L #0x2,(A0) 00021310 60 6e |`n | BRA 0x21380 00021312 switch@0x21288[0x3]: 00021312 20 bc 00 00 00 03 | | MOVE.L #0x3,(A0) 00021318 60 66 |`f | BRA 0x21380 0002131a switch@0x21288[0x4]: 0002131a 20 bc 00 00 00 04 | | MOVE.L #0x4,(A0) 00021320 60 5e |`^ | BRA 0x21380 00021322 switch@0x21288[0x5]: 00021322 20 bc 00 00 00 05 | | MOVE.L #0x5,(A0) 00021328 60 56 |`V | BRA 0x21380 0002132a switch@0x21288[0x6]: 0002132a 20 bc 00 00 00 06 | | MOVE.L #0x6,(A0) 00021330 60 4e |`N | BRA 0x21380 00021332 switch@0x21288[0x7]: 00021332 20 bc 00 00 00 07 | | MOVE.L #0x7,(A0) 00021338 60 46 |`F | BRA 0x21380 0002133a switch@0x21288[0x8]: 0002133a 20 bc 00 00 00 08 | | MOVE.L #0x8,(A0) 00021340 60 3e |`> | BRA 0x21380 00021342 switch@0x21288[0x9]: 00021342 20 bc 00 00 00 09 | | MOVE.L #0x9,(A0) 00021348 60 36 |`6 | BRA 0x21380 0002134a switch@0x21288[0x11]: 0002134a switch@0x21288[0x31]: 0002134a 20 bc 00 00 00 0a | | MOVE.L #0xa,(A0) 00021350 60 2e |`. | BRA 0x21380 00021352 switch@0x21288[0x12]: 00021352 switch@0x21288[0x32]: 00021352 20 bc 00 00 00 0b | | MOVE.L #0xb,(A0) 00021358 60 26 |`& | BRA 0x21380 0002135a switch@0x21288[0x13]: 0002135a switch@0x21288[0x33]: 0002135a 20 bc 00 00 00 0c | | MOVE.L #0xc,(A0) 00021360 60 1e |` | BRA 0x21380 00021362 switch@0x21288[0x14]: 00021362 switch@0x21288[0x34]: 00021362 20 bc 00 00 00 0d | | MOVE.L #0xd,(A0) 00021368 60 16 |` | BRA 0x21380 0002136a switch@0x21288[0x15]: 0002136a switch@0x21288[0x35]: 0002136a 20 bc 00 00 00 0e | | MOVE.L #0xe,(A0) 00021370 60 0e |` | BRA 0x21380 00021372 switch@0x21288[0x16]: 00021372 switch@0x21288[0x36]: 00021372 20 bc 00 00 00 0f | | MOVE.L #0xf,(A0) 00021378 60 06 |` | BRA 0x21380 0002137a switch@0x21288[0x10]: 0002137a switch@0x21288[0x17]: 0002137a switch@0x21288[0x18]: 0002137a switch@0x21288[0x19]: 0002137a switch@0x21288[0x1a]: 0002137a switch@0x21288[0x1b]: 0002137a switch@0x21288[0x1c]: 0002137a switch@0x21288[0x1d]: 0002137a switch@0x21288[0x1e]: 0002137a switch@0x21288[0x1f]: 0002137a switch@0x21288[0x20]: 0002137a switch@0x21288[0x21]: 0002137a switch@0x21288[0x22]: 0002137a switch@0x21288[0x23]: 0002137a switch@0x21288[0x24]: 0002137a switch@0x21288[0x25]: 0002137a switch@0x21288[0x26]: 0002137a switch@0x21288[0x27]: 0002137a switch@0x21288[0x28]: 0002137a switch@0x21288[0x29]: 0002137a switch@0x21288[0x2a]: 0002137a switch@0x21288[0x2b]: 0002137a switch@0x21288[0x2c]: 0002137a switch@0x21288[0x2d]: 0002137a switch@0x21288[0x2e]: 0002137a switch@0x21288[0x2f]: 0002137a switch@0x21288[0x30]: 0002137a switch@0x21288[0xa]: 0002137a switch@0x21288[0xb]: 0002137a switch@0x21288[0xc]: 0002137a switch@0x21288[0xd]: 0002137a switch@0x21288[0xe]: 0002137a switch@0x21288[0xf]: 0002137a 20 bc ff ff ff ff | | MOVE.L #0xffffffff,(A0) 00021380 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00021384 4e 5e |N^ | UNLK A6 00021386 4e 75 |Nu | RTS 00021388 ; -------------------------------------------------------------------------------------- 00021388 ; OMSI PASCAL Function 00021388 ; <LVAR 0x010 2(r)> 00021388 ; <LVAR 0x00c 4(r)> 00021388 ; <LVAR 0x008 4(r)> 00021388 ; -------------------------------------------------------------------------------------- 00021388 4e 56 ff ca |NV | LINK.W A6,#0xffca 0002138c bf d5 | | CMPA.L (A5),A7 0002138e 62 06 |b | BHI 0x21396 00021390 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021394 4e 76 |Nv | TRAPV 00021396 de fc 00 34 | 4 | ADDA.W #0x34,A7 0002139a 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 0002139e 47 ee 00 0c |G | LEA.L (A6+0xc),A3 000213a2 49 ee 00 08 |I | LEA.L (A6+0x8),A4 000213a6 72 01 |r | MOVEQ.L #0x01,D1 000213a8 30 2e 00 10 |0. | MOVE.W (A6+0x10),D0 000213ac 04 40 00 15 | @ | SUBI.W #0x0015,D0 000213b0 0c 40 00 3e | @ > | CMPI.W #0x003e,D0 000213b4 62 00 01 6a |b j | BHI switch@0x213ba[0x1] 000213b8 d0 40 | @ | ADD.W D0,D0 000213ba 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000213c2 00 de | | .CONST 0xde ; [0x0] -> 0x214a0 000213c4 01 5e | ^ | .CONST 0x15e ; [0x1] -> 0x21520 000213c6 00 ca | | .CONST 0xca ; [0x2] -> 0x2148c 000213c8 01 5e | ^ | .CONST 0x15e ; [0x3] -> 0x21520 000213ca 00 ac | | .CONST 0xac ; [0x4] -> 0x2146e 000213cc 01 5e | ^ | .CONST 0x15e ; [0x5] -> 0x21520 000213ce 01 5e | ^ | .CONST 0x15e ; [0x6] -> 0x21520 000213d0 01 5e | ^ | .CONST 0x15e ; [0x7] -> 0x21520 000213d2 01 5e | ^ | .CONST 0x15e ; [0x8] -> 0x21520 000213d4 01 5e | ^ | .CONST 0x15e ; [0x9] -> 0x21520 000213d6 01 5e | ^ | .CONST 0x15e ; [0xa] -> 0x21520 000213d8 01 5e | ^ | .CONST 0x15e ; [0xb] -> 0x21520 000213da 00 7e | ~ | .CONST 0x7e ; [0xc] -> 0x21440 000213dc 01 5e | ^ | .CONST 0x15e ; [0xd] -> 0x21520 000213de 01 5e | ^ | .CONST 0x15e ; [0xe] -> 0x21520 000213e0 01 5e | ^ | .CONST 0x15e ; [0xf] -> 0x21520 000213e2 01 5e | ^ | .CONST 0x15e ; [0x10] -> 0x21520 000213e4 01 5e | ^ | .CONST 0x15e ; [0x11] -> 0x21520 000213e6 01 5e | ^ | .CONST 0x15e ; [0x12] -> 0x21520 000213e8 01 5e | ^ | .CONST 0x15e ; [0x13] -> 0x21520 000213ea 01 5e | ^ | .CONST 0x15e ; [0x14] -> 0x21520 000213ec 01 5e | ^ | .CONST 0x15e ; [0x15] -> 0x21520 000213ee 01 5e | ^ | .CONST 0x15e ; [0x16] -> 0x21520 000213f0 01 5e | ^ | .CONST 0x15e ; [0x17] -> 0x21520 000213f2 01 5e | ^ | .CONST 0x15e ; [0x18] -> 0x21520 000213f4 01 5e | ^ | .CONST 0x15e ; [0x19] -> 0x21520 000213f6 01 5e | ^ | .CONST 0x15e ; [0x1a] -> 0x21520 000213f8 01 5e | ^ | .CONST 0x15e ; [0x1b] -> 0x21520 000213fa 01 5e | ^ | .CONST 0x15e ; [0x1c] -> 0x21520 000213fc 01 5e | ^ | .CONST 0x15e ; [0x1d] -> 0x21520 000213fe 01 5e | ^ | .CONST 0x15e ; [0x1e] -> 0x21520 00021400 01 5e | ^ | .CONST 0x15e ; [0x1f] -> 0x21520 00021402 01 5e | ^ | .CONST 0x15e ; [0x20] -> 0x21520 00021404 01 5e | ^ | .CONST 0x15e ; [0x21] -> 0x21520 00021406 01 5e | ^ | .CONST 0x15e ; [0x22] -> 0x21520 00021408 01 5e | ^ | .CONST 0x15e ; [0x23] -> 0x21520 0002140a 01 5e | ^ | .CONST 0x15e ; [0x24] -> 0x21520 0002140c 01 5e | ^ | .CONST 0x15e ; [0x25] -> 0x21520 0002140e 01 5e | ^ | .CONST 0x15e ; [0x26] -> 0x21520 00021410 01 5e | ^ | .CONST 0x15e ; [0x27] -> 0x21520 00021412 01 5e | ^ | .CONST 0x15e ; [0x28] -> 0x21520 00021414 01 5e | ^ | .CONST 0x15e ; [0x29] -> 0x21520 00021416 01 5e | ^ | .CONST 0x15e ; [0x2a] -> 0x21520 00021418 01 5e | ^ | .CONST 0x15e ; [0x2b] -> 0x21520 0002141a 01 5e | ^ | .CONST 0x15e ; [0x2c] -> 0x21520 0002141c 01 5e | ^ | .CONST 0x15e ; [0x2d] -> 0x21520 0002141e 01 5e | ^ | .CONST 0x15e ; [0x2e] -> 0x21520 00021420 01 5e | ^ | .CONST 0x15e ; [0x2f] -> 0x21520 00021422 01 5e | ^ | .CONST 0x15e ; [0x30] -> 0x21520 00021424 01 5e | ^ | .CONST 0x15e ; [0x31] -> 0x21520 00021426 01 5e | ^ | .CONST 0x15e ; [0x32] -> 0x21520 00021428 01 5e | ^ | .CONST 0x15e ; [0x33] -> 0x21520 0002142a 01 5e | ^ | .CONST 0x15e ; [0x34] -> 0x21520 0002142c 01 5e | ^ | .CONST 0x15e ; [0x35] -> 0x21520 0002142e 01 5e | ^ | .CONST 0x15e ; [0x36] -> 0x21520 00021430 01 5e | ^ | .CONST 0x15e ; [0x37] -> 0x21520 00021432 01 5e | ^ | .CONST 0x15e ; [0x38] -> 0x21520 00021434 01 5e | ^ | .CONST 0x15e ; [0x39] -> 0x21520 00021436 01 5e | ^ | .CONST 0x15e ; [0x3a] -> 0x21520 00021438 00 f2 | | .CONST 0xf2 ; [0x3b] -> 0x214b4 0002143a 01 06 | | .CONST 0x106 ; [0x3c] -> 0x214c8 0002143c 01 3a | : | .CONST 0x13a ; [0x3d] -> 0x214fc 0002143e 01 4c | L | .CONST 0x14c ; [0x3e] -> 0x2150e 00021440 switch@0x213ba[0xc]: 00021440 20 53 | S | MOVEA.L (A3),A0 00021442 20 bc 80 00 00 00 | | MOVE.L #0x80000000,(A0) 00021448 20 54 | T | MOVEA.L (A4),A0 0002144a 2f 3a ed f4 |/: | MOVE.L 0x20240,-(A7) 0002144e 2f 3a ed ec |/: | MOVE.L 0x2023c,-(A7) 00021452 59 4f |YO | SUBQ.L #0x4,A7 00021454 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021458 3f 01 |? | MOVE.W D1,-(A7) 0002145a 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 0002145e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021464 50 4f |PO | ADDQ.L #0x8,A7 00021466 20 9f | | MOVE.L (A7)+,(A0) 00021468 50 4f |PO | ADDQ.L #0x8,A7 0002146a 60 00 00 e4 |` | BRA 0x21550 0002146e switch@0x213ba[0x4]: 0002146e 20 53 | S | MOVEA.L (A3),A0 00021470 20 bc 80 00 20 00 | | MOVE.L #0x80002000,(A0) 00021476 20 54 | T | MOVEA.L (A4),A0 00021478 2f 3a ed ca |/: | MOVE.L 0x20244,-(A7) 0002147c 59 4f |YO | SUBQ.L #0x4,A7 0002147e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021482 3f 01 |? | MOVE.W D1,-(A7) 00021484 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00021488 60 00 00 ba |` | BRA 0x21544 0002148c switch@0x213ba[0x2]: 0002148c 20 53 | S | MOVEA.L (A3),A0 0002148e 20 bc 80 00 40 00 | @ | MOVE.L #0x80004000,(A0) 00021494 20 54 | T | MOVEA.L (A4),A0 00021496 2f 3a ed b4 |/: | MOVE.L 0x2024c,-(A7) 0002149a 2f 3a ed ac |/: | MOVE.L 0x20248,-(A7) 0002149e 60 b2 |` | BRA 0x21452 000214a0 switch@0x213ba[0x0]: 000214a0 20 53 | S | MOVEA.L (A3),A0 000214a2 20 bc 80 00 60 00 | ` | MOVE.L #0x80006000,(A0) 000214a8 20 54 | T | MOVEA.L (A4),A0 000214aa 2f 3a ed a8 |/: | MOVE.L 0x20254,-(A7) 000214ae 2f 3a ed a0 |/: | MOVE.L 0x20250,-(A7) 000214b2 60 9e |` | BRA 0x21452 000214b4 switch@0x213ba[0x3b]: 000214b4 20 53 | S | MOVEA.L (A3),A0 000214b6 20 bc 00 07 00 00 | | MOVE.L #0x70000,(A0) 000214bc 20 54 | T | MOVEA.L (A4),A0 000214be 2f 3a ed 9c |/: | MOVE.L 0x2025c,-(A7) 000214c2 2f 3a ed 94 |/: | MOVE.L 0x20258,-(A7) 000214c6 60 8a |` | BRA 0x21452 000214c8 switch@0x213ba[0x3c]: 000214c8 20 53 | S | MOVEA.L (A3),A0 000214ca 20 bc 00 07 20 00 | | MOVE.L #0x72000,(A0) 000214d0 20 54 | T | MOVEA.L (A4),A0 000214d2 5d 4f |]O | SUBQ.L #0x6,A7 000214d4 22 4f |"O | MOVEA.L A7,A1 000214d6 45 fa ed 88 |E | LEA.L 0x20260,A2 000214da 70 04 |p | MOVEQ.L #0x04,D0 000214dc 12 da | | MOVE.B (A2)+,(A1)+ 000214de 51 c8 ff fc |Q | DBF D0,0x214dc 000214e2 59 4f |YO | SUBQ.L #0x4,A7 000214e4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000214e8 3f 01 |? | MOVE.W D1,-(A7) 000214ea 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 000214ee 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000214f4 50 4f |PO | ADDQ.L #0x8,A7 000214f6 20 9f | | MOVE.L (A7)+,(A0) 000214f8 5c 4f |\O | ADDQ.L #0x6,A7 000214fa 60 54 |`T | BRA 0x21550 000214fc switch@0x213ba[0x3d]: 000214fc 20 53 | S | MOVEA.L (A3),A0 000214fe 20 bc 00 07 40 00 | @ | MOVE.L #0x74000,(A0) 00021504 20 54 | T | MOVEA.L (A4),A0 00021506 2f 3a ed 5e |/: ^ | MOVE.L 0x20266,-(A7) 0002150a 60 00 ff 70 |` p | BRA 0x2147c 0002150e switch@0x213ba[0x3e]: 0002150e 20 53 | S | MOVEA.L (A3),A0 00021510 20 bc 00 07 60 00 | ` | MOVE.L #0x76000,(A0) 00021516 20 54 | T | MOVEA.L (A4),A0 00021518 2f 3a ed 50 |/: P | MOVE.L 0x2026a,-(A7) 0002151c 60 00 ff 5e |` ^ | BRA 0x2147c 00021520 switch@0x213ba[0x10]: 00021520 switch@0x213ba[0x11]: 00021520 switch@0x213ba[0x12]: 00021520 switch@0x213ba[0x13]: 00021520 switch@0x213ba[0x14]: 00021520 switch@0x213ba[0x15]: 00021520 switch@0x213ba[0x16]: 00021520 switch@0x213ba[0x17]: 00021520 switch@0x213ba[0x18]: 00021520 switch@0x213ba[0x19]: 00021520 switch@0x213ba[0x1]: 00021520 switch@0x213ba[0x1a]: 00021520 switch@0x213ba[0x1b]: 00021520 switch@0x213ba[0x1c]: 00021520 switch@0x213ba[0x1d]: 00021520 switch@0x213ba[0x1e]: 00021520 switch@0x213ba[0x1f]: 00021520 switch@0x213ba[0x20]: 00021520 switch@0x213ba[0x21]: 00021520 switch@0x213ba[0x22]: 00021520 switch@0x213ba[0x23]: 00021520 switch@0x213ba[0x24]: 00021520 switch@0x213ba[0x25]: 00021520 switch@0x213ba[0x26]: 00021520 switch@0x213ba[0x27]: 00021520 switch@0x213ba[0x28]: 00021520 switch@0x213ba[0x29]: 00021520 switch@0x213ba[0x2a]: 00021520 switch@0x213ba[0x2b]: 00021520 switch@0x213ba[0x2c]: 00021520 switch@0x213ba[0x2d]: 00021520 switch@0x213ba[0x2e]: 00021520 switch@0x213ba[0x2f]: 00021520 switch@0x213ba[0x30]: 00021520 switch@0x213ba[0x31]: 00021520 switch@0x213ba[0x32]: 00021520 switch@0x213ba[0x33]: 00021520 switch@0x213ba[0x34]: 00021520 switch@0x213ba[0x35]: 00021520 switch@0x213ba[0x36]: 00021520 switch@0x213ba[0x37]: 00021520 switch@0x213ba[0x38]: 00021520 switch@0x213ba[0x39]: 00021520 switch@0x213ba[0x3]: 00021520 switch@0x213ba[0x3a]: 00021520 switch@0x213ba[0x5]: 00021520 switch@0x213ba[0x6]: 00021520 switch@0x213ba[0x7]: 00021520 switch@0x213ba[0x8]: 00021520 switch@0x213ba[0x9]: 00021520 switch@0x213ba[0xa]: 00021520 switch@0x213ba[0xb]: 00021520 switch@0x213ba[0xd]: 00021520 switch@0x213ba[0xe]: 00021520 switch@0x213ba[0xf]: 00021520 20 53 | S | MOVEA.L (A3),A0 00021522 42 90 |B | CLR.L (A0) 00021524 20 54 | T | MOVEA.L (A4),A0 00021526 59 4f |YO | SUBQ.L #0x4,A7 00021528 1e ba ed 44 | D | MOVE.B 0x2026e,(A7) 0002152c 1f 7a ed 41 00 01 | z A | MOVE.B 0x2026f,(A7+0x1) 00021532 1f 7a ed 3c 00 02 | z < | MOVE.B 0x20270,(A7+0x2) 00021538 59 4f |YO | SUBQ.L #0x4,A7 0002153a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002153e 3f 01 |? | MOVE.W D1,-(A7) 00021540 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00021544 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002154a 50 4f |PO | ADDQ.L #0x8,A7 0002154c 20 9f | | MOVE.L (A7)+,(A0) 0002154e 58 4f |XO | ADDQ.L #0x4,A7 00021550 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 00021554 4e 5e |N^ | UNLK A6 00021556 4e 75 |Nu | RTS 00021558 ; -------------------------------------------------------------------------------------- 00021558 ; OMSI PASCAL Function 00021558 ; <LVAR 0x008 4(r)> 00021558 ; <LVAR -0x004 2(rw)> 00021558 ; <LVAR -0x008 4(rw)> 00021558 ; -------------------------------------------------------------------------------------- 00021558 4e 56 ff 88 |NV | LINK.W A6,#0xff88 0002155c bf d5 | | CMPA.L (A5),A7 0002155e 62 06 |b | BHI 0x21566 00021560 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021564 4e 76 |Nv | TRAPV 00021566 de fc 00 68 | h | ADDA.W #0x68,A7 0002156a 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002156e 43 fa fc ea |C | LEA.L 0x2125a,A1 00021572 45 f9 00 02 50 9c |E P | LEA.L 0x2509c,A2 00021578 47 ee ff f8 |G | LEA.L (A6-0x8),A3 0002157c 49 ee 00 08 |I | LEA.L (A6+0x8),A4 00021580 20 54 | T | MOVEA.L (A4),A0 00021582 59 4f |YO | SUBQ.L #0x4,A7 00021584 1f 28 00 02 | ( | MOVE.B (A0+0x2),-(A7) 00021588 4e 91 |N | JSR (A1) 0002158a 54 4f |TO | ADDQ.L #0x2,A7 0002158c 26 1f |& | MOVE.L (A7)+,D3 0002158e 78 10 |x | MOVEQ.L #0x10,D4 00021590 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00021596 59 4f |YO | SUBQ.L #0x4,A7 00021598 1f 28 00 03 | ( | MOVE.B (A0+0x3),-(A7) 0002159c 4e 91 |N | JSR (A1) 0002159e 54 4f |TO | ADDQ.L #0x2,A7 000215a0 20 04 | | MOVE.L D4,D0 000215a2 d0 9f | | ADD.L (A7)+,D0 000215a4 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 000215aa 63 02 |c | BLS 0x215ae 000215ac 4e 4f |NO | TRAP #15 000215ae 3d 40 ff fc |=@ | MOVE.W D0,(A6-0x4) 000215b2 48 c0 |H | EXTW.L D0 000215b4 2e 00 |. | MOVE.L D0,D7 000215b6 42 93 |B | CLR.L (A3) 000215b8 7c 00 || | MOVEQ.L #0x00,D6 000215ba 20 54 | T | MOVEA.L (A4),A0 000215bc 20 06 | | MOVE.L D6,D0 000215be e3 80 | | ASL.L #0x1,D0 000215c0 59 4f |YO | SUBQ.L #0x4,A7 000215c2 22 00 |" | MOVE.L D0,D1 000215c4 5a 81 |Z | ADDQ.L #0x5,D1 000215c6 53 81 |S | SUBQ.L #0x1,D1 000215c8 0c 81 00 00 01 ff | | CMPI.L #0x000001ff,D1 000215ce 63 02 |c | BLS 0x215d2 000215d0 4e 4f |NO | TRAP #15 000215d2 1f 30 18 00 | 0 | MOVE.B (A0+D1.L),-(A7) 000215d6 4e 91 |N | JSR (A1) 000215d8 54 4f |TO | ADDQ.L #0x2,A7 000215da 26 1f |& | MOVE.L (A7)+,D3 000215dc 78 10 |x | MOVEQ.L #0x10,D4 000215de 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 000215e4 59 4f |YO | SUBQ.L #0x4,A7 000215e6 5c 80 |\ | ADDQ.L #0x6,D0 000215e8 53 80 |S | SUBQ.L #0x1,D0 000215ea 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 000215f0 63 02 |c | BLS 0x215f4 000215f2 4e 4f |NO | TRAP #15 000215f4 1f 30 08 00 | 0 | MOVE.B (A0+D0.L),-(A7) 000215f8 4e 91 |N | JSR (A1) 000215fa 54 4f |TO | ADDQ.L #0x2,A7 000215fc 20 04 | | MOVE.L D4,D0 000215fe d0 9f | | ADD.L (A7)+,D0 00021600 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 00021606 63 02 |c | BLS 0x2160a 00021608 4e 4f |NO | TRAP #15 0002160a 3a 00 |: | MOVE.W D0,D5 0002160c 20 13 | | MOVE.L (A3),D0 0002160e e1 80 | | ASL.L #0x8,D0 00021610 32 05 |2 | MOVE.W D5,D1 00021612 48 c1 |H | EXTW.L D1 00021614 d0 81 | | ADD.L D1,D0 00021616 26 80 |& | MOVE.L D0,(A3) 00021618 de 81 | | ADD.L D1,D7 0002161a 52 86 |R | ADDQ.L #0x1,D6 0002161c 0c 86 00 00 00 03 | | CMPI.L #0x00000003,D6 00021622 6f 96 |o | BLE 0x215ba 00021624 4a 92 |J | TST.L (A2) 00021626 66 0c |f | BNE 0x21634 00021628 20 13 | | MOVE.L (A3),D0 0002162a e0 88 | | LSR.L #0x8,D0 0002162c ea 88 | | LSR.L #0x5,D0 0002162e e1 80 | | ASL.L #0x8,D0 00021630 eb 80 | | ASL.L #0x5,D0 00021632 24 80 |$ | MOVE.L D0,(A2) 00021634 30 2e ff fc |0. | MOVE.W (A6-0x4),D0 00021638 5d 40 |]@ | SUBQ.W #0x6,D0 0002163a 48 c0 |H | EXTW.L D0 0002163c 2f 00 |/ | MOVE.L D0,-(A7) 0002163e 7c 00 || | MOVEQ.L #0x00,D6 00021640 bc 97 | | CMP.L (A7),D6 00021642 6e 00 00 a8 |n | BGT 0x216ec 00021646 20 54 | T | MOVEA.L (A4),A0 00021648 20 06 | | MOVE.L D6,D0 0002164a e3 80 | | ASL.L #0x1,D0 0002164c 59 4f |YO | SUBQ.L #0x4,A7 0002164e 22 00 |" | MOVE.L D0,D1 00021650 06 81 00 00 00 0d | | ADDI.L #0x0000000d,D1 00021656 53 81 |S | SUBQ.L #0x1,D1 00021658 0c 81 00 00 01 ff | | CMPI.L #0x000001ff,D1 0002165e 63 02 |c | BLS 0x21662 00021660 4e 4f |NO | TRAP #15 00021662 1f 30 18 00 | 0 | MOVE.B (A0+D1.L),-(A7) 00021666 4e 91 |N | JSR (A1) 00021668 54 4f |TO | ADDQ.L #0x2,A7 0002166a 26 1f |& | MOVE.L (A7)+,D3 0002166c 78 10 |x | MOVEQ.L #0x10,D4 0002166e 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00021674 59 4f |YO | SUBQ.L #0x4,A7 00021676 06 80 00 00 00 0e | | ADDI.L #0x0000000e,D0 0002167c 53 80 |S | SUBQ.L #0x1,D0 0002167e 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 00021684 63 02 |c | BLS 0x21688 00021686 4e 4f |NO | TRAP #15 00021688 1f 30 08 00 | 0 | MOVE.B (A0+D0.L),-(A7) 0002168c 4e 91 |N | JSR (A1) 0002168e 54 4f |TO | ADDQ.L #0x2,A7 00021690 20 04 | | MOVE.L D4,D0 00021692 d0 9f | | ADD.L (A7)+,D0 00021694 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 0002169a 63 02 |c | BLS 0x2169e 0002169c 4e 4f |NO | TRAP #15 0002169e 3a 00 |: | MOVE.W D0,D5 000216a0 30 05 |0 | MOVE.W D5,D0 000216a2 48 c0 |H | EXTW.L D0 000216a4 de 80 | | ADD.L D0,D7 000216a6 52 b9 00 02 50 a0 |R P | ADDQ.L #0x1,0x250a0 000216ac 22 13 |" | MOVE.L (A3),D1 000216ae d2 86 | | ADD.L D6,D1 000216b0 b2 92 | | CMP.L (A2),D1 000216b2 65 32 |e2 | BCS 0x216e6 000216b4 24 12 |$ | MOVE.L (A2),D2 000216b6 06 82 00 00 20 00 | | ADDI.L #0x00002000,D2 000216bc b2 82 | | CMP.L D2,D1 000216be 64 26 |d& | BCC 0x216e6 000216c0 02 81 00 00 1f ff | | ANDI.L #0x00001fff,D1 000216c6 0c 81 00 00 1f ff | | CMPI.L #0x00001fff,D1 000216cc 63 02 |c | BLS 0x216d0 000216ce 4e 4f |NO | TRAP #15 000216d0 e3 81 | | ASL.L #0x1,D1 000216d2 41 f9 00 02 50 88 |A P | LEA.L 0x25088,A0 000216d8 41 bc 00 ff |A | CHK.W #0xff,D0 000216dc 31 80 18 2a |1 * | MOVE.W D0,(A0+D1.L+#0x2a) 000216e0 52 b9 00 02 50 a4 |R P | ADDQ.L #0x1,0x250a4 000216e6 52 86 |R | ADDQ.L #0x1,D6 000216e8 68 00 ff 56 |h V | BVC 0x21640 000216ec 58 4f |XO | ADDQ.L #0x4,A7 000216ee 20 54 | T | MOVEA.L (A4),A0 000216f0 30 2e ff fc |0. | MOVE.W (A6-0x4),D0 000216f4 e3 40 | @ | ASL.W #0x1,D0 000216f6 59 4f |YO | SUBQ.L #0x4,A7 000216f8 32 00 |2 | MOVE.W D0,D1 000216fa 56 41 |VA | ADDQ.W #0x3,D1 000216fc 53 41 |SA | SUBQ.W #0x1,D1 000216fe 43 bc 01 ff |C | CHK.W #0x1ff,D1 00021702 1f 30 10 00 | 0 | MOVE.B (A0+D1.W),-(A7) 00021706 4e 91 |N | JSR (A1) 00021708 54 4f |TO | ADDQ.L #0x2,A7 0002170a 26 1f |& | MOVE.L (A7)+,D3 0002170c 78 10 |x | MOVEQ.L #0x10,D4 0002170e 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00021714 de 84 | | ADD.L D4,D7 00021716 59 4f |YO | SUBQ.L #0x4,A7 00021718 58 40 |X@ | ADDQ.W #0x4,D0 0002171a 53 40 |S@ | SUBQ.W #0x1,D0 0002171c 41 bc 01 ff |A | CHK.W #0x1ff,D0 00021720 1f 30 00 00 | 0 | MOVE.B (A0+D0.W),-(A7) 00021724 4e 91 |N | JSR (A1) 00021726 54 4f |TO | ADDQ.L #0x2,A7 00021728 de 9f | | ADD.L (A7)+,D7 0002172a 28 07 |( | MOVE.L D7,D4 0002172c 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 00021732 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00021738 0c 83 00 00 00 ff | | CMPI.L #0x000000ff,D3 0002173e 67 2a |g* | BEQ 0x2176a 00021740 41 fa eb 50 |A P | LEA.L 0x20292,A0 00021744 70 07 |p | MOVEQ.L #0x07,D0 00021746 2f 20 |/ | MOVE.L -(A0),-(A7) 00021748 51 c8 ff fc |Q | DBF D0,0x21746 0002174c 59 4f |YO | SUBQ.L #0x4,A7 0002174e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021752 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021756 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7) 0002175a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021760 50 4f |PO | ADDQ.L #0x8,A7 00021762 4e ba fa 30 |N 0 | JSR 0x21194 00021766 de fc 00 24 | $ | ADDA.W #0x24,A7 0002176a 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 0002176e 4e 5e |N^ | UNLK A6 00021770 4e 75 |Nu | RTS 00021772 ; -------------------------------------------------------------------------------------- 00021772 ; OMSI PASCAL Function 00021772 ; <LVAR 0x008 4(r)> 00021772 ; <LVAR -0x209 1(r)> 00021772 ; <LVAR -0x20a @ 1(rw)> 00021772 ; <LVAR -0x20e @ 4(r)> 00021772 ; <LVAR -0x210 @ 1(r)> 00021772 ; -------------------------------------------------------------------------------------- 00021772 4e 56 fd 8c |NV | LINK.W A6,#0xfd8c 00021776 bf d5 | | CMPA.L (A5),A7 00021778 62 06 |b | BHI 0x21780 0002177a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002177e 4e 76 |Nv | TRAPV 00021780 de fc 00 64 | d | ADDA.W #0x64,A7 00021784 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021788 45 ee fd f2 |E | LEA.L (A6-0x20e),A2 0002178c 47 ee fd f0 |G | LEA.L (A6-0x210),A3 00021790 49 f9 00 02 50 90 |I P | LEA.L 0x25090,A4 00021796 74 01 |t | MOVEQ.L #0x01,D2 00021798 7a 53 |zS | MOVEQ.L #0x53,D5 0002179a 48 52 |HR | PEA.L (A2) 0002179c 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000217a2 58 4f |XO | ADDQ.L #0x4,A7 000217a4 7e 00 |~ | MOVEQ.L #0x00,D7 000217a6 1d 7c 00 20 fd f6 | | | MOVE.B #0x20,(A6-0x20a) 000217ac 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000217b0 2f 10 |/ | MOVE.L (A0),-(A7) 000217b2 48 52 |HR | PEA.L (A2) 000217b4 48 53 |HS | PEA.L (A3) 000217b6 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 000217bc de fc 00 0c | | ADDA.W #0xc,A7 000217c0 4a 13 |J | TST.B (A3) 000217c2 67 3e |g> | BEQ 0x21802 000217c4 42 27 |B' | CLR.B -(A7) 000217c6 1f 02 | | MOVE.B D2,-(A7) 000217c8 48 78 00 01 |Hx | PEA.L 0x1 000217cc 48 54 |HT | PEA.L (A4) 000217ce 48 50 |HP | PEA.L (A0) 000217d0 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000217d6 de fc 00 10 | | ADDA.W #0x10,A7 000217da 41 fa ea cc |A | LEA.L 0x202a8,A0 000217de 70 0a |p | MOVEQ.L #0x0a,D0 000217e0 3f 20 |? | MOVE.W -(A0),-(A7) 000217e2 51 c8 ff fc |Q | DBF D0,0x217e0 000217e6 59 4f |YO | SUBQ.L #0x4,A7 000217e8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000217ec 3f 02 |? | MOVE.W D2,-(A7) 000217ee 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 000217f2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000217f8 50 4f |PO | ADDQ.L #0x8,A7 000217fa 4e ba f9 98 |N | JSR 0x21194 000217fe de fc 00 1a | | ADDA.W #0x1a,A7 00021802 20 52 | R | MOVEA.L (A2),A0 00021804 30 10 |0 | MOVE.W (A0),D0 00021806 48 c0 |H | EXTW.L D0 00021808 2f 00 |/ | MOVE.L D0,-(A7) 0002180a 7c 01 || | MOVEQ.L #0x01,D6 0002180c bc 97 | | CMP.L (A7),D6 0002180e 6e 76 |nv | BGT 0x21886 00021810 52 87 |R | ADDQ.L #0x1,D7 00021812 0c 87 00 00 02 00 | | CMPI.L #0x00000200,D7 00021818 6f 42 |oB | BLE 0x2185c 0002181a 42 27 |B' | CLR.B -(A7) 0002181c 1f 02 | | MOVE.B D2,-(A7) 0002181e 48 78 00 01 |Hx | PEA.L 0x1 00021822 48 54 |HT | PEA.L (A4) 00021824 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021828 48 50 |HP | PEA.L (A0) 0002182a 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00021830 de fc 00 10 | | ADDA.W #0x10,A7 00021834 41 fa ea 84 |A | LEA.L 0x202ba,A0 00021838 70 08 |p | MOVEQ.L #0x08,D0 0002183a 3f 20 |? | MOVE.W -(A0),-(A7) 0002183c 51 c8 ff fc |Q | DBF D0,0x2183a 00021840 59 4f |YO | SUBQ.L #0x4,A7 00021842 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021846 3f 02 |? | MOVE.W D2,-(A7) 00021848 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 0002184c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021852 50 4f |PO | ADDQ.L #0x8,A7 00021854 4e ba f9 3e |N > | JSR 0x21194 00021858 de fc 00 16 | | ADDA.W #0x16,A7 0002185c 20 07 | | MOVE.L D7,D0 0002185e 53 80 |S | SUBQ.L #0x1,D0 00021860 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 00021866 63 02 |c | BLS 0x2186a 00021868 4e 4f |NO | TRAP #15 0002186a 20 4b | K | MOVEA.L A3,A0 0002186c 22 52 |"R | MOVEA.L (A2),A1 0002186e 22 06 |" | MOVE.L D6,D1 00021870 53 81 |S | SUBQ.L #0x1,D1 00021872 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00021878 63 02 |c | BLS 0x2187c 0002187a 4e 4f |NO | TRAP #15 0002187c 11 b1 18 02 08 06 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x6) 00021882 52 86 |R | ADDQ.L #0x1,D6 00021884 68 86 |h | BVC 0x2180c 00021886 58 4f |XO | ADDQ.L #0x4,A7 00021888 20 52 | R | MOVEA.L (A2),A0 0002188a 30 10 |0 | MOVE.W (A0),D0 0002188c 0c 40 00 7e | @ ~ | CMPI.W #0x007e,D0 00021890 6c 00 ff 1a |l | BGE 0x217ac 00021894 10 2e fd f6 | . | MOVE.B (A6-0x20a),D0 00021898 b0 05 | | CMP.B D5,D0 0002189a 66 16 |f | BNE 0x218b2 0002189c 12 2e fd f7 | . | MOVE.B (A6-0x209),D1 000218a0 0c 01 00 33 | 3 | CMPI.B #0x33,D1 000218a4 66 0c |f | BNE 0x218b2 000218a6 48 6e fd f6 |Hn | PEA.L (A6-0x20a) 000218aa 4e ba fc ac |N | JSR 0x21558 000218ae 58 4f |XO | ADDQ.L #0x4,A7 000218b0 60 74 |`t | BRA 0x21926 000218b2 b0 05 | | CMP.B D5,D0 000218b4 66 0c |f | BNE 0x218c2 000218b6 12 2e fd f7 | . | MOVE.B (A6-0x209),D1 000218ba 0c 01 00 35 | 5 | CMPI.B #0x35,D1 000218be 66 02 |f | BNE 0x218c2 000218c0 60 64 |`d | BRA 0x21926 000218c2 b0 05 | | CMP.B D5,D0 000218c4 66 0c |f | BNE 0x218d2 000218c6 12 2e fd f7 | . | MOVE.B (A6-0x209),D1 000218ca 0c 01 00 37 | 7 | CMPI.B #0x37,D1 000218ce 66 02 |f | BNE 0x218d2 000218d0 60 54 |`T | BRA 0x21926 000218d2 b0 05 | | CMP.B D5,D0 000218d4 66 0c |f | BNE 0x218e2 000218d6 10 2e fd f7 | . | MOVE.B (A6-0x209),D0 000218da 0c 00 00 38 | 8 | CMPI.B #0x38,D0 000218de 66 02 |f | BNE 0x218e2 000218e0 60 44 |`D | BRA 0x21926 000218e2 42 27 |B' | CLR.B -(A7) 000218e4 1f 02 | | MOVE.B D2,-(A7) 000218e6 48 78 00 01 |Hx | PEA.L 0x1 000218ea 48 54 |HT | PEA.L (A4) 000218ec 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000218f0 48 50 |HP | PEA.L (A0) 000218f2 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000218f8 9e fc 00 0e | | SUBA.W #0xe,A7 000218fc 20 4f | O | MOVEA.L A7,A0 000218fe 43 fa e9 ba |C | LEA.L 0x202ba,A1 00021902 70 1c |p | MOVEQ.L #0x1c,D0 00021904 10 d9 | | MOVE.B (A1)+,(A0)+ 00021906 51 c8 ff fc |Q | DBF D0,0x21904 0002190a 59 4f |YO | SUBQ.L #0x4,A7 0002190c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021910 3f 02 |? | MOVE.W D2,-(A7) 00021912 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 00021916 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002191c 50 4f |PO | ADDQ.L #0x8,A7 0002191e 4e ba f8 74 |N t | JSR 0x21194 00021922 de fc 00 22 | " | ADDA.W #0x22,A7 00021926 10 2e fd f7 | . | MOVE.B (A6-0x209),D0 0002192a 0c 00 00 37 | 7 | CMPI.B #0x37,D0 0002192e 67 08 |g | BEQ 0x21938 00021930 0c 00 00 38 | 8 | CMPI.B #0x38,D0 00021934 66 00 fe 6e |f n | BNE 0x217a4 00021938 42 79 00 02 90 bc |By | CLR.W 0x290bc 0002193e 42 79 00 02 90 be |By | CLR.W 0x290be 00021944 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021948 2f 10 |/ | MOVE.L (A0),-(A7) 0002194a 48 52 |HR | PEA.L (A2) 0002194c 48 53 |HS | PEA.L (A3) 0002194e 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 00021954 de fc 00 0c | | ADDA.W #0xc,A7 00021958 20 52 | R | MOVEA.L (A2),A0 0002195a 4a 13 |J | TST.B (A3) 0002195c 66 00 00 82 |f | BNE 0x219e0 00021960 10 28 00 02 | ( | MOVE.B (A0+0x2),D0 00021964 0c 00 00 52 | R | CMPI.B #0x52,D0 00021968 66 76 |fv | BNE 0x219e0 0002196a 10 28 00 05 | ( | MOVE.B (A0+0x5),D0 0002196e 0c 00 00 4e | N | CMPI.B #0x4e,D0 00021972 66 6c |fl | BNE 0x219e0 00021974 59 4f |YO | SUBQ.L #0x4,A7 00021976 1f 28 00 03 | ( | MOVE.B (A0+0x3),-(A7) 0002197a 4e ba f8 de |N | JSR 0x2125a 0002197e 54 4f |TO | ADDQ.L #0x2,A7 00021980 28 1f |( | MOVE.L (A7)+,D4 00021982 76 0a |v | MOVEQ.L #0x0a,D3 00021984 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 0002198a 59 4f |YO | SUBQ.L #0x4,A7 0002198c 1f 28 00 04 | ( | MOVE.B (A0+0x4),-(A7) 00021990 4e ba f8 c8 |N | JSR 0x2125a 00021994 54 4f |TO | ADDQ.L #0x2,A7 00021996 20 04 | | MOVE.L D4,D0 00021998 d0 9f | | ADD.L (A7)+,D0 0002199a 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 000219a0 63 02 |c | BLS 0x219a4 000219a2 4e 4f |NO | TRAP #15 000219a4 33 c0 00 02 90 bc |3 | MOVE.W D0,0x290bc 000219aa 59 4f |YO | SUBQ.L #0x4,A7 000219ac 1f 28 00 06 | ( | MOVE.B (A0+0x6),-(A7) 000219b0 4e ba f8 a8 |N | JSR 0x2125a 000219b4 54 4f |TO | ADDQ.L #0x2,A7 000219b6 28 1f |( | MOVE.L (A7)+,D4 000219b8 76 0a |v | MOVEQ.L #0x0a,D3 000219ba 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 000219c0 59 4f |YO | SUBQ.L #0x4,A7 000219c2 1f 28 00 07 | ( | MOVE.B (A0+0x7),-(A7) 000219c6 4e ba f8 92 |N | JSR 0x2125a 000219ca 54 4f |TO | ADDQ.L #0x2,A7 000219cc 20 04 | | MOVE.L D4,D0 000219ce d0 9f | | ADD.L (A7)+,D0 000219d0 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 000219d6 63 02 |c | BLS 0x219da 000219d8 4e 4f |NO | TRAP #15 000219da 33 c0 00 02 90 be |3 | MOVE.W D0,0x290be 000219e0 48 52 |HR | PEA.L (A2) 000219e2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000219e8 58 4f |XO | ADDQ.L #0x4,A7 000219ea 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000219ee 4e 5e |N^ | UNLK A6 000219f0 4e 75 |Nu | RTS 000219f2 ; -------------------------------------------------------------------------------------- 000219f2 ; OMSI PASCAL Function 000219f2 ; <LVAR 0x008 4(r)> 000219f2 ; <LVAR -0x010 4(rw)> 000219f2 ; <LVAR -0x014 4(rw)> 000219f2 ; -------------------------------------------------------------------------------------- 000219f2 4e 56 ff 88 |NV | LINK.W A6,#0xff88 000219f6 bf d5 | | CMPA.L (A5),A7 000219f8 62 06 |b | BHI 0x21a00 000219fa 44 fc 00 02 |D | MOVE.W #0x2,CCR 000219fe 4e 76 |Nv | TRAPV 00021a00 de fc 00 64 | d | ADDA.W #0x64,A7 00021a04 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021a08 43 fa f8 50 |C P | LEA.L 0x2125a,A1 00021a0c 45 f9 00 01 02 8c |E | LEA.L ?muls_d3_d4,A2 00021a12 47 ee 00 08 |G | LEA.L (A6+0x8),A3 00021a16 74 7d |t} | MOVEQ.L #0x7d,D2 00021a18 20 53 | S | MOVEA.L (A3),A0 00021a1a 59 4f |YO | SUBQ.L #0x4,A7 00021a1c 1f 28 00 03 | ( | MOVE.B (A0+0x3),-(A7) 00021a20 4e 91 |N | JSR (A1) 00021a22 54 4f |TO | ADDQ.L #0x2,A7 00021a24 26 1f |& | MOVE.L (A7)+,D3 00021a26 78 10 |x | MOVEQ.L #0x10,D4 00021a28 4e 92 |N | JSR (A2) 00021a2a 59 4f |YO | SUBQ.L #0x4,A7 00021a2c 1f 28 00 04 | ( | MOVE.B (A0+0x4),-(A7) 00021a30 4e 91 |N | JSR (A1) 00021a32 54 4f |TO | ADDQ.L #0x2,A7 00021a34 20 04 | | MOVE.L D4,D0 00021a36 d0 9f | | ADD.L (A7)+,D0 00021a38 2d 40 ff f0 |-@ | MOVE.L D0,(A6-0x10) 00021a3c 59 4f |YO | SUBQ.L #0x4,A7 00021a3e 1f 28 00 05 | ( | MOVE.B (A0+0x5),-(A7) 00021a42 4e 91 |N | JSR (A1) 00021a44 54 4f |TO | ADDQ.L #0x2,A7 00021a46 26 1f |& | MOVE.L (A7)+,D3 00021a48 28 3c 00 00 10 00 |(< | MOVE.L #0x1000,D4 00021a4e 4e 92 |N | JSR (A2) 00021a50 2f 04 |/ | MOVE.L D4,-(A7) 00021a52 59 4f |YO | SUBQ.L #0x4,A7 00021a54 1f 28 00 06 | ( | MOVE.B (A0+0x6),-(A7) 00021a58 4e 91 |N | JSR (A1) 00021a5a 54 4f |TO | ADDQ.L #0x2,A7 00021a5c 26 1f |& | MOVE.L (A7)+,D3 00021a5e 28 3c 00 00 01 00 |(< | MOVE.L #0x100,D4 00021a64 4e 92 |N | JSR (A2) 00021a66 22 17 |" | MOVE.L (A7),D1 00021a68 d2 84 | | ADD.L D4,D1 00021a6a 1f 28 00 07 | ( | MOVE.B (A0+0x7),-(A7) 00021a6e 4e 91 |N | JSR (A1) 00021a70 54 4f |TO | ADDQ.L #0x2,A7 00021a72 26 1f |& | MOVE.L (A7)+,D3 00021a74 78 10 |x | MOVEQ.L #0x10,D4 00021a76 4e 92 |N | JSR (A2) 00021a78 d2 84 | | ADD.L D4,D1 00021a7a 59 4f |YO | SUBQ.L #0x4,A7 00021a7c 1f 28 00 08 | ( | MOVE.B (A0+0x8),-(A7) 00021a80 4e 91 |N | JSR (A1) 00021a82 54 4f |TO | ADDQ.L #0x2,A7 00021a84 d2 9f | | ADD.L (A7)+,D1 00021a86 2d 41 ff ec |-A | MOVE.L D1,(A6-0x14) 00021a8a 2e 00 |. | MOVE.L D0,D7 00021a8c 59 4f |YO | SUBQ.L #0x4,A7 00021a8e 1f 28 00 05 | ( | MOVE.B (A0+0x5),-(A7) 00021a92 4e 91 |N | JSR (A1) 00021a94 54 4f |TO | ADDQ.L #0x2,A7 00021a96 26 1f |& | MOVE.L (A7)+,D3 00021a98 78 10 |x | MOVEQ.L #0x10,D4 00021a9a 4e 92 |N | JSR (A2) 00021a9c de 84 | | ADD.L D4,D7 00021a9e 59 4f |YO | SUBQ.L #0x4,A7 00021aa0 1f 28 00 06 | ( | MOVE.B (A0+0x6),-(A7) 00021aa4 4e 91 |N | JSR (A1) 00021aa6 54 4f |TO | ADDQ.L #0x2,A7 00021aa8 de 9f | | ADD.L (A7)+,D7 00021aaa 59 4f |YO | SUBQ.L #0x4,A7 00021aac 1f 28 00 07 | ( | MOVE.B (A0+0x7),-(A7) 00021ab0 4e 91 |N | JSR (A1) 00021ab2 54 4f |TO | ADDQ.L #0x2,A7 00021ab4 26 1f |& | MOVE.L (A7)+,D3 00021ab6 78 10 |x | MOVEQ.L #0x10,D4 00021ab8 4e 92 |N | JSR (A2) 00021aba de 84 | | ADD.L D4,D7 00021abc 59 4f |YO | SUBQ.L #0x4,A7 00021abe 1f 28 00 08 | ( | MOVE.B (A0+0x8),-(A7) 00021ac2 4e 91 |N | JSR (A1) 00021ac4 54 4f |TO | ADDQ.L #0x2,A7 00021ac6 de 9f | | ADD.L (A7)+,D7 00021ac8 53 80 |S | SUBQ.L #0x1,D0 00021aca 2f 00 |/ | MOVE.L D0,-(A7) 00021acc 7a 00 |z | MOVEQ.L #0x00,D5 00021ace ba 97 | | CMP.L (A7),D5 00021ad0 6e 76 |nv | BGT 0x21b48 00021ad2 20 53 | S | MOVEA.L (A3),A0 00021ad4 20 05 | | MOVE.L D5,D0 00021ad6 e3 80 | | ASL.L #0x1,D0 00021ad8 59 4f |YO | SUBQ.L #0x4,A7 00021ada 72 0a |r | MOVEQ.L #0x0a,D1 00021adc d2 80 | | ADD.L D0,D1 00021ade 53 81 |S | SUBQ.L #0x1,D1 00021ae0 b2 82 | | CMP.L D2,D1 00021ae2 63 02 |c | BLS 0x21ae6 00021ae4 4e 4f |NO | TRAP #15 00021ae6 1f 30 18 02 | 0 | MOVE.B (A0+D1.L+#0x2),-(A7) 00021aea 4e 91 |N | JSR (A1) 00021aec 54 4f |TO | ADDQ.L #0x2,A7 00021aee 26 1f |& | MOVE.L (A7)+,D3 00021af0 78 10 |x | MOVEQ.L #0x10,D4 00021af2 4e 92 |N | JSR (A2) 00021af4 59 4f |YO | SUBQ.L #0x4,A7 00021af6 06 80 00 00 00 0b | | ADDI.L #0x0000000b,D0 00021afc 53 80 |S | SUBQ.L #0x1,D0 00021afe b0 82 | | CMP.L D2,D0 00021b00 63 02 |c | BLS 0x21b04 00021b02 4e 4f |NO | TRAP #15 00021b04 1f 30 08 02 | 0 | MOVE.B (A0+D0.L+#0x2),-(A7) 00021b08 4e 91 |N | JSR (A1) 00021b0a 54 4f |TO | ADDQ.L #0x2,A7 00021b0c 2c 04 |, | MOVE.L D4,D6 00021b0e dc 9f | | ADD.L (A7)+,D6 00021b10 20 2e ff ec | . | MOVE.L (A6-0x14),D0 00021b14 d0 85 | | ADD.L D5,D0 00021b16 0c 80 00 00 1f ff | | CMPI.L #0x00001fff,D0 00021b1c 63 02 |c | BLS 0x21b20 00021b1e 4e 4f |NO | TRAP #15 00021b20 e3 80 | | ASL.L #0x1,D0 00021b22 41 f9 00 02 50 88 |A P | LEA.L 0x25088,A0 00021b28 0c 86 00 00 00 ff | | CMPI.L #0x000000ff,D6 00021b2e 63 02 |c | BLS 0x21b32 00021b30 4e 4f |NO | TRAP #15 00021b32 31 86 08 2a |1 * | MOVE.W D6,(A0+D0.L+#0x2a) 00021b36 de 86 | | ADD.L D6,D7 00021b38 52 b9 00 02 50 a0 |R P | ADDQ.L #0x1,0x250a0 00021b3e 52 b9 00 02 50 a4 |R P | ADDQ.L #0x1,0x250a4 00021b44 52 85 |R | ADDQ.L #0x1,D5 00021b46 68 86 |h | BVC 0x21ace 00021b48 58 4f |XO | ADDQ.L #0x4,A7 00021b4a 20 53 | S | MOVEA.L (A3),A0 00021b4c 20 2e ff f0 | . | MOVE.L (A6-0x10),D0 00021b50 e3 80 | | ASL.L #0x1,D0 00021b52 59 4f |YO | SUBQ.L #0x4,A7 00021b54 72 0a |r | MOVEQ.L #0x0a,D1 00021b56 d2 80 | | ADD.L D0,D1 00021b58 53 81 |S | SUBQ.L #0x1,D1 00021b5a b2 82 | | CMP.L D2,D1 00021b5c 63 02 |c | BLS 0x21b60 00021b5e 4e 4f |NO | TRAP #15 00021b60 1f 30 18 02 | 0 | MOVE.B (A0+D1.L+#0x2),-(A7) 00021b64 4e 91 |N | JSR (A1) 00021b66 54 4f |TO | ADDQ.L #0x2,A7 00021b68 26 1f |& | MOVE.L (A7)+,D3 00021b6a 78 10 |x | MOVEQ.L #0x10,D4 00021b6c 4e 92 |N | JSR (A2) 00021b6e de 84 | | ADD.L D4,D7 00021b70 59 4f |YO | SUBQ.L #0x4,A7 00021b72 06 80 00 00 00 0b | | ADDI.L #0x0000000b,D0 00021b78 53 80 |S | SUBQ.L #0x1,D0 00021b7a b0 82 | | CMP.L D2,D0 00021b7c 63 02 |c | BLS 0x21b80 00021b7e 4e 4f |NO | TRAP #15 00021b80 1f 30 08 02 | 0 | MOVE.B (A0+D0.L+#0x2),-(A7) 00021b84 4e 91 |N | JSR (A1) 00021b86 54 4f |TO | ADDQ.L #0x2,A7 00021b88 de 9f | | ADD.L (A7)+,D7 00021b8a 28 07 |( | MOVE.L D7,D4 00021b8c 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 00021b92 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00021b98 4a 83 |J | TST.L D3 00021b9a 67 2a |g* | BEQ 0x21bc6 00021b9c 41 fa e7 5a |A Z | LEA.L 0x202f8,A0 00021ba0 70 07 |p | MOVEQ.L #0x07,D0 00021ba2 2f 20 |/ | MOVE.L -(A0),-(A7) 00021ba4 51 c8 ff fc |Q | DBF D0,0x21ba2 00021ba8 59 4f |YO | SUBQ.L #0x4,A7 00021baa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021bae 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021bb2 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7) 00021bb6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021bbc 50 4f |PO | ADDQ.L #0x8,A7 00021bbe 4e ba f5 d4 |N | JSR 0x21194 00021bc2 de fc 00 24 | $ | ADDA.W #0x24,A7 00021bc6 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 00021bca 4e 5e |N^ | UNLK A6 00021bcc 4e 75 |Nu | RTS 00021bce ; -------------------------------------------------------------------------------------- 00021bce ; OMSI PASCAL Function 00021bce ; <LVAR 0x008 4(r)> 00021bce ; <LVAR -0x004 @ 1(r)> 00021bce ; <LVAR -0x008 @ 4(r)> 00021bce ; -------------------------------------------------------------------------------------- 00021bce 4e 56 ff a2 |NV | LINK.W A6,#0xffa2 00021bd2 bf d5 | | CMPA.L (A5),A7 00021bd4 62 06 |b | BHI 0x21bdc 00021bd6 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021bda 4e 76 |Nv | TRAPV 00021bdc de fc 00 56 | V | ADDA.W #0x56,A7 00021be0 48 e7 e0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D2+D1+D0,-(A7) 00021be4 47 ee ff f8 |G | LEA.L (A6-0x8),A3 00021be8 49 f9 00 02 50 90 |I P | LEA.L 0x25090,A4 00021bee 72 01 |r | MOVEQ.L #0x01,D1 00021bf0 74 30 |t0 | MOVEQ.L #0x30,D2 00021bf2 48 53 |HS | PEA.L (A3) 00021bf4 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00021bfa 58 4f |XO | ADDQ.L #0x4,A7 00021bfc 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021c00 2f 08 |/ | MOVE.L A0,-(A7) 00021c02 2f 10 |/ | MOVE.L (A0),-(A7) 00021c04 48 53 |HS | PEA.L (A3) 00021c06 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021c0a 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 00021c10 de fc 00 0c | | ADDA.W #0xc,A7 00021c14 4a 2e ff fc |J. | TST.B (A6-0x4) 00021c18 67 3e |g> | BEQ 0x21c58 00021c1a 42 27 |B' | CLR.B -(A7) 00021c1c 1f 01 | | MOVE.B D1,-(A7) 00021c1e 48 78 00 01 |Hx | PEA.L 0x1 00021c22 48 54 |HT | PEA.L (A4) 00021c24 48 50 |HP | PEA.L (A0) 00021c26 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00021c2c de fc 00 10 | | ADDA.W #0x10,A7 00021c30 41 fa e6 dc |A | LEA.L 0x2030e,A0 00021c34 70 0a |p | MOVEQ.L #0x0a,D0 00021c36 3f 20 |? | MOVE.W -(A0),-(A7) 00021c38 51 c8 ff fc |Q | DBF D0,0x21c36 00021c3c 59 4f |YO | SUBQ.L #0x4,A7 00021c3e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021c42 3f 01 |? | MOVE.W D1,-(A7) 00021c44 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 00021c48 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021c4e 50 4f |PO | ADDQ.L #0x8,A7 00021c50 4e ba f5 42 |N B | JSR 0x21194 00021c54 de fc 00 1a | | ADDA.W #0x1a,A7 00021c58 20 53 | S | MOVEA.L (A3),A0 00021c5a 10 28 00 02 | ( | MOVE.B (A0+0x2),D0 00021c5e 0c 00 00 3a | : | CMPI.B #0x3a,D0 00021c62 66 08 |f | BNE 0x21c6c 00021c64 10 28 00 09 | ( | MOVE.B (A0+0x9),D0 00021c68 b0 02 | | CMP.B D2,D0 00021c6a 67 44 |gD | BEQ 0x21cb0 00021c6c 42 27 |B' | CLR.B -(A7) 00021c6e 1f 01 | | MOVE.B D1,-(A7) 00021c70 48 78 00 01 |Hx | PEA.L 0x1 00021c74 48 54 |HT | PEA.L (A4) 00021c76 22 6f 00 0c |"o | MOVEA.L (A7+0xc),A1 00021c7a 48 51 |HQ | PEA.L (A1) 00021c7c 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00021c82 9e fc 00 0e | | SUBA.W #0xe,A7 00021c86 22 4f |"O | MOVEA.L A7,A1 00021c88 45 fa e6 84 |E | LEA.L 0x2030e,A2 00021c8c 70 1c |p | MOVEQ.L #0x1c,D0 00021c8e 12 da | | MOVE.B (A2)+,(A1)+ 00021c90 51 c8 ff fc |Q | DBF D0,0x21c8e 00021c94 59 4f |YO | SUBQ.L #0x4,A7 00021c96 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021c9a 3f 01 |? | MOVE.W D1,-(A7) 00021c9c 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 00021ca0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021ca6 50 4f |PO | ADDQ.L #0x8,A7 00021ca8 4e ba f4 ea |N | JSR 0x21194 00021cac de fc 00 22 | " | ADDA.W #0x22,A7 00021cb0 2f 13 |/ | MOVE.L (A3),-(A7) 00021cb2 4e ba fd 3e |N > | JSR 0x219f2 00021cb6 58 4f |XO | ADDQ.L #0x4,A7 00021cb8 10 28 00 05 | ( | MOVE.B (A0+0x5),D0 00021cbc 0c 00 00 31 | 1 | CMPI.B #0x31,D0 00021cc0 67 06 |g | BEQ 0x21cc8 00021cc2 58 4f |XO | ADDQ.L #0x4,A7 00021cc4 60 00 ff 36 |` 6 | BRA 0x21bfc 00021cc8 10 28 00 06 | ( | MOVE.B (A0+0x6),D0 00021ccc 0c 00 00 46 | F | CMPI.B #0x46,D0 00021cd0 67 06 |g | BEQ 0x21cd8 00021cd2 58 4f |XO | ADDQ.L #0x4,A7 00021cd4 60 00 ff 26 |` & | BRA 0x21bfc 00021cd8 10 28 00 07 | ( | MOVE.B (A0+0x7),D0 00021cdc 0c 00 00 45 | E | CMPI.B #0x45,D0 00021ce0 67 06 |g | BEQ 0x21ce8 00021ce2 58 4f |XO | ADDQ.L #0x4,A7 00021ce4 60 00 ff 16 |` | BRA 0x21bfc 00021ce8 58 4f |XO | ADDQ.L #0x4,A7 00021cea 10 28 00 08 | ( | MOVE.B (A0+0x8),D0 00021cee b0 02 | | CMP.B D2,D0 00021cf0 66 00 ff 0a |f | BNE 0x21bfc 00021cf4 48 53 |HS | PEA.L (A3) 00021cf6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00021cfc 58 4f |XO | ADDQ.L #0x4,A7 00021cfe 4c df 1f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3+A4 00021d02 4e 5e |N^ | UNLK A6 00021d04 4e 75 |Nu | RTS 00021d06 ; -------------------------------------------------------------------------------------- 00021d06 ; OMSI PASCAL Function 00021d06 ; <LVAR 0x00c 4(r)> 00021d06 ; <LVAR 0x00a 1(r)> 00021d06 ; <LVAR 0x008 1(r)> 00021d06 ; <LVAR -0x004 @ 4(r)> 00021d06 ; <LVAR -0x008 @ 4(r)> 00021d06 ; -------------------------------------------------------------------------------------- 00021d06 4e 56 ff 70 |NV p | LINK.W A6,#0xff70 00021d0a bf d5 | | CMPA.L (A5),A7 00021d0c 62 06 |b | BHI 0x21d14 00021d0e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021d12 4e 76 |Nv | TRAPV 00021d14 de fc 00 80 | | ADDA.W #0x80,A7 00021d18 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021d1c 45 f9 00 02 50 b0 |E P | LEA.L 0x250b0,A2 00021d22 47 f9 00 02 50 ac |G P | LEA.L 0x250ac,A3 00021d28 49 f9 00 02 50 88 |I P | LEA.L 0x25088,A4 00021d2e 74 01 |t | MOVEQ.L #0x01,D2 00021d30 2a 3c 00 00 1f ff |*< | MOVE.L #0x1fff,D5 00021d36 20 39 00 02 50 9c | 9 P | MOVE.L 0x2509c,D0 00021d3c 0c 80 80 00 60 00 | ` | CMPI.L #0x80006000,D0 00021d42 67 16 |g | BEQ 0x21d5a 00021d44 4a 2e 00 0a |J. | TST.B (A6+0xa) 00021d48 67 18 |g | BEQ 0x21d62 00021d4a 4a 79 00 02 90 ae |Jy | TST.W 0x290ae 00021d50 66 10 |f | BNE 0x21d62 00021d52 4a 79 00 02 90 a8 |Jy | TST.W 0x290a8 00021d58 66 08 |f | BNE 0x21d62 00021d5a 26 bc 00 00 1d ff |& | MOVE.L #0x1dff,(A3) 00021d60 60 02 |` | BRA 0x21d64 00021d62 26 85 |& | MOVE.L D5,(A3) 00021d64 20 13 | | MOVE.L (A3),D0 00021d66 53 80 |S | SUBQ.L #0x1,D0 00021d68 b0 85 | | CMP.L D5,D0 00021d6a 63 02 |c | BLS 0x21d6e 00021d6c 4e 4f |NO | TRAP #15 00021d6e e3 80 | | ASL.L #0x1,D0 00021d70 20 4c | L | MOVEA.L A4,A0 00021d72 30 30 08 2a |00 * | MOVE.W (A0+D0.L+#0x2a),D0 00021d76 41 bc 00 ff |A | CHK.W #0xff,D0 00021d7a 34 80 |4 | MOVE.W D0,(A2) 00021d7c 3f 00 |? | MOVE.W D0,-(A7) 00021d7e 48 79 00 02 50 a8 |Hy P | PEA.L 0x250a8 00021d84 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021d88 4e ba f5 fe |N | JSR 0x21388 00021d8c de fc 00 0a | | ADDA.W #0xa,A7 00021d90 4a 2e 00 08 |J. | TST.B (A6+0x8) 00021d94 67 00 01 6c |g l | BEQ 0x21f02 00021d98 3f 3a e5 96 |?: | MOVE.W 0x20330,-(A7) 00021d9c 3f 3a e5 90 |?: | MOVE.W 0x2032e,-(A7) 00021da0 3f 3a e5 8a |?: | MOVE.W 0x2032c,-(A7) 00021da4 41 fa e5 b0 |A | LEA.L 0x20356,A0 00021da8 70 08 |p | MOVEQ.L #0x08,D0 00021daa 2f 20 |/ | MOVE.L -(A0),-(A7) 00021dac 51 c8 ff fc |Q | DBF D0,0x21daa 00021db0 51 4f |QO | SUBQ.L #0x8,A7 00021db2 48 6f 00 2c |Ho , | PEA.L (A7+0x2c) 00021db6 3f 02 |? | MOVE.W D2,-(A7) 00021db8 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00021dbc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021dc2 2e b9 00 02 50 a4 |. P | MOVE.L 0x250a4,(A7) 00021dc8 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021dce 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00021dd2 3f 02 |? | MOVE.W D2,-(A7) 00021dd4 3f 3c 00 24 |?< $ | MOVE.W #0x24,-(A7) 00021dd8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021dde 2e b9 00 02 50 9c |. P | MOVE.L 0x2509c,(A7) 00021de4 48 78 00 08 |Hx | PEA.L 0x8 00021de8 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00021dee 50 4f |PO | ADDQ.L #0x8,A7 00021df0 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00021df6 de fc 00 10 | | ADDA.W #0x10,A7 00021dfa 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021e00 de fc 00 14 | | ADDA.W #0x14,A7 00021e04 20 4f | O | MOVEA.L A7,A0 00021e06 43 fa e5 4e |C N | LEA.L 0x20356,A1 00021e0a 70 18 |p | MOVEQ.L #0x18,D0 00021e0c 10 d9 | | MOVE.B (A1)+,(A0)+ 00021e0e 51 c8 ff fc |Q | DBF D0,0x21e0c 00021e12 51 4f |QO | SUBQ.L #0x8,A7 00021e14 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021e18 3f 02 |? | MOVE.W D2,-(A7) 00021e1a 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00021e1e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021e24 58 4f |XO | ADDQ.L #0x4,A7 00021e26 20 13 | | MOVE.L (A3),D0 00021e28 59 80 |Y | SUBQ.L #0x4,D0 00021e2a b0 85 | | CMP.L D5,D0 00021e2c 63 02 |c | BLS 0x21e30 00021e2e 4e 4f |NO | TRAP #15 00021e30 e3 80 | | ASL.L #0x1,D0 00021e32 20 4c | L | MOVEA.L A4,A0 00021e34 32 30 08 2a |20 * | MOVE.W (A0+D0.L+#0x2a),D1 00021e38 48 c1 |H | EXTW.L D1 00021e3a 2f 01 |/ | MOVE.L D1,-(A7) 00021e3c 48 78 00 02 |Hx | PEA.L 0x2 00021e40 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00021e46 58 4f |XO | ADDQ.L #0x4,A7 00021e48 20 13 | | MOVE.L (A3),D0 00021e4a 57 80 |W | SUBQ.L #0x3,D0 00021e4c b0 85 | | CMP.L D5,D0 00021e4e 63 02 |c | BLS 0x21e52 00021e50 4e 4f |NO | TRAP #15 00021e52 e3 80 | | ASL.L #0x1,D0 00021e54 20 4c | L | MOVEA.L A4,A0 00021e56 32 30 08 2a |20 * | MOVE.W (A0+D0.L+#0x2a),D1 00021e5a 48 c1 |H | EXTW.L D1 00021e5c 2f 01 |/ | MOVE.L D1,-(A7) 00021e5e 48 78 00 02 |Hx | PEA.L 0x2 00021e62 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00021e68 58 4f |XO | ADDQ.L #0x4,A7 00021e6a 20 13 | | MOVE.L (A3),D0 00021e6c 55 80 |U | SUBQ.L #0x2,D0 00021e6e b0 85 | | CMP.L D5,D0 00021e70 63 02 |c | BLS 0x21e74 00021e72 4e 4f |NO | TRAP #15 00021e74 e3 80 | | ASL.L #0x1,D0 00021e76 20 4c | L | MOVEA.L A4,A0 00021e78 32 30 08 2a |20 * | MOVE.W (A0+D0.L+#0x2a),D1 00021e7c 48 c1 |H | EXTW.L D1 00021e7e 2f 01 |/ | MOVE.L D1,-(A7) 00021e80 48 78 00 02 |Hx | PEA.L 0x2 00021e84 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00021e8a 50 4f |PO | ADDQ.L #0x8,A7 00021e8c 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00021e92 de fc 00 10 | | ADDA.W #0x10,A7 00021e96 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021e9c de fc 00 0e | | ADDA.W #0xe,A7 00021ea0 20 4f | O | MOVEA.L A7,A0 00021ea2 43 fa e4 cc |C | LEA.L 0x20370,A1 00021ea6 70 0e |p | MOVEQ.L #0x0e,D0 00021ea8 10 d9 | | MOVE.B (A1)+,(A0)+ 00021eaa 51 c8 ff fc |Q | DBF D0,0x21ea8 00021eae 3f 3a e4 d0 |?: | MOVE.W 0x20380,-(A7) 00021eb2 51 4f |QO | SUBQ.L #0x8,A7 00021eb4 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00021eb8 3f 02 |? | MOVE.W D2,-(A7) 00021eba 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00021ebe 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021ec4 58 4f |XO | ADDQ.L #0x4,A7 00021ec6 30 12 |0 | MOVE.W (A2),D0 00021ec8 48 c0 |H | EXTW.L D0 00021eca 2f 00 |/ | MOVE.L D0,-(A7) 00021ecc 48 78 00 02 |Hx | PEA.L 0x2 00021ed0 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00021ed6 58 4f |XO | ADDQ.L #0x4,A7 00021ed8 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00021edc 3f 02 |? | MOVE.W D2,-(A7) 00021ede 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00021ee2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021ee8 58 4f |XO | ADDQ.L #0x4,A7 00021eea 2e ae ff fc |. | MOVE.L (A6-0x4),(A7) 00021eee 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00021ef4 de fc 00 10 | | ADDA.W #0x10,A7 00021ef8 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021efe de fc 00 16 | | ADDA.W #0x16,A7 00021f02 7e 00 |~ | MOVEQ.L #0x00,D7 00021f04 7c 00 || | MOVEQ.L #0x00,D6 00021f06 bc 85 | | CMP.L D5,D6 00021f08 63 02 |c | BLS 0x21f0c 00021f0a 4e 4f |NO | TRAP #15 00021f0c 20 06 | | MOVE.L D6,D0 00021f0e e3 80 | | ASL.L #0x1,D0 00021f10 20 4c | L | MOVEA.L A4,A0 00021f12 32 30 08 2a |20 * | MOVE.W (A0+D0.L+#0x2a),D1 00021f16 48 c1 |H | EXTW.L D1 00021f18 de 81 | | ADD.L D1,D7 00021f1a 28 07 |( | MOVE.L D7,D4 00021f1c 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 00021f22 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00021f28 2e 03 |. | MOVE.L D3,D7 00021f2a 52 86 |R | ADDQ.L #0x1,D6 00021f2c bc 85 | | CMP.L D5,D6 00021f2e 6f d6 |o | BLE 0x21f06 00021f30 0c 87 00 00 00 aa | | CMPI.L #0x000000aa,D7 00021f36 66 3a |f: | BNE 0x21f72 00021f38 4a 2e 00 08 |J. | TST.B (A6+0x8) 00021f3c 67 30 |g0 | BEQ 0x21f6e 00021f3e 9e fc 00 12 | | SUBA.W #0x12,A7 00021f42 20 4f | O | MOVEA.L A7,A0 00021f44 43 fa e4 3c |C < | LEA.L 0x20382,A1 00021f48 70 10 |p | MOVEQ.L #0x10,D0 00021f4a 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f4c 51 c8 ff fc |Q | DBF D0,0x21f4a 00021f50 59 4f |YO | SUBQ.L #0x4,A7 00021f52 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021f56 3f 02 |? | MOVE.W D2,-(A7) 00021f58 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 00021f5c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021f62 50 4f |PO | ADDQ.L #0x8,A7 00021f64 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021f6a de fc 00 16 | | ADDA.W #0x16,A7 00021f6e 60 00 00 ec |` | BRA 0x2205c 00021f72 3f 3a e4 20 |?: | MOVE.W 0x20394,-(A7) 00021f76 59 4f |YO | SUBQ.L #0x4,A7 00021f78 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021f7c 3f 02 |? | MOVE.W D2,-(A7) 00021f7e 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00021f82 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021f88 50 4f |PO | ADDQ.L #0x8,A7 00021f8a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021f90 5c 4f |\O | ADDQ.L #0x6,A7 00021f92 41 fa e4 36 |A 6 | LEA.L 0x203ca,A0 00021f96 70 0c |p | MOVEQ.L #0x0c,D0 00021f98 2f 20 |/ | MOVE.L -(A0),-(A7) 00021f9a 51 c8 ff fc |Q | DBF D0,0x21f98 00021f9e 51 4f |QO | SUBQ.L #0x8,A7 00021fa0 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021fa4 3f 02 |? | MOVE.W D2,-(A7) 00021fa6 3f 3c 00 34 |?< 4 | MOVE.W #0x34,-(A7) 00021faa 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021fb0 2e 87 |. | MOVE.L D7,(A7) 00021fb2 48 78 00 02 |Hx | PEA.L 0x2 00021fb6 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00021fbc 50 4f |PO | ADDQ.L #0x8,A7 00021fbe 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021fc4 50 4f |PO | ADDQ.L #0x8,A7 00021fc6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021fcc de fc 00 38 | 8 | ADDA.W #0x38,A7 00021fd0 41 fa e4 10 |A | LEA.L 0x203e2,A0 00021fd4 70 05 |p | MOVEQ.L #0x05,D0 00021fd6 2f 20 |/ | MOVE.L -(A0),-(A7) 00021fd8 51 c8 ff fc |Q | DBF D0,0x21fd6 00021fdc 5d 4f |]O | SUBQ.L #0x6,A7 00021fde 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021fe2 3f 02 |? | MOVE.W D2,-(A7) 00021fe4 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00021fe8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021fee 5c 4f |\O | ADDQ.L #0x6,A7 00021ff0 42 17 |B | CLR.B (A7) 00021ff2 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00021ff8 5c 4f |\O | ADDQ.L #0x6,A7 00021ffa 4a 1f |J | TST.B (A7)+ 00021ffc 66 2e |f. | BNE 0x2202c 00021ffe 9e fc 00 12 | | SUBA.W #0x12,A7 00022002 20 4f | O | MOVEA.L A7,A0 00022004 43 fa e3 dc |C | LEA.L 0x203e2,A1 00022008 70 10 |p | MOVEQ.L #0x10,D0 0002200a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002200c 51 c8 ff fc |Q | DBF D0,0x2200a 00022010 59 4f |YO | SUBQ.L #0x4,A7 00022012 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022016 3f 02 |? | MOVE.W D2,-(A7) 00022018 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 0002201c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022022 50 4f |PO | ADDQ.L #0x8,A7 00022024 4e ba f1 6e |N n | JSR 0x21194 00022028 de fc 00 16 | | ADDA.W #0x16,A7 0002202c 9e fc 00 10 | | SUBA.W #0x10,A7 00022030 20 4f | O | MOVEA.L A7,A0 00022032 43 fa e3 c0 |C | LEA.L 0x203f4,A1 00022036 70 26 |p& | MOVEQ.L #0x26,D0 00022038 10 d9 | | MOVE.B (A1)+,(A0)+ 0002203a 51 c8 ff fc |Q | DBF D0,0x22038 0002203e 59 4f |YO | SUBQ.L #0x4,A7 00022040 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022044 3f 02 |? | MOVE.W D2,-(A7) 00022046 3f 3c 00 27 |?< ' | MOVE.W #0x27,-(A7) 0002204a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022050 50 4f |PO | ADDQ.L #0x8,A7 00022052 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022058 de fc 00 2c | , | ADDA.W #0x2c,A7 0002205c 4a 2e 00 0a |J. | TST.B (A6+0xa) 00022060 67 3c |g< | BEQ 0x2209e 00022062 4a ae 00 0c |J | TST.L (A6+0xc) 00022066 67 32 |g2 | BEQ 0x2209a 00022068 30 12 |0 | MOVE.W (A2),D0 0002206a 48 c0 |H | EXTW.L D0 0002206c b0 ae 00 0c | | CMP.L (A6+0xc),D0 00022070 67 28 |g( | BEQ 0x2209a 00022072 41 fa e3 c4 |A | LEA.L 0x20438,A0 00022076 70 06 |p | MOVEQ.L #0x06,D0 00022078 2f 20 |/ | MOVE.L -(A0),-(A7) 0002207a 51 c8 ff fc |Q | DBF D0,0x22078 0002207e 59 4f |YO | SUBQ.L #0x4,A7 00022080 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022084 3f 02 |? | MOVE.W D2,-(A7) 00022086 3f 3c 00 1c |?< | MOVE.W #0x1c,-(A7) 0002208a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022090 50 4f |PO | ADDQ.L #0x8,A7 00022092 4e ba f1 00 |N | JSR 0x21194 00022096 de fc 00 20 | | ADDA.W #0x20,A7 0002209a 60 00 01 7c |` | | BRA 0x22218 0002209e 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 000220a2 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 000220a8 63 02 |c | BLS 0x220ac 000220aa 4e 4f |NO | TRAP #15 000220ac 3f 00 |? | MOVE.W D0,-(A7) 000220ae 48 6e ff f8 |Hn | PEA.L (A6-0x8) 000220b2 48 6e ff fc |Hn | PEA.L (A6-0x4) 000220b6 4e ba f2 d0 |N | JSR 0x21388 000220ba de fc 00 0a | | ADDA.W #0xa,A7 000220be 48 6e ff fc |Hn | PEA.L (A6-0x4) 000220c2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000220c8 58 4f |XO | ADDQ.L #0x4,A7 000220ca 4a ae 00 0c |J | TST.L (A6+0xc) 000220ce 67 34 |g4 | BEQ 0x22104 000220d0 20 2e ff f8 | . | MOVE.L (A6-0x8),D0 000220d4 b0 b9 00 02 50 9c | P | CMP.L 0x2509c,D0 000220da 67 28 |g( | BEQ 0x22104 000220dc 41 fa e3 78 |A x | LEA.L 0x20456,A0 000220e0 70 0e |p | MOVEQ.L #0x0e,D0 000220e2 3f 20 |? | MOVE.W -(A0),-(A7) 000220e4 51 c8 ff fc |Q | DBF D0,0x220e2 000220e8 59 4f |YO | SUBQ.L #0x4,A7 000220ea 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000220ee 3f 02 |? | MOVE.W D2,-(A7) 000220f0 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 000220f4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000220fa 50 4f |PO | ADDQ.L #0x8,A7 000220fc 4e ba f0 96 |N | JSR 0x21194 00022100 de fc 00 22 | " | ADDA.W #0x22,A7 00022104 20 39 00 02 50 a8 | 9 P | MOVE.L 0x250a8,D0 0002210a b0 b9 00 02 50 9c | P | CMP.L 0x2509c,D0 00022110 67 00 01 06 |g | BEQ 0x22218 00022114 20 39 00 02 50 9c | 9 P | MOVE.L 0x2509c,D0 0002211a 0c 80 80 00 00 00 | | CMPI.L #0x80000000,D0 00022120 66 08 |f | BNE 0x2212a 00022122 34 bc 00 21 |4 ! | MOVE.W #0x21,(A2) 00022126 60 00 00 94 |` | BRA 0x221bc 0002212a 0c 80 80 00 20 00 | | CMPI.L #0x80002000,D0 00022130 66 08 |f | BNE 0x2213a 00022132 34 bc 00 19 |4 | MOVE.W #0x19,(A2) 00022136 60 00 00 84 |` | BRA 0x221bc 0002213a 0c 80 80 00 40 00 | @ | CMPI.L #0x80004000,D0 00022140 66 06 |f | BNE 0x22148 00022142 34 bc 00 17 |4 | MOVE.W #0x17,(A2) 00022146 60 74 |`t | BRA 0x221bc 00022148 0c 80 80 00 60 00 | ` | CMPI.L #0x80006000,D0 0002214e 66 06 |f | BNE 0x22156 00022150 34 bc 00 15 |4 | MOVE.W #0x15,(A2) 00022154 60 66 |`f | BRA 0x221bc 00022156 0c 80 00 07 00 00 | | CMPI.L #0x00070000,D0 0002215c 66 06 |f | BNE 0x22164 0002215e 34 bc 00 50 |4 P | MOVE.W #0x50,(A2) 00022162 60 58 |`X | BRA 0x221bc 00022164 0c 80 00 07 20 00 | | CMPI.L #0x00072000,D0 0002216a 66 06 |f | BNE 0x22172 0002216c 34 bc 00 51 |4 Q | MOVE.W #0x51,(A2) 00022170 60 4a |`J | BRA 0x221bc 00022172 0c 80 00 07 40 00 | @ | CMPI.L #0x00074000,D0 00022178 66 06 |f | BNE 0x22180 0002217a 34 bc 00 52 |4 R | MOVE.W #0x52,(A2) 0002217e 60 3c |`< | BRA 0x221bc 00022180 0c 80 00 07 60 00 | ` | CMPI.L #0x00076000,D0 00022186 66 06 |f | BNE 0x2218e 00022188 34 bc 00 53 |4 S | MOVE.W #0x53,(A2) 0002218c 60 2e |`. | BRA 0x221bc 0002218e 9e fc 00 1e | | SUBA.W #0x1e,A7 00022192 20 4f | O | MOVEA.L A7,A0 00022194 43 fa e2 c0 |C | LEA.L 0x20456,A1 00022198 70 1c |p | MOVEQ.L #0x1c,D0 0002219a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002219c 51 c8 ff fc |Q | DBF D0,0x2219a 000221a0 59 4f |YO | SUBQ.L #0x4,A7 000221a2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000221a6 3f 02 |? | MOVE.W D2,-(A7) 000221a8 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 000221ac 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000221b2 50 4f |PO | ADDQ.L #0x8,A7 000221b4 4e ba ef de |N | JSR 0x21194 000221b8 de fc 00 22 | " | ADDA.W #0x22,A7 000221bc 20 13 | | MOVE.L (A3),D0 000221be 53 80 |S | SUBQ.L #0x1,D0 000221c0 b0 85 | | CMP.L D5,D0 000221c2 63 02 |c | BLS 0x221c6 000221c4 4e 4f |NO | TRAP #15 000221c6 e3 80 | | ASL.L #0x1,D0 000221c8 20 4c | L | MOVEA.L A4,A0 000221ca 31 92 08 2a |1 * | MOVE.W (A2),(A0+D0.L+#0x2a) 000221ce 3f 12 |? | MOVE.W (A2),-(A7) 000221d0 48 79 00 02 50 a8 |Hy P | PEA.L 0x250a8 000221d6 48 6e ff fc |Hn | PEA.L (A6-0x4) 000221da 4e ba f1 ac |N | JSR 0x21388 000221de de fc 00 0a | | ADDA.W #0xa,A7 000221e2 41 fa e2 c2 |A | LEA.L 0x204a6,A0 000221e6 70 18 |p | MOVEQ.L #0x18,D0 000221e8 3f 20 |? | MOVE.W -(A0),-(A7) 000221ea 51 c8 ff fc |Q | DBF D0,0x221e8 000221ee 51 4f |QO | SUBQ.L #0x8,A7 000221f0 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000221f4 3f 02 |? | MOVE.W D2,-(A7) 000221f6 3f 3c 00 32 |?< 2 | MOVE.W #0x32,-(A7) 000221fa 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022200 58 4f |XO | ADDQ.L #0x4,A7 00022202 2e ae ff fc |. | MOVE.L (A6-0x4),(A7) 00022206 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002220c 50 4f |PO | ADDQ.L #0x8,A7 0002220e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022214 de fc 00 36 | 6 | ADDA.W #0x36,A7 00022218 7e 00 |~ | MOVEQ.L #0x00,D7 0002221a 7c 00 || | MOVEQ.L #0x00,D6 0002221c bc 85 | | CMP.L D5,D6 0002221e 63 02 |c | BLS 0x22222 00022220 4e 4f |NO | TRAP #15 00022222 20 06 | | MOVE.L D6,D0 00022224 e3 80 | | ASL.L #0x1,D0 00022226 20 4c | L | MOVEA.L A4,A0 00022228 32 30 08 2a |20 * | MOVE.W (A0+D0.L+#0x2a),D1 0002222c 48 c1 |H | EXTW.L D1 0002222e de 81 | | ADD.L D1,D7 00022230 28 07 |( | MOVE.L D7,D4 00022232 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 00022238 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 0002223e 2e 03 |. | MOVE.L D3,D7 00022240 52 86 |R | ADDQ.L #0x1,D6 00022242 bc 85 | | CMP.L D5,D6 00022244 6f d6 |o | BLE 0x2221c 00022246 20 13 | | MOVE.L (A3),D0 00022248 b0 85 | | CMP.L D5,D0 0002224a 63 02 |c | BLS 0x2224e 0002224c 4e 4f |NO | TRAP #15 0002224e e3 80 | | ASL.L #0x1,D0 00022250 20 4c | L | MOVEA.L A4,A0 00022252 06 70 01 aa 08 2a | p * | ADDI.W #0x01aa,(A0+D0.L+#0x2a) 00022258 32 30 08 2a |20 * | MOVE.W (A0+D0.L+#0x2a),D1 0002225c 48 c1 |H | EXTW.L D1 0002225e 92 87 | | SUB.L D7,D1 00022260 28 01 |( | MOVE.L D1,D4 00022262 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 00022268 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 0002226e 31 83 08 2a |1 * | MOVE.W D3,(A0+D0.L+#0x2a) 00022272 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00022276 4e 5e |N^ | UNLK A6 00022278 4e 75 |Nu | RTS 0002227a ; -------------------------------------------------------------------------------------- 0002227a ; OMSI PASCAL Function 0002227a ; <LVAR 0x00e 4(r)> 0002227a ; <LVAR 0x00a 4(r)> 0002227a ; <LVAR 0x008 1(r)> 0002227a ; <LVAR -0x00a @ 1(r)> 0002227a ; <LVAR -0x00e @ 4(r)> 0002227a ; <LVAR -0x012 @ 4(r)> 0002227a ; -------------------------------------------------------------------------------------- 0002227a 4e 56 ff 78 |NV x | LINK.W A6,#0xff78 0002227e bf d5 | | CMPA.L (A5),A7 00022280 62 06 |b | BHI 0x22288 00022282 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022286 4e 76 |Nv | TRAPV 00022288 de fc 00 76 | v | ADDA.W #0x76,A7 0002228c 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022290 45 f9 00 02 50 90 |E P | LEA.L 0x25090,A2 00022296 47 ee ff ee |G | LEA.L (A6-0x12),A3 0002229a 49 f9 00 02 50 98 |I P | LEA.L 0x25098,A4 000222a0 74 01 |t | MOVEQ.L #0x01,D2 000222a2 76 2a |v* | MOVEQ.L #0x2a,D3 000222a4 78 18 |x | MOVEQ.L #0x18,D4 000222a6 7a 0c |z | MOVEQ.L #0x0c,D5 000222a8 20 6e 00 0e | n | MOVEA.L (A6+0xe),A0 000222ac b0 c2 | | CMPA.W D2,A0 000222ae 66 32 |f2 | BNE 0x222e2 000222b0 9e c3 | | SUBA.W D3,A7 000222b2 20 4f | O | MOVEA.L A7,A0 000222b4 43 fa e1 f0 |C | LEA.L 0x204a6,A1 000222b8 70 28 |p( | MOVEQ.L #0x28,D0 000222ba 10 d9 | | MOVE.B (A1)+,(A0)+ 000222bc 51 c8 ff fc |Q | DBF D0,0x222ba 000222c0 51 4f |QO | SUBQ.L #0x8,A7 000222c2 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000222c6 3f 02 |? | MOVE.W D2,-(A7) 000222c8 3f 3c 00 29 |?< ) | MOVE.W #0x29,-(A7) 000222cc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000222d2 50 4f |PO | ADDQ.L #0x8,A7 000222d4 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 000222da 58 4f |XO | ADDQ.L #0x4,A7 000222dc 28 9f |( | MOVE.L (A7)+,(A4) 000222de de c3 | | ADDA.W D3,A7 000222e0 60 02 |` | BRA 0x222e4 000222e2 28 88 |( | MOVE.L A0,(A4) 000222e4 2f 14 |/ | MOVE.L (A4),-(A7) 000222e6 42 27 |B' | CLR.B -(A7) 000222e8 1f 02 | | MOVE.B D2,-(A7) 000222ea 48 78 00 00 |Hx | PEA.L 0x0 000222ee 48 52 |HR | PEA.L (A2) 000222f0 48 53 |HS | PEA.L (A3) 000222f2 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000222f8 de fc 00 14 | | ADDA.W #0x14,A7 000222fc 4a 12 |J | TST.B (A2) 000222fe 67 26 |g& | BEQ 0x22326 00022300 41 fa e1 e6 |A | LEA.L 0x204e8,A0 00022304 70 05 |p | MOVEQ.L #0x05,D0 00022306 2f 20 |/ | MOVE.L -(A0),-(A7) 00022308 51 c8 ff fc |Q | DBF D0,0x22306 0002230c 59 4f |YO | SUBQ.L #0x4,A7 0002230e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022312 3f 02 |? | MOVE.W D2,-(A7) 00022314 3f 04 |? | MOVE.W D4,-(A7) 00022316 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002231c 50 4f |PO | ADDQ.L #0x8,A7 0002231e 4e ba ee 74 |N t | JSR 0x21194 00022322 de fc 00 1c | | ADDA.W #0x1c,A7 00022326 20 2e 00 0a | . | MOVE.L (A6+0xa),D0 0002232a 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 00022330 63 02 |c | BLS 0x22334 00022332 4e 4f |NO | TRAP #15 00022334 3f 00 |? | MOVE.W D0,-(A7) 00022336 48 79 00 02 50 9c |Hy P | PEA.L 0x2509c 0002233c 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00022340 4e ba f0 46 |N F | JSR 0x21388 00022344 5c 4f |\O | ADDQ.L #0x6,A7 00022346 2e 93 |. | MOVE.L (A3),(A7) 00022348 48 6e ff f2 |Hn | PEA.L (A6-0xe) 0002234c 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00022350 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 00022356 de c5 | | ADDA.W D5,A7 00022358 4a 2e ff f6 |J. | TST.B (A6-0xa) 0002235c 67 3e |g> | BEQ 0x2239c 0002235e 42 27 |B' | CLR.B -(A7) 00022360 1f 02 | | MOVE.B D2,-(A7) 00022362 48 78 00 01 |Hx | PEA.L 0x1 00022366 48 52 |HR | PEA.L (A2) 00022368 48 53 |HS | PEA.L (A3) 0002236a 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00022370 54 4f |TO | ADDQ.L #0x2,A7 00022372 20 4f | O | MOVEA.L A7,A0 00022374 43 fa e1 72 |C r | LEA.L 0x204e8,A1 00022378 70 0c |p | MOVEQ.L #0x0c,D0 0002237a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002237c 51 c8 ff fc |Q | DBF D0,0x2237a 00022380 59 4f |YO | SUBQ.L #0x4,A7 00022382 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022386 3f 02 |? | MOVE.W D2,-(A7) 00022388 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 0002238c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022392 50 4f |PO | ADDQ.L #0x8,A7 00022394 4e ba ed fe |N | JSR 0x21194 00022398 de fc 00 12 | | ADDA.W #0x12,A7 0002239c 20 6e ff f2 | n | MOVEA.L (A6-0xe),A0 000223a0 10 28 00 02 | ( | MOVE.B (A0+0x2),D0 000223a4 0c 00 00 3a | : | CMPI.B #0x3a,D0 000223a8 66 18 |f | BNE 0x223c2 000223aa 12 28 00 09 | ( | MOVE.B (A0+0x9),D1 000223ae 0c 01 00 30 | 0 | CMPI.B #0x30,D1 000223b2 66 0e |f | BNE 0x223c2 000223b4 7c 01 || | MOVEQ.L #0x01,D6 000223b6 2f 13 |/ | MOVE.L (A3),-(A7) 000223b8 4e b9 00 01 04 44 |N D | JSR FSCALL_10444 000223be 58 4f |XO | ADDQ.L #0x4,A7 000223c0 60 64 |`d | BRA 0x22426 000223c2 0c 00 00 53 | S | CMPI.B #0x53,D0 000223c6 66 0e |f | BNE 0x223d6 000223c8 12 28 00 03 | ( | MOVE.B (A0+0x3),D1 000223cc 0c 01 00 33 | 3 | CMPI.B #0x33,D1 000223d0 66 04 |f | BNE 0x223d6 000223d2 7c 00 || | MOVEQ.L #0x00,D6 000223d4 60 e0 |` | BRA 0x223b6 000223d6 0c 00 00 53 | S | CMPI.B #0x53,D0 000223da 66 0e |f | BNE 0x223ea 000223dc 10 28 00 03 | ( | MOVE.B (A0+0x3),D0 000223e0 0c 00 00 30 | 0 | CMPI.B #0x30,D0 000223e4 66 04 |f | BNE 0x223ea 000223e6 7c 00 || | MOVEQ.L #0x00,D6 000223e8 60 3c |`< | BRA 0x22426 000223ea 42 27 |B' | CLR.B -(A7) 000223ec 1f 02 | | MOVE.B D2,-(A7) 000223ee 48 78 00 01 |Hx | PEA.L 0x1 000223f2 48 52 |HR | PEA.L (A2) 000223f4 48 53 |HS | PEA.L (A3) 000223f6 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000223fc 59 4f |YO | SUBQ.L #0x4,A7 000223fe 20 4f | O | MOVEA.L A7,A0 00022400 43 fa e0 f4 |C | LEA.L 0x204f6,A1 00022404 70 12 |p | MOVEQ.L #0x12,D0 00022406 10 d9 | | MOVE.B (A1)+,(A0)+ 00022408 51 c8 ff fc |Q | DBF D0,0x22406 0002240c 59 4f |YO | SUBQ.L #0x4,A7 0002240e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022412 3f 02 |? | MOVE.W D2,-(A7) 00022414 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00022418 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002241e 50 4f |PO | ADDQ.L #0x8,A7 00022420 4e ba ed 72 |N r | JSR 0x21194 00022424 de c4 | | ADDA.W D4,A7 00022426 48 6e ff f2 |Hn | PEA.L (A6-0xe) 0002242a 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022430 58 4f |XO | ADDQ.L #0x4,A7 00022432 7e 00 |~ | MOVEQ.L #0x00,D7 00022434 0c 87 00 00 1f ff | | CMPI.L #0x00001fff,D7 0002243a 63 02 |c | BLS 0x2243e 0002243c 4e 4f |NO | TRAP #15 0002243e 20 07 | | MOVE.L D7,D0 00022440 e3 80 | | ASL.L #0x1,D0 00022442 41 f9 00 02 50 88 |A P | LEA.L 0x25088,A0 00022448 42 70 08 2a |Bp * | CLR.W (A0+D0.L+#0x2a) 0002244c 52 87 |R | ADDQ.L #0x1,D7 0002244e 0c 87 00 00 1f ff | | CMPI.L #0x00001fff,D7 00022454 6f de |o | BLE 0x22434 00022456 42 b9 00 02 50 a0 |B P | CLR.L 0x250a0 0002245c 42 b9 00 02 50 a4 |B P | CLR.L 0x250a4 00022462 4a 06 |J | TST.B D6 00022464 67 08 |g | BEQ 0x2246e 00022466 48 53 |HS | PEA.L (A3) 00022468 4e ba f7 64 |N d | JSR 0x21bce 0002246c 60 06 |` | BRA 0x22474 0002246e 48 53 |HS | PEA.L (A3) 00022470 4e ba f3 00 |N | JSR 0x21772 00022474 58 4f |XO | ADDQ.L #0x4,A7 00022476 42 27 |B' | CLR.B -(A7) 00022478 1f 02 | | MOVE.B D2,-(A7) 0002247a 48 78 00 01 |Hx | PEA.L 0x1 0002247e 48 52 |HR | PEA.L (A2) 00022480 48 53 |HS | PEA.L (A3) 00022482 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00022488 de c5 | | ADDA.W D5,A7 0002248a 2e ae 00 0a |. | MOVE.L (A6+0xa),(A7) 0002248e 10 06 | | MOVE.B D6,D0 00022490 48 80 |H | EXTB.W D0 00022492 41 82 |A | CHK.W D2,D0 00022494 1f 00 | | MOVE.B D0,-(A7) 00022496 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 0002249a 4e ba f8 6a |N j | JSR 0x21d06 0002249e 50 4f |PO | ADDQ.L #0x8,A7 000224a0 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000224a4 4e 5e |N^ | UNLK A6 000224a6 4e 75 |Nu | RTS 000224a8 ; -------------------------------------------------------------------------------------- 000224a8 ; OMSI PASCAL Function 000224a8 ; <LVAR 0x00c 2(w)> 000224a8 ; <LVAR 0x008 4(r)> 000224a8 ; <LVAR -0x004 @ 2(r)> 000224a8 ; -------------------------------------------------------------------------------------- 000224a8 4e 56 ff e6 |NV | LINK.W A6,#0xffe6 000224ac bf d5 | | CMPA.L (A5),A7 000224ae 62 06 |b | BHI 0x224b6 000224b0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000224b4 4e 76 |Nv | TRAPV 000224b6 de fc 00 16 | | ADDA.W #0x16,A7 000224ba 48 e7 00 c0 |H | MOVEM.L A1+A0,-(A7) 000224be 43 ee ff fc |C | LEA.L (A6-0x4),A1 000224c2 42 51 |BQ | CLR.W (A1) 000224c4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000224c8 20 49 | I | MOVEA.L A1,A0 000224ca 2f 08 |/ | MOVE.L A0,-(A7) 000224cc 52 97 |R | ADDQ.L #0x1,(A7) 000224ce 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000224d2 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 000224d8 de fc 00 0a | | ADDA.W #0xa,A7 000224dc 3d 51 00 0c |=Q | MOVE.W (A1),(A6+0xc) 000224e0 4c df 03 00 |L | MOVEM.L (A7)+,A0+A1 000224e4 4e 5e |N^ | UNLK A6 000224e6 4e 75 |Nu | RTS 000224e8 ; -------------------------------------------------------------------------------------- 000224e8 ; OMSI PASCAL Function 000224e8 ; <LVAR 0x00a 4(r)> 000224e8 ; <LVAR 0x008 @ 2(r)> 000224e8 ; -------------------------------------------------------------------------------------- 000224e8 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 000224ec bf d5 | | CMPA.L (A5),A7 000224ee 62 06 |b | BHI 0x224f6 000224f0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000224f4 4e 76 |Nv | TRAPV 000224f6 de fc 00 1e | | ADDA.W #0x1e,A7 000224fa 48 e7 c1 80 |H | MOVEM.L A0+D7+D1+D0,-(A7) 000224fe 72 01 |r | MOVEQ.L #0x01,D1 00022500 55 4f |UO | SUBQ.L #0x2,A7 00022502 2f 2e 00 0a |/. | MOVE.L (A6+0xa),-(A7) 00022506 4e ba ff a0 |N | JSR 0x224a8 0002250a 58 4f |XO | ADDQ.L #0x4,A7 0002250c 30 1f |0 | MOVE.W (A7)+,D0 0002250e 41 bc 00 ff |A | CHK.W #0xff,D0 00022512 3e 00 |> | MOVE.W D0,D7 00022514 be 6e 00 08 | n | CMP.W (A6+0x8),D7 00022518 67 2a |g* | BEQ 0x22544 0002251a 41 ee 00 08 |A | LEA.L (A6+0x8),A0 0002251e 2f 08 |/ | MOVE.L A0,-(A7) 00022520 52 97 |R | ADDQ.L #0x1,(A7) 00022522 2f 2e 00 0a |/. | MOVE.L (A6+0xa),-(A7) 00022526 3f 01 |? | MOVE.W D1,-(A7) 00022528 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 0002252e de fc 00 0a | | ADDA.W #0xa,A7 00022532 48 78 01 d4 |Hx | PEA.L 0x1d4 00022536 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 0002253c 58 4f |XO | ADDQ.L #0x4,A7 0002253e 13 c1 00 02 50 96 | P | MOVE.B D1,0x25096 00022544 4c df 01 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0 00022548 4e 5e |N^ | UNLK A6 0002254a 4e 75 |Nu | RTS 0002254c ; -------------------------------------------------------------------------------------- 0002254c ; OMSI PASCAL Function 0002254c ; <LVAR 0x00a 4(r)> 0002254c ; -------------------------------------------------------------------------------------- 0002254c 4e 56 ff ec |NV | LINK.W A6,#0xffec 00022550 bf d5 | | CMPA.L (A5),A7 00022552 62 06 |b | BHI 0x2255a 00022554 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022558 4e 76 |Nv | TRAPV 0002255a de fc 00 12 | | ADDA.W #0x12,A7 0002255e 48 e7 00 80 |H | MOVEM.L A0,-(A7) 00022562 41 ee 00 08 |A | LEA.L (A6+0x8),A0 00022566 2f 08 |/ | MOVE.L A0,-(A7) 00022568 52 97 |R | ADDQ.L #0x1,(A7) 0002256a 2f 2e 00 0a |/. | MOVE.L (A6+0xa),-(A7) 0002256e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022572 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00022578 de fc 00 0a | | ADDA.W #0xa,A7 0002257c 4c df 01 00 |L | MOVEM.L (A7)+,A0 00022580 4e 5e |N^ | UNLK A6 00022582 4e 75 |Nu | RTS 00022584 ; -------------------------------------------------------------------------------------- 00022584 ; OMSI PASCAL Function 00022584 ; <LVAR 0x008 4(r)> 00022584 ; -------------------------------------------------------------------------------------- 00022584 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 00022588 bf d5 | | CMPA.L (A5),A7 0002258a 62 06 |b | BHI 0x22592 0002258c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022590 4e 76 |Nv | TRAPV 00022592 de fc 00 50 | P | ADDA.W #0x50,A7 00022596 48 e7 e3 c0 |H | MOVEM.L A1+A0+D7+D6+D2+D1+D0,-(A7) 0002259a 32 3c 00 ff |2< | MOVE.W #0xff,D1 0002259e 74 01 |t | MOVEQ.L #0x01,D2 000225a0 2c 2e 00 08 |,. | MOVE.L (A6+0x8),D6 000225a4 5b 86 |[ | SUBQ.L #0x5,D6 000225a6 55 4f |UO | SUBQ.L #0x2,A7 000225a8 2f 06 |/ | MOVE.L D6,-(A7) 000225aa 4e ba fe fc |N | JSR 0x224a8 000225ae 58 4f |XO | ADDQ.L #0x4,A7 000225b0 30 1f |0 | MOVE.W (A7)+,D0 000225b2 b0 41 | A | CMP.W D1,D0 000225b4 62 00 02 58 |b X | BHI switch@0x225ba[0x2] 000225b8 d0 40 | @ | ADD.W D0,D0 000225ba 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000225c2 02 00 | | .CONST 0x200 ; [0x0] -> 0x227c2 000225c4 02 04 | | .CONST 0x204 ; [0x1] -> 0x227c6 000225c6 02 4c | L | .CONST 0x24c ; [0x2] -> 0x2280e 000225c8 02 08 | | .CONST 0x208 ; [0x3] -> 0x227ca 000225ca 02 4c | L | .CONST 0x24c ; [0x4] -> 0x2280e 000225cc 02 4c | L | .CONST 0x24c ; [0x5] -> 0x2280e 000225ce 02 4c | L | .CONST 0x24c ; [0x6] -> 0x2280e 000225d0 02 0c | | .CONST 0x20c ; [0x7] -> 0x227ce 000225d2 02 4c | L | .CONST 0x24c ; [0x8] -> 0x2280e 000225d4 02 4c | L | .CONST 0x24c ; [0x9] -> 0x2280e 000225d6 02 4c | L | .CONST 0x24c ; [0xa] -> 0x2280e 000225d8 02 4c | L | .CONST 0x24c ; [0xb] -> 0x2280e 000225da 02 4c | L | .CONST 0x24c ; [0xc] -> 0x2280e 000225dc 02 4c | L | .CONST 0x24c ; [0xd] -> 0x2280e 000225de 02 4c | L | .CONST 0x24c ; [0xe] -> 0x2280e 000225e0 02 0e | | .CONST 0x20e ; [0xf] -> 0x227d0 000225e2 02 4c | L | .CONST 0x24c ; [0x10] -> 0x2280e 000225e4 02 4c | L | .CONST 0x24c ; [0x11] -> 0x2280e 000225e6 02 4c | L | .CONST 0x24c ; [0x12] -> 0x2280e 000225e8 02 4c | L | .CONST 0x24c ; [0x13] -> 0x2280e 000225ea 02 4c | L | .CONST 0x24c ; [0x14] -> 0x2280e 000225ec 02 4c | L | .CONST 0x24c ; [0x15] -> 0x2280e 000225ee 02 4c | L | .CONST 0x24c ; [0x16] -> 0x2280e 000225f0 02 4c | L | .CONST 0x24c ; [0x17] -> 0x2280e 000225f2 02 4c | L | .CONST 0x24c ; [0x18] -> 0x2280e 000225f4 02 4c | L | .CONST 0x24c ; [0x19] -> 0x2280e 000225f6 02 4c | L | .CONST 0x24c ; [0x1a] -> 0x2280e 000225f8 02 4c | L | .CONST 0x24c ; [0x1b] -> 0x2280e 000225fa 02 4c | L | .CONST 0x24c ; [0x1c] -> 0x2280e 000225fc 02 4c | L | .CONST 0x24c ; [0x1d] -> 0x2280e 000225fe 02 4c | L | .CONST 0x24c ; [0x1e] -> 0x2280e 00022600 02 12 | | .CONST 0x212 ; [0x1f] -> 0x227d4 00022602 02 4c | L | .CONST 0x24c ; [0x20] -> 0x2280e 00022604 02 4c | L | .CONST 0x24c ; [0x21] -> 0x2280e 00022606 02 4c | L | .CONST 0x24c ; [0x22] -> 0x2280e 00022608 02 4c | L | .CONST 0x24c ; [0x23] -> 0x2280e 0002260a 02 4c | L | .CONST 0x24c ; [0x24] -> 0x2280e 0002260c 02 4c | L | .CONST 0x24c ; [0x25] -> 0x2280e 0002260e 02 4c | L | .CONST 0x24c ; [0x26] -> 0x2280e 00022610 02 4c | L | .CONST 0x24c ; [0x27] -> 0x2280e 00022612 02 4c | L | .CONST 0x24c ; [0x28] -> 0x2280e 00022614 02 4c | L | .CONST 0x24c ; [0x29] -> 0x2280e 00022616 02 4c | L | .CONST 0x24c ; [0x2a] -> 0x2280e 00022618 02 4c | L | .CONST 0x24c ; [0x2b] -> 0x2280e 0002261a 02 4c | L | .CONST 0x24c ; [0x2c] -> 0x2280e 0002261c 02 4c | L | .CONST 0x24c ; [0x2d] -> 0x2280e 0002261e 02 4c | L | .CONST 0x24c ; [0x2e] -> 0x2280e 00022620 02 4c | L | .CONST 0x24c ; [0x2f] -> 0x2280e 00022622 02 4c | L | .CONST 0x24c ; [0x30] -> 0x2280e 00022624 02 4c | L | .CONST 0x24c ; [0x31] -> 0x2280e 00022626 02 4c | L | .CONST 0x24c ; [0x32] -> 0x2280e 00022628 02 4c | L | .CONST 0x24c ; [0x33] -> 0x2280e 0002262a 02 4c | L | .CONST 0x24c ; [0x34] -> 0x2280e 0002262c 02 4c | L | .CONST 0x24c ; [0x35] -> 0x2280e 0002262e 02 4c | L | .CONST 0x24c ; [0x36] -> 0x2280e 00022630 02 4c | L | .CONST 0x24c ; [0x37] -> 0x2280e 00022632 02 4c | L | .CONST 0x24c ; [0x38] -> 0x2280e 00022634 02 4c | L | .CONST 0x24c ; [0x39] -> 0x2280e 00022636 02 4c | L | .CONST 0x24c ; [0x3a] -> 0x2280e 00022638 02 4c | L | .CONST 0x24c ; [0x3b] -> 0x2280e 0002263a 02 4c | L | .CONST 0x24c ; [0x3c] -> 0x2280e 0002263c 02 4c | L | .CONST 0x24c ; [0x3d] -> 0x2280e 0002263e 02 4c | L | .CONST 0x24c ; [0x3e] -> 0x2280e 00022640 02 16 | | .CONST 0x216 ; [0x3f] -> 0x227d8 00022642 02 4c | L | .CONST 0x24c ; [0x40] -> 0x2280e 00022644 02 4c | L | .CONST 0x24c ; [0x41] -> 0x2280e 00022646 02 4c | L | .CONST 0x24c ; [0x42] -> 0x2280e 00022648 02 4c | L | .CONST 0x24c ; [0x43] -> 0x2280e 0002264a 02 4c | L | .CONST 0x24c ; [0x44] -> 0x2280e 0002264c 02 4c | L | .CONST 0x24c ; [0x45] -> 0x2280e 0002264e 02 4c | L | .CONST 0x24c ; [0x46] -> 0x2280e 00022650 02 4c | L | .CONST 0x24c ; [0x47] -> 0x2280e 00022652 02 4c | L | .CONST 0x24c ; [0x48] -> 0x2280e 00022654 02 4c | L | .CONST 0x24c ; [0x49] -> 0x2280e 00022656 02 4c | L | .CONST 0x24c ; [0x4a] -> 0x2280e 00022658 02 4c | L | .CONST 0x24c ; [0x4b] -> 0x2280e 0002265a 02 4c | L | .CONST 0x24c ; [0x4c] -> 0x2280e 0002265c 02 4c | L | .CONST 0x24c ; [0x4d] -> 0x2280e 0002265e 02 4c | L | .CONST 0x24c ; [0x4e] -> 0x2280e 00022660 02 4c | L | .CONST 0x24c ; [0x4f] -> 0x2280e 00022662 02 4c | L | .CONST 0x24c ; [0x50] -> 0x2280e 00022664 02 4c | L | .CONST 0x24c ; [0x51] -> 0x2280e 00022666 02 4c | L | .CONST 0x24c ; [0x52] -> 0x2280e 00022668 02 4c | L | .CONST 0x24c ; [0x53] -> 0x2280e 0002266a 02 4c | L | .CONST 0x24c ; [0x54] -> 0x2280e 0002266c 02 4c | L | .CONST 0x24c ; [0x55] -> 0x2280e 0002266e 02 4c | L | .CONST 0x24c ; [0x56] -> 0x2280e 00022670 02 4c | L | .CONST 0x24c ; [0x57] -> 0x2280e 00022672 02 4c | L | .CONST 0x24c ; [0x58] -> 0x2280e 00022674 02 4c | L | .CONST 0x24c ; [0x59] -> 0x2280e 00022676 02 4c | L | .CONST 0x24c ; [0x5a] -> 0x2280e 00022678 02 4c | L | .CONST 0x24c ; [0x5b] -> 0x2280e 0002267a 02 4c | L | .CONST 0x24c ; [0x5c] -> 0x2280e 0002267c 02 4c | L | .CONST 0x24c ; [0x5d] -> 0x2280e 0002267e 02 4c | L | .CONST 0x24c ; [0x5e] -> 0x2280e 00022680 02 4c | L | .CONST 0x24c ; [0x5f] -> 0x2280e 00022682 02 4c | L | .CONST 0x24c ; [0x60] -> 0x2280e 00022684 02 4c | L | .CONST 0x24c ; [0x61] -> 0x2280e 00022686 02 4c | L | .CONST 0x24c ; [0x62] -> 0x2280e 00022688 02 4c | L | .CONST 0x24c ; [0x63] -> 0x2280e 0002268a 02 4c | L | .CONST 0x24c ; [0x64] -> 0x2280e 0002268c 02 4c | L | .CONST 0x24c ; [0x65] -> 0x2280e 0002268e 02 4c | L | .CONST 0x24c ; [0x66] -> 0x2280e 00022690 02 4c | L | .CONST 0x24c ; [0x67] -> 0x2280e 00022692 02 4c | L | .CONST 0x24c ; [0x68] -> 0x2280e 00022694 02 4c | L | .CONST 0x24c ; [0x69] -> 0x2280e 00022696 02 4c | L | .CONST 0x24c ; [0x6a] -> 0x2280e 00022698 02 4c | L | .CONST 0x24c ; [0x6b] -> 0x2280e 0002269a 02 4c | L | .CONST 0x24c ; [0x6c] -> 0x2280e 0002269c 02 4c | L | .CONST 0x24c ; [0x6d] -> 0x2280e 0002269e 02 4c | L | .CONST 0x24c ; [0x6e] -> 0x2280e 000226a0 02 4c | L | .CONST 0x24c ; [0x6f] -> 0x2280e 000226a2 02 4c | L | .CONST 0x24c ; [0x70] -> 0x2280e 000226a4 02 4c | L | .CONST 0x24c ; [0x71] -> 0x2280e 000226a6 02 4c | L | .CONST 0x24c ; [0x72] -> 0x2280e 000226a8 02 4c | L | .CONST 0x24c ; [0x73] -> 0x2280e 000226aa 02 4c | L | .CONST 0x24c ; [0x74] -> 0x2280e 000226ac 02 4c | L | .CONST 0x24c ; [0x75] -> 0x2280e 000226ae 02 4c | L | .CONST 0x24c ; [0x76] -> 0x2280e 000226b0 02 4c | L | .CONST 0x24c ; [0x77] -> 0x2280e 000226b2 02 4c | L | .CONST 0x24c ; [0x78] -> 0x2280e 000226b4 02 4c | L | .CONST 0x24c ; [0x79] -> 0x2280e 000226b6 02 4c | L | .CONST 0x24c ; [0x7a] -> 0x2280e 000226b8 02 4c | L | .CONST 0x24c ; [0x7b] -> 0x2280e 000226ba 02 4c | L | .CONST 0x24c ; [0x7c] -> 0x2280e 000226bc 02 4c | L | .CONST 0x24c ; [0x7d] -> 0x2280e 000226be 02 4c | L | .CONST 0x24c ; [0x7e] -> 0x2280e 000226c0 02 1a | | .CONST 0x21a ; [0x7f] -> 0x227dc 000226c2 02 48 | H | .CONST 0x248 ; [0x80] -> 0x2280a 000226c4 02 4c | L | .CONST 0x24c ; [0x81] -> 0x2280e 000226c6 02 4c | L | .CONST 0x24c ; [0x82] -> 0x2280e 000226c8 02 4c | L | .CONST 0x24c ; [0x83] -> 0x2280e 000226ca 02 4c | L | .CONST 0x24c ; [0x84] -> 0x2280e 000226cc 02 4c | L | .CONST 0x24c ; [0x85] -> 0x2280e 000226ce 02 4c | L | .CONST 0x24c ; [0x86] -> 0x2280e 000226d0 02 4c | L | .CONST 0x24c ; [0x87] -> 0x2280e 000226d2 02 4c | L | .CONST 0x24c ; [0x88] -> 0x2280e 000226d4 02 4c | L | .CONST 0x24c ; [0x89] -> 0x2280e 000226d6 02 4c | L | .CONST 0x24c ; [0x8a] -> 0x2280e 000226d8 02 4c | L | .CONST 0x24c ; [0x8b] -> 0x2280e 000226da 02 4c | L | .CONST 0x24c ; [0x8c] -> 0x2280e 000226dc 02 4c | L | .CONST 0x24c ; [0x8d] -> 0x2280e 000226de 02 4c | L | .CONST 0x24c ; [0x8e] -> 0x2280e 000226e0 02 4c | L | .CONST 0x24c ; [0x8f] -> 0x2280e 000226e2 02 4c | L | .CONST 0x24c ; [0x90] -> 0x2280e 000226e4 02 4c | L | .CONST 0x24c ; [0x91] -> 0x2280e 000226e6 02 4c | L | .CONST 0x24c ; [0x92] -> 0x2280e 000226e8 02 4c | L | .CONST 0x24c ; [0x93] -> 0x2280e 000226ea 02 4c | L | .CONST 0x24c ; [0x94] -> 0x2280e 000226ec 02 4c | L | .CONST 0x24c ; [0x95] -> 0x2280e 000226ee 02 4c | L | .CONST 0x24c ; [0x96] -> 0x2280e 000226f0 02 4c | L | .CONST 0x24c ; [0x97] -> 0x2280e 000226f2 02 4c | L | .CONST 0x24c ; [0x98] -> 0x2280e 000226f4 02 4c | L | .CONST 0x24c ; [0x99] -> 0x2280e 000226f6 02 4c | L | .CONST 0x24c ; [0x9a] -> 0x2280e 000226f8 02 4c | L | .CONST 0x24c ; [0x9b] -> 0x2280e 000226fa 02 4c | L | .CONST 0x24c ; [0x9c] -> 0x2280e 000226fc 02 4c | L | .CONST 0x24c ; [0x9d] -> 0x2280e 000226fe 02 4c | L | .CONST 0x24c ; [0x9e] -> 0x2280e 00022700 02 4c | L | .CONST 0x24c ; [0x9f] -> 0x2280e 00022702 02 4c | L | .CONST 0x24c ; [0xa0] -> 0x2280e 00022704 02 4c | L | .CONST 0x24c ; [0xa1] -> 0x2280e 00022706 02 4c | L | .CONST 0x24c ; [0xa2] -> 0x2280e 00022708 02 4c | L | .CONST 0x24c ; [0xa3] -> 0x2280e 0002270a 02 4c | L | .CONST 0x24c ; [0xa4] -> 0x2280e 0002270c 02 4c | L | .CONST 0x24c ; [0xa5] -> 0x2280e 0002270e 02 4c | L | .CONST 0x24c ; [0xa6] -> 0x2280e 00022710 02 4c | L | .CONST 0x24c ; [0xa7] -> 0x2280e 00022712 02 4c | L | .CONST 0x24c ; [0xa8] -> 0x2280e 00022714 02 4c | L | .CONST 0x24c ; [0xa9] -> 0x2280e 00022716 02 4c | L | .CONST 0x24c ; [0xaa] -> 0x2280e 00022718 02 4c | L | .CONST 0x24c ; [0xab] -> 0x2280e 0002271a 02 4c | L | .CONST 0x24c ; [0xac] -> 0x2280e 0002271c 02 4c | L | .CONST 0x24c ; [0xad] -> 0x2280e 0002271e 02 4c | L | .CONST 0x24c ; [0xae] -> 0x2280e 00022720 02 4c | L | .CONST 0x24c ; [0xaf] -> 0x2280e 00022722 02 4c | L | .CONST 0x24c ; [0xb0] -> 0x2280e 00022724 02 4c | L | .CONST 0x24c ; [0xb1] -> 0x2280e 00022726 02 4c | L | .CONST 0x24c ; [0xb2] -> 0x2280e 00022728 02 4c | L | .CONST 0x24c ; [0xb3] -> 0x2280e 0002272a 02 4c | L | .CONST 0x24c ; [0xb4] -> 0x2280e 0002272c 02 4c | L | .CONST 0x24c ; [0xb5] -> 0x2280e 0002272e 02 4c | L | .CONST 0x24c ; [0xb6] -> 0x2280e 00022730 02 4c | L | .CONST 0x24c ; [0xb7] -> 0x2280e 00022732 02 4c | L | .CONST 0x24c ; [0xb8] -> 0x2280e 00022734 02 4c | L | .CONST 0x24c ; [0xb9] -> 0x2280e 00022736 02 4c | L | .CONST 0x24c ; [0xba] -> 0x2280e 00022738 02 4c | L | .CONST 0x24c ; [0xbb] -> 0x2280e 0002273a 02 4c | L | .CONST 0x24c ; [0xbc] -> 0x2280e 0002273c 02 4c | L | .CONST 0x24c ; [0xbd] -> 0x2280e 0002273e 02 4c | L | .CONST 0x24c ; [0xbe] -> 0x2280e 00022740 02 4c | L | .CONST 0x24c ; [0xbf] -> 0x2280e 00022742 02 42 | B | .CONST 0x242 ; [0xc0] -> 0x22804 00022744 02 4c | L | .CONST 0x24c ; [0xc1] -> 0x2280e 00022746 02 4c | L | .CONST 0x24c ; [0xc2] -> 0x2280e 00022748 02 4c | L | .CONST 0x24c ; [0xc3] -> 0x2280e 0002274a 02 4c | L | .CONST 0x24c ; [0xc4] -> 0x2280e 0002274c 02 4c | L | .CONST 0x24c ; [0xc5] -> 0x2280e 0002274e 02 4c | L | .CONST 0x24c ; [0xc6] -> 0x2280e 00022750 02 4c | L | .CONST 0x24c ; [0xc7] -> 0x2280e 00022752 02 4c | L | .CONST 0x24c ; [0xc8] -> 0x2280e 00022754 02 4c | L | .CONST 0x24c ; [0xc9] -> 0x2280e 00022756 02 4c | L | .CONST 0x24c ; [0xca] -> 0x2280e 00022758 02 4c | L | .CONST 0x24c ; [0xcb] -> 0x2280e 0002275a 02 4c | L | .CONST 0x24c ; [0xcc] -> 0x2280e 0002275c 02 4c | L | .CONST 0x24c ; [0xcd] -> 0x2280e 0002275e 02 4c | L | .CONST 0x24c ; [0xce] -> 0x2280e 00022760 02 4c | L | .CONST 0x24c ; [0xcf] -> 0x2280e 00022762 02 4c | L | .CONST 0x24c ; [0xd0] -> 0x2280e 00022764 02 4c | L | .CONST 0x24c ; [0xd1] -> 0x2280e 00022766 02 4c | L | .CONST 0x24c ; [0xd2] -> 0x2280e 00022768 02 4c | L | .CONST 0x24c ; [0xd3] -> 0x2280e 0002276a 02 4c | L | .CONST 0x24c ; [0xd4] -> 0x2280e 0002276c 02 4c | L | .CONST 0x24c ; [0xd5] -> 0x2280e 0002276e 02 4c | L | .CONST 0x24c ; [0xd6] -> 0x2280e 00022770 02 4c | L | .CONST 0x24c ; [0xd7] -> 0x2280e 00022772 02 4c | L | .CONST 0x24c ; [0xd8] -> 0x2280e 00022774 02 4c | L | .CONST 0x24c ; [0xd9] -> 0x2280e 00022776 02 4c | L | .CONST 0x24c ; [0xda] -> 0x2280e 00022778 02 4c | L | .CONST 0x24c ; [0xdb] -> 0x2280e 0002277a 02 4c | L | .CONST 0x24c ; [0xdc] -> 0x2280e 0002277c 02 4c | L | .CONST 0x24c ; [0xdd] -> 0x2280e 0002277e 02 4c | L | .CONST 0x24c ; [0xde] -> 0x2280e 00022780 02 4c | L | .CONST 0x24c ; [0xdf] -> 0x2280e 00022782 02 3c | < | .CONST 0x23c ; [0xe0] -> 0x227fe 00022784 02 4c | L | .CONST 0x24c ; [0xe1] -> 0x2280e 00022786 02 4c | L | .CONST 0x24c ; [0xe2] -> 0x2280e 00022788 02 4c | L | .CONST 0x24c ; [0xe3] -> 0x2280e 0002278a 02 4c | L | .CONST 0x24c ; [0xe4] -> 0x2280e 0002278c 02 4c | L | .CONST 0x24c ; [0xe5] -> 0x2280e 0002278e 02 4c | L | .CONST 0x24c ; [0xe6] -> 0x2280e 00022790 02 4c | L | .CONST 0x24c ; [0xe7] -> 0x2280e 00022792 02 4c | L | .CONST 0x24c ; [0xe8] -> 0x2280e 00022794 02 4c | L | .CONST 0x24c ; [0xe9] -> 0x2280e 00022796 02 4c | L | .CONST 0x24c ; [0xea] -> 0x2280e 00022798 02 4c | L | .CONST 0x24c ; [0xeb] -> 0x2280e 0002279a 02 4c | L | .CONST 0x24c ; [0xec] -> 0x2280e 0002279c 02 4c | L | .CONST 0x24c ; [0xed] -> 0x2280e 0002279e 02 4c | L | .CONST 0x24c ; [0xee] -> 0x2280e 000227a0 02 4c | L | .CONST 0x24c ; [0xef] -> 0x2280e 000227a2 02 36 | 6 | .CONST 0x236 ; [0xf0] -> 0x227f8 000227a4 02 4c | L | .CONST 0x24c ; [0xf1] -> 0x2280e 000227a6 02 4c | L | .CONST 0x24c ; [0xf2] -> 0x2280e 000227a8 02 4c | L | .CONST 0x24c ; [0xf3] -> 0x2280e 000227aa 02 4c | L | .CONST 0x24c ; [0xf4] -> 0x2280e 000227ac 02 4c | L | .CONST 0x24c ; [0xf5] -> 0x2280e 000227ae 02 4c | L | .CONST 0x24c ; [0xf6] -> 0x2280e 000227b0 02 4c | L | .CONST 0x24c ; [0xf7] -> 0x2280e 000227b2 02 30 | 0 | .CONST 0x230 ; [0xf8] -> 0x227f2 000227b4 02 4c | L | .CONST 0x24c ; [0xf9] -> 0x2280e 000227b6 02 4c | L | .CONST 0x24c ; [0xfa] -> 0x2280e 000227b8 02 4c | L | .CONST 0x24c ; [0xfb] -> 0x2280e 000227ba 02 2a | * | .CONST 0x22a ; [0xfc] -> 0x227ec 000227bc 02 4c | L | .CONST 0x24c ; [0xfd] -> 0x2280e 000227be 02 24 | $ | .CONST 0x224 ; [0xfe] -> 0x227e6 000227c0 02 1e | | .CONST 0x21e ; [0xff] -> 0x227e0 000227c2 switch@0x225ba[0x0]: 000227c2 7e 01 |~ | MOVEQ.L #0x01,D7 000227c4 60 4a |`J | BRA 0x22810 000227c6 switch@0x225ba[0x1]: 000227c6 7e 03 |~ | MOVEQ.L #0x03,D7 000227c8 60 46 |`F | BRA 0x22810 000227ca switch@0x225ba[0x3]: 000227ca 7e 07 |~ | MOVEQ.L #0x07,D7 000227cc 60 42 |`B | BRA 0x22810 000227ce switch@0x225ba[0x7]: 000227ce 60 3e |`> | BRA switch@0x225ba[0x2] 000227d0 switch@0x225ba[0xf]: 000227d0 7e 1f |~ | MOVEQ.L #0x1f,D7 000227d2 60 3c |`< | BRA 0x22810 000227d4 switch@0x225ba[0x1f]: 000227d4 7e 3f |~? | MOVEQ.L #0x3f,D7 000227d6 60 38 |`8 | BRA 0x22810 000227d8 switch@0x225ba[0x3f]: 000227d8 7e 7f |~ | MOVEQ.L #0x7f,D7 000227da 60 34 |`4 | BRA 0x22810 000227dc switch@0x225ba[0x7f]: 000227dc 3e 01 |> | MOVE.W D1,D7 000227de 60 30 |`0 | BRA 0x22810 000227e0 switch@0x225ba[0xff]: 000227e0 3e 3c 00 fe |>< | MOVE.W #0xfe,D7 000227e4 60 2a |`* | BRA 0x22810 000227e6 switch@0x225ba[0xfe]: 000227e6 3e 3c 00 fc |>< | MOVE.W #0xfc,D7 000227ea 60 24 |`$ | BRA 0x22810 000227ec switch@0x225ba[0xfc]: 000227ec 3e 3c 00 f8 |>< | MOVE.W #0xf8,D7 000227f0 60 1e |` | BRA 0x22810 000227f2 switch@0x225ba[0xf8]: 000227f2 3e 3c 00 f0 |>< | MOVE.W #0xf0,D7 000227f6 60 18 |` | BRA 0x22810 000227f8 switch@0x225ba[0xf0]: 000227f8 3e 3c 00 e0 |>< | MOVE.W #0xe0,D7 000227fc 60 12 |` | BRA 0x22810 000227fe switch@0x225ba[0xe0]: 000227fe 3e 3c 00 c0 |>< | MOVE.W #0xc0,D7 00022802 60 0c |` | BRA 0x22810 00022804 switch@0x225ba[0xc0]: 00022804 3e 3c 00 80 |>< | MOVE.W #0x80,D7 00022808 60 06 |` | BRA 0x22810 0002280a switch@0x225ba[0x80]: 0002280a 7e 00 |~ | MOVEQ.L #0x00,D7 0002280c 60 02 |` | BRA 0x22810 0002280e switch@0x225ba[0x10]: 0002280e switch@0x225ba[0x11]: 0002280e switch@0x225ba[0x12]: 0002280e switch@0x225ba[0x13]: 0002280e switch@0x225ba[0x14]: 0002280e switch@0x225ba[0x15]: 0002280e switch@0x225ba[0x16]: 0002280e switch@0x225ba[0x17]: 0002280e switch@0x225ba[0x18]: 0002280e switch@0x225ba[0x19]: 0002280e switch@0x225ba[0x1a]: 0002280e switch@0x225ba[0x1b]: 0002280e switch@0x225ba[0x1c]: 0002280e switch@0x225ba[0x1d]: 0002280e switch@0x225ba[0x1e]: 0002280e switch@0x225ba[0x20]: 0002280e switch@0x225ba[0x21]: 0002280e switch@0x225ba[0x22]: 0002280e switch@0x225ba[0x23]: 0002280e switch@0x225ba[0x24]: 0002280e switch@0x225ba[0x25]: 0002280e switch@0x225ba[0x26]: 0002280e switch@0x225ba[0x27]: 0002280e switch@0x225ba[0x28]: 0002280e switch@0x225ba[0x29]: 0002280e switch@0x225ba[0x2]: 0002280e switch@0x225ba[0x2a]: 0002280e switch@0x225ba[0x2b]: 0002280e switch@0x225ba[0x2c]: 0002280e switch@0x225ba[0x2d]: 0002280e switch@0x225ba[0x2e]: 0002280e switch@0x225ba[0x2f]: 0002280e switch@0x225ba[0x30]: 0002280e switch@0x225ba[0x31]: 0002280e switch@0x225ba[0x32]: 0002280e switch@0x225ba[0x33]: 0002280e switch@0x225ba[0x34]: 0002280e switch@0x225ba[0x35]: 0002280e switch@0x225ba[0x36]: 0002280e switch@0x225ba[0x37]: 0002280e switch@0x225ba[0x38]: 0002280e switch@0x225ba[0x39]: 0002280e switch@0x225ba[0x3a]: 0002280e switch@0x225ba[0x3b]: 0002280e switch@0x225ba[0x3c]: 0002280e switch@0x225ba[0x3d]: 0002280e switch@0x225ba[0x3e]: 0002280e switch@0x225ba[0x40]: 0002280e switch@0x225ba[0x41]: 0002280e switch@0x225ba[0x42]: 0002280e switch@0x225ba[0x43]: 0002280e switch@0x225ba[0x44]: 0002280e switch@0x225ba[0x45]: 0002280e switch@0x225ba[0x46]: 0002280e switch@0x225ba[0x47]: 0002280e switch@0x225ba[0x48]: 0002280e switch@0x225ba[0x49]: 0002280e switch@0x225ba[0x4]: 0002280e switch@0x225ba[0x4a]: 0002280e switch@0x225ba[0x4b]: 0002280e switch@0x225ba[0x4c]: 0002280e switch@0x225ba[0x4d]: 0002280e switch@0x225ba[0x4e]: 0002280e switch@0x225ba[0x4f]: 0002280e switch@0x225ba[0x50]: 0002280e switch@0x225ba[0x51]: 0002280e switch@0x225ba[0x52]: 0002280e switch@0x225ba[0x53]: 0002280e switch@0x225ba[0x54]: 0002280e switch@0x225ba[0x55]: 0002280e switch@0x225ba[0x56]: 0002280e switch@0x225ba[0x57]: 0002280e switch@0x225ba[0x58]: 0002280e switch@0x225ba[0x59]: 0002280e switch@0x225ba[0x5]: 0002280e switch@0x225ba[0x5a]: 0002280e switch@0x225ba[0x5b]: 0002280e switch@0x225ba[0x5c]: 0002280e switch@0x225ba[0x5d]: 0002280e switch@0x225ba[0x5e]: 0002280e switch@0x225ba[0x5f]: 0002280e switch@0x225ba[0x60]: 0002280e switch@0x225ba[0x61]: 0002280e switch@0x225ba[0x62]: 0002280e switch@0x225ba[0x63]: 0002280e switch@0x225ba[0x64]: 0002280e switch@0x225ba[0x65]: 0002280e switch@0x225ba[0x66]: 0002280e switch@0x225ba[0x67]: 0002280e switch@0x225ba[0x68]: 0002280e switch@0x225ba[0x69]: 0002280e switch@0x225ba[0x6]: 0002280e switch@0x225ba[0x6a]: 0002280e switch@0x225ba[0x6b]: 0002280e switch@0x225ba[0x6c]: 0002280e switch@0x225ba[0x6d]: 0002280e switch@0x225ba[0x6e]: 0002280e switch@0x225ba[0x6f]: 0002280e switch@0x225ba[0x70]: 0002280e switch@0x225ba[0x71]: 0002280e switch@0x225ba[0x72]: 0002280e switch@0x225ba[0x73]: 0002280e switch@0x225ba[0x74]: 0002280e switch@0x225ba[0x75]: 0002280e switch@0x225ba[0x76]: 0002280e switch@0x225ba[0x77]: 0002280e switch@0x225ba[0x78]: 0002280e switch@0x225ba[0x79]: 0002280e switch@0x225ba[0x7a]: 0002280e switch@0x225ba[0x7b]: 0002280e switch@0x225ba[0x7c]: 0002280e switch@0x225ba[0x7d]: 0002280e switch@0x225ba[0x7e]: 0002280e switch@0x225ba[0x81]: 0002280e switch@0x225ba[0x82]: 0002280e switch@0x225ba[0x83]: 0002280e switch@0x225ba[0x84]: 0002280e switch@0x225ba[0x85]: 0002280e switch@0x225ba[0x86]: 0002280e switch@0x225ba[0x87]: 0002280e switch@0x225ba[0x88]: 0002280e switch@0x225ba[0x89]: 0002280e switch@0x225ba[0x8]: 0002280e switch@0x225ba[0x8a]: 0002280e switch@0x225ba[0x8b]: 0002280e switch@0x225ba[0x8c]: 0002280e switch@0x225ba[0x8d]: 0002280e switch@0x225ba[0x8e]: 0002280e switch@0x225ba[0x8f]: 0002280e switch@0x225ba[0x90]: 0002280e switch@0x225ba[0x91]: 0002280e switch@0x225ba[0x92]: 0002280e switch@0x225ba[0x93]: 0002280e switch@0x225ba[0x94]: 0002280e switch@0x225ba[0x95]: 0002280e switch@0x225ba[0x96]: 0002280e switch@0x225ba[0x97]: 0002280e switch@0x225ba[0x98]: 0002280e switch@0x225ba[0x99]: 0002280e switch@0x225ba[0x9]: 0002280e switch@0x225ba[0x9a]: 0002280e switch@0x225ba[0x9b]: 0002280e switch@0x225ba[0x9c]: 0002280e switch@0x225ba[0x9d]: 0002280e switch@0x225ba[0x9e]: 0002280e switch@0x225ba[0x9f]: 0002280e switch@0x225ba[0xa0]: 0002280e switch@0x225ba[0xa1]: 0002280e switch@0x225ba[0xa2]: 0002280e switch@0x225ba[0xa3]: 0002280e switch@0x225ba[0xa4]: 0002280e switch@0x225ba[0xa5]: 0002280e switch@0x225ba[0xa6]: 0002280e switch@0x225ba[0xa7]: 0002280e switch@0x225ba[0xa8]: 0002280e switch@0x225ba[0xa9]: 0002280e switch@0x225ba[0xa]: 0002280e switch@0x225ba[0xaa]: 0002280e switch@0x225ba[0xab]: 0002280e switch@0x225ba[0xac]: 0002280e switch@0x225ba[0xad]: 0002280e switch@0x225ba[0xae]: 0002280e switch@0x225ba[0xaf]: 0002280e switch@0x225ba[0xb0]: 0002280e switch@0x225ba[0xb1]: 0002280e switch@0x225ba[0xb2]: 0002280e switch@0x225ba[0xb3]: 0002280e switch@0x225ba[0xb4]: 0002280e switch@0x225ba[0xb5]: 0002280e switch@0x225ba[0xb6]: 0002280e switch@0x225ba[0xb7]: 0002280e switch@0x225ba[0xb8]: 0002280e switch@0x225ba[0xb9]: 0002280e switch@0x225ba[0xb]: 0002280e switch@0x225ba[0xba]: 0002280e switch@0x225ba[0xbb]: 0002280e switch@0x225ba[0xbc]: 0002280e switch@0x225ba[0xbd]: 0002280e switch@0x225ba[0xbe]: 0002280e switch@0x225ba[0xbf]: 0002280e switch@0x225ba[0xc1]: 0002280e switch@0x225ba[0xc2]: 0002280e switch@0x225ba[0xc3]: 0002280e switch@0x225ba[0xc4]: 0002280e switch@0x225ba[0xc5]: 0002280e switch@0x225ba[0xc6]: 0002280e switch@0x225ba[0xc7]: 0002280e switch@0x225ba[0xc8]: 0002280e switch@0x225ba[0xc9]: 0002280e switch@0x225ba[0xc]: 0002280e switch@0x225ba[0xca]: 0002280e switch@0x225ba[0xcb]: 0002280e switch@0x225ba[0xcc]: 0002280e switch@0x225ba[0xcd]: 0002280e switch@0x225ba[0xce]: 0002280e switch@0x225ba[0xcf]: 0002280e switch@0x225ba[0xd0]: 0002280e switch@0x225ba[0xd1]: 0002280e switch@0x225ba[0xd2]: 0002280e switch@0x225ba[0xd3]: 0002280e switch@0x225ba[0xd4]: 0002280e switch@0x225ba[0xd5]: 0002280e switch@0x225ba[0xd6]: 0002280e switch@0x225ba[0xd7]: 0002280e switch@0x225ba[0xd8]: 0002280e switch@0x225ba[0xd9]: 0002280e switch@0x225ba[0xd]: 0002280e switch@0x225ba[0xda]: 0002280e switch@0x225ba[0xdb]: 0002280e switch@0x225ba[0xdc]: 0002280e switch@0x225ba[0xdd]: 0002280e switch@0x225ba[0xde]: 0002280e switch@0x225ba[0xdf]: 0002280e switch@0x225ba[0xe1]: 0002280e switch@0x225ba[0xe2]: 0002280e switch@0x225ba[0xe3]: 0002280e switch@0x225ba[0xe4]: 0002280e switch@0x225ba[0xe5]: 0002280e switch@0x225ba[0xe6]: 0002280e switch@0x225ba[0xe7]: 0002280e switch@0x225ba[0xe8]: 0002280e switch@0x225ba[0xe9]: 0002280e switch@0x225ba[0xe]: 0002280e switch@0x225ba[0xea]: 0002280e switch@0x225ba[0xeb]: 0002280e switch@0x225ba[0xec]: 0002280e switch@0x225ba[0xed]: 0002280e switch@0x225ba[0xee]: 0002280e switch@0x225ba[0xef]: 0002280e switch@0x225ba[0xf1]: 0002280e switch@0x225ba[0xf2]: 0002280e switch@0x225ba[0xf3]: 0002280e switch@0x225ba[0xf4]: 0002280e switch@0x225ba[0xf5]: 0002280e switch@0x225ba[0xf6]: 0002280e switch@0x225ba[0xf7]: 0002280e switch@0x225ba[0xf9]: 0002280e switch@0x225ba[0xfa]: 0002280e switch@0x225ba[0xfb]: 0002280e switch@0x225ba[0xfd]: 0002280e 7e 0f |~ | MOVEQ.L #0x0f,D7 00022810 2f 06 |/ | MOVE.L D6,-(A7) 00022812 4f 81 |O | CHK.W D1,D7 00022814 3f 07 |? | MOVE.W D7,-(A7) 00022816 4e ba fc d0 |N | JSR 0x224e8 0002281a 2e 86 |. | MOVE.L D6,(A7) 0002281c 4e ba fc 8a |N | JSR 0x224a8 00022820 58 4f |XO | ADDQ.L #0x4,A7 00022822 be 5f | _ | CMP.W (A7)+,D7 00022824 67 2c |g, | BEQ 0x22852 00022826 41 fa dd 06 |A | LEA.L 0x2052e,A0 0002282a 70 08 |p | MOVEQ.L #0x08,D0 0002282c 2f 20 |/ | MOVE.L -(A0),-(A7) 0002282e 51 c8 ff fc |Q | DBF D0,0x2282c 00022832 59 4f |YO | SUBQ.L #0x4,A7 00022834 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022838 3f 02 |? | MOVE.W D2,-(A7) 0002283a 3f 3c 00 24 |?< $ | MOVE.W #0x24,-(A7) 0002283e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022844 50 4f |PO | ADDQ.L #0x8,A7 00022846 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002284c de fc 00 28 | ( | ADDA.W #0x28,A7 00022850 60 30 |`0 | BRA 0x22882 00022852 9e fc 00 16 | | SUBA.W #0x16,A7 00022856 20 4f | O | MOVEA.L A7,A0 00022858 43 fa dc d4 |C | LEA.L 0x2052e,A1 0002285c 70 14 |p | MOVEQ.L #0x14,D0 0002285e 10 d9 | | MOVE.B (A1)+,(A0)+ 00022860 51 c8 ff fc |Q | DBF D0,0x2285e 00022864 59 4f |YO | SUBQ.L #0x4,A7 00022866 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002286a 3f 02 |? | MOVE.W D2,-(A7) 0002286c 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 00022870 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022876 50 4f |PO | ADDQ.L #0x8,A7 00022878 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002287e de fc 00 1a | | ADDA.W #0x1a,A7 00022882 4c df 03 c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0+A1 00022886 4e 5e |N^ | UNLK A6 00022888 4e 75 |Nu | RTS 0002288a ; -------------------------------------------------------------------------------------- 0002288a ; OMSI PASCAL Function 0002288a ; -------------------------------------------------------------------------------------- 0002288a 4e 56 ff 90 |NV | LINK.W A6,#0xff90 0002288e bf d5 | | CMPA.L (A5),A7 00022890 62 06 |b | BHI 0x22898 00022892 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022896 4e 76 |Nv | TRAPV 00022898 de fc 00 70 | p | ADDA.W #0x70,A7 0002289c 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 000228a0 45 f9 00 02 50 a8 |E P | LEA.L 0x250a8,A2 000228a6 47 f9 00 02 50 ac |G P | LEA.L 0x250ac,A3 000228ac 49 fa fb fa |I | LEA.L 0x224a8,A4 000228b0 72 01 |r | MOVEQ.L #0x01,D1 000228b2 9e fc 00 1a | | SUBA.W #0x1a,A7 000228b6 20 4f | O | MOVEA.L A7,A0 000228b8 43 fa dc 8a |C | LEA.L 0x20544,A1 000228bc 70 18 |p | MOVEQ.L #0x18,D0 000228be 10 d9 | | MOVE.B (A1)+,(A0)+ 000228c0 51 c8 ff fc |Q | DBF D0,0x228be 000228c4 9e fc 00 10 | | SUBA.W #0x10,A7 000228c8 20 4f | O | MOVEA.L A7,A0 000228ca 43 fa dc 92 |C | LEA.L 0x2055e,A1 000228ce 70 0e |p | MOVEQ.L #0x0e,D0 000228d0 10 d9 | | MOVE.B (A1)+,(A0)+ 000228d2 51 c8 ff fc |Q | DBF D0,0x228d0 000228d6 51 4f |QO | SUBQ.L #0x8,A7 000228d8 48 6f 00 18 |Ho | PEA.L (A7+0x18) 000228dc 3f 01 |? | MOVE.W D1,-(A7) 000228de 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000228e2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000228e8 55 4f |UO | SUBQ.L #0x2,A7 000228ea 20 12 | | MOVE.L (A2),D0 000228ec d0 93 | | ADD.L (A3),D0 000228ee 59 80 |Y | SUBQ.L #0x4,D0 000228f0 2f 00 |/ | MOVE.L D0,-(A7) 000228f2 4e 94 |N | JSR (A4) 000228f4 58 4f |XO | ADDQ.L #0x4,A7 000228f6 30 1f |0 | MOVE.W (A7)+,D0 000228f8 48 c0 |H | EXTW.L D0 000228fa 2e 80 |. | MOVE.L D0,(A7) 000228fc 48 78 00 02 |Hx | PEA.L 0x2 00022900 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00022906 55 4f |UO | SUBQ.L #0x2,A7 00022908 20 12 | | MOVE.L (A2),D0 0002290a d0 93 | | ADD.L (A3),D0 0002290c 57 80 |W | SUBQ.L #0x3,D0 0002290e 2f 00 |/ | MOVE.L D0,-(A7) 00022910 4e 94 |N | JSR (A4) 00022912 58 4f |XO | ADDQ.L #0x4,A7 00022914 30 1f |0 | MOVE.W (A7)+,D0 00022916 48 c0 |H | EXTW.L D0 00022918 2e 80 |. | MOVE.L D0,(A7) 0002291a 48 78 00 02 |Hx | PEA.L 0x2 0002291e 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00022924 55 4f |UO | SUBQ.L #0x2,A7 00022926 20 12 | | MOVE.L (A2),D0 00022928 d0 93 | | ADD.L (A3),D0 0002292a 55 80 |U | SUBQ.L #0x2,D0 0002292c 2f 00 |/ | MOVE.L D0,-(A7) 0002292e 4e 94 |N | JSR (A4) 00022930 58 4f |XO | ADDQ.L #0x4,A7 00022932 30 1f |0 | MOVE.W (A7)+,D0 00022934 48 c0 |H | EXTW.L D0 00022936 2e 80 |. | MOVE.L D0,(A7) 00022938 48 78 00 02 |Hx | PEA.L 0x2 0002293c 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00022942 58 4f |XO | ADDQ.L #0x4,A7 00022944 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00022948 3f 01 |? | MOVE.W D1,-(A7) 0002294a 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 0002294e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022954 55 4f |UO | SUBQ.L #0x2,A7 00022956 20 12 | | MOVE.L (A2),D0 00022958 d0 93 | | ADD.L (A3),D0 0002295a 53 80 |S | SUBQ.L #0x1,D0 0002295c 2f 00 |/ | MOVE.L D0,-(A7) 0002295e 4e 94 |N | JSR (A4) 00022960 58 4f |XO | ADDQ.L #0x4,A7 00022962 30 1f |0 | MOVE.W (A7)+,D0 00022964 48 c0 |H | EXTW.L D0 00022966 2e 80 |. | MOVE.L D0,(A7) 00022968 48 78 00 02 |Hx | PEA.L 0x2 0002296c 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00022972 50 4f |PO | ADDQ.L #0x8,A7 00022974 4e b9 00 01 02 e0 |N | JSR StringCat6(a, b, c, d, e, f : String) : String 0002297a de fc 00 18 | | ADDA.W #0x18,A7 0002297e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022984 de fc 00 2e | . | ADDA.W #0x2e,A7 00022988 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 0002298c 4e 5e |N^ | UNLK A6 0002298e 4e 75 |Nu | RTS 00022990 ; -------------------------------------------------------------------------------------- 00022990 ; OMSI PASCAL Function 00022990 ; <LVAR 0x008 4(r)> 00022990 ; -------------------------------------------------------------------------------------- 00022990 4e 56 ff a0 |NV | LINK.W A6,#0xffa0 00022994 bf d5 | | CMPA.L (A5),A7 00022996 62 06 |b | BHI 0x2299e 00022998 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002299c 4e 76 |Nv | TRAPV 0002299e de fc 00 5c | \ | ADDA.W #0x5c,A7 000229a2 48 e7 c1 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D1+D0,-(A7) 000229a6 45 f9 00 02 50 ac |E P | LEA.L 0x250ac,A2 000229ac 47 f9 00 02 50 a8 |G P | LEA.L 0x250a8,A3 000229b2 55 4f |UO | SUBQ.L #0x2,A7 000229b4 20 13 | | MOVE.L (A3),D0 000229b6 d0 92 | | ADD.L (A2),D0 000229b8 53 80 |S | SUBQ.L #0x1,D0 000229ba 2f 00 |/ | MOVE.L D0,-(A7) 000229bc 4e ba fa ea |N | JSR 0x224a8 000229c0 58 4f |XO | ADDQ.L #0x4,A7 000229c2 30 39 00 02 50 b0 |09 P | MOVE.W 0x250b0,D0 000229c8 b0 5f | _ | CMP.W (A7)+,D0 000229ca 67 32 |g2 | BEQ 0x229fe 000229cc 9e fc 00 30 | 0 | SUBA.W #0x30,A7 000229d0 20 4f | O | MOVEA.L A7,A0 000229d2 43 fa db 9a |C | LEA.L 0x2056e,A1 000229d6 70 2e |p. | MOVEQ.L #0x2e,D0 000229d8 10 d9 | | MOVE.B (A1)+,(A0)+ 000229da 51 c8 ff fc |Q | DBF D0,0x229d8 000229de 59 4f |YO | SUBQ.L #0x4,A7 000229e0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000229e4 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000229e8 3f 3c 00 2f |?< / | MOVE.W #0x2f,-(A7) 000229ec 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000229f2 50 4f |PO | ADDQ.L #0x8,A7 000229f4 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000229fa de fc 00 34 | 4 | ADDA.W #0x34,A7 000229fe 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022a02 42 90 |B | CLR.L (A0) 00022a04 2f 12 |/ | MOVE.L (A2),-(A7) 00022a06 53 97 |S | SUBQ.L #0x1,(A7) 00022a08 7e 00 |~ | MOVEQ.L #0x00,D7 00022a0a be 97 | | CMP.L (A7),D7 00022a0c 6e 3a |n: | BGT 0x22a48 00022a0e 55 4f |UO | SUBQ.L #0x2,A7 00022a10 2f 13 |/ | MOVE.L (A3),-(A7) 00022a12 df 97 | | ADD.L D7,(A7) 00022a14 4e ba fa 92 |N | JSR 0x224a8 00022a18 58 4f |XO | ADDQ.L #0x4,A7 00022a1a 0c 87 00 00 1f ff | | CMPI.L #0x00001fff,D7 00022a20 63 02 |c | BLS 0x22a24 00022a22 4e 4f |NO | TRAP #15 00022a24 20 07 | | MOVE.L D7,D0 00022a26 e3 80 | | ASL.L #0x1,D0 00022a28 41 f9 00 02 50 88 |A P | LEA.L 0x25088,A0 00022a2e 32 1f |2 | MOVE.W (A7)+,D1 00022a30 b2 70 08 2a | p * | CMP.W (A0+D0.L+#0x2a),D1 00022a34 67 0e |g | BEQ 0x22a44 00022a36 20 12 | | MOVE.L (A2),D0 00022a38 5b 80 |[ | SUBQ.L #0x5,D0 00022a3a be 80 | | CMP.L D0,D7 00022a3c 67 06 |g | BEQ 0x22a44 00022a3e 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022a42 52 90 |R | ADDQ.L #0x1,(A0) 00022a44 52 87 |R | ADDQ.L #0x1,D7 00022a46 68 c2 |h | BVC 0x22a0a 00022a48 58 4f |XO | ADDQ.L #0x4,A7 00022a4a 4c df 0f 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2+A3 00022a4e 4e 5e |N^ | UNLK A6 00022a50 4e 75 |Nu | RTS 00022a52 ; -------------------------------------------------------------------------------------- 00022a52 ; OMSI PASCAL Function 00022a52 ; <LVAR 0x008 4(r)> 00022a52 ; <LVAR -0x004 @ 4(r)> 00022a52 ; -------------------------------------------------------------------------------------- 00022a52 4e 56 ff 94 |NV | LINK.W A6,#0xff94 00022a56 bf d5 | | CMPA.L (A5),A7 00022a58 62 06 |b | BHI 0x22a60 00022a5a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022a5e 4e 76 |Nv | TRAPV 00022a60 de fc 00 60 | ` | ADDA.W #0x60,A7 00022a64 48 e7 fb f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7) 00022a68 45 f9 00 02 50 a8 |E P | LEA.L 0x250a8,A2 00022a6e 47 f9 00 02 50 ac |G P | LEA.L 0x250ac,A3 00022a74 49 f9 00 02 50 88 |I P | LEA.L 0x25088,A4 00022a7a 24 3c 00 00 1f ff |$< | MOVE.L #0x1fff,D2 00022a80 36 3c 00 ff |6< | MOVE.W #0xff,D3 00022a84 78 07 |x | MOVEQ.L #0x07,D4 00022a86 30 39 00 02 50 b0 |09 P | MOVE.W 0x250b0,D0 00022a8c 04 40 00 50 | @ P | SUBI.W #0x0050,D0 00022a90 48 c0 |H | EXTW.L D0 00022a92 2f 00 |/ | MOVE.L D0,-(A7) 00022a94 48 6e ff fc |Hn | PEA.L (A6-0x4) 00022a98 4e b9 00 02 4e 0a |N N | JSR 0x24e0a 00022a9e 50 4f |PO | ADDQ.L #0x8,A7 00022aa0 4a ae ff fc |J | TST.L (A6-0x4) 00022aa4 67 42 |gB | BEQ 0x22ae8 00022aa6 9e fc 00 1c | | SUBA.W #0x1c,A7 00022aaa 20 4f | O | MOVEA.L A7,A0 00022aac 43 fa da f0 |C | LEA.L 0x2059e,A1 00022ab0 70 1a |p | MOVEQ.L #0x1a,D0 00022ab2 10 d9 | | MOVE.B (A1)+,(A0)+ 00022ab4 51 c8 ff fc |Q | DBF D0,0x22ab2 00022ab8 51 4f |QO | SUBQ.L #0x8,A7 00022aba 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022abe 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022ac2 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 00022ac6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022acc 2e ae ff fc |. | MOVE.L (A6-0x4),(A7) 00022ad0 4e ba e5 48 |N H | JSR 0x2101a 00022ad4 58 4f |XO | ADDQ.L #0x4,A7 00022ad6 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022adc 50 4f |PO | ADDQ.L #0x8,A7 00022ade 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022ae4 de fc 00 20 | | ADDA.W #0x20,A7 00022ae8 59 4f |YO | SUBQ.L #0x4,A7 00022aea 4e b9 00 02 4d 8c |N M | JSR 0x24d8c 00022af0 2c 1f |, | MOVE.L (A7)+,D6 00022af2 bc 92 | | CMP.L (A2),D6 00022af4 65 38 |e8 | BCS 0x22b2e 00022af6 20 12 | | MOVE.L (A2),D0 00022af8 d0 93 | | ADD.L (A3),D0 00022afa bc 80 | | CMP.L D0,D6 00022afc 62 30 |b0 | BHI 0x22b2e 00022afe 7e 00 |~ | MOVEQ.L #0x00,D7 00022b00 20 06 | | MOVE.L D6,D0 00022b02 d0 87 | | ADD.L D7,D0 00022b04 22 00 |" | MOVE.L D0,D1 00022b06 c2 82 | | AND.L D2,D1 00022b08 b2 82 | | CMP.L D2,D1 00022b0a 63 02 |c | BLS 0x22b0e 00022b0c 4e 4f |NO | TRAP #15 00022b0e e3 81 | | ASL.L #0x1,D1 00022b10 20 4c | L | MOVEA.L A4,A0 00022b12 55 4f |UO | SUBQ.L #0x2,A7 00022b14 2f 00 |/ | MOVE.L D0,-(A7) 00022b16 4e ba f9 90 |N | JSR 0x224a8 00022b1a 58 4f |XO | ADDQ.L #0x4,A7 00022b1c 30 1f |0 | MOVE.W (A7)+,D0 00022b1e 41 83 |A | CHK.W D3,D0 00022b20 31 80 18 2a |1 * | MOVE.W D0,(A0+D1.L+#0x2a) 00022b24 52 87 |R | ADDQ.L #0x1,D7 00022b26 0c 87 00 00 00 05 | | CMPI.L #0x00000005,D7 00022b2c 6f d2 |o | BLE 0x22b00 00022b2e 59 4f |YO | SUBQ.L #0x4,A7 00022b30 4e b9 00 02 4d b6 |N M | JSR 0x24db6 00022b36 2c 1f |, | MOVE.L (A7)+,D6 00022b38 bc 92 | | CMP.L (A2),D6 00022b3a 65 34 |e4 | BCS 0x22b70 00022b3c 20 12 | | MOVE.L (A2),D0 00022b3e d0 93 | | ADD.L (A3),D0 00022b40 bc 80 | | CMP.L D0,D6 00022b42 62 2c |b, | BHI 0x22b70 00022b44 7e 00 |~ | MOVEQ.L #0x00,D7 00022b46 20 06 | | MOVE.L D6,D0 00022b48 d0 87 | | ADD.L D7,D0 00022b4a 22 00 |" | MOVE.L D0,D1 00022b4c c2 82 | | AND.L D2,D1 00022b4e b2 82 | | CMP.L D2,D1 00022b50 63 02 |c | BLS 0x22b54 00022b52 4e 4f |NO | TRAP #15 00022b54 e3 81 | | ASL.L #0x1,D1 00022b56 20 4c | L | MOVEA.L A4,A0 00022b58 55 4f |UO | SUBQ.L #0x2,A7 00022b5a 2f 00 |/ | MOVE.L D0,-(A7) 00022b5c 4e ba f9 4a |N J | JSR 0x224a8 00022b60 58 4f |XO | ADDQ.L #0x4,A7 00022b62 30 1f |0 | MOVE.W (A7)+,D0 00022b64 41 83 |A | CHK.W D3,D0 00022b66 31 80 18 2a |1 * | MOVE.W D0,(A0+D1.L+#0x2a) 00022b6a 52 87 |R | ADDQ.L #0x1,D7 00022b6c be 84 | | CMP.L D4,D7 00022b6e 6f d6 |o | BLE 0x22b46 00022b70 59 4f |YO | SUBQ.L #0x4,A7 00022b72 4e b9 00 02 4d e0 |N M | JSR 0x24de0 00022b78 2c 1f |, | MOVE.L (A7)+,D6 00022b7a bc 92 | | CMP.L (A2),D6 00022b7c 65 34 |e4 | BCS 0x22bb2 00022b7e 20 12 | | MOVE.L (A2),D0 00022b80 d0 93 | | ADD.L (A3),D0 00022b82 bc 80 | | CMP.L D0,D6 00022b84 62 2c |b, | BHI 0x22bb2 00022b86 7e 00 |~ | MOVEQ.L #0x00,D7 00022b88 20 06 | | MOVE.L D6,D0 00022b8a d0 87 | | ADD.L D7,D0 00022b8c 22 00 |" | MOVE.L D0,D1 00022b8e c2 82 | | AND.L D2,D1 00022b90 b2 82 | | CMP.L D2,D1 00022b92 63 02 |c | BLS 0x22b96 00022b94 4e 4f |NO | TRAP #15 00022b96 e3 81 | | ASL.L #0x1,D1 00022b98 20 4c | L | MOVEA.L A4,A0 00022b9a 55 4f |UO | SUBQ.L #0x2,A7 00022b9c 2f 00 |/ | MOVE.L D0,-(A7) 00022b9e 4e ba f9 08 |N | JSR 0x224a8 00022ba2 58 4f |XO | ADDQ.L #0x4,A7 00022ba4 30 1f |0 | MOVE.W (A7)+,D0 00022ba6 41 83 |A | CHK.W D3,D0 00022ba8 31 80 18 2a |1 * | MOVE.W D0,(A0+D1.L+#0x2a) 00022bac 52 87 |R | ADDQ.L #0x1,D7 00022bae be 84 | | CMP.L D4,D7 00022bb0 6f d6 |o | BLE 0x22b88 00022bb2 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022bb6 48 50 |HP | PEA.L (A0) 00022bb8 4e ba fd d6 |N | JSR 0x22990 00022bbc 58 4f |XO | ADDQ.L #0x4,A7 00022bbe 4c df 1f df |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2+A3+A4 00022bc2 4e 5e |N^ | UNLK A6 00022bc4 4e 75 |Nu | RTS 00022bc6 ; -------------------------------------------------------------------------------------- 00022bc6 ; OMSI PASCAL Function 00022bc6 ; <LVAR 0x00a 4(r)> 00022bc6 ; <LVAR 0x008 2(r)> 00022bc6 ; <LVAR -0x006 @ 4(r)> 00022bc6 ; -------------------------------------------------------------------------------------- 00022bc6 4e 56 ff 9e |NV | LINK.W A6,#0xff9e 00022bca bf d5 | | CMPA.L (A5),A7 00022bcc 62 06 |b | BHI 0x22bd4 00022bce 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022bd2 4e 76 |Nv | TRAPV 00022bd4 de fc 00 5c | \ | ADDA.W #0x5c,A7 00022bd8 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00022bdc 45 ee ff fa |E | LEA.L (A6-0x6),A2 00022be0 72 01 |r | MOVEQ.L #0x01,D1 00022be2 2f 2e 00 0a |/. | MOVE.L (A6+0xa),-(A7) 00022be6 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00022bea 48 c0 |H | EXTW.L D0 00022bec 2f 00 |/ | MOVE.L D0,-(A7) 00022bee 1f 01 | | MOVE.B D1,-(A7) 00022bf0 4e ba f6 88 |N | JSR 0x2227a 00022bf4 de fc 00 0a | | ADDA.W #0xa,A7 00022bf8 4e ba fc 90 |N | JSR 0x2288a 00022bfc 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00022c00 0c 40 00 50 | @ P | CMPI.W #0x0050,D0 00022c04 6c 08 |l | BGE 0x22c0e 00022c06 48 52 |HR | PEA.L (A2) 00022c08 4e ba fd 86 |N | JSR 0x22990 00022c0c 60 06 |` | BRA 0x22c14 00022c0e 48 52 |HR | PEA.L (A2) 00022c10 4e ba fe 40 |N @ | JSR 0x22a52 00022c14 58 4f |XO | ADDQ.L #0x4,A7 00022c16 4a 92 |J | TST.L (A2) 00022c18 66 32 |f2 | BNE 0x22c4c 00022c1a 9e fc 00 14 | | SUBA.W #0x14,A7 00022c1e 20 4f | O | MOVEA.L A7,A0 00022c20 43 fa d9 98 |C | LEA.L 0x205ba,A1 00022c24 70 12 |p | MOVEQ.L #0x12,D0 00022c26 10 d9 | | MOVE.B (A1)+,(A0)+ 00022c28 51 c8 ff fc |Q | DBF D0,0x22c26 00022c2c 59 4f |YO | SUBQ.L #0x4,A7 00022c2e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022c32 3f 01 |? | MOVE.W D1,-(A7) 00022c34 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00022c38 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022c3e 50 4f |PO | ADDQ.L #0x8,A7 00022c40 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022c46 de fc 00 18 | | ADDA.W #0x18,A7 00022c4a 60 3a |`: | BRA 0x22c86 00022c4c 41 fa d9 b0 |A | LEA.L 0x205fe,A0 00022c50 70 0b |p | MOVEQ.L #0x0b,D0 00022c52 2f 20 |/ | MOVE.L -(A0),-(A7) 00022c54 51 c8 ff fc |Q | DBF D0,0x22c52 00022c58 51 4f |QO | SUBQ.L #0x8,A7 00022c5a 2f 12 |/ | MOVE.L (A2),-(A7) 00022c5c 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00022c62 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00022c66 3f 01 |? | MOVE.W D1,-(A7) 00022c68 3f 3c 00 30 |?< 0 | MOVE.W #0x30,-(A7) 00022c6c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022c72 50 4f |PO | ADDQ.L #0x8,A7 00022c74 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022c7a 50 4f |PO | ADDQ.L #0x8,A7 00022c7c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022c82 de fc 00 34 | 4 | ADDA.W #0x34,A7 00022c86 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00022c8c 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00022c90 4e 5e |N^ | UNLK A6 00022c92 4e 75 |Nu | RTS 00022c94 ; -------------------------------------------------------------------------------------- 00022c94 ; OMSI PASCAL Function 00022c94 ; <LVAR 0x008 2(r)> 00022c94 ; <LVAR -0x006 @> 00022c94 ; <LVAR -0x00a @ 4(r)> 00022c94 ; -------------------------------------------------------------------------------------- 00022c94 4e 56 ff d6 |NV | LINK.W A6,#0xffd6 ; Spelunked 00022c98 bf d5 | | CMPA.L (A5),A7 00022c9a 62 06 |b | BHI 0x22ca2 00022c9c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022ca0 4e 76 |Nv | TRAPV 00022ca2 de fc 00 20 | | ADDA.W #0x20,A7 00022ca6 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7) 00022caa 48 6e ff fa |Hn | PEA.L (A6-0x6) 00022cae 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00022cb2 4e ba e6 d4 |N | JSR 0x21388 00022cb6 5c 4f |\O | ADDQ.L #0x6,A7 00022cb8 2e ba d9 48 |. H | MOVE.L 0x20602,(A7) 00022cbc 2f 3a d9 40 |/: @ | MOVE.L 0x205fe,-(A7) 00022cc0 59 4f |YO | SUBQ.L #0x4,A7 00022cc2 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 00022cc6 59 4f |YO | SUBQ.L #0x4,A7 00022cc8 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00022ccc 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022cd0 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00022cd4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022cda 50 4f |PO | ADDQ.L #0x8,A7 00022cdc 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022ce2 50 4f |PO | ADDQ.L #0x8,A7 00022ce4 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00022cea 50 4f |PO | ADDQ.L #0x8,A7 00022cec 2e 94 |. | MOVE.L (A4),(A7) 00022cee 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7) 00022cf2 4e ba fe d2 |N | JSR 0x22bc6 00022cf6 5c 4f |\O | ADDQ.L #0x6,A7 00022cf8 4e 5e |N^ | UNLK A6 00022cfa 4e 75 |Nu | RTS 00022cfc ; -------------------------------------------------------------------------------------- 00022cfc ; OMSI PASCAL Function 00022cfc ; <LVAR 0x008 1(r)> 00022cfc ; <LVAR -0x006 @ 4(rw)> 00022cfc ; <LVAR -0x00a @ 4(rw)> 00022cfc ; -------------------------------------------------------------------------------------- 00022cfc 4e 56 ff 98 |NV | LINK.W A6,#0xff98 00022d00 bf d5 | | CMPA.L (A5),A7 00022d02 62 06 |b | BHI 0x22d0a 00022d04 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022d08 4e 76 |Nv | TRAPV 00022d0a de fc 00 5e | ^ | ADDA.W #0x5e,A7 00022d0e 48 e7 f0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7) 00022d12 45 ee ff f6 |E | LEA.L (A6-0xa),A2 00022d16 47 fa ff 7c |G | | LEA.L 0x22c94,A3 00022d1a 72 01 |r | MOVEQ.L #0x01,D1 00022d1c 74 0c |t | MOVEQ.L #0x0c,D2 00022d1e 76 15 |v | MOVEQ.L #0x15,D3 00022d20 4a 2e 00 08 |J. | TST.B (A6+0x8) 00022d24 67 08 |g | BEQ 0x22d2e 00022d26 24 b9 00 02 90 b8 |$ | MOVE.L 0x290b8,(A2) 00022d2c 60 06 |` | BRA 0x22d34 00022d2e 24 b9 00 02 90 b4 |$ | MOVE.L 0x290b4,(A2) 00022d34 9e fc 00 16 | | SUBA.W #0x16,A7 00022d38 20 4f | O | MOVEA.L A7,A0 00022d3a 43 fa d8 ca |C | LEA.L 0x20606,A1 00022d3e 70 14 |p | MOVEQ.L #0x14,D0 00022d40 10 d9 | | MOVE.B (A1)+,(A0)+ 00022d42 51 c8 ff fc |Q | DBF D0,0x22d40 00022d46 2f 3a d8 d4 |/: | MOVE.L 0x2061c,-(A7) 00022d4a 9e c2 | | SUBA.W D2,A7 00022d4c 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00022d50 3f 01 |? | MOVE.W D1,-(A7) 00022d52 3f 03 |? | MOVE.W D3,-(A7) 00022d54 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022d5a 2e 92 |. | MOVE.L (A2),(A7) 00022d5c 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00022d62 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00022d66 3f 01 |? | MOVE.W D1,-(A7) 00022d68 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00022d6c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022d72 50 4f |PO | ADDQ.L #0x8,A7 00022d74 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00022d7a de c2 | | ADDA.W D2,A7 00022d7c 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00022d82 58 4f |XO | ADDQ.L #0x4,A7 00022d84 2d 5f ff fa |-_ | MOVE.L (A7)+,(A6-0x6) 00022d88 de fc 00 1a | | ADDA.W #0x1a,A7 00022d8c 20 6e ff fa | n | MOVEA.L (A6-0x6),A0 00022d90 30 10 |0 | MOVE.W (A0),D0 00022d92 b0 41 | A | CMP.W D1,D0 00022d94 6f 06 |o | BLE 0x22d9c 00022d96 24 ae ff fa |$ | MOVE.L (A6-0x6),(A2) 00022d9a 60 0c |` | BRA 0x22da8 00022d9c 48 6e ff fa |Hn | PEA.L (A6-0x6) 00022da0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022da6 58 4f |XO | ADDQ.L #0x4,A7 00022da8 4a 2e 00 08 |J. | TST.B (A6+0x8) 00022dac 67 1e |g | BEQ 0x22dcc 00022dae 3f 3c 00 50 |?< P | MOVE.W #0x50,-(A7) 00022db2 28 4a |(J | MOVEA.L A2,A4 00022db4 4e 93 |N | JSR (A3) 00022db6 3e bc 00 51 |> Q | MOVE.W #0x51,(A7) 00022dba 28 4a |(J | MOVEA.L A2,A4 00022dbc 4e 93 |N | JSR (A3) 00022dbe 3e bc 00 52 |> R | MOVE.W #0x52,(A7) 00022dc2 28 4a |(J | MOVEA.L A2,A4 00022dc4 4e 93 |N | JSR (A3) 00022dc6 3e bc 00 53 |> S | MOVE.W #0x53,(A7) 00022dca 60 1a |` | BRA 0x22de6 00022dcc 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 00022dd0 28 4a |(J | MOVEA.L A2,A4 00022dd2 4e 93 |N | JSR (A3) 00022dd4 3e bc 00 19 |> | MOVE.W #0x19,(A7) 00022dd8 28 4a |(J | MOVEA.L A2,A4 00022dda 4e 93 |N | JSR (A3) 00022ddc 3e bc 00 17 |> | MOVE.W #0x17,(A7) 00022de0 28 4a |(J | MOVEA.L A2,A4 00022de2 4e 93 |N | JSR (A3) 00022de4 3e 83 |> | MOVE.W D3,(A7) 00022de6 28 4a |(J | MOVEA.L A2,A4 00022de8 4e 93 |N | JSR (A3) 00022dea 54 4f |TO | ADDQ.L #0x2,A7 00022dec 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00022df2 4c df 1f 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4 00022df6 4e 5e |N^ | UNLK A6 00022df8 4e 75 |Nu | RTS 00022dfa ; -------------------------------------------------------------------------------------- 00022dfa ; OMSI PASCAL Function 00022dfa ; -------------------------------------------------------------------------------------- 00022dfa 4e 56 ff 50 |NV P | LINK.W A6,#0xff50 00022dfe bf d5 | | CMPA.L (A5),A7 00022e00 62 06 |b | BHI 0x22e08 00022e02 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022e06 4e 76 |Nv | TRAPV 00022e08 de fc 00 a8 | | ADDA.W #0xa8,A7 00022e0c 48 e7 fb f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D4+D3+D2+D1+D0,-(A7) 00022e10 45 f9 00 02 50 a8 |E P | LEA.L 0x250a8,A2 00022e16 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00022e1c 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 00022e22 74 01 |t | MOVEQ.L #0x01,D2 00022e24 76 0a |v | MOVEQ.L #0x0a,D3 00022e26 78 42 |xB | MOVEQ.L #0x42,D4 00022e28 2f 39 00 02 50 ac |/9 P | MOVE.L 0x250ac,-(A7) 00022e2e 7c 00 || | MOVEQ.L #0x00,D6 00022e30 bc 97 | | CMP.L (A7),D6 00022e32 6e 00 01 96 |n | BGT 0x22fca 00022e36 55 4f |UO | SUBQ.L #0x2,A7 00022e38 2f 12 |/ | MOVE.L (A2),-(A7) 00022e3a dd 97 | | ADD.L D6,(A7) 00022e3c 4e ba f6 6a |N j | JSR 0x224a8 00022e40 58 4f |XO | ADDQ.L #0x4,A7 00022e42 0c 86 00 00 1f ff | | CMPI.L #0x00001fff,D6 00022e48 63 02 |c | BLS 0x22e4c 00022e4a 4e 4f |NO | TRAP #15 00022e4c 20 06 | | MOVE.L D6,D0 00022e4e e3 80 | | ASL.L #0x1,D0 00022e50 41 f9 00 02 50 88 |A P | LEA.L 0x25088,A0 00022e56 32 1f |2 | MOVE.W (A7)+,D1 00022e58 b2 70 08 2a | p * | CMP.W (A0+D0.L+#0x2a),D1 00022e5c 67 00 01 66 |g f | BEQ 0x22fc4 00022e60 20 39 00 02 50 ac | 9 P | MOVE.L 0x250ac,D0 00022e66 5b 80 |[ | SUBQ.L #0x5,D0 00022e68 bc 80 | | CMP.L D0,D6 00022e6a 67 00 01 58 |g X | BEQ 0x22fc4 00022e6e 7e 00 |~ | MOVEQ.L #0x00,D7 00022e70 0c 86 00 00 1f ff | | CMPI.L #0x00001fff,D6 00022e76 63 02 |c | BLS 0x22e7a 00022e78 4e 4f |NO | TRAP #15 00022e7a 20 06 | | MOVE.L D6,D0 00022e7c e3 80 | | ASL.L #0x1,D0 00022e7e 41 f9 00 02 50 88 |A P | LEA.L 0x25088,A0 00022e84 2f 12 |/ | MOVE.L (A2),-(A7) 00022e86 dd 97 | | ADD.L D6,(A7) 00022e88 3f 30 08 2a |?0 * | MOVE.W (A0+D0.L+#0x2a),-(A7) 00022e8c 4e ba f6 5a |N Z | JSR 0x224e8 00022e90 5c 4f |\O | ADDQ.L #0x6,A7 00022e92 52 87 |R | ADDQ.L #0x1,D7 00022e94 55 4f |UO | SUBQ.L #0x2,A7 00022e96 2f 12 |/ | MOVE.L (A2),-(A7) 00022e98 dd 97 | | ADD.L D6,(A7) 00022e9a 4e ba f6 0c |N | JSR 0x224a8 00022e9e 58 4f |XO | ADDQ.L #0x4,A7 00022ea0 32 1f |2 | MOVE.W (A7)+,D1 00022ea2 b2 70 08 2a | p * | CMP.W (A0+D0.L+#0x2a),D1 00022ea6 67 04 |g | BEQ 0x22eac 00022ea8 be 83 | | CMP.L D3,D7 00022eaa 66 c4 |f | BNE 0x22e70 00022eac 55 4f |UO | SUBQ.L #0x2,A7 00022eae 2f 12 |/ | MOVE.L (A2),-(A7) 00022eb0 dd 97 | | ADD.L D6,(A7) 00022eb2 4e ba f5 f4 |N | JSR 0x224a8 00022eb6 58 4f |XO | ADDQ.L #0x4,A7 00022eb8 32 1f |2 | MOVE.W (A7)+,D1 00022eba b2 70 08 2a | p * | CMP.W (A0+D0.L+#0x2a),D1 00022ebe 67 00 01 04 |g | BEQ 0x22fc4 00022ec2 43 fa d7 82 |C | LEA.L 0x20646,A1 00022ec6 72 12 |r | MOVEQ.L #0x12,D1 00022ec8 3f 21 |?! | MOVE.W -(A1),-(A7) 00022eca 51 c9 ff fc |Q | DBF D1,0x22ec8 00022ece 43 fa d7 80 |C | LEA.L 0x20650,A1 00022ed2 72 04 |r | MOVEQ.L #0x04,D1 00022ed4 3f 21 |?! | MOVE.W -(A1),-(A7) 00022ed6 51 c9 ff fc |Q | DBF D1,0x22ed4 00022eda 43 fa d7 82 |C | LEA.L 0x2065e,A1 00022ede 72 06 |r | MOVEQ.L #0x06,D1 00022ee0 3f 21 |?! | MOVE.W -(A1),-(A7) 00022ee2 51 c9 ff fc |Q | DBF D1,0x22ee0 00022ee6 51 4f |QO | SUBQ.L #0x8,A7 00022ee8 48 6f 00 20 |Ho | PEA.L (A7+0x20) 00022eec 3f 02 |? | MOVE.W D2,-(A7) 00022eee 3f 3c 00 26 |?< & | MOVE.W #0x26,-(A7) 00022ef2 4e 93 |N | JSR (A3) 00022ef4 2e 92 |. | MOVE.L (A2),(A7) 00022ef6 dd 97 | | ADD.L D6,(A7) 00022ef8 48 78 00 08 |Hx | PEA.L 0x8 00022efc 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00022f02 58 4f |XO | ADDQ.L #0x4,A7 00022f04 48 6f 00 1e |Ho | PEA.L (A7+0x1e) 00022f08 3f 02 |? | MOVE.W D2,-(A7) 00022f0a 3f 03 |? | MOVE.W D3,-(A7) 00022f0c 4e 93 |N | JSR (A3) 00022f0e 58 4f |XO | ADDQ.L #0x4,A7 00022f10 32 30 08 2a |20 * | MOVE.W (A0+D0.L+#0x2a),D1 00022f14 48 c1 |H | EXTW.L D1 00022f16 2f 01 |/ | MOVE.L D1,-(A7) 00022f18 48 78 00 02 |Hx | PEA.L 0x2 00022f1c 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00022f22 58 4f |XO | ADDQ.L #0x4,A7 00022f24 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00022f28 3f 02 |? | MOVE.W D2,-(A7) 00022f2a 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00022f2e 4e 93 |N | JSR (A3) 00022f30 55 4f |UO | SUBQ.L #0x2,A7 00022f32 2f 12 |/ | MOVE.L (A2),-(A7) 00022f34 dd 97 | | ADD.L D6,(A7) 00022f36 4e ba f5 70 |N p | JSR 0x224a8 00022f3a 58 4f |XO | ADDQ.L #0x4,A7 00022f3c 30 1f |0 | MOVE.W (A7)+,D0 00022f3e 48 c0 |H | EXTW.L D0 00022f40 2e 80 |. | MOVE.L D0,(A7) 00022f42 48 78 00 02 |Hx | PEA.L 0x2 00022f46 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00022f4c 50 4f |PO | ADDQ.L #0x8,A7 00022f4e 4e b9 00 01 02 e0 |N | JSR StringCat6(a, b, c, d, e, f : String) : String 00022f54 de fc 00 18 | | ADDA.W #0x18,A7 00022f58 4e 94 |N | JSR (A4) 00022f5a de c4 | | ADDA.W D4,A7 00022f5c 41 fa d7 30 |A 0 | LEA.L 0x2068e,A0 00022f60 70 0b |p | MOVEQ.L #0x0b,D0 00022f62 2f 20 |/ | MOVE.L -(A0),-(A7) 00022f64 51 c8 ff fc |Q | DBF D0,0x22f62 00022f68 59 4f |YO | SUBQ.L #0x4,A7 00022f6a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022f6e 3f 02 |? | MOVE.W D2,-(A7) 00022f70 3f 3c 00 30 |?< 0 | MOVE.W #0x30,-(A7) 00022f74 4e 93 |N | JSR (A3) 00022f76 50 4f |PO | ADDQ.L #0x8,A7 00022f78 4e 94 |N | JSR (A4) 00022f7a de fc 00 34 | 4 | ADDA.W #0x34,A7 00022f7e 41 fa d7 50 |A P | LEA.L 0x206d0,A0 00022f82 70 20 |p | MOVEQ.L #0x20,D0 00022f84 3f 20 |? | MOVE.W -(A0),-(A7) 00022f86 51 c8 ff fc |Q | DBF D0,0x22f84 00022f8a 59 4f |YO | SUBQ.L #0x4,A7 00022f8c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022f90 3f 02 |? | MOVE.W D2,-(A7) 00022f92 3f 04 |? | MOVE.W D4,-(A7) 00022f94 4e 93 |N | JSR (A3) 00022f96 50 4f |PO | ADDQ.L #0x8,A7 00022f98 4e 94 |N | JSR (A4) 00022f9a de fc 00 2c | , | ADDA.W #0x2c,A7 00022f9e 20 4f | O | MOVEA.L A7,A0 00022fa0 43 fa d7 2e |C . | LEA.L 0x206d0,A1 00022fa4 70 18 |p | MOVEQ.L #0x18,D0 00022fa6 10 d9 | | MOVE.B (A1)+,(A0)+ 00022fa8 51 c8 ff fc |Q | DBF D0,0x22fa6 00022fac 59 4f |YO | SUBQ.L #0x4,A7 00022fae 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022fb2 3f 02 |? | MOVE.W D2,-(A7) 00022fb4 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00022fb8 4e 93 |N | JSR (A3) 00022fba 50 4f |PO | ADDQ.L #0x8,A7 00022fbc 4e ba e1 d6 |N | JSR 0x21194 00022fc0 de fc 00 1e | | ADDA.W #0x1e,A7 00022fc4 52 86 |R | ADDQ.L #0x1,D6 00022fc6 68 00 fe 68 |h h | BVC 0x22e30 00022fca 58 4f |XO | ADDQ.L #0x4,A7 00022fcc 4a 39 00 02 50 96 |J9 P | TST.B 0x25096 00022fd2 67 2a |g* | BEQ 0x22ffe 00022fd4 9e fc 00 1c | | SUBA.W #0x1c,A7 00022fd8 20 4f | O | MOVEA.L A7,A0 00022fda 43 fa d7 0e |C | LEA.L 0x206ea,A1 00022fde 70 1a |p | MOVEQ.L #0x1a,D0 00022fe0 10 d9 | | MOVE.B (A1)+,(A0)+ 00022fe2 51 c8 ff fc |Q | DBF D0,0x22fe0 00022fe6 59 4f |YO | SUBQ.L #0x4,A7 00022fe8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022fec 3f 02 |? | MOVE.W D2,-(A7) 00022fee 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 00022ff2 4e 93 |N | JSR (A3) 00022ff4 50 4f |PO | ADDQ.L #0x8,A7 00022ff6 4e 94 |N | JSR (A4) 00022ff8 de fc 00 20 | | ADDA.W #0x20,A7 00022ffc 60 28 |`( | BRA 0x23026 00022ffe 9e fc 00 2a | * | SUBA.W #0x2a,A7 00023002 20 4f | O | MOVEA.L A7,A0 00023004 43 fa d7 00 |C | LEA.L 0x20706,A1 00023008 70 28 |p( | MOVEQ.L #0x28,D0 0002300a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002300c 51 c8 ff fc |Q | DBF D0,0x2300a 00023010 59 4f |YO | SUBQ.L #0x4,A7 00023012 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023016 3f 02 |? | MOVE.W D2,-(A7) 00023018 3f 3c 00 29 |?< ) | MOVE.W #0x29,-(A7) 0002301c 4e 93 |N | JSR (A3) 0002301e 50 4f |PO | ADDQ.L #0x8,A7 00023020 4e 94 |N | JSR (A4) 00023022 de fc 00 2e | . | ADDA.W #0x2e,A7 00023026 4c df 1f df |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D6+D7+A0+A1+A2+A3+A4 0002302a 4e 5e |N^ | UNLK A6 0002302c 4e 75 |Nu | RTS 0002302e ; -------------------------------------------------------------------------------------- 0002302e ; OMSI PASCAL Function 0002302e ; <LVAR -0x004 1(rw)> 0002302e ; <LVAR -0x008 4(rw)> 0002302e ; <LVAR -0x00c @ 4(r)> 0002302e ; <LVAR -0x010 4(rw)> 0002302e ; <LVAR -0x014 4(rw)> 0002302e ; <LVAR -0x02a 2(rw)> 0002302e ; <LVAR -0x030 2(rw)> 0002302e ; -------------------------------------------------------------------------------------- 0002302e 4e 56 ff 28 |NV ( | LINK.W A6,#0xff28 00023032 bf d5 | | CMPA.L (A5),A7 00023034 62 06 |b | BHI 0x2303c 00023036 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002303a 4e 76 |Nv | TRAPV 0002303c de fc 00 88 | | ADDA.W #0x88,A7 00023040 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00023044 45 f9 00 02 50 a8 |E P | LEA.L 0x250a8,A2 0002304a 47 f9 00 02 50 ac |G P | LEA.L 0x250ac,A3 00023050 49 f9 00 01 02 c4 |I | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A4 00023056 74 07 |t | MOVEQ.L #0x07,D2 00023058 59 4f |YO | SUBQ.L #0x4,A7 0002305a 4e b9 00 02 4d 8c |N M | JSR 0x24d8c 00023060 2c 1f |, | MOVE.L (A7)+,D6 00023062 67 2e |g. | BEQ 0x23092 00023064 7e 00 |~ | MOVEQ.L #0x00,D7 00023066 be 82 | | CMP.L D2,D7 00023068 63 02 |c | BLS 0x2306c 0002306a 4e 4f |NO | TRAP #15 0002306c 20 07 | | MOVE.L D7,D0 0002306e e3 80 | | ASL.L #0x1,D0 00023070 55 4f |UO | SUBQ.L #0x2,A7 00023072 2f 06 |/ | MOVE.L D6,-(A7) 00023074 df 97 | | ADD.L D7,(A7) 00023076 4e ba f4 30 |N 0 | JSR 0x224a8 0002307a 58 4f |XO | ADDQ.L #0x4,A7 0002307c 32 1f |2 | MOVE.W (A7)+,D1 0002307e 43 bc 00 ff |C | CHK.W #0xff,D1 00023082 3d 81 08 b8 |= | MOVE.W D1,(A6+D0.L-#0x48) 00023086 52 87 |R | ADDQ.L #0x1,D7 00023088 0c 87 00 00 00 05 | | CMPI.L #0x00000005,D7 0002308e 6f d6 |o | BLE 0x23066 00023090 60 1a |` | BRA 0x230ac 00023092 7e 00 |~ | MOVEQ.L #0x00,D7 00023094 be 82 | | CMP.L D2,D7 00023096 63 02 |c | BLS 0x2309a 00023098 4e 4f |NO | TRAP #15 0002309a 20 07 | | MOVE.L D7,D0 0002309c e3 80 | | ASL.L #0x1,D0 0002309e 42 76 08 b8 |Bv | CLR.W (A6+D0.L-#0x48) 000230a2 52 87 |R | ADDQ.L #0x1,D7 000230a4 0c 87 00 00 00 05 | | CMPI.L #0x00000005,D7 000230aa 6f e8 |o | BLE 0x23094 000230ac 59 4f |YO | SUBQ.L #0x4,A7 000230ae 4e b9 00 02 4d b6 |N M | JSR 0x24db6 000230b4 2c 1f |, | MOVE.L (A7)+,D6 000230b6 67 2a |g* | BEQ 0x230e2 000230b8 7e 00 |~ | MOVEQ.L #0x00,D7 000230ba be 82 | | CMP.L D2,D7 000230bc 63 02 |c | BLS 0x230c0 000230be 4e 4f |NO | TRAP #15 000230c0 20 07 | | MOVE.L D7,D0 000230c2 e3 80 | | ASL.L #0x1,D0 000230c4 55 4f |UO | SUBQ.L #0x2,A7 000230c6 2f 06 |/ | MOVE.L D6,-(A7) 000230c8 df 97 | | ADD.L D7,(A7) 000230ca 4e ba f3 dc |N | JSR 0x224a8 000230ce 58 4f |XO | ADDQ.L #0x4,A7 000230d0 32 1f |2 | MOVE.W (A7)+,D1 000230d2 43 bc 00 ff |C | CHK.W #0xff,D1 000230d6 3d 81 08 c8 |= | MOVE.W D1,(A6+D0.L-#0x38) 000230da 52 87 |R | ADDQ.L #0x1,D7 000230dc be 82 | | CMP.L D2,D7 000230de 6f da |o | BLE 0x230ba 000230e0 60 16 |` | BRA 0x230f8 000230e2 7e 00 |~ | MOVEQ.L #0x00,D7 000230e4 be 82 | | CMP.L D2,D7 000230e6 63 02 |c | BLS 0x230ea 000230e8 4e 4f |NO | TRAP #15 000230ea 20 07 | | MOVE.L D7,D0 000230ec e3 80 | | ASL.L #0x1,D0 000230ee 42 76 08 c8 |Bv | CLR.W (A6+D0.L-#0x38) 000230f2 52 87 |R | ADDQ.L #0x1,D7 000230f4 be 82 | | CMP.L D2,D7 000230f6 6f ec |o | BLE 0x230e4 000230f8 59 4f |YO | SUBQ.L #0x4,A7 000230fa 4e b9 00 02 4d e0 |N M | JSR 0x24de0 00023100 2c 1f |, | MOVE.L (A7)+,D6 00023102 67 2a |g* | BEQ 0x2312e 00023104 7e 00 |~ | MOVEQ.L #0x00,D7 00023106 be 82 | | CMP.L D2,D7 00023108 63 02 |c | BLS 0x2310c 0002310a 4e 4f |NO | TRAP #15 0002310c 20 07 | | MOVE.L D7,D0 0002310e e3 80 | | ASL.L #0x1,D0 00023110 55 4f |UO | SUBQ.L #0x2,A7 00023112 2f 06 |/ | MOVE.L D6,-(A7) 00023114 df 97 | | ADD.L D7,(A7) 00023116 4e ba f3 90 |N | JSR 0x224a8 0002311a 58 4f |XO | ADDQ.L #0x4,A7 0002311c 32 1f |2 | MOVE.W (A7)+,D1 0002311e 43 bc 00 ff |C | CHK.W #0xff,D1 00023122 3d 81 08 d8 |= | MOVE.W D1,(A6+D0.L-#0x28) 00023126 52 87 |R | ADDQ.L #0x1,D7 00023128 be 82 | | CMP.L D2,D7 0002312a 6f da |o | BLE 0x23106 0002312c 60 16 |` | BRA 0x23144 0002312e 7e 00 |~ | MOVEQ.L #0x00,D7 00023130 be 82 | | CMP.L D2,D7 00023132 63 02 |c | BLS 0x23136 00023134 4e 4f |NO | TRAP #15 00023136 20 07 | | MOVE.L D7,D0 00023138 e3 80 | | ASL.L #0x1,D0 0002313a 42 76 08 d8 |Bv | CLR.W (A6+D0.L-#0x28) 0002313e 52 87 |R | ADDQ.L #0x1,D7 00023140 be 82 | | CMP.L D2,D7 00023142 6f ec |o | BLE 0x23130 00023144 2f 13 |/ | MOVE.L (A3),-(A7) 00023146 7e 00 |~ | MOVEQ.L #0x00,D7 00023148 be 97 | | CMP.L (A7),D7 0002314a 6e 26 |n& | BGT 0x23172 0002314c 2f 12 |/ | MOVE.L (A2),-(A7) 0002314e df 97 | | ADD.L D7,(A7) 00023150 0c 87 00 00 1f ff | | CMPI.L #0x00001fff,D7 00023156 63 02 |c | BLS 0x2315a 00023158 4e 4f |NO | TRAP #15 0002315a 20 07 | | MOVE.L D7,D0 0002315c e3 80 | | ASL.L #0x1,D0 0002315e 41 f9 00 02 50 88 |A P | LEA.L 0x25088,A0 00023164 3f 30 08 2a |?0 * | MOVE.W (A0+D0.L+#0x2a),-(A7) 00023168 4e ba f3 e2 |N | JSR 0x2254c 0002316c 5c 4f |\O | ADDQ.L #0x6,A7 0002316e 52 87 |R | ADDQ.L #0x1,D7 00023170 68 d6 |h | BVC 0x23148 00023172 4e b9 00 02 4d 8c |N M | JSR 0x24d8c 00023178 2c 1f |, | MOVE.L (A7)+,D6 0002317a bc 92 | | CMP.L (A2),D6 0002317c 65 32 |e2 | BCS 0x231b0 0002317e 20 12 | | MOVE.L (A2),D0 00023180 d0 93 | | ADD.L (A3),D0 00023182 bc 80 | | CMP.L D0,D6 00023184 62 2a |b* | BHI 0x231b0 00023186 7e 00 |~ | MOVEQ.L #0x00,D7 00023188 2f 06 |/ | MOVE.L D6,-(A7) 0002318a df 97 | | ADD.L D7,(A7) 0002318c be 82 | | CMP.L D2,D7 0002318e 63 02 |c | BLS 0x23192 00023190 4e 4f |NO | TRAP #15 00023192 20 07 | | MOVE.L D7,D0 00023194 e3 80 | | ASL.L #0x1,D0 00023196 30 36 08 b8 |06 | MOVE.W (A6+D0.L-#0x48),D0 0002319a 41 bc 00 ff |A | CHK.W #0xff,D0 0002319e 3f 00 |? | MOVE.W D0,-(A7) 000231a0 4e ba f3 aa |N | JSR 0x2254c 000231a4 5c 4f |\O | ADDQ.L #0x6,A7 000231a6 52 87 |R | ADDQ.L #0x1,D7 000231a8 0c 87 00 00 00 05 | | CMPI.L #0x00000005,D7 000231ae 6f d8 |o | BLE 0x23188 000231b0 59 4f |YO | SUBQ.L #0x4,A7 000231b2 4e b9 00 02 4d e0 |N M | JSR 0x24de0 000231b8 2c 1f |, | MOVE.L (A7)+,D6 000231ba bc 92 | | CMP.L (A2),D6 000231bc 65 2e |e. | BCS 0x231ec 000231be 20 12 | | MOVE.L (A2),D0 000231c0 d0 93 | | ADD.L (A3),D0 000231c2 bc 80 | | CMP.L D0,D6 000231c4 62 26 |b& | BHI 0x231ec 000231c6 7e 00 |~ | MOVEQ.L #0x00,D7 000231c8 2f 06 |/ | MOVE.L D6,-(A7) 000231ca df 97 | | ADD.L D7,(A7) 000231cc be 82 | | CMP.L D2,D7 000231ce 63 02 |c | BLS 0x231d2 000231d0 4e 4f |NO | TRAP #15 000231d2 20 07 | | MOVE.L D7,D0 000231d4 e3 80 | | ASL.L #0x1,D0 000231d6 30 36 08 d8 |06 | MOVE.W (A6+D0.L-#0x28),D0 000231da 41 bc 00 ff |A | CHK.W #0xff,D0 000231de 3f 00 |? | MOVE.W D0,-(A7) 000231e0 4e ba f3 6a |N j | JSR 0x2254c 000231e4 5c 4f |\O | ADDQ.L #0x6,A7 000231e6 52 87 |R | ADDQ.L #0x1,D7 000231e8 be 82 | | CMP.L D2,D7 000231ea 6f dc |o | BLE 0x231c8 000231ec 59 4f |YO | SUBQ.L #0x4,A7 000231ee 4e b9 00 02 4d b6 |N M | JSR 0x24db6 000231f4 2c 1f |, | MOVE.L (A7)+,D6 000231f6 bc 92 | | CMP.L (A2),D6 000231f8 65 5a |eZ | BCS 0x23254 000231fa 20 12 | | MOVE.L (A2),D0 000231fc d0 93 | | ADD.L (A3),D0 000231fe bc 80 | | CMP.L D0,D6 00023200 62 52 |bR | BHI 0x23254 00023202 4a 79 00 02 90 c2 |Jy | TST.W 0x290c2 00023208 6f 24 |o$ | BLE 0x2322e 0002320a 30 2e ff d6 |0. | MOVE.W (A6-0x2a),D0 0002320e d0 6e ff d0 | n | ADD.W (A6-0x30),D0 00023212 90 79 00 02 90 c2 | y | SUB.W 0x290c2,D0 00023218 02 40 00 ff | @ | ANDI.W #0x00ff,D0 0002321c 3d 40 ff d6 |=@ | MOVE.W D0,(A6-0x2a) 00023220 30 39 00 02 90 c2 |09 | MOVE.W 0x290c2,D0 00023226 41 bc 00 ff |A | CHK.W #0xff,D0 0002322a 3d 40 ff d0 |=@ | MOVE.W D0,(A6-0x30) 0002322e 7e 00 |~ | MOVEQ.L #0x00,D7 00023230 2f 06 |/ | MOVE.L D6,-(A7) 00023232 df 97 | | ADD.L D7,(A7) 00023234 be 82 | | CMP.L D2,D7 00023236 63 02 |c | BLS 0x2323a 00023238 4e 4f |NO | TRAP #15 0002323a 20 07 | | MOVE.L D7,D0 0002323c e3 80 | | ASL.L #0x1,D0 0002323e 30 36 08 c8 |06 | MOVE.W (A6+D0.L-#0x38),D0 00023242 41 bc 00 ff |A | CHK.W #0xff,D0 00023246 3f 00 |? | MOVE.W D0,-(A7) 00023248 4e ba f3 02 |N | JSR 0x2254c 0002324c 5c 4f |\O | ADDQ.L #0x6,A7 0002324e 52 87 |R | ADDQ.L #0x1,D7 00023250 be 82 | | CMP.L D2,D7 00023252 6f dc |o | BLE 0x23230 00023254 7a 00 |z | MOVEQ.L #0x00,D5 00023256 2f 13 |/ | MOVE.L (A3),-(A7) 00023258 53 97 |S | SUBQ.L #0x1,(A7) 0002325a 7e 00 |~ | MOVEQ.L #0x00,D7 0002325c be 97 | | CMP.L (A7),D7 0002325e 6e 26 |n& | BGT 0x23286 00023260 55 4f |UO | SUBQ.L #0x2,A7 00023262 2f 12 |/ | MOVE.L (A2),-(A7) 00023264 df 97 | | ADD.L D7,(A7) 00023266 4e ba f2 40 |N @ | JSR 0x224a8 0002326a 58 4f |XO | ADDQ.L #0x4,A7 0002326c 30 1f |0 | MOVE.W (A7)+,D0 0002326e 48 c0 |H | EXTW.L D0 00023270 da 80 | | ADD.L D0,D5 00023272 28 05 |( | MOVE.L D5,D4 00023274 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 0002327a 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00023280 2a 03 |* | MOVE.L D3,D5 00023282 52 87 |R | ADDQ.L #0x1,D7 00023284 68 d6 |h | BVC 0x2325c 00023286 58 4f |XO | ADDQ.L #0x4,A7 00023288 20 12 | | MOVE.L (A2),D0 0002328a d0 93 | | ADD.L (A3),D0 0002328c 2f 00 |/ | MOVE.L D0,-(A7) 0002328e 20 3c 00 00 01 aa | < | MOVE.L #0x1aa,D0 00023294 90 85 | | SUB.L D5,D0 00023296 28 00 |( | MOVE.L D0,D4 00023298 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 0002329e 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 000232a4 3f 03 |? | MOVE.W D3,-(A7) 000232a6 4e ba f2 a4 |N | JSR 0x2254c 000232aa 5c 4f |\O | ADDQ.L #0x6,A7 000232ac 42 ae ff ec |B | CLR.L (A6-0x14) 000232b0 42 ae ff f0 |B | CLR.L (A6-0x10) 000232b4 42 2e ff fc |B. | CLR.B (A6-0x4) 000232b8 20 2e ff ec | . | MOVE.L (A6-0x14),D0 000232bc b0 82 | | CMP.L D2,D0 000232be 6f 04 |o | BLE 0x232c4 000232c0 52 2e ff fc |R. | ADDQ.B #0x1,(A6-0x4) 000232c4 30 39 00 02 50 b0 |09 P | MOVE.W 0x250b0,D0 000232ca 04 40 00 50 | @ P | SUBI.W #0x0050,D0 000232ce 48 c0 |H | EXTW.L D0 000232d0 2f 00 |/ | MOVE.L D0,-(A7) 000232d2 48 6e ff f4 |Hn | PEA.L (A6-0xc) 000232d6 4e b9 00 02 4e 32 |N N2 | JSR 0x24e32 000232dc 50 4f |PO | ADDQ.L #0x8,A7 000232de 4a ae ff f4 |J | TST.L (A6-0xc) 000232e2 67 48 |gH | BEQ 0x2332c 000232e4 4a 2e ff fc |J. | TST.B (A6-0x4) 000232e8 67 42 |gB | BEQ 0x2332c 000232ea 9e fc 00 1a | | SUBA.W #0x1a,A7 000232ee 20 4f | O | MOVEA.L A7,A0 000232f0 43 fa d4 3e |C > | LEA.L 0x20730,A1 000232f4 70 18 |p | MOVEQ.L #0x18,D0 000232f6 10 d9 | | MOVE.B (A1)+,(A0)+ 000232f8 51 c8 ff fc |Q | DBF D0,0x232f6 000232fc 51 4f |QO | SUBQ.L #0x8,A7 000232fe 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023302 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023306 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 0002330a 4e 94 |N | JSR (A4) 0002330c 2e ae ff f4 |. | MOVE.L (A6-0xc),(A7) 00023310 4e ba dd 08 |N | JSR 0x2101a 00023314 58 4f |XO | ADDQ.L #0x4,A7 00023316 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002331c 50 4f |PO | ADDQ.L #0x8,A7 0002331e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023324 de fc 00 1e | | ADDA.W #0x1e,A7 00023328 52 ae ff f0 |R | ADDQ.L #0x1,(A6-0x10) 0002332c 7e 00 |~ | MOVEQ.L #0x00,D7 0002332e 0c 87 00 00 1f ff | | CMPI.L #0x00001fff,D7 00023334 63 02 |c | BLS 0x23338 00023336 4e 4f |NO | TRAP #15 00023338 20 07 | | MOVE.L D7,D0 0002333a e3 80 | | ASL.L #0x1,D0 0002333c 41 f9 00 02 50 88 |A P | LEA.L 0x25088,A0 00023342 55 4f |UO | SUBQ.L #0x2,A7 00023344 2f 12 |/ | MOVE.L (A2),-(A7) 00023346 df 97 | | ADD.L D7,(A7) 00023348 4e ba f1 5e |N ^ | JSR 0x224a8 0002334c 58 4f |XO | ADDQ.L #0x4,A7 0002334e 32 1f |2 | MOVE.W (A7)+,D1 00023350 43 bc 00 ff |C | CHK.W #0xff,D1 00023354 31 81 08 2a |1 * | MOVE.W D1,(A0+D0.L+#0x2a) 00023358 52 87 |R | ADDQ.L #0x1,D7 0002335a 0c 87 00 00 1f ff | | CMPI.L #0x00001fff,D7 00023360 6f cc |o | BLE 0x2332e 00023362 30 39 00 02 50 b0 |09 P | MOVE.W 0x250b0,D0 00023368 04 40 00 50 | @ P | SUBI.W #0x0050,D0 0002336c 48 c0 |H | EXTW.L D0 0002336e 2f 00 |/ | MOVE.L D0,-(A7) 00023370 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00023374 4e b9 00 02 4e 0a |N N | JSR 0x24e0a 0002337a 50 4f |PO | ADDQ.L #0x8,A7 0002337c 4a ae ff f4 |J | TST.L (A6-0xc) 00023380 67 48 |gH | BEQ 0x233ca 00023382 20 2e ff f4 | . | MOVE.L (A6-0xc),D0 00023386 0c 80 00 00 00 02 | | CMPI.L #0x00000002,D0 0002338c 67 3c |g< | BEQ 0x233ca 0002338e 9e fc 00 1a | | SUBA.W #0x1a,A7 00023392 20 4f | O | MOVEA.L A7,A0 00023394 43 fa d3 b4 |C | LEA.L 0x2074a,A1 00023398 70 18 |p | MOVEQ.L #0x18,D0 0002339a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002339c 51 c8 ff fc |Q | DBF D0,0x2339a 000233a0 51 4f |QO | SUBQ.L #0x8,A7 000233a2 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000233a6 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000233aa 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000233ae 4e 94 |N | JSR (A4) 000233b0 2e ae ff f4 |. | MOVE.L (A6-0xc),(A7) 000233b4 4e ba dc 64 |N d | JSR 0x2101a 000233b8 58 4f |XO | ADDQ.L #0x4,A7 000233ba 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000233c0 50 4f |PO | ADDQ.L #0x8,A7 000233c2 4e ba dd d0 |N | JSR 0x21194 000233c6 de fc 00 1e | | ADDA.W #0x1e,A7 000233ca 42 ae ff f8 |B | CLR.L (A6-0x8) 000233ce 2f 13 |/ | MOVE.L (A3),-(A7) 000233d0 7e 00 |~ | MOVEQ.L #0x00,D7 000233d2 be 97 | | CMP.L (A7),D7 000233d4 6e 38 |n8 | BGT 0x2340e 000233d6 55 4f |UO | SUBQ.L #0x2,A7 000233d8 2f 12 |/ | MOVE.L (A2),-(A7) 000233da df 97 | | ADD.L D7,(A7) 000233dc 4e ba f0 ca |N | JSR 0x224a8 000233e0 58 4f |XO | ADDQ.L #0x4,A7 000233e2 0c 87 00 00 1f ff | | CMPI.L #0x00001fff,D7 000233e8 63 02 |c | BLS 0x233ec 000233ea 4e 4f |NO | TRAP #15 000233ec 20 07 | | MOVE.L D7,D0 000233ee e3 80 | | ASL.L #0x1,D0 000233f0 41 f9 00 02 50 88 |A P | LEA.L 0x25088,A0 000233f6 32 1f |2 | MOVE.W (A7)+,D1 000233f8 b2 70 08 2a | p * | CMP.W (A0+D0.L+#0x2a),D1 000233fc 67 0c |g | BEQ 0x2340a 000233fe 20 13 | | MOVE.L (A3),D0 00023400 5b 80 |[ | SUBQ.L #0x5,D0 00023402 be 80 | | CMP.L D0,D7 00023404 67 04 |g | BEQ 0x2340a 00023406 52 ae ff f8 |R | ADDQ.L #0x1,(A6-0x8) 0002340a 52 87 |R | ADDQ.L #0x1,D7 0002340c 68 c4 |h | BVC 0x233d2 0002340e 58 4f |XO | ADDQ.L #0x4,A7 00023410 4a ae ff f8 |J | TST.L (A6-0x8) 00023414 6f 00 01 38 |o 8 | BLE 0x2354e 00023418 7e 00 |~ | MOVEQ.L #0x00,D7 0002341a 2f 12 |/ | MOVE.L (A2),-(A7) 0002341c df 97 | | ADD.L D7,(A7) 0002341e 0c 87 00 00 1f ff | | CMPI.L #0x00001fff,D7 00023424 63 02 |c | BLS 0x23428 00023426 4e 4f |NO | TRAP #15 00023428 20 07 | | MOVE.L D7,D0 0002342a e3 80 | | ASL.L #0x1,D0 0002342c 41 f9 00 02 50 88 |A P | LEA.L 0x25088,A0 00023432 3f 30 08 2a |?0 * | MOVE.W (A0+D0.L+#0x2a),-(A7) 00023436 4e ba f1 14 |N | JSR 0x2254c 0002343a 5c 4f |\O | ADDQ.L #0x6,A7 0002343c 52 87 |R | ADDQ.L #0x1,D7 0002343e 0c 87 00 00 1f ff | | CMPI.L #0x00001fff,D7 00023444 6f d4 |o | BLE 0x2341a 00023446 4a 2e ff fc |J. | TST.B (A6-0x4) 0002344a 67 62 |gb | BEQ 0x234ae 0002344c 9e fc 00 0a | | SUBA.W #0xa,A7 00023450 20 4f | O | MOVEA.L A7,A0 00023452 43 fa d3 10 |C | LEA.L 0x20764,A1 00023456 70 08 |p | MOVEQ.L #0x08,D0 00023458 10 d9 | | MOVE.B (A1)+,(A0)+ 0002345a 51 c8 ff fc |Q | DBF D0,0x23458 0002345e 41 fa d3 38 |A 8 | LEA.L 0x20798,A0 00023462 70 14 |p | MOVEQ.L #0x14,D0 00023464 3f 20 |? | MOVE.W -(A0),-(A7) 00023466 51 c8 ff fc |Q | DBF D0,0x23464 0002346a 51 4f |QO | SUBQ.L #0x8,A7 0002346c 48 6f 00 32 |Ho 2 | PEA.L (A7+0x32) 00023470 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023474 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00023478 4e 94 |N | JSR (A4) 0002347a 2e ae ff f8 |. | MOVE.L (A6-0x8),(A7) 0002347e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00023484 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00023488 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002348c 3f 3c 00 2a |?< * | MOVE.W #0x2a,-(A7) 00023490 4e 94 |N | JSR (A4) 00023492 50 4f |PO | ADDQ.L #0x8,A7 00023494 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 0002349a de fc 00 0c | | ADDA.W #0xc,A7 0002349e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000234a4 de fc 00 38 | 8 | ADDA.W #0x38,A7 000234a8 52 ae ff f0 |R | ADDQ.L #0x1,(A6-0x10) 000234ac 60 0c |` | BRA 0x234ba 000234ae 1f 3c 00 2e | < . | MOVE.B #0x2e,-(A7) 000234b2 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char) 000234b8 54 4f |TO | ADDQ.L #0x2,A7 000234ba 52 ae ff ec |R | ADDQ.L #0x1,(A6-0x14) 000234be 20 2e ff ec | . | MOVE.L (A6-0x14),D0 000234c2 0c 80 00 00 00 0f | | CMPI.L #0x0000000f,D0 000234c8 6c 04 |l | BGE 0x234ce 000234ca 60 00 fd e8 |` | BRA 0x232b4 000234ce 9e fc 00 30 | 0 | SUBA.W #0x30,A7 000234d2 20 4f | O | MOVEA.L A7,A0 000234d4 43 fa d2 c2 |C | LEA.L 0x20798,A1 000234d8 70 2e |p. | MOVEQ.L #0x2e,D0 000234da 10 d9 | | MOVE.B (A1)+,(A0)+ 000234dc 51 c8 ff fc |Q | DBF D0,0x234da 000234e0 59 4f |YO | SUBQ.L #0x4,A7 000234e2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000234e6 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000234ea 3f 3c 00 2f |?< / | MOVE.W #0x2f,-(A7) 000234ee 4e 94 |N | JSR (A4) 000234f0 50 4f |PO | ADDQ.L #0x8,A7 000234f2 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000234f8 de fc 00 34 | 4 | ADDA.W #0x34,A7 000234fc 41 fa d3 0e |A | LEA.L 0x2080c,A0 00023500 70 10 |p | MOVEQ.L #0x10,D0 00023502 2f 20 |/ | MOVE.L -(A0),-(A7) 00023504 51 c8 ff fc |Q | DBF D0,0x23502 00023508 59 4f |YO | SUBQ.L #0x4,A7 0002350a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002350e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023512 3f 3c 00 44 |?< D | MOVE.W #0x44,-(A7) 00023516 4e 94 |N | JSR (A4) 00023518 50 4f |PO | ADDQ.L #0x8,A7 0002351a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023520 de fc 00 2e | . | ADDA.W #0x2e,A7 00023524 20 4f | O | MOVEA.L A7,A0 00023526 43 fa d2 e4 |C | LEA.L 0x2080c,A1 0002352a 70 18 |p | MOVEQ.L #0x18,D0 0002352c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002352e 51 c8 ff fc |Q | DBF D0,0x2352c 00023532 59 4f |YO | SUBQ.L #0x4,A7 00023534 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023538 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002353c 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00023540 4e 94 |N | JSR (A4) 00023542 50 4f |PO | ADDQ.L #0x8,A7 00023544 4e ba dc 4e |N N | JSR 0x21194 00023548 de fc 00 1e | | ADDA.W #0x1e,A7 0002354c 60 64 |`d | BRA 0x235b2 0002354e 9e fc 00 1c | | SUBA.W #0x1c,A7 00023552 20 4f | O | MOVEA.L A7,A0 00023554 43 fa d2 d0 |C | LEA.L 0x20826,A1 00023558 70 1a |p | MOVEQ.L #0x1a,D0 0002355a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002355c 51 c8 ff fc |Q | DBF D0,0x2355a 00023560 59 4f |YO | SUBQ.L #0x4,A7 00023562 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023566 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002356a 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 0002356e 4e 94 |N | JSR (A4) 00023570 50 4f |PO | ADDQ.L #0x8,A7 00023572 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00023578 de fc 00 20 | | ADDA.W #0x20,A7 0002357c 4a ae ff f0 |J | TST.L (A6-0x10) 00023580 66 08 |f | BNE 0x2358a 00023582 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00023588 60 28 |`( | BRA 0x235b2 0002358a 41 fa d2 de |A | LEA.L 0x2086a,A0 0002358e 70 09 |p | MOVEQ.L #0x09,D0 00023590 2f 20 |/ | MOVE.L -(A0),-(A7) 00023592 51 c8 ff fc |Q | DBF D0,0x23590 00023596 59 4f |YO | SUBQ.L #0x4,A7 00023598 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002359c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000235a0 3f 3c 00 28 |?< ( | MOVE.W #0x28,-(A7) 000235a4 4e 94 |N | JSR (A4) 000235a6 50 4f |PO | ADDQ.L #0x8,A7 000235a8 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000235ae de fc 00 2c | , | ADDA.W #0x2c,A7 000235b2 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000235b6 4e 5e |N^ | UNLK A6 000235b8 4e 75 |Nu | RTS 000235ba ; -------------------------------------------------------------------------------------- 000235ba ; OMSI PASCAL Function 000235ba ; <LVAR 0x008 1(r)> 000235ba ; -------------------------------------------------------------------------------------- 000235ba 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 000235be bf d5 | | CMPA.L (A5),A7 000235c0 62 06 |b | BHI 0x235c8 000235c2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000235c6 4e 76 |Nv | TRAPV 000235c8 de fc 00 6e | n | ADDA.W #0x6e,A7 000235cc 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000235d0 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 000235d6 72 01 |r | MOVEQ.L #0x01,D1 000235d8 55 4f |UO | SUBQ.L #0x2,A7 000235da 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 000235e0 4a 1f |J | TST.B (A7)+ 000235e2 66 0e |f | BNE 0x235f2 000235e4 55 4f |UO | SUBQ.L #0x2,A7 000235e6 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 000235ec 4a 1f |J | TST.B (A7)+ 000235ee 67 00 00 a4 |g | BEQ 0x23694 000235f2 4a 2e 00 08 |J. | TST.B (A6+0x8) 000235f6 67 28 |g( | BEQ 0x23620 000235f8 41 fa d2 9c |A | LEA.L 0x20896,A0 000235fc 70 0a |p | MOVEQ.L #0x0a,D0 000235fe 2f 20 |/ | MOVE.L -(A0),-(A7) 00023600 51 c8 ff fc |Q | DBF D0,0x235fe 00023604 59 4f |YO | SUBQ.L #0x4,A7 00023606 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002360a 3f 01 |? | MOVE.W D1,-(A7) 0002360c 3f 3c 00 2c |?< , | MOVE.W #0x2c,-(A7) 00023610 4e 92 |N | JSR (A2) 00023612 50 4f |PO | ADDQ.L #0x8,A7 00023614 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 0002361a de fc 00 30 | 0 | ADDA.W #0x30,A7 0002361e 60 2c |`, | BRA 0x2364c 00023620 9e fc 00 4a | J | SUBA.W #0x4a,A7 00023624 20 4f | O | MOVEA.L A7,A0 00023626 43 fa d2 6e |C n | LEA.L 0x20896,A1 0002362a 70 48 |pH | MOVEQ.L #0x48,D0 0002362c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002362e 51 c8 ff fc |Q | DBF D0,0x2362c 00023632 59 4f |YO | SUBQ.L #0x4,A7 00023634 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023638 3f 01 |? | MOVE.W D1,-(A7) 0002363a 3f 3c 00 49 |?< I | MOVE.W #0x49,-(A7) 0002363e 4e 92 |N | JSR (A2) 00023640 50 4f |PO | ADDQ.L #0x8,A7 00023642 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00023648 de fc 00 4e | N | ADDA.W #0x4e,A7 0002364c 55 4f |UO | SUBQ.L #0x2,A7 0002364e 4e b9 00 02 4d 62 |N Mb | JSR 0x24d62 00023654 10 1f | | MOVE.B (A7)+,D0 00023656 b0 2e 00 08 | . | CMP.B (A6+0x8),D0 0002365a 67 02 |g | BEQ 0x2365e 0002365c 60 ee |` | BRA 0x2364c 0002365e 5d 4f |]O | SUBQ.L #0x6,A7 00023660 20 4f | O | MOVEA.L A7,A0 00023662 43 fa d2 7c |C | | LEA.L 0x208e0,A1 00023666 70 04 |p | MOVEQ.L #0x04,D0 00023668 10 d9 | | MOVE.B (A1)+,(A0)+ 0002366a 51 c8 ff fc |Q | DBF D0,0x23668 0002366e 59 4f |YO | SUBQ.L #0x4,A7 00023670 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023674 3f 01 |? | MOVE.W D1,-(A7) 00023676 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 0002367a 4e 92 |N | JSR (A2) 0002367c 50 4f |PO | ADDQ.L #0x8,A7 0002367e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023684 5c 4f |\O | ADDQ.L #0x6,A7 00023686 2e bc 00 00 98 96 |. | MOVE.L #0x9896,(A7) 0002368c 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 00023692 58 4f |XO | ADDQ.L #0x4,A7 00023694 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00023698 4e 5e |N^ | UNLK A6 0002369a 4e 75 |Nu | RTS 0002369c ; -------------------------------------------------------------------------------------- 0002369c ; OMSI PASCAL Function 0002369c ; <LVAR -0x008 @ 4(r)> 0002369c ; -------------------------------------------------------------------------------------- 0002369c 4e 56 ff 8a |NV | LINK.W A6,#0xff8a 000236a0 bf d5 | | CMPA.L (A5),A7 000236a2 62 06 |b | BHI 0x236aa 000236a4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000236a8 4e 76 |Nv | TRAPV 000236aa de fc 00 6e | n | ADDA.W #0x6e,A7 000236ae 48 e7 f9 c0 |H | MOVEM.L A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 000236b2 72 0c |r | MOVEQ.L #0x0c,D1 000236b4 74 01 |t | MOVEQ.L #0x01,D2 000236b6 4e ba f1 d2 |N | JSR 0x2288a 000236ba 48 6e ff f8 |Hn | PEA.L (A6-0x8) 000236be 4e ba f2 d0 |N | JSR 0x22990 000236c2 58 4f |XO | ADDQ.L #0x4,A7 000236c4 30 39 00 02 50 b0 |09 P | MOVE.W 0x250b0,D0 000236ca 0c 40 00 50 | @ P | CMPI.W #0x0050,D0 000236ce 6c 1e |l | BGE 0x236ee 000236d0 28 2e ff f8 |(. | MOVE.L (A6-0x8),D4 000236d4 76 0c |v | MOVEQ.L #0x0c,D3 000236d6 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 000236dc 26 3c 00 00 03 e8 |&< | MOVE.L #0x3e8,D3 000236e2 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 000236e8 52 84 |R | ADDQ.L #0x1,D4 000236ea 2e 04 |. | MOVE.L D4,D7 000236ec 60 02 |` | BRA 0x236f0 000236ee 7e 06 |~ | MOVEQ.L #0x06,D7 000236f0 9e fc 00 26 | & | SUBA.W #0x26,A7 000236f4 20 4f | O | MOVEA.L A7,A0 000236f6 43 fa d1 ee |C | LEA.L 0x208e6,A1 000236fa 70 24 |p$ | MOVEQ.L #0x24,D0 000236fc 10 d9 | | MOVE.B (A1)+,(A0)+ 000236fe 51 c8 ff fc |Q | DBF D0,0x236fc 00023702 9e c1 | | SUBA.W D1,A7 00023704 20 4f | O | MOVEA.L A7,A0 00023706 43 fa d2 04 |C | LEA.L 0x2090c,A1 0002370a 70 0a |p | MOVEQ.L #0x0a,D0 0002370c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002370e 51 c8 ff fc |Q | DBF D0,0x2370c 00023712 51 4f |QO | SUBQ.L #0x8,A7 00023714 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00023718 3f 02 |? | MOVE.W D2,-(A7) 0002371a 3f 3c 00 25 |?< % | MOVE.W #0x25,-(A7) 0002371e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023724 2e 87 |. | MOVE.L D7,(A7) 00023726 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002372c 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00023730 3f 02 |? | MOVE.W D2,-(A7) 00023732 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00023736 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002373c 50 4f |PO | ADDQ.L #0x8,A7 0002373e 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00023744 de c1 | | ADDA.W D1,A7 00023746 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002374c de fc 00 36 | 6 | ADDA.W #0x36,A7 00023750 4c df 03 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1 00023754 4e 5e |N^ | UNLK A6 00023756 4e 75 |Nu | RTS 00023758 ; -------------------------------------------------------------------------------------- 00023758 ; OMSI PASCAL Function 00023758 ; -------------------------------------------------------------------------------------- 00023758 4e 56 ff ea |NV | LINK.W A6,#0xffea 0002375c bf d5 | | CMPA.L (A5),A7 0002375e 62 06 |b | BHI 0x23766 00023760 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023764 4e 76 |Nv | TRAPV 00023766 de fc 00 16 | | ADDA.W #0x16,A7 0002376a 48 e7 c0 00 |H | MOVEM.L D1+D0,-(A7) 0002376e 72 01 |r | MOVEQ.L #0x01,D1 00023770 48 78 00 01 |Hx | PEA.L 0x1 00023774 48 78 00 00 |Hx | PEA.L 0x0 00023778 1f 01 | | MOVE.B D1,-(A7) 0002377a 4e ba ea fe |N | JSR 0x2227a 0002377e de fc 00 0a | | ADDA.W #0xa,A7 00023782 4e ba ff 18 |N | JSR 0x2369c 00023786 42 27 |B' | CLR.B -(A7) 00023788 4e ba fe 30 |N 0 | JSR 0x235ba 0002378c 54 4f |TO | ADDQ.L #0x2,A7 0002378e 42 39 00 02 50 96 |B9 P | CLR.B 0x25096 00023794 42 79 00 02 90 c2 |By | CLR.W 0x290c2 0002379a 30 39 00 02 50 b0 |09 P | MOVE.W 0x250b0,D0 000237a0 0c 40 00 50 | @ P | CMPI.W #0x0050,D0 000237a4 6c 06 |l | BGE 0x237ac 000237a6 4e ba f6 52 |N R | JSR 0x22dfa 000237aa 60 04 |` | BRA 0x237b0 000237ac 4e ba f8 80 |N | JSR 0x2302e 000237b0 1f 01 | | MOVE.B D1,-(A7) 000237b2 4e ba fe 06 |N | JSR 0x235ba 000237b6 54 4f |TO | ADDQ.L #0x2,A7 000237b8 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000237be 4c df 00 03 |L | MOVEM.L (A7)+,D0+D1 000237c2 4e 5e |N^ | UNLK A6 000237c4 4e 75 |Nu | RTS 000237c6 ; -------------------------------------------------------------------------------------- 000237c6 ; OMSI PASCAL Function 000237c6 ; <LVAR 0x00a @ 4(r)> 000237c6 ; <LVAR 0x008 2(r)> 000237c6 ; -------------------------------------------------------------------------------------- 000237c6 4e 56 ff c2 |NV | LINK.W A6,#0xffc2 ; Spelunked 000237ca bf d5 | | CMPA.L (A5),A7 000237cc 62 06 |b | BHI 0x237d4 000237ce 44 fc 00 02 |D | MOVE.W #0x2,CCR 000237d2 4e 76 |Nv | TRAPV 000237d4 de fc 00 3c | < | ADDA.W #0x3c,A7 000237d8 48 e7 e0 e0 |H | MOVEM.L A2+A1+A0+D2+D1+D0,-(A7) 000237dc 45 ee 00 0a |E | LEA.L (A6+0xa),A2 000237e0 72 10 |r | MOVEQ.L #0x10,D1 000237e2 74 01 |t | MOVEQ.L #0x01,D2 000237e4 9e c1 | | SUBA.W D1,A7 000237e6 20 4f | O | MOVEA.L A7,A0 000237e8 43 fa d1 2e |C . | LEA.L 0x20918,A1 000237ec 70 0e |p | MOVEQ.L #0x0e,D0 000237ee 10 d9 | | MOVE.B (A1)+,(A0)+ 000237f0 51 c8 ff fc |Q | DBF D0,0x237ee 000237f4 51 4f |QO | SUBQ.L #0x8,A7 000237f6 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000237fa 3f 02 |? | MOVE.W D2,-(A7) 000237fc 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00023800 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023806 2e 92 |. | MOVE.L (A2),(A7) 00023808 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 0002380e 58 4f |XO | ADDQ.L #0x4,A7 00023810 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023816 50 4f |PO | ADDQ.L #0x8,A7 00023818 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 0002381e de c1 | | ADDA.W D1,A7 00023820 2e 92 |. | MOVE.L (A2),(A7) 00023822 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00023826 48 c0 |H | EXTW.L D0 00023828 2f 00 |/ | MOVE.L D0,-(A7) 0002382a 1f 02 | | MOVE.B D2,-(A7) 0002382c 4e ba ea 4c |N L | JSR 0x2227a 00023830 de fc 00 0a | | ADDA.W #0xa,A7 00023834 48 52 |HR | PEA.L (A2) 00023836 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002383c 58 4f |XO | ADDQ.L #0x4,A7 0002383e 4c df 07 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2 00023842 4e 5e |N^ | UNLK A6 00023844 4e 75 |Nu | RTS 00023846 ; -------------------------------------------------------------------------------------- 00023846 ; OMSI PASCAL Function 00023846 ; <LVAR 0x00a @ 4(r)> 00023846 ; <LVAR 0x008 2(r)> 00023846 ; -------------------------------------------------------------------------------------- 00023846 4e 56 ff bc |NV | LINK.W A6,#0xffbc ; Spelunked 0002384a bf d5 | | CMPA.L (A5),A7 0002384c 62 06 |b | BHI 0x23854 0002384e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023852 4e 76 |Nv | TRAPV 00023854 de fc 00 42 | B | ADDA.W #0x42,A7 00023858 48 e7 f0 e0 |H | MOVEM.L A2+A1+A0+D3+D2+D1+D0,-(A7) 0002385c 45 ee 00 0a |E | LEA.L (A6+0xa),A2 00023860 72 01 |r | MOVEQ.L #0x01,D1 00023862 74 0e |t | MOVEQ.L #0x0e,D2 00023864 76 14 |v | MOVEQ.L #0x14,D3 00023866 9e c2 | | SUBA.W D2,A7 00023868 20 4f | O | MOVEA.L A7,A0 0002386a 43 fa d0 bc |C | LEA.L 0x20928,A1 0002386e 70 0c |p | MOVEQ.L #0x0c,D0 00023870 10 d9 | | MOVE.B (A1)+,(A0)+ 00023872 51 c8 ff fc |Q | DBF D0,0x23870 00023876 51 4f |QO | SUBQ.L #0x8,A7 00023878 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002387c 3f 01 |? | MOVE.W D1,-(A7) 0002387e 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 00023882 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023888 2e 92 |. | MOVE.L (A2),(A7) 0002388a 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00023890 58 4f |XO | ADDQ.L #0x4,A7 00023892 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023898 50 4f |PO | ADDQ.L #0x8,A7 0002389a 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000238a0 de c2 | | ADDA.W D2,A7 000238a2 2e 92 |. | MOVE.L (A2),(A7) 000238a4 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 000238a8 48 c0 |H | EXTW.L D0 000238aa 2f 00 |/ | MOVE.L D0,-(A7) 000238ac 1f 01 | | MOVE.B D1,-(A7) 000238ae 4e ba e9 ca |N | JSR 0x2227a 000238b2 de fc 00 0a | | ADDA.W #0xa,A7 000238b6 4e ba fd e4 |N | JSR 0x2369c 000238ba 9e c3 | | SUBA.W D3,A7 000238bc 20 4f | O | MOVEA.L A7,A0 000238be 43 fa d0 76 |C v | LEA.L 0x20936,A1 000238c2 70 12 |p | MOVEQ.L #0x12,D0 000238c4 10 d9 | | MOVE.B (A1)+,(A0)+ 000238c6 51 c8 ff fc |Q | DBF D0,0x238c4 000238ca 5d 4f |]O | SUBQ.L #0x6,A7 000238cc 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000238d0 3f 01 |? | MOVE.W D1,-(A7) 000238d2 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 000238d6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000238dc 5c 4f |\O | ADDQ.L #0x6,A7 000238de 1e 81 | | MOVE.B D1,(A7) 000238e0 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 000238e6 5c 4f |\O | ADDQ.L #0x6,A7 000238e8 4a 1f |J | TST.B (A7)+ 000238ea 67 0a |g | BEQ 0x238f6 000238ec 42 39 00 02 50 96 |B9 P | CLR.B 0x25096 000238f2 4e ba f5 06 |N | JSR 0x22dfa 000238f6 de c3 | | ADDA.W D3,A7 000238f8 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000238fe 48 52 |HR | PEA.L (A2) 00023900 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023906 58 4f |XO | ADDQ.L #0x4,A7 00023908 4c df 07 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2 0002390c 4e 5e |N^ | UNLK A6 0002390e 4e 75 |Nu | RTS 00023910 ; -------------------------------------------------------------------------------------- 00023910 ; OMSI PASCAL Function 00023910 ; -------------------------------------------------------------------------------------- 00023910 4e 56 ff ae |NV | LINK.W A6,#0xffae 00023914 bf d5 | | CMPA.L (A5),A7 00023916 62 06 |b | BHI 0x2391e 00023918 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002391c 4e 76 |Nv | TRAPV 0002391e de fc 00 52 | R | ADDA.W #0x52,A7 00023922 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00023926 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 0002392c 47 fa fe 98 |G | LEA.L 0x237c6,A3 00023930 49 fa ff 14 |I | LEA.L 0x23846,A4 00023934 72 01 |r | MOVEQ.L #0x01,D1 00023936 74 0c |t | MOVEQ.L #0x0c,D2 00023938 76 21 |v! | MOVEQ.L #0x21,D3 0002393a 78 0e |x | MOVEQ.L #0x0e,D4 0002393c 7a 08 |z | MOVEQ.L #0x08,D5 0002393e 7c 19 || | MOVEQ.L #0x19,D6 00023940 7e 0d |~ | MOVEQ.L #0x0d,D7 00023942 2f 3a d0 0e |/: | MOVE.L 0x20952,-(A7) 00023946 2f 3a d0 06 |/: | MOVE.L 0x2094e,-(A7) 0002394a 2f 3a cf fe |/: | MOVE.L 0x2094a,-(A7) 0002394e 59 4f |YO | SUBQ.L #0x4,A7 00023950 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023954 3f 01 |? | MOVE.W D1,-(A7) 00023956 3f 02 |? | MOVE.W D2,-(A7) 00023958 4e 92 |N | JSR (A2) 0002395a 5c 4f |\O | ADDQ.L #0x6,A7 0002395c 3e 83 |> | MOVE.W D3,(A7) 0002395e 4e 93 |N | JSR (A3) 00023960 de c4 | | ADDA.W D4,A7 00023962 2e ba cf f6 |. | MOVE.L 0x2095a,(A7) 00023966 2f 3a cf ee |/: | MOVE.L 0x20956,-(A7) 0002396a 59 4f |YO | SUBQ.L #0x4,A7 0002396c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023970 3f 01 |? | MOVE.W D1,-(A7) 00023972 3f 05 |? | MOVE.W D5,-(A7) 00023974 4e 92 |N | JSR (A2) 00023976 5c 4f |\O | ADDQ.L #0x6,A7 00023978 3e 86 |> | MOVE.W D6,(A7) 0002397a 4e 93 |N | JSR (A3) 0002397c 20 4f | O | MOVEA.L A7,A0 0002397e 43 fa cf de |C | LEA.L 0x2095e,A1 00023982 70 0c |p | MOVEQ.L #0x0c,D0 00023984 10 d9 | | MOVE.B (A1)+,(A0)+ 00023986 51 c8 ff fc |Q | DBF D0,0x23984 0002398a 59 4f |YO | SUBQ.L #0x4,A7 0002398c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023990 3f 01 |? | MOVE.W D1,-(A7) 00023992 3f 07 |? | MOVE.W D7,-(A7) 00023994 4e 92 |N | JSR (A2) 00023996 5c 4f |\O | ADDQ.L #0x6,A7 00023998 3e bc 00 17 |> | MOVE.W #0x17,(A7) 0002399c 4e 93 |N | JSR (A3) 0002399e 50 4f |PO | ADDQ.L #0x8,A7 000239a0 20 4f | O | MOVEA.L A7,A0 000239a2 43 fa cf c8 |C | LEA.L 0x2096c,A1 000239a6 70 0a |p | MOVEQ.L #0x0a,D0 000239a8 10 d9 | | MOVE.B (A1)+,(A0)+ 000239aa 51 c8 ff fc |Q | DBF D0,0x239a8 000239ae 59 4f |YO | SUBQ.L #0x4,A7 000239b0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000239b4 3f 01 |? | MOVE.W D1,-(A7) 000239b6 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 000239ba 4e 92 |N | JSR (A2) 000239bc 5c 4f |\O | ADDQ.L #0x6,A7 000239be 3e bc 00 15 |> | MOVE.W #0x15,(A7) 000239c2 4e 93 |N | JSR (A3) 000239c4 de fc 00 12 | | ADDA.W #0x12,A7 000239c8 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000239ce 42 27 |B' | CLR.B -(A7) 000239d0 4e ba fb e8 |N | JSR 0x235ba 000239d4 54 4f |TO | ADDQ.L #0x2,A7 000239d6 2f 3a cf a8 |/: | MOVE.L 0x20980,-(A7) 000239da 2f 3a cf a0 |/: | MOVE.L 0x2097c,-(A7) 000239de 2f 3a cf 98 |/: | MOVE.L 0x20978,-(A7) 000239e2 59 4f |YO | SUBQ.L #0x4,A7 000239e4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000239e8 3f 01 |? | MOVE.W D1,-(A7) 000239ea 3f 02 |? | MOVE.W D2,-(A7) 000239ec 4e 92 |N | JSR (A2) 000239ee 5c 4f |\O | ADDQ.L #0x6,A7 000239f0 3e 83 |> | MOVE.W D3,(A7) 000239f2 4e 94 |N | JSR (A4) 000239f4 de c4 | | ADDA.W D4,A7 000239f6 2e ba cf 90 |. | MOVE.L 0x20988,(A7) 000239fa 2f 3a cf 88 |/: | MOVE.L 0x20984,-(A7) 000239fe 59 4f |YO | SUBQ.L #0x4,A7 00023a00 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023a04 3f 01 |? | MOVE.W D1,-(A7) 00023a06 3f 05 |? | MOVE.W D5,-(A7) 00023a08 4e 92 |N | JSR (A2) 00023a0a 5c 4f |\O | ADDQ.L #0x6,A7 00023a0c 3e 86 |> | MOVE.W D6,(A7) 00023a0e 4e 94 |N | JSR (A4) 00023a10 20 4f | O | MOVEA.L A7,A0 00023a12 43 fa cf 78 |C x | LEA.L 0x2098c,A1 00023a16 70 0c |p | MOVEQ.L #0x0c,D0 00023a18 10 d9 | | MOVE.B (A1)+,(A0)+ 00023a1a 51 c8 ff fc |Q | DBF D0,0x23a18 00023a1e 59 4f |YO | SUBQ.L #0x4,A7 00023a20 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023a24 3f 01 |? | MOVE.W D1,-(A7) 00023a26 3f 07 |? | MOVE.W D7,-(A7) 00023a28 4e 92 |N | JSR (A2) 00023a2a 5c 4f |\O | ADDQ.L #0x6,A7 00023a2c 3e bc 00 17 |> | MOVE.W #0x17,(A7) 00023a30 4e 94 |N | JSR (A4) 00023a32 50 4f |PO | ADDQ.L #0x8,A7 00023a34 20 4f | O | MOVEA.L A7,A0 00023a36 43 fa cf 62 |C b | LEA.L 0x2099a,A1 00023a3a 70 0a |p | MOVEQ.L #0x0a,D0 00023a3c 10 d9 | | MOVE.B (A1)+,(A0)+ 00023a3e 51 c8 ff fc |Q | DBF D0,0x23a3c 00023a42 59 4f |YO | SUBQ.L #0x4,A7 00023a44 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023a48 3f 01 |? | MOVE.W D1,-(A7) 00023a4a 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00023a4e 4e 92 |N | JSR (A2) 00023a50 5c 4f |\O | ADDQ.L #0x6,A7 00023a52 3e bc 00 15 |> | MOVE.W #0x15,(A7) 00023a56 4e 94 |N | JSR (A4) 00023a58 de fc 00 10 | | ADDA.W #0x10,A7 00023a5c 1e 81 | | MOVE.B D1,(A7) 00023a5e 4e ba fb 5a |N Z | JSR 0x235ba 00023a62 54 4f |TO | ADDQ.L #0x2,A7 00023a64 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00023a6a 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00023a6e 4e 5e |N^ | UNLK A6 00023a70 4e 75 |Nu | RTS 00023a72 ; -------------------------------------------------------------------------------------- 00023a72 ; OMSI PASCAL Function 00023a72 ; <LVAR 0x008 2(r)> 00023a72 ; <LVAR -0x006 @> 00023a72 ; <LVAR -0x00a @ 4(r)> 00023a72 ; -------------------------------------------------------------------------------------- 00023a72 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 ; Spelunked 00023a76 bf d5 | | CMPA.L (A5),A7 00023a78 62 06 |b | BHI 0x23a80 00023a7a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023a7e 4e 76 |Nv | TRAPV 00023a80 de fc 00 3e | > | ADDA.W #0x3e,A7 00023a84 48 e7 e0 e0 |H | MOVEM.L A2+A1+A0+D2+D1+D0,-(A7) 00023a88 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00023a8c 72 01 |r | MOVEQ.L #0x01,D1 00023a8e 74 14 |t | MOVEQ.L #0x14,D2 00023a90 3f 12 |? | MOVE.W (A2),-(A7) 00023a92 48 6e ff fa |Hn | PEA.L (A6-0x6) 00023a96 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00023a9a 4e ba d8 ec |N | JSR 0x21388 00023a9e 5c 4f |\O | ADDQ.L #0x6,A7 00023aa0 2e ba cf 08 |. | MOVE.L 0x209aa,(A7) 00023aa4 2f 3a cf 00 |/: | MOVE.L 0x209a6,-(A7) 00023aa8 59 4f |YO | SUBQ.L #0x4,A7 00023aaa 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 00023aae 59 4f |YO | SUBQ.L #0x4,A7 00023ab0 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00023ab4 3f 01 |? | MOVE.W D1,-(A7) 00023ab6 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00023aba 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023ac0 50 4f |PO | ADDQ.L #0x8,A7 00023ac2 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023ac8 50 4f |PO | ADDQ.L #0x8,A7 00023aca 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00023ad0 50 4f |PO | ADDQ.L #0x8,A7 00023ad2 2e 94 |. | MOVE.L (A4),(A7) 00023ad4 30 12 |0 | MOVE.W (A2),D0 00023ad6 48 c0 |H | EXTW.L D0 00023ad8 2f 00 |/ | MOVE.L D0,-(A7) 00023ada 1f 01 | | MOVE.B D1,-(A7) 00023adc 4e ba e7 9c |N | JSR 0x2227a 00023ae0 de fc 00 0a | | ADDA.W #0xa,A7 00023ae4 4e ba fb b6 |N | JSR 0x2369c 00023ae8 9e c2 | | SUBA.W D2,A7 00023aea 20 4f | O | MOVEA.L A7,A0 00023aec 43 fa ce c0 |C | LEA.L 0x209ae,A1 00023af0 70 12 |p | MOVEQ.L #0x12,D0 00023af2 10 d9 | | MOVE.B (A1)+,(A0)+ 00023af4 51 c8 ff fc |Q | DBF D0,0x23af2 00023af8 5d 4f |]O | SUBQ.L #0x6,A7 00023afa 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00023afe 3f 01 |? | MOVE.W D1,-(A7) 00023b00 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00023b04 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023b0a 5c 4f |\O | ADDQ.L #0x6,A7 00023b0c 1e 81 | | MOVE.B D1,(A7) 00023b0e 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00023b14 5c 4f |\O | ADDQ.L #0x6,A7 00023b16 4a 1f |J | TST.B (A7)+ 00023b18 67 1e |g | BEQ 0x23b38 00023b1a 42 39 00 02 50 96 |B9 P | CLR.B 0x25096 00023b20 42 79 00 02 90 c2 |By | CLR.W 0x290c2 00023b26 30 12 |0 | MOVE.W (A2),D0 00023b28 0c 40 00 50 | @ P | CMPI.W #0x0050,D0 00023b2c 6c 06 |l | BGE 0x23b34 00023b2e 4e ba f2 ca |N | JSR 0x22dfa 00023b32 60 04 |` | BRA 0x23b38 00023b34 4e ba f4 f8 |N | JSR 0x2302e 00023b38 de c2 | | ADDA.W D2,A7 00023b3a 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00023b40 4c df 07 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2 00023b44 4e 5e |N^ | UNLK A6 00023b46 4e 75 |Nu | RTS 00023b48 ; -------------------------------------------------------------------------------------- 00023b48 ; OMSI PASCAL Function 00023b48 ; <LVAR 0x008 1(r)> 00023b48 ; <LVAR -0x006 @ 4(rw)> 00023b48 ; <LVAR -0x00a @ 4(rw)> 00023b48 ; -------------------------------------------------------------------------------------- 00023b48 4e 56 ff 98 |NV | LINK.W A6,#0xff98 00023b4c bf d5 | | CMPA.L (A5),A7 00023b4e 62 06 |b | BHI 0x23b56 00023b50 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023b54 4e 76 |Nv | TRAPV 00023b56 de fc 00 5e | ^ | ADDA.W #0x5e,A7 00023b5a 48 e7 f0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7) 00023b5e 45 ee ff f6 |E | LEA.L (A6-0xa),A2 00023b62 47 fa ff 0e |G | LEA.L 0x23a72,A3 00023b66 72 01 |r | MOVEQ.L #0x01,D1 00023b68 74 0c |t | MOVEQ.L #0x0c,D2 00023b6a 76 15 |v | MOVEQ.L #0x15,D3 00023b6c 4a 2e 00 08 |J. | TST.B (A6+0x8) 00023b70 67 08 |g | BEQ 0x23b7a 00023b72 24 b9 00 02 90 b8 |$ | MOVE.L 0x290b8,(A2) 00023b78 60 06 |` | BRA 0x23b80 00023b7a 24 b9 00 02 90 b4 |$ | MOVE.L 0x290b4,(A2) 00023b80 9e fc 00 16 | | SUBA.W #0x16,A7 00023b84 20 4f | O | MOVEA.L A7,A0 00023b86 43 fa ce 3a |C : | LEA.L 0x209c2,A1 00023b8a 70 14 |p | MOVEQ.L #0x14,D0 00023b8c 10 d9 | | MOVE.B (A1)+,(A0)+ 00023b8e 51 c8 ff fc |Q | DBF D0,0x23b8c 00023b92 2f 3a ce 44 |/: D | MOVE.L 0x209d8,-(A7) 00023b96 9e c2 | | SUBA.W D2,A7 00023b98 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00023b9c 3f 01 |? | MOVE.W D1,-(A7) 00023b9e 3f 03 |? | MOVE.W D3,-(A7) 00023ba0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023ba6 2e 92 |. | MOVE.L (A2),(A7) 00023ba8 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00023bae 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00023bb2 3f 01 |? | MOVE.W D1,-(A7) 00023bb4 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00023bb8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023bbe 50 4f |PO | ADDQ.L #0x8,A7 00023bc0 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00023bc6 de c2 | | ADDA.W D2,A7 00023bc8 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00023bce 58 4f |XO | ADDQ.L #0x4,A7 00023bd0 2d 5f ff fa |-_ | MOVE.L (A7)+,(A6-0x6) 00023bd4 de fc 00 1a | | ADDA.W #0x1a,A7 00023bd8 20 6e ff fa | n | MOVEA.L (A6-0x6),A0 00023bdc 30 10 |0 | MOVE.W (A0),D0 00023bde b0 41 | A | CMP.W D1,D0 00023be0 6f 06 |o | BLE 0x23be8 00023be2 24 ae ff fa |$ | MOVE.L (A6-0x6),(A2) 00023be6 60 0c |` | BRA 0x23bf4 00023be8 48 6e ff fa |Hn | PEA.L (A6-0x6) 00023bec 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023bf2 58 4f |XO | ADDQ.L #0x4,A7 00023bf4 42 27 |B' | CLR.B -(A7) 00023bf6 4e ba f9 c2 |N | JSR 0x235ba 00023bfa 54 4f |TO | ADDQ.L #0x2,A7 00023bfc 4a 2e 00 08 |J. | TST.B (A6+0x8) 00023c00 67 1e |g | BEQ 0x23c20 00023c02 3f 3c 00 50 |?< P | MOVE.W #0x50,-(A7) 00023c06 28 4a |(J | MOVEA.L A2,A4 00023c08 4e 93 |N | JSR (A3) 00023c0a 3e bc 00 51 |> Q | MOVE.W #0x51,(A7) 00023c0e 28 4a |(J | MOVEA.L A2,A4 00023c10 4e 93 |N | JSR (A3) 00023c12 3e bc 00 52 |> R | MOVE.W #0x52,(A7) 00023c16 28 4a |(J | MOVEA.L A2,A4 00023c18 4e 93 |N | JSR (A3) 00023c1a 3e bc 00 53 |> S | MOVE.W #0x53,(A7) 00023c1e 60 1a |` | BRA 0x23c3a 00023c20 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 00023c24 28 4a |(J | MOVEA.L A2,A4 00023c26 4e 93 |N | JSR (A3) 00023c28 3e bc 00 19 |> | MOVE.W #0x19,(A7) 00023c2c 28 4a |(J | MOVEA.L A2,A4 00023c2e 4e 93 |N | JSR (A3) 00023c30 3e bc 00 17 |> | MOVE.W #0x17,(A7) 00023c34 28 4a |(J | MOVEA.L A2,A4 00023c36 4e 93 |N | JSR (A3) 00023c38 3e 83 |> | MOVE.W D3,(A7) 00023c3a 28 4a |(J | MOVEA.L A2,A4 00023c3c 4e 93 |N | JSR (A3) 00023c3e 54 4f |TO | ADDQ.L #0x2,A7 00023c40 1f 01 | | MOVE.B D1,-(A7) 00023c42 4e ba f9 76 |N v | JSR 0x235ba 00023c46 54 4f |TO | ADDQ.L #0x2,A7 00023c48 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00023c4e 4c df 1f 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4 00023c52 4e 5e |N^ | UNLK A6 00023c54 4e 75 |Nu | RTS 00023c56 ; -------------------------------------------------------------------------------------- 00023c56 ; OMSI PASCAL Function 00023c56 ; <LVAR 0x008 4(w)> 00023c56 ; -------------------------------------------------------------------------------------- 00023c56 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00023c5a bf d5 | | CMPA.L (A5),A7 00023c5c 62 06 |b | BHI 0x23c64 00023c5e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023c62 4e 76 |Nv | TRAPV 00023c64 de fc 00 20 | | ADDA.W #0x20,A7 00023c68 48 e7 f0 e0 |H | MOVEM.L A2+A1+A0+D3+D2+D1+D0,-(A7) 00023c6c 43 f9 00 02 50 ac |C P | LEA.L 0x250ac,A1 00023c72 45 f9 00 02 50 88 |E P | LEA.L 0x25088,A2 00023c78 26 3c 00 00 1f ff |&< | MOVE.L #0x1fff,D3 00023c7e 20 11 | | MOVE.L (A1),D0 00023c80 59 80 |Y | SUBQ.L #0x4,D0 00023c82 b0 83 | | CMP.L D3,D0 00023c84 63 02 |c | BLS 0x23c88 00023c86 4e 4f |NO | TRAP #15 00023c88 e3 80 | | ASL.L #0x1,D0 00023c8a 20 4a | J | MOVEA.L A2,A0 00023c8c 32 30 08 2a |20 * | MOVE.W (A0+D0.L+#0x2a),D1 00023c90 48 c1 |H | EXTW.L D1 00023c92 e1 81 | | ASL.L #0x8,D1 00023c94 e1 81 | | ASL.L #0x8,D1 00023c96 20 11 | | MOVE.L (A1),D0 00023c98 57 80 |W | SUBQ.L #0x3,D0 00023c9a b0 83 | | CMP.L D3,D0 00023c9c 63 02 |c | BLS 0x23ca0 00023c9e 4e 4f |NO | TRAP #15 00023ca0 e3 80 | | ASL.L #0x1,D0 00023ca2 20 4a | J | MOVEA.L A2,A0 00023ca4 30 30 08 2a |00 * | MOVE.W (A0+D0.L+#0x2a),D0 00023ca8 e1 40 | @ | ASL.W #0x8,D0 00023caa 48 c0 |H | EXTW.L D0 00023cac d0 81 | | ADD.L D1,D0 00023cae 22 11 |" | MOVE.L (A1),D1 00023cb0 55 81 |U | SUBQ.L #0x2,D1 00023cb2 b2 83 | | CMP.L D3,D1 00023cb4 63 02 |c | BLS 0x23cb8 00023cb6 4e 4f |NO | TRAP #15 00023cb8 e3 81 | | ASL.L #0x1,D1 00023cba 20 4a | J | MOVEA.L A2,A0 00023cbc 34 30 18 2a |40 * | MOVE.W (A0+D1.L+#0x2a),D2 00023cc0 48 c2 |H | EXTW.L D2 00023cc2 d4 80 | | ADD.L D0,D2 00023cc4 2d 42 00 08 |-B | MOVE.L D2,(A6+0x8) 00023cc8 4c df 07 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2 00023ccc 4e 5e |N^ | UNLK A6 00023cce 4e 75 |Nu | RTS 00023cd0 ; -------------------------------------------------------------------------------------- 00023cd0 ; OMSI PASCAL Function 00023cd0 ; <LVAR 0x008 4(w)> 00023cd0 ; -------------------------------------------------------------------------------------- 00023cd0 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00023cd4 bf d5 | | CMPA.L (A5),A7 00023cd6 62 06 |b | BHI 0x23cde 00023cd8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023cdc 4e 76 |Nv | TRAPV 00023cde de fc 00 1e | | ADDA.W #0x1e,A7 00023ce2 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 00023ce6 41 f9 00 02 50 a8 |A P | LEA.L 0x250a8,A0 00023cec 43 f9 00 02 50 ac |C P | LEA.L 0x250ac,A1 00023cf2 45 fa e7 b4 |E | LEA.L 0x224a8,A2 00023cf6 55 4f |UO | SUBQ.L #0x2,A7 00023cf8 20 10 | | MOVE.L (A0),D0 00023cfa d0 91 | | ADD.L (A1),D0 00023cfc 59 80 |Y | SUBQ.L #0x4,D0 00023cfe 2f 00 |/ | MOVE.L D0,-(A7) 00023d00 4e 92 |N | JSR (A2) 00023d02 58 4f |XO | ADDQ.L #0x4,A7 00023d04 30 1f |0 | MOVE.W (A7)+,D0 00023d06 48 c0 |H | EXTW.L D0 00023d08 e1 80 | | ASL.L #0x8,D0 00023d0a e1 80 | | ASL.L #0x8,D0 00023d0c 55 4f |UO | SUBQ.L #0x2,A7 00023d0e 22 10 |" | MOVE.L (A0),D1 00023d10 d2 91 | | ADD.L (A1),D1 00023d12 57 81 |W | SUBQ.L #0x3,D1 00023d14 2f 01 |/ | MOVE.L D1,-(A7) 00023d16 4e 92 |N | JSR (A2) 00023d18 58 4f |XO | ADDQ.L #0x4,A7 00023d1a 32 1f |2 | MOVE.W (A7)+,D1 00023d1c e1 41 | A | ASL.W #0x8,D1 00023d1e 48 c1 |H | EXTW.L D1 00023d20 d2 80 | | ADD.L D0,D1 00023d22 55 4f |UO | SUBQ.L #0x2,A7 00023d24 20 10 | | MOVE.L (A0),D0 00023d26 d0 91 | | ADD.L (A1),D0 00023d28 55 80 |U | SUBQ.L #0x2,D0 00023d2a 2f 00 |/ | MOVE.L D0,-(A7) 00023d2c 4e 92 |N | JSR (A2) 00023d2e 58 4f |XO | ADDQ.L #0x4,A7 00023d30 30 1f |0 | MOVE.W (A7)+,D0 00023d32 48 c0 |H | EXTW.L D0 00023d34 d0 81 | | ADD.L D1,D0 00023d36 2d 40 00 08 |-@ | MOVE.L D0,(A6+0x8) 00023d3a 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00023d3e 4e 5e |N^ | UNLK A6 00023d40 4e 75 |Nu | RTS 00023d42 ; -------------------------------------------------------------------------------------- 00023d42 ; OMSI PASCAL Function 00023d42 ; <LVAR 0x008 2(r)> 00023d42 ; <LVAR -0x006 @ 4(r)> 00023d42 ; <LVAR -0x00a @> 00023d42 ; <LVAR -0x00e @ 4(r)> 00023d42 ; -------------------------------------------------------------------------------------- 00023d42 4e 56 ff 68 |NV h | LINK.W A6,#0xff68 00023d46 bf d5 | | CMPA.L (A5),A7 00023d48 62 06 |b | BHI 0x23d50 00023d4a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023d4e 4e 76 |Nv | TRAPV 00023d50 de fc 00 8a | | ADDA.W #0x8a,A7 00023d54 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00023d58 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00023d5e 47 ee ff fa |G | LEA.L (A6-0x6),A3 00023d62 74 01 |t | MOVEQ.L #0x01,D2 00023d64 7a 50 |zP | MOVEQ.L #0x50,D5 00023d66 7c 10 || | MOVEQ.L #0x10,D6 00023d68 7e 14 |~ | MOVEQ.L #0x14,D7 00023d6a 3f 2e 00 08 |?. | MOVE.W (A6+0x8),-(A7) 00023d6e 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00023d72 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00023d76 4e ba d6 10 |N | JSR 0x21388 00023d7a 5c 4f |\O | ADDQ.L #0x6,A7 00023d7c 2e 94 |. | MOVE.L (A4),(A7) 00023d7e 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00023d82 48 c0 |H | EXTW.L D0 00023d84 2f 00 |/ | MOVE.L D0,-(A7) 00023d86 42 27 |B' | CLR.B -(A7) 00023d88 4e ba e4 f0 |N | JSR 0x2227a 00023d8c de fc 00 0a | | ADDA.W #0xa,A7 00023d90 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00023d94 b0 45 | E | CMP.W D5,D0 00023d96 6c 08 |l | BGE 0x23da0 00023d98 48 53 |HS | PEA.L (A3) 00023d9a 4e ba eb f4 |N | JSR 0x22990 00023d9e 60 06 |` | BRA 0x23da6 00023da0 48 53 |HS | PEA.L (A3) 00023da2 4e ba ec ae |N | JSR 0x22a52 00023da6 58 4f |XO | ADDQ.L #0x4,A7 00023da8 2f 3a cc d2 |/: | MOVE.L 0x20a7c,-(A7) 00023dac 2f 3a cc ca |/: | MOVE.L 0x20a78,-(A7) 00023db0 2f 3a cc c2 |/: | MOVE.L 0x20a74,-(A7) 00023db4 2f 3a cc ba |/: | MOVE.L 0x20a70,-(A7) 00023db8 2f 3a cc d2 |/: | MOVE.L 0x20a8c,-(A7) 00023dbc 2f 3a cc ca |/: | MOVE.L 0x20a88,-(A7) 00023dc0 2f 3a cc c2 |/: | MOVE.L 0x20a84,-(A7) 00023dc4 2f 3a cc ba |/: | MOVE.L 0x20a80,-(A7) 00023dc8 51 4f |QO | SUBQ.L #0x8,A7 00023dca 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 00023dce 48 78 00 08 |Hx | PEA.L 0x8 00023dd2 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String 00023dd8 58 4f |XO | ADDQ.L #0x4,A7 00023dda 48 6f 00 1c |Ho | PEA.L (A7+0x1c) 00023dde 3f 02 |? | MOVE.W D2,-(A7) 00023de0 3f 06 |? | MOVE.W D6,-(A7) 00023de2 4e 92 |N | JSR (A2) 00023de4 4e ba fe ea |N | JSR 0x23cd0 00023de8 48 78 00 06 |Hx | PEA.L 0x6 00023dec 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00023df2 58 4f |XO | ADDQ.L #0x4,A7 00023df4 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00023df8 3f 02 |? | MOVE.W D2,-(A7) 00023dfa 3f 06 |? | MOVE.W D6,-(A7) 00023dfc 4e 92 |N | JSR (A2) 00023dfe 4e ba fe 56 |N V | JSR 0x23c56 00023e02 48 78 00 06 |Hx | PEA.L 0x6 00023e06 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00023e0c 50 4f |PO | ADDQ.L #0x8,A7 00023e0e 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 00023e14 de c7 | | ADDA.W D7,A7 00023e16 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00023e1c de fc 00 24 | $ | ADDA.W #0x24,A7 00023e20 42 34 00 05 |B4 | CLR.B (A4+D0.W+#0x5) 00023e24 59 4f |YO | SUBQ.L #0x4,A7 00023e26 4e ba fe 2e |N . | JSR 0x23c56 00023e2a 59 4f |YO | SUBQ.L #0x4,A7 00023e2c 4e ba fe a2 |N | JSR 0x23cd0 00023e30 22 2f 00 04 |"/ | MOVE.L (A7+0x4),D1 00023e34 b2 9f | | CMP.L (A7)+,D1 00023e36 6c 5e |l^ | BGE 0x23e96 00023e38 41 fa cc 6e |A n | LEA.L 0x20aa8,A0 00023e3c 72 05 |r | MOVEQ.L #0x05,D1 00023e3e 2f 20 |/ | MOVE.L -(A0),-(A7) 00023e40 51 c9 ff fc |Q | DBF D1,0x23e3e 00023e44 59 4f |YO | SUBQ.L #0x4,A7 00023e46 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023e4a 3f 02 |? | MOVE.W D2,-(A7) 00023e4c 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00023e50 4e 92 |N | JSR (A2) 00023e52 50 4f |PO | ADDQ.L #0x8,A7 00023e54 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023e5a 59 4f |YO | SUBQ.L #0x4,A7 00023e5c 20 4f | O | MOVEA.L A7,A0 00023e5e 43 fa cb f0 |C | LEA.L 0x20a50,A1 00023e62 72 1e |r | MOVEQ.L #0x1e,D1 00023e64 10 d9 | | MOVE.B (A1)+,(A0)+ 00023e66 51 c9 ff fc |Q | DBF D1,0x23e64 00023e6a 5d 4f |]O | SUBQ.L #0x6,A7 00023e6c 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00023e70 3f 02 |? | MOVE.W D2,-(A7) 00023e72 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7) 00023e76 4e 92 |N | JSR (A2) 00023e78 5c 4f |\O | ADDQ.L #0x6,A7 00023e7a 42 17 |B | CLR.B (A7) 00023e7c 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00023e82 5c 4f |\O | ADDQ.L #0x6,A7 00023e84 12 1f | | MOVE.B (A7)+,D1 00023e86 48 81 |H | EXTB.W D1 00023e88 43 82 |C | CHK.W D2,D1 00023e8a de fc 00 20 | | ADDA.W #0x20,A7 00023e8e 19 81 00 05 | | MOVE.B D1,(A4+D0.W+#0x5) 00023e92 60 00 00 c0 |` | BRA 0x23f54 00023e96 59 4f |YO | SUBQ.L #0x4,A7 00023e98 4e ba fd bc |N | JSR 0x23c56 00023e9c 59 4f |YO | SUBQ.L #0x4,A7 00023e9e 4e ba fe 30 |N 0 | JSR 0x23cd0 00023ea2 22 2f 00 04 |"/ | MOVE.L (A7+0x4),D1 00023ea6 b2 9f | | CMP.L (A7)+,D1 00023ea8 6f 2c |o, | BLE 0x23ed6 00023eaa 41 fa cc 12 |A | LEA.L 0x20abe,A0 00023eae 72 0a |r | MOVEQ.L #0x0a,D1 00023eb0 3f 20 |? | MOVE.W -(A0),-(A7) 00023eb2 51 c9 ff fc |Q | DBF D1,0x23eb0 00023eb6 59 4f |YO | SUBQ.L #0x4,A7 00023eb8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023ebc 3f 02 |? | MOVE.W D2,-(A7) 00023ebe 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 00023ec2 4e 92 |N | JSR (A2) 00023ec4 50 4f |PO | ADDQ.L #0x8,A7 00023ec6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023ecc de fc 00 1a | | ADDA.W #0x1a,A7 00023ed0 19 82 00 05 | | MOVE.B D2,(A4+D0.W+#0x5) 00023ed4 60 7c |`| | BRA 0x23f52 00023ed6 4a 93 |J | TST.L (A3) 00023ed8 6f 4e |oN | BLE 0x23f28 00023eda 41 fa cb f8 |A | LEA.L 0x20ad4,A0 00023ede 72 0a |r | MOVEQ.L #0x0a,D1 00023ee0 3f 20 |? | MOVE.W -(A0),-(A7) 00023ee2 51 c9 ff fc |Q | DBF D1,0x23ee0 00023ee6 59 4f |YO | SUBQ.L #0x4,A7 00023ee8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023eec 3f 02 |? | MOVE.W D2,-(A7) 00023eee 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 00023ef2 4e 92 |N | JSR (A2) 00023ef4 50 4f |PO | ADDQ.L #0x8,A7 00023ef6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023efc de fc 00 1a | | ADDA.W #0x1a,A7 00023f00 41 fa cb 4e |A N | LEA.L 0x20a50,A0 00023f04 72 0f |r | MOVEQ.L #0x0f,D1 00023f06 2f 20 |/ | MOVE.L -(A0),-(A7) 00023f08 51 c9 ff fc |Q | DBF D1,0x23f06 00023f0c 59 4f |YO | SUBQ.L #0x4,A7 00023f0e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023f12 3f 02 |? | MOVE.W D2,-(A7) 00023f14 3f 3c 00 40 |?< @ | MOVE.W #0x40,-(A7) 00023f18 4e 92 |N | JSR (A2) 00023f1a 50 4f |PO | ADDQ.L #0x8,A7 00023f1c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023f22 de fc 00 44 | D | ADDA.W #0x44,A7 00023f26 60 a8 |` | BRA 0x23ed0 00023f28 9e c7 | | SUBA.W D7,A7 00023f2a 20 4f | O | MOVEA.L A7,A0 00023f2c 43 fa cb a6 |C | LEA.L 0x20ad4,A1 00023f30 72 12 |r | MOVEQ.L #0x12,D1 00023f32 10 d9 | | MOVE.B (A1)+,(A0)+ 00023f34 51 c9 ff fc |Q | DBF D1,0x23f32 00023f38 59 4f |YO | SUBQ.L #0x4,A7 00023f3a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023f3e 3f 02 |? | MOVE.W D2,-(A7) 00023f40 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00023f44 4e 92 |N | JSR (A2) 00023f46 50 4f |PO | ADDQ.L #0x8,A7 00023f48 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023f4e de fc 00 18 | | ADDA.W #0x18,A7 00023f52 58 4f |XO | ADDQ.L #0x4,A7 00023f54 58 4f |XO | ADDQ.L #0x4,A7 00023f56 4a 34 00 05 |J4 | TST.B (A4+D0.W+#0x5) 00023f5a 67 2c |g, | BEQ 0x23f88 00023f5c 19 42 00 04 | B | MOVE.B D2,(A4+0x4) 00023f60 5a ac 01 06 |Z | ADDQ.L #0x5,(A4+0x106) 00023f64 b0 45 | E | CMP.W D5,D0 00023f66 6c 1c |l | BGE 0x23f84 00023f68 28 13 |( | MOVE.L (A3),D4 00023f6a 76 0c |v | MOVEQ.L #0x0c,D3 00023f6c 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00023f72 26 3c 00 00 03 e8 |&< | MOVE.L #0x3e8,D3 00023f78 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00023f7e d9 ac 01 06 | | ADD.L D4,(A4+0x106) 00023f82 60 04 |` | BRA 0x23f88 00023f84 5c ac 01 06 |\ | ADDQ.L #0x6,(A4+0x106) 00023f88 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 00023f8c 4e 5e |N^ | UNLK A6 00023f8e 4e 75 |Nu | RTS 00023f90 ; -------------------------------------------------------------------------------------- 00023f90 ; OMSI PASCAL Function 00023f90 ; <LVAR 0x008 2(r)> 00023f90 ; <LVAR -0x006 @> 00023f90 ; <LVAR -0x00a @ 4(r)> 00023f90 ; -------------------------------------------------------------------------------------- 00023f90 4e 56 ff c4 |NV | LINK.W A6,#0xffc4 00023f94 bf d5 | | CMPA.L (A5),A7 00023f96 62 06 |b | BHI 0x23f9e 00023f98 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023f9c 4e 76 |Nv | TRAPV 00023f9e de fc 00 32 | 2 | ADDA.W #0x32,A7 00023fa2 48 e7 e0 00 |H | MOVEM.L D2+D1+D0,-(A7) 00023fa6 74 10 |t | MOVEQ.L #0x10,D2 00023fa8 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00023fac 4a 34 00 05 |J4 | TST.B (A4+D0.W+#0x5) 00023fb0 67 70 |gp | BEQ 0x24022 00023fb2 3f 00 |? | MOVE.W D0,-(A7) 00023fb4 48 6e ff fa |Hn | PEA.L (A6-0x6) 00023fb8 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00023fbc 4e ba d3 ca |N | JSR 0x21388 00023fc0 5c 4f |\O | ADDQ.L #0x6,A7 00023fc2 2e ba cb 30 |. 0 | MOVE.L 0x20af4,(A7) 00023fc6 2f 3a cb 28 |/: ( | MOVE.L 0x20af0,-(A7) 00023fca 2f 3a cb 20 |/: | MOVE.L 0x20aec,-(A7) 00023fce 2f 3a cb 18 |/: | MOVE.L 0x20ae8,-(A7) 00023fd2 51 4f |QO | SUBQ.L #0x8,A7 00023fd4 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023fd8 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023fdc 3f 02 |? | MOVE.W D2,-(A7) 00023fde 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023fe4 58 4f |XO | ADDQ.L #0x4,A7 00023fe6 2e ae ff f6 |. | MOVE.L (A6-0xa),(A7) 00023fea 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023ff0 50 4f |PO | ADDQ.L #0x8,A7 00023ff2 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023ff8 de c2 | | ADDA.W D2,A7 00023ffa 2e 94 |. | MOVE.L (A4),(A7) 00023ffc 32 00 |2 | MOVE.W D0,D1 00023ffe 48 c1 |H | EXTW.L D1 00024000 2f 01 |/ | MOVE.L D1,-(A7) 00024002 42 27 |B' | CLR.B -(A7) 00024004 4e ba e2 74 |N t | JSR 0x2227a 00024008 de fc 00 0a | | ADDA.W #0xa,A7 0002400c 42 39 00 02 50 96 |B9 P | CLR.B 0x25096 00024012 0c 40 00 50 | @ P | CMPI.W #0x0050,D0 00024016 6c 06 |l | BGE 0x2401e 00024018 4e ba ed e0 |N | JSR 0x22dfa 0002401c 60 04 |` | BRA 0x24022 0002401e 4e ba f0 0e |N | JSR 0x2302e 00024022 4c df 00 07 |L | MOVEM.L (A7)+,D0+D1+D2 00024026 4e 5e |N^ | UNLK A6 00024028 4e 75 |Nu | RTS 0002402a ; -------------------------------------------------------------------------------------- 0002402a ; OMSI PASCAL Function 0002402a ; -------------------------------------------------------------------------------------- 0002402a 4e 56 ff ee |NV | LINK.W A6,#0xffee 0002402e bf d5 | | CMPA.L (A5),A7 00024030 62 06 |b | BHI 0x24038 00024032 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024036 4e 76 |Nv | TRAPV 00024038 de fc 00 12 | | ADDA.W #0x12,A7 0002403c 3f 3a ca ba |?: | MOVE.W 0x20af8,-(A7) 00024040 59 4f |YO | SUBQ.L #0x4,A7 00024042 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024046 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002404a 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 0002404e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024054 50 4f |PO | ADDQ.L #0x8,A7 00024056 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002405c 5c 4f |\O | ADDQ.L #0x6,A7 0002405e 4e 5e |N^ | UNLK A6 00024060 4e 75 |Nu | RTS 00024062 ; -------------------------------------------------------------------------------------- 00024062 ; OMSI PASCAL Function 00024062 ; <LVAR -0x00a 4(rw)> 00024062 ; <LVAR -0x0bb 1(w)> 00024062 ; <LVAR -0x10c 1(rw)> 00024062 ; <LVAR -0x110 @ 4(w)> 00024062 ; -------------------------------------------------------------------------------------- 00024062 4e 56 fe 64 |NV d | LINK.W A6,#0xfe64 00024066 bf d5 | | CMPA.L (A5),A7 00024068 62 06 |b | BHI 0x24070 0002406a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002406e 4e 76 |Nv | TRAPV 00024070 de fc 00 8c | | ADDA.W #0x8c,A7 00024074 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00024078 45 ee fe f0 |E | LEA.L (A6-0x110),A2 0002407c 47 f9 00 02 90 be |G | LEA.L 0x290be,A3 00024082 72 01 |r | MOVEQ.L #0x01,D1 00024084 34 3c 00 ff |4< | MOVE.W #0xff,D2 00024088 76 15 |v | MOVEQ.L #0x15,D3 0002408a 78 21 |x! | MOVEQ.L #0x21,D4 0002408c 7a 19 |z | MOVEQ.L #0x19,D5 0002408e 9e fc 00 34 | 4 | SUBA.W #0x34,A7 00024092 20 4f | O | MOVEA.L A7,A0 00024094 43 fa c9 46 |C F | LEA.L 0x209dc,A1 00024098 70 32 |p2 | MOVEQ.L #0x32,D0 0002409a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002409c 51 c8 ff fc |Q | DBF D0,0x2409a 000240a0 59 4f |YO | SUBQ.L #0x4,A7 000240a2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000240a6 3f 01 |? | MOVE.W D1,-(A7) 000240a8 3f 3c 00 33 |?< 3 | MOVE.W #0x33,-(A7) 000240ac 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000240b2 50 4f |PO | ADDQ.L #0x8,A7 000240b4 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000240ba de fc 00 38 | 8 | ADDA.W #0x38,A7 000240be 42 2e fe f4 |B. | CLR.B (A6-0x10c) 000240c2 2d 41 ff f6 |-A | MOVE.L D1,(A6-0xa) 000240c6 24 b9 00 02 90 b4 |$ | MOVE.L 0x290b4,(A2) 000240cc 3f 04 |? | MOVE.W D4,-(A7) 000240ce 28 4a |(J | MOVEA.L A2,A4 000240d0 4e ba fc 70 |N p | JSR 0x23d42 000240d4 3e 85 |> | MOVE.W D5,(A7) 000240d6 28 4a |(J | MOVEA.L A2,A4 000240d8 4e ba fc 68 |N h | JSR 0x23d42 000240dc 3e bc 00 17 |> | MOVE.W #0x17,(A7) 000240e0 28 4a |(J | MOVEA.L A2,A4 000240e2 4e ba fc 5e |N ^ | JSR 0x23d42 000240e6 3e 83 |> | MOVE.W D3,(A7) 000240e8 28 4a |(J | MOVEA.L A2,A4 000240ea 4e ba fc 56 |N V | JSR 0x23d42 000240ee 54 4f |TO | ADDQ.L #0x2,A7 000240f0 42 79 00 02 90 c0 |By | CLR.W 0x290c0 000240f6 4a 53 |JS | TST.W (A3) 000240f8 6f 00 00 94 |o | BLE 0x2418e 000240fc 55 4f |UO | SUBQ.L #0x2,A7 000240fe 48 78 01 05 |Hx | PEA.L 0x105 00024102 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 00024108 58 4f |XO | ADDQ.L #0x4,A7 0002410a 30 1f |0 | MOVE.W (A7)+,D0 0002410c 41 82 |A | CHK.W D2,D0 0002410e 3e 00 |> | MOVE.W D0,D7 00024110 be 79 00 02 90 bc | y | CMP.W 0x290bc,D7 00024116 6d 3a |m: | BLT 0x24152 00024118 be 53 | S | CMP.W (A3),D7 0002411a 6c 36 |l6 | BGE 0x24152 0002411c 33 d3 00 02 90 c0 |3 | MOVE.W (A3),0x290c0 00024122 1d 41 fe f4 | A | MOVE.B D1,(A6-0x10c) 00024126 41 fa ca 08 |A | LEA.L 0x20b30,A0 0002412a 70 1a |p | MOVEQ.L #0x1a,D0 0002412c 3f 20 |? | MOVE.W -(A0),-(A7) 0002412e 51 c8 ff fc |Q | DBF D0,0x2412c 00024132 59 4f |YO | SUBQ.L #0x4,A7 00024134 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024138 3f 01 |? | MOVE.W D1,-(A7) 0002413a 3f 3c 00 36 |?< 6 | MOVE.W #0x36,-(A7) 0002413e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024144 50 4f |PO | ADDQ.L #0x8,A7 00024146 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002414c de fc 00 3a | : | ADDA.W #0x3a,A7 00024150 60 3c |`< | BRA 0x2418e 00024152 be 79 00 02 90 bc | y | CMP.W 0x290bc,D7 00024158 6c 34 |l4 | BGE 0x2418e 0002415a 59 4f |YO | SUBQ.L #0x4,A7 0002415c 1e ba c9 d2 | | MOVE.B 0x20b30,(A7) 00024160 1f 7a c9 cf 00 01 | z | MOVE.B 0x20b31,(A7+0x1) 00024166 1f 7a c9 ca 00 02 | z | MOVE.B 0x20b32,(A7+0x2) 0002416c 59 4f |YO | SUBQ.L #0x4,A7 0002416e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024172 3f 01 |? | MOVE.W D1,-(A7) 00024174 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00024178 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002417e 50 4f |PO | ADDQ.L #0x8,A7 00024180 4f 82 |O | CHK.W D2,D7 00024182 3f 07 |? | MOVE.W D7,-(A7) 00024184 3f 13 |? | MOVE.W (A3),-(A7) 00024186 4e ba fe a2 |N | JSR 0x2402a 0002418a de fc 00 0c | | ADDA.W #0xc,A7 0002418e 55 4f |UO | SUBQ.L #0x2,A7 00024190 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 00024196 4a 1f |J | TST.B (A7)+ 00024198 66 0e |f | BNE 0x241a8 0002419a 55 4f |UO | SUBQ.L #0x2,A7 0002419c 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 000241a2 4a 1f |J | TST.B (A7)+ 000241a4 67 00 00 e4 |g | BEQ 0x2428a 000241a8 24 b9 00 02 90 b8 |$ | MOVE.L 0x290b8,(A2) 000241ae 3f 3c 00 50 |?< P | MOVE.W #0x50,-(A7) 000241b2 28 4a |(J | MOVEA.L A2,A4 000241b4 4e ba fb 8c |N | JSR 0x23d42 000241b8 3e bc 00 51 |> Q | MOVE.W #0x51,(A7) 000241bc 28 4a |(J | MOVEA.L A2,A4 000241be 4e ba fb 82 |N | JSR 0x23d42 000241c2 3e bc 00 52 |> R | MOVE.W #0x52,(A7) 000241c6 28 4a |(J | MOVEA.L A2,A4 000241c8 4e ba fb 78 |N x | JSR 0x23d42 000241cc 3e bc 00 53 |> S | MOVE.W #0x53,(A7) 000241d0 28 4a |(J | MOVEA.L A2,A4 000241d2 4e ba fb 6e |N n | JSR 0x23d42 000241d6 54 4f |TO | ADDQ.L #0x2,A7 000241d8 42 79 00 02 90 c2 |By | CLR.W 0x290c2 000241de 59 4f |YO | SUBQ.L #0x4,A7 000241e0 4e b9 00 02 4d b6 |N M | JSR 0x24db6 000241e6 2c 1f |, | MOVE.L (A7)+,D6 000241e8 67 00 00 a0 |g | BEQ 0x2428a 000241ec 4a 53 |JS | TST.W (A3) 000241ee 6f 00 00 9a |o | BLE 0x2428a 000241f2 55 4f |UO | SUBQ.L #0x2,A7 000241f4 2f 06 |/ | MOVE.L D6,-(A7) 000241f6 58 97 |X | ADDQ.L #0x4,(A7) 000241f8 4e ba e2 ae |N | JSR 0x224a8 000241fc 58 4f |XO | ADDQ.L #0x4,A7 000241fe 30 1f |0 | MOVE.W (A7)+,D0 00024200 41 82 |A | CHK.W D2,D0 00024202 3e 00 |> | MOVE.W D0,D7 00024204 be 79 00 02 90 bc | y | CMP.W 0x290bc,D7 0002420a 6d 44 |mD | BLT 0x24250 0002420c be 53 | S | CMP.W (A3),D7 0002420e 6c 40 |l@ | BGE 0x24250 00024210 33 d3 00 02 90 c2 |3 | MOVE.W (A3),0x290c2 00024216 1d 41 fe f4 | A | MOVE.B D1,(A6-0x10c) 0002421a 1d 41 ff 45 | A E | MOVE.B D1,(A6-0xbb) 0002421e 9e fc 00 36 | 6 | SUBA.W #0x36,A7 00024222 20 4f | O | MOVEA.L A7,A0 00024224 43 fa c9 0e |C | LEA.L 0x20b34,A1 00024228 70 34 |p4 | MOVEQ.L #0x34,D0 0002422a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002422c 51 c8 ff fc |Q | DBF D0,0x2422a 00024230 59 4f |YO | SUBQ.L #0x4,A7 00024232 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024236 3f 01 |? | MOVE.W D1,-(A7) 00024238 3f 3c 00 35 |?< 5 | MOVE.W #0x35,-(A7) 0002423c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024242 50 4f |PO | ADDQ.L #0x8,A7 00024244 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002424a de fc 00 3a | : | ADDA.W #0x3a,A7 0002424e 60 3a |`: | BRA 0x2428a 00024250 be 79 00 02 90 bc | y | CMP.W 0x290bc,D7 00024256 6c 32 |l2 | BGE 0x2428a 00024258 5d 4f |]O | SUBQ.L #0x6,A7 0002425a 20 4f | O | MOVEA.L A7,A0 0002425c 43 fa c9 0c |C | LEA.L 0x20b6a,A1 00024260 70 04 |p | MOVEQ.L #0x04,D0 00024262 10 d9 | | MOVE.B (A1)+,(A0)+ 00024264 51 c8 ff fc |Q | DBF D0,0x24262 00024268 59 4f |YO | SUBQ.L #0x4,A7 0002426a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002426e 3f 01 |? | MOVE.W D1,-(A7) 00024270 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00024274 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002427a 50 4f |PO | ADDQ.L #0x8,A7 0002427c 4f 82 |O | CHK.W D2,D7 0002427e 3f 07 |? | MOVE.W D7,-(A7) 00024280 3f 13 |? | MOVE.W (A3),-(A7) 00024282 4e ba fd a6 |N | JSR 0x2402a 00024286 de fc 00 0e | | ADDA.W #0xe,A7 0002428a 4a 2e fe f4 |J. | TST.B (A6-0x10c) 0002428e 66 2e |f. | BNE 0x242be 00024290 41 fa c8 f6 |A | LEA.L 0x20b88,A0 00024294 70 05 |p | MOVEQ.L #0x05,D0 00024296 2f 20 |/ | MOVE.L -(A0),-(A7) 00024298 51 c8 ff fc |Q | DBF D0,0x24296 0002429c 59 4f |YO | SUBQ.L #0x4,A7 0002429e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000242a2 3f 01 |? | MOVE.W D1,-(A7) 000242a4 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 000242a8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000242ae 50 4f |PO | ADDQ.L #0x8,A7 000242b0 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000242b6 de fc 00 1c | | ADDA.W #0x1c,A7 000242ba 60 00 01 68 |` h | BRA 0x24424 000242be 9e fc 00 26 | & | SUBA.W #0x26,A7 000242c2 20 4f | O | MOVEA.L A7,A0 000242c4 43 fa c8 c2 |C | LEA.L 0x20b88,A1 000242c8 70 24 |p$ | MOVEQ.L #0x24,D0 000242ca 10 d9 | | MOVE.B (A1)+,(A0)+ 000242cc 51 c8 ff fc |Q | DBF D0,0x242ca 000242d0 9e fc 00 16 | | SUBA.W #0x16,A7 000242d4 20 4f | O | MOVEA.L A7,A0 000242d6 43 fa c8 d6 |C | LEA.L 0x20bae,A1 000242da 70 14 |p | MOVEQ.L #0x14,D0 000242dc 10 d9 | | MOVE.B (A1)+,(A0)+ 000242de 51 c8 ff fc |Q | DBF D0,0x242dc 000242e2 51 4f |QO | SUBQ.L #0x8,A7 000242e4 48 6f 00 1e |Ho | PEA.L (A7+0x1e) 000242e8 3f 01 |? | MOVE.W D1,-(A7) 000242ea 3f 3c 00 25 |?< % | MOVE.W #0x25,-(A7) 000242ee 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000242f4 2e ae ff f6 |. | MOVE.L (A6-0xa),(A7) 000242f8 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000242fe 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00024302 3f 01 |? | MOVE.W D1,-(A7) 00024304 3f 03 |? | MOVE.W D3,-(A7) 00024306 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002430c 50 4f |PO | ADDQ.L #0x8,A7 0002430e 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00024314 de fc 00 0c | | ADDA.W #0xc,A7 00024318 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002431e de fc 00 3e | > | ADDA.W #0x3e,A7 00024322 42 17 |B | CLR.B (A7) 00024324 4e ba f2 94 |N | JSR 0x235ba 00024328 54 4f |TO | ADDQ.L #0x2,A7 0002432a 24 b9 00 02 90 b4 |$ | MOVE.L 0x290b4,(A2) 00024330 3f 04 |? | MOVE.W D4,-(A7) 00024332 28 4a |(J | MOVEA.L A2,A4 00024334 4e ba fc 5a |N Z | JSR 0x23f90 00024338 3e 85 |> | MOVE.W D5,(A7) 0002433a 28 4a |(J | MOVEA.L A2,A4 0002433c 4e ba fc 52 |N R | JSR 0x23f90 00024340 3e bc 00 17 |> | MOVE.W #0x17,(A7) 00024344 28 4a |(J | MOVEA.L A2,A4 00024346 4e ba fc 48 |N H | JSR 0x23f90 0002434a 3e 83 |> | MOVE.W D3,(A7) 0002434c 28 4a |(J | MOVEA.L A2,A4 0002434e 4e ba fc 40 |N @ | JSR 0x23f90 00024352 54 4f |TO | ADDQ.L #0x2,A7 00024354 4a 79 00 02 90 c0 |Jy | TST.W 0x290c0 0002435a 6f 4e |oN | BLE 0x243aa 0002435c 55 4f |UO | SUBQ.L #0x2,A7 0002435e 48 78 01 05 |Hx | PEA.L 0x105 00024362 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 00024368 58 4f |XO | ADDQ.L #0x4,A7 0002436a 30 1f |0 | MOVE.W (A7)+,D0 0002436c 41 82 |A | CHK.W D2,D0 0002436e 3e 00 |> | MOVE.W D0,D7 00024370 48 78 01 05 |Hx | PEA.L 0x105 00024374 3f 39 00 02 90 c0 |?9 | MOVE.W 0x290c0,-(A7) 0002437a 4e b9 00 01 05 98 |N | JSR WriteConfig(what: Word; where : Long) 00024380 5c 4f |\O | ADDQ.L #0x6,A7 00024382 48 78 01 08 |Hx | PEA.L 0x108 00024386 55 4f |UO | SUBQ.L #0x2,A7 00024388 48 78 01 08 |Hx | PEA.L 0x108 0002438c 4e b9 00 01 05 92 |N | JSR ReadConfig(where : Long) : Word 00024392 58 4f |XO | ADDQ.L #0x4,A7 00024394 df 57 | W | ADD.W D7,(A7) 00024396 30 17 |0 | MOVE.W (A7),D0 00024398 90 79 00 02 90 c0 | y | SUB.W 0x290c0,D0 0002439e c0 42 | B | AND.W D2,D0 000243a0 3e 80 |> | MOVE.W D0,(A7) 000243a2 4e b9 00 01 05 98 |N | JSR WriteConfig(what: Word; where : Long) 000243a8 5c 4f |\O | ADDQ.L #0x6,A7 000243aa 55 4f |UO | SUBQ.L #0x2,A7 000243ac 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 000243b2 4a 1f |J | TST.B (A7)+ 000243b4 66 0c |f | BNE 0x243c2 000243b6 55 4f |UO | SUBQ.L #0x2,A7 000243b8 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 000243be 4a 1f |J | TST.B (A7)+ 000243c0 67 30 |g0 | BEQ 0x243f2 000243c2 24 b9 00 02 90 b8 |$ | MOVE.L 0x290b8,(A2) 000243c8 3f 3c 00 51 |?< Q | MOVE.W #0x51,-(A7) 000243cc 28 4a |(J | MOVEA.L A2,A4 000243ce 4e ba fb c0 |N | JSR 0x23f90 000243d2 3e bc 00 52 |> R | MOVE.W #0x52,(A7) 000243d6 28 4a |(J | MOVEA.L A2,A4 000243d8 4e ba fb b6 |N | JSR 0x23f90 000243dc 3e bc 00 53 |> S | MOVE.W #0x53,(A7) 000243e0 28 4a |(J | MOVEA.L A2,A4 000243e2 4e ba fb ac |N | JSR 0x23f90 000243e6 3e bc 00 50 |> P | MOVE.W #0x50,(A7) 000243ea 28 4a |(J | MOVEA.L A2,A4 000243ec 4e ba fb a2 |N | JSR 0x23f90 000243f0 54 4f |TO | ADDQ.L #0x2,A7 000243f2 1f 01 | | MOVE.B D1,-(A7) 000243f4 4e ba f1 c4 |N | JSR 0x235ba 000243f8 54 4f |TO | ADDQ.L #0x2,A7 000243fa 41 fa c7 e6 |A | LEA.L 0x20be2,A0 000243fe 70 0e |p | MOVEQ.L #0x0e,D0 00024400 3f 20 |? | MOVE.W -(A0),-(A7) 00024402 51 c8 ff fc |Q | DBF D0,0x24400 00024406 59 4f |YO | SUBQ.L #0x4,A7 00024408 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002440c 3f 01 |? | MOVE.W D1,-(A7) 0002440e 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00024412 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024418 50 4f |PO | ADDQ.L #0x8,A7 0002441a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00024420 de fc 00 22 | " | ADDA.W #0x22,A7 00024424 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00024428 4e 5e |N^ | UNLK A6 0002442a 4e 75 |Nu | RTS 0002442c ; -------------------------------------------------------------------------------------- 0002442c ; OMSI PASCAL Function 0002442c ; -------------------------------------------------------------------------------------- 0002442c 4e 56 ff 94 |NV | LINK.W A6,#0xff94 00024430 bf d5 | | CMPA.L (A5),A7 00024432 62 06 |b | BHI 0x2443a 00024434 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024438 4e 76 |Nv | TRAPV 0002443a de fc 00 68 | h | ADDA.W #0x68,A7 0002443e 48 e7 f1 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D3+D2+D1+D0,-(A7) 00024442 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00024448 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3 0002444e 72 01 |r | MOVEQ.L #0x01,D1 00024450 74 33 |t3 | MOVEQ.L #0x33,D2 00024452 76 0c |v | MOVEQ.L #0x0c,D3 00024454 2f 3a c7 94 |/: | MOVE.L 0x20bea,-(A7) 00024458 2f 3a c7 8c |/: | MOVE.L 0x20be6,-(A7) 0002445c 2f 3a c7 84 |/: | MOVE.L 0x20be2,-(A7) 00024460 59 4f |YO | SUBQ.L #0x4,A7 00024462 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024466 3f 01 |? | MOVE.W D1,-(A7) 00024468 3f 03 |? | MOVE.W D3,-(A7) 0002446a 4e 92 |N | JSR (A2) 0002446c 50 4f |PO | ADDQ.L #0x8,A7 0002446e 4e 93 |N | JSR (A3) 00024470 54 4f |TO | ADDQ.L #0x2,A7 00024472 20 4f | O | MOVEA.L A7,A0 00024474 43 fa c7 78 |C x | LEA.L 0x20bee,A1 00024478 70 0c |p | MOVEQ.L #0x0c,D0 0002447a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002447c 51 c8 ff fc |Q | DBF D0,0x2447a 00024480 59 4f |YO | SUBQ.L #0x4,A7 00024482 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024486 3f 01 |? | MOVE.W D1,-(A7) 00024488 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 0002448c 4e 92 |N | JSR (A2) 0002448e 50 4f |PO | ADDQ.L #0x8,A7 00024490 4e 93 |N | JSR (A3) 00024492 9e fc 00 22 | " | SUBA.W #0x22,A7 00024496 20 4f | O | MOVEA.L A7,A0 00024498 43 fa c7 62 |C b | LEA.L 0x20bfc,A1 0002449c 70 32 |p2 | MOVEQ.L #0x32,D0 0002449e 10 d9 | | MOVE.B (A1)+,(A0)+ 000244a0 51 c8 ff fc |Q | DBF D0,0x2449e 000244a4 59 4f |YO | SUBQ.L #0x4,A7 000244a6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000244aa 3f 01 |? | MOVE.W D1,-(A7) 000244ac 3f 02 |? | MOVE.W D2,-(A7) 000244ae 4e 92 |N | JSR (A2) 000244b0 50 4f |PO | ADDQ.L #0x8,A7 000244b2 4e 93 |N | JSR (A3) 000244b4 58 4f |XO | ADDQ.L #0x4,A7 000244b6 20 4f | O | MOVEA.L A7,A0 000244b8 43 fa c7 76 |C v | LEA.L 0x20c30,A1 000244bc 70 32 |p2 | MOVEQ.L #0x32,D0 000244be 10 d9 | | MOVE.B (A1)+,(A0)+ 000244c0 51 c8 ff fc |Q | DBF D0,0x244be 000244c4 59 4f |YO | SUBQ.L #0x4,A7 000244c6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000244ca 3f 01 |? | MOVE.W D1,-(A7) 000244cc 3f 02 |? | MOVE.W D2,-(A7) 000244ce 4e 92 |N | JSR (A2) 000244d0 50 4f |PO | ADDQ.L #0x8,A7 000244d2 4e 93 |N | JSR (A3) 000244d4 58 4f |XO | ADDQ.L #0x4,A7 000244d6 20 4f | O | MOVEA.L A7,A0 000244d8 43 fa c7 8a |C | LEA.L 0x20c64,A1 000244dc 70 32 |p2 | MOVEQ.L #0x32,D0 000244de 10 d9 | | MOVE.B (A1)+,(A0)+ 000244e0 51 c8 ff fc |Q | DBF D0,0x244de 000244e4 59 4f |YO | SUBQ.L #0x4,A7 000244e6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000244ea 3f 01 |? | MOVE.W D1,-(A7) 000244ec 3f 02 |? | MOVE.W D2,-(A7) 000244ee 4e 92 |N | JSR (A2) 000244f0 50 4f |PO | ADDQ.L #0x8,A7 000244f2 4e 93 |N | JSR (A3) 000244f4 58 4f |XO | ADDQ.L #0x4,A7 000244f6 20 4f | O | MOVEA.L A7,A0 000244f8 43 fa c7 9e |C | LEA.L 0x20c98,A1 000244fc 70 32 |p2 | MOVEQ.L #0x32,D0 000244fe 10 d9 | | MOVE.B (A1)+,(A0)+ 00024500 51 c8 ff fc |Q | DBF D0,0x244fe 00024504 59 4f |YO | SUBQ.L #0x4,A7 00024506 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002450a 3f 01 |? | MOVE.W D1,-(A7) 0002450c 3f 02 |? | MOVE.W D2,-(A7) 0002450e 4e 92 |N | JSR (A2) 00024510 50 4f |PO | ADDQ.L #0x8,A7 00024512 4e 93 |N | JSR (A3) 00024514 de fc 00 28 | ( | ADDA.W #0x28,A7 00024518 20 4f | O | MOVEA.L A7,A0 0002451a 43 fa c7 b0 |C | LEA.L 0x20ccc,A1 0002451e 70 0e |p | MOVEQ.L #0x0e,D0 00024520 10 d9 | | MOVE.B (A1)+,(A0)+ 00024522 51 c8 ff fc |Q | DBF D0,0x24520 00024526 51 4f |QO | SUBQ.L #0x8,A7 00024528 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002452c 3f 01 |? | MOVE.W D1,-(A7) 0002452e 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00024532 4e 92 |N | JSR (A2) 00024534 50 4f |PO | ADDQ.L #0x8,A7 00024536 48 78 00 00 |Hx | PEA.L 0x0 0002453a 48 78 00 04 |Hx | PEA.L 0x4 0002453e 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 00024544 de c3 | | ADDA.W D3,A7 00024546 2e 1f |. | MOVE.L (A7)+,D7 00024548 de fc 00 10 | | ADDA.W #0x10,A7 0002454c 20 07 | | MOVE.L D7,D0 0002454e 0c 80 00 00 00 04 | | CMPI.L #0x00000004,D0 00024554 63 02 |c | BLS 0x24558 00024556 4e 4e |NN | TRAP #14 00024558 d0 40 | @ | ADD.W D0,D0 0002455a 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00024562 00 0a | | .CONST 0xa ; [0x0] -> 0x2456c 00024564 00 0c | | .CONST 0xc ; [0x1] -> 0x2456e 00024566 00 14 | | .CONST 0x14 ; [0x2] -> 0x24576 00024568 00 1c | | .CONST 0x1c ; [0x3] -> 0x2457e 0002456a 00 24 | $ | .CONST 0x24 ; [0x4] -> 0x24586 0002456c switch@0x2455a[0x0]: 0002456c 60 24 |`$ | BRA 0x24592 0002456e switch@0x2455a[0x1]: 0002456e 2f 3c 80 00 1f ff |/< | MOVE.L #0x80001fff,-(A7) 00024574 60 16 |` | BRA 0x2458c 00024576 switch@0x2455a[0x2]: 00024576 2f 3c 80 00 3f ff |/< ? | MOVE.L #0x80003fff,-(A7) 0002457c 60 0e |` | BRA 0x2458c 0002457e switch@0x2455a[0x3]: 0002457e 2f 3c 80 00 5f ff |/< _ | MOVE.L #0x80005fff,-(A7) 00024584 60 06 |` | BRA 0x2458c 00024586 switch@0x2455a[0x4]: 00024586 2f 3c 80 00 7d ff |/< } | MOVE.L #0x80007dff,-(A7) 0002458c 4e ba df f6 |N | JSR 0x22584 00024590 58 4f |XO | ADDQ.L #0x4,A7 00024592 4a 87 |J | TST.L D7 00024594 66 00 fe be |f | BNE 0x24454 00024598 4c df 0f 8f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D7+A0+A1+A2+A3 0002459c 4e 5e |N^ | UNLK A6 0002459e 4e 75 |Nu | RTS 000245a0 ; -------------------------------------------------------------------------------------- 000245a0 ; OMSI PASCAL Function 000245a0 ; <LVAR 0x00c 2(r)> 000245a0 ; <LVAR 0x008 4(r)> 000245a0 ; <LVAR -0x00e @ 4(r)> 000245a0 ; <LVAR -0x012 @ 4(r)> 000245a0 ; -------------------------------------------------------------------------------------- 000245a0 4e 56 ff 7e |NV ~ | LINK.W A6,#0xff7e ; Spelunked 000245a4 bf d5 | | CMPA.L (A5),A7 000245a6 62 06 |b | BHI 0x245ae 000245a8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000245ac 4e 76 |Nv | TRAPV 000245ae de fc 00 70 | p | ADDA.W #0x70,A7 000245b2 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000245b6 45 fa de f0 |E | LEA.L 0x224a8,A2 000245ba 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 000245c0 49 f8 00 02 |I | LEA.L 0x2,A4 000245c4 74 01 |t | MOVEQ.L #0x01,D2 000245c6 7a 14 |z | MOVEQ.L #0x14,D5 000245c8 3f 2e 00 0c |?. | MOVE.W (A6+0xc),-(A7) 000245cc 48 6e ff ee |Hn | PEA.L (A6-0x12) 000245d0 48 6e ff f2 |Hn | PEA.L (A6-0xe) 000245d4 4e ba cd b2 |N | JSR 0x21388 000245d8 de fc 00 0a | | ADDA.W #0xa,A7 000245dc 7e 00 |~ | MOVEQ.L #0x00,D7 000245de 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000245e2 7c 00 || | MOVEQ.L #0x00,D6 000245e4 bc 97 | | CMP.L (A7),D6 000245e6 6e 26 |n& | BGT 0x2460e 000245e8 55 4f |UO | SUBQ.L #0x2,A7 000245ea 2f 2e ff ee |/. | MOVE.L (A6-0x12),-(A7) 000245ee dd 97 | | ADD.L D6,(A7) 000245f0 4e 92 |N | JSR (A2) 000245f2 58 4f |XO | ADDQ.L #0x4,A7 000245f4 30 1f |0 | MOVE.W (A7)+,D0 000245f6 48 c0 |H | EXTW.L D0 000245f8 de 80 | | ADD.L D0,D7 000245fa 28 07 |( | MOVE.L D7,D4 000245fc 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 00024602 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00024608 2e 03 |. | MOVE.L D3,D7 0002460a 52 86 |R | ADDQ.L #0x1,D6 0002460c 68 d6 |h | BVC 0x245e4 0002460e 58 4f |XO | ADDQ.L #0x4,A7 00024610 06 87 00 00 01 00 | | ADDI.L #0x00000100,D7 00024616 20 2e ff ee | . | MOVE.L (A6-0x12),D0 0002461a d0 ae 00 08 | | ADD.L (A6+0x8),D0 0002461e 55 4f |UO | SUBQ.L #0x2,A7 00024620 2f 00 |/ | MOVE.L D0,-(A7) 00024622 5b 97 |[ | SUBQ.L #0x5,(A7) 00024624 4e 92 |N | JSR (A2) 00024626 58 4f |XO | ADDQ.L #0x4,A7 00024628 32 1f |2 | MOVE.W (A7)+,D1 0002462a 48 c1 |H | EXTW.L D1 0002462c 9e 81 | | SUB.L D1,D7 0002462e 28 07 |( | MOVE.L D7,D4 00024630 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 00024636 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 0002463c 2e 03 |. | MOVE.L D3,D7 0002463e 41 fa c6 ae |A | LEA.L 0x20cee,A0 00024642 72 08 |r | MOVEQ.L #0x08,D1 00024644 3f 20 |? | MOVE.W -(A0),-(A7) 00024646 51 c9 ff fc |Q | DBF D1,0x24644 0002464a 51 4f |QO | SUBQ.L #0x8,A7 0002464c 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 00024650 48 78 00 08 |Hx | PEA.L 0x8 00024654 4e b9 00 01 02 f8 |N | JSR LeftPad(a : String; b : Long) : String 0002465a 58 4f |XO | ADDQ.L #0x4,A7 0002465c 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00024660 3f 02 |? | MOVE.W D2,-(A7) 00024662 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00024666 4e 93 |N | JSR (A3) 00024668 55 4f |UO | SUBQ.L #0x2,A7 0002466a 2f 00 |/ | MOVE.L D0,-(A7) 0002466c 59 97 |Y | SUBQ.L #0x4,(A7) 0002466e 4e 92 |N | JSR (A2) 00024670 58 4f |XO | ADDQ.L #0x4,A7 00024672 32 1f |2 | MOVE.W (A7)+,D1 00024674 48 c1 |H | EXTW.L D1 00024676 2e 81 |. | MOVE.L D1,(A7) 00024678 48 54 |HT | PEA.L (A4) 0002467a 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00024680 55 4f |UO | SUBQ.L #0x2,A7 00024682 2f 00 |/ | MOVE.L D0,-(A7) 00024684 57 97 |W | SUBQ.L #0x3,(A7) 00024686 4e 92 |N | JSR (A2) 00024688 58 4f |XO | ADDQ.L #0x4,A7 0002468a 32 1f |2 | MOVE.W (A7)+,D1 0002468c 48 c1 |H | EXTW.L D1 0002468e 2e 81 |. | MOVE.L D1,(A7) 00024690 48 54 |HT | PEA.L (A4) 00024692 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00024698 55 4f |UO | SUBQ.L #0x2,A7 0002469a 2f 00 |/ | MOVE.L D0,-(A7) 0002469c 55 97 |U | SUBQ.L #0x2,(A7) 0002469e 4e 92 |N | JSR (A2) 000246a0 58 4f |XO | ADDQ.L #0x4,A7 000246a2 32 1f |2 | MOVE.W (A7)+,D1 000246a4 48 c1 |H | EXTW.L D1 000246a6 2e 81 |. | MOVE.L D1,(A7) 000246a8 48 54 |HT | PEA.L (A4) 000246aa 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 000246b0 50 4f |PO | ADDQ.L #0x8,A7 000246b2 4e b9 00 01 02 dc |N | JSR StringCat5(a, b, c, d, e : String) : String 000246b8 de c5 | | ADDA.W D5,A7 000246ba 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000246c0 5c 4f |\O | ADDQ.L #0x6,A7 000246c2 20 4f | O | MOVEA.L A7,A0 000246c4 43 fa c6 28 |C ( | LEA.L 0x20cee,A1 000246c8 72 0e |r | MOVEQ.L #0x0e,D1 000246ca 10 d9 | | MOVE.B (A1)+,(A0)+ 000246cc 51 c9 ff fc |Q | DBF D1,0x246ca 000246d0 51 4f |QO | SUBQ.L #0x8,A7 000246d2 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000246d6 3f 02 |? | MOVE.W D2,-(A7) 000246d8 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 000246dc 4e 93 |N | JSR (A3) 000246de 55 4f |UO | SUBQ.L #0x2,A7 000246e0 53 80 |S | SUBQ.L #0x1,D0 000246e2 2f 00 |/ | MOVE.L D0,-(A7) 000246e4 4e 92 |N | JSR (A2) 000246e6 58 4f |XO | ADDQ.L #0x4,A7 000246e8 30 1f |0 | MOVE.W (A7)+,D0 000246ea 48 c0 |H | EXTW.L D0 000246ec 2e 80 |. | MOVE.L D0,(A7) 000246ee 48 54 |HT | PEA.L (A4) 000246f0 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 000246f6 50 4f |PO | ADDQ.L #0x8,A7 000246f8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000246fe 50 4f |PO | ADDQ.L #0x8,A7 00024700 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00024706 de c5 | | ADDA.W D5,A7 00024708 0c 87 00 00 00 aa | | CMPI.L #0x000000aa,D7 0002470e 67 2e |g. | BEQ 0x2473e 00024710 9e fc 00 16 | | SUBA.W #0x16,A7 00024714 20 4f | O | MOVEA.L A7,A0 00024716 43 fa c5 e6 |C | LEA.L 0x20cfe,A1 0002471a 70 14 |p | MOVEQ.L #0x14,D0 0002471c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002471e 51 c8 ff fc |Q | DBF D0,0x2471c 00024722 59 4f |YO | SUBQ.L #0x4,A7 00024724 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024728 3f 02 |? | MOVE.W D2,-(A7) 0002472a 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 0002472e 4e 93 |N | JSR (A3) 00024730 50 4f |PO | ADDQ.L #0x8,A7 00024732 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00024738 de fc 00 1a | | ADDA.W #0x1a,A7 0002473c 60 28 |`( | BRA 0x24766 0002473e 2f 3a c5 e0 |/: | MOVE.L 0x20d20,-(A7) 00024742 2f 3a c5 d8 |/: | MOVE.L 0x20d1c,-(A7) 00024746 2f 3a c5 d0 |/: | MOVE.L 0x20d18,-(A7) 0002474a 2f 3a c5 c8 |/: | MOVE.L 0x20d14,-(A7) 0002474e 59 4f |YO | SUBQ.L #0x4,A7 00024750 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024754 3f 02 |? | MOVE.W D2,-(A7) 00024756 3f 3c 00 10 |?< | MOVE.W #0x10,-(A7) 0002475a 4e 93 |N | JSR (A3) 0002475c 50 4f |PO | ADDQ.L #0x8,A7 0002475e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00024764 de c5 | | ADDA.W D5,A7 00024766 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 0002476a 4e 5e |N^ | UNLK A6 0002476c 4e 75 |Nu | RTS 0002476e ; -------------------------------------------------------------------------------------- 0002476e ; OMSI PASCAL Function 0002476e ; <LVAR -0x004 @> 0002476e ; -------------------------------------------------------------------------------------- 0002476e 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 00024772 bf d5 | | CMPA.L (A5),A7 00024774 62 06 |b | BHI 0x2477c 00024776 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002477a 4e 76 |Nv | TRAPV 0002477c de fc 00 14 | | ADDA.W #0x14,A7 00024780 48 e7 00 c0 |H | MOVEM.L A1+A0,-(A7) 00024784 41 fa fe 1a |A | LEA.L 0x245a0,A0 00024788 43 f8 1f ff |C | LEA.L 0x1fff,A1 0002478c 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 00024790 48 51 |HQ | PEA.L (A1) 00024792 4e 90 |N | JSR (A0) 00024794 58 4f |XO | ADDQ.L #0x4,A7 00024796 3e bc 00 19 |> | MOVE.W #0x19,(A7) 0002479a 48 51 |HQ | PEA.L (A1) 0002479c 4e 90 |N | JSR (A0) 0002479e 58 4f |XO | ADDQ.L #0x4,A7 000247a0 3e bc 00 17 |> | MOVE.W #0x17,(A7) 000247a4 48 51 |HQ | PEA.L (A1) 000247a6 4e 90 |N | JSR (A0) 000247a8 58 4f |XO | ADDQ.L #0x4,A7 000247aa 3e bc 00 15 |> | MOVE.W #0x15,(A7) 000247ae 48 78 1d ff |Hx | PEA.L 0x1dff 000247b2 4e 90 |N | JSR (A0) 000247b4 58 4f |XO | ADDQ.L #0x4,A7 000247b6 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 000247bc 4a 1f |J | TST.B (A7)+ 000247be 66 0c |f | BNE 0x247cc 000247c0 55 4f |UO | SUBQ.L #0x2,A7 000247c2 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 000247c8 4a 1f |J | TST.B (A7)+ 000247ca 67 48 |gH | BEQ 0x24814 000247cc 48 78 00 00 |Hx | PEA.L 0x0 000247d0 48 6e ff fc |Hn | PEA.L (A6-0x4) 000247d4 4e b9 00 02 4e 0a |N N | JSR 0x24e0a 000247da 50 4f |PO | ADDQ.L #0x8,A7 000247dc 48 78 00 01 |Hx | PEA.L 0x1 000247e0 48 6e ff fc |Hn | PEA.L (A6-0x4) 000247e4 4e b9 00 02 4e 0a |N N | JSR 0x24e0a 000247ea 5c 4f |\O | ADDQ.L #0x6,A7 000247ec 3e bc 00 50 |> P | MOVE.W #0x50,(A7) 000247f0 48 51 |HQ | PEA.L (A1) 000247f2 4e 90 |N | JSR (A0) 000247f4 58 4f |XO | ADDQ.L #0x4,A7 000247f6 3e bc 00 51 |> Q | MOVE.W #0x51,(A7) 000247fa 48 51 |HQ | PEA.L (A1) 000247fc 4e 90 |N | JSR (A0) 000247fe 58 4f |XO | ADDQ.L #0x4,A7 00024800 3e bc 00 52 |> R | MOVE.W #0x52,(A7) 00024804 48 51 |HQ | PEA.L (A1) 00024806 4e 90 |N | JSR (A0) 00024808 58 4f |XO | ADDQ.L #0x4,A7 0002480a 3e bc 00 53 |> S | MOVE.W #0x53,(A7) 0002480e 48 51 |HQ | PEA.L (A1) 00024810 4e 90 |N | JSR (A0) 00024812 5c 4f |\O | ADDQ.L #0x6,A7 00024814 4c df 03 00 |L | MOVEM.L (A7)+,A0+A1 00024818 4e 5e |N^ | UNLK A6 0002481a 4e 75 |Nu | RTS 0002481c ; -------------------------------------------------------------------------------------- 0002481c ; OMSI PASCAL Function 0002481c ; -------------------------------------------------------------------------------------- 0002481c START: 0002481c 4f fa 00 08 |O | LEA.L MAIN,A7 00024820 4e f9 00 01 02 80 |N | JMP ?start_program 00024826 MAIN: 00024826 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 0002482c 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3 00024832 49 f9 00 02 90 b4 |I | LEA.L 0x290b4,A4 00024838 76 01 |v | MOVEQ.L #0x01,D3 0002483a 78 32 |x2 | MOVEQ.L #0x32,D4 0002483c 7a 0e |z | MOVEQ.L #0x0e,D5 0002483e 7c 2e ||. | MOVEQ.L #0x2e,D6 00024840 7e 0d |~ | MOVEQ.L #0x0d,D7 00024842 41 fa b8 ee |A | LEA.L 0x20132,A0 00024846 70 09 |p | MOVEQ.L #0x09,D0 00024848 2f 20 |/ | MOVE.L -(A0),-(A7) 0002484a 51 c8 ff fc |Q | DBF D0,0x24848 0002484e 59 4f |YO | SUBQ.L #0x4,A7 00024850 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024854 3f 03 |? | MOVE.W D3,-(A7) 00024856 3f 3c 00 28 |?< ( | MOVE.W #0x28,-(A7) 0002485a 4e 92 |N | JSR (A2) 0002485c 50 4f |PO | ADDQ.L #0x8,A7 0002485e 23 df 00 02 90 c4 |# | MOVE.L (A7)+,0x290c4 00024864 de fc 00 28 | ( | ADDA.W #0x28,A7 00024868 20 79 00 02 90 c4 | y | MOVEA.L 0x290c4,A0 0002486e 30 10 |0 | MOVE.W (A0),D0 00024870 48 c0 |H | EXTW.L D0 00024872 2f 00 |/ | MOVE.L D0,-(A7) 00024874 70 01 |p | MOVEQ.L #0x01,D0 00024876 b0 97 | | CMP.L (A7),D0 00024878 6e 36 |n6 | BGT 0x248b0 0002487a 23 c0 00 02 90 c8 |# | MOVE.L D0,0x290c8 00024880 20 79 00 02 90 c4 | y | MOVEA.L 0x290c4,A0 00024886 22 00 |" | MOVE.L D0,D1 00024888 53 81 |S | SUBQ.L #0x1,D1 0002488a 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00024890 63 02 |c | BLS 0x24894 00024892 4e 4f |NO | TRAP #15 00024894 0c 80 00 00 00 04 | | CMPI.L #0x00000004,D0 0002489a 6f 0a |o | BLE 0x248a6 0002489c 14 30 18 02 | 0 | MOVE.B (A0+D1.L+#0x2),D2 000248a0 0c 02 00 2c | , | CMPI.B #0x2c,D2 000248a4 66 06 |f | BNE 0x248ac 000248a6 11 bc 00 20 18 02 | | MOVE.B #0x20,(A0+D1.L+#0x2) 000248ac 52 80 |R | ADDQ.L #0x1,D0 000248ae 68 c6 |h | BVC 0x24876 000248b0 2e b9 00 02 90 c4 |. | MOVE.L 0x290c4,(A7) 000248b6 4e 93 |N | JSR (A3) 000248b8 54 4f |TO | ADDQ.L #0x2,A7 000248ba 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 000248c0 4a 1f |J | TST.B (A7)+ 000248c2 66 0c |f | BNE 0x248d0 000248c4 55 4f |UO | SUBQ.L #0x2,A7 000248c6 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 000248cc 4a 1f |J | TST.B (A7)+ 000248ce 67 32 |g2 | BEQ 0x24902 000248d0 9e c5 | | SUBA.W D5,A7 000248d2 20 4f | O | MOVEA.L A7,A0 000248d4 43 fa c6 b8 |C | LEA.L 0x20f8e,A1 000248d8 70 0c |p | MOVEQ.L #0x0c,D0 000248da 10 d9 | | MOVE.B (A1)+,(A0)+ 000248dc 51 c8 ff fc |Q | DBF D0,0x248da 000248e0 59 4f |YO | SUBQ.L #0x4,A7 000248e2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000248e6 3f 03 |? | MOVE.W D3,-(A7) 000248e8 3f 07 |? | MOVE.W D7,-(A7) 000248ea 4e 92 |N | JSR (A2) 000248ec 50 4f |PO | ADDQ.L #0x8,A7 000248ee 28 9f |( | MOVE.L (A7)+,(A4) 000248f0 55 4f |UO | SUBQ.L #0x2,A7 000248f2 20 4f | O | MOVEA.L A7,A0 000248f4 43 fa c6 a6 |C | LEA.L 0x20f9c,A1 000248f8 70 0e |p | MOVEQ.L #0x0e,D0 000248fa 10 d9 | | MOVE.B (A1)+,(A0)+ 000248fc 51 c8 ff fc |Q | DBF D0,0x248fa 00024900 60 30 |`0 | BRA 0x24932 00024902 9e c5 | | SUBA.W D5,A7 00024904 20 4f | O | MOVEA.L A7,A0 00024906 43 fa c6 a4 |C | LEA.L 0x20fac,A1 0002490a 70 0c |p | MOVEQ.L #0x0c,D0 0002490c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002490e 51 c8 ff fc |Q | DBF D0,0x2490c 00024912 59 4f |YO | SUBQ.L #0x4,A7 00024914 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024918 3f 03 |? | MOVE.W D3,-(A7) 0002491a 3f 07 |? | MOVE.W D7,-(A7) 0002491c 4e 92 |N | JSR (A2) 0002491e 50 4f |PO | ADDQ.L #0x8,A7 00024920 28 9f |( | MOVE.L (A7)+,(A4) 00024922 55 4f |UO | SUBQ.L #0x2,A7 00024924 20 4f | O | MOVEA.L A7,A0 00024926 43 fa c6 92 |C | LEA.L 0x20fba,A1 0002492a 70 0e |p | MOVEQ.L #0x0e,D0 0002492c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002492e 51 c8 ff fc |Q | DBF D0,0x2492c 00024932 59 4f |YO | SUBQ.L #0x4,A7 00024934 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024938 3f 03 |? | MOVE.W D3,-(A7) 0002493a 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 0002493e 4e 92 |N | JSR (A2) 00024940 50 4f |PO | ADDQ.L #0x8,A7 00024942 23 df 00 02 90 b8 |# | MOVE.L (A7)+,0x290b8 00024948 de fc 00 10 | | ADDA.W #0x10,A7 0002494c 51 4f |QO | SUBQ.L #0x8,A7 0002494e 20 4f | O | MOVEA.L A7,A0 00024950 43 fa c6 78 |C x | LEA.L 0x20fca,A1 00024954 70 06 |p | MOVEQ.L #0x06,D0 00024956 10 d9 | | MOVE.B (A1)+,(A0)+ 00024958 51 c8 ff fc |Q | DBF D0,0x24956 0002495c 5d 4f |]O | SUBQ.L #0x6,A7 0002495e 4e b9 00 01 03 c4 |N | JSR GetArgv() : String 00024964 59 4f |YO | SUBQ.L #0x4,A7 00024966 48 6f 00 0a |Ho | PEA.L (A7+0xa) 0002496a 3f 03 |? | MOVE.W D3,-(A7) 0002496c 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 00024970 4e 92 |N | JSR (A2) 00024972 50 4f |PO | ADDQ.L #0x8,A7 00024974 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 0002497a 50 4f |PO | ADDQ.L #0x8,A7 0002497c 10 1f | | MOVE.B (A7)+,D0 0002497e 48 80 |H | EXTB.W D0 00024980 41 83 |A | CHK.W D3,D0 00024982 50 4f |PO | ADDQ.L #0x8,A7 00024984 13 c0 00 02 90 b2 | | MOVE.B D0,0x290b2 0002498a 4a 00 |J | TST.B D0 0002498c 67 72 |gr | BEQ 0x24a00 0002498e 30 39 00 01 00 08 |09 | MOVE.W 0x10008,D0 00024994 41 bc 00 0f |A | CHK.W #0xf,D0 00024998 3f 00 |? | MOVE.W D0,-(A7) 0002499a 48 79 00 02 50 90 |Hy P | PEA.L 0x25090 000249a0 4e b9 00 01 03 94 |N | JSR MountDisk(drive : Word ; VAR status : Byte) 000249a6 5c 4f |\O | ADDQ.L #0x6,A7 000249a8 4a 39 00 02 50 90 |J9 P | TST.B 0x25090 000249ae 67 20 |g | BEQ 0x249d0 000249b0 59 4f |YO | SUBQ.L #0x4,A7 000249b2 1f 39 00 02 50 90 | 9 P | MOVE.B 0x25090,-(A7) 000249b8 4e b9 00 01 03 a0 |N | JSR FsErrMsgStr(err: Byte) : String 000249be 54 4f |TO | ADDQ.L #0x2,A7 000249c0 4e 93 |N | JSR (A3) 000249c2 58 4f |XO | ADDQ.L #0x4,A7 000249c4 48 78 00 0f |Hx | PEA.L 0xf 000249c8 4e b9 00 01 02 20 |N | JSR KC10_Panic(code : Long) 000249ce 58 4f |XO | ADDQ.L #0x4,A7 000249d0 4e ba f6 90 |N | JSR 0x24062 000249d4 41 fa c6 2a |A * | LEA.L 0x21000,A0 000249d8 70 16 |p | MOVEQ.L #0x16,D0 000249da 3f 20 |? | MOVE.W -(A0),-(A7) 000249dc 51 c8 ff fc |Q | DBF D0,0x249da 000249e0 59 4f |YO | SUBQ.L #0x4,A7 000249e2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000249e6 3f 03 |? | MOVE.W D3,-(A7) 000249e8 3f 06 |? | MOVE.W D6,-(A7) 000249ea 4e 92 |N | JSR (A2) 000249ec 50 4f |PO | ADDQ.L #0x8,A7 000249ee 4e 93 |N | JSR (A3) 000249f0 de fc 00 30 | 0 | ADDA.W #0x30,A7 000249f4 1e bc 00 19 | | MOVE.B #0x19,(A7) 000249f8 4e b9 00 01 05 da |N | JSR EmergencyStop(boot_reason_code : Byte) 000249fe 54 4f |TO | ADDQ.L #0x2,A7 00024a00 4e b9 00 01 03 98 |N | JSR FSCALL_10398 00024a06 2f 3a c6 00 |/: | MOVE.L 0x21008,-(A7) 00024a0a 2f 3a c5 f8 |/: | MOVE.L 0x21004,-(A7) 00024a0e 2f 3a c5 f0 |/: | MOVE.L 0x21000,-(A7) 00024a12 59 4f |YO | SUBQ.L #0x4,A7 00024a14 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024a18 3f 03 |? | MOVE.W D3,-(A7) 00024a1a 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7) 00024a1e 4e 92 |N | JSR (A2) 00024a20 50 4f |PO | ADDQ.L #0x8,A7 00024a22 4e 93 |N | JSR (A3) 00024a24 54 4f |TO | ADDQ.L #0x2,A7 00024a26 20 4f | O | MOVEA.L A7,A0 00024a28 43 fa c2 fa |C | LEA.L 0x20d24,A1 00024a2c 70 0c |p | MOVEQ.L #0x0c,D0 00024a2e 10 d9 | | MOVE.B (A1)+,(A0)+ 00024a30 51 c8 ff fc |Q | DBF D0,0x24a2e 00024a34 59 4f |YO | SUBQ.L #0x4,A7 00024a36 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024a3a 3f 03 |? | MOVE.W D3,-(A7) 00024a3c 3f 07 |? | MOVE.W D7,-(A7) 00024a3e 4e 92 |N | JSR (A2) 00024a40 50 4f |PO | ADDQ.L #0x8,A7 00024a42 4e 93 |N | JSR (A3) 00024a44 de fc 00 12 | | ADDA.W #0x12,A7 00024a48 41 fa c3 0a |A | LEA.L 0x20d54,A0 00024a4c 70 10 |p | MOVEQ.L #0x10,D0 00024a4e 3f 20 |? | MOVE.W -(A0),-(A7) 00024a50 51 c8 ff fc |Q | DBF D0,0x24a4e 00024a54 59 4f |YO | SUBQ.L #0x4,A7 00024a56 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024a5a 3f 03 |? | MOVE.W D3,-(A7) 00024a5c 3f 3c 00 22 |?< " | MOVE.W #0x22,-(A7) 00024a60 4e 92 |N | JSR (A2) 00024a62 50 4f |PO | ADDQ.L #0x8,A7 00024a64 4e 93 |N | JSR (A3) 00024a66 de fc 00 26 | & | ADDA.W #0x26,A7 00024a6a 41 fa c3 1e |A | LEA.L 0x20d8a,A0 00024a6e 70 1a |p | MOVEQ.L #0x1a,D0 00024a70 3f 20 |? | MOVE.W -(A0),-(A7) 00024a72 51 c8 ff fc |Q | DBF D0,0x24a70 00024a76 59 4f |YO | SUBQ.L #0x4,A7 00024a78 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024a7c 3f 03 |? | MOVE.W D3,-(A7) 00024a7e 3f 3c 00 36 |?< 6 | MOVE.W #0x36,-(A7) 00024a82 4e 92 |N | JSR (A2) 00024a84 50 4f |PO | ADDQ.L #0x8,A7 00024a86 4e 93 |N | JSR (A3) 00024a88 de fc 00 38 | 8 | ADDA.W #0x38,A7 00024a8c 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00024a92 4a 1f |J | TST.B (A7)+ 00024a94 66 0e |f | BNE 0x24aa4 00024a96 55 4f |UO | SUBQ.L #0x2,A7 00024a98 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 00024a9e 4a 1f |J | TST.B (A7)+ 00024aa0 67 00 01 18 |g | BEQ 0x24bba 00024aa4 9e fc 00 3c | < | SUBA.W #0x3c,A7 00024aa8 20 4f | O | MOVEA.L A7,A0 00024aaa 43 fa c3 10 |C | LEA.L 0x20dbc,A1 00024aae 70 3a |p: | MOVEQ.L #0x3a,D0 00024ab0 10 d9 | | MOVE.B (A1)+,(A0)+ 00024ab2 51 c8 ff fc |Q | DBF D0,0x24ab0 00024ab6 59 4f |YO | SUBQ.L #0x4,A7 00024ab8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024abc 3f 03 |? | MOVE.W D3,-(A7) 00024abe 3f 3c 00 3b |?< ; | MOVE.W #0x3b,-(A7) 00024ac2 4e 92 |N | JSR (A2) 00024ac4 50 4f |PO | ADDQ.L #0x8,A7 00024ac6 4e 93 |N | JSR (A3) 00024ac8 de fc 00 12 | | ADDA.W #0x12,A7 00024acc 20 4f | O | MOVEA.L A7,A0 00024ace 43 fa c3 28 |C ( | LEA.L 0x20df8,A1 00024ad2 70 2c |p, | MOVEQ.L #0x2c,D0 00024ad4 10 d9 | | MOVE.B (A1)+,(A0)+ 00024ad6 51 c8 ff fc |Q | DBF D0,0x24ad4 00024ada 51 4f |QO | SUBQ.L #0x8,A7 00024adc 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00024ae0 3f 03 |? | MOVE.W D3,-(A7) 00024ae2 3f 3c 00 2d |?< - | MOVE.W #0x2d,-(A7) 00024ae6 4e 92 |N | JSR (A2) 00024ae8 2e 94 |. | MOVE.L (A4),(A7) 00024aea 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00024af0 58 4f |XO | ADDQ.L #0x4,A7 00024af2 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024af8 50 4f |PO | ADDQ.L #0x8,A7 00024afa 4e 93 |N | JSR (A3) 00024afc 58 4f |XO | ADDQ.L #0x4,A7 00024afe 20 4f | O | MOVEA.L A7,A0 00024b00 43 fa c3 24 |C $ | LEA.L 0x20e26,A1 00024b04 70 2c |p, | MOVEQ.L #0x2c,D0 00024b06 10 d9 | | MOVE.B (A1)+,(A0)+ 00024b08 51 c8 ff fc |Q | DBF D0,0x24b06 00024b0c 51 4f |QO | SUBQ.L #0x8,A7 00024b0e 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00024b12 3f 03 |? | MOVE.W D3,-(A7) 00024b14 3f 3c 00 2d |?< - | MOVE.W #0x2d,-(A7) 00024b18 4e 92 |N | JSR (A2) 00024b1a 2e b9 00 02 90 b8 |. | MOVE.L 0x290b8,(A7) 00024b20 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00024b26 58 4f |XO | ADDQ.L #0x4,A7 00024b28 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024b2e 50 4f |PO | ADDQ.L #0x8,A7 00024b30 4e 93 |N | JSR (A3) 00024b32 de c4 | | ADDA.W D4,A7 00024b34 41 fa c3 8e |A | LEA.L 0x20ec4,A0 00024b38 70 0e |p | MOVEQ.L #0x0e,D0 00024b3a 2f 20 |/ | MOVE.L -(A0),-(A7) 00024b3c 51 c8 ff fc |Q | DBF D0,0x24b3a 00024b40 59 4f |YO | SUBQ.L #0x4,A7 00024b42 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024b46 3f 03 |? | MOVE.W D3,-(A7) 00024b48 3f 3c 00 3c |?< < | MOVE.W #0x3c,-(A7) 00024b4c 4e 92 |N | JSR (A2) 00024b4e 50 4f |PO | ADDQ.L #0x8,A7 00024b50 4e 93 |N | JSR (A3) 00024b52 de fc 00 40 | @ | ADDA.W #0x40,A7 00024b56 41 fa c3 9a |A | LEA.L 0x20ef2,A0 00024b5a 70 16 |p | MOVEQ.L #0x16,D0 00024b5c 3f 20 |? | MOVE.W -(A0),-(A7) 00024b5e 51 c8 ff fc |Q | DBF D0,0x24b5c 00024b62 51 4f |QO | SUBQ.L #0x8,A7 00024b64 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00024b68 3f 03 |? | MOVE.W D3,-(A7) 00024b6a 3f 06 |? | MOVE.W D6,-(A7) 00024b6c 4e 92 |N | JSR (A2) 00024b6e 2e 94 |. | MOVE.L (A4),(A7) 00024b70 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00024b76 58 4f |XO | ADDQ.L #0x4,A7 00024b78 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024b7e 50 4f |PO | ADDQ.L #0x8,A7 00024b80 4e 93 |N | JSR (A3) 00024b82 de c4 | | ADDA.W D4,A7 00024b84 41 fa c3 9a |A | LEA.L 0x20f20,A0 00024b88 70 16 |p | MOVEQ.L #0x16,D0 00024b8a 3f 20 |? | MOVE.W -(A0),-(A7) 00024b8c 51 c8 ff fc |Q | DBF D0,0x24b8a 00024b90 51 4f |QO | SUBQ.L #0x8,A7 00024b92 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00024b96 3f 03 |? | MOVE.W D3,-(A7) 00024b98 3f 06 |? | MOVE.W D6,-(A7) 00024b9a 4e 92 |N | JSR (A2) 00024b9c 2e b9 00 02 90 b8 |. | MOVE.L 0x290b8,(A7) 00024ba2 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00024ba8 58 4f |XO | ADDQ.L #0x4,A7 00024baa 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024bb0 50 4f |PO | ADDQ.L #0x8,A7 00024bb2 4e 93 |N | JSR (A3) 00024bb4 de c4 | | ADDA.W D4,A7 00024bb6 60 00 00 ca |` | BRA 0x24c82 00024bba 41 fa c2 00 |A | LEA.L 0x20dbc,A0 00024bbe 70 18 |p | MOVEQ.L #0x18,D0 00024bc0 3f 20 |? | MOVE.W -(A0),-(A7) 00024bc2 51 c8 ff fc |Q | DBF D0,0x24bc0 00024bc6 59 4f |YO | SUBQ.L #0x4,A7 00024bc8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024bcc 3f 03 |? | MOVE.W D3,-(A7) 00024bce 3f 04 |? | MOVE.W D4,-(A7) 00024bd0 4e 92 |N | JSR (A2) 00024bd2 50 4f |PO | ADDQ.L #0x8,A7 00024bd4 4e 93 |N | JSR (A3) 00024bd6 50 4f |PO | ADDQ.L #0x8,A7 00024bd8 20 4f | O | MOVEA.L A7,A0 00024bda 43 fa c2 1c |C | LEA.L 0x20df8,A1 00024bde 70 2c |p, | MOVEQ.L #0x2c,D0 00024be0 10 d9 | | MOVE.B (A1)+,(A0)+ 00024be2 51 c8 ff fc |Q | DBF D0,0x24be0 00024be6 51 4f |QO | SUBQ.L #0x8,A7 00024be8 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00024bec 3f 03 |? | MOVE.W D3,-(A7) 00024bee 3f 3c 00 2d |?< - | MOVE.W #0x2d,-(A7) 00024bf2 4e 92 |N | JSR (A2) 00024bf4 2e 94 |. | MOVE.L (A4),(A7) 00024bf6 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00024bfc 58 4f |XO | ADDQ.L #0x4,A7 00024bfe 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024c04 50 4f |PO | ADDQ.L #0x8,A7 00024c06 4e 93 |N | JSR (A3) 00024c08 55 4f |UO | SUBQ.L #0x2,A7 00024c0a 20 4f | O | MOVEA.L A7,A0 00024c0c 43 fa c2 46 |C F | LEA.L 0x20e54,A1 00024c10 70 32 |p2 | MOVEQ.L #0x32,D0 00024c12 10 d9 | | MOVE.B (A1)+,(A0)+ 00024c14 51 c8 ff fc |Q | DBF D0,0x24c12 00024c18 59 4f |YO | SUBQ.L #0x4,A7 00024c1a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024c1e 3f 03 |? | MOVE.W D3,-(A7) 00024c20 3f 3c 00 33 |?< 3 | MOVE.W #0x33,-(A7) 00024c24 4e 92 |N | JSR (A2) 00024c26 50 4f |PO | ADDQ.L #0x8,A7 00024c28 4e 93 |N | JSR (A3) 00024c2a de fc 00 38 | 8 | ADDA.W #0x38,A7 00024c2e 41 fa c2 c2 |A | LEA.L 0x20ef2,A0 00024c32 70 16 |p | MOVEQ.L #0x16,D0 00024c34 3f 20 |? | MOVE.W -(A0),-(A7) 00024c36 51 c8 ff fc |Q | DBF D0,0x24c34 00024c3a 51 4f |QO | SUBQ.L #0x8,A7 00024c3c 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00024c40 3f 03 |? | MOVE.W D3,-(A7) 00024c42 3f 06 |? | MOVE.W D6,-(A7) 00024c44 4e 92 |N | JSR (A2) 00024c46 2e 94 |. | MOVE.L (A4),(A7) 00024c48 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00024c4e 58 4f |XO | ADDQ.L #0x4,A7 00024c50 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024c56 50 4f |PO | ADDQ.L #0x8,A7 00024c58 4e 93 |N | JSR (A3) 00024c5a 9e fc 00 0a | | SUBA.W #0xa,A7 00024c5e 20 4f | O | MOVEA.L A7,A0 00024c60 43 fa c2 be |C | LEA.L 0x20f20,A1 00024c64 70 3a |p: | MOVEQ.L #0x3a,D0 00024c66 10 d9 | | MOVE.B (A1)+,(A0)+ 00024c68 51 c8 ff fc |Q | DBF D0,0x24c66 00024c6c 59 4f |YO | SUBQ.L #0x4,A7 00024c6e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024c72 3f 03 |? | MOVE.W D3,-(A7) 00024c74 3f 3c 00 3b |?< ; | MOVE.W #0x3b,-(A7) 00024c78 4e 92 |N | JSR (A2) 00024c7a 50 4f |PO | ADDQ.L #0x8,A7 00024c7c 4e 93 |N | JSR (A3) 00024c7e de fc 00 40 | @ | ADDA.W #0x40,A7 00024c82 41 fa c3 0a |A | LEA.L 0x20f8e,A0 00024c86 70 18 |p | MOVEQ.L #0x18,D0 00024c88 3f 20 |? | MOVE.W -(A0),-(A7) 00024c8a 51 c8 ff fc |Q | DBF D0,0x24c88 00024c8e 59 4f |YO | SUBQ.L #0x4,A7 00024c90 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024c94 3f 03 |? | MOVE.W D3,-(A7) 00024c96 3f 04 |? | MOVE.W D4,-(A7) 00024c98 4e 92 |N | JSR (A2) 00024c9a 50 4f |PO | ADDQ.L #0x8,A7 00024c9c 4e 93 |N | JSR (A3) 00024c9e de fc 00 36 | 6 | ADDA.W #0x36,A7 00024ca2 41 fa c3 76 |A v | LEA.L 0x2101a,A0 00024ca6 70 06 |p | MOVEQ.L #0x06,D0 00024ca8 3f 20 |? | MOVE.W -(A0),-(A7) 00024caa 51 c8 ff fc |Q | DBF D0,0x24ca8 00024cae 51 4f |QO | SUBQ.L #0x8,A7 00024cb0 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00024cb4 3f 03 |? | MOVE.W D3,-(A7) 00024cb6 3f 05 |? | MOVE.W D5,-(A7) 00024cb8 4e 92 |N | JSR (A2) 00024cba 50 4f |PO | ADDQ.L #0x8,A7 00024cbc 48 78 00 00 |Hx | PEA.L 0x0 00024cc0 48 78 00 0a |Hx | PEA.L 0xa 00024cc4 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 00024cca de fc 00 0c | | ADDA.W #0xc,A7 00024cce 23 df 00 02 50 92 |# P | MOVE.L (A7)+,0x25092 00024cd4 de c5 | | ADDA.W D5,A7 00024cd6 20 39 00 02 50 92 | 9 P | MOVE.L 0x25092,D0 00024cdc 0c 80 00 00 00 0a | | CMPI.L #0x0000000a,D0 00024ce2 63 02 |c | BLS 0x24ce6 00024ce4 4e 4e |NN | TRAP #14 00024ce6 d0 40 | @ | ADD.W D0,D0 00024ce8 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00024cf0 00 16 | | .CONST 0x16 ; [0x0] -> 0x24d06 00024cf2 00 26 | & | .CONST 0x26 ; [0x1] -> 0x24d16 00024cf4 00 2c | , | .CONST 0x2c ; [0x2] -> 0x24d1c 00024cf6 00 32 | 2 | .CONST 0x32 ; [0x3] -> 0x24d22 00024cf8 00 3e | > | .CONST 0x3e ; [0x4] -> 0x24d2e 00024cfa 00 48 | H | .CONST 0x48 ; [0x5] -> 0x24d38 00024cfc 00 4c | L | .CONST 0x4c ; [0x6] -> 0x24d3c 00024cfe 00 52 | R | .CONST 0x52 ; [0x7] -> 0x24d42 00024d00 00 5a | Z | .CONST 0x5a ; [0x8] -> 0x24d4a 00024d02 00 5e | ^ | .CONST 0x5e ; [0x9] -> 0x24d4e 00024d04 00 64 | d | .CONST 0x64 ; [0xa] -> 0x24d54 00024d06 switch@0x24ce8[0x0]: 00024d06 42 27 |B' | CLR.B -(A7) 00024d08 48 78 00 01 |Hx | PEA.L 0x1 00024d0c 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00024d12 5c 4f |\O | ADDQ.L #0x6,A7 00024d14 60 42 |`B | BRA 0x24d58 00024d16 switch@0x24ce8[0x1]: 00024d16 4e ba f7 14 |N | JSR 0x2442c 00024d1a 60 3c |`< | BRA 0x24d58 00024d1c switch@0x24ce8[0x2]: 00024d1c 4e ba fa 50 |N P | JSR 0x2476e 00024d20 60 36 |`6 | BRA 0x24d58 00024d22 switch@0x24ce8[0x3]: 00024d22 48 78 00 01 |Hx | PEA.L 0x1 00024d26 42 67 |Bg | CLR.W -(A7) 00024d28 4e ba de 9c |N | JSR 0x22bc6 00024d2c 60 e4 |` | BRA 0x24d12 00024d2e switch@0x24ce8[0x4]: 00024d2e 42 27 |B' | CLR.B -(A7) 00024d30 4e ba df ca |N | JSR 0x22cfc 00024d34 54 4f |TO | ADDQ.L #0x2,A7 00024d36 60 20 |` | BRA 0x24d58 00024d38 switch@0x24ce8[0x5]: 00024d38 1f 03 | | MOVE.B D3,-(A7) 00024d3a 60 f4 |` | BRA 0x24d30 00024d3c switch@0x24ce8[0x6]: 00024d3c 4e ba ea 1a |N | JSR 0x23758 00024d40 60 16 |` | BRA 0x24d58 00024d42 switch@0x24ce8[0x7]: 00024d42 42 27 |B' | CLR.B -(A7) 00024d44 4e ba ee 02 |N | JSR 0x23b48 00024d48 60 ea |` | BRA 0x24d34 00024d4a switch@0x24ce8[0x8]: 00024d4a 1f 03 | | MOVE.B D3,-(A7) 00024d4c 60 f6 |` | BRA 0x24d44 00024d4e switch@0x24ce8[0x9]: 00024d4e 4e ba eb c0 |N | JSR 0x23910 00024d52 60 04 |` | BRA 0x24d58 00024d54 switch@0x24ce8[0xa]: 00024d54 4e ba f3 0c |N | JSR 0x24062 00024d58 60 00 fc ac |` | BRA 0x24a06 00024d5c 4e b9 00 01 |N | .XXX[0x4] 00024d60 02 84 | | .XXX[0x2] 00024d62 4e 56 00 00 |NV | LINK.W A6,#0x0000 00024d66 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00024d6a bf d5 | | CMPA.L (A5),A7 00024d6c 4e 76 |Nv | TRAPV 00024d6e 42 2e 00 08 |B. | CLR.B (A6+0x8) 00024d72 30 39 93 03 e0 00 |09 | MOVE.W 0x9303e000,D0 00024d78 02 40 00 08 | @ | ANDI.W #0x0008,D0 00024d7c 67 00 00 06 |g | BEQ 0x24d84 00024d80 52 2e 00 08 |R. | ADDQ.B #0x1,(A6+0x8) 00024d84 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00024d88 4e 5e |N^ | UNLK A6 00024d8a 4e 75 |Nu | RTS 00024d8c 4e 56 00 00 |NV | LINK.W A6,#0x0000 00024d90 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00024d94 bf d5 | | CMPA.L (A5),A7 00024d96 4e 76 |Nv | TRAPV 00024d98 30 3c 02 01 |0< | MOVE.W #0x201,D0 00024d9c 4e b9 80 00 20 64 |N d | JSR 0x80002064 00024da2 67 00 00 06 |g | BEQ 0x24daa 00024da6 30 7c 00 00 |0| | MOVEA.W #0x0,A0 00024daa 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 00024dae 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00024db2 4e 5e |N^ | UNLK A6 00024db4 4e 75 |Nu | RTS 00024db6 4e 56 00 00 |NV | LINK.W A6,#0x0000 00024dba 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00024dbe bf d5 | | CMPA.L (A5),A7 00024dc0 4e 76 |Nv | TRAPV 00024dc2 30 3c 07 00 |0< | MOVE.W #0x700,D0 00024dc6 4e b9 80 00 20 64 |N d | JSR 0x80002064 00024dcc 67 00 00 06 |g | BEQ 0x24dd4 00024dd0 30 7c 00 00 |0| | MOVEA.W #0x0,A0 00024dd4 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 00024dd8 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00024ddc 4e 5e |N^ | UNLK A6 00024dde 4e 75 |Nu | RTS 00024de0 4e 56 00 00 |NV | LINK.W A6,#0x0000 00024de4 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00024de8 bf d5 | | CMPA.L (A5),A7 00024dea 4e 76 |Nv | TRAPV 00024dec 30 3c 08 00 |0< | MOVE.W #0x800,D0 00024df0 4e b9 80 00 20 64 |N d | JSR 0x80002064 00024df6 67 00 00 06 |g | BEQ 0x24dfe 00024dfa 30 7c 00 00 |0| | MOVEA.W #0x0,A0 00024dfe 2d 48 00 08 |-H | MOVE.L A0,(A6+0x8) 00024e02 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00024e06 4e 5e |N^ | UNLK A6 00024e08 4e 75 |Nu | RTS 00024e0a 4e 56 00 00 |NV | LINK.W A6,#0x0000 00024e0e 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00024e12 bf d5 | | CMPA.L (A5),A7 00024e14 4e 76 |Nv | TRAPV 00024e16 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00024e1a 4e b9 80 00 20 5c |N \ | JSR 0x8000205c 00024e20 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024e24 42 90 |B | CLR.L (A0) 00024e26 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 00024e2a 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00024e2e 4e 5e |N^ | UNLK A6 00024e30 4e 75 |Nu | RTS 00024e32 4e 56 00 00 |NV | LINK.W A6,#0x0000 00024e36 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00024e3a bf d5 | | CMPA.L (A5),A7 00024e3c 4e 76 |Nv | TRAPV 00024e3e 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00024e42 4e b9 80 00 20 60 |N ` | JSR 0x80002060 00024e48 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024e4c 42 90 |B | CLR.L (A0) 00024e4e 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 00024e52 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00024e56 4e 5e |N^ | UNLK A6 00024e58 4e 75 |Nu | RTS 00024e5a 4e 56 00 00 |NV | LINK.W A6,#0x0000 ; Spelunked 00024e5e 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00024e62 bf d5 | | CMPA.L (A5),A7 00024e64 4e 76 |Nv | TRAPV 00024e66 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00024e6a 4e b9 80 00 20 6c |N l | JSR 0x8000206c 00024e70 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024e74 42 90 |B | CLR.L (A0) 00024e76 11 41 00 03 | A | MOVE.B D1,(A0+0x3) 00024e7a 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00024e7e 4e 5e |N^ | UNLK A6 00024e80 4e 75 |Nu | RTS 00024e82 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 00024e90 ; -------------------------------------------------------------------------------------- 00024e90 ; OMSI PASCAL Function 00024e90 ; <LVAR 0x008 1(r)> 00024e90 ; -------------------------------------------------------------------------------------- 00024e90 PROG_FAIL: 00024e90 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00024e94 bf d5 | | CMPA.L (A5),A7 00024e96 62 06 |b | BHI 0x24e9e 00024e98 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024e9c 4e 76 |Nv | TRAPV 00024e9e de fc 00 2c | , | ADDA.W #0x2c,A7 00024ea2 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00024ea6 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 00024eaa 70 06 |p | MOVEQ.L #0x06,D0 00024eac 3f 20 |? | MOVE.W -(A0),-(A7) 00024eae 51 c8 ff fc |Q | DBF D0,0x24eac 00024eb2 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00024eb6 51 4f |QO | SUBQ.L #0x8,A7 00024eb8 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00024ebc 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00024ec0 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00024ec4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024eca 58 4f |XO | ADDQ.L #0x4,A7 00024ecc 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00024ed0 48 80 |H | EXTB.W D0 00024ed2 48 c0 |H | EXTW.L D0 00024ed4 2f 00 |/ | MOVE.L D0,-(A7) 00024ed6 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00024edc 58 4f |XO | ADDQ.L #0x4,A7 00024ede 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024ee4 50 4f |PO | ADDQ.L #0x8,A7 00024ee6 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00024eec de fc 00 14 | | ADDA.W #0x14,A7 00024ef0 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00024ef4 4e 5e |N^ | UNLK A6 00024ef6 4e 75 |Nu | RTS 00024ef8 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 00024f06 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00024f14 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00024f22 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00024f34 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 00024f4c ; -------------------------------------------------------------------------------------- 00024f4c ; OMSI PASCAL Function 00024f4c ; <LVAR 0x00e 1(r)> 00024f4c ; <LVAR 0x00a 4(r)> 00024f4c ; <LVAR 0x008 1(r)> 00024f4c ; -------------------------------------------------------------------------------------- 00024f4c EXP_FAIL: 00024f4c 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 00024f50 bf d5 | | CMPA.L (A5),A7 00024f52 62 06 |b | BHI 0x24f5a 00024f54 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024f58 4e 76 |Nv | TRAPV 00024f5a de fc 00 74 | t | ADDA.W #0x74,A7 00024f5e 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00024f62 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00024f68 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 00024f6e 72 01 |r | MOVEQ.L #0x01,D1 00024f70 74 0d |t | MOVEQ.L #0x0d,D2 00024f72 76 1e |v | MOVEQ.L #0x1e,D3 00024f74 78 12 |x | MOVEQ.L #0x12,D4 00024f76 7a 0e |z | MOVEQ.L #0x0e,D5 00024f78 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00024f7e 41 fa ff b4 |A | LEA.L 0x24f34,A0 00024f82 70 08 |p | MOVEQ.L #0x08,D0 00024f84 3f 20 |? | MOVE.W -(A0),-(A7) 00024f86 51 c8 ff fc |Q | DBF D0,0x24f84 00024f8a 59 4f |YO | SUBQ.L #0x4,A7 00024f8c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024f90 3f 01 |? | MOVE.W D1,-(A7) 00024f92 3f 04 |? | MOVE.W D4,-(A7) 00024f94 4e 93 |N | JSR (A3) 00024f96 50 4f |PO | ADDQ.L #0x8,A7 00024f98 4e 94 |N | JSR (A4) 00024f9a 50 4f |PO | ADDQ.L #0x8,A7 00024f9c 20 4f | O | MOVEA.L A7,A0 00024f9e 43 fa ff 58 |C X | LEA.L 0x24ef8,A1 00024fa2 70 0c |p | MOVEQ.L #0x0c,D0 00024fa4 10 d9 | | MOVE.B (A1)+,(A0)+ 00024fa6 51 c8 ff fc |Q | DBF D0,0x24fa4 00024faa 51 4f |QO | SUBQ.L #0x8,A7 00024fac 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00024fb0 3f 01 |? | MOVE.W D1,-(A7) 00024fb2 3f 02 |? | MOVE.W D2,-(A7) 00024fb4 4e 93 |N | JSR (A3) 00024fb6 54 4f |TO | ADDQ.L #0x2,A7 00024fb8 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00024fbc 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00024fc2 54 4f |TO | ADDQ.L #0x2,A7 00024fc4 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024fca 50 4f |PO | ADDQ.L #0x8,A7 00024fcc 4e 94 |N | JSR (A4) 00024fce de c4 | | ADDA.W D4,A7 00024fd0 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00024fd4 b0 c1 | | CMPA.W D1,A0 00024fd6 67 48 |gH | BEQ 0x25020 00024fd8 9e c5 | | SUBA.W D5,A7 00024fda 22 4f |"O | MOVEA.L A7,A1 00024fdc 45 fa ff 28 |E ( | LEA.L 0x24f06,A2 00024fe0 70 0c |p | MOVEQ.L #0x0c,D0 00024fe2 12 da | | MOVE.B (A2)+,(A1)+ 00024fe4 51 c8 ff fc |Q | DBF D0,0x24fe2 00024fe8 9e c3 | | SUBA.W D3,A7 00024fea 22 4f |"O | MOVEA.L A7,A1 00024fec 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00024ff0 70 1d |p | MOVEQ.L #0x1d,D0 00024ff2 12 d8 | | MOVE.B (A0)+,(A1)+ 00024ff4 51 c8 ff fc |Q | DBF D0,0x24ff2 00024ff8 51 4f |QO | SUBQ.L #0x8,A7 00024ffa 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00024ffe 3f 01 |? | MOVE.W D1,-(A7) 00025000 3f 02 |? | MOVE.W D2,-(A7) 00025002 4e 93 |N | JSR (A3) 00025004 58 4f |XO | ADDQ.L #0x4,A7 00025006 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002500a 3f 01 |? | MOVE.W D1,-(A7) 0002500c 3f 03 |? | MOVE.W D3,-(A7) 0002500e 4e 93 |N | JSR (A3) 00025010 50 4f |PO | ADDQ.L #0x8,A7 00025012 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00025018 50 4f |PO | ADDQ.L #0x8,A7 0002501a 4e 94 |N | JSR (A4) 0002501c de fc 00 30 | 0 | ADDA.W #0x30,A7 00025020 9e c5 | | SUBA.W D5,A7 00025022 20 4f | O | MOVEA.L A7,A0 00025024 43 fa fe ee |C | LEA.L 0x24f14,A1 00025028 70 0c |p | MOVEQ.L #0x0c,D0 0002502a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002502c 51 c8 ff fc |Q | DBF D0,0x2502a 00025030 51 4f |QO | SUBQ.L #0x8,A7 00025032 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00025036 3f 01 |? | MOVE.W D1,-(A7) 00025038 3f 02 |? | MOVE.W D2,-(A7) 0002503a 4e 93 |N | JSR (A3) 0002503c 54 4f |TO | ADDQ.L #0x2,A7 0002503e 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00025042 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00025048 54 4f |TO | ADDQ.L #0x2,A7 0002504a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00025050 50 4f |PO | ADDQ.L #0x8,A7 00025052 4e 94 |N | JSR (A4) 00025054 5d 4f |]O | SUBQ.L #0x6,A7 00025056 20 4f | O | MOVEA.L A7,A0 00025058 43 fa fe da |C | LEA.L 0x24f34,A1 0002505c 70 16 |p | MOVEQ.L #0x16,D0 0002505e 10 d9 | | MOVE.B (A1)+,(A0)+ 00025060 51 c8 ff fc |Q | DBF D0,0x2505e 00025064 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00025068 59 4f |YO | SUBQ.L #0x4,A7 0002506a 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002506e 3f 01 |? | MOVE.W D1,-(A7) 00025070 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00025074 4e 93 |N | JSR (A3) 00025076 50 4f |PO | ADDQ.L #0x8,A7 00025078 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002507e de c3 | | ADDA.W D3,A7 00025080 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00025084 4e 5e |N^ | UNLK A6 00025086 4e 75 |Nu | RTS