Příklad 14.6. Úvod části code 1 programu Scripts
0000: 0000 0001 START: ORI.B #1, D0 0004: 4E56 FFF4 LINK A6, #-12 0008: 48E7 1F00 MOVEM.L D3-D7, -(A7) 000C: 486E FFFC PEA -4(A6) 0010: 486E FFF8 PEA -8(A6) 0014: 486E FFFC PEA -12(A6) 0018: 4E4F A08F SYSTRAP SysAppStartup 001C: 4FEF 000C LEA 12(A7), A7 0020: 4A40 TST D0 0022: 670E .-<BEQ $0032 0024: 1F3C 0003 | MOVE.B #3, -(A7) 0028: 4E4F A234 | SYSTRAP SndPlaySystemSound 002C: 70FF | MOVEQ #-1, D0 002E: 6000 0062 .-|-<BRA $0092 0032: 206E FFF4 | `> MOVE.L -12(A6), A0 0036: 3C10 | MOVE (A0), D6 0038: 2A28 0002 | MOVE.L 2(A0), D5 003C: 3828 0006 | MOVE 6(A0), D4 0040: 3604 | MOVE D4, D3 0042: 0243 0004 | ANDI #4, D3 0046: 6704 | .-<BEQ $004C 0048: 6100 0EFE | | BSR $0F48 004C: 3F04 | `> MOVE D4, -(A7) 004E: 2F05 | MOVE.L D5, -(A7) 0050: 3F06 | MOVE D6, -(A7) 0052: 6100 0F44 | BSR $0F98 0056: 508F | ADDQ.L #8, A7 0058: 4A43 | TST D3 005A: 6704 | .-<BEQ $0060 005C: 6100 0FD6 | | BSR $1034 0060: 3F04 | `->MOVE D4, -(A7) 0062: 2F05 | MOVE.L D5, -(A7) 0064: 3F06 | MOVE D6, -(A7) 0066: 6100 063E | BSR $06A6 006A: 2E00 | MOVE.L D0, D7 006C: 508F | ADDQ.L #8, A7 006E: 4A43 | TST D3 0070: 6704 | .-<BEQ $0076 0072: 6100 0FFA | | BSR $106E 0076: 3F04 | `->MOVE D4, -(A7) 0078: 2F05 | MOVE.L D5, -(A7) 007A: 3F06 | MOVE D6, -(A7) 007C: 6100 0F68 | BSR $0FE6 0080: 2F2E FFFC | MOVE.L -4(A6), -(A7) 0084: 2F2E FFF8 | MOVE.L -8(A6), -(A7) 0088: 2F2E FFF4 | MOVE.L -12(A6), -(A7) 008C: 4E4F A090 | SYSTRAP SysAppExit 0090: 2007 | MOVE.L D7, D0 0092: 4CEE 00F8 FFE0 `--->MOVE.L -32(A6), D3-D7 0098: 4E5E UNLK A6 009A: 4E75 RTS
Příklad 14.7. Procedura $009C
009C: 4E56 FFF4 SUB_009C: LINK A6, #-12 00A0: 2F03 MOVE.L D3, -(A7 00A2: 262E 0008 MOVE.L 8(A6), D3 00A6: 42A7 CLR.L -(A7) 00A8: 486E FFFE PEA -2(A6) 00AC: 42A7 CLR.L -(A7) 00AE: 42A7 CLR.L -(A7) 00B0: 486E FFFA PEA -6(A6) 00B4: 2F03 MOVE.L D3, -(A7) 00B6: 4E4F A04C SYSTRAP DmOpenDatabaseIn... 00BA: 4FEF 0018 LEA 24(A7), A7 00BE: 4A40 TST D0 00C0: 662C .-<BNE $00EE 00C2: 42A7 | CLR.L -(A7) 00C4: 42A7 | CLR.L -(A7) 00C6: 42A7 | CLR.L -(A7) 00C8: 486E FFF6 | PEA -10(A6) 00CC: 42A7 | CLR.L -(A7) 00CE: 42A7 | CLR.L -(A7) 00D0: 42A7 | CLR.L -(A7) 00D2: 42A7 | CLR.L -(A7) 00D4: 42A7 | CLR.L -(A7) 00D6: 42A7 | CLR.L -(A7) 00D8: 42A7 | CLR.L -(A7) 00DA: 2F2E FFFA | MOVE.L -6(A6), -(A7) 00DE: 3F2E FFFE | MOVE -2(A6), -(A7) 00E2: 4E4F A046 | SYSTRAP DmDatabaseInfo 00E6: 4FEF 0032 | LEA 50(A7), A7 00EA: 4A40 | TST D0 00EC: 6708 .-|-<BEQ $00F6 00EE: 303C 0203 | `->MOVE #515, D0 00F2: 6000 0078 .-|---<BRA $016C 00F6: 4AAE FFF6 | `--->TST.L -10(A6) 00FA: 664A | .---<BNE $0146 00FC: 4878 0116 | | PEA 278 0100: 2F03 | | MOVE.L D3, -(A7) 0102: 4E4F A059 | | SYSTRAP DmNewHandle 0106: 2008 | | MOVE.L A0, D0 0108: 508F | | ADDQ.L #8, A7 010A: 6608 | | .-<BNE $0114 010C: 303C 0201 | | | MOVE #513, D0 0110: 6000 005A +-|-|-<BRA $016C 0114: 2F00 | | `->MOVE.L D0, -(A7) 0116: 4E4F A020 | | SYSTRAP MemHandleToLocal 011A: 2D40 FFF6 | | MOVE.L D0, -10(A6) 011E: 42A7 | | CLR.L -(A7) 0120: 42A7 | | CLR.L -(A7) 0122: 42A7 | | CLR.L -(A7) 0124: 486E FFF6 | | PEA -10(A6) 0128: 42A7 | | CLR.L -(A7) 012A: 42A7 | | CLR.L -(A7) 012C: 42A7 | | CLR.L -(A7) 012E: 42A7 | | CLR.L -(A7) 0130: 42A7 | | CLR.L -(A7) 0132: 42A7 | | CLR.L -(A7) 0134: 42A7 | | CLR.L -(A7) 0136: 2F2E FFFA | | MOVE.L -6(A6), -(A7) 013A: 3F2E FFFE | | MOVE -2(A6), -(A7) 013E: 4E4F A047 | | SYSTRAP DmSetDatabaseInfo... 0142: 4FEF 0036 | | LEA 54(A7), A7 0146: 3F2E FFFE | `--->MOVE -2(A6), -(A7) 014A: 2F2E FFF6 | MOVE.L -10(A6), -(A7) 014E: 4E4F A036 | SYSTRAP MemLocalIDToLocke... 0152: 2608 | MOVE.L A0, D3 0154: 4878 0116 | PEA 278 0158: 486D FFDE | PEA -290(A5) 015C: 42A7 | CLR.L -(A7) 015E: 2F03 | MOVE.L D3, -(A7) 0160: 4E4F A076 SYSTRAP DmWrite 0164: 2F03 | MOVE.L D3, -(A7) 0166: 4E4F A035 | SYSTRAP MemPtrUnlock 016A: 4240 | CLR D0 016C: 262E FFF0 `----->MOVE.L -16(A6), D3 0170: 4E5E UNLK A6 0172: 4E75 RTS