|
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: 6656 (0x1a00) Types: M200 Notes: M200_PROGRAM Names: »DBUSULOAD.M200«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293 └─ ⟦this⟧ »DBUSULOAD.M200«
@ 20274 <LVAR 0x00c 4(r)> <LVAR 0x008 4(rw)> <POP 20274-202fc Body> <POP 20274-2028a Prologue> Σ0 ↓ <POP 2028a-2028c Naked> Σ0 ↓ <MI 2028a MOVEQ.L #0x00,D6> {} <POP 2028c-202a8 Naked> Σ0 ↓ →0x202ae ←0x202e4 <MI 2028c MOVE.L (A6+0x8),D0> {} <POP 0x20290 LimitCheck 0x0 ≤ D0 ≤ 0x1ff> {} <MI 2029a ASL.L #0x1,D0> {} <MI 2029c CLR.L D1> {} <MI 2029e MOVE.W (A4+D0.L),D1> {} <MI 202a2 MOVE.L D1,D7> {} <MI 202a4 TST.B D6> {} <MI 202a6 BEQ 0x202ae> {} <POP 202a8-202ae Naked> Σ0 →0x202be <MI 202a8 ADDQ.L #0x1,(A6+0x8)> {} <MI 202ac BRA 0x202be> {} <POP 202ae-202be Naked> Σ0 ↓ ←0x2028c <MI 202ae MOVE.L D7,D4> {} <MI 202b0 MOVE.L #0x100,D3> {} <Call 0x202b6 0x10294> {} ?divs_d3_d4 <MI 202bc MOVE.L D4,D7> {} <POP 202be-202cc Naked> Σ0 ↓ →0x202e4 ←0x202a8 <MI 202be ANDI.L #0x000000ff,D7> {} <MI 202c4 NEG.B D6> {} <MI 202c6 ADDQ.B #0x1,D6> {} <MI 202c8 TST.L D7> {} <MI 202ca BEQ 0x202e4> {} <POP 202cc-202e4 Naked> Σ0 ↓ <MI 202cc MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']} <POP 0x202d0 LimitCheck 0x0 ≤ D7 ≤ 0xff> {[4, '(A6+0xc)']} <MI 202da MOVE.B D7,-(A7)> Δ-2 {[4, '(A6+0xc)']|[2, 'D7']} <Call 0x202dc 0x102c0> {[4, '(A6+0xc)']|[2, 'D7']} AppendChar(MOD b : String; a : char) <POP 202e2-202e4 StackAdj> Δ+6 {} <POP 202e4-202e8 Naked> Σ0 ↓ →0x2028c ←0x202be <MI 202e4 TST.L D7> {} <MI 202e6 BNE 0x2028c> {} <POP 202e8-202f4 Naked> Σ0 ↓ <MI 202e8 MOVE.L (A6+0xc),-(A7)> Δ-4 {[4, '(A6+0xc)']} <Call 0x202ec 0x103e0> {[4, '(A6+0xc)']} WriteConsoleStringCrLf(str : String) <POP 202f2-202f4 StackAdj> Δ+4 {} <POP 202f4-202fc Epilogue> Σ0
@ 202fc <LVAR 0x018 4(r)> <LVAR 0x014 4(r)> <LVAR 0x010 4(r)> <LVAR 0x00c 4(r)> <LVAR 0x008 4(r)> <LVAR -0x006 @ 4(r)> <LVAR -0x00a @ 4(rw)> <LVAR -0x00e @ 4(rw)> <LVAR -0x012 @ 4(rw)> <LVAR -0x018 @ 1(r)> <LVAR -0x414 2(r)> <LVAR -0x416 2(r)> <LVAR -0x418 @ 2(r)> <POP 202fc-20632 Body> <POP 202fc-20312 Prologue> Σ0 ↓ <POP 20312-20322 RegCacheLoad> Σ0 ↓ <POP 20322-20398 Naked> Σ0 Δ-4 ↓ →0x203c2 <MI 20322 MOVEA.L (A6+0x10),A0> {} <MI 20326 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']} <MI 20328 MOVE.L (A6+0x18),-(A7)> Δ-4 {[4, 'A0']|[4, '(A6+0x18)']} <MI 2032c CLR.B -(A7)> Δ-2 {[4, 'A0']|[4, '(A6+0x18)']|[#0]} <Const 0x2032e 0x2.2> Δ-2 {[4, 'A0']|[4, '(A6+0x18)']|[#0]|[#2]} <Const 0x20330 0x0.4> Δ-4 {[4, 'A0']|[4, '(A6+0x18)']|[#0]|[#2]|[##0]} <Pointer.fp 0x20334 <LVAR -0x018 @ 1(r)>> Δ-4 {[4, 'A0']|[4, '(A6+0x18)']|[#0]|[#2]|[##0]|[@@-24]} <MI 20336 PEA.L (A0)> Δ-4 {[4, 'A0']|[4, '(A6+0x18)']|[#0]|[#2]|[##0]|[@@-24]|[4, '^(A0)']} <Call 0x20338 0x10380> {[4, 'A0']|[4, '(A6+0x18)']|[#0]|[#2]|[##0]|[@@-24]|[4, '^(A0)']} OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) <POP 2033e-20340 StackAdj> Δ+20 {[4, 'A0']} <MI 20340 MOVEA.L (A0),A1> {[4, 'A0']} <MI 20342 MOVE.W (A1+0x20),D0> {[4, 'A0']} <MI 20346 EXTW.L D0> {[4, 'A0']} <MI 20348 MOVE.L D0,D7> {[4, 'A0']} <MI 2034a MOVE.L (A0),-(A7)> Δ-4 {[4, 'A0']|[4, '(A0)']} <MI 2034c CLR.W -(A7)> Δ-2 {[4, 'A0']|[4, '(A0)']|[#0]} <MI 2034e CLR.W -(A7)> Δ-2 {[4, 'A0']|[4, '(A0)']|[#0]|[#0]} <Const 0x20350 0x200.2> Δ-2 {[4, 'A0']|[4, '(A0)']|[#0]|[#0]|[#512]} <Const 0x20354 0x2.2> Δ-2 {[4, 'A0']|[4, '(A0)']|[#0]|[#0]|[#512]|[#2]} <MI 20356 LEA.L (A6-0x418),A1> {[4, 'A0']|[4, '(A0)']|[#0]|[#0]|[#512]|[#2]} <MI 2035a MOVE.L A1,-(A7)> Δ-4 {[4, 'A0']|[4, '(A0)']|[#0]|[#0]|[#512]|[#2]|[4, 'A1']} <Pointer.fp 0x2035c <LVAR -0x018 @ 1(r)>> Δ-4 {[4, 'A0']|[4, '(A0)']|[#0]|[#0]|[#512]|[#2]|[4, 'A1']|[@@-24]} <Call 0x2035e 0x10384> {[4, 'A0']|[4, '(A0)']|[#0]|[#0]|[#512]|[#2]|[4, 'A1']|[@@-24]} ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) <POP 20364-20366 StackAdj> Δ+20 {[4, 'A0']} <MI 20366 MOVEA.L (A6+0xc),A1> {[4, 'A0']} <MI 2036a CLR.L D0> {[4, 'A0']} <MI 2036c MOVE.W (A6-0x418),D0> {[4, 'A0']} <MI 20370 MOVE.L D0,(A1)> {[4, 'A0']} <MI 20372 MOVEA.L (A6+0x8),A1> {[4, 'A0']} <MI 20376 MOVE.W (A6-0x416),D1> {[4, 'A0']} <MI 2037a LSR.W #0x8,D1> {[4, 'A0']} <MI 2037c MOVE.B D1,(A1)> {[4, 'A0']} <MI 2037e MOVE.W (A6-0x416),D1> {[4, 'A0']} <MI 20382 ANDI.W #0x00ff,D1> {[4, 'A0']} <POP 0x20386 LimitCheck 0x0 ≤ D1 ≤ 0xff> {[4, 'A0']} <MI 2038a MOVE.B D1,(A1+0x1)> {[4, 'A0']} <MI 2038e MOVE.W (A6-0x414),D1> {[4, 'A0']} <MI 20392 CMPI.W #0x00c8,D1> {[4, 'A0']} <MI 20396 BEQ 0x203c2> {[4, 'A0']} <POP 20398-203c2 Naked> Σ-4 ↓ <Blob 0x20398 [44] @> Δ-44 {[-4-]|[«44""»]} <Const 0x203a4 0xe.2> Δ-2 {[-4-]|[«44""»]|[#14]} <POP 203a8-203aa StackAdj> Δ-4 {[-4-]|[«44""»]|[#14]|[-4-]} <Lit 0x203aa 44> {[-4-]|[«44""»]|[#14]|[$$Microcode is not for this type of processor.]} <Call 0x203b8 0x103b8> {[-4-]|[«44""»]|[#14]|[$$Microcode is not for this type of processor.]} PopProgram(status : Byte; msg : String) <POP 203be-203c2 StackAdj> Δ+50 {[-4-]} <POP 203c2-203d8 Naked> Σ-4 ↓ →0x20402 ←0x20322 <MI 203c2 MOVE.L D7,D1> {[-4-]} <MI 203c4 SUBI.L #0x00000029,D1> {[-4-]} <MI 203ca MOVE.L D0,D4> {[-4-]} <MI 203cc MOVEQ.L #0x20,D3> {[-4-]} <Call 0x203ce 0x10294> {[-4-]} ?divs_d3_d4 <MI 203d4 CMP.L D4,D1> {[-4-]} <MI 203d6 BEQ 0x20402> {[-4-]} <POP 203d8-20402 Naked> Σ-4 ↓ <Blob 0x203d8 [36] @> Δ-36 {[-4-]|[«36""»]} <Const 0x203e4 0xe.2> Δ-2 {[-4-]|[«36""»]|[#14]} <POP 203e8-203ea StackAdj> Δ-4 {[-4-]|[«36""»]|[#14]|[-4-]} <Lit 0x203ea 36> {[-4-]|[«36""»]|[#14]|[$$Microcode file size is inconsistent.]} <Call 0x203f8 0x103b8> {[-4-]|[«36""»]|[#14]|[$$Microcode file size is inconsistent.]} PopProgram(status : Byte; msg : String) <POP 203fe-20402 StackAdj> Δ+42 {[-4-]} <POP 20402-204da Naked> Σ-4 ↓ →0x2061c ←0x203c2 <Blob 0x20402 [4] @> Δ-4 {[-4-]|[«4""»]} <Blob 0x20406 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]} <POP 2040a-2040c StackAdj> Δ-8 {[-4-]|[«4""»]|[«4""»]|[-8-]} <Lit 0x2040c 8> {[-4-]|[«4""»]|[«4""»]|[-4-]|[$$File :_]} <MI 20418 MOVE.L (A6+0x18),(A7)> {[-4-]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x18)']} <POP 20416-20418 StackAdj> Δ-8 {[-4-]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x18)']|[-8-]} <Call 0x2041c 0x102cc> {[-4-]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x18)']|[-8-]} StringDup(a : String) : String <POP 20422-20424 StackAdj> Δ+4 {[-4-]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x18)']|[-4-]} <Call 0x20424 0x102d0> {[-4-]|[«4""»]|[«4""»]|[-4-]|[4, '(A6+0x18)']|[-4-]} StringCat2(a, b : String) : String <POP 2042a-2042c StackAdj> Δ+8 {[-4-]|[«4""»]|[«4""»]|[-4-]} <Call 0x2042c 0x103e0> {[-4-]|[«4""»]|[«4""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 20432-20434 StackAdj> Δ+8 {[-4-]|[«4""»]} <POP 20434-20435 StackAdj> Δ+4 {[-4-]} <Blob 0x20435 [4] @> Δ-4 {[-4-]|[«4""»]} <Blob 0x20438 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]} <POP 2043c-2043e StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[-4-]} <Lit 0x2043e 8> {[-4-]|[«4""»]|[«4""»]|[$$Bound :_]} <Const 0x2044c 0x4.4> Δ-4 {[-4-]|[«4""»]|[«4""»]|[$$Bound :_]|[##4]} <MI 20450 LEA.L (A6-0x418),A4> {[-4-]|[«4""»]|[«4""»]|[$$Bound :_]|[##4]} <Call 0x20454 0x20274> {[-4-]|[«4""»]|[«4""»]|[$$Bound :_]|[##4]} <POP 20458-2045c StackAdj> Δ+12 {[-4-]|[«4""»]} <POP 2045c-2045d StackAdj> Δ+4 {[-4-]} <Blob 0x2045d [4] @> Δ-4 {[-4-]|[«4""»]} <Blob 0x20460 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]} <POP 20464-20466 StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[-4-]} <Lit 0x20466 8> {[-4-]|[«4""»]|[«4""»]|[$$Delta :_]} <Const 0x20474 0x3c.4> Δ-4 {[-4-]|[«4""»]|[«4""»]|[$$Delta :_]|[##60]} <MI 20478 LEA.L (A6-0x418),A4> {[-4-]|[«4""»]|[«4""»]|[$$Delta :_]|[##60]} <Call 0x2047c 0x20274> {[-4-]|[«4""»]|[«4""»]|[$$Delta :_]|[##60]} <POP 20480-20484 StackAdj> Δ+12 {[-4-]|[«4""»]} <POP 20484-20485 StackAdj> Δ+4 {[-4-]} <Blob 0x20485 [4] @> Δ-4 {[-4-]|[«4""»]} <Blob 0x20488 [4] @> Δ-4 {[-4-]|[«4""»]|[«4""»]} <POP 2048c-2048e StackAdj> Δ-4 {[-4-]|[«4""»]|[«4""»]|[-4-]} <Lit 0x2048e 8> {[-4-]|[«4""»]|[«4""»]|[$$Mom :_]} <Const 0x2049c 0x14.4> Δ-4 {[-4-]|[«4""»]|[«4""»]|[$$Mom :_]|[##20]} <MI 204a0 LEA.L (A6-0x418),A4> {[-4-]|[«4""»]|[«4""»]|[$$Mom :_]|[##20]} <Call 0x204a4 0x20274> {[-4-]|[«4""»]|[«4""»]|[$$Mom :_]|[##20]} <POP 204a8-204ac StackAdj> Δ+16 {[-4-]} <Blob 0x204ac [10] @> Δ-10 {[-4-]|[«10""»]} <POP 204b8-204ba StackAdj> Δ-4 {[-4-]|[«10""»]|[-4-]} <Lit 0x204ba 10> {[-4-]|[«10""»]|[$$LAST_UCODE]} <MI 204c8 MOVE.L (A7)+,(A6-0x12)> Δ+4 {[-4-]|[«10""»]} <POP 204cc-204d0 StackAdj> Δ+10 {[-4-]} <MI 204d0 MOVEA.L (A6+0x14),A0> {[-4-]} <MI 204d4 TST.B (A0)> {[-4-]} <MI 204d6 BNE 0x2061c> {[-4-]} <POP 204da-204f8 Naked> Σ-4 ↓ →0x204fe <MI 204da MOVE.L (A6-0x12),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x12)']} <MI 204de CLR.B -(A7)> Δ-2 {[-4-]|[4, '(A6-0x12)']|[#0]} <MI 204e0 CLR.B -(A7)> Δ-2 {[-4-]|[4, '(A6-0x12)']|[#0]|[#0]} <Const 0x204e2 0x0.4> Δ-4 {[-4-]|[4, '(A6-0x12)']|[#0]|[#0]|[##0]} <Pointer.fp 0x204e6 <LVAR -0x018 @ 1(r)>> Δ-4 {[-4-]|[4, '(A6-0x12)']|[#0]|[#0]|[##0]|[@@-24]} <Pointer.fp 0x204e8 <LVAR -0x006 @ 4(r)>> Δ-4 {[-4-]|[4, '(A6-0x12)']|[#0]|[#0]|[##0]|[@@-24]|[@@-6]} <Call 0x204ec 0x10380> {[-4-]|[4, '(A6-0x12)']|[#0]|[#0]|[##0]|[@@-24]|[@@-6]} OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) <POP 204f2-204f4 StackAdj> Δ+20 {[-4-]} <MI 204f4 TST.B (A6-0x18)> {[-4-]} <MI 204f6 BEQ 0x204fe> {[-4-]} <POP 204f8-204fe Naked> Σ-4 →0x2061c <MI 204f8 MOVE.B #0x01,(A0)> {[-4-]} <MI 204fa BRA 0x2061c> {[-4-]} <POP 204fe-2053a Naked> Σ-4 ↓ →0x2053c ←0x204da <Pointer.fp 0x204fe <LVAR -0x00e @ 4(rw)>> Δ-4 {[-4-]|[@@-14]} <Call 0x20502 0x102b8> {[-4-]|[@@-14]} NewString(VAR a : String) <MI 20508 MOVE.L (A6-0x6),(A7)> {[-4-]|[4, '(A6-0x6)']} <MI 2050c CLR.W -(A7)> Δ-2 {[-4-]|[4, '(A6-0x6)']|[#0]} <MI 2050e CLR.W -(A7)> Δ-2 {[-4-]|[4, '(A6-0x6)']|[#0]|[#0]} <Const 0x20510 0x40.2> Δ-2 {[-4-]|[4, '(A6-0x6)']|[#0]|[#0]|[#64]} <Const 0x20514 0x2.2> Δ-2 {[-4-]|[4, '(A6-0x6)']|[#0]|[#0]|[#64]|[#2]} <MI 20516 MOVE.L (A6-0xe),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']|[#0]|[#0]|[#64]|[#2]|[4, '(A6-0xe)']} <Pointer.fp 0x2051a <LVAR -0x018 @ 1(r)>> Δ-4 {[-4-]|[4, '(A6-0x6)']|[#0]|[#0]|[#64]|[#2]|[4, '(A6-0xe)']|[@@-24]} <Call 0x2051c 0x10384> {[-4-]|[4, '(A6-0x6)']|[#0]|[#0]|[#64]|[#2]|[4, '(A6-0xe)']|[@@-24]} ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) <POP 20522-20526 StackAdj> Δ+14 {[-4-]|[4, '(A6-0x6)']|[#0]} <MI 20526 MOVE.L (A6-0xe),(A7)> {[-4-]|[-2-]|[4, '(A6-0xe)']} <MI 2052a MOVE.L (A6+0x18),-(A7)> Δ-4 {[-4-]|[-2-]|[4, '(A6-0xe)']|[4, '(A6+0x18)']} <Call 0x2052e 0x102c8> {[-4-]|[-2-]|[4, '(A6-0xe)']|[4, '(A6+0x18)']} StringEqual(a, b : String) : Byte <POP 20534-20536 StackAdj> Δ+8 {[-4-]|[-2-]} <MI 20536 TST.B (A7)+> Δ+2 {[-4-]} <MI 20538 BNE 0x2053c> {[-4-]} <POP 2053a-2053c Naked> Σ-4 ↓ <MI 2053a MOVE.B #0x01,(A0)> {[-4-]} <POP 2053c-2054e Naked> Σ-4 ↓ →0x205d2 ←0x204fe <Pointer.fp 0x2053c <LVAR -0x00e @ 4(rw)>> Δ-4 {[-4-]|[@@-14]} <Call 0x20540 0x102bc> {[-4-]|[@@-14]} FreeString(VAR a : String) <POP 20546-20548 StackAdj> Δ+4 {[-4-]} <MI 20548 TST.B (A0)> {[-4-]} <MI 2054a BNE 0x205d2> {[-4-]} <POP 2054e-205b8 Naked> Σ-4 ↓ →0x205ba <POP 2054e-20550 StackAdj> Δ-4 {[-8-]} <MI 20550 MOVEA.L (A7+0x4),A1> {[-8-]} <MI 20554 MOVEA.L (A1),A1> {[-8-]} <POP 20556-20558 StackAdj> Δ-4 {[-12-]} <MI 20558 MOVE.B (A1+0x3a),(A7)> {[-12-]} <MI 2055c MOVE.B (A1+0x3b),(A7+0x1)> {[-12-]} <MI 20562 MOVE.B (A1+0x3c),(A7+0x2)> {[-12-]} <MI 20568 MOVE.B (A1+0x3d),(A7+0x3)> {[-12-]} <Call 0x2056e 0x10308> {[-12-]} TimeToText() <POP 20574-20576 StackAdj> Δ+4 {[-8-]} <MI 20576 MOVE.L (A7),(A6-0xe)> {[-8-]} <MI 2057a MOVEA.L (A6-0x6),A1> {[-8-]} <POP 2057e-20580 StackAdj> Δ-4 {[-12-]} <MI 20580 MOVE.B (A1+0x3a),(A7)> {[-12-]} <MI 20584 MOVE.B (A1+0x3b),(A7+0x1)> {[-12-]} <MI 2058a MOVE.B (A1+0x3c),(A7+0x2)> {[-12-]} <MI 20590 MOVE.B (A1+0x3d),(A7+0x3)> {[-12-]} <Call 0x20596 0x10308> {[-12-]} TimeToText() <POP 2059c-2059e StackAdj> Δ+4 {[-8-]} <MI 2059e MOVE.L (A7),(A6-0xa)> {[-8-]} <POP 205a2-205a4 StackAdj> Δ+2 {[-6-]} <MI 205a4 MOVE.L (A6-0xe),-(A7)> Δ-4 {[-6-]|[4, '(A6-0xe)']} <MI 205a8 MOVE.L (A6-0xa),-(A7)> Δ-4 {[-6-]|[4, '(A6-0xe)']|[4, '(A6-0xa)']} <Call 0x205ac 0x102c8> {[-6-]|[4, '(A6-0xe)']|[4, '(A6-0xa)']} StringEqual(a, b : String) : Byte <POP 205b2-205b4 StackAdj> Δ+8 {[-6-]} <MI 205b4 TST.B (A7)+> Δ+2 {[-4-]} <MI 205b6 BNE 0x205ba> {[-4-]} <POP 205b8-205ba Naked> Σ-4 ↓ <MI 205b8 MOVE.B #0x01,(A0)> {[-4-]} <POP 205ba-205d2 Naked> Σ-4 ↓ ←0x2054e <Pointer.fp 0x205ba <LVAR -0x00e @ 4(rw)>> Δ-4 {[-4-]|[@@-14]} <Call 0x205be 0x102bc> {[-4-]|[@@-14]} FreeString(VAR a : String) <POP 205c4-205c6 StackAdj> Δ+4 {[-4-]} <Pointer.fp 0x205c6 <LVAR -0x00a @ 4(rw)>> Δ-4 {[-4-]|[@@-10]} <Call 0x205ca 0x102bc> {[-4-]|[@@-10]} FreeString(VAR a : String) <POP 205d0-205d2 StackAdj> Δ+4 {[-4-]} <POP 205d2-2061c Naked> Σ-4 ↓ ←0x2053c <Pointer.fp 0x205d2 <LVAR -0x00e @ 4(rw)>> Δ-4 {[-4-]|[@@-14]} <Call 0x205d6 0x102b8> {[-4-]|[@@-14]} NewString(VAR a : String) <MI 205dc MOVE.L (A6-0x6),(A7)> {[-4-]|[4, '(A6-0x6)']} <MI 205e0 CLR.W -(A7)> Δ-2 {[-4-]|[4, '(A6-0x6)']|[#0]} <MI 205e2 CLR.W -(A7)> Δ-2 {[-4-]|[4, '(A6-0x6)']|[#0]|[#0]} <Const 0x205e4 0x40.2> Δ-2 {[-4-]|[4, '(A6-0x6)']|[#0]|[#0]|[#64]} <Const 0x205e8 0x2.2> Δ-2 {[-4-]|[4, '(A6-0x6)']|[#0]|[#0]|[#64]|[#2]} <MI 205ea MOVE.L (A6-0xe),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']|[#0]|[#0]|[#64]|[#2]|[4, '(A6-0xe)']} <Pointer.fp 0x205ee <LVAR -0x018 @ 1(r)>> Δ-4 {[-4-]|[4, '(A6-0x6)']|[#0]|[#0]|[#64]|[#2]|[4, '(A6-0xe)']|[@@-24]} <Call 0x205f0 0x10388> {[-4-]|[4, '(A6-0x6)']|[#0]|[#0]|[#64]|[#2]|[4, '(A6-0xe)']|[@@-24]} WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) <POP 205f6-205f8 StackAdj> Δ+20 {[-4-]} <Pointer.fp 0x205f8 <LVAR -0x00e @ 4(rw)>> Δ-4 {[-4-]|[@@-14]} <Call 0x205fc 0x102bc> {[-4-]|[@@-14]} FreeString(VAR a : String) <POP 20602-20604 StackAdj> Δ+2 {[-4-]|[-2-]} <MI 20604 CLR.B (A7)> {[-4-]|[-2-]} <Const 0x20606 0x2.2> Δ-2 {[-4-]|[-2-]|[#2]} <Const 0x20608 0x1.4> Δ-4 {[-4-]|[-2-]|[#2]|[##1]} <Pointer.fp 0x2060c <LVAR -0x018 @ 1(r)>> Δ-4 {[-4-]|[-2-]|[#2]|[##1]|[@@-24]} <Pointer.fp 0x2060e <LVAR -0x006 @ 4(r)>> Δ-4 {[-4-]|[-2-]|[#2]|[##1]|[@@-24]|[@@-6]} <Call 0x20612 0x1038c> {[-4-]|[-2-]|[#2]|[##1]|[@@-24]|[@@-6]} CloseFile(a : L; VAR status : B; VAR file : File) <POP 20618-2061c StackAdj> Δ+16 {[-4-]} <POP 2061c-2062a Naked> Σ-4 Δ+4 ↓ ←0x20402 ←0x204f8 <POP 2061c-2061e StackAdj> Δ+4 {} <Pointer.fp 0x2061e <LVAR -0x012 @ 4(rw)>> Δ-4 {[@@-18]} <Call 0x20622 0x102bc> {[@@-18]} FreeString(VAR a : String) <POP 20628-2062a StackAdj> Δ+4 {} <POP 2062a-20632 Epilogue> Σ0
@ 20632 <LVAR 0x008 4(r)> <LVAR -0x004 @> <LVAR -0x008 @ 4(r)> <LVAR -0x00c @ 4(rw)> <LVAR -0x010 @ 4(rw)> <POP 20632-20730 Body> <POP 20632-20648 Prologue> Σ0 ↓ <POP 20648-2065a RegCacheLoad> Σ0 ↓ <POP 2065a-20728 Naked> Σ0 ↓ <Blob 0x2065a [10] @> Δ-10 {[«10""»]} <POP 20666-20668 StackAdj> Δ-4 {[«10""»]|[-4-]} <Lit 0x20668 10> {[«10""»]|[$$LAST_UCODE]} <MI 20678 MOVE.L (A7)+,(A6-0x10)> Δ+4 {[«10""»]} <POP 2067a-2067c StackAdj> Δ+10 {} <MI 2067c MOVEA.L (A6+0x8),A0> {} <POP 20680-20682 StackAdj> Δ-30 {[-30-]} <MI 20682 MOVEA.L A7,A1> {[-30-]} <MI 20684 MOVEA.L A0,A2> {[-30-]} <BlockMove 30,A2,A1> {[-30-]} <POP 2068e-20690 StackAdj> Δ-4 {[-34-]} <Lit 0x20690> {[-30-]|[$$…]} <Pointer.sp 0x20690 4> Δ-4 <Const 0x20694 0x1.2> Δ-2 <Const 0x20696 0x1e.2> Δ-2 <Call 0x20698 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 2069e-206a0 StackAdj> Δ+8 <MI 206a0 MOVE.L (A7)+,(A6-0xc)> Δ+4 {[-30-]} <POP 206a4-206a8 StackAdj> Δ+26 {[-4-]} <MI 206a8 MOVE.L (A6-0x10),(A7)> {[4, '(A6-0x10)']} <Const 0x206aa 0x1.2> Δ-2 {[4, '(A6-0x10)']|[#1]} <Const 0x206ac 0x2.2> Δ-2 {[4, '(A6-0x10)']|[#1]|[#2]} <Const 0x206ae 0x1.4> Δ-4 {[4, '(A6-0x10)']|[#1]|[#2]|[##1]} <Pointer.fp 0x206b2 <LVAR -0x004 @>> Δ-4 {[4, '(A6-0x10)']|[#1]|[#2]|[##1]|[@@-4]} <Pointer.fp 0x206b6 <LVAR -0x008 @ 4(r)>> Δ-4 {[4, '(A6-0x10)']|[#1]|[#2]|[##1]|[@@-4]|[@@-8]} <Call 0x206b8 0x10380> {[4, '(A6-0x10)']|[#1]|[#2]|[##1]|[@@-4]|[@@-8]} OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) <POP 206be-206c0 StackAdj> Δ+16 {[4, '(A6-0x10)']} <MI 206c0 MOVE.L (A6-0x8),(A7)> {[4, '(A6-0x8)']} <MI 206c2 CLR.W -(A7)> Δ-2 {[4, '(A6-0x8)']|[#0]} <MI 206c4 CLR.W -(A7)> Δ-2 {[4, '(A6-0x8)']|[#0]|[#0]} <Const 0x206c6 0x40.2> Δ-2 {[4, '(A6-0x8)']|[#0]|[#0]|[#64]} <Const 0x206ca 0x2.2> Δ-2 {[4, '(A6-0x8)']|[#0]|[#0]|[#64]|[#2]} <MI 206cc MOVE.L (A6-0xc),-(A7)> Δ-4 {[4, '(A6-0x8)']|[#0]|[#0]|[#64]|[#2]|[4, '(A6-0xc)']} <Pointer.fp 0x206d0 <LVAR -0x004 @>> Δ-4 {[4, '(A6-0x8)']|[#0]|[#0]|[#64]|[#2]|[4, '(A6-0xc)']|[@@-4]} <Call 0x206d4 0x10388> {[4, '(A6-0x8)']|[#0]|[#0]|[#64]|[#2]|[4, '(A6-0xc)']|[@@-4]} WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) <POP 206da-206de StackAdj> Δ+20 {} <MI 206de MOVEA.L (A6-0x8),A1> {} <MI 206e0 MOVE.B (A0+0x3a),(A1+0x3a)> {} <MI 206e6 MOVE.B (A0+0x3b),(A1+0x3b)> {} <MI 206ec MOVE.B (A0+0x3c),(A1+0x3c)> {} <MI 206f2 MOVE.B (A0+0x3d),(A1+0x3d)> {} <MI 206f8 MOVE.B #0x01,(A1+0x4c)> {} <MI 206fc CLR.B -(A7)> Δ-2 {[#0]} <Const 0x206fe 0x2.2> Δ-2 {[#0]|[#2]} <Const 0x20700 0x1.4> Δ-4 {[#0]|[#2]|[##1]} <Pointer.fp 0x20704 <LVAR -0x004 @>> Δ-4 {[#0]|[#2]|[##1]|[@@-4]} <Pointer.fp 0x20708 <LVAR -0x008 @ 4(r)>> Δ-4 {[#0]|[#2]|[##1]|[@@-4]|[@@-8]} <Call 0x2070a 0x1038c> {[#0]|[#2]|[##1]|[@@-4]|[@@-8]} CloseFile(a : L; VAR status : B; VAR file : File) <POP 20710-20712 StackAdj> Δ+16 {} <Pointer.fp 0x20712 <LVAR -0x00c @ 4(rw)>> Δ-4 {[@@-12]} <Call 0x20716 0x102bc> {[@@-12]} FreeString(VAR a : String) <POP 2071c-2071e StackAdj> Δ+4 {} <Pointer.fp 0x2071e <LVAR -0x010 @ 4(rw)>> Δ-4 {[@@-16]} <Call 0x20720 0x102bc> {[@@-16]} FreeString(VAR a : String) <POP 20726-20728 StackAdj> Δ+4 {} <POP 20728-20730 Epilogue> Σ0
@ 20730 <LVAR 0x00c @ 4(r)> <LVAR 0x00a 1(r)> <LVAR 0x008 1(r)> <POP 20730-2081c Body> Δ+32 <POP 20730-20746 Prologue> Σ0 ↓ <POP 20746-2074e RegCacheLoad> Σ0 ↓ <POP 2074e-20756 Naked> Σ0 Δ-2 ↓ <MI 2074e MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']} <MI 20752 MOVE.B (A6+0xa),D7> {[2, '(A6+0x8)']} <POP 20756-2075c Naked> Σ-2 ↓ →0x20806 ←0x207ac <MI 20756 CMP.B (A7),D7> {[-2-]} <MI 20758 BGT 0x20806> {[-2-]} <POP 2075c-20772 Naked> Σ-2 →0x2077c →0x20786 →0x20790 →0x2079a →0x207a4 <MI 2075c MOVE.B D7,D0> {[-2-]} <MI 2075e EXTB.W D0> {[-2-]} <POP 0x20760 LimitCheck 0x0 ≤ D0 ≤ 0x4> {[-2-]} <MI 20768 ADD.W D0,D0> {[-2-]} <MI 2076a SWITCH D0.W> {[-2-]} <POP 2077c-20786 Naked> Σ-2 Δ-8 →0x207ac ←0x2075c <Blob 0x2077c [4] @> Δ-4 {[-2-]|[«4""»]} <Blob 0x20780 [4] @> Δ-4 {[-2-]|[«4""»]|[«4""»]} <MI 20784 BRA 0x207ac> {[-2-]|[«4""»]|[«4""»]} <POP 20786-20790 Naked> Σ-2 Δ-8 →0x207ac ←0x2075c <Blob 0x20786 [4] @> Δ-4 {[-2-]|[«4""»]} <Blob 0x2078a [4] @> Δ-4 {[-2-]|[«4""»]|[«4""»]} <MI 2078e BRA 0x207ac> {[-2-]|[«4""»]|[«4""»]} <POP 20790-2079a Naked> Σ-2 Δ-8 →0x207ac ←0x2075c <Blob 0x20790 [4] @> Δ-4 {[-2-]|[«4""»]} <Blob 0x20794 [4] @> Δ-4 {[-2-]|[«4""»]|[«4""»]} <MI 20798 BRA 0x207ac> {[-2-]|[«4""»]|[«4""»]} <POP 2079a-207a4 Naked> Σ-2 Δ-8 →0x207ac ←0x2075c <Blob 0x2079a [4] @> Δ-4 {[-2-]|[«4""»]} <Blob 0x2079e [4] @> Δ-4 {[-2-]|[«4""»]|[«4""»]} <MI 207a2 BRA 0x207ac> {[-2-]|[«4""»]|[«4""»]} <POP 207a4-207ac Naked> Σ-2 Δ-8 ↓ ←0x2075c <Blob 0x207a4 [4] @> Δ-4 {[-2-]|[«4""»]} <Blob 0x207a8 [4] @> Δ-4 {[-2-]|[«4""»]|[«4""»]} <POP 207ac-20806 Naked> Σ-10 Δ+8 ↓ →0x20756 ←0x2077c ←0x20786 ←0x20790 ←0x2079a <POP 207ac-207ae StackAdj> Δ-4 {[-14-]} <Lit 0x207ae> {[-10-]|[$$…]} <Pointer.sp 0x207ae 4> Δ-4 <Const 0x207b2 0x1.2> Δ-2 <Const 0x207b4 0x8.2> Δ-2 <Call 0x207b8 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 207be-207c0 StackAdj> Δ+8 <MI 207c0 MOVEA.L (A7)+,A4> Δ+4 {[-10-]} <POP 207c2-207c4 StackAdj> Δ+8 {[-2-]} <POP 207c4-207c6 StackAdj> Δ-8 {[-10-]} <MI 207c6 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-10-]|[4, '(A6+0xc)']} <Call 0x207ca 0x102cc> {[-10-]|[4, '(A6+0xc)']} StringDup(a : String) : String <MI 207d0 MOVE.L A4,(A7)> {[-10-]|[4, 'A4']} <Call 0x207d2 0x102d0> {[-10-]|[4, 'A4']} StringCat2(a, b : String) : String <POP 207d8-207da StackAdj> Δ+8 {[-6-]} <MI 207da MOVEA.L (A7)+,A3> Δ+4 {[-2-]} <MI 207dc MOVE.L A3,-(A7)> Δ-4 {[-2-]|[4, 'A3']} <MI 207de MOVE.B D7,D0> {[-2-]|[4, 'A3']} <MI 207e0 EXTB.W D0> {[-2-]|[4, 'A3']} <MI 207e2 ASL.W #0x2,D0> {[-2-]|[4, 'A3']} <MI 207e4 LEA.L 0x21984,A0> {[-2-]|[4, 'A3']} <MI 207e6 PEA.L (A0+D0.W+#0x8)> Δ-4 {[-2-]|[4, 'A3']|[4, '^(A0+D0.W+#0x8)']} <Call 0x207ea 0x10460> {[-2-]|[4, 'A3']|[4, '^(A0+D0.W+#0x8)']} ExpLoad(a : String; b: Pointer) <POP 207f0-207f2 StackAdj> Δ+8 {[-2-]} <MI 207f2 MOVE.B D7,D0> {[-2-]} <MI 207f4 EXTB.W D0> {[-2-]} <MI 207f6 MOVE.W D0,-(A7)> Δ-2 {[-2-]|[2, 'D0']} <MI 207f8 LEA.L 0x21984,A0> {[-2-]|[2, 'D0']} <MI 207fa MOVE.B #0x01,(A0+D0.W+#0x1c)> {[-2-]|[2, 'D0']} <MI 207fe MOVE.W (A7)+,D7> Δ+2 {[-2-]} <MI 20800 ADDQ.W #0x1,D7> {[-2-]} <MI 20802 BVC 0x20756> {[-2-]} <POP 20806-20814 Naked> Σ-2 Δ+2 ↓ ←0x20756 <POP 20806-20808 StackAdj> Δ+2 {} <Pointer.fp 0x20808 <LVAR 0x00c @ 4(r)>> Δ-4 {[@@12]} <Call 0x2080c 0x102bc> {[@@12]} FreeString(VAR a : String) <POP 20812-20814 StackAdj> Δ+4 {} <POP 20814-2081c Epilogue> Σ0
@ 2081c <LVAR 0x008 1(r)> <LVAR -0x004 @ 1(rw)> <LVAR -0x006 @ 1(r)> <LVAR -0x007 @> <POP 2081c-208d4 Body> <POP 2081c-20832 Prologue> Σ0 ↓ <POP 20832-2083c RegCacheLoad> Σ0 ↓ <POP 2083c-20862 Naked> Σ0 ↓ →0x20868 <MI 2083c MOVE.B (A6+0x8),D0> {} <MI 20840 EXTB.W D0> {} <MI 20842 LEA.L 0x2026e,A0> {} <MI 20846 MOVE.B (A0+D0.W),D6> {} <MI 2084a MOVEQ.L #0x01,D7> {} <MI 2084c MOVE.B D6,-(A7)> Δ-2 {[2, 'D6']} <Pointer.fp 0x2084e <LVAR -0x004 @ 1(rw)>> Δ-4 {[2, 'D6']|[@@-4]} <Pointer.fp 0x20850 <LVAR -0x007 @>> Δ-4 {[2, 'D6']|[@@-4]|[@@-7]} <Pointer.fp 0x20854 <LVAR -0x006 @ 1(r)>> Δ-4 {[2, 'D6']|[@@-4]|[@@-7]|[@@-6]} <Call 0x20856 0x10484> {[2, 'D6']|[@@-4]|[@@-7]|[@@-6]} DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) <POP 2085c-2085e StackAdj> Δ+14 {} <MI 2085e TST.B (A6-0x6)> {} <MI 20860 BNE 0x20868> {} <POP 20862-20868 Naked> Σ0 →0x208a6 <MI 20862 MOVE.B #0x04,(A6-0x4)> {} <MI 20866 BRA 0x208a6> {} <POP 20868-20870 Naked> Σ0 ↓ →0x208a6 ←0x2083c ←0x20874 <MI 20868 MOVE.B (A6-0x4),D0> {} <MI 2086a CMPI.B #0x06,D0> {} <MI 2086e BNE 0x208a6> {} <POP 20870-20874 Naked> Σ0 ↓ →0x208a6 <MI 20870 TST.W D7> {} <MI 20872 BEQ 0x208a6> {} <POP 20874-208a6 Naked> Σ0 →0x20868 <MI 20874 CLR.L D0> {} <MI 20876 MOVE.W D7,D0> {} <MI 20878 ADDQ.L #0x1,D0> {} <POP 0x2087a LimitCheck 0x0 ≤ D0 ≤ 0xffff> {} <MI 20884 MOVE.W D0,D7> {} <Const 0x20886 0x27.4> Δ-4 {[##39]} <Call 0x2088a 0x10224> {[##39]} KC12_Sleep(dur: Long) <POP 20890-20892 StackAdj> Δ+2 {[-2-]} <MI 20892 MOVE.B D6,(A7)> {[-2-]} <Pointer.fp 0x20894 <LVAR -0x004 @ 1(rw)>> Δ-4 {[-2-]|[@@-4]} <Pointer.fp 0x20896 <LVAR -0x007 @>> Δ-4 {[-2-]|[@@-4]|[@@-7]} <Pointer.fp 0x2089a <LVAR -0x006 @ 1(r)>> Δ-4 {[-2-]|[@@-4]|[@@-7]|[@@-6]} <Call 0x2089c 0x10484> {[-2-]|[@@-4]|[@@-7]|[@@-6]} DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) <POP 208a2-208a4 StackAdj> Δ+14 {} <MI 208a4 BRA 0x20868> {} <POP 208a6-208ae Naked> Σ0 ↓ →0x208cc ←0x20862 ←0x20868 ←0x20870 <MI 208a6 MOVE.B (A6-0x4),D0> {} <MI 208a8 CMPI.B #0x01,D0> {} <MI 208ac BEQ 0x208cc> {} <POP 208ae-208cc Naked> Σ0 ↓ <MI 208ae MOVE.B D6,-(A7)> Δ-2 {[2, 'D6']} <MI 208b0 MOVE.B (A6+0x8),D1> {[2, 'D6']} <MI 208b4 EXTB.W D1> {[2, 'D6']} <MI 208b6 ASL.W #0x2,D1> {[2, 'D6']} <MI 208b8 LEA.L 0x21984,A0> {[2, 'D6']} <MI 208be MOVE.L (A0+D1.W+#0x8),-(A7)> Δ-4 {[2, 'D6']|[4, '(A0+D1.W+#0x8)']} <MI 208c2 MOVE.B D0,-(A7)> Δ-2 {[2, 'D6']|[4, '(A0+D1.W+#0x8)']|[2, 'D0']} <Call 0x208c4 0x21848> {[2, 'D6']|[4, '(A0+D1.W+#0x8)']|[2, 'D0']} EXP_FAIL <POP 208ca-208cc StackAdj> Δ+8 {} <POP 208cc-208d4 Epilogue> Σ0 ←0x208a6
@ 208d4 <LVAR 0x008 1(r)> <LVAR -0x006 4(rw)> <POP 208d4-20970 Body> <POP 208d4-208ea Prologue> Σ0 ↓ <POP 208ea-208f4 RegCacheLoad> Σ0 ↓ <POP 208f4-20928 Naked> Σ0 Δ-4 ↓ →0x20966 <MI 208f4 MOVE.B (A6+0x8),D0> {} <MI 208f8 EXTB.W D0> {} <MI 208fa MOVE.W D0,D1> {} <MI 208fc ASL.W #0x2,D1> {} <MI 208fe LEA.L 0x21984,A0> {} <MI 20900 LEA.L 0x2026e,A1> {} <MI 20904 MOVE.B (A1+D0.W),-(A7)> Δ-2 {[2, '(A1+D0.W)']} <MI 20908 MOVE.L (A0+D1.W+#0x8),-(A7)> Δ-4 {[2, '(A1+D0.W)']|[4, '(A0+D1.W+#0x8)']} <Call 0x2090c 0x1047e> {[2, '(A1+D0.W)']|[4, '(A0+D1.W+#0x8)']} ExpXmit(adr : Byte; b : Pointer) <POP 20912-20914 StackAdj> Δ+6 {} <MI 20914 MOVEA.L (A0+D1.W+#0x8),A0> {} <MI 20918 MOVE.L A0,-(A7)> Δ-4 {[4, 'A0']} <MI 2091a MOVE.L (A0+0xf8),(A0+0xf4)> {[4, 'A0']} <MI 20920 LEA.L 0x21984,A1> {[4, 'A0']} <MI 20922 TST.B (A1+D0.W+#0x1c)> {[4, 'A0']} <MI 20926 BEQ 0x20966> {[4, 'A0']} <POP 20928-2092c Naked> Σ-4 ↓ <MI 20928 MOVE.L (A0+0xf8),(A6-0x6)> {[-4-]} <POP 2092c-20938 Naked> Σ-4 ↓ →0x2093c ←0x20938 <MI 2092c MOVEA.L (A6-0x6),A0> {[-4-]} <MI 2092e MOVEA.L (A0+0x2),A1> {[-4-]} <MI 20932 CMPA.W #0x1,A1> {[-4-]} <MI 20936 BEQ 0x2093c> {[-4-]} <POP 20938-2093c Naked> Σ-4 →0x2092c <MI 20938 MOVE.L A1,(A6-0x6)> {[-4-]} <MI 2093a BRA 0x2092c> {[-4-]} <POP 2093c-20966 Naked> Σ-4 ↓ ←0x2092c <MI 2093c MOVEA.L (A7),A1> {[-4-]} <MI 2093e CLR.L D0> {[-4-]} <MI 20940 MOVE.B (A0+0x1),D0> {[-4-]} <MI 20944 CLR.L D1> {[-4-]} <MI 20946 MOVE.B (A0),D1> {[-4-]} <MI 20948 LSL.B #0x2,D1> {[-4-]} <MI 2094a LSR.B #0x2,D1> {[-4-]} <MI 2094c ADD.W D0,D1> {[-4-]} <MI 2094e SUBI.W #0x0010,D1> {[-4-]} <POP 0x20952 LimitCheck 0x0 ≤ D1 ≤ 0xff> {[-4-]} <MI 20956 MOVE.B D1,(A1+0x2)> {[-4-]} <MI 2095a MOVE.B (A6+0x8),D0> {[-4-]} <MI 2095e EXTB.W D0> {[-4-]} <MI 20960 LEA.L 0x21984,A0> {[-4-]} <MI 20962 CLR.B (A0+D0.W+#0x1c)> {[-4-]} <POP 20966-20968 Naked> Σ-4 Δ+4 ↓ ←0x208f4 <POP 20966-20968 StackAdj> Δ+4 {} <POP 20968-20970 Epilogue> Σ0
@ 20970 <LVAR 0x00a 1(r)> <LVAR 0x008 1(r)> <POP 20970-209c0 Body> <POP 20970-20986 Prologue> Σ0 ↓ <POP 20986-2098e Naked> Σ0 Δ-2 ↓ <MI 20986 MOVE.B (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']} <MI 2098a MOVE.B (A6+0xa),D7> {[2, '(A6+0x8)']} <POP 2098e-20992 Naked> Σ-2 ↓ →0x209b6 ←0x20992 <MI 2098e CMP.B (A7),D7> {[-2-]} <MI 20990 BGT 0x209b6> {[-2-]} <POP 20992-209b6 Naked> Σ-2 ↓ →0x2098e <MI 20992 MOVE.B D7,-(A7)> Δ-2 {[-2-]|[2, 'D7']} <Call 0x20994 0x2081c> {[-2-]|[2, 'D7']} <POP 20998-2099a StackAdj> Δ+2 {[-2-]} <MI 2099a MOVE.B D7,D0> {[-2-]} <MI 2099c EXTB.W D0> {[-2-]} <MI 2099e ASL.W #0x2,D0> {[-2-]} <MI 209a0 LEA.L 0x21984,A0> {[-2-]} <MI 209a6 PEA.L (A0+D0.W+#0x8)> Δ-4 {[-2-]|[4, '^(A0+D0.W+#0x8)']} <Call 0x209aa 0x10496> {[-2-]|[4, '^(A0+D0.W+#0x8)']} ExpClose(exp : Pointer) <POP 209b0-209b2 StackAdj> Δ+4 {[-2-]} <MI 209b2 ADDQ.B #0x1,D7> {[-2-]} <MI 209b4 BVC 0x2098e> {[-2-]} <POP 209b6-209b8 Naked> Σ-2 Δ+2 ↓ ←0x2098e <POP 209b6-209b8 StackAdj> Δ+2 {} <POP 209b8-209c0 Epilogue> Σ0
@ 209c0 <LVAR 0x00a 4(r)> <LVAR 0x008 2(r)> <LVAR -0x004 4(rw)> <LVAR -0x008 4(rw)> <LVAR -0xc08 @> <LVAR -0xc0e @> <LVAR -0xc16 4(rw)> <LVAR -0xc22 @> <POP 209c0-20c16 Body> Δ-4 <POP 209c0-209d6 Prologue> Σ0 ↓ <POP 209d6-209e0 RegCacheLoad> Σ0 ↓ <POP 209e0-20a32 Naked> Σ0 ↓ <MI 209e0 MOVE.L #0x10,(A6-0x8)> {} <MI 209e6 MOVE.L #0x7,(A6-0x4)> {} <MI 209ee MOVE.W (A6+0x8),D0> {} <MI 209f2 EXTW.L D0> {} <MI 209f4 MOVE.L D0,(A6-0xc16)> {} <Call 0x209f8 0x216c2> {} exp_PREP_LOAD_REGISTER_FILE.TYP() <Call 0x209fe 0x2170e> {} exp_PREP_LOAD_REGISTER_FILE.VAL() <Blob 0x20a04 [18] @> Δ-18 {[«18""»]} <POP 20a10-20a12 StackAdj> Δ-4 {[«18""»]|[-4-]} <Lit 0x20a12 18> {[«18""»]|[$$LOAD_REGISTER_FILE]} <POP 20a22-20a24 StackAdj> Δ-2 {[«18""»]|[$$LOAD_REGISTER_FILE]|[-2-]} <MI 20a24 CLR.B (A7)> {[«18""»]|[$$LOAD_REGISTER_FILE]|[-2-]} <Const 0x20a26 0x1.2> Δ-2 {[«18""»]|[$$LOAD_REGISTER_FILE]|[-2-]|[#1]} <Call 0x20a28 0x20730> {[«18""»]|[$$LOAD_REGISTER_FILE]|[-2-]|[#1]} <POP 20a2c-20a30 StackAdj> Δ+26 {} <MI 20a30 MOVEQ.L #0x00,D0> {} <POP 20a32-20a3a Naked> Σ0 Δ-4 ↓ →0x20a5a ←0x20bfc <MI 20a32 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']} <MI 20a34 BTST.L #0x0,D0> {[4, 'D0']} <MI 20a38 BEQ 0x20a5a> {[4, 'D0']} <POP 20a3a-20a5a Naked> Σ-4 ↓ <Blob 0x20a3a [2] @> Δ-2 {[-4-]|[«2""»]} <POP 20a3e-20a40 StackAdj> Δ-4 {[-4-]|[«2""»]|[-4-]} <Lit 0x20a40 2> {[-4-]|[«2""»]|[$$. ]} <Call 0x20a52 0x103d8> {[-4-]|[«2""»]|[$$. ]} WriteConsoleString(str : String) <POP 20a58-20a5a StackAdj> Δ+6 {[-4-]} <POP 20a5a-20a62 Naked> Σ-4 Δ-4 ↓ ←0x20a32 <MI 20a5a MOVEQ.L #0x00,D5> {[-4-]} <MI 20a5c MOVE.L (A6-0x4),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x4)']} <MI 20a60 MOVEQ.L #0x00,D1> {[-4-]|[4, '(A6-0x4)']} <POP 20a62-20a66 Naked> Σ-8 ↓ →0x20a6c ←0x20be8 <MI 20a62 CMP.L (A7),D1> {[-8-]} <MI 20a64 BLE 0x20a6c> {[-8-]} <POP 20a66-20a6c Naked> Σ-8 Δ-4 →0x20bee <POP 20a66-20a68 StackAdj> Δ-4 {[-12-]} <MI 20a68 BRA 0x20bee> {[-12-]} <POP 20a6c-20a76 Naked> Σ-8 Δ-4 ↓ →0x20ab8 ←0x20a62 <MI 20a6c MOVE.L D1,-(A7)> Δ-4 {[-8-]|[4, 'D1']} <MI 20a6e CMPI.L #0x00000002,D1> {[-8-]|[4, 'D1']} <MI 20a74 BGT 0x20ab8> {[-8-]|[4, 'D1']} <POP 20a76-20ab8 Naked> Σ-12 ↓ <MI 20a76 LEA.L (A6-0xc08),A0> {[-12-]} <MI 20a7a MOVE.L A0,-(A7)> Δ-4 {[-12-]|[4, 'A0']} <MI 20a7c MOVE.L (A7)+,D6> Δ+4 {[-12-]} <MI 20a7e MOVE.L D1,D0> {[-12-]} <MI 20a80 ASL.L #0x8,D0> {[-12-]} <MI 20a82 ASL.L #0x2,D0> {[-12-]} <MI 20a84 ADD.L D0,D6> {[-12-]} <MI 20a86 MOVE.L (A6+0xa),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xa)']} <MI 20a8a MOVE.L (A6-0xc16),D0> {[-12-]|[4, '(A6+0xa)']} <POP 0x20a8e LimitCheck 0x0 ≤ D0 ≤ 0x4000> {[-12-]|[4, '(A6+0xa)']} <MI 20a98 MOVE.W D0,-(A7)> Δ-2 {[-12-]|[4, '(A6+0xa)']|[2, 'D0']} <MI 20a9a CLR.W -(A7)> Δ-2 {[-12-]|[4, '(A6+0xa)']|[2, 'D0']|[#0]} <Const 0x20a9c 0x200.2> Δ-2 {[-12-]|[4, '(A6+0xa)']|[2, 'D0']|[#0]|[#512]} <Const 0x20aa0 0x2.2> Δ-2 {[-12-]|[4, '(A6+0xa)']|[2, 'D0']|[#0]|[#512]|[#2]} <MI 20aa4 MOVE.L D6,-(A7)> Δ-4 {[-12-]|[4, '(A6+0xa)']|[2, 'D0']|[#0]|[#512]|[#2]|[4, 'D6']} <Pointer.fp 0x20aa6 <LVAR -0xc0e @>> Δ-4 {[-12-]|[4, '(A6+0xa)']|[2, 'D0']|[#0]|[#512]|[#2]|[4, 'D6']|[@@-3086]} <Call 0x20aaa 0x10384> {[-12-]|[4, '(A6+0xa)']|[2, 'D0']|[#0]|[#512]|[#2]|[4, 'D6']|[@@-3086]} ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) <POP 20ab0-20ab4 StackAdj> Δ+20 {[-12-]} <MI 20ab4 ADDQ.L #0x1,(A6-0xc16)> {[-12-]} <POP 20ab8-20abe Naked> Σ-12 Δ-4 ↓ ←0x20a6c <MI 20ab8 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6-0x8)']} <MI 20aba SUBQ.L #0x1,(A7)> {[-16-]} <MI 20abc MOVEQ.L #0x00,D7> {[-16-]} <POP 20abe-20ac2 Naked> Σ-16 ↓ →0x20b3c ←0x20ac2 <MI 20abe CMP.L (A7),D7> {[-16-]} <MI 20ac0 BGT 0x20b3c> {[-16-]} <POP 20ac2-20b3c Naked> Σ-16 ↓ →0x20abe <MI 20ac2 MOVE.L D5,D0> {[-16-]} <MI 20ac4 ADD.L D7,D0> {[-16-]} <POP 0x20ac6 LimitCheck 0x0 ≤ D0 ≤ 0x7f> {[-16-]} <MI 20ad0 MOVE.L D0,D4> {[-16-]} <MI 20ad2 MOVEQ.L #0x18,D3> {[-16-]} <Call 0x20ad4 0x1028c> {[-16-]} ?muls_d3_d4 <MI 20ada LEA.L (A6-0xc22),A0> {[-16-]} <Blob 0x20ade [8] (A0+D4.L+#0x1a)> Δ-8 {[-16-]|[«8»]} <Blob 0x20aee [4] 0x2198c> Δ-4 {[-16-]|[«8»]|[«4»]} <Pointer.sp 0x20af4 4> Δ-4 {[-16-]|[«8»]|[«4»]|[^^4]} <Const 0x20af8 0x0.4> Δ-4 {[-16-]|[«8»]|[«4»]|[^^4]|[##0]} <Const 0x20afa 0x7.4> Δ-4 {[-16-]|[«8»]|[«4»]|[^^4]|[##0]|[##7]} <Call 0x20afe 0x10466> {[-16-]|[«8»]|[«4»]|[^^4]|[##0]|[##7]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 20b04-20b08 StackAdj> Δ+20 {[-16-]|[-4-]} <MI 20b08 MOVE.B (A0+D4.L+#0x22),(A7)> {[-16-]|[-4-]} <MI 20b0c MOVE.B (A0+D4.L+#0x23),(A7+0x1)> {[-16-]|[-4-]} <MI 20b12 MOVE.B (A0+D4.L+#0x24),(A7+0x2)> {[-16-]|[-4-]} <MI 20b18 MOVE.B (A0+D4.L+#0x25),(A7+0x3)> {[-16-]|[-4-]} <Blob 0x20b1e [4] 0x2198c> Δ-4 {[-16-]|[-4-]|[«4»]} <Pointer.sp 0x20b24 4> Δ-4 {[-16-]|[-4-]|[«4»]|[^^4]} <Const 0x20b28 0x0.4> Δ-4 {[-16-]|[-4-]|[«4»]|[^^4]|[##0]} <Const 0x20b2a 0x3.4> Δ-4 {[-16-]|[-4-]|[«4»]|[^^4]|[##0]|[##3]} <Call 0x20b2e 0x10466> {[-16-]|[-4-]|[«4»]|[^^4]|[##0]|[##3]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 20b34-20b38 StackAdj> Δ+20 {[-16-]} <MI 20b38 ADDQ.L #0x1,D7> {[-16-]} <MI 20b3a BVC 0x20abe> {[-16-]} <POP 20b3c-20b52 Naked> Σ-16 ↓ ←0x20abe <POP 20b3c-20b3e StackAdj> Δ+2 {[-14-]} <MI 20b3e CLR.B (A7)> {[-14-]} <Call 0x20b40 0x2081c> {[-14-]} <MI 20b44 CLR.B (A7)> {[-14-]} <Call 0x20b46 0x208d4> {[-14-]} <POP 20b4a-20b4c StackAdj> Δ+2 {[-12-]} <MI 20b4c MOVE.L (A6-0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6-0x8)']} <MI 20b4e SUBQ.L #0x1,(A7)> {[-16-]} <MI 20b50 MOVEQ.L #0x00,D7> {[-16-]} <POP 20b52-20b56 Naked> Σ-16 ↓ →0x20bd0 ←0x20b56 <MI 20b52 CMP.L (A7),D7> {[-16-]} <MI 20b54 BGT 0x20bd0> {[-16-]} <POP 20b56-20bd0 Naked> Σ-16 ↓ →0x20b52 <MI 20b56 MOVE.L D5,D0> {[-16-]} <MI 20b58 ADD.L D7,D0> {[-16-]} <POP 0x20b5a LimitCheck 0x0 ≤ D0 ≤ 0x7f> {[-16-]} <MI 20b64 MOVE.L D0,D4> {[-16-]} <MI 20b66 MOVEQ.L #0x18,D3> {[-16-]} <Call 0x20b68 0x1028c> {[-16-]} ?muls_d3_d4 <MI 20b6e LEA.L (A6-0xc22),A0> {[-16-]} <Blob 0x20b72 [8] (A0+D4.L+#0x2a)> Δ-8 {[-16-]|[«8»]} <Blob 0x20b82 [4] 0x21990> Δ-4 {[-16-]|[«8»]|[«4»]} <Pointer.sp 0x20b88 4> Δ-4 {[-16-]|[«8»]|[«4»]|[^^4]} <Const 0x20b8c 0x0.4> Δ-4 {[-16-]|[«8»]|[«4»]|[^^4]|[##0]} <Const 0x20b8e 0x7.4> Δ-4 {[-16-]|[«8»]|[«4»]|[^^4]|[##0]|[##7]} <Call 0x20b92 0x10466> {[-16-]|[«8»]|[«4»]|[^^4]|[##0]|[##7]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 20b98-20b9c StackAdj> Δ+20 {[-16-]|[-4-]} <MI 20b9c MOVE.B (A0+D4.L+#0x26),(A7)> {[-16-]|[-4-]} <MI 20ba0 MOVE.B (A0+D4.L+#0x27),(A7+0x1)> {[-16-]|[-4-]} <MI 20ba6 MOVE.B (A0+D4.L+#0x28),(A7+0x2)> {[-16-]|[-4-]} <MI 20bac MOVE.B (A0+D4.L+#0x29),(A7+0x3)> {[-16-]|[-4-]} <Blob 0x20bb2 [4] 0x21990> Δ-4 {[-16-]|[-4-]|[«4»]} <Pointer.sp 0x20bb8 4> Δ-4 {[-16-]|[-4-]|[«4»]|[^^4]} <Const 0x20bbc 0x0.4> Δ-4 {[-16-]|[-4-]|[«4»]|[^^4]|[##0]} <Const 0x20bbe 0x3.4> Δ-4 {[-16-]|[-4-]|[«4»]|[^^4]|[##0]|[##3]} <Call 0x20bc2 0x10466> {[-16-]|[-4-]|[«4»]|[^^4]|[##0]|[##3]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 20bc8-20bcc StackAdj> Δ+20 {[-16-]} <MI 20bcc ADDQ.L #0x1,D7> {[-16-]} <MI 20bce BVC 0x20b52> {[-16-]} <POP 20bd0-20be8 Naked> Σ-16 Δ+4 ↓ →0x20bee ←0x20b52 <POP 20bd0-20bd2 StackAdj> Δ+2 {[-14-]} <POP 20bd2-20bd3 StackAdj> Δ+2 {[-12-]} <Const 0x20bd3 0x1.2> Δ-2 {[-12-]|[#1]} <Call 0x20bd4 0x2081c> {[-12-]|[#1]} <POP 20bd8-20bd9 StackAdj> Δ+2 {[-12-]} <Const 0x20bd9 0x1.2> Δ-2 {[-12-]|[#1]} <Call 0x20bda 0x208d4> {[-12-]|[#1]} <POP 20bde-20be0 StackAdj> Δ+2 {[-12-]} <MI 20be0 ADD.L (A6-0x8),D5> {[-12-]} <MI 20be2 MOVE.L (A7),D1> {[-12-]} <MI 20be4 ADDQ.L #0x1,D1> {[-12-]} <MI 20be6 BVS 0x20bee> {[-12-]} <POP 20be8-20bee Naked> Σ-12 Δ+4 →0x20a62 <POP 20be8-20bea StackAdj> Δ+4 {[-8-]} <MI 20bea BRA 0x20a62> {[-8-]} <POP 20bee-20bfc Naked> Σ-12 Δ+8 ↓ →0x20c02 ←0x20a66 ←0x20bd0 <POP 20bee-20bf0 StackAdj> Δ+8 {[-4-]} <MI 20bf0 MOVE.L (A7),D0> {[-4-]} <MI 20bf2 ADDQ.L #0x1,D0> {[-4-]} <MI 20bf4 CMPI.L #0x00000007,D0> {[-4-]} <MI 20bfa BGT 0x20c02> {[-4-]} <POP 20bfc-20c02 Naked> Σ-4 Δ+4 →0x20a32 <POP 20bfc-20bfe StackAdj> Δ+4 {} <MI 20bfe BRA 0x20a32> {} <POP 20c02-20c0e Naked> Σ-4 Δ+4 ↓ ←0x20bee <POP 20c02-20c04 StackAdj> Δ+2 {[-2-]} <MI 20c04 CLR.B (A7)> {[-2-]} <Const 0x20c06 0x1.2> Δ-2 {[-2-]|[#1]} <Call 0x20c08 0x20970> {[-2-]|[#1]} <POP 20c0c-20c0e StackAdj> Δ+4 {} <POP 20c0e-20c16 Epilogue> Σ0
@ 20c16 <LVAR 0x00c 4(r)> <LVAR 0x00a 2(r)> <LVAR 0x008 2(r)> <LVAR -0x006 4(rw)> <LVAR -0x00a 4(rw)> <LVAR -0x00e 4(rw)> <LVAR -0x80e @> <LVAR -0x140e @> <LVAR -0x1414 @> <LVAR -0x1415 1(w)> <LVAR -0x1416 1(w) 2(r)> <LVAR -0x141c 1(rw)> <LVAR -0x1420 4(rw)> <LVAR -0x1424 4(rw)> <LVAR -0x1428 4(rw)> <LVAR -0x142c 4(rw)> <LVAR -0x1438 @> <POP 20c16-210c6 Body> Δ-4 <POP 20c16-20c2c Prologue> Σ0 ↓ <POP 20c2c-20c36 RegCacheLoad> Σ0 ↓ <POP 20c36-20cd6 Naked> Σ0 ↓ <MI 20c36 MOVE.L #0x10,(A6-0xe)> {} <MI 20c3e MOVE.L #0x10,(A6-0xa)> {} <MI 20c44 MOVE.L #0x8,(A6-0x6)> {} <Call 0x20c4c 0x216c2> {} exp_PREP_LOAD_REGISTER_FILE.TYP() <Call 0x20c52 0x2170e> {} exp_PREP_LOAD_REGISTER_FILE.VAL() <Call 0x20c58 0x2167c> {} exp_PREP_LOAD_DISPATCH_RAMS.SEQ() <Blob 0x20c5e [18] @> Δ-18 {[«18""»]} <POP 20c6a-20c6c StackAdj> Δ-4 {[«18""»]|[-4-]} <Lit 0x20c6c 18> {[«18""»]|[$$LOAD_REGISTER_FILE]} <POP 20c7c-20c7e StackAdj> Δ-2 {[«18""»]|[$$LOAD_REGISTER_FILE]|[-2-]} <MI 20c7e CLR.B (A7)> {[«18""»]|[$$LOAD_REGISTER_FILE]|[-2-]} <Const 0x20c80 0x1.2> Δ-2 {[«18""»]|[$$LOAD_REGISTER_FILE]|[-2-]|[#1]} <Call 0x20c82 0x20730> {[«18""»]|[$$LOAD_REGISTER_FILE]|[-2-]|[#1]} <POP 20c86-20c8a StackAdj> Δ+26 {} <Blob 0x20c8a [18] @> Δ-18 {[«18""»]} <POP 20c96-20c98 StackAdj> Δ-4 {[«18""»]|[-4-]} <Lit 0x20c98 18> {[«18""»]|[$$LOAD_DISPATCH_RAMS]} <POP 20ca8-20caa StackAdj> Δ-2 {[«18""»]|[$$LOAD_DISPATCH_RAMS]|[-2-]} <POP 20caa-20cab StackAdj> Δ+2 {[«18""»]|[$$LOAD_DISPATCH_RAMS]} <Const 0x20cab 0x3.2> Δ-2 {[«18""»]|[$$LOAD_DISPATCH_RAMS]|[#3]} <Const 0x20cae 0x3.2> Δ-2 {[«18""»]|[$$LOAD_DISPATCH_RAMS]|[#3]|[#3]} <Call 0x20cb2 0x20730> {[«18""»]|[$$LOAD_DISPATCH_RAMS]|[#3]|[#3]} <POP 20cb6-20cba StackAdj> Δ+26 {} <MI 20cba MOVE.B #0x01,(A6-0x141c)> {} <MI 20cbe MOVEQ.L #0x00,D6> {} <MI 20cc0 MOVE.W (A6+0xa),D0> {} <MI 20cc4 EXTW.L D0> {} <MI 20cc6 MOVE.L D0,(A6-0x142c)> {} <MI 20cca MOVE.W (A6+0x8),D0> {} <MI 20cce EXTW.L D0> {} <MI 20cd0 MOVE.L D0,(A6-0x1428)> {} <MI 20cd4 MOVEQ.L #0x00,D0> {} <POP 20cd6-20cde Naked> Σ0 Δ-4 ↓ →0x20cfe ←0x2109e <MI 20cd6 MOVE.L D0,-(A7)> Δ-4 {[4, 'D0']} <MI 20cd8 BTST.L #0x0,D0> {[4, 'D0']} <MI 20cdc BEQ 0x20cfe> {[4, 'D0']} <POP 20cde-20cfe Naked> Σ-4 ↓ <Blob 0x20cde [2] @> Δ-2 {[-4-]|[«2""»]} <POP 20ce2-20ce4 StackAdj> Δ-4 {[-4-]|[«2""»]|[-4-]} <Lit 0x20ce4 2> {[-4-]|[«2""»]|[$$. ]} <Call 0x20cf6 0x103d8> {[-4-]|[«2""»]|[$$. ]} WriteConsoleString(str : String) <POP 20cfc-20cfe StackAdj> Δ+6 {[-4-]} <POP 20cfe-20d06 Naked> Σ-4 ↓ →0x20d0c ←0x20cd6 <MI 20cfe CMPI.L #0x00000004,D0> {[-4-]} <MI 20d04 BNE 0x20d0c> {[-4-]} <POP 20d06-20d0c Naked> Σ-4 ↓ <MI 20d06 CLR.B (A6-0x141c)> {[-4-]} <MI 20d0a MOVEQ.L #0x00,D6> {[-4-]} <POP 20d0c-20d1a Naked> Σ-4 Δ-4 ↓ ←0x20cfe <MI 20d0c CLR.L (A6-0x1424)> {[-4-]} <MI 20d10 CLR.L (A6-0x1420)> {[-4-]} <MI 20d12 MOVE.L (A6-0x6),-(A7)> Δ-4 {[-4-]|[4, '(A6-0x6)']} <MI 20d16 SUBQ.L #0x1,(A7)> {[-8-]} <MI 20d18 MOVEQ.L #0x00,D1> {[-8-]} <POP 20d1a-20d1e Naked> Σ-8 ↓ →0x20d24 ←0x2108a <MI 20d1a CMP.L (A7),D1> {[-8-]} <MI 20d1c BLE 0x20d24> {[-8-]} <POP 20d1e-20d24 Naked> Σ-8 Δ-4 →0x21090 <POP 20d1e-20d20 StackAdj> Δ-4 {[-12-]} <MI 20d20 BRA 0x21090> {[-12-]} <POP 20d24-20d2e Naked> Σ-8 Δ-4 ↓ →0x20d70 ←0x20d1a <MI 20d24 MOVE.L D1,-(A7)> Δ-4 {[-8-]|[4, 'D1']} <MI 20d26 CMPI.L #0x00000002,D1> {[-8-]|[4, 'D1']} <MI 20d2c BGT 0x20d70> {[-8-]|[4, 'D1']} <POP 20d2e-20d70 Naked> Σ-12 ↓ <MI 20d2e LEA.L (A6-0x140e),A0> {[-12-]} <MI 20d32 MOVE.L A0,-(A7)> Δ-4 {[-12-]|[4, 'A0']} <MI 20d34 MOVE.L (A7)+,D5> Δ+4 {[-12-]} <MI 20d36 MOVE.L D1,D0> {[-12-]} <MI 20d38 ASL.L #0x8,D0> {[-12-]} <MI 20d3a ASL.L #0x2,D0> {[-12-]} <MI 20d3c ADD.L D0,D5> {[-12-]} <MI 20d3e MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']} <MI 20d42 MOVE.L (A6-0x142c),D0> {[-12-]|[4, '(A6+0xc)']} <POP 0x20d46 LimitCheck 0x0 ≤ D0 ≤ 0x4000> {[-12-]|[4, '(A6+0xc)']} <MI 20d50 MOVE.W D0,-(A7)> Δ-2 {[-12-]|[4, '(A6+0xc)']|[2, 'D0']} <MI 20d52 CLR.W -(A7)> Δ-2 {[-12-]|[4, '(A6+0xc)']|[2, 'D0']|[#0]} <Const 0x20d54 0x200.2> Δ-2 {[-12-]|[4, '(A6+0xc)']|[2, 'D0']|[#0]|[#512]} <Const 0x20d58 0x2.2> Δ-2 {[-12-]|[4, '(A6+0xc)']|[2, 'D0']|[#0]|[#512]|[#2]} <MI 20d5c MOVE.L D5,-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']|[2, 'D0']|[#0]|[#512]|[#2]|[4, 'D5']} <Pointer.fp 0x20d5e <LVAR -0x1414 @>> Δ-4 {[-12-]|[4, '(A6+0xc)']|[2, 'D0']|[#0]|[#512]|[#2]|[4, 'D5']|[@@-5140]} <Call 0x20d62 0x10384> {[-12-]|[4, '(A6+0xc)']|[2, 'D0']|[#0]|[#512]|[#2]|[4, 'D5']|[@@-5140]} ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) <POP 20d68-20d6c StackAdj> Δ+20 {[-12-]} <MI 20d6c ADDQ.L #0x1,(A6-0x142c)> {[-12-]} <POP 20d70-20d78 Naked> Σ-12 Δ-4 ↓ ←0x20d24 <MI 20d70 MOVE.L (A6-0xe),-(A7)> Δ-4 {[-12-]|[4, '(A6-0xe)']} <MI 20d74 SUBQ.L #0x1,(A7)> {[-16-]} <MI 20d76 MOVEQ.L #0x00,D7> {[-16-]} <POP 20d78-20d7e Naked> Σ-16 ↓ →0x20e00 ←0x20d7e <MI 20d78 CMP.L (A7),D7> {[-16-]} <MI 20d7a BGT 0x20e00> {[-16-]} <POP 20d7e-20e00 Naked> Σ-16 ↓ →0x20d78 <MI 20d7e MOVE.L (A6-0x1424),D0> {[-16-]} <MI 20d82 ADD.L D7,D0> {[-16-]} <POP 0x20d84 LimitCheck 0x0 ≤ D0 ≤ 0x7f> {[-16-]} <MI 20d8e MOVE.L D0,D4> {[-16-]} <MI 20d90 MOVEQ.L #0x18,D3> {[-16-]} <Call 0x20d92 0x1028c> {[-16-]} ?muls_d3_d4 <MI 20d98 LEA.L (A6-0x1438),A0> {[-16-]} <Blob 0x20d9c [8] (A0+D4.L+#0x2a)> Δ-8 {[-16-]|[«8»]} <Blob 0x20dac [4] 0x2198c> Δ-4 {[-16-]|[«8»]|[«4»]} <Pointer.sp 0x20db2 4> Δ-4 {[-16-]|[«8»]|[«4»]|[^^4]} <Const 0x20db6 0x0.4> Δ-4 {[-16-]|[«8»]|[«4»]|[^^4]|[##0]} <Const 0x20dba 0x7.4> Δ-4 {[-16-]|[«8»]|[«4»]|[^^4]|[##0]|[##7]} <Call 0x20dbe 0x10466> {[-16-]|[«8»]|[«4»]|[^^4]|[##0]|[##7]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 20dc4-20dc8 StackAdj> Δ+20 {[-16-]|[-4-]} <MI 20dc8 MOVE.B (A0+D4.L+#0x32),(A7)> {[-16-]|[-4-]} <MI 20dcc MOVE.B (A0+D4.L+#0x33),(A7+0x1)> {[-16-]|[-4-]} <MI 20dd2 MOVE.B (A0+D4.L+#0x34),(A7+0x2)> {[-16-]|[-4-]} <MI 20dd8 MOVE.B (A0+D4.L+#0x35),(A7+0x3)> {[-16-]|[-4-]} <Blob 0x20dde [4] 0x2198c> Δ-4 {[-16-]|[-4-]|[«4»]} <Pointer.sp 0x20de4 4> Δ-4 {[-16-]|[-4-]|[«4»]|[^^4]} <Const 0x20de8 0x0.4> Δ-4 {[-16-]|[-4-]|[«4»]|[^^4]|[##0]} <Const 0x20dec 0x3.4> Δ-4 {[-16-]|[-4-]|[«4»]|[^^4]|[##0]|[##3]} <Call 0x20df0 0x10466> {[-16-]|[-4-]|[«4»]|[^^4]|[##0]|[##3]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 20df6-20dfa StackAdj> Δ+20 {[-16-]} <MI 20dfa ADDQ.L #0x1,D7> {[-16-]} <MI 20dfc BVC 0x20d78> {[-16-]} <POP 20e00-20e10 Naked> Σ-16 Δ+4 ↓ →0x20e52 ←0x20d78 <POP 20e00-20e02 StackAdj> Δ+2 {[-14-]} <MI 20e02 CLR.B (A7)> {[-14-]} <Call 0x20e04 0x208d4> {[-14-]} <POP 20e08-20e0a StackAdj> Δ+2 {[-12-]} <MI 20e0a MOVE.L (A7),D0> {[-12-]} <MI 20e0c CMP.L #0x01,D0> {[-12-]} <MI 20e0e BGT 0x20e52> {[-12-]} <POP 20e10-20e52 Naked> Σ-12 ↓ <MI 20e10 LEA.L (A6-0x80e),A0> {[-12-]} <MI 20e14 MOVE.L A0,-(A7)> Δ-4 {[-12-]|[4, 'A0']} <MI 20e16 MOVE.L (A7)+,D5> Δ+4 {[-12-]} <MI 20e18 MOVE.L D0,D1> {[-12-]} <MI 20e1a ASL.L #0x8,D1> {[-12-]} <MI 20e1c ASL.L #0x2,D1> {[-12-]} <MI 20e1e ADD.L D1,D5> {[-12-]} <MI 20e20 MOVE.L (A6+0xc),-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']} <MI 20e24 MOVE.L (A6-0x1428),D1> {[-12-]|[4, '(A6+0xc)']} <POP 0x20e28 LimitCheck 0x0 ≤ D1 ≤ 0x4000> {[-12-]|[4, '(A6+0xc)']} <MI 20e32 MOVE.W D1,-(A7)> Δ-2 {[-12-]|[4, '(A6+0xc)']|[2, 'D1']} <MI 20e34 CLR.W -(A7)> Δ-2 {[-12-]|[4, '(A6+0xc)']|[2, 'D1']|[#0]} <Const 0x20e36 0x200.2> Δ-2 {[-12-]|[4, '(A6+0xc)']|[2, 'D1']|[#0]|[#512]} <Const 0x20e3a 0x2.2> Δ-2 {[-12-]|[4, '(A6+0xc)']|[2, 'D1']|[#0]|[#512]|[#2]} <MI 20e3e MOVE.L D5,-(A7)> Δ-4 {[-12-]|[4, '(A6+0xc)']|[2, 'D1']|[#0]|[#512]|[#2]|[4, 'D5']} <Pointer.fp 0x20e40 <LVAR -0x1414 @>> Δ-4 {[-12-]|[4, '(A6+0xc)']|[2, 'D1']|[#0]|[#512]|[#2]|[4, 'D5']|[@@-5140]} <Call 0x20e44 0x10384> {[-12-]|[4, '(A6+0xc)']|[2, 'D1']|[#0]|[#512]|[#2]|[4, 'D5']|[@@-5140]} ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) <POP 20e4a-20e4e StackAdj> Δ+20 {[-12-]} <MI 20e4e ADDQ.L #0x1,(A6-0x1428)> {[-12-]} <POP 20e52-20eb2 Naked> Σ-12 Δ-4 ↓ ←0x20e00 <MI 20e52 MOVE.L D6,D1> {[-12-]} <MI 20e54 LSR.L #0x8,D1> {[-12-]} <POP 0x20e56 LimitCheck 0x0 ≤ D1 ≤ 0xff> {[-12-]} <MI 20e60 MOVE.B D1,(A6-0x1416)> {[-12-]} <MI 20e64 MOVE.L D6,D1> {[-12-]} <MI 20e66 ANDI.L #0x000000ff,D1> {[-12-]} <POP 0x20e6c LimitCheck 0x0 ≤ D1 ≤ 0xff> {[-12-]} <MI 20e76 MOVE.B D1,(A6-0x1415)> {[-12-]} <Blob 0x20e7a [4] 0x21998> Δ-4 {[-12-]|[«4»]} <MI 20e80 MOVE.B (A6-0x141c),-(A7)> Δ-2 {[-12-]|[«4»]|[2, '(A6-0x141c)']} <Call 0x20e84 0x1046c> {[-12-]|[«4»]|[2, '(A6-0x141c)']} ExpInputFlag(exp : Pointer; val : Word) <POP 20e8a-20e8c StackAdj> Δ+4 {[-12-]|[-2-]} <MI 20e8c MOVE.W (A6-0x1416),(A7)> {[-12-]|[2, '(A6-0x1416)']} <Blob 0x20e90 [4] 0x21998> Δ-4 {[-12-]|[2, '(A6-0x1416)']|[«4»]} <Pointer.sp 0x20e96 4> Δ-4 {[-12-]|[2, '(A6-0x1416)']|[«4»]|[^^4]} <Const 0x20e9a 0x0.4> Δ-4 {[-12-]|[2, '(A6-0x1416)']|[«4»]|[^^4]|[##0]} <Const 0x20e9e 0x1.4> Δ-4 {[-12-]|[2, '(A6-0x1416)']|[«4»]|[^^4]|[##0]|[##1]} <Call 0x20ea2 0x10466> {[-12-]|[2, '(A6-0x1416)']|[«4»]|[^^4]|[##0]|[##1]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 20ea8-20eac StackAdj> Δ+14 {[-12-]|[2, '(A6-0x1416)']|[-2-]} <MI 20eac MOVE.L (A6-0xa),(A7)> {[-12-]|[4, '(A6-0xa)']} <MI 20eae SUBQ.L #0x1,(A7)> {[-16-]} <MI 20eb0 MOVEQ.L #0x00,D7> {[-16-]} <POP 20eb2-20eb6 Naked> Σ-16 ↓ →0x20ef6 ←0x20eb6 <MI 20eb2 CMP.L (A7),D7> {[-16-]} <MI 20eb4 BGT 0x20ef6> {[-16-]} <POP 20eb6-20ef6 Naked> Σ-16 ↓ →0x20eb2 <MI 20eb6 MOVE.L (A6-0x1420),D0> {[-16-]} <MI 20eb8 ADD.L D7,D0> {[-16-]} <POP 0x20eba LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-16-]} <MI 20ec4 ASL.L #0x3,D0> {[-16-]} <MI 20ec6 LEA.L (A6-0x1438),A0> {[-16-]} <MI 20eca LEA.L (A0+D0.L),A0> {[-16-]} <MI 20ece MOVE.L (A0+0xc2e),-(A7)> Δ-4 {[-16-]|[4, '(A0+0xc2e)']} <MI 20ed2 MOVE.L (A0+0xc2a),-(A7)> Δ-4 {[-16-]|[4, '(A0+0xc2e)']|[4, '(A0+0xc2a)']} <Blob 0x20ed6 [4] 0x21998> Δ-4 {[-16-]|[4, '(A0+0xc2e)']|[4, '(A0+0xc2a)']|[«4»]} <Pointer.sp 0x20edc 4> Δ-4 {[-16-]|[4, '(A0+0xc2e)']|[4, '(A0+0xc2a)']|[«4»]|[^^4]} <Const 0x20ee0 0x0.4> Δ-4 {[-16-]|[4, '(A0+0xc2e)']|[4, '(A0+0xc2a)']|[«4»]|[^^4]|[##0]} <Const 0x20ee4 0x7.4> Δ-4 {[-16-]|[4, '(A0+0xc2e)']|[4, '(A0+0xc2a)']|[«4»]|[^^4]|[##0]|[##7]} <Call 0x20ee8 0x10466> {[-16-]|[4, '(A0+0xc2e)']|[4, '(A0+0xc2a)']|[«4»]|[^^4]|[##0]|[##7]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 20eee-20ef2 StackAdj> Δ+24 {[-16-]} <MI 20ef2 ADDQ.L #0x1,D7> {[-16-]} <MI 20ef4 BVC 0x20eb2> {[-16-]} <POP 20ef6-20f0e Naked> Σ-16 Δ+4 ↓ →0x20f12 ←0x20eb2 <POP 20ef6-20ef8 StackAdj> Δ+2 {[-14-]} <POP 20ef8-20ef9 StackAdj> Δ+2 {[-12-]} <Const 0x20ef9 0x3.2> Δ-2 {[-12-]|[#3]} <Call 0x20efc 0x208d4> {[-12-]|[#3]} <POP 20f00-20f02 StackAdj> Δ+2 {[-12-]} <MI 20f02 MOVE.L (A6-0x1420),D0> {[-12-]} <MI 20f04 ADD.L (A6-0xa),D0> {[-12-]} <MI 20f06 MOVE.L D0,(A6-0x1420)> {[-12-]} <MI 20f08 TST.B (A6-0x141c)> {[-12-]} <MI 20f0c BEQ 0x20f12> {[-12-]} <POP 20f0e-20f12 Naked> Σ-12 →0x20f18 <MI 20f0e ADD.L (A6-0xa),D6> {[-12-]} <MI 20f10 BRA 0x20f18> {[-12-]} <POP 20f12-20f18 Naked> Σ-12 ↓ ←0x20ef6 <MI 20f12 MOVE.L (A6-0xa),D0> {[-12-]} <MI 20f14 ASL.L #0x6,D0> {[-12-]} <MI 20f16 ADD.L D0,D6> {[-12-]} <POP 20f18-20f20 Naked> Σ-12 Δ-4 ↓ ←0x20f0e <MI 20f18 MOVE.L (A6-0xe),-(A7)> Δ-4 {[-12-]|[4, '(A6-0xe)']} <MI 20f1c SUBQ.L #0x1,(A7)> {[-16-]} <MI 20f1e MOVEQ.L #0x00,D7> {[-16-]} <POP 20f20-20f26 Naked> Σ-16 ↓ →0x20fa8 ←0x20f26 <MI 20f20 CMP.L (A7),D7> {[-16-]} <MI 20f22 BGT 0x20fa8> {[-16-]} <POP 20f26-20fa8 Naked> Σ-16 ↓ →0x20f20 <MI 20f26 MOVE.L (A6-0x1424),D0> {[-16-]} <MI 20f2a ADD.L D7,D0> {[-16-]} <POP 0x20f2c LimitCheck 0x0 ≤ D0 ≤ 0x7f> {[-16-]} <MI 20f36 MOVE.L D0,D4> {[-16-]} <MI 20f38 MOVEQ.L #0x18,D3> {[-16-]} <Call 0x20f3a 0x1028c> {[-16-]} ?muls_d3_d4 <MI 20f40 LEA.L (A6-0x1438),A0> {[-16-]} <Blob 0x20f44 [8] (A0+D4.L+#0x3a)> Δ-8 {[-16-]|[«8»]} <Blob 0x20f54 [4] 0x21990> Δ-4 {[-16-]|[«8»]|[«4»]} <Pointer.sp 0x20f5a 4> Δ-4 {[-16-]|[«8»]|[«4»]|[^^4]} <Const 0x20f5e 0x0.4> Δ-4 {[-16-]|[«8»]|[«4»]|[^^4]|[##0]} <Const 0x20f62 0x7.4> Δ-4 {[-16-]|[«8»]|[«4»]|[^^4]|[##0]|[##7]} <Call 0x20f66 0x10466> {[-16-]|[«8»]|[«4»]|[^^4]|[##0]|[##7]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 20f6c-20f70 StackAdj> Δ+20 {[-16-]|[-4-]} <MI 20f70 MOVE.B (A0+D4.L+#0x36),(A7)> {[-16-]|[-4-]} <MI 20f74 MOVE.B (A0+D4.L+#0x37),(A7+0x1)> {[-16-]|[-4-]} <MI 20f7a MOVE.B (A0+D4.L+#0x38),(A7+0x2)> {[-16-]|[-4-]} <MI 20f80 MOVE.B (A0+D4.L+#0x39),(A7+0x3)> {[-16-]|[-4-]} <Blob 0x20f86 [4] 0x21990> Δ-4 {[-16-]|[-4-]|[«4»]} <Pointer.sp 0x20f8c 4> Δ-4 {[-16-]|[-4-]|[«4»]|[^^4]} <Const 0x20f90 0x0.4> Δ-4 {[-16-]|[-4-]|[«4»]|[^^4]|[##0]} <Const 0x20f94 0x3.4> Δ-4 {[-16-]|[-4-]|[«4»]|[^^4]|[##0]|[##3]} <Call 0x20f98 0x10466> {[-16-]|[-4-]|[«4»]|[^^4]|[##0]|[##3]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 20f9e-20fa2 StackAdj> Δ+20 {[-16-]} <MI 20fa2 ADDQ.L #0x1,D7> {[-16-]} <MI 20fa4 BVC 0x20f20> {[-16-]} <POP 20fa8-2101e Naked> Σ-16 ↓ ←0x20f20 <POP 20fa8-20faa StackAdj> Δ+2 {[-14-]} <POP 20faa-20fab StackAdj> Δ+2 {[-12-]} <Const 0x20fab 0x1.2> Δ-2 {[-12-]|[#1]} <Call 0x20fac 0x208d4> {[-12-]|[#1]} <POP 20fb0-20fb2 StackAdj> Δ+2 {[-12-]} <MI 20fb2 MOVE.L (A6-0x1424),D0> {[-12-]} <MI 20fb6 ADD.L (A6-0xe),D0> {[-12-]} <MI 20fba MOVE.L D0,(A6-0x1424)> {[-12-]} <MI 20fbe MOVE.L D6,D0> {[-12-]} <MI 20fc0 LSR.L #0x8,D0> {[-12-]} <POP 0x20fc2 LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-12-]} <MI 20fcc MOVE.B D0,(A6-0x1416)> {[-12-]} <MI 20fd0 MOVE.L D6,D0> {[-12-]} <MI 20fd2 ANDI.L #0x000000ff,D0> {[-12-]} <POP 0x20fd8 LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-12-]} <MI 20fe2 MOVE.B D0,(A6-0x1415)> {[-12-]} <Blob 0x20fe6 [4] 0x21998> Δ-4 {[-12-]|[«4»]} <MI 20fec MOVE.B (A6-0x141c),-(A7)> Δ-2 {[-12-]|[«4»]|[2, '(A6-0x141c)']} <Call 0x20ff0 0x1046c> {[-12-]|[«4»]|[2, '(A6-0x141c)']} ExpInputFlag(exp : Pointer; val : Word) <POP 20ff6-20ff8 StackAdj> Δ+4 {[-12-]|[-2-]} <MI 20ff8 MOVE.W (A6-0x1416),(A7)> {[-12-]|[2, '(A6-0x1416)']} <Blob 0x20ffc [4] 0x21998> Δ-4 {[-12-]|[2, '(A6-0x1416)']|[«4»]} <Pointer.sp 0x21002 4> Δ-4 {[-12-]|[2, '(A6-0x1416)']|[«4»]|[^^4]} <Const 0x21006 0x0.4> Δ-4 {[-12-]|[2, '(A6-0x1416)']|[«4»]|[^^4]|[##0]} <Const 0x2100a 0x1.4> Δ-4 {[-12-]|[2, '(A6-0x1416)']|[«4»]|[^^4]|[##0]|[##1]} <Call 0x2100e 0x10466> {[-12-]|[2, '(A6-0x1416)']|[«4»]|[^^4]|[##0]|[##1]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 21014-21018 StackAdj> Δ+14 {[-12-]|[2, '(A6-0x1416)']|[-2-]} <MI 21018 MOVE.L (A6-0xa),(A7)> {[-12-]|[4, '(A6-0xa)']} <MI 2101a SUBQ.L #0x1,(A7)> {[-16-]} <MI 2101c MOVEQ.L #0x00,D7> {[-16-]} <POP 2101e-21022 Naked> Σ-16 ↓ →0x21062 ←0x21022 <MI 2101e CMP.L (A7),D7> {[-16-]} <MI 21020 BGT 0x21062> {[-16-]} <POP 21022-21062 Naked> Σ-16 ↓ →0x2101e <MI 21022 MOVE.L (A6-0x1420),D0> {[-16-]} <MI 21024 ADD.L D7,D0> {[-16-]} <POP 0x21026 LimitCheck 0x0 ≤ D0 ≤ 0xff> {[-16-]} <MI 21030 ASL.L #0x3,D0> {[-16-]} <MI 21032 LEA.L (A6-0x1438),A0> {[-16-]} <MI 21036 LEA.L (A0+D0.L),A0> {[-16-]} <MI 2103a MOVE.L (A0+0xc2e),-(A7)> Δ-4 {[-16-]|[4, '(A0+0xc2e)']} <MI 2103e MOVE.L (A0+0xc2a),-(A7)> Δ-4 {[-16-]|[4, '(A0+0xc2e)']|[4, '(A0+0xc2a)']} <Blob 0x21042 [4] 0x21998> Δ-4 {[-16-]|[4, '(A0+0xc2e)']|[4, '(A0+0xc2a)']|[«4»]} <Pointer.sp 0x21048 4> Δ-4 {[-16-]|[4, '(A0+0xc2e)']|[4, '(A0+0xc2a)']|[«4»]|[^^4]} <Const 0x2104c 0x0.4> Δ-4 {[-16-]|[4, '(A0+0xc2e)']|[4, '(A0+0xc2a)']|[«4»]|[^^4]|[##0]} <Const 0x21050 0x7.4> Δ-4 {[-16-]|[4, '(A0+0xc2e)']|[4, '(A0+0xc2a)']|[«4»]|[^^4]|[##0]|[##7]} <Call 0x21054 0x10466> {[-16-]|[4, '(A0+0xc2e)']|[4, '(A0+0xc2a)']|[«4»]|[^^4]|[##0]|[##7]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 2105a-2105e StackAdj> Δ+24 {[-16-]} <MI 2105e ADDQ.L #0x1,D7> {[-16-]} <MI 21060 BVC 0x2101e> {[-16-]} <POP 21062-2107a Naked> Σ-16 Δ+4 ↓ →0x2107e ←0x2101e <POP 21062-21064 StackAdj> Δ+2 {[-14-]} <POP 21064-21065 StackAdj> Δ+2 {[-12-]} <Const 0x21065 0x3.2> Δ-2 {[-12-]|[#3]} <Call 0x21068 0x208d4> {[-12-]|[#3]} <POP 2106c-2106e StackAdj> Δ+2 {[-12-]} <MI 2106e MOVE.L (A6-0x1420),D0> {[-12-]} <MI 21070 ADD.L (A6-0xa),D0> {[-12-]} <MI 21072 MOVE.L D0,(A6-0x1420)> {[-12-]} <MI 21074 TST.B (A6-0x141c)> {[-12-]} <MI 21078 BEQ 0x2107e> {[-12-]} <POP 2107a-2107e Naked> Σ-12 →0x21084 <MI 2107a ADD.L (A6-0xa),D6> {[-12-]} <MI 2107c BRA 0x21084> {[-12-]} <POP 2107e-21084 Naked> Σ-12 ↓ ←0x21062 <MI 2107e MOVE.L (A6-0xa),D0> {[-12-]} <MI 21080 ASL.L #0x6,D0> {[-12-]} <MI 21082 ADD.L D0,D6> {[-12-]} <POP 21084-2108a Naked> Σ-12 ↓ →0x21090 ←0x2107a <MI 21084 MOVE.L (A7),D1> {[-12-]} <MI 21086 ADDQ.L #0x1,D1> {[-12-]} <MI 21088 BVS 0x21090> {[-12-]} <POP 2108a-21090 Naked> Σ-12 Δ+4 →0x20d1a <POP 2108a-2108c StackAdj> Δ+4 {[-8-]} <MI 2108c BRA 0x20d1a> {[-8-]} <POP 21090-2109e Naked> Σ-12 Δ+8 ↓ →0x210a4 ←0x20d1e ←0x21084 <POP 21090-21092 StackAdj> Δ+8 {[-4-]} <MI 21092 MOVE.L (A7),D0> {[-4-]} <MI 21094 ADDQ.L #0x1,D0> {[-4-]} <MI 21096 CMPI.L #0x00000007,D0> {[-4-]} <MI 2109c BGT 0x210a4> {[-4-]} <POP 2109e-210a4 Naked> Σ-4 Δ+4 →0x20cd6 <POP 2109e-210a0 StackAdj> Δ+4 {} <MI 210a0 BRA 0x20cd6> {} <POP 210a4-210be Naked> Σ-4 Δ+4 ↓ ←0x21090 <POP 210a4-210a6 StackAdj> Δ+2 {[-2-]} <MI 210a6 CLR.B (A7)> {[-2-]} <Const 0x210a8 0x1.2> Δ-2 {[-2-]|[#1]} <Call 0x210aa 0x20970> {[-2-]|[#1]} <POP 210ae-210b0 StackAdj> Δ+2 {[-2-]} <POP 210b0-210b1 StackAdj> Δ+2 {} <Const 0x210b1 0x3.2> Δ-2 {[#3]} <Const 0x210b4 0x3.2> Δ-2 {[#3]|[#3]} <Call 0x210b8 0x20970> {[#3]|[#3]} <POP 210bc-210be StackAdj> Δ+4 {} <POP 210be-210c6 Epilogue> Σ0
@ 210c6 <LVAR 0x010 4(r)> <LVAR 0x00e 2(r)> <LVAR 0x00a 4(r)> <LVAR 0x008 2(r)> <LVAR -0x004 4(rw)> <LVAR -0x008 4(rw)> <LVAR -0x408 @> <LVAR -0x409 1(w)> <LVAR -0x40a 1(w) 2(r)> <LVAR -0x40f 1(w)> <LVAR -0x410 @> <LVAR -0x420 @> <POP 210c6-21416 Body> <POP 210c6-210dc Prologue> Σ0 ↓ <POP 210dc-210ec RegCacheLoad> Σ0 ↓ <POP 210ec-21172 Naked> Σ0 Δ-4 ↓ <MI 210ec MOVE.L #0x10,(A6-0x8)> {} <MI 210f2 MOVE.L #0x1,(A6-0x4)> {} <MI 210fa MOVEQ.L #0x00,D0> {} <MI 210fc MOVE.B D0,(A6-0x40f)> {} <MI 21100 MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']} <MI 21102 MOVE.B D0,-(A7)> Δ-2 {[2, '(A6+0x8)']|[2, 'D0']} <Call 0x21104 0x216ea> {[2, '(A6+0x8)']|[2, 'D0']} exp_LOAD_DIAG_COUNTER.TYP(Sw_2, Sw_1) <POP 2110a-2110c StackAdj> Δ+2 {[2, '(A6+0x8)']} <MI 2110c MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']} <MI 2110e MOVE.B D0,-(A7)> Δ-2 {[2, '(A6+0x8)']|[2, 'D0']} <Call 0x21110 0x21736> {[2, '(A6+0x8)']|[2, 'D0']} exp_LOAD_DIAG_COUNTER.VAL(Sw_2, Sw_1) <POP 21116-21118 StackAdj> Δ+2 {[2, '(A6+0x8)']} <MI 21118 MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']} <MI 2111a MOVE.W (A6+0x8),-(A7)> Δ-2 {[2, '(A6+0x8)']|[2, '(A6+0x8)']} <MI 2111c MOVE.B D0,-(A7)> Δ-2 {[2, '(A6+0x8)']|[2, '(A6+0x8)']|[2, 'D0']} <Call 0x2111e 0x2165c> {[2, '(A6+0x8)']|[2, '(A6+0x8)']|[2, 'D0']} exp_LOAD_COUNTER.FIU(Sw_2, Sw_2, Sw_1) <POP 21124-21126 StackAdj> Δ+4 {[2, '(A6+0x8)']} <MI 21126 MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']} <Call 0x21128 0x216a4> {[2, '(A6+0x8)']} exp_LOAD_COUNTER.SEQ(Sw_2) <MI 2112e MOVE.W (A6+0x8),(A7)> {[2, '(A6+0x8)']} <MI 21130 MOVE.B D0,-(A7)> Δ-2 {[2, '(A6+0x8)']|[2, 'D0']} <Call 0x21132 0x2175a> {[2, '(A6+0x8)']|[2, 'D0']} exp_LOAD_WCS_ADDRESS.IOC(Sw_2, Sw_1) <POP 21138-2113a StackAdj> Δ+4 {} <Blob 0x2113a [18] @> Δ-18 {[«18""»]} <POP 21146-21148 StackAdj> Δ-4 {[«18""»]|[-4-]} <Lit 0x21148 18> {[«18""»]|[$$LOAD_CONTROL_STORE]} <POP 2115a-2115c StackAdj> Δ-2 {[«18""»]|[$$LOAD_CONTROL_STORE]|[-2-]} <MI 2115c CLR.B (A7)> {[«18""»]|[$$LOAD_CONTROL_STORE]|[-2-]} <Const 0x2115e 0x4.2> Δ-2 {[«18""»]|[$$LOAD_CONTROL_STORE]|[-2-]|[#4]} <Call 0x21162 0x20730> {[«18""»]|[$$LOAD_CONTROL_STORE]|[-2-]|[#4]} <POP 21166-2116a StackAdj> Δ+22 {[-4-]} <MI 2116a MOVE.L (A6+0xa),(A7)> {[4, '(A6+0xa)']} <MI 2116e SUBQ.L #0x1,(A7)> {[-4-]} <MI 21170 MOVEQ.L #0x00,D0> {[-4-]} <POP 21172-21176 Naked> Σ-4 ↓ →0x2117c ←0x213fa <MI 21172 CMP.L (A7),D0> {[-4-]} <MI 21174 BLE 0x2117c> {[-4-]} <POP 21176-2117c Naked> Σ-4 Δ-4 →0x21400 <POP 21176-21178 StackAdj> Δ-4 {[-8-]} <MI 21178 BRA 0x21400> {[-8-]} <POP 2117c-211c6 Naked> Σ-4 Δ-4 ↓ →0x211e8 ←0x21172 <MI 2117c MOVE.L D0,-(A7)> Δ-4 {[-4-]|[4, 'D0']} <MI 2117e MOVE.L (A6+0x10),-(A7)> Δ-4 {[-4-]|[4, 'D0']|[4, '(A6+0x10)']} <MI 21182 MOVE.W (A6+0xe),D1> {[-4-]|[4, 'D0']|[4, '(A6+0x10)']} <MI 21186 EXTW.L D1> {[-4-]|[4, 'D0']|[4, '(A6+0x10)']} <MI 21188 ADD.L D0,D1> {[-4-]|[4, 'D0']|[4, '(A6+0x10)']} <POP 0x2118a LimitCheck 0x0 ≤ D1 ≤ 0x4000> {[-4-]|[4, 'D0']|[4, '(A6+0x10)']} <MI 21194 MOVE.W D1,-(A7)> Δ-2 {[-4-]|[4, 'D0']|[4, '(A6+0x10)']|[2, 'D1']} <MI 21196 CLR.W -(A7)> Δ-2 {[-4-]|[4, 'D0']|[4, '(A6+0x10)']|[2, 'D1']|[#0]} <Const 0x21198 0x200.2> Δ-2 {[-4-]|[4, 'D0']|[4, '(A6+0x10)']|[2, 'D1']|[#0]|[#512]} <Const 0x2119c 0x2.2> Δ-2 {[-4-]|[4, 'D0']|[4, '(A6+0x10)']|[2, 'D1']|[#0]|[#512]|[#2]} <MI 211a0 LEA.L (A6-0x408),A0> {[-4-]|[4, 'D0']|[4, '(A6+0x10)']|[2, 'D1']|[#0]|[#512]|[#2]} <MI 211a4 MOVE.L A0,-(A7)> Δ-4 {[-4-]|[4, 'D0']|[4, '(A6+0x10)']|[2, 'D1']|[#0]|[#512]|[#2]|[4, 'A0']} <Pointer.fp 0x211a6 <LVAR -0x410 @>> Δ-4 {[-4-]|[4, 'D0']|[4, '(A6+0x10)']|[2, 'D1']|[#0]|[#512]|[#2]|[4, 'A0']|[@@-1040]} <Call 0x211aa 0x10384> {[-4-]|[4, 'D0']|[4, '(A6+0x10)']|[2, 'D1']|[#0]|[#512]|[#2]|[4, 'A0']|[@@-1040]} ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) <POP 211b0-211b4 StackAdj> Δ+20 {[-4-]|[4, 'D0']} <MI 211b4 MOVE.L D0,D4> {[-4-]|[4, 'D0']} <MI 211b6 MOVEQ.L #0x20,D3> {[-4-]|[4, 'D0']} <Call 0x211b8 0x10294> {[-4-]|[4, 'D0']} ?divs_d3_d4 <MI 211be CMPI.L #0x0000001f,D3> {[-4-]|[4, 'D0']} <MI 211c4 BNE 0x211e8> {[-4-]|[4, 'D0']} <POP 211c6-211e8 Naked> Σ-8 ↓ <Blob 0x211c6 [2] @> Δ-2 {[-8-]|[«2""»]} <POP 211ca-211cc StackAdj> Δ-4 {[-8-]|[«2""»]|[-4-]} <Lit 0x211cc 2> {[-8-]|[«2""»]|[$$. ]} <Call 0x211e0 0x103d8> {[-8-]|[«2""»]|[$$. ]} WriteConsoleString(str : String) <POP 211e6-211e8 StackAdj> Δ+6 {[-8-]} <POP 211e8-211f0 Naked> Σ-8 Δ-4 ↓ ←0x2117c <MI 211e8 MOVEQ.L #0x00,D6> {[-8-]} <MI 211ea MOVE.L (A6-0x4),-(A7)> Δ-4 {[-8-]|[4, '(A6-0x4)']} <MI 211ee MOVEQ.L #0x00,D5> {[-8-]|[4, '(A6-0x4)']} <POP 211f0-211f6 Naked> Σ-12 ↓ →0x213f2 ←0x213de <MI 211f0 CMP.L (A7),D5> {[-12-]} <MI 211f2 BGT 0x213f2> {[-12-]} <POP 211f6-211fc Naked> Σ-12 Δ-4 ↓ <MI 211f6 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6-0x8)']} <MI 211f8 SUBQ.L #0x1,(A7)> {[-16-]} <MI 211fa MOVEQ.L #0x00,D7> {[-16-]} <POP 211fc-21200 Naked> Σ-16 ↓ →0x21238 ←0x21200 <MI 211fc CMP.L (A7),D7> {[-16-]} <MI 211fe BGT 0x21238> {[-16-]} <POP 21200-21238 Naked> Σ-16 ↓ →0x211fc <MI 21200 MOVE.L D6,D0> {[-16-]} <MI 21202 ADD.L D7,D0> {[-16-]} <POP 0x21204 LimitCheck 0x0 ≤ D0 ≤ 0x1f> {[-16-]} <MI 2120e ASL.L #0x5,D0> {[-16-]} <MI 21210 LEA.L (A6-0x420),A0> {[-16-]} <MI 21212 MOVE.L (A0+D0.L+#0x1c),-(A7)> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x1c)']} <MI 21216 MOVE.L (A0+D0.L+#0x18),-(A7)> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x1c)']|[4, '(A0+D0.L+#0x18)']} <Blob 0x2121a [4] 0x2198c> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x1c)']|[4, '(A0+D0.L+#0x18)']|[«4»]} <Pointer.sp 0x21220 4> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x1c)']|[4, '(A0+D0.L+#0x18)']|[«4»]|[^^4]} <Const 0x21224 0x0.4> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x1c)']|[4, '(A0+D0.L+#0x18)']|[«4»]|[^^4]|[##0]} <Const 0x21226 0x7.4> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x1c)']|[4, '(A0+D0.L+#0x18)']|[«4»]|[^^4]|[##0]|[##7]} <Call 0x2122a 0x10466> {[-16-]|[4, '(A0+D0.L+#0x1c)']|[4, '(A0+D0.L+#0x18)']|[«4»]|[^^4]|[##0]|[##7]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 21230-21234 StackAdj> Δ+24 {[-16-]} <MI 21234 ADDQ.L #0x1,D7> {[-16-]} <MI 21236 BVC 0x211fc> {[-16-]} <POP 21238-21248 Naked> Σ-16 ↓ ←0x211fc <POP 21238-2123a StackAdj> Δ+2 {[-14-]} <MI 2123a CLR.B (A7)> {[-14-]} <Call 0x2123c 0x208d4> {[-14-]} <POP 21240-21242 StackAdj> Δ+2 {[-12-]} <MI 21242 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6-0x8)']} <MI 21244 SUBQ.L #0x1,(A7)> {[-16-]} <MI 21246 MOVEQ.L #0x00,D7> {[-16-]} <POP 21248-2124c Naked> Σ-16 ↓ →0x21284 ←0x2124c <MI 21248 CMP.L (A7),D7> {[-16-]} <MI 2124a BGT 0x21284> {[-16-]} <POP 2124c-21284 Naked> Σ-16 ↓ →0x21248 <MI 2124c MOVE.L D6,D0> {[-16-]} <MI 2124e ADD.L D7,D0> {[-16-]} <POP 0x21250 LimitCheck 0x0 ≤ D0 ≤ 0x1f> {[-16-]} <MI 2125a ASL.L #0x5,D0> {[-16-]} <MI 2125c LEA.L (A6-0x420),A0> {[-16-]} <MI 2125e MOVE.L (A0+D0.L+#0x24),-(A7)> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x24)']} <MI 21262 MOVE.L (A0+D0.L+#0x20),-(A7)> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x24)']|[4, '(A0+D0.L+#0x20)']} <Blob 0x21266 [4] 0x21990> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x24)']|[4, '(A0+D0.L+#0x20)']|[«4»]} <Pointer.sp 0x2126c 4> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x24)']|[4, '(A0+D0.L+#0x20)']|[«4»]|[^^4]} <Const 0x21270 0x0.4> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x24)']|[4, '(A0+D0.L+#0x20)']|[«4»]|[^^4]|[##0]} <Const 0x21272 0x7.4> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x24)']|[4, '(A0+D0.L+#0x20)']|[«4»]|[^^4]|[##0]|[##7]} <Call 0x21276 0x10466> {[-16-]|[4, '(A0+D0.L+#0x24)']|[4, '(A0+D0.L+#0x20)']|[«4»]|[^^4]|[##0]|[##7]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 2127c-21280 StackAdj> Δ+24 {[-16-]} <MI 21280 ADDQ.L #0x1,D7> {[-16-]} <MI 21282 BVC 0x21248> {[-16-]} <POP 21284-21296 Naked> Σ-16 ↓ ←0x21248 <POP 21284-21286 StackAdj> Δ+2 {[-14-]} <POP 21286-21287 StackAdj> Δ+2 {[-12-]} <Const 0x21287 0x1.2> Δ-2 {[-12-]|[#1]} <Call 0x2128a 0x208d4> {[-12-]|[#1]} <POP 2128e-21290 StackAdj> Δ+2 {[-12-]} <MI 21290 MOVE.L (A6-0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6-0x8)']} <MI 21292 SUBQ.L #0x1,(A7)> {[-16-]} <MI 21294 MOVEQ.L #0x00,D7> {[-16-]} <POP 21296-2129a Naked> Σ-16 ↓ →0x212d2 ←0x2129a <MI 21296 CMP.L (A7),D7> {[-16-]} <MI 21298 BGT 0x212d2> {[-16-]} <POP 2129a-212d2 Naked> Σ-16 ↓ →0x21296 <MI 2129a MOVE.L D6,D0> {[-16-]} <MI 2129c ADD.L D7,D0> {[-16-]} <POP 0x2129e LimitCheck 0x0 ≤ D0 ≤ 0x1f> {[-16-]} <MI 212a8 ASL.L #0x5,D0> {[-16-]} <MI 212aa LEA.L (A6-0x420),A0> {[-16-]} <MI 212ac MOVE.L (A0+D0.L+#0x2c),-(A7)> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x2c)']} <MI 212b0 MOVE.L (A0+D0.L+#0x28),-(A7)> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x2c)']|[4, '(A0+D0.L+#0x28)']} <Blob 0x212b4 [4] 0x21994> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x2c)']|[4, '(A0+D0.L+#0x28)']|[«4»]} <Pointer.sp 0x212ba 4> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x2c)']|[4, '(A0+D0.L+#0x28)']|[«4»]|[^^4]} <Const 0x212be 0x0.4> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x2c)']|[4, '(A0+D0.L+#0x28)']|[«4»]|[^^4]|[##0]} <Const 0x212c0 0x7.4> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x2c)']|[4, '(A0+D0.L+#0x28)']|[«4»]|[^^4]|[##0]|[##7]} <Call 0x212c4 0x10466> {[-16-]|[4, '(A0+D0.L+#0x2c)']|[4, '(A0+D0.L+#0x28)']|[«4»]|[^^4]|[##0]|[##7]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 212ca-212ce StackAdj> Δ+24 {[-16-]} <MI 212ce ADDQ.L #0x1,D7> {[-16-]} <MI 212d0 BVC 0x21296> {[-16-]} <POP 212d2-212e4 Naked> Σ-16 ↓ ←0x21296 <POP 212d2-212d4 StackAdj> Δ+2 {[-14-]} <POP 212d4-212d5 StackAdj> Δ+2 {[-12-]} <Const 0x212d5 0x2.2> Δ-2 {[-12-]|[#2]} <Call 0x212d8 0x208d4> {[-12-]|[#2]} <POP 212dc-212de StackAdj> Δ+2 {[-12-]} <MI 212de MOVE.L (A6-0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6-0x8)']} <MI 212e0 SUBQ.L #0x1,(A7)> {[-16-]} <MI 212e2 MOVEQ.L #0x00,D7> {[-16-]} <POP 212e4-212ea Naked> Σ-16 ↓ →0x21390 ←0x212ea <MI 212e4 CMP.L (A7),D7> {[-16-]} <MI 212e6 BGT 0x21390> {[-16-]} <POP 212ea-21390 Naked> Σ-16 ↓ →0x212e4 <MI 212ea MOVE.L D6,D0> {[-16-]} <MI 212ec ADD.L D7,D0> {[-16-]} <POP 0x212ee LimitCheck 0x0 ≤ D0 ≤ 0x1f> {[-16-]} <MI 212f8 ASL.L #0x5,D0> {[-16-]} <MI 212fa LEA.L (A6-0x420),A0> {[-16-]} <MI 212fc CLR.L D1> {[-16-]} <MI 212fe MOVE.B (A0+D0.L+#0x28),D1> {[-16-]} <MI 21302 ANDI.W #0x0003,D1> {[-16-]} <MI 21306 ASL.W #0x6,D1> {[-16-]} <MI 21308 CLR.L D2> {[-16-]} <MI 2130a MOVE.B (A0+D0.L+#0x29),D2> {[-16-]} <MI 2130e ANDI.W #0x0003,D2> {[-16-]} <MI 21312 ASL.W #0x4,D2> {[-16-]} <MI 21314 ADD.W D1,D2> {[-16-]} <MI 21316 CLR.L D1> {[-16-]} <MI 21318 MOVE.B (A0+D0.L+#0x2a),D1> {[-16-]} <MI 2131c ANDI.W #0x0003,D1> {[-16-]} <MI 21320 ASL.W #0x2,D1> {[-16-]} <MI 21322 ADD.W D2,D1> {[-16-]} <MI 21324 CLR.L D2> {[-16-]} <MI 21326 MOVE.B (A0+D0.L+#0x2b),D2> {[-16-]} <MI 2132a ANDI.W #0x0003,D2> {[-16-]} <MI 2132e ADD.W D1,D2> {[-16-]} <MI 21330 MOVE.B D2,(A6-0x40a)> {[-16-]} <MI 21334 CLR.L D1> {[-16-]} <MI 21336 MOVE.B (A0+D0.L+#0x2c),D1> {[-16-]} <MI 2133a ANDI.W #0x0003,D1> {[-16-]} <MI 2133e ASL.W #0x6,D1> {[-16-]} <MI 21340 CLR.L D2> {[-16-]} <MI 21342 MOVE.B (A0+D0.L+#0x2d),D2> {[-16-]} <MI 21346 ANDI.W #0x0003,D2> {[-16-]} <MI 2134a ASL.W #0x4,D2> {[-16-]} <MI 2134c ADD.W D1,D2> {[-16-]} <MI 2134e CLR.L D1> {[-16-]} <MI 21350 MOVE.B (A0+D0.L+#0x2e),D1> {[-16-]} <MI 21354 ANDI.W #0x0003,D1> {[-16-]} <MI 21358 ASL.W #0x2,D1> {[-16-]} <MI 2135a ADD.W D2,D1> {[-16-]} <MI 2135c CLR.L D2> {[-16-]} <MI 2135e MOVE.B (A0+D0.L+#0x2f),D2> {[-16-]} <MI 21362 ANDI.W #0x0003,D2> {[-16-]} <MI 21366 ADD.W D1,D2> {[-16-]} <MI 21368 MOVE.B D2,(A6-0x409)> {[-16-]} <MI 2136c MOVE.W (A6-0x40a),-(A7)> Δ-2 {[-16-]|[2, '(A6-0x40a)']} <Blob 0x21370 [4] 0x2199c> Δ-4 {[-16-]|[2, '(A6-0x40a)']|[«4»]} <Pointer.sp 0x21376 4> Δ-4 {[-16-]|[2, '(A6-0x40a)']|[«4»]|[^^4]} <Const 0x2137a 0x0.4> Δ-4 {[-16-]|[2, '(A6-0x40a)']|[«4»]|[^^4]|[##0]} <Const 0x2137c 0x1.4> Δ-4 {[-16-]|[2, '(A6-0x40a)']|[«4»]|[^^4]|[##0]|[##1]} <Call 0x21380 0x10466> {[-16-]|[2, '(A6-0x40a)']|[«4»]|[^^4]|[##0]|[##1]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 21386-2138a StackAdj> Δ+18 {[-16-]} <MI 2138a ADDQ.L #0x1,D7> {[-16-]} <MI 2138c BVC 0x212e4> {[-16-]} <POP 21390-213a2 Naked> Σ-16 ↓ ←0x212e4 <POP 21390-21392 StackAdj> Δ+2 {[-14-]} <POP 21392-21393 StackAdj> Δ+2 {[-12-]} <Const 0x21393 0x4.2> Δ-2 {[-12-]|[#4]} <Call 0x21396 0x208d4> {[-12-]|[#4]} <POP 2139a-2139c StackAdj> Δ+2 {[-12-]} <MI 2139c MOVE.L (A6-0x8),-(A7)> Δ-4 {[-12-]|[4, '(A6-0x8)']} <MI 2139e SUBQ.L #0x1,(A7)> {[-16-]} <MI 213a0 MOVEQ.L #0x00,D7> {[-16-]} <POP 213a2-213a6 Naked> Σ-16 ↓ →0x213de ←0x213a6 <MI 213a2 CMP.L (A7),D7> {[-16-]} <MI 213a4 BGT 0x213de> {[-16-]} <POP 213a6-213de Naked> Σ-16 ↓ →0x213a2 <MI 213a6 MOVE.L D6,D0> {[-16-]} <MI 213a8 ADD.L D7,D0> {[-16-]} <POP 0x213aa LimitCheck 0x0 ≤ D0 ≤ 0x1f> {[-16-]} <MI 213b4 ASL.L #0x5,D0> {[-16-]} <MI 213b6 LEA.L (A6-0x420),A0> {[-16-]} <MI 213b8 MOVE.L (A0+D0.L+#0x34),-(A7)> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x34)']} <MI 213bc MOVE.L (A0+D0.L+#0x30),-(A7)> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x34)']|[4, '(A0+D0.L+#0x30)']} <Blob 0x213c0 [4] 0x21998> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x34)']|[4, '(A0+D0.L+#0x30)']|[«4»]} <Pointer.sp 0x213c6 4> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x34)']|[4, '(A0+D0.L+#0x30)']|[«4»]|[^^4]} <Const 0x213ca 0x0.4> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x34)']|[4, '(A0+D0.L+#0x30)']|[«4»]|[^^4]|[##0]} <Const 0x213cc 0x7.4> Δ-4 {[-16-]|[4, '(A0+D0.L+#0x34)']|[4, '(A0+D0.L+#0x30)']|[«4»]|[^^4]|[##0]|[##7]} <Call 0x213d0 0x10466> {[-16-]|[4, '(A0+D0.L+#0x34)']|[4, '(A0+D0.L+#0x30)']|[«4»]|[^^4]|[##0]|[##7]} ExpInputParam(exp : Pointer; ptr : Pointer; len : L) <POP 213d6-213da StackAdj> Δ+24 {[-16-]} <MI 213da ADDQ.L #0x1,D7> {[-16-]} <MI 213dc BVC 0x213a2> {[-16-]} <POP 213de-213f2 Naked> Σ-16 Δ+4 ↓ →0x211f0 ←0x213a2 <POP 213de-213e0 StackAdj> Δ+2 {[-14-]} <POP 213e0-213e1 StackAdj> Δ+2 {[-12-]} <Const 0x213e1 0x3.2> Δ-2 {[-12-]|[#3]} <Call 0x213e4 0x208d4> {[-12-]|[#3]} <POP 213e8-213ea StackAdj> Δ+2 {[-12-]} <MI 213ea ADD.L (A6-0x8),D6> {[-12-]} <MI 213ec ADDQ.L #0x1,D5> {[-12-]} <MI 213ee BVC 0x211f0> {[-12-]} <POP 213f2-213fa Naked> Σ-12 Δ+4 ↓ →0x21400 ←0x211f0 <POP 213f2-213f4 StackAdj> Δ+4 {[-8-]} <MI 213f4 MOVE.L (A7),D0> {[-8-]} <MI 213f6 ADDQ.L #0x1,D0> {[-8-]} <MI 213f8 BVS 0x21400> {[-8-]} <POP 213fa-21400 Naked> Σ-8 Δ+4 →0x21172 <POP 213fa-213fc StackAdj> Δ+4 {[-4-]} <MI 213fc BRA 0x21172> {[-4-]} <POP 21400-2140e Naked> Σ-8 Δ+8 ↓ ←0x21176 ←0x213f2 <POP 21400-21402 StackAdj> Δ+6 {[-2-]} <MI 21402 CLR.B (A7)> {[-2-]} <Const 0x21404 0x4.2> Δ-2 {[-2-]|[#4]} <Call 0x21408 0x20970> {[-2-]|[#4]} <POP 2140c-2140e StackAdj> Δ+4 {} <POP 2140e-21416 Epilogue> Σ0
@ 21416 <LVAR 0x00e 4(r)> <LVAR 0x00c @ 1(r)> <LVAR 0x00a 1(r)> <LVAR 0x008 1(r)> <LVAR -0x004 @ 2(r)> <LVAR -0x008 @ 4(r)> <LVAR -0x00a @> <LVAR -0x00e @ 4(r)> <POP 21416-215b4 Body> Δ+6 <POP 21416-2142c Prologue> Σ0 ↓ <POP 2142c-21444 RegCacheLoad> Σ0 ↓ <POP 21444-2146c Naked> Σ0 ↓ →0x21472 <MI 21444 MOVE.L (A6+0xe),-(A7)> Δ-4 {[4, '(A6+0xe)']} <Pointer.fp 0x21448 <LVAR 0x00c @ 1(r)>> Δ-4 {[4, '(A6+0xe)']|[@@12]} <Pointer.fp 0x2144a <LVAR -0x00e @ 4(r)>> Δ-4 {[4, '(A6+0xe)']|[@@12]|[@@-14]} <Pointer.fp 0x2144c <LVAR -0x008 @ 4(r)>> Δ-4 {[4, '(A6+0xe)']|[@@12]|[@@-14]|[@@-8]} <Pointer.fp 0x21450 <LVAR -0x004 @ 2(r)>> Δ-4 {[4, '(A6+0xe)']|[@@12]|[@@-14]|[@@-8]|[@@-4]} <Call 0x21454 0x202fc> {[4, '(A6+0xe)']|[@@12]|[@@-14]|[@@-8]|[@@-4]} <POP 21458-2145c StackAdj> Δ+18 {[-2-]} <POP 2145c-2145d StackAdj> Δ+2 {} <Const 0x2145d 0x5.2> Δ-2 {[#5]} <Const 0x2145e 0x2.2> Δ-2 {[#5]|[#2]} <Call 0x21460 0x1048a> {[#5]|[#2]} DiProcCmd(board : Byte; cmd : Byte) <POP 21466-21468 StackAdj> Δ+4 {} <MI 21468 TST.B (A6+0xc)> {} <MI 2146a BNE 0x21472> {} <POP 2146c-21472 Naked> Σ0 ↓ →0x214b6 <MI 2146c TST.B (A6+0x8)> {} <MI 21470 BEQ 0x214b6> {} <POP 21472-214b6 Naked> Σ0 Δ-6 →0x214fe ←0x21444 <Blob 0x21472 [42] @> Δ-42 {[«42""»]} <POP 21482-21484 StackAdj> Δ-4 {[«42""»]|[-4-]} <Lit 0x21484 41> {[«42""»]|[$$Loading Register Files and Dispatch Rams_]} <Call 0x21490 0x103d8> {[«42""»]|[$$Loading Register Files and Dispatch Rams_]} WriteConsoleString(str : String) <POP 21496-21498 StackAdj> Δ+42 {[-4-]} <MI 21498 MOVE.L (A6-0xe),(A7)> {[4, '(A6-0xe)']} <Const 0x2149a 0x1.2> Δ-2 {[4, '(A6-0xe)']|[#1]} <Const 0x2149c 0x19.2> Δ-2 {[4, '(A6-0xe)']|[#1]|[#25]} <Call 0x214a0 0x20c16> {[4, '(A6-0xe)']|[#1]|[#25]} <POP 214a4-214a5 StackAdj> Δ+8 ↓ {} <Blob 0x214a5 [6] @> Δ-6 {[«6""»]} <MI 214b4 BRA 0x214fe> {[«6""»]} <POP 214b6-214bc Naked> Σ0 ↓ →0x21516 ←0x2146c <MI 214b6 TST.B (A6+0xa)> {} <MI 214ba BEQ 0x21516> {} <POP 214bc-214fe Naked> Σ0 Δ-6 ↓ <Blob 0x214bc [24] @> Δ-24 {[«24""»]} <POP 214ce-214d0 StackAdj> Δ-4 {[«24""»]|[-4-]} <Lit 0x214d0 23> {[«24""»]|[$$Loading Register Files_]} <Call 0x214de 0x103d8> {[«24""»]|[$$Loading Register Files_]} WriteConsoleString(str : String) <POP 214e4-214e8 StackAdj> Δ+24 {[-4-]} <MI 214e8 MOVE.L (A6-0xe),(A7)> {[4, '(A6-0xe)']} <Const 0x214ea 0x1.2> Δ-2 {[4, '(A6-0xe)']|[#1]} <Call 0x214ec 0x209c0> {[4, '(A6-0xe)']|[#1]} <MI 214f0 MOVEA.L A7,A0> {[4, '(A6-0xe)']|[#1]} <MI 214f2 LEA.L 0x2024c,A1> {[4, '(A6-0xe)']|[#1]} <BlockMove 5,A1,A0> {[4, '(A6-0xe)']|[#1]} <POP 214fe-21516 Naked> Σ-6 Δ+6 ↓ ←0x21472 <POP 214fe-21500 StackAdj> Δ-4 {[-10-]} <Lit 0x21500> {[-6-]|[$$…]} <Pointer.sp 0x21500 4> Δ-4 <Const 0x21504 0x1.2> Δ-2 <Const 0x21506 0x5.2> Δ-2 <Call 0x21508 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 2150a-2150c StackAdj> Δ+8 <Call 0x2150c 0x103e0> {[-6-]|[$$…]} WriteConsoleStringCrLf(str : String) <POP 21512-21516 StackAdj> Δ+10 {} <POP 21516-2151a Naked> Σ0 ↓ →0x21582 ←0x214b6 <MI 21516 TST.B (A6+0xc)> {} <MI 21518 BEQ 0x21582> {} <POP 2151a-21582 Naked> Σ0 ↓ <Blob 0x2151a [22] @> Δ-22 {[«22""»]} <POP 21526-21528 StackAdj> Δ-4 {[«22""»]|[-4-]} <Lit 0x21528 22> {[«22""»]|[$$Loading Control Store_]} <Call 0x21536 0x103d8> {[«22""»]|[$$Loading Control Store_]} WriteConsoleString(str : String) <POP 2153c-21540 StackAdj> Δ+22 {[-4-]} <MI 21540 MOVE.L (A6-0xe),(A7)> {[4, '(A6-0xe)']} <Const 0x21542 0x29.2> Δ-2 {[4, '(A6-0xe)']|[#41]} <MI 21544 MOVE.L (A6-0x8),D4> {[4, '(A6-0xe)']|[#41]} <MI 21548 MOVEQ.L #0x20,D3> {[4, '(A6-0xe)']|[#41]} <Call 0x2154a 0x10294> {[4, '(A6-0xe)']|[#41]} ?divs_d3_d4 <MI 21550 MOVE.L D4,-(A7)> Δ-4 {[4, '(A6-0xe)']|[#41]|[4, 'D4']} <MI 21552 MOVE.W (A6-0x4),-(A7)> Δ-2 {[4, '(A6-0xe)']|[#41]|[4, 'D4']|[2, '(A6-0x4)']} <Call 0x21556 0x210c6> {[4, '(A6-0xe)']|[#41]|[4, 'D4']|[2, '(A6-0x4)']} <POP 2155a-2155b StackAdj> Δ+12 ↓ {} <Blob 0x2155b [6] @> Δ-6 {[«6""»]} <POP 2156a-2156c StackAdj> Δ-4 {[«6""»]|[-4-]} <Lit 0x2156c 5> {[«6""»]|[$$ [OK]]} <Call 0x21578 0x103e0> {[«6""»]|[$$ [OK]]} WriteConsoleStringCrLf(str : String) <POP 2157e-21582 StackAdj> Δ+10 {} <POP 21582-215ac Naked> Σ0 ↓ ←0x21516 <Const 0x21582 0x5.2> Δ-2 {[#5]} <Const 0x21584 0x2.2> Δ-2 {[#5]|[#2]} <Call 0x21586 0x1048a> {[#5]|[#2]} DiProcCmd(board : Byte; cmd : Byte) <MI 2158c MOVE.L (A6-0xe),(A7)> {[4, '(A6-0xe)']} <Call 0x2158e 0x20632> {[4, '(A6-0xe)']} <POP 21592-21594 StackAdj> Δ+2 {[-2-]} <MI 21594 CLR.B (A7)> {[-2-]} <Const 0x21596 0x2.2> Δ-2 {[-2-]|[#2]} <Const 0x21598 0x1.4> Δ-4 {[-2-]|[#2]|[##1]} <Pointer.fp 0x2159c <LVAR -0x00a @>> Δ-4 {[-2-]|[#2]|[##1]|[@@-10]} <Pointer.fp 0x215a0 <LVAR -0x00e @ 4(r)>> Δ-4 {[-2-]|[#2]|[##1]|[@@-10]|[@@-14]} <Call 0x215a2 0x1038c> {[-2-]|[#2]|[##1]|[@@-10]|[@@-14]} CloseFile(a : L; VAR status : B; VAR file : File) <POP 215a8-215ac StackAdj> Δ+16 {} <POP 215ac-215b4 Epilogue> Σ0
@ 215b4 START <POP 215b4--0001 Body> <POP 215b4-215be Prologue> Σ0 <POP 215be-215dc RegCacheLoad> Σ0 ↓ <POP 215dc-21656 Naked> Σ0 ↓ <Call 0x215dc 0x10398> {} FSCALL_10398 <Const 0x215e2 0x5.4> Δ-4 {[##5]} <Call 0x215e6 0x104d8> {[##5]} ExpInit(a : Long) <POP 215ec-215ee StackAdj> Δ+2 {[-2-]} <MI 215ee CLR.B (A7)> {[-2-]} <Call 0x215f0 0x104d2> {[-2-]} SetExpInitDone(a : Byte) <POP 215f6-215f8 StackAdj> Δ+2 {} <Call 0x215f8 0x10538> {} IPC_Init(void) <Const 0x215fe 0x219a6.4> Δ-4 {[##137638]} <Call 0x21600 0x1052c> {[##137638]} IPC_GetString(VAR retval : String) <POP 21606-21608 StackAdj> Δ+4 {} <Const 0x21608 0x219aa.4> Δ-4 {[##137642]} <Call 0x2160a 0x10526> {[##137642]} IPC_GetBool() : Bool <POP 2160c-2160e StackAdj> Δ+4 {} <Const 0x2160e 0x219ab.4> Δ-4 {[##137643]} <Call 0x21610 0x10526> {[##137643]} IPC_GetBool() : Bool <POP 21612-21614 StackAdj> Δ+4 {} <Const 0x21614 0x219ac.4> Δ-4 {[##137644]} <Call 0x21616 0x10526> {[##137644]} IPC_GetBool() : Bool <POP 21618-2161a StackAdj> Δ+4 {} <Call 0x2161a 0x1051a> {} IPC_GetEnd(void) <Blob 0x21620 [4] 0x219a6> Δ-4 {[«4»]} <Blob 0x21622 [2] 0x219aa> Δ-2 {[«4»]|[«2»]} <Blob 0x21624 [2] 0x219ab> Δ-2 {[«4»]|[«2»]|[«2»]} <Blob 0x21626 [2] 0x219ac> Δ-2 {[«4»]|[«2»]|[«2»]|[«2»]} <Call 0x21628 0x21416> {[«4»]|[«2»]|[«2»]|[«2»]} <POP 2162c-21630 StackAdj> Δ+10 {} <Call 0x21630 0x10538> {} IPC_Init(void) <Const 0x21636 0x1.2> Δ-2 {[#1]} <Call 0x2163a 0x10502> {[#1]} IPC_PutBool(a : Bool) <POP 21640-21642 StackAdj> Δ+2 {} <Call 0x21642 0x10514> {} IPC_PutEnd(void) <MI 21648 CLR.B -(A7)> Δ-2 {[#0]} <Const 0x2164a 0x1.4> Δ-4 {[#0]|[##1]} <Call 0x2164e 0x103b8> {[#0]|[##1]} PopProgram(status : Byte; msg : String) <POP 21654-21656 StackAdj> Δ+6 {} <POP 21656-2165c Naked> Σ0 <Call 0x21656 0x10284> {} ?exit
@ 2178c PROG_FAIL <LVAR 0x008 1(r)> <POP 2178c-217f4 Body> <POP 2178c-217a2 Prologue> Σ0 ↓ <POP 217a2-217ec Naked> Σ0 ↓ <Blob 0x217a2 [14] @> Δ-14 {[«14""»]} <Const 0x217ae 0x3.2> Δ-2 {[«14""»]|[#3]} <POP 217b2-217b4 StackAdj> Δ-8 {[«14""»]|[#3]|[-8-]} <Lit 0x217b4 14> {[«14""»]|[#3]|[-4-]|[$$Words error :_]} <POP 217c6-217c8 StackAdj> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 217c8 MOVE.B (A6+0x8),D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 217cc EXTB.W D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 217ce EXTW.L D0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <MI 217d0 MOVE.L D0,-(A7)> Δ-4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']} <Call 0x217d2 0x102e4> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]|[4, 'D0']} Long2String(a : Long) : String <POP 217d8-217da StackAdj> Δ+4 {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} <Call 0x217da 0x102d0> {[«14""»]|[#3]|[-4-]|[$$Words error :_]|[-4-]} StringCat2(a, b : String) : String <POP 217e0-217e2 StackAdj> Δ+8 {[«14""»]|[#3]|[-4-]} <Call 0x217e2 0x103b8> {[«14""»]|[#3]|[-4-]} PopProgram(status : Byte; msg : String) <POP 217e8-217ec StackAdj> Δ+20 {} <POP 217ec-217f4 Epilogue> Σ0
@ 21848 EXP_FAIL <LVAR 0x00e 1(r)> <LVAR 0x00a 4(r)> <LVAR 0x008 1(r)> <POP 21848-21984 Body> <POP 21848-2185e Prologue> Σ0 ↓ <POP 2185e-21874 RegCacheLoad> Σ0 ↓ <POP 21874-218d4 Naked> Σ0 ↓ →0x2191c <Call 0x21874 0x103dc> {} WriteConsoleCrLf(void) <Blob 0x2187a [18] @> Δ-18 {[«18""»]} <POP 21886-21888 StackAdj> Δ-4 {[«18""»]|[-4-]} <Lit 0x21888 18> {[«18""»]|[$$Experiment error :]} <Call 0x21894 0x103e0> {[«18""»]|[$$Experiment error :]} WriteConsoleStringCrLf(str : String) <POP 21896-21897 StackAdj> Δ+22 ↓ {} <Blob 0x21897 [14] @> Δ-14 {[«14""»]} <POP 218a6-218a8 StackAdj> Δ-8 {[«14""»]|[-8-]} <Lit 0x218a8 13> {[«14""»]|[-4-]|[$$Board :_]} <POP 218b2-218b4 StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Board :_]|[-6-]} <MI 218b4 MOVE.B (A6+0xe),(A7)> {[«14""»]|[-4-]|[$$Board :_]|[-6-]} <Call 0x218b8 0x1049c> {[«14""»]|[-4-]|[$$Board :_]|[-6-]} BoardName(address : B) : String <POP 218be-218c0 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Board :_]|[-4-]} <Call 0x218c0 0x102d0> {[«14""»]|[-4-]|[$$Board :_]|[-4-]} StringCat2(a, b : String) : String <POP 218c6-218c8 StackAdj> Δ+8 {[«14""»]|[-4-]} <Call 0x218c8 0x103e0> {[«14""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 218ca-218cc StackAdj> Δ+18 {} <MI 218cc MOVEA.L (A6+0xa),A0> {} <MI 218d0 CMPA.W #0x01,A0> {} <MI 218d2 BEQ 0x2191c> {} <POP 218d4-2191c Naked> Σ0 ↓ <Blob 0x218d4 [14] @> Δ-14 {[«14""»]} <Blob 0x218e4 [30] (A0+0xfc)> Δ-30 {[«14""»]|[«30»]} <POP 218f4-218f6 StackAdj> Δ-8 {[«14""»]|[«30»]|[-8-]} <Lit 0x218f6 13> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]} <POP 21900-21902 StackAdj> Δ-4 {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[-4-]} <Lit 0x21902> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]} <Pointer.sp 0x21902 12> Δ-4 <Const 0x21906 0x1.2> Δ-2 <Const 0x21908 0x1e.2> Δ-2 <Call 0x2190a 0x102c4> StringLit(Src : Pointer; Offset: W; Len : W) : String <POP 2190c-2190e StackAdj> Δ+8 <Call 0x2190e 0x102d0> {[«14""»]|[«30»]|[-4-]|[$$Experiment :_]|[$$…]} StringCat2(a, b : String) : String <POP 21914-21916 StackAdj> Δ+8 {[«14""»]|[«30»]|[-4-]} <Call 0x21916 0x103e0> {[«14""»]|[«30»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 21918-2191c StackAdj> Δ+48 {} <POP 2191c-2197c Naked> Σ0 ↓ ←0x21874 <Blob 0x2191c [14] @> Δ-14 {[«14""»]} <POP 2192c-2192e StackAdj> Δ-8 {[«14""»]|[-8-]} <Lit 0x2192e 13> {[«14""»]|[-4-]|[$$Status :_]} <POP 21938-2193a StackAdj> Δ-6 {[«14""»]|[-4-]|[$$Status :_]|[-6-]} <MI 2193a MOVE.B (A6+0x8),(A7)> {[«14""»]|[-4-]|[$$Status :_]|[-6-]} <Call 0x2193e 0x104a2> {[«14""»]|[-4-]|[$$Status :_]|[-6-]} ExpStatus2Text(status.B, &String) <POP 21944-21946 StackAdj> Δ+2 {[«14""»]|[-4-]|[$$Status :_]|[-4-]} <Call 0x21946 0x102d0> {[«14""»]|[-4-]|[$$Status :_]|[-4-]} StringCat2(a, b : String) : String <POP 2194c-2194e StackAdj> Δ+8 {[«14""»]|[-4-]} <Call 0x2194e 0x103e0> {[«14""»]|[-4-]} WriteConsoleStringCrLf(str : String) <POP 21950-21951 StackAdj> Δ+18 ↓ {} <Blob 0x21951 [24] @> Δ-24 {[«24""»]} <Const 0x21960 0x2.2> Δ-2 {[«24""»]|[#2]} <POP 21964-21966 StackAdj> Δ-4 {[«24""»]|[#2]|[-4-]} <Lit 0x21966 23> {[«24""»]|[#2]|[$$Fatal experiment error.]} <Call 0x21974 0x103b8> {[«24""»]|[#2]|[$$Fatal experiment error.]} PopProgram(status : Byte; msg : String) <POP 2197a-2197c StackAdj> Δ+30 {} <POP 2197c-21984 Epilogue> Σ0
00020000 ; -------------------------------------------------------------------------------------- 00020000 ; R1000.Disassembly modules: 00020000 ; import all 00020000 ; import kind.program 00020000 ; no ident.5537b1cf44405481 00020000 ; -------------------------------------------------------------------------------------- 00020000 stack.top: 00020000 00 04 00 00 | | .CODE 0x40000 ; STACK.END 00020004 00 02 15 b4 | | .CODE START 00020008 00 01 02 88 | | .CODE FSCALL_10288 0002000c heap.top: 0002000c 00 02 19 c0 | | .PTR 0x219c0 00020010 code.end: 00020010 00 02 19 84 | | .PTR 0x21984 00020014 00 00 00 00 | | .CONST 0x00000000 00020018 programfailurehandler: 00020018 00 02 17 8c | | .CODE PROG_FAIL 0002001c experimentfailurehandler: 0002001c 00 02 18 48 | H | .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 4d 69 63 72 6f 63 6f 64 |Microcod| .TXT 'Microcode is not for this type of processor.' 00020136 4d 69 63 72 6f 63 6f 64 |Microcod| .TXT 'Microcode file size is inconsistent.' 0002015a 46 69 6c 65 |File | .TXT 'File' 0002015e 20 20 3a 5f | :_ | .TXT ' :_' 00020162 42 6f 75 6e |Boun | .TXT 'Boun' 00020166 64 20 3a 5f |d :_ | .TXT 'd :_' 0002016a 44 65 6c 74 |Delt | .TXT 'Delt' 0002016e 61 20 3a 5f |a :_ | .TXT 'a :_' 00020172 4d 6f 6d 20 |Mom | .TXT 'Mom ' 00020176 20 20 3a 5f | :_ | .TXT ' :_' 0002017a 4c 41 53 54 5f 55 43 4f |LAST_UCO| .TXT 'LAST_UCODE' 00020184 4c 41 53 54 5f 55 43 4f |LAST_UCO| .TXT 'LAST_UCODE' 0002018e 5f 32 30 30 |_200 | .TXT '_200' 00020192 2e 54 59 50 |.TYP | .TXT '.TYP' 00020196 5f 32 30 30 |_200 | .TXT '_200' 0002019a 2e 56 41 4c |.VAL | .TXT '.VAL' 0002019e 5f 32 30 30 |_200 | .TXT '_200' 000201a2 2e 46 49 55 |.FIU | .TXT '.FIU' 000201a6 5f 32 30 30 |_200 | .TXT '_200' 000201aa 2e 53 45 51 |.SEQ | .TXT '.SEQ' 000201ae 5f 32 30 30 |_200 | .TXT '_200' 000201b2 2e 49 4f 43 |.IOC | .TXT '.IOC' 000201b6 4c 4f 41 44 5f 52 45 47 |LOAD_REG| .TXT 'LOAD_REGISTER_FILE' 000201c8 2e 20 |. | .TXT '. ' 000201ca 4c 4f 41 44 5f 52 45 47 |LOAD_REG| .TXT 'LOAD_REGISTER_FILE' 000201dc 4c 4f 41 44 5f 44 49 53 |LOAD_DIS| .TXT 'LOAD_DISPATCH_RAMS' 000201ee 2e 20 |. | .TXT '. ' 000201f0 4c 4f 41 44 5f 43 4f 4e |LOAD_CON| .TXT 'LOAD_CONTROL_STORE' 00020202 2e 20 |. | .TXT '. ' 00020204 4c 6f 61 64 69 6e 67 20 |Loading | .TXT 'Loading Register Files and Dispatch Rams_ ' 0002022e 20 5b 4f 4b 5d 20 | [OK] | .TXT ' [OK] ' 00020234 4c 6f 61 64 69 6e 67 20 |Loading | .TXT 'Loading Register Files_ ' 0002024c 20 5b 4f 4b | [OK | .XXX[0x4] 00020250 5d 20 |] | .XXX[0x2] 00020252 4c 6f 61 64 69 6e 67 20 |Loading | .TXT 'Loading Control Store_' 00020268 20 5b 4f 4b 5d 20 | [OK] | .TXT ' [OK] ' 0002026e 06 07 | | .XXX[0x2] 00020270 03 02 04 00 | | .XXX[0x4] 00020274 ; -------------------------------------------------------------------------------------- 00020274 ; OMSI PASCAL Function 00020274 ; <LVAR 0x00c 4(r)> 00020274 ; <LVAR 0x008 4(rw)> 00020274 ; -------------------------------------------------------------------------------------- 00020274 4e 56 ff d6 |NV | LINK.W A6,#0xffd6 00020278 bf d5 | | CMPA.L (A5),A7 0002027a 62 06 |b | BHI 0x20282 0002027c 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020280 4e 76 |Nv | TRAPV 00020282 de fc 00 22 | " | ADDA.W #0x22,A7 00020286 48 e7 db 00 |H | MOVEM.L D7+D6+D4+D3+D1+D0,-(A7) 0002028a 7c 00 || | MOVEQ.L #0x00,D6 0002028c 20 2e 00 08 | . | MOVE.L (A6+0x8),D0 00020290 0c 80 00 00 01 ff | | CMPI.L #0x000001ff,D0 00020296 63 02 |c | BLS 0x2029a 00020298 4e 4f |NO | TRAP #15 0002029a e3 80 | | ASL.L #0x1,D0 0002029c 42 81 |B | CLR.L D1 0002029e 32 34 08 00 |24 | MOVE.W (A4+D0.L),D1 000202a2 2e 01 |. | MOVE.L D1,D7 000202a4 4a 06 |J | TST.B D6 000202a6 67 06 |g | BEQ 0x202ae 000202a8 52 ae 00 08 |R | ADDQ.L #0x1,(A6+0x8) 000202ac 60 10 |` | BRA 0x202be 000202ae 28 07 |( | MOVE.L D7,D4 000202b0 26 3c 00 00 01 00 |&< | MOVE.L #0x100,D3 000202b6 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 000202bc 2e 04 |. | MOVE.L D4,D7 000202be 02 87 00 00 00 ff | | ANDI.L #0x000000ff,D7 000202c4 44 06 |D | NEG.B D6 000202c6 52 06 |R | ADDQ.B #0x1,D6 000202c8 4a 87 |J | TST.L D7 000202ca 67 18 |g | BEQ 0x202e4 000202cc 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000202d0 0c 87 00 00 00 ff | | CMPI.L #0x000000ff,D7 000202d6 63 02 |c | BLS 0x202da 000202d8 4e 4f |NO | TRAP #15 000202da 1f 07 | | MOVE.B D7,-(A7) 000202dc 4e b9 00 01 02 c0 |N | JSR AppendChar(MOD b : String; a : char) 000202e2 5c 4f |\O | ADDQ.L #0x6,A7 000202e4 4a 87 |J | TST.L D7 000202e6 66 a4 |f | BNE 0x2028c 000202e8 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000202ec 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 000202f2 58 4f |XO | ADDQ.L #0x4,A7 000202f4 4c df 00 db |L | MOVEM.L (A7)+,D0+D1+D3+D4+D6+D7 000202f8 4e 5e |N^ | UNLK A6 000202fa 4e 75 |Nu | RTS 000202fc ; -------------------------------------------------------------------------------------- 000202fc ; OMSI PASCAL Function 000202fc ; <LVAR 0x018 4(r)> 000202fc ; <LVAR 0x014 4(r)> 000202fc ; <LVAR 0x010 4(r)> 000202fc ; <LVAR 0x00c 4(r)> 000202fc ; <LVAR 0x008 4(r)> 000202fc ; <LVAR -0x006 @ 4(r)> 000202fc ; <LVAR -0x00a @ 4(rw)> 000202fc ; <LVAR -0x00e @ 4(rw)> 000202fc ; <LVAR -0x012 @ 4(rw)> 000202fc ; <LVAR -0x018 @ 1(r)> 000202fc ; <LVAR -0x414 2(r)> 000202fc ; <LVAR -0x416 2(r)> 000202fc ; <LVAR -0x418 @ 2(r)> 000202fc ; -------------------------------------------------------------------------------------- 000202fc 4e 56 fb 6a |NV j | LINK.W A6,#0xfb6a 00020300 bf d5 | | CMPA.L (A5),A7 00020302 62 06 |b | BHI 0x2030a 00020304 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020308 4e 76 |Nv | TRAPV 0002030a de fc 00 7e | ~ | ADDA.W #0x7e,A7 0002030e 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020312 45 ee ff e8 |E | LEA.L (A6-0x18),A2 00020316 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 0002031c 74 01 |t | MOVEQ.L #0x01,D2 0002031e 7a 02 |z | MOVEQ.L #0x02,D5 00020320 7c 14 || | MOVEQ.L #0x14,D6 00020322 20 6e 00 10 | n | MOVEA.L (A6+0x10),A0 00020326 2f 08 |/ | MOVE.L A0,-(A7) 00020328 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 0002032c 42 27 |B' | CLR.B -(A7) 0002032e 1f 05 | | MOVE.B D5,-(A7) 00020330 48 78 00 00 |Hx | PEA.L 0x0 00020334 48 52 |HR | PEA.L (A2) 00020336 48 50 |HP | PEA.L (A0) 00020338 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 0002033e de c6 | | ADDA.W D6,A7 00020340 22 50 |"P | MOVEA.L (A0),A1 00020342 30 29 00 20 |0) | MOVE.W (A1+0x20),D0 00020346 48 c0 |H | EXTW.L D0 00020348 2e 00 |. | MOVE.L D0,D7 0002034a 2f 10 |/ | MOVE.L (A0),-(A7) 0002034c 42 67 |Bg | CLR.W -(A7) 0002034e 42 67 |Bg | CLR.W -(A7) 00020350 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020354 1f 05 | | MOVE.B D5,-(A7) 00020356 43 ee fb e8 |C | LEA.L (A6-0x418),A1 0002035a 2f 09 |/ | MOVE.L A1,-(A7) 0002035c 48 52 |HR | PEA.L (A2) 0002035e 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020364 de c6 | | ADDA.W D6,A7 00020366 22 6e 00 0c |"n | MOVEA.L (A6+0xc),A1 0002036a 42 80 |B | CLR.L D0 0002036c 30 2e fb e8 |0. | MOVE.W (A6-0x418),D0 00020370 22 80 |" | MOVE.L D0,(A1) 00020372 22 6e 00 08 |"n | MOVEA.L (A6+0x8),A1 00020376 32 2e fb ea |2. | MOVE.W (A6-0x416),D1 0002037a e0 49 | I | LSR.W #0x8,D1 0002037c 12 81 | | MOVE.B D1,(A1) 0002037e 32 2e fb ea |2. | MOVE.W (A6-0x416),D1 00020382 02 41 00 ff | A | ANDI.W #0x00ff,D1 00020386 43 bc 00 ff |C | CHK.W #0xff,D1 0002038a 13 41 00 01 | A | MOVE.B D1,(A1+0x1) 0002038e 32 2e fb ec |2. | MOVE.W (A6-0x414),D1 00020392 0c 41 00 c8 | A | CMPI.W #0x00c8,D1 00020396 67 2a |g* | BEQ 0x203c2 00020398 41 fa fd 9c |A | LEA.L 0x20136,A0 0002039c 72 0a |r | MOVEQ.L #0x0a,D1 0002039e 2f 20 |/ | MOVE.L -(A0),-(A7) 000203a0 51 c9 ff fc |Q | DBF D1,0x2039e 000203a4 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 000203a8 59 4f |YO | SUBQ.L #0x4,A7 000203aa 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000203ae 3f 02 |? | MOVE.W D2,-(A7) 000203b0 3f 3c 00 2c |?< , | MOVE.W #0x2c,-(A7) 000203b4 4e 93 |N | JSR (A3) 000203b6 50 4f |PO | ADDQ.L #0x8,A7 000203b8 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000203be de fc 00 32 | 2 | ADDA.W #0x32,A7 000203c2 22 07 |" | MOVE.L D7,D1 000203c4 04 81 00 00 00 29 | ) | SUBI.L #0x00000029,D1 000203ca 28 00 |( | MOVE.L D0,D4 000203cc 76 20 |v | MOVEQ.L #0x20,D3 000203ce 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 000203d4 b2 84 | | CMP.L D4,D1 000203d6 67 2a |g* | BEQ 0x20402 000203d8 41 fa fd 80 |A | LEA.L 0x2015a,A0 000203dc 70 08 |p | MOVEQ.L #0x08,D0 000203de 2f 20 |/ | MOVE.L -(A0),-(A7) 000203e0 51 c8 ff fc |Q | DBF D0,0x203de 000203e4 1f 3c 00 0e | < | MOVE.B #0x0e,-(A7) 000203e8 59 4f |YO | SUBQ.L #0x4,A7 000203ea 48 6f 00 06 |Ho | PEA.L (A7+0x6) 000203ee 3f 02 |? | MOVE.W D2,-(A7) 000203f0 3f 3c 00 24 |?< $ | MOVE.W #0x24,-(A7) 000203f4 4e 93 |N | JSR (A3) 000203f6 50 4f |PO | ADDQ.L #0x8,A7 000203f8 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000203fe de fc 00 2a | * | ADDA.W #0x2a,A7 00020402 2f 3a fd 5a |/: Z | MOVE.L 0x2015e,-(A7) 00020406 2f 3a fd 52 |/: R | MOVE.L 0x2015a,-(A7) 0002040a 51 4f |QO | SUBQ.L #0x8,A7 0002040c 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00020410 3f 02 |? | MOVE.W D2,-(A7) 00020412 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00020416 4e 93 |N | JSR (A3) 00020418 2e ae 00 18 |. | MOVE.L (A6+0x18),(A7) 0002041c 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 00020422 58 4f |XO | ADDQ.L #0x4,A7 00020424 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002042a 50 4f |PO | ADDQ.L #0x8,A7 0002042c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00020432 50 4f |PO | ADDQ.L #0x8,A7 00020434 2e ba fd 30 |. 0 | MOVE.L 0x20166,(A7) 00020438 2f 3a fd 28 |/: ( | MOVE.L 0x20162,-(A7) 0002043c 59 4f |YO | SUBQ.L #0x4,A7 0002043e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020442 3f 02 |? | MOVE.W D2,-(A7) 00020444 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00020448 4e 93 |N | JSR (A3) 0002044a 50 4f |PO | ADDQ.L #0x8,A7 0002044c 48 78 00 04 |Hx | PEA.L 0x4 00020450 49 ee fb e8 |I | LEA.L (A6-0x418),A4 00020454 4e ba fe 1e |N | JSR 0x20274 00020458 de fc 00 0c | | ADDA.W #0xc,A7 0002045c 2e ba fd 10 |. | MOVE.L 0x2016e,(A7) 00020460 2f 3a fd 08 |/: | MOVE.L 0x2016a,-(A7) 00020464 59 4f |YO | SUBQ.L #0x4,A7 00020466 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002046a 3f 02 |? | MOVE.W D2,-(A7) 0002046c 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00020470 4e 93 |N | JSR (A3) 00020472 50 4f |PO | ADDQ.L #0x8,A7 00020474 48 78 00 3c |Hx < | PEA.L 0x3c 00020478 49 ee fb e8 |I | LEA.L (A6-0x418),A4 0002047c 4e ba fd f6 |N | JSR 0x20274 00020480 de fc 00 0c | | ADDA.W #0xc,A7 00020484 2e ba fc f0 |. | MOVE.L 0x20176,(A7) 00020488 2f 3a fc e8 |/: | MOVE.L 0x20172,-(A7) 0002048c 59 4f |YO | SUBQ.L #0x4,A7 0002048e 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020492 3f 02 |? | MOVE.W D2,-(A7) 00020494 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 00020498 4e 93 |N | JSR (A3) 0002049a 50 4f |PO | ADDQ.L #0x8,A7 0002049c 48 78 00 14 |Hx | PEA.L 0x14 000204a0 49 ee fb e8 |I | LEA.L (A6-0x418),A4 000204a4 4e ba fd ce |N | JSR 0x20274 000204a8 de fc 00 10 | | ADDA.W #0x10,A7 000204ac 41 fa fc d6 |A | LEA.L 0x20184,A0 000204b0 70 04 |p | MOVEQ.L #0x04,D0 000204b2 3f 20 |? | MOVE.W -(A0),-(A7) 000204b4 51 c8 ff fc |Q | DBF D0,0x204b2 000204b8 59 4f |YO | SUBQ.L #0x4,A7 000204ba 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000204be 3f 02 |? | MOVE.W D2,-(A7) 000204c0 3f 3c 00 0a |?< | MOVE.W #0xa,-(A7) 000204c4 4e 93 |N | JSR (A3) 000204c6 50 4f |PO | ADDQ.L #0x8,A7 000204c8 2d 5f ff ee |-_ | MOVE.L (A7)+,(A6-0x12) 000204cc de fc 00 0a | | ADDA.W #0xa,A7 000204d0 20 6e 00 14 | n | MOVEA.L (A6+0x14),A0 000204d4 4a 10 |J | TST.B (A0) 000204d6 66 00 01 44 |f D | BNE 0x2061c 000204da 2f 2e ff ee |/. | MOVE.L (A6-0x12),-(A7) 000204de 42 27 |B' | CLR.B -(A7) 000204e0 42 27 |B' | CLR.B -(A7) 000204e2 48 78 00 00 |Hx | PEA.L 0x0 000204e6 48 52 |HR | PEA.L (A2) 000204e8 48 6e ff fa |Hn | PEA.L (A6-0x6) 000204ec 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000204f2 de c6 | | ADDA.W D6,A7 000204f4 4a 12 |J | TST.B (A2) 000204f6 67 06 |g | BEQ 0x204fe 000204f8 10 82 | | MOVE.B D2,(A0) 000204fa 60 00 01 20 |` | BRA 0x2061c 000204fe 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00020502 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 00020508 2e ae ff fa |. | MOVE.L (A6-0x6),(A7) 0002050c 42 67 |Bg | CLR.W -(A7) 0002050e 42 67 |Bg | CLR.W -(A7) 00020510 3f 3c 00 40 |?< @ | MOVE.W #0x40,-(A7) 00020514 1f 05 | | MOVE.B D5,-(A7) 00020516 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 0002051a 48 52 |HR | PEA.L (A2) 0002051c 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020522 de fc 00 0e | | ADDA.W #0xe,A7 00020526 2e ae ff f2 |. | MOVE.L (A6-0xe),(A7) 0002052a 2f 2e 00 18 |/. | MOVE.L (A6+0x18),-(A7) 0002052e 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 00020534 50 4f |PO | ADDQ.L #0x8,A7 00020536 4a 1f |J | TST.B (A7)+ 00020538 66 02 |f | BNE 0x2053c 0002053a 10 82 | | MOVE.B D2,(A0) 0002053c 48 6e ff f2 |Hn | PEA.L (A6-0xe) 00020540 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020546 58 4f |XO | ADDQ.L #0x4,A7 00020548 4a 10 |J | TST.B (A0) 0002054a 66 00 00 86 |f | BNE 0x205d2 0002054e 59 4f |YO | SUBQ.L #0x4,A7 00020550 22 6f 00 04 |"o | MOVEA.L (A7+0x4),A1 00020554 22 51 |"Q | MOVEA.L (A1),A1 00020556 59 4f |YO | SUBQ.L #0x4,A7 00020558 1e a9 00 3a | : | MOVE.B (A1+0x3a),(A7) 0002055c 1f 69 00 3b 00 01 | i ; | MOVE.B (A1+0x3b),(A7+0x1) 00020562 1f 69 00 3c 00 02 | i < | MOVE.B (A1+0x3c),(A7+0x2) 00020568 1f 69 00 3d 00 03 | i = | MOVE.B (A1+0x3d),(A7+0x3) 0002056e 4e b9 00 01 03 08 |N | JSR TimeToText() 00020574 58 4f |XO | ADDQ.L #0x4,A7 00020576 2d 57 ff f2 |-W | MOVE.L (A7),(A6-0xe) 0002057a 22 6e ff fa |"n | MOVEA.L (A6-0x6),A1 0002057e 59 4f |YO | SUBQ.L #0x4,A7 00020580 1e a9 00 3a | : | MOVE.B (A1+0x3a),(A7) 00020584 1f 69 00 3b 00 01 | i ; | MOVE.B (A1+0x3b),(A7+0x1) 0002058a 1f 69 00 3c 00 02 | i < | MOVE.B (A1+0x3c),(A7+0x2) 00020590 1f 69 00 3d 00 03 | i = | MOVE.B (A1+0x3d),(A7+0x3) 00020596 4e b9 00 01 03 08 |N | JSR TimeToText() 0002059c 58 4f |XO | ADDQ.L #0x4,A7 0002059e 2d 57 ff f6 |-W | MOVE.L (A7),(A6-0xa) 000205a2 54 4f |TO | ADDQ.L #0x2,A7 000205a4 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 000205a8 2f 2e ff f6 |/. | MOVE.L (A6-0xa),-(A7) 000205ac 4e b9 00 01 02 c8 |N | JSR StringEqual(a, b : String) : Byte 000205b2 50 4f |PO | ADDQ.L #0x8,A7 000205b4 4a 1f |J | TST.B (A7)+ 000205b6 66 02 |f | BNE 0x205ba 000205b8 10 82 | | MOVE.B D2,(A0) 000205ba 48 6e ff f2 |Hn | PEA.L (A6-0xe) 000205be 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000205c4 58 4f |XO | ADDQ.L #0x4,A7 000205c6 48 6e ff f6 |Hn | PEA.L (A6-0xa) 000205ca 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 000205d0 58 4f |XO | ADDQ.L #0x4,A7 000205d2 48 6e ff f2 |Hn | PEA.L (A6-0xe) 000205d6 4e b9 00 01 02 b8 |N | JSR NewString(VAR a : String) 000205dc 2e ae ff fa |. | MOVE.L (A6-0x6),(A7) 000205e0 42 67 |Bg | CLR.W -(A7) 000205e2 42 67 |Bg | CLR.W -(A7) 000205e4 3f 3c 00 40 |?< @ | MOVE.W #0x40,-(A7) 000205e8 1f 05 | | MOVE.B D5,-(A7) 000205ea 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 000205ee 48 52 |HR | PEA.L (A2) 000205f0 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 000205f6 de c6 | | ADDA.W D6,A7 000205f8 48 6e ff f2 |Hn | PEA.L (A6-0xe) 000205fc 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020602 54 4f |TO | ADDQ.L #0x2,A7 00020604 42 17 |B | CLR.B (A7) 00020606 1f 05 | | MOVE.B D5,-(A7) 00020608 48 78 00 01 |Hx | PEA.L 0x1 0002060c 48 52 |HR | PEA.L (A2) 0002060e 48 6e ff fa |Hn | PEA.L (A6-0x6) 00020612 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00020618 de fc 00 10 | | ADDA.W #0x10,A7 0002061c 58 4f |XO | ADDQ.L #0x4,A7 0002061e 48 6e ff ee |Hn | PEA.L (A6-0x12) 00020622 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020628 58 4f |XO | ADDQ.L #0x4,A7 0002062a 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 0002062e 4e 5e |N^ | UNLK A6 00020630 4e 75 |Nu | RTS 00020632 ; -------------------------------------------------------------------------------------- 00020632 ; OMSI PASCAL Function 00020632 ; <LVAR 0x008 4(r)> 00020632 ; <LVAR -0x004 @> 00020632 ; <LVAR -0x008 @ 4(r)> 00020632 ; <LVAR -0x00c @ 4(rw)> 00020632 ; <LVAR -0x010 @ 4(rw)> 00020632 ; -------------------------------------------------------------------------------------- 00020632 4e 56 ff 92 |NV | LINK.W A6,#0xff92 00020636 bf d5 | | CMPA.L (A5),A7 00020638 62 06 |b | BHI 0x20640 0002063a 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002063e 4e 76 |Nv | TRAPV 00020640 de fc 00 5e | ^ | ADDA.W #0x5e,A7 00020644 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 00020648 47 ee ff f8 |G | LEA.L (A6-0x8),A3 0002064c 49 ee ff f0 |I | LEA.L (A6-0x10),A4 00020650 72 01 |r | MOVEQ.L #0x01,D1 00020652 74 02 |t | MOVEQ.L #0x02,D2 00020654 76 0a |v | MOVEQ.L #0x0a,D3 00020656 78 1e |x | MOVEQ.L #0x1e,D4 00020658 7a 10 |z | MOVEQ.L #0x10,D5 0002065a 41 fa fb 32 |A 2 | LEA.L 0x2018e,A0 0002065e 70 04 |p | MOVEQ.L #0x04,D0 00020660 3f 20 |? | MOVE.W -(A0),-(A7) 00020662 51 c8 ff fc |Q | DBF D0,0x20660 00020666 59 4f |YO | SUBQ.L #0x4,A7 00020668 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002066c 3f 01 |? | MOVE.W D1,-(A7) 0002066e 3f 03 |? | MOVE.W D3,-(A7) 00020670 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020676 50 4f |PO | ADDQ.L #0x8,A7 00020678 28 9f |( | MOVE.L (A7)+,(A4) 0002067a de c3 | | ADDA.W D3,A7 0002067c 20 6e 00 08 | n | MOVEA.L (A6+0x8),A0 00020680 9e c4 | | SUBA.W D4,A7 00020682 22 4f |"O | MOVEA.L A7,A1 00020684 24 48 |$H | MOVEA.L A0,A2 00020686 70 1d |p | MOVEQ.L #0x1d,D0 00020688 12 da | | MOVE.B (A2)+,(A1)+ 0002068a 51 c8 ff fc |Q | DBF D0,0x20688 0002068e 59 4f |YO | SUBQ.L #0x4,A7 00020690 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020694 3f 01 |? | MOVE.W D1,-(A7) 00020696 3f 04 |? | MOVE.W D4,-(A7) 00020698 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002069e 50 4f |PO | ADDQ.L #0x8,A7 000206a0 2d 5f ff f4 |-_ | MOVE.L (A7)+,(A6-0xc) 000206a4 de fc 00 1a | | ADDA.W #0x1a,A7 000206a8 2e 94 |. | MOVE.L (A4),(A7) 000206aa 1f 01 | | MOVE.B D1,-(A7) 000206ac 1f 02 | | MOVE.B D2,-(A7) 000206ae 48 78 00 01 |Hx | PEA.L 0x1 000206b2 48 6e ff fc |Hn | PEA.L (A6-0x4) 000206b6 48 53 |HS | PEA.L (A3) 000206b8 4e b9 00 01 03 80 |N | JSR OpenFile(name : String; a : W; b: B; c : L; VAR status : B; VAR file : File) 000206be de c5 | | ADDA.W D5,A7 000206c0 2e 93 |. | MOVE.L (A3),(A7) 000206c2 42 67 |Bg | CLR.W -(A7) 000206c4 42 67 |Bg | CLR.W -(A7) 000206c6 3f 3c 00 40 |?< @ | MOVE.W #0x40,-(A7) 000206ca 1f 02 | | MOVE.B D2,-(A7) 000206cc 2f 2e ff f4 |/. | MOVE.L (A6-0xc),-(A7) 000206d0 48 6e ff fc |Hn | PEA.L (A6-0x4) 000206d4 4e b9 00 01 03 88 |N | JSR WriteFile(file : File; y : W; x : W; a : W; b: B; c: L; d: L) 000206da de fc 00 14 | | ADDA.W #0x14,A7 000206de 22 53 |"S | MOVEA.L (A3),A1 000206e0 13 68 00 3a 00 3a | h : : | MOVE.B (A0+0x3a),(A1+0x3a) 000206e6 13 68 00 3b 00 3b | h ; ; | MOVE.B (A0+0x3b),(A1+0x3b) 000206ec 13 68 00 3c 00 3c | h < < | MOVE.B (A0+0x3c),(A1+0x3c) 000206f2 13 68 00 3d 00 3d | h = = | MOVE.B (A0+0x3d),(A1+0x3d) 000206f8 13 41 00 4c | A L | MOVE.B D1,(A1+0x4c) 000206fc 42 27 |B' | CLR.B -(A7) 000206fe 1f 02 | | MOVE.B D2,-(A7) 00020700 48 78 00 01 |Hx | PEA.L 0x1 00020704 48 6e ff fc |Hn | PEA.L (A6-0x4) 00020708 48 53 |HS | PEA.L (A3) 0002070a 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 00020710 de c5 | | ADDA.W D5,A7 00020712 48 6e ff f4 |Hn | PEA.L (A6-0xc) 00020716 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 0002071c 58 4f |XO | ADDQ.L #0x4,A7 0002071e 48 54 |HT | PEA.L (A4) 00020720 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020726 58 4f |XO | ADDQ.L #0x4,A7 00020728 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 0002072c 4e 5e |N^ | UNLK A6 0002072e 4e 75 |Nu | RTS 00020730 ; -------------------------------------------------------------------------------------- 00020730 ; OMSI PASCAL Function 00020730 ; <LVAR 0x00c @ 4(r)> 00020730 ; <LVAR 0x00a 1(r)> 00020730 ; <LVAR 0x008 1(r)> 00020730 ; -------------------------------------------------------------------------------------- 00020730 4e 56 ff ba |NV | LINK.W A6,#0xffba 00020734 bf d5 | | CMPA.L (A5),A7 00020736 62 06 |b | BHI 0x2073e 00020738 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002073c 4e 76 |Nv | TRAPV 0002073e de fc 00 3a | : | ADDA.W #0x3a,A7 00020742 48 e7 c1 d8 |H | MOVEM.L A4+A3+A1+A0+D7+D1+D0,-(A7) 00020746 43 f9 00 02 19 84 |C | LEA.L 0x21984,A1 0002074c 72 01 |r | MOVEQ.L #0x01,D1 0002074e 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 00020752 1e 2e 00 0a | . | MOVE.B (A6+0xa),D7 00020756 be 17 | | CMP.B (A7),D7 00020758 6e 00 00 ac |n | BGT 0x20806 0002075c 10 07 | | MOVE.B D7,D0 0002075e 48 80 |H | EXTB.W D0 00020760 0c 40 00 04 | @ | CMPI.W #0x0004,D0 00020764 63 02 |c | BLS 0x20768 00020766 4e 4e |NN | TRAP #14 00020768 d0 40 | @ | ADD.W D0,D0 0002076a 30 3b 00 06 4e fb 00 02 |0; N | SWITCH D0.W 00020772 00 0a | | .CONST 0xa ; [0x0] -> 0x2077c 00020774 00 14 | | .CONST 0x14 ; [0x1] -> 0x20786 00020776 00 1e | | .CONST 0x1e ; [0x2] -> 0x20790 00020778 00 28 | ( | .CONST 0x28 ; [0x3] -> 0x2079a 0002077a 00 32 | 2 | .CONST 0x32 ; [0x4] -> 0x207a4 0002077c switch@0x2076a[0x0]: 0002077c 2f 3a fa 14 |/: | MOVE.L 0x20192,-(A7) 00020780 2f 3a fa 0c |/: | MOVE.L 0x2018e,-(A7) 00020784 60 26 |`& | BRA 0x207ac 00020786 switch@0x2076a[0x1]: 00020786 2f 3a fa 12 |/: | MOVE.L 0x2019a,-(A7) 0002078a 2f 3a fa 0a |/: | MOVE.L 0x20196,-(A7) 0002078e 60 1c |` | BRA 0x207ac 00020790 switch@0x2076a[0x2]: 00020790 2f 3a fa 10 |/: | MOVE.L 0x201a2,-(A7) 00020794 2f 3a fa 08 |/: | MOVE.L 0x2019e,-(A7) 00020798 60 12 |` | BRA 0x207ac 0002079a switch@0x2076a[0x3]: 0002079a 2f 3a fa 0e |/: | MOVE.L 0x201aa,-(A7) 0002079e 2f 3a fa 06 |/: | MOVE.L 0x201a6,-(A7) 000207a2 60 08 |` | BRA 0x207ac 000207a4 switch@0x2076a[0x4]: 000207a4 2f 3a fa 0c |/: | MOVE.L 0x201b2,-(A7) 000207a8 2f 3a fa 04 |/: | MOVE.L 0x201ae,-(A7) 000207ac 59 4f |YO | SUBQ.L #0x4,A7 000207ae 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000207b2 3f 01 |? | MOVE.W D1,-(A7) 000207b4 3f 3c 00 08 |?< | MOVE.W #0x8,-(A7) 000207b8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000207be 50 4f |PO | ADDQ.L #0x8,A7 000207c0 28 5f |(_ | MOVEA.L (A7)+,A4 000207c2 50 4f |PO | ADDQ.L #0x8,A7 000207c4 51 4f |QO | SUBQ.L #0x8,A7 000207c6 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 000207ca 4e b9 00 01 02 cc |N | JSR StringDup(a : String) : String 000207d0 2e 8c |. | MOVE.L A4,(A7) 000207d2 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000207d8 50 4f |PO | ADDQ.L #0x8,A7 000207da 26 5f |&_ | MOVEA.L (A7)+,A3 000207dc 2f 0b |/ | MOVE.L A3,-(A7) 000207de 10 07 | | MOVE.B D7,D0 000207e0 48 80 |H | EXTB.W D0 000207e2 e5 40 | @ | ASL.W #0x2,D0 000207e4 20 49 | I | MOVEA.L A1,A0 000207e6 48 70 00 08 |Hp | PEA.L (A0+D0.W+#0x8) 000207ea 4e b9 00 01 04 60 |N ` | JSR ExpLoad(a : String; b: Pointer) 000207f0 50 4f |PO | ADDQ.L #0x8,A7 000207f2 10 07 | | MOVE.B D7,D0 000207f4 48 80 |H | EXTB.W D0 000207f6 3f 00 |? | MOVE.W D0,-(A7) 000207f8 20 49 | I | MOVEA.L A1,A0 000207fa 11 81 00 1c | | MOVE.B D1,(A0+D0.W+#0x1c) 000207fe 3e 1f |> | MOVE.W (A7)+,D7 00020800 52 47 |RG | ADDQ.W #0x1,D7 00020802 68 00 ff 52 |h R | BVC 0x20756 00020806 54 4f |TO | ADDQ.L #0x2,A7 00020808 48 6e 00 0c |Hn | PEA.L (A6+0xc) 0002080c 4e b9 00 01 02 bc |N | JSR FreeString(VAR a : String) 00020812 58 4f |XO | ADDQ.L #0x4,A7 00020814 4c df 1b 83 |L | MOVEM.L (A7)+,D0+D1+D7+A0+A1+A3+A4 00020818 4e 5e |N^ | UNLK A6 0002081a 4e 75 |Nu | RTS 0002081c ; -------------------------------------------------------------------------------------- 0002081c ; OMSI PASCAL Function 0002081c ; <LVAR 0x008 1(r)> 0002081c ; <LVAR -0x004 @ 1(rw)> 0002081c ; <LVAR -0x006 @ 1(r)> 0002081c ; <LVAR -0x007 @> 0002081c ; -------------------------------------------------------------------------------------- 0002081c 4e 56 ff c4 |NV | LINK.W A6,#0xffc4 00020820 bf d5 | | CMPA.L (A5),A7 00020822 62 06 |b | BHI 0x2082a 00020824 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020828 4e 76 |Nv | TRAPV 0002082a de fc 00 32 | 2 | ADDA.W #0x32,A7 0002082e 48 e7 e3 e0 |H | MOVEM.L A2+A1+A0+D7+D6+D2+D1+D0,-(A7) 00020832 43 ee ff fc |C | LEA.L (A6-0x4),A1 00020836 45 ee ff fa |E | LEA.L (A6-0x6),A2 0002083a 74 0e |t | MOVEQ.L #0x0e,D2 0002083c 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 00020840 48 80 |H | EXTB.W D0 00020842 41 fa fa 2a |A * | LEA.L 0x2026e,A0 00020846 1c 30 00 00 | 0 | MOVE.B (A0+D0.W),D6 0002084a 7e 01 |~ | MOVEQ.L #0x01,D7 0002084c 1f 06 | | MOVE.B D6,-(A7) 0002084e 48 51 |HQ | PEA.L (A1) 00020850 48 6e ff f9 |Hn | PEA.L (A6-0x7) 00020854 48 52 |HR | PEA.L (A2) 00020856 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 0002085c de c2 | | ADDA.W D2,A7 0002085e 4a 12 |J | TST.B (A2) 00020860 66 06 |f | BNE 0x20868 00020862 12 bc 00 04 | | MOVE.B #0x04,(A1) 00020866 60 3e |`> | BRA 0x208a6 00020868 10 11 | | MOVE.B (A1),D0 0002086a 0c 00 00 06 | | CMPI.B #0x06,D0 0002086e 66 36 |f6 | BNE 0x208a6 00020870 4a 47 |JG | TST.W D7 00020872 67 32 |g2 | BEQ 0x208a6 00020874 42 80 |B | CLR.L D0 00020876 30 07 |0 | MOVE.W D7,D0 00020878 52 80 |R | ADDQ.L #0x1,D0 0002087a 0c 80 00 00 ff ff | | CMPI.L #0x0000ffff,D0 00020880 63 02 |c | BLS 0x20884 00020882 4e 4f |NO | TRAP #15 00020884 3e 00 |> | MOVE.W D0,D7 00020886 48 78 00 27 |Hx ' | PEA.L 0x27 0002088a 4e b9 00 01 02 24 |N $ | JSR KC12_Sleep(dur: Long) 00020890 54 4f |TO | ADDQ.L #0x2,A7 00020892 1e 86 | | MOVE.B D6,(A7) 00020894 48 51 |HQ | PEA.L (A1) 00020896 48 6e ff f9 |Hn | PEA.L (A6-0x7) 0002089a 48 52 |HR | PEA.L (A2) 0002089c 4e b9 00 01 04 84 |N | JSR DiProcPing(adr : Byte; VAR status : Byte; VAR b80 : Bool; VAR b40 : Bool) 000208a2 de c2 | | ADDA.W D2,A7 000208a4 60 c2 |` | BRA 0x20868 000208a6 10 11 | | MOVE.B (A1),D0 000208a8 0c 00 00 01 | | CMPI.B #0x01,D0 000208ac 67 1e |g | BEQ 0x208cc 000208ae 1f 06 | | MOVE.B D6,-(A7) 000208b0 12 2e 00 08 | . | MOVE.B (A6+0x8),D1 000208b4 48 81 |H | EXTB.W D1 000208b6 e5 41 | A | ASL.W #0x2,D1 000208b8 41 f9 00 02 19 84 |A | LEA.L 0x21984,A0 000208be 2f 30 10 08 |/0 | MOVE.L (A0+D1.W+#0x8),-(A7) 000208c2 1f 00 | | MOVE.B D0,-(A7) 000208c4 4e b9 00 02 18 48 |N H | JSR EXP_FAIL 000208ca 50 4f |PO | ADDQ.L #0x8,A7 000208cc 4c df 07 c7 |L | MOVEM.L (A7)+,D0+D1+D2+D6+D7+A0+A1+A2 000208d0 4e 5e |N^ | UNLK A6 000208d2 4e 75 |Nu | RTS 000208d4 ; -------------------------------------------------------------------------------------- 000208d4 ; OMSI PASCAL Function 000208d4 ; <LVAR 0x008 1(r)> 000208d4 ; <LVAR -0x006 4(rw)> 000208d4 ; -------------------------------------------------------------------------------------- 000208d4 4e 56 ff d0 |NV | LINK.W A6,#0xffd0 000208d8 bf d5 | | CMPA.L (A5),A7 000208da 62 06 |b | BHI 0x208e2 000208dc 44 fc 00 02 |D | MOVE.W #0x2,CCR 000208e0 4e 76 |Nv | TRAPV 000208e2 de fc 00 2a | * | ADDA.W #0x2a,A7 000208e6 48 e7 c0 f0 |H | MOVEM.L A3+A2+A1+A0+D1+D0,-(A7) 000208ea 45 f9 00 02 19 84 |E | LEA.L 0x21984,A2 000208f0 47 ee ff fa |G | LEA.L (A6-0x6),A3 000208f4 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000208f8 48 80 |H | EXTB.W D0 000208fa 32 00 |2 | MOVE.W D0,D1 000208fc e5 41 | A | ASL.W #0x2,D1 000208fe 20 4a | J | MOVEA.L A2,A0 00020900 43 fa f9 6c |C l | LEA.L 0x2026e,A1 00020904 1f 31 00 00 | 1 | MOVE.B (A1+D0.W),-(A7) 00020908 2f 30 10 08 |/0 | MOVE.L (A0+D1.W+#0x8),-(A7) 0002090c 4e b9 00 01 04 7e |N ~ | JSR ExpXmit(adr : Byte; b : Pointer) 00020912 5c 4f |\O | ADDQ.L #0x6,A7 00020914 20 70 10 08 | p | MOVEA.L (A0+D1.W+#0x8),A0 00020918 2f 08 |/ | MOVE.L A0,-(A7) 0002091a 21 68 00 f8 00 f4 |!h | MOVE.L (A0+0xf8),(A0+0xf4) 00020920 22 4a |"J | MOVEA.L A2,A1 00020922 4a 31 00 1c |J1 | TST.B (A1+D0.W+#0x1c) 00020926 67 3e |g> | BEQ 0x20966 00020928 26 a8 00 f8 |& | MOVE.L (A0+0xf8),(A3) 0002092c 20 53 | S | MOVEA.L (A3),A0 0002092e 22 68 00 02 |"h | MOVEA.L (A0+0x2),A1 00020932 b2 fc 00 01 | | CMPA.W #0x1,A1 00020936 67 04 |g | BEQ 0x2093c 00020938 26 89 |& | MOVE.L A1,(A3) 0002093a 60 f0 |` | BRA 0x2092c 0002093c 22 57 |"W | MOVEA.L (A7),A1 0002093e 42 80 |B | CLR.L D0 00020940 10 28 00 01 | ( | MOVE.B (A0+0x1),D0 00020944 42 81 |B | CLR.L D1 00020946 12 10 | | MOVE.B (A0),D1 00020948 e5 09 | | LSL.B #0x2,D1 0002094a e4 09 | | LSR.B #0x2,D1 0002094c d2 40 | @ | ADD.W D0,D1 0002094e 04 41 00 10 | A | SUBI.W #0x0010,D1 00020952 43 bc 00 ff |C | CHK.W #0xff,D1 00020956 13 41 00 02 | A | MOVE.B D1,(A1+0x2) 0002095a 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 0002095e 48 80 |H | EXTB.W D0 00020960 20 4a | J | MOVEA.L A2,A0 00020962 42 30 00 1c |B0 | CLR.B (A0+D0.W+#0x1c) 00020966 58 4f |XO | ADDQ.L #0x4,A7 00020968 4c df 0f 03 |L | MOVEM.L (A7)+,D0+D1+A0+A1+A2+A3 0002096c 4e 5e |N^ | UNLK A6 0002096e 4e 75 |Nu | RTS 00020970 ; -------------------------------------------------------------------------------------- 00020970 ; OMSI PASCAL Function 00020970 ; <LVAR 0x00a 1(r)> 00020970 ; <LVAR 0x008 1(r)> 00020970 ; -------------------------------------------------------------------------------------- 00020970 4e 56 ff e2 |NV | LINK.W A6,#0xffe2 00020974 bf d5 | | CMPA.L (A5),A7 00020976 62 06 |b | BHI 0x2097e 00020978 44 fc 00 02 |D | MOVE.W #0x2,CCR 0002097c 4e 76 |Nv | TRAPV 0002097e de fc 00 1a | | ADDA.W #0x1a,A7 00020982 48 e7 81 80 |H | MOVEM.L A0+D7+D0,-(A7) 00020986 1f 2e 00 08 | . | MOVE.B (A6+0x8),-(A7) 0002098a 1e 2e 00 0a | . | MOVE.B (A6+0xa),D7 0002098e be 17 | | CMP.B (A7),D7 00020990 6e 24 |n$ | BGT 0x209b6 00020992 1f 07 | | MOVE.B D7,-(A7) 00020994 4e ba fe 86 |N | JSR 0x2081c 00020998 54 4f |TO | ADDQ.L #0x2,A7 0002099a 10 07 | | MOVE.B D7,D0 0002099c 48 80 |H | EXTB.W D0 0002099e e5 40 | @ | ASL.W #0x2,D0 000209a0 41 f9 00 02 19 84 |A | LEA.L 0x21984,A0 000209a6 48 70 00 08 |Hp | PEA.L (A0+D0.W+#0x8) 000209aa 4e b9 00 01 04 96 |N | JSR ExpClose(exp : Pointer) 000209b0 58 4f |XO | ADDQ.L #0x4,A7 000209b2 52 07 |R | ADDQ.B #0x1,D7 000209b4 68 d8 |h | BVC 0x2098e 000209b6 54 4f |TO | ADDQ.L #0x2,A7 000209b8 4c df 01 81 |L | MOVEM.L (A7)+,D0+D7+A0 000209bc 4e 5e |N^ | UNLK A6 000209be 4e 75 |Nu | RTS 000209c0 ; -------------------------------------------------------------------------------------- 000209c0 ; OMSI PASCAL Function 000209c0 ; <LVAR 0x00a 4(r)> 000209c0 ; <LVAR 0x008 2(r)> 000209c0 ; <LVAR -0x004 4(rw)> 000209c0 ; <LVAR -0x008 4(rw)> 000209c0 ; <LVAR -0xc08 @> 000209c0 ; <LVAR -0xc0e @> 000209c0 ; <LVAR -0xc16 4(rw)> 000209c0 ; <LVAR -0xc22 @> 000209c0 ; -------------------------------------------------------------------------------------- 000209c0 4e 56 f3 6a |NV j | LINK.W A6,#0xf36a 000209c4 bf d5 | | CMPA.L (A5),A7 000209c6 62 06 |b | BHI 0x209ce 000209c8 44 fc 00 02 |D | MOVE.W #0x2,CCR 000209cc 4e 76 |Nv | TRAPV 000209ce de fc 00 74 | t | ADDA.W #0x74,A7 000209d2 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000209d6 47 ee ff f8 |G | LEA.L (A6-0x8),A3 000209da 49 f8 00 00 |I | LEA.L 0x0,A4 000209de 74 01 |t | MOVEQ.L #0x01,D2 000209e0 26 bc 00 00 00 10 |& | MOVE.L #0x10,(A3) 000209e6 2d 7c 00 00 00 07 ff fc |-| | MOVE.L #0x7,(A6-0x4) 000209ee 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 000209f2 48 c0 |H | EXTW.L D0 000209f4 2d 40 f3 ea |-@ | MOVE.L D0,(A6-0xc16) 000209f8 4e b9 00 02 16 c2 |N | JSR exp_PREP_LOAD_REGISTER_FILE.TYP() 000209fe 4e b9 00 02 17 0e |N | JSR exp_PREP_LOAD_REGISTER_FILE.VAL() 00020a04 41 fa f7 c2 |A | LEA.L 0x201c8,A0 00020a08 70 08 |p | MOVEQ.L #0x08,D0 00020a0a 3f 20 |? | MOVE.W -(A0),-(A7) 00020a0c 51 c8 ff fc |Q | DBF D0,0x20a0a 00020a10 59 4f |YO | SUBQ.L #0x4,A7 00020a12 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a16 3f 02 |? | MOVE.W D2,-(A7) 00020a18 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00020a1c 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020a22 5c 4f |\O | ADDQ.L #0x6,A7 00020a24 42 17 |B | CLR.B (A7) 00020a26 1f 02 | | MOVE.B D2,-(A7) 00020a28 4e ba fd 06 |N | JSR 0x20730 00020a2c de fc 00 1a | | ADDA.W #0x1a,A7 00020a30 70 00 |p | MOVEQ.L #0x00,D0 00020a32 2f 00 |/ | MOVE.L D0,-(A7) 00020a34 08 00 00 00 | | BTST.L #0x0,D0 00020a38 67 20 |g | BEQ 0x20a5a 00020a3a 3f 3a f7 8c |?: | MOVE.W 0x201c8,-(A7) 00020a3e 59 4f |YO | SUBQ.L #0x4,A7 00020a40 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020a44 3f 02 |? | MOVE.W D2,-(A7) 00020a46 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00020a4a 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020a50 50 4f |PO | ADDQ.L #0x8,A7 00020a52 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00020a58 5c 4f |\O | ADDQ.L #0x6,A7 00020a5a 7a 00 |z | MOVEQ.L #0x00,D5 00020a5c 2f 2e ff fc |/. | MOVE.L (A6-0x4),-(A7) 00020a60 72 00 |r | MOVEQ.L #0x00,D1 00020a62 b2 97 | | CMP.L (A7),D1 00020a64 6f 06 |o | BLE 0x20a6c 00020a66 59 4f |YO | SUBQ.L #0x4,A7 00020a68 60 00 01 84 |` | BRA 0x20bee 00020a6c 2f 01 |/ | MOVE.L D1,-(A7) 00020a6e 0c 81 00 00 00 02 | | CMPI.L #0x00000002,D1 00020a74 6e 42 |nB | BGT 0x20ab8 00020a76 41 ee f3 f8 |A | LEA.L (A6-0xc08),A0 00020a7a 2f 08 |/ | MOVE.L A0,-(A7) 00020a7c 2c 1f |, | MOVE.L (A7)+,D6 00020a7e 20 01 | | MOVE.L D1,D0 00020a80 e1 80 | | ASL.L #0x8,D0 00020a82 e5 80 | | ASL.L #0x2,D0 00020a84 dc 80 | | ADD.L D0,D6 00020a86 2f 2e 00 0a |/. | MOVE.L (A6+0xa),-(A7) 00020a8a 20 2e f3 ea | . | MOVE.L (A6-0xc16),D0 00020a8e 0c 80 00 00 40 00 | @ | CMPI.L #0x00004000,D0 00020a94 63 02 |c | BLS 0x20a98 00020a96 4e 4f |NO | TRAP #15 00020a98 3f 00 |? | MOVE.W D0,-(A7) 00020a9a 42 67 |Bg | CLR.W -(A7) 00020a9c 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020aa0 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020aa4 2f 06 |/ | MOVE.L D6,-(A7) 00020aa6 48 6e f3 f2 |Hn | PEA.L (A6-0xc0e) 00020aaa 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020ab0 de fc 00 14 | | ADDA.W #0x14,A7 00020ab4 52 ae f3 ea |R | ADDQ.L #0x1,(A6-0xc16) 00020ab8 2f 13 |/ | MOVE.L (A3),-(A7) 00020aba 53 97 |S | SUBQ.L #0x1,(A7) 00020abc 7e 00 |~ | MOVEQ.L #0x00,D7 00020abe be 97 | | CMP.L (A7),D7 00020ac0 6e 7a |nz | BGT 0x20b3c 00020ac2 20 05 | | MOVE.L D5,D0 00020ac4 d0 87 | | ADD.L D7,D0 00020ac6 0c 80 00 00 00 7f | | CMPI.L #0x0000007f,D0 00020acc 63 02 |c | BLS 0x20ad0 00020ace 4e 4f |NO | TRAP #15 00020ad0 28 00 |( | MOVE.L D0,D4 00020ad2 76 18 |v | MOVEQ.L #0x18,D3 00020ad4 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00020ada 41 ee f3 de |A | LEA.L (A6-0xc22),A0 00020ade 51 4f |QO | SUBQ.L #0x8,A7 00020ae0 22 4f |"O | MOVEA.L A7,A1 00020ae2 45 f0 48 1a |E H | LEA.L (A0+D4.L+#0x1a),A2 00020ae6 70 07 |p | MOVEQ.L #0x07,D0 00020ae8 12 da | | MOVE.B (A2)+,(A1)+ 00020aea 51 c8 ff fc |Q | DBF D0,0x20ae8 00020aee 2f 39 00 02 19 8c |/9 | MOVE.L 0x2198c,-(A7) 00020af4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020af8 48 54 |HT | PEA.L (A4) 00020afa 48 78 00 07 |Hx | PEA.L 0x7 00020afe 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00020b04 de fc 00 14 | | ADDA.W #0x14,A7 00020b08 1e b0 48 22 | H" | MOVE.B (A0+D4.L+#0x22),(A7) 00020b0c 1f 70 48 23 00 01 | pH# | MOVE.B (A0+D4.L+#0x23),(A7+0x1) 00020b12 1f 70 48 24 00 02 | pH$ | MOVE.B (A0+D4.L+#0x24),(A7+0x2) 00020b18 1f 70 48 25 00 03 | pH% | MOVE.B (A0+D4.L+#0x25),(A7+0x3) 00020b1e 2f 39 00 02 19 8c |/9 | MOVE.L 0x2198c,-(A7) 00020b24 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020b28 48 54 |HT | PEA.L (A4) 00020b2a 48 78 00 03 |Hx | PEA.L 0x3 00020b2e 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00020b34 de fc 00 14 | | ADDA.W #0x14,A7 00020b38 52 87 |R | ADDQ.L #0x1,D7 00020b3a 68 82 |h | BVC 0x20abe 00020b3c 54 4f |TO | ADDQ.L #0x2,A7 00020b3e 42 17 |B | CLR.B (A7) 00020b40 4e ba fc da |N | JSR 0x2081c 00020b44 42 17 |B | CLR.B (A7) 00020b46 4e ba fd 8c |N | JSR 0x208d4 00020b4a 54 4f |TO | ADDQ.L #0x2,A7 00020b4c 2f 13 |/ | MOVE.L (A3),-(A7) 00020b4e 53 97 |S | SUBQ.L #0x1,(A7) 00020b50 7e 00 |~ | MOVEQ.L #0x00,D7 00020b52 be 97 | | CMP.L (A7),D7 00020b54 6e 7a |nz | BGT 0x20bd0 00020b56 20 05 | | MOVE.L D5,D0 00020b58 d0 87 | | ADD.L D7,D0 00020b5a 0c 80 00 00 00 7f | | CMPI.L #0x0000007f,D0 00020b60 63 02 |c | BLS 0x20b64 00020b62 4e 4f |NO | TRAP #15 00020b64 28 00 |( | MOVE.L D0,D4 00020b66 76 18 |v | MOVEQ.L #0x18,D3 00020b68 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00020b6e 41 ee f3 de |A | LEA.L (A6-0xc22),A0 00020b72 51 4f |QO | SUBQ.L #0x8,A7 00020b74 22 4f |"O | MOVEA.L A7,A1 00020b76 45 f0 48 2a |E H* | LEA.L (A0+D4.L+#0x2a),A2 00020b7a 70 07 |p | MOVEQ.L #0x07,D0 00020b7c 12 da | | MOVE.B (A2)+,(A1)+ 00020b7e 51 c8 ff fc |Q | DBF D0,0x20b7c 00020b82 2f 39 00 02 19 90 |/9 | MOVE.L 0x21990,-(A7) 00020b88 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020b8c 48 54 |HT | PEA.L (A4) 00020b8e 48 78 00 07 |Hx | PEA.L 0x7 00020b92 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00020b98 de fc 00 14 | | ADDA.W #0x14,A7 00020b9c 1e b0 48 26 | H& | MOVE.B (A0+D4.L+#0x26),(A7) 00020ba0 1f 70 48 27 00 01 | pH' | MOVE.B (A0+D4.L+#0x27),(A7+0x1) 00020ba6 1f 70 48 28 00 02 | pH( | MOVE.B (A0+D4.L+#0x28),(A7+0x2) 00020bac 1f 70 48 29 00 03 | pH) | MOVE.B (A0+D4.L+#0x29),(A7+0x3) 00020bb2 2f 39 00 02 19 90 |/9 | MOVE.L 0x21990,-(A7) 00020bb8 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020bbc 48 54 |HT | PEA.L (A4) 00020bbe 48 78 00 03 |Hx | PEA.L 0x3 00020bc2 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00020bc8 de fc 00 14 | | ADDA.W #0x14,A7 00020bcc 52 87 |R | ADDQ.L #0x1,D7 00020bce 68 82 |h | BVC 0x20b52 00020bd0 54 4f |TO | ADDQ.L #0x2,A7 00020bd2 1e 82 | | MOVE.B D2,(A7) 00020bd4 4e ba fc 46 |N F | JSR 0x2081c 00020bd8 1e 82 | | MOVE.B D2,(A7) 00020bda 4e ba fc f8 |N | JSR 0x208d4 00020bde 54 4f |TO | ADDQ.L #0x2,A7 00020be0 da 93 | | ADD.L (A3),D5 00020be2 22 17 |" | MOVE.L (A7),D1 00020be4 52 81 |R | ADDQ.L #0x1,D1 00020be6 69 06 |i | BVS 0x20bee 00020be8 58 4f |XO | ADDQ.L #0x4,A7 00020bea 60 00 fe 76 |` v | BRA 0x20a62 00020bee 50 4f |PO | ADDQ.L #0x8,A7 00020bf0 20 17 | | MOVE.L (A7),D0 00020bf2 52 80 |R | ADDQ.L #0x1,D0 00020bf4 0c 80 00 00 00 07 | | CMPI.L #0x00000007,D0 00020bfa 6e 06 |n | BGT 0x20c02 00020bfc 58 4f |XO | ADDQ.L #0x4,A7 00020bfe 60 00 fe 32 |` 2 | BRA 0x20a32 00020c02 54 4f |TO | ADDQ.L #0x2,A7 00020c04 42 17 |B | CLR.B (A7) 00020c06 1f 02 | | MOVE.B D2,-(A7) 00020c08 4e ba fd 66 |N f | JSR 0x20970 00020c0c 58 4f |XO | ADDQ.L #0x4,A7 00020c0e 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00020c12 4e 5e |N^ | UNLK A6 00020c14 4e 75 |Nu | RTS 00020c16 ; -------------------------------------------------------------------------------------- 00020c16 ; OMSI PASCAL Function 00020c16 ; <LVAR 0x00c 4(r)> 00020c16 ; <LVAR 0x00a 2(r)> 00020c16 ; <LVAR 0x008 2(r)> 00020c16 ; <LVAR -0x006 4(rw)> 00020c16 ; <LVAR -0x00a 4(rw)> 00020c16 ; <LVAR -0x00e 4(rw)> 00020c16 ; <LVAR -0x80e @> 00020c16 ; <LVAR -0x140e @> 00020c16 ; <LVAR -0x1414 @> 00020c16 ; <LVAR -0x1415 1(w)> 00020c16 ; <LVAR -0x1416 1(w) 2(r)> 00020c16 ; <LVAR -0x141c 1(rw)> 00020c16 ; <LVAR -0x1420 4(rw)> 00020c16 ; <LVAR -0x1424 4(rw)> 00020c16 ; <LVAR -0x1428 4(rw)> 00020c16 ; <LVAR -0x142c 4(rw)> 00020c16 ; <LVAR -0x1438 @> 00020c16 ; -------------------------------------------------------------------------------------- 00020c16 4e 56 eb 54 |NV T | LINK.W A6,#0xeb54 00020c1a bf d5 | | CMPA.L (A5),A7 00020c1c 62 06 |b | BHI 0x20c24 00020c1e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00020c22 4e 76 |Nv | TRAPV 00020c24 de fc 00 74 | t | ADDA.W #0x74,A7 00020c28 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 00020c2c 47 ee ff f6 |G | LEA.L (A6-0xa),A3 00020c30 49 ee eb e0 |I | LEA.L (A6-0x1420),A4 00020c34 74 01 |t | MOVEQ.L #0x01,D2 00020c36 2d 7c 00 00 00 10 ff f2 |-| | MOVE.L #0x10,(A6-0xe) 00020c3e 26 bc 00 00 00 10 |& | MOVE.L #0x10,(A3) 00020c44 2d 7c 00 00 00 08 ff fa |-| | MOVE.L #0x8,(A6-0x6) 00020c4c 4e b9 00 02 16 c2 |N | JSR exp_PREP_LOAD_REGISTER_FILE.TYP() 00020c52 4e b9 00 02 17 0e |N | JSR exp_PREP_LOAD_REGISTER_FILE.VAL() 00020c58 4e b9 00 02 16 7c |N | | JSR exp_PREP_LOAD_DISPATCH_RAMS.SEQ() 00020c5e 41 fa f5 7c |A | | LEA.L 0x201dc,A0 00020c62 70 08 |p | MOVEQ.L #0x08,D0 00020c64 3f 20 |? | MOVE.W -(A0),-(A7) 00020c66 51 c8 ff fc |Q | DBF D0,0x20c64 00020c6a 59 4f |YO | SUBQ.L #0x4,A7 00020c6c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020c70 3f 02 |? | MOVE.W D2,-(A7) 00020c72 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00020c76 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020c7c 5c 4f |\O | ADDQ.L #0x6,A7 00020c7e 42 17 |B | CLR.B (A7) 00020c80 1f 02 | | MOVE.B D2,-(A7) 00020c82 4e ba fa ac |N | JSR 0x20730 00020c86 de fc 00 1a | | ADDA.W #0x1a,A7 00020c8a 41 fa f5 62 |A b | LEA.L 0x201ee,A0 00020c8e 70 08 |p | MOVEQ.L #0x08,D0 00020c90 3f 20 |? | MOVE.W -(A0),-(A7) 00020c92 51 c8 ff fc |Q | DBF D0,0x20c90 00020c96 59 4f |YO | SUBQ.L #0x4,A7 00020c98 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020c9c 3f 02 |? | MOVE.W D2,-(A7) 00020c9e 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00020ca2 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020ca8 5c 4f |\O | ADDQ.L #0x6,A7 00020caa 1e bc 00 03 | | MOVE.B #0x03,(A7) 00020cae 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 00020cb2 4e ba fa 7c |N | | JSR 0x20730 00020cb6 de fc 00 1a | | ADDA.W #0x1a,A7 00020cba 1d 42 eb e4 | B | MOVE.B D2,(A6-0x141c) 00020cbe 7c 00 || | MOVEQ.L #0x00,D6 00020cc0 30 2e 00 0a |0. | MOVE.W (A6+0xa),D0 00020cc4 48 c0 |H | EXTW.L D0 00020cc6 2d 40 eb d4 |-@ | MOVE.L D0,(A6-0x142c) 00020cca 30 2e 00 08 |0. | MOVE.W (A6+0x8),D0 00020cce 48 c0 |H | EXTW.L D0 00020cd0 2d 40 eb d8 |-@ | MOVE.L D0,(A6-0x1428) 00020cd4 70 00 |p | MOVEQ.L #0x00,D0 00020cd6 2f 00 |/ | MOVE.L D0,-(A7) 00020cd8 08 00 00 00 | | BTST.L #0x0,D0 00020cdc 67 20 |g | BEQ 0x20cfe 00020cde 3f 3a f5 0e |?: | MOVE.W 0x201ee,-(A7) 00020ce2 59 4f |YO | SUBQ.L #0x4,A7 00020ce4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020ce8 3f 02 |? | MOVE.W D2,-(A7) 00020cea 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 00020cee 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 00020cf4 50 4f |PO | ADDQ.L #0x8,A7 00020cf6 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00020cfc 5c 4f |\O | ADDQ.L #0x6,A7 00020cfe 0c 80 00 00 00 04 | | CMPI.L #0x00000004,D0 00020d04 66 06 |f | BNE 0x20d0c 00020d06 42 2e eb e4 |B. | CLR.B (A6-0x141c) 00020d0a 7c 00 || | MOVEQ.L #0x00,D6 00020d0c 42 ae eb dc |B | CLR.L (A6-0x1424) 00020d10 42 94 |B | CLR.L (A4) 00020d12 2f 2e ff fa |/. | MOVE.L (A6-0x6),-(A7) 00020d16 53 97 |S | SUBQ.L #0x1,(A7) 00020d18 72 00 |r | MOVEQ.L #0x00,D1 00020d1a b2 97 | | CMP.L (A7),D1 00020d1c 6f 06 |o | BLE 0x20d24 00020d1e 59 4f |YO | SUBQ.L #0x4,A7 00020d20 60 00 03 6e |` n | BRA 0x21090 00020d24 2f 01 |/ | MOVE.L D1,-(A7) 00020d26 0c 81 00 00 00 02 | | CMPI.L #0x00000002,D1 00020d2c 6e 42 |nB | BGT 0x20d70 00020d2e 41 ee eb f2 |A | LEA.L (A6-0x140e),A0 00020d32 2f 08 |/ | MOVE.L A0,-(A7) 00020d34 2a 1f |* | MOVE.L (A7)+,D5 00020d36 20 01 | | MOVE.L D1,D0 00020d38 e1 80 | | ASL.L #0x8,D0 00020d3a e5 80 | | ASL.L #0x2,D0 00020d3c da 80 | | ADD.L D0,D5 00020d3e 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00020d42 20 2e eb d4 | . | MOVE.L (A6-0x142c),D0 00020d46 0c 80 00 00 40 00 | @ | CMPI.L #0x00004000,D0 00020d4c 63 02 |c | BLS 0x20d50 00020d4e 4e 4f |NO | TRAP #15 00020d50 3f 00 |? | MOVE.W D0,-(A7) 00020d52 42 67 |Bg | CLR.W -(A7) 00020d54 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020d58 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020d5c 2f 05 |/ | MOVE.L D5,-(A7) 00020d5e 48 6e eb ec |Hn | PEA.L (A6-0x1414) 00020d62 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020d68 de fc 00 14 | | ADDA.W #0x14,A7 00020d6c 52 ae eb d4 |R | ADDQ.L #0x1,(A6-0x142c) 00020d70 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 00020d74 53 97 |S | SUBQ.L #0x1,(A7) 00020d76 7e 00 |~ | MOVEQ.L #0x00,D7 00020d78 be 97 | | CMP.L (A7),D7 00020d7a 6e 00 00 84 |n | BGT 0x20e00 00020d7e 20 2e eb dc | . | MOVE.L (A6-0x1424),D0 00020d82 d0 87 | | ADD.L D7,D0 00020d84 0c 80 00 00 00 7f | | CMPI.L #0x0000007f,D0 00020d8a 63 02 |c | BLS 0x20d8e 00020d8c 4e 4f |NO | TRAP #15 00020d8e 28 00 |( | MOVE.L D0,D4 00020d90 76 18 |v | MOVEQ.L #0x18,D3 00020d92 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00020d98 41 ee eb c8 |A | LEA.L (A6-0x1438),A0 00020d9c 51 4f |QO | SUBQ.L #0x8,A7 00020d9e 22 4f |"O | MOVEA.L A7,A1 00020da0 45 f0 48 2a |E H* | LEA.L (A0+D4.L+#0x2a),A2 00020da4 70 07 |p | MOVEQ.L #0x07,D0 00020da6 12 da | | MOVE.B (A2)+,(A1)+ 00020da8 51 c8 ff fc |Q | DBF D0,0x20da6 00020dac 2f 39 00 02 19 8c |/9 | MOVE.L 0x2198c,-(A7) 00020db2 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020db6 48 78 00 00 |Hx | PEA.L 0x0 00020dba 48 78 00 07 |Hx | PEA.L 0x7 00020dbe 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00020dc4 de fc 00 14 | | ADDA.W #0x14,A7 00020dc8 1e b0 48 32 | H2 | MOVE.B (A0+D4.L+#0x32),(A7) 00020dcc 1f 70 48 33 00 01 | pH3 | MOVE.B (A0+D4.L+#0x33),(A7+0x1) 00020dd2 1f 70 48 34 00 02 | pH4 | MOVE.B (A0+D4.L+#0x34),(A7+0x2) 00020dd8 1f 70 48 35 00 03 | pH5 | MOVE.B (A0+D4.L+#0x35),(A7+0x3) 00020dde 2f 39 00 02 19 8c |/9 | MOVE.L 0x2198c,-(A7) 00020de4 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020de8 48 78 00 00 |Hx | PEA.L 0x0 00020dec 48 78 00 03 |Hx | PEA.L 0x3 00020df0 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00020df6 de fc 00 14 | | ADDA.W #0x14,A7 00020dfa 52 87 |R | ADDQ.L #0x1,D7 00020dfc 68 00 ff 7a |h z | BVC 0x20d78 00020e00 54 4f |TO | ADDQ.L #0x2,A7 00020e02 42 17 |B | CLR.B (A7) 00020e04 4e ba fa ce |N | JSR 0x208d4 00020e08 54 4f |TO | ADDQ.L #0x2,A7 00020e0a 20 17 | | MOVE.L (A7),D0 00020e0c b0 82 | | CMP.L D2,D0 00020e0e 6e 42 |nB | BGT 0x20e52 00020e10 41 ee f7 f2 |A | LEA.L (A6-0x80e),A0 00020e14 2f 08 |/ | MOVE.L A0,-(A7) 00020e16 2a 1f |* | MOVE.L (A7)+,D5 00020e18 22 00 |" | MOVE.L D0,D1 00020e1a e1 81 | | ASL.L #0x8,D1 00020e1c e5 81 | | ASL.L #0x2,D1 00020e1e da 81 | | ADD.L D1,D5 00020e20 2f 2e 00 0c |/. | MOVE.L (A6+0xc),-(A7) 00020e24 22 2e eb d8 |". | MOVE.L (A6-0x1428),D1 00020e28 0c 81 00 00 40 00 | @ | CMPI.L #0x00004000,D1 00020e2e 63 02 |c | BLS 0x20e32 00020e30 4e 4f |NO | TRAP #15 00020e32 3f 01 |? | MOVE.W D1,-(A7) 00020e34 42 67 |Bg | CLR.W -(A7) 00020e36 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 00020e3a 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00020e3e 2f 05 |/ | MOVE.L D5,-(A7) 00020e40 48 6e eb ec |Hn | PEA.L (A6-0x1414) 00020e44 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 00020e4a de fc 00 14 | | ADDA.W #0x14,A7 00020e4e 52 ae eb d8 |R | ADDQ.L #0x1,(A6-0x1428) 00020e52 22 06 |" | MOVE.L D6,D1 00020e54 e0 89 | | LSR.L #0x8,D1 00020e56 0c 81 00 00 00 ff | | CMPI.L #0x000000ff,D1 00020e5c 63 02 |c | BLS 0x20e60 00020e5e 4e 4f |NO | TRAP #15 00020e60 1d 41 eb ea | A | MOVE.B D1,(A6-0x1416) 00020e64 22 06 |" | MOVE.L D6,D1 00020e66 02 81 00 00 00 ff | | ANDI.L #0x000000ff,D1 00020e6c 0c 81 00 00 00 ff | | CMPI.L #0x000000ff,D1 00020e72 63 02 |c | BLS 0x20e76 00020e74 4e 4f |NO | TRAP #15 00020e76 1d 41 eb eb | A | MOVE.B D1,(A6-0x1415) 00020e7a 2f 39 00 02 19 98 |/9 | MOVE.L 0x21998,-(A7) 00020e80 1f 2e eb e4 | . | MOVE.B (A6-0x141c),-(A7) 00020e84 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 00020e8a 58 4f |XO | ADDQ.L #0x4,A7 00020e8c 3e ae eb ea |> | MOVE.W (A6-0x1416),(A7) 00020e90 2f 39 00 02 19 98 |/9 | MOVE.L 0x21998,-(A7) 00020e96 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020e9a 48 78 00 00 |Hx | PEA.L 0x0 00020e9e 48 78 00 01 |Hx | PEA.L 0x1 00020ea2 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00020ea8 de fc 00 0e | | ADDA.W #0xe,A7 00020eac 2e 93 |. | MOVE.L (A3),(A7) 00020eae 53 97 |S | SUBQ.L #0x1,(A7) 00020eb0 7e 00 |~ | MOVEQ.L #0x00,D7 00020eb2 be 97 | | CMP.L (A7),D7 00020eb4 6e 40 |n@ | BGT 0x20ef6 00020eb6 20 14 | | MOVE.L (A4),D0 00020eb8 d0 87 | | ADD.L D7,D0 00020eba 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 00020ec0 63 02 |c | BLS 0x20ec4 00020ec2 4e 4f |NO | TRAP #15 00020ec4 e7 80 | | ASL.L #0x3,D0 00020ec6 41 ee eb c8 |A | LEA.L (A6-0x1438),A0 00020eca 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 00020ece 2f 28 0c 2e |/( . | MOVE.L (A0+0xc2e),-(A7) 00020ed2 2f 28 0c 2a |/( * | MOVE.L (A0+0xc2a),-(A7) 00020ed6 2f 39 00 02 19 98 |/9 | MOVE.L 0x21998,-(A7) 00020edc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020ee0 48 78 00 00 |Hx | PEA.L 0x0 00020ee4 48 78 00 07 |Hx | PEA.L 0x7 00020ee8 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00020eee de fc 00 18 | | ADDA.W #0x18,A7 00020ef2 52 87 |R | ADDQ.L #0x1,D7 00020ef4 68 bc |h | BVC 0x20eb2 00020ef6 54 4f |TO | ADDQ.L #0x2,A7 00020ef8 1e bc 00 03 | | MOVE.B #0x03,(A7) 00020efc 4e ba f9 d6 |N | JSR 0x208d4 00020f00 54 4f |TO | ADDQ.L #0x2,A7 00020f02 20 14 | | MOVE.L (A4),D0 00020f04 d0 93 | | ADD.L (A3),D0 00020f06 28 80 |( | MOVE.L D0,(A4) 00020f08 4a 2e eb e4 |J. | TST.B (A6-0x141c) 00020f0c 67 04 |g | BEQ 0x20f12 00020f0e dc 93 | | ADD.L (A3),D6 00020f10 60 06 |` | BRA 0x20f18 00020f12 20 13 | | MOVE.L (A3),D0 00020f14 ed 80 | | ASL.L #0x6,D0 00020f16 dc 80 | | ADD.L D0,D6 00020f18 2f 2e ff f2 |/. | MOVE.L (A6-0xe),-(A7) 00020f1c 53 97 |S | SUBQ.L #0x1,(A7) 00020f1e 7e 00 |~ | MOVEQ.L #0x00,D7 00020f20 be 97 | | CMP.L (A7),D7 00020f22 6e 00 00 84 |n | BGT 0x20fa8 00020f26 20 2e eb dc | . | MOVE.L (A6-0x1424),D0 00020f2a d0 87 | | ADD.L D7,D0 00020f2c 0c 80 00 00 00 7f | | CMPI.L #0x0000007f,D0 00020f32 63 02 |c | BLS 0x20f36 00020f34 4e 4f |NO | TRAP #15 00020f36 28 00 |( | MOVE.L D0,D4 00020f38 76 18 |v | MOVEQ.L #0x18,D3 00020f3a 4e b9 00 01 02 8c |N | JSR ?muls_d3_d4 00020f40 41 ee eb c8 |A | LEA.L (A6-0x1438),A0 00020f44 51 4f |QO | SUBQ.L #0x8,A7 00020f46 22 4f |"O | MOVEA.L A7,A1 00020f48 45 f0 48 3a |E H: | LEA.L (A0+D4.L+#0x3a),A2 00020f4c 70 07 |p | MOVEQ.L #0x07,D0 00020f4e 12 da | | MOVE.B (A2)+,(A1)+ 00020f50 51 c8 ff fc |Q | DBF D0,0x20f4e 00020f54 2f 39 00 02 19 90 |/9 | MOVE.L 0x21990,-(A7) 00020f5a 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020f5e 48 78 00 00 |Hx | PEA.L 0x0 00020f62 48 78 00 07 |Hx | PEA.L 0x7 00020f66 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00020f6c de fc 00 14 | | ADDA.W #0x14,A7 00020f70 1e b0 48 36 | H6 | MOVE.B (A0+D4.L+#0x36),(A7) 00020f74 1f 70 48 37 00 01 | pH7 | MOVE.B (A0+D4.L+#0x37),(A7+0x1) 00020f7a 1f 70 48 38 00 02 | pH8 | MOVE.B (A0+D4.L+#0x38),(A7+0x2) 00020f80 1f 70 48 39 00 03 | pH9 | MOVE.B (A0+D4.L+#0x39),(A7+0x3) 00020f86 2f 39 00 02 19 90 |/9 | MOVE.L 0x21990,-(A7) 00020f8c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00020f90 48 78 00 00 |Hx | PEA.L 0x0 00020f94 48 78 00 03 |Hx | PEA.L 0x3 00020f98 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00020f9e de fc 00 14 | | ADDA.W #0x14,A7 00020fa2 52 87 |R | ADDQ.L #0x1,D7 00020fa4 68 00 ff 7a |h z | BVC 0x20f20 00020fa8 54 4f |TO | ADDQ.L #0x2,A7 00020faa 1e 82 | | MOVE.B D2,(A7) 00020fac 4e ba f9 26 |N & | JSR 0x208d4 00020fb0 54 4f |TO | ADDQ.L #0x2,A7 00020fb2 20 2e eb dc | . | MOVE.L (A6-0x1424),D0 00020fb6 d0 ae ff f2 | | ADD.L (A6-0xe),D0 00020fba 2d 40 eb dc |-@ | MOVE.L D0,(A6-0x1424) 00020fbe 20 06 | | MOVE.L D6,D0 00020fc0 e0 88 | | LSR.L #0x8,D0 00020fc2 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 00020fc8 63 02 |c | BLS 0x20fcc 00020fca 4e 4f |NO | TRAP #15 00020fcc 1d 40 eb ea | @ | MOVE.B D0,(A6-0x1416) 00020fd0 20 06 | | MOVE.L D6,D0 00020fd2 02 80 00 00 00 ff | | ANDI.L #0x000000ff,D0 00020fd8 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 00020fde 63 02 |c | BLS 0x20fe2 00020fe0 4e 4f |NO | TRAP #15 00020fe2 1d 40 eb eb | @ | MOVE.B D0,(A6-0x1415) 00020fe6 2f 39 00 02 19 98 |/9 | MOVE.L 0x21998,-(A7) 00020fec 1f 2e eb e4 | . | MOVE.B (A6-0x141c),-(A7) 00020ff0 4e b9 00 01 04 6c |N l | JSR ExpInputFlag(exp : Pointer; val : Word) 00020ff6 58 4f |XO | ADDQ.L #0x4,A7 00020ff8 3e ae eb ea |> | MOVE.W (A6-0x1416),(A7) 00020ffc 2f 39 00 02 19 98 |/9 | MOVE.L 0x21998,-(A7) 00021002 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021006 48 78 00 00 |Hx | PEA.L 0x0 0002100a 48 78 00 01 |Hx | PEA.L 0x1 0002100e 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00021014 de fc 00 0e | | ADDA.W #0xe,A7 00021018 2e 93 |. | MOVE.L (A3),(A7) 0002101a 53 97 |S | SUBQ.L #0x1,(A7) 0002101c 7e 00 |~ | MOVEQ.L #0x00,D7 0002101e be 97 | | CMP.L (A7),D7 00021020 6e 40 |n@ | BGT 0x21062 00021022 20 14 | | MOVE.L (A4),D0 00021024 d0 87 | | ADD.L D7,D0 00021026 0c 80 00 00 00 ff | | CMPI.L #0x000000ff,D0 0002102c 63 02 |c | BLS 0x21030 0002102e 4e 4f |NO | TRAP #15 00021030 e7 80 | | ASL.L #0x3,D0 00021032 41 ee eb c8 |A | LEA.L (A6-0x1438),A0 00021036 41 f0 08 00 |A | LEA.L (A0+D0.L),A0 0002103a 2f 28 0c 2e |/( . | MOVE.L (A0+0xc2e),-(A7) 0002103e 2f 28 0c 2a |/( * | MOVE.L (A0+0xc2a),-(A7) 00021042 2f 39 00 02 19 98 |/9 | MOVE.L 0x21998,-(A7) 00021048 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002104c 48 78 00 00 |Hx | PEA.L 0x0 00021050 48 78 00 07 |Hx | PEA.L 0x7 00021054 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 0002105a de fc 00 18 | | ADDA.W #0x18,A7 0002105e 52 87 |R | ADDQ.L #0x1,D7 00021060 68 bc |h | BVC 0x2101e 00021062 54 4f |TO | ADDQ.L #0x2,A7 00021064 1e bc 00 03 | | MOVE.B #0x03,(A7) 00021068 4e ba f8 6a |N j | JSR 0x208d4 0002106c 54 4f |TO | ADDQ.L #0x2,A7 0002106e 20 14 | | MOVE.L (A4),D0 00021070 d0 93 | | ADD.L (A3),D0 00021072 28 80 |( | MOVE.L D0,(A4) 00021074 4a 2e eb e4 |J. | TST.B (A6-0x141c) 00021078 67 04 |g | BEQ 0x2107e 0002107a dc 93 | | ADD.L (A3),D6 0002107c 60 06 |` | BRA 0x21084 0002107e 20 13 | | MOVE.L (A3),D0 00021080 ed 80 | | ASL.L #0x6,D0 00021082 dc 80 | | ADD.L D0,D6 00021084 22 17 |" | MOVE.L (A7),D1 00021086 52 81 |R | ADDQ.L #0x1,D1 00021088 69 06 |i | BVS 0x21090 0002108a 58 4f |XO | ADDQ.L #0x4,A7 0002108c 60 00 fc 8c |` | BRA 0x20d1a 00021090 50 4f |PO | ADDQ.L #0x8,A7 00021092 20 17 | | MOVE.L (A7),D0 00021094 52 80 |R | ADDQ.L #0x1,D0 00021096 0c 80 00 00 00 07 | | CMPI.L #0x00000007,D0 0002109c 6e 06 |n | BGT 0x210a4 0002109e 58 4f |XO | ADDQ.L #0x4,A7 000210a0 60 00 fc 34 |` 4 | BRA 0x20cd6 000210a4 54 4f |TO | ADDQ.L #0x2,A7 000210a6 42 17 |B | CLR.B (A7) 000210a8 1f 02 | | MOVE.B D2,-(A7) 000210aa 4e ba f8 c4 |N | JSR 0x20970 000210ae 54 4f |TO | ADDQ.L #0x2,A7 000210b0 1e bc 00 03 | | MOVE.B #0x03,(A7) 000210b4 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 000210b8 4e ba f8 b6 |N | JSR 0x20970 000210bc 58 4f |XO | ADDQ.L #0x4,A7 000210be 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000210c2 4e 5e |N^ | UNLK A6 000210c4 4e 75 |Nu | RTS 000210c6 ; -------------------------------------------------------------------------------------- 000210c6 ; OMSI PASCAL Function 000210c6 ; <LVAR 0x010 4(r)> 000210c6 ; <LVAR 0x00e 2(r)> 000210c6 ; <LVAR 0x00a 4(r)> 000210c6 ; <LVAR 0x008 2(r)> 000210c6 ; <LVAR -0x004 4(rw)> 000210c6 ; <LVAR -0x008 4(rw)> 000210c6 ; <LVAR -0x408 @> 000210c6 ; <LVAR -0x409 1(w)> 000210c6 ; <LVAR -0x40a 1(w) 2(r)> 000210c6 ; <LVAR -0x40f 1(w)> 000210c6 ; <LVAR -0x410 @> 000210c6 ; <LVAR -0x420 @> 000210c6 ; -------------------------------------------------------------------------------------- 000210c6 4e 56 fb 72 |NV r | LINK.W A6,#0xfb72 000210ca bf d5 | | CMPA.L (A5),A7 000210cc 62 06 |b | BHI 0x210d4 000210ce 44 fc 00 02 |D | MOVE.W #0x2,CCR 000210d2 4e 76 |Nv | TRAPV 000210d4 de fc 00 6e | n | ADDA.W #0x6e,A7 000210d8 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 000210dc 43 ee ff f8 |C | LEA.L (A6-0x8),A1 000210e0 45 ee 00 08 |E | LEA.L (A6+0x8),A2 000210e4 47 ee fb e0 |G | LEA.L (A6-0x420),A3 000210e8 49 f8 00 00 |I | LEA.L 0x0,A4 000210ec 22 bc 00 00 00 10 |" | MOVE.L #0x10,(A1) 000210f2 2d 7c 00 00 00 01 ff fc |-| | MOVE.L #0x1,(A6-0x4) 000210fa 70 00 |p | MOVEQ.L #0x00,D0 000210fc 1d 40 fb f1 | @ | MOVE.B D0,(A6-0x40f) 00021100 3f 12 |? | MOVE.W (A2),-(A7) 00021102 1f 00 | | MOVE.B D0,-(A7) 00021104 4e b9 00 02 16 ea |N | JSR exp_LOAD_DIAG_COUNTER.TYP(Sw_2, Sw_1) 0002110a 54 4f |TO | ADDQ.L #0x2,A7 0002110c 3e 92 |> | MOVE.W (A2),(A7) 0002110e 1f 00 | | MOVE.B D0,-(A7) 00021110 4e b9 00 02 17 36 |N 6 | JSR exp_LOAD_DIAG_COUNTER.VAL(Sw_2, Sw_1) 00021116 54 4f |TO | ADDQ.L #0x2,A7 00021118 3e 92 |> | MOVE.W (A2),(A7) 0002111a 3f 12 |? | MOVE.W (A2),-(A7) 0002111c 1f 00 | | MOVE.B D0,-(A7) 0002111e 4e b9 00 02 16 5c |N \ | JSR exp_LOAD_COUNTER.FIU(Sw_2, Sw_2, Sw_1) 00021124 58 4f |XO | ADDQ.L #0x4,A7 00021126 3e 92 |> | MOVE.W (A2),(A7) 00021128 4e b9 00 02 16 a4 |N | JSR exp_LOAD_COUNTER.SEQ(Sw_2) 0002112e 3e 92 |> | MOVE.W (A2),(A7) 00021130 1f 00 | | MOVE.B D0,-(A7) 00021132 4e b9 00 02 17 5a |N Z | JSR exp_LOAD_WCS_ADDRESS.IOC(Sw_2, Sw_1) 00021138 58 4f |XO | ADDQ.L #0x4,A7 0002113a 41 fa f0 c6 |A | LEA.L 0x20202,A0 0002113e 70 08 |p | MOVEQ.L #0x08,D0 00021140 3f 20 |? | MOVE.W -(A0),-(A7) 00021142 51 c8 ff fc |Q | DBF D0,0x21140 00021146 59 4f |YO | SUBQ.L #0x4,A7 00021148 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002114c 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 00021150 3f 3c 00 12 |?< | MOVE.W #0x12,-(A7) 00021154 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 0002115a 5c 4f |\O | ADDQ.L #0x6,A7 0002115c 42 17 |B | CLR.B (A7) 0002115e 1f 3c 00 04 | < | MOVE.B #0x04,-(A7) 00021162 4e ba f5 cc |N | JSR 0x20730 00021166 de fc 00 16 | | ADDA.W #0x16,A7 0002116a 2e ae 00 0a |. | MOVE.L (A6+0xa),(A7) 0002116e 53 97 |S | SUBQ.L #0x1,(A7) 00021170 70 00 |p | MOVEQ.L #0x00,D0 00021172 b0 97 | | CMP.L (A7),D0 00021174 6f 06 |o | BLE 0x2117c 00021176 59 4f |YO | SUBQ.L #0x4,A7 00021178 60 00 02 86 |` | BRA 0x21400 0002117c 2f 00 |/ | MOVE.L D0,-(A7) 0002117e 2f 2e 00 10 |/. | MOVE.L (A6+0x10),-(A7) 00021182 32 2e 00 0e |2. | MOVE.W (A6+0xe),D1 00021186 48 c1 |H | EXTW.L D1 00021188 d2 80 | | ADD.L D0,D1 0002118a 0c 81 00 00 40 00 | @ | CMPI.L #0x00004000,D1 00021190 63 02 |c | BLS 0x21194 00021192 4e 4f |NO | TRAP #15 00021194 3f 01 |? | MOVE.W D1,-(A7) 00021196 42 67 |Bg | CLR.W -(A7) 00021198 3f 3c 02 00 |?< | MOVE.W #0x200,-(A7) 0002119c 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 000211a0 41 ee fb f8 |A | LEA.L (A6-0x408),A0 000211a4 2f 08 |/ | MOVE.L A0,-(A7) 000211a6 48 6e fb f0 |Hn | PEA.L (A6-0x410) 000211aa 4e b9 00 01 03 84 |N | JSR ReadFile(file : File; w : W; x : W; a : W; b: B; c : L; d : L) 000211b0 de fc 00 14 | | ADDA.W #0x14,A7 000211b4 28 00 |( | MOVE.L D0,D4 000211b6 76 20 |v | MOVEQ.L #0x20,D3 000211b8 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 000211be 0c 83 00 00 00 1f | | CMPI.L #0x0000001f,D3 000211c4 66 22 |f" | BNE 0x211e8 000211c6 3f 3a f0 3a |?: : | MOVE.W 0x20202,-(A7) 000211ca 59 4f |YO | SUBQ.L #0x4,A7 000211cc 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000211d0 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000211d4 3f 3c 00 02 |?< | MOVE.W #0x2,-(A7) 000211d8 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000211de 50 4f |PO | ADDQ.L #0x8,A7 000211e0 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000211e6 5c 4f |\O | ADDQ.L #0x6,A7 000211e8 7c 00 || | MOVEQ.L #0x00,D6 000211ea 2f 2e ff fc |/. | MOVE.L (A6-0x4),-(A7) 000211ee 7a 00 |z | MOVEQ.L #0x00,D5 000211f0 ba 97 | | CMP.L (A7),D5 000211f2 6e 00 01 fe |n | BGT 0x213f2 000211f6 2f 11 |/ | MOVE.L (A1),-(A7) 000211f8 53 97 |S | SUBQ.L #0x1,(A7) 000211fa 7e 00 |~ | MOVEQ.L #0x00,D7 000211fc be 97 | | CMP.L (A7),D7 000211fe 6e 38 |n8 | BGT 0x21238 00021200 20 06 | | MOVE.L D6,D0 00021202 d0 87 | | ADD.L D7,D0 00021204 0c 80 00 00 00 1f | | CMPI.L #0x0000001f,D0 0002120a 63 02 |c | BLS 0x2120e 0002120c 4e 4f |NO | TRAP #15 0002120e eb 80 | | ASL.L #0x5,D0 00021210 20 4b | K | MOVEA.L A3,A0 00021212 2f 30 08 1c |/0 | MOVE.L (A0+D0.L+#0x1c),-(A7) 00021216 2f 30 08 18 |/0 | MOVE.L (A0+D0.L+#0x18),-(A7) 0002121a 2f 39 00 02 19 8c |/9 | MOVE.L 0x2198c,-(A7) 00021220 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021224 48 54 |HT | PEA.L (A4) 00021226 48 78 00 07 |Hx | PEA.L 0x7 0002122a 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00021230 de fc 00 18 | | ADDA.W #0x18,A7 00021234 52 87 |R | ADDQ.L #0x1,D7 00021236 68 c4 |h | BVC 0x211fc 00021238 54 4f |TO | ADDQ.L #0x2,A7 0002123a 42 17 |B | CLR.B (A7) 0002123c 4e ba f6 96 |N | JSR 0x208d4 00021240 54 4f |TO | ADDQ.L #0x2,A7 00021242 2f 11 |/ | MOVE.L (A1),-(A7) 00021244 53 97 |S | SUBQ.L #0x1,(A7) 00021246 7e 00 |~ | MOVEQ.L #0x00,D7 00021248 be 97 | | CMP.L (A7),D7 0002124a 6e 38 |n8 | BGT 0x21284 0002124c 20 06 | | MOVE.L D6,D0 0002124e d0 87 | | ADD.L D7,D0 00021250 0c 80 00 00 00 1f | | CMPI.L #0x0000001f,D0 00021256 63 02 |c | BLS 0x2125a 00021258 4e 4f |NO | TRAP #15 0002125a eb 80 | | ASL.L #0x5,D0 0002125c 20 4b | K | MOVEA.L A3,A0 0002125e 2f 30 08 24 |/0 $ | MOVE.L (A0+D0.L+#0x24),-(A7) 00021262 2f 30 08 20 |/0 | MOVE.L (A0+D0.L+#0x20),-(A7) 00021266 2f 39 00 02 19 90 |/9 | MOVE.L 0x21990,-(A7) 0002126c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021270 48 54 |HT | PEA.L (A4) 00021272 48 78 00 07 |Hx | PEA.L 0x7 00021276 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 0002127c de fc 00 18 | | ADDA.W #0x18,A7 00021280 52 87 |R | ADDQ.L #0x1,D7 00021282 68 c4 |h | BVC 0x21248 00021284 54 4f |TO | ADDQ.L #0x2,A7 00021286 1e bc 00 01 | | MOVE.B #0x01,(A7) 0002128a 4e ba f6 48 |N H | JSR 0x208d4 0002128e 54 4f |TO | ADDQ.L #0x2,A7 00021290 2f 11 |/ | MOVE.L (A1),-(A7) 00021292 53 97 |S | SUBQ.L #0x1,(A7) 00021294 7e 00 |~ | MOVEQ.L #0x00,D7 00021296 be 97 | | CMP.L (A7),D7 00021298 6e 38 |n8 | BGT 0x212d2 0002129a 20 06 | | MOVE.L D6,D0 0002129c d0 87 | | ADD.L D7,D0 0002129e 0c 80 00 00 00 1f | | CMPI.L #0x0000001f,D0 000212a4 63 02 |c | BLS 0x212a8 000212a6 4e 4f |NO | TRAP #15 000212a8 eb 80 | | ASL.L #0x5,D0 000212aa 20 4b | K | MOVEA.L A3,A0 000212ac 2f 30 08 2c |/0 , | MOVE.L (A0+D0.L+#0x2c),-(A7) 000212b0 2f 30 08 28 |/0 ( | MOVE.L (A0+D0.L+#0x28),-(A7) 000212b4 2f 39 00 02 19 94 |/9 | MOVE.L 0x21994,-(A7) 000212ba 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000212be 48 54 |HT | PEA.L (A4) 000212c0 48 78 00 07 |Hx | PEA.L 0x7 000212c4 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 000212ca de fc 00 18 | | ADDA.W #0x18,A7 000212ce 52 87 |R | ADDQ.L #0x1,D7 000212d0 68 c4 |h | BVC 0x21296 000212d2 54 4f |TO | ADDQ.L #0x2,A7 000212d4 1e bc 00 02 | | MOVE.B #0x02,(A7) 000212d8 4e ba f5 fa |N | JSR 0x208d4 000212dc 54 4f |TO | ADDQ.L #0x2,A7 000212de 2f 11 |/ | MOVE.L (A1),-(A7) 000212e0 53 97 |S | SUBQ.L #0x1,(A7) 000212e2 7e 00 |~ | MOVEQ.L #0x00,D7 000212e4 be 97 | | CMP.L (A7),D7 000212e6 6e 00 00 a8 |n | BGT 0x21390 000212ea 20 06 | | MOVE.L D6,D0 000212ec d0 87 | | ADD.L D7,D0 000212ee 0c 80 00 00 00 1f | | CMPI.L #0x0000001f,D0 000212f4 63 02 |c | BLS 0x212f8 000212f6 4e 4f |NO | TRAP #15 000212f8 eb 80 | | ASL.L #0x5,D0 000212fa 20 4b | K | MOVEA.L A3,A0 000212fc 42 81 |B | CLR.L D1 000212fe 12 30 08 28 | 0 ( | MOVE.B (A0+D0.L+#0x28),D1 00021302 02 41 00 03 | A | ANDI.W #0x0003,D1 00021306 ed 41 | A | ASL.W #0x6,D1 00021308 42 82 |B | CLR.L D2 0002130a 14 30 08 29 | 0 ) | MOVE.B (A0+D0.L+#0x29),D2 0002130e 02 42 00 03 | B | ANDI.W #0x0003,D2 00021312 e9 42 | B | ASL.W #0x4,D2 00021314 d4 41 | A | ADD.W D1,D2 00021316 42 81 |B | CLR.L D1 00021318 12 30 08 2a | 0 * | MOVE.B (A0+D0.L+#0x2a),D1 0002131c 02 41 00 03 | A | ANDI.W #0x0003,D1 00021320 e5 41 | A | ASL.W #0x2,D1 00021322 d2 42 | B | ADD.W D2,D1 00021324 42 82 |B | CLR.L D2 00021326 14 30 08 2b | 0 + | MOVE.B (A0+D0.L+#0x2b),D2 0002132a 02 42 00 03 | B | ANDI.W #0x0003,D2 0002132e d4 41 | A | ADD.W D1,D2 00021330 1d 42 fb f6 | B | MOVE.B D2,(A6-0x40a) 00021334 42 81 |B | CLR.L D1 00021336 12 30 08 2c | 0 , | MOVE.B (A0+D0.L+#0x2c),D1 0002133a 02 41 00 03 | A | ANDI.W #0x0003,D1 0002133e ed 41 | A | ASL.W #0x6,D1 00021340 42 82 |B | CLR.L D2 00021342 14 30 08 2d | 0 - | MOVE.B (A0+D0.L+#0x2d),D2 00021346 02 42 00 03 | B | ANDI.W #0x0003,D2 0002134a e9 42 | B | ASL.W #0x4,D2 0002134c d4 41 | A | ADD.W D1,D2 0002134e 42 81 |B | CLR.L D1 00021350 12 30 08 2e | 0 . | MOVE.B (A0+D0.L+#0x2e),D1 00021354 02 41 00 03 | A | ANDI.W #0x0003,D1 00021358 e5 41 | A | ASL.W #0x2,D1 0002135a d2 42 | B | ADD.W D2,D1 0002135c 42 82 |B | CLR.L D2 0002135e 14 30 08 2f | 0 / | MOVE.B (A0+D0.L+#0x2f),D2 00021362 02 42 00 03 | B | ANDI.W #0x0003,D2 00021366 d4 41 | A | ADD.W D1,D2 00021368 1d 42 fb f7 | B | MOVE.B D2,(A6-0x409) 0002136c 3f 2e fb f6 |?. | MOVE.W (A6-0x40a),-(A7) 00021370 2f 39 00 02 19 9c |/9 | MOVE.L 0x2199c,-(A7) 00021376 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002137a 48 54 |HT | PEA.L (A4) 0002137c 48 78 00 01 |Hx | PEA.L 0x1 00021380 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 00021386 de fc 00 12 | | ADDA.W #0x12,A7 0002138a 52 87 |R | ADDQ.L #0x1,D7 0002138c 68 00 ff 56 |h V | BVC 0x212e4 00021390 54 4f |TO | ADDQ.L #0x2,A7 00021392 1e bc 00 04 | | MOVE.B #0x04,(A7) 00021396 4e ba f5 3c |N < | JSR 0x208d4 0002139a 54 4f |TO | ADDQ.L #0x2,A7 0002139c 2f 11 |/ | MOVE.L (A1),-(A7) 0002139e 53 97 |S | SUBQ.L #0x1,(A7) 000213a0 7e 00 |~ | MOVEQ.L #0x00,D7 000213a2 be 97 | | CMP.L (A7),D7 000213a4 6e 38 |n8 | BGT 0x213de 000213a6 20 06 | | MOVE.L D6,D0 000213a8 d0 87 | | ADD.L D7,D0 000213aa 0c 80 00 00 00 1f | | CMPI.L #0x0000001f,D0 000213b0 63 02 |c | BLS 0x213b4 000213b2 4e 4f |NO | TRAP #15 000213b4 eb 80 | | ASL.L #0x5,D0 000213b6 20 4b | K | MOVEA.L A3,A0 000213b8 2f 30 08 34 |/0 4 | MOVE.L (A0+D0.L+#0x34),-(A7) 000213bc 2f 30 08 30 |/0 0 | MOVE.L (A0+D0.L+#0x30),-(A7) 000213c0 2f 39 00 02 19 98 |/9 | MOVE.L 0x21998,-(A7) 000213c6 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000213ca 48 54 |HT | PEA.L (A4) 000213cc 48 78 00 07 |Hx | PEA.L 0x7 000213d0 4e b9 00 01 04 66 |N f | JSR ExpInputParam(exp : Pointer; ptr : Pointer; len : L) 000213d6 de fc 00 18 | | ADDA.W #0x18,A7 000213da 52 87 |R | ADDQ.L #0x1,D7 000213dc 68 c4 |h | BVC 0x213a2 000213de 54 4f |TO | ADDQ.L #0x2,A7 000213e0 1e bc 00 03 | | MOVE.B #0x03,(A7) 000213e4 4e ba f4 ee |N | JSR 0x208d4 000213e8 54 4f |TO | ADDQ.L #0x2,A7 000213ea dc 91 | | ADD.L (A1),D6 000213ec 52 85 |R | ADDQ.L #0x1,D5 000213ee 68 00 fe 00 |h | BVC 0x211f0 000213f2 58 4f |XO | ADDQ.L #0x4,A7 000213f4 20 17 | | MOVE.L (A7),D0 000213f6 52 80 |R | ADDQ.L #0x1,D0 000213f8 69 06 |i | BVS 0x21400 000213fa 58 4f |XO | ADDQ.L #0x4,A7 000213fc 60 00 fd 74 |` t | BRA 0x21172 00021400 5c 4f |\O | ADDQ.L #0x6,A7 00021402 42 17 |B | CLR.B (A7) 00021404 1f 3c 00 04 | < | MOVE.B #0x04,-(A7) 00021408 4e ba f5 66 |N f | JSR 0x20970 0002140c 58 4f |XO | ADDQ.L #0x4,A7 0002140e 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 00021412 4e 5e |N^ | UNLK A6 00021414 4e 75 |Nu | RTS 00021416 ; -------------------------------------------------------------------------------------- 00021416 ; OMSI PASCAL Function 00021416 ; <LVAR 0x00e 4(r)> 00021416 ; <LVAR 0x00c @ 1(r)> 00021416 ; <LVAR 0x00a 1(r)> 00021416 ; <LVAR 0x008 1(r)> 00021416 ; <LVAR -0x004 @ 2(r)> 00021416 ; <LVAR -0x008 @ 4(r)> 00021416 ; <LVAR -0x00a @> 00021416 ; <LVAR -0x00e @ 4(r)> 00021416 ; -------------------------------------------------------------------------------------- 00021416 4e 56 ff 84 |NV | LINK.W A6,#0xff84 0002141a bf d5 | | CMPA.L (A5),A7 0002141c 62 06 |b | BHI 0x21424 0002141e 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021422 4e 76 |Nv | TRAPV 00021424 de fc 00 6e | n | ADDA.W #0x6e,A7 00021428 48 e7 ff f8 |H | MOVEM.L A4+A3+A2+A1+A0+D7+D6+D5+D4+D3+D2+D1+D0,-(A7) 0002142c 45 ee ff f2 |E | LEA.L (A6-0xe),A2 00021430 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00021436 49 ee 00 0c |I | LEA.L (A6+0xc),A4 0002143a 72 01 |r | MOVEQ.L #0x01,D1 0002143c 74 05 |t | MOVEQ.L #0x05,D2 0002143e 7a 02 |z | MOVEQ.L #0x02,D5 00021440 7c 2a ||* | MOVEQ.L #0x2a,D6 00021442 7e 29 |~) | MOVEQ.L #0x29,D7 00021444 2f 2e 00 0e |/. | MOVE.L (A6+0xe),-(A7) 00021448 48 54 |HT | PEA.L (A4) 0002144a 48 52 |HR | PEA.L (A2) 0002144c 48 6e ff f8 |Hn | PEA.L (A6-0x8) 00021450 48 6e ff fc |Hn | PEA.L (A6-0x4) 00021454 4e ba ee a6 |N | JSR 0x202fc 00021458 de fc 00 12 | | ADDA.W #0x12,A7 0002145c 1e 82 | | MOVE.B D2,(A7) 0002145e 1f 05 | | MOVE.B D5,-(A7) 00021460 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 00021466 58 4f |XO | ADDQ.L #0x4,A7 00021468 4a 14 |J | TST.B (A4) 0002146a 66 06 |f | BNE 0x21472 0002146c 4a 2e 00 08 |J. | TST.B (A6+0x8) 00021470 67 44 |gD | BEQ 0x214b6 00021472 9e c6 | | SUBA.W D6,A7 00021474 20 4f | O | MOVEA.L A7,A0 00021476 43 fa ed 8c |C | LEA.L 0x20204,A1 0002147a 70 28 |p( | MOVEQ.L #0x28,D0 0002147c 10 d9 | | MOVE.B (A1)+,(A0)+ 0002147e 51 c8 ff fc |Q | DBF D0,0x2147c 00021482 59 4f |YO | SUBQ.L #0x4,A7 00021484 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021488 3f 01 |? | MOVE.W D1,-(A7) 0002148a 3f 07 |? | MOVE.W D7,-(A7) 0002148c 4e 93 |N | JSR (A3) 0002148e 50 4f |PO | ADDQ.L #0x8,A7 00021490 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 00021496 de c6 | | ADDA.W D6,A7 00021498 2e 92 |. | MOVE.L (A2),(A7) 0002149a 3f 01 |? | MOVE.W D1,-(A7) 0002149c 3f 3c 00 19 |?< | MOVE.W #0x19,-(A7) 000214a0 4e ba f7 74 |N t | JSR 0x20c16 000214a4 54 4f |TO | ADDQ.L #0x2,A7 000214a6 20 4f | O | MOVEA.L A7,A0 000214a8 43 fa ed 84 |C | LEA.L 0x2022e,A1 000214ac 70 04 |p | MOVEQ.L #0x04,D0 000214ae 10 d9 | | MOVE.B (A1)+,(A0)+ 000214b0 51 c8 ff fc |Q | DBF D0,0x214ae 000214b4 60 48 |`H | BRA 0x214fe 000214b6 4a 2e 00 0a |J. | TST.B (A6+0xa) 000214ba 67 5a |gZ | BEQ 0x21516 000214bc 9e fc 00 18 | | SUBA.W #0x18,A7 000214c0 20 4f | O | MOVEA.L A7,A0 000214c2 43 fa ed 70 |C p | LEA.L 0x20234,A1 000214c6 70 16 |p | MOVEQ.L #0x16,D0 000214c8 10 d9 | | MOVE.B (A1)+,(A0)+ 000214ca 51 c8 ff fc |Q | DBF D0,0x214c8 000214ce 59 4f |YO | SUBQ.L #0x4,A7 000214d0 48 6f 00 04 |Ho | PEA.L (A7+0x4) 000214d4 3f 01 |? | MOVE.W D1,-(A7) 000214d6 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 000214da 4e 93 |N | JSR (A3) 000214dc 50 4f |PO | ADDQ.L #0x8,A7 000214de 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 000214e4 de fc 00 18 | | ADDA.W #0x18,A7 000214e8 2e 92 |. | MOVE.L (A2),(A7) 000214ea 3f 01 |? | MOVE.W D1,-(A7) 000214ec 4e ba f4 d2 |N | JSR 0x209c0 000214f0 20 4f | O | MOVEA.L A7,A0 000214f2 43 fa ed 58 |C X | LEA.L 0x2024c,A1 000214f6 70 04 |p | MOVEQ.L #0x04,D0 000214f8 10 d9 | | MOVE.B (A1)+,(A0)+ 000214fa 51 c8 ff fc |Q | DBF D0,0x214f8 000214fe 59 4f |YO | SUBQ.L #0x4,A7 00021500 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021504 3f 01 |? | MOVE.W D1,-(A7) 00021506 3f 02 |? | MOVE.W D2,-(A7) 00021508 4e 93 |N | JSR (A3) 0002150a 50 4f |PO | ADDQ.L #0x8,A7 0002150c 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 00021512 de fc 00 0a | | ADDA.W #0xa,A7 00021516 4a 14 |J | TST.B (A4) 00021518 67 68 |gh | BEQ 0x21582 0002151a 41 fa ed 4c |A L | LEA.L 0x20268,A0 0002151e 70 0a |p | MOVEQ.L #0x0a,D0 00021520 3f 20 |? | MOVE.W -(A0),-(A7) 00021522 51 c8 ff fc |Q | DBF D0,0x21520 00021526 59 4f |YO | SUBQ.L #0x4,A7 00021528 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002152c 3f 01 |? | MOVE.W D1,-(A7) 0002152e 3f 3c 00 16 |?< | MOVE.W #0x16,-(A7) 00021532 4e 93 |N | JSR (A3) 00021534 50 4f |PO | ADDQ.L #0x8,A7 00021536 4e b9 00 01 03 d8 |N | JSR WriteConsoleString(str : String) 0002153c de fc 00 16 | | ADDA.W #0x16,A7 00021540 2e 92 |. | MOVE.L (A2),(A7) 00021542 3f 07 |? | MOVE.W D7,-(A7) 00021544 28 2e ff f8 |(. | MOVE.L (A6-0x8),D4 00021548 76 20 |v | MOVEQ.L #0x20,D3 0002154a 4e b9 00 01 02 94 |N | JSR ?divs_d3_d4 00021550 2f 04 |/ | MOVE.L D4,-(A7) 00021552 3f 2e ff fc |?. | MOVE.W (A6-0x4),-(A7) 00021556 4e ba fb 6e |N n | JSR 0x210c6 0002155a 5c 4f |\O | ADDQ.L #0x6,A7 0002155c 20 4f | O | MOVEA.L A7,A0 0002155e 43 fa ed 08 |C | LEA.L 0x20268,A1 00021562 70 04 |p | MOVEQ.L #0x04,D0 00021564 10 d9 | | MOVE.B (A1)+,(A0)+ 00021566 51 c8 ff fc |Q | DBF D0,0x21564 0002156a 59 4f |YO | SUBQ.L #0x4,A7 0002156c 48 6f 00 04 |Ho | PEA.L (A7+0x4) 00021570 3f 01 |? | MOVE.W D1,-(A7) 00021572 3f 02 |? | MOVE.W D2,-(A7) 00021574 4e 93 |N | JSR (A3) 00021576 50 4f |PO | ADDQ.L #0x8,A7 00021578 4e b9 00 01 03 e0 |N | JSR WriteConsoleStringCrLf(str : String) 0002157e de fc 00 0a | | ADDA.W #0xa,A7 00021582 1f 02 | | MOVE.B D2,-(A7) 00021584 1f 05 | | MOVE.B D5,-(A7) 00021586 4e b9 00 01 04 8a |N | JSR DiProcCmd(board : Byte; cmd : Byte) 0002158c 2e 92 |. | MOVE.L (A2),(A7) 0002158e 4e ba f0 a2 |N | JSR 0x20632 00021592 54 4f |TO | ADDQ.L #0x2,A7 00021594 42 17 |B | CLR.B (A7) 00021596 1f 05 | | MOVE.B D5,-(A7) 00021598 48 78 00 01 |Hx | PEA.L 0x1 0002159c 48 6e ff f6 |Hn | PEA.L (A6-0xa) 000215a0 48 52 |HR | PEA.L (A2) 000215a2 4e b9 00 01 03 8c |N | JSR CloseFile(a : L; VAR status : B; VAR file : File) 000215a8 de fc 00 10 | | ADDA.W #0x10,A7 000215ac 4c df 1f ff |L | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+D6+D7+A0+A1+A2+A3+A4 000215b0 4e 5e |N^ | UNLK A6 000215b2 4e 75 |Nu | RTS 000215b4 ; -------------------------------------------------------------------------------------- 000215b4 ; OMSI PASCAL Function 000215b4 ; -------------------------------------------------------------------------------------- 000215b4 START: 000215b4 4f fa 00 08 |O | LEA.L MAIN,A7 000215b8 4e f9 00 01 02 80 |N | JMP ?start_program 000215be MAIN: 000215be 41 f9 00 02 19 a6 |A | LEA.L 0x219a6,A0 000215c4 43 f9 00 02 19 aa |C | LEA.L 0x219aa,A1 000215ca 45 f9 00 01 05 26 |E & | LEA.L IPC_GetBool() : Bool,A2 000215d0 47 f9 00 02 19 ab |G | LEA.L 0x219ab,A3 000215d6 49 f9 00 02 19 ac |I | LEA.L 0x219ac,A4 000215dc 4e b9 00 01 03 98 |N | JSR FSCALL_10398 000215e2 48 78 00 05 |Hx | PEA.L 0x5 000215e6 4e b9 00 01 04 d8 |N | JSR ExpInit(a : Long) 000215ec 54 4f |TO | ADDQ.L #0x2,A7 000215ee 42 17 |B | CLR.B (A7) 000215f0 4e b9 00 01 04 d2 |N | JSR SetExpInitDone(a : Byte) 000215f6 54 4f |TO | ADDQ.L #0x2,A7 000215f8 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 000215fe 48 50 |HP | PEA.L (A0) 00021600 4e b9 00 01 05 2c |N , | JSR IPC_GetString(VAR retval : String) 00021606 58 4f |XO | ADDQ.L #0x4,A7 00021608 48 51 |HQ | PEA.L (A1) 0002160a 4e 92 |N | JSR (A2) 0002160c 58 4f |XO | ADDQ.L #0x4,A7 0002160e 48 53 |HS | PEA.L (A3) 00021610 4e 92 |N | JSR (A2) 00021612 58 4f |XO | ADDQ.L #0x4,A7 00021614 48 54 |HT | PEA.L (A4) 00021616 4e 92 |N | JSR (A2) 00021618 58 4f |XO | ADDQ.L #0x4,A7 0002161a 4e b9 00 01 05 1a |N | JSR IPC_GetEnd(void) 00021620 2f 10 |/ | MOVE.L (A0),-(A7) 00021622 1f 11 | | MOVE.B (A1),-(A7) 00021624 1f 13 | | MOVE.B (A3),-(A7) 00021626 1f 14 | | MOVE.B (A4),-(A7) 00021628 4e ba fd ec |N | JSR 0x21416 0002162c de fc 00 0a | | ADDA.W #0xa,A7 00021630 4e b9 00 01 05 38 |N 8 | JSR IPC_Init(void) 00021636 1f 3c 00 01 | < | MOVE.B #0x01,-(A7) 0002163a 4e b9 00 01 05 02 |N | JSR IPC_PutBool(a : Bool) 00021640 54 4f |TO | ADDQ.L #0x2,A7 00021642 4e b9 00 01 05 14 |N | JSR IPC_PutEnd(void) 00021648 42 27 |B' | CLR.B -(A7) 0002164a 48 78 00 01 |Hx | PEA.L 0x1 0002164e 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 00021654 5c 4f |\O | ADDQ.L #0x6,A7 00021656 4e b9 00 01 02 84 |N | JSR ?exit 0002165c exp_LOAD_COUNTER.FIU(Sw_2, Sw_2, Sw_1): 0002165c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021662 00 0e | | .CONST 0x000e ; Stack-delta 00021664 10 4c 4f 41 44 5f 43 4f | LOAD_CO| .TXT 16,'LOAD_COUNTER.FIU' 00021675 00 | | .CONST 0x0 00021676 03 | | .CONST 0x3 ; DIPROC address 00021677 00 | | .CONST 0x0 ; Output Parameters 00021678 03 | | .CONST 0x3 ; Input Parameters 00021679 01 | | .CONST 0x1 ; In arg [2] 0002167a 01 | | .CONST 0x1 ; In arg [2] 0002167b 00 | | .CONST 0x0 ; In arg [1] 0002167c exp_PREP_LOAD_DISPATCH_RAMS.SEQ(): 0002167c 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021682 00 08 | | .CONST 0x0008 ; Stack-delta 00021684 1b 50 52 45 50 5f 4c 4f | PREP_LO| .TXT 27,'PREP_LOAD_DISPATCH_RAMS.SEQ' 000216a0 00 | | .CONST 0x0 000216a1 02 | | .CONST 0x2 ; DIPROC address 000216a2 00 | | .CONST 0x0 ; Output Parameters 000216a3 00 | | .CONST 0x0 ; Input Parameters 000216a4 exp_LOAD_COUNTER.SEQ(Sw_2): 000216a4 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000216aa 00 0a | | .CONST 0x000a ; Stack-delta 000216ac 10 4c 4f 41 44 5f 43 4f | LOAD_CO| .TXT 16,'LOAD_COUNTER.SEQ' 000216bd 00 | | .CONST 0x0 000216be 02 | | .CONST 0x2 ; DIPROC address 000216bf 00 | | .CONST 0x0 ; Output Parameters 000216c0 01 | | .CONST 0x1 ; Input Parameters 000216c1 01 | | .CONST 0x1 ; In arg [2] 000216c2 exp_PREP_LOAD_REGISTER_FILE.TYP(): 000216c2 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000216c8 00 08 | | .CONST 0x0008 ; Stack-delta 000216ca 1b 50 52 45 50 5f 4c 4f | PREP_LO| .TXT 27,'PREP_LOAD_REGISTER_FILE.TYP' 000216e6 00 | | .CONST 0x0 000216e7 06 | | .CONST 0x6 ; DIPROC address 000216e8 00 | | .CONST 0x0 ; Output Parameters 000216e9 00 | | .CONST 0x0 ; Input Parameters 000216ea exp_LOAD_DIAG_COUNTER.TYP(Sw_2, Sw_1): 000216ea 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 000216f0 00 0c | | .CONST 0x000c ; Stack-delta 000216f2 15 4c 4f 41 44 5f 44 49 | LOAD_DI| .TXT 21,'LOAD_DIAG_COUNTER.TYP' 00021708 00 | | .CONST 0x0 00021709 06 | | .CONST 0x6 ; DIPROC address 0002170a 00 | | .CONST 0x0 ; Output Parameters 0002170b 02 | | .CONST 0x2 ; Input Parameters 0002170c 01 | | .CONST 0x1 ; In arg [2] 0002170d 00 | | .CONST 0x0 ; In arg [1] 0002170e exp_PREP_LOAD_REGISTER_FILE.VAL(): 0002170e 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021714 00 08 | | .CONST 0x0008 ; Stack-delta 00021716 1b 50 52 45 50 5f 4c 4f | PREP_LO| .TXT 27,'PREP_LOAD_REGISTER_FILE.VAL' 00021732 00 | | .CONST 0x0 00021733 07 | | .CONST 0x7 ; DIPROC address 00021734 00 | | .CONST 0x0 ; Output Parameters 00021735 00 | | .CONST 0x0 ; Input Parameters 00021736 exp_LOAD_DIAG_COUNTER.VAL(Sw_2, Sw_1): 00021736 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 0002173c 00 0c | | .CONST 0x000c ; Stack-delta 0002173e 15 4c 4f 41 44 5f 44 49 | LOAD_DI| .TXT 21,'LOAD_DIAG_COUNTER.VAL' 00021754 00 | | .CONST 0x0 00021755 07 | | .CONST 0x7 ; DIPROC address 00021756 00 | | .CONST 0x0 ; Output Parameters 00021757 02 | | .CONST 0x2 ; Input Parameters 00021758 01 | | .CONST 0x1 ; In arg [2] 00021759 00 | | .CONST 0x0 ; In arg [1] 0002175a exp_LOAD_WCS_ADDRESS.IOC(Sw_2, Sw_1): 0002175a 4e b9 00 01 05 68 |N h | JSR Run_Experiment() 00021760 00 0c | | .CONST 0x000c ; Stack-delta 00021762 14 4c 4f 41 44 5f 57 43 | LOAD_WC| .TXT 20,'LOAD_WCS_ADDRESS.IOC' 00021777 00 | | .CONST 0x0 00021778 04 | | .CONST 0x4 ; DIPROC address 00021779 00 | | .CONST 0x0 ; Output Parameters 0002177a 02 | | .CONST 0x2 ; Input Parameters 0002177b 01 | | .CONST 0x1 ; In arg [2] 0002177c 00 | | .CONST 0x0 ; In arg [1] 0002177d 00 | | .PAD 0x0 0002177e 57 6f 72 64 73 20 65 72 |Words er| .TXT 'Words error :_' 0002178c ; -------------------------------------------------------------------------------------- 0002178c ; OMSI PASCAL Function 0002178c ; <LVAR 0x008 1(r)> 0002178c ; -------------------------------------------------------------------------------------- 0002178c PROG_FAIL: 0002178c 4e 56 ff d2 |NV | LINK.W A6,#0xffd2 00021790 bf d5 | | CMPA.L (A5),A7 00021792 62 06 |b | BHI 0x2179a 00021794 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021798 4e 76 |Nv | TRAPV 0002179a de fc 00 2c | , | ADDA.W #0x2c,A7 0002179e 48 e7 80 80 |H | MOVEM.L A0+D0,-(A7) 000217a2 41 fa ff e8 |A | LEA.L PROG_FAIL,A0 000217a6 70 06 |p | MOVEQ.L #0x06,D0 000217a8 3f 20 |? | MOVE.W -(A0),-(A7) 000217aa 51 c8 ff fc |Q | DBF D0,0x217a8 000217ae 1f 3c 00 03 | < | MOVE.B #0x03,-(A7) 000217b2 51 4f |QO | SUBQ.L #0x8,A7 000217b4 48 6f 00 0a |Ho | PEA.L (A7+0xa) 000217b8 3f 3c 00 01 |?< | MOVE.W #0x1,-(A7) 000217bc 3f 3c 00 0e |?< | MOVE.W #0xe,-(A7) 000217c0 4e b9 00 01 02 c4 |N | JSR StringLit(Src : Pointer; Offset: W; Len : W) : String 000217c6 58 4f |XO | ADDQ.L #0x4,A7 000217c8 10 2e 00 08 | . | MOVE.B (A6+0x8),D0 000217cc 48 80 |H | EXTB.W D0 000217ce 48 c0 |H | EXTW.L D0 000217d0 2f 00 |/ | MOVE.L D0,-(A7) 000217d2 4e b9 00 01 02 e4 |N | JSR Long2String(a : Long) : String 000217d8 58 4f |XO | ADDQ.L #0x4,A7 000217da 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000217e0 50 4f |PO | ADDQ.L #0x8,A7 000217e2 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 000217e8 de fc 00 14 | | ADDA.W #0x14,A7 000217ec 4c df 01 01 |L | MOVEM.L (A7)+,D0+A0 000217f0 4e 5e |N^ | UNLK A6 000217f2 4e 75 |Nu | RTS 000217f4 42 6f 61 72 64 20 20 20 |Board | .TXT 'Board :_ ' 00021802 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment :_ ' 00021810 53 74 61 74 75 73 20 20 |Status | .TXT 'Status :_ ' 0002181e 45 78 70 65 72 69 6d 65 |Experime| .TXT 'Experiment error :' 00021830 46 61 74 61 6c 20 65 78 |Fatal ex| .TXT 'Fatal experiment error. ' 00021848 ; -------------------------------------------------------------------------------------- 00021848 ; OMSI PASCAL Function 00021848 ; <LVAR 0x00e 1(r)> 00021848 ; <LVAR 0x00a 4(r)> 00021848 ; <LVAR 0x008 1(r)> 00021848 ; -------------------------------------------------------------------------------------- 00021848 EXP_FAIL: 00021848 4e 56 ff 8c |NV | LINK.W A6,#0xff8c 0002184c bf d5 | | CMPA.L (A5),A7 0002184e 62 06 |b | BHI 0x21856 00021850 44 fc 00 02 |D | MOVE.W #0x2,CCR 00021854 4e 76 |Nv | TRAPV 00021856 de fc 00 74 | t | ADDA.W #0x74,A7 0002185a 48 e7 fc f8 |H | MOVEM.L A4+A3+A2+A1+A0+D5+D4+D3+D2+D1+D0,-(A7) 0002185e 47 f9 00 01 02 c4 |G | LEA.L StringLit(Src : Pointer; Offset: W; Len : W) : String,A3 00021864 49 f9 00 01 03 e0 |I | LEA.L WriteConsoleStringCrLf(str : String),A4 0002186a 72 01 |r | MOVEQ.L #0x01,D1 0002186c 74 0d |t | MOVEQ.L #0x0d,D2 0002186e 76 1e |v | MOVEQ.L #0x1e,D3 00021870 78 12 |x | MOVEQ.L #0x12,D4 00021872 7a 0e |z | MOVEQ.L #0x0e,D5 00021874 4e b9 00 01 03 dc |N | JSR WriteConsoleCrLf(void) 0002187a 41 fa ff b4 |A | LEA.L 0x21830,A0 0002187e 70 08 |p | MOVEQ.L #0x08,D0 00021880 3f 20 |? | MOVE.W -(A0),-(A7) 00021882 51 c8 ff fc |Q | DBF D0,0x21880 00021886 59 4f |YO | SUBQ.L #0x4,A7 00021888 48 6f 00 04 |Ho | PEA.L (A7+0x4) 0002188c 3f 01 |? | MOVE.W D1,-(A7) 0002188e 3f 04 |? | MOVE.W D4,-(A7) 00021890 4e 93 |N | JSR (A3) 00021892 50 4f |PO | ADDQ.L #0x8,A7 00021894 4e 94 |N | JSR (A4) 00021896 50 4f |PO | ADDQ.L #0x8,A7 00021898 20 4f | O | MOVEA.L A7,A0 0002189a 43 fa ff 58 |C X | LEA.L 0x217f4,A1 0002189e 70 0c |p | MOVEQ.L #0x0c,D0 000218a0 10 d9 | | MOVE.B (A1)+,(A0)+ 000218a2 51 c8 ff fc |Q | DBF D0,0x218a0 000218a6 51 4f |QO | SUBQ.L #0x8,A7 000218a8 48 6f 00 08 |Ho | PEA.L (A7+0x8) 000218ac 3f 01 |? | MOVE.W D1,-(A7) 000218ae 3f 02 |? | MOVE.W D2,-(A7) 000218b0 4e 93 |N | JSR (A3) 000218b2 54 4f |TO | ADDQ.L #0x2,A7 000218b4 1e ae 00 0e | | MOVE.B (A6+0xe),(A7) 000218b8 4e b9 00 01 04 9c |N | JSR BoardName(address : B) : String 000218be 54 4f |TO | ADDQ.L #0x2,A7 000218c0 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 000218c6 50 4f |PO | ADDQ.L #0x8,A7 000218c8 4e 94 |N | JSR (A4) 000218ca de c4 | | ADDA.W D4,A7 000218cc 20 6e 00 0a | n | MOVEA.L (A6+0xa),A0 000218d0 b0 c1 | | CMPA.W D1,A0 000218d2 67 48 |gH | BEQ 0x2191c 000218d4 9e c5 | | SUBA.W D5,A7 000218d6 22 4f |"O | MOVEA.L A7,A1 000218d8 45 fa ff 28 |E ( | LEA.L 0x21802,A2 000218dc 70 0c |p | MOVEQ.L #0x0c,D0 000218de 12 da | | MOVE.B (A2)+,(A1)+ 000218e0 51 c8 ff fc |Q | DBF D0,0x218de 000218e4 9e c3 | | SUBA.W D3,A7 000218e6 22 4f |"O | MOVEA.L A7,A1 000218e8 41 e8 00 fc |A | LEA.L (A0+0xfc),A0 000218ec 70 1d |p | MOVEQ.L #0x1d,D0 000218ee 12 d8 | | MOVE.B (A0)+,(A1)+ 000218f0 51 c8 ff fc |Q | DBF D0,0x218ee 000218f4 51 4f |QO | SUBQ.L #0x8,A7 000218f6 48 6f 00 26 |Ho & | PEA.L (A7+0x26) 000218fa 3f 01 |? | MOVE.W D1,-(A7) 000218fc 3f 02 |? | MOVE.W D2,-(A7) 000218fe 4e 93 |N | JSR (A3) 00021900 58 4f |XO | ADDQ.L #0x4,A7 00021902 48 6f 00 0c |Ho | PEA.L (A7+0xc) 00021906 3f 01 |? | MOVE.W D1,-(A7) 00021908 3f 03 |? | MOVE.W D3,-(A7) 0002190a 4e 93 |N | JSR (A3) 0002190c 50 4f |PO | ADDQ.L #0x8,A7 0002190e 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 00021914 50 4f |PO | ADDQ.L #0x8,A7 00021916 4e 94 |N | JSR (A4) 00021918 de fc 00 30 | 0 | ADDA.W #0x30,A7 0002191c 9e c5 | | SUBA.W D5,A7 0002191e 20 4f | O | MOVEA.L A7,A0 00021920 43 fa fe ee |C | LEA.L 0x21810,A1 00021924 70 0c |p | MOVEQ.L #0x0c,D0 00021926 10 d9 | | MOVE.B (A1)+,(A0)+ 00021928 51 c8 ff fc |Q | DBF D0,0x21926 0002192c 51 4f |QO | SUBQ.L #0x8,A7 0002192e 48 6f 00 08 |Ho | PEA.L (A7+0x8) 00021932 3f 01 |? | MOVE.W D1,-(A7) 00021934 3f 02 |? | MOVE.W D2,-(A7) 00021936 4e 93 |N | JSR (A3) 00021938 54 4f |TO | ADDQ.L #0x2,A7 0002193a 1e ae 00 08 | | MOVE.B (A6+0x8),(A7) 0002193e 4e b9 00 01 04 a2 |N | JSR ExpStatus2Text(status.B, &String) 00021944 54 4f |TO | ADDQ.L #0x2,A7 00021946 4e b9 00 01 02 d0 |N | JSR StringCat2(a, b : String) : String 0002194c 50 4f |PO | ADDQ.L #0x8,A7 0002194e 4e 94 |N | JSR (A4) 00021950 5d 4f |]O | SUBQ.L #0x6,A7 00021952 20 4f | O | MOVEA.L A7,A0 00021954 43 fa fe da |C | LEA.L 0x21830,A1 00021958 70 16 |p | MOVEQ.L #0x16,D0 0002195a 10 d9 | | MOVE.B (A1)+,(A0)+ 0002195c 51 c8 ff fc |Q | DBF D0,0x2195a 00021960 1f 3c 00 02 | < | MOVE.B #0x02,-(A7) 00021964 59 4f |YO | SUBQ.L #0x4,A7 00021966 48 6f 00 06 |Ho | PEA.L (A7+0x6) 0002196a 3f 01 |? | MOVE.W D1,-(A7) 0002196c 3f 3c 00 17 |?< | MOVE.W #0x17,-(A7) 00021970 4e 93 |N | JSR (A3) 00021972 50 4f |PO | ADDQ.L #0x8,A7 00021974 4e b9 00 01 03 b8 |N | JSR PopProgram(status : Byte; msg : String) 0002197a de c3 | | ADDA.W D3,A7 0002197c 4c df 1f 3f |L ? | MOVEM.L (A7)+,D0+D1+D2+D3+D4+D5+A0+A1+A2+A3+A4 00021980 4e 5e |N^ | UNLK A6 00021982 4e 75 |Nu | RTS