home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #6 / amigamamagazinepolishissue1998.iso / wbgames / cc3 / src.lha / CC3.s
Text File  |  1993-10-24  |  79KB  |  2,340 lines
  1.  
  2. ;
  3. ; China Challenge III - 9/93 by G.Nikl, original programming by Dirk Hoffmann
  4. ;
  5. ; use a68k to assemble
  6. ;
  7.  
  8. ; include stuff
  9.  
  10.         include    lvo13/dos_lib.i
  11.         include    lvo13/exec_lib.i
  12.         include    lvo13/icon_lib.i
  13.         include    lvo13/graphics_lib.i
  14.         include    lvo13/intuition_lib.i
  15.         include    exec/types.i
  16.  
  17. ; macro stuff
  18.  
  19. CALL        macro
  20.         move.l    \2,a6
  21.         jsr    _LVO\1(a6)
  22.         endm
  23.  
  24. RECALL        macro
  25.         jsr    _LVO\1(a6)
  26.         endm
  27.  
  28. ADDOPT        macro
  29.         dc.w    Opt\1-OptTable
  30.         endm
  31.  
  32. ; global stuff
  33.  
  34. bp        equr        a4
  35.  
  36.     STRUCTURE Globals,0
  37.       ULONG  SysBase
  38.       ULONG  WbMsg
  39.       ULONG  DosBase
  40.       ULONG  IntBase
  41.       ULONG  GfxBase
  42.       UWORD  ArgC
  43.       UBYTE  IntroE
  44.       UBYTE  MusicE
  45.       ULONG  ScrPtr
  46.       ULONG  WinPtr
  47.       ULONG  SampleBuf
  48.       ULONG  RandVal
  49.       ULONG  imClass
  50.       UWORD  imCode
  51.       UBYTE  EndAll
  52.       UBYTE  AudioOpen
  53.       UBYTE  Music
  54.       UBYTE  MovesToGo
  55.       UBYTE  FirstPiece
  56.       UBYTE  TwoSelected
  57.       UWORD  PiecePos1
  58.       UWORD  PiecePos2
  59.       STRUCT MoveBuf,2*4
  60.       STRUCT ImageTable,31*4
  61.       STRUCT ImageBuf,31*20
  62.       STRUCT AudioIO,68
  63.       STRUCT RastPort,100
  64.       STRUCT BitMap,40
  65.       STRUCT EntryTable,120
  66.       STRUCT UndoTable,240
  67.       STRUCT NewDragon,288
  68.       STRUCT ImgTable,16956
  69.     LABEL gb_SIZEOF
  70.  
  71. ; some definitions
  72.  
  73. MaxArg        equ    20            ; max value for cli args
  74. INTRO        equ    1            ; define for intro pic
  75.  
  76. *******************************************************************************
  77.  
  78.         SECTION    GAME,CODE
  79.  
  80. start        lea    vars,bp            ; global vars
  81.         move.l    d0,d2
  82.         move.l    a0,a2
  83.         move.l    4,a6
  84.         move.l    a6,SysBase(bp)        ; save ExecBase
  85.         move.l    276(a6),a3
  86.         tst.l    172(a3)
  87.         bne.s    fromCLI
  88. fromWB        lea    92(a3),a0        ; wb start
  89.         RECALL    WaitPort
  90.         lea    92(a3),a0
  91.         RECALL    GetMsg
  92.         move.l    d0,WbMsg(bp)
  93.         bsr.s    OpenDOS
  94.         beq.s    exit2
  95.         bsr.s    ParseWB
  96.         bsr    main
  97. exit2        RECALL    Forbid
  98.         move.l    WbMsg(bp),a1
  99.         RECALL    ReplyMsg
  100.         bra.s    exit
  101. fromCLI        bsr.s    OpenDOS            ; cli start
  102.         beq.s    exit
  103.         bsr    ParseCLI
  104.         bsr    main
  105. exit        move.l    DosBase(bp),d0        ; close dos
  106.         beq.s    1$
  107.         move.l    d0,a1
  108.         RECALL    CloseLibrary
  109. 1$        moveq    #0,d0
  110.         rts
  111.  
  112. ;------------------------------------------------------------------------------
  113.  
  114. OpenDOS        lea    DosName(pc),a1        ; open dos v33+
  115.         moveq    #33,d0
  116.         RECALL    OpenLibrary
  117.         move.l    d0,DosBase(bp)
  118.         rts
  119.  
  120. ;------------------------------------------------------------------------------
  121.  
  122. ParseWB        lea    IconName(pc),a1        ; open icon v33+
  123.         moveq    #33,d0
  124.         RECALL    OpenLibrary
  125.         move.l    d0,d6
  126.         beq.s    1$            ; no lib !
  127.         move.l    WbMsg(bp),a2
  128.         move.l    36(a2),a2
  129.         move.l    0(a2),d1
  130.         CALL    CurrentDir,DosBase(bp)    ; change our directory
  131.         move.l    4(a2),a0
  132.         CALL    GetDiskObject,d6    ; get icon
  133.         move.l    d0,a2
  134.         move.l    a2,d0
  135.         beq.s    2$            ; no icon ?!
  136.         lea    NoIntro(pc),a1
  137.         bsr.s    GetToolType        ; NoIntro ?
  138.         move.b    d0,IntroE(bp)
  139.         lea    NoMusic(pc),a1
  140.         bsr.s    GetToolType        ; NoMusic ?
  141.         move.b    d0,MusicE(bp)
  142. 3$        move.l    a2,a0
  143.         RECALL    FreeDiskObject        ; free icon
  144. 2$        move.l    a6,a1            ; close lib
  145.         CALL    CloseLibrary,SysBase(bp)
  146. 1$        rts
  147.  
  148. GetToolType    move.l    54(a2),a0
  149.         RECALL    FindToolType        ; find it or not
  150.         tst.l    d0
  151.         seq    d0            ; result d0.b
  152.         rts
  153.  
  154. ;------------------------------------------------------------------------------
  155.  
  156. ParseCLI    clr.b    -1(a2,d2.w)        ; terminate line
  157.         move.l    a2,a1
  158.         lea    ImgTable(bp),a2
  159.         moveq    #0,d2
  160.  
  161. ; a1 - pointer into command line
  162. ; d2 - argc
  163. ; a2 - argv
  164.  
  165. ParseArg    bsr.s    GetNext            ; search argument
  166.         bmi.s    doquote            ; quotation sign
  167.         beq.s    dosemi            ; commentary stops all
  168.         bcs.s    ParseArg        ; separation sign
  169.         lea    -1(a1),a0        ; argument start
  170.         bsr.s    BumpArgV        ; argc+1 & ptr to argv
  171. build_2        bsr.s    GetNext            ; search separation sign
  172.         beq.s    dosemi            ; commentary stops all
  173.         bcc.s    build_2            ; no separation sign
  174.         clr.b    -1(a1)            ; mark end
  175.         bra.s    ParseArg        ; continue search
  176.  
  177. doquote        move.l    a1,a0            ; argument start
  178.         bsr.s    BumpArgV        ; argc+1 & ptr to argv
  179. quote_2        bsr.s    GetNext            ; search quotation sign
  180.         bpl.s    quote_2            ; no quotation sign
  181.         clr.b    -1(a1)            ; mark end
  182. quote_3        bsr.s    GetNext            ; search separation sign
  183.         beq.s    dosemi            ; commentary stops all
  184.         bcc.s    quote_3            ; no separation sign
  185.         bra.s    ParseArg        ; continue search
  186.  
  187. dosemi        clr.b    -(a1)            ; delete semicolon
  188.         bra.s    ParseArg        ; go on
  189.  
  190. BumpArgV    cmp.w    #MaxArg,d2        ; max argc reached ?
  191.         bcc.s    1$
  192.         move.l    a0,(a2)+        ; store argptr
  193.         addq.w    #1,d2            ; increment argc
  194. 1$        rts
  195.  
  196. GetNext        move.b    (a1)+,d0        ; test character
  197.         beq.s    BuildRdy
  198.         moveq    #-3,d1            ; N=1,Z=0,C=0 -> quotation
  199.         cmp.b    #'"',d0
  200.         beq.s    1$
  201.         moveq    #-2,d1            ; N=0,Z=1,C=1 -> semicolon
  202.         cmp.b    #';',d0
  203.         beq.s    1$
  204.         moveq    #-1,d1            ; N=0,Z=0,C=1 -> separation
  205.         cmp.b    #'=',d0
  206.         beq.s    1$
  207.         cmp.b    #' ',d0
  208.         beq.s    1$
  209.         cmp.b    #9,d0
  210.         beq.s    1$
  211.         moveq    #0,d1            ; N=0,Z=0,C=0 -> others
  212. 1$        addq.l    #2,d1            ; set flags ( see above )
  213.         rts
  214.  
  215. BuildRdy    addq.l    #4,sp            ; set right return address
  216.         move.w    d2,ArgC(bp)
  217.         lea    Help(pc),a3
  218.         bsr.s    FindArg
  219.         bne.s    1$
  220.         CALL    Output,DosBase(bp)
  221.         move.l    d0,d4
  222.         move.l    d4,d1
  223.         lea    Template(pc),a2
  224.         move.l    a2,d2
  225.         moveq    #TemplateLen,d3
  226.         RECALL    Write            ; print template
  227.         move.l    d4,d1
  228.         lea    ImgTable+1000(bp),a2
  229.         move.l    a2,d2
  230.         moveq    #80,d3
  231.         RECALL    Read            ; get cmd line
  232.         move.l    d0,d2
  233.         move.l    SysBase(bp),a6
  234.         bra    ParseCLI        ; parse input
  235.  
  236. 1$        lea    NoIntro(pc),a3        ; NoIntro ?
  237.         bsr.s    FindArg
  238.         move.b    d0,IntroE(bp)
  239.         lea    NoMusic(pc),a3        ; NoMusic ?
  240.         bsr.s    FindArg
  241.         move.b    d0,MusicE(bp)
  242.         rts
  243.  
  244. FindArg        lea    ImgTable(bp),a2        ; ArgV[]
  245.         move.w    ArgC(bp),d2
  246. 3$        subq.w    #1,d2
  247.         bcs.s    1$            ; all done
  248.         move.l    (a2)+,a0
  249.         move.l    a3,a1
  250. 2$        moveq    #$5f,d0            ; upper case
  251.         and.b    (a0)+,d0
  252.         cmp.b    (a1)+,d0        ; same chars ?
  253.         bne.s    3$
  254.         tst.b    d0            ; string end ?
  255.         bne.s    2$
  256. 1$        sne    d0            ; result d0.b
  257.         rts
  258.  
  259. *******************************************************************************
  260.  
  261.     IFD INTRO
  262. ShowIntro    suba.l    a5,a5
  263.         tst.b    IntroE(bp)
  264.         beq.s    1$
  265.         move.l    #24068,d0        ; opening picture
  266.         moveq    #3,d1
  267.         CALL    AllocMem,SysBase(bp)
  268.         move.l    d0,a5
  269.         move.l    a5,d0
  270.         beq.s    1$            ; no buffer for pic !
  271.         lea    PicData(pc),a0
  272.         move.l    a5,a1
  273.         bsr    Explode
  274.         move.l    a5,a0
  275.         CALL    OpenScreen,IntBase(bp)
  276.         move.l    d0,0(a5)
  277.         beq.s    1$            ; no screen
  278.         moveq    #8,d0
  279.         move.l    0(a5),a0
  280.         lea    44(a0),a0
  281.         lea    52(a5),a1
  282.         CALL    LoadRGB4,GfxBase(bp)    ; set colours
  283.         lea    32(a5),a1
  284.         move.l    a5,d1
  285.         add.l    d1,10(a1)
  286.         move.l    0(a5),a0
  287.         lea    84(a0),a0
  288.         moveq    #0,d0
  289.         moveq    #0,d1
  290.         CALL    DrawImage,IntBase(bp)    ; show pic
  291.         move.l    72(a6),4(a5)        ; for waiting (ib_Seconds)
  292. 1$        rts
  293.     ENDC
  294.  
  295. ;------------------------------------------------------------------------------
  296.  
  297. MakeImgs    lea    ImgData(pc),a0        ; decrunch data
  298.         lea    ImgTable(bp),a1
  299.         bsr.s    Explode
  300.         lea    ImageTable(bp),a2    ; setup image structures
  301.         lea    ImageBuf(bp),a1
  302.         moveq    #0,d0
  303.         moveq    #31-1,d2
  304. 2$        move.l    a1,(a2)+
  305.         move.w    #27,4(a1)        ; size
  306.         move.w    #32,6(a1)
  307.         move.w    #$703,d1
  308.         cmp.w    #26*2,d0        ; image 27-31 differ
  309.         bcs.s    1$
  310.         move.w    #$302,d1
  311. 1$        move.b    d1,9(a1)        ; planes
  312.         lea    ImgTable(bp),a0
  313.         add.w    0(a0,d0.w),a0
  314.         move.l    a0,10(a1)        ; chip data
  315.         lsr.w    #8,d1
  316.         move.b    d1,14(a1)        ; planepick
  317.         addq.w    #2,d0
  318.         lea    20(a1),a1        ; next image
  319.         dbra    d2,2$
  320.         move.w    #160,ImageBuf+4(bp)    ; background image is bigger !
  321.         move.w    #99,ImageBuf+6(bp)
  322.         rts
  323.  
  324. ;
  325. ; Imploder explode-routine (modified!!!)
  326. ;
  327. ; call as:
  328. ;    Explode ( imploded, buffer )
  329. ;                 a0       a1
  330. ; with:
  331. ;    imploded : (UBYTE *) start of imploded data
  332. ;    buffer   : (UBYTE *) buffer for exploded data
  333. ;
  334.  
  335. Explode        movem.l    d2-d5/a2-a4,-(sp)
  336.         move.l    a1,a4
  337.         add.w    (a0)+,a4        ; end of exploding buffer
  338.         add.w    (a0)+,a0        ; end of imploded data
  339.         move.l    a0,a3
  340.         move.w    (a0)+,d2
  341.         move.w    (a0)+,d3
  342.         bmi.s    Expl_03
  343.         subq.w    #1,a3
  344. Expl_03        tst.w    d2
  345.         beq.s    Expl_05
  346. Expl_04        move.b    -(a3),-(a4)
  347.         subq.w    #1,d2
  348.         bne.s    Expl_04
  349. Expl_05        cmpa.l    a4,a1
  350.         bcs.s    Expl_06
  351.         movem.l    (sp)+,d2-d5/a2-a4
  352.         rts
  353.  
  354. Expl_06        add.b    d3,d3
  355.         bne.s    Expl_07
  356.         move.b    -(a3),d3
  357.         addx.b    d3,d3
  358. Expl_07        bcc.s    Expl_19
  359.         add.b    d3,d3
  360.         bne.s    Expl_08
  361.         move.b    -(a3),d3
  362.         addx.b    d3,d3
  363. Expl_08        bcc.s    Expl_18
  364.         add.b    d3,d3
  365.         bne.s    Expl_09
  366.         move.b    -(a3),d3
  367.         addx.b    d3,d3
  368. Expl_09        bcc.s    Expl_17
  369.         add.b    d3,d3
  370.         bne.s    Expl_10
  371.         move.b    -(a3),d3
  372.         addx.b    d3,d3
  373. Expl_10        bcc.s    Expl_16
  374.         moveq    #0,d4
  375.         add.b    d3,d3
  376.         bne.s    Expl_11
  377.         move.b    -(a3),d3
  378.         addx.b    d3,d3
  379. Expl_11        bcc.s    Expl_12
  380.         move.b    -(a3),d4
  381.         moveq    #3,d0
  382.         subq.b    #1,d4
  383.         bra.s    Expl_20
  384.  
  385. Expl_12        add.b    d3,d3
  386.         bne.s    Expl_13
  387.         move.b    -(a3),d3
  388.         addx.b    d3,d3
  389. Expl_13        addx.b    d4,d4
  390.         add.b    d3,d3
  391.         bne.s    Expl_14
  392.         move.b    -(a3),d3
  393.         addx.b    d3,d3
  394. Expl_14        addx.b    d4,d4
  395.         add.b    d3,d3
  396.         bne.s    Expl_15
  397.         move.b    -(a3),d3
  398.         addx.b    d3,d3
  399. Expl_15        addx.b    d4,d4
  400.         addq.b    #5,d4
  401.         moveq    #3,d0
  402.         bra.s    Expl_20
  403.  
  404. Expl_16        moveq    #4,d4
  405.         moveq    #3,d0
  406.         bra.s    Expl_20
  407.  
  408. Expl_17        moveq    #3,d4
  409.         moveq    #2,d0
  410.         bra.s    Expl_20
  411.  
  412. Expl_18        moveq    #2,d4
  413.         moveq    #1,d0
  414.         bra.s    Expl_20
  415.  
  416. Expl_19        moveq    #1,d4
  417.         moveq    #0,d0
  418. Expl_20        moveq    #0,d5
  419.         move.w    d0,d1
  420.         add.b    d3,d3
  421.         bne.s    Expl_21
  422.         move.b    -(a3),d3
  423.         addx.b    d3,d3
  424. Expl_21        bcc.s    Expl_24
  425.         add.b    d3,d3
  426.         bne.s    Expl_22
  427.         move.b    -(a3),d3
  428.         addx.b    d3,d3
  429. Expl_22        bcc.s    Expl_23
  430.         move.b    ExplBits_1(pc,d0.w),d5
  431.         addq.b    #8,d0
  432.         bra.s    Expl_24
  433.  
  434. Expl_23        moveq    #2,d5
  435.         addq.b    #4,d0
  436. Expl_24        move.b    ExplBits_2(pc,d0.w),d0
  437. Expl_25        add.b    d3,d3
  438.         bne.s    Expl_26
  439.         move.b    -(a3),d3
  440.         addx.b    d3,d3
  441. Expl_26        addx.w    d2,d2
  442.         subq.b    #1,d0
  443.         bne.s    Expl_25
  444.         add.w    d5,d2
  445.         moveq    #0,d5
  446.         movea.l    d5,a2
  447.         move.w    d1,d0
  448.         add.b    d3,d3
  449.         bne.s    Expl_27
  450.         move.b    -(a3),d3
  451.         addx.b    d3,d3
  452. Expl_27        bcc.s    Expl_30
  453.         add.w    d1,d1
  454.         add.b    d3,d3
  455.         bne.s    Expl_28
  456.         move.b    -(a3),d3
  457.         addx.b    d3,d3
  458. Expl_28        bcc.s    Expl_29
  459.         movea.w    8(a0,d1.w),a2
  460.         addq.b    #8,d0
  461.         bra.s    Expl_30
  462.  
  463. Expl_29        movea.w    0(a0,d1.w),a2
  464.         addq.b    #4,d0
  465. Expl_30        move.b    16(a0,d0.w),d0
  466. Expl_31        add.b    d3,d3
  467.         bne.s    Expl_32
  468.         move.b    -(a3),d3
  469.         addx.b    d3,d3
  470. Expl_32        addx.l    d5,d5
  471.         subq.b    #1,d0
  472.         bne.s    Expl_31
  473.         addq.w    #1,a2
  474.         adda.l    d5,a2
  475.         adda.l    a4,a2
  476. Expl_33        move.b    -(a2),-(a4)
  477.         dbra    d4,Expl_33
  478.         bra    Expl_03
  479.  
  480. ExplBits_1    dc.b    6,10,10,18
  481. ExplBits_2    dc.b    1,1,1,1,2,3,3,4,4,5,7,14
  482.  
  483. ;------------------------------------------------------------------------------
  484.  
  485. InitMusic    lea    AudioIO(bp),a1
  486.         move.b    #127,9(a1)        ; pri for channel allocation
  487.         move.b    #$40,30(a1)        ; ADIOF_NOWAIT
  488.         lea    ChannelMap(pc),a0
  489.         move.l    a0,34(a1)        ; ioa_Data
  490.         moveq    #4,d0
  491.         move.l    d0,38(a1)        ; ioa_Length
  492.         lea    AudioName(pc),a0
  493.         moveq    #0,d0
  494.         moveq    #0,d1
  495.         CALL    OpenDevice,SysBase(bp)
  496.         tst.b    d0
  497.         bne.s    2$            ; error
  498.         addq.b    #1,AudioOpen(bp)    ; device opened
  499.         move.l    #104076,d0
  500.         moveq    #3,d1
  501.         RECALL    AllocMem
  502.         move.l    d0,SampleBuf(bp)
  503.         beq.s    3$            ; no buffer
  504.         lea    Sample(pc),a1
  505.         move.l    a1,d1
  506.         move.l    #1005,d2
  507.         CALL    Open,DosBase(bp)
  508.         move.l    d0,d4
  509.         beq.s    3$            ; no file
  510.         move.l    d4,d1
  511.         move.l    SampleBuf(bp),d2
  512.         move.l    #104072,d3
  513.         RECALL    Read
  514.         move.l    d0,d2
  515.         move.l    d4,d1
  516.         RECALL    Close
  517.         cmp.l    d2,d3            ; wrong size
  518.         bne.s    3$
  519.         or.b    #2,$bfe001        ; filter off
  520.         addq.b    #1,AudioOpen(bp)    ; switched filter off
  521.         move.w    #$feff,d0
  522.         tst.b    MusicE(bp)
  523.         beq.s    1$            ; stay quiet
  524.         bsr    OptMusic
  525.         tst.b    AudioIO+31(bp)
  526.         beq.s    0$
  527. 3$        bsr    FreeMusic        ; free whole music stuff
  528. 2$        move.w    #$feee,d0
  529. 1$        lea    ItemMusic(pc),a0
  530.         and.w    d0,12(a0)        ; disable item
  531. 0$        moveq    #1,d0            ; don't quit
  532.         rts
  533.  
  534. ChannelMap    dc.b    3,5,10,12
  535.  
  536. ;------------------------------------------------------------------------------
  537.  
  538. InitAll        bsr.s    OpenLibs        ; open all stuff
  539.         beq.s    1$
  540.     IFD INTRO
  541.         bsr    ShowIntro
  542.     ENDC
  543.         bsr    MakeImgs
  544.         bsr.s    MakeGfx
  545.         beq.s    2$
  546.         bsr    InitMusic
  547. 2$    IFD INTRO
  548.         move.l    d0,-(sp)
  549.         bsr    RemIntro
  550.         move.l    (sp)+,d0
  551.     ENDC
  552. 1$        rts
  553.  
  554. ;------------------------------------------------------------------------------
  555.  
  556. OpenLibs    move.l    SysBase(bp),a6        ; open all libs
  557.         lea    IntName(pc),a1
  558.         bsr.s    OpenLib
  559.         move.l    d0,IntBase(bp)
  560.         beq.s    1$
  561.         lea    GfxName(pc),a1
  562.         bsr.s    OpenLib
  563.         move.l    d0,GfxBase(bp)
  564. 1$        rts
  565.  
  566. OpenLib        moveq    #33,d0
  567.         jmp    _LVOOpenLibrary(a6)
  568.  
  569. ;------------------------------------------------------------------------------
  570.  
  571. MakeGfx        move.l    IntBase(bp),a6        ; setup gfx stuff
  572.         lea    NewScreen(pc),a0
  573.         RECALL    OpenScreen
  574.         move.l    d0,d2
  575.         move.l    d2,ScrPtr(bp)
  576.         beq.s    OpenLib-2        ; no scr ?!
  577.         lea    NewWindow(pc),a0
  578.         move.l    d2,30(a0)
  579.         RECALL    OpenWindow
  580.         move.l    d0,WinPtr(bp)
  581.         beq.s    OpenLib-2        ; no win ?!
  582.         move.l    d0,a0
  583.         lea    MenuStrip(pc),a1
  584.         RECALL    SetMenuStrip
  585.         moveq    #0,d0            ; hide screen title
  586.         move.l    d2,a0
  587.         RECALL    ShowTitle
  588.         move.l    GfxBase(bp),a6        ; load new colours
  589.         moveq    #8,d0
  590.         move.l    d2,a0
  591.         lea    44(a0),a0
  592.         lea    ColTab(pc),a1
  593.         RECALL    LoadRGB4
  594.         lea    RastPort(bp),a1        ; create hidden screen
  595.         RECALL    InitRastPort        ; init rp
  596.         move.l    WinPtr(bp),a0
  597.         move.l    128(a0),a0        ; set window font to hidden
  598.         lea    RastPort(bp),a1
  599.         RECALL    SetFont            ; rp for text output !!!
  600.         moveq    #3,d0
  601.         moveq    #(320>>4),d1
  602.         lsl.w    #4,d1
  603.         moveq    #256-200,d2
  604.         neg.b    d2
  605.         lea    BitMap(bp),a0
  606.         RECALL    InitBitMap        ; init bm
  607.         lea    BitMap+8(bp),a2
  608.         moveq    #3-1,d2
  609. 2$        moveq    #(320>>4),d0
  610.         lsl.w    #4,d0
  611.         moveq    #256-200,d1
  612.         neg.b    d1
  613.         RECALL    AllocRaster        ; get bitplanes
  614.         move.l    d0,(a2)+
  615.         beq.s    1$            ; no mem ...
  616.         dbra    d2,2$
  617.         lea    BitMap(bp),a0
  618.         move.l    a0,RastPort+4(bp)    ; RastPort->Bitmap
  619.         move.l    IntBase(bp),a6
  620.         move.l    76(a6),RandVal(bp)    ; start value for random
  621.         bsr    MakeDragon        ; create a dragon
  622.     IFND INTRO
  623.         move.l    ScrPtr(bp),a0
  624.         CALL    ScreenToFront,IntBase(bp)
  625.     ENDC
  626.         moveq    #1,d0            ; all ok
  627. 1$        rts
  628.  
  629. ColTab        dc.w    $000,$feb,$fe9,$cb7,$a43,$c52,$4a0,$86b
  630.  
  631. ;------------------------------------------------------------------------------
  632.  
  633.     IFD INTRO
  634. RemIntro    move.l    ScrPtr(bp),d2        ; game screen
  635.         move.l    IntBase(bp),a2
  636.         move.l    a5,d0
  637.         beq.s    2$            ; no intro pic !
  638.         move.l    0(a5),d0
  639.         beq.s    3$            ; no intro screen !
  640.         tst.l    d2
  641.         beq.s    4$            ; no game screen !
  642. 5$        move.l    72(a2),d0        ; ib_Seconds
  643.         sub.l    4(a5),d0
  644.         moveq    #2,d1
  645.         cmp.l    d1,d0
  646.         bcc.s    4$            ; time > 2 seconds
  647.         moveq    #25,d1
  648.         CALL    Delay,DosBase(bp)    ; wait 0.5 secs
  649.         bra.s    5$
  650. 4$        bsr.s    2$            ; not nice but works ...
  651.         moveq    #0,d2
  652.         move.l    0(a5),a0
  653.         RECALL    CloseScreen        ; close intro scr
  654. 3$        move.l    #24068,d0
  655.         move.l    a5,a1
  656.         CALL    FreeMem,SysBase(bp)    ; free buffer
  657. 2$        move.l    a2,a6
  658.         tst.l    d2
  659.         beq.s    1$            ; no screen ...
  660.         move.l    d2,a0
  661.         RECALL    ScreenToFront
  662. 1$        rts
  663.     ENDC
  664.  
  665. *******************************************************************************
  666.  
  667. main        movem.l    d2-d7/a2-a6,-(sp)
  668.         bsr    InitAll            ; init whole stuff
  669.         beq.s    mainexit
  670. mainloop    move.l    WinPtr(bp),a0        ; message loop
  671.         move.l    86(a0),a0        ; check port
  672.         CALL    GetMsg,SysBase(bp)
  673.         move.l    d0,a1
  674.         move.l    a1,d0
  675.         bne.s    gotmsg            ; got message
  676.         move.l    WinPtr(bp),a0
  677.         move.l    86(a0),a0
  678.         RECALL    WaitPort        ; be nice and wait
  679.         bra.s    mainloop
  680. gotmsg        move.l    20(a1),imClass(bp)
  681.         move.w    24(a1),imCode(bp)
  682.         RECALL    ReplyMsg        ; msg back
  683.         bsr    DoIDCMP
  684.         tst.b    EndAll(bp)        ; end flaged ?
  685.         beq.s    mainloop
  686. mainexit    bsr.s    CloseAll        ; free whole stuff
  687.         movem.l    (sp)+,d2-d7/a2-a6
  688.         rts
  689.  
  690. *******************************************************************************
  691.  
  692. CloseAll    bsr.s    FreeMusic        ; free all stuff
  693.         bsr.s    CloseGfx
  694.  
  695. ;------------------------------------------------------------------------------
  696.  
  697. CloseLibs    move.l    SysBase(bp),a6        ; close all libs
  698.         move.l    GfxBase(bp),a1
  699.         bsr.s    2$
  700.         move.l    IntBase(bp),a1
  701. 2$        move.l    a1,d0
  702.         beq.s    1$
  703.         RECALL    CloseLibrary
  704. 1$        rts
  705.  
  706. ;------------------------------------------------------------------------------
  707.  
  708. FreeMusic    move.l    SysBase(bp),a6
  709.         move.b    AudioOpen(bp),d2    ; device open ?
  710.         beq.s    2$
  711.         lea    AudioIO(bp),a1
  712.         RECALL    CloseDevice        ; close audio device
  713. 2$        move.l    SampleBuf(bp),d0
  714.         beq.s    1$
  715.         move.l    d0,a1
  716.         move.l    #104076,d0
  717.         RECALL    FreeMem            ; free sample buffer
  718.         clr.l    SampleBuf(bp)
  719.         subq.b    #1,d2            ; filter off ?
  720.         beq.s    1$
  721.         and.b    #$fd,$bfe001        ; filter on
  722. 1$        clr.b    AudioOpen(bp)
  723.         rts
  724.  
  725. ;------------------------------------------------------------------------------
  726.  
  727. CloseGfx    move.l    GfxBase(bp),a6        ; free gfx stuff
  728.         lea    BitMap+8(bp),a2
  729.         moveq    #3-1,d2
  730. 4$        move.l    (a2)+,d0
  731.         beq.s    3$            ; no bitplane ...
  732.         move.l    d0,a0
  733.         moveq    #(320>>4),d0
  734.         lsl.w    #4,d0
  735.         moveq    #256-200,d1
  736.         neg.b    d1
  737.         RECALL    FreeRaster        ; free bitplane
  738. 3$        dbra    d2,4$
  739.         move.l    IntBase(bp),a6
  740.         move.l    WinPtr(bp),d2
  741.         beq.s    2$
  742.         move.l    d2,a0
  743.         RECALL    ClearMenuStrip
  744.         move.l    d2,a0
  745.         RECALL    CloseWindow
  746. 2$        move.l    ScrPtr(bp),d0
  747.         beq.s    1$
  748.         move.l    d0,a0
  749.         RECALL    CloseScreen
  750. 1$        rts
  751.  
  752. *******************************************************************************
  753.  
  754. DoIDCMP        cmp.l    #$100,imClass(bp)    ; menu event ?
  755.         bne    DoMouse
  756.         moveq    #0,d0            ; hide screen title
  757.         move.l    ScrPtr(bp),a0
  758.         CALL    ShowTitle,IntBase(bp)
  759. 2$        move.l    ScrPtr(bp),a2        ; redraw first scr line
  760.         lea    84(a2),a2
  761.         moveq    #4,d0
  762.         move.l    a2,a1
  763.         CALL    SetAPen,GfxBase(bp)    ; colour for drawing
  764.         moveq    #0,d0
  765.         moveq    #0,d1
  766.         move.l    a2,a1
  767.         RECALL    Move            ; startpos
  768.         move.l    #319,d0
  769.         moveq    #0,d1
  770.         move.l    a2,a1
  771.         RECALL    Draw            ; draw line
  772.         moveq    #-1,d0            ; MENUNULL
  773.         cmp.w    imCode(bp),d0
  774.         beq.s    1$            ; menu done
  775.         moveq    #$1f,d0
  776.         and.w    imCode(bp),d0        ; get menu number
  777.         add.w    d0,d0
  778.         moveq    #$3f,d1            ; mask for item number
  779.         move.w    MenuTable(pc,d0.w),d0
  780.         jsr    MenuTable(pc,d0.w)    ; do menu function
  781.         move.w    imCode(bp),d0
  782.         lea    MenuStrip(pc),a0
  783.         CALL    ItemAddress,IntBase(bp)    ; get menu item address
  784.         move.l    d0,a0
  785.         move.w    32(a0),imCode(bp)    ; NextSelect
  786.         bra.s    2$
  787. 1$        rts
  788.  
  789. MenuTable    dc.w    MenuProject-MenuTable
  790.         dc.w    MenuOptions-MenuTable
  791.  
  792. ;------------------------------------------------------------------------------
  793.  
  794. MenuProject    move.w    imCode(bp),d0        ; first menu
  795.         lsr.w    #5,d0
  796.         and.w    d1,d0            ; d1:=$3f
  797.         beq.s    ProjectAbout
  798.  
  799. ProjectQuit    st    EndAll(bp)        ; this is the end ...
  800.         addq.w    #4,sp
  801.         rts
  802.  
  803. ProjectAbout    lea    AboutWin(pc),a0        ; display about
  804.         move.l    ScrPtr(bp),30(a0)
  805.         CALL    OpenWindow,IntBase(bp)    ; open about window
  806.         move.l    d0,a3
  807.         move.l    a3,d0
  808.         beq.s    ProjectAbout-2        ; sorry, no window ...
  809.         move.l    GfxBase(bp),a6
  810.         move.l    50(a3),a2        ; window rastport
  811.         moveq    #5,d0
  812.         move.l    a2,a1
  813.         RECALL    SetRast            ; clear window
  814.         moveq    #5,d0
  815.         move.l    a2,a1
  816.         RECALL    SetBPen            ; background colour
  817.         moveq    #2-1,d2
  818. 7$        lea    Author1.str(pc),a5    ; display all messages
  819.         moveq    #9-1,d3
  820. 6$        moveq    #0,d0
  821.         move.b    0(a5,d2.w),d0
  822.         move.l    a2,a1
  823.         RECALL    SetAPen            ; text colour
  824.         move.l    d2,d0
  825.         add.b    2(a5),d0
  826.         move.l    d2,d1
  827.         add.b    3(a5),d1
  828.         move.l    a2,a1
  829.         RECALL    Move            ; text position
  830.         moveq    #23,d0
  831.         lea    4(a5),a0
  832.         move.l    a2,a1
  833.         RECALL    Text            ; message
  834.         lea    28(a5),a5
  835.         dbra    d3,6$
  836.         moveq    #0,d0
  837.         move.l    a2,a1
  838.         RECALL    SetDrMd            ; new drawmode
  839.         dbra    d2,7$
  840.         moveq    #2-1,d2
  841. 5$        moveq    #30,d0            ; random between 0 and 30
  842.         bsr    Random
  843.         lsl.w    #2,d0
  844.         move.l    ImageTable+4(bp,d0.w),a1
  845.         move.l    a2,a0
  846.         moveq    #2,d0
  847.         tst.w    d2
  848.         bne.s    4$
  849.         moveq    #256-168,d0
  850.         neg.b    d0
  851. 4$        moveq    #23,d1
  852.         CALL    DrawImage,IntBase(bp)
  853.         dbra    d2,5$
  854.         move.l    86(a3),a0
  855.         CALL    WaitPort,SysBase(bp)    ; wait for action
  856. 3$        movea.l    86(a3),a0
  857.         RECALL    GetMsg            ; remove first message
  858.         movea.l    d0,a1
  859.         move.l    a1,d0
  860.         beq.s    2$
  861.         RECALL    ReplyMsg        ; msg back
  862.         bra.s    3$
  863. 2$        move.l    a3,a0
  864.         CALL    CloseWindow,IntBase(bp)    ; close window
  865. 1$        rts
  866.  
  867. ;------------------------------------------------------------------------------
  868.  
  869. MenuOptions    move.w    imCode(bp),d0        ; second menu
  870.         lsr.w    #5,d0
  871.         and.w    d1,d0            ; d1:=$3f
  872.         add.w    d0,d0
  873.         move.w    OptTable(pc,d0.w),d0
  874.         jmp    OptTable(pc,d0.w)
  875.  
  876. OptTable    ADDOPT    NewGame
  877.         ADDOPT    UndoMove
  878.         ADDOPT    UndoAll
  879.         ADDOPT    Load
  880.         ADDOPT    Save
  881.         ADDOPT    Music
  882.  
  883. OptNewGame    bsr    MakeDragon        ; create new dragon
  884.         rts
  885.  
  886. OptUndoMove    moveq    #120,d1            ; undo last move
  887.         sub.b    MovesToGo(bp),d1
  888.         beq.s    1$            ; nothing to undo
  889.         lea    UndoTable(bp),a1
  890.         add.w    d1,d1
  891.         lea    NewDragon(bp),a0
  892.         move.w    -4(a1,d1.w),d0        ; get old pos one
  893.         and.b    #$7f,0(a0,d0.w)
  894.         move.w    -2(a1,d1.w),d0        ; get old pos two
  895.         and.b    #$7f,0(a0,d0.w)
  896.         addq.b    #2,MovesToGo(bp)
  897.         bsr    ShowDragon        ; show the dragon
  898. 1$        rts
  899.  
  900. OptUndoAll    moveq    #120,d0            ; undo all
  901.         cmp.b    MovesToGo(bp),d0
  902.         beq.s    1$            ; nothing to undo
  903.         move.b    d0,MovesToGo(bp)
  904.         lea    NewDragon(bp),a0
  905.         move.w    #288-1,d0
  906. 2$        and.b    #$7f,(a0)+        ; clear bit 7
  907.         dbra    d0,2$
  908.         bsr    ShowDragon        ; show the dragon
  909. 1$        rts
  910.  
  911. OptLoad        moveq    #0,d0            ; request file for loading
  912.         bsr    ReqFile
  913.         move.l    d0,d4
  914.         beq.s    1$            ; no file
  915.         move.l    d4,d1
  916.         lea    UndoTable-4(bp),a2
  917.         move.l    a2,d2
  918.         moveq    #4,d3
  919.         CALL    Read,DosBase(bp)
  920.         cmp.w    #'C3',(a2)+
  921.         bne.s    2$
  922.         addq.w    #1,a2
  923.         move.b    (a2)+,MovesToGo(bp)
  924.         move.l    d4,d1
  925.         move.l    a2,d2
  926.         move.w    #240+288,d3
  927.         RECALL    Read
  928.         bsr    ShowDragon        ; show loaded dragon
  929. 2$        move.l    d4,d1
  930.         CALL    Close,DosBase(bp)
  931. 1$        rts
  932.  
  933. OptSave        moveq    #1,d0            ; request file for saving
  934.         bsr    ReqFile
  935.         move.l    d0,d4
  936.         beq.s    1$            ; no file
  937.         move.l    d4,d1
  938.         lea    UndoTable-4(bp),a0
  939.         move.l    a0,d2
  940.         move.w    #'C3',(a0)+
  941.         clr.b    (a0)+
  942.         move.b    MovesToGo(bp),(a0)
  943.         move.l    #240+288+4,d3
  944.         CALL    Write,DosBase(bp)    ; save dragon + undo table !
  945.         move.l    d4,d1
  946.         CALL    Close,DosBase(bp)    ; close file
  947. 1$        rts
  948.  
  949. OptMusic    tst.b    AudioOpen(bp)        ; audio enabled ?
  950.         beq.s    1$
  951.         lea    ItemMusic(pc),a0
  952.         btst    #0,12(a0)        ; checkmark set ?
  953.         sne    d0
  954.         cmp.b    Music(bp),d0
  955.         beq.s    1$            ; same state !
  956.         lea    AudioIO(bp),a1
  957.         moveq    #11,d1            ; CMD_FINISH
  958.         tst.b    d0
  959.         beq.s    2$            ; music off
  960.         move.b    #$11,30(a1)        ; ADIOF_PERVOL+IOF_QUICK
  961.         move.l    SampleBuf(bp),a0
  962.         lea    104(a0),a0
  963.         move.l    a0,34(a1)        ; ioa_Data
  964.         move.l    #2*51984,38(a1)        ; ioa_Length
  965.         move.w    #428,42(a1)        ; ioa_Period
  966.         move.w    #55,44(a1)        ; ioa_Volume
  967.         clr.w    46(a1)            ; ioa_Cycle
  968.         moveq    #3,d1            ; CMD_WRITE
  969. 2$        move.w    d1,28(a1)
  970.         move.l    20(a1),a6
  971.         jsr    -30(a6)            ; BeginIO()
  972.         not.b    Music(bp)
  973. 1$        rts
  974.  
  975. ;------------------------------------------------------------------------------
  976.  
  977. DoMouse        moveq    #8,d0            ; mouse pressed
  978.         cmp.l    imClass(bp),d0
  979.         bne.s    ConfirmQ
  980.         moveq    #$68,d0
  981.         cmp.w    imCode(bp),d0
  982.         bne.s    ConfirmQ        ; wasn't lmb
  983.         bsr    CheckPos
  984.         beq.s    ConfirmQ        ; wrong position
  985.  
  986. Confirm        tst.b    TwoSelected(bp)
  987.         beq.s    ChoiceTwo        ; not two selected
  988.         cmp.w    PiecePos2(bp),d0
  989.         beq.s    1$
  990.         cmp.w    PiecePos1(bp),d0
  991.         bne.s    ConfirmQ
  992. 1$        lea    UndoTable(bp),a1
  993.         moveq    #120,d1
  994.         sub.b    MovesToGo(bp),d1
  995.         subq.b    #2,MovesToGo(bp)
  996.         add.w    d1,d1
  997.         lea    NewDragon(bp),a0
  998.         move.w    PiecePos1(bp),d0
  999.         or.b    #$80,0(a0,d0.w)        ; mark removed
  1000.         move.w    d0,0(a1,d1.w)        ; store pos
  1001.         move.w    PiecePos2(bp),d0
  1002.         or.b    #$80,0(a0,d0.w)        ; mark removed
  1003.         move.w    d0,2(a1,d1.w)        ; store pos
  1004.         bsr    ShowDragon        ; show the dragon
  1005. ConfirmQ    bra.s    MouseQuit
  1006.  
  1007. ChoiceTwo    tst.b    FirstPiece(bp)        ; second choice ?
  1008.         beq.s    ChoiceOne
  1009.         move.w    PiecePos1(bp),d1
  1010.         cmp.w    d1,d0
  1011.         beq.s    MouseQuit        ; same pos ...
  1012.         lea    NewDragon(bp),a1
  1013.         move.b    0(a1,d1.w),d1
  1014.         cmp.b    0(a1,d0.w),d1
  1015.         bne.s    ChoiceOne        ; diffrent piece
  1016.         st    TwoSelected(bp)
  1017.         move.w    d0,PiecePos2(bp)
  1018.         bra.s    ChoiceShow
  1019.  
  1020. ChoiceOne    st    FirstPiece(bp)        ; first selection
  1021.         move.w    d0,PiecePos1(bp)
  1022.  
  1023. ChoiceShow    lea    NewDragon(bp),a1    ; show selected piece
  1024.         move.b    0(a1,d0.w),d1
  1025.         ext.w    d1
  1026.         lsl.w    #2,d1
  1027.         move.l    ImageTable(bp,d1.w),a1
  1028.         move.l    WinPtr(bp),a0
  1029.         move.l    50(a0),a0        ; rastport
  1030.         moveq    #85,d1
  1031.         moveq    #3,d0
  1032.         tst.b    TwoSelected(bp)
  1033.         beq.s    1$            ; is the first
  1034.         move.l    #291,d0
  1035. 1$        CALL    DrawImage,IntBase(bp)
  1036.  
  1037. MouseQuit    rts
  1038.  
  1039. ;------------------------------------------------------------------------------
  1040. ; Teil an Klickposition ?
  1041.  
  1042. CheckPos    movem.l    d2-d6,-(sp)
  1043.         moveq    #0,d6            ; FALSE
  1044.         move.l    WinPtr(bp),a1
  1045.         lea    NewDragon(bp),a0
  1046.         moveq    #1,d4            ; start displacement
  1047.         moveq    #4-1,d5
  1048. 6$        moveq    #0,d2
  1049.         move.w    12(a1),d2        ; y -> Zeile
  1050.         sub.w    d4,d2
  1051.         divu    #30,d2
  1052.         cmp.w    #6,d2            ; Zeile < 6 ?
  1053.         bcc.s    5$
  1054.         moveq    #0,d3
  1055.         move.w    14(a1),d3        ; x -> Spalte
  1056.         sub.w    d4,d3
  1057.         divu    #25,d3
  1058.         moveq    #12,d1
  1059.         cmp.w    d1,d3            ; Spalte > 11 ?
  1060.         bcc.s    5$
  1061.         move.l    d1,d0            ; calculate matrix index
  1062.         mulu    d2,d0            ; 12*Zeile
  1063.         add.w    d3,d0
  1064.         moveq    #72,d1
  1065.         mulu    d5,d1
  1066.         add.w    d1,d0
  1067.         tst.b    0(a0,d0.w)
  1068.         beq.s    5$            ; no piece
  1069.         bpl.s    4$            ; piece not removed
  1070. 5$        addq.w    #3,d4
  1071.         dbra    d5,6$
  1072.         bra.s    1$
  1073. 4$        tst.w    d3            ; Spalte == 0 ?
  1074.         beq.s    2$
  1075.         cmp.w    #11,d3            ; Spalte == 11 ?
  1076.         beq.s    2$
  1077.         tst.b    -1(a0,d0.w)        ; links ein Teil ?
  1078.         beq.s    3$
  1079.         bmi.s    3$
  1080.         tst.b    1(a0,d0.w)        ; rechts ein Teil ?
  1081.         beq.s    3$
  1082.         bpl.s    1$
  1083. 3$        subq.b    #3,d5            ; Ebene 3 (ganz oben) ?
  1084.         beq.s    2$
  1085.         tst.b    72(a0,d0.w)        ; Teil darueber ?
  1086.         beq.s    2$
  1087.         bpl.s    1$
  1088. 2$        moveq    #1,d6            ; TRUE
  1089. 1$        move.l    d6,d1            ; set flags
  1090.         movem.l    (sp)+,d2-d6
  1091.         rts
  1092.  
  1093. ;------------------------------------------------------------------------------
  1094. ; Drachen erstellen
  1095.  
  1096. MakeDragon    movem.l    d2/d3/a2/a3,-(sp)    ; save regs
  1097.         moveq    #120,d2
  1098.         move.b    d2,MovesToGo(bp)    ; initial moves
  1099.         lea    EntryTable(bp),a3
  1100.         move.l    a3,a2
  1101.         moveq    #(120>>2),d2        ; piece count
  1102. 3$        move.b    d2,(a2)+
  1103.         move.b    d2,(a2)+        ; init table
  1104.         move.b    d2,(a2)+
  1105.         move.b    d2,(a2)+        ; entries ...
  1106.         subq.b    #1,d2
  1107.         bne.s    3$
  1108.         lea    NewDragon(bp),a2
  1109.         subq.w    #1,d2
  1110.         moveq    #120-1,d3        ; place count
  1111. 2$        addq.w    #1,d2
  1112.         move.w    d2,d1
  1113.         move.w    d1,d0
  1114.         lsr.w    #3,d1
  1115.         lsl.w    #3,d1
  1116.         sub.w    d1,d0            ; d0 = x-8*(x%8)
  1117.         lsr.w    #3,d1            ; d1 = x%8
  1118.         btst    d0,PosTable+2(pc,d1.w)
  1119.         beq.s    2$            ; unused position
  1120.         moveq    #1,d0            ; interval always loopcnt+1 !
  1121.         add.w    d3,d0
  1122.         bsr.s    Random
  1123.         move.b    0(a3,d0.w),0(a2,d2.w)    ; set piece number
  1124.         move.b    0(a3,d3.w),0(a3,d0.w)    ; replace old piece
  1125. 1$        dbra    d3,2$
  1126.         bsr    ShowDragon        ; draw dragon
  1127.         movem.l    (sp)+,d2/d3/a2/a3    ; restore regs
  1128.         rts
  1129.  
  1130. PosTable    dc.b    $FF,$8F,$1F,$FE,$E7,$7F,$F8,$F1,$FF
  1131.         dc.b    $FC,$03,$0F,$F8,$81,$1F,$F0,$C0,$3F
  1132.         dc.b    $60,$00,$0F,$F0,$00,$0F,$F0,$00,$06
  1133.         dc.b    $00,$00,$00,$F0,$00,$0F,$00,$00,$00
  1134.  
  1135. ;------------------------------------------------------------------------------
  1136. ; Erzeugen einer Zufallszahl (Tausworth)
  1137. ;
  1138.  
  1139. Random        move.l    d0,-(sp)
  1140.         move.w    RandVal+2(bp),d0    ; random value k
  1141.         move.w    d0,d1
  1142.         lsr.w    #6,d1
  1143.         eor.w    d1,d0
  1144.         move.w    d0,d1
  1145.         lsl.w    #8,d1
  1146.         lsl.w    #2,d1
  1147.         eor.w    d1,d0
  1148.         move.w    d0,RandVal+2(bp)    ; random value (k+1)
  1149.         move.l    (sp)+,d1
  1150.         divu    d1,d0
  1151.         swap    d0            ; rest of division
  1152.         rts
  1153.  
  1154. ;------------------------------------------------------------------------------
  1155. ; Drachen darstellen
  1156.  
  1157. ShowDragon    movem.l    d2-d7/a2,-(sp)        ; save regs
  1158.         clr.b    TwoSelected(bp)
  1159.         clr.b    FirstPiece(bp)
  1160.         move.l    IntBase(bp),a6
  1161.         lea    BackGrdTab(pc),a2    ; possition table
  1162.         moveq    #4-1,d2
  1163. 5$        moveq    #0,d0
  1164.         move.b    (a2)+,d0        ; x pos
  1165.         moveq    #0,d1
  1166.         move.b    (a2)+,d1        ; y pos
  1167.         lea    RastPort(bp),a0
  1168.         move.l    ImageTable(bp),a1
  1169.         RECALL    DrawImage        ; draw background
  1170.         dbra    d2,5$
  1171.         moveq    #0,d0
  1172.         moveq    #0,d1
  1173.         lea    RastPort(bp),a0
  1174.         lea    Border11(pc),a1
  1175.         RECALL    DrawBorder
  1176.         lea    NewDragon(bp),a2    ; piece to draw
  1177.         moveq    #10,d4
  1178.         moveq    #4-1,d7            ; 3 layers
  1179. 4$        moveq    #0,d3
  1180.         moveq    #6-1,d6            ; 6 rows
  1181. 3$        moveq    #0,d2
  1182.         moveq    #12-1,d5        ; 12 columns
  1183. 2$        moveq    #0,d1
  1184.         move.b    (a2)+,d1
  1185.         beq.s    1$            ; no piece
  1186.         bmi.s    1$            ; already removed
  1187.         lsl.w    #2,d1
  1188.         move.l    ImageTable(bp,d1.w),a1
  1189.         lea    RastPort(bp),a0
  1190.         move.l    d3,d1            ; y=(30*row-3*layer)+10
  1191.         add.l    d4,d1
  1192.         move.l    d2,d0            ; x=(25*column-3*layer)+10
  1193.         add.l    d4,d0
  1194.         RECALL    DrawImage
  1195. 1$        add.w    #25,d2            ; next x
  1196.         dbra    d5,2$
  1197.         add.w    #30,d3            ; next y
  1198.         dbra    d6,3$
  1199.         subq.w    #3,d4            ; next layer diff
  1200.         dbra    d7,4$
  1201.         bsr.s    PrintMoves
  1202.         move.l    WinPtr(bp),a1        ; blit from hidden to real scr
  1203.         move.l    50(a1),a1
  1204.         lea    BitMap(bp),a0
  1205.         moveq    #0,d0
  1206.         moveq    #0,d1
  1207.         moveq    #0,d2
  1208.         moveq    #0,d3
  1209.         moveq    #(320>>4),d4
  1210.         lsl.w    #4,d4
  1211.         moveq    #256-198,d5
  1212.         neg.b    d5
  1213.         moveq    #256-$c0,d6
  1214.         neg.b    d6
  1215.         CALL    BltBitMapRastPort,GfxBase(bp)    ; great job !
  1216.         movem.l    (sp)+,d2-d7/a2        ; restore regs
  1217.         rts
  1218.  
  1219. BackGrdTab    dc.b    0,0,160,0,0,99,160,99    ; positions
  1220.  
  1221. ;------------------------------------------------------------------------------
  1222. ; Verbleibende Zuege anzeigen
  1223.  
  1224. PrintMoves    movem.l    d2-d4/a2/a3,-(sp)    ; show remaining pieces
  1225.         move.l    GfxBase(bp),a6        , load GfxBase to a6
  1226.         lea    RastPort(bp),a2
  1227.         moveq    #3-1,d4
  1228. 1$        moveq    #0,d0
  1229.         move.b    APenTab(pc,d4.w),d0
  1230.         move.l    a2,a1
  1231.         RECALL    SetAPen            ; set apen for rectangle
  1232.         move.l    #277,d0
  1233.         sub.w    d4,d0
  1234.         moveq    #50,d1
  1235.         sub.w    d4,d1
  1236.         move.l    #313,d2
  1237.         add.w    d4,d2
  1238.         moveq    #61,d3
  1239.         add.w    d4,d3
  1240.         move.l    a2,a1
  1241.         RECALL    RectFill        ; draw rectangle
  1242.         dbra    d4,1$
  1243.         move.l    a2,-(sp)        ; save rp !
  1244.         lea    MoveFmt(pc),a0
  1245.         moveq    #0,d0
  1246.         move.b    MovesToGo(bp),d0
  1247.         move.w    d0,-(sp)
  1248.         move.l    sp,a1
  1249.         lea    scput(pc),a2
  1250.         lea    MoveBuf(bp),a3
  1251.         CALL    RawDoFmt,SysBase(bp)    ; make string
  1252.         addq.w    #2,sp
  1253.         lea    MoveIText(pc),a1
  1254.         move.l    (sp)+,a0        ; rastport !!!
  1255.         moveq    #0,d0
  1256.         moveq    #0,d1
  1257.         CALL    PrintIText,IntBase(bp)    ; show piece count
  1258.         movem.l    (sp)+,d2-d4/a2/a3
  1259.         rts
  1260. scput        move.b    d0,(a3)+        ; for sprintf()
  1261.         rts
  1262.  
  1263. APenTab        dc.b    5,0,2,0            ; rectangle apens-> 3 2 1 (pad)
  1264.  
  1265. ;------------------------------------------------------------------------------
  1266. ; File auswaehlen && oeffnen
  1267.  
  1268. _LVOFileRequest    equ    -294            ; ARP FileRequest()
  1269. _LVOTackOn    equ    -624            ; add filename to path
  1270.  
  1271. ReqFile        movem.l    d2/d3/a2/a3,-(sp)    ; save regs
  1272.         moveq    #0,d3
  1273.         move.l    d0,d2            ; save flag
  1274.         move.l    SysBase(bp),a6
  1275.         move.l    276(a6),a0        ; ThisTask
  1276.         move.l    WinPtr(bp),a1
  1277.         move.l    184(a0),-(sp)        ; save pr_WindowPtr
  1278.         move.l    a1,184(a0)
  1279.         or.w    #1,24(a1)        ; Window->Flags | RMBTRAP>>16
  1280.         moveq    #(416>>4),d0
  1281.         lsl.w    #4,d0
  1282.         moveq    #1,d1
  1283.         swap    d1
  1284.         RECALL    AllocMem        ; alloc filerequest + buffer
  1285.         move.l    d0,a2
  1286.         move.l    a2,d0
  1287.         beq.s    1$            ; no mem for filerequest
  1288.         lea    ArpName(pc),a1
  1289.         moveq    #39,d0
  1290.         RECALL    OpenLibrary        ; open arp
  1291.         tst.l    d0
  1292.         beq.s    2$            ; no lib, sorry !
  1293.         move.l    d0,a6            ; setup base reg
  1294.         lea    LoadDragon.str(pc),a0
  1295.         tst.l    d2
  1296.         beq.s    4$
  1297.         lea    SaveDragon.str(pc),a0
  1298. 4$        move.l    a0,0(a2)        ; requester title
  1299.         lea    28+256(a2),a0
  1300.         move.l    a0,4(a2)        ; filename buffer
  1301.         lea    28(a2),a0
  1302.         move.l    a0,8(a2)        ; pathname buffer
  1303.         move.l    WinPtr(bp),12(a2)    ; window
  1304.         move.w    #$2801,16(a2)        ; DoColor+NewWindFunc&LongPath
  1305.         lea    ChangeFunc(pc),a0
  1306.         move.l    a0,18(a2)        ; change window structure
  1307.         move.l    a2,a0
  1308.         RECALL    FileRequest        ; ArpBase already in a6 !
  1309.         tst.l    d0
  1310.         beq.s    3$            ; cancled
  1311.         lea    28(a2),a0
  1312.         lea    28+256(a2),a1
  1313.         RECALL    TackOn            ; add filename to path
  1314.         lea    28(a2),a1
  1315.         move.l    a1,d1
  1316.         add.w    #1005,d2        ; (1005 read) or (1006 write)
  1317.         RECALL    Open            ; use ArpOpen()
  1318.         move.l    d0,d3
  1319. 3$        move.l    a6,a1            ; close arp
  1320.         CALL    CloseLibrary,SysBase(bp)
  1321. 2$        moveq    #(416>>4),d0        ; free filerequest + buffer
  1322.         lsl.w    #4,d0
  1323.         move.l    a2,a1
  1324.         RECALL    FreeMem
  1325. 1$        move.l    WinPtr(bp),a0
  1326.         and.w    #$fffe,24(a0)        ; Window->Flags & ~RMBTRAP>>16
  1327.         move.l    276(a6),a0
  1328.         move.l    (sp)+,184(a0)        ; restore pr_WindowPtr
  1329.         move.l    d3,d0            ; return file handle
  1330.         movem.l    (sp)+,d2/d3/a2/a3
  1331.         rts
  1332.  
  1333. ChangeFunc    moveq    #10,d0            ; new pos on screen (10,10)
  1334.         move.w    d0,(a0)+
  1335.         move.w    d0,(a0)+
  1336.         rts
  1337.  
  1338. ;------------------------------------------------------------------------------
  1339.  
  1340. DosName        dc.b    'dos.library',0
  1341. IconName    dc.b    'icon.library',0
  1342. IntName        dc.b    'intuition.library',0
  1343. GfxName        dc.b    'graphics.library',0
  1344. ArpName        dc.b    'arp.library',0
  1345. AudioName    dc.b    'audio.device',0
  1346. TopazName    dc.b    'topaz.font',0
  1347.  
  1348. Template    dc.b    'NOINTRO/S,NOMUSIC/S: ',0
  1349. TemplateLen    equ    *-Template-1
  1350. NoIntro        dc.b    'NOINTRO',0
  1351. NoMusic        dc.b    'NOMUSIC',0
  1352. Help        dc.b    $5f&'?',0
  1353.  
  1354. Sample        dc.b    'Sample',0
  1355. MoveFmt        dc.b    '%3d',0
  1356.  
  1357. About.str    dc.b    'About',0
  1358. Quit.str    dc.b    'Quit',0,0
  1359. NewGame.str    dc.b    'New game',0,0
  1360. UndoMove.str    dc.b    'Undo last move',0,0
  1361. UndoAll.str    dc.b    'Undo all moves',0,0
  1362. LoadDragon.str    dc.b    'Load Dragon',0
  1363. SaveDragon.str    dc.b    'Save Dragon',0
  1364. Music.str    dc.b    'Play Music',0
  1365. Options.str    dc.b    'Options',0
  1366. Project.str    dc.b    'Project',0
  1367.  
  1368. Author1.str    dc.b    4,0,09,09,'  China Challenge III  ',0
  1369. Author2.str    dc.b    4,0,09,16,'  -------------------  ',0
  1370. Author3.str    dc.b    4,0,09,29,'    written 1991 by    ',0
  1371. Author4.str    dc.b    2,0,09,44,'     Dirk Hoffmann     ',0
  1372. Author5.str    dc.b    4,0,06,60,'   rewritten 1993 by   ',0
  1373. Author6.str    dc.b    2,0,09,75,'     Gunther Nikl      ',0
  1374. Author7.str    dc.b    3,0,09,89,'This game is Freeware !',0
  1375. Author8.str    dc.b    3,0,09,99,'       Enjoy ...       ',0
  1376. Author9.str    dc.b    2,0,09,112,' (dedicated to Astrid) ',0
  1377.  
  1378.         dc.b    '$VER:'
  1379. Title.str    dc.b    'China Challenge III (08.09.93)',0
  1380.  
  1381.         even
  1382.  
  1383. TopazFont    dc.l    TopazName        ; screen font
  1384.         dc.w    8
  1385.         dc.b    0,0
  1386.  
  1387. NewScreen    dc.w    0,0            ; main screen definition
  1388.         dc.w    320,200
  1389.         dc.w    3
  1390.         dc.b    4,2
  1391.         dc.w    0
  1392.         dc.w    $18f
  1393.         dc.l    TopazFont,Title.str,0,0
  1394.  
  1395. NewWindow    dc.w    0,1            ; main window definition
  1396.         dc.w    320,198
  1397.         dc.b    2,4
  1398.         dc.l    $108,$1900
  1399.         dc.l    0,0,0,0,0
  1400.         dc.w    320,198
  1401.         dc.w    320,198
  1402.         dc.w    15
  1403.  
  1404. AboutWin    dc.w    57,55            ; about window definition
  1405.         dc.w    200,120
  1406.         dc.b    2,2
  1407.         dc.l    $200008,$31800
  1408.         dc.l    0,0,0,0,0
  1409.         dc.w    200,120
  1410.         dc.w    200,120
  1411.         dc.w    15
  1412.  
  1413. MenuStrip    dc.l    MenuStrip2        ; menu one
  1414.         dc.w    2,2,60,10,1
  1415.         dc.l    Project.str
  1416.         dc.l    ItemAbout
  1417.         dc.w    0,0,0,0
  1418.  
  1419. ItemAbout    dc.l    ItemQuit
  1420.         dc.w    2,2,80,11,$56
  1421.         dc.l    0
  1422.         dc.l    TextAbout,0
  1423.         dc.b    'a',0
  1424.         dc.l    0
  1425.         dc.w    0
  1426. TextAbout    dc.b    2,4,1,0
  1427.         dc.w    3,1
  1428.         dc.l    0
  1429.         dc.l    About.str,0
  1430.  
  1431. ItemQuit    dc.l    0
  1432.         dc.w    2,14,80,11,$56
  1433.         dc.l    0
  1434.         dc.l    TextQuit,0
  1435.         dc.b    'q',0
  1436.         dc.l    0
  1437.         dc.w    0
  1438. TextQuit    dc.b    2,4,1,0
  1439.         dc.w    3,1
  1440.         dc.l    0
  1441.         dc.l    Quit.str,0
  1442.  
  1443. MenuStrip2    dc.l    0            ; menu 2
  1444.         dc.w    70,2,60,10,1
  1445.         dc.l    Options.str
  1446.         dc.l    ItemNewGame
  1447.         dc.w    0,0,0,0
  1448.  
  1449. ItemNewGame    dc.l    ItemUndoMove
  1450.         dc.w    2,2,150,11,$56
  1451.         dc.l    0
  1452.         dc.l    TextNewGame,0
  1453.         dc.b    'n',0
  1454.         dc.l    0
  1455.         dc.w    0
  1456. TextNewGame    dc.b    2,4,1,0
  1457.         dc.w    3,1
  1458.         dc.l    0
  1459.         dc.l    NewGame.str,0
  1460.  
  1461. ItemUndoMove    dc.l    ItemUndoAll
  1462.         dc.w    2,14,150,11,$56
  1463.         dc.l    0
  1464.         dc.l    TextUndoMove,0
  1465.         dc.b    'b',0
  1466.         dc.l    0
  1467.         dc.w    0
  1468. TextUndoMove    dc.b    2,4,1,0
  1469.         dc.w    3,1
  1470.         dc.l    0
  1471.         dc.l    UndoMove.str,0
  1472.  
  1473. ItemUndoAll    dc.l    ItemLoadGame
  1474.         dc.w    2,26,150,11,$56
  1475.         dc.l    0
  1476.         dc.l    TextUndoAll,0
  1477.         dc.b    'g',0
  1478.         dc.l    0
  1479.         dc.w    0
  1480. TextUndoAll    dc.b    2,4,1,0
  1481.         dc.w    3,1
  1482.         dc.l    0
  1483.         dc.l    UndoAll.str,0
  1484.  
  1485. ItemLoadGame    dc.l    ItemSaveGame
  1486.         dc.w    2,38,150,11,$56
  1487.         dc.l    0
  1488.         dc.l    TextLoadGame,0
  1489.         dc.b    'l',0
  1490.         dc.l    0
  1491.         dc.w    0
  1492. TextLoadGame    dc.b    2,4,1,0
  1493.         dc.w    3,1
  1494.         dc.l    0
  1495.         dc.l    LoadDragon.str,0
  1496.  
  1497. ItemSaveGame    dc.l    ItemMusic
  1498.         dc.w    2,50,150,11,$56
  1499.         dc.l    0
  1500.         dc.l    TextSaveGame,0
  1501.         dc.b    's',0
  1502.         dc.l    0
  1503.         dc.w    0
  1504. TextSaveGame    dc.b    2,4,1,0
  1505.         dc.w    3,1
  1506.         dc.l    0
  1507.         dc.l    SaveDragon.str,0
  1508.  
  1509. ItemMusic    dc.l    0
  1510.         dc.w    2,62,150,11,$15f
  1511.         dc.l    0
  1512.         dc.l    TextMusic,0
  1513.         dc.b    'm',0
  1514.         dc.l    0
  1515.         dc.w    0
  1516. TextMusic    dc.b    2,4,1,0
  1517.         dc.w    3+10,1
  1518.         dc.l    0
  1519.         dc.l    Music.str,0
  1520.  
  1521. Border11    dc.w    2,84            ; selection places
  1522.         dc.b    1,2,1,5
  1523.         dc.l    KoordArray
  1524.         dc.l    Border12
  1525. Border12    dc.w    290,84
  1526.         dc.b    1,2,1,5
  1527.         dc.l    KoordArray
  1528.         dc.b    0,0,0,0
  1529. KoordArray    dc.w    0,0,28,0,28,33,0,33,0,0
  1530.  
  1531. MoveIText    dc.b    2,5,1,0            ; remaining moves text
  1532.         dc.w    283,53
  1533.         dc.l    0
  1534.         dc.l    vars+MoveBuf
  1535.         dc.l    0
  1536.  
  1537. ImgData        dc.l    $423C168A,$003E1774,$18F61A78,$1BFA1D7C,$1EFE2080
  1538.         dc.l    $22022384,$25062688,$280A298C,$2B142C96,$2E182FA0
  1539.         dc.l    $312232A4,$342635A8,$372A38AC,$3A2E3BB0,$3D323E34
  1540.         dc.l    $3F364038,$413ABA88,$19040E06,$08A00400,$40A0111A
  1541.         dc.l    $43576112,$05308ECC,$64021021,$4100E000,$08002838
  1542.         dc.l    $3B3D953D,$DE506534,$6A021012,$86180180,$08010428
  1543.         dc.l    $56C07C8A,$92B10CDE,$692DC060,$02A62280,$A4342900
  1544.         dc.l    $C0E188E2,$3542381C,$960747A9,$41712C41,$228809F2
  1545.         dc.l    $8F69D743,$04D42E5F,$01102104,$6481B44A,$59891E0C
  1546.         dc.l    $DC9580A0,$C240D115,$40110694,$7884A611,$8372BCC1
  1547.         dc.l    $5605687A,$154225E9,$20A24D35,$4D4146B7,$C2128AF0
  1548.         dc.l    $D1EE0295,$0C49CD22,$25824835,$D1D04B65,$E038E1F8
  1549.         dc.l    $43988802,$500182E5,$0F8B4713,$48A200CE,$7B08214C
  1550.         dc.l    $A35811D0,$81422A04,$1001BC48,$3D0EC00D,$001D1F5A
  1551.         dc.l    $61804010,$22000884,$88C4E529,$C2102C20,$265D025D
  1552.         dc.l    $DF082914,$20280C76,$18A483ED,$9CC21047,$A39946DA
  1553.         dc.l    $7920E081,$A240A6B1,$0DC27634,$02030A8A,$E348A622
  1554.         dc.l    $A28A0054,$07400E3F,$AA3423B0,$A0001020,$41070325
  1555.         dc.l    $00604804,$24740AD7,$04D89A00,$04A99F21,$A39F4054
  1556.         dc.l    $41CA5000,$18800008,$95B82802,$09280705,$0FF64588
  1557.         dc.l    $C0F1C162,$C2E418C5,$5C664910,$200E1680,$08CF94F4
  1558.         dc.l    $21901006,$C6091014,$C11A3200,$115294C8,$0463D078
  1559.         dc.l    $31842010,$3ACE2543,$89180840,$00404010,$089F3087
  1560.         dc.l    $AF0C1448,$642A0358,$78686440,$3120980A,$412C8CB6
  1561.         dc.l    $B5A0D466,$34380132,$17A40040,$21038E04,$01265802
  1562.         dc.l    $A50C2169,$15EE4012,$04782400,$40206021,$60A6EA21
  1563.         dc.l    $24592051,$2C00042C,$A11381A9,$00F9A122,$00B47395
  1564.         dc.l    $CE103065,$C0BA88B1,$21238076,$207F2C09,$0453E0EC
  1565.         dc.l    $18428481,$1A020580,$03C02B31,$1277C80F,$C72D9248
  1566.         dc.l    $83822C00,$020013D8,$6B002213,$501FF660,$115B4D10
  1567.         dc.l    $941600AE,$021072C0,$0AD1E364,$C828A084,$9E378737
  1568.         dc.l    $9B123808,$31A812D1,$0A4C1342,$60F0BDAD,$7A4346C0
  1569.         dc.l    $14C00200,$0500CE28,$0A46A702,$2486D900,$01EA0A09
  1570.         dc.l    $A22CB820,$932290C3,$4145D656,$A245EB04,$24137D20
  1571.         dc.l    $32024104,$D848BB48,$2120336C,$084BAE20,$A8628693
  1572.         dc.l    $1629C400,$1906AA31,$2E680828,$1F9E660C,$8637A081
  1573.         dc.l    $45B80460,$43104266,$0BC826E1,$F51E6EC1,$1266D9A8
  1574.         dc.l    $022A0044,$D080213B,$8C2AF239,$489E5A89,$4A638864
  1575.         dc.l    $265D0088,$D24078FA,$417F1CC1,$A29FD9A4,$0B26A34A
  1576.         dc.l    $865D8411,$ED208F4C,$084B3901,$9C93F415,$0A510F00
  1577.         dc.l    $9050923F,$5B0707CC,$4B8905E2,$082E3AEA,$90F0185A
  1578.         dc.l    $33B47023,$54B869E2,$D8BFC481,$2049D772,$45DA6414
  1579.         dc.l    $0B5EA5AB,$DD580F21,$0AF74259,$E3B89D93,$81B66BA5
  1580.         dc.l    $87D8C180,$0BA51EC8,$4CF6C613,$3BEF8628,$59520CC7
  1581.         dc.l    $30617551,$9B0821AA,$E1E4E1E0,$84F66491,$1E72409E
  1582.         dc.l    $B2E94607,$A510B1E7,$43FF8A60,$F91B791C,$551302A0
  1583.         dc.l    $CFA58A14,$AC01110D,$B9ED1412,$348A4BB6,$2500A100
  1584.         dc.l    $86180815,$D58A4E11,$4FF968AF,$4A1BB125,$724EA1C0
  1585.         dc.l    $81639F78,$AF2ACA01,$5B5CF415,$204DAA53,$0A260102
  1586.         dc.l    $424A8359,$4A382285,$05660120,$4DD15F26,$02000115
  1587.         dc.l    $949A8826,$6C442F50,$52144444,$0012D052,$11302182
  1588.         dc.l    $C8419640,$543868C0,$05EE6041,$C08F0392,$88491498
  1589.         dc.l    $7960D080,$193819C2,$8E262028,$0BE2672A,$1040204B
  1590.         dc.l    $70C80092,$0C0A0F19,$0159A012,$47840228,$12270A16
  1591.         dc.l    $504A9E00,$08D7C120,$08E0B0D1,$8A621340,$00208D00
  1592.         dc.l    $9A820410,$881A1100,$3212814E,$20E00141,$590B22A0
  1593.         dc.l    $02453404,$8A06C242,$0A2A3D18,$85A83280,$A000028D
  1594.         dc.l    $000A0400,$30E15911,$00B8558C,$2D100600,$42085A44
  1595.         dc.l    $00D9C408,$84600802,$42898C14,$58510098,$21E02690
  1596.         dc.l    $03908710,$6882181C,$C58583B1,$902B0024,$00244014
  1597.         dc.l    $E1C2589E,$22003B04,$2298059A,$20840C4A,$51010002
  1598.         dc.l    $11C64B00,$78093622,$00C00D82,$44102200,$38002500
  1599.         dc.l    $025D8E48,$D226B012,$808183CC,$222920CC,$4009402C
  1600.         dc.l    $1C06A120,$838092A0,$AA10EE05,$249A0446,$40041011
  1601.         dc.l    $08F9AD82,$DCB04A22,$8E83659D,$B8030008,$0402C125
  1602.         dc.l    $80DCED40,$05488A00,$091311D2,$1001C041,$C8448089
  1603.         dc.l    $8F2B0250,$6A061004,$B24008F2,$B1601911,$F886F6CA
  1604.         dc.l    $8411E6A4,$32820900,$38C03D15,$00B20122,$32A10C40
  1605.         dc.l    $98727243,$38880402,$49800002,$80C06753,$08004803
  1606.         dc.l    $41425E36,$42310630,$58603401,$4AC78772,$8009CA19
  1607.         dc.l    $4120358B,$AA448C81,$42114841,$08540560,$05200000
  1608.         dc.l    $2162819B,$42260284,$3F2EA00E,$0A01C360,$2148E0BA
  1609.         dc.l    $8048D34E,$A4004E08,$6512050D,$E0024491,$1100800C
  1610.         dc.l    $59575879,$94100515,$0E14806C,$40CA0A3C,$A0A28000
  1611.         dc.l    $0A3A267D,$9A62080C,$6084F408,$82022C08,$20202013
  1612.         dc.l    $30084512,$1405CE8B,$0B45C420,$00089481,$540220A6
  1613.         dc.l    $584077A8,$F0993960,$4F905200,$A4841846,$40044226
  1614.         dc.l    $0088C944,$C4500205,$B920A422,$300AB344,$1826E691
  1615.         dc.l    $04D274B8,$02182A13,$AA324A68,$B81152E9,$0C545104
  1616.         dc.l    $DAF149F9,$21612805,$93BBE639,$10285110,$72280004
  1617.         dc.l    $80FDA832,$9180166B,$8308F6FC,$0E00C88C,$0002D407
  1618.         dc.l    $CA7896E9,$D00209A0,$EAEAB8BC,$8C18ABF3,$020102C4
  1619.         dc.l    $C6F3E090,$E02005E0,$4120CF31,$EC50A7E9,$C8150603
  1620.         dc.l    $F3628C70,$22301210,$064E67DF,$705AC835,$0140144B
  1621.         dc.l    $606E1641,$885E1E01,$049B79BC,$78D8FA1F,$1810A020
  1622.         dc.l    $B4C0153D,$00C891A2,$447DB9FB,$FB5C0337,$5DC0177A
  1623.         dc.l    $A0A8EB24,$38044424,$4A9FDED7,$B97524FE,$8A50440C
  1624.         dc.l    $40E0E834,$031A8200,$02958BAD,$29602F6B,$AAD40668
  1625.         dc.l    $A6929059,$09147132,$11D44C7F,$042A965B,$CEB3840E
  1626.         dc.l    $44329200,$28A42800,$9503A55E,$04392870,$8268A971
  1627.         dc.l    $09021000,$1E20480D,$819CD2FB,$282522D0,$17011411
  1628.         dc.l    $88410049,$8A440207,$A8815F4B,$64A002DE,$46101C88
  1629.         dc.l    $1E490C01,$4160F31A,$0587EEB9,$66502B27,$62042A07
  1630.         dc.l    $1CC8881A,$0DA4D3C6,$2E5B23D0,$06180048,$0B18092B
  1631.         dc.l    $5D048010,$3096E845,$008365BB,$51C031A1,$E3200046
  1632.         dc.l    $59104C02,$22690295,$12043140,$215360C0,$CB008029
  1633.         dc.l    $54199466,$1C426E3E,$EB16D248,$022A0040,$40082474
  1634.         dc.l    $90121240,$0C9087E9,$49CF1A8C,$289A700A,$060041CC
  1635.         dc.l    $420D0104,$39195DE9,$2211103A,$81E00264,$C00080CF
  1636.         dc.l    $81188600,$684ADC81,$80881005,$160A0B00,$00418098
  1637.         dc.l    $4C3CC20C,$12000500,$98900F98,$84603948,$A411184A
  1638.         dc.l    $6008005A,$42017D75,$6220010E,$09000012,$0220812E
  1639.         dc.l    $E044748E,$736800D0,$8FFF3F00,$FF3E00FF,$3E00FF3E
  1640.         dc.l    $00FF3E00,$FF3E00FF,$3E00C200,$3E80FF3E,$00FF3E00
  1641.         dc.l    $FF3E00FF,$3E00FF3E,$00FF3E00,$FF3E00C2,$7E0A3110
  1642.         dc.l    $B9B00F68,$12385E06,$50EEBC06,$00093E02,$4DD23D06
  1643.         dc.l    $029A838C,$E00E60BE,$F80460BC,$0359E978,$02609038
  1644.         dc.l    $7C18C130,$7EF21B7A,$F818E108,$38F81639,$F8B70379
  1645.         dc.l    $F903D041,$A8610621,$F0FA28F8,$0072E080,$0194FB00
  1646.         dc.l    $1FEE1AD0,$26F00C07,$32061FE4,$023F884F,$94A9DF4F
  1647.         dc.l    $3C1221E7,$37D6C84F,$C0658B7D,$2066F217,$14E08104
  1648.         dc.l    $34CF13FB,$8125C8C3,$0F3EB9E7,$289BC434,$C8D9C9F1
  1649.         dc.l    $C38D1C97,$903E9EE0,$1FF460B9,$1FEAE0B8,$1F36609C
  1650.         dc.l    $003CD100,$D6BE0007,$9C206880,$0C3C3EE0,$143F3EB4
  1651.         dc.l    $B00E903F,$CF050F9D,$28131FDE,$E0980F86,$E010DFDE
  1652.         dc.l    $D64021E4,$07073424,$1FEEE417,$68E41B6B,$14FE021E
  1653.         dc.l    $CD1F50EC,$13392ECC,$B88C3810,$66F91F1B,$07129C37
  1654.         dc.l    $CAD5EF27,$F20F372D,$81BFC081,$AA738383,$86603F81
  1655.         dc.l    $0C60BF86,$0E60B380,$0460AEE6,$0A920016,$CF20437C
  1656.         dc.l    $07E4BF03,$9F39900F,$87870F2D,$70B0433C,$7C61E820
  1657.         dc.l    $A8F10327,$F934400B,$34F0F201,$CDDC1188,$2D00FC83
  1658.         dc.l    $B8F8091C,$50E81365,$22FE8062,$1F8876FC,$8318F903
  1659.         dc.l    $3C788135,$EE37D6C0,$BC302FD0,$20BC60A6,$603C7144
  1660.         dc.l    $FC20F006,$360004CD,$63E0D63C,$C198E323,$78B8E334
  1661.         dc.l    $40B90381,$E7390084,$1F21A0D8,$4E91870C,$1EA9E736
  1662.         dc.l    $E021E706,$E0A0E7C6,$0D72E6D8,$C633BA6E,$5FB8C51F
  1663.         dc.l    $C4C80722,$2A287F40,$7DFB03E8,$F040C80E,$283E8EB8
  1664.         dc.l    $6F911F50,$21B0FEC8,$BF936854,$9F3688E0,$BF352627
  1665.         dc.l    $3F8AEB95,$2F866020,$06593A02,$40A99F77,$0A8ECE20
  1666.         dc.l    $36609E73,$B51A80BC,$1F72902E,$7200FE7D,$FEE0228E
  1667.         dc.l    $E3233FB1,$A83FA778,$003F86E0,$A4510390,$2FF6E010
  1668.         dc.l    $3FCEE002,$0CE820F9,$0FFE0B1C,$863A0946,$C9010ACE
  1669.         dc.l    $05143A81,$1008830C,$0D44E4F3,$880B333E,$8812F903
  1670.         dc.l    $F0063CA0,$D8B8176E,$0FBD7F40,$69FB8588,$FC7DF141
  1671.         dc.l    $8C7C8518,$CE1F50EC,$67083802,$F860BE03,$A8A4C5A9
  1672.         dc.l    $838C0782,$B904A3EA,$38E33209,$1EC581F4,$EC3C07EA
  1673.         dc.l    $E0B187B6,$60980784,$E0BC0362,$BE000683,$4F7B8C0F
  1674.         dc.l    $839F17C3,$050EE32D,$F0E3BEE0,$AFF33EE0,$27F30EE0
  1675.         dc.l    $A6FB360C,$28B6D9C2,$2AED050F,$7204561E,$40E60F44
  1676.         dc.l    $7223CE4B,$7DE80311,$40F9839F,$B8BF00C0,$07D5C5E7
  1677.         dc.l    $2DF2F7C5,$811EC800,$1FF148E0,$B850B460,$B03420E5
  1678.         dc.l    $40371BE4,$1F8A7C0F,$8660300D,$A1419E07,$3E60BC02
  1679.         dc.l    $34F63735,$BEC031F8,$9FF0048C,$E8A1BFC0,$1F3E7400
  1680.         dc.l    $0C010710,$688EB007,$C633F80F,$B274401F,$F6C13FE6
  1681.         dc.l    $A3E05142,$99EFDEF1,$200E23FF,$82C7B687,$2F4A4C0B
  1682.         dc.l    $DED0410C,$FA44540C,$68F00282,$030A0FFE,$401AE4C7
  1683.         dc.l    $21F28188,$7C1F0E28,$6F3F1091,$8C1F18C8,$8138FC9D
  1684.         dc.l    $AB0F4426,$787E3E28,$F3F09402,$CF86E0B3,$C0266020
  1685.         dc.l    $815C18C8,$077E061F,$F460A00F,$A8FDBC07,$D53A9C86
  1686.         dc.l    $1CE0BDC0,$3EE0BFE0,$7EE09FE1,$1A64B2C1,$839C059F
  1687.         dc.l    $B60F2C90,$1FD003A8,$3F1D207F,$D002A07F,$02E090EF
  1688.         dc.l    $B6E01005,$E231F943,$77E40730,$A21ED00F,$08FE801D
  1689.         dc.l    $F64377E4,$90F3B020,$F8806619,$712066F2,$1F60787F
  1690.         dc.l    $A0F8402D,$E4D0384F,$7050EEB0,$30091E30,$300A559F
  1691.         dc.l    $20AA3020,$1C4FF260,$3E69003A,$C8C0F8C6,$80B6609F
  1692.         dc.l    $8139C803,$D341BE07,$069EA8C1,$0873F211,$73A4CF2F
  1693.         dc.l    $91FFB608,$68B234A0,$C219D0F2,$0C68F606,$34CE032E
  1694.         dc.l    $B1001F88,$C5101807,$2218DF3C,$0211F836,$E252169F
  1695.         dc.l    $FFA1231F,$8882FC01,$7801AE23,$0C1ECCC8,$816CF318
  1696.         dc.l    $F98112C8,$C80F68E6,$BCF48EE0,$3C38D120,$43002673
  1697.         dc.l    $478001CD,$F660BCF1,$1260B81D,$45E05306,$60800C04
  1698.         dc.l    $33583F06,$E0A07F0E,$E090C783,$0FD94017,$837EB783
  1699.         dc.l    $D00591C7,$3D50F018,$20780C10,$3C92029A,$BA0182CD
  1700.         dc.l    $D02FBD3F,$C8D889E3,$C1632122,$06807220,$07194377
  1701.         dc.l    $232E7E27,$40DE0FEA,$3DF917F0,$033C006C,$F981441C
  1702.         dc.l    $7CC84E31,$BC7FE1EA,$F1240066,$B97F5CA3,$011A6177
  1703.         dc.l    $7480CE14,$6AD101F6,$34F8D52C,$780EBFD5,$6048A114
  1704.         dc.l    $830F770C,$1741D000,$B77F0D91,$007ED087,$1E3F56FE
  1705.         dc.l    $80EEE621,$FFD41300,$58FF8100,$62344040,$1D4AFF01
  1706.         dc.l    $0054C805,$7DF4018C,$00073901,$C12F2168,$20B107A9
  1707.         dc.l    $72200907,$2F526E7F,$11FFC036,$6E3AF1F3,$10E08FC0
  1708.         dc.l    $7E00147F,$BEB8D166,$3E743CE7,$57CADF78,$25CF081B
  1709.         dc.l    $E879C804,$E94E9C3B,$F51C1AFC,$5EA001F9,$4CEA1CFA
  1710.         dc.l    $2A758EFB,$EE8247F8,$0CE0B823,$BBD28D9A,$9C09C885
  1711.         dc.l    $151F1CBC,$5FA00199,$4F1AAAA0,$5BE02BEF,$06A80FA9
  1712.         dc.l    $0F07E12B,$65292F7E,$3E73800D,$0E3C6402,$B621770C
  1713.         dc.l    $120C9009,$030AF830,$080C9D23,$05FF560A,$190FF87F
  1714.         dc.l    $086440FA,$00B82FAC,$E4400410,$0E28D081,$E2980718
  1715.         dc.l    $0872802F,$DCCFC631,$CD3728C1,$BF80FC00,$EC33391E
  1716.         dc.l    $800327E5,$432AE427,$32BFF28E,$40D237F6,$8AF280F6
  1717.         dc.l    $16F94488,$49EF7E0F,$0B528324,$32BF2672,$BFA22628
  1718.         dc.l    $14F8072F,$BE98805A,$E0A5C402,$947420B1,$7F072568
  1719.         dc.l    $2128BF07,$AFAF6880,$4EA28BFD,$F1101BFB,$17AB000E
  1720.         dc.l    $1C401319,$07F00A80,$4580017E,$470011B7,$23080630
  1721.         dc.l    $FF108087,$4090A0D8,$2FE000E2,$A0000720,$3F80E8F6
  1722.         dc.l    $34801040,$0340F803,$20307880,$A020BA18,$7A8825FC
  1723.         dc.l    $01380BE3,$01D8702B,$E4009CA0,$1CFC09C0,$0FC0073E
  1724.         dc.l    $37F3DAE2,$C52FE5BF,$C5084BB1,$D5F4E0B4,$55C16432
  1725.         dc.l    $BD086038,$BE2C60FE,$6560B45D,$5A7B7A81,$1770B266
  1726.         dc.l    $B07E2497,$37147222,$1217BA3E,$8EE098BE,$2EE0B29C
  1727.         dc.l    $A6E0345D,$16724029,$DBBF98F1,$0FE38032,$BF5FFC03
  1728.         dc.l    $BFFF8822,$0AE001E9,$01E53E9A,$7FF8C6F9,$81F90178
  1729.         dc.l    $0008E381,$283CE43C,$80073494,$FF34827F,$01F901D8
  1730.         dc.l    $1F27F203,$22CA0F44,$E6EB57A0,$B9382BB2,$6CA8B672
  1731.         dc.l    $03365D34,$7F44E496,$6F14606E,$A260A823,$60AFB441
  1732.         dc.l    $6013BFF2,$22609FD1,$FC27C535,$3F94C80A,$5D10E02F
  1733.         dc.l    $BE372880,$6982A516,$947F46E0,$B17F16E0,$253E52E0
  1734.         dc.l    $28BE8AE0,$AFAEFAE0,$F24CE0ED,$23811AC8,$3F0F680E
  1735.         dc.l    $E0012E13,$39C00A2A,$8B9041C4,$13511A7B,$A0561980
  1736.         dc.l    $7C458C3F,$2FFF2041,$B2481B44,$3280AE12,$B0F100FC
  1737.         dc.l    $D6383EC1,$22300310,$4159381A,$800F2032,$E001A022
  1738.         dc.l    $02EA3CE3,$FE052221,$F89F207F,$1583BF81,$13F000EE
  1739.         dc.l    $33190023,$390FBE2F,$80F003B0,$6FEE7800,$0F800663
  1740.         dc.l    $E82121F2,$3FFCF8E4,$291ED5F4,$60B21424,$E0B8B688
  1741.         dc.l    $60F891C6,$60301F40,$23681C04,$60FC41F4,$016098BE
  1742.         dc.l    $8CE0B27E,$200FFF0F,$3EC0920F,$A8BE8EE0,$321C26E0
  1743.         dc.l    $B7DDF6E0,$90F2745B,$1D871FC8,$FFFEE040,$3E80171C
  1744.         dc.l    $067F082A,$0E1C5027,$007FC301,$CFFC6320,$57C702E2
  1745.         dc.l    $FF28220A,$0788FE01,$B0FB07D5,$1822087F,$900F4C10
  1746.         dc.l    $07301404,$F2F4F7FC,$748825E0,$FF40C07F,$80072003
  1747.         dc.l    $801FF5C1,$F0D08318,$3AFC0380,$CA0F44FF,$7E408031
  1748.         dc.l    $F8BE001C,$3E0034F8,$B81C30E4,$E3E70906,$03D93616
  1749.         dc.l    $1060BF94,$03A0F081,$0C2B9EE0,$0058D13B,$B0008247
  1750.         dc.l    $9000C1AE,$00A38042,$800337B1,$78FF706C,$F7039591
  1751.         dc.l    $F8DF587F,$F70083CF,$012E855B,$087C04F3,$005EB8D4
  1752.         dc.l    $0F28167F,$64E3018C,$2C073CB4,$CF04CB8F,$1FFE6E72
  1753.         dc.l    $0307739A,$0FE30F0F,$C13400E3,$1DC874E2,$000E5134
  1754.         dc.l    $06F87020,$5F881F0F,$0F9C3940,$0F3E0307,$A47A1288
  1755.         dc.l    $4730D39F,$00287B02,$3991DFF0,$D0F1211C,$6AF98466
  1756.         dc.l    $E655DC9E,$0196BE0A,$1DD53C60,$BEF60572,$9E609D3F
  1757.         dc.l    $ECBAF2DD,$B5BBAAC8,$009B49EE,$059FB602,$B1DBF886
  1758.         dc.l    $13BA3F80,$0D35307F,$2FEEFF83,$1C747F03,$7F78FF85
  1759.         dc.l    $7FD2FF66,$E2A0FF0D,$8A4EFF0B,$437F51D6,$F4FF3749
  1760.         dc.l    $397F1FFF,$DC7F0AFF,$E87F2AFF,$A87FB6FF,$B07FAAFF
  1761.         dc.l    $A07F097F,$407F2F3E,$407F10F7,$8005A203,$30FD0006
  1762.         dc.l    $22293F09,$F101F737,$B45F03AA,$7C4007AA,$B502FD23
  1763.         dc.l    $830E7FD8,$D1233F3D,$18FFEC00,$1AFE1C00,$1DBEFC32
  1764.         dc.l    $A87F3829,$8CF77822,$47DDD103,$14606790,$A40601FF
  1765.         dc.l    $091C00F7,$A9804E94,$39F9F7E8,$2985701E,$BAE4442E
  1766.         dc.l    $70118B1D,$2F30F640,$3EFAF340,$0E44E807,$B0760C0F
  1767.         dc.l    $30901703,$B9D895F1,$E241DC0F,$28088E1E,$C1C47F01
  1768.         dc.l    $C1C8503E,$A9818808,$FC530446,$DA0EFD40,$0FE42F76
  1769.         dc.l    $2ABC382D,$F7BF0FF0,$C11701B6,$66830700,$700EDD69
  1770.         dc.l    $05D5D096,$532A3A0A,$FF656C36,$F7B6147B,$DD823B27
  1771.         dc.l    $E3F2001D,$635C002A,$E3AA0031,$DDC6000B,$FFE80002
  1772.         dc.l    $77200004,$77100004,$D5900004,$C9900007,$94F00000
  1773.         dc.l    $B6800000,$4103CA01,$5AFC1766,$E2F7079F,$E386093E
  1774.         dc.l    $C10D7216,$38B1F01E,$91FC50EB,$ADFCA875,$21F8143B
  1775.         dc.l    $A031CEE0,$9127E6E0,$11E1F6E0,$0A150A44,$66F6240F
  1776.         dc.l    $68F19081,$CC0320B8,$F7A00E19,$50EA6820,$CDF6FB03
  1777.         dc.l    $9AF99E99,$EC3EA3E0,$EED1250F,$E41717E0,$7441B0F0
  1778.         dc.l    $03807134,$41AC707E,$C1E0A7DA,$A0E0D33A,$8021AA1D
  1779.         dc.l    $00610522,$6EF8B388,$038911C3,$98790844,$D4FFDCFE
  1780.         dc.l    $00F1A5BF,$F8C29FE0,$F85340FC,$B3FA17FC,$048FA078
  1781.         dc.l    $020A60ED,$3DAE41A5,$207FC6A3,$DC79F253,$EC70E820
  1782.         dc.l    $790724B4,$1F8846FC,$07B86091,$5F619071,$00A00719
  1783.         dc.l    $B41F888C,$A77CAEE0,$B1F3D37D,$BC00CA27,$7734F83C
  1784.         dc.l    $36048FBE,$C1A6603E,$F51C0E54,$606F04CD,$7E33A2FF
  1785.         dc.l    $B1A0E184,$73008E1A,$79E38A82,$47E782C1,$E4A34717
  1786.         dc.l    $C026A280,$A87880E7,$92947CE7,$2A3D6FA3,$75A040A4
  1787.         dc.l    $3B93CEF4,$80F9E682,$477F8120,$D8F23F0C,$24A00016
  1788.         dc.l    $79002D68,$00BCE04C,$89C124BE,$A0718127,$B8500EF9
  1789.         dc.l    $03203890,$B0033958,$7C00221F,$287E020E,$C324389F
  1790.         dc.l    $B819C82C,$402013F2,$61401800,$0C000E22,$387F88A9
  1791.         dc.l    $8C0DAA54,$03EB4662,$013E3440,$01494000,$07FFF000
  1792.         dc.l    $0FFFF800,$1FFFFC00,$4EDA1F80,$16FCFC40,$FE66000A
  1793.         dc.l    $731E8633,$E7E38424,$12C63AE3,$C04819A1,$C28B82CD
  1794.         dc.l    $C1E60DBF,$F803BFE0,$34409F88,$02419CA7,$411F3E06
  1795.         dc.l    $824E1C0E,$E093881E,$E0AFC03E,$E027E001,$B8377CFE
  1796.         dc.l    $A001FE2E,$FF83FF14,$7F07F788,$73D86182,$FFC3C0A2
  1797.         dc.l    $41E3C2FF,$1FF7C00E,$B0933184,$411FF863,$801FDE7F
  1798.         dc.l    $3FE601BF,$9C3A40AF,$3E03B43B,$062F8818,$11C0A040
  1799.         dc.l    $42600339,$B03F50F7,$3CD8FF1C,$6CEFA6E6,$8CFD0299
  1800.         dc.l    $FF81C0CC,$00EAE6B7,$E6603E7C,$7100E869,$C4A05148
  1801.         dc.l    $0FAC6417,$E631B707,$917220AF,$07277220,$07399208
  1802.         dc.l    $3FD8000C,$64100632,$02A2AFA0,$80698ACC,$812C3E90
  1803.         dc.l    $7F18C80C,$800F1080,$C06FA88C,$81081C2E,$C8816420
  1804.         dc.l    $90389039,$FC152836,$90F21C2A,$90093E0A,$C0EA1C03
  1805.         dc.l    $99C101CC,$B603D97C,$C638A066,$6C0FF090,$1703B739
  1806.         dc.l    $909115E0,$AF1C6790,$27C17E82,$4EC10133,$D801D64F
  1807.         dc.l    $246E3400,$837F0FC0,$EA1C0398,$940F4872,$20A301DF
  1808.         dc.l    $206420B0,$1FA87220,$08072E72,$6F7F101C,$0E981CE9
  1809.         dc.l    $60148036,$BFF7A8FC,$43C0103A,$C1AAA009,$1C26603F
  1810.         dc.l    $3E5C1AA0,$7E0E3E74,$D2311C6A,$EA18C136,$058DC182
  1811.         dc.l    $4ED10208,$C1FC011E,$80031083,$F9246636,$389CC6A6
  1812.         dc.l    $3C99EFC8,$00042F08,$56FF0101,$EE1D1C54,$D00458FF
  1813.         dc.l    $807F2274,$60DA3462,$0A781C14,$98031CC8,$0A401030
  1814.         dc.l    $0C3E0341,$7F8007E0,$00443E1E,$CE862719,$E0832610
  1815.         dc.l    $0C401BF0,$00BFA008,$03500040,$BEEA2060,$BFF008BA
  1816.         dc.l    $9AD3F86D,$06D0C6B8,$360C6023,$AC4C0F27,$C9F060E0
  1817.         dc.l    $1360E92A,$E060B82E,$0A2BA660,$9FFFFCE0,$BF57A8B8
  1818.         dc.l    $0E0398B4,$914FE007,$3800A71D,$87C9F2E0,$A3C8DFE0
  1819.         dc.l    $382E1AB8,$3E0EA447,$6F1A13FF,$64800A1D,$FEE086A4
  1820.         dc.l    $E0826E13,$2635A0C0,$5FE0C05F,$F79FAE4D,$DF0115DE
  1821.         dc.l    $0F0FF66A,$842C0656,$380EA21F,$889A83E4,$240F8FE3
  1822.         dc.l    $FAFFE013,$E90080E2,$FF0390E4,$07A8FF20,$00024788
  1823.         dc.l    $0030FE41,$2303A3F9,$90AF030F,$39902FE3,$F87F0380
  1824.         dc.l    $038390E0,$7F18400D,$3D903040,$AC07B5E2,$3940808E
  1825.         dc.l    $7FFD91EC,$7F7F0C50,$3F01FF00,$00000003,$00300040
  1826.         dc.l    $00800100,$010000C0,$02800300,$05000607,$08080709
  1827.         dc.w    $090A,$080A,$0B0C
  1828.  
  1829.     IFD INTRO
  1830. PicData        dc.l    $5E042716,$1FB8AF0F,$806215FB,$2DC847DB,$9C004407
  1831.         dc.l    $9337943C,$09200A60,$0D000B90,$0ED00AAF,$07B0FF7E
  1832.         dc.l    $E33BCD9F,$C508B41F,$F3E5308F,$2387419F,$C35C0517
  1833.         dc.l    $E68B2BF7,$02042200,$605020C6,$6F6A400C,$02A49524
  1834.         dc.l    $BDC24052,$6F33B91B,$DE751F90,$BEDC02B3,$E504D51F
  1835.         dc.l    $F9300340,$08049048,$C4E9591E,$9D10101F,$1414A5C2
  1836.         dc.l    $4402CCCF,$19FE03E0,$833A85E9,$A0181FC6,$0FFB8D10
  1837.         dc.l    $C85766A0,$00131204,$60C00455,$1B7E0742,$01C380D4
  1838.         dc.l    $2204A129,$423C811C,$04FE66C7,$265EA842,$08C40409
  1839.         dc.l    $4FBA1BF8,$FB203640,$0EAF0203,$8C29903E,$1BF1BD80
  1840.         dc.l    $1642C010,$012104E8,$C42AC148,$4D17BE55,$E2527A10
  1841.         dc.l    $0361222A,$84008C8C,$CC131AE7,$23011024,$0A0012A6
  1842.         dc.l    $07024A58,$0C93479C,$B31A0501,$209FE301,$A96BC520
  1843.         dc.l    $B3A84AE1,$E2FC2713,$28203110,$683E1220,$4020496B
  1844.         dc.l    $0011FE1D,$19F60306,$C1410328,$40481692,$008000C4
  1845.         dc.l    $03C710D9,$7F8CD980,$04025804,$26080015,$1C2D8088
  1846.         dc.l    $FA283516,$FB250C12,$010BD230,$DA6B210D,$104882C2
  1847.         dc.l    $902EE519,$E477428B,$59839210,$3C888402,$440404E2
  1848.         dc.l    $1416FD5D,$89BC9000,$55832862,$EE5F9539,$B2F369F8
  1849.         dc.l    $43EF5015,$04393E42,$A163000E,$1140C0A9,$94C59F9C
  1850.         dc.l    $18028841,$FF8D026B,$000A121C,$691154A3,$D13B18E8
  1851.         dc.l    $9603A16F,$6B039EF4,$80625214,$D0D49E8C,$1800C51C
  1852.         dc.l    $849F9AF4,$442A261A,$3A8AA39A,$D1F5E315,$442A7C06
  1853.         dc.l    $D01545D5,$068F3CA9,$0B1714FF,$290E7C02,$1EBC6002
  1854.         dc.l    $2057906D,$9A31464C,$13FE6F35,$F19C7C31,$7C4E4517
  1855.         dc.l    $70E2864E,$15F1FF16,$2B24E189,$E80BC42F,$206B209F
  1856.         dc.l    $D6A23C08,$0F111443,$04FE1D06,$690488D4,$20B9373C
  1857.         dc.l    $17FC10C3,$04839E69,$7106643B,$9012FEC4,$16F80518
  1858.         dc.l    $A2130948,$1A23C822,$443DDC2C,$2716C652,$8A62CF2C
  1859.         dc.l    $74CC3768,$B6B0810E,$9315E237,$6771E1AB,$E08423F4
  1860.         dc.l    $823A08B0,$6977F387,$F2200FF8,$90BA412B,$7CA49FFC
  1861.         dc.l    $32A19CCB,$384C8A15,$FF007637,$846D74E8,$486921AC
  1862.         dc.l    $D6B78BFC,$EA3C16FB,$A218FEF6,$74E8C279,$47C3FE9A
  1863.         dc.l    $4BBCF83D,$1503E24C,$F584FE06,$D364274A,$515F8227
  1864.         dc.l    $F2C17915,$FC030EBB,$F9899FA6,$6F89001A,$DD14F19C
  1865.         dc.l    $01DE15E4,$053471F3,$0327CD8F,$2E021E69,$1E6E89E3
  1866.         dc.l    $EC13F8DF,$88D8520F,$7004A434,$4F0D527B,$9AB7640D
  1867.         dc.l    $F6181F0E,$820939EE,$BBE9EF60,$2AFA4498,$07010D18
  1868.         dc.l    $F66F8F0F,$3F03F125,$DCFD7E94,$94733E91,$9D9D1BF0
  1869.         dc.l    $FE504F90,$1413EFCA,$5C36FFC9,$3BB488C5,$B95EA9FB
  1870.         dc.l    $4C7C8715,$FCBDA05C,$D604A421,$43984EFD,$3F8EF5DC
  1871.         dc.l    $4F901418,$8C26D5CF,$9FC057B4,$8869F5FA,$FE9DE8FC
  1872.         dc.l    $4F261535,$BD845F3F,$0BE9DF3B,$16F46808,$770E851F
  1873.         dc.l    $7D04101E,$AC70A6BB,$FFC41FF4,$892F9FE4,$271D487C
  1874.         dc.l    $342615E4,$A35A3D3F,$1BA57945,$B53A7A4D,$8E94E413
  1875.         dc.l    $14E47E3B,$FFEB903F,$31387D2C,$FB834FEE,$11659F20
  1876.         dc.l    $147BDB2F,$D8D43F81,$45E968BF,$EBEFA3CB,$9DF90914
  1877.         dc.l    $F9BDB9FF,$6C5FED38,$77FD249E,$A00D80FF,$7A1F8814
  1878.         dc.l    $C96EFF57,$955FCF94,$4F798730,$EDE0046F,$9FF29F20
  1879.         dc.l    $14F2C5A3,$F27F2D8A,$479E9571,$C0039ED6,$BBC69578
  1880.         dc.l    $14FCD836,$4F7DE34E,$63E813DD,$8001E996,$B9E73EFA
  1881.         dc.l    $0910BF9C,$F20F6BBE,$59A77F03,$98012405,$F5F6DFF4
  1882.         dc.l    $2414FC5E,$EFF65B78,$9343999E,$01642101,$BFBDE717
  1883.         dc.l    $6114F1FB,$FEB40023,$7B732CFA,$49F17FBB,$464FE014
  1884.         dc.l    $F07FF7CA,$2B4CEDBF,$30A6E2FF,$7DFBDFC1,$13E101FA
  1885.         dc.l    $DEC70B87,$F14B278A,$605D2F67,$618713FF,$21CDE2E9
  1886.         dc.l    $F900E731,$8A3CBFCF,$C7E187F7,$AF4BFB7F,$7C1E1DF4
  1887.         dc.l    $073CF027,$FEBFF027,$14E0BFF7,$7BC7160E,$1FFBFD7E
  1888.         dc.l    $DF7D0FF8,$4F00FCBF,$7FBA070E,$1FFDA7FF,$9B8615FD
  1889.         dc.l    $F71F160E,$F81F1FE2,$4814FBFD,$A73C850E,$F9375FF1
  1890.         dc.l    $A11307BF,$7D2BEEA3,$1E10D0FD,$E717EC5F,$2EF73DF8
  1891.         dc.l    $AB13FC13,$70DFE236,$BB05FFBF,$BF13177F,$7E9370F7
  1892.         dc.l    $15FB3C15,$E9DF97FA,$52A17F7F,$B0FB1315,$E1EFFFEF
  1893.         dc.l    $77D1D007,$FBFE0918,$F85F6D74,$DF837027,$13FA8072
  1894.         dc.l    $BC77B13F,$1DC1EF53,$EA4F28F0,$016C7C24,$82BF463C
  1895.         dc.l    $25C12F97,$F109237E,$43183F1B,$C1F786FD,$091DBE30
  1896.         dc.l    $E226803F,$1EC10F2F,$4622FE04,$219F630F,$CC3F14C1
  1897.         dc.l    $F74085F1,$041A5F4C,$4CFC090E,$BEC313F2,$4F0EF0E9
  1898.         dc.l    $C5C49F6A,$E017C525,$E3092A7E,$9D98F813,$137CA530
  1899.         dc.l    $F1270EF8,$6E13CA3F,$31C15701,$E3276AF8,$0C883FE1
  1900.         dc.l    $96E82466,$DE3E14F9,$270EF8FF,$313E20C1,$97889D18
  1901.         dc.l    $9FC1271C,$F8F8F009,$5F313E16,$C1570523,$7F027F58
  1902.         dc.l    $7C3B4CFD,$091707FE,$AFE6271D,$F8580FF0,$37CD4F16
  1903.         dc.l    $F0F5C0C0,$E09FC80F,$4F04EF97,$15FC13C4,$C3144FF0
  1904.         dc.l    $39F11316,$FC0430F0,$27B8B74A,$15FE09EC,$1F5F323F
  1905.         dc.l    $1DC14723,$9E1EE007,$2DF02788,$7F44E05D,$15927F82
  1906.         dc.l    $78243C3F,$E1441B3F,$59811F2B,$2A129F00,$DE25993F
  1907.         dc.l    $34C14F51,$E04F004F,$C7C74F30,$E215F34F,$101F537C
  1908.         dc.l    $354E1CF0,$6313F813,$DC2FFE14,$F9279017,$2D268813
  1909.         dc.l    $1BFC9C04,$7E97F058,$CA3901BC,$249DFA13,$11FC383C
  1910.         dc.l    $415EE2BB,$3816C15F,$47E04F60,$5F3416E6,$E7277E02
  1911.         dc.l    $F0AB381C,$C4179C1C,$E00F134F,$1FF0118B,$4FE0E055
  1912.         dc.l    $430A7F0F,$FB17FB27,$7009E213,$1F7C0EE2,$13C8B3C0
  1913.         dc.l    $127F183E,$29FEAC29,$C06BCD30,$112A4A93,$F9BA39F0
  1914.         dc.l    $F47EEC4F,$203F47C4,$A03499B7,$849FE0FE,$5E4480D6
  1915.         dc.l    $6066119F,$40BE00F0,$27984785,$FC978065,$0BE60A2D
  1916.         dc.l    $F1A30EE7,$BF27F358,$F00980DC,$28B58C80,$F8D10EF3
  1917.         dc.l    $F9C1C867,$25FCBE2C,$4315FC8B,$E48F0F9E,$1F24667E
  1918.         dc.l    $84FC7822,$0324F23F,$7A0FFE6C,$9CF9159C,$37E3A149
  1919.         dc.l    $FC8F109E,$FF80CCFF,$E109EC7F,$F4D05720,$F015CAFC
  1920.         dc.l    $0992EC98,$D08CFC8F,$109E100F,$2AF903F0,$E460FEE8
  1921.         dc.l    $89B740E6,$7FF4C87F,$E999C724,$9EC0FE47,$10CF9F50
  1922.         dc.l    $E67FF41F,$7C31855E,$F1000219,$09F13F7A,$10BEF681
  1923.         dc.l    $8114FC1F,$3D1381FF,$4727DF0F,$4EE67FF4,$1FFCA765
  1924.         dc.l    $FE47FFCF,$57BA11F3,$7FF41CFC,$77D8FFE8,$1BF9EF0E
  1925.         dc.l    $F8409F92,$FFD111F3,$10330EB4,$8090FFA3,$071740BF
  1926.         dc.l    $3C0EF680,$1DDDC5FF,$E811F942,$34ED0EFE,$24329F8D
  1927.         dc.l    $0FE70110,$EB210EF8,$D58B3F7A,$14BE5734,$220F1F05
  1928.         dc.l    $F33F7A0F,$04BE9D0F,$08FE39E6,$3F7A11BE,$1D12A0BE
  1929.         dc.l    $F83AF91F,$3DF7A47B,$127EC101,$8FC8FFE8,$A90102D7
  1930.         dc.l    $0111FECF,$437C8DFC,$8F9EFA13,$13FC5743,$0F13F94F
  1931.         dc.l    $14F8ED13,$C847814C,$8DBC04EC,$1712F13D,$88E37715
  1932.         dc.l    $FE8F119E,$04BF8314,$FD44E347,$11CF7FBE,$430FCEC6
  1933.         dc.l    $FE4712CF,$FFBB330F,$ABE65E8E,$6803FB9B,$00C00915
  1934.         dc.l    $419F6302,$016880F1,$01D8458C,$831508FC,$1B670F3B
  1935.         dc.l    $882389E2,$44843510,$FF47CFFD,$0946F024,$8044184D
  1936.         dc.l    $177CB538,$E12610E0,$13F8471F,$CF4F85E3,$2720B089
  1937.         dc.l    $1BFE0077,$08423C04,$01431EDF,$80043F81,$10AAD261
  1938.         dc.l    $673E0A18,$10FF1414,$4E0860CF,$1FF70708,$01388021
  1939.         dc.l    $0E74F31A,$781B04FE,$8F27BE01,$FFA3FFEF,$0FE57EF9
  1940.         dc.l    $00FFF800,$CCF88937,$D6451BFE,$02EAC916,$911FBF8F
  1941.         dc.l    $024D46E6,$BE13E42A,$30FE8238,$43C42CF1,$DBB703F1
  1942.         dc.l    $94C0FC87,$7F7CDBDD,$649281C4,$F9FFCDB3,$4CFC0D9B
  1943.         dc.l    $A7DF7221,$62FF9FA7,$6B61FC4A,$0CFDE006,$26FBE69D
  1944.         dc.l    $9BEE2D7F,$82BB7453,$F06E26A6,$4329213D,$BFAD6F33
  1945.         dc.l    $B91B2E08,$7EBCF7EE,$EF73029C,$B7279A1A,$A82D6FFE
  1946.         dc.l    $FD932DE7,$864231F0,$F77ECDBB,$EFEC0D48,$FA5D6C1B
  1947.         dc.l    $BF763446,$54093C8D,$BFF7FB6F,$41446942,$8D816002
  1948.         dc.l    $EF6FDED2,$E2823F1F,$1E3044FF,$07689634,$EFEF3D28
  1949.         dc.l    $EB4A8589,$FDC820E0,$7181838C,$4FDCF967,$4FD39901
  1950.         dc.l    $BF01277C,$C59EA586,$F7E7BFDE,$0387F4F8,$870EDB6F
  1951.         dc.l    $449C21FF,$5FFFECED,$FB9F3F40,$991BDF01,$BDFE3C7F
  1952.         dc.l    $2BDDFB5E,$D6BD4FA0,$1CFBBFD9,$B189176A,$BDF73BFB
  1953.         dc.l    $029E19F8,$7D8931C9,$BF7845FD,$FC7381F4,$1B89EF15
  1954.         dc.l    $7FE90246,$EFFEDEFB,$27560946,$6A0EF2AD,$0E92ADAF
  1955.         dc.l    $C7EFFC9E,$DDD52CF7,$73733A01,$1ADCFEEF,$DBF5FFED
  1956.         dc.l    $59F8FDB5,$A7F36C7E,$0019EC2F,$3F980C8E,$FEA36B3A
  1957.         dc.l    $DF4C577F,$A08C19FF,$2BD7DFCE,$EF97C1ED,$DFBFDFB6
  1958.         dc.l    $94FFEE92,$9415FD6E,$F93EBEFC,$D7BFB7E9,$6D70E5BF
  1959.         dc.l    $3B468573,$1215FD26,$7FFBFDA7,$FB7CB6FF,$EAE3D231
  1960.         dc.l    $8FAB1015,$E54FC0F3,$EDFEF42D,$1A5E6FFF,$F2EFB77D
  1961.         dc.l    $3D6FD169,$10FCFC7F,$7E0D21BC,$5BBDC80F,$7C6DEFC3
  1962.         dc.l    $777BFDBB,$FBFBC4E9,$EACF5FED,$E8FFDFFB,$6767C262
  1963.         dc.l    $436000AA,$7CD79D11,$7BBFC64D,$0CCF7C02,$C2DDF716
  1964.         dc.l    $6E583E31,$CA7A773C,$8588FBC6,$E023369C,$FFF1EEBF
  1965.         dc.l    $3F566B3A,$9AE0D9F7,$F4FA4E28,$FE7FE58A,$87FD77BE
  1966.         dc.l    $FC89A305,$94E005ED,$E396EEAB,$5C0900D3,$F707EFF8
  1967.         dc.l    $FBCE08FC,$DF7B7F27,$8469FC5E,$27DBD0C0,$019DADEB
  1968.         dc.l    $2F2B9F94,$0E6B7E6F,$CC137A00,$9F7BF6F7,$103AE37B
  1969.         dc.l    $FA931F68,$8555D9E5,$C575F319,$43F7F7EF,$BAAF30F8
  1970.         dc.l    $3C63C4DE,$83E87FBB,$D52F8D6A,$1E0F2AF9,$70C3A506
  1971.         dc.l    $3C8FC704,$083AF48A,$EE88D4F1,$DF9F21E8,$3CA09CDF
  1972.         dc.l    $A86F9265,$8F0016C8,$9FE4F378,$270E8BC8,$BAE88F1D
  1973.         dc.l    $D02915FE,$09E5E9D4,$DBAED2A2,$8BC050DF,$94DF4695
  1974.         dc.l    $07627F42,$F312EEEB,$BCFBAF5E,$179D7A8D,$772BDF63
  1975.         dc.l    $60181F0F,$81C177FE,$DDBF664B,$EDE83CFB,$7C27A23E
  1976.         dc.l    $4F799BC4,$6FE4E497,$0EDB3770,$89A06E9D,$354EC58B
  1977.         dc.l    $BC2FA9E7,$5DEC9FA2,$25455DBB,$C223D3E4,$03D39A77
  1978.         dc.l    $DF011EED,$37EFFFF5,$7EDDBBC0,$49AD759D,$9B6C692C
  1979.         dc.l    $BA081749,$4F7E0C93,$A2BB3F0C,$1EE0F7EE,$7CFF6649
  1980.         dc.l    $6B988E1E,$5482F3B0,$E82257F7,$4F96E7F0,$89D1374F
  1981.         dc.l    $04FFB7CE,$FDFB7EED,$9FDA6F45,$BED45502,$D227EAE7
  1982.         dc.l    $5E63341C,$2643FBF7,$DFC714FE,$2718F1F2,$4089137A
  1983.         dc.l    $4B5B89C8,$FE4F442B,$C15E5329,$48749F4C,$82071FA3
  1984.         dc.l    $ACC3FFFE,$045DE7F7,$FB27D42B,$A2993C01,$65B4DFC1
  1985.         dc.l    $D22712F8,$1DB30A7B,$2F7ED14F,$35AEA07D,$D860E81C
  1986.         dc.l    $EFAFD5CC,$F1440676,$7F92473E,$916522EB,$0E63F9FE
  1987.         dc.l    $A38F10E0,$FACB8E0C,$FC3F99BE,$50E196E1,$91762FFC
  1988.         dc.l    $1D15F927,$ADF08FF9,$484B9FC8,$F2AD8465,$486F2714
  1989.         dc.l    $C8F6C611,$44167FCB,$E9613067,$F8FEF2E7,$DECAD312
  1990.         dc.l    $13DA2302,$81FC334A,$0C8BC862,$62E40F01,$AF2714C8
  1991.         dc.l    $EC1035A3,$C9FF6444,$5A443A46,$A15604B3,$BE431542
  1992.         dc.l    $5FA3297E,$02D25EC7,$B102C071,$0A23F209,$14F2E773
  1993.         dc.l    $D92A6BCD,$458741E3,$960A0501,$62172714,$C8F8CA42
  1994.         dc.l    $7BA07F67,$415A8D01,$E90B97F7,$882B79A2,$14FCE153
  1995.         dc.l    $8F59882B,$3A1001D0,$601BD8E2,$B7F18914,$F2801B5C
  1996.         dc.l    $A5C283E5,$E84F4AC5,$85B2716B,$F00914F2,$81C40014
  1997.         dc.l    $6F9F9847,$8EDE7CB0,$11EE9AFC,$C414F884,$24D0272B
  1998.         dc.l    $3F4D3AF3,$6214105C,$3462FE64,$14FC4246,$0093A0C7
  1999.         dc.l    $A695E061,$5C027F00,$853E740E,$F2670091,$00A86AA0
  2000.         dc.l    $1E279E06,$D6600112,$10039060,$0D9E2814,$0D3A5C0D
  2001.         dc.l    $7F2D8A38,$3E672E61,$29441E40,$13F8FF27,$858F3082
  2002.         dc.l    $48411C8B,$C8229E16,$69840008,$12BF5340,$630C1094
  2003.         dc.l    $CC1B5DB9,$D838C60A,$0920313F,$87F77168,$44FEA110
  2004.         dc.l    $AC69D496,$58928E2F,$404218E1,$89E85534,$F2022885
  2005.         dc.l    $7F04014A,$001C6302,$D4D35FE7,$E444B92D,$CFA0FC59
  2006.         dc.l    $C4184BEF,$B7FE8008,$3470EE32,$097F7666,$82047B1E
  2007.         dc.l    $41E8FE1E,$4C34E207,$E0FA0521,$0F84F1B4,$71E7E4A2
  2008.         dc.l    $D0BFBB1D,$2A8A8802,$AFC0AF41,$BAFEFC40,$32F35316
  2009.         dc.l    $E325E3C8,$0B40309F,$0FFBDB94,$0049840F,$F188F181
  2010.         dc.l    $C4BE9480,$A4813A16,$0F01401B,$FFF5E77F,$50DF5881
  2011.         dc.l    $EFDFDEFD,$77035AEF,$51F44008,$23F55134,$E404125F
  2012.         dc.l    $FDFDBFBD,$EBBF5E34,$BFD77B31,$F7EF95FF,$D6EDEC02
  2013.         dc.l    $03C0F21A,$A30F065C,$171F914E,$EDCBF7BF,$FB18ACAC
  2014.         dc.l    $E880C0BF,$FC18B82D,$87100C04,$E01FBF40,$FEFFB62A
  2015.         dc.l    $650EF1F9,$DD845477,$BC023942,$102D1028,$A01AFF9E
  2016.         dc.l    $FFEFBD7E,$813F8CE7,$BF954F23,$BEFC9FF8,$40050830
  2017.         dc.l    $26930F01,$10257FFF,$C2F68A94,$3CC32BDD,$FDE31267
  2018.         dc.l    $E2FFB4A6,$89400AD0,$39217320,$023BFF6F,$50DFF700
  2019.         dc.l    $846258EE,$9F3BC527,$D5F7B820,$50402A55,$A6CB0208
  2020.         dc.l    $500FC534,$FB87FEF7,$B0D932E8,$9F81DDFF,$B7FD7880
  2021.         dc.l    $5C049025,$640FF007,$29BDFEEE,$BFFEDD6C,$BFBFAEDB
  2022.         dc.l    $9FBBE37B,$7DEBEEF8,$08202010,$578F0F80,$0E888049
  2023.         dc.l    $9DDFFFCF,$F7F9DAED,$FFABFABC,$7E77B782,$FBFDE840
  2024.         dc.l    $A010D6A0,$560FBF0F,$0DFFFDDE,$7BFAEFEB,$77EDDF6E
  2025.         dc.l    $FDF6CFFF,$EAFFFFF8,$43AF3646,$C6976AEE,$8EF3DDAF
  2026.         dc.l    $FB05E97F,$7F739E8D,$6FDADEB9,$BF797805,$EB238A88
  2027.         dc.l    $EE7C86F6,$BB533F7F,$FB79BEE3,$5FFFC9EF,$DDF2EF7E
  2028.         dc.l    $DAF4D6FF,$FE242021,$8407403F,$C9C7461E,$33A2198D
  2029.         dc.l    $7F9F65A6,$FDFF3DEF,$3C7FCD4F,$933FF72B,$EF4DAC30
  2030.         dc.l    $A0812010,$8F784F00,$768031F3,$8B0F7EDB,$94B75BF5
  2031.         dc.l    $C4EF2BFE,$F1AE5FD9,$5FECE7FB,$FC410B21,$E141FF56
  2032.         dc.l    $E38CA82F,$6DF3AFF7,$A7DF153E,$EFAE1F3B,$FDDCBF17
  2033.         dc.l    $4D3FA1A2,$408F2142,$3DC31801,$D81C2104,$89F82FFD
  2034.         dc.l    $E5F8CDF6,$BDF4BB5C,$72BD5BFF,$861B34F8,$02410058
  2035.         dc.l    $A4559E20,$BC005C05,$10205B36,$D5707686,$6EE8DEC5
  2036.         dc.l    $264BD5AF,$07FBDBFD,$7CF97044,$01802408,$CF755E00
  2037.         dc.l    $AE8110A5,$056CFF7F,$EAE47FEB,$BBFD73DA,$F49EEE3D
  2038.         dc.l    $7D7BB7F8,$92B0054F,$8F210004,$1B160C01,$5532C02A
  2039.         dc.l    $808DFAFC,$7DA9225B,$B72F87FF,$E675EFA6,$CE8DDF7F
  2040.         dc.l    $C1CD5499,$142216BA,$1CDA0178,$7EB42010,$14BE8F6B
  2041.         dc.l    $5DEC736E,$FFE4BECD,$B2BDC03E,$7FD4563C,$81283528
  2042.         dc.l    $05F4F185,$E59382EA,$1250B834,$7A300120,$612F8327
  2043.         dc.l    $F6FDB5BB,$776F7FA3,$F2CF383F,$CFE3B980,$80009C24
  2044.         dc.l    $34C00002,$91C9B614,$E81CA80A,$08421482,$3FD6560A
  2045.         dc.l    $DE4C8DD5,$C58D98BF,$7C2AF5C7,$95034E28,$4115742E
  2046.         dc.l    $3DCB0666,$0FE75550,$6001ECEC,$6F9DB49A,$E687ADB7
  2047.         dc.l    $6C326EE2,$DDD03B7F,$F2220083,$3A452028,$01C87387
  2048.         dc.l    $612E04A2,$DFF1A140,$975E3462,$E7D64174,$69A3BFB3
  2049.         dc.l    $BD800F9E,$63BE01B4,$8FFD26F4,$05260000,$0AD12CCA
  2050.         dc.l    $7B31ED0A,$EF801AB2,$832ABEE9,$15E1CA6A,$B42ABADD
  2051.         dc.l    $BAF38ED0,$B3201AF6,$2E9E0188,$228A8000,$06C24A00
  2052.         dc.l    $0014D8A4,$10400C88,$1A96DE6E,$DB4E7C93,$0A6409D9
  2053.         dc.l    $EAD48044,$77AA5466,$C610A24D,$9D084000,$005B7700
  2054.         dc.l    $00693050,$02863093,$A5999375,$5418C541,$CACEF105
  2055.         dc.l    $BF1F6132,$DCCFB769,$28814001,$8085E000,$0049D7AD
  2056.         dc.l    $288E5001,$C580B07C,$B0E6F78C,$16190481,$D3B8A191
  2057.         dc.l    $128BDB39,$81213C80,$716B055D,$06C86A23,$2385089C
  2058.         dc.l    $85BD364C,$0B1DFBC5,$6745AFBA,$7B674F78,$54F076FD
  2059.         dc.l    $74733223,$1300A377,$0C9450A0,$000B9937,$00002C19
  2060.         dc.l    $70430E2B,$45266474,$61C32C26,$44EB8C37,$713313F0
  2061.         dc.l    $55A4069C,$6908241C,$B9BA58A0,$00060591,$000046A5
  2062.         dc.l    $413991B5,$13A8AA8D,$A3D1C31E,$79514829,$3340B874
  2063.         dc.l    $498D0404,$00418A1B,$08920400,$00206C2E,$000035C4
  2064.         dc.l    $DF30D251,$8612DE29,$040083F0,$884A5A46,$4C139D80
  2065.         dc.l    $BA2C0862,$050080E2,$01758040,$0019149D,$0001A25F
  2066.         dc.l    $7C8D6089,$81E4A3B5,$87C19101,$603ED65B,$CB0C7D8B
  2067.         dc.l    $0B3004CD,$D7F224D6,$2F9CF300,$00004D2F,$00010591
  2068.         dc.l    $C69DBB5F,$B8524788,$01586801,$CA223324,$0105D555
  2069.         dc.l    $804D0290,$7A56F890,$5C10BC00,$0016CA86,$0001D180
  2070.         dc.l    $00E0A238,$5C2822A9,$10004C80,$8C2F6500,$B25FC748
  2071.         dc.l    $A2724180,$3B5C45C8,$459DFFA0,$00405ACA,$00013000
  2072.         dc.l    $00196D69,$CC6592C8,$8B7618CA,$69480106,$A8CB8EA5
  2073.         dc.l    $8A562444,$A79A2003,$D3034CE0,$0002F646,$00015180
  2074.         dc.l    $00018478,$7D810A68,$99281D03,$60279684,$92810059
  2075.         dc.l    $C1801CBA,$10E0215D,$F15918E0,$002E3610,$00018400
  2076.         dc.l    $00057FD1,$981A662A,$50923188,$6280B2F0,$02080A0A
  2077.         dc.l    $45C0711D,$23F753F0,$FCD1C3C0,$0031CCDA,$0002D800
  2078.         dc.l    $0001CF06,$21128024,$3A100401,$C20059E1,$80425729
  2079.         dc.l    $80008212,$85934F28,$F64E3480,$006A8174,$000B3400
  2080.         dc.l    $0000F43B,$0C510000,$281C1001,$61001054,$208A1042
  2081.         dc.l    $9C4606DB,$203655AC,$E8A38580,$00F3919C,$0004D800
  2082.         dc.l    $0000C7AB,$D5D88802,$0A068006,$148A0224,$4992C080
  2083.         dc.l    $4A011840,$4C0057D8,$D2A63840,$015FB6FE,$000F4000
  2084.         dc.l    $0000F57B,$3CBA2808,$80011811,$0414C985,$04111140
  2085.         dc.l    $1042020E,$22C97008,$B8E72140,$00A7E49E,$0008B000
  2086.         dc.l    $00000750,$A500080C,$0842A00A,$2C081092,$0004901E
  2087.         dc.l    $0400960A,$2053371A,$E37626C0,$0152F06E,$0017A000
  2088.         dc.l    $00006B52,$F4200C29,$04140288,$0002008A,$48820025
  2089.         dc.l    $984020F8,$011DD3EE,$67F4BE40,$039DB598,$BAD59F09
  2090.         dc.l    $C332E815,$4030BB90,$D6D68040,$2ACC4C30,$145D46C1
  2091.         dc.l    $02011067,$A49E77C8,$FBC001E3,$5D74001B,$B73C366D
  2092.         dc.l    $9D00A828,$60EC3E56,$758C2F02,$0C264392,$1300048C
  2093.         dc.l    $8997D3ED,$1746C007,$FB114200,$1E9E0C02,$F3D84004
  2094.         dc.l    $88000E08,$9BA3D00A,$90140176,$D29B9584,$0F51F56F
  2095.         dc.l    $ADEC800F,$BD9F6E00,$6A6B0D12,$F5F64F64,$1441DA9E
  2096.         dc.l    $0832B335,$80603074,$81402002,$716BF589,$F3800DC4
  2097.         dc.l    $5F93C863,$762C66B0,$5F210174,$6D404241,$242E926A
  2098.         dc.l    $60330658,$4003A522,$B02D9800,$05DBCA69,$231DEC4E
  2099.         dc.l    $07D27208,$41568C8F,$2402FE08,$88114002,$BAA70443
  2100.         dc.l    $E3F18FE6,$DC8007EF,$FFD8004F,$4E1019FD,$8009B64A
  2101.         dc.l    $A9C380B8,$95A10442,$80A30C8E,$3EDF5DCD,$F5330011
  2102.         dc.l    $F6FBB800,$2F893B82,$0C6C504D,$FC6405DB,$C4CD8E80
  2103.         dc.l    $713622F8,$673EFF3D,$69801BDB,$75E80097,$E7249FBA
  2104.         dc.l    $93D18202,$40A0043D,$223AC210,$2001EFC0,$D1EEF9FF
  2105.         dc.l    $6D588013,$36FF0F67,$8E55728A,$C0810244,$C84D1C84
  2106.         dc.l    $074DEA66,$F79F8E8D,$65BE3B8D,$50027851,$0F743B76
  2107.         dc.l    $EE3312E6,$4DED5C5F,$AD007EAF,$67700184,$60178C37
  2108.         dc.l    $9F950383,$1677E3A8,$7E6F5FDE,$FBCB1003,$3BA08B80
  2109.         dc.l    $2D5B9A98,$06173EBB,$EFE60071,$7FFDC003,$FCFF89C0
  2110.         dc.l    $54DE3E01,$163BD7FB,$EE3E00ED,$DFE9C005,$F77E5282
  2111.         dc.l    $57D67D02,$16FC1C6E,$7757DA93,$5FFEA70B,$C7EC12F9
  2112.         dc.l    $5A44A634,$14F3AFAE,$CFFE01D7,$39C00919,$782590BF
  2113.         dc.l    $86A9836F,$0112F37C,$E7FDF200,$FEFD3BC0,$0FABD719
  2114.         dc.l    $017E58F6,$4416F806,$BFEBDFFC,$01E3F67F,$800EE7A5
  2115.         dc.l    $6CAEBA17,$03FCF7BF,$BC02EBEF,$FD93CCD4,$E788C9B3
  2116.         dc.l    $366E1213,$E677BFF7,$E807BF84,$D88037FE,$5EB55207
  2117.         dc.l    $DF6608CA,$1F810FF9,$017DFBEC,$FC07FDDD,$4F806FFE
  2118.         dc.l    $DFF00075,$55E9CEDF,$10E1FA7E,$EF9FFF52,$2800F729
  2119.         dc.l    $46BC635E,$8F0F26FF,$1010E66F,$1F38FC0F,$1E8400E4
  2120.         dc.l    $EE36DC43,$47803CDE,$1B78E833,$F52BF81F,$3F6F9F03
  2121.         dc.l    $FD3C8C15,$DB49C341,$FA13101D,$7C792FE6,$83FE0313
  2122.         dc.l    $4005865F,$F820F327,$10F807FD,$F83EFBBE,$BE8093EF
  2123.         dc.l    $FBBFBF7A,$42948FC2,$030F92D4,$0E3F5FE5,$534220F0
  2124.         dc.l    $F716983C,$061C7862,$3DF558FB,$F0F3F7FB,$DEC609D2
  2125.         dc.l    $E72DB010,$F91310FD,$B0F0A227,$BEFA6E44,$401E4BF2
  2126.         dc.l    $81C9FC00,$F1283FBF,$FFEFFFDF,$B20592F3,$80089202
  2127.         dc.l    $C7C0ECD3,$EDC85B20,$F30140D1,$40796B65,$FED116CC
  2128.         dc.l    $3F12C1FF,$3116F39F,$12F0DFCB,$1642FC5C,$6CFE04F2
  2129.         dc.l    $9F6516FE,$09EA9FCA,$1DFC13D4,$E322F2FF,$6415FEC1
  2130.         dc.l    $4204DFAA,$C9BF9215,$F995A014,$EFCDE4BF,$C8147C04
  2131.         dc.l    $A508FE5D,$F20F6410,$BE4710F2,$A913F9DF,$3110BF3A
  2132.         dc.l    $12F93664,$11BE2715,$40FE89E4,$3FC60FFC,$1319FC67
  2133.         dc.l    $310FFF09,$19FF4F0F,$CC1710C1,$BF49E833,$C71FFC2F
  2134.         dc.l    $CC7F871A,$F92C0EC8,$7F0C28F3,$7FC228FC,$773029FF
  2135.         dc.l    $1328CC7F,$0229F357,$32937F18,$877F1F81,$6F08FA33
  2136.         dc.l    $0F7C263B,$F40E0EF8,$880F0EFA,$427718FA,$110F0EFA
  2137.         dc.l    $A02719FA,$0F0EF827,$18F8C7C4,$27C89F00,$04FE5E19
  2138.         dc.l    $FF04F14B,$69E0204B,$E7391414,$80FE89EE,$79E9D07B
  2139.         dc.l    $0FE00800,$8FA4C178,$02C02B1A,$E140EFA3,$83203F11
  2140.         dc.l    $FCB821F2,$C1E20426,$109F41CF,$2523F880,$2728FA80
  2141.         dc.l    $4E25FA01,$00812726,$C2402FA7,$AE1E00FF,$1F00FF1F
  2142.         dc.l    $00735FAF,$98301BF9,$030EC907,$22C06F07,$FC601BF2
  2143.         dc.l    $B90E912F,$8E1B7C82,$E45E211B,$F92CC9BD,$4C13F259
  2144.         dc.l    $87A868CE,$20F2690E,$C83C1F18,$04348B7F,$72871F7C
  2145.         dc.l    $01C33C31,$C27B625E,$30813C3F,$701807C7,$D884DBB1
  2146.         dc.l    $C7CFB17E,$FE15C69C,$0FFC4804,$383ECCFE,$6BEC3A91
  2147.         dc.l    $8B9F873F,$72429B4F,$F25A843E,$17813926,$0D98E62C
  2148.         dc.l    $3F41ABFA,$49B06201,$DBA2A008,$8F0F8C33,$32FDB8E6
  2149.         dc.l    $277F87F4,$13C3C7B3,$4E9830A9,$1B0FC11F,$8E373ECD
  2150.         dc.l    $98E760F8,$09D2FB81,$C1C39F76,$01F3D9D7,$A61BA3FE
  2151.         dc.l    $023F1CFC,$F8E76CC6,$0C183E89,$273D2CDC,$1DF5F0A0
  2152.         dc.l    $0F6F12D3,$B740EC01,$1BF02D90,$7B0C19E4,$73BDA9D7
  2153.         dc.l    $5919BE05,$13F23119,$906F810F,$7CED15E5,$B7B90EF9
  2154.         dc.l    $02601A3E,$D70F9B2F,$0519E673,$BD0FF97A,$60193ED7
  2155.         dc.l    $0F9B2FF4,$11E6B729,$121F3A4E,$FD09187E,$9B9BF928
  2156.         dc.l    $3713BFCD,$15CD8F72,$13F3DFE1,$001A821F,$850FF3D1
  2157.         dc.l    $10F86710,$FC27C03F,$70DC0C43,$F8F93B78,$F56888CC
  2158.         dc.l    $1F8BFE3B,$66848605,$E593E4B8,$211CFA03,$DC73166E
  2159.         dc.l    $584E8CF3,$7C359B3C,$0111160E,$7D02D873,$F0671FFC
  2160.         dc.l    $64840E3F,$64C5105C,$3D56E0D8,$AB8B8781,$C07307E3
  2161.         dc.l    $98A18CF0,$0CC72740,$780730F1,$20C0A46B,$F11AE073
  2162.         dc.l    $3669D9F0,$89110F87,$3876FE84,$68AF848E,$69E04FE0
  2163.         dc.l    $71F7EFCF,$60981D0E,$BF0C7C8B,$C433AA81,$074715BE
  2164.         dc.l    $41027F82,$784635F0,$0815C977,$49E04F20,$2F83384C
  2165.         dc.l    $72037007,$8F6F9522,$FD0912FE,$8F718771,$CEF8137E
  2166.         dc.l    $F92229D4,$A5F804F7,$3089DBF0,$9B8B41F8,$87EEDD9F
  2167.         dc.l    $66FD60EA,$F40416DB,$31C7FF49,$08F26E1C,$15067F62
  2168.         dc.l    $DAAAF804,$F7588988,$3F4C86E2,$03332F1E,$117EC52A
  2169.         dc.l    $5E65804F,$0EF00FAB,$F1E01360,$B3EEFC09,$669D1BE8
  2170.         dc.l    $31C39F00,$03B1CE1C,$1B7EEDD8,$9D9A09DF,$003F9F68
  2171.         dc.l    $3E03FBF1,$C106110E,$FE133815,$FC041E9F,$13F11378
  2172.         dc.l    $3432FFAF,$0EFC132F,$7C5C347E,$82F94064,$FE04391F
  2173.         dc.l    $2E8D9F0E,$E0BF2A0E,$FF042F3F,$FC8C9FC0,$EBD9CC9F
  2174.         dc.l    $A9B93F58,$C1C73BE3,$04F0091C,$0E787F34,$0FFF042E
  2175.         dc.l    $1FE08C9F,$0EE09F27,$0EFF0457,$5FB18C9F,$80FE2E11
  2176.         dc.l    $CD3F17C1,$FC4FC3F3,$09193E33,$7C02F078,$C03C9F16
  2177.         dc.l    $E0DF27F1,$2780C037,$C0E8450E,$F04FB0C2,$3881C7A0
  2178.         dc.l    $00B9C63F,$0F9A8F80,$863EDFC7,$A7F0094C,$6C9C407E
  2179.         dc.l    $00998F43,$23E213BC,$15279001,$1F0500C7,$27706F22
  2180.         dc.l    $2F80AD81,$F0893F7C,$0FA26F0B,$F9B38831,$96E01048
  2181.         dc.l    $019E7703,$747D9E4F,$20CF6963,$0401B864,$F3FE18F8
  2182.         dc.l    $AB22089A,$F913C87F,$9B44A523,$51440878,$050E5068
  2183.         dc.l    $0149BAF3,$09E0A1CE,$C8371B9D,$04247301,$92080738
  2184.         dc.l    $810F2443,$6F8E5323,$85049EC7,$8C1F7C25,$E4000A18
  2185.         dc.l    $41205581,$10202102,$03DA10D2,$A8C93ABE,$CD0F001B
  2186.         dc.l    $FFEFE002,$02404214,$FCB98240,$287D3108,$106A0029
  2187.         dc.l    $1213FDFF,$7FFA36A3,$F7478787,$E881C809,$12340840
  2188.         dc.l    $04839515,$1D101840,$03E7DFE6,$0FF0DF1B,$96E04641
  2189.         dc.l    $010049A6,$98430E06,$37219588,$43FFC770,$2F8B0F07
  2190.         dc.l    $D7FFE500,$61001042,$5F30FB18,$40C24F23,$BE036048
  2191.         dc.l    $8AFBF740,$81F705FE,$FFFAC039,$07099150,$9EE11522
  2192.         dc.l    $021C8998,$1D004F74,$53BFEF79,$96C106DF,$FDF4007B
  2193.         dc.l    $C3200802,$2014C32A,$1160C43E,$2A0847DF,$BFBFF5C9
  2194.         dc.l    $BD5CDEF7,$703A81E1,$30010803,$310E603D,$22004802
  2195.         dc.l    $87FF10AF,$EF300B73,$0FFCD642,$01114001,$22934040
  2196.         dc.l    $51246044,$1C848214,$113F422D,$82E163E6,$07F7FFF6
  2197.         dc.l    $62200030,$08062512,$1EAE6243,$8188487D,$040217BF
  2198.         dc.l    $5FD11E6C,$5D19077B,$4BF23E21,$84051014,$88122091
  2199.         dc.l    $02093000,$159D08B2,$C332EE2C,$7307EFFF,$F10C2250
  2200.         dc.l    $042F9016,$80808C61,$72902521,$46408687,$71F27577
  2201.         dc.l    $9E58CF72,$689F4880,$0486411C,$A0003610,$220D1081
  2202.         dc.l    $250B2900,$01DBDFDE,$7BF8BFF9,$6C2F1F00,$D7075DE6
  2203.         dc.l    $7280609A,$590200C2,$10C38032,$B06CC008,$D410B253
  2204.         dc.l    $CF5F7EDF,$EF7F3BC6,$934D820B,$FF74F081,$246B48A4
  2205.         dc.l    $0A3B10D4,$010E51A0,$26A01318,$0403BEF4,$DE1EFFBB
  2206.         dc.l    $F8130BC0,$F51FDF57,$D0920C50,$085820EA,$C11051E0
  2207.         dc.l    $C4022340,$E8B2C05E,$5DBF70DE,$BDEF2716,$80EB23DE
  2208.         dc.l    $FB7607D0,$021A0732,$09420B44,$A38D42A4,$0079E4CB
  2209.         dc.l    $07FDBEFF,$A75BAAB9,$C80BC0F5,$1DDFA4C9,$2A8F8979
  2210.         dc.l    $9117213A,$D9B42A50,$F8042402,$83068FBB,$FE7FDBF7
  2211.         dc.l    $C7173901,$B87EEF5A,$FA930080,$151B8014,$44028C25
  2212.         dc.l    $0B6111C2,$82844807,$6D4FFA3E,$CDE19E03,$A04FCE02
  2213.         dc.l    $AACD3FD5,$7F720503,$8256DDA4,$48D07800,$198A1059
  2214.         dc.l    $31722080,$3E32AB66,$EBDDE9C0,$000671EB,$CC03DF1E
  2215.         dc.l    $6DDFEFEB,$417094A2,$138C9100,$1B41324D,$423FC180
  2216.         dc.l    $2BA9C37E,$D7CAD7FA,$0BC00002,$6C7CE850,$DFAF47CB
  2217.         dc.l    $3D98FEDF,$9ED07CD8,$09024A44,$8890805C,$0D30C7C0
  2218.         dc.l    $301C467F,$7FFF63DB,$CB000005,$6ECE46DE,$17E357F5
  2219.         dc.l    $F7BDEB7D,$C029A9F5,$21B3722A,$3A726740,$83D50A38
  2220.         dc.l    $6AFCB1D7,$BEEA8BDC,$C0000FF9,$EE892FFF,$F7BFAF9F
  2221.         dc.l    $FE131390,$624B6519,$78524893,$CD911D22,$2FC4800D
  2222.         dc.l    $DDFF7CC5,$BADFD7C0,$0008DE77,$5AB311FB,$5D200E5E
  2223.         dc.l    $BF68A1CB,$9D1829BE,$8B965C40,$4C427FF0,$619C41FE
  2224.         dc.l    $4B7002D9,$0BFAD9C0,$00052E3F,$00004E12,$F5107FE5
  2225.         dc.l    $4D7CD541,$16EA1E35,$954BD545,$22450C71,$2F4CDFE5
  2226.         dc.l    $09D161FE,$77DD7540,$00093DB5,$00006B27,$5BEFBFF3
  2227.         dc.l    $77E56921,$9124B183,$6CF59BF6,$26152B7F,$BB8855AB
  2228.         dc.l    $9939EF5D,$B262F780,$000FA488,$000016CF,$AFFD79CF
  2229.         dc.l    $6C5A666C,$8AABE73A,$BE35310E,$FA40E09E,$CD233048
  2230.         dc.l    $96D77EBF,$FE7F7A00,$001FB6FF,$000032D7,$71AFFE3A
  2231.         dc.l    $7F4F834F,$198CCDE9,$E6FB7E2C,$475E6EED,$7424C67E
  2232.         dc.l    $DEC37F8E,$94FAA2E0,$000DDCDC,$0000FF63,$7AEFFBB3
  2233.         dc.l    $F4E2043A,$98BA5045,$8498B087,$AB0F8902,$8B8CCDDC
  2234.         dc.l    $ECFF5C88,$F36BAF40,$001466C8,$0000D3E6,$8FBCF1D4
  2235.         dc.l    $BAD99B8B,$9E3CD3D9,$BB1473C8,$8ECCEC0F,$AA5BF963
  2236.         dc.l    $96F7DBE3,$4645A740,$0019FA6E,$0000B95A,$BEC66E4A
  2237.         dc.l    $EC575572,$5C2E3CE1,$86AEB7D6,$CCBF478B,$B672FBFB
  2238.         dc.l    $FFBE75E4,$F76DFBE0,$001F93D1,$0001CA3B,$20CF2DAE
  2239.         dc.l    $79ED21D6,$FBFF7C0F,$77B5A5B9,$B3EC627F,$45D3F79D
  2240.         dc.l    $FAFF7F1D,$FE8A7FA0,$0026EB62,$00005DA0,$83729F76
  2241.         dc.l    $7E1B5C4A,$783E6EFE,$9FC129A4,$34F38274,$F4CFFB32
  2242.         dc.l    $280DDB29,$D0630CE0,$003FB2D0,$0000FA6E,$396244A0
  2243.         dc.l    $47ADB877,$FEA797FE,$35DDCCDB,$FEFA2AAA,$7FB2FD6F
  2244.         dc.l    $85A9076F,$A3EF43E0,$00693579,$00022E7C,$011F5DC7
  2245.         dc.l    $A3D7DD56,$EFFFB37F,$73D09AFF,$4DA038B7,$5D8DBE7F
  2246.         dc.l    $C4A3BA37,$BA620040,$003FA535,$0002CFF0,$00669296
  2247.         dc.l    $339A6D37,$7489E735,$96B7FEF9,$5734715A,$75A9DBBB
  2248.         dc.l    $5865DFFC,$2CFCB300,$007D09B8,$0006AE40,$001E7B87
  2249.         dc.l    $827EF597,$66D7E2FC,$9FD8697B,$6D7EFFA6,$3E7FE345
  2250.         dc.l    $EF1FDEA2,$0EA6E700,$00D1C9EE,$00067B00,$0002802E
  2251.         dc.l    $67E599D5,$AF6DCE77,$9D7F4D0F,$FDF7F5F5,$BA3F8EE2
  2252.         dc.l    $DC08AC0F,$032E3C20,$00CE3324,$00052600,$000230F9
  2253.         dc.l    $DEED7FDB,$C5EFFBFE,$3DFFA61E,$7FBDA8D6,$7FFF7DED
  2254.         dc.l    $7A6CB0D7,$09B1CB60,$00957E8A,$0004C800,$00010BC4
  2255.         dc.l    $F3AEFFFF,$D7E3EFFE,$9EFFEFAB,$DF75EFBD,$63B9F924
  2256.         dc.l    $DFC9AA53,$175C7A60,$010C6E62,$000B2000,$00003854
  2257.         dc.l    $2A2777FD,$F5F97FF9,$EB75FDDB,$B66D3F7F,$B5FEE7BF
  2258.         dc.l    $B3FFA827,$2D59C780,$00A04900,$0010B800,$00000A84
  2259.         dc.l    $C345D7F7,$7FFEE7EE,$FBEB367A,$FBEEEEBF,$EFBDFDF1
  2260.         dc.l    $DD368FF7,$4718DE80,$03581B60,$00174000,$000078AF
  2261.         dc.l    $5AFFF7F3,$F7BD5FF5,$D3F7EF6D,$FFFB6FE1,$FBFF69F5
  2262.         dc.l    $DFACC8E5,$1C89D900,$02AD0F90,$00085000,$000014AD
  2263.         dc.l    $0BDFF3D6,$FBEBFD77,$FFFDFF75,$B77DFFDA,$67BFDF07
  2264.         dc.l    $FEE22C11,$980B4180,$00624A66,$002A2000,$00000D17
  2265.         dc.l    $EABFCFBF,$F76FFFEF,$7FBFD5FF,$F7CFEBFF,$F93EFDFE
  2266.         dc.l    $EF985B61,$88370400,$061CA28A,$00244000,$00000992
  2267.         dc.l    $62FF57D7,$9FFFDDFF,$FFDDBFF7,$FDF3D97F,$FFECFFBD
  2268.         dc.l    $7F76682C,$12E8B900,$0004EEBC,$00214000,$00001D0C
  2269.         dc.l    $27BFFB77,$FFF1F764,$5C2FF56F,$EBFEF7FD,$FFDFFFFF
  2270.         dc.l    $FFF0AE0A,$90521340,$00426090,$0015C000,$00000D0A
  2271.         dc.l    $7FFBF7FF,$BEFBEFFF,$F7CDDFFB,$FFFF7F9F,$CFEFDFBF
  2272.         dc.l    $DFFD8E94,$0A760C00,$023BA064,$001C8F59,$0F994FFB
  2273.         dc.l    $0AA1FE6B,$BFBDBEDB,$03526D03,$CCF9C312,$BFFC5A81
  2274.         dc.l    $4DD26780,$0A2435EC,$006277AE,$182D8DF7,$BE973855
  2275.         dc.l    $DBFDA11C,$77EEBFFD,$744FFBBC,$1C0E7019,$23000845
  2276.         dc.l    $9C891A94,$C719027F,$F6B12ADF,$B1C82DFE,$10BD7FEF
  2277.         dc.l    $4C54F424,$20A2320A,$CC800E09,$A0D8D06A,$271393AF
  2278.         dc.l    $FFD75B99,$B689FE7F,$FDE23305,$DDFDD9C1,$00C296D9
  2279.         dc.l    $B2248A8A,$3668BA93,$16406B8D,$5AFDBF5F,$FB6888A5
  2280.         dc.l    $FD0DEFDF,$FEBF1191,$11060092,$A7002CC9,$004A9C71
  2281.         dc.l    $DDC91438,$3F88FDBB,$9400FBFF,$6567FD28,$9016FF99
  2282.         dc.l    $6F437172,$002FC472,$A001A269,$10C0BAD7,$8211FF02
  2283.         dc.l    $B212A3A0,$520E7650,$9835447B,$159A6053,$8E16FB88
  2284.         dc.l    $1C5781D2,$567534E0,$00C4C74A,$A512A4E7,$C617E0C1
  2285.         dc.l    $4410BF71,$0E800220,$04033A41,$2B5D104E,$1E040FC4
  2286.         dc.l    $280411C0,$00122016,$3FEB2C2F,$2829F113,$16E0E391
  2287.         dc.l    $88A8240F,$E6B40438,$844DD006,$640EDBCF,$55E85051
  2288.         dc.l    $30671A4D,$6306E634,$1540831A,$460C16F0,$8318020C
  2289.         dc.l    $010102C4,$FEC154CC,$C42981A7,$E104289F,$ACFE3890
  2290.         dc.l    $E4F94014,$2002021C,$09800011,$47040393,$766982F3
  2291.         dc.l    $1EFE7020,$CD030742,$0114CD9C,$E874228C,$80519ACD
  2292.         dc.l    $9F00FE1B,$F2064008,$14D1E024,$162201A1,$F812207A
  2293.         dc.l    $28FCF913,$C13F42FE,$8204139E,$A50222B0,$140126A8
  2294.         dc.l    $0A84DEE8,$3DE07AC7,$0FE40581,$118D0408,$6127520C
  2295.         dc.l    $0DA1E283,$E459C2F8,$000E1898,$90FC1110,$A0B39D1B
  2296.         dc.l    $11D04BA0,$9F40E8FE,$44F0B4CA,$C0BC9EC0,$90608C14
  2297.         dc.l    $10EA2410,$F54171FE,$0EF1D389,$FFE2BC0B,$68275CA1
  2298.         dc.l    $88E8173E,$C83C2698,$F85764FE,$21027204,$419CB0E8
  2299.         dc.l    $10044040,$8313A2FE,$F83C0882,$F0E38F9B,$F1FC40AA
  2300.         dc.l    $00BE0408,$B6C0E4F9,$F85F80F0,$E1019B3C,$9604000C
  2301.         dc.l    $08045171,$7DC01816,$D8F37CB8,$16F97F22,$F970A4BE
  2302.         dc.l    $1BB1C3FB,$8F07C6FE,$57481E05,$F2400010,$00201638
  2303.         dc.l    $CE83F783,$02E37E77,$3110AC08,$B7C01143,$EF7ED382
  2304.         dc.l    $F27BE099,$FC09ECDD,$90F913CC,$CF7F6EF2,$F0A87747
  2305.         dc.l    $3D3B221F,$613C413E,$12996F44,$ECFFC273,$119CE74F
  2306.         dc.l    $E491516F,$0CFFFAAB,$8DFEC020,$4CE64B40,$0F9CCCC7
  2307.         dc.l    $9F882F1E,$5911DF18,$F352C43B,$D0172F64,$F524904F
  2308.         dc.l    $C0FCC142,$F4391F84,$0EE0EF41,$EA07B00C,$A1F83EBF
  2309.         dc.l    $4350FE04,$F43D88F1,$3C75663F,$5F8CC583,$62DE13F4
  2310.         dc.l    $3EC83F7D,$BE260F80,$794FC8FC,$F72A1E01,$F0CF8F90
  2311.         dc.l    $C0C0F813,$C9DF43E1,$87FE040E,$F823E355,$DF0E8F13
  2312.         dc.l    $FB270EE0,$8957C9E2,$4F208F05,$8C47F9FF,$04EF07F1
  2313.         dc.l    $0EF4ED30,$FE01CFBF,$900EE13F,$81E0FC89,$E0033D25
  2314.         dc.l    $0F9F820E,$E77DB54C,$F8FE44F0,$5890F81C,$8F050EF1
  2315.         dc.l    $C1C37E0B,$613C005C,$3591F818,$013F110F,$01F0FE4B
  2316.         dc.l    $A03C007A,$1AEA09BD,$090F81F0,$FE4F82F2,$80804027
  2317.         dc.l    $F2FE1C1C,$2610C2FF,$79210C64,$F2000045,$40F87879
  2318.         dc.l    $0A12E070,$7CB74812,$F0F8BF13,$EB371A13,$11F8FDF8
  2319.         dc.l    $429F12C2,$C07FED4C,$10E0E078,$189F0812,$F8FFB5E7
  2320.         dc.l    $230FA118,$388F8D14,$E01E0F88,$A7C30EF0,$C2DF038C
  2321.         dc.l    $A713F80F,$F73EA20E,$F0A1FC38,$1E3F9B18,$12FC0F00
  2322.         dc.l    $FFD740E4,$201FFA53,$08F84E80,$1487DFCB,$FE021879
  2323.         dc.l    $C0307FC0,$01E1FC3E,$43FE4414,$F9F36F9C,$AFC0C038
  2324.         dc.l    $01031D8F,$81E1F3F8,$4A048E16,$C787FF04,$F429FC41
  2325.         dc.l    $1F03E07F,$FC2C3116,$F807FE13,$BA8979F8,$046FC1E2
  2326.         dc.l    $4419C3FE,$1F2DF03C,$7FE03A21,$1FC3BF8D,$271CFCFF
  2327.         dc.l    $A71F8F9C,$407863E6,$041C03F8,$FF04F007,$7A427C00
  2328.         dc.l    $7F511DC2,$E17F9287,$A7F07F9F,$48091E0F,$F07E0F0F
  2329.         dc.l    $87C3C01F,$7F8920F3,$C0180F07,$83009B20,$23FE03C0
  2330.         dc.l    $5F3F00FF,$F10379E0,$FFFF0002,$FFE00040,$00800100
  2331.         dc.l    $010000C0,$02800300,$05000607,$08080709,$090A090A
  2332.         dc.w    $0C0D
  2333.     ENDC
  2334.  
  2335.         SECTION VARS,BSS,CHIP
  2336.  
  2337. vars        ds.b    gb_SIZEOF
  2338.  
  2339.         end
  2340.