|
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: 38912 (0x9800)
Types: M200
Notes: @(#)RECOVERY,14.04,92/09/17,10:00:00, M200_PROGRAM
Names: »RECOVERY.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »RECOVERY.M200«
└─ ⟦this⟧ »RECOVERY.M200«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »RECOVERY.M200«
└─ ⟦this⟧ »RECOVERY.M200«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »RECOVERY.M200«
└─ ⟦this⟧ »RECOVERY.M200«
@ 22522
<LVAR 0x008 4(r)>
<POP 22522--0001 Body>
<POP 22522-22538 Prologue> Σ0 ↓
<POP 22538-2253a RegCacheLoad> Σ0 ↓
<POP 2253a-22578 Naked> Σ0 ↓ →0x225ac
<Blob 0x2253a [10] @> Δ-10 {[«10""»]}
<POP 22546-22548 StackAdj> Δ-8 {[«10""»]|[-8-]}
<Lit 0x22548 10> {[«10""»]|[-4-]|[$$** ABORT:_]}
<POP 22558-2255a StackAdj> Δ-4 {[«10""»]|[-4-]|[$$** ABORT:_]|[-4-]}
<MI 2255a MOVE.L (A6+0x8),(A7)> {[«10""»]|[-4-]|[$$** ABORT:_]|[4, '(A6+0x8)']}
<Call 0x2255e 0x102d0> {[«10""»]|[-4-]|[$$** ABORT:_]|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 22564-22566 StackAdj> Δ+8 {[«10""»]|[-4-]}
<Call 0x22566 0x103e0> {[«10""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2256c-22570 StackAdj> Δ+14 {}
<MI 22570 TST.B 0x2ef34> {}
<MI 22576 BEQ 0x225ac> {}
<POP 22578-225a8 Naked> Σ0 ↓
<Blob 0x22578 [46] @> Δ-46 {[«46""»]}
<POP 2258a-2258c StackAdj> Δ-4 {[«46""»]|[-4-]}
<Lit 0x2258c 45> {[«46""»]|[$$INSTALL failed: you have to reboot the system]}
<Call 0x2259e 0x103e0> {[«46""»]|[$$INSTALL failed: you have to reboot the system]}
WriteConsoleStringCrLf(str : String)
<POP 225a4-225a8 StackAdj> Δ+50 {}
<POP 225a8-225aa Naked> Σ0 →0x225a8 ←0x225a8
<MI 225a8 BRA 0x225a8> {}
<POP 225ac-225ba Naked> Σ0 ←0x2253a
<POP 225ac-225ba Bailout> {}
<MI 225ac MOVEA.L (A5+0x8),A7>
<MI 225b0 MOVEA.W #0x0,A6>
<MI 225b4 JMP 0x291e2>
@ 225c2
<LVAR 0x00c @ 4(r)>
<LVAR 0x008 @ 4(r)>
<LVAR -0x004 @ 1(r)>
<LVAR -0x404 @>
<LVAR -0x410 @ 4(r)>
<LVAR -0x414 @ 4(r)>
<POP 225c2-22730 Body> Δ-8
<POP 225c2-225d8 Prologue> Σ0 ↓
<POP 225d8-225ea RegCacheLoad> Σ0 ↓
<POP 225ea-22610 Naked> Σ0 ↓ →0x22614
<MI 225ea LEA.L (A6-0x404),A0> {}
<MI 225ee MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 225f0 MOVE.L (A7)+,D6> Δ+4 {}
<MI 225f2 MOVEQ.L #0x01,D5> {}
<MI 225f4 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 225f8 CLR.B -(A7)> Δ-2 {[4, '(A6+0xc)']|[#0]}
<Const 0x225fa 0x1.2> Δ-2 {[4, '(A6+0xc)']|[#0]|[#1]}
<Const 0x225fc 0x0.4> Δ-4 {[4, '(A6+0xc)']|[#0]|[#1]|[##0]}
<Pointer.fp 0x22600 <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6+0xc)']|[#0]|[#1]|[##0]|[@@-4]}
<Pointer.fp 0x22602 <LVAR -0x414 @ 4(r)>> Δ-4 {[4, '(A6+0xc)']|[#0]|[#1]|[##0]|[@@-4]|[@@-1044]}
<Call 0x22604 0x10380> {[4, '(A6+0xc)']|[#0]|[#1]|[##0]|[@@-4]|[@@-1044]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 2260a-2260c StackAdj> Δ+20 {}
<MI 2260c TST.B (A6-0x4)> {}
<MI 2260e BEQ 0x22614> {}
<POP 22610-22614 Naked> Σ0 →0x22710
<MI 22610 BRA 0x22710> {}
<POP 22614-22636 Naked> Σ0 ↓ →0x2263a ←0x225ea
<MI 22614 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 22618 MOVE.B D5,-(A7)> Δ-2 {[4, '(A6+0x8)']|[2, 'D5']}
<Const 0x2261a 0x1.2> Δ-2 {[4, '(A6+0x8)']|[2, 'D5']|[#1]}
<MI 2261c MOVEA.L (A6-0x414),A0> {[4, '(A6+0x8)']|[2, 'D5']|[#1]}
<MI 2261e MOVE.W (A0+0x20),D0> {[4, '(A6+0x8)']|[2, 'D5']|[#1]}
<MI 22622 EXTW.L D0> {[4, '(A6+0x8)']|[2, 'D5']|[#1]}
<MI 22624 MOVE.L D0,-(A7)> Δ-4 {[4, '(A6+0x8)']|[2, 'D5']|[#1]|[4, 'D0']}
<Pointer.fp 0x22626 <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[2, 'D5']|[#1]|[4, 'D0']|[@@-4]}
<Pointer.fp 0x22628 <LVAR -0x410 @ 4(r)>> Δ-4 {[4, '(A6+0x8)']|[2, 'D5']|[#1]|[4, 'D0']|[@@-4]|[@@-1040]}
<Call 0x2262a 0x10380> {[4, '(A6+0x8)']|[2, 'D5']|[#1]|[4, 'D0']|[@@-4]|[@@-1040]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 22630-22632 StackAdj> Δ+20 {}
<MI 22632 TST.B (A6-0x4)> {}
<MI 22634 BEQ 0x2263a> {}
<POP 22636-2263a Naked> Σ0 →0x226fc
<MI 22636 BRA 0x226fc> {}
<POP 2263a-2268a Naked> Σ0 Δ-4 ↓ ←0x22614
<MI 2263a MOVEA.L (A6-0x410),A0> {}
<MI 2263c MOVEA.L (A6-0x414),A1> {}
<MI 2263e MOVE.B (A1+0x3a),(A0+0x3a)> {}
<MI 22644 MOVE.B (A1+0x3b),(A0+0x3b)> {}
<MI 2264a MOVE.B (A1+0x3c),(A0+0x3c)> {}
<MI 22650 MOVE.B (A1+0x3d),(A0+0x3d)> {}
<MI 22656 MOVE.B (A1+0x3f),D0> {}
<MI 2265a ANDI.B #0xfd,(A0+0x3f)> {}
<MI 22660 ANDI.B #0x02,D0> {}
<MI 22664 OR.B D0,(A0+0x3f)> {}
<MI 22668 MOVE.B (A1+0x3f),D0> {}
<MI 2266c ANDI.B #0xfb,(A0+0x3f)> {}
<MI 22672 ANDI.B #0x04,D0> {}
<MI 22676 OR.B D0,(A0+0x3f)> {}
<MI 2267a MOVE.B #0x01,(A0+0x4c)> {}
<MI 2267e MOVE.W (A0+0x20),D0> {}
<MI 22682 SUBQ.W #0x1,D0> {}
<MI 22684 EXTW.L D0> {}
<MI 22686 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 22688 MOVEQ.L #0x00,D7> {[4, 'D0']}
<POP 2268a-2268e Naked> Σ-4 ↓ →0x226e6 ←0x226e2
<MI 2268a CMP.L (A7),D7> {[-4-]}
<MI 2268c BGT 0x226e6> {[-4-]}
<POP 2268e-226b4 Naked> Σ-4 ↓ →0x226b8
<MI 2268e MOVE.L (A6-0x414),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x414)']}
<POP 0x22690 LimitCheck 0x0 ≤ D7 ≤ 0x4000> {[-4-]|[4, '(A6-0x414)']}
<MI 2269a MOVE.W D7,-(A7)> Δ-2 {[-4-]|[4, '(A6-0x414)']|[2, 'D7']}
<MI 2269c CLR.W -(A7)> Δ-2 {[-4-]|[4, '(A6-0x414)']|[2, 'D7']|[#0]}
<Const 0x2269e 0x200.2> Δ-2 {[-4-]|[4, '(A6-0x414)']|[2, 'D7']|[#0]|[#512]}
<Const 0x226a2 0x1.2> Δ-2 {[-4-]|[4, '(A6-0x414)']|[2, 'D7']|[#0]|[#512]|[#1]}
<MI 226a4 MOVE.L D6,-(A7)> Δ-4 {[-4-]|[4, '(A6-0x414)']|[2, 'D7']|[#0]|[#512]|[#1]|[4, 'D6']}
<Pointer.fp 0x226a6 <LVAR -0x004 @ 1(r)>> Δ-4 {[-4-]|[4, '(A6-0x414)']|[2, 'D7']|[#0]|[#512]|[#1]|[4, 'D6']|[@@-4]}
<Call 0x226a8 0x10384> {[-4-]|[4, '(A6-0x414)']|[2, 'D7']|[#0]|[#512]|[#1]|[4, 'D6']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 226ae-226b0 StackAdj> Δ+20 {[-4-]}
<MI 226b0 TST.B (A6-0x4)> {[-4-]}
<MI 226b2 BEQ 0x226b8> {[-4-]}
<POP 226b4-226b8 Naked> Σ-4 Δ+4 →0x226e8
<POP 226b4-226b6 StackAdj> Δ+4 {}
<MI 226b6 BRA 0x226e8> {}
<POP 226b8-226de Naked> Σ-4 ↓ →0x226e2 ←0x2268e
<MI 226b8 MOVE.L (A6-0x410),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x410)']}
<POP 0x226ba LimitCheck 0x0 ≤ D7 ≤ 0x4000> {[-4-]|[4, '(A6-0x410)']}
<MI 226c4 MOVE.W D7,-(A7)> Δ-2 {[-4-]|[4, '(A6-0x410)']|[2, 'D7']}
<MI 226c6 CLR.W -(A7)> Δ-2 {[-4-]|[4, '(A6-0x410)']|[2, 'D7']|[#0]}
<Const 0x226c8 0x200.2> Δ-2 {[-4-]|[4, '(A6-0x410)']|[2, 'D7']|[#0]|[#512]}
<Const 0x226cc 0x1.2> Δ-2 {[-4-]|[4, '(A6-0x410)']|[2, 'D7']|[#0]|[#512]|[#1]}
<MI 226ce MOVE.L D6,-(A7)> Δ-4 {[-4-]|[4, '(A6-0x410)']|[2, 'D7']|[#0]|[#512]|[#1]|[4, 'D6']}
<Pointer.fp 0x226d0 <LVAR -0x004 @ 1(r)>> Δ-4 {[-4-]|[4, '(A6-0x410)']|[2, 'D7']|[#0]|[#512]|[#1]|[4, 'D6']|[@@-4]}
<Call 0x226d2 0x10388> {[-4-]|[4, '(A6-0x410)']|[2, 'D7']|[#0]|[#512]|[#1]|[4, 'D6']|[@@-4]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 226d8-226da StackAdj> Δ+20 {[-4-]}
<MI 226da TST.B (A6-0x4)> {[-4-]}
<MI 226dc BEQ 0x226e2> {[-4-]}
<POP 226de-226e2 Naked> Σ-4 Δ+4 →0x226e8
<POP 226de-226e0 StackAdj> Δ+4 {}
<MI 226e0 BRA 0x226e8> {}
<POP 226e2-226e6 Naked> Σ-4 ↓ →0x2268a ←0x226b8
<MI 226e2 ADDQ.L #0x1,D7> {[-4-]}
<MI 226e4 BVC 0x2268a> {[-4-]}
<POP 226e6-226e8 Naked> Σ-4 Δ+4 ↓ ←0x2268a
<POP 226e6-226e8 StackAdj> Δ+4 {}
<POP 226e8-226fc Naked> Σ0 ↓ ←0x226b4 ←0x226de
<MI 226e8 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x226ea 0x1.2> Δ-2 {[#0]|[#1]}
<Const 0x226ec 0x1.4> Δ-4 {[#0]|[#1]|[##1]}
<Pointer.fp 0x226f0 <LVAR -0x004 @ 1(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-4]}
<Pointer.fp 0x226f2 <LVAR -0x410 @ 4(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-4]|[@@-1040]}
<Call 0x226f4 0x1038c> {[#0]|[#1]|[##1]|[@@-4]|[@@-1040]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 226fa-226fc StackAdj> Δ+16 {}
<POP 226fc-22710 Naked> Σ0 ↓ ←0x22636
<MI 226fc CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x226fe 0x1.2> Δ-2 {[#0]|[#1]}
<Const 0x22700 0x1.4> Δ-4 {[#0]|[#1]|[##1]}
<Pointer.fp 0x22704 <LVAR -0x004 @ 1(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-4]}
<Pointer.fp 0x22706 <LVAR -0x414 @ 4(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-4]|[@@-1044]}
<Call 0x22708 0x1038c> {[#0]|[#1]|[##1]|[@@-4]|[@@-1044]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 2270e-22710 StackAdj> Δ+16 {}
<POP 22710-22728 Naked> Σ0 ↓ ←0x22610
<Pointer.fp 0x22710 <LVAR 0x00c @ 4(r)>> Δ-4 {[@@12]}
<Call 0x22714 0x102bc> {[@@12]}
FreeString(VAR a : String)
<POP 2271a-2271c StackAdj> Δ+4 {}
<Pointer.fp 0x2271c <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x22720 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 22726-22728 StackAdj> Δ+4 {}
<POP 22728-22730 Epilogue> Σ0
@ 22730
<LVAR 0x00c 2(r)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @ 1(r)>
<LVAR -0x006 2(w)>
<LVAR -0x008 2(w)>
<LVAR -0x00a 2(r)>
<LVAR -0x00c 2(r)>
<LVAR -0x00e 2(w)>
<LVAR -0x010 2(r)>
<LVAR -0x012 @ 2(r)>
<POP 22730-227f8 Body>
<POP 22730-22746 Prologue> Σ0 ↓
<POP 22746-227a8 Naked> Σ0 ↓ →0x227f0
<MI 22746 CLR.W (A6-0x12)> {}
<MI 2274a CLR.W (A6-0x10)> {}
<MI 2274e MOVE.W #0x2,(A6-0xe)> {}
<MI 22754 CLR.W (A6-0xc)> {}
<MI 22758 CLR.W (A6-0xa)> {}
<MI 2275c MOVE.W 0x29710,D0> {}
<MI 22762 ASL.W #0x8,D0> {}
<MI 22764 ADDI.W #0x000e,D0> {}
<POP 0x22768 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 22770 MOVE.W D0,(A6-0x8)> {}
<MI 22774 MOVE.W (A6+0xc),(A6-0x6)> {}
<MI 2277a MOVEA.L (A6+0x8),A0> {}
<Pointer.fp 0x2277e <LVAR -0x012 @ 2(r)>> Δ-4 {[@@-18]}
<MI 22782 MOVEA.L A0,A1> {[@@-18]}
<MI 22784 MOVE.L A1,-(A7)> Δ-4 {[@@-18]|[4, 'A1']}
<MI 22786 CLR.W -(A7)> Δ-2 {[@@-18]|[4, 'A1']|[#0]}
<Call 0x22788 0x10204> {[@@-18]|[4, 'A1']|[#0]}
KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
<POP 2278e-22790 StackAdj> Δ+8 {[-2-]}
<MI 22790 CLR.W (A7)> {[-2-]}
<Pointer.fp 0x22792 <LVAR -0x002 @ 1(r)>> Δ-4 {[-2-]|[@@-2]}
<Call 0x22796 0x10206> {[-2-]|[@@-2]}
KC03_Wait_Disk_IO(a : W; VAR status : Byte)
<POP 2279c-2279e StackAdj> Δ+6 {}
<MI 2279e ANDI.W #0x00ff,(A0)> {}
<MI 227a2 TST.B (A6-0x2)> {}
<MI 227a6 BNE 0x227f0> {}
<POP 227a8-227f0 Naked> Σ0 ↓
<Blob 0x227a8 [50] @> Δ-50 {[«50""»]}
<POP 227ba-227bc StackAdj> Δ-8 {[«50""»]|[-8-]}
<Lit 0x227bc 49> {[«50""»]|[-4-]|[$$Error reading disk controller EEPROM at location_]}
<POP 227ce-227d0 StackAdj> Δ-4 {[«50""»]|[-4-]|[$$Error reading disk controller EEPROM at location_]|[-4-]}
<MI 227d0 CLR.L D0> {[«50""»]|[-4-]|[$$Error reading disk controller EEPROM at location_]|[-4-]}
<MI 227d2 MOVE.W (A6+0xc),D0> {[«50""»]|[-4-]|[$$Error reading disk controller EEPROM at location_]|[-4-]}
<MI 227d6 MOVE.L D0,-(A7)> Δ-4 {[«50""»]|[-4-]|[$$Error reading disk controller EEPROM at location_]|[-4-]|[4, 'D0']}
<Call 0x227d8 0x102e4> {[«50""»]|[-4-]|[$$Error reading disk controller EEPROM at location_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 227de-227e0 StackAdj> Δ+4 {[«50""»]|[-4-]|[$$Error reading disk controller EEPROM at location_]|[-4-]}
<Call 0x227e0 0x102d0> {[«50""»]|[-4-]|[$$Error reading disk controller EEPROM at location_]|[-4-]}
StringCat2(a, b : String) : String
<POP 227e6-227e8 StackAdj> Δ+8 {[«50""»]|[-4-]}
<Call 0x227e8 0x22522> {[«50""»]|[-4-]}
<POP 227ec-227f0 StackAdj> Δ+54 {}
<POP 227f0-227f8 Epilogue> Σ0 ←0x22746
@ 227f8
<LVAR 0x008 2(r)>
<LVAR -0x004 @ 2(r)>
<LVAR -0x006 @ 2(r)>
<LVAR -0x008 @ 2(r)>
<LVAR -0x00a @ 2(r)>
<LVAR -0x00c @ 2(r)>
<LVAR -0x00e 2(rw)>
<LVAR -0x48a @>
<LVAR -0x48e @ 2(r)>
<LVAR -0x906 @>
<LVAR -0x90a @>
<POP 227f8-22ae2 Body>
<POP 227f8-2280e Prologue> Σ0 ↓
<POP 2280e-22828 RegCacheLoad> Σ0 ↓
<POP 22828-22836 Naked> Σ0 ↓ →0x22938
<POP 22828-2282a StackAdj> Δ-2 {[-2-]}
<Call 0x2282a 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 22830 TST.B (A7)+> Δ+2 {}
<MI 22832 BEQ 0x22938> {}
<POP 22836-228e2 Naked> Σ0 ↓
<MI 22836 MOVE.W (A6+0x8),(A6-0xe)> {}
<MI 2283a AND.W #0x03,(A6-0xe)> {}
<MI 2283c MOVE.W #0x2d0,D0> {}
<MI 22840 ADD.W (A6-0xe),D0> {}
<POP 0x22842 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 22848 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<Pointer.fp 0x2284a <LVAR -0x00c @ 2(r)>> Δ-4 {[2, 'D0']|[@@-12]}
<Call 0x2284e 0x22730> {[2, 'D0']|[@@-12]}
<POP 22850-22852 StackAdj> Δ+6 {}
<MI 22852 MOVE.W #0x350,D0> {}
<MI 22856 ADD.W (A6-0xe),D0> {}
<POP 0x22858 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 2285e MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<Pointer.fp 0x22860 <LVAR -0x00a @ 2(r)>> Δ-4 {[2, 'D0']|[@@-10]}
<Call 0x22864 0x22730> {[2, 'D0']|[@@-10]}
<POP 22866-22868 StackAdj> Δ+6 {}
<MI 22868 MOVE.W #0x1d0,D0> {}
<MI 2286c ADD.W (A6-0xe),D0> {}
<POP 0x2286e LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 22874 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<Pointer.fp 0x22876 <LVAR -0x008 @ 2(r)>> Δ-4 {[2, 'D0']|[@@-8]}
<Call 0x2287a 0x22730> {[2, 'D0']|[@@-8]}
<POP 2287c-2287e StackAdj> Δ+6 {}
<MI 2287e MOVE.W #0x250,D0> {}
<MI 22882 ADD.W (A6-0xe),D0> {}
<POP 0x22884 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 2288a MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<Pointer.fp 0x2288c <LVAR -0x006 @ 2(r)>> Δ-4 {[2, 'D0']|[@@-6]}
<Call 0x22890 0x22730> {[2, 'D0']|[@@-6]}
<POP 22892-22894 StackAdj> Δ+6 {}
<MI 22894 MOVE.W #0x310,D0> {}
<MI 22898 ADD.W (A6-0xe),D0> {}
<POP 0x2289a LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 228a0 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<Pointer.fp 0x228a2 <LVAR -0x004 @ 2(r)>> Δ-4 {[2, 'D0']|[@@-4]}
<Call 0x228a6 0x22730> {[2, 'D0']|[@@-4]}
<POP 228a8-228aa StackAdj> Δ+6 {}
<MI 228aa CLR.W 0x296fc> {}
<MI 228b0 CLR.L D0> {}
<MI 228b2 MOVE.W (A6-0x6),D0> {}
<MI 228b6 ASL.L #0x8,D0> {}
<MI 228b8 CLR.L D1> {}
<MI 228ba MOVE.W (A6-0x8),D1> {}
<MI 228be ADD.L D1,D0> {}
<POP 0x228c0 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 228c6 MOVE.W D0,0x296fe> {}
<MI 228cc MOVE.W (A6-0xa),D0> {}
<POP 0x228d0 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 228d2 MOVE.W D0,0x29700> {}
<MI 228d8 MOVE.W (A6-0xc),D0> {}
<POP 0x228dc LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 228de MOVE.W D0,0x29702> {}
<MI 228e0 MOVEQ.L #0x03,D6> {}
<POP 228e2-228f8 Naked> Σ0 ↓ →0x22930 ←0x22930
<MI 228e2 MOVE.W D6,D0> {}
<MI 228e4 ASL.W #0x2,D0> {}
<MI 228e6 LEA.L 0x296d2,A0> {}
<MI 228ec MOVE.W (A0+D0.W+#0x10),D1> {}
<MI 228f0 CMP.W 0x296fe,D1> {}
<MI 228f6 BNE 0x22930> {}
<POP 228f8-22906 Naked> Σ0 ↓ →0x22930
<MI 228f8 CLR.L D1> {}
<MI 228fa MOVE.B (A0+D0.W+#0x12),D1> {}
<MI 228fe CMP.W 0x29700,D1> {}
<MI 22904 BNE 0x22930> {}
<POP 22906-22910 Naked> Σ0 ↓ →0x2292a
<MI 22906 CLR.L D1> {}
<MI 22908 MOVE.B (A0+D0.W+#0x13),D1> {}
<MI 2290c CMP.W 0x29702,D1> {}
<MI 2290e BEQ 0x2292a> {}
<POP 22910-2291a Naked> Σ0 ↓ →0x22930
<MI 22910 MOVE.W (A6-0x4),D0> {}
<MI 22914 CMPI.W #0x0001,D0> {}
<MI 22918 BNE 0x22930> {}
<POP 2291a-2292a Naked> Σ0 ↓ →0x22930
<MI 2291a MOVE.W D6,D0> {}
<MI 2291c ASL.W #0x1,D0> {}
<MI 2291e LEA.L 0x2237c,A0> {}
<MI 22922 MOVE.W 0x29702,D1> {}
<MI 22924 CMP.W (A0+D0.W),D1> {}
<MI 22928 BNE 0x22930> {}
<POP 2292a-22930 Naked> Σ0 ↓ ←0x22906
<MI 2292a MOVE.W D6,0x296fc> {}
<POP 22930-22934 Naked> Σ0 ↓ →0x228e2 ←0x228e2 ←0x228f8 ←0x22910 ←0x2291a
<MI 22930 SUBQ.W #0x1,D6> {}
<MI 22932 BGE 0x228e2> {}
<POP 22934-22938 Naked> Σ0 →0x22ada
<MI 22934 BRA 0x22ada> {}
<POP 22938-22940 Naked> Σ0 ↓ ←0x22828
<MI 22938 MOVEQ.L #0x00,D7> {}
<MI 2293a MOVE.W (A6+0x8),(A6-0xe)> {}
<MI 2293e AND.W #0x03,(A6-0xe)> {}
<POP 22940-22976 Naked> Σ0 ↓ →0x22940 ←0x22940
<POP 0x22940 LimitCheck 0x0 ≤ D7 ≤ 0xffff> {}
<MI 22946 MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<Pointer.fp 0x22948 <LVAR -0x48e @ 2(r)>> Δ-4 {[2, 'D7']|[@@-1166]}
<Call 0x2294c 0x22730> {[2, 'D7']|[@@-1166]}
<POP 2294e-22950 StackAdj> Δ+6 {}
<POP 0x22950 LimitCheck 0x0 ≤ D7 ≤ 0x477> {}
<MI 2295a LEA.L (A6-0x90a),A0> {}
<MI 2295e LEA.L (A0+D7.L),A0> {}
<MI 22962 MOVE.W (A6-0x48e),D0> {}
<POP 0x22966 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 22968 MOVE.B D0,(A0+0x480)> {}
<MI 2296c ADDQ.L #0x1,D7> {}
<MI 2296e CMPI.L #0x00000400,D7> {}
<MI 22974 BNE 0x22940> {}
<POP 22976-22982 Naked> Σ0 ↓ →0x229b8
<POP 22976-22978 StackAdj> Δ-2 {[-2-]}
<Call 0x22978 0x10610> {[-2-]}
Is_machine_type_one_or_three() : Bool
<MI 2297e TST.B (A7)+> Δ+2 {}
<MI 22980 BEQ 0x229b8> {}
<POP 22982-229b8 Naked> Σ0 ↓ →0x22982 ←0x22982
<POP 0x22982 LimitCheck 0x0 ≤ D7 ≤ 0xffff> {}
<MI 22988 MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<Pointer.fp 0x2298a <LVAR -0x48e @ 2(r)>> Δ-4 {[2, 'D7']|[@@-1166]}
<Call 0x2298e 0x22730> {[2, 'D7']|[@@-1166]}
<POP 22990-22992 StackAdj> Δ+6 {}
<POP 0x22992 LimitCheck 0x0 ≤ D7 ≤ 0x477> {}
<MI 2299c LEA.L (A6-0x90a),A0> {}
<MI 229a0 LEA.L (A0+D7.L),A0> {}
<MI 229a4 MOVE.W (A6-0x48e),D0> {}
<POP 0x229a8 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 229aa MOVE.B D0,(A0+0x480)> {}
<MI 229ae ADDQ.L #0x1,D7> {}
<MI 229b0 CMPI.L #0x00000478,D7> {}
<MI 229b6 BNE 0x22982> {}
<POP 229b8-22a16 Naked> Σ0 ↓ →0x22aa0 ←0x22976
<MI 229b8 LEA.L (A6-0x906),A0> {}
<MI 229bc LEA.L (A6-0x48a),A1> {}
<BlockMove 1144,A1,A0> {}
<MI 229ca MOVE.W (A6-0xe),D0> {}
<POP 0x229cc LimitCheck 0x0 ≤ D0 ≤ 0x7f> {}
<MI 229d0 LEA.L (A6-0x90a),A0> {}
<MI 229d4 LEA.L (A0+D0.W),A0> {}
<MI 229d8 CLR.L D0> {}
<MI 229da MOVE.B (A0+0x254),D0> {}
<MI 229de ASL.W #0x8,D0> {}
<MI 229e0 CLR.L D1> {}
<MI 229e2 MOVE.B (A0+0x1d4),D1> {}
<MI 229e6 ADD.W D0,D1> {}
<MI 229e8 MOVE.W D1,0x296fe> {}
<MI 229ee CLR.L D0> {}
<MI 229f0 MOVE.B (A0+0x354),D0> {}
<MI 229f4 MOVE.W D0,0x29700> {}
<MI 229fa CLR.L D0> {}
<MI 229fc MOVE.B (A0+0x2d4),D0> {}
<MI 22a00 MOVE.W D0,0x29702> {}
<MI 22a02 CLR.W 0x296fc> {}
<POP 22a08-22a0a StackAdj> Δ-2 {[-2-]}
<Call 0x22a0a 0x10610> {[-2-]}
Is_machine_type_one_or_three() : Bool
<MI 22a10 TST.B (A7)+> Δ+2 {}
<MI 22a12 BEQ 0x22aa0> {}
<POP 22a16-22a44 Naked> Σ0 ↓
<Blob 0x22a16 [30] @> Δ-30 {[«30""»]}
<POP 22a22-22a24 StackAdj> Δ-4 {[«30""»]|[-4-]}
<Lit 0x22a24 30> {[«30""»]|[$$123456789012345678901234567890]}
<MI 22a38 MOVE.L (A7)+,0x29704> Δ+4 {[«30""»]}
<POP 22a3e-22a42 StackAdj> Δ+30 {}
<MI 22a42 MOVEQ.L #0x00,D5> {}
<POP 22a44-22a88 Naked> Σ0 ↓ →0x22a44 ←0x22a44
<MI 22a44 MOVEA.L 0x29704,A0> {}
<MI 22a4a MOVE.L D5,D0> {}
<MI 22a4c ADDQ.L #0x1,D0> {}
<MI 22a4e SUBQ.L #0x1,D0> {}
<POP 0x22a50 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {}
<MI 22a5a MOVE.W (A6-0xe),D1> {}
<POP 0x22a5c LimitCheck 0x0 ≤ D1 ≤ 0x3> {}
<MI 22a5e MULS.W #0x1e,D1> {}
<MI 22a62 LEA.L (A6-0x90a),A1> {}
<POP 0x22a66 LimitCheck 0x0 ≤ D5 ≤ 0x1d> {}
<MI 22a70 LEA.L (A1+D1.W),A1> {}
<MI 22a74 LEA.L (A1+D5.L),A1> {}
<MI 22a78 MOVE.B (A1+0x404),(A0+D0.L+#0x2)> {}
<MI 22a7e ADDQ.L #0x1,D5> {}
<MI 22a80 CMPI.L #0x0000001d,D5> {}
<MI 22a86 BLE 0x22a44> {}
<POP 22a88-22aa0 Naked> Σ0 →0x22ada
<POP 22a88-22a8a StackAdj> Δ-4 {[-4-]}
<Blob 0x22a8a [4] 0x29704> Δ-4 {[-4-]|[«4»]}
<Call 0x22a90 0x102f0> {[-4-]|[«4»]}
ToUpper(a : String) : String
<POP 22a96-22a98 StackAdj> Δ+4 {[-4-]}
<MI 22a98 MOVE.L (A7)+,0x29704> Δ+4 {}
<MI 22a9e BRA 0x22ada> {}
<POP 22aa0-22aa2 Naked> Σ0 ↓ ←0x229b8
<MI 22aa0 MOVEQ.L #0x05,D6> {}
<POP 22aa2-22ab8 Naked> Σ0 ↓ →0x22ad6 ←0x22ad6
<MI 22aa2 MOVE.W D6,D0> {}
<MI 22aa4 ASL.W #0x2,D0> {}
<MI 22aa6 LEA.L 0x296d2,A0> {}
<MI 22aac MOVE.W (A0+D0.W+#0x10),D1> {}
<MI 22ab0 CMP.W 0x296fe,D1> {}
<MI 22ab6 BNE 0x22ad6> {}
<POP 22ab8-22ac6 Naked> Σ0 ↓ →0x22ad6
<MI 22ab8 CLR.L D1> {}
<MI 22aba MOVE.B (A0+D0.W+#0x12),D1> {}
<MI 22abe CMP.W 0x29700,D1> {}
<MI 22ac4 BNE 0x22ad6> {}
<POP 22ac6-22ad0 Naked> Σ0 ↓ →0x22ad6
<MI 22ac6 CLR.L D1> {}
<MI 22ac8 MOVE.B (A0+D0.W+#0x13),D1> {}
<MI 22acc CMP.W 0x29702,D1> {}
<MI 22ace BNE 0x22ad6> {}
<POP 22ad0-22ad6 Naked> Σ0 ↓
<MI 22ad0 MOVE.W D6,0x296fc> {}
<POP 22ad6-22ada Naked> Σ0 ↓ →0x22aa2 ←0x22aa2 ←0x22ab8 ←0x22ac6
<MI 22ad6 SUBQ.W #0x1,D6> {}
<MI 22ad8 BGE 0x22aa2> {}
<POP 22ada-22ae2 Epilogue> Σ0 ←0x22934 ←0x22a88
@ 22ae2
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 22ae2-22b48 Body>
<POP 22ae2-22af8 Prologue> Σ0 ↓
<POP 22af8-22b04 RegCacheLoad> Σ0 ↓
<POP 22b04-22b36 Naked> Σ0 ↓ →0x22b40
<MI 22b04 MOVE.L (A6+0xa),D4> {}
<MI 22b08 MOVEQ.L #0x0a,D3> {}
<Call 0x22b0a 0x10294> {}
?divs_d3_d4
<MI 22b10 MOVE.L (A4+0xe),-(A7)> Δ-4 {[4, '(A4+0xe)']}
<MI 22b12 MOVE.L D4,D0> {[4, '(A4+0xe)']}
<MI 22b14 ADD.L #0x30,D0> {[4, '(A4+0xe)']}
<POP 0x22b16 LimitCheck 0x0 ≤ D0 ≤ 0xff> {[4, '(A4+0xe)']}
<MI 22b20 MOVE.B D0,-(A7)> Δ-2 {[4, '(A4+0xe)']|[2, 'D0']}
<Call 0x22b22 0x102c0> {[4, '(A4+0xe)']|[2, 'D0']}
AppendChar(MOD b : String; a : char)
<POP 22b24-22b26 StackAdj> Δ+2 {[4, '(A4+0xe)']}
<MI 22b26 MOVE.L (A4+0xe),(A7)> {[4, '(A4+0xe)']}
<MI 22b28 ADD.W #0x30,D3> {[4, '(A4+0xe)']}
<MI 22b2a MOVE.B D3,-(A7)> Δ-2 {[4, '(A4+0xe)']|[2, 'D3']}
<Call 0x22b2c 0x102c0> {[4, '(A4+0xe)']|[2, 'D3']}
AppendChar(MOD b : String; a : char)
<POP 22b2e-22b30 StackAdj> Δ+6 {}
<MI 22b30 TST.B (A6+0x8)> {}
<MI 22b34 BEQ 0x22b40> {}
<POP 22b36-22b40 Naked> Σ0 ↓
<MI 22b36 MOVE.L (A4+0xe),-(A7)> Δ-4 {[4, '(A4+0xe)']}
<MI 22b38 MOVE.B (A6+0x8),-(A7)> Δ-2 {[4, '(A4+0xe)']|[2, '(A6+0x8)']}
<Call 0x22b3c 0x102c0> {[4, '(A4+0xe)']|[2, '(A6+0x8)']}
AppendChar(MOD b : String; a : char)
<POP 22b3e-22b40 StackAdj> Δ+6 {}
<POP 22b40-22b48 Epilogue> Σ0 ←0x22b04
@ 22b48
<LVAR 0x00c 2(r)>
<LVAR 0x008 2(r)>
<LVAR -0x006 4(rw)>
<LVAR -0x00a 4(rw)>
<LVAR -0x014 @>
<POP 22b48-22c14 Body>
<POP 22b48-22b5e Prologue> Σ0 ↓
<POP 22b5e-22b68 RegCacheLoad> Σ0 ↓
<POP 22b68-22c0c Naked> Σ0 ↓
<MI 22b68 CLR.L D0> {}
<MI 22b6a MOVE.W (A6+0x8),D0> {}
<MI 22b6e CLR.L D1> {}
<MI 22b70 MOVE.W (A6+0xc),D1> {}
<MI 22b74 NEG.L D1> {}
<MI 22b76 ADD.L D0,D1> {}
<POP 0x22b78 LimitCheck 0x0 ≤ D1 ≤ 0xffff> {}
<MI 22b82 MOVE.W D1,D7> {}
<MI 22b84 CLR.L D0> {}
<MI 22b86 MOVE.W D7,D0> {}
<MI 22b88 DIVU.W #0x708,D0> {}
<MI 22b8c CLR.L D1> {}
<MI 22b8e MOVE.W D0,D1> {}
<MI 22b90 MOVE.L D1,D6> {}
<MI 22b92 SWAP.W D0> {}
<MI 22b94 MOVE.W D0,D7> {}
<MI 22b96 CLR.L D0> {}
<MI 22b98 MOVE.W D7,D0> {}
<MI 22b9a DIVU.W #0x1e,D0> {}
<MI 22b9e CLR.L D1> {}
<MI 22ba0 MOVE.W D0,D1> {}
<MI 22ba2 MOVE.L D1,D5> {}
<MI 22ba4 SWAP.W D0> {}
<MI 22ba6 MOVE.W D0,D7> {}
<MI 22ba8 CLR.L D0> {}
<MI 22baa MOVE.W D7,D0> {}
<MI 22bac ASL.L #0x1,D0> {}
<MI 22bae MOVE.L D0,(A6-0xa)> {}
<Blob 0x22bb2 [4] @> Δ-4 {[«4""»]}
<Blob 0x22bb6 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x22bba [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x22bbe [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 22bc2-22bc4 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x22bc4 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Elapsed time is_]}
<MI 22bd8 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 22bdc-22be0 StackAdj> Δ+12 {[«4""»]}
<MI 22be0 MOVE.L D6,(A7)> {[4, 'D6']}
<Const 0x22be2 0x3a.2> Δ-2 {[4, 'D6']|[#58]}
<MI 22be4 LEA.L (A6-0x14),A4> {[4, 'D6']|[#58]}
<Call 0x22be6 0x22ae2> {[4, 'D6']|[#58]}
<POP 22be8-22bea StackAdj> Δ+2 {[4, 'D6']}
<MI 22bea MOVE.L D5,(A7)> {[4, 'D5']}
<Const 0x22bec 0x3a.2> Δ-2 {[4, 'D5']|[#58]}
<MI 22bee LEA.L (A6-0x14),A4> {[4, 'D5']|[#58]}
<Call 0x22bf0 0x22ae2> {[4, 'D5']|[#58]}
<POP 22bf2-22bf4 StackAdj> Δ+2 {[4, 'D5']}
<MI 22bf4 MOVE.L (A6-0xa),(A7)> {[4, '(A6-0xa)']}
<MI 22bf8 CLR.B -(A7)> Δ-2 {[4, '(A6-0xa)']|[#0]}
<MI 22bfa LEA.L (A6-0x14),A4> {[4, '(A6-0xa)']|[#0]}
<Call 0x22bfc 0x22ae2> {[4, '(A6-0xa)']|[#0]}
<POP 22bfe-22c00 StackAdj> Δ+2 {[4, '(A6-0xa)']}
<MI 22c00 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<Call 0x22c04 0x103e0> {[4, '(A6-0x6)']}
WriteConsoleStringCrLf(str : String)
<POP 22c0a-22c0c StackAdj> Δ+4 {}
<POP 22c0c-22c14 Epilogue> Σ0
@ 22c14
<POP 22c14-22c6c Body>
<POP 22c14-22c2a Prologue> Σ0 ↓
<POP 22c2a-22c2c RegCacheLoad> Σ0 ↓
<POP 22c2c-22c2e Naked> Σ0 ↓
<MI 22c2c MOVEQ.L #0x01,D7> {}
<POP 22c2e-22c64 Naked> Σ0 ↓ →0x22c2e ←0x22c2e
<MI 22c2e MOVE.L D7,D0> {}
<MI 22c30 ASL.L #0x1,D0> {}
<MI 22c32 MOVE.L D0,D1> {}
<MI 22c34 SUBQ.L #0x1,D1> {}
<POP 0x22c36 LimitCheck 0x0 ≤ D1 ≤ 0x1d> {}
<MI 22c3c LEA.L 0x2971e,A0> {}
<MI 22c42 MOVE.B (A0+D1.L+#0x36),D6> {}
<MI 22c46 SUBQ.L #0x1,D0> {}
<MI 22c48 SUBQ.L #0x1,D0> {}
<POP 0x22c4a LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 22c50 MOVE.B (A0+D0.L+#0x36),(A0+D1.L+#0x36)> {}
<MI 22c56 MOVE.B D6,(A0+D0.L+#0x36)> {}
<MI 22c5a ADDQ.L #0x1,D7> {}
<MI 22c5c CMPI.L #0x0000000f,D7> {}
<MI 22c62 BLE 0x22c2e> {}
<POP 22c64-22c6c Epilogue> Σ0
@ 22c6c
<LVAR 0x008 1(rw)>
<LVAR -0x004 @ 2(r)>
<LVAR -0x01c 2(r)>
<POP 22c6c-22d70 Body>
<POP 22c6c-22c82 Prologue> Σ0 ↓
<POP 22c82-22c8c RegCacheLoad> Σ0 ↓
<POP 22c8c-22c98 Naked> Σ0 ↓ →0x22cd2
<POP 22c8c-22c8e StackAdj> Δ-2 {[-2-]}
<Call 0x22c8e 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 22c94 TST.B (A7)+> Δ+2 {}
<MI 22c96 BEQ 0x22cd2> {}
<POP 22c98-22ccc Naked> Σ0 ↓ →0x22cce
<MI 22c98 MOVE.L #0x9303,D7> {}
<MI 22c9e ASL.L #0x8,D7> {}
<MI 22ca0 ASL.L #0x8,D7> {}
<MI 22ca2 ADDI.L #0x0000e000,D7> {}
<MI 22ca8 MOVE.L D7,-(A7)> Δ-4 {[4, 'D7']}
<Const 0x22caa 0x5.2> Δ-2 {[4, 'D7']|[#5]}
<MI 22cac LEA.L (A6-0x4),A0> {[4, 'D7']|[#5]}
<MI 22cb0 MOVE.L A0,-(A7)> Δ-4 {[4, 'D7']|[#5]|[4, 'A0']}
<Const 0x22cb2 0x1.2> Δ-2 {[4, 'D7']|[#5]|[4, 'A0']|[#1]}
<Const 0x22cb4 0x2.2> Δ-2 {[4, 'D7']|[#5]|[4, 'A0']|[#1]|[#2]}
<Call 0x22cb6 0x1023a> {[4, 'D7']|[#5]|[4, 'A0']|[#1]|[#2]}
KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
<POP 22cbc-22cc0 StackAdj> Δ+14 {}
<MI 22cc0 CLR.B (A6+0x8)> {}
<MI 22cc2 MOVE.W (A6-0x4),D0> {}
<MI 22cc6 ANDI.W #0x0080,D0> {}
<MI 22cca BNE 0x22cce> {}
<POP 22ccc-22cce Naked> Σ0 ↓
<MI 22ccc ADDQ.B #0x1,(A6+0x8)> {}
<POP 22cce-22cd2 Naked> Σ0 →0x22d68 ←0x22c98
<MI 22cce BRA 0x22d68> {}
<POP 22cd2-22cf6 Naked> Σ0 →0x22cfe →0x22d06 →0x22d0e →0x22d16 ←0x22c8c
<MI 22cd2 MOVE.L #0x9303,D7> {}
<MI 22cd8 ASL.L #0x8,D7> {}
<MI 22cda ASL.L #0x8,D7> {}
<MI 22cdc MOVE.W 0x29710,D0> {}
<MI 22ce2 ASR.W #0x2,D0> {}
<POP 0x22ce4 LimitCheck 0x0 ≤ D0 ≤ 0x3> {}
<MI 22cec ADD.W D0,D0> {}
<MI 22cee SWITCH D0.W> {}
<POP 22cfe-22d06 Naked> Σ0 →0x22d1c ←0x22cd2
<MI 22cfe ADDI.L #0x0000fdc0,D7> {}
<MI 22d04 BRA 0x22d1c> {}
<POP 22d06-22d0e Naked> Σ0 →0x22d1c ←0x22cd2
<MI 22d06 ADDI.L #0x0000fcc0,D7> {}
<MI 22d0c BRA 0x22d1c> {}
<POP 22d0e-22d16 Naked> Σ0 →0x22d1c ←0x22cd2
<MI 22d0e ADDI.L #0x0000fc80,D7> {}
<MI 22d14 BRA 0x22d1c> {}
<POP 22d16-22d1c Naked> Σ0 ↓ ←0x22cd2
<MI 22d16 ADDI.L #0x0000fc40,D7> {}
<POP 22d1c-22d1e Naked> Σ0 ↓ ←0x22cfe ←0x22d06 ←0x22d0e
<MI 22d1c MOVEQ.L #0x00,D6> {}
<POP 22d1e-22d5a Naked> Σ0 ↓ →0x22d1e ←0x22d1e
<MI 22d1e MOVEQ.L #0x02,D4> {}
<MI 22d20 MOVE.L D6,D3> {}
<Call 0x22d22 0x1028c> {}
?muls_d3_d4
<MI 22d28 MOVE.L D7,-(A7)> Δ-4 {[4, 'D7']}
<MI 22d2a ADD.L D4,(A7)> {[-4-]}
<Const 0x22d2c 0x5.2> Δ-2 {[-4-]|[#5]}
<POP 0x22d2e LimitCheck 0x0 ≤ D6 ≤ 0x13> {[-4-]|[#5]}
<MI 22d38 MOVE.L D6,D0> {[-4-]|[#5]}
<MI 22d3a ASL.L #0x1,D0> {[-4-]|[#5]}
<MI 22d3c LEA.L (A6+D0.L-#0x30),A0> {[-4-]|[#5]}
<MI 22d40 MOVE.L A0,-(A7)> Δ-4 {[-4-]|[#5]|[4, 'A0']}
<Const 0x22d42 0x1.2> Δ-2 {[-4-]|[#5]|[4, 'A0']|[#1]}
<Const 0x22d44 0x2.2> Δ-2 {[-4-]|[#5]|[4, 'A0']|[#1]|[#2]}
<Call 0x22d46 0x1023a> {[-4-]|[#5]|[4, 'A0']|[#1]|[#2]}
KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word
<POP 22d4c-22d50 StackAdj> Δ+14 {}
<MI 22d50 ADDQ.L #0x1,D6> {}
<MI 22d52 CMPI.L #0x00000013,D6> {}
<MI 22d58 BLE 0x22d1e> {}
<POP 22d5a-22d66 Naked> Σ0 ↓ →0x22d68
<MI 22d5a CLR.B (A6+0x8)> {}
<MI 22d5c MOVE.W (A6-0x1c),D0> {}
<MI 22d60 ANDI.W #0x0010,D0> {}
<MI 22d64 BEQ 0x22d68> {}
<POP 22d66-22d68 Naked> Σ0 ↓
<MI 22d66 ADDQ.B #0x1,(A6+0x8)> {}
<POP 22d68-22d70 Epilogue> Σ0 ←0x22cce ←0x22d5a
@ 22d70
<LVAR 0x008 1(r)>
<LVAR -0x01c @ 1(r)>
<LVAR -0x028 @ 2(r)>
<LVAR -0x02a 2(r)>
<LVAR -0x02c 2(r)>
<LVAR -0x02e 2(w)>
<LVAR -0x030 2(r)>
<LVAR -0x032 2(r)>
<LVAR -0x034 2(w)>
<LVAR -0x036 2(r)>
<LVAR -0x038 @ 2(r)>
<POP 22d70-23946 Body> Δ+124
<POP 22d70-22d86 Prologue> Σ0 ↓
<POP 22d86-22da4 RegCacheLoad> Σ0 ↓
<POP 22da4-22e4c Naked> Σ0 ↓ →0x22e70
<MI 22da4 CLR.B -(A7)> Δ-2 {[#0]}
<Call 0x22da6 0x103ac> {[#0]}
Set_is_open_ERROR_LOG(a : Bool)
<POP 22dac-22dae StackAdj> Δ+2 {}
<MI 22dae MOVE.L #0x01,0x20020> {}
<MI 22db4 MOVE.L #0x01,0x10026> {}
<Blob 0x22dba [62] @> Δ-62 {[«62""»]}
<POP 22dcc-22dce StackAdj> Δ-8 {[«62""»]|[-8-]}
<Lit 0x22dce 61> {[«62""»]|[-4-]|[$$Enter unit number of disk to format/build/scan (usually 0) :_]}
<Const 0x22ddc 0x0.4> Δ-4 {[«62""»]|[-4-]|[$$Enter unit number of disk to format/build/scan (usually 0) :_]|[##0]}
<Const 0x22de0 0xf.4> Δ-4 {[«62""»]|[-4-]|[$$Enter unit number of disk to format/build/scan (usually 0) :_]|[##0]|[##15]}
<Call 0x22de4 0x103ec> {[«62""»]|[-4-]|[$$Enter unit number of disk to format/build/scan (usually 0) :_]|[##0]|[##15]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 22dea-22dec StackAdj> Δ+12 {[«62""»]|[-4-]}
<MI 22dec MOVE.L (A7)+,D0> Δ+4 {[«62""»]}
<POP 0x22dee LimitCheck 0x0 ≤ D0 ≤ 0xf> {[«62""»]}
<POP 22df8-22dfc StackAdj> Δ+62 {}
<MI 22dfc MOVE.W D0,0x29710> {}
<MI 22dfe CLR.W (A6-0x38)> {}
<MI 22e02 CLR.W (A6-0x36)> {}
<MI 22e06 MOVE.W #0x2,(A6-0x34)> {}
<MI 22e0c CLR.W (A6-0x32)> {}
<MI 22e10 CLR.W (A6-0x30)> {}
<MI 22e14 ASL.W #0x8,D0> {}
<MI 22e16 MOVE.W D0,(A6-0x2e)> {}
<MI 22e1a CLR.W (A6-0x2c)> {}
<MI 22e1e CLR.W (A6-0x2a)> {}
<Pointer.fp 0x22e22 <LVAR -0x038 @ 2(r)>> Δ-4 {[@@-56]}
<MI 22e26 LEA.L (A6-0x28),A0> {[@@-56]}
<MI 22e2a MOVE.L A0,-(A7)> Δ-4 {[@@-56]|[4, 'A0']}
<MI 22e2c CLR.W -(A7)> Δ-2 {[@@-56]|[4, 'A0']|[#0]}
<Call 0x22e2e 0x10204> {[@@-56]|[4, 'A0']|[#0]}
KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
<POP 22e34-22e36 StackAdj> Δ+8 {[-2-]}
<MI 22e36 CLR.W (A7)> {[-2-]}
<Pointer.fp 0x22e38 <LVAR -0x01c @ 1(r)>> Δ-4 {[-2-]|[@@-28]}
<Call 0x22e3c 0x10206> {[-2-]|[@@-28]}
KC03_Wait_Disk_IO(a : W; VAR status : Byte)
<POP 22e42-22e44 StackAdj> Δ+6 {}
<MI 22e44 MOVE.W (A6-0x28),D0> {}
<MI 22e48 CMP.W #0x01,D0> {}
<MI 22e4a BEQ 0x22e70> {}
<POP 22e4c-22e70 Naked> Σ0 ↓
<Blob 0x22e4c [30] @> Δ-30 {[«30""»]}
<POP 22e58-22e5a StackAdj> Δ-4 {[«30""»]|[-4-]}
<Lit 0x22e5a 30> {[«30""»]|[$$That disk unit does not exist.]}
<Call 0x22e68 0x22522> {[«30""»]|[$$That disk unit does not exist.]}
<POP 22e6c-22e70 StackAdj> Δ+34 {}
<POP 22e70-22eac Naked> Σ0 ↓ →0x22f0a ←0x22da4
<MI 22e70 MOVE.W 0x29710,0x10008> {}
<MI 22e76 MOVE.W #0x7fff,0x1000c> {}
<MI 22e7e MOVE.W #0x7fff,0x1000a> {}
<MI 22e86 CLR.B 0x29708> {}
<Const 0x22e88 0x2.2> Δ-2 {[#2]}
<Const 0x22e8c 0x2.2> Δ-2 {[#2]|[#2]}
<Const 0x22e90 0x1.4> Δ-4 {[#2]|[#2]|[##1]}
<Blob 0x22e94 [4] 0x2971a> Δ-4 {[#2]|[#2]|[##1]|[«4»]}
<Pointer.fp 0x22e9a <LVAR -0x01c @ 1(r)>> Δ-4 {[#2]|[#2]|[##1]|[«4»]|[@@-28]}
<Call 0x22e9e 0x1036c> {[#2]|[#2]|[##1]|[«4»]|[@@-28]}
RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
<POP 22ea4-22ea6 StackAdj> Δ+16 {}
<MI 22ea6 TST.B (A6-0x1c)> {}
<MI 22eaa BNE 0x22f0a> {}
<POP 22eac-22eb2 Naked> Σ0 ↓ →0x22eda
<MI 22eac TST.B (A6+0x8)> {}
<MI 22eb0 BEQ 0x22eda> {}
<POP 22eb2-22eda Naked> Σ0 Δ-46 →0x22f02
<Blob 0x22eb2 [42] @> Δ-42 {[«42""»]}
<POP 22ec4-22ec6 StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x22ec6 41> {[«42""»]|[$$Can't retrieve labels due to disk errors.]}
<Call 0x22ed4 0x22522> {[«42""»]|[$$Can't retrieve labels due to disk errors.]}
<MI 22ed8 BRA 0x22f02> {[«42""»]|[$$Can't retrieve labels due to disk errors.]}
<POP 22eda-22f02 Naked> Σ0 Δ-46 ↓ ←0x22eac
<Blob 0x22eda [42] @> Δ-42 {[«42""»]}
<POP 22eec-22eee StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x22eee 41> {[«42""»]|[$$Can't retrieve labels due to disk errors.]}
<Call 0x22efc 0x103e0> {[«42""»]|[$$Can't retrieve labels due to disk errors.]}
WriteConsoleStringCrLf(str : String)
<POP 22f02-22f0a Naked> Σ-46 Δ+46 →0x23088 ←0x22eb2
<POP 22f02-22f06 StackAdj> Δ+46 {}
<MI 22f06 BRA 0x23088> {}
<POP 22f0a-22f16 Naked> Σ0 ↓ →0x22f6e ←0x22e70
<MI 22f0a MOVE.W 0x29720,D0> {}
<MI 22f10 CMPI.W #0x7fed,D0> {}
<MI 22f14 BEQ 0x22f6e> {}
<POP 22f16-22f1c Naked> Σ0 ↓ →0x22f42
<MI 22f16 TST.B (A6+0x8)> {}
<MI 22f1a BEQ 0x22f42> {}
<POP 22f1c-22f42 Naked> Σ0 Δ-24 →0x22f68
<Blob 0x22f1c [20] @> Δ-20 {[«20""»]}
<POP 22f2c-22f2e StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x22f2e 19> {[«20""»]|[$$Disk has no labels.]}
<Call 0x22f3c 0x22522> {[«20""»]|[$$Disk has no labels.]}
<MI 22f40 BRA 0x22f68> {[«20""»]|[$$Disk has no labels.]}
<POP 22f42-22f68 Naked> Σ0 Δ-24 ↓ ←0x22f16
<Blob 0x22f42 [20] @> Δ-20 {[«20""»]}
<POP 22f52-22f54 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x22f54 19> {[«20""»]|[$$Disk has no labels.]}
<Call 0x22f62 0x103e0> {[«20""»]|[$$Disk has no labels.]}
WriteConsoleStringCrLf(str : String)
<POP 22f68-22f6e Naked> Σ-24 Δ+24 →0x23088 ←0x22f1c
<POP 22f68-22f6a StackAdj> Δ+24 {}
<MI 22f6a BRA 0x23088> {}
<POP 22f6e-22f7a Naked> Σ0 ↓ →0x22fd4 ←0x22f0a
<MI 22f6e MOVE.W 0x29722,D0> {}
<MI 22f74 CMPI.W #0x0003,D0> {}
<MI 22f78 BEQ 0x22fd4> {}
<POP 22f7a-22f80 Naked> Σ0 ↓ →0x22fa6
<MI 22f7a TST.B (A6+0x8)> {}
<MI 22f7e BEQ 0x22fa6> {}
<POP 22f80-22fa6 Naked> Σ0 Δ-30 →0x22fcc
<Blob 0x22f80 [26] @> Δ-26 {[«26""»]}
<POP 22f90-22f92 StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x22f92 25> {[«26""»]|[$$Disk has obsolete labels.]}
<Call 0x22fa0 0x22522> {[«26""»]|[$$Disk has obsolete labels.]}
<MI 22fa4 BRA 0x22fcc> {[«26""»]|[$$Disk has obsolete labels.]}
<POP 22fa6-22fcc Naked> Σ0 Δ-30 ↓ ←0x22f7a
<Blob 0x22fa6 [26] @> Δ-26 {[«26""»]}
<POP 22fb6-22fb8 StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x22fb8 25> {[«26""»]|[$$Disk has obsolete labels.]}
<Call 0x22fc6 0x103e0> {[«26""»]|[$$Disk has obsolete labels.]}
WriteConsoleStringCrLf(str : String)
<POP 22fcc-22fd4 Naked> Σ-30 Δ+30 →0x23088 ←0x22f80
<POP 22fcc-22fd0 StackAdj> Δ+30 {}
<MI 22fd0 BRA 0x23088> {}
<POP 22fd4-23052 Naked> Σ0 ↓ →0x23056 ←0x22f6e
<MI 22fd4 MOVE.L 0x29726,0x29712> {}
<Call 0x22fde 0x22c14> {}
<Blob 0x22fe2 [30] 0x29772> Δ-30 {[«30»]}
<POP 22ff0-22ff2 StackAdj> Δ-8 {[«30»]|[-8-]}
<Lit 0x22ff2> {[«30»]|[-4-]|[$$…]}
<Pointer.sp 0x22ff2 8> Δ-4
<Const 0x22ff6 0x1.2> Δ-2
<Const 0x22ff8 0x1e.2> Δ-2
<Call 0x22ffc 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22ffe-23000 StackAdj> Δ+8
<Call 0x23000 0x102f0> {[«30»]|[-4-]|[$$…]}
ToUpper(a : String) : String
<POP 23006-23008 StackAdj> Δ+4 {[«30»]|[-4-]}
<MI 23008 MOVE.L (A7)+,0x29704> Δ+4 {[«30»]}
<POP 2300e-23012 StackAdj> Δ+28 {[-2-]}
<POP 23012-23013 StackAdj> Δ+2 {}
<Blob 0x23013 [2] @> Δ-2 {[«2""»]}
<Blob 0x23016 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x2301a [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 2301e-23020 StackAdj> Δ-8 {[«2""»]|[«2""»]|[«2""»]|[-8-]}
<Lit 0x23020 6> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$HDA :_]}
<POP 2302c-2302d StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$HDA :_]|[-4-]}
<Blob 0x2302d [4] 0x29704> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$HDA :_]|[-4-]|[«4»]}
<Call 0x23032 0x102cc> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$HDA :_]|[-4-]|[«4»]}
StringDup(a : String) : String
<POP 23038-2303a StackAdj> Δ+4 {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$HDA :_]|[-4-]}
<Call 0x2303a 0x102d0> {[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$HDA :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 23040-23042 StackAdj> Δ+8 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Call 0x23042 0x103e0> {[«2""»]|[«2""»]|[«2""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23048-2304c StackAdj> Δ+10 {}
<MI 2304c TST.B (A6+0x8)> {}
<MI 23050 BEQ 0x23056> {}
<POP 23052-23056 Naked> Σ0 →0x23088
<MI 23052 MOVE.B #0x01,0x29708> {}
<MI 23054 BRA 0x23088> {}
<POP 23056-23088 Naked> Σ0 ↓ ←0x22fd4
<Blob 0x23056 [58] @> Δ-58 {[«58""»]}
<POP 23062-23064 StackAdj> Δ-6 {[«58""»]|[-6-]}
<Lit 0x23064 58> {[«58""»]|[-2-]|[$$Disk appears intact. Should the information on it be used]}
<POP 23070-23072 StackAdj> Δ-2 {[«58""»]|[-2-]|[$$Disk appears intact. Should the information on it be used]|[-2-]}
<POP 23072-23073 StackAdj> Δ+2 {[«58""»]|[-2-]|[$$Disk appears intact. Should the information on it be used]}
<Const 0x23073 0x1.2> Δ-2 {[«58""»]|[-2-]|[$$Disk appears intact. Should the information on it be used]|[#1]}
<Call 0x23074 0x103f0> {[«58""»]|[-2-]|[$$Disk appears intact. Should the information on it be used]|[#1]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 2307a-2307c StackAdj> Δ+6 {[«58""»]|[-2-]}
<MI 2307c MOVE.B (A7)+,D0> Δ+2 {[«58""»]}
<MI 2307e EXTB.W D0> {[«58""»]}
<POP 0x23080 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«58""»]}
<POP 23082-23086 StackAdj> Δ+58 {}
<MI 23086 MOVE.B D0,0x29708> {}
<POP 23088-2308c Naked> Σ0 ↓ →0x23098 ←0x22f02 ←0x22f68 ←0x22fcc ←0x23052
<MI 23088 TST.B 0x29708> {}
<MI 2308a BEQ 0x23098> {}
<POP 2308c-23098 Naked> Σ0 →0x2309e
<MI 2308c MOVE.B 0x29752,0x29709> {}
<MI 23096 BRA 0x2309e> {}
<POP 23098-2309e Naked> Σ0 ↓ ←0x23088
<MI 23098 CLR.B 0x29709> {}
<POP 2309e-230aa Naked> Σ0 ↓ →0x2347c ←0x2308c
<MI 2309e CLR.W 0x296fa> {}
<MI 230a4 TST.B 0x29708> {}
<MI 230a6 BNE 0x2347c> {}
<POP 230aa-230b8 Naked> Σ0 ↓ →0x2347c
<POP 230aa-230ac StackAdj> Δ-2 {[-2-]}
<Call 0x230ac 0x10610> {[-2-]}
Is_machine_type_one_or_three() : Bool
<MI 230b2 TST.B (A7)+> Δ+2 {}
<MI 230b4 BNE 0x2347c> {}
<POP 230b8-230c6 Naked> Σ0 ↓ →0x231bc
<POP 230b8-230ba StackAdj> Δ-2 {[-2-]}
<Call 0x230ba 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 230c0 TST.B (A7)+> Δ+2 {}
<MI 230c2 BEQ 0x231bc> {}
<POP 230c6-231bc Naked> Σ0 Δ-24 →0x232f6
<Blob 0x230c6 [4] @> Δ-4 {[«4""»]}
<Blob 0x230ca [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x230ce [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x230d2 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 230d6-230d8 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x230d8 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Drive types are:]}
<Call 0x230e4 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Drive types are:]}
WriteConsoleStringCrLf(str : String)
<POP 230ea-230eb StackAdj> Δ+20 ↓ {}
<Blob 0x230eb [22] @> Δ-22 {[«22""»]}
<POP 230fa-230fc StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x230fc 21> {[«22""»]|[$$ 1 - Fujitsu 2263 ]}
<Call 0x2310a 0x103e0> {[«22""»]|[$$ 1 - Fujitsu 2263 ]}
WriteConsoleStringCrLf(str : String)
<POP 23110-23111 StackAdj> Δ+26 ↓ {}
<Blob 0x23111 [22] @> Δ-22 {[«22""»]}
<POP 23120-23122 StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x23122 21> {[«22""»]|[$$ 2 - Fujitsu 2266 ]}
<Call 0x23130 0x103e0> {[«22""»]|[$$ 2 - Fujitsu 2266 ]}
WriteConsoleStringCrLf(str : String)
<POP 23136-23138 StackAdj> Δ+26 {}
<Blob 0x23138 [24] @> Δ-24 {[«24""»]}
<POP 23144-23146 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x23146 24> {[«24""»]|[$$ 3 - SEGATE ST41200N ]}
<Call 0x23152 0x103e0> {[«24""»]|[$$ 3 - SEGATE ST41200N ]}
WriteConsoleStringCrLf(str : String)
<POP 23158-23159 StackAdj> Δ+28 ↓ {}
<Blob 0x23159 [14] @> Δ-14 {[«14""»]}
<POP 2316a-2316c StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x2316c 13> {[«14""»]|[$$ 0 - Other]}
<Call 0x2317a 0x103e0> {[«14""»]|[$$ 0 - Other]}
WriteConsoleStringCrLf(str : String)
<POP 23180-23181 StackAdj> Δ+18 ↓ {}
<Blob 0x23181 [20] @> Δ-20 {[«20""»]}
<POP 23190-23192 StackAdj> Δ-8 {[«20""»]|[-8-]}
<Lit 0x23192 19> {[«20""»]|[-4-]|[$$Enter drive type :_]}
<Const 0x231a0 0x0.4> Δ-4 {[«20""»]|[-4-]|[$$Enter drive type :_]|[##0]}
<Const 0x231a4 0x3.4> Δ-4 {[«20""»]|[-4-]|[$$Enter drive type :_]|[##0]|[##3]}
<Call 0x231a8 0x103ec> {[«20""»]|[-4-]|[$$Enter drive type :_]|[##0]|[##3]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 231ae-231b0 StackAdj> Δ+12 {[«20""»]|[-4-]}
<MI 231b0 MOVE.W (A7+0x2),D0> {[«20""»]|[-4-]}
<POP 0x231b4 LimitCheck 0x0 ≤ D0 ≤ 0x5> {[«20""»]|[-4-]}
<MI 231b8 BRA 0x232f6> {[«20""»]|[-4-]}
<POP 231bc-232f6 Naked> Σ0 Δ-24 ↓ ←0x230b8
<Blob 0x231bc [4] @> Δ-4 {[«4""»]}
<Blob 0x231c0 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x231c4 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x231c8 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 231cc-231ce StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x231ce 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Drive types are:]}
<Call 0x231da 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Drive types are:]}
WriteConsoleStringCrLf(str : String)
<POP 231e0-231e1 StackAdj> Δ+20 ↓ {}
<Blob 0x231e1 [54] @> Δ-54 {[«54""»]}
<POP 231f2-231f4 StackAdj> Δ-4 {[«54""»]|[-4-]}
<Lit 0x231f4 53> {[«54""»]|[$$ 1 - Fujitsu 2351 (Eagle) with sector interleaving]}
<Call 0x23202 0x103e0> {[«54""»]|[$$ 1 - Fujitsu 2351 (Eagle) with sector interleaving]}
WriteConsoleStringCrLf(str : String)
<POP 23208-23209 StackAdj> Δ+58 ↓ {}
<Blob 0x23209 [32] @> Δ-32 {[«32""»]}
<POP 23218-2321a StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x2321a 31> {[«32""»]|[$$ 2 - Fujitsu 2361 (Eagle XP)]}
<Call 0x23228 0x103e0> {[«32""»]|[$$ 2 - Fujitsu 2361 (Eagle XP)]}
WriteConsoleStringCrLf(str : String)
<POP 2322e-23232 StackAdj> Δ+36 {}
<Blob 0x23232 [20] @> Δ-20 {[«20""»]}
<POP 2323e-23240 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x23240 20> {[«20""»]|[$$ 3 - Fujitsu 2333]}
<Call 0x2324c 0x103e0> {[«20""»]|[$$ 3 - Fujitsu 2333]}
WriteConsoleStringCrLf(str : String)
<POP 23252-23254 StackAdj> Δ+24 {}
<Blob 0x23254 [20] @> Δ-20 {[«20""»]}
<POP 23260-23262 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x23262 20> {[«20""»]|[$$ 4 - Fujitsu 2344]}
<Call 0x2326e 0x103e0> {[«20""»]|[$$ 4 - Fujitsu 2344]}
WriteConsoleStringCrLf(str : String)
<POP 23274-23276 StackAdj> Δ+24 {}
<Blob 0x23276 [20] @> Δ-20 {[«20""»]}
<POP 23282-23284 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x23284 20> {[«20""»]|[$$ 5 - Fujitsu 2372]}
<Call 0x23290 0x103e0> {[«20""»]|[$$ 5 - Fujitsu 2372]}
WriteConsoleStringCrLf(str : String)
<POP 23296-23297 StackAdj> Δ+24 ↓ {}
<Blob 0x23297 [14] @> Δ-14 {[«14""»]}
<POP 232a8-232aa StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x232aa 13> {[«14""»]|[$$ 0 - Other]}
<Call 0x232b8 0x103e0> {[«14""»]|[$$ 0 - Other]}
WriteConsoleStringCrLf(str : String)
<POP 232be-232bf StackAdj> Δ+18 ↓ {}
<Blob 0x232bf [20] @> Δ-20 {[«20""»]}
<POP 232ce-232d0 StackAdj> Δ-8 {[«20""»]|[-8-]}
<Lit 0x232d0 19> {[«20""»]|[-4-]|[$$Enter drive type :_]}
<Const 0x232de 0x0.4> Δ-4 {[«20""»]|[-4-]|[$$Enter drive type :_]|[##0]}
<Const 0x232e2 0x5.4> Δ-4 {[«20""»]|[-4-]|[$$Enter drive type :_]|[##0]|[##5]}
<Call 0x232e6 0x103ec> {[«20""»]|[-4-]|[$$Enter drive type :_]|[##0]|[##5]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 232ec-232ee StackAdj> Δ+12 {[«20""»]|[-4-]}
<MI 232ee MOVE.W (A7+0x2),D0> {[«20""»]|[-4-]}
<POP 0x232f2 LimitCheck 0x0 ≤ D0 ≤ 0x5> {[«20""»]|[-4-]}
<POP 232f6-23306 Naked> Σ-24 Δ+24 ↓ →0x23330 ←0x230c6
<POP 232f6-232f8 StackAdj> Δ+24 {}
<MI 232f8 MOVE.W D0,0x296fa> {}
<MI 232fe TST.W 0x296fa> {}
<MI 23304 BEQ 0x23330> {}
<POP 23306-23330 Naked> Σ0 →0x2344a
<MI 23306 MOVE.W 0x296fa,D0> {}
<MI 2330c ASL.W #0x2,D0> {}
<MI 2330e LEA.L 0x296d2,A0> {}
<MI 23314 MOVE.W (A0+D0.W+#0x10),0x29712> {}
<MI 2331c MOVE.B (A0+D0.W+#0x12),0x29714> {}
<MI 23324 MOVE.B (A0+D0.W+#0x13),0x29715> {}
<MI 2332c BRA 0x2344a> {}
<POP 23330-233c0 Naked> Σ0 ↓ ←0x232f6
<Blob 0x23330 [42] @> Δ-42 {[«42""»]}
<POP 23342-23344 StackAdj> Δ-8 {[«42""»]|[-8-]}
<Lit 0x23344 41> {[«42""»]|[-4-]|[$$How many cylinders does this disk have ?_]}
<Const 0x23352 0x1.4> Δ-4 {[«42""»]|[-4-]|[$$How many cylinders does this disk have ?_]|[##1]}
<Const 0x23356 0xfff.4> Δ-4 {[«42""»]|[-4-]|[$$How many cylinders does this disk have ?_]|[##1]|[##4095]}
<Call 0x2335a 0x103ec> {[«42""»]|[-4-]|[$$How many cylinders does this disk have ?_]|[##1]|[##4095]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 23360-23362 StackAdj> Δ+12 {[«42""»]|[-4-]}
<MI 23362 MOVE.L (A7)+,D0> Δ+4 {[«42""»]}
<POP 0x23364 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[«42""»]}
<POP 2336e-23372 StackAdj> Δ+42 {}
<MI 23372 MOVE.W D0,0x29712> {}
<Blob 0x23378 [52] @> Δ-52 {[«52""»]}
<POP 2338a-2338c StackAdj> Δ-8 {[«52""»]|[-8-]}
<Lit 0x2338c 51> {[«52""»]|[-4-]|[$$How many tracks per cylinder does this disk have ?_]}
<Const 0x2339a 0x1.4> Δ-4 {[«52""»]|[-4-]|[$$How many tracks per cylinder does this disk have ?_]|[##1]}
<Const 0x2339e 0xfe.4> Δ-4 {[«52""»]|[-4-]|[$$How many tracks per cylinder does this disk have ?_]|[##1]|[##254]}
<Call 0x233a2 0x103ec> {[«52""»]|[-4-]|[$$How many tracks per cylinder does this disk have ?_]|[##1]|[##254]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 233a8-233aa StackAdj> Δ+12 {[«52""»]|[-4-]}
<MI 233aa MOVE.L (A7)+,D0> Δ+4 {[«52""»]}
<POP 0x233ac LimitCheck 0x0 ≤ D0 ≤ 0xff> {[«52""»]}
<POP 233b6-233ba StackAdj> Δ+52 {}
<MI 233ba MOVE.B D0,0x29714> {}
<POP 233c0-23410 Naked> Σ0 ↓ →0x2343c ←0x2343c
<Blob 0x233c0 [50] @> Δ-50 {[«50""»]}
<POP 233d2-233d4 StackAdj> Δ-8 {[«50""»]|[-8-]}
<Lit 0x233d4 49> {[«50""»]|[-4-]|[$$How many sectors per track does this disk have ?_]}
<Const 0x233e2 0x1.4> Δ-4 {[«50""»]|[-4-]|[$$How many sectors per track does this disk have ?_]|[##1]}
<Const 0x233e6 0xfe.4> Δ-4 {[«50""»]|[-4-]|[$$How many sectors per track does this disk have ?_]|[##1]|[##254]}
<Call 0x233ea 0x103ec> {[«50""»]|[-4-]|[$$How many sectors per track does this disk have ?_]|[##1]|[##254]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 233f0-233f2 StackAdj> Δ+12 {[«50""»]|[-4-]}
<MI 233f2 MOVE.L (A7)+,D0> Δ+4 {[«50""»]}
<POP 0x233f4 LimitCheck 0x0 ≤ D0 ≤ 0xff> {[«50""»]}
<POP 233fe-23402 StackAdj> Δ+50 {}
<MI 23402 MOVE.B D0,0x29715> {}
<MI 23408 CLR.L D1> {}
<MI 2340a MOVE.B D0,D1> {}
<MI 2340c AND.W #0x01,D1> {}
<MI 2340e BEQ 0x2343c> {}
<POP 23410-2343c Naked> Σ0 ↓
<Blob 0x23410 [32] @> Δ-32 {[«32""»]}
<POP 23422-23424 StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x23424 31> {[«32""»]|[$$Sectors per track must be even!]}
<Call 0x23432 0x103e0> {[«32""»]|[$$Sectors per track must be even!]}
WriteConsoleStringCrLf(str : String)
<POP 23438-2343c StackAdj> Δ+36 {}
<POP 2343c-2344a Naked> Σ0 ↓ →0x233c0 ←0x233c0
<MI 2343c CLR.L D0> {}
<MI 2343e MOVE.B 0x29715,D0> {}
<MI 23444 AND.W #0x01,D0> {}
<MI 23446 BNE 0x233c0> {}
<POP 2344a-2347c Naked> Σ0 ↓ ←0x23306
<Blob 0x2344a [26] @> Δ-26 {[«26""»]}
<POP 23456-23458 StackAdj> Δ-12 {[«26""»]|[-12-]}
<Lit 0x23458 26> {[«26""»]|[-8-]|[$$Enter HDA serial number :_]}
<Call 0x23464 0x103e4> {[«26""»]|[-8-]|[$$Enter HDA serial number :_]}
AskConsoleString(prompt : String) : String
<POP 2346a-2346c StackAdj> Δ+4 {[«26""»]|[-8-]}
<Call 0x2346c 0x102f0> {[«26""»]|[-8-]}
ToUpper(a : String) : String
<POP 23472-23474 StackAdj> Δ+4 {[«26""»]|[-4-]}
<MI 23474 MOVE.L (A7)+,0x29704> Δ+4 {[«26""»]}
<POP 2347a-2347c StackAdj> Δ+26 {}
<POP 2347c-2348c Naked> Σ0 ↓ →0x2349c ←0x2309e ←0x230aa
<Blob 0x2347c [2] 0x29710> Δ-2 {[«2»]}
<Call 0x2347e 0x227f8> {[«2»]}
<POP 23482-23484 StackAdj> Δ+2 {}
<MI 23484 TST.W 0x296fa> {}
<MI 2348a BNE 0x2349c> {}
<POP 2348c-2349c Naked> Σ0 ↓
<MI 2348c MOVE.W 0x296fc,D0> {}
<POP 0x23492 LimitCheck 0x0 ≤ D0 ≤ 0x5> {}
<MI 23496 MOVE.W D0,0x296fa> {}
<POP 2349c-234aa Naked> Σ0 ↓ →0x23642 ←0x2347c
<POP 2349c-2349e StackAdj> Δ-2 {[-2-]}
<Call 0x2349e 0x10610> {[-2-]}
Is_machine_type_one_or_three() : Bool
<MI 234a4 TST.B (A7)+> Δ+2 {}
<MI 234a6 BEQ 0x23642> {}
<POP 234aa-23642 Naked> Σ0 →0x2387a
<MI 234aa MOVE.W 0x296fe,0x29712> {}
<MI 234b4 MOVE.W 0x29700,D0> {}
<POP 0x234ba LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 234be MOVE.B D0,0x29714> {}
<MI 234c4 MOVE.W 0x29702,D0> {}
<POP 0x234ca LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 234ce MOVE.B D0,0x29715> {}
<MI 234d4 CLR.B 0x2db1e> {}
<MI 234da CLR.B 0x2db1f> {}
<Call 0x234e0 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x234e6 [34] @> Δ-34 {[«34""»]}
<Blob 0x234f8 [2] @> Δ-2 {[«34""»]|[«2""»]}
<Blob 0x234fc [2] @> Δ-2 {[«34""»]|[«2""»]|[«2""»]}
<Blob 0x23500 [2] @> Δ-2 {[«34""»]|[«2""»]|[«2""»]|[«2""»]}
<POP 23504-23506 StackAdj> Δ-8 {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-8-]}
<Lit 0x23506 33> {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]}
<POP 23512-23514 StackAdj> Δ-4 {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]|[-4-]}
<MI 23514 MOVE.W 0x29710,D0> {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]|[-4-]}
<MI 23516 EXTW.L D0> {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]|[-4-]}
<MI 23518 MOVE.L D0,-(A7)> Δ-4 {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]|[-4-]|[4, 'D0']}
<Const 0x2351a 0x1.4> Δ-4 {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]|[-4-]|[4, 'D0']|[##1]}
<Call 0x2351e 0x102e8> {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]|[-4-]|[4, 'D0']|[##1]}
Long2HexString(val : Long; ndig : Long) : String
<POP 23524-23526 StackAdj> Δ+4 {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]|[-4-]|[4, 'D0']}
<Lit 0x23526 6> {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]|[-4-]|[$$ is :_]}
<POP 23532-23533 StackAdj> Δ-4 {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]|[-4-]|[$$ is :_]|[-4-]}
<Blob 0x23533 [4] 0x29704> Δ-4 {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]|[-4-]|[$$ is :_]|[-4-]|[«4»]}
<Call 0x23538 0x102cc> {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]|[-4-]|[$$ is :_]|[-4-]|[«4»]}
StringDup(a : String) : String
<POP 2353e-23540 StackAdj> Δ+4 {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]|[-4-]|[$$ is :_]|[-4-]}
<Call 0x23540 0x102d8> {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]|[$$The server name for logical disk_]|[-4-]|[$$ is :_]|[-4-]}
StringCat4(a, b, c, d : String) : String
<POP 23546-23548 StackAdj> Δ+16 {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Call 0x23548 0x103e0> {[«34""»]|[«2""»]|[«2""»]|[«2""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2354e-2354f StackAdj> Δ+44 ↓ {}
<Blob 0x2354f [36] @> Δ-36 {[«36""»]}
<POP 2355e-23560 StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x23560 35> {[«36""»]|[$$The disk geometry (in decimal) is :]}
<Call 0x2356e 0x103e0> {[«36""»]|[$$The disk geometry (in decimal) is :]}
WriteConsoleStringCrLf(str : String)
<POP 23574-23575 StackAdj> Δ+40 ↓ {}
<Blob 0x23575 [14] @> Δ-14 {[«14""»]}
<POP 23584-23586 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x23586 13> {[«14""»]|[-4-]|[$$Cylinders =>_]}
<POP 23592-23594 StackAdj> Δ-4 {[«14""»]|[-4-]|[$$Cylinders =>_]|[-4-]}
<MI 23594 CLR.L D0> {[«14""»]|[-4-]|[$$Cylinders =>_]|[-4-]}
<MI 23596 MOVE.W 0x296fe,D0> {[«14""»]|[-4-]|[$$Cylinders =>_]|[-4-]}
<MI 2359c MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[-4-]|[$$Cylinders =>_]|[-4-]|[4, 'D0']}
<Call 0x2359e 0x102e4> {[«14""»]|[-4-]|[$$Cylinders =>_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 235a4-235a6 StackAdj> Δ+4 {[«14""»]|[-4-]|[$$Cylinders =>_]|[-4-]}
<Call 0x235a6 0x102d0> {[«14""»]|[-4-]|[$$Cylinders =>_]|[-4-]}
StringCat2(a, b : String) : String
<POP 235ac-235ae StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x235ae 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 235b4-235b5 StackAdj> Δ+18 ↓ {}
<Blob 0x235b5 [14] @> Δ-14 {[«14""»]}
<POP 235c4-235c6 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x235c6 13> {[«14""»]|[-4-]|[$$ Tracks =>_]}
<POP 235d2-235d4 StackAdj> Δ-4 {[«14""»]|[-4-]|[$$ Tracks =>_]|[-4-]}
<MI 235d4 MOVE.W 0x29700,D0> {[«14""»]|[-4-]|[$$ Tracks =>_]|[-4-]}
<MI 235da EXTW.L D0> {[«14""»]|[-4-]|[$$ Tracks =>_]|[-4-]}
<MI 235dc MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[-4-]|[$$ Tracks =>_]|[-4-]|[4, 'D0']}
<Call 0x235de 0x102e4> {[«14""»]|[-4-]|[$$ Tracks =>_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 235e4-235e6 StackAdj> Δ+4 {[«14""»]|[-4-]|[$$ Tracks =>_]|[-4-]}
<Call 0x235e6 0x102d0> {[«14""»]|[-4-]|[$$ Tracks =>_]|[-4-]}
StringCat2(a, b : String) : String
<POP 235ec-235ee StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x235ee 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 235f4-235f5 StackAdj> Δ+18 ↓ {}
<Blob 0x235f5 [14] @> Δ-14 {[«14""»]}
<POP 23604-23606 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x23606 13> {[«14""»]|[-4-]|[$$ Sectors =>_]}
<POP 23612-23614 StackAdj> Δ-4 {[«14""»]|[-4-]|[$$ Sectors =>_]|[-4-]}
<MI 23614 MOVE.W 0x29702,D0> {[«14""»]|[-4-]|[$$ Sectors =>_]|[-4-]}
<MI 2361a EXTW.L D0> {[«14""»]|[-4-]|[$$ Sectors =>_]|[-4-]}
<MI 2361c MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[-4-]|[$$ Sectors =>_]|[-4-]|[4, 'D0']}
<Call 0x2361e 0x102e4> {[«14""»]|[-4-]|[$$ Sectors =>_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 23624-23626 StackAdj> Δ+4 {[«14""»]|[-4-]|[$$ Sectors =>_]|[-4-]}
<Call 0x23626 0x102d0> {[«14""»]|[-4-]|[$$ Sectors =>_]|[-4-]}
StringCat2(a, b : String) : String
<POP 2362c-2362e StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x2362e 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23634-23638 StackAdj> Δ+18 {}
<Call 0x23638 0x103dc> {}
WriteConsoleCrLf(void)
<MI 2363e BRA 0x2387a> {}
<POP 23642-23660 Naked> Σ0 ↓ →0x2367a ←0x2349c
<MI 23642 MOVE.W 0x296fc,D0> {}
<POP 0x23648 LimitCheck 0x0 ≤ D0 ≤ 0x5> {}
<MI 2364c ASL.W #0x2,D0> {}
<MI 2364e LEA.L 0x296d2,A0> {}
<MI 23654 MOVE.W (A0+D0.W+#0x10),D1> {}
<MI 23658 CMP.W 0x29712,D1> {}
<MI 2365e BNE 0x2367a> {}
<POP 23660-2366c Naked> Σ0 ↓ →0x2367a
<MI 23660 MOVE.B (A0+D0.W+#0x12),D1> {}
<MI 23664 CMP.B 0x29714,D1> {}
<MI 2366a BNE 0x2367a> {}
<POP 2366c-2367a Naked> Σ0 ↓ →0x2386e
<MI 2366c MOVE.B (A0+D0.W+#0x13),D0> {}
<MI 23670 CMP.B 0x29715,D0> {}
<MI 23676 BEQ 0x2386e> {}
<POP 2367a-23680 Naked> Σ0 ↓ →0x236aa ←0x23642 ←0x23660
<MI 2367a TST.B (A6+0x8)> {}
<MI 2367e BEQ 0x236aa> {}
<POP 23680-236aa Naked> Σ0 ↓
<Blob 0x23680 [50] @> Δ-50 {[«50""»]}
<POP 23692-23694 StackAdj> Δ-4 {[«50""»]|[-4-]}
<Lit 0x23694 49> {[«50""»]|[$$Drive label geometry disagrees with slew settings]}
<Call 0x236a2 0x22522> {[«50""»]|[$$Drive label geometry disagrees with slew settings]}
<POP 236a6-236aa StackAdj> Δ+54 {}
<POP 236aa-236c8 Naked> Σ0 ↓ →0x236e2 ←0x2367a
<MI 236aa MOVE.W 0x296fc,D0> {}
<POP 0x236b0 LimitCheck 0x0 ≤ D0 ≤ 0x5> {}
<MI 236b4 ASL.W #0x2,D0> {}
<MI 236b6 LEA.L 0x296d2,A0> {}
<MI 236bc MOVE.W (A0+D0.W+#0x10),D1> {}
<MI 236c0 CMP.W 0x29712,D1> {}
<MI 236c6 BHI 0x236e2> {}
<POP 236c8-236d4 Naked> Σ0 ↓ →0x236e2
<MI 236c8 MOVE.B (A0+D0.W+#0x12),D1> {}
<MI 236cc CMP.B 0x29714,D1> {}
<MI 236d2 BHI 0x236e2> {}
<POP 236d4-236e2 Naked> Σ0 ↓ →0x237be
<MI 236d4 MOVE.B (A0+D0.W+#0x13),D0> {}
<MI 236d8 CMP.B 0x29715,D0> {}
<MI 236de BLS 0x237be> {}
<POP 236e2-237be Naked> Σ0 ↓ ←0x236aa ←0x236c8
<MI 236e2 MOVE.B #0x01,0x2db1e> {}
<Call 0x236e8 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x236ee [72] @> Δ-72 {[«72""»]}
<POP 236fa-236fc StackAdj> Δ-4 {[«72""»]|[-4-]}
<Lit 0x236fc 72> {[«72""»]|[$$ ------- WARNING ------- WARNING ------- WARNING -------]}
<Call 0x2370a 0x103e0> {[«72""»]|[$$ ------- WARNING ------- WARNING ------- WARNING -------]}
WriteConsoleStringCrLf(str : String)
<POP 23710-23714 StackAdj> Δ+76 {}
<Blob 0x23714 [72] @> Δ-72 {[«72""»]}
<POP 23720-23722 StackAdj> Δ-4 {[«72""»]|[-4-]}
<Lit 0x23722 72> {[«72""»]|[$$Drive geometry has grown, the defect data from drive are insufficient to]}
<Call 0x23730 0x103e0> {[«72""»]|[$$Drive geometry has grown, the defect data from drive are insufficient to]}
WriteConsoleStringCrLf(str : String)
<POP 23736-2373a StackAdj> Δ+76 {}
<Blob 0x2373a [70] @> Δ-70 {[«70""»]}
<POP 23746-23748 StackAdj> Δ-4 {[«70""»]|[-4-]}
<Lit 0x23748 70> {[«70""»]|[$$reconstruct a proper defect representation, a defect tape is required.]}
<Call 0x23756 0x103e0> {[«70""»]|[$$reconstruct a proper defect representation, a defect tape is required.]}
WriteConsoleStringCrLf(str : String)
<POP 2375c-23760 StackAdj> Δ+74 {}
<Blob 0x23760 [72] @> Δ-72 {[«72""»]}
<POP 2376c-2376e StackAdj> Δ-4 {[«72""»]|[-4-]}
<Lit 0x2376e 72> {[«72""»]|[$$ ------- WARNING ------- WARNING ------- WARNING -------]}
<Call 0x2377c 0x103e0> {[«72""»]|[$$ ------- WARNING ------- WARNING ------- WARNING -------]}
WriteConsoleStringCrLf(str : String)
<POP 23782-23786 StackAdj> Δ+76 {}
<Call 0x23786 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x2378c [26] @> Δ-26 {[«26""»]}
<POP 23798-2379a StackAdj> Δ-12 {[«26""»]|[-12-]}
<Lit 0x2379a 26> {[«26""»]|[-8-]|[$$Enter HDA serial number :_]}
<Call 0x237a6 0x103e4> {[«26""»]|[-8-]|[$$Enter HDA serial number :_]}
AskConsoleString(prompt : String) : String
<POP 237ac-237ae StackAdj> Δ+4 {[«26""»]|[-8-]}
<Call 0x237ae 0x102f0> {[«26""»]|[-8-]}
ToUpper(a : String) : String
<POP 237b4-237b6 StackAdj> Δ+4 {[«26""»]|[-4-]}
<MI 237b6 MOVE.L (A7)+,0x29704> Δ+4 {[«26""»]}
<POP 237bc-237be StackAdj> Δ+26 {}
<POP 237be-2386e Naked> Σ0 →0x2387a ←0x236d4
<MI 237be MOVE.W 0x296fc,D0> {}
<POP 0x237c4 LimitCheck 0x0 ≤ D0 ≤ 0x5> {}
<MI 237c8 ASL.W #0x2,D0> {}
<MI 237ca LEA.L 0x296d2,A0> {}
<MI 237d0 MOVE.W (A0+D0.W+#0x10),0x29712> {}
<MI 237d8 MOVE.B (A0+D0.W+#0x12),0x29714> {}
<MI 237e0 MOVE.B (A0+D0.W+#0x13),0x29715> {}
<Call 0x237e8 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x237ee [72] @> Δ-72 {[«72""»]}
<POP 237fa-237fc StackAdj> Δ-4 {[«72""»]|[-4-]}
<Lit 0x237fc 72> {[«72""»]|[$$ ------- WARNING ------- WARNING ------- WARNING -------]}
<Call 0x2380a 0x103e0> {[«72""»]|[$$ ------- WARNING ------- WARNING ------- WARNING -------]}
WriteConsoleStringCrLf(str : String)
<POP 23810-23811 StackAdj> Δ+76 ↓ {}
<Blob 0x23811 [70] @> Δ-70 {[«70""»]}
<POP 23820-23822 StackAdj> Δ-4 {[«70""»]|[-4-]}
<Lit 0x23822 69> {[«70""»]|[$$SLEW settings differ from drive settings, SLEW settings will prevail.]}
<Call 0x23830 0x103e0> {[«70""»]|[$$SLEW settings differ from drive settings, SLEW settings will prevail.]}
WriteConsoleStringCrLf(str : String)
<POP 23836-2383a StackAdj> Δ+74 {}
<Blob 0x2383a [72] @> Δ-72 {[«72""»]}
<POP 23846-23848 StackAdj> Δ-4 {[«72""»]|[-4-]}
<Lit 0x23848 72> {[«72""»]|[$$ ------- WARNING ------- WARNING ------- WARNING -------]}
<Call 0x23856 0x103e0> {[«72""»]|[$$ ------- WARNING ------- WARNING ------- WARNING -------]}
WriteConsoleStringCrLf(str : String)
<POP 2385c-23860 StackAdj> Δ+76 {}
<Call 0x23860 0x103dc> {}
WriteConsoleCrLf(void)
<MI 23866 MOVE.B #0x01,0x2db1f> {}
<MI 2386c BRA 0x2387a> {}
<POP 2386e-2387a Naked> Σ0 ↓ ←0x2366c
<MI 2386e CLR.B 0x2db1e> {}
<MI 23874 CLR.B 0x2db1f> {}
<POP 2387a-238b6 Naked> Σ0 ↓ →0x2393e ←0x234aa ←0x237be
<MI 2387a CLR.L D0> {}
<MI 2387c MOVE.B 0x29715,D0> {}
<MI 23882 ASR.W #0x1,D0> {}
<MI 23884 MOVE.W D0,0x1000a> {}
<MI 2388a CLR.L D0> {}
<MI 2388c MOVE.B 0x29714,D0> {}
<MI 23892 MULU.W 0x1000a,D0> {}
<POP 0x23898 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 238a2 MOVE.W D0,0x1000c> {}
<POP 238a8-238aa StackAdj> Δ-2 {[-2-]}
<Call 0x238aa 0x10610> {[-2-]}
Is_machine_type_one_or_three() : Bool
<MI 238b0 TST.B (A7)+> Δ+2 {}
<MI 238b2 BNE 0x2393e> {}
<POP 238b6-238c0 Naked> Σ0 ↓ →0x2393e
<POP 238b6-238b8 StackAdj> Δ-2 {[-2-]}
<Call 0x238b8 0x22c6c> {[-2-]}
<MI 238bc TST.B (A7)+> Δ+2 {}
<MI 238be BEQ 0x2393e> {}
<POP 238c0-2393e Naked> Σ0 ↓
<Call 0x238c0 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x238c6 [72] @> Δ-72 {[«72""»]}
<POP 238d2-238d4 StackAdj> Δ-4 {[«72""»]|[-4-]}
<Lit 0x238d4 72> {[«72""»]|[$$ ------- WARNING ------- WARNING ------- WARNING -------]}
<Call 0x238e2 0x103e0> {[«72""»]|[$$ ------- WARNING ------- WARNING ------- WARNING -------]}
WriteConsoleStringCrLf(str : String)
<POP 238e8-238ec StackAdj> Δ+76 {}
<Blob 0x238ec [44] @> Δ-44 {[«44""»]}
<POP 238f8-238fa StackAdj> Δ-4 {[«44""»]|[-4-]}
<Lit 0x238fa 44> {[«44""»]|[$$Please UNPROTECT the drive before continuing]}
<Call 0x23908 0x103e0> {[«44""»]|[$$Please UNPROTECT the drive before continuing]}
WriteConsoleStringCrLf(str : String)
<POP 2390e-23912 StackAdj> Δ+48 {}
<Blob 0x23912 [72] @> Δ-72 {[«72""»]}
<POP 2391e-23920 StackAdj> Δ-4 {[«72""»]|[-4-]}
<Lit 0x23920 72> {[«72""»]|[$$ ------- WARNING ------- WARNING ------- WARNING -------]}
<Call 0x2392e 0x103e0> {[«72""»]|[$$ ------- WARNING ------- WARNING ------- WARNING -------]}
WriteConsoleStringCrLf(str : String)
<POP 23934-23938 StackAdj> Δ+76 {}
<Call 0x23938 0x103dc> {}
WriteConsoleCrLf(void)
<POP 2393e-23946 Epilogue> Σ0 ←0x2387a ←0x238b6
@ 23946
<LVAR 0x008 4(r)>
<LVAR -0x002 2(rw)>
<LVAR -0x010 @ 1(r)>
<POP 23946-23aa2 Body>
<POP 23946-2395c Prologue> Σ0 ↓
<POP 2395c-23964 RegCacheLoad> Σ0 ↓
<POP 23964-239c6 Naked> Σ0 ↓ →0x239f8
<MI 23964 MOVEA.L (A6+0x8),A0> {}
<MI 23968 CLR.B (A0)> {}
<MI 2396a CLR.L D0> {}
<MI 2396c MOVE.B 0x2972c,D0> {}
<MI 23972 CLR.L D1> {}
<MI 23974 MOVE.B 0x29715,D1> {}
<MI 2397a MULU.W D1,D0> {}
<MI 2397c CLR.L D2> {}
<MI 2397e MOVE.B 0x2972d,D2> {}
<MI 23984 ADDQ.W #0x1,D2> {}
<MI 23986 ADD.W D0,D2> {}
<MI 23988 LSR.W #0x1,D2> {}
<MI 2398a MOVE.W D2,D5> {}
<MI 2398c CLR.L D0> {}
<MI 2398e MOVE.B 0x29730,D0> {}
<MI 23994 MULU.W D1,D0> {}
<MI 23996 CLR.L D1> {}
<MI 23998 MOVE.B 0x29731,D1> {}
<MI 2399e SUBQ.W #0x1,D1> {}
<MI 239a0 CLR.L D2> {}
<MI 239a2 MOVE.W D0,D2> {}
<MI 239a4 EXTW.L D1> {}
<MI 239a6 ADD.L D2,D1> {}
<MI 239a8 MOVE.L D1,D4> {}
<MI 239aa MOVEQ.L #0x02,D3> {}
<Call 0x239ac 0x10294> {}
?divs_d3_d4
<MI 239b2 MOVE.W D4,(A6-0x2)> {}
<MI 239b4 CLR.L D0> {}
<MI 239b6 MOVE.W (A6-0x2),D0> {}
<MI 239b8 CLR.L D1> {}
<MI 239ba MOVE.W D5,D1> {}
<MI 239bc SUB.L D1,D0> {}
<MI 239be CMPI.L #0x0000000f,D0> {}
<MI 239c4 BEQ 0x239f8> {}
<POP 239c6-239f8 Naked> Σ0 ↓
<Blob 0x239c6 [50] @> Δ-50 {[«50""»]}
<POP 239d8-239da StackAdj> Δ-4 {[«50""»]|[-4-]}
<Lit 0x239da 49> {[«50""»]|[$$--- WARNING: bad block area is not 16 blocks long]}
<Call 0x239ee 0x103e0> {[«50""»]|[$$--- WARNING: bad block area is not 16 blocks long]}
WriteConsoleStringCrLf(str : String)
<POP 239f4-239f8 StackAdj> Δ+54 {}
<POP 239f8-239fc Naked> Σ0 ↓ ←0x23964
<MI 239f8 MOVEQ.L #0x00,D6> {}
<MI 239fa MOVE.W D1,D7> {}
<POP 239fc-23a38 Naked> Σ0 ↓ →0x23a6c ←0x23a88
<POP 0x239fc LimitCheck 0x0 ≤ D6 ≤ 0x7ff> {}
<MI 23a06 MOVE.L D6,D0> {}
<MI 23a08 ASL.L #0x2,D0> {}
<MI 23a0a LEA.L 0x296d2,A0> {}
<MI 23a10 LEA.L (A0+D0.L),A0> {}
<MI 23a14 LEA.L (A0+0x44c),A0> {}
<MI 23a18 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 23a1a MOVEA.L (A7)+,A4> Δ+4 {}
<Const 0x23a1c 0x2.2> Δ-2 {[#2]}
<MI 23a20 MOVE.W D7,-(A7)> Δ-2 {[#2]|[2, 'D7']}
<Const 0x23a22 0x1.4> Δ-4 {[#2]|[2, 'D7']|[##1]}
<MI 23a26 MOVE.L A4,-(A7)> Δ-4 {[#2]|[2, 'D7']|[##1]|[4, 'A4']}
<Pointer.fp 0x23a28 <LVAR -0x010 @ 1(r)>> Δ-4 {[#2]|[2, 'D7']|[##1]|[4, 'A4']|[@@-16]}
<Call 0x23a2a 0x1036c> {[#2]|[2, 'D7']|[##1]|[4, 'A4']|[@@-16]}
RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
<POP 23a30-23a34 StackAdj> Δ+16 {}
<MI 23a34 TST.B (A6-0x10)> {}
<MI 23a36 BNE 0x23a6c> {}
<POP 23a38-23a6c Naked> Σ0 →0x23a84
<Blob 0x23a38 [58] @> Δ-58 {[«58""»]}
<POP 23a4a-23a4c StackAdj> Δ-4 {[«58""»]|[-4-]}
<Lit 0x23a4c 57> {[«58""»]|[$$Can't read bad block list area on disk due to disk errors]}
<Call 0x23a60 0x103e0> {[«58""»]|[$$Can't read bad block list area on disk due to disk errors]}
WriteConsoleStringCrLf(str : String)
<POP 23a66-23a6a StackAdj> Δ+62 {}
<MI 23a6a BRA 0x23a84> {}
<POP 23a6c-23a84 Naked> Σ0 ↓ ←0x239fc
<MI 23a6c ADDI.L #0x00000100,D6> {}
<MI 23a72 CLR.L D0> {}
<MI 23a74 MOVE.W D7,D0> {}
<MI 23a76 ADDQ.L #0x2,D0> {}
<POP 0x23a78 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 23a82 MOVE.W D0,D7> {}
<POP 23a84-23a88 Naked> Σ0 ↓ →0x23a8e ←0x23a38
<MI 23a84 CMP.W (A6-0x2),D7> {}
<MI 23a86 BHI 0x23a8e> {}
<POP 23a88-23a8e Naked> Σ0 ↓ →0x239fc
<MI 23a88 TST.B (A6-0x10)> {}
<MI 23a8a BNE 0x239fc> {}
<POP 23a8e-23a92 Naked> Σ0 ↓ →0x23a9a ←0x23a84
<MI 23a8e TST.B (A6-0x10)> {}
<MI 23a90 BEQ 0x23a9a> {}
<POP 23a92-23a9a Naked> Σ0 ↓
<MI 23a92 MOVEA.L (A6+0x8),A0> {}
<MI 23a96 MOVE.B #0x01,(A0)> {}
<POP 23a9a-23aa2 Epilogue> Σ0 ←0x23a8e
@ 23aa2
<LVAR 0x008 4(r)>
<LVAR -0x002 2(rw)>
<LVAR -0x010 @ 1(r)>
<POP 23aa2-23bb4 Body>
<POP 23aa2-23ab8 Prologue> Σ0 ↓
<POP 23ab8-23abc RegCacheLoad> Σ0 ↓
<POP 23abc-23b12 Naked> Σ0 ↓
<MI 23abc MOVEA.L (A6+0x8),A0> {}
<MI 23ac0 CLR.B (A0)> {}
<MI 23ac2 CLR.L D0> {}
<MI 23ac4 MOVE.B 0x29734,D0> {}
<MI 23aca CLR.L D1> {}
<MI 23acc MOVE.B 0x29715,D1> {}
<MI 23ad2 MULU.W D1,D0> {}
<MI 23ad4 CLR.L D2> {}
<MI 23ad6 MOVE.B 0x29735,D2> {}
<MI 23adc ADDQ.W #0x1,D2> {}
<MI 23ade ADD.W D0,D2> {}
<MI 23ae0 LSR.W #0x1,D2> {}
<MI 23ae2 MOVE.W D2,D5> {}
<MI 23ae4 CLR.L D0> {}
<MI 23ae6 MOVE.B 0x29738,D0> {}
<MI 23aec MULU.W D1,D0> {}
<MI 23aee CLR.L D1> {}
<MI 23af0 MOVE.B 0x29739,D1> {}
<MI 23af6 SUBQ.W #0x1,D1> {}
<MI 23af8 CLR.L D2> {}
<MI 23afa MOVE.W D0,D2> {}
<MI 23afc EXTW.L D1> {}
<MI 23afe ADD.L D2,D1> {}
<MI 23b00 MOVE.L D1,D4> {}
<MI 23b02 MOVEQ.L #0x02,D3> {}
<Call 0x23b04 0x10294> {}
?divs_d3_d4
<MI 23b0a MOVE.W D4,(A6-0x2)> {}
<MI 23b0e MOVEQ.L #0x00,D6> {}
<MI 23b10 MOVE.W D5,D7> {}
<POP 23b12-23b4e Naked> Σ0 ↓ →0x23b7c ←0x23b9a
<POP 0x23b12 LimitCheck 0x0 ≤ D6 ≤ 0x7ff> {}
<MI 23b1c MOVE.L D6,D0> {}
<MI 23b1e ASL.L #0x2,D0> {}
<MI 23b20 LEA.L 0x296d2,A0> {}
<MI 23b26 LEA.L (A0+D0.L),A0> {}
<MI 23b2a LEA.L (A0+0x244c),A0> {}
<MI 23b2e MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 23b30 MOVEA.L (A7)+,A4> Δ+4 {}
<Const 0x23b32 0x2.2> Δ-2 {[#2]}
<MI 23b36 MOVE.W D7,-(A7)> Δ-2 {[#2]|[2, 'D7']}
<Const 0x23b38 0x1.4> Δ-4 {[#2]|[2, 'D7']|[##1]}
<MI 23b3c MOVE.L A4,-(A7)> Δ-4 {[#2]|[2, 'D7']|[##1]|[4, 'A4']}
<Pointer.fp 0x23b3e <LVAR -0x010 @ 1(r)>> Δ-4 {[#2]|[2, 'D7']|[##1]|[4, 'A4']|[@@-16]}
<Call 0x23b40 0x1036c> {[#2]|[2, 'D7']|[##1]|[4, 'A4']|[@@-16]}
RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
<POP 23b46-23b4a StackAdj> Δ+16 {}
<MI 23b4a TST.B (A6-0x10)> {}
<MI 23b4c BNE 0x23b7c> {}
<POP 23b4e-23b7c Naked> Σ0 →0x23b94
<Blob 0x23b4e [62] @> Δ-62 {[«62""»]}
<POP 23b5a-23b5c StackAdj> Δ-4 {[«62""»]|[-4-]}
<Lit 0x23b5c 62> {[«62""»]|[$$Can't read retarget block list area on disk due to disk errors]}
<Call 0x23b70 0x103e0> {[«62""»]|[$$Can't read retarget block list area on disk due to disk errors]}
WriteConsoleStringCrLf(str : String)
<POP 23b76-23b7a StackAdj> Δ+66 {}
<MI 23b7a BRA 0x23b94> {}
<POP 23b7c-23b94 Naked> Σ0 ↓ ←0x23b12
<MI 23b7c ADDI.L #0x00000100,D6> {}
<MI 23b82 CLR.L D0> {}
<MI 23b84 MOVE.W D7,D0> {}
<MI 23b86 ADDQ.L #0x2,D0> {}
<POP 0x23b88 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 23b92 MOVE.W D0,D7> {}
<POP 23b94-23b9a Naked> Σ0 ↓ →0x23ba0 ←0x23b4e
<MI 23b94 CMP.W (A6-0x2),D7> {}
<MI 23b98 BHI 0x23ba0> {}
<POP 23b9a-23ba0 Naked> Σ0 ↓ →0x23b12
<MI 23b9a TST.B (A6-0x10)> {}
<MI 23b9c BNE 0x23b12> {}
<POP 23ba0-23ba4 Naked> Σ0 ↓ →0x23bac ←0x23b94
<MI 23ba0 TST.B (A6-0x10)> {}
<MI 23ba2 BEQ 0x23bac> {}
<POP 23ba4-23bac Naked> Σ0 ↓
<MI 23ba4 MOVEA.L (A6+0x8),A0> {}
<MI 23ba8 MOVE.B #0x01,(A0)> {}
<POP 23bac-23bb4 Epilogue> Σ0 ←0x23ba0
@ 23bb4
<LVAR 0x008 4(r)>
<LVAR -0x004 1(rw)>
<LVAR -0x01c 2(r)>
<LVAR -0x026 2(r)>
<LVAR -0x044 @>
<LVAR -0x04a @ 4(rw)>
<LVAR -0x04e @ 4(rw)>
<LVAR -0x05e 4(rw)>
<LVAR -0x060 @ 1(r)>
<POP 23bb4-23f28 Body>
<POP 23bb4-23bca Prologue> Σ0 ↓
<POP 23bca-23bda RegCacheLoad> Σ0 ↓
<POP 23bda-23be6 Naked> Σ0 ↓ →0x23bea
<POP 23bda-23bdc StackAdj> Δ-2 {[-2-]}
<Call 0x23bdc 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 23be2 TST.B (A7)+> Δ+2 {}
<MI 23be4 BEQ 0x23bea> {}
<POP 23be6-23bea Naked> Σ0 →0x23f1a
<MI 23be6 BRA 0x23f1a> {}
<POP 23bea-23c22 Naked> Σ0 ↓ ←0x23bda
<MI 23bea MOVEA.L (A6+0x8),A0> {}
<MI 23bee CLR.B (A0)> {}
<Blob 0x23bf0 [4] @> Δ-4 {[«4""»]}
<Blob 0x23bf4 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 23bf8-23bfa StackAdj> Δ-8 {[«4""»]|[«4""»]|[-8-]}
<Blob 0x23bfa [4] 0x29704> Δ-4 {[«4""»]|[«4""»]|[-8-]|[«4»]}
<Call 0x23c00 0x102cc> {[«4""»]|[«4""»]|[-8-]|[«4»]}
StringDup(a : String) : String
<Lit 0x23c06 8> {[«4""»]|[«4""»]|[-8-]|[$$.DEFECTS]}
<Call 0x23c14 0x102d0> {[«4""»]|[«4""»]|[-8-]|[$$.DEFECTS]}
StringCat2(a, b : String) : String
<POP 23c1a-23c1c StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<MI 23c1c MOVE.L (A7)+,(A6-0x4a)> Δ+4 {[«4""»]|[«4""»]}
<POP 23c20-23c22 StackAdj> Δ+8 {}
<POP 23c22-23c78 Naked> Σ0 ↓ →0x23c84 ←0x23c84
<Blob 0x23c22 [62] @> Δ-62 {[«62""»]}
<POP 23c32-23c34 StackAdj> Δ-8 {[«62""»]|[-8-]}
<Lit 0x23c34 61> {[«62""»]|[-4-]|[$$Enter unit number of tape drive with bad block information :_]}
<Const 0x23c42 0x0.4> Δ-4 {[«62""»]|[-4-]|[$$Enter unit number of tape drive with bad block information :_]|[##0]}
<Const 0x23c46 0x3.4> Δ-4 {[«62""»]|[-4-]|[$$Enter unit number of tape drive with bad block information :_]|[##0]|[##3]}
<Call 0x23c4a 0x103ec> {[«62""»]|[-4-]|[$$Enter unit number of tape drive with bad block information :_]|[##0]|[##3]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 23c50-23c54 StackAdj> Δ+12 {[«62""»]|[-4-]}
<MI 23c54 MOVE.L (A7)+,D0> Δ+4 {[«62""»]}
<POP 0x23c56 LimitCheck 0x0 ≤ D0 ≤ 0x3> {[«62""»]}
<POP 23c5c-23c5e StackAdj> Δ+62 {}
<MI 23c5e MOVE.W D0,D5> {}
<POP 0x23c60 LimitCheck 0x0 ≤ D5 ≤ 0x3> {}
<MI 23c62 MOVE.W D5,-(A7)> Δ-2 {[2, 'D5']}
<MI 23c64 CLR.B -(A7)> Δ-2 {[2, 'D5']|[#0]}
<Const 0x23c66 0x1.2> Δ-2 {[2, 'D5']|[#0]|[#1]}
<Pointer.fp 0x23c68 <LVAR -0x060 @ 1(r)>> Δ-4 {[2, 'D5']|[#0]|[#1]|[@@-96]}
<Call 0x23c6a 0x1040c> {[2, 'D5']|[#0]|[#1]|[@@-96]}
FSCALL_1040c
<POP 23c70-23c74 StackAdj> Δ+10 {}
<MI 23c74 TST.B (A6-0x60)> {}
<MI 23c76 BEQ 0x23c84> {}
<POP 23c78-23c84 Naked> Σ0 ↓
<Const 0x23c78 0x1.2> Δ-2 {[#1]}
<Pointer.fp 0x23c7a <LVAR -0x060 @ 1(r)>> Δ-4 {[#1]|[@@-96]}
<Call 0x23c7c 0x10428> {[#1]|[@@-96]}
FSCALL_10428
<POP 23c82-23c84 StackAdj> Δ+6 {}
<POP 23c84-23c88 Naked> Σ0 ↓ →0x23c22 ←0x23c22
<MI 23c84 TST.B (A6-0x60)> {}
<MI 23c86 BNE 0x23c22> {}
<POP 23c88-23c96 Naked> Σ0 ↓
<MI 23c88 LEA.L (A6-0x44),A0> {}
<MI 23c8c MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 23c8e MOVE.L (A7)+,(A6-0x5e)> Δ+4 {}
<MI 23c92 MOVEA.L (A6-0x5e),A4> {}
<POP 23c96-23cb8 Naked> Σ0 ↓ →0x23cd2 ←0x23e6a
<MI 23c96 MOVE.L (A6-0x5e),-(A7)> Δ-4 {[4, '(A6-0x5e)']}
<Const 0x23c9a 0x40.2> Δ-2 {[4, '(A6-0x5e)']|[#64]}
<Call 0x23c9e 0x10418> {[4, '(A6-0x5e)']|[#64]}
FSCALL_10418
<POP 23ca4-23ca6 StackAdj> Δ+6 {}
<Pointer.fp 0x23ca6 <LVAR -0x060 @ 1(r)>> Δ-4 {[@@-96]}
<Call 0x23ca8 0x10408> {[@@-96]}
FSCALL_10408
<POP 23cae-23cb0 StackAdj> Δ+4 {}
<MI 23cb0 MOVE.B (A6-0x60),D0> {}
<MI 23cb2 CMPI.B #0x06,D0> {}
<MI 23cb6 BNE 0x23cd2> {}
<POP 23cb8-23cd2 Naked> Σ0 ↓
<MI 23cb8 MOVE.L (A6-0x5e),-(A7)> Δ-4 {[4, '(A6-0x5e)']}
<Const 0x23cbc 0x40.2> Δ-2 {[4, '(A6-0x5e)']|[#64]}
<Call 0x23cc0 0x10418> {[4, '(A6-0x5e)']|[#64]}
FSCALL_10418
<POP 23cc6-23cc8 StackAdj> Δ+6 {}
<Pointer.fp 0x23cc8 <LVAR -0x060 @ 1(r)>> Δ-4 {[@@-96]}
<Call 0x23cca 0x10408> {[@@-96]}
FSCALL_10408
<POP 23cd0-23cd2 StackAdj> Δ+4 {}
<POP 23cd2-23cda Naked> Σ0 ↓ →0x23d10 ←0x23c96
<MI 23cd2 MOVE.B (A6-0x60),D0> {}
<MI 23cd4 CMPI.B #0x06,D0> {}
<MI 23cd8 BNE 0x23d10> {}
<POP 23cda-23d10 Naked> Σ0 ↓
<Call 0x23cda 0x10410> {}
FSCALL_10410
<Pointer.fp 0x23ce0 <LVAR -0x04a @ 4(rw)>> Δ-4 {[@@-74]}
<Call 0x23ce4 0x102bc> {[@@-74]}
FreeString(VAR a : String)
<POP 23cea-23cec StackAdj> Δ+4 {}
<Blob 0x23cec [20] @> Δ-20 {[«20""»]}
<POP 23cf8-23cfa StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x23cfa 20> {[«20""»]|[$$Found EOT, Aborting!]}
<Call 0x23d08 0x22522> {[«20""»]|[$$Found EOT, Aborting!]}
<POP 23d0c-23d10 StackAdj> Δ+24 {}
<POP 23d10-23d14 Naked> Σ0 ↓ →0x23d5a ←0x23cd2
<MI 23d10 TST.B D0> {}
<MI 23d12 BEQ 0x23d5a> {}
<POP 23d14-23d5a Naked> Σ0 ↓
<Const 0x23d14 0x1.2> Δ-2 {[#1]}
<Pointer.fp 0x23d16 <LVAR -0x060 @ 1(r)>> Δ-4 {[#1]|[@@-96]}
<Call 0x23d18 0x10428> {[#1]|[@@-96]}
FSCALL_10428
<POP 23d1e-23d20 StackAdj> Δ+6 {}
<Call 0x23d20 0x10410> {}
FSCALL_10410
<Pointer.fp 0x23d26 <LVAR -0x04a @ 4(rw)>> Δ-4 {[@@-74]}
<Call 0x23d2a 0x102bc> {[@@-74]}
FreeString(VAR a : String)
<POP 23d30-23d31 StackAdj> Δ+4 ↓ {}
<Blob 0x23d31 [44] @> Δ-44 {[«44""»]}
<POP 23d42-23d44 StackAdj> Δ-4 {[«44""»]|[-4-]}
<Lit 0x23d44 43> {[«44""»]|[$$Can't read tape. Bad tape or wrong format.]}
<Call 0x23d52 0x22522> {[«44""»]|[$$Can't read tape. Bad tape or wrong format.]}
<POP 23d56-23d5a StackAdj> Δ+48 {}
<POP 23d5a-23d62 Naked> Σ0 ↓ →0x23d9c ←0x23d10
<MI 23d5a MOVE.W (A6-0x1c),D0> {}
<MI 23d5e CMP.W #0x01,D0> {}
<MI 23d60 BEQ 0x23d9c> {}
<POP 23d62-23d9c Naked> Σ0 ↓
<Call 0x23d62 0x10410> {}
FSCALL_10410
<Pointer.fp 0x23d68 <LVAR -0x04a @ 4(rw)>> Δ-4 {[@@-74]}
<Call 0x23d6c 0x102bc> {[@@-74]}
FreeString(VAR a : String)
<POP 23d72-23d73 StackAdj> Δ+4 ↓ {}
<Blob 0x23d73 [40] @> Δ-40 {[«40""»]}
<POP 23d84-23d86 StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x23d86 39> {[«40""»]|[$$Obsolete tape header version, aborting!]}
<Call 0x23d94 0x22522> {[«40""»]|[$$Obsolete tape header version, aborting!]}
<POP 23d98-23d9c StackAdj> Δ+44 {}
<POP 23d9c-23df2 Naked> Σ0 ↓ →0x23e6a ←0x23d5a
<Blob 0x23d9c [30] (A6-0x26)> Δ-30 {[«30»]}
<POP 23da8-23daa StackAdj> Δ-8 {[«30»]|[-8-]}
<Lit 0x23daa> {[«30»]|[-4-]|[$$…]}
<Pointer.sp 0x23daa 8> Δ-4
<Const 0x23dae 0x1.2> Δ-2
<Const 0x23db0 0x1e.2> Δ-2
<Call 0x23db4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23db6-23db8 StackAdj> Δ+8
<Call 0x23db8 0x102f0> {[«30»]|[-4-]|[$$…]}
ToUpper(a : String) : String
<POP 23dbe-23dc0 StackAdj> Δ+4 {[«30»]|[-4-]}
<MI 23dc0 MOVE.L (A7)+,(A6-0x4e)> Δ+4 {[«30»]}
<POP 23dc4-23dc8 StackAdj> Δ+24 {[-6-]}
<MI 23dc8 MOVE.L (A6-0x4e),(A7)> {[-2-]|[4, '(A6-0x4e)']}
<MI 23dcc MOVE.L (A6-0x4a),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x4e)']|[4, '(A6-0x4a)']}
<Call 0x23dd0 0x102c8> {[-2-]|[4, '(A6-0x4e)']|[4, '(A6-0x4a)']}
StringEqual(a, b : String) : Byte
<POP 23dd6-23dd8 StackAdj> Δ+8 {[-2-]}
<MI 23dd8 MOVE.B (A7)+,D0> Δ+2 {}
<MI 23dda EXTB.W D0> {}
<POP 0x23ddc LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 23dde MOVE.B D0,(A6-0x4)> {}
<Pointer.fp 0x23de2 <LVAR -0x04e @ 4(rw)>> Δ-4 {[@@-78]}
<Call 0x23de6 0x102bc> {[@@-78]}
FreeString(VAR a : String)
<POP 23dec-23dee StackAdj> Δ+4 {}
<MI 23dee TST.B D0> {}
<MI 23df0 BNE 0x23e6a> {}
<POP 23df2-23dfe Naked> Σ0 Δ-4 ↓
<MI 23df2 MOVE.W (A6-0x26),D0> {}
<MI 23df6 SUBQ.W #0x1,D0> {}
<MI 23df8 EXTW.L D0> {}
<MI 23dfa MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 23dfc MOVEQ.L #0x00,D6> {[4, 'D0']}
<POP 23dfe-23e02 Naked> Σ-4 ↓ →0x23e68 ←0x23e64
<MI 23dfe CMP.L (A7),D6> {[-4-]}
<MI 23e00 BGT 0x23e68> {[-4-]}
<POP 23e02-23e28 Naked> Σ-4 ↓ →0x23e64
<MI 23e02 LEA.L 0x29b1e,A0> {[-4-]}
<MI 23e08 MOVE.L A0,-(A7)> Δ-4 {[-4-]|[4, 'A0']}
<MI 23e0a MOVE.L (A7)+,D7> Δ+4 {[-4-]}
<MI 23e0c MOVE.L D7,-(A7)> Δ-4 {[-4-]|[4, 'D7']}
<Const 0x23e0e 0x400.2> Δ-2 {[-4-]|[4, 'D7']|[#1024]}
<Call 0x23e12 0x10418> {[-4-]|[4, 'D7']|[#1024]}
FSCALL_10418
<POP 23e18-23e1a StackAdj> Δ+6 {[-4-]}
<Pointer.fp 0x23e1a <LVAR -0x060 @ 1(r)>> Δ-4 {[-4-]|[@@-96]}
<Call 0x23e1c 0x10408> {[-4-]|[@@-96]}
FSCALL_10408
<POP 23e22-23e24 StackAdj> Δ+4 {[-4-]}
<MI 23e24 TST.B (A6-0x60)> {[-4-]}
<MI 23e26 BEQ 0x23e64> {[-4-]}
<POP 23e28-23e64 Naked> Σ-4 ↓
<Const 0x23e28 0x1.2> Δ-2 {[-4-]|[#1]}
<Pointer.fp 0x23e2a <LVAR -0x060 @ 1(r)>> Δ-4 {[-4-]|[#1]|[@@-96]}
<Call 0x23e2c 0x10428> {[-4-]|[#1]|[@@-96]}
FSCALL_10428
<POP 23e32-23e34 StackAdj> Δ+6 {[-4-]}
<Call 0x23e34 0x10410> {[-4-]}
FSCALL_10410
<Blob 0x23e3a [42] @> Δ-42 {[-4-]|[«42""»]}
<POP 23e4c-23e4e StackAdj> Δ-4 {[-4-]|[«42""»]|[-4-]}
<Lit 0x23e4e 41> {[-4-]|[«42""»]|[$$Record read failed while skipping a file.]}
<Call 0x23e5c 0x22522> {[-4-]|[«42""»]|[$$Record read failed while skipping a file.]}
<POP 23e60-23e64 StackAdj> Δ+46 {[-4-]}
<POP 23e64-23e68 Naked> Σ-4 ↓ →0x23dfe ←0x23e02
<MI 23e64 ADDQ.L #0x1,D6> {[-4-]}
<MI 23e66 BVC 0x23dfe> {[-4-]}
<POP 23e68-23e6a Naked> Σ-4 Δ+4 ↓ ←0x23dfe
<POP 23e68-23e6a StackAdj> Δ+4 {}
<POP 23e6a-23e72 Naked> Σ0 ↓ →0x23c96 ←0x23d9c
<MI 23e6a TST.B (A6-0x4)> {}
<MI 23e6e BEQ 0x23c96> {}
<POP 23e72-23e8a Naked> Σ0 Δ-4 ↓
<Pointer.fp 0x23e72 <LVAR -0x04a @ 4(rw)>> Δ-4 {[@@-74]}
<Call 0x23e76 0x102bc> {[@@-74]}
FreeString(VAR a : String)
<POP 23e7c-23e7e StackAdj> Δ+4 {}
<MI 23e7e MOVE.W (A6-0x26),D0> {}
<MI 23e82 SUBQ.W #0x1,D0> {}
<MI 23e84 EXTW.L D0> {}
<MI 23e86 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 23e88 MOVEQ.L #0x00,D6> {[4, 'D0']}
<POP 23e8a-23e8e Naked> Σ-4 ↓ →0x23f06 ←0x23f02
<MI 23e8a CMP.L (A7),D6> {[-4-]}
<MI 23e8c BGT 0x23f06> {[-4-]}
<POP 23e8e-23ecc Naked> Σ-4 ↓ →0x23f02
<MI 23e8e MOVE.L D6,D0> {[-4-]}
<MI 23e90 ASL.L #0x8,D0> {[-4-]}
<POP 0x23e92 LimitCheck 0x0 ≤ D0 ≤ 0x7ff> {[-4-]}
<MI 23e9c ASL.L #0x2,D0> {[-4-]}
<MI 23e9e LEA.L 0x296d2,A0> {[-4-]}
<MI 23ea4 LEA.L (A0+D0.L),A0> {[-4-]}
<MI 23ea8 LEA.L (A0+0x44c),A0> {[-4-]}
<MI 23eac MOVE.L A0,-(A7)> Δ-4 {[-4-]|[4, 'A0']}
<MI 23eae MOVE.L (A7)+,D7> Δ+4 {[-4-]}
<MI 23eb0 MOVE.L D7,-(A7)> Δ-4 {[-4-]|[4, 'D7']}
<Const 0x23eb2 0x400.2> Δ-2 {[-4-]|[4, 'D7']|[#1024]}
<Call 0x23eb6 0x10418> {[-4-]|[4, 'D7']|[#1024]}
FSCALL_10418
<POP 23ebc-23ebe StackAdj> Δ+6 {[-4-]}
<Pointer.fp 0x23ebe <LVAR -0x060 @ 1(r)>> Δ-4 {[-4-]|[@@-96]}
<Call 0x23ec0 0x10408> {[-4-]|[@@-96]}
FSCALL_10408
<POP 23ec6-23ec8 StackAdj> Δ+4 {[-4-]}
<MI 23ec8 TST.B (A6-0x60)> {[-4-]}
<MI 23eca BEQ 0x23f02> {[-4-]}
<POP 23ecc-23f02 Naked> Σ-4 ↓
<Const 0x23ecc 0x1.2> Δ-2 {[-4-]|[#1]}
<Pointer.fp 0x23ece <LVAR -0x060 @ 1(r)>> Δ-4 {[-4-]|[#1]|[@@-96]}
<Call 0x23ed0 0x10428> {[-4-]|[#1]|[@@-96]}
FSCALL_10428
<POP 23ed6-23ed8 StackAdj> Δ+6 {[-4-]}
<Call 0x23ed8 0x10410> {[-4-]}
FSCALL_10410
<Blob 0x23ede [26] @> Δ-26 {[-4-]|[«26""»]}
<POP 23eea-23eec StackAdj> Δ-4 {[-4-]|[«26""»]|[-4-]}
<Lit 0x23eec 26> {[-4-]|[«26""»]|[$$Found data, can't read it.]}
<Call 0x23efa 0x22522> {[-4-]|[«26""»]|[$$Found data, can't read it.]}
<POP 23efe-23f02 StackAdj> Δ+30 {[-4-]}
<POP 23f02-23f06 Naked> Σ-4 ↓ →0x23e8a ←0x23e8e
<MI 23f02 ADDQ.L #0x1,D6> {[-4-]}
<MI 23f04 BVC 0x23e8a> {[-4-]}
<POP 23f06-23f1a Naked> Σ-4 Δ+4 ↓ ←0x23e8a
<POP 23f06-23f08 StackAdj> Δ+2 {[-2-]}
<MI 23f08 CLR.B (A7)> {[-2-]}
<Pointer.fp 0x23f0a <LVAR -0x060 @ 1(r)>> Δ-4 {[-2-]|[@@-96]}
<Call 0x23f0c 0x10414> {[-2-]|[@@-96]}
FSCALL_10414
<POP 23f12-23f14 StackAdj> Δ+6 {}
<Call 0x23f14 0x10410> {}
FSCALL_10410
<POP 23f1a-23f20 Naked> Σ0 ↓ ←0x23be6
<MI 23f1a MOVEA.L (A6+0x8),A0> {}
<MI 23f1e MOVE.B #0x01,(A0)> {}
<POP 23f20-23f28 Epilogue> Σ0
@ 23f28
<LVAR -0x003 1(r)>
<LVAR -0x004 1(r)>
<LVAR -0x006 1(w) 2(w) 4(r)>
<LVAR -0x008 @ 1(rw)>
<POP 23f28-2416c Body> Δ+4
<POP 23f28-23f3e Prologue> Σ0 ↓
<POP 23f3e-23f5a RegCacheLoad> Σ0 ↓
<POP 23f5a-23f76 Naked> Σ0 ↓
<MI 23f5a ORI.B #0x80,(A6-0x6)> {}
<MI 23f60 ANDI.B #0xbf,(A6-0x6)> {}
<MI 23f66 ANDI.W #0xc000,(A6-0x6)> {}
<MI 23f6c CLR.B (A6-0x4)> {}
<MI 23f70 CLR.B (A6-0x3)> {}
<MI 23f74 MOVEQ.L #0x00,D6> {}
<POP 23f76-23f9e Naked> Σ0 ↓ →0x23f76 ←0x23f76
<POP 0x23f76 LimitCheck 0x0 ≤ D6 ≤ 0x7ff> {}
<MI 23f80 MOVE.L D6,D0> {}
<MI 23f82 ASL.L #0x2,D0> {}
<MI 23f84 LEA.L 0x296d2,A0> {}
<MI 23f8a LEA.L (A0+D0.L),A0> {}
<MI 23f8e MOVE.L (A6-0x6),(A0+0x44c)> {}
<MI 23f94 ADDQ.L #0x1,D6> {}
<MI 23f96 CMPI.L #0x000007ff,D6> {}
<MI 23f9c BLE 0x23f76> {}
<POP 23f9e-23fa6 Naked> Σ0 ↓ →0x23fde ←0x2415c
<MI 23f9e TST.B 0x29708> {}
<MI 23fa4 BEQ 0x23fde> {}
<POP 23fa6-23fae Naked> Σ0 ↓ →0x23fde
<MI 23fa6 TST.B 0x2db1e> {}
<MI 23fac BNE 0x23fde> {}
<POP 23fae-23fde Naked> Σ0 →0x24002
<Blob 0x23fae [30] @> Δ-30 {[«30""»]}
<POP 23fba-23fbc StackAdj> Δ-6 {[«30""»]|[-6-]}
<Lit 0x23fbc 30> {[«30""»]|[-2-]|[$$Do you want to format the disk]}
<POP 23fc6-23fc8 StackAdj> Δ-2 {[«30""»]|[-2-]|[$$Do you want to format the disk]|[-2-]}
<MI 23fc8 CLR.B (A7)> {[«30""»]|[-2-]|[$$Do you want to format the disk]|[-2-]}
<Call 0x23fca 0x103f0> {[«30""»]|[-2-]|[$$Do you want to format the disk]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 23fd0-23fd2 StackAdj> Δ+6 {[«30""»]|[-2-]}
<MI 23fd2 MOVE.B (A7)+,D0> Δ+2 {[«30""»]}
<MI 23fd4 EXTB.W D0> {[«30""»]}
<POP 0x23fd6 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«30""»]}
<POP 23fd8-23fda StackAdj> Δ+30 {}
<MI 23fda MOVE.B D0,0x2970b> {}
<MI 23fdc BRA 0x24002> {}
<POP 23fde-24002 Naked> Σ0 ↓ ←0x23f9e ←0x23fa6
<MI 23fde MOVE.B #0x01,0x2970b> {}
<Blob 0x23fe0 [22] @> Δ-22 {[«22""»]}
<POP 23fec-23fee StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x23fee 22> {[«22""»]|[$$Disk must be formated.]}
<Call 0x23ffc 0x103e0> {[«22""»]|[$$Disk must be formated.]}
WriteConsoleStringCrLf(str : String)
<POP 23ffe-24002 StackAdj> Δ+26 {}
<POP 24002-2400e Naked> Σ0 ↓ →0x24014 ←0x23fae
<POP 24002-24004 StackAdj> Δ-2 {[-2-]}
<Call 0x24004 0x10610> {[-2-]}
Is_machine_type_one_or_three() : Bool
<MI 2400a TST.B (A7)+> Δ+2 {}
<MI 2400c BEQ 0x24014> {}
<POP 2400e-24014 Naked> Σ0 →0x24128
<MI 2400e MOVEQ.L #0x02,D7> {}
<MI 24010 BRA 0x24128> {}
<POP 24014-24018 Naked> Σ0 ↓ →0x2401e ←0x24002
<MI 24014 TST.B 0x2970b> {}
<MI 24016 BNE 0x2401e> {}
<POP 24018-2401e Naked> Σ0 →0x24128
<MI 24018 MOVEQ.L #0x00,D7> {}
<MI 2401a BRA 0x24128> {}
<POP 2401e-24026 Naked> Σ0 ↓ →0x2402e ←0x24014
<MI 2401e TST.B 0x29708> {}
<MI 24024 BEQ 0x2402e> {}
<POP 24026-2402e Naked> Σ0 ↓ →0x24034
<MI 24026 TST.B 0x2db1e> {}
<MI 2402c BEQ 0x24034> {}
<POP 2402e-24034 Naked> Σ0 →0x24128 ←0x2401e
<MI 2402e MOVEQ.L #0x01,D7> {}
<MI 24030 BRA 0x24128> {}
<POP 24034-2405e Naked> Σ0 ↓ →0x240a4 ←0x24026
<Blob 0x24034 [44] @> Δ-44 {[«44""»]}
<POP 24040-24042 StackAdj> Δ-4 {[«44""»]|[-4-]}
<Lit 0x24042 44> {[«44""»]|[$$From where should I get the bad block list :]}
<Call 0x24050 0x103e0> {[«44""»]|[$$From where should I get the bad block list :]}
WriteConsoleStringCrLf(str : String)
<POP 24052-24054 StackAdj> Δ+46 {[-2-]}
<Call 0x24054 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 2405a TST.B (A7)+> Δ+2 {}
<MI 2405c BEQ 0x240a4> {}
<POP 2405e-240a4 Naked> Σ0 →0x240e8
<Blob 0x2405e [48] @> Δ-48 {[«48""»]}
<POP 2406a-2406c StackAdj> Δ-4 {[«48""»]|[-4-]}
<Lit 0x2406c 48> {[«48""»]|[$$ 0 => Get it from the disk label area]}
<Call 0x2407a 0x103e0> {[«48""»]|[$$ 0 => Get it from the disk label area]}
WriteConsoleStringCrLf(str : String)
<POP 2407c-2407d StackAdj> Δ+52 ↓ {}
<Blob 0x2407d [50] @> Δ-50 {[«50""»]}
<POP 2408c-2408e StackAdj> Δ-4 {[«50""»]|[-4-]}
<Lit 0x2408e 49> {[«50""»]|[$$ 1 => Get it from the disk system area]}
<Call 0x2409c 0x103e0> {[«50""»]|[$$ 1 => Get it from the disk system area]}
WriteConsoleStringCrLf(str : String)
<POP 2409e-240a2 StackAdj> Δ+54 {}
<MI 240a2 BRA 0x240e8> {}
<POP 240a4-240e8 Naked> Σ0 ↓ ←0x24034
<Blob 0x240a4 [38] @> Δ-38 {[«38""»]}
<POP 240b6-240b8 StackAdj> Δ-4 {[«38""»]|[-4-]}
<Lit 0x240b8 37> {[«38""»]|[$$ 0 => Get it from the disk]}
<Call 0x240c6 0x103e0> {[«38""»]|[$$ 0 => Get it from the disk]}
WriteConsoleStringCrLf(str : String)
<POP 240c8-240ca StackAdj> Δ+42 {}
<Blob 0x240ca [42] @> Δ-42 {[«42""»]}
<POP 240d6-240d8 StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x240d8 42> {[«42""»]|[$$ 1 => Get it from a backup tape]}
<Call 0x240e4 0x103e0> {[«42""»]|[$$ 1 => Get it from a backup tape]}
WriteConsoleStringCrLf(str : String)
<POP 240e6-240e8 StackAdj> Δ+46 {}
<POP 240e8-24128 Naked> Σ0 ↓ ←0x2405e
<Blob 0x240e8 [4] @> Δ-4 {[«4""»]}
<Blob 0x240ec [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x240f0 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x240f4 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 240f8-240fa StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]}
<Lit 0x240fa 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Answer 0 or 1 :_]}
<Const 0x24108 0x0.4> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Answer 0 or 1 :_]|[##0]}
<Const 0x2410c 0x1.4> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Answer 0 or 1 :_]|[##0]|[##1]}
<Call 0x24110 0x103ec> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Answer 0 or 1 :_]|[##0]|[##1]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 24116-2411a StackAdj> Δ+12 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<MI 2411a MOVE.B (A7+0x3),D0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<MI 2411e EXTB.W D0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<POP 0x24120 LimitCheck 0x0 ≤ D0 ≤ 0x2> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<POP 24122-24126 StackAdj> Δ+20 {}
<MI 24126 MOVE.B D0,D7> {}
<POP 24128-2413c Naked> Σ0 →0x24142 →0x2414e →0x24158 ←0x2400e ←0x24018 ←0x2402e
<MI 24128 MOVE.B D7,D0> {}
<MI 2412a EXTB.W D0> {}
<POP 0x2412c LimitCheck 0x0 ≤ D0 ≤ 0x2> {}
<MI 24132 ADD.W D0,D0> {}
<MI 24134 SWITCH D0.W> {}
<POP 24142-2414a Naked> Σ0 Δ-4 ↓ ←0x24128
<Pointer.fp 0x24142 <LVAR -0x008 @ 1(rw)>> Δ-4 {[@@-8]}
<Call 0x24146 0x23946> {[@@-8]}
<POP 2414a-2414e Naked> Σ-4 Δ+4 →0x2415c ←0x2414e
<POP 2414a-2414c StackAdj> Δ+4 {}
<MI 2414c BRA 0x2415c> {}
<POP 2414e-24158 Naked> Σ0 Δ-4 →0x2414a ←0x24128
<Pointer.fp 0x2414e <LVAR -0x008 @ 1(rw)>> Δ-4 {[@@-8]}
<Call 0x24152 0x23bb4> {[@@-8]}
<MI 24156 BRA 0x2414a> {[@@-8]}
<POP 24158-2415c Naked> Σ0 ↓ ←0x24128
<MI 24158 MOVE.B #0x01,(A6-0x8)> {}
<POP 2415c-24164 Naked> Σ0 ↓ →0x23f9e ←0x2414a
<MI 2415c TST.B (A6-0x8)> {}
<MI 24160 BEQ 0x23f9e> {}
<POP 24164-2416c Epilogue> Σ0
@ 2416c
<LVAR -0x001 1(r)>
<LVAR -0x002 1(r)>
<LVAR -0x004 1(w) 2(w) 4(r)>
<POP 2416c-241e8 Body>
<POP 2416c-24182 Prologue> Σ0 ↓
<POP 24182-24186 RegCacheLoad> Σ0 ↓
<POP 24186-24192 Naked> Σ0 ↓ →0x2419a
<POP 24186-24188 StackAdj> Δ-2 {[-2-]}
<Call 0x24188 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 2418e TST.B (A7)+> Δ+2 {}
<MI 24190 BEQ 0x2419a> {}
<POP 24192-2419a Naked> Σ0 ↓
<MI 24192 MOVE.B #0x01,0x2eb32> {}
<POP 2419a-241b0 Naked> Σ0 ↓ ←0x24186
<MI 2419a ORI.B #0x80,(A6-0x4)> {}
<MI 2419e ANDI.B #0xbf,(A6-0x4)> {}
<MI 241a2 ANDI.W #0xc000,(A6-0x4)> {}
<MI 241a6 CLR.B (A6-0x2)> {}
<MI 241aa CLR.B (A6-0x1)> {}
<MI 241ae MOVEQ.L #0x00,D7> {}
<POP 241b0-241d2 Naked> Σ0 ↓ →0x241d6 ←0x241d6
<POP 0x241b0 LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {}
<MI 241ba MOVE.L D7,D0> {}
<MI 241bc ASL.L #0x2,D0> {}
<MI 241be LEA.L 0x296d2,A0> {}
<MI 241c4 LEA.L (A0+D0.L),A0> {}
<MI 241c8 MOVE.B (A0+0x44c),D0> {}
<MI 241cc LSL.B #0x1,D0> {}
<MI 241ce LSR.B #0x7,D0> {}
<MI 241d0 BEQ 0x241d6> {}
<POP 241d2-241d6 Naked> Σ0 ↓
<MI 241d2 MOVE.L (A6-0x4),(A0+0x44c)> {}
<POP 241d6-241e0 Naked> Σ0 ↓ →0x241b0 ←0x241b0
<MI 241d6 ADDQ.L #0x1,D7> {}
<MI 241d8 CMPI.L #0x000007ff,D7> {}
<MI 241de BLE 0x241b0> {}
<POP 241e0-241e8 Epilogue> Σ0
@ 241e8
<LVAR 0x008 4(r)>
<POP 241e8-24274 Body>
<POP 241e8-241fe Prologue> Σ0 ↓
<POP 241fe-24202 RegCacheLoad> Σ0 ↓
<POP 24202-24208 Naked> Σ0 ↓ →0x2421a
<MI 24202 MOVEA.L (A4),A0> {}
<MI 24204 TST.W (A0)> {}
<MI 24206 BNE 0x2421a> {}
<POP 24208-2421a Naked> Σ0 →0x2426c
<POP 24208-2420a StackAdj> Δ-4 {[-4-]}
<MI 2420a MOVE.L (A4),-(A7)> Δ-4 {[-4-]|[4, '(A4)']}
<MI 2420c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A4)']|[4, '(A6+0x8)']}
<Call 0x2420e 0x102d0> {[-4-]|[4, '(A4)']|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 24214-24216 StackAdj> Δ+8 {[-4-]}
<MI 24216 MOVE.L (A7)+,(A4)> Δ+4 {}
<MI 24218 BRA 0x2426c> {}
<POP 2421a-24230 Naked> Σ0 ↓ →0x24260 ←0x24202
<MI 2421a MOVE.W (A0),D0> {}
<MI 2421c EXTW.L D0> {}
<MI 2421e ADDQ.L #0x2,D0> {}
<MI 24220 MOVEA.L (A6+0x8),A0> {}
<MI 24222 MOVE.W (A0),D1> {}
<MI 24224 EXTW.L D1> {}
<MI 24226 ADD.L D0,D1> {}
<MI 24228 CMPI.L #0x00000050,D1> {}
<MI 2422e BGT 0x24260> {}
<POP 24230-24260 Naked> Σ0 →0x2426c
<Blob 0x24230 [2] @> Δ-2 {[«2""»]}
<POP 24234-24236 StackAdj> Δ-4 {[«2""»]|[-4-]}
<MI 24236 MOVE.L (A4),-(A7)> Δ-4 {[«2""»]|[-4-]|[4, '(A4)']}
<POP 24238-2423a StackAdj> Δ-4 {[«2""»]|[-4-]|[4, '(A4)']|[-4-]}
<Lit 0x2423a 2> {[«2""»]|[-4-]|[4, '(A4)']|[$$,_]}
<POP 2424c-2424e StackAdj> Δ-4 {[«2""»]|[-4-]|[4, '(A4)']|[$$,_]|[-4-]}
<MI 2424e MOVE.L (A6+0x8),(A7)> {[«2""»]|[-4-]|[4, '(A4)']|[$$,_]|[4, '(A6+0x8)']}
<Call 0x24250 0x102d4> {[«2""»]|[-4-]|[4, '(A4)']|[$$,_]|[4, '(A6+0x8)']}
StringCat3(a, b, c : String) : String
<POP 24256-2425a StackAdj> Δ+12 {[«2""»]|[-4-]}
<MI 2425a MOVE.L (A7)+,(A4)> Δ+4 {[«2""»]}
<POP 2425c-2425e StackAdj> Δ+2 {}
<MI 2425e BRA 0x2426c> {}
<POP 24260-2426c Naked> Σ0 ↓ ←0x2421a
<MI 24260 MOVE.L (A4),-(A7)> Δ-4 {[4, '(A4)']}
<Call 0x24262 0x103e0> {[4, '(A4)']}
WriteConsoleStringCrLf(str : String)
<POP 24268-2426a StackAdj> Δ+4 {}
<MI 2426a MOVE.L (A6+0x8),(A4)> {}
<POP 2426c-24274 Epilogue> Σ0 ←0x24208 ←0x24230
@ 24274
<LVAR 0x010 2(r)>
<LVAR 0x00e 2(r)>
<LVAR 0x00c 2(r)>
<LVAR 0x00a 2(r)>
<LVAR 0x008 2(r)>
<LVAR -0x006 @>
<POP 24274-24abc Body>
<POP 24274-2428a Prologue> Σ0 ↓
<POP 2428a-242a2 RegCacheLoad> Σ0 ↓
<POP 242a2-242b6 Naked> Σ0 ↓ →0x242de
<Pointer.fp 0x242a2 <LVAR -0x006 @>> Δ-4 {[@@-6]}
<Call 0x242a4 0x102b8> {[@@-6]}
NewString(VAR a : String)
<POP 242aa-242ac StackAdj> Δ+4 {}
<MI 242ac MOVE.W (A6+0x8),D0> {}
<MI 242b0 ANDI.W #0x8000,D0> {}
<MI 242b4 BEQ 0x242de> {}
<POP 242b6-242de Naked> Σ0 ↓
<Blob 0x242b6 [18] @> Δ-18 {[«18""»]}
<POP 242c6-242c8 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x242c8 17> {[«18""»]|[$$Special condition]}
<MI 242d6 LEA.L (A6-0x6),A4> {[«18""»]|[$$Special condition]}
<Call 0x242d8 0x241e8> {[«18""»]|[$$Special condition]}
<POP 242dc-242de StackAdj> Δ+22 {}
<POP 242de-242e8 Naked> Σ0 ↓ →0x2430a ←0x242a2
<MI 242de MOVE.W (A6+0x8),D0> {}
<MI 242e2 ANDI.W #0x4000,D0> {}
<MI 242e6 BEQ 0x2430a> {}
<POP 242e8-2430a Naked> Σ0 ↓
<Blob 0x242e8 [14] @> Δ-14 {[«14""»]}
<POP 242f4-242f6 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x242f6 14> {[«14""»]|[$$Transfer error]}
<MI 24302 LEA.L (A6-0x6),A4> {[«14""»]|[$$Transfer error]}
<Call 0x24304 0x241e8> {[«14""»]|[$$Transfer error]}
<POP 24308-2430a StackAdj> Δ+18 {}
<POP 2430a-24314 Naked> Σ0 ↓ →0x2433e ←0x242de
<MI 2430a MOVE.W (A6+0xa),D0> {}
<MI 2430e ANDI.W #0x8000,D0> {}
<MI 24312 BEQ 0x2433e> {}
<POP 24314-2433e Naked> Σ0 ↓
<Blob 0x24314 [10] @> Δ-10 {[«10""»]}
<POP 24326-24328 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x24328 9> {[«10""»]|[$$Data late]}
<MI 24336 LEA.L (A6-0x6),A4> {[«10""»]|[$$Data late]}
<Call 0x24338 0x241e8> {[«10""»]|[$$Data late]}
<POP 2433c-2433e StackAdj> Δ+14 {}
<POP 2433e-24348 Naked> Σ0 ↓ →0x24370 ←0x2430a
<MI 2433e MOVE.W (A6+0xa),D0> {}
<MI 24342 ANDI.W #0x4000,D0> {}
<MI 24346 BEQ 0x24370> {}
<POP 24348-24370 Naked> Σ0 ↓
<Blob 0x24348 [18] @> Δ-18 {[«18""»]}
<POP 24358-2435a StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x2435a 17> {[«18""»]|[$$Write check error]}
<MI 24368 LEA.L (A6-0x6),A4> {[«18""»]|[$$Write check error]}
<Call 0x2436a 0x241e8> {[«18""»]|[$$Write check error]}
<POP 2436e-24370 StackAdj> Δ+22 {}
<POP 24370-2437a Naked> Σ0 ↓ →0x243a2 ←0x2433e
<MI 24370 MOVE.W (A6+0xa),D0> {}
<MI 24374 ANDI.W #0x2000,D0> {}
<MI 24378 BEQ 0x243a2> {}
<POP 2437a-243a2 Naked> Σ0 ↓
<Blob 0x2437a [20] @> Δ-20 {[«20""»]}
<POP 2438a-2438c StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x2438c 19> {[«20""»]|[$$UNIBUS parity error]}
<MI 2439a LEA.L (A6-0x6),A4> {[«20""»]|[$$UNIBUS parity error]}
<Call 0x2439c 0x241e8> {[«20""»]|[$$UNIBUS parity error]}
<POP 243a0-243a2 StackAdj> Δ+24 {}
<POP 243a2-243ac Naked> Σ0 ↓ →0x243ce ←0x24370
<MI 243a2 MOVE.W (A6+0xa),D0> {}
<MI 243a6 ANDI.W #0x1000,D0> {}
<MI 243aa BEQ 0x243ce> {}
<POP 243ac-243ce Naked> Σ0 ↓
<Blob 0x243ac [18] @> Δ-18 {[«18""»]}
<POP 243b8-243ba StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x243ba 18> {[«18""»]|[$$Non-existent drive]}
<MI 243c6 LEA.L (A6-0x6),A4> {[«18""»]|[$$Non-existent drive]}
<Call 0x243c8 0x241e8> {[«18""»]|[$$Non-existent drive]}
<POP 243cc-243ce StackAdj> Δ+22 {}
<POP 243ce-243d8 Naked> Σ0 ↓ →0x24400 ←0x243a2
<MI 243ce MOVE.W (A6+0xa),D0> {}
<MI 243d2 ANDI.W #0x0800,D0> {}
<MI 243d6 BEQ 0x24400> {}
<POP 243d8-24400 Naked> Σ0 ↓
<Blob 0x243d8 [20] @> Δ-20 {[«20""»]}
<POP 243e8-243ea StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x243ea 19> {[«20""»]|[$$Non-existent memory]}
<MI 243f8 LEA.L (A6-0x6),A4> {[«20""»]|[$$Non-existent memory]}
<Call 0x243fa 0x241e8> {[«20""»]|[$$Non-existent memory]}
<POP 243fe-24400 StackAdj> Δ+24 {}
<POP 24400-2440a Naked> Σ0 ↓ →0x24432 ←0x243ce
<MI 24400 MOVE.W (A6+0xa),D0> {}
<MI 24404 ANDI.W #0x0400,D0> {}
<MI 24408 BEQ 0x24432> {}
<POP 2440a-24432 Naked> Σ0 ↓
<Blob 0x2440a [14] @> Δ-14 {[«14""»]}
<POP 2441a-2441c StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x2441c 13> {[«14""»]|[$$Program error]}
<MI 2442a LEA.L (A6-0x6),A4> {[«14""»]|[$$Program error]}
<Call 0x2442c 0x241e8> {[«14""»]|[$$Program error]}
<POP 24430-24432 StackAdj> Δ+18 {}
<POP 24432-2443c Naked> Σ0 ↓ →0x2445e ←0x24400
<MI 24432 MOVE.W (A6+0xa),D0> {}
<MI 24436 ANDI.W #0x0200,D0> {}
<MI 2443a BEQ 0x2445e> {}
<POP 2443c-2445e Naked> Σ0 ↓
<Blob 0x2443c [14] @> Δ-14 {[«14""»]}
<POP 24448-2444a StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x2444a 14> {[«14""»]|[$$Mixed transfer]}
<MI 24456 LEA.L (A6-0x6),A4> {[«14""»]|[$$Mixed transfer]}
<Call 0x24458 0x241e8> {[«14""»]|[$$Mixed transfer]}
<POP 2445c-2445e StackAdj> Δ+18 {}
<POP 2445e-24468 Naked> Σ0 ↓ →0x24490 ←0x24432
<MI 2445e MOVE.W (A6+0xa),D0> {}
<MI 24462 ANDI.W #0x0040,D0> {}
<MI 24466 BNE 0x24490> {}
<POP 24468-24490 Naked> Σ0 ↓
<Blob 0x24468 [16] @> Δ-16 {[«16""»]}
<POP 24478-2447a StackAdj> Δ-4 {[«16""»]|[-4-]}
<Lit 0x2447a 15> {[«16""»]|[$$Input not ready]}
<MI 24488 LEA.L (A6-0x6),A4> {[«16""»]|[$$Input not ready]}
<Call 0x2448a 0x241e8> {[«16""»]|[$$Input not ready]}
<POP 2448e-24490 StackAdj> Δ+20 {}
<POP 24490-2449a Naked> Σ0 ↓ →0x244c2 ←0x2445e
<MI 24490 MOVE.W (A6+0xa),D0> {}
<MI 24494 ANDI.W #0x0008,D0> {}
<MI 24498 BEQ 0x244c2> {}
<POP 2449a-244c2 Naked> Σ0 ↓
<Blob 0x2449a [20] @> Δ-20 {[«20""»]}
<POP 244aa-244ac StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x244ac 19> {[«20""»]|[$$Bus address inhibit]}
<MI 244ba LEA.L (A6-0x6),A4> {[«20""»]|[$$Bus address inhibit]}
<Call 0x244bc 0x241e8> {[«20""»]|[$$Bus address inhibit]}
<POP 244c0-244c2 StackAdj> Δ+24 {}
<POP 244c2-244cc Naked> Σ0 ↓ →0x244f2 ←0x24490
<MI 244c2 MOVE.W (A6+0xc),D0> {}
<MI 244c6 ANDI.W #0x8000,D0> {}
<MI 244ca BEQ 0x244f2> {}
<POP 244cc-244f2 Naked> Σ0 ↓
<Blob 0x244cc [4] @> Δ-4 {[«4""»]}
<Blob 0x244d0 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x244d4 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x244d8 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 244dc-244de StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x244de 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Attention Active]}
<MI 244ea LEA.L (A6-0x6),A4> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Attention Active]}
<Call 0x244ec 0x241e8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Attention Active]}
<POP 244f0-244f2 StackAdj> Δ+20 {}
<POP 244f2-244fc Naked> Σ0 ↓ →0x24526 ←0x244c2
<MI 244f2 MOVE.W (A6+0xc),D0> {}
<MI 244f6 ANDI.W #0x4000,D0> {}
<MI 244fa BEQ 0x24526> {}
<POP 244fc-24526 Naked> Σ0 ↓
<Blob 0x244fc [6] @> Δ-6 {[«6""»]}
<POP 2450c-2450e StackAdj> Δ-4 {[«6""»]|[-4-]}
<Lit 0x2450e 5> {[«6""»]|[$$Error]}
<MI 2451c LEA.L (A6-0x6),A4> {[«6""»]|[$$Error]}
<Call 0x2451e 0x241e8> {[«6""»]|[$$Error]}
<POP 24522-24526 StackAdj> Δ+10 {}
<POP 24526-24530 Naked> Σ0 ↓ →0x2455a ←0x244f2
<MI 24526 MOVE.W (A6+0xc),D0> {}
<MI 2452a ANDI.W #0x2000,D0> {}
<MI 2452e BEQ 0x2455a> {}
<POP 24530-2455a Naked> Σ0 ↓
<Blob 0x24530 [24] @> Δ-24 {[«24""»]}
<POP 24540-24542 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x24542 23> {[«24""»]|[$$Positioning in progress]}
<MI 24550 LEA.L (A6-0x6),A4> {[«24""»]|[$$Positioning in progress]}
<Call 0x24552 0x241e8> {[«24""»]|[$$Positioning in progress]}
<POP 24556-2455a StackAdj> Δ+28 {}
<POP 2455a-24564 Naked> Σ0 ↓ →0x24586 ←0x24526
<MI 2455a MOVE.W (A6+0xc),D0> {}
<MI 2455e ANDI.W #0x1000,D0> {}
<MI 24562 BEQ 0x24586> {}
<POP 24564-24586 Naked> Σ0 ↓
<Blob 0x24564 [14] @> Δ-14 {[«14""»]}
<POP 24570-24572 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x24572 14> {[«14""»]|[$$Medium on-line]}
<MI 2457e LEA.L (A6-0x6),A4> {[«14""»]|[$$Medium on-line]}
<Call 0x24580 0x241e8> {[«14""»]|[$$Medium on-line]}
<POP 24584-24586 StackAdj> Δ+18 {}
<POP 24586-24590 Naked> Σ0 ↓ →0x245b4 ←0x2455a
<MI 24586 MOVE.W (A6+0xc),D0> {}
<MI 2458a ANDI.W #0x0800,D0> {}
<MI 2458e BEQ 0x245b4> {}
<POP 24590-245b4 Naked> Σ0 ↓
<Blob 0x24590 [10] @> Δ-10 {[«10""»]}
<POP 2459c-2459e StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x2459e 10> {[«10""»]|[$$Write lock]}
<MI 245ac LEA.L (A6-0x6),A4> {[«10""»]|[$$Write lock]}
<Call 0x245ae 0x241e8> {[«10""»]|[$$Write lock]}
<POP 245b2-245b4 StackAdj> Δ+14 {}
<POP 245b4-245be Naked> Σ0 ↓ →0x245e2 ←0x24586
<MI 245b4 MOVE.W (A6+0xc),D0> {}
<MI 245b8 ANDI.W #0x0400,D0> {}
<MI 245bc BEQ 0x245e2> {}
<POP 245be-245e2 Naked> Σ0 ↓
<Blob 0x245be [22] @> Δ-22 {[«22""»]}
<POP 245ca-245cc StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x245cc 22> {[«22""»]|[$$Last sector transfered]}
<MI 245d8 LEA.L (A6-0x6),A4> {[«22""»]|[$$Last sector transfered]}
<Call 0x245da 0x241e8> {[«22""»]|[$$Last sector transfered]}
<POP 245de-245e2 StackAdj> Δ+26 {}
<POP 245e2-245ec Naked> Σ0 ↓ →0x24610 ←0x245b4
<MI 245e2 MOVE.W (A6+0xc),D0> {}
<MI 245e6 ANDI.W #0x0200,D0> {}
<MI 245ea BEQ 0x24610> {}
<POP 245ec-24610 Naked> Σ0 ↓
<Blob 0x245ec [4] @> Δ-4 {[«4""»]}
<Blob 0x245f0 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x245f4 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 245f8-245fa StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x245fa 12> {[«4""»]|[«4""»]|[«4""»]|[$$Programmable]}
<MI 24608 LEA.L (A6-0x6),A4> {[«4""»]|[«4""»]|[«4""»]|[$$Programmable]}
<Call 0x2460a 0x241e8> {[«4""»]|[«4""»]|[«4""»]|[$$Programmable]}
<POP 2460e-24610 StackAdj> Δ+16 {}
<POP 24610-2461a Naked> Σ0 ↓ →0x24642 ←0x245e2
<MI 24610 MOVE.W (A6+0xc),D0> {}
<MI 24614 ANDI.W #0x0100,D0> {}
<MI 24618 BNE 0x24642> {}
<POP 2461a-24642 Naked> Σ0 ↓
<Blob 0x2461a [18] @> Δ-18 {[«18""»]}
<POP 2462a-2462c StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x2462c 17> {[«18""»]|[$$Drive not present]}
<MI 2463a LEA.L (A6-0x6),A4> {[«18""»]|[$$Drive not present]}
<Call 0x2463c 0x241e8> {[«18""»]|[$$Drive not present]}
<POP 24640-24642 StackAdj> Δ+22 {}
<POP 24642-2464c Naked> Σ0 ↓ →0x24674 ←0x24610
<MI 24642 MOVE.W (A6+0xc),D0> {}
<MI 24646 ANDI.W #0x0080,D0> {}
<MI 2464a BNE 0x24674> {}
<POP 2464c-24674 Naked> Σ0 ↓
<Blob 0x2464c [16] @> Δ-16 {[«16""»]}
<POP 2465c-2465e StackAdj> Δ-4 {[«16""»]|[-4-]}
<Lit 0x2465e 15> {[«16""»]|[$$Drive not ready]}
<MI 2466c LEA.L (A6-0x6),A4> {[«16""»]|[$$Drive not ready]}
<Call 0x2466e 0x241e8> {[«16""»]|[$$Drive not ready]}
<POP 24672-24674 StackAdj> Δ+20 {}
<POP 24674-2467e Naked> Σ0 ↓ →0x246a4 ←0x24642
<MI 24674 MOVE.W (A6+0xc),D0> {}
<MI 24678 ANDI.W #0x0040,D0> {}
<MI 2467c BNE 0x246a4> {}
<POP 2467e-246a4 Naked> Σ0 ↓
<Blob 0x2467e [4] @> Δ-4 {[«4""»]}
<Blob 0x24682 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x24686 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x2468a [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 2468e-24690 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x24690 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Volume not valid]}
<MI 2469c LEA.L (A6-0x6),A4> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Volume not valid]}
<Call 0x2469e 0x241e8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Volume not valid]}
<POP 246a2-246a4 StackAdj> Δ+20 {}
<POP 246a4-246ac Naked> Σ0 ↓ →0x246d2 ←0x24674
<MI 246a4 MOVE.W (A6+0xc),D0> {}
<MI 246a8 AND.W #0x01,D0> {}
<MI 246aa BEQ 0x246d2> {}
<POP 246ac-246d2 Naked> Σ0 ↓
<Blob 0x246ac [4] @> Δ-4 {[«4""»]}
<Blob 0x246b0 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x246b4 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x246b8 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 246bc-246be StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x246be 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Heads are offset]}
<MI 246ca LEA.L (A6-0x6),A4> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Heads are offset]}
<Call 0x246cc 0x241e8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Heads are offset]}
<POP 246d0-246d2 StackAdj> Δ+20 {}
<POP 246d2-246dc Naked> Σ0 ↓ →0x24700 ←0x246a4
<MI 246d2 MOVE.W (A6+0xe),D0> {}
<MI 246d6 ANDI.W #0x8000,D0> {}
<MI 246da BEQ 0x24700> {}
<POP 246dc-24700 Naked> Σ0 ↓
<Blob 0x246dc [10] @> Δ-10 {[«10""»]}
<POP 246e8-246ea StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x246ea 10> {[«10""»]|[$$Data check]}
<MI 246f8 LEA.L (A6-0x6),A4> {[«10""»]|[$$Data check]}
<Call 0x246fa 0x241e8> {[«10""»]|[$$Data check]}
<POP 246fe-24700 StackAdj> Δ+14 {}
<POP 24700-2470a Naked> Σ0 ↓ →0x24730 ←0x246d2
<MI 24700 MOVE.W (A6+0xe),D0> {}
<MI 24704 ANDI.W #0x4000,D0> {}
<MI 24708 BEQ 0x24730> {}
<POP 2470a-24730 Naked> Σ0 ↓
<Blob 0x2470a [2] @> Δ-2 {[«2""»]}
<Blob 0x2470e [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x24712 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 24716-24718 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x24718 6> {[«2""»]|[«2""»]|[«2""»]|[$$Unsafe]}
<MI 24726 LEA.L (A6-0x6),A4> {[«2""»]|[«2""»]|[«2""»]|[$$Unsafe]}
<Call 0x24728 0x241e8> {[«2""»]|[«2""»]|[«2""»]|[$$Unsafe]}
<POP 2472c-24730 StackAdj> Δ+10 {}
<POP 24730-2473a Naked> Σ0 ↓ →0x2475c ←0x24700
<MI 24730 MOVE.W (A6+0xe),D0> {}
<MI 24734 ANDI.W #0x2000,D0> {}
<MI 24738 BEQ 0x2475c> {}
<POP 2473a-2475c Naked> Σ0 ↓
<Blob 0x2473a [20] @> Δ-20 {[«20""»]}
<POP 24746-24748 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x24748 20> {[«20""»]|[$$Operation Incomplete]}
<MI 24754 LEA.L (A6-0x6),A4> {[«20""»]|[$$Operation Incomplete]}
<Call 0x24756 0x241e8> {[«20""»]|[$$Operation Incomplete]}
<POP 2475a-2475c StackAdj> Δ+24 {}
<POP 2475c-24766 Naked> Σ0 ↓ →0x24788 ←0x24730
<MI 2475c MOVE.W (A6+0xe),D0> {}
<MI 24760 ANDI.W #0x1000,D0> {}
<MI 24764 BEQ 0x24788> {}
<POP 24766-24788 Naked> Σ0 ↓
<Blob 0x24766 [18] @> Δ-18 {[«18""»]}
<POP 24772-24774 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x24774 18> {[«18""»]|[$$Drive timing error]}
<MI 24780 LEA.L (A6-0x6),A4> {[«18""»]|[$$Drive timing error]}
<Call 0x24782 0x241e8> {[«18""»]|[$$Drive timing error]}
<POP 24786-24788 StackAdj> Δ+22 {}
<POP 24788-24792 Naked> Σ0 ↓ →0x247b8 ←0x2475c
<MI 24788 MOVE.W (A6+0xe),D0> {}
<MI 2478c ANDI.W #0x0800,D0> {}
<MI 24790 BEQ 0x247b8> {}
<POP 24792-247b8 Naked> Σ0 ↓
<Blob 0x24792 [4] @> Δ-4 {[«4""»]}
<Blob 0x24796 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x2479a [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x2479e [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 247a2-247a4 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x247a4 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Write lock error]}
<MI 247b0 LEA.L (A6-0x6),A4> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Write lock error]}
<Call 0x247b2 0x241e8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Write lock error]}
<POP 247b6-247b8 StackAdj> Δ+20 {}
<POP 247b8-247c2 Naked> Σ0 ↓ →0x247ec ←0x24788
<MI 247b8 MOVE.W (A6+0xe),D0> {}
<MI 247bc ANDI.W #0x0400,D0> {}
<MI 247c0 BEQ 0x247ec> {}
<POP 247c2-247ec Naked> Σ0 ↓
<Blob 0x247c2 [22] @> Δ-22 {[«22""»]}
<POP 247d2-247d4 StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x247d4 21> {[«22""»]|[$$Invalid address error]}
<MI 247e2 LEA.L (A6-0x6),A4> {[«22""»]|[$$Invalid address error]}
<Call 0x247e4 0x241e8> {[«22""»]|[$$Invalid address error]}
<POP 247e8-247ec StackAdj> Δ+26 {}
<POP 247ec-247f6 Naked> Σ0 ↓ →0x2481c ←0x247b8
<MI 247ec MOVE.W (A6+0xe),D0> {}
<MI 247f0 ANDI.W #0x0200,D0> {}
<MI 247f4 BEQ 0x2481c> {}
<POP 247f6-2481c Naked> Σ0 ↓
<Blob 0x247f6 [4] @> Δ-4 {[«4""»]}
<Blob 0x247fa [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x247fe [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x24802 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 24806-24808 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x24808 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Address overflow]}
<MI 24814 LEA.L (A6-0x6),A4> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Address overflow]}
<Call 0x24816 0x241e8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Address overflow]}
<POP 2481a-2481c StackAdj> Δ+20 {}
<POP 2481c-24826 Naked> Σ0 ↓ →0x2484c ←0x247ec
<MI 2481c MOVE.W (A6+0xe),D0> {}
<MI 24820 ANDI.W #0x0100,D0> {}
<MI 24824 BEQ 0x2484c> {}
<POP 24826-2484c Naked> Σ0 ↓
<Blob 0x24826 [4] @> Δ-4 {[«4""»]}
<Blob 0x2482a [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x2482e [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x24832 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 24836-24838 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x24838 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Header CRC error]}
<MI 24844 LEA.L (A6-0x6),A4> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Header CRC error]}
<Call 0x24846 0x241e8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Header CRC error]}
<POP 2484a-2484c StackAdj> Δ+20 {}
<POP 2484c-24856 Naked> Σ0 ↓ →0x24878 ←0x2481c
<MI 2484c MOVE.W (A6+0xe),D0> {}
<MI 24850 ANDI.W #0x0080,D0> {}
<MI 24854 BEQ 0x24878> {}
<POP 24856-24878 Naked> Σ0 ↓
<Blob 0x24856 [20] @> Δ-20 {[«20""»]}
<POP 24862-24864 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x24864 20> {[«20""»]|[$$Header compare error]}
<MI 24870 LEA.L (A6-0x6),A4> {[«20""»]|[$$Header compare error]}
<Call 0x24872 0x241e8> {[«20""»]|[$$Header compare error]}
<POP 24876-24878 StackAdj> Δ+24 {}
<POP 24878-24882 Naked> Σ0 ↓ →0x248a4 ←0x2484c
<MI 24878 MOVE.W (A6+0xe),D0> {}
<MI 2487c ANDI.W #0x0040,D0> {}
<MI 24880 BEQ 0x248a4> {}
<POP 24882-248a4 Naked> Σ0 ↓
<Blob 0x24882 [14] @> Δ-14 {[«14""»]}
<POP 2488e-24890 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x24890 14> {[«14""»]|[$$ECC hard error]}
<MI 2489c LEA.L (A6-0x6),A4> {[«14""»]|[$$ECC hard error]}
<Call 0x2489e 0x241e8> {[«14""»]|[$$ECC hard error]}
<POP 248a2-248a4 StackAdj> Δ+18 {}
<POP 248a4-248ae Naked> Σ0 ↓ →0x248d4 ←0x24878
<MI 248a4 MOVE.W (A6+0xe),D0> {}
<MI 248a8 ANDI.W #0x0020,D0> {}
<MI 248ac BEQ 0x248d4> {}
<POP 248ae-248d4 Naked> Σ0 ↓
<Blob 0x248ae [4] @> Δ-4 {[«4""»]}
<Blob 0x248b2 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x248b6 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x248ba [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 248be-248c0 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x248c0 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Write clock fail]}
<MI 248cc LEA.L (A6-0x6),A4> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Write clock fail]}
<Call 0x248ce 0x241e8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Write clock fail]}
<POP 248d2-248d4 StackAdj> Δ+20 {}
<POP 248d4-248dc Naked> Σ0 ↓ →0x24900 ←0x248a4
<MI 248d4 MOVE.W (A6+0xe),D0> {}
<MI 248d8 AND.W #0x10,D0> {}
<MI 248da BEQ 0x24900> {}
<POP 248dc-24900 Naked> Σ0 ↓
<Blob 0x248dc [4] @> Δ-4 {[«4""»]}
<Blob 0x248e0 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x248e4 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 248e8-248ea StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x248ea 12> {[«4""»]|[«4""»]|[«4""»]|[$$Format error]}
<MI 248f8 LEA.L (A6-0x6),A4> {[«4""»]|[«4""»]|[«4""»]|[$$Format error]}
<Call 0x248fa 0x241e8> {[«4""»]|[«4""»]|[«4""»]|[$$Format error]}
<POP 248fe-24900 StackAdj> Δ+16 {}
<POP 24900-2490a Naked> Σ0 ↓ →0x24936 ←0x248d4
<MI 24900 MOVE.W (A6+0xe),D0> {}
<MI 24904 ANDI.W #0x0004,D0> {}
<MI 24908 BEQ 0x24936> {}
<POP 2490a-24936 Naked> Σ0 ↓
<Blob 0x2490a [30] @> Δ-30 {[«30""»]}
<POP 2491c-2491e StackAdj> Δ-4 {[«30""»]|[-4-]}
<Lit 0x2491e 29> {[«30""»]|[$$Register modification refused]}
<MI 2492c LEA.L (A6-0x6),A4> {[«30""»]|[$$Register modification refused]}
<Call 0x2492e 0x241e8> {[«30""»]|[$$Register modification refused]}
<POP 24932-24936 StackAdj> Δ+34 {}
<POP 24936-2493e Naked> Σ0 ↓ →0x24964 ←0x24900
<MI 24936 MOVE.W (A6+0xe),D0> {}
<MI 2493a AND.W #0x01,D0> {}
<MI 2493c BEQ 0x24964> {}
<POP 2493e-24964 Naked> Σ0 ↓
<Blob 0x2493e [4] @> Δ-4 {[«4""»]}
<Blob 0x24942 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x24946 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x2494a [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 2494e-24950 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x24950 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Illegal function]}
<MI 2495c LEA.L (A6-0x6),A4> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Illegal function]}
<Call 0x2495e 0x241e8> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[$$Illegal function]}
<POP 24962-24964 StackAdj> Δ+20 {}
<POP 24964-2496e Naked> Σ0 ↓ →0x24992 ←0x24936
<MI 24964 MOVE.W (A6+0x10),D0> {}
<MI 24968 ANDI.W #0x8000,D0> {}
<MI 2496c BEQ 0x24992> {}
<POP 2496e-24992 Naked> Σ0 ↓
<Blob 0x2496e [10] @> Δ-10 {[«10""»]}
<POP 2497a-2497c StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x2497c 10> {[«10""»]|[$$Bad sector]}
<MI 2498a LEA.L (A6-0x6),A4> {[«10""»]|[$$Bad sector]}
<Call 0x2498c 0x241e8> {[«10""»]|[$$Bad sector]}
<POP 24990-24992 StackAdj> Δ+14 {}
<POP 24992-2499c Naked> Σ0 ↓ →0x249c4 ←0x24964
<MI 24992 MOVE.W (A6+0x10),D0> {}
<MI 24996 ANDI.W #0x4000,D0> {}
<MI 2499a BEQ 0x249c4> {}
<POP 2499c-249c4 Naked> Σ0 ↓
<Blob 0x2499c [16] @> Δ-16 {[«16""»]}
<POP 249ac-249ae StackAdj> Δ-4 {[«16""»]|[-4-]}
<Lit 0x249ae 15> {[«16""»]|[$$Seek incomplete]}
<MI 249bc LEA.L (A6-0x6),A4> {[«16""»]|[$$Seek incomplete]}
<Call 0x249be 0x241e8> {[«16""»]|[$$Seek incomplete]}
<POP 249c2-249c4 StackAdj> Δ+20 {}
<POP 249c4-249ce Naked> Σ0 ↓ →0x249f6 ←0x24992
<MI 249c4 MOVE.W (A6+0x10),D0> {}
<MI 249c8 ANDI.W #0x1000,D0> {}
<MI 249cc BEQ 0x249f6> {}
<POP 249ce-249f6 Naked> Σ0 ↓
<Blob 0x249ce [16] @> Δ-16 {[«16""»]}
<POP 249de-249e0 StackAdj> Δ-4 {[«16""»]|[-4-]}
<Lit 0x249e0 15> {[«16""»]|[$$Invalid command]}
<MI 249ee LEA.L (A6-0x6),A4> {[«16""»]|[$$Invalid command]}
<Call 0x249f0 0x241e8> {[«16""»]|[$$Invalid command]}
<POP 249f4-249f6 StackAdj> Δ+20 {}
<POP 249f6-24a00 Naked> Σ0 ↓ →0x24a22 ←0x249c4
<MI 249f6 MOVE.W (A6+0x10),D0> {}
<MI 249fa ANDI.W #0x0800,D0> {}
<MI 249fe BEQ 0x24a22> {}
<POP 24a00-24a22 Naked> Σ0 ↓
<Blob 0x24a00 [20] @> Δ-20 {[«20""»]}
<POP 24a0c-24a0e StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x24a0e 20> {[«20""»]|[$$Loss of system clock]}
<MI 24a1a LEA.L (A6-0x6),A4> {[«20""»]|[$$Loss of system clock]}
<Call 0x24a1c 0x241e8> {[«20""»]|[$$Loss of system clock]}
<POP 24a20-24a22 StackAdj> Δ+24 {}
<POP 24a22-24a2c Naked> Σ0 ↓ →0x24a54 ←0x249f6
<MI 24a22 MOVE.W (A6+0x10),D0> {}
<MI 24a26 ANDI.W #0x0400,D0> {}
<MI 24a2a BEQ 0x24a54> {}
<POP 24a2c-24a54 Naked> Σ0 ↓
<Blob 0x24a2c [18] @> Δ-18 {[«18""»]}
<POP 24a3c-24a3e StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x24a3e 17> {[«18""»]|[$$Loss of bit clock]}
<MI 24a4c LEA.L (A6-0x6),A4> {[«18""»]|[$$Loss of bit clock]}
<Call 0x24a4e 0x241e8> {[«18""»]|[$$Loss of bit clock]}
<POP 24a52-24a54 StackAdj> Δ+22 {}
<POP 24a54-24a5e Naked> Σ0 ↓ →0x24a82 ←0x24a22
<MI 24a54 MOVE.W (A6+0x10),D0> {}
<MI 24a58 ANDI.W #0x0080,D0> {}
<MI 24a5c BEQ 0x24a82> {}
<POP 24a5e-24a82 Naked> Σ0 ↓
<Blob 0x24a5e [4] @> Δ-4 {[«4""»]}
<Blob 0x24a62 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x24a66 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 24a6a-24a6c StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x24a6c 12> {[«4""»]|[«4""»]|[«4""»]|[$$Device check]}
<MI 24a7a LEA.L (A6-0x6),A4> {[«4""»]|[«4""»]|[«4""»]|[$$Device check]}
<Call 0x24a7c 0x241e8> {[«4""»]|[«4""»]|[«4""»]|[$$Device check]}
<POP 24a80-24a82 StackAdj> Δ+16 {}
<POP 24a82-24a8c Naked> Σ0 ↓ →0x24ab4 ←0x24a54
<MI 24a82 MOVE.W (A6+0x10),D0> {}
<MI 24a86 ANDI.W #0x0020,D0> {}
<MI 24a8a BEQ 0x24ab4> {}
<POP 24a8c-24ab4 Naked> Σ0 ↓
<Blob 0x24a8c [18] @> Δ-18 {[«18""»]}
<POP 24a9c-24a9e StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x24a9e 17> {[«18""»]|[$$Skip sector error]}
<MI 24aac LEA.L (A6-0x6),A4> {[«18""»]|[$$Skip sector error]}
<Call 0x24aae 0x241e8> {[«18""»]|[$$Skip sector error]}
<POP 24ab2-24ab4 StackAdj> Δ+22 {}
<POP 24ab4-24abc Epilogue> Σ0 ←0x24a82
@ 24abc
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 24abc-24bae Body>
<POP 24abc-24ad2 Prologue> Σ0 ↓
<POP 24ad2-24aea RegCacheLoad> Σ0 ↓
<POP 24aea-24ba6 Naked> Σ0 ↓
<MI 24aea MOVE.L (A6+0x14),-(A7)> Δ-4 {[4, '(A6+0x14)']}
<Call 0x24aee 0x103d8> {[4, '(A6+0x14)']}
WriteConsoleString(str : String)
<POP 24af0-24af1 StackAdj> Δ+4 ↓ {}
<Blob 0x24af1 [12] @> Δ-12 {[«12""»]}
<POP 24b00-24b02 StackAdj> Δ-8 {[«12""»]|[-8-]}
<Lit 0x24b02 11> {[«12""»]|[-4-]|[$$Cylinder =>]}
<MI 24b0c MOVE.L (A6+0x10),-(A7)> Δ-4 {[«12""»]|[-4-]|[$$Cylinder =>]|[4, '(A6+0x10)']}
<POP 24b0a-24b0c StackAdj> Δ-8 {[«12""»]|[-4-]|[$$Cylinder =>]|[4, '(A6+0x10)']|[-8-]}
<Call 0x24b10 0x102e4> {[«12""»]|[-4-]|[$$Cylinder =>]|[4, '(A6+0x10)']|[-8-]}
Long2String(a : Long) : String
<POP 24b12-24b14 StackAdj> Δ+4 {[«12""»]|[-4-]|[$$Cylinder =>]|[4, '(A6+0x10)']|[-4-]}
<Const 0x24b14 0x4.4> Δ-4 {[«12""»]|[-4-]|[$$Cylinder =>]|[4, '(A6+0x10)']|[-4-]|[##4]}
<Call 0x24b18 0x102f4> {[«12""»]|[-4-]|[$$Cylinder =>]|[4, '(A6+0x10)']|[-4-]|[##4]}
RightPad(a : String; b : Long) : String
<POP 24b1e-24b20 StackAdj> Δ+8 {[«12""»]|[-4-]|[$$Cylinder =>]|[4, '(A6+0x10)']}
<Call 0x24b20 0x102d0> {[«12""»]|[-4-]|[$$Cylinder =>]|[4, '(A6+0x10)']}
StringCat2(a, b : String) : String
<POP 24b26-24b28 StackAdj> Δ+8 {[«12""»]|[-4-]}
<Call 0x24b28 0x103d8> {[«12""»]|[-4-]}
WriteConsoleString(str : String)
<POP 24b2a-24b2c StackAdj> Δ+16 {}
<Blob 0x24b2c [10] @> Δ-10 {[«10""»]}
<POP 24b38-24b3a StackAdj> Δ-8 {[«10""»]|[-8-]}
<Lit 0x24b3a 10> {[«10""»]|[-4-]|[$$, Track =>]}
<MI 24b46 MOVE.L (A6+0xc),-(A7)> Δ-4 {[«10""»]|[-4-]|[$$, Track =>]|[4, '(A6+0xc)']}
<POP 24b44-24b46 StackAdj> Δ-8 {[«10""»]|[-4-]|[$$, Track =>]|[4, '(A6+0xc)']|[-8-]}
<Call 0x24b4a 0x102e4> {[«10""»]|[-4-]|[$$, Track =>]|[4, '(A6+0xc)']|[-8-]}
Long2String(a : Long) : String
<POP 24b4c-24b4e StackAdj> Δ+4 {[«10""»]|[-4-]|[$$, Track =>]|[4, '(A6+0xc)']|[-4-]}
<Const 0x24b4e 0x4.4> Δ-4 {[«10""»]|[-4-]|[$$, Track =>]|[4, '(A6+0xc)']|[-4-]|[##4]}
<Call 0x24b52 0x102f4> {[«10""»]|[-4-]|[$$, Track =>]|[4, '(A6+0xc)']|[-4-]|[##4]}
RightPad(a : String; b : Long) : String
<POP 24b58-24b5a StackAdj> Δ+8 {[«10""»]|[-4-]|[$$, Track =>]|[4, '(A6+0xc)']}
<Call 0x24b5a 0x102d0> {[«10""»]|[-4-]|[$$, Track =>]|[4, '(A6+0xc)']}
StringCat2(a, b : String) : String
<POP 24b60-24b62 StackAdj> Δ+8 {[«10""»]|[-4-]}
<Call 0x24b62 0x103d8> {[«10""»]|[-4-]}
WriteConsoleString(str : String)
<POP 24b64-24b65 StackAdj> Δ+14 ↓ {}
<Blob 0x24b65 [12] @> Δ-12 {[«12""»]}
<POP 24b74-24b76 StackAdj> Δ-8 {[«12""»]|[-8-]}
<Lit 0x24b76 11> {[«12""»]|[-4-]|[$$, Sector =>]}
<MI 24b80 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«12""»]|[-4-]|[$$, Sector =>]|[4, '(A6+0x8)']}
<POP 24b7e-24b80 StackAdj> Δ-8 {[«12""»]|[-4-]|[$$, Sector =>]|[4, '(A6+0x8)']|[-8-]}
<Call 0x24b84 0x102e4> {[«12""»]|[-4-]|[$$, Sector =>]|[4, '(A6+0x8)']|[-8-]}
Long2String(a : Long) : String
<POP 24b86-24b88 StackAdj> Δ+4 {[«12""»]|[-4-]|[$$, Sector =>]|[4, '(A6+0x8)']|[-4-]}
<Const 0x24b88 0x4.4> Δ-4 {[«12""»]|[-4-]|[$$, Sector =>]|[4, '(A6+0x8)']|[-4-]|[##4]}
<Call 0x24b8c 0x102f4> {[«12""»]|[-4-]|[$$, Sector =>]|[4, '(A6+0x8)']|[-4-]|[##4]}
RightPad(a : String; b : Long) : String
<POP 24b92-24b94 StackAdj> Δ+8 {[«12""»]|[-4-]|[$$, Sector =>]|[4, '(A6+0x8)']}
<Call 0x24b94 0x102d0> {[«12""»]|[-4-]|[$$, Sector =>]|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 24b9a-24b9c StackAdj> Δ+8 {[«12""»]|[-4-]}
<Call 0x24b9c 0x103d8> {[«12""»]|[-4-]}
WriteConsoleString(str : String)
<POP 24b9e-24ba0 StackAdj> Δ+16 {}
<Call 0x24ba0 0x103dc> {}
WriteConsoleCrLf(void)
<POP 24ba6-24bae Epilogue> Σ0
@ 24bae
<LVAR 0x008 4(r)>
<LVAR -0x008 2(w)>
<LVAR -0x00e 2(w)>
<LVAR -0x012 @>
<LVAR -0x014 @ 1(r)>
<POP 24bae-24c38 Body>
<POP 24bae-24bc4 Prologue> Σ0 ↓
<POP 24bc4-24c00 Naked> Σ0 ↓ →0x24c30
<MI 24bc4 MOVE.W #0x2,(A6-0xe)> {}
<MI 24bca MOVE.W 0x29710,D0> {}
<MI 24bd0 ASL.W #0x8,D0> {}
<MI 24bd2 ADDQ.W #0x1,D0> {}
<MI 24bd4 MOVE.W D0,(A6-0x8)> {}
<Pointer.fp 0x24bd8 <LVAR -0x012 @>> Δ-4 {[@@-18]}
<MI 24bdc MOVEA.L (A6+0x8),A0> {[@@-18]}
<MI 24be0 MOVE.L A0,-(A7)> Δ-4 {[@@-18]|[4, 'A0']}
<MI 24be2 CLR.W -(A7)> Δ-2 {[@@-18]|[4, 'A0']|[#0]}
<Call 0x24be4 0x10204> {[@@-18]|[4, 'A0']|[#0]}
KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
<POP 24bea-24bec StackAdj> Δ+8 {[-2-]}
<MI 24bec CLR.W (A7)> {[-2-]}
<Pointer.fp 0x24bee <LVAR -0x014 @ 1(r)>> Δ-4 {[-2-]|[@@-20]}
<Call 0x24bf2 0x10206> {[-2-]|[@@-20]}
KC03_Wait_Disk_IO(a : W; VAR status : Byte)
<POP 24bf8-24bfa StackAdj> Δ+6 {}
<MI 24bfa TST.B (A6-0x14)> {}
<MI 24bfe BNE 0x24c30> {}
<POP 24c00-24c30 Naked> Σ0 ↓
<Blob 0x24c00 [38] @> Δ-38 {[«38""»]}
<POP 24c12-24c14 StackAdj> Δ-4 {[«38""»]|[-4-]}
<Lit 0x24c14 37> {[«38""»]|[$$Error while reading disk error status]}
<Call 0x24c28 0x22522> {[«38""»]|[$$Error while reading disk error status]}
<POP 24c2c-24c30 StackAdj> Δ+42 {}
<POP 24c30-24c38 Epilogue> Σ0 ←0x24bc4
@ 24c38
<LVAR 0x00c 2(r)>
<LVAR 0x008 4(r)>
<POP 24c38-24c92 Body>
<POP 24c38-24c4e Prologue> Σ0 ↓
<POP 24c4e-24c8a Naked> Σ0 ↓
<MI 24c4e MOVEA.L (A6+0x8),A0> {}
<MI 24c52 CLR.L D0> {}
<MI 24c54 MOVE.W (A6+0xc),D0> {}
<MI 24c58 CLR.L D1> {}
<MI 24c5a MOVE.B 0x29715,D1> {}
<MI 24c60 DIVU.W D1,D0> {}
<MI 24c62 MOVE.L D0,D2> {}
<MI 24c64 SWAP.W D2> {}
<MI 24c66 MOVE.B D2,(A0+0x3)> {}
<MI 24c6a CLR.L D2> {}
<MI 24c6c MOVE.W D0,D2> {}
<MI 24c6e CLR.L D0> {}
<MI 24c70 MOVE.B 0x29714,D0> {}
<MI 24c76 DIVU.W D0,D2> {}
<MI 24c78 SWAP.W D2> {}
<MI 24c7a MOVE.B D2,(A0+0x2)> {}
<MI 24c7e MULS.W D0,D1> {}
<MI 24c80 CLR.L D0> {}
<MI 24c82 MOVE.W (A6+0xc),D0> {}
<MI 24c86 DIVU.W D1,D0> {}
<MI 24c88 MOVE.W D0,(A0)> {}
<POP 24c8a-24c92 Epilogue> Σ0
@ 24c92
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 24c92-24d0a Body>
<POP 24c92-24ca8 Prologue> Σ0 ↓
<POP 24ca8-24d02 Naked> Σ0 ↓
<MI 24ca8 MOVEA.L (A6+0x8),A0> {}
<MI 24cac MOVE.L (A6+0xc),D4> {}
<MI 24cb0 CLR.L D3> {}
<MI 24cb2 MOVE.B 0x29715,D3> {}
<MI 24cb8 MOVE.L D3,-(A7)> Δ-4 {[4, 'D3']}
<Call 0x24cba 0x10298> {[4, 'D3']}
?divu_d3_d4
<MI 24cc0 MOVE.B D3,(A0+0x3)> {[4, 'D3']}
<MI 24cc4 CLR.L D3> {[4, 'D3']}
<MI 24cc6 MOVE.B 0x29714,D3> {[4, 'D3']}
<MI 24ccc MOVE.L D3,-(A7)> Δ-4 {[4, 'D3']|[4, 'D3']}
<Call 0x24cce 0x10298> {[4, 'D3']|[4, 'D3']}
?divu_d3_d4
<MI 24cd4 MOVE.B D3,(A0+0x2)> {[4, 'D3']|[4, 'D3']}
<MI 24cd8 MOVE.L (A7+0x4),D4> {[4, 'D3']|[4, 'D3']}
<MI 24cdc MOVE.L (A7)+,D0> Δ+4 {[4, 'D3']}
<MI 24cde MOVE.L D0,D3> {[4, 'D3']}
<Call 0x24ce0 0x1028c> {[4, 'D3']}
?muls_d3_d4
<POP 24ce6-24ce8 StackAdj> Δ+4 {}
<MI 24ce8 MOVE.W D4,D3> {}
<MI 24cea EXTW.L D3> {}
<MI 24cec MOVE.L (A6+0xc),D4> {}
<Call 0x24cf0 0x10294> {}
?divs_d3_d4
<POP 0x24cf6 LimitCheck 0x0 ≤ D4 ≤ 0xffff> {}
<MI 24d00 MOVE.W D4,(A0)> {}
<POP 24d02-24d0a Epilogue> Σ0
@ 24d0a
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 24d0a-24e10 Body> Δ-4
<POP 24d0a-24d20 Prologue> Σ0 ↓
<POP 24d20-24d2c RegCacheLoad> Σ0 ↓
<POP 24d2c-24d36 Naked> Σ0 ↓ →0x24d66
<MI 24d2c MOVE.L 0x2970c,D0> {}
<MI 24d2e CMPI.L #0x00000800,D0> {}
<MI 24d34 BNE 0x24d66> {}
<POP 24d36-24d66 Naked> Σ0 ↓
<Blob 0x24d36 [34] @> Δ-34 {[«34""»]}
<POP 24d48-24d4a StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x24d4a 33> {[«34""»]|[$$Too many defects (2048) to handle]}
<Call 0x24d5e 0x22522> {[«34""»]|[$$Too many defects (2048) to handle]}
<POP 24d62-24d66 StackAdj> Δ+38 {}
<POP 24d66-24d6c Naked> Σ0 Δ-4 ↓ ←0x24d2c
<Blob 0x24d66 [4] 0x2970c> Δ-4 {[«4»]}
<MI 24d68 SUBQ.L #0x1,(A7)> {[-4-]}
<MI 24d6a MOVEQ.L #0x00,D7> {[-4-]}
<POP 24d6c-24d70 Naked> Σ-4 ↓ →0x24db4 ←0x24db0
<MI 24d6c CMP.L (A7),D7> {[-4-]}
<MI 24d6e BGT 0x24db4> {[-4-]}
<POP 24d70-24d94 Naked> Σ-4 ↓ →0x24db0
<POP 0x24d70 LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {[-4-]}
<MI 24d7a MOVE.L D7,D0> {[-4-]}
<MI 24d7c ASL.L #0x2,D0> {[-4-]}
<MI 24d7e LEA.L 0x296d2,A0> {[-4-]}
<MI 24d80 LEA.L (A0+D0.L),A0> {[-4-]}
<MI 24d84 CLR.L D0> {[-4-]}
<MI 24d86 MOVE.W (A0+0x44c),D0> {[-4-]}
<MI 24d8a LSL.W #0x2,D0> {[-4-]}
<MI 24d8c LSR.W #0x2,D0> {[-4-]}
<MI 24d8e CMP.L (A6+0x10),D0> {[-4-]}
<MI 24d92 BNE 0x24db0> {[-4-]}
<POP 24d94-24da0 Naked> Σ-4 ↓ →0x24db0
<MI 24d94 CLR.L D0> {[-4-]}
<MI 24d96 MOVE.B (A0+0x44e),D0> {[-4-]}
<MI 24d9a CMP.L (A6+0xc),D0> {[-4-]}
<MI 24d9e BNE 0x24db0> {[-4-]}
<POP 24da0-24dac Naked> Σ-4 ↓ →0x24db0
<MI 24da0 CLR.L D0> {[-4-]}
<MI 24da2 MOVE.B (A0+0x44f),D0> {[-4-]}
<MI 24da6 CMP.L (A6+0x8),D0> {[-4-]}
<MI 24daa BNE 0x24db0> {[-4-]}
<POP 24dac-24db0 Naked> Σ-4 Δ+4 →0x24e08
<POP 24dac-24dae StackAdj> Δ+4 {}
<MI 24dae BRA 0x24e08> {}
<POP 24db0-24db4 Naked> Σ-4 ↓ →0x24d6c ←0x24d70 ←0x24d94 ←0x24da0
<MI 24db0 ADDQ.L #0x1,D7> {[-4-]}
<MI 24db2 BVC 0x24d6c> {[-4-]}
<POP 24db4-24e08 Naked> Σ-4 Δ+4 ↓ ←0x24d6c
<POP 24db4-24db6 StackAdj> Δ+4 {}
<MI 24db6 MOVE.L 0x2970c,D0> {}
<POP 0x24db8 LimitCheck 0x0 ≤ D0 ≤ 0x7ff> {}
<MI 24dc2 ASL.L #0x2,D0> {}
<MI 24dc4 LEA.L 0x296d2,A0> {}
<MI 24dc6 LEA.L (A0+D0.L),A0> {}
<MI 24dca MOVE.L (A6+0x10),D0> {}
<POP 0x24dce LimitCheck 0x0 ≤ D0 ≤ 0x3fff> {}
<MI 24dd8 ANDI.W #0xc000,(A0+0x44c)> {}
<MI 24dde OR.W D0,(A0+0x44c)> {}
<MI 24de2 MOVE.L (A6+0xc),D0> {}
<POP 0x24de6 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 24df0 MOVE.B D0,(A0+0x44e)> {}
<MI 24df4 MOVE.L (A6+0x8),D0> {}
<POP 0x24df8 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 24e02 MOVE.B D0,(A0+0x44f)> {}
<MI 24e06 ADDQ.L #0x1,0x2970c> {}
<POP 24e08-24e10 Epilogue> Σ0 ←0x24dac
@ 24e10
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x21b 1(w)>
<LVAR -0x21c 1(w)>
<LVAR -0x21e @ 1(w) 2(w)>
<LVAR -0x220 2(w)>
<LVAR -0x222 2(w)>
<LVAR -0x224 2(w)>
<LVAR -0x226 2(r)>
<LVAR -0x228 2(r)>
<LVAR -0x22a 2(w)>
<LVAR -0x22c 2(r)>
<LVAR -0x22e @ 2(r)>
<LVAR -0x230 @>
<LVAR -0x234 @>
<POP 24e10-24f08 Body>
<POP 24e10-24e26 Prologue> Σ0 ↓
<POP 24e26-24e30 RegCacheLoad> Σ0 ↓
<POP 24e30-24e86 Naked> Σ0 ↓
<MI 24e30 LEA.L (A6-0x21e),A0> {}
<MI 24e32 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 24e34 MOVE.L (A7)+,D6> Δ+4 {}
<MI 24e36 CLR.W (A6-0x22e)> {}
<MI 24e3a CLR.W (A6-0x22c)> {}
<MI 24e3e MOVE.W #0x2,(A6-0x22a)> {}
<MI 24e44 CLR.W (A6-0x228)> {}
<MI 24e48 CLR.W (A6-0x226)> {}
<MI 24e4c MOVE.W 0x29710,D0> {}
<MI 24e52 ASL.W #0x8,D0> {}
<MI 24e54 ADDQ.W #0x8,D0> {}
<MI 24e56 MOVE.W D0,(A6-0x224)> {}
<MI 24e5a MOVE.L (A6+0x10),D0> {}
<POP 0x24e5e LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 24e68 MOVE.W D0,(A6-0x222)> {}
<MI 24e6c MOVE.L (A6+0xc),D0> {}
<MI 24e70 ASL.L #0x8,D0> {}
<MI 24e72 ADD.L (A6+0x8),D0> {}
<POP 0x24e76 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 24e80 MOVE.W D0,(A6-0x220)> {}
<MI 24e84 MOVEQ.L #0x00,D7> {}
<POP 24e86-24ea2 Naked> Σ0 ↓ →0x24e86 ←0x24e86
<POP 0x24e86 LimitCheck 0x0 ≤ D7 ≤ 0xff> {}
<MI 24e8c MOVE.L D7,D0> {}
<MI 24e8e ASL.L #0x1,D0> {}
<MI 24e90 LEA.L (A6-0x234),A0> {}
<MI 24e94 MOVE.W 0x296e0,(A0+D0.L+#0x1a)> {}
<MI 24e9c ADDQ.L #0x1,D7> {}
<MI 24e9e CMP.L #0xff,D7> {}
<MI 24ea0 BLE 0x24e86> {}
<POP 24ea2-24f00 Naked> Σ0 ↓
<MI 24ea2 ORI.B #0x10,(A6-0x21e)> {}
<MI 24ea6 ANDI.B #0xbf,(A6-0x21e)> {}
<MI 24eaa ANDI.B #0x7f,(A6-0x21e)> {}
<MI 24eae ANDI.B #0xdf,(A6-0x21e)> {}
<MI 24eb2 MOVE.L (A6+0x10),D0> {}
<POP 0x24eb6 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {}
<MI 24ec0 ANDI.W #0xf000,(A6-0x21e)> {}
<MI 24ec4 OR.W D0,(A6-0x21e)> {}
<MI 24ec6 MOVE.L (A6+0xc),D0> {}
<POP 0x24eca LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 24ed0 MOVE.B D0,(A6-0x21c)> {}
<MI 24ed4 MOVE.L (A6+0x8),D0> {}
<POP 0x24ed8 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 24ede MOVE.B D0,(A6-0x21b)> {}
<Pointer.fp 0x24ee2 <LVAR -0x22e @ 2(r)>> Δ-4 {[@@-558]}
<MI 24ee6 MOVE.L D6,-(A7)> Δ-4 {[@@-558]|[4, 'D6']}
<MI 24ee8 CLR.W -(A7)> Δ-2 {[@@-558]|[4, 'D6']|[#0]}
<Call 0x24eea 0x10204> {[@@-558]|[4, 'D6']|[#0]}
KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
<POP 24ef0-24ef2 StackAdj> Δ+8 {[-2-]}
<MI 24ef2 CLR.W (A7)> {[-2-]}
<Pointer.fp 0x24ef4 <LVAR -0x230 @>> Δ-4 {[-2-]|[@@-560]}
<Call 0x24ef8 0x10206> {[-2-]|[@@-560]}
KC03_Wait_Disk_IO(a : W; VAR status : Byte)
<POP 24efe-24f00 StackAdj> Δ+6 {}
<POP 24f00-24f08 Epilogue> Σ0
@ 24f08
<LVAR -0x006 4(rw)>
<LVAR -0x01e 4(rw)>
<LVAR -0x022 4(rw)>
<LVAR -0x026 4(rw)>
<LVAR -0x028 @ 1(r)>
<LVAR -0x02c 2(w)>
<LVAR -0x02e 2(w)>
<LVAR -0x030 2(r)>
<LVAR -0x032 2(r)>
<LVAR -0x034 2(w)>
<LVAR -0x036 2(r)>
<LVAR -0x038 @ 2(r)>
<LVAR -0x03c 4(w)>
<LVAR -0x03d 1(r)>
<LVAR -0x03e 1(r)>
<LVAR -0x040 @ 2(r)>
<POP 24f08-252e2 Body> Δ-4
<POP 24f08-24f1e Prologue> Σ0 ↓
<POP 24f1e-24f30 RegCacheLoad> Σ0 ↓
<POP 24f30-24f40 Naked> Σ0 ↓ →0x25078
<MI 24f30 CLR.L (A6-0x6)> {}
<POP 24f32-24f34 StackAdj> Δ-2 {[-2-]}
<Call 0x24f34 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 24f3a TST.B (A7)+> Δ+2 {}
<MI 24f3c BEQ 0x25078> {}
<POP 24f40-24f94 Naked> Σ0 ↓ →0x24fb8
<MI 24f40 CLR.W (A6-0x38)> {}
<MI 24f44 CLR.W (A6-0x36)> {}
<MI 24f48 MOVE.W #0x2,(A6-0x34)> {}
<MI 24f4e CLR.W (A6-0x32)> {}
<MI 24f52 CLR.W (A6-0x30)> {}
<MI 24f56 MOVE.W 0x29710,D0> {}
<MI 24f5c ASL.W #0x8,D0> {}
<MI 24f5e ADDI.W #0x000a,D0> {}
<MI 24f62 MOVE.W D0,(A6-0x2e)> {}
<MI 24f66 MOVE.W #0x18,(A6-0x2c)> {}
<Pointer.fp 0x24f6a <LVAR -0x038 @ 2(r)>> Δ-4 {[@@-56]}
<MI 24f6e LEA.L 0x2e306,A0> {[@@-56]}
<MI 24f74 MOVE.L A0,-(A7)> Δ-4 {[@@-56]|[4, 'A0']}
<MI 24f76 CLR.W -(A7)> Δ-2 {[@@-56]|[4, 'A0']|[#0]}
<Call 0x24f78 0x10204> {[@@-56]|[4, 'A0']|[#0]}
KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
<POP 24f7e-24f80 StackAdj> Δ+8 {[-2-]}
<MI 24f80 CLR.W (A7)> {[-2-]}
<Pointer.fp 0x24f82 <LVAR -0x028 @ 1(r)>> Δ-4 {[-2-]|[@@-40]}
<Call 0x24f86 0x10206> {[-2-]|[@@-40]}
KC03_Wait_Disk_IO(a : W; VAR status : Byte)
<POP 24f8c-24f8e StackAdj> Δ+6 {}
<MI 24f8e TST.B (A6-0x28)> {}
<MI 24f92 BNE 0x24fb8> {}
<POP 24f94-24fb8 Naked> Σ0 ↓
<Blob 0x24f94 [36] @> Δ-36 {[«36""»]}
<POP 24fa0-24fa2 StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x24fa2 36> {[«36""»]|[$$failure reading defect map from disk]}
<Call 0x24fb0 0x22522> {[«36""»]|[$$failure reading defect map from disk]}
<POP 24fb4-24fb8 StackAdj> Δ+40 {}
<POP 24fb8-24fd4 Naked> Σ0 Δ-4 ↓ ←0x24f40
<MI 24fb8 MOVE.W 0x2e308,D0> {}
<MI 24fbe LSR.W #0x2,D0> {}
<MI 24fc0 CLR.L D1> {}
<MI 24fc2 MOVE.W D0,D1> {}
<MI 24fc4 MOVE.L D1,(A6-0x3c)> {}
<MI 24fc8 CLR.L 0x2970c> {}
<MI 24fce SUBQ.L #0x1,D1> {}
<MI 24fd0 MOVE.L D1,-(A7)> Δ-4 {[4, 'D1']}
<MI 24fd2 MOVEQ.L #0x00,D0> {[4, 'D1']}
<POP 24fd4-24fda Naked> Σ-4 ↓ →0x25072 ←0x2506c
<MI 24fd4 CMP.L (A7),D0> {[-4-]}
<MI 24fd6 BGT 0x25072> {[-4-]}
<POP 24fda-24ff8 Naked> Σ-4 ↓ →0x2506c
<POP 0x24fda LimitCheck 0x0 ≤ D0 ≤ 0x1f7> {[-4-]}
<MI 24fe4 MOVE.L D0,D1> {[-4-]}
<MI 24fe6 ASL.L #0x2,D1> {[-4-]}
<MI 24fe8 LEA.L 0x296d2,A0> {[-4-]}
<MI 24fee LEA.L (A0+D1.L),A0> {[-4-]}
<MI 24ff2 TST.B (A0+0x4c38)> {[-4-]}
<MI 24ff6 BNE 0x2506c> {[-4-]}
<POP 24ff8-2506c Naked> Σ-4 ↓
<MI 24ff8 ADDQ.L #0x1,(A6-0x6)> {[-4-]}
<MI 24ffa CLR.L D1> {[-4-]}
<MI 24ffc MOVE.B (A0+0x4c39),D1> {[-4-]}
<MI 25000 ASL.W #0x8,D1> {[-4-]}
<MI 25002 CLR.L D2> {[-4-]}
<MI 25004 MOVE.B (A0+0x4c3a),D2> {[-4-]}
<MI 25008 ADD.W D1,D2> {[-4-]}
<MI 2500a EXTW.L D2> {[-4-]}
<MI 2500c MOVE.L D2,D7> {[-4-]}
<MI 2500e ASL.L #0x8,D7> {[-4-]}
<MI 25010 CLR.L D1> {[-4-]}
<MI 25012 MOVE.B (A0+0x4c3b),D1> {[-4-]}
<MI 25016 ADD.L D1,D7> {[-4-]}
<MI 25018 ADD.L D7,D7> {[-4-]}
<MI 2501a MOVE.L D7,-(A7)> Δ-4 {[-4-]|[4, 'D7']}
<Pointer.fp 0x2501c <LVAR -0x040 @ 2(r)>> Δ-4 {[-4-]|[4, 'D7']|[@@-64]}
<Call 0x2501e 0x24c92> {[-4-]|[4, 'D7']|[@@-64]}
<POP 25022-25024 StackAdj> Δ+8 {[-4-]}
<MI 25024 CLR.L D1> {[-4-]}
<MI 25026 MOVE.W (A6-0x40),D1> {[-4-]}
<MI 25028 MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'D1']}
<MI 2502a CLR.L D1> {[-4-]|[4, 'D1']}
<MI 2502c MOVE.B (A6-0x3e),D1> {[-4-]|[4, 'D1']}
<MI 25030 MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'D1']|[4, 'D1']}
<MI 25032 CLR.L D1> {[-4-]|[4, 'D1']|[4, 'D1']}
<MI 25034 MOVE.B (A6-0x3d),D1> {[-4-]|[4, 'D1']|[4, 'D1']}
<MI 25038 MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'D1']|[4, 'D1']|[4, 'D1']}
<Call 0x2503a 0x24d0a> {[-4-]|[4, 'D1']|[4, 'D1']|[4, 'D1']}
<POP 2503e-25042 StackAdj> Δ+12 {[-4-]}
<MI 25042 ADDQ.L #0x1,D7> {[-4-]}
<MI 25044 MOVE.L D7,-(A7)> Δ-4 {[-4-]|[4, 'D7']}
<Pointer.fp 0x25046 <LVAR -0x040 @ 2(r)>> Δ-4 {[-4-]|[4, 'D7']|[@@-64]}
<Call 0x25048 0x24c92> {[-4-]|[4, 'D7']|[@@-64]}
<POP 2504c-2504e StackAdj> Δ+8 {[-4-]}
<MI 2504e CLR.L D1> {[-4-]}
<MI 25050 MOVE.W (A6-0x40),D1> {[-4-]}
<MI 25052 MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'D1']}
<MI 25054 CLR.L D1> {[-4-]|[4, 'D1']}
<MI 25056 MOVE.B (A6-0x3e),D1> {[-4-]|[4, 'D1']}
<MI 2505a MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'D1']|[4, 'D1']}
<MI 2505c CLR.L D1> {[-4-]|[4, 'D1']|[4, 'D1']}
<MI 2505e MOVE.B (A6-0x3d),D1> {[-4-]|[4, 'D1']|[4, 'D1']}
<MI 25062 MOVE.L D1,-(A7)> Δ-4 {[-4-]|[4, 'D1']|[4, 'D1']|[4, 'D1']}
<Call 0x25064 0x24d0a> {[-4-]|[4, 'D1']|[4, 'D1']|[4, 'D1']}
<POP 25068-2506c StackAdj> Δ+12 {[-4-]}
<POP 2506c-25072 Naked> Σ-4 ↓ →0x24fd4 ←0x24fda
<MI 2506c ADDQ.L #0x1,D0> {[-4-]}
<MI 2506e BVC 0x24fd4> {[-4-]}
<POP 25072-25078 Naked> Σ-4 Δ+4 →0x252da ←0x24fd4
<POP 25072-25074 StackAdj> Δ+4 {}
<MI 25074 BRA 0x252da> {}
<POP 25078-250a2 Naked> Σ0 ↓ ←0x24f30
<Blob 0x25078 [20] @> Δ-20 {[«20""»]}
<POP 25084-25086 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x25086 20> {[«20""»]|[$$Flagging bad blocks.]}
<Call 0x25094 0x103e0> {[«20""»]|[$$Flagging bad blocks.]}
WriteConsoleStringCrLf(str : String)
<POP 2509a-2509c StackAdj> Δ+24 {}
<MI 2509c CLR.L (A6-0x26)> {}
<MI 250a0 MOVEQ.L #0x00,D0> {}
<POP 250a2-250d0 Naked> Σ0 Δ-8 ↓ →0x251ec ←0x251fa
<MI 250a2 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<POP 0x250a4 LimitCheck 0x0 ≤ D0 ≤ 0x7ff> {[4, 'D0']}
<MI 250ae MOVE.L D0,D1> {[4, 'D0']}
<MI 250b0 ASL.L #0x2,D1> {[4, 'D0']}
<MI 250b2 LEA.L 0x296d2,A0> {[4, 'D0']}
<MI 250b8 LEA.L (A0+D1.L),A0> {[4, 'D0']}
<MI 250bc MOVE.L A0,-(A7)> Δ-4 {[4, 'D0']|[4, 'A0']}
<MI 250be MOVE.W (A0+0x44c),D1> {[4, 'D0']|[4, 'A0']}
<MI 250c2 LSL.W #0x2,D1> {[4, 'D0']|[4, 'A0']}
<MI 250c4 LSR.W #0x2,D1> {[4, 'D0']|[4, 'A0']}
<MI 250c6 CMP.W 0x29712,D1> {[4, 'D0']|[4, 'A0']}
<MI 250cc BHI 0x251ec> {[4, 'D0']|[4, 'A0']}
<POP 250d0-250dc Naked> Σ-8 ↓ →0x250ea
<MI 250d0 MOVE.B 0x29714,D2> {[-8-]}
<MI 250d6 CMP.B (A0+0x44e),D2> {[-8-]}
<MI 250da BCC 0x250ea> {[-8-]}
<POP 250dc-250ea Naked> Σ-8 ↓ →0x251ec
<MI 250dc CLR.L D2> {[-8-]}
<MI 250de MOVE.B (A0+0x44e),D2> {[-8-]}
<MI 250e2 CMPI.W #0x00ff,D2> {[-8-]}
<MI 250e6 BNE 0x251ec> {[-8-]}
<POP 250ea-250f6 Naked> Σ-8 ↓ →0x25104 ←0x250d0
<MI 250ea MOVE.B 0x29715,D2> {[-8-]}
<MI 250f0 CMP.B (A0+0x44f),D2> {[-8-]}
<MI 250f4 BCC 0x25104> {[-8-]}
<POP 250f6-25104 Naked> Σ-8 ↓ →0x251ec
<MI 250f6 CLR.L D2> {[-8-]}
<MI 250f8 MOVE.B (A0+0x44f),D2> {[-8-]}
<MI 250fc CMPI.W #0x00ff,D2> {[-8-]}
<MI 25100 BNE 0x251ec> {[-8-]}
<POP 25104-25108 Naked> Σ-8 ↓ →0x25116 ←0x250ea
<MI 25104 TST.W D1> {[-8-]}
<MI 25106 BNE 0x25116> {[-8-]}
<POP 25108-2510e Naked> Σ-8 ↓ →0x25116
<MI 25108 TST.B (A0+0x44e)> {[-8-]}
<MI 2510c BNE 0x25116> {[-8-]}
<POP 2510e-25116 Naked> Σ-8 ↓ →0x251ec
<MI 2510e TST.B (A0+0x44f)> {[-8-]}
<MI 25112 BEQ 0x251ec> {[-8-]}
<POP 25116-25124 Naked> Σ-8 ↓ →0x2514a ←0x25104 ←0x25108
<MI 25116 ADDQ.L #0x1,(A6-0x6)> {[-8-]}
<MI 25118 CLR.L D1> {[-8-]}
<MI 2511a MOVE.B (A0+0x44e),D1> {[-8-]}
<MI 2511e CMPI.W #0x00ff,D1> {[-8-]}
<MI 25122 BNE 0x2514a> {[-8-]}
<POP 25124-25138 Naked> Σ-8 ↓
<MI 25124 CLR.L (A6-0x22)> {[-8-]}
<MI 25128 CLR.L D1> {[-8-]}
<MI 2512a MOVE.B 0x29714,D1> {[-8-]}
<MI 25130 SUBQ.W #0x1,D1> {[-8-]}
<MI 25132 EXTW.L D1> {[-8-]}
<MI 25134 MOVE.L D1,(A6-0x1e)> {[-8-]}
<POP 25138-2514a Naked> Σ-8 →0x2516c ←0x25162
<MI 25138 MOVEQ.L #0x00,D6> {[-8-]}
<MI 2513a CLR.L D1> {[-8-]}
<MI 2513c MOVE.B 0x29715,D1> {[-8-]}
<MI 25142 SUBQ.W #0x1,D1> {[-8-]}
<MI 25144 EXTW.L D1> {[-8-]}
<MI 25146 MOVE.L D1,D5> {[-8-]}
<MI 25148 BRA 0x2516c> {[-8-]}
<POP 2514a-25162 Naked> Σ-8 ↓ →0x25164 ←0x25116
<MI 2514a MOVE.W D1,D2> {[-8-]}
<MI 2514c EXTW.L D2> {[-8-]}
<MI 2514e MOVE.L D2,(A6-0x22)> {[-8-]}
<MI 25152 MOVE.L D2,(A6-0x1e)> {[-8-]}
<MI 25156 CLR.L D1> {[-8-]}
<MI 25158 MOVE.B (A0+0x44f),D1> {[-8-]}
<MI 2515c CMPI.W #0x00ff,D1> {[-8-]}
<MI 25160 BNE 0x25164> {[-8-]}
<POP 25162-25164 Naked> Σ-8 →0x25138
<MI 25162 BRA 0x25138> {[-8-]}
<POP 25164-2516c Naked> Σ-8 ↓ ←0x2514a
<MI 25164 MOVE.W D1,D2> {[-8-]}
<MI 25166 EXTW.L D2> {[-8-]}
<MI 25168 MOVE.L D2,D6> {[-8-]}
<MI 2516a MOVE.L D2,D5> {[-8-]}
<POP 2516c-25178 Naked> Σ-8 Δ-4 ↓ →0x2518c ←0x25138
<MI 2516c MOVE.L (A6-0x1e),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x1e)']}
<MI 25170 MOVE.L (A6-0x22),D1> {[-8-]|[4, '(A6-0x1e)']}
<MI 25174 CMP.L (A7),D1> {[-8-]|[4, '(A6-0x1e)']}
<MI 25176 BGT 0x2518c> {[-8-]|[4, '(A6-0x1e)']}
<POP 25178-2518c Naked> Σ-12 ↓
<MI 25178 MOVE.L (A7),D2> {[-12-]}
<POP 0x2517a LimitCheck -0x7fffffff ≤ D1> {[-12-]}
<MI 2517a CMPI.L #0x80000001,D1>
<MI 25180 BLT 0x2518a>
<POP 0x25182 LimitCheck D2 ≤ 0x7fffffff> {[-12-]}
<MI 25182 CMPI.L #0x7fffffff,D2>
<MI 25188 BLE 0x2518c>
<MI 2518a TRAP #15>
<POP 2518c-25190 Naked> Σ-12 ↓ →0x25194 ←0x2516c ←0x251e6
<MI 2518c CMP.L (A7),D1> {[-12-]}
<MI 2518e BLE 0x25194> {[-12-]}
<POP 25190-25194 Naked> Σ-12 Δ-4 →0x251ea
<POP 25190-25192 StackAdj> Δ-4 {[-16-]}
<MI 25192 BRA 0x251ea> {[-16-]}
<POP 25194-2519e Naked> Σ-12 Δ-8 ↓ →0x251b2 ←0x2518c
<MI 25194 MOVE.L D1,-(A7)> Δ-4 {[-12-]|[4, 'D1']}
<MI 25196 MOVE.L D5,-(A7)> Δ-4 {[-12-]|[4, 'D1']|[4, 'D5']}
<MI 25198 MOVE.L D6,D0> {[-12-]|[4, 'D1']|[4, 'D5']}
<MI 2519a CMP.L (A7),D0> {[-12-]|[4, 'D1']|[4, 'D5']}
<MI 2519c BGT 0x251b2> {[-12-]|[4, 'D1']|[4, 'D5']}
<POP 2519e-251b2 Naked> Σ-20 ↓
<MI 2519e MOVE.L (A7),D2> {[-20-]}
<POP 0x251a0 LimitCheck -0x7fffffff ≤ D0> {[-20-]}
<MI 251a0 CMPI.L #0x80000001,D0>
<MI 251a6 BLT 0x251b0>
<POP 0x251a8 LimitCheck D2 ≤ 0x7fffffff> {[-20-]}
<MI 251a8 CMPI.L #0x7fffffff,D2>
<MI 251ae BLE 0x251b2>
<MI 251b0 TRAP #15>
<POP 251b2-251b6 Naked> Σ-20 ↓ →0x251de ←0x25194 ←0x251b6
<MI 251b2 CMP.L (A7),D0> {[-20-]}
<MI 251b4 BGT 0x251de> {[-20-]}
<POP 251b6-251de Naked> Σ-20 ↓ →0x251b2
<MI 251b6 ADDQ.L #0x1,(A6-0x26)> {[-20-]}
<MI 251ba MOVEA.L (A7+0xc),A0> {[-20-]}
<MI 251be CLR.L D1> {[-20-]}
<MI 251c0 MOVE.W (A0+0x44c),D1> {[-20-]}
<MI 251c4 LSL.W #0x2,D1> {[-20-]}
<MI 251c6 LSR.W #0x2,D1> {[-20-]}
<MI 251c8 MOVE.L D1,-(A7)> Δ-4 {[-20-]|[4, 'D1']}
<MI 251ca MOVE.L (A7+0x8),D1> {[-20-]|[4, 'D1']}
<MI 251ce MOVE.L D1,-(A7)> Δ-4 {[-20-]|[4, 'D1']|[4, 'D1']}
<MI 251d0 MOVE.L D0,-(A7)> Δ-4 {[-20-]|[4, 'D1']|[4, 'D1']|[4, 'D0']}
<Call 0x251d2 0x24e10> {[-20-]|[4, 'D1']|[4, 'D1']|[4, 'D0']}
<POP 251d6-251da StackAdj> Δ+12 {[-20-]}
<MI 251da ADDQ.L #0x1,D0> {[-20-]}
<MI 251dc BVC 0x251b2> {[-20-]}
<POP 251de-251e6 Naked> Σ-20 Δ+4 ↓ →0x251ea ←0x251b2
<POP 251de-251e0 StackAdj> Δ+4 {[-16-]}
<MI 251e0 MOVE.L (A7),D1> {[-16-]}
<MI 251e2 ADDQ.L #0x1,D1> {[-16-]}
<MI 251e4 BVS 0x251ea> {[-16-]}
<POP 251e6-251ea Naked> Σ-16 Δ+4 →0x2518c
<POP 251e6-251e8 StackAdj> Δ+4 {[-12-]}
<MI 251e8 BRA 0x2518c> {[-12-]}
<POP 251ea-251ec Naked> Σ-16 Δ+8 ↓ ←0x25190 ←0x251de
<POP 251ea-251ec StackAdj> Δ+8 {[-8-]}
<POP 251ec-251fa Naked> Σ-8 Δ+4 ↓ →0x25200 ←0x250a2 ←0x250dc ←0x250f6 ←0x2510e
<POP 251ec-251ee StackAdj> Δ+4 {[-4-]}
<MI 251ee MOVE.L (A7),D0> {[-4-]}
<MI 251f0 ADDQ.L #0x1,D0> {[-4-]}
<MI 251f2 CMPI.L #0x000007ff,D0> {[-4-]}
<MI 251f8 BGT 0x25200> {[-4-]}
<POP 251fa-25200 Naked> Σ-4 Δ+4 →0x250a2
<POP 251fa-251fc StackAdj> Δ+4 {}
<MI 251fc BRA 0x250a2> {}
<POP 25200-2524e Naked> Σ-4 Δ+4 ↓ →0x25276 ←0x251ec
<POP 25200-25202 StackAdj> Δ+4 {}
<Blob 0x25202 [20] @> Δ-20 {[«20""»]}
<POP 2520e-25210 StackAdj> Δ-8 {[«20""»]|[-8-]}
<MI 25210 MOVE.L (A6-0x26),-(A7)> Δ-4 {[«20""»]|[-8-]|[4, '(A6-0x26)']}
<Call 0x25214 0x102e4> {[«20""»]|[-8-]|[4, '(A6-0x26)']}
Long2String(a : Long) : String
<Lit 0x2521a 20> {[«20""»]|[-8-]|[$$ bad blocks flagged.]}
<Call 0x25228 0x102d0> {[«20""»]|[-8-]|[$$ bad blocks flagged.]}
StringCat2(a, b : String) : String
<POP 2522e-25230 StackAdj> Δ+8 {[«20""»]|[-4-]}
<Call 0x25230 0x103e0> {[«20""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 25236-25238 StackAdj> Δ+24 {}
<Call 0x25238 0x103dc> {}
WriteConsoleCrLf(void)
<MI 2523e MOVE.L #0x800,D0> {}
<MI 25244 SUB.L (A6-0x6),D0> {}
<MI 25246 CMPI.L #0x00000200,D0> {}
<MI 2524c BGE 0x25276> {}
<POP 2524e-25276 Naked> Σ0 →0x252d4
<Blob 0x2524e [40] @> Δ-40 {[«40""»]}
<POP 2525a-2525c StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x2525c 40> {[«40""»]|[$$Defect entries exceeds maximum permitted]}
<Call 0x2526a 0x103e0> {[«40""»]|[$$Defect entries exceeds maximum permitted]}
WriteConsoleStringCrLf(str : String)
<POP 25270-25274 StackAdj> Δ+44 {}
<MI 25274 BRA 0x252d4> {}
<POP 25276-252d4 Naked> Σ0 ↓ ←0x25200
<Blob 0x25276 [28] @> Δ-28 {[«28""»]}
<Blob 0x25282 [34] @> Δ-34 {[«28""»]|[«34""»]}
<POP 25294-25296 StackAdj> Δ-8 {[«28""»]|[«34""»]|[-8-]}
<MI 25296 MOVE.L (A6-0x6),-(A7)> Δ-4 {[«28""»]|[«34""»]|[-8-]|[4, '(A6-0x6)']}
<Call 0x25298 0x102e4> {[«28""»]|[«34""»]|[-8-]|[4, '(A6-0x6)']}
Long2String(a : Long) : String
<Lit 0x2529e 28> {[«28""»]|[«34""»]|[-8-]|[$$ defect table entries used,_]}
<MI 252aa MOVE.L D0,(A7)> {[«28""»]|[«34""»]|[-8-]|[4, 'D0']}
<POP 252a8-252aa StackAdj> Δ-8 {[«28""»]|[«34""»]|[-8-]|[4, 'D0']|[-8-]}
<Call 0x252ac 0x102e4> {[«28""»]|[«34""»]|[-8-]|[4, 'D0']|[-8-]}
Long2String(a : Long) : String
<Lit 0x252b2 33> {[«28""»]|[«34""»]|[-8-]|[4, 'D0']|[-4-]|[$$ available defect entries remain.]}
<Call 0x252c0 0x102d8> {[«28""»]|[«34""»]|[-8-]|[4, 'D0']|[-4-]|[$$ available defect entries remain.]}
StringCat4(a, b, c, d : String) : String
<POP 252c6-252ca StackAdj> Δ+16 {[«28""»]|[«34""»]|[-4-]}
<Call 0x252ca 0x103e0> {[«28""»]|[«34""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 252d0-252d4 StackAdj> Δ+66 {}
<POP 252d4-252da Naked> Σ0 ↓ ←0x2524e
<Call 0x252d4 0x103dc> {}
WriteConsoleCrLf(void)
<POP 252da-252e2 Epilogue> Σ0 ←0x25072
@ 252e2
<LVAR 0x010 1(rw)>
<LVAR 0x00f 1(r)>
<LVAR 0x00e 1(r)>
<LVAR 0x00d 1(r)>
<LVAR 0x00c 1(r)>
<POP 252e2-25338 Body>
<POP 252e2-252f8 Prologue> Σ0 ↓
<POP 252f8-2532c Naked> Σ0 ↓ →0x25330
<MI 252f8 CLR.L D0> {}
<MI 252fa MOVE.B (A6+0xc),D0> {}
<MI 252fe ASL.W #0x8,D0> {}
<MI 25300 CLR.L D1> {}
<MI 25302 MOVE.B (A6+0xd),D1> {}
<MI 25306 ADD.W D0,D1> {}
<MI 25308 EXTW.L D1> {}
<MI 2530a ASL.L #0x8,D1> {}
<MI 2530c CLR.L D0> {}
<MI 2530e MOVE.B (A6+0xe),D0> {}
<MI 25312 ADD.L D1,D0> {}
<MI 25314 ASL.L #0x8,D0> {}
<MI 25316 CLR.L D1> {}
<MI 25318 MOVE.B (A6+0xf),D1> {}
<MI 2531c ADD.L D0,D1> {}
<MI 2531e MOVE.L D1,D7> {}
<MI 25320 CLR.B (A6+0x10)> {}
<MI 25324 CMPI.L #0x00000400,D7> {}
<MI 2532a BEQ 0x25330> {}
<POP 2532c-25330 Naked> Σ0 ↓
<MI 2532c ADDQ.B #0x1,(A6+0x10)> {}
<POP 25330-25338 Epilogue> Σ0 ←0x252f8
@ 25338
<LVAR -0x006 @ 4(r)>
<LVAR -0x00a @ 4(r)>
<LVAR -0x00c @ 1(r)>
<LVAR -0x00e 2(rw)>
<LVAR -0x010 2(rw)>
<LVAR -0x012 2(w)>
<LVAR -0x014 2(r)>
<LVAR -0x016 2(r)>
<LVAR -0x018 2(w)>
<LVAR -0x01a 2(r)>
<LVAR -0x01c @ 2(r)>
<POP 25338-25908 Body> Δ+342
<POP 25338-2534e Prologue> Σ0 ↓
<POP 2534e-25364 RegCacheLoad> Σ0 ↓
<POP 25364-2539c Naked> Σ0 ↓ →0x258b4
<Pointer.fp 0x25364 <LVAR -0x00a @ 4(r)>> Δ-4 {[@@-10]}
<Call 0x25368 0x10304> {[@@-10]}
GetRtc() : TimeStamp
<POP 2536e-25370 StackAdj> Δ+4 {}
<MI 25370 CLR.W (A6-0x1c)> {}
<MI 25372 CLR.W (A6-0x1a)> {}
<MI 25376 MOVE.W #0x02,(A6-0x18)> {}
<MI 2537a CLR.W (A6-0x16)> {}
<MI 2537e CLR.W (A6-0x14)> {}
<MI 25382 MOVE.W 0x29710,D0> {}
<MI 25384 ASL.W #0x8,D0> {}
<MI 25386 MOVE.W D0,(A6-0x12)> {}
<MI 2538a CLR.W (A6-0x10)> {}
<MI 2538e CLR.W (A6-0xe)> {}
<MI 25392 TST.B 0x2970b> {}
<MI 25398 BEQ 0x258b4> {}
<POP 2539c-253aa Naked> Σ0 ↓ →0x2566e
<POP 2539c-2539e StackAdj> Δ-2 {[-2-]}
<Call 0x2539e 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 253a4 TST.B (A7)+> Δ+2 {}
<MI 253a6 BEQ 0x2566e> {}
<POP 253aa-253fe Naked> Σ0 ↓ →0x25428
<MI 253aa MOVEQ.L #0x00,D7> {}
<MI 253ac CLR.W (A6-0x1c)> {}
<MI 253ae CLR.W (A6-0x1a)> {}
<MI 253b2 MOVE.W #0x02,(A6-0x18)> {}
<MI 253b6 CLR.W (A6-0x16)> {}
<MI 253ba CLR.W (A6-0x14)> {}
<MI 253be MOVE.W 0x29710,D0> {}
<MI 253c0 ASL.W #0x8,D0> {}
<MI 253c2 ADDI.W #0x0014,D0> {}
<MI 253c6 MOVE.W D0,(A6-0x12)> {}
<MI 253ca MOVE.W #0x3,(A6-0x10)> {}
<MI 253d0 MOVE.W #0x24,(A6-0xe)> {}
<Pointer.fp 0x253d6 <LVAR -0x01c @ 2(r)>> Δ-4 {[@@-28]}
<MI 253d8 LEA.L 0x2eaea,A0> {[@@-28]}
<MI 253de MOVE.L A0,-(A7)> Δ-4 {[@@-28]|[4, 'A0']}
<MI 253e0 CLR.W -(A7)> Δ-2 {[@@-28]|[4, 'A0']|[#0]}
<Call 0x253e2 0x10204> {[@@-28]|[4, 'A0']|[#0]}
KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
<POP 253e8-253ea StackAdj> Δ+8 {[-2-]}
<MI 253ea CLR.W (A7)> {[-2-]}
<Pointer.fp 0x253ec <LVAR -0x00c @ 1(r)>> Δ-4 {[-2-]|[@@-12]}
<Call 0x253f0 0x10206> {[-2-]|[@@-12]}
KC03_Wait_Disk_IO(a : W; VAR status : Byte)
<POP 253f6-253f8 StackAdj> Δ+6 {}
<MI 253f8 TST.B (A6-0xc)> {}
<MI 253fc BNE 0x25428> {}
<POP 253fe-25428 Naked> Σ0 ↓
<Blob 0x253fe [26] @> Δ-26 {[«26""»]}
<POP 25410-25412 StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x25412 25> {[«26""»]|[$$MODE SELECT PAGE 3 FAILED]}
<Call 0x25420 0x22522> {[«26""»]|[$$MODE SELECT PAGE 3 FAILED]}
<POP 25424-25428 StackAdj> Δ+30 {}
<POP 25428-25434 Naked> Σ0 ↓ →0x2545a ←0x253aa
<MI 25428 MOVE.W 0x2eb02,D0> {}
<MI 2542e CMP.W 0x223a0,D0> {}
<MI 25432 BNE 0x2545a> {}
<POP 25434-25440 Naked> Σ0 ↓ →0x2545a
<MI 25434 MOVE.W 0x2eb00,D0> {}
<MI 2543a CMP.W 0x223a0,D0> {}
<MI 2543e BNE 0x2545a> {}
<POP 25440-2545a Naked> Σ0 ↓ →0x25578
<POP 25440-25442 StackAdj> Δ-2 {[-2-]}
<Blob 0x25442 [4] 0x2eaf2> Δ-4 {[-2-]|[«4»]}
<Blob 0x25448 [4] 0x2eaee> Δ-4 {[-2-]|[«4»]|[«4»]}
<Call 0x2544e 0x252e2> {[-2-]|[«4»]|[«4»]}
<POP 25452-25454 StackAdj> Δ+8 {[-2-]}
<MI 25454 TST.B (A7)+> Δ+2 {}
<MI 25456 BEQ 0x25578> {}
<POP 2545a-254be Naked> Σ0 ↓ →0x254e8 ←0x25428 ←0x25434
<MI 2545a LEA.L 0x2eaea,A0> {}
<MI 25460 LEA.L 0x22388,A1> {}
<BlockMove 37,A1,A0> {}
<MI 2546c CLR.W (A6-0x1c)> {}
<MI 2546e CLR.W (A6-0x1a)> {}
<MI 25472 MOVE.W #0x02,(A6-0x18)> {}
<MI 25476 CLR.W (A6-0x16)> {}
<MI 2547a CLR.W (A6-0x14)> {}
<MI 2547e MOVE.W 0x29710,D0> {}
<MI 25480 ASL.W #0x8,D0> {}
<MI 25482 ADDI.W #0x0013,D0> {}
<MI 25486 MOVE.W D0,(A6-0x12)> {}
<MI 2548a MOVE.W #0x3,(A6-0x10)> {}
<MI 25490 MOVE.W #0x24,(A6-0xe)> {}
<Pointer.fp 0x25496 <LVAR -0x01c @ 2(r)>> Δ-4 {[@@-28]}
<MI 25498 LEA.L 0x2eaea,A0> {[@@-28]}
<MI 2549e MOVE.L A0,-(A7)> Δ-4 {[@@-28]|[4, 'A0']}
<MI 254a0 CLR.W -(A7)> Δ-2 {[@@-28]|[4, 'A0']|[#0]}
<Call 0x254a2 0x10204> {[@@-28]|[4, 'A0']|[#0]}
KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
<POP 254a8-254aa StackAdj> Δ+8 {[-2-]}
<MI 254aa CLR.W (A7)> {[-2-]}
<Pointer.fp 0x254ac <LVAR -0x00c @ 1(r)>> Δ-4 {[-2-]|[@@-12]}
<Call 0x254b0 0x10206> {[-2-]|[@@-12]}
KC03_Wait_Disk_IO(a : W; VAR status : Byte)
<POP 254b6-254b8 StackAdj> Δ+6 {}
<MI 254b8 TST.B (A6-0xc)> {}
<MI 254bc BNE 0x254e8> {}
<POP 254be-254e8 Naked> Σ0 ↓
<Blob 0x254be [26] @> Δ-26 {[«26""»]}
<POP 254d0-254d2 StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x254d2 25> {[«26""»]|[$$MODE SELECT PAGE 3 FAILED]}
<Call 0x254e0 0x22522> {[«26""»]|[$$MODE SELECT PAGE 3 FAILED]}
<POP 254e4-254e8 StackAdj> Δ+30 {}
<POP 254e8-2554e Naked> Σ0 ↓ →0x25578 ←0x2545a
<MI 254e8 MOVEQ.L #0x01,D7> {}
<MI 254ea LEA.L 0x2eb0f,A0> {}
<MI 254f0 LEA.L 0x223ad,A1> {}
<BlockMove 35,A1,A0> {}
<MI 254fc CLR.W (A6-0x1c)> {}
<MI 254fe CLR.W (A6-0x1a)> {}
<MI 25502 MOVE.W #0x02,(A6-0x18)> {}
<MI 25506 CLR.W (A6-0x16)> {}
<MI 2550a CLR.W (A6-0x14)> {}
<MI 2550e MOVE.W 0x29710,D0> {}
<MI 25510 ASL.W #0x8,D0> {}
<MI 25512 ADDI.W #0x0013,D0> {}
<MI 25516 MOVE.W D0,(A6-0x12)> {}
<MI 2551a MOVE.W #0x4,(A6-0x10)> {}
<MI 25520 MOVE.W #0x20,(A6-0xe)> {}
<Pointer.fp 0x25526 <LVAR -0x01c @ 2(r)>> Δ-4 {[@@-28]}
<MI 25528 LEA.L 0x2eb0f,A0> {[@@-28]}
<MI 2552e MOVE.L A0,-(A7)> Δ-4 {[@@-28]|[4, 'A0']}
<MI 25530 CLR.W -(A7)> Δ-2 {[@@-28]|[4, 'A0']|[#0]}
<Call 0x25532 0x10204> {[@@-28]|[4, 'A0']|[#0]}
KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
<POP 25538-2553a StackAdj> Δ+8 {[-2-]}
<MI 2553a CLR.W (A7)> {[-2-]}
<Pointer.fp 0x2553c <LVAR -0x00c @ 1(r)>> Δ-4 {[-2-]|[@@-12]}
<Call 0x25540 0x10206> {[-2-]|[@@-12]}
KC03_Wait_Disk_IO(a : W; VAR status : Byte)
<POP 25546-25548 StackAdj> Δ+6 {}
<MI 25548 TST.B (A6-0xc)> {}
<MI 2554c BNE 0x25578> {}
<POP 2554e-25578 Naked> Σ0 ↓
<Blob 0x2554e [26] @> Δ-26 {[«26""»]}
<POP 25560-25562 StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x25562 25> {[«26""»]|[$$MODE SELECT PAGE 4 FAILED]}
<Call 0x25570 0x22522> {[«26""»]|[$$MODE SELECT PAGE 4 FAILED]}
<POP 25574-25578 StackAdj> Δ+30 {}
<POP 25578-255ca Naked> Σ0 ↓ →0x255d0 ←0x25440 ←0x254e8
<MI 25578 CLR.B 0x2db22> {}
<MI 2557e ANDI.B #0x7f,0x2db23> {}
<MI 25586 ANDI.B #0xbf,0x2db23> {}
<MI 2558e ANDI.B #0xdf,0x2db23> {}
<MI 25596 ANDI.B #0xef,0x2db23> {}
<MI 2559e CLR.W 0x2db24> {}
<MI 255a4 CLR.W (A6-0x1c)> {}
<MI 255a6 CLR.W (A6-0x1a)> {}
<MI 255aa MOVE.W #0x02,(A6-0x18)> {}
<MI 255ae CLR.W (A6-0x16)> {}
<MI 255b2 CLR.W (A6-0x14)> {}
<MI 255b6 MOVE.W 0x29710,D0> {}
<MI 255b8 ASL.W #0x8,D0> {}
<MI 255ba ADDI.W #0x000d,D0> {}
<MI 255be MOVE.W D0,(A6-0x12)> {}
<MI 255c2 TST.B 0x2eb32> {}
<MI 255c8 BEQ 0x255d0> {}
<POP 255ca-255d0 Naked> Σ0 →0x255dc ←0x255d4
<MI 255ca CLR.W (A6-0x10)> {}
<MI 255ce BRA 0x255dc> {}
<POP 255d0-255d4 Naked> Σ0 ↓ →0x255d6 ←0x25578
<MI 255d0 TST.B D7> {}
<MI 255d2 BEQ 0x255d6> {}
<POP 255d4-255d6 Naked> Σ0 →0x255ca
<MI 255d4 BRA 0x255ca> {}
<POP 255d6-255dc Naked> Σ0 ↓ ←0x255d0
<MI 255d6 MOVE.W #0x1500,(A6-0x10)> {}
<POP 255dc-255f2 Naked> Σ0 ↓ →0x25644 ←0x255ca
<MI 255dc CLR.W (A6-0xe)> {}
<MI 255e0 CLR.B 0x2db20> {}
<MI 255e6 MOVE.W 0x296fa,D0> {}
<MI 255ec SUBQ.W #0x1,D0> {}
<MI 255ee CMP.W #0x02,D0> {}
<MI 255f0 BHI 0x25644> {}
<POP 255f2-255fc Naked> Σ0 →0x25628 →0x25602 →0x25636
<MI 255f2 ADD.W D0,D0> {}
<MI 255f4 SWITCH D0.W> {}
<POP 25602-2560e Naked> Σ0 Δ-48 ↓ ←0x255f2
<Blob 0x25602 [48] @> Δ-48 {[«48""»]}
<POP 2560e-25628 Naked> Σ-48 Δ+48 →0x2566a ←0x25628 ←0x25636
<POP 2560e-25610 StackAdj> Δ-4 {[-52-]}
<Lit 0x25610> {[-48-]|[$$…]}
<Pointer.sp 0x25610 4> Δ-4
<Const 0x25614 0x1.2> Δ-2
<Const 0x25616 0x30.2> Δ-2
<Call 0x25618 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2561a-2561c StackAdj> Δ+8
<Call 0x2561c 0x103e0> {[-48-]|[$$…]}
WriteConsoleStringCrLf(str : String)
<POP 25622-25626 StackAdj> Δ+52 {}
<MI 25626 BRA 0x2566a> {}
<POP 25628-25636 Naked> Σ0 Δ-48 →0x2560e ←0x255f2
<Blob 0x25628 [48] @> Δ-48 {[«48""»]}
<MI 25634 BRA 0x2560e> {[«48""»]}
<POP 25636-25644 Naked> Σ0 Δ-48 →0x2560e ←0x255f2
<Blob 0x25636 [48] @> Δ-48 {[«48""»]}
<MI 25642 BRA 0x2560e> {[«48""»]}
<POP 25644-2566a Naked> Σ0 ↓ ←0x255dc
<Blob 0x25644 [46] @> Δ-46 {[«46""»]}
<POP 25650-25652 StackAdj> Δ-4 {[«46""»]|[-4-]}
<Lit 0x25652 46> {[«46""»]|[$$The format time for foreign drives is unknown.]}
<Call 0x25660 0x103e0> {[«46""»]|[$$The format time for foreign drives is unknown.]}
WriteConsoleStringCrLf(str : String)
<POP 25666-2566a StackAdj> Δ+50 {}
<POP 2566a-2566e Naked> Σ0 →0x2584c ←0x2560e
<MI 2566a BRA 0x2584c> {}
<POP 2566e-256ae Naked> Σ0 ↓ →0x25788 ←0x2539c
<MI 2566e CLR.W (A6-0x1c)> {}
<MI 25670 CLR.W (A6-0x1a)> {}
<MI 25674 MOVE.W #0x02,(A6-0x18)> {}
<MI 25678 CLR.W (A6-0x16)> {}
<MI 2567c CLR.W (A6-0x14)> {}
<MI 25680 MOVE.W 0x29710,D0> {}
<MI 25682 ASL.W #0x8,D0> {}
<MI 25684 ADDI.W #0x000d,D0> {}
<MI 25688 MOVE.W D0,(A6-0x12)> {}
<MI 2568c MOVE.L (A6-0xa),0x296de> {}
<MI 25694 MOVE.W 0x296e0,(A6-0x10)> {}
<MI 2569c CLR.W (A6-0xe)> {}
<POP 256a0-256a2 StackAdj> Δ-2 {[-2-]}
<Call 0x256a2 0x10610> {[-2-]}
Is_machine_type_one_or_three() : Bool
<MI 256a8 TST.B (A7)+> Δ+2 {}
<MI 256aa BEQ 0x25788> {}
<POP 256ae-256d4 Naked> Σ0 ↓ →0x256f2
<MI 256ae CLR.L D0> {}
<MI 256b0 MOVE.B 0x29714,D0> {}
<MI 256b6 MULU.W 0x29712,D0> {}
<MI 256bc MOVE.L D0,D4> {}
<MI 256be MOVEQ.L #0x1e,D3> {}
<Call 0x256c0 0x10298> {}
?divu_d3_d4
<MI 256c6 MOVEQ.L #0x3c,D3> {}
<Call 0x256c8 0x10298> {}
?divu_d3_d4
<MI 256ce MOVE.L D4,D6> {}
<MI 256d0 CMP.L #0x01,D6> {}
<MI 256d2 BGE 0x256f2> {}
<POP 256d4-256f2 Naked> Σ0 Δ-54 →0x25744
<Blob 0x256d4 [50] @> Δ-50 {[«50""»]}
<POP 256e0-256e2 StackAdj> Δ-4 {[«50""»]|[-4-]}
<Lit 0x256e2 50> {[«50""»]|[$$Formatting the drive will take less than 1 minute.]}
<MI 256f0 BRA 0x25744> {[«50""»]|[$$Formatting the drive will take less than 1 minute.]}
<POP 256f2-25744 Naked> Σ0 Δ-54 ↓ ←0x256ae
<Blob 0x256f2 [38] @> Δ-38 {[«38""»]}
<Blob 0x25704 [12] @> Δ-12 {[«38""»]|[«12""»]}
<POP 25716-25718 StackAdj> Δ-8 {[«38""»]|[«12""»]|[-8-]}
<Lit 0x25718 37> {[«38""»]|[«12""»]|[-4-]|[$$Formatting the drive will take about_]}
<MI 25724 MOVE.L D6,(A7)> {[«38""»]|[«12""»]|[-4-]|[4, 'D6']}
<POP 25722-25724 StackAdj> Δ-8 {[«38""»]|[«12""»]|[-4-]|[4, 'D6']|[-8-]}
<Call 0x25726 0x102e4> {[«38""»]|[«12""»]|[-4-]|[4, 'D6']|[-8-]}
Long2String(a : Long) : String
<Lit 0x2572c 11> {[«38""»]|[«12""»]|[-4-]|[4, 'D6']|[-4-]|[$$ minute(s).]}
<Call 0x2573a 0x102d4> {[«38""»]|[«12""»]|[-4-]|[4, 'D6']|[-4-]|[$$ minute(s).]}
StringCat3(a, b, c : String) : String
<POP 25740-25744 StackAdj> Δ+12 {[«38""»]|[«12""»]|[-4-]}
<POP 25744-25788 Naked> Σ-54 Δ+54 →0x2584c ←0x256d4
<Call 0x25744 0x103e0> {[-54-]}
WriteConsoleStringCrLf(str : String)
<POP 2574a-2574e StackAdj> Δ+54 {}
<Blob 0x2574e [56] @> Δ-56 {[«56""»]}
<POP 2575a-2575c StackAdj> Δ-6 {[«56""»]|[-6-]}
<Lit 0x2575c 56> {[«56""»]|[-2-]|[$$Do you wish to skip formatting the server disk partition]}
<POP 25768-2576a StackAdj> Δ-2 {[«56""»]|[-2-]|[$$Do you wish to skip formatting the server disk partition]|[-2-]}
<MI 2576a CLR.B (A7)> {[«56""»]|[-2-]|[$$Do you wish to skip formatting the server disk partition]|[-2-]}
<Call 0x2576c 0x103f0> {[«56""»]|[-2-]|[$$Do you wish to skip formatting the server disk partition]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 25772-25774 StackAdj> Δ+6 {[«56""»]|[-2-]}
<MI 25774 MOVE.B (A7)+,D0> Δ+2 {[«56""»]}
<MI 25776 EXTB.W D0> {[«56""»]}
<POP 0x25778 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«56""»]}
<POP 2577a-2577e StackAdj> Δ+56 {}
<MI 2577e MOVE.B D0,0x2db20> {}
<MI 25784 BRA 0x2584c> {}
<POP 25788-2579e Naked> Σ0 ↓ →0x25826 ←0x2566e
<MI 25788 CLR.B 0x2db20> {}
<MI 2578e MOVE.W 0x296fc,D0> {}
<MI 25794 SUBQ.W #0x1,D0> {}
<MI 25796 CMPI.W #0x0004,D0> {}
<MI 2579a BHI 0x25826> {}
<POP 2579e-257a8 Naked> Σ0 →0x257b2 →0x257de →0x257f0 →0x25802 →0x25814
<MI 2579e ADD.W D0,D0> {}
<MI 257a0 SWITCH D0.W> {}
<POP 257b2-257c2 Naked> Σ0 Δ-48 ↓ ←0x2579e
<Blob 0x257b2 [48] @> Δ-48 {[«48""»]}
<POP 257c2-257de Naked> Σ-48 Δ+48 →0x2584c ←0x257de ←0x257f0 ←0x25802 ←0x25814
<POP 257c2-257c4 StackAdj> Δ-4 {[-52-]}
<Lit 0x257c4> {[-48-]|[$$…]}
<Pointer.sp 0x257c4 4> Δ-4
<Const 0x257c8 0x1.2> Δ-2
<Const 0x257ca 0x2f.2> Δ-2
<Call 0x257ce 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 257d0-257d2 StackAdj> Δ+8
<Call 0x257d2 0x103e0> {[-48-]|[$$…]}
WriteConsoleStringCrLf(str : String)
<POP 257d8-257dc StackAdj> Δ+52 {}
<MI 257dc BRA 0x2584c> {}
<POP 257de-257f0 Naked> Σ0 Δ-48 →0x257c2 ←0x2579e
<Blob 0x257de [48] @> Δ-48 {[«48""»]}
<MI 257ee BRA 0x257c2> {[«48""»]}
<POP 257f0-25802 Naked> Σ0 Δ-48 →0x257c2 ←0x2579e
<Blob 0x257f0 [48] @> Δ-48 {[«48""»]}
<MI 25800 BRA 0x257c2> {[«48""»]}
<POP 25802-25814 Naked> Σ0 Δ-48 →0x257c2 ←0x2579e
<Blob 0x25802 [48] @> Δ-48 {[«48""»]}
<MI 25812 BRA 0x257c2> {[«48""»]}
<POP 25814-25826 Naked> Σ0 Δ-48 →0x257c2 ←0x2579e
<Blob 0x25814 [48] @> Δ-48 {[«48""»]}
<MI 25824 BRA 0x257c2> {[«48""»]}
<POP 25826-2584c Naked> Σ0 ↓ ←0x25788
<Blob 0x25826 [46] @> Δ-46 {[«46""»]}
<POP 25832-25834 StackAdj> Δ-4 {[«46""»]|[-4-]}
<Lit 0x25834 46> {[«46""»]|[$$The format time for foreign drives is unknown.]}
<Call 0x25842 0x103e0> {[«46""»]|[$$The format time for foreign drives is unknown.]}
WriteConsoleStringCrLf(str : String)
<POP 25848-2584c StackAdj> Δ+50 {}
<POP 2584c-25854 Naked> Σ0 ↓ →0x258b4 ←0x2566a ←0x25744 ←0x257c2
<MI 2584c TST.B 0x2db20> {}
<MI 25852 BNE 0x258b4> {}
<POP 25854-25890 Naked> Σ0 ↓ →0x258b4
<Pointer.fp 0x25854 <LVAR -0x01c @ 2(r)>> Δ-4 {[@@-28]}
<Const 0x25856 0x0.4> Δ-4 {[@@-28]|[##0]}
<MI 2585a CLR.W -(A7)> Δ-2 {[@@-28]|[##0]|[#0]}
<Call 0x2585c 0x10204> {[@@-28]|[##0]|[#0]}
KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
<POP 25862-25864 StackAdj> Δ+8 {[-2-]}
<MI 25864 CLR.W (A7)> {[-2-]}
<Pointer.fp 0x25866 <LVAR -0x00c @ 1(r)>> Δ-4 {[-2-]|[@@-12]}
<Call 0x2586a 0x10206> {[-2-]|[@@-12]}
KC03_Wait_Disk_IO(a : W; VAR status : Byte)
<POP 25870-25872 StackAdj> Δ+6 {}
<Pointer.fp 0x25872 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x25876 0x10304> {[@@-6]}
GetRtc() : TimeStamp
<MI 2587c MOVE.L (A6-0xa),(A7)> {[4, '(A6-0xa)']}
<MI 25880 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0xa)']|[4, '(A6-0x6)']}
<Call 0x25884 0x22b48> {[4, '(A6-0xa)']|[4, '(A6-0x6)']}
<POP 25888-2588a StackAdj> Δ+8 {}
<MI 2588a TST.B (A6-0xc)> {}
<MI 2588e BNE 0x258b4> {}
<POP 25890-258b4 Naked> Σ0 ↓
<Blob 0x25890 [14] @> Δ-14 {[«14""»]}
<POP 2589c-2589e StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x2589e 14> {[«14""»]|[$$Format failed!]}
<Call 0x258ac 0x22522> {[«14""»]|[$$Format failed!]}
<POP 258b0-258b4 StackAdj> Δ+18 {}
<POP 258b4-258c0 Naked> Σ0 ↓ →0x258fc ←0x25364 ←0x2584c ←0x25854
<POP 258b4-258b6 StackAdj> Δ-2 {[-2-]}
<Call 0x258b6 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 258bc TST.B (A7)+> Δ+2 {}
<MI 258be BEQ 0x258fc> {}
<POP 258c0-258f6 Naked> Σ0 ↓ →0x258fa
<MI 258c0 MOVE.W 0x29710,D0> {}
<MI 258c2 ASL.W #0x8,D0> {}
<MI 258c4 ADDI.W #0x0009,D0> {}
<MI 258c8 MOVE.W D0,(A6-0x12)> {}
<Pointer.fp 0x258cc <LVAR -0x01c @ 2(r)>> Δ-4 {[@@-28]}
<Const 0x258ce 0x0.4> Δ-4 {[@@-28]|[##0]}
<MI 258d2 CLR.W -(A7)> Δ-2 {[@@-28]|[##0]|[#0]}
<Call 0x258d4 0x10204> {[@@-28]|[##0]|[#0]}
KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
<POP 258da-258dc StackAdj> Δ+8 {[-2-]}
<MI 258dc CLR.W (A7)> {[-2-]}
<Pointer.fp 0x258de <LVAR -0x00c @ 1(r)>> Δ-4 {[-2-]|[@@-12]}
<Call 0x258e2 0x10206> {[-2-]|[@@-12]}
KC03_Wait_Disk_IO(a : W; VAR status : Byte)
<POP 258e8-258ea StackAdj> Δ+6 {}
<MI 258ea MOVE.W 0x296fa,D0> {}
<MI 258f0 CMPI.W #0x0003,D0> {}
<MI 258f4 BEQ 0x258fa> {}
<POP 258f6-258fa Naked> Σ0 ↓
<Call 0x258f6 0x24f08> {}
<POP 258fa-258fc Naked> Σ0 →0x25900 ←0x258c0
<MI 258fa BRA 0x25900> {}
<POP 258fc-25900 Naked> Σ0 ↓ ←0x258b4
<Call 0x258fc 0x24f08> {}
<POP 25900-25908 Epilogue> Σ0 ←0x258fa
@ 25908
<LVAR 0x028 4(r)>
<LVAR 0x024 4(r)>
<LVAR 0x020 4(r)>
<LVAR 0x01e 1(r)>
<POP 25908-25b1c Body> Δ+34
<POP 25908-2591e Prologue> Σ0 ↓
<POP 2591e-2593c RegCacheLoad> Σ0 ↓
<POP 2593c-25948 Naked> Σ0 ↓ →0x25994
<MI 2593c MOVEQ.L #0x00,D7> {}
<MI 2593e MOVEQ.L #0x00,D6> {}
<MI 25940 MOVE.L (A6+0x28),D0> {}
<MI 25942 OR.L (A6+0x24),D0> {}
<MI 25944 OR.L (A6+0x20),D0> {}
<MI 25946 BEQ 0x25994> {}
<POP 25948-2596a Naked> Σ0 ↓ →0x2598a ←0x25990
<POP 0x25948 LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {}
<MI 2594e MOVE.L D7,D0> {}
<MI 25950 ASL.L #0x2,D0> {}
<MI 25952 LEA.L 0x296d2,A0> {}
<MI 25958 LEA.L (A0+D0.L),A0> {}
<MI 2595c CLR.L D0> {}
<MI 2595e MOVE.W (A0+0x44c),D0> {}
<MI 25962 LSL.W #0x2,D0> {}
<MI 25964 LSR.W #0x2,D0> {}
<MI 25966 CMP.L (A6+0x28),D0> {}
<MI 25968 BNE 0x2598a> {}
<POP 2596a-25974 Naked> Σ0 ↓ →0x2598a
<MI 2596a CLR.L D0> {}
<MI 2596c MOVE.B (A0+0x44e),D0> {}
<MI 25970 CMP.L (A6+0x24),D0> {}
<MI 25972 BNE 0x2598a> {}
<POP 25974-2597e Naked> Σ0 ↓ →0x25988
<MI 25974 CLR.L D0> {}
<MI 25976 MOVE.B (A0+0x44f),D0> {}
<MI 2597a CMP.L (A6+0x20),D0> {}
<MI 2597c BEQ 0x25988> {}
<POP 2597e-25988 Naked> Σ0 ↓ →0x2598a
<MI 2597e CLR.L D0> {}
<MI 25980 MOVE.B (A0+0x44f),D0> {}
<MI 25984 CMP.W #0xff,D0> {}
<MI 25986 BNE 0x2598a> {}
<POP 25988-2598a Naked> Σ0 ↓ ←0x25974
<MI 25988 MOVEQ.L #0x01,D6> {}
<POP 2598a-25990 Naked> Σ0 ↓ →0x25994 ←0x25948 ←0x2596a ←0x2597e
<MI 2598a ADDQ.L #0x1,D7> {}
<MI 2598c TST.B D6> {}
<MI 2598e BNE 0x25994> {}
<POP 25990-25994 Naked> Σ0 ↓ →0x25948
<MI 25990 CMP.L #0x7ff,D7> {}
<MI 25992 BLE 0x25948> {}
<POP 25994-25998 Naked> Σ0 ↓ →0x259d4 ←0x2593c ←0x2598a
<MI 25994 TST.B D6> {}
<MI 25996 BEQ 0x259d4> {}
<POP 25998-2599e Naked> Σ0 ↓ →0x259d0
<MI 25998 TST.B (A6+0x1e)> {}
<MI 2599c BEQ 0x259d0> {}
<POP 2599e-259ce Naked> Σ0 Δ-34 ↓
<Blob 0x2599e [34] @> Δ-34 {[«34""»]}
<POP 259ae-259b0 StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x259b0 33> {[«34""»]|[$$Previously detected bad block at_]}
<POP 259be-259c0 StackAdj> Δ-4 {[«34""»]|[$$Previously detected bad block at_]|[-4-]}
<MI 259c0 MOVE.L (A6+0x28),(A7)> {[«34""»]|[$$Previously detected bad block at_]|[4, '(A6+0x28)']}
<MI 259c2 MOVE.L (A6+0x24),-(A7)> Δ-4 {[«34""»]|[$$Previously detected bad block at_]|[4, '(A6+0x28)']|[4, '(A6+0x24)']}
<MI 259c4 MOVE.L (A6+0x20),-(A7)> Δ-4 {[«34""»]|[$$Previously detected bad block at_]|[4, '(A6+0x28)']|[4, '(A6+0x24)']|[4, '(A6+0x20)']}
<Call 0x259c6 0x24abc> {[«34""»]|[$$Previously detected bad block at_]|[4, '(A6+0x28)']|[4, '(A6+0x24)']|[4, '(A6+0x20)']}
<POP 259ca-259ce StackAdj> Δ+16 {[«34""»]}
<POP 259ce-259d0 Naked> Σ-34 Δ+34 ↓ ←0x25a8c
<POP 259ce-259d0 StackAdj> Δ+34 {}
<POP 259d0-259d4 Naked> Σ0 →0x25b14 ←0x25998
<MI 259d0 BRA 0x25b14> {}
<POP 259d4-25a1a Naked> Σ0 ↓ ←0x25994
<Blob 0x259d4 [22] (A6+0x1e)> Δ-22 {[«22»]}
<Call 0x259e0 0x24274> {[«22»]}
<POP 259e4-259e5 StackAdj> Δ+22 ↓ {}
<Blob 0x259e5 [36] @> Δ-36 {[«36""»]}
<POP 259f6-259f8 StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x259f8 35> {[«36""»]|[$$Previously undetected bad block at_]}
<POP 25a08-25a0a StackAdj> Δ-4 {[«36""»]|[$$Previously undetected bad block at_]|[-4-]}
<MI 25a0a MOVE.L (A6+0x28),(A7)> {[«36""»]|[$$Previously undetected bad block at_]|[4, '(A6+0x28)']}
<MI 25a0c MOVE.L (A6+0x24),-(A7)> Δ-4 {[«36""»]|[$$Previously undetected bad block at_]|[4, '(A6+0x28)']|[4, '(A6+0x24)']}
<MI 25a0e MOVE.L (A6+0x20),-(A7)> Δ-4 {[«36""»]|[$$Previously undetected bad block at_]|[4, '(A6+0x28)']|[4, '(A6+0x24)']|[4, '(A6+0x20)']}
<Call 0x25a10 0x24abc> {[«36""»]|[$$Previously undetected bad block at_]|[4, '(A6+0x28)']|[4, '(A6+0x24)']|[4, '(A6+0x20)']}
<POP 25a14-25a18 StackAdj> Δ+52 {}
<MI 25a18 MOVEQ.L #0x00,D7> {}
<POP 25a1a-25a38 Naked> Σ0 ↓ →0x25a48 ←0x25a4e
<POP 0x25a1a LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {}
<MI 25a20 MOVE.L D7,D0> {}
<MI 25a22 ASL.L #0x2,D0> {}
<MI 25a24 LEA.L 0x296d2,A0> {}
<MI 25a2a LEA.L (A0+D0.L),A0> {}
<MI 25a2e MOVE.W (A0+0x44c),D0> {}
<MI 25a32 LSL.W #0x2,D0> {}
<MI 25a34 LSR.W #0x2,D0> {}
<MI 25a36 BNE 0x25a48> {}
<POP 25a38-25a3e Naked> Σ0 ↓ →0x25a48
<MI 25a38 TST.B (A0+0x44e)> {}
<MI 25a3c BNE 0x25a48> {}
<POP 25a3e-25a44 Naked> Σ0 ↓ →0x25a48
<MI 25a3e TST.B (A0+0x44f)> {}
<MI 25a42 BNE 0x25a48> {}
<POP 25a44-25a48 Naked> Σ0 →0x25a4a
<MI 25a44 MOVEQ.L #0x01,D6> {}
<MI 25a46 BRA 0x25a4a> {}
<POP 25a48-25a4a Naked> Σ0 ↓ ←0x25a1a ←0x25a38 ←0x25a3e
<MI 25a48 ADDQ.L #0x1,D7> {}
<POP 25a4a-25a4e Naked> Σ0 ↓ →0x25a52 ←0x25a44
<MI 25a4a TST.B D6> {}
<MI 25a4c BNE 0x25a52> {}
<POP 25a4e-25a52 Naked> Σ0 ↓ →0x25a1a
<MI 25a4e CMP.L #0x7ff,D7> {}
<MI 25a50 BLE 0x25a1a> {}
<POP 25a52-25a56 Naked> Σ0 ↓ →0x25a88 ←0x25a4a
<MI 25a52 TST.L (A6+0x28)> {}
<MI 25a54 BNE 0x25a88> {}
<POP 25a56-25a5a Naked> Σ0 ↓ →0x25a88
<MI 25a56 TST.L (A6+0x24)> {}
<MI 25a58 BNE 0x25a88> {}
<POP 25a5a-25a88 Naked> Σ0 ↓
<Blob 0x25a5a [52] @> Δ-52 {[«52""»]}
<POP 25a6c-25a6e StackAdj> Δ-4 {[«52""»]|[-4-]}
<Lit 0x25a6e 51> {[«52""»]|[$$Disk error on cylinder zero, track zero. Aborting!]}
<Call 0x25a80 0x22522> {[«52""»]|[$$Disk error on cylinder zero, track zero. Aborting!]}
<POP 25a84-25a88 StackAdj> Δ+56 {}
<POP 25a88-25a8c Naked> Σ0 ↓ →0x25ab8 ←0x25a52 ←0x25a56
<MI 25a88 TST.B D6> {}
<MI 25a8a BNE 0x25ab8> {}
<POP 25a8c-25ab8 Naked> Σ0 Δ-34 →0x259ce
<Blob 0x25a8c [34] @> Δ-34 {[«34""»]}
<POP 25a9c-25a9e StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x25a9e 33> {[«34""»]|[$$Bad block file is full, aborting!]}
<Call 0x25aae 0x22522> {[«34""»]|[$$Bad block file is full, aborting!]}
<POP 25ab2-25ab4 StackAdj> Δ+4 {[«34""»]}
<MI 25ab4 BRA 0x259ce> {[«34""»]}
<POP 25ab8-25b14 Naked> Σ0 ↓ ←0x25a88
<POP 0x25ab8 LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {}
<MI 25abe MOVE.L D7,D0> {}
<MI 25ac0 ASL.L #0x2,D0> {}
<MI 25ac2 LEA.L 0x296d2,A0> {}
<MI 25ac8 LEA.L (A0+D0.L),A0> {}
<MI 25acc MOVE.L (A6+0x28),D0> {}
<POP 0x25ace LimitCheck 0x0 ≤ D0 ≤ 0x3fff> {}
<MI 25ad8 ANDI.W #0xc000,(A0+0x44c)> {}
<MI 25ade OR.W D0,(A0+0x44c)> {}
<MI 25ae2 MOVE.L (A6+0x24),D0> {}
<POP 0x25ae4 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 25aea MOVE.B D0,(A0+0x44e)> {}
<MI 25aee MOVE.L (A6+0x20),D0> {}
<POP 0x25af0 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 25af6 MOVE.B D0,(A0+0x44f)> {}
<MI 25afa ORI.B #0x40,(A0+0x44c)> {}
<MI 25b00 ORI.B #0x80,(A0+0x44c)> {}
<MI 25b06 MOVE.L (A6+0x28),-(A7)> Δ-4 {[4, '(A6+0x28)']}
<MI 25b08 MOVE.L (A6+0x24),-(A7)> Δ-4 {[4, '(A6+0x28)']|[4, '(A6+0x24)']}
<MI 25b0a MOVE.L (A6+0x20),-(A7)> Δ-4 {[4, '(A6+0x28)']|[4, '(A6+0x24)']|[4, '(A6+0x20)']}
<Call 0x25b0c 0x24e10> {[4, '(A6+0x28)']|[4, '(A6+0x24)']|[4, '(A6+0x20)']}
<POP 25b10-25b14 StackAdj> Δ+12 {}
<POP 25b14-25b1c Epilogue> Σ0 ←0x259d0
@ 25b1c
<LVAR 0x018 4(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 25b1c-25c2a Body>
<POP 25b1c-25b32 Prologue> Σ0 ↓
<POP 25b32-25b44 RegCacheLoad> Σ0 ↓
<POP 25b44-25b5a Naked> Σ0 Δ-8 ↓ →0x25b84
<MI 25b44 MOVEA.L (A6+0x8),A0> {}
<MI 25b48 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 25b4a CLR.B (A0)> {[4, 'A0']}
<MI 25b4c MOVEA.L (A6+0x10),A1> {[4, 'A0']}
<MI 25b50 MOVE.L A1,-(A7)> Δ-4 {[4, 'A0']|[4, 'A1']}
<MI 25b52 CLR.L D0> {[4, 'A0']|[4, 'A1']}
<MI 25b54 MOVE.B 0x29715,D0> {[4, 'A0']|[4, 'A1']}
<MI 25b56 CMP.L (A1),D0> {[4, 'A0']|[4, 'A1']}
<MI 25b58 BHI 0x25b84> {[4, 'A0']|[4, 'A1']}
<POP 25b5a-25b74 Naked> Σ-8 ↓ →0x25b84
<MI 25b5a MOVEA.L (A6+0x14),A0> {[-8-]}
<MI 25b5e MOVE.L (A1),D4> {[-8-]}
<MI 25b60 MOVE.L D0,D3> {[-8-]}
<Call 0x25b62 0x10294> {[-8-]}
?divs_d3_d4
<MI 25b68 ADD.L D4,(A0)> {[-8-]}
<MI 25b6a MOVE.L D3,(A1)> {[-8-]}
<MI 25b6c CLR.L D0> {[-8-]}
<MI 25b6e MOVE.B 0x29714,D0> {[-8-]}
<MI 25b70 CMP.L (A0),D0> {[-8-]}
<MI 25b72 BHI 0x25b84> {[-8-]}
<POP 25b74-25b84 Naked> Σ-8 ↓
<MI 25b74 MOVEA.L (A6+0x18),A1> {[-8-]}
<MI 25b76 MOVE.L (A0),D4> {[-8-]}
<MI 25b78 MOVE.L D0,D3> {[-8-]}
<Call 0x25b7a 0x10294> {[-8-]}
?divs_d3_d4
<MI 25b80 ADD.L D4,(A1)> {[-8-]}
<MI 25b82 MOVE.L D3,(A0)> {[-8-]}
<POP 25b84-25b90 Naked> Σ-8 ↓ →0x25bb4 ←0x25b44 ←0x25b5a
<POP 25b84-25b86 StackAdj> Δ-2 {[-10-]}
<Call 0x25b86 0x10610> {[-10-]}
Is_machine_type_one_or_three() : Bool
<MI 25b8c TST.B (A7)+> Δ+2 {[-8-]}
<MI 25b8e BEQ 0x25bb4> {[-8-]}
<POP 25b90-25baa Naked> Σ-8 ↓ →0x25bac
<MI 25b90 MOVEA.L (A6+0xc),A0> {[-8-]}
<MI 25b94 MOVE.L #0x01,(A0)> {[-8-]}
<MI 25b96 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 25b9a CLR.B (A0)> {[-8-]}
<MI 25b9c MOVEA.L (A6+0x18),A1> {[-8-]}
<MI 25b9e CLR.L D0> {[-8-]}
<MI 25ba0 MOVE.W 0x29712,D0> {[-8-]}
<MI 25ba6 CMP.L (A1),D0> {[-8-]}
<MI 25ba8 BNE 0x25bac> {[-8-]}
<POP 25baa-25bac Naked> Σ-8 ↓
<MI 25baa ADDQ.B #0x1,(A0)> {[-8-]}
<POP 25bac-25bb4 Naked> Σ-8 →0x25c20 ←0x25b90
<MI 25bac MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 25bb0 MOVE.B (A0),(A1)> {[-8-]}
<MI 25bb2 BRA 0x25c20> {[-8-]}
<POP 25bb4-25bc6 Naked> Σ-8 ↓ →0x25bd2 ←0x25b84
<MI 25bb4 MOVEA.L (A6+0x18),A0> {[-8-]}
<MI 25bb6 MOVE.L (A0),D0> {[-8-]}
<MI 25bb8 ADDQ.L #0x1,D0> {[-8-]}
<MI 25bba CLR.L D1> {[-8-]}
<MI 25bbc MOVE.W 0x29712,D1> {[-8-]}
<MI 25bc2 CMP.L D1,D0> {[-8-]}
<MI 25bc4 BCC 0x25bd2> {[-8-]}
<POP 25bc6-25bd2 Naked> Σ-8 →0x25c20 ←0x25c18
<MI 25bc6 MOVEA.L (A6+0xc),A0> {[-8-]}
<MI 25bca MOVE.L #0x80,(A0)> {[-8-]}
<MI 25bd0 BRA 0x25c20> {[-8-]}
<POP 25bd2-25bd6 Naked> Σ-8 ↓ →0x25bde ←0x25bb4
<MI 25bd2 CMP.L (A0),D1> {[-8-]}
<MI 25bd4 BNE 0x25bde> {[-8-]}
<POP 25bd6-25bde Naked> Σ-8 →0x25c20
<MI 25bd6 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 25bda MOVE.B #0x01,(A0)> {[-8-]}
<MI 25bdc BRA 0x25c20> {[-8-]}
<POP 25bde-25c18 Naked> Σ-8 ↓ →0x25c1a ←0x25bd2
<MI 25bde MOVEA.L (A6+0x14),A0> {[-8-]}
<MI 25be2 CLR.L D0> {[-8-]}
<MI 25be4 MOVE.B 0x29714,D0> {[-8-]}
<MI 25be6 SUB.L (A0),D0> {[-8-]}
<MI 25be8 SUBQ.L #0x1,D0> {[-8-]}
<MI 25bea MOVE.L D0,D4> {[-8-]}
<MI 25bec CLR.L D3> {[-8-]}
<MI 25bee MOVE.B 0x29715,D3> {[-8-]}
<MI 25bf0 MOVE.L D3,-(A7)> Δ-4 {[-8-]|[4, 'D3']}
<Call 0x25bf2 0x10290> {[-8-]|[4, 'D3']}
?mulu_d3_d4
<MI 25bf8 MOVE.L (A7),D0> {[-8-]|[4, 'D3']}
<MI 25bfa MOVEA.L (A7+0x4),A0> {[-8-]|[4, 'D3']}
<MI 25bfe SUB.L (A0),D0> {[-8-]|[4, 'D3']}
<MI 25c00 ADD.L D4,D0> {[-8-]|[4, 'D3']}
<POP 25c02-25c04 StackAdj> Δ+4 {[-8-]}
<MI 25c04 MOVE.L D0,D4> {[-8-]}
<MI 25c06 MOVEQ.L #0x02,D3> {[-8-]}
<Call 0x25c08 0x10298> {[-8-]}
?divu_d3_d4
<MI 25c0e MOVE.L D4,D7> {[-8-]}
<MI 25c10 CMPI.L #0x00000080,D7> {[-8-]}
<MI 25c16 BLT 0x25c1a> {[-8-]}
<POP 25c18-25c1a Naked> Σ-8 →0x25bc6
<MI 25c18 BRA 0x25bc6> {[-8-]}
<POP 25c1a-25c20 Naked> Σ-8 ↓ ←0x25bde
<MI 25c1a MOVEA.L (A6+0xc),A0> {[-8-]}
<MI 25c1e MOVE.L D7,(A0)> {[-8-]}
<POP 25c20-25c22 Naked> Σ-8 Δ+8 ↓ ←0x25bac ←0x25bc6 ←0x25bd6
<POP 25c20-25c22 StackAdj> Δ+8 {}
<POP 25c22-25c2a Epilogue> Σ0
@ 25c2a
<LVAR 0x00c @>
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x00a @ 4(rw)>
<LVAR -0x00e @ 4(rw)>
<LVAR -0x010 @ 1(r)>
<LVAR -0x016 2(r)>
<LVAR -0x018 2(r)>
<LVAR -0x026 @>
<LVAR -0x028 @ 1(r)>
<LVAR -0x02a 2(w)>
<LVAR -0x02c 2(w)>
<LVAR -0x02e 2(w)>
<LVAR -0x030 2(r)>
<LVAR -0x032 2(r)>
<LVAR -0x034 2(w)>
<LVAR -0x036 2(r)>
<LVAR -0x038 @ 2(w)>
<LVAR -0x03e @ 4(rw)>
<LVAR -0x042 @ 4(rw)>
<LVAR -0x046 @ 4(rw)>
<POP 25c2a-2619a Body>
<POP 25c2a-25c40 Prologue> Σ0 ↓
<POP 25c40-25c4c RegCacheLoad> Σ0 ↓
<POP 25c4c-25c62 Naked> Σ0 ↓ →0x25c6c
<MI 25c4c MOVEQ.L #-0x01,D7> {}
<MI 25c4e CLR.L (A6-0x46)> {}
<MI 25c50 CLR.L (A6-0x42)> {}
<MI 25c54 CLR.L (A6-0x3e)> {}
<POP 25c56-25c58 StackAdj> Δ-2 {[-2-]}
<Call 0x25c58 0x10610> {[-2-]}
Is_machine_type_one_or_three() : Bool
<MI 25c5e TST.B (A7)+> Δ+2 {}
<MI 25c60 BEQ 0x25c6c> {}
<POP 25c62-25c6c Naked> Σ0 →0x25c74
<MI 25c62 MOVE.L #0x1,(A6-0xe)> {}
<MI 25c6a BRA 0x25c74> {}
<POP 25c6c-25c74 Naked> Σ0 ↓ ←0x25c4c
<MI 25c6c MOVE.L #0x80,(A6-0xe)> {}
<POP 25c74-25c9a Naked> Σ0 ↓ ←0x25c62
<MI 25c74 CLR.W (A6-0x36)> {}
<MI 25c78 MOVE.W #0x2,(A6-0x34)> {}
<MI 25c7e CLR.W (A6-0x32)> {}
<MI 25c82 CLR.W (A6-0x30)> {}
<MI 25c86 MOVE.W 0x29710,D0> {}
<MI 25c8c ASL.W #0x8,D0> {}
<MI 25c8e MOVE.B (A6+0xa),D1> {}
<MI 25c92 EXTB.W D1> {}
<MI 25c94 ADD.W D0,D1> {}
<MI 25c96 MOVE.W D1,(A6-0x2e)> {}
<POP 25c9a-25d0a Naked> Σ0 Δ-8 ↓ →0x25d28 ←0x2618a
<MI 25c9a MOVE.L (A6-0xe),D0> {}
<MI 25c9e ASL.L #0x8,D0> {}
<POP 0x25ca0 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 25caa MOVE.W D0,(A6-0x38)> {}
<MI 25cae MOVE.L (A6-0x46),D0> {}
<POP 0x25cb0 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 25cba MOVE.W D0,(A6-0x2c)> {}
<MI 25cbe MOVE.L (A6-0x42),D0> {}
<MI 25cc2 ASL.L #0x8,D0> {}
<MI 25cc4 ADD.L (A6-0x3e),D0> {}
<POP 0x25cc6 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 25cd0 MOVE.W D0,(A6-0x2a)> {}
<MI 25cd4 MOVE.L (A6-0x42),D4> {}
<MI 25cd8 CLR.L D3> {}
<MI 25cda MOVE.B 0x29715,D3> {}
<MI 25ce0 MOVE.L D3,-(A7)> Δ-4 {[4, 'D3']}
<Call 0x25ce2 0x10290> {[4, 'D3']}
?mulu_d3_d4
<MI 25ce8 MOVE.L D4,-(A7)> Δ-4 {[4, 'D3']|[4, 'D4']}
<MI 25cea CLR.L D4> {[4, 'D3']|[4, 'D4']}
<MI 25cec MOVE.B 0x29714,D4> {[4, 'D3']|[4, 'D4']}
<MI 25cf2 MOVE.L (A7+0x4),D0> {[4, 'D3']|[4, 'D4']}
<MI 25cf6 MOVE.L D0,D3> {[4, 'D3']|[4, 'D4']}
<Call 0x25cf8 0x10290> {[4, 'D3']|[4, 'D4']}
?mulu_d3_d4
<MI 25cfe CLR.L D0> {[4, 'D3']|[4, 'D4']}
<MI 25d00 MOVE.W 0x29712,D0> {[4, 'D3']|[4, 'D4']}
<MI 25d06 CMP.L (A6-0x46),D0> {[4, 'D3']|[4, 'D4']}
<MI 25d08 BLS 0x25d28> {[4, 'D3']|[4, 'D4']}
<POP 25d0a-25d12 Naked> Σ-8 ↓ →0x25e62
<MI 25d0a SUBQ.L #0x1,D0> {[-8-]}
<MI 25d0c CMP.L (A6-0x46),D0> {[-8-]}
<MI 25d0e BNE 0x25e62> {[-8-]}
<POP 25d12-25d28 Naked> Σ-8 ↓ →0x25e62
<MI 25d12 MOVE.L (A7),D0> {[-8-]}
<MI 25d14 ADD.L (A6-0x3e),D0> {[-8-]}
<MI 25d16 MOVE.L (A6-0xe),D1> {[-8-]}
<MI 25d1a ASL.L #0x1,D1> {[-8-]}
<MI 25d1c ADD.L D0,D1> {[-8-]}
<MI 25d1e CLR.L D0> {[-8-]}
<MI 25d20 MOVE.W D4,D0> {[-8-]}
<MI 25d22 CMP.L D0,D1> {[-8-]}
<MI 25d24 BLS 0x25e62> {[-8-]}
<POP 25d28-25e62 Naked> Σ-8 ↓ ←0x25c9a
<Pointer.fp 0x25d28 <LVAR -0x00a @ 4(rw)>> Δ-4 {[-8-]|[@@-10]}
<Call 0x25d2a 0x102b8> {[-8-]|[@@-10]}
NewString(VAR a : String)
<POP 25d30-25d31 StackAdj> Δ+4 ↓ {[-8-]}
<Blob 0x25d31 [10] @> Δ-10 {[-8-]|[«10""»]}
<POP 25d40-25d42 StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]}
<MI 25d42 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']}
<POP 25d44-25d46 StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[-4-]}
<Lit 0x25d46 9> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[$$Cylinder=]}
<MI 25d58 MOVE.L (A6-0x46),(A7)> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x46)']}
<POP 25d52-25d58 StackAdj> Δ-8 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x46)']|[-8-]}
<Call 0x25d5a 0x102e4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x46)']|[-8-]}
Long2String(a : Long) : String
<POP 25d60-25d62 StackAdj> Δ+4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x46)']|[-4-]}
<Call 0x25d62 0x102d4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x46)']|[-4-]}
StringCat3(a, b, c : String) : String
<POP 25d68-25d6c StackAdj> Δ+12 {[-8-]|[«10""»]|[-4-]}
<MI 25d6c MOVE.L (A7)+,(A6-0xa)> Δ+4 {[-8-]|[«10""»]}
<MI 25d6e MOVEA.L A7,A0> {[-8-]|[«10""»]}
<MI 25d70 LEA.L 0x21116,A1> {[-8-]|[«10""»]}
<BlockMove 9,A1,A0> {[-8-]|[«10""»]}
<POP 25d7c-25d7e StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]}
<MI 25d7e MOVE.L (A6-0xa),-(A7)> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']}
<POP 25d80-25d82 StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[-4-]}
<Lit 0x25d82 9> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[$$Cylinder=]}
<MI 25d94 MOVE.L (A6-0x42),(A7)> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x42)']}
<POP 25d8e-25d94 StackAdj> Δ-8 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x42)']|[-8-]}
<Call 0x25d98 0x102e4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x42)']|[-8-]}
Long2String(a : Long) : String
<POP 25d9e-25da0 StackAdj> Δ+4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x42)']|[-4-]}
<Call 0x25da0 0x102d4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x42)']|[-4-]}
StringCat3(a, b, c : String) : String
<POP 25da6-25daa StackAdj> Δ+12 {[-8-]|[«10""»]|[-4-]}
<MI 25daa MOVE.L (A7)+,(A6-0xa)> Δ+4 {[-8-]|[«10""»]}
<POP 25dac-25db0 StackAdj> Δ+10 {[-8-]}
<Blob 0x25db0 [10] @> Δ-10 {[-8-]|[«10""»]}
<POP 25dbc-25dbe StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]}
<MI 25dbe MOVE.L (A6-0xa),-(A7)> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']}
<POP 25dc0-25dc2 StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[-4-]}
<Lit 0x25dc2 10> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[$$, Sector=]}
<MI 25dd4 MOVE.L (A6-0x3e),(A7)> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x3e)']}
<POP 25dce-25dd4 StackAdj> Δ-8 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x3e)']|[-8-]}
<Call 0x25dd6 0x102e4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x3e)']|[-8-]}
Long2String(a : Long) : String
<POP 25ddc-25dde StackAdj> Δ+4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x3e)']|[-4-]}
<Call 0x25dde 0x102d4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x3e)']|[-4-]}
StringCat3(a, b, c : String) : String
<POP 25de4-25de8 StackAdj> Δ+12 {[-8-]|[«10""»]|[-4-]}
<MI 25de8 MOVE.L (A7)+,(A6-0xa)> Δ+4 {[-8-]|[«10""»]}
<MI 25dea MOVEA.L A7,A0> {[-8-]|[«10""»]}
<MI 25dec LEA.L 0x2112a,A1> {[-8-]|[«10""»]}
<BlockMove 9,A1,A0> {[-8-]|[«10""»]}
<POP 25df8-25dfa StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]}
<MI 25dfa MOVE.L (A6-0xa),-(A7)> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']}
<POP 25dfc-25dfe StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[-4-]}
<Lit 0x25dfe 9> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[$$, Sector]}
<MI 25e10 MOVE.L (A6-0xe),(A7)> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']}
<POP 25e0a-25e10 StackAdj> Δ-8 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[-8-]}
<Call 0x25e14 0x102e4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[-8-]}
Long2String(a : Long) : String
<POP 25e1a-25e1c StackAdj> Δ+4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[-4-]}
<Call 0x25e1c 0x102d4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[-4-]}
StringCat3(a, b, c : String) : String
<POP 25e22-25e26 StackAdj> Δ+12 {[-8-]|[«10""»]|[-4-]}
<MI 25e26 MOVE.L (A7)+,(A6-0xa)> Δ+4 {[-8-]|[«10""»]}
<POP 25e28-25e2a StackAdj> Δ+6 {[-8-]|[-4-]}
<MI 25e2a MOVE.L (A6-0xa),(A7)> {[-8-]|[4, '(A6-0xa)']}
<Call 0x25e2c 0x103e0> {[-8-]|[4, '(A6-0xa)']}
WriteConsoleStringCrLf(str : String)
<POP 25e32-25e33 StackAdj> Δ+4 ↓ {[-8-]}
<Blob 0x25e33 [58] @> Δ-58 {[-8-]|[«58""»]}
<POP 25e44-25e46 StackAdj> Δ-4 {[-8-]|[«58""»]|[-4-]}
<Lit 0x25e46 57> {[-8-]|[«58""»]|[$$Detected program error, operation will overflow disk size]}
<Call 0x25e5a 0x22522> {[-8-]|[«58""»]|[$$Detected program error, operation will overflow disk size]}
<POP 25e5e-25e62 StackAdj> Δ+62 {[-8-]}
<POP 25e62-25e68 Naked> Σ-8 Δ+8 ↓ →0x25eda ←0x25d0a ←0x25d12
<POP 25e62-25e64 StackAdj> Δ+8 {}
<MI 25e64 CMP.L (A6-0x46),D7> {}
<MI 25e66 BEQ 0x25eda> {}
<POP 25e68-25eda Naked> Σ0 ↓
<MI 25e68 MOVE.L (A6-0x46),D7> {}
<Blob 0x25e6a [10] @> Δ-10 {[«10""»]}
<POP 25e7c-25e7e StackAdj> Δ-8 {[«10""»]|[-8-]}
<Lit 0x25e7e 9> {[«10""»]|[-4-]|[$$Cylinder_]}
<MI 25e90 MOVE.L (A6-0x46),(A7)> {[«10""»]|[-4-]|[4, '(A6-0x46)']}
<POP 25e8a-25e90 StackAdj> Δ-8 {[«10""»]|[-4-]|[4, '(A6-0x46)']|[-8-]}
<Call 0x25e92 0x102e4> {[«10""»]|[-4-]|[4, '(A6-0x46)']|[-8-]}
Long2String(a : Long) : String
<POP 25e98-25e9a StackAdj> Δ+4 {[«10""»]|[-4-]|[4, '(A6-0x46)']|[-4-]}
<Call 0x25e9a 0x102d0> {[«10""»]|[-4-]|[4, '(A6-0x46)']|[-4-]}
StringCat2(a, b : String) : String
<POP 25ea0-25ea2 StackAdj> Δ+8 {[«10""»]|[-4-]}
<MI 25ea2 MOVE.L (A7)+,(A6-0xa)> Δ+4 {[«10""»]}
<POP 25ea4-25ea6 StackAdj> Δ+6 {[-4-]}
<MI 25ea6 MOVE.L (A6-0xa),(A7)> {[4, '(A6-0xa)']}
<Const 0x25ea8 0xd.2> Δ-2 {[4, '(A6-0xa)']|[#13]}
<Call 0x25eac 0x102c0> {[4, '(A6-0xa)']|[#13]}
AppendChar(MOD b : String; a : char)
<Call 0x25eb2 0x103f8> {[4, '(A6-0xa)']|[#13]}
GetConsoleConfig() : Long
<MI 25eb8 MOVE.L (A7)+,D0> Δ+4 {[-2-]}
<POP 0x25eba LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-2-]}
<MI 25ec4 MOVE.W D0,(A7)> {[2, 'D0']}
<MI 25ec6 MOVE.L (A6-0xa),-(A7)> Δ-4 {[2, 'D0']|[4, '(A6-0xa)']}
<Call 0x25ec8 0x1020a> {[2, 'D0']|[4, '(A6-0xa)']}
KC05_PortWriteString(port : Word ; str : String)
<POP 25ece-25ed0 StackAdj> Δ+6 {}
<Pointer.fp 0x25ed0 <LVAR -0x00a @ 4(rw)>> Δ-4 {[@@-10]}
<Call 0x25ed2 0x102bc> {[@@-10]}
FreeString(VAR a : String)
<POP 25ed8-25eda StackAdj> Δ+4 {}
<POP 25eda-25f14 Naked> Σ0 ↓ →0x25f2a ←0x25e62
<Pointer.fp 0x25eda <LVAR -0x038 @ 2(w)>> Δ-4 {[@@-56]}
<MI 25ede LEA.L (A6+0xc),A0> {[@@-56]}
<MI 25ee2 MOVE.L A0,-(A7)> Δ-4 {[@@-56]|[4, 'A0']}
<MI 25ee4 CLR.W -(A7)> Δ-2 {[@@-56]|[4, 'A0']|[#0]}
<Call 0x25ee6 0x10204> {[@@-56]|[4, 'A0']|[#0]}
KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W)
<POP 25eec-25ef0 StackAdj> Δ+10 {}
<MI 25ef0 MOVE.L (A6-0xe),D0> {}
<MI 25ef4 ASL.L #0x1,D0> {}
<MI 25ef6 ADD.L D0,(A6-0x3e)> {}
<Pointer.fp 0x25ef8 <LVAR -0x046 @ 4(rw)>> Δ-4 {[@@-70]}
<Pointer.fp 0x25efa <LVAR -0x042 @ 4(rw)>> Δ-4 {[@@-70]|[@@-66]}
<Pointer.fp 0x25efe <LVAR -0x03e @ 4(rw)>> Δ-4 {[@@-70]|[@@-66]|[@@-62]}
<Pointer.fp 0x25f00 <LVAR -0x00e @ 4(rw)>> Δ-4 {[@@-70]|[@@-66]|[@@-62]|[@@-14]}
<Pointer.fp 0x25f04 <LVAR -0x028 @ 1(r)>> Δ-4 {[@@-70]|[@@-66]|[@@-62]|[@@-14]|[@@-40]}
<Call 0x25f08 0x25b1c> {[@@-70]|[@@-66]|[@@-62]|[@@-14]|[@@-40]}
<POP 25f0c-25f10 StackAdj> Δ+20 {}
<MI 25f10 MOVEQ.L #0x00,D0> {}
<MI 25f12 BEQ 0x25f2a> {}
<POP 25f14-25f1a Naked> Σ0 ↓ →0x25f2a
<MI 25f14 TST.B (A6-0x28)> {}
<MI 25f18 BEQ 0x25f2a> {}
<POP 25f1a-25f2a Naked> Σ0 ↓
<Const 0x25f1a 0x1c9c2.4> Δ-4 {[##117186]}
<Call 0x25f20 0x10224> {[##117186]}
KC12_Sleep(dur: Long)
<POP 25f26-25f28 StackAdj> Δ+4 {}
<MI 25f28 MOVE.L (A6-0x46),D5> {}
<POP 25f2a-25f40 Naked> Σ0 ↓ →0x2618a ←0x25eda ←0x25f14
<MI 25f2a CLR.W -(A7)> Δ-2 {[#0]}
<Pointer.fp 0x25f2c <LVAR -0x010 @ 1(r)>> Δ-4 {[#0]|[@@-16]}
<Call 0x25f30 0x10206> {[#0]|[@@-16]}
KC03_Wait_Disk_IO(a : W; VAR status : Byte)
<POP 25f36-25f38 StackAdj> Δ+6 {}
<MI 25f38 TST.B (A6-0x10)> {}
<MI 25f3c BNE 0x2618a> {}
<POP 25f40-25f74 Naked> Σ0 ↓ →0x25f7a
<Pointer.fp 0x25f40 <LVAR -0x026 @>> Δ-4 {[@@-38]}
<Call 0x25f44 0x24bae> {[@@-38]}
<POP 25f48-25f4a StackAdj> Δ+4 {}
<MI 25f4a CLR.L D0> {}
<MI 25f4c MOVE.W (A6-0x18),D0> {}
<MI 25f50 MOVE.L D0,(A6-0x46)> {}
<MI 25f52 MOVE.W (A6-0x16),D1> {}
<MI 25f56 ANDI.W #0x00ff,D1> {}
<MI 25f5a CLR.L D2> {}
<MI 25f5c MOVE.W D1,D2> {}
<MI 25f5e MOVE.L D2,(A6-0x3e)> {}
<MI 25f60 MOVE.W (A6-0x16),D6> {}
<MI 25f64 MOVE.W D6,D1> {}
<MI 25f66 LSR.W #0x8,D1> {}
<MI 25f68 CLR.L D3> {}
<MI 25f6a MOVE.W D1,D3> {}
<MI 25f6c MOVE.L D3,(A6-0x42)> {}
<MI 25f70 TST.L D2> {}
<MI 25f72 BEQ 0x25f7a> {}
<POP 25f74-25f7a Naked> Σ0 →0x25fa8
<MI 25f74 SUBQ.L #0x1,D2> {}
<MI 25f76 MOVE.L D2,(A6-0x3e)> {}
<MI 25f78 BRA 0x25fa8> {}
<POP 25f7a-25f8c Naked> Σ0 ↓ →0x25f94 ←0x25f40
<MI 25f7a CLR.L D1> {}
<MI 25f7c MOVE.B 0x29715,D1> {}
<MI 25f82 SUBQ.W #0x1,D1> {}
<MI 25f84 EXTW.L D1> {}
<MI 25f86 MOVE.L D1,(A6-0x3e)> {}
<MI 25f88 TST.L D3> {}
<MI 25f8a BEQ 0x25f94> {}
<POP 25f8c-25f94 Naked> Σ0 →0x25fa8
<MI 25f8c SUBQ.L #0x1,D3> {}
<MI 25f8e MOVE.L D3,(A6-0x42)> {}
<MI 25f92 BRA 0x25fa8> {}
<POP 25f94-25fa8 Naked> Σ0 ↓ ←0x25f7a
<MI 25f94 CLR.L D1> {}
<MI 25f96 MOVE.B 0x29714,D1> {}
<MI 25f9c SUBQ.W #0x1,D1> {}
<MI 25f9e EXTW.L D1> {}
<MI 25fa0 MOVE.L D1,(A6-0x42)> {}
<MI 25fa4 SUBQ.L #0x1,D0> {}
<MI 25fa6 MOVE.L D0,(A6-0x46)> {}
<POP 25fa8-25fe0 Naked> Σ0 ↓ →0x25fe2 ←0x25f74 ←0x25f8c
<MI 25fa8 MOVE.L (A6-0x46),-(A7)> Δ-4 {[4, '(A6-0x46)']}
<MI 25faa MOVE.L (A6-0x42),-(A7)> Δ-4 {[4, '(A6-0x46)']|[4, '(A6-0x42)']}
<MI 25fae MOVE.L (A6-0x3e),-(A7)> Δ-4 {[4, '(A6-0x46)']|[4, '(A6-0x42)']|[4, '(A6-0x3e)']}
<MI 25fb0 MOVE.B (A6+0x8),-(A7)> Δ-2 {[4, '(A6-0x46)']|[4, '(A6-0x42)']|[4, '(A6-0x3e)']|[2, '(A6+0x8)']}
<Blob 0x25fb4 [22] (A6-0x10)> Δ-22 {[4, '(A6-0x46)']|[4, '(A6-0x42)']|[4, '(A6-0x3e)']|[2, '(A6+0x8)']|[«22»]}
<Call 0x25fc0 0x25908> {[4, '(A6-0x46)']|[4, '(A6-0x42)']|[4, '(A6-0x3e)']|[2, '(A6+0x8)']|[«22»]}
<POP 25fc4-25fc8 StackAdj> Δ+36 {}
<Const 0x25fc8 0x32dc.4> Δ-4 {[##13020]}
<Call 0x25fcc 0x10224> {[##13020]}
KC12_Sleep(dur: Long)
<POP 25fd2-25fd4 StackAdj> Δ+4 {}
<MI 25fd4 ADDQ.L #0x1,(A6-0x3e)> {}
<MI 25fd6 MOVE.L (A6-0x3e),D0> {}
<MI 25fd8 ANDI.L #0x00000001,D0> {}
<MI 25fde BEQ 0x25fe2> {}
<POP 25fe0-25fe2 Naked> Σ0 ↓
<MI 25fe0 ADDQ.L #0x1,(A6-0x3e)> {}
<POP 25fe2-26030 Naked> Σ0 Δ-8 ↓ →0x2604e ←0x25fa8
<Pointer.fp 0x25fe2 <LVAR -0x046 @ 4(rw)>> Δ-4 {[@@-70]}
<Pointer.fp 0x25fe4 <LVAR -0x042 @ 4(rw)>> Δ-4 {[@@-70]|[@@-66]}
<Pointer.fp 0x25fe8 <LVAR -0x03e @ 4(rw)>> Δ-4 {[@@-70]|[@@-66]|[@@-62]}
<Pointer.fp 0x25fea <LVAR -0x00e @ 4(rw)>> Δ-4 {[@@-70]|[@@-66]|[@@-62]|[@@-14]}
<Pointer.fp 0x25fee <LVAR -0x028 @ 1(r)>> Δ-4 {[@@-70]|[@@-66]|[@@-62]|[@@-14]|[@@-40]}
<Call 0x25ff2 0x25b1c> {[@@-70]|[@@-66]|[@@-62]|[@@-14]|[@@-40]}
<POP 25ff6-25ffa StackAdj> Δ+20 {}
<MI 25ffa MOVE.L (A6-0x42),D4> {}
<MI 25ffe CLR.L D3> {}
<MI 26000 MOVE.B 0x29715,D3> {}
<MI 26006 MOVE.L D3,-(A7)> Δ-4 {[4, 'D3']}
<Call 0x26008 0x10290> {[4, 'D3']}
?mulu_d3_d4
<MI 2600e MOVE.L D4,-(A7)> Δ-4 {[4, 'D3']|[4, 'D4']}
<MI 26010 CLR.L D4> {[4, 'D3']|[4, 'D4']}
<MI 26012 MOVE.B 0x29714,D4> {[4, 'D3']|[4, 'D4']}
<MI 26018 MOVE.L (A7+0x4),D0> {[4, 'D3']|[4, 'D4']}
<MI 2601c MOVE.L D0,D3> {[4, 'D3']|[4, 'D4']}
<Call 0x2601e 0x10290> {[4, 'D3']|[4, 'D4']}
?mulu_d3_d4
<MI 26024 CLR.L D0> {[4, 'D3']|[4, 'D4']}
<MI 26026 MOVE.W 0x29712,D0> {[4, 'D3']|[4, 'D4']}
<MI 2602c CMP.L (A6-0x46),D0> {[4, 'D3']|[4, 'D4']}
<MI 2602e BLS 0x2604e> {[4, 'D3']|[4, 'D4']}
<POP 26030-26038 Naked> Σ-8 ↓ →0x26188
<MI 26030 SUBQ.L #0x1,D0> {[-8-]}
<MI 26032 CMP.L (A6-0x46),D0> {[-8-]}
<MI 26034 BNE 0x26188> {[-8-]}
<POP 26038-2604e Naked> Σ-8 ↓ →0x26188
<MI 26038 MOVE.L (A7),D0> {[-8-]}
<MI 2603a ADD.L (A6-0x3e),D0> {[-8-]}
<MI 2603c MOVE.L (A6-0xe),D1> {[-8-]}
<MI 26040 ASL.L #0x1,D1> {[-8-]}
<MI 26042 ADD.L D0,D1> {[-8-]}
<MI 26044 CLR.L D0> {[-8-]}
<MI 26046 MOVE.W D4,D0> {[-8-]}
<MI 26048 CMP.L D0,D1> {[-8-]}
<MI 2604a BLS 0x26188> {[-8-]}
<POP 2604e-26188 Naked> Σ-8 ↓ ←0x25fe2
<Pointer.fp 0x2604e <LVAR -0x00a @ 4(rw)>> Δ-4 {[-8-]|[@@-10]}
<Call 0x26050 0x102b8> {[-8-]|[@@-10]}
NewString(VAR a : String)
<POP 26056-26057 StackAdj> Δ+4 ↓ {[-8-]}
<Blob 0x26057 [10] @> Δ-10 {[-8-]|[«10""»]}
<POP 26066-26068 StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]}
<MI 26068 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']}
<POP 2606a-2606c StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[-4-]}
<Lit 0x2606c 9> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[$$Cylinder=]}
<MI 2607e MOVE.L (A6-0x46),(A7)> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x46)']}
<POP 26078-2607e StackAdj> Δ-8 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x46)']|[-8-]}
<Call 0x26080 0x102e4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x46)']|[-8-]}
Long2String(a : Long) : String
<POP 26086-26088 StackAdj> Δ+4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x46)']|[-4-]}
<Call 0x26088 0x102d4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x46)']|[-4-]}
StringCat3(a, b, c : String) : String
<POP 2608e-26092 StackAdj> Δ+12 {[-8-]|[«10""»]|[-4-]}
<MI 26092 MOVE.L (A7)+,(A6-0xa)> Δ+4 {[-8-]|[«10""»]}
<MI 26094 MOVEA.L A7,A0> {[-8-]|[«10""»]}
<MI 26096 LEA.L 0x21148,A1> {[-8-]|[«10""»]}
<BlockMove 9,A1,A0> {[-8-]|[«10""»]}
<POP 260a2-260a4 StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]}
<MI 260a4 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']}
<POP 260a6-260a8 StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[-4-]}
<Lit 0x260a8 9> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[$$Cylinder=]}
<MI 260ba MOVE.L (A6-0x42),(A7)> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x42)']}
<POP 260b4-260ba StackAdj> Δ-8 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x42)']|[-8-]}
<Call 0x260be 0x102e4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x42)']|[-8-]}
Long2String(a : Long) : String
<POP 260c4-260c6 StackAdj> Δ+4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x42)']|[-4-]}
<Call 0x260c6 0x102d4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x42)']|[-4-]}
StringCat3(a, b, c : String) : String
<POP 260cc-260d0 StackAdj> Δ+12 {[-8-]|[«10""»]|[-4-]}
<MI 260d0 MOVE.L (A7)+,(A6-0xa)> Δ+4 {[-8-]|[«10""»]}
<POP 260d2-260d6 StackAdj> Δ+10 {[-8-]}
<Blob 0x260d6 [10] @> Δ-10 {[-8-]|[«10""»]}
<POP 260e2-260e4 StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]}
<MI 260e4 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']}
<POP 260e6-260e8 StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[-4-]}
<Lit 0x260e8 10> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[$$, Sector=]}
<MI 260fa MOVE.L (A6-0x3e),(A7)> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x3e)']}
<POP 260f4-260fa StackAdj> Δ-8 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x3e)']|[-8-]}
<Call 0x260fc 0x102e4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x3e)']|[-8-]}
Long2String(a : Long) : String
<POP 26102-26104 StackAdj> Δ+4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x3e)']|[-4-]}
<Call 0x26104 0x102d4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0x3e)']|[-4-]}
StringCat3(a, b, c : String) : String
<POP 2610a-2610e StackAdj> Δ+12 {[-8-]|[«10""»]|[-4-]}
<MI 2610e MOVE.L (A7)+,(A6-0xa)> Δ+4 {[-8-]|[«10""»]}
<MI 26110 MOVEA.L A7,A0> {[-8-]|[«10""»]}
<MI 26112 LEA.L 0x2115c,A1> {[-8-]|[«10""»]}
<BlockMove 9,A1,A0> {[-8-]|[«10""»]}
<POP 2611e-26120 StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]}
<MI 26120 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']}
<POP 26122-26124 StackAdj> Δ-4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[-4-]}
<Lit 0x26124 9> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[$$, Sector]}
<MI 26136 MOVE.L (A6-0xe),(A7)> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']}
<POP 26130-26136 StackAdj> Δ-8 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[-8-]}
<Call 0x2613a 0x102e4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[-8-]}
Long2String(a : Long) : String
<POP 26140-26142 StackAdj> Δ+4 {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[-4-]}
<Call 0x26142 0x102d4> {[-8-]|[«10""»]|[-4-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[-4-]}
StringCat3(a, b, c : String) : String
<POP 26148-2614c StackAdj> Δ+12 {[-8-]|[«10""»]|[-4-]}
<MI 2614c MOVE.L (A7)+,(A6-0xa)> Δ+4 {[-8-]|[«10""»]}
<POP 2614e-26150 StackAdj> Δ+6 {[-8-]|[-4-]}
<MI 26150 MOVE.L (A6-0xa),(A7)> {[-8-]|[4, '(A6-0xa)']}
<Call 0x26152 0x103e0> {[-8-]|[4, '(A6-0xa)']}
WriteConsoleStringCrLf(str : String)
<POP 26158-26159 StackAdj> Δ+4 ↓ {[-8-]}
<Blob 0x26159 [60] @> Δ-60 {[-8-]|[«60""»]}
<POP 2616a-2616c StackAdj> Δ-4 {[-8-]|[«60""»]|[-4-]}
<Lit 0x2616c 59> {[-8-]|[«60""»]|[$$fixup after error failed, operation will overflow disk size]}
<Call 0x26180 0x22522> {[-8-]|[«60""»]|[$$fixup after error failed, operation will overflow disk size]}
<POP 26184-26188 StackAdj> Δ+64 {[-8-]}
<POP 26188-2618a Naked> Σ-8 Δ+8 ↓ ←0x26030 ←0x26038
<POP 26188-2618a StackAdj> Δ+8 {}
<POP 2618a-26192 Naked> Σ0 ↓ →0x25c9a ←0x25f2a
<MI 2618a TST.B (A6-0x28)> {}
<MI 2618e BEQ 0x25c9a> {}
<POP 26192-2619a Epilogue> Σ0
@ 2619a
<LVAR -0x002 2(w)>
<LVAR -0x004 2(w)>
<LVAR -0x006 2(w)>
<LVAR -0x00a @ 4(r)>
<LVAR -0x00e @ 4(r)>
<LVAR -0x010 1(rw)>
<POP 2619a-26628 Body> Δ-66
<POP 2619a-261b0 Prologue> Σ0 ↓
<POP 261b0-261c6 RegCacheLoad> Σ0 ↓
<POP 261c6-261f0 Naked> Σ0 Δ-34 ↓ →0x26210
<MI 261c6 MOVE.W 0x223d0,(A6-0x6)> {}
<MI 261cc MOVE.W 0x223d2,(A6-0x4)> {}
<MI 261d2 MOVE.W 0x223d4,(A6-0x2)> {}
<MI 261d8 MOVE.W 0x296e0,(A6-0x6)> {}
<Blob 0x261e0 [34] @> Δ-34 {[«34""»]}
<MI 261ec TST.B 0x2970b> {[«34""»]}
<MI 261ee BNE 0x26210> {[«34""»]}
<POP 261f0-26210 Naked> Σ-34 ↓ →0x2661c
<POP 261f0-261f2 StackAdj> Δ-6 {[-40-]}
<Lit 0x261f2> {[-36-]|[$$…]}
<Pointer.sp 0x261f2 6> Δ-4
<Const 0x261f6 0x1.2> Δ-2
<Const 0x261f8 0x22.2> Δ-2
<Call 0x261fc 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 261fe-26200 StackAdj> Δ+8
<POP 261fe-26200 StackAdj> Δ-2 {[-36-]|[$$…]|[-2-]}
<MI 26200 CLR.B (A7)> {[-36-]|[$$…]|[-2-]}
<Call 0x26202 0x103f0> {[-36-]|[$$…]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 26208-2620a StackAdj> Δ+6 {[-36-]}
<MI 2620a TST.B (A7)+> Δ+2 {[-34-]}
<MI 2620c BEQ 0x2661c> {[-34-]}
<POP 26210-2621a Naked> Σ-34 ↓ →0x2661c ←0x261c6
<MI 26210 TST.B 0x2db20> {[-34-]}
<MI 26216 BNE 0x2661c> {[-34-]}
<POP 2621a-2625e Naked> Σ-34 Δ-66 ↓ →0x26282 ←0x2627c
<Blob 0x2621a [38] @> Δ-38 {[-34-]|[«38""»]}
<POP 26226-26228 StackAdj> Δ-8 {[-34-]|[«38""»]|[-8-]}
<Lit 0x26228 38> {[-34-]|[«38""»]|[-4-]|[$$How many passes of surface analysis :_]}
<Const 0x26236 0x0.4> Δ-4 {[-34-]|[«38""»]|[-4-]|[$$How many passes of surface analysis :_]|[##0]}
<Const 0x2623a 0x3.4> Δ-4 {[-34-]|[«38""»]|[-4-]|[$$How many passes of surface analysis :_]|[##0]|[##3]}
<Call 0x2623e 0x103ec> {[-34-]|[«38""»]|[-4-]|[$$How many passes of surface analysis :_]|[##0]|[##3]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 26244-26246 StackAdj> Δ+12 {[-34-]|[«38""»]|[-4-]}
<MI 26246 MOVE.L (A7)+,D7> Δ+4 {[-34-]|[«38""»]}
<POP 26248-26249 StackAdj> Δ+38 ↓ {[-34-]}
<Blob 0x26249 [66] @> Δ-66 {[-34-]|[«66""»]}
<MI 2625a TST.L D7> {[-34-]|[«66""»]}
<MI 2625c BNE 0x26282> {[-34-]|[«66""»]}
<POP 2625e-2627c Naked> Σ-100 ↓ →0x26282
<POP 2625e-26260 StackAdj> Δ-6 {[-106-]}
<Lit 0x26260> {[-102-]|[$$…]}
<Pointer.sp 0x26260 6> Δ-4
<Const 0x26264 0x1.2> Δ-2
<Const 0x26266 0x41.2> Δ-2
<Call 0x2626a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2626c-2626e StackAdj> Δ+8
<POP 2626c-2626e StackAdj> Δ-2 {[-102-]|[$$…]|[-2-]}
<MI 2626e CLR.B (A7)> {[-102-]|[$$…]|[-2-]}
<Call 0x26270 0x103f0> {[-102-]|[$$…]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 26276-26278 StackAdj> Δ+6 {[-102-]}
<MI 26278 TST.B (A7)+> Δ+2 {[-100-]}
<MI 2627a BNE 0x26282> {[-100-]}
<POP 2627c-26282 Naked> Σ-100 Δ+66 →0x2621a
<POP 2627c-26280 StackAdj> Δ+66 {[-34-]}
<MI 26280 BRA 0x2621a> {[-34-]}
<POP 26282-26288 Naked> Σ-100 ↓ →0x26618 ←0x2621a ←0x2625e
<MI 26282 TST.L D7> {[-100-]}
<MI 26284 BEQ 0x26618> {[-100-]}
<POP 26288-26296 Naked> Σ-100 ↓ →0x263a2
<POP 26288-2628a StackAdj> Δ-2 {[-102-]}
<Call 0x2628a 0x10610> {[-102-]}
Is_machine_type_one_or_three() : Bool
<MI 26290 TST.B (A7)+> Δ+2 {[-100-]}
<MI 26292 BEQ 0x263a2> {[-100-]}
<POP 26296-263a2 Naked> Σ-100 →0x2648a
<MI 26296 CLR.L D0> {[-100-]}
<MI 26298 MOVE.B 0x29714,D0> {[-100-]}
<MI 2629e MULU.W 0x29712,D0> {[-100-]}
<MI 262a4 MOVE.L D0,D4> {[-100-]}
<MI 262a6 CLR.L D3> {[-100-]}
<MI 262a8 MOVE.B 0x29715,D3> {[-100-]}
<Call 0x262ae 0x10290> {[-100-]}
?mulu_d3_d4
<MI 262b4 MOVE.L #0xe7,D3> {[-100-]}
<Call 0x262ba 0x10298> {[-100-]}
?divu_d3_d4
<MI 262bc MOVEQ.L #0x3c,D3> {[-100-]}
<Call 0x262be 0x10298> {[-100-]}
?divu_d3_d4
<MI 262c0 MOVE.L D4,D5> {[-100-]}
<Blob 0x262c2 [26] @> Δ-26 {[-100-]|[«26""»]}
<Blob 0x262d4 [10] @> Δ-10 {[-100-]|[«26""»]|[«10""»]}
<POP 262e6-262e8 StackAdj> Δ-8 {[-100-]|[«26""»]|[«10""»]|[-8-]}
<Lit 0x262e8 25> {[-100-]|[«26""»]|[«10""»]|[-4-]|[$$A read pass takes about _]}
<MI 262f4 MOVE.L D5,(A7)> {[-100-]|[«26""»]|[«10""»]|[-4-]|[4, 'D5']}
<POP 262f2-262f4 StackAdj> Δ-8 {[-100-]|[«26""»]|[«10""»]|[-4-]|[4, 'D5']|[-8-]}
<Call 0x262f6 0x102e4> {[-100-]|[«26""»]|[«10""»]|[-4-]|[4, 'D5']|[-8-]}
Long2String(a : Long) : String
<Lit 0x262fc 9> {[-100-]|[«26""»]|[«10""»]|[-4-]|[4, 'D5']|[-4-]|[$$ minutes.]}
<Call 0x2630a 0x102d4> {[-100-]|[«26""»]|[«10""»]|[-4-]|[4, 'D5']|[-4-]|[$$ minutes.]}
StringCat3(a, b, c : String) : String
<POP 26310-26312 StackAdj> Δ+12 {[-100-]|[«26""»]|[«10""»]|[-4-]}
<Call 0x26312 0x103e0> {[-100-]|[«26""»]|[«10""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 26318-2631c StackAdj> Δ+40 {[-100-]}
<MI 2631c CLR.L D0> {[-100-]}
<MI 2631e MOVE.B 0x29714,D0> {[-100-]}
<MI 26324 MULU.W 0x29712,D0> {[-100-]}
<MI 2632a MOVE.L D0,D4> {[-100-]}
<MI 2632c CLR.L D3> {[-100-]}
<MI 2632e MOVE.B 0x29715,D3> {[-100-]}
<Call 0x26334 0x10290> {[-100-]}
?mulu_d3_d4
<MI 2633a MOVEQ.L #0x74,D3> {[-100-]}
<Call 0x2633c 0x10298> {[-100-]}
?divu_d3_d4
<MI 2633e MOVEQ.L #0x3c,D3> {[-100-]}
<Call 0x26340 0x10298> {[-100-]}
?divu_d3_d4
<MI 26342 MOVE.L D4,D5> {[-100-]}
<Blob 0x26344 [26] @> Δ-26 {[-100-]|[«26""»]}
<Blob 0x26356 [10] @> Δ-10 {[-100-]|[«26""»]|[«10""»]}
<POP 26368-2636a StackAdj> Δ-8 {[-100-]|[«26""»]|[«10""»]|[-8-]}
<Lit 0x2636a 25> {[-100-]|[«26""»]|[«10""»]|[-4-]|[$$A write pass takes about_]}
<MI 26376 MOVE.L D5,(A7)> {[-100-]|[«26""»]|[«10""»]|[-4-]|[4, 'D5']}
<POP 26374-26376 StackAdj> Δ-8 {[-100-]|[«26""»]|[«10""»]|[-4-]|[4, 'D5']|[-8-]}
<Call 0x26378 0x102e4> {[-100-]|[«26""»]|[«10""»]|[-4-]|[4, 'D5']|[-8-]}
Long2String(a : Long) : String
<Lit 0x2637e 9> {[-100-]|[«26""»]|[«10""»]|[-4-]|[4, 'D5']|[-4-]|[$$ minutes.]}
<Call 0x2638c 0x102d4> {[-100-]|[«26""»]|[«10""»]|[-4-]|[4, 'D5']|[-4-]|[$$ minutes.]}
StringCat3(a, b, c : String) : String
<POP 26392-26394 StackAdj> Δ+12 {[-100-]|[«26""»]|[«10""»]|[-4-]}
<Call 0x26394 0x103e0> {[-100-]|[«26""»]|[«10""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2639a-2639e StackAdj> Δ+40 {[-100-]}
<MI 2639e BRA 0x2648a> {[-100-]}
<POP 263a2-2648a Naked> Σ-100 ↓ ←0x26288
<Blob 0x263a2 [26] @> Δ-26 {[-100-]|[«26""»]}
<MI 263b4 MOVE.W 0x296fc,D0> {[-100-]|[«26""»]}
<POP 0x263ba LimitCheck 0x0 ≤ D0 ≤ 0x5> {[-100-]|[«26""»]}
<MI 263be ASL.W #0x1,D0> {[-100-]|[«26""»]}
<MI 263c0 LEA.L 0x223d6,A0> {[-100-]|[«26""»]}
<MI 263c4 MOVE.W (A0+D0.W),-(A7)> Δ-2 {[-100-]|[«26""»]|[2, '(A0+D0.W)']}
<Blob 0x263c8 [10] @> Δ-10 {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]}
<POP 263da-263dc StackAdj> Δ-8 {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-8-]}
<Lit 0x263dc 25> {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]|[$$A read pass takes about _]}
<POP 263e8-263ea StackAdj> Δ-4 {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]|[$$A read pass takes about _]|[-4-]}
<Lit 0x263ea> {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]|[$$A read pass takes about _]|[$$…]}
<Pointer.sp 0x263ea 22> Δ-4
<Const 0x263ee 0x1.2> Δ-2
<Const 0x263f0 0x2.2> Δ-2
<Call 0x263f4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 263f6-263f8 StackAdj> Δ+8
<POP 263f6-263f8 StackAdj> Δ-4 {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]|[$$A read pass takes about _]|[$$…]|[-4-]}
<Lit 0x263f8 9> {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]|[$$A read pass takes about _]|[$$…]|[$$ minutes.]}
<Call 0x26406 0x102d4> {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]|[$$A read pass takes about _]|[$$…]|[$$ minutes.]}
StringCat3(a, b, c : String) : String
<POP 2640c-2640e StackAdj> Δ+12 {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]}
<Call 0x2640e 0x103e0> {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 26414-26415 StackAdj> Δ+42 ↓ {[-100-]}
<Blob 0x26415 [26] @> Δ-26 {[-100-]|[«26""»]}
<MI 26426 MOVE.W 0x296fc,D0> {[-100-]|[«26""»]}
<POP 0x2642c LimitCheck 0x0 ≤ D0 ≤ 0x5> {[-100-]|[«26""»]}
<MI 26430 ASL.W #0x1,D0> {[-100-]|[«26""»]}
<MI 26432 LEA.L 0x223e2,A0> {[-100-]|[«26""»]}
<MI 26436 MOVE.W (A0+D0.W),-(A7)> Δ-2 {[-100-]|[«26""»]|[2, '(A0+D0.W)']}
<Blob 0x2643a [10] @> Δ-10 {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]}
<POP 2644c-2644e StackAdj> Δ-8 {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-8-]}
<Lit 0x2644e 25> {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]|[$$A write pass takes about_]}
<POP 2645a-2645c StackAdj> Δ-4 {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]|[$$A write pass takes about_]|[-4-]}
<Lit 0x2645c> {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]|[$$A write pass takes about_]|[$$…]}
<Pointer.sp 0x2645c 22> Δ-4
<Const 0x26460 0x1.2> Δ-2
<Const 0x26462 0x2.2> Δ-2
<Call 0x26466 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 26468-2646a StackAdj> Δ+8
<POP 26468-2646a StackAdj> Δ-4 {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]|[$$A write pass takes about_]|[$$…]|[-4-]}
<Lit 0x2646a 9> {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]|[$$A write pass takes about_]|[$$…]|[$$ minutes.]}
<Call 0x26478 0x102d4> {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]|[$$A write pass takes about_]|[$$…]|[$$ minutes.]}
StringCat3(a, b, c : String) : String
<POP 2647e-26480 StackAdj> Δ+12 {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]}
<Call 0x26480 0x103e0> {[-100-]|[«26""»]|[2, '(A0+D0.W)']|[«10""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 26486-2648a StackAdj> Δ+42 {[-100-]}
<POP 2648a-264c8 Naked> Σ-100 Δ-4 ↓ ←0x26296
<Blob 0x2648a [50] @> Δ-50 {[-100-]|[«50""»]}
<POP 2649c-2649e StackAdj> Δ-6 {[-100-]|[«50""»]|[-6-]}
<Lit 0x2649e 49> {[-100-]|[«50""»]|[-2-]|[$$Report all errors (as opposed to only new errors)]}
<POP 264aa-264ac StackAdj> Δ-2 {[-100-]|[«50""»]|[-2-]|[$$Report all errors (as opposed to only new errors)]|[-2-]}
<MI 264ac CLR.B (A7)> {[-100-]|[«50""»]|[-2-]|[$$Report all errors (as opposed to only new errors)]|[-2-]}
<Call 0x264ae 0x103f0> {[-100-]|[«50""»]|[-2-]|[$$Report all errors (as opposed to only new errors)]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 264b4-264b6 StackAdj> Δ+6 {[-100-]|[«50""»]|[-2-]}
<MI 264b6 MOVE.B (A7)+,D0> Δ+2 {[-100-]|[«50""»]}
<MI 264b8 EXTB.W D0> {[-100-]|[«50""»]}
<POP 0x264ba LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-100-]|[«50""»]}
<POP 264bc-264c0 StackAdj> Δ+50 {[-100-]}
<MI 264c0 MOVE.B D0,(A6-0x10)> {[-100-]}
<MI 264c4 MOVE.L D7,-(A7)> Δ-4 {[-100-]|[4, 'D7']}
<MI 264c6 MOVEQ.L #0x01,D6> {[-100-]|[4, 'D7']}
<POP 264c8-264ce Naked> Σ-104 ↓ →0x26614 ←0x26574
<MI 264c8 CMP.L (A7),D6> {[-104-]}
<MI 264ca BGT 0x26614> {[-104-]}
<POP 264ce-264d2 Naked> Σ-104 ↓ →0x264d8
<MI 264ce CMP.L #0x01,D6> {[-104-]}
<MI 264d0 BNE 0x264d8> {[-104-]}
<POP 264d2-264d8 Naked> Σ-104 ↓ →0x26574
<MI 264d2 TST.B 0x2970b> {[-104-]}
<MI 264d4 BNE 0x26574> {[-104-]}
<POP 264d8-26574 Naked> Σ-104 ↓ ←0x264ce
<Pointer.fp 0x264d8 <LVAR -0x00e @ 4(r)>> Δ-4 {[-104-]|[@@-14]}
<Call 0x264dc 0x10304> {[-104-]|[@@-14]}
GetRtc() : TimeStamp
<POP 264e2-264e4 StackAdj> Δ+4 {[-104-]}
<MI 264e4 MOVE.L D6,D0> {[-104-]}
<MI 264e6 SUBQ.L #0x1,D0> {[-104-]}
<POP 0x264e8 LimitCheck 0x0 ≤ D0 ≤ 0x2> {[-104-]}
<MI 264f2 ASL.L #0x1,D0> {[-104-]}
<MI 264f4 MOVE.W (A6+D0.L-#0x6),-(A7)> Δ-2 {[-104-]|[2, '(A6+D0.L-#0x6)']}
<Const 0x264f8 0xb.2> Δ-2 {[-104-]|[2, '(A6+D0.L-#0x6)']|[#11]}
<MI 264fc MOVE.B (A6-0x10),D0> {[-104-]|[2, '(A6+D0.L-#0x6)']|[#11]}
<MI 26500 EXTB.W D0> {[-104-]|[2, '(A6+D0.L-#0x6)']|[#11]}
<POP 0x26502 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-104-]|[2, '(A6+D0.L-#0x6)']|[#11]}
<MI 26504 MOVE.B D0,-(A7)> Δ-2 {[-104-]|[2, '(A6+D0.L-#0x6)']|[#11]|[2, 'D0']}
<Call 0x26506 0x25c2a> {[-104-]|[2, '(A6+D0.L-#0x6)']|[#11]|[2, 'D0']}
<POP 2650a-2650c StackAdj> Δ+6 {[-104-]}
<Pointer.fp 0x2650c <LVAR -0x00a @ 4(r)>> Δ-4 {[-104-]|[@@-10]}
<Call 0x26510 0x10304> {[-104-]|[@@-10]}
GetRtc() : TimeStamp
<POP 26516-26517 StackAdj> Δ+4 ↓ {[-104-]}
<Blob 0x26517 [12] @> Δ-12 {[-104-]|[«12""»]}
<Blob 0x26526 [4] @> Δ-4 {[-104-]|[«12""»]|[«4""»]}
<Blob 0x2652a [4] @> Δ-4 {[-104-]|[«12""»]|[«4""»]|[«4""»]}
<Blob 0x2652e [4] @> Δ-4 {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 26532-26534 StackAdj> Δ-8 {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]}
<Lit 0x26534 11> {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Write pass_]}
<MI 26540 MOVE.L D6,(A7)> {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, 'D6']}
<POP 2653e-26540 StackAdj> Δ-8 {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, 'D6']|[-8-]}
<Call 0x26542 0x102e4> {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, 'D6']|[-8-]}
Long2String(a : Long) : String
<Lit 0x26548 12> {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, 'D6']|[-4-]|[$$ complete. _]}
<Call 0x26554 0x102d4> {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, 'D6']|[-4-]|[$$ complete. _]}
StringCat3(a, b, c : String) : String
<POP 2655a-2655c StackAdj> Δ+12 {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Call 0x2655c 0x103d8> {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
WriteConsoleString(str : String)
<POP 26562-26566 StackAdj> Δ+24 {[-104-]|[-4-]}
<MI 26566 MOVE.L (A6-0xe),(A7)> {[-104-]|[4, '(A6-0xe)']}
<MI 2656a MOVE.L (A6-0xa),-(A7)> Δ-4 {[-104-]|[4, '(A6-0xe)']|[4, '(A6-0xa)']}
<Call 0x2656e 0x22b48> {[-104-]|[4, '(A6-0xe)']|[4, '(A6-0xa)']}
<POP 26572-26574 StackAdj> Δ+8 {[-104-]}
<POP 26574-26614 Naked> Σ-104 ↓ →0x264c8 ←0x264d2
<Pointer.fp 0x26574 <LVAR -0x00e @ 4(r)>> Δ-4 {[-104-]|[@@-14]}
<Call 0x26578 0x10304> {[-104-]|[@@-14]}
GetRtc() : TimeStamp
<POP 2657e-26580 StackAdj> Δ+4 {[-104-]}
<MI 26580 MOVE.L D6,D0> {[-104-]}
<MI 26582 SUBQ.L #0x1,D0> {[-104-]}
<POP 0x26584 LimitCheck 0x0 ≤ D0 ≤ 0x2> {[-104-]}
<MI 2658e ASL.L #0x1,D0> {[-104-]}
<MI 26590 MOVE.W (A6+D0.L-#0x6),-(A7)> Δ-2 {[-104-]|[2, '(A6+D0.L-#0x6)']}
<Const 0x26594 0xc.2> Δ-2 {[-104-]|[2, '(A6+D0.L-#0x6)']|[#12]}
<MI 26596 MOVE.B (A6-0x10),D0> {[-104-]|[2, '(A6+D0.L-#0x6)']|[#12]}
<MI 2659a EXTB.W D0> {[-104-]|[2, '(A6+D0.L-#0x6)']|[#12]}
<POP 0x2659c LimitCheck 0x0 ≤ D0 ≤ 0x1> {[-104-]|[2, '(A6+D0.L-#0x6)']|[#12]}
<MI 2659e MOVE.B D0,-(A7)> Δ-2 {[-104-]|[2, '(A6+D0.L-#0x6)']|[#12]|[2, 'D0']}
<Call 0x265a0 0x25c2a> {[-104-]|[2, '(A6+D0.L-#0x6)']|[#12]|[2, 'D0']}
<POP 265a4-265a6 StackAdj> Δ+6 {[-104-]}
<Pointer.fp 0x265a6 <LVAR -0x00a @ 4(r)>> Δ-4 {[-104-]|[@@-10]}
<Call 0x265aa 0x10304> {[-104-]|[@@-10]}
GetRtc() : TimeStamp
<POP 265b0-265b1 StackAdj> Δ+4 ↓ {[-104-]}
<Blob 0x265b1 [12] @> Δ-12 {[-104-]|[«12""»]}
<Blob 0x265c0 [4] @> Δ-4 {[-104-]|[«12""»]|[«4""»]}
<Blob 0x265c4 [4] @> Δ-4 {[-104-]|[«12""»]|[«4""»]|[«4""»]}
<Blob 0x265c8 [4] @> Δ-4 {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 265cc-265ce StackAdj> Δ-8 {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]}
<Lit 0x265ce 11> {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$Read pass _]}
<MI 265da MOVE.L D6,(A7)> {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, 'D6']}
<POP 265d8-265da StackAdj> Δ-8 {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, 'D6']|[-8-]}
<Call 0x265dc 0x102e4> {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, 'D6']|[-8-]}
Long2String(a : Long) : String
<Lit 0x265e2 12> {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, 'D6']|[-4-]|[$$ complete. _]}
<Call 0x265ee 0x102d4> {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[4, 'D6']|[-4-]|[$$ complete. _]}
StringCat3(a, b, c : String) : String
<POP 265f4-265f6 StackAdj> Δ+12 {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Call 0x265f6 0x103d8> {[-104-]|[«12""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
WriteConsoleString(str : String)
<POP 265fc-26600 StackAdj> Δ+24 {[-104-]|[-4-]}
<MI 26600 MOVE.L (A6-0xe),(A7)> {[-104-]|[4, '(A6-0xe)']}
<MI 26604 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-104-]|[4, '(A6-0xe)']|[4, '(A6-0xa)']}
<Call 0x26608 0x22b48> {[-104-]|[4, '(A6-0xe)']|[4, '(A6-0xa)']}
<POP 2660c-2660e StackAdj> Δ+8 {[-104-]}
<MI 2660e ADDQ.L #0x1,D6> {[-104-]}
<MI 26610 BVC 0x264c8> {[-104-]}
<POP 26614-26618 Naked> Σ-104 Δ+4 ↓ ←0x264c8
<POP 26614-26616 StackAdj> Δ+4 {[-100-]}
<MI 26616 MOVE.B #0x01,0x2970b> {[-100-]}
<POP 26618-2661c Naked> Σ-100 Δ+66 ↓ ←0x26282
<POP 26618-2661c StackAdj> Δ+66 {[-34-]}
<POP 2661c-26620 Naked> Σ-34 Δ+34 ↓ ←0x261f0 ←0x26210
<POP 2661c-26620 StackAdj> Δ+34 {}
<POP 26620-26628 Epilogue> Σ0
@ 26628
<POP 26628-2671c Body>
<POP 26628-2663e Prologue> Σ0 ↓
<POP 2663e-26642 Naked> Σ0 ↓
<MI 2663e MOVEQ.L #0x00,D7> {}
<MI 26640 MOVEQ.L #0x00,D6> {}
<POP 26642-26672 Naked> Σ0 ↓ →0x266b2 ←0x266c2
<POP 0x26642 LimitCheck 0x0 ≤ D6 ≤ 0x7ff> {}
<MI 2664c MOVE.L D6,D0> {}
<MI 2664e ASL.L #0x2,D0> {}
<MI 26650 LEA.L 0x296d2,A0> {}
<MI 26656 LEA.L (A0+D0.L),A0> {}
<MI 2665a CLR.L D0> {}
<MI 2665c MOVE.W 0x29712,D0> {}
<MI 26662 SUBQ.L #0x1,D0> {}
<MI 26664 CLR.L D1> {}
<MI 26666 MOVE.W (A0+0x44c),D1> {}
<MI 2666a LSL.W #0x2,D1> {}
<MI 2666c LSR.W #0x2,D1> {}
<MI 2666e CMP.L D0,D1> {}
<MI 26670 BHI 0x266b2> {}
<POP 26672-26686 Naked> Σ0 ↓ →0x26692
<MI 26672 CLR.L D0> {}
<MI 26674 MOVE.B 0x29714,D0> {}
<MI 2667a SUBQ.W #0x1,D0> {}
<MI 2667c CLR.L D1> {}
<MI 2667e MOVE.B (A0+0x44e),D1> {}
<MI 26682 CMP.W D0,D1> {}
<MI 26684 BLS 0x26692> {}
<POP 26686-26692 Naked> Σ0 ↓ →0x266b2
<MI 26686 CLR.L D0> {}
<MI 26688 MOVE.B (A0+0x44e),D0> {}
<MI 2668c CMPI.W #0x00ff,D0> {}
<MI 26690 BNE 0x266b2> {}
<POP 26692-266a6 Naked> Σ0 ↓ →0x266c2 ←0x26672
<MI 26692 CLR.L D0> {}
<MI 26694 MOVE.B 0x29715,D0> {}
<MI 2669a SUBQ.W #0x1,D0> {}
<MI 2669c CLR.L D1> {}
<MI 2669e MOVE.B (A0+0x44f),D1> {}
<MI 266a2 CMP.W D0,D1> {}
<MI 266a4 BLS 0x266c2> {}
<POP 266a6-266b2 Naked> Σ0 ↓ →0x266c2
<MI 266a6 CLR.L D0> {}
<MI 266a8 MOVE.B (A0+0x44f),D0> {}
<MI 266ac CMPI.W #0x00ff,D0> {}
<MI 266b0 BEQ 0x266c2> {}
<POP 266b2-266c2 Naked> Σ0 ↓ ←0x26642 ←0x26686
<MI 266b2 ADDQ.L #0x1,D7> {}
<MI 266b4 ANDI.W #0xc000,(A0+0x44c)> {}
<MI 266ba CLR.B (A0+0x44e)> {}
<MI 266be CLR.B (A0+0x44f)> {}
<POP 266c2-266ce Naked> Σ0 ↓ →0x26642 ←0x26692 ←0x266a6
<MI 266c2 ADDQ.L #0x1,D6> {}
<MI 266c4 CMPI.L #0x000007ff,D6> {}
<MI 266ca BLE 0x26642> {}
<POP 266ce-266d2 Naked> Σ0 ↓ →0x26714
<MI 266ce TST.L D7> {}
<MI 266d0 BEQ 0x26714> {}
<POP 266d2-26714 Naked> Σ0 ↓
<Blob 0x266d2 [26] @> Δ-26 {[«26""»]}
<POP 266e4-266e6 StackAdj> Δ-8 {[«26""»]|[-8-]}
<MI 266e6 MOVE.L D7,-(A7)> Δ-4 {[«26""»]|[-8-]|[4, 'D7']}
<Call 0x266e8 0x102e4> {[«26""»]|[-8-]|[4, 'D7']}
Long2String(a : Long) : String
<Lit 0x266ee 25> {[«26""»]|[-8-]|[$$ defect entries expunged.]}
<Call 0x26702 0x102d0> {[«26""»]|[-8-]|[$$ defect entries expunged.]}
StringCat2(a, b : String) : String
<POP 26708-2670a StackAdj> Δ+8 {[«26""»]|[-4-]}
<Call 0x2670a 0x103e0> {[«26""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 26710-26714 StackAdj> Δ+30 {}
<POP 26714-2671c Epilogue> Σ0 ←0x266ce
@ 2671c
<LVAR 0x008 4(r)>
<LVAR -0x006 @ 4(rw)>
<LVAR -0x007 1(rw)>
<LVAR -0x008 @ 1(r)>
<LVAR -0x012 2(rw)>
<LVAR -0x016 2(w)>
<LVAR -0x01c 4(rw)>
<LVAR -0x420 @>
<POP 2671c-26ed8 Body> Δ+90
<POP 2671c-26732 Prologue> Σ0 ↓
<POP 26732-26738 RegCacheLoad> Σ0 ↓
<POP 26738-26774 Naked> Σ0 ↓
<MI 26738 LEA.L (A6-0x420),A0> {}
<MI 2673c MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2673e MOVEA.L (A7)+,A3> Δ+4 {}
<MI 26740 MOVE.L A3,-(A7)> Δ-4 {[4, 'A3']}
<MI 26742 MOVE.L (A7)+,(A6-0x1c)> Δ+4 {}
<Blob 0x26746 [30] @> Δ-30 {[«30""»]}
<POP 26752-26754 StackAdj> Δ-4 {[«30""»]|[-4-]}
<Lit 0x26754 30> {[«30""»]|[$$Writing bad block information.]}
<Call 0x26764 0x103e0> {[«30""»]|[$$Writing bad block information.]}
WriteConsoleStringCrLf(str : String)
<POP 2676a-2676e StackAdj> Δ+34 {}
<Call 0x2676e 0x26628> {}
<MI 26772 MOVEQ.L #0x00,D7> {}
<POP 26774-267cc Naked> Σ0 ↓ →0x267f8 ←0x267f8
<MI 26774 MOVE.L D7,D4> {}
<MI 26776 MOVEQ.L #0x02,D3> {}
<Call 0x26778 0x10294> {}
?divs_d3_d4
<MI 2677e ASL.L #0x8,D4> {}
<POP 0x26780 LimitCheck 0x0 ≤ D4 ≤ 0x7ff> {}
<MI 2678a ASL.L #0x2,D4> {}
<MI 2678c LEA.L 0x296d2,A0> {}
<MI 26792 LEA.L (A0+D4.L),A0> {}
<MI 26796 LEA.L (A0+0x44c),A0> {}
<MI 2679a MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2679c MOVEA.L (A7)+,A4> Δ+4 {}
<Const 0x2679e 0x3.2> Δ-2 {[#3]}
<MI 267a2 MOVEQ.L #0x05,D0> {[#3]}
<MI 267a4 ADD.L D7,D0> {[#3]}
<POP 0x267a6 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[#3]}
<MI 267b0 MOVE.W D0,-(A7)> Δ-2 {[#3]|[2, 'D0']}
<Const 0x267b2 0x1.4> Δ-4 {[#3]|[2, 'D0']|[##1]}
<MI 267b6 MOVE.L A4,-(A7)> Δ-4 {[#3]|[2, 'D0']|[##1]|[4, 'A4']}
<Pointer.fp 0x267b8 <LVAR -0x008 @ 1(r)>> Δ-4 {[#3]|[2, 'D0']|[##1]|[4, 'A4']|[@@-8]}
<Call 0x267bc 0x1036c> {[#3]|[2, 'D0']|[##1]|[4, 'A4']|[@@-8]}
RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
<POP 267c2-267c6 StackAdj> Δ+16 {}
<MI 267c6 TST.B (A6-0x8)> {}
<MI 267ca BNE 0x267f8> {}
<POP 267cc-267f8 Naked> Σ0 ↓
<Blob 0x267cc [38] @> Δ-38 {[«38""»]}
<POP 267de-267e0 StackAdj> Δ-4 {[«38""»]|[-4-]}
<Lit 0x267e0 37> {[«38""»]|[$$Can't write bad block file, aborting!]}
<Call 0x267f0 0x22522> {[«38""»]|[$$Can't write bad block file, aborting!]}
<POP 267f4-267f8 StackAdj> Δ+42 {}
<POP 267f8-26804 Naked> Σ0 ↓ →0x26774 ←0x26774
<MI 267f8 ADDQ.L #0x1,D7> {}
<MI 267fa CMPI.L #0x0000000f,D7> {}
<MI 26800 BLE 0x26774> {}
<POP 26804-26834 Naked> Σ0 ↓
<Blob 0x26804 [20] @> Δ-20 {[«20""»]}
<POP 26816-26818 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x26818 19> {[«20""»]|[$$Writing boot label.]}
<Call 0x26828 0x103e0> {[«20""»]|[$$Writing boot label.]}
WriteConsoleStringCrLf(str : String)
<POP 2682e-26832 StackAdj> Δ+24 {}
<MI 26832 MOVEQ.L #0x00,D7> {}
<POP 26834-26854 Naked> Σ0 ↓ →0x26834 ←0x26834
<POP 0x26834 LimitCheck 0x0 ≤ D7 ≤ 0x1ff> {}
<MI 2683e MOVE.L D7,D0> {}
<MI 26840 ASL.L #0x1,D0> {}
<MI 26842 LEA.L (A6-0x420),A0> {}
<MI 26846 CLR.W (A0+D0.L)> {}
<MI 2684a ADDQ.L #0x1,D7> {}
<MI 2684c CMPI.L #0x000001ff,D7> {}
<MI 26852 BLE 0x26834> {}
<POP 26854-2687e Naked> Σ0 ↓ →0x268aa
<MI 26854 MOVE.W #0x7fed,(A3)> {}
<Const 0x26858 0x3.2> Δ-2 {[#3]}
<Const 0x2685c 0x1.2> Δ-2 {[#3]|[#1]}
<Const 0x26860 0x1.4> Δ-4 {[#3]|[#1]|[##1]}
<MI 26864 LEA.L (A6-0x420),A0> {[#3]|[#1]|[##1]}
<MI 26868 MOVE.L A0,-(A7)> Δ-4 {[#3]|[#1]|[##1]|[4, 'A0']}
<Pointer.fp 0x2686a <LVAR -0x008 @ 1(r)>> Δ-4 {[#3]|[#1]|[##1]|[4, 'A0']|[@@-8]}
<Call 0x2686e 0x1036c> {[#3]|[#1]|[##1]|[4, 'A0']|[@@-8]}
RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
<POP 26874-26878 StackAdj> Δ+16 {}
<MI 26878 TST.B (A6-0x8)> {}
<MI 2687c BNE 0x268aa> {}
<POP 2687e-268aa Naked> Σ0 ↓
<Blob 0x2687e [34] @> Δ-34 {[«34""»]}
<POP 26890-26892 StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x26892 33> {[«34""»]|[$$Can't write BOOT label, aborting!]}
<Call 0x268a2 0x22522> {[«34""»]|[$$Can't write BOOT label, aborting!]}
<POP 268a6-268aa StackAdj> Δ+38 {}
<POP 268aa-268ea Naked> Σ0 Δ-4 ↓ ←0x26854
<Blob 0x268aa [18] @> Δ-18 {[«18""»]}
<POP 268b6-268b8 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x268b8 18> {[«18""»]|[$$Writing DFS label.]}
<Call 0x268c8 0x103e0> {[«18""»]|[$$Writing DFS label.]}
WriteConsoleStringCrLf(str : String)
<POP 268ce-268d2 StackAdj> Δ+22 {}
<MI 268d2 MOVE.W #0x7fed,0x1000e> {}
<MI 268da MOVEA.L (A6-0x1c),A0> {}
<MI 268de MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 268e0 MOVE.W #0x7fed,(A0)> {[4, 'A0']}
<MI 268e4 CLR.W (A0+0x2)> {[4, 'A0']}
<MI 268e8 MOVEQ.L #0x00,D7> {[4, 'A0']}
<POP 268ea-26908 Naked> Σ-4 ↓ →0x268ea ←0x268ea
<POP 0x268ea LimitCheck 0x0 ≤ D7 ≤ 0x7> {[-4-]}
<MI 268f4 MOVE.L D7,D0> {[-4-]}
<MI 268f6 ASL.L #0x1,D0> {[-4-]}
<MI 268f8 MOVEA.L (A7),A0> {[-4-]}
<MI 268fa CLR.W (A0+D0.L+#0x4)> {[-4-]}
<MI 268fe ADDQ.L #0x1,D7> {[-4-]}
<MI 26900 CMPI.L #0x00000007,D7> {[-4-]}
<MI 26906 BLE 0x268ea> {[-4-]}
<POP 26908-26930 Naked> Σ-4 Δ+4 ↓ →0x26956
<POP 26908-2690a StackAdj> Δ+2 {[-2-]}
<POP 2690a-2690b StackAdj> Δ+2 {}
<Const 0x2690b 0x3.2> Δ-2 {[#3]}
<Const 0x2690e 0x4.2> Δ-2 {[#3]|[#4]}
<Const 0x26912 0x1.4> Δ-4 {[#3]|[#4]|[##1]}
<MI 26916 LEA.L (A6-0x420),A0> {[#3]|[#4]|[##1]}
<MI 2691a MOVE.L A0,-(A7)> Δ-4 {[#3]|[#4]|[##1]|[4, 'A0']}
<Pointer.fp 0x2691c <LVAR -0x008 @ 1(r)>> Δ-4 {[#3]|[#4]|[##1]|[4, 'A0']|[@@-8]}
<Call 0x26920 0x1036c> {[#3]|[#4]|[##1]|[4, 'A0']|[@@-8]}
RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
<POP 26926-2692a StackAdj> Δ+16 {}
<MI 2692a TST.B (A6-0x8)> {}
<MI 2692e BNE 0x26956> {}
<POP 26930-26956 Naked> Σ0 ↓
<Blob 0x26930 [32] @> Δ-32 {[«32""»]}
<POP 2693c-2693e StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x2693e 32> {[«32""»]|[$$Can't write DOS label, aborting!]}
<Call 0x2694e 0x22522> {[«32""»]|[$$Can't write DOS label, aborting!]}
<POP 26952-26956 StackAdj> Δ+36 {}
<POP 26956-2697e Naked> Σ0 ↓ →0x269b2 ←0x26908
<MI 26956 MOVE.B 0x29708,D0> {}
<MI 2695c NEG.B D0> {}
<MI 2695e ADDQ.B #0x1,D0> {}
<MI 26960 OR.B 0x2970b,D0> {}
<MI 26966 OR.B 0x2db1f,D0> {}
<MI 2696c EXTB.W D0> {}
<POP 0x2696e LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 26972 MOVE.B D0,(A6-0x7)> {}
<MI 26976 TST.B 0x2ef34> {}
<MI 2697c BEQ 0x269b2> {}
<POP 2697e-26982 Naked> Σ0 ↓ →0x269a8
<MI 2697e TST.B D0> {}
<MI 26980 BEQ 0x269a8> {}
<POP 26982-269a8 Naked> Σ0 ↓
<Blob 0x26982 [30] @> Δ-30 {[«30""»]}
<POP 2698e-26990 StackAdj> Δ-4 {[«30""»]|[-4-]}
<Lit 0x26990 30> {[«30""»]|[$$drive needs a new volume label]}
<Call 0x269a0 0x22522> {[«30""»]|[$$drive needs a new volume label]}
<POP 269a4-269a8 StackAdj> Δ+34 {}
<POP 269a8-269b2 Naked> Σ0 →0x269ee ←0x2697e
<MI 269a8 MOVEA.L (A6+0x8),A0> {}
<MI 269ac MOVE.B #0x01,(A0)> {}
<MI 269b0 BRA 0x269ee> {}
<POP 269b2-269b6 Naked> Σ0 ↓ →0x269ee ←0x26956
<MI 269b2 TST.B D0> {}
<MI 269b4 BNE 0x269ee> {}
<POP 269b6-269ee Naked> Σ0 ↓
<Blob 0x269b6 [58] @> Δ-58 {[«58""»]}
<POP 269c2-269c4 StackAdj> Δ-6 {[«58""»]|[-6-]}
<Lit 0x269c4 58> {[«58""»]|[-2-]|[$$Do you want to specify new disk limits (WILL DESTROY DATA)]}
<POP 269d2-269d4 StackAdj> Δ-2 {[«58""»]|[-2-]|[$$Do you want to specify new disk limits (WILL DESTROY DATA)]|[-2-]}
<MI 269d4 CLR.B (A7)> {[«58""»]|[-2-]|[$$Do you want to specify new disk limits (WILL DESTROY DATA)]|[-2-]}
<Call 0x269d6 0x103f0> {[«58""»]|[-2-]|[$$Do you want to specify new disk limits (WILL DESTROY DATA)]|[-2-]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 269dc-269de StackAdj> Δ+6 {[«58""»]|[-2-]}
<MI 269de MOVE.B (A7)+,D0> Δ+2 {[«58""»]}
<MI 269e0 EXTB.W D0> {[«58""»]}
<POP 0x269e2 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«58""»]}
<POP 269e6-269ea StackAdj> Δ+58 {}
<MI 269ea MOVE.B D0,(A6-0x7)> {}
<POP 269ee-269f6 Naked> Σ0 ↓ →0x26ed0 ←0x269a8 ←0x269b2
<MI 269ee TST.B (A6-0x7)> {}
<MI 269f2 BEQ 0x26ed0> {}
<POP 269f6-26a60 Naked> Σ0 Δ-2 ↓ →0x26b24
<MI 269f6 MOVEA.L (A6+0x8),A0> {}
<Blob 0x269fa [58] @> Δ-58 {[«58""»]}
<POP 26a06-26a08 StackAdj> Δ-6 {[«58""»]|[-6-]}
<Lit 0x26a08 58> {[«58""»]|[-2-]|[$$Do you want to build a diagnostic file system on this unit]}
<POP 26a16-26a18 StackAdj> Δ-2 {[«58""»]|[-2-]|[$$Do you want to build a diagnostic file system on this unit]|[-2-]}
<POP 26a18-26a19 StackAdj> Δ+2 {[«58""»]|[-2-]|[$$Do you want to build a diagnostic file system on this unit]}
<Const 0x26a19 0x1.2> Δ-2 {[«58""»]|[-2-]|[$$Do you want to build a diagnostic file system on this unit]|[#1]}
<Call 0x26a1c 0x103f0> {[«58""»]|[-2-]|[$$Do you want to build a diagnostic file system on this unit]|[#1]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 26a22-26a24 StackAdj> Δ+6 {[«58""»]|[-2-]}
<MI 26a24 MOVE.B (A7)+,D0> Δ+2 {[«58""»]}
<MI 26a26 EXTB.W D0> {[«58""»]}
<POP 0x26a28 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«58""»]}
<POP 26a2c-26a30 StackAdj> Δ+58 {}
<MI 26a30 MOVE.B D0,(A0)> {}
<MI 26a32 MOVE.W D0,-(A7)> Δ-2 {[2, 'D0']}
<MI 26a34 MOVE.W #0xffff,D6> {[2, 'D0']}
<MI 26a38 MOVE.W 0x1000c,(A6-0x12)> {[2, 'D0']}
<MI 26a40 CLR.L D1> {[2, 'D0']}
<MI 26a42 MOVE.W D6,D1> {[2, 'D0']}
<MI 26a44 DIVU.W (A6-0x12),D1> {[2, 'D0']}
<MI 26a48 CLR.L D2> {[2, 'D0']}
<MI 26a4a MOVE.W D1,D2> {[2, 'D0']}
<MI 26a4c SUBQ.L #0x1,D2> {[2, 'D0']}
<POP 0x26a4e LimitCheck 0x0 ≤ D2 ≤ 0xffff> {[2, 'D0']}
<MI 26a58 MOVE.W D2,D6> {[2, 'D0']}
<MI 26a5a TST.B D0> {[2, 'D0']}
<MI 26a5c BEQ 0x26b24> {[2, 'D0']}
<POP 26a60-26b24 Naked> Σ-2 →0x26b26
<Pointer.fp 0x26a60 <LVAR -0x006 @ 4(rw)>> Δ-4 {[-2-]|[@@-6]}
<Call 0x26a64 0x102b8> {[-2-]|[@@-6]}
NewString(VAR a : String)
<POP 26a6a-26a6c StackAdj> Δ+4 {[-2-]}
<Blob 0x26a6c [52] @> Δ-52 {[-2-]|[«52""»]}
<MI 26a78 MOVE.W 0x29700,D0> {[-2-]|[«52""»]}
<MI 26a7e EXTW.L D0> {[-2-]|[«52""»]}
<MI 26a80 MOVE.L D0,-(A7)> Δ-4 {[-2-]|[«52""»]|[4, 'D0']}
<MI 26a82 MOVE.W 0x29702,D0> {[-2-]|[«52""»]|[4, 'D0']}
<MI 26a88 EXTW.L D0> {[-2-]|[«52""»]|[4, 'D0']}
<MI 26a8a MOVE.L D0,-(A7)> Δ-4 {[-2-]|[«52""»]|[4, 'D0']|[4, 'D0']}
<MI 26a8c MOVE.L (A7)+,D3> Δ+4 {[-2-]|[«52""»]|[4, 'D0']}
<MI 26a8e MOVE.L (A7)+,D4> Δ+4 {[-2-]|[«52""»]}
<Call 0x26a90 0x1028c> {[-2-]|[«52""»]}
?muls_d3_d4
<POP 26a96-26a98 StackAdj> Δ-4 {[-2-]|[«52""»]|[-4-]}
<POP 26a98-26a99 StackAdj> Δ+2 {[-2-]|[«52""»]|[-2-]}
<Blob 0x26a99 [2] @> Δ-2 {[-2-]|[«52""»]|[-2-]|[«2""»]}
<MI 26a9c MOVE.B 0x214bd,(A7+0x1)> {[-2-]|[«52""»]|[-2-]|[«2""»]}
<MI 26aa2 MOVE.B 0x214be,(A7+0x2)> {[-2-]|[«52""»]|[-2-]|[«2""»]}
<POP 26aa8-26aaa StackAdj> Δ-4 {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]}
<MI 26aaa MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']}
<POP 26aae-26ab0 StackAdj> Δ-4 {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
<Lit 0x26ab0 52> {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter last cylinder to be used by the DFS [ Hint =>_]}
<POP 26abe-26ac0 StackAdj> Δ-4 {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter last cylinder to be used by the DFS [ Hint =>_]|[-4-]}
<MI 26ac0 MOVE.L D4,D3> {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter last cylinder to be used by the DFS [ Hint =>_]|[-4-]}
<MI 26ac2 MOVE.L #0x13880,D4> {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter last cylinder to be used by the DFS [ Hint =>_]|[-4-]}
<Call 0x26ac8 0x10294> {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter last cylinder to be used by the DFS [ Hint =>_]|[-4-]}
?divs_d3_d4
<POP 26ace-26ad0 StackAdj> Δ-4 {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter last cylinder to be used by the DFS [ Hint =>_]|[-8-]}
<MI 26ad0 ADDQ.L #0x1,D4> {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter last cylinder to be used by the DFS [ Hint =>_]|[-8-]}
<MI 26ad2 MOVE.L D4,(A7)> {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter last cylinder to be used by the DFS [ Hint =>_]|[-4-]|[4, 'D4']}
<Call 0x26ad4 0x102e4> {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter last cylinder to be used by the DFS [ Hint =>_]|[-4-]|[4, 'D4']}
Long2String(a : Long) : String
<Lit 0x26ada> {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter last cylinder to be used by the DFS [ Hint =>_]|[-4-]|[$$…]}
<Pointer.sp 0x26ada 20> Δ-4
<Const 0x26ade 0x1.2> Δ-2
<Const 0x26ae2 0x3.2> Δ-2
<Call 0x26ae6 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 26ae8-26aea StackAdj> Δ+8
<Call 0x26aea 0x102d8> {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter last cylinder to be used by the DFS [ Hint =>_]|[-4-]|[$$…]}
StringCat4(a, b, c, d : String) : String
<POP 26af0-26af4 StackAdj> Δ+16 {[-2-]|[«52""»]|[-2-]|[«2""»]|[-4-]}
<MI 26af4 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-2-]|[«52""»]|[-2-]|[«2""»]}
<POP 26af8-26afc StackAdj> Δ+48 {[-2-]|[-8-]}
<MI 26afc MOVE.L (A6-0x6),(A7)> {[-2-]|[-4-]|[4, '(A6-0x6)']}
<Const 0x26b00 0xa.4> Δ-4 {[-2-]|[-4-]|[4, '(A6-0x6)']|[##10]}
<MI 26b04 CLR.L D0> {[-2-]|[-4-]|[4, '(A6-0x6)']|[##10]}
<MI 26b06 MOVE.W D6,D0> {[-2-]|[-4-]|[4, '(A6-0x6)']|[##10]}
<MI 26b08 MOVE.L D0,-(A7)> Δ-4 {[-2-]|[-4-]|[4, '(A6-0x6)']|[##10]|[4, 'D0']}
<Call 0x26b0a 0x103ec> {[-2-]|[-4-]|[4, '(A6-0x6)']|[##10]|[4, 'D0']}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 26b10-26b14 StackAdj> Δ+12 {[-2-]|[-4-]}
<MI 26b14 MOVE.L (A7)+,D0> Δ+4 {[-2-]}
<POP 0x26b16 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-2-]}
<MI 26b20 MOVE.W D0,D5> {[-2-]}
<MI 26b22 BRA 0x26b26> {[-2-]}
<POP 26b24-26b26 Naked> Σ-2 ↓ ←0x269f6
<MI 26b24 MOVEQ.L #0x03,D5> {[-2-]}
<POP 26b26-26b52 Naked> Σ-2 ↓ →0x26b9a ←0x26a60
<MI 26b26 CLR.L D0> {[-2-]}
<MI 26b28 MOVE.W 0x29712,D0> {[-2-]}
<MI 26b2e SUBQ.L #0x2,D0> {[-2-]}
<POP 0x26b30 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-2-]}
<MI 26b3a MOVE.W D0,D6> {[-2-]}
<Pointer.fp 0x26b3c <LVAR -0x006 @ 4(rw)>> Δ-4 {[-2-]|[@@-6]}
<Call 0x26b40 0x102b8> {[-2-]|[@@-6]}
NewString(VAR a : String)
<POP 26b46-26b48 StackAdj> Δ+2 {[-2-]|[-2-]}
<Call 0x26b48 0x1060a> {[-2-]|[-2-]}
Is_machine_type_four() : Bool
<MI 26b4e TST.B (A7)+> Δ+2 {[-2-]}
<MI 26b50 BEQ 0x26b9a> {[-2-]}
<POP 26b52-26b9a Naked> Σ-2 Δ-90 →0x26be0
<Blob 0x26b52 [70] @> Δ-70 {[-2-]|[«70""»]}
<POP 26b64-26b66 StackAdj> Δ-4 {[-2-]|[«70""»]|[-4-]}
<POP 26b66-26b67 StackAdj> Δ+2 {[-2-]|[«70""»]|[-2-]}
<Blob 0x26b67 [2] @> Δ-2 {[-2-]|[«70""»]|[-2-]|[«2""»]}
<MI 26b6a MOVE.B 0x214c1,(A7+0x1)> {[-2-]|[«70""»]|[-2-]|[«2""»]}
<MI 26b70 MOVE.B 0x214c2,(A7+0x2)> {[-2-]|[«70""»]|[-2-]|[«2""»]}
<POP 26b76-26b78 StackAdj> Δ-4 {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]}
<MI 26b78 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']}
<POP 26b7c-26b7e StackAdj> Δ-4 {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
<Lit 0x26b7e 69> {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter first cylinder to be used for read/write diagnostics [ Hint =>_]}
<POP 26b8c-26b8e StackAdj> Δ-4 {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter first cylinder to be used for read/write diagnostics [ Hint =>_]|[-4-]}
<MI 26b8e CLR.L D0> {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter first cylinder to be used for read/write diagnostics [ Hint =>_]|[-4-]}
<MI 26b90 MOVE.W 0x296fe,D0> {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter first cylinder to be used for read/write diagnostics [ Hint =>_]|[-4-]}
<MI 26b96 SUBQ.L #0x7,D0> {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter first cylinder to be used for read/write diagnostics [ Hint =>_]|[-4-]}
<MI 26b98 BRA 0x26be0> {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter first cylinder to be used for read/write diagnostics [ Hint =>_]|[-4-]}
<POP 26b9a-26be0 Naked> Σ-2 Δ-90 ↓ ←0x26b26
<Blob 0x26b9a [70] @> Δ-70 {[-2-]|[«70""»]}
<POP 26bac-26bae StackAdj> Δ-4 {[-2-]|[«70""»]|[-4-]}
<POP 26bae-26baf StackAdj> Δ+2 {[-2-]|[«70""»]|[-2-]}
<Blob 0x26baf [2] @> Δ-2 {[-2-]|[«70""»]|[-2-]|[«2""»]}
<MI 26bb2 MOVE.B 0x214c5,(A7+0x1)> {[-2-]|[«70""»]|[-2-]|[«2""»]}
<MI 26bb8 MOVE.B 0x214c6,(A7+0x2)> {[-2-]|[«70""»]|[-2-]|[«2""»]}
<POP 26bbe-26bc0 StackAdj> Δ-4 {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]}
<MI 26bc0 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']}
<POP 26bc4-26bc6 StackAdj> Δ-4 {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[-4-]}
<Lit 0x26bc6 69> {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter first cylinder to be used for read/write diagnostics [ Hint =>_]}
<POP 26bd4-26bd6 StackAdj> Δ-4 {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter first cylinder to be used for read/write diagnostics [ Hint =>_]|[-4-]}
<MI 26bd6 CLR.L D0> {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter first cylinder to be used for read/write diagnostics [ Hint =>_]|[-4-]}
<MI 26bd8 MOVE.W 0x296fe,D0> {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter first cylinder to be used for read/write diagnostics [ Hint =>_]|[-4-]}
<MI 26bde SUBQ.L #0x5,D0> {[-2-]|[«70""»]|[-2-]|[«2""»]|[-4-]|[4, '(A6-0x6)']|[$$Enter first cylinder to be used for read/write diagnostics [ Hint =>_]|[-4-]}
<POP 26be0-26db6 Naked> Σ-92 Δ+82 ↓ →0x26dba ←0x26b52
<MI 26be0 MOVE.L D0,-(A7)> Δ-4 {[-92-]|[4, 'D0']}
<Call 0x26be2 0x102e4> {[-92-]|[4, 'D0']}
Long2String(a : Long) : String
<Lit 0x26be8> {[-92-]|[$$…]}
<Pointer.sp 0x26be8 20> Δ-4
<Const 0x26bec 0x1.2> Δ-2
<Const 0x26bf0 0x3.2> Δ-2
<Call 0x26bf4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 26bf6-26bf8 StackAdj> Δ+8
<Call 0x26bf8 0x102d8> {[-92-]|[$$…]}
StringCat4(a, b, c, d : String) : String
<POP 26bfe-26c02 StackAdj> Δ+16 {[-80-]}
<MI 26c02 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[-76-]}
<POP 26c06-26c0a StackAdj> Δ+74 {[-2-]}
<POP 26c0a-26c0c StackAdj> Δ-4 {[-6-]}
<MI 26c0c MOVE.L (A6-0x6),-(A7)> Δ-4 {[-6-]|[4, '(A6-0x6)']}
<MI 26c10 CLR.L D0> {[-6-]|[4, '(A6-0x6)']}
<MI 26c12 MOVE.W D5,D0> {[-6-]|[4, '(A6-0x6)']}
<MI 26c14 MOVE.L D0,-(A7)> Δ-4 {[-6-]|[4, '(A6-0x6)']|[4, 'D0']}
<MI 26c16 CLR.L D0> {[-6-]|[4, '(A6-0x6)']|[4, 'D0']}
<MI 26c18 MOVE.W D6,D0> {[-6-]|[4, '(A6-0x6)']|[4, 'D0']}
<MI 26c1a MOVE.L D0,-(A7)> Δ-4 {[-6-]|[4, '(A6-0x6)']|[4, 'D0']|[4, 'D0']}
<Call 0x26c1c 0x103ec> {[-6-]|[4, '(A6-0x6)']|[4, 'D0']|[4, 'D0']}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 26c22-26c26 StackAdj> Δ+12 {[-6-]}
<MI 26c26 MOVE.L (A7)+,D0> Δ+4 {[-2-]}
<POP 0x26c28 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-2-]}
<MI 26c32 MOVE.W D0,(A6-0x16)> {[-2-]}
<MI 26c36 MOVE.L D0,-(A7)> Δ-4 {[-2-]|[4, 'D0']}
<MI 26c38 MOVE.L 0x29712,0x29726> {[-2-]|[4, 'D0']}
<MI 26c42 CLR.W 0x2971e> {[-2-]|[4, 'D0']}
<MI 26c48 MOVE.W #0x7fed,0x29720> {[-2-]|[4, 'D0']}
<MI 26c50 MOVE.W #0x3,0x29722> {[-2-]|[4, 'D0']}
<MI 26c58 CLR.W 0x29724> {[-2-]|[4, 'D0']}
<Const 0x26c5e 0xa.2> Δ-2 {[-2-]|[4, 'D0']|[#10]}
<Const 0x26c62 0x2972a.4> Δ-4 {[-2-]|[4, 'D0']|[#10]|[##169770]}
<Call 0x26c68 0x24c38> {[-2-]|[4, 'D0']|[#10]|[##169770]}
<POP 26c6c-26c6e StackAdj> Δ+4 {[-2-]|[4, 'D0']|[#10]}
<POP 26c6e-26c6f StackAdj> Δ+2 {[-2-]|[4, 'D0']}
<Const 0x26c6f 0x29.2> Δ-2 {[-2-]|[4, 'D0']|[#41]}
<Const 0x26c72 0x2972e.4> Δ-4 {[-2-]|[4, 'D0']|[#41]|[##169774]}
<Call 0x26c78 0x24c38> {[-2-]|[4, 'D0']|[#41]|[##169774]}
<POP 26c7c-26c7e StackAdj> Δ+4 {[-2-]|[4, 'D0']|[#41]}
<POP 26c7e-26c7f StackAdj> Δ+2 {[-2-]|[4, 'D0']}
<Const 0x26c7f 0x2a.2> Δ-2 {[-2-]|[4, 'D0']|[#42]}
<Const 0x26c82 0x29732.4> Δ-4 {[-2-]|[4, 'D0']|[#42]|[##169778]}
<Call 0x26c88 0x24c38> {[-2-]|[4, 'D0']|[#42]|[##169778]}
<POP 26c8c-26c8e StackAdj> Δ+4 {[-2-]|[4, 'D0']|[#42]}
<POP 26c8e-26c8f StackAdj> Δ+2 {[-2-]|[4, 'D0']}
<Const 0x26c8f 0x49.2> Δ-2 {[-2-]|[4, 'D0']|[#73]}
<Const 0x26c92 0x29736.4> Δ-4 {[-2-]|[4, 'D0']|[#73]|[##169782]}
<Call 0x26c98 0x24c38> {[-2-]|[4, 'D0']|[#73]|[##169782]}
<POP 26c9c-26c9e StackAdj> Δ+4 {[-2-]|[4, 'D0']|[#73]}
<POP 26c9e-26c9f StackAdj> Δ+2 {[-2-]|[4, 'D0']}
<Const 0x26c9f 0x4a.2> Δ-2 {[-2-]|[4, 'D0']|[#74]}
<Const 0x26ca2 0x2973a.4> Δ-4 {[-2-]|[4, 'D0']|[#74]|[##169786]}
<Call 0x26ca8 0x24c38> {[-2-]|[4, 'D0']|[#74]|[##169786]}
<POP 26cac-26cae StackAdj> Δ+6 {[-2-]|[4, 'D0']}
<MI 26cae MOVE.W D5,0x2973e> {[-2-]|[4, 'D0']}
<MI 26cb4 CLR.L D0> {[-2-]|[4, 'D0']}
<MI 26cb6 MOVE.B 0x29714,D0> {[-2-]|[4, 'D0']}
<MI 26cbc SUBQ.W #0x1,D0> {[-2-]|[4, 'D0']}
<POP 0x26cbe LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-2-]|[4, 'D0']}
<MI 26cc2 MOVE.B D0,0x29740> {[-2-]|[4, 'D0']}
<MI 26cc8 CLR.L D0> {[-2-]|[4, 'D0']}
<MI 26cca MOVE.B 0x29715,D0> {[-2-]|[4, 'D0']}
<MI 26cd0 SUBQ.W #0x1,D0> {[-2-]|[4, 'D0']}
<POP 0x26cd2 LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-2-]|[4, 'D0']}
<MI 26cd6 MOVE.B D0,0x29741> {[-2-]|[4, 'D0']}
<MI 26cdc CLR.L D0> {[-2-]|[4, 'D0']}
<MI 26cde MOVE.W D5,D0> {[-2-]|[4, 'D0']}
<MI 26ce0 ADDQ.L #0x1,D0> {[-2-]|[4, 'D0']}
<POP 0x26ce2 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-2-]|[4, 'D0']}
<MI 26cec MOVE.W D0,0x29742> {[-2-]|[4, 'D0']}
<MI 26cf2 CLR.B 0x29744> {[-2-]|[4, 'D0']}
<MI 26cf8 CLR.B 0x29745> {[-2-]|[4, 'D0']}
<MI 26cfe MOVE.L (A7),D0> {[-2-]|[4, 'D0']}
<MI 26d00 CLR.L D1> {[-2-]|[4, 'D0']}
<MI 26d02 MOVE.W D0,D1> {[-2-]|[4, 'D0']}
<MI 26d04 SUBQ.L #0x1,D1> {[-2-]|[4, 'D0']}
<POP 0x26d06 LimitCheck 0x0 ≤ D1 ≤ 0xffff> {[-2-]|[4, 'D0']}
<MI 26d10 MOVE.W D1,0x29746> {[-2-]|[4, 'D0']}
<MI 26d16 CLR.L D0> {[-2-]|[4, 'D0']}
<MI 26d18 MOVE.B 0x29714,D0> {[-2-]|[4, 'D0']}
<MI 26d1e SUBQ.W #0x1,D0> {[-2-]|[4, 'D0']}
<POP 0x26d20 LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-2-]|[4, 'D0']}
<MI 26d24 MOVE.B D0,0x29748> {[-2-]|[4, 'D0']}
<MI 26d2a CLR.L D0> {[-2-]|[4, 'D0']}
<MI 26d2c MOVE.B 0x29715,D0> {[-2-]|[4, 'D0']}
<MI 26d32 SUBQ.W #0x1,D0> {[-2-]|[4, 'D0']}
<POP 0x26d34 LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-2-]|[4, 'D0']}
<MI 26d38 MOVE.B D0,0x29749> {[-2-]|[4, 'D0']}
<MI 26d3e MOVE.L (A7),D0> {[-2-]|[4, 'D0']}
<MI 26d40 MOVE.W D0,0x2974a> {[-2-]|[4, 'D0']}
<MI 26d46 CLR.B 0x2974c> {[-2-]|[4, 'D0']}
<MI 26d4c CLR.B 0x2974d> {[-2-]|[4, 'D0']}
<MI 26d52 CLR.L D0> {[-2-]|[4, 'D0']}
<MI 26d54 MOVE.W 0x29712,D0> {[-2-]|[4, 'D0']}
<MI 26d5a SUBQ.L #0x1,D0> {[-2-]|[4, 'D0']}
<POP 0x26d5c LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-2-]|[4, 'D0']}
<MI 26d66 MOVE.W D0,0x2974e> {[-2-]|[4, 'D0']}
<MI 26d6c CLR.L D0> {[-2-]|[4, 'D0']}
<MI 26d6e MOVE.B 0x29714,D0> {[-2-]|[4, 'D0']}
<MI 26d74 SUBQ.W #0x1,D0> {[-2-]|[4, 'D0']}
<POP 0x26d76 LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-2-]|[4, 'D0']}
<MI 26d7a MOVE.B D0,0x29750> {[-2-]|[4, 'D0']}
<MI 26d80 CLR.L D0> {[-2-]|[4, 'D0']}
<MI 26d82 MOVE.B 0x29715,D0> {[-2-]|[4, 'D0']}
<MI 26d88 SUBQ.W #0x1,D0> {[-2-]|[4, 'D0']}
<POP 0x26d8a LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-2-]|[4, 'D0']}
<MI 26d8e MOVE.B D0,0x29751> {[-2-]|[4, 'D0']}
<MI 26d94 MOVE.B #0x01,0x29753> {[-2-]|[4, 'D0']}
<MI 26d9c MOVE.W (A7+0x4),D0> {[-2-]|[4, 'D0']}
<MI 26da0 MOVE.B D0,0x29752> {[-2-]|[4, 'D0']}
<MI 26da6 MOVEA.L 0x29704,A0> {[-2-]|[4, 'D0']}
<MI 26dac MOVE.L A0,-(A7)> Δ-4 {[-2-]|[4, 'D0']|[4, 'A0']}
<MI 26dae MOVE.W (A0),D0> {[-2-]|[4, 'D0']|[4, 'A0']}
<MI 26db0 CMPI.W #0x001e,D0> {[-2-]|[4, 'D0']|[4, 'A0']}
<MI 26db4 BLE 0x26dba> {[-2-]|[4, 'D0']|[4, 'A0']}
<POP 26db6-26dba Naked> Σ-10 ↓
<MI 26db6 MOVE.W #0x1e,(A0)> {[-10-]}
<POP 26dba-26dc2 Naked> Σ-10 Δ-4 ↓ ←0x26be0
<MI 26dba MOVE.W (A0),D0> {[-10-]}
<MI 26dbc EXTW.L D0> {[-10-]}
<MI 26dbe MOVE.L D0,-(A7)> Δ-4 {[-10-]|[4, 'D0']}
<MI 26dc0 MOVEQ.L #0x01,D7> {[-10-]|[4, 'D0']}
<POP 26dc2-26dc6 Naked> Σ-14 ↓ →0x26df6 ←0x26dc6
<MI 26dc2 CMP.L (A7),D7> {[-14-]}
<MI 26dc4 BGT 0x26df6> {[-14-]}
<POP 26dc6-26df6 Naked> Σ-14 ↓ →0x26dc2
<MI 26dc6 MOVE.L D7,D0> {[-14-]}
<MI 26dc8 SUBQ.L #0x1,D0> {[-14-]}
<POP 0x26dca LimitCheck 0x0 ≤ D0 ≤ 0x1d> {[-14-]}
<MI 26dd4 LEA.L 0x2971e,A0> {[-14-]}
<MI 26dda MOVE.L D7,D1> {[-14-]}
<MI 26ddc SUBQ.L #0x1,D1> {[-14-]}
<POP 0x26dde LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-14-]}
<MI 26de8 MOVEA.L (A7+0x4),A1> {[-14-]}
<MI 26dec MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x36)> {[-14-]}
<MI 26df2 ADDQ.L #0x1,D7> {[-14-]}
<MI 26df4 BVC 0x26dc2> {[-14-]}
<POP 26df6-26e02 Naked> Σ-14 Δ+4 ↓ ←0x26dc2
<POP 26df6-26df8 StackAdj> Δ+4 {[-10-]}
<MI 26df8 MOVEA.L (A7),A0> {[-10-]}
<MI 26dfa MOVE.W (A0),D0> {[-10-]}
<MI 26dfc EXTW.L D0> {[-10-]}
<MI 26dfe ADDQ.L #0x1,D0> {[-10-]}
<MI 26e00 MOVE.L D0,D7> {[-10-]}
<POP 26e02-26e0a Naked> Σ-10 ↓ →0x26e26 ←0x26e0a
<MI 26e02 CMPI.L #0x0000001e,D7> {[-10-]}
<MI 26e08 BGT 0x26e26> {[-10-]}
<POP 26e0a-26e26 Naked> Σ-10 ↓ →0x26e02
<MI 26e0a MOVE.L D7,D0> {[-10-]}
<MI 26e0c SUBQ.L #0x1,D0> {[-10-]}
<POP 0x26e0e LimitCheck 0x0 ≤ D0 ≤ 0x1d> {[-10-]}
<MI 26e18 LEA.L 0x2971e,A0> {[-10-]}
<MI 26e1e CLR.B (A0+D0.L+#0x36)> {[-10-]}
<MI 26e22 ADDQ.L #0x1,D7> {[-10-]}
<MI 26e24 BVC 0x26e02> {[-10-]}
<POP 26e26-26e7e Naked> Σ-10 Δ+10 ↓ →0x26e9e ←0x26e02
<POP 26e26-26e27 StackAdj> Δ+10 ↓ {}
<Blob 0x26e27 [22] @> Δ-22 {[«22""»]}
<POP 26e38-26e3a StackAdj> Δ-4 {[«22""»]|[-4-]}
<Lit 0x26e3a 21> {[«22""»]|[$$Writing shared label.]}
<Call 0x26e4a 0x103e0> {[«22""»]|[$$Writing shared label.]}
WriteConsoleStringCrLf(str : String)
<POP 26e50-26e54 StackAdj> Δ+26 {}
<Call 0x26e54 0x22c14> {}
<Const 0x26e58 0x3.2> Δ-2 {[#3]}
<Const 0x26e5c 0x2.2> Δ-2 {[#3]|[#2]}
<Const 0x26e60 0x1.4> Δ-4 {[#3]|[#2]|[##1]}
<Blob 0x26e64 [4] 0x2971a> Δ-4 {[#3]|[#2]|[##1]|[«4»]}
<Pointer.fp 0x26e6a <LVAR -0x008 @ 1(r)>> Δ-4 {[#3]|[#2]|[##1]|[«4»]|[@@-8]}
<Call 0x26e6e 0x1036c> {[#3]|[#2]|[##1]|[«4»]|[@@-8]}
RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
<POP 26e74-26e78 StackAdj> Δ+16 {}
<MI 26e78 TST.B (A6-0x8)> {}
<MI 26e7c BEQ 0x26e9e> {}
<POP 26e7e-26e9e Naked> Σ0 ↓
<Const 0x26e7e 0x3.2> Δ-2 {[#3]}
<Const 0x26e82 0x3.2> Δ-2 {[#3]|[#3]}
<Const 0x26e86 0x1.4> Δ-4 {[#3]|[#3]|[##1]}
<Blob 0x26e8a [4] 0x2971a> Δ-4 {[#3]|[#3]|[##1]|[«4»]}
<Pointer.fp 0x26e90 <LVAR -0x008 @ 1(r)>> Δ-4 {[#3]|[#3]|[##1]|[«4»]|[@@-8]}
<Call 0x26e94 0x1036c> {[#3]|[#3]|[##1]|[«4»]|[@@-8]}
RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
<POP 26e9a-26e9e StackAdj> Δ+16 {}
<POP 26e9e-26ea4 Naked> Σ0 ↓ →0x26ed0 ←0x26e26
<MI 26e9e TST.B (A6-0x8)> {}
<MI 26ea2 BNE 0x26ed0> {}
<POP 26ea4-26ed0 Naked> Σ0 ↓
<Blob 0x26ea4 [36] @> Δ-36 {[«36""»]}
<POP 26eb6-26eb8 StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x26eb8 35> {[«36""»]|[$$Can't write VOLUME label, aborting!]}
<Call 0x26ec8 0x22522> {[«36""»]|[$$Can't write VOLUME label, aborting!]}
<POP 26ecc-26ed0 StackAdj> Δ+40 {}
<POP 26ed0-26ed8 Epilogue> Σ0 ←0x269ee ←0x26e9e
@ 26ed8
<LVAR -0x004 4(rw)>
<LVAR -0x006 2(rw)>
<LVAR -0x008 2(rw)>
<LVAR -0x2012 @>
<LVAR -0x2017 @ 1(r)>
<LVAR -0x2018 1(rw)>
<LVAR -0x201a 2(w)>
<LVAR -0x201c @ 2(w) 4(r)>
<POP 26ed8-27284 Body> Δ-4
<POP 26ed8-26eee Prologue> Σ0 ↓
<POP 26eee-26ef8 RegCacheLoad> Σ0 ↓
<POP 26ef8-26fb4 Naked> Σ0 ↓
<Blob 0x26ef8 [24] @> Δ-24 {[«24""»]}
<POP 26f0a-26f0c StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x26f0c 23> {[«24""»]|[$$Constructing free list.]}
<Call 0x26f1c 0x103e0> {[«24""»]|[$$Constructing free list.]}
WriteConsoleStringCrLf(str : String)
<POP 26f22-26f26 StackAdj> Δ+28 {}
<MI 26f26 LEA.L (A6-0x2012),A0> {}
<MI 26f2a MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 26f2c MOVEA.L (A7)+,A4> Δ+4 {}
<MI 26f2e MOVE.W 0x1000c,D0> {}
<MI 26f34 MULU.W 0x2973a,D0> {}
<MI 26f3a CLR.L D1> {}
<MI 26f3c MOVE.B 0x2973c,D1> {}
<MI 26f42 MULU.W 0x1000a,D1> {}
<MI 26f48 ADD.L D0,D1> {}
<MI 26f4a CLR.L D0> {}
<MI 26f4c MOVE.B 0x2973d,D0> {}
<MI 26f52 ADDQ.W #0x1,D0> {}
<MI 26f54 ASR.W #0x1,D0> {}
<MI 26f56 EXTW.L D0> {}
<MI 26f58 ADD.L D1,D0> {}
<POP 0x26f5a LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 26f64 MOVE.W D0,(A6-0x8)> {}
<MI 26f68 MOVE.W 0x1000c,D0> {}
<MI 26f6e MULU.W 0x2973e,D0> {}
<MI 26f74 CLR.L D1> {}
<MI 26f76 MOVE.B 0x29740,D1> {}
<MI 26f7c MULU.W 0x1000a,D1> {}
<MI 26f82 ADD.L D0,D1> {}
<MI 26f84 CLR.L D0> {}
<MI 26f86 MOVE.B 0x29741,D0> {}
<MI 26f8c SUBQ.W #0x1,D0> {}
<MI 26f8e EXTW.L D0> {}
<MI 26f90 DIVS.W #0x2,D0> {}
<MI 26f94 EXTW.L D0> {}
<MI 26f96 ADD.L D1,D0> {}
<POP 0x26f98 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 26fa2 MOVE.W D0,(A6-0x6)> {}
<MI 26fa6 CLR.L D0> {}
<MI 26fa8 MOVE.W 0x2973e,D0> {}
<MI 26fae MOVE.L D0,(A6-0x4)> {}
<MI 26fb2 MOVEQ.L #0x00,D5> {}
<POP 26fb4-26fe0 Naked> Σ0 ↓ →0x26fb4 ←0x26fb4
<MI 26fb4 CLR.L D0> {}
<MI 26fb6 MOVE.W D5,D0> {}
<MI 26fb8 MOVEA.L A4,A0> {}
<MI 26fba MOVE.L D0,D1> {}
<MI 26fbc ROR.L #0x3,D1> {}
<MI 26fbe ADDA.W D1,A0> {}
<MI 26fc0 SWAP.W D1> {}
<MI 26fc2 ROL.W #0x3,D1> {}
<MI 26fc4 MOVE.W #0xff7f,D2> {}
<MI 26fc8 ROR.W D1,D2> {}
<MI 26fca AND.B D2,(A0)> {}
<MI 26fcc ADDQ.L #0x1,D0> {}
<POP 0x26fce LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 26fd8 MOVE.W D0,D5> {}
<MI 26fda CMP.W (A6-0x8),D5> {}
<MI 26fde BNE 0x26fb4> {}
<POP 26fe0-27016 Naked> Σ0 ↓ →0x26fe0 ←0x26fe0
<MI 26fe0 CLR.L D0> {}
<MI 26fe2 MOVE.W D5,D0> {}
<MI 26fe4 MOVEA.L A4,A0> {}
<MI 26fe6 MOVE.L D0,D1> {}
<MI 26fe8 ROR.L #0x3,D1> {}
<MI 26fea ADDA.W D1,A0> {}
<MI 26fec SWAP.W D1> {}
<MI 26fee ROL.W #0x3,D1> {}
<MI 26ff0 MOVE.B #0x80,D2> {}
<MI 26ff4 LSR.B D1,D2> {}
<MI 26ff6 OR.B D2,(A0)> {}
<MI 26ff8 ADDQ.L #0x1,D0> {}
<POP 0x26ffa LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 27004 MOVE.W D0,D5> {}
<MI 27006 CLR.L D0> {}
<MI 27008 MOVE.W (A6-0x6),D0> {}
<MI 2700c ADDQ.L #0x1,D0> {}
<MI 2700e CLR.L D1> {}
<MI 27010 MOVE.W D5,D1> {}
<MI 27012 CMP.L D0,D1> {}
<MI 27014 BNE 0x26fe0> {}
<POP 27016-27028 Naked> Σ0 ↓
<MI 27016 MOVEA.L A4,A0> {}
<MI 27018 ROR.L #0x3,D1> {}
<MI 2701a ADDA.W D1,A0> {}
<MI 2701c SWAP.W D1> {}
<MI 2701e ROL.W #0x3,D1> {}
<MI 27020 MOVE.W #0xff7f,D0> {}
<MI 27024 ROR.W D1,D0> {}
<MI 27026 AND.B D0,(A0)> {}
<POP 27028-27034 Naked> Σ0 ↓ →0x2705a ←0x27034
<MI 27028 CLR.L D0> {}
<MI 2702a MOVE.W D5,D0> {}
<MI 2702c CMPI.L #0x0000ffff,D0> {}
<MI 27032 BEQ 0x2705a> {}
<POP 27034-2705a Naked> Σ0 →0x27028
<MI 27034 ADDQ.L #0x1,D0> {}
<POP 0x27036 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 27040 MOVE.W D0,D5> {}
<MI 27042 CLR.L D0> {}
<MI 27044 MOVE.W D5,D0> {}
<MI 27046 MOVEA.L A4,A0> {}
<MI 27048 ROR.L #0x3,D0> {}
<MI 2704a ADDA.W D0,A0> {}
<MI 2704c SWAP.W D0> {}
<MI 2704e ROL.W #0x3,D0> {}
<MI 27050 MOVE.W #0xff7f,D1> {}
<MI 27054 ROR.W D0,D1> {}
<MI 27056 AND.B D1,(A0)> {}
<MI 27058 BRA 0x27028> {}
<POP 2705a-2705c Naked> Σ0 ↓ ←0x27028
<MI 2705a MOVEQ.L #0x00,D0> {}
<POP 2705c-27088 Naked> Σ0 Δ-4 ↓ →0x2714c ←0x27158
<MI 2705c MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<POP 0x2705e LimitCheck 0x0 ≤ D0 ≤ 0x7ff> {[4, 'D0']}
<MI 27068 MOVE.L D0,D1> {[4, 'D0']}
<MI 2706a ASL.L #0x2,D1> {[4, 'D0']}
<MI 2706c LEA.L 0x296d2,A0> {[4, 'D0']}
<MI 27072 LEA.L (A0+D1.L),A0> {[4, 'D0']}
<MI 27076 CLR.L D1> {[4, 'D0']}
<MI 27078 MOVE.W (A0+0x44c),D1> {[4, 'D0']}
<MI 2707c LSL.W #0x2,D1> {[4, 'D0']}
<MI 2707e LSR.W #0x2,D1> {[4, 'D0']}
<MI 27080 CMP.L (A6-0x4),D1> {[4, 'D0']}
<MI 27084 BHI 0x2714c> {[4, 'D0']}
<POP 27088-27094 Naked> Σ-4 ↓ →0x2709c
<MI 27088 CLR.L D2> {[-4-]}
<MI 2708a MOVE.B (A0+0x44e),D2> {[-4-]}
<MI 2708e CMPI.W #0x00ff,D2> {[-4-]}
<MI 27092 BNE 0x2709c> {[-4-]}
<POP 27094-2709c Naked> Σ-4 →0x270b2
<MI 27094 MOVE.W 0x1000c,D7> {[-4-]}
<MI 2709a BRA 0x270b2> {[-4-]}
<POP 2709c-270a8 Naked> Σ-4 ↓ →0x270b0 ←0x27088
<MI 2709c CLR.L D3> {[-4-]}
<MI 2709e MOVE.B (A0+0x44f),D3> {[-4-]}
<MI 270a2 CMPI.W #0x00ff,D3> {[-4-]}
<MI 270a6 BNE 0x270b0> {[-4-]}
<POP 270a8-270b0 Naked> Σ-4 →0x270b2
<MI 270a8 MOVE.W 0x1000a,D7> {[-4-]}
<MI 270ae BRA 0x270b2> {[-4-]}
<POP 270b0-270b2 Naked> Σ-4 ↓ ←0x2709c
<MI 270b0 MOVEQ.L #0x01,D7> {[-4-]}
<POP 270b2-270d4 Naked> Σ-4 ↓ →0x2710e ←0x27094 ←0x270a8
<MI 270b2 MOVE.L D1,D4> {[-4-]}
<MI 270b4 CLR.L D3> {[-4-]}
<MI 270b6 MOVE.W 0x1000c,D3> {[-4-]}
<Call 0x270bc 0x10290> {[-4-]}
?mulu_d3_d4
<POP 0x270c2 LimitCheck 0x0 ≤ D4 ≤ 0xffff> {[-4-]}
<MI 270cc MOVE.W D4,D6> {[-4-]}
<MI 270ce CMPI.W #0x00ff,D2> {[-4-]}
<MI 270d2 BEQ 0x2710e> {[-4-]}
<POP 270d4-270f8 Naked> Σ-4 ↓ →0x2710e
<MI 270d4 MULU.W 0x1000a,D2> {[-4-]}
<MI 270da CLR.L D1> {[-4-]}
<MI 270dc MOVE.W D6,D1> {[-4-]}
<MI 270de ADD.L D1,D2> {[-4-]}
<POP 0x270e0 LimitCheck 0x0 ≤ D2 ≤ 0xffff> {[-4-]}
<MI 270ea MOVE.W D2,D6> {[-4-]}
<MI 270ec CLR.L D1> {[-4-]}
<MI 270ee MOVE.B (A0+0x44f),D1> {[-4-]}
<MI 270f2 CMPI.W #0x00ff,D1> {[-4-]}
<MI 270f6 BEQ 0x2710e> {[-4-]}
<POP 270f8-2710e Naked> Σ-4 ↓
<MI 270f8 ASR.W #0x1,D1> {[-4-]}
<MI 270fa CLR.L D2> {[-4-]}
<MI 270fc MOVE.W D6,D2> {[-4-]}
<MI 270fe EXTW.L D1> {[-4-]}
<MI 27100 ADD.L D2,D1> {[-4-]}
<POP 0x27102 LimitCheck 0x0 ≤ D1 ≤ 0xffff> {[-4-]}
<MI 2710c MOVE.W D1,D6> {[-4-]}
<POP 2710e-27112 Naked> Σ-4 ↓ →0x2714c ←0x270b2 ←0x270d4
<MI 2710e TST.W D6> {[-4-]}
<MI 27110 BEQ 0x2714c> {[-4-]}
<POP 27112-2714c Naked> Σ-4 ↓ →0x27112 ←0x27112
<MI 27112 CLR.L D0> {[-4-]}
<MI 27114 MOVE.W D6,D0> {[-4-]}
<MI 27116 MOVEA.L A4,A0> {[-4-]}
<MI 27118 MOVE.L D0,D1> {[-4-]}
<MI 2711a ROR.L #0x3,D1> {[-4-]}
<MI 2711c ADDA.W D1,A0> {[-4-]}
<MI 2711e SWAP.W D1> {[-4-]}
<MI 27120 ROL.W #0x3,D1> {[-4-]}
<MI 27122 MOVE.W #0xff7f,D2> {[-4-]}
<MI 27126 ROR.W D1,D2> {[-4-]}
<MI 27128 AND.B D2,(A0)> {[-4-]}
<MI 2712a ADDQ.L #0x1,D0> {[-4-]}
<POP 0x2712c LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-4-]}
<MI 27136 MOVE.W D0,D6> {[-4-]}
<MI 27138 CLR.L D0> {[-4-]}
<MI 2713a MOVE.W D7,D0> {[-4-]}
<MI 2713c SUBQ.L #0x1,D0> {[-4-]}
<POP 0x2713e LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-4-]}
<MI 27148 MOVE.W D0,D7> {[-4-]}
<MI 2714a BNE 0x27112> {[-4-]}
<POP 2714c-27158 Naked> Σ-4 ↓ →0x2715e ←0x2705c ←0x2710e
<MI 2714c MOVE.L (A7),D0> {[-4-]}
<MI 2714e ADDQ.L #0x1,D0> {[-4-]}
<MI 27150 CMPI.L #0x000007ff,D0> {[-4-]}
<MI 27156 BGT 0x2715e> {[-4-]}
<POP 27158-2715e Naked> Σ-4 Δ+4 →0x2705c
<POP 27158-2715a StackAdj> Δ+4 {}
<MI 2715a BRA 0x2705c> {}
<POP 2715e-27192 Naked> Σ-4 Δ+4 ↓ ←0x2714c
<POP 2715e-27160 StackAdj> Δ+4 {}
<Blob 0x27160 [18] @> Δ-18 {[«18""»]}
<POP 2716c-2716e StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x2716e 18> {[«18""»]|[$$Writing free list.]}
<Call 0x2717e 0x103e0> {[«18""»]|[$$Writing free list.]}
WriteConsoleStringCrLf(str : String)
<POP 27184-27188 StackAdj> Δ+22 {}
<MI 27188 CLR.B (A6-0x2018)> {}
<MI 2718a MOVEQ.L #0x00,D6> {}
<MI 2718c MOVEQ.L #0x00,D7> {}
<MI 2718e MOVE.W #0xffff,D5> {}
<POP 27192-271a8 Naked> Σ0 ↓ →0x271be ←0x2725a
<MI 27192 CLR.L D0> {}
<MI 27194 MOVE.W D5,D0> {}
<MI 27196 MOVEA.L A4,A0> {}
<MI 27198 ROR.L #0x3,D0> {}
<MI 2719a ADDA.W D0,A0> {}
<MI 2719c SWAP.W D0> {}
<MI 2719e ROL.W #0x3,D0> {}
<MI 271a0 MOVE.B (A0),D1> {}
<MI 271a2 LSL.B D0,D1> {}
<MI 271a4 LSR.B #0x7,D1> {}
<MI 271a6 BEQ 0x271be> {}
<POP 271a8-271be Naked> Σ0 ↓
<MI 271a8 CLR.L D0> {}
<MI 271aa MOVE.W D7,D0> {}
<MI 271ac ADDQ.L #0x1,D0> {}
<POP 0x271ae LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 271b8 MOVE.W D0,D7> {}
<MI 271ba MOVE.B #0x01,(A6-0x2018)> {}
<POP 271be-271d6 Naked> Σ0 ↓ →0x271da ←0x27192
<MI 271be CLR.L D0> {}
<MI 271c0 MOVE.W D5,D0> {}
<MI 271c2 MOVEA.L A4,A0> {}
<MI 271c4 MOVE.L D0,D1> {}
<MI 271c6 ROR.L #0x3,D1> {}
<MI 271c8 ADDA.W D1,A0> {}
<MI 271ca SWAP.W D1> {}
<MI 271cc ROL.W #0x3,D1> {}
<MI 271ce MOVE.B (A0),D2> {}
<MI 271d0 LSL.B D1,D2> {}
<MI 271d2 LSR.B #0x7,D2> {}
<MI 271d4 BNE 0x271da> {}
<POP 271d6-271da Naked> Σ0 ↓ →0x271e0
<MI 271d6 TST.B (A6-0x2018)> {}
<MI 271d8 BNE 0x271e0> {}
<POP 271da-271e0 Naked> Σ0 ↓ →0x2725a ←0x271be
<MI 271da CMPI.W #0x4000,D7> {}
<MI 271de BNE 0x2725a> {}
<POP 271e0-271f6 Naked> Σ0 ↓ →0x271f8 ←0x271d6
<MI 271e0 MOVE.W D6,(A6-0x201a)> {}
<MI 271e4 MOVE.W D7,(A6-0x201c)> {}
<MI 271e8 MOVE.L (A6-0x201c),0x10022> {}
<MI 271f0 CMPI.W #0x4000,D7> {}
<MI 271f4 BNE 0x271f8> {}
<POP 271f6-271f8 Naked> Σ0 →0x27204
<MI 271f6 BRA 0x27204> {}
<POP 271f8-27204 Naked> Σ0 ↓ ←0x271e0
<MI 271f8 ADDQ.L #0x1,D0> {}
<POP 0x271fa LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<POP 27204-2722a Naked> Σ0 ↓ →0x27256 ←0x271f6
<MI 27204 MOVE.W D0,D6> {}
<Const 0x27206 0x3.2> Δ-2 {[#3]}
<MI 2720a MOVE.W D6,-(A7)> Δ-2 {[#3]|[2, 'D6']}
<Const 0x2720c 0x1.4> Δ-4 {[#3]|[2, 'D6']|[##1]}
<MI 27210 LEA.L (A6-0x201c),A0> {[#3]|[2, 'D6']|[##1]}
<MI 27214 MOVE.L A0,-(A7)> Δ-4 {[#3]|[2, 'D6']|[##1]|[4, 'A0']}
<Pointer.fp 0x27216 <LVAR -0x2017 @ 1(r)>> Δ-4 {[#3]|[2, 'D6']|[##1]|[4, 'A0']|[@@-8215]}
<Call 0x2721a 0x1036c> {[#3]|[2, 'D6']|[##1]|[4, 'A0']|[@@-8215]}
RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
<POP 27220-27224 StackAdj> Δ+16 {}
<MI 27224 TST.B (A6-0x2017)> {}
<MI 27228 BNE 0x27256> {}
<POP 2722a-27256 Naked> Σ0 ↓
<Blob 0x2722a [56] @> Δ-56 {[«56""»]}
<POP 2723c-2723e StackAdj> Δ-4 {[«56""»]|[-4-]}
<Lit 0x2723e 55> {[«56""»]|[$$Can't construct free list due to disk errors, aborting!]}
<Call 0x2724e 0x22522> {[«56""»]|[$$Can't construct free list due to disk errors, aborting!]}
<POP 27252-27256 StackAdj> Δ+60 {}
<POP 27256-2725a Naked> Σ0 ↓ ←0x27204
<MI 27256 MOVEQ.L #0x00,D7> {}
<MI 27258 CLR.B (A6-0x2018)> {}
<POP 2725a-27270 Naked> Σ0 ↓ →0x27192 ←0x271da
<MI 2725a CLR.L D0> {}
<MI 2725c MOVE.W D5,D0> {}
<MI 2725e SUBQ.L #0x1,D0> {}
<POP 0x27260 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {}
<MI 2726a MOVE.W D0,D5> {}
<MI 2726c BNE 0x27192> {}
<POP 27270-2727c Naked> Σ0 ↓
<MI 27270 MOVE.W D6,0x10010> {}
<Call 0x27276 0x10390> {}
WriteFreeList(void)
<POP 2727c-27284 Epilogue> Σ0
@ 27284
<LVAR -0x005 @ 1(r)>
<LVAR -0x006 @ 1(r)>
<LVAR -0x00a @ 4(r)>
<LVAR -0x00c @ 2(rw)>
<POP 27284-2754e Body>
<POP 27284-2729a Prologue> Σ0 ↓
<POP 2729a-272ae RegCacheLoad> Σ0 ↓
<POP 272ae-272ec Naked> Σ0 ↓
<Blob 0x272ae [38] @> Δ-38 {[«38""»]}
<POP 272ba-272bc StackAdj> Δ-4 {[«38""»]|[-4-]}
<Lit 0x272bc 38> {[«38""»]|[$$Allocating and initializing directory.]}
<Call 0x272ca 0x103e0> {[«38""»]|[$$Allocating and initializing directory.]}
WriteConsoleStringCrLf(str : String)
<POP 272d0-272d4 StackAdj> Δ+42 {}
<Pointer.fp 0x272d4 <LVAR -0x00a @ 4(r)>> Δ-4 {[@@-10]}
<Const 0x272d6 0x4d.4> Δ-4 {[@@-10]|[##77]}
<Call 0x272da 0x1029c> {[@@-10]|[##77]}
Malloc1(length : Long) : Pointer
<POP 272e0-272e2 StackAdj> Δ+8 {}
<MI 272e2 MOVEA.L (A6-0xa),A0> {}
<MI 272e4 MOVE.W #0x100,(A0+0x20)> {}
<MI 272ea MOVEQ.L #0x00,D6> {}
<POP 272ec-27304 Naked> Σ0 ↓ →0x27334 ←0x27334
<MI 272ec MOVE.L (A6-0xa),-(A7)> Δ-4 {[4, '(A6-0xa)']}
<Const 0x272ee 0x1.2> Δ-2 {[4, '(A6-0xa)']|[#1]}
<Pointer.fp 0x272f0 <LVAR -0x005 @ 1(r)>> Δ-4 {[4, '(A6-0xa)']|[#1]|[@@-5]}
<Call 0x272f4 0x10378> {[4, '(A6-0xa)']|[#1]|[@@-5]}
FS10378(MOD a : File; b: Byte; VAR c: Bool)
<POP 272fa-272fe StackAdj> Δ+10 {}
<MI 272fe TST.B (A6-0x5)> {}
<MI 27302 BEQ 0x27334> {}
<POP 27304-27334 Naked> Σ0 ↓
<Pointer.fp 0x27304 <LVAR -0x00a @ 4(r)>> Δ-4 {[@@-10]}
<Const 0x27306 0x4d.4> Δ-4 {[@@-10]|[##77]}
<Call 0x2730a 0x102a8> {[@@-10]|[##77]}
Free2(a : Pointer; b : Long)
<POP 27310-27312 StackAdj> Δ+8 {}
<Blob 0x27312 [56] @> Δ-56 {[«56""»]}
<POP 2731e-27320 StackAdj> Δ-4 {[«56""»]|[-4-]}
<Lit 0x27320 56> {[«56""»]|[$$Insufficient disk space to allocate directory, aborting!]}
<Call 0x2732c 0x22522> {[«56""»]|[$$Insufficient disk space to allocate directory, aborting!]}
<POP 27330-27334 StackAdj> Δ+60 {}
<POP 27334-27358 Naked> Σ0 ↓ →0x272ec ←0x272ec
<POP 0x27334 LimitCheck 0x0 ≤ D6 ≤ 0x7> {}
<MI 2733a MOVE.L D6,D0> {}
<MI 2733c ASL.L #0x1,D0> {}
<MI 2733e LEA.L 0x0,A0> {}
<MI 27342 LEA.L (A0+D0.L),A0> {}
<MI 27346 ADDA.L #0x10012,A0> {}
<MI 2734c MOVEA.L (A6-0xa),A1> {}
<MI 2734e MOVE.W (A1+0x24),(A0)> {}
<MI 27352 ADDQ.L #0x1,D6> {}
<MI 27354 CMP.L #0x07,D6> {}
<MI 27356 BLE 0x272ec> {}
<POP 27358-2736e Naked> Σ0 ↓
<Pointer.fp 0x27358 <LVAR -0x00a @ 4(r)>> Δ-4 {[@@-10]}
<Const 0x2735a 0x4d.4> Δ-4 {[@@-10]|[##77]}
<Call 0x2735e 0x102a8> {[@@-10]|[##77]}
Free2(a : Pointer; b : Long)
<POP 27364-27366 StackAdj> Δ+8 {}
<MI 27366 MOVE.W #0xffff,(A6-0xc)> {}
<MI 2736c MOVEQ.L #0x00,D7> {}
<POP 2736e-27396 Naked> Σ0 ↓ →0x2736e ←0x2736e
<POP 0x2736e LimitCheck 0x0 ≤ D7 ≤ 0x1ff> {}
<MI 27378 MOVE.L D7,D0> {}
<MI 2737a ASL.L #0x1,D0> {}
<MI 2737c LEA.L 0x296d2,A0> {}
<MI 27382 LEA.L (A0+D0.L),A0> {}
<MI 27386 MOVE.W (A6-0xc),(A0+0x5462)> {}
<MI 2738c ADDQ.L #0x1,D7> {}
<MI 2738e CMPI.L #0x000001ff,D7> {}
<MI 27394 BLE 0x2736e> {}
<POP 27396-27398 Naked> Σ0 ↓
<MI 27396 MOVEQ.L #0x00,D6> {}
<POP 27398-2739a Naked> Σ0 ↓ ←0x27538
<MI 27398 MOVEQ.L #0x00,D5> {}
<POP 2739a-273a6 Naked> Σ0 ↓ →0x273b4 ←0x27530
<POP 2739a-2739c StackAdj> Δ-2 {[-2-]}
<Call 0x2739c 0x105f8> {[-2-]}
Is_machine_type_one() : Bool
<MI 273a2 TST.B (A7)+> Δ+2 {}
<MI 273a4 BNE 0x273b4> {}
<POP 273a6-273b4 Naked> Σ0 ↓ →0x27434
<POP 273a6-273a8 StackAdj> Δ-2 {[-2-]}
<Call 0x273a8 0x10604> {[-2-]}
Is_machine_type_three() : Bool
<MI 273ae TST.B (A7)+> Δ+2 {}
<MI 273b0 BEQ 0x27434> {}
<POP 273b4-273b6 Naked> Σ0 ↓ ←0x2739a
<MI 273b4 MOVEQ.L #0x00,D7> {}
<POP 273b6-27404 Naked> Σ0 ↓ →0x27426 ←0x27426
<Const 0x273b6 0xb.2> Δ-2 {[#11]}
<MI 273ba MOVE.L D5,D0> {[#11]}
<MI 273bc ASL.L #0x7,D0> {[#11]}
<POP 0x273be LimitCheck 0x0 ≤ D6 ≤ 0x7> {[#11]}
<MI 273c4 MOVE.L D6,D1> {[#11]}
<MI 273c6 ASL.L #0x1,D1> {[#11]}
<MI 273c8 LEA.L 0x0,A0> {[#11]}
<MI 273cc LEA.L (A0+D1.L),A0> {[#11]}
<MI 273d0 ADDA.L #0x10012,A0> {[#11]}
<MI 273d6 CLR.L D1> {[#11]}
<MI 273d8 MOVE.W (A0),D1> {[#11]}
<MI 273da ADD.L D1,D0> {[#11]}
<MI 273dc ADD.L D7,D0> {[#11]}
<POP 0x273de LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[#11]}
<MI 273e8 MOVE.W D0,-(A7)> Δ-2 {[#11]|[2, 'D0']}
<Const 0x273ea 0x1.4> Δ-4 {[#11]|[2, 'D0']|[##1]}
<MI 273ee LEA.L (A6-0xc),A0> {[#11]|[2, 'D0']|[##1]}
<MI 273f2 MOVE.L A0,-(A7)> Δ-4 {[#11]|[2, 'D0']|[##1]|[4, 'A0']}
<Pointer.fp 0x273f4 <LVAR -0x006 @ 1(r)>> Δ-4 {[#11]|[2, 'D0']|[##1]|[4, 'A0']|[@@-6]}
<Call 0x273f6 0x1036c> {[#11]|[2, 'D0']|[##1]|[4, 'A0']|[@@-6]}
RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
<POP 273fc-27400 StackAdj> Δ+16 {}
<MI 27400 TST.B (A6-0x6)> {}
<MI 27402 BNE 0x27426> {}
<POP 27404-27426 Naked> Σ0 ↓
<Blob 0x27404 [56] @> Δ-56 {[«56""»]}
<POP 27410-27412 StackAdj> Δ-4 {[«56""»]|[-4-]}
<Lit 0x27412 56> {[«56""»]|[$$Can't initialize directory due to disk errors, aborting!]}
<Call 0x2741e 0x22522> {[«56""»]|[$$Can't initialize directory due to disk errors, aborting!]}
<POP 27422-27426 StackAdj> Δ+60 {}
<POP 27426-27430 Naked> Σ0 ↓ →0x273b6 ←0x273b6
<MI 27426 ADDQ.L #0x1,D7> {}
<MI 27428 CMPI.L #0x0000007f,D7> {}
<MI 2742e BLE 0x273b6> {}
<POP 27430-27434 Naked> Σ0 →0x27530
<MI 27430 BRA 0x27530> {}
<POP 27434-27442 Naked> Σ0 ↓ →0x274c2 ←0x273a6
<POP 27434-27436 StackAdj> Δ-2 {[-2-]}
<Call 0x27436 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 2743c TST.B (A7)+> Δ+2 {}
<MI 2743e BEQ 0x274c2> {}
<POP 27442-27444 Naked> Σ0 ↓
<MI 27442 MOVEQ.L #0x00,D7> {}
<POP 27444-27494 Naked> Σ0 ↓ →0x274b6 ←0x274b6
<Const 0x27444 0x3.2> Δ-2 {[#3]}
<MI 27448 MOVE.L D5,D0> {[#3]}
<MI 2744a ASL.L #0x7,D0> {[#3]}
<POP 0x2744c LimitCheck 0x0 ≤ D6 ≤ 0x7> {[#3]}
<MI 27452 MOVE.L D6,D1> {[#3]}
<MI 27454 ASL.L #0x1,D1> {[#3]}
<MI 27456 LEA.L 0x0,A0> {[#3]}
<MI 2745a LEA.L (A0+D1.L),A0> {[#3]}
<MI 2745e ADDA.L #0x10012,A0> {[#3]}
<MI 27464 CLR.L D1> {[#3]}
<MI 27466 MOVE.W (A0),D1> {[#3]}
<MI 27468 ADD.L D1,D0> {[#3]}
<MI 2746a ADD.L D7,D0> {[#3]}
<POP 0x2746c LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[#3]}
<MI 27476 MOVE.W D0,-(A7)> Δ-2 {[#3]|[2, 'D0']}
<Const 0x27478 0x1.4> Δ-4 {[#3]|[2, 'D0']|[##1]}
<MI 2747c LEA.L 0x2eb34,A0> {[#3]|[2, 'D0']|[##1]}
<MI 27482 MOVE.L A0,-(A7)> Δ-4 {[#3]|[2, 'D0']|[##1]|[4, 'A0']}
<Pointer.fp 0x27484 <LVAR -0x006 @ 1(r)>> Δ-4 {[#3]|[2, 'D0']|[##1]|[4, 'A0']|[@@-6]}
<Call 0x27486 0x1036c> {[#3]|[2, 'D0']|[##1]|[4, 'A0']|[@@-6]}
RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
<POP 2748c-27490 StackAdj> Δ+16 {}
<MI 27490 TST.B (A6-0x6)> {}
<MI 27492 BNE 0x274b6> {}
<POP 27494-274b6 Naked> Σ0 ↓
<Blob 0x27494 [56] @> Δ-56 {[«56""»]}
<POP 274a0-274a2 StackAdj> Δ-4 {[«56""»]|[-4-]}
<Lit 0x274a2 56> {[«56""»]|[$$Can't initialize directory due to disk errors, aborting!]}
<Call 0x274ae 0x22522> {[«56""»]|[$$Can't initialize directory due to disk errors, aborting!]}
<POP 274b2-274b6 StackAdj> Δ+60 {}
<POP 274b6-274c0 Naked> Σ0 ↓ →0x27444 ←0x27444
<MI 274b6 ADDQ.L #0x1,D7> {}
<MI 274b8 CMPI.L #0x0000007f,D7> {}
<MI 274be BLE 0x27444> {}
<POP 274c0-274c2 Naked> Σ0 →0x27530
<MI 274c0 BRA 0x27530> {}
<POP 274c2-2750e Naked> Σ0 ↓ →0x27530 ←0x27434
<Const 0x274c2 0xb.2> Δ-2 {[#11]}
<MI 274c6 MOVE.L D5,D0> {[#11]}
<MI 274c8 ASL.L #0x7,D0> {[#11]}
<POP 0x274ca LimitCheck 0x0 ≤ D6 ≤ 0x7> {[#11]}
<MI 274d0 MOVE.L D6,D1> {[#11]}
<MI 274d2 ASL.L #0x1,D1> {[#11]}
<MI 274d4 LEA.L 0x0,A0> {[#11]}
<MI 274d8 LEA.L (A0+D1.L),A0> {[#11]}
<MI 274dc ADDA.L #0x10012,A0> {[#11]}
<MI 274e2 CLR.L D1> {[#11]}
<MI 274e4 MOVE.W (A0),D1> {[#11]}
<MI 274e6 ADD.L D1,D0> {[#11]}
<POP 0x274e8 LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[#11]}
<MI 274f2 MOVE.W D0,-(A7)> Δ-2 {[#11]|[2, 'D0']}
<Const 0x274f4 0x80.4> Δ-4 {[#11]|[2, 'D0']|[##128]}
<MI 274f8 LEA.L (A6-0xc),A0> {[#11]|[2, 'D0']|[##128]}
<MI 274fc MOVE.L A0,-(A7)> Δ-4 {[#11]|[2, 'D0']|[##128]|[4, 'A0']}
<Pointer.fp 0x274fe <LVAR -0x006 @ 1(r)>> Δ-4 {[#11]|[2, 'D0']|[##128]|[4, 'A0']|[@@-6]}
<Call 0x27500 0x1036c> {[#11]|[2, 'D0']|[##128]|[4, 'A0']|[@@-6]}
RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B)
<POP 27506-2750a StackAdj> Δ+16 {}
<MI 2750a TST.B (A6-0x6)> {}
<MI 2750c BNE 0x27530> {}
<POP 2750e-27530 Naked> Σ0 ↓
<Blob 0x2750e [56] @> Δ-56 {[«56""»]}
<POP 2751a-2751c StackAdj> Δ-4 {[«56""»]|[-4-]}
<Lit 0x2751c 56> {[«56""»]|[$$Can't initialize directory due to disk errors, aborting!]}
<Call 0x27528 0x22522> {[«56""»]|[$$Can't initialize directory due to disk errors, aborting!]}
<POP 2752c-27530 StackAdj> Δ+60 {}
<POP 27530-27538 Naked> Σ0 ↓ →0x2739a ←0x27430 ←0x274c0 ←0x274c2
<MI 27530 ADDQ.L #0x1,D5> {}
<MI 27532 CMP.L #0x01,D5> {}
<MI 27534 BLE 0x2739a> {}
<POP 27538-27540 Naked> Σ0 ↓ →0x27398
<MI 27538 ADDQ.L #0x1,D6> {}
<MI 2753a CMP.L #0x07,D6> {}
<MI 2753c BLE 0x27398> {}
<POP 27540-27546 Naked> Σ0 ↓
<Call 0x27540 0x10390> {}
WriteFreeList(void)
<POP 27546-2754e Epilogue> Σ0
@ 2754e
<LVAR -0x400 @>
<LVAR -0x402 @ 1(rw)>
<LVAR -0x40c @ 1(r)>
<LVAR -0x410 @ 4(r)>
<LVAR -0x414 @ 4(rw)>
<POP 2754e-277ee Body>
<POP 2754e-27564 Prologue> Σ0 ↓
<POP 27564-27576 RegCacheLoad> Σ0 ↓
<POP 27576-275ae Naked> Σ0 ↓
<Blob 0x27576 [26] @> Δ-26 {[«26""»]}
<POP 27582-27584 StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x27584 26> {[«26""»]|[$$Creating predefined files.]}
<Call 0x27596 0x103e0> {[«26""»]|[$$Creating predefined files.]}
WriteConsoleStringCrLf(str : String)
<POP 2759c-275a0 StackAdj> Δ+30 {}
<MI 275a0 MOVE.L #0x01,0x20020> {}
<MI 275a6 MOVE.L #0x01,0x10026> {}
<MI 275ac MOVEQ.L #0x01,D6> {}
<POP 275ae-27626 Naked> Σ0 ↓ →0x2762a ←0x277a8
<MI 275ae MOVE.L D6,D0> {}
<MI 275b0 SUBQ.L #0x1,D0> {}
<POP 0x275b2 LimitCheck 0x0 ≤ D0 ≤ 0xa> {}
<MI 275b8 MOVE.L D0,D4> {}
<MI 275ba MOVEQ.L #0x1c,D3> {}
<Call 0x275bc 0x1028c> {}
?muls_d3_d4
<MI 275c2 LEA.L 0x223ee,A0> {}
<Blob 0x275c4 [20] (A0+D4.L)> Δ-20 {[«20»]}
<POP 275d4-275d6 StackAdj> Δ-4 {[«20»]|[-4-]}
<Lit 0x275d6> {[«20»]|[$$…]}
<Pointer.sp 0x275d6 4> Δ-4
<Const 0x275da 0x1.2> Δ-2
<Const 0x275dc 0x14.2> Δ-2
<Call 0x275de 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 275e4-275e6 StackAdj> Δ+8
<MI 275e6 MOVE.L (A7)+,(A6-0x414)> Δ+4 {[«20»]}
<POP 275ea-275ee StackAdj> Δ+12 {[-8-]}
<MI 275ee MOVE.L (A6-0x414),(A7)> {[-4-]|[4, '(A6-0x414)']}
<Call 0x275f2 0x102cc> {[-4-]|[4, '(A6-0x414)']}
StringDup(a : String) : String
<POP 275f8-275fa StackAdj> Δ+4 {[-4-]}
<Call 0x275fa 0x103e0> {[-4-]}
WriteConsoleStringCrLf(str : String)
<MI 27600 MOVE.L (A6-0x414),(A7)> {[4, '(A6-0x414)']}
<Const 0x27604 0x2.2> Δ-2 {[4, '(A6-0x414)']|[#2]}
<Const 0x27608 0x1.2> Δ-2 {[4, '(A6-0x414)']|[#2]|[#1]}
<MI 2760a LEA.L 0x223ee,A0> {[4, '(A6-0x414)']|[#2]|[#1]}
<MI 2760c CLR.L D0> {[4, '(A6-0x414)']|[#2]|[#1]}
<MI 2760e MOVE.W (A0+D4.L+#0x1a),D0> {[4, '(A6-0x414)']|[#2]|[#1]}
<MI 27612 NEG.L D0> {[4, '(A6-0x414)']|[#2]|[#1]}
<MI 27614 MOVE.L D0,-(A7)> Δ-4 {[4, '(A6-0x414)']|[#2]|[#1]|[4, 'D0']}
<Pointer.fp 0x27616 <LVAR -0x402 @ 1(rw)>> Δ-4 {[4, '(A6-0x414)']|[#2]|[#1]|[4, 'D0']|[@@-1026]}
<Pointer.fp 0x27618 <LVAR -0x410 @ 4(r)>> Δ-4 {[4, '(A6-0x414)']|[#2]|[#1]|[4, 'D0']|[@@-1026]|[@@-1040]}
<Call 0x2761a 0x10380> {[4, '(A6-0x414)']|[#2]|[#1]|[4, 'D0']|[@@-1026]|[@@-1040]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 27620-27622 StackAdj> Δ+20 {}
<MI 27622 TST.B (A6-0x402)> {}
<MI 27624 BEQ 0x2762a> {}
<POP 27626-2762a Naked> Σ0 →0x27778
<MI 27626 BRA 0x27778> {}
<POP 2762a-2764c Naked> Σ0 ↓ →0x27650 ←0x275ae
<MI 2762a MOVEA.L (A6-0x410),A0> {}
<MI 2762c MOVE.L D6,D0> {}
<MI 2762e SUBQ.L #0x1,D0> {}
<POP 0x27630 LimitCheck 0x0 ≤ D0 ≤ 0xa> {}
<MI 27636 MOVE.L D0,D4> {}
<MI 27638 MOVEQ.L #0x1c,D3> {}
<Call 0x2763a 0x1028c> {}
?muls_d3_d4
<MI 27640 LEA.L 0x223ee,A1> {}
<MI 27642 MOVE.W (A1+D4.L+#0x18),D0> {}
<MI 27646 CMPI.W #0x0062,D0> {}
<MI 2764a BNE 0x27650> {}
<POP 2764c-27650 Naked> Σ0 ↓
<MI 2764c CLR.W (A0+0x24)> {}
<POP 27650-2769a Naked> Σ0 ↓ →0x27704 ←0x2762a
<MI 27650 OR.B #0x01,(A0+0x3f)> {}
<MI 27654 LEA.L 0x223ee,A1> {}
<MI 27656 MOVE.B (A1+D4.L+#0x16),D0> {}
<MI 2765a ANDI.B #0xfb,(A0+0x3f)> {}
<MI 27660 LSL.B #0x2,D0> {}
<MI 27662 OR.B D0,(A0+0x3f)> {}
<MI 27666 LEA.L 0x223ee,A1> {}
<MI 27668 MOVE.B (A1+D4.L+#0x15),D0> {}
<MI 2766c ANDI.B #0xfd,(A0+0x3f)> {}
<MI 27672 LSL.B #0x1,D0> {}
<MI 27674 OR.B D0,(A0+0x3f)> {}
<MI 27678 MOVEA.L (A6-0x410),A0> {}
<MI 2767a MOVE.B #0x01,(A0+0x4c)> {}
<MI 2767e MOVE.L D6,D0> {}
<MI 27680 SUBQ.L #0x1,D0> {}
<POP 0x27682 LimitCheck 0x0 ≤ D0 ≤ 0xa> {}
<MI 27688 MOVE.L D0,D4> {}
<MI 2768a MOVEQ.L #0x1c,D3> {}
<Call 0x2768c 0x1028c> {}
?muls_d3_d4
<MI 27692 LEA.L 0x223ee,A0> {}
<MI 27694 TST.B (A0+D4.L+#0x14)> {}
<MI 27698 BEQ 0x27704> {}
<POP 2769a-276ce Naked> Σ0 ↓ →0x27704
<Const 0x2769a 0x1.2> Δ-2 {[#1]}
<MI 2769c LEA.L 0x223ee,A0> {[#1]}
<MI 2769e CLR.L D0> {[#1]}
<MI 276a0 MOVE.W (A0+D4.L+#0x18),D0> {[#1]}
<MI 276a4 ASL.L #0x5,D0> {[#1]}
<MI 276a6 ADDQ.L #0x1,D0> {[#1]}
<POP 0x276a8 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {[#1]}
<MI 276b2 MOVE.W D0,-(A7)> Δ-2 {[#1]|[2, 'D0']}
<MI 276b4 MOVE.L (A6-0x410),-(A7)> Δ-4 {[#1]|[2, 'D0']|[4, '(A6-0x410)']}
<Const 0x276b6 0x20.2> Δ-2 {[#1]|[2, 'D0']|[4, '(A6-0x410)']|[#32]}
<Pointer.fp 0x276ba <LVAR -0x40c @ 1(r)>> Δ-4 {[#1]|[2, 'D0']|[4, '(A6-0x410)']|[#32]|[@@-1036]}
<Call 0x276be 0x10374> {[#1]|[2, 'D0']|[4, '(A6-0x410)']|[#32]|[@@-1036]}
WriteWords(lba : W; offset : W; ptr : L; nwords : W; VAR status : B)
<POP 276c4-276c8 StackAdj> Δ+14 {}
<MI 276c8 TST.B (A6-0x40c)> {}
<MI 276cc BNE 0x27704> {}
<POP 276ce-27704 Naked> Σ0 →0x27778
<Blob 0x276ce [54] @> Δ-54 {[«54""»]}
<POP 276e0-276e2 StackAdj> Δ-4 {[«54""»]|[-4-]}
<Lit 0x276e2 53> {[«54""»]|[$$Can't update boot label due to disk errors, aborting!]}
<Call 0x276f4 0x103e0> {[«54""»]|[$$Can't update boot label due to disk errors, aborting!]}
WriteConsoleStringCrLf(str : String)
<POP 276fa-276fe StackAdj> Δ+58 {}
<MI 276fe MOVE.B #0x0c,(A6-0x402)> {}
<MI 27702 BRA 0x27778> {}
<POP 27704-27724 Naked> Σ0 ↓ →0x27762 ←0x27650 ←0x2769a
<MI 27704 MOVE.L D6,D0> {}
<MI 27706 SUBQ.L #0x1,D0> {}
<POP 0x27708 LimitCheck 0x0 ≤ D0 ≤ 0xa> {}
<MI 2770e MOVE.L D0,D4> {}
<MI 27710 MOVEQ.L #0x1c,D3> {}
<Call 0x27712 0x1028c> {}
?muls_d3_d4
<MI 27718 LEA.L 0x223ee,A0> {}
<MI 2771a MOVE.W (A0+D4.L+#0x18),D0> {}
<MI 2771e CMPI.W #0x0063,D0> {}
<MI 27722 BNE 0x27762> {}
<POP 27724-27726 Naked> Σ0 ↓
<MI 27724 MOVEQ.L #0x00,D7> {}
<POP 27726-27746 Naked> Σ0 ↓ →0x27726 ←0x27726
<POP 0x27726 LimitCheck 0x0 ≤ D7 ≤ 0x1ff> {}
<MI 27730 MOVE.L D7,D0> {}
<MI 27732 ASL.L #0x1,D0> {}
<MI 27734 LEA.L (A6-0x414),A0> {}
<MI 27738 CLR.W (A0+D0.L+#0x14)> {}
<MI 2773c ADDQ.L #0x1,D7> {}
<MI 2773e CMPI.L #0x000001ff,D7> {}
<MI 27744 BLE 0x27726> {}
<POP 27746-27762 Naked> Σ0 ↓
<MI 27746 MOVE.L (A6-0x410),-(A7)> Δ-4 {[4, '(A6-0x410)']}
<MI 27748 CLR.W -(A7)> Δ-2 {[4, '(A6-0x410)']|[#0]}
<MI 2774a CLR.W -(A7)> Δ-2 {[4, '(A6-0x410)']|[#0]|[#0]}
<Const 0x2774c 0x200.2> Δ-2 {[4, '(A6-0x410)']|[#0]|[#0]|[#512]}
<Const 0x27750 0x1.2> Δ-2 {[4, '(A6-0x410)']|[#0]|[#0]|[#512]|[#1]}
<MI 27752 LEA.L (A6-0x400),A0> {[4, '(A6-0x410)']|[#0]|[#0]|[#512]|[#1]}
<MI 27756 MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x410)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x27758 <LVAR -0x402 @ 1(rw)>> Δ-4 {[4, '(A6-0x410)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-1026]}
<Call 0x2775a 0x10388> {[4, '(A6-0x410)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-1026]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 27760-27762 StackAdj> Δ+20 {}
<POP 27762-27778 Naked> Σ0 ↓ ←0x27704
<MI 27762 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x27764 0x1.2> Δ-2 {[#0]|[#1]}
<Const 0x27766 0x1.4> Δ-4 {[#0]|[#1]|[##1]}
<Pointer.fp 0x2776a <LVAR -0x402 @ 1(rw)>> Δ-4 {[#0]|[#1]|[##1]|[@@-1026]}
<Pointer.fp 0x2776c <LVAR -0x410 @ 4(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-1026]|[@@-1040]}
<Call 0x2776e 0x1038c> {[#0]|[#1]|[##1]|[@@-1026]|[@@-1040]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 27774-27778 StackAdj> Δ+16 {}
<POP 27778-277a8 Naked> Σ0 ↓ →0x277ae ←0x27626 ←0x276ce
<Pointer.fp 0x27778 <LVAR -0x414 @ 4(rw)>> Δ-4 {[@@-1044]}
<Call 0x2777c 0x102bc> {[@@-1044]}
FreeString(VAR a : String)
<POP 27782-27784 StackAdj> Δ+4 {}
<MI 27784 ADDQ.L #0x1,D6> {}
<MI 27786 MOVE.L D6,D0> {}
<MI 27788 SUBQ.L #0x1,D0> {}
<MI 2778a SUBQ.L #0x1,D0> {}
<POP 0x2778c LimitCheck 0x0 ≤ D0 ≤ 0xa> {}
<MI 27792 MOVE.L D0,D4> {}
<MI 27794 MOVEQ.L #0x1c,D3> {}
<Call 0x27796 0x1028c> {}
?muls_d3_d4
<MI 2779c LEA.L 0x223ee,A0> {}
<MI 2779e MOVE.W (A0+D4.L+#0x18),D0> {}
<MI 277a2 CMPI.W #0x0063,D0> {}
<MI 277a6 BEQ 0x277ae> {}
<POP 277a8-277ae Naked> Σ0 ↓ →0x275ae
<MI 277a8 TST.B (A6-0x402)> {}
<MI 277aa BEQ 0x275ae> {}
<POP 277ae-277b2 Naked> Σ0 ↓ →0x277e0 ←0x27778
<MI 277ae TST.B (A6-0x402)> {}
<MI 277b0 BEQ 0x277e0> {}
<POP 277b2-277e0 Naked> Σ0 ↓
<Blob 0x277b2 [26] @> Δ-26 {[«26""»]}
<POP 277c4-277c6 StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x277c6 25> {[«26""»]|[$$the error above was fatal]}
<Call 0x277d8 0x22522> {[«26""»]|[$$the error above was fatal]}
<POP 277dc-277e0 StackAdj> Δ+30 {}
<POP 277e0-277e6 Naked> Σ0 ↓ ←0x277ae
<Call 0x277e0 0x10390> {}
WriteFreeList(void)
<POP 277e6-277ee Epilogue> Σ0
@ 277ee
<LVAR 0x00c 1(rw)>
<LVAR 0x008 @ 4(r)>
<LVAR -0x004 @ 1(r)>
<LVAR -0x008 @>
<POP 277ee-27860 Body>
<POP 277ee-27804 Prologue> Σ0 ↓
<POP 27804-27808 RegCacheLoad> Σ0 ↓
<POP 27808-27828 Naked> Σ0 ↓ →0x27840
<MI 27808 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 2780c CLR.B -(A7)> Δ-2 {[4, '(A6+0x8)']|[#0]}
<MI 2780e CLR.B -(A7)> Δ-2 {[4, '(A6+0x8)']|[#0]|[#0]}
<Const 0x27810 0x0.4> Δ-4 {[4, '(A6+0x8)']|[#0]|[#0]|[##0]}
<Pointer.fp 0x27814 <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[#0]|[#0]|[##0]|[@@-4]}
<Pointer.fp 0x27816 <LVAR -0x008 @>> Δ-4 {[4, '(A6+0x8)']|[#0]|[#0]|[##0]|[@@-4]|[@@-8]}
<Call 0x2781a 0x10380> {[4, '(A6+0x8)']|[#0]|[#0]|[##0]|[@@-4]|[@@-8]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 27820-27824 StackAdj> Δ+20 {}
<MI 27824 TST.B (A6-0x4)> {}
<MI 27826 BNE 0x27840> {}
<POP 27828-27840 Naked> Σ0 ↓
<MI 27828 CLR.B -(A7)> Δ-2 {[#0]}
<MI 2782a CLR.B -(A7)> Δ-2 {[#0]|[#0]}
<Const 0x2782c 0x1.4> Δ-4 {[#0]|[#0]|[##1]}
<Pointer.fp 0x27830 <LVAR -0x004 @ 1(r)>> Δ-4 {[#0]|[#0]|[##1]|[@@-4]}
<Pointer.fp 0x27832 <LVAR -0x008 @>> Δ-4 {[#0]|[#0]|[##1]|[@@-4]|[@@-8]}
<Call 0x27836 0x1038c> {[#0]|[#0]|[##1]|[@@-4]|[@@-8]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 2783c-27840 StackAdj> Δ+16 {}
<POP 27840-27854 Naked> Σ0 ↓ →0x27858 ←0x27808
<Pointer.fp 0x27840 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x27844 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 2784a-2784c StackAdj> Δ+4 {}
<MI 2784c CLR.B (A6+0xc)> {}
<MI 27850 TST.B (A6-0x4)> {}
<MI 27852 BEQ 0x27858> {}
<POP 27854-27858 Naked> Σ0 ↓
<MI 27854 ADDQ.B #0x1,(A6+0xc)> {}
<POP 27858-27860 Epilogue> Σ0 ←0x27840
@ 27860
<POP 27860-279c0 Body> Δ+24
<POP 27860-27876 Prologue> Σ0 ↓
<POP 27876-2788e RegCacheLoad> Σ0 ↓
<POP 2788e-2789a Naked> Σ0 ↓ →0x278a8
<POP 2788e-27890 StackAdj> Δ-2 {[-2-]}
<Call 0x27890 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 27896 TST.B (A7)+> Δ+2 {}
<MI 27898 BNE 0x278a8> {}
<POP 2789a-278a8 Naked> Σ0 ↓ →0x27930
<POP 2789a-2789c StackAdj> Δ-2 {[-2-]}
<Call 0x2789c 0x10604> {[-2-]}
Is_machine_type_three() : Bool
<MI 278a2 TST.B (A7)+> Δ+2 {}
<MI 278a4 BEQ 0x27930> {}
<POP 278a8-278ce Naked> Σ0 Δ-24 ↓ →0x278f0 ←0x2788e
<Blob 0x278a8 [24] @> Δ-24 {[«24""»]}
<POP 278b6-278b8 StackAdj> Δ-6 {[«24""»]|[-6-]}
<Lit 0x278b8 23> {[«24""»]|[-2-]|[$$M400_DFS_BOOTSTRAP.M200]}
<Call 0x278c4 0x277ee> {[«24""»]|[-2-]|[$$M400_DFS_BOOTSTRAP.M200]}
<POP 278c8-278ca StackAdj> Δ+4 {[«24""»]|[-2-]}
<MI 278ca TST.B (A7)+> Δ+2 {[«24""»]}
<MI 278cc BEQ 0x278f0> {[«24""»]}
<POP 278ce-278f0 Naked> Σ-24 →0x2792c
<Blob 0x278ce [70] @> Δ-70 {[-24-]|[«70""»]}
<POP 278d8-278da StackAdj> Δ-4 {[-24-]|[«70""»]|[-4-]}
<Lit 0x278da 70> {[-24-]|[«70""»]|[$$Model specific DFS_BOOTSTRAP is missing, the disk may not be bootable.]}
<Call 0x278e6 0x103e0> {[-24-]|[«70""»]|[$$Model specific DFS_BOOTSTRAP is missing, the disk may not be bootable.]}
WriteConsoleStringCrLf(str : String)
<POP 278ec-278ee StackAdj> Δ+74 {[-24-]}
<MI 278ee BRA 0x2792c> {[-24-]}
<POP 278f0-2792c Naked> Σ-24 ↓ ←0x278a8
<Blob 0x278f0 [24] @> Δ-24 {[-24-]|[«24""»]}
<Blob 0x27900 [18] @> Δ-18 {[-24-]|[«24""»]|[«18""»]}
<POP 2790c-2790e StackAdj> Δ-4 {[-24-]|[«24""»]|[«18""»]|[-4-]}
<Lit 0x2790e 23> {[-24-]|[«24""»]|[«18""»]|[$$M400_DFS_BOOTSTRAP.M200]}
<POP 27918-2791a StackAdj> Δ-4 {[-24-]|[«24""»]|[«18""»]|[$$M400_DFS_BOOTSTRAP.M200]|[-4-]}
<Lit 0x2791a 18> {[-24-]|[«24""»]|[«18""»]|[$$M400_DFS_BOOTSTRAP.M200]|[$$DFS_BOOTSTRAP.M200]}
<Call 0x27926 0x225c2> {[-24-]|[«24""»]|[«18""»]|[$$M400_DFS_BOOTSTRAP.M200]|[$$DFS_BOOTSTRAP.M200]}
<POP 2792a-2792c StackAdj> Δ+50 {[-24-]}
<POP 2792c-27930 Naked> Σ-24 →0x279b6 ←0x278ce
<MI 2792c BRA 0x279b6> {[-24-]}
<POP 27930-27958 Naked> Σ0 Δ-24 ↓ →0x2797a ←0x2789a
<Blob 0x27930 [24] @> Δ-24 {[«24""»]}
<POP 27940-27942 StackAdj> Δ-6 {[«24""»]|[-6-]}
<Lit 0x27942 23> {[«24""»]|[-2-]|[$$M200_DFS_BOOTSTRAP.M200]}
<Call 0x2794e 0x277ee> {[«24""»]|[-2-]|[$$M200_DFS_BOOTSTRAP.M200]}
<POP 27952-27954 StackAdj> Δ+4 {[«24""»]|[-2-]}
<MI 27954 TST.B (A7)+> Δ+2 {[«24""»]}
<MI 27956 BEQ 0x2797a> {[«24""»]}
<POP 27958-2797a Naked> Σ-24 →0x279b6
<Blob 0x27958 [70] @> Δ-70 {[-24-]|[«70""»]}
<POP 27962-27964 StackAdj> Δ-4 {[-24-]|[«70""»]|[-4-]}
<Lit 0x27964 70> {[-24-]|[«70""»]|[$$Model specific DFS_BOOTSTRAP is missing, the disk may not be bootable.]}
<Call 0x27970 0x103e0> {[-24-]|[«70""»]|[$$Model specific DFS_BOOTSTRAP is missing, the disk may not be bootable.]}
WriteConsoleStringCrLf(str : String)
<POP 27976-27978 StackAdj> Δ+74 {[-24-]}
<MI 27978 BRA 0x279b6> {[-24-]}
<POP 2797a-279b6 Naked> Σ-24 ↓ ←0x27930
<Blob 0x2797a [24] @> Δ-24 {[-24-]|[«24""»]}
<Blob 0x2798a [18] @> Δ-18 {[-24-]|[«24""»]|[«18""»]}
<POP 27996-27998 StackAdj> Δ-4 {[-24-]|[«24""»]|[«18""»]|[-4-]}
<Lit 0x27998 23> {[-24-]|[«24""»]|[«18""»]|[$$M200_DFS_BOOTSTRAP.M200]}
<POP 279a2-279a4 StackAdj> Δ-4 {[-24-]|[«24""»]|[«18""»]|[$$M200_DFS_BOOTSTRAP.M200]|[-4-]}
<Lit 0x279a4 18> {[-24-]|[«24""»]|[«18""»]|[$$M200_DFS_BOOTSTRAP.M200]|[$$DFS_BOOTSTRAP.M200]}
<Call 0x279b0 0x225c2> {[-24-]|[«24""»]|[«18""»]|[$$M200_DFS_BOOTSTRAP.M200]|[$$DFS_BOOTSTRAP.M200]}
<POP 279b4-279b6 StackAdj> Δ+50 {[-24-]}
<POP 279b6-279b8 Naked> Σ-24 Δ+24 ↓ ←0x2792c ←0x27958
<POP 279b6-279b8 StackAdj> Δ+24 {}
<POP 279b8-279c0 Epilogue> Σ0
@ 279c0
<POP 279c0-280fc Body> Δ+180
<POP 279c0-279d6 Prologue> Σ0 ↓
<POP 279d6-279f2 RegCacheLoad> Σ0 ↓
<POP 279f2-27a00 Naked> Σ0 ↓ →0x27b62
<POP 279f2-279f4 StackAdj> Δ-2 {[-2-]}
<Call 0x279f4 0x105f8> {[-2-]}
Is_machine_type_one() : Bool
<MI 279fa TST.B (A7)+> Δ+2 {}
<MI 279fc BEQ 0x27b62> {}
<POP 27a00-27a46 Naked> Σ0 Δ-60 ↓ →0x27a72
<Blob 0x27a00 [20] @> Δ-20 {[«20""»]}
<Blob 0x27a10 [20] @> Δ-20 {[«20""»]|[«20""»]}
<Blob 0x27a20 [20] @> Δ-20 {[«20""»]|[«20""»]|[«20""»]}
<POP 27a30-27a32 StackAdj> Δ-6 {[«20""»]|[«20""»]|[«20""»]|[-6-]}
<Lit 0x27a32 19> {[«20""»]|[«20""»]|[«20""»]|[-2-]|[$$M300C_KERNEL_0.M200]}
<Call 0x27a3e 0x277ee> {[«20""»]|[«20""»]|[«20""»]|[-2-]|[$$M300C_KERNEL_0.M200]}
<POP 27a40-27a42 StackAdj> Δ+4 {[«20""»]|[«20""»]|[«20""»]|[-2-]}
<MI 27a42 TST.B (A7)+> Δ+2 {[«20""»]|[«20""»]|[«20""»]}
<MI 27a44 BNE 0x27a72> {[«20""»]|[«20""»]|[«20""»]}
<POP 27a46-27a5c Naked> Σ-60 ↓ →0x27a72
<POP 27a46-27a48 StackAdj> Δ-6 {[-66-]}
<Lit 0x27a48> {[-62-]|[$$…]}
<Pointer.sp 0x27a48 26> Δ-4
<Const 0x27a4c 0x1.2> Δ-2
<Const 0x27a4e 0x13.2> Δ-2
<Call 0x27a50 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 27a52-27a54 StackAdj> Δ+8
<Call 0x27a54 0x277ee> {[-62-]|[$$…]}
<POP 27a56-27a58 StackAdj> Δ+4 {[-62-]}
<MI 27a58 TST.B (A7)+> Δ+2 {[-60-]}
<MI 27a5a BNE 0x27a72> {[-60-]}
<POP 27a5c-27a72 Naked> Σ-60 ↓ →0x27aa2
<POP 27a5c-27a5e StackAdj> Δ-6 {[-66-]}
<Lit 0x27a5e> {[-62-]|[$$…]}
<Pointer.sp 0x27a5e 6> Δ-4
<Const 0x27a62 0x1.2> Δ-2
<Const 0x27a64 0x13.2> Δ-2
<Call 0x27a66 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 27a68-27a6a StackAdj> Δ+8
<Call 0x27a6a 0x277ee> {[-62-]|[$$…]}
<POP 27a6c-27a6e StackAdj> Δ+4 {[-62-]}
<MI 27a6e TST.B (A7)+> Δ+2 {[-60-]}
<MI 27a70 BEQ 0x27aa2> {[-60-]}
<POP 27a72-27aa2 Naked> Σ-60 →0x27b5a ←0x27a00 ←0x27a46
<Blob 0x27a72 [72] @> Δ-72 {[-60-]|[«72""»]}
<POP 27a84-27a86 StackAdj> Δ-4 {[-60-]|[«72""»]|[-4-]}
<Lit 0x27a86 71> {[-60-]|[«72""»]|[$$Model specific IOP kernel(s) are missing, the disk may not be bootable.]}
<Call 0x27a94 0x103e0> {[-60-]|[«72""»]|[$$Model specific IOP kernel(s) are missing, the disk may not be bootable.]}
WriteConsoleStringCrLf(str : String)
<POP 27a9a-27a9e StackAdj> Δ+76 {[-60-]}
<MI 27a9e BRA 0x27b5a> {[-60-]}
<POP 27aa2-27b5a Naked> Σ-60 ↓ ←0x27a5c
<Blob 0x27aa2 [20] @> Δ-20 {[-60-]|[«20""»]}
<Blob 0x27ab2 [14] @> Δ-14 {[-60-]|[«20""»]|[«14""»]}
<POP 27ac2-27ac4 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[-4-]}
<Lit 0x27ac4 19> {[-60-]|[«20""»]|[«14""»]|[$$M300C_KERNEL_0.M200]}
<POP 27ace-27ad0 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[$$M300C_KERNEL_0.M200]|[-4-]}
<Lit 0x27ad0 13> {[-60-]|[«20""»]|[«14""»]|[$$M300C_KERNEL_0.M200]|[$$KERNEL_0.M200]}
<Call 0x27adc 0x225c2> {[-60-]|[«20""»]|[«14""»]|[$$M300C_KERNEL_0.M200]|[$$KERNEL_0.M200]}
<POP 27ade-27adf StackAdj> Δ+42 ↓ {[-60-]}
<Blob 0x27adf [20] @> Δ-20 {[-60-]|[«20""»]}
<Blob 0x27aee [14] @> Δ-14 {[-60-]|[«20""»]|[«14""»]}
<POP 27afe-27b00 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[-4-]}
<Lit 0x27b00 19> {[-60-]|[«20""»]|[«14""»]|[$$M300C_KERNEL_1.M200]}
<POP 27b0a-27b0c StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[$$M300C_KERNEL_1.M200]|[-4-]}
<Lit 0x27b0c 13> {[-60-]|[«20""»]|[«14""»]|[$$M300C_KERNEL_1.M200]|[$$KERNEL_1.M200]}
<Call 0x27b18 0x225c2> {[-60-]|[«20""»]|[«14""»]|[$$M300C_KERNEL_1.M200]|[$$KERNEL_1.M200]}
<POP 27b1a-27b1b StackAdj> Δ+42 ↓ {[-60-]}
<Blob 0x27b1b [20] @> Δ-20 {[-60-]|[«20""»]}
<Blob 0x27b2a [14] @> Δ-14 {[-60-]|[«20""»]|[«14""»]}
<POP 27b3a-27b3c StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[-4-]}
<Lit 0x27b3c 19> {[-60-]|[«20""»]|[«14""»]|[$$M300C_KERNEL_2.M200]}
<POP 27b46-27b48 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[$$M300C_KERNEL_2.M200]|[-4-]}
<Lit 0x27b48 13> {[-60-]|[«20""»]|[«14""»]|[$$M300C_KERNEL_2.M200]|[$$KERNEL_2.M200]}
<Call 0x27b54 0x225c2> {[-60-]|[«20""»]|[«14""»]|[$$M300C_KERNEL_2.M200]|[$$KERNEL_2.M200]}
<POP 27b56-27b5a StackAdj> Δ+42 {[-60-]}
<POP 27b5a-27b62 Naked> Σ-60 Δ+60 →0x280f4 ←0x27a72 ←0x27cca ←0x27e36 ←0x27fa2
<POP 27b5a-27b5e StackAdj> Δ+60 {}
<MI 27b5e BRA 0x280f4> {}
<POP 27b62-27b70 Naked> Σ0 ↓ →0x27cce ←0x279f2
<POP 27b62-27b64 StackAdj> Δ-2 {[-2-]}
<Call 0x27b64 0x105fe> {[-2-]}
Is_machine_type_two() : Bool
<MI 27b6a TST.B (A7)+> Δ+2 {}
<MI 27b6c BEQ 0x27cce> {}
<POP 27b70-27bb6 Naked> Σ0 Δ-60 ↓ →0x27be2
<Blob 0x27b70 [20] @> Δ-20 {[«20""»]}
<Blob 0x27b80 [20] @> Δ-20 {[«20""»]|[«20""»]}
<Blob 0x27b90 [20] @> Δ-20 {[«20""»]|[«20""»]|[«20""»]}
<POP 27ba0-27ba2 StackAdj> Δ-6 {[«20""»]|[«20""»]|[«20""»]|[-6-]}
<Lit 0x27ba2 19> {[«20""»]|[«20""»]|[«20""»]|[-2-]|[$$M300S_KERNEL_0.M200]}
<Call 0x27bae 0x277ee> {[«20""»]|[«20""»]|[«20""»]|[-2-]|[$$M300S_KERNEL_0.M200]}
<POP 27bb0-27bb2 StackAdj> Δ+4 {[«20""»]|[«20""»]|[«20""»]|[-2-]}
<MI 27bb2 TST.B (A7)+> Δ+2 {[«20""»]|[«20""»]|[«20""»]}
<MI 27bb4 BNE 0x27be2> {[«20""»]|[«20""»]|[«20""»]}
<POP 27bb6-27bcc Naked> Σ-60 ↓ →0x27be2
<POP 27bb6-27bb8 StackAdj> Δ-6 {[-66-]}
<Lit 0x27bb8> {[-62-]|[$$…]}
<Pointer.sp 0x27bb8 26> Δ-4
<Const 0x27bbc 0x1.2> Δ-2
<Const 0x27bbe 0x13.2> Δ-2
<Call 0x27bc0 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 27bc2-27bc4 StackAdj> Δ+8
<Call 0x27bc4 0x277ee> {[-62-]|[$$…]}
<POP 27bc6-27bc8 StackAdj> Δ+4 {[-62-]}
<MI 27bc8 TST.B (A7)+> Δ+2 {[-60-]}
<MI 27bca BNE 0x27be2> {[-60-]}
<POP 27bcc-27be2 Naked> Σ-60 ↓ →0x27c12
<POP 27bcc-27bce StackAdj> Δ-6 {[-66-]}
<Lit 0x27bce> {[-62-]|[$$…]}
<Pointer.sp 0x27bce 6> Δ-4
<Const 0x27bd2 0x1.2> Δ-2
<Const 0x27bd4 0x13.2> Δ-2
<Call 0x27bd6 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 27bd8-27bda StackAdj> Δ+8
<Call 0x27bda 0x277ee> {[-62-]|[$$…]}
<POP 27bdc-27bde StackAdj> Δ+4 {[-62-]}
<MI 27bde TST.B (A7)+> Δ+2 {[-60-]}
<MI 27be0 BEQ 0x27c12> {[-60-]}
<POP 27be2-27c12 Naked> Σ-60 →0x27cca ←0x27b70 ←0x27bb6
<Blob 0x27be2 [72] @> Δ-72 {[-60-]|[«72""»]}
<POP 27bf4-27bf6 StackAdj> Δ-4 {[-60-]|[«72""»]|[-4-]}
<Lit 0x27bf6 71> {[-60-]|[«72""»]|[$$Model specific IOP kernel(s) are missing, the disk may not be bootable.]}
<Call 0x27c04 0x103e0> {[-60-]|[«72""»]|[$$Model specific IOP kernel(s) are missing, the disk may not be bootable.]}
WriteConsoleStringCrLf(str : String)
<POP 27c0a-27c0e StackAdj> Δ+76 {[-60-]}
<MI 27c0e BRA 0x27cca> {[-60-]}
<POP 27c12-27cca Naked> Σ-60 ↓ ←0x27bcc
<Blob 0x27c12 [20] @> Δ-20 {[-60-]|[«20""»]}
<Blob 0x27c22 [14] @> Δ-14 {[-60-]|[«20""»]|[«14""»]}
<POP 27c32-27c34 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[-4-]}
<Lit 0x27c34 19> {[-60-]|[«20""»]|[«14""»]|[$$M300S_KERNEL_0.M200]}
<POP 27c3e-27c40 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[$$M300S_KERNEL_0.M200]|[-4-]}
<Lit 0x27c40 13> {[-60-]|[«20""»]|[«14""»]|[$$M300S_KERNEL_0.M200]|[$$KERNEL_0.M200]}
<Call 0x27c4c 0x225c2> {[-60-]|[«20""»]|[«14""»]|[$$M300S_KERNEL_0.M200]|[$$KERNEL_0.M200]}
<POP 27c4e-27c4f StackAdj> Δ+42 ↓ {[-60-]}
<Blob 0x27c4f [20] @> Δ-20 {[-60-]|[«20""»]}
<Blob 0x27c5e [14] @> Δ-14 {[-60-]|[«20""»]|[«14""»]}
<POP 27c6e-27c70 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[-4-]}
<Lit 0x27c70 19> {[-60-]|[«20""»]|[«14""»]|[$$M300S_KERNEL_1.M200]}
<POP 27c7a-27c7c StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[$$M300S_KERNEL_1.M200]|[-4-]}
<Lit 0x27c7c 13> {[-60-]|[«20""»]|[«14""»]|[$$M300S_KERNEL_1.M200]|[$$KERNEL_1.M200]}
<Call 0x27c88 0x225c2> {[-60-]|[«20""»]|[«14""»]|[$$M300S_KERNEL_1.M200]|[$$KERNEL_1.M200]}
<POP 27c8a-27c8b StackAdj> Δ+42 ↓ {[-60-]}
<Blob 0x27c8b [20] @> Δ-20 {[-60-]|[«20""»]}
<Blob 0x27c9a [14] @> Δ-14 {[-60-]|[«20""»]|[«14""»]}
<POP 27caa-27cac StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[-4-]}
<Lit 0x27cac 19> {[-60-]|[«20""»]|[«14""»]|[$$M300S_KERNEL_2.M200]}
<POP 27cb6-27cb8 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[$$M300S_KERNEL_2.M200]|[-4-]}
<Lit 0x27cb8 13> {[-60-]|[«20""»]|[«14""»]|[$$M300S_KERNEL_2.M200]|[$$KERNEL_2.M200]}
<Call 0x27cc4 0x225c2> {[-60-]|[«20""»]|[«14""»]|[$$M300S_KERNEL_2.M200]|[$$KERNEL_2.M200]}
<POP 27cc6-27cca StackAdj> Δ+42 {[-60-]}
<POP 27cca-27cce Naked> Σ-60 →0x27b5a ←0x27be2
<MI 27cca BRA 0x27b5a> {[-60-]}
<POP 27cce-27cdc Naked> Σ0 ↓ →0x27e3a ←0x27b62
<POP 27cce-27cd0 StackAdj> Δ-2 {[-2-]}
<Call 0x27cd0 0x10604> {[-2-]}
Is_machine_type_three() : Bool
<MI 27cd6 TST.B (A7)+> Δ+2 {}
<MI 27cd8 BEQ 0x27e3a> {}
<POP 27cdc-27d22 Naked> Σ0 Δ-60 ↓ →0x27d4e
<Blob 0x27cdc [20] @> Δ-20 {[«20""»]}
<Blob 0x27cec [20] @> Δ-20 {[«20""»]|[«20""»]}
<Blob 0x27cfc [20] @> Δ-20 {[«20""»]|[«20""»]|[«20""»]}
<POP 27d0c-27d0e StackAdj> Δ-6 {[«20""»]|[«20""»]|[«20""»]|[-6-]}
<Lit 0x27d0e 19> {[«20""»]|[«20""»]|[«20""»]|[-2-]|[$$M400C_KERNEL_0.M200]}
<Call 0x27d1a 0x277ee> {[«20""»]|[«20""»]|[«20""»]|[-2-]|[$$M400C_KERNEL_0.M200]}
<POP 27d1c-27d1e StackAdj> Δ+4 {[«20""»]|[«20""»]|[«20""»]|[-2-]}
<MI 27d1e TST.B (A7)+> Δ+2 {[«20""»]|[«20""»]|[«20""»]}
<MI 27d20 BNE 0x27d4e> {[«20""»]|[«20""»]|[«20""»]}
<POP 27d22-27d38 Naked> Σ-60 ↓ →0x27d4e
<POP 27d22-27d24 StackAdj> Δ-6 {[-66-]}
<Lit 0x27d24> {[-62-]|[$$…]}
<Pointer.sp 0x27d24 26> Δ-4
<Const 0x27d28 0x1.2> Δ-2
<Const 0x27d2a 0x13.2> Δ-2
<Call 0x27d2c 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 27d2e-27d30 StackAdj> Δ+8
<Call 0x27d30 0x277ee> {[-62-]|[$$…]}
<POP 27d32-27d34 StackAdj> Δ+4 {[-62-]}
<MI 27d34 TST.B (A7)+> Δ+2 {[-60-]}
<MI 27d36 BNE 0x27d4e> {[-60-]}
<POP 27d38-27d4e Naked> Σ-60 ↓ →0x27d7e
<POP 27d38-27d3a StackAdj> Δ-6 {[-66-]}
<Lit 0x27d3a> {[-62-]|[$$…]}
<Pointer.sp 0x27d3a 6> Δ-4
<Const 0x27d3e 0x1.2> Δ-2
<Const 0x27d40 0x13.2> Δ-2
<Call 0x27d42 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 27d44-27d46 StackAdj> Δ+8
<Call 0x27d46 0x277ee> {[-62-]|[$$…]}
<POP 27d48-27d4a StackAdj> Δ+4 {[-62-]}
<MI 27d4a TST.B (A7)+> Δ+2 {[-60-]}
<MI 27d4c BEQ 0x27d7e> {[-60-]}
<POP 27d4e-27d7e Naked> Σ-60 →0x27e36 ←0x27cdc ←0x27d22
<Blob 0x27d4e [72] @> Δ-72 {[-60-]|[«72""»]}
<POP 27d60-27d62 StackAdj> Δ-4 {[-60-]|[«72""»]|[-4-]}
<Lit 0x27d62 71> {[-60-]|[«72""»]|[$$Model specific IOP kernel(s) are missing, the disk may not be bootable.]}
<Call 0x27d70 0x103e0> {[-60-]|[«72""»]|[$$Model specific IOP kernel(s) are missing, the disk may not be bootable.]}
WriteConsoleStringCrLf(str : String)
<POP 27d76-27d7a StackAdj> Δ+76 {[-60-]}
<MI 27d7a BRA 0x27e36> {[-60-]}
<POP 27d7e-27e36 Naked> Σ-60 ↓ ←0x27d38
<Blob 0x27d7e [20] @> Δ-20 {[-60-]|[«20""»]}
<Blob 0x27d8e [14] @> Δ-14 {[-60-]|[«20""»]|[«14""»]}
<POP 27d9e-27da0 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[-4-]}
<Lit 0x27da0 19> {[-60-]|[«20""»]|[«14""»]|[$$M400C_KERNEL_0.M200]}
<POP 27daa-27dac StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[$$M400C_KERNEL_0.M200]|[-4-]}
<Lit 0x27dac 13> {[-60-]|[«20""»]|[«14""»]|[$$M400C_KERNEL_0.M200]|[$$KERNEL_0.M200]}
<Call 0x27db8 0x225c2> {[-60-]|[«20""»]|[«14""»]|[$$M400C_KERNEL_0.M200]|[$$KERNEL_0.M200]}
<POP 27dba-27dbb StackAdj> Δ+42 ↓ {[-60-]}
<Blob 0x27dbb [20] @> Δ-20 {[-60-]|[«20""»]}
<Blob 0x27dca [14] @> Δ-14 {[-60-]|[«20""»]|[«14""»]}
<POP 27dda-27ddc StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[-4-]}
<Lit 0x27ddc 19> {[-60-]|[«20""»]|[«14""»]|[$$M400C_KERNEL_1.M200]}
<POP 27de6-27de8 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[$$M400C_KERNEL_1.M200]|[-4-]}
<Lit 0x27de8 13> {[-60-]|[«20""»]|[«14""»]|[$$M400C_KERNEL_1.M200]|[$$KERNEL_1.M200]}
<Call 0x27df4 0x225c2> {[-60-]|[«20""»]|[«14""»]|[$$M400C_KERNEL_1.M200]|[$$KERNEL_1.M200]}
<POP 27df6-27df7 StackAdj> Δ+42 ↓ {[-60-]}
<Blob 0x27df7 [20] @> Δ-20 {[-60-]|[«20""»]}
<Blob 0x27e06 [14] @> Δ-14 {[-60-]|[«20""»]|[«14""»]}
<POP 27e16-27e18 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[-4-]}
<Lit 0x27e18 19> {[-60-]|[«20""»]|[«14""»]|[$$M400C_KERNEL_2.M200]}
<POP 27e22-27e24 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[$$M400C_KERNEL_2.M200]|[-4-]}
<Lit 0x27e24 13> {[-60-]|[«20""»]|[«14""»]|[$$M400C_KERNEL_2.M200]|[$$KERNEL_2.M200]}
<Call 0x27e30 0x225c2> {[-60-]|[«20""»]|[«14""»]|[$$M400C_KERNEL_2.M200]|[$$KERNEL_2.M200]}
<POP 27e32-27e36 StackAdj> Δ+42 {[-60-]}
<POP 27e36-27e3a Naked> Σ-60 →0x27b5a ←0x27d4e
<MI 27e36 BRA 0x27b5a> {[-60-]}
<POP 27e3a-27e48 Naked> Σ0 ↓ →0x27fa6 ←0x27cce
<POP 27e3a-27e3c StackAdj> Δ-2 {[-2-]}
<Call 0x27e3c 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 27e42 TST.B (A7)+> Δ+2 {}
<MI 27e44 BEQ 0x27fa6> {}
<POP 27e48-27e8e Naked> Σ0 Δ-60 ↓ →0x27eba
<Blob 0x27e48 [20] @> Δ-20 {[«20""»]}
<Blob 0x27e58 [20] @> Δ-20 {[«20""»]|[«20""»]}
<Blob 0x27e68 [20] @> Δ-20 {[«20""»]|[«20""»]|[«20""»]}
<POP 27e78-27e7a StackAdj> Δ-6 {[«20""»]|[«20""»]|[«20""»]|[-6-]}
<Lit 0x27e7a 19> {[«20""»]|[«20""»]|[«20""»]|[-2-]|[$$M400S_KERNEL_0.M200]}
<Call 0x27e86 0x277ee> {[«20""»]|[«20""»]|[«20""»]|[-2-]|[$$M400S_KERNEL_0.M200]}
<POP 27e88-27e8a StackAdj> Δ+4 {[«20""»]|[«20""»]|[«20""»]|[-2-]}
<MI 27e8a TST.B (A7)+> Δ+2 {[«20""»]|[«20""»]|[«20""»]}
<MI 27e8c BNE 0x27eba> {[«20""»]|[«20""»]|[«20""»]}
<POP 27e8e-27ea4 Naked> Σ-60 ↓ →0x27eba
<POP 27e8e-27e90 StackAdj> Δ-6 {[-66-]}
<Lit 0x27e90> {[-62-]|[$$…]}
<Pointer.sp 0x27e90 26> Δ-4
<Const 0x27e94 0x1.2> Δ-2
<Const 0x27e96 0x13.2> Δ-2
<Call 0x27e98 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 27e9a-27e9c StackAdj> Δ+8
<Call 0x27e9c 0x277ee> {[-62-]|[$$…]}
<POP 27e9e-27ea0 StackAdj> Δ+4 {[-62-]}
<MI 27ea0 TST.B (A7)+> Δ+2 {[-60-]}
<MI 27ea2 BNE 0x27eba> {[-60-]}
<POP 27ea4-27eba Naked> Σ-60 ↓ →0x27eea
<POP 27ea4-27ea6 StackAdj> Δ-6 {[-66-]}
<Lit 0x27ea6> {[-62-]|[$$…]}
<Pointer.sp 0x27ea6 6> Δ-4
<Const 0x27eaa 0x1.2> Δ-2
<Const 0x27eac 0x13.2> Δ-2
<Call 0x27eae 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 27eb0-27eb2 StackAdj> Δ+8
<Call 0x27eb2 0x277ee> {[-62-]|[$$…]}
<POP 27eb4-27eb6 StackAdj> Δ+4 {[-62-]}
<MI 27eb6 TST.B (A7)+> Δ+2 {[-60-]}
<MI 27eb8 BEQ 0x27eea> {[-60-]}
<POP 27eba-27eea Naked> Σ-60 →0x27fa2 ←0x27e48 ←0x27e8e
<Blob 0x27eba [72] @> Δ-72 {[-60-]|[«72""»]}
<POP 27ecc-27ece StackAdj> Δ-4 {[-60-]|[«72""»]|[-4-]}
<Lit 0x27ece 71> {[-60-]|[«72""»]|[$$Model specific IOP kernel(s) are missing, the disk may not be bootable.]}
<Call 0x27edc 0x103e0> {[-60-]|[«72""»]|[$$Model specific IOP kernel(s) are missing, the disk may not be bootable.]}
WriteConsoleStringCrLf(str : String)
<POP 27ee2-27ee6 StackAdj> Δ+76 {[-60-]}
<MI 27ee6 BRA 0x27fa2> {[-60-]}
<POP 27eea-27fa2 Naked> Σ-60 ↓ ←0x27ea4
<Blob 0x27eea [20] @> Δ-20 {[-60-]|[«20""»]}
<Blob 0x27efa [14] @> Δ-14 {[-60-]|[«20""»]|[«14""»]}
<POP 27f0a-27f0c StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[-4-]}
<Lit 0x27f0c 19> {[-60-]|[«20""»]|[«14""»]|[$$M400S_KERNEL_0.M200]}
<POP 27f16-27f18 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[$$M400S_KERNEL_0.M200]|[-4-]}
<Lit 0x27f18 13> {[-60-]|[«20""»]|[«14""»]|[$$M400S_KERNEL_0.M200]|[$$KERNEL_0.M200]}
<Call 0x27f24 0x225c2> {[-60-]|[«20""»]|[«14""»]|[$$M400S_KERNEL_0.M200]|[$$KERNEL_0.M200]}
<POP 27f26-27f27 StackAdj> Δ+42 ↓ {[-60-]}
<Blob 0x27f27 [20] @> Δ-20 {[-60-]|[«20""»]}
<Blob 0x27f36 [14] @> Δ-14 {[-60-]|[«20""»]|[«14""»]}
<POP 27f46-27f48 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[-4-]}
<Lit 0x27f48 19> {[-60-]|[«20""»]|[«14""»]|[$$M400S_KERNEL_1.M200]}
<POP 27f52-27f54 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[$$M400S_KERNEL_1.M200]|[-4-]}
<Lit 0x27f54 13> {[-60-]|[«20""»]|[«14""»]|[$$M400S_KERNEL_1.M200]|[$$KERNEL_1.M200]}
<Call 0x27f60 0x225c2> {[-60-]|[«20""»]|[«14""»]|[$$M400S_KERNEL_1.M200]|[$$KERNEL_1.M200]}
<POP 27f62-27f63 StackAdj> Δ+42 ↓ {[-60-]}
<Blob 0x27f63 [20] @> Δ-20 {[-60-]|[«20""»]}
<Blob 0x27f72 [14] @> Δ-14 {[-60-]|[«20""»]|[«14""»]}
<POP 27f82-27f84 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[-4-]}
<Lit 0x27f84 19> {[-60-]|[«20""»]|[«14""»]|[$$M400S_KERNEL_2.M200]}
<POP 27f8e-27f90 StackAdj> Δ-4 {[-60-]|[«20""»]|[«14""»]|[$$M400S_KERNEL_2.M200]|[-4-]}
<Lit 0x27f90 13> {[-60-]|[«20""»]|[«14""»]|[$$M400S_KERNEL_2.M200]|[$$KERNEL_2.M200]}
<Call 0x27f9c 0x225c2> {[-60-]|[«20""»]|[«14""»]|[$$M400S_KERNEL_2.M200]|[$$KERNEL_2.M200]}
<POP 27f9e-27fa2 StackAdj> Δ+42 {[-60-]}
<POP 27fa2-27fa6 Naked> Σ-60 →0x27b5a ←0x27eba
<MI 27fa2 BRA 0x27b5a> {[-60-]}
<POP 27fa6-27fe0 Naked> Σ0 Δ-54 ↓ →0x2800c ←0x27e3a
<Blob 0x27fa6 [18] @> Δ-18 {[«18""»]}
<Blob 0x27fb2 [18] @> Δ-18 {[«18""»]|[«18""»]}
<Blob 0x27fbe [18] @> Δ-18 {[«18""»]|[«18""»]|[«18""»]}
<POP 27fca-27fcc StackAdj> Δ-6 {[«18""»]|[«18""»]|[«18""»]|[-6-]}
<Lit 0x27fcc 18> {[«18""»]|[«18""»]|[«18""»]|[-2-]|[$$M200_KERNEL_0.M200]}
<Call 0x27fd8 0x277ee> {[«18""»]|[«18""»]|[«18""»]|[-2-]|[$$M200_KERNEL_0.M200]}
<POP 27fda-27fdc StackAdj> Δ+4 {[«18""»]|[«18""»]|[«18""»]|[-2-]}
<MI 27fdc TST.B (A7)+> Δ+2 {[«18""»]|[«18""»]|[«18""»]}
<MI 27fde BNE 0x2800c> {[«18""»]|[«18""»]|[«18""»]}
<POP 27fe0-27ff6 Naked> Σ-54 ↓ →0x2800c
<POP 27fe0-27fe2 StackAdj> Δ-6 {[-60-]}
<Lit 0x27fe2> {[-56-]|[$$…]}
<Pointer.sp 0x27fe2 24> Δ-4
<Const 0x27fe6 0x1.2> Δ-2
<Const 0x27fe8 0x12.2> Δ-2
<Call 0x27fea 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 27fec-27fee StackAdj> Δ+8
<Call 0x27fee 0x277ee> {[-56-]|[$$…]}
<POP 27ff0-27ff2 StackAdj> Δ+4 {[-56-]}
<MI 27ff2 TST.B (A7)+> Δ+2 {[-54-]}
<MI 27ff4 BNE 0x2800c> {[-54-]}
<POP 27ff6-2800c Naked> Σ-54 ↓ →0x2803c
<POP 27ff6-27ff8 StackAdj> Δ-6 {[-60-]}
<Lit 0x27ff8> {[-56-]|[$$…]}
<Pointer.sp 0x27ff8 6> Δ-4
<Const 0x27ffc 0x1.2> Δ-2
<Const 0x27ffe 0x12.2> Δ-2
<Call 0x28000 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 28002-28004 StackAdj> Δ+8
<Call 0x28004 0x277ee> {[-56-]|[$$…]}
<POP 28006-28008 StackAdj> Δ+4 {[-56-]}
<MI 28008 TST.B (A7)+> Δ+2 {[-54-]}
<MI 2800a BEQ 0x2803c> {[-54-]}
<POP 2800c-2803c Naked> Σ-54 →0x280f0 ←0x27fa6 ←0x27fe0
<Blob 0x2800c [72] @> Δ-72 {[-54-]|[«72""»]}
<POP 2801e-28020 StackAdj> Δ-4 {[-54-]|[«72""»]|[-4-]}
<Lit 0x28020 71> {[-54-]|[«72""»]|[$$Model specific IOP kernel(s) are missing, the disk may not be bootable.]}
<Call 0x2802e 0x103e0> {[-54-]|[«72""»]|[$$Model specific IOP kernel(s) are missing, the disk may not be bootable.]}
WriteConsoleStringCrLf(str : String)
<POP 28034-28038 StackAdj> Δ+76 {[-54-]}
<MI 28038 BRA 0x280f0> {[-54-]}
<POP 2803c-280f0 Naked> Σ-54 ↓ ←0x27ff6
<Blob 0x2803c [18] @> Δ-18 {[-54-]|[«18""»]}
<Blob 0x28048 [14] @> Δ-14 {[-54-]|[«18""»]|[«14""»]}
<POP 28058-2805a StackAdj> Δ-4 {[-54-]|[«18""»]|[«14""»]|[-4-]}
<Lit 0x2805a 18> {[-54-]|[«18""»]|[«14""»]|[$$M200_KERNEL_0.M200]}
<POP 28064-28066 StackAdj> Δ-4 {[-54-]|[«18""»]|[«14""»]|[$$M200_KERNEL_0.M200]|[-4-]}
<Lit 0x28066 13> {[-54-]|[«18""»]|[«14""»]|[$$M200_KERNEL_0.M200]|[$$KERNEL_0.M200]}
<Call 0x28072 0x225c2> {[-54-]|[«18""»]|[«14""»]|[$$M200_KERNEL_0.M200]|[$$KERNEL_0.M200]}
<POP 28074-28078 StackAdj> Δ+40 {[-54-]}
<Blob 0x28078 [18] @> Δ-18 {[-54-]|[«18""»]}
<Blob 0x28084 [14] @> Δ-14 {[-54-]|[«18""»]|[«14""»]}
<POP 28094-28096 StackAdj> Δ-4 {[-54-]|[«18""»]|[«14""»]|[-4-]}
<Lit 0x28096 18> {[-54-]|[«18""»]|[«14""»]|[$$M200_KERNEL_1.M200]}
<POP 280a0-280a2 StackAdj> Δ-4 {[-54-]|[«18""»]|[«14""»]|[$$M200_KERNEL_1.M200]|[-4-]}
<Lit 0x280a2 13> {[-54-]|[«18""»]|[«14""»]|[$$M200_KERNEL_1.M200]|[$$KERNEL_1.M200]}
<Call 0x280ae 0x225c2> {[-54-]|[«18""»]|[«14""»]|[$$M200_KERNEL_1.M200]|[$$KERNEL_1.M200]}
<POP 280b0-280b4 StackAdj> Δ+40 {[-54-]}
<Blob 0x280b4 [18] @> Δ-18 {[-54-]|[«18""»]}
<Blob 0x280c0 [14] @> Δ-14 {[-54-]|[«18""»]|[«14""»]}
<POP 280d0-280d2 StackAdj> Δ-4 {[-54-]|[«18""»]|[«14""»]|[-4-]}
<Lit 0x280d2 18> {[-54-]|[«18""»]|[«14""»]|[$$M200_KERNEL_2.M200]}
<POP 280dc-280de StackAdj> Δ-4 {[-54-]|[«18""»]|[«14""»]|[$$M200_KERNEL_2.M200]|[-4-]}
<Lit 0x280de 13> {[-54-]|[«18""»]|[«14""»]|[$$M200_KERNEL_2.M200]|[$$KERNEL_2.M200]}
<Call 0x280ea 0x225c2> {[-54-]|[«18""»]|[«14""»]|[$$M200_KERNEL_2.M200]|[$$KERNEL_2.M200]}
<POP 280ec-280f0 StackAdj> Δ+40 {[-54-]}
<POP 280f0-280f4 Naked> Σ-54 Δ+54 ↓ ←0x2800c
<POP 280f0-280f4 StackAdj> Δ+54 {}
<POP 280f4-280fc Epilogue> Σ0 ←0x27b5a
@ 280fc
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00a @ 1(r)>
<LVAR -0x00b 1(rw)>
<LVAR -0x00e @ 1(r)>
<POP 280fc-282c4 Body>
<POP 280fc-28112 Prologue> Σ0 ↓
<POP 28112-2812a RegCacheLoad> Σ0 ↓
<POP 2812a-28130 Naked> Σ0 ↓ →0x281b4
<MI 2812a TST.B 0x2ef34> {}
<MI 2812c BEQ 0x281b4> {}
<POP 28130-2813c Naked> Σ0 ↓ →0x281b4
<MI 28130 MOVE.B 0x296da,D0> {}
<MI 28136 CMPI.B #0x02,D0> {}
<MI 2813a BEQ 0x281b4> {}
<POP 2813c-2814a Naked> Σ0 ↓
<MI 2813c MOVE.W 0x296dc,D0> {}
<POP 0x28142 LimitCheck 0x0 ≤ D0 ≤ 0x3> {}
<MI 28144 MOVE.W D0,D7> {}
<MI 28146 MOVEQ.L #0x01,D6> {}
<MI 28148 MOVEQ.L #0x01,D5> {}
<POP 2814a-28166 Naked> Σ0 ↓ →0x2816a ←0x28192
<POP 0x2814a LimitCheck 0x0 ≤ D7 ≤ 0x3> {}
<MI 2814c MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<MI 2814e CLR.B -(A7)> Δ-2 {[2, 'D7']|[#0]}
<MI 28150 MOVE.B D6,D0> {[2, 'D7']|[#0]}
<MI 28152 EXTB.W D0> {[2, 'D7']|[#0]}
<POP 0x28154 LimitCheck 0x0 ≤ D0 ≤ 0x1> {[2, 'D7']|[#0]}
<MI 28156 MOVE.B D0,-(A7)> Δ-2 {[2, 'D7']|[#0]|[2, 'D0']}
<Pointer.fp 0x28158 <LVAR -0x00e @ 1(r)>> Δ-4 {[2, 'D7']|[#0]|[2, 'D0']|[@@-14]}
<Call 0x2815a 0x1040c> {[2, 'D7']|[#0]|[2, 'D0']|[@@-14]}
FSCALL_1040c
<POP 28160-28162 StackAdj> Δ+10 {}
<MI 28162 TST.B (A6-0xe)> {}
<MI 28164 BNE 0x2816a> {}
<POP 28166-2816a Naked> Σ0 →0x28210
<MI 28166 BRA 0x28210> {}
<POP 2816a-2816e Naked> Σ0 ↓ →0x28192 ←0x2814a
<MI 2816a CMP.L #0x01,D5> {}
<MI 2816c BNE 0x28192> {}
<POP 2816e-28192 Naked> Σ0 ↓
<Blob 0x2816e [40] @> Δ-40 {[«40""»]}
<POP 2817a-2817c StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x2817c 40> {[«40""»]|[$$waiting for tape to rewind after booting]}
<Call 0x28188 0x103e0> {[«40""»]|[$$waiting for tape to rewind after booting]}
WriteConsoleStringCrLf(str : String)
<POP 2818e-28192 StackAdj> Δ+44 {}
<POP 28192-281a8 Naked> Σ0 ↓ →0x2814a ←0x2816a
<MI 28192 MOVEQ.L #0x00,D6> {}
<Const 0x28194 0x9896.4> Δ-4 {[##39062]}
<Call 0x2819a 0x10224> {[##39062]}
KC12_Sleep(dur: Long)
<POP 281a0-281a2 StackAdj> Δ+4 {}
<MI 281a2 ADDQ.L #0x1,D5> {}
<MI 281a4 CMP.L #0x28,D5> {}
<MI 281a6 BLE 0x2814a> {}
<POP 281a8-281b4 Naked> Σ0 ↓ ←0x2820e
<Const 0x281a8 0x1.2> Δ-2 {[#1]}
<Pointer.fp 0x281aa <LVAR -0x00e @ 1(r)>> Δ-4 {[#1]|[@@-14]}
<Call 0x281ac 0x10428> {[#1]|[@@-14]}
FSCALL_10428
<POP 281b2-281b4 StackAdj> Δ+6 {}
<POP 281b4-2820c Naked> Σ0 ↓ →0x2820e ←0x2812a ←0x28130
<Blob 0x281b4 [26] @> Δ-26 {[«26""»]}
<POP 281c6-281c8 StackAdj> Δ-8 {[«26""»]|[-8-]}
<Lit 0x281c8 25> {[«26""»]|[-4-]|[$$Tape drive unit number :_]}
<Const 0x281d6 0x0.4> Δ-4 {[«26""»]|[-4-]|[$$Tape drive unit number :_]|[##0]}
<Const 0x281da 0x3.4> Δ-4 {[«26""»]|[-4-]|[$$Tape drive unit number :_]|[##0]|[##3]}
<Call 0x281de 0x103ec> {[«26""»]|[-4-]|[$$Tape drive unit number :_]|[##0]|[##3]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 281e4-281e8 StackAdj> Δ+12 {[«26""»]|[-4-]}
<MI 281e8 MOVE.L (A7)+,D0> Δ+4 {[«26""»]}
<POP 0x281ea LimitCheck 0x0 ≤ D0 ≤ 0x3> {[«26""»]}
<POP 281f0-281f4 StackAdj> Δ+26 {}
<MI 281f4 MOVE.W D0,D7> {}
<POP 0x281f6 LimitCheck 0x0 ≤ D7 ≤ 0x3> {}
<MI 281f8 MOVE.W D7,-(A7)> Δ-2 {[2, 'D7']}
<MI 281fa CLR.B -(A7)> Δ-2 {[2, 'D7']|[#0]}
<Const 0x281fc 0x1.2> Δ-2 {[2, 'D7']|[#0]|[#1]}
<Pointer.fp 0x281fe <LVAR -0x00e @ 1(r)>> Δ-4 {[2, 'D7']|[#0]|[#1]|[@@-14]}
<Call 0x28200 0x1040c> {[2, 'D7']|[#0]|[#1]|[@@-14]}
FSCALL_1040c
<POP 28206-28208 StackAdj> Δ+10 {}
<MI 28208 TST.B (A6-0xe)> {}
<MI 2820a BNE 0x2820e> {}
<POP 2820c-2820e Naked> Σ0 →0x28210
<MI 2820c BRA 0x28210> {}
<POP 2820e-28210 Naked> Σ0 →0x281a8 ←0x281b4
<MI 2820e BRA 0x281a8> {}
<POP 28210-28214 Naked> Σ0 ↓ →0x2821a ←0x28166 ←0x2820c
<MI 28210 TST.B 0x2ef34> {}
<MI 28212 BEQ 0x2821a> {}
<POP 28214-2821a Naked> Σ0 →0x28254
<MI 28214 MOVE.B #0x01,(A6-0xb)> {}
<MI 28218 BRA 0x28254> {}
<POP 2821a-28254 Naked> Σ0 ↓ ←0x28210
<Blob 0x2821a [52] @> Δ-52 {[«52""»]}
<POP 2822c-2822e StackAdj> Δ-6 {[«52""»]|[-6-]}
<Lit 0x2822e 51> {[«52""»]|[-2-]|[$$Do you want to display filenames as they are loaded]}
<POP 2823a-2823c StackAdj> Δ-2 {[«52""»]|[-2-]|[$$Do you want to display filenames as they are loaded]|[-2-]}
<POP 2823c-2823d StackAdj> Δ+2 {[«52""»]|[-2-]|[$$Do you want to display filenames as they are loaded]}
<Const 0x2823d 0x1.2> Δ-2 {[«52""»]|[-2-]|[$$Do you want to display filenames as they are loaded]|[#1]}
<Call 0x2823e 0x103f0> {[«52""»]|[-2-]|[$$Do you want to display filenames as they are loaded]|[#1]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 28244-28246 StackAdj> Δ+6 {[«52""»]|[-2-]}
<MI 28246 MOVE.B (A7)+,D0> Δ+2 {[«52""»]}
<MI 28248 EXTB.W D0> {[«52""»]}
<POP 0x2824a LimitCheck 0x0 ≤ D0 ≤ 0x1> {[«52""»]}
<POP 2824c-28250 StackAdj> Δ+52 {}
<MI 28250 MOVE.B D0,(A6-0xb)> {}
<POP 28254-28260 Naked> Σ0 ↓ ←0x28214
<Pointer.fp 0x28254 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Call 0x28258 0x10304> {[@@-8]}
GetRtc() : TimeStamp
<POP 2825e-28260 StackAdj> Δ+4 {}
<POP 28260-28284 Naked> Σ0 ↓ →0x28260 ←0x28260
<MI 28260 MOVE.B (A6-0xb),D0> {}
<MI 28264 EXTB.W D0> {}
<POP 0x28266 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 28268 MOVE.B D0,-(A7)> Δ-2 {[2, 'D0']}
<Const 0x2826a 0x1.2> Δ-2 {[2, 'D0']|[#1]}
<Const 0x2826c 0x7fff.4> Δ-4 {[2, 'D0']|[#1]|[##32767]}
<Pointer.fp 0x28270 <LVAR -0x00a @ 1(r)>> Δ-4 {[2, 'D0']|[#1]|[##32767]|[@@-10]}
<Call 0x28274 0x10438> {[2, 'D0']|[#1]|[##32767]|[@@-10]}
FSCALL_10438
<POP 2827a-2827e StackAdj> Δ+12 {}
<MI 2827e TST.B (A6-0xa)> {}
<MI 28282 BEQ 0x28260> {}
<POP 28284-282bc Naked> Σ0 ↓
<Pointer.fp 0x28284 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x28288 0x10304> {[@@-4]}
GetRtc() : TimeStamp
<MI 2828e MOVE.L (A6-0x8),(A7)> {[4, '(A6-0x8)']}
<MI 28292 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x4)']}
<Call 0x28296 0x22b48> {[4, '(A6-0x8)']|[4, '(A6-0x4)']}
<POP 2829a-2829c StackAdj> Δ+6 {[-2-]}
<MI 2829c CLR.B (A7)> {[-2-]}
<Pointer.fp 0x2829e <LVAR -0x00e @ 1(r)>> Δ-4 {[-2-]|[@@-14]}
<Call 0x282a0 0x10414> {[-2-]|[@@-14]}
FSCALL_10414
<POP 282a6-282a8 StackAdj> Δ+6 {}
<Call 0x282a8 0x10410> {}
FSCALL_10410
<Call 0x282ae 0x10390> {}
WriteFreeList(void)
<Call 0x282b4 0x279c0> {}
<Call 0x282b8 0x27860> {}
<POP 282bc-282c4 Epilogue> Σ0
@ 282c4
<LVAR -0x003 @ 1(r)>
<LVAR -0x004 @ 1(r)>
<POP 282c4-28366 Body>
<POP 282c4-282da Prologue> Σ0 ↓
<POP 282da-282e2 RegCacheLoad> Σ0 ↓
<POP 282e2-282f0 Naked> Σ0 ↓ →0x2835e
<MI 282e2 CLR.B (A6-0x3)> {}
<Pointer.fp 0x282e4 <LVAR -0x003 @ 1(r)>> Δ-4 {[@@-3]}
<Call 0x282e6 0x2671c> {[@@-3]}
<POP 282ea-282ec StackAdj> Δ+4 {}
<MI 282ec TST.B (A6-0x3)> {}
<MI 282ee BEQ 0x2835e> {}
<POP 282f0-2830c Naked> Σ0 ↓ →0x28354
<Call 0x282f0 0x26ed8> {}
<Call 0x282f4 0x27284> {}
<Blob 0x282f8 [2] 0x10008> Δ-2 {[«2»]}
<Pointer.fp 0x282fe <LVAR -0x004 @ 1(r)>> Δ-4 {[«2»]|[@@-4]}
<Call 0x28300 0x10394> {[«2»]|[@@-4]}
MountDisk(drive : Word ; VAR status : Byte)
<POP 28306-28308 StackAdj> Δ+6 {}
<MI 28308 TST.B (A6-0x4)> {}
<MI 2830a BEQ 0x28354> {}
<POP 2830c-28354 Naked> Σ0 ↓
<Blob 0x2830c [4] @> Δ-4 {[«4""»]}
<Blob 0x28310 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x28314 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x28318 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 2831c-2831e StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]}
<Lit 0x2831e 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]}
<POP 28330-28332 StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]|[-4-]}
<MI 28332 MOVE.B (A6-0x4),D0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]|[-4-]}
<MI 28334 EXTB.W D0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]|[-4-]}
<POP 0x28336 LimitCheck 0x0 ≤ D0 ≤ 0xf> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]|[-4-]}
<MI 2833a MOVE.B D0,-(A7)> Δ-2 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]|[-4-]|[2, 'D0']}
<Call 0x2833c 0x103a0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]|[-4-]|[2, 'D0']}
FsErrMsgStr(err: Byte) : String
<POP 28342-28344 StackAdj> Δ+2 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]|[-4-]}
<Call 0x28344 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]|[-4-]}
StringCat2(a, b : String) : String
<POP 2834a-2834c StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Call 0x2834c 0x22522> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<POP 28350-28354 StackAdj> Δ+20 {}
<POP 28354-2835e Naked> Σ0 ↓ ←0x282f0
<Call 0x28354 0x2754e> {}
<Call 0x28358 0x103a4> {}
Open_ERROR_LOG(void)
<POP 2835e-28366 Epilogue> Σ0 ←0x282e2
@ 28366
<LVAR -0x016 4(rw)>
<LVAR -0x01a 4(rw)>
<LVAR -0x01e 4(rw)>
<LVAR -0x023 1(r)>
<LVAR -0x024 1(r)>
<LVAR -0x026 1(w) 2(w) 4(r)>
<LVAR -0x028 @ 1(r)>
<LVAR -0x030 4(rw)>
<POP 28366-286b0 Body> Δ-4
<POP 28366-2837c Prologue> Σ0 ↓
<POP 2837c-28390 RegCacheLoad> Σ0 ↓
<POP 28390-28418 Naked> Σ0 ↓
<Const 0x28390 0x1.2> Δ-2 {[#1]}
<Call 0x28392 0x22d70> {[#1]}
<POP 28396-28398 StackAdj> Δ+2 {}
<MI 28398 CLR.L (A6-0x30)> {}
<Blob 0x2839a [20] @> Δ-20 {[«20""»]}
<Blob 0x283a6 [24] @> Δ-24 {[«20""»]|[«24""»]}
<POP 283b2-283b4 StackAdj> Δ-8 {[«20""»]|[«24""»]|[-8-]}
<Lit 0x283b4 20> {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]}
<POP 283be-283c0 StackAdj> Δ-4 {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]|[-4-]}
<MI 283c0 CLR.L D0> {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]|[-4-]}
<MI 283c2 MOVE.W 0x2973e,D0> {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]|[-4-]}
<MI 283c8 MOVE.L D0,-(A7)> Δ-4 {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]|[-4-]|[4, 'D0']}
<Call 0x283ca 0x102e4> {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<Lit 0x283cc 24> {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]|[-4-]|[$$, first DIAG cylinder =_]}
<POP 283d8-283da StackAdj> Δ-4 {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]|[-4-]|[$$, first DIAG cylinder =_]|[-4-]}
<MI 283da CLR.L D0> {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]|[-4-]|[$$, first DIAG cylinder =_]|[-4-]}
<MI 283dc MOVE.W 0x2974a,D0> {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]|[-4-]|[$$, first DIAG cylinder =_]|[-4-]}
<MI 283e2 MOVE.L D0,-(A7)> Δ-4 {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]|[-4-]|[$$, first DIAG cylinder =_]|[-4-]|[4, 'D0']}
<Call 0x283e4 0x102e4> {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]|[-4-]|[$$, first DIAG cylinder =_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 283e6-283e8 StackAdj> Δ+4 {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]|[-4-]|[$$, first DIAG cylinder =_]|[-4-]}
<Call 0x283e8 0x102d8> {[«20""»]|[«24""»]|[-4-]|[$$last DFS cylinder =_]|[-4-]|[$$, first DIAG cylinder =_]|[-4-]}
StringCat4(a, b, c, d : String) : String
<POP 283ee-283f2 StackAdj> Δ+16 {[«20""»]|[«24""»]|[-4-]}
<Call 0x283f2 0x103e0> {[«20""»]|[«24""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 283f8-283fc StackAdj> Δ+48 {}
<MI 283fc ORI.B #0x80,(A6-0x26)> {}
<MI 28402 ANDI.B #0xbf,(A6-0x26)> {}
<MI 28408 ANDI.W #0xc000,(A6-0x26)> {}
<MI 2840e CLR.B (A6-0x24)> {}
<MI 28412 CLR.B (A6-0x23)> {}
<MI 28416 MOVEQ.L #0x00,D0> {}
<POP 28418-28440 Naked> Σ0 ↓ →0x28418 ←0x28418
<POP 0x28418 LimitCheck 0x0 ≤ D0 ≤ 0x7ff> {}
<MI 28422 MOVE.L D0,D1> {}
<MI 28424 ASL.L #0x2,D1> {}
<MI 28426 LEA.L 0x296d2,A0> {}
<MI 2842c LEA.L (A0+D1.L),A0> {}
<MI 28430 MOVE.L (A6-0x26),(A0+0x44c)> {}
<MI 28436 ADDQ.L #0x1,D0> {}
<MI 28438 CMPI.L #0x000007ff,D0> {}
<MI 2843e BLE 0x28418> {}
<POP 28440-28450 Naked> Σ0 ↓ →0x28478
<Pointer.fp 0x28440 <LVAR -0x028 @ 1(r)>> Δ-4 {[@@-40]}
<Call 0x28444 0x23946> {[@@-40]}
<POP 28448-2844a StackAdj> Δ+4 {}
<MI 2844a TST.B (A6-0x28)> {}
<MI 2844e BNE 0x28478> {}
<POP 28450-28478 Naked> Σ0 ↓
<Blob 0x28450 [20] @> Δ-20 {[«20""»]}
<POP 28460-28462 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x28462 19> {[«20""»]|[$$the error was fatal]}
<Call 0x28470 0x22522> {[«20""»]|[$$the error was fatal]}
<POP 28474-28478 StackAdj> Δ+24 {}
<POP 28478-28488 Naked> Σ0 ↓ →0x284b0 ←0x28440
<Pointer.fp 0x28478 <LVAR -0x028 @ 1(r)>> Δ-4 {[@@-40]}
<Call 0x2847c 0x23aa2> {[@@-40]}
<POP 28480-28482 StackAdj> Δ+4 {}
<MI 28482 TST.B (A6-0x28)> {}
<MI 28486 BNE 0x284b0> {}
<POP 28488-284b0 Naked> Σ0 ↓
<Blob 0x28488 [20] @> Δ-20 {[«20""»]}
<POP 28498-2849a StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x2849a 19> {[«20""»]|[$$the error was fatal]}
<Call 0x284a8 0x22522> {[«20""»]|[$$the error was fatal]}
<POP 284ac-284b0 StackAdj> Δ+24 {}
<POP 284b0-284b8 Naked> Σ0 ↓ ←0x28478
<MI 284b0 MOVEQ.L #0x00,D5> {}
<MI 284b2 CLR.L (A6-0x1e)> {}
<MI 284b6 MOVEQ.L #0x00,D0> {}
<POP 284b8-284de Naked> Σ0 Δ-8 ↓ →0x284ec ←0x285ce
<MI 284b8 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<POP 0x284ba LimitCheck 0x0 ≤ D0 ≤ 0x7ff> {[4, 'D0']}
<MI 284c4 MOVE.L D0,D1> {[4, 'D0']}
<MI 284c6 ASL.L #0x2,D1> {[4, 'D0']}
<MI 284c8 LEA.L 0x296d2,A0> {[4, 'D0']}
<MI 284ce LEA.L (A0+D1.L),A0> {[4, 'D0']}
<MI 284d2 MOVE.L A0,-(A7)> Δ-4 {[4, 'D0']|[4, 'A0']}
<MI 284d4 MOVE.W (A0+0x44c),D1> {[4, 'D0']|[4, 'A0']}
<MI 284d8 LSL.W #0x2,D1> {[4, 'D0']|[4, 'A0']}
<MI 284da LSR.W #0x2,D1> {[4, 'D0']|[4, 'A0']}
<MI 284dc BNE 0x284ec> {[4, 'D0']|[4, 'A0']}
<POP 284de-284e4 Naked> Σ-8 ↓ →0x284ec
<MI 284de TST.B (A0+0x44e)> {[-8-]}
<MI 284e2 BNE 0x284ec> {[-8-]}
<POP 284e4-284ec Naked> Σ-8 ↓ →0x285c0
<MI 284e4 TST.B (A0+0x44f)> {[-8-]}
<MI 284e8 BEQ 0x285c0> {[-8-]}
<POP 284ec-284fa Naked> Σ-8 ↓ →0x28520 ←0x284b8 ←0x284de
<MI 284ec ADDQ.L #0x1,(A6-0x30)> {[-8-]}
<MI 284ee CLR.L D1> {[-8-]}
<MI 284f0 MOVE.B (A0+0x44e),D1> {[-8-]}
<MI 284f4 CMPI.W #0x00ff,D1> {[-8-]}
<MI 284f8 BNE 0x28520> {[-8-]}
<POP 284fa-2850e Naked> Σ-8 ↓
<MI 284fa CLR.L (A6-0x1a)> {[-8-]}
<MI 284fe CLR.L D1> {[-8-]}
<MI 28500 MOVE.B 0x29714,D1> {[-8-]}
<MI 28506 SUBQ.W #0x1,D1> {[-8-]}
<MI 28508 EXTW.L D1> {[-8-]}
<MI 2850a MOVE.L D1,(A6-0x16)> {[-8-]}
<POP 2850e-28520 Naked> Σ-8 →0x28542 ←0x28538
<MI 2850e MOVEQ.L #0x00,D7> {[-8-]}
<MI 28510 CLR.L D1> {[-8-]}
<MI 28512 MOVE.B 0x29715,D1> {[-8-]}
<MI 28518 SUBQ.W #0x1,D1> {[-8-]}
<MI 2851a EXTW.L D1> {[-8-]}
<MI 2851c MOVE.L D1,D6> {[-8-]}
<MI 2851e BRA 0x28542> {[-8-]}
<POP 28520-28538 Naked> Σ-8 ↓ →0x2853a ←0x284ec
<MI 28520 MOVE.W D1,D2> {[-8-]}
<MI 28522 EXTW.L D2> {[-8-]}
<MI 28524 MOVE.L D2,(A6-0x1a)> {[-8-]}
<MI 28528 MOVE.L D2,(A6-0x16)> {[-8-]}
<MI 2852c CLR.L D1> {[-8-]}
<MI 2852e MOVE.B (A0+0x44f),D1> {[-8-]}
<MI 28532 CMPI.W #0x00ff,D1> {[-8-]}
<MI 28536 BNE 0x2853a> {[-8-]}
<POP 28538-2853a Naked> Σ-8 →0x2850e
<MI 28538 BRA 0x2850e> {[-8-]}
<POP 2853a-28542 Naked> Σ-8 ↓ ←0x28520
<MI 2853a MOVE.W D1,D2> {[-8-]}
<MI 2853c EXTW.L D2> {[-8-]}
<MI 2853e MOVE.L D2,D7> {[-8-]}
<MI 28540 MOVE.L D2,D6> {[-8-]}
<POP 28542-2854e Naked> Σ-8 Δ-4 ↓ →0x28562 ←0x2850e
<MI 28542 MOVE.L (A6-0x16),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x16)']}
<MI 28546 MOVE.L (A6-0x1a),D1> {[-8-]|[4, '(A6-0x16)']}
<MI 2854a CMP.L (A7),D1> {[-8-]|[4, '(A6-0x16)']}
<MI 2854c BGT 0x28562> {[-8-]|[4, '(A6-0x16)']}
<POP 2854e-28562 Naked> Σ-12 ↓
<MI 2854e MOVE.L (A7),D2> {[-12-]}
<POP 0x28550 LimitCheck -0x7fffffff ≤ D1> {[-12-]}
<MI 28550 CMPI.L #0x80000001,D1>
<MI 28556 BLT 0x28560>
<POP 0x28558 LimitCheck D2 ≤ 0x7fffffff> {[-12-]}
<MI 28558 CMPI.L #0x7fffffff,D2>
<MI 2855e BLE 0x28562>
<MI 28560 TRAP #15>
<POP 28562-28566 Naked> Σ-12 ↓ →0x2856a ←0x28542 ←0x285ba
<MI 28562 CMP.L (A7),D1> {[-12-]}
<MI 28564 BLE 0x2856a> {[-12-]}
<POP 28566-2856a Naked> Σ-12 Δ-4 →0x285be
<POP 28566-28568 StackAdj> Δ-4 {[-16-]}
<MI 28568 BRA 0x285be> {[-16-]}
<POP 2856a-28574 Naked> Σ-12 Δ-8 ↓ →0x28588 ←0x28562
<MI 2856a MOVE.L D1,-(A7)> Δ-4 {[-12-]|[4, 'D1']}
<MI 2856c MOVE.L D6,-(A7)> Δ-4 {[-12-]|[4, 'D1']|[4, 'D6']}
<MI 2856e MOVE.L D7,D0> {[-12-]|[4, 'D1']|[4, 'D6']}
<MI 28570 CMP.L (A7),D0> {[-12-]|[4, 'D1']|[4, 'D6']}
<MI 28572 BGT 0x28588> {[-12-]|[4, 'D1']|[4, 'D6']}
<POP 28574-28588 Naked> Σ-20 ↓
<MI 28574 MOVE.L (A7),D2> {[-20-]}
<POP 0x28576 LimitCheck -0x7fffffff ≤ D0> {[-20-]}
<MI 28576 CMPI.L #0x80000001,D0>
<MI 2857c BLT 0x28586>
<POP 0x2857e LimitCheck D2 ≤ 0x7fffffff> {[-20-]}
<MI 2857e CMPI.L #0x7fffffff,D2>
<MI 28584 BLE 0x28588>
<MI 28586 TRAP #15>
<POP 28588-2858c Naked> Σ-20 ↓ →0x28590 ←0x2856a ←0x285ae
<MI 28588 CMP.L (A7),D0> {[-20-]}
<MI 2858a BLE 0x28590> {[-20-]}
<POP 2858c-28590 Naked> Σ-20 Δ-4 →0x285b2
<POP 2858c-2858e StackAdj> Δ-4 {[-24-]}
<MI 2858e BRA 0x285b2> {[-24-]}
<POP 28590-285a0 Naked> Σ-20 Δ-4 ↓ →0x285a6 ←0x28588
<MI 28590 MOVE.L D0,-(A7)> Δ-4 {[-20-]|[4, 'D0']}
<MI 28592 MOVEA.L (A7+0x10),A0> {[-20-]|[4, 'D0']}
<MI 28596 MOVE.B (A0+0x44c),D1> {[-20-]|[4, 'D0']}
<MI 2859a LSL.B #0x1,D1> {[-20-]|[4, 'D0']}
<MI 2859c LSR.B #0x7,D1> {[-20-]|[4, 'D0']}
<MI 2859e BEQ 0x285a6> {[-20-]|[4, 'D0']}
<POP 285a0-285a6 Naked> Σ-24 →0x285a8
<MI 285a0 ADDQ.L #0x1,(A6-0x1e)> {[-24-]}
<MI 285a4 BRA 0x285a8> {[-24-]}
<POP 285a6-285a8 Naked> Σ-24 ↓ ←0x28590
<MI 285a6 ADDQ.L #0x1,D5> {[-24-]}
<POP 285a8-285ae Naked> Σ-24 ↓ →0x285b2 ←0x285a0
<MI 285a8 MOVE.L (A7),D0> {[-24-]}
<MI 285aa ADDQ.L #0x1,D0> {[-24-]}
<MI 285ac BVS 0x285b2> {[-24-]}
<POP 285ae-285b2 Naked> Σ-24 Δ+4 →0x28588
<POP 285ae-285b0 StackAdj> Δ+4 {[-20-]}
<MI 285b0 BRA 0x28588> {[-20-]}
<POP 285b2-285ba Naked> Σ-24 Δ+8 ↓ →0x285be ←0x2858c ←0x285a8
<POP 285b2-285b4 StackAdj> Δ+8 {[-16-]}
<MI 285b4 MOVE.L (A7),D1> {[-16-]}
<MI 285b6 ADDQ.L #0x1,D1> {[-16-]}
<MI 285b8 BVS 0x285be> {[-16-]}
<POP 285ba-285be Naked> Σ-16 Δ+4 →0x28562
<POP 285ba-285bc StackAdj> Δ+4 {[-12-]}
<MI 285bc BRA 0x28562> {[-12-]}
<POP 285be-285c0 Naked> Σ-16 Δ+8 ↓ ←0x28566 ←0x285b2
<POP 285be-285c0 StackAdj> Δ+8 {[-8-]}
<POP 285c0-285ce Naked> Σ-8 Δ+4 ↓ →0x285d4 ←0x284e4
<POP 285c0-285c2 StackAdj> Δ+4 {[-4-]}
<MI 285c2 MOVE.L (A7),D0> {[-4-]}
<MI 285c4 ADDQ.L #0x1,D0> {[-4-]}
<MI 285c6 CMPI.L #0x000007ff,D0> {[-4-]}
<MI 285cc BGT 0x285d4> {[-4-]}
<POP 285ce-285d4 Naked> Σ-4 Δ+4 →0x284b8
<POP 285ce-285d0 StackAdj> Δ+4 {}
<MI 285d0 BRA 0x284b8> {}
<POP 285d4-286a8 Naked> Σ-4 Δ+4 ↓ ←0x285c0
<POP 285d4-285d6 StackAdj> Δ+4 {}
<Blob 0x285d6 [18] @> Δ-18 {[«18""»]}
<Blob 0x285e2 [18] @> Δ-18 {[«18""»]|[«18""»]}
<POP 285f4-285f6 StackAdj> Δ-8 {[«18""»]|[«18""»]|[-8-]}
<MI 285f6 MOVE.L D5,-(A7)> Δ-4 {[«18""»]|[«18""»]|[-8-]|[4, 'D5']}
<Call 0x285f8 0x102e4> {[«18""»]|[«18""»]|[-8-]|[4, 'D5']}
Long2String(a : Long) : String
<Lit 0x285fa 18> {[«18""»]|[«18""»]|[-8-]|[$$ Manufacturer and_]}
<MI 28606 MOVE.L (A6-0x1e),(A7)> {[«18""»]|[«18""»]|[-8-]|[4, '(A6-0x1e)']}
<POP 28604-28606 StackAdj> Δ-8 {[«18""»]|[«18""»]|[-8-]|[4, '(A6-0x1e)']|[-8-]}
<Call 0x2860a 0x102e4> {[«18""»]|[«18""»]|[-8-]|[4, '(A6-0x1e)']|[-8-]}
Long2String(a : Long) : String
<Lit 0x2860c 17> {[«18""»]|[«18""»]|[-8-]|[4, '(A6-0x1e)']|[-4-]|[$$ User bad blocks.]}
<Call 0x2861a 0x102d8> {[«18""»]|[«18""»]|[-8-]|[4, '(A6-0x1e)']|[-4-]|[$$ User bad blocks.]}
StringCat4(a, b, c, d : String) : String
<POP 28620-28624 StackAdj> Δ+16 {[«18""»]|[«18""»]|[-4-]}
<Call 0x28624 0x103e0> {[«18""»]|[«18""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2862a-2862e StackAdj> Δ+40 {}
<Call 0x2862e 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x28634 [28] @> Δ-28 {[«28""»]}
<Blob 0x28640 [34] @> Δ-34 {[«28""»]|[«34""»]}
<POP 28652-28654 StackAdj> Δ-8 {[«28""»]|[«34""»]|[-8-]}
<MI 28654 MOVE.L (A6-0x30),-(A7)> Δ-4 {[«28""»]|[«34""»]|[-8-]|[4, '(A6-0x30)']}
<Call 0x28656 0x102e4> {[«28""»]|[«34""»]|[-8-]|[4, '(A6-0x30)']}
Long2String(a : Long) : String
<Lit 0x28658 28> {[«28""»]|[«34""»]|[-8-]|[$$ defect table entries used,_]}
<POP 28664-28666 StackAdj> Δ-4 {[«28""»]|[«34""»]|[-8-]|[$$ defect table entries used,_]|[-4-]}
<MI 28666 MOVE.L #0x800,D0> {[«28""»]|[«34""»]|[-8-]|[$$ defect table entries used,_]|[-4-]}
<MI 2866c SUB.L (A6-0x30),D0> {[«28""»]|[«34""»]|[-8-]|[$$ defect table entries used,_]|[-4-]}
<MI 2866e MOVE.L D0,-(A7)> Δ-4 {[«28""»]|[«34""»]|[-8-]|[$$ defect table entries used,_]|[-4-]|[4, 'D0']}
<Call 0x28670 0x102e4> {[«28""»]|[«34""»]|[-8-]|[$$ defect table entries used,_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<Lit 0x28672 33> {[«28""»]|[«34""»]|[-8-]|[$$ defect table entries used,_]|[-4-]|[$$ available defect entries remain.]}
<Call 0x28680 0x102d8> {[«28""»]|[«34""»]|[-8-]|[$$ defect table entries used,_]|[-4-]|[$$ available defect entries remain.]}
StringCat4(a, b, c, d : String) : String
<POP 28686-2868a StackAdj> Δ+16 {[«28""»]|[«34""»]|[-4-]}
<Call 0x2868a 0x103e0> {[«28""»]|[«34""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 28690-28694 StackAdj> Δ+66 {}
<Call 0x28694 0x103dc> {}
WriteConsoleCrLf(void)
<Const 0x2869a 0x29704.4> Δ-4 {[##169732]}
<Call 0x286a0 0x102bc> {[##169732]}
FreeString(VAR a : String)
<POP 286a6-286a8 StackAdj> Δ+4 {}
<POP 286a8-286b0 Epilogue> Σ0
@ 286b0
<LVAR 0x008 4(r)>
<POP 286b0-286dc Body>
<POP 286b0-286c2 Prologue> Σ0 ↓
<POP 286c2-286d8 Naked> Σ0 ↓
<POP 286c2-286c4 StackAdj> Δ-4 {[-4-]}
<MI 286c4 MOVE.L (A4+0x4),-(A7)> Δ-4 {[-4-]|[4, '(A4+0x4)']}
<MI 286c8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A4+0x4)']|[4, '(A6+0x8)']}
<Call 0x286cc 0x102d0> {[-4-]|[4, '(A4+0x4)']|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 286d2-286d4 StackAdj> Δ+8 {[-4-]}
<MI 286d4 MOVE.L (A7)+,(A4+0x4)> Δ+4 {}
<POP 286d8-286dc Epilogue> Σ0
@ 286dc
<LVAR 0x008 1(r)>
<LVAR -0x00a 4(rw)>
<LVAR -0x00e @>
<POP 286dc-28860 Body> Δ+46
<POP 286dc-286f2 Prologue> Σ0 ↓
<POP 286f2-28700 RegCacheLoad> Σ0 ↓
<POP 28700-28706 Naked> Σ0 ↓
<Call 0x28700 0x28366> {}
<MI 28704 MOVEQ.L #0x00,D7> {}
<POP 28706-28728 Naked> Σ0 ↓ →0x28736 ←0x2884c
<POP 0x28706 LimitCheck 0x0 ≤ D7 ≤ 0x7ff> {}
<MI 28710 MOVE.L D7,D0> {}
<MI 28712 ASL.L #0x2,D0> {}
<MI 28714 LEA.L 0x296d2,A0> {}
<MI 2871a LEA.L (A0+D0.L),A0> {}
<MI 2871e MOVE.W (A0+0x44c),D0> {}
<MI 28722 LSL.W #0x2,D0> {}
<MI 28724 LSR.W #0x2,D0> {}
<MI 28726 BNE 0x28736> {}
<POP 28728-2872e Naked> Σ0 ↓ →0x28736
<MI 28728 TST.B (A0+0x44e)> {}
<MI 2872c BNE 0x28736> {}
<POP 2872e-28736 Naked> Σ0 ↓ →0x2884c
<MI 2872e TST.B (A0+0x44f)> {}
<MI 28732 BEQ 0x2884c> {}
<POP 28736-28740 Naked> Σ0 ↓ →0x28748 ←0x28706 ←0x28728
<MI 28736 MOVE.B (A0+0x44c),D0> {}
<MI 2873a LSL.B #0x1,D0> {}
<MI 2873c LSR.B #0x7,D0> {}
<MI 2873e BNE 0x28748> {}
<POP 28740-28748 Naked> Σ0 ↓ →0x2884c
<MI 28740 TST.B (A6+0x8)> {}
<MI 28744 BEQ 0x2884c> {}
<POP 28748-28752 Naked> Σ0 ↓ →0x28760 ←0x28736
<MI 28748 MOVE.B (A0+0x44c),D0> {}
<MI 2874c LSL.B #0x1,D0> {}
<MI 2874e LSR.B #0x7,D0> {}
<MI 28750 BEQ 0x28760> {}
<POP 28752-28760 Naked> Σ0 Δ-38 →0x2876c
<Blob 0x28752 [38] @> Δ-38 {[«38""»]}
<MI 2875e BRA 0x2876c> {[«38""»]}
<POP 28760-2876c Naked> Σ0 Δ-38 ↓ ←0x28748
<Blob 0x28760 [38] @> Δ-38 {[«38""»]}
<POP 2876c-287b8 Naked> Σ-38 Δ+38 ↓ →0x287d6 ←0x28752
<POP 2876c-2876e StackAdj> Δ-4 {[-42-]}
<Lit 0x2876e> {[-38-]|[$$…]}
<Pointer.sp 0x2876e 4> Δ-4
<Const 0x28772 0x1.2> Δ-2
<Const 0x28774 0x26.2> Δ-2
<Call 0x28776 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2877c-2877e StackAdj> Δ+8
<MI 2877e MOVE.L (A7)+,(A6-0xa)> Δ+4 {[-38-]}
<POP 28782-28784 StackAdj> Δ+38 {}
<POP 28784-28786 StackAdj> Δ-8 {[-8-]}
<MI 28786 CLR.L D0> {[-8-]}
<MI 28788 MOVE.W (A0+0x44c),D0> {[-8-]}
<MI 2878c LSL.W #0x2,D0> {[-8-]}
<MI 2878e LSR.W #0x2,D0> {[-8-]}
<MI 28790 MOVE.L D0,-(A7)> Δ-4 {[-8-]|[4, 'D0']}
<Call 0x28792 0x102e4> {[-8-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 28798-2879a StackAdj> Δ+4 {[-8-]}
<Const 0x2879a 0x4.4> Δ-4 {[-8-]|[##4]}
<Call 0x2879e 0x102f4> {[-8-]|[##4]}
RightPad(a : String; b : Long) : String
<POP 287a4-287a6 StackAdj> Δ+8 {[-4-]}
<MI 287a6 LEA.L (A6-0xe),A4> {[-4-]}
<Call 0x287a8 0x286b0> {[-4-]}
<POP 287aa-287ac StackAdj> Δ+4 {}
<MI 287ac CLR.L D0> {}
<MI 287ae MOVE.B (A0+0x44e),D0> {}
<MI 287b2 CMPI.W #0x00ff,D0> {}
<MI 287b6 BNE 0x287d6> {}
<POP 287b8-287d6 Naked> Σ0 Δ-4 →0x287f4
<Blob 0x287b8 [4] @> Δ-4 {[«4""»]}
<POP 287bc-287be StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x287be 4> {[«4""»]|[$$ ALL]}
<MI 287ce LEA.L (A6-0xe),A4> {[«4""»]|[$$ ALL]}
<Call 0x287d0 0x286b0> {[«4""»]|[$$ ALL]}
<POP 287d2-287d4 StackAdj> Δ+4 {[«4""»]}
<MI 287d4 BRA 0x287f4> {[«4""»]}
<POP 287d6-287f4 Naked> Σ0 Δ-4 ↓ ←0x2876c
<POP 287d6-287d8 StackAdj> Δ-8 {[-8-]}
<MI 287d8 EXTW.L D0> {[-8-]}
<MI 287da MOVE.L D0,-(A7)> Δ-4 {[-8-]|[4, 'D0']}
<Call 0x287dc 0x102e4> {[-8-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 287e2-287e4 StackAdj> Δ+4 {[-8-]}
<Const 0x287e4 0x4.4> Δ-4 {[-8-]|[##4]}
<Call 0x287e8 0x102f4> {[-8-]|[##4]}
RightPad(a : String; b : Long) : String
<POP 287ee-287f0 StackAdj> Δ+8 {[-4-]}
<MI 287f0 LEA.L (A6-0xe),A4> {[-4-]}
<Call 0x287f2 0x286b0> {[-4-]}
<POP 287f4-28802 Naked> Σ-4 Δ+4 ↓ →0x28820 ←0x287b8
<POP 287f4-287f6 StackAdj> Δ+4 {}
<MI 287f6 CLR.L D0> {}
<MI 287f8 MOVE.B (A0+0x44f),D0> {}
<MI 287fc CMPI.W #0x00ff,D0> {}
<MI 28800 BNE 0x28820> {}
<POP 28802-28820 Naked> Σ0 Δ-4 →0x2883e
<Blob 0x28802 [4] @> Δ-4 {[«4""»]}
<POP 28806-28808 StackAdj> Δ-4 {[«4""»]|[-4-]}
<Lit 0x28808 4> {[«4""»]|[$$ ALL]}
<MI 28818 LEA.L (A6-0xe),A4> {[«4""»]|[$$ ALL]}
<Call 0x2881a 0x286b0> {[«4""»]|[$$ ALL]}
<POP 2881c-2881e StackAdj> Δ+4 {[«4""»]}
<MI 2881e BRA 0x2883e> {[«4""»]}
<POP 28820-2883e Naked> Σ0 Δ-4 ↓ ←0x287f4
<POP 28820-28822 StackAdj> Δ-8 {[-8-]}
<MI 28822 EXTW.L D0> {[-8-]}
<MI 28824 MOVE.L D0,-(A7)> Δ-4 {[-8-]|[4, 'D0']}
<Call 0x28826 0x102e4> {[-8-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 2882c-2882e StackAdj> Δ+4 {[-8-]}
<Const 0x2882e 0x4.4> Δ-4 {[-8-]|[##4]}
<Call 0x28832 0x102f4> {[-8-]|[##4]}
RightPad(a : String; b : Long) : String
<POP 28838-2883a StackAdj> Δ+8 {[-4-]}
<MI 2883a LEA.L (A6-0xe),A4> {[-4-]}
<Call 0x2883c 0x286b0> {[-4-]}
<POP 2883e-2884c Naked> Σ-4 Δ+4 ↓ ←0x28802
<POP 2883e-28840 StackAdj> Δ+4 {}
<MI 28840 MOVE.L (A6-0xa),-(A7)> Δ-4 {[4, '(A6-0xa)']}
<Call 0x28844 0x103e0> {[4, '(A6-0xa)']}
WriteConsoleStringCrLf(str : String)
<POP 2884a-2884c StackAdj> Δ+4 {}
<POP 2884c-28858 Naked> Σ0 ↓ →0x28706 ←0x2872e ←0x28740
<MI 2884c ADDQ.L #0x1,D7> {}
<MI 2884e CMPI.L #0x000007ff,D7> {}
<MI 28854 BLE 0x28706> {}
<POP 28858-28860 Epilogue> Σ0
@ 28860
<LVAR -0x006 @ 4(r)>
<LVAR -0x008 @ 1(r)>
<POP 28860-289b8 Body>
<POP 28860-28876 Prologue> Σ0 ↓
<POP 28876-28892 RegCacheLoad> Σ0 ↓
<POP 28892-288c4 Naked> Σ0 ↓ →0x288e0
<Blob 0x28892 [20] @> Δ-20 {[«20""»]}
<POP 288a0-288a2 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x288a2 20> {[«20""»]|[$$HARDWARE.M200_CONFIG]}
<POP 288ac-288ae StackAdj> Δ-2 {[«20""»]|[$$HARDWARE.M200_CONFIG]|[-2-]}
<MI 288ae CLR.B (A7)> {[«20""»]|[$$HARDWARE.M200_CONFIG]|[-2-]}
<MI 288b0 CLR.B -(A7)> Δ-2 {[«20""»]|[$$HARDWARE.M200_CONFIG]|[-2-]|[#0]}
<Const 0x288b2 0x0.4> Δ-4 {[«20""»]|[$$HARDWARE.M200_CONFIG]|[-2-]|[#0]|[##0]}
<Pointer.fp 0x288b4 <LVAR -0x008 @ 1(r)>> Δ-4 {[«20""»]|[$$HARDWARE.M200_CONFIG]|[-2-]|[#0]|[##0]|[@@-8]}
<Pointer.fp 0x288b6 <LVAR -0x006 @ 4(r)>> Δ-4 {[«20""»]|[$$HARDWARE.M200_CONFIG]|[-2-]|[#0]|[##0]|[@@-8]|[@@-6]}
<Call 0x288b8 0x10380> {[«20""»]|[$$HARDWARE.M200_CONFIG]|[-2-]|[#0]|[##0]|[@@-8]|[@@-6]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 288be-288c0 StackAdj> Δ+40 {}
<MI 288c0 TST.B (A6-0x8)> {}
<MI 288c2 BNE 0x288e0> {}
<POP 288c4-288e0 Naked> Σ0 ↓
<MI 288c4 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<MI 288c6 CLR.W -(A7)> Δ-2 {[4, '(A6-0x6)']|[#0]}
<MI 288c8 CLR.W -(A7)> Δ-2 {[4, '(A6-0x6)']|[#0]|[#0]}
<Const 0x288ca 0x200.2> Δ-2 {[4, '(A6-0x6)']|[#0]|[#0]|[#512]}
<Const 0x288cc 0x1.2> Δ-2 {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]}
<MI 288ce LEA.L 0x2ef38,A0> {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]}
<MI 288d4 MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x288d6 <LVAR -0x008 @ 1(r)>> Δ-4 {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-8]}
<Call 0x288d8 0x10384> {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-8]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 288de-288e0 StackAdj> Δ+20 {}
<POP 288e0-288ea Naked> Σ0 ↓ →0x288f0 ←0x28892
<MI 288e0 CLR.B 0x2ef35> {}
<MI 288e6 TST.B (A6-0x8)> {}
<MI 288e8 BNE 0x288f0> {}
<POP 288ea-288f0 Naked> Σ0 ↓
<MI 288ea ADDQ.B #0x1,0x2ef35> {}
<POP 288f0-28926 Naked> Σ0 ↓ →0x28942 ←0x288e0
<Blob 0x288f0 [14] @> Δ-14 {[«14""»]}
<POP 288fe-28900 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x28900 14> {[«14""»]|[$$TCP_IP_HOST_ID]}
<POP 2890c-2890e StackAdj> Δ-2 {[«14""»]|[$$TCP_IP_HOST_ID]|[-2-]}
<MI 2890e CLR.B (A7)> {[«14""»]|[$$TCP_IP_HOST_ID]|[-2-]}
<MI 28910 CLR.B -(A7)> Δ-2 {[«14""»]|[$$TCP_IP_HOST_ID]|[-2-]|[#0]}
<Const 0x28912 0x0.4> Δ-4 {[«14""»]|[$$TCP_IP_HOST_ID]|[-2-]|[#0]|[##0]}
<Pointer.fp 0x28914 <LVAR -0x008 @ 1(r)>> Δ-4 {[«14""»]|[$$TCP_IP_HOST_ID]|[-2-]|[#0]|[##0]|[@@-8]}
<Pointer.fp 0x28916 <LVAR -0x006 @ 4(r)>> Δ-4 {[«14""»]|[$$TCP_IP_HOST_ID]|[-2-]|[#0]|[##0]|[@@-8]|[@@-6]}
<Call 0x28918 0x10380> {[«14""»]|[$$TCP_IP_HOST_ID]|[-2-]|[#0]|[##0]|[@@-8]|[@@-6]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 2891e-28922 StackAdj> Δ+34 {}
<MI 28922 TST.B (A6-0x8)> {}
<MI 28924 BNE 0x28942> {}
<POP 28926-28942 Naked> Σ0 ↓
<MI 28926 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<MI 28928 CLR.W -(A7)> Δ-2 {[4, '(A6-0x6)']|[#0]}
<MI 2892a CLR.W -(A7)> Δ-2 {[4, '(A6-0x6)']|[#0]|[#0]}
<Const 0x2892c 0x200.2> Δ-2 {[4, '(A6-0x6)']|[#0]|[#0]|[#512]}
<Const 0x2892e 0x1.2> Δ-2 {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]}
<MI 28930 LEA.L 0x2f738,A0> {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]}
<MI 28936 MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x28938 <LVAR -0x008 @ 1(r)>> Δ-4 {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-8]}
<Call 0x2893a 0x10384> {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-8]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 28940-28942 StackAdj> Δ+20 {}
<POP 28942-2894c Naked> Σ0 ↓ →0x28952 ←0x288f0
<MI 28942 CLR.B 0x2ef36> {}
<MI 28948 TST.B (A6-0x8)> {}
<MI 2894a BNE 0x28952> {}
<POP 2894c-28952 Naked> Σ0 ↓
<MI 2894c ADDQ.B #0x1,0x2ef36> {}
<POP 28952-28984 Naked> Σ0 ↓ →0x289a0 ←0x28942
<Blob 0x28952 [20] @> Δ-20 {[«20""»]}
<POP 28960-28962 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x28962 20> {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]}
<POP 2896c-2896e StackAdj> Δ-2 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]}
<MI 2896e CLR.B (A7)> {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]}
<MI 28970 CLR.B -(A7)> Δ-2 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]|[#0]}
<Const 0x28972 0x0.4> Δ-4 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]|[#0]|[##0]}
<Pointer.fp 0x28974 <LVAR -0x008 @ 1(r)>> Δ-4 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]|[#0]|[##0]|[@@-8]}
<Pointer.fp 0x28976 <LVAR -0x006 @ 4(r)>> Δ-4 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]|[#0]|[##0]|[@@-8]|[@@-6]}
<Call 0x28978 0x10380> {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]|[#0]|[##0]|[@@-8]|[@@-6]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 2897e-28980 StackAdj> Δ+40 {}
<MI 28980 TST.B (A6-0x8)> {}
<MI 28982 BNE 0x289a0> {}
<POP 28984-289a0 Naked> Σ0 ↓
<MI 28984 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<MI 28986 CLR.W -(A7)> Δ-2 {[4, '(A6-0x6)']|[#0]}
<MI 28988 CLR.W -(A7)> Δ-2 {[4, '(A6-0x6)']|[#0]|[#0]}
<Const 0x2898a 0x200.2> Δ-2 {[4, '(A6-0x6)']|[#0]|[#0]|[#512]}
<Const 0x2898c 0x1.2> Δ-2 {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]}
<MI 2898e LEA.L 0x2f338,A0> {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]}
<MI 28994 MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x28996 <LVAR -0x008 @ 1(r)>> Δ-4 {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-8]}
<Call 0x28998 0x10384> {[4, '(A6-0x6)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-8]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 2899e-289a0 StackAdj> Δ+20 {}
<POP 289a0-289aa Naked> Σ0 ↓ →0x289b0 ←0x28952
<MI 289a0 CLR.B 0x2ef37> {}
<MI 289a6 TST.B (A6-0x8)> {}
<MI 289a8 BNE 0x289b0> {}
<POP 289aa-289b0 Naked> Σ0 ↓
<MI 289aa ADDQ.B #0x1,0x2ef37> {}
<POP 289b0-289b8 Epilogue> Σ0 ←0x289a0
@ 289b8
<LVAR 0x008 1(r)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x00e @ 1(r)>
<POP 289b8-28dae Body>
<POP 289b8-289ce Prologue> Σ0 ↓
<POP 289ce-289e6 RegCacheLoad> Σ0 ↓
<POP 289e6-289f0 Naked> Σ0 ↓ →0x28a9e
<MI 289e6 TST.B 0x2ef35> {}
<MI 289ec BEQ 0x28a9e> {}
<POP 289f0-28a26 Naked> Σ0 ↓ →0x28a44
<Blob 0x289f0 [20] @> Δ-20 {[«20""»]}
<POP 289fe-28a00 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x28a00 20> {[«20""»]|[$$HARDWARE.M200_CONFIG]}
<POP 28a0a-28a0c StackAdj> Δ-2 {[«20""»]|[$$HARDWARE.M200_CONFIG]|[-2-]}
<POP 28a0c-28a0d StackAdj> Δ+2 {[«20""»]|[$$HARDWARE.M200_CONFIG]}
<Const 0x28a0d 0x1.2> Δ-2 {[«20""»]|[$$HARDWARE.M200_CONFIG]|[#1]}
<Const 0x28a0e 0x1.2> Δ-2 {[«20""»]|[$$HARDWARE.M200_CONFIG]|[#1]|[#1]}
<Const 0x28a10 0x1.4> Δ-4 {[«20""»]|[$$HARDWARE.M200_CONFIG]|[#1]|[#1]|[##1]}
<Pointer.fp 0x28a14 <LVAR -0x00e @ 1(r)>> Δ-4 {[«20""»]|[$$HARDWARE.M200_CONFIG]|[#1]|[#1]|[##1]|[@@-14]}
<Pointer.fp 0x28a16 <LVAR -0x00c @ 4(r)>> Δ-4 {[«20""»]|[$$HARDWARE.M200_CONFIG]|[#1]|[#1]|[##1]|[@@-14]|[@@-12]}
<Call 0x28a1a 0x10380> {[«20""»]|[$$HARDWARE.M200_CONFIG]|[#1]|[#1]|[##1]|[@@-14]|[@@-12]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 28a20-28a22 StackAdj> Δ+40 {}
<MI 28a22 TST.B (A6-0xe)> {}
<MI 28a24 BNE 0x28a44> {}
<POP 28a26-28a44 Naked> Σ0 ↓
<MI 28a26 MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']}
<MI 28a2a CLR.W -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]}
<MI 28a2c CLR.W -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]|[#0]}
<Const 0x28a2e 0x200.2> Δ-2 {[4, '(A6-0xc)']|[#0]|[#0]|[#512]}
<Const 0x28a30 0x1.2> Δ-2 {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]}
<MI 28a32 LEA.L 0x2ef38,A0> {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]}
<MI 28a38 MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x28a3a <LVAR -0x00e @ 1(r)>> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-14]}
<Call 0x28a3c 0x10388> {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-14]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 28a42-28a44 StackAdj> Δ+20 {}
<POP 28a44-28a48 Naked> Σ0 ↓ →0x28a9c ←0x289f0
<MI 28a44 TST.B (A6-0xe)> {}
<MI 28a46 BEQ 0x28a9c> {}
<POP 28a48-28a4e Naked> Σ0 ↓ →0x28a9c
<MI 28a48 TST.B (A6+0x8)> {}
<MI 28a4c BEQ 0x28a9c> {}
<POP 28a4e-28a9c Naked> Σ0 ↓
<Blob 0x28a4e [72] @> Δ-72 {[«72""»]}
<POP 28a5e-28a60 StackAdj> Δ-4 {[«72""»]|[-4-]}
<Lit 0x28a60 71> {[«72""»]|[$$** Could not restore the hardware config file because of the unexpected]}
<Call 0x28a6e 0x103e0> {[«72""»]|[$$** Could not restore the hardware config file because of the unexpected]}
WriteConsoleStringCrLf(str : String)
<POP 28a74-28a76 StackAdj> Δ+76 {}
<Blob 0x28a76 [64] @> Δ-64 {[«64""»]}
<POP 28a82-28a84 StackAdj> Δ-4 {[«64""»]|[-4-]}
<Lit 0x28a84 64> {[«64""»]|[$$error described above. You will have to run CEDIT to recreate it]}
<Call 0x28a92 0x103e0> {[«64""»]|[$$error described above. You will have to run CEDIT to recreate it]}
WriteConsoleStringCrLf(str : String)
<POP 28a98-28a9c StackAdj> Δ+68 {}
<POP 28a9c-28a9e Naked> Σ0 →0x28af6 ←0x28a44 ←0x28a48
<MI 28a9c BRA 0x28af6> {}
<POP 28a9e-28aa4 Naked> Σ0 ↓ →0x28af6 ←0x289e6
<MI 28a9e TST.B (A6+0x8)> {}
<MI 28aa2 BEQ 0x28af6> {}
<POP 28aa4-28af6 Naked> Σ0 ↓
<Blob 0x28aa4 [74] @> Δ-74 {[«74""»]}
<POP 28ab6-28ab8 StackAdj> Δ-4 {[«74""»]|[-4-]}
<Lit 0x28ab8 73> {[«74""»]|[$$** Could not restore the hardware config file because there was a problem]}
<Call 0x28ac6 0x103e0> {[«74""»]|[$$** Could not restore the hardware config file because there was a problem]}
WriteConsoleStringCrLf(str : String)
<POP 28acc-28acd StackAdj> Δ+78 ↓ {}
<Blob 0x28acd [76] @> Δ-76 {[«76""»]}
<POP 28adc-28ade StackAdj> Δ-4 {[«76""»]|[-4-]}
<Lit 0x28ade 75> {[«76""»]|[$$saving it before the DFS rebuild. You will have to run CEDIT to recreate it]}
<Call 0x28aec 0x103e0> {[«76""»]|[$$saving it before the DFS rebuild. You will have to run CEDIT to recreate it]}
WriteConsoleStringCrLf(str : String)
<POP 28af2-28af6 StackAdj> Δ+80 {}
<POP 28af6-28afe Naked> Σ0 ↓ →0x28c32 ←0x28a9c ←0x28a9e
<MI 28af6 TST.B (A6+0x8)> {}
<MI 28afa BEQ 0x28c32> {}
<POP 28afe-28b08 Naked> Σ0 ↓ →0x28c32
<MI 28afe TST.B 0x2ef36> {}
<MI 28b04 BNE 0x28c32> {}
<POP 28b08-28baa Naked> Σ0 ↓ →0x28bd2
<Blob 0x28b08 [72] @> Δ-72 {[«72""»]}
<POP 28b14-28b16 StackAdj> Δ-4 {[«72""»]|[-4-]}
<Lit 0x28b16 72> {[«72""»]|[$$** Could not restore the TCP_IP_HOST_ID file because there was a problem]}
<Call 0x28b22 0x103e0> {[«72""»]|[$$** Could not restore the TCP_IP_HOST_ID file because there was a problem]}
WriteConsoleStringCrLf(str : String)
<POP 28b28-28b29 StackAdj> Δ+76 ↓ {}
<Blob 0x28b29 [78] @> Δ-78 {[«78""»]}
<POP 28b38-28b3a StackAdj> Δ-4 {[«78""»]|[-4-]}
<Lit 0x28b3a 77> {[«78""»]|[$$saving it before the DFS rebuild, probably it did not exist. If you know this]}
<Call 0x28b48 0x103e0> {[«78""»]|[$$saving it before the DFS rebuild, probably it did not exist. If you know this]}
WriteConsoleStringCrLf(str : String)
<POP 28b4e-28b52 StackAdj> Δ+82 {}
<Blob 0x28b52 [76] @> Δ-76 {[«76""»]}
<POP 28b5e-28b60 StackAdj> Δ-4 {[«76""»]|[-4-]}
<Lit 0x28b60 76> {[«76""»]|[$$system's TCP/IP address then enter it now, otherwise just hit the ENTER key.]}
<Call 0x28b6c 0x103e0> {[«76""»]|[$$system's TCP/IP address then enter it now, otherwise just hit the ENTER key.]}
WriteConsoleStringCrLf(str : String)
<POP 28b72-28b73 StackAdj> Δ+80 ↓ {}
<Blob 0x28b73 [56] @> Δ-56 {[«56""»]}
<POP 28b84-28b86 StackAdj> Δ-8 {[«56""»]|[-8-]}
<Lit 0x28b86 55> {[«56""»]|[-4-]|[$$Enter this system's TCP/IP address [255.255.255.255] :_]}
<Call 0x28b94 0x103e4> {[«56""»]|[-4-]|[$$Enter this system's TCP/IP address [255.255.255.255] :_]}
AskConsoleString(prompt : String) : String
<POP 28b9a-28b9c StackAdj> Δ+4 {[«56""»]|[-4-]}
<MI 28b9c MOVEA.L (A7)+,A4> Δ+4 {[«56""»]}
<POP 28b9e-28ba2 StackAdj> Δ+56 {}
<MI 28ba2 MOVE.W (A4),D0> {}
<MI 28ba4 CMPI.W #0x0002,D0> {}
<MI 28ba8 BGE 0x28bd2> {}
<POP 28baa-28bd2 Naked> Σ0 ↓
<Blob 0x28baa [16] @> Δ-16 {[«16""»]}
<POP 28bbc-28bbe StackAdj> Δ-4 {[«16""»]|[-4-]}
<Lit 0x28bbe 15> {[«16""»]|[$$255.255.255.255]}
<MI 28bcc MOVEA.L (A7)+,A4> Δ+4 {[«16""»]}
<POP 28bce-28bd2 StackAdj> Δ+16 {}
<POP 28bd2-28bfc Naked> Σ0 ↓ ←0x28b08
<MI 28bd2 MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']}
<Const 0x28bd4 0xd.2> Δ-2 {[4, 'A4']|[#13]}
<Call 0x28bd8 0x102c0> {[4, 'A4']|[#13]}
AppendChar(MOD b : String; a : char)
<POP 28bde-28be0 StackAdj> Δ+2 {[4, 'A4']}
<MI 28be0 MOVE.L A4,(A7)> {[4, 'A4']}
<Const 0x28be2 0xa.2> Δ-2 {[4, 'A4']|[#10]}
<Call 0x28be6 0x102c0> {[4, 'A4']|[#10]}
AppendChar(MOD b : String; a : char)
<POP 28bec-28bee StackAdj> Δ+2 {[4, 'A4']}
<MI 28bee MOVE.L A4,(A7)> {[4, 'A4']}
<MI 28bf0 CLR.B -(A7)> Δ-2 {[4, 'A4']|[#0]}
<Call 0x28bf2 0x102c0> {[4, 'A4']|[#0]}
AppendChar(MOD b : String; a : char)
<POP 28bf8-28bfa StackAdj> Δ+6 {}
<MI 28bfa MOVEQ.L #0x01,D7> {}
<POP 28bfc-28c32 Naked> Σ0 ↓ →0x28bfc ←0x28bfc
<MI 28bfc MOVE.L D7,D0> {}
<MI 28bfe SUBQ.L #0x1,D0> {}
<POP 0x28c00 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {}
<MI 28c0a LEA.L 0x296d2,A0> {}
<MI 28c10 LEA.L (A0+D0.L),A0> {}
<MI 28c14 MOVE.L D7,D0> {}
<MI 28c16 SUBQ.L #0x1,D0> {}
<POP 0x28c18 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {}
<MI 28c22 MOVE.B (A4+D0.L+#0x2),(A0+0x6066)> {}
<MI 28c28 ADDQ.L #0x1,D7> {}
<MI 28c2a CMPI.L #0x00000064,D7> {}
<MI 28c30 BLE 0x28bfc> {}
<POP 28c32-28c38 Naked> Σ0 ↓ →0x28c42 ←0x28af6 ←0x28afe
<MI 28c32 TST.B (A6+0x8)> {}
<MI 28c36 BNE 0x28c42> {}
<POP 28c38-28c42 Naked> Σ0 ↓ →0x28d4a
<MI 28c38 TST.B 0x2ef36> {}
<MI 28c3e BEQ 0x28d4a> {}
<POP 28c42-28c7c Naked> Σ0 ↓ →0x28c9a ←0x28c32
<Blob 0x28c42 [14] @> Δ-14 {[«14""»]}
<POP 28c50-28c52 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x28c52 14> {[«14""»]|[$$TCP_IP_HOST_ID]}
<POP 28c5e-28c60 StackAdj> Δ-2 {[«14""»]|[$$TCP_IP_HOST_ID]|[-2-]}
<POP 28c60-28c61 StackAdj> Δ+2 {[«14""»]|[$$TCP_IP_HOST_ID]}
<Const 0x28c61 0x1.2> Δ-2 {[«14""»]|[$$TCP_IP_HOST_ID]|[#1]}
<Const 0x28c62 0x1.2> Δ-2 {[«14""»]|[$$TCP_IP_HOST_ID]|[#1]|[#1]}
<Const 0x28c64 0x1.4> Δ-4 {[«14""»]|[$$TCP_IP_HOST_ID]|[#1]|[#1]|[##1]}
<Pointer.fp 0x28c68 <LVAR -0x00e @ 1(r)>> Δ-4 {[«14""»]|[$$TCP_IP_HOST_ID]|[#1]|[#1]|[##1]|[@@-14]}
<Pointer.fp 0x28c6a <LVAR -0x00c @ 4(r)>> Δ-4 {[«14""»]|[$$TCP_IP_HOST_ID]|[#1]|[#1]|[##1]|[@@-14]|[@@-12]}
<Call 0x28c6e 0x10380> {[«14""»]|[$$TCP_IP_HOST_ID]|[#1]|[#1]|[##1]|[@@-14]|[@@-12]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 28c74-28c78 StackAdj> Δ+34 {}
<MI 28c78 TST.B (A6-0xe)> {}
<MI 28c7a BNE 0x28c9a> {}
<POP 28c7c-28c9a Naked> Σ0 ↓
<MI 28c7c MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']}
<MI 28c80 CLR.W -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]}
<MI 28c82 CLR.W -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]|[#0]}
<Const 0x28c84 0x200.2> Δ-2 {[4, '(A6-0xc)']|[#0]|[#0]|[#512]}
<Const 0x28c86 0x1.2> Δ-2 {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]}
<MI 28c88 LEA.L 0x2f738,A0> {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]}
<MI 28c8e MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x28c90 <LVAR -0x00e @ 1(r)>> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-14]}
<Call 0x28c92 0x10388> {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-14]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 28c98-28c9a StackAdj> Δ+20 {}
<POP 28c9a-28c9e Naked> Σ0 ↓ →0x28cee ←0x28c42
<MI 28c9a TST.B (A6-0xe)> {}
<MI 28c9c BEQ 0x28cee> {}
<POP 28c9e-28cee Naked> Σ0 →0x28d4a
<Blob 0x28c9e [70] @> Δ-70 {[«70""»]}
<POP 28caa-28cac StackAdj> Δ-4 {[«70""»]|[-4-]}
<Lit 0x28cac 70> {[«70""»]|[$$** Could not restore the TCP_IP_HOST_ID file because of the unexpected]}
<Call 0x28cba 0x103e0> {[«70""»]|[$$** Could not restore the TCP_IP_HOST_ID file because of the unexpected]}
WriteConsoleStringCrLf(str : String)
<POP 28cc0-28cc1 StackAdj> Δ+74 ↓ {}
<Blob 0x28cc1 [60] @> Δ-60 {[«60""»]}
<POP 28cd2-28cd4 StackAdj> Δ-4 {[«60""»]|[-4-]}
<Lit 0x28cd4 59> {[«60""»]|[$$error described above. You will have to recreate it by hand]}
<Call 0x28ce2 0x103e0> {[«60""»]|[$$error described above. You will have to recreate it by hand]}
WriteConsoleStringCrLf(str : String)
<POP 28ce8-28cec StackAdj> Δ+64 {}
<MI 28cec BRA 0x28d4a> {}
<POP 28cee-28d14 Naked> Σ0 ↓ ←0x28c9a
<Blob 0x28cee [40] @> Δ-40 {[«40""»]}
<POP 28cfa-28cfc StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x28cfc 40> {[«40""»]|[$$Restored TCP_IP_HOST_ID file containing_]}
<Call 0x28d08 0x103d8> {[«40""»]|[$$Restored TCP_IP_HOST_ID file containing_]}
WriteConsoleString(str : String)
<POP 28d0e-28d12 StackAdj> Δ+44 {}
<MI 28d12 MOVEQ.L #0x01,D7> {}
<POP 28d14-28d32 Naked> Σ0 ↓ →0x28d4a ←0x28d3a
<MI 28d14 MOVE.L D7,D0> {}
<MI 28d16 SUBQ.L #0x1,D0> {}
<POP 0x28d18 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {}
<MI 28d22 LEA.L 0x296d2,A0> {}
<MI 28d28 LEA.L (A0+D0.L),A0> {}
<MI 28d2c TST.B (A0+0x6066)> {}
<MI 28d30 BEQ 0x28d4a> {}
<POP 28d32-28d3a Naked> Σ0 ↓ →0x28d4a
<MI 28d32 CMPI.L #0x0000001e,D7> {}
<MI 28d38 BGE 0x28d4a> {}
<POP 28d3a-28d4a Naked> Σ0 →0x28d14
<MI 28d3a MOVE.B (A0+0x6066),-(A7)> Δ-2 {[2, '(A0+0x6066)']}
<Call 0x28d3e 0x103d0> {[2, '(A0+0x6066)']}
WriteConsoleChar(chr : char)
<POP 28d44-28d46 StackAdj> Δ+2 {}
<MI 28d46 ADDQ.L #0x1,D7> {}
<MI 28d48 BRA 0x28d14> {}
<POP 28d4a-28d52 Naked> Σ0 ↓ →0x28da6 ←0x28c38 ←0x28c9e ←0x28d14 ←0x28d32
<MI 28d4a TST.B 0x2ef37> {}
<MI 28d50 BEQ 0x28da6> {}
<POP 28d52-28d88 Naked> Σ0 ↓ →0x28da6
<Blob 0x28d52 [20] @> Δ-20 {[«20""»]}
<POP 28d60-28d62 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x28d62 20> {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]}
<POP 28d6c-28d6e StackAdj> Δ-2 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[-2-]}
<POP 28d6e-28d6f StackAdj> Δ+2 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]}
<Const 0x28d6f 0x1.2> Δ-2 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[#1]}
<Const 0x28d70 0x1.2> Δ-2 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[#1]|[#1]}
<Const 0x28d72 0x1.4> Δ-4 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[#1]|[#1]|[##1]}
<Pointer.fp 0x28d76 <LVAR -0x00e @ 1(r)>> Δ-4 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[#1]|[#1]|[##1]|[@@-14]}
<Pointer.fp 0x28d78 <LVAR -0x00c @ 4(r)>> Δ-4 {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[#1]|[#1]|[##1]|[@@-14]|[@@-12]}
<Call 0x28d7c 0x10380> {[«20""»]|[$$AUTOBOOT_AFTER_CRASH]|[#1]|[#1]|[##1]|[@@-14]|[@@-12]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 28d82-28d84 StackAdj> Δ+40 {}
<MI 28d84 TST.B (A6-0xe)> {}
<MI 28d86 BNE 0x28da6> {}
<POP 28d88-28da6 Naked> Σ0 ↓
<MI 28d88 MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']}
<MI 28d8c CLR.W -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]}
<MI 28d8e CLR.W -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]|[#0]}
<Const 0x28d90 0x200.2> Δ-2 {[4, '(A6-0xc)']|[#0]|[#0]|[#512]}
<Const 0x28d92 0x1.2> Δ-2 {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]}
<MI 28d94 LEA.L 0x2f338,A0> {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]}
<MI 28d9a MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x28d9c <LVAR -0x00e @ 1(r)>> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-14]}
<Call 0x28d9e 0x10388> {[4, '(A6-0xc)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-14]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 28da4-28da6 StackAdj> Δ+20 {}
<POP 28da6-28dae Epilogue> Σ0 ←0x28d4a ←0x28d52
@ 28dae
<LVAR 0x008 1(r)>
<POP 28dae-28e78 Body>
<POP 28dae-28dc4 Prologue> Σ0 ↓
<POP 28dc4-28dc8 RegCacheLoad> Σ0 ↓
<POP 28dc8-28dda Naked> Σ0 ↓ →0x28dde
<MI 28dc8 CLR.B -(A7)> Δ-2 {[#0]}
<Call 0x28dca 0x22d70> {[#0]}
<POP 28dce-28dd0 StackAdj> Δ+2 {}
<Call 0x28dd0 0x23f28> {}
<MI 28dd4 TST.B (A6+0x8)> {}
<MI 28dd8 BEQ 0x28dde> {}
<POP 28dda-28dde Naked> Σ0 ↓
<Call 0x28dda 0x2416c> {}
<POP 28dde-28dea Naked> Σ0 ↓ →0x28e12 ←0x28dc8
<MI 28dde MOVE.B 0x296da,D0> {}
<MI 28de4 CMPI.B #0x02,D0> {}
<MI 28de8 BNE 0x28e12> {}
<POP 28dea-28df8 Naked> Σ0 ↓ →0x28e12
<MI 28dea MOVE.W 0x296dc,D0> {}
<MI 28df0 CMP.W 0x29710,D0> {}
<MI 28df6 BNE 0x28e12> {}
<POP 28df8-28e12 Naked> Σ0 ↓
<MI 28df8 MOVE.B #0x01,0x2970a> {}
<MI 28dfe CLR.B -(A7)> Δ-2 {[#0]}
<Call 0x28e00 0x10404> {[#0]}
SetSomeKindOfFlag(a : Byte)
<MI 28e06 CLR.W (A7)> {[#0]}
<MI 28e08 CLR.W -(A7)> Δ-2 {[#0]|[#0]}
<Call 0x28e0a 0x10202> {[#0]|[#0]}
KC01_DumpOn
<POP 28e10-28e12 StackAdj> Δ+4 {}
<POP 28e12-28e22 Naked> Σ0 ↓ →0x28e26 ←0x28dde ←0x28dea
<Call 0x28e12 0x25338> {}
<POP 28e16-28e18 StackAdj> Δ-2 {[-2-]}
<Call 0x28e18 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 28e1e TST.B (A7)+> Δ+2 {}
<MI 28e20 BNE 0x28e26> {}
<POP 28e22-28e26 Naked> Σ0 ↓
<Call 0x28e22 0x2619a> {}
<POP 28e26-28e5c Naked> Σ0 Δ-52 ↓ →0x28e60 ←0x28e12
<Call 0x28e26 0x282c4> {}
<Blob 0x28e2a [52] @> Δ-52 {[«52""»]}
<POP 28e3a-28e3c StackAdj> Δ-6 {[«52""»]|[-6-]}
<Lit 0x28e3c 51> {[«52""»]|[-2-]|[$$Do you want to load files into the DFS on this unit]}
<POP 28e4c-28e4e StackAdj> Δ-2 {[«52""»]|[-2-]|[$$Do you want to load files into the DFS on this unit]|[-2-]}
<POP 28e4e-28e4f StackAdj> Δ+2 {[«52""»]|[-2-]|[$$Do you want to load files into the DFS on this unit]}
<Const 0x28e4f 0x1.2> Δ-2 {[«52""»]|[-2-]|[$$Do you want to load files into the DFS on this unit]|[#1]}
<Call 0x28e50 0x103f0> {[«52""»]|[-2-]|[$$Do you want to load files into the DFS on this unit]|[#1]}
AskOnConsoleYesNo(prompt : String; default : Bool) : Bool
<POP 28e56-28e58 StackAdj> Δ+6 {[«52""»]|[-2-]}
<MI 28e58 TST.B (A7)+> Δ+2 {[«52""»]}
<MI 28e5a BEQ 0x28e60> {[«52""»]}
<POP 28e5c-28e60 Naked> Σ-52 ↓
<Call 0x28e5c 0x280fc> {[-52-]}
<POP 28e60-28e70 Naked> Σ-52 Δ+52 ↓ ←0x28e26
<POP 28e60-28e62 StackAdj> Δ+52 {}
<Const 0x28e62 0x29704.4> Δ-4 {[##169732]}
<Call 0x28e68 0x102bc> {[##169732]}
FreeString(VAR a : String)
<POP 28e6e-28e70 StackAdj> Δ+4 {}
<POP 28e70-28e78 Epilogue> Σ0
@ 28e78
<LVAR -0x002 @>
<LVAR -0x003 @ 1(r)>
<LVAR -0x004 @ 1(r)>
<POP 28e78-290d0 Body>
<POP 28e78-28e8e Prologue> Σ0 ↓
<POP 28e8e-28ea6 RegCacheLoad> Σ0 ↓
<POP 28ea6-28eb6 Naked> Σ0 ↓ →0x28ed6
<MI 28ea6 MOVE.B #0x01,0x2ef34> {}
<MI 28eac MOVE.B 0x296da,D0> {}
<MI 28eb2 CMP.B #0x02,D0> {}
<MI 28eb4 BNE 0x28ed6> {}
<POP 28eb6-28ed6 Naked> Σ0 ↓
<Blob 0x28eb6 [62] @> Δ-62 {[«62""»]}
<POP 28ec2-28ec4 StackAdj> Δ-4 {[«62""»]|[-4-]}
<Lit 0x28ec4 62> {[«62""»]|[$$WARNING: you should boot this from tape when using this option]}
<Call 0x28ed2 0x103e0> {[«62""»]|[$$WARNING: you should boot this from tape when using this option]}
WriteConsoleStringCrLf(str : String)
<POP 28ed4-28ed6 StackAdj> Δ+66 {}
<POP 28ed6-28ee6 Naked> Σ0 ↓ →0x28f0c ←0x28ea6
<Const 0x28ed6 0x1.2> Δ-2 {[#1]}
<Call 0x28ed8 0x22d70> {[#1]}
<POP 28edc-28ede StackAdj> Δ+2 {}
<MI 28ede TST.B 0x29709> {}
<MI 28ee4 BNE 0x28f0c> {}
<POP 28ee6-28f0c Naked> Σ0 ↓
<Blob 0x28ee6 [50] @> Δ-50 {[«50""»]}
<POP 28ef6-28ef8 StackAdj> Δ-4 {[«50""»]|[-4-]}
<Lit 0x28ef8 49> {[«50""»]|[$$This disk does not have a DFS currently installed]}
<Call 0x28f06 0x22522> {[«50""»]|[$$This disk does not have a DFS currently installed]}
<POP 28f08-28f0c StackAdj> Δ+54 {}
<POP 28f0c-28f1c Naked> Σ0 ↓ →0x28f3e ←0x28ed6
<Pointer.fp 0x28f0c <LVAR -0x004 @ 1(r)>> Δ-4 {[@@-4]}
<Call 0x28f10 0x23946> {[@@-4]}
<POP 28f14-28f16 StackAdj> Δ+4 {}
<MI 28f16 TST.B (A6-0x4)> {}
<MI 28f1a BNE 0x28f3e> {}
<POP 28f1c-28f3e Naked> Σ0 ↓
<Blob 0x28f1c [24] @> Δ-24 {[«24""»]}
<POP 28f28-28f2a StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x28f2a 24> {[«24""»]|[$$the error above is fatal]}
<Call 0x28f38 0x22522> {[«24""»]|[$$the error above is fatal]}
<POP 28f3a-28f3e StackAdj> Δ+28 {}
<POP 28f3e-28f56 Naked> Σ0 ↓ →0x28f90 ←0x28f0c
<Blob 0x28f3e [2] 0x10008> Δ-2 {[«2»]}
<Pointer.fp 0x28f44 <LVAR -0x003 @ 1(r)>> Δ-4 {[«2»]|[@@-3]}
<Call 0x28f48 0x10394> {[«2»]|[@@-3]}
MountDisk(drive : Word ; VAR status : Byte)
<POP 28f4e-28f50 StackAdj> Δ+6 {}
<MI 28f50 TST.B (A6-0x3)> {}
<MI 28f54 BEQ 0x28f90> {}
<POP 28f56-28f90 Naked> Σ0 ↓
<Blob 0x28f56 [4] @> Δ-4 {[«4""»]}
<Blob 0x28f5a [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x28f5e [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<Blob 0x28f62 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 28f66-28f68 StackAdj> Δ-8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-8-]}
<Lit 0x28f68 16> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]}
<POP 28f74-28f76 StackAdj> Δ-6 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]|[-6-]}
<MI 28f76 MOVE.B (A6-0x3),(A7)> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]|[-6-]}
<Call 0x28f7a 0x103a0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]|[-6-]}
FsErrMsgStr(err: Byte) : String
<POP 28f80-28f82 StackAdj> Δ+2 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]|[-4-]}
<Call 0x28f82 0x102d0> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]|[$$FS_UINIT error:_]|[-4-]}
StringCat2(a, b : String) : String
<POP 28f88-28f8a StackAdj> Δ+8 {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Call 0x28f8a 0x22522> {[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-4-]}
<POP 28f8c-28f90 StackAdj> Δ+20 {}
<POP 28f90-28f9e Naked> Σ0 ↓ →0x28fc6 ←0x28f3e
<Call 0x28f90 0x28860> {}
<MI 28f94 MOVE.B 0x296da,D0> {}
<MI 28f9a CMP.B #0x02,D0> {}
<MI 28f9c BNE 0x28fc6> {}
<POP 28f9e-28fac Naked> Σ0 ↓ →0x28fc6
<MI 28f9e MOVE.W 0x296dc,D0> {}
<MI 28fa4 CMP.W 0x29710,D0> {}
<MI 28faa BNE 0x28fc6> {}
<POP 28fac-28fc6 Naked> Σ0 ↓
<MI 28fac MOVE.B #0x01,0x2970a> {}
<MI 28fb2 CLR.B -(A7)> Δ-2 {[#0]}
<Call 0x28fb4 0x10404> {[#0]}
SetSomeKindOfFlag(a : Byte)
<MI 28fba CLR.W (A7)> {[#0]}
<MI 28fbc CLR.W -(A7)> Δ-2 {[#0]|[#0]}
<Call 0x28fbe 0x10202> {[#0]|[#0]}
KC01_DumpOn
<POP 28fc4-28fc6 StackAdj> Δ+4 {}
<POP 28fc6-290c8 Naked> Σ0 ↓ ←0x28f90 ←0x28f9e
<Call 0x28fc6 0x282c4> {}
<MI 28fca CLR.B -(A7)> Δ-2 {[#0]}
<Call 0x28fcc 0x289b8> {[#0]}
<POP 28fd0-28fd2 StackAdj> Δ+2 {}
<Call 0x28fd2 0x280fc> {}
<Const 0x28fd6 0x29704.4> Δ-4 {[##169732]}
<Call 0x28fdc 0x102bc> {[##169732]}
FreeString(VAR a : String)
<POP 28fe2-28fe4 StackAdj> Δ+4 {}
<Blob 0x28fe4 [32] @> Δ-32 {[«32""»]}
<POP 28ff0-28ff2 StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x28ff2 32> {[«32""»]|[$$The DFS files have been reloaded]}
<Call 0x29000 0x103e0> {[«32""»]|[$$The DFS files have been reloaded]}
WriteConsoleStringCrLf(str : String)
<POP 29002-29006 StackAdj> Δ+34 {[-2-]}
<POP 29006-29007 StackAdj> Δ+2 {}
<Const 0x29007 0x1.2> Δ-2 {[#1]}
<Call 0x29008 0x289b8> {[#1]}
<POP 2900c-2900e StackAdj> Δ+2 {}
<Call 0x2900e 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x29014 [14] @> Δ-14 {[«14""»]}
<Blob 0x29026 [8] @> Δ-8 {[«14""»]|[«8""»]}
<POP 29036-29038 StackAdj> Δ-4 {[«14""»]|[«8""»]|[-4-]}
<Lit 0x29038 13> {[«14""»]|[«8""»]|[$$UPDATE_EEPROM]}
<POP 29044-29046 StackAdj> Δ-4 {[«14""»]|[«8""»]|[$$UPDATE_EEPROM]|[-4-]}
<Lit 0x29046 7> {[«14""»]|[«8""»]|[$$UPDATE_EEPROM]|[$$INSTALL]}
<POP 29052-29054 StackAdj> Δ-2 {[«14""»]|[«8""»]|[$$UPDATE_EEPROM]|[$$INSTALL]|[-2-]}
<POP 29054-29055 StackAdj> Δ+2 {[«14""»]|[«8""»]|[$$UPDATE_EEPROM]|[$$INSTALL]}
<Const 0x29055 0x1.2> Δ-2 {[«14""»]|[«8""»]|[$$UPDATE_EEPROM]|[$$INSTALL]|[#1]}
<Pointer.fp 0x29056 <LVAR -0x002 @>> Δ-4 {[«14""»]|[«8""»]|[$$UPDATE_EEPROM]|[$$INSTALL]|[#1]|[@@-2]}
<Call 0x2905a 0x103b0> {[«14""»]|[«8""»]|[$$UPDATE_EEPROM]|[$$INSTALL]|[#1]|[@@-2]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 29060-29064 StackAdj> Δ+36 {}
<Blob 0x29064 [66] @> Δ-66 {[«66""»]}
<POP 29070-29072 StackAdj> Δ-4 {[«66""»]|[-4-]}
<Lit 0x29072 66> {[«66""»]|[$$** abnornal UPDATE_EEPROM abort: the EEPROMs may not be updated **]}
<Call 0x2907e 0x103e0> {[«66""»]|[$$** abnornal UPDATE_EEPROM abort: the EEPROMs may not be updated **]}
WriteConsoleStringCrLf(str : String)
<POP 29080-29081 StackAdj> Δ+70 ↓ {}
<Blob 0x29081 [72] @> Δ-72 {[«72""»]}
<POP 29090-29092 StackAdj> Δ-4 {[«72""»]|[-4-]}
<Lit 0x29092 71> {[«72""»]|[$$It may be necessary to replace the IOC/RESHA EEPROMs to boot the system]}
<Call 0x290a0 0x103e0> {[«72""»]|[$$It may be necessary to replace the IOC/RESHA EEPROMs to boot the system]}
WriteConsoleStringCrLf(str : String)
<POP 290a2-290a3 StackAdj> Δ+76 ↓ {}
<Blob 0x290a3 [26] @> Δ-26 {[«26""»]}
<POP 290b2-290b4 StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x290b4 25> {[«26""»]|[$$the error above was fatal]}
<Call 0x290c2 0x22522> {[«26""»]|[$$the error above was fatal]}
<POP 290c4-290c8 StackAdj> Δ+30 {}
<POP 290c8-290d0 Epilogue> Σ0
@ 290d0
START
<POP 290d0--0001 Body>
<POP 290d0-290da Prologue> Σ0
<POP 290da-29128 Naked> Σ0 Δ-4 ↓
<Call 0x290da 0x10400> {}
FSCALL_10400
<Call 0x290e0 0x105e6> {}
Set_fc04_to_01(void)
<Blob 0x290e6 [38] @> Δ-38 {[«38""»]}
<POP 290fa-290fc StackAdj> Δ-4 {[«38""»]|[-4-]}
<Lit 0x290fc 37> {[«38""»]|[$$@(#)RECOVERY,14.04,92/09/17,10:00:00\]}
<MI 29110 MOVE.L (A7)+,0x2fb3e> Δ+4 {[«38""»]}
<POP 29116-2911a StackAdj> Δ+38 {}
<MI 2911a MOVEA.L 0x2fb3e,A0> {}
<MI 29120 MOVE.W (A0),D0> {}
<MI 29122 EXTW.L D0> {}
<MI 29124 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 29126 MOVEQ.L #0x01,D0> {[4, 'D0']}
<POP 29128-2912c Naked> Σ-4 ↓ →0x29162 ←0x2915e
<MI 29128 CMP.L (A7),D0> {[-4-]}
<MI 2912a BGT 0x29162> {[-4-]}
<POP 2912c-2914e Naked> Σ-4 ↓ →0x29158
<MI 2912c MOVE.L D0,0x2fb3a> {[-4-]}
<MI 29132 MOVEA.L 0x2fb3e,A0> {[-4-]}
<MI 29138 MOVE.L D0,D1> {[-4-]}
<MI 2913a SUBQ.L #0x1,D1> {[-4-]}
<POP 0x2913c LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-4-]}
<MI 29146 CMPI.L #0x00000004,D0> {[-4-]}
<MI 2914c BLE 0x29158> {[-4-]}
<POP 2914e-29158 Naked> Σ-4 ↓ →0x2915e
<MI 2914e MOVE.B (A0+D1.L+#0x2),D2> {[-4-]}
<MI 29152 CMPI.B #0x2c,D2> {[-4-]}
<MI 29156 BNE 0x2915e> {[-4-]}
<POP 29158-2915e Naked> Σ-4 ↓ ←0x2912c
<MI 29158 MOVE.B #0x20,(A0+D1.L+#0x2)> {[-4-]}
<POP 2915e-29162 Naked> Σ-4 ↓ →0x29128 ←0x2914e
<MI 2915e ADDQ.L #0x1,D0> {[-4-]}
<MI 29160 BVC 0x29128> {[-4-]}
<POP 29162-291aa Naked> Σ-4 Δ+4 ↓ →0x291b0 ←0x29128
<POP 29162-29163 StackAdj> Δ+4 {}
<Blob 0x29163 [4] 0x2fb3e> Δ-4 {[«4»]}
<Call 0x29168 0x103e0> {[«4»]}
WriteConsoleStringCrLf(str : String)
<POP 2916e-29170 StackAdj> Δ+4 {}
<MI 29170 LEA.L 0x2971e,A0> {}
<MI 29176 MOVE.L A0,0x29716> {}
<MI 2917c MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2917e MOVE.L (A7)+,0x2971a> Δ+4 {}
<Const 0x29184 0x296da.4> Δ-4 {[##169690]}
<Const 0x2918a 0x296dc.4> Δ-4 {[##169690]|[##169692]}
<Call 0x29190 0x10200> {[##169690]|[##169692]}
KC00_GetBootDev(VAR a : Byte; VAR b : Word)
<POP 29196-29198 StackAdj> Δ+8 {}
<MI 29198 CLR.B 0x2970a> {}
<MI 2919e MOVE.B 0x296da,D0> {}
<MI 291a4 CMPI.B #0x02,D0> {}
<MI 291a8 BEQ 0x291b0> {}
<POP 291aa-291b0 Naked> Σ0 ↓
<MI 291aa ADDQ.B #0x1,0x2970a> {}
<POP 291b0-291bc Naked> Σ0 ↓ →0x291d0 ←0x29162
<POP 291b0-291b2 StackAdj> Δ-2 {[-2-]}
<Call 0x291b2 0x1060a> {[-2-]}
Is_machine_type_four() : Bool
<MI 291b8 TST.B (A7)+> Δ+2 {}
<MI 291ba BEQ 0x291d0> {}
<POP 291bc-291d0 Naked> Σ0 →0x291e2
<MI 291bc LEA.L 0x296e2,A0> {}
<MI 291c2 LEA.L 0x22364,A1> {}
<BlockMove 24,A1,A0> {}
<MI 291ce BRA 0x291e2> {}
<POP 291d0-291e2 Naked> Σ0 ↓ ←0x291b0
<MI 291d0 LEA.L 0x296e2,A0> {}
<MI 291d6 LEA.L 0x2234c,A1> {}
<BlockMove 24,A1,A0> {}
<POP 291e2-293b6 Naked> Σ0 →0x293c4 →0x293c6 →0x293c6 →0x293de →0x293de →0x29436 →0x293d8 ←0x291bc ←0x29442
<MI 291e2 CLR.B 0x2eb32> {}
<MI 291e8 CLR.B 0x2ef34> {}
<Blob 0x291ee [4] @> Δ-4 {[«4""»]}
<Blob 0x291f2 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Blob 0x291f6 [4] @> Δ-4 {[«4""»]|[«4""»]|[«4""»]}
<POP 291fa-291fc StackAdj> Δ-4 {[«4""»]|[«4""»]|[«4""»]|[-4-]}
<Lit 0x291fc 12> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]}
<Call 0x29210 0x103e0> {[«4""»]|[«4""»]|[«4""»]|[$$Options are:]}
WriteConsoleStringCrLf(str : String)
<POP 29216-29217 StackAdj> Δ+16 ↓ {}
<Blob 0x29217 [14] @> Δ-14 {[«14""»]}
<POP 29226-29228 StackAdj> Δ-4 {[«14""»]|[-4-]}
<Lit 0x29228 13> {[«14""»]|[$$ 0 => Exit]}
<Call 0x2923c 0x103e0> {[«14""»]|[$$ 0 => Exit]}
WriteConsoleStringCrLf(str : String)
<POP 29242-29243 StackAdj> Δ+18 ↓ {}
<Blob 0x29243 [44] @> Δ-44 {[«44""»]}
<POP 29254-29256 StackAdj> Δ-4 {[«44""»]|[-4-]}
<Lit 0x29256 43> {[«44""»]|[$$ 1 => Initialize disk (for experts only)]}
<Call 0x2926a 0x103e0> {[«44""»]|[$$ 1 => Initialize disk (for experts only)]}
WriteConsoleStringCrLf(str : String)
<POP 29270-29274 StackAdj> Δ+48 {}
<Blob 0x29274 [62] @> Δ-62 {[«62""»]}
<POP 29280-29282 StackAdj> Δ-4 {[«62""»]|[-4-]}
<Lit 0x29282 62> {[«62""»]|[$$ 2 => Initialize disk, drop USR defects (internal use only)]}
<Call 0x29296 0x103e0> {[«62""»]|[$$ 2 => Initialize disk, drop USR defects (internal use only)]}
WriteConsoleStringCrLf(str : String)
<POP 2929c-2929d StackAdj> Δ+66 ↓ {}
<Blob 0x2929d [46] @> Δ-46 {[«46""»]}
<POP 292ae-292b0 StackAdj> Δ-4 {[«46""»]|[-4-]}
<Lit 0x292b0 45> {[«46""»]|[$$ 3 => Show MFG and USR bad block locations]}
<Call 0x292c4 0x103e0> {[«46""»]|[$$ 3 => Show MFG and USR bad block locations]}
WriteConsoleStringCrLf(str : String)
<POP 292ca-292ce StackAdj> Δ+50 {}
<Blob 0x292ce [42] @> Δ-42 {[«42""»]}
<POP 292da-292dc StackAdj> Δ-4 {[«42""»]|[-4-]}
<Lit 0x292dc 42> {[«42""»]|[$$ 4 => Show only USR bad block locations]}
<Call 0x292f0 0x103e0> {[«42""»]|[$$ 4 => Show only USR bad block locations]}
WriteConsoleStringCrLf(str : String)
<POP 292f6-292f7 StackAdj> Δ+46 ↓ {}
<Blob 0x292f7 [30] @> Δ-30 {[«30""»]}
<POP 29308-2930a StackAdj> Δ-4 {[«30""»]|[-4-]}
<Lit 0x2930a 29> {[«30""»]|[$$ 5 => Install new DFS only]}
<Call 0x2931e 0x103e0> {[«30""»]|[$$ 5 => Install new DFS only]}
WriteConsoleStringCrLf(str : String)
<POP 29324-29328 StackAdj> Δ+34 {}
<Blob 0x29328 [44] @> Δ-44 {[«44""»]}
<POP 29334-29336 StackAdj> Δ-4 {[«44""»]|[-4-]}
<Lit 0x29336 44> {[«44""»]|[$$ 6 => Show bad block count and DOS limits]}
<Call 0x2934a 0x103e0> {[«44""»]|[$$ 6 => Show bad block count and DOS limits]}
WriteConsoleStringCrLf(str : String)
<POP 29350-29351 StackAdj> Δ+48 ↓ {}
<Blob 0x29351 [16] @> Δ-16 {[«16""»]}
<POP 29362-29364 StackAdj> Δ-8 {[«16""»]|[-8-]}
<Lit 0x29364 15> {[«16""»]|[-4-]|[$$Enter option :_]}
<Const 0x29378 0x0.4> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]}
<Const 0x2937c 0x6.4> Δ-4 {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[##6]}
<Call 0x29380 0x103ec> {[«16""»]|[-4-]|[$$Enter option :_]|[##0]|[##6]}
AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long
<POP 29386-2938a StackAdj> Δ+12 {[«16""»]|[-4-]}
<MI 2938a MOVE.B (A7+0x3),D0> {[«16""»]|[-4-]}
<MI 2938e EXTB.W D0> {[«16""»]|[-4-]}
<POP 0x29390 LimitCheck 0x0 ≤ D0 ≤ 0x6> {[«16""»]|[-4-]}
<POP 29394-29398 StackAdj> Δ+20 {}
<MI 29398 MOVE.B D0,0x2fb38> {}
<MI 2939e MOVE.B D0,D1> {}
<MI 293a0 EXTB.W D1> {}
<MI 293a2 MOVE.W D1,D0> {}
<POP 0x293a4 LimitCheck 0x0 ≤ D0 ≤ 0x6> {}
<MI 293ac ADD.W D0,D0> {}
<MI 293ae SWITCH D0.W> {}
<POP 293c4-293c6 Naked> Σ0 →0x2943a ←0x291e2
<MI 293c4 BRA 0x2943a> {}
<POP 293c6-293ce Naked> Σ0 Δ-2 ↓ →0x293d0 ←0x291e2 ←0x291e2
<MI 293c6 CLR.B -(A7)> Δ-2 {[#0]}
<MI 293c8 CMPI.B #0x02,D1> {[#0]}
<MI 293cc BNE 0x293d0> {[#0]}
<POP 293ce-293d0 Naked> Σ-2 ↓
<MI 293ce ADDQ.B #0x1,(A7)> {[-2-]}
<POP 293d0-293d8 Naked> Σ-2 Δ+2 →0x2943a ←0x293c6
<Call 0x293d0 0x28dae> {[-2-]}
<POP 293d4-293d6 StackAdj> Δ+2 {}
<MI 293d6 BRA 0x2943a> {}
<POP 293d8-293de Naked> Σ0 →0x2943a ←0x291e2
<Call 0x293d8 0x28366> {}
<MI 293dc BRA 0x2943a> {}
<POP 293de-293ea Naked> Σ0 ↓ →0x2941e ←0x291e2 ←0x291e2
<POP 293de-293e0 StackAdj> Δ-2 {[-2-]}
<Call 0x293e0 0x10610> {[-2-]}
Is_machine_type_one_or_three() : Bool
<MI 293e6 TST.B (A7)+> Δ+2 {}
<MI 293e8 BEQ 0x2941e> {}
<POP 293ea-2941e Naked> Σ0 →0x29434
<Blob 0x293ea [60] @> Δ-60 {[«60""»]}
<POP 293fc-293fe StackAdj> Δ-4 {[«60""»]|[-4-]}
<Lit 0x293fe 59> {[«60""»]|[$$MFG bad block locations can not be displayed for Model x00C]}
<Call 0x29412 0x103e0> {[«60""»]|[$$MFG bad block locations can not be displayed for Model x00C]}
WriteConsoleStringCrLf(str : String)
<POP 29418-2941c StackAdj> Δ+64 {}
<MI 2941c BRA 0x29434> {}
<POP 2941e-2942c Naked> Σ0 Δ-2 ↓ →0x2942e ←0x293de
<MI 2941e CLR.B -(A7)> Δ-2 {[#0]}
<MI 29420 MOVE.B 0x2fb38,D0> {[#0]}
<MI 29426 CMPI.B #0x03,D0> {[#0]}
<MI 2942a BNE 0x2942e> {[#0]}
<POP 2942c-2942e Naked> Σ-2 ↓
<MI 2942c ADDQ.B #0x1,(A7)> {[-2-]}
<POP 2942e-29434 Naked> Σ-2 Δ+2 ↓ ←0x2941e
<Call 0x2942e 0x286dc> {[-2-]}
<POP 29432-29434 StackAdj> Δ+2 {}
<POP 29434-29436 Naked> Σ0 →0x2943a ←0x293ea
<MI 29434 BRA 0x2943a> {}
<POP 29436-2943a Naked> Σ0 ↓ ←0x291e2
<Call 0x29436 0x28e78> {}
<POP 2943a-29442 Naked> Σ0 ↓ →0x29446 ←0x293c4 ←0x293d0 ←0x293d8 ←0x29434
<MI 2943a TST.B 0x2fb38> {}
<MI 29440 BEQ 0x29446> {}
<POP 29442-29446 Naked> Σ0 →0x291e2
<MI 29442 BRA 0x291e2> {}
<POP 29446-2944e Naked> Σ0 ↓ →0x294b2 ←0x2943a
<MI 29446 TST.B 0x2970a> {}
<MI 2944c BEQ 0x294b2> {}
<POP 2944e-294ae Naked> Σ0 ↓
<Blob 0x2944e [60] @> Δ-60 {[«60""»]}
<POP 29460-29462 StackAdj> Δ-4 {[«60""»]|[-4-]}
<Lit 0x29462 59> {[«60""»]|[$$Boot disk has been rebuilt or the IOP was booted from tape.]}
<Call 0x29476 0x103e0> {[«60""»]|[$$Boot disk has been rebuilt or the IOP was booted from tape.]}
WriteConsoleStringCrLf(str : String)
<POP 2947c-2947d StackAdj> Δ+64 ↓ {}
<Blob 0x2947d [36] @> Δ-36 {[«36""»]}
<POP 2948e-29490 StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x29490 35> {[«36""»]|[$$You must crash the machine to exit.]}
<Call 0x294a4 0x103e0> {[«36""»]|[$$You must crash the machine to exit.]}
WriteConsoleStringCrLf(str : String)
<POP 294aa-294ae StackAdj> Δ+40 {}
<POP 294ae-294b0 Naked> Σ0 →0x294ae ←0x294ae
<MI 294ae BRA 0x294ae> {}
<POP 294b2-294c6 Naked> Σ0 ↓ ←0x29446
<Call 0x294b2 0x10398> {}
FSCALL_10398
<MI 294b8 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x294ba 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x294be 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 294c4-294c6 StackAdj> Δ+6 {}
<POP 294c6-294cc Naked> Σ0
<Call 0x294c6 0x10284> {}
?exit
@ 294da
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 294da-29542 Body>
<POP 294da-294f0 Prologue> Σ0 ↓
<POP 294f0-2953a Naked> Σ0 ↓
<Blob 0x294f0 [14] @> Δ-14 {[«14""»]}
<Const 0x294fc 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 29500-29502 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x29502 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 29514-29516 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 29516 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2951a EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2951c EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2951e MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x29520 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 29526-29528 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x29528 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 2952e-29530 StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x29530 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 29536-2953a StackAdj> Δ+20 {}
<POP 2953a-29542 Epilogue> Σ0
@ 29596
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 29596-296d2 Body>
<POP 29596-295ac Prologue> Σ0 ↓
<POP 295ac-295c2 RegCacheLoad> Σ0 ↓
<POP 295c2-29622 Naked> Σ0 ↓ →0x2966a
<Call 0x295c2 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x295c8 [18] @> Δ-18 {[«18""»]}
<POP 295d4-295d6 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x295d6 18> {[«18""»]|[$$Experiment error :]}
<Call 0x295e2 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 295e4-295e5 StackAdj> Δ+22 ↓ {}
<Blob 0x295e5 [14] @> Δ-14 {[«14""»]}
<POP 295f4-295f6 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x295f6 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 29600-29602 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 29602 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x29606 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 2960c-2960e StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x2960e 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 29614-29616 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x29616 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 29618-2961a StackAdj> Δ+18 {}
<MI 2961a MOVEA.L (A6+0xa),A0> {}
<MI 2961e CMPA.W #0x01,A0> {}
<MI 29620 BEQ 0x2966a> {}
<POP 29622-2966a Naked> Σ0 ↓
<Blob 0x29622 [14] @> Δ-14 {[«14""»]}
<Blob 0x29632 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 29642-29644 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x29644 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 2964e-29650 StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x29650> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x29650 12> Δ-4
<Const 0x29654 0x1.2> Δ-2
<Const 0x29656 0x1e.2> Δ-2
<Call 0x29658 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2965a-2965c StackAdj> Δ+8
<Call 0x2965c 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 29662-29664 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x29664 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 29666-2966a StackAdj> Δ+48 {}
<POP 2966a-296ca Naked> Σ0 ↓ ←0x295c2
<Blob 0x2966a [14] @> Δ-14 {[«14""»]}
<POP 2967a-2967c StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x2967c 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 29686-29688 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 29688 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x2968c 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 29692-29694 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x29694 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 2969a-2969c StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x2969c 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 2969e-2969f StackAdj> Δ+18 ↓ {}
<Blob 0x2969f [24] @> Δ-24 {[«24""»]}
<Const 0x296ae 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 296b2-296b4 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x296b4 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x296c2 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 296c8-296ca StackAdj> Δ+30 {}
<POP 296ca-296d2 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.b9660b755e5b8ec4 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 90 d0 | | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 fb 52 | R | .PTR 0x2fb52 00020010 code.end: 00020010 00 02 96 d2 | | .PTR 0x296d2 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 94 da | | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 95 96 | | .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 52 45 43 4f |@(#)RECO| .TXT '@(#)RECOVERY,14.04,92/09/17,10:00:00\ ' 00020130 48 41 52 44 57 41 52 45 |HARDWARE| .TXT 'HARDWARE.M200_CONFIG' 00020144 54 43 50 5f 49 50 5f 48 |TCP_IP_H| .TXT 'TCP_IP_HOST_ID' 00020152 41 55 54 4f 42 4f 4f 54 |AUTOBOOT| .TXT 'AUTOBOOT_AFTER_CRASH' 00020166 2a 2a 20 41 42 4f 52 54 |** ABORT| .TXT '** ABORT:_' 00020170 49 4e 53 54 41 4c 4c 20 |INSTALL | .TXT 'INSTALL failed: you have to reboot the system ' 0002019e 45 72 72 6f 72 20 72 65 |Error re| .TXT 'Error reading disk controller EEPROM at location_ ' 000201d0 31 32 33 34 35 36 37 38 |12345678| .TXT '123456789012345678901234567890' 000201ee 45 6c 61 70 |Elap | .TXT 'Elap' 000201f2 73 65 64 20 |sed | .TXT 'sed ' 000201f6 74 69 6d 65 |time | .TXT 'time' 000201fa 20 69 73 5f | is_ | .TXT ' is_' 000201fe 45 6e 74 65 72 20 75 6e |Enter un| .TXT 'Enter unit number of disk to format/build/scan (usually 0) :_ ' 0002023c 45 6e 74 65 72 20 64 72 |Enter dr| .TXT 'Enter drive type :_ ' 00020250 48 6f 77 20 6d 61 6e 79 |How many| .TXT 'How many cylinders does this disk have ?_ ' 0002027a 48 6f 77 20 6d 61 6e 79 |How many| .TXT 'How many tracks per cylinder does this disk have ?_ ' 000202ae 48 6f 77 20 6d 61 6e 79 |How many| .TXT 'How many sectors per track does this disk have ?_ ' 000202e0 45 6e 74 65 72 20 48 44 |Enter HD| .TXT 'Enter HDA serial number :_' 000202fa 44 69 73 6b 20 61 70 70 |Disk app| .TXT 'Disk appears intact. Should the information on it be used' 00020334 43 61 6e 27 74 20 72 65 |Can't re| .TXT 'Can't retrieve labels due to disk errors. ' 0002035e 44 69 73 6b 20 68 61 73 |Disk has| .TXT 'Disk has no labels. ' 00020372 44 69 73 6b 20 68 61 73 |Disk has| .TXT 'Disk has obsolete labels. ' 0002038c 53 65 63 74 6f 72 73 20 |Sectors | .TXT 'Sectors per track must be even! ' 000203ac 54 68 61 74 20 64 69 73 |That dis| .TXT 'That disk unit does not exist.' 000203ca 44 72 69 76 65 20 6c 61 |Drive la| .TXT 'Drive label geometry disagrees with slew settings ' 000203fc 44 72 69 76 |Driv | .TXT 'Driv' 00020400 65 20 74 79 |e ty | .TXT 'e ty' 00020404 70 65 73 20 |pes | .TXT 'pes ' 00020408 61 72 65 3a |are: | .TXT 'are:' 0002040c 20 20 20 20 31 20 2d 20 | 1 - | .TXT ' 1 - Fujitsu 2351 (Eagle) with sector interleaving ' 00020442 20 20 20 20 32 20 2d 20 | 2 - | .TXT ' 2 - Fujitsu 2361 (Eagle XP) ' 00020462 20 20 20 20 33 20 2d 20 | 3 - | .TXT ' 3 - Fujitsu 2333' 00020476 20 20 20 20 34 20 2d 20 | 4 - | .TXT ' 4 - Fujitsu 2344' 0002048a 20 20 20 20 35 20 2d 20 | 5 - | .TXT ' 5 - Fujitsu 2372' 0002049e 20 20 20 20 30 20 2d 20 | 0 - | .TXT ' 0 - Other ' 000204ac 20 20 20 20 31 20 2d 20 | 1 - | .TXT ' 1 - Fujitsu 2263 ' 000204c2 20 20 20 20 32 20 2d 20 | 2 - | .TXT ' 2 - Fujitsu 2266 ' 000204d8 20 20 20 20 33 20 2d 20 | 3 - | .TXT ' 3 - SEGATE ST41200N ' 000204f0 53 4c 45 57 20 73 65 74 |SLEW set| .TXT 'SLEW settings differ from drive settings, SLEW settings will prevail. ' 00020536 20 20 20 20 20 2d 2d 2d | ---| .TXT ' ------- WARNING ------- WARNING ------- WARNING -------' 0002057e 50 6c 65 61 73 65 20 55 |Please U| .TXT 'Please UNPROTECT the drive before continuing' 000205aa 44 72 69 76 65 20 67 65 |Drive ge| .TXT 'Drive geometry has grown, the defect data from drive are insufficient to' 000205f2 72 65 63 6f 6e 73 74 72 |reconstr| .TXT 'reconstruct a proper defect representation, a defect tape is required.' 00020638 48 44 |HD | .TXT 'HD' 0002063a 41 20 |A | .TXT 'A ' 0002063c 3a 5f |:_ | .TXT ':_' 0002063e 54 68 65 20 73 65 72 76 |The serv| .TXT 'The server name for logical disk_ ' 00020660 20 69 | i | .TXT ' i' 00020662 73 20 |s | .TXT 's ' 00020664 3a 5f |:_ | .TXT ':_' 00020666 54 68 65 20 64 69 73 6b |The disk| .TXT 'The disk geometry (in decimal) is : ' 0002068a 43 79 6c 69 6e 64 65 72 |Cylinder| .TXT 'Cylinders =>_ ' 00020698 20 20 20 54 72 61 63 6b | Track| .TXT ' Tracks =>_ ' 000206a6 20 20 53 65 63 74 6f 72 | Sector| .TXT ' Sectors =>_ ' 000206b4 43 61 6e 27 74 20 72 65 |Can't re| .TXT 'Can't read bad block list area on disk due to disk errors ' 000206ee 2d 2d 2d 20 57 41 52 4e |--- WARN| .TXT '--- WARNING: bad block area is not 16 blocks long ' 00020720 43 61 6e 27 74 20 72 65 |Can't re| .TXT 'Can't read retarget block list area on disk due to disk errors' 0002075e 45 6e 74 65 72 20 75 6e |Enter un| .TXT 'Enter unit number of tape drive with bad block information :_ ' 0002079c 43 61 6e 27 74 20 72 65 |Can't re| .TXT 'Can't read tape. Bad tape or wrong format. ' 000207c8 2e 44 45 46 |.DEF | .TXT '.DEF' 000207cc 45 43 54 53 |ECTS | .TXT 'ECTS' 000207d0 46 6f 75 6e 64 20 45 4f |Found EO| .TXT 'Found EOT, Aborting!' 000207e4 4f 62 73 6f 6c 65 74 65 |Obsolete| .TXT 'Obsolete tape header version, aborting! ' 0002080c 52 65 63 6f 72 64 20 72 |Record r| .TXT 'Record read failed while skipping a file. ' 00020836 46 6f 75 6e 64 20 64 61 |Found da| .TXT 'Found data, can't read it.' 00020850 44 6f 20 79 6f 75 20 77 |Do you w| .TXT 'Do you want to format the disk' 0002086e 41 6e 73 77 |Answ | .TXT 'Answ' 00020872 65 72 20 30 |er 0 | .TXT 'er 0' 00020876 20 6f 72 20 | or | .TXT ' or ' 0002087a 31 20 3a 5f |1 :_ | .TXT '1 :_' 0002087e 44 6f |Do | .XXX[0x2] 00020880 20 79 6f 75 20 77 61 6e | you wan| .XXX[0x28] 00020888 74 20 74 6f 20 75 73 65 |t to use| 00020890 20 74 68 65 20 62 61 64 | the bad| 00020898 20 62 6c 6f 63 6b 20 6c | block l| 000208a0 69 73 74 20 66 72 6f 6d |ist from| 000208a8 20 64 69 73 6b 20 | disk | .XXX[0x6] 000208ae 44 69 73 6b 20 6d 75 73 |Disk mus| .TXT 'Disk must be formated.' 000208c4 46 72 6f 6d 20 77 68 65 |From whe| .TXT 'From where should I get the bad block list :' 000208f0 20 20 20 20 20 20 20 20 | | .TXT ' 0 => Get it from the disk ' 00020916 20 20 20 20 20 20 20 20 | | .TXT ' 1 => Get it from a backup tape' 00020940 20 20 20 20 20 20 20 20 | | .TXT ' 0 => Get it from the disk label area' 00020970 20 20 20 20 20 20 20 20 | | .TXT ' 1 => Get it from the disk system area ' 000209a2 2c 5f |,_ | .TXT ',_' 000209a4 53 70 65 63 69 61 6c 20 |Special | .TXT 'Special condition ' 000209b6 54 72 61 6e 73 66 65 72 |Transfer| .TXT 'Transfer error' 000209c4 44 61 74 61 20 6c 61 74 |Data lat| .TXT 'Data late ' 000209ce 57 72 69 74 65 20 63 68 |Write ch| .TXT 'Write check error ' 000209e0 55 4e 49 42 55 53 20 70 |UNIBUS p| .TXT 'UNIBUS parity error ' 000209f4 4e 6f 6e 2d 65 78 69 73 |Non-exis| .TXT 'Non-existent drive' 00020a06 4e 6f 6e 2d 65 78 69 73 |Non-exis| .TXT 'Non-existent memory ' 00020a1a 50 72 6f 67 72 61 6d 20 |Program | .TXT 'Program error ' 00020a28 4d 69 78 65 64 20 74 72 |Mixed tr| .TXT 'Mixed transfer' 00020a36 49 6e 70 75 74 20 6e 6f |Input no| .TXT 'Input not ready ' 00020a46 42 75 73 20 61 64 64 72 |Bus addr| .TXT 'Bus address inhibit ' 00020a5a 41 74 74 65 |Atte | .TXT 'Atte' 00020a5e 6e 74 69 6f |ntio | .TXT 'ntio' 00020a62 6e 20 41 63 |n Ac | .TXT 'n Ac' 00020a66 74 69 76 65 |tive | .TXT 'tive' 00020a6a 45 72 72 6f 72 20 |Error | .TXT 'Error ' 00020a70 50 6f 73 69 74 69 6f 6e |Position| .TXT 'Positioning in progress ' 00020a88 4d 65 64 69 75 6d 20 6f |Medium o| .TXT 'Medium on-line' 00020a96 57 72 69 74 65 20 6c 6f |Write lo| .TXT 'Write lock' 00020aa0 4c 61 73 74 20 73 65 63 |Last sec| .TXT 'Last sector transfered' 00020ab6 50 72 6f 67 |Prog | .TXT 'Prog' 00020aba 72 61 6d 6d |ramm | .TXT 'ramm' 00020abe 61 62 6c 65 |able | .TXT 'able' 00020ac2 44 72 69 76 65 20 6e 6f |Drive no| .TXT 'Drive not present ' 00020ad4 44 72 69 76 65 20 6e 6f |Drive no| .TXT 'Drive not ready ' 00020ae4 56 6f 6c 75 |Volu | .TXT 'Volu' 00020ae8 6d 65 20 6e |me n | .TXT 'me n' 00020aec 6f 74 20 76 |ot v | .TXT 'ot v' 00020af0 61 6c 69 64 |alid | .TXT 'alid' 00020af4 48 65 61 64 |Head | .TXT 'Head' 00020af8 73 20 61 72 |s ar | .TXT 's ar' 00020afc 65 20 6f 66 |e of | .TXT 'e of' 00020b00 66 73 65 74 |fset | .TXT 'fset' 00020b04 44 61 74 61 20 63 68 65 |Data che| .TXT 'Data check' 00020b0e 55 6e |Un | .TXT 'Un' 00020b10 73 61 |sa | .TXT 'sa' 00020b12 66 65 |fe | .TXT 'fe' 00020b14 4f 70 65 72 61 74 69 6f |Operatio| .TXT 'Operation Incomplete' 00020b28 44 72 69 76 65 20 74 69 |Drive ti| .TXT 'Drive timing error' 00020b3a 57 72 69 74 |Writ | .TXT 'Writ' 00020b3e 65 20 6c 6f |e lo | .TXT 'e lo' 00020b42 63 6b 20 65 |ck e | .TXT 'ck e' 00020b46 72 72 6f 72 |rror | .TXT 'rror' 00020b4a 49 6e 76 61 6c 69 64 20 |Invalid | .TXT 'Invalid address error ' 00020b60 41 64 64 72 |Addr | .TXT 'Addr' 00020b64 65 73 73 20 |ess | .TXT 'ess ' 00020b68 6f 76 65 72 |over | .TXT 'over' 00020b6c 66 6c 6f 77 |flow | .TXT 'flow' 00020b70 48 65 61 64 |Head | .TXT 'Head' 00020b74 65 72 20 43 |er C | .TXT 'er C' 00020b78 52 43 20 65 |RC e | .TXT 'RC e' 00020b7c 72 72 6f 72 |rror | .TXT 'rror' 00020b80 48 65 61 64 65 72 20 63 |Header c| .TXT 'Header compare error' 00020b94 45 43 43 20 68 61 72 64 |ECC hard| .TXT 'ECC hard error' 00020ba2 57 72 69 74 |Writ | .TXT 'Writ' 00020ba6 65 20 63 6c |e cl | .TXT 'e cl' 00020baa 6f 63 6b 20 |ock | .TXT 'ock ' 00020bae 66 61 69 6c |fail | .TXT 'fail' 00020bb2 46 6f 72 6d |Form | .TXT 'Form' 00020bb6 61 74 20 65 |at e | .TXT 'at e' 00020bba 72 72 6f 72 |rror | .TXT 'rror' 00020bbe 52 65 67 69 73 74 65 72 |Register| .TXT 'Register modification refused ' 00020bdc 49 6c 6c 65 |Ille | .TXT 'Ille' 00020be0 67 61 6c 20 |gal | .TXT 'gal ' 00020be4 66 75 6e 63 |func | .TXT 'func' 00020be8 74 69 6f 6e |tion | .TXT 'tion' 00020bec 42 61 64 20 73 65 63 74 |Bad sect| .TXT 'Bad sector' 00020bf6 53 65 65 6b 20 69 6e 63 |Seek inc| .TXT 'Seek incomplete ' 00020c06 49 6e 76 61 6c 69 64 20 |Invalid | .TXT 'Invalid command ' 00020c16 4c 6f 73 73 20 6f 66 20 |Loss of | .TXT 'Loss of system clock' 00020c2a 4c 6f 73 73 20 6f 66 20 |Loss of | .TXT 'Loss of bit clock ' 00020c3c 44 65 76 69 |Devi | .TXT 'Devi' 00020c40 63 65 20 63 |ce c | .TXT 'ce c' 00020c44 68 65 63 6b |heck | .TXT 'heck' 00020c48 53 6b 69 70 20 73 65 63 |Skip sec| .TXT 'Skip sector error ' 00020c5a 43 79 6c 69 6e 64 65 72 |Cylinder| .TXT 'Cylinder => ' 00020c66 2c 20 54 72 61 63 6b 20 |, Track | .TXT ', Track =>' 00020c70 2c 20 53 65 63 74 6f 72 |, Sector| .TXT ', Sector => ' 00020c7c 45 72 72 6f 72 20 77 68 |Error wh| .TXT 'Error while reading disk error status ' 00020ca2 54 6f 6f 20 6d 61 6e 79 |Too many| .TXT 'Too many defects (2048) to handle ' 00020cc4 66 61 69 6c 75 72 65 20 |failure | .TXT 'failure reading defect map from disk' 00020ce8 46 6c 61 67 67 69 6e 67 |Flagging| .TXT 'Flagging bad blocks.' 00020cfc 20 62 61 64 20 62 6c 6f | bad blo| .TXT ' bad blocks flagged.' 00020d10 44 65 66 65 63 74 20 65 |Defect e| .TXT 'Defect entries exceeds maximum permitted' 00020d38 20 64 65 66 65 63 74 20 | defect | .TXT ' defect table entries used,_' 00020d54 20 61 76 61 69 6c 61 62 | availab| .TXT ' available defect entries remain. ' 00020d76 46 6f |Fo | .XXX[0x2] 00020d78 72 6d 61 74 74 69 6e 67 |rmatting| .XXX[0x28] 00020d80 20 74 68 65 20 64 72 69 | the dri| 00020d88 76 65 20 77 69 6c 6c 20 |ve will | 00020d90 74 61 6b 65 20 61 62 6f |take abo| 00020d98 75 74 20 31 30 20 6d 69 |ut 10 mi| 00020da0 6e 75 74 65 73 2e |nutes. | .XXX[0x6] 00020da6 46 6f 72 6d 61 74 20 66 |Format f| .TXT 'Format failed!' 00020db4 4d 4f 44 45 20 53 45 4c |MODE SEL| .TXT 'MODE SELECT PAGE 3 FAILED ' 00020dce 4d 4f 44 45 20 53 45 4c |MODE SEL| .TXT 'MODE SELECT PAGE 4 FAILED ' 00020de8 46 6f 72 6d 61 74 74 69 |Formatti| .TXT 'Formatting the drive will take about 5 minutes. ' 00020e18 46 6f 72 6d 61 74 74 69 |Formatti| .TXT 'Formatting the drive will take about 6 minutes. ' 00020e48 46 6f 72 6d 61 74 74 69 |Formatti| .TXT 'Formatting the drive will take about 18 minutes.' 00020e78 46 6f 72 6d 61 74 74 69 |Formatti| .TXT 'Formatting the drive will take about 20 minutes.' 00020ea8 46 6f 72 6d 61 74 74 69 |Formatti| .TXT 'Formatting the drive will take about 35 minutes.' 00020ed8 54 68 65 20 66 6f 72 6d |The form| .TXT 'The format time for foreign drives is unknown.' 00020f06 46 6f 72 6d 61 74 74 69 |Formatti| .TXT 'Formatting the drive will take about_ ' 00020f2c 46 6f 72 6d 61 74 74 69 |Formatti| .TXT 'Formatting the drive will take less than 1 minute.' 00020f5e 46 6f 72 6d 61 74 74 69 |Formatti| .TXT 'Formatting the drive will take about 3 minutes. ' 00020f8e 44 6f 20 79 6f 75 20 77 |Do you w| .TXT 'Do you wish to skip formatting the server disk partition' 00020fc6 20 6d 69 6e 75 74 65 28 | minute(| .TXT ' minute(s). ' 00020fd2 50 72 65 76 69 6f 75 73 |Previous| .TXT 'Previously detected bad block at_ ' 00020ff4 50 72 65 76 69 6f 75 73 |Previous| .TXT 'Previously undetected bad block at_ ' 00021018 42 61 64 20 62 6c 6f 63 |Bad bloc| .TXT 'Bad block file is full, aborting! ' 0002103a 44 69 73 6b 20 65 72 72 |Disk err| .TXT 'Disk error on cylinder zero, track zero. Aborting! ' 0002106e 44 65 74 65 63 74 65 64 |Detected| .TXT 'Detected program error, operation will overflow disk size ' 000210a8 66 69 78 75 70 20 61 66 |fixup af| .TXT 'fixup after error failed, operation will overflow disk size ' 000210e4 43 79 6c 69 |Cyli | .XXX[0x4] 000210e8 6e 64 65 72 3d 20 2c 20 |nder= , | .XXX[0x20] 000210f0 20 54 72 61 63 6b 3d 20 | Track= | 000210f8 2c 20 20 53 65 63 74 6f |, Secto| 00021100 72 3d 2c 20 20 43 6f 75 |r=, Cou| 00021108 6e 74 3d 20 |nt= | .XXX[0x4] 0002110c 43 79 6c 69 6e 64 65 72 |Cylinder| .TXT 'Cylinder= ' 00021116 2c 20 |, | .XXX[0x2] 00021118 20 54 72 61 63 6b 3d 20 | Track= | .XXX[0x8] 00021120 2c 20 20 53 65 63 74 6f |, Secto| .TXT ', Sector=' 0002112a 2c 20 20 43 6f 75 |, Cou | .XXX[0x6] 00021130 6e 74 3d 20 |nt= | .XXX[0x4] 00021134 43 79 6c 69 6e 64 65 72 |Cylinder| .TXT 'Cylinder_ ' 0002113e 43 79 6c 69 6e 64 65 72 |Cylinder| .TXT 'Cylinder= ' 00021148 2c 20 20 54 72 61 63 6b |, Track| .XXX[0x8] 00021150 3d 20 |= | .XXX[0x2] 00021152 2c 20 20 53 65 63 74 6f |, Secto| .TXT ', Sector=' 0002115c 2c 20 20 43 |, C | .XXX[0x4] 00021160 6f 75 6e 74 3d 20 |ount= | .XXX[0x6] 00021166 41 20 72 65 61 64 20 70 |A read p| .TXT 'A read pass takes about _ ' 00021180 41 20 77 72 69 74 65 20 |A write | .TXT 'A write pass takes about_ ' 0002119a 53 68 61 6c 6c 20 49 20 |Shall I | .TXT 'Shall I perform a surface analysis' 000211bc 48 6f 77 20 6d 61 6e 79 |How many| .TXT 'How many passes of surface analysis :_' 000211e2 52 65 70 6f 72 74 20 61 |Report a| .TXT 'Report all errors (as opposed to only new errors) ' 00021214 54 68 69 73 20 77 69 6c |This wil| .TXT 'This will not verify disk data integrity, do you wish to proceed? ' 00021256 3f 3f |?? | .XXX[0x2] 00021258 3f 3f 3f 3f 31 30 3f 3f |????10??| .XXX[0x10] 00021260 32 36 3f 3f 3f 3f 3f 3f |26??????| 00021268 3f 3f 3f 3f 32 34 |????24 | .XXX[0x6] 0002126e 20 6d 69 6e 75 74 65 73 | minutes| .TXT ' minutes. ' 00021278 20 6d 69 6e 75 74 65 73 | minutes| .TXT ' minutes. ' 00021282 20 6d 69 6e 75 74 65 73 | minutes| .TXT ' minutes. ' 0002128c 20 6d 69 6e 75 74 65 73 | minutes| .TXT ' minutes. ' 00021296 57 72 69 74 65 20 70 61 |Write pa| .TXT 'Write pass_ ' 000212a2 20 63 6f 6d | com | .TXT ' com' 000212a6 70 6c 65 74 |plet | .TXT 'plet' 000212aa 65 2e 20 5f |e. _ | .TXT 'e. _' 000212ae 52 65 61 64 20 70 61 73 |Read pas| .TXT 'Read pass _ ' 000212ba 20 63 6f 6d | com | .TXT ' com' 000212be 70 6c 65 74 |plet | .TXT 'plet' 000212c2 65 2e 20 5f |e. _ | .TXT 'e. _' 000212c6 20 64 65 66 65 63 74 20 | defect | .TXT ' defect entries expunged. ' 000212e0 44 6f 20 79 6f 75 20 77 |Do you w| .TXT 'Do you want to specify new disk limits (WILL DESTROY DATA)' 0002131a 45 6e 74 65 72 20 6c 61 |Enter la| .TXT 'Enter last cylinder to be used by the DFS [ Hint =>_' 0002134e 45 6e 74 65 72 20 66 69 |Enter fi| .TXT 'Enter first cylinder to be used for read/write diagnostics [ Hint =>_ ' 00021394 44 6f 20 79 6f 75 20 77 |Do you w| .TXT 'Do you want to build a diagnostic file system on this unit' 000213ce 43 61 6e 27 74 20 77 72 |Can't wr| .TXT 'Can't write BOOT label, aborting! ' 000213f0 43 61 6e 27 74 20 77 72 |Can't wr| .TXT 'Can't write bad block file, aborting! ' 00021416 43 61 6e 27 74 20 77 72 |Can't wr| .TXT 'Can't write VOLUME label, aborting! ' 0002143a 43 61 6e 27 74 20 77 72 |Can't wr| .TXT 'Can't write DOS label, aborting!' 0002145a 57 72 69 74 69 6e 67 20 |Writing | .TXT 'Writing bad block information.' 00021478 57 72 69 74 69 6e 67 20 |Writing | .TXT 'Writing boot label. ' 0002148c 57 72 69 74 69 6e 67 20 |Writing | .TXT 'Writing DFS label.' 0002149e 64 72 69 76 65 20 6e 65 |drive ne| .TXT 'drive needs a new volume label' 000214bc 20 5d | ] | .TXT ' ]' 000214be 3a 20 |: | .XXX[0x2] 000214c0 20 5d | ] | .TXT ' ]' 000214c2 3a 20 |: | .XXX[0x2] 000214c4 20 5d | ] | .TXT ' ]' 000214c6 3a 20 |: | .XXX[0x2] 000214c8 57 72 69 74 69 6e 67 20 |Writing | .TXT 'Writing shared label. ' 000214de 43 61 6e 27 74 20 63 6f |Can't co| .TXT 'Can't construct free list due to disk errors, aborting! ' 00021516 43 6f 6e 73 74 72 75 63 |Construc| .TXT 'Constructing free list. ' 0002152e 57 72 69 74 69 6e 67 20 |Writing | .TXT 'Writing free list.' 00021540 49 6e 73 75 66 66 69 63 |Insuffic| .TXT 'Insufficient disk space to allocate directory, aborting!' 00021578 43 61 6e 27 74 20 69 6e |Can't in| .TXT 'Can't initialize directory due to disk errors, aborting!' 000215b0 41 6c 6c 6f 63 61 74 69 |Allocati| .TXT 'Allocating and initializing directory.' 000215d6 43 61 6e 27 74 20 75 70 |Can't up| .TXT 'Can't update boot label due to disk errors, aborting! ' 0002160c 4b 45 52 4e |KERN | .XXX[0x4] 00021610 45 4c 5f 30 2e 4d 32 30 |EL_0.M20| .XXX[0xd8] 00021618 30 20 20 20 20 20 20 20 |0 | 00021620 4b 45 52 4e 45 4c 5f 31 |KERNEL_1| 00021628 2e 4d 32 30 30 20 20 20 |.M200 | 00021630 20 20 20 20 4b 45 52 4e | KERN| 00021638 45 4c 5f 32 2e 4d 32 30 |EL_2.M20| 00021640 30 20 20 20 20 20 20 20 |0 | 00021648 46 53 5f 30 2e 4d 32 30 |FS_0.M20| 00021650 30 20 20 20 20 20 20 20 |0 | 00021658 20 20 20 20 46 53 5f 31 | FS_1| 00021660 2e 4d 32 30 30 20 20 20 |.M200 | 00021668 20 20 20 20 20 20 20 20 | | 00021670 46 53 5f 32 2e 4d 32 30 |FS_2.M20| 00021678 30 20 20 20 20 20 20 20 |0 | 00021680 20 20 20 20 50 52 4f 47 | PROG| 00021688 52 41 4d 5f 30 2e 4d 32 |RAM_0.M2| 00021690 30 30 20 20 20 20 20 20 |00 | 00021698 50 52 4f 47 52 41 4d 5f |PROGRAM_| 000216a0 31 2e 4d 32 30 30 20 20 |1.M200 | 000216a8 20 20 20 20 50 52 4f 47 | PROG| 000216b0 52 41 4d 5f 32 2e 4d 32 |RAM_2.M2| 000216b8 30 30 20 20 20 20 20 20 |00 | 000216c0 44 46 53 5f 42 4f 4f 54 |DFS_BOOT| 000216c8 53 54 52 41 50 2e 4d 32 |STRAP.M2| 000216d0 30 30 20 20 45 52 52 4f |00 ERRO| 000216d8 52 5f 4c 4f 47 20 20 20 |R_LOG | 000216e0 20 20 20 20 20 20 20 20 | | 000216e8 43 72 65 61 74 69 6e 67 |Creating| .TXT 'Creating predefined files.' 00021702 74 68 65 20 65 72 72 6f |the erro| .TXT 'the error above was fatal ' 0002171c 4d 6f 64 65 6c 20 73 70 |Model sp| .TXT 'Model specific DFS_BOOTSTRAP is missing, the disk may not be bootable.' 00021762 4d 34 30 30 5f 44 46 53 |M400_DFS| .TXT 'M400_DFS_BOOTSTRAP.M200 ' 0002177a 4d 34 30 30 5f 44 46 53 |M400_DFS| .TXT 'M400_DFS_BOOTSTRAP.M200 ' 00021792 44 46 53 5f 42 4f 4f 54 |DFS_BOOT| .TXT 'DFS_BOOTSTRAP.M200' 000217a4 4d 32 30 30 5f 44 46 53 |M200_DFS| .TXT 'M200_DFS_BOOTSTRAP.M200 ' 000217bc 4d 32 30 30 5f 44 46 53 |M200_DFS| .TXT 'M200_DFS_BOOTSTRAP.M200 ' 000217d4 44 46 53 5f 42 4f 4f 54 |DFS_BOOT| .TXT 'DFS_BOOTSTRAP.M200' 000217e6 4d 6f 64 65 6c 20 73 70 |Model sp| .TXT 'Model specific IOP kernel(s) are missing, the disk may not be bootable. ' 0002182e 4d 33 30 30 43 5f 4b 45 |M300C_KE| .TXT 'M300C_KERNEL_0.M200 ' 00021842 4d 33 30 30 43 5f 4b 45 |M300C_KE| .TXT 'M300C_KERNEL_1.M200 ' 00021856 4d 33 30 30 43 5f 4b 45 |M300C_KE| .TXT 'M300C_KERNEL_2.M200 ' 0002186a 4d 33 30 30 43 5f 4b 45 |M300C_KE| .TXT 'M300C_KERNEL_0.M200 ' 0002187e 4b 45 52 4e 45 4c 5f 30 |KERNEL_0| .TXT 'KERNEL_0.M200 ' 0002188c 4d 33 30 30 43 5f 4b 45 |M300C_KE| .TXT 'M300C_KERNEL_1.M200 ' 000218a0 4b 45 52 4e 45 4c 5f 31 |KERNEL_1| .TXT 'KERNEL_1.M200 ' 000218ae 4d 33 30 30 43 5f 4b 45 |M300C_KE| .TXT 'M300C_KERNEL_2.M200 ' 000218c2 4b 45 52 4e 45 4c 5f 32 |KERNEL_2| .TXT 'KERNEL_2.M200 ' 000218d0 4d 33 30 30 53 5f 4b 45 |M300S_KE| .TXT 'M300S_KERNEL_0.M200 ' 000218e4 4d 33 30 30 53 5f 4b 45 |M300S_KE| .TXT 'M300S_KERNEL_1.M200 ' 000218f8 4d 33 30 30 53 5f 4b 45 |M300S_KE| .TXT 'M300S_KERNEL_2.M200 ' 0002190c 4d 33 30 30 53 5f 4b 45 |M300S_KE| .TXT 'M300S_KERNEL_0.M200 ' 00021920 4b 45 52 4e 45 4c 5f 30 |KERNEL_0| .TXT 'KERNEL_0.M200 ' 0002192e 4d 33 30 30 53 5f 4b 45 |M300S_KE| .TXT 'M300S_KERNEL_1.M200 ' 00021942 4b 45 52 4e 45 4c 5f 31 |KERNEL_1| .TXT 'KERNEL_1.M200 ' 00021950 4d 33 30 30 53 5f 4b 45 |M300S_KE| .TXT 'M300S_KERNEL_2.M200 ' 00021964 4b 45 52 4e 45 4c 5f 32 |KERNEL_2| .TXT 'KERNEL_2.M200 ' 00021972 4d 34 30 30 43 5f 4b 45 |M400C_KE| .TXT 'M400C_KERNEL_0.M200 ' 00021986 4d 34 30 30 43 5f 4b 45 |M400C_KE| .TXT 'M400C_KERNEL_1.M200 ' 0002199a 4d 34 30 30 43 5f 4b 45 |M400C_KE| .TXT 'M400C_KERNEL_2.M200 ' 000219ae 4d 34 30 30 43 5f 4b 45 |M400C_KE| .TXT 'M400C_KERNEL_0.M200 ' 000219c2 4b 45 52 4e 45 4c 5f 30 |KERNEL_0| .TXT 'KERNEL_0.M200 ' 000219d0 4d 34 30 30 43 5f 4b 45 |M400C_KE| .TXT 'M400C_KERNEL_1.M200 ' 000219e4 4b 45 52 4e 45 4c 5f 31 |KERNEL_1| .TXT 'KERNEL_1.M200 ' 000219f2 4d 34 30 30 43 5f 4b 45 |M400C_KE| .TXT 'M400C_KERNEL_2.M200 ' 00021a06 4b 45 52 4e 45 4c 5f 32 |KERNEL_2| .TXT 'KERNEL_2.M200 ' 00021a14 4d 34 30 30 53 5f 4b 45 |M400S_KE| .TXT 'M400S_KERNEL_0.M200 ' 00021a28 4d 34 30 30 53 5f 4b 45 |M400S_KE| .TXT 'M400S_KERNEL_1.M200 ' 00021a3c 4d 34 30 30 53 5f 4b 45 |M400S_KE| .TXT 'M400S_KERNEL_2.M200 ' 00021a50 4d 34 30 30 53 5f 4b 45 |M400S_KE| .TXT 'M400S_KERNEL_0.M200 ' 00021a64 4b 45 52 4e 45 4c 5f 30 |KERNEL_0| .TXT 'KERNEL_0.M200 ' 00021a72 4d 34 30 30 53 5f 4b 45 |M400S_KE| .TXT 'M400S_KERNEL_1.M200 ' 00021a86 4b 45 52 4e 45 4c 5f 31 |KERNEL_1| .TXT 'KERNEL_1.M200 ' 00021a94 4d 34 30 30 53 5f 4b 45 |M400S_KE| .TXT 'M400S_KERNEL_2.M200 ' 00021aa8 4b 45 52 4e 45 4c 5f 32 |KERNEL_2| .TXT 'KERNEL_2.M200 ' 00021ab6 4d 32 30 30 5f 4b 45 52 |M200_KER| .TXT 'M200_KERNEL_0.M200' 00021ac8 4d 32 30 30 5f 4b 45 52 |M200_KER| .TXT 'M200_KERNEL_1.M200' 00021ada 4d 32 30 30 5f 4b 45 52 |M200_KER| .TXT 'M200_KERNEL_2.M200' 00021aec 4d 32 30 30 5f 4b 45 52 |M200_KER| .TXT 'M200_KERNEL_0.M200' 00021afe 4b 45 52 4e 45 4c 5f 30 |KERNEL_0| .TXT 'KERNEL_0.M200 ' 00021b0c 4d 32 30 30 5f 4b 45 52 |M200_KER| .TXT 'M200_KERNEL_1.M200' 00021b1e 4b 45 52 4e 45 4c 5f 31 |KERNEL_1| .TXT 'KERNEL_1.M200 ' 00021b2c 4d 32 30 30 5f 4b 45 52 |M200_KER| .TXT 'M200_KERNEL_2.M200' 00021b3e 4b 45 52 4e 45 4c 5f 32 |KERNEL_2| .TXT 'KERNEL_2.M200 ' 00021b4c 54 61 70 65 20 64 72 69 |Tape dri| .TXT 'Tape drive unit number :_ ' 00021b66 44 6f 20 79 6f 75 20 77 |Do you w| .TXT 'Do you want to display filenames as they are loaded ' 00021b9a 77 61 69 74 69 6e 67 20 |waiting | .TXT 'waiting for tape to rewind after booting' 00021bc2 46 53 5f 55 |FS_U | .TXT 'FS_U' 00021bc6 49 4e 49 54 |INIT | .TXT 'INIT' 00021bca 20 65 72 72 | err | .TXT ' err' 00021bce 6f 72 3a 5f |or:_ | .TXT 'or:_' 00021bd2 6c 61 73 74 20 44 46 53 |last DFS| .TXT 'last DFS cylinder =_' 00021be6 2c 20 66 69 72 73 74 20 |, first | .TXT ', first DIAG cylinder =_' 00021bfe 74 68 65 20 65 72 72 6f |the erro| .TXT 'the error was fatal ' 00021c12 74 68 65 20 65 72 72 6f |the erro| .TXT 'the error was fatal ' 00021c26 20 4d 61 6e 75 66 61 63 | Manufac| .TXT ' Manufacturer and_' 00021c38 20 55 73 65 72 20 62 61 | User ba| .TXT ' User bad blocks. ' 00021c4a 20 64 65 66 65 63 74 20 | defect | .TXT ' defect table entries used,_' 00021c66 20 61 76 61 69 6c 61 62 | availab| .TXT ' available defect entries remain. ' 00021c88 55 53 52 20 64 65 66 65 |USR defe| .TXT 'USR defect at (cylinder/track/sector)_' 00021cae 4d 46 47 20 64 65 66 65 |MFG defe| .TXT 'MFG defect at (cylinder/track/sector)_' 00021cd4 20 41 4c 4c | ALL | .TXT ' ALL' 00021cd8 20 41 4c 4c | ALL | .TXT ' ALL' 00021cdc 2a 2a 20 43 6f 75 6c 64 |** Could| .TXT '** Could not restore the hardware config file because there was a problem ' 00021d26 73 61 76 69 6e 67 20 69 |saving i| .TXT 'saving it before the DFS rebuild. You will have to run CEDIT to recreate it ' 00021d72 2a 2a 20 43 6f 75 6c 64 |** Could| .TXT '** Could not restore the hardware config file because of the unexpected ' 00021dba 65 72 72 6f 72 20 64 65 |error de| .TXT 'error described above. You will have to run CEDIT to recreate it' 00021dfa 2a 2a 20 43 6f 75 6c 64 |** Could| .TXT '** Could not restore the TCP_IP_HOST_ID file because there was a problem' 00021e42 73 61 76 69 6e 67 20 69 |saving i| .TXT 'saving it before the DFS rebuild, probably it did not exist. If you know this ' 00021e90 73 79 73 74 65 6d 27 73 |system's| .TXT 'system's TCP/IP address then enter it now, otherwise just hit the ENTER key.' 00021edc 45 6e 74 65 72 20 74 68 |Enter th| .TXT 'Enter this system's TCP/IP address [255.255.255.255] :_ ' 00021f14 2a 2a 20 43 6f 75 6c 64 |** Could| .TXT '** Could not restore the TCP_IP_HOST_ID file because of the unexpected' 00021f5a 65 72 72 6f 72 20 64 65 |error de| .TXT 'error described above. You will have to recreate it by hand ' 00021f96 32 35 35 2e 32 35 35 2e |255.255.| .TXT '255.255.255.255 ' 00021fa6 52 65 73 74 6f 72 65 64 |Restored| .TXT 'Restored TCP_IP_HOST_ID file containing_' 00021fce 44 6f 20 79 6f 75 20 77 |Do you w| .TXT 'Do you want to load files into the DFS on this unit ' 00022002 54 68 69 73 20 64 69 73 |This dis| .TXT 'This disk does not have a DFS currently installed ' 00022034 57 41 52 4e 49 4e 47 3a |WARNING:| .TXT 'WARNING: you should boot this from tape when using this option' 00022072 74 68 65 20 65 72 72 6f |the erro| .TXT 'the error above is fatal' 0002208a 46 53 5f 55 |FS_U | .TXT 'FS_U' 0002208e 49 4e 49 54 |INIT | .TXT 'INIT' 00022092 20 65 72 72 | err | .TXT ' err' 00022096 6f 72 3a 5f |or:_ | .TXT 'or:_' 0002209a 54 68 65 20 44 46 53 20 |The DFS | .TXT 'The DFS files have been reloaded' 000220ba 55 50 44 41 54 45 5f 45 |UPDATE_E| .TXT 'UPDATE_EEPROM ' 000220c8 49 4e 53 54 41 4c 4c 20 |INSTALL | .TXT 'INSTALL ' 000220d0 2a 2a 20 61 62 6e 6f 72 |** abnor| .TXT '** abnornal UPDATE_EEPROM abort: the EEPROMs may not be updated **' 00022112 49 74 20 6d 61 79 20 62 |It may b| .TXT 'It may be necessary to replace the IOC/RESHA EEPROMs to boot the system ' 0002215a 74 68 65 20 65 72 72 6f |the erro| .TXT 'the error above was fatal ' 00022174 4f 70 74 69 |Opti | .TXT 'Opti' 00022178 6f 6e 73 20 |ons | .TXT 'ons ' 0002217c 61 72 65 3a |are: | .TXT 'are:' 00022180 20 20 20 20 30 20 3d 3e | 0 =>| .TXT ' 0 => Exit ' 0002218e 20 20 20 20 31 20 3d 3e | 1 =>| .TXT ' 1 => Initialize disk (for experts only) ' 000221ba 20 20 20 20 32 20 3d 3e | 2 =>| .TXT ' 2 => Initialize disk, drop USR defects (internal use only)' 000221f8 20 20 20 20 33 20 3d 3e | 3 =>| .TXT ' 3 => Show MFG and USR bad block locations ' 00022226 20 20 20 20 34 20 3d 3e | 4 =>| .TXT ' 4 => Show only USR bad block locations' 00022250 20 20 20 20 35 20 3d 3e | 5 =>| .TXT ' 5 => Install new DFS only ' 0002226e 20 20 20 20 36 20 3d 3e | 6 =>| .TXT ' 6 => Show bad block count and DOS limits' 0002229a 45 6e 74 65 72 20 6f 70 |Enter op| .TXT 'Enter option :_ ' 000222aa 4d 46 47 20 62 61 64 20 |MFG bad | .TXT 'MFG bad block locations can not be displayed for Model x00C ' 000222e6 44 6f |Do | .XXX[0x2] 000222e8 6e 65 21 20 |ne! | .XXX[0x4] 000222ec 42 6f 6f 74 20 64 69 73 |Boot dis| .TXT 'Boot disk has been rebuilt or the IOP was booted from tape. ' 00022328 59 6f 75 20 6d 75 73 74 |You must| .TXT 'You must crash the machine to exit. ' 0002234c 00 00 00 00 | | .XXX[0x4] 00022350 03 4a 14 30 03 4a 14 42 | J 0 J B| .XXX[0x70] 00022358 03 37 0a 42 02 70 1b 42 | 7 B p B| 00022360 02 e9 1b 42 00 00 00 00 | B | 00022368 06 77 0f 38 06 77 0f 5a | w 8 w Z| 00022370 07 68 0f 4c 00 00 00 00 | h L | 00022378 00 00 00 00 00 00 00 35 | 5| 00022380 00 55 00 47 00 00 00 00 | U G | 00022388 00 00 00 08 00 00 00 00 | | 00022390 00 00 04 00 03 16 00 0f | | 00022398 00 00 00 00 00 2d 00 00 | - | 000223a0 04 00 00 01 00 00 00 00 | | 000223a8 40 00 00 00 00 00 00 00 |@ | 000223b0 08 00 00 00 00 00 00 04 | | 000223b8 00 04 12 00 00 00 0f 00 | | 000223c0 00 00 00 00 00 00 00 00 | | .BLANK 00[0x10] 000223d0 b6 db ed b6 aa aa 3f 3f | ??| .XXX[0x150] 000223d8 3f 3f 3f 3f 31 30 3f 3f |????10??| 000223e0 32 36 3f 3f 3f 3f 3f 3f |26??????| 000223e8 3f 3f 3f 3f 32 34 4b 45 |????24KE| 000223f0 52 4e 45 4c 5f 30 2e 4d |RNEL_0.M| 000223f8 32 30 30 20 20 20 20 20 |200 | 00022400 20 20 01 01 01 00 00 00 | | 00022408 00 3f 4b 45 52 4e 45 4c | ?KERNEL| 00022410 5f 31 2e 4d 32 30 30 20 |_1.M200 | 00022418 20 20 20 20 20 20 01 01 | | 00022420 01 00 00 01 00 3f 4b 45 | ?KE| 00022428 52 4e 45 4c 5f 32 2e 4d |RNEL_2.M| 00022430 32 30 30 20 20 20 20 20 |200 | 00022438 20 20 01 01 01 00 00 02 | | 00022440 00 3f 46 53 5f 30 2e 4d | ?FS_0.M| 00022448 32 30 30 20 20 20 20 20 |200 | 00022450 20 20 20 20 20 20 01 00 | | 00022458 00 00 00 03 00 40 46 53 | @FS| 00022460 5f 31 2e 4d 32 30 30 20 |_1.M200 | 00022468 20 20 20 20 20 20 20 20 | | 00022470 20 20 01 00 00 00 00 04 | | 00022478 00 40 46 53 5f 32 2e 4d | @FS_2.M| 00022480 32 30 30 20 20 20 20 20 |200 | 00022488 20 20 20 20 20 20 01 00 | | 00022490 00 00 00 05 00 40 50 52 | @PR| 00022498 4f 47 52 41 4d 5f 30 2e |OGRAM_0.| 000224a0 4d 32 30 30 20 20 20 20 |M200 | 000224a8 20 20 01 01 00 00 00 06 | | 000224b0 00 80 50 52 4f 47 52 41 | PROGRA| 000224b8 4d 5f 31 2e 4d 32 30 30 |M_1.M200| 000224c0 20 20 20 20 20 20 01 01 | | 000224c8 00 00 00 07 00 80 50 52 | PR| 000224d0 4f 47 52 41 4d 5f 32 2e |OGRAM_2.| 000224d8 4d 32 30 30 20 20 20 20 |M200 | 000224e0 20 20 01 01 00 00 00 08 | | 000224e8 00 80 44 46 53 5f 42 4f | DFS_BO| 000224f0 4f 54 53 54 52 41 50 2e |OTSTRAP.| 000224f8 4d 32 30 30 20 20 00 00 |M200 | 00022500 00 00 00 62 00 01 45 52 | b ER| 00022508 52 4f 52 5f 4c 4f 47 20 |ROR_LOG | 00022510 20 20 20 20 20 20 20 20 | | 00022518 20 20 00 00 00 00 00 63 | c| 00022520 01 01 | | .XXX[0x2] 00022522 ; -------------------------------------------------------------------------------------- 00022522 ; OMSI PASCAL Function 00022522 ; <LVAR 0x008 4(r)> 00022522 ; -------------------------------------------------------------------------------------- 00022522 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 00022526 bf d5 | | CMPA.L (A5),A7 00022528 62 06 |b | BHI 0x22530 0002252a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002252e 4e 76 |Nv | TRAPV 00022530 de fc 00 4e | N | ADDA.W #0x4e,A7 00022534 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7) 00022538 72 01 |r | MOVEQ.L #0x01,D1 0002253a 41 fa dc 34 |A 4 | LEA.L 0x20170,A0 0002253e 70 04 |p | MOVEQ.L #0x04,D0 00022540 3f 20 |? | MOVE.W -(A0),-(A7) 00022542 51 c8 ff fc |Q | DBF D0,0x22540 00022546 51 4f |QO | SUBQ.L #0x8,A7 00022548 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002254c 3f 01 |? | MOVE.W D1,-(A7) 0002254e 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00022552 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022558 58 4f |XO | ADDQ.L #0x4,A7 0002255a 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 0002255e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022564 50 4f |PO | ADDQ.L #0x8,A7 00022566 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002256c de fc 00 0e | | ADDA.W #0xe,A7 00022570 4a 39 00 02 ef 34 |J9 4 | TST.B 0x2ef34 00022576 67 34 |g4 | BEQ 0x225ac 00022578 9e fc 00 2e | . | SUBA.W #0x2e,A7 0002257c 20 4f | O | MOVEA.L A7,A0 0002257e 43 fa db f0 |C | LEA.L 0x20170,A1 00022582 70 2c |p, | MOVEQ.L #0x2c,D0 00022584 10 d9 | | MOVE.B (A1)+,(A0)+ 00022586 51 c8 ff fc |Q | DBF D0,0x22584 0002258a 59 4f |YO | SUBQ.L #0x4,A7 0002258c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022590 3f 01 |? | MOVE.W D1,-(A7) 00022592 3f 3c 00 2d |?< - | MOVE.W #0x2d,-(A7) 00022596 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002259c 50 4f |PO | ADDQ.L #0x8,A7 0002259e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000225a4 de fc 00 32 | 2 | ADDA.W #0x32,A7 000225a8 60 fe |` | BRA 0x225a8 000225aa 60 0e |` | .XXX[0x2] 000225ac 2e 6d 00 08 |.m | MOVEA.L (A5+0x8),A7 000225b0 3c 7c 00 00 |<| | MOVEA.W #0x0,A6 000225b4 4e f9 00 02 91 e2 |N | JMP 0x291e2 000225ba 4c df 03 03 4e 5e |L N^ | .XXX[0x6] 000225c0 4e 75 |Nu | .XXX[0x2] 000225c2 ; -------------------------------------------------------------------------------------- 000225c2 ; OMSI PASCAL Function 000225c2 ; <LVAR 0x00c @ 4(r)> 000225c2 ; <LVAR 0x008 @ 4(r)> 000225c2 ; <LVAR -0x004 @ 1(r)> 000225c2 ; <LVAR -0x404 @> 000225c2 ; <LVAR -0x410 @ 4(r)> 000225c2 ; <LVAR -0x414 @ 4(r)> 000225c2 ; -------------------------------------------------------------------------------------- 000225c2 4e 56 fb 98 |NV | LINK.W A6,#0xfb98 000225c6 bf d5 | | CMPA.L (A5),A7 000225c8 62 06 |b | BHI 0x225d0 000225ca 44 fc 00 02 |D | MOVE.W #0x2,CCR 000225ce 4e 76 |Nv | TRAPV 000225d0 de fc 00 54 | T | ADDA.W #0x54,A7 000225d4 48 e7 f7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D3+D2+D1+D0,-(A7) 000225d8 45 ee ff fc |E | LEA.L (A6-0x4),A2 000225dc 47 ee fb ec |G | LEA.L (A6-0x414),A3 000225e0 49 ee fb f0 |I | LEA.L (A6-0x410),A4 000225e4 72 01 |r | MOVEQ.L #0x01,D1 000225e6 74 14 |t | MOVEQ.L #0x14,D2 000225e8 76 10 |v | MOVEQ.L #0x10,D3 000225ea 41 ee fb fc |A | LEA.L (A6-0x404),A0 000225ee 2f 08 |/ | MOVE.L A0,-(A7) 000225f0 2c 1f |, | MOVE.L (A7)+,D6 000225f2 7a 01 |z | MOVEQ.L #0x01,D5 000225f4 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000225f8 42 27 |B' | CLR.B -(A7) 000225fa 1f 01 | | MOVE.B D1,-(A7) 000225fc 48 78 00 00 |Hx | PEA.L 0x0 00022600 48 52 |HR | PEA.L (A2) 00022602 48 53 |HS | PEA.L (A3) 00022604 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 0002260a de c2 | | ADDA.W D2,A7 0002260c 4a 12 |J | TST.B (A2) 0002260e 67 04 |g | BEQ 0x22614 00022610 60 00 00 fe |` | BRA 0x22710 00022614 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022618 1f 05 | | MOVE.B D5,-(A7) 0002261a 1f 01 | | MOVE.B D1,-(A7) 0002261c 20 53 | S | MOVEA.L (A3),A0 0002261e 30 28 00 20 |0( | MOVE.W (A0+0x20),D0 00022622 48 c0 |H | EXTW.L D0 00022624 2f 00 |/ | MOVE.L D0,-(A7) 00022626 48 52 |HR | PEA.L (A2) 00022628 48 54 |HT | PEA.L (A4) 0002262a 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00022630 de c2 | | ADDA.W D2,A7 00022632 4a 12 |J | TST.B (A2) 00022634 67 04 |g | BEQ 0x2263a 00022636 60 00 00 c4 |` | BRA 0x226fc 0002263a 20 54 | T | MOVEA.L (A4),A0 0002263c 22 53 |"S | MOVEA.L (A3),A1 0002263e 11 69 00 3a 00 3a | i : : | MOVE.B (A1+0x3a),(A0+0x3a) 00022644 11 69 00 3b 00 3b | i ; ; | MOVE.B (A1+0x3b),(A0+0x3b) 0002264a 11 69 00 3c 00 3c | i < < | MOVE.B (A1+0x3c),(A0+0x3c) 00022650 11 69 00 3d 00 3d | i = = | MOVE.B (A1+0x3d),(A0+0x3d) 00022656 10 29 00 3f | ) ? | MOVE.B (A1+0x3f),D0 0002265a 02 28 00 fd 00 3f | ( ? | ANDI.B #0xfd,(A0+0x3f) 00022660 02 00 00 02 | | ANDI.B #0x02,D0 00022664 81 28 00 3f | ( ? | OR.B D0,(A0+0x3f) 00022668 10 29 00 3f | ) ? | MOVE.B (A1+0x3f),D0 0002266c 02 28 00 fb 00 3f | ( ? | ANDI.B #0xfb,(A0+0x3f) 00022672 02 00 00 04 | | ANDI.B #0x04,D0 00022676 81 28 00 3f | ( ? | OR.B D0,(A0+0x3f) 0002267a 11 41 00 4c | A L | MOVE.B D1,(A0+0x4c) 0002267e 30 28 00 20 |0( | MOVE.W (A0+0x20),D0 00022682 53 40 |S@ | SUBQ.W #0x1,D0 00022684 48 c0 |H | EXTW.L D0 00022686 2f 00 |/ | MOVE.L D0,-(A7) 00022688 7e 00 |~ | MOVEQ.L #0x00,D7 0002268a be 97 | | CMP.L (A7),D7 0002268c 6e 58 |nX | BGT 0x226e6 0002268e 2f 13 |/ | MOVE.L (A3),-(A7) 00022690 0c 87 00 00 40 00 | @ | CMPI.L #0x00004000,D7 00022696 63 02 |c | BLS 0x2269a 00022698 4e 4f |NO | TRAP #15 0002269a 3f 07 |? | MOVE.W D7,-(A7) 0002269c 42 67 |Bg | CLR.W -(A7) 0002269e 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 000226a2 1f 01 | | MOVE.B D1,-(A7) 000226a4 2f 06 |/ | MOVE.L D6,-(A7) 000226a6 48 52 |HR | PEA.L (A2) 000226a8 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 000226ae de c2 | | ADDA.W D2,A7 000226b0 4a 12 |J | TST.B (A2) 000226b2 67 04 |g | BEQ 0x226b8 000226b4 58 4f |XO | ADDQ.L #0x4,A7 000226b6 60 30 |`0 | BRA 0x226e8 000226b8 2f 14 |/ | MOVE.L (A4),-(A7) 000226ba 0c 87 00 00 40 00 | @ | CMPI.L #0x00004000,D7 000226c0 63 02 |c | BLS 0x226c4 000226c2 4e 4f |NO | TRAP #15 000226c4 3f 07 |? | MOVE.W D7,-(A7) 000226c6 42 67 |Bg | CLR.W -(A7) 000226c8 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 000226cc 1f 01 | | MOVE.B D1,-(A7) 000226ce 2f 06 |/ | MOVE.L D6,-(A7) 000226d0 48 52 |HR | PEA.L (A2) 000226d2 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 000226d8 de c2 | | ADDA.W D2,A7 000226da 4a 12 |J | TST.B (A2) 000226dc 67 04 |g | BEQ 0x226e2 000226de 58 4f |XO | ADDQ.L #0x4,A7 000226e0 60 06 |` | BRA 0x226e8 000226e2 52 87 |R | ADDQ.L #0x1,D7 000226e4 68 a4 |h | BVC 0x2268a 000226e6 58 4f |XO | ADDQ.L #0x4,A7 000226e8 42 27 |B' | CLR.B -(A7) 000226ea 1f 01 | | MOVE.B D1,-(A7) 000226ec 48 78 00 01 |Hx | PEA.L 0x1 000226f0 48 52 |HR | PEA.L (A2) 000226f2 48 54 |HT | PEA.L (A4) 000226f4 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000226fa de c3 | | ADDA.W D3,A7 000226fc 42 27 |B' | CLR.B -(A7) 000226fe 1f 01 | | MOVE.B D1,-(A7) 00022700 48 78 00 01 |Hx | PEA.L 0x1 00022704 48 52 |HR | PEA.L (A2) 00022706 48 53 |HS | PEA.L (A3) 00022708 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 0002270e de c3 | | ADDA.W D3,A7 00022710 48 6e 00 0c |Hn | PEA.L (A6+0xc) 00022714 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002271a 58 4f |XO | ADDQ.L #0x4,A7 0002271c 48 6e 00 08 |Hn | PEA.L (A6+0x8) 00022720 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022726 58 4f |XO | ADDQ.L #0x4,A7 00022728 4c df 1f ef |L | MOVEM.L (A7)+,D0+D1+D2+D3+D5+D6+D7+A0+A1+A2+A3+A4 0002272c 4e 5e |N^ | UNLK A6 0002272e 4e 75 |Nu | RTS 00022730 ; -------------------------------------------------------------------------------------- 00022730 ; OMSI PASCAL Function 00022730 ; <LVAR 0x00c 2(r)> 00022730 ; <LVAR 0x008 4(r)> 00022730 ; <LVAR -0x002 @ 1(r)> 00022730 ; <LVAR -0x006 2(w)> 00022730 ; <LVAR -0x008 2(w)> 00022730 ; <LVAR -0x00a 2(r)> 00022730 ; <LVAR -0x00c 2(r)> 00022730 ; <LVAR -0x00e 2(w)> 00022730 ; <LVAR -0x010 2(r)> 00022730 ; <LVAR -0x012 @ 2(r)> 00022730 ; -------------------------------------------------------------------------------------- 00022730 4e 56 ff 9c |NV | LINK.W A6,#0xff9c ; Spelunked 00022734 bf d5 | | CMPA.L (A5),A7 00022736 62 06 |b | BHI 0x2273e 00022738 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002273c 4e 76 |Nv | TRAPV 0002273e de fc 00 52 | R | ADDA.W #0x52,A7 00022742 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00022746 42 6e ff ee |Bn | CLR.W (A6-0x12) 0002274a 42 6e ff f0 |Bn | CLR.W (A6-0x10) 0002274e 3d 7c 00 02 ff f2 |=| | MOVE.W #0x2,(A6-0xe) 00022754 42 6e ff f4 |Bn | CLR.W (A6-0xc) 00022758 42 6e ff f6 |Bn | CLR.W (A6-0xa) 0002275c 30 39 00 02 97 10 |09 | MOVE.W 0x29710,D0 00022762 e1 40 | @ | ASL.W #0x8,D0 00022764 06 40 00 0e | @ | ADDI.W #0x000e,D0 00022768 0c 40 ff ff | @ | CMPI.W #0xffff,D0 0002276c 63 02 |c | BLS 0x22770 0002276e 4e 4f |NO | TRAP #15 00022770 3d 40 ff f8 |=@ | MOVE.W D0,(A6-0x8) 00022774 3d 6e 00 0c ff fa |=n | MOVE.W (A6+0xc),(A6-0x6) 0002277a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002277e 48 6e ff ee |Hn | PEA.L (A6-0x12) 00022782 22 48 |"H | MOVEA.L A0,A1 00022784 2f 09 |/ | MOVE.L A1,-(A7) 00022786 42 67 |Bg | CLR.W -(A7) 00022788 4e b9 00 01 02 04 |N | JSR KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W) 0002278e 50 4f |PO | ADDQ.L #0x8,A7 00022790 42 57 |BW | CLR.W (A7) 00022792 48 6e ff fe |Hn | PEA.L (A6-0x2) 00022796 4e b9 00 01 02 06 |N | JSR KC03_Wait_Disk_IO(a : W; VAR status : Byte) 0002279c 5c 4f |\O | ADDQ.L #0x6,A7 0002279e 02 50 00 ff | P | ANDI.W #0x00ff,(A0) 000227a2 4a 2e ff fe |J. | TST.B (A6-0x2) 000227a6 66 48 |fH | BNE 0x227f0 000227a8 9e fc 00 32 | 2 | SUBA.W #0x32,A7 000227ac 20 4f | O | MOVEA.L A7,A0 000227ae 43 fa d9 ee |C | LEA.L 0x2019e,A1 000227b2 70 30 |p0 | MOVEQ.L #0x30,D0 000227b4 10 d9 | | MOVE.B (A1)+,(A0)+ 000227b6 51 c8 ff fc |Q | DBF D0,0x227b4 000227ba 51 4f |QO | SUBQ.L #0x8,A7 000227bc 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000227c0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000227c4 3f 3c 00 31 |?< 1 | MOVE.W #0x31,-(A7) 000227c8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000227ce 58 4f |XO | ADDQ.L #0x4,A7 000227d0 42 80 |B | CLR.L D0 000227d2 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 000227d6 2f 00 |/ | MOVE.L D0,-(A7) 000227d8 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000227de 58 4f |XO | ADDQ.L #0x4,A7 000227e0 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000227e6 50 4f |PO | ADDQ.L #0x8,A7 000227e8 4e ba fd 38 |N 8 | JSR 0x22522 000227ec de fc 00 36 | 6 | ADDA.W #0x36,A7 000227f0 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 000227f4 4e 5e |N^ | UNLK A6 000227f6 4e 75 |Nu | RTS 000227f8 ; -------------------------------------------------------------------------------------- 000227f8 ; OMSI PASCAL Function 000227f8 ; <LVAR 0x008 2(r)> 000227f8 ; <LVAR -0x004 @ 2(r)> 000227f8 ; <LVAR -0x006 @ 2(r)> 000227f8 ; <LVAR -0x008 @ 2(r)> 000227f8 ; <LVAR -0x00a @ 2(r)> 000227f8 ; <LVAR -0x00c @ 2(r)> 000227f8 ; <LVAR -0x00e 2(rw)> 000227f8 ; <LVAR -0x48a @> 000227f8 ; <LVAR -0x48e @ 2(r)> 000227f8 ; <LVAR -0x906 @> 000227f8 ; <LVAR -0x90a @> 000227f8 ; -------------------------------------------------------------------------------------- 000227f8 4e 56 f6 94 |NV | LINK.W A6,#0xf694 000227fc bf d5 | | CMPA.L (A5),A7 000227fe 62 06 |b | BHI 0x22806 00022800 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022804 4e 76 |Nv | TRAPV 00022806 de fc 00 62 | b | ADDA.W #0x62,A7 0002280a 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002280e 45 ee ff f2 |E | LEA.L (A6-0xe),A2 00022812 47 f9 00 02 97 02 |G | LEA.L 0x29702,A3 00022818 49 fa ff 16 |I | LEA.L 0x22730,A4 0002281c 24 3c 00 00 ff ff |$< | MOVE.L #0xffff,D2 00022822 76 03 |v | MOVEQ.L #0x03,D3 00022824 38 3c 00 ff |8< | MOVE.W #0xff,D4 00022828 55 4f |UO | SUBQ.L #0x2,A7 0002282a 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00022830 4a 1f |J | TST.B (A7)+ 00022832 67 00 01 04 |g | BEQ 0x22938 00022836 34 ae 00 08 |4 | MOVE.W (A6+0x8),(A2) 0002283a c7 52 | R | AND.W D3,(A2) 0002283c 30 3c 02 d0 |0< | MOVE.W #0x2d0,D0 00022840 d0 52 | R | ADD.W (A2),D0 00022842 b0 42 | B | CMP.W D2,D0 00022844 63 02 |c | BLS 0x22848 00022846 4e 4f |NO | TRAP #15 00022848 3f 00 |? | MOVE.W D0,-(A7) 0002284a 48 6e ff f4 |Hn | PEA.L (A6-0xc) 0002284e 4e 94 |N | JSR (A4) 00022850 5c 4f |\O | ADDQ.L #0x6,A7 00022852 30 3c 03 50 |0< P | MOVE.W #0x350,D0 00022856 d0 52 | R | ADD.W (A2),D0 00022858 b0 42 | B | CMP.W D2,D0 0002285a 63 02 |c | BLS 0x2285e 0002285c 4e 4f |NO | TRAP #15 0002285e 3f 00 |? | MOVE.W D0,-(A7) 00022860 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00022864 4e 94 |N | JSR (A4) 00022866 5c 4f |\O | ADDQ.L #0x6,A7 00022868 30 3c 01 d0 |0< | MOVE.W #0x1d0,D0 0002286c d0 52 | R | ADD.W (A2),D0 0002286e b0 42 | B | CMP.W D2,D0 00022870 63 02 |c | BLS 0x22874 00022872 4e 4f |NO | TRAP #15 00022874 3f 00 |? | MOVE.W D0,-(A7) 00022876 48 6e ff f8 |Hn | PEA.L (A6-0x8) 0002287a 4e 94 |N | JSR (A4) 0002287c 5c 4f |\O | ADDQ.L #0x6,A7 0002287e 30 3c 02 50 |0< P | MOVE.W #0x250,D0 00022882 d0 52 | R | ADD.W (A2),D0 00022884 b0 42 | B | CMP.W D2,D0 00022886 63 02 |c | BLS 0x2288a 00022888 4e 4f |NO | TRAP #15 0002288a 3f 00 |? | MOVE.W D0,-(A7) 0002288c 48 6e ff fa |Hn | PEA.L (A6-0x6) 00022890 4e 94 |N | JSR (A4) 00022892 5c 4f |\O | ADDQ.L #0x6,A7 00022894 30 3c 03 10 |0< | MOVE.W #0x310,D0 00022898 d0 52 | R | ADD.W (A2),D0 0002289a b0 42 | B | CMP.W D2,D0 0002289c 63 02 |c | BLS 0x228a0 0002289e 4e 4f |NO | TRAP #15 000228a0 3f 00 |? | MOVE.W D0,-(A7) 000228a2 48 6e ff fc |Hn | PEA.L (A6-0x4) 000228a6 4e 94 |N | JSR (A4) 000228a8 5c 4f |\O | ADDQ.L #0x6,A7 000228aa 42 79 00 02 96 fc |By | CLR.W 0x296fc 000228b0 42 80 |B | CLR.L D0 000228b2 30 2e ff fa |0. | MOVE.W (A6-0x6),D0 000228b6 e1 80 | | ASL.L #0x8,D0 000228b8 42 81 |B | CLR.L D1 000228ba 32 2e ff f8 |2. | MOVE.W (A6-0x8),D1 000228be d0 81 | | ADD.L D1,D0 000228c0 b0 82 | | CMP.L D2,D0 000228c2 63 02 |c | BLS 0x228c6 000228c4 4e 4f |NO | TRAP #15 000228c6 33 c0 00 02 96 fe |3 | MOVE.W D0,0x296fe 000228cc 30 2e ff f6 |0. | MOVE.W (A6-0xa),D0 000228d0 41 84 |A | CHK.W D4,D0 000228d2 33 c0 00 02 97 00 |3 | MOVE.W D0,0x29700 000228d8 30 2e ff f4 |0. | MOVE.W (A6-0xc),D0 000228dc 41 84 |A | CHK.W D4,D0 000228de 36 80 |6 | MOVE.W D0,(A3) 000228e0 7c 03 || | MOVEQ.L #0x03,D6 000228e2 30 06 |0 | MOVE.W D6,D0 000228e4 e5 40 | @ | ASL.W #0x2,D0 000228e6 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 000228ec 32 30 00 10 |20 | MOVE.W (A0+D0.W+#0x10),D1 000228f0 b2 79 00 02 96 fe | y | CMP.W 0x296fe,D1 000228f6 66 38 |f8 | BNE 0x22930 000228f8 42 81 |B | CLR.L D1 000228fa 12 30 00 12 | 0 | MOVE.B (A0+D0.W+#0x12),D1 000228fe b2 79 00 02 97 00 | y | CMP.W 0x29700,D1 00022904 66 2a |f* | BNE 0x22930 00022906 42 81 |B | CLR.L D1 00022908 12 30 00 13 | 0 | MOVE.B (A0+D0.W+#0x13),D1 0002290c b2 53 | S | CMP.W (A3),D1 0002290e 67 1a |g | BEQ 0x2292a 00022910 30 2e ff fc |0. | MOVE.W (A6-0x4),D0 00022914 0c 40 00 01 | @ | CMPI.W #0x0001,D0 00022918 66 16 |f | BNE 0x22930 0002291a 30 06 |0 | MOVE.W D6,D0 0002291c e3 40 | @ | ASL.W #0x1,D0 0002291e 41 fa fa 5c |A \ | LEA.L 0x2237c,A0 00022922 32 13 |2 | MOVE.W (A3),D1 00022924 b2 70 00 00 | p | CMP.W (A0+D0.W),D1 00022928 66 06 |f | BNE 0x22930 0002292a 33 c6 00 02 96 fc |3 | MOVE.W D6,0x296fc 00022930 53 46 |SF | SUBQ.W #0x1,D6 00022932 6c ae |l | BGE 0x228e2 00022934 60 00 01 a4 |` | BRA 0x22ada 00022938 7e 00 |~ | MOVEQ.L #0x00,D7 0002293a 34 ae 00 08 |4 | MOVE.W (A6+0x8),(A2) 0002293e c7 52 | R | AND.W D3,(A2) 00022940 be 82 | | CMP.L D2,D7 00022942 63 02 |c | BLS 0x22946 00022944 4e 4f |NO | TRAP #15 00022946 3f 07 |? | MOVE.W D7,-(A7) 00022948 48 6e fb 72 |Hn r | PEA.L (A6-0x48e) 0002294c 4e 94 |N | JSR (A4) 0002294e 5c 4f |\O | ADDQ.L #0x6,A7 00022950 0c 87 00 00 04 77 | w | CMPI.L #0x00000477,D7 00022956 63 02 |c | BLS 0x2295a 00022958 4e 4f |NO | TRAP #15 0002295a 41 ee f6 f6 |A | LEA.L (A6-0x90a),A0 0002295e 41 f0 78 00 |A x | LEA.L (A0+D7.L),A0 00022962 30 2e fb 72 |0. r | MOVE.W (A6-0x48e),D0 00022966 41 84 |A | CHK.W D4,D0 00022968 11 40 04 80 | @ | MOVE.B D0,(A0+0x480) 0002296c 52 87 |R | ADDQ.L #0x1,D7 0002296e 0c 87 00 00 04 00 | | CMPI.L #0x00000400,D7 00022974 66 ca |f | BNE 0x22940 00022976 55 4f |UO | SUBQ.L #0x2,A7 00022978 4e b9 00 01 06 10 |N | JSR Is_machine_type_one_or_three() : Bool 0002297e 4a 1f |J | TST.B (A7)+ 00022980 67 36 |g6 | BEQ 0x229b8 00022982 be 82 | | CMP.L D2,D7 00022984 63 02 |c | BLS 0x22988 00022986 4e 4f |NO | TRAP #15 00022988 3f 07 |? | MOVE.W D7,-(A7) 0002298a 48 6e fb 72 |Hn r | PEA.L (A6-0x48e) 0002298e 4e 94 |N | JSR (A4) 00022990 5c 4f |\O | ADDQ.L #0x6,A7 00022992 0c 87 00 00 04 77 | w | CMPI.L #0x00000477,D7 00022998 63 02 |c | BLS 0x2299c 0002299a 4e 4f |NO | TRAP #15 0002299c 41 ee f6 f6 |A | LEA.L (A6-0x90a),A0 000229a0 41 f0 78 00 |A x | LEA.L (A0+D7.L),A0 000229a4 30 2e fb 72 |0. r | MOVE.W (A6-0x48e),D0 000229a8 41 84 |A | CHK.W D4,D0 000229aa 11 40 04 80 | @ | MOVE.B D0,(A0+0x480) 000229ae 52 87 |R | ADDQ.L #0x1,D7 000229b0 0c 87 00 00 04 78 | x | CMPI.L #0x00000478,D7 000229b6 66 ca |f | BNE 0x22982 000229b8 41 ee f6 fa |A | LEA.L (A6-0x906),A0 000229bc 43 ee fb 76 |C v | LEA.L (A6-0x48a),A1 000229c0 30 3c 01 1d |0< | MOVE.W #0x11d,D0 000229c4 20 d9 | | MOVE.L (A1)+,(A0)+ 000229c6 51 c8 ff fc |Q | DBF D0,0x229c4 000229ca 30 12 |0 | MOVE.W (A2),D0 000229cc 41 bc 00 7f |A | CHK.W #0x7f,D0 000229d0 41 ee f6 f6 |A | LEA.L (A6-0x90a),A0 000229d4 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 000229d8 42 80 |B | CLR.L D0 000229da 10 28 02 54 | ( T | MOVE.B (A0+0x254),D0 000229de e1 40 | @ | ASL.W #0x8,D0 000229e0 42 81 |B | CLR.L D1 000229e2 12 28 01 d4 | ( | MOVE.B (A0+0x1d4),D1 000229e6 d2 40 | @ | ADD.W D0,D1 000229e8 33 c1 00 02 96 fe |3 | MOVE.W D1,0x296fe 000229ee 42 80 |B | CLR.L D0 000229f0 10 28 03 54 | ( T | MOVE.B (A0+0x354),D0 000229f4 33 c0 00 02 97 00 |3 | MOVE.W D0,0x29700 000229fa 42 80 |B | CLR.L D0 000229fc 10 28 02 d4 | ( | MOVE.B (A0+0x2d4),D0 00022a00 36 80 |6 | MOVE.W D0,(A3) 00022a02 42 79 00 02 96 fc |By | CLR.W 0x296fc 00022a08 55 4f |UO | SUBQ.L #0x2,A7 00022a0a 4e b9 00 01 06 10 |N | JSR Is_machine_type_one_or_three() : Bool 00022a10 4a 1f |J | TST.B (A7)+ 00022a12 67 00 00 8c |g | BEQ 0x22aa0 00022a16 41 fa d7 d6 |A | LEA.L 0x201ee,A0 00022a1a 70 0e |p | MOVEQ.L #0x0e,D0 00022a1c 3f 20 |? | MOVE.W -(A0),-(A7) 00022a1e 51 c8 ff fc |Q | DBF D0,0x22a1c 00022a22 59 4f |YO | SUBQ.L #0x4,A7 00022a24 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022a28 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022a2c 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00022a30 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022a36 50 4f |PO | ADDQ.L #0x8,A7 00022a38 23 df 00 02 97 04 |# | MOVE.L (A7)+,0x29704 00022a3e de fc 00 1e | | ADDA.W #0x1e,A7 00022a42 7a 00 |z | MOVEQ.L #0x00,D5 00022a44 20 79 00 02 97 04 | y | MOVEA.L 0x29704,A0 00022a4a 20 05 | | MOVE.L D5,D0 00022a4c 52 80 |R | ADDQ.L #0x1,D0 00022a4e 53 80 |S | SUBQ.L #0x1,D0 00022a50 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 00022a56 63 02 |c | BLS 0x22a5a 00022a58 4e 4f |NO | TRAP #15 00022a5a 32 12 |2 | MOVE.W (A2),D1 00022a5c 43 83 |C | CHK.W D3,D1 00022a5e c3 fc 00 1e | | MULS.W #0x1e,D1 00022a62 43 ee f6 f6 |C | LEA.L (A6-0x90a),A1 00022a66 0c 85 00 00 00 1d | | CMPI.L #0x0000001d,D5 00022a6c 63 02 |c | BLS 0x22a70 00022a6e 4e 4f |NO | TRAP #15 00022a70 43 f1 10 00 |C | LEA.L (A1+D1.W),A1 00022a74 43 f1 58 00 |C X | LEA.L (A1+D5.L),A1 00022a78 11 a9 04 04 08 02 | | MOVE.B (A1+0x404),(A0+D0.L+#0x2) 00022a7e 52 85 |R | ADDQ.L #0x1,D5 00022a80 0c 85 00 00 00 1d | | CMPI.L #0x0000001d,D5 00022a86 6f bc |o | BLE 0x22a44 00022a88 59 4f |YO | SUBQ.L #0x4,A7 00022a8a 2f 39 00 02 97 04 |/9 | MOVE.L 0x29704,-(A7) 00022a90 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00022a96 58 4f |XO | ADDQ.L #0x4,A7 00022a98 23 df 00 02 97 04 |# | MOVE.L (A7)+,0x29704 00022a9e 60 3a |`: | BRA 0x22ada 00022aa0 7c 05 || | MOVEQ.L #0x05,D6 00022aa2 30 06 |0 | MOVE.W D6,D0 00022aa4 e5 40 | @ | ASL.W #0x2,D0 00022aa6 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00022aac 32 30 00 10 |20 | MOVE.W (A0+D0.W+#0x10),D1 00022ab0 b2 79 00 02 96 fe | y | CMP.W 0x296fe,D1 00022ab6 66 1e |f | BNE 0x22ad6 00022ab8 42 81 |B | CLR.L D1 00022aba 12 30 00 12 | 0 | MOVE.B (A0+D0.W+#0x12),D1 00022abe b2 79 00 02 97 00 | y | CMP.W 0x29700,D1 00022ac4 66 10 |f | BNE 0x22ad6 00022ac6 42 81 |B | CLR.L D1 00022ac8 12 30 00 13 | 0 | MOVE.B (A0+D0.W+#0x13),D1 00022acc b2 53 | S | CMP.W (A3),D1 00022ace 66 06 |f | BNE 0x22ad6 00022ad0 33 c6 00 02 96 fc |3 | MOVE.W D6,0x296fc 00022ad6 53 46 |SF | SUBQ.W #0x1,D6 00022ad8 6c c8 |l | BGE 0x22aa2 00022ada 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00022ade 4e 5e |N^ | UNLK A6 00022ae0 4e 75 |Nu | RTS 00022ae2 ; -------------------------------------------------------------------------------------- 00022ae2 ; OMSI PASCAL Function 00022ae2 ; <LVAR 0x00a 4(r)> 00022ae2 ; <LVAR 0x008 1(r)> 00022ae2 ; -------------------------------------------------------------------------------------- 00022ae2 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 ; Spelunked 00022ae6 bf d5 | | CMPA.L (A5),A7 00022ae8 62 06 |b | BHI 0x22af0 00022aea 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022aee 4e 76 |Nv | TRAPV 00022af0 de fc 00 2a | * | ADDA.W #0x2a,A7 00022af4 48 e7 d8 c0 |H | MOVEM.L A1+A0+D4+D3+D1+D0,-(A7) 00022af8 41 ec 00 0e |A | LEA.L (A4+0xe),A0 00022afc 43 f9 00 01 02 c0 |C | LEA.L AppendChar(MOD b : String; a : char),A1 00022b02 72 30 |r0 | MOVEQ.L #0x30,D1 00022b04 28 2e 00 0a |(. | MOVE.L (A6+0xa),D4 00022b08 76 0a |v | MOVEQ.L #0x0a,D3 00022b0a 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00022b10 2f 10 |/ | MOVE.L (A0),-(A7) 00022b12 20 04 | | MOVE.L D4,D0 00022b14 d0 81 | | ADD.L D1,D0 00022b16 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 00022b1c 63 02 |c | BLS 0x22b20 00022b1e 4e 4f |NO | TRAP #15 00022b20 1f 00 | | MOVE.B D0,-(A7) 00022b22 4e 91 |N | JSR (A1) 00022b24 54 4f |TO | ADDQ.L #0x2,A7 00022b26 2e 90 |. | MOVE.L (A0),(A7) 00022b28 d6 41 | A | ADD.W D1,D3 00022b2a 1f 03 | | MOVE.B D3,-(A7) 00022b2c 4e 91 |N | JSR (A1) 00022b2e 5c 4f |\O | ADDQ.L #0x6,A7 00022b30 4a 2e 00 08 |J. | TST.B (A6+0x8) 00022b34 67 0a |g | BEQ 0x22b40 00022b36 2f 10 |/ | MOVE.L (A0),-(A7) 00022b38 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00022b3c 4e 91 |N | JSR (A1) 00022b3e 5c 4f |\O | ADDQ.L #0x6,A7 00022b40 4c df 03 1b |L | MOVEM.L (A7)+,D0+D1+D3+D4+A0+A1 00022b44 4e 5e |N^ | UNLK A6 00022b46 4e 75 |Nu | RTS 00022b48 ; -------------------------------------------------------------------------------------- 00022b48 ; OMSI PASCAL Function 00022b48 ; <LVAR 0x00c 2(r)> 00022b48 ; <LVAR 0x008 2(r)> 00022b48 ; <LVAR -0x006 4(rw)> 00022b48 ; <LVAR -0x00a 4(rw)> 00022b48 ; <LVAR -0x014 @> 00022b48 ; -------------------------------------------------------------------------------------- 00022b48 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 00022b4c bf d5 | | CMPA.L (A5),A7 00022b4e 62 06 |b | BHI 0x22b56 00022b50 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022b54 4e 76 |Nv | TRAPV 00022b56 de fc 00 44 | D | ADDA.W #0x44,A7 00022b5a 48 e7 e7 c8 |H | MOVEM.L A4+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00022b5e 41 ee ff ec |A | LEA.L (A6-0x14),A0 00022b62 43 fa ff 7e |C ~ | LEA.L 0x22ae2,A1 00022b66 74 3a |t: | MOVEQ.L #0x3a,D2 00022b68 42 80 |B | CLR.L D0 00022b6a 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00022b6e 42 81 |B | CLR.L D1 00022b70 32 2e 00 0c |2. | MOVE.W (A6+0xc),D1 00022b74 44 81 |D | NEG.L D1 00022b76 d2 80 | | ADD.L D0,D1 00022b78 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 00022b7e 63 02 |c | BLS 0x22b82 00022b80 4e 4f |NO | TRAP #15 00022b82 3e 01 |> | MOVE.W D1,D7 00022b84 42 80 |B | CLR.L D0 00022b86 30 07 |0 | MOVE.W D7,D0 00022b88 80 fc 07 08 | | DIVU.W #0x708,D0 00022b8c 42 81 |B | CLR.L D1 00022b8e 32 00 |2 | MOVE.W D0,D1 00022b90 2c 01 |, | MOVE.L D1,D6 00022b92 48 40 |H@ | SWAP.W D0 00022b94 3e 00 |> | MOVE.W D0,D7 00022b96 42 80 |B | CLR.L D0 00022b98 30 07 |0 | MOVE.W D7,D0 00022b9a 80 fc 00 1e | | DIVU.W #0x1e,D0 00022b9e 42 81 |B | CLR.L D1 00022ba0 32 00 |2 | MOVE.W D0,D1 00022ba2 2a 01 |* | MOVE.L D1,D5 00022ba4 48 40 |H@ | SWAP.W D0 00022ba6 3e 00 |> | MOVE.W D0,D7 00022ba8 42 80 |B | CLR.L D0 00022baa 30 07 |0 | MOVE.W D7,D0 00022bac e3 80 | | ASL.L #0x1,D0 00022bae 2d 40 ff f6 |-@ | MOVE.L D0,(A6-0xa) 00022bb2 2f 3a d6 46 |/: F | MOVE.L 0x201fa,-(A7) 00022bb6 2f 3a d6 3e |/: > | MOVE.L 0x201f6,-(A7) 00022bba 2f 3a d6 36 |/: 6 | MOVE.L 0x201f2,-(A7) 00022bbe 2f 3a d6 2e |/: . | MOVE.L 0x201ee,-(A7) 00022bc2 59 4f |YO | SUBQ.L #0x4,A7 00022bc4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022bc8 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022bcc 3f 3c 00 10 |?< | MOVE.W #0x10,-(A7) 00022bd0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022bd6 50 4f |PO | ADDQ.L #0x8,A7 00022bd8 2d 5f ff fa |-_ | MOVE.L (A7)+,(A6-0x6) 00022bdc de fc 00 0c | | ADDA.W #0xc,A7 00022be0 2e 86 |. | MOVE.L D6,(A7) 00022be2 1f 02 | | MOVE.B D2,-(A7) 00022be4 28 48 |(H | MOVEA.L A0,A4 00022be6 4e 91 |N | JSR (A1) 00022be8 54 4f |TO | ADDQ.L #0x2,A7 00022bea 2e 85 |. | MOVE.L D5,(A7) 00022bec 1f 02 | | MOVE.B D2,-(A7) 00022bee 28 48 |(H | MOVEA.L A0,A4 00022bf0 4e 91 |N | JSR (A1) 00022bf2 54 4f |TO | ADDQ.L #0x2,A7 00022bf4 2e ae ff f6 |. | MOVE.L (A6-0xa),(A7) 00022bf8 42 27 |B' | CLR.B -(A7) 00022bfa 28 48 |(H | MOVEA.L A0,A4 00022bfc 4e 91 |N | JSR (A1) 00022bfe 54 4f |TO | ADDQ.L #0x2,A7 00022c00 2e ae ff fa |. | MOVE.L (A6-0x6),(A7) 00022c04 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022c0a 58 4f |XO | ADDQ.L #0x4,A7 00022c0c 4c df 13 e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A4 00022c10 4e 5e |N^ | UNLK A6 00022c12 4e 75 |Nu | RTS 00022c14 ; -------------------------------------------------------------------------------------- 00022c14 ; OMSI PASCAL Function 00022c14 ; -------------------------------------------------------------------------------------- 00022c14 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00022c18 bf d5 | | CMPA.L (A5),A7 00022c1a 62 06 |b | BHI 0x22c22 00022c1c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022c20 4e 76 |Nv | TRAPV 00022c22 de fc 00 30 | 0 | ADDA.W #0x30,A7 00022c26 48 e7 e3 80 |H | MOVEM.L A0+D7+D6+D2+D1+D0,-(A7) 00022c2a 74 1d |t | MOVEQ.L #0x1d,D2 00022c2c 7e 01 |~ | MOVEQ.L #0x01,D7 00022c2e 20 07 | | MOVE.L D7,D0 00022c30 e3 80 | | ASL.L #0x1,D0 00022c32 22 00 |" | MOVE.L D0,D1 00022c34 53 81 |S | SUBQ.L #0x1,D1 00022c36 b2 82 | | CMP.L D2,D1 00022c38 63 02 |c | BLS 0x22c3c 00022c3a 4e 4f |NO | TRAP #15 00022c3c 41 f9 00 02 97 1e |A | LEA.L 0x2971e,A0 00022c42 1c 30 18 36 | 0 6 | MOVE.B (A0+D1.L+#0x36),D6 00022c46 53 80 |S | SUBQ.L #0x1,D0 00022c48 53 80 |S | SUBQ.L #0x1,D0 00022c4a b0 82 | | CMP.L D2,D0 00022c4c 63 02 |c | BLS 0x22c50 00022c4e 4e 4f |NO | TRAP #15 00022c50 11 b0 08 36 18 36 | 6 6 | MOVE.B (A0+D0.L+#0x36),(A0+D1.L+#0x36) 00022c56 11 86 08 36 | 6 | MOVE.B D6,(A0+D0.L+#0x36) 00022c5a 52 87 |R | ADDQ.L #0x1,D7 00022c5c 0c 87 00 00 00 0f | | CMPI.L #0x0000000f,D7 00022c62 6f ca |o | BLE 0x22c2e 00022c64 4c df 01 c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0 00022c68 4e 5e |N^ | UNLK A6 00022c6a 4e 75 |Nu | RTS 00022c6c ; -------------------------------------------------------------------------------------- 00022c6c ; OMSI PASCAL Function 00022c6c ; <LVAR 0x008 1(rw)> 00022c6c ; <LVAR -0x004 @ 2(r)> 00022c6c ; <LVAR -0x01c 2(r)> 00022c6c ; -------------------------------------------------------------------------------------- 00022c6c 4e 56 ff 8a |NV | LINK.W A6,#0xff8a 00022c70 bf d5 | | CMPA.L (A5),A7 00022c72 62 06 |b | BHI 0x22c7a 00022c74 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022c78 4e 76 |Nv | TRAPV 00022c7a de fc 00 42 | B | ADDA.W #0x42,A7 00022c7e 48 e7 ff c0 |H | MOVEM.L A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022c82 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00022c86 72 05 |r | MOVEQ.L #0x05,D1 00022c88 74 01 |t | MOVEQ.L #0x01,D2 00022c8a 7a 02 |z | MOVEQ.L #0x02,D5 00022c8c 55 4f |UO | SUBQ.L #0x2,A7 00022c8e 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00022c94 4a 1f |J | TST.B (A7)+ 00022c96 67 3a |g: | BEQ 0x22cd2 00022c98 2e 3c 00 00 93 03 |.< | MOVE.L #0x9303,D7 00022c9e e1 87 | | ASL.L #0x8,D7 00022ca0 e1 87 | | ASL.L #0x8,D7 00022ca2 06 87 00 00 e0 00 | | ADDI.L #0x0000e000,D7 00022ca8 2f 07 |/ | MOVE.L D7,-(A7) 00022caa 3f 01 |? | MOVE.W D1,-(A7) 00022cac 41 ee ff fc |A | LEA.L (A6-0x4),A0 00022cb0 2f 08 |/ | MOVE.L A0,-(A7) 00022cb2 3f 02 |? | MOVE.W D2,-(A7) 00022cb4 3f 05 |? | MOVE.W D5,-(A7) 00022cb6 4e b9 00 01 02 3a |N : | JSR KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word 00022cbc de fc 00 0e | | ADDA.W #0xe,A7 00022cc0 42 11 |B | CLR.B (A1) 00022cc2 30 2e ff fc |0. | MOVE.W (A6-0x4),D0 00022cc6 02 40 00 80 | @ | ANDI.W #0x0080,D0 00022cca 66 02 |f | BNE 0x22cce 00022ccc 52 11 |R | ADDQ.B #0x1,(A1) 00022cce 60 00 00 98 |` | BRA 0x22d68 00022cd2 2e 3c 00 00 93 03 |.< | MOVE.L #0x9303,D7 00022cd8 e1 87 | | ASL.L #0x8,D7 00022cda e1 87 | | ASL.L #0x8,D7 00022cdc 30 39 00 02 97 10 |09 | MOVE.W 0x29710,D0 00022ce2 e4 40 | @ | ASR.W #0x2,D0 00022ce4 0c 40 00 03 | @ | CMPI.W #0x0003,D0 00022ce8 63 02 |c | BLS 0x22cec 00022cea 4e 4e |NN | TRAP #14 00022cec d0 40 | @ | ADD.W D0,D0 00022cee 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00022cf6 00 08 | | .CONST 0x8 ; [0x0] -> 0x22cfe 00022cf8 00 10 | | .CONST 0x10 ; [0x1] -> 0x22d06 00022cfa 00 18 | | .CONST 0x18 ; [0x2] -> 0x22d0e 00022cfc 00 20 | | .CONST 0x20 ; [0x3] -> 0x22d16 00022cfe switch@0x22cee[0x0]: 00022cfe 06 87 00 00 fd c0 | | ADDI.L #0x0000fdc0,D7 00022d04 60 16 |` | BRA 0x22d1c 00022d06 switch@0x22cee[0x1]: 00022d06 06 87 00 00 fc c0 | | ADDI.L #0x0000fcc0,D7 00022d0c 60 0e |` | BRA 0x22d1c 00022d0e switch@0x22cee[0x2]: 00022d0e 06 87 00 00 fc 80 | | ADDI.L #0x0000fc80,D7 00022d14 60 06 |` | BRA 0x22d1c 00022d16 switch@0x22cee[0x3]: 00022d16 06 87 00 00 fc 40 | @ | ADDI.L #0x0000fc40,D7 00022d1c 7c 00 || | MOVEQ.L #0x00,D6 00022d1e 78 02 |x | MOVEQ.L #0x02,D4 00022d20 26 06 |& | MOVE.L D6,D3 00022d22 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00022d28 2f 07 |/ | MOVE.L D7,-(A7) 00022d2a d9 97 | | ADD.L D4,(A7) 00022d2c 3f 01 |? | MOVE.W D1,-(A7) 00022d2e 0c 86 00 00 00 13 | | CMPI.L #0x00000013,D6 00022d34 63 02 |c | BLS 0x22d38 00022d36 4e 4f |NO | TRAP #15 00022d38 20 06 | | MOVE.L D6,D0 00022d3a e3 80 | | ASL.L #0x1,D0 00022d3c 41 f6 08 d0 |A | LEA.L (A6+D0.L-#0x30),A0 00022d40 2f 08 |/ | MOVE.L A0,-(A7) 00022d42 3f 02 |? | MOVE.W D2,-(A7) 00022d44 3f 05 |? | MOVE.W D5,-(A7) 00022d46 4e b9 00 01 02 3a |N : | JSR KC1d_BusCopy(src : Pointer; sfc : Word; dst : Pointer; dfc : Word; len : Word 00022d4c de fc 00 0e | | ADDA.W #0xe,A7 00022d50 52 86 |R | ADDQ.L #0x1,D6 00022d52 0c 86 00 00 00 13 | | CMPI.L #0x00000013,D6 00022d58 6f c4 |o | BLE 0x22d1e 00022d5a 42 11 |B | CLR.B (A1) 00022d5c 30 2e ff e4 |0. | MOVE.W (A6-0x1c),D0 00022d60 02 40 00 10 | @ | ANDI.W #0x0010,D0 00022d64 67 02 |g | BEQ 0x22d68 00022d66 52 11 |R | ADDQ.B #0x1,(A1) 00022d68 4c df 03 ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1 00022d6c 4e 5e |N^ | UNLK A6 00022d6e 4e 75 |Nu | RTS 00022d70 ; -------------------------------------------------------------------------------------- 00022d70 ; OMSI PASCAL Function 00022d70 ; <LVAR 0x008 1(r)> 00022d70 ; <LVAR -0x01c @ 1(r)> 00022d70 ; <LVAR -0x028 @ 2(r)> 00022d70 ; <LVAR -0x02a 2(r)> 00022d70 ; <LVAR -0x02c 2(r)> 00022d70 ; <LVAR -0x02e 2(w)> 00022d70 ; <LVAR -0x030 2(r)> 00022d70 ; <LVAR -0x032 2(r)> 00022d70 ; <LVAR -0x034 2(w)> 00022d70 ; <LVAR -0x036 2(r)> 00022d70 ; <LVAR -0x038 @ 2(r)> 00022d70 ; -------------------------------------------------------------------------------------- 00022d70 4e 56 ff 2e |NV . | LINK.W A6,#0xff2e 00022d74 bf d5 | | CMPA.L (A5),A7 00022d76 62 06 |b | BHI 0x22d7e 00022d78 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022d7c 4e 76 |Nv | TRAPV 00022d7e de fc 00 98 | | ADDA.W #0x98,A7 00022d82 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00022d86 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00022d8c 47 f9 00 02 97 08 |G | LEA.L 0x29708,A3 00022d92 49 f9 00 02 97 10 |I | LEA.L 0x29710,A4 00022d98 74 01 |t | MOVEQ.L #0x01,D2 00022d9a 76 1a |v | MOVEQ.L #0x1a,D3 00022d9c 78 0c |x | MOVEQ.L #0x0c,D4 00022d9e 7a 14 |z | MOVEQ.L #0x14,D5 00022da0 7c 18 || | MOVEQ.L #0x18,D6 00022da2 7e 10 |~ | MOVEQ.L #0x10,D7 00022da4 42 27 |B' | CLR.B -(A7) 00022da6 4e b9 00 01 03 ac |N | JSR Set_is_open_ERROR_LOG(a : Bool) 00022dac 54 4f |TO | ADDQ.L #0x2,A7 00022dae 23 c2 00 02 00 20 |# | MOVE.L D2,0x20020 00022db4 23 c2 00 01 00 26 |# & | MOVE.L D2,0x10026 00022dba 9e fc 00 3e | > | SUBA.W #0x3e,A7 00022dbe 20 4f | O | MOVEA.L A7,A0 00022dc0 43 fa d4 3c |C < | LEA.L 0x201fe,A1 00022dc4 70 3c |p< | MOVEQ.L #0x3c,D0 00022dc6 10 d9 | | MOVE.B (A1)+,(A0)+ 00022dc8 51 c8 ff fc |Q | DBF D0,0x22dc6 00022dcc 51 4f |QO | SUBQ.L #0x8,A7 00022dce 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022dd2 3f 02 |? | MOVE.W D2,-(A7) 00022dd4 3f 3c 00 3d |?< = | MOVE.W #0x3d,-(A7) 00022dd8 4e 92 |N | JSR (A2) 00022dda 50 4f |PO | ADDQ.L #0x8,A7 00022ddc 48 78 00 00 |Hx | PEA.L 0x0 00022de0 48 78 00 0f |Hx | PEA.L 0xf 00022de4 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 00022dea de c4 | | ADDA.W D4,A7 00022dec 20 1f | | MOVE.L (A7)+,D0 00022dee 0c 80 00 00 00 0f | | CMPI.L #0x0000000f,D0 00022df4 63 02 |c | BLS 0x22df8 00022df6 4e 4f |NO | TRAP #15 00022df8 de fc 00 3e | > | ADDA.W #0x3e,A7 00022dfc 38 80 |8 | MOVE.W D0,(A4) 00022dfe 42 6e ff c8 |Bn | CLR.W (A6-0x38) 00022e02 42 6e ff ca |Bn | CLR.W (A6-0x36) 00022e06 3d 7c 00 02 ff cc |=| | MOVE.W #0x2,(A6-0x34) 00022e0c 42 6e ff ce |Bn | CLR.W (A6-0x32) 00022e10 42 6e ff d0 |Bn | CLR.W (A6-0x30) 00022e14 e1 40 | @ | ASL.W #0x8,D0 00022e16 3d 40 ff d2 |=@ | MOVE.W D0,(A6-0x2e) 00022e1a 42 6e ff d4 |Bn | CLR.W (A6-0x2c) 00022e1e 42 6e ff d6 |Bn | CLR.W (A6-0x2a) 00022e22 48 6e ff c8 |Hn | PEA.L (A6-0x38) 00022e26 41 ee ff d8 |A | LEA.L (A6-0x28),A0 00022e2a 2f 08 |/ | MOVE.L A0,-(A7) 00022e2c 42 67 |Bg | CLR.W -(A7) 00022e2e 4e b9 00 01 02 04 |N | JSR KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W) 00022e34 50 4f |PO | ADDQ.L #0x8,A7 00022e36 42 57 |BW | CLR.W (A7) 00022e38 48 6e ff e4 |Hn | PEA.L (A6-0x1c) 00022e3c 4e b9 00 01 02 06 |N | JSR KC03_Wait_Disk_IO(a : W; VAR status : Byte) 00022e42 5c 4f |\O | ADDQ.L #0x6,A7 00022e44 30 2e ff d8 |0. | MOVE.W (A6-0x28),D0 00022e48 b0 42 | B | CMP.W D2,D0 00022e4a 67 24 |g$ | BEQ 0x22e70 00022e4c 41 fa d5 7c |A | | LEA.L 0x203ca,A0 00022e50 70 0e |p | MOVEQ.L #0x0e,D0 00022e52 3f 20 |? | MOVE.W -(A0),-(A7) 00022e54 51 c8 ff fc |Q | DBF D0,0x22e52 00022e58 59 4f |YO | SUBQ.L #0x4,A7 00022e5a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022e5e 3f 02 |? | MOVE.W D2,-(A7) 00022e60 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00022e64 4e 92 |N | JSR (A2) 00022e66 50 4f |PO | ADDQ.L #0x8,A7 00022e68 4e ba f6 b8 |N | JSR 0x22522 00022e6c de fc 00 22 | " | ADDA.W #0x22,A7 00022e70 33 d4 00 01 00 08 |3 | MOVE.W (A4),0x10008 00022e76 33 fc 7f ff 00 01 00 0c |3 | MOVE.W #0x7fff,0x1000c 00022e7e 33 fc 7f ff 00 01 00 0a |3 | MOVE.W #0x7fff,0x1000a 00022e86 42 13 |B | CLR.B (A3) 00022e88 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00022e8c 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00022e90 48 78 00 01 |Hx | PEA.L 0x1 00022e94 2f 39 00 02 97 1a |/9 | MOVE.L 0x2971a,-(A7) 00022e9a 48 6e ff e4 |Hn | PEA.L (A6-0x1c) 00022e9e 4e b9 00 01 03 6c |N l | JSR RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B) 00022ea4 de c7 | | ADDA.W D7,A7 00022ea6 4a 2e ff e4 |J. | TST.B (A6-0x1c) 00022eaa 66 5e |f^ | BNE 0x22f0a 00022eac 4a 2e 00 08 |J. | TST.B (A6+0x8) 00022eb0 67 28 |g( | BEQ 0x22eda 00022eb2 9e fc 00 2a | * | SUBA.W #0x2a,A7 00022eb6 20 4f | O | MOVEA.L A7,A0 00022eb8 43 fa d4 7a |C z | LEA.L 0x20334,A1 00022ebc 70 28 |p( | MOVEQ.L #0x28,D0 00022ebe 10 d9 | | MOVE.B (A1)+,(A0)+ 00022ec0 51 c8 ff fc |Q | DBF D0,0x22ebe 00022ec4 59 4f |YO | SUBQ.L #0x4,A7 00022ec6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022eca 3f 02 |? | MOVE.W D2,-(A7) 00022ecc 3f 3c 00 29 |?< ) | MOVE.W #0x29,-(A7) 00022ed0 4e 92 |N | JSR (A2) 00022ed2 50 4f |PO | ADDQ.L #0x8,A7 00022ed4 4e ba f6 4c |N L | JSR 0x22522 00022ed8 60 28 |`( | BRA 0x22f02 00022eda 9e fc 00 2a | * | SUBA.W #0x2a,A7 00022ede 20 4f | O | MOVEA.L A7,A0 00022ee0 43 fa d4 52 |C R | LEA.L 0x20334,A1 00022ee4 70 28 |p( | MOVEQ.L #0x28,D0 00022ee6 10 d9 | | MOVE.B (A1)+,(A0)+ 00022ee8 51 c8 ff fc |Q | DBF D0,0x22ee6 00022eec 59 4f |YO | SUBQ.L #0x4,A7 00022eee 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022ef2 3f 02 |? | MOVE.W D2,-(A7) 00022ef4 3f 3c 00 29 |?< ) | MOVE.W #0x29,-(A7) 00022ef8 4e 92 |N | JSR (A2) 00022efa 50 4f |PO | ADDQ.L #0x8,A7 00022efc 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022f02 de fc 00 2e | . | ADDA.W #0x2e,A7 00022f06 60 00 01 80 |` | BRA 0x23088 00022f0a 30 39 00 02 97 20 |09 | MOVE.W 0x29720,D0 00022f10 0c 40 7f ed | @ | CMPI.W #0x7fed,D0 00022f14 67 58 |gX | BEQ 0x22f6e 00022f16 4a 2e 00 08 |J. | TST.B (A6+0x8) 00022f1a 67 26 |g& | BEQ 0x22f42 00022f1c 9e c5 | | SUBA.W D5,A7 00022f1e 20 4f | O | MOVEA.L A7,A0 00022f20 43 fa d4 3c |C < | LEA.L 0x2035e,A1 00022f24 70 12 |p | MOVEQ.L #0x12,D0 00022f26 10 d9 | | MOVE.B (A1)+,(A0)+ 00022f28 51 c8 ff fc |Q | DBF D0,0x22f26 00022f2c 59 4f |YO | SUBQ.L #0x4,A7 00022f2e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022f32 3f 02 |? | MOVE.W D2,-(A7) 00022f34 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00022f38 4e 92 |N | JSR (A2) 00022f3a 50 4f |PO | ADDQ.L #0x8,A7 00022f3c 4e ba f5 e4 |N | JSR 0x22522 00022f40 60 26 |`& | BRA 0x22f68 00022f42 9e c5 | | SUBA.W D5,A7 00022f44 20 4f | O | MOVEA.L A7,A0 00022f46 43 fa d4 16 |C | LEA.L 0x2035e,A1 00022f4a 70 12 |p | MOVEQ.L #0x12,D0 00022f4c 10 d9 | | MOVE.B (A1)+,(A0)+ 00022f4e 51 c8 ff fc |Q | DBF D0,0x22f4c 00022f52 59 4f |YO | SUBQ.L #0x4,A7 00022f54 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022f58 3f 02 |? | MOVE.W D2,-(A7) 00022f5a 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00022f5e 4e 92 |N | JSR (A2) 00022f60 50 4f |PO | ADDQ.L #0x8,A7 00022f62 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022f68 de c6 | | ADDA.W D6,A7 00022f6a 60 00 01 1c |` | BRA 0x23088 00022f6e 30 39 00 02 97 22 |09 " | MOVE.W 0x29722,D0 00022f74 0c 40 00 03 | @ | CMPI.W #0x0003,D0 00022f78 67 5a |gZ | BEQ 0x22fd4 00022f7a 4a 2e 00 08 |J. | TST.B (A6+0x8) 00022f7e 67 26 |g& | BEQ 0x22fa6 00022f80 9e c3 | | SUBA.W D3,A7 00022f82 20 4f | O | MOVEA.L A7,A0 00022f84 43 fa d3 ec |C | LEA.L 0x20372,A1 00022f88 70 18 |p | MOVEQ.L #0x18,D0 00022f8a 10 d9 | | MOVE.B (A1)+,(A0)+ 00022f8c 51 c8 ff fc |Q | DBF D0,0x22f8a 00022f90 59 4f |YO | SUBQ.L #0x4,A7 00022f92 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022f96 3f 02 |? | MOVE.W D2,-(A7) 00022f98 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00022f9c 4e 92 |N | JSR (A2) 00022f9e 50 4f |PO | ADDQ.L #0x8,A7 00022fa0 4e ba f5 80 |N | JSR 0x22522 00022fa4 60 26 |`& | BRA 0x22fcc 00022fa6 9e c3 | | SUBA.W D3,A7 00022fa8 20 4f | O | MOVEA.L A7,A0 00022faa 43 fa d3 c6 |C | LEA.L 0x20372,A1 00022fae 70 18 |p | MOVEQ.L #0x18,D0 00022fb0 10 d9 | | MOVE.B (A1)+,(A0)+ 00022fb2 51 c8 ff fc |Q | DBF D0,0x22fb0 00022fb6 59 4f |YO | SUBQ.L #0x4,A7 00022fb8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022fbc 3f 02 |? | MOVE.W D2,-(A7) 00022fbe 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00022fc2 4e 92 |N | JSR (A2) 00022fc4 50 4f |PO | ADDQ.L #0x8,A7 00022fc6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022fcc de fc 00 1e | | ADDA.W #0x1e,A7 00022fd0 60 00 00 b6 |` | BRA 0x23088 00022fd4 23 f9 00 02 97 26 00 02 |# & | MOVE.L 0x29726,0x29712 00022fdc 97 12 | | 00022fde 4e ba fc 34 |N 4 | JSR 0x22c14 00022fe2 41 f9 00 02 97 72 |A r | LEA.L 0x29772,A0 00022fe8 70 0e |p | MOVEQ.L #0x0e,D0 00022fea 3f 20 |? | MOVE.W -(A0),-(A7) 00022fec 51 c8 ff fc |Q | DBF D0,0x22fea 00022ff0 51 4f |QO | SUBQ.L #0x8,A7 00022ff2 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022ff6 3f 02 |? | MOVE.W D2,-(A7) 00022ff8 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00022ffc 4e 92 |N | JSR (A2) 00022ffe 50 4f |PO | ADDQ.L #0x8,A7 00023000 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00023006 58 4f |XO | ADDQ.L #0x4,A7 00023008 23 df 00 02 97 04 |# | MOVE.L (A7)+,0x29704 0002300e de fc 00 1c | | ADDA.W #0x1c,A7 00023012 3e ba d6 28 |> ( | MOVE.W 0x2063c,(A7) 00023016 3f 3a d6 22 |?: " | MOVE.W 0x2063a,-(A7) 0002301a 3f 3a d6 1c |?: | MOVE.W 0x20638,-(A7) 0002301e 51 4f |QO | SUBQ.L #0x8,A7 00023020 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023024 3f 02 |? | MOVE.W D2,-(A7) 00023026 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 0002302a 4e 92 |N | JSR (A2) 0002302c 2e b9 00 02 97 04 |. | MOVE.L 0x29704,(A7) 00023032 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00023038 58 4f |XO | ADDQ.L #0x4,A7 0002303a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023040 50 4f |PO | ADDQ.L #0x8,A7 00023042 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023048 de fc 00 0a | | ADDA.W #0xa,A7 0002304c 4a 2e 00 08 |J. | TST.B (A6+0x8) 00023050 67 04 |g | BEQ 0x23056 00023052 16 82 | | MOVE.B D2,(A3) 00023054 60 32 |`2 | BRA 0x23088 00023056 41 fa d2 dc |A | LEA.L 0x20334,A0 0002305a 70 1c |p | MOVEQ.L #0x1c,D0 0002305c 3f 20 |? | MOVE.W -(A0),-(A7) 0002305e 51 c8 ff fc |Q | DBF D0,0x2305c 00023062 5d 4f |]O | SUBQ.L #0x6,A7 00023064 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00023068 3f 02 |? | MOVE.W D2,-(A7) 0002306a 3f 3c 00 3a |?< : | MOVE.W #0x3a,-(A7) 0002306e 4e 92 |N | JSR (A2) 00023070 5c 4f |\O | ADDQ.L #0x6,A7 00023072 1e 82 | | MOVE.B D2,(A7) 00023074 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 0002307a 5c 4f |\O | ADDQ.L #0x6,A7 0002307c 10 1f | | MOVE.B (A7)+,D0 0002307e 48 80 |H | EXTB.W D0 00023080 41 82 |A | CHK.W D2,D0 00023082 de fc 00 3a | : | ADDA.W #0x3a,A7 00023086 16 80 | | MOVE.B D0,(A3) 00023088 4a 13 |J | TST.B (A3) 0002308a 67 0c |g | BEQ 0x23098 0002308c 13 f9 00 02 97 52 00 02 | R | MOVE.B 0x29752,0x29709 00023094 97 09 | | 00023096 60 06 |` | BRA 0x2309e 00023098 42 39 00 02 97 09 |B9 | CLR.B 0x29709 0002309e 42 79 00 02 96 fa |By | CLR.W 0x296fa 000230a4 4a 13 |J | TST.B (A3) 000230a6 66 00 03 d4 |f | BNE 0x2347c 000230aa 55 4f |UO | SUBQ.L #0x2,A7 000230ac 4e b9 00 01 06 10 |N | JSR Is_machine_type_one_or_three() : Bool 000230b2 4a 1f |J | TST.B (A7)+ 000230b4 66 00 03 c6 |f | BNE 0x2347c 000230b8 55 4f |UO | SUBQ.L #0x2,A7 000230ba 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 000230c0 4a 1f |J | TST.B (A7)+ 000230c2 67 00 00 f8 |g | BEQ 0x231bc 000230c6 2f 3a d3 40 |/: @ | MOVE.L 0x20408,-(A7) 000230ca 2f 3a d3 38 |/: 8 | MOVE.L 0x20404,-(A7) 000230ce 2f 3a d3 30 |/: 0 | MOVE.L 0x20400,-(A7) 000230d2 2f 3a d3 28 |/: ( | MOVE.L 0x203fc,-(A7) 000230d6 59 4f |YO | SUBQ.L #0x4,A7 000230d8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000230dc 3f 02 |? | MOVE.W D2,-(A7) 000230de 3f 07 |? | MOVE.W D7,-(A7) 000230e0 4e 92 |N | JSR (A2) 000230e2 50 4f |PO | ADDQ.L #0x8,A7 000230e4 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000230ea 55 4f |UO | SUBQ.L #0x2,A7 000230ec 20 4f | O | MOVEA.L A7,A0 000230ee 43 fa d3 bc |C | LEA.L 0x204ac,A1 000230f2 70 14 |p | MOVEQ.L #0x14,D0 000230f4 10 d9 | | MOVE.B (A1)+,(A0)+ 000230f6 51 c8 ff fc |Q | DBF D0,0x230f4 000230fa 59 4f |YO | SUBQ.L #0x4,A7 000230fc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023100 3f 02 |? | MOVE.W D2,-(A7) 00023102 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 00023106 4e 92 |N | JSR (A2) 00023108 50 4f |PO | ADDQ.L #0x8,A7 0002310a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023110 58 4f |XO | ADDQ.L #0x4,A7 00023112 20 4f | O | MOVEA.L A7,A0 00023114 43 fa d3 ac |C | LEA.L 0x204c2,A1 00023118 70 14 |p | MOVEQ.L #0x14,D0 0002311a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002311c 51 c8 ff fc |Q | DBF D0,0x2311a 00023120 59 4f |YO | SUBQ.L #0x4,A7 00023122 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023126 3f 02 |? | MOVE.W D2,-(A7) 00023128 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 0002312c 4e 92 |N | JSR (A2) 0002312e 50 4f |PO | ADDQ.L #0x8,A7 00023130 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023136 de c3 | | ADDA.W D3,A7 00023138 41 fa d3 b6 |A | LEA.L 0x204f0,A0 0002313c 70 05 |p | MOVEQ.L #0x05,D0 0002313e 2f 20 |/ | MOVE.L -(A0),-(A7) 00023140 51 c8 ff fc |Q | DBF D0,0x2313e 00023144 59 4f |YO | SUBQ.L #0x4,A7 00023146 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002314a 3f 02 |? | MOVE.W D2,-(A7) 0002314c 3f 06 |? | MOVE.W D6,-(A7) 0002314e 4e 92 |N | JSR (A2) 00023150 50 4f |PO | ADDQ.L #0x8,A7 00023152 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023158 de fc 00 0e | | ADDA.W #0xe,A7 0002315c 20 4f | O | MOVEA.L A7,A0 0002315e 43 fa d3 3e |C > | LEA.L 0x2049e,A1 00023162 70 0c |p | MOVEQ.L #0x0c,D0 00023164 10 d9 | | MOVE.B (A1)+,(A0)+ 00023166 51 c8 ff fc |Q | DBF D0,0x23164 0002316a 59 4f |YO | SUBQ.L #0x4,A7 0002316c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023170 3f 02 |? | MOVE.W D2,-(A7) 00023172 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 00023176 4e 92 |N | JSR (A2) 00023178 50 4f |PO | ADDQ.L #0x8,A7 0002317a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023180 55 4f |UO | SUBQ.L #0x2,A7 00023182 20 4f | O | MOVEA.L A7,A0 00023184 43 fa d0 b6 |C | LEA.L 0x2023c,A1 00023188 70 12 |p | MOVEQ.L #0x12,D0 0002318a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002318c 51 c8 ff fc |Q | DBF D0,0x2318a 00023190 51 4f |QO | SUBQ.L #0x8,A7 00023192 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023196 3f 02 |? | MOVE.W D2,-(A7) 00023198 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 0002319c 4e 92 |N | JSR (A2) 0002319e 50 4f |PO | ADDQ.L #0x8,A7 000231a0 48 78 00 00 |Hx | PEA.L 0x0 000231a4 48 78 00 03 |Hx | PEA.L 0x3 000231a8 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 000231ae de c4 | | ADDA.W D4,A7 000231b0 30 2f 00 02 |0/ | MOVE.W (A7+0x2),D0 000231b4 41 bc 00 05 |A | CHK.W #0x5,D0 000231b8 60 00 01 3c |` < | BRA 0x232f6 000231bc 2f 3a d2 4a |/: J | MOVE.L 0x20408,-(A7) 000231c0 2f 3a d2 42 |/: B | MOVE.L 0x20404,-(A7) 000231c4 2f 3a d2 3a |/: : | MOVE.L 0x20400,-(A7) 000231c8 2f 3a d2 32 |/: 2 | MOVE.L 0x203fc,-(A7) 000231cc 59 4f |YO | SUBQ.L #0x4,A7 000231ce 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000231d2 3f 02 |? | MOVE.W D2,-(A7) 000231d4 3f 07 |? | MOVE.W D7,-(A7) 000231d6 4e 92 |N | JSR (A2) 000231d8 50 4f |PO | ADDQ.L #0x8,A7 000231da 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000231e0 9e fc 00 22 | " | SUBA.W #0x22,A7 000231e4 20 4f | O | MOVEA.L A7,A0 000231e6 43 fa d2 24 |C $ | LEA.L 0x2040c,A1 000231ea 70 34 |p4 | MOVEQ.L #0x34,D0 000231ec 10 d9 | | MOVE.B (A1)+,(A0)+ 000231ee 51 c8 ff fc |Q | DBF D0,0x231ec 000231f2 59 4f |YO | SUBQ.L #0x4,A7 000231f4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000231f8 3f 02 |? | MOVE.W D2,-(A7) 000231fa 3f 3c 00 35 |?< 5 | MOVE.W #0x35,-(A7) 000231fe 4e 92 |N | JSR (A2) 00023200 50 4f |PO | ADDQ.L #0x8,A7 00023202 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023208 de c3 | | ADDA.W D3,A7 0002320a 20 4f | O | MOVEA.L A7,A0 0002320c 43 fa d2 34 |C 4 | LEA.L 0x20442,A1 00023210 70 1e |p | MOVEQ.L #0x1e,D0 00023212 10 d9 | | MOVE.B (A1)+,(A0)+ 00023214 51 c8 ff fc |Q | DBF D0,0x23212 00023218 59 4f |YO | SUBQ.L #0x4,A7 0002321a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002321e 3f 02 |? | MOVE.W D2,-(A7) 00023220 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7) 00023224 4e 92 |N | JSR (A2) 00023226 50 4f |PO | ADDQ.L #0x8,A7 00023228 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002322e de fc 00 24 | $ | ADDA.W #0x24,A7 00023232 41 fa d2 42 |A B | LEA.L 0x20476,A0 00023236 70 04 |p | MOVEQ.L #0x04,D0 00023238 2f 20 |/ | MOVE.L -(A0),-(A7) 0002323a 51 c8 ff fc |Q | DBF D0,0x23238 0002323e 59 4f |YO | SUBQ.L #0x4,A7 00023240 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023244 3f 02 |? | MOVE.W D2,-(A7) 00023246 3f 05 |? | MOVE.W D5,-(A7) 00023248 4e 92 |N | JSR (A2) 0002324a 50 4f |PO | ADDQ.L #0x8,A7 0002324c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023252 de c6 | | ADDA.W D6,A7 00023254 41 fa d2 34 |A 4 | LEA.L 0x2048a,A0 00023258 70 04 |p | MOVEQ.L #0x04,D0 0002325a 2f 20 |/ | MOVE.L -(A0),-(A7) 0002325c 51 c8 ff fc |Q | DBF D0,0x2325a 00023260 59 4f |YO | SUBQ.L #0x4,A7 00023262 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023266 3f 02 |? | MOVE.W D2,-(A7) 00023268 3f 05 |? | MOVE.W D5,-(A7) 0002326a 4e 92 |N | JSR (A2) 0002326c 50 4f |PO | ADDQ.L #0x8,A7 0002326e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023274 de c6 | | ADDA.W D6,A7 00023276 41 fa d2 26 |A & | LEA.L 0x2049e,A0 0002327a 70 04 |p | MOVEQ.L #0x04,D0 0002327c 2f 20 |/ | MOVE.L -(A0),-(A7) 0002327e 51 c8 ff fc |Q | DBF D0,0x2327c 00023282 59 4f |YO | SUBQ.L #0x4,A7 00023284 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023288 3f 02 |? | MOVE.W D2,-(A7) 0002328a 3f 05 |? | MOVE.W D5,-(A7) 0002328c 4e 92 |N | JSR (A2) 0002328e 50 4f |PO | ADDQ.L #0x8,A7 00023290 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023296 de fc 00 0a | | ADDA.W #0xa,A7 0002329a 20 4f | O | MOVEA.L A7,A0 0002329c 43 fa d2 00 |C | LEA.L 0x2049e,A1 000232a0 70 0c |p | MOVEQ.L #0x0c,D0 000232a2 10 d9 | | MOVE.B (A1)+,(A0)+ 000232a4 51 c8 ff fc |Q | DBF D0,0x232a2 000232a8 59 4f |YO | SUBQ.L #0x4,A7 000232aa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000232ae 3f 02 |? | MOVE.W D2,-(A7) 000232b0 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 000232b4 4e 92 |N | JSR (A2) 000232b6 50 4f |PO | ADDQ.L #0x8,A7 000232b8 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000232be 55 4f |UO | SUBQ.L #0x2,A7 000232c0 20 4f | O | MOVEA.L A7,A0 000232c2 43 fa cf 78 |C x | LEA.L 0x2023c,A1 000232c6 70 12 |p | MOVEQ.L #0x12,D0 000232c8 10 d9 | | MOVE.B (A1)+,(A0)+ 000232ca 51 c8 ff fc |Q | DBF D0,0x232c8 000232ce 51 4f |QO | SUBQ.L #0x8,A7 000232d0 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000232d4 3f 02 |? | MOVE.W D2,-(A7) 000232d6 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 000232da 4e 92 |N | JSR (A2) 000232dc 50 4f |PO | ADDQ.L #0x8,A7 000232de 48 78 00 00 |Hx | PEA.L 0x0 000232e2 48 78 00 05 |Hx | PEA.L 0x5 000232e6 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 000232ec de c4 | | ADDA.W D4,A7 000232ee 30 2f 00 02 |0/ | MOVE.W (A7+0x2),D0 000232f2 41 bc 00 05 |A | CHK.W #0x5,D0 000232f6 de c6 | | ADDA.W D6,A7 000232f8 33 c0 00 02 96 fa |3 | MOVE.W D0,0x296fa 000232fe 4a 79 00 02 96 fa |Jy | TST.W 0x296fa 00023304 67 2a |g* | BEQ 0x23330 00023306 30 39 00 02 96 fa |09 | MOVE.W 0x296fa,D0 0002330c e5 40 | @ | ASL.W #0x2,D0 0002330e 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00023314 33 f0 00 10 00 02 97 12 |3 | MOVE.W (A0+D0.W+#0x10),0x29712 0002331c 13 f0 00 12 00 02 97 14 | | MOVE.B (A0+D0.W+#0x12),0x29714 00023324 13 f0 00 13 00 02 97 15 | | MOVE.B (A0+D0.W+#0x13),0x29715 0002332c 60 00 01 1c |` | BRA 0x2344a 00023330 9e fc 00 2a | * | SUBA.W #0x2a,A7 00023334 20 4f | O | MOVEA.L A7,A0 00023336 43 fa cf 18 |C | LEA.L 0x20250,A1 0002333a 70 28 |p( | MOVEQ.L #0x28,D0 0002333c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002333e 51 c8 ff fc |Q | DBF D0,0x2333c 00023342 51 4f |QO | SUBQ.L #0x8,A7 00023344 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023348 3f 02 |? | MOVE.W D2,-(A7) 0002334a 3f 3c 00 29 |?< ) | MOVE.W #0x29,-(A7) 0002334e 4e 92 |N | JSR (A2) 00023350 50 4f |PO | ADDQ.L #0x8,A7 00023352 48 78 00 01 |Hx | PEA.L 0x1 00023356 48 78 0f ff |Hx | PEA.L 0xfff 0002335a 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 00023360 de c4 | | ADDA.W D4,A7 00023362 20 1f | | MOVE.L (A7)+,D0 00023364 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 0002336a 63 02 |c | BLS 0x2336e 0002336c 4e 4f |NO | TRAP #15 0002336e de fc 00 2a | * | ADDA.W #0x2a,A7 00023372 33 c0 00 02 97 12 |3 | MOVE.W D0,0x29712 00023378 9e fc 00 34 | 4 | SUBA.W #0x34,A7 0002337c 20 4f | O | MOVEA.L A7,A0 0002337e 43 fa ce fa |C | LEA.L 0x2027a,A1 00023382 70 32 |p2 | MOVEQ.L #0x32,D0 00023384 10 d9 | | MOVE.B (A1)+,(A0)+ 00023386 51 c8 ff fc |Q | DBF D0,0x23384 0002338a 51 4f |QO | SUBQ.L #0x8,A7 0002338c 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023390 3f 02 |? | MOVE.W D2,-(A7) 00023392 3f 3c 00 33 |?< 3 | MOVE.W #0x33,-(A7) 00023396 4e 92 |N | JSR (A2) 00023398 50 4f |PO | ADDQ.L #0x8,A7 0002339a 48 78 00 01 |Hx | PEA.L 0x1 0002339e 48 78 00 fe |Hx | PEA.L 0xfe 000233a2 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 000233a8 de c4 | | ADDA.W D4,A7 000233aa 20 1f | | MOVE.L (A7)+,D0 000233ac 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 000233b2 63 02 |c | BLS 0x233b6 000233b4 4e 4f |NO | TRAP #15 000233b6 de fc 00 34 | 4 | ADDA.W #0x34,A7 000233ba 13 c0 00 02 97 14 | | MOVE.B D0,0x29714 000233c0 9e fc 00 32 | 2 | SUBA.W #0x32,A7 000233c4 20 4f | O | MOVEA.L A7,A0 000233c6 43 fa ce e6 |C | LEA.L 0x202ae,A1 000233ca 70 30 |p0 | MOVEQ.L #0x30,D0 000233cc 10 d9 | | MOVE.B (A1)+,(A0)+ 000233ce 51 c8 ff fc |Q | DBF D0,0x233cc 000233d2 51 4f |QO | SUBQ.L #0x8,A7 000233d4 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000233d8 3f 02 |? | MOVE.W D2,-(A7) 000233da 3f 3c 00 31 |?< 1 | MOVE.W #0x31,-(A7) 000233de 4e 92 |N | JSR (A2) 000233e0 50 4f |PO | ADDQ.L #0x8,A7 000233e2 48 78 00 01 |Hx | PEA.L 0x1 000233e6 48 78 00 fe |Hx | PEA.L 0xfe 000233ea 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 000233f0 de c4 | | ADDA.W D4,A7 000233f2 20 1f | | MOVE.L (A7)+,D0 000233f4 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 000233fa 63 02 |c | BLS 0x233fe 000233fc 4e 4f |NO | TRAP #15 000233fe de fc 00 32 | 2 | ADDA.W #0x32,A7 00023402 13 c0 00 02 97 15 | | MOVE.B D0,0x29715 00023408 42 81 |B | CLR.L D1 0002340a 12 00 | | MOVE.B D0,D1 0002340c c2 42 | B | AND.W D2,D1 0002340e 67 2c |g, | BEQ 0x2343c 00023410 9e fc 00 20 | | SUBA.W #0x20,A7 00023414 20 4f | O | MOVEA.L A7,A0 00023416 43 fa cf 74 |C t | LEA.L 0x2038c,A1 0002341a 70 1e |p | MOVEQ.L #0x1e,D0 0002341c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002341e 51 c8 ff fc |Q | DBF D0,0x2341c 00023422 59 4f |YO | SUBQ.L #0x4,A7 00023424 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023428 3f 02 |? | MOVE.W D2,-(A7) 0002342a 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7) 0002342e 4e 92 |N | JSR (A2) 00023430 50 4f |PO | ADDQ.L #0x8,A7 00023432 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023438 de fc 00 24 | $ | ADDA.W #0x24,A7 0002343c 42 80 |B | CLR.L D0 0002343e 10 39 00 02 97 15 | 9 | MOVE.B 0x29715,D0 00023444 c0 42 | B | AND.W D2,D0 00023446 66 00 ff 78 |f x | BNE 0x233c0 0002344a 41 fa ce ae |A | LEA.L 0x202fa,A0 0002344e 70 0c |p | MOVEQ.L #0x0c,D0 00023450 3f 20 |? | MOVE.W -(A0),-(A7) 00023452 51 c8 ff fc |Q | DBF D0,0x23450 00023456 9e c4 | | SUBA.W D4,A7 00023458 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002345c 3f 02 |? | MOVE.W D2,-(A7) 0002345e 3f 03 |? | MOVE.W D3,-(A7) 00023460 4e 92 |N | JSR (A2) 00023462 50 4f |PO | ADDQ.L #0x8,A7 00023464 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 0002346a 58 4f |XO | ADDQ.L #0x4,A7 0002346c 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00023472 58 4f |XO | ADDQ.L #0x4,A7 00023474 23 df 00 02 97 04 |# | MOVE.L (A7)+,0x29704 0002347a de c3 | | ADDA.W D3,A7 0002347c 3f 14 |? | MOVE.W (A4),-(A7) 0002347e 4e ba f3 78 |N x | JSR 0x227f8 00023482 54 4f |TO | ADDQ.L #0x2,A7 00023484 4a 79 00 02 96 fa |Jy | TST.W 0x296fa 0002348a 66 10 |f | BNE 0x2349c 0002348c 30 39 00 02 96 fc |09 | MOVE.W 0x296fc,D0 00023492 41 bc 00 05 |A | CHK.W #0x5,D0 00023496 33 c0 00 02 96 fa |3 | MOVE.W D0,0x296fa 0002349c 55 4f |UO | SUBQ.L #0x2,A7 0002349e 4e b9 00 01 06 10 |N | JSR Is_machine_type_one_or_three() : Bool 000234a4 4a 1f |J | TST.B (A7)+ 000234a6 67 00 01 9a |g | BEQ 0x23642 000234aa 33 f9 00 02 96 fe 00 02 |3 | MOVE.W 0x296fe,0x29712 000234b2 97 12 | | 000234b4 30 39 00 02 97 00 |09 | MOVE.W 0x29700,D0 000234ba 41 bc 00 ff |A | CHK.W #0xff,D0 000234be 13 c0 00 02 97 14 | | MOVE.B D0,0x29714 000234c4 30 39 00 02 97 02 |09 | MOVE.W 0x29702,D0 000234ca 41 bc 00 ff |A | CHK.W #0xff,D0 000234ce 13 c0 00 02 97 15 | | MOVE.B D0,0x29715 000234d4 42 39 00 02 db 1e |B9 | CLR.B 0x2db1e 000234da 42 39 00 02 db 1f |B9 | CLR.B 0x2db1f 000234e0 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000234e6 9e fc 00 22 | " | SUBA.W #0x22,A7 000234ea 20 4f | O | MOVEA.L A7,A0 000234ec 43 fa d1 50 |C P | LEA.L 0x2063e,A1 000234f0 70 20 |p | MOVEQ.L #0x20,D0 000234f2 10 d9 | | MOVE.B (A1)+,(A0)+ 000234f4 51 c8 ff fc |Q | DBF D0,0x234f2 000234f8 3f 3a d1 6a |?: j | MOVE.W 0x20664,-(A7) 000234fc 3f 3a d1 64 |?: d | MOVE.W 0x20662,-(A7) 00023500 3f 3a d1 5e |?: ^ | MOVE.W 0x20660,-(A7) 00023504 51 4f |QO | SUBQ.L #0x8,A7 00023506 48 6f 00 0e |Ho | PEA.L (A7+0xe) 0002350a 3f 02 |? | MOVE.W D2,-(A7) 0002350c 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 00023510 4e 92 |N | JSR (A2) 00023512 58 4f |XO | ADDQ.L #0x4,A7 00023514 30 14 |0 | MOVE.W (A4),D0 00023516 48 c0 |H | EXTW.L D0 00023518 2f 00 |/ | MOVE.L D0,-(A7) 0002351a 48 78 00 01 |Hx | PEA.L 0x1 0002351e 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00023524 58 4f |XO | ADDQ.L #0x4,A7 00023526 48 6f 00 10 |Ho | PEA.L (A7+0x10) 0002352a 3f 02 |? | MOVE.W D2,-(A7) 0002352c 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00023530 4e 92 |N | JSR (A2) 00023532 2e b9 00 02 97 04 |. | MOVE.L 0x29704,(A7) 00023538 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 0002353e 58 4f |XO | ADDQ.L #0x4,A7 00023540 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00023546 de c7 | | ADDA.W D7,A7 00023548 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002354e 50 4f |PO | ADDQ.L #0x8,A7 00023550 20 4f | O | MOVEA.L A7,A0 00023552 43 fa d1 12 |C | LEA.L 0x20666,A1 00023556 70 22 |p" | MOVEQ.L #0x22,D0 00023558 10 d9 | | MOVE.B (A1)+,(A0)+ 0002355a 51 c8 ff fc |Q | DBF D0,0x23558 0002355e 59 4f |YO | SUBQ.L #0x4,A7 00023560 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023564 3f 02 |? | MOVE.W D2,-(A7) 00023566 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 0002356a 4e 92 |N | JSR (A2) 0002356c 50 4f |PO | ADDQ.L #0x8,A7 0002356e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023574 de c3 | | ADDA.W D3,A7 00023576 20 4f | O | MOVEA.L A7,A0 00023578 43 fa d1 10 |C | LEA.L 0x2068a,A1 0002357c 70 0c |p | MOVEQ.L #0x0c,D0 0002357e 10 d9 | | MOVE.B (A1)+,(A0)+ 00023580 51 c8 ff fc |Q | DBF D0,0x2357e 00023584 51 4f |QO | SUBQ.L #0x8,A7 00023586 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002358a 3f 02 |? | MOVE.W D2,-(A7) 0002358c 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 00023590 4e 92 |N | JSR (A2) 00023592 58 4f |XO | ADDQ.L #0x4,A7 00023594 42 80 |B | CLR.L D0 00023596 30 39 00 02 96 fe |09 | MOVE.W 0x296fe,D0 0002359c 2f 00 |/ | MOVE.L D0,-(A7) 0002359e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000235a4 58 4f |XO | ADDQ.L #0x4,A7 000235a6 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000235ac 50 4f |PO | ADDQ.L #0x8,A7 000235ae 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000235b4 58 4f |XO | ADDQ.L #0x4,A7 000235b6 20 4f | O | MOVEA.L A7,A0 000235b8 43 fa d0 de |C | LEA.L 0x20698,A1 000235bc 70 0c |p | MOVEQ.L #0x0c,D0 000235be 10 d9 | | MOVE.B (A1)+,(A0)+ 000235c0 51 c8 ff fc |Q | DBF D0,0x235be 000235c4 51 4f |QO | SUBQ.L #0x8,A7 000235c6 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000235ca 3f 02 |? | MOVE.W D2,-(A7) 000235cc 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 000235d0 4e 92 |N | JSR (A2) 000235d2 58 4f |XO | ADDQ.L #0x4,A7 000235d4 30 39 00 02 97 00 |09 | MOVE.W 0x29700,D0 000235da 48 c0 |H | EXTW.L D0 000235dc 2f 00 |/ | MOVE.L D0,-(A7) 000235de 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000235e4 58 4f |XO | ADDQ.L #0x4,A7 000235e6 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000235ec 50 4f |PO | ADDQ.L #0x8,A7 000235ee 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000235f4 58 4f |XO | ADDQ.L #0x4,A7 000235f6 20 4f | O | MOVEA.L A7,A0 000235f8 43 fa d0 ac |C | LEA.L 0x206a6,A1 000235fc 70 0c |p | MOVEQ.L #0x0c,D0 000235fe 10 d9 | | MOVE.B (A1)+,(A0)+ 00023600 51 c8 ff fc |Q | DBF D0,0x235fe 00023604 51 4f |QO | SUBQ.L #0x8,A7 00023606 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002360a 3f 02 |? | MOVE.W D2,-(A7) 0002360c 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 00023610 4e 92 |N | JSR (A2) 00023612 58 4f |XO | ADDQ.L #0x4,A7 00023614 30 39 00 02 97 02 |09 | MOVE.W 0x29702,D0 0002361a 48 c0 |H | EXTW.L D0 0002361c 2f 00 |/ | MOVE.L D0,-(A7) 0002361e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00023624 58 4f |XO | ADDQ.L #0x4,A7 00023626 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002362c 50 4f |PO | ADDQ.L #0x8,A7 0002362e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023634 de fc 00 12 | | ADDA.W #0x12,A7 00023638 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 0002363e 60 00 02 3a |` : | BRA 0x2387a 00023642 30 39 00 02 96 fc |09 | MOVE.W 0x296fc,D0 00023648 41 bc 00 05 |A | CHK.W #0x5,D0 0002364c e5 40 | @ | ASL.W #0x2,D0 0002364e 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00023654 32 30 00 10 |20 | MOVE.W (A0+D0.W+#0x10),D1 00023658 b2 79 00 02 97 12 | y | CMP.W 0x29712,D1 0002365e 66 1a |f | BNE 0x2367a 00023660 12 30 00 12 | 0 | MOVE.B (A0+D0.W+#0x12),D1 00023664 b2 39 00 02 97 14 | 9 | CMP.B 0x29714,D1 0002366a 66 0e |f | BNE 0x2367a 0002366c 10 30 00 13 | 0 | MOVE.B (A0+D0.W+#0x13),D0 00023670 b0 39 00 02 97 15 | 9 | CMP.B 0x29715,D0 00023676 67 00 01 f6 |g | BEQ 0x2386e 0002367a 4a 2e 00 08 |J. | TST.B (A6+0x8) 0002367e 67 2a |g* | BEQ 0x236aa 00023680 9e fc 00 32 | 2 | SUBA.W #0x32,A7 00023684 20 4f | O | MOVEA.L A7,A0 00023686 43 fa cd 42 |C B | LEA.L 0x203ca,A1 0002368a 70 30 |p0 | MOVEQ.L #0x30,D0 0002368c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002368e 51 c8 ff fc |Q | DBF D0,0x2368c 00023692 59 4f |YO | SUBQ.L #0x4,A7 00023694 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023698 3f 02 |? | MOVE.W D2,-(A7) 0002369a 3f 3c 00 31 |?< 1 | MOVE.W #0x31,-(A7) 0002369e 4e 92 |N | JSR (A2) 000236a0 50 4f |PO | ADDQ.L #0x8,A7 000236a2 4e ba ee 7e |N ~ | JSR 0x22522 000236a6 de fc 00 36 | 6 | ADDA.W #0x36,A7 000236aa 30 39 00 02 96 fc |09 | MOVE.W 0x296fc,D0 000236b0 41 bc 00 05 |A | CHK.W #0x5,D0 000236b4 e5 40 | @ | ASL.W #0x2,D0 000236b6 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 000236bc 32 30 00 10 |20 | MOVE.W (A0+D0.W+#0x10),D1 000236c0 b2 79 00 02 97 12 | y | CMP.W 0x29712,D1 000236c6 62 1a |b | BHI 0x236e2 000236c8 12 30 00 12 | 0 | MOVE.B (A0+D0.W+#0x12),D1 000236cc b2 39 00 02 97 14 | 9 | CMP.B 0x29714,D1 000236d2 62 0e |b | BHI 0x236e2 000236d4 10 30 00 13 | 0 | MOVE.B (A0+D0.W+#0x13),D0 000236d8 b0 39 00 02 97 15 | 9 | CMP.B 0x29715,D0 000236de 63 00 00 de |c | BLS 0x237be 000236e2 13 c2 00 02 db 1e | | MOVE.B D2,0x2db1e 000236e8 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000236ee 41 fa ce 8e |A | LEA.L 0x2057e,A0 000236f2 70 11 |p | MOVEQ.L #0x11,D0 000236f4 2f 20 |/ | MOVE.L -(A0),-(A7) 000236f6 51 c8 ff fc |Q | DBF D0,0x236f4 000236fa 59 4f |YO | SUBQ.L #0x4,A7 000236fc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023700 3f 02 |? | MOVE.W D2,-(A7) 00023702 3f 3c 00 48 |?< H | MOVE.W #0x48,-(A7) 00023706 4e 92 |N | JSR (A2) 00023708 50 4f |PO | ADDQ.L #0x8,A7 0002370a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023710 de fc 00 4c | L | ADDA.W #0x4c,A7 00023714 41 fa ce dc |A | LEA.L 0x205f2,A0 00023718 70 11 |p | MOVEQ.L #0x11,D0 0002371a 2f 20 |/ | MOVE.L -(A0),-(A7) 0002371c 51 c8 ff fc |Q | DBF D0,0x2371a 00023720 59 4f |YO | SUBQ.L #0x4,A7 00023722 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023726 3f 02 |? | MOVE.W D2,-(A7) 00023728 3f 3c 00 48 |?< H | MOVE.W #0x48,-(A7) 0002372c 4e 92 |N | JSR (A2) 0002372e 50 4f |PO | ADDQ.L #0x8,A7 00023730 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023736 de fc 00 4c | L | ADDA.W #0x4c,A7 0002373a 41 fa ce fc |A | LEA.L 0x20638,A0 0002373e 70 22 |p" | MOVEQ.L #0x22,D0 00023740 3f 20 |? | MOVE.W -(A0),-(A7) 00023742 51 c8 ff fc |Q | DBF D0,0x23740 00023746 59 4f |YO | SUBQ.L #0x4,A7 00023748 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002374c 3f 02 |? | MOVE.W D2,-(A7) 0002374e 3f 3c 00 46 |?< F | MOVE.W #0x46,-(A7) 00023752 4e 92 |N | JSR (A2) 00023754 50 4f |PO | ADDQ.L #0x8,A7 00023756 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002375c de fc 00 4a | J | ADDA.W #0x4a,A7 00023760 41 fa ce 1c |A | LEA.L 0x2057e,A0 00023764 70 11 |p | MOVEQ.L #0x11,D0 00023766 2f 20 |/ | MOVE.L -(A0),-(A7) 00023768 51 c8 ff fc |Q | DBF D0,0x23766 0002376c 59 4f |YO | SUBQ.L #0x4,A7 0002376e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023772 3f 02 |? | MOVE.W D2,-(A7) 00023774 3f 3c 00 48 |?< H | MOVE.W #0x48,-(A7) 00023778 4e 92 |N | JSR (A2) 0002377a 50 4f |PO | ADDQ.L #0x8,A7 0002377c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023782 de fc 00 4c | L | ADDA.W #0x4c,A7 00023786 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 0002378c 41 fa cb 6c |A l | LEA.L 0x202fa,A0 00023790 70 0c |p | MOVEQ.L #0x0c,D0 00023792 3f 20 |? | MOVE.W -(A0),-(A7) 00023794 51 c8 ff fc |Q | DBF D0,0x23792 00023798 9e c4 | | SUBA.W D4,A7 0002379a 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002379e 3f 02 |? | MOVE.W D2,-(A7) 000237a0 3f 03 |? | MOVE.W D3,-(A7) 000237a2 4e 92 |N | JSR (A2) 000237a4 50 4f |PO | ADDQ.L #0x8,A7 000237a6 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 000237ac 58 4f |XO | ADDQ.L #0x4,A7 000237ae 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 000237b4 58 4f |XO | ADDQ.L #0x4,A7 000237b6 23 df 00 02 97 04 |# | MOVE.L (A7)+,0x29704 000237bc de c3 | | ADDA.W D3,A7 000237be 30 39 00 02 96 fc |09 | MOVE.W 0x296fc,D0 000237c4 41 bc 00 05 |A | CHK.W #0x5,D0 000237c8 e5 40 | @ | ASL.W #0x2,D0 000237ca 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 000237d0 33 f0 00 10 00 02 97 12 |3 | MOVE.W (A0+D0.W+#0x10),0x29712 000237d8 13 f0 00 12 00 02 97 14 | | MOVE.B (A0+D0.W+#0x12),0x29714 000237e0 13 f0 00 13 00 02 97 15 | | MOVE.B (A0+D0.W+#0x13),0x29715 000237e8 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000237ee 41 fa cd 8e |A | LEA.L 0x2057e,A0 000237f2 70 11 |p | MOVEQ.L #0x11,D0 000237f4 2f 20 |/ | MOVE.L -(A0),-(A7) 000237f6 51 c8 ff fc |Q | DBF D0,0x237f4 000237fa 59 4f |YO | SUBQ.L #0x4,A7 000237fc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023800 3f 02 |? | MOVE.W D2,-(A7) 00023802 3f 3c 00 48 |?< H | MOVE.W #0x48,-(A7) 00023806 4e 92 |N | JSR (A2) 00023808 50 4f |PO | ADDQ.L #0x8,A7 0002380a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023810 5c 4f |\O | ADDQ.L #0x6,A7 00023812 20 4f | O | MOVEA.L A7,A0 00023814 43 fa cc da |C | LEA.L 0x204f0,A1 00023818 70 44 |pD | MOVEQ.L #0x44,D0 0002381a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002381c 51 c8 ff fc |Q | DBF D0,0x2381a 00023820 59 4f |YO | SUBQ.L #0x4,A7 00023822 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023826 3f 02 |? | MOVE.W D2,-(A7) 00023828 3f 3c 00 45 |?< E | MOVE.W #0x45,-(A7) 0002382c 4e 92 |N | JSR (A2) 0002382e 50 4f |PO | ADDQ.L #0x8,A7 00023830 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023836 de fc 00 4a | J | ADDA.W #0x4a,A7 0002383a 41 fa cd 42 |A B | LEA.L 0x2057e,A0 0002383e 70 11 |p | MOVEQ.L #0x11,D0 00023840 2f 20 |/ | MOVE.L -(A0),-(A7) 00023842 51 c8 ff fc |Q | DBF D0,0x23840 00023846 59 4f |YO | SUBQ.L #0x4,A7 00023848 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002384c 3f 02 |? | MOVE.W D2,-(A7) 0002384e 3f 3c 00 48 |?< H | MOVE.W #0x48,-(A7) 00023852 4e 92 |N | JSR (A2) 00023854 50 4f |PO | ADDQ.L #0x8,A7 00023856 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002385c de fc 00 4c | L | ADDA.W #0x4c,A7 00023860 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00023866 13 c2 00 02 db 1f | | MOVE.B D2,0x2db1f 0002386c 60 0c |` | BRA 0x2387a 0002386e 42 39 00 02 db 1e |B9 | CLR.B 0x2db1e 00023874 42 39 00 02 db 1f |B9 | CLR.B 0x2db1f 0002387a 42 80 |B | CLR.L D0 0002387c 10 39 00 02 97 15 | 9 | MOVE.B 0x29715,D0 00023882 e2 40 | @ | ASR.W #0x1,D0 00023884 33 c0 00 01 00 0a |3 | MOVE.W D0,0x1000a 0002388a 42 80 |B | CLR.L D0 0002388c 10 39 00 02 97 14 | 9 | MOVE.B 0x29714,D0 00023892 c0 f9 00 01 00 0a | | MULU.W 0x1000a,D0 00023898 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 0002389e 63 02 |c | BLS 0x238a2 000238a0 4e 4f |NO | TRAP #15 000238a2 33 c0 00 01 00 0c |3 | MOVE.W D0,0x1000c 000238a8 55 4f |UO | SUBQ.L #0x2,A7 000238aa 4e b9 00 01 06 10 |N | JSR Is_machine_type_one_or_three() : Bool 000238b0 4a 1f |J | TST.B (A7)+ 000238b2 66 00 00 8a |f | BNE 0x2393e 000238b6 55 4f |UO | SUBQ.L #0x2,A7 000238b8 4e ba f3 b2 |N | JSR 0x22c6c 000238bc 4a 1f |J | TST.B (A7)+ 000238be 67 7e |g~ | BEQ 0x2393e 000238c0 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000238c6 41 fa cc b6 |A | LEA.L 0x2057e,A0 000238ca 70 11 |p | MOVEQ.L #0x11,D0 000238cc 2f 20 |/ | MOVE.L -(A0),-(A7) 000238ce 51 c8 ff fc |Q | DBF D0,0x238cc 000238d2 59 4f |YO | SUBQ.L #0x4,A7 000238d4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000238d8 3f 02 |? | MOVE.W D2,-(A7) 000238da 3f 3c 00 48 |?< H | MOVE.W #0x48,-(A7) 000238de 4e 92 |N | JSR (A2) 000238e0 50 4f |PO | ADDQ.L #0x8,A7 000238e2 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000238e8 de fc 00 4c | L | ADDA.W #0x4c,A7 000238ec 41 fa cc bc |A | LEA.L 0x205aa,A0 000238f0 70 0a |p | MOVEQ.L #0x0a,D0 000238f2 2f 20 |/ | MOVE.L -(A0),-(A7) 000238f4 51 c8 ff fc |Q | DBF D0,0x238f2 000238f8 59 4f |YO | SUBQ.L #0x4,A7 000238fa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000238fe 3f 02 |? | MOVE.W D2,-(A7) 00023900 3f 3c 00 2c |?< , | MOVE.W #0x2c,-(A7) 00023904 4e 92 |N | JSR (A2) 00023906 50 4f |PO | ADDQ.L #0x8,A7 00023908 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002390e de fc 00 30 | 0 | ADDA.W #0x30,A7 00023912 41 fa cc 6a |A j | LEA.L 0x2057e,A0 00023916 70 11 |p | MOVEQ.L #0x11,D0 00023918 2f 20 |/ | MOVE.L -(A0),-(A7) 0002391a 51 c8 ff fc |Q | DBF D0,0x23918 0002391e 59 4f |YO | SUBQ.L #0x4,A7 00023920 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023924 3f 02 |? | MOVE.W D2,-(A7) 00023926 3f 3c 00 48 |?< H | MOVE.W #0x48,-(A7) 0002392a 4e 92 |N | JSR (A2) 0002392c 50 4f |PO | ADDQ.L #0x8,A7 0002392e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023934 de fc 00 4c | L | ADDA.W #0x4c,A7 00023938 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 0002393e 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00023942 4e 5e |N^ | UNLK A6 00023944 4e 75 |Nu | RTS 00023946 ; -------------------------------------------------------------------------------------- 00023946 ; OMSI PASCAL Function 00023946 ; <LVAR 0x008 4(r)> 00023946 ; <LVAR -0x002 2(rw)> 00023946 ; <LVAR -0x010 @ 1(r)> 00023946 ; -------------------------------------------------------------------------------------- 00023946 4e 56 ff 6e |NV n | LINK.W A6,#0xff6e 0002394a bf d5 | | CMPA.L (A5),A7 0002394c 62 06 |b | BHI 0x23954 0002394e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023952 4e 76 |Nv | TRAPV 00023954 de fc 00 7e | ~ | ADDA.W #0x7e,A7 00023958 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002395c 45 ee ff f0 |E | LEA.L (A6-0x10),A2 00023960 47 ee ff fe |G | LEA.L (A6-0x2),A3 00023964 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023968 42 10 |B | CLR.B (A0) 0002396a 42 80 |B | CLR.L D0 0002396c 10 39 00 02 97 2c | 9 , | MOVE.B 0x2972c,D0 00023972 42 81 |B | CLR.L D1 00023974 12 39 00 02 97 15 | 9 | MOVE.B 0x29715,D1 0002397a c0 c1 | | MULU.W D1,D0 0002397c 42 82 |B | CLR.L D2 0002397e 14 39 00 02 97 2d | 9 - | MOVE.B 0x2972d,D2 00023984 52 42 |RB | ADDQ.W #0x1,D2 00023986 d4 40 | @ | ADD.W D0,D2 00023988 e2 4a | J | LSR.W #0x1,D2 0002398a 3a 02 |: | MOVE.W D2,D5 0002398c 42 80 |B | CLR.L D0 0002398e 10 39 00 02 97 30 | 9 0 | MOVE.B 0x29730,D0 00023994 c0 c1 | | MULU.W D1,D0 00023996 42 81 |B | CLR.L D1 00023998 12 39 00 02 97 31 | 9 1 | MOVE.B 0x29731,D1 0002399e 53 41 |SA | SUBQ.W #0x1,D1 000239a0 42 82 |B | CLR.L D2 000239a2 34 00 |4 | MOVE.W D0,D2 000239a4 48 c1 |H | EXTW.L D1 000239a6 d2 82 | | ADD.L D2,D1 000239a8 28 01 |( | MOVE.L D1,D4 000239aa 76 02 |v | MOVEQ.L #0x02,D3 000239ac 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 000239b2 36 84 |6 | MOVE.W D4,(A3) 000239b4 42 80 |B | CLR.L D0 000239b6 30 13 |0 | MOVE.W (A3),D0 000239b8 42 81 |B | CLR.L D1 000239ba 32 05 |2 | MOVE.W D5,D1 000239bc 90 81 | | SUB.L D1,D0 000239be 0c 80 00 00 00 0f | | CMPI.L #0x0000000f,D0 000239c4 67 32 |g2 | BEQ 0x239f8 000239c6 9e fc 00 32 | 2 | SUBA.W #0x32,A7 000239ca 20 4f | O | MOVEA.L A7,A0 000239cc 43 fa cd 20 |C | LEA.L 0x206ee,A1 000239d0 70 30 |p0 | MOVEQ.L #0x30,D0 000239d2 10 d9 | | MOVE.B (A1)+,(A0)+ 000239d4 51 c8 ff fc |Q | DBF D0,0x239d2 000239d8 59 4f |YO | SUBQ.L #0x4,A7 000239da 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000239de 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000239e2 3f 3c 00 31 |?< 1 | MOVE.W #0x31,-(A7) 000239e6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000239ec 50 4f |PO | ADDQ.L #0x8,A7 000239ee 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000239f4 de fc 00 36 | 6 | ADDA.W #0x36,A7 000239f8 7c 00 || | MOVEQ.L #0x00,D6 000239fa 3e 01 |> | MOVE.W D1,D7 000239fc 0c 86 00 00 07 ff | | CMPI.L #0x000007ff,D6 00023a02 63 02 |c | BLS 0x23a06 00023a04 4e 4f |NO | TRAP #15 00023a06 20 06 | | MOVE.L D6,D0 00023a08 e5 80 | | ASL.L #0x2,D0 00023a0a 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00023a10 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00023a14 41 e8 04 4c |A L | LEA.L (A0+0x44c),A0 00023a18 2f 08 |/ | MOVE.L A0,-(A7) 00023a1a 28 5f |(_ | MOVEA.L (A7)+,A4 00023a1c 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00023a20 3f 07 |? | MOVE.W D7,-(A7) 00023a22 48 78 00 01 |Hx | PEA.L 0x1 00023a26 2f 0c |/ | MOVE.L A4,-(A7) 00023a28 48 52 |HR | PEA.L (A2) 00023a2a 4e b9 00 01 03 6c |N l | JSR RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B) 00023a30 de fc 00 10 | | ADDA.W #0x10,A7 00023a34 4a 12 |J | TST.B (A2) 00023a36 66 34 |f4 | BNE 0x23a6c 00023a38 9e fc 00 3a | : | SUBA.W #0x3a,A7 00023a3c 20 4f | O | MOVEA.L A7,A0 00023a3e 43 fa cc 74 |C t | LEA.L 0x206b4,A1 00023a42 70 38 |p8 | MOVEQ.L #0x38,D0 00023a44 10 d9 | | MOVE.B (A1)+,(A0)+ 00023a46 51 c8 ff fc |Q | DBF D0,0x23a44 00023a4a 59 4f |YO | SUBQ.L #0x4,A7 00023a4c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023a50 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023a54 3f 3c 00 39 |?< 9 | MOVE.W #0x39,-(A7) 00023a58 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023a5e 50 4f |PO | ADDQ.L #0x8,A7 00023a60 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023a66 de fc 00 3e | > | ADDA.W #0x3e,A7 00023a6a 60 18 |` | BRA 0x23a84 00023a6c 06 86 00 00 01 00 | | ADDI.L #0x00000100,D6 00023a72 42 80 |B | CLR.L D0 00023a74 30 07 |0 | MOVE.W D7,D0 00023a76 54 80 |T | ADDQ.L #0x2,D0 00023a78 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00023a7e 63 02 |c | BLS 0x23a82 00023a80 4e 4f |NO | TRAP #15 00023a82 3e 00 |> | MOVE.W D0,D7 00023a84 be 53 | S | CMP.W (A3),D7 00023a86 62 06 |b | BHI 0x23a8e 00023a88 4a 12 |J | TST.B (A2) 00023a8a 66 00 ff 70 |f p | BNE 0x239fc 00023a8e 4a 12 |J | TST.B (A2) 00023a90 67 08 |g | BEQ 0x23a9a 00023a92 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023a96 10 bc 00 01 | | MOVE.B #0x01,(A0) 00023a9a 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00023a9e 4e 5e |N^ | UNLK A6 00023aa0 4e 75 |Nu | RTS 00023aa2 ; -------------------------------------------------------------------------------------- 00023aa2 ; OMSI PASCAL Function 00023aa2 ; <LVAR 0x008 4(r)> 00023aa2 ; <LVAR -0x002 2(rw)> 00023aa2 ; <LVAR -0x010 @ 1(r)> 00023aa2 ; -------------------------------------------------------------------------------------- 00023aa2 4e 56 ff 72 |NV r | LINK.W A6,#0xff72 00023aa6 bf d5 | | CMPA.L (A5),A7 00023aa8 62 06 |b | BHI 0x23ab0 00023aaa 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023aae 4e 76 |Nv | TRAPV 00023ab0 de fc 00 7a | z | ADDA.W #0x7a,A7 00023ab4 48 e7 ff c8 |H | MOVEM.L A4+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00023ab8 43 ee ff f0 |C | LEA.L (A6-0x10),A1 00023abc 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023ac0 42 10 |B | CLR.B (A0) 00023ac2 42 80 |B | CLR.L D0 00023ac4 10 39 00 02 97 34 | 9 4 | MOVE.B 0x29734,D0 00023aca 42 81 |B | CLR.L D1 00023acc 12 39 00 02 97 15 | 9 | MOVE.B 0x29715,D1 00023ad2 c0 c1 | | MULU.W D1,D0 00023ad4 42 82 |B | CLR.L D2 00023ad6 14 39 00 02 97 35 | 9 5 | MOVE.B 0x29735,D2 00023adc 52 42 |RB | ADDQ.W #0x1,D2 00023ade d4 40 | @ | ADD.W D0,D2 00023ae0 e2 4a | J | LSR.W #0x1,D2 00023ae2 3a 02 |: | MOVE.W D2,D5 00023ae4 42 80 |B | CLR.L D0 00023ae6 10 39 00 02 97 38 | 9 8 | MOVE.B 0x29738,D0 00023aec c0 c1 | | MULU.W D1,D0 00023aee 42 81 |B | CLR.L D1 00023af0 12 39 00 02 97 39 | 9 9 | MOVE.B 0x29739,D1 00023af6 53 41 |SA | SUBQ.W #0x1,D1 00023af8 42 82 |B | CLR.L D2 00023afa 34 00 |4 | MOVE.W D0,D2 00023afc 48 c1 |H | EXTW.L D1 00023afe d2 82 | | ADD.L D2,D1 00023b00 28 01 |( | MOVE.L D1,D4 00023b02 76 02 |v | MOVEQ.L #0x02,D3 00023b04 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00023b0a 3d 44 ff fe |=D | MOVE.W D4,(A6-0x2) 00023b0e 7c 00 || | MOVEQ.L #0x00,D6 00023b10 3e 05 |> | MOVE.W D5,D7 00023b12 0c 86 00 00 07 ff | | CMPI.L #0x000007ff,D6 00023b18 63 02 |c | BLS 0x23b1c 00023b1a 4e 4f |NO | TRAP #15 00023b1c 20 06 | | MOVE.L D6,D0 00023b1e e5 80 | | ASL.L #0x2,D0 00023b20 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00023b26 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00023b2a 41 e8 24 4c |A $L | LEA.L (A0+0x244c),A0 00023b2e 2f 08 |/ | MOVE.L A0,-(A7) 00023b30 28 5f |(_ | MOVEA.L (A7)+,A4 00023b32 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00023b36 3f 07 |? | MOVE.W D7,-(A7) 00023b38 48 78 00 01 |Hx | PEA.L 0x1 00023b3c 2f 0c |/ | MOVE.L A4,-(A7) 00023b3e 48 51 |HQ | PEA.L (A1) 00023b40 4e b9 00 01 03 6c |N l | JSR RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B) 00023b46 de fc 00 10 | | ADDA.W #0x10,A7 00023b4a 4a 11 |J | TST.B (A1) 00023b4c 66 2e |f. | BNE 0x23b7c 00023b4e 41 fa cc 0e |A | LEA.L 0x2075e,A0 00023b52 70 1e |p | MOVEQ.L #0x1e,D0 00023b54 3f 20 |? | MOVE.W -(A0),-(A7) 00023b56 51 c8 ff fc |Q | DBF D0,0x23b54 00023b5a 59 4f |YO | SUBQ.L #0x4,A7 00023b5c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023b60 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023b64 3f 3c 00 3e |?< > | MOVE.W #0x3e,-(A7) 00023b68 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023b6e 50 4f |PO | ADDQ.L #0x8,A7 00023b70 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023b76 de fc 00 42 | B | ADDA.W #0x42,A7 00023b7a 60 18 |` | BRA 0x23b94 00023b7c 06 86 00 00 01 00 | | ADDI.L #0x00000100,D6 00023b82 42 80 |B | CLR.L D0 00023b84 30 07 |0 | MOVE.W D7,D0 00023b86 54 80 |T | ADDQ.L #0x2,D0 00023b88 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00023b8e 63 02 |c | BLS 0x23b92 00023b90 4e 4f |NO | TRAP #15 00023b92 3e 00 |> | MOVE.W D0,D7 00023b94 be 6e ff fe | n | CMP.W (A6-0x2),D7 00023b98 62 06 |b | BHI 0x23ba0 00023b9a 4a 11 |J | TST.B (A1) 00023b9c 66 00 ff 74 |f t | BNE 0x23b12 00023ba0 4a 11 |J | TST.B (A1) 00023ba2 67 08 |g | BEQ 0x23bac 00023ba4 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023ba8 10 bc 00 01 | | MOVE.B #0x01,(A0) 00023bac 4c df 13 ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A4 00023bb0 4e 5e |N^ | UNLK A6 00023bb2 4e 75 |Nu | RTS 00023bb4 ; -------------------------------------------------------------------------------------- 00023bb4 ; OMSI PASCAL Function 00023bb4 ; <LVAR 0x008 4(r)> 00023bb4 ; <LVAR -0x004 1(rw)> 00023bb4 ; <LVAR -0x01c 2(r)> 00023bb4 ; <LVAR -0x026 2(r)> 00023bb4 ; <LVAR -0x044 @> 00023bb4 ; <LVAR -0x04a @ 4(rw)> 00023bb4 ; <LVAR -0x04e @ 4(rw)> 00023bb4 ; <LVAR -0x05e 4(rw)> 00023bb4 ; <LVAR -0x060 @ 1(r)> 00023bb4 ; -------------------------------------------------------------------------------------- 00023bb4 4e 56 ff 1a |NV | LINK.W A6,#0xff1a 00023bb8 bf d5 | | CMPA.L (A5),A7 00023bba 62 06 |b | BHI 0x23bc2 00023bbc 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023bc0 4e 76 |Nv | TRAPV 00023bc2 de fc 00 86 | | ADDA.W #0x86,A7 00023bc6 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00023bca 45 ee ff a0 |E | LEA.L (A6-0x60),A2 00023bce 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00023bd4 74 01 |t | MOVEQ.L #0x01,D2 00023bd6 76 3e |v> | MOVEQ.L #0x3e,D3 00023bd8 78 03 |x | MOVEQ.L #0x03,D4 00023bda 55 4f |UO | SUBQ.L #0x2,A7 00023bdc 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00023be2 4a 1f |J | TST.B (A7)+ 00023be4 67 04 |g | BEQ 0x23bea 00023be6 60 00 03 32 |` 2 | BRA 0x23f1a 00023bea 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023bee 42 10 |B | CLR.B (A0) 00023bf0 2f 3a cb da |/: | MOVE.L 0x207cc,-(A7) 00023bf4 2f 3a cb d2 |/: | MOVE.L 0x207c8,-(A7) 00023bf8 51 4f |QO | SUBQ.L #0x8,A7 00023bfa 2f 39 00 02 97 04 |/9 | MOVE.L 0x29704,-(A7) 00023c00 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00023c06 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00023c0a 3f 02 |? | MOVE.W D2,-(A7) 00023c0c 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00023c10 4e 93 |N | JSR (A3) 00023c12 50 4f |PO | ADDQ.L #0x8,A7 00023c14 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023c1a 50 4f |PO | ADDQ.L #0x8,A7 00023c1c 2d 5f ff b6 |-_ | MOVE.L (A7)+,(A6-0x4a) 00023c20 50 4f |PO | ADDQ.L #0x8,A7 00023c22 9e c3 | | SUBA.W D3,A7 00023c24 20 4f | O | MOVEA.L A7,A0 00023c26 43 fa cb 36 |C 6 | LEA.L 0x2075e,A1 00023c2a 70 3c |p< | MOVEQ.L #0x3c,D0 00023c2c 10 d9 | | MOVE.B (A1)+,(A0)+ 00023c2e 51 c8 ff fc |Q | DBF D0,0x23c2c 00023c32 51 4f |QO | SUBQ.L #0x8,A7 00023c34 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023c38 3f 02 |? | MOVE.W D2,-(A7) 00023c3a 3f 3c 00 3d |?< = | MOVE.W #0x3d,-(A7) 00023c3e 4e 93 |N | JSR (A3) 00023c40 50 4f |PO | ADDQ.L #0x8,A7 00023c42 48 78 00 00 |Hx | PEA.L 0x0 00023c46 48 78 00 03 |Hx | PEA.L 0x3 00023c4a 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 00023c50 de fc 00 0c | | ADDA.W #0xc,A7 00023c54 20 1f | | MOVE.L (A7)+,D0 00023c56 b0 84 | | CMP.L D4,D0 00023c58 63 02 |c | BLS 0x23c5c 00023c5a 4e 4f |NO | TRAP #15 00023c5c de c3 | | ADDA.W D3,A7 00023c5e 3a 00 |: | MOVE.W D0,D5 00023c60 4b 84 |K | CHK.W D4,D5 00023c62 3f 05 |? | MOVE.W D5,-(A7) 00023c64 42 27 |B' | CLR.B -(A7) 00023c66 1f 02 | | MOVE.B D2,-(A7) 00023c68 48 52 |HR | PEA.L (A2) 00023c6a 4e b9 00 01 04 0c |N | JSR FSCALL_1040c 00023c70 de fc 00 0a | | ADDA.W #0xa,A7 00023c74 4a 12 |J | TST.B (A2) 00023c76 67 0c |g | BEQ 0x23c84 00023c78 1f 02 | | MOVE.B D2,-(A7) 00023c7a 48 52 |HR | PEA.L (A2) 00023c7c 4e b9 00 01 04 28 |N ( | JSR FSCALL_10428 00023c82 5c 4f |\O | ADDQ.L #0x6,A7 00023c84 4a 12 |J | TST.B (A2) 00023c86 66 9a |f | BNE 0x23c22 00023c88 41 ee ff bc |A | LEA.L (A6-0x44),A0 00023c8c 2f 08 |/ | MOVE.L A0,-(A7) 00023c8e 2d 5f ff a2 |-_ | MOVE.L (A7)+,(A6-0x5e) 00023c92 28 6e ff a2 |(n | MOVEA.L (A6-0x5e),A4 00023c96 2f 2e ff a2 |/. | MOVE.L (A6-0x5e),-(A7) 00023c9a 3f 3c 00 40 |?< @ | MOVE.W #0x40,-(A7) 00023c9e 4e b9 00 01 04 18 |N | JSR FSCALL_10418 00023ca4 5c 4f |\O | ADDQ.L #0x6,A7 00023ca6 48 52 |HR | PEA.L (A2) 00023ca8 4e b9 00 01 04 08 |N | JSR FSCALL_10408 00023cae 58 4f |XO | ADDQ.L #0x4,A7 00023cb0 10 12 | | MOVE.B (A2),D0 00023cb2 0c 00 00 06 | | CMPI.B #0x06,D0 00023cb6 66 1a |f | BNE 0x23cd2 00023cb8 2f 2e ff a2 |/. | MOVE.L (A6-0x5e),-(A7) 00023cbc 3f 3c 00 40 |?< @ | MOVE.W #0x40,-(A7) 00023cc0 4e b9 00 01 04 18 |N | JSR FSCALL_10418 00023cc6 5c 4f |\O | ADDQ.L #0x6,A7 00023cc8 48 52 |HR | PEA.L (A2) 00023cca 4e b9 00 01 04 08 |N | JSR FSCALL_10408 00023cd0 58 4f |XO | ADDQ.L #0x4,A7 00023cd2 10 12 | | MOVE.B (A2),D0 00023cd4 0c 00 00 06 | | CMPI.B #0x06,D0 00023cd8 66 36 |f6 | BNE 0x23d10 00023cda 4e b9 00 01 04 10 |N | JSR FSCALL_10410 00023ce0 48 6e ff b6 |Hn | PEA.L (A6-0x4a) 00023ce4 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023cea 58 4f |XO | ADDQ.L #0x4,A7 00023cec 41 fa ca f6 |A | LEA.L 0x207e4,A0 00023cf0 72 04 |r | MOVEQ.L #0x04,D1 00023cf2 2f 20 |/ | MOVE.L -(A0),-(A7) 00023cf4 51 c9 ff fc |Q | DBF D1,0x23cf2 00023cf8 59 4f |YO | SUBQ.L #0x4,A7 00023cfa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023cfe 3f 02 |? | MOVE.W D2,-(A7) 00023d00 3f 3c 00 14 |?< | MOVE.W #0x14,-(A7) 00023d04 4e 93 |N | JSR (A3) 00023d06 50 4f |PO | ADDQ.L #0x8,A7 00023d08 4e ba e8 18 |N | JSR 0x22522 00023d0c de fc 00 18 | | ADDA.W #0x18,A7 00023d10 4a 00 |J | TST.B D0 00023d12 67 46 |gF | BEQ 0x23d5a 00023d14 1f 02 | | MOVE.B D2,-(A7) 00023d16 48 52 |HR | PEA.L (A2) 00023d18 4e b9 00 01 04 28 |N ( | JSR FSCALL_10428 00023d1e 5c 4f |\O | ADDQ.L #0x6,A7 00023d20 4e b9 00 01 04 10 |N | JSR FSCALL_10410 00023d26 48 6e ff b6 |Hn | PEA.L (A6-0x4a) 00023d2a 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023d30 9e fc 00 28 | ( | SUBA.W #0x28,A7 00023d34 20 4f | O | MOVEA.L A7,A0 00023d36 43 fa ca 64 |C d | LEA.L 0x2079c,A1 00023d3a 70 2a |p* | MOVEQ.L #0x2a,D0 00023d3c 10 d9 | | MOVE.B (A1)+,(A0)+ 00023d3e 51 c8 ff fc |Q | DBF D0,0x23d3c 00023d42 59 4f |YO | SUBQ.L #0x4,A7 00023d44 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023d48 3f 02 |? | MOVE.W D2,-(A7) 00023d4a 3f 3c 00 2b |?< + | MOVE.W #0x2b,-(A7) 00023d4e 4e 93 |N | JSR (A3) 00023d50 50 4f |PO | ADDQ.L #0x8,A7 00023d52 4e ba e7 ce |N | JSR 0x22522 00023d56 de fc 00 30 | 0 | ADDA.W #0x30,A7 00023d5a 30 2e ff e4 |0. | MOVE.W (A6-0x1c),D0 00023d5e b0 42 | B | CMP.W D2,D0 00023d60 67 3a |g: | BEQ 0x23d9c 00023d62 4e b9 00 01 04 10 |N | JSR FSCALL_10410 00023d68 48 6e ff b6 |Hn | PEA.L (A6-0x4a) 00023d6c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023d72 9e fc 00 24 | $ | SUBA.W #0x24,A7 00023d76 20 4f | O | MOVEA.L A7,A0 00023d78 43 fa ca 6a |C j | LEA.L 0x207e4,A1 00023d7c 70 26 |p& | MOVEQ.L #0x26,D0 00023d7e 10 d9 | | MOVE.B (A1)+,(A0)+ 00023d80 51 c8 ff fc |Q | DBF D0,0x23d7e 00023d84 59 4f |YO | SUBQ.L #0x4,A7 00023d86 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023d8a 3f 02 |? | MOVE.W D2,-(A7) 00023d8c 3f 3c 00 27 |?< ' | MOVE.W #0x27,-(A7) 00023d90 4e 93 |N | JSR (A3) 00023d92 50 4f |PO | ADDQ.L #0x8,A7 00023d94 4e ba e7 8c |N | JSR 0x22522 00023d98 de fc 00 2c | , | ADDA.W #0x2c,A7 00023d9c 41 ee ff da |A | LEA.L (A6-0x26),A0 00023da0 70 0e |p | MOVEQ.L #0x0e,D0 00023da2 3f 20 |? | MOVE.W -(A0),-(A7) 00023da4 51 c8 ff fc |Q | DBF D0,0x23da2 00023da8 51 4f |QO | SUBQ.L #0x8,A7 00023daa 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00023dae 3f 02 |? | MOVE.W D2,-(A7) 00023db0 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00023db4 4e 93 |N | JSR (A3) 00023db6 50 4f |PO | ADDQ.L #0x8,A7 00023db8 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00023dbe 58 4f |XO | ADDQ.L #0x4,A7 00023dc0 2d 5f ff b2 |-_ | MOVE.L (A7)+,(A6-0x4e) 00023dc4 de fc 00 18 | | ADDA.W #0x18,A7 00023dc8 2e ae ff b2 |. | MOVE.L (A6-0x4e),(A7) 00023dcc 2f 2e ff b6 |/. | MOVE.L (A6-0x4a),-(A7) 00023dd0 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00023dd6 50 4f |PO | ADDQ.L #0x8,A7 00023dd8 10 1f | | MOVE.B (A7)+,D0 00023dda 48 80 |H | EXTB.W D0 00023ddc 41 82 |A | CHK.W D2,D0 00023dde 1d 40 ff fc | @ | MOVE.B D0,(A6-0x4) 00023de2 48 6e ff b2 |Hn | PEA.L (A6-0x4e) 00023de6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023dec 58 4f |XO | ADDQ.L #0x4,A7 00023dee 4a 00 |J | TST.B D0 00023df0 66 78 |fx | BNE 0x23e6a 00023df2 30 2e ff da |0. | MOVE.W (A6-0x26),D0 00023df6 53 40 |S@ | SUBQ.W #0x1,D0 00023df8 48 c0 |H | EXTW.L D0 00023dfa 2f 00 |/ | MOVE.L D0,-(A7) 00023dfc 7c 00 || | MOVEQ.L #0x00,D6 00023dfe bc 97 | | CMP.L (A7),D6 00023e00 6e 66 |nf | BGT 0x23e68 00023e02 41 f9 00 02 9b 1e |A | LEA.L 0x29b1e,A0 00023e08 2f 08 |/ | MOVE.L A0,-(A7) 00023e0a 2e 1f |. | MOVE.L (A7)+,D7 00023e0c 2f 07 |/ | MOVE.L D7,-(A7) 00023e0e 3f 3c 04 00 |?< | MOVE.W #0x400,-(A7) 00023e12 4e b9 00 01 04 18 |N | JSR FSCALL_10418 00023e18 5c 4f |\O | ADDQ.L #0x6,A7 00023e1a 48 52 |HR | PEA.L (A2) 00023e1c 4e b9 00 01 04 08 |N | JSR FSCALL_10408 00023e22 58 4f |XO | ADDQ.L #0x4,A7 00023e24 4a 12 |J | TST.B (A2) 00023e26 67 3c |g< | BEQ 0x23e64 00023e28 1f 02 | | MOVE.B D2,-(A7) 00023e2a 48 52 |HR | PEA.L (A2) 00023e2c 4e b9 00 01 04 28 |N ( | JSR FSCALL_10428 00023e32 5c 4f |\O | ADDQ.L #0x6,A7 00023e34 4e b9 00 01 04 10 |N | JSR FSCALL_10410 00023e3a 9e fc 00 2a | * | SUBA.W #0x2a,A7 00023e3e 20 4f | O | MOVEA.L A7,A0 00023e40 43 fa c9 ca |C | LEA.L 0x2080c,A1 00023e44 70 28 |p( | MOVEQ.L #0x28,D0 00023e46 10 d9 | | MOVE.B (A1)+,(A0)+ 00023e48 51 c8 ff fc |Q | DBF D0,0x23e46 00023e4c 59 4f |YO | SUBQ.L #0x4,A7 00023e4e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023e52 3f 02 |? | MOVE.W D2,-(A7) 00023e54 3f 3c 00 29 |?< ) | MOVE.W #0x29,-(A7) 00023e58 4e 93 |N | JSR (A3) 00023e5a 50 4f |PO | ADDQ.L #0x8,A7 00023e5c 4e ba e6 c4 |N | JSR 0x22522 00023e60 de fc 00 2e | . | ADDA.W #0x2e,A7 00023e64 52 86 |R | ADDQ.L #0x1,D6 00023e66 68 96 |h | BVC 0x23dfe 00023e68 58 4f |XO | ADDQ.L #0x4,A7 00023e6a 4a 2e ff fc |J. | TST.B (A6-0x4) 00023e6e 67 00 fe 26 |g & | BEQ 0x23c96 00023e72 48 6e ff b6 |Hn | PEA.L (A6-0x4a) 00023e76 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023e7c 58 4f |XO | ADDQ.L #0x4,A7 00023e7e 30 2e ff da |0. | MOVE.W (A6-0x26),D0 00023e82 53 40 |S@ | SUBQ.W #0x1,D0 00023e84 48 c0 |H | EXTW.L D0 00023e86 2f 00 |/ | MOVE.L D0,-(A7) 00023e88 7c 00 || | MOVEQ.L #0x00,D6 00023e8a bc 97 | | CMP.L (A7),D6 00023e8c 6e 78 |nx | BGT 0x23f06 00023e8e 20 06 | | MOVE.L D6,D0 00023e90 e1 80 | | ASL.L #0x8,D0 00023e92 0c 80 00 00 07 ff | | CMPI.L #0x000007ff,D0 00023e98 63 02 |c | BLS 0x23e9c 00023e9a 4e 4f |NO | TRAP #15 00023e9c e5 80 | | ASL.L #0x2,D0 00023e9e 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00023ea4 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00023ea8 41 e8 04 4c |A L | LEA.L (A0+0x44c),A0 00023eac 2f 08 |/ | MOVE.L A0,-(A7) 00023eae 2e 1f |. | MOVE.L (A7)+,D7 00023eb0 2f 07 |/ | MOVE.L D7,-(A7) 00023eb2 3f 3c 04 00 |?< | MOVE.W #0x400,-(A7) 00023eb6 4e b9 00 01 04 18 |N | JSR FSCALL_10418 00023ebc 5c 4f |\O | ADDQ.L #0x6,A7 00023ebe 48 52 |HR | PEA.L (A2) 00023ec0 4e b9 00 01 04 08 |N | JSR FSCALL_10408 00023ec6 58 4f |XO | ADDQ.L #0x4,A7 00023ec8 4a 12 |J | TST.B (A2) 00023eca 67 36 |g6 | BEQ 0x23f02 00023ecc 1f 02 | | MOVE.B D2,-(A7) 00023ece 48 52 |HR | PEA.L (A2) 00023ed0 4e b9 00 01 04 28 |N ( | JSR FSCALL_10428 00023ed6 5c 4f |\O | ADDQ.L #0x6,A7 00023ed8 4e b9 00 01 04 10 |N | JSR FSCALL_10410 00023ede 41 fa c9 70 |A p | LEA.L 0x20850,A0 00023ee2 70 0c |p | MOVEQ.L #0x0c,D0 00023ee4 3f 20 |? | MOVE.W -(A0),-(A7) 00023ee6 51 c8 ff fc |Q | DBF D0,0x23ee4 00023eea 59 4f |YO | SUBQ.L #0x4,A7 00023eec 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023ef0 3f 02 |? | MOVE.W D2,-(A7) 00023ef2 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 00023ef6 4e 93 |N | JSR (A3) 00023ef8 50 4f |PO | ADDQ.L #0x8,A7 00023efa 4e ba e6 26 |N & | JSR 0x22522 00023efe de fc 00 1e | | ADDA.W #0x1e,A7 00023f02 52 86 |R | ADDQ.L #0x1,D6 00023f04 68 84 |h | BVC 0x23e8a 00023f06 54 4f |TO | ADDQ.L #0x2,A7 00023f08 42 17 |B | CLR.B (A7) 00023f0a 48 52 |HR | PEA.L (A2) 00023f0c 4e b9 00 01 04 14 |N | JSR FSCALL_10414 00023f12 5c 4f |\O | ADDQ.L #0x6,A7 00023f14 4e b9 00 01 04 10 |N | JSR FSCALL_10410 00023f1a 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00023f1e 10 82 | | MOVE.B D2,(A0) 00023f20 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00023f24 4e 5e |N^ | UNLK A6 00023f26 4e 75 |Nu | RTS 00023f28 ; -------------------------------------------------------------------------------------- 00023f28 ; OMSI PASCAL Function 00023f28 ; <LVAR -0x003 1(r)> 00023f28 ; <LVAR -0x004 1(r)> 00023f28 ; <LVAR -0x006 1(w) 2(w) 4(r)> 00023f28 ; <LVAR -0x008 @ 1(rw)> 00023f28 ; -------------------------------------------------------------------------------------- 00023f28 4e 56 ff 7e |NV ~ | LINK.W A6,#0xff7e 00023f2c bf d5 | | CMPA.L (A5),A7 00023f2e 62 06 |b | BHI 0x23f36 00023f30 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023f34 4e 76 |Nv | TRAPV 00023f36 de fc 00 76 | v | ADDA.W #0x76,A7 00023f3a 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00023f3e 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00023f44 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3 00023f4a 49 f9 00 02 97 0b |I | LEA.L 0x2970b,A4 00023f50 72 01 |r | MOVEQ.L #0x01,D1 00023f52 74 1e |t | MOVEQ.L #0x1e,D2 00023f54 76 2e |v. | MOVEQ.L #0x2e,D3 00023f56 78 2a |x* | MOVEQ.L #0x2a,D4 00023f58 7a 02 |z | MOVEQ.L #0x02,D5 00023f5a 00 2e 00 80 ff fa | . | ORI.B #0x80,(A6-0x6) 00023f60 02 2e 00 bf ff fa | . | ANDI.B #0xbf,(A6-0x6) 00023f66 02 6e c0 00 ff fa | n | ANDI.W #0xc000,(A6-0x6) 00023f6c 42 2e ff fc |B. | CLR.B (A6-0x4) 00023f70 42 2e ff fd |B. | CLR.B (A6-0x3) 00023f74 7c 00 || | MOVEQ.L #0x00,D6 00023f76 0c 86 00 00 07 ff | | CMPI.L #0x000007ff,D6 00023f7c 63 02 |c | BLS 0x23f80 00023f7e 4e 4f |NO | TRAP #15 00023f80 20 06 | | MOVE.L D6,D0 00023f82 e5 80 | | ASL.L #0x2,D0 00023f84 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00023f8a 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00023f8e 21 6e ff fa 04 4c |!n L | MOVE.L (A6-0x6),(A0+0x44c) 00023f94 52 86 |R | ADDQ.L #0x1,D6 00023f96 0c 86 00 00 07 ff | | CMPI.L #0x000007ff,D6 00023f9c 6f d8 |o | BLE 0x23f76 00023f9e 4a 39 00 02 97 08 |J9 | TST.B 0x29708 00023fa4 67 38 |g8 | BEQ 0x23fde 00023fa6 4a 39 00 02 db 1e |J9 | TST.B 0x2db1e 00023fac 66 30 |f0 | BNE 0x23fde 00023fae 41 fa c8 be |A | LEA.L 0x2086e,A0 00023fb2 70 0e |p | MOVEQ.L #0x0e,D0 00023fb4 3f 20 |? | MOVE.W -(A0),-(A7) 00023fb6 51 c8 ff fc |Q | DBF D0,0x23fb4 00023fba 5d 4f |]O | SUBQ.L #0x6,A7 00023fbc 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00023fc0 3f 01 |? | MOVE.W D1,-(A7) 00023fc2 3f 02 |? | MOVE.W D2,-(A7) 00023fc4 4e 92 |N | JSR (A2) 00023fc6 5c 4f |\O | ADDQ.L #0x6,A7 00023fc8 42 17 |B | CLR.B (A7) 00023fca 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00023fd0 5c 4f |\O | ADDQ.L #0x6,A7 00023fd2 10 1f | | MOVE.B (A7)+,D0 00023fd4 48 80 |H | EXTB.W D0 00023fd6 41 81 |A | CHK.W D1,D0 00023fd8 de c2 | | ADDA.W D2,A7 00023fda 18 80 | | MOVE.B D0,(A4) 00023fdc 60 24 |`$ | BRA 0x24002 00023fde 18 81 | | MOVE.B D1,(A4) 00023fe0 41 fa c8 e2 |A | LEA.L 0x208c4,A0 00023fe4 70 0a |p | MOVEQ.L #0x0a,D0 00023fe6 3f 20 |? | MOVE.W -(A0),-(A7) 00023fe8 51 c8 ff fc |Q | DBF D0,0x23fe6 00023fec 59 4f |YO | SUBQ.L #0x4,A7 00023fee 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023ff2 3f 01 |? | MOVE.W D1,-(A7) 00023ff4 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 00023ff8 4e 92 |N | JSR (A2) 00023ffa 50 4f |PO | ADDQ.L #0x8,A7 00023ffc 4e 93 |N | JSR (A3) 00023ffe de fc 00 1a | | ADDA.W #0x1a,A7 00024002 55 4f |UO | SUBQ.L #0x2,A7 00024004 4e b9 00 01 06 10 |N | JSR Is_machine_type_one_or_three() : Bool 0002400a 4a 1f |J | TST.B (A7)+ 0002400c 67 06 |g | BEQ 0x24014 0002400e 7e 02 |~ | MOVEQ.L #0x02,D7 00024010 60 00 01 16 |` | BRA 0x24128 00024014 4a 14 |J | TST.B (A4) 00024016 66 06 |f | BNE 0x2401e 00024018 7e 00 |~ | MOVEQ.L #0x00,D7 0002401a 60 00 01 0c |` | BRA 0x24128 0002401e 4a 39 00 02 97 08 |J9 | TST.B 0x29708 00024024 67 08 |g | BEQ 0x2402e 00024026 4a 39 00 02 db 1e |J9 | TST.B 0x2db1e 0002402c 67 06 |g | BEQ 0x24034 0002402e 7e 01 |~ | MOVEQ.L #0x01,D7 00024030 60 00 00 f6 |` | BRA 0x24128 00024034 41 fa c8 ba |A | LEA.L 0x208f0,A0 00024038 70 0a |p | MOVEQ.L #0x0a,D0 0002403a 2f 20 |/ | MOVE.L -(A0),-(A7) 0002403c 51 c8 ff fc |Q | DBF D0,0x2403a 00024040 59 4f |YO | SUBQ.L #0x4,A7 00024042 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024046 3f 01 |? | MOVE.W D1,-(A7) 00024048 3f 3c 00 2c |?< , | MOVE.W #0x2c,-(A7) 0002404c 4e 92 |N | JSR (A2) 0002404e 50 4f |PO | ADDQ.L #0x8,A7 00024050 4e 93 |N | JSR (A3) 00024052 de c3 | | ADDA.W D3,A7 00024054 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 0002405a 4a 1f |J | TST.B (A7)+ 0002405c 67 46 |gF | BEQ 0x240a4 0002405e 41 fa c9 10 |A | LEA.L 0x20970,A0 00024062 70 0b |p | MOVEQ.L #0x0b,D0 00024064 2f 20 |/ | MOVE.L -(A0),-(A7) 00024066 51 c8 ff fc |Q | DBF D0,0x24064 0002406a 59 4f |YO | SUBQ.L #0x4,A7 0002406c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024070 3f 01 |? | MOVE.W D1,-(A7) 00024072 3f 3c 00 30 |?< 0 | MOVE.W #0x30,-(A7) 00024076 4e 92 |N | JSR (A2) 00024078 50 4f |PO | ADDQ.L #0x8,A7 0002407a 4e 93 |N | JSR (A3) 0002407c 54 4f |TO | ADDQ.L #0x2,A7 0002407e 20 4f | O | MOVEA.L A7,A0 00024080 43 fa c8 ee |C | LEA.L 0x20970,A1 00024084 70 30 |p0 | MOVEQ.L #0x30,D0 00024086 10 d9 | | MOVE.B (A1)+,(A0)+ 00024088 51 c8 ff fc |Q | DBF D0,0x24086 0002408c 59 4f |YO | SUBQ.L #0x4,A7 0002408e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024092 3f 01 |? | MOVE.W D1,-(A7) 00024094 3f 3c 00 31 |?< 1 | MOVE.W #0x31,-(A7) 00024098 4e 92 |N | JSR (A2) 0002409a 50 4f |PO | ADDQ.L #0x8,A7 0002409c 4e 93 |N | JSR (A3) 0002409e de fc 00 36 | 6 | ADDA.W #0x36,A7 000240a2 60 44 |`D | BRA 0x240e8 000240a4 9e fc 00 26 | & | SUBA.W #0x26,A7 000240a8 20 4f | O | MOVEA.L A7,A0 000240aa 43 fa c8 44 |C D | LEA.L 0x208f0,A1 000240ae 70 24 |p$ | MOVEQ.L #0x24,D0 000240b0 10 d9 | | MOVE.B (A1)+,(A0)+ 000240b2 51 c8 ff fc |Q | DBF D0,0x240b0 000240b6 59 4f |YO | SUBQ.L #0x4,A7 000240b8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000240bc 3f 01 |? | MOVE.W D1,-(A7) 000240be 3f 3c 00 25 |?< % | MOVE.W #0x25,-(A7) 000240c2 4e 92 |N | JSR (A2) 000240c4 50 4f |PO | ADDQ.L #0x8,A7 000240c6 4e 93 |N | JSR (A3) 000240c8 de c4 | | ADDA.W D4,A7 000240ca 41 fa c8 74 |A t | LEA.L 0x20940,A0 000240ce 70 14 |p | MOVEQ.L #0x14,D0 000240d0 3f 20 |? | MOVE.W -(A0),-(A7) 000240d2 51 c8 ff fc |Q | DBF D0,0x240d0 000240d6 59 4f |YO | SUBQ.L #0x4,A7 000240d8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000240dc 3f 01 |? | MOVE.W D1,-(A7) 000240de 3f 04 |? | MOVE.W D4,-(A7) 000240e0 4e 92 |N | JSR (A2) 000240e2 50 4f |PO | ADDQ.L #0x8,A7 000240e4 4e 93 |N | JSR (A3) 000240e6 de c3 | | ADDA.W D3,A7 000240e8 2f 3a c7 90 |/: | MOVE.L 0x2087a,-(A7) 000240ec 2f 3a c7 88 |/: | MOVE.L 0x20876,-(A7) 000240f0 2f 3a c7 80 |/: | MOVE.L 0x20872,-(A7) 000240f4 2f 3a c7 78 |/: x | MOVE.L 0x2086e,-(A7) 000240f8 51 4f |QO | SUBQ.L #0x8,A7 000240fa 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000240fe 3f 01 |? | MOVE.W D1,-(A7) 00024100 3f 3c 00 10 |?< | MOVE.W #0x10,-(A7) 00024104 4e 92 |N | JSR (A2) 00024106 50 4f |PO | ADDQ.L #0x8,A7 00024108 48 78 00 00 |Hx | PEA.L 0x0 0002410c 48 78 00 01 |Hx | PEA.L 0x1 00024110 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 00024116 de fc 00 0c | | ADDA.W #0xc,A7 0002411a 10 2f 00 03 | / | MOVE.B (A7+0x3),D0 0002411e 48 80 |H | EXTB.W D0 00024120 41 85 |A | CHK.W D5,D0 00024122 de fc 00 14 | | ADDA.W #0x14,A7 00024126 1e 00 | | MOVE.B D0,D7 00024128 10 07 | | MOVE.B D7,D0 0002412a 48 80 |H | EXTB.W D0 0002412c b0 45 | E | CMP.W D5,D0 0002412e 63 02 |c | BLS 0x24132 00024130 4e 4e |NN | TRAP #14 00024132 d0 40 | @ | ADD.W D0,D0 00024134 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 0002413c 00 06 | | .CONST 0x6 ; [0x0] -> 0x24142 0002413e 00 12 | | .CONST 0x12 ; [0x1] -> 0x2414e 00024140 00 1c | | .CONST 0x1c ; [0x2] -> 0x24158 00024142 switch@0x24134[0x0]: 00024142 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00024146 4e ba f7 fe |N | JSR 0x23946 0002414a 58 4f |XO | ADDQ.L #0x4,A7 0002414c 60 0e |` | BRA 0x2415c 0002414e switch@0x24134[0x1]: 0002414e 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00024152 4e ba fa 60 |N ` | JSR 0x23bb4 00024156 60 f2 |` | BRA 0x2414a 00024158 switch@0x24134[0x2]: 00024158 1d 41 ff f8 | A | MOVE.B D1,(A6-0x8) 0002415c 4a 2e ff f8 |J. | TST.B (A6-0x8) 00024160 67 00 fe 3c |g < | BEQ 0x23f9e 00024164 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00024168 4e 5e |N^ | UNLK A6 0002416a 4e 75 |Nu | RTS 0002416c ; -------------------------------------------------------------------------------------- 0002416c ; OMSI PASCAL Function 0002416c ; <LVAR -0x001 1(r)> 0002416c ; <LVAR -0x002 1(r)> 0002416c ; <LVAR -0x004 1(w) 2(w) 4(r)> 0002416c ; -------------------------------------------------------------------------------------- 0002416c 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 00024170 bf d5 | | CMPA.L (A5),A7 00024172 62 06 |b | BHI 0x2417a 00024174 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024178 4e 76 |Nv | TRAPV 0002417a de fc 00 24 | $ | ADDA.W #0x24,A7 0002417e 48 e7 81 c0 |H | MOVEM.L A1+A0+D7+D0,-(A7) 00024182 43 ee ff fc |C | LEA.L (A6-0x4),A1 00024186 55 4f |UO | SUBQ.L #0x2,A7 00024188 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 0002418e 4a 1f |J | TST.B (A7)+ 00024190 67 08 |g | BEQ 0x2419a 00024192 13 fc 00 01 00 02 eb 32 | 2| MOVE.B #0x01,0x2eb32 0002419a 00 11 00 80 | | ORI.B #0x80,(A1) 0002419e 02 11 00 bf | | ANDI.B #0xbf,(A1) 000241a2 02 51 c0 00 | Q | ANDI.W #0xc000,(A1) 000241a6 42 2e ff fe |B. | CLR.B (A6-0x2) 000241aa 42 2e ff ff |B. | CLR.B (A6-0x1) 000241ae 7e 00 |~ | MOVEQ.L #0x00,D7 000241b0 0c 87 00 00 07 ff | | CMPI.L #0x000007ff,D7 000241b6 63 02 |c | BLS 0x241ba 000241b8 4e 4f |NO | TRAP #15 000241ba 20 07 | | MOVE.L D7,D0 000241bc e5 80 | | ASL.L #0x2,D0 000241be 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 000241c4 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 000241c8 10 28 04 4c | ( L | MOVE.B (A0+0x44c),D0 000241cc e3 08 | | LSL.B #0x1,D0 000241ce ee 08 | | LSR.B #0x7,D0 000241d0 67 04 |g | BEQ 0x241d6 000241d2 21 51 04 4c |!Q L | MOVE.L (A1),(A0+0x44c) 000241d6 52 87 |R | ADDQ.L #0x1,D7 000241d8 0c 87 00 00 07 ff | | CMPI.L #0x000007ff,D7 000241de 6f d0 |o | BLE 0x241b0 000241e0 4c df 03 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1 000241e4 4e 5e |N^ | UNLK A6 000241e6 4e 75 |Nu | RTS 000241e8 ; -------------------------------------------------------------------------------------- 000241e8 ; OMSI PASCAL Function 000241e8 ; <LVAR 0x008 4(r)> 000241e8 ; -------------------------------------------------------------------------------------- 000241e8 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 000241ec bf d5 | | CMPA.L (A5),A7 000241ee 62 06 |b | BHI 0x241f6 000241f0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000241f4 4e 76 |Nv | TRAPV 000241f6 de fc 00 2e | . | ADDA.W #0x2e,A7 000241fa 48 e7 c0 c0 |H | MOVEM.L A1+A0+D1+D0,-(A7) 000241fe 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00024202 20 54 | T | MOVEA.L (A4),A0 00024204 4a 50 |JP | TST.W (A0) 00024206 66 12 |f | BNE 0x2421a 00024208 59 4f |YO | SUBQ.L #0x4,A7 0002420a 2f 14 |/ | MOVE.L (A4),-(A7) 0002420c 2f 11 |/ | MOVE.L (A1),-(A7) 0002420e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024214 50 4f |PO | ADDQ.L #0x8,A7 00024216 28 9f |( | MOVE.L (A7)+,(A4) 00024218 60 52 |`R | BRA 0x2426c 0002421a 30 10 |0 | MOVE.W (A0),D0 0002421c 48 c0 |H | EXTW.L D0 0002421e 54 80 |T | ADDQ.L #0x2,D0 00024220 20 51 | Q | MOVEA.L (A1),A0 00024222 32 10 |2 | MOVE.W (A0),D1 00024224 48 c1 |H | EXTW.L D1 00024226 d2 80 | | ADD.L D0,D1 00024228 0c 81 00 00 00 50 | P | CMPI.L #0x00000050,D1 0002422e 6e 30 |n0 | BGT 0x24260 00024230 3f 3a c7 70 |?: p | MOVE.W 0x209a2,-(A7) 00024234 59 4f |YO | SUBQ.L #0x4,A7 00024236 2f 14 |/ | MOVE.L (A4),-(A7) 00024238 59 4f |YO | SUBQ.L #0x4,A7 0002423a 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002423e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00024242 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00024246 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002424c 58 4f |XO | ADDQ.L #0x4,A7 0002424e 2e 91 |. | MOVE.L (A1),(A7) 00024250 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00024256 de fc 00 0c | | ADDA.W #0xc,A7 0002425a 28 9f |( | MOVE.L (A7)+,(A4) 0002425c 54 4f |TO | ADDQ.L #0x2,A7 0002425e 60 0c |` | BRA 0x2426c 00024260 2f 14 |/ | MOVE.L (A4),-(A7) 00024262 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00024268 58 4f |XO | ADDQ.L #0x4,A7 0002426a 28 91 |( | MOVE.L (A1),(A4) 0002426c 4c df 03 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1 00024270 4e 5e |N^ | UNLK A6 00024272 4e 75 |Nu | RTS 00024274 ; -------------------------------------------------------------------------------------- 00024274 ; OMSI PASCAL Function 00024274 ; <LVAR 0x010 2(r)> 00024274 ; <LVAR 0x00e 2(r)> 00024274 ; <LVAR 0x00c 2(r)> 00024274 ; <LVAR 0x00a 2(r)> 00024274 ; <LVAR 0x008 2(r)> 00024274 ; <LVAR -0x006 @> 00024274 ; -------------------------------------------------------------------------------------- 00024274 4e 56 ff 98 |NV | LINK.W A6,#0xff98 00024278 bf d5 | | CMPA.L (A5),A7 0002427a 62 06 |b | BHI 0x24282 0002427c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024280 4e 76 |Nv | TRAPV 00024282 de fc 00 62 | b | ADDA.W #0x62,A7 00024286 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002428a 45 ee ff fa |E | LEA.L (A6-0x6),A2 0002428e 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00024294 72 01 |r | MOVEQ.L #0x01,D1 00024296 74 14 |t | MOVEQ.L #0x14,D2 00024298 76 10 |v | MOVEQ.L #0x10,D3 0002429a 78 12 |x | MOVEQ.L #0x12,D4 0002429c 7a 16 |z | MOVEQ.L #0x16,D5 0002429e 7c 0e || | MOVEQ.L #0x0e,D6 000242a0 7e 18 |~ | MOVEQ.L #0x18,D7 000242a2 48 52 |HR | PEA.L (A2) 000242a4 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000242aa 58 4f |XO | ADDQ.L #0x4,A7 000242ac 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 000242b0 02 40 80 00 | @ | ANDI.W #0x8000,D0 000242b4 67 28 |g( | BEQ 0x242de 000242b6 9e c4 | | SUBA.W D4,A7 000242b8 20 4f | O | MOVEA.L A7,A0 000242ba 43 fa c6 e8 |C | LEA.L 0x209a4,A1 000242be 70 10 |p | MOVEQ.L #0x10,D0 000242c0 10 d9 | | MOVE.B (A1)+,(A0)+ 000242c2 51 c8 ff fc |Q | DBF D0,0x242c0 000242c6 59 4f |YO | SUBQ.L #0x4,A7 000242c8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000242cc 3f 01 |? | MOVE.W D1,-(A7) 000242ce 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 000242d2 4e 93 |N | JSR (A3) 000242d4 50 4f |PO | ADDQ.L #0x8,A7 000242d6 28 4a |(J | MOVEA.L A2,A4 000242d8 4e ba ff 0e |N | JSR 0x241e8 000242dc de c5 | | ADDA.W D5,A7 000242de 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 000242e2 02 40 40 00 | @@ | ANDI.W #0x4000,D0 000242e6 67 22 |g" | BEQ 0x2430a 000242e8 41 fa c6 da |A | LEA.L 0x209c4,A0 000242ec 70 06 |p | MOVEQ.L #0x06,D0 000242ee 3f 20 |? | MOVE.W -(A0),-(A7) 000242f0 51 c8 ff fc |Q | DBF D0,0x242ee 000242f4 59 4f |YO | SUBQ.L #0x4,A7 000242f6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000242fa 3f 01 |? | MOVE.W D1,-(A7) 000242fc 3f 06 |? | MOVE.W D6,-(A7) 000242fe 4e 93 |N | JSR (A3) 00024300 50 4f |PO | ADDQ.L #0x8,A7 00024302 28 4a |(J | MOVEA.L A2,A4 00024304 4e ba fe e2 |N | JSR 0x241e8 00024308 de c4 | | ADDA.W D4,A7 0002430a 30 2e 00 0a |0. | MOVE.W (A6+0xa),D0 0002430e 02 40 80 00 | @ | ANDI.W #0x8000,D0 00024312 67 2a |g* | BEQ 0x2433e 00024314 9e fc 00 0a | | SUBA.W #0xa,A7 00024318 20 4f | O | MOVEA.L A7,A0 0002431a 43 fa c6 a8 |C | LEA.L 0x209c4,A1 0002431e 70 08 |p | MOVEQ.L #0x08,D0 00024320 10 d9 | | MOVE.B (A1)+,(A0)+ 00024322 51 c8 ff fc |Q | DBF D0,0x24320 00024326 59 4f |YO | SUBQ.L #0x4,A7 00024328 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002432c 3f 01 |? | MOVE.W D1,-(A7) 0002432e 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00024332 4e 93 |N | JSR (A3) 00024334 50 4f |PO | ADDQ.L #0x8,A7 00024336 28 4a |(J | MOVEA.L A2,A4 00024338 4e ba fe ae |N | JSR 0x241e8 0002433c de c6 | | ADDA.W D6,A7 0002433e 30 2e 00 0a |0. | MOVE.W (A6+0xa),D0 00024342 02 40 40 00 | @@ | ANDI.W #0x4000,D0 00024346 67 28 |g( | BEQ 0x24370 00024348 9e c4 | | SUBA.W D4,A7 0002434a 20 4f | O | MOVEA.L A7,A0 0002434c 43 fa c6 80 |C | LEA.L 0x209ce,A1 00024350 70 10 |p | MOVEQ.L #0x10,D0 00024352 10 d9 | | MOVE.B (A1)+,(A0)+ 00024354 51 c8 ff fc |Q | DBF D0,0x24352 00024358 59 4f |YO | SUBQ.L #0x4,A7 0002435a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002435e 3f 01 |? | MOVE.W D1,-(A7) 00024360 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 00024364 4e 93 |N | JSR (A3) 00024366 50 4f |PO | ADDQ.L #0x8,A7 00024368 28 4a |(J | MOVEA.L A2,A4 0002436a 4e ba fe 7c |N | | JSR 0x241e8 0002436e de c5 | | ADDA.W D5,A7 00024370 30 2e 00 0a |0. | MOVE.W (A6+0xa),D0 00024374 02 40 20 00 | @ | ANDI.W #0x2000,D0 00024378 67 28 |g( | BEQ 0x243a2 0002437a 9e c2 | | SUBA.W D2,A7 0002437c 20 4f | O | MOVEA.L A7,A0 0002437e 43 fa c6 60 |C ` | LEA.L 0x209e0,A1 00024382 70 12 |p | MOVEQ.L #0x12,D0 00024384 10 d9 | | MOVE.B (A1)+,(A0)+ 00024386 51 c8 ff fc |Q | DBF D0,0x24384 0002438a 59 4f |YO | SUBQ.L #0x4,A7 0002438c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024390 3f 01 |? | MOVE.W D1,-(A7) 00024392 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00024396 4e 93 |N | JSR (A3) 00024398 50 4f |PO | ADDQ.L #0x8,A7 0002439a 28 4a |(J | MOVEA.L A2,A4 0002439c 4e ba fe 4a |N J | JSR 0x241e8 000243a0 de c7 | | ADDA.W D7,A7 000243a2 30 2e 00 0a |0. | MOVE.W (A6+0xa),D0 000243a6 02 40 10 00 | @ | ANDI.W #0x1000,D0 000243aa 67 22 |g" | BEQ 0x243ce 000243ac 41 fa c6 58 |A X | LEA.L 0x20a06,A0 000243b0 70 08 |p | MOVEQ.L #0x08,D0 000243b2 3f 20 |? | MOVE.W -(A0),-(A7) 000243b4 51 c8 ff fc |Q | DBF D0,0x243b2 000243b8 59 4f |YO | SUBQ.L #0x4,A7 000243ba 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000243be 3f 01 |? | MOVE.W D1,-(A7) 000243c0 3f 04 |? | MOVE.W D4,-(A7) 000243c2 4e 93 |N | JSR (A3) 000243c4 50 4f |PO | ADDQ.L #0x8,A7 000243c6 28 4a |(J | MOVEA.L A2,A4 000243c8 4e ba fe 1e |N | JSR 0x241e8 000243cc de c5 | | ADDA.W D5,A7 000243ce 30 2e 00 0a |0. | MOVE.W (A6+0xa),D0 000243d2 02 40 08 00 | @ | ANDI.W #0x0800,D0 000243d6 67 28 |g( | BEQ 0x24400 000243d8 9e c2 | | SUBA.W D2,A7 000243da 20 4f | O | MOVEA.L A7,A0 000243dc 43 fa c6 28 |C ( | LEA.L 0x20a06,A1 000243e0 70 12 |p | MOVEQ.L #0x12,D0 000243e2 10 d9 | | MOVE.B (A1)+,(A0)+ 000243e4 51 c8 ff fc |Q | DBF D0,0x243e2 000243e8 59 4f |YO | SUBQ.L #0x4,A7 000243ea 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000243ee 3f 01 |? | MOVE.W D1,-(A7) 000243f0 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 000243f4 4e 93 |N | JSR (A3) 000243f6 50 4f |PO | ADDQ.L #0x8,A7 000243f8 28 4a |(J | MOVEA.L A2,A4 000243fa 4e ba fd ec |N | JSR 0x241e8 000243fe de c7 | | ADDA.W D7,A7 00024400 30 2e 00 0a |0. | MOVE.W (A6+0xa),D0 00024404 02 40 04 00 | @ | ANDI.W #0x0400,D0 00024408 67 28 |g( | BEQ 0x24432 0002440a 9e c6 | | SUBA.W D6,A7 0002440c 20 4f | O | MOVEA.L A7,A0 0002440e 43 fa c6 0a |C | LEA.L 0x20a1a,A1 00024412 70 0c |p | MOVEQ.L #0x0c,D0 00024414 10 d9 | | MOVE.B (A1)+,(A0)+ 00024416 51 c8 ff fc |Q | DBF D0,0x24414 0002441a 59 4f |YO | SUBQ.L #0x4,A7 0002441c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024420 3f 01 |? | MOVE.W D1,-(A7) 00024422 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 00024426 4e 93 |N | JSR (A3) 00024428 50 4f |PO | ADDQ.L #0x8,A7 0002442a 28 4a |(J | MOVEA.L A2,A4 0002442c 4e ba fd ba |N | JSR 0x241e8 00024430 de c4 | | ADDA.W D4,A7 00024432 30 2e 00 0a |0. | MOVE.W (A6+0xa),D0 00024436 02 40 02 00 | @ | ANDI.W #0x0200,D0 0002443a 67 22 |g" | BEQ 0x2445e 0002443c 41 fa c5 f8 |A | LEA.L 0x20a36,A0 00024440 70 06 |p | MOVEQ.L #0x06,D0 00024442 3f 20 |? | MOVE.W -(A0),-(A7) 00024444 51 c8 ff fc |Q | DBF D0,0x24442 00024448 59 4f |YO | SUBQ.L #0x4,A7 0002444a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002444e 3f 01 |? | MOVE.W D1,-(A7) 00024450 3f 06 |? | MOVE.W D6,-(A7) 00024452 4e 93 |N | JSR (A3) 00024454 50 4f |PO | ADDQ.L #0x8,A7 00024456 28 4a |(J | MOVEA.L A2,A4 00024458 4e ba fd 8e |N | JSR 0x241e8 0002445c de c4 | | ADDA.W D4,A7 0002445e 30 2e 00 0a |0. | MOVE.W (A6+0xa),D0 00024462 02 40 00 40 | @ @ | ANDI.W #0x0040,D0 00024466 66 28 |f( | BNE 0x24490 00024468 9e c3 | | SUBA.W D3,A7 0002446a 20 4f | O | MOVEA.L A7,A0 0002446c 43 fa c5 c8 |C | LEA.L 0x20a36,A1 00024470 70 0e |p | MOVEQ.L #0x0e,D0 00024472 10 d9 | | MOVE.B (A1)+,(A0)+ 00024474 51 c8 ff fc |Q | DBF D0,0x24472 00024478 59 4f |YO | SUBQ.L #0x4,A7 0002447a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002447e 3f 01 |? | MOVE.W D1,-(A7) 00024480 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00024484 4e 93 |N | JSR (A3) 00024486 50 4f |PO | ADDQ.L #0x8,A7 00024488 28 4a |(J | MOVEA.L A2,A4 0002448a 4e ba fd 5c |N \ | JSR 0x241e8 0002448e de c2 | | ADDA.W D2,A7 00024490 30 2e 00 0a |0. | MOVE.W (A6+0xa),D0 00024494 02 40 00 08 | @ | ANDI.W #0x0008,D0 00024498 67 28 |g( | BEQ 0x244c2 0002449a 9e c2 | | SUBA.W D2,A7 0002449c 20 4f | O | MOVEA.L A7,A0 0002449e 43 fa c5 a6 |C | LEA.L 0x20a46,A1 000244a2 70 12 |p | MOVEQ.L #0x12,D0 000244a4 10 d9 | | MOVE.B (A1)+,(A0)+ 000244a6 51 c8 ff fc |Q | DBF D0,0x244a4 000244aa 59 4f |YO | SUBQ.L #0x4,A7 000244ac 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000244b0 3f 01 |? | MOVE.W D1,-(A7) 000244b2 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 000244b6 4e 93 |N | JSR (A3) 000244b8 50 4f |PO | ADDQ.L #0x8,A7 000244ba 28 4a |(J | MOVEA.L A2,A4 000244bc 4e ba fd 2a |N * | JSR 0x241e8 000244c0 de c7 | | ADDA.W D7,A7 000244c2 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 000244c6 02 40 80 00 | @ | ANDI.W #0x8000,D0 000244ca 67 26 |g& | BEQ 0x244f2 000244cc 2f 3a c5 98 |/: | MOVE.L 0x20a66,-(A7) 000244d0 2f 3a c5 90 |/: | MOVE.L 0x20a62,-(A7) 000244d4 2f 3a c5 88 |/: | MOVE.L 0x20a5e,-(A7) 000244d8 2f 3a c5 80 |/: | MOVE.L 0x20a5a,-(A7) 000244dc 59 4f |YO | SUBQ.L #0x4,A7 000244de 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000244e2 3f 01 |? | MOVE.W D1,-(A7) 000244e4 3f 03 |? | MOVE.W D3,-(A7) 000244e6 4e 93 |N | JSR (A3) 000244e8 50 4f |PO | ADDQ.L #0x8,A7 000244ea 28 4a |(J | MOVEA.L A2,A4 000244ec 4e ba fc fa |N | JSR 0x241e8 000244f0 de c2 | | ADDA.W D2,A7 000244f2 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 000244f6 02 40 40 00 | @@ | ANDI.W #0x4000,D0 000244fa 67 2a |g* | BEQ 0x24526 000244fc 5d 4f |]O | SUBQ.L #0x6,A7 000244fe 20 4f | O | MOVEA.L A7,A0 00024500 43 fa c5 68 |C h | LEA.L 0x20a6a,A1 00024504 70 04 |p | MOVEQ.L #0x04,D0 00024506 10 d9 | | MOVE.B (A1)+,(A0)+ 00024508 51 c8 ff fc |Q | DBF D0,0x24506 0002450c 59 4f |YO | SUBQ.L #0x4,A7 0002450e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024512 3f 01 |? | MOVE.W D1,-(A7) 00024514 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 00024518 4e 93 |N | JSR (A3) 0002451a 50 4f |PO | ADDQ.L #0x8,A7 0002451c 28 4a |(J | MOVEA.L A2,A4 0002451e 4e ba fc c8 |N | JSR 0x241e8 00024522 de fc 00 0a | | ADDA.W #0xa,A7 00024526 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 0002452a 02 40 20 00 | @ | ANDI.W #0x2000,D0 0002452e 67 2a |g* | BEQ 0x2455a 00024530 9e c7 | | SUBA.W D7,A7 00024532 20 4f | O | MOVEA.L A7,A0 00024534 43 fa c5 3a |C : | LEA.L 0x20a70,A1 00024538 70 16 |p | MOVEQ.L #0x16,D0 0002453a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002453c 51 c8 ff fc |Q | DBF D0,0x2453a 00024540 59 4f |YO | SUBQ.L #0x4,A7 00024542 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024546 3f 01 |? | MOVE.W D1,-(A7) 00024548 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 0002454c 4e 93 |N | JSR (A3) 0002454e 50 4f |PO | ADDQ.L #0x8,A7 00024550 28 4a |(J | MOVEA.L A2,A4 00024552 4e ba fc 94 |N | JSR 0x241e8 00024556 de fc 00 1c | | ADDA.W #0x1c,A7 0002455a 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 0002455e 02 40 10 00 | @ | ANDI.W #0x1000,D0 00024562 67 22 |g" | BEQ 0x24586 00024564 41 fa c5 30 |A 0 | LEA.L 0x20a96,A0 00024568 70 06 |p | MOVEQ.L #0x06,D0 0002456a 3f 20 |? | MOVE.W -(A0),-(A7) 0002456c 51 c8 ff fc |Q | DBF D0,0x2456a 00024570 59 4f |YO | SUBQ.L #0x4,A7 00024572 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024576 3f 01 |? | MOVE.W D1,-(A7) 00024578 3f 06 |? | MOVE.W D6,-(A7) 0002457a 4e 93 |N | JSR (A3) 0002457c 50 4f |PO | ADDQ.L #0x8,A7 0002457e 28 4a |(J | MOVEA.L A2,A4 00024580 4e ba fc 66 |N f | JSR 0x241e8 00024584 de c4 | | ADDA.W D4,A7 00024586 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 0002458a 02 40 08 00 | @ | ANDI.W #0x0800,D0 0002458e 67 24 |g$ | BEQ 0x245b4 00024590 41 fa c5 0e |A | LEA.L 0x20aa0,A0 00024594 70 04 |p | MOVEQ.L #0x04,D0 00024596 3f 20 |? | MOVE.W -(A0),-(A7) 00024598 51 c8 ff fc |Q | DBF D0,0x24596 0002459c 59 4f |YO | SUBQ.L #0x4,A7 0002459e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000245a2 3f 01 |? | MOVE.W D1,-(A7) 000245a4 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 000245a8 4e 93 |N | JSR (A3) 000245aa 50 4f |PO | ADDQ.L #0x8,A7 000245ac 28 4a |(J | MOVEA.L A2,A4 000245ae 4e ba fc 38 |N 8 | JSR 0x241e8 000245b2 de c6 | | ADDA.W D6,A7 000245b4 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 000245b8 02 40 04 00 | @ | ANDI.W #0x0400,D0 000245bc 67 24 |g$ | BEQ 0x245e2 000245be 41 fa c4 f6 |A | LEA.L 0x20ab6,A0 000245c2 70 0a |p | MOVEQ.L #0x0a,D0 000245c4 3f 20 |? | MOVE.W -(A0),-(A7) 000245c6 51 c8 ff fc |Q | DBF D0,0x245c4 000245ca 59 4f |YO | SUBQ.L #0x4,A7 000245cc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000245d0 3f 01 |? | MOVE.W D1,-(A7) 000245d2 3f 05 |? | MOVE.W D5,-(A7) 000245d4 4e 93 |N | JSR (A3) 000245d6 50 4f |PO | ADDQ.L #0x8,A7 000245d8 28 4a |(J | MOVEA.L A2,A4 000245da 4e ba fc 0c |N | JSR 0x241e8 000245de de fc 00 1a | | ADDA.W #0x1a,A7 000245e2 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 000245e6 02 40 02 00 | @ | ANDI.W #0x0200,D0 000245ea 67 24 |g$ | BEQ 0x24610 000245ec 2f 3a c4 d0 |/: | MOVE.L 0x20abe,-(A7) 000245f0 2f 3a c4 c8 |/: | MOVE.L 0x20aba,-(A7) 000245f4 2f 3a c4 c0 |/: | MOVE.L 0x20ab6,-(A7) 000245f8 59 4f |YO | SUBQ.L #0x4,A7 000245fa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000245fe 3f 01 |? | MOVE.W D1,-(A7) 00024600 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7) 00024604 4e 93 |N | JSR (A3) 00024606 50 4f |PO | ADDQ.L #0x8,A7 00024608 28 4a |(J | MOVEA.L A2,A4 0002460a 4e ba fb dc |N | JSR 0x241e8 0002460e de c3 | | ADDA.W D3,A7 00024610 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 00024614 02 40 01 00 | @ | ANDI.W #0x0100,D0 00024618 66 28 |f( | BNE 0x24642 0002461a 9e c4 | | SUBA.W D4,A7 0002461c 20 4f | O | MOVEA.L A7,A0 0002461e 43 fa c4 a2 |C | LEA.L 0x20ac2,A1 00024622 70 10 |p | MOVEQ.L #0x10,D0 00024624 10 d9 | | MOVE.B (A1)+,(A0)+ 00024626 51 c8 ff fc |Q | DBF D0,0x24624 0002462a 59 4f |YO | SUBQ.L #0x4,A7 0002462c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024630 3f 01 |? | MOVE.W D1,-(A7) 00024632 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 00024636 4e 93 |N | JSR (A3) 00024638 50 4f |PO | ADDQ.L #0x8,A7 0002463a 28 4a |(J | MOVEA.L A2,A4 0002463c 4e ba fb aa |N | JSR 0x241e8 00024640 de c5 | | ADDA.W D5,A7 00024642 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 00024646 02 40 00 80 | @ | ANDI.W #0x0080,D0 0002464a 66 28 |f( | BNE 0x24674 0002464c 9e c3 | | SUBA.W D3,A7 0002464e 20 4f | O | MOVEA.L A7,A0 00024650 43 fa c4 82 |C | LEA.L 0x20ad4,A1 00024654 70 0e |p | MOVEQ.L #0x0e,D0 00024656 10 d9 | | MOVE.B (A1)+,(A0)+ 00024658 51 c8 ff fc |Q | DBF D0,0x24656 0002465c 59 4f |YO | SUBQ.L #0x4,A7 0002465e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024662 3f 01 |? | MOVE.W D1,-(A7) 00024664 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00024668 4e 93 |N | JSR (A3) 0002466a 50 4f |PO | ADDQ.L #0x8,A7 0002466c 28 4a |(J | MOVEA.L A2,A4 0002466e 4e ba fb 78 |N x | JSR 0x241e8 00024672 de c2 | | ADDA.W D2,A7 00024674 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 00024678 02 40 00 40 | @ @ | ANDI.W #0x0040,D0 0002467c 66 26 |f& | BNE 0x246a4 0002467e 2f 3a c4 70 |/: p | MOVE.L 0x20af0,-(A7) 00024682 2f 3a c4 68 |/: h | MOVE.L 0x20aec,-(A7) 00024686 2f 3a c4 60 |/: ` | MOVE.L 0x20ae8,-(A7) 0002468a 2f 3a c4 58 |/: X | MOVE.L 0x20ae4,-(A7) 0002468e 59 4f |YO | SUBQ.L #0x4,A7 00024690 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024694 3f 01 |? | MOVE.W D1,-(A7) 00024696 3f 03 |? | MOVE.W D3,-(A7) 00024698 4e 93 |N | JSR (A3) 0002469a 50 4f |PO | ADDQ.L #0x8,A7 0002469c 28 4a |(J | MOVEA.L A2,A4 0002469e 4e ba fb 48 |N H | JSR 0x241e8 000246a2 de c2 | | ADDA.W D2,A7 000246a4 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 000246a8 c0 41 | A | AND.W D1,D0 000246aa 67 26 |g& | BEQ 0x246d2 000246ac 2f 3a c4 52 |/: R | MOVE.L 0x20b00,-(A7) 000246b0 2f 3a c4 4a |/: J | MOVE.L 0x20afc,-(A7) 000246b4 2f 3a c4 42 |/: B | MOVE.L 0x20af8,-(A7) 000246b8 2f 3a c4 3a |/: : | MOVE.L 0x20af4,-(A7) 000246bc 59 4f |YO | SUBQ.L #0x4,A7 000246be 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000246c2 3f 01 |? | MOVE.W D1,-(A7) 000246c4 3f 03 |? | MOVE.W D3,-(A7) 000246c6 4e 93 |N | JSR (A3) 000246c8 50 4f |PO | ADDQ.L #0x8,A7 000246ca 28 4a |(J | MOVEA.L A2,A4 000246cc 4e ba fb 1a |N | JSR 0x241e8 000246d0 de c2 | | ADDA.W D2,A7 000246d2 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 000246d6 02 40 80 00 | @ | ANDI.W #0x8000,D0 000246da 67 24 |g$ | BEQ 0x24700 000246dc 41 fa c4 30 |A 0 | LEA.L 0x20b0e,A0 000246e0 70 04 |p | MOVEQ.L #0x04,D0 000246e2 3f 20 |? | MOVE.W -(A0),-(A7) 000246e4 51 c8 ff fc |Q | DBF D0,0x246e2 000246e8 59 4f |YO | SUBQ.L #0x4,A7 000246ea 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000246ee 3f 01 |? | MOVE.W D1,-(A7) 000246f0 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 000246f4 4e 93 |N | JSR (A3) 000246f6 50 4f |PO | ADDQ.L #0x8,A7 000246f8 28 4a |(J | MOVEA.L A2,A4 000246fa 4e ba fa ec |N | JSR 0x241e8 000246fe de c6 | | ADDA.W D6,A7 00024700 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 00024704 02 40 40 00 | @@ | ANDI.W #0x4000,D0 00024708 67 26 |g& | BEQ 0x24730 0002470a 3f 3a c4 06 |?: | MOVE.W 0x20b12,-(A7) 0002470e 3f 3a c4 00 |?: | MOVE.W 0x20b10,-(A7) 00024712 3f 3a c3 fa |?: | MOVE.W 0x20b0e,-(A7) 00024716 59 4f |YO | SUBQ.L #0x4,A7 00024718 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002471c 3f 01 |? | MOVE.W D1,-(A7) 0002471e 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00024722 4e 93 |N | JSR (A3) 00024724 50 4f |PO | ADDQ.L #0x8,A7 00024726 28 4a |(J | MOVEA.L A2,A4 00024728 4e ba fa be |N | JSR 0x241e8 0002472c de fc 00 0a | | ADDA.W #0xa,A7 00024730 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 00024734 02 40 20 00 | @ | ANDI.W #0x2000,D0 00024738 67 22 |g" | BEQ 0x2475c 0002473a 41 fa c3 ec |A | LEA.L 0x20b28,A0 0002473e 70 04 |p | MOVEQ.L #0x04,D0 00024740 2f 20 |/ | MOVE.L -(A0),-(A7) 00024742 51 c8 ff fc |Q | DBF D0,0x24740 00024746 59 4f |YO | SUBQ.L #0x4,A7 00024748 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002474c 3f 01 |? | MOVE.W D1,-(A7) 0002474e 3f 02 |? | MOVE.W D2,-(A7) 00024750 4e 93 |N | JSR (A3) 00024752 50 4f |PO | ADDQ.L #0x8,A7 00024754 28 4a |(J | MOVEA.L A2,A4 00024756 4e ba fa 90 |N | JSR 0x241e8 0002475a de c7 | | ADDA.W D7,A7 0002475c 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 00024760 02 40 10 00 | @ | ANDI.W #0x1000,D0 00024764 67 22 |g" | BEQ 0x24788 00024766 41 fa c3 d2 |A | LEA.L 0x20b3a,A0 0002476a 70 08 |p | MOVEQ.L #0x08,D0 0002476c 3f 20 |? | MOVE.W -(A0),-(A7) 0002476e 51 c8 ff fc |Q | DBF D0,0x2476c 00024772 59 4f |YO | SUBQ.L #0x4,A7 00024774 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024778 3f 01 |? | MOVE.W D1,-(A7) 0002477a 3f 04 |? | MOVE.W D4,-(A7) 0002477c 4e 93 |N | JSR (A3) 0002477e 50 4f |PO | ADDQ.L #0x8,A7 00024780 28 4a |(J | MOVEA.L A2,A4 00024782 4e ba fa 64 |N d | JSR 0x241e8 00024786 de c5 | | ADDA.W D5,A7 00024788 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 0002478c 02 40 08 00 | @ | ANDI.W #0x0800,D0 00024790 67 26 |g& | BEQ 0x247b8 00024792 2f 3a c3 b2 |/: | MOVE.L 0x20b46,-(A7) 00024796 2f 3a c3 aa |/: | MOVE.L 0x20b42,-(A7) 0002479a 2f 3a c3 a2 |/: | MOVE.L 0x20b3e,-(A7) 0002479e 2f 3a c3 9a |/: | MOVE.L 0x20b3a,-(A7) 000247a2 59 4f |YO | SUBQ.L #0x4,A7 000247a4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000247a8 3f 01 |? | MOVE.W D1,-(A7) 000247aa 3f 03 |? | MOVE.W D3,-(A7) 000247ac 4e 93 |N | JSR (A3) 000247ae 50 4f |PO | ADDQ.L #0x8,A7 000247b0 28 4a |(J | MOVEA.L A2,A4 000247b2 4e ba fa 34 |N 4 | JSR 0x241e8 000247b6 de c2 | | ADDA.W D2,A7 000247b8 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 000247bc 02 40 04 00 | @ | ANDI.W #0x0400,D0 000247c0 67 2a |g* | BEQ 0x247ec 000247c2 9e c5 | | SUBA.W D5,A7 000247c4 20 4f | O | MOVEA.L A7,A0 000247c6 43 fa c3 82 |C | LEA.L 0x20b4a,A1 000247ca 70 14 |p | MOVEQ.L #0x14,D0 000247cc 10 d9 | | MOVE.B (A1)+,(A0)+ 000247ce 51 c8 ff fc |Q | DBF D0,0x247cc 000247d2 59 4f |YO | SUBQ.L #0x4,A7 000247d4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000247d8 3f 01 |? | MOVE.W D1,-(A7) 000247da 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 000247de 4e 93 |N | JSR (A3) 000247e0 50 4f |PO | ADDQ.L #0x8,A7 000247e2 28 4a |(J | MOVEA.L A2,A4 000247e4 4e ba fa 02 |N | JSR 0x241e8 000247e8 de fc 00 1a | | ADDA.W #0x1a,A7 000247ec 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 000247f0 02 40 02 00 | @ | ANDI.W #0x0200,D0 000247f4 67 26 |g& | BEQ 0x2481c 000247f6 2f 3a c3 74 |/: t | MOVE.L 0x20b6c,-(A7) 000247fa 2f 3a c3 6c |/: l | MOVE.L 0x20b68,-(A7) 000247fe 2f 3a c3 64 |/: d | MOVE.L 0x20b64,-(A7) 00024802 2f 3a c3 5c |/: \ | MOVE.L 0x20b60,-(A7) 00024806 59 4f |YO | SUBQ.L #0x4,A7 00024808 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002480c 3f 01 |? | MOVE.W D1,-(A7) 0002480e 3f 03 |? | MOVE.W D3,-(A7) 00024810 4e 93 |N | JSR (A3) 00024812 50 4f |PO | ADDQ.L #0x8,A7 00024814 28 4a |(J | MOVEA.L A2,A4 00024816 4e ba f9 d0 |N | JSR 0x241e8 0002481a de c2 | | ADDA.W D2,A7 0002481c 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 00024820 02 40 01 00 | @ | ANDI.W #0x0100,D0 00024824 67 26 |g& | BEQ 0x2484c 00024826 2f 3a c3 54 |/: T | MOVE.L 0x20b7c,-(A7) 0002482a 2f 3a c3 4c |/: L | MOVE.L 0x20b78,-(A7) 0002482e 2f 3a c3 44 |/: D | MOVE.L 0x20b74,-(A7) 00024832 2f 3a c3 3c |/: < | MOVE.L 0x20b70,-(A7) 00024836 59 4f |YO | SUBQ.L #0x4,A7 00024838 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002483c 3f 01 |? | MOVE.W D1,-(A7) 0002483e 3f 03 |? | MOVE.W D3,-(A7) 00024840 4e 93 |N | JSR (A3) 00024842 50 4f |PO | ADDQ.L #0x8,A7 00024844 28 4a |(J | MOVEA.L A2,A4 00024846 4e ba f9 a0 |N | JSR 0x241e8 0002484a de c2 | | ADDA.W D2,A7 0002484c 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 00024850 02 40 00 80 | @ | ANDI.W #0x0080,D0 00024854 67 22 |g" | BEQ 0x24878 00024856 41 fa c3 3c |A < | LEA.L 0x20b94,A0 0002485a 70 04 |p | MOVEQ.L #0x04,D0 0002485c 2f 20 |/ | MOVE.L -(A0),-(A7) 0002485e 51 c8 ff fc |Q | DBF D0,0x2485c 00024862 59 4f |YO | SUBQ.L #0x4,A7 00024864 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024868 3f 01 |? | MOVE.W D1,-(A7) 0002486a 3f 02 |? | MOVE.W D2,-(A7) 0002486c 4e 93 |N | JSR (A3) 0002486e 50 4f |PO | ADDQ.L #0x8,A7 00024870 28 4a |(J | MOVEA.L A2,A4 00024872 4e ba f9 74 |N t | JSR 0x241e8 00024876 de c7 | | ADDA.W D7,A7 00024878 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 0002487c 02 40 00 40 | @ @ | ANDI.W #0x0040,D0 00024880 67 22 |g" | BEQ 0x248a4 00024882 41 fa c3 1e |A | LEA.L 0x20ba2,A0 00024886 70 06 |p | MOVEQ.L #0x06,D0 00024888 3f 20 |? | MOVE.W -(A0),-(A7) 0002488a 51 c8 ff fc |Q | DBF D0,0x24888 0002488e 59 4f |YO | SUBQ.L #0x4,A7 00024890 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024894 3f 01 |? | MOVE.W D1,-(A7) 00024896 3f 06 |? | MOVE.W D6,-(A7) 00024898 4e 93 |N | JSR (A3) 0002489a 50 4f |PO | ADDQ.L #0x8,A7 0002489c 28 4a |(J | MOVEA.L A2,A4 0002489e 4e ba f9 48 |N H | JSR 0x241e8 000248a2 de c4 | | ADDA.W D4,A7 000248a4 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 000248a8 02 40 00 20 | @ | ANDI.W #0x0020,D0 000248ac 67 26 |g& | BEQ 0x248d4 000248ae 2f 3a c2 fe |/: | MOVE.L 0x20bae,-(A7) 000248b2 2f 3a c2 f6 |/: | MOVE.L 0x20baa,-(A7) 000248b6 2f 3a c2 ee |/: | MOVE.L 0x20ba6,-(A7) 000248ba 2f 3a c2 e6 |/: | MOVE.L 0x20ba2,-(A7) 000248be 59 4f |YO | SUBQ.L #0x4,A7 000248c0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000248c4 3f 01 |? | MOVE.W D1,-(A7) 000248c6 3f 03 |? | MOVE.W D3,-(A7) 000248c8 4e 93 |N | JSR (A3) 000248ca 50 4f |PO | ADDQ.L #0x8,A7 000248cc 28 4a |(J | MOVEA.L A2,A4 000248ce 4e ba f9 18 |N | JSR 0x241e8 000248d2 de c2 | | ADDA.W D2,A7 000248d4 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 000248d8 c0 43 | C | AND.W D3,D0 000248da 67 24 |g$ | BEQ 0x24900 000248dc 2f 3a c2 dc |/: | MOVE.L 0x20bba,-(A7) 000248e0 2f 3a c2 d4 |/: | MOVE.L 0x20bb6,-(A7) 000248e4 2f 3a c2 cc |/: | MOVE.L 0x20bb2,-(A7) 000248e8 59 4f |YO | SUBQ.L #0x4,A7 000248ea 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000248ee 3f 01 |? | MOVE.W D1,-(A7) 000248f0 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7) 000248f4 4e 93 |N | JSR (A3) 000248f6 50 4f |PO | ADDQ.L #0x8,A7 000248f8 28 4a |(J | MOVEA.L A2,A4 000248fa 4e ba f8 ec |N | JSR 0x241e8 000248fe de c3 | | ADDA.W D3,A7 00024900 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 00024904 02 40 00 04 | @ | ANDI.W #0x0004,D0 00024908 67 2c |g, | BEQ 0x24936 0002490a 9e fc 00 1e | | SUBA.W #0x1e,A7 0002490e 20 4f | O | MOVEA.L A7,A0 00024910 43 fa c2 ac |C | LEA.L 0x20bbe,A1 00024914 70 1c |p | MOVEQ.L #0x1c,D0 00024916 10 d9 | | MOVE.B (A1)+,(A0)+ 00024918 51 c8 ff fc |Q | DBF D0,0x24916 0002491c 59 4f |YO | SUBQ.L #0x4,A7 0002491e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024922 3f 01 |? | MOVE.W D1,-(A7) 00024924 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 00024928 4e 93 |N | JSR (A3) 0002492a 50 4f |PO | ADDQ.L #0x8,A7 0002492c 28 4a |(J | MOVEA.L A2,A4 0002492e 4e ba f8 b8 |N | JSR 0x241e8 00024932 de fc 00 22 | " | ADDA.W #0x22,A7 00024936 30 2e 00 0e |0. | MOVE.W (A6+0xe),D0 0002493a c0 41 | A | AND.W D1,D0 0002493c 67 26 |g& | BEQ 0x24964 0002493e 2f 3a c2 a8 |/: | MOVE.L 0x20be8,-(A7) 00024942 2f 3a c2 a0 |/: | MOVE.L 0x20be4,-(A7) 00024946 2f 3a c2 98 |/: | MOVE.L 0x20be0,-(A7) 0002494a 2f 3a c2 90 |/: | MOVE.L 0x20bdc,-(A7) 0002494e 59 4f |YO | SUBQ.L #0x4,A7 00024950 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024954 3f 01 |? | MOVE.W D1,-(A7) 00024956 3f 03 |? | MOVE.W D3,-(A7) 00024958 4e 93 |N | JSR (A3) 0002495a 50 4f |PO | ADDQ.L #0x8,A7 0002495c 28 4a |(J | MOVEA.L A2,A4 0002495e 4e ba f8 88 |N | JSR 0x241e8 00024962 de c2 | | ADDA.W D2,A7 00024964 30 2e 00 10 |0. | MOVE.W (A6+0x10),D0 00024968 02 40 80 00 | @ | ANDI.W #0x8000,D0 0002496c 67 24 |g$ | BEQ 0x24992 0002496e 41 fa c2 86 |A | LEA.L 0x20bf6,A0 00024972 70 04 |p | MOVEQ.L #0x04,D0 00024974 3f 20 |? | MOVE.W -(A0),-(A7) 00024976 51 c8 ff fc |Q | DBF D0,0x24974 0002497a 59 4f |YO | SUBQ.L #0x4,A7 0002497c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024980 3f 01 |? | MOVE.W D1,-(A7) 00024982 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00024986 4e 93 |N | JSR (A3) 00024988 50 4f |PO | ADDQ.L #0x8,A7 0002498a 28 4a |(J | MOVEA.L A2,A4 0002498c 4e ba f8 5a |N Z | JSR 0x241e8 00024990 de c6 | | ADDA.W D6,A7 00024992 30 2e 00 10 |0. | MOVE.W (A6+0x10),D0 00024996 02 40 40 00 | @@ | ANDI.W #0x4000,D0 0002499a 67 28 |g( | BEQ 0x249c4 0002499c 9e c3 | | SUBA.W D3,A7 0002499e 20 4f | O | MOVEA.L A7,A0 000249a0 43 fa c2 54 |C T | LEA.L 0x20bf6,A1 000249a4 70 0e |p | MOVEQ.L #0x0e,D0 000249a6 10 d9 | | MOVE.B (A1)+,(A0)+ 000249a8 51 c8 ff fc |Q | DBF D0,0x249a6 000249ac 59 4f |YO | SUBQ.L #0x4,A7 000249ae 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000249b2 3f 01 |? | MOVE.W D1,-(A7) 000249b4 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 000249b8 4e 93 |N | JSR (A3) 000249ba 50 4f |PO | ADDQ.L #0x8,A7 000249bc 28 4a |(J | MOVEA.L A2,A4 000249be 4e ba f8 28 |N ( | JSR 0x241e8 000249c2 de c2 | | ADDA.W D2,A7 000249c4 30 2e 00 10 |0. | MOVE.W (A6+0x10),D0 000249c8 02 40 10 00 | @ | ANDI.W #0x1000,D0 000249cc 67 28 |g( | BEQ 0x249f6 000249ce 9e c3 | | SUBA.W D3,A7 000249d0 20 4f | O | MOVEA.L A7,A0 000249d2 43 fa c2 32 |C 2 | LEA.L 0x20c06,A1 000249d6 70 0e |p | MOVEQ.L #0x0e,D0 000249d8 10 d9 | | MOVE.B (A1)+,(A0)+ 000249da 51 c8 ff fc |Q | DBF D0,0x249d8 000249de 59 4f |YO | SUBQ.L #0x4,A7 000249e0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000249e4 3f 01 |? | MOVE.W D1,-(A7) 000249e6 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 000249ea 4e 93 |N | JSR (A3) 000249ec 50 4f |PO | ADDQ.L #0x8,A7 000249ee 28 4a |(J | MOVEA.L A2,A4 000249f0 4e ba f7 f6 |N | JSR 0x241e8 000249f4 de c2 | | ADDA.W D2,A7 000249f6 30 2e 00 10 |0. | MOVE.W (A6+0x10),D0 000249fa 02 40 08 00 | @ | ANDI.W #0x0800,D0 000249fe 67 22 |g" | BEQ 0x24a22 00024a00 41 fa c2 28 |A ( | LEA.L 0x20c2a,A0 00024a04 70 04 |p | MOVEQ.L #0x04,D0 00024a06 2f 20 |/ | MOVE.L -(A0),-(A7) 00024a08 51 c8 ff fc |Q | DBF D0,0x24a06 00024a0c 59 4f |YO | SUBQ.L #0x4,A7 00024a0e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024a12 3f 01 |? | MOVE.W D1,-(A7) 00024a14 3f 02 |? | MOVE.W D2,-(A7) 00024a16 4e 93 |N | JSR (A3) 00024a18 50 4f |PO | ADDQ.L #0x8,A7 00024a1a 28 4a |(J | MOVEA.L A2,A4 00024a1c 4e ba f7 ca |N | JSR 0x241e8 00024a20 de c7 | | ADDA.W D7,A7 00024a22 30 2e 00 10 |0. | MOVE.W (A6+0x10),D0 00024a26 02 40 04 00 | @ | ANDI.W #0x0400,D0 00024a2a 67 28 |g( | BEQ 0x24a54 00024a2c 9e c4 | | SUBA.W D4,A7 00024a2e 20 4f | O | MOVEA.L A7,A0 00024a30 43 fa c1 f8 |C | LEA.L 0x20c2a,A1 00024a34 70 10 |p | MOVEQ.L #0x10,D0 00024a36 10 d9 | | MOVE.B (A1)+,(A0)+ 00024a38 51 c8 ff fc |Q | DBF D0,0x24a36 00024a3c 59 4f |YO | SUBQ.L #0x4,A7 00024a3e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024a42 3f 01 |? | MOVE.W D1,-(A7) 00024a44 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 00024a48 4e 93 |N | JSR (A3) 00024a4a 50 4f |PO | ADDQ.L #0x8,A7 00024a4c 28 4a |(J | MOVEA.L A2,A4 00024a4e 4e ba f7 98 |N | JSR 0x241e8 00024a52 de c5 | | ADDA.W D5,A7 00024a54 30 2e 00 10 |0. | MOVE.W (A6+0x10),D0 00024a58 02 40 00 80 | @ | ANDI.W #0x0080,D0 00024a5c 67 24 |g$ | BEQ 0x24a82 00024a5e 2f 3a c1 e4 |/: | MOVE.L 0x20c44,-(A7) 00024a62 2f 3a c1 dc |/: | MOVE.L 0x20c40,-(A7) 00024a66 2f 3a c1 d4 |/: | MOVE.L 0x20c3c,-(A7) 00024a6a 59 4f |YO | SUBQ.L #0x4,A7 00024a6c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024a70 3f 01 |? | MOVE.W D1,-(A7) 00024a72 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7) 00024a76 4e 93 |N | JSR (A3) 00024a78 50 4f |PO | ADDQ.L #0x8,A7 00024a7a 28 4a |(J | MOVEA.L A2,A4 00024a7c 4e ba f7 6a |N j | JSR 0x241e8 00024a80 de c3 | | ADDA.W D3,A7 00024a82 30 2e 00 10 |0. | MOVE.W (A6+0x10),D0 00024a86 02 40 00 20 | @ | ANDI.W #0x0020,D0 00024a8a 67 28 |g( | BEQ 0x24ab4 00024a8c 9e c4 | | SUBA.W D4,A7 00024a8e 20 4f | O | MOVEA.L A7,A0 00024a90 43 fa c1 b6 |C | LEA.L 0x20c48,A1 00024a94 70 10 |p | MOVEQ.L #0x10,D0 00024a96 10 d9 | | MOVE.B (A1)+,(A0)+ 00024a98 51 c8 ff fc |Q | DBF D0,0x24a96 00024a9c 59 4f |YO | SUBQ.L #0x4,A7 00024a9e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024aa2 3f 01 |? | MOVE.W D1,-(A7) 00024aa4 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 00024aa8 4e 93 |N | JSR (A3) 00024aaa 50 4f |PO | ADDQ.L #0x8,A7 00024aac 28 4a |(J | MOVEA.L A2,A4 00024aae 4e ba f7 38 |N 8 | JSR 0x241e8 00024ab2 de c5 | | ADDA.W D5,A7 00024ab4 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00024ab8 4e 5e |N^ | UNLK A6 00024aba 4e 75 |Nu | RTS 00024abc ; -------------------------------------------------------------------------------------- 00024abc ; OMSI PASCAL Function 00024abc ; <LVAR 0x014 4(r)> 00024abc ; <LVAR 0x010 4(r)> 00024abc ; <LVAR 0x00c 4(r)> 00024abc ; <LVAR 0x008 4(r)> 00024abc ; -------------------------------------------------------------------------------------- 00024abc 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 00024ac0 bf d5 | | CMPA.L (A5),A7 00024ac2 62 06 |b | BHI 0x24aca 00024ac4 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024ac8 4e 76 |Nv | TRAPV 00024aca de fc 00 48 | H | ADDA.W #0x48,A7 00024ace 48 e7 f0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D3+D2+D1+D0,-(A7) 00024ad2 45 f9 00 01 03 d8 |E | LEA.L WriteConsoleString(str : String),A2 00024ad8 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00024ade 49 f9 00 01 02 e4 |I | LEA.L Long2String(a : Long) : String,A4 00024ae4 72 01 |r | MOVEQ.L #0x01,D1 00024ae6 74 0b |t | MOVEQ.L #0x0b,D2 00024ae8 76 10 |v | MOVEQ.L #0x10,D3 00024aea 2f 2e 00 14 |/. | MOVE.L (A6+0x14),-(A7) 00024aee 4e 92 |N | JSR (A2) 00024af0 51 4f |QO | SUBQ.L #0x8,A7 00024af2 20 4f | O | MOVEA.L A7,A0 00024af4 43 fa c1 64 |C d | LEA.L 0x20c5a,A1 00024af8 70 0a |p | MOVEQ.L #0x0a,D0 00024afa 10 d9 | | MOVE.B (A1)+,(A0)+ 00024afc 51 c8 ff fc |Q | DBF D0,0x24afa 00024b00 51 4f |QO | SUBQ.L #0x8,A7 00024b02 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00024b06 3f 01 |? | MOVE.W D1,-(A7) 00024b08 3f 02 |? | MOVE.W D2,-(A7) 00024b0a 4e 93 |N | JSR (A3) 00024b0c 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 00024b10 4e 94 |N | JSR (A4) 00024b12 58 4f |XO | ADDQ.L #0x4,A7 00024b14 48 78 00 04 |Hx | PEA.L 0x4 00024b18 4e b9 00 01 02 f4 |N | JSR RightPad(a : String; b : Long) : String 00024b1e 50 4f |PO | ADDQ.L #0x8,A7 00024b20 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024b26 50 4f |PO | ADDQ.L #0x8,A7 00024b28 4e 92 |N | JSR (A2) 00024b2a de c3 | | ADDA.W D3,A7 00024b2c 41 fa c1 42 |A B | LEA.L 0x20c70,A0 00024b30 70 04 |p | MOVEQ.L #0x04,D0 00024b32 3f 20 |? | MOVE.W -(A0),-(A7) 00024b34 51 c8 ff fc |Q | DBF D0,0x24b32 00024b38 51 4f |QO | SUBQ.L #0x8,A7 00024b3a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00024b3e 3f 01 |? | MOVE.W D1,-(A7) 00024b40 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00024b44 4e 93 |N | JSR (A3) 00024b46 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024b4a 4e 94 |N | JSR (A4) 00024b4c 58 4f |XO | ADDQ.L #0x4,A7 00024b4e 48 78 00 04 |Hx | PEA.L 0x4 00024b52 4e b9 00 01 02 f4 |N | JSR RightPad(a : String; b : Long) : String 00024b58 50 4f |PO | ADDQ.L #0x8,A7 00024b5a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024b60 50 4f |PO | ADDQ.L #0x8,A7 00024b62 4e 92 |N | JSR (A2) 00024b64 54 4f |TO | ADDQ.L #0x2,A7 00024b66 20 4f | O | MOVEA.L A7,A0 00024b68 43 fa c1 06 |C | LEA.L 0x20c70,A1 00024b6c 70 0a |p | MOVEQ.L #0x0a,D0 00024b6e 10 d9 | | MOVE.B (A1)+,(A0)+ 00024b70 51 c8 ff fc |Q | DBF D0,0x24b6e 00024b74 51 4f |QO | SUBQ.L #0x8,A7 00024b76 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00024b7a 3f 01 |? | MOVE.W D1,-(A7) 00024b7c 3f 02 |? | MOVE.W D2,-(A7) 00024b7e 4e 93 |N | JSR (A3) 00024b80 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024b84 4e 94 |N | JSR (A4) 00024b86 58 4f |XO | ADDQ.L #0x4,A7 00024b88 48 78 00 04 |Hx | PEA.L 0x4 00024b8c 4e b9 00 01 02 f4 |N | JSR RightPad(a : String; b : Long) : String 00024b92 50 4f |PO | ADDQ.L #0x8,A7 00024b94 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024b9a 50 4f |PO | ADDQ.L #0x8,A7 00024b9c 4e 92 |N | JSR (A2) 00024b9e de c3 | | ADDA.W D3,A7 00024ba0 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00024ba6 4c df 1f 0f |L | MOVEM.L (A7)+,D0+D1+D2+D3+A0+A1+A2+A3+A4 00024baa 4e 5e |N^ | UNLK A6 00024bac 4e 75 |Nu | RTS 00024bae ; -------------------------------------------------------------------------------------- 00024bae ; OMSI PASCAL Function 00024bae ; <LVAR 0x008 4(r)> 00024bae ; <LVAR -0x008 2(w)> 00024bae ; <LVAR -0x00e 2(w)> 00024bae ; <LVAR -0x012 @> 00024bae ; <LVAR -0x014 @ 1(r)> 00024bae ; -------------------------------------------------------------------------------------- 00024bae 4e 56 ff aa |NV | LINK.W A6,#0xffaa 00024bb2 bf d5 | | CMPA.L (A5),A7 00024bb4 62 06 |b | BHI 0x24bbc 00024bb6 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024bba 4e 76 |Nv | TRAPV 00024bbc de fc 00 42 | B | ADDA.W #0x42,A7 00024bc0 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00024bc4 3d 7c 00 02 ff f2 |=| | MOVE.W #0x2,(A6-0xe) 00024bca 30 39 00 02 97 10 |09 | MOVE.W 0x29710,D0 00024bd0 e1 40 | @ | ASL.W #0x8,D0 00024bd2 52 40 |R@ | ADDQ.W #0x1,D0 00024bd4 3d 40 ff f8 |=@ | MOVE.W D0,(A6-0x8) 00024bd8 48 6e ff ee |Hn | PEA.L (A6-0x12) 00024bdc 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024be0 2f 08 |/ | MOVE.L A0,-(A7) 00024be2 42 67 |Bg | CLR.W -(A7) 00024be4 4e b9 00 01 02 04 |N | JSR KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W) 00024bea 50 4f |PO | ADDQ.L #0x8,A7 00024bec 42 57 |BW | CLR.W (A7) 00024bee 48 6e ff ec |Hn | PEA.L (A6-0x14) 00024bf2 4e b9 00 01 02 06 |N | JSR KC03_Wait_Disk_IO(a : W; VAR status : Byte) 00024bf8 5c 4f |\O | ADDQ.L #0x6,A7 00024bfa 4a 2e ff ec |J. | TST.B (A6-0x14) 00024bfe 66 30 |f0 | BNE 0x24c30 00024c00 9e fc 00 26 | & | SUBA.W #0x26,A7 00024c04 20 4f | O | MOVEA.L A7,A0 00024c06 43 fa c0 74 |C t | LEA.L 0x20c7c,A1 00024c0a 70 24 |p$ | MOVEQ.L #0x24,D0 00024c0c 10 d9 | | MOVE.B (A1)+,(A0)+ 00024c0e 51 c8 ff fc |Q | DBF D0,0x24c0c 00024c12 59 4f |YO | SUBQ.L #0x4,A7 00024c14 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024c18 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00024c1c 3f 3c 00 25 |?< % | MOVE.W #0x25,-(A7) 00024c20 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024c26 50 4f |PO | ADDQ.L #0x8,A7 00024c28 4e ba d8 f8 |N | JSR 0x22522 00024c2c de fc 00 2a | * | ADDA.W #0x2a,A7 00024c30 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00024c34 4e 5e |N^ | UNLK A6 00024c36 4e 75 |Nu | RTS 00024c38 ; -------------------------------------------------------------------------------------- 00024c38 ; OMSI PASCAL Function 00024c38 ; <LVAR 0x00c 2(r)> 00024c38 ; <LVAR 0x008 4(r)> 00024c38 ; -------------------------------------------------------------------------------------- 00024c38 4e 56 ff de |NV | LINK.W A6,#0xffde 00024c3c bf d5 | | CMPA.L (A5),A7 00024c3e 62 06 |b | BHI 0x24c46 00024c40 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024c44 4e 76 |Nv | TRAPV 00024c46 de fc 00 20 | | ADDA.W #0x20,A7 00024c4a 48 e7 e0 80 |H | MOVEM.L A0+D2+D1+D0,-(A7) 00024c4e 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024c52 42 80 |B | CLR.L D0 00024c54 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 00024c58 42 81 |B | CLR.L D1 00024c5a 12 39 00 02 97 15 | 9 | MOVE.B 0x29715,D1 00024c60 80 c1 | | DIVU.W D1,D0 00024c62 24 00 |$ | MOVE.L D0,D2 00024c64 48 42 |HB | SWAP.W D2 00024c66 11 42 00 03 | B | MOVE.B D2,(A0+0x3) 00024c6a 42 82 |B | CLR.L D2 00024c6c 34 00 |4 | MOVE.W D0,D2 00024c6e 42 80 |B | CLR.L D0 00024c70 10 39 00 02 97 14 | 9 | MOVE.B 0x29714,D0 00024c76 84 c0 | | DIVU.W D0,D2 00024c78 48 42 |HB | SWAP.W D2 00024c7a 11 42 00 02 | B | MOVE.B D2,(A0+0x2) 00024c7e c3 c0 | | MULS.W D0,D1 00024c80 42 80 |B | CLR.L D0 00024c82 30 2e 00 0c |0. | MOVE.W (A6+0xc),D0 00024c86 80 c1 | | DIVU.W D1,D0 00024c88 30 80 |0 | MOVE.W D0,(A0) 00024c8a 4c df 01 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0 00024c8e 4e 5e |N^ | UNLK A6 00024c90 4e 75 |Nu | RTS 00024c92 ; -------------------------------------------------------------------------------------- 00024c92 ; OMSI PASCAL Function 00024c92 ; <LVAR 0x00c 4(r)> 00024c92 ; <LVAR 0x008 4(r)> 00024c92 ; -------------------------------------------------------------------------------------- 00024c92 4e 56 ff dc |NV | LINK.W A6,#0xffdc 00024c96 bf d5 | | CMPA.L (A5),A7 00024c98 62 06 |b | BHI 0x24ca0 00024c9a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024c9e 4e 76 |Nv | TRAPV 00024ca0 de fc 00 24 | $ | ADDA.W #0x24,A7 00024ca4 48 e7 98 80 |H | MOVEM.L A0+D4+D3+D0,-(A7) 00024ca8 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024cac 28 2e 00 0c |(. | MOVE.L (A6+0xc),D4 00024cb0 42 83 |B | CLR.L D3 00024cb2 16 39 00 02 97 15 | 9 | MOVE.B 0x29715,D3 00024cb8 2f 03 |/ | MOVE.L D3,-(A7) 00024cba 4e b9 00 01 02 98 |N | JSR ?divu_d3_d4 00024cc0 11 43 00 03 | C | MOVE.B D3,(A0+0x3) 00024cc4 42 83 |B | CLR.L D3 00024cc6 16 39 00 02 97 14 | 9 | MOVE.B 0x29714,D3 00024ccc 2f 03 |/ | MOVE.L D3,-(A7) 00024cce 4e b9 00 01 02 98 |N | JSR ?divu_d3_d4 00024cd4 11 43 00 02 | C | MOVE.B D3,(A0+0x2) 00024cd8 28 2f 00 04 |(/ | MOVE.L (A7+0x4),D4 00024cdc 20 1f | | MOVE.L (A7)+,D0 00024cde 26 00 |& | MOVE.L D0,D3 00024ce0 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00024ce6 58 4f |XO | ADDQ.L #0x4,A7 00024ce8 36 04 |6 | MOVE.W D4,D3 00024cea 48 c3 |H | EXTW.L D3 00024cec 28 2e 00 0c |(. | MOVE.L (A6+0xc),D4 00024cf0 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00024cf6 0c 84 00 00 ff ff | | CMPI.L #0x0000ffff,D4 00024cfc 63 02 |c | BLS 0x24d00 00024cfe 4e 4f |NO | TRAP #15 00024d00 30 84 |0 | MOVE.W D4,(A0) 00024d02 4c df 01 19 |L | MOVEM.L (A7)+,D0+D3+D4+A0 00024d06 4e 5e |N^ | UNLK A6 00024d08 4e 75 |Nu | RTS 00024d0a ; -------------------------------------------------------------------------------------- 00024d0a ; OMSI PASCAL Function 00024d0a ; <LVAR 0x010 4(r)> 00024d0a ; <LVAR 0x00c 4(r)> 00024d0a ; <LVAR 0x008 4(r)> 00024d0a ; -------------------------------------------------------------------------------------- 00024d0a 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 00024d0e bf d5 | | CMPA.L (A5),A7 00024d10 62 06 |b | BHI 0x24d18 00024d12 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024d16 4e 76 |Nv | TRAPV 00024d18 de fc 00 4a | J | ADDA.W #0x4a,A7 00024d1c 48 e7 81 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D0,-(A7) 00024d20 45 f9 00 02 97 0c |E | LEA.L 0x2970c,A2 00024d26 47 f9 00 02 96 d2 |G | LEA.L 0x296d2,A3 00024d2c 20 12 | | MOVE.L (A2),D0 00024d2e 0c 80 00 00 08 00 | | CMPI.L #0x00000800,D0 00024d34 66 30 |f0 | BNE 0x24d66 00024d36 9e fc 00 22 | " | SUBA.W #0x22,A7 00024d3a 20 4f | O | MOVEA.L A7,A0 00024d3c 43 fa bf 64 |C d | LEA.L 0x20ca2,A1 00024d40 70 20 |p | MOVEQ.L #0x20,D0 00024d42 10 d9 | | MOVE.B (A1)+,(A0)+ 00024d44 51 c8 ff fc |Q | DBF D0,0x24d42 00024d48 59 4f |YO | SUBQ.L #0x4,A7 00024d4a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024d4e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00024d52 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 00024d56 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024d5c 50 4f |PO | ADDQ.L #0x8,A7 00024d5e 4e ba d7 c2 |N | JSR 0x22522 00024d62 de fc 00 26 | & | ADDA.W #0x26,A7 00024d66 2f 12 |/ | MOVE.L (A2),-(A7) 00024d68 53 97 |S | SUBQ.L #0x1,(A7) 00024d6a 7e 00 |~ | MOVEQ.L #0x00,D7 00024d6c be 97 | | CMP.L (A7),D7 00024d6e 6e 44 |nD | BGT 0x24db4 00024d70 0c 87 00 00 07 ff | | CMPI.L #0x000007ff,D7 00024d76 63 02 |c | BLS 0x24d7a 00024d78 4e 4f |NO | TRAP #15 00024d7a 20 07 | | MOVE.L D7,D0 00024d7c e5 80 | | ASL.L #0x2,D0 00024d7e 20 4b | K | MOVEA.L A3,A0 00024d80 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00024d84 42 80 |B | CLR.L D0 00024d86 30 28 04 4c |0( L | MOVE.W (A0+0x44c),D0 00024d8a e5 48 | H | LSL.W #0x2,D0 00024d8c e4 48 | H | LSR.W #0x2,D0 00024d8e b0 ae 00 10 | | CMP.L (A6+0x10),D0 00024d92 66 1c |f | BNE 0x24db0 00024d94 42 80 |B | CLR.L D0 00024d96 10 28 04 4e | ( N | MOVE.B (A0+0x44e),D0 00024d9a b0 ae 00 0c | | CMP.L (A6+0xc),D0 00024d9e 66 10 |f | BNE 0x24db0 00024da0 42 80 |B | CLR.L D0 00024da2 10 28 04 4f | ( O | MOVE.B (A0+0x44f),D0 00024da6 b0 ae 00 08 | | CMP.L (A6+0x8),D0 00024daa 66 04 |f | BNE 0x24db0 00024dac 58 4f |XO | ADDQ.L #0x4,A7 00024dae 60 58 |`X | BRA 0x24e08 00024db0 52 87 |R | ADDQ.L #0x1,D7 00024db2 68 b8 |h | BVC 0x24d6c 00024db4 58 4f |XO | ADDQ.L #0x4,A7 00024db6 20 12 | | MOVE.L (A2),D0 00024db8 0c 80 00 00 07 ff | | CMPI.L #0x000007ff,D0 00024dbe 63 02 |c | BLS 0x24dc2 00024dc0 4e 4f |NO | TRAP #15 00024dc2 e5 80 | | ASL.L #0x2,D0 00024dc4 20 4b | K | MOVEA.L A3,A0 00024dc6 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00024dca 20 2e 00 10 | . | MOVE.L (A6+0x10),D0 00024dce 0c 80 00 00 3f ff | ? | CMPI.L #0x00003fff,D0 00024dd4 63 02 |c | BLS 0x24dd8 00024dd6 4e 4f |NO | TRAP #15 00024dd8 02 68 c0 00 04 4c | h L | ANDI.W #0xc000,(A0+0x44c) 00024dde 81 68 04 4c | h L | OR.W D0,(A0+0x44c) 00024de2 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00024de6 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 00024dec 63 02 |c | BLS 0x24df0 00024dee 4e 4f |NO | TRAP #15 00024df0 11 40 04 4e | @ N | MOVE.B D0,(A0+0x44e) 00024df4 20 2e 00 08 | . | MOVE.L (A6+0x8),D0 00024df8 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 00024dfe 63 02 |c | BLS 0x24e02 00024e00 4e 4f |NO | TRAP #15 00024e02 11 40 04 4f | @ O | MOVE.B D0,(A0+0x44f) 00024e06 52 92 |R | ADDQ.L #0x1,(A2) 00024e08 4c df 0f 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1+A2+A3 00024e0c 4e 5e |N^ | UNLK A6 00024e0e 4e 75 |Nu | RTS 00024e10 ; -------------------------------------------------------------------------------------- 00024e10 ; OMSI PASCAL Function 00024e10 ; <LVAR 0x010 4(r)> 00024e10 ; <LVAR 0x00c 4(r)> 00024e10 ; <LVAR 0x008 4(r)> 00024e10 ; <LVAR -0x21b 1(w)> 00024e10 ; <LVAR -0x21c 1(w)> 00024e10 ; <LVAR -0x21e @ 1(w) 2(w)> 00024e10 ; <LVAR -0x220 2(w)> 00024e10 ; <LVAR -0x222 2(w)> 00024e10 ; <LVAR -0x224 2(w)> 00024e10 ; <LVAR -0x226 2(r)> 00024e10 ; <LVAR -0x228 2(r)> 00024e10 ; <LVAR -0x22a 2(w)> 00024e10 ; <LVAR -0x22c 2(r)> 00024e10 ; <LVAR -0x22e @ 2(r)> 00024e10 ; <LVAR -0x230 @> 00024e10 ; <LVAR -0x234 @> 00024e10 ; -------------------------------------------------------------------------------------- 00024e10 4e 56 fd a6 |NV | LINK.W A6,#0xfda6 00024e14 bf d5 | | CMPA.L (A5),A7 00024e16 62 06 |b | BHI 0x24e1e 00024e18 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024e1c 4e 76 |Nv | TRAPV 00024e1e de fc 00 26 | & | ADDA.W #0x26,A7 00024e22 48 e7 c3 c0 |H | MOVEM.L A1+A0+D7+D6+D1+D0,-(A7) 00024e26 43 ee fd e2 |C | LEA.L (A6-0x21e),A1 00024e2a 22 3c 00 00 00 ff |"< | MOVE.L #0xff,D1 00024e30 20 49 | I | MOVEA.L A1,A0 00024e32 2f 08 |/ | MOVE.L A0,-(A7) 00024e34 2c 1f |, | MOVE.L (A7)+,D6 00024e36 42 6e fd d2 |Bn | CLR.W (A6-0x22e) 00024e3a 42 6e fd d4 |Bn | CLR.W (A6-0x22c) 00024e3e 3d 7c 00 02 fd d6 |=| | MOVE.W #0x2,(A6-0x22a) 00024e44 42 6e fd d8 |Bn | CLR.W (A6-0x228) 00024e48 42 6e fd da |Bn | CLR.W (A6-0x226) 00024e4c 30 39 00 02 97 10 |09 | MOVE.W 0x29710,D0 00024e52 e1 40 | @ | ASL.W #0x8,D0 00024e54 50 40 |P@ | ADDQ.W #0x8,D0 00024e56 3d 40 fd dc |=@ | MOVE.W D0,(A6-0x224) 00024e5a 20 2e 00 10 | . | MOVE.L (A6+0x10),D0 00024e5e 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00024e64 63 02 |c | BLS 0x24e68 00024e66 4e 4f |NO | TRAP #15 00024e68 3d 40 fd de |=@ | MOVE.W D0,(A6-0x222) 00024e6c 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00024e70 e1 80 | | ASL.L #0x8,D0 00024e72 d0 ae 00 08 | | ADD.L (A6+0x8),D0 00024e76 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00024e7c 63 02 |c | BLS 0x24e80 00024e7e 4e 4f |NO | TRAP #15 00024e80 3d 40 fd e0 |=@ | MOVE.W D0,(A6-0x220) 00024e84 7e 00 |~ | MOVEQ.L #0x00,D7 00024e86 be 81 | | CMP.L D1,D7 00024e88 63 02 |c | BLS 0x24e8c 00024e8a 4e 4f |NO | TRAP #15 00024e8c 20 07 | | MOVE.L D7,D0 00024e8e e3 80 | | ASL.L #0x1,D0 00024e90 41 ee fd cc |A | LEA.L (A6-0x234),A0 00024e94 31 b9 00 02 96 e0 08 1a |1 | MOVE.W 0x296e0,(A0+D0.L+#0x1a) 00024e9c 52 87 |R | ADDQ.L #0x1,D7 00024e9e be 81 | | CMP.L D1,D7 00024ea0 6f e4 |o | BLE 0x24e86 00024ea2 00 11 00 10 | | ORI.B #0x10,(A1) 00024ea6 02 11 00 bf | | ANDI.B #0xbf,(A1) 00024eaa 02 11 00 7f | | ANDI.B #0x7f,(A1) 00024eae 02 11 00 df | | ANDI.B #0xdf,(A1) 00024eb2 20 2e 00 10 | . | MOVE.L (A6+0x10),D0 00024eb6 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 00024ebc 63 02 |c | BLS 0x24ec0 00024ebe 4e 4f |NO | TRAP #15 00024ec0 02 51 f0 00 | Q | ANDI.W #0xf000,(A1) 00024ec4 81 51 | Q | OR.W D0,(A1) 00024ec6 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 00024eca b0 81 | | CMP.L D1,D0 00024ecc 63 02 |c | BLS 0x24ed0 00024ece 4e 4f |NO | TRAP #15 00024ed0 1d 40 fd e4 | @ | MOVE.B D0,(A6-0x21c) 00024ed4 20 2e 00 08 | . | MOVE.L (A6+0x8),D0 00024ed8 b0 81 | | CMP.L D1,D0 00024eda 63 02 |c | BLS 0x24ede 00024edc 4e 4f |NO | TRAP #15 00024ede 1d 40 fd e5 | @ | MOVE.B D0,(A6-0x21b) 00024ee2 48 6e fd d2 |Hn | PEA.L (A6-0x22e) 00024ee6 2f 06 |/ | MOVE.L D6,-(A7) 00024ee8 42 67 |Bg | CLR.W -(A7) 00024eea 4e b9 00 01 02 04 |N | JSR KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W) 00024ef0 50 4f |PO | ADDQ.L #0x8,A7 00024ef2 42 57 |BW | CLR.W (A7) 00024ef4 48 6e fd d0 |Hn | PEA.L (A6-0x230) 00024ef8 4e b9 00 01 02 06 |N | JSR KC03_Wait_Disk_IO(a : W; VAR status : Byte) 00024efe 5c 4f |\O | ADDQ.L #0x6,A7 00024f00 4c df 03 c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0+A1 00024f04 4e 5e |N^ | UNLK A6 00024f06 4e 75 |Nu | RTS 00024f08 ; -------------------------------------------------------------------------------------- 00024f08 ; OMSI PASCAL Function 00024f08 ; <LVAR -0x006 4(rw)> 00024f08 ; <LVAR -0x01e 4(rw)> 00024f08 ; <LVAR -0x022 4(rw)> 00024f08 ; <LVAR -0x026 4(rw)> 00024f08 ; <LVAR -0x028 @ 1(r)> 00024f08 ; <LVAR -0x02c 2(w)> 00024f08 ; <LVAR -0x02e 2(w)> 00024f08 ; <LVAR -0x030 2(r)> 00024f08 ; <LVAR -0x032 2(r)> 00024f08 ; <LVAR -0x034 2(w)> 00024f08 ; <LVAR -0x036 2(r)> 00024f08 ; <LVAR -0x038 @ 2(r)> 00024f08 ; <LVAR -0x03c 4(w)> 00024f08 ; <LVAR -0x03d 1(r)> 00024f08 ; <LVAR -0x03e 1(r)> 00024f08 ; <LVAR -0x040 @ 2(r)> 00024f08 ; -------------------------------------------------------------------------------------- 00024f08 4e 56 ff 22 |NV " | LINK.W A6,#0xff22 00024f0c bf d5 | | CMPA.L (A5),A7 00024f0e 62 06 |b | BHI 0x24f16 00024f10 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024f14 4e 76 |Nv | TRAPV 00024f16 de fc 00 96 | | ADDA.W #0x96,A7 00024f1a 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00024f1e 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00024f24 47 ee ff fa |G | LEA.L (A6-0x6),A3 00024f28 49 ee ff c0 |I | LEA.L (A6-0x40),A4 00024f2c 76 01 |v | MOVEQ.L #0x01,D3 00024f2e 78 18 |x | MOVEQ.L #0x18,D4 00024f30 42 93 |B | CLR.L (A3) 00024f32 55 4f |UO | SUBQ.L #0x2,A7 00024f34 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00024f3a 4a 1f |J | TST.B (A7)+ 00024f3c 67 00 01 3a |g : | BEQ 0x25078 00024f40 42 6e ff c8 |Bn | CLR.W (A6-0x38) 00024f44 42 6e ff ca |Bn | CLR.W (A6-0x36) 00024f48 3d 7c 00 02 ff cc |=| | MOVE.W #0x2,(A6-0x34) 00024f4e 42 6e ff ce |Bn | CLR.W (A6-0x32) 00024f52 42 6e ff d0 |Bn | CLR.W (A6-0x30) 00024f56 30 39 00 02 97 10 |09 | MOVE.W 0x29710,D0 00024f5c e1 40 | @ | ASL.W #0x8,D0 00024f5e 06 40 00 0a | @ | ADDI.W #0x000a,D0 00024f62 3d 40 ff d2 |=@ | MOVE.W D0,(A6-0x2e) 00024f66 3d 44 ff d4 |=D | MOVE.W D4,(A6-0x2c) 00024f6a 48 6e ff c8 |Hn | PEA.L (A6-0x38) 00024f6e 41 f9 00 02 e3 06 |A | LEA.L 0x2e306,A0 00024f74 2f 08 |/ | MOVE.L A0,-(A7) 00024f76 42 67 |Bg | CLR.W -(A7) 00024f78 4e b9 00 01 02 04 |N | JSR KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W) 00024f7e 50 4f |PO | ADDQ.L #0x8,A7 00024f80 42 57 |BW | CLR.W (A7) 00024f82 48 6e ff d8 |Hn | PEA.L (A6-0x28) 00024f86 4e b9 00 01 02 06 |N | JSR KC03_Wait_Disk_IO(a : W; VAR status : Byte) 00024f8c 5c 4f |\O | ADDQ.L #0x6,A7 00024f8e 4a 2e ff d8 |J. | TST.B (A6-0x28) 00024f92 66 24 |f$ | BNE 0x24fb8 00024f94 41 fa bd 52 |A R | LEA.L 0x20ce8,A0 00024f98 70 08 |p | MOVEQ.L #0x08,D0 00024f9a 2f 20 |/ | MOVE.L -(A0),-(A7) 00024f9c 51 c8 ff fc |Q | DBF D0,0x24f9a 00024fa0 59 4f |YO | SUBQ.L #0x4,A7 00024fa2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024fa6 3f 03 |? | MOVE.W D3,-(A7) 00024fa8 3f 3c 00 24 |?< $ | MOVE.W #0x24,-(A7) 00024fac 4e 92 |N | JSR (A2) 00024fae 50 4f |PO | ADDQ.L #0x8,A7 00024fb0 4e ba d5 70 |N p | JSR 0x22522 00024fb4 de fc 00 28 | ( | ADDA.W #0x28,A7 00024fb8 30 39 00 02 e3 08 |09 | MOVE.W 0x2e308,D0 00024fbe e4 48 | H | LSR.W #0x2,D0 00024fc0 42 81 |B | CLR.L D1 00024fc2 32 00 |2 | MOVE.W D0,D1 00024fc4 2d 41 ff c4 |-A | MOVE.L D1,(A6-0x3c) 00024fc8 42 b9 00 02 97 0c |B | CLR.L 0x2970c 00024fce 53 81 |S | SUBQ.L #0x1,D1 00024fd0 2f 01 |/ | MOVE.L D1,-(A7) 00024fd2 70 00 |p | MOVEQ.L #0x00,D0 00024fd4 b0 97 | | CMP.L (A7),D0 00024fd6 6e 00 00 9a |n | BGT 0x25072 00024fda 0c 80 00 00 01 f7 | | CMPI.L #0x000001f7,D0 00024fe0 63 02 |c | BLS 0x24fe4 00024fe2 4e 4f |NO | TRAP #15 00024fe4 22 00 |" | MOVE.L D0,D1 00024fe6 e5 81 | | ASL.L #0x2,D1 00024fe8 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00024fee 41 f0 18 00 |A | LEA.L (A0+D1.L),A0 00024ff2 4a 28 4c 38 |J(L8 | TST.B (A0+0x4c38) 00024ff6 66 74 |ft | BNE 0x2506c 00024ff8 52 93 |R | ADDQ.L #0x1,(A3) 00024ffa 42 81 |B | CLR.L D1 00024ffc 12 28 4c 39 | (L9 | MOVE.B (A0+0x4c39),D1 00025000 e1 41 | A | ASL.W #0x8,D1 00025002 42 82 |B | CLR.L D2 00025004 14 28 4c 3a | (L: | MOVE.B (A0+0x4c3a),D2 00025008 d4 41 | A | ADD.W D1,D2 0002500a 48 c2 |H | EXTW.L D2 0002500c 2e 02 |. | MOVE.L D2,D7 0002500e e1 87 | | ASL.L #0x8,D7 00025010 42 81 |B | CLR.L D1 00025012 12 28 4c 3b | (L; | MOVE.B (A0+0x4c3b),D1 00025016 de 81 | | ADD.L D1,D7 00025018 de 87 | | ADD.L D7,D7 0002501a 2f 07 |/ | MOVE.L D7,-(A7) 0002501c 48 54 |HT | PEA.L (A4) 0002501e 4e ba fc 72 |N r | JSR 0x24c92 00025022 50 4f |PO | ADDQ.L #0x8,A7 00025024 42 81 |B | CLR.L D1 00025026 32 14 |2 | MOVE.W (A4),D1 00025028 2f 01 |/ | MOVE.L D1,-(A7) 0002502a 42 81 |B | CLR.L D1 0002502c 12 2e ff c2 | . | MOVE.B (A6-0x3e),D1 00025030 2f 01 |/ | MOVE.L D1,-(A7) 00025032 42 81 |B | CLR.L D1 00025034 12 2e ff c3 | . | MOVE.B (A6-0x3d),D1 00025038 2f 01 |/ | MOVE.L D1,-(A7) 0002503a 4e ba fc ce |N | JSR 0x24d0a 0002503e de fc 00 0c | | ADDA.W #0xc,A7 00025042 52 87 |R | ADDQ.L #0x1,D7 00025044 2f 07 |/ | MOVE.L D7,-(A7) 00025046 48 54 |HT | PEA.L (A4) 00025048 4e ba fc 48 |N H | JSR 0x24c92 0002504c 50 4f |PO | ADDQ.L #0x8,A7 0002504e 42 81 |B | CLR.L D1 00025050 32 14 |2 | MOVE.W (A4),D1 00025052 2f 01 |/ | MOVE.L D1,-(A7) 00025054 42 81 |B | CLR.L D1 00025056 12 2e ff c2 | . | MOVE.B (A6-0x3e),D1 0002505a 2f 01 |/ | MOVE.L D1,-(A7) 0002505c 42 81 |B | CLR.L D1 0002505e 12 2e ff c3 | . | MOVE.B (A6-0x3d),D1 00025062 2f 01 |/ | MOVE.L D1,-(A7) 00025064 4e ba fc a4 |N | JSR 0x24d0a 00025068 de fc 00 0c | | ADDA.W #0xc,A7 0002506c 52 80 |R | ADDQ.L #0x1,D0 0002506e 68 00 ff 64 |h d | BVC 0x24fd4 00025072 58 4f |XO | ADDQ.L #0x4,A7 00025074 60 00 02 64 |` d | BRA 0x252da 00025078 41 fa bc 82 |A | LEA.L 0x20cfc,A0 0002507c 70 04 |p | MOVEQ.L #0x04,D0 0002507e 2f 20 |/ | MOVE.L -(A0),-(A7) 00025080 51 c8 ff fc |Q | DBF D0,0x2507e 00025084 59 4f |YO | SUBQ.L #0x4,A7 00025086 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002508a 3f 03 |? | MOVE.W D3,-(A7) 0002508c 3f 3c 00 14 |?< | MOVE.W #0x14,-(A7) 00025090 4e 92 |N | JSR (A2) 00025092 50 4f |PO | ADDQ.L #0x8,A7 00025094 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002509a de c4 | | ADDA.W D4,A7 0002509c 42 ae ff da |B | CLR.L (A6-0x26) 000250a0 70 00 |p | MOVEQ.L #0x00,D0 000250a2 2f 00 |/ | MOVE.L D0,-(A7) 000250a4 0c 80 00 00 07 ff | | CMPI.L #0x000007ff,D0 000250aa 63 02 |c | BLS 0x250ae 000250ac 4e 4f |NO | TRAP #15 000250ae 22 00 |" | MOVE.L D0,D1 000250b0 e5 81 | | ASL.L #0x2,D1 000250b2 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 000250b8 41 f0 18 00 |A | LEA.L (A0+D1.L),A0 000250bc 2f 08 |/ | MOVE.L A0,-(A7) 000250be 32 28 04 4c |2( L | MOVE.W (A0+0x44c),D1 000250c2 e5 49 | I | LSL.W #0x2,D1 000250c4 e4 49 | I | LSR.W #0x2,D1 000250c6 b2 79 00 02 97 12 | y | CMP.W 0x29712,D1 000250cc 62 00 01 1e |b | BHI 0x251ec 000250d0 14 39 00 02 97 14 | 9 | MOVE.B 0x29714,D2 000250d6 b4 28 04 4e | ( N | CMP.B (A0+0x44e),D2 000250da 64 0e |d | BCC 0x250ea 000250dc 42 82 |B | CLR.L D2 000250de 14 28 04 4e | ( N | MOVE.B (A0+0x44e),D2 000250e2 0c 42 00 ff | B | CMPI.W #0x00ff,D2 000250e6 66 00 01 04 |f | BNE 0x251ec 000250ea 14 39 00 02 97 15 | 9 | MOVE.B 0x29715,D2 000250f0 b4 28 04 4f | ( O | CMP.B (A0+0x44f),D2 000250f4 64 0e |d | BCC 0x25104 000250f6 42 82 |B | CLR.L D2 000250f8 14 28 04 4f | ( O | MOVE.B (A0+0x44f),D2 000250fc 0c 42 00 ff | B | CMPI.W #0x00ff,D2 00025100 66 00 00 ea |f | BNE 0x251ec 00025104 4a 41 |JA | TST.W D1 00025106 66 0e |f | BNE 0x25116 00025108 4a 28 04 4e |J( N | TST.B (A0+0x44e) 0002510c 66 08 |f | BNE 0x25116 0002510e 4a 28 04 4f |J( O | TST.B (A0+0x44f) 00025112 67 00 00 d8 |g | BEQ 0x251ec 00025116 52 93 |R | ADDQ.L #0x1,(A3) 00025118 42 81 |B | CLR.L D1 0002511a 12 28 04 4e | ( N | MOVE.B (A0+0x44e),D1 0002511e 0c 41 00 ff | A | CMPI.W #0x00ff,D1 00025122 66 26 |f& | BNE 0x2514a 00025124 42 ae ff de |B | CLR.L (A6-0x22) 00025128 42 81 |B | CLR.L D1 0002512a 12 39 00 02 97 14 | 9 | MOVE.B 0x29714,D1 00025130 53 41 |SA | SUBQ.W #0x1,D1 00025132 48 c1 |H | EXTW.L D1 00025134 2d 41 ff e2 |-A | MOVE.L D1,(A6-0x1e) 00025138 7c 00 || | MOVEQ.L #0x00,D6 0002513a 42 81 |B | CLR.L D1 0002513c 12 39 00 02 97 15 | 9 | MOVE.B 0x29715,D1 00025142 53 41 |SA | SUBQ.W #0x1,D1 00025144 48 c1 |H | EXTW.L D1 00025146 2a 01 |* | MOVE.L D1,D5 00025148 60 22 |`" | BRA 0x2516c 0002514a 34 01 |4 | MOVE.W D1,D2 0002514c 48 c2 |H | EXTW.L D2 0002514e 2d 42 ff de |-B | MOVE.L D2,(A6-0x22) 00025152 2d 42 ff e2 |-B | MOVE.L D2,(A6-0x1e) 00025156 42 81 |B | CLR.L D1 00025158 12 28 04 4f | ( O | MOVE.B (A0+0x44f),D1 0002515c 0c 41 00 ff | A | CMPI.W #0x00ff,D1 00025160 66 02 |f | BNE 0x25164 00025162 60 d4 |` | BRA 0x25138 00025164 34 01 |4 | MOVE.W D1,D2 00025166 48 c2 |H | EXTW.L D2 00025168 2c 02 |, | MOVE.L D2,D6 0002516a 2a 02 |* | MOVE.L D2,D5 0002516c 2f 2e ff e2 |/. | MOVE.L (A6-0x1e),-(A7) 00025170 22 2e ff de |". | MOVE.L (A6-0x22),D1 00025174 b2 97 | | CMP.L (A7),D1 00025176 6e 14 |n | BGT 0x2518c 00025178 24 17 |$ | MOVE.L (A7),D2 0002517a 0c 81 80 00 00 01 | | CMPI.L #0x80000001,D1 00025180 6d 08 |m | BLT 0x2518a 00025182 0c 82 7f ff ff ff | | CMPI.L #0x7fffffff,D2 00025188 6f 02 |o | BLE 0x2518c 0002518a 4e 4f |NO | TRAP #15 0002518c b2 97 | | CMP.L (A7),D1 0002518e 6f 04 |o | BLE 0x25194 00025190 59 4f |YO | SUBQ.L #0x4,A7 00025192 60 56 |`V | BRA 0x251ea 00025194 2f 01 |/ | MOVE.L D1,-(A7) 00025196 2f 05 |/ | MOVE.L D5,-(A7) 00025198 20 06 | | MOVE.L D6,D0 0002519a b0 97 | | CMP.L (A7),D0 0002519c 6e 14 |n | BGT 0x251b2 0002519e 24 17 |$ | MOVE.L (A7),D2 000251a0 0c 80 80 00 00 01 | | CMPI.L #0x80000001,D0 000251a6 6d 08 |m | BLT 0x251b0 000251a8 0c 82 7f ff ff ff | | CMPI.L #0x7fffffff,D2 000251ae 6f 02 |o | BLE 0x251b2 000251b0 4e 4f |NO | TRAP #15 000251b2 b0 97 | | CMP.L (A7),D0 000251b4 6e 28 |n( | BGT 0x251de 000251b6 52 ae ff da |R | ADDQ.L #0x1,(A6-0x26) 000251ba 20 6f 00 0c | o | MOVEA.L (A7+0xc),A0 000251be 42 81 |B | CLR.L D1 000251c0 32 28 04 4c |2( L | MOVE.W (A0+0x44c),D1 000251c4 e5 49 | I | LSL.W #0x2,D1 000251c6 e4 49 | I | LSR.W #0x2,D1 000251c8 2f 01 |/ | MOVE.L D1,-(A7) 000251ca 22 2f 00 08 |"/ | MOVE.L (A7+0x8),D1 000251ce 2f 01 |/ | MOVE.L D1,-(A7) 000251d0 2f 00 |/ | MOVE.L D0,-(A7) 000251d2 4e ba fc 3c |N < | JSR 0x24e10 000251d6 de fc 00 0c | | ADDA.W #0xc,A7 000251da 52 80 |R | ADDQ.L #0x1,D0 000251dc 68 d4 |h | BVC 0x251b2 000251de 58 4f |XO | ADDQ.L #0x4,A7 000251e0 22 17 |" | MOVE.L (A7),D1 000251e2 52 81 |R | ADDQ.L #0x1,D1 000251e4 69 04 |i | BVS 0x251ea 000251e6 58 4f |XO | ADDQ.L #0x4,A7 000251e8 60 a2 |` | BRA 0x2518c 000251ea 50 4f |PO | ADDQ.L #0x8,A7 000251ec 58 4f |XO | ADDQ.L #0x4,A7 000251ee 20 17 | | MOVE.L (A7),D0 000251f0 52 80 |R | ADDQ.L #0x1,D0 000251f2 0c 80 00 00 07 ff | | CMPI.L #0x000007ff,D0 000251f8 6e 06 |n | BGT 0x25200 000251fa 58 4f |XO | ADDQ.L #0x4,A7 000251fc 60 00 fe a4 |` | BRA 0x250a2 00025200 58 4f |XO | ADDQ.L #0x4,A7 00025202 41 fa bb 0c |A | LEA.L 0x20d10,A0 00025206 70 04 |p | MOVEQ.L #0x04,D0 00025208 2f 20 |/ | MOVE.L -(A0),-(A7) 0002520a 51 c8 ff fc |Q | DBF D0,0x25208 0002520e 51 4f |QO | SUBQ.L #0x8,A7 00025210 2f 2e ff da |/. | MOVE.L (A6-0x26),-(A7) 00025214 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002521a 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002521e 3f 03 |? | MOVE.W D3,-(A7) 00025220 3f 3c 00 14 |?< | MOVE.W #0x14,-(A7) 00025224 4e 92 |N | JSR (A2) 00025226 50 4f |PO | ADDQ.L #0x8,A7 00025228 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002522e 50 4f |PO | ADDQ.L #0x8,A7 00025230 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00025236 de c4 | | ADDA.W D4,A7 00025238 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 0002523e 20 3c 00 00 08 00 | < | MOVE.L #0x800,D0 00025244 90 93 | | SUB.L (A3),D0 00025246 0c 80 00 00 02 00 | | CMPI.L #0x00000200,D0 0002524c 6c 28 |l( | BGE 0x25276 0002524e 41 fa ba e8 |A | LEA.L 0x20d38,A0 00025252 70 09 |p | MOVEQ.L #0x09,D0 00025254 2f 20 |/ | MOVE.L -(A0),-(A7) 00025256 51 c8 ff fc |Q | DBF D0,0x25254 0002525a 59 4f |YO | SUBQ.L #0x4,A7 0002525c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00025260 3f 03 |? | MOVE.W D3,-(A7) 00025262 3f 3c 00 28 |?< ( | MOVE.W #0x28,-(A7) 00025266 4e 92 |N | JSR (A2) 00025268 50 4f |PO | ADDQ.L #0x8,A7 0002526a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00025270 de fc 00 2c | , | ADDA.W #0x2c,A7 00025274 60 5e |`^ | BRA 0x252d4 00025276 41 fa ba dc |A | LEA.L 0x20d54,A0 0002527a 72 06 |r | MOVEQ.L #0x06,D1 0002527c 2f 20 |/ | MOVE.L -(A0),-(A7) 0002527e 51 c9 ff fc |Q | DBF D1,0x2527c 00025282 9e fc 00 22 | " | SUBA.W #0x22,A7 00025286 20 4f | O | MOVEA.L A7,A0 00025288 43 fa ba ca |C | LEA.L 0x20d54,A1 0002528c 72 20 |r | MOVEQ.L #0x20,D1 0002528e 10 d9 | | MOVE.B (A1)+,(A0)+ 00025290 51 c9 ff fc |Q | DBF D1,0x2528e 00025294 51 4f |QO | SUBQ.L #0x8,A7 00025296 2f 13 |/ | MOVE.L (A3),-(A7) 00025298 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002529e 48 6f 00 2e |Ho . | PEA.L (A7+0x2e) 000252a2 3f 03 |? | MOVE.W D3,-(A7) 000252a4 3f 3c 00 1c |?< | MOVE.W #0x1c,-(A7) 000252a8 4e 92 |N | JSR (A2) 000252aa 2e 80 |. | MOVE.L D0,(A7) 000252ac 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000252b2 48 6f 00 14 |Ho | PEA.L (A7+0x14) 000252b6 3f 03 |? | MOVE.W D3,-(A7) 000252b8 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 000252bc 4e 92 |N | JSR (A2) 000252be 50 4f |PO | ADDQ.L #0x8,A7 000252c0 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 000252c6 de fc 00 10 | | ADDA.W #0x10,A7 000252ca 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000252d0 de fc 00 42 | B | ADDA.W #0x42,A7 000252d4 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000252da 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000252de 4e 5e |N^ | UNLK A6 000252e0 4e 75 |Nu | RTS 000252e2 ; -------------------------------------------------------------------------------------- 000252e2 ; OMSI PASCAL Function 000252e2 ; <LVAR 0x010 1(rw)> 000252e2 ; <LVAR 0x00f 1(r)> 000252e2 ; <LVAR 0x00e 1(r)> 000252e2 ; <LVAR 0x00d 1(r)> 000252e2 ; <LVAR 0x00c 1(r)> 000252e2 ; -------------------------------------------------------------------------------------- 000252e2 4e 56 ff ec |NV | LINK.W A6,#0xffec 000252e6 bf d5 | | CMPA.L (A5),A7 000252e8 62 06 |b | BHI 0x252f0 000252ea 44 fc 00 02 |D | MOVE.W #0x2,CCR 000252ee 4e 76 |Nv | TRAPV 000252f0 de fc 00 10 | | ADDA.W #0x10,A7 000252f4 48 e7 c1 00 |H | MOVEM.L D7+D1+D0,-(A7) 000252f8 42 80 |B | CLR.L D0 000252fa 10 2e 00 0c | . | MOVE.B (A6+0xc),D0 000252fe e1 40 | @ | ASL.W #0x8,D0 00025300 42 81 |B | CLR.L D1 00025302 12 2e 00 0d | . | MOVE.B (A6+0xd),D1 00025306 d2 40 | @ | ADD.W D0,D1 00025308 48 c1 |H | EXTW.L D1 0002530a e1 81 | | ASL.L #0x8,D1 0002530c 42 80 |B | CLR.L D0 0002530e 10 2e 00 0e | . | MOVE.B (A6+0xe),D0 00025312 d0 81 | | ADD.L D1,D0 00025314 e1 80 | | ASL.L #0x8,D0 00025316 42 81 |B | CLR.L D1 00025318 12 2e 00 0f | . | MOVE.B (A6+0xf),D1 0002531c d2 80 | | ADD.L D0,D1 0002531e 2e 01 |. | MOVE.L D1,D7 00025320 42 2e 00 10 |B. | CLR.B (A6+0x10) 00025324 0c 87 00 00 04 00 | | CMPI.L #0x00000400,D7 0002532a 67 04 |g | BEQ 0x25330 0002532c 52 2e 00 10 |R. | ADDQ.B #0x1,(A6+0x10) 00025330 4c df 00 83 |L | MOVEM.L (A7)+,D0+D1+D7 00025334 4e 5e |N^ | UNLK A6 00025336 4e 75 |Nu | RTS 00025338 ; -------------------------------------------------------------------------------------- 00025338 ; OMSI PASCAL Function 00025338 ; <LVAR -0x006 @ 4(r)> 00025338 ; <LVAR -0x00a @ 4(r)> 00025338 ; <LVAR -0x00c @ 1(r)> 00025338 ; <LVAR -0x00e 2(rw)> 00025338 ; <LVAR -0x010 2(rw)> 00025338 ; <LVAR -0x012 2(w)> 00025338 ; <LVAR -0x014 2(r)> 00025338 ; <LVAR -0x016 2(r)> 00025338 ; <LVAR -0x018 2(w)> 00025338 ; <LVAR -0x01a 2(r)> 00025338 ; <LVAR -0x01c @ 2(r)> 00025338 ; -------------------------------------------------------------------------------------- 00025338 4e 56 ff 5e |NV ^ | LINK.W A6,#0xff5e 0002533c bf d5 | | CMPA.L (A5),A7 0002533e 62 06 |b | BHI 0x25346 00025340 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025344 4e 76 |Nv | TRAPV 00025346 de fc 00 82 | | ADDA.W #0x82,A7 0002534a 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002534e 45 f9 00 02 97 10 |E | LEA.L 0x29710,A2 00025354 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 0002535a 49 ee ff e4 |I | LEA.L (A6-0x1c),A4 0002535e 72 01 |r | MOVEQ.L #0x01,D1 00025360 74 02 |t | MOVEQ.L #0x02,D2 00025362 7a 30 |z0 | MOVEQ.L #0x30,D5 00025364 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00025368 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 0002536e 58 4f |XO | ADDQ.L #0x4,A7 00025370 42 54 |BT | CLR.W (A4) 00025372 42 6e ff e6 |Bn | CLR.W (A6-0x1a) 00025376 3d 42 ff e8 |=B | MOVE.W D2,(A6-0x18) 0002537a 42 6e ff ea |Bn | CLR.W (A6-0x16) 0002537e 42 6e ff ec |Bn | CLR.W (A6-0x14) 00025382 30 12 |0 | MOVE.W (A2),D0 00025384 e1 40 | @ | ASL.W #0x8,D0 00025386 3d 40 ff ee |=@ | MOVE.W D0,(A6-0x12) 0002538a 42 6e ff f0 |Bn | CLR.W (A6-0x10) 0002538e 42 6e ff f2 |Bn | CLR.W (A6-0xe) 00025392 4a 39 00 02 97 0b |J9 | TST.B 0x2970b 00025398 67 00 05 1a |g | BEQ 0x258b4 0002539c 55 4f |UO | SUBQ.L #0x2,A7 0002539e 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 000253a4 4a 1f |J | TST.B (A7)+ 000253a6 67 00 02 c6 |g | BEQ 0x2566e 000253aa 7e 00 |~ | MOVEQ.L #0x00,D7 000253ac 42 54 |BT | CLR.W (A4) 000253ae 42 6e ff e6 |Bn | CLR.W (A6-0x1a) 000253b2 3d 42 ff e8 |=B | MOVE.W D2,(A6-0x18) 000253b6 42 6e ff ea |Bn | CLR.W (A6-0x16) 000253ba 42 6e ff ec |Bn | CLR.W (A6-0x14) 000253be 30 12 |0 | MOVE.W (A2),D0 000253c0 e1 40 | @ | ASL.W #0x8,D0 000253c2 06 40 00 14 | @ | ADDI.W #0x0014,D0 000253c6 3d 40 ff ee |=@ | MOVE.W D0,(A6-0x12) 000253ca 3d 7c 00 03 ff f0 |=| | MOVE.W #0x3,(A6-0x10) 000253d0 3d 7c 00 24 ff f2 |=| $ | MOVE.W #0x24,(A6-0xe) 000253d6 48 54 |HT | PEA.L (A4) 000253d8 41 f9 00 02 ea ea |A | LEA.L 0x2eaea,A0 000253de 2f 08 |/ | MOVE.L A0,-(A7) 000253e0 42 67 |Bg | CLR.W -(A7) 000253e2 4e b9 00 01 02 04 |N | JSR KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W) 000253e8 50 4f |PO | ADDQ.L #0x8,A7 000253ea 42 57 |BW | CLR.W (A7) 000253ec 48 6e ff f4 |Hn | PEA.L (A6-0xc) 000253f0 4e b9 00 01 02 06 |N | JSR KC03_Wait_Disk_IO(a : W; VAR status : Byte) 000253f6 5c 4f |\O | ADDQ.L #0x6,A7 000253f8 4a 2e ff f4 |J. | TST.B (A6-0xc) 000253fc 66 2a |f* | BNE 0x25428 000253fe 9e fc 00 1a | | SUBA.W #0x1a,A7 00025402 20 4f | O | MOVEA.L A7,A0 00025404 43 fa b9 ae |C | LEA.L 0x20db4,A1 00025408 70 18 |p | MOVEQ.L #0x18,D0 0002540a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002540c 51 c8 ff fc |Q | DBF D0,0x2540a 00025410 59 4f |YO | SUBQ.L #0x4,A7 00025412 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00025416 3f 01 |? | MOVE.W D1,-(A7) 00025418 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 0002541c 4e 93 |N | JSR (A3) 0002541e 50 4f |PO | ADDQ.L #0x8,A7 00025420 4e ba d1 00 |N | JSR 0x22522 00025424 de fc 00 1e | | ADDA.W #0x1e,A7 00025428 30 39 00 02 eb 02 |09 | MOVE.W 0x2eb02,D0 0002542e b0 7a cf 70 | z p | CMP.W 0x223a0,D0 00025432 66 26 |f& | BNE 0x2545a 00025434 30 39 00 02 eb 00 |09 | MOVE.W 0x2eb00,D0 0002543a b0 7a cf 64 | z d | CMP.W 0x223a0,D0 0002543e 66 1a |f | BNE 0x2545a 00025440 55 4f |UO | SUBQ.L #0x2,A7 00025442 2f 39 00 02 ea f2 |/9 | MOVE.L 0x2eaf2,-(A7) 00025448 2f 39 00 02 ea ee |/9 | MOVE.L 0x2eaee,-(A7) 0002544e 4e ba fe 92 |N | JSR 0x252e2 00025452 50 4f |PO | ADDQ.L #0x8,A7 00025454 4a 1f |J | TST.B (A7)+ 00025456 67 00 01 20 |g | BEQ 0x25578 0002545a 41 f9 00 02 ea ea |A | LEA.L 0x2eaea,A0 00025460 43 fa cf 26 |C & | LEA.L 0x22388,A1 00025464 70 24 |p$ | MOVEQ.L #0x24,D0 00025466 10 d9 | | MOVE.B (A1)+,(A0)+ 00025468 51 c8 ff fc |Q | DBF D0,0x25466 0002546c 42 54 |BT | CLR.W (A4) 0002546e 42 6e ff e6 |Bn | CLR.W (A6-0x1a) 00025472 3d 42 ff e8 |=B | MOVE.W D2,(A6-0x18) 00025476 42 6e ff ea |Bn | CLR.W (A6-0x16) 0002547a 42 6e ff ec |Bn | CLR.W (A6-0x14) 0002547e 30 12 |0 | MOVE.W (A2),D0 00025480 e1 40 | @ | ASL.W #0x8,D0 00025482 06 40 00 13 | @ | ADDI.W #0x0013,D0 00025486 3d 40 ff ee |=@ | MOVE.W D0,(A6-0x12) 0002548a 3d 7c 00 03 ff f0 |=| | MOVE.W #0x3,(A6-0x10) 00025490 3d 7c 00 24 ff f2 |=| $ | MOVE.W #0x24,(A6-0xe) 00025496 48 54 |HT | PEA.L (A4) 00025498 41 f9 00 02 ea ea |A | LEA.L 0x2eaea,A0 0002549e 2f 08 |/ | MOVE.L A0,-(A7) 000254a0 42 67 |Bg | CLR.W -(A7) 000254a2 4e b9 00 01 02 04 |N | JSR KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W) 000254a8 50 4f |PO | ADDQ.L #0x8,A7 000254aa 42 57 |BW | CLR.W (A7) 000254ac 48 6e ff f4 |Hn | PEA.L (A6-0xc) 000254b0 4e b9 00 01 02 06 |N | JSR KC03_Wait_Disk_IO(a : W; VAR status : Byte) 000254b6 5c 4f |\O | ADDQ.L #0x6,A7 000254b8 4a 2e ff f4 |J. | TST.B (A6-0xc) 000254bc 66 2a |f* | BNE 0x254e8 000254be 9e fc 00 1a | | SUBA.W #0x1a,A7 000254c2 20 4f | O | MOVEA.L A7,A0 000254c4 43 fa b8 ee |C | LEA.L 0x20db4,A1 000254c8 70 18 |p | MOVEQ.L #0x18,D0 000254ca 10 d9 | | MOVE.B (A1)+,(A0)+ 000254cc 51 c8 ff fc |Q | DBF D0,0x254ca 000254d0 59 4f |YO | SUBQ.L #0x4,A7 000254d2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000254d6 3f 01 |? | MOVE.W D1,-(A7) 000254d8 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000254dc 4e 93 |N | JSR (A3) 000254de 50 4f |PO | ADDQ.L #0x8,A7 000254e0 4e ba d0 40 |N @ | JSR 0x22522 000254e4 de fc 00 1e | | ADDA.W #0x1e,A7 000254e8 7e 01 |~ | MOVEQ.L #0x01,D7 000254ea 41 f9 00 02 eb 0f |A | LEA.L 0x2eb0f,A0 000254f0 43 fa ce bb |C | LEA.L 0x223ad,A1 000254f4 70 22 |p" | MOVEQ.L #0x22,D0 000254f6 10 d9 | | MOVE.B (A1)+,(A0)+ 000254f8 51 c8 ff fc |Q | DBF D0,0x254f6 000254fc 42 54 |BT | CLR.W (A4) 000254fe 42 6e ff e6 |Bn | CLR.W (A6-0x1a) 00025502 3d 42 ff e8 |=B | MOVE.W D2,(A6-0x18) 00025506 42 6e ff ea |Bn | CLR.W (A6-0x16) 0002550a 42 6e ff ec |Bn | CLR.W (A6-0x14) 0002550e 30 12 |0 | MOVE.W (A2),D0 00025510 e1 40 | @ | ASL.W #0x8,D0 00025512 06 40 00 13 | @ | ADDI.W #0x0013,D0 00025516 3d 40 ff ee |=@ | MOVE.W D0,(A6-0x12) 0002551a 3d 7c 00 04 ff f0 |=| | MOVE.W #0x4,(A6-0x10) 00025520 3d 7c 00 20 ff f2 |=| | MOVE.W #0x20,(A6-0xe) 00025526 48 54 |HT | PEA.L (A4) 00025528 41 f9 00 02 eb 0f |A | LEA.L 0x2eb0f,A0 0002552e 2f 08 |/ | MOVE.L A0,-(A7) 00025530 42 67 |Bg | CLR.W -(A7) 00025532 4e b9 00 01 02 04 |N | JSR KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W) 00025538 50 4f |PO | ADDQ.L #0x8,A7 0002553a 42 57 |BW | CLR.W (A7) 0002553c 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00025540 4e b9 00 01 02 06 |N | JSR KC03_Wait_Disk_IO(a : W; VAR status : Byte) 00025546 5c 4f |\O | ADDQ.L #0x6,A7 00025548 4a 2e ff f4 |J. | TST.B (A6-0xc) 0002554c 66 2a |f* | BNE 0x25578 0002554e 9e fc 00 1a | | SUBA.W #0x1a,A7 00025552 20 4f | O | MOVEA.L A7,A0 00025554 43 fa b8 78 |C x | LEA.L 0x20dce,A1 00025558 70 18 |p | MOVEQ.L #0x18,D0 0002555a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002555c 51 c8 ff fc |Q | DBF D0,0x2555a 00025560 59 4f |YO | SUBQ.L #0x4,A7 00025562 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00025566 3f 01 |? | MOVE.W D1,-(A7) 00025568 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 0002556c 4e 93 |N | JSR (A3) 0002556e 50 4f |PO | ADDQ.L #0x8,A7 00025570 4e ba cf b0 |N | JSR 0x22522 00025574 de fc 00 1e | | ADDA.W #0x1e,A7 00025578 42 39 00 02 db 22 |B9 " | CLR.B 0x2db22 0002557e 02 39 00 7f 00 02 db 23 | 9 #| ANDI.B #0x7f,0x2db23 00025586 02 39 00 bf 00 02 db 23 | 9 #| ANDI.B #0xbf,0x2db23 0002558e 02 39 00 df 00 02 db 23 | 9 #| ANDI.B #0xdf,0x2db23 00025596 02 39 00 ef 00 02 db 23 | 9 #| ANDI.B #0xef,0x2db23 0002559e 42 79 00 02 db 24 |By $ | CLR.W 0x2db24 000255a4 42 54 |BT | CLR.W (A4) 000255a6 42 6e ff e6 |Bn | CLR.W (A6-0x1a) 000255aa 3d 42 ff e8 |=B | MOVE.W D2,(A6-0x18) 000255ae 42 6e ff ea |Bn | CLR.W (A6-0x16) 000255b2 42 6e ff ec |Bn | CLR.W (A6-0x14) 000255b6 30 12 |0 | MOVE.W (A2),D0 000255b8 e1 40 | @ | ASL.W #0x8,D0 000255ba 06 40 00 0d | @ | ADDI.W #0x000d,D0 000255be 3d 40 ff ee |=@ | MOVE.W D0,(A6-0x12) 000255c2 4a 39 00 02 eb 32 |J9 2 | TST.B 0x2eb32 000255c8 67 06 |g | BEQ 0x255d0 000255ca 42 6e ff f0 |Bn | CLR.W (A6-0x10) 000255ce 60 0c |` | BRA 0x255dc 000255d0 4a 07 |J | TST.B D7 000255d2 67 02 |g | BEQ 0x255d6 000255d4 60 f4 |` | BRA 0x255ca 000255d6 3d 7c 15 00 ff f0 |=| | MOVE.W #0x1500,(A6-0x10) 000255dc 42 6e ff f2 |Bn | CLR.W (A6-0xe) 000255e0 42 39 00 02 db 20 |B9 | CLR.B 0x2db20 000255e6 30 39 00 02 96 fa |09 | MOVE.W 0x296fa,D0 000255ec 53 40 |S@ | SUBQ.W #0x1,D0 000255ee b0 42 | B | CMP.W D2,D0 000255f0 62 52 |bR | BHI 0x25644 000255f2 d0 40 | @ | ADD.W D0,D0 000255f4 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000255fc 00 2c | , | .CONST 0x2c ; [0x0] -> 0x25628 000255fe 00 06 | | .CONST 0x6 ; [0x1] -> 0x25602 00025600 00 3a | : | .CONST 0x3a ; [0x2] -> 0x25636 00025602 switch@0x255f4[0x1]: 00025602 41 fa b8 74 |A t | LEA.L 0x20e78,A0 00025606 70 0b |p | MOVEQ.L #0x0b,D0 00025608 2f 20 |/ | MOVE.L -(A0),-(A7) 0002560a 51 c8 ff fc |Q | DBF D0,0x25608 0002560e 59 4f |YO | SUBQ.L #0x4,A7 00025610 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00025614 3f 01 |? | MOVE.W D1,-(A7) 00025616 3f 05 |? | MOVE.W D5,-(A7) 00025618 4e 93 |N | JSR (A3) 0002561a 50 4f |PO | ADDQ.L #0x8,A7 0002561c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00025622 de fc 00 34 | 4 | ADDA.W #0x34,A7 00025626 60 42 |`B | BRA 0x2566a 00025628 switch@0x255f4[0x0]: 00025628 41 fa b8 7e |A ~ | LEA.L 0x20ea8,A0 0002562c 70 0b |p | MOVEQ.L #0x0b,D0 0002562e 2f 20 |/ | MOVE.L -(A0),-(A7) 00025630 51 c8 ff fc |Q | DBF D0,0x2562e 00025634 60 d8 |` | BRA 0x2560e 00025636 switch@0x255f4[0x2]: 00025636 41 fa b8 a0 |A | LEA.L 0x20ed8,A0 0002563a 70 0b |p | MOVEQ.L #0x0b,D0 0002563c 2f 20 |/ | MOVE.L -(A0),-(A7) 0002563e 51 c8 ff fc |Q | DBF D0,0x2563c 00025642 60 ca |` | BRA 0x2560e 00025644 41 fa b8 c0 |A | LEA.L 0x20f06,A0 00025648 70 16 |p | MOVEQ.L #0x16,D0 0002564a 3f 20 |? | MOVE.W -(A0),-(A7) 0002564c 51 c8 ff fc |Q | DBF D0,0x2564a 00025650 59 4f |YO | SUBQ.L #0x4,A7 00025652 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00025656 3f 01 |? | MOVE.W D1,-(A7) 00025658 3f 3c 00 2e |?< . | MOVE.W #0x2e,-(A7) 0002565c 4e 93 |N | JSR (A3) 0002565e 50 4f |PO | ADDQ.L #0x8,A7 00025660 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00025666 de fc 00 32 | 2 | ADDA.W #0x32,A7 0002566a 60 00 01 e0 |` | BRA 0x2584c 0002566e 42 54 |BT | CLR.W (A4) 00025670 42 6e ff e6 |Bn | CLR.W (A6-0x1a) 00025674 3d 42 ff e8 |=B | MOVE.W D2,(A6-0x18) 00025678 42 6e ff ea |Bn | CLR.W (A6-0x16) 0002567c 42 6e ff ec |Bn | CLR.W (A6-0x14) 00025680 30 12 |0 | MOVE.W (A2),D0 00025682 e1 40 | @ | ASL.W #0x8,D0 00025684 06 40 00 0d | @ | ADDI.W #0x000d,D0 00025688 3d 40 ff ee |=@ | MOVE.W D0,(A6-0x12) 0002568c 23 ee ff f6 00 02 96 de |# | MOVE.L (A6-0xa),0x296de 00025694 3d 79 00 02 96 e0 ff f0 |=y | MOVE.W 0x296e0,(A6-0x10) 0002569c 42 6e ff f2 |Bn | CLR.W (A6-0xe) 000256a0 55 4f |UO | SUBQ.L #0x2,A7 000256a2 4e b9 00 01 06 10 |N | JSR Is_machine_type_one_or_three() : Bool 000256a8 4a 1f |J | TST.B (A7)+ 000256aa 67 00 00 dc |g | BEQ 0x25788 000256ae 42 80 |B | CLR.L D0 000256b0 10 39 00 02 97 14 | 9 | MOVE.B 0x29714,D0 000256b6 c0 f9 00 02 97 12 | | MULU.W 0x29712,D0 000256bc 28 00 |( | MOVE.L D0,D4 000256be 76 1e |v | MOVEQ.L #0x1e,D3 000256c0 4e b9 00 01 02 98 |N | JSR ?divu_d3_d4 000256c6 76 3c |v< | MOVEQ.L #0x3c,D3 000256c8 4e b9 00 01 02 98 |N | JSR ?divu_d3_d4 000256ce 2c 04 |, | MOVE.L D4,D6 000256d0 bc 81 | | CMP.L D1,D6 000256d2 6c 1e |l | BGE 0x256f2 000256d4 41 fa b8 88 |A | LEA.L 0x20f5e,A0 000256d8 70 18 |p | MOVEQ.L #0x18,D0 000256da 3f 20 |? | MOVE.W -(A0),-(A7) 000256dc 51 c8 ff fc |Q | DBF D0,0x256da 000256e0 59 4f |YO | SUBQ.L #0x4,A7 000256e2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000256e6 3f 01 |? | MOVE.W D1,-(A7) 000256e8 3f 3c 00 32 |?< 2 | MOVE.W #0x32,-(A7) 000256ec 4e 93 |N | JSR (A3) 000256ee 50 4f |PO | ADDQ.L #0x8,A7 000256f0 60 52 |`R | BRA 0x25744 000256f2 9e fc 00 26 | & | SUBA.W #0x26,A7 000256f6 20 4f | O | MOVEA.L A7,A0 000256f8 43 fa b8 0c |C | LEA.L 0x20f06,A1 000256fc 70 24 |p$ | MOVEQ.L #0x24,D0 000256fe 10 d9 | | MOVE.B (A1)+,(A0)+ 00025700 51 c8 ff fc |Q | DBF D0,0x256fe 00025704 9e fc 00 0c | | SUBA.W #0xc,A7 00025708 20 4f | O | MOVEA.L A7,A0 0002570a 43 fa b8 ba |C | LEA.L 0x20fc6,A1 0002570e 70 0a |p | MOVEQ.L #0x0a,D0 00025710 10 d9 | | MOVE.B (A1)+,(A0)+ 00025712 51 c8 ff fc |Q | DBF D0,0x25710 00025716 51 4f |QO | SUBQ.L #0x8,A7 00025718 48 6f 00 14 |Ho | PEA.L (A7+0x14) 0002571c 3f 01 |? | MOVE.W D1,-(A7) 0002571e 3f 3c 00 25 |?< % | MOVE.W #0x25,-(A7) 00025722 4e 93 |N | JSR (A3) 00025724 2e 86 |. | MOVE.L D6,(A7) 00025726 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002572c 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00025730 3f 01 |? | MOVE.W D1,-(A7) 00025732 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00025736 4e 93 |N | JSR (A3) 00025738 50 4f |PO | ADDQ.L #0x8,A7 0002573a 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00025740 de fc 00 0c | | ADDA.W #0xc,A7 00025744 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002574a de fc 00 36 | 6 | ADDA.W #0x36,A7 0002574e 41 fa b8 76 |A v | LEA.L 0x20fc6,A0 00025752 70 0d |p | MOVEQ.L #0x0d,D0 00025754 2f 20 |/ | MOVE.L -(A0),-(A7) 00025756 51 c8 ff fc |Q | DBF D0,0x25754 0002575a 5d 4f |]O | SUBQ.L #0x6,A7 0002575c 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00025760 3f 01 |? | MOVE.W D1,-(A7) 00025762 3f 3c 00 38 |?< 8 | MOVE.W #0x38,-(A7) 00025766 4e 93 |N | JSR (A3) 00025768 5c 4f |\O | ADDQ.L #0x6,A7 0002576a 42 17 |B | CLR.B (A7) 0002576c 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00025772 5c 4f |\O | ADDQ.L #0x6,A7 00025774 10 1f | | MOVE.B (A7)+,D0 00025776 48 80 |H | EXTB.W D0 00025778 41 81 |A | CHK.W D1,D0 0002577a de fc 00 38 | 8 | ADDA.W #0x38,A7 0002577e 13 c0 00 02 db 20 | | MOVE.B D0,0x2db20 00025784 60 00 00 c6 |` | BRA 0x2584c 00025788 42 39 00 02 db 20 |B9 | CLR.B 0x2db20 0002578e 30 39 00 02 96 fc |09 | MOVE.W 0x296fc,D0 00025794 53 40 |S@ | SUBQ.W #0x1,D0 00025796 0c 40 00 04 | @ | CMPI.W #0x0004,D0 0002579a 62 00 00 8a |b | BHI 0x25826 0002579e d0 40 | @ | ADD.W D0,D0 000257a0 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000257a8 00 0a | | .CONST 0xa ; [0x0] -> 0x257b2 000257aa 00 36 | 6 | .CONST 0x36 ; [0x1] -> 0x257de 000257ac 00 48 | H | .CONST 0x48 ; [0x2] -> 0x257f0 000257ae 00 5a | Z | .CONST 0x5a ; [0x3] -> 0x25802 000257b0 00 6c | l | .CONST 0x6c ; [0x4] -> 0x25814 000257b2 switch@0x257a0[0x0]: 000257b2 9e c5 | | SUBA.W D5,A7 000257b4 20 4f | O | MOVEA.L A7,A0 000257b6 43 fa b6 30 |C 0 | LEA.L 0x20de8,A1 000257ba 70 2e |p. | MOVEQ.L #0x2e,D0 000257bc 10 d9 | | MOVE.B (A1)+,(A0)+ 000257be 51 c8 ff fc |Q | DBF D0,0x257bc 000257c2 59 4f |YO | SUBQ.L #0x4,A7 000257c4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000257c8 3f 01 |? | MOVE.W D1,-(A7) 000257ca 3f 3c 00 2f |?< / | MOVE.W #0x2f,-(A7) 000257ce 4e 93 |N | JSR (A3) 000257d0 50 4f |PO | ADDQ.L #0x8,A7 000257d2 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000257d8 de fc 00 34 | 4 | ADDA.W #0x34,A7 000257dc 60 6e |`n | BRA 0x2584c 000257de switch@0x257a0[0x1]: 000257de 9e c5 | | SUBA.W D5,A7 000257e0 20 4f | O | MOVEA.L A7,A0 000257e2 43 fa b6 04 |C | LEA.L 0x20de8,A1 000257e6 70 2e |p. | MOVEQ.L #0x2e,D0 000257e8 10 d9 | | MOVE.B (A1)+,(A0)+ 000257ea 51 c8 ff fc |Q | DBF D0,0x257e8 000257ee 60 d2 |` | BRA 0x257c2 000257f0 switch@0x257a0[0x2]: 000257f0 9e c5 | | SUBA.W D5,A7 000257f2 20 4f | O | MOVEA.L A7,A0 000257f4 43 fa b7 68 |C h | LEA.L 0x20f5e,A1 000257f8 70 2e |p. | MOVEQ.L #0x2e,D0 000257fa 10 d9 | | MOVE.B (A1)+,(A0)+ 000257fc 51 c8 ff fc |Q | DBF D0,0x257fa 00025800 60 c0 |` | BRA 0x257c2 00025802 switch@0x257a0[0x3]: 00025802 9e c5 | | SUBA.W D5,A7 00025804 20 4f | O | MOVEA.L A7,A0 00025806 43 fa b5 e0 |C | LEA.L 0x20de8,A1 0002580a 70 2e |p. | MOVEQ.L #0x2e,D0 0002580c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002580e 51 c8 ff fc |Q | DBF D0,0x2580c 00025812 60 ae |` | BRA 0x257c2 00025814 switch@0x257a0[0x4]: 00025814 9e c5 | | SUBA.W D5,A7 00025816 20 4f | O | MOVEA.L A7,A0 00025818 43 fa b5 fe |C | LEA.L 0x20e18,A1 0002581c 70 2e |p. | MOVEQ.L #0x2e,D0 0002581e 10 d9 | | MOVE.B (A1)+,(A0)+ 00025820 51 c8 ff fc |Q | DBF D0,0x2581e 00025824 60 9c |` | BRA 0x257c2 00025826 41 fa b6 de |A | LEA.L 0x20f06,A0 0002582a 70 16 |p | MOVEQ.L #0x16,D0 0002582c 3f 20 |? | MOVE.W -(A0),-(A7) 0002582e 51 c8 ff fc |Q | DBF D0,0x2582c 00025832 59 4f |YO | SUBQ.L #0x4,A7 00025834 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00025838 3f 01 |? | MOVE.W D1,-(A7) 0002583a 3f 3c 00 2e |?< . | MOVE.W #0x2e,-(A7) 0002583e 4e 93 |N | JSR (A3) 00025840 50 4f |PO | ADDQ.L #0x8,A7 00025842 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00025848 de fc 00 32 | 2 | ADDA.W #0x32,A7 0002584c 4a 39 00 02 db 20 |J9 | TST.B 0x2db20 00025852 66 60 |f` | BNE 0x258b4 00025854 48 54 |HT | PEA.L (A4) 00025856 48 78 00 00 |Hx | PEA.L 0x0 0002585a 42 67 |Bg | CLR.W -(A7) 0002585c 4e b9 00 01 02 04 |N | JSR KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W) 00025862 50 4f |PO | ADDQ.L #0x8,A7 00025864 42 57 |BW | CLR.W (A7) 00025866 48 6e ff f4 |Hn | PEA.L (A6-0xc) 0002586a 4e b9 00 01 02 06 |N | JSR KC03_Wait_Disk_IO(a : W; VAR status : Byte) 00025870 5c 4f |\O | ADDQ.L #0x6,A7 00025872 48 6e ff fa |Hn | PEA.L (A6-0x6) 00025876 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 0002587c 2e ae ff f6 |. | MOVE.L (A6-0xa),(A7) 00025880 2f 2e ff fa |/. | MOVE.L (A6-0x6),-(A7) 00025884 4e ba d2 c2 |N | JSR 0x22b48 00025888 50 4f |PO | ADDQ.L #0x8,A7 0002588a 4a 2e ff f4 |J. | TST.B (A6-0xc) 0002588e 66 24 |f$ | BNE 0x258b4 00025890 41 fa b5 22 |A " | LEA.L 0x20db4,A0 00025894 70 06 |p | MOVEQ.L #0x06,D0 00025896 3f 20 |? | MOVE.W -(A0),-(A7) 00025898 51 c8 ff fc |Q | DBF D0,0x25896 0002589c 59 4f |YO | SUBQ.L #0x4,A7 0002589e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000258a2 3f 01 |? | MOVE.W D1,-(A7) 000258a4 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 000258a8 4e 93 |N | JSR (A3) 000258aa 50 4f |PO | ADDQ.L #0x8,A7 000258ac 4e ba cc 74 |N t | JSR 0x22522 000258b0 de fc 00 12 | | ADDA.W #0x12,A7 000258b4 55 4f |UO | SUBQ.L #0x2,A7 000258b6 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 000258bc 4a 1f |J | TST.B (A7)+ 000258be 67 3c |g< | BEQ 0x258fc 000258c0 30 12 |0 | MOVE.W (A2),D0 000258c2 e1 40 | @ | ASL.W #0x8,D0 000258c4 06 40 00 09 | @ | ADDI.W #0x0009,D0 000258c8 3d 40 ff ee |=@ | MOVE.W D0,(A6-0x12) 000258cc 48 54 |HT | PEA.L (A4) 000258ce 48 78 00 00 |Hx | PEA.L 0x0 000258d2 42 67 |Bg | CLR.W -(A7) 000258d4 4e b9 00 01 02 04 |N | JSR KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W) 000258da 50 4f |PO | ADDQ.L #0x8,A7 000258dc 42 57 |BW | CLR.W (A7) 000258de 48 6e ff f4 |Hn | PEA.L (A6-0xc) 000258e2 4e b9 00 01 02 06 |N | JSR KC03_Wait_Disk_IO(a : W; VAR status : Byte) 000258e8 5c 4f |\O | ADDQ.L #0x6,A7 000258ea 30 39 00 02 96 fa |09 | MOVE.W 0x296fa,D0 000258f0 0c 40 00 03 | @ | CMPI.W #0x0003,D0 000258f4 67 04 |g | BEQ 0x258fa 000258f6 4e ba f6 10 |N | JSR 0x24f08 000258fa 60 04 |` | BRA 0x25900 000258fc 4e ba f6 0a |N | JSR 0x24f08 00025900 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00025904 4e 5e |N^ | UNLK A6 00025906 4e 75 |Nu | RTS 00025908 ; -------------------------------------------------------------------------------------- 00025908 ; OMSI PASCAL Function 00025908 ; <LVAR 0x028 4(r)> 00025908 ; <LVAR 0x024 4(r)> 00025908 ; <LVAR 0x020 4(r)> 00025908 ; <LVAR 0x01e 1(r)> 00025908 ; -------------------------------------------------------------------------------------- 00025908 4e 56 ff 80 |NV | LINK.W A6,#0xff80 0002590c bf d5 | | CMPA.L (A5),A7 0002590e 62 06 |b | BHI 0x25916 00025910 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025914 4e 76 |Nv | TRAPV 00025916 de fc 00 78 | x | ADDA.W #0x78,A7 0002591a 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002591e 45 ee 00 28 |E ( | LEA.L (A6+0x28),A2 00025922 47 ee 00 24 |G $ | LEA.L (A6+0x24),A3 00025926 49 ee 00 20 |I | LEA.L (A6+0x20),A4 0002592a 22 3c 00 00 07 ff |"< | MOVE.L #0x7ff,D1 00025930 74 01 |t | MOVEQ.L #0x01,D2 00025932 76 22 |v" | MOVEQ.L #0x22,D3 00025934 28 3c 00 00 00 ff |(< | MOVE.L #0xff,D4 0002593a 7a 21 |z! | MOVEQ.L #0x21,D5 0002593c 7e 00 |~ | MOVEQ.L #0x00,D7 0002593e 7c 00 || | MOVEQ.L #0x00,D6 00025940 20 12 | | MOVE.L (A2),D0 00025942 80 93 | | OR.L (A3),D0 00025944 80 94 | | OR.L (A4),D0 00025946 67 4c |gL | BEQ 0x25994 00025948 be 81 | | CMP.L D1,D7 0002594a 63 02 |c | BLS 0x2594e 0002594c 4e 4f |NO | TRAP #15 0002594e 20 07 | | MOVE.L D7,D0 00025950 e5 80 | | ASL.L #0x2,D0 00025952 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00025958 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 0002595c 42 80 |B | CLR.L D0 0002595e 30 28 04 4c |0( L | MOVE.W (A0+0x44c),D0 00025962 e5 48 | H | LSL.W #0x2,D0 00025964 e4 48 | H | LSR.W #0x2,D0 00025966 b0 92 | | CMP.L (A2),D0 00025968 66 20 |f | BNE 0x2598a 0002596a 42 80 |B | CLR.L D0 0002596c 10 28 04 4e | ( N | MOVE.B (A0+0x44e),D0 00025970 b0 93 | | CMP.L (A3),D0 00025972 66 16 |f | BNE 0x2598a 00025974 42 80 |B | CLR.L D0 00025976 10 28 04 4f | ( O | MOVE.B (A0+0x44f),D0 0002597a b0 94 | | CMP.L (A4),D0 0002597c 67 0a |g | BEQ 0x25988 0002597e 42 80 |B | CLR.L D0 00025980 10 28 04 4f | ( O | MOVE.B (A0+0x44f),D0 00025984 b0 44 | D | CMP.W D4,D0 00025986 66 02 |f | BNE 0x2598a 00025988 7c 01 || | MOVEQ.L #0x01,D6 0002598a 52 87 |R | ADDQ.L #0x1,D7 0002598c 4a 06 |J | TST.B D6 0002598e 66 04 |f | BNE 0x25994 00025990 be 81 | | CMP.L D1,D7 00025992 6f b4 |o | BLE 0x25948 00025994 4a 06 |J | TST.B D6 00025996 67 3c |g< | BEQ 0x259d4 00025998 4a 2e 00 1e |J. | TST.B (A6+0x1e) 0002599c 67 32 |g2 | BEQ 0x259d0 0002599e 9e c3 | | SUBA.W D3,A7 000259a0 20 4f | O | MOVEA.L A7,A0 000259a2 43 fa b6 2e |C . | LEA.L 0x20fd2,A1 000259a6 70 20 |p | MOVEQ.L #0x20,D0 000259a8 10 d9 | | MOVE.B (A1)+,(A0)+ 000259aa 51 c8 ff fc |Q | DBF D0,0x259a8 000259ae 59 4f |YO | SUBQ.L #0x4,A7 000259b0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000259b4 3f 02 |? | MOVE.W D2,-(A7) 000259b6 3f 05 |? | MOVE.W D5,-(A7) 000259b8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000259be 58 4f |XO | ADDQ.L #0x4,A7 000259c0 2e 92 |. | MOVE.L (A2),(A7) 000259c2 2f 13 |/ | MOVE.L (A3),-(A7) 000259c4 2f 14 |/ | MOVE.L (A4),-(A7) 000259c6 4e ba f0 f4 |N | JSR 0x24abc 000259ca de fc 00 10 | | ADDA.W #0x10,A7 000259ce de c3 | | ADDA.W D3,A7 000259d0 60 00 01 42 |` B | BRA 0x25b14 000259d4 41 ee 00 1e |A | LEA.L (A6+0x1e),A0 000259d8 70 0a |p | MOVEQ.L #0x0a,D0 000259da 3f 20 |? | MOVE.W -(A0),-(A7) 000259dc 51 c8 ff fc |Q | DBF D0,0x259da 000259e0 4e ba e8 92 |N | JSR 0x24274 000259e4 9e fc 00 0e | | SUBA.W #0xe,A7 000259e8 20 4f | O | MOVEA.L A7,A0 000259ea 43 fa b6 08 |C | LEA.L 0x20ff4,A1 000259ee 70 22 |p" | MOVEQ.L #0x22,D0 000259f0 10 d9 | | MOVE.B (A1)+,(A0)+ 000259f2 51 c8 ff fc |Q | DBF D0,0x259f0 000259f6 59 4f |YO | SUBQ.L #0x4,A7 000259f8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000259fc 3f 02 |? | MOVE.W D2,-(A7) 000259fe 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 00025a02 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025a08 58 4f |XO | ADDQ.L #0x4,A7 00025a0a 2e 92 |. | MOVE.L (A2),(A7) 00025a0c 2f 13 |/ | MOVE.L (A3),-(A7) 00025a0e 2f 14 |/ | MOVE.L (A4),-(A7) 00025a10 4e ba f0 aa |N | JSR 0x24abc 00025a14 de fc 00 34 | 4 | ADDA.W #0x34,A7 00025a18 7e 00 |~ | MOVEQ.L #0x00,D7 00025a1a be 81 | | CMP.L D1,D7 00025a1c 63 02 |c | BLS 0x25a20 00025a1e 4e 4f |NO | TRAP #15 00025a20 20 07 | | MOVE.L D7,D0 00025a22 e5 80 | | ASL.L #0x2,D0 00025a24 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00025a2a 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00025a2e 30 28 04 4c |0( L | MOVE.W (A0+0x44c),D0 00025a32 e5 48 | H | LSL.W #0x2,D0 00025a34 e4 48 | H | LSR.W #0x2,D0 00025a36 66 10 |f | BNE 0x25a48 00025a38 4a 28 04 4e |J( N | TST.B (A0+0x44e) 00025a3c 66 0a |f | BNE 0x25a48 00025a3e 4a 28 04 4f |J( O | TST.B (A0+0x44f) 00025a42 66 04 |f | BNE 0x25a48 00025a44 7c 01 || | MOVEQ.L #0x01,D6 00025a46 60 02 |` | BRA 0x25a4a 00025a48 52 87 |R | ADDQ.L #0x1,D7 00025a4a 4a 06 |J | TST.B D6 00025a4c 66 04 |f | BNE 0x25a52 00025a4e be 81 | | CMP.L D1,D7 00025a50 6f c8 |o | BLE 0x25a1a 00025a52 4a 92 |J | TST.L (A2) 00025a54 66 32 |f2 | BNE 0x25a88 00025a56 4a 93 |J | TST.L (A3) 00025a58 66 2e |f. | BNE 0x25a88 00025a5a 9e fc 00 34 | 4 | SUBA.W #0x34,A7 00025a5e 20 4f | O | MOVEA.L A7,A0 00025a60 43 fa b5 d8 |C | LEA.L 0x2103a,A1 00025a64 70 32 |p2 | MOVEQ.L #0x32,D0 00025a66 10 d9 | | MOVE.B (A1)+,(A0)+ 00025a68 51 c8 ff fc |Q | DBF D0,0x25a66 00025a6c 59 4f |YO | SUBQ.L #0x4,A7 00025a6e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00025a72 3f 02 |? | MOVE.W D2,-(A7) 00025a74 3f 3c 00 33 |?< 3 | MOVE.W #0x33,-(A7) 00025a78 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025a7e 50 4f |PO | ADDQ.L #0x8,A7 00025a80 4e ba ca a0 |N | JSR 0x22522 00025a84 de fc 00 38 | 8 | ADDA.W #0x38,A7 00025a88 4a 06 |J | TST.B D6 00025a8a 66 2c |f, | BNE 0x25ab8 00025a8c 9e c3 | | SUBA.W D3,A7 00025a8e 20 4f | O | MOVEA.L A7,A0 00025a90 43 fa b5 86 |C | LEA.L 0x21018,A1 00025a94 70 20 |p | MOVEQ.L #0x20,D0 00025a96 10 d9 | | MOVE.B (A1)+,(A0)+ 00025a98 51 c8 ff fc |Q | DBF D0,0x25a96 00025a9c 59 4f |YO | SUBQ.L #0x4,A7 00025a9e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00025aa2 3f 02 |? | MOVE.W D2,-(A7) 00025aa4 3f 05 |? | MOVE.W D5,-(A7) 00025aa6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025aac 50 4f |PO | ADDQ.L #0x8,A7 00025aae 4e ba ca 72 |N r | JSR 0x22522 00025ab2 58 4f |XO | ADDQ.L #0x4,A7 00025ab4 60 00 ff 18 |` | BRA 0x259ce 00025ab8 be 81 | | CMP.L D1,D7 00025aba 63 02 |c | BLS 0x25abe 00025abc 4e 4f |NO | TRAP #15 00025abe 20 07 | | MOVE.L D7,D0 00025ac0 e5 80 | | ASL.L #0x2,D0 00025ac2 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00025ac8 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00025acc 20 12 | | MOVE.L (A2),D0 00025ace 0c 80 00 00 3f ff | ? | CMPI.L #0x00003fff,D0 00025ad4 63 02 |c | BLS 0x25ad8 00025ad6 4e 4f |NO | TRAP #15 00025ad8 02 68 c0 00 04 4c | h L | ANDI.W #0xc000,(A0+0x44c) 00025ade 81 68 04 4c | h L | OR.W D0,(A0+0x44c) 00025ae2 20 13 | | MOVE.L (A3),D0 00025ae4 b0 84 | | CMP.L D4,D0 00025ae6 63 02 |c | BLS 0x25aea 00025ae8 4e 4f |NO | TRAP #15 00025aea 11 40 04 4e | @ N | MOVE.B D0,(A0+0x44e) 00025aee 20 14 | | MOVE.L (A4),D0 00025af0 b0 84 | | CMP.L D4,D0 00025af2 63 02 |c | BLS 0x25af6 00025af4 4e 4f |NO | TRAP #15 00025af6 11 40 04 4f | @ O | MOVE.B D0,(A0+0x44f) 00025afa 00 28 00 40 04 4c | ( @ L | ORI.B #0x40,(A0+0x44c) 00025b00 00 28 00 80 04 4c | ( L | ORI.B #0x80,(A0+0x44c) 00025b06 2f 12 |/ | MOVE.L (A2),-(A7) 00025b08 2f 13 |/ | MOVE.L (A3),-(A7) 00025b0a 2f 14 |/ | MOVE.L (A4),-(A7) 00025b0c 4e ba f3 02 |N | JSR 0x24e10 00025b10 de fc 00 0c | | ADDA.W #0xc,A7 00025b14 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00025b18 4e 5e |N^ | UNLK A6 00025b1a 4e 75 |Nu | RTS 00025b1c ; -------------------------------------------------------------------------------------- 00025b1c ; OMSI PASCAL Function 00025b1c ; <LVAR 0x018 4(r)> 00025b1c ; <LVAR 0x014 4(r)> 00025b1c ; <LVAR 0x010 4(r)> 00025b1c ; <LVAR 0x00c 4(r)> 00025b1c ; <LVAR 0x008 4(r)> 00025b1c ; -------------------------------------------------------------------------------------- 00025b1c 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 00025b20 bf d5 | | CMPA.L (A5),A7 00025b22 62 06 |b | BHI 0x25b2a 00025b24 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025b28 4e 76 |Nv | TRAPV 00025b2a de fc 00 50 | P | ADDA.W #0x50,A7 00025b2e 48 e7 f9 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 00025b32 45 f9 00 02 97 15 |E | LEA.L 0x29715,A2 00025b38 47 f9 00 02 97 14 |G | LEA.L 0x29714,A3 00025b3e 49 ee 00 18 |I | LEA.L (A6+0x18),A4 00025b42 74 01 |t | MOVEQ.L #0x01,D2 00025b44 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00025b48 2f 08 |/ | MOVE.L A0,-(A7) 00025b4a 42 10 |B | CLR.B (A0) 00025b4c 22 6e 00 10 |"n | MOVEA.L (A6+0x10),A1 00025b50 2f 09 |/ | MOVE.L A1,-(A7) 00025b52 42 80 |B | CLR.L D0 00025b54 10 12 | | MOVE.B (A2),D0 00025b56 b0 91 | | CMP.L (A1),D0 00025b58 62 2a |b* | BHI 0x25b84 00025b5a 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00025b5e 28 11 |( | MOVE.L (A1),D4 00025b60 26 00 |& | MOVE.L D0,D3 00025b62 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00025b68 d9 90 | | ADD.L D4,(A0) 00025b6a 22 83 |" | MOVE.L D3,(A1) 00025b6c 42 80 |B | CLR.L D0 00025b6e 10 13 | | MOVE.B (A3),D0 00025b70 b0 90 | | CMP.L (A0),D0 00025b72 62 10 |b | BHI 0x25b84 00025b74 22 54 |"T | MOVEA.L (A4),A1 00025b76 28 10 |( | MOVE.L (A0),D4 00025b78 26 00 |& | MOVE.L D0,D3 00025b7a 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00025b80 d9 91 | | ADD.L D4,(A1) 00025b82 20 83 | | MOVE.L D3,(A0) 00025b84 55 4f |UO | SUBQ.L #0x2,A7 00025b86 4e b9 00 01 06 10 |N | JSR Is_machine_type_one_or_three() : Bool 00025b8c 4a 1f |J | TST.B (A7)+ 00025b8e 67 24 |g$ | BEQ 0x25bb4 00025b90 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00025b94 20 82 | | MOVE.L D2,(A0) 00025b96 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00025b9a 42 10 |B | CLR.B (A0) 00025b9c 22 54 |"T | MOVEA.L (A4),A1 00025b9e 42 80 |B | CLR.L D0 00025ba0 30 39 00 02 97 12 |09 | MOVE.W 0x29712,D0 00025ba6 b0 91 | | CMP.L (A1),D0 00025ba8 66 02 |f | BNE 0x25bac 00025baa 52 10 |R | ADDQ.B #0x1,(A0) 00025bac 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 00025bb0 12 90 | | MOVE.B (A0),(A1) 00025bb2 60 6c |`l | BRA 0x25c20 00025bb4 20 54 | T | MOVEA.L (A4),A0 00025bb6 20 10 | | MOVE.L (A0),D0 00025bb8 52 80 |R | ADDQ.L #0x1,D0 00025bba 42 81 |B | CLR.L D1 00025bbc 32 39 00 02 97 12 |29 | MOVE.W 0x29712,D1 00025bc2 b0 81 | | CMP.L D1,D0 00025bc4 64 0c |d | BCC 0x25bd2 00025bc6 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00025bca 20 bc 00 00 00 80 | | MOVE.L #0x80,(A0) 00025bd0 60 4e |`N | BRA 0x25c20 00025bd2 b2 90 | | CMP.L (A0),D1 00025bd4 66 08 |f | BNE 0x25bde 00025bd6 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00025bda 10 82 | | MOVE.B D2,(A0) 00025bdc 60 42 |`B | BRA 0x25c20 00025bde 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00025be2 42 80 |B | CLR.L D0 00025be4 10 13 | | MOVE.B (A3),D0 00025be6 90 90 | | SUB.L (A0),D0 00025be8 53 80 |S | SUBQ.L #0x1,D0 00025bea 28 00 |( | MOVE.L D0,D4 00025bec 42 83 |B | CLR.L D3 00025bee 16 12 | | MOVE.B (A2),D3 00025bf0 2f 03 |/ | MOVE.L D3,-(A7) 00025bf2 4e b9 00 01 02 90 |N | JSR ?mulu_d3_d4 00025bf8 20 17 | | MOVE.L (A7),D0 00025bfa 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00025bfe 90 90 | | SUB.L (A0),D0 00025c00 d0 84 | | ADD.L D4,D0 00025c02 58 4f |XO | ADDQ.L #0x4,A7 00025c04 28 00 |( | MOVE.L D0,D4 00025c06 76 02 |v | MOVEQ.L #0x02,D3 00025c08 4e b9 00 01 02 98 |N | JSR ?divu_d3_d4 00025c0e 2e 04 |. | MOVE.L D4,D7 00025c10 0c 87 00 00 00 80 | | CMPI.L #0x00000080,D7 00025c16 6d 02 |m | BLT 0x25c1a 00025c18 60 ac |` | BRA 0x25bc6 00025c1a 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00025c1e 20 87 | | MOVE.L D7,(A0) 00025c20 50 4f |PO | ADDQ.L #0x8,A7 00025c22 4c df 1f 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4 00025c26 4e 5e |N^ | UNLK A6 00025c28 4e 75 |Nu | RTS 00025c2a ; -------------------------------------------------------------------------------------- 00025c2a ; OMSI PASCAL Function 00025c2a ; <LVAR 0x00c @> 00025c2a ; <LVAR 0x00a 1(r)> 00025c2a ; <LVAR 0x008 1(r)> 00025c2a ; <LVAR -0x00a @ 4(rw)> 00025c2a ; <LVAR -0x00e @ 4(rw)> 00025c2a ; <LVAR -0x010 @ 1(r)> 00025c2a ; <LVAR -0x016 2(r)> 00025c2a ; <LVAR -0x018 2(r)> 00025c2a ; <LVAR -0x026 @> 00025c2a ; <LVAR -0x028 @ 1(r)> 00025c2a ; <LVAR -0x02a 2(w)> 00025c2a ; <LVAR -0x02c 2(w)> 00025c2a ; <LVAR -0x02e 2(w)> 00025c2a ; <LVAR -0x030 2(r)> 00025c2a ; <LVAR -0x032 2(r)> 00025c2a ; <LVAR -0x034 2(w)> 00025c2a ; <LVAR -0x036 2(r)> 00025c2a ; <LVAR -0x038 @ 2(w)> 00025c2a ; <LVAR -0x03e @ 4(rw)> 00025c2a ; <LVAR -0x042 @ 4(rw)> 00025c2a ; <LVAR -0x046 @ 4(rw)> 00025c2a ; -------------------------------------------------------------------------------------- 00025c2a 4e 56 ff 28 |NV ( | LINK.W A6,#0xff28 00025c2e bf d5 | | CMPA.L (A5),A7 00025c30 62 06 |b | BHI 0x25c38 00025c32 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025c36 4e 76 |Nv | TRAPV 00025c38 de fc 00 8e | | ADDA.W #0x8e,A7 00025c3c 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00025c40 45 ee ff f6 |E | LEA.L (A6-0xa),A2 00025c44 47 ee ff ba |G | LEA.L (A6-0x46),A3 00025c48 49 ee ff c2 |I | LEA.L (A6-0x3e),A4 00025c4c 7e ff |~ | MOVEQ.L #-0x01,D7 00025c4e 42 93 |B | CLR.L (A3) 00025c50 42 ae ff be |B | CLR.L (A6-0x42) 00025c54 42 94 |B | CLR.L (A4) 00025c56 55 4f |UO | SUBQ.L #0x2,A7 00025c58 4e b9 00 01 06 10 |N | JSR Is_machine_type_one_or_three() : Bool 00025c5e 4a 1f |J | TST.B (A7)+ 00025c60 67 0a |g | BEQ 0x25c6c 00025c62 2d 7c 00 00 00 01 ff f2 |-| | MOVE.L #0x1,(A6-0xe) 00025c6a 60 08 |` | BRA 0x25c74 00025c6c 2d 7c 00 00 00 80 ff f2 |-| | MOVE.L #0x80,(A6-0xe) 00025c74 42 6e ff ca |Bn | CLR.W (A6-0x36) 00025c78 3d 7c 00 02 ff cc |=| | MOVE.W #0x2,(A6-0x34) 00025c7e 42 6e ff ce |Bn | CLR.W (A6-0x32) 00025c82 42 6e ff d0 |Bn | CLR.W (A6-0x30) 00025c86 30 39 00 02 97 10 |09 | MOVE.W 0x29710,D0 00025c8c e1 40 | @ | ASL.W #0x8,D0 00025c8e 12 2e 00 0a | . | MOVE.B (A6+0xa),D1 00025c92 48 81 |H | EXTB.W D1 00025c94 d2 40 | @ | ADD.W D0,D1 00025c96 3d 41 ff d2 |=A | MOVE.W D1,(A6-0x2e) 00025c9a 20 2e ff f2 | . | MOVE.L (A6-0xe),D0 00025c9e e1 80 | | ASL.L #0x8,D0 00025ca0 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00025ca6 63 02 |c | BLS 0x25caa 00025ca8 4e 4f |NO | TRAP #15 00025caa 3d 40 ff c8 |=@ | MOVE.W D0,(A6-0x38) 00025cae 20 13 | | MOVE.L (A3),D0 00025cb0 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00025cb6 63 02 |c | BLS 0x25cba 00025cb8 4e 4f |NO | TRAP #15 00025cba 3d 40 ff d4 |=@ | MOVE.W D0,(A6-0x2c) 00025cbe 20 2e ff be | . | MOVE.L (A6-0x42),D0 00025cc2 e1 80 | | ASL.L #0x8,D0 00025cc4 d0 94 | | ADD.L (A4),D0 00025cc6 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00025ccc 63 02 |c | BLS 0x25cd0 00025cce 4e 4f |NO | TRAP #15 00025cd0 3d 40 ff d6 |=@ | MOVE.W D0,(A6-0x2a) 00025cd4 28 2e ff be |(. | MOVE.L (A6-0x42),D4 00025cd8 42 83 |B | CLR.L D3 00025cda 16 39 00 02 97 15 | 9 | MOVE.B 0x29715,D3 00025ce0 2f 03 |/ | MOVE.L D3,-(A7) 00025ce2 4e b9 00 01 02 90 |N | JSR ?mulu_d3_d4 00025ce8 2f 04 |/ | MOVE.L D4,-(A7) 00025cea 42 84 |B | CLR.L D4 00025cec 18 39 00 02 97 14 | 9 | MOVE.B 0x29714,D4 00025cf2 20 2f 00 04 | / | MOVE.L (A7+0x4),D0 00025cf6 26 00 |& | MOVE.L D0,D3 00025cf8 4e b9 00 01 02 90 |N | JSR ?mulu_d3_d4 00025cfe 42 80 |B | CLR.L D0 00025d00 30 39 00 02 97 12 |09 | MOVE.W 0x29712,D0 00025d06 b0 93 | | CMP.L (A3),D0 00025d08 63 1e |c | BLS 0x25d28 00025d0a 53 80 |S | SUBQ.L #0x1,D0 00025d0c b0 93 | | CMP.L (A3),D0 00025d0e 66 00 01 52 |f R | BNE 0x25e62 00025d12 20 17 | | MOVE.L (A7),D0 00025d14 d0 94 | | ADD.L (A4),D0 00025d16 22 2e ff f2 |". | MOVE.L (A6-0xe),D1 00025d1a e3 81 | | ASL.L #0x1,D1 00025d1c d2 80 | | ADD.L D0,D1 00025d1e 42 80 |B | CLR.L D0 00025d20 30 04 |0 | MOVE.W D4,D0 00025d22 b2 80 | | CMP.L D0,D1 00025d24 63 00 01 3c |c < | BLS 0x25e62 00025d28 48 52 |HR | PEA.L (A2) 00025d2a 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00025d30 5d 4f |]O | SUBQ.L #0x6,A7 00025d32 20 4f | O | MOVEA.L A7,A0 00025d34 43 fa b3 d6 |C | LEA.L 0x2110c,A1 00025d38 70 08 |p | MOVEQ.L #0x08,D0 00025d3a 10 d9 | | MOVE.B (A1)+,(A0)+ 00025d3c 51 c8 ff fc |Q | DBF D0,0x25d3a 00025d40 59 4f |YO | SUBQ.L #0x4,A7 00025d42 2f 12 |/ | MOVE.L (A2),-(A7) 00025d44 59 4f |YO | SUBQ.L #0x4,A7 00025d46 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00025d4a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025d4e 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00025d52 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025d58 2e 93 |. | MOVE.L (A3),(A7) 00025d5a 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00025d60 58 4f |XO | ADDQ.L #0x4,A7 00025d62 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00025d68 de fc 00 0c | | ADDA.W #0xc,A7 00025d6c 24 9f |$ | MOVE.L (A7)+,(A2) 00025d6e 20 4f | O | MOVEA.L A7,A0 00025d70 43 fa b3 a4 |C | LEA.L 0x21116,A1 00025d74 70 08 |p | MOVEQ.L #0x08,D0 00025d76 10 d9 | | MOVE.B (A1)+,(A0)+ 00025d78 51 c8 ff fc |Q | DBF D0,0x25d76 00025d7c 59 4f |YO | SUBQ.L #0x4,A7 00025d7e 2f 12 |/ | MOVE.L (A2),-(A7) 00025d80 59 4f |YO | SUBQ.L #0x4,A7 00025d82 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00025d86 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025d8a 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00025d8e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025d94 2e ae ff be |. | MOVE.L (A6-0x42),(A7) 00025d98 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00025d9e 58 4f |XO | ADDQ.L #0x4,A7 00025da0 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00025da6 de fc 00 0c | | ADDA.W #0xc,A7 00025daa 24 9f |$ | MOVE.L (A7)+,(A2) 00025dac de fc 00 0a | | ADDA.W #0xa,A7 00025db0 41 fa b3 78 |A x | LEA.L 0x2112a,A0 00025db4 70 04 |p | MOVEQ.L #0x04,D0 00025db6 3f 20 |? | MOVE.W -(A0),-(A7) 00025db8 51 c8 ff fc |Q | DBF D0,0x25db6 00025dbc 59 4f |YO | SUBQ.L #0x4,A7 00025dbe 2f 12 |/ | MOVE.L (A2),-(A7) 00025dc0 59 4f |YO | SUBQ.L #0x4,A7 00025dc2 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00025dc6 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025dca 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00025dce 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025dd4 2e 94 |. | MOVE.L (A4),(A7) 00025dd6 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00025ddc 58 4f |XO | ADDQ.L #0x4,A7 00025dde 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00025de4 de fc 00 0c | | ADDA.W #0xc,A7 00025de8 24 9f |$ | MOVE.L (A7)+,(A2) 00025dea 20 4f | O | MOVEA.L A7,A0 00025dec 43 fa b3 3c |C < | LEA.L 0x2112a,A1 00025df0 70 08 |p | MOVEQ.L #0x08,D0 00025df2 10 d9 | | MOVE.B (A1)+,(A0)+ 00025df4 51 c8 ff fc |Q | DBF D0,0x25df2 00025df8 59 4f |YO | SUBQ.L #0x4,A7 00025dfa 2f 12 |/ | MOVE.L (A2),-(A7) 00025dfc 59 4f |YO | SUBQ.L #0x4,A7 00025dfe 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00025e02 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025e06 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00025e0a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025e10 2e ae ff f2 |. | MOVE.L (A6-0xe),(A7) 00025e14 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00025e1a 58 4f |XO | ADDQ.L #0x4,A7 00025e1c 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00025e22 de fc 00 0c | | ADDA.W #0xc,A7 00025e26 24 9f |$ | MOVE.L (A7)+,(A2) 00025e28 5c 4f |\O | ADDQ.L #0x6,A7 00025e2a 2e 92 |. | MOVE.L (A2),(A7) 00025e2c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00025e32 9e fc 00 36 | 6 | SUBA.W #0x36,A7 00025e36 20 4f | O | MOVEA.L A7,A0 00025e38 43 fa b2 34 |C 4 | LEA.L 0x2106e,A1 00025e3c 70 38 |p8 | MOVEQ.L #0x38,D0 00025e3e 10 d9 | | MOVE.B (A1)+,(A0)+ 00025e40 51 c8 ff fc |Q | DBF D0,0x25e3e 00025e44 59 4f |YO | SUBQ.L #0x4,A7 00025e46 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00025e4a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025e4e 3f 3c 00 39 |?< 9 | MOVE.W #0x39,-(A7) 00025e52 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025e58 50 4f |PO | ADDQ.L #0x8,A7 00025e5a 4e ba c6 c6 |N | JSR 0x22522 00025e5e de fc 00 3e | > | ADDA.W #0x3e,A7 00025e62 50 4f |PO | ADDQ.L #0x8,A7 00025e64 be 93 | | CMP.L (A3),D7 00025e66 67 72 |gr | BEQ 0x25eda 00025e68 2e 13 |. | MOVE.L (A3),D7 00025e6a 9e fc 00 0a | | SUBA.W #0xa,A7 00025e6e 20 4f | O | MOVEA.L A7,A0 00025e70 43 fa b2 c2 |C | LEA.L 0x21134,A1 00025e74 70 08 |p | MOVEQ.L #0x08,D0 00025e76 10 d9 | | MOVE.B (A1)+,(A0)+ 00025e78 51 c8 ff fc |Q | DBF D0,0x25e76 00025e7c 51 4f |QO | SUBQ.L #0x8,A7 00025e7e 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00025e82 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025e86 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00025e8a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025e90 2e 93 |. | MOVE.L (A3),(A7) 00025e92 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00025e98 58 4f |XO | ADDQ.L #0x4,A7 00025e9a 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00025ea0 50 4f |PO | ADDQ.L #0x8,A7 00025ea2 24 9f |$ | MOVE.L (A7)+,(A2) 00025ea4 5c 4f |\O | ADDQ.L #0x6,A7 00025ea6 2e 92 |. | MOVE.L (A2),(A7) 00025ea8 1f 3c 00 0d | < | MOVE.B #0x0d,-(A7) 00025eac 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00025eb2 4e b9 00 01 03 f8 |N | JSR GetConsoleConfig() : Long 00025eb8 20 1f | | MOVE.L (A7)+,D0 00025eba 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00025ec0 63 02 |c | BLS 0x25ec4 00025ec2 4e 4f |NO | TRAP #15 00025ec4 3e 80 |> | MOVE.W D0,(A7) 00025ec6 2f 12 |/ | MOVE.L (A2),-(A7) 00025ec8 4e b9 00 01 02 0a |N | JSR KC05_PortWriteString(port : Word ; str : String) 00025ece 5c 4f |\O | ADDQ.L #0x6,A7 00025ed0 48 52 |HR | PEA.L (A2) 00025ed2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00025ed8 58 4f |XO | ADDQ.L #0x4,A7 00025eda 48 6e ff c8 |Hn | PEA.L (A6-0x38) 00025ede 41 ee 00 0c |A | LEA.L (A6+0xc),A0 00025ee2 2f 08 |/ | MOVE.L A0,-(A7) 00025ee4 42 67 |Bg | CLR.W -(A7) 00025ee6 4e b9 00 01 02 04 |N | JSR KC02_Start_Disk_IO(desc : Pointer; dst : Pointer ; c : W) 00025eec de fc 00 0a | | ADDA.W #0xa,A7 00025ef0 20 2e ff f2 | . | MOVE.L (A6-0xe),D0 00025ef4 e3 80 | | ASL.L #0x1,D0 00025ef6 d1 94 | | ADD.L D0,(A4) 00025ef8 48 53 |HS | PEA.L (A3) 00025efa 48 6e ff be |Hn | PEA.L (A6-0x42) 00025efe 48 54 |HT | PEA.L (A4) 00025f00 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00025f04 48 6e ff d8 |Hn | PEA.L (A6-0x28) 00025f08 4e ba fc 12 |N | JSR 0x25b1c 00025f0c de fc 00 14 | | ADDA.W #0x14,A7 00025f10 70 00 |p | MOVEQ.L #0x00,D0 00025f12 67 16 |g | BEQ 0x25f2a 00025f14 4a 2e ff d8 |J. | TST.B (A6-0x28) 00025f18 67 10 |g | BEQ 0x25f2a 00025f1a 2f 3c 00 01 c9 c2 |/< | MOVE.L #0x1c9c2,-(A7) 00025f20 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 00025f26 58 4f |XO | ADDQ.L #0x4,A7 00025f28 2a 13 |* | MOVE.L (A3),D5 00025f2a 42 67 |Bg | CLR.W -(A7) 00025f2c 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00025f30 4e b9 00 01 02 06 |N | JSR KC03_Wait_Disk_IO(a : W; VAR status : Byte) 00025f36 5c 4f |\O | ADDQ.L #0x6,A7 00025f38 4a 2e ff f0 |J. | TST.B (A6-0x10) 00025f3c 66 00 02 4c |f L | BNE 0x2618a 00025f40 48 6e ff da |Hn | PEA.L (A6-0x26) 00025f44 4e ba ec 68 |N h | JSR 0x24bae 00025f48 58 4f |XO | ADDQ.L #0x4,A7 00025f4a 42 80 |B | CLR.L D0 00025f4c 30 2e ff e8 |0. | MOVE.W (A6-0x18),D0 00025f50 26 80 |& | MOVE.L D0,(A3) 00025f52 32 2e ff ea |2. | MOVE.W (A6-0x16),D1 00025f56 02 41 00 ff | A | ANDI.W #0x00ff,D1 00025f5a 42 82 |B | CLR.L D2 00025f5c 34 01 |4 | MOVE.W D1,D2 00025f5e 28 82 |( | MOVE.L D2,(A4) 00025f60 3c 2e ff ea |<. | MOVE.W (A6-0x16),D6 00025f64 32 06 |2 | MOVE.W D6,D1 00025f66 e0 49 | I | LSR.W #0x8,D1 00025f68 42 83 |B | CLR.L D3 00025f6a 36 01 |6 | MOVE.W D1,D3 00025f6c 2d 43 ff be |-C | MOVE.L D3,(A6-0x42) 00025f70 4a 82 |J | TST.L D2 00025f72 67 06 |g | BEQ 0x25f7a 00025f74 53 82 |S | SUBQ.L #0x1,D2 00025f76 28 82 |( | MOVE.L D2,(A4) 00025f78 60 2e |`. | BRA 0x25fa8 00025f7a 42 81 |B | CLR.L D1 00025f7c 12 39 00 02 97 15 | 9 | MOVE.B 0x29715,D1 00025f82 53 41 |SA | SUBQ.W #0x1,D1 00025f84 48 c1 |H | EXTW.L D1 00025f86 28 81 |( | MOVE.L D1,(A4) 00025f88 4a 83 |J | TST.L D3 00025f8a 67 08 |g | BEQ 0x25f94 00025f8c 53 83 |S | SUBQ.L #0x1,D3 00025f8e 2d 43 ff be |-C | MOVE.L D3,(A6-0x42) 00025f92 60 14 |` | BRA 0x25fa8 00025f94 42 81 |B | CLR.L D1 00025f96 12 39 00 02 97 14 | 9 | MOVE.B 0x29714,D1 00025f9c 53 41 |SA | SUBQ.W #0x1,D1 00025f9e 48 c1 |H | EXTW.L D1 00025fa0 2d 41 ff be |-A | MOVE.L D1,(A6-0x42) 00025fa4 53 80 |S | SUBQ.L #0x1,D0 00025fa6 26 80 |& | MOVE.L D0,(A3) 00025fa8 2f 13 |/ | MOVE.L (A3),-(A7) 00025faa 2f 2e ff be |/. | MOVE.L (A6-0x42),-(A7) 00025fae 2f 14 |/ | MOVE.L (A4),-(A7) 00025fb0 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00025fb4 41 ee ff f0 |A | LEA.L (A6-0x10),A0 00025fb8 70 0a |p | MOVEQ.L #0x0a,D0 00025fba 3f 20 |? | MOVE.W -(A0),-(A7) 00025fbc 51 c8 ff fc |Q | DBF D0,0x25fba 00025fc0 4e ba f9 46 |N F | JSR 0x25908 00025fc4 de fc 00 24 | $ | ADDA.W #0x24,A7 00025fc8 48 78 32 dc |Hx2 | PEA.L 0x32dc 00025fcc 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 00025fd2 58 4f |XO | ADDQ.L #0x4,A7 00025fd4 52 94 |R | ADDQ.L #0x1,(A4) 00025fd6 20 14 | | MOVE.L (A4),D0 00025fd8 02 80 00 00 00 01 | | ANDI.L #0x00000001,D0 00025fde 67 02 |g | BEQ 0x25fe2 00025fe0 52 94 |R | ADDQ.L #0x1,(A4) 00025fe2 48 53 |HS | PEA.L (A3) 00025fe4 48 6e ff be |Hn | PEA.L (A6-0x42) 00025fe8 48 54 |HT | PEA.L (A4) 00025fea 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00025fee 48 6e ff d8 |Hn | PEA.L (A6-0x28) 00025ff2 4e ba fb 28 |N ( | JSR 0x25b1c 00025ff6 de fc 00 14 | | ADDA.W #0x14,A7 00025ffa 28 2e ff be |(. | MOVE.L (A6-0x42),D4 00025ffe 42 83 |B | CLR.L D3 00026000 16 39 00 02 97 15 | 9 | MOVE.B 0x29715,D3 00026006 2f 03 |/ | MOVE.L D3,-(A7) 00026008 4e b9 00 01 02 90 |N | JSR ?mulu_d3_d4 0002600e 2f 04 |/ | MOVE.L D4,-(A7) 00026010 42 84 |B | CLR.L D4 00026012 18 39 00 02 97 14 | 9 | MOVE.B 0x29714,D4 00026018 20 2f 00 04 | / | MOVE.L (A7+0x4),D0 0002601c 26 00 |& | MOVE.L D0,D3 0002601e 4e b9 00 01 02 90 |N | JSR ?mulu_d3_d4 00026024 42 80 |B | CLR.L D0 00026026 30 39 00 02 97 12 |09 | MOVE.W 0x29712,D0 0002602c b0 93 | | CMP.L (A3),D0 0002602e 63 1e |c | BLS 0x2604e 00026030 53 80 |S | SUBQ.L #0x1,D0 00026032 b0 93 | | CMP.L (A3),D0 00026034 66 00 01 52 |f R | BNE 0x26188 00026038 20 17 | | MOVE.L (A7),D0 0002603a d0 94 | | ADD.L (A4),D0 0002603c 22 2e ff f2 |". | MOVE.L (A6-0xe),D1 00026040 e3 81 | | ASL.L #0x1,D1 00026042 d2 80 | | ADD.L D0,D1 00026044 42 80 |B | CLR.L D0 00026046 30 04 |0 | MOVE.W D4,D0 00026048 b2 80 | | CMP.L D0,D1 0002604a 63 00 01 3c |c < | BLS 0x26188 0002604e 48 52 |HR | PEA.L (A2) 00026050 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00026056 5d 4f |]O | SUBQ.L #0x6,A7 00026058 20 4f | O | MOVEA.L A7,A0 0002605a 43 fa b0 e2 |C | LEA.L 0x2113e,A1 0002605e 70 08 |p | MOVEQ.L #0x08,D0 00026060 10 d9 | | MOVE.B (A1)+,(A0)+ 00026062 51 c8 ff fc |Q | DBF D0,0x26060 00026066 59 4f |YO | SUBQ.L #0x4,A7 00026068 2f 12 |/ | MOVE.L (A2),-(A7) 0002606a 59 4f |YO | SUBQ.L #0x4,A7 0002606c 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00026070 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026074 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00026078 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002607e 2e 93 |. | MOVE.L (A3),(A7) 00026080 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00026086 58 4f |XO | ADDQ.L #0x4,A7 00026088 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 0002608e de fc 00 0c | | ADDA.W #0xc,A7 00026092 24 9f |$ | MOVE.L (A7)+,(A2) 00026094 20 4f | O | MOVEA.L A7,A0 00026096 43 fa b0 b0 |C | LEA.L 0x21148,A1 0002609a 70 08 |p | MOVEQ.L #0x08,D0 0002609c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002609e 51 c8 ff fc |Q | DBF D0,0x2609c 000260a2 59 4f |YO | SUBQ.L #0x4,A7 000260a4 2f 12 |/ | MOVE.L (A2),-(A7) 000260a6 59 4f |YO | SUBQ.L #0x4,A7 000260a8 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000260ac 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000260b0 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 000260b4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000260ba 2e ae ff be |. | MOVE.L (A6-0x42),(A7) 000260be 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000260c4 58 4f |XO | ADDQ.L #0x4,A7 000260c6 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 000260cc de fc 00 0c | | ADDA.W #0xc,A7 000260d0 24 9f |$ | MOVE.L (A7)+,(A2) 000260d2 de fc 00 0a | | ADDA.W #0xa,A7 000260d6 41 fa b0 84 |A | LEA.L 0x2115c,A0 000260da 70 04 |p | MOVEQ.L #0x04,D0 000260dc 3f 20 |? | MOVE.W -(A0),-(A7) 000260de 51 c8 ff fc |Q | DBF D0,0x260dc 000260e2 59 4f |YO | SUBQ.L #0x4,A7 000260e4 2f 12 |/ | MOVE.L (A2),-(A7) 000260e6 59 4f |YO | SUBQ.L #0x4,A7 000260e8 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000260ec 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000260f0 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 000260f4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000260fa 2e 94 |. | MOVE.L (A4),(A7) 000260fc 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00026102 58 4f |XO | ADDQ.L #0x4,A7 00026104 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 0002610a de fc 00 0c | | ADDA.W #0xc,A7 0002610e 24 9f |$ | MOVE.L (A7)+,(A2) 00026110 20 4f | O | MOVEA.L A7,A0 00026112 43 fa b0 48 |C H | LEA.L 0x2115c,A1 00026116 70 08 |p | MOVEQ.L #0x08,D0 00026118 10 d9 | | MOVE.B (A1)+,(A0)+ 0002611a 51 c8 ff fc |Q | DBF D0,0x26118 0002611e 59 4f |YO | SUBQ.L #0x4,A7 00026120 2f 12 |/ | MOVE.L (A2),-(A7) 00026122 59 4f |YO | SUBQ.L #0x4,A7 00026124 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00026128 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002612c 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00026130 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00026136 2e ae ff f2 |. | MOVE.L (A6-0xe),(A7) 0002613a 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00026140 58 4f |XO | ADDQ.L #0x4,A7 00026142 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00026148 de fc 00 0c | | ADDA.W #0xc,A7 0002614c 24 9f |$ | MOVE.L (A7)+,(A2) 0002614e 5c 4f |\O | ADDQ.L #0x6,A7 00026150 2e 92 |. | MOVE.L (A2),(A7) 00026152 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00026158 9e fc 00 38 | 8 | SUBA.W #0x38,A7 0002615c 20 4f | O | MOVEA.L A7,A0 0002615e 43 fa af 48 |C H | LEA.L 0x210a8,A1 00026162 70 3a |p: | MOVEQ.L #0x3a,D0 00026164 10 d9 | | MOVE.B (A1)+,(A0)+ 00026166 51 c8 ff fc |Q | DBF D0,0x26164 0002616a 59 4f |YO | SUBQ.L #0x4,A7 0002616c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00026170 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026174 3f 3c 00 3b |?< ; | MOVE.W #0x3b,-(A7) 00026178 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002617e 50 4f |PO | ADDQ.L #0x8,A7 00026180 4e ba c3 a0 |N | JSR 0x22522 00026184 de fc 00 40 | @ | ADDA.W #0x40,A7 00026188 50 4f |PO | ADDQ.L #0x8,A7 0002618a 4a 2e ff d8 |J. | TST.B (A6-0x28) 0002618e 67 00 fb 0a |g | BEQ 0x25c9a 00026192 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00026196 4e 5e |N^ | UNLK A6 00026198 4e 75 |Nu | RTS 0002619a ; -------------------------------------------------------------------------------------- 0002619a ; OMSI PASCAL Function 0002619a ; <LVAR -0x002 2(w)> 0002619a ; <LVAR -0x004 2(w)> 0002619a ; <LVAR -0x006 2(w)> 0002619a ; <LVAR -0x00a @ 4(r)> 0002619a ; <LVAR -0x00e @ 4(r)> 0002619a ; <LVAR -0x010 1(rw)> 0002619a ; -------------------------------------------------------------------------------------- 0002619a 4e 56 ff 08 |NV | LINK.W A6,#0xff08 0002619e bf d5 | | CMPA.L (A5),A7 000261a0 62 06 |b | BHI 0x261a8 000261a2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000261a6 4e 76 |Nv | TRAPV 000261a8 de fc 00 dc | | ADDA.W #0xdc,A7 000261ac 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000261b0 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 000261b6 47 f9 00 02 97 0b |G | LEA.L 0x2970b,A3 000261bc 49 f9 00 01 02 98 |I | LEA.L ?divu_d3_d4,A4 000261c2 72 01 |r | MOVEQ.L #0x01,D1 000261c4 74 0c |t | MOVEQ.L #0x0c,D2 000261c6 3d 7a c2 08 ff fa |=z | MOVE.W 0x223d0,(A6-0x6) 000261cc 3d 7a c2 04 ff fc |=z | MOVE.W 0x223d2,(A6-0x4) 000261d2 3d 7a c2 00 ff fe |=z | MOVE.W 0x223d4,(A6-0x2) 000261d8 3d 79 00 02 96 e0 ff fa |=y | MOVE.W 0x296e0,(A6-0x6) 000261e0 41 fa af da |A | LEA.L 0x211bc,A0 000261e4 70 10 |p | MOVEQ.L #0x10,D0 000261e6 3f 20 |? | MOVE.W -(A0),-(A7) 000261e8 51 c8 ff fc |Q | DBF D0,0x261e6 000261ec 4a 13 |J | TST.B (A3) 000261ee 66 20 |f | BNE 0x26210 000261f0 5d 4f |]O | SUBQ.L #0x6,A7 000261f2 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000261f6 3f 01 |? | MOVE.W D1,-(A7) 000261f8 3f 3c 00 22 |?< " | MOVE.W #0x22,-(A7) 000261fc 4e 92 |N | JSR (A2) 000261fe 5c 4f |\O | ADDQ.L #0x6,A7 00026200 42 17 |B | CLR.B (A7) 00026202 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00026208 5c 4f |\O | ADDQ.L #0x6,A7 0002620a 4a 1f |J | TST.B (A7)+ 0002620c 67 00 04 0e |g | BEQ 0x2661c 00026210 4a 39 00 02 db 20 |J9 | TST.B 0x2db20 00026216 66 00 04 04 |f | BNE 0x2661c 0002621a 41 fa af c6 |A | LEA.L 0x211e2,A0 0002621e 70 12 |p | MOVEQ.L #0x12,D0 00026220 3f 20 |? | MOVE.W -(A0),-(A7) 00026222 51 c8 ff fc |Q | DBF D0,0x26220 00026226 51 4f |QO | SUBQ.L #0x8,A7 00026228 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002622c 3f 01 |? | MOVE.W D1,-(A7) 0002622e 3f 3c 00 26 |?< & | MOVE.W #0x26,-(A7) 00026232 4e 92 |N | JSR (A2) 00026234 50 4f |PO | ADDQ.L #0x8,A7 00026236 48 78 00 00 |Hx | PEA.L 0x0 0002623a 48 78 00 03 |Hx | PEA.L 0x3 0002623e 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 00026244 de c2 | | ADDA.W D2,A7 00026246 2e 1f |. | MOVE.L (A7)+,D7 00026248 9e fc 00 1c | | SUBA.W #0x1c,A7 0002624c 20 4f | O | MOVEA.L A7,A0 0002624e 43 fa af c4 |C | LEA.L 0x21214,A1 00026252 70 40 |p@ | MOVEQ.L #0x40,D0 00026254 10 d9 | | MOVE.B (A1)+,(A0)+ 00026256 51 c8 ff fc |Q | DBF D0,0x26254 0002625a 4a 87 |J | TST.L D7 0002625c 66 24 |f$ | BNE 0x26282 0002625e 5d 4f |]O | SUBQ.L #0x6,A7 00026260 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00026264 3f 01 |? | MOVE.W D1,-(A7) 00026266 3f 3c 00 41 |?< A | MOVE.W #0x41,-(A7) 0002626a 4e 92 |N | JSR (A2) 0002626c 5c 4f |\O | ADDQ.L #0x6,A7 0002626e 42 17 |B | CLR.B (A7) 00026270 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00026276 5c 4f |\O | ADDQ.L #0x6,A7 00026278 4a 1f |J | TST.B (A7)+ 0002627a 66 06 |f | BNE 0x26282 0002627c de fc 00 42 | B | ADDA.W #0x42,A7 00026280 60 98 |` | BRA 0x2621a 00026282 4a 87 |J | TST.L D7 00026284 67 00 03 92 |g | BEQ 0x26618 00026288 55 4f |UO | SUBQ.L #0x2,A7 0002628a 4e b9 00 01 06 10 |N | JSR Is_machine_type_one_or_three() : Bool 00026290 4a 1f |J | TST.B (A7)+ 00026292 67 00 01 0e |g | BEQ 0x263a2 00026296 42 80 |B | CLR.L D0 00026298 10 39 00 02 97 14 | 9 | MOVE.B 0x29714,D0 0002629e c0 f9 00 02 97 12 | | MULU.W 0x29712,D0 000262a4 28 00 |( | MOVE.L D0,D4 000262a6 42 83 |B | CLR.L D3 000262a8 16 39 00 02 97 15 | 9 | MOVE.B 0x29715,D3 000262ae 4e b9 00 01 02 90 |N | JSR ?mulu_d3_d4 000262b4 26 3c 00 00 00 e7 |&< | MOVE.L #0xe7,D3 000262ba 4e 94 |N | JSR (A4) 000262bc 76 3c |v< | MOVEQ.L #0x3c,D3 000262be 4e 94 |N | JSR (A4) 000262c0 2a 04 |* | MOVE.L D4,D5 000262c2 9e fc 00 1a | | SUBA.W #0x1a,A7 000262c6 20 4f | O | MOVEA.L A7,A0 000262c8 43 fa ae 9c |C | LEA.L 0x21166,A1 000262cc 70 18 |p | MOVEQ.L #0x18,D0 000262ce 10 d9 | | MOVE.B (A1)+,(A0)+ 000262d0 51 c8 ff fc |Q | DBF D0,0x262ce 000262d4 9e fc 00 0a | | SUBA.W #0xa,A7 000262d8 20 4f | O | MOVEA.L A7,A0 000262da 43 fa af 92 |C | LEA.L 0x2126e,A1 000262de 70 08 |p | MOVEQ.L #0x08,D0 000262e0 10 d9 | | MOVE.B (A1)+,(A0)+ 000262e2 51 c8 ff fc |Q | DBF D0,0x262e0 000262e6 51 4f |QO | SUBQ.L #0x8,A7 000262e8 48 6f 00 12 |Ho | PEA.L (A7+0x12) 000262ec 3f 01 |? | MOVE.W D1,-(A7) 000262ee 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000262f2 4e 92 |N | JSR (A2) 000262f4 2e 85 |. | MOVE.L D5,(A7) 000262f6 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000262fc 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00026300 3f 01 |? | MOVE.W D1,-(A7) 00026302 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00026306 4e 92 |N | JSR (A2) 00026308 50 4f |PO | ADDQ.L #0x8,A7 0002630a 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00026310 de c2 | | ADDA.W D2,A7 00026312 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00026318 de fc 00 28 | ( | ADDA.W #0x28,A7 0002631c 42 80 |B | CLR.L D0 0002631e 10 39 00 02 97 14 | 9 | MOVE.B 0x29714,D0 00026324 c0 f9 00 02 97 12 | | MULU.W 0x29712,D0 0002632a 28 00 |( | MOVE.L D0,D4 0002632c 42 83 |B | CLR.L D3 0002632e 16 39 00 02 97 15 | 9 | MOVE.B 0x29715,D3 00026334 4e b9 00 01 02 90 |N | JSR ?mulu_d3_d4 0002633a 76 74 |vt | MOVEQ.L #0x74,D3 0002633c 4e 94 |N | JSR (A4) 0002633e 76 3c |v< | MOVEQ.L #0x3c,D3 00026340 4e 94 |N | JSR (A4) 00026342 2a 04 |* | MOVE.L D4,D5 00026344 9e fc 00 1a | | SUBA.W #0x1a,A7 00026348 20 4f | O | MOVEA.L A7,A0 0002634a 43 fa ae 34 |C 4 | LEA.L 0x21180,A1 0002634e 70 18 |p | MOVEQ.L #0x18,D0 00026350 10 d9 | | MOVE.B (A1)+,(A0)+ 00026352 51 c8 ff fc |Q | DBF D0,0x26350 00026356 9e fc 00 0a | | SUBA.W #0xa,A7 0002635a 20 4f | O | MOVEA.L A7,A0 0002635c 43 fa af 1a |C | LEA.L 0x21278,A1 00026360 70 08 |p | MOVEQ.L #0x08,D0 00026362 10 d9 | | MOVE.B (A1)+,(A0)+ 00026364 51 c8 ff fc |Q | DBF D0,0x26362 00026368 51 4f |QO | SUBQ.L #0x8,A7 0002636a 48 6f 00 12 |Ho | PEA.L (A7+0x12) 0002636e 3f 01 |? | MOVE.W D1,-(A7) 00026370 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00026374 4e 92 |N | JSR (A2) 00026376 2e 85 |. | MOVE.L D5,(A7) 00026378 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002637e 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00026382 3f 01 |? | MOVE.W D1,-(A7) 00026384 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00026388 4e 92 |N | JSR (A2) 0002638a 50 4f |PO | ADDQ.L #0x8,A7 0002638c 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00026392 de c2 | | ADDA.W D2,A7 00026394 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002639a de fc 00 28 | ( | ADDA.W #0x28,A7 0002639e 60 00 00 ea |` | BRA 0x2648a 000263a2 9e fc 00 1a | | SUBA.W #0x1a,A7 000263a6 20 4f | O | MOVEA.L A7,A0 000263a8 43 fa ad bc |C | LEA.L 0x21166,A1 000263ac 70 18 |p | MOVEQ.L #0x18,D0 000263ae 10 d9 | | MOVE.B (A1)+,(A0)+ 000263b0 51 c8 ff fc |Q | DBF D0,0x263ae 000263b4 30 39 00 02 96 fc |09 | MOVE.W 0x296fc,D0 000263ba 41 bc 00 05 |A | CHK.W #0x5,D0 000263be e3 40 | @ | ASL.W #0x1,D0 000263c0 41 fa c0 14 |A | LEA.L 0x223d6,A0 000263c4 3f 30 00 00 |?0 | MOVE.W (A0+D0.W),-(A7) 000263c8 9e fc 00 0a | | SUBA.W #0xa,A7 000263cc 20 4f | O | MOVEA.L A7,A0 000263ce 43 fa ae b2 |C | LEA.L 0x21282,A1 000263d2 70 08 |p | MOVEQ.L #0x08,D0 000263d4 10 d9 | | MOVE.B (A1)+,(A0)+ 000263d6 51 c8 ff fc |Q | DBF D0,0x263d4 000263da 51 4f |QO | SUBQ.L #0x8,A7 000263dc 48 6f 00 14 |Ho | PEA.L (A7+0x14) 000263e0 3f 01 |? | MOVE.W D1,-(A7) 000263e2 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000263e6 4e 92 |N | JSR (A2) 000263e8 58 4f |XO | ADDQ.L #0x4,A7 000263ea 48 6f 00 16 |Ho | PEA.L (A7+0x16) 000263ee 3f 01 |? | MOVE.W D1,-(A7) 000263f0 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 000263f4 4e 92 |N | JSR (A2) 000263f6 58 4f |XO | ADDQ.L #0x4,A7 000263f8 48 6f 00 10 |Ho | PEA.L (A7+0x10) 000263fc 3f 01 |? | MOVE.W D1,-(A7) 000263fe 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00026402 4e 92 |N | JSR (A2) 00026404 50 4f |PO | ADDQ.L #0x8,A7 00026406 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 0002640c de c2 | | ADDA.W D2,A7 0002640e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00026414 de fc 00 10 | | ADDA.W #0x10,A7 00026418 20 4f | O | MOVEA.L A7,A0 0002641a 43 fa ad 64 |C d | LEA.L 0x21180,A1 0002641e 70 18 |p | MOVEQ.L #0x18,D0 00026420 10 d9 | | MOVE.B (A1)+,(A0)+ 00026422 51 c8 ff fc |Q | DBF D0,0x26420 00026426 30 39 00 02 96 fc |09 | MOVE.W 0x296fc,D0 0002642c 41 bc 00 05 |A | CHK.W #0x5,D0 00026430 e3 40 | @ | ASL.W #0x1,D0 00026432 41 fa bf ae |A | LEA.L 0x223e2,A0 00026436 3f 30 00 00 |?0 | MOVE.W (A0+D0.W),-(A7) 0002643a 9e fc 00 0a | | SUBA.W #0xa,A7 0002643e 20 4f | O | MOVEA.L A7,A0 00026440 43 fa ae 4a |C J | LEA.L 0x2128c,A1 00026444 70 08 |p | MOVEQ.L #0x08,D0 00026446 10 d9 | | MOVE.B (A1)+,(A0)+ 00026448 51 c8 ff fc |Q | DBF D0,0x26446 0002644c 51 4f |QO | SUBQ.L #0x8,A7 0002644e 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00026452 3f 01 |? | MOVE.W D1,-(A7) 00026454 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00026458 4e 92 |N | JSR (A2) 0002645a 58 4f |XO | ADDQ.L #0x4,A7 0002645c 48 6f 00 16 |Ho | PEA.L (A7+0x16) 00026460 3f 01 |? | MOVE.W D1,-(A7) 00026462 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00026466 4e 92 |N | JSR (A2) 00026468 58 4f |XO | ADDQ.L #0x4,A7 0002646a 48 6f 00 10 |Ho | PEA.L (A7+0x10) 0002646e 3f 01 |? | MOVE.W D1,-(A7) 00026470 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00026474 4e 92 |N | JSR (A2) 00026476 50 4f |PO | ADDQ.L #0x8,A7 00026478 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 0002647e de c2 | | ADDA.W D2,A7 00026480 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00026486 de fc 00 2a | * | ADDA.W #0x2a,A7 0002648a 9e fc 00 32 | 2 | SUBA.W #0x32,A7 0002648e 20 4f | O | MOVEA.L A7,A0 00026490 43 fa ad 50 |C P | LEA.L 0x211e2,A1 00026494 70 30 |p0 | MOVEQ.L #0x30,D0 00026496 10 d9 | | MOVE.B (A1)+,(A0)+ 00026498 51 c8 ff fc |Q | DBF D0,0x26496 0002649c 5d 4f |]O | SUBQ.L #0x6,A7 0002649e 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000264a2 3f 01 |? | MOVE.W D1,-(A7) 000264a4 3f 3c 00 31 |?< 1 | MOVE.W #0x31,-(A7) 000264a8 4e 92 |N | JSR (A2) 000264aa 5c 4f |\O | ADDQ.L #0x6,A7 000264ac 42 17 |B | CLR.B (A7) 000264ae 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 000264b4 5c 4f |\O | ADDQ.L #0x6,A7 000264b6 10 1f | | MOVE.B (A7)+,D0 000264b8 48 80 |H | EXTB.W D0 000264ba 41 81 |A | CHK.W D1,D0 000264bc de fc 00 32 | 2 | ADDA.W #0x32,A7 000264c0 1d 40 ff f0 | @ | MOVE.B D0,(A6-0x10) 000264c4 2f 07 |/ | MOVE.L D7,-(A7) 000264c6 7c 01 || | MOVEQ.L #0x01,D6 000264c8 bc 97 | | CMP.L (A7),D6 000264ca 6e 00 01 48 |n H | BGT 0x26614 000264ce bc 81 | | CMP.L D1,D6 000264d0 66 06 |f | BNE 0x264d8 000264d2 4a 13 |J | TST.B (A3) 000264d4 66 00 00 9e |f | BNE 0x26574 000264d8 48 6e ff f2 |Hn | PEA.L (A6-0xe) 000264dc 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 000264e2 58 4f |XO | ADDQ.L #0x4,A7 000264e4 20 06 | | MOVE.L D6,D0 000264e6 53 80 |S | SUBQ.L #0x1,D0 000264e8 0c 80 00 00 00 02 | | CMPI.L #0x00000002,D0 000264ee 63 02 |c | BLS 0x264f2 000264f0 4e 4f |NO | TRAP #15 000264f2 e3 80 | | ASL.L #0x1,D0 000264f4 3f 36 08 fa |?6 | MOVE.W (A6+D0.L-#0x6),-(A7) 000264f8 1f 3c 00 0b | < | MOVE.B #0x0b,-(A7) 000264fc 10 2e ff f0 | . | MOVE.B (A6-0x10),D0 00026500 48 80 |H | EXTB.W D0 00026502 41 81 |A | CHK.W D1,D0 00026504 1f 00 | | MOVE.B D0,-(A7) 00026506 4e ba f7 22 |N " | JSR 0x25c2a 0002650a 5c 4f |\O | ADDQ.L #0x6,A7 0002650c 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00026510 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 00026516 51 4f |QO | SUBQ.L #0x8,A7 00026518 20 4f | O | MOVEA.L A7,A0 0002651a 43 fa ad 7a |C z | LEA.L 0x21296,A1 0002651e 70 0a |p | MOVEQ.L #0x0a,D0 00026520 10 d9 | | MOVE.B (A1)+,(A0)+ 00026522 51 c8 ff fc |Q | DBF D0,0x26520 00026526 2f 3a ad 82 |/: | MOVE.L 0x212aa,-(A7) 0002652a 2f 3a ad 7a |/: z | MOVE.L 0x212a6,-(A7) 0002652e 2f 3a ad 72 |/: r | MOVE.L 0x212a2,-(A7) 00026532 51 4f |QO | SUBQ.L #0x8,A7 00026534 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00026538 3f 01 |? | MOVE.W D1,-(A7) 0002653a 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 0002653e 4e 92 |N | JSR (A2) 00026540 2e 86 |. | MOVE.L D6,(A7) 00026542 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00026548 48 6f 00 10 |Ho | PEA.L (A7+0x10) 0002654c 3f 01 |? | MOVE.W D1,-(A7) 0002654e 3f 02 |? | MOVE.W D2,-(A7) 00026550 4e 92 |N | JSR (A2) 00026552 50 4f |PO | ADDQ.L #0x8,A7 00026554 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 0002655a de c2 | | ADDA.W D2,A7 0002655c 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00026562 de fc 00 18 | | ADDA.W #0x18,A7 00026566 2e ae ff f2 |. | MOVE.L (A6-0xe),(A7) 0002656a 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 0002656e 4e ba c5 d8 |N | JSR 0x22b48 00026572 50 4f |PO | ADDQ.L #0x8,A7 00026574 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00026578 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 0002657e 58 4f |XO | ADDQ.L #0x4,A7 00026580 20 06 | | MOVE.L D6,D0 00026582 53 80 |S | SUBQ.L #0x1,D0 00026584 0c 80 00 00 00 02 | | CMPI.L #0x00000002,D0 0002658a 63 02 |c | BLS 0x2658e 0002658c 4e 4f |NO | TRAP #15 0002658e e3 80 | | ASL.L #0x1,D0 00026590 3f 36 08 fa |?6 | MOVE.W (A6+D0.L-#0x6),-(A7) 00026594 1f 02 | | MOVE.B D2,-(A7) 00026596 10 2e ff f0 | . | MOVE.B (A6-0x10),D0 0002659a 48 80 |H | EXTB.W D0 0002659c 41 81 |A | CHK.W D1,D0 0002659e 1f 00 | | MOVE.B D0,-(A7) 000265a0 4e ba f6 88 |N | JSR 0x25c2a 000265a4 5c 4f |\O | ADDQ.L #0x6,A7 000265a6 48 6e ff f6 |Hn | PEA.L (A6-0xa) 000265aa 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 000265b0 51 4f |QO | SUBQ.L #0x8,A7 000265b2 20 4f | O | MOVEA.L A7,A0 000265b4 43 fa ac f8 |C | LEA.L 0x212ae,A1 000265b8 70 0a |p | MOVEQ.L #0x0a,D0 000265ba 10 d9 | | MOVE.B (A1)+,(A0)+ 000265bc 51 c8 ff fc |Q | DBF D0,0x265ba 000265c0 2f 3a ad 00 |/: | MOVE.L 0x212c2,-(A7) 000265c4 2f 3a ac f8 |/: | MOVE.L 0x212be,-(A7) 000265c8 2f 3a ac f0 |/: | MOVE.L 0x212ba,-(A7) 000265cc 51 4f |QO | SUBQ.L #0x8,A7 000265ce 48 6f 00 14 |Ho | PEA.L (A7+0x14) 000265d2 3f 01 |? | MOVE.W D1,-(A7) 000265d4 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 000265d8 4e 92 |N | JSR (A2) 000265da 2e 86 |. | MOVE.L D6,(A7) 000265dc 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000265e2 48 6f 00 10 |Ho | PEA.L (A7+0x10) 000265e6 3f 01 |? | MOVE.W D1,-(A7) 000265e8 3f 02 |? | MOVE.W D2,-(A7) 000265ea 4e 92 |N | JSR (A2) 000265ec 50 4f |PO | ADDQ.L #0x8,A7 000265ee 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 000265f4 de c2 | | ADDA.W D2,A7 000265f6 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000265fc de fc 00 18 | | ADDA.W #0x18,A7 00026600 2e ae ff f2 |. | MOVE.L (A6-0xe),(A7) 00026604 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 00026608 4e ba c5 3e |N > | JSR 0x22b48 0002660c 50 4f |PO | ADDQ.L #0x8,A7 0002660e 52 86 |R | ADDQ.L #0x1,D6 00026610 68 00 fe b6 |h | BVC 0x264c8 00026614 58 4f |XO | ADDQ.L #0x4,A7 00026616 16 81 | | MOVE.B D1,(A3) 00026618 de fc 00 42 | B | ADDA.W #0x42,A7 0002661c de fc 00 22 | " | ADDA.W #0x22,A7 00026620 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00026624 4e 5e |N^ | UNLK A6 00026626 4e 75 |Nu | RTS 00026628 ; -------------------------------------------------------------------------------------- 00026628 ; OMSI PASCAL Function 00026628 ; -------------------------------------------------------------------------------------- 00026628 4e 56 ff ae |NV | LINK.W A6,#0xffae 0002662c bf d5 | | CMPA.L (A5),A7 0002662e 62 06 |b | BHI 0x26636 00026630 44 fc 00 02 |D | MOVE.W #0x2,CCR 00026634 4e 76 |Nv | TRAPV 00026636 de fc 00 4a | J | ADDA.W #0x4a,A7 0002663a 48 e7 c3 c0 |H | MOVEM.L A1+A0+D7+D6+D1+D0,-(A7) 0002663e 7e 00 |~ | MOVEQ.L #0x00,D7 00026640 7c 00 || | MOVEQ.L #0x00,D6 00026642 0c 86 00 00 07 ff | | CMPI.L #0x000007ff,D6 00026648 63 02 |c | BLS 0x2664c 0002664a 4e 4f |NO | TRAP #15 0002664c 20 06 | | MOVE.L D6,D0 0002664e e5 80 | | ASL.L #0x2,D0 00026650 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00026656 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 0002665a 42 80 |B | CLR.L D0 0002665c 30 39 00 02 97 12 |09 | MOVE.W 0x29712,D0 00026662 53 80 |S | SUBQ.L #0x1,D0 00026664 42 81 |B | CLR.L D1 00026666 32 28 04 4c |2( L | MOVE.W (A0+0x44c),D1 0002666a e5 49 | I | LSL.W #0x2,D1 0002666c e4 49 | I | LSR.W #0x2,D1 0002666e b2 80 | | CMP.L D0,D1 00026670 62 40 |b@ | BHI 0x266b2 00026672 42 80 |B | CLR.L D0 00026674 10 39 00 02 97 14 | 9 | MOVE.B 0x29714,D0 0002667a 53 40 |S@ | SUBQ.W #0x1,D0 0002667c 42 81 |B | CLR.L D1 0002667e 12 28 04 4e | ( N | MOVE.B (A0+0x44e),D1 00026682 b2 40 | @ | CMP.W D0,D1 00026684 63 0c |c | BLS 0x26692 00026686 42 80 |B | CLR.L D0 00026688 10 28 04 4e | ( N | MOVE.B (A0+0x44e),D0 0002668c 0c 40 00 ff | @ | CMPI.W #0x00ff,D0 00026690 66 20 |f | BNE 0x266b2 00026692 42 80 |B | CLR.L D0 00026694 10 39 00 02 97 15 | 9 | MOVE.B 0x29715,D0 0002669a 53 40 |S@ | SUBQ.W #0x1,D0 0002669c 42 81 |B | CLR.L D1 0002669e 12 28 04 4f | ( O | MOVE.B (A0+0x44f),D1 000266a2 b2 40 | @ | CMP.W D0,D1 000266a4 63 1c |c | BLS 0x266c2 000266a6 42 80 |B | CLR.L D0 000266a8 10 28 04 4f | ( O | MOVE.B (A0+0x44f),D0 000266ac 0c 40 00 ff | @ | CMPI.W #0x00ff,D0 000266b0 67 10 |g | BEQ 0x266c2 000266b2 52 87 |R | ADDQ.L #0x1,D7 000266b4 02 68 c0 00 04 4c | h L | ANDI.W #0xc000,(A0+0x44c) 000266ba 42 28 04 4e |B( N | CLR.B (A0+0x44e) 000266be 42 28 04 4f |B( O | CLR.B (A0+0x44f) 000266c2 52 86 |R | ADDQ.L #0x1,D6 000266c4 0c 86 00 00 07 ff | | CMPI.L #0x000007ff,D6 000266ca 6f 00 ff 76 |o v | BLE 0x26642 000266ce 4a 87 |J | TST.L D7 000266d0 67 42 |gB | BEQ 0x26714 000266d2 9e fc 00 1a | | SUBA.W #0x1a,A7 000266d6 20 4f | O | MOVEA.L A7,A0 000266d8 43 fa ab ec |C | LEA.L 0x212c6,A1 000266dc 70 18 |p | MOVEQ.L #0x18,D0 000266de 10 d9 | | MOVE.B (A1)+,(A0)+ 000266e0 51 c8 ff fc |Q | DBF D0,0x266de 000266e4 51 4f |QO | SUBQ.L #0x8,A7 000266e6 2f 07 |/ | MOVE.L D7,-(A7) 000266e8 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000266ee 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000266f2 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000266f6 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000266fa 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00026700 50 4f |PO | ADDQ.L #0x8,A7 00026702 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00026708 50 4f |PO | ADDQ.L #0x8,A7 0002670a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00026710 de fc 00 1e | | ADDA.W #0x1e,A7 00026714 4c df 03 c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0+A1 00026718 4e 5e |N^ | UNLK A6 0002671a 4e 75 |Nu | RTS 0002671c ; -------------------------------------------------------------------------------------- 0002671c ; OMSI PASCAL Function 0002671c ; <LVAR 0x008 4(r)> 0002671c ; <LVAR -0x006 @ 4(rw)> 0002671c ; <LVAR -0x007 1(rw)> 0002671c ; <LVAR -0x008 @ 1(r)> 0002671c ; <LVAR -0x012 2(rw)> 0002671c ; <LVAR -0x016 2(w)> 0002671c ; <LVAR -0x01c 4(rw)> 0002671c ; <LVAR -0x420 @> 0002671c ; -------------------------------------------------------------------------------------- 0002671c 4e 56 fb 3c |NV < | LINK.W A6,#0xfb3c 00026720 bf d5 | | CMPA.L (A5),A7 00026722 62 06 |b | BHI 0x2672a 00026724 44 fc 00 02 |D | MOVE.W #0x2,CCR 00026728 4e 76 |Nv | TRAPV 0002672a de fc 00 a4 | | ADDA.W #0xa4,A7 0002672e 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00026732 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00026738 41 ee fb e0 |A | LEA.L (A6-0x420),A0 0002673c 2f 08 |/ | MOVE.L A0,-(A7) 0002673e 26 5f |&_ | MOVEA.L (A7)+,A3 00026740 2f 0b |/ | MOVE.L A3,-(A7) 00026742 2d 5f ff e4 |-_ | MOVE.L (A7)+,(A6-0x1c) 00026746 41 fa ad 30 |A 0 | LEA.L 0x21478,A0 0002674a 70 0e |p | MOVEQ.L #0x0e,D0 0002674c 3f 20 |? | MOVE.W -(A0),-(A7) 0002674e 51 c8 ff fc |Q | DBF D0,0x2674c 00026752 59 4f |YO | SUBQ.L #0x4,A7 00026754 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00026758 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002675c 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 00026760 4e 92 |N | JSR (A2) 00026762 50 4f |PO | ADDQ.L #0x8,A7 00026764 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002676a de fc 00 22 | " | ADDA.W #0x22,A7 0002676e 4e ba fe b8 |N | JSR 0x26628 00026772 7e 00 |~ | MOVEQ.L #0x00,D7 00026774 28 07 |( | MOVE.L D7,D4 00026776 76 02 |v | MOVEQ.L #0x02,D3 00026778 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 0002677e e1 84 | | ASL.L #0x8,D4 00026780 0c 84 00 00 07 ff | | CMPI.L #0x000007ff,D4 00026786 63 02 |c | BLS 0x2678a 00026788 4e 4f |NO | TRAP #15 0002678a e5 84 | | ASL.L #0x2,D4 0002678c 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00026792 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0 00026796 41 e8 04 4c |A L | LEA.L (A0+0x44c),A0 0002679a 2f 08 |/ | MOVE.L A0,-(A7) 0002679c 28 5f |(_ | MOVEA.L (A7)+,A4 0002679e 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 000267a2 70 05 |p | MOVEQ.L #0x05,D0 000267a4 d0 87 | | ADD.L D7,D0 000267a6 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 000267ac 63 02 |c | BLS 0x267b0 000267ae 4e 4f |NO | TRAP #15 000267b0 3f 00 |? | MOVE.W D0,-(A7) 000267b2 48 78 00 01 |Hx | PEA.L 0x1 000267b6 2f 0c |/ | MOVE.L A4,-(A7) 000267b8 48 6e ff f8 |Hn | PEA.L (A6-0x8) 000267bc 4e b9 00 01 03 6c |N l | JSR RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B) 000267c2 de fc 00 10 | | ADDA.W #0x10,A7 000267c6 4a 2e ff f8 |J. | TST.B (A6-0x8) 000267ca 66 2c |f, | BNE 0x267f8 000267cc 9e fc 00 26 | & | SUBA.W #0x26,A7 000267d0 20 4f | O | MOVEA.L A7,A0 000267d2 43 fa ac 1c |C | LEA.L 0x213f0,A1 000267d6 70 24 |p$ | MOVEQ.L #0x24,D0 000267d8 10 d9 | | MOVE.B (A1)+,(A0)+ 000267da 51 c8 ff fc |Q | DBF D0,0x267d8 000267de 59 4f |YO | SUBQ.L #0x4,A7 000267e0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000267e4 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000267e8 3f 3c 00 25 |?< % | MOVE.W #0x25,-(A7) 000267ec 4e 92 |N | JSR (A2) 000267ee 50 4f |PO | ADDQ.L #0x8,A7 000267f0 4e ba bd 30 |N 0 | JSR 0x22522 000267f4 de fc 00 2a | * | ADDA.W #0x2a,A7 000267f8 52 87 |R | ADDQ.L #0x1,D7 000267fa 0c 87 00 00 00 0f | | CMPI.L #0x0000000f,D7 00026800 6f 00 ff 72 |o r | BLE 0x26774 00026804 9e fc 00 14 | | SUBA.W #0x14,A7 00026808 20 4f | O | MOVEA.L A7,A0 0002680a 43 fa ac 6c |C l | LEA.L 0x21478,A1 0002680e 70 12 |p | MOVEQ.L #0x12,D0 00026810 10 d9 | | MOVE.B (A1)+,(A0)+ 00026812 51 c8 ff fc |Q | DBF D0,0x26810 00026816 59 4f |YO | SUBQ.L #0x4,A7 00026818 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002681c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026820 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00026824 4e 92 |N | JSR (A2) 00026826 50 4f |PO | ADDQ.L #0x8,A7 00026828 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002682e de fc 00 18 | | ADDA.W #0x18,A7 00026832 7e 00 |~ | MOVEQ.L #0x00,D7 00026834 0c 87 00 00 01 ff | | CMPI.L #0x000001ff,D7 0002683a 63 02 |c | BLS 0x2683e 0002683c 4e 4f |NO | TRAP #15 0002683e 20 07 | | MOVE.L D7,D0 00026840 e3 80 | | ASL.L #0x1,D0 00026842 41 ee fb e0 |A | LEA.L (A6-0x420),A0 00026846 42 70 08 00 |Bp | CLR.W (A0+D0.L) 0002684a 52 87 |R | ADDQ.L #0x1,D7 0002684c 0c 87 00 00 01 ff | | CMPI.L #0x000001ff,D7 00026852 6f e0 |o | BLE 0x26834 00026854 36 bc 7f ed |6 | MOVE.W #0x7fed,(A3) 00026858 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 0002685c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026860 48 78 00 01 |Hx | PEA.L 0x1 00026864 41 ee fb e0 |A | LEA.L (A6-0x420),A0 00026868 2f 08 |/ | MOVE.L A0,-(A7) 0002686a 48 6e ff f8 |Hn | PEA.L (A6-0x8) 0002686e 4e b9 00 01 03 6c |N l | JSR RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B) 00026874 de fc 00 10 | | ADDA.W #0x10,A7 00026878 4a 2e ff f8 |J. | TST.B (A6-0x8) 0002687c 66 2c |f, | BNE 0x268aa 0002687e 9e fc 00 22 | " | SUBA.W #0x22,A7 00026882 20 4f | O | MOVEA.L A7,A0 00026884 43 fa ab 48 |C H | LEA.L 0x213ce,A1 00026888 70 20 |p | MOVEQ.L #0x20,D0 0002688a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002688c 51 c8 ff fc |Q | DBF D0,0x2688a 00026890 59 4f |YO | SUBQ.L #0x4,A7 00026892 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00026896 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002689a 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 0002689e 4e 92 |N | JSR (A2) 000268a0 50 4f |PO | ADDQ.L #0x8,A7 000268a2 4e ba bc 7e |N ~ | JSR 0x22522 000268a6 de fc 00 26 | & | ADDA.W #0x26,A7 000268aa 41 fa ab f2 |A | LEA.L 0x2149e,A0 000268ae 70 08 |p | MOVEQ.L #0x08,D0 000268b0 3f 20 |? | MOVE.W -(A0),-(A7) 000268b2 51 c8 ff fc |Q | DBF D0,0x268b0 000268b6 59 4f |YO | SUBQ.L #0x4,A7 000268b8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000268bc 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000268c0 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 000268c4 4e 92 |N | JSR (A2) 000268c6 50 4f |PO | ADDQ.L #0x8,A7 000268c8 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000268ce de fc 00 16 | | ADDA.W #0x16,A7 000268d2 33 fc 7f ed 00 01 00 0e |3 | MOVE.W #0x7fed,0x1000e 000268da 20 6e ff e4 | n | MOVEA.L (A6-0x1c),A0 000268de 2f 08 |/ | MOVE.L A0,-(A7) 000268e0 30 bc 7f ed |0 | MOVE.W #0x7fed,(A0) 000268e4 42 68 00 02 |Bh | CLR.W (A0+0x2) 000268e8 7e 00 |~ | MOVEQ.L #0x00,D7 000268ea 0c 87 00 00 00 07 | | CMPI.L #0x00000007,D7 000268f0 63 02 |c | BLS 0x268f4 000268f2 4e 4f |NO | TRAP #15 000268f4 20 07 | | MOVE.L D7,D0 000268f6 e3 80 | | ASL.L #0x1,D0 000268f8 20 57 | W | MOVEA.L (A7),A0 000268fa 42 70 08 04 |Bp | CLR.W (A0+D0.L+#0x4) 000268fe 52 87 |R | ADDQ.L #0x1,D7 00026900 0c 87 00 00 00 07 | | CMPI.L #0x00000007,D7 00026906 6f e2 |o | BLE 0x268ea 00026908 54 4f |TO | ADDQ.L #0x2,A7 0002690a 1e bc 00 03 | | MOVE.B #0x03,(A7) 0002690e 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00026912 48 78 00 01 |Hx | PEA.L 0x1 00026916 41 ee fb e0 |A | LEA.L (A6-0x420),A0 0002691a 2f 08 |/ | MOVE.L A0,-(A7) 0002691c 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00026920 4e b9 00 01 03 6c |N l | JSR RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B) 00026926 de fc 00 10 | | ADDA.W #0x10,A7 0002692a 4a 2e ff f8 |J. | TST.B (A6-0x8) 0002692e 66 26 |f& | BNE 0x26956 00026930 41 fa ab 28 |A ( | LEA.L 0x2145a,A0 00026934 70 07 |p | MOVEQ.L #0x07,D0 00026936 2f 20 |/ | MOVE.L -(A0),-(A7) 00026938 51 c8 ff fc |Q | DBF D0,0x26936 0002693c 59 4f |YO | SUBQ.L #0x4,A7 0002693e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00026942 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026946 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7) 0002694a 4e 92 |N | JSR (A2) 0002694c 50 4f |PO | ADDQ.L #0x8,A7 0002694e 4e ba bb d2 |N | JSR 0x22522 00026952 de fc 00 24 | $ | ADDA.W #0x24,A7 00026956 10 39 00 02 97 08 | 9 | MOVE.B 0x29708,D0 0002695c 44 00 |D | NEG.B D0 0002695e 52 00 |R | ADDQ.B #0x1,D0 00026960 80 39 00 02 97 0b | 9 | OR.B 0x2970b,D0 00026966 80 39 00 02 db 1f | 9 | OR.B 0x2db1f,D0 0002696c 48 80 |H | EXTB.W D0 0002696e 41 bc 00 01 |A | CHK.W #0x1,D0 00026972 1d 40 ff f9 | @ | MOVE.B D0,(A6-0x7) 00026976 4a 39 00 02 ef 34 |J9 4 | TST.B 0x2ef34 0002697c 67 34 |g4 | BEQ 0x269b2 0002697e 4a 00 |J | TST.B D0 00026980 67 26 |g& | BEQ 0x269a8 00026982 41 fa ab 38 |A 8 | LEA.L 0x214bc,A0 00026986 70 0e |p | MOVEQ.L #0x0e,D0 00026988 3f 20 |? | MOVE.W -(A0),-(A7) 0002698a 51 c8 ff fc |Q | DBF D0,0x26988 0002698e 59 4f |YO | SUBQ.L #0x4,A7 00026990 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00026994 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026998 3f 3c 00 1e |?< | MOVE.W #0x1e,-(A7) 0002699c 4e 92 |N | JSR (A2) 0002699e 50 4f |PO | ADDQ.L #0x8,A7 000269a0 4e ba bb 80 |N | JSR 0x22522 000269a4 de fc 00 22 | " | ADDA.W #0x22,A7 000269a8 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000269ac 10 bc 00 01 | | MOVE.B #0x01,(A0) 000269b0 60 3c |`< | BRA 0x269ee 000269b2 4a 00 |J | TST.B D0 000269b4 66 38 |f8 | BNE 0x269ee 000269b6 41 fa a9 62 |A b | LEA.L 0x2131a,A0 000269ba 70 1c |p | MOVEQ.L #0x1c,D0 000269bc 3f 20 |? | MOVE.W -(A0),-(A7) 000269be 51 c8 ff fc |Q | DBF D0,0x269bc 000269c2 5d 4f |]O | SUBQ.L #0x6,A7 000269c4 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000269c8 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000269cc 3f 3c 00 3a |?< : | MOVE.W #0x3a,-(A7) 000269d0 4e 92 |N | JSR (A2) 000269d2 5c 4f |\O | ADDQ.L #0x6,A7 000269d4 42 17 |B | CLR.B (A7) 000269d6 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 000269dc 5c 4f |\O | ADDQ.L #0x6,A7 000269de 10 1f | | MOVE.B (A7)+,D0 000269e0 48 80 |H | EXTB.W D0 000269e2 41 bc 00 01 |A | CHK.W #0x1,D0 000269e6 de fc 00 3a | : | ADDA.W #0x3a,A7 000269ea 1d 40 ff f9 | @ | MOVE.B D0,(A6-0x7) 000269ee 4a 2e ff f9 |J. | TST.B (A6-0x7) 000269f2 67 00 04 dc |g | BEQ 0x26ed0 000269f6 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000269fa 43 fa a9 d2 |C | LEA.L 0x213ce,A1 000269fe 70 1c |p | MOVEQ.L #0x1c,D0 00026a00 3f 21 |?! | MOVE.W -(A1),-(A7) 00026a02 51 c8 ff fc |Q | DBF D0,0x26a00 00026a06 5d 4f |]O | SUBQ.L #0x6,A7 00026a08 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00026a0c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026a10 3f 3c 00 3a |?< : | MOVE.W #0x3a,-(A7) 00026a14 4e 92 |N | JSR (A2) 00026a16 5c 4f |\O | ADDQ.L #0x6,A7 00026a18 1e bc 00 01 | | MOVE.B #0x01,(A7) 00026a1c 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00026a22 5c 4f |\O | ADDQ.L #0x6,A7 00026a24 10 1f | | MOVE.B (A7)+,D0 00026a26 48 80 |H | EXTB.W D0 00026a28 41 bc 00 01 |A | CHK.W #0x1,D0 00026a2c de fc 00 3a | : | ADDA.W #0x3a,A7 00026a30 10 80 | | MOVE.B D0,(A0) 00026a32 3f 00 |? | MOVE.W D0,-(A7) 00026a34 3c 3c ff ff |<< | MOVE.W #0xffff,D6 00026a38 3d 79 00 01 00 0c ff ee |=y | MOVE.W 0x1000c,(A6-0x12) 00026a40 42 81 |B | CLR.L D1 00026a42 32 06 |2 | MOVE.W D6,D1 00026a44 82 ee ff ee | | DIVU.W (A6-0x12),D1 00026a48 42 82 |B | CLR.L D2 00026a4a 34 01 |4 | MOVE.W D1,D2 00026a4c 53 82 |S | SUBQ.L #0x1,D2 00026a4e 0c 82 00 00 ff ff | | CMPI.L #0x0000ffff,D2 00026a54 63 02 |c | BLS 0x26a58 00026a56 4e 4f |NO | TRAP #15 00026a58 3c 02 |< | MOVE.W D2,D6 00026a5a 4a 00 |J | TST.B D0 00026a5c 67 00 00 c6 |g | BEQ 0x26b24 00026a60 48 6e ff fa |Hn | PEA.L (A6-0x6) 00026a64 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00026a6a 58 4f |XO | ADDQ.L #0x4,A7 00026a6c 41 fa a8 e0 |A | LEA.L 0x2134e,A0 00026a70 70 0c |p | MOVEQ.L #0x0c,D0 00026a72 2f 20 |/ | MOVE.L -(A0),-(A7) 00026a74 51 c8 ff fc |Q | DBF D0,0x26a72 00026a78 30 39 00 02 97 00 |09 | MOVE.W 0x29700,D0 00026a7e 48 c0 |H | EXTW.L D0 00026a80 2f 00 |/ | MOVE.L D0,-(A7) 00026a82 30 39 00 02 97 02 |09 | MOVE.W 0x29702,D0 00026a88 48 c0 |H | EXTW.L D0 00026a8a 2f 00 |/ | MOVE.L D0,-(A7) 00026a8c 26 1f |& | MOVE.L (A7)+,D3 00026a8e 28 1f |( | MOVE.L (A7)+,D4 00026a90 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00026a96 59 4f |YO | SUBQ.L #0x4,A7 00026a98 1e ba aa 22 | " | MOVE.B 0x214bc,(A7) 00026a9c 1f 7a aa 1f 00 01 | z | MOVE.B 0x214bd,(A7+0x1) 00026aa2 1f 7a aa 1a 00 02 | z | MOVE.B 0x214be,(A7+0x2) 00026aa8 59 4f |YO | SUBQ.L #0x4,A7 00026aaa 2f 2e ff fa |/. | MOVE.L (A6-0x6),-(A7) 00026aae 59 4f |YO | SUBQ.L #0x4,A7 00026ab0 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00026ab4 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026ab8 3f 3c 00 34 |?< 4 | MOVE.W #0x34,-(A7) 00026abc 4e 92 |N | JSR (A2) 00026abe 58 4f |XO | ADDQ.L #0x4,A7 00026ac0 26 04 |& | MOVE.L D4,D3 00026ac2 28 3c 00 01 38 80 |(< 8 | MOVE.L #0x13880,D4 00026ac8 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00026ace 59 4f |YO | SUBQ.L #0x4,A7 00026ad0 52 84 |R | ADDQ.L #0x1,D4 00026ad2 2e 84 |. | MOVE.L D4,(A7) 00026ad4 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00026ada 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00026ade 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026ae2 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00026ae6 4e 92 |N | JSR (A2) 00026ae8 50 4f |PO | ADDQ.L #0x8,A7 00026aea 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00026af0 de fc 00 10 | | ADDA.W #0x10,A7 00026af4 2d 5f ff fa |-_ | MOVE.L (A7)+,(A6-0x6) 00026af8 de fc 00 30 | 0 | ADDA.W #0x30,A7 00026afc 2e ae ff fa |. | MOVE.L (A6-0x6),(A7) 00026b00 48 78 00 0a |Hx | PEA.L 0xa 00026b04 42 80 |B | CLR.L D0 00026b06 30 06 |0 | MOVE.W D6,D0 00026b08 2f 00 |/ | MOVE.L D0,-(A7) 00026b0a 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 00026b10 de fc 00 0c | | ADDA.W #0xc,A7 00026b14 20 1f | | MOVE.L (A7)+,D0 00026b16 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00026b1c 63 02 |c | BLS 0x26b20 00026b1e 4e 4f |NO | TRAP #15 00026b20 3a 00 |: | MOVE.W D0,D5 00026b22 60 02 |` | BRA 0x26b26 00026b24 7a 03 |z | MOVEQ.L #0x03,D5 00026b26 42 80 |B | CLR.L D0 00026b28 30 39 00 02 97 12 |09 | MOVE.W 0x29712,D0 00026b2e 55 80 |U | SUBQ.L #0x2,D0 00026b30 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00026b36 63 02 |c | BLS 0x26b3a 00026b38 4e 4f |NO | TRAP #15 00026b3a 3c 00 |< | MOVE.W D0,D6 00026b3c 48 6e ff fa |Hn | PEA.L (A6-0x6) 00026b40 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00026b46 54 4f |TO | ADDQ.L #0x2,A7 00026b48 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00026b4e 4a 1f |J | TST.B (A7)+ 00026b50 67 48 |gH | BEQ 0x26b9a 00026b52 9e fc 00 46 | F | SUBA.W #0x46,A7 00026b56 20 4f | O | MOVEA.L A7,A0 00026b58 43 fa a7 f4 |C | LEA.L 0x2134e,A1 00026b5c 70 44 |pD | MOVEQ.L #0x44,D0 00026b5e 10 d9 | | MOVE.B (A1)+,(A0)+ 00026b60 51 c8 ff fc |Q | DBF D0,0x26b5e 00026b64 59 4f |YO | SUBQ.L #0x4,A7 00026b66 1e ba a9 58 | X | MOVE.B 0x214c0,(A7) 00026b6a 1f 7a a9 55 00 01 | z U | MOVE.B 0x214c1,(A7+0x1) 00026b70 1f 7a a9 50 00 02 | z P | MOVE.B 0x214c2,(A7+0x2) 00026b76 59 4f |YO | SUBQ.L #0x4,A7 00026b78 2f 2e ff fa |/. | MOVE.L (A6-0x6),-(A7) 00026b7c 59 4f |YO | SUBQ.L #0x4,A7 00026b7e 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00026b82 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026b86 3f 3c 00 45 |?< E | MOVE.W #0x45,-(A7) 00026b8a 4e 92 |N | JSR (A2) 00026b8c 58 4f |XO | ADDQ.L #0x4,A7 00026b8e 42 80 |B | CLR.L D0 00026b90 30 39 00 02 96 fe |09 | MOVE.W 0x296fe,D0 00026b96 5f 80 |_ | SUBQ.L #0x7,D0 00026b98 60 46 |`F | BRA 0x26be0 00026b9a 9e fc 00 46 | F | SUBA.W #0x46,A7 00026b9e 20 4f | O | MOVEA.L A7,A0 00026ba0 43 fa a7 ac |C | LEA.L 0x2134e,A1 00026ba4 70 44 |pD | MOVEQ.L #0x44,D0 00026ba6 10 d9 | | MOVE.B (A1)+,(A0)+ 00026ba8 51 c8 ff fc |Q | DBF D0,0x26ba6 00026bac 59 4f |YO | SUBQ.L #0x4,A7 00026bae 1e ba a9 14 | | MOVE.B 0x214c4,(A7) 00026bb2 1f 7a a9 11 00 01 | z | MOVE.B 0x214c5,(A7+0x1) 00026bb8 1f 7a a9 0c 00 02 | z | MOVE.B 0x214c6,(A7+0x2) 00026bbe 59 4f |YO | SUBQ.L #0x4,A7 00026bc0 2f 2e ff fa |/. | MOVE.L (A6-0x6),-(A7) 00026bc4 59 4f |YO | SUBQ.L #0x4,A7 00026bc6 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00026bca 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026bce 3f 3c 00 45 |?< E | MOVE.W #0x45,-(A7) 00026bd2 4e 92 |N | JSR (A2) 00026bd4 58 4f |XO | ADDQ.L #0x4,A7 00026bd6 42 80 |B | CLR.L D0 00026bd8 30 39 00 02 96 fe |09 | MOVE.W 0x296fe,D0 00026bde 5b 80 |[ | SUBQ.L #0x5,D0 00026be0 2f 00 |/ | MOVE.L D0,-(A7) 00026be2 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00026be8 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00026bec 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026bf0 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00026bf4 4e 92 |N | JSR (A2) 00026bf6 50 4f |PO | ADDQ.L #0x8,A7 00026bf8 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00026bfe de fc 00 10 | | ADDA.W #0x10,A7 00026c02 2d 5f ff fa |-_ | MOVE.L (A7)+,(A6-0x6) 00026c06 de fc 00 4a | J | ADDA.W #0x4a,A7 00026c0a 59 4f |YO | SUBQ.L #0x4,A7 00026c0c 2f 2e ff fa |/. | MOVE.L (A6-0x6),-(A7) 00026c10 42 80 |B | CLR.L D0 00026c12 30 05 |0 | MOVE.W D5,D0 00026c14 2f 00 |/ | MOVE.L D0,-(A7) 00026c16 42 80 |B | CLR.L D0 00026c18 30 06 |0 | MOVE.W D6,D0 00026c1a 2f 00 |/ | MOVE.L D0,-(A7) 00026c1c 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 00026c22 de fc 00 0c | | ADDA.W #0xc,A7 00026c26 20 1f | | MOVE.L (A7)+,D0 00026c28 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00026c2e 63 02 |c | BLS 0x26c32 00026c30 4e 4f |NO | TRAP #15 00026c32 3d 40 ff ea |=@ | MOVE.W D0,(A6-0x16) 00026c36 2f 00 |/ | MOVE.L D0,-(A7) 00026c38 23 f9 00 02 97 12 00 02 |# | MOVE.L 0x29712,0x29726 00026c40 97 26 | & | 00026c42 42 79 00 02 97 1e |By | CLR.W 0x2971e 00026c48 33 fc 7f ed 00 02 97 20 |3 | MOVE.W #0x7fed,0x29720 00026c50 33 fc 00 03 00 02 97 22 |3 "| MOVE.W #0x3,0x29722 00026c58 42 79 00 02 97 24 |By $ | CLR.W 0x29724 00026c5e 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00026c62 48 79 00 02 97 2a |Hy * | PEA.L 0x2972a 00026c68 4e ba df ce |N | JSR 0x24c38 00026c6c 58 4f |XO | ADDQ.L #0x4,A7 00026c6e 3e bc 00 29 |> ) | MOVE.W #0x29,(A7) 00026c72 48 79 00 02 97 2e |Hy . | PEA.L 0x2972e 00026c78 4e ba df be |N | JSR 0x24c38 00026c7c 58 4f |XO | ADDQ.L #0x4,A7 00026c7e 3e bc 00 2a |> * | MOVE.W #0x2a,(A7) 00026c82 48 79 00 02 97 32 |Hy 2 | PEA.L 0x29732 00026c88 4e ba df ae |N | JSR 0x24c38 00026c8c 58 4f |XO | ADDQ.L #0x4,A7 00026c8e 3e bc 00 49 |> I | MOVE.W #0x49,(A7) 00026c92 48 79 00 02 97 36 |Hy 6 | PEA.L 0x29736 00026c98 4e ba df 9e |N | JSR 0x24c38 00026c9c 58 4f |XO | ADDQ.L #0x4,A7 00026c9e 3e bc 00 4a |> J | MOVE.W #0x4a,(A7) 00026ca2 48 79 00 02 97 3a |Hy : | PEA.L 0x2973a 00026ca8 4e ba df 8e |N | JSR 0x24c38 00026cac 5c 4f |\O | ADDQ.L #0x6,A7 00026cae 33 c5 00 02 97 3e |3 > | MOVE.W D5,0x2973e 00026cb4 42 80 |B | CLR.L D0 00026cb6 10 39 00 02 97 14 | 9 | MOVE.B 0x29714,D0 00026cbc 53 40 |S@ | SUBQ.W #0x1,D0 00026cbe 41 bc 00 ff |A | CHK.W #0xff,D0 00026cc2 13 c0 00 02 97 40 | @ | MOVE.B D0,0x29740 00026cc8 42 80 |B | CLR.L D0 00026cca 10 39 00 02 97 15 | 9 | MOVE.B 0x29715,D0 00026cd0 53 40 |S@ | SUBQ.W #0x1,D0 00026cd2 41 bc 00 ff |A | CHK.W #0xff,D0 00026cd6 13 c0 00 02 97 41 | A | MOVE.B D0,0x29741 00026cdc 42 80 |B | CLR.L D0 00026cde 30 05 |0 | MOVE.W D5,D0 00026ce0 52 80 |R | ADDQ.L #0x1,D0 00026ce2 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00026ce8 63 02 |c | BLS 0x26cec 00026cea 4e 4f |NO | TRAP #15 00026cec 33 c0 00 02 97 42 |3 B | MOVE.W D0,0x29742 00026cf2 42 39 00 02 97 44 |B9 D | CLR.B 0x29744 00026cf8 42 39 00 02 97 45 |B9 E | CLR.B 0x29745 00026cfe 20 17 | | MOVE.L (A7),D0 00026d00 42 81 |B | CLR.L D1 00026d02 32 00 |2 | MOVE.W D0,D1 00026d04 53 81 |S | SUBQ.L #0x1,D1 00026d06 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 00026d0c 63 02 |c | BLS 0x26d10 00026d0e 4e 4f |NO | TRAP #15 00026d10 33 c1 00 02 97 46 |3 F | MOVE.W D1,0x29746 00026d16 42 80 |B | CLR.L D0 00026d18 10 39 00 02 97 14 | 9 | MOVE.B 0x29714,D0 00026d1e 53 40 |S@ | SUBQ.W #0x1,D0 00026d20 41 bc 00 ff |A | CHK.W #0xff,D0 00026d24 13 c0 00 02 97 48 | H | MOVE.B D0,0x29748 00026d2a 42 80 |B | CLR.L D0 00026d2c 10 39 00 02 97 15 | 9 | MOVE.B 0x29715,D0 00026d32 53 40 |S@ | SUBQ.W #0x1,D0 00026d34 41 bc 00 ff |A | CHK.W #0xff,D0 00026d38 13 c0 00 02 97 49 | I | MOVE.B D0,0x29749 00026d3e 20 17 | | MOVE.L (A7),D0 00026d40 33 c0 00 02 97 4a |3 J | MOVE.W D0,0x2974a 00026d46 42 39 00 02 97 4c |B9 L | CLR.B 0x2974c 00026d4c 42 39 00 02 97 4d |B9 M | CLR.B 0x2974d 00026d52 42 80 |B | CLR.L D0 00026d54 30 39 00 02 97 12 |09 | MOVE.W 0x29712,D0 00026d5a 53 80 |S | SUBQ.L #0x1,D0 00026d5c 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00026d62 63 02 |c | BLS 0x26d66 00026d64 4e 4f |NO | TRAP #15 00026d66 33 c0 00 02 97 4e |3 N | MOVE.W D0,0x2974e 00026d6c 42 80 |B | CLR.L D0 00026d6e 10 39 00 02 97 14 | 9 | MOVE.B 0x29714,D0 00026d74 53 40 |S@ | SUBQ.W #0x1,D0 00026d76 41 bc 00 ff |A | CHK.W #0xff,D0 00026d7a 13 c0 00 02 97 50 | P | MOVE.B D0,0x29750 00026d80 42 80 |B | CLR.L D0 00026d82 10 39 00 02 97 15 | 9 | MOVE.B 0x29715,D0 00026d88 53 40 |S@ | SUBQ.W #0x1,D0 00026d8a 41 bc 00 ff |A | CHK.W #0xff,D0 00026d8e 13 c0 00 02 97 51 | Q | MOVE.B D0,0x29751 00026d94 13 fc 00 01 00 02 97 53 | S| MOVE.B #0x01,0x29753 00026d9c 30 2f 00 04 |0/ | MOVE.W (A7+0x4),D0 00026da0 13 c0 00 02 97 52 | R | MOVE.B D0,0x29752 00026da6 20 79 00 02 97 04 | y | MOVEA.L 0x29704,A0 00026dac 2f 08 |/ | MOVE.L A0,-(A7) 00026dae 30 10 |0 | MOVE.W (A0),D0 00026db0 0c 40 00 1e | @ | CMPI.W #0x001e,D0 00026db4 6f 04 |o | BLE 0x26dba 00026db6 30 bc 00 1e |0 | MOVE.W #0x1e,(A0) 00026dba 30 10 |0 | MOVE.W (A0),D0 00026dbc 48 c0 |H | EXTW.L D0 00026dbe 2f 00 |/ | MOVE.L D0,-(A7) 00026dc0 7e 01 |~ | MOVEQ.L #0x01,D7 00026dc2 be 97 | | CMP.L (A7),D7 00026dc4 6e 30 |n0 | BGT 0x26df6 00026dc6 20 07 | | MOVE.L D7,D0 00026dc8 53 80 |S | SUBQ.L #0x1,D0 00026dca 0c 80 00 00 00 1d | | CMPI.L #0x0000001d,D0 00026dd0 63 02 |c | BLS 0x26dd4 00026dd2 4e 4f |NO | TRAP #15 00026dd4 41 f9 00 02 97 1e |A | LEA.L 0x2971e,A0 00026dda 22 07 |" | MOVE.L D7,D1 00026ddc 53 81 |S | SUBQ.L #0x1,D1 00026dde 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00026de4 63 02 |c | BLS 0x26de8 00026de6 4e 4f |NO | TRAP #15 00026de8 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 00026dec 11 b1 18 02 08 36 | 6 | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x36) 00026df2 52 87 |R | ADDQ.L #0x1,D7 00026df4 68 cc |h | BVC 0x26dc2 00026df6 58 4f |XO | ADDQ.L #0x4,A7 00026df8 20 57 | W | MOVEA.L (A7),A0 00026dfa 30 10 |0 | MOVE.W (A0),D0 00026dfc 48 c0 |H | EXTW.L D0 00026dfe 52 80 |R | ADDQ.L #0x1,D0 00026e00 2e 00 |. | MOVE.L D0,D7 00026e02 0c 87 00 00 00 1e | | CMPI.L #0x0000001e,D7 00026e08 6e 1c |n | BGT 0x26e26 00026e0a 20 07 | | MOVE.L D7,D0 00026e0c 53 80 |S | SUBQ.L #0x1,D0 00026e0e 0c 80 00 00 00 1d | | CMPI.L #0x0000001d,D0 00026e14 63 02 |c | BLS 0x26e18 00026e16 4e 4f |NO | TRAP #15 00026e18 41 f9 00 02 97 1e |A | LEA.L 0x2971e,A0 00026e1e 42 30 08 36 |B0 6 | CLR.B (A0+D0.L+#0x36) 00026e22 52 87 |R | ADDQ.L #0x1,D7 00026e24 68 dc |h | BVC 0x26e02 00026e26 9e fc 00 0c | | SUBA.W #0xc,A7 00026e2a 20 4f | O | MOVEA.L A7,A0 00026e2c 43 fa a6 9a |C | LEA.L 0x214c8,A1 00026e30 70 14 |p | MOVEQ.L #0x14,D0 00026e32 10 d9 | | MOVE.B (A1)+,(A0)+ 00026e34 51 c8 ff fc |Q | DBF D0,0x26e32 00026e38 59 4f |YO | SUBQ.L #0x4,A7 00026e3a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00026e3e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026e42 3f 3c 00 15 |?< | MOVE.W #0x15,-(A7) 00026e46 4e 92 |N | JSR (A2) 00026e48 50 4f |PO | ADDQ.L #0x8,A7 00026e4a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00026e50 de fc 00 1a | | ADDA.W #0x1a,A7 00026e54 4e ba bd be |N | JSR 0x22c14 00026e58 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00026e5c 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00026e60 48 78 00 01 |Hx | PEA.L 0x1 00026e64 2f 39 00 02 97 1a |/9 | MOVE.L 0x2971a,-(A7) 00026e6a 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00026e6e 4e b9 00 01 03 6c |N l | JSR RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B) 00026e74 de fc 00 10 | | ADDA.W #0x10,A7 00026e78 4a 2e ff f8 |J. | TST.B (A6-0x8) 00026e7c 67 20 |g | BEQ 0x26e9e 00026e7e 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00026e82 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00026e86 48 78 00 01 |Hx | PEA.L 0x1 00026e8a 2f 39 00 02 97 1a |/9 | MOVE.L 0x2971a,-(A7) 00026e90 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00026e94 4e b9 00 01 03 6c |N l | JSR RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B) 00026e9a de fc 00 10 | | ADDA.W #0x10,A7 00026e9e 4a 2e ff f8 |J. | TST.B (A6-0x8) 00026ea2 66 2c |f, | BNE 0x26ed0 00026ea4 9e fc 00 24 | $ | SUBA.W #0x24,A7 00026ea8 20 4f | O | MOVEA.L A7,A0 00026eaa 43 fa a5 6a |C j | LEA.L 0x21416,A1 00026eae 70 22 |p" | MOVEQ.L #0x22,D0 00026eb0 10 d9 | | MOVE.B (A1)+,(A0)+ 00026eb2 51 c8 ff fc |Q | DBF D0,0x26eb0 00026eb6 59 4f |YO | SUBQ.L #0x4,A7 00026eb8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00026ebc 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026ec0 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 00026ec4 4e 92 |N | JSR (A2) 00026ec6 50 4f |PO | ADDQ.L #0x8,A7 00026ec8 4e ba b6 58 |N X | JSR 0x22522 00026ecc de fc 00 28 | ( | ADDA.W #0x28,A7 00026ed0 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00026ed4 4e 5e |N^ | UNLK A6 00026ed6 4e 75 |Nu | RTS 00026ed8 ; -------------------------------------------------------------------------------------- 00026ed8 ; OMSI PASCAL Function 00026ed8 ; <LVAR -0x004 4(rw)> 00026ed8 ; <LVAR -0x006 2(rw)> 00026ed8 ; <LVAR -0x008 2(rw)> 00026ed8 ; <LVAR -0x2012 @> 00026ed8 ; <LVAR -0x2017 @ 1(r)> 00026ed8 ; <LVAR -0x2018 1(rw)> 00026ed8 ; <LVAR -0x201a 2(w)> 00026ed8 ; <LVAR -0x201c @ 2(w) 4(r)> 00026ed8 ; -------------------------------------------------------------------------------------- 00026ed8 4e 56 df 64 |NV d | LINK.W A6,#0xdf64 00026edc bf d5 | | CMPA.L (A5),A7 00026ede 62 06 |b | BHI 0x26ee6 00026ee0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00026ee4 4e 76 |Nv | TRAPV 00026ee6 de fc 00 80 | | ADDA.W #0x80,A7 00026eea 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00026eee 45 ee df e8 |E | LEA.L (A6-0x2018),A2 00026ef2 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00026ef8 9e fc 00 18 | | SUBA.W #0x18,A7 00026efc 20 4f | O | MOVEA.L A7,A0 00026efe 43 fa a6 16 |C | LEA.L 0x21516,A1 00026f02 70 16 |p | MOVEQ.L #0x16,D0 00026f04 10 d9 | | MOVE.B (A1)+,(A0)+ 00026f06 51 c8 ff fc |Q | DBF D0,0x26f04 00026f0a 59 4f |YO | SUBQ.L #0x4,A7 00026f0c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00026f10 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00026f14 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00026f18 4e 93 |N | JSR (A3) 00026f1a 50 4f |PO | ADDQ.L #0x8,A7 00026f1c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00026f22 de fc 00 1c | | ADDA.W #0x1c,A7 00026f26 41 ee df ee |A | LEA.L (A6-0x2012),A0 00026f2a 2f 08 |/ | MOVE.L A0,-(A7) 00026f2c 28 5f |(_ | MOVEA.L (A7)+,A4 00026f2e 30 39 00 01 00 0c |09 | MOVE.W 0x1000c,D0 00026f34 c0 f9 00 02 97 3a | : | MULU.W 0x2973a,D0 00026f3a 42 81 |B | CLR.L D1 00026f3c 12 39 00 02 97 3c | 9 < | MOVE.B 0x2973c,D1 00026f42 c2 f9 00 01 00 0a | | MULU.W 0x1000a,D1 00026f48 d2 80 | | ADD.L D0,D1 00026f4a 42 80 |B | CLR.L D0 00026f4c 10 39 00 02 97 3d | 9 = | MOVE.B 0x2973d,D0 00026f52 52 40 |R@ | ADDQ.W #0x1,D0 00026f54 e2 40 | @ | ASR.W #0x1,D0 00026f56 48 c0 |H | EXTW.L D0 00026f58 d0 81 | | ADD.L D1,D0 00026f5a 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00026f60 63 02 |c | BLS 0x26f64 00026f62 4e 4f |NO | TRAP #15 00026f64 3d 40 ff f8 |=@ | MOVE.W D0,(A6-0x8) 00026f68 30 39 00 01 00 0c |09 | MOVE.W 0x1000c,D0 00026f6e c0 f9 00 02 97 3e | > | MULU.W 0x2973e,D0 00026f74 42 81 |B | CLR.L D1 00026f76 12 39 00 02 97 40 | 9 @ | MOVE.B 0x29740,D1 00026f7c c2 f9 00 01 00 0a | | MULU.W 0x1000a,D1 00026f82 d2 80 | | ADD.L D0,D1 00026f84 42 80 |B | CLR.L D0 00026f86 10 39 00 02 97 41 | 9 A | MOVE.B 0x29741,D0 00026f8c 53 40 |S@ | SUBQ.W #0x1,D0 00026f8e 48 c0 |H | EXTW.L D0 00026f90 81 fc 00 02 | | DIVS.W #0x2,D0 00026f94 48 c0 |H | EXTW.L D0 00026f96 d0 81 | | ADD.L D1,D0 00026f98 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00026f9e 63 02 |c | BLS 0x26fa2 00026fa0 4e 4f |NO | TRAP #15 00026fa2 3d 40 ff fa |=@ | MOVE.W D0,(A6-0x6) 00026fa6 42 80 |B | CLR.L D0 00026fa8 30 39 00 02 97 3e |09 > | MOVE.W 0x2973e,D0 00026fae 2d 40 ff fc |-@ | MOVE.L D0,(A6-0x4) 00026fb2 7a 00 |z | MOVEQ.L #0x00,D5 00026fb4 42 80 |B | CLR.L D0 00026fb6 30 05 |0 | MOVE.W D5,D0 00026fb8 20 4c | L | MOVEA.L A4,A0 00026fba 22 00 |" | MOVE.L D0,D1 00026fbc e6 99 | | ROR.L #0x3,D1 00026fbe d0 c1 | | ADDA.W D1,A0 00026fc0 48 41 |HA | SWAP.W D1 00026fc2 e7 59 | Y | ROL.W #0x3,D1 00026fc4 34 3c ff 7f |4< | MOVE.W #0xff7f,D2 00026fc8 e2 7a | z | ROR.W D1,D2 00026fca c5 10 | | AND.B D2,(A0) 00026fcc 52 80 |R | ADDQ.L #0x1,D0 00026fce 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00026fd4 63 02 |c | BLS 0x26fd8 00026fd6 4e 4f |NO | TRAP #15 00026fd8 3a 00 |: | MOVE.W D0,D5 00026fda ba 6e ff f8 | n | CMP.W (A6-0x8),D5 00026fde 66 d4 |f | BNE 0x26fb4 00026fe0 42 80 |B | CLR.L D0 00026fe2 30 05 |0 | MOVE.W D5,D0 00026fe4 20 4c | L | MOVEA.L A4,A0 00026fe6 22 00 |" | MOVE.L D0,D1 00026fe8 e6 99 | | ROR.L #0x3,D1 00026fea d0 c1 | | ADDA.W D1,A0 00026fec 48 41 |HA | SWAP.W D1 00026fee e7 59 | Y | ROL.W #0x3,D1 00026ff0 14 3c 00 80 | < | MOVE.B #0x80,D2 00026ff4 e2 2a | * | LSR.B D1,D2 00026ff6 85 10 | | OR.B D2,(A0) 00026ff8 52 80 |R | ADDQ.L #0x1,D0 00026ffa 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00027000 63 02 |c | BLS 0x27004 00027002 4e 4f |NO | TRAP #15 00027004 3a 00 |: | MOVE.W D0,D5 00027006 42 80 |B | CLR.L D0 00027008 30 2e ff fa |0. | MOVE.W (A6-0x6),D0 0002700c 52 80 |R | ADDQ.L #0x1,D0 0002700e 42 81 |B | CLR.L D1 00027010 32 05 |2 | MOVE.W D5,D1 00027012 b2 80 | | CMP.L D0,D1 00027014 66 ca |f | BNE 0x26fe0 00027016 20 4c | L | MOVEA.L A4,A0 00027018 e6 99 | | ROR.L #0x3,D1 0002701a d0 c1 | | ADDA.W D1,A0 0002701c 48 41 |HA | SWAP.W D1 0002701e e7 59 | Y | ROL.W #0x3,D1 00027020 30 3c ff 7f |0< | MOVE.W #0xff7f,D0 00027024 e2 78 | x | ROR.W D1,D0 00027026 c1 10 | | AND.B D0,(A0) 00027028 42 80 |B | CLR.L D0 0002702a 30 05 |0 | MOVE.W D5,D0 0002702c 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00027032 67 26 |g& | BEQ 0x2705a 00027034 52 80 |R | ADDQ.L #0x1,D0 00027036 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 0002703c 63 02 |c | BLS 0x27040 0002703e 4e 4f |NO | TRAP #15 00027040 3a 00 |: | MOVE.W D0,D5 00027042 42 80 |B | CLR.L D0 00027044 30 05 |0 | MOVE.W D5,D0 00027046 20 4c | L | MOVEA.L A4,A0 00027048 e6 98 | | ROR.L #0x3,D0 0002704a d0 c0 | | ADDA.W D0,A0 0002704c 48 40 |H@ | SWAP.W D0 0002704e e7 58 | X | ROL.W #0x3,D0 00027050 32 3c ff 7f |2< | MOVE.W #0xff7f,D1 00027054 e0 79 | y | ROR.W D0,D1 00027056 c3 10 | | AND.B D1,(A0) 00027058 60 ce |` | BRA 0x27028 0002705a 70 00 |p | MOVEQ.L #0x00,D0 0002705c 2f 00 |/ | MOVE.L D0,-(A7) 0002705e 0c 80 00 00 07 ff | | CMPI.L #0x000007ff,D0 00027064 63 02 |c | BLS 0x27068 00027066 4e 4f |NO | TRAP #15 00027068 22 00 |" | MOVE.L D0,D1 0002706a e5 81 | | ASL.L #0x2,D1 0002706c 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00027072 41 f0 18 00 |A | LEA.L (A0+D1.L),A0 00027076 42 81 |B | CLR.L D1 00027078 32 28 04 4c |2( L | MOVE.W (A0+0x44c),D1 0002707c e5 49 | I | LSL.W #0x2,D1 0002707e e4 49 | I | LSR.W #0x2,D1 00027080 b2 ae ff fc | | CMP.L (A6-0x4),D1 00027084 62 00 00 c6 |b | BHI 0x2714c 00027088 42 82 |B | CLR.L D2 0002708a 14 28 04 4e | ( N | MOVE.B (A0+0x44e),D2 0002708e 0c 42 00 ff | B | CMPI.W #0x00ff,D2 00027092 66 08 |f | BNE 0x2709c 00027094 3e 39 00 01 00 0c |>9 | MOVE.W 0x1000c,D7 0002709a 60 16 |` | BRA 0x270b2 0002709c 42 83 |B | CLR.L D3 0002709e 16 28 04 4f | ( O | MOVE.B (A0+0x44f),D3 000270a2 0c 43 00 ff | C | CMPI.W #0x00ff,D3 000270a6 66 08 |f | BNE 0x270b0 000270a8 3e 39 00 01 00 0a |>9 | MOVE.W 0x1000a,D7 000270ae 60 02 |` | BRA 0x270b2 000270b0 7e 01 |~ | MOVEQ.L #0x01,D7 000270b2 28 01 |( | MOVE.L D1,D4 000270b4 42 83 |B | CLR.L D3 000270b6 36 39 00 01 00 0c |69 | MOVE.W 0x1000c,D3 000270bc 4e b9 00 01 02 90 |N | JSR ?mulu_d3_d4 000270c2 0c 84 00 00 ff ff | | CMPI.L #0x0000ffff,D4 000270c8 63 02 |c | BLS 0x270cc 000270ca 4e 4f |NO | TRAP #15 000270cc 3c 04 |< | MOVE.W D4,D6 000270ce 0c 42 00 ff | B | CMPI.W #0x00ff,D2 000270d2 67 3a |g: | BEQ 0x2710e 000270d4 c4 f9 00 01 00 0a | | MULU.W 0x1000a,D2 000270da 42 81 |B | CLR.L D1 000270dc 32 06 |2 | MOVE.W D6,D1 000270de d4 81 | | ADD.L D1,D2 000270e0 0c 82 00 00 ff ff | | CMPI.L #0x0000ffff,D2 000270e6 63 02 |c | BLS 0x270ea 000270e8 4e 4f |NO | TRAP #15 000270ea 3c 02 |< | MOVE.W D2,D6 000270ec 42 81 |B | CLR.L D1 000270ee 12 28 04 4f | ( O | MOVE.B (A0+0x44f),D1 000270f2 0c 41 00 ff | A | CMPI.W #0x00ff,D1 000270f6 67 16 |g | BEQ 0x2710e 000270f8 e2 41 | A | ASR.W #0x1,D1 000270fa 42 82 |B | CLR.L D2 000270fc 34 06 |4 | MOVE.W D6,D2 000270fe 48 c1 |H | EXTW.L D1 00027100 d2 82 | | ADD.L D2,D1 00027102 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 00027108 63 02 |c | BLS 0x2710c 0002710a 4e 4f |NO | TRAP #15 0002710c 3c 01 |< | MOVE.W D1,D6 0002710e 4a 46 |JF | TST.W D6 00027110 67 3a |g: | BEQ 0x2714c 00027112 42 80 |B | CLR.L D0 00027114 30 06 |0 | MOVE.W D6,D0 00027116 20 4c | L | MOVEA.L A4,A0 00027118 22 00 |" | MOVE.L D0,D1 0002711a e6 99 | | ROR.L #0x3,D1 0002711c d0 c1 | | ADDA.W D1,A0 0002711e 48 41 |HA | SWAP.W D1 00027120 e7 59 | Y | ROL.W #0x3,D1 00027122 34 3c ff 7f |4< | MOVE.W #0xff7f,D2 00027126 e2 7a | z | ROR.W D1,D2 00027128 c5 10 | | AND.B D2,(A0) 0002712a 52 80 |R | ADDQ.L #0x1,D0 0002712c 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00027132 63 02 |c | BLS 0x27136 00027134 4e 4f |NO | TRAP #15 00027136 3c 00 |< | MOVE.W D0,D6 00027138 42 80 |B | CLR.L D0 0002713a 30 07 |0 | MOVE.W D7,D0 0002713c 53 80 |S | SUBQ.L #0x1,D0 0002713e 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00027144 63 02 |c | BLS 0x27148 00027146 4e 4f |NO | TRAP #15 00027148 3e 00 |> | MOVE.W D0,D7 0002714a 66 c6 |f | BNE 0x27112 0002714c 20 17 | | MOVE.L (A7),D0 0002714e 52 80 |R | ADDQ.L #0x1,D0 00027150 0c 80 00 00 07 ff | | CMPI.L #0x000007ff,D0 00027156 6e 06 |n | BGT 0x2715e 00027158 58 4f |XO | ADDQ.L #0x4,A7 0002715a 60 00 ff 00 |` | BRA 0x2705c 0002715e 58 4f |XO | ADDQ.L #0x4,A7 00027160 41 fa a3 de |A | LEA.L 0x21540,A0 00027164 70 08 |p | MOVEQ.L #0x08,D0 00027166 3f 20 |? | MOVE.W -(A0),-(A7) 00027168 51 c8 ff fc |Q | DBF D0,0x27166 0002716c 59 4f |YO | SUBQ.L #0x4,A7 0002716e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00027172 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00027176 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 0002717a 4e 93 |N | JSR (A3) 0002717c 50 4f |PO | ADDQ.L #0x8,A7 0002717e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00027184 de fc 00 16 | | ADDA.W #0x16,A7 00027188 42 12 |B | CLR.B (A2) 0002718a 7c 00 || | MOVEQ.L #0x00,D6 0002718c 7e 00 |~ | MOVEQ.L #0x00,D7 0002718e 3a 3c ff ff |:< | MOVE.W #0xffff,D5 00027192 42 80 |B | CLR.L D0 00027194 30 05 |0 | MOVE.W D5,D0 00027196 20 4c | L | MOVEA.L A4,A0 00027198 e6 98 | | ROR.L #0x3,D0 0002719a d0 c0 | | ADDA.W D0,A0 0002719c 48 40 |H@ | SWAP.W D0 0002719e e7 58 | X | ROL.W #0x3,D0 000271a0 12 10 | | MOVE.B (A0),D1 000271a2 e1 29 | ) | LSL.B D0,D1 000271a4 ee 09 | | LSR.B #0x7,D1 000271a6 67 16 |g | BEQ 0x271be 000271a8 42 80 |B | CLR.L D0 000271aa 30 07 |0 | MOVE.W D7,D0 000271ac 52 80 |R | ADDQ.L #0x1,D0 000271ae 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 000271b4 63 02 |c | BLS 0x271b8 000271b6 4e 4f |NO | TRAP #15 000271b8 3e 00 |> | MOVE.W D0,D7 000271ba 14 bc 00 01 | | MOVE.B #0x01,(A2) 000271be 42 80 |B | CLR.L D0 000271c0 30 05 |0 | MOVE.W D5,D0 000271c2 20 4c | L | MOVEA.L A4,A0 000271c4 22 00 |" | MOVE.L D0,D1 000271c6 e6 99 | | ROR.L #0x3,D1 000271c8 d0 c1 | | ADDA.W D1,A0 000271ca 48 41 |HA | SWAP.W D1 000271cc e7 59 | Y | ROL.W #0x3,D1 000271ce 14 10 | | MOVE.B (A0),D2 000271d0 e3 2a | * | LSL.B D1,D2 000271d2 ee 0a | | LSR.B #0x7,D2 000271d4 66 04 |f | BNE 0x271da 000271d6 4a 12 |J | TST.B (A2) 000271d8 66 06 |f | BNE 0x271e0 000271da 0c 47 40 00 | G@ | CMPI.W #0x4000,D7 000271de 66 7a |fz | BNE 0x2725a 000271e0 3d 46 df e6 |=F | MOVE.W D6,(A6-0x201a) 000271e4 3d 47 df e4 |=G | MOVE.W D7,(A6-0x201c) 000271e8 23 ee df e4 00 01 00 22 |# "| MOVE.L (A6-0x201c),0x10022 000271f0 0c 47 40 00 | G@ | CMPI.W #0x4000,D7 000271f4 66 02 |f | BNE 0x271f8 000271f6 60 0c |` | BRA 0x27204 000271f8 52 80 |R | ADDQ.L #0x1,D0 000271fa 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00027200 63 02 |c | BLS 0x27204 00027202 4e 4f |NO | TRAP #15 00027204 3c 00 |< | MOVE.W D0,D6 00027206 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 0002720a 3f 06 |? | MOVE.W D6,-(A7) 0002720c 48 78 00 01 |Hx | PEA.L 0x1 00027210 41 ee df e4 |A | LEA.L (A6-0x201c),A0 00027214 2f 08 |/ | MOVE.L A0,-(A7) 00027216 48 6e df e9 |Hn | PEA.L (A6-0x2017) 0002721a 4e b9 00 01 03 6c |N l | JSR RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B) 00027220 de fc 00 10 | | ADDA.W #0x10,A7 00027224 4a 2e df e9 |J. | TST.B (A6-0x2017) 00027228 66 2c |f, | BNE 0x27256 0002722a 9e fc 00 38 | 8 | SUBA.W #0x38,A7 0002722e 20 4f | O | MOVEA.L A7,A0 00027230 43 fa a2 ac |C | LEA.L 0x214de,A1 00027234 70 36 |p6 | MOVEQ.L #0x36,D0 00027236 10 d9 | | MOVE.B (A1)+,(A0)+ 00027238 51 c8 ff fc |Q | DBF D0,0x27236 0002723c 59 4f |YO | SUBQ.L #0x4,A7 0002723e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00027242 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00027246 3f 3c 00 37 |?< 7 | MOVE.W #0x37,-(A7) 0002724a 4e 93 |N | JSR (A3) 0002724c 50 4f |PO | ADDQ.L #0x8,A7 0002724e 4e ba b2 d2 |N | JSR 0x22522 00027252 de fc 00 3c | < | ADDA.W #0x3c,A7 00027256 7e 00 |~ | MOVEQ.L #0x00,D7 00027258 42 12 |B | CLR.B (A2) 0002725a 42 80 |B | CLR.L D0 0002725c 30 05 |0 | MOVE.W D5,D0 0002725e 53 80 |S | SUBQ.L #0x1,D0 00027260 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00027266 63 02 |c | BLS 0x2726a 00027268 4e 4f |NO | TRAP #15 0002726a 3a 00 |: | MOVE.W D0,D5 0002726c 66 00 ff 24 |f $ | BNE 0x27192 00027270 33 c6 00 01 00 10 |3 | MOVE.W D6,0x10010 00027276 4e b9 00 01 03 90 |N | JSR WriteFreeList(void) 0002727c 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00027280 4e 5e |N^ | UNLK A6 00027282 4e 75 |Nu | RTS 00027284 ; -------------------------------------------------------------------------------------- 00027284 ; OMSI PASCAL Function 00027284 ; <LVAR -0x005 @ 1(r)> 00027284 ; <LVAR -0x006 @ 1(r)> 00027284 ; <LVAR -0x00a @ 4(r)> 00027284 ; <LVAR -0x00c @ 2(rw)> 00027284 ; -------------------------------------------------------------------------------------- 00027284 4e 56 ff 60 |NV ` | LINK.W A6,#0xff60 00027288 bf d5 | | CMPA.L (A5),A7 0002728a 62 06 |b | BHI 0x27292 0002728c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00027290 4e 76 |Nv | TRAPV 00027292 de fc 00 88 | | ADDA.W #0x88,A7 00027296 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002729a 45 ee ff f6 |E | LEA.L (A6-0xa),A2 0002729e 47 ee ff fa |G | LEA.L (A6-0x6),A3 000272a2 49 f9 00 01 02 c4 |I | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A4 000272a8 74 01 |t | MOVEQ.L #0x01,D2 000272aa 76 07 |v | MOVEQ.L #0x07,D3 000272ac 78 38 |x8 | MOVEQ.L #0x38,D4 000272ae 41 fa a3 26 |A & | LEA.L 0x215d6,A0 000272b2 70 12 |p | MOVEQ.L #0x12,D0 000272b4 3f 20 |? | MOVE.W -(A0),-(A7) 000272b6 51 c8 ff fc |Q | DBF D0,0x272b4 000272ba 59 4f |YO | SUBQ.L #0x4,A7 000272bc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000272c0 3f 02 |? | MOVE.W D2,-(A7) 000272c2 3f 3c 00 26 |?< & | MOVE.W #0x26,-(A7) 000272c6 4e 94 |N | JSR (A4) 000272c8 50 4f |PO | ADDQ.L #0x8,A7 000272ca 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000272d0 de fc 00 2a | * | ADDA.W #0x2a,A7 000272d4 48 52 |HR | PEA.L (A2) 000272d6 48 78 00 4d |Hx M | PEA.L 0x4d 000272da 4e b9 00 01 02 9c |N | JSR Malloc1(length : Long) : Pointer 000272e0 50 4f |PO | ADDQ.L #0x8,A7 000272e2 20 52 | R | MOVEA.L (A2),A0 000272e4 31 7c 01 00 00 20 |1| | MOVE.W #0x100,(A0+0x20) 000272ea 7c 00 || | MOVEQ.L #0x00,D6 000272ec 2f 12 |/ | MOVE.L (A2),-(A7) 000272ee 1f 02 | | MOVE.B D2,-(A7) 000272f0 48 6e ff fb |Hn | PEA.L (A6-0x5) 000272f4 4e b9 00 01 03 78 |N x | JSR FS10378(MOD a : File; b: Byte; VAR c: Bool) 000272fa de fc 00 0a | | ADDA.W #0xa,A7 000272fe 4a 2e ff fb |J. | TST.B (A6-0x5) 00027302 67 30 |g0 | BEQ 0x27334 00027304 48 52 |HR | PEA.L (A2) 00027306 48 78 00 4d |Hx M | PEA.L 0x4d 0002730a 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 00027310 50 4f |PO | ADDQ.L #0x8,A7 00027312 41 fa a2 64 |A d | LEA.L 0x21578,A0 00027316 70 0d |p | MOVEQ.L #0x0d,D0 00027318 2f 20 |/ | MOVE.L -(A0),-(A7) 0002731a 51 c8 ff fc |Q | DBF D0,0x27318 0002731e 59 4f |YO | SUBQ.L #0x4,A7 00027320 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00027324 3f 02 |? | MOVE.W D2,-(A7) 00027326 3f 04 |? | MOVE.W D4,-(A7) 00027328 4e 94 |N | JSR (A4) 0002732a 50 4f |PO | ADDQ.L #0x8,A7 0002732c 4e ba b1 f4 |N | JSR 0x22522 00027330 de fc 00 3c | < | ADDA.W #0x3c,A7 00027334 bc 83 | | CMP.L D3,D6 00027336 63 02 |c | BLS 0x2733a 00027338 4e 4f |NO | TRAP #15 0002733a 20 06 | | MOVE.L D6,D0 0002733c e3 80 | | ASL.L #0x1,D0 0002733e 41 f8 00 00 |A | LEA.L 0x0,A0 00027342 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00027346 d1 fc 00 01 00 12 | | ADDA.L #0x10012,A0 0002734c 22 52 |"R | MOVEA.L (A2),A1 0002734e 30 a9 00 24 |0 $ | MOVE.W (A1+0x24),(A0) 00027352 52 86 |R | ADDQ.L #0x1,D6 00027354 bc 83 | | CMP.L D3,D6 00027356 6f 94 |o | BLE 0x272ec 00027358 48 52 |HR | PEA.L (A2) 0002735a 48 78 00 4d |Hx M | PEA.L 0x4d 0002735e 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 00027364 50 4f |PO | ADDQ.L #0x8,A7 00027366 3d 7c ff ff ff f4 |=| | MOVE.W #0xffff,(A6-0xc) 0002736c 7e 00 |~ | MOVEQ.L #0x00,D7 0002736e 0c 87 00 00 01 ff | | CMPI.L #0x000001ff,D7 00027374 63 02 |c | BLS 0x27378 00027376 4e 4f |NO | TRAP #15 00027378 20 07 | | MOVE.L D7,D0 0002737a e3 80 | | ASL.L #0x1,D0 0002737c 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00027382 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00027386 31 6e ff f4 54 62 |1n Tb | MOVE.W (A6-0xc),(A0+0x5462) 0002738c 52 87 |R | ADDQ.L #0x1,D7 0002738e 0c 87 00 00 01 ff | | CMPI.L #0x000001ff,D7 00027394 6f d8 |o | BLE 0x2736e 00027396 7c 00 || | MOVEQ.L #0x00,D6 00027398 7a 00 |z | MOVEQ.L #0x00,D5 0002739a 55 4f |UO | SUBQ.L #0x2,A7 0002739c 4e b9 00 01 05 f8 |N | JSR Is_machine_type_one() : Bool 000273a2 4a 1f |J | TST.B (A7)+ 000273a4 66 0e |f | BNE 0x273b4 000273a6 55 4f |UO | SUBQ.L #0x2,A7 000273a8 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 000273ae 4a 1f |J | TST.B (A7)+ 000273b0 67 00 00 82 |g | BEQ 0x27434 000273b4 7e 00 |~ | MOVEQ.L #0x00,D7 000273b6 1f 3c 00 0b | < | MOVE.B #0x0b,-(A7) 000273ba 20 05 | | MOVE.L D5,D0 000273bc ef 80 | | ASL.L #0x7,D0 000273be bc 83 | | CMP.L D3,D6 000273c0 63 02 |c | BLS 0x273c4 000273c2 4e 4f |NO | TRAP #15 000273c4 22 06 |" | MOVE.L D6,D1 000273c6 e3 81 | | ASL.L #0x1,D1 000273c8 41 f8 00 00 |A | LEA.L 0x0,A0 000273cc 41 f0 18 00 |A | LEA.L (A0+D1.L),A0 000273d0 d1 fc 00 01 00 12 | | ADDA.L #0x10012,A0 000273d6 42 81 |B | CLR.L D1 000273d8 32 10 |2 | MOVE.W (A0),D1 000273da d0 81 | | ADD.L D1,D0 000273dc d0 87 | | ADD.L D7,D0 000273de 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 000273e4 63 02 |c | BLS 0x273e8 000273e6 4e 4f |NO | TRAP #15 000273e8 3f 00 |? | MOVE.W D0,-(A7) 000273ea 48 78 00 01 |Hx | PEA.L 0x1 000273ee 41 ee ff f4 |A | LEA.L (A6-0xc),A0 000273f2 2f 08 |/ | MOVE.L A0,-(A7) 000273f4 48 53 |HS | PEA.L (A3) 000273f6 4e b9 00 01 03 6c |N l | JSR RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B) 000273fc de fc 00 10 | | ADDA.W #0x10,A7 00027400 4a 13 |J | TST.B (A3) 00027402 66 22 |f" | BNE 0x27426 00027404 41 fa a1 aa |A | LEA.L 0x215b0,A0 00027408 70 0d |p | MOVEQ.L #0x0d,D0 0002740a 2f 20 |/ | MOVE.L -(A0),-(A7) 0002740c 51 c8 ff fc |Q | DBF D0,0x2740a 00027410 59 4f |YO | SUBQ.L #0x4,A7 00027412 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00027416 3f 02 |? | MOVE.W D2,-(A7) 00027418 3f 04 |? | MOVE.W D4,-(A7) 0002741a 4e 94 |N | JSR (A4) 0002741c 50 4f |PO | ADDQ.L #0x8,A7 0002741e 4e ba b1 02 |N | JSR 0x22522 00027422 de fc 00 3c | < | ADDA.W #0x3c,A7 00027426 52 87 |R | ADDQ.L #0x1,D7 00027428 0c 87 00 00 00 7f | | CMPI.L #0x0000007f,D7 0002742e 6f 86 |o | BLE 0x273b6 00027430 60 00 00 fe |` | BRA 0x27530 00027434 55 4f |UO | SUBQ.L #0x2,A7 00027436 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 0002743c 4a 1f |J | TST.B (A7)+ 0002743e 67 00 00 82 |g | BEQ 0x274c2 00027442 7e 00 |~ | MOVEQ.L #0x00,D7 00027444 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00027448 20 05 | | MOVE.L D5,D0 0002744a ef 80 | | ASL.L #0x7,D0 0002744c bc 83 | | CMP.L D3,D6 0002744e 63 02 |c | BLS 0x27452 00027450 4e 4f |NO | TRAP #15 00027452 22 06 |" | MOVE.L D6,D1 00027454 e3 81 | | ASL.L #0x1,D1 00027456 41 f8 00 00 |A | LEA.L 0x0,A0 0002745a 41 f0 18 00 |A | LEA.L (A0+D1.L),A0 0002745e d1 fc 00 01 00 12 | | ADDA.L #0x10012,A0 00027464 42 81 |B | CLR.L D1 00027466 32 10 |2 | MOVE.W (A0),D1 00027468 d0 81 | | ADD.L D1,D0 0002746a d0 87 | | ADD.L D7,D0 0002746c 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00027472 63 02 |c | BLS 0x27476 00027474 4e 4f |NO | TRAP #15 00027476 3f 00 |? | MOVE.W D0,-(A7) 00027478 48 78 00 01 |Hx | PEA.L 0x1 0002747c 41 f9 00 02 eb 34 |A 4 | LEA.L 0x2eb34,A0 00027482 2f 08 |/ | MOVE.L A0,-(A7) 00027484 48 53 |HS | PEA.L (A3) 00027486 4e b9 00 01 03 6c |N l | JSR RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B) 0002748c de fc 00 10 | | ADDA.W #0x10,A7 00027490 4a 13 |J | TST.B (A3) 00027492 66 22 |f" | BNE 0x274b6 00027494 41 fa a1 1a |A | LEA.L 0x215b0,A0 00027498 70 0d |p | MOVEQ.L #0x0d,D0 0002749a 2f 20 |/ | MOVE.L -(A0),-(A7) 0002749c 51 c8 ff fc |Q | DBF D0,0x2749a 000274a0 59 4f |YO | SUBQ.L #0x4,A7 000274a2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000274a6 3f 02 |? | MOVE.W D2,-(A7) 000274a8 3f 04 |? | MOVE.W D4,-(A7) 000274aa 4e 94 |N | JSR (A4) 000274ac 50 4f |PO | ADDQ.L #0x8,A7 000274ae 4e ba b0 72 |N r | JSR 0x22522 000274b2 de fc 00 3c | < | ADDA.W #0x3c,A7 000274b6 52 87 |R | ADDQ.L #0x1,D7 000274b8 0c 87 00 00 00 7f | | CMPI.L #0x0000007f,D7 000274be 6f 84 |o | BLE 0x27444 000274c0 60 6e |`n | BRA 0x27530 000274c2 1f 3c 00 0b | < | MOVE.B #0x0b,-(A7) 000274c6 20 05 | | MOVE.L D5,D0 000274c8 ef 80 | | ASL.L #0x7,D0 000274ca bc 83 | | CMP.L D3,D6 000274cc 63 02 |c | BLS 0x274d0 000274ce 4e 4f |NO | TRAP #15 000274d0 22 06 |" | MOVE.L D6,D1 000274d2 e3 81 | | ASL.L #0x1,D1 000274d4 41 f8 00 00 |A | LEA.L 0x0,A0 000274d8 41 f0 18 00 |A | LEA.L (A0+D1.L),A0 000274dc d1 fc 00 01 00 12 | | ADDA.L #0x10012,A0 000274e2 42 81 |B | CLR.L D1 000274e4 32 10 |2 | MOVE.W (A0),D1 000274e6 d0 81 | | ADD.L D1,D0 000274e8 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 000274ee 63 02 |c | BLS 0x274f2 000274f0 4e 4f |NO | TRAP #15 000274f2 3f 00 |? | MOVE.W D0,-(A7) 000274f4 48 78 00 80 |Hx | PEA.L 0x80 000274f8 41 ee ff f4 |A | LEA.L (A6-0xc),A0 000274fc 2f 08 |/ | MOVE.L A0,-(A7) 000274fe 48 53 |HS | PEA.L (A3) 00027500 4e b9 00 01 03 6c |N l | JSR RW_Sectors(oper : B; lba : Word; cnt : L; ptr : Pointer; VAR status : B) 00027506 de fc 00 10 | | ADDA.W #0x10,A7 0002750a 4a 13 |J | TST.B (A3) 0002750c 66 22 |f" | BNE 0x27530 0002750e 41 fa a0 a0 |A | LEA.L 0x215b0,A0 00027512 70 0d |p | MOVEQ.L #0x0d,D0 00027514 2f 20 |/ | MOVE.L -(A0),-(A7) 00027516 51 c8 ff fc |Q | DBF D0,0x27514 0002751a 59 4f |YO | SUBQ.L #0x4,A7 0002751c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00027520 3f 02 |? | MOVE.W D2,-(A7) 00027522 3f 04 |? | MOVE.W D4,-(A7) 00027524 4e 94 |N | JSR (A4) 00027526 50 4f |PO | ADDQ.L #0x8,A7 00027528 4e ba af f8 |N | JSR 0x22522 0002752c de fc 00 3c | < | ADDA.W #0x3c,A7 00027530 52 85 |R | ADDQ.L #0x1,D5 00027532 ba 82 | | CMP.L D2,D5 00027534 6f 00 fe 64 |o d | BLE 0x2739a 00027538 52 86 |R | ADDQ.L #0x1,D6 0002753a bc 83 | | CMP.L D3,D6 0002753c 6f 00 fe 5a |o Z | BLE 0x27398 00027540 4e b9 00 01 03 90 |N | JSR WriteFreeList(void) 00027546 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 0002754a 4e 5e |N^ | UNLK A6 0002754c 4e 75 |Nu | RTS 0002754e ; -------------------------------------------------------------------------------------- 0002754e ; OMSI PASCAL Function 0002754e ; <LVAR -0x400 @> 0002754e ; <LVAR -0x402 @ 1(rw)> 0002754e ; <LVAR -0x40c @ 1(r)> 0002754e ; <LVAR -0x410 @ 4(r)> 0002754e ; <LVAR -0x414 @ 4(rw)> 0002754e ; -------------------------------------------------------------------------------------- 0002754e 4e 56 fb 6e |NV n | LINK.W A6,#0xfb6e 00027552 bf d5 | | CMPA.L (A5),A7 00027554 62 06 |b | BHI 0x2755c 00027556 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002755a 4e 76 |Nv | TRAPV 0002755c de fc 00 7e | ~ | ADDA.W #0x7e,A7 00027560 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00027564 45 fa ae 88 |E | LEA.L 0x223ee,A2 00027568 47 ee fb fe |G | LEA.L (A6-0x402),A3 0002756c 49 ee fb f0 |I | LEA.L (A6-0x410),A4 00027570 72 01 |r | MOVEQ.L #0x01,D1 00027572 74 0a |t | MOVEQ.L #0x0a,D2 00027574 7a 14 |z | MOVEQ.L #0x14,D5 00027576 41 fa a1 8a |A | LEA.L 0x21702,A0 0002757a 70 0c |p | MOVEQ.L #0x0c,D0 0002757c 3f 20 |? | MOVE.W -(A0),-(A7) 0002757e 51 c8 ff fc |Q | DBF D0,0x2757c 00027582 59 4f |YO | SUBQ.L #0x4,A7 00027584 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00027588 3f 01 |? | MOVE.W D1,-(A7) 0002758a 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 0002758e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00027594 50 4f |PO | ADDQ.L #0x8,A7 00027596 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002759c de fc 00 1e | | ADDA.W #0x1e,A7 000275a0 23 c1 00 02 00 20 |# | MOVE.L D1,0x20020 000275a6 23 c1 00 01 00 26 |# & | MOVE.L D1,0x10026 000275ac 7c 01 || | MOVEQ.L #0x01,D6 000275ae 20 06 | | MOVE.L D6,D0 000275b0 53 80 |S | SUBQ.L #0x1,D0 000275b2 b0 82 | | CMP.L D2,D0 000275b4 63 02 |c | BLS 0x275b8 000275b6 4e 4f |NO | TRAP #15 000275b8 28 00 |( | MOVE.L D0,D4 000275ba 76 1c |v | MOVEQ.L #0x1c,D3 000275bc 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 000275c2 20 4a | J | MOVEA.L A2,A0 000275c4 9e c5 | | SUBA.W D5,A7 000275c6 22 4f |"O | MOVEA.L A7,A1 000275c8 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0 000275cc 70 13 |p | MOVEQ.L #0x13,D0 000275ce 12 d8 | | MOVE.B (A0)+,(A1)+ 000275d0 51 c8 ff fc |Q | DBF D0,0x275ce 000275d4 59 4f |YO | SUBQ.L #0x4,A7 000275d6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000275da 3f 01 |? | MOVE.W D1,-(A7) 000275dc 3f 05 |? | MOVE.W D5,-(A7) 000275de 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000275e4 50 4f |PO | ADDQ.L #0x8,A7 000275e6 2d 5f fb ec |-_ | MOVE.L (A7)+,(A6-0x414) 000275ea de fc 00 0c | | ADDA.W #0xc,A7 000275ee 2e ae fb ec |. | MOVE.L (A6-0x414),(A7) 000275f2 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 000275f8 58 4f |XO | ADDQ.L #0x4,A7 000275fa 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00027600 2e ae fb ec |. | MOVE.L (A6-0x414),(A7) 00027604 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00027608 1f 01 | | MOVE.B D1,-(A7) 0002760a 20 4a | J | MOVEA.L A2,A0 0002760c 42 80 |B | CLR.L D0 0002760e 30 30 48 1a |00H | MOVE.W (A0+D4.L+#0x1a),D0 00027612 44 80 |D | NEG.L D0 00027614 2f 00 |/ | MOVE.L D0,-(A7) 00027616 48 53 |HS | PEA.L (A3) 00027618 48 54 |HT | PEA.L (A4) 0002761a 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00027620 de c5 | | ADDA.W D5,A7 00027622 4a 13 |J | TST.B (A3) 00027624 67 04 |g | BEQ 0x2762a 00027626 60 00 01 50 |` P | BRA 0x27778 0002762a 20 54 | T | MOVEA.L (A4),A0 0002762c 20 06 | | MOVE.L D6,D0 0002762e 53 80 |S | SUBQ.L #0x1,D0 00027630 b0 82 | | CMP.L D2,D0 00027632 63 02 |c | BLS 0x27636 00027634 4e 4f |NO | TRAP #15 00027636 28 00 |( | MOVE.L D0,D4 00027638 76 1c |v | MOVEQ.L #0x1c,D3 0002763a 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00027640 22 4a |"J | MOVEA.L A2,A1 00027642 30 31 48 18 |01H | MOVE.W (A1+D4.L+#0x18),D0 00027646 0c 40 00 62 | @ b | CMPI.W #0x0062,D0 0002764a 66 04 |f | BNE 0x27650 0002764c 42 68 00 24 |Bh $ | CLR.W (A0+0x24) 00027650 83 28 00 3f | ( ? | OR.B D1,(A0+0x3f) 00027654 22 4a |"J | MOVEA.L A2,A1 00027656 10 31 48 16 | 1H | MOVE.B (A1+D4.L+#0x16),D0 0002765a 02 28 00 fb 00 3f | ( ? | ANDI.B #0xfb,(A0+0x3f) 00027660 e5 08 | | LSL.B #0x2,D0 00027662 81 28 00 3f | ( ? | OR.B D0,(A0+0x3f) 00027666 22 4a |"J | MOVEA.L A2,A1 00027668 10 31 48 15 | 1H | MOVE.B (A1+D4.L+#0x15),D0 0002766c 02 28 00 fd 00 3f | ( ? | ANDI.B #0xfd,(A0+0x3f) 00027672 e3 08 | | LSL.B #0x1,D0 00027674 81 28 00 3f | ( ? | OR.B D0,(A0+0x3f) 00027678 20 54 | T | MOVEA.L (A4),A0 0002767a 11 41 00 4c | A L | MOVE.B D1,(A0+0x4c) 0002767e 20 06 | | MOVE.L D6,D0 00027680 53 80 |S | SUBQ.L #0x1,D0 00027682 b0 82 | | CMP.L D2,D0 00027684 63 02 |c | BLS 0x27688 00027686 4e 4f |NO | TRAP #15 00027688 28 00 |( | MOVE.L D0,D4 0002768a 76 1c |v | MOVEQ.L #0x1c,D3 0002768c 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00027692 20 4a | J | MOVEA.L A2,A0 00027694 4a 30 48 14 |J0H | TST.B (A0+D4.L+#0x14) 00027698 67 6a |gj | BEQ 0x27704 0002769a 3f 01 |? | MOVE.W D1,-(A7) 0002769c 20 4a | J | MOVEA.L A2,A0 0002769e 42 80 |B | CLR.L D0 000276a0 30 30 48 18 |00H | MOVE.W (A0+D4.L+#0x18),D0 000276a4 eb 80 | | ASL.L #0x5,D0 000276a6 52 80 |R | ADDQ.L #0x1,D0 000276a8 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 000276ae 63 02 |c | BLS 0x276b2 000276b0 4e 4f |NO | TRAP #15 000276b2 3f 00 |? | MOVE.W D0,-(A7) 000276b4 2f 14 |/ | MOVE.L (A4),-(A7) 000276b6 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7) 000276ba 48 6e fb f4 |Hn | PEA.L (A6-0x40c) 000276be 4e b9 00 01 03 74 |N t | JSR WriteWords(lba : W; offset : W; ptr : L; nwords : W; VAR status : B) 000276c4 de fc 00 0e | | ADDA.W #0xe,A7 000276c8 4a 2e fb f4 |J. | TST.B (A6-0x40c) 000276cc 66 36 |f6 | BNE 0x27704 000276ce 9e fc 00 36 | 6 | SUBA.W #0x36,A7 000276d2 20 4f | O | MOVEA.L A7,A0 000276d4 43 fa 9f 00 |C | LEA.L 0x215d6,A1 000276d8 70 34 |p4 | MOVEQ.L #0x34,D0 000276da 10 d9 | | MOVE.B (A1)+,(A0)+ 000276dc 51 c8 ff fc |Q | DBF D0,0x276da 000276e0 59 4f |YO | SUBQ.L #0x4,A7 000276e2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000276e6 3f 01 |? | MOVE.W D1,-(A7) 000276e8 3f 3c 00 35 |?< 5 | MOVE.W #0x35,-(A7) 000276ec 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000276f2 50 4f |PO | ADDQ.L #0x8,A7 000276f4 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000276fa de fc 00 3a | : | ADDA.W #0x3a,A7 000276fe 16 bc 00 0c | | MOVE.B #0x0c,(A3) 00027702 60 74 |`t | BRA 0x27778 00027704 20 06 | | MOVE.L D6,D0 00027706 53 80 |S | SUBQ.L #0x1,D0 00027708 b0 82 | | CMP.L D2,D0 0002770a 63 02 |c | BLS 0x2770e 0002770c 4e 4f |NO | TRAP #15 0002770e 28 00 |( | MOVE.L D0,D4 00027710 76 1c |v | MOVEQ.L #0x1c,D3 00027712 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00027718 20 4a | J | MOVEA.L A2,A0 0002771a 30 30 48 18 |00H | MOVE.W (A0+D4.L+#0x18),D0 0002771e 0c 40 00 63 | @ c | CMPI.W #0x0063,D0 00027722 66 3e |f> | BNE 0x27762 00027724 7e 00 |~ | MOVEQ.L #0x00,D7 00027726 0c 87 00 00 01 ff | | CMPI.L #0x000001ff,D7 0002772c 63 02 |c | BLS 0x27730 0002772e 4e 4f |NO | TRAP #15 00027730 20 07 | | MOVE.L D7,D0 00027732 e3 80 | | ASL.L #0x1,D0 00027734 41 ee fb ec |A | LEA.L (A6-0x414),A0 00027738 42 70 08 14 |Bp | CLR.W (A0+D0.L+#0x14) 0002773c 52 87 |R | ADDQ.L #0x1,D7 0002773e 0c 87 00 00 01 ff | | CMPI.L #0x000001ff,D7 00027744 6f e0 |o | BLE 0x27726 00027746 2f 14 |/ | MOVE.L (A4),-(A7) 00027748 42 67 |Bg | CLR.W -(A7) 0002774a 42 67 |Bg | CLR.W -(A7) 0002774c 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00027750 1f 01 | | MOVE.B D1,-(A7) 00027752 41 ee fc 00 |A | LEA.L (A6-0x400),A0 00027756 2f 08 |/ | MOVE.L A0,-(A7) 00027758 48 53 |HS | PEA.L (A3) 0002775a 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00027760 de c5 | | ADDA.W D5,A7 00027762 42 27 |B' | CLR.B -(A7) 00027764 1f 01 | | MOVE.B D1,-(A7) 00027766 48 78 00 01 |Hx | PEA.L 0x1 0002776a 48 53 |HS | PEA.L (A3) 0002776c 48 54 |HT | PEA.L (A4) 0002776e 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00027774 de fc 00 10 | | ADDA.W #0x10,A7 00027778 48 6e fb ec |Hn | PEA.L (A6-0x414) 0002777c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00027782 58 4f |XO | ADDQ.L #0x4,A7 00027784 52 86 |R | ADDQ.L #0x1,D6 00027786 20 06 | | MOVE.L D6,D0 00027788 53 80 |S | SUBQ.L #0x1,D0 0002778a 53 80 |S | SUBQ.L #0x1,D0 0002778c b0 82 | | CMP.L D2,D0 0002778e 63 02 |c | BLS 0x27792 00027790 4e 4f |NO | TRAP #15 00027792 28 00 |( | MOVE.L D0,D4 00027794 76 1c |v | MOVEQ.L #0x1c,D3 00027796 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 0002779c 20 4a | J | MOVEA.L A2,A0 0002779e 30 30 48 18 |00H | MOVE.W (A0+D4.L+#0x18),D0 000277a2 0c 40 00 63 | @ c | CMPI.W #0x0063,D0 000277a6 67 06 |g | BEQ 0x277ae 000277a8 4a 13 |J | TST.B (A3) 000277aa 67 00 fe 02 |g | BEQ 0x275ae 000277ae 4a 13 |J | TST.B (A3) 000277b0 67 2e |g. | BEQ 0x277e0 000277b2 9e fc 00 1a | | SUBA.W #0x1a,A7 000277b6 20 4f | O | MOVEA.L A7,A0 000277b8 43 fa 9f 48 |C H | LEA.L 0x21702,A1 000277bc 70 18 |p | MOVEQ.L #0x18,D0 000277be 10 d9 | | MOVE.B (A1)+,(A0)+ 000277c0 51 c8 ff fc |Q | DBF D0,0x277be 000277c4 59 4f |YO | SUBQ.L #0x4,A7 000277c6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000277ca 3f 01 |? | MOVE.W D1,-(A7) 000277cc 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000277d0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000277d6 50 4f |PO | ADDQ.L #0x8,A7 000277d8 4e ba ad 48 |N H | JSR 0x22522 000277dc de fc 00 1e | | ADDA.W #0x1e,A7 000277e0 4e b9 00 01 03 90 |N | JSR WriteFreeList(void) 000277e6 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000277ea 4e 5e |N^ | UNLK A6 000277ec 4e 75 |Nu | RTS 000277ee ; -------------------------------------------------------------------------------------- 000277ee ; OMSI PASCAL Function 000277ee ; <LVAR 0x00c 1(rw)> 000277ee ; <LVAR 0x008 @ 4(r)> 000277ee ; <LVAR -0x004 @ 1(r)> 000277ee ; <LVAR -0x008 @> 000277ee ; -------------------------------------------------------------------------------------- 000277ee 4e 56 ff dc |NV | LINK.W A6,#0xffdc 000277f2 bf d5 | | CMPA.L (A5),A7 000277f4 62 06 |b | BHI 0x277fc 000277f6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000277fa 4e 76 |Nv | TRAPV 000277fc de fc 00 1c | | ADDA.W #0x1c,A7 00027800 48 e7 00 80 |H | MOVEM.L A0,-(A7) 00027804 41 ee ff fc |A | LEA.L (A6-0x4),A0 00027808 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002780c 42 27 |B' | CLR.B -(A7) 0002780e 42 27 |B' | CLR.B -(A7) 00027810 48 78 00 00 |Hx | PEA.L 0x0 00027814 48 50 |HP | PEA.L (A0) 00027816 48 6e ff f8 |Hn | PEA.L (A6-0x8) 0002781a 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00027820 de fc 00 14 | | ADDA.W #0x14,A7 00027824 4a 10 |J | TST.B (A0) 00027826 66 18 |f | BNE 0x27840 00027828 42 27 |B' | CLR.B -(A7) 0002782a 42 27 |B' | CLR.B -(A7) 0002782c 48 78 00 01 |Hx | PEA.L 0x1 00027830 48 50 |HP | PEA.L (A0) 00027832 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00027836 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 0002783c de fc 00 10 | | ADDA.W #0x10,A7 00027840 48 6e 00 08 |Hn | PEA.L (A6+0x8) 00027844 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002784a 58 4f |XO | ADDQ.L #0x4,A7 0002784c 42 2e 00 0c |B. | CLR.B (A6+0xc) 00027850 4a 10 |J | TST.B (A0) 00027852 67 04 |g | BEQ 0x27858 00027854 52 2e 00 0c |R. | ADDQ.B #0x1,(A6+0xc) 00027858 4c df 01 00 |L | MOVEM.L (A7)+,A0 0002785c 4e 5e |N^ | UNLK A6 0002785e 4e 75 |Nu | RTS 00027860 ; -------------------------------------------------------------------------------------- 00027860 ; OMSI PASCAL Function 00027860 ; -------------------------------------------------------------------------------------- 00027860 4e 56 ff 62 |NV b | LINK.W A6,#0xff62 00027864 bf d5 | | CMPA.L (A5),A7 00027866 62 06 |b | BHI 0x2786e 00027868 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002786c 4e 76 |Nv | TRAPV 0002786e de fc 00 9e | | ADDA.W #0x9e,A7 00027872 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00027876 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 0002787c 47 fa 9e e4 |G | LEA.L 0x21762,A3 00027880 72 01 |r | MOVEQ.L #0x01,D1 00027882 74 18 |t | MOVEQ.L #0x18,D2 00027884 76 17 |v | MOVEQ.L #0x17,D3 00027886 78 46 |xF | MOVEQ.L #0x46,D4 00027888 7a 4a |zJ | MOVEQ.L #0x4a,D5 0002788a 7c 12 || | MOVEQ.L #0x12,D6 0002788c 7e 32 |~2 | MOVEQ.L #0x32,D7 0002788e 55 4f |UO | SUBQ.L #0x2,A7 00027890 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00027896 4a 1f |J | TST.B (A7)+ 00027898 66 0e |f | BNE 0x278a8 0002789a 55 4f |UO | SUBQ.L #0x2,A7 0002789c 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 000278a2 4a 1f |J | TST.B (A7)+ 000278a4 67 00 00 8a |g | BEQ 0x27930 000278a8 9e c2 | | SUBA.W D2,A7 000278aa 20 4f | O | MOVEA.L A7,A0 000278ac 22 4b |"K | MOVEA.L A3,A1 000278ae 70 16 |p | MOVEQ.L #0x16,D0 000278b0 10 d9 | | MOVE.B (A1)+,(A0)+ 000278b2 51 c8 ff fc |Q | DBF D0,0x278b0 000278b6 5d 4f |]O | SUBQ.L #0x6,A7 000278b8 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000278bc 3f 01 |? | MOVE.W D1,-(A7) 000278be 3f 03 |? | MOVE.W D3,-(A7) 000278c0 4e 92 |N | JSR (A2) 000278c2 50 4f |PO | ADDQ.L #0x8,A7 000278c4 4e ba ff 28 |N ( | JSR 0x277ee 000278c8 58 4f |XO | ADDQ.L #0x4,A7 000278ca 4a 1f |J | TST.B (A7)+ 000278cc 67 22 |g" | BEQ 0x278f0 000278ce 20 4b | K | MOVEA.L A3,A0 000278d0 70 22 |p" | MOVEQ.L #0x22,D0 000278d2 3f 20 |? | MOVE.W -(A0),-(A7) 000278d4 51 c8 ff fc |Q | DBF D0,0x278d2 000278d8 59 4f |YO | SUBQ.L #0x4,A7 000278da 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000278de 3f 01 |? | MOVE.W D1,-(A7) 000278e0 3f 04 |? | MOVE.W D4,-(A7) 000278e2 4e 92 |N | JSR (A2) 000278e4 50 4f |PO | ADDQ.L #0x8,A7 000278e6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000278ec de c5 | | ADDA.W D5,A7 000278ee 60 3c |`< | BRA 0x2792c 000278f0 9e c2 | | SUBA.W D2,A7 000278f2 20 4f | O | MOVEA.L A7,A0 000278f4 43 fa 9e 84 |C | LEA.L 0x2177a,A1 000278f8 70 16 |p | MOVEQ.L #0x16,D0 000278fa 10 d9 | | MOVE.B (A1)+,(A0)+ 000278fc 51 c8 ff fc |Q | DBF D0,0x278fa 00027900 41 fa 9e a2 |A | LEA.L 0x217a4,A0 00027904 70 08 |p | MOVEQ.L #0x08,D0 00027906 3f 20 |? | MOVE.W -(A0),-(A7) 00027908 51 c8 ff fc |Q | DBF D0,0x27906 0002790c 59 4f |YO | SUBQ.L #0x4,A7 0002790e 48 6f 00 16 |Ho | PEA.L (A7+0x16) 00027912 3f 01 |? | MOVE.W D1,-(A7) 00027914 3f 03 |? | MOVE.W D3,-(A7) 00027916 4e 92 |N | JSR (A2) 00027918 58 4f |XO | ADDQ.L #0x4,A7 0002791a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002791e 3f 01 |? | MOVE.W D1,-(A7) 00027920 3f 06 |? | MOVE.W D6,-(A7) 00027922 4e 92 |N | JSR (A2) 00027924 50 4f |PO | ADDQ.L #0x8,A7 00027926 4e ba ac 9a |N | JSR 0x225c2 0002792a de c7 | | ADDA.W D7,A7 0002792c 60 00 00 88 |` | BRA 0x279b6 00027930 9e c2 | | SUBA.W D2,A7 00027932 20 4f | O | MOVEA.L A7,A0 00027934 43 fa 9e 6e |C n | LEA.L 0x217a4,A1 00027938 70 16 |p | MOVEQ.L #0x16,D0 0002793a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002793c 51 c8 ff fc |Q | DBF D0,0x2793a 00027940 5d 4f |]O | SUBQ.L #0x6,A7 00027942 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00027946 3f 01 |? | MOVE.W D1,-(A7) 00027948 3f 03 |? | MOVE.W D3,-(A7) 0002794a 4e 92 |N | JSR (A2) 0002794c 50 4f |PO | ADDQ.L #0x8,A7 0002794e 4e ba fe 9e |N | JSR 0x277ee 00027952 58 4f |XO | ADDQ.L #0x4,A7 00027954 4a 1f |J | TST.B (A7)+ 00027956 67 22 |g" | BEQ 0x2797a 00027958 20 4b | K | MOVEA.L A3,A0 0002795a 70 22 |p" | MOVEQ.L #0x22,D0 0002795c 3f 20 |? | MOVE.W -(A0),-(A7) 0002795e 51 c8 ff fc |Q | DBF D0,0x2795c 00027962 59 4f |YO | SUBQ.L #0x4,A7 00027964 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00027968 3f 01 |? | MOVE.W D1,-(A7) 0002796a 3f 04 |? | MOVE.W D4,-(A7) 0002796c 4e 92 |N | JSR (A2) 0002796e 50 4f |PO | ADDQ.L #0x8,A7 00027970 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00027976 de c5 | | ADDA.W D5,A7 00027978 60 3c |`< | BRA 0x279b6 0002797a 9e c2 | | SUBA.W D2,A7 0002797c 20 4f | O | MOVEA.L A7,A0 0002797e 43 fa 9e 3c |C < | LEA.L 0x217bc,A1 00027982 70 16 |p | MOVEQ.L #0x16,D0 00027984 10 d9 | | MOVE.B (A1)+,(A0)+ 00027986 51 c8 ff fc |Q | DBF D0,0x27984 0002798a 41 fa 9e 5a |A Z | LEA.L 0x217e6,A0 0002798e 70 08 |p | MOVEQ.L #0x08,D0 00027990 3f 20 |? | MOVE.W -(A0),-(A7) 00027992 51 c8 ff fc |Q | DBF D0,0x27990 00027996 59 4f |YO | SUBQ.L #0x4,A7 00027998 48 6f 00 16 |Ho | PEA.L (A7+0x16) 0002799c 3f 01 |? | MOVE.W D1,-(A7) 0002799e 3f 03 |? | MOVE.W D3,-(A7) 000279a0 4e 92 |N | JSR (A2) 000279a2 58 4f |XO | ADDQ.L #0x4,A7 000279a4 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000279a8 3f 01 |? | MOVE.W D1,-(A7) 000279aa 3f 06 |? | MOVE.W D6,-(A7) 000279ac 4e 92 |N | JSR (A2) 000279ae 50 4f |PO | ADDQ.L #0x8,A7 000279b0 4e ba ac 10 |N | JSR 0x225c2 000279b4 de c7 | | ADDA.W D7,A7 000279b6 de c2 | | ADDA.W D2,A7 000279b8 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 000279bc 4e 5e |N^ | UNLK A6 000279be 4e 75 |Nu | RTS 000279c0 ; -------------------------------------------------------------------------------------- 000279c0 ; OMSI PASCAL Function 000279c0 ; -------------------------------------------------------------------------------------- 000279c0 4e 56 ff 38 |NV 8 | LINK.W A6,#0xff38 000279c4 bf d5 | | CMPA.L (A5),A7 000279c6 62 06 |b | BHI 0x279ce 000279c8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000279cc 4e 76 |Nv | TRAPV 000279ce de fc 00 c8 | | ADDA.W #0xc8,A7 000279d2 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000279d6 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 000279dc 47 fa fe 10 |G | LEA.L 0x277ee,A3 000279e0 49 fa ab e0 |I | LEA.L 0x225c2,A4 000279e4 72 01 |r | MOVEQ.L #0x01,D1 000279e6 74 13 |t | MOVEQ.L #0x13,D2 000279e8 76 14 |v | MOVEQ.L #0x14,D3 000279ea 78 0e |x | MOVEQ.L #0x0e,D4 000279ec 7a 0d |z | MOVEQ.L #0x0d,D5 000279ee 7c 16 || | MOVEQ.L #0x16,D6 000279f0 7e 12 |~ | MOVEQ.L #0x12,D7 000279f2 55 4f |UO | SUBQ.L #0x2,A7 000279f4 4e b9 00 01 05 f8 |N | JSR Is_machine_type_one() : Bool 000279fa 4a 1f |J | TST.B (A7)+ 000279fc 67 00 01 64 |g d | BEQ 0x27b62 00027a00 9e c3 | | SUBA.W D3,A7 00027a02 20 4f | O | MOVEA.L A7,A0 00027a04 43 fa 9e 28 |C ( | LEA.L 0x2182e,A1 00027a08 70 12 |p | MOVEQ.L #0x12,D0 00027a0a 10 d9 | | MOVE.B (A1)+,(A0)+ 00027a0c 51 c8 ff fc |Q | DBF D0,0x27a0a 00027a10 9e c3 | | SUBA.W D3,A7 00027a12 20 4f | O | MOVEA.L A7,A0 00027a14 43 fa 9e 2c |C , | LEA.L 0x21842,A1 00027a18 70 12 |p | MOVEQ.L #0x12,D0 00027a1a 10 d9 | | MOVE.B (A1)+,(A0)+ 00027a1c 51 c8 ff fc |Q | DBF D0,0x27a1a 00027a20 9e c3 | | SUBA.W D3,A7 00027a22 20 4f | O | MOVEA.L A7,A0 00027a24 43 fa 9e 30 |C 0 | LEA.L 0x21856,A1 00027a28 70 12 |p | MOVEQ.L #0x12,D0 00027a2a 10 d9 | | MOVE.B (A1)+,(A0)+ 00027a2c 51 c8 ff fc |Q | DBF D0,0x27a2a 00027a30 5d 4f |]O | SUBQ.L #0x6,A7 00027a32 48 6f 00 2e |Ho . | PEA.L (A7+0x2e) 00027a36 3f 01 |? | MOVE.W D1,-(A7) 00027a38 3f 02 |? | MOVE.W D2,-(A7) 00027a3a 4e 92 |N | JSR (A2) 00027a3c 50 4f |PO | ADDQ.L #0x8,A7 00027a3e 4e 93 |N | JSR (A3) 00027a40 58 4f |XO | ADDQ.L #0x4,A7 00027a42 4a 1f |J | TST.B (A7)+ 00027a44 66 2c |f, | BNE 0x27a72 00027a46 5d 4f |]O | SUBQ.L #0x6,A7 00027a48 48 6f 00 1a |Ho | PEA.L (A7+0x1a) 00027a4c 3f 01 |? | MOVE.W D1,-(A7) 00027a4e 3f 02 |? | MOVE.W D2,-(A7) 00027a50 4e 92 |N | JSR (A2) 00027a52 50 4f |PO | ADDQ.L #0x8,A7 00027a54 4e 93 |N | JSR (A3) 00027a56 58 4f |XO | ADDQ.L #0x4,A7 00027a58 4a 1f |J | TST.B (A7)+ 00027a5a 66 16 |f | BNE 0x27a72 00027a5c 5d 4f |]O | SUBQ.L #0x6,A7 00027a5e 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00027a62 3f 01 |? | MOVE.W D1,-(A7) 00027a64 3f 02 |? | MOVE.W D2,-(A7) 00027a66 4e 92 |N | JSR (A2) 00027a68 50 4f |PO | ADDQ.L #0x8,A7 00027a6a 4e 93 |N | JSR (A3) 00027a6c 58 4f |XO | ADDQ.L #0x4,A7 00027a6e 4a 1f |J | TST.B (A7)+ 00027a70 67 30 |g0 | BEQ 0x27aa2 00027a72 9e fc 00 48 | H | SUBA.W #0x48,A7 00027a76 20 4f | O | MOVEA.L A7,A0 00027a78 43 fa 9d 6c |C l | LEA.L 0x217e6,A1 00027a7c 70 46 |pF | MOVEQ.L #0x46,D0 00027a7e 10 d9 | | MOVE.B (A1)+,(A0)+ 00027a80 51 c8 ff fc |Q | DBF D0,0x27a7e 00027a84 59 4f |YO | SUBQ.L #0x4,A7 00027a86 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00027a8a 3f 01 |? | MOVE.W D1,-(A7) 00027a8c 3f 3c 00 47 |?< G | MOVE.W #0x47,-(A7) 00027a90 4e 92 |N | JSR (A2) 00027a92 50 4f |PO | ADDQ.L #0x8,A7 00027a94 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00027a9a de fc 00 4c | L | ADDA.W #0x4c,A7 00027a9e 60 00 00 ba |` | BRA 0x27b5a 00027aa2 9e c3 | | SUBA.W D3,A7 00027aa4 20 4f | O | MOVEA.L A7,A0 00027aa6 43 fa 9d c2 |C | LEA.L 0x2186a,A1 00027aaa 70 12 |p | MOVEQ.L #0x12,D0 00027aac 10 d9 | | MOVE.B (A1)+,(A0)+ 00027aae 51 c8 ff fc |Q | DBF D0,0x27aac 00027ab2 9e c4 | | SUBA.W D4,A7 00027ab4 20 4f | O | MOVEA.L A7,A0 00027ab6 43 fa 9d c6 |C | LEA.L 0x2187e,A1 00027aba 70 0c |p | MOVEQ.L #0x0c,D0 00027abc 10 d9 | | MOVE.B (A1)+,(A0)+ 00027abe 51 c8 ff fc |Q | DBF D0,0x27abc 00027ac2 59 4f |YO | SUBQ.L #0x4,A7 00027ac4 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00027ac8 3f 01 |? | MOVE.W D1,-(A7) 00027aca 3f 02 |? | MOVE.W D2,-(A7) 00027acc 4e 92 |N | JSR (A2) 00027ace 58 4f |XO | ADDQ.L #0x4,A7 00027ad0 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00027ad4 3f 01 |? | MOVE.W D1,-(A7) 00027ad6 3f 05 |? | MOVE.W D5,-(A7) 00027ad8 4e 92 |N | JSR (A2) 00027ada 50 4f |PO | ADDQ.L #0x8,A7 00027adc 4e 94 |N | JSR (A4) 00027ade de c6 | | ADDA.W D6,A7 00027ae0 20 4f | O | MOVEA.L A7,A0 00027ae2 43 fa 9d a8 |C | LEA.L 0x2188c,A1 00027ae6 70 12 |p | MOVEQ.L #0x12,D0 00027ae8 10 d9 | | MOVE.B (A1)+,(A0)+ 00027aea 51 c8 ff fc |Q | DBF D0,0x27ae8 00027aee 9e c4 | | SUBA.W D4,A7 00027af0 20 4f | O | MOVEA.L A7,A0 00027af2 43 fa 9d ac |C | LEA.L 0x218a0,A1 00027af6 70 0c |p | MOVEQ.L #0x0c,D0 00027af8 10 d9 | | MOVE.B (A1)+,(A0)+ 00027afa 51 c8 ff fc |Q | DBF D0,0x27af8 00027afe 59 4f |YO | SUBQ.L #0x4,A7 00027b00 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00027b04 3f 01 |? | MOVE.W D1,-(A7) 00027b06 3f 02 |? | MOVE.W D2,-(A7) 00027b08 4e 92 |N | JSR (A2) 00027b0a 58 4f |XO | ADDQ.L #0x4,A7 00027b0c 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00027b10 3f 01 |? | MOVE.W D1,-(A7) 00027b12 3f 05 |? | MOVE.W D5,-(A7) 00027b14 4e 92 |N | JSR (A2) 00027b16 50 4f |PO | ADDQ.L #0x8,A7 00027b18 4e 94 |N | JSR (A4) 00027b1a de c6 | | ADDA.W D6,A7 00027b1c 20 4f | O | MOVEA.L A7,A0 00027b1e 43 fa 9d 8e |C | LEA.L 0x218ae,A1 00027b22 70 12 |p | MOVEQ.L #0x12,D0 00027b24 10 d9 | | MOVE.B (A1)+,(A0)+ 00027b26 51 c8 ff fc |Q | DBF D0,0x27b24 00027b2a 9e c4 | | SUBA.W D4,A7 00027b2c 20 4f | O | MOVEA.L A7,A0 00027b2e 43 fa 9d 92 |C | LEA.L 0x218c2,A1 00027b32 70 0c |p | MOVEQ.L #0x0c,D0 00027b34 10 d9 | | MOVE.B (A1)+,(A0)+ 00027b36 51 c8 ff fc |Q | DBF D0,0x27b34 00027b3a 59 4f |YO | SUBQ.L #0x4,A7 00027b3c 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00027b40 3f 01 |? | MOVE.W D1,-(A7) 00027b42 3f 02 |? | MOVE.W D2,-(A7) 00027b44 4e 92 |N | JSR (A2) 00027b46 58 4f |XO | ADDQ.L #0x4,A7 00027b48 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00027b4c 3f 01 |? | MOVE.W D1,-(A7) 00027b4e 3f 05 |? | MOVE.W D5,-(A7) 00027b50 4e 92 |N | JSR (A2) 00027b52 50 4f |PO | ADDQ.L #0x8,A7 00027b54 4e 94 |N | JSR (A4) 00027b56 de fc 00 2a | * | ADDA.W #0x2a,A7 00027b5a de fc 00 3c | < | ADDA.W #0x3c,A7 00027b5e 60 00 05 94 |` | BRA 0x280f4 00027b62 55 4f |UO | SUBQ.L #0x2,A7 00027b64 4e b9 00 01 05 fe |N | JSR Is_machine_type_two() : Bool 00027b6a 4a 1f |J | TST.B (A7)+ 00027b6c 67 00 01 60 |g ` | BEQ 0x27cce 00027b70 9e c3 | | SUBA.W D3,A7 00027b72 20 4f | O | MOVEA.L A7,A0 00027b74 43 fa 9d 5a |C Z | LEA.L 0x218d0,A1 00027b78 70 12 |p | MOVEQ.L #0x12,D0 00027b7a 10 d9 | | MOVE.B (A1)+,(A0)+ 00027b7c 51 c8 ff fc |Q | DBF D0,0x27b7a 00027b80 9e c3 | | SUBA.W D3,A7 00027b82 20 4f | O | MOVEA.L A7,A0 00027b84 43 fa 9d 5e |C ^ | LEA.L 0x218e4,A1 00027b88 70 12 |p | MOVEQ.L #0x12,D0 00027b8a 10 d9 | | MOVE.B (A1)+,(A0)+ 00027b8c 51 c8 ff fc |Q | DBF D0,0x27b8a 00027b90 9e c3 | | SUBA.W D3,A7 00027b92 20 4f | O | MOVEA.L A7,A0 00027b94 43 fa 9d 62 |C b | LEA.L 0x218f8,A1 00027b98 70 12 |p | MOVEQ.L #0x12,D0 00027b9a 10 d9 | | MOVE.B (A1)+,(A0)+ 00027b9c 51 c8 ff fc |Q | DBF D0,0x27b9a 00027ba0 5d 4f |]O | SUBQ.L #0x6,A7 00027ba2 48 6f 00 2e |Ho . | PEA.L (A7+0x2e) 00027ba6 3f 01 |? | MOVE.W D1,-(A7) 00027ba8 3f 02 |? | MOVE.W D2,-(A7) 00027baa 4e 92 |N | JSR (A2) 00027bac 50 4f |PO | ADDQ.L #0x8,A7 00027bae 4e 93 |N | JSR (A3) 00027bb0 58 4f |XO | ADDQ.L #0x4,A7 00027bb2 4a 1f |J | TST.B (A7)+ 00027bb4 66 2c |f, | BNE 0x27be2 00027bb6 5d 4f |]O | SUBQ.L #0x6,A7 00027bb8 48 6f 00 1a |Ho | PEA.L (A7+0x1a) 00027bbc 3f 01 |? | MOVE.W D1,-(A7) 00027bbe 3f 02 |? | MOVE.W D2,-(A7) 00027bc0 4e 92 |N | JSR (A2) 00027bc2 50 4f |PO | ADDQ.L #0x8,A7 00027bc4 4e 93 |N | JSR (A3) 00027bc6 58 4f |XO | ADDQ.L #0x4,A7 00027bc8 4a 1f |J | TST.B (A7)+ 00027bca 66 16 |f | BNE 0x27be2 00027bcc 5d 4f |]O | SUBQ.L #0x6,A7 00027bce 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00027bd2 3f 01 |? | MOVE.W D1,-(A7) 00027bd4 3f 02 |? | MOVE.W D2,-(A7) 00027bd6 4e 92 |N | JSR (A2) 00027bd8 50 4f |PO | ADDQ.L #0x8,A7 00027bda 4e 93 |N | JSR (A3) 00027bdc 58 4f |XO | ADDQ.L #0x4,A7 00027bde 4a 1f |J | TST.B (A7)+ 00027be0 67 30 |g0 | BEQ 0x27c12 00027be2 9e fc 00 48 | H | SUBA.W #0x48,A7 00027be6 20 4f | O | MOVEA.L A7,A0 00027be8 43 fa 9b fc |C | LEA.L 0x217e6,A1 00027bec 70 46 |pF | MOVEQ.L #0x46,D0 00027bee 10 d9 | | MOVE.B (A1)+,(A0)+ 00027bf0 51 c8 ff fc |Q | DBF D0,0x27bee 00027bf4 59 4f |YO | SUBQ.L #0x4,A7 00027bf6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00027bfa 3f 01 |? | MOVE.W D1,-(A7) 00027bfc 3f 3c 00 47 |?< G | MOVE.W #0x47,-(A7) 00027c00 4e 92 |N | JSR (A2) 00027c02 50 4f |PO | ADDQ.L #0x8,A7 00027c04 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00027c0a de fc 00 4c | L | ADDA.W #0x4c,A7 00027c0e 60 00 00 ba |` | BRA 0x27cca 00027c12 9e c3 | | SUBA.W D3,A7 00027c14 20 4f | O | MOVEA.L A7,A0 00027c16 43 fa 9c f4 |C | LEA.L 0x2190c,A1 00027c1a 70 12 |p | MOVEQ.L #0x12,D0 00027c1c 10 d9 | | MOVE.B (A1)+,(A0)+ 00027c1e 51 c8 ff fc |Q | DBF D0,0x27c1c 00027c22 9e c4 | | SUBA.W D4,A7 00027c24 20 4f | O | MOVEA.L A7,A0 00027c26 43 fa 9c f8 |C | LEA.L 0x21920,A1 00027c2a 70 0c |p | MOVEQ.L #0x0c,D0 00027c2c 10 d9 | | MOVE.B (A1)+,(A0)+ 00027c2e 51 c8 ff fc |Q | DBF D0,0x27c2c 00027c32 59 4f |YO | SUBQ.L #0x4,A7 00027c34 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00027c38 3f 01 |? | MOVE.W D1,-(A7) 00027c3a 3f 02 |? | MOVE.W D2,-(A7) 00027c3c 4e 92 |N | JSR (A2) 00027c3e 58 4f |XO | ADDQ.L #0x4,A7 00027c40 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00027c44 3f 01 |? | MOVE.W D1,-(A7) 00027c46 3f 05 |? | MOVE.W D5,-(A7) 00027c48 4e 92 |N | JSR (A2) 00027c4a 50 4f |PO | ADDQ.L #0x8,A7 00027c4c 4e 94 |N | JSR (A4) 00027c4e de c6 | | ADDA.W D6,A7 00027c50 20 4f | O | MOVEA.L A7,A0 00027c52 43 fa 9c da |C | LEA.L 0x2192e,A1 00027c56 70 12 |p | MOVEQ.L #0x12,D0 00027c58 10 d9 | | MOVE.B (A1)+,(A0)+ 00027c5a 51 c8 ff fc |Q | DBF D0,0x27c58 00027c5e 9e c4 | | SUBA.W D4,A7 00027c60 20 4f | O | MOVEA.L A7,A0 00027c62 43 fa 9c de |C | LEA.L 0x21942,A1 00027c66 70 0c |p | MOVEQ.L #0x0c,D0 00027c68 10 d9 | | MOVE.B (A1)+,(A0)+ 00027c6a 51 c8 ff fc |Q | DBF D0,0x27c68 00027c6e 59 4f |YO | SUBQ.L #0x4,A7 00027c70 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00027c74 3f 01 |? | MOVE.W D1,-(A7) 00027c76 3f 02 |? | MOVE.W D2,-(A7) 00027c78 4e 92 |N | JSR (A2) 00027c7a 58 4f |XO | ADDQ.L #0x4,A7 00027c7c 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00027c80 3f 01 |? | MOVE.W D1,-(A7) 00027c82 3f 05 |? | MOVE.W D5,-(A7) 00027c84 4e 92 |N | JSR (A2) 00027c86 50 4f |PO | ADDQ.L #0x8,A7 00027c88 4e 94 |N | JSR (A4) 00027c8a de c6 | | ADDA.W D6,A7 00027c8c 20 4f | O | MOVEA.L A7,A0 00027c8e 43 fa 9c c0 |C | LEA.L 0x21950,A1 00027c92 70 12 |p | MOVEQ.L #0x12,D0 00027c94 10 d9 | | MOVE.B (A1)+,(A0)+ 00027c96 51 c8 ff fc |Q | DBF D0,0x27c94 00027c9a 9e c4 | | SUBA.W D4,A7 00027c9c 20 4f | O | MOVEA.L A7,A0 00027c9e 43 fa 9c c4 |C | LEA.L 0x21964,A1 00027ca2 70 0c |p | MOVEQ.L #0x0c,D0 00027ca4 10 d9 | | MOVE.B (A1)+,(A0)+ 00027ca6 51 c8 ff fc |Q | DBF D0,0x27ca4 00027caa 59 4f |YO | SUBQ.L #0x4,A7 00027cac 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00027cb0 3f 01 |? | MOVE.W D1,-(A7) 00027cb2 3f 02 |? | MOVE.W D2,-(A7) 00027cb4 4e 92 |N | JSR (A2) 00027cb6 58 4f |XO | ADDQ.L #0x4,A7 00027cb8 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00027cbc 3f 01 |? | MOVE.W D1,-(A7) 00027cbe 3f 05 |? | MOVE.W D5,-(A7) 00027cc0 4e 92 |N | JSR (A2) 00027cc2 50 4f |PO | ADDQ.L #0x8,A7 00027cc4 4e 94 |N | JSR (A4) 00027cc6 de fc 00 2a | * | ADDA.W #0x2a,A7 00027cca 60 00 fe 8e |` | BRA 0x27b5a 00027cce 55 4f |UO | SUBQ.L #0x2,A7 00027cd0 4e b9 00 01 06 04 |N | JSR Is_machine_type_three() : Bool 00027cd6 4a 1f |J | TST.B (A7)+ 00027cd8 67 00 01 60 |g ` | BEQ 0x27e3a 00027cdc 9e c3 | | SUBA.W D3,A7 00027cde 20 4f | O | MOVEA.L A7,A0 00027ce0 43 fa 9c 90 |C | LEA.L 0x21972,A1 00027ce4 70 12 |p | MOVEQ.L #0x12,D0 00027ce6 10 d9 | | MOVE.B (A1)+,(A0)+ 00027ce8 51 c8 ff fc |Q | DBF D0,0x27ce6 00027cec 9e c3 | | SUBA.W D3,A7 00027cee 20 4f | O | MOVEA.L A7,A0 00027cf0 43 fa 9c 94 |C | LEA.L 0x21986,A1 00027cf4 70 12 |p | MOVEQ.L #0x12,D0 00027cf6 10 d9 | | MOVE.B (A1)+,(A0)+ 00027cf8 51 c8 ff fc |Q | DBF D0,0x27cf6 00027cfc 9e c3 | | SUBA.W D3,A7 00027cfe 20 4f | O | MOVEA.L A7,A0 00027d00 43 fa 9c 98 |C | LEA.L 0x2199a,A1 00027d04 70 12 |p | MOVEQ.L #0x12,D0 00027d06 10 d9 | | MOVE.B (A1)+,(A0)+ 00027d08 51 c8 ff fc |Q | DBF D0,0x27d06 00027d0c 5d 4f |]O | SUBQ.L #0x6,A7 00027d0e 48 6f 00 2e |Ho . | PEA.L (A7+0x2e) 00027d12 3f 01 |? | MOVE.W D1,-(A7) 00027d14 3f 02 |? | MOVE.W D2,-(A7) 00027d16 4e 92 |N | JSR (A2) 00027d18 50 4f |PO | ADDQ.L #0x8,A7 00027d1a 4e 93 |N | JSR (A3) 00027d1c 58 4f |XO | ADDQ.L #0x4,A7 00027d1e 4a 1f |J | TST.B (A7)+ 00027d20 66 2c |f, | BNE 0x27d4e 00027d22 5d 4f |]O | SUBQ.L #0x6,A7 00027d24 48 6f 00 1a |Ho | PEA.L (A7+0x1a) 00027d28 3f 01 |? | MOVE.W D1,-(A7) 00027d2a 3f 02 |? | MOVE.W D2,-(A7) 00027d2c 4e 92 |N | JSR (A2) 00027d2e 50 4f |PO | ADDQ.L #0x8,A7 00027d30 4e 93 |N | JSR (A3) 00027d32 58 4f |XO | ADDQ.L #0x4,A7 00027d34 4a 1f |J | TST.B (A7)+ 00027d36 66 16 |f | BNE 0x27d4e 00027d38 5d 4f |]O | SUBQ.L #0x6,A7 00027d3a 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00027d3e 3f 01 |? | MOVE.W D1,-(A7) 00027d40 3f 02 |? | MOVE.W D2,-(A7) 00027d42 4e 92 |N | JSR (A2) 00027d44 50 4f |PO | ADDQ.L #0x8,A7 00027d46 4e 93 |N | JSR (A3) 00027d48 58 4f |XO | ADDQ.L #0x4,A7 00027d4a 4a 1f |J | TST.B (A7)+ 00027d4c 67 30 |g0 | BEQ 0x27d7e 00027d4e 9e fc 00 48 | H | SUBA.W #0x48,A7 00027d52 20 4f | O | MOVEA.L A7,A0 00027d54 43 fa 9a 90 |C | LEA.L 0x217e6,A1 00027d58 70 46 |pF | MOVEQ.L #0x46,D0 00027d5a 10 d9 | | MOVE.B (A1)+,(A0)+ 00027d5c 51 c8 ff fc |Q | DBF D0,0x27d5a 00027d60 59 4f |YO | SUBQ.L #0x4,A7 00027d62 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00027d66 3f 01 |? | MOVE.W D1,-(A7) 00027d68 3f 3c 00 47 |?< G | MOVE.W #0x47,-(A7) 00027d6c 4e 92 |N | JSR (A2) 00027d6e 50 4f |PO | ADDQ.L #0x8,A7 00027d70 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00027d76 de fc 00 4c | L | ADDA.W #0x4c,A7 00027d7a 60 00 00 ba |` | BRA 0x27e36 00027d7e 9e c3 | | SUBA.W D3,A7 00027d80 20 4f | O | MOVEA.L A7,A0 00027d82 43 fa 9c 2a |C * | LEA.L 0x219ae,A1 00027d86 70 12 |p | MOVEQ.L #0x12,D0 00027d88 10 d9 | | MOVE.B (A1)+,(A0)+ 00027d8a 51 c8 ff fc |Q | DBF D0,0x27d88 00027d8e 9e c4 | | SUBA.W D4,A7 00027d90 20 4f | O | MOVEA.L A7,A0 00027d92 43 fa 9c 2e |C . | LEA.L 0x219c2,A1 00027d96 70 0c |p | MOVEQ.L #0x0c,D0 00027d98 10 d9 | | MOVE.B (A1)+,(A0)+ 00027d9a 51 c8 ff fc |Q | DBF D0,0x27d98 00027d9e 59 4f |YO | SUBQ.L #0x4,A7 00027da0 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00027da4 3f 01 |? | MOVE.W D1,-(A7) 00027da6 3f 02 |? | MOVE.W D2,-(A7) 00027da8 4e 92 |N | JSR (A2) 00027daa 58 4f |XO | ADDQ.L #0x4,A7 00027dac 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00027db0 3f 01 |? | MOVE.W D1,-(A7) 00027db2 3f 05 |? | MOVE.W D5,-(A7) 00027db4 4e 92 |N | JSR (A2) 00027db6 50 4f |PO | ADDQ.L #0x8,A7 00027db8 4e 94 |N | JSR (A4) 00027dba de c6 | | ADDA.W D6,A7 00027dbc 20 4f | O | MOVEA.L A7,A0 00027dbe 43 fa 9c 10 |C | LEA.L 0x219d0,A1 00027dc2 70 12 |p | MOVEQ.L #0x12,D0 00027dc4 10 d9 | | MOVE.B (A1)+,(A0)+ 00027dc6 51 c8 ff fc |Q | DBF D0,0x27dc4 00027dca 9e c4 | | SUBA.W D4,A7 00027dcc 20 4f | O | MOVEA.L A7,A0 00027dce 43 fa 9c 14 |C | LEA.L 0x219e4,A1 00027dd2 70 0c |p | MOVEQ.L #0x0c,D0 00027dd4 10 d9 | | MOVE.B (A1)+,(A0)+ 00027dd6 51 c8 ff fc |Q | DBF D0,0x27dd4 00027dda 59 4f |YO | SUBQ.L #0x4,A7 00027ddc 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00027de0 3f 01 |? | MOVE.W D1,-(A7) 00027de2 3f 02 |? | MOVE.W D2,-(A7) 00027de4 4e 92 |N | JSR (A2) 00027de6 58 4f |XO | ADDQ.L #0x4,A7 00027de8 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00027dec 3f 01 |? | MOVE.W D1,-(A7) 00027dee 3f 05 |? | MOVE.W D5,-(A7) 00027df0 4e 92 |N | JSR (A2) 00027df2 50 4f |PO | ADDQ.L #0x8,A7 00027df4 4e 94 |N | JSR (A4) 00027df6 de c6 | | ADDA.W D6,A7 00027df8 20 4f | O | MOVEA.L A7,A0 00027dfa 43 fa 9b f6 |C | LEA.L 0x219f2,A1 00027dfe 70 12 |p | MOVEQ.L #0x12,D0 00027e00 10 d9 | | MOVE.B (A1)+,(A0)+ 00027e02 51 c8 ff fc |Q | DBF D0,0x27e00 00027e06 9e c4 | | SUBA.W D4,A7 00027e08 20 4f | O | MOVEA.L A7,A0 00027e0a 43 fa 9b fa |C | LEA.L 0x21a06,A1 00027e0e 70 0c |p | MOVEQ.L #0x0c,D0 00027e10 10 d9 | | MOVE.B (A1)+,(A0)+ 00027e12 51 c8 ff fc |Q | DBF D0,0x27e10 00027e16 59 4f |YO | SUBQ.L #0x4,A7 00027e18 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00027e1c 3f 01 |? | MOVE.W D1,-(A7) 00027e1e 3f 02 |? | MOVE.W D2,-(A7) 00027e20 4e 92 |N | JSR (A2) 00027e22 58 4f |XO | ADDQ.L #0x4,A7 00027e24 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00027e28 3f 01 |? | MOVE.W D1,-(A7) 00027e2a 3f 05 |? | MOVE.W D5,-(A7) 00027e2c 4e 92 |N | JSR (A2) 00027e2e 50 4f |PO | ADDQ.L #0x8,A7 00027e30 4e 94 |N | JSR (A4) 00027e32 de fc 00 2a | * | ADDA.W #0x2a,A7 00027e36 60 00 fd 22 |` " | BRA 0x27b5a 00027e3a 55 4f |UO | SUBQ.L #0x2,A7 00027e3c 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00027e42 4a 1f |J | TST.B (A7)+ 00027e44 67 00 01 60 |g ` | BEQ 0x27fa6 00027e48 9e c3 | | SUBA.W D3,A7 00027e4a 20 4f | O | MOVEA.L A7,A0 00027e4c 43 fa 9b c6 |C | LEA.L 0x21a14,A1 00027e50 70 12 |p | MOVEQ.L #0x12,D0 00027e52 10 d9 | | MOVE.B (A1)+,(A0)+ 00027e54 51 c8 ff fc |Q | DBF D0,0x27e52 00027e58 9e c3 | | SUBA.W D3,A7 00027e5a 20 4f | O | MOVEA.L A7,A0 00027e5c 43 fa 9b ca |C | LEA.L 0x21a28,A1 00027e60 70 12 |p | MOVEQ.L #0x12,D0 00027e62 10 d9 | | MOVE.B (A1)+,(A0)+ 00027e64 51 c8 ff fc |Q | DBF D0,0x27e62 00027e68 9e c3 | | SUBA.W D3,A7 00027e6a 20 4f | O | MOVEA.L A7,A0 00027e6c 43 fa 9b ce |C | LEA.L 0x21a3c,A1 00027e70 70 12 |p | MOVEQ.L #0x12,D0 00027e72 10 d9 | | MOVE.B (A1)+,(A0)+ 00027e74 51 c8 ff fc |Q | DBF D0,0x27e72 00027e78 5d 4f |]O | SUBQ.L #0x6,A7 00027e7a 48 6f 00 2e |Ho . | PEA.L (A7+0x2e) 00027e7e 3f 01 |? | MOVE.W D1,-(A7) 00027e80 3f 02 |? | MOVE.W D2,-(A7) 00027e82 4e 92 |N | JSR (A2) 00027e84 50 4f |PO | ADDQ.L #0x8,A7 00027e86 4e 93 |N | JSR (A3) 00027e88 58 4f |XO | ADDQ.L #0x4,A7 00027e8a 4a 1f |J | TST.B (A7)+ 00027e8c 66 2c |f, | BNE 0x27eba 00027e8e 5d 4f |]O | SUBQ.L #0x6,A7 00027e90 48 6f 00 1a |Ho | PEA.L (A7+0x1a) 00027e94 3f 01 |? | MOVE.W D1,-(A7) 00027e96 3f 02 |? | MOVE.W D2,-(A7) 00027e98 4e 92 |N | JSR (A2) 00027e9a 50 4f |PO | ADDQ.L #0x8,A7 00027e9c 4e 93 |N | JSR (A3) 00027e9e 58 4f |XO | ADDQ.L #0x4,A7 00027ea0 4a 1f |J | TST.B (A7)+ 00027ea2 66 16 |f | BNE 0x27eba 00027ea4 5d 4f |]O | SUBQ.L #0x6,A7 00027ea6 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00027eaa 3f 01 |? | MOVE.W D1,-(A7) 00027eac 3f 02 |? | MOVE.W D2,-(A7) 00027eae 4e 92 |N | JSR (A2) 00027eb0 50 4f |PO | ADDQ.L #0x8,A7 00027eb2 4e 93 |N | JSR (A3) 00027eb4 58 4f |XO | ADDQ.L #0x4,A7 00027eb6 4a 1f |J | TST.B (A7)+ 00027eb8 67 30 |g0 | BEQ 0x27eea 00027eba 9e fc 00 48 | H | SUBA.W #0x48,A7 00027ebe 20 4f | O | MOVEA.L A7,A0 00027ec0 43 fa 99 24 |C $ | LEA.L 0x217e6,A1 00027ec4 70 46 |pF | MOVEQ.L #0x46,D0 00027ec6 10 d9 | | MOVE.B (A1)+,(A0)+ 00027ec8 51 c8 ff fc |Q | DBF D0,0x27ec6 00027ecc 59 4f |YO | SUBQ.L #0x4,A7 00027ece 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00027ed2 3f 01 |? | MOVE.W D1,-(A7) 00027ed4 3f 3c 00 47 |?< G | MOVE.W #0x47,-(A7) 00027ed8 4e 92 |N | JSR (A2) 00027eda 50 4f |PO | ADDQ.L #0x8,A7 00027edc 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00027ee2 de fc 00 4c | L | ADDA.W #0x4c,A7 00027ee6 60 00 00 ba |` | BRA 0x27fa2 00027eea 9e c3 | | SUBA.W D3,A7 00027eec 20 4f | O | MOVEA.L A7,A0 00027eee 43 fa 9b 60 |C ` | LEA.L 0x21a50,A1 00027ef2 70 12 |p | MOVEQ.L #0x12,D0 00027ef4 10 d9 | | MOVE.B (A1)+,(A0)+ 00027ef6 51 c8 ff fc |Q | DBF D0,0x27ef4 00027efa 9e c4 | | SUBA.W D4,A7 00027efc 20 4f | O | MOVEA.L A7,A0 00027efe 43 fa 9b 64 |C d | LEA.L 0x21a64,A1 00027f02 70 0c |p | MOVEQ.L #0x0c,D0 00027f04 10 d9 | | MOVE.B (A1)+,(A0)+ 00027f06 51 c8 ff fc |Q | DBF D0,0x27f04 00027f0a 59 4f |YO | SUBQ.L #0x4,A7 00027f0c 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00027f10 3f 01 |? | MOVE.W D1,-(A7) 00027f12 3f 02 |? | MOVE.W D2,-(A7) 00027f14 4e 92 |N | JSR (A2) 00027f16 58 4f |XO | ADDQ.L #0x4,A7 00027f18 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00027f1c 3f 01 |? | MOVE.W D1,-(A7) 00027f1e 3f 05 |? | MOVE.W D5,-(A7) 00027f20 4e 92 |N | JSR (A2) 00027f22 50 4f |PO | ADDQ.L #0x8,A7 00027f24 4e 94 |N | JSR (A4) 00027f26 de c6 | | ADDA.W D6,A7 00027f28 20 4f | O | MOVEA.L A7,A0 00027f2a 43 fa 9b 46 |C F | LEA.L 0x21a72,A1 00027f2e 70 12 |p | MOVEQ.L #0x12,D0 00027f30 10 d9 | | MOVE.B (A1)+,(A0)+ 00027f32 51 c8 ff fc |Q | DBF D0,0x27f30 00027f36 9e c4 | | SUBA.W D4,A7 00027f38 20 4f | O | MOVEA.L A7,A0 00027f3a 43 fa 9b 4a |C J | LEA.L 0x21a86,A1 00027f3e 70 0c |p | MOVEQ.L #0x0c,D0 00027f40 10 d9 | | MOVE.B (A1)+,(A0)+ 00027f42 51 c8 ff fc |Q | DBF D0,0x27f40 00027f46 59 4f |YO | SUBQ.L #0x4,A7 00027f48 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00027f4c 3f 01 |? | MOVE.W D1,-(A7) 00027f4e 3f 02 |? | MOVE.W D2,-(A7) 00027f50 4e 92 |N | JSR (A2) 00027f52 58 4f |XO | ADDQ.L #0x4,A7 00027f54 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00027f58 3f 01 |? | MOVE.W D1,-(A7) 00027f5a 3f 05 |? | MOVE.W D5,-(A7) 00027f5c 4e 92 |N | JSR (A2) 00027f5e 50 4f |PO | ADDQ.L #0x8,A7 00027f60 4e 94 |N | JSR (A4) 00027f62 de c6 | | ADDA.W D6,A7 00027f64 20 4f | O | MOVEA.L A7,A0 00027f66 43 fa 9b 2c |C , | LEA.L 0x21a94,A1 00027f6a 70 12 |p | MOVEQ.L #0x12,D0 00027f6c 10 d9 | | MOVE.B (A1)+,(A0)+ 00027f6e 51 c8 ff fc |Q | DBF D0,0x27f6c 00027f72 9e c4 | | SUBA.W D4,A7 00027f74 20 4f | O | MOVEA.L A7,A0 00027f76 43 fa 9b 30 |C 0 | LEA.L 0x21aa8,A1 00027f7a 70 0c |p | MOVEQ.L #0x0c,D0 00027f7c 10 d9 | | MOVE.B (A1)+,(A0)+ 00027f7e 51 c8 ff fc |Q | DBF D0,0x27f7c 00027f82 59 4f |YO | SUBQ.L #0x4,A7 00027f84 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00027f88 3f 01 |? | MOVE.W D1,-(A7) 00027f8a 3f 02 |? | MOVE.W D2,-(A7) 00027f8c 4e 92 |N | JSR (A2) 00027f8e 58 4f |XO | ADDQ.L #0x4,A7 00027f90 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00027f94 3f 01 |? | MOVE.W D1,-(A7) 00027f96 3f 05 |? | MOVE.W D5,-(A7) 00027f98 4e 92 |N | JSR (A2) 00027f9a 50 4f |PO | ADDQ.L #0x8,A7 00027f9c 4e 94 |N | JSR (A4) 00027f9e de fc 00 2a | * | ADDA.W #0x2a,A7 00027fa2 60 00 fb b6 |` | BRA 0x27b5a 00027fa6 41 fa 9b 20 |A | LEA.L 0x21ac8,A0 00027faa 70 08 |p | MOVEQ.L #0x08,D0 00027fac 3f 20 |? | MOVE.W -(A0),-(A7) 00027fae 51 c8 ff fc |Q | DBF D0,0x27fac 00027fb2 41 fa 9b 26 |A & | LEA.L 0x21ada,A0 00027fb6 70 08 |p | MOVEQ.L #0x08,D0 00027fb8 3f 20 |? | MOVE.W -(A0),-(A7) 00027fba 51 c8 ff fc |Q | DBF D0,0x27fb8 00027fbe 41 fa 9b 2c |A , | LEA.L 0x21aec,A0 00027fc2 70 08 |p | MOVEQ.L #0x08,D0 00027fc4 3f 20 |? | MOVE.W -(A0),-(A7) 00027fc6 51 c8 ff fc |Q | DBF D0,0x27fc4 00027fca 5d 4f |]O | SUBQ.L #0x6,A7 00027fcc 48 6f 00 2a |Ho * | PEA.L (A7+0x2a) 00027fd0 3f 01 |? | MOVE.W D1,-(A7) 00027fd2 3f 07 |? | MOVE.W D7,-(A7) 00027fd4 4e 92 |N | JSR (A2) 00027fd6 50 4f |PO | ADDQ.L #0x8,A7 00027fd8 4e 93 |N | JSR (A3) 00027fda 58 4f |XO | ADDQ.L #0x4,A7 00027fdc 4a 1f |J | TST.B (A7)+ 00027fde 66 2c |f, | BNE 0x2800c 00027fe0 5d 4f |]O | SUBQ.L #0x6,A7 00027fe2 48 6f 00 18 |Ho | PEA.L (A7+0x18) 00027fe6 3f 01 |? | MOVE.W D1,-(A7) 00027fe8 3f 07 |? | MOVE.W D7,-(A7) 00027fea 4e 92 |N | JSR (A2) 00027fec 50 4f |PO | ADDQ.L #0x8,A7 00027fee 4e 93 |N | JSR (A3) 00027ff0 58 4f |XO | ADDQ.L #0x4,A7 00027ff2 4a 1f |J | TST.B (A7)+ 00027ff4 66 16 |f | BNE 0x2800c 00027ff6 5d 4f |]O | SUBQ.L #0x6,A7 00027ff8 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00027ffc 3f 01 |? | MOVE.W D1,-(A7) 00027ffe 3f 07 |? | MOVE.W D7,-(A7) 00028000 4e 92 |N | JSR (A2) 00028002 50 4f |PO | ADDQ.L #0x8,A7 00028004 4e 93 |N | JSR (A3) 00028006 58 4f |XO | ADDQ.L #0x4,A7 00028008 4a 1f |J | TST.B (A7)+ 0002800a 67 30 |g0 | BEQ 0x2803c 0002800c 9e fc 00 48 | H | SUBA.W #0x48,A7 00028010 20 4f | O | MOVEA.L A7,A0 00028012 43 fa 97 d2 |C | LEA.L 0x217e6,A1 00028016 70 46 |pF | MOVEQ.L #0x46,D0 00028018 10 d9 | | MOVE.B (A1)+,(A0)+ 0002801a 51 c8 ff fc |Q | DBF D0,0x28018 0002801e 59 4f |YO | SUBQ.L #0x4,A7 00028020 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028024 3f 01 |? | MOVE.W D1,-(A7) 00028026 3f 3c 00 47 |?< G | MOVE.W #0x47,-(A7) 0002802a 4e 92 |N | JSR (A2) 0002802c 50 4f |PO | ADDQ.L #0x8,A7 0002802e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00028034 de fc 00 4c | L | ADDA.W #0x4c,A7 00028038 60 00 00 b6 |` | BRA 0x280f0 0002803c 41 fa 9a c0 |A | LEA.L 0x21afe,A0 00028040 70 08 |p | MOVEQ.L #0x08,D0 00028042 3f 20 |? | MOVE.W -(A0),-(A7) 00028044 51 c8 ff fc |Q | DBF D0,0x28042 00028048 9e c4 | | SUBA.W D4,A7 0002804a 20 4f | O | MOVEA.L A7,A0 0002804c 43 fa 9a b0 |C | LEA.L 0x21afe,A1 00028050 70 0c |p | MOVEQ.L #0x0c,D0 00028052 10 d9 | | MOVE.B (A1)+,(A0)+ 00028054 51 c8 ff fc |Q | DBF D0,0x28052 00028058 59 4f |YO | SUBQ.L #0x4,A7 0002805a 48 6f 00 12 |Ho | PEA.L (A7+0x12) 0002805e 3f 01 |? | MOVE.W D1,-(A7) 00028060 3f 07 |? | MOVE.W D7,-(A7) 00028062 4e 92 |N | JSR (A2) 00028064 58 4f |XO | ADDQ.L #0x4,A7 00028066 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002806a 3f 01 |? | MOVE.W D1,-(A7) 0002806c 3f 05 |? | MOVE.W D5,-(A7) 0002806e 4e 92 |N | JSR (A2) 00028070 50 4f |PO | ADDQ.L #0x8,A7 00028072 4e 94 |N | JSR (A4) 00028074 de fc 00 28 | ( | ADDA.W #0x28,A7 00028078 41 fa 9a a4 |A | LEA.L 0x21b1e,A0 0002807c 70 08 |p | MOVEQ.L #0x08,D0 0002807e 3f 20 |? | MOVE.W -(A0),-(A7) 00028080 51 c8 ff fc |Q | DBF D0,0x2807e 00028084 9e c4 | | SUBA.W D4,A7 00028086 20 4f | O | MOVEA.L A7,A0 00028088 43 fa 9a 94 |C | LEA.L 0x21b1e,A1 0002808c 70 0c |p | MOVEQ.L #0x0c,D0 0002808e 10 d9 | | MOVE.B (A1)+,(A0)+ 00028090 51 c8 ff fc |Q | DBF D0,0x2808e 00028094 59 4f |YO | SUBQ.L #0x4,A7 00028096 48 6f 00 12 |Ho | PEA.L (A7+0x12) 0002809a 3f 01 |? | MOVE.W D1,-(A7) 0002809c 3f 07 |? | MOVE.W D7,-(A7) 0002809e 4e 92 |N | JSR (A2) 000280a0 58 4f |XO | ADDQ.L #0x4,A7 000280a2 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000280a6 3f 01 |? | MOVE.W D1,-(A7) 000280a8 3f 05 |? | MOVE.W D5,-(A7) 000280aa 4e 92 |N | JSR (A2) 000280ac 50 4f |PO | ADDQ.L #0x8,A7 000280ae 4e 94 |N | JSR (A4) 000280b0 de fc 00 28 | ( | ADDA.W #0x28,A7 000280b4 41 fa 9a 88 |A | LEA.L 0x21b3e,A0 000280b8 70 08 |p | MOVEQ.L #0x08,D0 000280ba 3f 20 |? | MOVE.W -(A0),-(A7) 000280bc 51 c8 ff fc |Q | DBF D0,0x280ba 000280c0 9e c4 | | SUBA.W D4,A7 000280c2 20 4f | O | MOVEA.L A7,A0 000280c4 43 fa 9a 78 |C x | LEA.L 0x21b3e,A1 000280c8 70 0c |p | MOVEQ.L #0x0c,D0 000280ca 10 d9 | | MOVE.B (A1)+,(A0)+ 000280cc 51 c8 ff fc |Q | DBF D0,0x280ca 000280d0 59 4f |YO | SUBQ.L #0x4,A7 000280d2 48 6f 00 12 |Ho | PEA.L (A7+0x12) 000280d6 3f 01 |? | MOVE.W D1,-(A7) 000280d8 3f 07 |? | MOVE.W D7,-(A7) 000280da 4e 92 |N | JSR (A2) 000280dc 58 4f |XO | ADDQ.L #0x4,A7 000280de 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000280e2 3f 01 |? | MOVE.W D1,-(A7) 000280e4 3f 05 |? | MOVE.W D5,-(A7) 000280e6 4e 92 |N | JSR (A2) 000280e8 50 4f |PO | ADDQ.L #0x8,A7 000280ea 4e 94 |N | JSR (A4) 000280ec de fc 00 28 | ( | ADDA.W #0x28,A7 000280f0 de fc 00 36 | 6 | ADDA.W #0x36,A7 000280f4 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000280f8 4e 5e |N^ | UNLK A6 000280fa 4e 75 |Nu | RTS 000280fc ; -------------------------------------------------------------------------------------- 000280fc ; OMSI PASCAL Function 000280fc ; <LVAR -0x004 @ 4(r)> 000280fc ; <LVAR -0x008 @ 4(r)> 000280fc ; <LVAR -0x00a @ 1(r)> 000280fc ; <LVAR -0x00b 1(rw)> 000280fc ; <LVAR -0x00e @ 1(r)> 000280fc ; -------------------------------------------------------------------------------------- 000280fc 4e 56 ff 72 |NV r | LINK.W A6,#0xff72 00028100 bf d5 | | CMPA.L (A5),A7 00028102 62 06 |b | BHI 0x2810a 00028104 44 fc 00 02 |D | MOVE.W #0x2,CCR 00028108 4e 76 |Nv | TRAPV 0002810a de fc 00 7a | z | ADDA.W #0x7a,A7 0002810e 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00028112 45 ee ff f2 |E | LEA.L (A6-0xe),A2 00028116 47 f9 00 02 ef 34 |G 4 | LEA.L 0x2ef34,A3 0002811c 49 f9 00 01 02 c4 |I | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A4 00028122 72 01 |r | MOVEQ.L #0x01,D1 00028124 74 03 |t | MOVEQ.L #0x03,D2 00028126 76 0a |v | MOVEQ.L #0x0a,D3 00028128 78 28 |x( | MOVEQ.L #0x28,D4 0002812a 4a 13 |J | TST.B (A3) 0002812c 67 00 00 86 |g | BEQ 0x281b4 00028130 10 39 00 02 96 da | 9 | MOVE.B 0x296da,D0 00028136 0c 00 00 02 | | CMPI.B #0x02,D0 0002813a 67 78 |gx | BEQ 0x281b4 0002813c 30 39 00 02 96 dc |09 | MOVE.W 0x296dc,D0 00028142 41 82 |A | CHK.W D2,D0 00028144 3e 00 |> | MOVE.W D0,D7 00028146 7c 01 || | MOVEQ.L #0x01,D6 00028148 7a 01 |z | MOVEQ.L #0x01,D5 0002814a 4f 82 |O | CHK.W D2,D7 0002814c 3f 07 |? | MOVE.W D7,-(A7) 0002814e 42 27 |B' | CLR.B -(A7) 00028150 10 06 | | MOVE.B D6,D0 00028152 48 80 |H | EXTB.W D0 00028154 41 81 |A | CHK.W D1,D0 00028156 1f 00 | | MOVE.B D0,-(A7) 00028158 48 52 |HR | PEA.L (A2) 0002815a 4e b9 00 01 04 0c |N | JSR FSCALL_1040c 00028160 de c3 | | ADDA.W D3,A7 00028162 4a 12 |J | TST.B (A2) 00028164 66 04 |f | BNE 0x2816a 00028166 60 00 00 a8 |` | BRA 0x28210 0002816a ba 81 | | CMP.L D1,D5 0002816c 66 24 |f$ | BNE 0x28192 0002816e 41 fa 9a 52 |A R | LEA.L 0x21bc2,A0 00028172 70 09 |p | MOVEQ.L #0x09,D0 00028174 2f 20 |/ | MOVE.L -(A0),-(A7) 00028176 51 c8 ff fc |Q | DBF D0,0x28174 0002817a 59 4f |YO | SUBQ.L #0x4,A7 0002817c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028180 3f 01 |? | MOVE.W D1,-(A7) 00028182 3f 04 |? | MOVE.W D4,-(A7) 00028184 4e 94 |N | JSR (A4) 00028186 50 4f |PO | ADDQ.L #0x8,A7 00028188 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002818e de fc 00 2c | , | ADDA.W #0x2c,A7 00028192 7c 00 || | MOVEQ.L #0x00,D6 00028194 2f 3c 00 00 98 96 |/< | MOVE.L #0x9896,-(A7) 0002819a 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 000281a0 58 4f |XO | ADDQ.L #0x4,A7 000281a2 52 85 |R | ADDQ.L #0x1,D5 000281a4 ba 84 | | CMP.L D4,D5 000281a6 6f a2 |o | BLE 0x2814a 000281a8 1f 01 | | MOVE.B D1,-(A7) 000281aa 48 52 |HR | PEA.L (A2) 000281ac 4e b9 00 01 04 28 |N ( | JSR FSCALL_10428 000281b2 5c 4f |\O | ADDQ.L #0x6,A7 000281b4 9e fc 00 1a | | SUBA.W #0x1a,A7 000281b8 20 4f | O | MOVEA.L A7,A0 000281ba 43 fa 99 90 |C | LEA.L 0x21b4c,A1 000281be 70 18 |p | MOVEQ.L #0x18,D0 000281c0 10 d9 | | MOVE.B (A1)+,(A0)+ 000281c2 51 c8 ff fc |Q | DBF D0,0x281c0 000281c6 51 4f |QO | SUBQ.L #0x8,A7 000281c8 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000281cc 3f 01 |? | MOVE.W D1,-(A7) 000281ce 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000281d2 4e 94 |N | JSR (A4) 000281d4 50 4f |PO | ADDQ.L #0x8,A7 000281d6 48 78 00 00 |Hx | PEA.L 0x0 000281da 48 78 00 03 |Hx | PEA.L 0x3 000281de 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 000281e4 de fc 00 0c | | ADDA.W #0xc,A7 000281e8 20 1f | | MOVE.L (A7)+,D0 000281ea b0 82 | | CMP.L D2,D0 000281ec 63 02 |c | BLS 0x281f0 000281ee 4e 4f |NO | TRAP #15 000281f0 de fc 00 1a | | ADDA.W #0x1a,A7 000281f4 3e 00 |> | MOVE.W D0,D7 000281f6 4f 82 |O | CHK.W D2,D7 000281f8 3f 07 |? | MOVE.W D7,-(A7) 000281fa 42 27 |B' | CLR.B -(A7) 000281fc 1f 01 | | MOVE.B D1,-(A7) 000281fe 48 52 |HR | PEA.L (A2) 00028200 4e b9 00 01 04 0c |N | JSR FSCALL_1040c 00028206 de c3 | | ADDA.W D3,A7 00028208 4a 12 |J | TST.B (A2) 0002820a 66 02 |f | BNE 0x2820e 0002820c 60 02 |` | BRA 0x28210 0002820e 60 98 |` | BRA 0x281a8 00028210 4a 13 |J | TST.B (A3) 00028212 67 06 |g | BEQ 0x2821a 00028214 1d 41 ff f5 | A | MOVE.B D1,(A6-0xb) 00028218 60 3a |`: | BRA 0x28254 0002821a 9e fc 00 34 | 4 | SUBA.W #0x34,A7 0002821e 20 4f | O | MOVEA.L A7,A0 00028220 43 fa 99 44 |C D | LEA.L 0x21b66,A1 00028224 70 32 |p2 | MOVEQ.L #0x32,D0 00028226 10 d9 | | MOVE.B (A1)+,(A0)+ 00028228 51 c8 ff fc |Q | DBF D0,0x28226 0002822c 5d 4f |]O | SUBQ.L #0x6,A7 0002822e 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00028232 3f 01 |? | MOVE.W D1,-(A7) 00028234 3f 3c 00 33 |?< 3 | MOVE.W #0x33,-(A7) 00028238 4e 94 |N | JSR (A4) 0002823a 5c 4f |\O | ADDQ.L #0x6,A7 0002823c 1e 81 | | MOVE.B D1,(A7) 0002823e 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00028244 5c 4f |\O | ADDQ.L #0x6,A7 00028246 10 1f | | MOVE.B (A7)+,D0 00028248 48 80 |H | EXTB.W D0 0002824a 41 81 |A | CHK.W D1,D0 0002824c de fc 00 34 | 4 | ADDA.W #0x34,A7 00028250 1d 40 ff f5 | @ | MOVE.B D0,(A6-0xb) 00028254 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00028258 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 0002825e 58 4f |XO | ADDQ.L #0x4,A7 00028260 10 2e ff f5 | . | MOVE.B (A6-0xb),D0 00028264 48 80 |H | EXTB.W D0 00028266 41 81 |A | CHK.W D1,D0 00028268 1f 00 | | MOVE.B D0,-(A7) 0002826a 1f 01 | | MOVE.B D1,-(A7) 0002826c 48 78 7f ff |Hx | PEA.L 0x7fff 00028270 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00028274 4e b9 00 01 04 38 |N 8 | JSR FSCALL_10438 0002827a de fc 00 0c | | ADDA.W #0xc,A7 0002827e 4a 2e ff f6 |J. | TST.B (A6-0xa) 00028282 67 dc |g | BEQ 0x28260 00028284 48 6e ff fc |Hn | PEA.L (A6-0x4) 00028288 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 0002828e 2e ae ff f8 |. | MOVE.L (A6-0x8),(A7) 00028292 2f 2e ff fc |/. | MOVE.L (A6-0x4),-(A7) 00028296 4e ba a8 b0 |N | JSR 0x22b48 0002829a 5c 4f |\O | ADDQ.L #0x6,A7 0002829c 42 17 |B | CLR.B (A7) 0002829e 48 52 |HR | PEA.L (A2) 000282a0 4e b9 00 01 04 14 |N | JSR FSCALL_10414 000282a6 5c 4f |\O | ADDQ.L #0x6,A7 000282a8 4e b9 00 01 04 10 |N | JSR FSCALL_10410 000282ae 4e b9 00 01 03 90 |N | JSR WriteFreeList(void) 000282b4 4e ba f7 0a |N | JSR 0x279c0 000282b8 4e ba f5 a6 |N | JSR 0x27860 000282bc 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000282c0 4e 5e |N^ | UNLK A6 000282c2 4e 75 |Nu | RTS 000282c4 ; -------------------------------------------------------------------------------------- 000282c4 ; OMSI PASCAL Function 000282c4 ; <LVAR -0x003 @ 1(r)> 000282c4 ; <LVAR -0x004 @ 1(r)> 000282c4 ; -------------------------------------------------------------------------------------- 000282c4 4e 56 ff cc |NV | LINK.W A6,#0xffcc 000282c8 bf d5 | | CMPA.L (A5),A7 000282ca 62 06 |b | BHI 0x282d2 000282cc 44 fc 00 02 |D | MOVE.W #0x2,CCR 000282d0 4e 76 |Nv | TRAPV 000282d2 de fc 00 30 | 0 | ADDA.W #0x30,A7 000282d6 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 000282da 41 ee ff fd |A | LEA.L (A6-0x3),A0 000282de 43 ee ff fc |C | LEA.L (A6-0x4),A1 000282e2 42 10 |B | CLR.B (A0) 000282e4 48 50 |HP | PEA.L (A0) 000282e6 4e ba e4 34 |N 4 | JSR 0x2671c 000282ea 58 4f |XO | ADDQ.L #0x4,A7 000282ec 4a 10 |J | TST.B (A0) 000282ee 67 6e |gn | BEQ 0x2835e 000282f0 4e ba eb e6 |N | JSR 0x26ed8 000282f4 4e ba ef 8e |N | JSR 0x27284 000282f8 3f 39 00 01 00 08 |?9 | MOVE.W 0x10008,-(A7) 000282fe 48 51 |HQ | PEA.L (A1) 00028300 4e b9 00 01 03 94 |N | JSR MountDisk(drive : Word ; VAR status : Byte) 00028306 5c 4f |\O | ADDQ.L #0x6,A7 00028308 4a 11 |J | TST.B (A1) 0002830a 67 48 |gH | BEQ 0x28354 0002830c 2f 3a 98 c0 |/: | MOVE.L 0x21bce,-(A7) 00028310 2f 3a 98 b8 |/: | MOVE.L 0x21bca,-(A7) 00028314 2f 3a 98 b0 |/: | MOVE.L 0x21bc6,-(A7) 00028318 2f 3a 98 a8 |/: | MOVE.L 0x21bc2,-(A7) 0002831c 51 4f |QO | SUBQ.L #0x8,A7 0002831e 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00028322 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00028326 3f 3c 00 10 |?< | MOVE.W #0x10,-(A7) 0002832a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00028330 58 4f |XO | ADDQ.L #0x4,A7 00028332 10 11 | | MOVE.B (A1),D0 00028334 48 80 |H | EXTB.W D0 00028336 41 bc 00 0f |A | CHK.W #0xf,D0 0002833a 1f 00 | | MOVE.B D0,-(A7) 0002833c 4e b9 00 01 03 a0 |N | JSR FsErrMsgStr(err: Byte) : String 00028342 54 4f |TO | ADDQ.L #0x2,A7 00028344 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002834a 50 4f |PO | ADDQ.L #0x8,A7 0002834c 4e ba a1 d4 |N | JSR 0x22522 00028350 de fc 00 14 | | ADDA.W #0x14,A7 00028354 4e ba f1 f8 |N | JSR 0x2754e 00028358 4e b9 00 01 03 a4 |N | JSR Open_ERROR_LOG(void) 0002835e 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00028362 4e 5e |N^ | UNLK A6 00028364 4e 75 |Nu | RTS 00028366 ; -------------------------------------------------------------------------------------- 00028366 ; OMSI PASCAL Function 00028366 ; <LVAR -0x016 4(rw)> 00028366 ; <LVAR -0x01a 4(rw)> 00028366 ; <LVAR -0x01e 4(rw)> 00028366 ; <LVAR -0x023 1(r)> 00028366 ; <LVAR -0x024 1(r)> 00028366 ; <LVAR -0x026 1(w) 2(w) 4(r)> 00028366 ; <LVAR -0x028 @ 1(r)> 00028366 ; <LVAR -0x030 4(rw)> 00028366 ; -------------------------------------------------------------------------------------- 00028366 4e 56 ff 3e |NV > | LINK.W A6,#0xff3e 0002836a bf d5 | | CMPA.L (A5),A7 0002836c 62 06 |b | BHI 0x28374 0002836e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00028372 4e 76 |Nv | TRAPV 00028374 de fc 00 92 | | ADDA.W #0x92,A7 00028378 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002837c 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00028382 47 f9 00 01 02 e4 |G | LEA.L Long2String(a : Long) : String,A3 00028388 49 ee ff d0 |I | LEA.L (A6-0x30),A4 0002838c 76 01 |v | MOVEQ.L #0x01,D3 0002838e 78 14 |x | MOVEQ.L #0x14,D4 00028390 1f 03 | | MOVE.B D3,-(A7) 00028392 4e ba a9 dc |N | JSR 0x22d70 00028396 54 4f |TO | ADDQ.L #0x2,A7 00028398 42 94 |B | CLR.L (A4) 0002839a 41 fa 98 4a |A J | LEA.L 0x21be6,A0 0002839e 70 04 |p | MOVEQ.L #0x04,D0 000283a0 2f 20 |/ | MOVE.L -(A0),-(A7) 000283a2 51 c8 ff fc |Q | DBF D0,0x283a0 000283a6 41 fa 98 56 |A V | LEA.L 0x21bfe,A0 000283aa 70 05 |p | MOVEQ.L #0x05,D0 000283ac 2f 20 |/ | MOVE.L -(A0),-(A7) 000283ae 51 c8 ff fc |Q | DBF D0,0x283ac 000283b2 51 4f |QO | SUBQ.L #0x8,A7 000283b4 48 6f 00 20 |Ho | PEA.L (A7+0x20) 000283b8 3f 03 |? | MOVE.W D3,-(A7) 000283ba 3f 04 |? | MOVE.W D4,-(A7) 000283bc 4e 92 |N | JSR (A2) 000283be 58 4f |XO | ADDQ.L #0x4,A7 000283c0 42 80 |B | CLR.L D0 000283c2 30 39 00 02 97 3e |09 > | MOVE.W 0x2973e,D0 000283c8 2f 00 |/ | MOVE.L D0,-(A7) 000283ca 4e 93 |N | JSR (A3) 000283cc 48 6f 00 10 |Ho | PEA.L (A7+0x10) 000283d0 3f 03 |? | MOVE.W D3,-(A7) 000283d2 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 000283d6 4e 92 |N | JSR (A2) 000283d8 58 4f |XO | ADDQ.L #0x4,A7 000283da 42 80 |B | CLR.L D0 000283dc 30 39 00 02 97 4a |09 J | MOVE.W 0x2974a,D0 000283e2 2f 00 |/ | MOVE.L D0,-(A7) 000283e4 4e 93 |N | JSR (A3) 000283e6 58 4f |XO | ADDQ.L #0x4,A7 000283e8 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 000283ee de fc 00 10 | | ADDA.W #0x10,A7 000283f2 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000283f8 de fc 00 30 | 0 | ADDA.W #0x30,A7 000283fc 00 2e 00 80 ff da | . | ORI.B #0x80,(A6-0x26) 00028402 02 2e 00 bf ff da | . | ANDI.B #0xbf,(A6-0x26) 00028408 02 6e c0 00 ff da | n | ANDI.W #0xc000,(A6-0x26) 0002840e 42 2e ff dc |B. | CLR.B (A6-0x24) 00028412 42 2e ff dd |B. | CLR.B (A6-0x23) 00028416 70 00 |p | MOVEQ.L #0x00,D0 00028418 0c 80 00 00 07 ff | | CMPI.L #0x000007ff,D0 0002841e 63 02 |c | BLS 0x28422 00028420 4e 4f |NO | TRAP #15 00028422 22 00 |" | MOVE.L D0,D1 00028424 e5 81 | | ASL.L #0x2,D1 00028426 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 0002842c 41 f0 18 00 |A | LEA.L (A0+D1.L),A0 00028430 21 6e ff da 04 4c |!n L | MOVE.L (A6-0x26),(A0+0x44c) 00028436 52 80 |R | ADDQ.L #0x1,D0 00028438 0c 80 00 00 07 ff | | CMPI.L #0x000007ff,D0 0002843e 6f d8 |o | BLE 0x28418 00028440 48 6e ff d8 |Hn | PEA.L (A6-0x28) 00028444 4e ba b5 00 |N | JSR 0x23946 00028448 58 4f |XO | ADDQ.L #0x4,A7 0002844a 4a 2e ff d8 |J. | TST.B (A6-0x28) 0002844e 66 28 |f( | BNE 0x28478 00028450 9e c4 | | SUBA.W D4,A7 00028452 20 4f | O | MOVEA.L A7,A0 00028454 43 fa 97 a8 |C | LEA.L 0x21bfe,A1 00028458 70 12 |p | MOVEQ.L #0x12,D0 0002845a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002845c 51 c8 ff fc |Q | DBF D0,0x2845a 00028460 59 4f |YO | SUBQ.L #0x4,A7 00028462 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028466 3f 03 |? | MOVE.W D3,-(A7) 00028468 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 0002846c 4e 92 |N | JSR (A2) 0002846e 50 4f |PO | ADDQ.L #0x8,A7 00028470 4e ba a0 b0 |N | JSR 0x22522 00028474 de fc 00 18 | | ADDA.W #0x18,A7 00028478 48 6e ff d8 |Hn | PEA.L (A6-0x28) 0002847c 4e ba b6 24 |N $ | JSR 0x23aa2 00028480 58 4f |XO | ADDQ.L #0x4,A7 00028482 4a 2e ff d8 |J. | TST.B (A6-0x28) 00028486 66 28 |f( | BNE 0x284b0 00028488 9e c4 | | SUBA.W D4,A7 0002848a 20 4f | O | MOVEA.L A7,A0 0002848c 43 fa 97 84 |C | LEA.L 0x21c12,A1 00028490 70 12 |p | MOVEQ.L #0x12,D0 00028492 10 d9 | | MOVE.B (A1)+,(A0)+ 00028494 51 c8 ff fc |Q | DBF D0,0x28492 00028498 59 4f |YO | SUBQ.L #0x4,A7 0002849a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002849e 3f 03 |? | MOVE.W D3,-(A7) 000284a0 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 000284a4 4e 92 |N | JSR (A2) 000284a6 50 4f |PO | ADDQ.L #0x8,A7 000284a8 4e ba a0 78 |N x | JSR 0x22522 000284ac de fc 00 18 | | ADDA.W #0x18,A7 000284b0 7a 00 |z | MOVEQ.L #0x00,D5 000284b2 42 ae ff e2 |B | CLR.L (A6-0x1e) 000284b6 70 00 |p | MOVEQ.L #0x00,D0 000284b8 2f 00 |/ | MOVE.L D0,-(A7) 000284ba 0c 80 00 00 07 ff | | CMPI.L #0x000007ff,D0 000284c0 63 02 |c | BLS 0x284c4 000284c2 4e 4f |NO | TRAP #15 000284c4 22 00 |" | MOVE.L D0,D1 000284c6 e5 81 | | ASL.L #0x2,D1 000284c8 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 000284ce 41 f0 18 00 |A | LEA.L (A0+D1.L),A0 000284d2 2f 08 |/ | MOVE.L A0,-(A7) 000284d4 32 28 04 4c |2( L | MOVE.W (A0+0x44c),D1 000284d8 e5 49 | I | LSL.W #0x2,D1 000284da e4 49 | I | LSR.W #0x2,D1 000284dc 66 0e |f | BNE 0x284ec 000284de 4a 28 04 4e |J( N | TST.B (A0+0x44e) 000284e2 66 08 |f | BNE 0x284ec 000284e4 4a 28 04 4f |J( O | TST.B (A0+0x44f) 000284e8 67 00 00 d6 |g | BEQ 0x285c0 000284ec 52 94 |R | ADDQ.L #0x1,(A4) 000284ee 42 81 |B | CLR.L D1 000284f0 12 28 04 4e | ( N | MOVE.B (A0+0x44e),D1 000284f4 0c 41 00 ff | A | CMPI.W #0x00ff,D1 000284f8 66 26 |f& | BNE 0x28520 000284fa 42 ae ff e6 |B | CLR.L (A6-0x1a) 000284fe 42 81 |B | CLR.L D1 00028500 12 39 00 02 97 14 | 9 | MOVE.B 0x29714,D1 00028506 53 41 |SA | SUBQ.W #0x1,D1 00028508 48 c1 |H | EXTW.L D1 0002850a 2d 41 ff ea |-A | MOVE.L D1,(A6-0x16) 0002850e 7e 00 |~ | MOVEQ.L #0x00,D7 00028510 42 81 |B | CLR.L D1 00028512 12 39 00 02 97 15 | 9 | MOVE.B 0x29715,D1 00028518 53 41 |SA | SUBQ.W #0x1,D1 0002851a 48 c1 |H | EXTW.L D1 0002851c 2c 01 |, | MOVE.L D1,D6 0002851e 60 22 |`" | BRA 0x28542 00028520 34 01 |4 | MOVE.W D1,D2 00028522 48 c2 |H | EXTW.L D2 00028524 2d 42 ff e6 |-B | MOVE.L D2,(A6-0x1a) 00028528 2d 42 ff ea |-B | MOVE.L D2,(A6-0x16) 0002852c 42 81 |B | CLR.L D1 0002852e 12 28 04 4f | ( O | MOVE.B (A0+0x44f),D1 00028532 0c 41 00 ff | A | CMPI.W #0x00ff,D1 00028536 66 02 |f | BNE 0x2853a 00028538 60 d4 |` | BRA 0x2850e 0002853a 34 01 |4 | MOVE.W D1,D2 0002853c 48 c2 |H | EXTW.L D2 0002853e 2e 02 |. | MOVE.L D2,D7 00028540 2c 02 |, | MOVE.L D2,D6 00028542 2f 2e ff ea |/. | MOVE.L (A6-0x16),-(A7) 00028546 22 2e ff e6 |". | MOVE.L (A6-0x1a),D1 0002854a b2 97 | | CMP.L (A7),D1 0002854c 6e 14 |n | BGT 0x28562 0002854e 24 17 |$ | MOVE.L (A7),D2 00028550 0c 81 80 00 00 01 | | CMPI.L #0x80000001,D1 00028556 6d 08 |m | BLT 0x28560 00028558 0c 82 7f ff ff ff | | CMPI.L #0x7fffffff,D2 0002855e 6f 02 |o | BLE 0x28562 00028560 4e 4f |NO | TRAP #15 00028562 b2 97 | | CMP.L (A7),D1 00028564 6f 04 |o | BLE 0x2856a 00028566 59 4f |YO | SUBQ.L #0x4,A7 00028568 60 54 |`T | BRA 0x285be 0002856a 2f 01 |/ | MOVE.L D1,-(A7) 0002856c 2f 06 |/ | MOVE.L D6,-(A7) 0002856e 20 07 | | MOVE.L D7,D0 00028570 b0 97 | | CMP.L (A7),D0 00028572 6e 14 |n | BGT 0x28588 00028574 24 17 |$ | MOVE.L (A7),D2 00028576 0c 80 80 00 00 01 | | CMPI.L #0x80000001,D0 0002857c 6d 08 |m | BLT 0x28586 0002857e 0c 82 7f ff ff ff | | CMPI.L #0x7fffffff,D2 00028584 6f 02 |o | BLE 0x28588 00028586 4e 4f |NO | TRAP #15 00028588 b0 97 | | CMP.L (A7),D0 0002858a 6f 04 |o | BLE 0x28590 0002858c 59 4f |YO | SUBQ.L #0x4,A7 0002858e 60 22 |`" | BRA 0x285b2 00028590 2f 00 |/ | MOVE.L D0,-(A7) 00028592 20 6f 00 10 | o | MOVEA.L (A7+0x10),A0 00028596 12 28 04 4c | ( L | MOVE.B (A0+0x44c),D1 0002859a e3 09 | | LSL.B #0x1,D1 0002859c ee 09 | | LSR.B #0x7,D1 0002859e 67 06 |g | BEQ 0x285a6 000285a0 52 ae ff e2 |R | ADDQ.L #0x1,(A6-0x1e) 000285a4 60 02 |` | BRA 0x285a8 000285a6 52 85 |R | ADDQ.L #0x1,D5 000285a8 20 17 | | MOVE.L (A7),D0 000285aa 52 80 |R | ADDQ.L #0x1,D0 000285ac 69 04 |i | BVS 0x285b2 000285ae 58 4f |XO | ADDQ.L #0x4,A7 000285b0 60 d6 |` | BRA 0x28588 000285b2 50 4f |PO | ADDQ.L #0x8,A7 000285b4 22 17 |" | MOVE.L (A7),D1 000285b6 52 81 |R | ADDQ.L #0x1,D1 000285b8 69 04 |i | BVS 0x285be 000285ba 58 4f |XO | ADDQ.L #0x4,A7 000285bc 60 a4 |` | BRA 0x28562 000285be 50 4f |PO | ADDQ.L #0x8,A7 000285c0 58 4f |XO | ADDQ.L #0x4,A7 000285c2 20 17 | | MOVE.L (A7),D0 000285c4 52 80 |R | ADDQ.L #0x1,D0 000285c6 0c 80 00 00 07 ff | | CMPI.L #0x000007ff,D0 000285cc 6e 06 |n | BGT 0x285d4 000285ce 58 4f |XO | ADDQ.L #0x4,A7 000285d0 60 00 fe e6 |` | BRA 0x284b8 000285d4 58 4f |XO | ADDQ.L #0x4,A7 000285d6 41 fa 96 60 |A ` | LEA.L 0x21c38,A0 000285da 70 08 |p | MOVEQ.L #0x08,D0 000285dc 3f 20 |? | MOVE.W -(A0),-(A7) 000285de 51 c8 ff fc |Q | DBF D0,0x285dc 000285e2 9e fc 00 12 | | SUBA.W #0x12,A7 000285e6 20 4f | O | MOVEA.L A7,A0 000285e8 43 fa 96 4e |C N | LEA.L 0x21c38,A1 000285ec 70 10 |p | MOVEQ.L #0x10,D0 000285ee 10 d9 | | MOVE.B (A1)+,(A0)+ 000285f0 51 c8 ff fc |Q | DBF D0,0x285ee 000285f4 51 4f |QO | SUBQ.L #0x8,A7 000285f6 2f 05 |/ | MOVE.L D5,-(A7) 000285f8 4e 93 |N | JSR (A3) 000285fa 48 6f 00 1e |Ho | PEA.L (A7+0x1e) 000285fe 3f 03 |? | MOVE.W D3,-(A7) 00028600 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00028604 4e 92 |N | JSR (A2) 00028606 2e ae ff e2 |. | MOVE.L (A6-0x1e),(A7) 0002860a 4e 93 |N | JSR (A3) 0002860c 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00028610 3f 03 |? | MOVE.W D3,-(A7) 00028612 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 00028616 4e 92 |N | JSR (A2) 00028618 50 4f |PO | ADDQ.L #0x8,A7 0002861a 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00028620 de fc 00 10 | | ADDA.W #0x10,A7 00028624 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002862a de fc 00 28 | ( | ADDA.W #0x28,A7 0002862e 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00028634 41 fa 96 30 |A 0 | LEA.L 0x21c66,A0 00028638 70 06 |p | MOVEQ.L #0x06,D0 0002863a 2f 20 |/ | MOVE.L -(A0),-(A7) 0002863c 51 c8 ff fc |Q | DBF D0,0x2863a 00028640 9e fc 00 22 | " | SUBA.W #0x22,A7 00028644 20 4f | O | MOVEA.L A7,A0 00028646 43 fa 96 1e |C | LEA.L 0x21c66,A1 0002864a 70 20 |p | MOVEQ.L #0x20,D0 0002864c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002864e 51 c8 ff fc |Q | DBF D0,0x2864c 00028652 51 4f |QO | SUBQ.L #0x8,A7 00028654 2f 14 |/ | MOVE.L (A4),-(A7) 00028656 4e 93 |N | JSR (A3) 00028658 48 6f 00 2e |Ho . | PEA.L (A7+0x2e) 0002865c 3f 03 |? | MOVE.W D3,-(A7) 0002865e 3f 3c 00 1c |?< | MOVE.W #0x1c,-(A7) 00028662 4e 92 |N | JSR (A2) 00028664 58 4f |XO | ADDQ.L #0x4,A7 00028666 20 3c 00 00 08 00 | < | MOVE.L #0x800,D0 0002866c 90 94 | | SUB.L (A4),D0 0002866e 2f 00 |/ | MOVE.L D0,-(A7) 00028670 4e 93 |N | JSR (A3) 00028672 48 6f 00 14 |Ho | PEA.L (A7+0x14) 00028676 3f 03 |? | MOVE.W D3,-(A7) 00028678 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 0002867c 4e 92 |N | JSR (A2) 0002867e 50 4f |PO | ADDQ.L #0x8,A7 00028680 4e b9 00 01 02 d8 |N | JSR StringCat4(a, b, c, d : String) : String 00028686 de fc 00 10 | | ADDA.W #0x10,A7 0002868a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00028690 de fc 00 42 | B | ADDA.W #0x42,A7 00028694 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 0002869a 48 79 00 02 97 04 |Hy | PEA.L 0x29704 000286a0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000286a6 58 4f |XO | ADDQ.L #0x4,A7 000286a8 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000286ac 4e 5e |N^ | UNLK A6 000286ae 4e 75 |Nu | RTS 000286b0 ; -------------------------------------------------------------------------------------- 000286b0 ; OMSI PASCAL Function 000286b0 ; <LVAR 0x008 4(r)> 000286b0 ; -------------------------------------------------------------------------------------- 000286b0 4e 56 ff f0 |NV | LINK.W A6,#0xfff0 ; Spelunked 000286b4 bf d5 | | CMPA.L (A5),A7 000286b6 62 06 |b | BHI 0x286be 000286b8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000286bc 4e 76 |Nv | TRAPV 000286be de fc 00 10 | | ADDA.W #0x10,A7 000286c2 59 4f |YO | SUBQ.L #0x4,A7 000286c4 2f 2c 00 04 |/, | MOVE.L (A4+0x4),-(A7) 000286c8 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000286cc 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000286d2 50 4f |PO | ADDQ.L #0x8,A7 000286d4 29 5f 00 04 |)_ | MOVE.L (A7)+,(A4+0x4) 000286d8 4e 5e |N^ | UNLK A6 000286da 4e 75 |Nu | RTS 000286dc ; -------------------------------------------------------------------------------------- 000286dc ; OMSI PASCAL Function 000286dc ; <LVAR 0x008 1(r)> 000286dc ; <LVAR -0x00a 4(rw)> 000286dc ; <LVAR -0x00e @> 000286dc ; -------------------------------------------------------------------------------------- 000286dc 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 000286e0 bf d5 | | CMPA.L (A5),A7 000286e2 62 06 |b | BHI 0x286ea 000286e4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000286e8 4e 76 |Nv | TRAPV 000286ea de fc 00 66 | f | ADDA.W #0x66,A7 000286ee 48 e7 f1 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D3+D2+D1+D0,-(A7) 000286f2 45 ee ff f2 |E | LEA.L (A6-0xe),A2 000286f6 47 fa ff b8 |G | LEA.L 0x286b0,A3 000286fa 72 01 |r | MOVEQ.L #0x01,D1 000286fc 74 26 |t& | MOVEQ.L #0x26,D2 000286fe 76 04 |v | MOVEQ.L #0x04,D3 00028700 4e ba fc 64 |N d | JSR 0x28366 00028704 7e 00 |~ | MOVEQ.L #0x00,D7 00028706 0c 87 00 00 07 ff | | CMPI.L #0x000007ff,D7 0002870c 63 02 |c | BLS 0x28710 0002870e 4e 4f |NO | TRAP #15 00028710 20 07 | | MOVE.L D7,D0 00028712 e5 80 | | ASL.L #0x2,D0 00028714 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 0002871a 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 0002871e 30 28 04 4c |0( L | MOVE.W (A0+0x44c),D0 00028722 e5 48 | H | LSL.W #0x2,D0 00028724 e4 48 | H | LSR.W #0x2,D0 00028726 66 0e |f | BNE 0x28736 00028728 4a 28 04 4e |J( N | TST.B (A0+0x44e) 0002872c 66 08 |f | BNE 0x28736 0002872e 4a 28 04 4f |J( O | TST.B (A0+0x44f) 00028732 67 00 01 18 |g | BEQ 0x2884c 00028736 10 28 04 4c | ( L | MOVE.B (A0+0x44c),D0 0002873a e3 08 | | LSL.B #0x1,D0 0002873c ee 08 | | LSR.B #0x7,D0 0002873e 66 08 |f | BNE 0x28748 00028740 4a 2e 00 08 |J. | TST.B (A6+0x8) 00028744 67 00 01 06 |g | BEQ 0x2884c 00028748 10 28 04 4c | ( L | MOVE.B (A0+0x44c),D0 0002874c e3 08 | | LSL.B #0x1,D0 0002874e ee 08 | | LSR.B #0x7,D0 00028750 67 0e |g | BEQ 0x28760 00028752 43 fa 95 5a |C Z | LEA.L 0x21cae,A1 00028756 70 12 |p | MOVEQ.L #0x12,D0 00028758 3f 21 |?! | MOVE.W -(A1),-(A7) 0002875a 51 c8 ff fc |Q | DBF D0,0x28758 0002875e 60 0c |` | BRA 0x2876c 00028760 43 fa 95 72 |C r | LEA.L 0x21cd4,A1 00028764 70 12 |p | MOVEQ.L #0x12,D0 00028766 3f 21 |?! | MOVE.W -(A1),-(A7) 00028768 51 c8 ff fc |Q | DBF D0,0x28766 0002876c 59 4f |YO | SUBQ.L #0x4,A7 0002876e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028772 3f 01 |? | MOVE.W D1,-(A7) 00028774 3f 02 |? | MOVE.W D2,-(A7) 00028776 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002877c 50 4f |PO | ADDQ.L #0x8,A7 0002877e 2d 5f ff f6 |-_ | MOVE.L (A7)+,(A6-0xa) 00028782 de c2 | | ADDA.W D2,A7 00028784 51 4f |QO | SUBQ.L #0x8,A7 00028786 42 80 |B | CLR.L D0 00028788 30 28 04 4c |0( L | MOVE.W (A0+0x44c),D0 0002878c e5 48 | H | LSL.W #0x2,D0 0002878e e4 48 | H | LSR.W #0x2,D0 00028790 2f 00 |/ | MOVE.L D0,-(A7) 00028792 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00028798 58 4f |XO | ADDQ.L #0x4,A7 0002879a 48 78 00 04 |Hx | PEA.L 0x4 0002879e 4e b9 00 01 02 f4 |N | JSR RightPad(a : String; b : Long) : String 000287a4 50 4f |PO | ADDQ.L #0x8,A7 000287a6 28 4a |(J | MOVEA.L A2,A4 000287a8 4e 93 |N | JSR (A3) 000287aa 58 4f |XO | ADDQ.L #0x4,A7 000287ac 42 80 |B | CLR.L D0 000287ae 10 28 04 4e | ( N | MOVE.B (A0+0x44e),D0 000287b2 0c 40 00 ff | @ | CMPI.W #0x00ff,D0 000287b6 66 1e |f | BNE 0x287d6 000287b8 2f 3a 95 1a |/: | MOVE.L 0x21cd4,-(A7) 000287bc 59 4f |YO | SUBQ.L #0x4,A7 000287be 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000287c2 3f 01 |? | MOVE.W D1,-(A7) 000287c4 3f 03 |? | MOVE.W D3,-(A7) 000287c6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000287cc 50 4f |PO | ADDQ.L #0x8,A7 000287ce 28 4a |(J | MOVEA.L A2,A4 000287d0 4e 93 |N | JSR (A3) 000287d2 58 4f |XO | ADDQ.L #0x4,A7 000287d4 60 1e |` | BRA 0x287f4 000287d6 51 4f |QO | SUBQ.L #0x8,A7 000287d8 48 c0 |H | EXTW.L D0 000287da 2f 00 |/ | MOVE.L D0,-(A7) 000287dc 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000287e2 58 4f |XO | ADDQ.L #0x4,A7 000287e4 48 78 00 04 |Hx | PEA.L 0x4 000287e8 4e b9 00 01 02 f4 |N | JSR RightPad(a : String; b : Long) : String 000287ee 50 4f |PO | ADDQ.L #0x8,A7 000287f0 28 4a |(J | MOVEA.L A2,A4 000287f2 4e 93 |N | JSR (A3) 000287f4 58 4f |XO | ADDQ.L #0x4,A7 000287f6 42 80 |B | CLR.L D0 000287f8 10 28 04 4f | ( O | MOVE.B (A0+0x44f),D0 000287fc 0c 40 00 ff | @ | CMPI.W #0x00ff,D0 00028800 66 1e |f | BNE 0x28820 00028802 2f 3a 94 d4 |/: | MOVE.L 0x21cd8,-(A7) 00028806 59 4f |YO | SUBQ.L #0x4,A7 00028808 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002880c 3f 01 |? | MOVE.W D1,-(A7) 0002880e 3f 03 |? | MOVE.W D3,-(A7) 00028810 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00028816 50 4f |PO | ADDQ.L #0x8,A7 00028818 28 4a |(J | MOVEA.L A2,A4 0002881a 4e 93 |N | JSR (A3) 0002881c 58 4f |XO | ADDQ.L #0x4,A7 0002881e 60 1e |` | BRA 0x2883e 00028820 51 4f |QO | SUBQ.L #0x8,A7 00028822 48 c0 |H | EXTW.L D0 00028824 2f 00 |/ | MOVE.L D0,-(A7) 00028826 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002882c 58 4f |XO | ADDQ.L #0x4,A7 0002882e 48 78 00 04 |Hx | PEA.L 0x4 00028832 4e b9 00 01 02 f4 |N | JSR RightPad(a : String; b : Long) : String 00028838 50 4f |PO | ADDQ.L #0x8,A7 0002883a 28 4a |(J | MOVEA.L A2,A4 0002883c 4e 93 |N | JSR (A3) 0002883e 58 4f |XO | ADDQ.L #0x4,A7 00028840 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 00028844 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002884a 58 4f |XO | ADDQ.L #0x4,A7 0002884c 52 87 |R | ADDQ.L #0x1,D7 0002884e 0c 87 00 00 07 ff | | CMPI.L #0x000007ff,D7 00028854 6f 00 fe b0 |o | BLE 0x28706 00028858 4c df 1f 8f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D7+A0+A1+A2+A3+A4 0002885c 4e 5e |N^ | UNLK A6 0002885e 4e 75 |Nu | RTS 00028860 ; -------------------------------------------------------------------------------------- 00028860 ; OMSI PASCAL Function 00028860 ; <LVAR -0x006 @ 4(r)> 00028860 ; <LVAR -0x008 @ 1(r)> 00028860 ; -------------------------------------------------------------------------------------- 00028860 4e 56 ff a4 |NV | LINK.W A6,#0xffa4 00028864 bf d5 | | CMPA.L (A5),A7 00028866 62 06 |b | BHI 0x2886e 00028868 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002886c 4e 76 |Nv | TRAPV 0002886e de fc 00 54 | T | ADDA.W #0x54,A7 00028872 48 e7 f8 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7) 00028876 43 ee ff f8 |C | LEA.L (A6-0x8),A1 0002887a 45 ee ff fa |E | LEA.L (A6-0x6),A2 0002887e 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00028884 49 f8 00 00 |I | LEA.L 0x0,A4 00028888 72 01 |r | MOVEQ.L #0x01,D1 0002888a 74 14 |t | MOVEQ.L #0x14,D2 0002888c 76 28 |v( | MOVEQ.L #0x28,D3 0002888e 38 3c 02 00 |8< | MOVE.W #0x200,D4 00028892 41 f9 00 02 01 44 |A D | LEA.L 0x20144,A0 00028898 70 04 |p | MOVEQ.L #0x04,D0 0002889a 2f 20 |/ | MOVE.L -(A0),-(A7) 0002889c 51 c8 ff fc |Q | DBF D0,0x2889a 000288a0 59 4f |YO | SUBQ.L #0x4,A7 000288a2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000288a6 3f 01 |? | MOVE.W D1,-(A7) 000288a8 3f 02 |? | MOVE.W D2,-(A7) 000288aa 4e 93 |N | JSR (A3) 000288ac 5c 4f |\O | ADDQ.L #0x6,A7 000288ae 42 17 |B | CLR.B (A7) 000288b0 42 27 |B' | CLR.B -(A7) 000288b2 48 54 |HT | PEA.L (A4) 000288b4 48 51 |HQ | PEA.L (A1) 000288b6 48 52 |HR | PEA.L (A2) 000288b8 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000288be de c3 | | ADDA.W D3,A7 000288c0 4a 11 |J | TST.B (A1) 000288c2 66 1c |f | BNE 0x288e0 000288c4 2f 12 |/ | MOVE.L (A2),-(A7) 000288c6 42 67 |Bg | CLR.W -(A7) 000288c8 42 67 |Bg | CLR.W -(A7) 000288ca 3f 04 |? | MOVE.W D4,-(A7) 000288cc 1f 01 | | MOVE.B D1,-(A7) 000288ce 41 f9 00 02 ef 38 |A 8 | LEA.L 0x2ef38,A0 000288d4 2f 08 |/ | MOVE.L A0,-(A7) 000288d6 48 51 |HQ | PEA.L (A1) 000288d8 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 000288de de c2 | | ADDA.W D2,A7 000288e0 42 39 00 02 ef 35 |B9 5 | CLR.B 0x2ef35 000288e6 4a 11 |J | TST.B (A1) 000288e8 66 06 |f | BNE 0x288f0 000288ea 52 39 00 02 ef 35 |R9 5 | ADDQ.B #0x1,0x2ef35 000288f0 41 f9 00 02 01 52 |A R | LEA.L 0x20152,A0 000288f6 70 06 |p | MOVEQ.L #0x06,D0 000288f8 3f 20 |? | MOVE.W -(A0),-(A7) 000288fa 51 c8 ff fc |Q | DBF D0,0x288f8 000288fe 59 4f |YO | SUBQ.L #0x4,A7 00028900 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028904 3f 01 |? | MOVE.W D1,-(A7) 00028906 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 0002890a 4e 93 |N | JSR (A3) 0002890c 5c 4f |\O | ADDQ.L #0x6,A7 0002890e 42 17 |B | CLR.B (A7) 00028910 42 27 |B' | CLR.B -(A7) 00028912 48 54 |HT | PEA.L (A4) 00028914 48 51 |HQ | PEA.L (A1) 00028916 48 52 |HR | PEA.L (A2) 00028918 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 0002891e de fc 00 22 | " | ADDA.W #0x22,A7 00028922 4a 11 |J | TST.B (A1) 00028924 66 1c |f | BNE 0x28942 00028926 2f 12 |/ | MOVE.L (A2),-(A7) 00028928 42 67 |Bg | CLR.W -(A7) 0002892a 42 67 |Bg | CLR.W -(A7) 0002892c 3f 04 |? | MOVE.W D4,-(A7) 0002892e 1f 01 | | MOVE.B D1,-(A7) 00028930 41 f9 00 02 f7 38 |A 8 | LEA.L 0x2f738,A0 00028936 2f 08 |/ | MOVE.L A0,-(A7) 00028938 48 51 |HQ | PEA.L (A1) 0002893a 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00028940 de c2 | | ADDA.W D2,A7 00028942 42 39 00 02 ef 36 |B9 6 | CLR.B 0x2ef36 00028948 4a 11 |J | TST.B (A1) 0002894a 66 06 |f | BNE 0x28952 0002894c 52 39 00 02 ef 36 |R9 6 | ADDQ.B #0x1,0x2ef36 00028952 41 f9 00 02 01 66 |A f | LEA.L 0x20166,A0 00028958 70 04 |p | MOVEQ.L #0x04,D0 0002895a 2f 20 |/ | MOVE.L -(A0),-(A7) 0002895c 51 c8 ff fc |Q | DBF D0,0x2895a 00028960 59 4f |YO | SUBQ.L #0x4,A7 00028962 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028966 3f 01 |? | MOVE.W D1,-(A7) 00028968 3f 02 |? | MOVE.W D2,-(A7) 0002896a 4e 93 |N | JSR (A3) 0002896c 5c 4f |\O | ADDQ.L #0x6,A7 0002896e 42 17 |B | CLR.B (A7) 00028970 42 27 |B' | CLR.B -(A7) 00028972 48 54 |HT | PEA.L (A4) 00028974 48 51 |HQ | PEA.L (A1) 00028976 48 52 |HR | PEA.L (A2) 00028978 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 0002897e de c3 | | ADDA.W D3,A7 00028980 4a 11 |J | TST.B (A1) 00028982 66 1c |f | BNE 0x289a0 00028984 2f 12 |/ | MOVE.L (A2),-(A7) 00028986 42 67 |Bg | CLR.W -(A7) 00028988 42 67 |Bg | CLR.W -(A7) 0002898a 3f 04 |? | MOVE.W D4,-(A7) 0002898c 1f 01 | | MOVE.B D1,-(A7) 0002898e 41 f9 00 02 f3 38 |A 8 | LEA.L 0x2f338,A0 00028994 2f 08 |/ | MOVE.L A0,-(A7) 00028996 48 51 |HQ | PEA.L (A1) 00028998 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 0002899e de c2 | | ADDA.W D2,A7 000289a0 42 39 00 02 ef 37 |B9 7 | CLR.B 0x2ef37 000289a6 4a 11 |J | TST.B (A1) 000289a8 66 06 |f | BNE 0x289b0 000289aa 52 39 00 02 ef 37 |R9 7 | ADDQ.B #0x1,0x2ef37 000289b0 4c df 1f 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4 000289b4 4e 5e |N^ | UNLK A6 000289b6 4e 75 |Nu | RTS 000289b8 ; -------------------------------------------------------------------------------------- 000289b8 ; OMSI PASCAL Function 000289b8 ; <LVAR 0x008 1(r)> 000289b8 ; <LVAR -0x00c @ 4(r)> 000289b8 ; <LVAR -0x00e @ 1(r)> 000289b8 ; -------------------------------------------------------------------------------------- 000289b8 4e 56 ff 60 |NV ` | LINK.W A6,#0xff60 000289bc bf d5 | | CMPA.L (A5),A7 000289be 62 06 |b | BHI 0x289c6 000289c0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000289c4 4e 76 |Nv | TRAPV 000289c6 de fc 00 92 | | ADDA.W #0x92,A7 000289ca 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000289ce 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 000289d4 47 ee ff f2 |G | LEA.L (A6-0xe),A3 000289d8 72 01 |r | MOVEQ.L #0x01,D1 000289da 74 14 |t | MOVEQ.L #0x14,D2 000289dc 76 28 |v( | MOVEQ.L #0x28,D3 000289de 38 3c 02 00 |8< | MOVE.W #0x200,D4 000289e2 7a 48 |zH | MOVEQ.L #0x48,D5 000289e4 7c 4c ||L | MOVEQ.L #0x4c,D6 000289e6 4a 39 00 02 ef 35 |J9 5 | TST.B 0x2ef35 000289ec 67 00 00 b0 |g | BEQ 0x28a9e 000289f0 41 f9 00 02 01 44 |A D | LEA.L 0x20144,A0 000289f6 70 04 |p | MOVEQ.L #0x04,D0 000289f8 2f 20 |/ | MOVE.L -(A0),-(A7) 000289fa 51 c8 ff fc |Q | DBF D0,0x289f8 000289fe 59 4f |YO | SUBQ.L #0x4,A7 00028a00 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028a04 3f 01 |? | MOVE.W D1,-(A7) 00028a06 3f 02 |? | MOVE.W D2,-(A7) 00028a08 4e 92 |N | JSR (A2) 00028a0a 5c 4f |\O | ADDQ.L #0x6,A7 00028a0c 1e 81 | | MOVE.B D1,(A7) 00028a0e 1f 01 | | MOVE.B D1,-(A7) 00028a10 48 78 00 01 |Hx | PEA.L 0x1 00028a14 48 53 |HS | PEA.L (A3) 00028a16 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00028a1a 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00028a20 de c3 | | ADDA.W D3,A7 00028a22 4a 13 |J | TST.B (A3) 00028a24 66 1e |f | BNE 0x28a44 00028a26 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00028a2a 42 67 |Bg | CLR.W -(A7) 00028a2c 42 67 |Bg | CLR.W -(A7) 00028a2e 3f 04 |? | MOVE.W D4,-(A7) 00028a30 1f 01 | | MOVE.B D1,-(A7) 00028a32 41 f9 00 02 ef 38 |A 8 | LEA.L 0x2ef38,A0 00028a38 2f 08 |/ | MOVE.L A0,-(A7) 00028a3a 48 53 |HS | PEA.L (A3) 00028a3c 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00028a42 de c2 | | ADDA.W D2,A7 00028a44 4a 13 |J | TST.B (A3) 00028a46 67 54 |gT | BEQ 0x28a9c 00028a48 4a 2e 00 08 |J. | TST.B (A6+0x8) 00028a4c 67 4e |gN | BEQ 0x28a9c 00028a4e 9e c5 | | SUBA.W D5,A7 00028a50 20 4f | O | MOVEA.L A7,A0 00028a52 43 fa 93 1e |C | LEA.L 0x21d72,A1 00028a56 70 46 |pF | MOVEQ.L #0x46,D0 00028a58 10 d9 | | MOVE.B (A1)+,(A0)+ 00028a5a 51 c8 ff fc |Q | DBF D0,0x28a58 00028a5e 59 4f |YO | SUBQ.L #0x4,A7 00028a60 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028a64 3f 01 |? | MOVE.W D1,-(A7) 00028a66 3f 3c 00 47 |?< G | MOVE.W #0x47,-(A7) 00028a6a 4e 92 |N | JSR (A2) 00028a6c 50 4f |PO | ADDQ.L #0x8,A7 00028a6e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00028a74 de c6 | | ADDA.W D6,A7 00028a76 41 fa 93 82 |A | LEA.L 0x21dfa,A0 00028a7a 70 0f |p | MOVEQ.L #0x0f,D0 00028a7c 2f 20 |/ | MOVE.L -(A0),-(A7) 00028a7e 51 c8 ff fc |Q | DBF D0,0x28a7c 00028a82 59 4f |YO | SUBQ.L #0x4,A7 00028a84 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028a88 3f 01 |? | MOVE.W D1,-(A7) 00028a8a 3f 3c 00 40 |?< @ | MOVE.W #0x40,-(A7) 00028a8e 4e 92 |N | JSR (A2) 00028a90 50 4f |PO | ADDQ.L #0x8,A7 00028a92 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00028a98 de fc 00 44 | D | ADDA.W #0x44,A7 00028a9c 60 58 |`X | BRA 0x28af6 00028a9e 4a 2e 00 08 |J. | TST.B (A6+0x8) 00028aa2 67 52 |gR | BEQ 0x28af6 00028aa4 9e fc 00 4a | J | SUBA.W #0x4a,A7 00028aa8 20 4f | O | MOVEA.L A7,A0 00028aaa 43 fa 92 30 |C 0 | LEA.L 0x21cdc,A1 00028aae 70 48 |pH | MOVEQ.L #0x48,D0 00028ab0 10 d9 | | MOVE.B (A1)+,(A0)+ 00028ab2 51 c8 ff fc |Q | DBF D0,0x28ab0 00028ab6 59 4f |YO | SUBQ.L #0x4,A7 00028ab8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028abc 3f 01 |? | MOVE.W D1,-(A7) 00028abe 3f 3c 00 49 |?< I | MOVE.W #0x49,-(A7) 00028ac2 4e 92 |N | JSR (A2) 00028ac4 50 4f |PO | ADDQ.L #0x8,A7 00028ac6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00028acc 54 4f |TO | ADDQ.L #0x2,A7 00028ace 20 4f | O | MOVEA.L A7,A0 00028ad0 43 fa 92 54 |C T | LEA.L 0x21d26,A1 00028ad4 70 4a |pJ | MOVEQ.L #0x4a,D0 00028ad6 10 d9 | | MOVE.B (A1)+,(A0)+ 00028ad8 51 c8 ff fc |Q | DBF D0,0x28ad6 00028adc 59 4f |YO | SUBQ.L #0x4,A7 00028ade 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028ae2 3f 01 |? | MOVE.W D1,-(A7) 00028ae4 3f 3c 00 4b |?< K | MOVE.W #0x4b,-(A7) 00028ae8 4e 92 |N | JSR (A2) 00028aea 50 4f |PO | ADDQ.L #0x8,A7 00028aec 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00028af2 de fc 00 50 | P | ADDA.W #0x50,A7 00028af6 4a 2e 00 08 |J. | TST.B (A6+0x8) 00028afa 67 00 01 36 |g 6 | BEQ 0x28c32 00028afe 4a 39 00 02 ef 36 |J9 6 | TST.B 0x2ef36 00028b04 66 00 01 2c |f , | BNE 0x28c32 00028b08 41 fa 93 38 |A 8 | LEA.L 0x21e42,A0 00028b0c 70 11 |p | MOVEQ.L #0x11,D0 00028b0e 2f 20 |/ | MOVE.L -(A0),-(A7) 00028b10 51 c8 ff fc |Q | DBF D0,0x28b0e 00028b14 59 4f |YO | SUBQ.L #0x4,A7 00028b16 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028b1a 3f 01 |? | MOVE.W D1,-(A7) 00028b1c 3f 05 |? | MOVE.W D5,-(A7) 00028b1e 4e 92 |N | JSR (A2) 00028b20 50 4f |PO | ADDQ.L #0x8,A7 00028b22 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00028b28 55 4f |UO | SUBQ.L #0x2,A7 00028b2a 20 4f | O | MOVEA.L A7,A0 00028b2c 43 fa 93 14 |C | LEA.L 0x21e42,A1 00028b30 70 4c |pL | MOVEQ.L #0x4c,D0 00028b32 10 d9 | | MOVE.B (A1)+,(A0)+ 00028b34 51 c8 ff fc |Q | DBF D0,0x28b32 00028b38 59 4f |YO | SUBQ.L #0x4,A7 00028b3a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028b3e 3f 01 |? | MOVE.W D1,-(A7) 00028b40 3f 3c 00 4d |?< M | MOVE.W #0x4d,-(A7) 00028b44 4e 92 |N | JSR (A2) 00028b46 50 4f |PO | ADDQ.L #0x8,A7 00028b48 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00028b4e de fc 00 52 | R | ADDA.W #0x52,A7 00028b52 41 fa 93 88 |A | LEA.L 0x21edc,A0 00028b56 70 12 |p | MOVEQ.L #0x12,D0 00028b58 2f 20 |/ | MOVE.L -(A0),-(A7) 00028b5a 51 c8 ff fc |Q | DBF D0,0x28b58 00028b5e 59 4f |YO | SUBQ.L #0x4,A7 00028b60 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028b64 3f 01 |? | MOVE.W D1,-(A7) 00028b66 3f 06 |? | MOVE.W D6,-(A7) 00028b68 4e 92 |N | JSR (A2) 00028b6a 50 4f |PO | ADDQ.L #0x8,A7 00028b6c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00028b72 de fc 00 18 | | ADDA.W #0x18,A7 00028b76 20 4f | O | MOVEA.L A7,A0 00028b78 43 fa 93 62 |C b | LEA.L 0x21edc,A1 00028b7c 70 36 |p6 | MOVEQ.L #0x36,D0 00028b7e 10 d9 | | MOVE.B (A1)+,(A0)+ 00028b80 51 c8 ff fc |Q | DBF D0,0x28b7e 00028b84 51 4f |QO | SUBQ.L #0x8,A7 00028b86 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00028b8a 3f 01 |? | MOVE.W D1,-(A7) 00028b8c 3f 3c 00 37 |?< 7 | MOVE.W #0x37,-(A7) 00028b90 4e 92 |N | JSR (A2) 00028b92 50 4f |PO | ADDQ.L #0x8,A7 00028b94 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00028b9a 58 4f |XO | ADDQ.L #0x4,A7 00028b9c 28 5f |(_ | MOVEA.L (A7)+,A4 00028b9e de fc 00 38 | 8 | ADDA.W #0x38,A7 00028ba2 30 14 |0 | MOVE.W (A4),D0 00028ba4 0c 40 00 02 | @ | CMPI.W #0x0002,D0 00028ba8 6c 28 |l( | BGE 0x28bd2 00028baa 9e fc 00 10 | | SUBA.W #0x10,A7 00028bae 20 4f | O | MOVEA.L A7,A0 00028bb0 43 fa 93 e4 |C | LEA.L 0x21f96,A1 00028bb4 70 0e |p | MOVEQ.L #0x0e,D0 00028bb6 10 d9 | | MOVE.B (A1)+,(A0)+ 00028bb8 51 c8 ff fc |Q | DBF D0,0x28bb6 00028bbc 59 4f |YO | SUBQ.L #0x4,A7 00028bbe 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028bc2 3f 01 |? | MOVE.W D1,-(A7) 00028bc4 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00028bc8 4e 92 |N | JSR (A2) 00028bca 50 4f |PO | ADDQ.L #0x8,A7 00028bcc 28 5f |(_ | MOVEA.L (A7)+,A4 00028bce de fc 00 10 | | ADDA.W #0x10,A7 00028bd2 2f 0c |/ | MOVE.L A4,-(A7) 00028bd4 1f 3c 00 0d | < | MOVE.B #0x0d,-(A7) 00028bd8 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00028bde 54 4f |TO | ADDQ.L #0x2,A7 00028be0 2e 8c |. | MOVE.L A4,(A7) 00028be2 1f 3c 00 0a | < | MOVE.B #0x0a,-(A7) 00028be6 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00028bec 54 4f |TO | ADDQ.L #0x2,A7 00028bee 2e 8c |. | MOVE.L A4,(A7) 00028bf0 42 27 |B' | CLR.B -(A7) 00028bf2 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00028bf8 5c 4f |\O | ADDQ.L #0x6,A7 00028bfa 7e 01 |~ | MOVEQ.L #0x01,D7 00028bfc 20 07 | | MOVE.L D7,D0 00028bfe 53 80 |S | SUBQ.L #0x1,D0 00028c00 0c 80 00 00 03 ff | | CMPI.L #0x000003ff,D0 00028c06 63 02 |c | BLS 0x28c0a 00028c08 4e 4f |NO | TRAP #15 00028c0a 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00028c10 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00028c14 20 07 | | MOVE.L D7,D0 00028c16 53 80 |S | SUBQ.L #0x1,D0 00028c18 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 00028c1e 63 02 |c | BLS 0x28c22 00028c20 4e 4f |NO | TRAP #15 00028c22 11 74 08 02 60 66 | t `f | MOVE.B (A4+D0.L+#0x2),(A0+0x6066) 00028c28 52 87 |R | ADDQ.L #0x1,D7 00028c2a 0c 87 00 00 00 64 | d | CMPI.L #0x00000064,D7 00028c30 6f ca |o | BLE 0x28bfc 00028c32 4a 2e 00 08 |J. | TST.B (A6+0x8) 00028c36 66 0a |f | BNE 0x28c42 00028c38 4a 39 00 02 ef 36 |J9 6 | TST.B 0x2ef36 00028c3e 67 00 01 0a |g | BEQ 0x28d4a 00028c42 41 f9 00 02 01 52 |A R | LEA.L 0x20152,A0 00028c48 70 06 |p | MOVEQ.L #0x06,D0 00028c4a 3f 20 |? | MOVE.W -(A0),-(A7) 00028c4c 51 c8 ff fc |Q | DBF D0,0x28c4a 00028c50 59 4f |YO | SUBQ.L #0x4,A7 00028c52 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028c56 3f 01 |? | MOVE.W D1,-(A7) 00028c58 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00028c5c 4e 92 |N | JSR (A2) 00028c5e 5c 4f |\O | ADDQ.L #0x6,A7 00028c60 1e 81 | | MOVE.B D1,(A7) 00028c62 1f 01 | | MOVE.B D1,-(A7) 00028c64 48 78 00 01 |Hx | PEA.L 0x1 00028c68 48 53 |HS | PEA.L (A3) 00028c6a 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00028c6e 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00028c74 de fc 00 22 | " | ADDA.W #0x22,A7 00028c78 4a 13 |J | TST.B (A3) 00028c7a 66 1e |f | BNE 0x28c9a 00028c7c 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00028c80 42 67 |Bg | CLR.W -(A7) 00028c82 42 67 |Bg | CLR.W -(A7) 00028c84 3f 04 |? | MOVE.W D4,-(A7) 00028c86 1f 01 | | MOVE.B D1,-(A7) 00028c88 41 f9 00 02 f7 38 |A 8 | LEA.L 0x2f738,A0 00028c8e 2f 08 |/ | MOVE.L A0,-(A7) 00028c90 48 53 |HS | PEA.L (A3) 00028c92 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00028c98 de c2 | | ADDA.W D2,A7 00028c9a 4a 13 |J | TST.B (A3) 00028c9c 67 50 |gP | BEQ 0x28cee 00028c9e 41 fa 92 ba |A | LEA.L 0x21f5a,A0 00028ca2 70 22 |p" | MOVEQ.L #0x22,D0 00028ca4 3f 20 |? | MOVE.W -(A0),-(A7) 00028ca6 51 c8 ff fc |Q | DBF D0,0x28ca4 00028caa 59 4f |YO | SUBQ.L #0x4,A7 00028cac 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028cb0 3f 01 |? | MOVE.W D1,-(A7) 00028cb2 3f 3c 00 46 |?< F | MOVE.W #0x46,-(A7) 00028cb6 4e 92 |N | JSR (A2) 00028cb8 50 4f |PO | ADDQ.L #0x8,A7 00028cba 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00028cc0 de fc 00 0e | | ADDA.W #0xe,A7 00028cc4 20 4f | O | MOVEA.L A7,A0 00028cc6 43 fa 92 92 |C | LEA.L 0x21f5a,A1 00028cca 70 3a |p: | MOVEQ.L #0x3a,D0 00028ccc 10 d9 | | MOVE.B (A1)+,(A0)+ 00028cce 51 c8 ff fc |Q | DBF D0,0x28ccc 00028cd2 59 4f |YO | SUBQ.L #0x4,A7 00028cd4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028cd8 3f 01 |? | MOVE.W D1,-(A7) 00028cda 3f 3c 00 3b |?< ; | MOVE.W #0x3b,-(A7) 00028cde 4e 92 |N | JSR (A2) 00028ce0 50 4f |PO | ADDQ.L #0x8,A7 00028ce2 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00028ce8 de fc 00 40 | @ | ADDA.W #0x40,A7 00028cec 60 5c |`\ | BRA 0x28d4a 00028cee 41 fa 92 de |A | LEA.L 0x21fce,A0 00028cf2 70 09 |p | MOVEQ.L #0x09,D0 00028cf4 2f 20 |/ | MOVE.L -(A0),-(A7) 00028cf6 51 c8 ff fc |Q | DBF D0,0x28cf4 00028cfa 59 4f |YO | SUBQ.L #0x4,A7 00028cfc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028d00 3f 01 |? | MOVE.W D1,-(A7) 00028d02 3f 03 |? | MOVE.W D3,-(A7) 00028d04 4e 92 |N | JSR (A2) 00028d06 50 4f |PO | ADDQ.L #0x8,A7 00028d08 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00028d0e de fc 00 2c | , | ADDA.W #0x2c,A7 00028d12 7e 01 |~ | MOVEQ.L #0x01,D7 00028d14 20 07 | | MOVE.L D7,D0 00028d16 53 80 |S | SUBQ.L #0x1,D0 00028d18 0c 80 00 00 03 ff | | CMPI.L #0x000003ff,D0 00028d1e 63 02 |c | BLS 0x28d22 00028d20 4e 4f |NO | TRAP #15 00028d22 41 f9 00 02 96 d2 |A | LEA.L 0x296d2,A0 00028d28 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00028d2c 4a 28 60 66 |J(`f | TST.B (A0+0x6066) 00028d30 67 18 |g | BEQ 0x28d4a 00028d32 0c 87 00 00 00 1e | | CMPI.L #0x0000001e,D7 00028d38 6c 10 |l | BGE 0x28d4a 00028d3a 1f 28 60 66 | (`f | MOVE.B (A0+0x6066),-(A7) 00028d3e 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char) 00028d44 54 4f |TO | ADDQ.L #0x2,A7 00028d46 52 87 |R | ADDQ.L #0x1,D7 00028d48 60 ca |` | BRA 0x28d14 00028d4a 4a 39 00 02 ef 37 |J9 7 | TST.B 0x2ef37 00028d50 67 54 |gT | BEQ 0x28da6 00028d52 41 f9 00 02 01 66 |A f | LEA.L 0x20166,A0 00028d58 70 04 |p | MOVEQ.L #0x04,D0 00028d5a 2f 20 |/ | MOVE.L -(A0),-(A7) 00028d5c 51 c8 ff fc |Q | DBF D0,0x28d5a 00028d60 59 4f |YO | SUBQ.L #0x4,A7 00028d62 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028d66 3f 01 |? | MOVE.W D1,-(A7) 00028d68 3f 02 |? | MOVE.W D2,-(A7) 00028d6a 4e 92 |N | JSR (A2) 00028d6c 5c 4f |\O | ADDQ.L #0x6,A7 00028d6e 1e 81 | | MOVE.B D1,(A7) 00028d70 1f 01 | | MOVE.B D1,-(A7) 00028d72 48 78 00 01 |Hx | PEA.L 0x1 00028d76 48 53 |HS | PEA.L (A3) 00028d78 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00028d7c 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00028d82 de c3 | | ADDA.W D3,A7 00028d84 4a 13 |J | TST.B (A3) 00028d86 66 1e |f | BNE 0x28da6 00028d88 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00028d8c 42 67 |Bg | CLR.W -(A7) 00028d8e 42 67 |Bg | CLR.W -(A7) 00028d90 3f 04 |? | MOVE.W D4,-(A7) 00028d92 1f 01 | | MOVE.B D1,-(A7) 00028d94 41 f9 00 02 f3 38 |A 8 | LEA.L 0x2f338,A0 00028d9a 2f 08 |/ | MOVE.L A0,-(A7) 00028d9c 48 53 |HS | PEA.L (A3) 00028d9e 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00028da4 de c2 | | ADDA.W D2,A7 00028da6 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00028daa 4e 5e |N^ | UNLK A6 00028dac 4e 75 |Nu | RTS 00028dae ; -------------------------------------------------------------------------------------- 00028dae ; OMSI PASCAL Function 00028dae ; <LVAR 0x008 1(r)> 00028dae ; -------------------------------------------------------------------------------------- 00028dae 4e 56 ff a4 |NV | LINK.W A6,#0xffa4 00028db2 bf d5 | | CMPA.L (A5),A7 00028db4 62 06 |b | BHI 0x28dbc 00028db6 44 fc 00 02 |D | MOVE.W #0x2,CCR 00028dba 4e 76 |Nv | TRAPV 00028dbc de fc 00 5a | Z | ADDA.W #0x5a,A7 00028dc0 48 e7 e0 c0 |H | MOVEM.L A1+A0+D2+D1+D0,-(A7) 00028dc4 72 01 |r | MOVEQ.L #0x01,D1 00028dc6 74 34 |t4 | MOVEQ.L #0x34,D2 00028dc8 42 27 |B' | CLR.B -(A7) 00028dca 4e ba 9f a4 |N | JSR 0x22d70 00028dce 54 4f |TO | ADDQ.L #0x2,A7 00028dd0 4e ba b1 56 |N V | JSR 0x23f28 00028dd4 4a 2e 00 08 |J. | TST.B (A6+0x8) 00028dd8 67 04 |g | BEQ 0x28dde 00028dda 4e ba b3 90 |N | JSR 0x2416c 00028dde 10 39 00 02 96 da | 9 | MOVE.B 0x296da,D0 00028de4 0c 00 00 02 | | CMPI.B #0x02,D0 00028de8 66 28 |f( | BNE 0x28e12 00028dea 30 39 00 02 96 dc |09 | MOVE.W 0x296dc,D0 00028df0 b0 79 00 02 97 10 | y | CMP.W 0x29710,D0 00028df6 66 1a |f | BNE 0x28e12 00028df8 13 c1 00 02 97 0a | | MOVE.B D1,0x2970a 00028dfe 42 27 |B' | CLR.B -(A7) 00028e00 4e b9 00 01 04 04 |N | JSR SetSomeKindOfFlag(a : Byte) 00028e06 42 57 |BW | CLR.W (A7) 00028e08 42 67 |Bg | CLR.W -(A7) 00028e0a 4e b9 00 01 02 02 |N | JSR KC01_DumpOn 00028e10 58 4f |XO | ADDQ.L #0x4,A7 00028e12 4e ba c5 24 |N $ | JSR 0x25338 00028e16 55 4f |UO | SUBQ.L #0x2,A7 00028e18 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 00028e1e 4a 1f |J | TST.B (A7)+ 00028e20 66 04 |f | BNE 0x28e26 00028e22 4e ba d3 76 |N v | JSR 0x2619a 00028e26 4e ba f4 9c |N | JSR 0x282c4 00028e2a 9e c2 | | SUBA.W D2,A7 00028e2c 20 4f | O | MOVEA.L A7,A0 00028e2e 43 fa 91 9e |C | LEA.L 0x21fce,A1 00028e32 70 32 |p2 | MOVEQ.L #0x32,D0 00028e34 10 d9 | | MOVE.B (A1)+,(A0)+ 00028e36 51 c8 ff fc |Q | DBF D0,0x28e34 00028e3a 5d 4f |]O | SUBQ.L #0x6,A7 00028e3c 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00028e40 3f 01 |? | MOVE.W D1,-(A7) 00028e42 3f 3c 00 33 |?< 3 | MOVE.W #0x33,-(A7) 00028e46 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00028e4c 5c 4f |\O | ADDQ.L #0x6,A7 00028e4e 1e 81 | | MOVE.B D1,(A7) 00028e50 4e b9 00 01 03 f0 |N | JSR AskOnConsoleYesNo(prompt : String; default : Bool) : Bool 00028e56 5c 4f |\O | ADDQ.L #0x6,A7 00028e58 4a 1f |J | TST.B (A7)+ 00028e5a 67 04 |g | BEQ 0x28e60 00028e5c 4e ba f2 9e |N | JSR 0x280fc 00028e60 de c2 | | ADDA.W D2,A7 00028e62 48 79 00 02 97 04 |Hy | PEA.L 0x29704 00028e68 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00028e6e 58 4f |XO | ADDQ.L #0x4,A7 00028e70 4c df 03 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1 00028e74 4e 5e |N^ | UNLK A6 00028e76 4e 75 |Nu | RTS 00028e78 ; -------------------------------------------------------------------------------------- 00028e78 ; OMSI PASCAL Function 00028e78 ; <LVAR -0x002 @> 00028e78 ; <LVAR -0x003 @ 1(r)> 00028e78 ; <LVAR -0x004 @ 1(r)> 00028e78 ; -------------------------------------------------------------------------------------- 00028e78 4e 56 ff 7c |NV | | LINK.W A6,#0xff7c 00028e7c bf d5 | | CMPA.L (A5),A7 00028e7e 62 06 |b | BHI 0x28e86 00028e80 44 fc 00 02 |D | MOVE.W #0x2,CCR 00028e84 4e 76 |Nv | TRAPV 00028e86 de fc 00 80 | | ADDA.W #0x80,A7 00028e8a 48 e7 f8 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7) 00028e8e 45 f9 00 01 02 c4 |E | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A2 00028e94 47 f9 00 01 03 e0 |G | LEA.L WriteConsoleStringCrLf(str : String),A3 00028e9a 49 fa 96 86 |I | LEA.L 0x22522,A4 00028e9e 72 01 |r | MOVEQ.L #0x01,D1 00028ea0 74 02 |t | MOVEQ.L #0x02,D2 00028ea2 76 42 |vB | MOVEQ.L #0x42,D3 00028ea4 78 32 |x2 | MOVEQ.L #0x32,D4 00028ea6 13 c1 00 02 ef 34 | 4 | MOVE.B D1,0x2ef34 00028eac 10 39 00 02 96 da | 9 | MOVE.B 0x296da,D0 00028eb2 b0 02 | | CMP.B D2,D0 00028eb4 66 20 |f | BNE 0x28ed6 00028eb6 41 fa 91 ba |A | LEA.L 0x22072,A0 00028eba 70 1e |p | MOVEQ.L #0x1e,D0 00028ebc 3f 20 |? | MOVE.W -(A0),-(A7) 00028ebe 51 c8 ff fc |Q | DBF D0,0x28ebc 00028ec2 59 4f |YO | SUBQ.L #0x4,A7 00028ec4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028ec8 3f 01 |? | MOVE.W D1,-(A7) 00028eca 3f 3c 00 3e |?< > | MOVE.W #0x3e,-(A7) 00028ece 4e 92 |N | JSR (A2) 00028ed0 50 4f |PO | ADDQ.L #0x8,A7 00028ed2 4e 93 |N | JSR (A3) 00028ed4 de c3 | | ADDA.W D3,A7 00028ed6 1f 01 | | MOVE.B D1,-(A7) 00028ed8 4e ba 9e 96 |N | JSR 0x22d70 00028edc 54 4f |TO | ADDQ.L #0x2,A7 00028ede 4a 39 00 02 97 09 |J9 | TST.B 0x29709 00028ee4 66 26 |f& | BNE 0x28f0c 00028ee6 9e c4 | | SUBA.W D4,A7 00028ee8 20 4f | O | MOVEA.L A7,A0 00028eea 43 fa 91 16 |C | LEA.L 0x22002,A1 00028eee 70 30 |p0 | MOVEQ.L #0x30,D0 00028ef0 10 d9 | | MOVE.B (A1)+,(A0)+ 00028ef2 51 c8 ff fc |Q | DBF D0,0x28ef0 00028ef6 59 4f |YO | SUBQ.L #0x4,A7 00028ef8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028efc 3f 01 |? | MOVE.W D1,-(A7) 00028efe 3f 3c 00 31 |?< 1 | MOVE.W #0x31,-(A7) 00028f02 4e 92 |N | JSR (A2) 00028f04 50 4f |PO | ADDQ.L #0x8,A7 00028f06 4e 94 |N | JSR (A4) 00028f08 de fc 00 36 | 6 | ADDA.W #0x36,A7 00028f0c 48 6e ff fc |Hn | PEA.L (A6-0x4) 00028f10 4e ba aa 34 |N 4 | JSR 0x23946 00028f14 58 4f |XO | ADDQ.L #0x4,A7 00028f16 4a 2e ff fc |J. | TST.B (A6-0x4) 00028f1a 66 22 |f" | BNE 0x28f3e 00028f1c 41 fa 91 6c |A l | LEA.L 0x2208a,A0 00028f20 70 05 |p | MOVEQ.L #0x05,D0 00028f22 2f 20 |/ | MOVE.L -(A0),-(A7) 00028f24 51 c8 ff fc |Q | DBF D0,0x28f22 00028f28 59 4f |YO | SUBQ.L #0x4,A7 00028f2a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028f2e 3f 01 |? | MOVE.W D1,-(A7) 00028f30 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00028f34 4e 92 |N | JSR (A2) 00028f36 50 4f |PO | ADDQ.L #0x8,A7 00028f38 4e 94 |N | JSR (A4) 00028f3a de fc 00 1c | | ADDA.W #0x1c,A7 00028f3e 3f 39 00 01 00 08 |?9 | MOVE.W 0x10008,-(A7) 00028f44 48 6e ff fd |Hn | PEA.L (A6-0x3) 00028f48 4e b9 00 01 03 94 |N | JSR MountDisk(drive : Word ; VAR status : Byte) 00028f4e 5c 4f |\O | ADDQ.L #0x6,A7 00028f50 4a 2e ff fd |J. | TST.B (A6-0x3) 00028f54 67 3a |g: | BEQ 0x28f90 00028f56 2f 3a 91 3e |/: > | MOVE.L 0x22096,-(A7) 00028f5a 2f 3a 91 36 |/: 6 | MOVE.L 0x22092,-(A7) 00028f5e 2f 3a 91 2e |/: . | MOVE.L 0x2208e,-(A7) 00028f62 2f 3a 91 26 |/: & | MOVE.L 0x2208a,-(A7) 00028f66 51 4f |QO | SUBQ.L #0x8,A7 00028f68 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00028f6c 3f 01 |? | MOVE.W D1,-(A7) 00028f6e 3f 3c 00 10 |?< | MOVE.W #0x10,-(A7) 00028f72 4e 92 |N | JSR (A2) 00028f74 54 4f |TO | ADDQ.L #0x2,A7 00028f76 1e ae ff fd | | MOVE.B (A6-0x3),(A7) 00028f7a 4e b9 00 01 03 a0 |N | JSR FsErrMsgStr(err: Byte) : String 00028f80 54 4f |TO | ADDQ.L #0x2,A7 00028f82 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00028f88 50 4f |PO | ADDQ.L #0x8,A7 00028f8a 4e 94 |N | JSR (A4) 00028f8c de fc 00 14 | | ADDA.W #0x14,A7 00028f90 4e ba f8 ce |N | JSR 0x28860 00028f94 10 39 00 02 96 da | 9 | MOVE.B 0x296da,D0 00028f9a b0 02 | | CMP.B D2,D0 00028f9c 66 28 |f( | BNE 0x28fc6 00028f9e 30 39 00 02 96 dc |09 | MOVE.W 0x296dc,D0 00028fa4 b0 79 00 02 97 10 | y | CMP.W 0x29710,D0 00028faa 66 1a |f | BNE 0x28fc6 00028fac 13 c1 00 02 97 0a | | MOVE.B D1,0x2970a 00028fb2 42 27 |B' | CLR.B -(A7) 00028fb4 4e b9 00 01 04 04 |N | JSR SetSomeKindOfFlag(a : Byte) 00028fba 42 57 |BW | CLR.W (A7) 00028fbc 42 67 |Bg | CLR.W -(A7) 00028fbe 4e b9 00 01 02 02 |N | JSR KC01_DumpOn 00028fc4 58 4f |XO | ADDQ.L #0x4,A7 00028fc6 4e ba f2 fc |N | JSR 0x282c4 00028fca 42 27 |B' | CLR.B -(A7) 00028fcc 4e ba f9 ea |N | JSR 0x289b8 00028fd0 54 4f |TO | ADDQ.L #0x2,A7 00028fd2 4e ba f1 28 |N ( | JSR 0x280fc 00028fd6 48 79 00 02 97 04 |Hy | PEA.L 0x29704 00028fdc 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00028fe2 58 4f |XO | ADDQ.L #0x4,A7 00028fe4 41 fa 90 d4 |A | LEA.L 0x220ba,A0 00028fe8 70 07 |p | MOVEQ.L #0x07,D0 00028fea 2f 20 |/ | MOVE.L -(A0),-(A7) 00028fec 51 c8 ff fc |Q | DBF D0,0x28fea 00028ff0 59 4f |YO | SUBQ.L #0x4,A7 00028ff2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00028ff6 3f 01 |? | MOVE.W D1,-(A7) 00028ff8 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7) 00028ffc 4e 92 |N | JSR (A2) 00028ffe 50 4f |PO | ADDQ.L #0x8,A7 00029000 4e 93 |N | JSR (A3) 00029002 de fc 00 22 | " | ADDA.W #0x22,A7 00029006 1e 81 | | MOVE.B D1,(A7) 00029008 4e ba f9 ae |N | JSR 0x289b8 0002900c 54 4f |TO | ADDQ.L #0x2,A7 0002900e 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00029014 9e fc 00 0e | | SUBA.W #0xe,A7 00029018 20 4f | O | MOVEA.L A7,A0 0002901a 43 fa 90 9e |C | LEA.L 0x220ba,A1 0002901e 70 0c |p | MOVEQ.L #0x0c,D0 00029020 10 d9 | | MOVE.B (A1)+,(A0)+ 00029022 51 c8 ff fc |Q | DBF D0,0x29020 00029026 51 4f |QO | SUBQ.L #0x8,A7 00029028 20 4f | O | MOVEA.L A7,A0 0002902a 43 fa 90 9c |C | LEA.L 0x220c8,A1 0002902e 70 06 |p | MOVEQ.L #0x06,D0 00029030 10 d9 | | MOVE.B (A1)+,(A0)+ 00029032 51 c8 ff fc |Q | DBF D0,0x29030 00029036 59 4f |YO | SUBQ.L #0x4,A7 00029038 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002903c 3f 01 |? | MOVE.W D1,-(A7) 0002903e 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 00029042 4e 92 |N | JSR (A2) 00029044 58 4f |XO | ADDQ.L #0x4,A7 00029046 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002904a 3f 01 |? | MOVE.W D1,-(A7) 0002904c 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 00029050 4e 92 |N | JSR (A2) 00029052 5c 4f |\O | ADDQ.L #0x6,A7 00029054 1e 81 | | MOVE.B D1,(A7) 00029056 48 6e ff fe |Hn | PEA.L (A6-0x2) 0002905a 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00029060 de fc 00 24 | $ | ADDA.W #0x24,A7 00029064 41 fa 90 ac |A | LEA.L 0x22112,A0 00029068 70 20 |p | MOVEQ.L #0x20,D0 0002906a 3f 20 |? | MOVE.W -(A0),-(A7) 0002906c 51 c8 ff fc |Q | DBF D0,0x2906a 00029070 59 4f |YO | SUBQ.L #0x4,A7 00029072 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00029076 3f 01 |? | MOVE.W D1,-(A7) 00029078 3f 03 |? | MOVE.W D3,-(A7) 0002907a 4e 92 |N | JSR (A2) 0002907c 50 4f |PO | ADDQ.L #0x8,A7 0002907e 4e 93 |N | JSR (A3) 00029080 55 4f |UO | SUBQ.L #0x2,A7 00029082 20 4f | O | MOVEA.L A7,A0 00029084 43 fa 90 8c |C | LEA.L 0x22112,A1 00029088 70 46 |pF | MOVEQ.L #0x46,D0 0002908a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002908c 51 c8 ff fc |Q | DBF D0,0x2908a 00029090 59 4f |YO | SUBQ.L #0x4,A7 00029092 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00029096 3f 01 |? | MOVE.W D1,-(A7) 00029098 3f 3c 00 47 |?< G | MOVE.W #0x47,-(A7) 0002909c 4e 92 |N | JSR (A2) 0002909e 50 4f |PO | ADDQ.L #0x8,A7 000290a0 4e 93 |N | JSR (A3) 000290a2 de c4 | | ADDA.W D4,A7 000290a4 20 4f | O | MOVEA.L A7,A0 000290a6 43 fa 90 b2 |C | LEA.L 0x2215a,A1 000290aa 70 18 |p | MOVEQ.L #0x18,D0 000290ac 10 d9 | | MOVE.B (A1)+,(A0)+ 000290ae 51 c8 ff fc |Q | DBF D0,0x290ac 000290b2 59 4f |YO | SUBQ.L #0x4,A7 000290b4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000290b8 3f 01 |? | MOVE.W D1,-(A7) 000290ba 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000290be 4e 92 |N | JSR (A2) 000290c0 50 4f |PO | ADDQ.L #0x8,A7 000290c2 4e 94 |N | JSR (A4) 000290c4 de fc 00 1e | | ADDA.W #0x1e,A7 000290c8 4c df 1f 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4 000290cc 4e 5e |N^ | UNLK A6 000290ce 4e 75 |Nu | RTS 000290d0 ; -------------------------------------------------------------------------------------- 000290d0 ; OMSI PASCAL Function 000290d0 ; -------------------------------------------------------------------------------------- 000290d0 START: 000290d0 4f fa 00 08 |O | LEA.L MAIN,A7 000290d4 4e f9 00 01 02 80 |N | JMP ?start_program 000290da MAIN: 000290da 4e b9 00 01 04 00 |N | JSR FSCALL_10400 000290e0 4e b9 00 01 05 e6 |N | JSR Set_fc04_to_01(void) 000290e6 9e fc 00 26 | & | SUBA.W #0x26,A7 000290ea 20 4f | O | MOVEA.L A7,A0 000290ec 43 f9 00 02 01 0a |C | LEA.L 0x2010a,A1 000290f2 70 24 |p$ | MOVEQ.L #0x24,D0 000290f4 10 d9 | | MOVE.B (A1)+,(A0)+ 000290f6 51 c8 ff fc |Q | DBF D0,0x290f4 000290fa 59 4f |YO | SUBQ.L #0x4,A7 000290fc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00029100 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00029104 3f 3c 00 25 |?< % | MOVE.W #0x25,-(A7) 00029108 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002910e 50 4f |PO | ADDQ.L #0x8,A7 00029110 23 df 00 02 fb 3e |# > | MOVE.L (A7)+,0x2fb3e 00029116 de fc 00 26 | & | ADDA.W #0x26,A7 0002911a 20 79 00 02 fb 3e | y > | MOVEA.L 0x2fb3e,A0 00029120 30 10 |0 | MOVE.W (A0),D0 00029122 48 c0 |H | EXTW.L D0 00029124 2f 00 |/ | MOVE.L D0,-(A7) 00029126 70 01 |p | MOVEQ.L #0x01,D0 00029128 b0 97 | | CMP.L (A7),D0 0002912a 6e 36 |n6 | BGT 0x29162 0002912c 23 c0 00 02 fb 3a |# : | MOVE.L D0,0x2fb3a 00029132 20 79 00 02 fb 3e | y > | MOVEA.L 0x2fb3e,A0 00029138 22 00 |" | MOVE.L D0,D1 0002913a 53 81 |S | SUBQ.L #0x1,D1 0002913c 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00029142 63 02 |c | BLS 0x29146 00029144 4e 4f |NO | TRAP #15 00029146 0c 80 00 00 00 04 | | CMPI.L #0x00000004,D0 0002914c 6f 0a |o | BLE 0x29158 0002914e 14 30 18 02 | 0 | MOVE.B (A0+D1.L+#0x2),D2 00029152 0c 02 00 2c | , | CMPI.B #0x2c,D2 00029156 66 06 |f | BNE 0x2915e 00029158 11 bc 00 20 18 02 | | MOVE.B #0x20,(A0+D1.L+#0x2) 0002915e 52 80 |R | ADDQ.L #0x1,D0 00029160 68 c6 |h | BVC 0x29128 00029162 2e b9 00 02 fb 3e |. > | MOVE.L 0x2fb3e,(A7) 00029168 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002916e 58 4f |XO | ADDQ.L #0x4,A7 00029170 41 f9 00 02 97 1e |A | LEA.L 0x2971e,A0 00029176 23 c8 00 02 97 16 |# | MOVE.L A0,0x29716 0002917c 2f 08 |/ | MOVE.L A0,-(A7) 0002917e 23 df 00 02 97 1a |# | MOVE.L (A7)+,0x2971a 00029184 48 79 00 02 96 da |Hy | PEA.L 0x296da 0002918a 48 79 00 02 96 dc |Hy | PEA.L 0x296dc 00029190 4e b9 00 01 02 00 |N | JSR KC00_GetBootDev(VAR a : Byte; VAR b : Word) 00029196 50 4f |PO | ADDQ.L #0x8,A7 00029198 42 39 00 02 97 0a |B9 | CLR.B 0x2970a 0002919e 10 39 00 02 96 da | 9 | MOVE.B 0x296da,D0 000291a4 0c 00 00 02 | | CMPI.B #0x02,D0 000291a8 67 06 |g | BEQ 0x291b0 000291aa 52 39 00 02 97 0a |R9 | ADDQ.B #0x1,0x2970a 000291b0 55 4f |UO | SUBQ.L #0x2,A7 000291b2 4e b9 00 01 06 0a |N | JSR Is_machine_type_four() : Bool 000291b8 4a 1f |J | TST.B (A7)+ 000291ba 67 14 |g | BEQ 0x291d0 000291bc 41 f9 00 02 96 e2 |A | LEA.L 0x296e2,A0 000291c2 43 fa 91 a0 |C | LEA.L 0x22364,A1 000291c6 70 05 |p | MOVEQ.L #0x05,D0 000291c8 20 d9 | | MOVE.L (A1)+,(A0)+ 000291ca 51 c8 ff fc |Q | DBF D0,0x291c8 000291ce 60 12 |` | BRA 0x291e2 000291d0 41 f9 00 02 96 e2 |A | LEA.L 0x296e2,A0 000291d6 43 fa 91 74 |C t | LEA.L 0x2234c,A1 000291da 70 05 |p | MOVEQ.L #0x05,D0 000291dc 20 d9 | | MOVE.L (A1)+,(A0)+ 000291de 51 c8 ff fc |Q | DBF D0,0x291dc 000291e2 42 39 00 02 eb 32 |B9 2 | CLR.B 0x2eb32 000291e8 42 39 00 02 ef 34 |B9 4 | CLR.B 0x2ef34 000291ee 2f 3a 8f 8c |/: | MOVE.L 0x2217c,-(A7) 000291f2 2f 3a 8f 84 |/: | MOVE.L 0x22178,-(A7) 000291f6 2f 3a 8f 7c |/: | | MOVE.L 0x22174,-(A7) 000291fa 59 4f |YO | SUBQ.L #0x4,A7 000291fc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00029200 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00029204 3f 3c 00 0c |?< | MOVE.W #0xc,-(A7) 00029208 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002920e 50 4f |PO | ADDQ.L #0x8,A7 00029210 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00029216 54 4f |TO | ADDQ.L #0x2,A7 00029218 20 4f | O | MOVEA.L A7,A0 0002921a 43 fa 8f 64 |C d | LEA.L 0x22180,A1 0002921e 70 0c |p | MOVEQ.L #0x0c,D0 00029220 10 d9 | | MOVE.B (A1)+,(A0)+ 00029222 51 c8 ff fc |Q | DBF D0,0x29220 00029226 59 4f |YO | SUBQ.L #0x4,A7 00029228 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002922c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00029230 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 00029234 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002923a 50 4f |PO | ADDQ.L #0x8,A7 0002923c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00029242 9e fc 00 1a | | SUBA.W #0x1a,A7 00029246 20 4f | O | MOVEA.L A7,A0 00029248 43 fa 8f 44 |C D | LEA.L 0x2218e,A1 0002924c 70 2a |p* | MOVEQ.L #0x2a,D0 0002924e 10 d9 | | MOVE.B (A1)+,(A0)+ 00029250 51 c8 ff fc |Q | DBF D0,0x2924e 00029254 59 4f |YO | SUBQ.L #0x4,A7 00029256 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002925a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002925e 3f 3c 00 2b |?< + | MOVE.W #0x2b,-(A7) 00029262 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00029268 50 4f |PO | ADDQ.L #0x8,A7 0002926a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00029270 de fc 00 30 | 0 | ADDA.W #0x30,A7 00029274 41 fa 8f 82 |A | LEA.L 0x221f8,A0 00029278 70 1e |p | MOVEQ.L #0x1e,D0 0002927a 3f 20 |? | MOVE.W -(A0),-(A7) 0002927c 51 c8 ff fc |Q | DBF D0,0x2927a 00029280 59 4f |YO | SUBQ.L #0x4,A7 00029282 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00029286 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002928a 3f 3c 00 3e |?< > | MOVE.W #0x3e,-(A7) 0002928e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00029294 50 4f |PO | ADDQ.L #0x8,A7 00029296 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002929c de fc 00 14 | | ADDA.W #0x14,A7 000292a0 20 4f | O | MOVEA.L A7,A0 000292a2 43 fa 8f 54 |C T | LEA.L 0x221f8,A1 000292a6 70 2c |p, | MOVEQ.L #0x2c,D0 000292a8 10 d9 | | MOVE.B (A1)+,(A0)+ 000292aa 51 c8 ff fc |Q | DBF D0,0x292a8 000292ae 59 4f |YO | SUBQ.L #0x4,A7 000292b0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000292b4 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000292b8 3f 3c 00 2d |?< - | MOVE.W #0x2d,-(A7) 000292bc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000292c2 50 4f |PO | ADDQ.L #0x8,A7 000292c4 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000292ca de fc 00 32 | 2 | ADDA.W #0x32,A7 000292ce 41 fa 8f 80 |A | LEA.L 0x22250,A0 000292d2 70 14 |p | MOVEQ.L #0x14,D0 000292d4 3f 20 |? | MOVE.W -(A0),-(A7) 000292d6 51 c8 ff fc |Q | DBF D0,0x292d4 000292da 59 4f |YO | SUBQ.L #0x4,A7 000292dc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000292e0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000292e4 3f 3c 00 2a |?< * | MOVE.W #0x2a,-(A7) 000292e8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000292ee 50 4f |PO | ADDQ.L #0x8,A7 000292f0 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000292f6 de fc 00 10 | | ADDA.W #0x10,A7 000292fa 20 4f | O | MOVEA.L A7,A0 000292fc 43 fa 8f 52 |C R | LEA.L 0x22250,A1 00029300 70 1c |p | MOVEQ.L #0x1c,D0 00029302 10 d9 | | MOVE.B (A1)+,(A0)+ 00029304 51 c8 ff fc |Q | DBF D0,0x29302 00029308 59 4f |YO | SUBQ.L #0x4,A7 0002930a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002930e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00029312 3f 3c 00 1d |?< | MOVE.W #0x1d,-(A7) 00029316 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002931c 50 4f |PO | ADDQ.L #0x8,A7 0002931e 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00029324 de fc 00 22 | " | ADDA.W #0x22,A7 00029328 41 fa 8f 70 |A p | LEA.L 0x2229a,A0 0002932c 70 0a |p | MOVEQ.L #0x0a,D0 0002932e 2f 20 |/ | MOVE.L -(A0),-(A7) 00029330 51 c8 ff fc |Q | DBF D0,0x2932e 00029334 59 4f |YO | SUBQ.L #0x4,A7 00029336 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002933a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002933e 3f 3c 00 2c |?< , | MOVE.W #0x2c,-(A7) 00029342 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00029348 50 4f |PO | ADDQ.L #0x8,A7 0002934a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00029350 de fc 00 20 | | ADDA.W #0x20,A7 00029354 20 4f | O | MOVEA.L A7,A0 00029356 43 fa 8f 42 |C B | LEA.L 0x2229a,A1 0002935a 70 0e |p | MOVEQ.L #0x0e,D0 0002935c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002935e 51 c8 ff fc |Q | DBF D0,0x2935c 00029362 51 4f |QO | SUBQ.L #0x8,A7 00029364 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00029368 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002936c 3f 3c 00 0f |?< | MOVE.W #0xf,-(A7) 00029370 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00029376 50 4f |PO | ADDQ.L #0x8,A7 00029378 48 78 00 00 |Hx | PEA.L 0x0 0002937c 48 78 00 06 |Hx | PEA.L 0x6 00029380 4e b9 00 01 03 ec |N | JSR AskOnConsoleIntRange(prompt: String; low : Long; High : Long) : Long 00029386 de fc 00 0c | | ADDA.W #0xc,A7 0002938a 10 2f 00 03 | / | MOVE.B (A7+0x3),D0 0002938e 48 80 |H | EXTB.W D0 00029390 41 bc 00 06 |A | CHK.W #0x6,D0 00029394 de fc 00 14 | | ADDA.W #0x14,A7 00029398 13 c0 00 02 fb 38 | 8 | MOVE.B D0,0x2fb38 0002939e 12 00 | | MOVE.B D0,D1 000293a0 48 81 |H | EXTB.W D1 000293a2 30 01 |0 | MOVE.W D1,D0 000293a4 0c 40 00 06 | @ | CMPI.W #0x0006,D0 000293a8 63 02 |c | BLS 0x293ac 000293aa 4e 4e |NN | TRAP #14 000293ac d0 40 | @ | ADD.W D0,D0 000293ae 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000293b6 00 0e | | .CONST 0xe ; [0x0] -> 0x293c4 000293b8 00 10 | | .CONST 0x10 ; [0x1] -> 0x293c6 000293ba 00 10 | | .CONST 0x10 ; [0x2] -> 0x293c6 000293bc 00 28 | ( | .CONST 0x28 ; [0x3] -> 0x293de 000293be 00 28 | ( | .CONST 0x28 ; [0x4] -> 0x293de 000293c0 00 80 | | .CONST 0x80 ; [0x5] -> 0x29436 000293c2 00 22 | " | .CONST 0x22 ; [0x6] -> 0x293d8 000293c4 switch@0x293ae[0x0]: 000293c4 60 74 |`t | BRA 0x2943a 000293c6 switch@0x293ae[0x1]: 000293c6 switch@0x293ae[0x2]: 000293c6 42 27 |B' | CLR.B -(A7) 000293c8 0c 01 00 02 | | CMPI.B #0x02,D1 000293cc 66 02 |f | BNE 0x293d0 000293ce 52 17 |R | ADDQ.B #0x1,(A7) 000293d0 4e ba f9 dc |N | JSR 0x28dae 000293d4 54 4f |TO | ADDQ.L #0x2,A7 000293d6 60 62 |`b | BRA 0x2943a 000293d8 switch@0x293ae[0x6]: 000293d8 4e ba ef 8c |N | JSR 0x28366 000293dc 60 5c |`\ | BRA 0x2943a 000293de switch@0x293ae[0x3]: 000293de switch@0x293ae[0x4]: 000293de 55 4f |UO | SUBQ.L #0x2,A7 000293e0 4e b9 00 01 06 10 |N | JSR Is_machine_type_one_or_three() : Bool 000293e6 4a 1f |J | TST.B (A7)+ 000293e8 67 34 |g4 | BEQ 0x2941e 000293ea 9e fc 00 3c | < | SUBA.W #0x3c,A7 000293ee 20 4f | O | MOVEA.L A7,A0 000293f0 43 fa 8e b8 |C | LEA.L 0x222aa,A1 000293f4 70 3a |p: | MOVEQ.L #0x3a,D0 000293f6 10 d9 | | MOVE.B (A1)+,(A0)+ 000293f8 51 c8 ff fc |Q | DBF D0,0x293f6 000293fc 59 4f |YO | SUBQ.L #0x4,A7 000293fe 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00029402 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00029406 3f 3c 00 3b |?< ; | MOVE.W #0x3b,-(A7) 0002940a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00029410 50 4f |PO | ADDQ.L #0x8,A7 00029412 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00029418 de fc 00 40 | @ | ADDA.W #0x40,A7 0002941c 60 16 |` | BRA 0x29434 0002941e 42 27 |B' | CLR.B -(A7) 00029420 10 39 00 02 fb 38 | 9 8 | MOVE.B 0x2fb38,D0 00029426 0c 00 00 03 | | CMPI.B #0x03,D0 0002942a 66 02 |f | BNE 0x2942e 0002942c 52 17 |R | ADDQ.B #0x1,(A7) 0002942e 4e ba f2 ac |N | JSR 0x286dc 00029432 54 4f |TO | ADDQ.L #0x2,A7 00029434 60 04 |` | BRA 0x2943a 00029436 switch@0x293ae[0x5]: 00029436 4e ba fa 40 |N @ | JSR 0x28e78 0002943a 4a 39 00 02 fb 38 |J9 8 | TST.B 0x2fb38 00029440 67 04 |g | BEQ 0x29446 00029442 60 00 fd 9e |` | BRA 0x291e2 00029446 4a 39 00 02 97 0a |J9 | TST.B 0x2970a 0002944c 67 64 |gd | BEQ 0x294b2 0002944e 9e fc 00 3c | < | SUBA.W #0x3c,A7 00029452 20 4f | O | MOVEA.L A7,A0 00029454 43 fa 8e 96 |C | LEA.L 0x222ec,A1 00029458 70 3a |p: | MOVEQ.L #0x3a,D0 0002945a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002945c 51 c8 ff fc |Q | DBF D0,0x2945a 00029460 59 4f |YO | SUBQ.L #0x4,A7 00029462 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00029466 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002946a 3f 3c 00 3b |?< ; | MOVE.W #0x3b,-(A7) 0002946e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00029474 50 4f |PO | ADDQ.L #0x8,A7 00029476 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002947c de fc 00 1c | | ADDA.W #0x1c,A7 00029480 20 4f | O | MOVEA.L A7,A0 00029482 43 fa 8e a4 |C | LEA.L 0x22328,A1 00029486 70 22 |p" | MOVEQ.L #0x22,D0 00029488 10 d9 | | MOVE.B (A1)+,(A0)+ 0002948a 51 c8 ff fc |Q | DBF D0,0x29488 0002948e 59 4f |YO | SUBQ.L #0x4,A7 00029490 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00029494 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00029498 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 0002949c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000294a2 50 4f |PO | ADDQ.L #0x8,A7 000294a4 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000294aa de fc 00 28 | ( | ADDA.W #0x28,A7 000294ae 60 fe |` | BRA 0x294ae 000294b0 60 14 |` | .XXX[0x2] 000294b2 4e b9 00 01 03 98 |N | JSR FSCALL_10398 000294b8 42 27 |B' | CLR.B -(A7) 000294ba 48 78 00 01 |Hx | PEA.L 0x1 000294be 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000294c4 5c 4f |\O | ADDQ.L #0x6,A7 000294c6 4e b9 00 01 02 84 |N | JSR ?exit 000294cc 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 000294da ; -------------------------------------------------------------------------------------- 000294da ; OMSI PASCAL Function 000294da ; <LVAR 0x008 1(r)> 000294da ; -------------------------------------------------------------------------------------- 000294da PROG_FAIL: 000294da 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 000294de bf d5 | | CMPA.L (A5),A7 000294e0 62 06 |b | BHI 0x294e8 000294e2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000294e6 4e 76 |Nv | TRAPV 000294e8 de fc 00 2c | , | ADDA.W #0x2c,A7 000294ec 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 000294f0 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 000294f4 70 06 |p | MOVEQ.L #0x06,D0 000294f6 3f 20 |? | MOVE.W -(A0),-(A7) 000294f8 51 c8 ff fc |Q | DBF D0,0x294f6 000294fc 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00029500 51 4f |QO | SUBQ.L #0x8,A7 00029502 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00029506 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002950a 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 0002950e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00029514 58 4f |XO | ADDQ.L #0x4,A7 00029516 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 0002951a 48 80 |H | EXTB.W D0 0002951c 48 c0 |H | EXTW.L D0 0002951e 2f 00 |/ | MOVE.L D0,-(A7) 00029520 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00029526 58 4f |XO | ADDQ.L #0x4,A7 00029528 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002952e 50 4f |PO | ADDQ.L #0x8,A7 00029530 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00029536 de fc 00 14 | | ADDA.W #0x14,A7 0002953a 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 0002953e 4e 5e |N^ | UNLK A6 00029540 4e 75 |Nu | RTS 00029542 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 00029550 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 0002955e 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 0002956c 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 0002957e 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 00029596 ; -------------------------------------------------------------------------------------- 00029596 ; OMSI PASCAL Function 00029596 ; <LVAR 0x00e 1(r)> 00029596 ; <LVAR 0x00a 4(r)> 00029596 ; <LVAR 0x008 1(r)> 00029596 ; -------------------------------------------------------------------------------------- 00029596 EXP_FAIL: 00029596 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 0002959a bf d5 | | CMPA.L (A5),A7 0002959c 62 06 |b | BHI 0x295a4 0002959e 44 fc 00 02 |D | MOVE.W #0x2,CCR 000295a2 4e 76 |Nv | TRAPV 000295a4 de fc 00 74 | t | ADDA.W #0x74,A7 000295a8 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 000295ac 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 000295b2 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 000295b8 72 01 |r | MOVEQ.L #0x01,D1 000295ba 74 0d |t | MOVEQ.L #0x0d,D2 000295bc 76 1e |v | MOVEQ.L #0x1e,D3 000295be 78 12 |x | MOVEQ.L #0x12,D4 000295c0 7a 0e |z | MOVEQ.L #0x0e,D5 000295c2 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000295c8 41 fa ff b4 |A | LEA.L 0x2957e,A0 000295cc 70 08 |p | MOVEQ.L #0x08,D0 000295ce 3f 20 |? | MOVE.W -(A0),-(A7) 000295d0 51 c8 ff fc |Q | DBF D0,0x295ce 000295d4 59 4f |YO | SUBQ.L #0x4,A7 000295d6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000295da 3f 01 |? | MOVE.W D1,-(A7) 000295dc 3f 04 |? | MOVE.W D4,-(A7) 000295de 4e 93 |N | JSR (A3) 000295e0 50 4f |PO | ADDQ.L #0x8,A7 000295e2 4e 94 |N | JSR (A4) 000295e4 50 4f |PO | ADDQ.L #0x8,A7 000295e6 20 4f | O | MOVEA.L A7,A0 000295e8 43 fa ff 58 |C X | LEA.L 0x29542,A1 000295ec 70 0c |p | MOVEQ.L #0x0c,D0 000295ee 10 d9 | | MOVE.B (A1)+,(A0)+ 000295f0 51 c8 ff fc |Q | DBF D0,0x295ee 000295f4 51 4f |QO | SUBQ.L #0x8,A7 000295f6 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000295fa 3f 01 |? | MOVE.W D1,-(A7) 000295fc 3f 02 |? | MOVE.W D2,-(A7) 000295fe 4e 93 |N | JSR (A3) 00029600 54 4f |TO | ADDQ.L #0x2,A7 00029602 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00029606 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 0002960c 54 4f |TO | ADDQ.L #0x2,A7 0002960e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00029614 50 4f |PO | ADDQ.L #0x8,A7 00029616 4e 94 |N | JSR (A4) 00029618 de c4 | | ADDA.W D4,A7 0002961a 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 0002961e b0 c1 | | CMPA.W D1,A0 00029620 67 48 |gH | BEQ 0x2966a 00029622 9e c5 | | SUBA.W D5,A7 00029624 22 4f |"O | MOVEA.L A7,A1 00029626 45 fa ff 28 |E ( | LEA.L 0x29550,A2 0002962a 70 0c |p | MOVEQ.L #0x0c,D0 0002962c 12 da | | MOVE.B (A2)+,(A1)+ 0002962e 51 c8 ff fc |Q | DBF D0,0x2962c 00029632 9e c3 | | SUBA.W D3,A7 00029634 22 4f |"O | MOVEA.L A7,A1 00029636 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 0002963a 70 1d |p | MOVEQ.L #0x1d,D0 0002963c 12 d8 | | MOVE.B (A0)+,(A1)+ 0002963e 51 c8 ff fc |Q | DBF D0,0x2963c 00029642 51 4f |QO | SUBQ.L #0x8,A7 00029644 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00029648 3f 01 |? | MOVE.W D1,-(A7) 0002964a 3f 02 |? | MOVE.W D2,-(A7) 0002964c 4e 93 |N | JSR (A3) 0002964e 58 4f |XO | ADDQ.L #0x4,A7 00029650 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00029654 3f 01 |? | MOVE.W D1,-(A7) 00029656 3f 03 |? | MOVE.W D3,-(A7) 00029658 4e 93 |N | JSR (A3) 0002965a 50 4f |PO | ADDQ.L #0x8,A7 0002965c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00029662 50 4f |PO | ADDQ.L #0x8,A7 00029664 4e 94 |N | JSR (A4) 00029666 de fc 00 30 | 0 | ADDA.W #0x30,A7 0002966a 9e c5 | | SUBA.W D5,A7 0002966c 20 4f | O | MOVEA.L A7,A0 0002966e 43 fa fe ee |C | LEA.L 0x2955e,A1 00029672 70 0c |p | MOVEQ.L #0x0c,D0 00029674 10 d9 | | MOVE.B (A1)+,(A0)+ 00029676 51 c8 ff fc |Q | DBF D0,0x29674 0002967a 51 4f |QO | SUBQ.L #0x8,A7 0002967c 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00029680 3f 01 |? | MOVE.W D1,-(A7) 00029682 3f 02 |? | MOVE.W D2,-(A7) 00029684 4e 93 |N | JSR (A3) 00029686 54 4f |TO | ADDQ.L #0x2,A7 00029688 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 0002968c 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00029692 54 4f |TO | ADDQ.L #0x2,A7 00029694 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002969a 50 4f |PO | ADDQ.L #0x8,A7 0002969c 4e 94 |N | JSR (A4) 0002969e 5d 4f |]O | SUBQ.L #0x6,A7 000296a0 20 4f | O | MOVEA.L A7,A0 000296a2 43 fa fe da |C | LEA.L 0x2957e,A1 000296a6 70 16 |p | MOVEQ.L #0x16,D0 000296a8 10 d9 | | MOVE.B (A1)+,(A0)+ 000296aa 51 c8 ff fc |Q | DBF D0,0x296a8 000296ae 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000296b2 59 4f |YO | SUBQ.L #0x4,A7 000296b4 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000296b8 3f 01 |? | MOVE.W D1,-(A7) 000296ba 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 000296be 4e 93 |N | JSR (A3) 000296c0 50 4f |PO | ADDQ.L #0x8,A7 000296c2 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000296c8 de c3 | | ADDA.W D3,A7 000296ca 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 000296ce 4e 5e |N^ | UNLK A6 000296d0 4e 75 |Nu | RTS