|
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: 22016 (0x5600)
Types: M200
Notes: @(#)patch,2.1,90/12/06,12:44:00, M200_PROGRAM
Names: »PATCH.M200«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »PATCH.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »PATCH.M200«
@ 2039c
<LVAR 0x016 4(r)>
<LVAR 0x012 @ 4(r)>
<LVAR 0x010 1(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2039c-203fc Body>
<POP 2039c-203b2 Prologue> Σ0 ↓
<POP 203b2-203e4 Naked> Σ0 ↓ →0x203f4
<MI 203b2 MOVEA.L (A6+0x8),A0> {}
<MI 203b6 MOVEA.L (A6+0xc),A1> {}
<MI 203ba MOVE.L (A6+0x16),-(A7)> Δ-4 {[4, '(A6+0x16)']}
<Const 0x203be 0x0.4> Δ-4 {[4, '(A6+0x16)']|[##0]}
<MI 203c2 MOVE.L (A6+0x12),-(A7)> Δ-4 {[4, '(A6+0x16)']|[##0]|[4, '(A6+0x12)']}
<MI 203c6 PEA.L (A0)> Δ-4 {[4, '(A6+0x16)']|[##0]|[4, '(A6+0x12)']|[4, '^(A0)']}
<MI 203c8 PEA.L (A1)> Δ-4 {[4, '(A6+0x16)']|[##0]|[4, '(A6+0x12)']|[4, '^(A0)']|[4, '^(A1)']}
<Call 0x203ca 0x24c52> {[4, '(A6+0x16)']|[##0]|[4, '(A6+0x12)']|[4, '^(A0)']|[4, '^(A1)']}
<POP 203d0-203d4 StackAdj> Δ+20 {}
<Pointer.fp 0x203d4 <LVAR 0x012 @ 4(r)>> Δ-4 {[@@18]}
<Call 0x203d8 0x102bc> {[@@18]}
FreeString(VAR a : String)
<POP 203de-203e0 StackAdj> Δ+4 {}
<MI 203e0 TST.B (A1)> {}
<MI 203e2 BEQ 0x203f4> {}
<POP 203e4-203ea Naked> Σ0 ↓ →0x203f4
<MI 203e4 TST.B (A6+0x10)> {}
<MI 203e8 BNE 0x203f4> {}
<POP 203ea-203f4 Naked> Σ0 ↓
<MI 203ea PEA.L (A0)> Δ-4 {[4, '^(A0)']}
<Call 0x203ec 0x102bc> {[4, '^(A0)']}
FreeString(VAR a : String)
<POP 203f2-203f4 StackAdj> Δ+4 {}
<POP 203f4-203fc Epilogue> Σ0 ←0x203b2 ←0x203e4
@ 203fc
<LVAR 0x008 4(r)>
<POP 203fc-20422 Body>
<POP 203fc-2040e Prologue> Σ0 ↓
<POP 2040e-2041e Naked> Σ0 ↓
<Const 0x2040e 0xe.2> Δ-2 {[#14]}
<MI 20412 MOVE.L (A6+0x8),-(A7)> Δ-4 {[#14]|[4, '(A6+0x8)']}
<Call 0x20416 0x103b8> {[#14]|[4, '(A6+0x8)']}
PopProgram(status : Byte; msg : String)
<POP 2041c-2041e StackAdj> Δ+6 {}
<POP 2041e-20422 Epilogue> Σ0
@ 20422
<LVAR 0x00a 4(w)>
<LVAR 0x008 1(r)>
<POP 20422-20468 Body>
<POP 20422-20438 Prologue> Σ0 ↓
<POP 20438-2044c Naked> Σ0 ↓ →0x20458
<MI 20438 CLR.L D0> {}
<MI 2043a MOVE.B (A6+0x8),D0> {}
<MI 2043e LEA.L 0x20304,A0> {}
<MI 20442 MOVE.W D0,D1> {}
<MI 20444 LSR.W #0x3,D1> {}
<MI 20446 BTST.B D0,(A0+D1.W)> {}
<MI 2044a BEQ 0x20458> {}
<POP 2044c-20458 Naked> Σ0 →0x20460
<MI 2044c SUBI.W #0x0030,D0> {}
<MI 20450 EXTW.L D0> {}
<MI 20452 MOVE.L D0,(A6+0xa)> {}
<MI 20456 BRA 0x20460> {}
<POP 20458-20460 Naked> Σ0 ↓ ←0x20438
<MI 20458 MOVE.L #0xffffffff,(A6+0xa)> {}
<POP 20460-20468 Epilogue> Σ0 ←0x2044c
@ 20468
<LVAR 0x00a 4(w)>
<LVAR 0x008 1(rw)>
<POP 20468-204ec Body>
<POP 20468-2047e Prologue> Σ0 ↓
<POP 2047e-20484 RegCacheLoad> Σ0 ↓
<POP 20484-20496 Naked> Σ0 ↓ →0x2049e
<MI 20484 CLR.L D0> {}
<MI 20486 MOVE.B (A6+0x8),D0> {}
<MI 20488 LEA.L 0x20324,A0> {}
<MI 2048c MOVE.W D0,D1> {}
<MI 2048e LSR.W #0x3,D1> {}
<MI 20490 BTST.B D0,(A0+D1.W)> {}
<MI 20494 BEQ 0x2049e> {}
<POP 20496-2049e Naked> Σ0 ↓
<MI 20496 SUB.W #0x20,D0> {}
<POP 0x20498 LimitCheck 0x0 ≤ D0 ≤ 0xff> {}
<MI 2049c MOVE.B D0,(A6+0x8)> {}
<POP 2049e-204b0 Naked> Σ0 ↓ →0x204bc ←0x20484
<MI 2049e CLR.L D0> {}
<MI 204a0 MOVE.B (A6+0x8),D0> {}
<MI 204a2 LEA.L 0x20344,A0> {}
<MI 204a6 MOVE.W D0,D1> {}
<MI 204a8 LSR.W #0x3,D1> {}
<MI 204aa BTST.B D0,(A0+D1.W)> {}
<MI 204ae BEQ 0x204bc> {}
<POP 204b0-204b4 Naked> Σ0 ↓
<MI 204b0 SUBI.W #0x0030,D0> {}
<POP 204b4-204bc Naked> Σ0 →0x204e4 ←0x204d2
<MI 204b4 EXTW.L D0> {}
<MI 204b6 MOVE.L D0,(A6+0xa)> {}
<MI 204ba BRA 0x204e4> {}
<POP 204bc-204c8 Naked> Σ0 ↓ →0x204cc ←0x2049e
<MI 204bc LEA.L 0x20364,A0> {}
<MI 204c0 MOVE.W D0,D1> {}
<MI 204c2 LSR.W #0x3,D1> {}
<MI 204c4 CMP.W #0x20,D1> {}
<MI 204c6 BLT 0x204cc> {}
<POP 204c8-204cc Naked> Σ0 →0x204d0
<MI 204c8 MOVEQ.L #0x00,D1> {}
<MI 204ca BRA 0x204d0> {}
<POP 204cc-204d0 Naked> Σ0 ↓ ←0x204bc
<MI 204cc BTST.B D0,(A0+D1.W)> {}
<POP 204d0-204d2 Naked> Σ0 ↓ →0x204dc ←0x204c8
<MI 204d0 BEQ 0x204dc> {}
<POP 204d2-204dc Naked> Σ0 →0x204b4
<MI 204d2 SUBI.W #0x0041,D0> {}
<MI 204d6 ADDI.W #0x000a,D0> {}
<MI 204da BRA 0x204b4> {}
<POP 204dc-204e4 Naked> Σ0 ↓ ←0x204d0
<MI 204dc MOVE.L #0xffffffff,(A6+0xa)> {}
<POP 204e4-204ec Epilogue> Σ0 ←0x204b4
@ 204ec
<LVAR 0x00c 1(rw)>
<LVAR 0x008 4(r)>
<POP 204ec-20510 Body>
<POP 204ec-204fe Prologue> Σ0 ↓
<POP 204fe-20508 Naked> Σ0 ↓ →0x2050c
<MI 204fe CLR.B (A6+0xc)> {}
<MI 20502 TST.L (A6+0x8)> {}
<MI 20506 BLT 0x2050c> {}
<POP 20508-2050c Naked> Σ0 ↓
<MI 20508 ADDQ.B #0x1,(A6+0xc)> {}
<POP 2050c-20510 Epilogue> Σ0 ←0x204fe
@ 20510
<LVAR 0x014 @ 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x004 4(rw)>
<LVAR -0x008 4(rw)>
<LVAR -0x00e 2(rw)>
<POP 20510-20662 Body> Δ-10
<POP 20510-20526 Prologue> Σ0 ↓
<POP 20526-20536 RegCacheLoad> Σ0 ↓
<POP 20536-20550 Naked> Σ0 ↓ →0x20558
<MI 20536 MOVE.L #0xccccccc,(A6-0x8)> {}
<MI 2053e MOVE.L #0xf3333334,(A6-0x4)> {}
<MI 20546 MOVE.L (A6+0x10),D0> {}
<MI 20548 CMPI.L #0x0000000a,D0> {}
<MI 2054e BEQ 0x20558> {}
<POP 20550-20554 Naked> Σ0 ↓ →0x20558
<MI 20550 CMP.L #0x10,D0> {}
<MI 20552 BEQ 0x20558> {}
<POP 20554-20558 Naked> Σ0 →0x2064a
<MI 20554 BRA 0x2064a> {}
<POP 20558-2056a Naked> Σ0 Δ-4 ↓ →0x20570 ←0x20536 ←0x20550
<MI 20558 MOVEA.L (A6+0xc),A0> {}
<MI 2055c CLR.B (A0)> {}
<MI 2055e MOVEA.L (A6+0x14),A0> {}
<MI 20562 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 20564 MOVEQ.L #0x01,D6> {[4, 'A0']}
<MI 20566 TST.W (A0)> {[4, 'A0']}
<MI 20568 BNE 0x20570> {[4, 'A0']}
<POP 2056a-20570 Naked> Σ-4 Δ+4 →0x2064a
<POP 2056a-2056c StackAdj> Δ+4 {}
<MI 2056c BRA 0x2064a> {}
<POP 20570-2057a Naked> Σ-4 ↓ →0x20580 ←0x20558
<MI 20570 MOVEA.L (A7),A0> {[-4-]}
<MI 20572 MOVE.B (A0+0x2),D0> {[-4-]}
<MI 20576 CMP.B #0x2d,D0> {[-4-]}
<MI 20578 BNE 0x20580> {[-4-]}
<POP 2057a-20580 Naked> Σ-4 →0x20584
<MI 2057a MOVE.W #0xffff,(A6-0xe)> {[-4-]}
<MI 2057e BRA 0x20584> {[-4-]}
<POP 20580-20584 Naked> Σ-4 ↓ ←0x20570
<MI 20580 MOVE.W #0x1,(A6-0xe)> {[-4-]}
<POP 20584-2058e Naked> Σ-4 ↓ →0x20592 ←0x2057a
<MI 20584 MOVE.B (A0+0x2),D0> {[-4-]}
<MI 20588 CMPI.B #0x2b,D0> {[-4-]}
<MI 2058c BEQ 0x20592> {[-4-]}
<POP 2058e-20592 Naked> Σ-4 ↓ →0x205a2
<MI 2058e CMP.B #0x2d,D0> {[-4-]}
<MI 20590 BNE 0x205a2> {[-4-]}
<POP 20592-2059c Naked> Σ-4 ↓ →0x205a2 ←0x20584
<MI 20592 ADDQ.L #0x1,D6> {[-4-]}
<MI 20594 MOVE.W (A0),D0> {[-4-]}
<MI 20596 EXTW.L D0> {[-4-]}
<MI 20598 CMP.L D0,D6> {[-4-]}
<MI 2059a BLE 0x205a2> {[-4-]}
<POP 2059c-205a2 Naked> Σ-4 Δ+4 →0x2064a
<POP 2059c-2059e StackAdj> Δ+4 {}
<MI 2059e BRA 0x2064a> {}
<POP 205a2-205a6 Naked> Σ-4 ↓ ←0x2058e ←0x20592
<MI 205a2 MOVEA.L (A6+0x8),A0> {[-4-]}
<MI 205a4 CLR.L (A0)> {[-4-]}
<POP 205a6-205c0 Naked> Σ-4 ↓ →0x205ca ←0x2062c
<MI 205a6 MOVE.L D6,D0> {[-4-]}
<MI 205a8 SUBQ.L #0x1,D0> {[-4-]}
<POP 0x205aa LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-4-]}
<MI 205b4 MOVEA.L (A7),A0> {[-4-]}
<MI 205b6 MOVE.B (A0+D0.L+#0x2),D5> {[-4-]}
<MI 205ba MOVE.L (A6+0x10),D0> {[-4-]}
<MI 205bc CMP.L #0x10,D0> {[-4-]}
<MI 205be BNE 0x205ca> {[-4-]}
<POP 205c0-205ca Naked> Σ-4 Δ-6 →0x205d2
<POP 205c0-205c2 StackAdj> Δ-4 {[-8-]}
<MI 205c2 MOVE.B D5,-(A7)> Δ-2 {[-8-]|[2, 'D5']}
<Call 0x205c4 0x20468> {[-8-]|[2, 'D5']}
<MI 205c8 BRA 0x205d2> {[-8-]|[2, 'D5']}
<POP 205ca-205d2 Naked> Σ-4 Δ-6 ↓ ←0x205a6
<POP 205ca-205cc StackAdj> Δ-4 {[-8-]}
<MI 205cc MOVE.B D5,-(A7)> Δ-2 {[-8-]|[2, 'D5']}
<Call 0x205ce 0x20422> {[-8-]|[2, 'D5']}
<POP 205d2-205ec Naked> Σ-10 Δ+6 ↓ →0x205f2 ←0x205c0
<POP 205d2-205d4 StackAdj> Δ+2 {[-8-]}
<MI 205d4 MOVE.L (A7)+,D3> Δ+4 {[-4-]}
<MI 205d6 MOVE.W (A6-0xe),D4> {[-4-]}
<MI 205d8 EXTW.L D4> {[-4-]}
<Call 0x205da 0x1028c> {[-4-]}
?muls_d3_d4
<MI 205e0 MOVE.L D4,D7> {[-4-]}
<MI 205e2 MOVEA.L (A6+0x8),A1> {[-4-]}
<MI 205e4 MOVE.L (A1),D0> {[-4-]}
<MI 205e6 CMP.L (A6-0x4),D0> {[-4-]}
<MI 205ea BLT 0x205f2> {[-4-]}
<POP 205ec-205f2 Naked> Σ-4 ↓ →0x205f6
<MI 205ec CMP.L (A6-0x8),D0> {[-4-]}
<MI 205f0 BLE 0x205f6> {[-4-]}
<POP 205f2-205f6 Naked> Σ-4 Δ+4 →0x2064a ←0x205d2
<POP 205f2-205f4 StackAdj> Δ+4 {}
<MI 205f4 BRA 0x2064a> {}
<POP 205f6-20608 Naked> Σ-4 ↓ →0x2060c ←0x205ec
<MI 205f6 MOVEA.L (A6+0x8),A0> {[-4-]}
<MI 205f8 MOVE.L (A0),D4> {[-4-]}
<MI 205fa MOVE.L (A6+0x10),D3> {[-4-]}
<Call 0x205fc 0x1028c> {[-4-]}
?muls_d3_d4
<MI 20602 MOVE.L D4,(A0)> {[-4-]}
<MI 20604 TST.L D4> {[-4-]}
<MI 20606 BNE 0x2060c> {[-4-]}
<POP 20608-2060c Naked> Σ-4 Δ-2 →0x2062c
<POP 20608-2060a StackAdj> Δ-2 {[-6-]}
<MI 2060a BRA 0x2062c> {[-6-]}
<POP 2060c-20628 Naked> Σ-4 Δ-2 ↓ →0x2062c ←0x205f6
<POP 2060c-2060e StackAdj> Δ-2 {[-6-]}
<MI 2060e MOVE.L D4,-(A7)> Δ-4 {[-6-]|[4, 'D4']}
<Call 0x20610 0x204ec> {[-6-]|[4, 'D4']}
<POP 20614-20616 StackAdj> Δ+2 {[-6-]|[-2-]}
<MI 20616 MOVE.L D4,-(A7)> Δ-4 {[-6-]|[-2-]|[4, 'D4']}
<MI 20618 ADD.L D7,(A7)> {[-6-]|[-6-]}
<Call 0x2061a 0x204ec> {[-6-]|[-6-]}
<POP 2061e-20620 StackAdj> Δ+4 {[-6-]|[-2-]}
<MI 20620 MOVE.B (A7+0x2),D0> {[-6-]|[-2-]}
<MI 20624 CMP.B (A7)+,D0> Δ+2 {[-6-]}
<MI 20626 BEQ 0x2062c> {[-6-]}
<POP 20628-2062c Naked> Σ-6 Δ+6 →0x2064a
<POP 20628-2062a StackAdj> Δ+6 {}
<MI 2062a BRA 0x2064a> {}
<POP 2062c-20640 Naked> Σ-6 Δ+2 ↓ →0x205a6 ←0x20608 ←0x2060c
<POP 2062c-2062e StackAdj> Δ+2 {[-4-]}
<MI 2062e MOVEA.L (A6+0x8),A0> {[-4-]}
<MI 20630 ADD.L D7,(A0)> {[-4-]}
<MI 20632 ADDQ.L #0x1,D6> {[-4-]}
<MI 20634 MOVEA.L (A7),A0> {[-4-]}
<MI 20636 MOVE.W (A0),D0> {[-4-]}
<MI 20638 EXTW.L D0> {[-4-]}
<MI 2063a CMP.L D0,D6> {[-4-]}
<MI 2063c BLE 0x205a6> {[-4-]}
<POP 20640-2064a Naked> Σ-4 Δ+4 ↓
<MI 20640 MOVEA.L (A6+0xc),A0> {[-4-]}
<MI 20644 MOVE.B #0x01,(A0)> {[-4-]}
<POP 20648-2064a StackAdj> Δ+4 {}
<POP 2064a-2065a Naked> Σ0 ↓ ←0x20554 ←0x2056a ←0x2059c ←0x205f2 ←0x20628
<Pointer.fp 0x2064a <LVAR 0x014 @ 4(r)>> Δ-4 {[@@20]}
<Const 0x2064e 0x80.4> Δ-4 {[@@20]|[##128]}
<Call 0x20652 0x102a8> {[@@20]|[##128]}
Free2(a : Pointer; b : Long)
<POP 20658-2065a StackAdj> Δ+8 {}
<POP 2065a-20662 Epilogue> Σ0
@ 20662
<LVAR -0x004 @ 1(r)>
<LVAR -0x008 4(w)>
<LVAR -0x00e 4(w)>
<LVAR -0x010 2(rw)>
<LVAR -0x012 2(rw)>
<LVAR -0x014 2(w)>
<LVAR -0x016 2(w)>
<LVAR -0x01a 2(rw)>
<LVAR -0x01c 2(rw)>
<LVAR -0x01e 2(w)>
<LVAR -0x020 2(w)>
<LVAR -0x420 @>
<LVAR -0x428 4(w)>
<LVAR -0x42c @ 4(r)>
<LVAR -0x430 4(rw)>
<LVAR -0x434 @ 4(rw)>
<POP 20662-209a8 Body>
<POP 20662-20678 Prologue> Σ0 ↓
<POP 20678-20686 RegCacheLoad> Σ0 ↓
<POP 20686-206b2 Naked> Σ0 ↓ →0x206e2
<MI 20686 LEA.L (A6-0x420),A0> {}
<MI 2068a MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2068c MOVE.L (A7)+,(A6-0x434)> Δ+4 {}
<Blob 0x2068e [4] 0x254fe> Δ-4 {[«4»]}
<MI 20694 CLR.B -(A7)> Δ-2 {[«4»]|[#0]}
<Const 0x20696 0x1.2> Δ-2 {[«4»]|[#0]|[#1]}
<Const 0x2069a 0x0.4> Δ-4 {[«4»]|[#0]|[#1]|[##0]}
<Pointer.fp 0x2069e <LVAR -0x004 @ 1(r)>> Δ-4 {[«4»]|[#0]|[#1]|[##0]|[@@-4]}
<Pointer.fp 0x206a0 <LVAR -0x42c @ 4(r)>> Δ-4 {[«4»]|[#0]|[#1]|[##0]|[@@-4]|[@@-1068]}
<Call 0x206a4 0x10380> {[«4»]|[#0]|[#1]|[##0]|[@@-4]|[@@-1068]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 206aa-206ae StackAdj> Δ+20 {}
<MI 206ae TST.B (A6-0x4)> {}
<MI 206b0 BEQ 0x206e2> {}
<POP 206b2-206e2 Naked> Σ0 ↓
<Blob 0x206b2 [18] @> Δ-18 {[«18""»]}
<POP 206c4-206c6 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x206c6 17> {[«18""»]|[$$Problem with file]}
<Call 0x206da 0x203fc> {[«18""»]|[$$Problem with file]}
<POP 206de-206e2 StackAdj> Δ+22 {}
<POP 206e2-206fa Naked> Σ0 ↓ →0x206fe ←0x20686
<MI 206e2 MOVE.L 0x2550a,D4> {}
<MI 206e8 MOVE.L #0x1000000,D3> {}
<Call 0x206ee 0x10294> {}
?divs_d3_d4
<MI 206f0 DIVS.W #0x100,D4> {}
<MI 206f4 SWAP.W D4> {}
<MI 206f6 TST.W D4> {}
<MI 206f8 BGE 0x206fe> {}
<POP 206fa-206fe Naked> Σ0 ↓
<MI 206fa ADDI.W #0x0100,D4> {}
<POP 206fe-2071a Naked> Σ0 ↓ →0x2071e ←0x206e2
<MI 206fe MOVE.W D4,(A6-0x16)> {}
<MI 20702 MOVE.L 0x2550a,D4> {}
<MI 20708 MOVE.L #0x10000,D3> {}
<Call 0x2070e 0x10294> {}
?divs_d3_d4
<MI 20710 DIVS.W #0x100,D4> {}
<MI 20714 SWAP.W D4> {}
<MI 20716 TST.W D4> {}
<MI 20718 BGE 0x2071e> {}
<POP 2071a-2071e Naked> Σ0 ↓
<MI 2071a ADDI.W #0x0100,D4> {}
<POP 2071e-20760 Naked> Σ0 ↓ →0x20764 ←0x206fe
<MI 2071e MOVE.W D4,(A6-0x14)> {}
<MI 20722 MOVE.L 0x2550a,D4> {}
<MI 20728 MOVE.L #0x100,D3> {}
<Call 0x2072e 0x10294> {}
?divs_d3_d4
<MI 20730 MOVE.L D3,-(A7)> Δ-4 {[4, 'D3']}
<MI 20732 MOVE.L D4,-(A7)> Δ-4 {[4, 'D3']|[4, 'D4']}
<MI 20734 MOVE.L #0x100,D3> {[4, 'D3']|[4, 'D4']}
<Call 0x2073a 0x10294> {[4, 'D3']|[4, 'D4']}
?divs_d3_d4
<MI 2073c MOVE.W D3,(A6-0x12)> {[4, 'D3']|[4, 'D4']}
<MI 20740 MOVE.L (A7)+,D0> Δ+4 {[4, 'D3']}
<MI 20742 MOVE.L (A7)+,D1> Δ+4 {}
<MI 20744 MOVE.W D1,(A6-0x10)> {}
<MI 20748 MOVE.L 0x25504,D4> {}
<MI 2074e MOVE.L #0x1000000,D3> {}
<Call 0x20754 0x10294> {}
?divs_d3_d4
<MI 20756 DIVS.W #0x100,D4> {}
<MI 2075a SWAP.W D4> {}
<MI 2075c TST.W D4> {}
<MI 2075e BGE 0x20764> {}
<POP 20760-20764 Naked> Σ0 ↓
<MI 20760 ADDI.W #0x0100,D4> {}
<POP 20764-20780 Naked> Σ0 ↓ →0x20784 ←0x2071e
<MI 20764 MOVE.W D4,(A6-0x20)> {}
<MI 20768 MOVE.L 0x25504,D4> {}
<MI 2076e MOVE.L #0x10000,D3> {}
<Call 0x20774 0x10294> {}
?divs_d3_d4
<MI 20776 DIVS.W #0x100,D4> {}
<MI 2077a SWAP.W D4> {}
<MI 2077c TST.W D4> {}
<MI 2077e BGE 0x20784> {}
<POP 20780-20784 Naked> Σ0 ↓
<MI 20780 ADDI.W #0x0100,D4> {}
<POP 20784-207ca Naked> Σ0 →0x207d0 →0x207e2 →0x20804 ←0x20764
<MI 20784 MOVE.W D4,(A6-0x1e)> {}
<MI 20788 MOVE.L 0x25504,D4> {}
<MI 2078e MOVE.L #0x100,D3> {}
<Call 0x20794 0x10294> {}
?divs_d3_d4
<MI 20796 MOVE.L D3,-(A7)> Δ-4 {[4, 'D3']}
<MI 20798 MOVE.L D4,-(A7)> Δ-4 {[4, 'D3']|[4, 'D4']}
<MI 2079a MOVE.L #0x100,D3> {[4, 'D3']|[4, 'D4']}
<Call 0x207a0 0x10294> {[4, 'D3']|[4, 'D4']}
?divs_d3_d4
<MI 207a2 MOVE.W D3,(A6-0x1c)> {[4, 'D3']|[4, 'D4']}
<MI 207a6 MOVE.L (A7)+,D0> Δ+4 {[4, 'D3']}
<MI 207a8 MOVE.L (A7)+,D2> Δ+4 {}
<MI 207aa MOVE.W D2,(A6-0x1a)> {}
<MI 207ae MOVE.B 0x254f4,D0> {}
<MI 207b4 EXTB.W D0> {}
<MI 207b6 SUBQ.W #0x1,D0> {}
<POP 0x207b8 LimitCheck 0x0 ≤ D0 ≤ 0x2> {}
<MI 207c0 ADD.W D0,D0> {}
<MI 207c2 SWITCH D0.W> {}
<POP 207d0-207e2 Naked> Σ0 →0x2080c ←0x20784
<MI 207d0 MOVE.L #0x1,(A6-0x430)> {}
<MI 207d8 MOVE.W D1,(A6-0x16)> {}
<MI 207dc MOVE.W D2,(A6-0x20)> {}
<MI 207e0 BRA 0x2080c> {}
<POP 207e2-20804 Naked> Σ0 →0x2080c ←0x20784
<MI 207e2 MOVE.L #0x2,(A6-0x430)> {}
<MI 207ea MOVE.W (A6-0x12),(A6-0x16)> {}
<MI 207f0 MOVE.W (A6-0x10),(A6-0x14)> {}
<MI 207f6 MOVE.W (A6-0x1c),(A6-0x20)> {}
<MI 207fc MOVE.W (A6-0x1a),(A6-0x1e)> {}
<MI 20802 BRA 0x2080c> {}
<POP 20804-2080c Naked> Σ0 ↓ ←0x20784
<MI 20804 MOVE.L #0x4,(A6-0x430)> {}
<POP 2080c-20812 Naked> Σ0 Δ-4 ↓ ←0x207d0 ←0x207e2
<MI 2080c MOVE.L (A6-0x430),-(A7)> Δ-4 {[4, '(A6-0x430)']}
<MI 20810 MOVEQ.L #0x01,D0> {[4, '(A6-0x430)']}
<POP 20812-20818 Naked> Σ-4 ↓ →0x20984 ←0x2095a
<MI 20812 CMP.L (A7),D0> {[-4-]}
<MI 20814 BGT 0x20984> {[-4-]}
<POP 20818-2088e Naked> Σ-4 Δ-8 ↓ →0x208a4
<MI 20818 MOVE.L 0x254f6,D1> {[-4-]}
<MI 2081e SUB.L 0x254fa,D1> {[-4-]}
<MI 20824 ADD.L D0,D1> {[-4-]}
<MI 20826 SUBQ.L #0x1,D1> {[-4-]}
<MI 20828 MOVE.L D1,D4> {[-4-]}
<MI 2082a MOVE.L #0x400,D3> {[-4-]}
<Call 0x20830 0x10294> {[-4-]}
?divs_d3_d4
<MI 20832 MOVE.L D3,-(A7)> Δ-4 {[-4-]|[4, 'D3']}
<MI 20834 MOVE.L D4,-(A7)> Δ-4 {[-4-]|[4, 'D3']|[4, 'D4']}
<MI 20836 MOVE.L D4,(A6-0x428)> {[-4-]|[4, 'D3']|[4, 'D4']}
<MI 2083a MOVE.L D3,(A6-0xe)> {[-4-]|[4, 'D3']|[4, 'D4']}
<MI 2083e MOVE.L D3,D4> {[-4-]|[4, 'D3']|[4, 'D4']}
<MI 20840 MOVEQ.L #0x02,D3> {[-4-]|[4, 'D3']|[4, 'D4']}
<Call 0x20842 0x10294> {[-4-]|[4, 'D3']|[4, 'D4']}
?divs_d3_d4
<MI 20844 MOVE.L D4,(A6-0x8)> {[-4-]|[4, 'D3']|[4, 'D4']}
<MI 20848 MOVE.L (A7),D1> {[-4-]|[4, 'D3']|[4, 'D4']}
<POP 0x2084a LimitCheck 0x0 ≤ D1 ≤ 0x4000> {[-4-]|[4, 'D3']|[4, 'D4']}
<MI 20854 MOVE.L (A6-0x42c),-(A7)> Δ-4 {[-4-]|[4, 'D3']|[4, 'D4']|[4, '(A6-0x42c)']}
<MI 20858 MOVE.W D1,-(A7)> Δ-2 {[-4-]|[4, 'D3']|[4, 'D4']|[4, '(A6-0x42c)']|[2, 'D1']}
<MI 2085a CLR.W -(A7)> Δ-2 {[-4-]|[4, 'D3']|[4, 'D4']|[4, '(A6-0x42c)']|[2, 'D1']|[#0]}
<Const 0x2085c 0x200.2> Δ-2 {[-4-]|[4, 'D3']|[4, 'D4']|[4, '(A6-0x42c)']|[2, 'D1']|[#0]|[#512]}
<Const 0x20860 0x1.2> Δ-2 {[-4-]|[4, 'D3']|[4, 'D4']|[4, '(A6-0x42c)']|[2, 'D1']|[#0]|[#512]|[#1]}
<MI 20864 MOVE.L (A6-0x434),-(A7)> Δ-4 {[-4-]|[4, 'D3']|[4, 'D4']|[4, '(A6-0x42c)']|[2, 'D1']|[#0]|[#512]|[#1]|[4, '(A6-0x434)']}
<Pointer.fp 0x20866 <LVAR -0x004 @ 1(r)>> Δ-4 {[-4-]|[4, 'D3']|[4, 'D4']|[4, '(A6-0x42c)']|[2, 'D1']|[#0]|[#512]|[#1]|[4, '(A6-0x434)']|[@@-4]}
<Call 0x20868 0x10384> {[-4-]|[4, 'D3']|[4, 'D4']|[4, '(A6-0x42c)']|[2, 'D1']|[#0]|[#512]|[#1]|[4, '(A6-0x434)']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 2086e-20872 StackAdj> Δ+20 {[-4-]|[4, 'D3']|[4, 'D4']}
<POP 0x20872 LimitCheck 0x0 ≤ D4 ≤ 0x1ff> {[-4-]|[4, 'D3']|[4, 'D4']}
<MI 2087c ASL.L #0x1,D4> {[-4-]|[4, 'D3']|[4, 'D4']}
<MI 2087e LEA.L (A6-0x434),A0> {[-4-]|[4, 'D3']|[4, 'D4']}
<MI 20880 MOVE.W (A0+D4.L+#0x14),D7> {[-4-]|[4, 'D3']|[4, 'D4']}
<MI 20884 MOVE.L (A7+0x4),D2> {[-4-]|[4, 'D3']|[4, 'D4']}
<MI 20888 BTST.L #0x0,D2> {[-4-]|[4, 'D3']|[4, 'D4']}
<MI 2088c BEQ 0x208a4> {[-4-]|[4, 'D3']|[4, 'D4']}
<POP 2088e-208a4 Naked> Σ-12 →0x208b8
<MI 2088e MOVE.W D7,D3> {[-12-]}
<MI 20890 ANDI.W #0x00ff,D3> {[-12-]}
<POP 0x20894 LimitCheck 0x0 ≤ D3 ≤ 0xff> {[-12-]}
<MI 20898 MOVE.W D3,D5> {[-12-]}
<MI 2089a MOVE.W D7,D6> {[-12-]}
<MI 2089c LSR.W #0x8,D6> {[-12-]}
<MI 2089e ANDI.W #0x00ff,D6> {[-12-]}
<MI 208a2 BRA 0x208b8> {[-12-]}
<POP 208a4-208b8 Naked> Σ-12 ↓ ←0x20818
<MI 208a4 MOVE.W D7,D5> {[-12-]}
<MI 208a6 LSR.W #0x8,D5> {[-12-]}
<MI 208a8 ANDI.W #0x00ff,D5> {[-12-]}
<MI 208ac MOVE.W D7,D3> {[-12-]}
<MI 208ae ANDI.W #0x00ff,D3> {[-12-]}
<POP 0x208b2 LimitCheck 0x0 ≤ D3 ≤ 0xff> {[-12-]}
<MI 208b6 MOVE.W D3,D6> {[-12-]}
<POP 208b8-208c0 Naked> Σ-12 ↓ →0x20906 ←0x2088e
<MI 208b8 TST.B 0x25502> {[-12-]}
<MI 208be BEQ 0x20906> {[-12-]}
<POP 208c0-208dc Naked> Σ-12 ↓ →0x20906
<MI 208c0 MOVE.L D0,D3> {[-12-]}
<MI 208c2 SUBQ.L #0x1,D3> {[-12-]}
<POP 0x208c4 LimitCheck 0x0 ≤ D3 ≤ 0x3> {[-12-]}
<MI 208ce ASL.L #0x1,D3> {[-12-]}
<MI 208d0 LEA.L (A6-0x434),A1> {[-12-]}
<MI 208d2 LEA.L (A1+D3.L),A1> {[-12-]}
<MI 208d6 CMP.W (A1+0x414),D5> {[-12-]}
<MI 208da BEQ 0x20906> {[-12-]}
<POP 208dc-20906 Naked> Σ-12 ↓
<Blob 0x208dc [40] @> Δ-40 {[-12-]|[«40""»]}
<POP 208e8-208ea StackAdj> Δ-4 {[-12-]|[«40""»]|[-4-]}
<Lit 0x208ea 40> {[-12-]|[«40""»]|[$$Target data not as specified in OLD data]}
<Call 0x208fe 0x203fc> {[-12-]|[«40""»]|[$$Target data not as specified in OLD data]}
<POP 20902-20906 StackAdj> Δ+44 {[-12-]}
<POP 20906-2090c Naked> Σ-12 ↓ →0x20934 ←0x208b8 ←0x208c0
<MI 20906 BTST.L #0x0,D2> {[-12-]}
<MI 2090a BEQ 0x20934> {[-12-]}
<POP 2090c-20934 Naked> Σ-12 →0x2095a
<MI 2090c MOVE.W D6,D2> {[-12-]}
<MI 2090e ASL.W #0x8,D2> {[-12-]}
<MI 20910 MOVE.L D0,D3> {[-12-]}
<MI 20912 SUBQ.L #0x1,D3> {[-12-]}
<POP 0x20914 LimitCheck 0x0 ≤ D3 ≤ 0x3> {[-12-]}
<MI 2091e ASL.L #0x1,D3> {[-12-]}
<MI 20920 LEA.L (A6-0x434),A1> {[-12-]}
<MI 20922 LEA.L (A1+D3.L),A1> {[-12-]}
<MI 20926 ADD.W (A1+0x41e),D2> {[-12-]}
<POP 0x2092a LimitCheck 0x0 ≤ D2 ≤ 0xffff> {[-12-]}
<MI 20932 BRA 0x2095a> {[-12-]}
<POP 20934-2095a Naked> Σ-12 ↓ ←0x20906
<MI 20934 MOVE.L D0,D2> {[-12-]}
<MI 20936 SUBQ.L #0x1,D2> {[-12-]}
<POP 0x20938 LimitCheck 0x0 ≤ D2 ≤ 0x3> {[-12-]}
<MI 20942 ASL.L #0x1,D2> {[-12-]}
<MI 20944 LEA.L (A6-0x434),A1> {[-12-]}
<MI 20946 LEA.L (A1+D2.L),A1> {[-12-]}
<MI 2094a MOVE.W (A1+0x41e),D2> {[-12-]}
<MI 2094e ASL.W #0x8,D2> {[-12-]}
<MI 20950 ADD.W D6,D2> {[-12-]}
<POP 0x20952 LimitCheck 0x0 ≤ D2 ≤ 0xffff> {[-12-]}
<POP 2095a-20984 Naked> Σ-12 Δ+8 ↓ →0x20812 ←0x2090c
<MI 2095a MOVE.W D2,D7> {[-12-]}
<MI 2095c MOVE.W D7,(A0+D4.L+#0x14)> {[-12-]}
<MI 20960 MOVE.L (A6-0x42c),-(A7)> Δ-4 {[-12-]|[4, '(A6-0x42c)']}
<MI 20964 MOVE.W D1,-(A7)> Δ-2 {[-12-]|[4, '(A6-0x42c)']|[2, 'D1']}
<MI 20966 CLR.W -(A7)> Δ-2 {[-12-]|[4, '(A6-0x42c)']|[2, 'D1']|[#0]}
<Const 0x20968 0x200.2> Δ-2 {[-12-]|[4, '(A6-0x42c)']|[2, 'D1']|[#0]|[#512]}
<Const 0x2096c 0x1.2> Δ-2 {[-12-]|[4, '(A6-0x42c)']|[2, 'D1']|[#0]|[#512]|[#1]}
<MI 20970 MOVE.L (A6-0x434),-(A7)> Δ-4 {[-12-]|[4, '(A6-0x42c)']|[2, 'D1']|[#0]|[#512]|[#1]|[4, '(A6-0x434)']}
<Pointer.fp 0x20972 <LVAR -0x004 @ 1(r)>> Δ-4 {[-12-]|[4, '(A6-0x42c)']|[2, 'D1']|[#0]|[#512]|[#1]|[4, '(A6-0x434)']|[@@-4]}
<Call 0x20974 0x10388> {[-12-]|[4, '(A6-0x42c)']|[2, 'D1']|[#0]|[#512]|[#1]|[4, '(A6-0x434)']|[@@-4]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 2097a-2097e StackAdj> Δ+28 {[-4-]}
<MI 2097e ADDQ.L #0x1,D0> {[-4-]}
<MI 20980 BVC 0x20812> {[-4-]}
<POP 20984-209a0 Naked> Σ-4 Δ+4 ↓ ←0x20812
<POP 20984-20986 StackAdj> Δ+2 {[-2-]}
<MI 20986 CLR.B (A7)> {[-2-]}
<Const 0x20988 0x1.2> Δ-2 {[-2-]|[#1]}
<Const 0x2098c 0x1.4> Δ-4 {[-2-]|[#1]|[##1]}
<Pointer.fp 0x20990 <LVAR -0x004 @ 1(r)>> Δ-4 {[-2-]|[#1]|[##1]|[@@-4]}
<Pointer.fp 0x20992 <LVAR -0x42c @ 4(r)>> Δ-4 {[-2-]|[#1]|[##1]|[@@-4]|[@@-1068]}
<Call 0x20996 0x1038c> {[-2-]|[#1]|[##1]|[@@-4]|[@@-1068]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 2099c-209a0 StackAdj> Δ+16 {}
<POP 209a0-209a8 Epilogue> Σ0
@ 209a8
<LVAR -0x006 @ 1(r)>
<LVAR -0x00a 4(w)>
<LVAR -0x00c 2(rw)>
<LVAR -0x010 4(w)>
<LVAR -0x410 @>
<LVAR -0x41c @ 4(r)>
<LVAR -0x424 @ 4(rw)>
<POP 209a8-20b94 Body>
<POP 209a8-209be Prologue> Σ0 ↓
<POP 209be-209cc RegCacheLoad> Σ0 ↓
<POP 209cc-209f4 Naked> Σ0 ↓ →0x20a22
<MI 209cc LEA.L (A6-0x410),A0> {}
<MI 209d0 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 209d2 MOVE.L (A7)+,(A6-0x424)> Δ+4 {}
<Blob 0x209d4 [4] 0x254fe> Δ-4 {[«4»]}
<MI 209da CLR.B -(A7)> Δ-2 {[«4»]|[#0]}
<Const 0x209dc 0x1.2> Δ-2 {[«4»]|[#0]|[#1]}
<Const 0x209de 0x0.4> Δ-4 {[«4»]|[#0]|[#1]|[##0]}
<Pointer.fp 0x209e2 <LVAR -0x006 @ 1(r)>> Δ-4 {[«4»]|[#0]|[#1]|[##0]|[@@-6]}
<Pointer.fp 0x209e4 <LVAR -0x41c @ 4(r)>> Δ-4 {[«4»]|[#0]|[#1]|[##0]|[@@-6]|[@@-1052]}
<Call 0x209e6 0x10380> {[«4»]|[#0]|[#1]|[##0]|[@@-6]|[@@-1052]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 209ec-209f0 StackAdj> Δ+20 {}
<MI 209f0 TST.B (A6-0x6)> {}
<MI 209f2 BEQ 0x20a22> {}
<POP 209f4-20a22 Naked> Σ0 ↓
<Blob 0x209f4 [18] @> Δ-18 {[«18""»]}
<POP 20a06-20a08 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x20a08 17> {[«18""»]|[$$Problem with file]}
<Call 0x20a1a 0x203fc> {[«18""»]|[$$Problem with file]}
<POP 20a1e-20a22 StackAdj> Δ+22 {}
<POP 20a22-20a3e Naked> Σ0 →0x20a44 →0x20a48 →0x20a4c ←0x209cc
<MI 20a22 MOVE.B 0x254f4,D0> {}
<MI 20a28 EXTB.W D0> {}
<MI 20a2a SUBQ.W #0x1,D0> {}
<POP 0x20a2c LimitCheck 0x0 ≤ D0 ≤ 0x2> {}
<MI 20a34 ADD.W D0,D0> {}
<MI 20a36 SWITCH D0.W> {}
<POP 20a44-20a48 Naked> Σ0 →0x20a4e ←0x20a22
<MI 20a44 MOVEQ.L #0x01,D6> {}
<MI 20a46 BRA 0x20a4e> {}
<POP 20a48-20a4c Naked> Σ0 →0x20a4e ←0x20a22
<MI 20a48 MOVEQ.L #0x02,D6> {}
<MI 20a4a BRA 0x20a4e> {}
<POP 20a4c-20a4e Naked> Σ0 ↓ ←0x20a22
<MI 20a4c MOVEQ.L #0x04,D6> {}
<POP 20a4e-20a9a Naked> Σ0 Δ-4 ↓ ←0x20a44 ←0x20a48
<POP 20a4e-20a50 StackAdj> Δ-4 {[-4-]}
<POP 20a50-20a51 StackAdj> Δ+2 {[-2-]}
<Blob 0x20a51 [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 20a54 MOVE.B 0x202b7,(A7+0x1)> {[-2-]|[«2""»]}
<MI 20a5a MOVE.B 0x202b8,(A7+0x2)> {[-2-]|[«2""»]}
<POP 20a60-20a62 StackAdj> Δ-8 {[-2-]|[«2""»]|[-8-]}
<Blob 0x20a62 [4] 0x254f6> Δ-4 {[-2-]|[«2""»]|[-8-]|[«4»]}
<Const 0x20a68 0x8.4> Δ-4 {[-2-]|[«2""»]|[-8-]|[«4»]|[##8]}
<Call 0x20a6c 0x102e8> {[-2-]|[«2""»]|[-8-]|[«4»]|[##8]}
Long2HexString(val : Long; ndig : Long) : String
<POP 20a72-20a74 StackAdj> Δ+4 {[-2-]|[«2""»]|[-8-]|[«4»]}
<Lit 0x20a74> {[-2-]|[«2""»]|[-8-]|[$$…]}
<Pointer.sp 0x20a74 12> Δ-4
<Const 0x20a78 0x1.2> Δ-2
<Const 0x20a7a 0x3.2> Δ-2
<Call 0x20a7e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20a84-20a86 StackAdj> Δ+8
<Call 0x20a86 0x102d0> {[-2-]|[«2""»]|[-8-]|[$$…]}
StringCat2(a, b : String) : String
<POP 20a8c-20a8e StackAdj> Δ+8 {[-2-]|[«2""»]|[-4-]}
<Call 0x20a8e 0x103d8> {[-2-]|[«2""»]|[-4-]}
WriteConsoleString(str : String)
<POP 20a94-20a96 StackAdj> Δ+4 {[-2-]|[«2""»]}
<MI 20a96 MOVE.L D6,(A7)> {[4, 'D6']}
<MI 20a98 MOVEQ.L #0x01,D0> {[4, 'D6']}
<POP 20a9a-20aa0 Naked> Σ-4 ↓ →0x20b6e ←0x20b2e
<MI 20a9a CMP.L (A7),D0> {[-4-]}
<MI 20a9c BGT 0x20b6e> {[-4-]}
<POP 20aa0-20b14 Naked> Σ-4 ↓ →0x20b24
<MI 20aa0 MOVE.L 0x254f6,D5> {[-4-]}
<MI 20aa6 SUB.L 0x254fa,D5> {[-4-]}
<MI 20aac ADD.L D0,D5> {[-4-]}
<MI 20aae SUBQ.L #0x1,D5> {[-4-]}
<MI 20ab0 MOVE.L D5,D4> {[-4-]}
<MI 20ab2 MOVE.L #0x400,D3> {[-4-]}
<Call 0x20ab8 0x10294> {[-4-]}
?divs_d3_d4
<MI 20abe MOVE.L D4,D5> {[-4-]}
<MI 20ac0 MOVE.L D3,(A6-0x10)> {[-4-]}
<MI 20ac4 MOVE.L D3,-(A7)> Δ-4 {[-4-]|[4, 'D3']}
<MI 20ac6 MOVE.L D3,D4> {[-4-]|[4, 'D3']}
<MI 20ac8 MOVEQ.L #0x02,D3> {[-4-]|[4, 'D3']}
<Call 0x20aca 0x10294> {[-4-]|[4, 'D3']}
?divs_d3_d4
<MI 20ad0 MOVE.L D4,(A6-0xa)> {[-4-]|[4, 'D3']}
<MI 20ad4 MOVE.L (A6-0x41c),-(A7)> Δ-4 {[-4-]|[4, 'D3']|[4, '(A6-0x41c)']}
<POP 0x20ad6 LimitCheck 0x0 ≤ D5 ≤ 0x4000> {[-4-]|[4, 'D3']|[4, '(A6-0x41c)']}
<MI 20ae0 MOVE.W D5,-(A7)> Δ-2 {[-4-]|[4, 'D3']|[4, '(A6-0x41c)']|[2, 'D5']}
<MI 20ae2 CLR.W -(A7)> Δ-2 {[-4-]|[4, 'D3']|[4, '(A6-0x41c)']|[2, 'D5']|[#0]}
<Const 0x20ae4 0x200.2> Δ-2 {[-4-]|[4, 'D3']|[4, '(A6-0x41c)']|[2, 'D5']|[#0]|[#512]}
<Const 0x20ae8 0x1.2> Δ-2 {[-4-]|[4, 'D3']|[4, '(A6-0x41c)']|[2, 'D5']|[#0]|[#512]|[#1]}
<MI 20aea MOVE.L (A6-0x424),-(A7)> Δ-4 {[-4-]|[4, 'D3']|[4, '(A6-0x41c)']|[2, 'D5']|[#0]|[#512]|[#1]|[4, '(A6-0x424)']}
<Pointer.fp 0x20aec <LVAR -0x006 @ 1(r)>> Δ-4 {[-4-]|[4, 'D3']|[4, '(A6-0x41c)']|[2, 'D5']|[#0]|[#512]|[#1]|[4, '(A6-0x424)']|[@@-6]}
<Call 0x20aee 0x10384> {[-4-]|[4, 'D3']|[4, '(A6-0x41c)']|[2, 'D5']|[#0]|[#512]|[#1]|[4, '(A6-0x424)']|[@@-6]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 20af4-20af8 StackAdj> Δ+20 {[-4-]|[4, 'D3']}
<POP 0x20af8 LimitCheck 0x0 ≤ D4 ≤ 0x1ff> {[-4-]|[4, 'D3']}
<MI 20b02 ASL.L #0x1,D4> {[-4-]|[4, 'D3']}
<MI 20b04 LEA.L (A6-0x424),A0> {[-4-]|[4, 'D3']}
<MI 20b06 MOVE.W (A0+D4.L+#0x14),(A6-0xc)> {[-4-]|[4, 'D3']}
<MI 20b0c MOVE.L (A7)+,D1> Δ+4 {[-4-]}
<MI 20b0e BTST.L #0x0,D1> {[-4-]}
<MI 20b12 BEQ 0x20b24> {[-4-]}
<POP 20b14-20b24 Naked> Σ-4 →0x20b2e
<MI 20b14 MOVE.W (A6-0xc),D1> {[-4-]}
<MI 20b18 ANDI.W #0x00ff,D1> {[-4-]}
<POP 0x20b1c LimitCheck 0x0 ≤ D1 ≤ 0xff> {[-4-]}
<MI 20b20 MOVE.W D1,D7> {[-4-]}
<MI 20b22 BRA 0x20b2e> {[-4-]}
<POP 20b24-20b2e Naked> Σ-4 ↓ ←0x20aa0
<MI 20b24 MOVE.W (A6-0xc),D7> {[-4-]}
<MI 20b28 LSR.W #0x8,D7> {[-4-]}
<MI 20b2a ANDI.W #0x00ff,D7> {[-4-]}
<POP 20b2e-20b6e Naked> Σ-4 ↓ →0x20a9a ←0x20b14
<Blob 0x20b2e [2] @> Δ-2 {[-4-]|[«2""»]}
<POP 20b32-20b34 StackAdj> Δ-8 {[-4-]|[«2""»]|[-8-]}
<MI 20b34 MOVE.W D7,D1> {[-4-]|[«2""»]|[-8-]}
<MI 20b36 EXTW.L D1> {[-4-]|[«2""»]|[-8-]}
<MI 20b38 MOVE.L D1,-(A7)> Δ-4 {[-4-]|[«2""»]|[-8-]|[4, 'D1']}
<Const 0x20b3a 0x2.4> Δ-4 {[-4-]|[«2""»]|[-8-]|[4, 'D1']|[##2]}
<Call 0x20b3e 0x102e8> {[-4-]|[«2""»]|[-8-]|[4, 'D1']|[##2]}
Long2HexString(val : Long; ndig : Long) : String
<POP 20b44-20b46 StackAdj> Δ+4 {[-4-]|[«2""»]|[-8-]|[4, 'D1']}
<Lit 0x20b46 2> {[-4-]|[«2""»]|[-8-]|[$$ _]}
<Call 0x20b58 0x102d0> {[-4-]|[«2""»]|[-8-]|[$$ _]}
StringCat2(a, b : String) : String
<POP 20b5e-20b60 StackAdj> Δ+8 {[-4-]|[«2""»]|[-4-]}
<Call 0x20b60 0x103d8> {[-4-]|[«2""»]|[-4-]}
WriteConsoleString(str : String)
<POP 20b66-20b68 StackAdj> Δ+6 {[-4-]}
<MI 20b68 ADDQ.L #0x1,D0> {[-4-]}
<MI 20b6a BVC 0x20a9a> {[-4-]}
<POP 20b6e-20b8c Naked> Σ-4 Δ+4 ↓ ←0x20a9a
<POP 20b6e-20b70 StackAdj> Δ+4 {}
<Call 0x20b70 0x103dc> {}
WriteConsoleCrLf(void)
<MI 20b76 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x20b78 0x1.2> Δ-2 {[#0]|[#1]}
<Const 0x20b7a 0x1.4> Δ-4 {[#0]|[#1]|[##1]}
<Pointer.fp 0x20b7e <LVAR -0x006 @ 1(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-6]}
<Pointer.fp 0x20b80 <LVAR -0x41c @ 4(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-6]|[@@-1052]}
<Call 0x20b82 0x1038c> {[#0]|[#1]|[##1]|[@@-6]|[@@-1052]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 20b88-20b8c StackAdj> Δ+16 {}
<POP 20b8c-20b94 Epilogue> Σ0
@ 20b94
<LVAR 0x016 1(r)>
<LVAR 0x014 1(r)>
<LVAR 0x012 1(r)>
<LVAR 0x010 1(r)>
<LVAR 0x00e 1(r)>
<LVAR 0x00c 1(r)>
<LVAR 0x008 4(r)>
<LVAR -0x003 @ 1(rw)>
<LVAR -0x004 @ 1(r)>
<LVAR -0x008 @ 4(rw)>
<POP 20b94-2100c Body>
<POP 20b94-20baa Prologue> Σ0 ↓
<POP 20baa-20bc6 RegCacheLoad> Σ0 ↓
<POP 20bc6-20bee Naked> Σ0 ↓ →0x20c26
<Blob 0x20bc6 [2] @> Δ-2 {[«2""»]}
<MI 20bca MOVE.L (A6+0x8),-(A7)> Δ-4 {[«2""»]|[4, '(A6+0x8)']}
<POP 20bce-20bd0 StackAdj> Δ-4 {[«2""»]|[4, '(A6+0x8)']|[-4-]}
<Lit 0x20bd0 2> {[«2""»]|[4, '(A6+0x8)']|[$$FN]}
<POP 20bdc-20bde StackAdj> Δ-2 {[«2""»]|[4, '(A6+0x8)']|[$$FN]|[-2-]}
<POP 20bde-20bdf StackAdj> Δ+2 {[«2""»]|[4, '(A6+0x8)']|[$$FN]}
<Const 0x20bdf 0x1.2> Δ-2 {[«2""»]|[4, '(A6+0x8)']|[$$FN]|[#1]}
<Pointer.fp 0x20be0 <LVAR -0x003 @ 1(rw)>> Δ-4 {[«2""»]|[4, '(A6+0x8)']|[$$FN]|[#1]|[@@-3]}
<Pointer.fp 0x20be2 <LVAR -0x008 @ 4(rw)>> Δ-4 {[«2""»]|[4, '(A6+0x8)']|[$$FN]|[#1]|[@@-3]|[@@-8]}
<Call 0x20be4 0x2039c> {[«2""»]|[4, '(A6+0x8)']|[$$FN]|[#1]|[@@-3]|[@@-8]}
<POP 20be8-20bea StackAdj> Δ+20 {}
<MI 20bea TST.B (A6-0x3)> {}
<MI 20bec BNE 0x20c26> {}
<POP 20bee-20bf4 Naked> Σ0 ↓ →0x20c26
<MI 20bee TST.B (A6+0x16)> {}
<MI 20bf2 BNE 0x20c26> {}
<POP 20bf4-20c26 Naked> Σ0 ↓
<Blob 0x20bf4 [52] @> Δ-52 {[«52""»]}
<POP 20c06-20c08 StackAdj> Δ-8 {[«52""»]|[-8-]}
<Lit 0x20c08 51> {[«52""»]|[-4-]|[$$Enter filename with extention [e.g. foobar.m200] :_]}
<Call 0x20c16 0x103e4> {[«52""»]|[-4-]|[$$Enter filename with extention [e.g. foobar.m200] :_]}
AskConsoleString(prompt : String) : String
<POP 20c1c-20c1e StackAdj> Δ+4 {[«52""»]|[-4-]}
<MI 20c1e MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«52""»]}
<POP 20c20-20c24 StackAdj> Δ+52 {}
<MI 20c24 MOVE.B #0x01,(A6-0x3)> {}
<POP 20c26-20c2a Naked> Σ0 ↓ →0x20c30 ←0x20bc6 ←0x20bee
<MI 20c26 TST.B (A6-0x3)> {}
<MI 20c28 BEQ 0x20c30> {}
<POP 20c2a-20c30 Naked> Σ0 ↓
<MI 20c2a MOVE.L (A6-0x8),0x254fe> {}
<POP 20c30-20c58 Naked> Σ0 ↓ →0x20c8a ←0x20c26
<Blob 0x20c30 [4] @> Δ-4 {[«4""»]}
<MI 20c34 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«4""»]|[4, '(A6+0x8)']}
<POP 20c38-20c3a StackAdj> Δ-4 {[«4""»]|[4, '(A6+0x8)']|[-4-]}
<Lit 0x20c3a 4> {[«4""»]|[4, '(A6+0x8)']|[$$BASE]}
<POP 20c46-20c48 StackAdj> Δ-2 {[«4""»]|[4, '(A6+0x8)']|[$$BASE]|[-2-]}
<POP 20c48-20c49 StackAdj> Δ+2 {[«4""»]|[4, '(A6+0x8)']|[$$BASE]}
<Const 0x20c49 0x1.2> Δ-2 {[«4""»]|[4, '(A6+0x8)']|[$$BASE]|[#1]}
<Pointer.fp 0x20c4a <LVAR -0x003 @ 1(rw)>> Δ-4 {[«4""»]|[4, '(A6+0x8)']|[$$BASE]|[#1]|[@@-3]}
<Pointer.fp 0x20c4c <LVAR -0x008 @ 4(rw)>> Δ-4 {[«4""»]|[4, '(A6+0x8)']|[$$BASE]|[#1]|[@@-3]|[@@-8]}
<Call 0x20c4e 0x2039c> {[«4""»]|[4, '(A6+0x8)']|[$$BASE]|[#1]|[@@-3]|[@@-8]}
<POP 20c52-20c54 StackAdj> Δ+22 {}
<MI 20c54 TST.B (A6-0x3)> {}
<MI 20c56 BNE 0x20c8a> {}
<POP 20c58-20c5e Naked> Σ0 ↓ →0x20c8a
<MI 20c58 TST.B (A6+0x14)> {}
<MI 20c5c BNE 0x20c8a> {}
<POP 20c5e-20c8a Naked> Σ0 ↓
<Blob 0x20c5e [38] @> Δ-38 {[«38""»]}
<POP 20c6a-20c6c StackAdj> Δ-8 {[«38""»]|[-8-]}
<Lit 0x20c6c 38> {[«38""»]|[-4-]|[$$Enter base address of file (in hex) :_]}
<Call 0x20c7a 0x103e4> {[«38""»]|[-4-]|[$$Enter base address of file (in hex) :_]}
AskConsoleString(prompt : String) : String
<POP 20c80-20c82 StackAdj> Δ+4 {[«38""»]|[-4-]}
<MI 20c82 MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«38""»]}
<POP 20c84-20c88 StackAdj> Δ+38 {}
<MI 20c88 MOVE.B #0x01,(A6-0x3)> {}
<POP 20c8a-20c8e Naked> Σ0 ↓ →0x20ccc ←0x20c30 ←0x20c58
<MI 20c8a TST.B (A6-0x3)> {}
<MI 20c8c BEQ 0x20ccc> {}
<POP 20c8e-20caa Naked> Σ0 ↓ →0x20ccc
<MI 20c8e MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<Const 0x20c90 0x10.4> Δ-4 {[4, '(A6-0x8)']|[##16]}
<Pointer.fp 0x20c94 <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6-0x8)']|[##16]|[@@-4]}
<Const 0x20c98 0x254fa.4> Δ-4 {[4, '(A6-0x8)']|[##16]|[@@-4]|[##152826]}
<Call 0x20c9e 0x20510> {[4, '(A6-0x8)']|[##16]|[@@-4]|[##152826]}
<POP 20ca2-20ca4 StackAdj> Δ+16 {}
<MI 20ca4 TST.B (A6-0x4)> {}
<MI 20ca8 BNE 0x20ccc> {}
<POP 20caa-20ccc Naked> Σ0 ↓
<Blob 0x20caa [20] @> Δ-20 {[«20""»]}
<POP 20cb6-20cb8 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x20cb8 20> {[«20""»]|[$$Illegal hex argument]}
<Call 0x20cc4 0x219f2> {[«20""»]|[$$Illegal hex argument]}
<POP 20cca-20ccc StackAdj> Δ+24 {}
<POP 20ccc-20d00 Naked> Σ0 ↓ →0x20d34 ←0x20c8a ←0x20c8e
<Blob 0x20ccc [8] @> Δ-8 {[«8""»]}
<MI 20cdc MOVE.L (A6+0x8),-(A7)> Δ-4 {[«8""»]|[4, '(A6+0x8)']}
<POP 20ce0-20ce2 StackAdj> Δ-4 {[«8""»]|[4, '(A6+0x8)']|[-4-]}
<Lit 0x20ce2 7> {[«8""»]|[4, '(A6+0x8)']|[$$ADDRESS]}
<POP 20cee-20cf0 StackAdj> Δ-2 {[«8""»]|[4, '(A6+0x8)']|[$$ADDRESS]|[-2-]}
<POP 20cf0-20cf1 StackAdj> Δ+2 {[«8""»]|[4, '(A6+0x8)']|[$$ADDRESS]}
<Const 0x20cf1 0x1.2> Δ-2 {[«8""»]|[4, '(A6+0x8)']|[$$ADDRESS]|[#1]}
<Pointer.fp 0x20cf2 <LVAR -0x003 @ 1(rw)>> Δ-4 {[«8""»]|[4, '(A6+0x8)']|[$$ADDRESS]|[#1]|[@@-3]}
<Pointer.fp 0x20cf4 <LVAR -0x008 @ 4(rw)>> Δ-4 {[«8""»]|[4, '(A6+0x8)']|[$$ADDRESS]|[#1]|[@@-3]|[@@-8]}
<Call 0x20cf6 0x2039c> {[«8""»]|[4, '(A6+0x8)']|[$$ADDRESS]|[#1]|[@@-3]|[@@-8]}
<POP 20cfa-20cfc StackAdj> Δ+26 {}
<MI 20cfc TST.B (A6-0x3)> {}
<MI 20cfe BNE 0x20d34> {}
<POP 20d00-20d06 Naked> Σ0 ↓ →0x20d34
<MI 20d00 TST.B (A6+0x12)> {}
<MI 20d04 BNE 0x20d34> {}
<POP 20d06-20d34 Naked> Σ0 ↓
<Blob 0x20d06 [46] @> Δ-46 {[«46""»]}
<POP 20d16-20d18 StackAdj> Δ-8 {[«46""»]|[-8-]}
<Lit 0x20d18 45> {[«46""»]|[-4-]|[$$Enter address of data change/dump (in hex) :_]}
<Call 0x20d26 0x103e4> {[«46""»]|[-4-]|[$$Enter address of data change/dump (in hex) :_]}
AskConsoleString(prompt : String) : String
<POP 20d2c-20d2e StackAdj> Δ+4 {[«46""»]|[-4-]}
<MI 20d2e MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«46""»]}
<POP 20d30-20d32 StackAdj> Δ+46 {}
<MI 20d32 MOVE.B #0x01,(A6-0x3)> {}
<POP 20d34-20d38 Naked> Σ0 ↓ →0x20d76 ←0x20ccc ←0x20d00
<MI 20d34 TST.B (A6-0x3)> {}
<MI 20d36 BEQ 0x20d76> {}
<POP 20d38-20d54 Naked> Σ0 ↓ →0x20d76
<MI 20d38 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<Const 0x20d3a 0x10.4> Δ-4 {[4, '(A6-0x8)']|[##16]}
<Pointer.fp 0x20d3e <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6-0x8)']|[##16]|[@@-4]}
<Const 0x20d42 0x254f6.4> Δ-4 {[4, '(A6-0x8)']|[##16]|[@@-4]|[##152822]}
<Call 0x20d48 0x20510> {[4, '(A6-0x8)']|[##16]|[@@-4]|[##152822]}
<POP 20d4c-20d4e StackAdj> Δ+16 {}
<MI 20d4e TST.B (A6-0x4)> {}
<MI 20d52 BNE 0x20d76> {}
<POP 20d54-20d76 Naked> Σ0 ↓
<Blob 0x20d54 [20] @> Δ-20 {[«20""»]}
<POP 20d60-20d62 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x20d62 20> {[«20""»]|[$$Illegal hex argument]}
<Call 0x20d6e 0x219f2> {[«20""»]|[$$Illegal hex argument]}
<POP 20d74-20d76 StackAdj> Δ+24 {}
<POP 20d76-20d7c Naked> Σ0 ↓ →0x20d82 ←0x20d34 ←0x20d38
<MI 20d76 TST.B (A6+0x10)> {}
<MI 20d7a BNE 0x20d82> {}
<POP 20d7c-20d82 Naked> Σ0 ↓
<MI 20d7c CLR.B 0x254f4> {}
<POP 20d82-20daa Naked> Σ0 ↓ →0x20db0 ←0x20d76
<Blob 0x20d82 [4] @> Δ-4 {[«4""»]}
<MI 20d86 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«4""»]|[4, '(A6+0x8)']}
<POP 20d8a-20d8c StackAdj> Δ-4 {[«4""»]|[4, '(A6+0x8)']|[-4-]}
<Lit 0x20d8c 4> {[«4""»]|[4, '(A6+0x8)']|[$$BYTE]}
<POP 20d98-20d9a StackAdj> Δ-2 {[«4""»]|[4, '(A6+0x8)']|[$$BYTE]|[-2-]}
<MI 20d9a CLR.B (A7)> {[«4""»]|[4, '(A6+0x8)']|[$$BYTE]|[-2-]}
<Pointer.fp 0x20d9c <LVAR -0x003 @ 1(rw)>> Δ-4 {[«4""»]|[4, '(A6+0x8)']|[$$BYTE]|[-2-]|[@@-3]}
<Pointer.fp 0x20d9e <LVAR -0x008 @ 4(rw)>> Δ-4 {[«4""»]|[4, '(A6+0x8)']|[$$BYTE]|[-2-]|[@@-3]|[@@-8]}
<Call 0x20da0 0x2039c> {[«4""»]|[4, '(A6+0x8)']|[$$BYTE]|[-2-]|[@@-3]|[@@-8]}
<POP 20da4-20da6 StackAdj> Δ+22 {}
<MI 20da6 TST.B (A6-0x3)> {}
<MI 20da8 BEQ 0x20db0> {}
<POP 20daa-20db0 Naked> Σ0 ↓
<MI 20daa MOVE.B #0x01,0x254f4> {}
<POP 20db0-20dd8 Naked> Σ0 ↓ →0x20de0 ←0x20d82
<Blob 0x20db0 [4] @> Δ-4 {[«4""»]}
<MI 20db4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«4""»]|[4, '(A6+0x8)']}
<POP 20db8-20dba StackAdj> Δ-4 {[«4""»]|[4, '(A6+0x8)']|[-4-]}
<Lit 0x20dba 4> {[«4""»]|[4, '(A6+0x8)']|[$$WORD]}
<POP 20dc6-20dc8 StackAdj> Δ-2 {[«4""»]|[4, '(A6+0x8)']|[$$WORD]|[-2-]}
<MI 20dc8 CLR.B (A7)> {[«4""»]|[4, '(A6+0x8)']|[$$WORD]|[-2-]}
<Pointer.fp 0x20dca <LVAR -0x003 @ 1(rw)>> Δ-4 {[«4""»]|[4, '(A6+0x8)']|[$$WORD]|[-2-]|[@@-3]}
<Pointer.fp 0x20dcc <LVAR -0x008 @ 4(rw)>> Δ-4 {[«4""»]|[4, '(A6+0x8)']|[$$WORD]|[-2-]|[@@-3]|[@@-8]}
<Call 0x20dce 0x2039c> {[«4""»]|[4, '(A6+0x8)']|[$$WORD]|[-2-]|[@@-3]|[@@-8]}
<POP 20dd2-20dd4 StackAdj> Δ+22 {}
<MI 20dd4 TST.B (A6-0x3)> {}
<MI 20dd6 BEQ 0x20de0> {}
<POP 20dd8-20de0 Naked> Σ0 ↓
<MI 20dd8 MOVE.B #0x02,0x254f4> {}
<POP 20de0-20e0c Naked> Σ0 ↓ →0x20e14 ←0x20db0
<Blob 0x20de0 [4] @> Δ-4 {[«4""»]}
<Blob 0x20de4 [4] @> Δ-4 {[«4""»]|[«4""»]}
<MI 20de8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«4""»]|[«4""»]|[4, '(A6+0x8)']}
<POP 20dec-20dee StackAdj> Δ-4 {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[-4-]}
<Lit 0x20dee 8> {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$LONGWORD]}
<POP 20dfa-20dfc StackAdj> Δ-2 {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$LONGWORD]|[-2-]}
<MI 20dfc CLR.B (A7)> {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$LONGWORD]|[-2-]}
<Pointer.fp 0x20dfe <LVAR -0x003 @ 1(rw)>> Δ-4 {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$LONGWORD]|[-2-]|[@@-3]}
<Pointer.fp 0x20e00 <LVAR -0x008 @ 4(rw)>> Δ-4 {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$LONGWORD]|[-2-]|[@@-3]|[@@-8]}
<Call 0x20e02 0x2039c> {[«4""»]|[«4""»]|[4, '(A6+0x8)']|[$$LONGWORD]|[-2-]|[@@-3]|[@@-8]}
<POP 20e06-20e08 StackAdj> Δ+26 {}
<MI 20e08 TST.B (A6-0x3)> {}
<MI 20e0a BEQ 0x20e14> {}
<POP 20e0c-20e14 Naked> Σ0 ↓
<MI 20e0c MOVE.B #0x03,0x254f4> {}
<POP 20e14-20e1a Naked> Σ0 ↓ →0x20e92 ←0x20de0
<MI 20e14 TST.B (A6+0x10)> {}
<MI 20e18 BNE 0x20e92> {}
<POP 20e1a-20e22 Naked> Σ0 ↓ →0x20e92
<MI 20e1a TST.B 0x254f4> {}
<MI 20e20 BNE 0x20e92> {}
<POP 20e22-20e68 Naked> Σ0 ↓ →0x20e6e ←0x20e8a
<Blob 0x20e22 [34] @> Δ-34 {[«34""»]}
<POP 20e34-20e38 StackAdj> Δ-12 {[«34""»]|[-12-]}
<Lit 0x20e38 33> {[«34""»]|[-8-]|[$$Enter data size code [ B/W/L ] :_]}
<Call 0x20e46 0x103e4> {[«34""»]|[-8-]|[$$Enter data size code [ B/W/L ] :_]}
AskConsoleString(prompt : String) : String
<POP 20e4c-20e4e StackAdj> Δ+4 {[«34""»]|[-8-]}
<Call 0x20e4e 0x102f0> {[«34""»]|[-8-]}
ToUpper(a : String) : String
<POP 20e54-20e56 StackAdj> Δ+4 {[«34""»]|[-4-]}
<MI 20e56 MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«34""»]}
<POP 20e58-20e5c StackAdj> Δ+34 {}
<MI 20e5c MOVEA.L (A6-0x8),A0> {}
<MI 20e5e MOVE.B (A0+0x2),D0> {}
<MI 20e62 CMPI.B #0x42,D0> {}
<MI 20e66 BNE 0x20e6e> {}
<POP 20e68-20e6e Naked> Σ0 ↓
<MI 20e68 MOVE.B #0x01,0x254f4> {}
<POP 20e6e-20e74 Naked> Σ0 ↓ →0x20e7c ←0x20e22
<MI 20e6e CMPI.B #0x57,D0> {}
<MI 20e72 BNE 0x20e7c> {}
<POP 20e74-20e7c Naked> Σ0 ↓
<MI 20e74 MOVE.B #0x02,0x254f4> {}
<POP 20e7c-20e82 Naked> Σ0 ↓ →0x20e8a ←0x20e6e
<MI 20e7c CMPI.B #0x4c,D0> {}
<MI 20e80 BNE 0x20e8a> {}
<POP 20e82-20e8a Naked> Σ0 ↓
<MI 20e82 MOVE.B #0x03,0x254f4> {}
<POP 20e8a-20e92 Naked> Σ0 ↓ →0x20e22 ←0x20e7c
<MI 20e8a TST.B 0x254f4> {}
<MI 20e90 BEQ 0x20e22> {}
<POP 20e92-20ed0 Naked> Σ0 ↓ →0x20f08 ←0x20e14 ←0x20e1a
<POP 20e92-20e94 StackAdj> Δ-4 {[-4-]}
<POP 20e94-20e95 StackAdj> Δ+2 {[-2-]}
<Blob 0x20e95 [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 20e98 MOVE.B 0x202db,(A7+0x1)> {[-2-]|[«2""»]}
<MI 20e9e MOVE.B 0x202dc,(A7+0x2)> {[-2-]|[«2""»]}
<MI 20ea4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-2-]|[«2""»]|[4, '(A6+0x8)']}
<POP 20ea8-20eaa StackAdj> Δ-4 {[-2-]|[«2""»]|[4, '(A6+0x8)']|[-4-]}
<Lit 0x20eaa> {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]}
<Pointer.sp 0x20eaa 8> Δ-4
<Const 0x20eae 0x1.2> Δ-2
<Const 0x20eb0 0x3.2> Δ-2
<Call 0x20eb4 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20eb6-20eb8 StackAdj> Δ+8
<POP 20eb6-20eb8 StackAdj> Δ-2 {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[-2-]}
<POP 20eb8-20eb9 StackAdj> Δ+2 {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]}
<Const 0x20eb9 0x1.2> Δ-2 {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]}
<Const 0x20eba 0x25502.4> Δ-4 {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[##152834]}
<Pointer.fp 0x20ec0 <LVAR -0x008 @ 4(rw)>> Δ-4 {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[##152834]|[@@-8]}
<Call 0x20ec2 0x2039c> {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[##152834]|[@@-8]}
<POP 20ec6-20ec8 StackAdj> Δ+22 {}
<MI 20ec8 TST.B 0x25502> {}
<MI 20ece BNE 0x20f08> {}
<POP 20ed0-20ed6 Naked> Σ0 ↓ →0x20f08
<MI 20ed0 TST.B (A6+0xe)> {}
<MI 20ed4 BNE 0x20f08> {}
<POP 20ed6-20f08 Naked> Σ0 ↓
<Blob 0x20ed6 [46] @> Δ-46 {[«46""»]}
<POP 20ee6-20ee8 StackAdj> Δ-8 {[«46""»]|[-8-]}
<Lit 0x20ee8 45> {[«46""»]|[-4-]|[$$Enter expected old (current) data (in hex) :_]}
<Call 0x20ef6 0x103e4> {[«46""»]|[-4-]|[$$Enter expected old (current) data (in hex) :_]}
AskConsoleString(prompt : String) : String
<POP 20efc-20efe StackAdj> Δ+4 {[«46""»]|[-4-]}
<MI 20efe MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«46""»]}
<POP 20f00-20f02 StackAdj> Δ+46 {}
<MI 20f02 MOVE.B #0x01,0x25502> {}
<POP 20f08-20f10 Naked> Σ0 ↓ →0x20f4e ←0x20e92 ←0x20ed0
<MI 20f08 TST.B 0x25502> {}
<MI 20f0e BEQ 0x20f4e> {}
<POP 20f10-20f2c Naked> Σ0 ↓ →0x20f4e
<MI 20f10 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<Const 0x20f12 0x10.4> Δ-4 {[4, '(A6-0x8)']|[##16]}
<Pointer.fp 0x20f16 <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6-0x8)']|[##16]|[@@-4]}
<Const 0x20f1a 0x25504.4> Δ-4 {[4, '(A6-0x8)']|[##16]|[@@-4]|[##152836]}
<Call 0x20f20 0x20510> {[4, '(A6-0x8)']|[##16]|[@@-4]|[##152836]}
<POP 20f24-20f26 StackAdj> Δ+16 {}
<MI 20f26 TST.B (A6-0x4)> {}
<MI 20f2a BNE 0x20f4e> {}
<POP 20f2c-20f4e Naked> Σ0 ↓
<Blob 0x20f2c [20] @> Δ-20 {[«20""»]}
<POP 20f38-20f3a StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x20f3a 20> {[«20""»]|[$$Illegal hex argument]}
<Call 0x20f46 0x219f2> {[«20""»]|[$$Illegal hex argument]}
<POP 20f4c-20f4e StackAdj> Δ+24 {}
<POP 20f4e-20f8c Naked> Σ0 ↓ →0x20fbe ←0x20f08 ←0x20f10
<POP 20f4e-20f50 StackAdj> Δ-4 {[-4-]}
<POP 20f50-20f51 StackAdj> Δ+2 {[-2-]}
<Blob 0x20f51 [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 20f54 MOVE.B 0x202df,(A7+0x1)> {[-2-]|[«2""»]}
<MI 20f5a MOVE.B 0x202e0,(A7+0x2)> {[-2-]|[«2""»]}
<MI 20f60 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-2-]|[«2""»]|[4, '(A6+0x8)']}
<POP 20f64-20f66 StackAdj> Δ-4 {[-2-]|[«2""»]|[4, '(A6+0x8)']|[-4-]}
<Lit 0x20f66> {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]}
<Pointer.sp 0x20f66 8> Δ-4
<Const 0x20f6a 0x1.2> Δ-2
<Const 0x20f6c 0x3.2> Δ-2
<Call 0x20f70 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20f72-20f74 StackAdj> Δ+8
<POP 20f72-20f74 StackAdj> Δ-2 {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[-2-]}
<POP 20f74-20f75 StackAdj> Δ+2 {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]}
<Const 0x20f75 0x1.2> Δ-2 {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]}
<Const 0x20f76 0x25508.4> Δ-4 {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[##152840]}
<Pointer.fp 0x20f7c <LVAR -0x008 @ 4(rw)>> Δ-4 {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[##152840]|[@@-8]}
<Call 0x20f7e 0x2039c> {[-2-]|[«2""»]|[4, '(A6+0x8)']|[$$…]|[#1]|[##152840]|[@@-8]}
<POP 20f82-20f84 StackAdj> Δ+22 {}
<MI 20f84 TST.B 0x25508> {}
<MI 20f8a BNE 0x20fbe> {}
<POP 20f8c-20f92 Naked> Σ0 ↓ →0x20fbe
<MI 20f8c TST.B (A6+0xc)> {}
<MI 20f90 BNE 0x20fbe> {}
<POP 20f92-20fbe Naked> Σ0 ↓
<Blob 0x20f92 [26] @> Δ-26 {[«26""»]}
<POP 20f9e-20fa0 StackAdj> Δ-8 {[«26""»]|[-8-]}
<Lit 0x20fa0 26> {[«26""»]|[-4-]|[$$Enter new data (in hex) :_]}
<Call 0x20fac 0x103e4> {[«26""»]|[-4-]|[$$Enter new data (in hex) :_]}
AskConsoleString(prompt : String) : String
<POP 20fb2-20fb4 StackAdj> Δ+4 {[«26""»]|[-4-]}
<MI 20fb4 MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«26""»]}
<POP 20fb6-20fb8 StackAdj> Δ+26 {}
<MI 20fb8 MOVE.B #0x01,0x25508> {}
<POP 20fbe-20fc6 Naked> Σ0 ↓ →0x21004 ←0x20f4e ←0x20f8c
<MI 20fbe TST.B 0x25508> {}
<MI 20fc4 BEQ 0x21004> {}
<POP 20fc6-20fe2 Naked> Σ0 ↓ →0x21004
<MI 20fc6 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<Const 0x20fc8 0x10.4> Δ-4 {[4, '(A6-0x8)']|[##16]}
<Pointer.fp 0x20fcc <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6-0x8)']|[##16]|[@@-4]}
<Const 0x20fd0 0x2550a.4> Δ-4 {[4, '(A6-0x8)']|[##16]|[@@-4]|[##152842]}
<Call 0x20fd6 0x20510> {[4, '(A6-0x8)']|[##16]|[@@-4]|[##152842]}
<POP 20fda-20fdc StackAdj> Δ+16 {}
<MI 20fdc TST.B (A6-0x4)> {}
<MI 20fe0 BNE 0x21004> {}
<POP 20fe2-21004 Naked> Σ0 ↓
<Blob 0x20fe2 [20] @> Δ-20 {[«20""»]}
<POP 20fee-20ff0 StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x20ff0 20> {[«20""»]|[$$Illegal hex argument]}
<Call 0x20ffc 0x219f2> {[«20""»]|[$$Illegal hex argument]}
<POP 21002-21004 StackAdj> Δ+24 {}
<POP 21004-2100c Epilogue> Σ0 ←0x20fbe ←0x20fc6
@ 2100c
<LVAR 0x008 4(r)>
<POP 2100c-21132 Body>
<POP 2100c-21022 Prologue> Σ0 ↓
<POP 21022-2103a RegCacheLoad> Σ0 ↓
<POP 2103a-21070 Naked> Σ0 →0x21076 →0x21080 →0x21088
<MI 2103a CLR.L 0x25504> {}
<Const 0x2103c 0x1.2> Δ-2 {[#1]}
<Const 0x2103e 0x1.2> Δ-2 {[#1]|[#1]}
<MI 21040 CLR.B -(A7)> Δ-2 {[#1]|[#1]|[#0]}
<MI 21042 CLR.B -(A7)> Δ-2 {[#1]|[#1]|[#0]|[#0]}
<Const 0x21044 0x1.2> Δ-2 {[#1]|[#1]|[#0]|[#0]|[#1]}
<MI 21046 CLR.B -(A7)> Δ-2 {[#1]|[#1]|[#0]|[#0]|[#1]|[#0]}
<MI 21048 MOVE.L (A6+0x8),-(A7)> Δ-4 {[#1]|[#1]|[#0]|[#0]|[#1]|[#0]|[4, '(A6+0x8)']}
<Call 0x2104c 0x20b94> {[#1]|[#1]|[#0]|[#0]|[#1]|[#0]|[4, '(A6+0x8)']}
<POP 21050-21054 StackAdj> Δ+16 {}
<MI 21054 MOVE.B 0x254f4,D0> {}
<MI 2105a EXTB.W D0> {}
<MI 2105c SUBQ.W #0x1,D0> {}
<POP 0x2105e LimitCheck 0x0 ≤ D0 ≤ 0x2> {}
<MI 21066 ADD.W D0,D0> {}
<MI 21068 SWITCH D0.W> {}
<POP 21076-21080 Naked> Σ0 →0x2108c ←0x2103a
<MI 21076 MOVE.L #0xff,D7> {}
<MI 2107c MOVEQ.L #0x01,D6> {}
<MI 2107e BRA 0x2108c> {}
<POP 21080-21088 Naked> Σ0 →0x2108a ←0x2103a
<MI 21080 MOVE.L #0xffff,D7> {}
<MI 21086 BRA 0x2108a> {}
<POP 21088-2108a Naked> Σ0 ↓ ←0x2103a
<MI 21088 MOVEQ.L #-0x01,D7> {}
<POP 2108a-2108c Naked> Σ0 ↓ ←0x21080
<MI 2108a MOVEQ.L #0x02,D6> {}
<POP 2108c-21090 Naked> Σ0 ↓ →0x21098 ←0x21076
<MI 2108c CMP.L 0x25504,D7> {}
<MI 2108e BCS 0x21098> {}
<POP 21090-21098 Naked> Σ0 ↓ →0x210ba
<MI 21090 CMP.L 0x2550a,D7> {}
<MI 21096 BCC 0x210ba> {}
<POP 21098-210ba Naked> Σ0 ↓ ←0x2108c
<Blob 0x21098 [40] @> Δ-40 {[«40""»]}
<POP 210a4-210a6 StackAdj> Δ-4 {[«40""»]|[-4-]}
<Lit 0x210a6 40> {[«40""»]|[$$OLD or NEW value larger than size allows]}
<Call 0x210b2 0x203fc> {[«40""»]|[$$OLD or NEW value larger than size allows]}
<POP 210b6-210ba StackAdj> Δ+44 {}
<POP 210ba-210cc Naked> Σ0 ↓ →0x210f4 ←0x21090
<MI 210ba MOVE.L 0x254f6,D4> {}
<MI 210c0 MOVE.L D6,D3> {}
<Call 0x210c2 0x10294> {}
?divs_d3_d4
<MI 210c8 TST.L D3> {}
<MI 210ca BEQ 0x210f4> {}
<POP 210cc-210f4 Naked> Σ0 ↓
<Blob 0x210cc [36] @> Δ-36 {[«36""»]}
<POP 210de-210e0 StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x210e0 35> {[«36""»]|[$$Alignment problem with ADDRESS/SIZE]}
<Call 0x210ee 0x203fc> {[«36""»]|[$$Alignment problem with ADDRESS/SIZE]}
<POP 210f2-210f4 StackAdj> Δ+40 {}
<POP 210f4-210fa Naked> Σ0 ↓ →0x21126 ←0x210ba
<MI 210f4 MOVEA.L 0x254fe,A0> {}
<MI 210f6 CMPA.W #0x01,A0> {}
<MI 210f8 BNE 0x21126> {}
<POP 210fa-21126 Naked> Σ0 ↓
<Blob 0x210fa [52] @> Δ-52 {[«52""»]}
<POP 2110a-2110c StackAdj> Δ-8 {[«52""»]|[-8-]}
<Lit 0x2110c 51> {[«52""»]|[-4-]|[$$Enter filename with extention [e.g. foobar.m200] :_]}
<Call 0x2111a 0x103e4> {[«52""»]|[-4-]|[$$Enter filename with extention [e.g. foobar.m200] :_]}
AskConsoleString(prompt : String) : String
<POP 21120-21122 StackAdj> Δ+4 {[«52""»]|[-4-]}
<MI 21122 MOVE.L (A7)+,0x254fe> Δ+4 {[«52""»]}
<POP 21124-21126 StackAdj> Δ+52 {}
<POP 21126-2112a Naked> Σ0 ↓ ←0x210f4
<Call 0x21126 0x20662> {}
<POP 2112a-21132 Epilogue> Σ0
@ 21132
<LVAR 0x008 4(r)>
<POP 21132-21218 Body>
<POP 21132-21148 Prologue> Σ0 ↓
<POP 21148-21152 RegCacheLoad> Σ0 ↓
<POP 21152-21186 Naked> Σ0 →0x2118c →0x21190 →0x21194
<Const 0x21152 0x1.2> Δ-2 {[#1]}
<Const 0x21154 0x1.2> Δ-2 {[#1]|[#1]}
<MI 21156 CLR.B -(A7)> Δ-2 {[#1]|[#1]|[#0]}
<MI 21158 CLR.B -(A7)> Δ-2 {[#1]|[#1]|[#0]|[#0]}
<Const 0x2115a 0x1.2> Δ-2 {[#1]|[#1]|[#0]|[#0]|[#1]}
<Const 0x2115c 0x1.2> Δ-2 {[#1]|[#1]|[#0]|[#0]|[#1]|[#1]}
<MI 2115e MOVE.L (A6+0x8),-(A7)> Δ-4 {[#1]|[#1]|[#0]|[#0]|[#1]|[#1]|[4, '(A6+0x8)']}
<Call 0x21162 0x20b94> {[#1]|[#1]|[#0]|[#0]|[#1]|[#1]|[4, '(A6+0x8)']}
<POP 21166-2116a StackAdj> Δ+16 {}
<MI 2116a MOVE.B 0x254f4,D0> {}
<MI 21170 EXTB.W D0> {}
<MI 21172 SUBQ.W #0x1,D0> {}
<POP 0x21174 LimitCheck 0x0 ≤ D0 ≤ 0x2> {}
<MI 2117c ADD.W D0,D0> {}
<MI 2117e SWITCH D0.W> {}
<POP 2118c-21190 Naked> Σ0 →0x21196 ←0x21152
<MI 2118c MOVEQ.L #0x01,D7> {}
<MI 2118e BRA 0x21196> {}
<POP 21190-21194 Naked> Σ0 →0x21196 ←0x21152
<MI 21190 MOVEQ.L #0x02,D7> {}
<MI 21192 BRA 0x21196> {}
<POP 21194-21196 Naked> Σ0 ↓ ←0x21152
<MI 21194 MOVEQ.L #0x04,D7> {}
<POP 21196-211a8 Naked> Σ0 ↓ →0x211d6 ←0x2118c ←0x21190
<MI 21196 MOVE.L 0x254f6,D4> {}
<MI 2119c MOVE.L D7,D3> {}
<Call 0x2119e 0x10294> {}
?divs_d3_d4
<MI 211a4 TST.L D3> {}
<MI 211a6 BEQ 0x211d6> {}
<POP 211a8-211d6 Naked> Σ0 ↓
<Blob 0x211a8 [36] @> Δ-36 {[«36""»]}
<POP 211ba-211bc StackAdj> Δ-4 {[«36""»]|[-4-]}
<Lit 0x211bc 35> {[«36""»]|[$$Alignment problem with ADDRESS/SIZE]}
<Call 0x211ce 0x203fc> {[«36""»]|[$$Alignment problem with ADDRESS/SIZE]}
<POP 211d2-211d6 StackAdj> Δ+40 {}
<POP 211d6-211dc Naked> Σ0 ↓ →0x2120c ←0x21196
<MI 211d6 MOVEA.L 0x254fe,A0> {}
<MI 211d8 CMPA.W #0x01,A0> {}
<MI 211da BNE 0x2120c> {}
<POP 211dc-2120c Naked> Σ0 ↓
<Blob 0x211dc [52] @> Δ-52 {[«52""»]}
<POP 211ec-211ee StackAdj> Δ-8 {[«52""»]|[-8-]}
<Lit 0x211ee 51> {[«52""»]|[-4-]|[$$Enter filename with extention [e.g. foobar.m200] :_]}
<Call 0x21200 0x103e4> {[«52""»]|[-4-]|[$$Enter filename with extention [e.g. foobar.m200] :_]}
AskConsoleString(prompt : String) : String
<POP 21206-21208 StackAdj> Δ+4 {[«52""»]|[-4-]}
<MI 21208 MOVE.L (A7)+,0x254fe> Δ+4 {[«52""»]}
<POP 2120a-2120c StackAdj> Δ+52 {}
<POP 2120c-21210 Naked> Σ0 ↓ ←0x211d6
<Call 0x2120c 0x209a8> {}
<POP 21210-21218 Epilogue> Σ0
@ 21218
<POP 21218-2123e Body>
<POP 21218-2122a Prologue> Σ0 ↓
<POP 2122a-2123a Naked> Σ0 ↓
<MI 2122a CLR.L 0x254fa> {}
<MI 21230 MOVE.L #0x1,0x254fe> {}
<POP 2123a-2123e Epilogue> Σ0
@ 2123e
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x006 @ 4(rw)>
<POP 2123e-212fc Body> Δ+4
<POP 2123e-21254 Prologue> Σ0 ↓
<POP 21254-2125c RegCacheLoad> Σ0 ↓
<POP 2125c-21264 Naked> Σ0 ↓
<MI 2125c MOVEA.L (A6+0x8),A0> {}
<MI 21260 CLR.B (A0)> {}
<MI 21262 MOVEQ.L #0x00,D7> {}
<POP 21264-212b8 Naked> Σ0 ↓ →0x212ec ←0x212ec
<MI 21264 MOVE.B D7,D0> {}
<MI 21266 EXTB.W D0> {}
<MI 21268 MULS.W #0x0c,D0> {}
<MI 2126a LEA.L 0x20384,A0> {}
<Blob 0x2126e [12] (A0+D0.W)> Δ-12 {[«12»]}
<POP 2127e-21280 StackAdj> Δ-4 {[«12»]|[-4-]}
<Lit 0x21280> {[«12»]|[$$…]}
<Pointer.sp 0x21280 4> Δ-4
<Const 0x21284 0x1.2> Δ-2
<Const 0x21286 0xc.2> Δ-2
<Call 0x21288 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2128e-21290 StackAdj> Δ+8
<MI 21290 MOVE.L (A7)+,(A6-0x6)> Δ+4 {[«12»]}
<POP 21292-21294 StackAdj> Δ+6 {[-6-]}
<MI 21294 MOVE.L (A6-0x6),(A7)> {[-2-]|[4, '(A6-0x6)']}
<MI 21296 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x6)']|[4, '(A6+0x10)']}
<Call 0x2129a 0x102c8> {[-2-]|[4, '(A6-0x6)']|[4, '(A6+0x10)']}
StringEqual(a, b : String) : Byte
<POP 212a0-212a2 StackAdj> Δ+8 {[-2-]}
<MI 212a2 MOVE.B (A7)+,D0> Δ+2 {}
<MI 212a4 EXTB.W D0> {}
<POP 0x212a6 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 212a8 MOVE.B D0,D6> {}
<Pointer.fp 0x212aa <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Call 0x212ac 0x102bc> {[@@-6]}
FreeString(VAR a : String)
<POP 212b2-212b4 StackAdj> Δ+4 {}
<MI 212b4 TST.B D6> {}
<MI 212b6 BEQ 0x212ec> {}
<POP 212b8-212cc Naked> Σ0 →0x212d0 →0x212da
<MI 212b8 MOVE.B D7,D0> {}
<MI 212ba EXTB.W D0> {}
<POP 0x212bc LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 212c2 ADD.W D0,D0> {}
<MI 212c4 SWITCH D0.W> {}
<POP 212d0-212da Naked> Σ0 Δ-4 →0x212e2 ←0x212b8
<MI 212d0 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x212d4 0x2100c> {[4, '(A6+0xc)']}
<MI 212d8 BRA 0x212e2> {[4, '(A6+0xc)']}
<POP 212da-212e2 Naked> Σ0 Δ-4 ↓ ←0x212b8
<MI 212da MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x212de 0x21132> {[4, '(A6+0xc)']}
<POP 212e2-212ec Naked> Σ-4 Δ+4 →0x212f4 ←0x212d0
<POP 212e2-212e4 StackAdj> Δ+4 {}
<MI 212e4 MOVEA.L (A6+0x8),A0> {}
<MI 212e8 MOVE.B #0x01,(A0)> {}
<MI 212ea BRA 0x212f4> {}
<POP 212ec-212f4 Naked> Σ0 ↓ →0x21264 ←0x21264
<MI 212ec ADDQ.B #0x1,D7> {}
<MI 212ee CMP.B #0x01,D7> {}
<MI 212f0 BLE 0x21264> {}
<POP 212f4-212fc Epilogue> Σ0 ←0x212e2
@ 212fc
<LVAR 0x008 4(r)>
<POP 212fc-21334 Body>
<POP 212fc-21312 Prologue> Σ0 ↓
<POP 21312-2132c Naked> Σ0 ↓
<Call 0x21312 0x10398> {}
FSCALL_10398
<MI 21318 MOVEA.L (A6+0x8),A0> {}
<MI 2131c LEA.L 0x202fa,A1> {}
<BlockMove 10,A1,A0> {}
<Call 0x21328 0x21218> {}
<POP 2132c-21334 Epilogue> Σ0
@ 219b0
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(w)>
<POP 219b0-219f2 Body>
<POP 219b0-219c6 Prologue> Σ0 ↓
<POP 219c6-219ca Naked> Σ0 ↓
<MI 219c6 MOVEA.L (A6+0x8),A4> {}
<POP 219ca-219d0 Naked> Σ0 ↓ →0x219ea ←0x219d0
<MI 219ca CMPA.W #0x1,A4> {}
<MI 219ce BEQ 0x219ea> {}
<POP 219d0-219ea Naked> Σ0 →0x219ca
<MI 219d0 MOVE.L A4,(A6-0x4)> {}
<MI 219d4 MOVEA.L (A4+0x8),A4> {}
<Pointer.fp 0x219d8 <LVAR -0x004 @ 4(w)>> Δ-4 {[@@-4]}
<Const 0x219dc 0xc.4> Δ-4 {[@@-4]|[##12]}
<Call 0x219e0 0x102a8> {[@@-4]|[##12]}
Free2(a : Pointer; b : Long)
<POP 219e6-219e8 StackAdj> Δ+8 {}
<MI 219e8 BRA 0x219ca> {}
<POP 219ea-219f2 Epilogue> Σ0 ←0x219ca
@ 219f2
<LVAR 0x008 4(r)>
<POP 219f2--0001 Body>
<POP 219f2-21a08 Prologue> Σ0 ↓
<POP 21a08-21a12 Naked> Σ0 ↓ →0x21a1c
<MI 21a08 MOVEA.L (A6+0x8),A0> {}
<MI 21a0c CMPA.W #0x1,A0> {}
<MI 21a10 BEQ 0x21a1c> {}
<POP 21a12-21a1c Naked> Σ0 ↓
<MI 21a12 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Call 0x21a14 0x103e0> {[4, 'A0']}
WriteConsoleStringCrLf(str : String)
<POP 21a1a-21a1c StackAdj> Δ+4 {}
<POP 21a1c-21a2a Naked> Σ0 ←0x21a08
<POP 21a1c-21a2a Bailout> {}
<MI 21a1c MOVEA.L (A5+0x8),A7>
<MI 21a20 MOVEA.W #0x0,A6>
<MI 21a24 JMP 0x252ce>
@ 21a50
<LVAR 0x008 1(rw)>
<POP 21a50-21a8e Body>
<POP 21a50-21a66 Prologue> Σ0 ↓
<POP 21a66-21a74 Naked> Σ0 ↓ →0x21a7a
<MI 21a66 MOVE.L 0x26518,D0> {}
<MI 21a6c CMP.L 0x2651c,D0> {}
<MI 21a72 BLE 0x21a7a> {}
<POP 21a74-21a7a Naked> Σ0 →0x21a86
<MI 21a74 CLR.B (A6+0x8)> {}
<MI 21a78 BRA 0x21a86> {}
<POP 21a7a-21a86 Naked> Σ0 ↓ ←0x21a66
<MI 21a7a LEA.L 0x25510,A0> {}
<MI 21a80 MOVE.B (A0+D0.L+#0x7),(A6+0x8)> {}
<POP 21a86-21a8e Epilogue> Σ0 ←0x21a74
@ 21a8e
<LVAR 0x008 1(rw)>
<POP 21a8e-21ad2 Body>
<POP 21a8e-21aa4 Prologue> Σ0 ↓
<POP 21aa4-21aaa RegCacheLoad> Σ0 ↓
<POP 21aaa-21ab4 Naked> Σ0 ↓ →0x21aba
<MI 21aaa MOVE.L 0x26518,D0> {}
<MI 21aac CMP.L 0x2651c,D0> {}
<MI 21ab2 BLE 0x21aba> {}
<POP 21ab4-21aba Naked> Σ0 →0x21ac6
<MI 21ab4 CLR.B (A6+0x8)> {}
<MI 21ab8 BRA 0x21ac6> {}
<POP 21aba-21ac6 Naked> Σ0 ↓ ←0x21aaa
<MI 21aba LEA.L 0x25510,A0> {}
<MI 21ac0 MOVE.B (A0+D0.L+#0x7),(A6+0x8)> {}
<POP 21ac6-21aca Naked> Σ0 ↓ ←0x21ab4
<MI 21ac6 ADDQ.L #0x1,D0> {}
<MI 21ac8 MOVE.L D0,0x26518> {}
<POP 21aca-21ad2 Epilogue> Σ0
@ 21ad2
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 21ad2-21bac Body>
<POP 21ad2-21ae8 Prologue> Σ0 ↓
<POP 21ae8-21afa RegCacheLoad> Σ0 ↓
<POP 21afa-21b06 Naked> Σ0 ↓ →0x21b10 ←0x21ba0
<POP 21afa-21afc StackAdj> Δ-2 {[-2-]}
<Call 0x21afc 0x21a50> {[-2-]}
<MI 21b00 MOVE.B (A7)+,D0> Δ+2 {}
<MI 21b02 CMP.B #0x5b,D0> {}
<MI 21b04 BNE 0x21b10> {}
<POP 21b06-21b10 Naked> Σ0 →0x21ba0
<Call 0x21b06 0x24dd8> {}
<MI 21b0c BRA 0x21ba0> {}
<POP 21b10-21b1c Naked> Σ0 ↓ →0x21b34 ←0x21afa
<MI 21b10 MOVE.L 0x26518,D6> {}
<POP 21b12-21b14 StackAdj> Δ-2 {[-2-]}
<Call 0x21b14 0x21a8e> {[-2-]}
<MI 21b18 MOVE.B (A7)+,D5> Δ+2 {}
<MI 21b1a BNE 0x21b34> {}
<POP 21b1c-21b32 Naked> Σ0 →0x21ba4
<MI 21b1c MOVEA.L (A6+0xc),A0> {}
<MI 21b20 LEA.L 0x2190a,A1> {}
<BlockMove 8,A1,A0> {}
<MI 21b2c MOVEA.L (A6+0x8),A0> {}
<MI 21b2e MOVE.B #0x02,(A0)> {}
<MI 21b30 BRA 0x21ba4> {}
<POP 21b34-21b38 Naked> Σ0 ↓ →0x21b40 ←0x21b10
<MI 21b34 CMP.B #0x2c,D5> {}
<MI 21b36 BNE 0x21b40> {}
<POP 21b38-21b40 Naked> Σ0 →0x21b90
<MI 21b38 MOVEA.L (A6+0x8),A0> {}
<MI 21b3a MOVE.B #0x03,(A0)> {}
<MI 21b3e BRA 0x21b90> {}
<POP 21b40-21b44 Naked> Σ0 ↓ →0x21b4c ←0x21b34
<MI 21b40 CMP.B #0x3b,D5> {}
<MI 21b42 BNE 0x21b4c> {}
<POP 21b44-21b4c Naked> Σ0 →0x21b90
<MI 21b44 MOVEA.L (A6+0x8),A0> {}
<MI 21b46 MOVE.B #0x01,(A0)> {}
<MI 21b4a BRA 0x21b90> {}
<POP 21b4c-21b52 Naked> Σ0 ↓ →0x21b58 ←0x21b40
<MI 21b4c CMPI.B #0x5d,D5> {}
<MI 21b50 BNE 0x21b58> {}
<POP 21b52-21b58 Naked> Σ0 →0x21b90
<MI 21b52 MOVEA.L (A6+0x8),A0> {}
<MI 21b54 MOVE.B #0x02,(A0)> {}
<MI 21b56 BRA 0x21b90> {}
<POP 21b58-21b5c Naked> Σ0 ↓ ←0x21b4c
<MI 21b58 MOVEA.L (A6+0x8),A0> {}
<MI 21b5a CLR.B (A0)> {}
<POP 21b5c-21b68 Naked> Σ0 ↓ →0x21b70 ←0x21b8e
<POP 21b5c-21b5e StackAdj> Δ-2 {[-2-]}
<Call 0x21b5e 0x21a50> {[-2-]}
<MI 21b62 MOVE.B (A7)+,D7> Δ+2 {}
<MI 21b64 CMP.B #0x5b,D7> {}
<MI 21b66 BNE 0x21b70> {}
<POP 21b68-21b70 Naked> Σ0 →0x21b8e
<Call 0x21b68 0x24dd8> {}
<MI 21b6e BRA 0x21b8e> {}
<POP 21b70-21b74 Naked> Σ0 ↓ →0x21b82 ←0x21b5c
<MI 21b70 CMP.B #0x3b,D7> {}
<MI 21b72 BEQ 0x21b82> {}
<POP 21b74-21b78 Naked> Σ0 ↓ →0x21b82
<MI 21b74 CMP.B #0x2c,D7> {}
<MI 21b76 BEQ 0x21b82> {}
<POP 21b78-21b7e Naked> Σ0 ↓ →0x21b82
<MI 21b78 CMPI.B #0x5d,D7> {}
<MI 21b7c BEQ 0x21b82> {}
<POP 21b7e-21b82 Naked> Σ0 ↓ →0x21b86
<MI 21b7e TST.B D7> {}
<MI 21b80 BNE 0x21b86> {}
<POP 21b82-21b84 Naked> Σ0 →0x21b90 ←0x21b70 ←0x21b74 ←0x21b78
<MI 21b82 BRA 0x21b90> {}
<POP 21b86-21b8e Naked> Σ0 ↓ ←0x21b7e
<POP 21b86-21b88 StackAdj> Δ-2 {[-2-]}
<Call 0x21b88 0x21a8e> {[-2-]}
<MI 21b8c MOVE.B (A7)+,D7> Δ+2 {}
<POP 21b8e-21b90 Naked> Σ0 →0x21b5c ←0x21b68
<MI 21b8e BRA 0x21b5c> {}
<POP 21b90-21ba0 Naked> Σ0 →0x21ba4 ←0x21b38 ←0x21b44 ←0x21b52 ←0x21b82
<MI 21b90 MOVEA.L (A6+0xc),A0> {}
<MI 21b94 MOVE.L D6,(A0)> {}
<MI 21b96 MOVE.L 0x26518,(A0+0x4)> {}
<MI 21b9a SUBQ.L #0x1,(A0+0x4)> {}
<MI 21b9e BRA 0x21ba4> {}
<POP 21ba0-21ba4 Naked> Σ0 →0x21afa ←0x21b06
<MI 21ba0 BRA 0x21afa> {}
<POP 21ba4-21bac Epilogue> Σ0 ←0x21b1c ←0x21b90
@ 21bac
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 1(rw)>
<LVAR -0x008 4(w)>
<LVAR -0x00c @ 4(w)>
<POP 21bac-21c4a Body>
<POP 21bac-21bc2 Prologue> Σ0 ↓
<POP 21bc2-21bcc RegCacheLoad> Σ0 ↓
<POP 21bcc-21bd8 Naked> Σ0 ↓ →0x21bde
<MI 21bcc MOVEA.L (A6+0x8),A0> {}
<MI 21bd0 MOVE.B (A0),D0> {}
<MI 21bd2 CMPI.B #0x01,D0> {}
<MI 21bd6 BEQ 0x21bde> {}
<POP 21bd8-21bde Naked> Σ0 ↓ →0x21bec
<MI 21bd8 CMPI.B #0x02,D0> {}
<MI 21bdc BNE 0x21bec> {}
<POP 21bde-21bec Naked> Σ0 →0x21c28 ←0x21bcc
<MI 21bde MOVE.L 0x2190a,(A6-0xc)> {}
<MI 21be2 MOVE.L 0x2190e,(A6-0x8)> {}
<MI 21be8 MOVE.B D0,(A6-0x4)> {}
<MI 21bea BRA 0x21c28> {}
<POP 21bec-21bfe Naked> Σ0 ↓ →0x21c1a ←0x21bd8 ←0x21c22
<Pointer.fp 0x21bec <LVAR -0x00c @ 4(w)>> Δ-4 {[@@-12]}
<Pointer.fp 0x21bee <LVAR -0x004 @ 1(rw)>> Δ-4 {[@@-12]|[@@-4]}
<Call 0x21bf0 0x21ad2> {[@@-12]|[@@-4]}
<POP 21bf4-21bf6 StackAdj> Δ+8 {}
<MI 21bf6 MOVEA.L (A6+0x8),A0> {}
<MI 21bfa TST.B (A6-0x4)> {}
<MI 21bfc BEQ 0x21c1a> {}
<POP 21bfe-21c04 Naked> Σ0 ↓ →0x21c1a
<MI 21bfe MOVE.B (A0),D0> {}
<MI 21c00 CMP.B #0x03,D0> {}
<MI 21c02 BNE 0x21c1a> {}
<POP 21c04-21c1a Naked> Σ0 →0x21c22
<MI 21c04 MOVE.B (A6-0x4),D0> {}
<MI 21c06 EXTB.W D0> {}
<POP 0x21c08 LimitCheck 0x0 ≤ D0 ≤ 0x3> {}
<MI 21c0a MOVE.B D0,(A0)> {}
<MI 21c0c MOVE.L 0x2190a,(A6-0xc)> {}
<MI 21c10 MOVE.L 0x2190e,(A6-0x8)> {}
<MI 21c16 CLR.B (A6-0x4)> {}
<MI 21c18 BRA 0x21c22> {}
<POP 21c1a-21c22 Naked> Σ0 ↓ ←0x21bec ←0x21bfe
<MI 21c1a MOVE.B (A6-0x4),D0> {}
<MI 21c1c EXTB.W D0> {}
<POP 0x21c1e LimitCheck 0x0 ≤ D0 ≤ 0x3> {}
<MI 21c20 MOVE.B D0,(A0)> {}
<POP 21c22-21c28 Naked> Σ0 ↓ →0x21bec ←0x21c04
<MI 21c22 MOVE.B (A6-0x4),D0> {}
<MI 21c24 CMP.B #0x03,D0> {}
<MI 21c26 BEQ 0x21bec> {}
<POP 21c28-21c42 Naked> Σ0 ↓ ←0x21bde
<MI 21c28 MOVEA.L (A6+0x10),A0> {}
<MI 21c2c LEA.L (A6-0xc),A1> {}
<BlockMove 8,A1,A0> {}
<MI 21c36 MOVEA.L (A6+0xc),A0> {}
<MI 21c3a MOVE.B (A6-0x4),D0> {}
<MI 21c3c EXTB.W D0> {}
<POP 0x21c3e LimitCheck 0x0 ≤ D0 ≤ 0x3> {}
<MI 21c40 MOVE.B D0,(A0)> {}
<POP 21c42-21c4a Epilogue> Σ0
@ 21c4a
<LVAR 0x008 4(rw)>
<LVAR -0x004 1(rw)>
<LVAR -0x010 2(rw)>
<POP 21c4a-21d52 Body>
<POP 21c4a-21c60 Prologue> Σ0 ↓
<POP 21c60-21c6e RegCacheLoad> Σ0 ↓
<POP 21c6e-21c86 Naked> Σ0 Δ-4 ↓
<MI 21c6e MOVEQ.L #0x01,D6> {}
<MI 21c70 CLR.W (A6-0x10)> {}
<MI 21c72 MOVEQ.L #0x01,D5> {}
<POP 21c74-21c76 StackAdj> Δ-4 {[-4-]}
<MI 21c76 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x21c78 0x102f0> {[-4-]|[4, '(A6+0x8)']}
ToUpper(a : String) : String
<POP 21c7e-21c80 StackAdj> Δ+4 {[-4-]}
<MI 21c80 MOVE.L (A7)+,(A6+0x8)> Δ+4 {}
<MI 21c82 MOVEA.L (A6+0x8),A0> {}
<MI 21c84 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<POP 21c86-21c92 Naked> Σ-4 ↓ →0x21d40 ←0x21d26
<MI 21c86 MOVEA.L (A7),A0> {[-4-]}
<MI 21c88 MOVE.W (A0),D0> {[-4-]}
<MI 21c8a EXTW.L D0> {[-4-]}
<MI 21c8c CMP.L D0,D6> {[-4-]}
<MI 21c8e BGT 0x21d40> {[-4-]}
<POP 21c92-21ca4 Naked> Σ-4 ↓ →0x21ca6
<MI 21c92 CLR.L D0> {[-4-]}
<MI 21c94 MOVE.B (A0+D6.L+#0x1),D0> {[-4-]}
<MI 21c98 ANDI.W #0x007f,D0> {[-4-]}
<MI 21c9c MOVE.B D0,(A6-0x4)> {[-4-]}
<MI 21c9e CMPI.B #0x09,D0> {[-4-]}
<MI 21ca2 BNE 0x21ca6> {[-4-]}
<POP 21ca4-21ca6 Naked> Σ-4 ↓
<MI 21ca4 MOVE.B #0x20,(A6-0x4)> {[-4-]}
<POP 21ca6-21cb2 Naked> Σ-4 ↓ →0x21ce2 ←0x21c92
<MI 21ca6 CLR.L D0> {[-4-]}
<MI 21ca8 MOVE.B (A6-0x4),D0> {[-4-]}
<MI 21caa SUB.W #0x20,D0> {[-4-]}
<MI 21cac CMPI.W #0x000c,D0> {[-4-]}
<MI 21cb0 BHI 0x21ce2> {[-4-]}
<POP 21cb2-21cbc Naked> Σ-4 →0x21cda →0x21cd6 →0x21ce2 →0x21ce2 →0x21ce2 →0x21ce2 →0x21ce2 →0x21ce2 →0x21ce2 →0x21ce2 →0x21ce2 →0x21ce2 →0x21cde
<MI 21cb2 ADD.W D0,D0> {[-4-]}
<MI 21cb4 SWITCH D0.W> {[-4-]}
<POP 21cd6-21cd8 Naked> Σ-4 →0x21d40 ←0x21cb2
<MI 21cd6 BRA 0x21d40> {[-4-]}
<POP 21cda-21cde Naked> Σ-4 →0x21ce4 ←0x21cb2
<MI 21cda MOVEQ.L #0x00,D7> {[-4-]}
<MI 21cdc BRA 0x21ce4> {[-4-]}
<POP 21cde-21ce2 Naked> Σ-4 →0x21ce4 ←0x21cb2
<MI 21cde MOVEQ.L #0x01,D7> {[-4-]}
<MI 21ce0 BRA 0x21ce4> {[-4-]}
<POP 21ce2-21ce4 Naked> Σ-4 ↓ ←0x21ca6 ←0x21cb2 ←0x21cb2 ←0x21cb2 ←0x21cb2 ←0x21cb2 ←0x21cb2 ←0x21cb2 ←0x21cb2 ←0x21cb2 ←0x21cb2
<MI 21ce2 MOVEQ.L #0x02,D7> {[-4-]}
<POP 21ce4-21d08 Naked> Σ-4 →0x21d0e →0x21d10 →0x21d1a ←0x21cda ←0x21cde
<MI 21ce4 MOVEQ.L #0x03,D0> {[-4-]}
<MI 21ce6 MULS.W (A6-0x10),D0> {[-4-]}
<MI 21ce8 LEA.L 0x21912,A0> {[-4-]}
<MI 21cec LEA.L (A0+D0.W),A0> {[-4-]}
<MI 21cf0 CLR.L D0> {[-4-]}
<MI 21cf2 MOVE.B (A0+D7.W),D0> {[-4-]}
<POP 0x21cf6 LimitCheck 0x0 ≤ D0 ≤ 0x2> {[-4-]}
<MI 21cfe ADD.W D0,D0> {[-4-]}
<MI 21d00 SWITCH D0.W> {[-4-]}
<POP 21d0e-21d10 Naked> Σ-4 →0x21d26 ←0x21ce4
<MI 21d0e BRA 0x21d26> {[-4-]}
<POP 21d10-21d1a Naked> Σ-4 →0x21d26 ←0x21ce4
<MI 21d10 MOVEA.L (A7),A0> {[-4-]}
<MI 21d12 MOVE.B (A6-0x4),(A0+D5.L+#0x1)> {[-4-]}
<MI 21d16 ADDQ.L #0x1,D5> {[-4-]}
<MI 21d18 BRA 0x21d26> {[-4-]}
<POP 21d1a-21d26 Naked> Σ-4 ↓ ←0x21ce4
<MI 21d1a MOVEA.L (A7),A0> {[-4-]}
<MI 21d1c MOVE.B #0x2c,(A0+D5.L+#0x1)> {[-4-]}
<MI 21d22 ADDQ.L #0x1,D5> {[-4-]}
<MI 21d24 SUBQ.L #0x1,D6> {[-4-]}
<POP 21d26-21d40 Naked> Σ-4 →0x21c86 ←0x21d0e ←0x21d10
<MI 21d26 MOVEQ.L #0x03,D0> {[-4-]}
<MI 21d28 MULS.W (A6-0x10),D0> {[-4-]}
<MI 21d2a LEA.L 0x2191b,A0> {[-4-]}
<MI 21d2e LEA.L (A0+D0.W),A0> {[-4-]}
<MI 21d32 CLR.L D0> {[-4-]}
<MI 21d34 MOVE.B (A0+D7.W),D0> {[-4-]}
<MI 21d38 MOVE.W D0,(A6-0x10)> {[-4-]}
<MI 21d3a ADDQ.L #0x1,D6> {[-4-]}
<MI 21d3c BRA 0x21c86> {[-4-]}
<POP 21d40-21d4a Naked> Σ-4 Δ+4 ↓ ←0x21c86 ←0x21cd6
<MI 21d40 MOVEA.L (A7),A0> {[-4-]}
<MI 21d42 MOVE.L D5,D0> {[-4-]}
<MI 21d44 SUBQ.L #0x1,D0> {[-4-]}
<MI 21d46 MOVE.W D0,(A0)> {[-4-]}
<POP 21d48-21d4a StackAdj> Δ+4 {}
<POP 21d4a-21d52 Epilogue> Σ0
@ 21d52
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @ 1(r)>
<LVAR -0x00a @>
<LVAR -0x00e @ 4(r)>
<LVAR -0x014 @ 1(r)>
<POP 21d52-21dfe Body>
<POP 21d52-21d68 Prologue> Σ0 ↓
<POP 21d68-21d6e RegCacheLoad> Σ0 ↓
<POP 21d6e-21d7c Naked> Σ0 ↓ →0x21d84
<POP 21d6e-21d70 StackAdj> Δ-2 {[-2-]}
<Call 0x21d70 0x21a50> {[-2-]}
<MI 21d74 MOVE.B (A7)+,D0> Δ+2 {}
<MI 21d76 CMPI.B #0x5b,D0> {}
<MI 21d7a BNE 0x21d84> {}
<POP 21d7c-21d84 Naked> Σ0 ↓
<POP 21d7c-21d7e StackAdj> Δ-2 {[-2-]}
<Call 0x21d7e 0x21a8e> {[-2-]}
<MI 21d82 MOVE.B (A7)+,D7> Δ+2 {}
<POP 21d84-21d8e Naked> Σ0 ↓ ←0x21d6e
<MI 21d84 MOVEA.L (A6+0xc),A0> {}
<MI 21d88 MOVE.L #0x01,(A0)> {}
<MI 21d8a CLR.B (A6-0x14)> {}
<POP 21d8e-21da8 Naked> Σ0 ↓ →0x21dde ←0x21dde
<Pointer.fp 0x21d8e <LVAR -0x00a @>> Δ-4 {[@@-10]}
<Pointer.fp 0x21d92 <LVAR -0x002 @ 1(r)>> Δ-4 {[@@-10]|[@@-2]}
<Pointer.fp 0x21d96 <LVAR -0x014 @ 1(r)>> Δ-4 {[@@-10]|[@@-2]|[@@-20]}
<Call 0x21d9a 0x21bac> {[@@-10]|[@@-2]|[@@-20]}
<POP 21d9e-21da2 StackAdj> Δ+12 {}
<MI 21da2 TST.B (A6-0x2)> {}
<MI 21da6 BNE 0x21dde> {}
<POP 21da8-21dd4 Naked> Σ0 ↓ →0x21dd8
<Pointer.fp 0x21da8 <LVAR -0x00e @ 4(r)>> Δ-4 {[@@-14]}
<Const 0x21daa 0xc.4> Δ-4 {[@@-14]|[##12]}
<Call 0x21dae 0x1029c> {[@@-14]|[##12]}
Malloc1(length : Long) : Pointer
<POP 21db4-21db6 StackAdj> Δ+8 {}
<MI 21db6 MOVEA.L (A6-0xe),A0> {}
<MI 21db8 MOVEA.L A0,A1> {}
<MI 21dba LEA.L (A6-0xa),A2> {}
<BlockMove 8,A2,A1> {}
<MI 21dc6 MOVE.L #0x01,(A0+0x8)> {}
<MI 21dca MOVEA.L (A6+0xc),A0> {}
<MI 21dce MOVEA.L (A0),A1> {}
<MI 21dd0 CMPA.W #0x01,A1> {}
<MI 21dd2 BNE 0x21dd8> {}
<POP 21dd4-21dd8 Naked> Σ0 →0x21ddc
<MI 21dd4 MOVE.L (A6-0xe),(A0)> {}
<MI 21dd6 BRA 0x21ddc> {}
<POP 21dd8-21ddc Naked> Σ0 ↓ ←0x21da8
<MI 21dd8 MOVE.L (A6-0xe),(A4+0x8)> {}
<POP 21ddc-21dde Naked> Σ0 ↓ ←0x21dd4
<MI 21ddc MOVEA.L (A6-0xe),A4> {}
<POP 21dde-21de4 Naked> Σ0 ↓ →0x21d8e ←0x21d8e
<MI 21dde TST.B (A6-0x2)> {}
<MI 21de2 BEQ 0x21d8e> {}
<POP 21de4-21df4 Naked> Σ0 ↓ →0x21df6
<MI 21de4 MOVEA.L (A6+0x8),A0> {}
<MI 21de8 CLR.B (A0)> {}
<MI 21dea MOVE.B (A6-0x2),D0> {}
<MI 21dee CMPI.B #0x02,D0> {}
<MI 21df2 BNE 0x21df6> {}
<POP 21df4-21df6 Naked> Σ0 ↓
<MI 21df4 ADDQ.B #0x1,(A0)> {}
<POP 21df6-21dfe Epilogue> Σ0 ←0x21de4
@ 21dfe
<LVAR 0x00c 4(w)>
<LVAR 0x008 4(r)>
<POP 21dfe-21e34 Body>
<POP 21dfe-21e14 Prologue> Σ0 ↓
<POP 21e14-21e1a Naked> Σ0 ↓
<MI 21e14 MOVEQ.L #-0x01,D7> {}
<MI 21e16 MOVEA.L (A6+0x8),A4> {}
<POP 21e1a-21e20 Naked> Σ0 ↓ →0x21e28 ←0x21e20
<MI 21e1a CMPA.W #0x1,A4> {}
<MI 21e1e BEQ 0x21e28> {}
<POP 21e20-21e28 Naked> Σ0 →0x21e1a
<MI 21e20 ADDQ.L #0x1,D7> {}
<MI 21e22 MOVEA.L (A4+0x8),A4> {}
<MI 21e26 BRA 0x21e1a> {}
<POP 21e28-21e2c Naked> Σ0 ↓ ←0x21e1a
<MI 21e28 MOVE.L D7,(A6+0xc)> {}
<POP 21e2c-21e34 Epilogue> Σ0
@ 21e34
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 21e34-21ec0 Body>
<POP 21e34-21e4a Prologue> Σ0 ↓
<POP 21e4a-21e4c RegCacheLoad> Σ0 ↓
<POP 21e4c-21e60 Naked> Σ0 ↓ →0x21eb8
<POP 21e4c-21e4e StackAdj> Δ-4 {[-4-]}
<MI 21e4e MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<Call 0x21e52 0x21dfe> {[-4-]|[4, '(A6+0xc)']}
<POP 21e56-21e58 StackAdj> Δ+4 {[-4-]}
<MI 21e58 MOVE.L (A7)+,D0> Δ+4 {}
<MI 21e5a CMP.L (A6+0x8),D0> {}
<MI 21e5e BEQ 0x21eb8> {}
<POP 21e60-21eb8 Naked> Σ0 ↓
<MI 21e60 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<Call 0x21e64 0x219b0> {[4, '(A6+0xc)']}
<POP 21e68-21e6a StackAdj> Δ+4 {}
<Blob 0x21e6a [32] @> Δ-32 {[«32""»]}
<Blob 0x21e76 [10] (A6+0x1a)> Δ-10 {[«32""»]|[«10»]}
<POP 21e82-21e84 StackAdj> Δ-8 {[«32""»]|[«10»]|[-8-]}
<Lit 0x21e84 32> {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]}
<POP 21e94-21e96 StackAdj> Δ-4 {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]|[-4-]}
<Lit 0x21e96> {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]|[$$…]}
<Pointer.sp 0x21e96 12> Δ-4
<Const 0x21e9a 0x1.2> Δ-2
<Const 0x21e9c 0xa.2> Δ-2
<Call 0x21ea0 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21ea6-21ea8 StackAdj> Δ+8
<Call 0x21ea8 0x102d0> {[«32""»]|[«10»]|[-4-]|[$$Wrong number of arguments for :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 21eae-21eb0 StackAdj> Δ+8 {[«32""»]|[«10»]|[-4-]}
<Call 0x21eb0 0x219f2> {[«32""»]|[«10»]|[-4-]}
<POP 21eb4-21eb8 StackAdj> Δ+46 {}
<POP 21eb8-21ec0 Epilogue> Σ0 ←0x21e4c
@ 21ec0
<LVAR 0x014 1(rw)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 21ec0-21f46 Body> Δ-4
<POP 21ec0-21ed6 Prologue> Σ0 ↓
<POP 21ed6-21eea Naked> Σ0 ↓ →0x21f38
<MI 21ed6 CLR.B (A6+0x14)> {}
<MI 21eda MOVE.L (A6+0x10),D0> {}
<MI 21ede ADD.L (A6+0x8),D0> {}
<MI 21ee2 CMP.L 0x2651c,D0> {}
<MI 21ee8 BGT 0x21f38> {}
<POP 21eea-21ef0 Naked> Σ0 Δ-4 ↓
<MI 21eea MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 21eee MOVEQ.L #0x01,D7> {[4, '(A6+0x8)']}
<POP 21ef0-21ef4 Naked> Σ-4 ↓ →0x21f36 ←0x21f32
<MI 21ef0 CMP.L (A7),D7> {[-4-]}
<MI 21ef2 BGT 0x21f36> {[-4-]}
<POP 21ef4-21f2e Naked> Σ-4 ↓ →0x21f32
<MI 21ef4 MOVE.L (A6+0x10),D0> {[-4-]}
<MI 21ef8 ADD.L D7,D0> {[-4-]}
<MI 21efa SUBQ.L #0x1,D0> {[-4-]}
<POP 0x21efc LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-4-]}
<MI 21f06 LEA.L 0x25510,A0> {[-4-]}
<MI 21f0c MOVE.L (A6+0xc),D1> {[-4-]}
<MI 21f10 ADD.L D7,D1> {[-4-]}
<MI 21f12 SUBQ.L #0x1,D1> {[-4-]}
<MI 21f14 SUBQ.L #0x1,D1> {[-4-]}
<POP 0x21f16 LimitCheck 0x0 ≤ D1 ≤ 0x3e> {[-4-]}
<MI 21f20 LEA.L 0x2150c,A1> {[-4-]}
<MI 21f24 MOVE.B (A0+D0.L+#0x8),D0> {[-4-]}
<MI 21f28 CMP.B (A1+D1.L),D0> {[-4-]}
<MI 21f2c BEQ 0x21f32> {[-4-]}
<POP 21f2e-21f32 Naked> Σ-4 Δ+4 →0x21f3e
<POP 21f2e-21f30 StackAdj> Δ+4 {}
<MI 21f30 BRA 0x21f3e> {}
<POP 21f32-21f36 Naked> Σ-4 ↓ →0x21ef0 ←0x21ef4
<MI 21f32 ADDQ.L #0x1,D7> {[-4-]}
<MI 21f34 BVC 0x21ef0> {[-4-]}
<POP 21f36-21f38 Naked> Σ-4 Δ+4 ↓ ←0x21ef0
<POP 21f36-21f38 StackAdj> Δ+4 {}
<POP 21f38-21f3e Naked> Σ0 ↓ ←0x21ed6
<MI 21f38 MOVE.B #0x01,(A6+0x14)> {}
<POP 21f3e-21f46 Epilogue> Σ0 ←0x21f2e
@ 21f46
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 21f46-21fd0 Body>
<POP 21f46-21f5c Prologue> Σ0 ↓
<POP 21f5c-21f66 RegCacheLoad> Σ0 ↓
<POP 21f66-21f6a Naked> Σ0 ↓ →0x21fa8
<MI 21f66 TST.L (A6+0x8)> {}
<MI 21f68 BGE 0x21fa8> {}
<POP 21f6a-21f78 Naked> Σ0 ↓ →0x21fa8
<MI 21f6a MOVE.L (A6+0x8),D0> {}
<MI 21f6c NEG.L D0> {}
<MI 21f6e ADD.L 0x2651c,D0> {}
<MI 21f70 CMPI.L #0x00001000,D0> {}
<MI 21f76 BLE 0x21fa8> {}
<POP 21f78-21fa8 Naked> Σ0 ↓
<Blob 0x21f78 [28] @> Δ-28 {[«28""»]}
<POP 21f8a-21f8c StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x21f8c 27> {[«28""»]|[$$Evaluation buffer overflow.]}
<Call 0x21fa0 0x219f2> {[«28""»]|[$$Evaluation buffer overflow.]}
<POP 21fa4-21fa8 StackAdj> Δ+32 {}
<POP 21fa8-21fc8 Naked> Σ0 ↓ ←0x21f66 ←0x21f6a
<MI 21fa8 LEA.L 0x25518,A0> {}
<MI 21fae MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Blob 0x21fb0 [4] 0x2651c> Δ-4 {[4, 'A0']|[«4»]}
<MI 21fb2 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, 'A0']|[«4»]|[4, '(A6+0xc)']}
<MI 21fb6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, 'A0']|[«4»]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x21fb8 0x10364> {[4, 'A0']|[«4»]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
MovStringTail(Base, Len, Ptr, Delta)
<POP 21fbe-21fc2 StackAdj> Δ+16 {}
<MI 21fc2 MOVE.L 0x2651c,D0> {}
<MI 21fc4 SUB.L (A6+0x8),D0> {}
<MI 21fc6 MOVE.L D0,0x2651c> {}
<POP 21fc8-21fd0 Epilogue> Σ0
@ 21fd0
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 21fd0-2205a Body>
<POP 21fd0-21fe6 Prologue> Σ0 ↓
<POP 21fe6-21fea RegCacheLoad> Σ0 ↓
<POP 21fea-2200a Naked> Σ0 Δ-8 ↓
<MI 21fea MOVEA.L (A6+0x8),A0> {}
<MI 21fee MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 21ff0 MOVEA.L (A6+0xc),A1> {[4, 'A0']}
<MI 21ff2 MOVE.L (A1),-(A7)> Δ-4 {[4, 'A0']|[4, '(A1)']}
<MI 21ff4 MOVE.W (A0),D0> {[4, 'A0']|[4, '(A1)']}
<MI 21ff6 EXTW.L D0> {[4, 'A0']|[4, '(A1)']}
<MI 21ff8 NEG.L D0> {[4, 'A0']|[4, '(A1)']}
<MI 21ffa MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, '(A1)']|[4, 'D0']}
<Call 0x21ffc 0x21f46> {[4, 'A0']|[4, '(A1)']|[4, 'D0']}
<POP 22000-22002 StackAdj> Δ+8 {[4, 'A0']}
<MI 22002 MOVE.W (A0),D0> {[4, 'A0']}
<MI 22004 EXTW.L D0> {[4, 'A0']}
<MI 22006 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<MI 22008 MOVEQ.L #0x01,D7> {[4, 'A0']|[4, 'D0']}
<POP 2200a-2200e Naked> Σ-8 ↓ →0x22044 ←0x2200e
<MI 2200a CMP.L (A7),D7> {[-8-]}
<MI 2200c BGT 0x22044> {[-8-]}
<POP 2200e-22044 Naked> Σ-8 ↓ →0x2200a
<MI 2200e MOVEA.L (A6+0xc),A0> {[-8-]}
<MI 22010 MOVE.L D7,D0> {[-8-]}
<MI 22012 ADD.L (A0),D0> {[-8-]}
<MI 22014 SUBQ.L #0x1,D0> {[-8-]}
<MI 22016 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x22018 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-8-]}
<MI 22022 LEA.L 0x25510,A0> {[-8-]}
<MI 22028 MOVE.L D7,D1> {[-8-]}
<MI 2202a SUBQ.L #0x1,D1> {[-8-]}
<POP 0x2202c LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 22036 MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 2203a MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8)> {[-8-]}
<MI 22040 ADDQ.L #0x1,D7> {[-8-]}
<MI 22042 BVC 0x2200a> {[-8-]}
<POP 22044-22052 Naked> Σ-8 Δ+8 ↓ ←0x2200a
<POP 22044-22046 StackAdj> Δ+4 {[-4-]}
<MI 22046 MOVEA.L (A6+0xc),A0> {[-4-]}
<MI 22048 MOVEA.L (A7),A1> {[-4-]}
<MI 2204a MOVE.W (A1),D0> {[-4-]}
<MI 2204c EXTW.L D0> {[-4-]}
<MI 2204e ADD.L D0,(A0)> {[-4-]}
<POP 22050-22052 StackAdj> Δ+4 {}
<POP 22052-2205a Epilogue> Σ0
@ 2205a
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2205a-221da Body>
<POP 2205a-22070 Prologue> Σ0 ↓
<POP 22070-2207e RegCacheLoad> Σ0 ↓
<POP 2207e-22090 Naked> Σ0 ↓
<MI 2207e MOVEQ.L #0x00,D7> {}
<MI 22080 MOVEA.L (A6+0xc),A0> {}
<MI 22084 CLR.L (A0)> {}
<MI 22086 MOVEA.L (A6+0x8),A0> {}
<MI 22088 CLR.L (A0)> {}
<MI 2208a MOVE.L 0x26518,D6> {}
<POP 22090-220b0 Naked> Σ0 ↓ →0x22182 ←0x2218c ←0x22192
<MI 22090 MOVE.L D6,D0> {}
<MI 22092 SUBQ.L #0x1,D0> {}
<POP 0x22094 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {}
<MI 2209e LEA.L 0x25510,A0> {}
<MI 220a4 MOVE.B (A0+D0.L+#0x8),D0> {}
<MI 220a8 CMPI.B #0x5b,D0> {}
<MI 220ac BNE 0x22182> {}
<POP 220b0-220c4 Naked> Σ0 ↓ →0x22142
<POP 220b0-220b2 StackAdj> Δ-2 {[-2-]}
<MI 220b2 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x220b4 0x1.4> Δ-4 {[-2-]|[4, 'D6']|[##1]}
<Const 0x220b8 0x3.4> Δ-4 {[-2-]|[4, 'D6']|[##1]|[##3]}
<Call 0x220bc 0x21ec0> {[-2-]|[4, 'D6']|[##1]|[##3]}
<POP 220be-220c0 StackAdj> Δ+12 {[-2-]}
<MI 220c0 TST.B (A7)+> Δ+2 {}
<MI 220c2 BNE 0x22142> {}
<POP 220c4-220d6 Naked> Σ0 ↓ →0x22142
<POP 220c4-220c6 StackAdj> Δ-2 {[-2-]}
<MI 220c6 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x220c8 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##4]}
<Const 0x220ca 0x3.4> Δ-4 {[-2-]|[4, 'D6']|[##4]|[##3]}
<Call 0x220ce 0x21ec0> {[-2-]|[4, 'D6']|[##4]|[##3]}
<POP 220d0-220d2 StackAdj> Δ+12 {[-2-]}
<MI 220d2 TST.B (A7)+> Δ+2 {}
<MI 220d4 BNE 0x22142> {}
<POP 220d6-220e8 Naked> Σ0 ↓ →0x22142
<POP 220d6-220d8 StackAdj> Δ-2 {[-2-]}
<MI 220d8 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x220da 0x7.4> Δ-4 {[-2-]|[4, 'D6']|[##7]}
<Const 0x220de 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##7]|[##4]}
<Call 0x220e0 0x21ec0> {[-2-]|[4, 'D6']|[##7]|[##4]}
<POP 220e2-220e4 StackAdj> Δ+12 {[-2-]}
<MI 220e4 TST.B (A7)+> Δ+2 {}
<MI 220e6 BNE 0x22142> {}
<POP 220e8-220fa Naked> Σ0 ↓ →0x22142
<POP 220e8-220ea StackAdj> Δ-2 {[-2-]}
<MI 220ea MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x220ec 0xb.4> Δ-4 {[-2-]|[4, 'D6']|[##11]}
<Const 0x220f0 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##11]|[##4]}
<Call 0x220f2 0x21ec0> {[-2-]|[4, 'D6']|[##11]|[##4]}
<POP 220f4-220f6 StackAdj> Δ+12 {[-2-]}
<MI 220f6 TST.B (A7)+> Δ+2 {}
<MI 220f8 BNE 0x22142> {}
<POP 220fa-2210c Naked> Σ0 ↓ →0x22142
<POP 220fa-220fc StackAdj> Δ-2 {[-2-]}
<MI 220fc MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x220fe 0xf.4> Δ-4 {[-2-]|[4, 'D6']|[##15]}
<Const 0x22102 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##15]|[##4]}
<Call 0x22104 0x21ec0> {[-2-]|[4, 'D6']|[##15]|[##4]}
<POP 22106-22108 StackAdj> Δ+12 {[-2-]}
<MI 22108 TST.B (A7)+> Δ+2 {}
<MI 2210a BNE 0x22142> {}
<POP 2210c-2211e Naked> Σ0 ↓ →0x22142
<POP 2210c-2210e StackAdj> Δ-2 {[-2-]}
<MI 2210e MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x22110 0x13.4> Δ-4 {[-2-]|[4, 'D6']|[##19]}
<Const 0x22114 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##19]|[##4]}
<Call 0x22116 0x21ec0> {[-2-]|[4, 'D6']|[##19]|[##4]}
<POP 22118-2211a StackAdj> Δ+12 {[-2-]}
<MI 2211a TST.B (A7)+> Δ+2 {}
<MI 2211c BNE 0x22142> {}
<POP 2211e-22130 Naked> Σ0 ↓ →0x22142
<POP 2211e-22120 StackAdj> Δ-2 {[-2-]}
<MI 22120 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x22122 0x17.4> Δ-4 {[-2-]|[4, 'D6']|[##23]}
<Const 0x22126 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##23]|[##4]}
<Call 0x22128 0x21ec0> {[-2-]|[4, 'D6']|[##23]|[##4]}
<POP 2212a-2212c StackAdj> Δ+12 {[-2-]}
<MI 2212c TST.B (A7)+> Δ+2 {}
<MI 2212e BNE 0x22142> {}
<POP 22130-22142 Naked> Σ0 ↓ →0x22146
<POP 22130-22132 StackAdj> Δ-2 {[-2-]}
<MI 22132 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x22134 0x1b.4> Δ-4 {[-2-]|[4, 'D6']|[##27]}
<Const 0x22138 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##27]|[##4]}
<Call 0x2213a 0x21ec0> {[-2-]|[4, 'D6']|[##27]|[##4]}
<POP 2213c-2213e StackAdj> Δ+12 {[-2-]}
<MI 2213e TST.B (A7)+> Δ+2 {}
<MI 22140 BEQ 0x22146> {}
<POP 22142-22146 Naked> Σ0 →0x22182 ←0x220b0 ←0x220c4 ←0x220d6 ←0x220e8 ←0x220fa ←0x2210c ←0x2211e
<MI 22142 ADDQ.L #0x1,D7> {}
<MI 22144 BRA 0x22182> {}
<POP 22146-2214a Naked> Σ0 ↓ →0x22166 ←0x22130
<MI 22146 TST.L D7> {}
<MI 22148 BNE 0x22166> {}
<POP 2214a-2215e Naked> Σ0 ↓ →0x22166
<POP 2214a-2214c StackAdj> Δ-2 {[-2-]}
<MI 2214c MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x2214e 0x1f.4> Δ-4 {[-2-]|[4, 'D6']|[##31]}
<Const 0x22152 0x5.4> Δ-4 {[-2-]|[4, 'D6']|[##31]|[##5]}
<Call 0x22156 0x21ec0> {[-2-]|[4, 'D6']|[##31]|[##5]}
<POP 22158-2215a StackAdj> Δ+12 {[-2-]}
<MI 2215a TST.B (A7)+> Δ+2 {}
<MI 2215c BEQ 0x22166> {}
<POP 2215e-22162 Naked> Σ0 ↓
<MI 2215e MOVEA.L (A6+0xc),A0> {}
<POP 22162-22166 Naked> Σ0 →0x22182 ←0x2217c
<MI 22162 MOVE.L D6,(A0)> {}
<MI 22164 BRA 0x22182> {}
<POP 22166-22178 Naked> Σ0 ↓ →0x22182 ←0x22146 ←0x2214a
<POP 22166-22168 StackAdj> Δ-2 {[-2-]}
<MI 22168 MOVE.L D6,-(A7)> Δ-4 {[-2-]|[4, 'D6']}
<Const 0x2216a 0x24.4> Δ-4 {[-2-]|[4, 'D6']|[##36]}
<Const 0x2216e 0x4.4> Δ-4 {[-2-]|[4, 'D6']|[##36]|[##4]}
<Call 0x22170 0x21ec0> {[-2-]|[4, 'D6']|[##36]|[##4]}
<POP 22172-22174 StackAdj> Δ+12 {[-2-]}
<MI 22174 TST.B (A7)+> Δ+2 {}
<MI 22176 BEQ 0x22182> {}
<POP 22178-2217c Naked> Σ0 ↓ →0x22180
<MI 22178 TST.L D7> {}
<MI 2217a BNE 0x22180> {}
<POP 2217c-22180 Naked> Σ0 →0x22162
<MI 2217c MOVEA.L (A6+0x8),A0> {}
<MI 2217e BRA 0x22162> {}
<POP 22180-22182 Naked> Σ0 ↓ ←0x22178
<MI 22180 SUBQ.L #0x1,D7> {}
<POP 22182-2218c Naked> Σ0 ↓ →0x2219a ←0x22090 ←0x22142 ←0x22162 ←0x22166
<MI 22182 ADDQ.L #0x1,D6> {}
<MI 22184 CMP.L 0x2651c,D6> {}
<MI 2218a BGT 0x2219a> {}
<POP 2218c-22192 Naked> Σ0 ↓ →0x22090
<MI 2218c TST.L D7> {}
<MI 2218e BNE 0x22090> {}
<POP 22192-2219a Naked> Σ0 ↓ →0x22090
<MI 22192 MOVEA.L (A6+0x8),A0> {}
<MI 22194 TST.L (A0)> {}
<MI 22196 BEQ 0x22090> {}
<POP 2219a-221a2 Naked> Σ0 ↓ →0x221d2 ←0x22182
<MI 2219a CMP.L 0x2651c,D6> {}
<MI 221a0 BLE 0x221d2> {}
<POP 221a2-221d2 Naked> Σ0 ↓
<Blob 0x221a2 [28] @> Δ-28 {[«28""»]}
<POP 221b4-221b6 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x221b6 27> {[«28""»]|[$$Unbalanced [ELSE] or [END]!]}
<Call 0x221ca 0x219f2> {[«28""»]|[$$Unbalanced [ELSE] or [END]!]}
<POP 221ce-221d2 StackAdj> Δ+32 {}
<POP 221d2-221da Epilogue> Σ0 ←0x2219a
@ 221da
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 @ 4(rw)>
<POP 221da-22220 Body>
<POP 221da-221f0 Prologue> Σ0 ↓
<POP 221f0-221f8 RegCacheLoad> Σ0 ↓
<POP 221f8-22206 Naked> Σ0 ↓ →0x22208
<Pointer.fp 0x221f8 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Pointer.fp 0x221fa <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-8]|[@@-4]}
<Call 0x221fc 0x2205a> {[@@-8]|[@@-4]}
<POP 22200-22202 StackAdj> Δ+8 {}
<MI 22202 TST.L (A6-0x8)> {}
<MI 22204 BNE 0x22208> {}
<POP 22206-22208 Naked> Σ0 ↓
<MI 22206 MOVE.L (A6-0x4),(A6-0x8)> {}
<POP 22208-22218 Naked> Σ0 ↓ ←0x221f8
<MI 22208 MOVE.L (A6-0x4),D0> {}
<MI 2220a ADDQ.L #0x5,D0> {}
<MI 2220c MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 2220e SUB.L (A6-0x8),D0> {[4, 'D0']}
<MI 22210 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']|[4, 'D0']}
<Call 0x22212 0x21f46> {[4, 'D0']|[4, 'D0']}
<POP 22216-22218 StackAdj> Δ+8 {}
<POP 22218-22220 Epilogue> Σ0
@ 22220
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 @ 4(r)>
<POP 22220-2227c Body>
<POP 22220-22236 Prologue> Σ0 ↓
<POP 22236-2223e RegCacheLoad> Σ0 ↓
<POP 2223e-2224c Naked> Σ0 ↓ →0x22252
<Pointer.fp 0x2223e <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Pointer.fp 0x22240 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-8]|[@@-4]}
<Call 0x22242 0x2205a> {[@@-8]|[@@-4]}
<POP 22246-22248 StackAdj> Δ+8 {}
<MI 22248 TST.L (A6-0x8)> {}
<MI 2224a BNE 0x22252> {}
<POP 2224c-22252 Naked> Σ0 →0x22264
<MI 2224c MOVE.L (A6-0x4),D0> {}
<MI 2224e ADDQ.L #0x5,D0> {}
<MI 22250 BRA 0x22264> {}
<POP 22252-22264 Naked> Σ0 ↓ ←0x2223e
<MI 22252 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<MI 22254 ADDQ.L #0x5,(A7)> {[-4-]}
<Const 0x22256 0x5.4> Δ-4 {[-4-]|[##5]}
<Call 0x2225a 0x21f46> {[-4-]|[##5]}
<POP 2225e-22260 StackAdj> Δ+8 {}
<MI 22260 MOVE.L (A6-0x8),D0> {}
<MI 22262 ADDQ.L #0x6,D0> {}
<POP 22264-22274 Naked> Σ0 ↓ ←0x2224c
<MI 22264 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 22266 SUB.L 0x26518,D0> {[4, 'D0']}
<MI 2226c MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']|[4, 'D0']}
<Call 0x2226e 0x21f46> {[4, 'D0']|[4, 'D0']}
<POP 22272-22274 StackAdj> Δ+8 {}
<POP 22274-2227c Epilogue> Σ0
@ 2227c
<LVAR 0x008 4(r)>
<LVAR -0x004 @>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(rw)>
<LVAR -0x010 4(rw)>
<LVAR -0x014 4(rw)>
<POP 2227c-22390 Body>
<POP 2227c-22292 Prologue> Σ0 ↓
<POP 22292-222aa RegCacheLoad> Σ0 ↓
<POP 222aa-222ae Naked> Σ0 ↓ →0x222b8
<MI 222aa TST.B 0x2652a> {}
<MI 222ac BEQ 0x222b8> {}
<POP 222ae-222b2 Naked> Σ0 ↓ →0x222b8
<MI 222ae TST.L 0x26530> {}
<MI 222b0 BNE 0x222b8> {}
<POP 222b2-222b8 Naked> Σ0 ↓
<MI 222b2 MOVE.L (A6+0x8),0x26530> {}
<MI 222b6 SUBQ.L #0x1,0x26530> {}
<POP 222b8-222be Naked> Σ0 ↓ →0x22388 ←0x222aa ←0x222ae
<MI 222b8 TST.B 0x2652a> {}
<MI 222ba BNE 0x22388> {}
<POP 222be-222f2 Naked> Σ0 ↓ →0x2230c
<MI 222be MOVE.L (A6+0x8),0x26518> {}
<MI 222c2 ADDQ.L #0x6,0x26518> {}
<Pointer.fp 0x222c4 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Pointer.fp 0x222c6 <LVAR -0x004 @>> Δ-4 {[@@-8]|[@@-4]}
<Call 0x222ca 0x21d52> {[@@-8]|[@@-4]}
<POP 222ce-222d0 StackAdj> Δ+8 {}
<Blob 0x222d0 [10] @> Δ-10 {[«10""»]}
<MI 222dc MOVE.L (A6-0x8),-(A7)> Δ-4 {[«10""»]|[4, '(A6-0x8)']}
<Const 0x222de 0x0.4> Δ-4 {[«10""»]|[4, '(A6-0x8)']|[##0]}
<Call 0x222e2 0x21e34> {[«10""»]|[4, '(A6-0x8)']|[##0]}
<POP 222e6-222ea StackAdj> Δ+18 {}
<MI 222ea TST.B 0x26534> {}
<MI 222f0 BEQ 0x2230c> {}
<POP 222f2-2230c Naked> Σ0 →0x22320
<POP 222f2-222f4 StackAdj> Δ-8 {[-8-]}
<MI 222f4 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x8)']}
<Const 0x222f6 0x0.4> Δ-4 {[-8-]|[4, '(A6-0x8)']|[##0]}
<Call 0x222fa 0x2274c> {[-8-]|[4, '(A6-0x8)']|[##0]}
<POP 22300-22302 StackAdj> Δ+8 {[-8-]}
<MI 22302 MOVE.L (A7)+,(A6-0x14)> Δ+4 {[-4-]}
<MI 22306 MOVE.L (A7)+,(A6-0x10)> Δ+4 {}
<MI 2230a BRA 0x22320> {}
<POP 2230c-22320 Naked> Σ0 ↓ ←0x222be
<POP 2230c-2230e StackAdj> Δ-4 {[-4-]}
<MI 2230e MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x8)']}
<Const 0x22310 0x0.4> Δ-4 {[-4-]|[4, '(A6-0x8)']|[##0]}
<Call 0x22314 0x2271a> {[-4-]|[4, '(A6-0x8)']|[##0]}
<POP 2231a-2231c StackAdj> Δ+8 {[-4-]}
<MI 2231c MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<POP 22320-22336 Naked> Σ0 ↓ →0x22360 ←0x222f2
<MI 22320 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<Call 0x22322 0x219b0> {[4, '(A6-0x8)']}
<POP 22326-22328 StackAdj> Δ+4 {}
<MI 22328 MOVE.L 0x26518,0x2652c> {}
<MI 2232e TST.B 0x26534> {}
<MI 22334 BEQ 0x22360> {}
<POP 22336-22360 Naked> Σ0 →0x22388
<POP 22336-22338 StackAdj> Δ-2 {[-2-]}
<MI 22338 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x10)']}
<MI 2233c MOVE.L (A6-0x14),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<Blob 0x22340 [4] 0x2653e> Δ-4 {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[«4»]}
<Blob 0x22346 [4] 0x2653a> Δ-4 {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[«4»]|[«4»]}
<Call 0x2234c 0x1032c> {[-2-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']|[«4»]|[«4»]}
IsEqual(a, b : Quad) : Bool
<POP 22352-22356 StackAdj> Δ+16 {[-2-]}
<MI 22356 MOVE.B (A7)+,D0> Δ+2 {}
<MI 22358 EXTB.W D0> {}
<POP 0x2235a LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 2235c MOVE.B D0,0x2652a> {}
<MI 2235e BRA 0x22388> {}
<POP 22360-22388 Naked> Σ0 ↓ ←0x22320
<POP 22360-22362 StackAdj> Δ-2 {[-2-]}
<MI 22362 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-2-]|[4, '(A6-0xc)']}
<Blob 0x22366 [4] 0x26536> Δ-4 {[-2-]|[4, '(A6-0xc)']|[«4»]}
<Call 0x2236c 0x102c8> {[-2-]|[4, '(A6-0xc)']|[«4»]}
StringEqual(a, b : String) : Byte
<POP 22372-22374 StackAdj> Δ+8 {[-2-]}
<MI 22374 MOVE.B (A7)+,D0> Δ+2 {}
<MI 22376 EXTB.W D0> {}
<POP 0x22378 LimitCheck 0x0 ≤ D0 ≤ 0x1> {}
<MI 2237a MOVE.B D0,0x2652a> {}
<Pointer.fp 0x2237c <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x22380 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<POP 22386-22388 StackAdj> Δ+4 {}
<POP 22388-22390 Epilogue> Σ0 ←0x222b8 ←0x22336
@ 22390
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22390-22512 Body>
<POP 22390-223a6 Prologue> Σ0 ↓
<POP 223a6-223ba RegCacheLoad> Σ0 ↓
<POP 223ba-223ce Naked> Σ0 ↓
<MI 223ba CLR.B 0x2652a> {}
<MI 223bc CLR.L 0x2652c> {}
<MI 223c2 CLR.L 0x26530> {}
<MI 223c4 MOVEQ.L #0x00,D7> {}
<MI 223c6 MOVEQ.L #0x00,D6> {}
<MI 223c8 MOVE.L 0x26518,D5> {}
<POP 223ce-223d4 Naked> Σ0 ↓ →0x22472 ←0x2246e
<MI 223ce TST.L D6> {}
<MI 223d0 BNE 0x22472> {}
<POP 223d4-223de Naked> Σ0 ↓ →0x22472
<MI 223d4 CMP.L 0x2651c,D5> {}
<MI 223da BGT 0x22472> {}
<POP 223de-223fc Naked> Σ0 ↓ →0x22468
<MI 223de MOVE.L D5,D0> {}
<MI 223e0 SUBQ.L #0x1,D0> {}
<POP 0x223e2 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {}
<MI 223ec LEA.L 0x25510,A0> {}
<MI 223f2 MOVE.B (A0+D0.L+#0x8),D0> {}
<MI 223f6 CMPI.B #0x5b,D0> {}
<MI 223fa BNE 0x22468> {}
<POP 223fc-22410 Naked> Σ0 ↓ →0x22424
<POP 223fc-223fe StackAdj> Δ-2 {[-2-]}
<MI 223fe MOVE.L D5,-(A7)> Δ-4 {[-2-]|[4, 'D5']}
<Const 0x22400 0x28.4> Δ-4 {[-2-]|[4, 'D5']|[##40]}
<Const 0x22404 0x5.4> Δ-4 {[-2-]|[4, 'D5']|[##40]|[##5]}
<Call 0x22408 0x21ec0> {[-2-]|[4, 'D5']|[##40]|[##5]}
<POP 2240a-2240c StackAdj> Δ+12 {[-2-]}
<MI 2240c TST.B (A7)+> Δ+2 {}
<MI 2240e BNE 0x22424> {}
<POP 22410-22424 Naked> Σ0 ↓ →0x22428
<POP 22410-22412 StackAdj> Δ-2 {[-2-]}
<MI 22412 MOVE.L D5,-(A7)> Δ-4 {[-2-]|[4, 'D5']}
<Const 0x22414 0x2d.4> Δ-4 {[-2-]|[4, 'D5']|[##45]}
<Const 0x22418 0x6.4> Δ-4 {[-2-]|[4, 'D5']|[##45]|[##6]}
<Call 0x2241c 0x21ec0> {[-2-]|[4, 'D5']|[##45]|[##6]}
<POP 2241e-22420 StackAdj> Δ+12 {[-2-]}
<MI 22420 TST.B (A7)+> Δ+2 {}
<MI 22422 BEQ 0x22428> {}
<POP 22424-22428 Naked> Σ0 →0x22468 ←0x223fc
<MI 22424 ADDQ.L #0x1,D7> {}
<MI 22426 BRA 0x22468> {}
<POP 22428-2242c Naked> Σ0 ↓ →0x2244a ←0x22410
<MI 22428 TST.L D7> {}
<MI 2242a BNE 0x2244a> {}
<POP 2242c-22440 Naked> Σ0 ↓ →0x2244a
<POP 2242c-2242e StackAdj> Δ-2 {[-2-]}
<MI 2242e MOVE.L D5,-(A7)> Δ-4 {[-2-]|[4, 'D5']}
<Const 0x22430 0x33.4> Δ-4 {[-2-]|[4, 'D5']|[##51]}
<Const 0x22434 0x5.4> Δ-4 {[-2-]|[4, 'D5']|[##51]|[##5]}
<Call 0x22438 0x21ec0> {[-2-]|[4, 'D5']|[##51]|[##5]}
<POP 2243a-2243c StackAdj> Δ+12 {[-2-]}
<MI 2243c TST.B (A7)+> Δ+2 {}
<MI 2243e BEQ 0x2244a> {}
<POP 22440-2244a Naked> Σ0 →0x22468
<MI 22440 MOVE.L D5,-(A7)> Δ-4 {[4, 'D5']}
<Call 0x22442 0x2227c> {[4, 'D5']}
<POP 22446-22448 StackAdj> Δ+4 {}
<MI 22448 BRA 0x22468> {}
<POP 2244a-2245e Naked> Σ0 ↓ →0x22468 ←0x22428 ←0x2242c
<POP 2244a-2244c StackAdj> Δ-2 {[-2-]}
<MI 2244c MOVE.L D5,-(A7)> Δ-4 {[-2-]|[4, 'D5']}
<Const 0x2244e 0x38.4> Δ-4 {[-2-]|[4, 'D5']|[##56]}
<Const 0x22452 0x8.4> Δ-4 {[-2-]|[4, 'D5']|[##56]|[##8]}
<Call 0x22456 0x21ec0> {[-2-]|[4, 'D5']|[##56]|[##8]}
<POP 22458-2245a StackAdj> Δ+12 {[-2-]}
<MI 2245a TST.B (A7)+> Δ+2 {}
<MI 2245c BEQ 0x22468> {}
<POP 2245e-22462 Naked> Σ0 ↓ →0x22466
<MI 2245e TST.L D7> {}
<MI 22460 BNE 0x22466> {}
<POP 22462-22466 Naked> Σ0 →0x22468
<MI 22462 MOVE.L D5,D6> {}
<MI 22464 BRA 0x22468> {}
<POP 22466-22468 Naked> Σ0 ↓ ←0x2245e
<MI 22466 SUBQ.L #0x1,D7> {}
<POP 22468-2246c Naked> Σ0 ↓ →0x2246e ←0x223de ←0x22424 ←0x22440 ←0x2244a ←0x22462
<MI 22468 TST.L D6> {}
<MI 2246a BNE 0x2246e> {}
<POP 2246c-2246e Naked> Σ0 ↓
<MI 2246c ADDQ.L #0x1,D5> {}
<POP 2246e-22472 Naked> Σ0 →0x223ce ←0x22468
<MI 2246e BRA 0x223ce> {}
<POP 22472-2247a Naked> Σ0 ↓ →0x22488 ←0x223ce ←0x223d4
<MI 22472 TST.B 0x26534> {}
<MI 22478 BNE 0x22488> {}
<POP 2247a-22488 Naked> Σ0 ↓
<Const 0x2247a 0x26536.4> Δ-4 {[##156982]}
<Call 0x22480 0x102bc> {[##156982]}
FreeString(VAR a : String)
<POP 22486-22488 StackAdj> Δ+4 {}
<POP 22488-2248c Naked> Σ0 ↓ →0x224b4 ←0x22472
<MI 22488 TST.B 0x2652a> {}
<MI 2248a BNE 0x224b4> {}
<POP 2248c-224b4 Naked> Σ0 ↓
<Blob 0x2248c [26] @> Δ-26 {[«26""»]}
<POP 22498-2249a StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x2249a 26> {[«26""»]|[$$No case alternative found!]}
<Call 0x224ac 0x219f2> {[«26""»]|[$$No case alternative found!]}
<POP 224b0-224b4 StackAdj> Δ+30 {}
<POP 224b4-224b8 Naked> Σ0 ↓ →0x224e6 ←0x22488
<MI 224b4 TST.L D6> {}
<MI 224b6 BNE 0x224e6> {}
<POP 224b8-224e6 Naked> Σ0 ↓
<Blob 0x224b8 [20] @> Δ-20 {[«20""»]}
<POP 224ca-224cc StackAdj> Δ-4 {[«20""»]|[-4-]}
<Lit 0x224cc 19> {[«20""»]|[$$No [ENDCASE] found!]}
<Call 0x224de 0x219f2> {[«20""»]|[$$No [ENDCASE] found!]}
<POP 224e2-224e6 StackAdj> Δ+24 {}
<POP 224e6-224fa Naked> Σ0 ↓ →0x22504 ←0x224b4
<MI 224e6 MOVEA.L (A6+0x8),A0> {}
<MI 224ea MOVE.L D6,(A0)> {}
<MI 224ec MOVEA.L (A6+0x10),A0> {}
<MI 224f0 MOVE.L 0x2652c,(A0)> {}
<MI 224f6 TST.L 0x26530> {}
<MI 224f8 BNE 0x22504> {}
<POP 224fa-22504 Naked> Σ0 →0x2250a
<MI 224fa MOVEA.L (A6+0xc),A0> {}
<MI 224fe MOVE.L D6,(A0)> {}
<MI 22500 SUBQ.L #0x1,(A0)> {}
<MI 22502 BRA 0x2250a> {}
<POP 22504-2250a Naked> Σ0 ↓ ←0x224e6
<MI 22504 MOVEA.L (A6+0xc),A0> {}
<MI 22508 MOVE.L 0x26530,(A0)> {}
<POP 2250a-22512 Epilogue> Σ0 ←0x224fa
@ 22512
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x010 @ 4(r)>
<POP 22512-22586 Body>
<POP 22512-22528 Prologue> Σ0 ↓
<POP 22528-22532 RegCacheLoad> Σ0 ↓
<POP 22532-2257e Naked> Σ0 ↓
<MI 22532 MOVE.L 0x26518,D6> {}
<MI 22534 CLR.B 0x26534> {}
<MI 2253a MOVE.L (A6+0x8),0x26536> {}
<MI 22542 MOVE.L 0x26518,D7> {}
<Pointer.fp 0x22544 <LVAR -0x010 @ 4(r)>> Δ-4 {[@@-16]}
<Pointer.fp 0x22546 <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-16]|[@@-12]}
<Pointer.fp 0x2254a <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-16]|[@@-12]|[@@-8]}
<Call 0x2254e 0x22390> {[@@-16]|[@@-12]|[@@-8]}
<POP 22552-22556 StackAdj> Δ+12 {}
<MI 22556 MOVE.L D6,0x26518> {}
<MI 22558 MOVE.L (A6-0x8),D0> {}
<MI 2255c ADDI.L #0x00000009,D0> {}
<MI 22562 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 22564 SUB.L (A6-0xc),D0> {[4, 'D0']}
<MI 22568 SUBQ.L #0x1,D0> {[4, 'D0']}
<MI 2256a MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']|[4, 'D0']}
<Call 0x2256c 0x21f46> {[4, 'D0']|[4, 'D0']}
<POP 22570-22572 StackAdj> Δ+4 {[4, 'D0']}
<MI 22572 MOVE.L (A6-0x10),(A7)> {[4, '(A6-0x10)']}
<MI 22574 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']|[4, '(A6-0x10)']}
<MI 22576 SUB.L D7,(A7)> {[4, '(A6-0x10)']|[-4-]}
<Call 0x22578 0x21f46> {[4, '(A6-0x10)']|[-4-]}
<POP 2257c-2257e StackAdj> Δ+8 {}
<POP 2257e-22586 Epilogue> Σ0
@ 22586
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x010 @ 4(r)>
<POP 22586-22604 Body>
<POP 22586-2259c Prologue> Σ0 ↓
<POP 2259c-225a6 RegCacheLoad> Σ0 ↓
<POP 225a6-225fc Naked> Σ0 ↓
<MI 225a6 MOVE.L 0x26518,D6> {}
<MI 225a8 MOVE.B #0x01,0x26534> {}
<MI 225b0 MOVE.L (A6+0x8),0x2653a> {}
<MI 225b8 MOVE.L (A6+0xc),0x2653e> {}
<MI 225c0 MOVE.L 0x26518,D7> {}
<Pointer.fp 0x225c2 <LVAR -0x010 @ 4(r)>> Δ-4 {[@@-16]}
<Pointer.fp 0x225c4 <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-16]|[@@-12]}
<Pointer.fp 0x225c8 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-16]|[@@-12]|[@@-8]}
<Call 0x225cc 0x22390> {[@@-16]|[@@-12]|[@@-8]}
<POP 225d0-225d4 StackAdj> Δ+12 {}
<MI 225d4 MOVE.L D6,0x26518> {}
<MI 225d6 MOVE.L (A6-0x8),D0> {}
<MI 225da ADDI.L #0x00000009,D0> {}
<MI 225e0 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 225e2 SUB.L (A6-0xc),D0> {[4, 'D0']}
<MI 225e6 SUBQ.L #0x1,D0> {[4, 'D0']}
<MI 225e8 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']|[4, 'D0']}
<Call 0x225ea 0x21f46> {[4, 'D0']|[4, 'D0']}
<POP 225ee-225f0 StackAdj> Δ+4 {[4, 'D0']}
<MI 225f0 MOVE.L (A6-0x10),(A7)> {[4, '(A6-0x10)']}
<MI 225f2 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']|[4, '(A6-0x10)']}
<MI 225f4 SUB.L D7,(A7)> {[4, '(A6-0x10)']|[-4-]}
<Call 0x225f6 0x21f46> {[4, '(A6-0x10)']|[-4-]}
<POP 225fa-225fc StackAdj> Δ+8 {}
<POP 225fc-22604 Epilogue> Σ0
@ 22604
<LVAR 0x010 4(rw)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22604-2263c Body>
<POP 22604-2261a Prologue> Σ0 ↓
<POP 2261a-22620 Naked> Σ0 ↓ →0x22626
<MI 2261a TST.L (A6+0x8)> {}
<MI 2261e BNE 0x22626> {}
<POP 22620-22626 Naked> Σ0 →0x22634
<MI 22620 CLR.L (A6+0x10)> {}
<MI 22624 BRA 0x22634> {}
<POP 22626-22634 Naked> Σ0 ↓ ←0x2261a
<MI 22626 MOVE.L (A6+0xc),D0> {}
<MI 2262a SUB.L (A6+0x8),D0> {}
<MI 2262e ADDQ.L #0x1,D0> {}
<MI 22630 MOVE.L D0,(A6+0x10)> {}
<POP 22634-2263c Epilogue> Σ0 ←0x22620
@ 2263c
<LVAR 0x014 4(w)>
<LVAR 0x010 @ 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2263c-2269e Body> Δ-4
<POP 2263c-22652 Prologue> Σ0 ↓
<POP 22652-22668 Naked> Σ0 Δ-4 ↓
<MI 22652 MOVEA.L (A6+0xc),A4> {}
<MI 22656 MOVE.L 0x2190a,(A6+0x10)> {}
<MI 2265c MOVE.L 0x2190e,(A6+0x14)> {}
<MI 22662 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 22666 MOVEQ.L #0x00,D7> {[4, '(A6+0x8)']}
<POP 22668-2266c Naked> Σ-4 ↓ →0x22694 ←0x22690
<MI 22668 CMP.L (A7),D7> {[-4-]}
<MI 2266a BGT 0x22694> {[-4-]}
<POP 2266c-22672 Naked> Σ-4 ↓ →0x22676
<MI 2266c CMPA.W #0x1,A4> {[-4-]}
<MI 22670 BNE 0x22676> {[-4-]}
<POP 22672-22676 Naked> Σ-4 Δ+4 →0x22696
<POP 22672-22674 StackAdj> Δ+4 {}
<MI 22674 BRA 0x22696> {}
<POP 22676-2267c Naked> Σ-4 ↓ →0x2268c ←0x2266c
<MI 22676 CMP.L (A6+0x8),D7> {[-4-]}
<MI 2267a BNE 0x2268c> {[-4-]}
<POP 2267c-2268c Naked> Σ-4 →0x22690
<MI 2267c LEA.L (A6+0x10),A0> {[-4-]}
<MI 22680 MOVEA.L A4,A1> {[-4-]}
<BlockMove 8,A1,A0> {[-4-]}
<MI 2268a BRA 0x22690> {[-4-]}
<POP 2268c-22690 Naked> Σ-4 ↓ ←0x22676
<MI 2268c MOVEA.L (A4+0x8),A4> {[-4-]}
<POP 22690-22694 Naked> Σ-4 ↓ →0x22668 ←0x2267c
<MI 22690 ADDQ.L #0x1,D7> {[-4-]}
<MI 22692 BVC 0x22668> {[-4-]}
<POP 22694-22696 Naked> Σ-4 Δ+4 ↓ ←0x22668
<POP 22694-22696 StackAdj> Δ+4 {}
<POP 22696-2269e Epilogue> Σ0 ←0x22672
@ 2269e
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 4(r)>
<POP 2269e-2271a Body> Δ-4
<POP 2269e-226b4 Prologue> Σ0 ↓
<POP 226b4-226b8 RegCacheLoad> Σ0 ↓
<POP 226b8-226d0 Naked> Σ0 Δ-4 ↓
<Pointer.fp 0x226b8 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Call 0x226ba 0x102b8> {[@@-8]}
NewString(VAR a : String)
<MI 226c0 MOVE.L (A6+0xc),-(A7)> Δ-4 {[@@-8]|[4, '(A6+0xc)']}
<MI 226c4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[@@-8]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x226c8 0x22604> {[@@-8]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 226cc-226ce StackAdj> Δ+8 {[@@-8]}
<MI 226ce MOVEQ.L #0x01,D7> {[@@-8]}
<POP 226d0-226d4 Naked> Σ-4 ↓ →0x2270c ←0x226fc
<MI 226d0 CMP.L (A7),D7> {[-4-]}
<MI 226d2 BGT 0x2270c> {[-4-]}
<POP 226d4-226f8 Naked> Σ-4 ↓ →0x226fc
<MI 226d4 MOVE.L D7,D0> {[-4-]}
<MI 226d6 ADD.L (A6+0x8),D0> {[-4-]}
<MI 226da SUBQ.L #0x1,D0> {[-4-]}
<MI 226dc SUBQ.L #0x1,D0> {[-4-]}
<POP 0x226de LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-4-]}
<MI 226e8 LEA.L 0x25510,A0> {[-4-]}
<MI 226ee MOVE.B (A0+D0.L+#0x8),D6> {[-4-]}
<MI 226f2 CMPI.B #0x2f,D6> {[-4-]}
<MI 226f6 BNE 0x226fc> {[-4-]}
<POP 226f8-226fc Naked> Σ-4 Δ+4 →0x2270e
<POP 226f8-226fa StackAdj> Δ+4 {}
<MI 226fa BRA 0x2270e> {}
<POP 226fc-2270c Naked> Σ-4 ↓ →0x226d0 ←0x226d4
<MI 226fc MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x8)']}
<MI 226fe MOVE.B D6,-(A7)> Δ-2 {[-4-]|[4, '(A6-0x8)']|[2, 'D6']}
<Call 0x22700 0x102c0> {[-4-]|[4, '(A6-0x8)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 22706-22708 StackAdj> Δ+6 {[-4-]}
<MI 22708 ADDQ.L #0x1,D7> {[-4-]}
<MI 2270a BVC 0x226d0> {[-4-]}
<POP 2270c-2270e Naked> Σ-4 Δ+4 ↓ ←0x226d0
<POP 2270c-2270e StackAdj> Δ+4 {}
<POP 2270e-22712 Naked> Σ0 ↓ ←0x226f8
<MI 2270e MOVE.L (A6-0x8),(A6+0x10)> {}
<POP 22712-2271a Epilogue> Σ0
@ 2271a
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2271a-2274c Body>
<POP 2271a-2272c Prologue> Σ0 ↓
<POP 2272c-22748 Naked> Σ0 ↓
<POP 2272c-22730 StackAdj> Δ-12 {[-12-]}
<MI 22730 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']}
<MI 22734 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x22738 0x2263c> {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 2273c-2273e StackAdj> Δ+8 {[-12-]}
<Call 0x2273e 0x2269e> {[-12-]}
<POP 22742-22744 StackAdj> Δ+8 {[-4-]}
<MI 22744 MOVE.L (A7)+,(A6+0x10)> Δ+4 {}
<POP 22748-2274c Epilogue> Σ0
@ 2274c
<LVAR 0x014 4(w)>
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2274c-22788 Body>
<POP 2274c-2275e Prologue> Σ0 ↓
<POP 2275e-22784 Naked> Σ0 ↓
<POP 2275e-22762 StackAdj> Δ-12 {[-12-]}
<MI 22762 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']}
<MI 22766 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x2276a 0x2271a> {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 2276e-22770 StackAdj> Δ+8 {[-12-]}
<Const 0x22770 0x10.4> Δ-4 {[-12-]|[##16]}
<Call 0x22774 0x10360> {[-12-]|[##16]}
?StringToInt64()
<POP 2277a-2277c StackAdj> Δ+8 {[-8-]}
<MI 2277c MOVE.L (A7)+,(A6+0x10)> Δ+4 {[-4-]}
<MI 22780 MOVE.L (A7)+,(A6+0x14)> Δ+4 {}
<POP 22784-22788 Epilogue> Σ0
@ 22788
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22788-227bc Body>
<POP 22788-2279a Prologue> Σ0 ↓
<POP 2279a-227b8 Naked> Σ0 ↓
<POP 2279a-2279e StackAdj> Δ-12 {[-12-]}
<MI 2279e MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']}
<MI 227a2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x227a6 0x2274c> {[-12-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 227aa-227ac StackAdj> Δ+8 {[-12-]}
<Call 0x227ac 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 227b2-227b4 StackAdj> Δ+8 {[-4-]}
<MI 227b4 MOVE.L (A7)+,(A6+0x10)> Δ+4 {}
<POP 227b8-227bc Epilogue> Σ0
@ 227bc
<LVAR 0x008 @ 4(r)>
<POP 227bc-22844 Body>
<POP 227bc-227d2 Prologue> Σ0 ↓
<POP 227d2-227d8 RegCacheLoad> Σ0 ↓
<POP 227d8-227f6 Naked> Σ0 Δ-8 ↓
<MI 227d8 MOVEA.L (A6+0x8),A0> {}
<MI 227dc MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Blob 0x227de [4] 0x26518> Δ-4 {[4, 'A0']|[«4»]}
<MI 227e0 MOVE.W (A0),D0> {[4, 'A0']|[«4»]}
<MI 227e2 EXTW.L D0> {[4, 'A0']|[«4»]}
<MI 227e4 NEG.L D0> {[4, 'A0']|[«4»]}
<MI 227e6 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[«4»]|[4, 'D0']}
<Call 0x227e8 0x21f46> {[4, 'A0']|[«4»]|[4, 'D0']}
<POP 227ec-227ee StackAdj> Δ+8 {[4, 'A0']}
<MI 227ee MOVE.W (A0),D0> {[4, 'A0']}
<MI 227f0 EXTW.L D0> {[4, 'A0']}
<MI 227f2 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<MI 227f4 MOVEQ.L #0x01,D7> {[4, 'A0']|[4, 'D0']}
<POP 227f6-227fa Naked> Σ-8 ↓ →0x2282e ←0x227fa
<MI 227f6 CMP.L (A7),D7> {[-8-]}
<MI 227f8 BGT 0x2282e> {[-8-]}
<POP 227fa-2282e Naked> Σ-8 ↓ →0x227f6
<MI 227fa MOVE.L D7,D0> {[-8-]}
<MI 227fc ADD.L 0x26518,D0> {[-8-]}
<MI 227fe SUBQ.L #0x1,D0> {[-8-]}
<MI 22800 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x22802 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-8-]}
<MI 2280c LEA.L 0x25510,A0> {[-8-]}
<MI 22812 MOVE.L D7,D1> {[-8-]}
<MI 22814 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x22816 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 22820 MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 22824 MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8)> {[-8-]}
<MI 2282a ADDQ.L #0x1,D7> {[-8-]}
<MI 2282c BVC 0x227f6> {[-8-]}
<POP 2282e-2283c Naked> Σ-8 Δ+8 ↓ ←0x227f6
<POP 2282e-22830 StackAdj> Δ+8 {}
<Pointer.fp 0x22830 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x22834 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 2283a-2283c StackAdj> Δ+4 {}
<POP 2283c-22844 Epilogue> Σ0
@ 22844
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 22844-22878 Body>
<POP 22844-22856 Prologue> Σ0 ↓
<POP 22856-22874 Naked> Σ0 ↓
<POP 22856-22858 StackAdj> Δ-4 {[-4-]}
<MI 22858 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 2285c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Const 0x22860 0x10.4> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[##16]}
<Call 0x22864 0x1035c> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[##16]}
Quad2String(a : Quad; radix : Long ) : String
<POP 2286a-2286e StackAdj> Δ+12 {[-4-]}
<Call 0x2286e 0x227bc> {[-4-]}
<POP 22872-22874 StackAdj> Δ+4 {}
<POP 22874-22878 Epilogue> Σ0
@ 22878
<LVAR 0x008 4(r)>
<POP 22878-228a2 Body>
<POP 22878-2288a Prologue> Σ0 ↓
<POP 2288a-2289e Naked> Σ0 ↓
<POP 2288a-2288c StackAdj> Δ-4 {[-4-]}
<MI 2288c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x22890 0x102e4> {[-4-]|[4, '(A6+0x8)']}
Long2String(a : Long) : String
<POP 22896-22898 StackAdj> Δ+4 {[-4-]}
<Call 0x22898 0x227bc> {[-4-]}
<POP 2289c-2289e StackAdj> Δ+4 {}
<POP 2289e-228a2 Epilogue> Σ0
@ 228a2
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(r)>
<LVAR -0x008 4(rw)>
<POP 228a2-22972 Body>
<POP 228a2-228b8 Prologue> Σ0 ↓
<POP 228b8-228c0 RegCacheLoad> Σ0 ↓
<POP 228c0-228d2 Naked> Σ0 ↓
<MI 228c0 MOVEA.L (A6+0x8),A0> {}
<MI 228c4 MOVE.L (A0+0x8),(A6-0x8)> {}
<Pointer.fp 0x228c8 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x228ca 0x102b8> {[@@-4]}
NewString(VAR a : String)
<POP 228d0-228d2 StackAdj> Δ+4 {}
<POP 228d2-228dc Naked> Σ0 ↓ →0x22960 ←0x22948
<MI 228d2 MOVEA.L (A6-0x8),A0> {}
<MI 228d4 CMPA.W #0x1,A0> {}
<MI 228d8 BEQ 0x22960> {}
<POP 228dc-228e0 Naked> Σ0 ↓ →0x22948
<MI 228dc TST.L (A0)> {}
<MI 228de BEQ 0x22948> {}
<POP 228e0-228ea Naked> Σ0 Δ-4 ↓ →0x228fe
<MI 228e0 MOVE.L (A0+0x4),-(A7)> Δ-4 {[4, '(A0+0x4)']}
<MI 228e4 MOVE.L (A0),D7> {[4, '(A0+0x4)']}
<MI 228e6 CMP.L (A7),D7> {[4, '(A0+0x4)']}
<MI 228e8 BGT 0x228fe> {[4, '(A0+0x4)']}
<POP 228ea-228fe Naked> Σ-4 ↓
<MI 228ea MOVE.L (A7),D0> {[-4-]}
<POP 0x228ec LimitCheck -0x7fffffff ≤ D7> {[-4-]}
<MI 228ec CMPI.L #0x80000001,D7>
<MI 228f2 BLT 0x228fc>
<POP 0x228f4 LimitCheck D0 ≤ 0x7fffffff> {[-4-]}
<MI 228f4 CMPI.L #0x7fffffff,D0>
<MI 228fa BLE 0x228fe>
<MI 228fc TRAP #15>
<POP 228fe-22902 Naked> Σ-4 ↓ →0x22946 ←0x228e0 ←0x22942
<MI 228fe CMP.L (A7),D7> {[-4-]}
<MI 22900 BGT 0x22946> {[-4-]}
<POP 22902-2292e Naked> Σ-4 ↓ →0x22942
<MI 22902 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']}
<MI 22904 MOVE.L D7,D0> {[-4-]|[4, '(A6-0x4)']}
<MI 22906 SUBQ.L #0x1,D0> {[-4-]|[4, '(A6-0x4)']}
<POP 0x22908 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-4-]|[4, '(A6-0x4)']}
<MI 22912 LEA.L 0x25510,A0> {[-4-]|[4, '(A6-0x4)']}
<MI 22918 MOVE.B (A0+D0.L+#0x8),-(A7)> Δ-2 {[-4-]|[4, '(A6-0x4)']|[2, '(A0+D0.L+#0x8)']}
<Call 0x2291c 0x102c0> {[-4-]|[4, '(A6-0x4)']|[2, '(A0+D0.L+#0x8)']}
AppendChar(MOD b : String; a : char)
<POP 22922-22924 StackAdj> Δ+6 {[-4-]}
<MI 22924 MOVEA.L (A6-0x4),A0> {[-4-]}
<MI 22926 MOVE.W (A0),D0> {[-4-]}
<MI 22928 CMPI.W #0x007a,D0> {[-4-]}
<MI 2292c BLT 0x22942> {[-4-]}
<POP 2292e-22942 Naked> Σ-4 ↓
<MI 2292e MOVE.L (A6-0x4),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']}
<Call 0x22930 0x103d8> {[-4-]|[4, '(A6-0x4)']}
WriteConsoleString(str : String)
<POP 22936-22938 StackAdj> Δ+4 {[-4-]}
<Pointer.fp 0x22938 <LVAR -0x004 @ 4(r)>> Δ-4 {[-4-]|[@@-4]}
<Call 0x2293a 0x102b8> {[-4-]|[@@-4]}
NewString(VAR a : String)
<POP 22940-22942 StackAdj> Δ+4 {[-4-]}
<POP 22942-22946 Naked> Σ-4 ↓ →0x228fe ←0x22902
<MI 22942 ADDQ.L #0x1,D7> {[-4-]}
<MI 22944 BVC 0x228fe> {[-4-]}
<POP 22946-22948 Naked> Σ-4 Δ+4 ↓ ←0x228fe
<POP 22946-22948 StackAdj> Δ+4 {}
<POP 22948-22960 Naked> Σ0 →0x228d2 ←0x228dc
<MI 22948 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<Const 0x2294a 0x20.2> Δ-2 {[4, '(A6-0x4)']|[#32]}
<Call 0x2294e 0x102c0> {[4, '(A6-0x4)']|[#32]}
AppendChar(MOD b : String; a : char)
<POP 22954-22956 StackAdj> Δ+6 {}
<MI 22956 MOVEA.L (A6-0x8),A0> {}
<MI 22958 MOVE.L (A0+0x8),(A6-0x8)> {}
<MI 2295c BRA 0x228d2> {}
<POP 22960-2296a Naked> Σ0 ↓ ←0x228d2
<MI 22960 MOVE.L (A6-0x4),-(A7)> Δ-4 {[4, '(A6-0x4)']}
<Call 0x22962 0x103e0> {[4, '(A6-0x4)']}
WriteConsoleStringCrLf(str : String)
<POP 22968-2296a StackAdj> Δ+4 {}
<POP 2296a-22972 Epilogue> Σ0
@ 22972
<LVAR 0x008 @ 4(r)>
<LVAR -0x003 @ 1(r)>
<LVAR -0x004 @ 1(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(rw)>
<POP 22972-22a7c Body>
<POP 22972-22988 Prologue> Σ0 ↓
<POP 22988-2299a RegCacheLoad> Σ0 ↓
<POP 2299a-229e0 Naked> Σ0 ↓ →0x22a16
<Blob 0x2299a [4] @> Δ-4 {[«4""»]}
<POP 2299e-229a0 StackAdj> Δ-8 {[«4""»]|[-8-]}
<MI 229a0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[«4""»]|[-8-]|[4, '(A6+0x8)']}
<Call 0x229a2 0x102cc> {[«4""»]|[-8-]|[4, '(A6+0x8)']}
StringDup(a : String) : String
<Lit 0x229a8 4> {[«4""»]|[-8-]|[$$.HLP]}
<Call 0x229ba 0x102d0> {[«4""»]|[-8-]|[$$.HLP]}
StringCat2(a, b : String) : String
<POP 229c0-229c2 StackAdj> Δ+8 {[«4""»]|[-4-]}
<MI 229c2 MOVE.L (A7)+,(A6-0xc)> Δ+4 {[«4""»]}
<MI 229c4 MOVE.L (A6-0xc),(A7)> {[4, '(A6-0xc)']}
<MI 229c6 CLR.B -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]}
<MI 229c8 CLR.B -(A7)> Δ-2 {[4, '(A6-0xc)']|[#0]|[#0]}
<Const 0x229ca 0x0.4> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[##0]}
<Pointer.fp 0x229ce <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[##0]|[@@-4]}
<Pointer.fp 0x229d0 <LVAR -0x008 @ 4(r)>> Δ-4 {[4, '(A6-0xc)']|[#0]|[#0]|[##0]|[@@-4]|[@@-8]}
<Call 0x229d2 0x10380> {[4, '(A6-0xc)']|[#0]|[#0]|[##0]|[@@-4]|[@@-8]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 229d8-229dc StackAdj> Δ+20 {}
<MI 229dc TST.B (A6-0x4)> {}
<MI 229de BEQ 0x22a16> {}
<POP 229e0-22a16 Naked> Σ0 →0x22a6a
<Blob 0x229e0 [22] @> Δ-22 {[«22""»]}
<POP 229ec-229ee StackAdj> Δ-8 {[«22""»]|[-8-]}
<Lit 0x229ee 22> {[«22""»]|[-4-]|[$$No help available for_]}
<POP 229fe-22a00 StackAdj> Δ-4 {[«22""»]|[-4-]|[$$No help available for_]|[-4-]}
<MI 22a00 MOVE.L (A6+0x8),(A7)> {[«22""»]|[-4-]|[$$No help available for_]|[4, '(A6+0x8)']}
<Call 0x22a02 0x102d0> {[«22""»]|[-4-]|[$$No help available for_]|[4, '(A6+0x8)']}
StringCat2(a, b : String) : String
<POP 22a08-22a0a StackAdj> Δ+8 {[«22""»]|[-4-]}
<Call 0x22a0a 0x103e0> {[«22""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22a10-22a14 StackAdj> Δ+26 {}
<MI 22a14 BRA 0x22a6a> {}
<POP 22a16-22a2e Naked> Σ0 ↓ →0x22a42 ←0x2299a ←0x22a42
<MI 22a16 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<Pointer.fp 0x22a18 <LVAR 0x008 @ 4(r)>> Δ-4 {[4, '(A6-0x8)']|[@@8]}
<Pointer.fp 0x22a1a <LVAR -0x003 @ 1(r)>> Δ-4 {[4, '(A6-0x8)']|[@@8]|[@@-3]}
<Call 0x22a1e 0x1043c> {[4, '(A6-0x8)']|[@@8]|[@@-3]}
FileReadLine(file : File; VAR a : String; VAR b : Byte)
<POP 22a24-22a28 StackAdj> Δ+12 {}
<MI 22a28 TST.B (A6-0x3)> {}
<MI 22a2c BNE 0x22a42> {}
<POP 22a2e-22a42 Naked> Σ0 ↓
<POP 22a2e-22a30 StackAdj> Δ-4 {[-4-]}
<MI 22a30 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x22a32 0x102cc> {[-4-]|[4, '(A6+0x8)']}
StringDup(a : String) : String
<POP 22a38-22a3a StackAdj> Δ+4 {[-4-]}
<Call 0x22a3a 0x103e0> {[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 22a40-22a42 StackAdj> Δ+4 {}
<POP 22a42-22a48 Naked> Σ0 ↓ →0x22a16 ←0x22a16
<MI 22a42 TST.B (A6-0x3)> {}
<MI 22a46 BEQ 0x22a16> {}
<POP 22a48-22a6a Naked> Σ0 ↓
<MI 22a48 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x22a4a 0x2.2> Δ-2 {[#0]|[#2]}
<Const 0x22a4e 0x1.4> Δ-4 {[#0]|[#2]|[##1]}
<Pointer.fp 0x22a52 <LVAR -0x004 @ 1(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-4]}
<Pointer.fp 0x22a54 <LVAR -0x008 @ 4(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-4]|[@@-8]}
<Call 0x22a56 0x1038c> {[#0]|[#2]|[##1]|[@@-4]|[@@-8]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 22a5c-22a60 StackAdj> Δ+16 {}
<Pointer.fp 0x22a60 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x22a62 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 22a68-22a6a StackAdj> Δ+4 {}
<POP 22a6a-22a74 Naked> Σ0 ↓ ←0x229e0
<Pointer.fp 0x22a6a <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x22a6c 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<POP 22a72-22a74 StackAdj> Δ+4 {}
<POP 22a74-22a7c Epilogue> Σ0
@ 22a7c
<LVAR 0x008 4(r)>
<POP 22a7c-22afe Body>
<POP 22a7c-22a92 Prologue> Σ0 ↓
<POP 22a92-22aa2 Naked> Σ0 ↓ →0x22ad0
<POP 22a92-22a94 StackAdj> Δ-4 {[-4-]}
<MI 22a94 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x22a98 0x21dfe> {[-4-]|[4, '(A6+0x8)']}
<POP 22a9c-22a9e StackAdj> Δ+4 {[-4-]}
<MI 22a9e MOVE.L (A7)+,D6> Δ+4 {}
<MI 22aa0 BNE 0x22ad0> {}
<POP 22aa2-22ad0 Naked> Σ0 →0x22af6
<Blob 0x22aa2 [10] 0x2652a> Δ-10 {[«10»]}
<POP 22ab0-22ab2 StackAdj> Δ-4 {[«10»]|[-4-]}
<Lit 0x22ab2> {[«10»]|[$$…]}
<Pointer.sp 0x22ab2 4> Δ-4
<Const 0x22ab6 0x1.2> Δ-2
<Const 0x22aba 0xa.2> Δ-2
<Call 0x22abe 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 22ac4-22ac6 StackAdj> Δ+8
<Call 0x22ac6 0x22972> {[«10»]|[$$…]}
<POP 22aca-22ace StackAdj> Δ+14 {}
<MI 22ace BRA 0x22af6> {}
<POP 22ad0-22ad4 Naked> Σ0 Δ-4 ↓ ←0x22a92
<MI 22ad0 MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']}
<MI 22ad2 MOVEQ.L #0x01,D7> {[4, 'D6']}
<POP 22ad4-22ad8 Naked> Σ-4 ↓ →0x22af4 ←0x22ad8
<MI 22ad4 CMP.L (A7),D7> {[-4-]}
<MI 22ad6 BGT 0x22af4> {[-4-]}
<POP 22ad8-22af4 Naked> Σ-4 ↓ →0x22ad4
<POP 22ad8-22ada StackAdj> Δ-4 {[-8-]}
<MI 22ada MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<MI 22ade MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x22ae0 0x2271a> {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<POP 22ae4-22ae6 StackAdj> Δ+8 {[-8-]}
<MI 22ae6 MOVEA.L (A7)+,A4> Δ+4 {[-4-]}
<MI 22ae8 MOVE.L A4,-(A7)> Δ-4 {[-4-]|[4, 'A4']}
<Call 0x22aea 0x22972> {[-4-]|[4, 'A4']}
<POP 22aee-22af0 StackAdj> Δ+4 {[-4-]}
<MI 22af0 ADDQ.L #0x1,D7> {[-4-]}
<MI 22af2 BVC 0x22ad4> {[-4-]}
<POP 22af4-22af6 Naked> Σ-4 Δ+4 ↓ ←0x22ad4
<POP 22af4-22af6 StackAdj> Δ+4 {}
<POP 22af6-22afe Epilogue> Σ0 ←0x22aa2
@ 22afe
<LVAR 0x00c @>
<LVAR 0x008 @ 4(r)>
<LVAR -0x020 @>
<POP 22afe-22b80 Body>
<POP 22afe-22b14 Prologue> Σ0 ↓
<POP 22b14-22b16 RegCacheLoad> Σ0 ↓
<POP 22b16-22b18 Naked> Σ0 ↓
<MI 22b16 MOVEQ.L #0x01,D7> {}
<POP 22b18-22b24 Naked> Σ0 ↓ →0x22b34 ←0x22b52
<MI 22b18 MOVEA.L (A6+0x8),A0> {}
<MI 22b1c MOVE.W (A0),D0> {}
<MI 22b1e EXTW.L D0> {}
<MI 22b20 CMP.L D0,D7> {}
<MI 22b22 BLE 0x22b34> {}
<POP 22b24-22b34 Naked> Σ0 →0x22b52
<MI 22b24 MOVE.L D7,D0> {}
<MI 22b26 SUBQ.L #0x1,D0> {}
<POP 0x22b28 LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 22b2e CLR.B (A6+D0.L-#0x20)> {}
<MI 22b32 BRA 0x22b52> {}
<POP 22b34-22b52 Naked> Σ0 ↓ ←0x22b18
<MI 22b34 MOVE.L D7,D0> {}
<MI 22b36 SUBQ.L #0x1,D0> {}
<POP 0x22b38 LimitCheck 0x0 ≤ D0 ≤ 0x1d> {}
<MI 22b3e MOVE.L D7,D1> {}
<MI 22b40 SUBQ.L #0x1,D1> {}
<POP 0x22b42 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {}
<MI 22b4c MOVE.B (A0+D1.L+#0x2),(A6+D0.L-#0x20)> {}
<POP 22b52-22b5c Naked> Σ0 ↓ →0x22b18 ←0x22b24
<MI 22b52 ADDQ.L #0x1,D7> {}
<MI 22b54 CMPI.L #0x0000001e,D7> {}
<MI 22b5a BLE 0x22b18> {}
<POP 22b5c-22b78 Naked> Σ0 ↓
<Pointer.fp 0x22b5c <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x22b60 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 22b66-22b68 StackAdj> Δ+4 {}
<MI 22b68 LEA.L (A6+0xc),A0> {}
<MI 22b6c LEA.L (A6-0x20),A1> {}
<BlockMove 30,A1,A0> {}
<POP 22b78-22b80 Epilogue> Σ0
@ 22b80
<LVAR 0x026 4(w)>
<LVAR 0x008 @>
<LVAR -0x006 4(rw)>
<POP 22b80-22bd4 Body>
<POP 22b80-22b96 Prologue> Σ0 ↓
<POP 22b96-22b9a RegCacheLoad> Σ0 ↓
<POP 22b9a-22ba2 Naked> Σ0 ↓
<MI 22b9a MOVEQ.L #0x00,D7> {}
<MI 22b9c MOVE.L 0x26542,(A6-0x6)> {}
<POP 22ba2-22baa Naked> Σ0 ↓ →0x22bc8 ←0x22bc6
<MI 22ba2 MOVEA.L (A6-0x6),A0> {}
<MI 22ba4 CMPA.W #0x1,A0> {}
<MI 22ba8 BEQ 0x22bc8> {}
<POP 22baa-22bae Naked> Σ0 ↓ →0x22bc8
<MI 22baa TST.B D7> {}
<MI 22bac BNE 0x22bc8> {}
<POP 22bae-22bb6 Naked> Σ0 ↓
<MI 22bae MOVEA.L A0,A1> {}
<MI 22bb0 LEA.L (A6+0x8),A2> {}
<MI 22bb4 MOVEQ.L #0x1d,D0> {}
<POP 22bb6-22bbc Naked> Σ0 ↓ →0x22bb6 ←0x22bb6
<MI 22bb6 CMPM.B (A1)+,(A2)+> {}
<MI 22bb8 DBNE D0,0x22bb6> {}
<POP 22bbc-22bbe Naked> Σ0 ↓ →0x22bc2
<MI 22bbc BNE 0x22bc2> {}
<POP 22bbe-22bc2 Naked> Σ0 →0x22bc6
<MI 22bbe MOVEQ.L #0x01,D7> {}
<MI 22bc0 BRA 0x22bc6> {}
<POP 22bc2-22bc6 Naked> Σ0 ↓ ←0x22bbc
<MI 22bc2 MOVE.L (A0+0x26),(A6-0x6)> {}
<POP 22bc6-22bc8 Naked> Σ0 →0x22ba2 ←0x22bbe
<MI 22bc6 BRA 0x22ba2> {}
<POP 22bc8-22bcc Naked> Σ0 ↓ ←0x22ba2 ←0x22baa
<MI 22bc8 MOVE.L A0,(A6+0x26)> {}
<POP 22bcc-22bd4 Epilogue> Σ0
@ 22bd4
<LVAR 0x008 @ 4(r)>
<POP 22bd4-22c5a Body>
<POP 22bd4-22bea Prologue> Σ0 ↓
<POP 22bea-22bf6 RegCacheLoad> Σ0 ↓
<POP 22bf6-22bfc Naked> Σ0 ↓ →0x22c52
<MI 22bf6 MOVEA.L (A6+0x8),A0> {}
<MI 22bf8 CMPA.W #0x01,A0> {}
<MI 22bfa BEQ 0x22c52> {}
<POP 22bfc-22c02 Naked> Σ0 ↓ →0x22c12
<MI 22bfc TST.L (A0+0x1e)> {}
<MI 22c00 BEQ 0x22c12> {}
<POP 22c02-22c12 Naked> Σ0 ↓
<MI 22c02 MOVE.L (A0+0x22),-(A7)> Δ-4 {[4, '(A0+0x22)']}
<MI 22c06 MOVE.L (A0+0x1e),-(A7)> Δ-4 {[4, '(A0+0x22)']|[4, '(A0+0x1e)']}
<Call 0x22c0a 0x102a4> {[4, '(A0+0x22)']|[4, '(A0+0x1e)']}
Free1(a : Pointer; b : Long)
<POP 22c10-22c12 StackAdj> Δ+8 {}
<POP 22c12-22c18 Naked> Σ0 ↓ ←0x22bfc
<MI 22c12 MOVEQ.L #0x00,D7> {}
<MI 22c14 MOVEA.W #0x01,A4> {}
<MI 22c16 MOVEA.L 0x26542,A3> {}
<POP 22c18-22c1c Naked> Σ0 ↓ →0x22c30 ←0x22c2e
<MI 22c18 CMPA.W #0x01,A3> {}
<MI 22c1a BEQ 0x22c30> {}
<POP 22c1c-22c20 Naked> Σ0 ↓ →0x22c30
<MI 22c1c TST.B D7> {}
<MI 22c1e BNE 0x22c30> {}
<POP 22c20-22c24 Naked> Σ0 ↓ →0x22c28
<MI 22c20 CMPA.L (A6+0x8),A3> {}
<MI 22c22 BNE 0x22c28> {}
<POP 22c24-22c28 Naked> Σ0 →0x22c2e
<MI 22c24 MOVEQ.L #0x01,D7> {}
<MI 22c26 BRA 0x22c2e> {}
<POP 22c28-22c2e Naked> Σ0 ↓ ←0x22c20
<MI 22c28 MOVEA.L A3,A4> {}
<MI 22c2a MOVEA.L (A3+0x26),A3> {}
<POP 22c2e-22c30 Naked> Σ0 →0x22c18 ←0x22c24
<MI 22c2e BRA 0x22c18> {}
<POP 22c30-22c34 Naked> Σ0 ↓ →0x22c52 ←0x22c18 ←0x22c1c
<MI 22c30 TST.B D7> {}
<MI 22c32 BEQ 0x22c52> {}
<POP 22c34-22c38 Naked> Σ0 ↓ →0x22c3e
<MI 22c34 CMPA.W #0x01,A4> {}
<MI 22c36 BNE 0x22c3e> {}
<POP 22c38-22c3e Naked> Σ0 →0x22c44
<MI 22c38 MOVE.L (A3+0x26),0x26542> {}
<MI 22c3c BRA 0x22c44> {}
<POP 22c3e-22c44 Naked> Σ0 ↓ ←0x22c34
<MI 22c3e MOVE.L (A3+0x26),(A4+0x26)> {}
<POP 22c44-22c52 Naked> Σ0 ↓ ←0x22c38
<Pointer.fp 0x22c44 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Const 0x22c46 0x2a.4> Δ-4 {[@@8]|[##42]}
<Call 0x22c4a 0x102a8> {[@@8]|[##42]}
Free2(a : Pointer; b : Long)
<POP 22c50-22c52 StackAdj> Δ+8 {}
<POP 22c52-22c5a Epilogue> Σ0 ←0x22bf6 ←0x22c30
@ 22c5a
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x006 @ 4(rw)>
<LVAR -0x024 @>
<POP 22c5a-22d18 Body>
<POP 22c5a-22c70 Prologue> Σ0 ↓
<POP 22c70-22c7a RegCacheLoad> Σ0 ↓
<POP 22c7a-22c98 Naked> Σ0 ↓ →0x22c9a
<POP 22c7a-22c7c StackAdj> Δ-30 {[-30-]}
<MI 22c7c MOVEA.L (A6+0xc),A0> {[-30-]}
<MI 22c80 MOVE.L (A0),-(A7)> Δ-4 {[-30-]|[4, '(A0)']}
<Call 0x22c82 0x22afe> {[-30-]|[4, '(A0)']}
<POP 22c86-22c88 StackAdj> Δ+4 {[-30-]}
<MI 22c88 LEA.L (A6-0x24),A0> {[-30-]}
<POP 22c8c-22c94 StackPop> Δ+30 {[-30-]}
<BlockMove 30,A7,A0> Δ+30
<MI 22c94 TST.L (A6+0x8)> {[-30-]}
<MI 22c96 BGE 0x22c9a> {[-30-]}
<POP 22c98-22c9a Naked> Σ0 ↓
<MI 22c98 CLR.L (A6+0x8)> {}
<POP 22c9a-22cb6 Naked> Σ0 ↓ →0x22cc8 ←0x22c7a
<POP 22c9a-22c9c StackAdj> Δ-4 {[-4-]}
<Blob 0x22c9c [30] (A6-0x6)> Δ-30 {[-4-]|[«30»]}
<Call 0x22ca6 0x22b80> {[-4-]|[«30»]}
<POP 22caa-22cac StackAdj> Δ+30 {[-4-]}
<MI 22cac MOVE.L (A7)+,(A6-0x6)> Δ+4 {}
<MI 22cae MOVEA.L (A6-0x6),A0> {}
<MI 22cb0 CMPA.W #0x1,A0> {}
<MI 22cb4 BEQ 0x22cc8> {}
<POP 22cb6-22cbe Naked> Σ0 ↓ →0x22cc0
<MI 22cb6 MOVE.L (A0+0x1e),D0> {}
<MI 22cba CMP.L (A6+0x8),D0> {}
<MI 22cbc BNE 0x22cc0> {}
<POP 22cbe-22cc0 Naked> Σ0 →0x22d0c
<MI 22cbe BRA 0x22d0c> {}
<POP 22cc0-22cc8 Naked> Σ0 ↓ ←0x22cb6
<MI 22cc0 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x22cc2 0x22bd4> {[4, '(A6-0x6)']}
<POP 22cc6-22cc8 StackAdj> Δ+4 {}
<POP 22cc8-22cfc Naked> Σ0 ↓ →0x22d0c ←0x22c9a
<Pointer.fp 0x22cc8 <LVAR -0x006 @ 4(rw)>> Δ-4 {[@@-6]}
<Const 0x22cca 0x2a.4> Δ-4 {[@@-6]|[##42]}
<Call 0x22cce 0x1029c> {[@@-6]|[##42]}
Malloc1(length : Long) : Pointer
<POP 22cd4-22cd6 StackAdj> Δ+8 {}
<MI 22cd6 MOVEA.L (A6-0x6),A0> {}
<MI 22cd8 MOVE.L 0x26542,(A0+0x26)> {}
<MI 22ce0 MOVE.L (A6-0x6),0x26542> {}
<MI 22ce6 MOVEA.L A0,A1> {}
<MI 22ce8 LEA.L (A6-0x24),A2> {}
<BlockMove 30,A2,A1> {}
<MI 22cf4 MOVE.L (A6+0x8),(A0+0x1e)> {}
<MI 22cf8 TST.L (A6+0x8)> {}
<MI 22cfa BEQ 0x22d0c> {}
<POP 22cfc-22d0c Naked> Σ0 ↓
<POP 22cfc-22cfe StackAdj> Δ-4 {[-4-]}
<MI 22cfe MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x22d00 0x102a0> {[-4-]|[4, '(A6+0x8)']}
Malloc2(VAR dst : Pointer; length : Word)
<POP 22d06-22d08 StackAdj> Δ+4 {[-4-]}
<MI 22d08 MOVE.L (A7)+,(A0+0x22)> Δ+4 {}
<POP 22d0c-22d10 Naked> Σ0 ↓ ←0x22cbe ←0x22cc8
<MI 22d0c MOVE.L (A6-0x6),(A6+0x10)> {}
<POP 22d10-22d18 Epilogue> Σ0
@ 22d18
<LVAR 0x00c @>
<LVAR 0x008 @ 4(r)>
<LVAR -0x008 4(rw)>
<POP 22d18-22da2 Body>
<POP 22d18-22d2e Prologue> Σ0 ↓
<POP 22d2e-22d32 RegCacheLoad> Σ0 ↓
<POP 22d32-22d50 Naked> Σ0 ↓ →0x22d90
<MI 22d32 MOVEA.L (A6+0x8),A0> {}
<MI 22d34 MOVE.W (A0),D0> {}
<MI 22d36 EXTW.L D0> {}
<MI 22d38 MOVE.L D0,D6> {}
<POP 22d3a-22d3c StackAdj> Δ-4 {[-4-]}
<Pointer.fp 0x22d3c <LVAR 0x00c @>> Δ-4 {[-4-]|[@@12]}
<MI 22d40 MOVE.L D6,-(A7)> Δ-4 {[-4-]|[@@12]|[4, 'D6']}
<Call 0x22d42 0x22c5a> {[-4-]|[@@12]|[4, 'D6']}
<POP 22d46-22d48 StackAdj> Δ+8 {[-4-]}
<MI 22d48 MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 22d4c TST.L D6> {}
<MI 22d4e BEQ 0x22d90> {}
<POP 22d50-22d5e Naked> Σ0 Δ-8 ↓
<MI 22d50 MOVEA.L (A6-0x8),A0> {}
<MI 22d54 MOVEA.L (A0+0x22),A0> {}
<MI 22d58 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 22d5a MOVE.L D6,-(A7)> Δ-4 {[4, 'A0']|[4, 'D6']}
<MI 22d5c MOVEQ.L #0x01,D7> {[4, 'A0']|[4, 'D6']}
<POP 22d5e-22d62 Naked> Σ-8 ↓ →0x22d8e ←0x22d62
<MI 22d5e CMP.L (A7),D7> {[-8-]}
<MI 22d60 BGT 0x22d8e> {[-8-]}
<POP 22d62-22d8e Naked> Σ-8 ↓ →0x22d5e
<MI 22d62 MOVE.L D7,D0> {[-8-]}
<MI 22d64 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x22d66 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {[-8-]}
<MI 22d70 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 22d74 MOVEA.L (A6+0x8),A1> {[-8-]}
<MI 22d76 MOVE.L D7,D1> {[-8-]}
<MI 22d78 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x22d7a LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 22d84 MOVE.B (A1+D1.L+#0x2),(A0+D0.L)> {[-8-]}
<MI 22d8a ADDQ.L #0x1,D7> {[-8-]}
<MI 22d8c BVC 0x22d5e> {[-8-]}
<POP 22d8e-22d90 Naked> Σ-8 Δ+8 ↓ ←0x22d5e
<POP 22d8e-22d90 StackAdj> Δ+8 {}
<POP 22d90-22d9a Naked> Σ0 ↓ ←0x22d32
<Pointer.fp 0x22d90 <LVAR 0x008 @ 4(r)>> Δ-4 {[@@8]}
<Call 0x22d92 0x102bc> {[@@8]}
FreeString(VAR a : String)
<POP 22d98-22d9a StackAdj> Δ+4 {}
<POP 22d9a-22da2 Epilogue> Σ0
@ 22da2
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(w)>
<LVAR -0x008 4(rw)>
<LVAR -0x00c 4(rw)>
<LVAR -0x010 4(rw)>
<LVAR -0x01c 4(rw)>
<LVAR -0x020 4(rw)>
<POP 22da2-22f0e Body>
<POP 22da2-22db8 Prologue> Σ0 ↓
<POP 22db8-22dc6 RegCacheLoad> Σ0 ↓
<POP 22dc6-22dd8 Naked> Σ0 ↓ →0x22e06
<POP 22dc6-22dc8 StackAdj> Δ-4 {[-4-]}
<MI 22dc8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x22dca 0x21dfe> {[-4-]|[4, '(A6+0x8)']}
<POP 22dce-22dd0 StackAdj> Δ+4 {[-4-]}
<MI 22dd0 MOVE.L (A7)+,(A6-0x10)> Δ+4 {}
<MI 22dd2 MOVE.L (A6-0x10),D0> {}
<MI 22dd4 CMP.L #0x01,D0> {}
<MI 22dd6 BGE 0x22e06> {}
<POP 22dd8-22e06 Naked> Σ0 ↓
<Blob 0x22dd8 [26] @> Δ-26 {[«26""»]}
<POP 22dea-22dec StackAdj> Δ-4 {[«26""»]|[-4-]}
<Lit 0x22dec 25> {[«26""»]|[$$Too few arguments for SET]}
<Call 0x22dfe 0x219f2> {[«26""»]|[$$Too few arguments for SET]}
<POP 22e02-22e06 StackAdj> Δ+30 {}
<POP 22e06-22e0c Naked> Σ0 Δ-4 ↓ ←0x22dc6
<MI 22e06 CLR.L (A6-0xc)> {}
<MI 22e08 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 22e0a MOVEQ.L #0x02,D6> {[4, 'D0']}
<POP 22e0c-22e10 Naked> Σ-4 ↓ →0x22e2e ←0x22e10
<MI 22e0c CMP.L (A7),D6> {[-4-]}
<MI 22e0e BGT 0x22e2e> {[-4-]}
<POP 22e10-22e2e Naked> Σ-4 ↓ →0x22e0c
<POP 22e10-22e14 StackAdj> Δ-12 {[-16-]}
<MI 22e14 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<MI 22e16 MOVE.L D6,-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
<Call 0x22e18 0x2263c> {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
<POP 22e1c-22e1e StackAdj> Δ+8 {[-16-]}
<Call 0x22e1e 0x22604> {[-16-]}
<POP 22e22-22e24 StackAdj> Δ+8 {[-8-]}
<MI 22e24 MOVE.L (A6-0xc),D0> {[-8-]}
<MI 22e26 ADD.L (A7)+,D0> Δ+4 {[-4-]}
<MI 22e28 MOVE.L D0,(A6-0xc)> {[-4-]}
<MI 22e2a ADDQ.L #0x1,D6> {[-4-]}
<MI 22e2c BVC 0x22e0c> {[-4-]}
<POP 22e2e-22e5e Naked> Σ-4 Δ+4 ↓ →0x22f06 ←0x22e0c
<POP 22e2e-22e30 StackAdj> Δ+4 {}
<MI 22e30 MOVE.L (A6-0x10),D0> {}
<MI 22e32 SUBQ.L #0x2,D0> {}
<MI 22e34 ADD.L D0,(A6-0xc)> {}
<POP 22e36-22e38 StackAdj> Δ-4 {[-4-]}
<MI 22e38 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x22e3a 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x22e3e 0x2271a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 22e42-22e44 StackAdj> Δ+8 {[-4-]}
<MI 22e44 MOVE.L (A7),(A6-0x4)> {[-4-]}
<Pointer.fp 0x22e48 <LVAR -0x004 @ 4(w)>> Δ-4 {[-4-]|[@@-4]}
<MI 22e4c MOVE.L (A6-0xc),-(A7)> Δ-4 {[-4-]|[@@-4]|[4, '(A6-0xc)']}
<Call 0x22e4e 0x22c5a> {[-4-]|[@@-4]|[4, '(A6-0xc)']}
<POP 22e52-22e54 StackAdj> Δ+8 {[-4-]}
<MI 22e54 MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 22e58 TST.L (A6-0xc)> {}
<MI 22e5a BLE 0x22f06> {}
<POP 22e5e-22e6e Naked> Σ0 Δ-8 ↓
<MI 22e5e MOVEA.L (A6-0x8),A0> {}
<MI 22e62 MOVEA.L (A0+0x22),A0> {}
<MI 22e66 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 22e68 MOVEQ.L #0x01,D7> {[4, 'A0']}
<MI 22e6a MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, 'A0']|[4, '(A6-0x10)']}
<MI 22e6c MOVEQ.L #0x02,D6> {[4, 'A0']|[4, '(A6-0x10)']}
<POP 22e6e-22e74 Naked> Σ-8 ↓ →0x22f04 ←0x22efe
<MI 22e6e CMP.L (A7),D6> {[-8-]}
<MI 22e70 BGT 0x22f04> {[-8-]}
<POP 22e74-22e94 Naked> Σ-8 Δ-4 ↓ →0x22ea8
<POP 22e74-22e76 StackAdj> Δ-8 {[-16-]}
<MI 22e76 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<MI 22e78 MOVE.L D6,-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
<Call 0x22e7a 0x2263c> {[-16-]|[4, '(A6+0x8)']|[4, 'D6']}
<POP 22e7e-22e80 StackAdj> Δ+8 {[-16-]}
<MI 22e80 MOVE.L (A7)+,(A6-0x20)> Δ+4 {[-12-]}
<MI 22e84 MOVE.L (A7)+,(A6-0x1c)> Δ+4 {[-8-]}
<MI 22e88 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x1c)']}
<MI 22e8c MOVE.L (A6-0x20),D5> {[-8-]|[4, '(A6-0x1c)']}
<MI 22e90 CMP.L (A7),D5> {[-8-]|[4, '(A6-0x1c)']}
<MI 22e92 BGT 0x22ea8> {[-8-]|[4, '(A6-0x1c)']}
<POP 22e94-22ea8 Naked> Σ-12 ↓
<MI 22e94 MOVE.L (A7),D0> {[-12-]}
<POP 0x22e96 LimitCheck -0x7fffffff ≤ D5> {[-12-]}
<MI 22e96 CMPI.L #0x80000001,D5>
<MI 22e9c BLT 0x22ea6>
<POP 0x22e9e LimitCheck D0 ≤ 0x7fffffff> {[-12-]}
<MI 22e9e CMPI.L #0x7fffffff,D0>
<MI 22ea4 BLE 0x22ea8>
<MI 22ea6 TRAP #15>
<POP 22ea8-22eac Naked> Σ-12 ↓ →0x22ede ←0x22e74 ←0x22eac
<MI 22ea8 CMP.L (A7),D5> {[-12-]}
<MI 22eaa BGT 0x22ede> {[-12-]}
<POP 22eac-22ede Naked> Σ-12 ↓ →0x22ea8
<MI 22eac MOVE.L D7,D0> {[-12-]}
<MI 22eae SUBQ.L #0x1,D0> {[-12-]}
<POP 0x22eb0 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {[-12-]}
<MI 22eba MOVEA.L (A7+0x8),A0> {[-12-]}
<MI 22ebe MOVE.L D5,D1> {[-12-]}
<MI 22ec0 SUBQ.L #0x1,D1> {[-12-]}
<POP 0x22ec2 LimitCheck 0x0 ≤ D1 ≤ 0xfff> {[-12-]}
<MI 22ecc LEA.L 0x25510,A1> {[-12-]}
<MI 22ed2 MOVE.B (A1+D1.L+#0x8),(A0+D0.L)> {[-12-]}
<MI 22ed8 ADDQ.L #0x1,D7> {[-12-]}
<MI 22eda ADDQ.L #0x1,D5> {[-12-]}
<MI 22edc BVC 0x22ea8> {[-12-]}
<POP 22ede-22ee4 Naked> Σ-12 Δ+4 ↓ →0x22efe ←0x22ea8
<POP 22ede-22ee0 StackAdj> Δ+4 {[-8-]}
<MI 22ee0 CMP.L (A6-0x10),D6> {[-8-]}
<MI 22ee2 BEQ 0x22efe> {[-8-]}
<POP 22ee4-22efe Naked> Σ-8 ↓
<MI 22ee4 MOVE.L D7,D0> {[-8-]}
<MI 22ee6 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x22ee8 LimitCheck 0x0 ≤ D0 ≤ 0x3ff> {[-8-]}
<MI 22ef2 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 22ef6 MOVE.B #0x2c,(A0+D0.L)> {[-8-]}
<MI 22efc ADDQ.L #0x1,D7> {[-8-]}
<POP 22efe-22f04 Naked> Σ-8 ↓ →0x22e6e ←0x22ede
<MI 22efe ADDQ.L #0x1,D6> {[-8-]}
<MI 22f00 BVC 0x22e6e> {[-8-]}
<POP 22f04-22f06 Naked> Σ-8 Δ+8 ↓ ←0x22e6e
<POP 22f04-22f06 StackAdj> Δ+8 {}
<POP 22f06-22f0e Epilogue> Σ0 ←0x22e2e
@ 22f0e
<LVAR 0x008 4(r)>
<LVAR -0x00c 4(rw)>
<POP 22f0e-22ffc Body>
<POP 22f0e-22f24 Prologue> Σ0 ↓
<POP 22f24-22f2c RegCacheLoad> Σ0 ↓
<POP 22f2c-22f5e Naked> Σ0 ↓ →0x22fa0
<POP 22f2c-22f2e StackAdj> Δ-4 {[-4-]}
<MI 22f2e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x22f32 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x22f36 0x2271a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 22f3a-22f3c StackAdj> Δ+8 {[-4-]}
<MI 22f3c MOVEA.L (A7)+,A4> Δ+4 {}
<POP 22f3e-22f42 StackAdj> Δ-34 {[-34-]}
<MI 22f42 MOVE.L A4,-(A7)> Δ-4 {[-34-]|[4, 'A4']}
<Call 0x22f44 0x22afe> {[-34-]|[4, 'A4']}
<POP 22f48-22f4a StackAdj> Δ+4 {[-34-]}
<Call 0x22f4a 0x22b80> {[-34-]}
<POP 22f4e-22f52 StackAdj> Δ+30 {[-4-]}
<MI 22f52 MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 22f56 MOVEA.L (A6-0xc),A0> {}
<MI 22f5a CMPA.W #0x01,A0> {}
<MI 22f5c BNE 0x22fa0> {}
<POP 22f5e-22fa0 Naked> Σ0 ↓
<Blob 0x22f5e [20] @> Δ-20 {[«20""»]}
<POP 22f70-22f72 StackAdj> Δ-8 {[«20""»]|[-8-]}
<Lit 0x22f72 19> {[«20""»]|[-4-]|[$$Unknown variable :_]}
<MI 22f82 MOVE.L (A6+0x8),(A7)> {[«20""»]|[-4-]|[4, '(A6+0x8)']}
<POP 22f7c-22f82 StackAdj> Δ-8 {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]}
<Const 0x22f86 0x1.4> Δ-4 {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]|[##1]}
<Call 0x22f8a 0x2271a> {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-8-]|[##1]}
<POP 22f8e-22f90 StackAdj> Δ+8 {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
<Call 0x22f90 0x102d0> {[«20""»]|[-4-]|[4, '(A6+0x8)']|[-4-]}
StringCat2(a, b : String) : String
<POP 22f96-22f98 StackAdj> Δ+8 {[«20""»]|[-4-]}
<Call 0x22f98 0x219f2> {[«20""»]|[-4-]}
<POP 22f9c-22fa0 StackAdj> Δ+24 {}
<POP 22fa0-22fb6 Naked> Σ0 Δ-8 ↓ ←0x22f2c
<MI 22fa0 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<Blob 0x22fa2 [4] 0x26518> Δ-4 {[4, 'A0']|[«4»]}
<MI 22fa4 MOVE.L (A0+0x1e),-(A7)> Δ-4 {[4, 'A0']|[«4»]|[4, '(A0+0x1e)']}
<MI 22fa8 NEG.L (A7)> {[4, 'A0']|[«4»]|[4, '(A0+0x1e)']}
<Call 0x22faa 0x21f46> {[4, 'A0']|[«4»]|[4, '(A0+0x1e)']}
<POP 22fae-22fb0 StackAdj> Δ+4 {[4, 'A0']|[«4»]}
<MI 22fb0 MOVE.L (A0+0x1e),(A7)> {[4, 'A0']|[4, '(A0+0x1e)']}
<MI 22fb4 MOVEQ.L #0x01,D7> {[4, 'A0']|[4, '(A0+0x1e)']}
<POP 22fb6-22fba Naked> Σ-8 ↓ →0x22ff2 ←0x22fba
<MI 22fb6 CMP.L (A7),D7> {[-8-]}
<MI 22fb8 BGT 0x22ff2> {[-8-]}
<POP 22fba-22ff2 Naked> Σ-8 ↓ →0x22fb6
<MI 22fba MOVE.L D7,D0> {[-8-]}
<MI 22fbc ADD.L 0x26518,D0> {[-8-]}
<MI 22fbe SUBQ.L #0x1,D0> {[-8-]}
<MI 22fc0 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x22fc2 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-8-]}
<MI 22fcc LEA.L 0x25510,A0> {[-8-]}
<MI 22fd2 MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 22fd6 MOVEA.L (A1+0x22),A1> {[-8-]}
<MI 22fda MOVE.L D7,D1> {[-8-]}
<MI 22fdc SUBQ.L #0x1,D1> {[-8-]}
<POP 0x22fde LimitCheck 0x0 ≤ D1 ≤ 0x3ff> {[-8-]}
<MI 22fe8 MOVE.B (A1+D1.L),(A0+D0.L+#0x8)> {[-8-]}
<MI 22fee ADDQ.L #0x1,D7> {[-8-]}
<MI 22ff0 BVC 0x22fb6> {[-8-]}
<POP 22ff2-22ff4 Naked> Σ-8 Δ+8 ↓ ←0x22fb6
<POP 22ff2-22ff4 StackAdj> Δ+8 {}
<POP 22ff4-22ffc Epilogue> Σ0
@ 22ffc
<LVAR -0x004 4(rw)>
<POP 22ffc-2305e Body>
<POP 22ffc-23012 Prologue> Σ0 ↓
<POP 23012-2301a RegCacheLoad> Σ0 ↓
<POP 2301a-23020 Naked> Σ0 ↓
<MI 2301a MOVE.L 0x26542,(A6-0x4)> {}
<POP 23020-23026 Naked> Σ0 ↓ →0x23056 ←0x23026
<MI 23020 MOVEA.L (A6-0x4),A0> {}
<MI 23022 CMPA.W #0x01,A0> {}
<MI 23024 BEQ 0x23056> {}
<POP 23026-23056 Naked> Σ0 →0x23020
<POP 23026-23028 StackAdj> Δ-30 {[-30-]}
<MI 23028 MOVEA.L A7,A1> {[-30-]}
<MI 2302a MOVEA.L A0,A2> {[-30-]}
<BlockMove 30,A2,A1> {[-30-]}
<POP 23034-23036 StackAdj> Δ-4 {[-34-]}
<Lit 0x23036> {[-30-]|[$$…]}
<Pointer.sp 0x23036 4> Δ-4
<Const 0x2303a 0x1.2> Δ-2
<Const 0x2303c 0x1e.2> Δ-2
<Call 0x2303e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23044-23046 StackAdj> Δ+8
<Call 0x23046 0x103e0> {[-30-]|[$$…]}
WriteConsoleStringCrLf(str : String)
<POP 2304c-23050 StackAdj> Δ+34 {}
<MI 23050 MOVE.L (A0+0x26),(A6-0x4)> {}
<MI 23054 BRA 0x23020> {}
<POP 23056-2305e Epilogue> Σ0 ←0x23020
@ 2305e
<LVAR 0x008 4(r)>
<POP 2305e-2309a Body>
<POP 2305e-23070 Prologue> Σ0 ↓
<POP 23070-23096 Naked> Σ0 ↓
<POP 23070-23074 StackAdj> Δ-38 {[-38-]}
<MI 23074 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-38-]|[4, '(A6+0x8)']}
<Const 0x23078 0x1.4> Δ-4 {[-38-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2307c 0x2271a> {[-38-]|[4, '(A6+0x8)']|[##1]}
<POP 23080-23082 StackAdj> Δ+8 {[-38-]}
<Call 0x23082 0x22afe> {[-38-]}
<POP 23086-23088 StackAdj> Δ+4 {[-34-]}
<Call 0x23088 0x22b80> {[-34-]}
<POP 2308c-23090 StackAdj> Δ+30 {[-4-]}
<Call 0x23090 0x22bd4> {[-4-]}
<POP 23094-23096 StackAdj> Δ+4 {}
<POP 23096-2309a Epilogue> Σ0
@ 2309a
<POP 2309a-230c8 Body>
<POP 2309a-230ac Prologue> Σ0 ↓
<POP 230ac-230c4 Naked> Σ0 ↓
<POP 230ac-230ae StackAdj> Δ-8 {[-8-]}
<Call 0x230ae 0x103cc> {[-8-]}
GetPushLevel() : Long
<Call 0x230b4 0x102e4> {[-8-]}
Long2String(a : Long) : String
<POP 230ba-230bc StackAdj> Δ+4 {[-4-]}
<Call 0x230bc 0x103e0> {[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 230c2-230c4 StackAdj> Δ+4 {}
<POP 230c4-230c8 Epilogue> Σ0
@ 230c8
<LVAR 0x008 4(r)>
<LVAR -0x004 1(rw)>
<LVAR -0x008 @ 4(rw)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x010 @ 4(r)>
<LVAR -0x012 @ 1(r)>
<LVAR -0x013 @ 1(r)>
<LVAR -0x014 @ 1(r)>
<LVAR -0x024 4(rw)>
<LVAR -0x028 4(rw)>
<LVAR -0x02c 4(rw)>
<LVAR -0x030 @ 4(r)>
<LVAR -0x032 1(w)>
<LVAR -0x036 @ 4(r)>
<LVAR -0x038 @ 1(r)>
<LVAR -0x03c @ 4(rw)>
<POP 230c8-233f0 Body>
<POP 230c8-230de Prologue> Σ0 ↓
<POP 230de-230f6 RegCacheLoad> Σ0 ↓
<POP 230f6-23106 Naked> Σ0 ↓ →0x2312e
<POP 230f6-230f8 StackAdj> Δ-4 {[-4-]}
<MI 230f8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x230fa 0x21dfe> {[-4-]|[4, '(A6+0x8)']}
<POP 230fe-23100 StackAdj> Δ+4 {[-4-]}
<MI 23100 MOVE.L (A7)+,(A6-0x2c)> Δ+4 {}
<MI 23104 BNE 0x2312e> {}
<POP 23106-2312e Naked> Σ0 →0x2313e
<POP 23106-23108 StackAdj> Δ-4 {[-4-]}
<POP 23108-23109 StackAdj> Δ+2 {[-2-]}
<Blob 0x23109 [2] @> Δ-2 {[-2-]|[«2""»]}
<MI 2310c MOVE.B 0x21617,(A7+0x1)> {[-2-]|[«2""»]}
<MI 23112 MOVE.B 0x21618,(A7+0x2)> {[-2-]|[«2""»]}
<POP 23118-2311a StackAdj> Δ-4 {[-2-]|[«2""»]|[-4-]}
<Lit 0x2311a> {[-2-]|[«2""»]|[$$…]}
<Pointer.sp 0x2311a 4> Δ-4
<Const 0x2311e 0x1.2> Δ-2
<Const 0x23120 0x3.2> Δ-2
<Call 0x23124 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 23126-23128 StackAdj> Δ+8
<MI 23128 MOVE.L (A7)+,(A6-0x3c)> Δ+4 {[-2-]|[«2""»]}
<POP 2312a-2312c StackAdj> Δ+4 {}
<MI 2312c BRA 0x2313e> {}
<POP 2312e-2313e Naked> Σ0 ↓ ←0x230f6
<POP 2312e-23130 StackAdj> Δ-4 {[-4-]}
<MI 23130 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23132 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23136 0x2271a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 2313a-2313c StackAdj> Δ+8 {[-4-]}
<MI 2313c MOVE.L (A7)+,(A6-0x3c)> Δ+4 {}
<POP 2313e-2318e Naked> Σ0 ↓ →0x2319c ←0x23106
<Blob 0x2313e [6] @> Δ-6 {[«6""»]}
<POP 2314e-23150 StackAdj> Δ-4 {[«6""»]|[-4-]}
<MI 23150 MOVE.L (A6-0x3c),-(A7)> Δ-4 {[«6""»]|[-4-]|[4, '(A6-0x3c)']}
<POP 23152-23154 StackAdj> Δ-4 {[«6""»]|[-4-]|[4, '(A6-0x3c)']|[-4-]}
<Lit 0x23154 5> {[«6""»]|[-4-]|[4, '(A6-0x3c)']|[$$.M200]}
<Call 0x23162 0x102d0> {[«6""»]|[-4-]|[4, '(A6-0x3c)']|[$$.M200]}
StringCat2(a, b : String) : String
<POP 23168-2316a StackAdj> Δ+8 {[«6""»]|[-4-]}
<MI 2316a MOVE.L (A7)+,(A6-0x3c)> Δ+4 {[«6""»]}
<POP 2316c-2316e StackAdj> Δ+2 {[-4-]}
<MI 2316e MOVE.L (A6-0x3c),(A7)> {[4, '(A6-0x3c)']}
<MI 23170 CLR.B -(A7)> Δ-2 {[4, '(A6-0x3c)']|[#0]}
<Const 0x23172 0x1.2> Δ-2 {[4, '(A6-0x3c)']|[#0]|[#1]}
<Const 0x23174 0x0.4> Δ-4 {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]}
<Pointer.fp 0x23178 <LVAR -0x038 @ 1(r)>> Δ-4 {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]|[@@-56]}
<Pointer.fp 0x2317c <LVAR -0x036 @ 4(r)>> Δ-4 {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]|[@@-56]|[@@-54]}
<Call 0x23180 0x10380> {[4, '(A6-0x3c)']|[#0]|[#1]|[##0]|[@@-56]|[@@-54]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 23186-23188 StackAdj> Δ+20 {}
<MI 23188 TST.B (A6-0x38)> {}
<MI 2318c BEQ 0x2319c> {}
<POP 2318e-2319c Naked> Σ0 →0x233e8
<Pointer.fp 0x2318e <LVAR -0x03c @ 4(rw)>> Δ-4 {[@@-60]}
<Call 0x23190 0x102bc> {[@@-60]}
FreeString(VAR a : String)
<POP 23196-23198 StackAdj> Δ+4 {}
<MI 23198 BRA 0x233e8> {}
<POP 2319c-231e2 Naked> Σ0 ↓ →0x23218 ←0x2313e
<MI 2319c MOVEA.L (A6-0x36),A0> {}
<MI 231a0 MOVE.B (A0+0x3f),D0> {}
<MI 231a4 LSL.B #0x6,D0> {}
<MI 231a6 LSR.B #0x7,D0> {}
<MI 231a8 MOVE.B D0,(A6-0x32)> {}
<MI 231ac CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x231ae 0x1.2> Δ-2 {[#0]|[#1]}
<Const 0x231b0 0x1.4> Δ-4 {[#0]|[#1]|[##1]}
<Pointer.fp 0x231b4 <LVAR -0x038 @ 1(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-56]}
<Pointer.fp 0x231b8 <LVAR -0x036 @ 4(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-56]|[@@-54]}
<Call 0x231bc 0x1038c> {[#0]|[#1]|[##1]|[@@-56]|[@@-54]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 231c2-231c6 StackAdj> Δ+16 {}
<MI 231c6 MOVEA.L (A6-0x3c),A0> {}
<MI 231c8 MOVE.W (A0),D1> {}
<MI 231ca EXTW.L D1> {}
<MI 231cc SUBQ.L #0x5,D1> {}
<POP 0x231ce LimitCheck -0x8000 ≤ D1 ≤ 0x7fff> {}
<MI 231dc MOVE.W D1,(A0)> {}
<MI 231de TST.B D0> {}
<MI 231e0 BNE 0x23218> {}
<POP 231e2-23218 Naked> Σ0 →0x233e8
<Blob 0x231e2 [18] @> Δ-18 {[«18""»]}
<POP 231ee-231f0 StackAdj> Δ-4 {[«18""»]|[-4-]}
<MI 231f0 MOVE.L (A6-0x3c),-(A7)> Δ-4 {[«18""»]|[-4-]|[4, '(A6-0x3c)']}
<POP 231f2-231f4 StackAdj> Δ-4 {[«18""»]|[-4-]|[4, '(A6-0x3c)']|[-4-]}
<Lit 0x231f4 18> {[«18""»]|[-4-]|[4, '(A6-0x3c)']|[$$ is not a program.]}
<Call 0x23202 0x102d0> {[«18""»]|[-4-]|[4, '(A6-0x3c)']|[$$ is not a program.]}
StringCat2(a, b : String) : String
<POP 23208-2320a StackAdj> Δ+8 {[«18""»]|[-4-]}
<Call 0x2320a 0x103e0> {[«18""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 23210-23214 StackAdj> Δ+22 {}
<MI 23214 BRA 0x233e8> {}
<POP 23218-23232 Naked> Σ0 Δ-8 ↓ ←0x2319c
<Pointer.fp 0x23218 <LVAR -0x030 @ 4(r)>> Δ-4 {[@@-48]}
<Call 0x2321c 0x102b8> {[@@-48]}
NewString(VAR a : String)
<POP 23222-23224 StackAdj> Δ+4 {}
<MI 23224 MOVEA.L (A6-0x30),A0> {}
<MI 23228 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2322a MOVEQ.L #0x01,D7> {[4, 'A0']}
<MI 2322c MOVE.L (A6-0x2c),-(A7)> Δ-4 {[4, 'A0']|[4, '(A6-0x2c)']}
<MI 23230 MOVEQ.L #0x02,D5> {[4, 'A0']|[4, '(A6-0x2c)']}
<POP 23232-23238 Naked> Σ-8 ↓ →0x232ca ←0x232c4
<MI 23232 CMP.L (A7),D5> {[-8-]}
<MI 23234 BGT 0x232ca> {[-8-]}
<POP 23238-23258 Naked> Σ-8 Δ-4 ↓ →0x2326c
<POP 23238-2323a StackAdj> Δ-8 {[-16-]}
<MI 2323a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<MI 2323c MOVE.L D5,-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, 'D5']}
<Call 0x2323e 0x2263c> {[-16-]|[4, '(A6+0x8)']|[4, 'D5']}
<POP 23242-23244 StackAdj> Δ+8 {[-16-]}
<MI 23244 MOVE.L (A7)+,(A6-0x28)> Δ+4 {[-12-]}
<MI 23248 MOVE.L (A7)+,(A6-0x24)> Δ+4 {[-8-]}
<MI 2324c MOVE.L (A6-0x24),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x24)']}
<MI 23250 MOVE.L (A6-0x28),D6> {[-8-]|[4, '(A6-0x24)']}
<MI 23254 CMP.L (A7),D6> {[-8-]|[4, '(A6-0x24)']}
<MI 23256 BGT 0x2326c> {[-8-]|[4, '(A6-0x24)']}
<POP 23258-2326c Naked> Σ-12 ↓
<MI 23258 MOVE.L (A7),D0> {[-12-]}
<POP 0x2325a LimitCheck -0x7fffffff ≤ D6> {[-12-]}
<MI 2325a CMPI.L #0x80000001,D6>
<MI 23260 BLT 0x2326a>
<POP 0x23262 LimitCheck D0 ≤ 0x7fffffff> {[-12-]}
<MI 23262 CMPI.L #0x7fffffff,D0>
<MI 23268 BLE 0x2326c>
<MI 2326a TRAP #15>
<POP 2326c-23270 Naked> Σ-12 ↓ →0x232a2 ←0x23238 ←0x23270
<MI 2326c CMP.L (A7),D6> {[-12-]}
<MI 2326e BGT 0x232a2> {[-12-]}
<POP 23270-232a2 Naked> Σ-12 ↓ →0x2326c
<MI 23270 MOVE.L D7,D0> {[-12-]}
<MI 23272 SUBQ.L #0x1,D0> {[-12-]}
<POP 0x23274 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-12-]}
<MI 2327e MOVEA.L (A7+0x8),A0> {[-12-]}
<MI 23282 MOVE.L D6,D1> {[-12-]}
<MI 23284 SUBQ.L #0x1,D1> {[-12-]}
<POP 0x23286 LimitCheck 0x0 ≤ D1 ≤ 0xfff> {[-12-]}
<MI 23290 LEA.L 0x25510,A1> {[-12-]}
<MI 23296 MOVE.B (A1+D1.L+#0x8),(A0+D0.L+#0x2)> {[-12-]}
<MI 2329c ADDQ.L #0x1,D7> {[-12-]}
<MI 2329e ADDQ.L #0x1,D6> {[-12-]}
<MI 232a0 BVC 0x2326c> {[-12-]}
<POP 232a2-232aa Naked> Σ-12 Δ+4 ↓ →0x232c4 ←0x2326c
<POP 232a2-232a4 StackAdj> Δ+4 {[-8-]}
<MI 232a4 CMP.L (A6-0x2c),D5> {[-8-]}
<MI 232a8 BEQ 0x232c4> {[-8-]}
<POP 232aa-232c4 Naked> Σ-8 ↓
<MI 232aa MOVE.L D7,D0> {[-8-]}
<MI 232ac SUBQ.L #0x1,D0> {[-8-]}
<POP 0x232ae LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-8-]}
<MI 232b8 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 232bc MOVE.B #0x2c,(A0+D0.L+#0x2)> {[-8-]}
<MI 232c2 ADDQ.L #0x1,D7> {[-8-]}
<POP 232c4-232ca Naked> Σ-8 ↓ →0x23232 ←0x232a2
<MI 232c4 ADDQ.L #0x1,D5> {[-8-]}
<MI 232c6 BVC 0x23232> {[-8-]}
<POP 232ca-2337a Naked> Σ-8 Δ+8 ↓ →0x23380 ←0x23232
<POP 232ca-232cc StackAdj> Δ+4 {[-4-]}
<MI 232cc MOVEA.L (A7),A0> {[-4-]}
<MI 232ce MOVE.L D7,D0> {[-4-]}
<MI 232d0 SUBQ.L #0x1,D0> {[-4-]}
<POP 0x232d2 LimitCheck -0x8000 ≤ D0 ≤ 0x7fff> {[-4-]}
<MI 232e0 MOVE.W D0,(A0)> {[-4-]}
<POP 232e2-232e4 StackAdj> Δ+2 {[-2-]}
<POP 232e4-232e5 StackAdj> Δ+2 {}
<Blob 0x232e5 [2] @> Δ-2 {[«2""»]}
<Blob 0x232e8 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x232ec [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 232f0-232f2 StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x232f2 6> {[«2""»]|[«2""»]|[«2""»]|[$$STATUS]}
<MI 23300 MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 23304-23306 StackAdj> Δ+2 {[«2""»]|[«2""»]}
<MI 23306 MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<Const 0x23308 0x0.4> Δ-4 {[4, '(A6+0x8)']|[##0]}
<MI 2330c MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']}
<Pointer.fp 0x23310 <LVAR -0x010 @ 4(r)>> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-16]}
<Pointer.fp 0x23314 <LVAR -0x013 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-16]|[@@-19]}
<Call 0x23318 0x24c52> {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-16]|[@@-19]}
<POP 2331e-23320 StackAdj> Δ+20 {}
<Pointer.fp 0x23320 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x23324 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 2332a-2332c StackAdj> Δ+2 {[-2-]}
<POP 2332c-2332d StackAdj> Δ+2 {}
<Blob 0x2332d [2] @> Δ-2 {[«2""»]}
<Blob 0x23330 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x23334 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 23338-2333a StackAdj> Δ-4 {[«2""»]|[«2""»]|[«2""»]|[-4-]}
<Lit 0x2333a 6> {[«2""»]|[«2""»]|[«2""»]|[$$RESULT]}
<MI 23348 MOVE.L (A7)+,(A6-0x8)> Δ+4 {[«2""»]|[«2""»]|[«2""»]}
<POP 2334c-2334e StackAdj> Δ+2 {[«2""»]|[«2""»]}
<MI 2334e MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<Const 0x23350 0x0.4> Δ-4 {[4, '(A6+0x8)']|[##0]}
<MI 23354 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']}
<Pointer.fp 0x23358 <LVAR -0x00c @ 4(r)>> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-12]}
<Pointer.fp 0x2335c <LVAR -0x012 @ 1(r)>> Δ-4 {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-12]|[@@-18]}
<Call 0x23360 0x24c52> {[4, '(A6+0x8)']|[##0]|[4, '(A6-0x8)']|[@@-12]|[@@-18]}
<POP 23366-23368 StackAdj> Δ+20 {}
<Pointer.fp 0x23368 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x2336c 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 23372-23374 StackAdj> Δ+4 {}
<MI 23374 TST.B (A6-0x13)> {}
<MI 23378 BNE 0x23380> {}
<POP 2337a-23380 Naked> Σ0 ↓ →0x23386
<MI 2337a TST.B (A6-0x12)> {}
<MI 2337e BEQ 0x23386> {}
<POP 23380-23386 Naked> Σ0 →0x2338a ←0x232ca
<MI 23380 CLR.B (A6-0x4)> {}
<MI 23384 BRA 0x2338a> {}
<POP 23386-2338a Naked> Σ0 ↓ ←0x2337a
<MI 23386 MOVE.B #0x01,(A6-0x4)> {}
<POP 2338a-233b0 Naked> Σ0 ↓ →0x233d0 ←0x23380
<MI 2338a MOVE.L (A6-0x3c),-(A7)> Δ-4 {[4, '(A6-0x3c)']}
<MI 2338c MOVE.L (A6-0x30),-(A7)> Δ-4 {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
<MI 23390 MOVE.B (A6-0x4),D0> {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
<MI 23394 EXTB.W D0> {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
<POP 0x23396 LimitCheck 0x0 ≤ D0 ≤ 0x2> {[4, '(A6-0x3c)']|[4, '(A6-0x30)']}
<MI 2339a MOVE.B D0,-(A7)> Δ-2 {[4, '(A6-0x3c)']|[4, '(A6-0x30)']|[2, 'D0']}
<Pointer.fp 0x2339c <LVAR -0x014 @ 1(r)>> Δ-4 {[4, '(A6-0x3c)']|[4, '(A6-0x30)']|[2, 'D0']|[@@-20]}
<Call 0x233a0 0x103b0> {[4, '(A6-0x3c)']|[4, '(A6-0x30)']|[2, 'D0']|[@@-20]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 233a6-233aa StackAdj> Δ+14 {}
<MI 233aa TST.B (A6-0x13)> {}
<MI 233ae BEQ 0x233d0> {}
<POP 233b0-233d0 Naked> Σ0 ↓
<MI 233b0 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']}
<POP 233b4-233b6 StackAdj> Δ-4 {[4, '(A6-0x10)']|[-4-]}
<MI 233b6 MOVE.B (A6-0x14),D0> {[4, '(A6-0x10)']|[-4-]}
<MI 233ba EXTB.W D0> {[4, '(A6-0x10)']|[-4-]}
<POP 0x233bc LimitCheck 0x0 ≤ D0 ≤ 0xe> {[4, '(A6-0x10)']|[-4-]}
<MI 233c0 MOVE.B D0,-(A7)> Δ-2 {[4, '(A6-0x10)']|[-4-]|[2, 'D0']}
<Call 0x233c2 0x103c0> {[4, '(A6-0x10)']|[-4-]|[2, 'D0']}
ExpErrMsg(a: Byte) : String
<POP 233c8-233ca StackAdj> Δ+2 {[4, '(A6-0x10)']|[-4-]}
<Call 0x233ca 0x22d18> {[4, '(A6-0x10)']|[-4-]}
<POP 233ce-233d0 StackAdj> Δ+8 {}
<POP 233d0-233d6 Naked> Σ0 ↓ →0x233e8 ←0x2338a
<MI 233d0 TST.B (A6-0x12)> {}
<MI 233d4 BEQ 0x233e8> {}
<POP 233d6-233e8 Naked> Σ0 ↓
<MI 233d6 MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']}
<POP 233da-233dc StackAdj> Δ-4 {[4, '(A6-0xc)']|[-4-]}
<Call 0x233dc 0x103c8> {[4, '(A6-0xc)']|[-4-]}
FSCALL_103c8
<Call 0x233e2 0x22d18> {[4, '(A6-0xc)']|[-4-]}
<POP 233e6-233e8 StackAdj> Δ+8 {}
<POP 233e8-233f0 Epilogue> Σ0 ←0x2318e ←0x231e2 ←0x233d0
@ 233f0
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(rw)>
<LVAR -0x008 @ 4(rw)>
<POP 233f0-23468 Body>
<POP 233f0-23406 Prologue> Σ0 ↓
<POP 23406-2340e RegCacheLoad> Σ0 ↓
<POP 2340e-23442 Naked> Σ0 ↓ →0x23448
<POP 2340e-23410 StackAdj> Δ-4 {[-4-]}
<MI 23410 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23414 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23418 0x2271a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 2341c-2341e StackAdj> Δ+8 {[-4-]}
<MI 2341e MOVE.L (A7),(A6-0x8)> {[-4-]}
<MI 23420 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23424 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x23428 0x2271a> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 2342c-2342e StackAdj> Δ+8 {[-4-]}
<MI 2342e MOVE.L (A7),(A6-0x4)> {[-4-]}
<POP 23430-23432 StackAdj> Δ+2 {[-2-]}
<MI 23432 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x8)']}
<MI 23434 MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
<Call 0x23436 0x102c8> {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
StringEqual(a, b : String) : Byte
<POP 2343c-2343e StackAdj> Δ+8 {[-2-]}
<MI 2343e TST.B (A7)+> Δ+2 {}
<MI 23440 BEQ 0x23448> {}
<POP 23442-23448 Naked> Σ0 →0x2344c
<Call 0x23442 0x221da> {}
<MI 23446 BRA 0x2344c> {}
<POP 23448-2344c Naked> Σ0 ↓ ←0x2340e
<Call 0x23448 0x22220> {}
<POP 2344c-23460 Naked> Σ0 ↓ ←0x23442
<Pointer.fp 0x2344c <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x2344e 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 23454-23456 StackAdj> Δ+4 {}
<Pointer.fp 0x23456 <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x23458 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 2345e-23460 StackAdj> Δ+4 {}
<POP 23460-23468 Epilogue> Σ0
@ 23468
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 4(rw)>
<LVAR -0x008 @ 4(rw)>
<POP 23468-234e0 Body>
<POP 23468-2347e Prologue> Σ0 ↓
<POP 2347e-23486 RegCacheLoad> Σ0 ↓
<POP 23486-234ba Naked> Σ0 ↓ →0x234c0
<POP 23486-23488 StackAdj> Δ-4 {[-4-]}
<MI 23488 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x2348c 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23490 0x2271a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 23494-23496 StackAdj> Δ+8 {[-4-]}
<MI 23496 MOVE.L (A7),(A6-0x8)> {[-4-]}
<MI 23498 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x2349c 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x234a0 0x2271a> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 234a4-234a6 StackAdj> Δ+8 {[-4-]}
<MI 234a6 MOVE.L (A7),(A6-0x4)> {[-4-]}
<POP 234a8-234aa StackAdj> Δ+2 {[-2-]}
<MI 234aa MOVE.L (A6-0x8),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x8)']}
<MI 234ac MOVE.L (A6-0x4),-(A7)> Δ-4 {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
<Call 0x234ae 0x102c8> {[-2-]|[4, '(A6-0x8)']|[4, '(A6-0x4)']}
StringEqual(a, b : String) : Byte
<POP 234b4-234b6 StackAdj> Δ+8 {[-2-]}
<MI 234b6 TST.B (A7)+> Δ+2 {}
<MI 234b8 BNE 0x234c0> {}
<POP 234ba-234c0 Naked> Σ0 →0x234c4
<Call 0x234ba 0x221da> {}
<MI 234be BRA 0x234c4> {}
<POP 234c0-234c4 Naked> Σ0 ↓ ←0x23486
<Call 0x234c0 0x22220> {}
<POP 234c4-234d8 Naked> Σ0 ↓ ←0x234ba
<Pointer.fp 0x234c4 <LVAR -0x004 @ 4(rw)>> Δ-4 {[@@-4]}
<Call 0x234c6 0x102bc> {[@@-4]}
FreeString(VAR a : String)
<POP 234cc-234ce StackAdj> Δ+4 {}
<Pointer.fp 0x234ce <LVAR -0x008 @ 4(rw)>> Δ-4 {[@@-8]}
<Call 0x234d0 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 234d6-234d8 StackAdj> Δ+4 {}
<POP 234d8-234e0 Epilogue> Σ0
@ 234e0
<LVAR 0x008 4(r)>
<POP 234e0-2350c Body>
<POP 234e0-234f2 Prologue> Σ0 ↓
<POP 234f2-23508 Naked> Σ0 ↓
<POP 234f2-234f4 StackAdj> Δ-4 {[-4-]}
<MI 234f4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x234f8 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x234fc 0x2271a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 23500-23502 StackAdj> Δ+8 {[-4-]}
<Call 0x23502 0x22512> {[-4-]}
<POP 23506-23508 StackAdj> Δ+4 {}
<POP 23508-2350c Epilogue> Σ0
@ 2350c
<LVAR 0x008 4(r)>
<LVAR -0x014 @ 4(rw)>
<POP 2350c-2360c Body>
<POP 2350c-23522 Prologue> Σ0 ↓
<POP 23522-2352c RegCacheLoad> Σ0 ↓
<POP 2352c-2358a Naked> Σ0 ↓ →0x235ba
<POP 2352c-2352e StackAdj> Δ-4 {[-4-]}
<MI 2352e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23530 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23534 0x2271a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 23538-2353a StackAdj> Δ+8 {[-4-]}
<MI 2353a MOVE.L (A7),(A6-0x14)> {[-4-]}
<MI 2353c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x2353e 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x23542 0x2271a> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 23546-23548 StackAdj> Δ+8 {[-4-]}
<MI 23548 MOVEA.L (A7)+,A4> Δ+4 {}
<POP 2354a-2354e StackAdj> Δ-12 {[-12-]}
<MI 2354e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<Const 0x23550 0x3.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##3]}
<Call 0x23554 0x2274c> {[-12-]|[4, '(A6+0x8)']|[##3]}
<POP 23558-2355a StackAdj> Δ+8 {[-12-]}
<Call 0x2355a 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 23560-23562 StackAdj> Δ+8 {[-4-]}
<MI 23562 MOVE.L (A7),D6> {[-4-]}
<POP 23564-23566 StackAdj> Δ-8 {[-12-]}
<MI 23566 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<Const 0x23568 0x4.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##4]}
<Call 0x2356c 0x2274c> {[-12-]|[4, '(A6+0x8)']|[##4]}
<POP 23570-23572 StackAdj> Δ+8 {[-12-]}
<Call 0x23572 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 23578-2357a StackAdj> Δ+8 {[-4-]}
<MI 2357a MOVE.L (A7)+,D5> Δ+4 {}
<MI 2357c MOVE.L D6,D0> {}
<MI 2357e ADD.L D5,D0> {}
<MI 23580 SUBQ.L #0x1,D0> {}
<MI 23582 MOVE.W (A4),D1> {}
<MI 23584 EXTW.L D1> {}
<MI 23586 CMP.L D1,D0> {}
<MI 23588 BLE 0x235ba> {}
<POP 2358a-235ba Naked> Σ0 ↓
<Blob 0x2358a [32] @> Δ-32 {[«32""»]}
<POP 2359c-2359e StackAdj> Δ-4 {[«32""»]|[-4-]}
<Lit 0x2359e 31> {[«32""»]|[$$Offset/Length error in [INSERT]]}
<Call 0x235b2 0x219f2> {[«32""»]|[$$Offset/Length error in [INSERT]]}
<POP 235b6-235ba StackAdj> Δ+36 {}
<POP 235ba-235c6 Naked> Σ0 Δ-8 ↓ ←0x2352c
<MI 235ba MOVEA.L (A6-0x14),A0> {}
<MI 235bc MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 235be MOVE.W (A0),D0> {[4, 'A0']}
<MI 235c0 EXTW.L D0> {[4, 'A0']}
<MI 235c2 MOVE.L D0,-(A7)> Δ-4 {[4, 'A0']|[4, 'D0']}
<MI 235c4 MOVEQ.L #0x01,D7> {[4, 'A0']|[4, 'D0']}
<POP 235c6-235ca Naked> Σ-8 ↓ →0x235f0 ←0x235ca
<MI 235c6 CMP.L (A7),D7> {[-8-]}
<MI 235c8 BGT 0x235f0> {[-8-]}
<POP 235ca-235f0 Naked> Σ-8 ↓ →0x235c6
<MI 235ca MOVE.L D6,D0> {[-8-]}
<MI 235cc ADD.L D7,D0> {[-8-]}
<MI 235ce SUBQ.L #0x1,D0> {[-8-]}
<MI 235d0 SUBQ.L #0x1,D0> {[-8-]}
<POP 0x235d2 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-8-]}
<MI 235d8 MOVE.L D7,D1> {[-8-]}
<MI 235da SUBQ.L #0x1,D1> {[-8-]}
<POP 0x235dc LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 235e2 MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 235e6 MOVE.B (A0+D1.L+#0x2),(A4+D0.L+#0x2)> {[-8-]}
<MI 235ec ADDQ.L #0x1,D7> {[-8-]}
<MI 235ee BVC 0x235c6> {[-8-]}
<POP 235f0-23604 Naked> Σ-8 Δ+8 ↓ ←0x235c6
<POP 235f0-235f2 StackAdj> Δ+4 {[-4-]}
<MI 235f2 MOVE.L A4,(A7)> {[4, 'A4']}
<Call 0x235f4 0x227bc> {[4, 'A4']}
<POP 235f8-235fa StackAdj> Δ+4 {}
<Pointer.fp 0x235fa <LVAR -0x014 @ 4(rw)>> Δ-4 {[@@-20]}
<Call 0x235fc 0x102bc> {[@@-20]}
FreeString(VAR a : String)
<POP 23602-23604 StackAdj> Δ+4 {}
<POP 23604-2360c Epilogue> Σ0
@ 2360c
<LVAR 0x008 4(r)>
<LVAR -0x010 @ 4(r)>
<LVAR -0x014 @ 4(rw)>
<POP 2360c-236f2 Body>
<POP 2360c-23622 Prologue> Σ0 ↓
<POP 23622-23630 RegCacheLoad> Σ0 ↓
<POP 23630-23688 Naked> Σ0 ↓ →0x2368e
<POP 23630-23632 StackAdj> Δ-4 {[-4-]}
<MI 23632 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23634 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23638 0x2271a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 2363c-2363e StackAdj> Δ+8 {[-4-]}
<MI 2363e MOVE.L (A7)+,(A6-0x14)> Δ+4 {}
<Pointer.fp 0x23640 <LVAR -0x010 @ 4(r)>> Δ-4 {[@@-16]}
<Call 0x23642 0x102b8> {[@@-16]}
NewString(VAR a : String)
<POP 23648-2364a StackAdj> Δ-8 {[@@-16]|[-8-]}
<MI 2364a MOVE.L (A6+0x8),-(A7)> Δ-4 {[@@-16]|[-8-]|[4, '(A6+0x8)']}
<Const 0x2364c 0x2.4> Δ-4 {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##2]}
<Call 0x23650 0x2274c> {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##2]}
<POP 23654-23656 StackAdj> Δ+8 {[@@-16]|[-8-]}
<Call 0x23656 0x10350> {[@@-16]|[-8-]}
Quad2Long(a : Quad) : Long
<POP 2365c-2365e StackAdj> Δ+8 {[@@-16]}
<MI 2365e MOVE.L (A7),D5> {[@@-16]}
<POP 23660-23662 StackAdj> Δ-8 {[@@-16]|[-8-]}
<MI 23662 MOVE.L (A6+0x8),-(A7)> Δ-4 {[@@-16]|[-8-]|[4, '(A6+0x8)']}
<Const 0x23664 0x3.4> Δ-4 {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##3]}
<Call 0x23668 0x2274c> {[@@-16]|[-8-]|[4, '(A6+0x8)']|[##3]}
<POP 2366c-2366e StackAdj> Δ+8 {[@@-16]|[-8-]}
<Call 0x2366e 0x10350> {[@@-16]|[-8-]}
Quad2Long(a : Quad) : Long
<POP 23674-23676 StackAdj> Δ+8 {[@@-16]}
<MI 23676 MOVE.L (A7)+,D6> Δ+4 {}
<MI 23678 MOVEA.L (A6-0x14),A0> {}
<MI 2367a MOVE.L D5,D0> {}
<MI 2367c ADD.L D6,D0> {}
<MI 2367e SUBQ.L #0x1,D0> {}
<MI 23680 MOVE.W (A0),D1> {}
<MI 23682 EXTW.L D1> {}
<MI 23684 CMP.L D1,D0> {}
<MI 23686 BLE 0x2368e> {}
<POP 23688-2368e Naked> Σ0 ↓
<MI 23688 ADDQ.L #0x1,D1> {}
<MI 2368a SUB.L D5,D1> {}
<MI 2368c MOVE.L D1,D6> {}
<POP 2368e-23692 Naked> Σ0 Δ-4 ↓ ←0x23630
<MI 2368e MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']}
<MI 23690 MOVEQ.L #0x01,D7> {[4, 'D6']}
<POP 23692-23696 Naked> Σ-4 ↓ →0x236bc ←0x23696
<MI 23692 CMP.L (A7),D7> {[-4-]}
<MI 23694 BGT 0x236bc> {[-4-]}
<POP 23696-236bc Naked> Σ-4 ↓ →0x23692
<MI 23696 MOVEA.L (A6-0x10),A0> {[-4-]}
<MI 23698 MOVE.L D7,D0> {[-4-]}
<MI 2369a SUBQ.L #0x1,D0> {[-4-]}
<POP 0x2369c LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-4-]}
<MI 236a2 MOVEA.L (A6-0x14),A1> {[-4-]}
<MI 236a4 MOVE.L D7,D1> {[-4-]}
<MI 236a6 ADD.L D5,D1> {[-4-]}
<MI 236a8 SUBQ.L #0x1,D1> {[-4-]}
<MI 236aa SUBQ.L #0x1,D1> {[-4-]}
<POP 0x236ac LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-4-]}
<MI 236b2 MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x2)> {[-4-]}
<MI 236b8 ADDQ.L #0x1,D7> {[-4-]}
<MI 236ba BVC 0x23692> {[-4-]}
<POP 236bc-236ea Naked> Σ-4 Δ+4 ↓ ←0x23692
<POP 236bc-236be StackAdj> Δ+4 {}
<MI 236be MOVEA.L (A6-0x10),A0> {}
<POP 0x236c0 LimitCheck -0x8000 ≤ D6 ≤ 0x7fff> {}
<MI 236d6 MOVE.W D6,(A0)> {}
<MI 236d8 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']}
<Call 0x236da 0x227bc> {[4, '(A6-0x10)']}
<POP 236de-236e0 StackAdj> Δ+4 {}
<Pointer.fp 0x236e0 <LVAR -0x014 @ 4(rw)>> Δ-4 {[@@-20]}
<Call 0x236e2 0x102bc> {[@@-20]}
FreeString(VAR a : String)
<POP 236e8-236ea StackAdj> Δ+4 {}
<POP 236ea-236f2 Epilogue> Σ0
@ 236f2
<LVAR 0x008 4(r)>
<POP 236f2-2371e Body>
<POP 236f2-23704 Prologue> Σ0 ↓
<POP 23704-2371a Naked> Σ0 ↓
<POP 23704-23706 StackAdj> Δ-8 {[-8-]}
<MI 23706 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x2370a 0x1.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2370e 0x2274c> {[-8-]|[4, '(A6+0x8)']|[##1]}
<POP 23712-23714 StackAdj> Δ+8 {[-8-]}
<Call 0x23714 0x22586> {[-8-]}
<POP 23718-2371a StackAdj> Δ+8 {}
<POP 2371a-2371e Epilogue> Σ0
@ 2371e
<LVAR 0x008 4(r)>
<POP 2371e-2376a Body>
<POP 2371e-23730 Prologue> Σ0 ↓
<POP 23730-2375c Naked> Σ0 ↓ →0x23762
<POP 23730-23734 StackAdj> Δ-10 {[-10-]}
<MI 23734 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x23738 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2373c 0x2274c> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 23740 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23744 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23748 0x2274c> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 2374c-2374e StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2374e 0x1032c> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsEqual(a, b : Quad) : Bool
<POP 23754-23758 StackAdj> Δ+16 {[-2-]}
<MI 23758 TST.B (A7)+> Δ+2 {}
<MI 2375a BEQ 0x23762> {}
<POP 2375c-23762 Naked> Σ0 →0x23766
<Call 0x2375c 0x221da> {}
<MI 23760 BRA 0x23766> {}
<POP 23762-23766 Naked> Σ0 ↓ ←0x23730
<Call 0x23762 0x22220> {}
<POP 23766-2376a Epilogue> Σ0 ←0x2375c
@ 2376a
<LVAR 0x008 4(r)>
<POP 2376a-237b6 Body>
<POP 2376a-2377c Prologue> Σ0 ↓
<POP 2377c-237a8 Naked> Σ0 ↓ →0x237ae
<POP 2377c-23780 StackAdj> Δ-10 {[-10-]}
<MI 23780 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x23784 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23788 0x2274c> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 2378c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23790 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23794 0x2274c> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23798-2379a StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2379a 0x1032c> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsEqual(a, b : Quad) : Bool
<POP 237a0-237a4 StackAdj> Δ+16 {[-2-]}
<MI 237a4 TST.B (A7)+> Δ+2 {}
<MI 237a6 BNE 0x237ae> {}
<POP 237a8-237ae Naked> Σ0 →0x237b2
<Call 0x237a8 0x221da> {}
<MI 237ac BRA 0x237b2> {}
<POP 237ae-237b2 Naked> Σ0 ↓ ←0x2377c
<Call 0x237ae 0x22220> {}
<POP 237b2-237b6 Epilogue> Σ0 ←0x237a8
@ 237b6
<LVAR 0x008 4(r)>
<POP 237b6-23802 Body>
<POP 237b6-237c8 Prologue> Σ0 ↓
<POP 237c8-237f4 Naked> Σ0 ↓ →0x237fa
<POP 237c8-237cc StackAdj> Δ-10 {[-10-]}
<MI 237cc MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x237d0 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x237d4 0x2274c> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 237d8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x237dc 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x237e0 0x2274c> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 237e4-237e6 StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x237e6 0x10328> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsSmaller(a, b : Quad) : Bool
<POP 237ec-237f0 StackAdj> Δ+16 {[-2-]}
<MI 237f0 TST.B (A7)+> Δ+2 {}
<MI 237f2 BEQ 0x237fa> {}
<POP 237f4-237fa Naked> Σ0 →0x237fe
<Call 0x237f4 0x221da> {}
<MI 237f8 BRA 0x237fe> {}
<POP 237fa-237fe Naked> Σ0 ↓ ←0x237c8
<Call 0x237fa 0x22220> {}
<POP 237fe-23802 Epilogue> Σ0 ←0x237f4
@ 23802
<LVAR 0x008 4(r)>
<POP 23802-2384e Body>
<POP 23802-23814 Prologue> Σ0 ↓
<POP 23814-23840 Naked> Σ0 ↓ →0x23846
<POP 23814-23818 StackAdj> Δ-10 {[-10-]}
<MI 23818 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x2381c 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23820 0x2274c> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 23824 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23828 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x2382c 0x2274c> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23830-23832 StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23832 0x10324> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsGreater(a, b : Quad) : Bool
<POP 23838-2383c StackAdj> Δ+16 {[-2-]}
<MI 2383c TST.B (A7)+> Δ+2 {}
<MI 2383e BEQ 0x23846> {}
<POP 23840-23846 Naked> Σ0 →0x2384a
<Call 0x23840 0x221da> {}
<MI 23844 BRA 0x2384a> {}
<POP 23846-2384a Naked> Σ0 ↓ ←0x23814
<Call 0x23846 0x22220> {}
<POP 2384a-2384e Epilogue> Σ0 ←0x23840
@ 2384e
<LVAR 0x008 4(r)>
<POP 2384e-2389a Body>
<POP 2384e-23860 Prologue> Σ0 ↓
<POP 23860-2388c Naked> Σ0 ↓ →0x23892
<POP 23860-23864 StackAdj> Δ-10 {[-10-]}
<MI 23864 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x23868 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2386c 0x2274c> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 23870 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23874 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23878 0x2274c> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 2387c-2387e StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2387e 0x10324> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsGreater(a, b : Quad) : Bool
<POP 23884-23888 StackAdj> Δ+16 {[-2-]}
<MI 23888 TST.B (A7)+> Δ+2 {}
<MI 2388a BNE 0x23892> {}
<POP 2388c-23892 Naked> Σ0 →0x23896
<Call 0x2388c 0x221da> {}
<MI 23890 BRA 0x23896> {}
<POP 23892-23896 Naked> Σ0 ↓ ←0x23860
<Call 0x23892 0x22220> {}
<POP 23896-2389a Epilogue> Σ0 ←0x2388c
@ 2389a
<LVAR 0x008 4(r)>
<POP 2389a-238e6 Body>
<POP 2389a-238ac Prologue> Σ0 ↓
<POP 238ac-238d8 Naked> Σ0 ↓ →0x238de
<POP 238ac-238b0 StackAdj> Δ-10 {[-10-]}
<MI 238b0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']}
<Const 0x238b4 0x1.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x238b8 0x2274c> {[-10-]|[4, '(A6+0x8)']|[##1]}
<MI 238bc MOVE.L (A6+0x8),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x238c0 0x2.4> Δ-4 {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x238c4 0x2274c> {[-10-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 238c8-238ca StackAdj> Δ+8 {[-10-]|[4, '(A6+0x8)']|[##1]}
<Call 0x238ca 0x10328> {[-10-]|[4, '(A6+0x8)']|[##1]}
IsSmaller(a, b : Quad) : Bool
<POP 238d0-238d4 StackAdj> Δ+16 {[-2-]}
<MI 238d4 TST.B (A7)+> Δ+2 {}
<MI 238d6 BNE 0x238de> {}
<POP 238d8-238de Naked> Σ0 →0x238e2
<Call 0x238d8 0x221da> {}
<MI 238dc BRA 0x238e2> {}
<POP 238de-238e2 Naked> Σ0 ↓ ←0x238ac
<Call 0x238de 0x22220> {}
<POP 238e2-238e6 Epilogue> Σ0 ←0x238d8
@ 238e6
<LVAR 0x008 4(r)>
<POP 238e6-23930 Body>
<POP 238e6-238fc Prologue> Σ0 ↓
<POP 238fc-238fe RegCacheLoad> Σ0 ↓
<POP 238fe-23928 Naked> Σ0 ↓
<POP 238fe-23900 StackAdj> Δ-16 {[-16-]}
<MI 23900 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23904 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23908 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 2390c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23910 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23914 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23918-2391a StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2391a 0x10314> {[-16-]|[4, '(A6+0x8)']|[##1]}
Add(a, b : Quad) : Quad
<POP 23920-23922 StackAdj> Δ+16 {[-8-]}
<Call 0x23922 0x22844> {[-8-]}
<POP 23926-23928 StackAdj> Δ+8 {}
<POP 23928-23930 Epilogue> Σ0
@ 23930
<LVAR 0x008 4(r)>
<POP 23930-2397a Body>
<POP 23930-23946 Prologue> Σ0 ↓
<POP 23946-23948 RegCacheLoad> Σ0 ↓
<POP 23948-23972 Naked> Σ0 ↓
<POP 23948-2394a StackAdj> Δ-16 {[-16-]}
<MI 2394a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x2394e 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23952 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23956 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x2395a 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x2395e 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23962-23964 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23964 0x10318> {[-16-]|[4, '(A6+0x8)']|[##1]}
Subtract(a, b : Quad) : Quad
<POP 2396a-2396c StackAdj> Δ+16 {[-8-]}
<Call 0x2396c 0x22844> {[-8-]}
<POP 23970-23972 StackAdj> Δ+8 {}
<POP 23972-2397a Epilogue> Σ0
@ 2397a
<LVAR 0x008 4(r)>
<POP 2397a-239c4 Body>
<POP 2397a-23990 Prologue> Σ0 ↓
<POP 23990-23992 RegCacheLoad> Σ0 ↓
<POP 23992-239bc Naked> Σ0 ↓
<POP 23992-23994 StackAdj> Δ-16 {[-16-]}
<MI 23994 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23998 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x2399c 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 239a0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x239a4 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x239a8 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 239ac-239ae StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x239ae 0x1031c> {[-16-]|[4, '(A6+0x8)']|[##1]}
Multiply(a, b : Quad) : Quad
<POP 239b4-239b6 StackAdj> Δ+16 {[-8-]}
<Call 0x239b6 0x22844> {[-8-]}
<POP 239ba-239bc StackAdj> Δ+8 {}
<POP 239bc-239c4 Epilogue> Σ0
@ 239c4
<LVAR 0x008 4(r)>
<POP 239c4-23a0e Body>
<POP 239c4-239da Prologue> Σ0 ↓
<POP 239da-239dc RegCacheLoad> Σ0 ↓
<POP 239dc-23a06 Naked> Σ0 ↓
<POP 239dc-239de StackAdj> Δ-16 {[-16-]}
<MI 239de MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x239e2 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x239e6 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 239ea MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x239ee 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x239f2 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 239f6-239f8 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x239f8 0x10320> {[-16-]|[4, '(A6+0x8)']|[##1]}
Divide(a, b : Quad) : Quad
<POP 239fe-23a00 StackAdj> Δ+16 {[-8-]}
<Call 0x23a00 0x22844> {[-8-]}
<POP 23a04-23a06 StackAdj> Δ+8 {}
<POP 23a06-23a0e Epilogue> Σ0
@ 23a0e
<LVAR 0x008 4(r)>
<POP 23a0e-23a58 Body>
<POP 23a0e-23a24 Prologue> Σ0 ↓
<POP 23a24-23a26 RegCacheLoad> Σ0 ↓
<POP 23a26-23a50 Naked> Σ0 ↓
<POP 23a26-23a28 StackAdj> Δ-16 {[-16-]}
<MI 23a28 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23a2c 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23a30 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23a34 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23a38 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23a3c 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23a40-23a42 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23a42 0x10358> {[-16-]|[4, '(A6+0x8)']|[##1]}
Modulus(a, b : Quad) : Quad
<POP 23a48-23a4a StackAdj> Δ+16 {[-8-]}
<Call 0x23a4a 0x22844> {[-8-]}
<POP 23a4e-23a50 StackAdj> Δ+8 {}
<POP 23a50-23a58 Epilogue> Σ0
@ 23a58
<LVAR 0x008 4(r)>
<POP 23a58-23aa2 Body>
<POP 23a58-23a6e Prologue> Σ0 ↓
<POP 23a6e-23a70 RegCacheLoad> Σ0 ↓
<POP 23a70-23a9a Naked> Σ0 ↓
<POP 23a70-23a72 StackAdj> Δ-16 {[-16-]}
<MI 23a72 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23a76 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23a7a 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23a7e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23a82 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23a86 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23a8a-23a8c StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23a8c 0x10334> {[-16-]|[4, '(A6+0x8)']|[##1]}
BitOr(a, b : Quad) : Quad
<POP 23a92-23a94 StackAdj> Δ+16 {[-8-]}
<Call 0x23a94 0x22844> {[-8-]}
<POP 23a98-23a9a StackAdj> Δ+8 {}
<POP 23a9a-23aa2 Epilogue> Σ0
@ 23aa2
<LVAR 0x008 4(r)>
<POP 23aa2-23aec Body>
<POP 23aa2-23ab8 Prologue> Σ0 ↓
<POP 23ab8-23aba RegCacheLoad> Σ0 ↓
<POP 23aba-23ae4 Naked> Σ0 ↓
<POP 23aba-23abc StackAdj> Δ-16 {[-16-]}
<MI 23abc MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23ac0 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23ac4 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23ac8 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23acc 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23ad0 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23ad4-23ad6 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23ad6 0x10330> {[-16-]|[4, '(A6+0x8)']|[##1]}
BitAnd(a, b : Quad) : Quad
<POP 23adc-23ade StackAdj> Δ+16 {[-8-]}
<Call 0x23ade 0x22844> {[-8-]}
<POP 23ae2-23ae4 StackAdj> Δ+8 {}
<POP 23ae4-23aec Epilogue> Σ0
@ 23aec
<LVAR 0x008 4(r)>
<POP 23aec-23b36 Body>
<POP 23aec-23b02 Prologue> Σ0 ↓
<POP 23b02-23b04 RegCacheLoad> Σ0 ↓
<POP 23b04-23b2e Naked> Σ0 ↓
<POP 23b04-23b06 StackAdj> Δ-16 {[-16-]}
<MI 23b06 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23b0a 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23b0e 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23b12 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']}
<Const 0x23b16 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<Call 0x23b1a 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]|[4, '(A6+0x8)']|[##2]}
<POP 23b1e-23b20 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23b20 0x10340> {[-16-]|[4, '(A6+0x8)']|[##1]}
BitXor(a, b : Quad) : Quad
<POP 23b26-23b28 StackAdj> Δ+16 {[-8-]}
<Call 0x23b28 0x22844> {[-8-]}
<POP 23b2c-23b2e StackAdj> Δ+8 {}
<POP 23b2e-23b36 Epilogue> Σ0
@ 23b36
<LVAR 0x008 4(r)>
<POP 23b36-23b7a Body>
<POP 23b36-23b48 Prologue> Σ0 ↓
<POP 23b48-23b76 Naked> Σ0 ↓
<POP 23b48-23b4c StackAdj> Δ-16 {[-16-]}
<MI 23b4c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23b50 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23b54 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23b58 MOVE.L (A6+0x8),(A7)> {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']}
<Const 0x23b5c 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
<Call 0x23b60 0x22788> {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
<POP 23b64-23b66 StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']}
<Call 0x23b66 0x10344> {[-16-]|[4, '(A6+0x8)']}
BitShift(a : Quad ; howmuch : integer) : Quad
<POP 23b6c-23b70 StackAdj> Δ+12 {[-8-]}
<Call 0x23b70 0x22844> {[-8-]}
<POP 23b74-23b76 StackAdj> Δ+8 {}
<POP 23b76-23b7a Epilogue> Σ0
@ 23b7a
<LVAR 0x008 4(r)>
<POP 23b7a-23bc0 Body>
<POP 23b7a-23b8c Prologue> Σ0 ↓
<POP 23b8c-23bbc Naked> Σ0 ↓
<POP 23b8c-23b90 StackAdj> Δ-16 {[-16-]}
<MI 23b90 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23b94 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23b98 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]}
<MI 23b9c MOVE.L (A6+0x8),(A7)> {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']}
<Const 0x23ba0 0x2.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
<Call 0x23ba4 0x22788> {[-16-]|[4, '(A6+0x8)']|[4, '(A6+0x8)']|[##2]}
<POP 23ba8-23baa StackAdj> Δ+8 {[-16-]|[4, '(A6+0x8)']}
<MI 23baa NEG.L (A7)> {[-16-]|[4, '(A6+0x8)']}
<Call 0x23bac 0x10344> {[-16-]|[4, '(A6+0x8)']}
BitShift(a : Quad ; howmuch : integer) : Quad
<POP 23bb2-23bb6 StackAdj> Δ+12 {[-8-]}
<Call 0x23bb6 0x22844> {[-8-]}
<POP 23bba-23bbc StackAdj> Δ+8 {}
<POP 23bbc-23bc0 Epilogue> Σ0
@ 23bc0
<LVAR 0x008 4(r)>
<POP 23bc0-23bf6 Body>
<POP 23bc0-23bd2 Prologue> Σ0 ↓
<POP 23bd2-23bf2 Naked> Σ0 ↓
<POP 23bd2-23bd6 StackAdj> Δ-16 {[-16-]}
<MI 23bd6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-16-]|[4, '(A6+0x8)']}
<Const 0x23bda 0x1.4> Δ-4 {[-16-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23bde 0x2274c> {[-16-]|[4, '(A6+0x8)']|[##1]}
<POP 23be2-23be4 StackAdj> Δ+8 {[-16-]}
<Call 0x23be4 0x10338> {[-16-]}
BitNot(a : Quad) : Quad
<POP 23bea-23bec StackAdj> Δ+8 {[-8-]}
<Call 0x23bec 0x22844> {[-8-]}
<POP 23bf0-23bf2 StackAdj> Δ+8 {}
<POP 23bf2-23bf6 Epilogue> Σ0
@ 23bf6
<LVAR 0x008 4(r)>
<LVAR -0x00c 4(rw)>
<LVAR -0x010 4(rw)>
<LVAR -0x014 4(rw)>
<LVAR -0x018 4(rw)>
<POP 23bf6-23c86 Body>
<POP 23bf6-23c0c Prologue> Σ0 ↓
<POP 23c0c-23c10 RegCacheLoad> Σ0 ↓
<POP 23c10-23c7e Naked> Σ0 ↓
<POP 23c10-23c12 StackAdj> Δ-8 {[-8-]}
<MI 23c12 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x23c14 0x1.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23c18 0x2274c> {[-8-]|[4, '(A6+0x8)']|[##1]}
<POP 23c1c-23c1e StackAdj> Δ+8 {[-8-]}
<MI 23c1e MOVE.L (A7)+,(A6-0x18)> Δ+4 {[-4-]}
<MI 23c22 MOVE.L (A7),(A6-0x14)> {[-4-]}
<POP 23c26-23c28 StackAdj> Δ-4 {[-8-]}
<MI 23c28 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x23c2a 0x2.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##2]}
<Call 0x23c2e 0x2274c> {[-8-]|[4, '(A6+0x8)']|[##2]}
<POP 23c32-23c34 StackAdj> Δ+8 {[-8-]}
<MI 23c34 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 23c38 MOVE.L (A7),(A6-0xc)> {[-4-]}
<MI 23c3c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23c3e 0x3.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##3]}
<Call 0x23c42 0x22788> {[-4-]|[4, '(A6+0x8)']|[##3]}
<POP 23c46-23c48 StackAdj> Δ+8 {[-4-]}
<MI 23c48 MOVE.L (A7),D7> {[-4-]}
<MI 23c4a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23c4c 0x4.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##4]}
<Call 0x23c50 0x22788> {[-4-]|[4, '(A6+0x8)']|[##4]}
<POP 23c54-23c56 StackAdj> Δ+8 {[-4-]}
<MI 23c56 MOVE.L (A7),D6> {[-4-]}
<POP 23c58-23c5a StackAdj> Δ-4 {[-8-]}
<MI 23c5a MOVE.L (A6-0x14),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']}
<MI 23c5e MOVE.L (A6-0x18),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']}
<MI 23c62 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']}
<MI 23c66 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<MI 23c6a MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']}
<MI 23c6c MOVE.L D6,-(A7)> Δ-4 {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
<Call 0x23c6e 0x10348> {[-8-]|[4, '(A6-0x14)']|[4, '(A6-0x18)']|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
?BitField_something_()
<POP 23c74-23c78 StackAdj> Δ+24 {[-8-]}
<Call 0x23c78 0x22844> {[-8-]}
<POP 23c7c-23c7e StackAdj> Δ+8 {}
<POP 23c7e-23c86 Epilogue> Σ0
@ 23c86
<LVAR 0x008 4(r)>
<LVAR -0x00c 4(rw)>
<LVAR -0x010 4(rw)>
<POP 23c86-23cf8 Body>
<POP 23c86-23c9c Prologue> Σ0 ↓
<POP 23c9c-23ca0 RegCacheLoad> Σ0 ↓
<POP 23ca0-23cf0 Naked> Σ0 ↓
<POP 23ca0-23ca2 StackAdj> Δ-8 {[-8-]}
<MI 23ca2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x23ca4 0x1.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23ca8 0x2274c> {[-8-]|[4, '(A6+0x8)']|[##1]}
<POP 23cac-23cae StackAdj> Δ+8 {[-8-]}
<MI 23cae MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 23cb2 MOVE.L (A7),(A6-0xc)> {[-4-]}
<MI 23cb6 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23cb8 0x2.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##2]}
<Call 0x23cbc 0x22788> {[-4-]|[4, '(A6+0x8)']|[##2]}
<POP 23cc0-23cc2 StackAdj> Δ+8 {[-4-]}
<MI 23cc2 MOVE.L (A7),D7> {[-4-]}
<MI 23cc4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23cc6 0x3.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##3]}
<Call 0x23cca 0x22788> {[-4-]|[4, '(A6+0x8)']|[##3]}
<POP 23cce-23cd0 StackAdj> Δ+8 {[-4-]}
<MI 23cd0 MOVE.L (A7),D6> {[-4-]}
<POP 23cd2-23cd4 StackAdj> Δ-4 {[-8-]}
<MI 23cd4 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']}
<MI 23cd8 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<MI 23cdc MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']}
<MI 23cde MOVE.L D6,-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
<Call 0x23ce0 0x1034c> {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D7']|[4, 'D6']}
FSCALL_1034c
<POP 23ce6-23cea StackAdj> Δ+16 {[-8-]}
<Call 0x23cea 0x22844> {[-8-]}
<POP 23cee-23cf0 StackAdj> Δ+8 {}
<POP 23cf0-23cf8 Epilogue> Σ0
@ 23cf8
<LVAR 0x008 4(r)>
<POP 23cf8-23d6a Body>
<POP 23cf8-23d0e Prologue> Σ0 ↓
<POP 23d0e-23d1c Naked> Σ0 Δ-4 ↓
<POP 23d0e-23d10 StackAdj> Δ-4 {[-4-]}
<MI 23d10 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x23d14 0x21dfe> {[-4-]|[4, '(A6+0x8)']}
<POP 23d18-23d1a StackAdj> Δ+4 {[-4-]}
<MI 23d1a MOVEQ.L #0x01,D7> {[-4-]}
<POP 23d1c-23d20 Naked> Σ-4 ↓ →0x23d46 ←0x23d20
<MI 23d1c CMP.L (A7),D7> {[-4-]}
<MI 23d1e BGT 0x23d46> {[-4-]}
<POP 23d20-23d46 Naked> Σ-4 ↓ →0x23d1c
<POP 23d20-23d22 StackAdj> Δ-4 {[-8-]}
<MI 23d22 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<MI 23d26 MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x23d28 0x2271a> {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<POP 23d2c-23d2e StackAdj> Δ+8 {[-8-]}
<Call 0x23d2e 0x103d8> {[-8-]}
WriteConsoleString(str : String)
<POP 23d34-23d36 StackAdj> Δ+2 {[-6-]}
<POP 23d36-23d37 StackAdj> Δ+2 {[-4-]}
<Const 0x23d37 0x20.2> Δ-2 {[-4-]|[#32]}
<Call 0x23d3a 0x103d0> {[-4-]|[#32]}
WriteConsoleChar(chr : char)
<POP 23d40-23d42 StackAdj> Δ+2 {[-4-]}
<MI 23d42 ADDQ.L #0x1,D7> {[-4-]}
<MI 23d44 BVC 0x23d1c> {[-4-]}
<POP 23d46-23d62 Naked> Σ-4 Δ+4 ↓ ←0x23d1c
<Const 0x23d46 0x1.4> Δ-4 {[-4-]|[##1]}
<Call 0x23d4a 0x103e4> {[-4-]|[##1]}
AskConsoleString(prompt : String) : String
<POP 23d50-23d52 StackAdj> Δ+4 {[-4-]}
<MI 23d52 MOVEA.L (A7)+,A4> Δ+4 {}
<MI 23d54 MOVE.L A4,-(A7)> Δ-4 {[4, 'A4']}
<Call 0x23d56 0x21c4a> {[4, 'A4']}
<MI 23d5a MOVE.L A4,(A7)> {[4, 'A4']}
<Call 0x23d5c 0x227bc> {[4, 'A4']}
<POP 23d60-23d62 StackAdj> Δ+4 {}
<POP 23d62-23d6a Epilogue> Σ0
@ 23d6a
<LVAR 0x008 4(r)>
<POP 23d6a-23dec Body>
<POP 23d6a-23d80 Prologue> Σ0 ↓
<POP 23d80-23d86 RegCacheLoad> Σ0 ↓
<POP 23d86-23de4 Naked> Σ0 ↓
<POP 23d86-23d88 StackAdj> Δ-4 {[-4-]}
<MI 23d88 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Const 0x23d8a 0x1.4> Δ-4 {[-4-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23d8e 0x2271a> {[-4-]|[4, '(A6+0x8)']|[##1]}
<POP 23d92-23d94 StackAdj> Δ+8 {[-4-]}
<MI 23d94 MOVEA.L (A7)+,A4> Δ+4 {}
<POP 23d96-23d98 StackAdj> Δ-12 {[-12-]}
<MI 23d98 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<Const 0x23d9a 0x2.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##2]}
<Call 0x23d9e 0x2274c> {[-12-]|[4, '(A6+0x8)']|[##2]}
<POP 23da2-23da4 StackAdj> Δ+8 {[-12-]}
<Call 0x23da4 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 23daa-23dac StackAdj> Δ+8 {[-4-]}
<MI 23dac MOVE.L (A7),D7> {[-4-]}
<POP 23dae-23db0 StackAdj> Δ-8 {[-12-]}
<MI 23db0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<Const 0x23db2 0x3.4> Δ-4 {[-12-]|[4, '(A6+0x8)']|[##3]}
<Call 0x23db6 0x2274c> {[-12-]|[4, '(A6+0x8)']|[##3]}
<POP 23dba-23dbc StackAdj> Δ+8 {[-12-]}
<Call 0x23dbc 0x10350> {[-12-]}
Quad2Long(a : Quad) : Long
<POP 23dc2-23dc4 StackAdj> Δ+8 {[-4-]}
<MI 23dc4 MOVE.L (A7),D6> {[-4-]}
<POP 23dc6-23dc8 StackAdj> Δ-8 {[-12-]}
<MI 23dc8 MOVE.L A4,-(A7)> Δ-4 {[-12-]|[4, 'A4']}
<MI 23dca MOVE.L D7,-(A7)> Δ-4 {[-12-]|[4, 'A4']|[4, 'D7']}
<Call 0x23dcc 0x10360> {[-12-]|[4, 'A4']|[4, 'D7']}
?StringToInt64()
<POP 23dd2-23dd4 StackAdj> Δ+4 {[-12-]|[4, 'A4']}
<MI 23dd4 MOVE.L D6,(A7)> {[-12-]|[4, 'D6']}
<Call 0x23dd6 0x1035c> {[-12-]|[4, 'D6']}
Quad2String(a : Quad; radix : Long ) : String
<POP 23ddc-23dde StackAdj> Δ+12 {[-4-]}
<Call 0x23dde 0x227bc> {[-4-]}
<POP 23de2-23de4 StackAdj> Δ+4 {}
<POP 23de4-23dec Epilogue> Σ0
@ 23dec
<LVAR 0x008 4(r)>
<LVAR -0x00a 2(r)>
<LVAR -0x00c 4(rw)>
<LVAR -0x010 4(rw)>
<POP 23dec-23e6c Body>
<POP 23dec-23e02 Prologue> Σ0 ↓
<POP 23e02-23e0a RegCacheLoad> Σ0 ↓
<POP 23e0a-23e22 Naked> Σ0 ↓
<POP 23e0a-23e0c StackAdj> Δ-8 {[-8-]}
<MI 23e0c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<Const 0x23e10 0x1.4> Δ-4 {[-8-]|[4, '(A6+0x8)']|[##1]}
<Call 0x23e14 0x2274c> {[-8-]|[4, '(A6+0x8)']|[##1]}
<POP 23e18-23e1a StackAdj> Δ+8 {[-8-]}
<MI 23e1a MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 23e1c MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 23e1e MOVEQ.L #0x00,D7> {}
<MI 23e20 MOVEQ.L #0x00,D6> {}
<POP 23e22-23e52 Naked> Σ0 ↓ →0x23e22 ←0x23e22
<MI 23e22 MOVE.W (A6-0xa),D0> {}
<MI 23e26 ANDI.W #0x0001,D0> {}
<MI 23e2a CLR.L D1> {}
<MI 23e2c MOVE.W D0,D1> {}
<MI 23e2e ADD.L D1,D7> {}
<POP 23e30-23e32 StackAdj> Δ-8 {[-8-]}
<MI 23e32 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']}
<MI 23e34 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<Const 0x23e36 0xffffffff.4> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[##4294967295]}
<Call 0x23e3a 0x10344> {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[##4294967295]}
BitShift(a : Quad ; howmuch : integer) : Quad
<POP 23e40-23e44 StackAdj> Δ+12 {[-8-]}
<MI 23e44 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-4-]}
<MI 23e46 MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 23e48 ADDQ.L #0x1,D6> {}
<MI 23e4a CMPI.L #0x0000003f,D6> {}
<MI 23e50 BLE 0x23e22> {}
<POP 23e52-23e64 Naked> Σ0 ↓
<POP 23e52-23e54 StackAdj> Δ-8 {[-8-]}
<MI 23e54 MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, 'D7']}
<Call 0x23e56 0x10354> {[-8-]|[4, 'D7']}
Long2Quad(a : Long) : Quad
<POP 23e5c-23e5e StackAdj> Δ+4 {[-8-]}
<Call 0x23e5e 0x22844> {[-8-]}
<POP 23e62-23e64 StackAdj> Δ+8 {}
<POP 23e64-23e6c Epilogue> Σ0
@ 23e6c
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 1(r)>
<POP 23e6c-23f30 Body>
<POP 23e6c-23e82 Prologue> Σ0 ↓
<POP 23e82-23e8c RegCacheLoad> Σ0 ↓
<POP 23e8c-23e90 Naked> Σ0 ↓ →0x23ec2
<MI 23e8c TST.B 0x2654a> {}
<MI 23e8e BNE 0x23ec2> {}
<POP 23e90-23ec2 Naked> Σ0 ↓
<Blob 0x23e90 [28] @> Δ-28 {[«28""»]}
<POP 23ea2-23ea4 StackAdj> Δ-4 {[«28""»]|[-4-]}
<Lit 0x23ea4 27> {[«28""»]|[$$REPEATing, type ^G to exit.]}
<Call 0x23eb6 0x103e0> {[«28""»]|[$$REPEATing, type ^G to exit.]}
WriteConsoleStringCrLf(str : String)
<POP 23ebc-23ec0 StackAdj> Δ+32 {}
<MI 23ec0 MOVE.B #0x01,0x2654a> {}
<POP 23ec2-23eec Naked> Σ0 ↓ →0x23f02 ←0x23e8c
<POP 23ec2-23ec4 StackAdj> Δ-6 {[-6-]}
<Call 0x23ec4 0x103f8> {[-6-]}
GetConsoleConfig() : Long
<MI 23eca MOVE.L (A7)+,D0> Δ+4 {[-2-]}
<POP 0x23ecc LimitCheck 0x0 ≤ D0 ≤ 0xffff> {[-2-]}
<MI 23ed6 MOVE.W D0,(A7)> {[2, 'D0']}
<Pointer.fp 0x23ed8 <LVAR -0x004 @ 1(r)>> Δ-4 {[2, 'D0']|[@@-4]}
<Call 0x23edc 0x10212> {[2, 'D0']|[@@-4]}
KC09_PortStatus(Port : Word; VAR b: Byte)
<POP 23ee2-23ee4 StackAdj> Δ+6 {}
<MI 23ee4 MOVE.B (A6-0x4),D0> {}
<MI 23ee8 CMP.B #0x01,D0> {}
<MI 23eea BEQ 0x23f02> {}
<POP 23eec-23f02 Naked> Σ0
<MI 23eec MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<Call 0x23ef0 0x219b0> {[4, '(A6+0x8)']}
<POP 23ef4-23ef6 StackAdj> Δ+4 {}
<POP 23ef6-23f02 Bailout> {}
<MI 23ef6 MOVEA.L (A5+0x8),A7>
<MI 23efa MOVEA.W #0x00,A6>
<MI 23efc JMP 0x25294>
<POP 23f02-23f12 Naked> Σ0 ↓ →0x23f28 ←0x23ec2
<POP 23f02-23f04 StackAdj> Δ-2 {[-2-]}
<Call 0x23f04 0x103d4> {[-2-]}
ReadChar() : Byte
<MI 23f0a MOVE.B (A7)+,D0> Δ+2 {}
<MI 23f0c CMPI.B #0x07,D0> {}
<MI 23f10 BEQ 0x23f28> {}
<POP 23f12-23f28 Naked> Σ0
<MI 23f12 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<Call 0x23f16 0x219b0> {[4, '(A6+0x8)']}
<POP 23f1a-23f1c StackAdj> Δ+4 {}
<POP 23f1c-23f28 Bailout> {}
<MI 23f1c MOVEA.L (A5+0x8),A7>
<MI 23f20 MOVEA.W #0x00,A6>
<MI 23f22 JMP 0x25294>
<POP 23f28-23f30 Epilogue> Σ0 ←0x23f02
@ 23f30
<POP 23f30-23f50 Body>
<POP 23f30-23f42 Prologue> Σ0 ↓
<POP 23f42-23f4c Naked> Σ0 ↓
<Const 0x23f42 0xc8.4> Δ-4 {[##200]}
<Call 0x23f46 0x22878> {[##200]}
<POP 23f4a-23f4c StackAdj> Δ+4 {}
<POP 23f4c-23f50 Epilogue> Σ0
@ 23f50
<LVAR 0x008 4(r)>
<LVAR -0x00c @ 4(r)>
<POP 23f50-23ffc Body>
<POP 23f50-23f66 Prologue> Σ0 ↓
<POP 23f66-23f6a RegCacheLoad> Σ0 ↓
<POP 23f6a-23f7e Naked> Σ0 Δ-4 ↓
<Pointer.fp 0x23f6a <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-12]}
<Call 0x23f6c 0x102b8> {[@@-12]}
NewString(VAR a : String)
<MI 23f72 MOVE.L (A6+0x8),-(A7)> Δ-4 {[@@-12]|[4, '(A6+0x8)']}
<Call 0x23f76 0x21dfe> {[@@-12]|[4, '(A6+0x8)']}
<POP 23f7a-23f7c StackAdj> Δ+4 {[@@-12]}
<MI 23f7c MOVEQ.L #0x01,D7> {[@@-12]}
<POP 23f7e-23f82 Naked> Σ-4 ↓ →0x23fec ←0x23fe8
<MI 23f7e CMP.L (A7),D7> {[-4-]}
<MI 23f80 BGT 0x23fec> {[-4-]}
<POP 23f82-23f94 Naked> Σ-4 ↓ →0x23fb4
<POP 23f82-23f84 StackAdj> Δ-4 {[-8-]}
<MI 23f84 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']}
<MI 23f88 MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x23f8a 0x22788> {[-8-]|[4, '(A6+0x8)']|[4, 'D7']}
<POP 23f8e-23f90 StackAdj> Δ+8 {[-8-]}
<MI 23f90 MOVE.L (A7)+,D6> Δ+4 {[-4-]}
<MI 23f92 BLT 0x23fb4> {[-4-]}
<POP 23f94-23f9c Naked> Σ-4 ↓ →0x23fb4
<MI 23f94 CMPI.L #0x000000ff,D6> {[-4-]}
<MI 23f9a BGT 0x23fb4> {[-4-]}
<POP 23f9c-23fb4 Naked> Σ-4 →0x23fe8
<MI 23f9c MOVE.L (A6-0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6-0xc)']}
<POP 0x23f9e LimitCheck 0x0 ≤ D6 ≤ 0xff> {[-4-]|[4, '(A6-0xc)']}
<MI 23fa8 MOVE.B D6,-(A7)> Δ-2 {[-4-]|[4, '(A6-0xc)']|[2, 'D6']}
<Call 0x23faa 0x102c0> {[-4-]|[4, '(A6-0xc)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 23fb0-23fb2 StackAdj> Δ+6 {[-4-]}
<MI 23fb2 BRA 0x23fe8> {[-4-]}
<POP 23fb4-23fe8 Naked> Σ-4 ↓ ←0x23f82 ←0x23f94
<Pointer.fp 0x23fb4 <LVAR -0x00c @ 4(r)>> Δ-4 {[-4-]|[@@-12]}
<Call 0x23fb6 0x102bc> {[-4-]|[@@-12]}
FreeString(VAR a : String)
<POP 23fbc-23fbe StackAdj> Δ+4 {[-4-]}
<Blob 0x23fbe [28] @> Δ-28 {[-4-]|[«28""»]}
<POP 23fca-23fcc StackAdj> Δ-4 {[-4-]|[«28""»]|[-4-]}
<Lit 0x23fcc 28> {[-4-]|[«28""»]|[$$ASCII argument out of range.]}
<Call 0x23fe0 0x219f2> {[-4-]|[«28""»]|[$$ASCII argument out of range.]}
<POP 23fe4-23fe8 StackAdj> Δ+32 {[-4-]}
<POP 23fe8-23fec Naked> Σ-4 ↓ →0x23f7e ←0x23f9c
<MI 23fe8 ADDQ.L #0x1,D7> {[-4-]}
<MI 23fea BVC 0x23f7e> {[-4-]}
<POP 23fec-23ff4 Naked> Σ-4 Δ+4 ↓ ←0x23f7e
<MI 23fec MOVE.L (A6-0xc),(A7)> {[4, '(A6-0xc)']}
<Call 0x23fee 0x227bc> {[4, '(A6-0xc)']}
<POP 23ff2-23ff4 StackAdj> Δ+4 {}
<POP 23ff4-23ffc Epilogue> Σ0
@ 23ffc
<LVAR 0x00c 1(rw)>
<LVAR 0x008 4(r)>
<POP 23ffc-240b4 Body> Δ-8
<POP 23ffc-24012 Prologue> Σ0 ↓
<POP 24012-24022 Naked> Σ0 Δ-4 ↓
<MI 24012 CLR.B (A6+0xc)> {}
<MI 24016 MOVEA.L (A6+0x8),A0> {}
<MI 2401a MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 2401c MOVEQ.L #0x00,D0> {[4, 'A0']}
<MI 2401e ADDQ.W #0x1,D0> {[4, 'A0']}
<MI 24020 MOVE.B D0,D6> {[4, 'A0']}
<POP 24022-2402a Naked> Σ-4 ↓ →0x240aa ←0x240a4
<MI 24022 CMPI.B #0x2b,D6> {[-4-]}
<MI 24026 BGT 0x240aa> {[-4-]}
<POP 2402a-24050 Naked> Σ-4 ↓ →0x240a4
<MI 2402a LEA.L 0x218de,A0> {[-4-]}
<MI 2402e MOVE.B D6,D0> {[-4-]}
<MI 24030 EXTB.W D0> {[-4-]}
<MI 24032 EXTW.L D0> {[-4-]}
<MI 24034 ROR.L #0x1,D0> {[-4-]}
<MI 24036 ADDA.W D0,A0> {[-4-]}
<MI 24038 SWAP.W D0> {[-4-]}
<MI 2403a ROL.W #0x3,D0> {[-4-]}
<MI 2403c CLR.L D1> {[-4-]}
<MI 2403e MOVE.B (A0),D1> {[-4-]}
<MI 24040 LSL.B D0,D1> {[-4-]}
<MI 24042 LSR.B #0x4,D1> {[-4-]}
<MI 24044 MOVE.L D1,D5> {[-4-]}
<MI 24046 MOVEA.L (A7),A0> {[-4-]}
<MI 24048 MOVE.W (A0),D0> {[-4-]}
<MI 2404a EXTW.L D0> {[-4-]}
<MI 2404c CMP.L D0,D5> {[-4-]}
<MI 2404e BNE 0x240a4> {[-4-]}
<POP 24050-24054 Naked> Σ-4 Δ-4 ↓
<MI 24050 MOVE.L D5,-(A7)> Δ-4 {[-4-]|[4, 'D5']}
<MI 24052 MOVEQ.L #0x01,D7> {[-4-]|[4, 'D5']}
<POP 24054-24058 Naked> Σ-8 ↓ →0x2409a ←0x24096
<MI 24054 CMP.L (A7),D7> {[-8-]}
<MI 24056 BGT 0x2409a> {[-8-]}
<POP 24058-24092 Naked> Σ-8 ↓ →0x24096
<MI 24058 MOVE.B D6,D0> {[-8-]}
<MI 2405a EXTB.W D0> {[-8-]}
<MI 2405c MULS.W #0xa,D0> {[-8-]}
<MI 24060 MOVE.L D7,D1> {[-8-]}
<MI 24062 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x24064 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 2406e MOVEA.L (A7+0x4),A0> {[-8-]}
<MI 24072 LEA.L 0x21726,A1> {[-8-]}
<MI 24076 MOVE.L D7,D2> {[-8-]}
<MI 24078 SUBQ.L #0x1,D2> {[-8-]}
<POP 0x2407a LimitCheck 0x0 ≤ D2 ≤ 0x9> {[-8-]}
<MI 24084 LEA.L (A1+D0.W),A1> {[-8-]}
<MI 24088 MOVE.B (A0+D1.L+#0x2),D0> {[-8-]}
<MI 2408c CMP.B (A1+D2.L),D0> {[-8-]}
<MI 24090 BEQ 0x24096> {[-8-]}
<POP 24092-24096 Naked> Σ-8 Δ+4 →0x240a4
<POP 24092-24094 StackAdj> Δ+4 {[-4-]}
<MI 24094 BRA 0x240a4> {[-4-]}
<POP 24096-2409a Naked> Σ-8 ↓ →0x24054 ←0x24058
<MI 24096 ADDQ.L #0x1,D7> {[-8-]}
<MI 24098 BVC 0x24054> {[-8-]}
<POP 2409a-240a4 Naked> Σ-8 Δ+8 →0x240ac ←0x24054
<POP 2409a-2409c StackAdj> Δ+4 {[-4-]}
<MI 2409c MOVE.B D6,(A6+0xc)> {[-4-]}
<POP 240a0-240a2 StackAdj> Δ+4 {}
<MI 240a2 BRA 0x240ac> {}
<POP 240a4-240aa Naked> Σ-4 ↓ →0x24022 ←0x2402a ←0x24092
<MI 240a4 ADDQ.B #0x1,D6> {[-4-]}
<MI 240a6 BVC 0x24022> {[-4-]}
<POP 240aa-240ac Naked> Σ-4 Δ+4 ↓ ←0x24022
<POP 240aa-240ac StackAdj> Δ+4 {}
<POP 240ac-240b4 Epilogue> Σ0 ←0x2409a
@ 240b4
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x002 @ 1(r)>
<LVAR -0x006 @ 4(w)>
<LVAR -0x008 @ 1(r)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x010 @ 4(rw)>
<POP 240b4-241f0 Body>
<POP 240b4-240ca Prologue> Σ0 ↓
<POP 240ca-240d8 RegCacheLoad> Σ0 ↓
<POP 240d8-24144 Naked> Σ0 ↓ →0x2418e
<POP 240d8-240da StackAdj> Δ-4 {[-4-]}
<MI 240da MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<Call 0x240de 0x102cc> {[-4-]|[4, '(A6+0xc)']}
StringDup(a : String) : String
<POP 240e4-240e6 StackAdj> Δ+4 {[-4-]}
<MI 240e6 MOVE.L (A7)+,(A6-0x10)> Δ+4 {}
<MI 240e8 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']}
<Const 0x240ea 0x2e.2> Δ-2 {[4, '(A6-0x10)']|[#46]}
<Call 0x240ee 0x102c0> {[4, '(A6-0x10)']|[#46]}
AppendChar(MOD b : String; a : char)
<POP 240f4-240f6 StackAdj> Δ+6 {}
<Blob 0x240f6 [10] 0x2652a> Δ-10 {[«10»]}
<POP 24104-24106 StackAdj> Δ-4 {[«10»]|[-4-]}
<MI 24106 MOVE.L (A6-0x10),-(A7)> Δ-4 {[«10»]|[-4-]|[4, '(A6-0x10)']}
<POP 24108-2410a StackAdj> Δ-4 {[«10»]|[-4-]|[4, '(A6-0x10)']|[-4-]}
<Lit 0x2410a> {[«10»]|[-4-]|[4, '(A6-0x10)']|[$$…]}
<Pointer.sp 0x2410a 12> Δ-4
<Const 0x2410e 0x1.2> Δ-2
<Const 0x24110 0xa.2> Δ-2
<Call 0x24114 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2411a-2411c StackAdj> Δ+8
<Call 0x2411c 0x102d0> {[«10»]|[-4-]|[4, '(A6-0x10)']|[$$…]}
StringCat2(a, b : String) : String
<POP 24122-24124 StackAdj> Δ+8 {[«10»]|[-4-]}
<MI 24124 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[«10»]}
<POP 24126-24128 StackAdj> Δ+6 {[-4-]}
<MI 24128 MOVE.L (A6-0x10),(A7)> {[4, '(A6-0x10)']}
<MI 2412a CLR.B -(A7)> Δ-2 {[4, '(A6-0x10)']|[#0]}
<Const 0x2412c 0x1.2> Δ-2 {[4, '(A6-0x10)']|[#0]|[#1]}
<Const 0x2412e 0x0.4> Δ-4 {[4, '(A6-0x10)']|[#0]|[#1]|[##0]}
<Pointer.fp 0x24132 <LVAR -0x002 @ 1(r)>> Δ-4 {[4, '(A6-0x10)']|[#0]|[#1]|[##0]|[@@-2]}
<Pointer.fp 0x24134 <LVAR -0x00c @ 4(r)>> Δ-4 {[4, '(A6-0x10)']|[#0]|[#1]|[##0]|[@@-2]|[@@-12]}
<Call 0x24136 0x10380> {[4, '(A6-0x10)']|[#0]|[#1]|[##0]|[@@-2]|[@@-12]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 2413c-24140 StackAdj> Δ+20 {}
<MI 24140 TST.B (A6-0x2)> {}
<MI 24142 BEQ 0x2418e> {}
<POP 24144-2418e Naked> Σ0 ↓
<Pointer.fp 0x24144 <LVAR -0x010 @ 4(rw)>> Δ-4 {[@@-16]}
<Call 0x24146 0x102bc> {[@@-16]}
FreeString(VAR a : String)
<MI 2414c MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<Call 0x24150 0x219b0> {[4, '(A6+0x8)']}
<POP 24154-24155 StackAdj> Δ+4 ↓ {}
<Blob 0x24155 [26] @> Δ-26 {[«26""»]}
<POP 24166-24168 StackAdj> Δ-8 {[«26""»]|[-8-]}
<Lit 0x24168 25> {[«26""»]|[-4-]|[$$Not a command or macro :_]}
<POP 24178-2417a StackAdj> Δ-4 {[«26""»]|[-4-]|[$$Not a command or macro :_]|[-4-]}
<MI 2417a MOVE.L (A6+0xc),(A7)> {[«26""»]|[-4-]|[$$Not a command or macro :_]|[4, '(A6+0xc)']}
<Call 0x2417e 0x102d0> {[«26""»]|[-4-]|[$$Not a command or macro :_]|[4, '(A6+0xc)']}
StringCat2(a, b : String) : String
<POP 24184-24186 StackAdj> Δ+8 {[«26""»]|[-4-]}
<Call 0x24186 0x219f2> {[«26""»]|[-4-]}
<POP 2418a-2418e StackAdj> Δ+30 {}
<POP 2418e-24196 Naked> Σ0 ↓ ←0x240d8
<MI 2418e MOVE.L 0x26518,(A6-0x6)> {}
<POP 24196-241ae Naked> Σ0 ↓ →0x241c2 ←0x241c2
<MI 24196 MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']}
<Pointer.fp 0x24198 <LVAR -0x010 @ 4(rw)>> Δ-4 {[4, '(A6-0xc)']|[@@-16]}
<Pointer.fp 0x2419a <LVAR -0x008 @ 1(r)>> Δ-4 {[4, '(A6-0xc)']|[@@-16]|[@@-8]}
<Call 0x2419e 0x1043c> {[4, '(A6-0xc)']|[@@-16]|[@@-8]}
FileReadLine(file : File; VAR a : String; VAR b : Byte)
<POP 241a4-241a8 StackAdj> Δ+12 {}
<MI 241a8 MOVEA.L (A6-0x10),A0> {}
<MI 241aa TST.W (A0)> {}
<MI 241ac BEQ 0x241c2> {}
<POP 241ae-241c2 Naked> Σ0 ↓
<MI 241ae MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x10)']}
<Call 0x241b0 0x21c4a> {[4, '(A6-0x10)']}
<POP 241b4-241b6 StackAdj> Δ+4 {}
<Pointer.fp 0x241b6 <LVAR -0x006 @ 4(w)>> Δ-4 {[@@-6]}
<MI 241ba MOVE.L (A6-0x10),-(A7)> Δ-4 {[@@-6]|[4, '(A6-0x10)']}
<Call 0x241bc 0x21fd0> {[@@-6]|[4, '(A6-0x10)']}
<POP 241c0-241c2 StackAdj> Δ+8 {}
<POP 241c2-241c8 Naked> Σ0 ↓ →0x24196 ←0x24196
<MI 241c2 TST.B (A6-0x8)> {}
<MI 241c6 BEQ 0x24196> {}
<POP 241c8-241e8 Naked> Σ0 ↓
<MI 241c8 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x241ca 0x1.2> Δ-2 {[#0]|[#1]}
<Const 0x241cc 0x1.4> Δ-4 {[#0]|[#1]|[##1]}
<Pointer.fp 0x241d0 <LVAR -0x002 @ 1(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-2]}
<Pointer.fp 0x241d2 <LVAR -0x00c @ 4(r)>> Δ-4 {[#0]|[#1]|[##1]|[@@-2]|[@@-12]}
<Call 0x241d4 0x1038c> {[#0]|[#1]|[##1]|[@@-2]|[@@-12]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 241da-241de StackAdj> Δ+16 {}
<Pointer.fp 0x241de <LVAR -0x010 @ 4(rw)>> Δ-4 {[@@-16]}
<Call 0x241e0 0x102bc> {[@@-16]}
FreeString(VAR a : String)
<POP 241e6-241e8 StackAdj> Δ+4 {}
<POP 241e8-241f0 Epilogue> Σ0
@ 241f0
<LVAR 0x014 1(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 241f0-24230 Body>
<POP 241f0-24206 Prologue> Σ0 ↓
<POP 24206-24228 Naked> Σ0 ↓
<MI 24206 MOVE.L (A6+0xc),D0> {}
<MI 2420a ADD.L (A6+0x8),D0> {}
<MI 2420e SUBQ.L #0x1,D0> {}
<MI 24210 SUBQ.L #0x1,D0> {}
<POP 0x24212 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {}
<MI 2421c LEA.L 0x25510,A0> {}
<MI 24222 MOVE.B (A0+D0.L+#0x8),(A6+0x14)> {}
<POP 24228-24230 Epilogue> Σ0
@ 24230
<LVAR 0x010 4(w)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x004 @ 1(r)>
<LVAR -0x008 @ 4(r)>
<POP 24230-242ac Body>
<POP 24230-24246 Prologue> Σ0 ↓
<POP 24246-2426e Naked> Σ0 ↓ →0x2429e
<POP 24246-24248 StackAdj> Δ-4 {[-4-]}
<MI 24248 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 2424c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x24250 0x2269e> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 24254-24256 StackAdj> Δ+8 {[-4-]}
<Pointer.fp 0x24256 <LVAR -0x004 @ 1(r)>> Δ-4 {[-4-]|[@@-4]}
<Pointer.fp 0x2425a <LVAR -0x008 @ 4(r)>> Δ-4 {[-4-]|[@@-4]|[@@-8]}
<Call 0x2425e 0x102ec> {[-4-]|[@@-4]|[@@-8]}
String2Long(src : String; VAR status : Bool; VAR retval : Long)
<POP 24264-24268 StackAdj> Δ+12 {}
<MI 24268 TST.B (A6-0x4)> {}
<MI 2426c BNE 0x2429e> {}
<POP 2426e-2429e Naked> Σ0 ↓
<Blob 0x2426e [24] @> Δ-24 {[«24""»]}
<POP 24280-24282 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x24282 23> {[«24""»]|[$$Illegal marker argument]}
<Call 0x24296 0x219f2> {[«24""»]|[$$Illegal marker argument]}
<POP 2429a-2429e StackAdj> Δ+28 {}
<POP 2429e-242a4 Naked> Σ0 ↓ ←0x24246
<MI 2429e MOVE.L (A6-0x8),(A6+0x10)> {}
<POP 242a4-242ac Epilogue> Σ0
@ 242ac
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x00c 4(rw)>
<LVAR -0x010 4(rw)>
<LVAR -0x014 4(rw)>
<LVAR -0x018 4(w)>
<LVAR -0x020 4(rw)>
<POP 242ac-243d4 Body>
<POP 242ac-242c2 Prologue> Σ0 ↓
<POP 242c2-242d2 RegCacheLoad> Σ0 ↓
<POP 242d2-242ec Naked> Σ0 Δ-4 ↓
<MI 242d2 MOVEQ.L #0x00,D7> {}
<MI 242d4 MOVE.L (A6+0x14),(A6-0x20)> {}
<MI 242d8 MOVE.L 0x26518,D0> {}
<MI 242de SUB.L (A6+0x14),D0> {}
<MI 242e2 MOVE.L D0,(A6-0x14)> {}
<MI 242e4 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 242e8 MOVE.L (A6+0x10),D5> {[4, '(A6+0xc)']}
<POP 242ec-242f0 Naked> Σ-4 ↓ →0x2431c ←0x24318
<MI 242ec CMP.L (A7),D5> {[-4-]}
<MI 242ee BGT 0x2431c> {[-4-]}
<POP 242f0-24316 Naked> Σ-4 ↓ →0x24318
<POP 242f0-242f2 StackAdj> Δ-8 {[-12-]}
<MI 242f2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<MI 242f6 MOVE.L D5,-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<Call 0x242f8 0x2263c> {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<POP 242fc-242fe StackAdj> Δ+8 {[-12-]}
<MI 242fe MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-8-]}
<MI 24300 MOVE.L (A7),(A6-0xc)> {[-8-]}
<MI 24302 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']}
<MI 24304 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<Call 0x24306 0x22604> {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<POP 2430a-2430c StackAdj> Δ+8 {[-8-]}
<MI 2430c MOVE.L (A7)+,D6> Δ+4 {[-4-]}
<MI 2430e ADD.L D6,D7> {[-4-]}
<MI 24310 CMP.L (A6+0xc),D5> {[-4-]}
<MI 24314 BGE 0x24318> {[-4-]}
<POP 24316-24318 Naked> Σ-4 ↓
<MI 24316 ADDQ.L #0x1,D7> {[-4-]}
<POP 24318-2431c Naked> Σ-4 ↓ →0x242ec ←0x242f0
<MI 24318 ADDQ.L #0x1,D5> {[-4-]}
<MI 2431a BVC 0x242ec> {[-4-]}
<POP 2431c-2432a Naked> Σ-4 Δ+4 ↓ →0x24336 ←0x242ec
<POP 2431c-2431e StackAdj> Δ+4 {}
<MI 2431e MOVE.L (A6-0x20),D0> {}
<MI 24320 ADD.L (A6-0x14),D0> {}
<MI 24322 MOVE.L D0,(A6-0x18)> {}
<MI 24326 CMP.L (A6-0x14),D7> {}
<MI 24328 BEQ 0x24336> {}
<POP 2432a-24336 Naked> Σ0 ↓
<MI 2432a MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 2432c MOVE.L (A6-0x14),-(A7)> Δ-4 {[4, 'D0']|[4, '(A6-0x14)']}
<MI 2432e SUB.L D7,(A7)> {[4, 'D0']|[-4-]}
<Call 0x24330 0x21f46> {[4, 'D0']|[-4-]}
<POP 24334-24336 StackAdj> Δ+8 {}
<POP 24336-2433e Naked> Σ0 Δ-4 ↓ ←0x2431c
<MI 24336 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 2433a MOVE.L (A6+0x10),D5> {[4, '(A6+0xc)']}
<POP 2433e-24344 Naked> Σ-4 ↓ →0x243ca ←0x243c4
<MI 2433e CMP.L (A7),D5> {[-4-]}
<MI 24340 BGT 0x243ca> {[-4-]}
<POP 24344-24366 Naked> Σ-4 Δ-4 ↓
<POP 24344-24346 StackAdj> Δ-8 {[-12-]}
<MI 24346 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']}
<MI 2434a MOVE.L D5,-(A7)> Δ-4 {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<Call 0x2434c 0x2263c> {[-12-]|[4, '(A6+0x8)']|[4, 'D5']}
<POP 24350-24352 StackAdj> Δ+8 {[-12-]}
<MI 24352 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[-8-]}
<MI 24354 MOVE.L (A7),(A6-0xc)> {[-8-]}
<MI 24356 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']}
<MI 24358 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<Call 0x2435a 0x22604> {[-8-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<POP 2435e-24360 StackAdj> Δ+8 {[-8-]}
<MI 24360 MOVE.L (A7)+,D6> Δ+4 {[-4-]}
<MI 24362 MOVE.L D6,-(A7)> Δ-4 {[-4-]|[4, 'D6']}
<MI 24364 MOVEQ.L #0x01,D0> {[-4-]|[4, 'D6']}
<POP 24366-2436a Naked> Σ-8 ↓ →0x2439a ←0x2436a
<MI 24366 CMP.L (A7),D0> {[-8-]}
<MI 24368 BGT 0x2439a> {[-8-]}
<POP 2436a-2439a Naked> Σ-8 ↓ →0x24366
<MI 2436a MOVE.L (A6-0x20),D1> {[-8-]}
<MI 2436c ADD.L D0,D1> {[-8-]}
<MI 2436e SUBQ.L #0x1,D1> {[-8-]}
<MI 24370 SUBQ.L #0x1,D1> {[-8-]}
<POP 0x24372 LimitCheck 0x0 ≤ D1 ≤ 0xfff> {[-8-]}
<MI 2437c LEA.L 0x25510,A0> {[-8-]}
<POP 24382-24384 StackAdj> Δ-2 {[-10-]}
<MI 24384 MOVE.L (A6-0xc),-(A7)> Δ-4 {[-10-]|[4, '(A6-0xc)']}
<MI 24386 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-10-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']}
<MI 24388 MOVE.L D0,-(A7)> Δ-4 {[-10-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D0']}
<Call 0x2438a 0x241f0> {[-10-]|[4, '(A6-0xc)']|[4, '(A6-0x10)']|[4, 'D0']}
<POP 2438e-24392 StackAdj> Δ+12 {[-10-]}
<MI 24392 MOVE.B (A7)+,(A0+D1.L+#0x8)> Δ+2 {[-8-]}
<MI 24396 ADDQ.L #0x1,D0> {[-8-]}
<MI 24398 BVC 0x24366> {[-8-]}
<POP 2439a-243a2 Naked> Σ-8 Δ+4 ↓ →0x243c4 ←0x24366
<POP 2439a-2439c StackAdj> Δ+4 {[-4-]}
<MI 2439c CMP.L (A6+0xc),D5> {[-4-]}
<MI 243a0 BGE 0x243c4> {[-4-]}
<POP 243a2-243c4 Naked> Σ-4 ↓
<MI 243a2 MOVE.L (A6-0x20),D0> {[-4-]}
<MI 243a4 ADD.L D6,D0> {[-4-]}
<MI 243a6 MOVE.L D0,D1> {[-4-]}
<MI 243a8 SUBQ.L #0x1,D1> {[-4-]}
<POP 0x243aa LimitCheck 0x0 ≤ D1 ≤ 0xfff> {[-4-]}
<MI 243b4 LEA.L 0x25510,A0> {[-4-]}
<MI 243ba MOVE.B #0x2c,(A0+D1.L+#0x8)> {[-4-]}
<MI 243c0 ADDQ.L #0x1,D0> {[-4-]}
<MI 243c2 MOVE.L D0,(A6-0x20)> {[-4-]}
<POP 243c4-243ca Naked> Σ-4 ↓ →0x2433e ←0x2439a
<MI 243c4 ADDQ.L #0x1,D5> {[-4-]}
<MI 243c6 BVC 0x2433e> {[-4-]}
<POP 243ca-243cc Naked> Σ-4 Δ+4 ↓ ←0x2433e
<POP 243ca-243cc StackAdj> Δ+4 {}
<POP 243cc-243d4 Epilogue> Σ0
@ 243d4
<LVAR 0x018 4(rw)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 4(rw)>
<LVAR -0x00c 4(rw)>
<LVAR -0x018 4(w)>
<POP 243d4-244ca Body> Δ-12
<POP 243d4-243ea Prologue> Σ0 ↓
<POP 243ea-24400 RegCacheLoad> Σ0 ↓
<POP 24400-2442a Naked> Σ0 Δ-4 ↓
<POP 24400-24402 StackAdj> Δ-4 {[-4-]}
<MI 24402 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 24404 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<Call 0x24406 0x22604> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<POP 2440a-2440c StackAdj> Δ+8 {[-4-]}
<MI 2440c MOVE.L (A7),(A6-0xc)> {[-4-]}
<MI 2440e MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 24412 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x24416 0x22604> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 2441a-2441c StackAdj> Δ+8 {[-4-]}
<MI 2441c MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 2441e ADDQ.L #0x1,(A6-0x8)> {}
<MI 24420 MOVE.L (A6-0xc),D0> {}
<MI 24422 SUB.L (A6-0x8),D0> {}
<MI 24424 ADDQ.L #0x1,D0> {}
<MI 24426 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 24428 MOVEQ.L #0x01,D0> {[4, 'D0']}
<POP 2442a-24430 Naked> Σ-4 ↓ →0x244bc ←0x244b4
<MI 2442a CMP.L (A7),D0> {[-4-]}
<MI 2442c BGT 0x244bc> {[-4-]}
<POP 24430-2443c Naked> Σ-4 Δ-8 ↓
<MI 24430 MOVE.L D0,(A6-0x18)> {[-4-]}
<MI 24434 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<MI 24436 MOVEQ.L #0x00,D6> {[-4-]|[4, 'D0']}
<MI 24438 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
<MI 2443a MOVEQ.L #0x01,D5> {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
<POP 2443c-24440 Naked> Σ-12 ↓ →0x24482 ←0x2447c
<MI 2443c CMP.L (A7),D5> {[-12-]}
<MI 2443e BGT 0x24482> {[-12-]}
<POP 24440-24448 Naked> Σ-12 ↓ →0x2444c
<MI 24440 CMPI.L #0x00000001,D5> {[-12-]}
<MI 24446 BNE 0x2444c> {[-12-]}
<POP 24448-2444c Naked> Σ-12 →0x24460
<MI 24448 MOVEQ.L #0x2f,D7> {[-12-]}
<MI 2444a BRA 0x24460> {[-12-]}
<POP 2444c-24460 Naked> Σ-12 ↓ ←0x24440
<POP 2444c-2444e StackAdj> Δ-2 {[-14-]}
<MI 2444e MOVE.L (A6+0xc),-(A7)> Δ-4 {[-14-]|[4, '(A6+0xc)']}
<MI 24452 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 24456 MOVE.L D5,-(A7)> Δ-4 {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D5']}
<MI 24458 SUBQ.L #0x1,(A7)> {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[-4-]}
<Call 0x2445a 0x241f0> {[-14-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[-4-]}
<POP 2445c-2445e StackAdj> Δ+12 {[-14-]}
<MI 2445e MOVE.B (A7)+,D7> Δ+2 {[-12-]}
<POP 24460-24478 Naked> Σ-12 ↓ →0x2447c ←0x24448
<POP 24460-24462 StackAdj> Δ-2 {[-14-]}
<MI 24462 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-14-]|[4, '(A6+0x14)']}
<MI 24464 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 24466 MOVE.L (A7+0xe),D0> {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 2446a ADD.L D5,D0> {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 2446c SUBQ.L #0x1,D0> {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 2446e MOVE.L D0,-(A7)> Δ-4 {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
<Call 0x24470 0x241f0> {[-14-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
<POP 24472-24474 StackAdj> Δ+12 {[-14-]}
<MI 24474 CMP.B (A7)+,D7> Δ+2 {[-12-]}
<MI 24476 BEQ 0x2447c> {[-12-]}
<POP 24478-2447c Naked> Σ-12 Δ+4 →0x24484
<POP 24478-2447a StackAdj> Δ+4 {[-8-]}
<MI 2447a BRA 0x24484> {[-8-]}
<POP 2447c-24482 Naked> Σ-12 ↓ →0x2443c ←0x24460
<MI 2447c MOVE.L D5,D6> {[-12-]}
<MI 2447e ADDQ.L #0x1,D5> {[-12-]}
<MI 24480 BVC 0x2443c> {[-12-]}
<POP 24482-24484 Naked> Σ-12 Δ+4 ↓ ←0x2443c
<POP 24482-24484 StackAdj> Δ+4 {[-8-]}
<POP 24484-24488 Naked> Σ-8 ↓ →0x244b4 ←0x24478
<MI 24484 CMP.L (A6-0x8),D6> {[-8-]}
<MI 24486 BNE 0x244b4> {[-8-]}
<POP 24488-24494 Naked> Σ-8 ↓ →0x24496
<MI 24488 MOVE.L (A7),D0> {[-8-]}
<MI 2448a MOVE.L D0,(A6+0x18)> {[-8-]}
<MI 2448e ADD.L (A6-0x8),D0> {[-8-]}
<MI 24490 CMP.L (A6-0xc),D0> {[-8-]}
<MI 24492 BLT 0x24496> {[-8-]}
<POP 24494-24496 Naked> Σ-8 →0x244b0
<MI 24494 BRA 0x244b0> {[-8-]}
<POP 24496-244aa Naked> Σ-8 ↓ →0x244b0 ←0x24488
<POP 24496-24498 StackAdj> Δ-2 {[-10-]}
<MI 24498 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']}
<MI 2449a MOVE.L (A6+0x10),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 2449c MOVE.L D0,-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
<Call 0x2449e 0x241f0> {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D0']}
<POP 244a0-244a2 StackAdj> Δ+12 {[-10-]}
<MI 244a2 MOVE.B (A7)+,D7> Δ+2 {[-8-]}
<MI 244a4 CMPI.B #0x2f,D7> {[-8-]}
<MI 244a8 BEQ 0x244b0> {[-8-]}
<POP 244aa-244b0 Naked> Σ-8 ↓ →0x244b4
<MI 244aa CMPI.B #0x3d,D7> {[-8-]}
<MI 244ae BNE 0x244b4> {[-8-]}
<POP 244b0-244b4 Naked> Σ-8 Δ+8 →0x244c2 ←0x24494 ←0x24496
<POP 244b0-244b2 StackAdj> Δ+8 {}
<MI 244b2 BRA 0x244c2> {}
<POP 244b4-244bc Naked> Σ-8 Δ+4 ↓ →0x2442a ←0x24484 ←0x244aa
<MI 244b4 MOVE.L (A7)+,D0> Δ+4 {[-4-]}
<MI 244b6 ADDQ.L #0x1,D0> {[-4-]}
<MI 244b8 BVC 0x2442a> {[-4-]}
<POP 244bc-244c2 Naked> Σ-4 Δ+4 ↓ ←0x2442a
<POP 244bc-244be StackAdj> Δ+4 {}
<MI 244be CLR.L (A6+0x18)> {}
<POP 244c2-244ca Epilogue> Σ0 ←0x244b0
@ 244ca
<LVAR 0x018 4(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 244ca-2455e Body> Δ-4
<POP 244ca-244e0 Prologue> Σ0 ↓
<POP 244e0-244ea RegCacheLoad> Σ0 ↓
<POP 244ea-24504 Naked> Σ0 ↓ →0x24556
<POP 244ea-244ec StackAdj> Δ-4 {[-4-]}
<MI 244ec MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 244ee MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 244f0 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 244f4 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x244f8 0x243d4> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 244fc-24500 StackAdj> Δ+16 {[-4-]}
<MI 24500 MOVE.L (A7)+,D5> Δ+4 {}
<MI 24502 BLE 0x24556> {}
<POP 24504-24524 Naked> Σ0 Δ-4 ↓
<MI 24504 MOVE.L (A6+0x18),-(A7)> Δ-4 {[4, '(A6+0x18)']}
<Const 0x24508 0x2f.2> Δ-2 {[4, '(A6+0x18)']|[#47]}
<Call 0x2450a 0x102c0> {[4, '(A6+0x18)']|[#47]}
AppendChar(MOD b : String; a : char)
<POP 24510-24512 StackAdj> Δ+6 {}
<MI 24512 MOVE.L D5,D0> {}
<MI 24514 ADDQ.L #0x1,D0> {}
<POP 24516-24518 StackAdj> Δ-4 {[-4-]}
<MI 24518 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 2451a MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<Call 0x2451c 0x22604> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<POP 24520-24522 StackAdj> Δ+8 {[-4-]}
<MI 24522 MOVE.L D0,D6> {[-4-]}
<POP 24524-24528 Naked> Σ-4 ↓ →0x24554 ←0x24542
<MI 24524 CMP.L (A7),D6> {[-4-]}
<MI 24526 BGT 0x24554> {[-4-]}
<POP 24528-2453e Naked> Σ-4 ↓ →0x24542
<POP 24528-2452a StackAdj> Δ-2 {[-6-]}
<MI 2452a MOVE.L (A6+0x14),-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']}
<MI 2452c MOVE.L (A6+0x10),-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 2452e MOVE.L D6,-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
<Call 0x24530 0x241f0> {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
<POP 24534-24538 StackAdj> Δ+12 {[-6-]}
<MI 24538 MOVE.B (A7)+,D7> Δ+2 {[-4-]}
<MI 2453a CMP.B #0x2f,D7> {[-4-]}
<MI 2453c BNE 0x24542> {[-4-]}
<POP 2453e-24542 Naked> Σ-4 Δ+4 →0x24556
<POP 2453e-24540 StackAdj> Δ+4 {}
<MI 24540 BRA 0x24556> {}
<POP 24542-24554 Naked> Σ-4 ↓ →0x24524 ←0x24528
<MI 24542 MOVE.L (A6+0x18),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x18)']}
<MI 24546 MOVE.B D7,-(A7)> Δ-2 {[-4-]|[4, '(A6+0x18)']|[2, 'D7']}
<Call 0x24548 0x102c0> {[-4-]|[4, '(A6+0x18)']|[2, 'D7']}
AppendChar(MOD b : String; a : char)
<POP 2454e-24550 StackAdj> Δ+6 {[-4-]}
<MI 24550 ADDQ.L #0x1,D6> {[-4-]}
<MI 24552 BVC 0x24524> {[-4-]}
<POP 24554-24556 Naked> Σ-4 Δ+4 ↓ ←0x24524
<POP 24554-24556 StackAdj> Δ+4 {}
<POP 24556-2455e Epilogue> Σ0 ←0x244ea ←0x2453e
@ 2455e
<LVAR 0x018 4(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x006 4(rw)>
<LVAR -0x014 4(rw)>
<POP 2455e-24614 Body> Δ-8
<POP 2455e-24574 Prologue> Σ0 ↓
<POP 24574-24582 RegCacheLoad> Σ0 ↓
<POP 24582-2459e Naked> Σ0 ↓ →0x2460c
<POP 24582-24584 StackAdj> Δ-4 {[-4-]}
<MI 24584 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 24586 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 24588 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 2458c MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x24590 0x243d4> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 24594-24598 StackAdj> Δ+16 {[-4-]}
<MI 24598 MOVE.L (A7)+,(A6-0x14)> Δ+4 {}
<MI 2459c BLE 0x2460c> {}
<POP 2459e-245b2 Naked> Σ0 Δ-4 ↓
<POP 2459e-245a0 StackAdj> Δ-4 {[-4-]}
<MI 245a0 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']}
<MI 245a2 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<Call 0x245a4 0x22604> {[-4-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<POP 245a8-245aa StackAdj> Δ+8 {[-4-]}
<MI 245aa MOVE.L (A7)+,(A6-0x6)> Δ+4 {}
<MI 245ac MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<MI 245ae MOVE.L (A6-0x14),D5> {[4, '(A6-0x6)']}
<POP 245b2-245b6 Naked> Σ-4 ↓ →0x2460a ←0x24606
<MI 245b2 CMP.L (A7),D5> {[-4-]}
<MI 245b4 BGT 0x2460a> {[-4-]}
<POP 245b6-245cc Naked> Σ-4 ↓ →0x24606
<POP 245b6-245b8 StackAdj> Δ-2 {[-6-]}
<MI 245b8 MOVE.L (A6+0x14),-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']}
<MI 245ba MOVE.L (A6+0x10),-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 245bc MOVE.L D5,-(A7)> Δ-4 {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D5']}
<Call 0x245be 0x241f0> {[-6-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D5']}
<POP 245c2-245c4 StackAdj> Δ+12 {[-6-]}
<MI 245c4 MOVE.B (A7)+,D0> Δ+2 {[-4-]}
<MI 245c6 CMPI.B #0x3d,D0> {[-4-]}
<MI 245ca BNE 0x24606> {[-4-]}
<POP 245cc-245d4 Naked> Σ-4 Δ-4 ↓
<MI 245cc MOVE.L D5,D0> {[-4-]}
<MI 245ce ADDQ.L #0x1,D0> {[-4-]}
<MI 245d0 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']}
<MI 245d2 MOVE.L D0,D6> {[-4-]|[4, '(A6-0x6)']}
<POP 245d4-245d8 Naked> Σ-8 ↓ →0x24604 ←0x245f2
<MI 245d4 CMP.L (A7),D6> {[-8-]}
<MI 245d6 BGT 0x24604> {[-8-]}
<POP 245d8-245ee Naked> Σ-8 ↓ →0x245f2
<POP 245d8-245da StackAdj> Δ-2 {[-10-]}
<MI 245da MOVE.L (A6+0x14),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']}
<MI 245dc MOVE.L (A6+0x10),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']}
<MI 245de MOVE.L D6,-(A7)> Δ-4 {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
<Call 0x245e0 0x241f0> {[-10-]|[4, '(A6+0x14)']|[4, '(A6+0x10)']|[4, 'D6']}
<POP 245e4-245e6 StackAdj> Δ+12 {[-10-]}
<MI 245e6 MOVE.B (A7)+,D7> Δ+2 {[-8-]}
<MI 245e8 CMPI.B #0x2f,D7> {[-8-]}
<MI 245ec BNE 0x245f2> {[-8-]}
<POP 245ee-245f2 Naked> Σ-8 Δ+8 →0x2460c
<POP 245ee-245f0 StackAdj> Δ+8 {}
<MI 245f0 BRA 0x2460c> {}
<POP 245f2-24604 Naked> Σ-8 ↓ →0x245d4 ←0x245d8
<MI 245f2 MOVE.L (A6+0x18),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x18)']}
<MI 245f6 MOVE.B D7,-(A7)> Δ-2 {[-8-]|[4, '(A6+0x18)']|[2, 'D7']}
<Call 0x245f8 0x102c0> {[-8-]|[4, '(A6+0x18)']|[2, 'D7']}
AppendChar(MOD b : String; a : char)
<POP 245fe-24600 StackAdj> Δ+6 {[-8-]}
<MI 24600 ADDQ.L #0x1,D6> {[-8-]}
<MI 24602 BVC 0x245d4> {[-8-]}
<POP 24604-24606 Naked> Σ-8 Δ+4 ↓ ←0x245d4
<POP 24604-24606 StackAdj> Δ+4 {[-4-]}
<POP 24606-2460a Naked> Σ-4 ↓ →0x245b2 ←0x245b6
<MI 24606 ADDQ.L #0x1,D5> {[-4-]}
<MI 24608 BVC 0x245b2> {[-4-]}
<POP 2460a-2460c Naked> Σ-4 Δ+4 ↓ ←0x245b2
<POP 2460a-2460c StackAdj> Δ+4 {}
<POP 2460c-24614 Epilogue> Σ0 ←0x24582 ←0x245ee
@ 24614
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 24614-2469a Body> Δ-4
<POP 24614-2462a Prologue> Σ0 ↓
<POP 2462a-24634 RegCacheLoad> Σ0 ↓
<POP 24634-24646 Naked> Σ0 Δ-4 ↓
<POP 24634-24636 StackAdj> Δ-4 {[-4-]}
<MI 24636 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 24638 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x2463a 0x22604> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 2463e-24640 StackAdj> Δ+8 {[-4-]}
<MI 24640 MOVE.L (A7)+,D5> Δ+4 {}
<MI 24642 MOVE.L D5,-(A7)> Δ-4 {[4, 'D5']}
<MI 24644 MOVEQ.L #0x01,D6> {[4, 'D5']}
<POP 24646-2464a Naked> Σ-4 ↓ →0x24690 ←0x2468c
<MI 24646 CMP.L (A7),D6> {[-4-]}
<MI 24648 BGT 0x24690> {[-4-]}
<POP 2464a-24660 Naked> Σ-4 ↓ →0x2468c
<POP 2464a-2464c StackAdj> Δ-2 {[-6-]}
<MI 2464c MOVE.L (A6+0xc),-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']}
<MI 2464e MOVE.L (A6+0x8),-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 24650 MOVE.L D6,-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D6']}
<Call 0x24652 0x241f0> {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D6']}
<POP 24656-24658 StackAdj> Δ+12 {[-6-]}
<MI 24658 MOVE.B (A7)+,D0> Δ+2 {[-4-]}
<MI 2465a CMPI.B #0x2f,D0> {[-4-]}
<MI 2465e BNE 0x2468c> {[-4-]}
<POP 24660-24664 Naked> Σ-4 Δ-4 ↓
<MI 24660 MOVE.L D5,-(A7)> Δ-4 {[-4-]|[4, 'D5']}
<MI 24662 MOVE.L D6,D7> {[-4-]|[4, 'D5']}
<POP 24664-24668 Naked> Σ-8 ↓ →0x24686 ←0x24668
<MI 24664 CMP.L (A7),D7> {[-8-]}
<MI 24666 BGT 0x24686> {[-8-]}
<POP 24668-24686 Naked> Σ-8 ↓ →0x24664
<MI 24668 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x10)']}
<POP 2466c-2466e StackAdj> Δ-2 {[-8-]|[4, '(A6+0x10)']|[-2-]}
<MI 2466e MOVE.L (A6+0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']}
<MI 24670 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 24672 MOVE.L D7,-(A7)> Δ-4 {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x24674 0x241f0> {[-8-]|[4, '(A6+0x10)']|[-2-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
<POP 24678-2467a StackAdj> Δ+12 {[-8-]|[4, '(A6+0x10)']|[-2-]}
<Call 0x2467a 0x102c0> {[-8-]|[4, '(A6+0x10)']|[-2-]}
AppendChar(MOD b : String; a : char)
<POP 24680-24682 StackAdj> Δ+6 {[-8-]}
<MI 24682 ADDQ.L #0x1,D7> {[-8-]}
<MI 24684 BVC 0x24664> {[-8-]}
<POP 24686-2468c Naked> Σ-8 Δ+8 →0x24692 ←0x24664
<POP 24686-24688 StackAdj> Δ+4 {[-4-]}
<POP 24688-2468a StackAdj> Δ+4 {}
<MI 2468a BRA 0x24692> {}
<POP 2468c-24690 Naked> Σ-4 ↓ →0x24646 ←0x2464a
<MI 2468c ADDQ.L #0x1,D6> {[-4-]}
<MI 2468e BVC 0x24646> {[-4-]}
<POP 24690-24692 Naked> Σ-4 Δ+4 ↓ ←0x24646
<POP 24690-24692 StackAdj> Δ+4 {}
<POP 24692-2469a Epilogue> Σ0 ←0x24686
@ 2469a
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2469a-2470a Body> Δ-4
<POP 2469a-246b0 Prologue> Σ0 ↓
<POP 246b0-246c8 Naked> Σ0 Δ-4 ↓
<MI 246b0 MOVEA.L (A6+0x10),A0> {}
<MI 246b4 CLR.W (A0)> {}
<POP 246b6-246b8 StackAdj> Δ-4 {[-4-]}
<MI 246b8 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']}
<MI 246bc MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x246c0 0x22604> {[-4-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 246c4-246c6 StackAdj> Δ+8 {[-4-]}
<MI 246c6 MOVEQ.L #0x01,D7> {[-4-]}
<POP 246c8-246cc Naked> Σ-4 ↓ →0x24700 ←0x246fc
<MI 246c8 CMP.L (A7),D7> {[-4-]}
<MI 246ca BGT 0x24700> {[-4-]}
<POP 246cc-246e8 Naked> Σ-4 ↓ →0x246f8
<POP 246cc-246ce StackAdj> Δ-2 {[-6-]}
<MI 246ce MOVE.L (A6+0xc),-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']}
<MI 246d2 MOVE.L (A6+0x8),-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<MI 246d6 MOVE.L D7,-(A7)> Δ-4 {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
<Call 0x246d8 0x241f0> {[-6-]|[4, '(A6+0xc)']|[4, '(A6+0x8)']|[4, 'D7']}
<POP 246dc-246e0 StackAdj> Δ+12 {[-6-]}
<MI 246e0 MOVE.B (A7)+,D6> Δ+2 {[-4-]}
<MI 246e2 CMPI.B #0x2f,D6> {[-4-]}
<MI 246e6 BEQ 0x246f8> {[-4-]}
<POP 246e8-246f8 Naked> Σ-4 →0x246fc
<MI 246e8 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x10)']}
<MI 246ec MOVE.B D6,-(A7)> Δ-2 {[-4-]|[4, '(A6+0x10)']|[2, 'D6']}
<Call 0x246ee 0x102c0> {[-4-]|[4, '(A6+0x10)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 246f4-246f6 StackAdj> Δ+6 {[-4-]}
<MI 246f6 BRA 0x246fc> {[-4-]}
<POP 246f8-246fc Naked> Σ-4 Δ+4 →0x24702 ←0x246cc
<POP 246f8-246fa StackAdj> Δ+4 {}
<MI 246fa BRA 0x24702> {}
<POP 246fc-24700 Naked> Σ-4 ↓ →0x246c8 ←0x246e8
<MI 246fc ADDQ.L #0x1,D7> {[-4-]}
<MI 246fe BVC 0x246c8> {[-4-]}
<POP 24700-24702 Naked> Σ-4 Δ+4 ↓ ←0x246c8
<POP 24700-24702 StackAdj> Δ+4 {}
<POP 24702-2470a Epilogue> Σ0 ←0x246f8
@ 2470a
<POP 2470a-24752 Body>
<POP 2470a-24720 Prologue> Σ0 ↓
<POP 24720-2474a Naked> Σ0 ↓
<Blob 0x24720 [34] @> Δ-34 {[«34""»]}
<POP 2472c-2472e StackAdj> Δ-4 {[«34""»]|[-4-]}
<Lit 0x2472e 34> {[«34""»]|[$$Switch exclusion is unimplemented.]}
<Call 0x24742 0x219f2> {[«34""»]|[$$Switch exclusion is unimplemented.]}
<POP 24746-2474a StackAdj> Δ+38 {}
<POP 2474a-24752 Epilogue> Σ0
@ 24752
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x006 4(rw)>
<POP 24752-2488c Body>
<POP 24752-24768 Prologue> Σ0 ↓
<POP 24768-2477e RegCacheLoad> Σ0 ↓
<POP 2477e-2478c Naked> Σ0 ↓ →0x24794
<MI 2477e MOVE.L 0x26518,(A6-0x6)> {}
<POP 24782-24784 StackAdj> Δ-2 {[-2-]}
<Call 0x24784 0x21a8e> {[-2-]}
<MI 24786 MOVE.B (A7)+,D7> Δ+2 {}
<MI 24788 CMP.B #0x25,D7> {}
<MI 2478a BNE 0x24794> {}
<POP 2478c-24794 Naked> Σ0 →0x24874
<MI 2478c MOVEA.L (A6+0xc),A0> {}
<MI 2478e CLR.L (A0)> {}
<MI 24790 BRA 0x24874> {}
<POP 24794-24798 Naked> Σ0 ↓ →0x247a4 ←0x2477e
<MI 24794 CMP.B #0x2d,D7> {}
<MI 24796 BNE 0x247a4> {}
<POP 24798-247a4 Naked> Σ0 →0x24874
<MI 24798 MOVEA.L (A6+0xc),A0> {}
<MI 2479a MOVE.L #0x1,(A0)> {}
<MI 247a0 BRA 0x24874> {}
<POP 247a4-247aa Naked> Σ0 ↓ →0x247b6 ←0x24794
<MI 247a4 CMPI.B #0x2f,D7> {}
<MI 247a8 BNE 0x247b6> {}
<POP 247aa-247b6 Naked> Σ0 →0x24874
<MI 247aa MOVEA.L (A6+0xc),A0> {}
<MI 247ac MOVE.L #0x4,(A0)> {}
<MI 247b2 BRA 0x24874> {}
<POP 247b6-247bc Naked> Σ0 ↓ →0x247c8 ←0x247a4
<MI 247b6 CMPI.B #0x3d,D7> {}
<MI 247ba BNE 0x247c8> {}
<POP 247bc-247c8 Naked> Σ0 →0x24874
<MI 247bc MOVEA.L (A6+0xc),A0> {}
<MI 247be MOVE.L #0x5,(A0)> {}
<MI 247c4 BRA 0x24874> {}
<POP 247c8-247ce Naked> Σ0 ↓ →0x247da ←0x247b6
<MI 247c8 CMPI.B #0x5c,D7> {}
<MI 247cc BNE 0x247da> {}
<POP 247ce-247da Naked> Σ0 →0x24874
<MI 247ce MOVEA.L (A6+0xc),A0> {}
<MI 247d0 MOVE.L #0x6,(A0)> {}
<MI 247d6 BRA 0x24874> {}
<POP 247da-247de Naked> Σ0 ↓ →0x2480a ←0x247c8
<MI 247da TST.B D7> {}
<MI 247dc BNE 0x2480a> {}
<POP 247de-2480a Naked> Σ0 →0x24874
<Blob 0x247de [24] @> Δ-24 {[«24""»]}
<POP 247ea-247ec StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x247ec 24> {[«24""»]|[$$Illegal argument marker.]}
<Call 0x24800 0x219f2> {[«24""»]|[$$Illegal argument marker.]}
<POP 24804-24808 StackAdj> Δ+28 {}
<MI 24808 BRA 0x24874> {}
<POP 2480a-2480e Naked> Σ0 ↓ →0x2483a ←0x247da
<MI 2480a CMP.B #0x30,D7> {}
<MI 2480c BCS 0x2483a> {}
<POP 2480e-24812 Naked> Σ0 ↓ →0x2483a
<MI 2480e CMP.B #0x39,D7> {}
<MI 24810 BHI 0x2483a> {}
<POP 24812-2481a Naked> Σ0 ↓
<MI 24812 MOVEA.L (A6+0xc),A0> {}
<MI 24814 MOVE.L #0x2,(A0)> {}
<POP 2481a-24826 Naked> Σ0 ↓ →0x24830 ←0x24834
<POP 2481a-2481c StackAdj> Δ-2 {[-2-]}
<Call 0x2481c 0x21a50> {[-2-]}
<MI 24820 MOVE.B (A7)+,D7> Δ+2 {}
<MI 24822 CMP.B #0x30,D7> {}
<MI 24824 BCS 0x24830> {}
<POP 24826-2482a Naked> Σ0 ↓ →0x24830
<MI 24826 CMP.B #0x39,D7> {}
<MI 24828 BHI 0x24830> {}
<POP 2482a-24830 Naked> Σ0 ↓
<POP 2482a-2482c StackAdj> Δ-2 {[-2-]}
<Call 0x2482c 0x21a8e> {[-2-]}
<MI 2482e MOVE.B (A7)+,D6> Δ+2 {}
<POP 24830-24834 Naked> Σ0 ↓ →0x24838 ←0x2481a ←0x24826
<MI 24830 CMP.B #0x30,D7> {}
<MI 24832 BCS 0x24838> {}
<POP 24834-24838 Naked> Σ0 ↓ →0x2481a
<MI 24834 CMP.B #0x39,D7> {}
<MI 24836 BLS 0x2481a> {}
<POP 24838-2483a Naked> Σ0 →0x24874 ←0x24830
<MI 24838 BRA 0x24874> {}
<POP 2483a-24844 Naked> Σ0 ↓ ←0x2480a ←0x2480e
<MI 2483a MOVEA.L (A6+0xc),A0> {}
<MI 2483c MOVE.L #0x3,(A0)> {}
<MI 24842 MOVEQ.L #0x00,D5> {}
<POP 24844-24850 Naked> Σ0 ↓ →0x24866 ←0x24870
<POP 24844-24846 StackAdj> Δ-2 {[-2-]}
<Call 0x24846 0x21a50> {[-2-]}
<MI 2484a MOVE.B (A7)+,D7> Δ+2 {}
<MI 2484c CMP.B #0x25,D7> {}
<MI 2484e BEQ 0x24866> {}
<POP 24850-24854 Naked> Σ0 ↓ →0x24866
<MI 24850 CMP.B #0x2d,D7> {}
<MI 24852 BEQ 0x24866> {}
<POP 24854-2485a Naked> Σ0 ↓ →0x24866
<MI 24854 CMPI.B #0x2f,D7> {}
<MI 24858 BEQ 0x24866> {}
<POP 2485a-24860 Naked> Σ0 ↓ →0x24866
<MI 2485a CMPI.B #0x3d,D7> {}
<MI 2485e BEQ 0x24866> {}
<POP 24860-24866 Naked> Σ0 ↓ →0x2486a
<MI 24860 CMPI.B #0x5c,D7> {}
<MI 24864 BNE 0x2486a> {}
<POP 24866-2486a Naked> Σ0 →0x24870 ←0x24844 ←0x24850 ←0x24854 ←0x2485a
<MI 24866 MOVEQ.L #0x01,D5> {}
<MI 24868 BRA 0x24870> {}
<POP 2486a-24870 Naked> Σ0 ↓ ←0x24860
<POP 2486a-2486c StackAdj> Δ-2 {[-2-]}
<Call 0x2486c 0x21a8e> {[-2-]}
<MI 2486e MOVE.B (A7)+,D6> Δ+2 {}
<POP 24870-24874 Naked> Σ0 ↓ →0x24844 ←0x24866
<MI 24870 TST.B D5> {}
<MI 24872 BEQ 0x24844> {}
<POP 24874-24884 Naked> Σ0 ↓ ←0x2478c ←0x24798 ←0x247aa ←0x247bc ←0x247ce ←0x247de ←0x24838
<MI 24874 MOVEA.L (A6+0x8),A0> {}
<MI 24878 MOVE.L (A6-0x6),(A0)> {}
<MI 2487c MOVE.L 0x26518,(A0+0x4)> {}
<MI 24880 SUBQ.L #0x1,(A0+0x4)> {}
<POP 24884-2488c Epilogue> Σ0
@ 2488c
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<POP 2488c-24912 Body>
<POP 2488c-248a2 Prologue> Σ0 ↓
<POP 248a2-248a6 RegCacheLoad> Σ0 ↓
<POP 248a6-248c0 Naked> Σ0 Δ-4 ↓ →0x248cc
<MI 248a6 MOVEA.L (A6+0x8),A0> {}
<MI 248aa MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 248ac MOVE.L 0x26518,D6> {[4, 'A0']}
<MI 248b2 SUB.L (A6+0xc),D6> {[4, 'A0']}
<MI 248b4 MOVE.L (A6+0xc),D5> {[4, 'A0']}
<MI 248b6 ADD.L D6,D5> {[4, 'A0']}
<MI 248b8 MOVE.W (A0),D0> {[4, 'A0']}
<MI 248ba EXTW.L D0> {[4, 'A0']}
<MI 248bc CMP.L D6,D0> {[4, 'A0']}
<MI 248be BEQ 0x248cc> {[4, 'A0']}
<POP 248c0-248cc Naked> Σ-4 ↓
<MI 248c0 MOVE.L D5,-(A7)> Δ-4 {[-4-]|[4, 'D5']}
<MI 248c2 MOVE.L D6,-(A7)> Δ-4 {[-4-]|[4, 'D5']|[4, 'D6']}
<MI 248c4 SUB.L D0,(A7)> {[-4-]|[4, 'D5']|[-4-]}
<Call 0x248c6 0x21f46> {[-4-]|[4, 'D5']|[-4-]}
<POP 248ca-248cc StackAdj> Δ+8 {[-4-]}
<POP 248cc-248d0 Naked> Σ-4 Δ-4 ↓ ←0x248a6
<MI 248cc MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<MI 248ce MOVEQ.L #0x01,D7> {[-4-]|[4, 'D0']}
<POP 248d0-248d4 Naked> Σ-8 ↓ →0x24908 ←0x248d4
<MI 248d0 CMP.L (A7),D7> {[-8-]}
<MI 248d2 BGT 0x24908> {[-8-]}
<POP 248d4-24908 Naked> Σ-8 ↓ →0x248d0
<MI 248d4 MOVE.L (A6+0xc),D0> {[-8-]}
<MI 248d6 ADD.L D7,D0> {[-8-]}
<MI 248d8 SUBQ.L #0x1,D0> {[-8-]}
<MI 248da SUBQ.L #0x1,D0> {[-8-]}
<POP 0x248dc LimitCheck 0x0 ≤ D0 ≤ 0xfff> {[-8-]}
<MI 248e6 LEA.L 0x25510,A0> {[-8-]}
<MI 248ec MOVE.L D7,D1> {[-8-]}
<MI 248ee SUBQ.L #0x1,D1> {[-8-]}
<POP 0x248f0 LimitCheck 0x0 ≤ D1 ≤ 0x7d> {[-8-]}
<MI 248fa MOVEA.L (A7+0x4),A1> {[-8-]}
<MI 248fe MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8)> {[-8-]}
<MI 24904 ADDQ.L #0x1,D7> {[-8-]}
<MI 24906 BVC 0x248d0> {[-8-]}
<POP 24908-2490a Naked> Σ-8 Δ+8 ↓ ←0x248d0
<POP 24908-2490a StackAdj> Δ+8 {}
<POP 2490a-24912 Epilogue> Σ0
@ 24912
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x00c @ 4(r)>
<LVAR -0x010 4(r)>
<LVAR -0x014 @ 4(r)>
<LVAR -0x018 4(rw)>
<LVAR -0x01c 4(rw)>
<LVAR -0x020 4(rw)>
<LVAR -0x024 4(rw)>
<LVAR -0x028 4(rw)>
<LVAR -0x034 4(rw)>
<POP 24912-24b5a Body> Δ+56
<POP 24912-24928 Prologue> Σ0 ↓
<POP 24928-2493a RegCacheLoad> Σ0 ↓
<POP 2493a-2495e Naked> Σ0 ↓
<MI 2493a MOVE.L 0x26518,(A6-0x28)> {}
<Pointer.fp 0x24942 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Call 0x24944 0x102b8> {[@@-8]}
NewString(VAR a : String)
<POP 2494a-2494c StackAdj> Δ+4 {}
<Pointer.fp 0x2494c <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-12]}
<Pointer.fp 0x24950 <LVAR -0x014 @ 4(r)>> Δ-4 {[@@-12]|[@@-20]}
<Call 0x24952 0x24752> {[@@-12]|[@@-20]}
<POP 24956-24958 StackAdj> Δ+8 {}
<MI 24958 CLR.L (A6-0x34)> {}
<MI 2495c MOVEQ.L #0x00,D7> {}
<POP 2495e-24972 Naked> Σ0 →0x2499c →0x249a6 →0x249ba →0x249d6 →0x249da →0x249e8 →0x249fc →0x24a02 →0x24a04 →0x24a1a →0x24a28 →0x24a40 →0x24a54 →0x24a68 →0x24a7e →0x24a80 →0x24a9a →0x24ab0 →0x24abe →0x24ac0 →0x24ac2 ←0x24b36
<MI 2495e MOVE.L (A6-0x34),D0> {}
<POP 0x24962 LimitCheck 0x0 ≤ D0 ≤ 0x14> {}
<MI 24968 ADD.W D0,D0> {}
<MI 2496a SWITCH D0.W> {}
<POP 2499c-249a6 Naked> Σ0 →0x24aec ←0x2495e
<MI 2499c MOVEQ.L #0x00,D6> {}
<MI 2499e MOVE.L (A6+0x8),D5> {}
<MI 249a2 BRA 0x24aec> {}
<POP 249a6-249ba Naked> Σ0 →0x24aec ←0x2495e
<POP 249a6-249a8 StackAdj> Δ-4 {[-4-]}
<MI 249a8 MOVE.L (A6-0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x10)']}
<MI 249ac MOVE.L (A6-0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<Call 0x249ae 0x24230> {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<POP 249b2-249b4 StackAdj> Δ+8 {[-4-]}
<MI 249b4 MOVE.L (A7)+,D6> Δ+4 {}
<MI 249b6 BRA 0x24aec> {}
<POP 249ba-249c2 Naked> Σ0 Δ-12 ↓ ←0x2495e
<MI 249ba MOVE.L (A6-0x28),-(A7)> Δ-4 {[4, '(A6-0x28)']}
<MI 249be MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, 'D6']}
<MI 249c0 MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, 'D6']|[4, 'D6']}
<POP 249c2-249d2 Naked> Σ-12 Δ+12 →0x24b48 ←0x249da
<MI 249c2 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']}
<Call 0x249c6 0x242ac> {[-12-]|[4, '(A6+0xc)']}
<POP 249ca-249ce StackAdj> Δ+16 {}
<MI 249ce BRA 0x24b48> {}
<POP 249d6-249da Naked> Σ0 →0x24aec ←0x2495e
<MI 249d6 BRA 0x24aec> {}
<POP 249da-249e4 Naked> Σ0 Δ-12 →0x249c2 ←0x2495e
<MI 249da MOVE.L (A6-0x28),-(A7)> Δ-4 {[4, '(A6-0x28)']}
<MI 249de MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, 'D6']}
<MI 249e0 MOVE.L D5,-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, 'D6']|[4, 'D5']}
<MI 249e2 BRA 0x249c2> {[4, '(A6-0x28)']|[4, 'D6']|[4, 'D5']}
<POP 249e8-249fc Naked> Σ0 →0x24aec ←0x2495e ←0x24a02
<POP 249e8-249ea StackAdj> Δ-4 {[-4-]}
<MI 249ea MOVE.L (A6-0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x10)']}
<MI 249ee MOVE.L (A6-0x14),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<Call 0x249f0 0x24230> {[-4-]|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<POP 249f4-249f6 StackAdj> Δ+8 {[-4-]}
<MI 249f6 MOVE.L (A7)+,D5> Δ+4 {}
<MI 249f8 BRA 0x24aec> {}
<POP 249fc-24a02 Naked> Σ0 →0x24aec ←0x2495e
<MI 249fc MOVEQ.L #0x01,D6> {}
<MI 249fe BRA 0x24aec> {}
<POP 24a02-24a04 Naked> Σ0 →0x249e8 ←0x2495e
<MI 24a02 BRA 0x249e8> {}
<POP 24a04-24a1a Naked> Σ0 →0x24aec ←0x2495e
<POP 24a04-24a06 StackAdj> Δ-8 {[-8-]}
<MI 24a06 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-8-]|[4, '(A6+0xc)']}
<MI 24a0a MOVE.L D6,-(A7)> Δ-4 {[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<Call 0x24a0c 0x2263c> {[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<POP 24a10-24a12 StackAdj> Δ+8 {[-8-]}
<MI 24a12 MOVE.L (A7)+,(A6-0x24)> Δ+4 {[-4-]}
<MI 24a14 MOVE.L (A7)+,(A6-0x20)> Δ+4 {}
<MI 24a16 BRA 0x24aec> {}
<POP 24a1a-24a28 Naked> Σ0 →0x24aec ←0x2495e
<MI 24a1a MOVE.L (A6-0x14),(A6-0x1c)> {}
<MI 24a1e MOVE.L (A6-0x10),(A6-0x18)> {}
<MI 24a24 BRA 0x24aec> {}
<POP 24a28-24a3a Naked> Σ0 Δ-20 ↓ ←0x2495e
<MI 24a28 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 24a2a MOVE.L (A6-0x20),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
<MI 24a2c MOVE.L (A6-0x24),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<MI 24a2e MOVE.L (A6-0x18),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']}
<MI 24a32 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<Call 0x24a36 0x2455e> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<POP 24a3a-24a40 Naked> Σ-20 Δ+20 →0x24aec ←0x24a40
<POP 24a3a-24a3c StackAdj> Δ+20 {}
<MI 24a3c BRA 0x24aec> {}
<POP 24a40-24a54 Naked> Σ0 Δ-20 →0x24a3a ←0x2495e
<MI 24a40 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 24a42 MOVE.L (A6-0x20),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
<MI 24a44 MOVE.L (A6-0x24),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<MI 24a46 MOVE.L (A6-0x18),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']}
<MI 24a4a MOVE.L (A6-0x1c),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<Call 0x24a4e 0x244ca> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<MI 24a52 BRA 0x24a3a> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<POP 24a54-24a5e Naked> Σ0 Δ-12 ↓ ←0x2495e
<MI 24a54 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 24a56 MOVE.L (A6-0x20),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
<MI 24a58 MOVE.L (A6-0x24),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<Call 0x24a5a 0x24614> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<POP 24a5e-24a62 Naked> Σ-12 Δ+12 ↓ ←0x24a9a
<POP 24a5e-24a62 StackAdj> Δ+12 {}
<POP 24a62-24a68 Naked> Σ0 →0x24aec ←0x24a68 ←0x24a7e ←0x24ac0
<MI 24a62 MOVEQ.L #0x01,D7> {}
<MI 24a64 BRA 0x24aec> {}
<POP 24a68-24a7e Naked> Σ0 →0x24a62 ←0x2495e
<MI 24a68 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 24a6a MOVE.L (A6-0x20),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']}
<MI 24a6c MOVE.L (A6-0x24),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']}
<MI 24a6e MOVE.L (A6-0x18),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']}
<MI 24a72 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<Call 0x24a76 0x244ca> {[4, '(A6-0x8)']|[4, '(A6-0x20)']|[4, '(A6-0x24)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<POP 24a7a-24a7c StackAdj> Δ+20 {}
<MI 24a7c BRA 0x24a62> {}
<POP 24a7e-24a80 Naked> Σ0 →0x24a62 ←0x2495e
<MI 24a7e BRA 0x24a62> {}
<POP 24a80-24a94 Naked> Σ0 Δ-12 ↓ ←0x2495e
<MI 24a80 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<POP 24a82-24a84 StackAdj> Δ-8 {[4, '(A6-0x8)']|[-8-]}
<MI 24a84 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']}
<MI 24a88 MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<Call 0x24a8a 0x2263c> {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<POP 24a8e-24a90 StackAdj> Δ+8 {[4, '(A6-0x8)']|[-8-]}
<Call 0x24a90 0x24614> {[4, '(A6-0x8)']|[-8-]}
<POP 24a94-24a9a Naked> Σ-12 Δ+12 →0x24aec ←0x24ab0
<POP 24a94-24a98 StackAdj> Δ+12 {}
<MI 24a98 BRA 0x24aec> {}
<POP 24a9a-24ab0 Naked> Σ0 Δ-12 →0x24a5e ←0x2495e
<MI 24a9a MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<POP 24a9c-24a9e StackAdj> Δ-8 {[4, '(A6-0x8)']|[-8-]}
<MI 24a9e MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']}
<MI 24aa2 MOVE.L D6,-(A7)> Δ-4 {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<Call 0x24aa4 0x2263c> {[4, '(A6-0x8)']|[-8-]|[4, '(A6+0xc)']|[4, 'D6']}
<POP 24aa8-24aaa StackAdj> Δ+8 {[4, '(A6-0x8)']|[-8-]}
<Call 0x24aaa 0x2469a> {[4, '(A6-0x8)']|[-8-]}
<MI 24aae BRA 0x24a5e> {[4, '(A6-0x8)']|[-8-]}
<POP 24ab0-24abe Naked> Σ0 Δ-12 →0x24a94 ←0x2495e
<MI 24ab0 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 24ab2 MOVE.L (A6-0x10),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x10)']}
<MI 24ab6 MOVE.L (A6-0x14),-(A7)> Δ-4 {[4, '(A6-0x8)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<Call 0x24ab8 0x2470a> {[4, '(A6-0x8)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<MI 24abc BRA 0x24a94> {[4, '(A6-0x8)']|[4, '(A6-0x10)']|[4, '(A6-0x14)']}
<POP 24abe-24ac0 Naked> Σ0 →0x24aec ←0x2495e
<MI 24abe BRA 0x24aec> {}
<POP 24ac0-24ac2 Naked> Σ0 →0x24a62 ←0x2495e
<MI 24ac0 BRA 0x24a62> {}
<POP 24ac2-24aec Naked> Σ0 ↓ ←0x2495e
<Blob 0x24ac2 [24] @> Δ-24 {[«24""»]}
<POP 24ace-24ad0 StackAdj> Δ-4 {[«24""»]|[-4-]}
<Lit 0x24ad0 24> {[«24""»]|[$$Illegal argument marker.]}
<Call 0x24ae4 0x219f2> {[«24""»]|[$$Illegal argument marker.]}
<POP 24ae8-24aec StackAdj> Δ+28 {}
<POP 24aec-24af0 Naked> Σ0 ↓ →0x24b36 ←0x2499c ←0x249a6 ←0x249d6 ←0x249e8 ←0x249fc ←0x24a04 ←0x24a1a ←0x24a3a ←0x24a62 ←0x24a94 ←0x24abe
<MI 24aec TST.B D7> {}
<MI 24aee BNE 0x24b36> {}
<POP 24af0-24b36 Naked> Σ0 ↓
<Pointer.fp 0x24af0 <LVAR -0x00c @ 4(r)>> Δ-4 {[@@-12]}
<Pointer.fp 0x24af4 <LVAR -0x014 @ 4(r)>> Δ-4 {[@@-12]|[@@-20]}
<Call 0x24af6 0x24752> {[@@-12]|[@@-20]}
<POP 24afa-24afc StackAdj> Δ+8 {}
<MI 24afc MOVE.L (A6-0x34),D0> {}
<POP 0x24b00 LimitCheck 0x0 ≤ D0 ≤ 0x13> {}
<MI 24b0a MOVE.L D0,D4> {}
<MI 24b0c MOVEQ.L #0x07,D3> {}
<Call 0x24b0e 0x1028c> {}
?muls_d3_d4
<MI 24b14 LEA.L 0x21924,A0> {}
<MI 24b18 MOVE.L (A6-0xc),D0> {}
<POP 0x24b1c LimitCheck 0x0 ≤ D0 ≤ 0x6> {}
<MI 24b26 LEA.L (A0+D4.L),A0> {}
<MI 24b2a MOVE.B (A0+D0.L),D1> {}
<MI 24b2e EXTB.W D1> {}
<MI 24b30 EXTW.L D1> {}
<MI 24b32 MOVE.L D1,(A6-0x34)> {}
<POP 24b36-24b3c Naked> Σ0 ↓ →0x2495e ←0x24aec
<MI 24b36 TST.B D7> {}
<MI 24b38 BEQ 0x2495e> {}
<POP 24b3c-24b48 Naked> Σ0 ↓
<MI 24b3c MOVE.L (A6-0x28),-(A7)> Δ-4 {[4, '(A6-0x28)']}
<MI 24b40 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x28)']|[4, '(A6-0x8)']}
<Call 0x24b42 0x2488c> {[4, '(A6-0x28)']|[4, '(A6-0x8)']}
<POP 24b46-24b48 StackAdj> Δ+8 {}
<POP 24b48-24b52 Naked> Σ0 ↓ ←0x249c2
<Pointer.fp 0x24b48 <LVAR -0x008 @ 4(r)>> Δ-4 {[@@-8]}
<Call 0x24b4a 0x102bc> {[@@-8]}
FreeString(VAR a : String)
<POP 24b50-24b52 StackAdj> Δ+4 {}
<POP 24b52-24b5a Epilogue> Σ0
@ 24b5a
<LVAR 0x014 4(rw)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 4(rw)>
<LVAR -0x00c 4(rw)>
<LVAR -0x018 4(w)>
<POP 24b5a-24c52 Body> Δ-12
<POP 24b5a-24b70 Prologue> Σ0 ↓
<POP 24b70-24b82 RegCacheLoad> Σ0 ↓
<POP 24b82-24baa Naked> Σ0 Δ-4 ↓
<MI 24b82 CLR.L (A6+0x14)> {}
<POP 24b86-24b88 StackAdj> Δ-4 {[-4-]}
<MI 24b88 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x10)']}
<MI 24b8a MOVE.L (A6+0xc),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<Call 0x24b8c 0x22604> {[-4-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<POP 24b90-24b92 StackAdj> Δ+8 {[-4-]}
<MI 24b92 MOVE.L (A7)+,(A6-0xc)> Δ+4 {}
<MI 24b94 MOVEA.L (A6+0x8),A0> {}
<MI 24b98 MOVE.W (A0),D0> {}
<MI 24b9a EXTW.L D0> {}
<MI 24b9c ADDQ.L #0x1,D0> {}
<MI 24b9e MOVE.L D0,(A6-0x8)> {}
<MI 24ba0 NEG.L D0> {}
<MI 24ba2 ADD.L (A6-0xc),D0> {}
<MI 24ba4 ADDQ.L #0x1,D0> {}
<MI 24ba6 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 24ba8 MOVEQ.L #0x01,D0> {[4, 'D0']}
<POP 24baa-24bb0 Naked> Σ-4 ↓ →0x24c48 ←0x24c40
<MI 24baa CMP.L (A7),D0> {[-4-]}
<MI 24bac BGT 0x24c48> {[-4-]}
<POP 24bb0-24bbc Naked> Σ-4 Δ-8 ↓
<MI 24bb0 MOVE.L D0,(A6-0x18)> {[-4-]}
<MI 24bb4 MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']}
<MI 24bb6 MOVEQ.L #0x00,D6> {[-4-]|[4, 'D0']}
<MI 24bb8 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
<MI 24bba MOVEQ.L #0x01,D5> {[-4-]|[4, 'D0']|[4, '(A6-0x8)']}
<POP 24bbc-24bc0 Naked> Σ-12 ↓ →0x24c08 ←0x24c02
<MI 24bbc CMP.L (A7),D5> {[-12-]}
<MI 24bbe BGT 0x24c08> {[-12-]}
<POP 24bc0-24bc8 Naked> Σ-12 ↓ →0x24bcc
<MI 24bc0 CMPI.L #0x00000001,D5> {[-12-]}
<MI 24bc6 BNE 0x24bcc> {[-12-]}
<POP 24bc8-24bcc Naked> Σ-12 →0x24be4
<MI 24bc8 MOVEQ.L #0x2f,D7> {[-12-]}
<MI 24bca BRA 0x24be4> {[-12-]}
<POP 24bcc-24be4 Naked> Σ-12 ↓ ←0x24bc0
<MI 24bcc MOVEA.L (A6+0x8),A0> {[-12-]}
<MI 24bd0 MOVE.L D5,D0> {[-12-]}
<MI 24bd2 SUBQ.L #0x1,D0> {[-12-]}
<MI 24bd4 SUBQ.L #0x1,D0> {[-12-]}
<POP 0x24bd6 LimitCheck 0x0 ≤ D0 ≤ 0x7d> {[-12-]}
<MI 24be0 MOVE.B (A0+D0.L+#0x2),D7> {[-12-]}
<POP 24be4-24bfe Naked> Σ-12 ↓ →0x24c02 ←0x24bc8
<POP 24be4-24be6 StackAdj> Δ-2 {[-14-]}
<MI 24be6 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-14-]|[4, '(A6+0x10)']}
<MI 24be8 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 24bea MOVE.L (A7+0xe),D0> {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 24bee ADD.L D5,D0> {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 24bf0 SUBQ.L #0x1,D0> {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 24bf2 MOVE.L D0,-(A7)> Δ-4 {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D0']}
<Call 0x24bf4 0x241f0> {[-14-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D0']}
<POP 24bf8-24bfa StackAdj> Δ+12 {[-14-]}
<MI 24bfa CMP.B (A7)+,D7> Δ+2 {[-12-]}
<MI 24bfc BEQ 0x24c02> {[-12-]}
<POP 24bfe-24c02 Naked> Σ-12 Δ+4 →0x24c0a
<POP 24bfe-24c00 StackAdj> Δ+4 {[-8-]}
<MI 24c00 BRA 0x24c0a> {[-8-]}
<POP 24c02-24c08 Naked> Σ-12 ↓ →0x24bbc ←0x24be4
<MI 24c02 MOVE.L D5,D6> {[-12-]}
<MI 24c04 ADDQ.L #0x1,D5> {[-12-]}
<MI 24c06 BVC 0x24bbc> {[-12-]}
<POP 24c08-24c0a Naked> Σ-12 Δ+4 ↓ ←0x24bbc
<POP 24c08-24c0a StackAdj> Δ+4 {[-8-]}
<POP 24c0a-24c0e Naked> Σ-8 ↓ →0x24c40 ←0x24bfe
<MI 24c0a CMP.L (A6-0x8),D6> {[-8-]}
<MI 24c0c BNE 0x24c40> {[-8-]}
<POP 24c0e-24c18 Naked> Σ-8 ↓ →0x24c3e
<MI 24c0e MOVE.L (A7),D0> {[-8-]}
<MI 24c10 MOVE.L D0,D1> {[-8-]}
<MI 24c12 ADD.L (A6-0x8),D1> {[-8-]}
<MI 24c14 CMP.L (A6-0xc),D1> {[-8-]}
<MI 24c16 BGE 0x24c3e> {[-8-]}
<POP 24c18-24c2e Naked> Σ-8 ↓ →0x24c34
<POP 24c18-24c1a StackAdj> Δ-2 {[-10-]}
<MI 24c1a MOVE.L (A6+0x10),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x10)']}
<MI 24c1c MOVE.L (A6+0xc),-(A7)> Δ-4 {[-10-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']}
<MI 24c1e MOVE.L D1,-(A7)> Δ-4 {[-10-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D1']}
<Call 0x24c20 0x241f0> {[-10-]|[4, '(A6+0x10)']|[4, '(A6+0xc)']|[4, 'D1']}
<POP 24c24-24c26 StackAdj> Δ+12 {[-10-]}
<MI 24c26 MOVE.B (A7)+,D7> Δ+2 {[-8-]}
<MI 24c28 CMPI.B #0x2f,D7> {[-8-]}
<MI 24c2c BEQ 0x24c34> {[-8-]}
<POP 24c2e-24c34 Naked> Σ-8 ↓ →0x24c3c
<MI 24c2e CMPI.B #0x3d,D7> {[-8-]}
<MI 24c32 BNE 0x24c3c> {[-8-]}
<POP 24c34-24c3c Naked> Σ-8 Δ+8 →0x24c4a ←0x24c18 ←0x24c3e
<MI 24c34 MOVE.L D0,(A6+0x14)> {[-8-]}
<POP 24c38-24c3a StackAdj> Δ+8 {}
<MI 24c3a BRA 0x24c4a> {}
<POP 24c3c-24c3e Naked> Σ-8 →0x24c40 ←0x24c2e
<MI 24c3c BRA 0x24c40> {[-8-]}
<POP 24c3e-24c40 Naked> Σ-8 →0x24c34 ←0x24c0e
<MI 24c3e BRA 0x24c34> {[-8-]}
<POP 24c40-24c48 Naked> Σ-8 Δ+4 ↓ →0x24baa ←0x24c0a ←0x24c3c
<MI 24c40 MOVE.L (A7)+,D0> Δ+4 {[-4-]}
<MI 24c42 ADDQ.L #0x1,D0> {[-4-]}
<MI 24c44 BVC 0x24baa> {[-4-]}
<POP 24c48-24c4a Naked> Σ-4 Δ+4 ↓ ←0x24baa
<POP 24c48-24c4a StackAdj> Δ+4 {}
<POP 24c4a-24c52 Epilogue> Σ0 ←0x24c34
@ 24c52
<LVAR 0x018 4(r)>
<LVAR 0x014 4(r)>
<LVAR 0x010 4(r)>
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x008 4(rw)>
<LVAR -0x014 4(rw)>
<LVAR -0x018 4(rw)>
<LVAR -0x01c 4(rw)>
<POP 24c52-24d3a Body> Δ-12
<POP 24c52-24c68 Prologue> Σ0 ↓
<POP 24c68-24c78 RegCacheLoad> Σ0 ↓
<POP 24c78-24c9e Naked> Σ0 ↓ →0x24d32
<MI 24c78 MOVEA.L (A6+0x8),A0> {}
<MI 24c7c CLR.B (A0)> {}
<MI 24c7e MOVEA.L (A6+0xc),A1> {}
<MI 24c82 MOVE.L #0x01,(A1)> {}
<POP 24c84-24c86 StackAdj> Δ-8 {[-8-]}
<MI 24c86 MOVE.L (A6+0x18),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x18)']}
<MI 24c8a MOVE.L (A6+0x14),-(A7)> Δ-4 {[-8-]|[4, '(A6+0x18)']|[4, '(A6+0x14)']}
<Call 0x24c8e 0x2263c> {[-8-]|[4, '(A6+0x18)']|[4, '(A6+0x14)']}
<POP 24c92-24c94 StackAdj> Δ+8 {[-8-]}
<MI 24c94 MOVE.L (A7)+,(A6-0x1c)> Δ+4 {[-4-]}
<MI 24c96 MOVE.L (A7)+,(A6-0x18)> Δ+4 {}
<MI 24c98 TST.L (A6-0x1c)> {}
<MI 24c9a BEQ 0x24d32> {}
<POP 24c9e-24cb4 Naked> Σ0 ↓ →0x24d32
<POP 24c9e-24ca0 StackAdj> Δ-4 {[-4-]}
<MI 24ca0 MOVE.L (A6-0x18),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x18)']}
<MI 24ca2 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<MI 24ca4 MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, '(A6+0x10)']}
<Call 0x24ca8 0x24b5a> {[-4-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, '(A6+0x10)']}
<POP 24cac-24cae StackAdj> Δ+12 {[-4-]}
<MI 24cae MOVE.L (A7)+,(A6-0x14)> Δ+4 {}
<MI 24cb2 BEQ 0x24d32> {}
<POP 24cb4-24cd4 Naked> Σ0 Δ-4 ↓
<MI 24cb4 MOVE.B #0x01,(A0)> {}
<MI 24cb6 PEA.L (A1)> Δ-4 {[4, '^(A1)']}
<Call 0x24cb8 0x102b8> {[4, '^(A1)']}
NewString(VAR a : String)
<MI 24cbe MOVE.L (A6-0x18),-(A7)> Δ-4 {[4, '^(A1)']|[4, '(A6-0x18)']}
<MI 24cc0 MOVE.L (A6-0x1c),-(A7)> Δ-4 {[4, '^(A1)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<Call 0x24cc2 0x22604> {[4, '^(A1)']|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<POP 24cc6-24cc8 StackAdj> Δ+8 {[4, '^(A1)']}
<MI 24cc8 MOVE.L (A7)+,(A6-0x8)> Δ+4 {}
<MI 24cca MOVE.L (A6-0x14),D0> {}
<MI 24cce ADDQ.L #0x1,D0> {}
<MI 24cd0 MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 24cd2 MOVE.L D0,D5> {[4, '(A6-0x8)']}
<POP 24cd4-24cd8 Naked> Σ-4 ↓ →0x24d30 ←0x24d2c
<MI 24cd4 CMP.L (A7),D5> {[-4-]}
<MI 24cd6 BGT 0x24d30> {[-4-]}
<POP 24cd8-24cee Naked> Σ-4 ↓ →0x24d2c
<POP 24cd8-24cda StackAdj> Δ-2 {[-6-]}
<MI 24cda MOVE.L (A6-0x18),-(A7)> Δ-4 {[-6-]|[4, '(A6-0x18)']}
<MI 24cdc MOVE.L (A6-0x1c),-(A7)> Δ-4 {[-6-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<MI 24cde MOVE.L D5,-(A7)> Δ-4 {[-6-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D5']}
<Call 0x24ce0 0x241f0> {[-6-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D5']}
<POP 24ce4-24ce6 StackAdj> Δ+12 {[-6-]}
<MI 24ce6 MOVE.B (A7)+,D0> Δ+2 {[-4-]}
<MI 24ce8 CMPI.B #0x3d,D0> {[-4-]}
<MI 24cec BNE 0x24d2c> {[-4-]}
<POP 24cee-24cf6 Naked> Σ-4 Δ-4 ↓
<MI 24cee MOVE.L D5,D0> {[-4-]}
<MI 24cf0 ADDQ.L #0x1,D0> {[-4-]}
<MI 24cf2 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x8)']}
<MI 24cf4 MOVE.L D0,D7> {[-4-]|[4, '(A6-0x8)']}
<POP 24cf6-24cfa Naked> Σ-8 ↓ →0x24d28 ←0x24d14
<MI 24cf6 CMP.L (A7),D7> {[-8-]}
<MI 24cf8 BGT 0x24d28> {[-8-]}
<POP 24cfa-24d10 Naked> Σ-8 ↓ →0x24d14
<POP 24cfa-24cfc StackAdj> Δ-2 {[-10-]}
<MI 24cfc MOVE.L (A6-0x18),-(A7)> Δ-4 {[-10-]|[4, '(A6-0x18)']}
<MI 24cfe MOVE.L (A6-0x1c),-(A7)> Δ-4 {[-10-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']}
<MI 24d00 MOVE.L D7,-(A7)> Δ-4 {[-10-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D7']}
<Call 0x24d02 0x241f0> {[-10-]|[4, '(A6-0x18)']|[4, '(A6-0x1c)']|[4, 'D7']}
<POP 24d06-24d08 StackAdj> Δ+12 {[-10-]}
<MI 24d08 MOVE.B (A7)+,D6> Δ+2 {[-8-]}
<MI 24d0a CMPI.B #0x2f,D6> {[-8-]}
<MI 24d0e BNE 0x24d14> {[-8-]}
<POP 24d10-24d14 Naked> Σ-8 Δ+8 →0x24d32
<POP 24d10-24d12 StackAdj> Δ+8 {}
<MI 24d12 BRA 0x24d32> {}
<POP 24d14-24d28 Naked> Σ-8 ↓ →0x24cf6 ←0x24cfa
<MI 24d14 MOVEA.L (A6+0xc),A0> {[-8-]}
<MI 24d18 MOVE.L (A0),-(A7)> Δ-4 {[-8-]|[4, '(A0)']}
<MI 24d1a MOVE.B D6,-(A7)> Δ-2 {[-8-]|[4, '(A0)']|[2, 'D6']}
<Call 0x24d1c 0x102c0> {[-8-]|[4, '(A0)']|[2, 'D6']}
AppendChar(MOD b : String; a : char)
<POP 24d22-24d24 StackAdj> Δ+6 {[-8-]}
<MI 24d24 ADDQ.L #0x1,D7> {[-8-]}
<MI 24d26 BVC 0x24cf6> {[-8-]}
<POP 24d28-24d2c Naked> Σ-8 Δ+8 →0x24d32 ←0x24cf6
<POP 24d28-24d2a StackAdj> Δ+8 {}
<MI 24d2a BRA 0x24d32> {}
<POP 24d2c-24d30 Naked> Σ-4 ↓ →0x24cd4 ←0x24cd8
<MI 24d2c ADDQ.L #0x1,D5> {[-4-]}
<MI 24d2e BVC 0x24cd4> {[-4-]}
<POP 24d30-24d32 Naked> Σ-4 Δ+4 ↓ ←0x24cd4
<POP 24d30-24d32 StackAdj> Δ+4 {}
<POP 24d32-24d3a Epilogue> Σ0 ←0x24c78 ←0x24c9e ←0x24d10 ←0x24d28
@ 24d3a
<LVAR 0x00c @ 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x010 @ 1(r)>
<POP 24d3a-24dd8 Body>
<POP 24d3a-24d50 Prologue> Σ0 ↓
<POP 24d50-24d5e RegCacheLoad> Σ0 ↓
<POP 24d5e-24d76 Naked> Σ0 ↓ →0x24dc6
<MI 24d5e MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 24d60 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Pointer.fp 0x24d62 <LVAR -0x010 @ 1(r)>> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-16]}
<Call 0x24d66 0x2123e> {[4, '(A6+0xc)']|[4, '(A6+0x8)']|[@@-16]}
<POP 24d6c-24d70 StackAdj> Δ+12 {}
<MI 24d70 TST.B (A6-0x10)> {}
<MI 24d74 BNE 0x24dc6> {}
<POP 24d76-24d90 Naked> Σ0 ↓
<MI 24d76 MOVE.L 0x26518,D7> {}
<POP 24d78-24d7a StackAdj> Δ-4 {[-4-]}
<MI 24d7a MOVE.L (A6+0x8),-(A7)> Δ-4 {[-4-]|[4, '(A6+0x8)']}
<Call 0x24d7c 0x21dfe> {[-4-]|[4, '(A6+0x8)']}
<POP 24d80-24d82 StackAdj> Δ+4 {[-4-]}
<MI 24d82 MOVE.L (A7)+,D6> Δ+4 {}
<MI 24d84 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 24d86 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<Call 0x24d88 0x240b4> {[4, '(A6+0xc)']|[4, '(A6+0x8)']}
<POP 24d8c-24d8e StackAdj> Δ+8 {}
<MI 24d8e MOVE.L 0x26518,D5> {}
<POP 24d90-24dae Naked> Σ0 ↓ →0x24dba ←0x24dba
<MI 24d90 MOVE.L D7,D0> {}
<MI 24d92 SUBQ.L #0x1,D0> {}
<POP 0x24d94 LimitCheck 0x0 ≤ D0 ≤ 0xfff> {}
<MI 24d9e LEA.L 0x25510,A0> {}
<MI 24da4 MOVE.B (A0+D0.L+#0x8),D0> {}
<MI 24da8 CMPI.B #0x25,D0> {}
<MI 24dac BNE 0x24dba> {}
<POP 24dae-24dba Naked> Σ0 ↓
<MI 24dae MOVE.L D7,0x26518> {}
<MI 24db0 MOVE.L (A6+0x8),-(A7)> Δ-4 {[4, '(A6+0x8)']}
<MI 24db2 MOVE.L D6,-(A7)> Δ-4 {[4, '(A6+0x8)']|[4, 'D6']}
<Call 0x24db4 0x24912> {[4, '(A6+0x8)']|[4, 'D6']}
<POP 24db8-24dba StackAdj> Δ+8 {}
<POP 24dba-24dc4 Naked> Σ0 ↓ →0x24d90 ←0x24d90
<MI 24dba ADDQ.L #0x1,D7> {}
<MI 24dbc CMP.L 0x2651c,D7> {}
<MI 24dc2 BLE 0x24d90> {}
<POP 24dc4-24dc6 Naked> Σ0 ↓
<MI 24dc4 MOVE.L D5,0x26518> {}
<POP 24dc6-24dd0 Naked> Σ0 ↓ ←0x24d5e
<Pointer.fp 0x24dc6 <LVAR 0x00c @ 4(r)>> Δ-4 {[@@12]}
<Call 0x24dc8 0x102bc> {[@@12]}
FreeString(VAR a : String)
<POP 24dce-24dd0 StackAdj> Δ+4 {}
<POP 24dd0-24dd8 Epilogue> Σ0
@ 24dd8
<LVAR -0x006 @ 4(r)>
<LVAR -0x00a @ 4(rw)>
<LVAR -0x00b 1(w)>
<LVAR -0x00c @ 1(r)>
<POP 24dd8-250ea Body> Δ+148
<POP 24dd8-24dee Prologue> Σ0 ↓
<POP 24dee-24dfc RegCacheLoad> Σ0 ↓
<POP 24dfc-24e22 Naked> Σ0 ↓ →0x250cc ←0x250cc
<MI 24dfc MOVE.L 0x26518,D7> {}
<Pointer.fp 0x24dfe <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Pointer.fp 0x24e00 <LVAR -0x00c @ 1(r)>> Δ-4 {[@@-6]|[@@-12]}
<Call 0x24e04 0x21d52> {[@@-6]|[@@-12]}
<POP 24e08-24e0a StackAdj> Δ+8 {}
<MI 24e0a MOVE.L 0x26518,D6> {}
<POP 24e0c-24e0e StackAdj> Δ-4 {[-4-]}
<MI 24e0e MOVE.L (A6-0x6),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']}
<Call 0x24e10 0x21dfe> {[-4-]|[4, '(A6-0x6)']}
<POP 24e14-24e16 StackAdj> Δ+4 {[-4-]}
<MI 24e16 MOVE.L (A7)+,D0> Δ+4 {}
<MI 24e18 CMPI.L #0xffffffff,D0> {}
<MI 24e1e BEQ 0x250cc> {}
<POP 24e22-24e4c Naked> Σ0 ↓ →0x24e5a
<POP 24e22-24e24 StackAdj> Δ-4 {[-4-]}
<MI 24e24 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']}
<Const 0x24e26 0x0.4> Δ-4 {[-4-]|[4, '(A6-0x6)']|[##0]}
<Call 0x24e2a 0x2271a> {[-4-]|[4, '(A6-0x6)']|[##0]}
<POP 24e2e-24e30 StackAdj> Δ+8 {[-4-]}
<MI 24e30 MOVE.L (A7),(A6-0xa)> {[-4-]}
<POP 24e32-24e34 StackAdj> Δ+2 {[-2-]}
<MI 24e34 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-2-]|[4, '(A6-0xa)']}
<Call 0x24e36 0x23ffc> {[-2-]|[4, '(A6-0xa)']}
<POP 24e3a-24e3c StackAdj> Δ+4 {[-2-]}
<MI 24e3c MOVE.B (A7)+,D0> Δ+2 {}
<MI 24e3e EXTB.W D0> {}
<POP 0x24e40 LimitCheck 0x0 ≤ D0 ≤ 0x2b> {}
<MI 24e44 MOVE.B D0,(A6-0xb)> {}
<MI 24e48 TST.B D0> {}
<MI 24e4a BNE 0x24e5a> {}
<POP 24e4c-24e5a Naked> Σ0 →0x250c4
<MI 24e4c MOVE.L (A6-0xa),-(A7)> Δ-4 {[4, '(A6-0xa)']}
<MI 24e4e MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0xa)']|[4, '(A6-0x6)']}
<Call 0x24e50 0x24d3a> {[4, '(A6-0xa)']|[4, '(A6-0x6)']}
<POP 24e54-24e56 StackAdj> Δ+8 {}
<MI 24e56 BRA 0x250c4> {}
<POP 24e5a-24e90 Naked> Σ0 ↓ →0x24ebc ←0x24e22
<Pointer.fp 0x24e5a <LVAR -0x00a @ 4(rw)>> Δ-4 {[@@-10]}
<Call 0x24e5c 0x102bc> {[@@-10]}
FreeString(VAR a : String)
<POP 24e62-24e64 StackAdj> Δ+4 {}
<MI 24e64 MOVE.B D0,D1> {}
<MI 24e66 EXTB.W D1> {}
<POP 0x24e68 LimitCheck 0x0 ≤ D1 ≤ 0x2b> {}
<MI 24e6c LEA.L 0x218f4,A0> {}
<MI 24e70 MOVE.W D1,D0> {}
<MI 24e72 EXTW.L D0> {}
<MI 24e74 MOVE.L D0,D2> {}
<MI 24e76 ROR.L #0x1,D2> {}
<MI 24e78 ADDA.W D2,A0> {}
<MI 24e7a SWAP.W D2> {}
<MI 24e7c ROL.W #0x3,D2> {}
<MI 24e7e CLR.L D3> {}
<MI 24e80 MOVE.B (A0),D3> {}
<MI 24e82 LSL.B D2,D3> {}
<MI 24e84 LSR.B #0x4,D3> {}
<MI 24e86 MOVE.L D3,D5> {}
<MI 24e88 CMPI.L #0x0000000f,D5> {}
<MI 24e8e BEQ 0x24ebc> {}
<POP 24e90-24ebc Naked> Σ0 ↓
<MI 24e90 MOVE.L D0,D4> {}
<MI 24e92 MOVEQ.L #0x0a,D3> {}
<Call 0x24e94 0x1028c> {}
?muls_d3_d4
<MI 24e9a LEA.L 0x21726,A0> {}
<Blob 0x24e9e [10] (A0+D4.W)> Δ-10 {[«10»]}
<MI 24eb0 MOVE.L (A6-0x6),-(A7)> Δ-4 {[«10»]|[4, '(A6-0x6)']}
<MI 24eb2 MOVE.L D5,-(A7)> Δ-4 {[«10»]|[4, '(A6-0x6)']|[4, 'D5']}
<Call 0x24eb4 0x21e34> {[«10»]|[4, '(A6-0x6)']|[4, 'D5']}
<POP 24eb8-24ebc StackAdj> Δ+18 {}
<POP 24ebc-24ed0 Naked> Σ0 →0x24f26 →0x24f32 →0x24f44 →0x24f52 →0x250b6 →0x24f5a →0x24f5e →0x24f66 →0x24f6e →0x24f76 →0x24f7e →0x24f86 →0x24f8e →0x24f96 →0x24f9e →0x24fa6 →0x24fb0 →0x24fba →0x24fc4 →0x24fce →0x24fd8 →0x24fe2 →0x24fec →0x24ff6 →0x25000 →0x2500a →0x25014 →0x2501e →0x25028 →0x25032 →0x2503c →0x25046 →0x25050 →0x2505a →0x25064 →0x2506e →0x25078 →0x25082 →0x25088 →0x25092 →0x2509c →0x250a6 →0x250ac ←0x24e5a
<MI 24ebc SUBQ.W #0x1,D1> {}
<POP 0x24ebe LimitCheck 0x0 ≤ D1 ≤ 0x2a> {}
<MI 24ec6 ADD.W D1,D1> {}
<MI 24ec8 SWITCH D1.W> {}
<POP 24f26-24f2c Naked> Σ0 Δ-4 ↓ ←0x24ebc
<MI 24f26 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24f28 0x228a2> {[4, '(A6-0x6)']}
<POP 24f2c-24f32 Naked> Σ-4 Δ+4 →0x250c4 ←0x24f44 ←0x24f52 ←0x24f5e ←0x24f66 ←0x24f6e ←0x24f76 ←0x24f7e ←0x24f86 ←0x24f8e ←0x24f96 ←0x24f9e ←0x24fa6 ←0x24fb0 ←0x24fba ←0x24fc4 ←0x24fce ←0x24fd8 ←0x24fe2 ←0x24fec ←0x24ff6 ←0x25000 ←0x2500a ←0x25014 ←0x2501e ←0x25028 ←0x25032 ←0x2503c ←0x25046 ←0x25050 ←0x2505a ←0x25064 ←0x2506e ←0x25078 ←0x25088 ←0x25092 ←0x2509c ←0x250ac
<POP 24f2c-24f2e StackAdj> Δ+4 {}
<MI 24f2e BRA 0x250c4> {}
<POP 24f32-24f44 Naked> Σ0 →0x250c4 ←0x24ebc
<MI 24f32 CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x24f34 0x1.4> Δ-4 {[#0]|[##1]}
<Call 0x24f38 0x103b8> {[#0]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 24f3e-24f40 StackAdj> Δ+6 {}
<MI 24f40 BRA 0x250c4> {}
<POP 24f44-24f52 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<POP 24f44-24f46 StackAdj> Δ-4 {[-4-]}
<Call 0x24f46 0x102ac> {[-4-]}
FSCALL_102ac
<Call 0x24f4c 0x22878> {[-4-]}
<MI 24f50 BRA 0x24f2c> {[-4-]}
<POP 24f52-24f5a Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24f52 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24f54 0x22a7c> {[4, '(A6-0x6)']}
<MI 24f58 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24f5a-24f5e Naked> Σ0 →0x250c4 ←0x24ebc
<MI 24f5a BRA 0x250c4> {}
<POP 24f5e-24f66 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24f5e MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24f60 0x22da2> {[4, '(A6-0x6)']}
<MI 24f64 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24f66-24f6e Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24f66 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24f68 0x22f0e> {[4, '(A6-0x6)']}
<MI 24f6c BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24f6e-24f76 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24f6e MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24f70 0x22ffc> {[4, '(A6-0x6)']}
<MI 24f74 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24f76-24f7e Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24f76 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24f78 0x233f0> {[4, '(A6-0x6)']}
<MI 24f7c BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24f7e-24f86 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24f7e MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24f80 0x23468> {[4, '(A6-0x6)']}
<MI 24f84 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24f86-24f8e Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24f86 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24f88 0x234e0> {[4, '(A6-0x6)']}
<MI 24f8c BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24f8e-24f96 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24f8e MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24f90 0x2350c> {[4, '(A6-0x6)']}
<MI 24f94 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24f96-24f9e Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24f96 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24f98 0x2360c> {[4, '(A6-0x6)']}
<MI 24f9c BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24f9e-24fa6 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24f9e MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24fa0 0x236f2> {[4, '(A6-0x6)']}
<MI 24fa4 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24fa6-24fb0 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24fa6 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24fa8 0x2371e> {[4, '(A6-0x6)']}
<MI 24fac BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24fb0-24fba Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24fb0 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24fb2 0x2376a> {[4, '(A6-0x6)']}
<MI 24fb6 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24fba-24fc4 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24fba MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24fbc 0x237b6> {[4, '(A6-0x6)']}
<MI 24fc0 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24fc4-24fce Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24fc4 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24fc6 0x23802> {[4, '(A6-0x6)']}
<MI 24fca BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24fce-24fd8 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24fce MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24fd0 0x2384e> {[4, '(A6-0x6)']}
<MI 24fd4 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24fd8-24fe2 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24fd8 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24fda 0x2389a> {[4, '(A6-0x6)']}
<MI 24fde BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24fe2-24fec Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24fe2 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24fe4 0x238e6> {[4, '(A6-0x6)']}
<MI 24fe8 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24fec-24ff6 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24fec MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24fee 0x23930> {[4, '(A6-0x6)']}
<MI 24ff2 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 24ff6-25000 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 24ff6 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x24ff8 0x2397a> {[4, '(A6-0x6)']}
<MI 24ffc BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 25000-2500a Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 25000 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25002 0x239c4> {[4, '(A6-0x6)']}
<MI 25006 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 2500a-25014 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 2500a MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2500c 0x23a0e> {[4, '(A6-0x6)']}
<MI 25010 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 25014-2501e Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 25014 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25016 0x23a58> {[4, '(A6-0x6)']}
<MI 2501a BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 2501e-25028 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 2501e MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25020 0x23aa2> {[4, '(A6-0x6)']}
<MI 25024 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 25028-25032 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 25028 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2502a 0x23aec> {[4, '(A6-0x6)']}
<MI 2502e BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 25032-2503c Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 25032 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25034 0x23b36> {[4, '(A6-0x6)']}
<MI 25038 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 2503c-25046 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 2503c MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2503e 0x23b7a> {[4, '(A6-0x6)']}
<MI 25042 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 25046-25050 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 25046 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25048 0x23bc0> {[4, '(A6-0x6)']}
<MI 2504c BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 25050-2505a Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 25050 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25052 0x23bf6> {[4, '(A6-0x6)']}
<MI 25056 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 2505a-25064 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 2505a MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2505c 0x23c86> {[4, '(A6-0x6)']}
<MI 25060 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 25064-2506e Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 25064 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25066 0x23cf8> {[4, '(A6-0x6)']}
<MI 2506a BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 2506e-25078 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 2506e MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25070 0x2305e> {[4, '(A6-0x6)']}
<MI 25074 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 25078-25082 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 25078 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2507a 0x230c8> {[4, '(A6-0x6)']}
<MI 2507e BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 25082-25088 Naked> Σ0 →0x250c4 ←0x24ebc
<Call 0x25082 0x2309a> {}
<MI 25086 BRA 0x250c4> {}
<POP 25088-25092 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 25088 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2508a 0x23d6a> {[4, '(A6-0x6)']}
<MI 2508e BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 25092-2509c Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 25092 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x25094 0x23dec> {[4, '(A6-0x6)']}
<MI 25098 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 2509c-250a6 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 2509c MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x2509e 0x23e6c> {[4, '(A6-0x6)']}
<MI 250a2 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 250a6-250ac Naked> Σ0 →0x250c4 ←0x24ebc
<Call 0x250a6 0x23f30> {}
<MI 250aa BRA 0x250c4> {}
<POP 250ac-250b6 Naked> Σ0 Δ-4 →0x24f2c ←0x24ebc
<MI 250ac MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x250ae 0x23f50> {[4, '(A6-0x6)']}
<MI 250b2 BRA 0x24f2c> {[4, '(A6-0x6)']}
<POP 250b6-250c4 Naked> Σ0 ←0x24ebc
<POP 250b6-250c4 Bailout> {}
<MI 250b6 MOVEA.L (A5+0x8),A7>
<MI 250ba MOVEA.W #0x0,A6>
<MI 250be JMP 0x252ce>
<POP 250c4-250cc Naked> Σ0 ↓ ←0x24e4c ←0x24f2c ←0x24f32 ←0x24f5a ←0x25082 ←0x250a6
<MI 250c4 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Call 0x250c6 0x219b0> {[4, '(A6-0x6)']}
<POP 250ca-250cc StackAdj> Δ+4 {}
<POP 250cc-250e2 Naked> Σ0 ↓ →0x24dfc ←0x24dfc
<MI 250cc MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']}
<MI 250ce MOVE.L D6,-(A7)> Δ-4 {[4, 'D6']|[4, 'D6']}
<MI 250d0 SUB.L D7,(A7)> {[4, 'D6']|[-4-]}
<Call 0x250d2 0x21f46> {[4, 'D6']|[-4-]}
<POP 250d6-250d8 StackAdj> Δ+8 {}
<MI 250d8 MOVE.L D7,0x26518> {}
<MI 250da TST.B (A6-0xc)> {}
<MI 250de BEQ 0x24dfc> {}
<POP 250e2-250ea Epilogue> Σ0
@ 250ea
START
<POP 250ea--0001 Body>
<POP 250ea-250f4 Prologue> Σ0
<POP 250f4-25124 Naked> Σ0 ↓ →0x2518c
<MI 250f4 MOVE.L #0x1,0x26542> {}
<POP 250fe-25100 StackAdj> Δ-4 {[-4-]}
<Call 0x25100 0x103c4> {[-4-]}
GetArgv() : String
<MI 25106 MOVE.L (A7)+,0x26546> Δ+4 {}
<Const 0x2510c 0x26520.4> Δ-4 {[##156960]}
<Call 0x25112 0x212fc> {[##156960]}
<POP 25118-2511a StackAdj> Δ+4 {}
<MI 2511a MOVEA.L 0x26546,A0> {}
<MI 25120 TST.W (A0)> {}
<MI 25122 BLE 0x2518c> {}
<POP 25124-2518c Naked> Σ0 →0x251c6
<Blob 0x25124 [8] @> Δ-8 {[«8""»]}
<Blob 0x25134 [8] @> Δ-8 {[«8""»]|[«8""»]}
<POP 25144-25146 StackAdj> Δ-8 {[«8""»]|[«8""»]|[-8-]}
<Lit 0x25146 7> {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]}
<POP 25158-2515a StackAdj> Δ-4 {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[-4-]}
<POP 2515a-2515b StackAdj> Δ+4 {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]}
<Blob 0x2515b [4] 0x26546> Δ-4 {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]}
<POP 25160-25162 StackAdj> Δ-4 {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]|[-4-]}
<Lit 0x25162 7> {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]|[$$][BYE];]}
<Call 0x25176 0x102d4> {[«8""»]|[«8""»]|[-4-]|[$$[INIT][]|[«4»]|[$$][BYE];]}
StringCat3(a, b, c : String) : String
<POP 2517c-25180 StackAdj> Δ+12 {[«8""»]|[«8""»]|[-4-]}
<MI 25180 MOVE.L (A7)+,0x26546> Δ+4 {[«8""»]|[«8""»]}
<POP 25186-2518a StackAdj> Δ+16 {}
<MI 2518a BRA 0x251c6> {}
<POP 2518c-251c6 Naked> Σ0 ↓ ←0x250f4
<Const 0x2518c 0x26546.4> Δ-4 {[##156998]}
<Call 0x25192 0x102bc> {[##156998]}
FreeString(VAR a : String)
<POP 25198-25199 StackAdj> Δ+4 ↓ {}
<Blob 0x25199 [8] @> Δ-8 {[«8""»]}
<POP 251a8-251aa StackAdj> Δ-4 {[«8""»]|[-4-]}
<Lit 0x251aa 7> {[«8""»]|[$$[INIT];]}
<MI 251be MOVE.L (A7)+,0x26546> Δ+4 {[«8""»]}
<POP 251c4-251c6 StackAdj> Δ+8 {}
<POP 251c6-251ce Naked> Σ0 ↓ ←0x25124
<MI 251c6 MOVE.B #0x01,0x26550> {}
<POP 251ce-251d6 Naked> Σ0 ↓ →0x251e0 ←0x252dc
<MI 251ce TST.B 0x26550> {}
<MI 251d4 BEQ 0x251e0> {}
<POP 251d6-251e0 Naked> Σ0 →0x2528e
<MI 251d6 CLR.B 0x26550> {}
<MI 251dc BRA 0x2528e> {}
<POP 251e0-2528e Naked> Σ0 ↓ ←0x251ce
<Blob 0x251e0 [10] 0x2652a> Δ-10 {[«10»]}
<Blob 0x251ee [2] @> Δ-2 {[«10»]|[«2""»]}
<POP 251f2-251f6 StackAdj> Δ-12 {[«10»]|[«2""»]|[-12-]}
<Lit 0x251f6> {[«10»]|[«2""»]|[-8-]|[$$…]}
<Pointer.sp 0x251f6 14> Δ-4
<Const 0x251fa 0x1.2> Δ-2
<Const 0x251fe 0xa.2> Δ-2
<Call 0x25202 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 25208-2520a StackAdj> Δ+8
<POP 25208-2520a StackAdj> Δ-4 {[«10»]|[«2""»]|[-8-]|[$$…]|[-4-]}
<Lit 0x2520a 2> {[«10»]|[«2""»]|[-8-]|[$$…]|[$$>_]}
<Call 0x2521e 0x102d0> {[«10»]|[«2""»]|[-8-]|[$$…]|[$$>_]}
StringCat2(a, b : String) : String
<POP 25224-25226 StackAdj> Δ+8 {[«10»]|[«2""»]|[-8-]}
<Call 0x25226 0x103e4> {[«10»]|[«2""»]|[-8-]}
AskConsoleString(prompt : String) : String
<POP 2522c-2522e StackAdj> Δ+4 {[«10»]|[«2""»]|[-4-]}
<MI 2522e MOVE.L (A7)+,0x2654c> Δ+4 {[«10»]|[«2""»]}
<POP 25234-25236 StackAdj> Δ+8 {[-4-]}
<POP 25236-25237 StackAdj> Δ+4 {}
<Blob 0x25237 [4] 0x2654c> Δ-4 {[«4»]}
<Call 0x2523c 0x21c4a> {[«4»]}
<POP 25240-25242 StackAdj> Δ+2 {[-2-]}
<POP 25242-25243 StackAdj> Δ+2 {}
<Blob 0x25243 [2] @> Δ-2 {[«2""»]}
<Blob 0x25246 [2] @> Δ-2 {[«2""»]|[«2""»]}
<POP 2524a-2524c StackAdj> Δ-8 {[«2""»]|[«2""»]|[-8-]}
<Lit 0x2524c 2> {[«2""»]|[«2""»]|[-4-]|[$$[ ]}
<POP 2525e-25260 StackAdj> Δ-4 {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[-4-]}
<POP 25260-25261 StackAdj> Δ+4 {[«2""»]|[«2""»]|[-4-]|[$$[ ]}
<Blob 0x25261 [4] 0x2654c> Δ-4 {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]}
<POP 25266-25268 StackAdj> Δ-4 {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]|[-4-]}
<Lit 0x25268 2> {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]|[$$];]}
<Call 0x2527c 0x102d4> {[«2""»]|[«2""»]|[-4-]|[$$[ ]|[«4»]|[$$];]}
StringCat3(a, b, c : String) : String
<POP 25282-25286 StackAdj> Δ+12 {[«2""»]|[«2""»]|[-4-]}
<MI 25286 MOVE.L (A7)+,0x26546> Δ+4 {[«2""»]|[«2""»]}
<POP 2528c-2528e StackAdj> Δ+4 {}
<POP 2528e-252ba Naked> Σ0 ↓ ←0x251d6
<MI 2528e CLR.B 0x2654a> {}
<MI 25294 MOVE.L #0x1,0x26518> {}
<MI 2529e CLR.L 0x2651c> {}
<POP 252a4-252a6 StackAdj> Δ-4 {[-4-]}
<Blob 0x252a6 [4] 0x26546> Δ-4 {[-4-]|[«4»]}
<Call 0x252ac 0x102cc> {[-4-]|[«4»]}
StringDup(a : String) : String
<POP 252b2-252b4 StackAdj> Δ+4 {[-4-]}
<Call 0x252b4 0x227bc> {[-4-]}
<POP 252b8-252ba StackAdj> Δ+4 {}
<POP 252ba-252c8 Naked> Σ0 ↓ →0x252ce ←0x252c8
<MI 252ba MOVE.L 0x26518,D0> {}
<MI 252c0 CMP.L 0x2651c,D0> {}
<MI 252c6 BGT 0x252ce> {}
<POP 252c8-252ce Naked> Σ0 →0x252ba
<Call 0x252c8 0x24dd8> {}
<MI 252cc BRA 0x252ba> {}
<POP 252ce-252dc Naked> Σ0 ↓ ←0x252ba
<Const 0x252ce 0x26546.4> Δ-4 {[##156998]}
<Call 0x252d4 0x102bc> {[##156998]}
FreeString(VAR a : String)
<POP 252da-252dc StackAdj> Δ+4 {}
<POP 252dc-252e0 Naked> Σ0 →0x251ce
<MI 252dc BRA 0x251ce> {}
@ 252f4
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 252f4-2535c Body>
<POP 252f4-2530a Prologue> Σ0 ↓
<POP 2530a-25354 Naked> Σ0 ↓
<Blob 0x2530a [14] @> Δ-14 {[«14""»]}
<Const 0x25316 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 2531a-2531c StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x2531c 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 2532e-25330 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 25330 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 25334 EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 25336 EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 25338 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x2533a 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 25340-25342 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x25342 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 25348-2534a StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x2534a 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 25350-25354 StackAdj> Δ+20 {}
<POP 25354-2535c Epilogue> Σ0
@ 253b0
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 253b0-254ec Body>
<POP 253b0-253c6 Prologue> Σ0 ↓
<POP 253c6-253dc RegCacheLoad> Σ0 ↓
<POP 253dc-2543c Naked> Σ0 ↓ →0x25484
<Call 0x253dc 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x253e2 [18] @> Δ-18 {[«18""»]}
<POP 253ee-253f0 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x253f0 18> {[«18""»]|[$$Experiment error :]}
<Call 0x253fc 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 253fe-253ff StackAdj> Δ+22 ↓ {}
<Blob 0x253ff [14] @> Δ-14 {[«14""»]}
<POP 2540e-25410 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x25410 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 2541a-2541c StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 2541c MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x25420 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 25426-25428 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x25428 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 2542e-25430 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x25430 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 25432-25434 StackAdj> Δ+18 {}
<MI 25434 MOVEA.L (A6+0xa),A0> {}
<MI 25438 CMPA.W #0x01,A0> {}
<MI 2543a BEQ 0x25484> {}
<POP 2543c-25484 Naked> Σ0 ↓
<Blob 0x2543c [14] @> Δ-14 {[«14""»]}
<Blob 0x2544c [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 2545c-2545e StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x2545e 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 25468-2546a StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x2546a> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x2546a 12> Δ-4
<Const 0x2546e 0x1.2> Δ-2
<Const 0x25470 0x1e.2> Δ-2
<Call 0x25472 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 25474-25476 StackAdj> Δ+8
<Call 0x25476 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 2547c-2547e StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x2547e 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 25480-25484 StackAdj> Δ+48 {}
<POP 25484-254e4 Naked> Σ0 ↓ ←0x253dc
<Blob 0x25484 [14] @> Δ-14 {[«14""»]}
<POP 25494-25496 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x25496 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 254a0-254a2 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 254a2 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x254a6 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 254ac-254ae StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x254ae 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 254b4-254b6 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x254b6 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 254b8-254b9 StackAdj> Δ+18 ↓ {}
<Blob 0x254b9 [24] @> Δ-24 {[«24""»]}
<Const 0x254c8 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 254cc-254ce StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x254ce 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x254dc 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 254e2-254e4 StackAdj> Δ+30 {}
<POP 254e4-254ec Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.ec1f0ce99c455a30 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 50 ea | P | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 65 64 | ed | .PTR 0x26564 00020010 code.end: 00020010 00 02 54 ec | T | .PTR 0x254ec 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 52 f4 | R | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 53 b0 | S | .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 70 61 |@(#)pa | .XXX[0x6] 00020110 74 63 68 2c 32 2e 31 2c |tch,2.1,| .XXX[0x18] 00020118 39 30 2f 31 32 2f 30 36 |90/12/06| 00020120 2c 31 32 3a 34 34 3a 30 |,12:44:0| 00020128 30 5c |0\ | .XXX[0x2] 0002012a 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal hex argument' 0002013e 4f 4c 44 20 6f 72 20 4e |OLD or N| .TXT 'OLD or NEW value larger than size allows' 00020166 50 72 6f 62 6c 65 6d 20 |Problem | .TXT 'Problem with file ' 00020178 41 6c 69 67 6e 6d 65 6e |Alignmen| .TXT 'Alignment problem with ADDRESS/SIZE ' 0002019c 54 61 72 67 65 74 20 64 |Target d| .TXT 'Target data not as specified in OLD data' 000201c4 45 6e 74 65 72 20 66 69 |Enter fi| .TXT 'Enter filename with extention [e.g. foobar.m200] :_ ' 000201f8 45 6e 74 65 72 20 62 61 |Enter ba| .TXT 'Enter base address of file (in hex) :_' 0002021e 45 6e 74 65 72 20 64 61 |Enter da| .TXT 'Enter data size code [ B/W/L ] :_ ' 00020240 45 6e 74 65 72 20 65 78 |Enter ex| .TXT 'Enter expected old (current) data (in hex) :_ ' 0002026e 45 6e 74 65 72 20 6e 65 |Enter ne| .TXT 'Enter new data (in hex) :_' 00020288 45 6e 74 65 72 20 61 64 |Enter ad| .TXT 'Enter address of data change/dump (in hex) :_ ' 000202b6 20 3a | : | .TXT ' :' 000202b8 5f 20 |_ | .XXX[0x2] 000202ba 20 5f | _ | .TXT ' _' 000202bc 46 4e |FN | .TXT 'FN' 000202be 42 41 53 45 |BASE | .TXT 'BASE' 000202c2 41 44 44 52 45 53 53 20 |ADDRESS | .TXT 'ADDRESS ' 000202ca 42 59 54 45 |BYTE | .TXT 'BYTE' 000202ce 57 4f 52 44 |WORD | .TXT 'WORD' 000202d2 4c 4f 4e 47 |LONG | .TXT 'LONG' 000202d6 57 4f 52 44 |WORD | .TXT 'WORD' 000202da 4f 4c |OL | .TXT 'OL' 000202dc 44 20 |D | .XXX[0x2] 000202de 4e 45 |NE | .TXT 'NE' 000202e0 57 20 43 48 41 4e 47 45 |W CHANGE| .XXX[0x30] 000202e8 20 20 20 20 20 20 44 55 | DU| 000202f0 4d 50 20 20 20 20 20 20 |MP | 000202f8 20 20 50 41 54 43 48 20 | PATCH | 00020300 20 20 20 20 00 00 00 00 | | 00020308 00 00 ff 03 00 00 00 00 | | 00020310 00 00 00 00 00 00 00 00 | | .BLANK 00[0x20] 00020330 7e 00 00 00 00 00 00 00 |~ | .XXX[0x8] 00020338 00 00 00 00 00 00 00 00 | | .BLANK 00[0x10] 00020348 00 00 ff 03 00 00 00 00 | | .XXX[0x8] 00020350 00 00 00 00 00 00 00 00 | | .BLANK 00[0x18] 00020368 00 00 00 00 7e 00 00 00 | ~ | .XXX[0x8] 00020370 00 00 00 00 00 00 00 00 | | .BLANK 00[0x10] 00020380 00 00 00 00 43 48 41 4e | CHAN| .XXX[0x18] 00020388 47 45 20 20 20 20 20 20 |GE | 00020390 44 55 4d 50 20 20 20 20 |DUMP | 00020398 20 20 20 20 | | .XXX[0x4] 0002039c ; -------------------------------------------------------------------------------------- 0002039c ; OMSI PASCAL Function 0002039c ; <LVAR 0x016 4(r)> 0002039c ; <LVAR 0x012 @ 4(r)> 0002039c ; <LVAR 0x010 1(r)> 0002039c ; <LVAR 0x00c 4(r)> 0002039c ; <LVAR 0x008 4(r)> 0002039c ; -------------------------------------------------------------------------------------- 0002039c 4e 56 ff d6 |NV | LINK.W A6,#0xffd6 000203a0 bf d5 | | CMPA.L (A5),A7 000203a2 62 06 |b | BHI 0x203aa 000203a4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000203a8 4e 76 |Nv | TRAPV 000203aa de fc 00 28 | ( | ADDA.W #0x28,A7 000203ae 48 e7 00 c0 |H | MOVEM.L A1+A0,-(A7) 000203b2 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000203b6 22 6e 00 0c |"n | MOVEA.L (A6+0xc),A1 000203ba 2f 2e 00 16 |/. | MOVE.L (A6+0x16),-(A7) 000203be 48 78 00 00 |Hx | PEA.L 0x0 000203c2 2f 2e 00 12 |/. | MOVE.L (A6+0x12),-(A7) 000203c6 48 50 |HP | PEA.L (A0) 000203c8 48 51 |HQ | PEA.L (A1) 000203ca 4e b9 00 02 4c 52 |N LR | JSR 0x24c52 000203d0 de fc 00 14 | | ADDA.W #0x14,A7 000203d4 48 6e 00 12 |Hn | PEA.L (A6+0x12) 000203d8 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000203de 58 4f |XO | ADDQ.L #0x4,A7 000203e0 4a 11 |J | TST.B (A1) 000203e2 67 10 |g | BEQ 0x203f4 000203e4 4a 2e 00 10 |J. | TST.B (A6+0x10) 000203e8 66 0a |f | BNE 0x203f4 000203ea 48 50 |HP | PEA.L (A0) 000203ec 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000203f2 58 4f |XO | ADDQ.L #0x4,A7 000203f4 4c df 03 00 |L | MOVEM.L (A7)+,A0+A1 000203f8 4e 5e |N^ | UNLK A6 000203fa 4e 75 |Nu | RTS 000203fc ; -------------------------------------------------------------------------------------- 000203fc ; OMSI PASCAL Function 000203fc ; <LVAR 0x008 4(r)> 000203fc ; -------------------------------------------------------------------------------------- 000203fc 4e 56 ff f6 |NV | LINK.W A6,#0xfff6 00020400 bf d5 | | CMPA.L (A5),A7 00020402 62 06 |b | BHI 0x2040a 00020404 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020408 4e 76 |Nv | TRAPV 0002040a de fc 00 0a | | ADDA.W #0xa,A7 0002040e 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00020412 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020416 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002041c 5c 4f |\O | ADDQ.L #0x6,A7 0002041e 4e 5e |N^ | UNLK A6 00020420 4e 75 |Nu | RTS 00020422 ; -------------------------------------------------------------------------------------- 00020422 ; OMSI PASCAL Function 00020422 ; <LVAR 0x00a 4(w)> 00020422 ; <LVAR 0x008 1(r)> 00020422 ; -------------------------------------------------------------------------------------- 00020422 4e 56 ff ec |NV | LINK.W A6,#0xffec 00020426 bf d5 | | CMPA.L (A5),A7 00020428 62 06 |b | BHI 0x20430 0002042a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002042e 4e 76 |Nv | TRAPV 00020430 de fc 00 12 | | ADDA.W #0x12,A7 00020434 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00020438 42 80 |B | CLR.L D0 0002043a 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 0002043e 41 fa fe c4 |A | LEA.L 0x20304,A0 00020442 32 00 |2 | MOVE.W D0,D1 00020444 e6 49 | I | LSR.W #0x3,D1 00020446 01 30 10 00 | 0 | BTST.B D0,(A0+D1.W) 0002044a 67 0c |g | BEQ 0x20458 0002044c 04 40 00 30 | @ 0 | SUBI.W #0x0030,D0 00020450 48 c0 |H | EXTW.L D0 00020452 2d 40 00 0a |-@ | MOVE.L D0,(A6+0xa) 00020456 60 08 |` | BRA 0x20460 00020458 2d 7c ff ff ff ff 00 0a |-| | MOVE.L #0xffffffff,(A6+0xa) 00020460 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00020464 4e 5e |N^ | UNLK A6 00020466 4e 75 |Nu | RTS 00020468 ; -------------------------------------------------------------------------------------- 00020468 ; OMSI PASCAL Function 00020468 ; <LVAR 0x00a 4(w)> 00020468 ; <LVAR 0x008 1(rw)> 00020468 ; -------------------------------------------------------------------------------------- 00020468 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 0002046c bf d5 | | CMPA.L (A5),A7 0002046e 62 06 |b | BHI 0x20476 00020470 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020474 4e 76 |Nv | TRAPV 00020476 de fc 00 1a | | ADDA.W #0x1a,A7 0002047a 48 e7 e0 c0 |H | MOVEM.L A1+A0+D2+D1+D0,-(A7) 0002047e 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00020482 74 20 |t | MOVEQ.L #0x20,D2 00020484 42 80 |B | CLR.L D0 00020486 10 11 | | MOVE.B (A1),D0 00020488 41 fa fe 9a |A | LEA.L 0x20324,A0 0002048c 32 00 |2 | MOVE.W D0,D1 0002048e e6 49 | I | LSR.W #0x3,D1 00020490 01 30 10 00 | 0 | BTST.B D0,(A0+D1.W) 00020494 67 08 |g | BEQ 0x2049e 00020496 90 42 | B | SUB.W D2,D0 00020498 41 bc 00 ff |A | CHK.W #0xff,D0 0002049c 12 80 | | MOVE.B D0,(A1) 0002049e 42 80 |B | CLR.L D0 000204a0 10 11 | | MOVE.B (A1),D0 000204a2 41 fa fe a0 |A | LEA.L 0x20344,A0 000204a6 32 00 |2 | MOVE.W D0,D1 000204a8 e6 49 | I | LSR.W #0x3,D1 000204aa 01 30 10 00 | 0 | BTST.B D0,(A0+D1.W) 000204ae 67 0c |g | BEQ 0x204bc 000204b0 04 40 00 30 | @ 0 | SUBI.W #0x0030,D0 000204b4 48 c0 |H | EXTW.L D0 000204b6 2d 40 00 0a |-@ | MOVE.L D0,(A6+0xa) 000204ba 60 28 |`( | BRA 0x204e4 000204bc 41 fa fe a6 |A | LEA.L 0x20364,A0 000204c0 32 00 |2 | MOVE.W D0,D1 000204c2 e6 49 | I | LSR.W #0x3,D1 000204c4 b2 42 | B | CMP.W D2,D1 000204c6 6d 04 |m | BLT 0x204cc 000204c8 72 00 |r | MOVEQ.L #0x00,D1 000204ca 60 04 |` | BRA 0x204d0 000204cc 01 30 10 00 | 0 | BTST.B D0,(A0+D1.W) 000204d0 67 0a |g | BEQ 0x204dc 000204d2 04 40 00 41 | @ A | SUBI.W #0x0041,D0 000204d6 06 40 00 0a | @ | ADDI.W #0x000a,D0 000204da 60 d8 |` | BRA 0x204b4 000204dc 2d 7c ff ff ff ff 00 0a |-| | MOVE.L #0xffffffff,(A6+0xa) 000204e4 4c df 03 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1 000204e8 4e 5e |N^ | UNLK A6 000204ea 4e 75 |Nu | RTS 000204ec ; -------------------------------------------------------------------------------------- 000204ec ; OMSI PASCAL Function 000204ec ; <LVAR 0x00c 1(rw)> 000204ec ; <LVAR 0x008 4(r)> 000204ec ; -------------------------------------------------------------------------------------- 000204ec 4e 56 ff fc |NV | LINK.W A6,#0xfffc 000204f0 bf d5 | | CMPA.L (A5),A7 000204f2 62 06 |b | BHI 0x204fa 000204f4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000204f8 4e 76 |Nv | TRAPV 000204fa de fc 00 04 | | ADDA.W #0x4,A7 000204fe 42 2e 00 0c |B. | CLR.B (A6+0xc) 00020502 4a ae 00 08 |J | TST.L (A6+0x8) 00020506 6d 04 |m | BLT 0x2050c 00020508 52 2e 00 0c |R. | ADDQ.B #0x1,(A6+0xc) 0002050c 4e 5e |N^ | UNLK A6 0002050e 4e 75 |Nu | RTS 00020510 ; -------------------------------------------------------------------------------------- 00020510 ; OMSI PASCAL Function 00020510 ; <LVAR 0x014 @ 4(r)> 00020510 ; <LVAR 0x010 4(r)> 00020510 ; <LVAR 0x00c 4(r)> 00020510 ; <LVAR 0x008 4(r)> 00020510 ; <LVAR -0x004 4(rw)> 00020510 ; <LVAR -0x008 4(rw)> 00020510 ; <LVAR -0x00e 2(rw)> 00020510 ; -------------------------------------------------------------------------------------- 00020510 4e 56 ff a0 |NV | LINK.W A6,#0xffa0 00020514 bf d5 | | CMPA.L (A5),A7 00020516 62 06 |b | BHI 0x2051e 00020518 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002051c 4e 76 |Nv | TRAPV 0002051e de fc 00 4c | L | ADDA.W #0x4c,A7 00020522 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020526 45 ee 00 08 |E | LEA.L (A6+0x8),A2 0002052a 47 ee 00 10 |G | LEA.L (A6+0x10),A3 0002052e 49 ee ff f2 |I | LEA.L (A6-0xe),A4 00020532 72 10 |r | MOVEQ.L #0x10,D1 00020534 74 2d |t- | MOVEQ.L #0x2d,D2 00020536 2d 7c 0c cc cc cc ff f8 |-| | MOVE.L #0xccccccc,(A6-0x8) 0002053e 2d 7c f3 33 33 34 ff fc |-| 334 | MOVE.L #0xf3333334,(A6-0x4) 00020546 20 13 | | MOVE.L (A3),D0 00020548 0c 80 00 00 00 0a | | CMPI.L #0x0000000a,D0 0002054e 67 08 |g | BEQ 0x20558 00020550 b0 81 | | CMP.L D1,D0 00020552 67 04 |g | BEQ 0x20558 00020554 60 00 00 f4 |` | BRA 0x2064a 00020558 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 0002055c 42 10 |B | CLR.B (A0) 0002055e 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 00020562 2f 08 |/ | MOVE.L A0,-(A7) 00020564 7c 01 || | MOVEQ.L #0x01,D6 00020566 4a 50 |JP | TST.W (A0) 00020568 66 06 |f | BNE 0x20570 0002056a 58 4f |XO | ADDQ.L #0x4,A7 0002056c 60 00 00 dc |` | BRA 0x2064a 00020570 20 57 | W | MOVEA.L (A7),A0 00020572 10 28 00 02 | ( | MOVE.B (A0+0x2),D0 00020576 b0 02 | | CMP.B D2,D0 00020578 66 06 |f | BNE 0x20580 0002057a 38 bc ff ff |8 | MOVE.W #0xffff,(A4) 0002057e 60 04 |` | BRA 0x20584 00020580 38 bc 00 01 |8 | MOVE.W #0x1,(A4) 00020584 10 28 00 02 | ( | MOVE.B (A0+0x2),D0 00020588 0c 00 00 2b | + | CMPI.B #0x2b,D0 0002058c 67 04 |g | BEQ 0x20592 0002058e b0 02 | | CMP.B D2,D0 00020590 66 10 |f | BNE 0x205a2 00020592 52 86 |R | ADDQ.L #0x1,D6 00020594 30 10 |0 | MOVE.W (A0),D0 00020596 48 c0 |H | EXTW.L D0 00020598 bc 80 | | CMP.L D0,D6 0002059a 6f 06 |o | BLE 0x205a2 0002059c 58 4f |XO | ADDQ.L #0x4,A7 0002059e 60 00 00 aa |` | BRA 0x2064a 000205a2 20 52 | R | MOVEA.L (A2),A0 000205a4 42 90 |B | CLR.L (A0) 000205a6 20 06 | | MOVE.L D6,D0 000205a8 53 80 |S | SUBQ.L #0x1,D0 000205aa 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 000205b0 63 02 |c | BLS 0x205b4 000205b2 4e 4f |NO | TRAP #15 000205b4 20 57 | W | MOVEA.L (A7),A0 000205b6 1a 30 08 02 | 0 | MOVE.B (A0+D0.L+#0x2),D5 000205ba 20 13 | | MOVE.L (A3),D0 000205bc b0 81 | | CMP.L D1,D0 000205be 66 0a |f | BNE 0x205ca 000205c0 59 4f |YO | SUBQ.L #0x4,A7 000205c2 1f 05 | | MOVE.B D5,-(A7) 000205c4 4e ba fe a2 |N | JSR 0x20468 000205c8 60 08 |` | BRA 0x205d2 000205ca 59 4f |YO | SUBQ.L #0x4,A7 000205cc 1f 05 | | MOVE.B D5,-(A7) 000205ce 4e ba fe 52 |N R | JSR 0x20422 000205d2 54 4f |TO | ADDQ.L #0x2,A7 000205d4 26 1f |& | MOVE.L (A7)+,D3 000205d6 38 14 |8 | MOVE.W (A4),D4 000205d8 48 c4 |H | EXTW.L D4 000205da 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 000205e0 2e 04 |. | MOVE.L D4,D7 000205e2 22 52 |"R | MOVEA.L (A2),A1 000205e4 20 11 | | MOVE.L (A1),D0 000205e6 b0 ae ff fc | | CMP.L (A6-0x4),D0 000205ea 6d 06 |m | BLT 0x205f2 000205ec b0 ae ff f8 | | CMP.L (A6-0x8),D0 000205f0 6f 04 |o | BLE 0x205f6 000205f2 58 4f |XO | ADDQ.L #0x4,A7 000205f4 60 54 |`T | BRA 0x2064a 000205f6 20 52 | R | MOVEA.L (A2),A0 000205f8 28 10 |( | MOVE.L (A0),D4 000205fa 26 13 |& | MOVE.L (A3),D3 000205fc 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00020602 20 84 | | MOVE.L D4,(A0) 00020604 4a 84 |J | TST.L D4 00020606 66 04 |f | BNE 0x2060c 00020608 55 4f |UO | SUBQ.L #0x2,A7 0002060a 60 20 |` | BRA 0x2062c 0002060c 55 4f |UO | SUBQ.L #0x2,A7 0002060e 2f 04 |/ | MOVE.L D4,-(A7) 00020610 4e ba fe da |N | JSR 0x204ec 00020614 54 4f |TO | ADDQ.L #0x2,A7 00020616 2f 04 |/ | MOVE.L D4,-(A7) 00020618 df 97 | | ADD.L D7,(A7) 0002061a 4e ba fe d0 |N | JSR 0x204ec 0002061e 58 4f |XO | ADDQ.L #0x4,A7 00020620 10 2f 00 02 | / | MOVE.B (A7+0x2),D0 00020624 b0 1f | | CMP.B (A7)+,D0 00020626 67 04 |g | BEQ 0x2062c 00020628 5c 4f |\O | ADDQ.L #0x6,A7 0002062a 60 1e |` | BRA 0x2064a 0002062c 54 4f |TO | ADDQ.L #0x2,A7 0002062e 20 52 | R | MOVEA.L (A2),A0 00020630 df 90 | | ADD.L D7,(A0) 00020632 52 86 |R | ADDQ.L #0x1,D6 00020634 20 57 | W | MOVEA.L (A7),A0 00020636 30 10 |0 | MOVE.W (A0),D0 00020638 48 c0 |H | EXTW.L D0 0002063a bc 80 | | CMP.L D0,D6 0002063c 6f 00 ff 68 |o h | BLE 0x205a6 00020640 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00020644 10 bc 00 01 | | MOVE.B #0x01,(A0) 00020648 58 4f |XO | ADDQ.L #0x4,A7 0002064a 48 6e 00 14 |Hn | PEA.L (A6+0x14) 0002064e 48 78 00 80 |Hx | PEA.L 0x80 00020652 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 00020658 50 4f |PO | ADDQ.L #0x8,A7 0002065a 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 0002065e 4e 5e |N^ | UNLK A6 00020660 4e 75 |Nu | RTS 00020662 ; -------------------------------------------------------------------------------------- 00020662 ; OMSI PASCAL Function 00020662 ; <LVAR -0x004 @ 1(r)> 00020662 ; <LVAR -0x008 4(w)> 00020662 ; <LVAR -0x00e 4(w)> 00020662 ; <LVAR -0x010 2(rw)> 00020662 ; <LVAR -0x012 2(rw)> 00020662 ; <LVAR -0x014 2(w)> 00020662 ; <LVAR -0x016 2(w)> 00020662 ; <LVAR -0x01a 2(rw)> 00020662 ; <LVAR -0x01c 2(rw)> 00020662 ; <LVAR -0x01e 2(w)> 00020662 ; <LVAR -0x020 2(w)> 00020662 ; <LVAR -0x420 @> 00020662 ; <LVAR -0x428 4(w)> 00020662 ; <LVAR -0x42c @ 4(r)> 00020662 ; <LVAR -0x430 4(rw)> 00020662 ; <LVAR -0x434 @ 4(rw)> 00020662 ; -------------------------------------------------------------------------------------- 00020662 4e 56 fb 44 |NV D | LINK.W A6,#0xfb44 00020666 bf d5 | | CMPA.L (A5),A7 00020668 62 06 |b | BHI 0x20670 0002066a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002066e 4e 76 |Nv | TRAPV 00020670 de fc 00 88 | | ADDA.W #0x88,A7 00020674 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020678 45 f9 00 01 02 94 |E | LEA.L ?divs_d3_d4,A2 0002067e 47 ee fb cc |G | LEA.L (A6-0x434),A3 00020682 49 ee ff fc |I | LEA.L (A6-0x4),A4 00020686 41 ee fb e0 |A | LEA.L (A6-0x420),A0 0002068a 2f 08 |/ | MOVE.L A0,-(A7) 0002068c 26 9f |& | MOVE.L (A7)+,(A3) 0002068e 2f 39 00 02 54 fe |/9 T | MOVE.L 0x254fe,-(A7) 00020694 42 27 |B' | CLR.B -(A7) 00020696 1f 3c 00 01 | < | MOVE.B #0x01,-(A7) 0002069a 48 78 00 00 |Hx | PEA.L 0x0 0002069e 48 54 |HT | PEA.L (A4) 000206a0 48 6e fb d4 |Hn | PEA.L (A6-0x42c) 000206a4 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000206aa de fc 00 14 | | ADDA.W #0x14,A7 000206ae 4a 14 |J | TST.B (A4) 000206b0 67 30 |g0 | BEQ 0x206e2 000206b2 9e fc 00 12 | | SUBA.W #0x12,A7 000206b6 20 4f | O | MOVEA.L A7,A0 000206b8 43 fa fa ac |C | LEA.L 0x20166,A1 000206bc 70 10 |p | MOVEQ.L #0x10,D0 000206be 10 d9 | | MOVE.B (A1)+,(A0)+ 000206c0 51 c8 ff fc |Q | DBF D0,0x206be 000206c4 59 4f |YO | SUBQ.L #0x4,A7 000206c6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000206ca 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000206ce 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 000206d2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000206d8 50 4f |PO | ADDQ.L #0x8,A7 000206da 4e ba fd 20 |N | JSR 0x203fc 000206de de fc 00 16 | | ADDA.W #0x16,A7 000206e2 28 39 00 02 55 0a |(9 U | MOVE.L 0x2550a,D4 000206e8 26 3c 01 00 00 00 |&< | MOVE.L #0x1000000,D3 000206ee 4e 92 |N | JSR (A2) 000206f0 89 fc 01 00 | | DIVS.W #0x100,D4 000206f4 48 44 |HD | SWAP.W D4 000206f6 4a 44 |JD | TST.W D4 000206f8 6c 04 |l | BGE 0x206fe 000206fa 06 44 01 00 | D | ADDI.W #0x0100,D4 000206fe 3d 44 ff ea |=D | MOVE.W D4,(A6-0x16) 00020702 28 39 00 02 55 0a |(9 U | MOVE.L 0x2550a,D4 00020708 26 3c 00 01 00 00 |&< | MOVE.L #0x10000,D3 0002070e 4e 92 |N | JSR (A2) 00020710 89 fc 01 00 | | DIVS.W #0x100,D4 00020714 48 44 |HD | SWAP.W D4 00020716 4a 44 |JD | TST.W D4 00020718 6c 04 |l | BGE 0x2071e 0002071a 06 44 01 00 | D | ADDI.W #0x0100,D4 0002071e 3d 44 ff ec |=D | MOVE.W D4,(A6-0x14) 00020722 28 39 00 02 55 0a |(9 U | MOVE.L 0x2550a,D4 00020728 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 0002072e 4e 92 |N | JSR (A2) 00020730 2f 03 |/ | MOVE.L D3,-(A7) 00020732 2f 04 |/ | MOVE.L D4,-(A7) 00020734 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 0002073a 4e 92 |N | JSR (A2) 0002073c 3d 43 ff ee |=C | MOVE.W D3,(A6-0x12) 00020740 20 1f | | MOVE.L (A7)+,D0 00020742 22 1f |" | MOVE.L (A7)+,D1 00020744 3d 41 ff f0 |=A | MOVE.W D1,(A6-0x10) 00020748 28 39 00 02 55 04 |(9 U | MOVE.L 0x25504,D4 0002074e 26 3c 01 00 00 00 |&< | MOVE.L #0x1000000,D3 00020754 4e 92 |N | JSR (A2) 00020756 89 fc 01 00 | | DIVS.W #0x100,D4 0002075a 48 44 |HD | SWAP.W D4 0002075c 4a 44 |JD | TST.W D4 0002075e 6c 04 |l | BGE 0x20764 00020760 06 44 01 00 | D | ADDI.W #0x0100,D4 00020764 3d 44 ff e0 |=D | MOVE.W D4,(A6-0x20) 00020768 28 39 00 02 55 04 |(9 U | MOVE.L 0x25504,D4 0002076e 26 3c 00 01 00 00 |&< | MOVE.L #0x10000,D3 00020774 4e 92 |N | JSR (A2) 00020776 89 fc 01 00 | | DIVS.W #0x100,D4 0002077a 48 44 |HD | SWAP.W D4 0002077c 4a 44 |JD | TST.W D4 0002077e 6c 04 |l | BGE 0x20784 00020780 06 44 01 00 | D | ADDI.W #0x0100,D4 00020784 3d 44 ff e2 |=D | MOVE.W D4,(A6-0x1e) 00020788 28 39 00 02 55 04 |(9 U | MOVE.L 0x25504,D4 0002078e 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 00020794 4e 92 |N | JSR (A2) 00020796 2f 03 |/ | MOVE.L D3,-(A7) 00020798 2f 04 |/ | MOVE.L D4,-(A7) 0002079a 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 000207a0 4e 92 |N | JSR (A2) 000207a2 3d 43 ff e4 |=C | MOVE.W D3,(A6-0x1c) 000207a6 20 1f | | MOVE.L (A7)+,D0 000207a8 24 1f |$ | MOVE.L (A7)+,D2 000207aa 3d 42 ff e6 |=B | MOVE.W D2,(A6-0x1a) 000207ae 10 39 00 02 54 f4 | 9 T | MOVE.B 0x254f4,D0 000207b4 48 80 |H | EXTB.W D0 000207b6 53 40 |S@ | SUBQ.W #0x1,D0 000207b8 0c 40 00 02 | @ | CMPI.W #0x0002,D0 000207bc 63 02 |c | BLS 0x207c0 000207be 4e 4e |NN | TRAP #14 000207c0 d0 40 | @ | ADD.W D0,D0 000207c2 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000207ca 00 06 | | .CONST 0x6 ; [0x0] -> 0x207d0 000207cc 00 18 | | .CONST 0x18 ; [0x1] -> 0x207e2 000207ce 00 3a | : | .CONST 0x3a ; [0x2] -> 0x20804 000207d0 switch@0x207c2[0x0]: 000207d0 2d 7c 00 00 00 01 fb d0 |-| | MOVE.L #0x1,(A6-0x430) 000207d8 3d 41 ff ea |=A | MOVE.W D1,(A6-0x16) 000207dc 3d 42 ff e0 |=B | MOVE.W D2,(A6-0x20) 000207e0 60 2a |`* | BRA 0x2080c 000207e2 switch@0x207c2[0x1]: 000207e2 2d 7c 00 00 00 02 fb d0 |-| | MOVE.L #0x2,(A6-0x430) 000207ea 3d 6e ff ee ff ea |=n | MOVE.W (A6-0x12),(A6-0x16) 000207f0 3d 6e ff f0 ff ec |=n | MOVE.W (A6-0x10),(A6-0x14) 000207f6 3d 6e ff e4 ff e0 |=n | MOVE.W (A6-0x1c),(A6-0x20) 000207fc 3d 6e ff e6 ff e2 |=n | MOVE.W (A6-0x1a),(A6-0x1e) 00020802 60 08 |` | BRA 0x2080c 00020804 switch@0x207c2[0x2]: 00020804 2d 7c 00 00 00 04 fb d0 |-| | MOVE.L #0x4,(A6-0x430) 0002080c 2f 2e fb d0 |/. | MOVE.L (A6-0x430),-(A7) 00020810 70 01 |p | MOVEQ.L #0x01,D0 00020812 b0 97 | | CMP.L (A7),D0 00020814 6e 00 01 6e |n n | BGT 0x20984 00020818 22 39 00 02 54 f6 |"9 T | MOVE.L 0x254f6,D1 0002081e 92 b9 00 02 54 fa | T | SUB.L 0x254fa,D1 00020824 d2 80 | | ADD.L D0,D1 00020826 53 81 |S | SUBQ.L #0x1,D1 00020828 28 01 |( | MOVE.L D1,D4 0002082a 26 3c 00 00 04 00 |&< | MOVE.L #0x400,D3 00020830 4e 92 |N | JSR (A2) 00020832 2f 03 |/ | MOVE.L D3,-(A7) 00020834 2f 04 |/ | MOVE.L D4,-(A7) 00020836 2d 44 fb d8 |-D | MOVE.L D4,(A6-0x428) 0002083a 2d 43 ff f2 |-C | MOVE.L D3,(A6-0xe) 0002083e 28 03 |( | MOVE.L D3,D4 00020840 76 02 |v | MOVEQ.L #0x02,D3 00020842 4e 92 |N | JSR (A2) 00020844 2d 44 ff f8 |-D | MOVE.L D4,(A6-0x8) 00020848 22 17 |" | MOVE.L (A7),D1 0002084a 0c 81 00 00 40 00 | @ | CMPI.L #0x00004000,D1 00020850 63 02 |c | BLS 0x20854 00020852 4e 4f |NO | TRAP #15 00020854 2f 2e fb d4 |/. | MOVE.L (A6-0x42c),-(A7) 00020858 3f 01 |? | MOVE.W D1,-(A7) 0002085a 42 67 |Bg | CLR.W -(A7) 0002085c 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020860 1f 3c 00 01 | < | MOVE.B #0x01,-(A7) 00020864 2f 13 |/ | MOVE.L (A3),-(A7) 00020866 48 54 |HT | PEA.L (A4) 00020868 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 0002086e de fc 00 14 | | ADDA.W #0x14,A7 00020872 0c 84 00 00 01 ff | | CMPI.L #0x000001ff,D4 00020878 63 02 |c | BLS 0x2087c 0002087a 4e 4f |NO | TRAP #15 0002087c e3 84 | | ASL.L #0x1,D4 0002087e 20 4b | K | MOVEA.L A3,A0 00020880 3e 30 48 14 |>0H | MOVE.W (A0+D4.L+#0x14),D7 00020884 24 2f 00 04 |$/ | MOVE.L (A7+0x4),D2 00020888 08 02 00 00 | | BTST.L #0x0,D2 0002088c 67 16 |g | BEQ 0x208a4 0002088e 36 07 |6 | MOVE.W D7,D3 00020890 02 43 00 ff | C | ANDI.W #0x00ff,D3 00020894 47 bc 00 ff |G | CHK.W #0xff,D3 00020898 3a 03 |: | MOVE.W D3,D5 0002089a 3c 07 |< | MOVE.W D7,D6 0002089c e0 4e | N | LSR.W #0x8,D6 0002089e 02 46 00 ff | F | ANDI.W #0x00ff,D6 000208a2 60 14 |` | BRA 0x208b8 000208a4 3a 07 |: | MOVE.W D7,D5 000208a6 e0 4d | M | LSR.W #0x8,D5 000208a8 02 45 00 ff | E | ANDI.W #0x00ff,D5 000208ac 36 07 |6 | MOVE.W D7,D3 000208ae 02 43 00 ff | C | ANDI.W #0x00ff,D3 000208b2 47 bc 00 ff |G | CHK.W #0xff,D3 000208b6 3c 03 |< | MOVE.W D3,D6 000208b8 4a 39 00 02 55 02 |J9 U | TST.B 0x25502 000208be 67 46 |gF | BEQ 0x20906 000208c0 26 00 |& | MOVE.L D0,D3 000208c2 53 83 |S | SUBQ.L #0x1,D3 000208c4 0c 83 00 00 00 03 | | CMPI.L #0x00000003,D3 000208ca 63 02 |c | BLS 0x208ce 000208cc 4e 4f |NO | TRAP #15 000208ce e3 83 | | ASL.L #0x1,D3 000208d0 22 4b |"K | MOVEA.L A3,A1 000208d2 43 f1 38 00 |C 8 | LEA.L (A1+D3.L),A1 000208d6 ba 69 04 14 | i | CMP.W (A1+0x414),D5 000208da 67 2a |g* | BEQ 0x20906 000208dc 43 fa f8 e6 |C | LEA.L 0x201c4,A1 000208e0 76 09 |v | MOVEQ.L #0x09,D3 000208e2 2f 21 |/! | MOVE.L -(A1),-(A7) 000208e4 51 cb ff fc |Q | DBF D3,0x208e2 000208e8 59 4f |YO | SUBQ.L #0x4,A7 000208ea 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000208ee 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000208f2 3f 3c 00 28 |?< ( | MOVE.W #0x28,-(A7) 000208f6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000208fc 50 4f |PO | ADDQ.L #0x8,A7 000208fe 4e ba fa fc |N | JSR 0x203fc 00020902 de fc 00 2c | , | ADDA.W #0x2c,A7 00020906 08 02 00 00 | | BTST.L #0x0,D2 0002090a 67 28 |g( | BEQ 0x20934 0002090c 34 06 |4 | MOVE.W D6,D2 0002090e e1 42 | B | ASL.W #0x8,D2 00020910 26 00 |& | MOVE.L D0,D3 00020912 53 83 |S | SUBQ.L #0x1,D3 00020914 0c 83 00 00 00 03 | | CMPI.L #0x00000003,D3 0002091a 63 02 |c | BLS 0x2091e 0002091c 4e 4f |NO | TRAP #15 0002091e e3 83 | | ASL.L #0x1,D3 00020920 22 4b |"K | MOVEA.L A3,A1 00020922 43 f1 38 00 |C 8 | LEA.L (A1+D3.L),A1 00020926 d4 69 04 1e | i | ADD.W (A1+0x41e),D2 0002092a 0c 42 ff ff | B | CMPI.W #0xffff,D2 0002092e 63 02 |c | BLS 0x20932 00020930 4e 4f |NO | TRAP #15 00020932 60 26 |`& | BRA 0x2095a 00020934 24 00 |$ | MOVE.L D0,D2 00020936 53 82 |S | SUBQ.L #0x1,D2 00020938 0c 82 00 00 00 03 | | CMPI.L #0x00000003,D2 0002093e 63 02 |c | BLS 0x20942 00020940 4e 4f |NO | TRAP #15 00020942 e3 82 | | ASL.L #0x1,D2 00020944 22 4b |"K | MOVEA.L A3,A1 00020946 43 f1 28 00 |C ( | LEA.L (A1+D2.L),A1 0002094a 34 29 04 1e |4) | MOVE.W (A1+0x41e),D2 0002094e e1 42 | B | ASL.W #0x8,D2 00020950 d4 46 | F | ADD.W D6,D2 00020952 0c 42 ff ff | B | CMPI.W #0xffff,D2 00020956 63 02 |c | BLS 0x2095a 00020958 4e 4f |NO | TRAP #15 0002095a 3e 02 |> | MOVE.W D2,D7 0002095c 31 87 48 14 |1 H | MOVE.W D7,(A0+D4.L+#0x14) 00020960 2f 2e fb d4 |/. | MOVE.L (A6-0x42c),-(A7) 00020964 3f 01 |? | MOVE.W D1,-(A7) 00020966 42 67 |Bg | CLR.W -(A7) 00020968 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 0002096c 1f 3c 00 01 | < | MOVE.B #0x01,-(A7) 00020970 2f 13 |/ | MOVE.L (A3),-(A7) 00020972 48 54 |HT | PEA.L (A4) 00020974 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 0002097a de fc 00 1c | | ADDA.W #0x1c,A7 0002097e 52 80 |R | ADDQ.L #0x1,D0 00020980 68 00 fe 90 |h | BVC 0x20812 00020984 54 4f |TO | ADDQ.L #0x2,A7 00020986 42 17 |B | CLR.B (A7) 00020988 1f 3c 00 01 | < | MOVE.B #0x01,-(A7) 0002098c 48 78 00 01 |Hx | PEA.L 0x1 00020990 48 54 |HT | PEA.L (A4) 00020992 48 6e fb d4 |Hn | PEA.L (A6-0x42c) 00020996 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 0002099c de fc 00 10 | | ADDA.W #0x10,A7 000209a0 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000209a4 4e 5e |N^ | UNLK A6 000209a6 4e 75 |Nu | RTS 000209a8 ; -------------------------------------------------------------------------------------- 000209a8 ; OMSI PASCAL Function 000209a8 ; <LVAR -0x006 @ 1(r)> 000209a8 ; <LVAR -0x00a 4(w)> 000209a8 ; <LVAR -0x00c 2(rw)> 000209a8 ; <LVAR -0x010 4(w)> 000209a8 ; <LVAR -0x410 @> 000209a8 ; <LVAR -0x41c @ 4(r)> 000209a8 ; <LVAR -0x424 @ 4(rw)> 000209a8 ; -------------------------------------------------------------------------------------- 000209a8 4e 56 fb 7c |NV | | LINK.W A6,#0xfb7c 000209ac bf d5 | | CMPA.L (A5),A7 000209ae 62 06 |b | BHI 0x209b6 000209b0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000209b4 4e 76 |Nv | TRAPV 000209b6 de fc 00 60 | ` | ADDA.W #0x60,A7 000209ba 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000209be 45 ee ff fa |E | LEA.L (A6-0x6),A2 000209c2 47 ee fb dc |G | LEA.L (A6-0x424),A3 000209c6 49 ee fb e4 |I | LEA.L (A6-0x41c),A4 000209ca 74 01 |t | MOVEQ.L #0x01,D2 000209cc 41 ee fb f0 |A | LEA.L (A6-0x410),A0 000209d0 2f 08 |/ | MOVE.L A0,-(A7) 000209d2 26 9f |& | MOVE.L (A7)+,(A3) 000209d4 2f 39 00 02 54 fe |/9 T | MOVE.L 0x254fe,-(A7) 000209da 42 27 |B' | CLR.B -(A7) 000209dc 1f 02 | | MOVE.B D2,-(A7) 000209de 48 78 00 00 |Hx | PEA.L 0x0 000209e2 48 52 |HR | PEA.L (A2) 000209e4 48 54 |HT | PEA.L (A4) 000209e6 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000209ec de fc 00 14 | | ADDA.W #0x14,A7 000209f0 4a 12 |J | TST.B (A2) 000209f2 67 2e |g. | BEQ 0x20a22 000209f4 9e fc 00 12 | | SUBA.W #0x12,A7 000209f8 20 4f | O | MOVEA.L A7,A0 000209fa 43 fa f7 6a |C j | LEA.L 0x20166,A1 000209fe 70 10 |p | MOVEQ.L #0x10,D0 00020a00 10 d9 | | MOVE.B (A1)+,(A0)+ 00020a02 51 c8 ff fc |Q | DBF D0,0x20a00 00020a06 59 4f |YO | SUBQ.L #0x4,A7 00020a08 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a0c 3f 02 |? | MOVE.W D2,-(A7) 00020a0e 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 00020a12 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020a18 50 4f |PO | ADDQ.L #0x8,A7 00020a1a 4e ba f9 e0 |N | JSR 0x203fc 00020a1e de fc 00 16 | | ADDA.W #0x16,A7 00020a22 10 39 00 02 54 f4 | 9 T | MOVE.B 0x254f4,D0 00020a28 48 80 |H | EXTB.W D0 00020a2a 53 40 |S@ | SUBQ.W #0x1,D0 00020a2c 0c 40 00 02 | @ | CMPI.W #0x0002,D0 00020a30 63 02 |c | BLS 0x20a34 00020a32 4e 4e |NN | TRAP #14 00020a34 d0 40 | @ | ADD.W D0,D0 00020a36 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00020a3e 00 06 | | .CONST 0x6 ; [0x0] -> 0x20a44 00020a40 00 0a | | .CONST 0xa ; [0x1] -> 0x20a48 00020a42 00 0e | | .CONST 0xe ; [0x2] -> 0x20a4c 00020a44 switch@0x20a36[0x0]: 00020a44 7c 01 || | MOVEQ.L #0x01,D6 00020a46 60 06 |` | BRA 0x20a4e 00020a48 switch@0x20a36[0x1]: 00020a48 7c 02 || | MOVEQ.L #0x02,D6 00020a4a 60 02 |` | BRA 0x20a4e 00020a4c switch@0x20a36[0x2]: 00020a4c 7c 04 || | MOVEQ.L #0x04,D6 00020a4e 59 4f |YO | SUBQ.L #0x4,A7 00020a50 1e ba f8 64 | d | MOVE.B 0x202b6,(A7) 00020a54 1f 7a f8 61 00 01 | z a | MOVE.B 0x202b7,(A7+0x1) 00020a5a 1f 7a f8 5c 00 02 | z \ | MOVE.B 0x202b8,(A7+0x2) 00020a60 51 4f |QO | SUBQ.L #0x8,A7 00020a62 2f 39 00 02 54 f6 |/9 T | MOVE.L 0x254f6,-(A7) 00020a68 48 78 00 08 |Hx | PEA.L 0x8 00020a6c 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00020a72 58 4f |XO | ADDQ.L #0x4,A7 00020a74 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00020a78 3f 02 |? | MOVE.W D2,-(A7) 00020a7a 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00020a7e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020a84 50 4f |PO | ADDQ.L #0x8,A7 00020a86 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020a8c 50 4f |PO | ADDQ.L #0x8,A7 00020a8e 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00020a94 58 4f |XO | ADDQ.L #0x4,A7 00020a96 2e 86 |. | MOVE.L D6,(A7) 00020a98 70 01 |p | MOVEQ.L #0x01,D0 00020a9a b0 97 | | CMP.L (A7),D0 00020a9c 6e 00 00 d0 |n | BGT 0x20b6e 00020aa0 2a 39 00 02 54 f6 |*9 T | MOVE.L 0x254f6,D5 00020aa6 9a b9 00 02 54 fa | T | SUB.L 0x254fa,D5 00020aac da 80 | | ADD.L D0,D5 00020aae 53 85 |S | SUBQ.L #0x1,D5 00020ab0 28 05 |( | MOVE.L D5,D4 00020ab2 26 3c 00 00 04 00 |&< | MOVE.L #0x400,D3 00020ab8 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00020abe 2a 04 |* | MOVE.L D4,D5 00020ac0 2d 43 ff f0 |-C | MOVE.L D3,(A6-0x10) 00020ac4 2f 03 |/ | MOVE.L D3,-(A7) 00020ac6 28 03 |( | MOVE.L D3,D4 00020ac8 76 02 |v | MOVEQ.L #0x02,D3 00020aca 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00020ad0 2d 44 ff f6 |-D | MOVE.L D4,(A6-0xa) 00020ad4 2f 14 |/ | MOVE.L (A4),-(A7) 00020ad6 0c 85 00 00 40 00 | @ | CMPI.L #0x00004000,D5 00020adc 63 02 |c | BLS 0x20ae0 00020ade 4e 4f |NO | TRAP #15 00020ae0 3f 05 |? | MOVE.W D5,-(A7) 00020ae2 42 67 |Bg | CLR.W -(A7) 00020ae4 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020ae8 1f 02 | | MOVE.B D2,-(A7) 00020aea 2f 13 |/ | MOVE.L (A3),-(A7) 00020aec 48 52 |HR | PEA.L (A2) 00020aee 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020af4 de fc 00 14 | | ADDA.W #0x14,A7 00020af8 0c 84 00 00 01 ff | | CMPI.L #0x000001ff,D4 00020afe 63 02 |c | BLS 0x20b02 00020b00 4e 4f |NO | TRAP #15 00020b02 e3 84 | | ASL.L #0x1,D4 00020b04 20 4b | K | MOVEA.L A3,A0 00020b06 3d 70 48 14 ff f4 |=pH | MOVE.W (A0+D4.L+#0x14),(A6-0xc) 00020b0c 22 1f |" | MOVE.L (A7)+,D1 00020b0e 08 01 00 00 | | BTST.L #0x0,D1 00020b12 67 10 |g | BEQ 0x20b24 00020b14 32 2e ff f4 |2. | MOVE.W (A6-0xc),D1 00020b18 02 41 00 ff | A | ANDI.W #0x00ff,D1 00020b1c 43 bc 00 ff |C | CHK.W #0xff,D1 00020b20 3e 01 |> | MOVE.W D1,D7 00020b22 60 0a |` | BRA 0x20b2e 00020b24 3e 2e ff f4 |>. | MOVE.W (A6-0xc),D7 00020b28 e0 4f | O | LSR.W #0x8,D7 00020b2a 02 47 00 ff | G | ANDI.W #0x00ff,D7 00020b2e 3f 3a f7 8a |?: | MOVE.W 0x202ba,-(A7) 00020b32 51 4f |QO | SUBQ.L #0x8,A7 00020b34 32 07 |2 | MOVE.W D7,D1 00020b36 48 c1 |H | EXTW.L D1 00020b38 2f 01 |/ | MOVE.L D1,-(A7) 00020b3a 48 78 00 02 |Hx | PEA.L 0x2 00020b3e 4e b9 00 01 02 e8 |N | JSR Long2HexString(val : Long; ndig : Long) : String 00020b44 58 4f |XO | ADDQ.L #0x4,A7 00020b46 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00020b4a 3f 02 |? | MOVE.W D2,-(A7) 00020b4c 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00020b50 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020b56 50 4f |PO | ADDQ.L #0x8,A7 00020b58 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020b5e 50 4f |PO | ADDQ.L #0x8,A7 00020b60 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00020b66 5c 4f |\O | ADDQ.L #0x6,A7 00020b68 52 80 |R | ADDQ.L #0x1,D0 00020b6a 68 00 ff 2e |h . | BVC 0x20a9a 00020b6e 58 4f |XO | ADDQ.L #0x4,A7 00020b70 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00020b76 42 27 |B' | CLR.B -(A7) 00020b78 1f 02 | | MOVE.B D2,-(A7) 00020b7a 48 78 00 01 |Hx | PEA.L 0x1 00020b7e 48 52 |HR | PEA.L (A2) 00020b80 48 54 |HT | PEA.L (A4) 00020b82 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00020b88 de fc 00 10 | | ADDA.W #0x10,A7 00020b8c 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00020b90 4e 5e |N^ | UNLK A6 00020b92 4e 75 |Nu | RTS 00020b94 ; -------------------------------------------------------------------------------------- 00020b94 ; OMSI PASCAL Function 00020b94 ; <LVAR 0x016 1(r)> 00020b94 ; <LVAR 0x014 1(r)> 00020b94 ; <LVAR 0x012 1(r)> 00020b94 ; <LVAR 0x010 1(r)> 00020b94 ; <LVAR 0x00e 1(r)> 00020b94 ; <LVAR 0x00c 1(r)> 00020b94 ; <LVAR 0x008 4(r)> 00020b94 ; <LVAR -0x003 @ 1(rw)> 00020b94 ; <LVAR -0x004 @ 1(r)> 00020b94 ; <LVAR -0x008 @ 4(rw)> 00020b94 ; -------------------------------------------------------------------------------------- 00020b94 4e 56 ff 7c |NV | | LINK.W A6,#0xff7c 00020b98 bf d5 | | CMPA.L (A5),A7 00020b9a 62 06 |b | BHI 0x20ba2 00020b9c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020ba0 4e 76 |Nv | TRAPV 00020ba2 de fc 00 7c | | | ADDA.W #0x7c,A7 00020ba6 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020baa 45 ee ff f8 |E | LEA.L (A6-0x8),A2 00020bae 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00020bb4 49 ee ff fd |I | LEA.L (A6-0x3),A4 00020bb8 72 01 |r | MOVEQ.L #0x01,D1 00020bba 74 14 |t | MOVEQ.L #0x14,D2 00020bbc 76 16 |v | MOVEQ.L #0x16,D3 00020bbe 78 10 |x | MOVEQ.L #0x10,D4 00020bc0 7a 18 |z | MOVEQ.L #0x18,D5 00020bc2 7c 1a || | MOVEQ.L #0x1a,D6 00020bc4 7e 2e |~. | MOVEQ.L #0x2e,D7 00020bc6 3f 3a f6 f4 |?: | MOVE.W 0x202bc,-(A7) 00020bca 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020bce 59 4f |YO | SUBQ.L #0x4,A7 00020bd0 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020bd4 3f 01 |? | MOVE.W D1,-(A7) 00020bd6 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00020bda 4e 93 |N | JSR (A3) 00020bdc 5c 4f |\O | ADDQ.L #0x6,A7 00020bde 1e 81 | | MOVE.B D1,(A7) 00020be0 48 54 |HT | PEA.L (A4) 00020be2 48 52 |HR | PEA.L (A2) 00020be4 4e ba f7 b6 |N | JSR 0x2039c 00020be8 de c2 | | ADDA.W D2,A7 00020bea 4a 14 |J | TST.B (A4) 00020bec 66 38 |f8 | BNE 0x20c26 00020bee 4a 2e 00 16 |J. | TST.B (A6+0x16) 00020bf2 66 32 |f2 | BNE 0x20c26 00020bf4 9e fc 00 34 | 4 | SUBA.W #0x34,A7 00020bf8 20 4f | O | MOVEA.L A7,A0 00020bfa 43 fa f5 c8 |C | LEA.L 0x201c4,A1 00020bfe 70 32 |p2 | MOVEQ.L #0x32,D0 00020c00 10 d9 | | MOVE.B (A1)+,(A0)+ 00020c02 51 c8 ff fc |Q | DBF D0,0x20c00 00020c06 51 4f |QO | SUBQ.L #0x8,A7 00020c08 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020c0c 3f 01 |? | MOVE.W D1,-(A7) 00020c0e 3f 3c 00 33 |?< 3 | MOVE.W #0x33,-(A7) 00020c12 4e 93 |N | JSR (A3) 00020c14 50 4f |PO | ADDQ.L #0x8,A7 00020c16 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00020c1c 58 4f |XO | ADDQ.L #0x4,A7 00020c1e 24 9f |$ | MOVE.L (A7)+,(A2) 00020c20 de fc 00 34 | 4 | ADDA.W #0x34,A7 00020c24 18 81 | | MOVE.B D1,(A4) 00020c26 4a 14 |J | TST.B (A4) 00020c28 67 06 |g | BEQ 0x20c30 00020c2a 23 d2 00 02 54 fe |# T | MOVE.L (A2),0x254fe 00020c30 2f 3a f6 8c |/: | MOVE.L 0x202be,-(A7) 00020c34 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020c38 59 4f |YO | SUBQ.L #0x4,A7 00020c3a 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020c3e 3f 01 |? | MOVE.W D1,-(A7) 00020c40 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020c44 4e 93 |N | JSR (A3) 00020c46 5c 4f |\O | ADDQ.L #0x6,A7 00020c48 1e 81 | | MOVE.B D1,(A7) 00020c4a 48 54 |HT | PEA.L (A4) 00020c4c 48 52 |HR | PEA.L (A2) 00020c4e 4e ba f7 4c |N L | JSR 0x2039c 00020c52 de c3 | | ADDA.W D3,A7 00020c54 4a 14 |J | TST.B (A4) 00020c56 66 32 |f2 | BNE 0x20c8a 00020c58 4a 2e 00 14 |J. | TST.B (A6+0x14) 00020c5c 66 2c |f, | BNE 0x20c8a 00020c5e 41 fa f5 be |A | LEA.L 0x2021e,A0 00020c62 70 12 |p | MOVEQ.L #0x12,D0 00020c64 3f 20 |? | MOVE.W -(A0),-(A7) 00020c66 51 c8 ff fc |Q | DBF D0,0x20c64 00020c6a 51 4f |QO | SUBQ.L #0x8,A7 00020c6c 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020c70 3f 01 |? | MOVE.W D1,-(A7) 00020c72 3f 3c 00 26 |?< & | MOVE.W #0x26,-(A7) 00020c76 4e 93 |N | JSR (A3) 00020c78 50 4f |PO | ADDQ.L #0x8,A7 00020c7a 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00020c80 58 4f |XO | ADDQ.L #0x4,A7 00020c82 24 9f |$ | MOVE.L (A7)+,(A2) 00020c84 de fc 00 26 | & | ADDA.W #0x26,A7 00020c88 18 81 | | MOVE.B D1,(A4) 00020c8a 4a 14 |J | TST.B (A4) 00020c8c 67 3e |g> | BEQ 0x20ccc 00020c8e 2f 12 |/ | MOVE.L (A2),-(A7) 00020c90 48 78 00 10 |Hx | PEA.L 0x10 00020c94 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020c98 48 79 00 02 54 fa |Hy T | PEA.L 0x254fa 00020c9e 4e ba f8 70 |N p | JSR 0x20510 00020ca2 de c4 | | ADDA.W D4,A7 00020ca4 4a 2e ff fc |J. | TST.B (A6-0x4) 00020ca8 66 22 |f" | BNE 0x20ccc 00020caa 41 fa f4 92 |A | LEA.L 0x2013e,A0 00020cae 70 04 |p | MOVEQ.L #0x04,D0 00020cb0 2f 20 |/ | MOVE.L -(A0),-(A7) 00020cb2 51 c8 ff fc |Q | DBF D0,0x20cb0 00020cb6 59 4f |YO | SUBQ.L #0x4,A7 00020cb8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020cbc 3f 01 |? | MOVE.W D1,-(A7) 00020cbe 3f 02 |? | MOVE.W D2,-(A7) 00020cc0 4e 93 |N | JSR (A3) 00020cc2 50 4f |PO | ADDQ.L #0x8,A7 00020cc4 4e b9 00 02 19 f2 |N | JSR 0x219f2 00020cca de c5 | | ADDA.W D5,A7 00020ccc 51 4f |QO | SUBQ.L #0x8,A7 00020cce 20 4f | O | MOVEA.L A7,A0 00020cd0 43 fa f5 f0 |C | LEA.L 0x202c2,A1 00020cd4 70 06 |p | MOVEQ.L #0x06,D0 00020cd6 10 d9 | | MOVE.B (A1)+,(A0)+ 00020cd8 51 c8 ff fc |Q | DBF D0,0x20cd6 00020cdc 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020ce0 59 4f |YO | SUBQ.L #0x4,A7 00020ce2 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020ce6 3f 01 |? | MOVE.W D1,-(A7) 00020ce8 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 00020cec 4e 93 |N | JSR (A3) 00020cee 5c 4f |\O | ADDQ.L #0x6,A7 00020cf0 1e 81 | | MOVE.B D1,(A7) 00020cf2 48 54 |HT | PEA.L (A4) 00020cf4 48 52 |HR | PEA.L (A2) 00020cf6 4e ba f6 a4 |N | JSR 0x2039c 00020cfa de c6 | | ADDA.W D6,A7 00020cfc 4a 14 |J | TST.B (A4) 00020cfe 66 34 |f4 | BNE 0x20d34 00020d00 4a 2e 00 12 |J. | TST.B (A6+0x12) 00020d04 66 2e |f. | BNE 0x20d34 00020d06 9e c7 | | SUBA.W D7,A7 00020d08 20 4f | O | MOVEA.L A7,A0 00020d0a 43 fa f5 7c |C | | LEA.L 0x20288,A1 00020d0e 70 2c |p, | MOVEQ.L #0x2c,D0 00020d10 10 d9 | | MOVE.B (A1)+,(A0)+ 00020d12 51 c8 ff fc |Q | DBF D0,0x20d10 00020d16 51 4f |QO | SUBQ.L #0x8,A7 00020d18 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020d1c 3f 01 |? | MOVE.W D1,-(A7) 00020d1e 3f 3c 00 2d |?< - | MOVE.W #0x2d,-(A7) 00020d22 4e 93 |N | JSR (A3) 00020d24 50 4f |PO | ADDQ.L #0x8,A7 00020d26 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00020d2c 58 4f |XO | ADDQ.L #0x4,A7 00020d2e 24 9f |$ | MOVE.L (A7)+,(A2) 00020d30 de c7 | | ADDA.W D7,A7 00020d32 18 81 | | MOVE.B D1,(A4) 00020d34 4a 14 |J | TST.B (A4) 00020d36 67 3e |g> | BEQ 0x20d76 00020d38 2f 12 |/ | MOVE.L (A2),-(A7) 00020d3a 48 78 00 10 |Hx | PEA.L 0x10 00020d3e 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020d42 48 79 00 02 54 f6 |Hy T | PEA.L 0x254f6 00020d48 4e ba f7 c6 |N | JSR 0x20510 00020d4c de c4 | | ADDA.W D4,A7 00020d4e 4a 2e ff fc |J. | TST.B (A6-0x4) 00020d52 66 22 |f" | BNE 0x20d76 00020d54 41 fa f3 e8 |A | LEA.L 0x2013e,A0 00020d58 70 04 |p | MOVEQ.L #0x04,D0 00020d5a 2f 20 |/ | MOVE.L -(A0),-(A7) 00020d5c 51 c8 ff fc |Q | DBF D0,0x20d5a 00020d60 59 4f |YO | SUBQ.L #0x4,A7 00020d62 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020d66 3f 01 |? | MOVE.W D1,-(A7) 00020d68 3f 02 |? | MOVE.W D2,-(A7) 00020d6a 4e 93 |N | JSR (A3) 00020d6c 50 4f |PO | ADDQ.L #0x8,A7 00020d6e 4e b9 00 02 19 f2 |N | JSR 0x219f2 00020d74 de c5 | | ADDA.W D5,A7 00020d76 4a 2e 00 10 |J. | TST.B (A6+0x10) 00020d7a 66 06 |f | BNE 0x20d82 00020d7c 42 39 00 02 54 f4 |B9 T | CLR.B 0x254f4 00020d82 2f 3a f5 46 |/: F | MOVE.L 0x202ca,-(A7) 00020d86 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020d8a 59 4f |YO | SUBQ.L #0x4,A7 00020d8c 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020d90 3f 01 |? | MOVE.W D1,-(A7) 00020d92 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020d96 4e 93 |N | JSR (A3) 00020d98 5c 4f |\O | ADDQ.L #0x6,A7 00020d9a 42 17 |B | CLR.B (A7) 00020d9c 48 54 |HT | PEA.L (A4) 00020d9e 48 52 |HR | PEA.L (A2) 00020da0 4e ba f5 fa |N | JSR 0x2039c 00020da4 de c3 | | ADDA.W D3,A7 00020da6 4a 14 |J | TST.B (A4) 00020da8 67 06 |g | BEQ 0x20db0 00020daa 13 c1 00 02 54 f4 | T | MOVE.B D1,0x254f4 00020db0 2f 3a f5 1c |/: | MOVE.L 0x202ce,-(A7) 00020db4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020db8 59 4f |YO | SUBQ.L #0x4,A7 00020dba 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020dbe 3f 01 |? | MOVE.W D1,-(A7) 00020dc0 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020dc4 4e 93 |N | JSR (A3) 00020dc6 5c 4f |\O | ADDQ.L #0x6,A7 00020dc8 42 17 |B | CLR.B (A7) 00020dca 48 54 |HT | PEA.L (A4) 00020dcc 48 52 |HR | PEA.L (A2) 00020dce 4e ba f5 cc |N | JSR 0x2039c 00020dd2 de c3 | | ADDA.W D3,A7 00020dd4 4a 14 |J | TST.B (A4) 00020dd6 67 08 |g | BEQ 0x20de0 00020dd8 13 fc 00 02 00 02 54 f4 | T | MOVE.B #0x02,0x254f4 00020de0 2f 3a f4 f4 |/: | MOVE.L 0x202d6,-(A7) 00020de4 2f 3a f4 ec |/: | MOVE.L 0x202d2,-(A7) 00020de8 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020dec 59 4f |YO | SUBQ.L #0x4,A7 00020dee 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020df2 3f 01 |? | MOVE.W D1,-(A7) 00020df4 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00020df8 4e 93 |N | JSR (A3) 00020dfa 5c 4f |\O | ADDQ.L #0x6,A7 00020dfc 42 17 |B | CLR.B (A7) 00020dfe 48 54 |HT | PEA.L (A4) 00020e00 48 52 |HR | PEA.L (A2) 00020e02 4e ba f5 98 |N | JSR 0x2039c 00020e06 de c6 | | ADDA.W D6,A7 00020e08 4a 14 |J | TST.B (A4) 00020e0a 67 08 |g | BEQ 0x20e14 00020e0c 13 fc 00 03 00 02 54 f4 | T | MOVE.B #0x03,0x254f4 00020e14 4a 2e 00 10 |J. | TST.B (A6+0x10) 00020e18 66 78 |fx | BNE 0x20e92 00020e1a 4a 39 00 02 54 f4 |J9 T | TST.B 0x254f4 00020e20 66 70 |fp | BNE 0x20e92 00020e22 9e fc 00 22 | " | SUBA.W #0x22,A7 00020e26 20 4f | O | MOVEA.L A7,A0 00020e28 43 fa f3 f4 |C | LEA.L 0x2021e,A1 00020e2c 70 20 |p | MOVEQ.L #0x20,D0 00020e2e 10 d9 | | MOVE.B (A1)+,(A0)+ 00020e30 51 c8 ff fc |Q | DBF D0,0x20e2e 00020e34 9e fc 00 0c | | SUBA.W #0xc,A7 00020e38 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00020e3c 3f 01 |? | MOVE.W D1,-(A7) 00020e3e 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 00020e42 4e 93 |N | JSR (A3) 00020e44 50 4f |PO | ADDQ.L #0x8,A7 00020e46 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00020e4c 58 4f |XO | ADDQ.L #0x4,A7 00020e4e 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00020e54 58 4f |XO | ADDQ.L #0x4,A7 00020e56 24 9f |$ | MOVE.L (A7)+,(A2) 00020e58 de fc 00 22 | " | ADDA.W #0x22,A7 00020e5c 20 52 | R | MOVEA.L (A2),A0 00020e5e 10 28 00 02 | ( | MOVE.B (A0+0x2),D0 00020e62 0c 00 00 42 | B | CMPI.B #0x42,D0 00020e66 66 06 |f | BNE 0x20e6e 00020e68 13 c1 00 02 54 f4 | T | MOVE.B D1,0x254f4 00020e6e 0c 00 00 57 | W | CMPI.B #0x57,D0 00020e72 66 08 |f | BNE 0x20e7c 00020e74 13 fc 00 02 00 02 54 f4 | T | MOVE.B #0x02,0x254f4 00020e7c 0c 00 00 4c | L | CMPI.B #0x4c,D0 00020e80 66 08 |f | BNE 0x20e8a 00020e82 13 fc 00 03 00 02 54 f4 | T | MOVE.B #0x03,0x254f4 00020e8a 4a 39 00 02 54 f4 |J9 T | TST.B 0x254f4 00020e90 67 90 |g | BEQ 0x20e22 00020e92 59 4f |YO | SUBQ.L #0x4,A7 00020e94 1e ba f4 44 | D | MOVE.B 0x202da,(A7) 00020e98 1f 7a f4 41 00 01 | z A | MOVE.B 0x202db,(A7+0x1) 00020e9e 1f 7a f4 3c 00 02 | z < | MOVE.B 0x202dc,(A7+0x2) 00020ea4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020ea8 59 4f |YO | SUBQ.L #0x4,A7 00020eaa 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020eae 3f 01 |? | MOVE.W D1,-(A7) 00020eb0 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00020eb4 4e 93 |N | JSR (A3) 00020eb6 5c 4f |\O | ADDQ.L #0x6,A7 00020eb8 1e 81 | | MOVE.B D1,(A7) 00020eba 48 79 00 02 55 02 |Hy U | PEA.L 0x25502 00020ec0 48 52 |HR | PEA.L (A2) 00020ec2 4e ba f4 d8 |N | JSR 0x2039c 00020ec6 de c3 | | ADDA.W D3,A7 00020ec8 4a 39 00 02 55 02 |J9 U | TST.B 0x25502 00020ece 66 38 |f8 | BNE 0x20f08 00020ed0 4a 2e 00 0e |J. | TST.B (A6+0xe) 00020ed4 66 32 |f2 | BNE 0x20f08 00020ed6 9e c7 | | SUBA.W D7,A7 00020ed8 20 4f | O | MOVEA.L A7,A0 00020eda 43 fa f3 64 |C d | LEA.L 0x20240,A1 00020ede 70 2c |p, | MOVEQ.L #0x2c,D0 00020ee0 10 d9 | | MOVE.B (A1)+,(A0)+ 00020ee2 51 c8 ff fc |Q | DBF D0,0x20ee0 00020ee6 51 4f |QO | SUBQ.L #0x8,A7 00020ee8 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020eec 3f 01 |? | MOVE.W D1,-(A7) 00020eee 3f 3c 00 2d |?< - | MOVE.W #0x2d,-(A7) 00020ef2 4e 93 |N | JSR (A3) 00020ef4 50 4f |PO | ADDQ.L #0x8,A7 00020ef6 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00020efc 58 4f |XO | ADDQ.L #0x4,A7 00020efe 24 9f |$ | MOVE.L (A7)+,(A2) 00020f00 de c7 | | ADDA.W D7,A7 00020f02 13 c1 00 02 55 02 | U | MOVE.B D1,0x25502 00020f08 4a 39 00 02 55 02 |J9 U | TST.B 0x25502 00020f0e 67 3e |g> | BEQ 0x20f4e 00020f10 2f 12 |/ | MOVE.L (A2),-(A7) 00020f12 48 78 00 10 |Hx | PEA.L 0x10 00020f16 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020f1a 48 79 00 02 55 04 |Hy U | PEA.L 0x25504 00020f20 4e ba f5 ee |N | JSR 0x20510 00020f24 de c4 | | ADDA.W D4,A7 00020f26 4a 2e ff fc |J. | TST.B (A6-0x4) 00020f2a 66 22 |f" | BNE 0x20f4e 00020f2c 41 fa f2 10 |A | LEA.L 0x2013e,A0 00020f30 70 04 |p | MOVEQ.L #0x04,D0 00020f32 2f 20 |/ | MOVE.L -(A0),-(A7) 00020f34 51 c8 ff fc |Q | DBF D0,0x20f32 00020f38 59 4f |YO | SUBQ.L #0x4,A7 00020f3a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020f3e 3f 01 |? | MOVE.W D1,-(A7) 00020f40 3f 02 |? | MOVE.W D2,-(A7) 00020f42 4e 93 |N | JSR (A3) 00020f44 50 4f |PO | ADDQ.L #0x8,A7 00020f46 4e b9 00 02 19 f2 |N | JSR 0x219f2 00020f4c de c5 | | ADDA.W D5,A7 00020f4e 59 4f |YO | SUBQ.L #0x4,A7 00020f50 1e ba f3 8c | | MOVE.B 0x202de,(A7) 00020f54 1f 7a f3 89 00 01 | z | MOVE.B 0x202df,(A7+0x1) 00020f5a 1f 7a f3 84 00 02 | z | MOVE.B 0x202e0,(A7+0x2) 00020f60 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00020f64 59 4f |YO | SUBQ.L #0x4,A7 00020f66 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020f6a 3f 01 |? | MOVE.W D1,-(A7) 00020f6c 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00020f70 4e 93 |N | JSR (A3) 00020f72 5c 4f |\O | ADDQ.L #0x6,A7 00020f74 1e 81 | | MOVE.B D1,(A7) 00020f76 48 79 00 02 55 08 |Hy U | PEA.L 0x25508 00020f7c 48 52 |HR | PEA.L (A2) 00020f7e 4e ba f4 1c |N | JSR 0x2039c 00020f82 de c3 | | ADDA.W D3,A7 00020f84 4a 39 00 02 55 08 |J9 U | TST.B 0x25508 00020f8a 66 32 |f2 | BNE 0x20fbe 00020f8c 4a 2e 00 0c |J. | TST.B (A6+0xc) 00020f90 66 2c |f, | BNE 0x20fbe 00020f92 41 fa f2 f4 |A | LEA.L 0x20288,A0 00020f96 70 0c |p | MOVEQ.L #0x0c,D0 00020f98 3f 20 |? | MOVE.W -(A0),-(A7) 00020f9a 51 c8 ff fc |Q | DBF D0,0x20f98 00020f9e 51 4f |QO | SUBQ.L #0x8,A7 00020fa0 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020fa4 3f 01 |? | MOVE.W D1,-(A7) 00020fa6 3f 06 |? | MOVE.W D6,-(A7) 00020fa8 4e 93 |N | JSR (A3) 00020faa 50 4f |PO | ADDQ.L #0x8,A7 00020fac 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00020fb2 58 4f |XO | ADDQ.L #0x4,A7 00020fb4 24 9f |$ | MOVE.L (A7)+,(A2) 00020fb6 de c6 | | ADDA.W D6,A7 00020fb8 13 c1 00 02 55 08 | U | MOVE.B D1,0x25508 00020fbe 4a 39 00 02 55 08 |J9 U | TST.B 0x25508 00020fc4 67 3e |g> | BEQ 0x21004 00020fc6 2f 12 |/ | MOVE.L (A2),-(A7) 00020fc8 48 78 00 10 |Hx | PEA.L 0x10 00020fcc 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020fd0 48 79 00 02 55 0a |Hy U | PEA.L 0x2550a 00020fd6 4e ba f5 38 |N 8 | JSR 0x20510 00020fda de c4 | | ADDA.W D4,A7 00020fdc 4a 2e ff fc |J. | TST.B (A6-0x4) 00020fe0 66 22 |f" | BNE 0x21004 00020fe2 41 fa f1 5a |A Z | LEA.L 0x2013e,A0 00020fe6 70 04 |p | MOVEQ.L #0x04,D0 00020fe8 2f 20 |/ | MOVE.L -(A0),-(A7) 00020fea 51 c8 ff fc |Q | DBF D0,0x20fe8 00020fee 59 4f |YO | SUBQ.L #0x4,A7 00020ff0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020ff4 3f 01 |? | MOVE.W D1,-(A7) 00020ff6 3f 02 |? | MOVE.W D2,-(A7) 00020ff8 4e 93 |N | JSR (A3) 00020ffa 50 4f |PO | ADDQ.L #0x8,A7 00020ffc 4e b9 00 02 19 f2 |N | JSR 0x219f2 00021002 de c5 | | ADDA.W D5,A7 00021004 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00021008 4e 5e |N^ | UNLK A6 0002100a 4e 75 |Nu | RTS 0002100c ; -------------------------------------------------------------------------------------- 0002100c ; OMSI PASCAL Function 0002100c ; <LVAR 0x008 4(r)> 0002100c ; -------------------------------------------------------------------------------------- 0002100c 4e 56 ff 7c |NV | | LINK.W A6,#0xff7c 00021010 bf d5 | | CMPA.L (A5),A7 00021012 62 06 |b | BHI 0x2101a 00021014 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021018 4e 76 |Nv | TRAPV 0002101a de fc 00 7c | | | ADDA.W #0x7c,A7 0002101e 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021022 45 f9 00 02 55 04 |E U | LEA.L 0x25504,A2 00021028 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 0002102e 49 f9 00 02 54 fe |I T | LEA.L 0x254fe,A4 00021034 72 01 |r | MOVEQ.L #0x01,D1 00021036 74 28 |t( | MOVEQ.L #0x28,D2 00021038 7a 34 |z4 | MOVEQ.L #0x34,D5 0002103a 42 92 |B | CLR.L (A2) 0002103c 1f 01 | | MOVE.B D1,-(A7) 0002103e 1f 01 | | MOVE.B D1,-(A7) 00021040 42 27 |B' | CLR.B -(A7) 00021042 42 27 |B' | CLR.B -(A7) 00021044 1f 01 | | MOVE.B D1,-(A7) 00021046 42 27 |B' | CLR.B -(A7) 00021048 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002104c 4e ba fb 46 |N F | JSR 0x20b94 00021050 de fc 00 10 | | ADDA.W #0x10,A7 00021054 10 39 00 02 54 f4 | 9 T | MOVE.B 0x254f4,D0 0002105a 48 80 |H | EXTB.W D0 0002105c 53 40 |S@ | SUBQ.W #0x1,D0 0002105e 0c 40 00 02 | @ | CMPI.W #0x0002,D0 00021062 63 02 |c | BLS 0x21066 00021064 4e 4e |NN | TRAP #14 00021066 d0 40 | @ | ADD.W D0,D0 00021068 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00021070 00 06 | | .CONST 0x6 ; [0x0] -> 0x21076 00021072 00 10 | | .CONST 0x10 ; [0x1] -> 0x21080 00021074 00 18 | | .CONST 0x18 ; [0x2] -> 0x21088 00021076 switch@0x21068[0x0]: 00021076 2e 3c 00 00 00 ff |.< | MOVE.L #0xff,D7 0002107c 7c 01 || | MOVEQ.L #0x01,D6 0002107e 60 0c |` | BRA 0x2108c 00021080 switch@0x21068[0x1]: 00021080 2e 3c 00 00 ff ff |.< | MOVE.L #0xffff,D7 00021086 60 02 |` | BRA 0x2108a 00021088 switch@0x21068[0x2]: 00021088 7e ff |~ | MOVEQ.L #-0x01,D7 0002108a 7c 02 || | MOVEQ.L #0x02,D6 0002108c be 92 | | CMP.L (A2),D7 0002108e 65 08 |e | BCS 0x21098 00021090 be b9 00 02 55 0a | U | CMP.L 0x2550a,D7 00021096 64 22 |d" | BCC 0x210ba 00021098 41 fa f0 cc |A | LEA.L 0x20166,A0 0002109c 70 09 |p | MOVEQ.L #0x09,D0 0002109e 2f 20 |/ | MOVE.L -(A0),-(A7) 000210a0 51 c8 ff fc |Q | DBF D0,0x2109e 000210a4 59 4f |YO | SUBQ.L #0x4,A7 000210a6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000210aa 3f 01 |? | MOVE.W D1,-(A7) 000210ac 3f 02 |? | MOVE.W D2,-(A7) 000210ae 4e 93 |N | JSR (A3) 000210b0 50 4f |PO | ADDQ.L #0x8,A7 000210b2 4e ba f3 48 |N H | JSR 0x203fc 000210b6 de fc 00 2c | , | ADDA.W #0x2c,A7 000210ba 28 39 00 02 54 f6 |(9 T | MOVE.L 0x254f6,D4 000210c0 26 06 |& | MOVE.L D6,D3 000210c2 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 000210c8 4a 83 |J | TST.L D3 000210ca 67 28 |g( | BEQ 0x210f4 000210cc 9e fc 00 24 | $ | SUBA.W #0x24,A7 000210d0 20 4f | O | MOVEA.L A7,A0 000210d2 43 fa f0 a4 |C | LEA.L 0x20178,A1 000210d6 70 22 |p" | MOVEQ.L #0x22,D0 000210d8 10 d9 | | MOVE.B (A1)+,(A0)+ 000210da 51 c8 ff fc |Q | DBF D0,0x210d8 000210de 59 4f |YO | SUBQ.L #0x4,A7 000210e0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000210e4 3f 01 |? | MOVE.W D1,-(A7) 000210e6 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 000210ea 4e 93 |N | JSR (A3) 000210ec 50 4f |PO | ADDQ.L #0x8,A7 000210ee 4e ba f3 0c |N | JSR 0x203fc 000210f2 de c2 | | ADDA.W D2,A7 000210f4 20 54 | T | MOVEA.L (A4),A0 000210f6 b0 c1 | | CMPA.W D1,A0 000210f8 66 2c |f, | BNE 0x21126 000210fa 9e c5 | | SUBA.W D5,A7 000210fc 20 4f | O | MOVEA.L A7,A0 000210fe 43 fa f0 c4 |C | LEA.L 0x201c4,A1 00021102 70 32 |p2 | MOVEQ.L #0x32,D0 00021104 10 d9 | | MOVE.B (A1)+,(A0)+ 00021106 51 c8 ff fc |Q | DBF D0,0x21104 0002110a 51 4f |QO | SUBQ.L #0x8,A7 0002110c 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021110 3f 01 |? | MOVE.W D1,-(A7) 00021112 3f 3c 00 33 |?< 3 | MOVE.W #0x33,-(A7) 00021116 4e 93 |N | JSR (A3) 00021118 50 4f |PO | ADDQ.L #0x8,A7 0002111a 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00021120 58 4f |XO | ADDQ.L #0x4,A7 00021122 28 9f |( | MOVE.L (A7)+,(A4) 00021124 de c5 | | ADDA.W D5,A7 00021126 4e ba f5 3a |N : | JSR 0x20662 0002112a 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 0002112e 4e 5e |N^ | UNLK A6 00021130 4e 75 |Nu | RTS 00021132 ; -------------------------------------------------------------------------------------- 00021132 ; OMSI PASCAL Function 00021132 ; <LVAR 0x008 4(r)> 00021132 ; -------------------------------------------------------------------------------------- 00021132 4e 56 ff 90 |NV | LINK.W A6,#0xff90 00021136 bf d5 | | CMPA.L (A5),A7 00021138 62 06 |b | BHI 0x21140 0002113a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002113e 4e 76 |Nv | TRAPV 00021140 de fc 00 6c | l | ADDA.W #0x6c,A7 00021144 48 e7 f9 e0 |H | MOVEM.L A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 00021148 45 f9 00 02 54 fe |E T | LEA.L 0x254fe,A2 0002114e 72 01 |r | MOVEQ.L #0x01,D1 00021150 74 34 |t4 | MOVEQ.L #0x34,D2 00021152 1f 01 | | MOVE.B D1,-(A7) 00021154 1f 01 | | MOVE.B D1,-(A7) 00021156 42 27 |B' | CLR.B -(A7) 00021158 42 27 |B' | CLR.B -(A7) 0002115a 1f 01 | | MOVE.B D1,-(A7) 0002115c 1f 01 | | MOVE.B D1,-(A7) 0002115e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00021162 4e ba fa 30 |N 0 | JSR 0x20b94 00021166 de fc 00 10 | | ADDA.W #0x10,A7 0002116a 10 39 00 02 54 f4 | 9 T | MOVE.B 0x254f4,D0 00021170 48 80 |H | EXTB.W D0 00021172 53 40 |S@ | SUBQ.W #0x1,D0 00021174 0c 40 00 02 | @ | CMPI.W #0x0002,D0 00021178 63 02 |c | BLS 0x2117c 0002117a 4e 4e |NN | TRAP #14 0002117c d0 40 | @ | ADD.W D0,D0 0002117e 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00021186 00 06 | | .CONST 0x6 ; [0x0] -> 0x2118c 00021188 00 0a | | .CONST 0xa ; [0x1] -> 0x21190 0002118a 00 0e | | .CONST 0xe ; [0x2] -> 0x21194 0002118c switch@0x2117e[0x0]: 0002118c 7e 01 |~ | MOVEQ.L #0x01,D7 0002118e 60 06 |` | BRA 0x21196 00021190 switch@0x2117e[0x1]: 00021190 7e 02 |~ | MOVEQ.L #0x02,D7 00021192 60 02 |` | BRA 0x21196 00021194 switch@0x2117e[0x2]: 00021194 7e 04 |~ | MOVEQ.L #0x04,D7 00021196 28 39 00 02 54 f6 |(9 T | MOVE.L 0x254f6,D4 0002119c 26 07 |& | MOVE.L D7,D3 0002119e 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 000211a4 4a 83 |J | TST.L D3 000211a6 67 2e |g. | BEQ 0x211d6 000211a8 9e fc 00 24 | $ | SUBA.W #0x24,A7 000211ac 20 4f | O | MOVEA.L A7,A0 000211ae 43 fa ef c8 |C | LEA.L 0x20178,A1 000211b2 70 22 |p" | MOVEQ.L #0x22,D0 000211b4 10 d9 | | MOVE.B (A1)+,(A0)+ 000211b6 51 c8 ff fc |Q | DBF D0,0x211b4 000211ba 59 4f |YO | SUBQ.L #0x4,A7 000211bc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000211c0 3f 01 |? | MOVE.W D1,-(A7) 000211c2 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 000211c6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000211cc 50 4f |PO | ADDQ.L #0x8,A7 000211ce 4e ba f2 2c |N , | JSR 0x203fc 000211d2 de fc 00 28 | ( | ADDA.W #0x28,A7 000211d6 20 52 | R | MOVEA.L (A2),A0 000211d8 b0 c1 | | CMPA.W D1,A0 000211da 66 30 |f0 | BNE 0x2120c 000211dc 9e c2 | | SUBA.W D2,A7 000211de 20 4f | O | MOVEA.L A7,A0 000211e0 43 fa ef e2 |C | LEA.L 0x201c4,A1 000211e4 70 32 |p2 | MOVEQ.L #0x32,D0 000211e6 10 d9 | | MOVE.B (A1)+,(A0)+ 000211e8 51 c8 ff fc |Q | DBF D0,0x211e6 000211ec 51 4f |QO | SUBQ.L #0x8,A7 000211ee 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000211f2 3f 01 |? | MOVE.W D1,-(A7) 000211f4 3f 3c 00 33 |?< 3 | MOVE.W #0x33,-(A7) 000211f8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000211fe 50 4f |PO | ADDQ.L #0x8,A7 00021200 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00021206 58 4f |XO | ADDQ.L #0x4,A7 00021208 24 9f |$ | MOVE.L (A7)+,(A2) 0002120a de c2 | | ADDA.W D2,A7 0002120c 4e ba f7 9a |N | JSR 0x209a8 00021210 4c df 07 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2 00021214 4e 5e |N^ | UNLK A6 00021216 4e 75 |Nu | RTS 00021218 ; -------------------------------------------------------------------------------------- 00021218 ; OMSI PASCAL Function 00021218 ; -------------------------------------------------------------------------------------- 00021218 4e 56 ff fc |NV | LINK.W A6,#0xfffc 0002121c bf d5 | | CMPA.L (A5),A7 0002121e 62 06 |b | BHI 0x21226 00021220 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021224 4e 76 |Nv | TRAPV 00021226 de fc 00 04 | | ADDA.W #0x4,A7 0002122a 42 b9 00 02 54 fa |B T | CLR.L 0x254fa 00021230 23 fc 00 00 00 01 00 02 |# | MOVE.L #0x1,0x254fe 00021238 54 fe |T | 0002123a 4e 5e |N^ | UNLK A6 0002123c 4e 75 |Nu | RTS 0002123e ; -------------------------------------------------------------------------------------- 0002123e ; OMSI PASCAL Function 0002123e ; <LVAR 0x010 4(r)> 0002123e ; <LVAR 0x00c 4(r)> 0002123e ; <LVAR 0x008 4(r)> 0002123e ; <LVAR -0x006 @ 4(rw)> 0002123e ; -------------------------------------------------------------------------------------- 0002123e 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 00021242 bf d5 | | CMPA.L (A5),A7 00021244 62 06 |b | BHI 0x2124c 00021246 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002124a 4e 76 |Nv | TRAPV 0002124c de fc 00 40 | @ | ADDA.W #0x40,A7 00021250 48 e7 e3 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D2+D1+D0,-(A7) 00021254 45 ee ff fa |E | LEA.L (A6-0x6),A2 00021258 72 01 |r | MOVEQ.L #0x01,D1 0002125a 74 0c |t | MOVEQ.L #0x0c,D2 0002125c 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021260 42 10 |B | CLR.B (A0) 00021262 7e 00 |~ | MOVEQ.L #0x00,D7 00021264 10 07 | | MOVE.B D7,D0 00021266 48 80 |H | EXTB.W D0 00021268 c1 c2 | | MULS.W D2,D0 0002126a 41 fa f1 18 |A | LEA.L 0x20384,A0 0002126e 9e c2 | | SUBA.W D2,A7 00021270 22 4f |"O | MOVEA.L A7,A1 00021272 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00021276 70 0b |p | MOVEQ.L #0x0b,D0 00021278 12 d8 | | MOVE.B (A0)+,(A1)+ 0002127a 51 c8 ff fc |Q | DBF D0,0x21278 0002127e 59 4f |YO | SUBQ.L #0x4,A7 00021280 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021284 3f 01 |? | MOVE.W D1,-(A7) 00021286 3f 02 |? | MOVE.W D2,-(A7) 00021288 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002128e 50 4f |PO | ADDQ.L #0x8,A7 00021290 24 9f |$ | MOVE.L (A7)+,(A2) 00021292 5c 4f |\O | ADDQ.L #0x6,A7 00021294 2e 92 |. | MOVE.L (A2),(A7) 00021296 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 0002129a 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000212a0 50 4f |PO | ADDQ.L #0x8,A7 000212a2 10 1f | | MOVE.B (A7)+,D0 000212a4 48 80 |H | EXTB.W D0 000212a6 41 81 |A | CHK.W D1,D0 000212a8 1c 00 | | MOVE.B D0,D6 000212aa 48 52 |HR | PEA.L (A2) 000212ac 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000212b2 58 4f |XO | ADDQ.L #0x4,A7 000212b4 4a 06 |J | TST.B D6 000212b6 67 34 |g4 | BEQ 0x212ec 000212b8 10 07 | | MOVE.B D7,D0 000212ba 48 80 |H | EXTB.W D0 000212bc b0 41 | A | CMP.W D1,D0 000212be 63 02 |c | BLS 0x212c2 000212c0 4e 4e |NN | TRAP #14 000212c2 d0 40 | @ | ADD.W D0,D0 000212c4 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 000212cc 00 04 | | .CONST 0x4 ; [0x0] -> 0x212d0 000212ce 00 0e | | .CONST 0xe ; [0x1] -> 0x212da 000212d0 switch@0x212c4[0x0]: 000212d0 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000212d4 4e ba fd 36 |N 6 | JSR 0x2100c 000212d8 60 08 |` | BRA 0x212e2 000212da switch@0x212c4[0x1]: 000212da 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000212de 4e ba fe 52 |N R | JSR 0x21132 000212e2 58 4f |XO | ADDQ.L #0x4,A7 000212e4 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000212e8 10 81 | | MOVE.B D1,(A0) 000212ea 60 08 |` | BRA 0x212f4 000212ec 52 07 |R | ADDQ.B #0x1,D7 000212ee be 01 | | CMP.B D1,D7 000212f0 6f 00 ff 72 |o r | BLE 0x21264 000212f4 4c df 07 c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0+A1+A2 000212f8 4e 5e |N^ | UNLK A6 000212fa 4e 75 |Nu | RTS 000212fc ; -------------------------------------------------------------------------------------- 000212fc ; OMSI PASCAL Function 000212fc ; <LVAR 0x008 4(r)> 000212fc ; -------------------------------------------------------------------------------------- 000212fc 4e 56 ff f0 |NV | LINK.W A6,#0xfff0 00021300 bf d5 | | CMPA.L (A5),A7 00021302 62 06 |b | BHI 0x2130a 00021304 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021308 4e 76 |Nv | TRAPV 0002130a de fc 00 10 | | ADDA.W #0x10,A7 0002130e 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00021312 4e b9 00 01 03 98 |N | JSR FSCALL_10398 00021318 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002131c 43 fa ef dc |C | LEA.L 0x202fa,A1 00021320 70 09 |p | MOVEQ.L #0x09,D0 00021322 10 d9 | | MOVE.B (A1)+,(A0)+ 00021324 51 c8 ff fc |Q | DBF D0,0x21322 00021328 4e ba fe ee |N | JSR 0x21218 0002132c 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00021330 4e 5e |N^ | UNLK A6 00021332 4e 75 |Nu | RTS 00021334 ; -------------------------------------------------------------------------------------- 00021334 ; COMMAND TABLE 00021334 ; -------------------------------------------------------------------------------------- 00021334 COMMAND_TABLE_21334: 00021334 21 40 23 24 25 5e 26 2a |!@#$%^&*| .TXT '!@#$%^&*()' 0002133e 57 52 49 54 45 20 20 20 |WRITE | .TXT 'WRITE ' 00021348 42 59 45 20 20 20 20 20 |BYE | .TXT 'BYE ' 00021352 48 45 41 50 20 20 20 20 |HEAP | .TXT 'HEAP ' 0002135c 48 45 4c 50 20 20 20 20 |HELP | .TXT 'HELP ' 00021366 41 42 4f 52 54 20 20 20 |ABORT | .TXT 'ABORT ' 00021370 43 4f 4d 4d 45 4e 54 20 |COMMENT | .TXT 'COMMENT ' 0002137a 53 45 54 20 20 20 20 20 |SET | .TXT 'SET ' 00021384 56 41 52 20 20 20 20 20 |VAR | .TXT 'VAR ' 0002138e 56 41 52 53 20 20 20 20 |VARS | .TXT 'VARS ' 00021398 45 51 20 20 20 20 20 20 |EQ | .TXT 'EQ ' 000213a2 4e 45 20 20 20 20 20 20 |NE | .TXT 'NE ' 000213ac 43 41 53 45 20 20 20 20 |CASE | .TXT 'CASE ' 000213b6 49 4e 53 45 52 54 20 20 |INSERT | .TXT 'INSERT ' 000213c0 45 58 54 52 41 43 54 20 |EXTRACT | .TXT 'EXTRACT ' 000213ca 23 43 41 53 45 20 20 20 |#CASE | .TXT '#CASE ' 000213d4 23 45 51 20 20 20 20 20 |#EQ | .TXT '#EQ ' 000213de 23 4e 45 20 20 20 20 20 |#NE | .TXT '#NE ' 000213e8 23 4c 54 20 20 20 20 20 |#LT | .TXT '#LT ' 000213f2 23 47 54 20 20 20 20 20 |#GT | .TXT '#GT ' 000213fc 23 4c 45 20 20 20 20 20 |#LE | .TXT '#LE ' 00021406 23 47 45 20 20 20 20 20 |#GE | .TXT '#GE ' 00021410 41 44 44 20 20 20 20 20 |ADD | .TXT 'ADD ' 0002141a 53 55 42 20 20 20 20 20 |SUB | .TXT 'SUB ' 00021424 4d 55 4c 20 20 20 20 20 |MUL | .TXT 'MUL ' 0002142e 44 49 56 20 20 20 20 20 |DIV | .TXT 'DIV ' 00021438 4d 4f 44 20 20 20 20 20 |MOD | .TXT 'MOD ' 00021442 4f 52 20 20 20 20 20 20 |OR | .TXT 'OR ' 0002144c 41 4e 44 20 20 20 20 20 |AND | .TXT 'AND ' 00021456 58 4f 52 20 20 20 20 20 |XOR | .TXT 'XOR ' 00021460 4c 53 48 49 46 54 20 20 |LSHIFT | .TXT 'LSHIFT ' 0002146a 52 53 48 49 46 54 20 20 |RSHIFT | .TXT 'RSHIFT ' 00021474 4e 4f 54 20 20 20 20 20 |NOT | .TXT 'NOT ' 0002147e 23 49 4e 53 45 52 54 20 |#INSERT | .TXT '#INSERT ' 00021488 23 45 58 54 52 41 43 54 |#EXTRACT| .TXT '#EXTRACT ' 00021492 52 45 41 44 20 20 20 20 |READ | .TXT 'READ ' 0002149c 4b 49 4c 4c 20 20 20 20 |KILL | .TXT 'KILL ' 000214a6 50 55 53 48 20 20 20 20 |PUSH | .TXT 'PUSH ' 000214b0 4c 45 56 45 4c 20 20 20 |LEVEL | .TXT 'LEVEL ' 000214ba 43 4f 4e 56 45 52 54 20 |CONVERT | .TXT 'CONVERT ' 000214c4 43 4f 55 4e 54 5f 4f 4e |COUNT_ON| .TXT 'COUNT_ONES' 000214ce 52 45 50 45 41 54 20 20 |REPEAT | .TXT 'REPEAT ' 000214d8 4d 4f 44 45 4c 20 20 20 |MODEL | .TXT 'MODEL ' 000214e2 41 53 43 49 49 20 20 20 |ASCII | .TXT 'ASCII ' 000214ec 57 72 6f 6e 67 20 6e 75 |Wrong nu| .TXT 'Wrong number of arguments for :_' 0002150c 45 51 2c 4e |EQ,N | .XXX[0x4] 00021510 45 2c 23 45 51 2c 23 4e |E,#EQ,#N| .XXX[0x38] 00021518 45 2c 23 4c 54 2c 23 47 |E,#LT,#G| 00021520 54 2c 23 4c 45 2c 23 47 |T,#LE,#G| 00021528 45 2c 45 4c 53 45 5d 45 |E,ELSE]E| 00021530 4e 44 5d 43 41 53 45 2c |ND]CASE,| 00021538 23 43 41 53 45 2c 57 48 |#CASE,WH| 00021540 45 4e 2c 45 4e 44 43 41 |EN,ENDCA| 00021548 53 45 5d 20 |SE] | .XXX[0x4] 0002154c 45 76 61 6c 75 61 74 69 |Evaluati| .TXT 'Evaluation buffer overflow. ' 00021568 55 6e 62 61 6c 61 6e 63 |Unbalanc| .TXT 'Unbalanced [ELSE] or [END]! ' 00021584 5b 57 48 45 4e 20 5d 20 |[WHEN ] | .TXT '[WHEN ] ' 0002158e 4e 6f 20 63 61 73 65 20 |No case | .TXT 'No case alternative found!' 000215a8 4e 6f 20 5b 45 4e 44 43 |No [ENDC| .TXT 'No [ENDCASE] found! ' 000215bc 4e 6f 20 68 65 6c 70 20 |No help | .TXT 'No help available for_' 000215d2 2e 48 4c 50 |.HLP | .TXT '.HLP' 000215d6 54 6f 6f 20 66 65 77 20 |Too few | .TXT 'Too few arguments for SET ' 000215f0 55 6e 6b 6e 6f 77 6e 20 |Unknown | .TXT 'Unknown variable :_ ' 00021604 20 69 73 20 6e 6f 74 20 | is not | .TXT ' is not a program.' 00021616 43 4c |CL | .TXT 'CL' 00021618 49 20 |I | .XXX[0x2] 0002161a 2e 4d 32 30 30 20 |.M200 | .TXT '.M200 ' 00021620 53 54 |ST | .TXT 'ST' 00021622 41 54 |AT | .TXT 'AT' 00021624 55 53 |US | .TXT 'US' 00021626 52 45 |RE | .TXT 'RE' 00021628 53 55 |SU | .TXT 'SU' 0002162a 4c 54 |LT | .TXT 'LT' 0002162c 4f 66 66 73 65 74 2f 4c |Offset/L| .TXT 'Offset/Length error in [INSERT] ' 0002164c 52 45 50 45 41 54 69 6e |REPEATin| .TXT 'REPEATing, type ^G to exit. ' 00021668 41 53 43 49 49 20 61 72 |ASCII ar| .TXT 'ASCII argument out of range.' 00021684 4e 6f 74 20 61 20 63 6f |Not a co| .TXT 'Not a command or macro :_ ' 0002169e 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal marker argument ' 000216b6 53 77 69 74 63 68 20 65 |Switch e| .TXT 'Switch exclusion is unimplemented.' 000216d8 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal argument marker.' 000216f0 49 6c 6c 65 67 61 6c 20 |Illegal | .TXT 'Illegal argument marker.' 00021708 5b 49 4e 49 54 5d 5b 20 |[INIT][ | .TXT '[INIT][ ' 00021710 5d 5b 42 59 45 5d 3b 20 |][BYE]; | .TXT '][BYE]; ' 00021718 5b 49 4e 49 54 5d 3b 20 |[INIT]; | .TXT '[INIT]; ' 00021720 3e 5f |>_ | .TXT '>_' 00021722 5b 20 |[ | .TXT '[ ' 00021724 5d 3b |]; | .TXT '];' 00021726 ; -------------------------------------------------------------------------------------- 00021726 ; COMMAND TABLE 00021726 ; -------------------------------------------------------------------------------------- 00021726 COMMAND_TABLE_21726: 00021726 21 40 23 24 25 5e 26 2a |!@#$%^&*| .TXT '!@#$%^&*()' 00021730 57 52 49 54 45 20 20 20 |WRITE | .TXT 'WRITE ' 0002173a 42 59 45 20 20 20 20 20 |BYE | .TXT 'BYE ' 00021744 48 45 41 50 20 20 20 20 |HEAP | .TXT 'HEAP ' 0002174e 48 45 4c 50 20 20 20 20 |HELP | .TXT 'HELP ' 00021758 41 42 4f 52 54 20 20 20 |ABORT | .TXT 'ABORT ' 00021762 43 4f 4d 4d 45 4e 54 20 |COMMENT | .TXT 'COMMENT ' 0002176c 53 45 54 20 20 20 20 20 |SET | .TXT 'SET ' 00021776 56 41 52 20 20 20 20 20 |VAR | .TXT 'VAR ' 00021780 56 41 52 53 20 20 20 20 |VARS | .TXT 'VARS ' 0002178a 45 51 20 20 20 20 20 20 |EQ | .TXT 'EQ ' 00021794 4e 45 20 20 20 20 20 20 |NE | .TXT 'NE ' 0002179e 43 41 53 45 20 20 20 20 |CASE | .TXT 'CASE ' 000217a8 49 4e 53 45 52 54 20 20 |INSERT | .TXT 'INSERT ' 000217b2 45 58 54 52 41 43 54 20 |EXTRACT | .TXT 'EXTRACT ' 000217bc 23 43 41 53 45 20 20 20 |#CASE | .TXT '#CASE ' 000217c6 23 45 51 20 20 20 20 20 |#EQ | .TXT '#EQ ' 000217d0 23 4e 45 20 20 20 20 20 |#NE | .TXT '#NE ' 000217da 23 4c 54 20 20 20 20 20 |#LT | .TXT '#LT ' 000217e4 23 47 54 20 20 20 20 20 |#GT | .TXT '#GT ' 000217ee 23 4c 45 20 20 20 20 20 |#LE | .TXT '#LE ' 000217f8 23 47 45 20 20 20 20 20 |#GE | .TXT '#GE ' 00021802 41 44 44 20 20 20 20 20 |ADD | .TXT 'ADD ' 0002180c 53 55 42 20 20 20 20 20 |SUB | .TXT 'SUB ' 00021816 4d 55 4c 20 20 20 20 20 |MUL | .TXT 'MUL ' 00021820 44 49 56 20 20 20 20 20 |DIV | .TXT 'DIV ' 0002182a 4d 4f 44 20 20 20 20 20 |MOD | .TXT 'MOD ' 00021834 4f 52 20 20 20 20 20 20 |OR | .TXT 'OR ' 0002183e 41 4e 44 20 20 20 20 20 |AND | .TXT 'AND ' 00021848 58 4f 52 20 20 20 20 20 |XOR | .TXT 'XOR ' 00021852 4c 53 48 49 46 54 20 20 |LSHIFT | .TXT 'LSHIFT ' 0002185c 52 53 48 49 46 54 20 20 |RSHIFT | .TXT 'RSHIFT ' 00021866 4e 4f 54 20 20 20 20 20 |NOT | .TXT 'NOT ' 00021870 23 49 4e 53 45 52 54 20 |#INSERT | .TXT '#INSERT ' 0002187a 23 45 58 54 52 41 43 54 |#EXTRACT| .TXT '#EXTRACT ' 00021884 52 45 41 44 20 20 20 20 |READ | .TXT 'READ ' 0002188e 4b 49 4c 4c 20 20 20 20 |KILL | .TXT 'KILL ' 00021898 50 55 53 48 20 20 20 20 |PUSH | .TXT 'PUSH ' 000218a2 4c 45 56 45 4c 20 20 20 |LEVEL | .TXT 'LEVEL ' 000218ac 43 4f 4e 56 45 52 54 20 |CONVERT | .TXT 'CONVERT ' 000218b6 43 4f 55 4e 54 5f 4f 4e |COUNT_ON| .TXT 'COUNT_ONES' 000218c0 52 45 50 45 41 54 20 20 |REPEAT | .TXT 'REPEAT ' 000218ca 4d 4f 44 45 4c 20 20 20 |MODEL | .TXT 'MODEL ' 000218d4 41 53 43 49 49 20 20 20 |ASCII | .TXT 'ASCII ' 000218de a5 34 | 4 | .XXX[0x2] 000218e0 45 73 34 22 46 75 33 33 |Es4"Fu33| .XXX[0x98] 000218e8 33 33 33 32 33 66 37 84 |33323f7 | 000218f0 44 57 a6 55 0f 00 f0 ff |DW U | 000218f8 10 22 14 31 22 22 22 22 | " 1""""| 00021900 22 22 22 22 14 3f 1f 03 |"""" ? | 00021908 10 0f 00 00 00 00 ff ff | | 00021910 ff ff 00 01 01 00 01 01 | | 00021918 00 01 02 00 00 01 02 00 | | 00021920 01 02 00 01 14 06 01 14 | | 00021928 08 14 0f 02 03 14 14 08 | | 00021930 14 0f 14 14 14 14 14 14 | | 00021938 14 04 14 05 14 14 14 14 | | 00021940 14 14 14 14 14 14 14 04 | | 00021948 14 14 14 14 14 14 04 14 | | 00021950 07 14 14 14 14 04 14 14 | | 00021958 14 14 14 14 0c 14 14 09 | | 00021960 14 14 14 0d 14 14 14 0b | | 00021968 0a 14 0e 14 14 14 08 14 | | 00021970 14 0c 14 14 09 14 14 14 | | 00021978 14 14 14 14 14 14 14 14 | | .BLANK 14[0x10] 00021988 14 14 14 14 14 10 14 14 | | .XXX[0x28] 00021990 11 14 14 14 14 14 14 14 | | 00021998 14 14 14 13 14 14 14 14 | | 000219a0 14 12 14 14 14 11 14 14 | | 000219a8 14 14 14 14 14 14 14 14 | | 000219b0 ; -------------------------------------------------------------------------------------- 000219b0 ; OMSI PASCAL Function 000219b0 ; <LVAR 0x008 4(r)> 000219b0 ; <LVAR -0x004 @ 4(w)> 000219b0 ; -------------------------------------------------------------------------------------- 000219b0 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 000219b4 bf d5 | | CMPA.L (A5),A7 000219b6 62 06 |b | BHI 0x219be 000219b8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000219bc 4e 76 |Nv | TRAPV 000219be de fc 00 10 | | ADDA.W #0x10,A7 000219c2 48 e7 00 08 |H | MOVEM.L A4,-(A7) 000219c6 28 6e 00 08 |(n | MOVEA.L (A6+0x8),A4 000219ca b8 fc 00 01 | | CMPA.W #0x1,A4 000219ce 67 1a |g | BEQ 0x219ea 000219d0 2d 4c ff fc |-L | MOVE.L A4,(A6-0x4) 000219d4 28 6c 00 08 |(l | MOVEA.L (A4+0x8),A4 000219d8 48 6e ff fc |Hn | PEA.L (A6-0x4) 000219dc 48 78 00 0c |Hx | PEA.L 0xc 000219e0 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 000219e6 50 4f |PO | ADDQ.L #0x8,A7 000219e8 60 e0 |` | BRA 0x219ca 000219ea 4c df 10 00 |L | MOVEM.L (A7)+,A4 000219ee 4e 5e |N^ | UNLK A6 000219f0 4e 75 |Nu | RTS 000219f2 ; -------------------------------------------------------------------------------------- 000219f2 ; OMSI PASCAL Function 000219f2 ; <LVAR 0x008 4(r)> 000219f2 ; -------------------------------------------------------------------------------------- 000219f2 4e 56 ff f0 |NV | LINK.W A6,#0xfff0 000219f6 bf d5 | | CMPA.L (A5),A7 000219f8 62 06 |b | BHI 0x21a00 000219fa 44 fc 00 02 |D | MOVE.W #0x2,CCR 000219fe 4e 76 |Nv | TRAPV 00021a00 de fc 00 10 | | ADDA.W #0x10,A7 00021a04 48 e7 00 80 |H | MOVEM.L A0,-(A7) 00021a08 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021a0c b0 fc 00 01 | | CMPA.W #0x1,A0 00021a10 67 0a |g | BEQ 0x21a1c 00021a12 2f 08 |/ | MOVE.L A0,-(A7) 00021a14 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021a1a 58 4f |XO | ADDQ.L #0x4,A7 00021a1c 2e 6d 00 08 |.m | MOVEA.L (A5+0x8),A7 00021a20 3c 7c 00 00 |<| | MOVEA.W #0x0,A6 00021a24 4e f9 00 02 52 ce |N R | JMP 0x252ce 00021a2a 4c df 01 00 4e 5e |L N^ | .XXX[0x6] 00021a30 4e 75 4e 56 ff fc bf d5 |NuNV | .XXX[0x20] 00021a38 62 06 44 fc 00 02 4e 76 |b D Nv| 00021a40 de fc 00 04 2d 79 00 02 | -y | 00021a48 65 18 00 08 4e 5e 4e 75 |e N^Nu| 00021a50 ; -------------------------------------------------------------------------------------- 00021a50 ; OMSI PASCAL Function 00021a50 ; <LVAR 0x008 1(rw)> 00021a50 ; -------------------------------------------------------------------------------------- 00021a50 4e 56 ff f0 |NV | LINK.W A6,#0xfff0 00021a54 bf d5 | | CMPA.L (A5),A7 00021a56 62 06 |b | BHI 0x21a5e 00021a58 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021a5c 4e 76 |Nv | TRAPV 00021a5e de fc 00 10 | | ADDA.W #0x10,A7 00021a62 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00021a66 20 39 00 02 65 18 | 9 e | MOVE.L 0x26518,D0 00021a6c b0 b9 00 02 65 1c | e | CMP.L 0x2651c,D0 00021a72 6f 06 |o | BLE 0x21a7a 00021a74 42 2e 00 08 |B. | CLR.B (A6+0x8) 00021a78 60 0c |` | BRA 0x21a86 00021a7a 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 00021a80 1d 70 08 07 00 08 | p | MOVE.B (A0+D0.L+#0x7),(A6+0x8) 00021a86 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00021a8a 4e 5e |N^ | UNLK A6 00021a8c 4e 75 |Nu | RTS 00021a8e ; -------------------------------------------------------------------------------------- 00021a8e ; OMSI PASCAL Function 00021a8e ; <LVAR 0x008 1(rw)> 00021a8e ; -------------------------------------------------------------------------------------- 00021a8e 4e 56 ff ec |NV | LINK.W A6,#0xffec 00021a92 bf d5 | | CMPA.L (A5),A7 00021a94 62 06 |b | BHI 0x21a9c 00021a96 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021a9a 4e 76 |Nv | TRAPV 00021a9c de fc 00 14 | | ADDA.W #0x14,A7 00021aa0 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00021aa4 43 f9 00 02 65 18 |C e | LEA.L 0x26518,A1 00021aaa 20 11 | | MOVE.L (A1),D0 00021aac b0 b9 00 02 65 1c | e | CMP.L 0x2651c,D0 00021ab2 6f 06 |o | BLE 0x21aba 00021ab4 42 2e 00 08 |B. | CLR.B (A6+0x8) 00021ab8 60 0c |` | BRA 0x21ac6 00021aba 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 00021ac0 1d 70 08 07 00 08 | p | MOVE.B (A0+D0.L+#0x7),(A6+0x8) 00021ac6 52 80 |R | ADDQ.L #0x1,D0 00021ac8 22 80 |" | MOVE.L D0,(A1) 00021aca 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00021ace 4e 5e |N^ | UNLK A6 00021ad0 4e 75 |Nu | RTS 00021ad2 ; -------------------------------------------------------------------------------------- 00021ad2 ; OMSI PASCAL Function 00021ad2 ; <LVAR 0x00c 4(r)> 00021ad2 ; <LVAR 0x008 4(r)> 00021ad2 ; -------------------------------------------------------------------------------------- 00021ad2 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 00021ad6 bf d5 | | CMPA.L (A5),A7 00021ad8 62 06 |b | BHI 0x21ae0 00021ada 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021ade 4e 76 |Nv | TRAPV 00021ae0 de fc 00 38 | 8 | ADDA.W #0x38,A7 00021ae4 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00021ae8 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00021aec 47 f9 00 02 65 18 |G e | LEA.L 0x26518,A3 00021af2 72 5b |r[ | MOVEQ.L #0x5b,D1 00021af4 74 02 |t | MOVEQ.L #0x02,D2 00021af6 76 2c |v, | MOVEQ.L #0x2c,D3 00021af8 78 3b |x; | MOVEQ.L #0x3b,D4 00021afa 55 4f |UO | SUBQ.L #0x2,A7 00021afc 4e ba ff 52 |N R | JSR 0x21a50 00021b00 10 1f | | MOVE.B (A7)+,D0 00021b02 b0 01 | | CMP.B D1,D0 00021b04 66 0a |f | BNE 0x21b10 00021b06 4e b9 00 02 4d d8 |N M | JSR 0x24dd8 00021b0c 60 00 00 92 |` | BRA 0x21ba0 00021b10 2c 13 |, | MOVE.L (A3),D6 00021b12 55 4f |UO | SUBQ.L #0x2,A7 00021b14 4e ba ff 78 |N x | JSR 0x21a8e 00021b18 1a 1f | | MOVE.B (A7)+,D5 00021b1a 66 18 |f | BNE 0x21b34 00021b1c 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00021b20 43 fa fd e8 |C | LEA.L 0x2190a,A1 00021b24 70 07 |p | MOVEQ.L #0x07,D0 00021b26 10 d9 | | MOVE.B (A1)+,(A0)+ 00021b28 51 c8 ff fc |Q | DBF D0,0x21b26 00021b2c 20 52 | R | MOVEA.L (A2),A0 00021b2e 10 82 | | MOVE.B D2,(A0) 00021b30 60 72 |`r | BRA 0x21ba4 00021b32 60 5c |`\ | .XXX[0x2] 00021b34 ba 03 | | CMP.B D3,D5 00021b36 66 08 |f | BNE 0x21b40 00021b38 20 52 | R | MOVEA.L (A2),A0 00021b3a 10 bc 00 03 | | MOVE.B #0x03,(A0) 00021b3e 60 50 |`P | BRA 0x21b90 00021b40 ba 04 | | CMP.B D4,D5 00021b42 66 08 |f | BNE 0x21b4c 00021b44 20 52 | R | MOVEA.L (A2),A0 00021b46 10 bc 00 01 | | MOVE.B #0x01,(A0) 00021b4a 60 44 |`D | BRA 0x21b90 00021b4c 0c 05 00 5d | ] | CMPI.B #0x5d,D5 00021b50 66 06 |f | BNE 0x21b58 00021b52 20 52 | R | MOVEA.L (A2),A0 00021b54 10 82 | | MOVE.B D2,(A0) 00021b56 60 38 |`8 | BRA 0x21b90 00021b58 20 52 | R | MOVEA.L (A2),A0 00021b5a 42 10 |B | CLR.B (A0) 00021b5c 55 4f |UO | SUBQ.L #0x2,A7 00021b5e 4e ba fe f0 |N | JSR 0x21a50 00021b62 1e 1f | | MOVE.B (A7)+,D7 00021b64 be 01 | | CMP.B D1,D7 00021b66 66 08 |f | BNE 0x21b70 00021b68 4e b9 00 02 4d d8 |N M | JSR 0x24dd8 00021b6e 60 1e |` | BRA 0x21b8e 00021b70 be 04 | | CMP.B D4,D7 00021b72 67 0e |g | BEQ 0x21b82 00021b74 be 03 | | CMP.B D3,D7 00021b76 67 0a |g | BEQ 0x21b82 00021b78 0c 07 00 5d | ] | CMPI.B #0x5d,D7 00021b7c 67 04 |g | BEQ 0x21b82 00021b7e 4a 07 |J | TST.B D7 00021b80 66 04 |f | BNE 0x21b86 00021b82 60 0c |` | BRA 0x21b90 00021b84 60 08 |` | .XXX[0x2] 00021b86 55 4f |UO | SUBQ.L #0x2,A7 00021b88 4e ba ff 04 |N | JSR 0x21a8e 00021b8c 1e 1f | | MOVE.B (A7)+,D7 00021b8e 60 cc |` | BRA 0x21b5c 00021b90 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00021b94 20 86 | | MOVE.L D6,(A0) 00021b96 21 53 00 04 |!S | MOVE.L (A3),(A0+0x4) 00021b9a 53 a8 00 04 |S | SUBQ.L #0x1,(A0+0x4) 00021b9e 60 04 |` | BRA 0x21ba4 00021ba0 60 00 ff 58 |` X | BRA 0x21afa 00021ba4 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 00021ba8 4e 5e |N^ | UNLK A6 00021baa 4e 75 |Nu | RTS 00021bac ; -------------------------------------------------------------------------------------- 00021bac ; OMSI PASCAL Function 00021bac ; <LVAR 0x010 4(r)> 00021bac ; <LVAR 0x00c 4(r)> 00021bac ; <LVAR 0x008 4(r)> 00021bac ; <LVAR -0x004 @ 1(rw)> 00021bac ; <LVAR -0x008 4(w)> 00021bac ; <LVAR -0x00c @ 4(w)> 00021bac ; -------------------------------------------------------------------------------------- 00021bac 4e 56 ff ca |NV | LINK.W A6,#0xffca 00021bb0 bf d5 | | CMPA.L (A5),A7 00021bb2 62 06 |b | BHI 0x21bba 00021bb4 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021bb8 4e 76 |Nv | TRAPV 00021bba de fc 00 2a | * | ADDA.W #0x2a,A7 00021bbe 48 e7 c0 f0 |H | MOVEM.L A3+A2+A1+A0+D1+D0,-(A7) 00021bc2 45 ee ff fc |E | LEA.L (A6-0x4),A2 00021bc6 47 ee ff f4 |G | LEA.L (A6-0xc),A3 00021bca 72 03 |r | MOVEQ.L #0x03,D1 00021bcc 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021bd0 10 10 | | MOVE.B (A0),D0 00021bd2 0c 00 00 01 | | CMPI.B #0x01,D0 00021bd6 67 06 |g | BEQ 0x21bde 00021bd8 0c 00 00 02 | | CMPI.B #0x02,D0 00021bdc 66 0e |f | BNE 0x21bec 00021bde 26 ba fd 2a |& * | MOVE.L 0x2190a,(A3) 00021be2 2d 7a fd 2a ff f8 |-z * | MOVE.L 0x2190e,(A6-0x8) 00021be8 14 80 | | MOVE.B D0,(A2) 00021bea 60 3c |`< | BRA 0x21c28 00021bec 48 53 |HS | PEA.L (A3) 00021bee 48 52 |HR | PEA.L (A2) 00021bf0 4e ba fe e0 |N | JSR 0x21ad2 00021bf4 50 4f |PO | ADDQ.L #0x8,A7 00021bf6 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021bfa 4a 12 |J | TST.B (A2) 00021bfc 67 1c |g | BEQ 0x21c1a 00021bfe 10 10 | | MOVE.B (A0),D0 00021c00 b0 01 | | CMP.B D1,D0 00021c02 66 16 |f | BNE 0x21c1a 00021c04 10 12 | | MOVE.B (A2),D0 00021c06 48 80 |H | EXTB.W D0 00021c08 41 81 |A | CHK.W D1,D0 00021c0a 10 80 | | MOVE.B D0,(A0) 00021c0c 26 ba fc fc |& | MOVE.L 0x2190a,(A3) 00021c10 2d 7a fc fc ff f8 |-z | MOVE.L 0x2190e,(A6-0x8) 00021c16 42 12 |B | CLR.B (A2) 00021c18 60 08 |` | BRA 0x21c22 00021c1a 10 12 | | MOVE.B (A2),D0 00021c1c 48 80 |H | EXTB.W D0 00021c1e 41 81 |A | CHK.W D1,D0 00021c20 10 80 | | MOVE.B D0,(A0) 00021c22 10 12 | | MOVE.B (A2),D0 00021c24 b0 01 | | CMP.B D1,D0 00021c26 67 c4 |g | BEQ 0x21bec 00021c28 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00021c2c 22 4b |"K | MOVEA.L A3,A1 00021c2e 70 07 |p | MOVEQ.L #0x07,D0 00021c30 10 d9 | | MOVE.B (A1)+,(A0)+ 00021c32 51 c8 ff fc |Q | DBF D0,0x21c30 00021c36 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00021c3a 10 12 | | MOVE.B (A2),D0 00021c3c 48 80 |H | EXTB.W D0 00021c3e 41 81 |A | CHK.W D1,D0 00021c40 10 80 | | MOVE.B D0,(A0) 00021c42 4c df 0f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3 00021c46 4e 5e |N^ | UNLK A6 00021c48 4e 75 |Nu | RTS 00021c4a ; -------------------------------------------------------------------------------------- 00021c4a ; OMSI PASCAL Function 00021c4a ; <LVAR 0x008 4(rw)> 00021c4a ; <LVAR -0x004 1(rw)> 00021c4a ; <LVAR -0x010 2(rw)> 00021c4a ; -------------------------------------------------------------------------------------- 00021c4a 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 00021c4e bf d5 | | CMPA.L (A5),A7 00021c50 62 06 |b | BHI 0x21c58 00021c52 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021c56 4e 76 |Nv | TRAPV 00021c58 de fc 00 30 | 0 | ADDA.W #0x30,A7 00021c5c 48 e7 c7 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 00021c60 43 ee ff f0 |C | LEA.L (A6-0x10),A1 00021c64 45 ee ff fc |E | LEA.L (A6-0x4),A2 00021c68 47 ee 00 08 |G | LEA.L (A6+0x8),A3 00021c6c 72 20 |r | MOVEQ.L #0x20,D1 00021c6e 7c 01 || | MOVEQ.L #0x01,D6 00021c70 42 51 |BQ | CLR.W (A1) 00021c72 7a 01 |z | MOVEQ.L #0x01,D5 00021c74 59 4f |YO | SUBQ.L #0x4,A7 00021c76 2f 13 |/ | MOVE.L (A3),-(A7) 00021c78 4e b9 00 01 02 f0 |N | JSR ToUpper(a : String) : String 00021c7e 58 4f |XO | ADDQ.L #0x4,A7 00021c80 26 9f |& | MOVE.L (A7)+,(A3) 00021c82 20 53 | S | MOVEA.L (A3),A0 00021c84 2f 08 |/ | MOVE.L A0,-(A7) 00021c86 20 57 | W | MOVEA.L (A7),A0 00021c88 30 10 |0 | MOVE.W (A0),D0 00021c8a 48 c0 |H | EXTW.L D0 00021c8c bc 80 | | CMP.L D0,D6 00021c8e 6e 00 00 b0 |n | BGT 0x21d40 00021c92 42 80 |B | CLR.L D0 00021c94 10 30 68 01 | 0h | MOVE.B (A0+D6.L+#0x1),D0 00021c98 02 40 00 7f | @ | ANDI.W #0x007f,D0 00021c9c 14 80 | | MOVE.B D0,(A2) 00021c9e 0c 00 00 09 | | CMPI.B #0x09,D0 00021ca2 66 02 |f | BNE 0x21ca6 00021ca4 14 81 | | MOVE.B D1,(A2) 00021ca6 42 80 |B | CLR.L D0 00021ca8 10 12 | | MOVE.B (A2),D0 00021caa 90 41 | A | SUB.W D1,D0 00021cac 0c 40 00 0c | @ | CMPI.W #0x000c,D0 00021cb0 62 30 |b0 | BHI switch@0x21cb4[0x2] 00021cb2 d0 40 | @ | ADD.W D0,D0 00021cb4 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00021cbc 00 1e | | .CONST 0x1e ; [0x0] -> 0x21cda 00021cbe 00 1a | | .CONST 0x1a ; [0x1] -> 0x21cd6 00021cc0 00 26 | & | .CONST 0x26 ; [0x2] -> 0x21ce2 00021cc2 00 26 | & | .CONST 0x26 ; [0x3] -> 0x21ce2 00021cc4 00 26 | & | .CONST 0x26 ; [0x4] -> 0x21ce2 00021cc6 00 26 | & | .CONST 0x26 ; [0x5] -> 0x21ce2 00021cc8 00 26 | & | .CONST 0x26 ; [0x6] -> 0x21ce2 00021cca 00 26 | & | .CONST 0x26 ; [0x7] -> 0x21ce2 00021ccc 00 26 | & | .CONST 0x26 ; [0x8] -> 0x21ce2 00021cce 00 26 | & | .CONST 0x26 ; [0x9] -> 0x21ce2 00021cd0 00 26 | & | .CONST 0x26 ; [0xa] -> 0x21ce2 00021cd2 00 26 | & | .CONST 0x26 ; [0xb] -> 0x21ce2 00021cd4 00 22 | " | .CONST 0x22 ; [0xc] -> 0x21cde 00021cd6 switch@0x21cb4[0x1]: 00021cd6 60 68 |`h | BRA 0x21d40 00021cd8 60 0a |` | .XXX[0x2] 00021cda switch@0x21cb4[0x0]: 00021cda 7e 00 |~ | MOVEQ.L #0x00,D7 00021cdc 60 06 |` | BRA 0x21ce4 00021cde switch@0x21cb4[0xc]: 00021cde 7e 01 |~ | MOVEQ.L #0x01,D7 00021ce0 60 02 |` | BRA 0x21ce4 00021ce2 switch@0x21cb4[0x2]: 00021ce2 switch@0x21cb4[0x3]: 00021ce2 switch@0x21cb4[0x4]: 00021ce2 switch@0x21cb4[0x5]: 00021ce2 switch@0x21cb4[0x6]: 00021ce2 switch@0x21cb4[0x7]: 00021ce2 switch@0x21cb4[0x8]: 00021ce2 switch@0x21cb4[0x9]: 00021ce2 switch@0x21cb4[0xa]: 00021ce2 switch@0x21cb4[0xb]: 00021ce2 7e 02 |~ | MOVEQ.L #0x02,D7 00021ce4 70 03 |p | MOVEQ.L #0x03,D0 00021ce6 c1 d1 | | MULS.W (A1),D0 00021ce8 41 fa fc 28 |A ( | LEA.L 0x21912,A0 00021cec 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00021cf0 42 80 |B | CLR.L D0 00021cf2 10 30 70 00 | 0p | MOVE.B (A0+D7.W),D0 00021cf6 0c 40 00 02 | @ | CMPI.W #0x0002,D0 00021cfa 63 02 |c | BLS 0x21cfe 00021cfc 4e 4e |NN | TRAP #14 00021cfe d0 40 | @ | ADD.W D0,D0 00021d00 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00021d08 00 06 | | .CONST 0x6 ; [0x0] -> 0x21d0e 00021d0a 00 08 | | .CONST 0x8 ; [0x1] -> 0x21d10 00021d0c 00 12 | | .CONST 0x12 ; [0x2] -> 0x21d1a 00021d0e switch@0x21d00[0x0]: 00021d0e 60 16 |` | BRA 0x21d26 00021d10 switch@0x21d00[0x1]: 00021d10 20 57 | W | MOVEA.L (A7),A0 00021d12 11 92 58 01 | X | MOVE.B (A2),(A0+D5.L+#0x1) 00021d16 52 85 |R | ADDQ.L #0x1,D5 00021d18 60 0c |` | BRA 0x21d26 00021d1a switch@0x21d00[0x2]: 00021d1a 20 57 | W | MOVEA.L (A7),A0 00021d1c 11 bc 00 2c 58 01 | ,X | MOVE.B #0x2c,(A0+D5.L+#0x1) 00021d22 52 85 |R | ADDQ.L #0x1,D5 00021d24 53 86 |S | SUBQ.L #0x1,D6 00021d26 70 03 |p | MOVEQ.L #0x03,D0 00021d28 c1 d1 | | MULS.W (A1),D0 00021d2a 41 fa fb ef |A | LEA.L 0x2191b,A0 00021d2e 41 f0 00 00 |A | LEA.L (A0+D0.W),A0 00021d32 42 80 |B | CLR.L D0 00021d34 10 30 70 00 | 0p | MOVE.B (A0+D7.W),D0 00021d38 32 80 |2 | MOVE.W D0,(A1) 00021d3a 52 86 |R | ADDQ.L #0x1,D6 00021d3c 60 00 ff 48 |` H | BRA 0x21c86 00021d40 20 57 | W | MOVEA.L (A7),A0 00021d42 20 05 | | MOVE.L D5,D0 00021d44 53 80 |S | SUBQ.L #0x1,D0 00021d46 30 80 |0 | MOVE.W D0,(A0) 00021d48 58 4f |XO | ADDQ.L #0x4,A7 00021d4a 4c df 0f e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3 00021d4e 4e 5e |N^ | UNLK A6 00021d50 4e 75 |Nu | RTS 00021d52 ; -------------------------------------------------------------------------------------- 00021d52 ; OMSI PASCAL Function 00021d52 ; <LVAR 0x00c 4(r)> 00021d52 ; <LVAR 0x008 4(r)> 00021d52 ; <LVAR -0x002 @ 1(r)> 00021d52 ; <LVAR -0x00a @> 00021d52 ; <LVAR -0x00e @ 4(r)> 00021d52 ; <LVAR -0x014 @ 1(r)> 00021d52 ; -------------------------------------------------------------------------------------- 00021d52 4e 56 ff bc |NV | LINK.W A6,#0xffbc 00021d56 bf d5 | | CMPA.L (A5),A7 00021d58 62 06 |b | BHI 0x21d60 00021d5a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021d5e 4e 76 |Nv | TRAPV 00021d60 de fc 00 30 | 0 | ADDA.W #0x30,A7 00021d64 48 e7 c1 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D1+D0,-(A7) 00021d68 47 ee ff f2 |G | LEA.L (A6-0xe),A3 00021d6c 72 01 |r | MOVEQ.L #0x01,D1 00021d6e 55 4f |UO | SUBQ.L #0x2,A7 00021d70 4e ba fc de |N | JSR 0x21a50 00021d74 10 1f | | MOVE.B (A7)+,D0 00021d76 0c 00 00 5b | [ | CMPI.B #0x5b,D0 00021d7a 66 08 |f | BNE 0x21d84 00021d7c 55 4f |UO | SUBQ.L #0x2,A7 00021d7e 4e ba fd 0e |N | JSR 0x21a8e 00021d82 1e 1f | | MOVE.B (A7)+,D7 00021d84 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00021d88 20 81 | | MOVE.L D1,(A0) 00021d8a 42 2e ff ec |B. | CLR.B (A6-0x14) 00021d8e 48 6e ff f6 |Hn | PEA.L (A6-0xa) 00021d92 48 6e ff fe |Hn | PEA.L (A6-0x2) 00021d96 48 6e ff ec |Hn | PEA.L (A6-0x14) 00021d9a 4e ba fe 10 |N | JSR 0x21bac 00021d9e de fc 00 0c | | ADDA.W #0xc,A7 00021da2 4a 2e ff fe |J. | TST.B (A6-0x2) 00021da6 66 36 |f6 | BNE 0x21dde 00021da8 48 53 |HS | PEA.L (A3) 00021daa 48 78 00 0c |Hx | PEA.L 0xc 00021dae 4e b9 00 01 02 9c |N | JSR Malloc1(length : Long) : Pointer 00021db4 50 4f |PO | ADDQ.L #0x8,A7 00021db6 20 53 | S | MOVEA.L (A3),A0 00021db8 22 48 |"H | MOVEA.L A0,A1 00021dba 45 ee ff f6 |E | LEA.L (A6-0xa),A2 00021dbe 70 07 |p | MOVEQ.L #0x07,D0 00021dc0 12 da | | MOVE.B (A2)+,(A1)+ 00021dc2 51 c8 ff fc |Q | DBF D0,0x21dc0 00021dc6 21 41 00 08 |!A | MOVE.L D1,(A0+0x8) 00021dca 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00021dce 22 50 |"P | MOVEA.L (A0),A1 00021dd0 b2 c1 | | CMPA.W D1,A1 00021dd2 66 04 |f | BNE 0x21dd8 00021dd4 20 93 | | MOVE.L (A3),(A0) 00021dd6 60 04 |` | BRA 0x21ddc 00021dd8 29 53 00 08 |)S | MOVE.L (A3),(A4+0x8) 00021ddc 28 53 |(S | MOVEA.L (A3),A4 00021dde 4a 2e ff fe |J. | TST.B (A6-0x2) 00021de2 67 aa |g | BEQ 0x21d8e 00021de4 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021de8 42 10 |B | CLR.B (A0) 00021dea 10 2e ff fe | . | MOVE.B (A6-0x2),D0 00021dee 0c 00 00 02 | | CMPI.B #0x02,D0 00021df2 66 02 |f | BNE 0x21df6 00021df4 52 10 |R | ADDQ.B #0x1,(A0) 00021df6 4c df 1f 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2+A3+A4 00021dfa 4e 5e |N^ | UNLK A6 00021dfc 4e 75 |Nu | RTS 00021dfe ; -------------------------------------------------------------------------------------- 00021dfe ; OMSI PASCAL Function 00021dfe ; <LVAR 0x00c 4(w)> 00021dfe ; <LVAR 0x008 4(r)> 00021dfe ; -------------------------------------------------------------------------------------- 00021dfe 4e 56 ff ec |NV | LINK.W A6,#0xffec 00021e02 bf d5 | | CMPA.L (A5),A7 00021e04 62 06 |b | BHI 0x21e0c 00021e06 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021e0a 4e 76 |Nv | TRAPV 00021e0c de fc 00 0c | | ADDA.W #0xc,A7 00021e10 48 e7 01 08 |H | MOVEM.L A4+D7,-(A7) 00021e14 7e ff |~ | MOVEQ.L #-0x01,D7 00021e16 28 6e 00 08 |(n | MOVEA.L (A6+0x8),A4 00021e1a b8 fc 00 01 | | CMPA.W #0x1,A4 00021e1e 67 08 |g | BEQ 0x21e28 00021e20 52 87 |R | ADDQ.L #0x1,D7 00021e22 28 6c 00 08 |(l | MOVEA.L (A4+0x8),A4 00021e26 60 f2 |` | BRA 0x21e1a 00021e28 2d 47 00 0c |-G | MOVE.L D7,(A6+0xc) 00021e2c 4c df 10 80 |L | MOVEM.L (A7)+,D7+A4 00021e30 4e 5e |N^ | UNLK A6 00021e32 4e 75 |Nu | RTS 00021e34 ; -------------------------------------------------------------------------------------- 00021e34 ; OMSI PASCAL Function 00021e34 ; <LVAR 0x00c 4(r)> 00021e34 ; <LVAR 0x008 4(r)> 00021e34 ; -------------------------------------------------------------------------------------- 00021e34 4e 56 ff b0 |NV | LINK.W A6,#0xffb0 00021e38 bf d5 | | CMPA.L (A5),A7 00021e3a 62 06 |b | BHI 0x21e42 00021e3c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021e40 4e 76 |Nv | TRAPV 00021e42 de fc 00 4e | N | ADDA.W #0x4e,A7 00021e46 48 e7 c0 80 |H | MOVEM.L A0+D1+D0,-(A7) 00021e4a 72 01 |r | MOVEQ.L #0x01,D1 00021e4c 59 4f |YO | SUBQ.L #0x4,A7 00021e4e 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00021e52 4e ba ff aa |N | JSR 0x21dfe 00021e56 58 4f |XO | ADDQ.L #0x4,A7 00021e58 20 1f | | MOVE.L (A7)+,D0 00021e5a b0 ae 00 08 | | CMP.L (A6+0x8),D0 00021e5e 67 58 |gX | BEQ 0x21eb8 00021e60 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00021e64 4e ba fb 4a |N J | JSR 0x219b0 00021e68 58 4f |XO | ADDQ.L #0x4,A7 00021e6a 41 fa f6 a0 |A | LEA.L 0x2150c,A0 00021e6e 70 07 |p | MOVEQ.L #0x07,D0 00021e70 2f 20 |/ | MOVE.L -(A0),-(A7) 00021e72 51 c8 ff fc |Q | DBF D0,0x21e70 00021e76 41 ee 00 1a |A | LEA.L (A6+0x1a),A0 00021e7a 70 04 |p | MOVEQ.L #0x04,D0 00021e7c 3f 20 |? | MOVE.W -(A0),-(A7) 00021e7e 51 c8 ff fc |Q | DBF D0,0x21e7c 00021e82 51 4f |QO | SUBQ.L #0x8,A7 00021e84 48 6f 00 12 |Ho | PEA.L (A7+0x12) 00021e88 3f 01 |? | MOVE.W D1,-(A7) 00021e8a 3f 3c 00 20 |?< | MOVE.W #0x20,-(A7) 00021e8e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021e94 58 4f |XO | ADDQ.L #0x4,A7 00021e96 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021e9a 3f 01 |? | MOVE.W D1,-(A7) 00021e9c 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00021ea0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021ea6 50 4f |PO | ADDQ.L #0x8,A7 00021ea8 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021eae 50 4f |PO | ADDQ.L #0x8,A7 00021eb0 4e ba fb 40 |N @ | JSR 0x219f2 00021eb4 de fc 00 2e | . | ADDA.W #0x2e,A7 00021eb8 4c df 01 03 |L | MOVEM.L (A7)+,D0+D1+A0 00021ebc 4e 5e |N^ | UNLK A6 00021ebe 4e 75 |Nu | RTS 00021ec0 ; -------------------------------------------------------------------------------------- 00021ec0 ; OMSI PASCAL Function 00021ec0 ; <LVAR 0x014 1(rw)> 00021ec0 ; <LVAR 0x010 4(r)> 00021ec0 ; <LVAR 0x00c 4(r)> 00021ec0 ; <LVAR 0x008 4(r)> 00021ec0 ; -------------------------------------------------------------------------------------- 00021ec0 4e 56 ff dc |NV | LINK.W A6,#0xffdc ; Spelunked 00021ec4 bf d5 | | CMPA.L (A5),A7 00021ec6 62 06 |b | BHI 0x21ece 00021ec8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021ecc 4e 76 |Nv | TRAPV 00021ece de fc 00 20 | | ADDA.W #0x20,A7 00021ed2 48 e7 c1 c0 |H | MOVEM.L A1+A0+D7+D1+D0,-(A7) 00021ed6 42 2e 00 14 |B. | CLR.B (A6+0x14) 00021eda 20 2e 00 10 | . | MOVE.L (A6+0x10),D0 00021ede d0 ae 00 08 | | ADD.L (A6+0x8),D0 00021ee2 b0 b9 00 02 65 1c | e | CMP.L 0x2651c,D0 00021ee8 6e 4e |nN | BGT 0x21f38 00021eea 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00021eee 7e 01 |~ | MOVEQ.L #0x01,D7 00021ef0 be 97 | | CMP.L (A7),D7 00021ef2 6e 42 |nB | BGT 0x21f36 00021ef4 20 2e 00 10 | . | MOVE.L (A6+0x10),D0 00021ef8 d0 87 | | ADD.L D7,D0 00021efa 53 80 |S | SUBQ.L #0x1,D0 00021efc 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 00021f02 63 02 |c | BLS 0x21f06 00021f04 4e 4f |NO | TRAP #15 00021f06 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 00021f0c 22 2e 00 0c |". | MOVE.L (A6+0xc),D1 00021f10 d2 87 | | ADD.L D7,D1 00021f12 53 81 |S | SUBQ.L #0x1,D1 00021f14 53 81 |S | SUBQ.L #0x1,D1 00021f16 0c 81 00 00 00 3e | > | CMPI.L #0x0000003e,D1 00021f1c 63 02 |c | BLS 0x21f20 00021f1e 4e 4f |NO | TRAP #15 00021f20 43 fa f5 ea |C | LEA.L 0x2150c,A1 00021f24 10 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D0 00021f28 b0 31 18 00 | 1 | CMP.B (A1+D1.L),D0 00021f2c 67 04 |g | BEQ 0x21f32 00021f2e 58 4f |XO | ADDQ.L #0x4,A7 00021f30 60 0c |` | BRA 0x21f3e 00021f32 52 87 |R | ADDQ.L #0x1,D7 00021f34 68 ba |h | BVC 0x21ef0 00021f36 58 4f |XO | ADDQ.L #0x4,A7 00021f38 1d 7c 00 01 00 14 | | | MOVE.B #0x01,(A6+0x14) 00021f3e 4c df 03 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1 00021f42 4e 5e |N^ | UNLK A6 00021f44 4e 75 |Nu | RTS 00021f46 ; -------------------------------------------------------------------------------------- 00021f46 ; OMSI PASCAL Function 00021f46 ; <LVAR 0x00c 4(r)> 00021f46 ; <LVAR 0x008 4(r)> 00021f46 ; -------------------------------------------------------------------------------------- 00021f46 4e 56 ff bc |NV | LINK.W A6,#0xffbc 00021f4a bf d5 | | CMPA.L (A5),A7 00021f4c 62 06 |b | BHI 0x21f54 00021f4e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021f52 4e 76 |Nv | TRAPV 00021f54 de fc 00 40 | @ | ADDA.W #0x40,A7 00021f58 48 e7 80 f0 |H | MOVEM.L A3+A2+A1+A0+D0,-(A7) 00021f5c 45 f9 00 02 65 1c |E e | LEA.L 0x2651c,A2 00021f62 47 ee 00 08 |G | LEA.L (A6+0x8),A3 00021f66 4a 93 |J | TST.L (A3) 00021f68 6c 3e |l> | BGE 0x21fa8 00021f6a 20 13 | | MOVE.L (A3),D0 00021f6c 44 80 |D | NEG.L D0 00021f6e d0 92 | | ADD.L (A2),D0 00021f70 0c 80 00 00 10 00 | | CMPI.L #0x00001000,D0 00021f76 6f 30 |o0 | BLE 0x21fa8 00021f78 9e fc 00 1c | | SUBA.W #0x1c,A7 00021f7c 20 4f | O | MOVEA.L A7,A0 00021f7e 43 fa f5 cc |C | LEA.L 0x2154c,A1 00021f82 70 1a |p | MOVEQ.L #0x1a,D0 00021f84 10 d9 | | MOVE.B (A1)+,(A0)+ 00021f86 51 c8 ff fc |Q | DBF D0,0x21f84 00021f8a 59 4f |YO | SUBQ.L #0x4,A7 00021f8c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021f90 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021f94 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 00021f98 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021f9e 50 4f |PO | ADDQ.L #0x8,A7 00021fa0 4e ba fa 50 |N P | JSR 0x219f2 00021fa4 de fc 00 20 | | ADDA.W #0x20,A7 00021fa8 41 f9 00 02 55 18 |A U | LEA.L 0x25518,A0 00021fae 2f 08 |/ | MOVE.L A0,-(A7) 00021fb0 2f 12 |/ | MOVE.L (A2),-(A7) 00021fb2 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00021fb6 2f 13 |/ | MOVE.L (A3),-(A7) 00021fb8 4e b9 00 01 03 64 |N d | JSR MovStringTail(Base, Len, Ptr, Delta) 00021fbe de fc 00 10 | | ADDA.W #0x10,A7 00021fc2 20 12 | | MOVE.L (A2),D0 00021fc4 90 93 | | SUB.L (A3),D0 00021fc6 24 80 |$ | MOVE.L D0,(A2) 00021fc8 4c df 0f 01 |L | MOVEM.L (A7)+,D0+A0+A1+A2+A3 00021fcc 4e 5e |N^ | UNLK A6 00021fce 4e 75 |Nu | RTS 00021fd0 ; -------------------------------------------------------------------------------------- 00021fd0 ; OMSI PASCAL Function 00021fd0 ; <LVAR 0x00c 4(r)> 00021fd0 ; <LVAR 0x008 4(r)> 00021fd0 ; -------------------------------------------------------------------------------------- 00021fd0 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 00021fd4 bf d5 | | CMPA.L (A5),A7 00021fd6 62 06 |b | BHI 0x21fde 00021fd8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021fdc 4e 76 |Nv | TRAPV 00021fde de fc 00 28 | ( | ADDA.W #0x28,A7 00021fe2 48 e7 c1 e0 |H | MOVEM.L A2+A1+A0+D7+D1+D0,-(A7) 00021fe6 45 ee 00 0c |E | LEA.L (A6+0xc),A2 00021fea 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00021fee 2f 08 |/ | MOVE.L A0,-(A7) 00021ff0 22 52 |"R | MOVEA.L (A2),A1 00021ff2 2f 11 |/ | MOVE.L (A1),-(A7) 00021ff4 30 10 |0 | MOVE.W (A0),D0 00021ff6 48 c0 |H | EXTW.L D0 00021ff8 44 80 |D | NEG.L D0 00021ffa 2f 00 |/ | MOVE.L D0,-(A7) 00021ffc 4e ba ff 48 |N H | JSR 0x21f46 00022000 50 4f |PO | ADDQ.L #0x8,A7 00022002 30 10 |0 | MOVE.W (A0),D0 00022004 48 c0 |H | EXTW.L D0 00022006 2f 00 |/ | MOVE.L D0,-(A7) 00022008 7e 01 |~ | MOVEQ.L #0x01,D7 0002200a be 97 | | CMP.L (A7),D7 0002200c 6e 36 |n6 | BGT 0x22044 0002200e 20 52 | R | MOVEA.L (A2),A0 00022010 20 07 | | MOVE.L D7,D0 00022012 d0 90 | | ADD.L (A0),D0 00022014 53 80 |S | SUBQ.L #0x1,D0 00022016 53 80 |S | SUBQ.L #0x1,D0 00022018 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 0002201e 63 02 |c | BLS 0x22022 00022020 4e 4f |NO | TRAP #15 00022022 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 00022028 22 07 |" | MOVE.L D7,D1 0002202a 53 81 |S | SUBQ.L #0x1,D1 0002202c 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00022032 63 02 |c | BLS 0x22036 00022034 4e 4f |NO | TRAP #15 00022036 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 0002203a 11 b1 18 02 08 08 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8) 00022040 52 87 |R | ADDQ.L #0x1,D7 00022042 68 c6 |h | BVC 0x2200a 00022044 58 4f |XO | ADDQ.L #0x4,A7 00022046 20 52 | R | MOVEA.L (A2),A0 00022048 22 57 |"W | MOVEA.L (A7),A1 0002204a 30 11 |0 | MOVE.W (A1),D0 0002204c 48 c0 |H | EXTW.L D0 0002204e d1 90 | | ADD.L D0,(A0) 00022050 58 4f |XO | ADDQ.L #0x4,A7 00022052 4c df 07 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2 00022056 4e 5e |N^ | UNLK A6 00022058 4e 75 |Nu | RTS 0002205a ; -------------------------------------------------------------------------------------- 0002205a ; OMSI PASCAL Function 0002205a ; <LVAR 0x00c 4(r)> 0002205a ; <LVAR 0x008 4(r)> 0002205a ; -------------------------------------------------------------------------------------- 0002205a 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 0002205e bf d5 | | CMPA.L (A5),A7 00022060 62 06 |b | BHI 0x22068 00022062 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022066 4e 76 |Nv | TRAPV 00022068 de fc 00 50 | P | ADDA.W #0x50,A7 0002206c 48 e7 c3 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D1+D0,-(A7) 00022070 45 fa fe 4e |E N | LEA.L 0x21ec0,A2 00022074 47 f8 00 04 |G | LEA.L 0x4,A3 00022078 49 ee 00 08 |I | LEA.L (A6+0x8),A4 0002207c 72 0c |r | MOVEQ.L #0x0c,D1 0002207e 7e 00 |~ | MOVEQ.L #0x00,D7 00022080 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00022084 42 90 |B | CLR.L (A0) 00022086 20 54 | T | MOVEA.L (A4),A0 00022088 42 90 |B | CLR.L (A0) 0002208a 2c 39 00 02 65 18 |,9 e | MOVE.L 0x26518,D6 00022090 20 06 | | MOVE.L D6,D0 00022092 53 80 |S | SUBQ.L #0x1,D0 00022094 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 0002209a 63 02 |c | BLS 0x2209e 0002209c 4e 4f |NO | TRAP #15 0002209e 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 000220a4 10 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D0 000220a8 0c 00 00 5b | [ | CMPI.B #0x5b,D0 000220ac 66 00 00 d4 |f | BNE 0x22182 000220b0 55 4f |UO | SUBQ.L #0x2,A7 000220b2 2f 06 |/ | MOVE.L D6,-(A7) 000220b4 48 78 00 01 |Hx | PEA.L 0x1 000220b8 48 78 00 03 |Hx | PEA.L 0x3 000220bc 4e 92 |N | JSR (A2) 000220be de c1 | | ADDA.W D1,A7 000220c0 4a 1f |J | TST.B (A7)+ 000220c2 66 7e |f~ | BNE 0x22142 000220c4 55 4f |UO | SUBQ.L #0x2,A7 000220c6 2f 06 |/ | MOVE.L D6,-(A7) 000220c8 48 53 |HS | PEA.L (A3) 000220ca 48 78 00 03 |Hx | PEA.L 0x3 000220ce 4e 92 |N | JSR (A2) 000220d0 de c1 | | ADDA.W D1,A7 000220d2 4a 1f |J | TST.B (A7)+ 000220d4 66 6c |fl | BNE 0x22142 000220d6 55 4f |UO | SUBQ.L #0x2,A7 000220d8 2f 06 |/ | MOVE.L D6,-(A7) 000220da 48 78 00 07 |Hx | PEA.L 0x7 000220de 48 53 |HS | PEA.L (A3) 000220e0 4e 92 |N | JSR (A2) 000220e2 de c1 | | ADDA.W D1,A7 000220e4 4a 1f |J | TST.B (A7)+ 000220e6 66 5a |fZ | BNE 0x22142 000220e8 55 4f |UO | SUBQ.L #0x2,A7 000220ea 2f 06 |/ | MOVE.L D6,-(A7) 000220ec 48 78 00 0b |Hx | PEA.L 0xb 000220f0 48 53 |HS | PEA.L (A3) 000220f2 4e 92 |N | JSR (A2) 000220f4 de c1 | | ADDA.W D1,A7 000220f6 4a 1f |J | TST.B (A7)+ 000220f8 66 48 |fH | BNE 0x22142 000220fa 55 4f |UO | SUBQ.L #0x2,A7 000220fc 2f 06 |/ | MOVE.L D6,-(A7) 000220fe 48 78 00 0f |Hx | PEA.L 0xf 00022102 48 53 |HS | PEA.L (A3) 00022104 4e 92 |N | JSR (A2) 00022106 de c1 | | ADDA.W D1,A7 00022108 4a 1f |J | TST.B (A7)+ 0002210a 66 36 |f6 | BNE 0x22142 0002210c 55 4f |UO | SUBQ.L #0x2,A7 0002210e 2f 06 |/ | MOVE.L D6,-(A7) 00022110 48 78 00 13 |Hx | PEA.L 0x13 00022114 48 53 |HS | PEA.L (A3) 00022116 4e 92 |N | JSR (A2) 00022118 de c1 | | ADDA.W D1,A7 0002211a 4a 1f |J | TST.B (A7)+ 0002211c 66 24 |f$ | BNE 0x22142 0002211e 55 4f |UO | SUBQ.L #0x2,A7 00022120 2f 06 |/ | MOVE.L D6,-(A7) 00022122 48 78 00 17 |Hx | PEA.L 0x17 00022126 48 53 |HS | PEA.L (A3) 00022128 4e 92 |N | JSR (A2) 0002212a de c1 | | ADDA.W D1,A7 0002212c 4a 1f |J | TST.B (A7)+ 0002212e 66 12 |f | BNE 0x22142 00022130 55 4f |UO | SUBQ.L #0x2,A7 00022132 2f 06 |/ | MOVE.L D6,-(A7) 00022134 48 78 00 1b |Hx | PEA.L 0x1b 00022138 48 53 |HS | PEA.L (A3) 0002213a 4e 92 |N | JSR (A2) 0002213c de c1 | | ADDA.W D1,A7 0002213e 4a 1f |J | TST.B (A7)+ 00022140 67 04 |g | BEQ 0x22146 00022142 52 87 |R | ADDQ.L #0x1,D7 00022144 60 3c |`< | BRA 0x22182 00022146 4a 87 |J | TST.L D7 00022148 66 1c |f | BNE 0x22166 0002214a 55 4f |UO | SUBQ.L #0x2,A7 0002214c 2f 06 |/ | MOVE.L D6,-(A7) 0002214e 48 78 00 1f |Hx | PEA.L 0x1f 00022152 48 78 00 05 |Hx | PEA.L 0x5 00022156 4e 92 |N | JSR (A2) 00022158 de c1 | | ADDA.W D1,A7 0002215a 4a 1f |J | TST.B (A7)+ 0002215c 67 08 |g | BEQ 0x22166 0002215e 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00022162 20 86 | | MOVE.L D6,(A0) 00022164 60 1c |` | BRA 0x22182 00022166 55 4f |UO | SUBQ.L #0x2,A7 00022168 2f 06 |/ | MOVE.L D6,-(A7) 0002216a 48 78 00 24 |Hx $ | PEA.L 0x24 0002216e 48 53 |HS | PEA.L (A3) 00022170 4e 92 |N | JSR (A2) 00022172 de c1 | | ADDA.W D1,A7 00022174 4a 1f |J | TST.B (A7)+ 00022176 67 0a |g | BEQ 0x22182 00022178 4a 87 |J | TST.L D7 0002217a 66 04 |f | BNE 0x22180 0002217c 20 54 | T | MOVEA.L (A4),A0 0002217e 60 e2 |` | BRA 0x22162 00022180 53 87 |S | SUBQ.L #0x1,D7 00022182 52 86 |R | ADDQ.L #0x1,D6 00022184 bc b9 00 02 65 1c | e | CMP.L 0x2651c,D6 0002218a 6e 0e |n | BGT 0x2219a 0002218c 4a 87 |J | TST.L D7 0002218e 66 00 ff 00 |f | BNE 0x22090 00022192 20 54 | T | MOVEA.L (A4),A0 00022194 4a 90 |J | TST.L (A0) 00022196 67 00 fe f8 |g | BEQ 0x22090 0002219a bc b9 00 02 65 1c | e | CMP.L 0x2651c,D6 000221a0 6f 30 |o0 | BLE 0x221d2 000221a2 9e fc 00 1c | | SUBA.W #0x1c,A7 000221a6 20 4f | O | MOVEA.L A7,A0 000221a8 43 fa f3 be |C | LEA.L 0x21568,A1 000221ac 70 1a |p | MOVEQ.L #0x1a,D0 000221ae 10 d9 | | MOVE.B (A1)+,(A0)+ 000221b0 51 c8 ff fc |Q | DBF D0,0x221ae 000221b4 59 4f |YO | SUBQ.L #0x4,A7 000221b6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000221ba 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000221be 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 000221c2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000221c8 50 4f |PO | ADDQ.L #0x8,A7 000221ca 4e ba f8 26 |N & | JSR 0x219f2 000221ce de fc 00 20 | | ADDA.W #0x20,A7 000221d2 4c df 1f c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0+A1+A2+A3+A4 000221d6 4e 5e |N^ | UNLK A6 000221d8 4e 75 |Nu | RTS 000221da ; -------------------------------------------------------------------------------------- 000221da ; OMSI PASCAL Function 000221da ; <LVAR -0x004 @ 4(r)> 000221da ; <LVAR -0x008 @ 4(rw)> 000221da ; -------------------------------------------------------------------------------------- 000221da 4e 56 ff dc |NV | LINK.W A6,#0xffdc 000221de bf d5 | | CMPA.L (A5),A7 000221e0 62 06 |b | BHI 0x221e8 000221e2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000221e6 4e 76 |Nv | TRAPV 000221e8 de fc 00 1c | | ADDA.W #0x1c,A7 000221ec 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 000221f0 41 ee ff f8 |A | LEA.L (A6-0x8),A0 000221f4 43 ee ff fc |C | LEA.L (A6-0x4),A1 000221f8 48 50 |HP | PEA.L (A0) 000221fa 48 51 |HQ | PEA.L (A1) 000221fc 4e ba fe 5c |N \ | JSR 0x2205a 00022200 50 4f |PO | ADDQ.L #0x8,A7 00022202 4a 90 |J | TST.L (A0) 00022204 66 02 |f | BNE 0x22208 00022206 20 91 | | MOVE.L (A1),(A0) 00022208 20 11 | | MOVE.L (A1),D0 0002220a 5a 80 |Z | ADDQ.L #0x5,D0 0002220c 2f 00 |/ | MOVE.L D0,-(A7) 0002220e 90 90 | | SUB.L (A0),D0 00022210 2f 00 |/ | MOVE.L D0,-(A7) 00022212 4e ba fd 32 |N 2 | JSR 0x21f46 00022216 50 4f |PO | ADDQ.L #0x8,A7 00022218 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 0002221c 4e 5e |N^ | UNLK A6 0002221e 4e 75 |Nu | RTS 00022220 ; -------------------------------------------------------------------------------------- 00022220 ; OMSI PASCAL Function 00022220 ; <LVAR -0x004 @ 4(r)> 00022220 ; <LVAR -0x008 @ 4(r)> 00022220 ; -------------------------------------------------------------------------------------- 00022220 4e 56 ff dc |NV | LINK.W A6,#0xffdc 00022224 bf d5 | | CMPA.L (A5),A7 00022226 62 06 |b | BHI 0x2222e 00022228 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002222c 4e 76 |Nv | TRAPV 0002222e de fc 00 1c | | ADDA.W #0x1c,A7 00022232 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00022236 41 ee ff f8 |A | LEA.L (A6-0x8),A0 0002223a 43 ee ff fc |C | LEA.L (A6-0x4),A1 0002223e 48 50 |HP | PEA.L (A0) 00022240 48 51 |HQ | PEA.L (A1) 00022242 4e ba fe 16 |N | JSR 0x2205a 00022246 50 4f |PO | ADDQ.L #0x8,A7 00022248 4a 90 |J | TST.L (A0) 0002224a 66 06 |f | BNE 0x22252 0002224c 20 11 | | MOVE.L (A1),D0 0002224e 5a 80 |Z | ADDQ.L #0x5,D0 00022250 60 12 |` | BRA 0x22264 00022252 2f 11 |/ | MOVE.L (A1),-(A7) 00022254 5a 97 |Z | ADDQ.L #0x5,(A7) 00022256 48 78 00 05 |Hx | PEA.L 0x5 0002225a 4e ba fc ea |N | JSR 0x21f46 0002225e 50 4f |PO | ADDQ.L #0x8,A7 00022260 20 10 | | MOVE.L (A0),D0 00022262 5c 80 |\ | ADDQ.L #0x6,D0 00022264 2f 00 |/ | MOVE.L D0,-(A7) 00022266 90 b9 00 02 65 18 | e | SUB.L 0x26518,D0 0002226c 2f 00 |/ | MOVE.L D0,-(A7) 0002226e 4e ba fc d6 |N | JSR 0x21f46 00022272 50 4f |PO | ADDQ.L #0x8,A7 00022274 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 00022278 4e 5e |N^ | UNLK A6 0002227a 4e 75 |Nu | RTS 0002227c ; -------------------------------------------------------------------------------------- 0002227c ; OMSI PASCAL Function 0002227c ; <LVAR 0x008 4(r)> 0002227c ; <LVAR -0x004 @> 0002227c ; <LVAR -0x008 @ 4(r)> 0002227c ; <LVAR -0x00c @ 4(rw)> 0002227c ; <LVAR -0x010 4(rw)> 0002227c ; <LVAR -0x014 4(rw)> 0002227c ; -------------------------------------------------------------------------------------- 0002227c 4e 56 ff ba |NV | LINK.W A6,#0xffba 00022280 bf d5 | | CMPA.L (A5),A7 00022282 62 06 |b | BHI 0x2228a 00022284 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022288 4e 76 |Nv | TRAPV 0002228a de fc 00 32 | 2 | ADDA.W #0x32,A7 0002228e 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 00022292 43 f9 00 02 65 2a |C e* | LEA.L 0x2652a,A1 00022298 45 f9 00 02 65 30 |E e0 | LEA.L 0x26530,A2 0002229e 47 f9 00 02 65 18 |G e | LEA.L 0x26518,A3 000222a4 49 ee ff f8 |I | LEA.L (A6-0x8),A4 000222a8 72 01 |r | MOVEQ.L #0x01,D1 000222aa 4a 11 |J | TST.B (A1) 000222ac 67 0a |g | BEQ 0x222b8 000222ae 4a 92 |J | TST.L (A2) 000222b0 66 06 |f | BNE 0x222b8 000222b2 24 ae 00 08 |$ | MOVE.L (A6+0x8),(A2) 000222b6 53 92 |S | SUBQ.L #0x1,(A2) 000222b8 4a 11 |J | TST.B (A1) 000222ba 66 00 00 cc |f | BNE 0x22388 000222be 26 ae 00 08 |& | MOVE.L (A6+0x8),(A3) 000222c2 5c 93 |\ | ADDQ.L #0x6,(A3) 000222c4 48 54 |HT | PEA.L (A4) 000222c6 48 6e ff fc |Hn | PEA.L (A6-0x4) 000222ca 4e ba fa 86 |N | JSR 0x21d52 000222ce 50 4f |PO | ADDQ.L #0x8,A7 000222d0 41 fa f2 bc |A | LEA.L 0x2158e,A0 000222d4 70 04 |p | MOVEQ.L #0x04,D0 000222d6 3f 20 |? | MOVE.W -(A0),-(A7) 000222d8 51 c8 ff fc |Q | DBF D0,0x222d6 000222dc 2f 14 |/ | MOVE.L (A4),-(A7) 000222de 48 78 00 00 |Hx | PEA.L 0x0 000222e2 4e ba fb 50 |N P | JSR 0x21e34 000222e6 de fc 00 12 | | ADDA.W #0x12,A7 000222ea 4a 39 00 02 65 34 |J9 e4 | TST.B 0x26534 000222f0 67 1a |g | BEQ 0x2230c 000222f2 51 4f |QO | SUBQ.L #0x8,A7 000222f4 2f 14 |/ | MOVE.L (A4),-(A7) 000222f6 48 78 00 00 |Hx | PEA.L 0x0 000222fa 4e b9 00 02 27 4c |N 'L | JSR 0x2274c 00022300 50 4f |PO | ADDQ.L #0x8,A7 00022302 2d 5f ff ec |-_ | MOVE.L (A7)+,(A6-0x14) 00022306 2d 5f ff f0 |-_ | MOVE.L (A7)+,(A6-0x10) 0002230a 60 14 |` | BRA 0x22320 0002230c 59 4f |YO | SUBQ.L #0x4,A7 0002230e 2f 14 |/ | MOVE.L (A4),-(A7) 00022310 48 78 00 00 |Hx | PEA.L 0x0 00022314 4e b9 00 02 27 1a |N ' | JSR 0x2271a 0002231a 50 4f |PO | ADDQ.L #0x8,A7 0002231c 2d 5f ff f4 |-_ | MOVE.L (A7)+,(A6-0xc) 00022320 2f 14 |/ | MOVE.L (A4),-(A7) 00022322 4e ba f6 8c |N | JSR 0x219b0 00022326 58 4f |XO | ADDQ.L #0x4,A7 00022328 23 d3 00 02 65 2c |# e, | MOVE.L (A3),0x2652c 0002232e 4a 39 00 02 65 34 |J9 e4 | TST.B 0x26534 00022334 67 2a |g* | BEQ 0x22360 00022336 55 4f |UO | SUBQ.L #0x2,A7 00022338 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 0002233c 2f 2e ff ec |/. | MOVE.L (A6-0x14),-(A7) 00022340 2f 39 00 02 65 3e |/9 e> | MOVE.L 0x2653e,-(A7) 00022346 2f 39 00 02 65 3a |/9 e: | MOVE.L 0x2653a,-(A7) 0002234c 4e b9 00 01 03 2c |N , | JSR IsEqual(a, b : Quad) : Bool 00022352 de fc 00 10 | | ADDA.W #0x10,A7 00022356 10 1f | | MOVE.B (A7)+,D0 00022358 48 80 |H | EXTB.W D0 0002235a 41 81 |A | CHK.W D1,D0 0002235c 12 80 | | MOVE.B D0,(A1) 0002235e 60 28 |`( | BRA 0x22388 00022360 55 4f |UO | SUBQ.L #0x2,A7 00022362 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00022366 2f 39 00 02 65 36 |/9 e6 | MOVE.L 0x26536,-(A7) 0002236c 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00022372 50 4f |PO | ADDQ.L #0x8,A7 00022374 10 1f | | MOVE.B (A7)+,D0 00022376 48 80 |H | EXTB.W D0 00022378 41 81 |A | CHK.W D1,D0 0002237a 12 80 | | MOVE.B D0,(A1) 0002237c 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00022380 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022386 58 4f |XO | ADDQ.L #0x4,A7 00022388 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 0002238c 4e 5e |N^ | UNLK A6 0002238e 4e 75 |Nu | RTS 00022390 ; -------------------------------------------------------------------------------------- 00022390 ; OMSI PASCAL Function 00022390 ; <LVAR 0x010 4(r)> 00022390 ; <LVAR 0x00c 4(r)> 00022390 ; <LVAR 0x008 4(r)> 00022390 ; -------------------------------------------------------------------------------------- 00022390 4e 56 ff 9e |NV | LINK.W A6,#0xff9e 00022394 bf d5 | | CMPA.L (A5),A7 00022396 62 06 |b | BHI 0x2239e 00022398 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002239c 4e 76 |Nv | TRAPV 0002239e de fc 00 56 | V | ADDA.W #0x56,A7 000223a2 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 000223a6 45 f9 00 02 65 30 |E e0 | LEA.L 0x26530,A2 000223ac 47 fa fb 12 |G | LEA.L 0x21ec0,A3 000223b0 49 f9 00 02 65 2a |I e* | LEA.L 0x2652a,A4 000223b6 72 0c |r | MOVEQ.L #0x0c,D1 000223b8 74 01 |t | MOVEQ.L #0x01,D2 000223ba 42 14 |B | CLR.B (A4) 000223bc 42 b9 00 02 65 2c |B e, | CLR.L 0x2652c 000223c2 42 92 |B | CLR.L (A2) 000223c4 7e 00 |~ | MOVEQ.L #0x00,D7 000223c6 7c 00 || | MOVEQ.L #0x00,D6 000223c8 2a 39 00 02 65 18 |*9 e | MOVE.L 0x26518,D5 000223ce 4a 86 |J | TST.L D6 000223d0 66 00 00 a0 |f | BNE 0x22472 000223d4 ba b9 00 02 65 1c | e | CMP.L 0x2651c,D5 000223da 6e 00 00 96 |n | BGT 0x22472 000223de 20 05 | | MOVE.L D5,D0 000223e0 53 80 |S | SUBQ.L #0x1,D0 000223e2 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 000223e8 63 02 |c | BLS 0x223ec 000223ea 4e 4f |NO | TRAP #15 000223ec 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 000223f2 10 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D0 000223f6 0c 00 00 5b | [ | CMPI.B #0x5b,D0 000223fa 66 6c |fl | BNE 0x22468 000223fc 55 4f |UO | SUBQ.L #0x2,A7 000223fe 2f 05 |/ | MOVE.L D5,-(A7) 00022400 48 78 00 28 |Hx ( | PEA.L 0x28 00022404 48 78 00 05 |Hx | PEA.L 0x5 00022408 4e 93 |N | JSR (A3) 0002240a de c1 | | ADDA.W D1,A7 0002240c 4a 1f |J | TST.B (A7)+ 0002240e 66 14 |f | BNE 0x22424 00022410 55 4f |UO | SUBQ.L #0x2,A7 00022412 2f 05 |/ | MOVE.L D5,-(A7) 00022414 48 78 00 2d |Hx - | PEA.L 0x2d 00022418 48 78 00 06 |Hx | PEA.L 0x6 0002241c 4e 93 |N | JSR (A3) 0002241e de c1 | | ADDA.W D1,A7 00022420 4a 1f |J | TST.B (A7)+ 00022422 67 04 |g | BEQ 0x22428 00022424 52 87 |R | ADDQ.L #0x1,D7 00022426 60 40 |`@ | BRA 0x22468 00022428 4a 87 |J | TST.L D7 0002242a 66 1e |f | BNE 0x2244a 0002242c 55 4f |UO | SUBQ.L #0x2,A7 0002242e 2f 05 |/ | MOVE.L D5,-(A7) 00022430 48 78 00 33 |Hx 3 | PEA.L 0x33 00022434 48 78 00 05 |Hx | PEA.L 0x5 00022438 4e 93 |N | JSR (A3) 0002243a de c1 | | ADDA.W D1,A7 0002243c 4a 1f |J | TST.B (A7)+ 0002243e 67 0a |g | BEQ 0x2244a 00022440 2f 05 |/ | MOVE.L D5,-(A7) 00022442 4e ba fe 38 |N 8 | JSR 0x2227c 00022446 58 4f |XO | ADDQ.L #0x4,A7 00022448 60 1e |` | BRA 0x22468 0002244a 55 4f |UO | SUBQ.L #0x2,A7 0002244c 2f 05 |/ | MOVE.L D5,-(A7) 0002244e 48 78 00 38 |Hx 8 | PEA.L 0x38 00022452 48 78 00 08 |Hx | PEA.L 0x8 00022456 4e 93 |N | JSR (A3) 00022458 de c1 | | ADDA.W D1,A7 0002245a 4a 1f |J | TST.B (A7)+ 0002245c 67 0a |g | BEQ 0x22468 0002245e 4a 87 |J | TST.L D7 00022460 66 04 |f | BNE 0x22466 00022462 2c 05 |, | MOVE.L D5,D6 00022464 60 02 |` | BRA 0x22468 00022466 53 87 |S | SUBQ.L #0x1,D7 00022468 4a 86 |J | TST.L D6 0002246a 66 02 |f | BNE 0x2246e 0002246c 52 85 |R | ADDQ.L #0x1,D5 0002246e 60 00 ff 5e |` ^ | BRA 0x223ce 00022472 4a 39 00 02 65 34 |J9 e4 | TST.B 0x26534 00022478 66 0e |f | BNE 0x22488 0002247a 48 79 00 02 65 36 |Hy e6 | PEA.L 0x26536 00022480 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022486 58 4f |XO | ADDQ.L #0x4,A7 00022488 4a 14 |J | TST.B (A4) 0002248a 66 28 |f( | BNE 0x224b4 0002248c 41 fa f1 1a |A | LEA.L 0x215a8,A0 00022490 70 0c |p | MOVEQ.L #0x0c,D0 00022492 3f 20 |? | MOVE.W -(A0),-(A7) 00022494 51 c8 ff fc |Q | DBF D0,0x22492 00022498 59 4f |YO | SUBQ.L #0x4,A7 0002249a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002249e 3f 02 |? | MOVE.W D2,-(A7) 000224a0 3f 3c 00 1a |?< | MOVE.W #0x1a,-(A7) 000224a4 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000224aa 50 4f |PO | ADDQ.L #0x8,A7 000224ac 4e ba f5 44 |N D | JSR 0x219f2 000224b0 de fc 00 1e | | ADDA.W #0x1e,A7 000224b4 4a 86 |J | TST.L D6 000224b6 66 2e |f. | BNE 0x224e6 000224b8 9e fc 00 14 | | SUBA.W #0x14,A7 000224bc 20 4f | O | MOVEA.L A7,A0 000224be 43 fa f0 e8 |C | LEA.L 0x215a8,A1 000224c2 70 12 |p | MOVEQ.L #0x12,D0 000224c4 10 d9 | | MOVE.B (A1)+,(A0)+ 000224c6 51 c8 ff fc |Q | DBF D0,0x224c4 000224ca 59 4f |YO | SUBQ.L #0x4,A7 000224cc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000224d0 3f 02 |? | MOVE.W D2,-(A7) 000224d2 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 000224d6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000224dc 50 4f |PO | ADDQ.L #0x8,A7 000224de 4e ba f5 12 |N | JSR 0x219f2 000224e2 de fc 00 18 | | ADDA.W #0x18,A7 000224e6 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000224ea 20 86 | | MOVE.L D6,(A0) 000224ec 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 000224f0 20 b9 00 02 65 2c | e, | MOVE.L 0x2652c,(A0) 000224f6 4a 92 |J | TST.L (A2) 000224f8 66 0a |f | BNE 0x22504 000224fa 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 000224fe 20 86 | | MOVE.L D6,(A0) 00022500 53 90 |S | SUBQ.L #0x1,(A0) 00022502 60 06 |` | BRA 0x2250a 00022504 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00022508 20 92 | | MOVE.L (A2),(A0) 0002250a 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 0002250e 4e 5e |N^ | UNLK A6 00022510 4e 75 |Nu | RTS 00022512 ; -------------------------------------------------------------------------------------- 00022512 ; OMSI PASCAL Function 00022512 ; <LVAR 0x008 4(r)> 00022512 ; <LVAR -0x008 @ 4(r)> 00022512 ; <LVAR -0x00c @ 4(r)> 00022512 ; <LVAR -0x010 @ 4(r)> 00022512 ; -------------------------------------------------------------------------------------- 00022512 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00022516 bf d5 | | CMPA.L (A5),A7 00022518 62 06 |b | BHI 0x22520 0002251a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002251e 4e 76 |Nv | TRAPV 00022520 de fc 00 24 | $ | ADDA.W #0x24,A7 00022524 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 00022528 41 f9 00 02 65 18 |A e | LEA.L 0x26518,A0 0002252e 43 ee ff f0 |C | LEA.L (A6-0x10),A1 00022532 2c 10 |, | MOVE.L (A0),D6 00022534 42 39 00 02 65 34 |B9 e4 | CLR.B 0x26534 0002253a 23 ee 00 08 00 02 65 36 |# e6| MOVE.L (A6+0x8),0x26536 00022542 2e 10 |. | MOVE.L (A0),D7 00022544 48 51 |HQ | PEA.L (A1) 00022546 48 6e ff f4 |Hn | PEA.L (A6-0xc) 0002254a 48 6e ff f8 |Hn | PEA.L (A6-0x8) 0002254e 4e ba fe 40 |N @ | JSR 0x22390 00022552 de fc 00 0c | | ADDA.W #0xc,A7 00022556 20 86 | | MOVE.L D6,(A0) 00022558 20 2e ff f8 | . | MOVE.L (A6-0x8),D0 0002255c 06 80 00 00 00 09 | | ADDI.L #0x00000009,D0 00022562 2f 00 |/ | MOVE.L D0,-(A7) 00022564 90 ae ff f4 | | SUB.L (A6-0xc),D0 00022568 53 80 |S | SUBQ.L #0x1,D0 0002256a 2f 00 |/ | MOVE.L D0,-(A7) 0002256c 4e ba f9 d8 |N | JSR 0x21f46 00022570 58 4f |XO | ADDQ.L #0x4,A7 00022572 2e 91 |. | MOVE.L (A1),(A7) 00022574 2f 11 |/ | MOVE.L (A1),-(A7) 00022576 9f 97 | | SUB.L D7,(A7) 00022578 4e ba f9 cc |N | JSR 0x21f46 0002257c 50 4f |PO | ADDQ.L #0x8,A7 0002257e 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 00022582 4e 5e |N^ | UNLK A6 00022584 4e 75 |Nu | RTS 00022586 ; -------------------------------------------------------------------------------------- 00022586 ; OMSI PASCAL Function 00022586 ; <LVAR 0x00c 4(r)> 00022586 ; <LVAR 0x008 4(r)> 00022586 ; <LVAR -0x008 @ 4(r)> 00022586 ; <LVAR -0x00c @ 4(r)> 00022586 ; <LVAR -0x010 @ 4(r)> 00022586 ; -------------------------------------------------------------------------------------- 00022586 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 0002258a bf d5 | | CMPA.L (A5),A7 0002258c 62 06 |b | BHI 0x22594 0002258e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022592 4e 76 |Nv | TRAPV 00022594 de fc 00 24 | $ | ADDA.W #0x24,A7 00022598 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 0002259c 41 f9 00 02 65 18 |A e | LEA.L 0x26518,A0 000225a2 43 ee ff f0 |C | LEA.L (A6-0x10),A1 000225a6 2c 10 |, | MOVE.L (A0),D6 000225a8 13 fc 00 01 00 02 65 34 | e4| MOVE.B #0x01,0x26534 000225b0 23 ee 00 08 00 02 65 3a |# e:| MOVE.L (A6+0x8),0x2653a 000225b8 23 ee 00 0c 00 02 65 3e |# e>| MOVE.L (A6+0xc),0x2653e 000225c0 2e 10 |. | MOVE.L (A0),D7 000225c2 48 51 |HQ | PEA.L (A1) 000225c4 48 6e ff f4 |Hn | PEA.L (A6-0xc) 000225c8 48 6e ff f8 |Hn | PEA.L (A6-0x8) 000225cc 4e ba fd c2 |N | JSR 0x22390 000225d0 de fc 00 0c | | ADDA.W #0xc,A7 000225d4 20 86 | | MOVE.L D6,(A0) 000225d6 20 2e ff f8 | . | MOVE.L (A6-0x8),D0 000225da 06 80 00 00 00 09 | | ADDI.L #0x00000009,D0 000225e0 2f 00 |/ | MOVE.L D0,-(A7) 000225e2 90 ae ff f4 | | SUB.L (A6-0xc),D0 000225e6 53 80 |S | SUBQ.L #0x1,D0 000225e8 2f 00 |/ | MOVE.L D0,-(A7) 000225ea 4e ba f9 5a |N Z | JSR 0x21f46 000225ee 58 4f |XO | ADDQ.L #0x4,A7 000225f0 2e 91 |. | MOVE.L (A1),(A7) 000225f2 2f 11 |/ | MOVE.L (A1),-(A7) 000225f4 9f 97 | | SUB.L D7,(A7) 000225f6 4e ba f9 4e |N N | JSR 0x21f46 000225fa 50 4f |PO | ADDQ.L #0x8,A7 000225fc 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 00022600 4e 5e |N^ | UNLK A6 00022602 4e 75 |Nu | RTS 00022604 ; -------------------------------------------------------------------------------------- 00022604 ; OMSI PASCAL Function 00022604 ; <LVAR 0x010 4(rw)> 00022604 ; <LVAR 0x00c 4(r)> 00022604 ; <LVAR 0x008 4(r)> 00022604 ; -------------------------------------------------------------------------------------- 00022604 4e 56 ff f8 |NV | LINK.W A6,#0xfff8 00022608 bf d5 | | CMPA.L (A5),A7 0002260a 62 06 |b | BHI 0x22612 0002260c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022610 4e 76 |Nv | TRAPV 00022612 de fc 00 08 | | ADDA.W #0x8,A7 00022616 48 e7 80 00 |H | MOVEM.L D0,-(A7) 0002261a 4a ae 00 08 |J | TST.L (A6+0x8) 0002261e 66 06 |f | BNE 0x22626 00022620 42 ae 00 10 |B | CLR.L (A6+0x10) 00022624 60 0e |` | BRA 0x22634 00022626 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 0002262a 90 ae 00 08 | | SUB.L (A6+0x8),D0 0002262e 52 80 |R | ADDQ.L #0x1,D0 00022630 2d 40 00 10 |-@ | MOVE.L D0,(A6+0x10) 00022634 4c df 00 01 |L | MOVEM.L (A7)+,D0 00022638 4e 5e |N^ | UNLK A6 0002263a 4e 75 |Nu | RTS 0002263c ; -------------------------------------------------------------------------------------- 0002263c ; OMSI PASCAL Function 0002263c ; <LVAR 0x014 4(w)> 0002263c ; <LVAR 0x010 @ 4(w)> 0002263c ; <LVAR 0x00c 4(r)> 0002263c ; <LVAR 0x008 4(r)> 0002263c ; -------------------------------------------------------------------------------------- 0002263c 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00022640 bf d5 | | CMPA.L (A5),A7 00022642 62 06 |b | BHI 0x2264a 00022644 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022648 4e 76 |Nv | TRAPV 0002264a de fc 00 20 | | ADDA.W #0x20,A7 0002264e 48 e7 81 c8 |H | MOVEM.L A4+A1+A0+D7+D0,-(A7) 00022652 28 6e 00 0c |(n | MOVEA.L (A6+0xc),A4 00022656 2d 7a f2 b2 00 10 |-z | MOVE.L 0x2190a,(A6+0x10) 0002265c 2d 7a f2 b0 00 14 |-z | MOVE.L 0x2190e,(A6+0x14) 00022662 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022666 7e 00 |~ | MOVEQ.L #0x00,D7 00022668 be 97 | | CMP.L (A7),D7 0002266a 6e 28 |n( | BGT 0x22694 0002266c b8 fc 00 01 | | CMPA.W #0x1,A4 00022670 66 04 |f | BNE 0x22676 00022672 58 4f |XO | ADDQ.L #0x4,A7 00022674 60 20 |` | BRA 0x22696 00022676 be ae 00 08 | | CMP.L (A6+0x8),D7 0002267a 66 10 |f | BNE 0x2268c 0002267c 41 ee 00 10 |A | LEA.L (A6+0x10),A0 00022680 22 4c |"L | MOVEA.L A4,A1 00022682 70 07 |p | MOVEQ.L #0x07,D0 00022684 10 d9 | | MOVE.B (A1)+,(A0)+ 00022686 51 c8 ff fc |Q | DBF D0,0x22684 0002268a 60 04 |` | BRA 0x22690 0002268c 28 6c 00 08 |(l | MOVEA.L (A4+0x8),A4 00022690 52 87 |R | ADDQ.L #0x1,D7 00022692 68 d4 |h | BVC 0x22668 00022694 58 4f |XO | ADDQ.L #0x4,A7 00022696 4c df 13 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1+A4 0002269a 4e 5e |N^ | UNLK A6 0002269c 4e 75 |Nu | RTS 0002269e ; -------------------------------------------------------------------------------------- 0002269e ; OMSI PASCAL Function 0002269e ; <LVAR 0x010 4(w)> 0002269e ; <LVAR 0x00c 4(r)> 0002269e ; <LVAR 0x008 4(r)> 0002269e ; <LVAR -0x008 @ 4(r)> 0002269e ; -------------------------------------------------------------------------------------- 0002269e 4e 56 ff ce |NV | LINK.W A6,#0xffce 000226a2 bf d5 | | CMPA.L (A5),A7 000226a4 62 06 |b | BHI 0x226ac 000226a6 44 fc 00 02 |D | MOVE.W #0x2,CCR 000226aa 4e 76 |Nv | TRAPV 000226ac de fc 00 26 | & | ADDA.W #0x26,A7 000226b0 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 000226b4 43 ee ff f8 |C | LEA.L (A6-0x8),A1 000226b8 48 51 |HQ | PEA.L (A1) 000226ba 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000226c0 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000226c4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000226c8 4e ba ff 3a |N : | JSR 0x22604 000226cc 50 4f |PO | ADDQ.L #0x8,A7 000226ce 7e 01 |~ | MOVEQ.L #0x01,D7 000226d0 be 97 | | CMP.L (A7),D7 000226d2 6e 38 |n8 | BGT 0x2270c 000226d4 20 07 | | MOVE.L D7,D0 000226d6 d0 ae 00 08 | | ADD.L (A6+0x8),D0 000226da 53 80 |S | SUBQ.L #0x1,D0 000226dc 53 80 |S | SUBQ.L #0x1,D0 000226de 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 000226e4 63 02 |c | BLS 0x226e8 000226e6 4e 4f |NO | TRAP #15 000226e8 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 000226ee 1c 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D6 000226f2 0c 06 00 2f | / | CMPI.B #0x2f,D6 000226f6 66 04 |f | BNE 0x226fc 000226f8 58 4f |XO | ADDQ.L #0x4,A7 000226fa 60 12 |` | BRA 0x2270e 000226fc 2f 11 |/ | MOVE.L (A1),-(A7) 000226fe 1f 06 | | MOVE.B D6,-(A7) 00022700 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00022706 5c 4f |\O | ADDQ.L #0x6,A7 00022708 52 87 |R | ADDQ.L #0x1,D7 0002270a 68 c4 |h | BVC 0x226d0 0002270c 58 4f |XO | ADDQ.L #0x4,A7 0002270e 2d 51 00 10 |-Q | MOVE.L (A1),(A6+0x10) 00022712 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 00022716 4e 5e |N^ | UNLK A6 00022718 4e 75 |Nu | RTS 0002271a ; -------------------------------------------------------------------------------------- 0002271a ; OMSI PASCAL Function 0002271a ; <LVAR 0x010 4(w)> 0002271a ; <LVAR 0x00c 4(r)> 0002271a ; <LVAR 0x008 4(r)> 0002271a ; -------------------------------------------------------------------------------------- 0002271a 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 0002271e bf d5 | | CMPA.L (A5),A7 00022720 62 06 |b | BHI 0x22728 00022722 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022726 4e 76 |Nv | TRAPV 00022728 de fc 00 18 | | ADDA.W #0x18,A7 0002272c 9e fc 00 0c | | SUBA.W #0xc,A7 00022730 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00022734 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022738 4e ba ff 02 |N | JSR 0x2263c 0002273c 50 4f |PO | ADDQ.L #0x8,A7 0002273e 4e ba ff 5e |N ^ | JSR 0x2269e 00022742 50 4f |PO | ADDQ.L #0x8,A7 00022744 2d 5f 00 10 |-_ | MOVE.L (A7)+,(A6+0x10) 00022748 4e 5e |N^ | UNLK A6 0002274a 4e 75 |Nu | RTS 0002274c ; -------------------------------------------------------------------------------------- 0002274c ; OMSI PASCAL Function 0002274c ; <LVAR 0x014 4(w)> 0002274c ; <LVAR 0x010 4(w)> 0002274c ; <LVAR 0x00c 4(r)> 0002274c ; <LVAR 0x008 4(r)> 0002274c ; -------------------------------------------------------------------------------------- 0002274c 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 00022750 bf d5 | | CMPA.L (A5),A7 00022752 62 06 |b | BHI 0x2275a 00022754 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022758 4e 76 |Nv | TRAPV 0002275a de fc 00 18 | | ADDA.W #0x18,A7 0002275e 9e fc 00 0c | | SUBA.W #0xc,A7 00022762 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00022766 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002276a 4e ba ff ae |N | JSR 0x2271a 0002276e 50 4f |PO | ADDQ.L #0x8,A7 00022770 48 78 00 10 |Hx | PEA.L 0x10 00022774 4e b9 00 01 03 60 |N ` | JSR ?StringToInt64() 0002277a 50 4f |PO | ADDQ.L #0x8,A7 0002277c 2d 5f 00 10 |-_ | MOVE.L (A7)+,(A6+0x10) 00022780 2d 5f 00 14 |-_ | MOVE.L (A7)+,(A6+0x14) 00022784 4e 5e |N^ | UNLK A6 00022786 4e 75 |Nu | RTS 00022788 ; -------------------------------------------------------------------------------------- 00022788 ; OMSI PASCAL Function 00022788 ; <LVAR 0x010 4(w)> 00022788 ; <LVAR 0x00c 4(r)> 00022788 ; <LVAR 0x008 4(r)> 00022788 ; -------------------------------------------------------------------------------------- 00022788 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 0002278c bf d5 | | CMPA.L (A5),A7 0002278e 62 06 |b | BHI 0x22796 00022790 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022794 4e 76 |Nv | TRAPV 00022796 de fc 00 18 | | ADDA.W #0x18,A7 0002279a 9e fc 00 0c | | SUBA.W #0xc,A7 0002279e 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000227a2 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000227a6 4e ba ff a4 |N | JSR 0x2274c 000227aa 50 4f |PO | ADDQ.L #0x8,A7 000227ac 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 000227b2 50 4f |PO | ADDQ.L #0x8,A7 000227b4 2d 5f 00 10 |-_ | MOVE.L (A7)+,(A6+0x10) 000227b8 4e 5e |N^ | UNLK A6 000227ba 4e 75 |Nu | RTS 000227bc ; -------------------------------------------------------------------------------------- 000227bc ; OMSI PASCAL Function 000227bc ; <LVAR 0x008 @ 4(r)> 000227bc ; -------------------------------------------------------------------------------------- 000227bc 4e 56 ff d4 |NV | LINK.W A6,#0xffd4 000227c0 bf d5 | | CMPA.L (A5),A7 000227c2 62 06 |b | BHI 0x227ca 000227c4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000227c8 4e 76 |Nv | TRAPV 000227ca de fc 00 28 | ( | ADDA.W #0x28,A7 000227ce 48 e7 c1 e0 |H | MOVEM.L A2+A1+A0+D7+D1+D0,-(A7) 000227d2 45 f9 00 02 65 18 |E e | LEA.L 0x26518,A2 000227d8 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000227dc 2f 08 |/ | MOVE.L A0,-(A7) 000227de 2f 12 |/ | MOVE.L (A2),-(A7) 000227e0 30 10 |0 | MOVE.W (A0),D0 000227e2 48 c0 |H | EXTW.L D0 000227e4 44 80 |D | NEG.L D0 000227e6 2f 00 |/ | MOVE.L D0,-(A7) 000227e8 4e ba f7 5c |N \ | JSR 0x21f46 000227ec 50 4f |PO | ADDQ.L #0x8,A7 000227ee 30 10 |0 | MOVE.W (A0),D0 000227f0 48 c0 |H | EXTW.L D0 000227f2 2f 00 |/ | MOVE.L D0,-(A7) 000227f4 7e 01 |~ | MOVEQ.L #0x01,D7 000227f6 be 97 | | CMP.L (A7),D7 000227f8 6e 34 |n4 | BGT 0x2282e 000227fa 20 07 | | MOVE.L D7,D0 000227fc d0 92 | | ADD.L (A2),D0 000227fe 53 80 |S | SUBQ.L #0x1,D0 00022800 53 80 |S | SUBQ.L #0x1,D0 00022802 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 00022808 63 02 |c | BLS 0x2280c 0002280a 4e 4f |NO | TRAP #15 0002280c 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 00022812 22 07 |" | MOVE.L D7,D1 00022814 53 81 |S | SUBQ.L #0x1,D1 00022816 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 0002281c 63 02 |c | BLS 0x22820 0002281e 4e 4f |NO | TRAP #15 00022820 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 00022824 11 b1 18 02 08 08 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8) 0002282a 52 87 |R | ADDQ.L #0x1,D7 0002282c 68 c8 |h | BVC 0x227f6 0002282e 50 4f |PO | ADDQ.L #0x8,A7 00022830 48 6e 00 08 |Hn | PEA.L (A6+0x8) 00022834 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002283a 58 4f |XO | ADDQ.L #0x4,A7 0002283c 4c df 07 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2 00022840 4e 5e |N^ | UNLK A6 00022842 4e 75 |Nu | RTS 00022844 ; -------------------------------------------------------------------------------------- 00022844 ; OMSI PASCAL Function 00022844 ; <LVAR 0x00c 4(r)> 00022844 ; <LVAR 0x008 4(r)> 00022844 ; -------------------------------------------------------------------------------------- 00022844 4e 56 ff ec |NV | LINK.W A6,#0xffec 00022848 bf d5 | | CMPA.L (A5),A7 0002284a 62 06 |b | BHI 0x22852 0002284c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022850 4e 76 |Nv | TRAPV 00022852 de fc 00 14 | | ADDA.W #0x14,A7 00022856 59 4f |YO | SUBQ.L #0x4,A7 00022858 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 0002285c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022860 48 78 00 10 |Hx | PEA.L 0x10 00022864 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 0002286a de fc 00 0c | | ADDA.W #0xc,A7 0002286e 4e ba ff 4c |N L | JSR 0x227bc 00022872 58 4f |XO | ADDQ.L #0x4,A7 00022874 4e 5e |N^ | UNLK A6 00022876 4e 75 |Nu | RTS 00022878 ; -------------------------------------------------------------------------------------- 00022878 ; OMSI PASCAL Function 00022878 ; <LVAR 0x008 4(r)> 00022878 ; -------------------------------------------------------------------------------------- 00022878 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 0002287c bf d5 | | CMPA.L (A5),A7 0002287e 62 06 |b | BHI 0x22886 00022880 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022884 4e 76 |Nv | TRAPV 00022886 de fc 00 0c | | ADDA.W #0xc,A7 0002288a 59 4f |YO | SUBQ.L #0x4,A7 0002288c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022890 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00022896 58 4f |XO | ADDQ.L #0x4,A7 00022898 4e ba ff 22 |N " | JSR 0x227bc 0002289c 58 4f |XO | ADDQ.L #0x4,A7 0002289e 4e 5e |N^ | UNLK A6 000228a0 4e 75 |Nu | RTS 000228a2 ; -------------------------------------------------------------------------------------- 000228a2 ; OMSI PASCAL Function 000228a2 ; <LVAR 0x008 4(r)> 000228a2 ; <LVAR -0x004 @ 4(r)> 000228a2 ; <LVAR -0x008 4(rw)> 000228a2 ; -------------------------------------------------------------------------------------- 000228a2 4e 56 ff ca |NV | LINK.W A6,#0xffca 000228a6 bf d5 | | CMPA.L (A5),A7 000228a8 62 06 |b | BHI 0x228b0 000228aa 44 fc 00 02 |D | MOVE.W #0x2,CCR 000228ae 4e 76 |Nv | TRAPV 000228b0 de fc 00 2a | * | ADDA.W #0x2a,A7 000228b4 48 e7 81 e0 |H | MOVEM.L A2+A1+A0+D7+D0,-(A7) 000228b8 43 ee ff fc |C | LEA.L (A6-0x4),A1 000228bc 45 ee ff f8 |E | LEA.L (A6-0x8),A2 000228c0 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000228c4 24 a8 00 08 |$ | MOVE.L (A0+0x8),(A2) 000228c8 48 51 |HQ | PEA.L (A1) 000228ca 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000228d0 58 4f |XO | ADDQ.L #0x4,A7 000228d2 20 52 | R | MOVEA.L (A2),A0 000228d4 b0 fc 00 01 | | CMPA.W #0x1,A0 000228d8 67 00 00 86 |g | BEQ 0x22960 000228dc 4a 90 |J | TST.L (A0) 000228de 67 68 |gh | BEQ 0x22948 000228e0 2f 28 00 04 |/( | MOVE.L (A0+0x4),-(A7) 000228e4 2e 10 |. | MOVE.L (A0),D7 000228e6 be 97 | | CMP.L (A7),D7 000228e8 6e 14 |n | BGT 0x228fe 000228ea 20 17 | | MOVE.L (A7),D0 000228ec 0c 87 80 00 00 01 | | CMPI.L #0x80000001,D7 000228f2 6d 08 |m | BLT 0x228fc 000228f4 0c 80 7f ff ff ff | | CMPI.L #0x7fffffff,D0 000228fa 6f 02 |o | BLE 0x228fe 000228fc 4e 4f |NO | TRAP #15 000228fe be 97 | | CMP.L (A7),D7 00022900 6e 44 |nD | BGT 0x22946 00022902 2f 11 |/ | MOVE.L (A1),-(A7) 00022904 20 07 | | MOVE.L D7,D0 00022906 53 80 |S | SUBQ.L #0x1,D0 00022908 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 0002290e 63 02 |c | BLS 0x22912 00022910 4e 4f |NO | TRAP #15 00022912 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 00022918 1f 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),-(A7) 0002291c 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00022922 5c 4f |\O | ADDQ.L #0x6,A7 00022924 20 51 | Q | MOVEA.L (A1),A0 00022926 30 10 |0 | MOVE.W (A0),D0 00022928 0c 40 00 7a | @ z | CMPI.W #0x007a,D0 0002292c 6d 14 |m | BLT 0x22942 0002292e 2f 11 |/ | MOVE.L (A1),-(A7) 00022930 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00022936 58 4f |XO | ADDQ.L #0x4,A7 00022938 48 51 |HQ | PEA.L (A1) 0002293a 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00022940 58 4f |XO | ADDQ.L #0x4,A7 00022942 52 87 |R | ADDQ.L #0x1,D7 00022944 68 b8 |h | BVC 0x228fe 00022946 58 4f |XO | ADDQ.L #0x4,A7 00022948 2f 11 |/ | MOVE.L (A1),-(A7) 0002294a 1f 3c 00 20 | < | MOVE.B #0x20,-(A7) 0002294e 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00022954 5c 4f |\O | ADDQ.L #0x6,A7 00022956 20 52 | R | MOVEA.L (A2),A0 00022958 24 a8 00 08 |$ | MOVE.L (A0+0x8),(A2) 0002295c 60 00 ff 74 |` t | BRA 0x228d2 00022960 2f 11 |/ | MOVE.L (A1),-(A7) 00022962 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022968 58 4f |XO | ADDQ.L #0x4,A7 0002296a 4c df 07 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1+A2 0002296e 4e 5e |N^ | UNLK A6 00022970 4e 75 |Nu | RTS 00022972 ; -------------------------------------------------------------------------------------- 00022972 ; OMSI PASCAL Function 00022972 ; <LVAR 0x008 @ 4(r)> 00022972 ; <LVAR -0x003 @ 1(r)> 00022972 ; <LVAR -0x004 @ 1(r)> 00022972 ; <LVAR -0x008 @ 4(r)> 00022972 ; <LVAR -0x00c @ 4(rw)> 00022972 ; -------------------------------------------------------------------------------------- 00022972 4e 56 ff ae |NV | LINK.W A6,#0xffae 00022976 bf d5 | | CMPA.L (A5),A7 00022978 62 06 |b | BHI 0x22980 0002297a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002297e 4e 76 |Nv | TRAPV 00022980 de fc 00 46 | F | ADDA.W #0x46,A7 00022984 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 00022988 43 ee 00 08 |C | LEA.L (A6+0x8),A1 0002298c 45 ee ff f4 |E | LEA.L (A6-0xc),A2 00022990 47 ee ff fc |G | LEA.L (A6-0x4),A3 00022994 49 ee ff f8 |I | LEA.L (A6-0x8),A4 00022998 72 01 |r | MOVEQ.L #0x01,D1 0002299a 2f 3a ec 36 |/: 6 | MOVE.L 0x215d2,-(A7) 0002299e 51 4f |QO | SUBQ.L #0x8,A7 000229a0 2f 11 |/ | MOVE.L (A1),-(A7) 000229a2 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 000229a8 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000229ac 3f 01 |? | MOVE.W D1,-(A7) 000229ae 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 000229b2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000229b8 50 4f |PO | ADDQ.L #0x8,A7 000229ba 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000229c0 50 4f |PO | ADDQ.L #0x8,A7 000229c2 24 9f |$ | MOVE.L (A7)+,(A2) 000229c4 2e 92 |. | MOVE.L (A2),(A7) 000229c6 42 27 |B' | CLR.B -(A7) 000229c8 42 27 |B' | CLR.B -(A7) 000229ca 48 78 00 00 |Hx | PEA.L 0x0 000229ce 48 53 |HS | PEA.L (A3) 000229d0 48 54 |HT | PEA.L (A4) 000229d2 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000229d8 de fc 00 14 | | ADDA.W #0x14,A7 000229dc 4a 13 |J | TST.B (A3) 000229de 67 36 |g6 | BEQ 0x22a16 000229e0 41 fa eb f0 |A | LEA.L 0x215d2,A0 000229e4 70 0a |p | MOVEQ.L #0x0a,D0 000229e6 3f 20 |? | MOVE.W -(A0),-(A7) 000229e8 51 c8 ff fc |Q | DBF D0,0x229e6 000229ec 51 4f |QO | SUBQ.L #0x8,A7 000229ee 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000229f2 3f 01 |? | MOVE.W D1,-(A7) 000229f4 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 000229f8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000229fe 58 4f |XO | ADDQ.L #0x4,A7 00022a00 2e 91 |. | MOVE.L (A1),(A7) 00022a02 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022a08 50 4f |PO | ADDQ.L #0x8,A7 00022a0a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022a10 de fc 00 1a | | ADDA.W #0x1a,A7 00022a14 60 54 |`T | BRA 0x22a6a 00022a16 2f 14 |/ | MOVE.L (A4),-(A7) 00022a18 48 51 |HQ | PEA.L (A1) 00022a1a 48 6e ff fd |Hn | PEA.L (A6-0x3) 00022a1e 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 00022a24 de fc 00 0c | | ADDA.W #0xc,A7 00022a28 4a 2e ff fd |J. | TST.B (A6-0x3) 00022a2c 66 14 |f | BNE 0x22a42 00022a2e 59 4f |YO | SUBQ.L #0x4,A7 00022a30 2f 11 |/ | MOVE.L (A1),-(A7) 00022a32 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00022a38 58 4f |XO | ADDQ.L #0x4,A7 00022a3a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00022a40 58 4f |XO | ADDQ.L #0x4,A7 00022a42 4a 2e ff fd |J. | TST.B (A6-0x3) 00022a46 67 ce |g | BEQ 0x22a16 00022a48 42 27 |B' | CLR.B -(A7) 00022a4a 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00022a4e 48 78 00 01 |Hx | PEA.L 0x1 00022a52 48 53 |HS | PEA.L (A3) 00022a54 48 54 |HT | PEA.L (A4) 00022a56 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00022a5c de fc 00 10 | | ADDA.W #0x10,A7 00022a60 48 51 |HQ | PEA.L (A1) 00022a62 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022a68 58 4f |XO | ADDQ.L #0x4,A7 00022a6a 48 52 |HR | PEA.L (A2) 00022a6c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022a72 58 4f |XO | ADDQ.L #0x4,A7 00022a74 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 00022a78 4e 5e |N^ | UNLK A6 00022a7a 4e 75 |Nu | RTS 00022a7c ; -------------------------------------------------------------------------------------- 00022a7c ; OMSI PASCAL Function 00022a7c ; <LVAR 0x008 4(r)> 00022a7c ; -------------------------------------------------------------------------------------- 00022a7c 4e 56 ff c6 |NV | LINK.W A6,#0xffc6 00022a80 bf d5 | | CMPA.L (A5),A7 00022a82 62 06 |b | BHI 0x22a8a 00022a84 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022a88 4e 76 |Nv | TRAPV 00022a8a de fc 00 2e | . | ADDA.W #0x2e,A7 00022a8e 48 e7 83 88 |H | MOVEM.L A4+A0+D7+D6+D0,-(A7) 00022a92 59 4f |YO | SUBQ.L #0x4,A7 00022a94 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022a98 4e ba f3 64 |N d | JSR 0x21dfe 00022a9c 58 4f |XO | ADDQ.L #0x4,A7 00022a9e 2c 1f |, | MOVE.L (A7)+,D6 00022aa0 66 2e |f. | BNE 0x22ad0 00022aa2 41 f9 00 02 65 2a |A e* | LEA.L 0x2652a,A0 00022aa8 70 04 |p | MOVEQ.L #0x04,D0 00022aaa 3f 20 |? | MOVE.W -(A0),-(A7) 00022aac 51 c8 ff fc |Q | DBF D0,0x22aaa 00022ab0 59 4f |YO | SUBQ.L #0x4,A7 00022ab2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022ab6 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00022aba 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00022abe 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022ac4 50 4f |PO | ADDQ.L #0x8,A7 00022ac6 4e ba fe aa |N | JSR 0x22972 00022aca de fc 00 0e | | ADDA.W #0xe,A7 00022ace 60 26 |`& | BRA 0x22af6 00022ad0 2f 06 |/ | MOVE.L D6,-(A7) 00022ad2 7e 01 |~ | MOVEQ.L #0x01,D7 00022ad4 be 97 | | CMP.L (A7),D7 00022ad6 6e 1c |n | BGT 0x22af4 00022ad8 59 4f |YO | SUBQ.L #0x4,A7 00022ada 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022ade 2f 07 |/ | MOVE.L D7,-(A7) 00022ae0 4e ba fc 38 |N 8 | JSR 0x2271a 00022ae4 50 4f |PO | ADDQ.L #0x8,A7 00022ae6 28 5f |(_ | MOVEA.L (A7)+,A4 00022ae8 2f 0c |/ | MOVE.L A4,-(A7) 00022aea 4e ba fe 86 |N | JSR 0x22972 00022aee 58 4f |XO | ADDQ.L #0x4,A7 00022af0 52 87 |R | ADDQ.L #0x1,D7 00022af2 68 e0 |h | BVC 0x22ad4 00022af4 58 4f |XO | ADDQ.L #0x4,A7 00022af6 4c df 11 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A4 00022afa 4e 5e |N^ | UNLK A6 00022afc 4e 75 |Nu | RTS 00022afe ; -------------------------------------------------------------------------------------- 00022afe ; OMSI PASCAL Function 00022afe ; <LVAR 0x00c @> 00022afe ; <LVAR 0x008 @ 4(r)> 00022afe ; <LVAR -0x020 @> 00022afe ; -------------------------------------------------------------------------------------- 00022afe 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 00022b02 bf d5 | | CMPA.L (A5),A7 00022b04 62 06 |b | BHI 0x22b0c 00022b06 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022b0a 4e 76 |Nv | TRAPV 00022b0c de fc 00 24 | $ | ADDA.W #0x24,A7 00022b10 48 e7 e1 c0 |H | MOVEM.L A1+A0+D7+D2+D1+D0,-(A7) 00022b14 74 1d |t | MOVEQ.L #0x1d,D2 00022b16 7e 01 |~ | MOVEQ.L #0x01,D7 00022b18 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00022b1c 30 10 |0 | MOVE.W (A0),D0 00022b1e 48 c0 |H | EXTW.L D0 00022b20 be 80 | | CMP.L D0,D7 00022b22 6f 10 |o | BLE 0x22b34 00022b24 20 07 | | MOVE.L D7,D0 00022b26 53 80 |S | SUBQ.L #0x1,D0 00022b28 b0 82 | | CMP.L D2,D0 00022b2a 63 02 |c | BLS 0x22b2e 00022b2c 4e 4f |NO | TRAP #15 00022b2e 42 36 08 e0 |B6 | CLR.B (A6+D0.L-#0x20) 00022b32 60 1e |` | BRA 0x22b52 00022b34 20 07 | | MOVE.L D7,D0 00022b36 53 80 |S | SUBQ.L #0x1,D0 00022b38 b0 82 | | CMP.L D2,D0 00022b3a 63 02 |c | BLS 0x22b3e 00022b3c 4e 4f |NO | TRAP #15 00022b3e 22 07 |" | MOVE.L D7,D1 00022b40 53 81 |S | SUBQ.L #0x1,D1 00022b42 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00022b48 63 02 |c | BLS 0x22b4c 00022b4a 4e 4f |NO | TRAP #15 00022b4c 1d b0 18 02 08 e0 | | MOVE.B (A0+D1.L+#0x2),(A6+D0.L-#0x20) 00022b52 52 87 |R | ADDQ.L #0x1,D7 00022b54 0c 87 00 00 00 1e | | CMPI.L #0x0000001e,D7 00022b5a 6f bc |o | BLE 0x22b18 00022b5c 48 6e 00 08 |Hn | PEA.L (A6+0x8) 00022b60 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022b66 58 4f |XO | ADDQ.L #0x4,A7 00022b68 41 ee 00 0c |A | LEA.L (A6+0xc),A0 00022b6c 43 ee ff e0 |C | LEA.L (A6-0x20),A1 00022b70 70 0e |p | MOVEQ.L #0x0e,D0 00022b72 30 d9 |0 | MOVE.W (A1)+,(A0)+ 00022b74 51 c8 ff fc |Q | DBF D0,0x22b72 00022b78 4c df 03 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1 00022b7c 4e 5e |N^ | UNLK A6 00022b7e 4e 75 |Nu | RTS 00022b80 ; -------------------------------------------------------------------------------------- 00022b80 ; OMSI PASCAL Function 00022b80 ; <LVAR 0x026 4(w)> 00022b80 ; <LVAR 0x008 @> 00022b80 ; <LVAR -0x006 4(rw)> 00022b80 ; -------------------------------------------------------------------------------------- 00022b80 4e 56 ff d6 |NV | LINK.W A6,#0xffd6 00022b84 bf d5 | | CMPA.L (A5),A7 00022b86 62 06 |b | BHI 0x22b8e 00022b88 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022b8c 4e 76 |Nv | TRAPV 00022b8e de fc 00 24 | $ | ADDA.W #0x24,A7 00022b92 48 e7 c1 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D1+D0,-(A7) 00022b96 47 ee ff fa |G | LEA.L (A6-0x6),A3 00022b9a 7e 00 |~ | MOVEQ.L #0x00,D7 00022b9c 26 b9 00 02 65 42 |& eB | MOVE.L 0x26542,(A3) 00022ba2 20 53 | S | MOVEA.L (A3),A0 00022ba4 b0 fc 00 01 | | CMPA.W #0x1,A0 00022ba8 67 1e |g | BEQ 0x22bc8 00022baa 4a 07 |J | TST.B D7 00022bac 66 1a |f | BNE 0x22bc8 00022bae 22 48 |"H | MOVEA.L A0,A1 00022bb0 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00022bb4 70 1d |p | MOVEQ.L #0x1d,D0 00022bb6 b5 09 | | CMPM.B (A1)+,(A2)+ 00022bb8 56 c8 ff fc |V | DBNE D0,0x22bb6 00022bbc 66 04 |f | BNE 0x22bc2 00022bbe 7e 01 |~ | MOVEQ.L #0x01,D7 00022bc0 60 04 |` | BRA 0x22bc6 00022bc2 26 a8 00 26 |& & | MOVE.L (A0+0x26),(A3) 00022bc6 60 da |` | BRA 0x22ba2 00022bc8 2d 48 00 26 |-H & | MOVE.L A0,(A6+0x26) 00022bcc 4c df 0f 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A2+A3 00022bd0 4e 5e |N^ | UNLK A6 00022bd2 4e 75 |Nu | RTS 00022bd4 ; -------------------------------------------------------------------------------------- 00022bd4 ; OMSI PASCAL Function 00022bd4 ; <LVAR 0x008 @ 4(r)> 00022bd4 ; -------------------------------------------------------------------------------------- 00022bd4 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00022bd8 bf d5 | | CMPA.L (A5),A7 00022bda 62 06 |b | BHI 0x22be2 00022bdc 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022be0 4e 76 |Nv | TRAPV 00022be2 de fc 00 2c | , | ADDA.W #0x2c,A7 00022be6 48 e7 81 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D0,-(A7) 00022bea 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00022bee 45 f9 00 02 65 42 |E eB | LEA.L 0x26542,A2 00022bf4 70 01 |p | MOVEQ.L #0x01,D0 00022bf6 20 51 | Q | MOVEA.L (A1),A0 00022bf8 b0 c0 | | CMPA.W D0,A0 00022bfa 67 56 |gV | BEQ 0x22c52 00022bfc 4a a8 00 1e |J | TST.L (A0+0x1e) 00022c00 67 10 |g | BEQ 0x22c12 00022c02 2f 28 00 22 |/( " | MOVE.L (A0+0x22),-(A7) 00022c06 2f 28 00 1e |/( | MOVE.L (A0+0x1e),-(A7) 00022c0a 4e b9 00 01 02 a4 |N | JSR Free1(a : Pointer; b : Long) 00022c10 50 4f |PO | ADDQ.L #0x8,A7 00022c12 7e 00 |~ | MOVEQ.L #0x00,D7 00022c14 38 40 |8@ | MOVEA.W D0,A4 00022c16 26 52 |&R | MOVEA.L (A2),A3 00022c18 b6 c0 | | CMPA.W D0,A3 00022c1a 67 14 |g | BEQ 0x22c30 00022c1c 4a 07 |J | TST.B D7 00022c1e 66 10 |f | BNE 0x22c30 00022c20 b7 d1 | | CMPA.L (A1),A3 00022c22 66 04 |f | BNE 0x22c28 00022c24 7e 01 |~ | MOVEQ.L #0x01,D7 00022c26 60 06 |` | BRA 0x22c2e 00022c28 28 4b |(K | MOVEA.L A3,A4 00022c2a 26 6b 00 26 |&k & | MOVEA.L (A3+0x26),A3 00022c2e 60 e8 |` | BRA 0x22c18 00022c30 4a 07 |J | TST.B D7 00022c32 67 1e |g | BEQ 0x22c52 00022c34 b8 c0 | | CMPA.W D0,A4 00022c36 66 06 |f | BNE 0x22c3e 00022c38 24 ab 00 26 |$ & | MOVE.L (A3+0x26),(A2) 00022c3c 60 06 |` | BRA 0x22c44 00022c3e 29 6b 00 26 00 26 |)k & & | MOVE.L (A3+0x26),(A4+0x26) 00022c44 48 51 |HQ | PEA.L (A1) 00022c46 48 78 00 2a |Hx * | PEA.L 0x2a 00022c4a 4e b9 00 01 02 a8 |N | JSR Free2(a : Pointer; b : Long) 00022c50 50 4f |PO | ADDQ.L #0x8,A7 00022c52 4c df 1f 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1+A2+A3+A4 00022c56 4e 5e |N^ | UNLK A6 00022c58 4e 75 |Nu | RTS 00022c5a ; -------------------------------------------------------------------------------------- 00022c5a ; OMSI PASCAL Function 00022c5a ; <LVAR 0x010 4(w)> 00022c5a ; <LVAR 0x00c 4(r)> 00022c5a ; <LVAR 0x008 4(r)> 00022c5a ; <LVAR -0x006 @ 4(rw)> 00022c5a ; <LVAR -0x024 @> 00022c5a ; -------------------------------------------------------------------------------------- 00022c5a 4e 56 ff 9a |NV | LINK.W A6,#0xff9a 00022c5e bf d5 | | CMPA.L (A5),A7 00022c60 62 06 |b | BHI 0x22c68 00022c62 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022c66 4e 76 |Nv | TRAPV 00022c68 de fc 00 42 | B | ADDA.W #0x42,A7 00022c6c 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 00022c70 47 ee ff fa |G | LEA.L (A6-0x6),A3 00022c74 49 ee 00 08 |I | LEA.L (A6+0x8),A4 00022c78 72 1e |r | MOVEQ.L #0x1e,D1 00022c7a 9e c1 | | SUBA.W D1,A7 00022c7c 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00022c80 2f 10 |/ | MOVE.L (A0),-(A7) 00022c82 4e ba fe 7a |N z | JSR 0x22afe 00022c86 58 4f |XO | ADDQ.L #0x4,A7 00022c88 41 ee ff dc |A | LEA.L (A6-0x24),A0 00022c8c 70 0e |p | MOVEQ.L #0x0e,D0 00022c8e 30 df |0 | MOVE.W (A7)+,(A0)+ 00022c90 51 c8 ff fc |Q | DBF D0,0x22c8e 00022c94 4a 94 |J | TST.L (A4) 00022c96 6c 02 |l | BGE 0x22c9a 00022c98 42 94 |B | CLR.L (A4) 00022c9a 59 4f |YO | SUBQ.L #0x4,A7 00022c9c 20 4b | K | MOVEA.L A3,A0 00022c9e 70 0e |p | MOVEQ.L #0x0e,D0 00022ca0 3f 20 |? | MOVE.W -(A0),-(A7) 00022ca2 51 c8 ff fc |Q | DBF D0,0x22ca0 00022ca6 4e ba fe d8 |N | JSR 0x22b80 00022caa de c1 | | ADDA.W D1,A7 00022cac 26 9f |& | MOVE.L (A7)+,(A3) 00022cae 20 53 | S | MOVEA.L (A3),A0 00022cb0 b0 fc 00 01 | | CMPA.W #0x1,A0 00022cb4 67 12 |g | BEQ 0x22cc8 00022cb6 20 28 00 1e | ( | MOVE.L (A0+0x1e),D0 00022cba b0 94 | | CMP.L (A4),D0 00022cbc 66 02 |f | BNE 0x22cc0 00022cbe 60 4c |`L | BRA 0x22d0c 00022cc0 2f 13 |/ | MOVE.L (A3),-(A7) 00022cc2 4e ba ff 10 |N | JSR 0x22bd4 00022cc6 58 4f |XO | ADDQ.L #0x4,A7 00022cc8 48 53 |HS | PEA.L (A3) 00022cca 48 78 00 2a |Hx * | PEA.L 0x2a 00022cce 4e b9 00 01 02 9c |N | JSR Malloc1(length : Long) : Pointer 00022cd4 50 4f |PO | ADDQ.L #0x8,A7 00022cd6 20 53 | S | MOVEA.L (A3),A0 00022cd8 21 79 00 02 65 42 00 26 |!y eB &| MOVE.L 0x26542,(A0+0x26) 00022ce0 23 d3 00 02 65 42 |# eB | MOVE.L (A3),0x26542 00022ce6 22 48 |"H | MOVEA.L A0,A1 00022ce8 45 ee ff dc |E | LEA.L (A6-0x24),A2 00022cec 70 1d |p | MOVEQ.L #0x1d,D0 00022cee 12 da | | MOVE.B (A2)+,(A1)+ 00022cf0 51 c8 ff fc |Q | DBF D0,0x22cee 00022cf4 21 54 00 1e |!T | MOVE.L (A4),(A0+0x1e) 00022cf8 4a 94 |J | TST.L (A4) 00022cfa 67 10 |g | BEQ 0x22d0c 00022cfc 59 4f |YO | SUBQ.L #0x4,A7 00022cfe 2f 14 |/ | MOVE.L (A4),-(A7) 00022d00 4e b9 00 01 02 a0 |N | JSR Malloc2(VAR dst : Pointer; length : Word) 00022d06 58 4f |XO | ADDQ.L #0x4,A7 00022d08 21 5f 00 22 |!_ " | MOVE.L (A7)+,(A0+0x22) 00022d0c 2d 53 00 10 |-S | MOVE.L (A3),(A6+0x10) 00022d10 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 00022d14 4e 5e |N^ | UNLK A6 00022d16 4e 75 |Nu | RTS 00022d18 ; -------------------------------------------------------------------------------------- 00022d18 ; OMSI PASCAL Function 00022d18 ; <LVAR 0x00c @> 00022d18 ; <LVAR 0x008 @ 4(r)> 00022d18 ; <LVAR -0x008 4(rw)> 00022d18 ; -------------------------------------------------------------------------------------- 00022d18 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00022d1c bf d5 | | CMPA.L (A5),A7 00022d1e 62 06 |b | BHI 0x22d26 00022d20 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022d24 4e 76 |Nv | TRAPV 00022d26 de fc 00 2c | , | ADDA.W #0x2c,A7 00022d2a 48 e7 c3 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D1+D0,-(A7) 00022d2e 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00022d32 20 52 | R | MOVEA.L (A2),A0 00022d34 30 10 |0 | MOVE.W (A0),D0 00022d36 48 c0 |H | EXTW.L D0 00022d38 2c 00 |, | MOVE.L D0,D6 00022d3a 59 4f |YO | SUBQ.L #0x4,A7 00022d3c 48 6e 00 0c |Hn | PEA.L (A6+0xc) 00022d40 2f 06 |/ | MOVE.L D6,-(A7) 00022d42 4e ba ff 16 |N | JSR 0x22c5a 00022d46 50 4f |PO | ADDQ.L #0x8,A7 00022d48 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 00022d4c 4a 86 |J | TST.L D6 00022d4e 67 40 |g@ | BEQ 0x22d90 00022d50 20 6e ff f8 | n | MOVEA.L (A6-0x8),A0 00022d54 20 68 00 22 | h " | MOVEA.L (A0+0x22),A0 00022d58 2f 08 |/ | MOVE.L A0,-(A7) 00022d5a 2f 06 |/ | MOVE.L D6,-(A7) 00022d5c 7e 01 |~ | MOVEQ.L #0x01,D7 00022d5e be 97 | | CMP.L (A7),D7 00022d60 6e 2c |n, | BGT 0x22d8e 00022d62 20 07 | | MOVE.L D7,D0 00022d64 53 80 |S | SUBQ.L #0x1,D0 00022d66 0c 80 00 00 03 ff | | CMPI.L #0x000003ff,D0 00022d6c 63 02 |c | BLS 0x22d70 00022d6e 4e 4f |NO | TRAP #15 00022d70 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00022d74 22 52 |"R | MOVEA.L (A2),A1 00022d76 22 07 |" | MOVE.L D7,D1 00022d78 53 81 |S | SUBQ.L #0x1,D1 00022d7a 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 00022d80 63 02 |c | BLS 0x22d84 00022d82 4e 4f |NO | TRAP #15 00022d84 11 b1 18 02 08 00 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L) 00022d8a 52 87 |R | ADDQ.L #0x1,D7 00022d8c 68 d0 |h | BVC 0x22d5e 00022d8e 50 4f |PO | ADDQ.L #0x8,A7 00022d90 48 52 |HR | PEA.L (A2) 00022d92 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00022d98 58 4f |XO | ADDQ.L #0x4,A7 00022d9a 4c df 07 c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0+A1+A2 00022d9e 4e 5e |N^ | UNLK A6 00022da0 4e 75 |Nu | RTS 00022da2 ; -------------------------------------------------------------------------------------- 00022da2 ; OMSI PASCAL Function 00022da2 ; <LVAR 0x008 4(r)> 00022da2 ; <LVAR -0x004 @ 4(w)> 00022da2 ; <LVAR -0x008 4(rw)> 00022da2 ; <LVAR -0x00c 4(rw)> 00022da2 ; <LVAR -0x010 4(rw)> 00022da2 ; <LVAR -0x01c 4(rw)> 00022da2 ; <LVAR -0x020 4(rw)> 00022da2 ; -------------------------------------------------------------------------------------- 00022da2 4e 56 ff 82 |NV | LINK.W A6,#0xff82 00022da6 bf d5 | | CMPA.L (A5),A7 00022da8 62 06 |b | BHI 0x22db0 00022daa 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022dae 4e 76 |Nv | TRAPV 00022db0 de fc 00 5a | Z | ADDA.W #0x5a,A7 00022db4 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00022db8 45 ee ff f4 |E | LEA.L (A6-0xc),A2 00022dbc 47 ee ff f0 |G | LEA.L (A6-0x10),A3 00022dc0 49 ee 00 08 |I | LEA.L (A6+0x8),A4 00022dc4 74 01 |t | MOVEQ.L #0x01,D2 00022dc6 59 4f |YO | SUBQ.L #0x4,A7 00022dc8 2f 14 |/ | MOVE.L (A4),-(A7) 00022dca 4e ba f0 32 |N 2 | JSR 0x21dfe 00022dce 58 4f |XO | ADDQ.L #0x4,A7 00022dd0 26 9f |& | MOVE.L (A7)+,(A3) 00022dd2 20 13 | | MOVE.L (A3),D0 00022dd4 b0 82 | | CMP.L D2,D0 00022dd6 6c 2e |l. | BGE 0x22e06 00022dd8 9e fc 00 1a | | SUBA.W #0x1a,A7 00022ddc 20 4f | O | MOVEA.L A7,A0 00022dde 43 fa e7 f6 |C | LEA.L 0x215d6,A1 00022de2 72 18 |r | MOVEQ.L #0x18,D1 00022de4 10 d9 | | MOVE.B (A1)+,(A0)+ 00022de6 51 c9 ff fc |Q | DBF D1,0x22de4 00022dea 59 4f |YO | SUBQ.L #0x4,A7 00022dec 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00022df0 3f 02 |? | MOVE.W D2,-(A7) 00022df2 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00022df6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022dfc 50 4f |PO | ADDQ.L #0x8,A7 00022dfe 4e ba eb f2 |N | JSR 0x219f2 00022e02 de fc 00 1e | | ADDA.W #0x1e,A7 00022e06 42 92 |B | CLR.L (A2) 00022e08 2f 00 |/ | MOVE.L D0,-(A7) 00022e0a 7c 02 || | MOVEQ.L #0x02,D6 00022e0c bc 97 | | CMP.L (A7),D6 00022e0e 6e 1e |n | BGT 0x22e2e 00022e10 9e fc 00 0c | | SUBA.W #0xc,A7 00022e14 2f 14 |/ | MOVE.L (A4),-(A7) 00022e16 2f 06 |/ | MOVE.L D6,-(A7) 00022e18 4e ba f8 22 |N " | JSR 0x2263c 00022e1c 50 4f |PO | ADDQ.L #0x8,A7 00022e1e 4e ba f7 e4 |N | JSR 0x22604 00022e22 50 4f |PO | ADDQ.L #0x8,A7 00022e24 20 12 | | MOVE.L (A2),D0 00022e26 d0 9f | | ADD.L (A7)+,D0 00022e28 24 80 |$ | MOVE.L D0,(A2) 00022e2a 52 86 |R | ADDQ.L #0x1,D6 00022e2c 68 de |h | BVC 0x22e0c 00022e2e 58 4f |XO | ADDQ.L #0x4,A7 00022e30 20 13 | | MOVE.L (A3),D0 00022e32 55 80 |U | SUBQ.L #0x2,D0 00022e34 d1 92 | | ADD.L D0,(A2) 00022e36 59 4f |YO | SUBQ.L #0x4,A7 00022e38 2f 14 |/ | MOVE.L (A4),-(A7) 00022e3a 48 78 00 01 |Hx | PEA.L 0x1 00022e3e 4e ba f8 da |N | JSR 0x2271a 00022e42 50 4f |PO | ADDQ.L #0x8,A7 00022e44 2d 57 ff fc |-W | MOVE.L (A7),(A6-0x4) 00022e48 48 6e ff fc |Hn | PEA.L (A6-0x4) 00022e4c 2f 12 |/ | MOVE.L (A2),-(A7) 00022e4e 4e ba fe 0a |N | JSR 0x22c5a 00022e52 50 4f |PO | ADDQ.L #0x8,A7 00022e54 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 00022e58 4a 92 |J | TST.L (A2) 00022e5a 6f 00 00 aa |o | BLE 0x22f06 00022e5e 20 6e ff f8 | n | MOVEA.L (A6-0x8),A0 00022e62 20 68 00 22 | h " | MOVEA.L (A0+0x22),A0 00022e66 2f 08 |/ | MOVE.L A0,-(A7) 00022e68 7e 01 |~ | MOVEQ.L #0x01,D7 00022e6a 2f 13 |/ | MOVE.L (A3),-(A7) 00022e6c 7c 02 || | MOVEQ.L #0x02,D6 00022e6e bc 97 | | CMP.L (A7),D6 00022e70 6e 00 00 92 |n | BGT 0x22f04 00022e74 51 4f |QO | SUBQ.L #0x8,A7 00022e76 2f 14 |/ | MOVE.L (A4),-(A7) 00022e78 2f 06 |/ | MOVE.L D6,-(A7) 00022e7a 4e ba f7 c0 |N | JSR 0x2263c 00022e7e 50 4f |PO | ADDQ.L #0x8,A7 00022e80 2d 5f ff e0 |-_ | MOVE.L (A7)+,(A6-0x20) 00022e84 2d 5f ff e4 |-_ | MOVE.L (A7)+,(A6-0x1c) 00022e88 2f 2e ff e4 |/. | MOVE.L (A6-0x1c),-(A7) 00022e8c 2a 2e ff e0 |*. | MOVE.L (A6-0x20),D5 00022e90 ba 97 | | CMP.L (A7),D5 00022e92 6e 14 |n | BGT 0x22ea8 00022e94 20 17 | | MOVE.L (A7),D0 00022e96 0c 85 80 00 00 01 | | CMPI.L #0x80000001,D5 00022e9c 6d 08 |m | BLT 0x22ea6 00022e9e 0c 80 7f ff ff ff | | CMPI.L #0x7fffffff,D0 00022ea4 6f 02 |o | BLE 0x22ea8 00022ea6 4e 4f |NO | TRAP #15 00022ea8 ba 97 | | CMP.L (A7),D5 00022eaa 6e 32 |n2 | BGT 0x22ede 00022eac 20 07 | | MOVE.L D7,D0 00022eae 53 80 |S | SUBQ.L #0x1,D0 00022eb0 0c 80 00 00 03 ff | | CMPI.L #0x000003ff,D0 00022eb6 63 02 |c | BLS 0x22eba 00022eb8 4e 4f |NO | TRAP #15 00022eba 20 6f 00 08 | o | MOVEA.L (A7+0x8),A0 00022ebe 22 05 |" | MOVE.L D5,D1 00022ec0 53 81 |S | SUBQ.L #0x1,D1 00022ec2 0c 81 00 00 0f ff | | CMPI.L #0x00000fff,D1 00022ec8 63 02 |c | BLS 0x22ecc 00022eca 4e 4f |NO | TRAP #15 00022ecc 43 f9 00 02 55 10 |C U | LEA.L 0x25510,A1 00022ed2 11 b1 18 08 08 00 | | MOVE.B (A1+D1.L+#0x8),(A0+D0.L) 00022ed8 52 87 |R | ADDQ.L #0x1,D7 00022eda 52 85 |R | ADDQ.L #0x1,D5 00022edc 68 ca |h | BVC 0x22ea8 00022ede 58 4f |XO | ADDQ.L #0x4,A7 00022ee0 bc 93 | | CMP.L (A3),D6 00022ee2 67 1a |g | BEQ 0x22efe 00022ee4 20 07 | | MOVE.L D7,D0 00022ee6 53 80 |S | SUBQ.L #0x1,D0 00022ee8 0c 80 00 00 03 ff | | CMPI.L #0x000003ff,D0 00022eee 63 02 |c | BLS 0x22ef2 00022ef0 4e 4f |NO | TRAP #15 00022ef2 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00022ef6 11 bc 00 2c 08 00 | , | MOVE.B #0x2c,(A0+D0.L) 00022efc 52 87 |R | ADDQ.L #0x1,D7 00022efe 52 86 |R | ADDQ.L #0x1,D6 00022f00 68 00 ff 6c |h l | BVC 0x22e6e 00022f04 50 4f |PO | ADDQ.L #0x8,A7 00022f06 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 00022f0a 4e 5e |N^ | UNLK A6 00022f0c 4e 75 |Nu | RTS 00022f0e ; -------------------------------------------------------------------------------------- 00022f0e ; OMSI PASCAL Function 00022f0e ; <LVAR 0x008 4(r)> 00022f0e ; <LVAR -0x00c 4(rw)> 00022f0e ; -------------------------------------------------------------------------------------- 00022f0e 4e 56 ff a0 |NV | LINK.W A6,#0xffa0 00022f12 bf d5 | | CMPA.L (A5),A7 00022f14 62 06 |b | BHI 0x22f1c 00022f16 44 fc 00 02 |D | MOVE.W #0x2,CCR 00022f1a 4e 76 |Nv | TRAPV 00022f1c de fc 00 54 | T | ADDA.W #0x54,A7 00022f20 48 e7 e1 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D2+D1+D0,-(A7) 00022f24 47 f9 00 02 65 18 |G e | LEA.L 0x26518,A3 00022f2a 74 01 |t | MOVEQ.L #0x01,D2 00022f2c 59 4f |YO | SUBQ.L #0x4,A7 00022f2e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00022f32 48 78 00 01 |Hx | PEA.L 0x1 00022f36 4e ba f7 e2 |N | JSR 0x2271a 00022f3a 50 4f |PO | ADDQ.L #0x8,A7 00022f3c 28 5f |(_ | MOVEA.L (A7)+,A4 00022f3e 9e fc 00 22 | " | SUBA.W #0x22,A7 00022f42 2f 0c |/ | MOVE.L A4,-(A7) 00022f44 4e ba fb b8 |N | JSR 0x22afe 00022f48 58 4f |XO | ADDQ.L #0x4,A7 00022f4a 4e ba fc 34 |N 4 | JSR 0x22b80 00022f4e de fc 00 1e | | ADDA.W #0x1e,A7 00022f52 2d 5f ff f4 |-_ | MOVE.L (A7)+,(A6-0xc) 00022f56 20 6e ff f4 | n | MOVEA.L (A6-0xc),A0 00022f5a b0 c2 | | CMPA.W D2,A0 00022f5c 66 42 |fB | BNE 0x22fa0 00022f5e 9e fc 00 14 | | SUBA.W #0x14,A7 00022f62 22 4f |"O | MOVEA.L A7,A1 00022f64 45 fa e6 8a |E | LEA.L 0x215f0,A2 00022f68 70 12 |p | MOVEQ.L #0x12,D0 00022f6a 12 da | | MOVE.B (A2)+,(A1)+ 00022f6c 51 c8 ff fc |Q | DBF D0,0x22f6a 00022f70 51 4f |QO | SUBQ.L #0x8,A7 00022f72 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00022f76 3f 02 |? | MOVE.W D2,-(A7) 00022f78 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 00022f7c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00022f82 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00022f86 48 78 00 01 |Hx | PEA.L 0x1 00022f8a 4e ba f7 8e |N | JSR 0x2271a 00022f8e 50 4f |PO | ADDQ.L #0x8,A7 00022f90 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00022f96 50 4f |PO | ADDQ.L #0x8,A7 00022f98 4e ba ea 58 |N X | JSR 0x219f2 00022f9c de fc 00 18 | | ADDA.W #0x18,A7 00022fa0 2f 08 |/ | MOVE.L A0,-(A7) 00022fa2 2f 13 |/ | MOVE.L (A3),-(A7) 00022fa4 2f 28 00 1e |/( | MOVE.L (A0+0x1e),-(A7) 00022fa8 44 97 |D | NEG.L (A7) 00022faa 4e ba ef 9a |N | JSR 0x21f46 00022fae 58 4f |XO | ADDQ.L #0x4,A7 00022fb0 2e a8 00 1e |. | MOVE.L (A0+0x1e),(A7) 00022fb4 7e 01 |~ | MOVEQ.L #0x01,D7 00022fb6 be 97 | | CMP.L (A7),D7 00022fb8 6e 38 |n8 | BGT 0x22ff2 00022fba 20 07 | | MOVE.L D7,D0 00022fbc d0 93 | | ADD.L (A3),D0 00022fbe 53 80 |S | SUBQ.L #0x1,D0 00022fc0 53 80 |S | SUBQ.L #0x1,D0 00022fc2 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 00022fc8 63 02 |c | BLS 0x22fcc 00022fca 4e 4f |NO | TRAP #15 00022fcc 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 00022fd2 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 00022fd6 22 69 00 22 |"i " | MOVEA.L (A1+0x22),A1 00022fda 22 07 |" | MOVE.L D7,D1 00022fdc 53 81 |S | SUBQ.L #0x1,D1 00022fde 0c 81 00 00 03 ff | | CMPI.L #0x000003ff,D1 00022fe4 63 02 |c | BLS 0x22fe8 00022fe6 4e 4f |NO | TRAP #15 00022fe8 11 b1 18 00 08 08 | | MOVE.B (A1+D1.L),(A0+D0.L+#0x8) 00022fee 52 87 |R | ADDQ.L #0x1,D7 00022ff0 68 c4 |h | BVC 0x22fb6 00022ff2 50 4f |PO | ADDQ.L #0x8,A7 00022ff4 4c df 1f 87 |L | MOVEM.L (A7)+,D0+D1+D2+D7+A0+A1+A2+A3+A4 00022ff8 4e 5e |N^ | UNLK A6 00022ffa 4e 75 |Nu | RTS 00022ffc ; -------------------------------------------------------------------------------------- 00022ffc ; OMSI PASCAL Function 00022ffc ; <LVAR -0x004 4(rw)> 00022ffc ; -------------------------------------------------------------------------------------- 00022ffc 4e 56 ff ae |NV | LINK.W A6,#0xffae 00023000 bf d5 | | CMPA.L (A5),A7 00023002 62 06 |b | BHI 0x2300a 00023004 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023008 4e 76 |Nv | TRAPV 0002300a de fc 00 4e | N | ADDA.W #0x4e,A7 0002300e 48 e7 e0 f0 |H | MOVEM.L A3+A2+A1+A0+D2+D1+D0,-(A7) 00023012 47 ee ff fc |G | LEA.L (A6-0x4),A3 00023016 72 01 |r | MOVEQ.L #0x01,D1 00023018 74 1e |t | MOVEQ.L #0x1e,D2 0002301a 26 b9 00 02 65 42 |& eB | MOVE.L 0x26542,(A3) 00023020 20 53 | S | MOVEA.L (A3),A0 00023022 b0 c1 | | CMPA.W D1,A0 00023024 67 30 |g0 | BEQ 0x23056 00023026 9e c2 | | SUBA.W D2,A7 00023028 22 4f |"O | MOVEA.L A7,A1 0002302a 24 48 |$H | MOVEA.L A0,A2 0002302c 70 1d |p | MOVEQ.L #0x1d,D0 0002302e 12 da | | MOVE.B (A2)+,(A1)+ 00023030 51 c8 ff fc |Q | DBF D0,0x2302e 00023034 59 4f |YO | SUBQ.L #0x4,A7 00023036 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002303a 3f 01 |? | MOVE.W D1,-(A7) 0002303c 3f 02 |? | MOVE.W D2,-(A7) 0002303e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023044 50 4f |PO | ADDQ.L #0x8,A7 00023046 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002304c de fc 00 22 | " | ADDA.W #0x22,A7 00023050 26 a8 00 26 |& & | MOVE.L (A0+0x26),(A3) 00023054 60 ca |` | BRA 0x23020 00023056 4c df 0f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3 0002305a 4e 5e |N^ | UNLK A6 0002305c 4e 75 |Nu | RTS 0002305e ; -------------------------------------------------------------------------------------- 0002305e ; OMSI PASCAL Function 0002305e ; <LVAR 0x008 4(r)> 0002305e ; -------------------------------------------------------------------------------------- 0002305e 4e 56 ff ce |NV | LINK.W A6,#0xffce 00023062 bf d5 | | CMPA.L (A5),A7 00023064 62 06 |b | BHI 0x2306c 00023066 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002306a 4e 76 |Nv | TRAPV 0002306c de fc 00 32 | 2 | ADDA.W #0x32,A7 00023070 9e fc 00 26 | & | SUBA.W #0x26,A7 00023074 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023078 48 78 00 01 |Hx | PEA.L 0x1 0002307c 4e ba f6 9c |N | JSR 0x2271a 00023080 50 4f |PO | ADDQ.L #0x8,A7 00023082 4e ba fa 7a |N z | JSR 0x22afe 00023086 58 4f |XO | ADDQ.L #0x4,A7 00023088 4e ba fa f6 |N | JSR 0x22b80 0002308c de fc 00 1e | | ADDA.W #0x1e,A7 00023090 4e ba fb 42 |N B | JSR 0x22bd4 00023094 58 4f |XO | ADDQ.L #0x4,A7 00023096 4e 5e |N^ | UNLK A6 00023098 4e 75 |Nu | RTS 0002309a ; -------------------------------------------------------------------------------------- 0002309a ; OMSI PASCAL Function 0002309a ; -------------------------------------------------------------------------------------- 0002309a 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 0002309e bf d5 | | CMPA.L (A5),A7 000230a0 62 06 |b | BHI 0x230a8 000230a2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000230a6 4e 76 |Nv | TRAPV 000230a8 de fc 00 0c | | ADDA.W #0xc,A7 000230ac 51 4f |QO | SUBQ.L #0x8,A7 000230ae 4e b9 00 01 03 cc |N | JSR GetPushLevel() : Long 000230b4 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000230ba 58 4f |XO | ADDQ.L #0x4,A7 000230bc 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000230c2 58 4f |XO | ADDQ.L #0x4,A7 000230c4 4e 5e |N^ | UNLK A6 000230c6 4e 75 |Nu | RTS 000230c8 ; -------------------------------------------------------------------------------------- 000230c8 ; OMSI PASCAL Function 000230c8 ; <LVAR 0x008 4(r)> 000230c8 ; <LVAR -0x004 1(rw)> 000230c8 ; <LVAR -0x008 @ 4(rw)> 000230c8 ; <LVAR -0x00c @ 4(r)> 000230c8 ; <LVAR -0x010 @ 4(r)> 000230c8 ; <LVAR -0x012 @ 1(r)> 000230c8 ; <LVAR -0x013 @ 1(r)> 000230c8 ; <LVAR -0x014 @ 1(r)> 000230c8 ; <LVAR -0x024 4(rw)> 000230c8 ; <LVAR -0x028 4(rw)> 000230c8 ; <LVAR -0x02c 4(rw)> 000230c8 ; <LVAR -0x030 @ 4(r)> 000230c8 ; <LVAR -0x032 1(w)> 000230c8 ; <LVAR -0x036 @ 4(r)> 000230c8 ; <LVAR -0x038 @ 1(r)> 000230c8 ; <LVAR -0x03c @ 4(rw)> 000230c8 ; -------------------------------------------------------------------------------------- 000230c8 4e 56 ff 64 |NV d | LINK.W A6,#0xff64 000230cc bf d5 | | CMPA.L (A5),A7 000230ce 62 06 |b | BHI 0x230d6 000230d0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000230d4 4e 76 |Nv | TRAPV 000230d6 de fc 00 60 | ` | ADDA.W #0x60,A7 000230da 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000230de 45 ee ff c4 |E | LEA.L (A6-0x3c),A2 000230e2 47 ee 00 08 |G | LEA.L (A6+0x8),A3 000230e6 49 f9 00 01 02 c4 |I | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A4 000230ec 74 01 |t | MOVEQ.L #0x01,D2 000230ee 76 14 |v | MOVEQ.L #0x14,D3 000230f0 28 3c ff ff 80 00 |(< | MOVE.L #0xffff8000,D4 000230f6 59 4f |YO | SUBQ.L #0x4,A7 000230f8 2f 13 |/ | MOVE.L (A3),-(A7) 000230fa 4e ba ed 02 |N | JSR 0x21dfe 000230fe 58 4f |XO | ADDQ.L #0x4,A7 00023100 2d 5f ff d4 |-_ | MOVE.L (A7)+,(A6-0x2c) 00023104 66 28 |f( | BNE 0x2312e 00023106 59 4f |YO | SUBQ.L #0x4,A7 00023108 1e ba e5 0c | | MOVE.B 0x21616,(A7) 0002310c 1f 7a e5 09 00 01 | z | MOVE.B 0x21617,(A7+0x1) 00023112 1f 7a e5 04 00 02 | z | MOVE.B 0x21618,(A7+0x2) 00023118 59 4f |YO | SUBQ.L #0x4,A7 0002311a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002311e 3f 02 |? | MOVE.W D2,-(A7) 00023120 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00023124 4e 94 |N | JSR (A4) 00023126 50 4f |PO | ADDQ.L #0x8,A7 00023128 24 9f |$ | MOVE.L (A7)+,(A2) 0002312a 58 4f |XO | ADDQ.L #0x4,A7 0002312c 60 10 |` | BRA 0x2313e 0002312e 59 4f |YO | SUBQ.L #0x4,A7 00023130 2f 13 |/ | MOVE.L (A3),-(A7) 00023132 48 78 00 01 |Hx | PEA.L 0x1 00023136 4e ba f5 e2 |N | JSR 0x2271a 0002313a 50 4f |PO | ADDQ.L #0x8,A7 0002313c 24 9f |$ | MOVE.L (A7)+,(A2) 0002313e 5d 4f |]O | SUBQ.L #0x6,A7 00023140 20 4f | O | MOVEA.L A7,A0 00023142 43 fa e4 d6 |C | LEA.L 0x2161a,A1 00023146 70 04 |p | MOVEQ.L #0x04,D0 00023148 10 d9 | | MOVE.B (A1)+,(A0)+ 0002314a 51 c8 ff fc |Q | DBF D0,0x23148 0002314e 59 4f |YO | SUBQ.L #0x4,A7 00023150 2f 12 |/ | MOVE.L (A2),-(A7) 00023152 59 4f |YO | SUBQ.L #0x4,A7 00023154 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00023158 3f 02 |? | MOVE.W D2,-(A7) 0002315a 3f 3c 00 05 |?< | MOVE.W #0x5,-(A7) 0002315e 4e 94 |N | JSR (A4) 00023160 50 4f |PO | ADDQ.L #0x8,A7 00023162 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023168 50 4f |PO | ADDQ.L #0x8,A7 0002316a 24 9f |$ | MOVE.L (A7)+,(A2) 0002316c 54 4f |TO | ADDQ.L #0x2,A7 0002316e 2e 92 |. | MOVE.L (A2),(A7) 00023170 42 27 |B' | CLR.B -(A7) 00023172 1f 02 | | MOVE.B D2,-(A7) 00023174 48 78 00 00 |Hx | PEA.L 0x0 00023178 48 6e ff c8 |Hn | PEA.L (A6-0x38) 0002317c 48 6e ff ca |Hn | PEA.L (A6-0x36) 00023180 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00023186 de c3 | | ADDA.W D3,A7 00023188 4a 2e ff c8 |J. | TST.B (A6-0x38) 0002318c 67 0e |g | BEQ 0x2319c 0002318e 48 52 |HR | PEA.L (A2) 00023190 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023196 58 4f |XO | ADDQ.L #0x4,A7 00023198 60 00 02 4e |` N | BRA 0x233e8 0002319c 20 6e ff ca | n | MOVEA.L (A6-0x36),A0 000231a0 10 28 00 3f | ( ? | MOVE.B (A0+0x3f),D0 000231a4 ed 08 | | LSL.B #0x6,D0 000231a6 ee 08 | | LSR.B #0x7,D0 000231a8 1d 40 ff ce | @ | MOVE.B D0,(A6-0x32) 000231ac 42 27 |B' | CLR.B -(A7) 000231ae 1f 02 | | MOVE.B D2,-(A7) 000231b0 48 78 00 01 |Hx | PEA.L 0x1 000231b4 48 6e ff c8 |Hn | PEA.L (A6-0x38) 000231b8 48 6e ff ca |Hn | PEA.L (A6-0x36) 000231bc 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000231c2 de fc 00 10 | | ADDA.W #0x10,A7 000231c6 20 52 | R | MOVEA.L (A2),A0 000231c8 32 10 |2 | MOVE.W (A0),D1 000231ca 48 c1 |H | EXTW.L D1 000231cc 5b 81 |[ | SUBQ.L #0x5,D1 000231ce 92 84 | | SUB.L D4,D1 000231d0 0c 81 00 00 ff ff | | CMPI.L #0x0000ffff,D1 000231d6 63 02 |c | BLS 0x231da 000231d8 4e 4f |NO | TRAP #15 000231da d2 84 | | ADD.L D4,D1 000231dc 30 81 |0 | MOVE.W D1,(A0) 000231de 4a 00 |J | TST.B D0 000231e0 66 36 |f6 | BNE 0x23218 000231e2 41 fa e4 32 |A 2 | LEA.L 0x21616,A0 000231e6 70 08 |p | MOVEQ.L #0x08,D0 000231e8 3f 20 |? | MOVE.W -(A0),-(A7) 000231ea 51 c8 ff fc |Q | DBF D0,0x231e8 000231ee 59 4f |YO | SUBQ.L #0x4,A7 000231f0 2f 12 |/ | MOVE.L (A2),-(A7) 000231f2 59 4f |YO | SUBQ.L #0x4,A7 000231f4 48 6f 00 0c |Ho | PEA.L (A7+0xc) 000231f8 3f 02 |? | MOVE.W D2,-(A7) 000231fa 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 000231fe 4e 94 |N | JSR (A4) 00023200 50 4f |PO | ADDQ.L #0x8,A7 00023202 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00023208 50 4f |PO | ADDQ.L #0x8,A7 0002320a 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023210 de fc 00 16 | | ADDA.W #0x16,A7 00023214 60 00 01 d2 |` | BRA 0x233e8 00023218 48 6e ff d0 |Hn | PEA.L (A6-0x30) 0002321c 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00023222 58 4f |XO | ADDQ.L #0x4,A7 00023224 20 6e ff d0 | n | MOVEA.L (A6-0x30),A0 00023228 2f 08 |/ | MOVE.L A0,-(A7) 0002322a 7e 01 |~ | MOVEQ.L #0x01,D7 0002322c 2f 2e ff d4 |/. | MOVE.L (A6-0x2c),-(A7) 00023230 7a 02 |z | MOVEQ.L #0x02,D5 00023232 ba 97 | | CMP.L (A7),D5 00023234 6e 00 00 94 |n | BGT 0x232ca 00023238 51 4f |QO | SUBQ.L #0x8,A7 0002323a 2f 13 |/ | MOVE.L (A3),-(A7) 0002323c 2f 05 |/ | MOVE.L D5,-(A7) 0002323e 4e ba f3 fc |N | JSR 0x2263c 00023242 50 4f |PO | ADDQ.L #0x8,A7 00023244 2d 5f ff d8 |-_ | MOVE.L (A7)+,(A6-0x28) 00023248 2d 5f ff dc |-_ | MOVE.L (A7)+,(A6-0x24) 0002324c 2f 2e ff dc |/. | MOVE.L (A6-0x24),-(A7) 00023250 2c 2e ff d8 |,. | MOVE.L (A6-0x28),D6 00023254 bc 97 | | CMP.L (A7),D6 00023256 6e 14 |n | BGT 0x2326c 00023258 20 17 | | MOVE.L (A7),D0 0002325a 0c 86 80 00 00 01 | | CMPI.L #0x80000001,D6 00023260 6d 08 |m | BLT 0x2326a 00023262 0c 80 7f ff ff ff | | CMPI.L #0x7fffffff,D0 00023268 6f 02 |o | BLE 0x2326c 0002326a 4e 4f |NO | TRAP #15 0002326c bc 97 | | CMP.L (A7),D6 0002326e 6e 32 |n2 | BGT 0x232a2 00023270 20 07 | | MOVE.L D7,D0 00023272 53 80 |S | SUBQ.L #0x1,D0 00023274 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 0002327a 63 02 |c | BLS 0x2327e 0002327c 4e 4f |NO | TRAP #15 0002327e 20 6f 00 08 | o | MOVEA.L (A7+0x8),A0 00023282 22 06 |" | MOVE.L D6,D1 00023284 53 81 |S | SUBQ.L #0x1,D1 00023286 0c 81 00 00 0f ff | | CMPI.L #0x00000fff,D1 0002328c 63 02 |c | BLS 0x23290 0002328e 4e 4f |NO | TRAP #15 00023290 43 f9 00 02 55 10 |C U | LEA.L 0x25510,A1 00023296 11 b1 18 08 08 02 | | MOVE.B (A1+D1.L+#0x8),(A0+D0.L+#0x2) 0002329c 52 87 |R | ADDQ.L #0x1,D7 0002329e 52 86 |R | ADDQ.L #0x1,D6 000232a0 68 ca |h | BVC 0x2326c 000232a2 58 4f |XO | ADDQ.L #0x4,A7 000232a4 ba ae ff d4 | | CMP.L (A6-0x2c),D5 000232a8 67 1a |g | BEQ 0x232c4 000232aa 20 07 | | MOVE.L D7,D0 000232ac 53 80 |S | SUBQ.L #0x1,D0 000232ae 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 000232b4 63 02 |c | BLS 0x232b8 000232b6 4e 4f |NO | TRAP #15 000232b8 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 000232bc 11 bc 00 2c 08 02 | , | MOVE.B #0x2c,(A0+D0.L+#0x2) 000232c2 52 87 |R | ADDQ.L #0x1,D7 000232c4 52 85 |R | ADDQ.L #0x1,D5 000232c6 68 00 ff 6a |h j | BVC 0x23232 000232ca 58 4f |XO | ADDQ.L #0x4,A7 000232cc 20 57 | W | MOVEA.L (A7),A0 000232ce 20 07 | | MOVE.L D7,D0 000232d0 53 80 |S | SUBQ.L #0x1,D0 000232d2 90 84 | | SUB.L D4,D0 000232d4 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 000232da 63 02 |c | BLS 0x232de 000232dc 4e 4f |NO | TRAP #15 000232de d0 84 | | ADD.L D4,D0 000232e0 30 80 |0 | MOVE.W D0,(A0) 000232e2 54 4f |TO | ADDQ.L #0x2,A7 000232e4 3e ba e3 3e |> > | MOVE.W 0x21624,(A7) 000232e8 3f 3a e3 38 |?: 8 | MOVE.W 0x21622,-(A7) 000232ec 3f 3a e3 32 |?: 2 | MOVE.W 0x21620,-(A7) 000232f0 59 4f |YO | SUBQ.L #0x4,A7 000232f2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000232f6 3f 02 |? | MOVE.W D2,-(A7) 000232f8 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 000232fc 4e 94 |N | JSR (A4) 000232fe 50 4f |PO | ADDQ.L #0x8,A7 00023300 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 00023304 54 4f |TO | ADDQ.L #0x2,A7 00023306 2e 93 |. | MOVE.L (A3),(A7) 00023308 48 78 00 00 |Hx | PEA.L 0x0 0002330c 2f 2e ff f8 |/. | MOVE.L (A6-0x8),-(A7) 00023310 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00023314 48 6e ff ed |Hn | PEA.L (A6-0x13) 00023318 4e b9 00 02 4c 52 |N LR | JSR 0x24c52 0002331e de c3 | | ADDA.W D3,A7 00023320 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00023324 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002332a 54 4f |TO | ADDQ.L #0x2,A7 0002332c 3e ba e2 fc |> | MOVE.W 0x2162a,(A7) 00023330 3f 3a e2 f6 |?: | MOVE.W 0x21628,-(A7) 00023334 3f 3a e2 f0 |?: | MOVE.W 0x21626,-(A7) 00023338 59 4f |YO | SUBQ.L #0x4,A7 0002333a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002333e 3f 02 |? | MOVE.W D2,-(A7) 00023340 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 00023344 4e 94 |N | JSR (A4) 00023346 50 4f |PO | ADDQ.L #0x8,A7 00023348 2d 5f ff f8 |-_ | MOVE.L (A7)+,(A6-0x8) 0002334c 54 4f |TO | ADDQ.L #0x2,A7 0002334e 2e 93 |. | MOVE.L (A3),(A7) 00023350 48 78 00 00 |Hx | PEA.L 0x0 00023354 2f 2e ff f8 |/. | MOVE.L (A6-0x8),-(A7) 00023358 48 6e ff f4 |Hn | PEA.L (A6-0xc) 0002335c 48 6e ff ee |Hn | PEA.L (A6-0x12) 00023360 4e b9 00 02 4c 52 |N LR | JSR 0x24c52 00023366 de c3 | | ADDA.W D3,A7 00023368 48 6e ff f8 |Hn | PEA.L (A6-0x8) 0002336c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023372 58 4f |XO | ADDQ.L #0x4,A7 00023374 4a 2e ff ed |J. | TST.B (A6-0x13) 00023378 66 06 |f | BNE 0x23380 0002337a 4a 2e ff ee |J. | TST.B (A6-0x12) 0002337e 67 06 |g | BEQ 0x23386 00023380 42 2e ff fc |B. | CLR.B (A6-0x4) 00023384 60 04 |` | BRA 0x2338a 00023386 1d 42 ff fc | B | MOVE.B D2,(A6-0x4) 0002338a 2f 12 |/ | MOVE.L (A2),-(A7) 0002338c 2f 2e ff d0 |/. | MOVE.L (A6-0x30),-(A7) 00023390 10 2e ff fc | . | MOVE.B (A6-0x4),D0 00023394 48 80 |H | EXTB.W D0 00023396 41 bc 00 02 |A | CHK.W #0x2,D0 0002339a 1f 00 | | MOVE.B D0,-(A7) 0002339c 48 6e ff ec |Hn | PEA.L (A6-0x14) 000233a0 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 000233a6 de fc 00 0e | | ADDA.W #0xe,A7 000233aa 4a 2e ff ed |J. | TST.B (A6-0x13) 000233ae 67 20 |g | BEQ 0x233d0 000233b0 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 000233b4 59 4f |YO | SUBQ.L #0x4,A7 000233b6 10 2e ff ec | . | MOVE.B (A6-0x14),D0 000233ba 48 80 |H | EXTB.W D0 000233bc 41 bc 00 0e |A | CHK.W #0xe,D0 000233c0 1f 00 | | MOVE.B D0,-(A7) 000233c2 4e b9 00 01 03 c0 |N | JSR ExpErrMsg(a: Byte) : String 000233c8 54 4f |TO | ADDQ.L #0x2,A7 000233ca 4e ba f9 4c |N L | JSR 0x22d18 000233ce 50 4f |PO | ADDQ.L #0x8,A7 000233d0 4a 2e ff ee |J. | TST.B (A6-0x12) 000233d4 67 12 |g | BEQ 0x233e8 000233d6 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 000233da 59 4f |YO | SUBQ.L #0x4,A7 000233dc 4e b9 00 01 03 c8 |N | JSR FSCALL_103c8 000233e2 4e ba f9 34 |N 4 | JSR 0x22d18 000233e6 50 4f |PO | ADDQ.L #0x8,A7 000233e8 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000233ec 4e 5e |N^ | UNLK A6 000233ee 4e 75 |Nu | RTS 000233f0 ; -------------------------------------------------------------------------------------- 000233f0 ; OMSI PASCAL Function 000233f0 ; <LVAR 0x008 4(r)> 000233f0 ; <LVAR -0x004 @ 4(rw)> 000233f0 ; <LVAR -0x008 @ 4(rw)> 000233f0 ; -------------------------------------------------------------------------------------- 000233f0 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 000233f4 bf d5 | | CMPA.L (A5),A7 000233f6 62 06 |b | BHI 0x233fe 000233f8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000233fc 4e 76 |Nv | TRAPV 000233fe de fc 00 18 | | ADDA.W #0x18,A7 00023402 48 e7 00 c0 |H | MOVEM.L A1+A0,-(A7) 00023406 41 ee ff f8 |A | LEA.L (A6-0x8),A0 0002340a 43 ee ff fc |C | LEA.L (A6-0x4),A1 0002340e 59 4f |YO | SUBQ.L #0x4,A7 00023410 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023414 48 78 00 01 |Hx | PEA.L 0x1 00023418 4e ba f3 00 |N | JSR 0x2271a 0002341c 50 4f |PO | ADDQ.L #0x8,A7 0002341e 20 97 | | MOVE.L (A7),(A0) 00023420 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023424 48 78 00 02 |Hx | PEA.L 0x2 00023428 4e ba f2 f0 |N | JSR 0x2271a 0002342c 50 4f |PO | ADDQ.L #0x8,A7 0002342e 22 97 |" | MOVE.L (A7),(A1) 00023430 54 4f |TO | ADDQ.L #0x2,A7 00023432 2f 10 |/ | MOVE.L (A0),-(A7) 00023434 2f 11 |/ | MOVE.L (A1),-(A7) 00023436 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 0002343c 50 4f |PO | ADDQ.L #0x8,A7 0002343e 4a 1f |J | TST.B (A7)+ 00023440 67 06 |g | BEQ 0x23448 00023442 4e ba ed 96 |N | JSR 0x221da 00023446 60 04 |` | BRA 0x2344c 00023448 4e ba ed d6 |N | JSR 0x22220 0002344c 48 51 |HQ | PEA.L (A1) 0002344e 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023454 58 4f |XO | ADDQ.L #0x4,A7 00023456 48 50 |HP | PEA.L (A0) 00023458 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002345e 58 4f |XO | ADDQ.L #0x4,A7 00023460 4c df 03 00 |L | MOVEM.L (A7)+,A0+A1 00023464 4e 5e |N^ | UNLK A6 00023466 4e 75 |Nu | RTS 00023468 ; -------------------------------------------------------------------------------------- 00023468 ; OMSI PASCAL Function 00023468 ; <LVAR 0x008 4(r)> 00023468 ; <LVAR -0x004 @ 4(rw)> 00023468 ; <LVAR -0x008 @ 4(rw)> 00023468 ; -------------------------------------------------------------------------------------- 00023468 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 0002346c bf d5 | | CMPA.L (A5),A7 0002346e 62 06 |b | BHI 0x23476 00023470 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023474 4e 76 |Nv | TRAPV 00023476 de fc 00 18 | | ADDA.W #0x18,A7 0002347a 48 e7 00 c0 |H | MOVEM.L A1+A0,-(A7) 0002347e 41 ee ff f8 |A | LEA.L (A6-0x8),A0 00023482 43 ee ff fc |C | LEA.L (A6-0x4),A1 00023486 59 4f |YO | SUBQ.L #0x4,A7 00023488 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002348c 48 78 00 01 |Hx | PEA.L 0x1 00023490 4e ba f2 88 |N | JSR 0x2271a 00023494 50 4f |PO | ADDQ.L #0x8,A7 00023496 20 97 | | MOVE.L (A7),(A0) 00023498 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002349c 48 78 00 02 |Hx | PEA.L 0x2 000234a0 4e ba f2 78 |N x | JSR 0x2271a 000234a4 50 4f |PO | ADDQ.L #0x8,A7 000234a6 22 97 |" | MOVE.L (A7),(A1) 000234a8 54 4f |TO | ADDQ.L #0x2,A7 000234aa 2f 10 |/ | MOVE.L (A0),-(A7) 000234ac 2f 11 |/ | MOVE.L (A1),-(A7) 000234ae 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000234b4 50 4f |PO | ADDQ.L #0x8,A7 000234b6 4a 1f |J | TST.B (A7)+ 000234b8 66 06 |f | BNE 0x234c0 000234ba 4e ba ed 1e |N | JSR 0x221da 000234be 60 04 |` | BRA 0x234c4 000234c0 4e ba ed 5e |N ^ | JSR 0x22220 000234c4 48 51 |HQ | PEA.L (A1) 000234c6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000234cc 58 4f |XO | ADDQ.L #0x4,A7 000234ce 48 50 |HP | PEA.L (A0) 000234d0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000234d6 58 4f |XO | ADDQ.L #0x4,A7 000234d8 4c df 03 00 |L | MOVEM.L (A7)+,A0+A1 000234dc 4e 5e |N^ | UNLK A6 000234de 4e 75 |Nu | RTS 000234e0 ; -------------------------------------------------------------------------------------- 000234e0 ; OMSI PASCAL Function 000234e0 ; <LVAR 0x008 4(r)> 000234e0 ; -------------------------------------------------------------------------------------- 000234e0 4e 56 ff f0 |NV | LINK.W A6,#0xfff0 000234e4 bf d5 | | CMPA.L (A5),A7 000234e6 62 06 |b | BHI 0x234ee 000234e8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000234ec 4e 76 |Nv | TRAPV 000234ee de fc 00 10 | | ADDA.W #0x10,A7 000234f2 59 4f |YO | SUBQ.L #0x4,A7 000234f4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000234f8 48 78 00 01 |Hx | PEA.L 0x1 000234fc 4e ba f2 1c |N | JSR 0x2271a 00023500 50 4f |PO | ADDQ.L #0x8,A7 00023502 4e ba f0 0e |N | JSR 0x22512 00023506 58 4f |XO | ADDQ.L #0x4,A7 00023508 4e 5e |N^ | UNLK A6 0002350a 4e 75 |Nu | RTS 0002350c ; -------------------------------------------------------------------------------------- 0002350c ; OMSI PASCAL Function 0002350c ; <LVAR 0x008 4(r)> 0002350c ; <LVAR -0x014 @ 4(rw)> 0002350c ; -------------------------------------------------------------------------------------- 0002350c 4e 56 ff 90 |NV | LINK.W A6,#0xff90 00023510 bf d5 | | CMPA.L (A5),A7 00023512 62 06 |b | BHI 0x2351a 00023514 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023518 4e 76 |Nv | TRAPV 0002351a de fc 00 5c | \ | ADDA.W #0x5c,A7 0002351e 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00023522 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00023526 47 ee ff ec |G | LEA.L (A6-0x14),A3 0002352a 74 7d |t} | MOVEQ.L #0x7d,D2 0002352c 59 4f |YO | SUBQ.L #0x4,A7 0002352e 2f 12 |/ | MOVE.L (A2),-(A7) 00023530 48 78 00 01 |Hx | PEA.L 0x1 00023534 4e ba f1 e4 |N | JSR 0x2271a 00023538 50 4f |PO | ADDQ.L #0x8,A7 0002353a 26 97 |& | MOVE.L (A7),(A3) 0002353c 2f 12 |/ | MOVE.L (A2),-(A7) 0002353e 48 78 00 02 |Hx | PEA.L 0x2 00023542 4e ba f1 d6 |N | JSR 0x2271a 00023546 50 4f |PO | ADDQ.L #0x8,A7 00023548 28 5f |(_ | MOVEA.L (A7)+,A4 0002354a 9e fc 00 0c | | SUBA.W #0xc,A7 0002354e 2f 12 |/ | MOVE.L (A2),-(A7) 00023550 48 78 00 03 |Hx | PEA.L 0x3 00023554 4e ba f1 f6 |N | JSR 0x2274c 00023558 50 4f |PO | ADDQ.L #0x8,A7 0002355a 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00023560 50 4f |PO | ADDQ.L #0x8,A7 00023562 2c 17 |, | MOVE.L (A7),D6 00023564 51 4f |QO | SUBQ.L #0x8,A7 00023566 2f 12 |/ | MOVE.L (A2),-(A7) 00023568 48 78 00 04 |Hx | PEA.L 0x4 0002356c 4e ba f1 de |N | JSR 0x2274c 00023570 50 4f |PO | ADDQ.L #0x8,A7 00023572 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00023578 50 4f |PO | ADDQ.L #0x8,A7 0002357a 2a 1f |* | MOVE.L (A7)+,D5 0002357c 20 06 | | MOVE.L D6,D0 0002357e d0 85 | | ADD.L D5,D0 00023580 53 80 |S | SUBQ.L #0x1,D0 00023582 32 14 |2 | MOVE.W (A4),D1 00023584 48 c1 |H | EXTW.L D1 00023586 b0 81 | | CMP.L D1,D0 00023588 6f 30 |o0 | BLE 0x235ba 0002358a 9e fc 00 20 | | SUBA.W #0x20,A7 0002358e 20 4f | O | MOVEA.L A7,A0 00023590 43 fa e0 9a |C | LEA.L 0x2162c,A1 00023594 70 1e |p | MOVEQ.L #0x1e,D0 00023596 10 d9 | | MOVE.B (A1)+,(A0)+ 00023598 51 c8 ff fc |Q | DBF D0,0x23596 0002359c 59 4f |YO | SUBQ.L #0x4,A7 0002359e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000235a2 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000235a6 3f 3c 00 1f |?< | MOVE.W #0x1f,-(A7) 000235aa 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000235b0 50 4f |PO | ADDQ.L #0x8,A7 000235b2 4e ba e4 3e |N > | JSR 0x219f2 000235b6 de fc 00 24 | $ | ADDA.W #0x24,A7 000235ba 20 53 | S | MOVEA.L (A3),A0 000235bc 2f 08 |/ | MOVE.L A0,-(A7) 000235be 30 10 |0 | MOVE.W (A0),D0 000235c0 48 c0 |H | EXTW.L D0 000235c2 2f 00 |/ | MOVE.L D0,-(A7) 000235c4 7e 01 |~ | MOVEQ.L #0x01,D7 000235c6 be 97 | | CMP.L (A7),D7 000235c8 6e 26 |n& | BGT 0x235f0 000235ca 20 06 | | MOVE.L D6,D0 000235cc d0 87 | | ADD.L D7,D0 000235ce 53 80 |S | SUBQ.L #0x1,D0 000235d0 53 80 |S | SUBQ.L #0x1,D0 000235d2 b0 82 | | CMP.L D2,D0 000235d4 63 02 |c | BLS 0x235d8 000235d6 4e 4f |NO | TRAP #15 000235d8 22 07 |" | MOVE.L D7,D1 000235da 53 81 |S | SUBQ.L #0x1,D1 000235dc b2 82 | | CMP.L D2,D1 000235de 63 02 |c | BLS 0x235e2 000235e0 4e 4f |NO | TRAP #15 000235e2 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 000235e6 19 b0 18 02 08 02 | | MOVE.B (A0+D1.L+#0x2),(A4+D0.L+#0x2) 000235ec 52 87 |R | ADDQ.L #0x1,D7 000235ee 68 d6 |h | BVC 0x235c6 000235f0 58 4f |XO | ADDQ.L #0x4,A7 000235f2 2e 8c |. | MOVE.L A4,(A7) 000235f4 4e ba f1 c6 |N | JSR 0x227bc 000235f8 58 4f |XO | ADDQ.L #0x4,A7 000235fa 48 53 |HS | PEA.L (A3) 000235fc 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023602 58 4f |XO | ADDQ.L #0x4,A7 00023604 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 00023608 4e 5e |N^ | UNLK A6 0002360a 4e 75 |Nu | RTS 0002360c ; -------------------------------------------------------------------------------------- 0002360c ; OMSI PASCAL Function 0002360c ; <LVAR 0x008 4(r)> 0002360c ; <LVAR -0x010 @ 4(r)> 0002360c ; <LVAR -0x014 @ 4(rw)> 0002360c ; -------------------------------------------------------------------------------------- 0002360c 4e 56 ff a8 |NV | LINK.W A6,#0xffa8 00023610 bf d5 | | CMPA.L (A5),A7 00023612 62 06 |b | BHI 0x2361a 00023614 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023618 4e 76 |Nv | TRAPV 0002361a de fc 00 44 | D | ADDA.W #0x44,A7 0002361e 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00023622 45 ee ff ec |E | LEA.L (A6-0x14),A2 00023626 47 ee ff f0 |G | LEA.L (A6-0x10),A3 0002362a 49 ee 00 08 |I | LEA.L (A6+0x8),A4 0002362e 74 7d |t} | MOVEQ.L #0x7d,D2 00023630 59 4f |YO | SUBQ.L #0x4,A7 00023632 2f 14 |/ | MOVE.L (A4),-(A7) 00023634 48 78 00 01 |Hx | PEA.L 0x1 00023638 4e ba f0 e0 |N | JSR 0x2271a 0002363c 50 4f |PO | ADDQ.L #0x8,A7 0002363e 24 9f |$ | MOVE.L (A7)+,(A2) 00023640 48 53 |HS | PEA.L (A3) 00023642 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00023648 51 4f |QO | SUBQ.L #0x8,A7 0002364a 2f 14 |/ | MOVE.L (A4),-(A7) 0002364c 48 78 00 02 |Hx | PEA.L 0x2 00023650 4e ba f0 fa |N | JSR 0x2274c 00023654 50 4f |PO | ADDQ.L #0x8,A7 00023656 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 0002365c 50 4f |PO | ADDQ.L #0x8,A7 0002365e 2a 17 |* | MOVE.L (A7),D5 00023660 51 4f |QO | SUBQ.L #0x8,A7 00023662 2f 14 |/ | MOVE.L (A4),-(A7) 00023664 48 78 00 03 |Hx | PEA.L 0x3 00023668 4e ba f0 e2 |N | JSR 0x2274c 0002366c 50 4f |PO | ADDQ.L #0x8,A7 0002366e 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00023674 50 4f |PO | ADDQ.L #0x8,A7 00023676 2c 1f |, | MOVE.L (A7)+,D6 00023678 20 52 | R | MOVEA.L (A2),A0 0002367a 20 05 | | MOVE.L D5,D0 0002367c d0 86 | | ADD.L D6,D0 0002367e 53 80 |S | SUBQ.L #0x1,D0 00023680 32 10 |2 | MOVE.W (A0),D1 00023682 48 c1 |H | EXTW.L D1 00023684 b0 81 | | CMP.L D1,D0 00023686 6f 06 |o | BLE 0x2368e 00023688 52 81 |R | ADDQ.L #0x1,D1 0002368a 92 85 | | SUB.L D5,D1 0002368c 2c 01 |, | MOVE.L D1,D6 0002368e 2f 06 |/ | MOVE.L D6,-(A7) 00023690 7e 01 |~ | MOVEQ.L #0x01,D7 00023692 be 97 | | CMP.L (A7),D7 00023694 6e 26 |n& | BGT 0x236bc 00023696 20 53 | S | MOVEA.L (A3),A0 00023698 20 07 | | MOVE.L D7,D0 0002369a 53 80 |S | SUBQ.L #0x1,D0 0002369c b0 82 | | CMP.L D2,D0 0002369e 63 02 |c | BLS 0x236a2 000236a0 4e 4f |NO | TRAP #15 000236a2 22 52 |"R | MOVEA.L (A2),A1 000236a4 22 07 |" | MOVE.L D7,D1 000236a6 d2 85 | | ADD.L D5,D1 000236a8 53 81 |S | SUBQ.L #0x1,D1 000236aa 53 81 |S | SUBQ.L #0x1,D1 000236ac b2 82 | | CMP.L D2,D1 000236ae 63 02 |c | BLS 0x236b2 000236b0 4e 4f |NO | TRAP #15 000236b2 11 b1 18 02 08 02 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x2) 000236b8 52 87 |R | ADDQ.L #0x1,D7 000236ba 68 d6 |h | BVC 0x23692 000236bc 58 4f |XO | ADDQ.L #0x4,A7 000236be 20 53 | S | MOVEA.L (A3),A0 000236c0 04 86 ff ff 80 00 | | SUBI.L #0xffff8000,D6 000236c6 0c 86 00 00 ff ff | | CMPI.L #0x0000ffff,D6 000236cc 63 02 |c | BLS 0x236d0 000236ce 4e 4f |NO | TRAP #15 000236d0 06 86 ff ff 80 00 | | ADDI.L #0xffff8000,D6 000236d6 30 86 |0 | MOVE.W D6,(A0) 000236d8 2f 13 |/ | MOVE.L (A3),-(A7) 000236da 4e ba f0 e0 |N | JSR 0x227bc 000236de 58 4f |XO | ADDQ.L #0x4,A7 000236e0 48 52 |HR | PEA.L (A2) 000236e2 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000236e8 58 4f |XO | ADDQ.L #0x4,A7 000236ea 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 000236ee 4e 5e |N^ | UNLK A6 000236f0 4e 75 |Nu | RTS 000236f2 ; -------------------------------------------------------------------------------------- 000236f2 ; OMSI PASCAL Function 000236f2 ; <LVAR 0x008 4(r)> 000236f2 ; -------------------------------------------------------------------------------------- 000236f2 4e 56 ff ec |NV | LINK.W A6,#0xffec 000236f6 bf d5 | | CMPA.L (A5),A7 000236f8 62 06 |b | BHI 0x23700 000236fa 44 fc 00 02 |D | MOVE.W #0x2,CCR 000236fe 4e 76 |Nv | TRAPV 00023700 de fc 00 14 | | ADDA.W #0x14,A7 00023704 51 4f |QO | SUBQ.L #0x8,A7 00023706 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002370a 48 78 00 01 |Hx | PEA.L 0x1 0002370e 4e ba f0 3c |N < | JSR 0x2274c 00023712 50 4f |PO | ADDQ.L #0x8,A7 00023714 4e ba ee 70 |N p | JSR 0x22586 00023718 50 4f |PO | ADDQ.L #0x8,A7 0002371a 4e 5e |N^ | UNLK A6 0002371c 4e 75 |Nu | RTS 0002371e ; -------------------------------------------------------------------------------------- 0002371e ; OMSI PASCAL Function 0002371e ; <LVAR 0x008 4(r)> 0002371e ; -------------------------------------------------------------------------------------- 0002371e 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00023722 bf d5 | | CMPA.L (A5),A7 00023724 62 06 |b | BHI 0x2372c 00023726 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002372a 4e 76 |Nv | TRAPV 0002372c de fc 00 1e | | ADDA.W #0x1e,A7 00023730 9e fc 00 0a | | SUBA.W #0xa,A7 00023734 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023738 48 78 00 01 |Hx | PEA.L 0x1 0002373c 4e ba f0 0e |N | JSR 0x2274c 00023740 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023744 48 78 00 02 |Hx | PEA.L 0x2 00023748 4e ba f0 02 |N | JSR 0x2274c 0002374c 50 4f |PO | ADDQ.L #0x8,A7 0002374e 4e b9 00 01 03 2c |N , | JSR IsEqual(a, b : Quad) : Bool 00023754 de fc 00 10 | | ADDA.W #0x10,A7 00023758 4a 1f |J | TST.B (A7)+ 0002375a 67 06 |g | BEQ 0x23762 0002375c 4e ba ea 7c |N | | JSR 0x221da 00023760 60 04 |` | BRA 0x23766 00023762 4e ba ea bc |N | JSR 0x22220 00023766 4e 5e |N^ | UNLK A6 00023768 4e 75 |Nu | RTS 0002376a ; -------------------------------------------------------------------------------------- 0002376a ; OMSI PASCAL Function 0002376a ; <LVAR 0x008 4(r)> 0002376a ; -------------------------------------------------------------------------------------- 0002376a 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 0002376e bf d5 | | CMPA.L (A5),A7 00023770 62 06 |b | BHI 0x23778 00023772 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023776 4e 76 |Nv | TRAPV 00023778 de fc 00 1e | | ADDA.W #0x1e,A7 0002377c 9e fc 00 0a | | SUBA.W #0xa,A7 00023780 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023784 48 78 00 01 |Hx | PEA.L 0x1 00023788 4e ba ef c2 |N | JSR 0x2274c 0002378c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023790 48 78 00 02 |Hx | PEA.L 0x2 00023794 4e ba ef b6 |N | JSR 0x2274c 00023798 50 4f |PO | ADDQ.L #0x8,A7 0002379a 4e b9 00 01 03 2c |N , | JSR IsEqual(a, b : Quad) : Bool 000237a0 de fc 00 10 | | ADDA.W #0x10,A7 000237a4 4a 1f |J | TST.B (A7)+ 000237a6 66 06 |f | BNE 0x237ae 000237a8 4e ba ea 30 |N 0 | JSR 0x221da 000237ac 60 04 |` | BRA 0x237b2 000237ae 4e ba ea 70 |N p | JSR 0x22220 000237b2 4e 5e |N^ | UNLK A6 000237b4 4e 75 |Nu | RTS 000237b6 ; -------------------------------------------------------------------------------------- 000237b6 ; OMSI PASCAL Function 000237b6 ; <LVAR 0x008 4(r)> 000237b6 ; -------------------------------------------------------------------------------------- 000237b6 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 000237ba bf d5 | | CMPA.L (A5),A7 000237bc 62 06 |b | BHI 0x237c4 000237be 44 fc 00 02 |D | MOVE.W #0x2,CCR 000237c2 4e 76 |Nv | TRAPV 000237c4 de fc 00 1e | | ADDA.W #0x1e,A7 000237c8 9e fc 00 0a | | SUBA.W #0xa,A7 000237cc 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000237d0 48 78 00 01 |Hx | PEA.L 0x1 000237d4 4e ba ef 76 |N v | JSR 0x2274c 000237d8 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000237dc 48 78 00 02 |Hx | PEA.L 0x2 000237e0 4e ba ef 6a |N j | JSR 0x2274c 000237e4 50 4f |PO | ADDQ.L #0x8,A7 000237e6 4e b9 00 01 03 28 |N ( | JSR IsSmaller(a, b : Quad) : Bool 000237ec de fc 00 10 | | ADDA.W #0x10,A7 000237f0 4a 1f |J | TST.B (A7)+ 000237f2 67 06 |g | BEQ 0x237fa 000237f4 4e ba e9 e4 |N | JSR 0x221da 000237f8 60 04 |` | BRA 0x237fe 000237fa 4e ba ea 24 |N $ | JSR 0x22220 000237fe 4e 5e |N^ | UNLK A6 00023800 4e 75 |Nu | RTS 00023802 ; -------------------------------------------------------------------------------------- 00023802 ; OMSI PASCAL Function 00023802 ; <LVAR 0x008 4(r)> 00023802 ; -------------------------------------------------------------------------------------- 00023802 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00023806 bf d5 | | CMPA.L (A5),A7 00023808 62 06 |b | BHI 0x23810 0002380a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002380e 4e 76 |Nv | TRAPV 00023810 de fc 00 1e | | ADDA.W #0x1e,A7 00023814 9e fc 00 0a | | SUBA.W #0xa,A7 00023818 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002381c 48 78 00 01 |Hx | PEA.L 0x1 00023820 4e ba ef 2a |N * | JSR 0x2274c 00023824 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023828 48 78 00 02 |Hx | PEA.L 0x2 0002382c 4e ba ef 1e |N | JSR 0x2274c 00023830 50 4f |PO | ADDQ.L #0x8,A7 00023832 4e b9 00 01 03 24 |N $ | JSR IsGreater(a, b : Quad) : Bool 00023838 de fc 00 10 | | ADDA.W #0x10,A7 0002383c 4a 1f |J | TST.B (A7)+ 0002383e 67 06 |g | BEQ 0x23846 00023840 4e ba e9 98 |N | JSR 0x221da 00023844 60 04 |` | BRA 0x2384a 00023846 4e ba e9 d8 |N | JSR 0x22220 0002384a 4e 5e |N^ | UNLK A6 0002384c 4e 75 |Nu | RTS 0002384e ; -------------------------------------------------------------------------------------- 0002384e ; OMSI PASCAL Function 0002384e ; <LVAR 0x008 4(r)> 0002384e ; -------------------------------------------------------------------------------------- 0002384e 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00023852 bf d5 | | CMPA.L (A5),A7 00023854 62 06 |b | BHI 0x2385c 00023856 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002385a 4e 76 |Nv | TRAPV 0002385c de fc 00 1e | | ADDA.W #0x1e,A7 00023860 9e fc 00 0a | | SUBA.W #0xa,A7 00023864 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023868 48 78 00 01 |Hx | PEA.L 0x1 0002386c 4e ba ee de |N | JSR 0x2274c 00023870 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023874 48 78 00 02 |Hx | PEA.L 0x2 00023878 4e ba ee d2 |N | JSR 0x2274c 0002387c 50 4f |PO | ADDQ.L #0x8,A7 0002387e 4e b9 00 01 03 24 |N $ | JSR IsGreater(a, b : Quad) : Bool 00023884 de fc 00 10 | | ADDA.W #0x10,A7 00023888 4a 1f |J | TST.B (A7)+ 0002388a 66 06 |f | BNE 0x23892 0002388c 4e ba e9 4c |N L | JSR 0x221da 00023890 60 04 |` | BRA 0x23896 00023892 4e ba e9 8c |N | JSR 0x22220 00023896 4e 5e |N^ | UNLK A6 00023898 4e 75 |Nu | RTS 0002389a ; -------------------------------------------------------------------------------------- 0002389a ; OMSI PASCAL Function 0002389a ; <LVAR 0x008 4(r)> 0002389a ; -------------------------------------------------------------------------------------- 0002389a 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 0002389e bf d5 | | CMPA.L (A5),A7 000238a0 62 06 |b | BHI 0x238a8 000238a2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000238a6 4e 76 |Nv | TRAPV 000238a8 de fc 00 1e | | ADDA.W #0x1e,A7 000238ac 9e fc 00 0a | | SUBA.W #0xa,A7 000238b0 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000238b4 48 78 00 01 |Hx | PEA.L 0x1 000238b8 4e ba ee 92 |N | JSR 0x2274c 000238bc 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000238c0 48 78 00 02 |Hx | PEA.L 0x2 000238c4 4e ba ee 86 |N | JSR 0x2274c 000238c8 50 4f |PO | ADDQ.L #0x8,A7 000238ca 4e b9 00 01 03 28 |N ( | JSR IsSmaller(a, b : Quad) : Bool 000238d0 de fc 00 10 | | ADDA.W #0x10,A7 000238d4 4a 1f |J | TST.B (A7)+ 000238d6 66 06 |f | BNE 0x238de 000238d8 4e ba e9 00 |N | JSR 0x221da 000238dc 60 04 |` | BRA 0x238e2 000238de 4e ba e9 40 |N @ | JSR 0x22220 000238e2 4e 5e |N^ | UNLK A6 000238e4 4e 75 |Nu | RTS 000238e6 ; -------------------------------------------------------------------------------------- 000238e6 ; OMSI PASCAL Function 000238e6 ; <LVAR 0x008 4(r)> 000238e6 ; -------------------------------------------------------------------------------------- 000238e6 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 000238ea bf d5 | | CMPA.L (A5),A7 000238ec 62 06 |b | BHI 0x238f4 000238ee 44 fc 00 02 |D | MOVE.W #0x2,CCR 000238f2 4e 76 |Nv | TRAPV 000238f4 de fc 00 28 | ( | ADDA.W #0x28,A7 000238f8 48 e7 80 00 |H | MOVEM.L D0,-(A7) 000238fc 70 10 |p | MOVEQ.L #0x10,D0 000238fe 9e c0 | | SUBA.W D0,A7 00023900 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023904 48 78 00 01 |Hx | PEA.L 0x1 00023908 4e ba ee 42 |N B | JSR 0x2274c 0002390c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023910 48 78 00 02 |Hx | PEA.L 0x2 00023914 4e ba ee 36 |N 6 | JSR 0x2274c 00023918 50 4f |PO | ADDQ.L #0x8,A7 0002391a 4e b9 00 01 03 14 |N | JSR Add(a, b : Quad) : Quad 00023920 de c0 | | ADDA.W D0,A7 00023922 4e ba ef 20 |N | JSR 0x22844 00023926 50 4f |PO | ADDQ.L #0x8,A7 00023928 4c df 00 01 |L | MOVEM.L (A7)+,D0 0002392c 4e 5e |N^ | UNLK A6 0002392e 4e 75 |Nu | RTS 00023930 ; -------------------------------------------------------------------------------------- 00023930 ; OMSI PASCAL Function 00023930 ; <LVAR 0x008 4(r)> 00023930 ; -------------------------------------------------------------------------------------- 00023930 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023934 bf d5 | | CMPA.L (A5),A7 00023936 62 06 |b | BHI 0x2393e 00023938 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002393c 4e 76 |Nv | TRAPV 0002393e de fc 00 28 | ( | ADDA.W #0x28,A7 00023942 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023946 70 10 |p | MOVEQ.L #0x10,D0 00023948 9e c0 | | SUBA.W D0,A7 0002394a 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002394e 48 78 00 01 |Hx | PEA.L 0x1 00023952 4e ba ed f8 |N | JSR 0x2274c 00023956 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002395a 48 78 00 02 |Hx | PEA.L 0x2 0002395e 4e ba ed ec |N | JSR 0x2274c 00023962 50 4f |PO | ADDQ.L #0x8,A7 00023964 4e b9 00 01 03 18 |N | JSR Subtract(a, b : Quad) : Quad 0002396a de c0 | | ADDA.W D0,A7 0002396c 4e ba ee d6 |N | JSR 0x22844 00023970 50 4f |PO | ADDQ.L #0x8,A7 00023972 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023976 4e 5e |N^ | UNLK A6 00023978 4e 75 |Nu | RTS 0002397a ; -------------------------------------------------------------------------------------- 0002397a ; OMSI PASCAL Function 0002397a ; <LVAR 0x008 4(r)> 0002397a ; -------------------------------------------------------------------------------------- 0002397a 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 0002397e bf d5 | | CMPA.L (A5),A7 00023980 62 06 |b | BHI 0x23988 00023982 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023986 4e 76 |Nv | TRAPV 00023988 de fc 00 28 | ( | ADDA.W #0x28,A7 0002398c 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023990 70 10 |p | MOVEQ.L #0x10,D0 00023992 9e c0 | | SUBA.W D0,A7 00023994 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023998 48 78 00 01 |Hx | PEA.L 0x1 0002399c 4e ba ed ae |N | JSR 0x2274c 000239a0 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000239a4 48 78 00 02 |Hx | PEA.L 0x2 000239a8 4e ba ed a2 |N | JSR 0x2274c 000239ac 50 4f |PO | ADDQ.L #0x8,A7 000239ae 4e b9 00 01 03 1c |N | JSR Multiply(a, b : Quad) : Quad 000239b4 de c0 | | ADDA.W D0,A7 000239b6 4e ba ee 8c |N | JSR 0x22844 000239ba 50 4f |PO | ADDQ.L #0x8,A7 000239bc 4c df 00 01 |L | MOVEM.L (A7)+,D0 000239c0 4e 5e |N^ | UNLK A6 000239c2 4e 75 |Nu | RTS 000239c4 ; -------------------------------------------------------------------------------------- 000239c4 ; OMSI PASCAL Function 000239c4 ; <LVAR 0x008 4(r)> 000239c4 ; -------------------------------------------------------------------------------------- 000239c4 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 000239c8 bf d5 | | CMPA.L (A5),A7 000239ca 62 06 |b | BHI 0x239d2 000239cc 44 fc 00 02 |D | MOVE.W #0x2,CCR 000239d0 4e 76 |Nv | TRAPV 000239d2 de fc 00 28 | ( | ADDA.W #0x28,A7 000239d6 48 e7 80 00 |H | MOVEM.L D0,-(A7) 000239da 70 10 |p | MOVEQ.L #0x10,D0 000239dc 9e c0 | | SUBA.W D0,A7 000239de 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000239e2 48 78 00 01 |Hx | PEA.L 0x1 000239e6 4e ba ed 64 |N d | JSR 0x2274c 000239ea 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000239ee 48 78 00 02 |Hx | PEA.L 0x2 000239f2 4e ba ed 58 |N X | JSR 0x2274c 000239f6 50 4f |PO | ADDQ.L #0x8,A7 000239f8 4e b9 00 01 03 20 |N | JSR Divide(a, b : Quad) : Quad 000239fe de c0 | | ADDA.W D0,A7 00023a00 4e ba ee 42 |N B | JSR 0x22844 00023a04 50 4f |PO | ADDQ.L #0x8,A7 00023a06 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023a0a 4e 5e |N^ | UNLK A6 00023a0c 4e 75 |Nu | RTS 00023a0e ; -------------------------------------------------------------------------------------- 00023a0e ; OMSI PASCAL Function 00023a0e ; <LVAR 0x008 4(r)> 00023a0e ; -------------------------------------------------------------------------------------- 00023a0e 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023a12 bf d5 | | CMPA.L (A5),A7 00023a14 62 06 |b | BHI 0x23a1c 00023a16 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023a1a 4e 76 |Nv | TRAPV 00023a1c de fc 00 28 | ( | ADDA.W #0x28,A7 00023a20 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023a24 70 10 |p | MOVEQ.L #0x10,D0 00023a26 9e c0 | | SUBA.W D0,A7 00023a28 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023a2c 48 78 00 01 |Hx | PEA.L 0x1 00023a30 4e ba ed 1a |N | JSR 0x2274c 00023a34 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023a38 48 78 00 02 |Hx | PEA.L 0x2 00023a3c 4e ba ed 0e |N | JSR 0x2274c 00023a40 50 4f |PO | ADDQ.L #0x8,A7 00023a42 4e b9 00 01 03 58 |N X | JSR Modulus(a, b : Quad) : Quad 00023a48 de c0 | | ADDA.W D0,A7 00023a4a 4e ba ed f8 |N | JSR 0x22844 00023a4e 50 4f |PO | ADDQ.L #0x8,A7 00023a50 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023a54 4e 5e |N^ | UNLK A6 00023a56 4e 75 |Nu | RTS 00023a58 ; -------------------------------------------------------------------------------------- 00023a58 ; OMSI PASCAL Function 00023a58 ; <LVAR 0x008 4(r)> 00023a58 ; -------------------------------------------------------------------------------------- 00023a58 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023a5c bf d5 | | CMPA.L (A5),A7 00023a5e 62 06 |b | BHI 0x23a66 00023a60 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023a64 4e 76 |Nv | TRAPV 00023a66 de fc 00 28 | ( | ADDA.W #0x28,A7 00023a6a 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023a6e 70 10 |p | MOVEQ.L #0x10,D0 00023a70 9e c0 | | SUBA.W D0,A7 00023a72 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023a76 48 78 00 01 |Hx | PEA.L 0x1 00023a7a 4e ba ec d0 |N | JSR 0x2274c 00023a7e 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023a82 48 78 00 02 |Hx | PEA.L 0x2 00023a86 4e ba ec c4 |N | JSR 0x2274c 00023a8a 50 4f |PO | ADDQ.L #0x8,A7 00023a8c 4e b9 00 01 03 34 |N 4 | JSR BitOr(a, b : Quad) : Quad 00023a92 de c0 | | ADDA.W D0,A7 00023a94 4e ba ed ae |N | JSR 0x22844 00023a98 50 4f |PO | ADDQ.L #0x8,A7 00023a9a 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023a9e 4e 5e |N^ | UNLK A6 00023aa0 4e 75 |Nu | RTS 00023aa2 ; -------------------------------------------------------------------------------------- 00023aa2 ; OMSI PASCAL Function 00023aa2 ; <LVAR 0x008 4(r)> 00023aa2 ; -------------------------------------------------------------------------------------- 00023aa2 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 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 28 | ( | ADDA.W #0x28,A7 00023ab4 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023ab8 70 10 |p | MOVEQ.L #0x10,D0 00023aba 9e c0 | | SUBA.W D0,A7 00023abc 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023ac0 48 78 00 01 |Hx | PEA.L 0x1 00023ac4 4e ba ec 86 |N | JSR 0x2274c 00023ac8 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023acc 48 78 00 02 |Hx | PEA.L 0x2 00023ad0 4e ba ec 7a |N z | JSR 0x2274c 00023ad4 50 4f |PO | ADDQ.L #0x8,A7 00023ad6 4e b9 00 01 03 30 |N 0 | JSR BitAnd(a, b : Quad) : Quad 00023adc de c0 | | ADDA.W D0,A7 00023ade 4e ba ed 64 |N d | JSR 0x22844 00023ae2 50 4f |PO | ADDQ.L #0x8,A7 00023ae4 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023ae8 4e 5e |N^ | UNLK A6 00023aea 4e 75 |Nu | RTS 00023aec ; -------------------------------------------------------------------------------------- 00023aec ; OMSI PASCAL Function 00023aec ; <LVAR 0x008 4(r)> 00023aec ; -------------------------------------------------------------------------------------- 00023aec 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023af0 bf d5 | | CMPA.L (A5),A7 00023af2 62 06 |b | BHI 0x23afa 00023af4 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023af8 4e 76 |Nv | TRAPV 00023afa de fc 00 28 | ( | ADDA.W #0x28,A7 00023afe 48 e7 80 00 |H | MOVEM.L D0,-(A7) 00023b02 70 10 |p | MOVEQ.L #0x10,D0 00023b04 9e c0 | | SUBA.W D0,A7 00023b06 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023b0a 48 78 00 01 |Hx | PEA.L 0x1 00023b0e 4e ba ec 3c |N < | JSR 0x2274c 00023b12 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023b16 48 78 00 02 |Hx | PEA.L 0x2 00023b1a 4e ba ec 30 |N 0 | JSR 0x2274c 00023b1e 50 4f |PO | ADDQ.L #0x8,A7 00023b20 4e b9 00 01 03 40 |N @ | JSR BitXor(a, b : Quad) : Quad 00023b26 de c0 | | ADDA.W D0,A7 00023b28 4e ba ed 1a |N | JSR 0x22844 00023b2c 50 4f |PO | ADDQ.L #0x8,A7 00023b2e 4c df 00 01 |L | MOVEM.L (A7)+,D0 00023b32 4e 5e |N^ | UNLK A6 00023b34 4e 75 |Nu | RTS 00023b36 ; -------------------------------------------------------------------------------------- 00023b36 ; OMSI PASCAL Function 00023b36 ; <LVAR 0x008 4(r)> 00023b36 ; -------------------------------------------------------------------------------------- 00023b36 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00023b3a bf d5 | | CMPA.L (A5),A7 00023b3c 62 06 |b | BHI 0x23b44 00023b3e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023b42 4e 76 |Nv | TRAPV 00023b44 de fc 00 20 | | ADDA.W #0x20,A7 00023b48 9e fc 00 10 | | SUBA.W #0x10,A7 00023b4c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023b50 48 78 00 01 |Hx | PEA.L 0x1 00023b54 4e ba eb f6 |N | JSR 0x2274c 00023b58 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00023b5c 48 78 00 02 |Hx | PEA.L 0x2 00023b60 4e ba ec 26 |N & | JSR 0x22788 00023b64 50 4f |PO | ADDQ.L #0x8,A7 00023b66 4e b9 00 01 03 44 |N D | JSR BitShift(a : Quad ; howmuch : integer) : Quad 00023b6c de fc 00 0c | | ADDA.W #0xc,A7 00023b70 4e ba ec d2 |N | JSR 0x22844 00023b74 50 4f |PO | ADDQ.L #0x8,A7 00023b76 4e 5e |N^ | UNLK A6 00023b78 4e 75 |Nu | RTS 00023b7a ; -------------------------------------------------------------------------------------- 00023b7a ; OMSI PASCAL Function 00023b7a ; <LVAR 0x008 4(r)> 00023b7a ; -------------------------------------------------------------------------------------- 00023b7a 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00023b7e bf d5 | | CMPA.L (A5),A7 00023b80 62 06 |b | BHI 0x23b88 00023b82 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023b86 4e 76 |Nv | TRAPV 00023b88 de fc 00 20 | | ADDA.W #0x20,A7 00023b8c 9e fc 00 10 | | SUBA.W #0x10,A7 00023b90 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023b94 48 78 00 01 |Hx | PEA.L 0x1 00023b98 4e ba eb b2 |N | JSR 0x2274c 00023b9c 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00023ba0 48 78 00 02 |Hx | PEA.L 0x2 00023ba4 4e ba eb e2 |N | JSR 0x22788 00023ba8 50 4f |PO | ADDQ.L #0x8,A7 00023baa 44 97 |D | NEG.L (A7) 00023bac 4e b9 00 01 03 44 |N D | JSR BitShift(a : Quad ; howmuch : integer) : Quad 00023bb2 de fc 00 0c | | ADDA.W #0xc,A7 00023bb6 4e ba ec 8c |N | JSR 0x22844 00023bba 50 4f |PO | ADDQ.L #0x8,A7 00023bbc 4e 5e |N^ | UNLK A6 00023bbe 4e 75 |Nu | RTS 00023bc0 ; -------------------------------------------------------------------------------------- 00023bc0 ; OMSI PASCAL Function 00023bc0 ; <LVAR 0x008 4(r)> 00023bc0 ; -------------------------------------------------------------------------------------- 00023bc0 4e 56 ff e4 |NV | LINK.W A6,#0xffe4 00023bc4 bf d5 | | CMPA.L (A5),A7 00023bc6 62 06 |b | BHI 0x23bce 00023bc8 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023bcc 4e 76 |Nv | TRAPV 00023bce de fc 00 1c | | ADDA.W #0x1c,A7 00023bd2 9e fc 00 10 | | SUBA.W #0x10,A7 00023bd6 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023bda 48 78 00 01 |Hx | PEA.L 0x1 00023bde 4e ba eb 6c |N l | JSR 0x2274c 00023be2 50 4f |PO | ADDQ.L #0x8,A7 00023be4 4e b9 00 01 03 38 |N 8 | JSR BitNot(a : Quad) : Quad 00023bea 50 4f |PO | ADDQ.L #0x8,A7 00023bec 4e ba ec 56 |N V | JSR 0x22844 00023bf0 50 4f |PO | ADDQ.L #0x8,A7 00023bf2 4e 5e |N^ | UNLK A6 00023bf4 4e 75 |Nu | RTS 00023bf6 ; -------------------------------------------------------------------------------------- 00023bf6 ; OMSI PASCAL Function 00023bf6 ; <LVAR 0x008 4(r)> 00023bf6 ; <LVAR -0x00c 4(rw)> 00023bf6 ; <LVAR -0x010 4(rw)> 00023bf6 ; <LVAR -0x014 4(rw)> 00023bf6 ; <LVAR -0x018 4(rw)> 00023bf6 ; -------------------------------------------------------------------------------------- 00023bf6 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 00023bfa bf d5 | | CMPA.L (A5),A7 00023bfc 62 06 |b | BHI 0x23c04 00023bfe 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023c02 4e 76 |Nv | TRAPV 00023c04 de fc 00 30 | 0 | ADDA.W #0x30,A7 00023c08 48 e7 03 80 |H | MOVEM.L A0+D7+D6,-(A7) 00023c0c 41 ee 00 08 |A | LEA.L (A6+0x8),A0 00023c10 51 4f |QO | SUBQ.L #0x8,A7 00023c12 2f 10 |/ | MOVE.L (A0),-(A7) 00023c14 48 78 00 01 |Hx | PEA.L 0x1 00023c18 4e ba eb 32 |N 2 | JSR 0x2274c 00023c1c 50 4f |PO | ADDQ.L #0x8,A7 00023c1e 2d 5f ff e8 |-_ | MOVE.L (A7)+,(A6-0x18) 00023c22 2d 57 ff ec |-W | MOVE.L (A7),(A6-0x14) 00023c26 59 4f |YO | SUBQ.L #0x4,A7 00023c28 2f 10 |/ | MOVE.L (A0),-(A7) 00023c2a 48 78 00 02 |Hx | PEA.L 0x2 00023c2e 4e ba eb 1c |N | JSR 0x2274c 00023c32 50 4f |PO | ADDQ.L #0x8,A7 00023c34 2d 5f ff f0 |-_ | MOVE.L (A7)+,(A6-0x10) 00023c38 2d 57 ff f4 |-W | MOVE.L (A7),(A6-0xc) 00023c3c 2f 10 |/ | MOVE.L (A0),-(A7) 00023c3e 48 78 00 03 |Hx | PEA.L 0x3 00023c42 4e ba eb 44 |N D | JSR 0x22788 00023c46 50 4f |PO | ADDQ.L #0x8,A7 00023c48 2e 17 |. | MOVE.L (A7),D7 00023c4a 2f 10 |/ | MOVE.L (A0),-(A7) 00023c4c 48 78 00 04 |Hx | PEA.L 0x4 00023c50 4e ba eb 36 |N 6 | JSR 0x22788 00023c54 50 4f |PO | ADDQ.L #0x8,A7 00023c56 2c 17 |, | MOVE.L (A7),D6 00023c58 59 4f |YO | SUBQ.L #0x4,A7 00023c5a 2f 2e ff ec |/. | MOVE.L (A6-0x14),-(A7) 00023c5e 2f 2e ff e8 |/. | MOVE.L (A6-0x18),-(A7) 00023c62 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00023c66 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 00023c6a 2f 07 |/ | MOVE.L D7,-(A7) 00023c6c 2f 06 |/ | MOVE.L D6,-(A7) 00023c6e 4e b9 00 01 03 48 |N H | JSR ?BitField_something_() 00023c74 de fc 00 18 | | ADDA.W #0x18,A7 00023c78 4e ba eb ca |N | JSR 0x22844 00023c7c 50 4f |PO | ADDQ.L #0x8,A7 00023c7e 4c df 01 c0 |L | MOVEM.L (A7)+,D6+D7+A0 00023c82 4e 5e |N^ | UNLK A6 00023c84 4e 75 |Nu | RTS 00023c86 ; -------------------------------------------------------------------------------------- 00023c86 ; OMSI PASCAL Function 00023c86 ; <LVAR 0x008 4(r)> 00023c86 ; <LVAR -0x00c 4(rw)> 00023c86 ; <LVAR -0x010 4(rw)> 00023c86 ; -------------------------------------------------------------------------------------- 00023c86 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00023c8a bf d5 | | CMPA.L (A5),A7 00023c8c 62 06 |b | BHI 0x23c94 00023c8e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023c92 4e 76 |Nv | TRAPV 00023c94 de fc 00 28 | ( | ADDA.W #0x28,A7 00023c98 48 e7 03 80 |H | MOVEM.L A0+D7+D6,-(A7) 00023c9c 41 ee 00 08 |A | LEA.L (A6+0x8),A0 00023ca0 51 4f |QO | SUBQ.L #0x8,A7 00023ca2 2f 10 |/ | MOVE.L (A0),-(A7) 00023ca4 48 78 00 01 |Hx | PEA.L 0x1 00023ca8 4e ba ea a2 |N | JSR 0x2274c 00023cac 50 4f |PO | ADDQ.L #0x8,A7 00023cae 2d 5f ff f0 |-_ | MOVE.L (A7)+,(A6-0x10) 00023cb2 2d 57 ff f4 |-W | MOVE.L (A7),(A6-0xc) 00023cb6 2f 10 |/ | MOVE.L (A0),-(A7) 00023cb8 48 78 00 02 |Hx | PEA.L 0x2 00023cbc 4e ba ea ca |N | JSR 0x22788 00023cc0 50 4f |PO | ADDQ.L #0x8,A7 00023cc2 2e 17 |. | MOVE.L (A7),D7 00023cc4 2f 10 |/ | MOVE.L (A0),-(A7) 00023cc6 48 78 00 03 |Hx | PEA.L 0x3 00023cca 4e ba ea bc |N | JSR 0x22788 00023cce 50 4f |PO | ADDQ.L #0x8,A7 00023cd0 2c 17 |, | MOVE.L (A7),D6 00023cd2 59 4f |YO | SUBQ.L #0x4,A7 00023cd4 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 00023cd8 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 00023cdc 2f 07 |/ | MOVE.L D7,-(A7) 00023cde 2f 06 |/ | MOVE.L D6,-(A7) 00023ce0 4e b9 00 01 03 4c |N L | JSR FSCALL_1034c 00023ce6 de fc 00 10 | | ADDA.W #0x10,A7 00023cea 4e ba eb 58 |N X | JSR 0x22844 00023cee 50 4f |PO | ADDQ.L #0x8,A7 00023cf0 4c df 01 c0 |L | MOVEM.L (A7)+,D6+D7+A0 00023cf4 4e 5e |N^ | UNLK A6 00023cf6 4e 75 |Nu | RTS 00023cf8 ; -------------------------------------------------------------------------------------- 00023cf8 ; OMSI PASCAL Function 00023cf8 ; <LVAR 0x008 4(r)> 00023cf8 ; -------------------------------------------------------------------------------------- 00023cf8 4e 56 ff d8 |NV | LINK.W A6,#0xffd8 00023cfc bf d5 | | CMPA.L (A5),A7 00023cfe 62 06 |b | BHI 0x23d06 00023d00 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023d04 4e 76 |Nv | TRAPV 00023d06 de fc 00 20 | | ADDA.W #0x20,A7 00023d0a 48 e7 01 08 |H | MOVEM.L A4+D7,-(A7) 00023d0e 59 4f |YO | SUBQ.L #0x4,A7 00023d10 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023d14 4e ba e0 e8 |N | JSR 0x21dfe 00023d18 58 4f |XO | ADDQ.L #0x4,A7 00023d1a 7e 01 |~ | MOVEQ.L #0x01,D7 00023d1c be 97 | | CMP.L (A7),D7 00023d1e 6e 26 |n& | BGT 0x23d46 00023d20 59 4f |YO | SUBQ.L #0x4,A7 00023d22 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023d26 2f 07 |/ | MOVE.L D7,-(A7) 00023d28 4e ba e9 f0 |N | JSR 0x2271a 00023d2c 50 4f |PO | ADDQ.L #0x8,A7 00023d2e 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00023d34 54 4f |TO | ADDQ.L #0x2,A7 00023d36 1e bc 00 20 | | MOVE.B #0x20,(A7) 00023d3a 4e b9 00 01 03 d0 |N | JSR WriteConsoleChar(chr : char) 00023d40 54 4f |TO | ADDQ.L #0x2,A7 00023d42 52 87 |R | ADDQ.L #0x1,D7 00023d44 68 d6 |h | BVC 0x23d1c 00023d46 48 78 00 01 |Hx | PEA.L 0x1 00023d4a 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 00023d50 58 4f |XO | ADDQ.L #0x4,A7 00023d52 28 5f |(_ | MOVEA.L (A7)+,A4 00023d54 2f 0c |/ | MOVE.L A4,-(A7) 00023d56 4e ba de f2 |N | JSR 0x21c4a 00023d5a 2e 8c |. | MOVE.L A4,(A7) 00023d5c 4e ba ea 5e |N ^ | JSR 0x227bc 00023d60 58 4f |XO | ADDQ.L #0x4,A7 00023d62 4c df 10 80 |L | MOVEM.L (A7)+,D7+A4 00023d66 4e 5e |N^ | UNLK A6 00023d68 4e 75 |Nu | RTS 00023d6a ; -------------------------------------------------------------------------------------- 00023d6a ; OMSI PASCAL Function 00023d6a ; <LVAR 0x008 4(r)> 00023d6a ; -------------------------------------------------------------------------------------- 00023d6a 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00023d6e bf d5 | | CMPA.L (A5),A7 00023d70 62 06 |b | BHI 0x23d78 00023d72 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023d76 4e 76 |Nv | TRAPV 00023d78 de fc 00 2c | , | ADDA.W #0x2c,A7 00023d7c 48 e7 83 88 |H | MOVEM.L A4+A0+D7+D6+D0,-(A7) 00023d80 41 ee 00 08 |A | LEA.L (A6+0x8),A0 00023d84 70 0c |p | MOVEQ.L #0x0c,D0 00023d86 59 4f |YO | SUBQ.L #0x4,A7 00023d88 2f 10 |/ | MOVE.L (A0),-(A7) 00023d8a 48 78 00 01 |Hx | PEA.L 0x1 00023d8e 4e ba e9 8a |N | JSR 0x2271a 00023d92 50 4f |PO | ADDQ.L #0x8,A7 00023d94 28 5f |(_ | MOVEA.L (A7)+,A4 00023d96 9e c0 | | SUBA.W D0,A7 00023d98 2f 10 |/ | MOVE.L (A0),-(A7) 00023d9a 48 78 00 02 |Hx | PEA.L 0x2 00023d9e 4e ba e9 ac |N | JSR 0x2274c 00023da2 50 4f |PO | ADDQ.L #0x8,A7 00023da4 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00023daa 50 4f |PO | ADDQ.L #0x8,A7 00023dac 2e 17 |. | MOVE.L (A7),D7 00023dae 51 4f |QO | SUBQ.L #0x8,A7 00023db0 2f 10 |/ | MOVE.L (A0),-(A7) 00023db2 48 78 00 03 |Hx | PEA.L 0x3 00023db6 4e ba e9 94 |N | JSR 0x2274c 00023dba 50 4f |PO | ADDQ.L #0x8,A7 00023dbc 4e b9 00 01 03 50 |N P | JSR Quad2Long(a : Quad) : Long 00023dc2 50 4f |PO | ADDQ.L #0x8,A7 00023dc4 2c 17 |, | MOVE.L (A7),D6 00023dc6 51 4f |QO | SUBQ.L #0x8,A7 00023dc8 2f 0c |/ | MOVE.L A4,-(A7) 00023dca 2f 07 |/ | MOVE.L D7,-(A7) 00023dcc 4e b9 00 01 03 60 |N ` | JSR ?StringToInt64() 00023dd2 58 4f |XO | ADDQ.L #0x4,A7 00023dd4 2e 86 |. | MOVE.L D6,(A7) 00023dd6 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 00023ddc de c0 | | ADDA.W D0,A7 00023dde 4e ba e9 dc |N | JSR 0x227bc 00023de2 58 4f |XO | ADDQ.L #0x4,A7 00023de4 4c df 11 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A4 00023de8 4e 5e |N^ | UNLK A6 00023dea 4e 75 |Nu | RTS 00023dec ; -------------------------------------------------------------------------------------- 00023dec ; OMSI PASCAL Function 00023dec ; <LVAR 0x008 4(r)> 00023dec ; <LVAR -0x00a 2(r)> 00023dec ; <LVAR -0x00c 4(rw)> 00023dec ; <LVAR -0x010 4(rw)> 00023dec ; -------------------------------------------------------------------------------------- 00023dec 4e 56 ff bc |NV | LINK.W A6,#0xffbc 00023df0 bf d5 | | CMPA.L (A5),A7 00023df2 62 06 |b | BHI 0x23dfa 00023df4 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023df8 4e 76 |Nv | TRAPV 00023dfa de fc 00 34 | 4 | ADDA.W #0x34,A7 00023dfe 48 e7 c3 c0 |H | MOVEM.L A1+A0+D7+D6+D1+D0,-(A7) 00023e02 41 ee ff f0 |A | LEA.L (A6-0x10),A0 00023e06 43 ee ff f4 |C | LEA.L (A6-0xc),A1 00023e0a 51 4f |QO | SUBQ.L #0x8,A7 00023e0c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023e10 48 78 00 01 |Hx | PEA.L 0x1 00023e14 4e ba e9 36 |N 6 | JSR 0x2274c 00023e18 50 4f |PO | ADDQ.L #0x8,A7 00023e1a 20 9f | | MOVE.L (A7)+,(A0) 00023e1c 22 9f |" | MOVE.L (A7)+,(A1) 00023e1e 7e 00 |~ | MOVEQ.L #0x00,D7 00023e20 7c 00 || | MOVEQ.L #0x00,D6 00023e22 30 2e ff f6 |0. | MOVE.W (A6-0xa),D0 00023e26 02 40 00 01 | @ | ANDI.W #0x0001,D0 00023e2a 42 81 |B | CLR.L D1 00023e2c 32 00 |2 | MOVE.W D0,D1 00023e2e de 81 | | ADD.L D1,D7 00023e30 51 4f |QO | SUBQ.L #0x8,A7 00023e32 2f 11 |/ | MOVE.L (A1),-(A7) 00023e34 2f 10 |/ | MOVE.L (A0),-(A7) 00023e36 48 78 ff ff |Hx | PEA.L 0xffffffff 00023e3a 4e b9 00 01 03 44 |N D | JSR BitShift(a : Quad ; howmuch : integer) : Quad 00023e40 de fc 00 0c | | ADDA.W #0xc,A7 00023e44 20 9f | | MOVE.L (A7)+,(A0) 00023e46 22 9f |" | MOVE.L (A7)+,(A1) 00023e48 52 86 |R | ADDQ.L #0x1,D6 00023e4a 0c 86 00 00 00 3f | ? | CMPI.L #0x0000003f,D6 00023e50 6f d0 |o | BLE 0x23e22 00023e52 51 4f |QO | SUBQ.L #0x8,A7 00023e54 2f 07 |/ | MOVE.L D7,-(A7) 00023e56 4e b9 00 01 03 54 |N T | JSR Long2Quad(a : Long) : Quad 00023e5c 58 4f |XO | ADDQ.L #0x4,A7 00023e5e 4e ba e9 e4 |N | JSR 0x22844 00023e62 50 4f |PO | ADDQ.L #0x8,A7 00023e64 4c df 03 c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0+A1 00023e68 4e 5e |N^ | UNLK A6 00023e6a 4e 75 |Nu | RTS 00023e6c ; -------------------------------------------------------------------------------------- 00023e6c ; OMSI PASCAL Function 00023e6c ; <LVAR 0x008 4(r)> 00023e6c ; <LVAR -0x004 @ 1(r)> 00023e6c ; -------------------------------------------------------------------------------------- 00023e6c 4e 56 ff b8 |NV | LINK.W A6,#0xffb8 00023e70 bf d5 | | CMPA.L (A5),A7 00023e72 62 06 |b | BHI 0x23e7a 00023e74 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023e78 4e 76 |Nv | TRAPV 00023e7a de fc 00 44 | D | ADDA.W #0x44,A7 00023e7e 48 e7 e0 e0 |H | MOVEM.L A2+A1+A0+D2+D1+D0,-(A7) 00023e82 45 f9 00 02 65 4a |E eJ | LEA.L 0x2654a,A2 00023e88 72 01 |r | MOVEQ.L #0x01,D1 00023e8a 74 00 |t | MOVEQ.L #0x00,D2 00023e8c 4a 12 |J | TST.B (A2) 00023e8e 66 32 |f2 | BNE 0x23ec2 00023e90 9e fc 00 1c | | SUBA.W #0x1c,A7 00023e94 20 4f | O | MOVEA.L A7,A0 00023e96 43 fa d7 b4 |C | LEA.L 0x2164c,A1 00023e9a 70 1a |p | MOVEQ.L #0x1a,D0 00023e9c 10 d9 | | MOVE.B (A1)+,(A0)+ 00023e9e 51 c8 ff fc |Q | DBF D0,0x23e9c 00023ea2 59 4f |YO | SUBQ.L #0x4,A7 00023ea4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023ea8 3f 01 |? | MOVE.W D1,-(A7) 00023eaa 3f 3c 00 1b |?< | MOVE.W #0x1b,-(A7) 00023eae 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023eb4 50 4f |PO | ADDQ.L #0x8,A7 00023eb6 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00023ebc de fc 00 20 | | ADDA.W #0x20,A7 00023ec0 14 81 | | MOVE.B D1,(A2) 00023ec2 5d 4f |]O | SUBQ.L #0x6,A7 00023ec4 4e b9 00 01 03 f8 |N | JSR GetConsoleConfig() : Long 00023eca 20 1f | | MOVE.L (A7)+,D0 00023ecc 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00023ed2 63 02 |c | BLS 0x23ed6 00023ed4 4e 4f |NO | TRAP #15 00023ed6 3e 80 |> | MOVE.W D0,(A7) 00023ed8 48 6e ff fc |Hn | PEA.L (A6-0x4) 00023edc 4e b9 00 01 02 12 |N | JSR KC09_PortStatus(Port : Word; VAR b: Byte) 00023ee2 5c 4f |\O | ADDQ.L #0x6,A7 00023ee4 10 2e ff fc | . | MOVE.B (A6-0x4),D0 00023ee8 b0 01 | | CMP.B D1,D0 00023eea 67 16 |g | BEQ 0x23f02 00023eec 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023ef0 4e ba da be |N | JSR 0x219b0 00023ef4 58 4f |XO | ADDQ.L #0x4,A7 00023ef6 2e 6d 00 08 |.m | MOVEA.L (A5+0x8),A7 00023efa 3c 42 |<B | MOVEA.W D2,A6 00023efc 4e f9 00 02 52 94 |N R | JMP 0x25294 00023f02 55 4f |UO | SUBQ.L #0x2,A7 00023f04 4e b9 00 01 03 d4 |N | JSR ReadChar() : Byte 00023f0a 10 1f | | MOVE.B (A7)+,D0 00023f0c 0c 00 00 07 | | CMPI.B #0x07,D0 00023f10 67 16 |g | BEQ 0x23f28 00023f12 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023f16 4e ba da 98 |N | JSR 0x219b0 00023f1a 58 4f |XO | ADDQ.L #0x4,A7 00023f1c 2e 6d 00 08 |.m | MOVEA.L (A5+0x8),A7 00023f20 3c 42 |<B | MOVEA.W D2,A6 00023f22 4e f9 00 02 52 94 |N R | JMP 0x25294 00023f28 4c df 07 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2 00023f2c 4e 5e |N^ | UNLK A6 00023f2e 4e 75 |Nu | RTS 00023f30 ; -------------------------------------------------------------------------------------- 00023f30 ; OMSI PASCAL Function 00023f30 ; -------------------------------------------------------------------------------------- 00023f30 4e 56 ff f8 |NV | LINK.W A6,#0xfff8 00023f34 bf d5 | | CMPA.L (A5),A7 00023f36 62 06 |b | BHI 0x23f3e 00023f38 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023f3c 4e 76 |Nv | TRAPV 00023f3e de fc 00 08 | | ADDA.W #0x8,A7 00023f42 48 78 00 c8 |Hx | PEA.L 0xc8 00023f46 4e ba e9 30 |N 0 | JSR 0x22878 00023f4a 58 4f |XO | ADDQ.L #0x4,A7 00023f4c 4e 5e |N^ | UNLK A6 00023f4e 4e 75 |Nu | RTS 00023f50 ; -------------------------------------------------------------------------------------- 00023f50 ; OMSI PASCAL Function 00023f50 ; <LVAR 0x008 4(r)> 00023f50 ; <LVAR -0x00c @ 4(r)> 00023f50 ; -------------------------------------------------------------------------------------- 00023f50 4e 56 ff ac |NV | LINK.W A6,#0xffac 00023f54 bf d5 | | CMPA.L (A5),A7 00023f56 62 06 |b | BHI 0x23f5e 00023f58 44 fc 00 02 |D | MOVE.W #0x2,CCR 00023f5c 4e 76 |Nv | TRAPV 00023f5e de fc 00 48 | H | ADDA.W #0x48,A7 00023f62 48 e7 83 c0 |H | MOVEM.L A1+A0+D7+D6+D0,-(A7) 00023f66 43 ee ff f4 |C | LEA.L (A6-0xc),A1 00023f6a 48 51 |HQ | PEA.L (A1) 00023f6c 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00023f72 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023f76 4e ba de 86 |N | JSR 0x21dfe 00023f7a 58 4f |XO | ADDQ.L #0x4,A7 00023f7c 7e 01 |~ | MOVEQ.L #0x01,D7 00023f7e be 97 | | CMP.L (A7),D7 00023f80 6e 6a |nj | BGT 0x23fec 00023f82 59 4f |YO | SUBQ.L #0x4,A7 00023f84 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00023f88 2f 07 |/ | MOVE.L D7,-(A7) 00023f8a 4e ba e7 fc |N | JSR 0x22788 00023f8e 50 4f |PO | ADDQ.L #0x8,A7 00023f90 2c 1f |, | MOVE.L (A7)+,D6 00023f92 6d 20 |m | BLT 0x23fb4 00023f94 0c 86 00 00 00 ff | | CMPI.L #0x000000ff,D6 00023f9a 6e 18 |n | BGT 0x23fb4 00023f9c 2f 11 |/ | MOVE.L (A1),-(A7) 00023f9e 0c 86 00 00 00 ff | | CMPI.L #0x000000ff,D6 00023fa4 63 02 |c | BLS 0x23fa8 00023fa6 4e 4f |NO | TRAP #15 00023fa8 1f 06 | | MOVE.B D6,-(A7) 00023faa 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00023fb0 5c 4f |\O | ADDQ.L #0x6,A7 00023fb2 60 34 |`4 | BRA 0x23fe8 00023fb4 48 51 |HQ | PEA.L (A1) 00023fb6 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00023fbc 58 4f |XO | ADDQ.L #0x4,A7 00023fbe 41 fa d6 c4 |A | LEA.L 0x21684,A0 00023fc2 70 06 |p | MOVEQ.L #0x06,D0 00023fc4 2f 20 |/ | MOVE.L -(A0),-(A7) 00023fc6 51 c8 ff fc |Q | DBF D0,0x23fc4 00023fca 59 4f |YO | SUBQ.L #0x4,A7 00023fcc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00023fd0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00023fd4 3f 3c 00 1c |?< | MOVE.W #0x1c,-(A7) 00023fd8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00023fde 50 4f |PO | ADDQ.L #0x8,A7 00023fe0 4e ba da 10 |N | JSR 0x219f2 00023fe4 de fc 00 20 | | ADDA.W #0x20,A7 00023fe8 52 87 |R | ADDQ.L #0x1,D7 00023fea 68 92 |h | BVC 0x23f7e 00023fec 2e 91 |. | MOVE.L (A1),(A7) 00023fee 4e ba e7 cc |N | JSR 0x227bc 00023ff2 58 4f |XO | ADDQ.L #0x4,A7 00023ff4 4c df 03 c1 |L | MOVEM.L (A7)+,D0+D6+D7+A0+A1 00023ff8 4e 5e |N^ | UNLK A6 00023ffa 4e 75 |Nu | RTS 00023ffc ; -------------------------------------------------------------------------------------- 00023ffc ; OMSI PASCAL Function 00023ffc ; <LVAR 0x00c 1(rw)> 00023ffc ; <LVAR 0x008 4(r)> 00023ffc ; -------------------------------------------------------------------------------------- 00023ffc 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 00024000 bf d5 | | CMPA.L (A5),A7 00024002 62 06 |b | BHI 0x2400a 00024004 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024008 4e 76 |Nv | TRAPV 0002400a de fc 00 34 | 4 | ADDA.W #0x34,A7 0002400e 48 e7 e7 c0 |H | MOVEM.L A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00024012 42 2e 00 0c |B. | CLR.B (A6+0xc) 00024016 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 0002401a 2f 08 |/ | MOVE.L A0,-(A7) 0002401c 70 00 |p | MOVEQ.L #0x00,D0 0002401e 52 40 |R@ | ADDQ.W #0x1,D0 00024020 1c 00 | | MOVE.B D0,D6 00024022 0c 06 00 2b | + | CMPI.B #0x2b,D6 00024026 6e 00 00 82 |n | BGT 0x240aa 0002402a 41 fa d8 b2 |A | LEA.L 0x218de,A0 0002402e 10 06 | | MOVE.B D6,D0 00024030 48 80 |H | EXTB.W D0 00024032 48 c0 |H | EXTW.L D0 00024034 e2 98 | | ROR.L #0x1,D0 00024036 d0 c0 | | ADDA.W D0,A0 00024038 48 40 |H@ | SWAP.W D0 0002403a e7 58 | X | ROL.W #0x3,D0 0002403c 42 81 |B | CLR.L D1 0002403e 12 10 | | MOVE.B (A0),D1 00024040 e1 29 | ) | LSL.B D0,D1 00024042 e8 09 | | LSR.B #0x4,D1 00024044 2a 01 |* | MOVE.L D1,D5 00024046 20 57 | W | MOVEA.L (A7),A0 00024048 30 10 |0 | MOVE.W (A0),D0 0002404a 48 c0 |H | EXTW.L D0 0002404c ba 80 | | CMP.L D0,D5 0002404e 66 54 |fT | BNE 0x240a4 00024050 2f 05 |/ | MOVE.L D5,-(A7) 00024052 7e 01 |~ | MOVEQ.L #0x01,D7 00024054 be 97 | | CMP.L (A7),D7 00024056 6e 42 |nB | BGT 0x2409a 00024058 10 06 | | MOVE.B D6,D0 0002405a 48 80 |H | EXTB.W D0 0002405c c1 fc 00 0a | | MULS.W #0xa,D0 00024060 22 07 |" | MOVE.L D7,D1 00024062 53 81 |S | SUBQ.L #0x1,D1 00024064 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 0002406a 63 02 |c | BLS 0x2406e 0002406c 4e 4f |NO | TRAP #15 0002406e 20 6f 00 04 | o | MOVEA.L (A7+0x4),A0 00024072 43 fa d6 b2 |C | LEA.L COMMAND_TABLE_21726,A1 00024076 24 07 |$ | MOVE.L D7,D2 00024078 53 82 |S | SUBQ.L #0x1,D2 0002407a 0c 82 00 00 00 09 | | CMPI.L #0x00000009,D2 00024080 63 02 |c | BLS 0x24084 00024082 4e 4f |NO | TRAP #15 00024084 43 f1 00 00 |C | LEA.L (A1+D0.W),A1 00024088 10 30 18 02 | 0 | MOVE.B (A0+D1.L+#0x2),D0 0002408c b0 31 28 00 | 1( | CMP.B (A1+D2.L),D0 00024090 67 04 |g | BEQ 0x24096 00024092 58 4f |XO | ADDQ.L #0x4,A7 00024094 60 0e |` | BRA 0x240a4 00024096 52 87 |R | ADDQ.L #0x1,D7 00024098 68 ba |h | BVC 0x24054 0002409a 58 4f |XO | ADDQ.L #0x4,A7 0002409c 1d 46 00 0c | F | MOVE.B D6,(A6+0xc) 000240a0 58 4f |XO | ADDQ.L #0x4,A7 000240a2 60 08 |` | BRA 0x240ac 000240a4 52 06 |R | ADDQ.B #0x1,D6 000240a6 68 00 ff 7a |h z | BVC 0x24022 000240aa 58 4f |XO | ADDQ.L #0x4,A7 000240ac 4c df 03 e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1 000240b0 4e 5e |N^ | UNLK A6 000240b2 4e 75 |Nu | RTS 000240b4 ; -------------------------------------------------------------------------------------- 000240b4 ; OMSI PASCAL Function 000240b4 ; <LVAR 0x00c 4(r)> 000240b4 ; <LVAR 0x008 4(r)> 000240b4 ; <LVAR -0x002 @ 1(r)> 000240b4 ; <LVAR -0x006 @ 4(w)> 000240b4 ; <LVAR -0x008 @ 1(r)> 000240b4 ; <LVAR -0x00c @ 4(r)> 000240b4 ; <LVAR -0x010 @ 4(rw)> 000240b4 ; -------------------------------------------------------------------------------------- 000240b4 4e 56 ff a6 |NV | LINK.W A6,#0xffa6 000240b8 bf d5 | | CMPA.L (A5),A7 000240ba 62 06 |b | BHI 0x240c2 000240bc 44 fc 00 02 |D | MOVE.W #0x2,CCR 000240c0 4e 76 |Nv | TRAPV 000240c2 de fc 00 4a | J | ADDA.W #0x4a,A7 000240c6 48 e7 c0 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D1+D0,-(A7) 000240ca 45 ee ff f0 |E | LEA.L (A6-0x10),A2 000240ce 47 ee ff fe |G | LEA.L (A6-0x2),A3 000240d2 49 ee ff f4 |I | LEA.L (A6-0xc),A4 000240d6 72 01 |r | MOVEQ.L #0x01,D1 000240d8 59 4f |YO | SUBQ.L #0x4,A7 000240da 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000240de 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 000240e4 58 4f |XO | ADDQ.L #0x4,A7 000240e6 24 9f |$ | MOVE.L (A7)+,(A2) 000240e8 2f 12 |/ | MOVE.L (A2),-(A7) 000240ea 1f 3c 00 2e | < . | MOVE.B #0x2e,-(A7) 000240ee 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000240f4 5c 4f |\O | ADDQ.L #0x6,A7 000240f6 41 f9 00 02 65 2a |A e* | LEA.L 0x2652a,A0 000240fc 70 04 |p | MOVEQ.L #0x04,D0 000240fe 3f 20 |? | MOVE.W -(A0),-(A7) 00024100 51 c8 ff fc |Q | DBF D0,0x240fe 00024104 59 4f |YO | SUBQ.L #0x4,A7 00024106 2f 12 |/ | MOVE.L (A2),-(A7) 00024108 59 4f |YO | SUBQ.L #0x4,A7 0002410a 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002410e 3f 01 |? | MOVE.W D1,-(A7) 00024110 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00024114 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002411a 50 4f |PO | ADDQ.L #0x8,A7 0002411c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024122 50 4f |PO | ADDQ.L #0x8,A7 00024124 24 9f |$ | MOVE.L (A7)+,(A2) 00024126 5c 4f |\O | ADDQ.L #0x6,A7 00024128 2e 92 |. | MOVE.L (A2),(A7) 0002412a 42 27 |B' | CLR.B -(A7) 0002412c 1f 01 | | MOVE.B D1,-(A7) 0002412e 48 78 00 00 |Hx | PEA.L 0x0 00024132 48 53 |HS | PEA.L (A3) 00024134 48 54 |HT | PEA.L (A4) 00024136 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 0002413c de fc 00 14 | | ADDA.W #0x14,A7 00024140 4a 13 |J | TST.B (A3) 00024142 67 4a |gJ | BEQ 0x2418e 00024144 48 52 |HR | PEA.L (A2) 00024146 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002414c 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00024150 4e ba d8 5e |N ^ | JSR 0x219b0 00024154 9e fc 00 16 | | SUBA.W #0x16,A7 00024158 20 4f | O | MOVEA.L A7,A0 0002415a 43 fa d5 28 |C ( | LEA.L 0x21684,A1 0002415e 70 18 |p | MOVEQ.L #0x18,D0 00024160 10 d9 | | MOVE.B (A1)+,(A0)+ 00024162 51 c8 ff fc |Q | DBF D0,0x24160 00024166 51 4f |QO | SUBQ.L #0x8,A7 00024168 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002416c 3f 01 |? | MOVE.W D1,-(A7) 0002416e 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00024172 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024178 58 4f |XO | ADDQ.L #0x4,A7 0002417a 2e ae 00 0c |. | MOVE.L (A6+0xc),(A7) 0002417e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00024184 50 4f |PO | ADDQ.L #0x8,A7 00024186 4e ba d8 6a |N j | JSR 0x219f2 0002418a de fc 00 1e | | ADDA.W #0x1e,A7 0002418e 2d 79 00 02 65 18 ff fa |-y e | MOVE.L 0x26518,(A6-0x6) 00024196 2f 14 |/ | MOVE.L (A4),-(A7) 00024198 48 52 |HR | PEA.L (A2) 0002419a 48 6e ff f8 |Hn | PEA.L (A6-0x8) 0002419e 4e b9 00 01 04 3c |N < | JSR FileReadLine(file : File; VAR a : String; VAR b : Byte) 000241a4 de fc 00 0c | | ADDA.W #0xc,A7 000241a8 20 52 | R | MOVEA.L (A2),A0 000241aa 4a 50 |JP | TST.W (A0) 000241ac 67 14 |g | BEQ 0x241c2 000241ae 2f 12 |/ | MOVE.L (A2),-(A7) 000241b0 4e ba da 98 |N | JSR 0x21c4a 000241b4 58 4f |XO | ADDQ.L #0x4,A7 000241b6 48 6e ff fa |Hn | PEA.L (A6-0x6) 000241ba 2f 12 |/ | MOVE.L (A2),-(A7) 000241bc 4e ba de 12 |N | JSR 0x21fd0 000241c0 50 4f |PO | ADDQ.L #0x8,A7 000241c2 4a 2e ff f8 |J. | TST.B (A6-0x8) 000241c6 67 ce |g | BEQ 0x24196 000241c8 42 27 |B' | CLR.B -(A7) 000241ca 1f 01 | | MOVE.B D1,-(A7) 000241cc 48 78 00 01 |Hx | PEA.L 0x1 000241d0 48 53 |HS | PEA.L (A3) 000241d2 48 54 |HT | PEA.L (A4) 000241d4 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000241da de fc 00 10 | | ADDA.W #0x10,A7 000241de 48 52 |HR | PEA.L (A2) 000241e0 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000241e6 58 4f |XO | ADDQ.L #0x4,A7 000241e8 4c df 1f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3+A4 000241ec 4e 5e |N^ | UNLK A6 000241ee 4e 75 |Nu | RTS 000241f0 ; -------------------------------------------------------------------------------------- 000241f0 ; OMSI PASCAL Function 000241f0 ; <LVAR 0x014 1(w)> 000241f0 ; <LVAR 0x00c 4(r)> 000241f0 ; <LVAR 0x008 4(r)> 000241f0 ; -------------------------------------------------------------------------------------- 000241f0 4e 56 ff f4 |NV | LINK.W A6,#0xfff4 000241f4 bf d5 | | CMPA.L (A5),A7 000241f6 62 06 |b | BHI 0x241fe 000241f8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000241fc 4e 76 |Nv | TRAPV 000241fe de fc 00 0c | | ADDA.W #0xc,A7 00024202 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00024206 20 2e 00 0c | . | MOVE.L (A6+0xc),D0 0002420a d0 ae 00 08 | | ADD.L (A6+0x8),D0 0002420e 53 80 |S | SUBQ.L #0x1,D0 00024210 53 80 |S | SUBQ.L #0x1,D0 00024212 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 00024218 63 02 |c | BLS 0x2421c 0002421a 4e 4f |NO | TRAP #15 0002421c 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 00024222 1d 70 08 08 00 14 | p | MOVE.B (A0+D0.L+#0x8),(A6+0x14) 00024228 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 0002422c 4e 5e |N^ | UNLK A6 0002422e 4e 75 |Nu | RTS 00024230 ; -------------------------------------------------------------------------------------- 00024230 ; OMSI PASCAL Function 00024230 ; <LVAR 0x010 4(w)> 00024230 ; <LVAR 0x00c 4(r)> 00024230 ; <LVAR 0x008 4(r)> 00024230 ; <LVAR -0x004 @ 1(r)> 00024230 ; <LVAR -0x008 @ 4(r)> 00024230 ; -------------------------------------------------------------------------------------- 00024230 4e 56 ff c4 |NV | LINK.W A6,#0xffc4 00024234 bf d5 | | CMPA.L (A5),A7 00024236 62 06 |b | BHI 0x2423e 00024238 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002423c 4e 76 |Nv | TRAPV 0002423e de fc 00 34 | 4 | ADDA.W #0x34,A7 00024242 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 00024246 59 4f |YO | SUBQ.L #0x4,A7 00024248 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 0002424c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024250 4e ba e4 4c |N L | JSR 0x2269e 00024254 50 4f |PO | ADDQ.L #0x8,A7 00024256 48 6e ff fc |Hn | PEA.L (A6-0x4) 0002425a 48 6e ff f8 |Hn | PEA.L (A6-0x8) 0002425e 4e b9 00 01 02 ec |N | JSR String2Long(src : String; VAR status : Bool; VAR retval : Long) 00024264 de fc 00 0c | | ADDA.W #0xc,A7 00024268 4a 2e ff fc |J. | TST.B (A6-0x4) 0002426c 66 30 |f0 | BNE 0x2429e 0002426e 9e fc 00 18 | | SUBA.W #0x18,A7 00024272 20 4f | O | MOVEA.L A7,A0 00024274 43 fa d4 28 |C ( | LEA.L 0x2169e,A1 00024278 70 16 |p | MOVEQ.L #0x16,D0 0002427a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002427c 51 c8 ff fc |Q | DBF D0,0x2427a 00024280 59 4f |YO | SUBQ.L #0x4,A7 00024282 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024286 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002428a 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 0002428e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024294 50 4f |PO | ADDQ.L #0x8,A7 00024296 4e ba d7 5a |N Z | JSR 0x219f2 0002429a de fc 00 1c | | ADDA.W #0x1c,A7 0002429e 2d 6e ff f8 00 10 |-n | MOVE.L (A6-0x8),(A6+0x10) 000242a4 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 000242a8 4e 5e |N^ | UNLK A6 000242aa 4e 75 |Nu | RTS 000242ac ; -------------------------------------------------------------------------------------- 000242ac ; OMSI PASCAL Function 000242ac ; <LVAR 0x014 4(r)> 000242ac ; <LVAR 0x010 4(r)> 000242ac ; <LVAR 0x00c 4(r)> 000242ac ; <LVAR 0x008 4(r)> 000242ac ; <LVAR -0x00c 4(rw)> 000242ac ; <LVAR -0x010 4(rw)> 000242ac ; <LVAR -0x014 4(rw)> 000242ac ; <LVAR -0x018 4(w)> 000242ac ; <LVAR -0x020 4(rw)> 000242ac ; -------------------------------------------------------------------------------------- 000242ac 4e 56 ff 8e |NV | LINK.W A6,#0xff8e 000242b0 bf d5 | | CMPA.L (A5),A7 000242b2 62 06 |b | BHI 0x242ba 000242b4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000242b8 4e 76 |Nv | TRAPV 000242ba de fc 00 4e | N | ADDA.W #0x4e,A7 000242be 48 e7 c7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 000242c2 43 ee ff e0 |C | LEA.L (A6-0x20),A1 000242c6 45 ee ff f0 |E | LEA.L (A6-0x10),A2 000242ca 47 ee ff f4 |G | LEA.L (A6-0xc),A3 000242ce 49 ee ff ec |I | LEA.L (A6-0x14),A4 000242d2 7e 00 |~ | MOVEQ.L #0x00,D7 000242d4 22 ae 00 14 |" | MOVE.L (A6+0x14),(A1) 000242d8 20 39 00 02 65 18 | 9 e | MOVE.L 0x26518,D0 000242de 90 ae 00 14 | | SUB.L (A6+0x14),D0 000242e2 28 80 |( | MOVE.L D0,(A4) 000242e4 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000242e8 2a 2e 00 10 |*. | MOVE.L (A6+0x10),D5 000242ec ba 97 | | CMP.L (A7),D5 000242ee 6e 2c |n, | BGT 0x2431c 000242f0 51 4f |QO | SUBQ.L #0x8,A7 000242f2 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000242f6 2f 05 |/ | MOVE.L D5,-(A7) 000242f8 4e ba e3 42 |N B | JSR 0x2263c 000242fc 50 4f |PO | ADDQ.L #0x8,A7 000242fe 24 9f |$ | MOVE.L (A7)+,(A2) 00024300 26 97 |& | MOVE.L (A7),(A3) 00024302 2f 13 |/ | MOVE.L (A3),-(A7) 00024304 2f 12 |/ | MOVE.L (A2),-(A7) 00024306 4e ba e2 fc |N | JSR 0x22604 0002430a 50 4f |PO | ADDQ.L #0x8,A7 0002430c 2c 1f |, | MOVE.L (A7)+,D6 0002430e de 86 | | ADD.L D6,D7 00024310 ba ae 00 0c | | CMP.L (A6+0xc),D5 00024314 6c 02 |l | BGE 0x24318 00024316 52 87 |R | ADDQ.L #0x1,D7 00024318 52 85 |R | ADDQ.L #0x1,D5 0002431a 68 d0 |h | BVC 0x242ec 0002431c 58 4f |XO | ADDQ.L #0x4,A7 0002431e 20 11 | | MOVE.L (A1),D0 00024320 d0 94 | | ADD.L (A4),D0 00024322 2d 40 ff e8 |-@ | MOVE.L D0,(A6-0x18) 00024326 be 94 | | CMP.L (A4),D7 00024328 67 0c |g | BEQ 0x24336 0002432a 2f 00 |/ | MOVE.L D0,-(A7) 0002432c 2f 14 |/ | MOVE.L (A4),-(A7) 0002432e 9f 97 | | SUB.L D7,(A7) 00024330 4e ba dc 14 |N | JSR 0x21f46 00024334 50 4f |PO | ADDQ.L #0x8,A7 00024336 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 0002433a 2a 2e 00 10 |*. | MOVE.L (A6+0x10),D5 0002433e ba 97 | | CMP.L (A7),D5 00024340 6e 00 00 88 |n | BGT 0x243ca 00024344 51 4f |QO | SUBQ.L #0x8,A7 00024346 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 0002434a 2f 05 |/ | MOVE.L D5,-(A7) 0002434c 4e ba e2 ee |N | JSR 0x2263c 00024350 50 4f |PO | ADDQ.L #0x8,A7 00024352 24 9f |$ | MOVE.L (A7)+,(A2) 00024354 26 97 |& | MOVE.L (A7),(A3) 00024356 2f 13 |/ | MOVE.L (A3),-(A7) 00024358 2f 12 |/ | MOVE.L (A2),-(A7) 0002435a 4e ba e2 a8 |N | JSR 0x22604 0002435e 50 4f |PO | ADDQ.L #0x8,A7 00024360 2c 1f |, | MOVE.L (A7)+,D6 00024362 2f 06 |/ | MOVE.L D6,-(A7) 00024364 70 01 |p | MOVEQ.L #0x01,D0 00024366 b0 97 | | CMP.L (A7),D0 00024368 6e 30 |n0 | BGT 0x2439a 0002436a 22 11 |" | MOVE.L (A1),D1 0002436c d2 80 | | ADD.L D0,D1 0002436e 53 81 |S | SUBQ.L #0x1,D1 00024370 53 81 |S | SUBQ.L #0x1,D1 00024372 0c 81 00 00 0f ff | | CMPI.L #0x00000fff,D1 00024378 63 02 |c | BLS 0x2437c 0002437a 4e 4f |NO | TRAP #15 0002437c 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 00024382 55 4f |UO | SUBQ.L #0x2,A7 00024384 2f 13 |/ | MOVE.L (A3),-(A7) 00024386 2f 12 |/ | MOVE.L (A2),-(A7) 00024388 2f 00 |/ | MOVE.L D0,-(A7) 0002438a 4e ba fe 64 |N d | JSR 0x241f0 0002438e de fc 00 0c | | ADDA.W #0xc,A7 00024392 11 9f 18 08 | | MOVE.B (A7)+,(A0+D1.L+#0x8) 00024396 52 80 |R | ADDQ.L #0x1,D0 00024398 68 cc |h | BVC 0x24366 0002439a 58 4f |XO | ADDQ.L #0x4,A7 0002439c ba ae 00 0c | | CMP.L (A6+0xc),D5 000243a0 6c 22 |l" | BGE 0x243c4 000243a2 20 11 | | MOVE.L (A1),D0 000243a4 d0 86 | | ADD.L D6,D0 000243a6 22 00 |" | MOVE.L D0,D1 000243a8 53 81 |S | SUBQ.L #0x1,D1 000243aa 0c 81 00 00 0f ff | | CMPI.L #0x00000fff,D1 000243b0 63 02 |c | BLS 0x243b4 000243b2 4e 4f |NO | TRAP #15 000243b4 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 000243ba 11 bc 00 2c 18 08 | , | MOVE.B #0x2c,(A0+D1.L+#0x8) 000243c0 52 80 |R | ADDQ.L #0x1,D0 000243c2 22 80 |" | MOVE.L D0,(A1) 000243c4 52 85 |R | ADDQ.L #0x1,D5 000243c6 68 00 ff 76 |h v | BVC 0x2433e 000243ca 58 4f |XO | ADDQ.L #0x4,A7 000243cc 4c df 1f e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3+A4 000243d0 4e 5e |N^ | UNLK A6 000243d2 4e 75 |Nu | RTS 000243d4 ; -------------------------------------------------------------------------------------- 000243d4 ; OMSI PASCAL Function 000243d4 ; <LVAR 0x018 4(rw)> 000243d4 ; <LVAR 0x014 4(r)> 000243d4 ; <LVAR 0x010 4(r)> 000243d4 ; <LVAR 0x00c 4(r)> 000243d4 ; <LVAR 0x008 4(r)> 000243d4 ; <LVAR -0x008 4(rw)> 000243d4 ; <LVAR -0x00c 4(rw)> 000243d4 ; <LVAR -0x018 4(w)> 000243d4 ; -------------------------------------------------------------------------------------- 000243d4 4e 56 ff 9e |NV | LINK.W A6,#0xff9e 000243d8 bf d5 | | CMPA.L (A5),A7 000243da 62 06 |b | BHI 0x243e2 000243dc 44 fc 00 02 |D | MOVE.W #0x2,CCR 000243e0 4e 76 |Nv | TRAPV 000243e2 de fc 00 4a | J | ADDA.W #0x4a,A7 000243e6 48 e7 c7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 000243ea 41 ee ff f8 |A | LEA.L (A6-0x8),A0 000243ee 43 ee 00 14 |C | LEA.L (A6+0x14),A1 000243f2 45 ee 00 10 |E | LEA.L (A6+0x10),A2 000243f6 47 ee ff f4 |G | LEA.L (A6-0xc),A3 000243fa 49 fa fd f4 |I | LEA.L 0x241f0,A4 000243fe 72 0c |r | MOVEQ.L #0x0c,D1 00024400 59 4f |YO | SUBQ.L #0x4,A7 00024402 2f 11 |/ | MOVE.L (A1),-(A7) 00024404 2f 12 |/ | MOVE.L (A2),-(A7) 00024406 4e ba e1 fc |N | JSR 0x22604 0002440a 50 4f |PO | ADDQ.L #0x8,A7 0002440c 26 97 |& | MOVE.L (A7),(A3) 0002440e 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024412 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024416 4e ba e1 ec |N | JSR 0x22604 0002441a 50 4f |PO | ADDQ.L #0x8,A7 0002441c 20 9f | | MOVE.L (A7)+,(A0) 0002441e 52 90 |R | ADDQ.L #0x1,(A0) 00024420 20 13 | | MOVE.L (A3),D0 00024422 90 90 | | SUB.L (A0),D0 00024424 52 80 |R | ADDQ.L #0x1,D0 00024426 2f 00 |/ | MOVE.L D0,-(A7) 00024428 70 01 |p | MOVEQ.L #0x01,D0 0002442a b0 97 | | CMP.L (A7),D0 0002442c 6e 00 00 8e |n | BGT 0x244bc 00024430 2d 40 ff e8 |-@ | MOVE.L D0,(A6-0x18) 00024434 2f 00 |/ | MOVE.L D0,-(A7) 00024436 7c 00 || | MOVEQ.L #0x00,D6 00024438 2f 10 |/ | MOVE.L (A0),-(A7) 0002443a 7a 01 |z | MOVEQ.L #0x01,D5 0002443c ba 97 | | CMP.L (A7),D5 0002443e 6e 42 |nB | BGT 0x24482 00024440 0c 85 00 00 00 01 | | CMPI.L #0x00000001,D5 00024446 66 04 |f | BNE 0x2444c 00024448 7e 2f |~/ | MOVEQ.L #0x2f,D7 0002444a 60 14 |` | BRA 0x24460 0002444c 55 4f |UO | SUBQ.L #0x2,A7 0002444e 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024452 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024456 2f 05 |/ | MOVE.L D5,-(A7) 00024458 53 97 |S | SUBQ.L #0x1,(A7) 0002445a 4e 94 |N | JSR (A4) 0002445c de c1 | | ADDA.W D1,A7 0002445e 1e 1f | | MOVE.B (A7)+,D7 00024460 55 4f |UO | SUBQ.L #0x2,A7 00024462 2f 11 |/ | MOVE.L (A1),-(A7) 00024464 2f 12 |/ | MOVE.L (A2),-(A7) 00024466 20 2f 00 0e | / | MOVE.L (A7+0xe),D0 0002446a d0 85 | | ADD.L D5,D0 0002446c 53 80 |S | SUBQ.L #0x1,D0 0002446e 2f 00 |/ | MOVE.L D0,-(A7) 00024470 4e 94 |N | JSR (A4) 00024472 de c1 | | ADDA.W D1,A7 00024474 be 1f | | CMP.B (A7)+,D7 00024476 67 04 |g | BEQ 0x2447c 00024478 58 4f |XO | ADDQ.L #0x4,A7 0002447a 60 08 |` | BRA 0x24484 0002447c 2c 05 |, | MOVE.L D5,D6 0002447e 52 85 |R | ADDQ.L #0x1,D5 00024480 68 ba |h | BVC 0x2443c 00024482 58 4f |XO | ADDQ.L #0x4,A7 00024484 bc 90 | | CMP.L (A0),D6 00024486 66 2c |f, | BNE 0x244b4 00024488 20 17 | | MOVE.L (A7),D0 0002448a 2d 40 00 18 |-@ | MOVE.L D0,(A6+0x18) 0002448e d0 90 | | ADD.L (A0),D0 00024490 b0 93 | | CMP.L (A3),D0 00024492 6d 02 |m | BLT 0x24496 00024494 60 1a |` | BRA 0x244b0 00024496 55 4f |UO | SUBQ.L #0x2,A7 00024498 2f 11 |/ | MOVE.L (A1),-(A7) 0002449a 2f 12 |/ | MOVE.L (A2),-(A7) 0002449c 2f 00 |/ | MOVE.L D0,-(A7) 0002449e 4e 94 |N | JSR (A4) 000244a0 de c1 | | ADDA.W D1,A7 000244a2 1e 1f | | MOVE.B (A7)+,D7 000244a4 0c 07 00 2f | / | CMPI.B #0x2f,D7 000244a8 67 06 |g | BEQ 0x244b0 000244aa 0c 07 00 3d | = | CMPI.B #0x3d,D7 000244ae 66 04 |f | BNE 0x244b4 000244b0 50 4f |PO | ADDQ.L #0x8,A7 000244b2 60 0e |` | BRA 0x244c2 000244b4 20 1f | | MOVE.L (A7)+,D0 000244b6 52 80 |R | ADDQ.L #0x1,D0 000244b8 68 00 ff 70 |h p | BVC 0x2442a 000244bc 58 4f |XO | ADDQ.L #0x4,A7 000244be 42 ae 00 18 |B | CLR.L (A6+0x18) 000244c2 4c df 1f e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2+A3+A4 000244c6 4e 5e |N^ | UNLK A6 000244c8 4e 75 |Nu | RTS 000244ca ; -------------------------------------------------------------------------------------- 000244ca ; OMSI PASCAL Function 000244ca ; <LVAR 0x018 4(r)> 000244ca ; <LVAR 0x014 4(r)> 000244ca ; <LVAR 0x010 4(r)> 000244ca ; <LVAR 0x00c 4(r)> 000244ca ; <LVAR 0x008 4(r)> 000244ca ; -------------------------------------------------------------------------------------- 000244ca 4e 56 ff be |NV | LINK.W A6,#0xffbe 000244ce bf d5 | | CMPA.L (A5),A7 000244d0 62 06 |b | BHI 0x244d8 000244d2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000244d6 4e 76 |Nv | TRAPV 000244d8 de fc 00 36 | 6 | ADDA.W #0x36,A7 000244dc 48 e7 c7 c0 |H | MOVEM.L A1+A0+D7+D6+D5+D1+D0,-(A7) 000244e0 41 ee 00 14 |A | LEA.L (A6+0x14),A0 000244e4 43 ee 00 10 |C | LEA.L (A6+0x10),A1 000244e8 72 2f |r/ | MOVEQ.L #0x2f,D1 000244ea 59 4f |YO | SUBQ.L #0x4,A7 000244ec 2f 10 |/ | MOVE.L (A0),-(A7) 000244ee 2f 11 |/ | MOVE.L (A1),-(A7) 000244f0 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000244f4 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000244f8 4e ba fe da |N | JSR 0x243d4 000244fc de fc 00 10 | | ADDA.W #0x10,A7 00024500 2a 1f |* | MOVE.L (A7)+,D5 00024502 6f 52 |oR | BLE 0x24556 00024504 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 00024508 1f 01 | | MOVE.B D1,-(A7) 0002450a 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00024510 5c 4f |\O | ADDQ.L #0x6,A7 00024512 20 05 | | MOVE.L D5,D0 00024514 52 80 |R | ADDQ.L #0x1,D0 00024516 59 4f |YO | SUBQ.L #0x4,A7 00024518 2f 10 |/ | MOVE.L (A0),-(A7) 0002451a 2f 11 |/ | MOVE.L (A1),-(A7) 0002451c 4e ba e0 e6 |N | JSR 0x22604 00024520 50 4f |PO | ADDQ.L #0x8,A7 00024522 2c 00 |, | MOVE.L D0,D6 00024524 bc 97 | | CMP.L (A7),D6 00024526 6e 2c |n, | BGT 0x24554 00024528 55 4f |UO | SUBQ.L #0x2,A7 0002452a 2f 10 |/ | MOVE.L (A0),-(A7) 0002452c 2f 11 |/ | MOVE.L (A1),-(A7) 0002452e 2f 06 |/ | MOVE.L D6,-(A7) 00024530 4e ba fc be |N | JSR 0x241f0 00024534 de fc 00 0c | | ADDA.W #0xc,A7 00024538 1e 1f | | MOVE.B (A7)+,D7 0002453a be 01 | | CMP.B D1,D7 0002453c 66 04 |f | BNE 0x24542 0002453e 58 4f |XO | ADDQ.L #0x4,A7 00024540 60 14 |` | BRA 0x24556 00024542 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 00024546 1f 07 | | MOVE.B D7,-(A7) 00024548 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 0002454e 5c 4f |\O | ADDQ.L #0x6,A7 00024550 52 86 |R | ADDQ.L #0x1,D6 00024552 68 d0 |h | BVC 0x24524 00024554 58 4f |XO | ADDQ.L #0x4,A7 00024556 4c df 03 e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1 0002455a 4e 5e |N^ | UNLK A6 0002455c 4e 75 |Nu | RTS 0002455e ; -------------------------------------------------------------------------------------- 0002455e ; OMSI PASCAL Function 0002455e ; <LVAR 0x018 4(r)> 0002455e ; <LVAR 0x014 4(r)> 0002455e ; <LVAR 0x010 4(r)> 0002455e ; <LVAR 0x00c 4(r)> 0002455e ; <LVAR 0x008 4(r)> 0002455e ; <LVAR -0x006 4(rw)> 0002455e ; <LVAR -0x014 4(rw)> 0002455e ; -------------------------------------------------------------------------------------- 0002455e 4e 56 ff aa |NV | LINK.W A6,#0xffaa 00024562 bf d5 | | CMPA.L (A5),A7 00024564 62 06 |b | BHI 0x2456c 00024566 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002456a 4e 76 |Nv | TRAPV 0002456c de fc 00 42 | B | ADDA.W #0x42,A7 00024570 48 e7 c7 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 00024574 41 ee 00 14 |A | LEA.L (A6+0x14),A0 00024578 43 ee 00 10 |C | LEA.L (A6+0x10),A1 0002457c 45 ee ff fa |E | LEA.L (A6-0x6),A2 00024580 72 0c |r | MOVEQ.L #0x0c,D1 00024582 59 4f |YO | SUBQ.L #0x4,A7 00024584 2f 10 |/ | MOVE.L (A0),-(A7) 00024586 2f 11 |/ | MOVE.L (A1),-(A7) 00024588 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 0002458c 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 00024590 4e ba fe 42 |N B | JSR 0x243d4 00024594 de fc 00 10 | | ADDA.W #0x10,A7 00024598 2d 5f ff ec |-_ | MOVE.L (A7)+,(A6-0x14) 0002459c 6f 6e |on | BLE 0x2460c 0002459e 59 4f |YO | SUBQ.L #0x4,A7 000245a0 2f 10 |/ | MOVE.L (A0),-(A7) 000245a2 2f 11 |/ | MOVE.L (A1),-(A7) 000245a4 4e ba e0 5e |N ^ | JSR 0x22604 000245a8 50 4f |PO | ADDQ.L #0x8,A7 000245aa 24 9f |$ | MOVE.L (A7)+,(A2) 000245ac 2f 12 |/ | MOVE.L (A2),-(A7) 000245ae 2a 2e ff ec |*. | MOVE.L (A6-0x14),D5 000245b2 ba 97 | | CMP.L (A7),D5 000245b4 6e 54 |nT | BGT 0x2460a 000245b6 55 4f |UO | SUBQ.L #0x2,A7 000245b8 2f 10 |/ | MOVE.L (A0),-(A7) 000245ba 2f 11 |/ | MOVE.L (A1),-(A7) 000245bc 2f 05 |/ | MOVE.L D5,-(A7) 000245be 4e ba fc 30 |N 0 | JSR 0x241f0 000245c2 de c1 | | ADDA.W D1,A7 000245c4 10 1f | | MOVE.B (A7)+,D0 000245c6 0c 00 00 3d | = | CMPI.B #0x3d,D0 000245ca 66 3a |f: | BNE 0x24606 000245cc 20 05 | | MOVE.L D5,D0 000245ce 52 80 |R | ADDQ.L #0x1,D0 000245d0 2f 12 |/ | MOVE.L (A2),-(A7) 000245d2 2c 00 |, | MOVE.L D0,D6 000245d4 bc 97 | | CMP.L (A7),D6 000245d6 6e 2c |n, | BGT 0x24604 000245d8 55 4f |UO | SUBQ.L #0x2,A7 000245da 2f 10 |/ | MOVE.L (A0),-(A7) 000245dc 2f 11 |/ | MOVE.L (A1),-(A7) 000245de 2f 06 |/ | MOVE.L D6,-(A7) 000245e0 4e ba fc 0e |N | JSR 0x241f0 000245e4 de c1 | | ADDA.W D1,A7 000245e6 1e 1f | | MOVE.B (A7)+,D7 000245e8 0c 07 00 2f | / | CMPI.B #0x2f,D7 000245ec 66 04 |f | BNE 0x245f2 000245ee 50 4f |PO | ADDQ.L #0x8,A7 000245f0 60 1a |` | BRA 0x2460c 000245f2 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 000245f6 1f 07 | | MOVE.B D7,-(A7) 000245f8 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000245fe 5c 4f |\O | ADDQ.L #0x6,A7 00024600 52 86 |R | ADDQ.L #0x1,D6 00024602 68 d0 |h | BVC 0x245d4 00024604 58 4f |XO | ADDQ.L #0x4,A7 00024606 52 85 |R | ADDQ.L #0x1,D5 00024608 68 a8 |h | BVC 0x245b2 0002460a 58 4f |XO | ADDQ.L #0x4,A7 0002460c 4c df 07 e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2 00024610 4e 5e |N^ | UNLK A6 00024612 4e 75 |Nu | RTS 00024614 ; -------------------------------------------------------------------------------------- 00024614 ; OMSI PASCAL Function 00024614 ; <LVAR 0x010 4(r)> 00024614 ; <LVAR 0x00c 4(r)> 00024614 ; <LVAR 0x008 4(r)> 00024614 ; -------------------------------------------------------------------------------------- 00024614 4e 56 ff b2 |NV | LINK.W A6,#0xffb2 00024618 bf d5 | | CMPA.L (A5),A7 0002461a 62 06 |b | BHI 0x24622 0002461c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024620 4e 76 |Nv | TRAPV 00024622 de fc 00 42 | B | ADDA.W #0x42,A7 00024626 48 e7 c7 c0 |H | MOVEM.L A1+A0+D7+D6+D5+D1+D0,-(A7) 0002462a 41 ee 00 0c |A | LEA.L (A6+0xc),A0 0002462e 43 ee 00 08 |C | LEA.L (A6+0x8),A1 00024632 72 0c |r | MOVEQ.L #0x0c,D1 00024634 59 4f |YO | SUBQ.L #0x4,A7 00024636 2f 10 |/ | MOVE.L (A0),-(A7) 00024638 2f 11 |/ | MOVE.L (A1),-(A7) 0002463a 4e ba df c8 |N | JSR 0x22604 0002463e 50 4f |PO | ADDQ.L #0x8,A7 00024640 2a 1f |* | MOVE.L (A7)+,D5 00024642 2f 05 |/ | MOVE.L D5,-(A7) 00024644 7c 01 || | MOVEQ.L #0x01,D6 00024646 bc 97 | | CMP.L (A7),D6 00024648 6e 46 |nF | BGT 0x24690 0002464a 55 4f |UO | SUBQ.L #0x2,A7 0002464c 2f 10 |/ | MOVE.L (A0),-(A7) 0002464e 2f 11 |/ | MOVE.L (A1),-(A7) 00024650 2f 06 |/ | MOVE.L D6,-(A7) 00024652 4e ba fb 9c |N | JSR 0x241f0 00024656 de c1 | | ADDA.W D1,A7 00024658 10 1f | | MOVE.B (A7)+,D0 0002465a 0c 00 00 2f | / | CMPI.B #0x2f,D0 0002465e 66 2c |f, | BNE 0x2468c 00024660 2f 05 |/ | MOVE.L D5,-(A7) 00024662 2e 06 |. | MOVE.L D6,D7 00024664 be 97 | | CMP.L (A7),D7 00024666 6e 1e |n | BGT 0x24686 00024668 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 0002466c 55 4f |UO | SUBQ.L #0x2,A7 0002466e 2f 10 |/ | MOVE.L (A0),-(A7) 00024670 2f 11 |/ | MOVE.L (A1),-(A7) 00024672 2f 07 |/ | MOVE.L D7,-(A7) 00024674 4e ba fb 7a |N z | JSR 0x241f0 00024678 de c1 | | ADDA.W D1,A7 0002467a 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00024680 5c 4f |\O | ADDQ.L #0x6,A7 00024682 52 87 |R | ADDQ.L #0x1,D7 00024684 68 de |h | BVC 0x24664 00024686 58 4f |XO | ADDQ.L #0x4,A7 00024688 58 4f |XO | ADDQ.L #0x4,A7 0002468a 60 06 |` | BRA 0x24692 0002468c 52 86 |R | ADDQ.L #0x1,D6 0002468e 68 b6 |h | BVC 0x24646 00024690 58 4f |XO | ADDQ.L #0x4,A7 00024692 4c df 03 e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1 00024696 4e 5e |N^ | UNLK A6 00024698 4e 75 |Nu | RTS 0002469a ; -------------------------------------------------------------------------------------- 0002469a ; OMSI PASCAL Function 0002469a ; <LVAR 0x010 4(r)> 0002469a ; <LVAR 0x00c 4(r)> 0002469a ; <LVAR 0x008 4(r)> 0002469a ; -------------------------------------------------------------------------------------- 0002469a 4e 56 ff ce |NV | LINK.W A6,#0xffce 0002469e bf d5 | | CMPA.L (A5),A7 000246a0 62 06 |b | BHI 0x246a8 000246a2 44 fc 00 02 |D | MOVE.W #0x2,CCR 000246a6 4e 76 |Nv | TRAPV 000246a8 de fc 00 2a | * | ADDA.W #0x2a,A7 000246ac 48 e7 03 80 |H | MOVEM.L A0+D7+D6,-(A7) 000246b0 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 000246b4 42 50 |BP | CLR.W (A0) 000246b6 59 4f |YO | SUBQ.L #0x4,A7 000246b8 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000246bc 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000246c0 4e ba df 42 |N B | JSR 0x22604 000246c4 50 4f |PO | ADDQ.L #0x8,A7 000246c6 7e 01 |~ | MOVEQ.L #0x01,D7 000246c8 be 97 | | CMP.L (A7),D7 000246ca 6e 34 |n4 | BGT 0x24700 000246cc 55 4f |UO | SUBQ.L #0x2,A7 000246ce 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000246d2 2f 2e 00 08 |/. | MOVE.L (A6+0x8),-(A7) 000246d6 2f 07 |/ | MOVE.L D7,-(A7) 000246d8 4e ba fb 16 |N | JSR 0x241f0 000246dc de fc 00 0c | | ADDA.W #0xc,A7 000246e0 1c 1f | | MOVE.B (A7)+,D6 000246e2 0c 06 00 2f | / | CMPI.B #0x2f,D6 000246e6 67 10 |g | BEQ 0x246f8 000246e8 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 000246ec 1f 06 | | MOVE.B D6,-(A7) 000246ee 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000246f4 5c 4f |\O | ADDQ.L #0x6,A7 000246f6 60 04 |` | BRA 0x246fc 000246f8 58 4f |XO | ADDQ.L #0x4,A7 000246fa 60 06 |` | BRA 0x24702 000246fc 52 87 |R | ADDQ.L #0x1,D7 000246fe 68 c8 |h | BVC 0x246c8 00024700 58 4f |XO | ADDQ.L #0x4,A7 00024702 4c df 01 c0 |L | MOVEM.L (A7)+,D6+D7+A0 00024706 4e 5e |N^ | UNLK A6 00024708 4e 75 |Nu | RTS 0002470a ; -------------------------------------------------------------------------------------- 0002470a ; OMSI PASCAL Function 0002470a ; -------------------------------------------------------------------------------------- 0002470a 4e 56 ff c6 |NV | LINK.W A6,#0xffc6 0002470e bf d5 | | CMPA.L (A5),A7 00024710 62 06 |b | BHI 0x24718 00024712 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024716 4e 76 |Nv | TRAPV 00024718 de fc 00 3a | : | ADDA.W #0x3a,A7 0002471c 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00024720 41 fa cf b6 |A | LEA.L 0x216d8,A0 00024724 70 10 |p | MOVEQ.L #0x10,D0 00024726 3f 20 |? | MOVE.W -(A0),-(A7) 00024728 51 c8 ff fc |Q | DBF D0,0x24726 0002472c 59 4f |YO | SUBQ.L #0x4,A7 0002472e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024732 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00024736 3f 3c 00 22 |?< " | MOVE.W #0x22,-(A7) 0002473a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024740 50 4f |PO | ADDQ.L #0x8,A7 00024742 4e ba d2 ae |N | JSR 0x219f2 00024746 de fc 00 26 | & | ADDA.W #0x26,A7 0002474a 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 0002474e 4e 5e |N^ | UNLK A6 00024750 4e 75 |Nu | RTS 00024752 ; -------------------------------------------------------------------------------------- 00024752 ; OMSI PASCAL Function 00024752 ; <LVAR 0x00c 4(r)> 00024752 ; <LVAR 0x008 4(r)> 00024752 ; <LVAR -0x006 4(rw)> 00024752 ; -------------------------------------------------------------------------------------- 00024752 4e 56 ff a0 |NV | LINK.W A6,#0xffa0 00024756 bf d5 | | CMPA.L (A5),A7 00024758 62 06 |b | BHI 0x24760 0002475a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002475e 4e 76 |Nv | TRAPV 00024760 de fc 00 58 | X | ADDA.W #0x58,A7 00024764 48 e7 ff f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00024768 43 ee 00 0c |C | LEA.L (A6+0xc),A1 0002476c 45 f9 00 02 65 18 |E e | LEA.L 0x26518,A2 00024772 47 fa d3 1a |G | LEA.L 0x21a8e,A3 00024776 72 30 |r0 | MOVEQ.L #0x30,D1 00024778 74 39 |t9 | MOVEQ.L #0x39,D2 0002477a 76 25 |v% | MOVEQ.L #0x25,D3 0002477c 78 2d |x- | MOVEQ.L #0x2d,D4 0002477e 2d 52 ff fa |-R | MOVE.L (A2),(A6-0x6) 00024782 55 4f |UO | SUBQ.L #0x2,A7 00024784 4e 93 |N | JSR (A3) 00024786 1e 1f | | MOVE.B (A7)+,D7 00024788 be 03 | | CMP.B D3,D7 0002478a 66 08 |f | BNE 0x24794 0002478c 20 51 | Q | MOVEA.L (A1),A0 0002478e 42 90 |B | CLR.L (A0) 00024790 60 00 00 e2 |` | BRA 0x24874 00024794 be 04 | | CMP.B D4,D7 00024796 66 0c |f | BNE 0x247a4 00024798 20 51 | Q | MOVEA.L (A1),A0 0002479a 20 bc 00 00 00 01 | | MOVE.L #0x1,(A0) 000247a0 60 00 00 d2 |` | BRA 0x24874 000247a4 0c 07 00 2f | / | CMPI.B #0x2f,D7 000247a8 66 0c |f | BNE 0x247b6 000247aa 20 51 | Q | MOVEA.L (A1),A0 000247ac 20 bc 00 00 00 04 | | MOVE.L #0x4,(A0) 000247b2 60 00 00 c0 |` | BRA 0x24874 000247b6 0c 07 00 3d | = | CMPI.B #0x3d,D7 000247ba 66 0c |f | BNE 0x247c8 000247bc 20 51 | Q | MOVEA.L (A1),A0 000247be 20 bc 00 00 00 05 | | MOVE.L #0x5,(A0) 000247c4 60 00 00 ae |` | BRA 0x24874 000247c8 0c 07 00 5c | \ | CMPI.B #0x5c,D7 000247cc 66 0c |f | BNE 0x247da 000247ce 20 51 | Q | MOVEA.L (A1),A0 000247d0 20 bc 00 00 00 06 | | MOVE.L #0x6,(A0) 000247d6 60 00 00 9c |` | BRA 0x24874 000247da 4a 07 |J | TST.B D7 000247dc 66 2c |f, | BNE 0x2480a 000247de 41 fa cf 10 |A | LEA.L 0x216f0,A0 000247e2 70 05 |p | MOVEQ.L #0x05,D0 000247e4 2f 20 |/ | MOVE.L -(A0),-(A7) 000247e6 51 c8 ff fc |Q | DBF D0,0x247e4 000247ea 59 4f |YO | SUBQ.L #0x4,A7 000247ec 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000247f0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000247f4 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 000247f8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000247fe 50 4f |PO | ADDQ.L #0x8,A7 00024800 4e ba d1 f0 |N | JSR 0x219f2 00024804 de fc 00 1c | | ADDA.W #0x1c,A7 00024808 60 6a |`j | BRA 0x24874 0002480a be 01 | | CMP.B D1,D7 0002480c 65 2c |e, | BCS 0x2483a 0002480e be 02 | | CMP.B D2,D7 00024810 62 28 |b( | BHI 0x2483a 00024812 20 51 | Q | MOVEA.L (A1),A0 00024814 20 bc 00 00 00 02 | | MOVE.L #0x2,(A0) 0002481a 55 4f |UO | SUBQ.L #0x2,A7 0002481c 4e ba d2 32 |N 2 | JSR 0x21a50 00024820 1e 1f | | MOVE.B (A7)+,D7 00024822 be 01 | | CMP.B D1,D7 00024824 65 0a |e | BCS 0x24830 00024826 be 02 | | CMP.B D2,D7 00024828 62 06 |b | BHI 0x24830 0002482a 55 4f |UO | SUBQ.L #0x2,A7 0002482c 4e 93 |N | JSR (A3) 0002482e 1c 1f | | MOVE.B (A7)+,D6 00024830 be 01 | | CMP.B D1,D7 00024832 65 04 |e | BCS 0x24838 00024834 be 02 | | CMP.B D2,D7 00024836 63 e2 |c | BLS 0x2481a 00024838 60 3a |`: | BRA 0x24874 0002483a 20 51 | Q | MOVEA.L (A1),A0 0002483c 20 bc 00 00 00 03 | | MOVE.L #0x3,(A0) 00024842 7a 00 |z | MOVEQ.L #0x00,D5 00024844 55 4f |UO | SUBQ.L #0x2,A7 00024846 4e ba d2 08 |N | JSR 0x21a50 0002484a 1e 1f | | MOVE.B (A7)+,D7 0002484c be 03 | | CMP.B D3,D7 0002484e 67 16 |g | BEQ 0x24866 00024850 be 04 | | CMP.B D4,D7 00024852 67 12 |g | BEQ 0x24866 00024854 0c 07 00 2f | / | CMPI.B #0x2f,D7 00024858 67 0c |g | BEQ 0x24866 0002485a 0c 07 00 3d | = | CMPI.B #0x3d,D7 0002485e 67 06 |g | BEQ 0x24866 00024860 0c 07 00 5c | \ | CMPI.B #0x5c,D7 00024864 66 04 |f | BNE 0x2486a 00024866 7a 01 |z | MOVEQ.L #0x01,D5 00024868 60 06 |` | BRA 0x24870 0002486a 55 4f |UO | SUBQ.L #0x2,A7 0002486c 4e 93 |N | JSR (A3) 0002486e 1c 1f | | MOVE.B (A7)+,D6 00024870 4a 05 |J | TST.B D5 00024872 67 d0 |g | BEQ 0x24844 00024874 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024878 20 ae ff fa | | MOVE.L (A6-0x6),(A0) 0002487c 21 52 00 04 |!R | MOVE.L (A2),(A0+0x4) 00024880 53 a8 00 04 |S | SUBQ.L #0x1,(A0+0x4) 00024884 4c df 0f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3 00024888 4e 5e |N^ | UNLK A6 0002488a 4e 75 |Nu | RTS 0002488c ; -------------------------------------------------------------------------------------- 0002488c ; OMSI PASCAL Function 0002488c ; <LVAR 0x00c 4(r)> 0002488c ; <LVAR 0x008 4(r)> 0002488c ; -------------------------------------------------------------------------------------- 0002488c 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 00024890 bf d5 | | CMPA.L (A5),A7 00024892 62 06 |b | BHI 0x2489a 00024894 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024898 4e 76 |Nv | TRAPV 0002489a de fc 00 34 | 4 | ADDA.W #0x34,A7 0002489e 48 e7 c7 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D1+D0,-(A7) 000248a2 45 ee 00 0c |E | LEA.L (A6+0xc),A2 000248a6 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 000248aa 2f 08 |/ | MOVE.L A0,-(A7) 000248ac 2c 39 00 02 65 18 |,9 e | MOVE.L 0x26518,D6 000248b2 9c 92 | | SUB.L (A2),D6 000248b4 2a 12 |* | MOVE.L (A2),D5 000248b6 da 86 | | ADD.L D6,D5 000248b8 30 10 |0 | MOVE.W (A0),D0 000248ba 48 c0 |H | EXTW.L D0 000248bc b0 86 | | CMP.L D6,D0 000248be 67 0c |g | BEQ 0x248cc 000248c0 2f 05 |/ | MOVE.L D5,-(A7) 000248c2 2f 06 |/ | MOVE.L D6,-(A7) 000248c4 91 97 | | SUB.L D0,(A7) 000248c6 4e ba d6 7e |N ~ | JSR 0x21f46 000248ca 50 4f |PO | ADDQ.L #0x8,A7 000248cc 2f 00 |/ | MOVE.L D0,-(A7) 000248ce 7e 01 |~ | MOVEQ.L #0x01,D7 000248d0 be 97 | | CMP.L (A7),D7 000248d2 6e 34 |n4 | BGT 0x24908 000248d4 20 12 | | MOVE.L (A2),D0 000248d6 d0 87 | | ADD.L D7,D0 000248d8 53 80 |S | SUBQ.L #0x1,D0 000248da 53 80 |S | SUBQ.L #0x1,D0 000248dc 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 000248e2 63 02 |c | BLS 0x248e6 000248e4 4e 4f |NO | TRAP #15 000248e6 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 000248ec 22 07 |" | MOVE.L D7,D1 000248ee 53 81 |S | SUBQ.L #0x1,D1 000248f0 0c 81 00 00 00 7d | } | CMPI.L #0x0000007d,D1 000248f6 63 02 |c | BLS 0x248fa 000248f8 4e 4f |NO | TRAP #15 000248fa 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 000248fe 11 b1 18 02 08 08 | | MOVE.B (A1+D1.L+#0x2),(A0+D0.L+#0x8) 00024904 52 87 |R | ADDQ.L #0x1,D7 00024906 68 c8 |h | BVC 0x248d0 00024908 50 4f |PO | ADDQ.L #0x8,A7 0002490a 4c df 07 e3 |L | MOVEM.L (A7)+,D0+D1+D5+D6+D7+A0+A1+A2 0002490e 4e 5e |N^ | UNLK A6 00024910 4e 75 |Nu | RTS 00024912 ; -------------------------------------------------------------------------------------- 00024912 ; OMSI PASCAL Function 00024912 ; <LVAR 0x00c 4(r)> 00024912 ; <LVAR 0x008 4(r)> 00024912 ; <LVAR -0x008 @ 4(r)> 00024912 ; <LVAR -0x00c @ 4(r)> 00024912 ; <LVAR -0x010 4(r)> 00024912 ; <LVAR -0x014 @ 4(r)> 00024912 ; <LVAR -0x018 4(rw)> 00024912 ; <LVAR -0x01c 4(rw)> 00024912 ; <LVAR -0x020 4(rw)> 00024912 ; <LVAR -0x024 4(rw)> 00024912 ; <LVAR -0x028 4(rw)> 00024912 ; <LVAR -0x034 4(rw)> 00024912 ; -------------------------------------------------------------------------------------- 00024912 4e 56 ff 70 |NV p | LINK.W A6,#0xff70 00024916 bf d5 | | CMPA.L (A5),A7 00024918 62 06 |b | BHI 0x24920 0002491a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002491e 4e 76 |Nv | TRAPV 00024920 de fc 00 5c | \ | ADDA.W #0x5c,A7 00024924 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00024928 43 ee ff f8 |C | LEA.L (A6-0x8),A1 0002492c 45 ee ff ec |E | LEA.L (A6-0x14),A2 00024930 47 ee ff dc |G | LEA.L (A6-0x24),A3 00024934 49 ee ff e0 |I | LEA.L (A6-0x20),A4 00024938 74 14 |t | MOVEQ.L #0x14,D2 0002493a 2d 79 00 02 65 18 ff d8 |-y e | MOVE.L 0x26518,(A6-0x28) 00024942 48 51 |HQ | PEA.L (A1) 00024944 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 0002494a 58 4f |XO | ADDQ.L #0x4,A7 0002494c 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00024950 48 52 |HR | PEA.L (A2) 00024952 4e ba fd fe |N | JSR 0x24752 00024956 50 4f |PO | ADDQ.L #0x8,A7 00024958 42 ae ff cc |B | CLR.L (A6-0x34) 0002495c 7e 00 |~ | MOVEQ.L #0x00,D7 0002495e 20 2e ff cc | . | MOVE.L (A6-0x34),D0 00024962 b0 82 | | CMP.L D2,D0 00024964 63 02 |c | BLS 0x24968 00024966 4e 4e |NN | TRAP #14 00024968 d0 40 | @ | ADD.W D0,D0 0002496a 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00024972 00 2a | * | .CONST 0x2a ; [0x0] -> 0x2499c 00024974 00 34 | 4 | .CONST 0x34 ; [0x1] -> 0x249a6 00024976 00 48 | H | .CONST 0x48 ; [0x2] -> 0x249ba 00024978 00 64 | d | .CONST 0x64 ; [0x3] -> 0x249d6 0002497a 00 68 | h | .CONST 0x68 ; [0x4] -> 0x249da 0002497c 00 76 | v | .CONST 0x76 ; [0x5] -> 0x249e8 0002497e 00 8a | | .CONST 0x8a ; [0x6] -> 0x249fc 00024980 00 90 | | .CONST 0x90 ; [0x7] -> 0x24a02 00024982 00 92 | | .CONST 0x92 ; [0x8] -> 0x24a04 00024984 00 a8 | | .CONST 0xa8 ; [0x9] -> 0x24a1a 00024986 00 b6 | | .CONST 0xb6 ; [0xa] -> 0x24a28 00024988 00 ce | | .CONST 0xce ; [0xb] -> 0x24a40 0002498a 00 e2 | | .CONST 0xe2 ; [0xc] -> 0x24a54 0002498c 00 f6 | | .CONST 0xf6 ; [0xd] -> 0x24a68 0002498e 01 0c | | .CONST 0x10c ; [0xe] -> 0x24a7e 00024990 01 0e | | .CONST 0x10e ; [0xf] -> 0x24a80 00024992 01 28 | ( | .CONST 0x128 ; [0x10] -> 0x24a9a 00024994 01 3e | > | .CONST 0x13e ; [0x11] -> 0x24ab0 00024996 01 4c | L | .CONST 0x14c ; [0x12] -> 0x24abe 00024998 01 4e | N | .CONST 0x14e ; [0x13] -> 0x24ac0 0002499a 01 50 | P | .CONST 0x150 ; [0x14] -> 0x24ac2 0002499c switch@0x2496a[0x0]: 0002499c 7c 00 || | MOVEQ.L #0x00,D6 0002499e 2a 2e 00 08 |*. | MOVE.L (A6+0x8),D5 000249a2 60 00 01 48 |` H | BRA 0x24aec 000249a6 switch@0x2496a[0x1]: 000249a6 59 4f |YO | SUBQ.L #0x4,A7 000249a8 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 000249ac 2f 12 |/ | MOVE.L (A2),-(A7) 000249ae 4e ba f8 80 |N | JSR 0x24230 000249b2 50 4f |PO | ADDQ.L #0x8,A7 000249b4 2c 1f |, | MOVE.L (A7)+,D6 000249b6 60 00 01 34 |` 4 | BRA 0x24aec 000249ba switch@0x2496a[0x2]: 000249ba 2f 2e ff d8 |/. | MOVE.L (A6-0x28),-(A7) 000249be 2f 06 |/ | MOVE.L D6,-(A7) 000249c0 2f 06 |/ | MOVE.L D6,-(A7) 000249c2 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000249c6 4e ba f8 e4 |N | JSR 0x242ac 000249ca de fc 00 10 | | ADDA.W #0x10,A7 000249ce 60 00 01 78 |` x | BRA 0x24b48 000249d2 60 00 01 18 |` | .XXX[0x4] 000249d6 switch@0x2496a[0x3]: 000249d6 60 00 01 14 |` | BRA 0x24aec 000249da switch@0x2496a[0x4]: 000249da 2f 2e ff d8 |/. | MOVE.L (A6-0x28),-(A7) 000249de 2f 06 |/ | MOVE.L D6,-(A7) 000249e0 2f 05 |/ | MOVE.L D5,-(A7) 000249e2 60 de |` | BRA 0x249c2 000249e4 60 00 01 06 |` | .XXX[0x4] 000249e8 switch@0x2496a[0x5]: 000249e8 59 4f |YO | SUBQ.L #0x4,A7 000249ea 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 000249ee 2f 12 |/ | MOVE.L (A2),-(A7) 000249f0 4e ba f8 3e |N > | JSR 0x24230 000249f4 50 4f |PO | ADDQ.L #0x8,A7 000249f6 2a 1f |* | MOVE.L (A7)+,D5 000249f8 60 00 00 f2 |` | BRA 0x24aec 000249fc switch@0x2496a[0x6]: 000249fc 7c 01 || | MOVEQ.L #0x01,D6 000249fe 60 00 00 ec |` | BRA 0x24aec 00024a02 switch@0x2496a[0x7]: 00024a02 60 e4 |` | BRA switch@0x2496a[0x5] 00024a04 switch@0x2496a[0x8]: 00024a04 51 4f |QO | SUBQ.L #0x8,A7 00024a06 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024a0a 2f 06 |/ | MOVE.L D6,-(A7) 00024a0c 4e ba dc 2e |N . | JSR 0x2263c 00024a10 50 4f |PO | ADDQ.L #0x8,A7 00024a12 26 9f |& | MOVE.L (A7)+,(A3) 00024a14 28 9f |( | MOVE.L (A7)+,(A4) 00024a16 60 00 00 d4 |` | BRA 0x24aec 00024a1a switch@0x2496a[0x9]: 00024a1a 2d 52 ff e4 |-R | MOVE.L (A2),(A6-0x1c) 00024a1e 2d 6e ff f0 ff e8 |-n | MOVE.L (A6-0x10),(A6-0x18) 00024a24 60 00 00 c6 |` | BRA 0x24aec 00024a28 switch@0x2496a[0xa]: 00024a28 2f 11 |/ | MOVE.L (A1),-(A7) 00024a2a 2f 14 |/ | MOVE.L (A4),-(A7) 00024a2c 2f 13 |/ | MOVE.L (A3),-(A7) 00024a2e 2f 2e ff e8 |/. | MOVE.L (A6-0x18),-(A7) 00024a32 2f 2e ff e4 |/. | MOVE.L (A6-0x1c),-(A7) 00024a36 4e ba fb 26 |N & | JSR 0x2455e 00024a3a de c2 | | ADDA.W D2,A7 00024a3c 60 00 00 ae |` | BRA 0x24aec 00024a40 switch@0x2496a[0xb]: 00024a40 2f 11 |/ | MOVE.L (A1),-(A7) 00024a42 2f 14 |/ | MOVE.L (A4),-(A7) 00024a44 2f 13 |/ | MOVE.L (A3),-(A7) 00024a46 2f 2e ff e8 |/. | MOVE.L (A6-0x18),-(A7) 00024a4a 2f 2e ff e4 |/. | MOVE.L (A6-0x1c),-(A7) 00024a4e 4e ba fa 7a |N z | JSR 0x244ca 00024a52 60 e6 |` | BRA 0x24a3a 00024a54 switch@0x2496a[0xc]: 00024a54 2f 11 |/ | MOVE.L (A1),-(A7) 00024a56 2f 14 |/ | MOVE.L (A4),-(A7) 00024a58 2f 13 |/ | MOVE.L (A3),-(A7) 00024a5a 4e ba fb b8 |N | JSR 0x24614 00024a5e de fc 00 0c | | ADDA.W #0xc,A7 00024a62 7e 01 |~ | MOVEQ.L #0x01,D7 00024a64 60 00 00 86 |` | BRA 0x24aec 00024a68 switch@0x2496a[0xd]: 00024a68 2f 11 |/ | MOVE.L (A1),-(A7) 00024a6a 2f 14 |/ | MOVE.L (A4),-(A7) 00024a6c 2f 13 |/ | MOVE.L (A3),-(A7) 00024a6e 2f 2e ff e8 |/. | MOVE.L (A6-0x18),-(A7) 00024a72 2f 2e ff e4 |/. | MOVE.L (A6-0x1c),-(A7) 00024a76 4e ba fa 52 |N R | JSR 0x244ca 00024a7a de c2 | | ADDA.W D2,A7 00024a7c 60 e4 |` | BRA 0x24a62 00024a7e switch@0x2496a[0xe]: 00024a7e 60 e2 |` | BRA 0x24a62 00024a80 switch@0x2496a[0xf]: 00024a80 2f 11 |/ | MOVE.L (A1),-(A7) 00024a82 51 4f |QO | SUBQ.L #0x8,A7 00024a84 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024a88 2f 06 |/ | MOVE.L D6,-(A7) 00024a8a 4e ba db b0 |N | JSR 0x2263c 00024a8e 50 4f |PO | ADDQ.L #0x8,A7 00024a90 4e ba fb 82 |N | JSR 0x24614 00024a94 de fc 00 0c | | ADDA.W #0xc,A7 00024a98 60 52 |`R | BRA 0x24aec 00024a9a switch@0x2496a[0x10]: 00024a9a 2f 11 |/ | MOVE.L (A1),-(A7) 00024a9c 51 4f |QO | SUBQ.L #0x8,A7 00024a9e 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00024aa2 2f 06 |/ | MOVE.L D6,-(A7) 00024aa4 4e ba db 96 |N | JSR 0x2263c 00024aa8 50 4f |PO | ADDQ.L #0x8,A7 00024aaa 4e ba fb ee |N | JSR 0x2469a 00024aae 60 ae |` | BRA 0x24a5e 00024ab0 switch@0x2496a[0x11]: 00024ab0 2f 11 |/ | MOVE.L (A1),-(A7) 00024ab2 2f 2e ff f0 |/. | MOVE.L (A6-0x10),-(A7) 00024ab6 2f 12 |/ | MOVE.L (A2),-(A7) 00024ab8 4e ba fc 50 |N P | JSR 0x2470a 00024abc 60 d6 |` | BRA 0x24a94 00024abe switch@0x2496a[0x12]: 00024abe 60 2c |`, | BRA 0x24aec 00024ac0 switch@0x2496a[0x13]: 00024ac0 60 a0 |` | BRA 0x24a62 00024ac2 switch@0x2496a[0x14]: 00024ac2 41 fa cc 44 |A D | LEA.L 0x21708,A0 00024ac6 70 05 |p | MOVEQ.L #0x05,D0 00024ac8 2f 20 |/ | MOVE.L -(A0),-(A7) 00024aca 51 c8 ff fc |Q | DBF D0,0x24ac8 00024ace 59 4f |YO | SUBQ.L #0x4,A7 00024ad0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00024ad4 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00024ad8 3f 3c 00 18 |?< | MOVE.W #0x18,-(A7) 00024adc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00024ae2 50 4f |PO | ADDQ.L #0x8,A7 00024ae4 4e ba cf 0c |N | JSR 0x219f2 00024ae8 de fc 00 1c | | ADDA.W #0x1c,A7 00024aec 4a 07 |J | TST.B D7 00024aee 66 46 |fF | BNE 0x24b36 00024af0 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00024af4 48 52 |HR | PEA.L (A2) 00024af6 4e ba fc 5a |N Z | JSR 0x24752 00024afa 50 4f |PO | ADDQ.L #0x8,A7 00024afc 20 2e ff cc | . | MOVE.L (A6-0x34),D0 00024b00 0c 80 00 00 00 13 | | CMPI.L #0x00000013,D0 00024b06 63 02 |c | BLS 0x24b0a 00024b08 4e 4f |NO | TRAP #15 00024b0a 28 00 |( | MOVE.L D0,D4 00024b0c 76 07 |v | MOVEQ.L #0x07,D3 00024b0e 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00024b14 41 fa ce 0e |A | LEA.L 0x21924,A0 00024b18 20 2e ff f4 | . | MOVE.L (A6-0xc),D0 00024b1c 0c 80 00 00 00 06 | | CMPI.L #0x00000006,D0 00024b22 63 02 |c | BLS 0x24b26 00024b24 4e 4f |NO | TRAP #15 00024b26 41 f0 48 00 |A H | LEA.L (A0+D4.L),A0 00024b2a 12 30 08 00 | 0 | MOVE.B (A0+D0.L),D1 00024b2e 48 81 |H | EXTB.W D1 00024b30 48 c1 |H | EXTW.L D1 00024b32 2d 41 ff cc |-A | MOVE.L D1,(A6-0x34) 00024b36 4a 07 |J | TST.B D7 00024b38 67 00 fe 24 |g $ | BEQ 0x2495e 00024b3c 2f 2e ff d8 |/. | MOVE.L (A6-0x28),-(A7) 00024b40 2f 11 |/ | MOVE.L (A1),-(A7) 00024b42 4e ba fd 48 |N H | JSR 0x2488c 00024b46 50 4f |PO | ADDQ.L #0x8,A7 00024b48 48 51 |HQ | PEA.L (A1) 00024b4a 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00024b50 58 4f |XO | ADDQ.L #0x4,A7 00024b52 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00024b56 4e 5e |N^ | UNLK A6 00024b58 4e 75 |Nu | RTS 00024b5a ; -------------------------------------------------------------------------------------- 00024b5a ; OMSI PASCAL Function 00024b5a ; <LVAR 0x014 4(rw)> 00024b5a ; <LVAR 0x010 4(r)> 00024b5a ; <LVAR 0x00c 4(r)> 00024b5a ; <LVAR 0x008 4(r)> 00024b5a ; <LVAR -0x008 4(rw)> 00024b5a ; <LVAR -0x00c 4(rw)> 00024b5a ; <LVAR -0x018 4(w)> 00024b5a ; -------------------------------------------------------------------------------------- 00024b5a 4e 56 ff 96 |NV | LINK.W A6,#0xff96 00024b5e bf d5 | | CMPA.L (A5),A7 00024b60 62 06 |b | BHI 0x24b68 00024b62 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024b66 4e 76 |Nv | TRAPV 00024b68 de fc 00 52 | R | ADDA.W #0x52,A7 00024b6c 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00024b70 43 ee ff f8 |C | LEA.L (A6-0x8),A1 00024b74 45 ee 00 10 |E | LEA.L (A6+0x10),A2 00024b78 47 ee 00 0c |G | LEA.L (A6+0xc),A3 00024b7c 49 ee ff f4 |I | LEA.L (A6-0xc),A4 00024b80 74 0c |t | MOVEQ.L #0x0c,D2 00024b82 42 ae 00 14 |B | CLR.L (A6+0x14) 00024b86 59 4f |YO | SUBQ.L #0x4,A7 00024b88 2f 12 |/ | MOVE.L (A2),-(A7) 00024b8a 2f 13 |/ | MOVE.L (A3),-(A7) 00024b8c 4e ba da 76 |N v | JSR 0x22604 00024b90 50 4f |PO | ADDQ.L #0x8,A7 00024b92 28 9f |( | MOVE.L (A7)+,(A4) 00024b94 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024b98 30 10 |0 | MOVE.W (A0),D0 00024b9a 48 c0 |H | EXTW.L D0 00024b9c 52 80 |R | ADDQ.L #0x1,D0 00024b9e 22 80 |" | MOVE.L D0,(A1) 00024ba0 44 80 |D | NEG.L D0 00024ba2 d0 94 | | ADD.L (A4),D0 00024ba4 52 80 |R | ADDQ.L #0x1,D0 00024ba6 2f 00 |/ | MOVE.L D0,-(A7) 00024ba8 70 01 |p | MOVEQ.L #0x01,D0 00024baa b0 97 | | CMP.L (A7),D0 00024bac 6e 00 00 9a |n | BGT 0x24c48 00024bb0 2d 40 ff e8 |-@ | MOVE.L D0,(A6-0x18) 00024bb4 2f 00 |/ | MOVE.L D0,-(A7) 00024bb6 7c 00 || | MOVEQ.L #0x00,D6 00024bb8 2f 11 |/ | MOVE.L (A1),-(A7) 00024bba 7a 01 |z | MOVEQ.L #0x01,D5 00024bbc ba 97 | | CMP.L (A7),D5 00024bbe 6e 48 |nH | BGT 0x24c08 00024bc0 0c 85 00 00 00 01 | | CMPI.L #0x00000001,D5 00024bc6 66 04 |f | BNE 0x24bcc 00024bc8 7e 2f |~/ | MOVEQ.L #0x2f,D7 00024bca 60 18 |` | BRA 0x24be4 00024bcc 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024bd0 20 05 | | MOVE.L D5,D0 00024bd2 53 80 |S | SUBQ.L #0x1,D0 00024bd4 53 80 |S | SUBQ.L #0x1,D0 00024bd6 0c 80 00 00 00 7d | } | CMPI.L #0x0000007d,D0 00024bdc 63 02 |c | BLS 0x24be0 00024bde 4e 4f |NO | TRAP #15 00024be0 1e 30 08 02 | 0 | MOVE.B (A0+D0.L+#0x2),D7 00024be4 55 4f |UO | SUBQ.L #0x2,A7 00024be6 2f 12 |/ | MOVE.L (A2),-(A7) 00024be8 2f 13 |/ | MOVE.L (A3),-(A7) 00024bea 20 2f 00 0e | / | MOVE.L (A7+0xe),D0 00024bee d0 85 | | ADD.L D5,D0 00024bf0 53 80 |S | SUBQ.L #0x1,D0 00024bf2 2f 00 |/ | MOVE.L D0,-(A7) 00024bf4 4e ba f5 fa |N | JSR 0x241f0 00024bf8 de c2 | | ADDA.W D2,A7 00024bfa be 1f | | CMP.B (A7)+,D7 00024bfc 67 04 |g | BEQ 0x24c02 00024bfe 58 4f |XO | ADDQ.L #0x4,A7 00024c00 60 08 |` | BRA 0x24c0a 00024c02 2c 05 |, | MOVE.L D5,D6 00024c04 52 85 |R | ADDQ.L #0x1,D5 00024c06 68 b4 |h | BVC 0x24bbc 00024c08 58 4f |XO | ADDQ.L #0x4,A7 00024c0a bc 91 | | CMP.L (A1),D6 00024c0c 66 32 |f2 | BNE 0x24c40 00024c0e 20 17 | | MOVE.L (A7),D0 00024c10 22 00 |" | MOVE.L D0,D1 00024c12 d2 91 | | ADD.L (A1),D1 00024c14 b2 94 | | CMP.L (A4),D1 00024c16 6c 26 |l& | BGE 0x24c3e 00024c18 55 4f |UO | SUBQ.L #0x2,A7 00024c1a 2f 12 |/ | MOVE.L (A2),-(A7) 00024c1c 2f 13 |/ | MOVE.L (A3),-(A7) 00024c1e 2f 01 |/ | MOVE.L D1,-(A7) 00024c20 4e ba f5 ce |N | JSR 0x241f0 00024c24 de c2 | | ADDA.W D2,A7 00024c26 1e 1f | | MOVE.B (A7)+,D7 00024c28 0c 07 00 2f | / | CMPI.B #0x2f,D7 00024c2c 67 06 |g | BEQ 0x24c34 00024c2e 0c 07 00 3d | = | CMPI.B #0x3d,D7 00024c32 66 08 |f | BNE 0x24c3c 00024c34 2d 40 00 14 |-@ | MOVE.L D0,(A6+0x14) 00024c38 50 4f |PO | ADDQ.L #0x8,A7 00024c3a 60 0e |` | BRA 0x24c4a 00024c3c 60 02 |` | BRA 0x24c40 00024c3e 60 f4 |` | BRA 0x24c34 00024c40 20 1f | | MOVE.L (A7)+,D0 00024c42 52 80 |R | ADDQ.L #0x1,D0 00024c44 68 00 ff 64 |h d | BVC 0x24baa 00024c48 58 4f |XO | ADDQ.L #0x4,A7 00024c4a 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 00024c4e 4e 5e |N^ | UNLK A6 00024c50 4e 75 |Nu | RTS 00024c52 ; -------------------------------------------------------------------------------------- 00024c52 ; OMSI PASCAL Function 00024c52 ; <LVAR 0x018 4(r)> 00024c52 ; <LVAR 0x014 4(r)> 00024c52 ; <LVAR 0x010 4(r)> 00024c52 ; <LVAR 0x00c 4(r)> 00024c52 ; <LVAR 0x008 4(r)> 00024c52 ; <LVAR -0x008 4(rw)> 00024c52 ; <LVAR -0x014 4(rw)> 00024c52 ; <LVAR -0x018 4(rw)> 00024c52 ; <LVAR -0x01c 4(rw)> 00024c52 ; -------------------------------------------------------------------------------------- 00024c52 4e 56 ff 8e |NV | LINK.W A6,#0xff8e 00024c56 bf d5 | | CMPA.L (A5),A7 00024c58 62 06 |b | BHI 0x24c60 00024c5a 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024c5e 4e 76 |Nv | TRAPV 00024c60 de fc 00 56 | V | ADDA.W #0x56,A7 00024c64 48 e7 e7 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D2+D1+D0,-(A7) 00024c68 45 ee ff e4 |E | LEA.L (A6-0x1c),A2 00024c6c 47 ee ff e8 |G | LEA.L (A6-0x18),A3 00024c70 49 ee ff f8 |I | LEA.L (A6-0x8),A4 00024c74 72 0c |r | MOVEQ.L #0x0c,D1 00024c76 74 01 |t | MOVEQ.L #0x01,D2 00024c78 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00024c7c 42 10 |B | CLR.B (A0) 00024c7e 22 6e 00 0c |"n | MOVEA.L (A6+0xc),A1 00024c82 22 82 |" | MOVE.L D2,(A1) 00024c84 51 4f |QO | SUBQ.L #0x8,A7 00024c86 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 00024c8a 2f 2e 00 14 |/. | MOVE.L (A6+0x14),-(A7) 00024c8e 4e ba d9 ac |N | JSR 0x2263c 00024c92 50 4f |PO | ADDQ.L #0x8,A7 00024c94 24 9f |$ | MOVE.L (A7)+,(A2) 00024c96 26 9f |& | MOVE.L (A7)+,(A3) 00024c98 4a 92 |J | TST.L (A2) 00024c9a 67 00 00 96 |g | BEQ 0x24d32 00024c9e 59 4f |YO | SUBQ.L #0x4,A7 00024ca0 2f 13 |/ | MOVE.L (A3),-(A7) 00024ca2 2f 12 |/ | MOVE.L (A2),-(A7) 00024ca4 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 00024ca8 4e ba fe b0 |N | JSR 0x24b5a 00024cac de c1 | | ADDA.W D1,A7 00024cae 2d 5f ff ec |-_ | MOVE.L (A7)+,(A6-0x14) 00024cb2 67 7e |g~ | BEQ 0x24d32 00024cb4 10 82 | | MOVE.B D2,(A0) 00024cb6 48 51 |HQ | PEA.L (A1) 00024cb8 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00024cbe 2f 13 |/ | MOVE.L (A3),-(A7) 00024cc0 2f 12 |/ | MOVE.L (A2),-(A7) 00024cc2 4e ba d9 40 |N @ | JSR 0x22604 00024cc6 50 4f |PO | ADDQ.L #0x8,A7 00024cc8 28 9f |( | MOVE.L (A7)+,(A4) 00024cca 20 2e ff ec | . | MOVE.L (A6-0x14),D0 00024cce 52 80 |R | ADDQ.L #0x1,D0 00024cd0 2f 14 |/ | MOVE.L (A4),-(A7) 00024cd2 2a 00 |* | MOVE.L D0,D5 00024cd4 ba 97 | | CMP.L (A7),D5 00024cd6 6e 58 |nX | BGT 0x24d30 00024cd8 55 4f |UO | SUBQ.L #0x2,A7 00024cda 2f 13 |/ | MOVE.L (A3),-(A7) 00024cdc 2f 12 |/ | MOVE.L (A2),-(A7) 00024cde 2f 05 |/ | MOVE.L D5,-(A7) 00024ce0 4e ba f5 0e |N | JSR 0x241f0 00024ce4 de c1 | | ADDA.W D1,A7 00024ce6 10 1f | | MOVE.B (A7)+,D0 00024ce8 0c 00 00 3d | = | CMPI.B #0x3d,D0 00024cec 66 3e |f> | BNE 0x24d2c 00024cee 20 05 | | MOVE.L D5,D0 00024cf0 52 80 |R | ADDQ.L #0x1,D0 00024cf2 2f 14 |/ | MOVE.L (A4),-(A7) 00024cf4 2e 00 |. | MOVE.L D0,D7 00024cf6 be 97 | | CMP.L (A7),D7 00024cf8 6e 2e |n. | BGT 0x24d28 00024cfa 55 4f |UO | SUBQ.L #0x2,A7 00024cfc 2f 13 |/ | MOVE.L (A3),-(A7) 00024cfe 2f 12 |/ | MOVE.L (A2),-(A7) 00024d00 2f 07 |/ | MOVE.L D7,-(A7) 00024d02 4e ba f4 ec |N | JSR 0x241f0 00024d06 de c1 | | ADDA.W D1,A7 00024d08 1c 1f | | MOVE.B (A7)+,D6 00024d0a 0c 06 00 2f | / | CMPI.B #0x2f,D6 00024d0e 66 04 |f | BNE 0x24d14 00024d10 50 4f |PO | ADDQ.L #0x8,A7 00024d12 60 1e |` | BRA 0x24d32 00024d14 20 6e 00 0c | n | MOVEA.L (A6+0xc),A0 00024d18 2f 10 |/ | MOVE.L (A0),-(A7) 00024d1a 1f 06 | | MOVE.B D6,-(A7) 00024d1c 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 00024d22 5c 4f |\O | ADDQ.L #0x6,A7 00024d24 52 87 |R | ADDQ.L #0x1,D7 00024d26 68 ce |h | BVC 0x24cf6 00024d28 50 4f |PO | ADDQ.L #0x8,A7 00024d2a 60 06 |` | BRA 0x24d32 00024d2c 52 85 |R | ADDQ.L #0x1,D5 00024d2e 68 a4 |h | BVC 0x24cd4 00024d30 58 4f |XO | ADDQ.L #0x4,A7 00024d32 4c df 1f e7 |L | MOVEM.L (A7)+,D0+D1+D2+D5+D6+D7+A0+A1+A2+A3+A4 00024d36 4e 5e |N^ | UNLK A6 00024d38 4e 75 |Nu | RTS 00024d3a ; -------------------------------------------------------------------------------------- 00024d3a ; OMSI PASCAL Function 00024d3a ; <LVAR 0x00c @ 4(r)> 00024d3a ; <LVAR 0x008 4(r)> 00024d3a ; <LVAR -0x010 @ 1(r)> 00024d3a ; -------------------------------------------------------------------------------------- 00024d3a 4e 56 ff c0 |NV | LINK.W A6,#0xffc0 00024d3e bf d5 | | CMPA.L (A5),A7 00024d40 62 06 |b | BHI 0x24d48 00024d42 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024d46 4e 76 |Nv | TRAPV 00024d48 de fc 00 30 | 0 | ADDA.W #0x30,A7 00024d4c 48 e7 87 f0 |H | MOVEM.L A3+A2+A1+A0+D7+D6+D5+D0,-(A7) 00024d50 43 f9 00 02 65 18 |C e | LEA.L 0x26518,A1 00024d56 45 ee 00 08 |E | LEA.L (A6+0x8),A2 00024d5a 47 ee 00 0c |G | LEA.L (A6+0xc),A3 00024d5e 2f 13 |/ | MOVE.L (A3),-(A7) 00024d60 2f 12 |/ | MOVE.L (A2),-(A7) 00024d62 48 6e ff f0 |Hn | PEA.L (A6-0x10) 00024d66 4e b9 00 02 12 3e |N > | JSR 0x2123e 00024d6c de fc 00 0c | | ADDA.W #0xc,A7 00024d70 4a 2e ff f0 |J. | TST.B (A6-0x10) 00024d74 66 50 |fP | BNE 0x24dc6 00024d76 2e 11 |. | MOVE.L (A1),D7 00024d78 59 4f |YO | SUBQ.L #0x4,A7 00024d7a 2f 12 |/ | MOVE.L (A2),-(A7) 00024d7c 4e ba d0 80 |N | JSR 0x21dfe 00024d80 58 4f |XO | ADDQ.L #0x4,A7 00024d82 2c 1f |, | MOVE.L (A7)+,D6 00024d84 2f 13 |/ | MOVE.L (A3),-(A7) 00024d86 2f 12 |/ | MOVE.L (A2),-(A7) 00024d88 4e ba f3 2a |N * | JSR 0x240b4 00024d8c 50 4f |PO | ADDQ.L #0x8,A7 00024d8e 2a 11 |* | MOVE.L (A1),D5 00024d90 20 07 | | MOVE.L D7,D0 00024d92 53 80 |S | SUBQ.L #0x1,D0 00024d94 0c 80 00 00 0f ff | | CMPI.L #0x00000fff,D0 00024d9a 63 02 |c | BLS 0x24d9e 00024d9c 4e 4f |NO | TRAP #15 00024d9e 41 f9 00 02 55 10 |A U | LEA.L 0x25510,A0 00024da4 10 30 08 08 | 0 | MOVE.B (A0+D0.L+#0x8),D0 00024da8 0c 00 00 25 | % | CMPI.B #0x25,D0 00024dac 66 0c |f | BNE 0x24dba 00024dae 22 87 |" | MOVE.L D7,(A1) 00024db0 2f 12 |/ | MOVE.L (A2),-(A7) 00024db2 2f 06 |/ | MOVE.L D6,-(A7) 00024db4 4e ba fb 5c |N \ | JSR 0x24912 00024db8 50 4f |PO | ADDQ.L #0x8,A7 00024dba 52 87 |R | ADDQ.L #0x1,D7 00024dbc be b9 00 02 65 1c | e | CMP.L 0x2651c,D7 00024dc2 6f cc |o | BLE 0x24d90 00024dc4 22 85 |" | MOVE.L D5,(A1) 00024dc6 48 53 |HS | PEA.L (A3) 00024dc8 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00024dce 58 4f |XO | ADDQ.L #0x4,A7 00024dd0 4c df 0f e1 |L | MOVEM.L (A7)+,D0+D5+D6+D7+A0+A1+A2+A3 00024dd4 4e 5e |N^ | UNLK A6 00024dd6 4e 75 |Nu | RTS 00024dd8 ; -------------------------------------------------------------------------------------- 00024dd8 ; OMSI PASCAL Function 00024dd8 ; <LVAR -0x006 @ 4(r)> 00024dd8 ; <LVAR -0x00a @ 4(rw)> 00024dd8 ; <LVAR -0x00b 1(w)> 00024dd8 ; <LVAR -0x00c @ 1(r)> 00024dd8 ; -------------------------------------------------------------------------------------- 00024dd8 4e 56 ff 94 |NV | LINK.W A6,#0xff94 00024ddc bf d5 | | CMPA.L (A5),A7 00024dde 62 06 |b | BHI 0x24de6 00024de0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00024de4 4e 76 |Nv | TRAPV 00024de6 de fc 00 54 | T | ADDA.W #0x54,A7 00024dea 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00024dee 45 ee ff fa |E | LEA.L (A6-0x6),A2 00024df2 47 f9 00 02 65 18 |G e | LEA.L 0x26518,A3 00024df8 49 ee ff f6 |I | LEA.L (A6-0xa),A4 00024dfc 2e 13 |. | MOVE.L (A3),D7 00024dfe 48 52 |HR | PEA.L (A2) 00024e00 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00024e04 4e ba cf 4c |N L | JSR 0x21d52 00024e08 50 4f |PO | ADDQ.L #0x8,A7 00024e0a 2c 13 |, | MOVE.L (A3),D6 00024e0c 59 4f |YO | SUBQ.L #0x4,A7 00024e0e 2f 12 |/ | MOVE.L (A2),-(A7) 00024e10 4e ba cf ec |N | JSR 0x21dfe 00024e14 58 4f |XO | ADDQ.L #0x4,A7 00024e16 20 1f | | MOVE.L (A7)+,D0 00024e18 0c 80 ff ff ff ff | | CMPI.L #0xffffffff,D0 00024e1e 67 00 02 ac |g | BEQ 0x250cc 00024e22 59 4f |YO | SUBQ.L #0x4,A7 00024e24 2f 12 |/ | MOVE.L (A2),-(A7) 00024e26 48 78 00 00 |Hx | PEA.L 0x0 00024e2a 4e ba d8 ee |N | JSR 0x2271a 00024e2e 50 4f |PO | ADDQ.L #0x8,A7 00024e30 28 97 |( | MOVE.L (A7),(A4) 00024e32 54 4f |TO | ADDQ.L #0x2,A7 00024e34 2f 14 |/ | MOVE.L (A4),-(A7) 00024e36 4e ba f1 c4 |N | JSR 0x23ffc 00024e3a 58 4f |XO | ADDQ.L #0x4,A7 00024e3c 10 1f | | MOVE.B (A7)+,D0 00024e3e 48 80 |H | EXTB.W D0 00024e40 41 bc 00 2b |A + | CHK.W #0x2b,D0 00024e44 1d 40 ff f5 | @ | MOVE.B D0,(A6-0xb) 00024e48 4a 00 |J | TST.B D0 00024e4a 66 0e |f | BNE 0x24e5a 00024e4c 2f 14 |/ | MOVE.L (A4),-(A7) 00024e4e 2f 12 |/ | MOVE.L (A2),-(A7) 00024e50 4e ba fe e8 |N | JSR 0x24d3a 00024e54 50 4f |PO | ADDQ.L #0x8,A7 00024e56 60 00 02 6c |` l | BRA 0x250c4 00024e5a 48 54 |HT | PEA.L (A4) 00024e5c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00024e62 58 4f |XO | ADDQ.L #0x4,A7 00024e64 12 00 | | MOVE.B D0,D1 00024e66 48 81 |H | EXTB.W D1 00024e68 43 bc 00 2b |C + | CHK.W #0x2b,D1 00024e6c 41 fa ca 86 |A | LEA.L 0x218f4,A0 00024e70 30 01 |0 | MOVE.W D1,D0 00024e72 48 c0 |H | EXTW.L D0 00024e74 24 00 |$ | MOVE.L D0,D2 00024e76 e2 9a | | ROR.L #0x1,D2 00024e78 d0 c2 | | ADDA.W D2,A0 00024e7a 48 42 |HB | SWAP.W D2 00024e7c e7 5a | Z | ROL.W #0x3,D2 00024e7e 42 83 |B | CLR.L D3 00024e80 16 10 | | MOVE.B (A0),D3 00024e82 e5 2b | + | LSL.B D2,D3 00024e84 e8 0b | | LSR.B #0x4,D3 00024e86 2a 03 |* | MOVE.L D3,D5 00024e88 0c 85 00 00 00 0f | | CMPI.L #0x0000000f,D5 00024e8e 67 2c |g, | BEQ 0x24ebc 00024e90 28 00 |( | MOVE.L D0,D4 00024e92 76 0a |v | MOVEQ.L #0x0a,D3 00024e94 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00024e9a 41 fa c8 8a |A | LEA.L COMMAND_TABLE_21726,A0 00024e9e 9e fc 00 0a | | SUBA.W #0xa,A7 00024ea2 22 4f |"O | MOVEA.L A7,A1 00024ea4 41 f0 40 00 |A @ | LEA.L (A0+D4.W),A0 00024ea8 70 09 |p | MOVEQ.L #0x09,D0 00024eaa 12 d8 | | MOVE.B (A0)+,(A1)+ 00024eac 51 c8 ff fc |Q | DBF D0,0x24eaa 00024eb0 2f 12 |/ | MOVE.L (A2),-(A7) 00024eb2 2f 05 |/ | MOVE.L D5,-(A7) 00024eb4 4e ba cf 7e |N ~ | JSR 0x21e34 00024eb8 de fc 00 12 | | ADDA.W #0x12,A7 00024ebc 53 41 |SA | SUBQ.W #0x1,D1 00024ebe 0c 41 00 2a | A * | CMPI.W #0x002a,D1 00024ec2 63 02 |c | BLS 0x24ec6 00024ec4 4e 4e |NN | TRAP #14 00024ec6 d2 41 | A | ADD.W D1,D1 00024ec8 32 3b 10 06 4e fb 10 02 |2; N | SWITCH D1.W 00024ed0 00 56 | V | .CONST 0x56 ; [0x0] -> 0x24f26 00024ed2 00 62 | b | .CONST 0x62 ; [0x1] -> 0x24f32 00024ed4 00 74 | t | .CONST 0x74 ; [0x2] -> 0x24f44 00024ed6 00 82 | | .CONST 0x82 ; [0x3] -> 0x24f52 00024ed8 01 e6 | | .CONST 0x1e6 ; [0x4] -> 0x250b6 00024eda 00 8a | | .CONST 0x8a ; [0x5] -> 0x24f5a 00024edc 00 8e | | .CONST 0x8e ; [0x6] -> 0x24f5e 00024ede 00 96 | | .CONST 0x96 ; [0x7] -> 0x24f66 00024ee0 00 9e | | .CONST 0x9e ; [0x8] -> 0x24f6e 00024ee2 00 a6 | | .CONST 0xa6 ; [0x9] -> 0x24f76 00024ee4 00 ae | | .CONST 0xae ; [0xa] -> 0x24f7e 00024ee6 00 b6 | | .CONST 0xb6 ; [0xb] -> 0x24f86 00024ee8 00 be | | .CONST 0xbe ; [0xc] -> 0x24f8e 00024eea 00 c6 | | .CONST 0xc6 ; [0xd] -> 0x24f96 00024eec 00 ce | | .CONST 0xce ; [0xe] -> 0x24f9e 00024eee 00 d6 | | .CONST 0xd6 ; [0xf] -> 0x24fa6 00024ef0 00 e0 | | .CONST 0xe0 ; [0x10] -> 0x24fb0 00024ef2 00 ea | | .CONST 0xea ; [0x11] -> 0x24fba 00024ef4 00 f4 | | .CONST 0xf4 ; [0x12] -> 0x24fc4 00024ef6 00 fe | | .CONST 0xfe ; [0x13] -> 0x24fce 00024ef8 01 08 | | .CONST 0x108 ; [0x14] -> 0x24fd8 00024efa 01 12 | | .CONST 0x112 ; [0x15] -> 0x24fe2 00024efc 01 1c | | .CONST 0x11c ; [0x16] -> 0x24fec 00024efe 01 26 | & | .CONST 0x126 ; [0x17] -> 0x24ff6 00024f00 01 30 | 0 | .CONST 0x130 ; [0x18] -> 0x25000 00024f02 01 3a | : | .CONST 0x13a ; [0x19] -> 0x2500a 00024f04 01 44 | D | .CONST 0x144 ; [0x1a] -> 0x25014 00024f06 01 4e | N | .CONST 0x14e ; [0x1b] -> 0x2501e 00024f08 01 58 | X | .CONST 0x158 ; [0x1c] -> 0x25028 00024f0a 01 62 | b | .CONST 0x162 ; [0x1d] -> 0x25032 00024f0c 01 6c | l | .CONST 0x16c ; [0x1e] -> 0x2503c 00024f0e 01 76 | v | .CONST 0x176 ; [0x1f] -> 0x25046 00024f10 01 80 | | .CONST 0x180 ; [0x20] -> 0x25050 00024f12 01 8a | | .CONST 0x18a ; [0x21] -> 0x2505a 00024f14 01 94 | | .CONST 0x194 ; [0x22] -> 0x25064 00024f16 01 9e | | .CONST 0x19e ; [0x23] -> 0x2506e 00024f18 01 a8 | | .CONST 0x1a8 ; [0x24] -> 0x25078 00024f1a 01 b2 | | .CONST 0x1b2 ; [0x25] -> 0x25082 00024f1c 01 b8 | | .CONST 0x1b8 ; [0x26] -> 0x25088 00024f1e 01 c2 | | .CONST 0x1c2 ; [0x27] -> 0x25092 00024f20 01 cc | | .CONST 0x1cc ; [0x28] -> 0x2509c 00024f22 01 d6 | | .CONST 0x1d6 ; [0x29] -> 0x250a6 00024f24 01 dc | | .CONST 0x1dc ; [0x2a] -> 0x250ac 00024f26 switch@0x24ec8[0x0]: 00024f26 2f 12 |/ | MOVE.L (A2),-(A7) 00024f28 4e ba d9 78 |N x | JSR 0x228a2 00024f2c 58 4f |XO | ADDQ.L #0x4,A7 00024f2e 60 00 01 94 |` | BRA 0x250c4 00024f32 switch@0x24ec8[0x1]: 00024f32 42 27 |B' | CLR.B -(A7) 00024f34 48 78 00 01 |Hx | PEA.L 0x1 00024f38 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00024f3e 5c 4f |\O | ADDQ.L #0x6,A7 00024f40 60 00 01 82 |` | BRA 0x250c4 00024f44 switch@0x24ec8[0x2]: 00024f44 59 4f |YO | SUBQ.L #0x4,A7 00024f46 4e b9 00 01 02 ac |N | JSR FSCALL_102ac 00024f4c 4e ba d9 2a |N * | JSR 0x22878 00024f50 60 da |` | BRA 0x24f2c 00024f52 switch@0x24ec8[0x3]: 00024f52 2f 12 |/ | MOVE.L (A2),-(A7) 00024f54 4e ba db 26 |N & | JSR 0x22a7c 00024f58 60 d2 |` | BRA 0x24f2c 00024f5a switch@0x24ec8[0x5]: 00024f5a 60 00 01 68 |` h | BRA 0x250c4 00024f5e switch@0x24ec8[0x6]: 00024f5e 2f 12 |/ | MOVE.L (A2),-(A7) 00024f60 4e ba de 40 |N @ | JSR 0x22da2 00024f64 60 c6 |` | BRA 0x24f2c 00024f66 switch@0x24ec8[0x7]: 00024f66 2f 12 |/ | MOVE.L (A2),-(A7) 00024f68 4e ba df a4 |N | JSR 0x22f0e 00024f6c 60 be |` | BRA 0x24f2c 00024f6e switch@0x24ec8[0x8]: 00024f6e 2f 12 |/ | MOVE.L (A2),-(A7) 00024f70 4e ba e0 8a |N | JSR 0x22ffc 00024f74 60 b6 |` | BRA 0x24f2c 00024f76 switch@0x24ec8[0x9]: 00024f76 2f 12 |/ | MOVE.L (A2),-(A7) 00024f78 4e ba e4 76 |N v | JSR 0x233f0 00024f7c 60 ae |` | BRA 0x24f2c 00024f7e switch@0x24ec8[0xa]: 00024f7e 2f 12 |/ | MOVE.L (A2),-(A7) 00024f80 4e ba e4 e6 |N | JSR 0x23468 00024f84 60 a6 |` | BRA 0x24f2c 00024f86 switch@0x24ec8[0xb]: 00024f86 2f 12 |/ | MOVE.L (A2),-(A7) 00024f88 4e ba e5 56 |N V | JSR 0x234e0 00024f8c 60 9e |` | BRA 0x24f2c 00024f8e switch@0x24ec8[0xc]: 00024f8e 2f 12 |/ | MOVE.L (A2),-(A7) 00024f90 4e ba e5 7a |N z | JSR 0x2350c 00024f94 60 96 |` | BRA 0x24f2c 00024f96 switch@0x24ec8[0xd]: 00024f96 2f 12 |/ | MOVE.L (A2),-(A7) 00024f98 4e ba e6 72 |N r | JSR 0x2360c 00024f9c 60 8e |` | BRA 0x24f2c 00024f9e switch@0x24ec8[0xe]: 00024f9e 2f 12 |/ | MOVE.L (A2),-(A7) 00024fa0 4e ba e7 50 |N P | JSR 0x236f2 00024fa4 60 86 |` | BRA 0x24f2c 00024fa6 switch@0x24ec8[0xf]: 00024fa6 2f 12 |/ | MOVE.L (A2),-(A7) 00024fa8 4e ba e7 74 |N t | JSR 0x2371e 00024fac 60 00 ff 7e |` ~ | BRA 0x24f2c 00024fb0 switch@0x24ec8[0x10]: 00024fb0 2f 12 |/ | MOVE.L (A2),-(A7) 00024fb2 4e ba e7 b6 |N | JSR 0x2376a 00024fb6 60 00 ff 74 |` t | BRA 0x24f2c 00024fba switch@0x24ec8[0x11]: 00024fba 2f 12 |/ | MOVE.L (A2),-(A7) 00024fbc 4e ba e7 f8 |N | JSR 0x237b6 00024fc0 60 00 ff 6a |` j | BRA 0x24f2c 00024fc4 switch@0x24ec8[0x12]: 00024fc4 2f 12 |/ | MOVE.L (A2),-(A7) 00024fc6 4e ba e8 3a |N : | JSR 0x23802 00024fca 60 00 ff 60 |` ` | BRA 0x24f2c 00024fce switch@0x24ec8[0x13]: 00024fce 2f 12 |/ | MOVE.L (A2),-(A7) 00024fd0 4e ba e8 7c |N | | JSR 0x2384e 00024fd4 60 00 ff 56 |` V | BRA 0x24f2c 00024fd8 switch@0x24ec8[0x14]: 00024fd8 2f 12 |/ | MOVE.L (A2),-(A7) 00024fda 4e ba e8 be |N | JSR 0x2389a 00024fde 60 00 ff 4c |` L | BRA 0x24f2c 00024fe2 switch@0x24ec8[0x15]: 00024fe2 2f 12 |/ | MOVE.L (A2),-(A7) 00024fe4 4e ba e9 00 |N | JSR 0x238e6 00024fe8 60 00 ff 42 |` B | BRA 0x24f2c 00024fec switch@0x24ec8[0x16]: 00024fec 2f 12 |/ | MOVE.L (A2),-(A7) 00024fee 4e ba e9 40 |N @ | JSR 0x23930 00024ff2 60 00 ff 38 |` 8 | BRA 0x24f2c 00024ff6 switch@0x24ec8[0x17]: 00024ff6 2f 12 |/ | MOVE.L (A2),-(A7) 00024ff8 4e ba e9 80 |N | JSR 0x2397a 00024ffc 60 00 ff 2e |` . | BRA 0x24f2c 00025000 switch@0x24ec8[0x18]: 00025000 2f 12 |/ | MOVE.L (A2),-(A7) 00025002 4e ba e9 c0 |N | JSR 0x239c4 00025006 60 00 ff 24 |` $ | BRA 0x24f2c 0002500a switch@0x24ec8[0x19]: 0002500a 2f 12 |/ | MOVE.L (A2),-(A7) 0002500c 4e ba ea 00 |N | JSR 0x23a0e 00025010 60 00 ff 1a |` | BRA 0x24f2c 00025014 switch@0x24ec8[0x1a]: 00025014 2f 12 |/ | MOVE.L (A2),-(A7) 00025016 4e ba ea 40 |N @ | JSR 0x23a58 0002501a 60 00 ff 10 |` | BRA 0x24f2c 0002501e switch@0x24ec8[0x1b]: 0002501e 2f 12 |/ | MOVE.L (A2),-(A7) 00025020 4e ba ea 80 |N | JSR 0x23aa2 00025024 60 00 ff 06 |` | BRA 0x24f2c 00025028 switch@0x24ec8[0x1c]: 00025028 2f 12 |/ | MOVE.L (A2),-(A7) 0002502a 4e ba ea c0 |N | JSR 0x23aec 0002502e 60 00 fe fc |` | BRA 0x24f2c 00025032 switch@0x24ec8[0x1d]: 00025032 2f 12 |/ | MOVE.L (A2),-(A7) 00025034 4e ba eb 00 |N | JSR 0x23b36 00025038 60 00 fe f2 |` | BRA 0x24f2c 0002503c switch@0x24ec8[0x1e]: 0002503c 2f 12 |/ | MOVE.L (A2),-(A7) 0002503e 4e ba eb 3a |N : | JSR 0x23b7a 00025042 60 00 fe e8 |` | BRA 0x24f2c 00025046 switch@0x24ec8[0x1f]: 00025046 2f 12 |/ | MOVE.L (A2),-(A7) 00025048 4e ba eb 76 |N v | JSR 0x23bc0 0002504c 60 00 fe de |` | BRA 0x24f2c 00025050 switch@0x24ec8[0x20]: 00025050 2f 12 |/ | MOVE.L (A2),-(A7) 00025052 4e ba eb a2 |N | JSR 0x23bf6 00025056 60 00 fe d4 |` | BRA 0x24f2c 0002505a switch@0x24ec8[0x21]: 0002505a 2f 12 |/ | MOVE.L (A2),-(A7) 0002505c 4e ba ec 28 |N ( | JSR 0x23c86 00025060 60 00 fe ca |` | BRA 0x24f2c 00025064 switch@0x24ec8[0x22]: 00025064 2f 12 |/ | MOVE.L (A2),-(A7) 00025066 4e ba ec 90 |N | JSR 0x23cf8 0002506a 60 00 fe c0 |` | BRA 0x24f2c 0002506e switch@0x24ec8[0x23]: 0002506e 2f 12 |/ | MOVE.L (A2),-(A7) 00025070 4e ba df ec |N | JSR 0x2305e 00025074 60 00 fe b6 |` | BRA 0x24f2c 00025078 switch@0x24ec8[0x24]: 00025078 2f 12 |/ | MOVE.L (A2),-(A7) 0002507a 4e ba e0 4c |N L | JSR 0x230c8 0002507e 60 00 fe ac |` | BRA 0x24f2c 00025082 switch@0x24ec8[0x25]: 00025082 4e ba e0 16 |N | JSR 0x2309a 00025086 60 3c |`< | BRA 0x250c4 00025088 switch@0x24ec8[0x26]: 00025088 2f 12 |/ | MOVE.L (A2),-(A7) 0002508a 4e ba ec de |N | JSR 0x23d6a 0002508e 60 00 fe 9c |` | BRA 0x24f2c 00025092 switch@0x24ec8[0x27]: 00025092 2f 12 |/ | MOVE.L (A2),-(A7) 00025094 4e ba ed 56 |N V | JSR 0x23dec 00025098 60 00 fe 92 |` | BRA 0x24f2c 0002509c switch@0x24ec8[0x28]: 0002509c 2f 12 |/ | MOVE.L (A2),-(A7) 0002509e 4e ba ed cc |N | JSR 0x23e6c 000250a2 60 00 fe 88 |` | BRA 0x24f2c 000250a6 switch@0x24ec8[0x29]: 000250a6 4e ba ee 88 |N | JSR 0x23f30 000250aa 60 18 |` | BRA 0x250c4 000250ac switch@0x24ec8[0x2a]: 000250ac 2f 12 |/ | MOVE.L (A2),-(A7) 000250ae 4e ba ee a0 |N | JSR 0x23f50 000250b2 60 00 fe 78 |` x | BRA 0x24f2c 000250b6 switch@0x24ec8[0x4]: 000250b6 2e 6d 00 08 |.m | MOVEA.L (A5+0x8),A7 000250ba 3c 7c 00 00 |<| | MOVEA.W #0x0,A6 000250be 4e f9 00 02 52 ce |N R | JMP 0x252ce 000250c4 2f 12 |/ | MOVE.L (A2),-(A7) 000250c6 4e ba c8 e8 |N | JSR 0x219b0 000250ca 58 4f |XO | ADDQ.L #0x4,A7 000250cc 2f 06 |/ | MOVE.L D6,-(A7) 000250ce 2f 06 |/ | MOVE.L D6,-(A7) 000250d0 9f 97 | | SUB.L D7,(A7) 000250d2 4e ba ce 72 |N r | JSR 0x21f46 000250d6 50 4f |PO | ADDQ.L #0x8,A7 000250d8 26 87 |& | MOVE.L D7,(A3) 000250da 4a 2e ff f4 |J. | TST.B (A6-0xc) 000250de 67 00 fd 1c |g | BEQ 0x24dfc 000250e2 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000250e6 4e 5e |N^ | UNLK A6 000250e8 4e 75 |Nu | RTS 000250ea ; -------------------------------------------------------------------------------------- 000250ea ; OMSI PASCAL Function 000250ea ; -------------------------------------------------------------------------------------- 000250ea START: 000250ea 4f fa 00 08 |O | LEA.L MAIN,A7 000250ee 4e f9 00 01 02 80 |N | JMP ?start_program 000250f4 MAIN: 000250f4 23 fc 00 00 00 01 00 02 |# | MOVE.L #0x1,0x26542 000250fc 65 42 |eB | 000250fe 59 4f |YO | SUBQ.L #0x4,A7 00025100 4e b9 00 01 03 c4 |N | JSR GetArgv() : String 00025106 23 df 00 02 65 46 |# eF | MOVE.L (A7)+,0x26546 0002510c 48 79 00 02 65 20 |Hy e | PEA.L 0x26520 00025112 4e b9 00 02 12 fc |N | JSR 0x212fc 00025118 58 4f |XO | ADDQ.L #0x4,A7 0002511a 20 79 00 02 65 46 | y eF | MOVEA.L 0x26546,A0 00025120 4a 50 |JP | TST.W (A0) 00025122 6f 68 |oh | BLE 0x2518c 00025124 51 4f |QO | SUBQ.L #0x8,A7 00025126 20 4f | O | MOVEA.L A7,A0 00025128 43 fa c5 de |C | LEA.L 0x21708,A1 0002512c 70 06 |p | MOVEQ.L #0x06,D0 0002512e 10 d9 | | MOVE.B (A1)+,(A0)+ 00025130 51 c8 ff fc |Q | DBF D0,0x2512e 00025134 51 4f |QO | SUBQ.L #0x8,A7 00025136 20 4f | O | MOVEA.L A7,A0 00025138 43 fa c5 d6 |C | LEA.L 0x21710,A1 0002513c 70 06 |p | MOVEQ.L #0x06,D0 0002513e 10 d9 | | MOVE.B (A1)+,(A0)+ 00025140 51 c8 ff fc |Q | DBF D0,0x2513e 00025144 51 4f |QO | SUBQ.L #0x8,A7 00025146 48 6f 00 10 |Ho | PEA.L (A7+0x10) 0002514a 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002514e 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 00025152 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025158 58 4f |XO | ADDQ.L #0x4,A7 0002515a 2e b9 00 02 65 46 |. eF | MOVE.L 0x26546,(A7) 00025160 59 4f |YO | SUBQ.L #0x4,A7 00025162 48 6f 00 10 |Ho | PEA.L (A7+0x10) 00025166 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002516a 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 0002516e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025174 50 4f |PO | ADDQ.L #0x8,A7 00025176 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 0002517c de fc 00 0c | | ADDA.W #0xc,A7 00025180 23 df 00 02 65 46 |# eF | MOVE.L (A7)+,0x26546 00025186 de fc 00 10 | | ADDA.W #0x10,A7 0002518a 60 3a |`: | BRA 0x251c6 0002518c 48 79 00 02 65 46 |Hy eF | PEA.L 0x26546 00025192 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00025198 59 4f |YO | SUBQ.L #0x4,A7 0002519a 20 4f | O | MOVEA.L A7,A0 0002519c 43 fa c5 7a |C z | LEA.L 0x21718,A1 000251a0 70 06 |p | MOVEQ.L #0x06,D0 000251a2 10 d9 | | MOVE.B (A1)+,(A0)+ 000251a4 51 c8 ff fc |Q | DBF D0,0x251a2 000251a8 59 4f |YO | SUBQ.L #0x4,A7 000251aa 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000251ae 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000251b2 3f 3c 00 07 |?< | MOVE.W #0x7,-(A7) 000251b6 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000251bc 50 4f |PO | ADDQ.L #0x8,A7 000251be 23 df 00 02 65 46 |# eF | MOVE.L (A7)+,0x26546 000251c4 50 4f |PO | ADDQ.L #0x8,A7 000251c6 13 fc 00 01 00 02 65 50 | eP| MOVE.B #0x01,0x26550 000251ce 4a 39 00 02 65 50 |J9 eP | TST.B 0x26550 000251d4 67 0a |g | BEQ 0x251e0 000251d6 42 39 00 02 65 50 |B9 eP | CLR.B 0x26550 000251dc 60 00 00 b0 |` | BRA 0x2528e 000251e0 41 f9 00 02 65 2a |A e* | LEA.L 0x2652a,A0 000251e6 70 04 |p | MOVEQ.L #0x04,D0 000251e8 3f 20 |? | MOVE.W -(A0),-(A7) 000251ea 51 c8 ff fc |Q | DBF D0,0x251e8 000251ee 3f 3a c5 30 |?: 0 | MOVE.W 0x21720,-(A7) 000251f2 9e fc 00 0c | | SUBA.W #0xc,A7 000251f6 48 6f 00 0e |Ho | PEA.L (A7+0xe) 000251fa 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000251fe 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 00025202 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00025208 58 4f |XO | ADDQ.L #0x4,A7 0002520a 48 6f 00 10 |Ho | PEA.L (A7+0x10) 0002520e 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025212 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00025216 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002521c 50 4f |PO | ADDQ.L #0x8,A7 0002521e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00025224 50 4f |PO | ADDQ.L #0x8,A7 00025226 4e b9 00 01 03 e4 |N | JSR AskConsoleString(prompt : String) : String 0002522c 58 4f |XO | ADDQ.L #0x4,A7 0002522e 23 df 00 02 65 4c |# eL | MOVE.L (A7)+,0x2654c 00025234 50 4f |PO | ADDQ.L #0x8,A7 00025236 2e b9 00 02 65 4c |. eL | MOVE.L 0x2654c,(A7) 0002523c 4e ba ca 0c |N | JSR 0x21c4a 00025240 54 4f |TO | ADDQ.L #0x2,A7 00025242 3e ba c4 de |> | MOVE.W 0x21722,(A7) 00025246 3f 3a c4 dc |?: | MOVE.W 0x21724,-(A7) 0002524a 51 4f |QO | SUBQ.L #0x8,A7 0002524c 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00025250 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025254 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00025258 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002525e 58 4f |XO | ADDQ.L #0x4,A7 00025260 2e b9 00 02 65 4c |. eL | MOVE.L 0x2654c,(A7) 00025266 59 4f |YO | SUBQ.L #0x4,A7 00025268 48 6f 00 10 |Ho | PEA.L (A7+0x10) 0002526c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025270 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00025274 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002527a 50 4f |PO | ADDQ.L #0x8,A7 0002527c 4e b9 00 01 02 d4 |N | JSR StringCat3(a, b, c : String) : String 00025282 de fc 00 0c | | ADDA.W #0xc,A7 00025286 23 df 00 02 65 46 |# eF | MOVE.L (A7)+,0x26546 0002528c 58 4f |XO | ADDQ.L #0x4,A7 0002528e 42 39 00 02 65 4a |B9 eJ | CLR.B 0x2654a 00025294 23 fc 00 00 00 01 00 02 |# | MOVE.L #0x1,0x26518 0002529c 65 18 |e | 0002529e 42 b9 00 02 65 1c |B e | CLR.L 0x2651c 000252a4 59 4f |YO | SUBQ.L #0x4,A7 000252a6 2f 39 00 02 65 46 |/9 eF | MOVE.L 0x26546,-(A7) 000252ac 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 000252b2 58 4f |XO | ADDQ.L #0x4,A7 000252b4 4e ba d5 06 |N | JSR 0x227bc 000252b8 58 4f |XO | ADDQ.L #0x4,A7 000252ba 20 39 00 02 65 18 | 9 e | MOVE.L 0x26518,D0 000252c0 b0 b9 00 02 65 1c | e | CMP.L 0x2651c,D0 000252c6 6e 06 |n | BGT 0x252ce 000252c8 4e ba fb 0e |N | JSR 0x24dd8 000252cc 60 ec |` | BRA 0x252ba 000252ce 48 79 00 02 65 46 |Hy eF | PEA.L 0x26546 000252d4 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000252da 58 4f |XO | ADDQ.L #0x4,A7 000252dc 60 00 fe f0 |` | BRA 0x251ce 000252e0 4e b9 00 01 02 84 |N | .XXX[0x6] 000252e6 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 000252f4 ; -------------------------------------------------------------------------------------- 000252f4 ; OMSI PASCAL Function 000252f4 ; <LVAR 0x008 1(r)> 000252f4 ; -------------------------------------------------------------------------------------- 000252f4 PROG_FAIL: 000252f4 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 000252f8 bf d5 | | CMPA.L (A5),A7 000252fa 62 06 |b | BHI 0x25302 000252fc 44 fc 00 02 |D | MOVE.W #0x2,CCR 00025300 4e 76 |Nv | TRAPV 00025302 de fc 00 2c | , | ADDA.W #0x2c,A7 00025306 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 0002530a 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 0002530e 70 06 |p | MOVEQ.L #0x06,D0 00025310 3f 20 |? | MOVE.W -(A0),-(A7) 00025312 51 c8 ff fc |Q | DBF D0,0x25310 00025316 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 0002531a 51 4f |QO | SUBQ.L #0x8,A7 0002531c 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00025320 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00025324 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 00025328 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002532e 58 4f |XO | ADDQ.L #0x4,A7 00025330 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00025334 48 80 |H | EXTB.W D0 00025336 48 c0 |H | EXTW.L D0 00025338 2f 00 |/ | MOVE.L D0,-(A7) 0002533a 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00025340 58 4f |XO | ADDQ.L #0x4,A7 00025342 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00025348 50 4f |PO | ADDQ.L #0x8,A7 0002534a 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00025350 de fc 00 14 | | ADDA.W #0x14,A7 00025354 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 00025358 4e 5e |N^ | UNLK A6 0002535a 4e 75 |Nu | RTS 0002535c 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 0002536a 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00025378 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 00025386 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00025398 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 000253b0 ; -------------------------------------------------------------------------------------- 000253b0 ; OMSI PASCAL Function 000253b0 ; <LVAR 0x00e 1(r)> 000253b0 ; <LVAR 0x00a 4(r)> 000253b0 ; <LVAR 0x008 1(r)> 000253b0 ; -------------------------------------------------------------------------------------- 000253b0 EXP_FAIL: 000253b0 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 000253b4 bf d5 | | CMPA.L (A5),A7 000253b6 62 06 |b | BHI 0x253be 000253b8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000253bc 4e 76 |Nv | TRAPV 000253be de fc 00 74 | t | ADDA.W #0x74,A7 000253c2 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 000253c6 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 000253cc 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 000253d2 72 01 |r | MOVEQ.L #0x01,D1 000253d4 74 0d |t | MOVEQ.L #0x0d,D2 000253d6 76 1e |v | MOVEQ.L #0x1e,D3 000253d8 78 12 |x | MOVEQ.L #0x12,D4 000253da 7a 0e |z | MOVEQ.L #0x0e,D5 000253dc 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 000253e2 41 fa ff b4 |A | LEA.L 0x25398,A0 000253e6 70 08 |p | MOVEQ.L #0x08,D0 000253e8 3f 20 |? | MOVE.W -(A0),-(A7) 000253ea 51 c8 ff fc |Q | DBF D0,0x253e8 000253ee 59 4f |YO | SUBQ.L #0x4,A7 000253f0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000253f4 3f 01 |? | MOVE.W D1,-(A7) 000253f6 3f 04 |? | MOVE.W D4,-(A7) 000253f8 4e 93 |N | JSR (A3) 000253fa 50 4f |PO | ADDQ.L #0x8,A7 000253fc 4e 94 |N | JSR (A4) 000253fe 50 4f |PO | ADDQ.L #0x8,A7 00025400 20 4f | O | MOVEA.L A7,A0 00025402 43 fa ff 58 |C X | LEA.L 0x2535c,A1 00025406 70 0c |p | MOVEQ.L #0x0c,D0 00025408 10 d9 | | MOVE.B (A1)+,(A0)+ 0002540a 51 c8 ff fc |Q | DBF D0,0x25408 0002540e 51 4f |QO | SUBQ.L #0x8,A7 00025410 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00025414 3f 01 |? | MOVE.W D1,-(A7) 00025416 3f 02 |? | MOVE.W D2,-(A7) 00025418 4e 93 |N | JSR (A3) 0002541a 54 4f |TO | ADDQ.L #0x2,A7 0002541c 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00025420 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00025426 54 4f |TO | ADDQ.L #0x2,A7 00025428 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002542e 50 4f |PO | ADDQ.L #0x8,A7 00025430 4e 94 |N | JSR (A4) 00025432 de c4 | | ADDA.W D4,A7 00025434 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00025438 b0 c1 | | CMPA.W D1,A0 0002543a 67 48 |gH | BEQ 0x25484 0002543c 9e c5 | | SUBA.W D5,A7 0002543e 22 4f |"O | MOVEA.L A7,A1 00025440 45 fa ff 28 |E ( | LEA.L 0x2536a,A2 00025444 70 0c |p | MOVEQ.L #0x0c,D0 00025446 12 da | | MOVE.B (A2)+,(A1)+ 00025448 51 c8 ff fc |Q | DBF D0,0x25446 0002544c 9e c3 | | SUBA.W D3,A7 0002544e 22 4f |"O | MOVEA.L A7,A1 00025450 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00025454 70 1d |p | MOVEQ.L #0x1d,D0 00025456 12 d8 | | MOVE.B (A0)+,(A1)+ 00025458 51 c8 ff fc |Q | DBF D0,0x25456 0002545c 51 4f |QO | SUBQ.L #0x8,A7 0002545e 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00025462 3f 01 |? | MOVE.W D1,-(A7) 00025464 3f 02 |? | MOVE.W D2,-(A7) 00025466 4e 93 |N | JSR (A3) 00025468 58 4f |XO | ADDQ.L #0x4,A7 0002546a 48 6f 00 0c |Ho | PEA.L (A7+0xc) 0002546e 3f 01 |? | MOVE.W D1,-(A7) 00025470 3f 03 |? | MOVE.W D3,-(A7) 00025472 4e 93 |N | JSR (A3) 00025474 50 4f |PO | ADDQ.L #0x8,A7 00025476 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002547c 50 4f |PO | ADDQ.L #0x8,A7 0002547e 4e 94 |N | JSR (A4) 00025480 de fc 00 30 | 0 | ADDA.W #0x30,A7 00025484 9e c5 | | SUBA.W D5,A7 00025486 20 4f | O | MOVEA.L A7,A0 00025488 43 fa fe ee |C | LEA.L 0x25378,A1 0002548c 70 0c |p | MOVEQ.L #0x0c,D0 0002548e 10 d9 | | MOVE.B (A1)+,(A0)+ 00025490 51 c8 ff fc |Q | DBF D0,0x2548e 00025494 51 4f |QO | SUBQ.L #0x8,A7 00025496 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002549a 3f 01 |? | MOVE.W D1,-(A7) 0002549c 3f 02 |? | MOVE.W D2,-(A7) 0002549e 4e 93 |N | JSR (A3) 000254a0 54 4f |TO | ADDQ.L #0x2,A7 000254a2 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 000254a6 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 000254ac 54 4f |TO | ADDQ.L #0x2,A7 000254ae 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000254b4 50 4f |PO | ADDQ.L #0x8,A7 000254b6 4e 94 |N | JSR (A4) 000254b8 5d 4f |]O | SUBQ.L #0x6,A7 000254ba 20 4f | O | MOVEA.L A7,A0 000254bc 43 fa fe da |C | LEA.L 0x25398,A1 000254c0 70 16 |p | MOVEQ.L #0x16,D0 000254c2 10 d9 | | MOVE.B (A1)+,(A0)+ 000254c4 51 c8 ff fc |Q | DBF D0,0x254c2 000254c8 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000254cc 59 4f |YO | SUBQ.L #0x4,A7 000254ce 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000254d2 3f 01 |? | MOVE.W D1,-(A7) 000254d4 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 000254d8 4e 93 |N | JSR (A3) 000254da 50 4f |PO | ADDQ.L #0x8,A7 000254dc 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000254e2 de c3 | | ADDA.W D3,A7 000254e4 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 000254e8 4e 5e |N^ | UNLK A6 000254ea 4e 75 |Nu | RTS