16.2.2. Část imag 1000

Příklad 16.7. Resource imag 1000

00B4= 0000:  LINK    A6, #-12
00B8= 0004:   PEA -12(A6)
00BC= 0008:   PEA -8(A6)
00C0=         PEA -4(A6)
00C4=         SYSTRAP SysAppStartup
00C8=         LEA  12(A7), A7
00CC=         TST  D0
00CE=         BEQ  $+14
00D0=         MOVE.B  #3, -(A7)
00D4=         SYSTRAP SndPlaySystemSou
00D8=         ADDQ.L  #2, A7
00DA=         MOVEQ   #-1, D0
00DC=         BRA     $+42
00DE=        >MOVE.L  -4(A6), A0
00E2=         MOVE    6(A0), -(A7)
00E6=         MOVE.L  2(A0), -(A7)
00EA=         MOVE    (A0), -(A7)
00EC=         JSR     30(PC)
00F0=         ADDQ.L  #8, A7
00F2=         MOVE.L  -12(A6), -(A7)
00F6=         MOVE.L  -8(A6), -(A7)
00FA=         MOVE.L  -4(A6), -(A7)
00FE=         SYSTRAP SysAppExit
0102=         LEA     12(A7), A7
0106=         MOVEQ   #0, D0
0108=        >UNLK    A6
010A=         RTS

010C=         LINK    A6, #0
0110=         TST     8(A6)
0114=         BEQ     $+6
0116=         BRA     $+252
011A=         D
011C=        >MOVEM.L D2-D7/A1-A6, -(A7)
0120=         MOVE    #1, -(A7)
0124=         MOVE.L  #1145132097, -(A7)
012A=         SYSTRAP DmGet1Resource
012E=         ADDQ.L  #6, A7
0130=         CMPA.L  #0, A0
0136=         BEQ     $+216
013A=         MOVE.L  A0, A3
013C=         MOVE.L  A0, -(A7)
013E=         SYSTRAP MemHandleSize
0142=         ADDQ.L  #4, A7
0144=         MOVE.L  D0, D7
0146=         MOVE.L  A3, -(A7)
0148=         SYSTRAP MemHandleLock
014C=         ADDQ.L  #4, A7
014E=         MOVE.L  A0, D4
0150=         MOVE.L  D7, D0
0152=         ADDI.L  #40, D0
0158=         MOVE.L  D0, -(A7)
015A=         SYSTRAP MemHandleNew
015E=         ADDQ.L  #4, A7
0160=         MOVE.L  A0,-(A7)
0162=         SYSTRAP MemHandleLock
0166=         ADDQ.L  #4, A7
0168=         MOVE.L  A5, D3
016A=         MOVE.L  A0, A5
016C=         MOVE.L  D7, -(A7)
016E=         MOVE.L  D4, -(A7)
0170=         MOVE.L  A5, -(A7)
0172=         SYSTRAP MemMove
0176=         LEA     12(A7), A7
017A=         MOVE.L  D3, A0