|
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: 7168 (0x1c00)
Types: M200
Notes: @(#)CRASHSAVE,3.0,92/09/09,17:18:19, M200_PROGRAM
Names: »CRASHSAVE.M200«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »CRASHSAVE.M200«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »CRASHSAVE.M200«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »CRASHSAVE.M200«
@ 202c8
<LVAR -0x004 1(rw)>
<LVAR -0x005 1(rw)>
<LVAR -0x00e @>
<POP 202c8-2041c Body>
<POP 202c8-202de Prologue> Σ0 ↓
<POP 202de-202ec RegCacheLoad> Σ0 ↓
<POP 202ec-20340 Naked> Σ0 ↓
<Call 0x202ec 0x21352> {}
exp_CLEAR_EXCEPTIONS.FIU()
<MI 202f2 MOVE.B #0x01,(A6-0x5)> {}
<MI 202f8 MOVE.B #0xb4,(A6-0x4)> {}
<Blob 0x202fe [4] @> Δ-4 {[«4""»]}
<Blob 0x20302 [4] @> Δ-4 {[«4""»]|[«4""»]}
<Pointer.fp 0x20306 <LVAR -0x00e @>> Δ-4 {[«4""»]|[«4""»]|[@@-14]}
<Call 0x2030a 0x213f8> {[«4""»]|[«4""»]|[@@-14]}
exp_PREP_WRITE_REG.TYP(Sw_8, &Sr_8_1)
<POP 20310-20312 StackAdj> Δ+10 {[-2-]}
<MI 20312 MOVE.B (A6-0x5),(A7)> {[-2-]}
<MI 20316 MOVE.B (A6-0x4),(A7+0x1)> {[-2-]}
<Blob 0x2031c [10] (A6-0xe)> Δ-10 {[-2-]|[«10»]}
<MI 2032c CLR.B -(A7)> Δ-2 {[-2-]|[«10»]|[#0]}
<Call 0x2032e 0x213be> {[-2-]|[«10»]|[#0]}
exp_WRITE_REG.TYP(Sw_2, Sw_8_1, Sw_1)
<POP 20334-20338 StackAdj> Δ+14 {}
<Call 0x20338 0x21448> {}
exp_LOAD_BENIGN_UWORD.TYP()
<MI 2033e MOVEQ.L #0x0c,D7> {}
<POP 20340-2034c Naked> Σ0 ↓ →0x2035a ←0x2035a
<POP 20340-20342 StackAdj> Δ-2 {[-2-]}
<MI 20342 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x20344 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20346-20348 StackAdj> Δ+2 {[-2-]}
<MI 20348 TST.B (A7)+> Δ+2 {}
<MI 2034a BEQ 0x2035a> {}
<POP 2034c-2035a Naked> Σ0 ↓
<MI 2034c MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<Const 0x2034e 0xff.2> Δ-2 {[2, 'D7']|[#255]}
<Call 0x20352 0x214cc> {[2, 'D7']|[#255]}
<POP 20358-2035a StackAdj> Δ+4 {}
<POP 2035a-20360 Naked> Σ0 ↓ →0x20340 ←0x20340
<MI 2035a ADDQ.B #0x1,D7> {}
<MI 2035c CMP.B #0x0f,D7> {}
<MI 2035e BLE 0x20340> {}
<POP 20360-20368 Naked> Σ0 ↓
<Call 0x20360 0x2131a> {}
exp_INIT_MRU.FIU()
<MI 20366 MOVEQ.L #0x0c,D7> {}
<POP 20368-20374 Naked> Σ0 ↓ →0x2037e ←0x2037e
<POP 20368-2036a StackAdj> Δ-2 {[-2-]}
<MI 2036a MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x2036c 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 2036e-20370 StackAdj> Δ+2 {[-2-]}
<MI 20370 TST.B (A7)+> Δ+2 {}
<MI 20372 BEQ 0x2037e> {}
<POP 20374-2037e Naked> Σ0 ↓
<MI 20374 MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x20376 0x2178a> {[2, 'D7']}
<POP 2037c-2037e StackAdj> Δ+2 {}
<POP 2037e-20384 Naked> Σ0 ↓ →0x20368 ←0x20368
<MI 2037e ADDQ.B #0x1,D7> {}
<MI 20380 CMP.B #0x0f,D7> {}
<MI 20382 BLE 0x20368> {}
<POP 20384-203b6 Naked> Σ0 ↓
<Call 0x20384 0x105b0> {}
FifoInit(void)
<Const 0x2038a 0x127.2> Δ-2 {[#295]}
<Call 0x2038c 0x2141a> {[#295]}
exp_PREP_RUN.TYP(Sw_2)
<POP 20392-20393 StackAdj> Δ+2 {}
<Const 0x20393 0x127.2> Δ-2 {[#295]}
<Call 0x20394 0x21486> {[#295]}
exp_PREP_RUN.VAL(Sw_2)
<POP 2039a-2039b StackAdj> Δ+2 {}
<Const 0x2039b 0x127.2> Δ-2 {[#295]}
<Call 0x2039c 0x218de> {[#295]}
exp_PREP_RUN.IOC(Sw_2)
<POP 203a2-203a3 StackAdj> Δ+2 {}
<Const 0x203a3 0x127.2> Δ-2 {[#295]}
<Call 0x203a4 0x213a4> {[#295]}
exp_PREP_RUN.SEQ(Sw_2)
<POP 203aa-203ab StackAdj> Δ+2 {}
<Const 0x203ab 0x127.2> Δ-2 {[#295]}
<Call 0x203ac 0x212ec> {[#295]}
exp_PREP_RUN.FIU(Sw_2)
<POP 203b2-203b4 StackAdj> Δ+2 {}
<MI 203b4 MOVEQ.L #0x0c,D7> {}
<POP 203b6-203c2 Naked> Σ0 ↓ →0x203cc ←0x203cc
<POP 203b6-203b8 StackAdj> Δ-2 {[-2-]}
<MI 203b8 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x203ba 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 203bc-203be StackAdj> Δ+2 {[-2-]}
<MI 203be TST.B (A7)+> Δ+2 {}
<MI 203c0 BEQ 0x203cc> {}
<POP 203c2-203cc Naked> Σ0 ↓
<MI 203c2 MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x203c4 0x216e0> {[2, 'D7']}
<POP 203ca-203cc StackAdj> Δ+2 {}
<POP 203cc-203d2 Naked> Σ0 ↓ →0x203b6 ←0x203b6
<MI 203cc ADDQ.B #0x1,D7> {}
<MI 203ce CMP.B #0x0f,D7> {}
<MI 203d0 BLE 0x203b6> {}
<POP 203d2-203f2 Naked> Σ0 ↓
<Call 0x203d2 0x21334> {}
exp_FREEZE_WORLD.FIU()
<Call 0x203d8 0x213dc> {}
exp_RUN_NORMAL.TYP()
<Call 0x203de 0x2146a> {}
exp_RUN_NORMAL.VAL()
<Call 0x203e4 0x2138a> {}
exp_RUN_CHECK.SEQ()
<Call 0x203ea 0x218c4> {}
exp_RUN_CHECK.IOC()
<MI 203f0 MOVEQ.L #0x0c,D7> {}
<POP 203f2-203fe Naked> Σ0 ↓ →0x20408 ←0x20408
<POP 203f2-203f4 StackAdj> Δ-2 {[-2-]}
<MI 203f4 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x203f6 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 203f8-203fa StackAdj> Δ+2 {[-2-]}
<MI 203fa TST.B (A7)+> Δ+2 {}
<MI 203fc BEQ 0x20408> {}
<POP 203fe-20408 Naked> Σ0 ↓
<MI 203fe MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x20400 0x21592> {[2, 'D7']}
<POP 20406-20408 StackAdj> Δ+2 {}
<POP 20408-2040e Naked> Σ0 ↓ →0x203f2 ←0x203f2
<MI 20408 ADDQ.B #0x1,D7> {}
<MI 2040a CMP.B #0x0f,D7> {}
<MI 2040c BLE 0x203f2> {}
<POP 2040e-20414 Naked> Σ0 ↓
<Call 0x2040e 0x212d0> {}
exp_RUN_NORMAL.FIU()
<POP 20414-2041c Epilogue> Σ0
@ 2041c
<POP 2041c-204a4 Body>
<POP 2041c-20432 Prologue> Σ0 ↓
<POP 20432-20434 RegCacheLoad> Σ0 ↓
<POP 20434-20454 Naked> Σ0 ↓
<Call 0x20434 0x21334> {}
exp_FREEZE_WORLD.FIU()
<Call 0x2043a 0x218f8> {}
exp_MF.IOC()
<Call 0x20440 0x214a0> {}
exp_MF.VAL()
<Call 0x20446 0x21434> {}
exp_MF.TYP()
<Call 0x2044c 0x21374> {}
exp_RESET.SEQ()
<MI 20452 MOVEQ.L #0x0c,D7> {}
<POP 20454-20464 Naked> Σ0 ↓ →0x2046e ←0x2046e
<POP 20454-20456 StackAdj> Δ-2 {[-2-]}
<MI 20456 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x20458 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 2045e-20460 StackAdj> Δ+2 {[-2-]}
<MI 20460 TST.B (A7)+> Δ+2 {}
<MI 20462 BEQ 0x2046e> {}
<POP 20464-2046e Naked> Σ0 ↓
<MI 20464 MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x20466 0x2162c> {[2, 'D7']}
<POP 2046c-2046e StackAdj> Δ+2 {}
<POP 2046e-20474 Naked> Σ0 ↓ →0x20454 ←0x20454
<MI 2046e ADDQ.B #0x1,D7> {}
<MI 20470 CMP.B #0x0f,D7> {}
<MI 20472 BLE 0x20454> {}
<POP 20474-2047c Naked> Σ0 ↓
<Call 0x20474 0x21306> {}
exp_MF.FIU()
<MI 2047a MOVEQ.L #0x0c,D7> {}
<POP 2047c-2048c Naked> Σ0 ↓ →0x20496 ←0x20496
<POP 2047c-2047e StackAdj> Δ-2 {[-2-]}
<MI 2047e MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']}
<Call 0x20480 0x104c0> {[-2-]|[2, 'D7']}
HasBoard(diproc_addr: Byte) : Byte
<POP 20486-20488 StackAdj> Δ+2 {[-2-]}
<MI 20488 TST.B (A7)+> Δ+2 {}
<MI 2048a BEQ 0x20496> {}
<POP 2048c-20496 Naked> Σ0 ↓
<MI 2048c MOVE.B D7,-(A7)> Δ-2 {[2, 'D7']}
<Call 0x2048e 0x21836> {[2, 'D7']}
<POP 20494-20496 StackAdj> Δ+2 {}
<POP 20496-2049c Naked> Σ0 ↓ →0x2047c ←0x2047c
<MI 20496 ADDQ.B #0x1,D7> {}
<MI 20498 CMP.B #0x0f,D7> {}
<MI 2049a BLE 0x2047c> {}
<POP 2049c-204a4 Epilogue> Σ0
@ 204a4
<LVAR 0x00c 4(r)>
<LVAR 0x008 4(r)>
<LVAR -0x004 @>
<POP 204a4-205a0 Body>
<POP 204a4-204ba Prologue> Σ0 ↓
<POP 204ba-204cc RegCacheLoad> Σ0 ↓
<POP 204cc-204d4 Naked> Σ0 Δ-4 ↓
<MI 204cc MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']}
<MI 204d0 SUBQ.L #0x1,(A7)> {[-4-]}
<MI 204d2 MOVEQ.L #0x00,D6> {[-4-]}
<POP 204d4-204da Naked> Σ-4 ↓ →0x20596 ←0x20590
<MI 204d4 CMP.L (A7),D6> {[-4-]}
<MI 204d6 BGT 0x20596> {[-4-]}
<POP 204da-204f0 Naked> Σ-4 ↓ →0x20508
<MI 204da LEA.L 0x22328,A0> {[-4-]}
<MI 204e0 MOVE.L A0,-(A7)> Δ-4 {[-4-]|[4, 'A0']}
<MI 204e2 CLR.W -(A7)> Δ-2 {[-4-]|[4, 'A0']|[#0]}
<Call 0x204e4 0x1023c> {[-4-]|[4, 'A0']|[#0]}
KC1e_Fifo_Tx_Response(ptr : Pointer; chan : Word)
<POP 204ea-204ec StackAdj> Δ+6 {[-4-]}
<MI 204ec TST.W 0x2234e> {[-4-]}
<MI 204ee BEQ 0x20508> {[-4-]}
<POP 204f0-20500 Naked> Σ-4 ↓ →0x20508
<MI 204f0 CLR.L D0> {[-4-]}
<MI 204f2 MOVE.W 0x22336,D0> {[-4-]}
<MI 204f4 CLR.L D1> {[-4-]}
<MI 204f6 MOVE.W 0x2234e,D1> {[-4-]}
<MI 204f8 ADD.L D0,D1> {[-4-]}
<MI 204fa MOVE.W D1,0x22336> {[-4-]}
<MI 204fc TST.W D1> {[-4-]}
<MI 204fe BNE 0x20508> {[-4-]}
<POP 20500-20508 Naked> Σ-4 ↓
<MI 20500 CLR.L D0> {[-4-]}
<MI 20502 MOVE.W 0x22334,D0> {[-4-]}
<MI 20504 ADDQ.L #0x1,D0> {[-4-]}
<MI 20506 MOVE.W D0,0x22334> {[-4-]}
<POP 20508-2051e Naked> Σ-4 ↓ ←0x204da ←0x204f0
<MI 20508 CLR.L D0> {[-4-]}
<MI 2050a MOVE.W 0x22334,D0> {[-4-]}
<MI 2050c CLR.L D1> {[-4-]}
<MI 2050e MOVE.W 0x2234c,D1> {[-4-]}
<MI 20514 ADD.L D0,D1> {[-4-]}
<MI 20516 MOVE.W D1,0x22334> {[-4-]}
<MI 20518 MOVE.L #0xfffffc18,D7> {[-4-]}
<POP 2051e-2053e Naked> Σ-4 ↓ →0x20542 ←0x2053e
<MI 2051e MOVEA.L (A6+0x8),A0> {[-4-]}
<MI 20522 LEA.L 0x22338,A1> {[-4-]}
<MI 20528 MOVE.L A1,-(A7)> Δ-4 {[-4-]|[4, 'A1']}
<MI 2052a CLR.W -(A7)> Δ-2 {[-4-]|[4, 'A1']|[#0]}
<MI 2052c PEA.L (A0)> Δ-4 {[-4-]|[4, 'A1']|[#0]|[4, '^(A0)']}
<Call 0x2052e 0x1023e> {[-4-]|[4, 'A1']|[#0]|[4, '^(A0)']}
KC1f_Fifo_Rx_Request(ptr : Pointer; chan : Word; VAR flag : Bool)
<POP 20534-20538 StackAdj> Δ+10 {[-4-]}
<MI 20538 ADDQ.L #0x1,D7> {[-4-]}
<MI 2053a TST.B (A0)> {[-4-]}
<MI 2053c BNE 0x20542> {[-4-]}
<POP 2053e-20542 Naked> Σ-4 ↓ →0x2051e
<MI 2053e TST.L D7> {[-4-]}
<MI 20540 BNE 0x2051e> {[-4-]}
<POP 20542-20546 Naked> Σ-4 ↓ →0x20590 ←0x2051e
<MI 20542 TST.B (A0)> {[-4-]}
<MI 20544 BEQ 0x20590> {[-4-]}
<POP 20546-20590 Naked> Σ-4 ↓
<Blob 0x20546 [4] 0x22360> Δ-4 {[-4-]|[«4»]}
<MI 2054c LEA.L 0x21b1e,A0> {[-4-]|[«4»]}
<MI 20552 MOVE.L A0,-(A7)> Δ-4 {[-4-]|[«4»]|[4, 'A0']}
<Const 0x20554 0x400.2> Δ-2 {[-4-]|[«4»]|[4, 'A0']|[#1024]}
<Call 0x20558 0x10238> {[-4-]|[«4»]|[4, 'A0']|[#1024]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 2055e-20560 StackAdj> Δ+6 {[-4-]|[«4»]}
<POP 20560-20561 StackAdj> Δ+4 {[-4-]}
<Blob 0x20561 [4] 0x21b1a> Δ-4 {[-4-]|[«4»]}
<Blob 0x20566 [2] 0x21f22> Δ-2 {[-4-]|[«4»]|[«2»]}
<MI 2056c CLR.W -(A7)> Δ-2 {[-4-]|[«4»]|[«2»]|[#0]}
<Const 0x2056e 0x200.2> Δ-2 {[-4-]|[«4»]|[«2»]|[#0]|[#512]}
<Const 0x20572 0x2.2> Δ-2 {[-4-]|[«4»]|[«2»]|[#0]|[#512]|[#2]}
<Blob 0x20576 [4] 0x21f1e> Δ-4 {[-4-]|[«4»]|[«2»]|[#0]|[#512]|[#2]|[«4»]}
<Pointer.fp 0x2057c <LVAR -0x004 @>> Δ-4 {[-4-]|[«4»]|[«2»]|[#0]|[#512]|[#2]|[«4»]|[@@-4]}
<Call 0x20580 0x10388> {[-4-]|[«4»]|[«2»]|[#0]|[#512]|[#2]|[«4»]|[@@-4]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 20586-2058a StackAdj> Δ+20 {[-4-]}
<MI 2058a ADDQ.W #0x1,0x21f22> {[-4-]}
<POP 20590-20596 Naked> Σ-4 ↓ →0x204d4 ←0x20542
<MI 20590 ADDQ.L #0x1,D6> {[-4-]}
<MI 20592 BVC 0x204d4> {[-4-]}
<POP 20596-20598 Naked> Σ-4 Δ+4 ↓ ←0x204d4
<POP 20596-20598 StackAdj> Δ+4 {}
<POP 20598-205a0 Epilogue> Σ0
@ 205a0
<LVAR 0x00a 2(r)>
<POP 205a0-20602 Body>
<POP 205a0-205b2 Prologue> Σ0 ↓
<POP 205b2-205fe Naked> Σ0 ↓
<MI 205b2 MOVE.W #0x400,0x22328> {}
<MI 205ba CLR.W 0x2232a> {}
<MI 205c0 CLR.W 0x2232c> {}
<MI 205c6 MOVE.W (A6+0xa),0x2232e> {}
<MI 205ce CLR.W 0x22330> {}
<MI 205d4 CLR.W 0x22332> {}
<MI 205da CLR.W 0x22334> {}
<MI 205e0 CLR.W 0x22336> {}
<MI 205e6 CLR.W 0x22348> {}
<MI 205ec CLR.W 0x2234a> {}
<MI 205f2 CLR.W 0x2234c> {}
<MI 205f8 CLR.W 0x2234e> {}
<POP 205fe-20602 Epilogue> Σ0
@ 20602
<LVAR 0x008 4(r)>
<POP 20602-20688 Body>
<POP 20602-20618 Prologue> Σ0 ↓
<POP 20618-2061e RegCacheLoad> Σ0 ↓
<POP 2061e-2064e Naked> Σ0 ↓ →0x20680
<MI 2061e MOVE.W #0x12,0x21f22> {}
<MI 20622 MOVE.W 0x21f22,0x21f2c> {}
<MI 20628 MOVEQ.L #0x10,D7> {}
<Const 0x2062a 0x300.4> Δ-4 {[##768]}
<Call 0x2062e 0x205a0> {[##768]}
<POP 20632-20634 StackAdj> Δ+4 {}
<MI 20634 MOVE.W #0x40,0x2234e> {}
<MI 2063c MOVEA.L (A6+0x8),A0> {}
<MI 20640 MOVE.L D7,-(A7)> Δ-4 {[4, 'D7']}
<MI 20642 PEA.L (A0)> Δ-4 {[4, 'D7']|[4, '^(A0)']}
<Call 0x20644 0x204a4> {[4, 'D7']|[4, '^(A0)']}
<POP 20648-2064a StackAdj> Δ+8 {}
<MI 2064a TST.B (A0)> {}
<MI 2064c BNE 0x20680> {}
<POP 2064e-20680 Naked> Σ0 ↓
<Blob 0x2064e [68] @> Δ-68 {[«68""»]}
<POP 20660-20662 StackAdj> Δ-4 {[«68""»]|[-4-]}
<Lit 0x20662 67> {[«68""»]|[$$*** No R1000 response to DUMP_REGISTERS - probably a hardware error]}
<Call 0x20676 0x103e0> {[«68""»]|[$$*** No R1000 response to DUMP_REGISTERS - probably a hardware error]}
WriteConsoleStringCrLf(str : String)
<POP 2067c-20680 StackAdj> Δ+72 {}
<POP 20680-20688 Epilogue> Σ0 ←0x2061e
@ 20688
<LVAR 0x008 4(r)>
<LVAR -0x006 4(rw)>
<LVAR -0x00a 4(rw)>
<POP 20688-20750 Body>
<POP 20688-2069e Prologue> Σ0 ↓
<POP 2069e-206a6 RegCacheLoad> Σ0 ↓
<POP 206a6-206b2 Naked> Σ0 ↓ →0x206c0
<POP 206a6-206a8 StackAdj> Δ-2 {[-2-]}
<Call 0x206a8 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 206ae TST.B (A7)+> Δ+2 {}
<MI 206b0 BEQ 0x206c0> {}
<POP 206b2-206c0 Naked> Σ0 →0x206cc
<MI 206b2 MOVE.L #0x800,(A6-0xa)> {}
<MI 206b8 MOVE.L #0x4,(A6-0x6)> {}
<MI 206be BRA 0x206cc> {}
<POP 206c0-206cc Naked> Σ0 ↓ ←0x206a6
<MI 206c0 MOVE.L #0x1000,(A6-0xa)> {}
<MI 206c6 MOVE.L #0x8,(A6-0x6)> {}
<POP 206cc-206e2 Naked> Σ0 ↓ ←0x206b2
<Const 0x206cc 0x400.4> Δ-4 {[##1024]}
<Call 0x206d0 0x205a0> {[##1024]}
<POP 206d4-206d6 StackAdj> Δ+4 {}
<MI 206d6 MOVE.W #0x10,0x2234c> {}
<MI 206de MOVEQ.L #0x00,D6> {}
<MI 206e0 MOVEQ.L #0x0c,D5> {}
<POP 206e2-206f2 Naked> Σ0 ↓ →0x2073e ←0x2073e
<POP 206e2-206e4 StackAdj> Δ-2 {[-2-]}
<MI 206e4 MOVE.B D5,-(A7)> Δ-2 {[-2-]|[2, 'D5']}
<Call 0x206e6 0x104c0> {[-2-]|[2, 'D5']}
HasBoard(diproc_addr: Byte) : Byte
<POP 206ec-206ee StackAdj> Δ+2 {[-2-]}
<MI 206ee TST.B (A7)+> Δ+2 {}
<MI 206f0 BEQ 0x2073e> {}
<POP 206f2-206f8 Naked> Σ0 Δ-4 ↓
<MI 206f2 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<MI 206f4 SUBQ.L #0x1,(A7)> {[-4-]}
<MI 206f6 MOVEQ.L #0x00,D7> {[-4-]}
<POP 206f8-206fc Naked> Σ-4 ↓ →0x2073c ←0x206fc
<MI 206f8 CMP.L (A7),D7> {[-4-]}
<MI 206fa BGT 0x2073c> {[-4-]}
<POP 206fc-2073c Naked> Σ-4 ↓ →0x206f8
<MI 206fc CLR.W 0x22330> {[-4-]}
<MI 20702 MOVE.L D6,D0> {[-4-]}
<MI 20704 ASL.L #0x2,D0> {[-4-]}
<MI 20706 ADD.L D7,D0> {[-4-]}
<MI 20708 ASL.L #0x4,D0> {[-4-]}
<MI 2070a MOVE.W D0,0x22332> {[-4-]}
<MI 20710 CLR.W 0x22334> {[-4-]}
<MI 20716 CLR.W 0x22336> {[-4-]}
<MI 2071c MOVE.L (A6-0xa),D4> {[-4-]}
<MI 2071e MOVE.L #0x80,D3> {[-4-]}
<Call 0x20724 0x10294> {[-4-]}
?divs_d3_d4
<MI 2072a MOVE.L D4,-(A7)> Δ-4 {[-4-]|[4, 'D4']}
<MI 2072c MOVEA.L (A6+0x8),A0> {[-4-]|[4, 'D4']}
<MI 20730 PEA.L (A0)> Δ-4 {[-4-]|[4, 'D4']|[4, '^(A0)']}
<Call 0x20732 0x204a4> {[-4-]|[4, 'D4']|[4, '^(A0)']}
<POP 20736-20738 StackAdj> Δ+8 {[-4-]}
<MI 20738 ADDQ.L #0x1,D7> {[-4-]}
<MI 2073a BVC 0x206f8> {[-4-]}
<POP 2073c-2073e Naked> Σ-4 Δ+4 ↓ ←0x206f8
<POP 2073c-2073e StackAdj> Δ+4 {}
<POP 2073e-20748 Naked> Σ0 ↓ →0x206e2 ←0x206e2
<MI 2073e ADDQ.L #0x1,D6> {}
<MI 20740 ADDQ.B #0x1,D5> {}
<MI 20742 CMPI.B #0x0f,D5> {}
<MI 20746 BLE 0x206e2> {}
<POP 20748-20750 Epilogue> Σ0
@ 20750
<POP 20750-207e8 Body>
<POP 20750-20766 Prologue> Σ0 ↓
<POP 20766-2077e RegCacheLoad> Σ0 ↓
<POP 2077e-207e0 Naked> Σ0 ↓
<Const 0x2077e 0x400.4> Δ-4 {[##1024]}
<MI 20782 LEA.L 0x22350,A0> {[##1024]}
<MI 20788 MOVE.L A0,-(A7)> Δ-4 {[##1024]|[4, 'A0']}
<Const 0x2078a 0x4.2> Δ-2 {[##1024]|[4, 'A0']|[#4]}
<Call 0x2078c 0x10238> {[##1024]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 2078e-20790 StackAdj> Δ+10 {}
<Const 0x20790 0x404.4> Δ-4 {[##1028]}
<MI 20794 LEA.L 0x22354,A0> {[##1028]}
<MI 20796 MOVE.L A0,-(A7)> Δ-4 {[##1028]|[4, 'A0']}
<Const 0x20798 0x2.2> Δ-2 {[##1028]|[4, 'A0']|[#2]}
<Call 0x2079a 0x10238> {[##1028]|[4, 'A0']|[#2]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 2079c-2079e StackAdj> Δ+10 {}
<Const 0x2079e 0x406.4> Δ-4 {[##1030]}
<MI 207a2 LEA.L 0x22356,A0> {[##1030]}
<MI 207a8 MOVE.L A0,-(A7)> Δ-4 {[##1030]|[4, 'A0']}
<Const 0x207aa 0x2.2> Δ-2 {[##1030]|[4, 'A0']|[#2]}
<Call 0x207ac 0x10238> {[##1030]|[4, 'A0']|[#2]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 207ae-207b0 StackAdj> Δ+10 {}
<Const 0x207b0 0x408.4> Δ-4 {[##1032]}
<MI 207b4 LEA.L 0x22358,A0> {[##1032]}
<MI 207ba MOVE.L A0,-(A7)> Δ-4 {[##1032]|[4, 'A0']}
<Const 0x207bc 0x4.2> Δ-2 {[##1032]|[4, 'A0']|[#4]}
<Call 0x207be 0x10238> {[##1032]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 207c0-207c2 StackAdj> Δ+10 {}
<Const 0x207c2 0x40c.4> Δ-4 {[##1036]}
<MI 207c6 LEA.L 0x2235c,A0> {[##1036]}
<MI 207c8 MOVE.L A0,-(A7)> Δ-4 {[##1036]|[4, 'A0']}
<Const 0x207ca 0x4.2> Δ-2 {[##1036]|[4, 'A0']|[#4]}
<Call 0x207cc 0x10238> {[##1036]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 207ce-207d0 StackAdj> Δ+10 {}
<MI 207d0 MOVEQ.L #0x00,D0> {}
<MI 207d2 MULU.W 0x22354,D0> {}
<MI 207d4 CLR.L D1> {}
<MI 207d6 MOVE.W D0,D1> {}
<MI 207d8 ADD.L 0x2235c,D1> {}
<MI 207da MOVE.L D1,0x22360> {}
<POP 207e0-207e8 Epilogue> Σ0
@ 207e8
<LVAR -0x006 @>
<LVAR -0x008 @ 1(r)>
<LVAR -0x00c @ 4(rw)>
<POP 207e8-20950 Body>
<POP 207e8-207fe Prologue> Σ0 ↓
<POP 207fe-2080e RegCacheLoad> Σ0 ↓
<POP 2080e-2085e Naked> Σ0 ↓ →0x20876
<MI 2080e MOVEQ.L #0x04,D7> {}
<Blob 0x20810 [10] @> Δ-10 {[«10""»]}
<POP 2081c-2081e StackAdj> Δ-8 {[«10""»]|[-8-]}
<Lit 0x2081e 10> {[«10""»]|[-4-]|[$$R1000_DUMP]}
<MI 2082c MOVE.L D7,(A7)> {[«10""»]|[-4-]|[4, 'D7']}
<POP 20826-2082c StackAdj> Δ-8 {[«10""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x2082e 0x102e4> {[«10""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 20834-20836 StackAdj> Δ+4 {[«10""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x20836 0x102d0> {[«10""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 2083c-2083e StackAdj> Δ+8 {[«10""»]|[-4-]}
<MI 2083e MOVEA.L (A7)+,A4> Δ+4 {[«10""»]}
<POP 20840-20842 StackAdj> Δ+6 {[-4-]}
<MI 20842 MOVE.L A4,(A7)> {[4, 'A4']}
<MI 20844 CLR.B -(A7)> Δ-2 {[4, 'A4']|[#0]}
<MI 20846 CLR.B -(A7)> Δ-2 {[4, 'A4']|[#0]|[#0]}
<Const 0x20848 0x0.4> Δ-4 {[4, 'A4']|[#0]|[#0]|[##0]}
<Pointer.fp 0x2084c <LVAR -0x008 @ 1(r)>> Δ-4 {[4, 'A4']|[#0]|[#0]|[##0]|[@@-8]}
<Pointer.fp 0x2084e <LVAR -0x006 @>> Δ-4 {[4, 'A4']|[#0]|[#0]|[##0]|[@@-8]|[@@-6]}
<Call 0x20852 0x10380> {[4, 'A4']|[#0]|[#0]|[##0]|[@@-8]|[@@-6]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 20858-2085a StackAdj> Δ+20 {}
<MI 2085a TST.B (A6-0x8)> {}
<MI 2085c BNE 0x20876> {}
<POP 2085e-20876 Naked> Σ0 ↓
<Const 0x2085e 0x2.2> Δ-2 {[#2]}
<MI 20862 CLR.B -(A7)> Δ-2 {[#2]|[#0]}
<Const 0x20864 0x1.4> Δ-4 {[#2]|[#0]|[##1]}
<Pointer.fp 0x20868 <LVAR -0x008 @ 1(r)>> Δ-4 {[#2]|[#0]|[##1]|[@@-8]}
<Pointer.fp 0x2086a <LVAR -0x006 @>> Δ-4 {[#2]|[#0]|[##1]|[@@-8]|[@@-6]}
<Call 0x2086e 0x1038c> {[#2]|[#0]|[##1]|[@@-8]|[@@-6]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 20874-20876 StackAdj> Δ+16 {}
<POP 20876-20878 Naked> Σ0 ↓ ←0x2080e
<MI 20876 MOVE.L A4,(A6-0xc)> {}
<POP 20878-208c8 Naked> Σ0 ↓ →0x208dc ←0x208dc
<MI 20878 SUBQ.L #0x1,D7> {}
<Blob 0x2087a [10] @> Δ-10 {[«10""»]}
<POP 20886-20888 StackAdj> Δ-8 {[«10""»]|[-8-]}
<Lit 0x20888 10> {[«10""»]|[-4-]|[$$R1000_DUMP]}
<MI 20896 MOVE.L D7,(A7)> {[«10""»]|[-4-]|[4, 'D7']}
<POP 20890-20896 StackAdj> Δ-8 {[«10""»]|[-4-]|[4, 'D7']|[-8-]}
<Call 0x20898 0x102e4> {[«10""»]|[-4-]|[4, 'D7']|[-8-]}
Long2String(a : Long) : String
<POP 2089e-208a0 StackAdj> Δ+4 {[«10""»]|[-4-]|[4, 'D7']|[-4-]}
<Call 0x208a0 0x102d0> {[«10""»]|[-4-]|[4, 'D7']|[-4-]}
StringCat2(a, b : String) : String
<POP 208a6-208a8 StackAdj> Δ+8 {[«10""»]|[-4-]}
<MI 208a8 MOVEA.L (A7)+,A4> Δ+4 {[«10""»]}
<POP 208aa-208ac StackAdj> Δ+6 {[-4-]}
<MI 208ac MOVE.L A4,(A7)> {[4, 'A4']}
<MI 208ae CLR.B -(A7)> Δ-2 {[4, 'A4']|[#0]}
<MI 208b0 CLR.B -(A7)> Δ-2 {[4, 'A4']|[#0]|[#0]}
<Const 0x208b2 0x0.4> Δ-4 {[4, 'A4']|[#0]|[#0]|[##0]}
<Pointer.fp 0x208b6 <LVAR -0x008 @ 1(r)>> Δ-4 {[4, 'A4']|[#0]|[#0]|[##0]|[@@-8]}
<Pointer.fp 0x208b8 <LVAR -0x006 @>> Δ-4 {[4, 'A4']|[#0]|[#0]|[##0]|[@@-8]|[@@-6]}
<Call 0x208bc 0x10380> {[4, 'A4']|[#0]|[#0]|[##0]|[@@-8]|[@@-6]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 208c2-208c4 StackAdj> Δ+20 {}
<MI 208c4 TST.B (A6-0x8)> {}
<MI 208c6 BNE 0x208dc> {}
<POP 208c8-208dc Naked> Σ0 ↓
<Const 0x208c8 0x1.2> Δ-2 {[#1]}
<Const 0x208ca 0x1.2> Δ-2 {[#1]|[#1]}
<MI 208cc MOVE.L (A6-0xc),-(A7)> Δ-4 {[#1]|[#1]|[4, '(A6-0xc)']}
<Pointer.fp 0x208ce <LVAR -0x008 @ 1(r)>> Δ-4 {[#1]|[#1]|[4, '(A6-0xc)']|[@@-8]}
<Pointer.fp 0x208d0 <LVAR -0x006 @>> Δ-4 {[#1]|[#1]|[4, '(A6-0xc)']|[@@-8]|[@@-6]}
<Call 0x208d4 0x1038c> {[#1]|[#1]|[4, '(A6-0xc)']|[@@-8]|[@@-6]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 208da-208dc StackAdj> Δ+16 {}
<POP 208dc-208ec Naked> Σ0 ↓ →0x20878 ←0x20878
<Pointer.fp 0x208dc <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x208de 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<POP 208e4-208e6 StackAdj> Δ+4 {}
<MI 208e6 MOVE.L A4,(A6-0xc)> {}
<MI 208e8 CMP.L #0x01,D7> {}
<MI 208ea BNE 0x20878> {}
<POP 208ec-2090a Naked> Σ0 ↓ →0x2093e
<MI 208ec MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0xc)']}
<Const 0x208ee 0x1.2> Δ-2 {[4, '(A6-0xc)']|[#1]}
<Const 0x208f0 0x1.2> Δ-2 {[4, '(A6-0xc)']|[#1]|[#1]}
<Const 0x208f2 0x32.4> Δ-4 {[4, '(A6-0xc)']|[#1]|[#1]|[##50]}
<Pointer.fp 0x208f6 <LVAR -0x008 @ 1(r)>> Δ-4 {[4, '(A6-0xc)']|[#1]|[#1]|[##50]|[@@-8]}
<Const 0x208f8 0x21b1a.4> Δ-4 {[4, '(A6-0xc)']|[#1]|[#1]|[##50]|[@@-8]|[##138010]}
<Call 0x208fe 0x10380> {[4, '(A6-0xc)']|[#1]|[#1]|[##50]|[@@-8]|[##138010]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 20904-20906 StackAdj> Δ+20 {}
<MI 20906 TST.B (A6-0x8)> {}
<MI 20908 BEQ 0x2093e> {}
<POP 2090a-2093e Naked> Σ0 ↓
<Blob 0x2090a [36] @> Δ-36 {[«36""»]}
<Const 0x2091c 0xe.2> Δ-2 {[«36""»]|[#14]}
<POP 20920-20922 StackAdj> Δ-4 {[«36""»]|[#14]|[-4-]}
<Lit 0x20922 35> {[«36""»]|[#14]|[$$could not create new TOMBSTONE file]}
<Call 0x20934 0x103b8> {[«36""»]|[#14]|[$$could not create new TOMBSTONE file]}
PopProgram(status : Byte; msg : String)
<POP 2093a-2093e StackAdj> Δ+42 {}
<POP 2093e-20948 Naked> Σ0 ↓ ←0x208ec
<Pointer.fp 0x2093e <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]}
<Call 0x20940 0x102bc> {[@@-12]}
FreeString(VAR a : String)
<POP 20946-20948 StackAdj> Δ+4 {}
<POP 20948-20950 Epilogue> Σ0
@ 20950
<LVAR -0x006 @ 4(r)>
<LVAR -0x008 @>
<POP 20950-20a96 Body>
<POP 20950-20966 Prologue> Σ0 ↓
<POP 20966-2097e RegCacheLoad> Σ0 ↓
<POP 2097e-20a8e Naked> Σ0 ↓
<MI 2097e MOVE.W #0x01,0x21f28> {}
<Blob 0x20984 [10] @> Δ-10 {[«10""»]}
<POP 20996-20998 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x20998 9> {[«10""»]|[$$IOP_DUMP1]}
<POP 209a8-209aa StackAdj> Δ-2 {[«10""»]|[$$IOP_DUMP1]|[-2-]}
<MI 209aa CLR.B (A7)> {[«10""»]|[$$IOP_DUMP1]|[-2-]}
<Const 0x209ac 0x2.2> Δ-2 {[«10""»]|[$$IOP_DUMP1]|[-2-]|[#2]}
<Const 0x209ae 0x0.4> Δ-4 {[«10""»]|[$$IOP_DUMP1]|[-2-]|[#2]|[##0]}
<Pointer.fp 0x209b2 <LVAR -0x008 @>> Δ-4 {[«10""»]|[$$IOP_DUMP1]|[-2-]|[#2]|[##0]|[@@-8]}
<Pointer.fp 0x209b4 <LVAR -0x006 @ 4(r)>> Δ-4 {[«10""»]|[$$IOP_DUMP1]|[-2-]|[#2]|[##0]|[@@-8]|[@@-6]}
<Call 0x209b6 0x10380> {[«10""»]|[$$IOP_DUMP1]|[-2-]|[#2]|[##0]|[@@-8]|[@@-6]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 209bc-209c0 StackAdj> Δ+30 {}
<MI 209c0 MOVEA.L (A6-0x6),A0> {}
<MI 209c2 MOVE.B (A0+0x3a),0x22324> {}
<MI 209ca MOVE.B (A0+0x3b),0x22325> {}
<MI 209d2 MOVE.B (A0+0x3c),0x22326> {}
<MI 209da MOVE.B (A0+0x3d),0x22327> {}
<MI 209e2 MOVE.L (A6-0x6),-(A7)> Δ-4 {[4, '(A6-0x6)']}
<Const 0x209e4 0x1.2> Δ-2 {[4, '(A6-0x6)']|[#1]}
<MI 209e6 CLR.W -(A7)> Δ-2 {[4, '(A6-0x6)']|[#1]|[#0]}
<Const 0x209e8 0x200.2> Δ-2 {[4, '(A6-0x6)']|[#1]|[#0]|[#512]}
<Const 0x209ea 0x2.2> Δ-2 {[4, '(A6-0x6)']|[#1]|[#0]|[#512]|[#2]}
<Blob 0x209ec [4] 0x21f1e> Δ-4 {[4, '(A6-0x6)']|[#1]|[#0]|[#512]|[#2]|[«4»]}
<Pointer.fp 0x209ee <LVAR -0x008 @>> Δ-4 {[4, '(A6-0x6)']|[#1]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
<Call 0x209f0 0x10384> {[4, '(A6-0x6)']|[#1]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 209f6-209f8 StackAdj> Δ+16 {[4, '(A6-0x6)']}
<POP 209f8-209f9 StackAdj> Δ+4 {}
<Blob 0x209f9 [4] 0x21b1a> Δ-4 {[«4»]}
<Const 0x209fe 0x1.2> Δ-2 {[«4»]|[#1]}
<MI 20a00 CLR.W -(A7)> Δ-2 {[«4»]|[#1]|[#0]}
<Const 0x20a02 0x200.2> Δ-2 {[«4»]|[#1]|[#0]|[#512]}
<Const 0x20a04 0x2.2> Δ-2 {[«4»]|[#1]|[#0]|[#512]|[#2]}
<Blob 0x20a06 [4] 0x21f1e> Δ-4 {[«4»]|[#1]|[#0]|[#512]|[#2]|[«4»]}
<Pointer.fp 0x20a08 <LVAR -0x008 @>> Δ-4 {[«4»]|[#1]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
<Call 0x20a0a 0x10388> {[«4»]|[#1]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 20a10-20a12 StackAdj> Δ+16 {[«4»]}
<MI 20a12 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<Const 0x20a14 0x3e.2> Δ-2 {[4, '(A6-0x6)']|[#62]}
<MI 20a18 CLR.W -(A7)> Δ-2 {[4, '(A6-0x6)']|[#62]|[#0]}
<Const 0x20a1a 0x200.2> Δ-2 {[4, '(A6-0x6)']|[#62]|[#0]|[#512]}
<Const 0x20a1c 0x2.2> Δ-2 {[4, '(A6-0x6)']|[#62]|[#0]|[#512]|[#2]}
<Blob 0x20a1e [4] 0x21f1e> Δ-4 {[4, '(A6-0x6)']|[#62]|[#0]|[#512]|[#2]|[«4»]}
<Pointer.fp 0x20a20 <LVAR -0x008 @>> Δ-4 {[4, '(A6-0x6)']|[#62]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
<Call 0x20a22 0x10384> {[4, '(A6-0x6)']|[#62]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 20a28-20a2a StackAdj> Δ+16 {[4, '(A6-0x6)']}
<POP 20a2a-20a2b StackAdj> Δ+4 {}
<Blob 0x20a2b [4] 0x21b1a> Δ-4 {[«4»]}
<Const 0x20a30 0x2.2> Δ-2 {[«4»]|[#2]}
<MI 20a32 CLR.W -(A7)> Δ-2 {[«4»]|[#2]|[#0]}
<Const 0x20a34 0x200.2> Δ-2 {[«4»]|[#2]|[#0]|[#512]}
<Const 0x20a36 0x2.2> Δ-2 {[«4»]|[#2]|[#0]|[#512]|[#2]}
<Blob 0x20a38 [4] 0x21f1e> Δ-4 {[«4»]|[#2]|[#0]|[#512]|[#2]|[«4»]}
<Pointer.fp 0x20a3a <LVAR -0x008 @>> Δ-4 {[«4»]|[#2]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
<Call 0x20a3c 0x10388> {[«4»]|[#2]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 20a42-20a44 StackAdj> Δ+16 {[«4»]}
<MI 20a44 MOVE.L (A6-0x6),(A7)> {[4, '(A6-0x6)']}
<Const 0x20a46 0x3f.2> Δ-2 {[4, '(A6-0x6)']|[#63]}
<MI 20a4a CLR.W -(A7)> Δ-2 {[4, '(A6-0x6)']|[#63]|[#0]}
<Const 0x20a4c 0x200.2> Δ-2 {[4, '(A6-0x6)']|[#63]|[#0]|[#512]}
<Const 0x20a4e 0x2.2> Δ-2 {[4, '(A6-0x6)']|[#63]|[#0]|[#512]|[#2]}
<Blob 0x20a50 [4] 0x21f1e> Δ-4 {[4, '(A6-0x6)']|[#63]|[#0]|[#512]|[#2]|[«4»]}
<Pointer.fp 0x20a52 <LVAR -0x008 @>> Δ-4 {[4, '(A6-0x6)']|[#63]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
<Call 0x20a54 0x10384> {[4, '(A6-0x6)']|[#63]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 20a5a-20a5c StackAdj> Δ+16 {[4, '(A6-0x6)']}
<POP 20a5c-20a5d StackAdj> Δ+4 {}
<Blob 0x20a5d [4] 0x21b1a> Δ-4 {[«4»]}
<Const 0x20a62 0x3.2> Δ-2 {[«4»]|[#3]}
<MI 20a66 CLR.W -(A7)> Δ-2 {[«4»]|[#3]|[#0]}
<Const 0x20a68 0x200.2> Δ-2 {[«4»]|[#3]|[#0]|[#512]}
<Const 0x20a6a 0x2.2> Δ-2 {[«4»]|[#3]|[#0]|[#512]|[#2]}
<Blob 0x20a6c [4] 0x21f1e> Δ-4 {[«4»]|[#3]|[#0]|[#512]|[#2]|[«4»]}
<Pointer.fp 0x20a6e <LVAR -0x008 @>> Δ-4 {[«4»]|[#3]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
<Call 0x20a70 0x10388> {[«4»]|[#3]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 20a76-20a7a StackAdj> Δ+18 {[-2-]}
<MI 20a7a CLR.B (A7)> {[-2-]}
<Const 0x20a7c 0x1.2> Δ-2 {[-2-]|[#1]}
<Const 0x20a7e 0x1.4> Δ-4 {[-2-]|[#1]|[##1]}
<Pointer.fp 0x20a82 <LVAR -0x008 @>> Δ-4 {[-2-]|[#1]|[##1]|[@@-8]}
<Pointer.fp 0x20a84 <LVAR -0x006 @ 4(r)>> Δ-4 {[-2-]|[#1]|[##1]|[@@-8]|[@@-6]}
<Call 0x20a86 0x1038c> {[-2-]|[#1]|[##1]|[@@-8]|[@@-6]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 20a8c-20a8e StackAdj> Δ+16 {}
<POP 20a8e-20a96 Epilogue> Σ0
@ 20a96
<LVAR 0x008 4(r)>
<LVAR -0x002 @>
<LVAR -0x006 @ 4(r)>
<LVAR -0x008 @>
<POP 20a96-20bc8 Body>
<POP 20a96-20aac Prologue> Σ0 ↓
<POP 20aac-20abe RegCacheLoad> Σ0 ↓
<POP 20abe-20b1e Naked> Σ0 ↓ →0x20b50
<Blob 0x20abe [10] @> Δ-10 {[«10""»]}
<POP 20ad0-20ad2 StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x20ad2 9> {[«10""»]|[$$SAVESTATE]}
<MI 20ae2 MOVE.L (A6+0x8),(A7)> {[«10""»]|[4, '(A6+0x8)']}
<POP 20adc-20ae2 StackAdj> Δ-8 {[«10""»]|[4, '(A6+0x8)']|[-8-]}
<Call 0x20ae6 0x102cc> {[«10""»]|[4, '(A6+0x8)']|[-8-]}
StringDup(a : String) : String
<POP 20aec-20aee StackAdj> Δ+2 {[«10""»]|[4, '(A6+0x8)']|[-6-]}
<POP 20aee-20aef StackAdj> Δ+2 {[«10""»]|[4, '(A6+0x8)']|[-4-]}
<Const 0x20aef 0x2.2> Δ-2 {[«10""»]|[4, '(A6+0x8)']|[-4-]|[#2]}
<Pointer.fp 0x20af0 <LVAR -0x002 @>> Δ-4 {[«10""»]|[4, '(A6+0x8)']|[-4-]|[#2]|[@@-2]}
<Call 0x20af4 0x103b0> {[«10""»]|[4, '(A6+0x8)']|[-4-]|[#2]|[@@-2]}
PushProgram(a : String; b : String; MOD c : B; VAR d : Bool)
<POP 20afa-20afc StackAdj> Δ+20 {[-4-]}
<MI 20afc MOVE.L (A6+0x8),(A7)> {[4, '(A6+0x8)']}
<MI 20b00 CLR.B -(A7)> Δ-2 {[4, '(A6+0x8)']|[#0]}
<Const 0x20b02 0x2.2> Δ-2 {[4, '(A6+0x8)']|[#0]|[#2]}
<Const 0x20b04 0x0.4> Δ-4 {[4, '(A6+0x8)']|[#0]|[#2]|[##0]}
<Pointer.fp 0x20b08 <LVAR -0x008 @>> Δ-4 {[4, '(A6+0x8)']|[#0]|[#2]|[##0]|[@@-8]}
<Pointer.fp 0x20b0a <LVAR -0x006 @ 4(r)>> Δ-4 {[4, '(A6+0x8)']|[#0]|[#2]|[##0]|[@@-8]|[@@-6]}
<Call 0x20b0c 0x10380> {[4, '(A6+0x8)']|[#0]|[#2]|[##0]|[@@-8]|[@@-6]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 20b12-20b14 StackAdj> Δ+20 {}
<MI 20b14 MOVEA.L (A6-0x6),A0> {}
<MI 20b16 MOVE.W (A0+0x20),D0> {}
<MI 20b1a CMP.W #0x0e,D0> {}
<MI 20b1c BEQ 0x20b50> {}
<POP 20b1e-20b50 Naked> Σ0 ↓
<Blob 0x20b1e [34] @> Δ-34 {[«34""»]}
<Const 0x20b30 0xe.2> Δ-2 {[«34""»]|[#14]}
<POP 20b32-20b34 StackAdj> Δ-4 {[«34""»]|[#14]|[-4-]}
<Lit 0x20b34 33> {[«34""»]|[#14]|[$$SAVED_STATE file length is not 14]}
<Call 0x20b46 0x103b8> {[«34""»]|[#14]|[$$SAVED_STATE file length is not 14]}
PopProgram(status : Byte; msg : String)
<POP 20b4c-20b50 StackAdj> Δ+40 {}
<POP 20b50-20b5c Naked> Σ0 Δ-4 ↓ ←0x20abe
<MI 20b50 MOVE.W (A0+0x20),D0> {}
<MI 20b54 SUBQ.W #0x1,D0> {}
<MI 20b56 EXTW.L D0> {}
<MI 20b58 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']}
<MI 20b5a MOVEQ.L #0x00,D7> {[4, 'D0']}
<POP 20b5c-20b60 Naked> Σ-4 ↓ →0x20baa ←0x20b60
<MI 20b5c CMP.L (A7),D7> {[-4-]}
<MI 20b5e BGT 0x20baa> {[-4-]}
<POP 20b60-20baa Naked> Σ-4 ↓ →0x20b5c
<MI 20b60 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']}
<MI 20b62 MOVE.W D7,-(A7)> Δ-2 {[-4-]|[4, '(A6-0x6)']|[2, 'D7']}
<MI 20b64 CLR.W -(A7)> Δ-2 {[-4-]|[4, '(A6-0x6)']|[2, 'D7']|[#0]}
<Const 0x20b66 0x200.2> Δ-2 {[-4-]|[4, '(A6-0x6)']|[2, 'D7']|[#0]|[#512]}
<Const 0x20b6a 0x2.2> Δ-2 {[-4-]|[4, '(A6-0x6)']|[2, 'D7']|[#0]|[#512]|[#2]}
<Blob 0x20b6c [4] 0x21f1e> Δ-4 {[-4-]|[4, '(A6-0x6)']|[2, 'D7']|[#0]|[#512]|[#2]|[«4»]}
<Pointer.fp 0x20b72 <LVAR -0x008 @>> Δ-4 {[-4-]|[4, '(A6-0x6)']|[2, 'D7']|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
<Call 0x20b74 0x10384> {[-4-]|[4, '(A6-0x6)']|[2, 'D7']|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 20b7a-20b7c StackAdj> Δ+16 {[-4-]|[4, '(A6-0x6)']}
<POP 20b7c-20b7d StackAdj> Δ+4 {[-4-]}
<Blob 0x20b7d [4] 0x21b1a> Δ-4 {[-4-]|[«4»]}
<Blob 0x20b82 [2] 0x21f22> Δ-2 {[-4-]|[«4»]|[«2»]}
<MI 20b88 CLR.W -(A7)> Δ-2 {[-4-]|[«4»]|[«2»]|[#0]}
<Const 0x20b8a 0x200.2> Δ-2 {[-4-]|[«4»]|[«2»]|[#0]|[#512]}
<Const 0x20b8e 0x2.2> Δ-2 {[-4-]|[«4»]|[«2»]|[#0]|[#512]|[#2]}
<Blob 0x20b90 [4] 0x21f1e> Δ-4 {[-4-]|[«4»]|[«2»]|[#0]|[#512]|[#2]|[«4»]}
<Pointer.fp 0x20b96 <LVAR -0x008 @>> Δ-4 {[-4-]|[«4»]|[«2»]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
<Call 0x20b98 0x10388> {[-4-]|[«4»]|[«2»]|[#0]|[#512]|[#2]|[«4»]|[@@-8]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 20b9e-20ba0 StackAdj> Δ+20 {[-4-]}
<MI 20ba0 ADDQ.W #0x1,0x21f22> {[-4-]}
<MI 20ba6 ADDQ.L #0x1,D7> {[-4-]}
<MI 20ba8 BVC 0x20b5c> {[-4-]}
<POP 20baa-20bc0 Naked> Σ-4 Δ+4 ↓ ←0x20b5c
<POP 20baa-20bac StackAdj> Δ+2 {[-2-]}
<MI 20bac CLR.B (A7)> {[-2-]}
<Const 0x20bae 0x1.2> Δ-2 {[-2-]|[#1]}
<Const 0x20bb0 0x1.4> Δ-4 {[-2-]|[#1]|[##1]}
<Pointer.fp 0x20bb4 <LVAR -0x008 @>> Δ-4 {[-2-]|[#1]|[##1]|[@@-8]}
<Pointer.fp 0x20bb6 <LVAR -0x006 @ 4(r)>> Δ-4 {[-2-]|[#1]|[##1]|[@@-8]|[@@-6]}
<Call 0x20bb8 0x1038c> {[-2-]|[#1]|[##1]|[@@-8]|[@@-6]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 20bbe-20bc0 StackAdj> Δ+16 {}
<POP 20bc0-20bc8 Epilogue> Σ0
@ 20bc8
<LVAR -0x004 @ 1(r)>
<LVAR -0x008 @ 4(r)>
<LVAR -0x405 1(r)>
<LVAR -0x406 2(r)>
<LVAR -0x408 @>
<POP 20bc8-20c96 Body>
<POP 20bc8-20bde Prologue> Σ0 ↓
<POP 20bde-20bea RegCacheLoad> Σ0 ↓
<POP 20bea-20c2a Naked> Σ0 ↓ →0x20c8e
<Blob 0x20bea [10] @> Δ-10 {[«10""»]}
<POP 20bfc-20bfe StackAdj> Δ-4 {[«10""»]|[-4-]}
<Lit 0x20bfe 9> {[«10""»]|[$$ERROR_LOG]}
<POP 20c0e-20c10 StackAdj> Δ-2 {[«10""»]|[$$ERROR_LOG]|[-2-]}
<MI 20c10 CLR.B (A7)> {[«10""»]|[$$ERROR_LOG]|[-2-]}
<Const 0x20c12 0x1.2> Δ-2 {[«10""»]|[$$ERROR_LOG]|[-2-]|[#1]}
<Const 0x20c14 0x0.4> Δ-4 {[«10""»]|[$$ERROR_LOG]|[-2-]|[#1]|[##0]}
<Pointer.fp 0x20c18 <LVAR -0x004 @ 1(r)>> Δ-4 {[«10""»]|[$$ERROR_LOG]|[-2-]|[#1]|[##0]|[@@-4]}
<Pointer.fp 0x20c1a <LVAR -0x008 @ 4(r)>> Δ-4 {[«10""»]|[$$ERROR_LOG]|[-2-]|[#1]|[##0]|[@@-4]|[@@-8]}
<Call 0x20c1c 0x10380> {[«10""»]|[$$ERROR_LOG]|[-2-]|[#1]|[##0]|[@@-4]|[@@-8]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 20c22-20c26 StackAdj> Δ+30 {}
<MI 20c26 TST.B (A6-0x4)> {}
<MI 20c28 BNE 0x20c8e> {}
<POP 20c2a-20c8e Naked> Σ0 ↓
<MI 20c2a MOVE.L (A6-0x8),-(A7)> Δ-4 {[4, '(A6-0x8)']}
<MI 20c2c CLR.W -(A7)> Δ-2 {[4, '(A6-0x8)']|[#0]}
<MI 20c2e CLR.W -(A7)> Δ-2 {[4, '(A6-0x8)']|[#0]|[#0]}
<Const 0x20c30 0x200.2> Δ-2 {[4, '(A6-0x8)']|[#0]|[#0]|[#512]}
<Const 0x20c34 0x1.2> Δ-2 {[4, '(A6-0x8)']|[#0]|[#0]|[#512]|[#1]}
<MI 20c36 LEA.L (A6-0x408),A0> {[4, '(A6-0x8)']|[#0]|[#0]|[#512]|[#1]}
<MI 20c3a MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x8)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']}
<Pointer.fp 0x20c3c <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6-0x8)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x20c3e 0x10384> {[4, '(A6-0x8)']|[#0]|[#0]|[#512]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 20c44-20c46 StackAdj> Δ+16 {[4, '(A6-0x8)']}
<MI 20c46 MOVE.L (A6-0x8),(A7)> {[4, '(A6-0x8)']}
<MI 20c48 MOVE.W (A6-0x406),D0> {[4, '(A6-0x8)']}
<MI 20c4c LSR.W #0x3,D0> {[4, '(A6-0x8)']}
<MI 20c4e ADDQ.W #0x1,D0> {[4, '(A6-0x8)']}
<MI 20c50 MOVE.W D0,-(A7)> Δ-2 {[4, '(A6-0x8)']|[2, 'D0']}
<MI 20c52 CLR.L D0> {[4, '(A6-0x8)']|[2, 'D0']}
<MI 20c54 MOVE.B (A6-0x405),D0> {[4, '(A6-0x8)']|[2, 'D0']}
<MI 20c58 LSL.B #0x5,D0> {[4, '(A6-0x8)']|[2, 'D0']}
<MI 20c5a LSR.B #0x5,D0> {[4, '(A6-0x8)']|[2, 'D0']}
<MI 20c5c ASL.W #0x6,D0> {[4, '(A6-0x8)']|[2, 'D0']}
<MI 20c5e MOVE.W D0,-(A7)> Δ-2 {[4, '(A6-0x8)']|[2, 'D0']|[2, 'D0']}
<Const 0x20c60 0x40.2> Δ-2 {[4, '(A6-0x8)']|[2, 'D0']|[2, 'D0']|[#64]}
<Const 0x20c64 0x1.2> Δ-2 {[4, '(A6-0x8)']|[2, 'D0']|[2, 'D0']|[#64]|[#1]}
<MI 20c66 LEA.L 0x21f64,A0> {[4, '(A6-0x8)']|[2, 'D0']|[2, 'D0']|[#64]|[#1]}
<MI 20c6c MOVE.L A0,-(A7)> Δ-4 {[4, '(A6-0x8)']|[2, 'D0']|[2, 'D0']|[#64]|[#1]|[4, 'A0']}
<Pointer.fp 0x20c6e <LVAR -0x004 @ 1(r)>> Δ-4 {[4, '(A6-0x8)']|[2, 'D0']|[2, 'D0']|[#64]|[#1]|[4, 'A0']|[@@-4]}
<Call 0x20c70 0x10384> {[4, '(A6-0x8)']|[2, 'D0']|[2, 'D0']|[#64]|[#1]|[4, 'A0']|[@@-4]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 20c76-20c7a StackAdj> Δ+18 {[-2-]}
<MI 20c7a CLR.B (A7)> {[-2-]}
<Const 0x20c7c 0x1.2> Δ-2 {[-2-]|[#1]}
<Const 0x20c7e 0x1.4> Δ-4 {[-2-]|[#1]|[##1]}
<Pointer.fp 0x20c82 <LVAR -0x004 @ 1(r)>> Δ-4 {[-2-]|[#1]|[##1]|[@@-4]}
<Pointer.fp 0x20c84 <LVAR -0x008 @ 4(r)>> Δ-4 {[-2-]|[#1]|[##1]|[@@-4]|[@@-8]}
<Call 0x20c86 0x1038c> {[-2-]|[#1]|[##1]|[@@-4]|[@@-8]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 20c8c-20c8e StackAdj> Δ+16 {}
<POP 20c8e-20c96 Epilogue> Σ0 ←0x20bea
@ 20c96
<LVAR -0x00a 4(r)>
<LVAR -0x00e @ 4(r)>
<LVAR -0x012 @ 4(r)>
<LVAR -0x016 @ 4(r)>
<LVAR -0x018 @>
<POP 20c96-20df2 Body>
<POP 20c96-20cac Prologue> Σ0 ↓
<POP 20cac-20cb4 RegCacheLoad> Σ0 ↓
<POP 20cb4-20d4c Naked> Σ0 ↓
<MI 20cb4 MOVE.W #0x3,0x21f24> {}
<POP 20cb8-20cba StackAdj> Δ-2 {[-2-]}
<Call 0x20cba 0x105ec> {[-2-]}
Get_fc05() : Byte
<MI 20cc0 MOVE.B (A7)+,D0> Δ+2 {}
<MI 20cc2 EXTB.W D0> {}
<MI 20cc4 MOVE.W D0,0x21f26> {}
<MI 20cca CLR.W 0x21f28> {}
<MI 20cd0 CLR.W 0x21f2a> {}
<MI 20cd6 CLR.W 0x21f2c> {}
<MI 20cdc CLR.W 0x21f2e> {}
<MI 20ce2 CLR.W 0x21f42> {}
<Pointer.fp 0x20ce8 <LVAR -0x012 @ 4(r)>> Δ-4 {[@@-18]}
<Call 0x20cec 0x1059e> {[@@-18]}
ReadClusterNo(VAR a : Long)
<MI 20cf2 MOVE.L (A6-0x12),(A7)> {[4, '(A6-0x12)']}
<MI 20cf6 PEA.L (A7)> Δ-4 {[4, '(A6-0x12)']|[4, '^(A7)']}
<Const 0x20cf8 0x0.4> Δ-4 {[4, '(A6-0x12)']|[4, '^(A7)']|[##0]}
<Const 0x20cfc 0x3.4> Δ-4 {[4, '(A6-0x12)']|[4, '^(A7)']|[##0]|[##3]}
<Pointer.fp 0x20d00 <LVAR -0x00e @ 4(r)>> Δ-4 {[4, '(A6-0x12)']|[4, '^(A7)']|[##0]|[##3]|[@@-14]}
<Call 0x20d04 0x104b4> {[4, '(A6-0x12)']|[4, '^(A7)']|[##0]|[##3]|[@@-14]}
?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q)
<POP 20d0a-20d0e StackAdj> Δ+16 {[4, '(A6-0x12)']}
<POP 20d0e-20d0f StackAdj> Δ+4 {}
<Blob 0x20d0f [4] @> Δ-4 {[«4""»]}
<Blob 0x20d12 [4] @> Δ-4 {[«4""»]|[«4""»]}
<POP 20d16-20d18 StackAdj> Δ-8 {[«4""»]|[«4""»]|[-8-]}
<MI 20d18 MOVE.L (A6-0xa),-(A7)> Δ-4 {[«4""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']}
<MI 20d1c MOVE.L (A6-0xe),-(A7)> Δ-4 {[«4""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']}
<Const 0x20d20 0xa.4> Δ-4 {[«4""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[##10]}
<Call 0x20d24 0x1035c> {[«4""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']|[4, '(A6-0xe)']|[##10]}
Quad2String(a : Quad; radix : Long ) : String
<POP 20d2a-20d2c StackAdj> Δ+8 {[«4""»]|[«4""»]|[-8-]|[4, '(A6-0xa)']}
<Lit 0x20d2c 8> {[«4""»]|[«4""»]|[-8-]|[$$________]}
<Call 0x20d3e 0x102d0> {[«4""»]|[«4""»]|[-8-]|[$$________]}
StringCat2(a, b : String) : String
<POP 20d44-20d46 StackAdj> Δ+8 {[«4""»]|[«4""»]|[-4-]}
<MI 20d46 MOVEA.L (A7)+,A4> Δ+4 {[«4""»]|[«4""»]}
<POP 20d48-20d4a StackAdj> Δ+8 {}
<MI 20d4a MOVEQ.L #0x01,D7> {}
<POP 20d4c-20d62 Naked> Σ0 ↓ →0x20d4c ←0x20d4c
<MI 20d4c LEA.L 0x21b12,A0> {}
<MI 20d52 LEA.L (A0+D7.L),A0> {}
<MI 20d56 MOVE.B (A4+D7.L+#0x1),(A0+0x437)> {}
<MI 20d5c ADDQ.L #0x1,D7> {}
<MI 20d5e CMP.L #0x08,D7> {}
<MI 20d60 BLE 0x20d4c> {}
<POP 20d62-20dea Naked> Σ0 ↓
<Const 0x20d62 0x22324.4> Δ-4 {[##140068]}
<Call 0x20d68 0x10304> {[##140068]}
GetRtc() : TimeStamp
<POP 20d6e-20d70 StackAdj> Δ+4 {}
<Call 0x20d70 0x20bc8> {}
<Const 0x20d74 0xfcc0.4> Δ-4 {[##64704]}
<MI 20d7a LEA.L 0x21fe4,A0> {[##64704]}
<MI 20d80 MOVE.L A0,-(A7)> Δ-4 {[##64704]|[4, 'A0']}
<Const 0x20d82 0x340.2> Δ-2 {[##64704]|[4, 'A0']|[#832]}
<Call 0x20d86 0x10238> {[##64704]|[4, 'A0']|[#832]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 20d8c-20d8e StackAdj> Δ+6 {[##64704]}
<POP 20d8e-20d8f StackAdj> Δ+4 {}
<Const 0x20d8f 0xfc60.4> Δ-4 {[##64608]}
<MI 20d94 LEA.L (A6-0x16),A0> {[##64608]}
<MI 20d98 MOVE.L A0,-(A7)> Δ-4 {[##64608]|[4, 'A0']}
<Const 0x20d9a 0x4.2> Δ-2 {[##64608]|[4, 'A0']|[#4]}
<Call 0x20d9e 0x10238> {[##64608]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 20da4-20da8 StackAdj> Δ+10 {}
<MI 20da8 MOVE.L (A6-0x16),D0> {}
<MI 20dac SUBI.L #0x0000fcc0,D0> {}
<MI 20db2 ADDQ.L #0x1,D0> {}
<MI 20db4 MOVE.W D0,0x21f44> {}
<MI 20dba CLR.W 0x21f46> {}
<MI 20dc0 CLR.W 0x21f48> {}
<Blob 0x20dc6 [4] 0x21b1a> Δ-4 {[«4»]}
<MI 20dcc CLR.W -(A7)> Δ-2 {[«4»]|[#0]}
<MI 20dce CLR.W -(A7)> Δ-2 {[«4»]|[#0]|[#0]}
<Const 0x20dd0 0x200.2> Δ-2 {[«4»]|[#0]|[#0]|[#512]}
<Const 0x20dd4 0x2.2> Δ-2 {[«4»]|[#0]|[#0]|[#512]|[#2]}
<MI 20dd8 LEA.L 0x21f24,A0> {[«4»]|[#0]|[#0]|[#512]|[#2]}
<MI 20dda MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']}
<Pointer.fp 0x20ddc <LVAR -0x018 @>> Δ-4 {[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']|[@@-24]}
<Call 0x20de0 0x10388> {[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']|[@@-24]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 20de6-20dea StackAdj> Δ+20 {}
<POP 20dea-20df2 Epilogue> Σ0
@ 20df2
START
<POP 20df2--0001 Body>
<POP 20df2-20dfc Prologue> Σ0
<POP 20dfc-20e1e RegCacheLoad> Σ0 ↓
<POP 20e1e-20e9a Naked> Σ0 Δ-34 ↓ →0x20ee0
<Call 0x20e1e 0x10398> {}
FSCALL_10398
<Call 0x20e24 0x20750> {}
<Const 0x20e28 0x1.4> Δ-4 {[##1]}
<Call 0x20e2c 0x104d8> {[##1]}
ExpInit(a : Long)
<POP 20e32-20e34 StackAdj> Δ+2 {[-2-]}
<MI 20e34 CLR.B (A7)> {[-2-]}
<Call 0x20e36 0x104d2> {[-2-]}
SetExpInitDone(a : Byte)
<POP 20e3c-20e3e StackAdj> Δ+2 {}
<MI 20e3e LEA.L 0x21b1e,A0> {}
<MI 20e44 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 20e46 MOVE.L (A7),0x21f1e> {[4, 'A0']}
<Call 0x20e4c 0x103c4> {[4, 'A0']}
GetArgv() : String
<MI 20e52 MOVE.L (A7)+,0x2236a> Δ+4 {}
<Blob 0x20e54 [10] @> Δ-10 {[«10""»]}
<Blob 0x20e60 [4] @> Δ-4 {[«10""»]|[«4""»]}
<Blob 0x20e64 [4] @> Δ-4 {[«10""»]|[«4""»]|[«4""»]}
<Blob 0x20e68 [4] @> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]}
<Blob 0x20e6c [4] @> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<Blob 0x20e70 [4] @> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<Blob 0x20e74 [4] @> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 20e78-20e7a StackAdj> Δ-2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-2-]}
<Blob 0x20e7a [4] 0x2236a> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-2-]|[«4»]}
<POP 20e7c-20e7e StackAdj> Δ-4 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-2-]|[«4»]|[-4-]}
<Lit 0x20e7e 10> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-2-]|[«4»]|[$$DUMP_UDIAG]}
<Call 0x20e8e 0x102c8> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-2-]|[«4»]|[$$DUMP_UDIAG]}
StringEqual(a, b : String) : Byte
<POP 20e94-20e96 StackAdj> Δ+8 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[-2-]}
<MI 20e96 TST.B (A7)+> Δ+2 {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<MI 20e98 BNE 0x20ee0> {[«10""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]|[«4""»]}
<POP 20e9a-20ebc Naked> Σ-34 ↓ →0x20ee0
<POP 20e9a-20e9c StackAdj> Δ-2 {[-36-]}
<Blob 0x20e9c [4] 0x2236a> Δ-4 {[-36-]|[«4»]}
<POP 20e9e-20ea0 StackAdj> Δ-4 {[-36-]|[«4»]|[-4-]}
<Lit 0x20ea0> {[-36-]|[«4»]|[$$…]}
<Pointer.sp 0x20ea0 22> Δ-4
<Const 0x20ea4 0x1.2> Δ-2
<Const 0x20ea6 0xc.2> Δ-2
<Call 0x20ea8 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20eae-20eb0 StackAdj> Δ+8
<Call 0x20eb0 0x102c8> {[-36-]|[«4»]|[$$…]}
StringEqual(a, b : String) : Byte
<POP 20eb6-20eb8 StackAdj> Δ+8 {[-36-]}
<MI 20eb8 TST.B (A7)+> Δ+2 {[-34-]}
<MI 20eba BNE 0x20ee0> {[-34-]}
<POP 20ebc-20ee0 Naked> Σ-34 ↓ →0x210c4
<POP 20ebc-20ebe StackAdj> Δ-2 {[-36-]}
<Blob 0x20ebe [4] 0x2236a> Δ-4 {[-36-]|[«4»]}
<POP 20ec0-20ec2 StackAdj> Δ-4 {[-36-]|[«4»]|[-4-]}
<Lit 0x20ec2> {[-36-]|[«4»]|[$$…]}
<Pointer.sp 0x20ec2 10> Δ-4
<Const 0x20ec6 0x1.2> Δ-2
<Const 0x20ec8 0xc.2> Δ-2
<Call 0x20eca 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 20ed0-20ed2 StackAdj> Δ+8
<Call 0x20ed2 0x102c8> {[-36-]|[«4»]|[$$…]}
StringEqual(a, b : String) : Byte
<POP 20ed8-20eda StackAdj> Δ+8 {[-36-]}
<MI 20eda TST.B (A7)+> Δ+2 {[-34-]}
<MI 20edc BEQ 0x210c4> {[-34-]}
<POP 20ee0-20fb0 Naked> Σ-34 Δ-12 ↓ →0x20fe2 ←0x20e1e ←0x20e9a
<Blob 0x20ee0 [10] @> Δ-10 {[-34-]|[«10""»]}
<Blob 0x20eec [2] @> Δ-2 {[-34-]|[«10""»]|[«2""»]}
<POP 20ef0-20ef2 StackAdj> Δ-8 {[-34-]|[«10""»]|[«2""»]|[-8-]}
<Lit 0x20ef2 10> {[-34-]|[«10""»]|[«2""»]|[-4-]|[$$R1000_DUMP]}
<POP 20f00-20f02 StackAdj> Δ-4 {[-34-]|[«10""»]|[«2""»]|[-4-]|[$$R1000_DUMP]|[-4-]}
<Lit 0x20f02 2> {[-34-]|[«10""»]|[«2""»]|[-4-]|[$$R1000_DUMP]|[$$1 ]}
<Call 0x20f12 0x102d0> {[-34-]|[«10""»]|[«2""»]|[-4-]|[$$R1000_DUMP]|[$$1 ]}
StringCat2(a, b : String) : String
<POP 20f18-20f1a StackAdj> Δ+6 {[-34-]|[«10""»]|[«2""»]|[-4-]|[-2-]}
<MI 20f1a CLR.B (A7)> {[-34-]|[«10""»]|[«2""»]|[-4-]|[-2-]}
<Const 0x20f1c 0x2.2> Δ-2 {[-34-]|[«10""»]|[«2""»]|[-4-]|[-2-]|[#2]}
<Const 0x20f1e 0x32.4> Δ-4 {[-34-]|[«10""»]|[«2""»]|[-4-]|[-2-]|[#2]|[##50]}
<Const 0x20f22 0x22372.4> Δ-4 {[-34-]|[«10""»]|[«2""»]|[-4-]|[-2-]|[#2]|[##50]|[##140146]}
<Const 0x20f24 0x21b1a.4> Δ-4 {[-34-]|[«10""»]|[«2""»]|[-4-]|[-2-]|[#2]|[##50]|[##140146]|[##138010]}
<Call 0x20f26 0x10380> {[-34-]|[«10""»]|[«2""»]|[-4-]|[-2-]|[#2]|[##50]|[##140146]|[##138010]}
OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File)
<POP 20f2c-20f30 StackAdj> Δ+28 {[-34-]|[-4-]}
<POP 20f30-20f31 StackAdj> Δ+4 {[-34-]}
<Blob 0x20f31 [4] 0x21b1a> Δ-4 {[-34-]|[«4»]}
<MI 20f32 CLR.W -(A7)> Δ-2 {[-34-]|[«4»]|[#0]}
<MI 20f34 CLR.W -(A7)> Δ-2 {[-34-]|[«4»]|[#0]|[#0]}
<Const 0x20f36 0x200.2> Δ-2 {[-34-]|[«4»]|[#0]|[#0]|[#512]}
<Const 0x20f38 0x2.2> Δ-2 {[-34-]|[«4»]|[#0]|[#0]|[#512]|[#2]}
<MI 20f3a LEA.L 0x21f24,A0> {[-34-]|[«4»]|[#0]|[#0]|[#512]|[#2]}
<MI 20f40 MOVE.L A0,-(A7)> Δ-4 {[-34-]|[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']}
<Const 0x20f42 0x22372.4> Δ-4 {[-34-]|[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']|[##140146]}
<Call 0x20f44 0x10384> {[-34-]|[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']|[##140146]}
ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L)
<POP 20f4a-20f4e StackAdj> Δ+16 {[-34-]|[«4»]}
<POP 20f4e-20f4f StackAdj> Δ+4 {[-34-]}
<Const 0x20f4f 0xfcc0.4> Δ-4 {[-34-]|[##64704]}
<MI 20f54 LEA.L 0x21bde,A0> {[-34-]|[##64704]}
<MI 20f5a MOVE.L A0,-(A7)> Δ-4 {[-34-]|[##64704]|[4, 'A0']}
<Const 0x20f5c 0x340.2> Δ-2 {[-34-]|[##64704]|[4, 'A0']|[#832]}
<Call 0x20f60 0x10238> {[-34-]|[##64704]|[4, 'A0']|[#832]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 20f66-20f68 StackAdj> Δ+6 {[-34-]|[##64704]}
<POP 20f68-20f69 StackAdj> Δ+4 {[-34-]}
<Const 0x20f69 0xfc60.4> Δ-4 {[-34-]|[##64608]}
<MI 20f6e LEA.L 0x22364,A0> {[-34-]|[##64608]}
<MI 20f74 MOVE.L A0,-(A7)> Δ-4 {[-34-]|[##64608]|[4, 'A0']}
<Const 0x20f76 0x4.2> Δ-2 {[-34-]|[##64608]|[4, 'A0']|[#4]}
<Call 0x20f7a 0x10238> {[-34-]|[##64608]|[4, 'A0']|[#4]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 20f80-20f82 StackAdj> Δ+6 {[-34-]|[##64608]}
<POP 20f82-20f83 StackAdj> Δ+4 {[-34-]}
<Blob 0x20f83 [4] @> Δ-4 {[-34-]|[«4""»]}
<Blob 0x20f86 [4] @> Δ-4 {[-34-]|[«4""»]|[«4""»]}
<Blob 0x20f8a [4] @> Δ-4 {[-34-]|[«4""»]|[«4""»]|[«4""»]}
<POP 20f8e-20f90 StackAdj> Δ-2 {[-34-]|[«4""»]|[«4""»]|[«4""»]|[-2-]}
<Blob 0x20f90 [4] 0x2236a> Δ-4 {[-34-]|[«4""»]|[«4""»]|[«4""»]|[-2-]|[«4»]}
<POP 20f92-20f94 StackAdj> Δ-4 {[-34-]|[«4""»]|[«4""»]|[«4""»]|[-2-]|[«4»]|[-4-]}
<Lit 0x20f94 12> {[-34-]|[«4""»]|[«4""»]|[«4""»]|[-2-]|[«4»]|[$$FRU_T_SCREEN]}
<Call 0x20fa4 0x102c8> {[-34-]|[«4""»]|[«4""»]|[«4""»]|[-2-]|[«4»]|[$$FRU_T_SCREEN]}
StringEqual(a, b : String) : Byte
<POP 20faa-20fac StackAdj> Δ+8 {[-34-]|[«4""»]|[«4""»]|[«4""»]|[-2-]}
<MI 20fac TST.B (A7)+> Δ+2 {[-34-]|[«4""»]|[«4""»]|[«4""»]}
<MI 20fae BEQ 0x20fe2> {[-34-]|[«4""»]|[«4""»]|[«4""»]}
<POP 20fb0-20fe2 Naked> Σ-46 →0x21012
<Blob 0x20fb0 [4] 0x21b1a> Δ-4 {[-46-]|[«4»]}
<Const 0x20fb2 0x23.2> Δ-2 {[-46-]|[«4»]|[#35]}
<MI 20fb6 CLR.W -(A7)> Δ-2 {[-46-]|[«4»]|[#35]|[#0]}
<Const 0x20fb8 0x200.2> Δ-2 {[-46-]|[«4»]|[#35]|[#0]|[#512]}
<Const 0x20fba 0x2.2> Δ-2 {[-46-]|[«4»]|[#35]|[#0]|[#512]|[#2]}
<Blob 0x20fbc [4] 0x21f1e> Δ-4 {[-46-]|[«4»]|[#35]|[#0]|[#512]|[#2]|[«4»]}
<Const 0x20fc2 0x22372.4> Δ-4 {[-46-]|[«4»]|[#35]|[#0]|[#512]|[#2]|[«4»]|[##140146]}
<Call 0x20fc4 0x10388> {[-46-]|[«4»]|[#35]|[#0]|[#512]|[#2]|[«4»]|[##140146]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 20fca-20fcc StackAdj> Δ+20 {[-46-]}
<MI 20fcc MOVE.L 0x22364,D0> {[-46-]}
<MI 20fd2 SUBI.L #0x0000fcc0,D0> {[-46-]}
<MI 20fd8 ADDQ.L #0x1,D0> {[-46-]}
<MI 20fda MOVE.W D0,0x21f48> {[-46-]}
<MI 20fe0 BRA 0x21012> {[-46-]}
<POP 20fe2-21012 Naked> Σ-46 ↓ ←0x20ee0
<Blob 0x20fe2 [4] 0x21b1a> Δ-4 {[-46-]|[«4»]}
<Const 0x20fe4 0x22.2> Δ-2 {[-46-]|[«4»]|[#34]}
<MI 20fe8 CLR.W -(A7)> Δ-2 {[-46-]|[«4»]|[#34]|[#0]}
<Const 0x20fea 0x200.2> Δ-2 {[-46-]|[«4»]|[#34]|[#0]|[#512]}
<Const 0x20fec 0x2.2> Δ-2 {[-46-]|[«4»]|[#34]|[#0]|[#512]|[#2]}
<Blob 0x20fee [4] 0x21f1e> Δ-4 {[-46-]|[«4»]|[#34]|[#0]|[#512]|[#2]|[«4»]}
<Const 0x20ff4 0x22372.4> Δ-4 {[-46-]|[«4»]|[#34]|[#0]|[#512]|[#2]|[«4»]|[##140146]}
<Call 0x20ff6 0x10388> {[-46-]|[«4»]|[#34]|[#0]|[#512]|[#2]|[«4»]|[##140146]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 20ffc-20ffe StackAdj> Δ+20 {[-46-]}
<MI 20ffe MOVE.L 0x22364,D0> {[-46-]}
<MI 21004 SUBI.L #0x0000fcc0,D0> {[-46-]}
<MI 2100a ADDQ.L #0x1,D0> {[-46-]}
<MI 2100c MOVE.W D0,0x21f46> {[-46-]}
<POP 21012-21042 Naked> Σ-46 Δ+2 ↓ →0x21080 ←0x20fb0
<POP 21012-21014 StackAdj> Δ+12 {[-34-]}
<Blob 0x21014 [10] @> Δ-10 {[-34-]|[«10""»]}
<POP 21020-21022 StackAdj> Δ-2 {[-34-]|[«10""»]|[-2-]}
<Blob 0x21022 [4] 0x2236a> Δ-4 {[-34-]|[«10""»]|[-2-]|[«4»]}
<POP 21024-21026 StackAdj> Δ-4 {[-34-]|[«10""»]|[-2-]|[«4»]|[-4-]}
<Lit 0x21026 10> {[-34-]|[«10""»]|[-2-]|[«4»]|[$$DUMP_UDIAG]}
<Call 0x21036 0x102c8> {[-34-]|[«10""»]|[-2-]|[«4»]|[$$DUMP_UDIAG]}
StringEqual(a, b : String) : Byte
<POP 2103c-2103e StackAdj> Δ+8 {[-34-]|[«10""»]|[-2-]}
<MI 2103e TST.B (A7)+> Δ+2 {[-34-]|[«10""»]}
<MI 21040 BEQ 0x21080> {[-34-]|[«10""»]}
<POP 21042-21080 Naked> Σ-44 ↓
<MI 21042 MOVE.W #0x24,0x21f22> {[-44-]}
<MI 2104a MOVE.W 0x21f22,0x21f2e> {[-44-]}
<Blob 0x21054 [18] @> Δ-18 {[-44-]|[«18""»]}
<POP 21066-21068 StackAdj> Δ-4 {[-44-]|[«18""»]|[-4-]}
<Lit 0x21068 17> {[-44-]|[«18""»]|[$$UDIAG.SAVED_STATE]}
<Call 0x2107a 0x20a96> {[-44-]|[«18""»]|[$$UDIAG.SAVED_STATE]}
<POP 2107e-21080 StackAdj> Δ+22 {[-44-]}
<POP 21080-210c4 Naked> Σ-44 Δ+10 ↓ ←0x21012
<POP 21080-21082 StackAdj> Δ+6 {[-38-]}
<POP 21082-21083 StackAdj> Δ+4 {[-34-]}
<Blob 0x21083 [4] 0x21b1a> Δ-4 {[-34-]|[«4»]}
<MI 21084 CLR.W -(A7)> Δ-2 {[-34-]|[«4»]|[#0]}
<MI 21086 CLR.W -(A7)> Δ-2 {[-34-]|[«4»]|[#0]|[#0]}
<Const 0x21088 0x200.2> Δ-2 {[-34-]|[«4»]|[#0]|[#0]|[#512]}
<Const 0x2108a 0x2.2> Δ-2 {[-34-]|[«4»]|[#0]|[#0]|[#512]|[#2]}
<MI 2108c LEA.L 0x21f24,A0> {[-34-]|[«4»]|[#0]|[#0]|[#512]|[#2]}
<MI 21092 MOVE.L A0,-(A7)> Δ-4 {[-34-]|[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']}
<Const 0x21094 0x22372.4> Δ-4 {[-34-]|[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']|[##140146]}
<Call 0x21096 0x10388> {[-34-]|[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']|[##140146]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 2109c-210a0 StackAdj> Δ+18 {[-34-]|[-2-]}
<MI 210a0 CLR.B (A7)> {[-34-]|[-2-]}
<Const 0x210a2 0x2.2> Δ-2 {[-34-]|[-2-]|[#2]}
<Const 0x210a4 0x1.4> Δ-4 {[-34-]|[-2-]|[#2]|[##1]}
<Const 0x210a8 0x22372.4> Δ-4 {[-34-]|[-2-]|[#2]|[##1]|[##140146]}
<Const 0x210aa 0x21b1a.4> Δ-4 {[-34-]|[-2-]|[#2]|[##1]|[##140146]|[##138010]}
<Call 0x210ac 0x1038c> {[-34-]|[-2-]|[#2]|[##1]|[##140146]|[##138010]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 210b2-210b6 StackAdj> Δ+14 {[-34-]|[-2-]}
<MI 210b6 CLR.B (A7)> {[-34-]|[-2-]}
<Const 0x210b8 0x1.4> Δ-4 {[-34-]|[-2-]|[##1]}
<Call 0x210bc 0x103b8> {[-34-]|[-2-]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 210c2-210c4 StackAdj> Δ+6 {[-34-]}
<POP 210c4-21104 Naked> Σ-34 Δ+12 ↓ →0x2115a ←0x20ebc
<POP 210c4-210c5 StackAdj> Δ+34 ↓ {}
<Blob 0x210c5 [12] @> Δ-12 {[«12""»]}
<Blob 0x210d4 [10] @> Δ-10 {[«12""»]|[«10""»]}
<POP 210e0-210e2 StackAdj> Δ-2 {[«12""»]|[«10""»]|[-2-]}
<Blob 0x210e2 [4] 0x2236a> Δ-4 {[«12""»]|[«10""»]|[-2-]|[«4»]}
<POP 210e4-210e6 StackAdj> Δ-4 {[«12""»]|[«10""»]|[-2-]|[«4»]|[-4-]}
<Lit 0x210e6 11> {[«12""»]|[«10""»]|[-2-]|[«4»]|[$$NO_R1K_DUMP]}
<Call 0x210f8 0x102c8> {[«12""»]|[«10""»]|[-2-]|[«4»]|[$$NO_R1K_DUMP]}
StringEqual(a, b : String) : Byte
<POP 210fe-21100 StackAdj> Δ+8 {[«12""»]|[«10""»]|[-2-]}
<MI 21100 TST.B (A7)+> Δ+2 {[«12""»]|[«10""»]}
<MI 21102 BNE 0x2115a> {[«12""»]|[«10""»]}
<POP 21104-21126 Naked> Σ-22 ↓ →0x2115a
<POP 21104-21106 StackAdj> Δ-2 {[-24-]}
<Blob 0x21106 [4] 0x2236a> Δ-4 {[-24-]|[«4»]}
<POP 21108-2110a StackAdj> Δ-4 {[-24-]|[«4»]|[-4-]}
<Lit 0x2110a> {[-24-]|[«4»]|[$$…]}
<Pointer.sp 0x2110a 10> Δ-4
<Const 0x2110e 0x1.2> Δ-2
<Const 0x21110 0xa.2> Δ-2
<Call 0x21112 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21118-2111a StackAdj> Δ+8
<Call 0x2111a 0x102c8> {[-24-]|[«4»]|[$$…]}
StringEqual(a, b : String) : Byte
<POP 21120-21122 StackAdj> Δ+8 {[-24-]}
<MI 21122 TST.B (A7)+> Δ+2 {[-22-]}
<MI 21124 BNE 0x2115a> {[-22-]}
<POP 21126-2115a Naked> Σ-22 ↓
<Blob 0x21126 [26] @> Δ-26 {[-22-]|[«26""»]}
<Const 0x21138 0xe.2> Δ-2 {[-22-]|[«26""»]|[#14]}
<POP 2113c-2113e StackAdj> Δ-4 {[-22-]|[«26""»]|[#14]|[-4-]}
<Lit 0x2113e 25> {[-22-]|[«26""»]|[#14]|[$$unknown invocation option]}
<Call 0x21150 0x103b8> {[-22-]|[«26""»]|[#14]|[$$unknown invocation option]}
PopProgram(status : Byte; msg : String)
<POP 21156-2115a StackAdj> Δ+32 {[-22-]}
<POP 2115a-21170 Naked> Σ-22 Δ+22 ↓ →0x21174 ←0x210c4 ←0x21104
<POP 2115a-2115c StackAdj> Δ+22 {}
<Call 0x2115c 0x207e8> {}
<Call 0x21160 0x20c96> {}
<POP 21164-21166 StackAdj> Δ-2 {[-2-]}
<Call 0x21166 0x105ec> {[-2-]}
Get_fc05() : Byte
<MI 2116c TST.B (A7)+> Δ+2 {}
<MI 2116e BEQ 0x21174> {}
<POP 21170-21174 Naked> Σ0 ↓
<Call 0x21170 0x20950> {}
<POP 21174-211a2 Naked> Σ0 Δ-10 ↓ →0x21202 ←0x2115a
<Blob 0x21174 [10] @> Δ-10 {[«10""»]}
<POP 21180-21182 StackAdj> Δ-2 {[«10""»]|[-2-]}
<Blob 0x21182 [4] 0x2236a> Δ-4 {[«10""»]|[-2-]|[«4»]}
<POP 21184-21186 StackAdj> Δ-4 {[«10""»]|[-2-]|[«4»]|[-4-]}
<Lit 0x21186 10> {[«10""»]|[-2-]|[«4»]|[$$DUMP_R1000]}
<Call 0x21196 0x102c8> {[«10""»]|[-2-]|[«4»]|[$$DUMP_R1000]}
StringEqual(a, b : String) : Byte
<POP 2119c-2119e StackAdj> Δ+8 {[«10""»]|[-2-]}
<MI 2119e TST.B (A7)+> Δ+2 {[«10""»]}
<MI 211a0 BEQ 0x21202> {[«10""»]}
<POP 211a2-211f8 Naked> Σ-10 ↓ →0x211fe
<MI 211a2 MOVE.W #0x4,0x21f22> {[-10-]}
<MI 211aa MOVE.W 0x21f22,0x21f2a> {[-10-]}
<Blob 0x211b4 [22] @> Δ-22 {[-10-]|[«22""»]}
<POP 211c0-211c2 StackAdj> Δ-4 {[-10-]|[«22""»]|[-4-]}
<Lit 0x211c2 22> {[-10-]|[«22""»]|[$$CRASH_DUMP.SAVED_STATE]}
<Call 0x211d2 0x20a96> {[-10-]|[«22""»]|[$$CRASH_DUMP.SAVED_STATE]}
<POP 211d6-211da StackAdj> Δ+26 {[-10-]}
<MI 211da MOVE.W #0x01,0x21f42> {[-10-]}
<Call 0x211e0 0x202c8> {[-10-]}
<Const 0x211e4 0x22368.4> Δ-4 {[-10-]|[##140136]}
<Call 0x211ea 0x20602> {[-10-]|[##140136]}
<POP 211ee-211f0 StackAdj> Δ+4 {[-10-]}
<MI 211f0 TST.B 0x22368> {[-10-]}
<MI 211f6 BEQ 0x211fe> {[-10-]}
<POP 211f8-211fe Naked> Σ-10 ↓
<MI 211f8 MOVE.W #0x02,0x21f42> {[-10-]}
<POP 211fe-21202 Naked> Σ-10 ↓ ←0x211a2
<Call 0x211fe 0x2041c> {[-10-]}
<POP 21202-212ca Naked> Σ-10 Δ+10 ↓ ←0x21174
<POP 21202-21204 StackAdj> Δ+2 {[-8-]}
<POP 21204-21205 StackAdj> Δ+4 {[-4-]}
<Blob 0x21205 [4] 0x22324> Δ-4 {[-4-]|[«4»]}
<Call 0x2120a 0x10308> {[-4-]|[«4»]}
TimeToText()
<POP 21210-21212 StackAdj> Δ+4 {[-4-]}
<MI 21212 MOVE.L (A7)+,0x2236e> Δ+4 {}
<MI 21218 MOVEA.L 0x2236e,A0> {}
<MI 2121e LEA.L (A0+0x2),A0> {}
<MI 21222 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']}
<MI 21224 LEA.L 0x21f30,A0> {[4, 'A0']}
<MI 2122a MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']|[4, 'A0']}
<Const 0x2122c 0x12.2> Δ-2 {[4, 'A0']|[4, 'A0']|[#18]}
<Call 0x21230 0x10238> {[4, 'A0']|[4, 'A0']|[#18]}
KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word)
<POP 21236-21238 StackAdj> Δ+6 {[4, 'A0']}
<POP 21238-21239 StackAdj> Δ+4 {}
<Blob 0x21239 [4] 0x21b1a> Δ-4 {[«4»]}
<MI 2123a CLR.W -(A7)> Δ-2 {[«4»]|[#0]}
<MI 2123c CLR.W -(A7)> Δ-2 {[«4»]|[#0]|[#0]}
<Const 0x2123e 0x200.2> Δ-2 {[«4»]|[#0]|[#0]|[#512]}
<Const 0x21240 0x2.2> Δ-2 {[«4»]|[#0]|[#0]|[#512]|[#2]}
<MI 21242 LEA.L 0x21f24,A0> {[«4»]|[#0]|[#0]|[#512]|[#2]}
<MI 21248 MOVE.L A0,-(A7)> Δ-4 {[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']}
<Const 0x2124a 0x22372.4> Δ-4 {[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']|[##140146]}
<Call 0x2124c 0x10388> {[«4»]|[#0]|[#0]|[#512]|[#2]|[4, 'A0']|[##140146]}
WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L)
<POP 21252-21254 StackAdj> Δ+20 {}
<MI 21254 MOVEA.L 0x21b1a,A0> {}
<MI 21256 MOVE.B 0x22324,(A0+0x3a)> {}
<MI 2125e MOVE.B 0x22325,(A0+0x3b)> {}
<MI 21266 MOVE.B 0x22326,(A0+0x3c)> {}
<MI 2126e MOVE.B 0x22327,(A0+0x3d)> {}
<MI 21276 MOVE.B #0x01,(A0+0x4c)> {}
<MI 2127a CLR.B -(A7)> Δ-2 {[#0]}
<Const 0x2127c 0x2.2> Δ-2 {[#0]|[#2]}
<Const 0x2127e 0x1.4> Δ-4 {[#0]|[#2]|[##1]}
<Const 0x21282 0x22372.4> Δ-4 {[#0]|[#2]|[##1]|[##140146]}
<Const 0x21284 0x21b1a.4> Δ-4 {[#0]|[#2]|[##1]|[##140146]|[##138010]}
<Call 0x21286 0x1038c> {[#0]|[#2]|[##1]|[##140146]|[##138010]}
CloseFile(a : L; VAR status : B; VAR file : File)
<POP 2128c-2128d StackAdj> Δ+16 ↓ {}
<Blob 0x2128d [50] @> Δ-50 {[«50""»]}
<POP 2129e-212a0 StackAdj> Δ-4 {[«50""»]|[-4-]}
<Lit 0x212a0 49> {[«50""»]|[$$CrashSave has created tombstone file R1000_DUMP1.]}
<Call 0x212b2 0x103e0> {[«50""»]|[$$CrashSave has created tombstone file R1000_DUMP1.]}
WriteConsoleStringCrLf(str : String)
<POP 212b8-212bc StackAdj> Δ+52 {[-2-]}
<MI 212bc CLR.B (A7)> {[-2-]}
<Const 0x212be 0x1.4> Δ-4 {[-2-]|[##1]}
<Call 0x212c2 0x103b8> {[-2-]|[##1]}
PopProgram(status : Byte; msg : String)
<POP 212c8-212ca StackAdj> Δ+6 {}
<POP 212ca-212d0 Naked> Σ0
<Call 0x212ca 0x10284> {}
?exit
@ 214cc
<LVAR 0x00a 1(r)>
<LVAR 0x008 1(r)>
<LVAR -0x004 @ 4(r)>
<POP 214cc-21576 Body> Δ+12
<POP 214cc-214e2 Prologue> Σ0 ↓
<POP 214e2-214e8 RegCacheLoad> Σ0 ↓
<POP 214e8-214f4 Naked> Σ0 ↓ →0x21506
<POP 214e8-214ea StackAdj> Δ-2 {[-2-]}
<Call 0x214ea 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 214f0 TST.B (A7)+> Δ+2 {}
<MI 214f2 BEQ 0x21506> {}
<POP 214f4-21506 Naked> Σ0 Δ-12 →0x21516
<Blob 0x214f4 [12] @> Δ-12 {[«12""»]}
<MI 21504 BRA 0x21516> {[«12""»]}
<POP 21506-21516 Naked> Σ0 Δ-12 ↓ ←0x214e8
<Blob 0x21506 [12] @> Δ-12 {[«12""»]}
<POP 21516-2156e Naked> Σ-12 Δ+12 ↓ ←0x214f4
<POP 21516-21518 StackAdj> Δ-4 {[-16-]}
<Lit 0x21518> {[-12-]|[$$…]}
<Pointer.sp 0x21518 4> Δ-4
<Const 0x2151c 0x1.2> Δ-2
<Const 0x21520 0xb.2> Δ-2
<Call 0x21524 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2152a-2152c StackAdj> Δ+8
<Pointer.fp 0x2152c <LVAR -0x004 @ 4(r)>> Δ-4 {[-12-]|[$$…]|[@@-4]}
<Call 0x2152e 0x10460> {[-12-]|[$$…]|[@@-4]}
ExpLoad(a : String; b: Pointer)
<POP 21534-21538 StackAdj> Δ+20 {}
<MI 21538 MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']}
<MI 2153c MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']}
<Pointer.sp 0x2153e 4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]}
<Const 0x21542 0x0.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]}
<Const 0x21546 0x0.4> Δ-4 {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
<Call 0x2154a 0x10466> {[2, '(A6+0x8)']|[4, '(A6-0x4)']|[^^4]|[##0]|[##0]}
ExpInputParam(exp : Pointer; ptr : Pointer; len : L)
<POP 21550-21554 StackAdj> Δ+16 {[2, '(A6+0x8)']}
<MI 21554 CLR.B (A7)> {[2, '(A6+0x8)']}
<MI 21556 MOVE.B (A6+0xa),-(A7)> Δ-2 {[2, '(A6+0x8)']|[2, '(A6+0xa)']}
<MI 2155a MOVE.L (A6-0x4),-(A7)> Δ-4 {[2, '(A6+0x8)']|[2, '(A6+0xa)']|[4, '(A6-0x4)']}
<Call 0x2155c 0x104ba> {[2, '(A6+0x8)']|[2, '(A6+0xa)']|[4, '(A6-0x4)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 21562-21564 StackAdj> Δ+8 {}
<Pointer.fp 0x21564 <LVAR -0x004 @ 4(r)>> Δ-4 {[@@-4]}
<Call 0x21566 0x10496> {[@@-4]}
ExpClose(exp : Pointer)
<POP 2156c-2156e StackAdj> Δ+4 {}
<POP 2156e-21576 Epilogue> Σ0
@ 21592
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 21592-21620 Body> Δ+14
<POP 21592-215a8 Prologue> Σ0 ↓
<POP 215a8-215ae RegCacheLoad> Σ0 ↓
<POP 215ae-215ba Naked> Σ0 ↓ →0x215cc
<POP 215ae-215b0 StackAdj> Δ-2 {[-2-]}
<Call 0x215b0 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 215b6 TST.B (A7)+> Δ+2 {}
<MI 215b8 BEQ 0x215cc> {}
<POP 215ba-215cc Naked> Σ0 Δ-14 →0x215dc
<Blob 0x215ba [14] @> Δ-14 {[«14""»]}
<MI 215ca BRA 0x215dc> {[«14""»]}
<POP 215cc-215dc Naked> Σ0 Δ-14 ↓ ←0x215ae
<Blob 0x215cc [14] @> Δ-14 {[«14""»]}
<POP 215dc-21618 Naked> Σ-14 Δ+14 ↓ ←0x215ba
<POP 215dc-215de StackAdj> Δ-4 {[-18-]}
<Lit 0x215de> {[-14-]|[$$…]}
<Pointer.sp 0x215de 4> Δ-4
<Const 0x215e2 0x1.2> Δ-2
<Const 0x215e6 0xd.2> Δ-2
<Call 0x215ea 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 215f0-215f2 StackAdj> Δ+8
<Pointer.fp 0x215f2 <LVAR -0x006 @ 4(r)>> Δ-4 {[-14-]|[$$…]|[@@-6]}
<Call 0x215f4 0x10460> {[-14-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 215fa-215fe StackAdj> Δ+22 {}
<MI 215fe CLR.B -(A7)> Δ-2 {[#0]}
<MI 21600 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 21604 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x21606 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 2160c-2160e StackAdj> Δ+8 {}
<Pointer.fp 0x2160e <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x21610 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 21616-21618 StackAdj> Δ+4 {}
<POP 21618-21620 Epilogue> Σ0
@ 2162c
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 2162c-216b0 Body> Δ+6
<POP 2162c-21642 Prologue> Σ0 ↓
<POP 21642-21646 RegCacheLoad> Σ0 ↓
<POP 21646-21652 Naked> Σ0 ↓ →0x21660
<POP 21646-21648 StackAdj> Δ-2 {[-2-]}
<Call 0x21648 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2164e TST.B (A7)+> Δ+2 {}
<MI 21650 BEQ 0x21660> {}
<POP 21652-21660 Naked> Σ0 Δ-6 →0x2166c
<Blob 0x21652 [2] @> Δ-2 {[«2""»]}
<Blob 0x21656 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x2165a [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<MI 2165e BRA 0x2166c> {[«2""»]|[«2""»]|[«2""»]}
<POP 21660-2166c Naked> Σ0 Δ-6 ↓ ←0x21646
<Blob 0x21660 [2] @> Δ-2 {[«2""»]}
<Blob 0x21664 [2] @> Δ-2 {[«2""»]|[«2""»]}
<Blob 0x21668 [2] @> Δ-2 {[«2""»]|[«2""»]|[«2""»]}
<POP 2166c-216a8 Naked> Σ-6 Δ+6 ↓ ←0x21652
<POP 2166c-2166e StackAdj> Δ-4 {[-10-]}
<Lit 0x2166e> {[-6-]|[$$…]}
<Pointer.sp 0x2166e 4> Δ-4
<Const 0x21672 0x1.2> Δ-2
<Const 0x21676 0x6.2> Δ-2
<Call 0x2167a 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21680-21682 StackAdj> Δ+8
<Pointer.fp 0x21682 <LVAR -0x006 @ 4(r)>> Δ-4 {[-6-]|[$$…]|[@@-6]}
<Call 0x21684 0x10460> {[-6-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 2168a-2168e StackAdj> Δ+14 {}
<MI 2168e CLR.B -(A7)> Δ-2 {[#0]}
<MI 21690 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 21694 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x21696 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 2169c-2169e StackAdj> Δ+8 {}
<Pointer.fp 0x2169e <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x216a0 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 216a6-216a8 StackAdj> Δ+4 {}
<POP 216a8-216b0 Epilogue> Σ0
@ 216e0
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 216e0-2176e Body> Δ+24
<POP 216e0-216f6 Prologue> Σ0 ↓
<POP 216f6-216fc RegCacheLoad> Σ0 ↓
<POP 216fc-21708 Naked> Σ0 ↓ →0x2171a
<POP 216fc-216fe StackAdj> Δ-2 {[-2-]}
<Call 0x216fe 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 21704 TST.B (A7)+> Δ+2 {}
<MI 21706 BEQ 0x2171a> {}
<POP 21708-2171a Naked> Σ0 Δ-24 →0x2172a
<Blob 0x21708 [24] @> Δ-24 {[«24""»]}
<MI 21718 BRA 0x2172a> {[«24""»]}
<POP 2171a-2172a Naked> Σ0 Δ-24 ↓ ←0x216fc
<Blob 0x2171a [24] @> Δ-24 {[«24""»]}
<POP 2172a-21766 Naked> Σ-24 Δ+24 ↓ ←0x21708
<POP 2172a-2172c StackAdj> Δ-4 {[-28-]}
<Lit 0x2172c> {[-24-]|[$$…]}
<Pointer.sp 0x2172c 4> Δ-4
<Const 0x21730 0x1.2> Δ-2
<Const 0x21734 0x17.2> Δ-2
<Call 0x21738 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 2173e-21740 StackAdj> Δ+8
<Pointer.fp 0x21740 <LVAR -0x006 @ 4(r)>> Δ-4 {[-24-]|[$$…]|[@@-6]}
<Call 0x21742 0x10460> {[-24-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 21748-2174c StackAdj> Δ+32 {}
<MI 2174c CLR.B -(A7)> Δ-2 {[#0]}
<MI 2174e MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 21752 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x21754 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 2175a-2175c StackAdj> Δ+8 {}
<Pointer.fp 0x2175c <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x2175e 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 21764-21766 StackAdj> Δ+4 {}
<POP 21766-2176e Epilogue> Σ0
@ 2178a
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 2178a-2180e Body> Δ+14
<POP 2178a-217a0 Prologue> Σ0 ↓
<POP 217a0-217a4 RegCacheLoad> Σ0 ↓
<POP 217a4-217b0 Naked> Σ0 ↓ →0x217be
<POP 217a4-217a6 StackAdj> Δ-2 {[-2-]}
<Call 0x217a6 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 217ac TST.B (A7)+> Δ+2 {}
<MI 217ae BEQ 0x217be> {}
<POP 217b0-217be Naked> Σ0 Δ-14 →0x217ca
<Blob 0x217b0 [14] @> Δ-14 {[«14""»]}
<MI 217bc BRA 0x217ca> {[«14""»]}
<POP 217be-217ca Naked> Σ0 Δ-14 ↓ ←0x217a4
<Blob 0x217be [14] @> Δ-14 {[«14""»]}
<POP 217ca-21806 Naked> Σ-14 Δ+14 ↓ ←0x217b0
<POP 217ca-217cc StackAdj> Δ-4 {[-18-]}
<Lit 0x217cc> {[-14-]|[$$…]}
<Pointer.sp 0x217cc 4> Δ-4
<Const 0x217d0 0x1.2> Δ-2
<Const 0x217d4 0xe.2> Δ-2
<Call 0x217d8 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 217de-217e0 StackAdj> Δ+8
<Pointer.fp 0x217e0 <LVAR -0x006 @ 4(r)>> Δ-4 {[-14-]|[$$…]|[@@-6]}
<Call 0x217e2 0x10460> {[-14-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 217e8-217ec StackAdj> Δ+22 {}
<MI 217ec CLR.B -(A7)> Δ-2 {[#0]}
<MI 217ee MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 217f2 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x217f4 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 217fa-217fc StackAdj> Δ+8 {}
<Pointer.fp 0x217fc <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x217fe 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 21804-21806 StackAdj> Δ+4 {}
<POP 21806-2180e Epilogue> Σ0
@ 21836
<LVAR 0x008 1(r)>
<LVAR -0x006 @ 4(r)>
<POP 21836-218c4 Body> Δ+20
<POP 21836-2184c Prologue> Σ0 ↓
<POP 2184c-21852 RegCacheLoad> Σ0 ↓
<POP 21852-2185e Naked> Σ0 ↓ →0x21870
<POP 21852-21854 StackAdj> Δ-2 {[-2-]}
<Call 0x21854 0x104cc> {[-2-]}
MemOnly2MB() : Bool
<MI 2185a TST.B (A7)+> Δ+2 {}
<MI 2185c BEQ 0x21870> {}
<POP 2185e-21870 Naked> Σ0 Δ-20 →0x21880
<Blob 0x2185e [20] @> Δ-20 {[«20""»]}
<MI 2186e BRA 0x21880> {[«20""»]}
<POP 21870-21880 Naked> Σ0 Δ-20 ↓ ←0x21852
<Blob 0x21870 [20] @> Δ-20 {[«20""»]}
<POP 21880-218bc Naked> Σ-20 Δ+20 ↓ ←0x2185e
<POP 21880-21882 StackAdj> Δ-4 {[-24-]}
<Lit 0x21882> {[-20-]|[$$…]}
<Pointer.sp 0x21882 4> Δ-4
<Const 0x21886 0x1.2> Δ-2
<Const 0x2188a 0x13.2> Δ-2
<Call 0x2188e 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21894-21896 StackAdj> Δ+8
<Pointer.fp 0x21896 <LVAR -0x006 @ 4(r)>> Δ-4 {[-20-]|[$$…]|[@@-6]}
<Call 0x21898 0x10460> {[-20-]|[$$…]|[@@-6]}
ExpLoad(a : String; b: Pointer)
<POP 2189e-218a2 StackAdj> Δ+28 {}
<MI 218a2 CLR.B -(A7)> Δ-2 {[#0]}
<MI 218a4 MOVE.B (A6+0x8),-(A7)> Δ-2 {[#0]|[2, '(A6+0x8)']}
<MI 218a8 MOVE.L (A6-0x6),-(A7)> Δ-4 {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
<Call 0x218aa 0x104ba> {[#0]|[2, '(A6+0x8)']|[4, '(A6-0x6)']}
ExpRun(a: Bool; adr: Byte; b: Pointer)
<POP 218b0-218b2 StackAdj> Δ+8 {}
<Pointer.fp 0x218b2 <LVAR -0x006 @ 4(r)>> Δ-4 {[@@-6]}
<Call 0x218b4 0x10496> {[@@-6]}
ExpClose(exp : Pointer)
<POP 218ba-218bc StackAdj> Δ+4 {}
<POP 218bc-218c4 Epilogue> Σ0
@ 2191a
PROG_FAIL
<LVAR 0x008 1(r)>
<POP 2191a-21982 Body>
<POP 2191a-21930 Prologue> Σ0 ↓
<POP 21930-2197a Naked> Σ0 ↓
<Blob 0x21930 [14] @> Δ-14 {[«14""»]}
<Const 0x2193c 0x3.2> Δ-2 {[«14""»]|[#3]}
<POP 21940-21942 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]}
<Lit 0x21942 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]}
<POP 21954-21956 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 21956 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2195a EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2195c EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<MI 2195e MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
<Call 0x21960 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']}
Long2String(a : Long) : String
<POP 21966-21968 StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
<Call 0x21968 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 2196e-21970 StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]}
<Call 0x21970 0x103b8> {[«14""»]|[#3]|[-4-]}
PopProgram(status : Byte; msg : String)
<POP 21976-2197a StackAdj> Δ+20 {}
<POP 2197a-21982 Epilogue> Σ0
@ 219d6
EXP_FAIL
<LVAR 0x00e 1(r)>
<LVAR 0x00a 4(r)>
<LVAR 0x008 1(r)>
<POP 219d6-21b12 Body>
<POP 219d6-219ec Prologue> Σ0 ↓
<POP 219ec-21a02 RegCacheLoad> Σ0 ↓
<POP 21a02-21a62 Naked> Σ0 ↓ →0x21aaa
<Call 0x21a02 0x103dc> {}
WriteConsoleCrLf(void)
<Blob 0x21a08 [18] @> Δ-18 {[«18""»]}
<POP 21a14-21a16 StackAdj> Δ-4 {[«18""»]|[-4-]}
<Lit 0x21a16 18> {[«18""»]|[$$Experiment error :]}
<Call 0x21a22 0x103e0> {[«18""»]|[$$Experiment error :]}
WriteConsoleStringCrLf(str : String)
<POP 21a24-21a25 StackAdj> Δ+22 ↓ {}
<Blob 0x21a25 [14] @> Δ-14 {[«14""»]}
<POP 21a34-21a36 StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x21a36 13> {[«14""»]|[-4-]|[$$Board :_]}
<POP 21a40-21a42 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<MI 21a42 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
<Call 0x21a46 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]}
BoardName(address : B) : String
<POP 21a4c-21a4e StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
<Call 0x21a4e 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21a54-21a56 StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x21a56 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21a58-21a5a StackAdj> Δ+18 {}
<MI 21a5a MOVEA.L (A6+0xa),A0> {}
<MI 21a5e CMPA.W #0x01,A0> {}
<MI 21a60 BEQ 0x21aaa> {}
<POP 21a62-21aaa Naked> Σ0 ↓
<Blob 0x21a62 [14] @> Δ-14 {[«14""»]}
<Blob 0x21a72 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]}
<POP 21a82-21a84 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]}
<Lit 0x21a84 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]}
<POP 21a8e-21a90 StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]}
<Lit 0x21a90> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
<Pointer.sp 0x21a90 12> Δ-4
<Const 0x21a94 0x1.2> Δ-2
<Const 0x21a96 0x1e.2> Δ-2
<Call 0x21a98 0x102c4>
StringLit(Src : Pointer; Offset: W; Len : W) : String
<POP 21a9a-21a9c StackAdj> Δ+8
<Call 0x21a9c 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]}
StringCat2(a, b : String) : String
<POP 21aa2-21aa4 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]}
<Call 0x21aa4 0x103e0> {[«14""»]|[«30»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21aa6-21aaa StackAdj> Δ+48 {}
<POP 21aaa-21b0a Naked> Σ0 ↓ ←0x21a02
<Blob 0x21aaa [14] @> Δ-14 {[«14""»]}
<POP 21aba-21abc StackAdj> Δ-8 {[«14""»]|[-8-]}
<Lit 0x21abc 13> {[«14""»]|[-4-]|[$$Status :_]}
<POP 21ac6-21ac8 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<MI 21ac8 MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
<Call 0x21acc 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]}
ExpStatus2Text(status.B, &String)
<POP 21ad2-21ad4 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
<Call 0x21ad4 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]}
StringCat2(a, b : String) : String
<POP 21ada-21adc StackAdj> Δ+8 {[«14""»]|[-4-]}
<Call 0x21adc 0x103e0> {[«14""»]|[-4-]}
WriteConsoleStringCrLf(str : String)
<POP 21ade-21adf StackAdj> Δ+18 ↓ {}
<Blob 0x21adf [24] @> Δ-24 {[«24""»]}
<Const 0x21aee 0x2.2> Δ-2 {[«24""»]|[#2]}
<POP 21af2-21af4 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]}
<Lit 0x21af4 23> {[«24""»]|[#2]|[$$Fatal experiment error.]}
<Call 0x21b02 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]}
PopProgram(status : Byte; msg : String)
<POP 21b08-21b0a StackAdj> Δ+30 {}
<POP 21b0a-21b12 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.938711420108449b 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 0d f2 | | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 23 b6 | # | .PTR 0x223b6 00020010 code.end: 00020010 00 02 1b 12 | | .PTR 0x21b12 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 19 1a | | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 19 d6 | | .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 43 52 |@(#)CR | .XXX[0x6] 00020110 41 53 48 53 41 56 45 2c |ASHSAVE,| .XXX[0x18] 00020118 33 2e 30 2c 39 32 2f 30 |3.0,92/0| 00020120 39 2f 30 39 2c 31 37 3a |9/09,17:| 00020128 31 38 3a 31 39 5c |18:19\ | .XXX[0x6] 0002012e 43 52 41 53 48 5f 44 55 |CRASH_DU| .TXT 'CRASH_DUMP.SAVED_STATE' 00020144 52 31 30 30 30 5f 44 55 |R1000_DU| .TXT 'R1000_DUMP' 0002014e 2a 2a 2a 20 4e 6f 20 52 |*** No R| .TXT '*** No R1000 response to DUMP_REGISTERS - probably a hardware error ' 00020192 63 6f 75 6c 64 20 6e 6f |could no| .TXT 'could not create new TOMBSTONE file ' 000201b6 49 4f 50 5f 44 55 4d 50 |IOP_DUMP| .TXT 'IOP_DUMP1 ' 000201c0 53 41 56 45 53 54 41 54 |SAVESTAT| .TXT 'SAVESTATE ' 000201ca 53 41 56 45 44 5f 53 54 |SAVED_ST| .TXT 'SAVED_STATE file length is not 14 ' 000201ec 45 52 52 4f 52 5f 4c 4f |ERROR_LO| .TXT 'ERROR_LOG ' 000201f6 5f 5f 5f 5f |____ | .TXT '____' 000201fa 5f 5f 5f 5f |____ | .TXT '____' 000201fe 54 4f |TO | .XXX[0x2] 00020200 4d 42 53 54 4f 4e 45 5f |MBSTONE_| .XXX[0x28] 00020208 48 45 41 44 45 52 5f 46 |HEADER_F| 00020210 4f 52 4d 20 6e 6f 74 20 |ORM not | 00020218 31 30 32 34 20 62 79 74 |1024 byt| 00020220 65 73 20 6c 6f 6e 67 20 |es long | 00020228 4e 4f 5f 52 31 4b 5f 44 |NO_R1K_D| .TXT 'NO_R1K_DUMP ' 00020234 44 55 4d 50 5f 52 31 30 |DUMP_R10| .TXT 'DUMP_R1000' 0002023e 44 55 4d 50 5f 55 44 49 |DUMP_UDI| .TXT 'DUMP_UDIAG' 00020248 52 45 43 4f |RECO | .TXT 'RECO' 0002024c 56 5f 53 43 |V_SC | .TXT 'V_SC' 00020250 52 45 45 4e |REEN | .TXT 'REEN' 00020254 46 52 55 5f |FRU_ | .TXT 'FRU_' 00020258 54 5f 53 43 |T_SC | .TXT 'T_SC' 0002025c 52 45 45 4e |REEN | .TXT 'REEN' 00020260 31 20 |1 | .TXT '1 ' 00020262 55 44 49 41 47 2e 53 41 |UDIAG.SA| .TXT 'UDIAG.SAVED_STATE ' 00020274 75 6e 6b 6e 6f 77 6e 20 |unknown | .TXT 'unknown invocation option ' 0002028e 43 72 61 73 68 53 61 76 |CrashSav| .TXT 'CrashSave has created tombstone file R1000_DUMP1. ' 000202c0 00 00 00 00 | | .CONST 0x0,0x0,0x0,0x0 000202c4 00 00 00 00 | | .CONST 0x0,0x0,0x0,0x0 000202c8 ; -------------------------------------------------------------------------------------- 000202c8 ; OMSI PASCAL Function 000202c8 ; <LVAR -0x004 1(rw)> 000202c8 ; <LVAR -0x005 1(rw)> 000202c8 ; <LVAR -0x00e @> 000202c8 ; -------------------------------------------------------------------------------------- 000202c8 4e 56 ff be |NV | LINK.W A6,#0xffbe 000202cc bf d5 | | CMPA.L (A5),A7 000202ce 62 06 |b | BHI 0x202d6 000202d0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000202d4 4e 76 |Nv | TRAPV 000202d6 de fc 00 32 | 2 | ADDA.W #0x32,A7 000202da 48 e7 f1 e0 |H | MOVEM.L A2+A1+A0+D7+D3+D2+D1+D0,-(A7) 000202de 45 f9 00 01 04 c0 |E | LEA.L HasBoard(diproc_addr: Byte) : Byte,A2 000202e4 72 0f |r | MOVEQ.L #0x0f,D1 000202e6 34 3c 01 27 |4< ' | MOVE.W #0x127,D2 000202ea 76 0a |v | MOVEQ.L #0x0a,D3 000202ec 4e b9 00 02 13 52 |N R | JSR exp_CLEAR_EXCEPTIONS.FIU() 000202f2 1d 7c 00 01 ff fb | | | MOVE.B #0x01,(A6-0x5) 000202f8 1d 7c 00 b4 ff fc | | | MOVE.B #0xb4,(A6-0x4) 000202fe 2f 3a ff c4 |/: | MOVE.L 0x202c4,-(A7) 00020302 2f 3a ff bc |/: | MOVE.L 0x202c0,-(A7) 00020306 48 6e ff f2 |Hn | PEA.L (A6-0xe) 0002030a 4e b9 00 02 13 f8 |N | JSR exp_PREP_WRITE_REG.TYP(Sw_8, &Sr_8_1) 00020310 de c3 | | ADDA.W D3,A7 00020312 1e ae ff fb | | MOVE.B (A6-0x5),(A7) 00020316 1f 6e ff fc 00 01 | n | MOVE.B (A6-0x4),(A7+0x1) 0002031c 9e c3 | | SUBA.W D3,A7 0002031e 20 4f | O | MOVEA.L A7,A0 00020320 43 ee ff f2 |C | LEA.L (A6-0xe),A1 00020324 70 08 |p | MOVEQ.L #0x08,D0 00020326 10 d9 | | MOVE.B (A1)+,(A0)+ 00020328 51 c8 ff fc |Q | DBF D0,0x20326 0002032c 42 27 |B' | CLR.B -(A7) 0002032e 4e b9 00 02 13 be |N | JSR exp_WRITE_REG.TYP(Sw_2, Sw_8_1, Sw_1) 00020334 de fc 00 0e | | ADDA.W #0xe,A7 00020338 4e b9 00 02 14 48 |N H | JSR exp_LOAD_BENIGN_UWORD.TYP() 0002033e 7e 0c |~ | MOVEQ.L #0x0c,D7 00020340 55 4f |UO | SUBQ.L #0x2,A7 00020342 1f 07 | | MOVE.B D7,-(A7) 00020344 4e 92 |N | JSR (A2) 00020346 54 4f |TO | ADDQ.L #0x2,A7 00020348 4a 1f |J | TST.B (A7)+ 0002034a 67 0e |g | BEQ 0x2035a 0002034c 1f 07 | | MOVE.B D7,-(A7) 0002034e 1f 3c 00 ff | < | MOVE.B #0xff,-(A7) 00020352 4e b9 00 02 14 cc |N | JSR 0x214cc 00020358 58 4f |XO | ADDQ.L #0x4,A7 0002035a 52 07 |R | ADDQ.B #0x1,D7 0002035c be 01 | | CMP.B D1,D7 0002035e 6f e0 |o | BLE 0x20340 00020360 4e b9 00 02 13 1a |N | JSR exp_INIT_MRU.FIU() 00020366 7e 0c |~ | MOVEQ.L #0x0c,D7 00020368 55 4f |UO | SUBQ.L #0x2,A7 0002036a 1f 07 | | MOVE.B D7,-(A7) 0002036c 4e 92 |N | JSR (A2) 0002036e 54 4f |TO | ADDQ.L #0x2,A7 00020370 4a 1f |J | TST.B (A7)+ 00020372 67 0a |g | BEQ 0x2037e 00020374 1f 07 | | MOVE.B D7,-(A7) 00020376 4e b9 00 02 17 8a |N | JSR 0x2178a 0002037c 54 4f |TO | ADDQ.L #0x2,A7 0002037e 52 07 |R | ADDQ.B #0x1,D7 00020380 be 01 | | CMP.B D1,D7 00020382 6f e4 |o | BLE 0x20368 00020384 4e b9 00 01 05 b0 |N | JSR FifoInit(void) 0002038a 3f 02 |? | MOVE.W D2,-(A7) 0002038c 4e b9 00 02 14 1a |N | JSR exp_PREP_RUN.TYP(Sw_2) 00020392 3e 82 |> | MOVE.W D2,(A7) 00020394 4e b9 00 02 14 86 |N | JSR exp_PREP_RUN.VAL(Sw_2) 0002039a 3e 82 |> | MOVE.W D2,(A7) 0002039c 4e b9 00 02 18 de |N | JSR exp_PREP_RUN.IOC(Sw_2) 000203a2 3e 82 |> | MOVE.W D2,(A7) 000203a4 4e b9 00 02 13 a4 |N | JSR exp_PREP_RUN.SEQ(Sw_2) 000203aa 3e 82 |> | MOVE.W D2,(A7) 000203ac 4e b9 00 02 12 ec |N | JSR exp_PREP_RUN.FIU(Sw_2) 000203b2 54 4f |TO | ADDQ.L #0x2,A7 000203b4 7e 0c |~ | MOVEQ.L #0x0c,D7 000203b6 55 4f |UO | SUBQ.L #0x2,A7 000203b8 1f 07 | | MOVE.B D7,-(A7) 000203ba 4e 92 |N | JSR (A2) 000203bc 54 4f |TO | ADDQ.L #0x2,A7 000203be 4a 1f |J | TST.B (A7)+ 000203c0 67 0a |g | BEQ 0x203cc 000203c2 1f 07 | | MOVE.B D7,-(A7) 000203c4 4e b9 00 02 16 e0 |N | JSR 0x216e0 000203ca 54 4f |TO | ADDQ.L #0x2,A7 000203cc 52 07 |R | ADDQ.B #0x1,D7 000203ce be 01 | | CMP.B D1,D7 000203d0 6f e4 |o | BLE 0x203b6 000203d2 4e b9 00 02 13 34 |N 4 | JSR exp_FREEZE_WORLD.FIU() 000203d8 4e b9 00 02 13 dc |N | JSR exp_RUN_NORMAL.TYP() 000203de 4e b9 00 02 14 6a |N j | JSR exp_RUN_NORMAL.VAL() 000203e4 4e b9 00 02 13 8a |N | JSR exp_RUN_CHECK.SEQ() 000203ea 4e b9 00 02 18 c4 |N | JSR exp_RUN_CHECK.IOC() 000203f0 7e 0c |~ | MOVEQ.L #0x0c,D7 000203f2 55 4f |UO | SUBQ.L #0x2,A7 000203f4 1f 07 | | MOVE.B D7,-(A7) 000203f6 4e 92 |N | JSR (A2) 000203f8 54 4f |TO | ADDQ.L #0x2,A7 000203fa 4a 1f |J | TST.B (A7)+ 000203fc 67 0a |g | BEQ 0x20408 000203fe 1f 07 | | MOVE.B D7,-(A7) 00020400 4e b9 00 02 15 92 |N | JSR 0x21592 00020406 54 4f |TO | ADDQ.L #0x2,A7 00020408 52 07 |R | ADDQ.B #0x1,D7 0002040a be 01 | | CMP.B D1,D7 0002040c 6f e4 |o | BLE 0x203f2 0002040e 4e b9 00 02 12 d0 |N | JSR exp_RUN_NORMAL.FIU() 00020414 4c df 07 8f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D7+A0+A1+A2 00020418 4e 5e |N^ | UNLK A6 0002041a 4e 75 |Nu | RTS 0002041c ; -------------------------------------------------------------------------------------- 0002041c ; OMSI PASCAL Function 0002041c ; -------------------------------------------------------------------------------------- 0002041c 4e 56 ff e8 |NV | LINK.W A6,#0xffe8 00020420 bf d5 | | CMPA.L (A5),A7 00020422 62 06 |b | BHI 0x2042a 00020424 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020428 4e 76 |Nv | TRAPV 0002042a de fc 00 14 | | ADDA.W #0x14,A7 0002042e 48 e7 81 00 |H | MOVEM.L D7+D0,-(A7) 00020432 70 0f |p | MOVEQ.L #0x0f,D0 00020434 4e b9 00 02 13 34 |N 4 | JSR exp_FREEZE_WORLD.FIU() 0002043a 4e b9 00 02 18 f8 |N | JSR exp_MF.IOC() 00020440 4e b9 00 02 14 a0 |N | JSR exp_MF.VAL() 00020446 4e b9 00 02 14 34 |N 4 | JSR exp_MF.TYP() 0002044c 4e b9 00 02 13 74 |N t | JSR exp_RESET.SEQ() 00020452 7e 0c |~ | MOVEQ.L #0x0c,D7 00020454 55 4f |UO | SUBQ.L #0x2,A7 00020456 1f 07 | | MOVE.B D7,-(A7) 00020458 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 0002045e 54 4f |TO | ADDQ.L #0x2,A7 00020460 4a 1f |J | TST.B (A7)+ 00020462 67 0a |g | BEQ 0x2046e 00020464 1f 07 | | MOVE.B D7,-(A7) 00020466 4e b9 00 02 16 2c |N , | JSR 0x2162c 0002046c 54 4f |TO | ADDQ.L #0x2,A7 0002046e 52 07 |R | ADDQ.B #0x1,D7 00020470 be 00 | | CMP.B D0,D7 00020472 6f e0 |o | BLE 0x20454 00020474 4e b9 00 02 13 06 |N | JSR exp_MF.FIU() 0002047a 7e 0c |~ | MOVEQ.L #0x0c,D7 0002047c 55 4f |UO | SUBQ.L #0x2,A7 0002047e 1f 07 | | MOVE.B D7,-(A7) 00020480 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 00020486 54 4f |TO | ADDQ.L #0x2,A7 00020488 4a 1f |J | TST.B (A7)+ 0002048a 67 0a |g | BEQ 0x20496 0002048c 1f 07 | | MOVE.B D7,-(A7) 0002048e 4e b9 00 02 18 36 |N 6 | JSR 0x21836 00020494 54 4f |TO | ADDQ.L #0x2,A7 00020496 52 07 |R | ADDQ.B #0x1,D7 00020498 be 00 | | CMP.B D0,D7 0002049a 6f e0 |o | BLE 0x2047c 0002049c 4c df 00 81 |L | MOVEM.L (A7)+,D0+D7 000204a0 4e 5e |N^ | UNLK A6 000204a2 4e 75 |Nu | RTS 000204a4 ; -------------------------------------------------------------------------------------- 000204a4 ; OMSI PASCAL Function 000204a4 ; <LVAR 0x00c 4(r)> 000204a4 ; <LVAR 0x008 4(r)> 000204a4 ; <LVAR -0x004 @> 000204a4 ; -------------------------------------------------------------------------------------- 000204a4 4e 56 ff ac |NV | LINK.W A6,#0xffac 000204a8 bf d5 | | CMPA.L (A5),A7 000204aa 62 06 |b | BHI 0x204b2 000204ac 44 fc 00 02 |D | MOVE.W #0x2,CCR 000204b0 4e 76 |Nv | TRAPV 000204b2 de fc 00 48 | H | ADDA.W #0x48,A7 000204b6 48 e7 c3 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D1+D0,-(A7) 000204ba 45 f9 00 02 23 34 |E #4 | LEA.L 0x22334,A2 000204c0 47 f9 00 02 23 4e |G #N | LEA.L 0x2234e,A3 000204c6 49 f9 00 02 23 36 |I #6 | LEA.L 0x22336,A4 000204cc 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000204d0 53 97 |S | SUBQ.L #0x1,(A7) 000204d2 7c 00 || | MOVEQ.L #0x00,D6 000204d4 bc 97 | | CMP.L (A7),D6 000204d6 6e 00 00 be |n | BGT 0x20596 000204da 41 f9 00 02 23 28 |A #( | LEA.L 0x22328,A0 000204e0 2f 08 |/ | MOVE.L A0,-(A7) 000204e2 42 67 |Bg | CLR.W -(A7) 000204e4 4e b9 00 01 02 3c |N < | JSR KC1e_Fifo_Tx_Response(ptr : Pointer; chan : Word) 000204ea 5c 4f |\O | ADDQ.L #0x6,A7 000204ec 4a 53 |JS | TST.W (A3) 000204ee 67 18 |g | BEQ 0x20508 000204f0 42 80 |B | CLR.L D0 000204f2 30 14 |0 | MOVE.W (A4),D0 000204f4 42 81 |B | CLR.L D1 000204f6 32 13 |2 | MOVE.W (A3),D1 000204f8 d2 80 | | ADD.L D0,D1 000204fa 38 81 |8 | MOVE.W D1,(A4) 000204fc 4a 41 |JA | TST.W D1 000204fe 66 08 |f | BNE 0x20508 00020500 42 80 |B | CLR.L D0 00020502 30 12 |0 | MOVE.W (A2),D0 00020504 52 80 |R | ADDQ.L #0x1,D0 00020506 34 80 |4 | MOVE.W D0,(A2) 00020508 42 80 |B | CLR.L D0 0002050a 30 12 |0 | MOVE.W (A2),D0 0002050c 42 81 |B | CLR.L D1 0002050e 32 39 00 02 23 4c |29 #L | MOVE.W 0x2234c,D1 00020514 d2 80 | | ADD.L D0,D1 00020516 34 81 |4 | MOVE.W D1,(A2) 00020518 2e 3c ff ff fc 18 |.< | MOVE.L #0xfffffc18,D7 0002051e 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020522 43 f9 00 02 23 38 |C #8 | LEA.L 0x22338,A1 00020528 2f 09 |/ | MOVE.L A1,-(A7) 0002052a 42 67 |Bg | CLR.W -(A7) 0002052c 48 50 |HP | PEA.L (A0) 0002052e 4e b9 00 01 02 3e |N > | JSR KC1f_Fifo_Rx_Request(ptr : Pointer; chan : Word; VAR flag : Bool) 00020534 de fc 00 0a | | ADDA.W #0xa,A7 00020538 52 87 |R | ADDQ.L #0x1,D7 0002053a 4a 10 |J | TST.B (A0) 0002053c 66 04 |f | BNE 0x20542 0002053e 4a 87 |J | TST.L D7 00020540 66 dc |f | BNE 0x2051e 00020542 4a 10 |J | TST.B (A0) 00020544 67 4a |gJ | BEQ 0x20590 00020546 2f 39 00 02 23 60 |/9 #` | MOVE.L 0x22360,-(A7) 0002054c 41 f9 00 02 1b 1e |A | LEA.L 0x21b1e,A0 00020552 2f 08 |/ | MOVE.L A0,-(A7) 00020554 3f 3c 04 00 |?< | MOVE.W #0x400,-(A7) 00020558 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 0002055e 5c 4f |\O | ADDQ.L #0x6,A7 00020560 2e b9 00 02 1b 1a |. | MOVE.L 0x21b1a,(A7) 00020566 3f 39 00 02 1f 22 |?9 " | MOVE.W 0x21f22,-(A7) 0002056c 42 67 |Bg | CLR.W -(A7) 0002056e 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020572 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020576 2f 39 00 02 1f 1e |/9 | MOVE.L 0x21f1e,-(A7) 0002057c 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020580 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00020586 de fc 00 14 | | ADDA.W #0x14,A7 0002058a 52 79 00 02 1f 22 |Ry " | ADDQ.W #0x1,0x21f22 00020590 52 86 |R | ADDQ.L #0x1,D6 00020592 68 00 ff 40 |h @ | BVC 0x204d4 00020596 58 4f |XO | ADDQ.L #0x4,A7 00020598 4c df 1f c3 |L | MOVEM.L (A7)+,D0+D1+D6+D7+A0+A1+A2+A3+A4 0002059c 4e 5e |N^ | UNLK A6 0002059e 4e 75 |Nu | RTS 000205a0 ; -------------------------------------------------------------------------------------- 000205a0 ; OMSI PASCAL Function 000205a0 ; <LVAR 0x00a 2(r)> 000205a0 ; -------------------------------------------------------------------------------------- 000205a0 4e 56 ff fc |NV | LINK.W A6,#0xfffc 000205a4 bf d5 | | CMPA.L (A5),A7 000205a6 62 06 |b | BHI 0x205ae 000205a8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000205ac 4e 76 |Nv | TRAPV 000205ae de fc 00 04 | | ADDA.W #0x4,A7 000205b2 33 fc 04 00 00 02 23 28 |3 #(| MOVE.W #0x400,0x22328 000205ba 42 79 00 02 23 2a |By #* | CLR.W 0x2232a 000205c0 42 79 00 02 23 2c |By #, | CLR.W 0x2232c 000205c6 33 ee 00 0a 00 02 23 2e |3 #.| MOVE.W (A6+0xa),0x2232e 000205ce 42 79 00 02 23 30 |By #0 | CLR.W 0x22330 000205d4 42 79 00 02 23 32 |By #2 | CLR.W 0x22332 000205da 42 79 00 02 23 34 |By #4 | CLR.W 0x22334 000205e0 42 79 00 02 23 36 |By #6 | CLR.W 0x22336 000205e6 42 79 00 02 23 48 |By #H | CLR.W 0x22348 000205ec 42 79 00 02 23 4a |By #J | CLR.W 0x2234a 000205f2 42 79 00 02 23 4c |By #L | CLR.W 0x2234c 000205f8 42 79 00 02 23 4e |By #N | CLR.W 0x2234e 000205fe 4e 5e |N^ | UNLK A6 00020600 4e 75 |Nu | RTS 00020602 ; -------------------------------------------------------------------------------------- 00020602 ; OMSI PASCAL Function 00020602 ; <LVAR 0x008 4(r)> 00020602 ; -------------------------------------------------------------------------------------- 00020602 4e 56 ff 90 |NV | LINK.W A6,#0xff90 00020606 bf d5 | | CMPA.L (A5),A7 00020608 62 06 |b | BHI 0x20610 0002060a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002060e 4e 76 |Nv | TRAPV 00020610 de fc 00 6c | l | ADDA.W #0x6c,A7 00020614 48 e7 81 e0 |H | MOVEM.L A2+A1+A0+D7+D0,-(A7) 00020618 45 f9 00 02 1f 22 |E " | LEA.L 0x21f22,A2 0002061e 34 bc 00 12 |4 | MOVE.W #0x12,(A2) 00020622 33 d2 00 02 1f 2c |3 , | MOVE.W (A2),0x21f2c 00020628 7e 10 |~ | MOVEQ.L #0x10,D7 0002062a 48 78 03 00 |Hx | PEA.L 0x300 0002062e 4e ba ff 70 |N p | JSR 0x205a0 00020632 58 4f |XO | ADDQ.L #0x4,A7 00020634 33 fc 00 40 00 02 23 4e |3 @ #N| MOVE.W #0x40,0x2234e 0002063c 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020640 2f 07 |/ | MOVE.L D7,-(A7) 00020642 48 50 |HP | PEA.L (A0) 00020644 4e ba fe 5e |N ^ | JSR 0x204a4 00020648 50 4f |PO | ADDQ.L #0x8,A7 0002064a 4a 10 |J | TST.B (A0) 0002064c 66 32 |f2 | BNE 0x20680 0002064e 9e fc 00 44 | D | SUBA.W #0x44,A7 00020652 20 4f | O | MOVEA.L A7,A0 00020654 43 fa fa f8 |C | LEA.L 0x2014e,A1 00020658 70 42 |pB | MOVEQ.L #0x42,D0 0002065a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002065c 51 c8 ff fc |Q | DBF D0,0x2065a 00020660 59 4f |YO | SUBQ.L #0x4,A7 00020662 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020666 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002066a 3f 3c 00 43 |?< C | MOVE.W #0x43,-(A7) 0002066e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020674 50 4f |PO | ADDQ.L #0x8,A7 00020676 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002067c de fc 00 48 | H | ADDA.W #0x48,A7 00020680 4c df 07 81 |L | MOVEM.L (A7)+,D0+D7+A0+A1+A2 00020684 4e 5e |N^ | UNLK A6 00020686 4e 75 |Nu | RTS 00020688 ; -------------------------------------------------------------------------------------- 00020688 ; OMSI PASCAL Function 00020688 ; <LVAR 0x008 4(r)> 00020688 ; <LVAR -0x006 4(rw)> 00020688 ; <LVAR -0x00a 4(rw)> 00020688 ; -------------------------------------------------------------------------------------- 00020688 4e 56 ff b0 |NV | LINK.W A6,#0xffb0 ; Spelunked 0002068c bf d5 | | CMPA.L (A5),A7 0002068e 62 06 |b | BHI 0x20696 00020690 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020694 4e 76 |Nv | TRAPV 00020696 de fc 00 3c | < | ADDA.W #0x3c,A7 0002069a 48 e7 9f e0 |H | MOVEM.L A2+A1+A0+D7+D6+D5+D4+D3+D0,-(A7) 0002069e 43 ee ff f6 |C | LEA.L (A6-0xa),A1 000206a2 45 ee ff fa |E | LEA.L (A6-0x6),A2 000206a6 55 4f |UO | SUBQ.L #0x2,A7 000206a8 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000206ae 4a 1f |J | TST.B (A7)+ 000206b0 67 0e |g | BEQ 0x206c0 000206b2 22 bc 00 00 08 00 |" | MOVE.L #0x800,(A1) 000206b8 24 bc 00 00 00 04 |$ | MOVE.L #0x4,(A2) 000206be 60 0c |` | BRA 0x206cc 000206c0 22 bc 00 00 10 00 |" | MOVE.L #0x1000,(A1) 000206c6 24 bc 00 00 00 08 |$ | MOVE.L #0x8,(A2) 000206cc 48 78 04 00 |Hx | PEA.L 0x400 000206d0 4e ba fe ce |N | JSR 0x205a0 000206d4 58 4f |XO | ADDQ.L #0x4,A7 000206d6 33 fc 00 10 00 02 23 4c |3 #L| MOVE.W #0x10,0x2234c 000206de 7c 00 || | MOVEQ.L #0x00,D6 000206e0 7a 0c |z | MOVEQ.L #0x0c,D5 000206e2 55 4f |UO | SUBQ.L #0x2,A7 000206e4 1f 05 | | MOVE.B D5,-(A7) 000206e6 4e b9 00 01 04 c0 |N | JSR HasBoard(diproc_addr: Byte) : Byte 000206ec 54 4f |TO | ADDQ.L #0x2,A7 000206ee 4a 1f |J | TST.B (A7)+ 000206f0 67 4c |gL | BEQ 0x2073e 000206f2 2f 12 |/ | MOVE.L (A2),-(A7) 000206f4 53 97 |S | SUBQ.L #0x1,(A7) 000206f6 7e 00 |~ | MOVEQ.L #0x00,D7 000206f8 be 97 | | CMP.L (A7),D7 000206fa 6e 40 |n@ | BGT 0x2073c 000206fc 42 79 00 02 23 30 |By #0 | CLR.W 0x22330 00020702 20 06 | | MOVE.L D6,D0 00020704 e5 80 | | ASL.L #0x2,D0 00020706 d0 87 | | ADD.L D7,D0 00020708 e9 80 | | ASL.L #0x4,D0 0002070a 33 c0 00 02 23 32 |3 #2 | MOVE.W D0,0x22332 00020710 42 79 00 02 23 34 |By #4 | CLR.W 0x22334 00020716 42 79 00 02 23 36 |By #6 | CLR.W 0x22336 0002071c 28 11 |( | MOVE.L (A1),D4 0002071e 26 3c 00 00 00 80 |&< | MOVE.L #0x80,D3 00020724 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 0002072a 2f 04 |/ | MOVE.L D4,-(A7) 0002072c 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020730 48 50 |HP | PEA.L (A0) 00020732 4e ba fd 70 |N p | JSR 0x204a4 00020736 50 4f |PO | ADDQ.L #0x8,A7 00020738 52 87 |R | ADDQ.L #0x1,D7 0002073a 68 bc |h | BVC 0x206f8 0002073c 58 4f |XO | ADDQ.L #0x4,A7 0002073e 52 86 |R | ADDQ.L #0x1,D6 00020740 52 05 |R | ADDQ.B #0x1,D5 00020742 0c 05 00 0f | | CMPI.B #0x0f,D5 00020746 6f 9a |o | BLE 0x206e2 00020748 4c df 07 f9 |L | MOVEM.L (A7)+,D0+D3+D4+D5+D6+D7+A0+A1+A2 0002074c 4e 5e |N^ | UNLK A6 0002074e 4e 75 |Nu | RTS 00020750 ; -------------------------------------------------------------------------------------- 00020750 ; OMSI PASCAL Function 00020750 ; -------------------------------------------------------------------------------------- 00020750 4e 56 ff ce |NV | LINK.W A6,#0xffce 00020754 bf d5 | | CMPA.L (A5),A7 00020756 62 06 |b | BHI 0x2075e 00020758 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002075c 4e 76 |Nv | TRAPV 0002075e de fc 00 32 | 2 | ADDA.W #0x32,A7 00020762 48 e7 f8 f0 |H | MOVEM.L A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7) 00020766 43 f9 00 01 02 38 |C 8 | LEA.L KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word),A1 0002076c 45 f9 00 02 23 54 |E #T | LEA.L 0x22354,A2 00020772 47 f9 00 02 23 5c |G #\ | LEA.L 0x2235c,A3 00020778 74 0a |t | MOVEQ.L #0x0a,D2 0002077a 76 04 |v | MOVEQ.L #0x04,D3 0002077c 78 02 |x | MOVEQ.L #0x02,D4 0002077e 48 78 04 00 |Hx | PEA.L 0x400 00020782 41 f9 00 02 23 50 |A #P | LEA.L 0x22350,A0 00020788 2f 08 |/ | MOVE.L A0,-(A7) 0002078a 3f 03 |? | MOVE.W D3,-(A7) 0002078c 4e 91 |N | JSR (A1) 0002078e de c2 | | ADDA.W D2,A7 00020790 48 78 04 04 |Hx | PEA.L 0x404 00020794 20 4a | J | MOVEA.L A2,A0 00020796 2f 08 |/ | MOVE.L A0,-(A7) 00020798 3f 04 |? | MOVE.W D4,-(A7) 0002079a 4e 91 |N | JSR (A1) 0002079c de c2 | | ADDA.W D2,A7 0002079e 48 78 04 06 |Hx | PEA.L 0x406 000207a2 41 f9 00 02 23 56 |A #V | LEA.L 0x22356,A0 000207a8 2f 08 |/ | MOVE.L A0,-(A7) 000207aa 3f 04 |? | MOVE.W D4,-(A7) 000207ac 4e 91 |N | JSR (A1) 000207ae de c2 | | ADDA.W D2,A7 000207b0 48 78 04 08 |Hx | PEA.L 0x408 000207b4 41 f9 00 02 23 58 |A #X | LEA.L 0x22358,A0 000207ba 2f 08 |/ | MOVE.L A0,-(A7) 000207bc 3f 03 |? | MOVE.W D3,-(A7) 000207be 4e 91 |N | JSR (A1) 000207c0 de c2 | | ADDA.W D2,A7 000207c2 48 78 04 0c |Hx | PEA.L 0x40c 000207c6 20 4b | K | MOVEA.L A3,A0 000207c8 2f 08 |/ | MOVE.L A0,-(A7) 000207ca 3f 03 |? | MOVE.W D3,-(A7) 000207cc 4e 91 |N | JSR (A1) 000207ce de c2 | | ADDA.W D2,A7 000207d0 70 00 |p | MOVEQ.L #0x00,D0 000207d2 c0 d2 | | MULU.W (A2),D0 000207d4 42 81 |B | CLR.L D1 000207d6 32 00 |2 | MOVE.W D0,D1 000207d8 d2 93 | | ADD.L (A3),D1 000207da 23 c1 00 02 23 60 |# #` | MOVE.L D1,0x22360 000207e0 4c df 0f 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3 000207e4 4e 5e |N^ | UNLK A6 000207e6 4e 75 |Nu | RTS 000207e8 ; -------------------------------------------------------------------------------------- 000207e8 ; OMSI PASCAL Function 000207e8 ; <LVAR -0x006 @> 000207e8 ; <LVAR -0x008 @ 1(r)> 000207e8 ; <LVAR -0x00c @ 4(rw)> 000207e8 ; -------------------------------------------------------------------------------------- 000207e8 4e 56 ff 8a |NV | LINK.W A6,#0xff8a 000207ec bf d5 | | CMPA.L (A5),A7 000207ee 62 06 |b | BHI 0x207f6 000207f0 44 fc 00 02 |D | MOVE.W #0x2,CCR 000207f4 4e 76 |Nv | TRAPV 000207f6 de fc 00 62 | b | ADDA.W #0x62,A7 000207fa 48 e7 f9 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D4+D3+D2+D1+D0,-(A7) 000207fe 45 ee ff f8 |E | LEA.L (A6-0x8),A2 00020802 47 ee ff f4 |G | LEA.L (A6-0xc),A3 00020806 72 01 |r | MOVEQ.L #0x01,D1 00020808 74 14 |t | MOVEQ.L #0x14,D2 0002080a 76 0a |v | MOVEQ.L #0x0a,D3 0002080c 78 10 |x | MOVEQ.L #0x10,D4 0002080e 7e 04 |~ | MOVEQ.L #0x04,D7 00020810 41 fa f9 3c |A < | LEA.L 0x2014e,A0 00020814 70 04 |p | MOVEQ.L #0x04,D0 00020816 3f 20 |? | MOVE.W -(A0),-(A7) 00020818 51 c8 ff fc |Q | DBF D0,0x20816 0002081c 51 4f |QO | SUBQ.L #0x8,A7 0002081e 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020822 3f 01 |? | MOVE.W D1,-(A7) 00020824 3f 03 |? | MOVE.W D3,-(A7) 00020826 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002082c 2e 87 |. | MOVE.L D7,(A7) 0002082e 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00020834 58 4f |XO | ADDQ.L #0x4,A7 00020836 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002083c 50 4f |PO | ADDQ.L #0x8,A7 0002083e 28 5f |(_ | MOVEA.L (A7)+,A4 00020840 5c 4f |\O | ADDQ.L #0x6,A7 00020842 2e 8c |. | MOVE.L A4,(A7) 00020844 42 27 |B' | CLR.B -(A7) 00020846 42 27 |B' | CLR.B -(A7) 00020848 48 78 00 00 |Hx | PEA.L 0x0 0002084c 48 52 |HR | PEA.L (A2) 0002084e 48 6e ff fa |Hn | PEA.L (A6-0x6) 00020852 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00020858 de c2 | | ADDA.W D2,A7 0002085a 4a 12 |J | TST.B (A2) 0002085c 66 18 |f | BNE 0x20876 0002085e 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020862 42 27 |B' | CLR.B -(A7) 00020864 48 78 00 01 |Hx | PEA.L 0x1 00020868 48 52 |HR | PEA.L (A2) 0002086a 48 6e ff fa |Hn | PEA.L (A6-0x6) 0002086e 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00020874 de c4 | | ADDA.W D4,A7 00020876 26 8c |& | MOVE.L A4,(A3) 00020878 53 87 |S | SUBQ.L #0x1,D7 0002087a 41 fa f8 d2 |A | LEA.L 0x2014e,A0 0002087e 70 04 |p | MOVEQ.L #0x04,D0 00020880 3f 20 |? | MOVE.W -(A0),-(A7) 00020882 51 c8 ff fc |Q | DBF D0,0x20880 00020886 51 4f |QO | SUBQ.L #0x8,A7 00020888 48 6f 00 08 |Ho | PEA.L (A7+0x8) 0002088c 3f 01 |? | MOVE.W D1,-(A7) 0002088e 3f 03 |? | MOVE.W D3,-(A7) 00020890 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020896 2e 87 |. | MOVE.L D7,(A7) 00020898 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 0002089e 58 4f |XO | ADDQ.L #0x4,A7 000208a0 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000208a6 50 4f |PO | ADDQ.L #0x8,A7 000208a8 28 5f |(_ | MOVEA.L (A7)+,A4 000208aa 5c 4f |\O | ADDQ.L #0x6,A7 000208ac 2e 8c |. | MOVE.L A4,(A7) 000208ae 42 27 |B' | CLR.B -(A7) 000208b0 42 27 |B' | CLR.B -(A7) 000208b2 48 78 00 00 |Hx | PEA.L 0x0 000208b6 48 52 |HR | PEA.L (A2) 000208b8 48 6e ff fa |Hn | PEA.L (A6-0x6) 000208bc 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000208c2 de c2 | | ADDA.W D2,A7 000208c4 4a 12 |J | TST.B (A2) 000208c6 66 14 |f | BNE 0x208dc 000208c8 1f 01 | | MOVE.B D1,-(A7) 000208ca 1f 01 | | MOVE.B D1,-(A7) 000208cc 2f 13 |/ | MOVE.L (A3),-(A7) 000208ce 48 52 |HR | PEA.L (A2) 000208d0 48 6e ff fa |Hn | PEA.L (A6-0x6) 000208d4 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000208da de c4 | | ADDA.W D4,A7 000208dc 48 53 |HS | PEA.L (A3) 000208de 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000208e4 58 4f |XO | ADDQ.L #0x4,A7 000208e6 26 8c |& | MOVE.L A4,(A3) 000208e8 be 81 | | CMP.L D1,D7 000208ea 66 8c |f | BNE 0x20878 000208ec 2f 13 |/ | MOVE.L (A3),-(A7) 000208ee 1f 01 | | MOVE.B D1,-(A7) 000208f0 1f 01 | | MOVE.B D1,-(A7) 000208f2 48 78 00 32 |Hx 2 | PEA.L 0x32 000208f6 48 52 |HR | PEA.L (A2) 000208f8 48 79 00 02 1b 1a |Hy | PEA.L 0x21b1a 000208fe 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00020904 de c2 | | ADDA.W D2,A7 00020906 4a 12 |J | TST.B (A2) 00020908 67 34 |g4 | BEQ 0x2093e 0002090a 9e fc 00 24 | $ | SUBA.W #0x24,A7 0002090e 20 4f | O | MOVEA.L A7,A0 00020910 43 fa f8 80 |C | LEA.L 0x20192,A1 00020914 70 22 |p" | MOVEQ.L #0x22,D0 00020916 10 d9 | | MOVE.B (A1)+,(A0)+ 00020918 51 c8 ff fc |Q | DBF D0,0x20916 0002091c 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 00020920 59 4f |YO | SUBQ.L #0x4,A7 00020922 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020926 3f 01 |? | MOVE.W D1,-(A7) 00020928 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 0002092c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020932 50 4f |PO | ADDQ.L #0x8,A7 00020934 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002093a de fc 00 2a | * | ADDA.W #0x2a,A7 0002093e 48 53 |HS | PEA.L (A3) 00020940 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020946 58 4f |XO | ADDQ.L #0x4,A7 00020948 4c df 1f 9f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D7+A0+A1+A2+A3+A4 0002094c 4e 5e |N^ | UNLK A6 0002094e 4e 75 |Nu | RTS 00020950 ; -------------------------------------------------------------------------------------- 00020950 ; OMSI PASCAL Function 00020950 ; <LVAR -0x006 @ 4(r)> 00020950 ; <LVAR -0x008 @> 00020950 ; -------------------------------------------------------------------------------------- 00020950 4e 56 ff ae |NV | LINK.W A6,#0xffae 00020954 bf d5 | | CMPA.L (A5),A7 00020956 62 06 |b | BHI 0x2095e 00020958 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002095c 4e 76 |Nv | TRAPV 0002095e de fc 00 4a | J | ADDA.W #0x4a,A7 00020962 48 e7 f8 f8 |H | MOVEM.L A4+A3+A2+A1+A0+D4+D3+D2+D1+D0,-(A7) 00020966 45 f9 00 02 1f 1e |E | LEA.L 0x21f1e,A2 0002096c 47 ee ff f8 |G | LEA.L (A6-0x8),A3 00020970 49 ee ff fa |I | LEA.L (A6-0x6),A4 00020974 72 02 |r | MOVEQ.L #0x02,D1 00020976 74 10 |t | MOVEQ.L #0x10,D2 00020978 76 01 |v | MOVEQ.L #0x01,D3 0002097a 38 3c 02 00 |8< | MOVE.W #0x200,D4 0002097e 33 c3 00 02 1f 28 |3 ( | MOVE.W D3,0x21f28 00020984 9e fc 00 0a | | SUBA.W #0xa,A7 00020988 20 4f | O | MOVEA.L A7,A0 0002098a 43 fa f8 2a |C * | LEA.L 0x201b6,A1 0002098e 70 08 |p | MOVEQ.L #0x08,D0 00020990 10 d9 | | MOVE.B (A1)+,(A0)+ 00020992 51 c8 ff fc |Q | DBF D0,0x20990 00020996 59 4f |YO | SUBQ.L #0x4,A7 00020998 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002099c 3f 03 |? | MOVE.W D3,-(A7) 0002099e 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 000209a2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000209a8 5c 4f |\O | ADDQ.L #0x6,A7 000209aa 42 17 |B | CLR.B (A7) 000209ac 1f 01 | | MOVE.B D1,-(A7) 000209ae 48 78 00 00 |Hx | PEA.L 0x0 000209b2 48 53 |HS | PEA.L (A3) 000209b4 48 54 |HT | PEA.L (A4) 000209b6 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000209bc de fc 00 1e | | ADDA.W #0x1e,A7 000209c0 20 54 | T | MOVEA.L (A4),A0 000209c2 13 e8 00 3a 00 02 23 24 | : #$| MOVE.B (A0+0x3a),0x22324 000209ca 13 e8 00 3b 00 02 23 25 | ; #%| MOVE.B (A0+0x3b),0x22325 000209d2 13 e8 00 3c 00 02 23 26 | < #&| MOVE.B (A0+0x3c),0x22326 000209da 13 e8 00 3d 00 02 23 27 | = #'| MOVE.B (A0+0x3d),0x22327 000209e2 2f 14 |/ | MOVE.L (A4),-(A7) 000209e4 3f 03 |? | MOVE.W D3,-(A7) 000209e6 42 67 |Bg | CLR.W -(A7) 000209e8 3f 04 |? | MOVE.W D4,-(A7) 000209ea 1f 01 | | MOVE.B D1,-(A7) 000209ec 2f 12 |/ | MOVE.L (A2),-(A7) 000209ee 48 53 |HS | PEA.L (A3) 000209f0 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 000209f6 de c2 | | ADDA.W D2,A7 000209f8 2e b9 00 02 1b 1a |. | MOVE.L 0x21b1a,(A7) 000209fe 3f 03 |? | MOVE.W D3,-(A7) 00020a00 42 67 |Bg | CLR.W -(A7) 00020a02 3f 04 |? | MOVE.W D4,-(A7) 00020a04 1f 01 | | MOVE.B D1,-(A7) 00020a06 2f 12 |/ | MOVE.L (A2),-(A7) 00020a08 48 53 |HS | PEA.L (A3) 00020a0a 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00020a10 de c2 | | ADDA.W D2,A7 00020a12 2e 94 |. | MOVE.L (A4),(A7) 00020a14 3f 3c 00 3e |?< > | MOVE.W #0x3e,-(A7) 00020a18 42 67 |Bg | CLR.W -(A7) 00020a1a 3f 04 |? | MOVE.W D4,-(A7) 00020a1c 1f 01 | | MOVE.B D1,-(A7) 00020a1e 2f 12 |/ | MOVE.L (A2),-(A7) 00020a20 48 53 |HS | PEA.L (A3) 00020a22 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020a28 de c2 | | ADDA.W D2,A7 00020a2a 2e b9 00 02 1b 1a |. | MOVE.L 0x21b1a,(A7) 00020a30 3f 01 |? | MOVE.W D1,-(A7) 00020a32 42 67 |Bg | CLR.W -(A7) 00020a34 3f 04 |? | MOVE.W D4,-(A7) 00020a36 1f 01 | | MOVE.B D1,-(A7) 00020a38 2f 12 |/ | MOVE.L (A2),-(A7) 00020a3a 48 53 |HS | PEA.L (A3) 00020a3c 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00020a42 de c2 | | ADDA.W D2,A7 00020a44 2e 94 |. | MOVE.L (A4),(A7) 00020a46 3f 3c 00 3f |?< ? | MOVE.W #0x3f,-(A7) 00020a4a 42 67 |Bg | CLR.W -(A7) 00020a4c 3f 04 |? | MOVE.W D4,-(A7) 00020a4e 1f 01 | | MOVE.B D1,-(A7) 00020a50 2f 12 |/ | MOVE.L (A2),-(A7) 00020a52 48 53 |HS | PEA.L (A3) 00020a54 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020a5a de c2 | | ADDA.W D2,A7 00020a5c 2e b9 00 02 1b 1a |. | MOVE.L 0x21b1a,(A7) 00020a62 3f 3c 00 03 |?< | MOVE.W #0x3,-(A7) 00020a66 42 67 |Bg | CLR.W -(A7) 00020a68 3f 04 |? | MOVE.W D4,-(A7) 00020a6a 1f 01 | | MOVE.B D1,-(A7) 00020a6c 2f 12 |/ | MOVE.L (A2),-(A7) 00020a6e 48 53 |HS | PEA.L (A3) 00020a70 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00020a76 de fc 00 12 | | ADDA.W #0x12,A7 00020a7a 42 17 |B | CLR.B (A7) 00020a7c 1f 03 | | MOVE.B D3,-(A7) 00020a7e 48 78 00 01 |Hx | PEA.L 0x1 00020a82 48 53 |HS | PEA.L (A3) 00020a84 48 54 |HT | PEA.L (A4) 00020a86 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00020a8c de c2 | | ADDA.W D2,A7 00020a8e 4c df 1f 1f |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+A0+A1+A2+A3+A4 00020a92 4e 5e |N^ | UNLK A6 00020a94 4e 75 |Nu | RTS 00020a96 ; -------------------------------------------------------------------------------------- 00020a96 ; OMSI PASCAL Function 00020a96 ; <LVAR 0x008 4(r)> 00020a96 ; <LVAR -0x002 @> 00020a96 ; <LVAR -0x006 @ 4(r)> 00020a96 ; <LVAR -0x008 @> 00020a96 ; -------------------------------------------------------------------------------------- 00020a96 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 00020a9a bf d5 | | CMPA.L (A5),A7 00020a9c 62 06 |b | BHI 0x20aa4 00020a9e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020aa2 4e 76 |Nv | TRAPV 00020aa4 de fc 00 68 | h | ADDA.W #0x68,A7 00020aa8 48 e7 fd f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D5+D4+D3+D2+D1+D0,-(A7) 00020aac 47 ee ff f8 |G | LEA.L (A6-0x8),A3 00020ab0 49 ee ff fa |I | LEA.L (A6-0x6),A4 00020ab4 72 02 |r | MOVEQ.L #0x02,D1 00020ab6 74 01 |t | MOVEQ.L #0x01,D2 00020ab8 76 14 |v | MOVEQ.L #0x14,D3 00020aba 78 0e |x | MOVEQ.L #0x0e,D4 00020abc 7a 10 |z | MOVEQ.L #0x10,D5 00020abe 9e fc 00 0a | | SUBA.W #0xa,A7 00020ac2 20 4f | O | MOVEA.L A7,A0 00020ac4 43 fa f6 fa |C | LEA.L 0x201c0,A1 00020ac8 70 08 |p | MOVEQ.L #0x08,D0 00020aca 10 d9 | | MOVE.B (A1)+,(A0)+ 00020acc 51 c8 ff fc |Q | DBF D0,0x20aca 00020ad0 59 4f |YO | SUBQ.L #0x4,A7 00020ad2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020ad6 3f 02 |? | MOVE.W D2,-(A7) 00020ad8 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00020adc 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020ae2 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00020ae6 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00020aec 54 4f |TO | ADDQ.L #0x2,A7 00020aee 1e 81 | | MOVE.B D1,(A7) 00020af0 48 6e ff fe |Hn | PEA.L (A6-0x2) 00020af4 4e b9 00 01 03 b0 |N | JSR PushProgram(a : String; b : String; MOD c : B; VAR d : Bool) 00020afa de c3 | | ADDA.W D3,A7 00020afc 2e ae 00 08 |. | MOVE.L (A6+0x8),(A7) 00020b00 42 27 |B' | CLR.B -(A7) 00020b02 1f 01 | | MOVE.B D1,-(A7) 00020b04 48 78 00 00 |Hx | PEA.L 0x0 00020b08 48 53 |HS | PEA.L (A3) 00020b0a 48 54 |HT | PEA.L (A4) 00020b0c 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00020b12 de c3 | | ADDA.W D3,A7 00020b14 20 54 | T | MOVEA.L (A4),A0 00020b16 30 28 00 20 |0( | MOVE.W (A0+0x20),D0 00020b1a b0 44 | D | CMP.W D4,D0 00020b1c 67 32 |g2 | BEQ 0x20b50 00020b1e 9e fc 00 22 | " | SUBA.W #0x22,A7 00020b22 22 4f |"O | MOVEA.L A7,A1 00020b24 45 fa f6 a4 |E | LEA.L 0x201ca,A2 00020b28 70 20 |p | MOVEQ.L #0x20,D0 00020b2a 12 da | | MOVE.B (A2)+,(A1)+ 00020b2c 51 c8 ff fc |Q | DBF D0,0x20b2a 00020b30 1f 04 | | MOVE.B D4,-(A7) 00020b32 59 4f |YO | SUBQ.L #0x4,A7 00020b34 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00020b38 3f 02 |? | MOVE.W D2,-(A7) 00020b3a 3f 3c 00 21 |?< ! | MOVE.W #0x21,-(A7) 00020b3e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020b44 50 4f |PO | ADDQ.L #0x8,A7 00020b46 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00020b4c de fc 00 28 | ( | ADDA.W #0x28,A7 00020b50 30 28 00 20 |0( | MOVE.W (A0+0x20),D0 00020b54 53 40 |S@ | SUBQ.W #0x1,D0 00020b56 48 c0 |H | EXTW.L D0 00020b58 2f 00 |/ | MOVE.L D0,-(A7) 00020b5a 7e 00 |~ | MOVEQ.L #0x00,D7 00020b5c be 97 | | CMP.L (A7),D7 00020b5e 6e 4a |nJ | BGT 0x20baa 00020b60 2f 14 |/ | MOVE.L (A4),-(A7) 00020b62 3f 07 |? | MOVE.W D7,-(A7) 00020b64 42 67 |Bg | CLR.W -(A7) 00020b66 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020b6a 1f 01 | | MOVE.B D1,-(A7) 00020b6c 2f 39 00 02 1f 1e |/9 | MOVE.L 0x21f1e,-(A7) 00020b72 48 53 |HS | PEA.L (A3) 00020b74 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020b7a de c5 | | ADDA.W D5,A7 00020b7c 2e b9 00 02 1b 1a |. | MOVE.L 0x21b1a,(A7) 00020b82 3f 39 00 02 1f 22 |?9 " | MOVE.W 0x21f22,-(A7) 00020b88 42 67 |Bg | CLR.W -(A7) 00020b8a 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020b8e 1f 01 | | MOVE.B D1,-(A7) 00020b90 2f 39 00 02 1f 1e |/9 | MOVE.L 0x21f1e,-(A7) 00020b96 48 53 |HS | PEA.L (A3) 00020b98 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00020b9e de c3 | | ADDA.W D3,A7 00020ba0 52 79 00 02 1f 22 |Ry " | ADDQ.W #0x1,0x21f22 00020ba6 52 87 |R | ADDQ.L #0x1,D7 00020ba8 68 b2 |h | BVC 0x20b5c 00020baa 54 4f |TO | ADDQ.L #0x2,A7 00020bac 42 17 |B | CLR.B (A7) 00020bae 1f 02 | | MOVE.B D2,-(A7) 00020bb0 48 78 00 01 |Hx | PEA.L 0x1 00020bb4 48 53 |HS | PEA.L (A3) 00020bb6 48 54 |HT | PEA.L (A4) 00020bb8 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00020bbe de c5 | | ADDA.W D5,A7 00020bc0 4c df 1f bf |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D7+A0+A1+A2+A3+A4 00020bc4 4e 5e |N^ | UNLK A6 00020bc6 4e 75 |Nu | RTS 00020bc8 ; -------------------------------------------------------------------------------------- 00020bc8 ; OMSI PASCAL Function 00020bc8 ; <LVAR -0x004 @ 1(r)> 00020bc8 ; <LVAR -0x008 @ 4(r)> 00020bc8 ; <LVAR -0x405 1(r)> 00020bc8 ; <LVAR -0x406 2(r)> 00020bc8 ; <LVAR -0x408 @> 00020bc8 ; -------------------------------------------------------------------------------------- 00020bc8 4e 56 fb ba |NV | LINK.W A6,#0xfbba 00020bcc bf d5 | | CMPA.L (A5),A7 00020bce 62 06 |b | BHI 0x20bd6 00020bd0 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020bd4 4e 76 |Nv | TRAPV 00020bd6 de fc 00 3e | > | ADDA.W #0x3e,A7 00020bda 48 e7 e0 f0 |H | MOVEM.L A3+A2+A1+A0+D2+D1+D0,-(A7) 00020bde 45 ee ff fc |E | LEA.L (A6-0x4),A2 00020be2 47 ee ff f8 |G | LEA.L (A6-0x8),A3 00020be6 72 01 |r | MOVEQ.L #0x01,D1 00020be8 74 10 |t | MOVEQ.L #0x10,D2 00020bea 9e fc 00 0a | | SUBA.W #0xa,A7 00020bee 20 4f | O | MOVEA.L A7,A0 00020bf0 43 fa f5 fa |C | LEA.L 0x201ec,A1 00020bf4 70 08 |p | MOVEQ.L #0x08,D0 00020bf6 10 d9 | | MOVE.B (A1)+,(A0)+ 00020bf8 51 c8 ff fc |Q | DBF D0,0x20bf6 00020bfc 59 4f |YO | SUBQ.L #0x4,A7 00020bfe 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020c02 3f 01 |? | MOVE.W D1,-(A7) 00020c04 3f 3c 00 09 |?< | MOVE.W #0x9,-(A7) 00020c08 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020c0e 5c 4f |\O | ADDQ.L #0x6,A7 00020c10 42 17 |B | CLR.B (A7) 00020c12 1f 01 | | MOVE.B D1,-(A7) 00020c14 48 78 00 00 |Hx | PEA.L 0x0 00020c18 48 52 |HR | PEA.L (A2) 00020c1a 48 53 |HS | PEA.L (A3) 00020c1c 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00020c22 de fc 00 1e | | ADDA.W #0x1e,A7 00020c26 4a 12 |J | TST.B (A2) 00020c28 66 64 |fd | BNE 0x20c8e 00020c2a 2f 13 |/ | MOVE.L (A3),-(A7) 00020c2c 42 67 |Bg | CLR.W -(A7) 00020c2e 42 67 |Bg | CLR.W -(A7) 00020c30 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020c34 1f 01 | | MOVE.B D1,-(A7) 00020c36 41 ee fb f8 |A | LEA.L (A6-0x408),A0 00020c3a 2f 08 |/ | MOVE.L A0,-(A7) 00020c3c 48 52 |HR | PEA.L (A2) 00020c3e 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020c44 de c2 | | ADDA.W D2,A7 00020c46 2e 93 |. | MOVE.L (A3),(A7) 00020c48 30 2e fb fa |0. | MOVE.W (A6-0x406),D0 00020c4c e6 48 | H | LSR.W #0x3,D0 00020c4e 52 40 |R@ | ADDQ.W #0x1,D0 00020c50 3f 00 |? | MOVE.W D0,-(A7) 00020c52 42 80 |B | CLR.L D0 00020c54 10 2e fb fb | . | MOVE.B (A6-0x405),D0 00020c58 eb 08 | | LSL.B #0x5,D0 00020c5a ea 08 | | LSR.B #0x5,D0 00020c5c ed 40 | @ | ASL.W #0x6,D0 00020c5e 3f 00 |? | MOVE.W D0,-(A7) 00020c60 3f 3c 00 40 |?< @ | MOVE.W #0x40,-(A7) 00020c64 1f 01 | | MOVE.B D1,-(A7) 00020c66 41 f9 00 02 1f 64 |A d | LEA.L 0x21f64,A0 00020c6c 2f 08 |/ | MOVE.L A0,-(A7) 00020c6e 48 52 |HR | PEA.L (A2) 00020c70 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020c76 de fc 00 12 | | ADDA.W #0x12,A7 00020c7a 42 17 |B | CLR.B (A7) 00020c7c 1f 01 | | MOVE.B D1,-(A7) 00020c7e 48 78 00 01 |Hx | PEA.L 0x1 00020c82 48 52 |HR | PEA.L (A2) 00020c84 48 53 |HS | PEA.L (A3) 00020c86 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00020c8c de c2 | | ADDA.W D2,A7 00020c8e 4c df 0f 07 |L | MOVEM.L (A7)+,D0+D1+D2+A0+A1+A2+A3 00020c92 4e 5e |N^ | UNLK A6 00020c94 4e 75 |Nu | RTS 00020c96 ; -------------------------------------------------------------------------------------- 00020c96 ; OMSI PASCAL Function 00020c96 ; <LVAR -0x00a 4(r)> 00020c96 ; <LVAR -0x00e @ 4(r)> 00020c96 ; <LVAR -0x012 @ 4(r)> 00020c96 ; <LVAR -0x016 @ 4(r)> 00020c96 ; <LVAR -0x018 @> 00020c96 ; -------------------------------------------------------------------------------------- 00020c96 4e 56 ff ac |NV | LINK.W A6,#0xffac 00020c9a bf d5 | | CMPA.L (A5),A7 00020c9c 62 06 |b | BHI 0x20ca4 00020c9e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020ca2 4e 76 |Nv | TRAPV 00020ca4 de fc 00 38 | 8 | ADDA.W #0x38,A7 00020ca8 48 e7 c1 c8 |H | MOVEM.L A4+A1+A0+D7+D1+D0,-(A7) 00020cac 43 f9 00 02 1f 24 |C $ | LEA.L 0x21f24,A1 00020cb2 72 08 |r | MOVEQ.L #0x08,D1 00020cb4 32 bc 00 03 |2 | MOVE.W #0x3,(A1) 00020cb8 55 4f |UO | SUBQ.L #0x2,A7 00020cba 4e b9 00 01 05 ec |N | JSR Get_fc05() : Byte 00020cc0 10 1f | | MOVE.B (A7)+,D0 00020cc2 48 80 |H | EXTB.W D0 00020cc4 33 c0 00 02 1f 26 |3 & | MOVE.W D0,0x21f26 00020cca 42 79 00 02 1f 28 |By ( | CLR.W 0x21f28 00020cd0 42 79 00 02 1f 2a |By * | CLR.W 0x21f2a 00020cd6 42 79 00 02 1f 2c |By , | CLR.W 0x21f2c 00020cdc 42 79 00 02 1f 2e |By . | CLR.W 0x21f2e 00020ce2 42 79 00 02 1f 42 |By B | CLR.W 0x21f42 00020ce8 48 6e ff ee |Hn | PEA.L (A6-0x12) 00020cec 4e b9 00 01 05 9e |N | JSR ReadClusterNo(VAR a : Long) 00020cf2 2e ae ff ee |. | MOVE.L (A6-0x12),(A7) 00020cf6 48 57 |HW | PEA.L (A7) 00020cf8 48 78 00 00 |Hx | PEA.L 0x0 00020cfc 48 78 00 03 |Hx | PEA.L 0x3 00020d00 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00020d04 4e b9 00 01 04 b4 |N | JSR ?FS104b4(VAR a: Long; b: L; MOD c: L; VAR d : Q) 00020d0a de fc 00 10 | | ADDA.W #0x10,A7 00020d0e 2e ba f4 ea |. | MOVE.L 0x201fa,(A7) 00020d12 2f 3a f4 e2 |/: | MOVE.L 0x201f6,-(A7) 00020d16 51 4f |QO | SUBQ.L #0x8,A7 00020d18 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 00020d1c 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 00020d20 48 78 00 0a |Hx | PEA.L 0xa 00020d24 4e b9 00 01 03 5c |N \ | JSR Quad2String(a : Quad; radix : Long ) : String 00020d2a 50 4f |PO | ADDQ.L #0x8,A7 00020d2c 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00020d30 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00020d34 3f 01 |? | MOVE.W D1,-(A7) 00020d36 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020d3c 50 4f |PO | ADDQ.L #0x8,A7 00020d3e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020d44 50 4f |PO | ADDQ.L #0x8,A7 00020d46 28 5f |(_ | MOVEA.L (A7)+,A4 00020d48 50 4f |PO | ADDQ.L #0x8,A7 00020d4a 7e 01 |~ | MOVEQ.L #0x01,D7 00020d4c 41 f9 00 02 1b 12 |A | LEA.L 0x21b12,A0 00020d52 41 f0 78 00 |A x | LEA.L (A0+D7.L),A0 00020d56 11 74 78 01 04 37 | tx 7 | MOVE.B (A4+D7.L+#0x1),(A0+0x437) 00020d5c 52 87 |R | ADDQ.L #0x1,D7 00020d5e be 81 | | CMP.L D1,D7 00020d60 6f ea |o | BLE 0x20d4c 00020d62 48 79 00 02 23 24 |Hy #$ | PEA.L 0x22324 00020d68 4e b9 00 01 03 04 |N | JSR GetRtc() : TimeStamp 00020d6e 58 4f |XO | ADDQ.L #0x4,A7 00020d70 4e ba fe 56 |N V | JSR 0x20bc8 00020d74 2f 3c 00 00 fc c0 |/< | MOVE.L #0xfcc0,-(A7) 00020d7a 41 f9 00 02 1f e4 |A | LEA.L 0x21fe4,A0 00020d80 2f 08 |/ | MOVE.L A0,-(A7) 00020d82 3f 3c 03 40 |?< @ | MOVE.W #0x340,-(A7) 00020d86 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00020d8c 5c 4f |\O | ADDQ.L #0x6,A7 00020d8e 2e bc 00 00 fc 60 |. ` | MOVE.L #0xfc60,(A7) 00020d94 41 ee ff ea |A | LEA.L (A6-0x16),A0 00020d98 2f 08 |/ | MOVE.L A0,-(A7) 00020d9a 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020d9e 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00020da4 de fc 00 0a | | ADDA.W #0xa,A7 00020da8 20 2e ff ea | . | MOVE.L (A6-0x16),D0 00020dac 04 80 00 00 fc c0 | | SUBI.L #0x0000fcc0,D0 00020db2 52 80 |R | ADDQ.L #0x1,D0 00020db4 33 c0 00 02 1f 44 |3 D | MOVE.W D0,0x21f44 00020dba 42 79 00 02 1f 46 |By F | CLR.W 0x21f46 00020dc0 42 79 00 02 1f 48 |By H | CLR.W 0x21f48 00020dc6 2f 39 00 02 1b 1a |/9 | MOVE.L 0x21b1a,-(A7) 00020dcc 42 67 |Bg | CLR.W -(A7) 00020dce 42 67 |Bg | CLR.W -(A7) 00020dd0 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020dd4 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020dd8 20 49 | I | MOVEA.L A1,A0 00020dda 2f 08 |/ | MOVE.L A0,-(A7) 00020ddc 48 6e ff e8 |Hn | PEA.L (A6-0x18) 00020de0 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00020de6 de fc 00 14 | | ADDA.W #0x14,A7 00020dea 4c df 13 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A4 00020dee 4e 5e |N^ | UNLK A6 00020df0 4e 75 |Nu | RTS 00020df2 ; -------------------------------------------------------------------------------------- 00020df2 ; OMSI PASCAL Function 00020df2 ; -------------------------------------------------------------------------------------- 00020df2 START: 00020df2 4f fa 00 08 |O | LEA.L MAIN,A7 00020df6 4e f9 00 01 02 80 |N | JMP ?start_program 00020dfc MAIN: 00020dfc 45 f9 00 02 23 6a |E #j | LEA.L 0x2236a,A2 00020e02 47 f9 00 02 1b 1a |G | LEA.L 0x21b1a,A3 00020e08 49 f9 00 02 23 72 |I #r | LEA.L 0x22372,A4 00020e0e 72 01 |r | MOVEQ.L #0x01,D1 00020e10 74 02 |t | MOVEQ.L #0x02,D2 00020e12 76 0a |v | MOVEQ.L #0x0a,D3 00020e14 78 0c |x | MOVEQ.L #0x0c,D4 00020e16 3a 3c 02 00 |:< | MOVE.W #0x200,D5 00020e1a 7c 16 || | MOVEQ.L #0x16,D6 00020e1c 7e 14 |~ | MOVEQ.L #0x14,D7 00020e1e 4e b9 00 01 03 98 |N | JSR FSCALL_10398 00020e24 4e ba f9 2a |N * | JSR 0x20750 00020e28 48 78 00 01 |Hx | PEA.L 0x1 00020e2c 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 00020e32 54 4f |TO | ADDQ.L #0x2,A7 00020e34 42 17 |B | CLR.B (A7) 00020e36 4e b9 00 01 04 d2 |N | JSR SetExpInitDone(a : Byte) 00020e3c 54 4f |TO | ADDQ.L #0x2,A7 00020e3e 41 f9 00 02 1b 1e |A | LEA.L 0x21b1e,A0 00020e44 2f 08 |/ | MOVE.L A0,-(A7) 00020e46 23 d7 00 02 1f 1e |# | MOVE.L (A7),0x21f1e 00020e4c 4e b9 00 01 03 c4 |N | JSR GetArgv() : String 00020e52 24 9f |$ | MOVE.L (A7)+,(A2) 00020e54 41 fa f3 f2 |A | LEA.L 0x20248,A0 00020e58 70 04 |p | MOVEQ.L #0x04,D0 00020e5a 3f 20 |? | MOVE.W -(A0),-(A7) 00020e5c 51 c8 ff fc |Q | DBF D0,0x20e5a 00020e60 2f 3a f3 ee |/: | MOVE.L 0x20250,-(A7) 00020e64 2f 3a f3 e6 |/: | MOVE.L 0x2024c,-(A7) 00020e68 2f 3a f3 de |/: | MOVE.L 0x20248,-(A7) 00020e6c 2f 3a f3 ee |/: | MOVE.L 0x2025c,-(A7) 00020e70 2f 3a f3 e6 |/: | MOVE.L 0x20258,-(A7) 00020e74 2f 3a f3 de |/: | MOVE.L 0x20254,-(A7) 00020e78 55 4f |UO | SUBQ.L #0x2,A7 00020e7a 2f 12 |/ | MOVE.L (A2),-(A7) 00020e7c 59 4f |YO | SUBQ.L #0x4,A7 00020e7e 48 6f 00 22 |Ho " | PEA.L (A7+0x22) 00020e82 3f 01 |? | MOVE.W D1,-(A7) 00020e84 3f 03 |? | MOVE.W D3,-(A7) 00020e86 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020e8c 50 4f |PO | ADDQ.L #0x8,A7 00020e8e 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00020e94 50 4f |PO | ADDQ.L #0x8,A7 00020e96 4a 1f |J | TST.B (A7)+ 00020e98 66 46 |fF | BNE 0x20ee0 00020e9a 55 4f |UO | SUBQ.L #0x2,A7 00020e9c 2f 12 |/ | MOVE.L (A2),-(A7) 00020e9e 59 4f |YO | SUBQ.L #0x4,A7 00020ea0 48 6f 00 16 |Ho | PEA.L (A7+0x16) 00020ea4 3f 01 |? | MOVE.W D1,-(A7) 00020ea6 3f 04 |? | MOVE.W D4,-(A7) 00020ea8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020eae 50 4f |PO | ADDQ.L #0x8,A7 00020eb0 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00020eb6 50 4f |PO | ADDQ.L #0x8,A7 00020eb8 4a 1f |J | TST.B (A7)+ 00020eba 66 24 |f$ | BNE 0x20ee0 00020ebc 55 4f |UO | SUBQ.L #0x2,A7 00020ebe 2f 12 |/ | MOVE.L (A2),-(A7) 00020ec0 59 4f |YO | SUBQ.L #0x4,A7 00020ec2 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00020ec6 3f 01 |? | MOVE.W D1,-(A7) 00020ec8 3f 04 |? | MOVE.W D4,-(A7) 00020eca 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020ed0 50 4f |PO | ADDQ.L #0x8,A7 00020ed2 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00020ed8 50 4f |PO | ADDQ.L #0x8,A7 00020eda 4a 1f |J | TST.B (A7)+ 00020edc 67 00 01 e6 |g | BEQ 0x210c4 00020ee0 41 fa f2 6c |A l | LEA.L 0x2014e,A0 00020ee4 70 04 |p | MOVEQ.L #0x04,D0 00020ee6 3f 20 |? | MOVE.W -(A0),-(A7) 00020ee8 51 c8 ff fc |Q | DBF D0,0x20ee6 00020eec 3f 3a f3 72 |?: r | MOVE.W 0x20260,-(A7) 00020ef0 51 4f |QO | SUBQ.L #0x8,A7 00020ef2 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00020ef6 3f 01 |? | MOVE.W D1,-(A7) 00020ef8 3f 03 |? | MOVE.W D3,-(A7) 00020efa 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020f00 58 4f |XO | ADDQ.L #0x4,A7 00020f02 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00020f06 3f 01 |? | MOVE.W D1,-(A7) 00020f08 3f 02 |? | MOVE.W D2,-(A7) 00020f0a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020f10 50 4f |PO | ADDQ.L #0x8,A7 00020f12 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00020f18 5c 4f |\O | ADDQ.L #0x6,A7 00020f1a 42 17 |B | CLR.B (A7) 00020f1c 1f 02 | | MOVE.B D2,-(A7) 00020f1e 48 78 00 32 |Hx 2 | PEA.L 0x32 00020f22 48 54 |HT | PEA.L (A4) 00020f24 48 53 |HS | PEA.L (A3) 00020f26 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 00020f2c de fc 00 1c | | ADDA.W #0x1c,A7 00020f30 2e 93 |. | MOVE.L (A3),(A7) 00020f32 42 67 |Bg | CLR.W -(A7) 00020f34 42 67 |Bg | CLR.W -(A7) 00020f36 3f 05 |? | MOVE.W D5,-(A7) 00020f38 1f 02 | | MOVE.B D2,-(A7) 00020f3a 41 f9 00 02 1f 24 |A $ | LEA.L 0x21f24,A0 00020f40 2f 08 |/ | MOVE.L A0,-(A7) 00020f42 48 54 |HT | PEA.L (A4) 00020f44 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020f4a de fc 00 10 | | ADDA.W #0x10,A7 00020f4e 2e bc 00 00 fc c0 |. | MOVE.L #0xfcc0,(A7) 00020f54 41 f9 00 02 1b de |A | LEA.L 0x21bde,A0 00020f5a 2f 08 |/ | MOVE.L A0,-(A7) 00020f5c 3f 3c 03 40 |?< @ | MOVE.W #0x340,-(A7) 00020f60 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00020f66 5c 4f |\O | ADDQ.L #0x6,A7 00020f68 2e bc 00 00 fc 60 |. ` | MOVE.L #0xfc60,(A7) 00020f6e 41 f9 00 02 23 64 |A #d | LEA.L 0x22364,A0 00020f74 2f 08 |/ | MOVE.L A0,-(A7) 00020f76 3f 3c 00 04 |?< | MOVE.W #0x4,-(A7) 00020f7a 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00020f80 5c 4f |\O | ADDQ.L #0x6,A7 00020f82 2e ba f2 d8 |. | MOVE.L 0x2025c,(A7) 00020f86 2f 3a f2 d0 |/: | MOVE.L 0x20258,-(A7) 00020f8a 2f 3a f2 c8 |/: | MOVE.L 0x20254,-(A7) 00020f8e 55 4f |UO | SUBQ.L #0x2,A7 00020f90 2f 12 |/ | MOVE.L (A2),-(A7) 00020f92 59 4f |YO | SUBQ.L #0x4,A7 00020f94 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00020f98 3f 01 |? | MOVE.W D1,-(A7) 00020f9a 3f 04 |? | MOVE.W D4,-(A7) 00020f9c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020fa2 50 4f |PO | ADDQ.L #0x8,A7 00020fa4 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00020faa 50 4f |PO | ADDQ.L #0x8,A7 00020fac 4a 1f |J | TST.B (A7)+ 00020fae 67 32 |g2 | BEQ 0x20fe2 00020fb0 2f 13 |/ | MOVE.L (A3),-(A7) 00020fb2 3f 3c 00 23 |?< # | MOVE.W #0x23,-(A7) 00020fb6 42 67 |Bg | CLR.W -(A7) 00020fb8 3f 05 |? | MOVE.W D5,-(A7) 00020fba 1f 02 | | MOVE.B D2,-(A7) 00020fbc 2f 39 00 02 1f 1e |/9 | MOVE.L 0x21f1e,-(A7) 00020fc2 48 54 |HT | PEA.L (A4) 00020fc4 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00020fca de c7 | | ADDA.W D7,A7 00020fcc 20 39 00 02 23 64 | 9 #d | MOVE.L 0x22364,D0 00020fd2 04 80 00 00 fc c0 | | SUBI.L #0x0000fcc0,D0 00020fd8 52 80 |R | ADDQ.L #0x1,D0 00020fda 33 c0 00 02 1f 48 |3 H | MOVE.W D0,0x21f48 00020fe0 60 30 |`0 | BRA 0x21012 00020fe2 2f 13 |/ | MOVE.L (A3),-(A7) 00020fe4 3f 3c 00 22 |?< " | MOVE.W #0x22,-(A7) 00020fe8 42 67 |Bg | CLR.W -(A7) 00020fea 3f 05 |? | MOVE.W D5,-(A7) 00020fec 1f 02 | | MOVE.B D2,-(A7) 00020fee 2f 39 00 02 1f 1e |/9 | MOVE.L 0x21f1e,-(A7) 00020ff4 48 54 |HT | PEA.L (A4) 00020ff6 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00020ffc de c7 | | ADDA.W D7,A7 00020ffe 20 39 00 02 23 64 | 9 #d | MOVE.L 0x22364,D0 00021004 04 80 00 00 fc c0 | | SUBI.L #0x0000fcc0,D0 0002100a 52 80 |R | ADDQ.L #0x1,D0 0002100c 33 c0 00 02 1f 46 |3 F | MOVE.W D0,0x21f46 00021012 de c4 | | ADDA.W D4,A7 00021014 41 fa f2 32 |A 2 | LEA.L 0x20248,A0 00021018 70 04 |p | MOVEQ.L #0x04,D0 0002101a 3f 20 |? | MOVE.W -(A0),-(A7) 0002101c 51 c8 ff fc |Q | DBF D0,0x2101a 00021020 55 4f |UO | SUBQ.L #0x2,A7 00021022 2f 12 |/ | MOVE.L (A2),-(A7) 00021024 59 4f |YO | SUBQ.L #0x4,A7 00021026 48 6f 00 0a |Ho | PEA.L (A7+0xa) 0002102a 3f 01 |? | MOVE.W D1,-(A7) 0002102c 3f 03 |? | MOVE.W D3,-(A7) 0002102e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021034 50 4f |PO | ADDQ.L #0x8,A7 00021036 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 0002103c 50 4f |PO | ADDQ.L #0x8,A7 0002103e 4a 1f |J | TST.B (A7)+ 00021040 67 3e |g> | BEQ 0x21080 00021042 33 fc 00 24 00 02 1f 22 |3 $ "| MOVE.W #0x24,0x21f22 0002104a 33 f9 00 02 1f 22 00 02 |3 " | MOVE.W 0x21f22,0x21f2e 00021052 1f 2e | . | 00021054 9e fc 00 12 | | SUBA.W #0x12,A7 00021058 20 4f | O | MOVEA.L A7,A0 0002105a 43 fa f2 06 |C | LEA.L 0x20262,A1 0002105e 70 10 |p | MOVEQ.L #0x10,D0 00021060 10 d9 | | MOVE.B (A1)+,(A0)+ 00021062 51 c8 ff fc |Q | DBF D0,0x21060 00021066 59 4f |YO | SUBQ.L #0x4,A7 00021068 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002106c 3f 01 |? | MOVE.W D1,-(A7) 0002106e 3f 3c 00 11 |?< | MOVE.W #0x11,-(A7) 00021072 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021078 50 4f |PO | ADDQ.L #0x8,A7 0002107a 4e ba fa 1a |N | JSR 0x20a96 0002107e de c6 | | ADDA.W D6,A7 00021080 5c 4f |\O | ADDQ.L #0x6,A7 00021082 2e 93 |. | MOVE.L (A3),(A7) 00021084 42 67 |Bg | CLR.W -(A7) 00021086 42 67 |Bg | CLR.W -(A7) 00021088 3f 05 |? | MOVE.W D5,-(A7) 0002108a 1f 02 | | MOVE.B D2,-(A7) 0002108c 41 f9 00 02 1f 24 |A $ | LEA.L 0x21f24,A0 00021092 2f 08 |/ | MOVE.L A0,-(A7) 00021094 48 54 |HT | PEA.L (A4) 00021096 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 0002109c de fc 00 12 | | ADDA.W #0x12,A7 000210a0 42 17 |B | CLR.B (A7) 000210a2 1f 02 | | MOVE.B D2,-(A7) 000210a4 48 78 00 01 |Hx | PEA.L 0x1 000210a8 48 54 |HT | PEA.L (A4) 000210aa 48 53 |HS | PEA.L (A3) 000210ac 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000210b2 de fc 00 0e | | ADDA.W #0xe,A7 000210b6 42 17 |B | CLR.B (A7) 000210b8 48 78 00 01 |Hx | PEA.L 0x1 000210bc 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000210c2 5c 4f |\O | ADDQ.L #0x6,A7 000210c4 de c6 | | ADDA.W D6,A7 000210c6 20 4f | O | MOVEA.L A7,A0 000210c8 43 fa f1 5e |C ^ | LEA.L 0x20228,A1 000210cc 70 0a |p | MOVEQ.L #0x0a,D0 000210ce 10 d9 | | MOVE.B (A1)+,(A0)+ 000210d0 51 c8 ff fc |Q | DBF D0,0x210ce 000210d4 41 fa f1 68 |A h | LEA.L 0x2023e,A0 000210d8 70 04 |p | MOVEQ.L #0x04,D0 000210da 3f 20 |? | MOVE.W -(A0),-(A7) 000210dc 51 c8 ff fc |Q | DBF D0,0x210da 000210e0 55 4f |UO | SUBQ.L #0x2,A7 000210e2 2f 12 |/ | MOVE.L (A2),-(A7) 000210e4 59 4f |YO | SUBQ.L #0x4,A7 000210e6 48 6f 00 14 |Ho | PEA.L (A7+0x14) 000210ea 3f 01 |? | MOVE.W D1,-(A7) 000210ec 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 000210f0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000210f6 50 4f |PO | ADDQ.L #0x8,A7 000210f8 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000210fe 50 4f |PO | ADDQ.L #0x8,A7 00021100 4a 1f |J | TST.B (A7)+ 00021102 66 56 |fV | BNE 0x2115a 00021104 55 4f |UO | SUBQ.L #0x2,A7 00021106 2f 12 |/ | MOVE.L (A2),-(A7) 00021108 59 4f |YO | SUBQ.L #0x4,A7 0002110a 48 6f 00 0a |Ho | PEA.L (A7+0xa) 0002110e 3f 01 |? | MOVE.W D1,-(A7) 00021110 3f 03 |? | MOVE.W D3,-(A7) 00021112 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021118 50 4f |PO | ADDQ.L #0x8,A7 0002111a 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00021120 50 4f |PO | ADDQ.L #0x8,A7 00021122 4a 1f |J | TST.B (A7)+ 00021124 66 34 |f4 | BNE 0x2115a 00021126 9e fc 00 1a | | SUBA.W #0x1a,A7 0002112a 20 4f | O | MOVEA.L A7,A0 0002112c 43 fa f1 46 |C F | LEA.L 0x20274,A1 00021130 70 18 |p | MOVEQ.L #0x18,D0 00021132 10 d9 | | MOVE.B (A1)+,(A0)+ 00021134 51 c8 ff fc |Q | DBF D0,0x21132 00021138 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 0002113c 59 4f |YO | SUBQ.L #0x4,A7 0002113e 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021142 3f 01 |? | MOVE.W D1,-(A7) 00021144 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 00021148 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002114e 50 4f |PO | ADDQ.L #0x8,A7 00021150 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021156 de fc 00 20 | | ADDA.W #0x20,A7 0002115a de c6 | | ADDA.W D6,A7 0002115c 4e ba f6 8a |N | JSR 0x207e8 00021160 4e ba fb 34 |N 4 | JSR 0x20c96 00021164 55 4f |UO | SUBQ.L #0x2,A7 00021166 4e b9 00 01 05 ec |N | JSR Get_fc05() : Byte 0002116c 4a 1f |J | TST.B (A7)+ 0002116e 67 04 |g | BEQ 0x21174 00021170 4e ba f7 de |N | JSR 0x20950 00021174 41 fa f0 c8 |A | LEA.L 0x2023e,A0 00021178 70 04 |p | MOVEQ.L #0x04,D0 0002117a 3f 20 |? | MOVE.W -(A0),-(A7) 0002117c 51 c8 ff fc |Q | DBF D0,0x2117a 00021180 55 4f |UO | SUBQ.L #0x2,A7 00021182 2f 12 |/ | MOVE.L (A2),-(A7) 00021184 59 4f |YO | SUBQ.L #0x4,A7 00021186 48 6f 00 0a |Ho | PEA.L (A7+0xa) 0002118a 3f 01 |? | MOVE.W D1,-(A7) 0002118c 3f 03 |? | MOVE.W D3,-(A7) 0002118e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021194 50 4f |PO | ADDQ.L #0x8,A7 00021196 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 0002119c 50 4f |PO | ADDQ.L #0x8,A7 0002119e 4a 1f |J | TST.B (A7)+ 000211a0 67 60 |g` | BEQ 0x21202 000211a2 33 fc 00 04 00 02 1f 22 |3 "| MOVE.W #0x4,0x21f22 000211aa 33 f9 00 02 1f 22 00 02 |3 " | MOVE.W 0x21f22,0x21f2a 000211b2 1f 2a | * | 000211b4 41 fa ef 8e |A | LEA.L 0x20144,A0 000211b8 70 0a |p | MOVEQ.L #0x0a,D0 000211ba 3f 20 |? | MOVE.W -(A0),-(A7) 000211bc 51 c8 ff fc |Q | DBF D0,0x211ba 000211c0 59 4f |YO | SUBQ.L #0x4,A7 000211c2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000211c6 3f 01 |? | MOVE.W D1,-(A7) 000211c8 3f 06 |? | MOVE.W D6,-(A7) 000211ca 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000211d0 50 4f |PO | ADDQ.L #0x8,A7 000211d2 4e ba f8 c2 |N | JSR 0x20a96 000211d6 de fc 00 1a | | ADDA.W #0x1a,A7 000211da 33 c1 00 02 1f 42 |3 B | MOVE.W D1,0x21f42 000211e0 4e ba f0 e6 |N | JSR 0x202c8 000211e4 48 79 00 02 23 68 |Hy #h | PEA.L 0x22368 000211ea 4e ba f4 16 |N | JSR 0x20602 000211ee 58 4f |XO | ADDQ.L #0x4,A7 000211f0 4a 39 00 02 23 68 |J9 #h | TST.B 0x22368 000211f6 67 06 |g | BEQ 0x211fe 000211f8 33 c2 00 02 1f 42 |3 B | MOVE.W D2,0x21f42 000211fe 4e ba f2 1c |N | JSR 0x2041c 00021202 54 4f |TO | ADDQ.L #0x2,A7 00021204 2e b9 00 02 23 24 |. #$ | MOVE.L 0x22324,(A7) 0002120a 4e b9 00 01 03 08 |N | JSR TimeToText() 00021210 58 4f |XO | ADDQ.L #0x4,A7 00021212 23 df 00 02 23 6e |# #n | MOVE.L (A7)+,0x2236e 00021218 20 79 00 02 23 6e | y #n | MOVEA.L 0x2236e,A0 0002121e 41 e8 00 02 |A | LEA.L (A0+0x2),A0 00021222 2f 08 |/ | MOVE.L A0,-(A7) 00021224 41 f9 00 02 1f 30 |A 0 | LEA.L 0x21f30,A0 0002122a 2f 08 |/ | MOVE.L A0,-(A7) 0002122c 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00021230 4e b9 00 01 02 38 |N 8 | JSR KC1c_ProtCopy(src : Pointer; dst : Pointer; len : Word) 00021236 5c 4f |\O | ADDQ.L #0x6,A7 00021238 2e 93 |. | MOVE.L (A3),(A7) 0002123a 42 67 |Bg | CLR.W -(A7) 0002123c 42 67 |Bg | CLR.W -(A7) 0002123e 3f 05 |? | MOVE.W D5,-(A7) 00021240 1f 02 | | MOVE.B D2,-(A7) 00021242 41 f9 00 02 1f 24 |A $ | LEA.L 0x21f24,A0 00021248 2f 08 |/ | MOVE.L A0,-(A7) 0002124a 48 54 |HT | PEA.L (A4) 0002124c 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 00021252 de c7 | | ADDA.W D7,A7 00021254 20 53 | S | MOVEA.L (A3),A0 00021256 11 79 00 02 23 24 00 3a | y #$ :| MOVE.B 0x22324,(A0+0x3a) 0002125e 11 79 00 02 23 25 00 3b | y #% ;| MOVE.B 0x22325,(A0+0x3b) 00021266 11 79 00 02 23 26 00 3c | y #& <| MOVE.B 0x22326,(A0+0x3c) 0002126e 11 79 00 02 23 27 00 3d | y #' =| MOVE.B 0x22327,(A0+0x3d) 00021276 11 41 00 4c | A L | MOVE.B D1,(A0+0x4c) 0002127a 42 27 |B' | CLR.B -(A7) 0002127c 1f 02 | | MOVE.B D2,-(A7) 0002127e 48 78 00 01 |Hx | PEA.L 0x1 00021282 48 54 |HT | PEA.L (A4) 00021284 48 53 |HS | PEA.L (A3) 00021286 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 0002128c 9e fc 00 22 | " | SUBA.W #0x22,A7 00021290 20 4f | O | MOVEA.L A7,A0 00021292 43 fa ef fa |C | LEA.L 0x2028e,A1 00021296 70 30 |p0 | MOVEQ.L #0x30,D0 00021298 10 d9 | | MOVE.B (A1)+,(A0)+ 0002129a 51 c8 ff fc |Q | DBF D0,0x21298 0002129e 59 4f |YO | SUBQ.L #0x4,A7 000212a0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000212a4 3f 01 |? | MOVE.W D1,-(A7) 000212a6 3f 3c 00 31 |?< 1 | MOVE.W #0x31,-(A7) 000212aa 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000212b0 50 4f |PO | ADDQ.L #0x8,A7 000212b2 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000212b8 de fc 00 34 | 4 | ADDA.W #0x34,A7 000212bc 42 17 |B | CLR.B (A7) 000212be 48 78 00 01 |Hx | PEA.L 0x1 000212c2 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000212c8 5c 4f |\O | ADDQ.L #0x6,A7 000212ca 4e b9 00 01 02 84 |N | JSR ?exit 000212d0 exp_RUN_NORMAL.FIU(): 000212d0 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000212d6 00 08 | | .CONST 0x0008 ; Stack-delta 000212d8 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.FIU' 000212e7 00 | | .CONST 0x0 000212e8 03 | | .CONST 0x3 ; DIPROC address 000212e9 00 | | .CONST 0x0 ; Output Parameters 000212ea 00 | | .CONST 0x0 ; Input Parameters 000212eb 00 | | .PAD 0x0 000212ec exp_PREP_RUN.FIU(Sw_2): 000212ec 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000212f2 00 0a | | .CONST 0x000a ; Stack-delta 000212f4 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.FIU' 00021301 00 | | .CONST 0x0 00021302 03 | | .CONST 0x3 ; DIPROC address 00021303 00 | | .CONST 0x0 ; Output Parameters 00021304 01 | | .CONST 0x1 ; Input Parameters 00021305 01 | | .CONST 0x1 ; In arg [2] 00021306 exp_MF.FIU(): 00021306 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002130c 00 08 | | .CONST 0x0008 ; Stack-delta 0002130e 06 4d 46 2e 46 49 55 | MF.FIU | .TXT 6,'MF.FIU' 00021315 00 | | .CONST 0x0 00021316 03 | | .CONST 0x3 ; DIPROC address 00021317 00 | | .CONST 0x0 ; Output Parameters 00021318 00 | | .CONST 0x0 ; Input Parameters 00021319 00 | | .PAD 0x0 0002131a exp_INIT_MRU.FIU(): 0002131a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021320 00 08 | | .CONST 0x0008 ; Stack-delta 00021322 0c 49 4e 49 54 5f 4d 52 | INIT_MR| .TXT 12,'INIT_MRU.FIU' 0002132f 00 | | .CONST 0x0 00021330 03 | | .CONST 0x3 ; DIPROC address 00021331 00 | | .CONST 0x0 ; Output Parameters 00021332 00 | | .CONST 0x0 ; Input Parameters 00021333 00 | | .PAD 0x0 00021334 exp_FREEZE_WORLD.FIU(): 00021334 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002133a 00 08 | | .CONST 0x0008 ; Stack-delta 0002133c 10 46 52 45 45 5a 45 5f | FREEZE_| .TXT 16,'FREEZE_WORLD.FIU' 0002134d 00 | | .CONST 0x0 0002134e 03 | | .CONST 0x3 ; DIPROC address 0002134f 00 | | .CONST 0x0 ; Output Parameters 00021350 00 | | .CONST 0x0 ; Input Parameters 00021351 00 | | .PAD 0x0 00021352 exp_CLEAR_EXCEPTIONS.FIU(): 00021352 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021358 00 08 | | .CONST 0x0008 ; Stack-delta 0002135a 14 43 4c 45 41 52 5f 45 | CLEAR_E| .TXT 20,'CLEAR_EXCEPTIONS.FIU' 0002136f 00 | | .CONST 0x0 00021370 03 | | .CONST 0x3 ; DIPROC address 00021371 00 | | .CONST 0x0 ; Output Parameters 00021372 00 | | .CONST 0x0 ; Input Parameters 00021373 00 | | .PAD 0x0 00021374 exp_RESET.SEQ(): 00021374 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002137a 00 08 | | .CONST 0x0008 ; Stack-delta 0002137c 09 52 45 53 45 54 2e 53 | RESET.S| .TXT 9,'RESET.SEQ' 00021386 00 | | .CONST 0x0 00021387 02 | | .CONST 0x2 ; DIPROC address 00021388 00 | | .CONST 0x0 ; Output Parameters 00021389 00 | | .CONST 0x0 ; Input Parameters 0002138a exp_RUN_CHECK.SEQ(): 0002138a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021390 00 08 | | .CONST 0x0008 ; Stack-delta 00021392 0d 52 55 4e 5f 43 48 45 | RUN_CHE| .TXT 13,'RUN_CHECK.SEQ' 000213a0 00 | | .CONST 0x0 000213a1 02 | | .CONST 0x2 ; DIPROC address 000213a2 00 | | .CONST 0x0 ; Output Parameters 000213a3 00 | | .CONST 0x0 ; Input Parameters 000213a4 exp_PREP_RUN.SEQ(Sw_2): 000213a4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000213aa 00 0a | | .CONST 0x000a ; Stack-delta 000213ac 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.SEQ' 000213b9 00 | | .CONST 0x0 000213ba 02 | | .CONST 0x2 ; DIPROC address 000213bb 00 | | .CONST 0x0 ; Output Parameters 000213bc 01 | | .CONST 0x1 ; Input Parameters 000213bd 01 | | .CONST 0x1 ; In arg [2] 000213be exp_WRITE_REG.TYP(Sw_2, Sw_8_1, Sw_1): 000213be 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000213c4 00 16 | | .CONST 0x0016 ; Stack-delta 000213c6 0d 57 52 49 54 45 5f 52 | WRITE_R| .TXT 13,'WRITE_REG.TYP' 000213d4 00 | | .CONST 0x0 000213d5 06 | | .CONST 0x6 ; DIPROC address 000213d6 00 | | .CONST 0x0 ; Output Parameters 000213d7 03 | | .CONST 0x3 ; Input Parameters 000213d8 01 | | .CONST 0x1 ; In arg [2] 000213d9 0d | | .CONST 0xd ; In arg [8, 1] 000213da 00 | | .CONST 0x0 ; In arg [1] 000213db 00 | | .PAD 0x0 000213dc exp_RUN_NORMAL.TYP(): 000213dc 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000213e2 00 08 | | .CONST 0x0008 ; Stack-delta 000213e4 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.TYP' 000213f3 00 | | .CONST 0x0 000213f4 06 | | .CONST 0x6 ; DIPROC address 000213f5 00 | | .CONST 0x0 ; Output Parameters 000213f6 00 | | .CONST 0x0 ; Input Parameters 000213f7 00 | | .PAD 0x0 000213f8 exp_PREP_WRITE_REG.TYP(Sw_8, &Sr_8_1): 000213f8 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000213fe 00 14 | | .CONST 0x0014 ; Stack-delta 00021400 12 50 52 45 50 5f 57 52 | PREP_WR| .TXT 18,'PREP_WRITE_REG.TYP' 00021413 00 | | .CONST 0x0 00021414 06 | | .CONST 0x6 ; DIPROC address 00021415 01 | | .CONST 0x1 ; Output Parameters 00021416 01 | | .CONST 0x1 ; Input Parameters 00021417 07 | | .CONST 0x7 ; In arg [8] 00021418 0d | | .CONST 0xd ; Out arg [8, 1] 00021419 00 | | .PAD 0x0 0002141a exp_PREP_RUN.TYP(Sw_2): 0002141a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021420 00 0a | | .CONST 0x000a ; Stack-delta 00021422 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.TYP' 0002142f 00 | | .CONST 0x0 00021430 06 | | .CONST 0x6 ; DIPROC address 00021431 00 | | .CONST 0x0 ; Output Parameters 00021432 01 | | .CONST 0x1 ; Input Parameters 00021433 01 | | .CONST 0x1 ; In arg [2] 00021434 exp_MF.TYP(): 00021434 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002143a 00 08 | | .CONST 0x0008 ; Stack-delta 0002143c 06 4d 46 2e 54 59 50 | MF.TYP | .TXT 6,'MF.TYP' 00021443 00 | | .CONST 0x0 00021444 06 | | .CONST 0x6 ; DIPROC address 00021445 00 | | .CONST 0x0 ; Output Parameters 00021446 00 | | .CONST 0x0 ; Input Parameters 00021447 00 | | .PAD 0x0 00021448 exp_LOAD_BENIGN_UWORD.TYP(): 00021448 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002144e 00 08 | | .CONST 0x0008 ; Stack-delta 00021450 15 4c 4f 41 44 5f 42 45 | LOAD_BE| .TXT 21,'LOAD_BENIGN_UWORD.TYP' 00021466 00 | | .CONST 0x0 00021467 06 | | .CONST 0x6 ; DIPROC address 00021468 00 | | .CONST 0x0 ; Output Parameters 00021469 00 | | .CONST 0x0 ; Input Parameters 0002146a exp_RUN_NORMAL.VAL(): 0002146a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021470 00 08 | | .CONST 0x0008 ; Stack-delta 00021472 0e 52 55 4e 5f 4e 4f 52 | RUN_NOR| .TXT 14,'RUN_NORMAL.VAL' 00021481 00 | | .CONST 0x0 00021482 07 | | .CONST 0x7 ; DIPROC address 00021483 00 | | .CONST 0x0 ; Output Parameters 00021484 00 | | .CONST 0x0 ; Input Parameters 00021485 00 | | .PAD 0x0 00021486 exp_PREP_RUN.VAL(Sw_2): 00021486 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002148c 00 0a | | .CONST 0x000a ; Stack-delta 0002148e 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.VAL' 0002149b 00 | | .CONST 0x0 0002149c 07 | | .CONST 0x7 ; DIPROC address 0002149d 00 | | .CONST 0x0 ; Output Parameters 0002149e 01 | | .CONST 0x1 ; Input Parameters 0002149f 01 | | .CONST 0x1 ; In arg [2] 000214a0 exp_MF.VAL(): 000214a0 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000214a6 00 08 | | .CONST 0x0008 ; Stack-delta 000214a8 06 4d 46 2e 56 41 4c | MF.VAL | .TXT 6,'MF.VAL' 000214af 00 | | .CONST 0x0 000214b0 07 | | .CONST 0x7 ; DIPROC address 000214b1 00 | | .CONST 0x0 ; Output Parameters 000214b2 00 | | .CONST 0x0 ; Input Parameters 000214b3 00 | | .PAD 0x0 000214b4 53 45 54 5f 48 49 54 2e |SET_HIT.| .TXT 'SET_HIT.MEM ' 000214c0 53 45 54 5f 48 49 54 2e |SET_HIT.| .TXT 'SET_HIT.M32 ' 000214cc ; -------------------------------------------------------------------------------------- 000214cc ; OMSI PASCAL Function 000214cc ; <LVAR 0x00a 1(r)> 000214cc ; <LVAR 0x008 1(r)> 000214cc ; <LVAR -0x004 @ 4(r)> 000214cc ; -------------------------------------------------------------------------------------- 000214cc 4e 56 ff cc |NV | LINK.W A6,#0xffcc 000214d0 bf d5 | | CMPA.L (A5),A7 000214d2 62 06 |b | BHI 0x214da 000214d4 44 fc 00 02 |D | MOVE.W #0x2,CCR 000214d8 4e 76 |Nv | TRAPV 000214da de fc 00 30 | 0 | ADDA.W #0x30,A7 000214de 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000214e2 45 ee ff fc |E | LEA.L (A6-0x4),A2 000214e6 72 0c |r | MOVEQ.L #0x0c,D1 000214e8 55 4f |UO | SUBQ.L #0x2,A7 000214ea 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000214f0 4a 1f |J | TST.B (A7)+ 000214f2 67 12 |g | BEQ 0x21506 000214f4 9e c1 | | SUBA.W D1,A7 000214f6 20 4f | O | MOVEA.L A7,A0 000214f8 43 fa ff ba |C | LEA.L 0x214b4,A1 000214fc 70 0a |p | MOVEQ.L #0x0a,D0 000214fe 10 d9 | | MOVE.B (A1)+,(A0)+ 00021500 51 c8 ff fc |Q | DBF D0,0x214fe 00021504 60 10 |` | BRA 0x21516 00021506 9e c1 | | SUBA.W D1,A7 00021508 20 4f | O | MOVEA.L A7,A0 0002150a 43 fa ff b4 |C | LEA.L 0x214c0,A1 0002150e 70 0a |p | MOVEQ.L #0x0a,D0 00021510 10 d9 | | MOVE.B (A1)+,(A0)+ 00021512 51 c8 ff fc |Q | DBF D0,0x21510 00021516 59 4f |YO | SUBQ.L #0x4,A7 00021518 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002151c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021520 3f 3c 00 0b |?< | MOVE.W #0xb,-(A7) 00021524 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002152a 50 4f |PO | ADDQ.L #0x8,A7 0002152c 48 52 |HR | PEA.L (A2) 0002152e 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00021534 de fc 00 14 | | ADDA.W #0x14,A7 00021538 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 0002153c 2f 12 |/ | MOVE.L (A2),-(A7) 0002153e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021542 48 78 00 00 |Hx | PEA.L 0x0 00021546 48 78 00 00 |Hx | PEA.L 0x0 0002154a 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00021550 de fc 00 10 | | ADDA.W #0x10,A7 00021554 42 17 |B | CLR.B (A7) 00021556 1f 2e 00 0a | . | MOVE.B (A6+0xa),-(A7) 0002155a 2f 12 |/ | MOVE.L (A2),-(A7) 0002155c 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 00021562 50 4f |PO | ADDQ.L #0x8,A7 00021564 48 52 |HR | PEA.L (A2) 00021566 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 0002156c 58 4f |XO | ADDQ.L #0x4,A7 0002156e 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 00021572 4e 5e |N^ | UNLK A6 00021574 4e 75 |Nu | RTS 00021576 52 55 4e 5f 43 48 45 43 |RUN_CHEC| .TXT 'RUN_CHECK.MEM ' 00021584 52 55 4e 5f 43 48 45 43 |RUN_CHEC| .TXT 'RUN_CHECK.M32 ' 00021592 ; -------------------------------------------------------------------------------------- 00021592 ; OMSI PASCAL Function 00021592 ; <LVAR 0x008 1(r)> 00021592 ; <LVAR -0x006 @ 4(r)> 00021592 ; -------------------------------------------------------------------------------------- 00021592 4e 56 ff c8 |NV | LINK.W A6,#0xffc8 00021596 bf d5 | | CMPA.L (A5),A7 00021598 62 06 |b | BHI 0x215a0 0002159a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002159e 4e 76 |Nv | TRAPV 000215a0 de fc 00 32 | 2 | ADDA.W #0x32,A7 000215a4 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000215a8 45 ee ff fa |E | LEA.L (A6-0x6),A2 000215ac 72 0e |r | MOVEQ.L #0x0e,D1 000215ae 55 4f |UO | SUBQ.L #0x2,A7 000215b0 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000215b6 4a 1f |J | TST.B (A7)+ 000215b8 67 12 |g | BEQ 0x215cc 000215ba 9e c1 | | SUBA.W D1,A7 000215bc 20 4f | O | MOVEA.L A7,A0 000215be 43 fa ff b6 |C | LEA.L 0x21576,A1 000215c2 70 0c |p | MOVEQ.L #0x0c,D0 000215c4 10 d9 | | MOVE.B (A1)+,(A0)+ 000215c6 51 c8 ff fc |Q | DBF D0,0x215c4 000215ca 60 10 |` | BRA 0x215dc 000215cc 9e c1 | | SUBA.W D1,A7 000215ce 20 4f | O | MOVEA.L A7,A0 000215d0 43 fa ff b2 |C | LEA.L 0x21584,A1 000215d4 70 0c |p | MOVEQ.L #0x0c,D0 000215d6 10 d9 | | MOVE.B (A1)+,(A0)+ 000215d8 51 c8 ff fc |Q | DBF D0,0x215d6 000215dc 59 4f |YO | SUBQ.L #0x4,A7 000215de 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000215e2 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000215e6 3f 3c 00 0d |?< | MOVE.W #0xd,-(A7) 000215ea 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000215f0 50 4f |PO | ADDQ.L #0x8,A7 000215f2 48 52 |HR | PEA.L (A2) 000215f4 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000215fa de fc 00 16 | | ADDA.W #0x16,A7 000215fe 42 27 |B' | CLR.B -(A7) 00021600 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00021604 2f 12 |/ | MOVE.L (A2),-(A7) 00021606 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 0002160c 50 4f |PO | ADDQ.L #0x8,A7 0002160e 48 52 |HR | PEA.L (A2) 00021610 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00021616 58 4f |XO | ADDQ.L #0x4,A7 00021618 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 0002161c 4e 5e |N^ | UNLK A6 0002161e 4e 75 |Nu | RTS 00021620 4d 46 |MF | .TXT 'MF' 00021622 2e 4d |.M | .TXT '.M' 00021624 45 4d |EM | .TXT 'EM' 00021626 4d 46 |MF | .TXT 'MF' 00021628 2e 4d |.M | .TXT '.M' 0002162a 33 32 |32 | .TXT '32' 0002162c ; -------------------------------------------------------------------------------------- 0002162c ; OMSI PASCAL Function 0002162c ; <LVAR 0x008 1(r)> 0002162c ; <LVAR -0x006 @ 4(r)> 0002162c ; -------------------------------------------------------------------------------------- 0002162c 4e 56 ff e0 |NV | LINK.W A6,#0xffe0 00021630 bf d5 | | CMPA.L (A5),A7 00021632 62 06 |b | BHI 0x2163a 00021634 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021638 4e 76 |Nv | TRAPV 0002163a de fc 00 1a | | ADDA.W #0x1a,A7 0002163e 48 e7 00 80 |H | MOVEM.L A0,-(A7) 00021642 41 ee ff fa |A | LEA.L (A6-0x6),A0 00021646 55 4f |UO | SUBQ.L #0x2,A7 00021648 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002164e 4a 1f |J | TST.B (A7)+ 00021650 67 0e |g | BEQ 0x21660 00021652 3f 3a ff d0 |?: | MOVE.W 0x21624,-(A7) 00021656 3f 3a ff ca |?: | MOVE.W 0x21622,-(A7) 0002165a 3f 3a ff c4 |?: | MOVE.W 0x21620,-(A7) 0002165e 60 0c |` | BRA 0x2166c 00021660 3f 3a ff c8 |?: | MOVE.W 0x2162a,-(A7) 00021664 3f 3a ff c2 |?: | MOVE.W 0x21628,-(A7) 00021668 3f 3a ff bc |?: | MOVE.W 0x21626,-(A7) 0002166c 59 4f |YO | SUBQ.L #0x4,A7 0002166e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021672 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021676 3f 3c 00 06 |?< | MOVE.W #0x6,-(A7) 0002167a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021680 50 4f |PO | ADDQ.L #0x8,A7 00021682 48 50 |HP | PEA.L (A0) 00021684 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 0002168a de fc 00 0e | | ADDA.W #0xe,A7 0002168e 42 27 |B' | CLR.B -(A7) 00021690 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00021694 2f 10 |/ | MOVE.L (A0),-(A7) 00021696 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 0002169c 50 4f |PO | ADDQ.L #0x8,A7 0002169e 48 50 |HP | PEA.L (A0) 000216a0 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000216a6 58 4f |XO | ADDQ.L #0x4,A7 000216a8 4c df 01 00 |L | MOVEM.L (A7)+,A0 000216ac 4e 5e |N^ | UNLK A6 000216ae 4e 75 |Nu | RTS 000216b0 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.MEM ' 000216c8 43 4c 45 41 52 5f 50 41 |CLEAR_PA| .TXT 'CLEAR_PARITY_ERRORS.M32 ' 000216e0 ; -------------------------------------------------------------------------------------- 000216e0 ; OMSI PASCAL Function 000216e0 ; <LVAR 0x008 1(r)> 000216e0 ; <LVAR -0x006 @ 4(r)> 000216e0 ; -------------------------------------------------------------------------------------- 000216e0 4e 56 ff be |NV | LINK.W A6,#0xffbe 000216e4 bf d5 | | CMPA.L (A5),A7 000216e6 62 06 |b | BHI 0x216ee 000216e8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000216ec 4e 76 |Nv | TRAPV 000216ee de fc 00 3c | < | ADDA.W #0x3c,A7 000216f2 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 000216f6 45 ee ff fa |E | LEA.L (A6-0x6),A2 000216fa 72 18 |r | MOVEQ.L #0x18,D1 000216fc 55 4f |UO | SUBQ.L #0x2,A7 000216fe 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 00021704 4a 1f |J | TST.B (A7)+ 00021706 67 12 |g | BEQ 0x2171a 00021708 9e c1 | | SUBA.W D1,A7 0002170a 20 4f | O | MOVEA.L A7,A0 0002170c 43 fa ff a2 |C | LEA.L 0x216b0,A1 00021710 70 16 |p | MOVEQ.L #0x16,D0 00021712 10 d9 | | MOVE.B (A1)+,(A0)+ 00021714 51 c8 ff fc |Q | DBF D0,0x21712 00021718 60 10 |` | BRA 0x2172a 0002171a 9e c1 | | SUBA.W D1,A7 0002171c 20 4f | O | MOVEA.L A7,A0 0002171e 43 fa ff a8 |C | LEA.L 0x216c8,A1 00021722 70 16 |p | MOVEQ.L #0x16,D0 00021724 10 d9 | | MOVE.B (A1)+,(A0)+ 00021726 51 c8 ff fc |Q | DBF D0,0x21724 0002172a 59 4f |YO | SUBQ.L #0x4,A7 0002172c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021730 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021734 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00021738 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002173e 50 4f |PO | ADDQ.L #0x8,A7 00021740 48 52 |HR | PEA.L (A2) 00021742 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 00021748 de fc 00 20 | | ADDA.W #0x20,A7 0002174c 42 27 |B' | CLR.B -(A7) 0002174e 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00021752 2f 12 |/ | MOVE.L (A2),-(A7) 00021754 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 0002175a 50 4f |PO | ADDQ.L #0x8,A7 0002175c 48 52 |HR | PEA.L (A2) 0002175e 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00021764 58 4f |XO | ADDQ.L #0x4,A7 00021766 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 0002176a 4e 5e |N^ | UNLK A6 0002176c 4e 75 |Nu | RTS 0002176e 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.MEM' 0002177c 43 4c 45 41 52 5f 48 49 |CLEAR_HI| .TXT 'CLEAR_HITS.M32' 0002178a ; -------------------------------------------------------------------------------------- 0002178a ; OMSI PASCAL Function 0002178a ; <LVAR 0x008 1(r)> 0002178a ; <LVAR -0x006 @ 4(r)> 0002178a ; -------------------------------------------------------------------------------------- 0002178a 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 0002178e bf d5 | | CMPA.L (A5),A7 00021790 62 06 |b | BHI 0x21798 00021792 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021796 4e 76 |Nv | TRAPV 00021798 de fc 00 2a | * | ADDA.W #0x2a,A7 0002179c 48 e7 80 c0 |H | MOVEM.L A1+A0+D0,-(A7) 000217a0 43 ee ff fa |C | LEA.L (A6-0x6),A1 000217a4 55 4f |UO | SUBQ.L #0x2,A7 000217a6 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 000217ac 4a 1f |J | TST.B (A7)+ 000217ae 67 0e |g | BEQ 0x217be 000217b0 41 fa ff ca |A | LEA.L 0x2177c,A0 000217b4 70 06 |p | MOVEQ.L #0x06,D0 000217b6 3f 20 |? | MOVE.W -(A0),-(A7) 000217b8 51 c8 ff fc |Q | DBF D0,0x217b6 000217bc 60 0c |` | BRA 0x217ca 000217be 41 fa ff ca |A | LEA.L 0x2178a,A0 000217c2 70 06 |p | MOVEQ.L #0x06,D0 000217c4 3f 20 |? | MOVE.W -(A0),-(A7) 000217c6 51 c8 ff fc |Q | DBF D0,0x217c4 000217ca 59 4f |YO | SUBQ.L #0x4,A7 000217cc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000217d0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000217d4 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 000217d8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000217de 50 4f |PO | ADDQ.L #0x8,A7 000217e0 48 51 |HQ | PEA.L (A1) 000217e2 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000217e8 de fc 00 16 | | ADDA.W #0x16,A7 000217ec 42 27 |B' | CLR.B -(A7) 000217ee 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 000217f2 2f 11 |/ | MOVE.L (A1),-(A7) 000217f4 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000217fa 50 4f |PO | ADDQ.L #0x8,A7 000217fc 48 51 |HQ | PEA.L (A1) 000217fe 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 00021804 58 4f |XO | ADDQ.L #0x4,A7 00021806 4c df 03 01 |L | MOVEM.L (A7)+,D0+A0+A1 0002180a 4e 5e |N^ | UNLK A6 0002180c 4e 75 |Nu | RTS 0002180e 43 4c 45 41 52 5f 44 52 |CLEAR_DR| .TXT 'CLEAR_DRIVE_HIT.MEM ' 00021822 43 4c 45 41 52 5f 44 52 |CLEAR_DR| .TXT 'CLEAR_DRIVE_HIT.M32 ' 00021836 ; -------------------------------------------------------------------------------------- 00021836 ; OMSI PASCAL Function 00021836 ; <LVAR 0x008 1(r)> 00021836 ; <LVAR -0x006 @ 4(r)> 00021836 ; -------------------------------------------------------------------------------------- 00021836 4e 56 ff c2 |NV | LINK.W A6,#0xffc2 0002183a bf d5 | | CMPA.L (A5),A7 0002183c 62 06 |b | BHI 0x21844 0002183e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021842 4e 76 |Nv | TRAPV 00021844 de fc 00 38 | 8 | ADDA.W #0x38,A7 00021848 48 e7 c0 e0 |H | MOVEM.L A2+A1+A0+D1+D0,-(A7) 0002184c 45 ee ff fa |E | LEA.L (A6-0x6),A2 00021850 72 14 |r | MOVEQ.L #0x14,D1 00021852 55 4f |UO | SUBQ.L #0x2,A7 00021854 4e b9 00 01 04 cc |N | JSR MemOnly2MB() : Bool 0002185a 4a 1f |J | TST.B (A7)+ 0002185c 67 12 |g | BEQ 0x21870 0002185e 9e c1 | | SUBA.W D1,A7 00021860 20 4f | O | MOVEA.L A7,A0 00021862 43 fa ff aa |C | LEA.L 0x2180e,A1 00021866 70 12 |p | MOVEQ.L #0x12,D0 00021868 10 d9 | | MOVE.B (A1)+,(A0)+ 0002186a 51 c8 ff fc |Q | DBF D0,0x21868 0002186e 60 10 |` | BRA 0x21880 00021870 9e c1 | | SUBA.W D1,A7 00021872 20 4f | O | MOVEA.L A7,A0 00021874 43 fa ff ac |C | LEA.L 0x21822,A1 00021878 70 12 |p | MOVEQ.L #0x12,D0 0002187a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002187c 51 c8 ff fc |Q | DBF D0,0x2187a 00021880 59 4f |YO | SUBQ.L #0x4,A7 00021882 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021886 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002188a 3f 3c 00 13 |?< | MOVE.W #0x13,-(A7) 0002188e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021894 50 4f |PO | ADDQ.L #0x8,A7 00021896 48 52 |HR | PEA.L (A2) 00021898 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 0002189e de fc 00 1c | | ADDA.W #0x1c,A7 000218a2 42 27 |B' | CLR.B -(A7) 000218a4 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 000218a8 2f 12 |/ | MOVE.L (A2),-(A7) 000218aa 4e b9 00 01 04 ba |N | JSR ExpRun(a: Bool; adr: Byte; b: Pointer) 000218b0 50 4f |PO | ADDQ.L #0x8,A7 000218b2 48 52 |HR | PEA.L (A2) 000218b4 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000218ba 58 4f |XO | ADDQ.L #0x4,A7 000218bc 4c df 07 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2 000218c0 4e 5e |N^ | UNLK A6 000218c2 4e 75 |Nu | RTS 000218c4 exp_RUN_CHECK.IOC(): 000218c4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000218ca 00 08 | | .CONST 0x0008 ; Stack-delta 000218cc 0d 52 55 4e 5f 43 48 45 | RUN_CHE| .TXT 13,'RUN_CHECK.IOC' 000218da 00 | | .CONST 0x0 000218db 04 | | .CONST 0x4 ; DIPROC address 000218dc 00 | | .CONST 0x0 ; Output Parameters 000218dd 00 | | .CONST 0x0 ; Input Parameters 000218de exp_PREP_RUN.IOC(Sw_2): 000218de 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000218e4 00 0a | | .CONST 0x000a ; Stack-delta 000218e6 0c 50 52 45 50 5f 52 55 | PREP_RU| .TXT 12,'PREP_RUN.IOC' 000218f3 00 | | .CONST 0x0 000218f4 04 | | .CONST 0x4 ; DIPROC address 000218f5 00 | | .CONST 0x0 ; Output Parameters 000218f6 01 | | .CONST 0x1 ; Input Parameters 000218f7 01 | | .CONST 0x1 ; In arg [2] 000218f8 exp_MF.IOC(): 000218f8 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000218fe 00 08 | | .CONST 0x0008 ; Stack-delta 00021900 06 4d 46 2e 49 4f 43 | MF.IOC | .TXT 6,'MF.IOC' 00021907 00 | | .CONST 0x0 00021908 04 | | .CONST 0x4 ; DIPROC address 00021909 00 | | .CONST 0x0 ; Output Parameters 0002190a 00 | | .CONST 0x0 ; Input Parameters 0002190b 00 | | .PAD 0x0 0002190c 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 0002191a ; -------------------------------------------------------------------------------------- 0002191a ; OMSI PASCAL Function 0002191a ; <LVAR 0x008 1(r)> 0002191a ; -------------------------------------------------------------------------------------- 0002191a PROG_FAIL: 0002191a 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 0002191e bf d5 | | CMPA.L (A5),A7 00021920 62 06 |b | BHI 0x21928 00021922 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021926 4e 76 |Nv | TRAPV 00021928 de fc 00 2c | , | ADDA.W #0x2c,A7 0002192c 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 00021930 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 00021934 70 06 |p | MOVEQ.L #0x06,D0 00021936 3f 20 |? | MOVE.W -(A0),-(A7) 00021938 51 c8 ff fc |Q | DBF D0,0x21936 0002193c 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00021940 51 4f |QO | SUBQ.L #0x8,A7 00021942 48 6f 00 0a |Ho | PEA.L (A7+0xa) 00021946 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 0002194a 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 0002194e 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00021954 58 4f |XO | ADDQ.L #0x4,A7 00021956 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 0002195a 48 80 |H | EXTB.W D0 0002195c 48 c0 |H | EXTW.L D0 0002195e 2f 00 |/ | MOVE.L D0,-(A7) 00021960 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 00021966 58 4f |XO | ADDQ.L #0x4,A7 00021968 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002196e 50 4f |PO | ADDQ.L #0x8,A7 00021970 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021976 de fc 00 14 | | ADDA.W #0x14,A7 0002197a 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 0002197e 4e 5e |N^ | UNLK A6 00021980 4e 75 |Nu | RTS 00021982 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 00021990 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 0002199e 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 000219ac 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 000219be 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 000219d6 ; -------------------------------------------------------------------------------------- 000219d6 ; OMSI PASCAL Function 000219d6 ; <LVAR 0x00e 1(r)> 000219d6 ; <LVAR 0x00a 4(r)> 000219d6 ; <LVAR 0x008 1(r)> 000219d6 ; -------------------------------------------------------------------------------------- 000219d6 EXP_FAIL: 000219d6 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 000219da bf d5 | | CMPA.L (A5),A7 000219dc 62 06 |b | BHI 0x219e4 000219de 44 fc 00 02 |D | MOVE.W #0x2,CCR 000219e2 4e 76 |Nv | TRAPV 000219e4 de fc 00 74 | t | ADDA.W #0x74,A7 000219e8 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 000219ec 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 000219f2 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 000219f8 72 01 |r | MOVEQ.L #0x01,D1 000219fa 74 0d |t | MOVEQ.L #0x0d,D2 000219fc 76 1e |v | MOVEQ.L #0x1e,D3 000219fe 78 12 |x | MOVEQ.L #0x12,D4 00021a00 7a 0e |z | MOVEQ.L #0x0e,D5 00021a02 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 00021a08 41 fa ff b4 |A | LEA.L 0x219be,A0 00021a0c 70 08 |p | MOVEQ.L #0x08,D0 00021a0e 3f 20 |? | MOVE.W -(A0),-(A7) 00021a10 51 c8 ff fc |Q | DBF D0,0x21a0e 00021a14 59 4f |YO | SUBQ.L #0x4,A7 00021a16 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021a1a 3f 01 |? | MOVE.W D1,-(A7) 00021a1c 3f 04 |? | MOVE.W D4,-(A7) 00021a1e 4e 93 |N | JSR (A3) 00021a20 50 4f |PO | ADDQ.L #0x8,A7 00021a22 4e 94 |N | JSR (A4) 00021a24 50 4f |PO | ADDQ.L #0x8,A7 00021a26 20 4f | O | MOVEA.L A7,A0 00021a28 43 fa ff 58 |C X | LEA.L 0x21982,A1 00021a2c 70 0c |p | MOVEQ.L #0x0c,D0 00021a2e 10 d9 | | MOVE.B (A1)+,(A0)+ 00021a30 51 c8 ff fc |Q | DBF D0,0x21a2e 00021a34 51 4f |QO | SUBQ.L #0x8,A7 00021a36 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021a3a 3f 01 |? | MOVE.W D1,-(A7) 00021a3c 3f 02 |? | MOVE.W D2,-(A7) 00021a3e 4e 93 |N | JSR (A3) 00021a40 54 4f |TO | ADDQ.L #0x2,A7 00021a42 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 00021a46 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 00021a4c 54 4f |TO | ADDQ.L #0x2,A7 00021a4e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021a54 50 4f |PO | ADDQ.L #0x8,A7 00021a56 4e 94 |N | JSR (A4) 00021a58 de c4 | | ADDA.W D4,A7 00021a5a 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 00021a5e b0 c1 | | CMPA.W D1,A0 00021a60 67 48 |gH | BEQ 0x21aaa 00021a62 9e c5 | | SUBA.W D5,A7 00021a64 22 4f |"O | MOVEA.L A7,A1 00021a66 45 fa ff 28 |E ( | LEA.L 0x21990,A2 00021a6a 70 0c |p | MOVEQ.L #0x0c,D0 00021a6c 12 da | | MOVE.B (A2)+,(A1)+ 00021a6e 51 c8 ff fc |Q | DBF D0,0x21a6c 00021a72 9e c3 | | SUBA.W D3,A7 00021a74 22 4f |"O | MOVEA.L A7,A1 00021a76 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 00021a7a 70 1d |p | MOVEQ.L #0x1d,D0 00021a7c 12 d8 | | MOVE.B (A0)+,(A1)+ 00021a7e 51 c8 ff fc |Q | DBF D0,0x21a7c 00021a82 51 4f |QO | SUBQ.L #0x8,A7 00021a84 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 00021a88 3f 01 |? | MOVE.W D1,-(A7) 00021a8a 3f 02 |? | MOVE.W D2,-(A7) 00021a8c 4e 93 |N | JSR (A3) 00021a8e 58 4f |XO | ADDQ.L #0x4,A7 00021a90 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021a94 3f 01 |? | MOVE.W D1,-(A7) 00021a96 3f 03 |? | MOVE.W D3,-(A7) 00021a98 4e 93 |N | JSR (A3) 00021a9a 50 4f |PO | ADDQ.L #0x8,A7 00021a9c 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021aa2 50 4f |PO | ADDQ.L #0x8,A7 00021aa4 4e 94 |N | JSR (A4) 00021aa6 de fc 00 30 | 0 | ADDA.W #0x30,A7 00021aaa 9e c5 | | SUBA.W D5,A7 00021aac 20 4f | O | MOVEA.L A7,A0 00021aae 43 fa fe ee |C | LEA.L 0x2199e,A1 00021ab2 70 0c |p | MOVEQ.L #0x0c,D0 00021ab4 10 d9 | | MOVE.B (A1)+,(A0)+ 00021ab6 51 c8 ff fc |Q | DBF D0,0x21ab4 00021aba 51 4f |QO | SUBQ.L #0x8,A7 00021abc 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021ac0 3f 01 |? | MOVE.W D1,-(A7) 00021ac2 3f 02 |? | MOVE.W D2,-(A7) 00021ac4 4e 93 |N | JSR (A3) 00021ac6 54 4f |TO | ADDQ.L #0x2,A7 00021ac8 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 00021acc 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00021ad2 54 4f |TO | ADDQ.L #0x2,A7 00021ad4 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021ada 50 4f |PO | ADDQ.L #0x8,A7 00021adc 4e 94 |N | JSR (A4) 00021ade 5d 4f |]O | SUBQ.L #0x6,A7 00021ae0 20 4f | O | MOVEA.L A7,A0 00021ae2 43 fa fe da |C | LEA.L 0x219be,A1 00021ae6 70 16 |p | MOVEQ.L #0x16,D0 00021ae8 10 d9 | | MOVE.B (A1)+,(A0)+ 00021aea 51 c8 ff fc |Q | DBF D0,0x21ae8 00021aee 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00021af2 59 4f |YO | SUBQ.L #0x4,A7 00021af4 48 6f 00 06 |Ho | PEA.L (A7+0x6) 00021af8 3f 01 |? | MOVE.W D1,-(A7) 00021afa 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00021afe 4e 93 |N | JSR (A3) 00021b00 50 4f |PO | ADDQ.L #0x8,A7 00021b02 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021b08 de c3 | | ADDA.W D3,A7 00021b0a 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00021b0e 4e 5e |N^ | UNLK A6 00021b10 4e 75 |Nu | RTS