14.2.2. Část code 1

Příklad 14.4. Začátek části code 1

0000:                      START:           ORI.B   #1, D0
0004:                                       LINK    A6, #-12
0008:                                       MOVEM.L D3-D7, -(A7)
000C:                                       PEA     -4(A6)
0010:                                       PEA     -8(A6)
0014:                                       PEA     -12(A6)
0018:                                       SYSTRAP SysAppStartup
001C:                                       LEA     12(A7), A7
0020:                                       TST     D0
0022:                                    .- BEQ     $0032
0024:                                    |  MOVE.B  #3, -(A7)
0028:                                    |  SYSTRAP SndPlaySystemSound
002C:                                    |  MOVEQ   #-1, D0
002E:                                  .-|- BRA     $0092
0032:                                  | `> MOVE.L  -12(A6), A0
0036:                                  |    MOVE    (A0), D6
0038:                                  |    MOVE.L  2(A0), D5
003C:                                  |    MOVE    6(A0), D4
0040:                                  |    MOVE    D4, D3
0042:                                  |    ANDI    #4, D3
0046:                                  | .- BEQ     $004C
0048:                                  | |  BSR     5054
004C:                                  | `> MOVE    D4, -(A7)
004E:                                  |    MOVE.L  D5, -(A7)
0050:                                  |    MOVE    D6, -(A7)
0052:                                  |    BSR     $50A4
0056:                                  |    ADDQ.L  #8, A7
0058:                                  |    TST     D3
005A:                                  | .- BEQ     $0060
005C:                                  | |  BSR     $5140
0060:                                  | `> MOVE    D4, -(A7)
0062:                                  |    MOVE.L  D5, -(A7)
0064:                                  |    MOVE    D6, -(A7)
0066:                                  |    BSR     $009C
006A:                                  |    MOVE.L  D0, D7
006C:                                  |    ADDQ.L  #8, A7
006E:                                  |    TST     D3
0070:                                  | .- BEQ     $0076
0072:                                  | |  BSR     $517A
0076:                                  | '> MOVE    D4, -(A7)
0078:                                  |    MOVE.L  D5, -(A7)
007A:                                  |    MOVE    D6, -(A7)
007C:                                  |    BSR     $50F2
0080:                                  |    MOVE.L  -4(A6), -(A7)
0084:                                  |    MOVE.L  -8(A6), -(A7)
0088:                                  |    MOVE.L  -12(A6), -(A7)
008C:                                       SYSTRAP SysAppExit
0090:                                       MOVE.L  D7, D0
0092:                                       MOVEM.L -32(A6), D3-D7
0098:                                       UNLK    A6
009A:                                       RTS


009C:                                       LINK    A6, #0
00A0:                                       MOVE.L  D3, -(A7)
00A2:                                       MOVE    8(A6), D0
00A6:                                       MOVE.L  10(A6), D1
00AA:                                       TST     D0
00AC:                                  .--- BNE     $00D2
00AE:                                  |    BSR     $010A
00B2:                                  |    TST.B   D0
00B4:                                  | .- BEQ     $00BE
00B6:                                  | |  MOVE    D3, D0
00B8:                                  | |  EXT.L   D0
00BA:                                .-|-|- BRA     $00FA
00BE:                                | | `> MOVE    #1000, -(A7)
00C2:                                | |    SYSTRAP FrmGotoForm
00C6:                                | |    BSR     $0216
00CA:                                | |    BSR     $031C
00CE:                                | | .- BRA     $00F8
00D2:                                | `-|> CMPI    #1, D0
00D6:                                | .-|- BNE     $00EC
00D8:                                | | |  MOVE    14(A6), D0
00DC:                                | | |  BTST    #4, D0
00E0:                                | | +- BEQ     $00F8
00E2:                                | | |  MOVE.L  D1, -(A7)
00E4:                                | | |  BSR     $4908
00E8:                                | | +- BRA     $00F8
00EC:                                | `-|> CMPI    #2, D0
00F0:                                |   +- BNE     $00F8
00F2:                                |   |  MOVE.L  D1, -(A7)
00F4:                                |   |  BSR     $4B60
00F8:                                |   `- MOVEQ   #0, D0
00FA:                                `----- MOVE.L  -4(A6), D3
00FE:                                       UNLK    A6
0100:                                       RTS


0102:                                       SUBQ    #8, D5